/* * userport_diag_586220_harness.c - Userport part of the 586220 harness emulation. * * Written by * Marco van den Heuvel * * This file is part of VICE, the Versatile Commodore Emulator. * See README for copyright notice. * * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program; if not, write to the Free Software * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA * 02111-1307 USA. * */ /* Userport part of the 586220 harness (C64/C128) PIN | PIN | NOTES ----------------- 4 | 6 | CNT1 <-> CNT2 5 | 7 | SP1 <-> SP2 9 | M | PA3 <-> PA2 B | 8 | FLAG2 <- PC2 C | H | PB0 <-> PB4 D | J | PB1 <-> PB5 E | K | PB2 <-> PB6 F | L | PB3 <-> PB7 no data lines go to other ports */ #include "vice.h" #include #include #include #include "c64_diag_586220_harness.h" #include "cmdline.h" #include "resources.h" #include "joyport.h" #include "userport.h" #include "userport_diag_586220_harness.h" #include "log.h" /*#define DEBUG_DIAG_586220*/ #ifdef DEBUG_DIAG_586220 #define DBG(x) log_printf x #else #define DBG(x) #endif #ifdef USERPORT_EXPERIMENTAL_DEVICES int userport_diag_586220_harness_enabled = 0; /* ------------------------------------------------------------------------- */ /* Some prototypes are needed */ static uint8_t userport_diag_586220_harness_read_pbx(uint8_t orig); static void userport_diag_586220_harness_store_pbx(uint8_t value, int pulse); static uint8_t userport_diag_586220_harness_read_pa2(uint8_t orig); static void userport_diag_586220_harness_store_pa2(uint8_t value); static uint8_t userport_diag_586220_harness_read_pa3(uint8_t orig); static void userport_diag_586220_harness_store_pa3(uint8_t value); static uint8_t userport_diag_586220_harness_read_sp1(uint8_t orig); static void userport_diag_586220_harness_store_sp1(uint8_t value); static uint8_t userport_diag_586220_harness_read_sp2(uint8_t orig); static void userport_diag_586220_harness_store_sp2(uint8_t value); static int userport_diag_586220_harness_enable(int value); static userport_device_t diag_586220_harness_device = { "Userport diag 586220 harness", /* device name */ JOYSTICK_ADAPTER_ID_NONE, /* NOT a joystick adapter */ USERPORT_DEVICE_TYPE_HARNESS, /* device is an audio output */ userport_diag_586220_harness_enable, /* enable function */ userport_diag_586220_harness_read_pbx, /* read pb0-pb7 function */ userport_diag_586220_harness_store_pbx, /* store pb0-pb7 function */ userport_diag_586220_harness_read_pa2, /* read pa2 pin function */ userport_diag_586220_harness_store_pa2, /* store pa2 pin function */ userport_diag_586220_harness_read_pa3, /* read pa3 pin function */ userport_diag_586220_harness_store_pa3, /* store pa3 pin function */ 1, /* pc pin is needed */ userport_diag_586220_harness_store_sp1, /* store sp1 pin function */ userport_diag_586220_harness_read_sp1, /* read sp1 pin function */ userport_diag_586220_harness_store_sp2, /* store sp2 pin function */ userport_diag_586220_harness_read_sp2, /* read sp2 pin function */ NULL, /* NO reset function */ NULL, /* NO powerup function */ NULL, /* NO snapshot write function */ NULL /* NO snapshot read function */ }; /* ------------------------------------------------------------------------- */ static int userport_diag_586220_harness_enable(int value) { int val = value ? 1 : 0; userport_diag_586220_harness_enabled = val; return 0; } int userport_diag_586220_harness_resources_init(void) { return userport_device_register(USERPORT_DEVICE_DIAG_586220_HARNESS, &diag_586220_harness_device); } /* ---------------------------------------------------------------------*/ static uint8_t pax = 0; static uint8_t userport_diag_586220_harness_read_pbx(uint8_t orig) { return c64_diag_586220_read_userport_pbx(); } static void userport_diag_586220_harness_store_pbx(uint8_t value, int pulse) { set_userport_flag(1); /* signal lo->hi */ set_userport_flag(0); /* signal hi->lo */ c64_diag_586220_store_userport_pbx(value); } static uint8_t userport_diag_586220_harness_read_pa2(uint8_t orig) { return (c64_diag_586220_read_userport_pax() & 4) >> 2; } static void userport_diag_586220_harness_store_pa2(uint8_t value) { pax &= 0xfb; pax |= ((value & 1) << 2); DBG(("userport_diag_586220_harness_store_pa2 %02x (%02x)", value, pax)); c64_diag_586220_store_userport_pax(pax); } static uint8_t userport_diag_586220_harness_read_pa3(uint8_t orig) { return (c64_diag_586220_read_userport_pax() & 8) >> 3; } static void userport_diag_586220_harness_store_pa3(uint8_t value) { pax &= 0xf7; pax |= ((value & 1) << 3); DBG(("userport_diag_586220_harness_store_pa3 %02x (%02x)", value, pax)); c64_diag_586220_store_userport_pax(pax); } static uint8_t userport_diag_586220_harness_read_sp1(uint8_t orig) { return c64_diag_586220_read_userport_sp(0); } static void userport_diag_586220_harness_store_sp1(uint8_t value) { c64_diag_586220_store_userport_sp(0, value); } static uint8_t userport_diag_586220_harness_read_sp2(uint8_t orig) { return c64_diag_586220_read_userport_sp(1); } static void userport_diag_586220_harness_store_sp2(uint8_t value) { c64_diag_586220_store_userport_sp(1, value); } #endif