diff options
Diffstat (limited to 'src/mess/drivers/a2600.c')
-rw-r--r-- | src/mess/drivers/a2600.c | 552 |
1 files changed, 0 insertions, 552 deletions
diff --git a/src/mess/drivers/a2600.c b/src/mess/drivers/a2600.c deleted file mode 100644 index cf61e133b62..00000000000 --- a/src/mess/drivers/a2600.c +++ /dev/null @@ -1,552 +0,0 @@ -// license:BSD-3-Clause -// copyright-holders:Nathan Woods, Wilbert Pol -/*************************************************************************** - - Atari VCS 2600 driver - -TODO: -- Move the 2 32-in-1 rom dumps into their own driver -- Add 128-in-1 driver - -***************************************************************************/ - -#include "emu.h" -#include "machine/mos6530n.h" -#include "cpu/m6502/m6502.h" -#include "sound/tiaintf.h" -#include "video/tia.h" -#include "bus/vcs/vcs_slot.h" -#include "bus/vcs/rom.h" -#include "bus/vcs/dpc.h" -#include "bus/vcs/scharger.h" -#include "bus/vcs/compumat.h" -#include "bus/vcs_ctrl/ctrl.h" - -#define CONTROL1_TAG "joyport1" -#define CONTROL2_TAG "joyport2" - - -class a2600_state : public driver_device -{ -public: - a2600_state(const machine_config &mconfig, device_type type, const char *tag) - : driver_device(mconfig, type, tag), - m_riot_ram(*this, "riot_ram"), - m_joy1(*this, CONTROL1_TAG), - m_joy2(*this, CONTROL2_TAG) , - m_cart(*this, "cartslot"), - m_tia(*this, "tia_video"), - m_maincpu(*this, "maincpu"), - m_screen(*this, "screen"), - m_swb(*this, "SWB") - { } - - required_shared_ptr<UINT8> m_riot_ram; - UINT16 m_current_screen_height; - - DECLARE_MACHINE_START(a2600); - DECLARE_WRITE8_MEMBER(switch_A_w); - DECLARE_READ8_MEMBER(switch_A_r); - DECLARE_WRITE8_MEMBER(switch_B_w); - DECLARE_WRITE_LINE_MEMBER(irq_callback); - DECLARE_READ8_MEMBER(riot_input_port_8_r); - DECLARE_READ16_MEMBER(a2600_read_input_port); - DECLARE_READ8_MEMBER(a2600_get_databus_contents); - DECLARE_WRITE16_MEMBER(a2600_tia_vsync_callback); - DECLARE_WRITE16_MEMBER(a2600_tia_vsync_callback_pal); - DECLARE_WRITE8_MEMBER(cart_over_tia_w); - // investigate how the carts mapped here (Mapper JVP) interact with the RIOT device - DECLARE_READ8_MEMBER(cart_over_riot_r); - DECLARE_WRITE8_MEMBER(cart_over_riot_w); - -protected: - required_device<vcs_control_port_device> m_joy1; - required_device<vcs_control_port_device> m_joy2; - required_device<vcs_cart_slot_device> m_cart; - required_device<tia_video_device> m_tia; - - unsigned long detect_2600controllers(); - required_device<m6502_device> m_maincpu; - required_device<screen_device> m_screen; - required_ioport m_swb; -}; - - - -#define MASTER_CLOCK_NTSC 3579545 -#define MASTER_CLOCK_PAL 3546894 -#define CATEGORY_SELECT 16 - -static const UINT16 supported_screen_heights[4] = { 262, 312, 328, 342 }; - - -static ADDRESS_MAP_START(a2600_mem, AS_PROGRAM, 8, a2600_state ) - ADDRESS_MAP_GLOBAL_MASK(0x1fff) - AM_RANGE(0x0000, 0x007f) AM_MIRROR(0x0f00) AM_DEVREADWRITE("tia_video", tia_video_device, read, write) - AM_RANGE(0x0080, 0x00ff) AM_MIRROR(0x0d00) AM_RAM AM_SHARE("riot_ram") - AM_RANGE(0x0280, 0x029f) AM_MIRROR(0x0d00) AM_DEVICE("riot", mos6532_t, io_map) - // AM_RANGE(0x1000, 0x1fff) is cart data and it is configured at reset time, depending on the mounted cart! -ADDRESS_MAP_END - -WRITE8_MEMBER(a2600_state::switch_A_w) -{ - /* Left controller port */ - m_joy1->joy_w( data >> 4 ); - - /* Right controller port */ - m_joy2->joy_w( data & 0x0f ); - -// switch( ioport("CONTROLLERS")->read() % CATEGORY_SELECT ) -// { -// case 0x0a: /* KidVid voice module */ -// m_cassette->change_state(( data & 0x02 ) ? (cassette_state)CASSETTE_MOTOR_DISABLED : (cassette_state)(CASSETTE_MOTOR_ENABLED | CASSETTE_PLAY), (cassette_state)CASSETTE_MOTOR_DISABLED ); -// break; -// } -} - -READ8_MEMBER(a2600_state::switch_A_r) -{ - UINT8 val = 0; - - /* Left controller port PINs 1-4 ( 4321 ) */ - val |= ( m_joy1->joy_r() & 0x0F ) << 4; - - /* Right controller port PINs 1-4 ( 4321 ) */ - val |= m_joy2->joy_r() & 0x0F; - - return val; -} - -WRITE8_MEMBER(a2600_state::switch_B_w) -{ -} - -WRITE_LINE_MEMBER(a2600_state::irq_callback) -{ -} - -READ8_MEMBER(a2600_state::riot_input_port_8_r) -{ - return m_swb->read(); -} - - -READ16_MEMBER(a2600_state::a2600_read_input_port) -{ - switch( offset ) - { - case 0: /* Left controller port PIN 5 */ - return m_joy1->pot_x_r(); - - case 1: /* Left controller port PIN 9 */ - return m_joy1->pot_y_r(); - - case 2: /* Right controller port PIN 5 */ - return m_joy2->pot_x_r(); - - case 3: /* Right controller port PIN 9 */ - return m_joy2->pot_y_r(); - - case 4: /* Left controller port PIN 6 */ - return ( m_joy1->joy_r() & 0x20 ) ? 0xff : 0x7f; - - case 5: /* Right controller port PIN 6 */ - return ( m_joy2->joy_r() & 0x20 ) ? 0xff : 0x7f; - } - return 0xff; -} - -/* There are a few games that do an LDA ($80-$FF),Y instruction. - The contents off the databus then depend on whatever was read - from the RAM. To do this really properly the 6502 core would - need to keep track of the last databus contents so we can query - that. For now this is a quick hack to determine that value anyway. - Examples: - Q-Bert's Qubes (NTSC,F6) at 0x1594 - Berzerk at 0xF093. -*/ -READ8_MEMBER(a2600_state::a2600_get_databus_contents) -{ - UINT16 last_address, prev_address; - UINT8 last_byte, prev_byte; - address_space& prog_space = m_maincpu->space(AS_PROGRAM); - - last_address = m_maincpu->pc() + 1; - if ( ! ( last_address & 0x1080 ) ) - { - return offset; - } - last_byte = prog_space.read_byte(last_address ); - if ( last_byte < 0x80 || last_byte == 0xFF ) - { - return last_byte; - } - prev_address = last_address - 1; - if ( ! ( prev_address & 0x1080 ) ) - { - return last_byte; - } - prev_byte = prog_space.read_byte(prev_address ); - if ( prev_byte == 0xB1 ) - { /* LDA (XX),Y */ - return prog_space.read_byte(last_byte + 1 ); - } - return last_byte; -} - -#if 0 -static const rectangle visarea[4] = { - { 26, 26 + 160 + 16, 24, 24 + 192 + 31 }, /* 262 */ - { 26, 26 + 160 + 16, 32, 32 + 228 + 31 }, /* 312 */ - { 26, 26 + 160 + 16, 45, 45 + 240 + 31 }, /* 328 */ - { 26, 26 + 160 + 16, 48, 48 + 240 + 31 } /* 342 */ -}; -#endif - -WRITE16_MEMBER(a2600_state::a2600_tia_vsync_callback) -{ - int i; - - for ( i = 0; i < ARRAY_LENGTH(supported_screen_heights); i++ ) - { - if ( data >= supported_screen_heights[i] - 3 && data <= supported_screen_heights[i] + 3 ) - { - if ( supported_screen_heights[i] != m_current_screen_height ) - { - m_current_screen_height = supported_screen_heights[i]; -// m_screen->configure(228, m_current_screen_height, &visarea[i], HZ_TO_ATTOSECONDS( MASTER_CLOCK_NTSC ) * 228 * m_current_screen_height ); - } - } - } -} - -WRITE16_MEMBER(a2600_state::a2600_tia_vsync_callback_pal) -{ - int i; - - for ( i = 0; i < ARRAY_LENGTH(supported_screen_heights); i++ ) - { - if ( data >= supported_screen_heights[i] - 3 && data <= supported_screen_heights[i] + 3 ) - { - if ( supported_screen_heights[i] != m_current_screen_height ) - { - m_current_screen_height = supported_screen_heights[i]; -// m_screen->configure(228, m_current_screen_height, &visarea[i], HZ_TO_ATTOSECONDS( MASTER_CLOCK_PAL ) * 228 * m_current_screen_height ); - } - } - } -} - -// TODO: is this the correct behavior for the real hardware?!? -READ8_MEMBER(a2600_state::cart_over_riot_r) -{ - if (!space.debugger_access()) - m_cart->write_bank(space, offset, 0); - return m_riot_ram[0x20 + offset]; -} - -WRITE8_MEMBER(a2600_state::cart_over_riot_w) -{ - m_cart->write_bank(space, offset, 0); - m_riot_ram[0x20 + offset] = data; - -} - -WRITE8_MEMBER(a2600_state::cart_over_tia_w) -{ - // Both Cart & TIA see these addresses - m_cart->write_bank(space, offset, data); - m_tia->write(space, offset, data); -} - -MACHINE_START_MEMBER(a2600_state,a2600) -{ - m_current_screen_height = m_screen->height(); - memset(m_riot_ram, 0x00, 0x80); - - switch (m_cart->get_cart_type()) - { - case A26_2K: - case A26_4K: - case A26_F4: - case A26_F8: - case A26_F8SW: - case A26_FA: - case A26_E0: - case A26_E7: - case A26_CV: - case A26_DC: - case A26_FV: - case A26_8IN1: - m_maincpu->space(AS_PROGRAM).install_readwrite_handler(0x1000, 0x1fff, read8_delegate(FUNC(vcs_cart_slot_device::read_rom),(vcs_cart_slot_device*)m_cart), write8_delegate(FUNC(vcs_cart_slot_device::write_bank),(vcs_cart_slot_device*)m_cart)); - break; - case A26_F6: - case A26_DPC: - m_maincpu->space(AS_PROGRAM).install_readwrite_handler(0x1000, 0x1fff, read8_delegate(FUNC(vcs_cart_slot_device::read_rom),(vcs_cart_slot_device*)m_cart), write8_delegate(FUNC(vcs_cart_slot_device::write_bank),(vcs_cart_slot_device*)m_cart)); - m_maincpu->space(AS_PROGRAM).set_direct_update_handler(direct_update_delegate(FUNC(vcs_cart_slot_device::cart_opbase),(vcs_cart_slot_device*)m_cart)); - break; - case A26_FE: - m_maincpu->space(AS_PROGRAM).install_readwrite_handler(0x1000, 0x1fff, read8_delegate(FUNC(vcs_cart_slot_device::read_rom),(vcs_cart_slot_device*)m_cart), write8_delegate(FUNC(vcs_cart_slot_device::write_ram),(vcs_cart_slot_device*)m_cart)); - m_maincpu->space(AS_PROGRAM).install_read_handler(0x01fe, 0x01ff, read8_delegate(FUNC(vcs_cart_slot_device::read_bank),(vcs_cart_slot_device*)m_cart)); - m_maincpu->space(AS_PROGRAM).install_write_handler(0x01fe, 0x01fe, write8_delegate(FUNC(vcs_cart_slot_device::write_bank),(vcs_cart_slot_device*)m_cart)); - break; - case A26_3E: - m_maincpu->space(AS_PROGRAM).install_readwrite_handler(0x1000, 0x1fff, read8_delegate(FUNC(vcs_cart_slot_device::read_rom),(vcs_cart_slot_device*)m_cart), write8_delegate(FUNC(vcs_cart_slot_device::write_ram),(vcs_cart_slot_device*)m_cart)); - m_maincpu->space(AS_PROGRAM).install_write_handler(0x00, 0x3f, write8_delegate(FUNC(a2600_state::cart_over_tia_w), this)); - break; - case A26_3F: - m_maincpu->space(AS_PROGRAM).install_read_handler(0x1000, 0x1fff, read8_delegate(FUNC(vcs_cart_slot_device::read_rom),(vcs_cart_slot_device*)m_cart)); - m_maincpu->space(AS_PROGRAM).install_write_handler(0x00, 0x3f, write8_delegate(FUNC(a2600_state::cart_over_tia_w), this)); - break; - case A26_UA: - m_maincpu->space(AS_PROGRAM).install_read_handler(0x1000, 0x1fff, read8_delegate(FUNC(vcs_cart_slot_device::read_rom),(vcs_cart_slot_device*)m_cart)); - m_maincpu->space(AS_PROGRAM).install_readwrite_handler(0x200, 0x27f, read8_delegate(FUNC(vcs_cart_slot_device::read_bank),(vcs_cart_slot_device*)m_cart), write8_delegate(FUNC(vcs_cart_slot_device::write_bank),(vcs_cart_slot_device*)m_cart)); - break; - case A26_JVP: - m_maincpu->space(AS_PROGRAM).install_readwrite_handler(0x1000, 0x1fff, read8_delegate(FUNC(vcs_cart_slot_device::read_rom),(vcs_cart_slot_device*)m_cart), write8_delegate(FUNC(vcs_cart_slot_device::write_bank),(vcs_cart_slot_device*)m_cart)); - // to verify the actual behavior... - m_maincpu->space(AS_PROGRAM).install_readwrite_handler(0xfa0, 0xfc0, read8_delegate(FUNC(a2600_state::cart_over_riot_r), this), write8_delegate(FUNC(a2600_state::cart_over_riot_w), this)); - break; - case A26_4IN1: - case A26_32IN1: - m_maincpu->space(AS_PROGRAM).install_read_handler(0x1000, 0x1fff, read8_delegate(FUNC(vcs_cart_slot_device::read_rom),(vcs_cart_slot_device*)m_cart)); - break; - case A26_SS: - m_maincpu->space(AS_PROGRAM).install_read_handler(0x1000, 0x1fff, read8_delegate(FUNC(vcs_cart_slot_device::read_rom),(vcs_cart_slot_device*)m_cart)); - break; - case A26_CM: - m_maincpu->space(AS_PROGRAM).install_read_handler(0x1000, 0x1fff, read8_delegate(FUNC(vcs_cart_slot_device::read_rom),(vcs_cart_slot_device*)m_cart)); - break; - } - - /* Banks may have changed, reset the cpu so it uses the correct reset vector */ - m_maincpu->reset(); - - save_item(NAME(m_current_screen_height)); -} - - -#ifdef UNUSED_FUNCTIONS -// try to detect 2600 controller setup. returns 32bits with left/right controller info -unsigned a2600_state::long detect_2600controllers() -{ -#define JOYS 0x001 -#define PADD 0x002 -#define KEYP 0x004 -#define LGUN 0x008 -#define INDY 0x010 -#define BOOS 0x020 -#define KVID 0x040 -#define CMTE 0x080 -#define MLNK 0x100 -#define AMSE 0x200 -#define CX22 0x400 -#define CX80 0x800 - - unsigned int left,right; - int i,j,foundkeypad = 0; - UINT8 *cart; - static const unsigned char signatures[][5] = { - { 0x55, 0xa5, 0x3c, 0x29, 0}, // star raiders - { 0xf9, 0xff, 0xa5, 0x80, 1}, // sentinel - { 0x81, 0x02, 0xe8, 0x86, 1}, // shooting arcade - { 0x02, 0xa9, 0xec, 0x8d, 1}, // guntest4 tester - { 0x85, 0x2c, 0x85, 0xa7, 2}, // INDY 500 - { 0xa1, 0x8d, 0x9d, 0x02, 2}, // omega race INDY - { 0x65, 0x72, 0x44, 0x43, 2}, // Sprintmaster INDY - { 0x89, 0x8a, 0x99, 0xaa, 3}, // omega race - { 0x9a, 0x8e, 0x81, 0x02, 4}, - { 0xdd, 0x8d, 0x80, 0x02, 4}, - { 0x85, 0x8e, 0x81, 0x02, 4}, - { 0x8d, 0x81, 0x02, 0xe6, 4}, - { 0xff, 0x8d, 0x81, 0x02, 4}, - { 0xa9, 0x03, 0x8d, 0x81, 5}, - { 0xa9, 0x73, 0x8d, 0x80, 6}, - // { 0x82, 0x02, 0x85, 0x8f, 7}, // Mind Maze (really Mind Link??) - { 0xa9, 0x30, 0x8d, 0x80, 7}, // Bionic Breakthrough - { 0x02, 0x8e, 0x81, 0x02, 7}, // Telepathy - { 0x41, 0x6d, 0x69, 0x67, 9}, // Missile Command Amiga Mouse - { 0x43, 0x58, 0x2d, 0x32, 10}, // Missile Command CX22 TrackBall - { 0x43, 0x58, 0x2d, 0x38, 11}, // Missile Command CX80 TrackBall - { 0x4e, 0xa8, 0xa4, 0xa2, 12}, // Omega Race for Joystick ONLY - { 0xa6, 0xef, 0xb5, 0x38, 8} // Warlords.. paddles ONLY - }; - // start with this.. if anyone finds a game that does NOT work with both controllers enabled - // it can be fixed here with a new signature (note that the Coleco Gemini has this setup also) - left = JOYS+PADD; right = JOYS+PADD; - // default for bad dumps and roms too large to have special controllers - if ((m_cart_size > 0x4000) || (m_cart_size & 0x7ff)) return (left << 16) + right; - - cart = CART; - for (i = 0; i < m_cart_size - (sizeof signatures/sizeof signatures[0]); i++) - { - for (j = 0; j < (sizeof signatures/sizeof signatures[0]); j++) - { - if (!memcmp(&cart[i], &signatures[j],sizeof signatures[0] - 1)) - { - int k = signatures[j][4]; - if (k == 0) return (JOYS << 16) + KEYP; - if (k == 1) return (LGUN << 16); - if (k == 2) return (INDY << 16) + INDY; - if (k == 3) return (BOOS << 16) + BOOS; - if (k == 5) return (JOYS << 16) + KVID; - if (k == 6) return (CMTE << 16) + CMTE; - if (k == 7) return (MLNK << 16) + MLNK; - if (k == 8) return (PADD << 16) + PADD; - if (k == 9) return (AMSE << 16) + AMSE; - if (k == 10) return (CX22 << 16) + CX22; - if (k == 11) return (CX80 << 16) + CX80; - if (k == 12) return (JOYS << 16) + JOYS; - if (k == 4) foundkeypad = 1; - } - } - } - if (foundkeypad) return (KEYP << 16) + KEYP; - return (left << 16) + right; -} -#endif - - -static INPUT_PORTS_START( a2600 ) - PORT_START("SWB") - PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_OTHER ) PORT_NAME("Reset Game") PORT_CODE(KEYCODE_2) - PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_OTHER ) PORT_NAME("Select Game") PORT_CODE(KEYCODE_1) - PORT_BIT ( 0x04, IP_ACTIVE_LOW, IPT_UNUSED ) - PORT_DIPNAME( 0x08, 0x08, "TV Type" ) PORT_CODE(KEYCODE_C) PORT_TOGGLE - PORT_DIPSETTING( 0x08, "Color" ) - PORT_DIPSETTING( 0x00, "B&W" ) - PORT_BIT ( 0x10, IP_ACTIVE_LOW, IPT_UNUSED ) - PORT_BIT ( 0x20, IP_ACTIVE_LOW, IPT_UNUSED ) - PORT_DIPNAME( 0x40, 0x00, "Left Diff. Switch" ) PORT_CODE(KEYCODE_3) PORT_TOGGLE - PORT_DIPSETTING( 0x40, "A" ) - PORT_DIPSETTING( 0x00, "B" ) - PORT_DIPNAME( 0x80, 0x00, "Right Diff. Switch" ) PORT_CODE(KEYCODE_4) PORT_TOGGLE - PORT_DIPSETTING( 0x80, "A" ) - PORT_DIPSETTING( 0x00, "B" ) -INPUT_PORTS_END - - -static SLOT_INTERFACE_START(a2600_cart) - SLOT_INTERFACE_INTERNAL("a26_2k", A26_ROM_2K) - SLOT_INTERFACE_INTERNAL("a26_4k", A26_ROM_4K) - SLOT_INTERFACE_INTERNAL("a26_f4", A26_ROM_F4) - SLOT_INTERFACE_INTERNAL("a26_f6", A26_ROM_F6) - SLOT_INTERFACE_INTERNAL("a26_f8", A26_ROM_F8) - SLOT_INTERFACE_INTERNAL("a26_f8sw", A26_ROM_F8_SW) - SLOT_INTERFACE_INTERNAL("a26_fa", A26_ROM_FA) - SLOT_INTERFACE_INTERNAL("a26_fe", A26_ROM_FE) - SLOT_INTERFACE_INTERNAL("a26_3e", A26_ROM_3E) - SLOT_INTERFACE_INTERNAL("a26_3f", A26_ROM_3F) - SLOT_INTERFACE_INTERNAL("a26_e0", A26_ROM_E0) - SLOT_INTERFACE_INTERNAL("a26_e7", A26_ROM_E7) - SLOT_INTERFACE_INTERNAL("a26_ua", A26_ROM_UA) - SLOT_INTERFACE_INTERNAL("a26_cv", A26_ROM_CV) - SLOT_INTERFACE_INTERNAL("a26_dc", A26_ROM_DC) - SLOT_INTERFACE_INTERNAL("a26_fv", A26_ROM_FV) - SLOT_INTERFACE_INTERNAL("a26_jvp", A26_ROM_JVP) - SLOT_INTERFACE_INTERNAL("a26_cm", A26_ROM_COMPUMATE) - SLOT_INTERFACE_INTERNAL("a26_ss", A26_ROM_SUPERCHARGER) - SLOT_INTERFACE_INTERNAL("a26_dpc", A26_ROM_DPC) - SLOT_INTERFACE_INTERNAL("a26_4in1", A26_ROM_4IN1) - SLOT_INTERFACE_INTERNAL("a26_8in1", A26_ROM_8IN1) - SLOT_INTERFACE_INTERNAL("a26_32in1", A26_ROM_32IN1) -SLOT_INTERFACE_END - -static MACHINE_CONFIG_FRAGMENT(a2600_cartslot) - MCFG_VCS_CARTRIDGE_ADD("cartslot", a2600_cart, NULL) - - /* software lists */ - MCFG_SOFTWARE_LIST_ADD("cart_list","a2600") - MCFG_SOFTWARE_LIST_ADD("cass_list","a2600_cass") -MACHINE_CONFIG_END - -static MACHINE_CONFIG_START( a2600, a2600_state ) - /* basic machine hardware */ - MCFG_CPU_ADD("maincpu", M6502, MASTER_CLOCK_NTSC / 3) /* actually M6507 */ - MCFG_M6502_DISABLE_DIRECT() - MCFG_CPU_PROGRAM_MAP(a2600_mem) - - MCFG_MACHINE_START_OVERRIDE(a2600_state,a2600) - - /* video hardware */ - MCFG_DEVICE_ADD("tia_video", TIA_NTSC_VIDEO, 0) - MCFG_TIA_READ_INPUT_PORT_CB(READ16(a2600_state, a2600_read_input_port)) - MCFG_TIA_DATABUS_CONTENTS_CB(READ8(a2600_state, a2600_get_databus_contents)) - MCFG_TIA_VSYNC_CB(WRITE16(a2600_state, a2600_tia_vsync_callback)) - - MCFG_SCREEN_ADD("screen", RASTER) - MCFG_SCREEN_RAW_PARAMS( MASTER_CLOCK_NTSC, 228, 26, 26 + 160 + 16, 262, 24 , 24 + 192 + 31 ) - MCFG_SCREEN_UPDATE_DEVICE("tia_video", tia_video_device, screen_update) - MCFG_SCREEN_PALETTE("tia_video:palette") - - /* sound hardware */ - MCFG_SPEAKER_STANDARD_MONO("mono") - MCFG_SOUND_TIA_ADD("tia", MASTER_CLOCK_NTSC/114) - MCFG_SOUND_ROUTE(ALL_OUTPUTS, "mono", 0.90) - - /* devices */ - MCFG_DEVICE_ADD("riot", MOS6532n, MASTER_CLOCK_NTSC / 3) - MCFG_MOS6530n_IN_PA_CB(READ8(a2600_state, switch_A_r)) - MCFG_MOS6530n_OUT_PA_CB(WRITE8(a2600_state, switch_A_w)) - MCFG_MOS6530n_IN_PB_CB(READ8(a2600_state, riot_input_port_8_r)) - MCFG_MOS6530n_OUT_PB_CB(WRITE8(a2600_state, switch_B_w)) - MCFG_MOS6530n_IRQ_CB(WRITELINE(a2600_state, irq_callback)) - - MCFG_VCS_CONTROL_PORT_ADD(CONTROL1_TAG, vcs_control_port_devices, "joy") - MCFG_VCS_CONTROL_PORT_ADD(CONTROL2_TAG, vcs_control_port_devices, NULL) - - MCFG_FRAGMENT_ADD(a2600_cartslot) - MCFG_SOFTWARE_LIST_FILTER("cart_list", "NTSC") -MACHINE_CONFIG_END - - -static MACHINE_CONFIG_START( a2600p, a2600_state ) - /* basic machine hardware */ - MCFG_CPU_ADD("maincpu", M6502, MASTER_CLOCK_PAL / 3) /* actually M6507 */ - MCFG_CPU_PROGRAM_MAP(a2600_mem) - MCFG_M6502_DISABLE_DIRECT() - - MCFG_MACHINE_START_OVERRIDE(a2600_state,a2600) - - /* video hardware */ - MCFG_DEVICE_ADD("tia_video", TIA_PAL_VIDEO, 0) - MCFG_TIA_READ_INPUT_PORT_CB(READ16(a2600_state, a2600_read_input_port)) - MCFG_TIA_DATABUS_CONTENTS_CB(READ8(a2600_state, a2600_get_databus_contents)) - MCFG_TIA_VSYNC_CB(WRITE16(a2600_state, a2600_tia_vsync_callback_pal)) - - - MCFG_SCREEN_ADD("screen", RASTER) - MCFG_SCREEN_RAW_PARAMS( MASTER_CLOCK_PAL, 228, 26, 26 + 160 + 16, 312, 32, 32 + 228 + 31 ) - MCFG_SCREEN_UPDATE_DEVICE("tia_video", tia_video_device, screen_update) - MCFG_SCREEN_PALETTE("tia_video:palette") - - /* sound hardware */ - MCFG_SPEAKER_STANDARD_MONO("mono") - MCFG_SOUND_TIA_ADD("tia", MASTER_CLOCK_PAL/114) - MCFG_SOUND_ROUTE(ALL_OUTPUTS, "mono", 0.90) - - /* devices */ - MCFG_DEVICE_ADD("riot", MOS6532n, MASTER_CLOCK_PAL / 3) - MCFG_MOS6530n_IN_PA_CB(READ8(a2600_state, switch_A_r)) - MCFG_MOS6530n_OUT_PA_CB(WRITE8(a2600_state, switch_A_w)) - MCFG_MOS6530n_IN_PB_CB(READ8(a2600_state, riot_input_port_8_r)) - MCFG_MOS6530n_OUT_PB_CB(WRITE8(a2600_state, switch_B_w)) - MCFG_MOS6530n_IRQ_CB(WRITELINE(a2600_state, irq_callback)) - - MCFG_VCS_CONTROL_PORT_ADD(CONTROL1_TAG, vcs_control_port_devices, "joy") - MCFG_VCS_CONTROL_PORT_ADD(CONTROL2_TAG, vcs_control_port_devices, NULL) - - MCFG_FRAGMENT_ADD(a2600_cartslot) - MCFG_SOFTWARE_LIST_FILTER("cart_list", "PAL") -MACHINE_CONFIG_END - - -ROM_START( a2600 ) - ROM_REGION( 0x2000, "maincpu", ROMREGION_ERASEFF ) -ROM_END - -#define rom_a2600p rom_a2600 - -/* YEAR NAME PARENT COMPAT MACHINE INPUT INIT COMPANY FULLNAME */ -CONS( 1977, a2600, 0, 0, a2600, a2600, driver_device, 0, "Atari", "Atari 2600 (NTSC)" , MACHINE_SUPPORTS_SAVE ) -CONS( 1978, a2600p, a2600, 0, a2600p, a2600, driver_device, 0, "Atari", "Atari 2600 (PAL)", MACHINE_SUPPORTS_SAVE ) |