summaryrefslogtreecommitdiffstatshomepage
path: root/src/mame/drivers/a2600.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/mame/drivers/a2600.c')
-rw-r--r--src/mame/drivers/a2600.c552
1 files changed, 552 insertions, 0 deletions
diff --git a/src/mame/drivers/a2600.c b/src/mame/drivers/a2600.c
new file mode 100644
index 00000000000..cf61e133b62
--- /dev/null
+++ b/src/mame/drivers/a2600.c
@@ -0,0 +1,552 @@
+// 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 )