summaryrefslogtreecommitdiffstatshomepage
path: root/trunk/src/mame/drivers/atetris.c
diff options
context:
space:
mode:
Diffstat (limited to 'trunk/src/mame/drivers/atetris.c')
-rw-r--r--trunk/src/mame/drivers/atetris.c509
1 files changed, 509 insertions, 0 deletions
diff --git a/trunk/src/mame/drivers/atetris.c b/trunk/src/mame/drivers/atetris.c
new file mode 100644
index 00000000000..ed8562902a8
--- /dev/null
+++ b/trunk/src/mame/drivers/atetris.c
@@ -0,0 +1,509 @@
+/***************************************************************************
+
+ Atari Tetris hardware
+
+ driver by Zsolt Vasvari
+
+ Games supported:
+ * Tetris
+
+ Known bugs:
+ * none at this time
+
+****************************************************************************
+
+ Memory map
+
+****************************************************************************
+
+ ========================================================================
+ CPU #1
+ ========================================================================
+ 0000-0FFF R/W xxxxxxxx Program RAM
+ 1000-1FFF R/W xxxxxxxx Playfield RAM
+ xxxxxxxx (byte 0: LSB of character code)
+ -----xxx (byte 1: MSB of character code)
+ xxxx---- (byte 1: palette index)
+ 2000-20FF R/W xxxxxxxx Palette RAM
+ xxx---- (red component)
+ ---xxx-- (green component)
+ ------xx (blue component)
+ 2400-25FF R/W xxxxxxxx EEPROM
+ 2800-280F R/W xxxxxxxx POKEY #1
+ 2810-281F R/W xxxxxxxx POKEY #2
+ 3000 W -------- Watchdog
+ 3400 W -------- EEPROM write enable
+ 3800 W -------- IRQ acknowledge
+ 3C00 W --xx---- Coin counters
+ W --x----- (right coin counter)
+ W ---x---- (left coin counter)
+ 4000-7FFF R xxxxxxxx Banked program ROM
+ 8000-FFFF R xxxxxxxx Program ROM
+ ========================================================================
+ Interrupts:
+ IRQ generated by 32V
+ ========================================================================
+
+***************************************************************************/
+
+
+#include "emu.h"
+#include "cpu/m6502/m6502.h"
+#include "includes/slapstic.h"
+#include "includes/atetris.h"
+#include "sound/sn76496.h"
+#include "sound/pokey.h"
+#include "machine/nvram.h"
+
+
+#define MASTER_CLOCK XTAL_14_31818MHz
+#define BOOTLEG_CLOCK XTAL_14_7456MHz
+
+
+/*************************************
+ *
+ * Interrupt generation
+ *
+ *************************************/
+
+static TIMER_CALLBACK( interrupt_gen )
+{
+ atetris_state *state = machine.driver_data<atetris_state>();
+ int scanline = param;
+
+ /* assert/deassert the interrupt */
+ cputag_set_input_line(machine, "maincpu", 0, (scanline & 32) ? ASSERT_LINE : CLEAR_LINE);
+
+ /* set the next timer */
+ scanline += 32;
+ if (scanline >= 256)
+ scanline -= 256;
+ state->m_interrupt_timer->adjust(machine.primary_screen->time_until_pos(scanline), scanline);
+}
+
+
+WRITE8_MEMBER(atetris_state::irq_ack_w)
+{
+ cputag_set_input_line(machine(), "maincpu", 0, CLEAR_LINE);
+}
+
+
+
+/*************************************
+ *
+ * Machine init
+ *
+ *************************************/
+
+static void reset_bank(running_machine &machine)
+{
+ atetris_state *state = machine.driver_data<atetris_state>();
+
+ memcpy(state->m_slapstic_base, &state->m_slapstic_source[state->m_current_bank * 0x4000], 0x4000);
+}
+
+
+static MACHINE_START( atetris )
+{
+ atetris_state *state = machine.driver_data<atetris_state>();
+
+ /* Allocate interrupt timer */
+ state->m_interrupt_timer = machine.scheduler().timer_alloc(FUNC(interrupt_gen));
+
+ /* Set up save state */
+ state->save_item(NAME(state->m_current_bank));
+ state->save_item(NAME(state->m_nvram_write_enable));
+ machine.save().register_postload(save_prepost_delegate(FUNC(reset_bank), &machine));
+}
+
+
+static MACHINE_RESET( atetris )
+{
+ atetris_state *state = machine.driver_data<atetris_state>();
+
+ /* reset the slapstic */
+ slapstic_reset();
+ state->m_current_bank = slapstic_bank() & 1;
+ reset_bank(machine);
+
+ /* start interrupts going (32V clocked by 16V) */
+ state->m_interrupt_timer->adjust(machine.primary_screen->time_until_pos(48), 48);
+}
+
+
+
+/*************************************
+ *
+ * Slapstic handler
+ *
+ *************************************/
+
+READ8_MEMBER(atetris_state::atetris_slapstic_r)
+{
+ int result = m_slapstic_base[0x2000 + offset];
+ int new_bank = slapstic_tweak(&space, offset) & 1;
+
+ /* update for the new bank */
+ if (new_bank != m_current_bank)
+ {
+ m_current_bank = new_bank;
+ memcpy(m_slapstic_base, &m_slapstic_source[m_current_bank * 0x4000], 0x4000);
+ }
+ return result;
+}
+
+
+
+/*************************************
+ *
+ * Coin counters
+ *
+ *************************************/
+
+WRITE8_MEMBER(atetris_state::coincount_w)
+{
+ coin_counter_w(machine(), 0, (data >> 5) & 1);
+ coin_counter_w(machine(), 1, (data >> 4) & 1);
+}
+
+
+
+/*************************************
+ *
+ * NVRAM handlers
+ *
+ *************************************/
+
+WRITE8_MEMBER(atetris_state::nvram_w)
+{
+
+ if (m_nvram_write_enable)
+ m_nvram[offset] = data;
+ m_nvram_write_enable = 0;
+}
+
+
+WRITE8_MEMBER(atetris_state::nvram_enable_w)
+{
+
+ m_nvram_write_enable = 1;
+}
+
+
+
+/*************************************
+ *
+ * Main CPU memory handlers
+ *
+ *************************************/
+
+/* full address map derived from schematics */
+static ADDRESS_MAP_START( main_map, AS_PROGRAM, 8, atetris_state )
+ AM_RANGE(0x0000, 0x0fff) AM_RAM
+ AM_RANGE(0x1000, 0x1fff) AM_RAM_WRITE(atetris_videoram_w) AM_SHARE("videoram")
+ AM_RANGE(0x2000, 0x20ff) AM_MIRROR(0x0300) AM_RAM_WRITE(paletteram_RRRGGGBB_byte_w) AM_SHARE("paletteram")
+ AM_RANGE(0x2400, 0x25ff) AM_MIRROR(0x0200) AM_RAM_WRITE(nvram_w) AM_SHARE("nvram")
+ AM_RANGE(0x2800, 0x280f) AM_MIRROR(0x03e0) AM_DEVREADWRITE("pokey1", pokeyn_device, read, write)
+ AM_RANGE(0x2810, 0x281f) AM_MIRROR(0x03e0) AM_DEVREADWRITE("pokey2", pokeyn_device, read, write)
+ AM_RANGE(0x3000, 0x3000) AM_MIRROR(0x03ff) AM_WRITE(watchdog_reset_w)
+ AM_RANGE(0x3400, 0x3400) AM_MIRROR(0x03ff) AM_WRITE(nvram_enable_w)
+ AM_RANGE(0x3800, 0x3800) AM_MIRROR(0x03ff) AM_WRITE(irq_ack_w)
+ AM_RANGE(0x3c00, 0x3c00) AM_MIRROR(0x03ff) AM_WRITE(coincount_w)
+ AM_RANGE(0x4000, 0x5fff) AM_ROM
+ AM_RANGE(0x6000, 0x7fff) AM_READ(atetris_slapstic_r)
+ AM_RANGE(0x8000, 0xffff) AM_ROM
+ADDRESS_MAP_END
+
+
+static ADDRESS_MAP_START( atetrisb2_map, AS_PROGRAM, 8, atetris_state )
+ AM_RANGE(0x0000, 0x0fff) AM_RAM
+ AM_RANGE(0x1000, 0x1fff) AM_RAM_WRITE(atetris_videoram_w) AM_SHARE("videoram")
+ AM_RANGE(0x2000, 0x20ff) AM_RAM_WRITE(paletteram_RRRGGGBB_byte_w) AM_SHARE("paletteram")
+ AM_RANGE(0x2400, 0x25ff) AM_RAM_WRITE(nvram_w) AM_SHARE("nvram")
+ AM_RANGE(0x2802, 0x2802) AM_DEVWRITE_LEGACY("sn1", sn76496_w)
+ AM_RANGE(0x2804, 0x2804) AM_DEVWRITE_LEGACY("sn2", sn76496_w)
+ AM_RANGE(0x2806, 0x2806) AM_DEVWRITE_LEGACY("sn3", sn76496_w)
+ AM_RANGE(0x2808, 0x2808) AM_READ_PORT("IN0")
+ AM_RANGE(0x2818, 0x2818) AM_READ_PORT("IN1")
+ AM_RANGE(0x3000, 0x3000) AM_WRITE(watchdog_reset_w)
+ AM_RANGE(0x3400, 0x3400) AM_WRITE(nvram_enable_w)
+ AM_RANGE(0x3800, 0x3800) AM_WRITE(irq_ack_w)
+ AM_RANGE(0x3c00, 0x3c00) AM_WRITE(coincount_w)
+ AM_RANGE(0x4000, 0x5fff) AM_ROM
+ AM_RANGE(0x6000, 0x7fff) AM_READ(atetris_slapstic_r)
+ AM_RANGE(0x8000, 0xffff) AM_ROM
+ADDRESS_MAP_END
+
+
+
+/*************************************
+ *
+ * Port definitions
+ *
+ *************************************/
+
+static INPUT_PORTS_START( atetris )
+ // These ports are read via the Pokeys
+ PORT_START("IN0")
+ PORT_BIT( 0x01, IP_ACTIVE_HIGH, IPT_COIN2 )
+ PORT_BIT( 0x02, IP_ACTIVE_HIGH, IPT_COIN1 )
+ PORT_DIPNAME( 0x04, 0x00, "Freeze" ) PORT_DIPLOCATION("50H:!4")
+ PORT_DIPSETTING( 0x00, DEF_STR( Off ) )
+ PORT_DIPSETTING( 0x04, DEF_STR( On ) )
+ PORT_DIPNAME( 0x08, 0x00, "Freeze Step" ) PORT_DIPLOCATION("50H:!3")
+ PORT_DIPSETTING( 0x00, DEF_STR( Off ) )
+ PORT_DIPSETTING( 0x08, DEF_STR( On ) )
+ PORT_DIPUNUSED_DIPLOC( 0x10, 0x00, "50H:!2" ) /* Listed As "SPARE2 (Unused)" */
+ PORT_DIPUNUSED_DIPLOC( 0x20, 0x00, "50H:!1" ) /* Listed As "SPARE1 (Unused)" */
+ PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_CUSTOM ) PORT_VBLANK("screen")
+ PORT_SERVICE( 0x80, IP_ACTIVE_HIGH )
+
+ PORT_START("IN1")
+ PORT_BIT( 0x01, IP_ACTIVE_HIGH, IPT_BUTTON1) PORT_PLAYER(1)
+ PORT_BIT( 0x02, IP_ACTIVE_HIGH, IPT_JOYSTICK_DOWN ) PORT_4WAY PORT_PLAYER(1)
+ PORT_BIT( 0x04, IP_ACTIVE_HIGH, IPT_JOYSTICK_RIGHT ) PORT_4WAY PORT_PLAYER(1)
+ PORT_BIT( 0x08, IP_ACTIVE_HIGH, IPT_JOYSTICK_LEFT ) PORT_4WAY PORT_PLAYER(1)
+ PORT_BIT( 0x10, IP_ACTIVE_HIGH, IPT_BUTTON1) PORT_PLAYER(2)
+ PORT_BIT( 0x20, IP_ACTIVE_HIGH, IPT_JOYSTICK_DOWN ) PORT_4WAY PORT_PLAYER(2)
+ PORT_BIT( 0x40, IP_ACTIVE_HIGH, IPT_JOYSTICK_RIGHT ) PORT_4WAY PORT_PLAYER(2)
+ PORT_BIT( 0x80, IP_ACTIVE_HIGH, IPT_JOYSTICK_LEFT ) PORT_4WAY PORT_PLAYER(2)
+INPUT_PORTS_END
+
+
+// Same as the regular one except they added a Flip Controls switch
+static INPUT_PORTS_START( atetrisc )
+ PORT_INCLUDE( atetris )
+
+ PORT_MODIFY("IN0")
+ PORT_DIPNAME( 0x20, 0x00, "Flip Controls" ) PORT_DIPLOCATION("50H:!1")
+ PORT_DIPSETTING( 0x00, DEF_STR( Off ) )
+ PORT_DIPSETTING( 0x20, DEF_STR( On ) )
+INPUT_PORTS_END
+
+
+
+/*************************************
+ *
+ * Graphics layouts
+ *
+ *************************************/
+
+static const gfx_layout charlayout =
+{
+ 8,8,
+ RGN_FRAC(1,1),
+ 4,
+ { 0,1,2,3 },
+ { 0*4, 1*4, 2*4, 3*4, 4*4, 5*4, 6*4, 7*4},
+ { 0*4*8, 1*4*8, 2*4*8, 3*4*8, 4*4*8, 5*4*8, 6*4*8, 7*4*8},
+ 8*8*4
+};
+
+
+static GFXDECODE_START( atetris )
+ GFXDECODE_ENTRY( "gfx1", 0, charlayout, 0, 16 )
+GFXDECODE_END
+
+
+
+/*************************************
+ *
+ * Sound definitions
+ *
+ *************************************/
+
+static const pokey_interface pokey_interface_1 =
+{
+ { DEVCB_NULL },
+ DEVCB_INPUT_PORT("IN0")
+};
+
+
+static const pokey_interface pokey_interface_2 =
+{
+ { DEVCB_NULL },
+ DEVCB_INPUT_PORT("IN1")
+};
+
+
+
+/*************************************
+ *
+ * Machine driver
+ *
+ *************************************/
+
+static MACHINE_CONFIG_START( atetris, atetris_state )
+
+ /* basic machine hardware */
+ MCFG_CPU_ADD("maincpu", M6502,MASTER_CLOCK/8)
+ MCFG_CPU_PROGRAM_MAP(main_map)
+
+ MCFG_MACHINE_START(atetris)
+ MCFG_MACHINE_RESET(atetris)
+ MCFG_NVRAM_ADD_1FILL("nvram")
+
+ /* video hardware */
+ MCFG_GFXDECODE(atetris)
+ MCFG_PALETTE_LENGTH(256)
+
+ MCFG_SCREEN_ADD("screen", RASTER)
+ /* note: these parameters are from published specs, not derived */
+ /* the board uses an SOS-2 chip to generate video signals */
+ MCFG_SCREEN_RAW_PARAMS(MASTER_CLOCK/2, 456, 0, 336, 262, 0, 240)
+ MCFG_SCREEN_UPDATE_STATIC(atetris)
+
+ MCFG_VIDEO_START(atetris)
+
+ /* sound hardware */
+ MCFG_SPEAKER_STANDARD_MONO("mono")
+
+ MCFG_SOUND_ADD("pokey1", POKEYN, MASTER_CLOCK/8)
+ MCFG_SOUND_CONFIG(pokey_interface_1)
+ MCFG_SOUND_ROUTE(ALL_OUTPUTS, "mono", 0.50)
+
+ MCFG_SOUND_ADD("pokey2", POKEYN, MASTER_CLOCK/8)
+ MCFG_SOUND_CONFIG(pokey_interface_2)
+ MCFG_SOUND_ROUTE(ALL_OUTPUTS, "mono", 0.50)
+MACHINE_CONFIG_END
+
+
+static MACHINE_CONFIG_START( atetrisb2, atetris_state )
+
+ /* basic machine hardware */
+ MCFG_CPU_ADD("maincpu", M6502,BOOTLEG_CLOCK/8)
+ MCFG_CPU_PROGRAM_MAP(atetrisb2_map)
+
+ MCFG_MACHINE_START(atetris)
+ MCFG_MACHINE_RESET(atetris)
+ MCFG_NVRAM_ADD_1FILL("nvram")
+
+ /* video hardware */
+ MCFG_GFXDECODE(atetris)
+ MCFG_PALETTE_LENGTH(256)
+
+ MCFG_SCREEN_ADD("screen", RASTER)
+ /* note: these parameters are from published specs, not derived */
+ /* the board uses an SOS-2 chip to generate video signals */
+ MCFG_SCREEN_RAW_PARAMS(MASTER_CLOCK/2, 456, 0, 336, 262, 0, 240)
+ MCFG_SCREEN_UPDATE_STATIC(atetris)
+
+ MCFG_VIDEO_START(atetris)
+
+ /* sound hardware */
+ MCFG_SPEAKER_STANDARD_MONO("mono")
+
+ MCFG_SOUND_ADD("sn1", SN76496, BOOTLEG_CLOCK/8)
+ MCFG_SOUND_ROUTE(ALL_OUTPUTS, "mono", 0.50)
+
+ MCFG_SOUND_ADD("sn2", SN76496, BOOTLEG_CLOCK/8)
+ MCFG_SOUND_ROUTE(ALL_OUTPUTS, "mono", 0.50)
+
+ MCFG_SOUND_ADD("sn3", SN76496, BOOTLEG_CLOCK/8)
+ MCFG_SOUND_ROUTE(ALL_OUTPUTS, "mono", 0.50)
+MACHINE_CONFIG_END
+
+
+
+/*************************************
+ *
+ * ROM definitions
+ *
+ *************************************/
+
+ROM_START( atetris )
+ ROM_REGION( 0x18000, "maincpu", 0 )
+ ROM_LOAD( "136066-1100.45f", 0x10000, 0x8000, CRC(2acbdb09) SHA1(5e1189227f26563fd3e5372121ea5c915620f892) )
+ ROM_CONTINUE( 0x08000, 0x8000 )
+
+ ROM_REGION( 0x10000, "gfx1", 0 )
+ ROM_LOAD( "136066-1101.35a", 0x0000, 0x10000, CRC(84a1939f) SHA1(d8577985fc8ed4e74f74c68b7c00c4855b7c3270) )
+ROM_END
+
+
+ROM_START( atetrisa )
+ ROM_REGION( 0x18000, "maincpu", 0 )
+ ROM_LOAD( "d1", 0x10000, 0x8000, CRC(2bcab107) SHA1(3cfb8df8cd3782f3ff7f6b32ff15c461352061ee) )
+ ROM_CONTINUE( 0x08000, 0x8000 )
+
+ ROM_REGION( 0x10000, "gfx1", 0 )
+ ROM_LOAD( "136066-1101.35a", 0x0000, 0x10000, CRC(84a1939f) SHA1(d8577985fc8ed4e74f74c68b7c00c4855b7c3270) )
+ROM_END
+
+
+ROM_START( atetrisb )
+ ROM_REGION( 0x18000, "maincpu", 0 )
+ ROM_LOAD( "tetris.01", 0x10000, 0x8000, CRC(944d15f6) SHA1(926fa5cb26b6e6a50bea455eec1f6d3fb92aa95c) )
+ ROM_CONTINUE( 0x08000, 0x8000 )
+
+ ROM_REGION( 0x10000, "gfx1", 0 )
+ ROM_LOAD( "tetris.02", 0x0000, 0x10000, CRC(5c4e7258) SHA1(58060681a728e74d69b2b6f5d02faa597ca6c226) )
+
+ /* there's an extra EEPROM, maybe used for protection crack, which */
+ /* however doesn't seem to be required to run the game in this driver. */
+ ROM_REGION( 0x0800, "user1", 0 )
+ ROM_LOAD( "tetris.03", 0x0000, 0x0800, CRC(26618c0b) SHA1(4d6470bf3a79be3b0766e246abe00582d4c85a97) )
+ROM_END
+
+
+ROM_START( atetrisb2 )
+ ROM_REGION( 0x18000, "maincpu", 0 )
+ ROM_LOAD( "k1-01", 0x10000, 0x8000, CRC(fa056809) SHA1(e4ccccdf9b04b68127c7b03ae263519cf00f94cb) )
+ ROM_CONTINUE( 0x08000, 0x8000 )
+
+ ROM_REGION( 0x10000, "gfx1", 0 )
+ ROM_LOAD( "136066-1101.35a", 0x0000, 0x10000, CRC(84a1939f) SHA1(d8577985fc8ed4e74f74c68b7c00c4855b7c3270) )
+ROM_END
+
+
+ROM_START( atetrisc )
+ ROM_REGION( 0x18000, "maincpu", 0 )
+ ROM_LOAD( "tetcktl1.rom", 0x10000, 0x8000, CRC(9afd1f4a) SHA1(323d1576d92c905e8e95108b39cabf6fa0c10db6) )
+ ROM_CONTINUE( 0x08000, 0x8000 )
+
+ ROM_REGION( 0x10000, "gfx1", 0 )
+ ROM_LOAD( "136066-1103.35a", 0x0000, 0x10000, CRC(ec2a7f93) SHA1(cb850141ffd1504f940fa156a39e71a4146d7fea) )
+ROM_END
+
+
+ROM_START( atetrisc2 )
+ ROM_REGION( 0x18000, "maincpu", 0 )
+ ROM_LOAD( "136066-1102.45f", 0x10000, 0x8000, CRC(1bd28902) SHA1(ae8c34f082bce1f827bf60830f207c46cb282421) )
+ ROM_CONTINUE( 0x08000, 0x8000 )
+
+ ROM_REGION( 0x10000, "gfx1", 0 )
+ ROM_LOAD( "136066-1103.35a", 0x0000, 0x10000, CRC(ec2a7f93) SHA1(cb850141ffd1504f940fa156a39e71a4146d7fea) )
+ROM_END
+
+
+
+/*************************************
+ *
+ * Driver init
+ *
+ *************************************/
+
+static DRIVER_INIT( atetris )
+{
+ atetris_state *state = machine.driver_data<atetris_state>();
+ UINT8 *rgn = state->memregion("maincpu")->base();
+
+ slapstic_init(machine, 101);
+ state->m_slapstic_source = &rgn[0x10000];
+ state->m_slapstic_base = &rgn[0x04000];
+}
+
+
+
+/*************************************
+ *
+ * Game drivers
+ *
+ *************************************/
+
+GAME( 1988, atetris, 0, atetris, atetris, atetris, ROT0, "Atari Games", "Tetris (set 1)", GAME_SUPPORTS_SAVE )
+GAME( 1988, atetrisa, atetris, atetris, atetris, atetris, ROT0, "Atari Games", "Tetris (set 2)", GAME_SUPPORTS_SAVE )
+GAME( 1988, atetrisb, atetris, atetris, atetris, atetris, ROT0, "bootleg", "Tetris (bootleg set 1)", GAME_SUPPORTS_SAVE )
+GAME( 1988, atetrisb2,atetris, atetrisb2,atetris, atetris, ROT0, "bootleg", "Tetris (bootleg set 2)", GAME_SUPPORTS_SAVE )
+GAME( 1989, atetrisc, atetris, atetris, atetrisc, atetris, ROT270, "Atari Games", "Tetris (cocktail set 1)", GAME_SUPPORTS_SAVE )
+GAME( 1989, atetrisc2,atetris, atetris, atetrisc, atetris, ROT270, "Atari Games", "Tetris (cocktail set 2)", GAME_SUPPORTS_SAVE )