summaryrefslogtreecommitdiffstatshomepage
path: root/src/mame/drivers/ultratnk.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/mame/drivers/ultratnk.c')
-rw-r--r--src/mame/drivers/ultratnk.c351
1 files changed, 351 insertions, 0 deletions
diff --git a/src/mame/drivers/ultratnk.c b/src/mame/drivers/ultratnk.c
new file mode 100644
index 00000000000..34f3bf29b53
--- /dev/null
+++ b/src/mame/drivers/ultratnk.c
@@ -0,0 +1,351 @@
+/***************************************************************************
+
+Atari Ultra Tank driver
+
+***************************************************************************/
+
+#include "driver.h"
+#include "ultratnk.h"
+#include "audio/sprint4.h"
+
+#define MASTER_CLOCK 12096000
+
+#define HTOTAL 384
+#define VTOTAL 262
+
+#define PIXEL_CLOCK (MASTER_CLOCK / 2)
+
+
+static int da_latch;
+
+
+
+static UINT32 get_collision(void *param)
+{
+ return ultratnk_collision[(FPTR) param];
+}
+
+
+static UINT32 get_joystick(void* param)
+{
+ UINT8 joy = readinputportbytag(param) & 3;
+
+ if (joy == 1)
+ {
+ return (da_latch < 8) ? 1 : 0;
+ }
+ if (joy == 2)
+ {
+ return 0;
+ }
+
+ return 1;
+}
+
+
+static TIMER_CALLBACK( nmi_callback )
+{
+ int scanline = param + 64;
+
+ if (scanline >= VTOTAL)
+ {
+ scanline = 32;
+ }
+
+ /* NMI and watchdog are disabled during service mode */
+
+ watchdog_enable(readinputport(0) & 0x40);
+
+ if (readinputport(0) & 0x40)
+ {
+ cpunum_set_input_line(0, INPUT_LINE_NMI, PULSE_LINE);
+ }
+
+ timer_set(video_screen_get_time_until_pos(0, scanline, 0), scanline, nmi_callback);
+}
+
+
+static MACHINE_RESET( ultratnk )
+{
+ timer_set(video_screen_get_time_until_pos(0, 32, 0), 32, nmi_callback);
+}
+
+
+static READ8_HANDLER( ultratnk_wram_r )
+{
+ return videoram[0x380 + offset];
+}
+
+
+static READ8_HANDLER( ultratnk_analog_r )
+{
+ return (readinputportbytag("ANALOG") << (~offset & 7)) & 0x80;
+}
+static READ8_HANDLER( ultratnk_coin_r )
+{
+ return (readinputportbytag("COIN") << (~offset & 7)) & 0x80;
+}
+static READ8_HANDLER( ultratnk_collision_r )
+{
+ return (readinputportbytag("COLLISION") << (~offset & 7)) & 0x80;
+}
+
+
+static READ8_HANDLER( ultratnk_options_r )
+{
+ return (readinputportbytag("DIP") >> (2 * (offset & 3))) & 3;
+}
+
+
+static WRITE8_HANDLER( ultratnk_wram_w )
+{
+ videoram[0x380 + offset] = data;
+}
+
+
+static WRITE8_HANDLER( ultratnk_collision_reset_w )
+{
+ ultratnk_collision[(offset >> 1) & 3] = 0;
+}
+
+
+static WRITE8_HANDLER( ultratnk_da_latch_w )
+{
+ da_latch = data & 15;
+}
+
+
+static WRITE8_HANDLER( ultratnk_led_1_w )
+{
+ set_led_status(0, offset & 1); /* left player start */
+}
+static WRITE8_HANDLER( ultratnk_led_2_w )
+{
+ set_led_status(1, offset & 1); /* right player start */
+}
+
+
+static WRITE8_HANDLER( ultratnk_lockout_w )
+{
+ coin_lockout_global_w(~offset & 1);
+}
+
+
+static WRITE8_HANDLER( ultratnk_fire_1_w )
+{
+ discrete_sound_w(ULTRATNK_FIRE_EN_1, offset & 1);
+}
+static WRITE8_HANDLER( ultratnk_fire_2_w )
+{
+ discrete_sound_w(ULTRATNK_FIRE_EN_2, offset & 1);
+}
+static WRITE8_HANDLER( ultratnk_attract_w )
+{
+ discrete_sound_w(ULTRATNK_ATTRACT_EN, data & 1);
+}
+static WRITE8_HANDLER( ultratnk_explosion_w )
+{
+ discrete_sound_w(ULTRATNK_EXPLOSION_DATA, data & 15);
+}
+
+
+static ADDRESS_MAP_START( ultratnk_cpu_map, ADDRESS_SPACE_PROGRAM, 8 )
+
+ ADDRESS_MAP_FLAGS( AMEF_ABITS(14) )
+
+ AM_RANGE(0x0000, 0x007f) AM_MIRROR(0x700) AM_RAM
+ AM_RANGE(0x0080, 0x00ff) AM_MIRROR(0x700) AM_READWRITE(ultratnk_wram_r, ultratnk_wram_w)
+ AM_RANGE(0x0800, 0x0bff) AM_MIRROR(0x400) AM_READWRITE(MRA8_RAM, ultratnk_video_ram_w) AM_BASE(&videoram)
+
+ AM_RANGE(0x1000, 0x17ff) AM_READ(input_port_0_r)
+ AM_RANGE(0x1800, 0x1fff) AM_READ(input_port_1_r)
+
+ AM_RANGE(0x2000, 0x2007) AM_MIRROR(0x718) AM_READ(ultratnk_analog_r)
+ AM_RANGE(0x2020, 0x2027) AM_MIRROR(0x718) AM_READ(ultratnk_coin_r)
+ AM_RANGE(0x2040, 0x2047) AM_MIRROR(0x718) AM_READ(ultratnk_collision_r)
+ AM_RANGE(0x2060, 0x2063) AM_MIRROR(0x71c) AM_READ(ultratnk_options_r)
+
+ AM_RANGE(0x2000, 0x2000) AM_MIRROR(0x71f) AM_WRITE(ultratnk_attract_w)
+ AM_RANGE(0x2020, 0x2027) AM_MIRROR(0x718) AM_WRITE(ultratnk_collision_reset_w)
+ AM_RANGE(0x2040, 0x2041) AM_MIRROR(0x718) AM_WRITE(ultratnk_da_latch_w)
+ AM_RANGE(0x2042, 0x2043) AM_MIRROR(0x718) AM_WRITE(ultratnk_explosion_w)
+ AM_RANGE(0x2044, 0x2045) AM_MIRROR(0x718) AM_WRITE(watchdog_reset_w)
+ AM_RANGE(0x2066, 0x2067) AM_MIRROR(0x710) AM_WRITE(ultratnk_lockout_w)
+ AM_RANGE(0x2068, 0x2069) AM_MIRROR(0x710) AM_WRITE(ultratnk_led_1_w)
+ AM_RANGE(0x206a, 0x206b) AM_MIRROR(0x710) AM_WRITE(ultratnk_led_2_w)
+ AM_RANGE(0x206c, 0x206d) AM_MIRROR(0x710) AM_WRITE(ultratnk_fire_2_w)
+ AM_RANGE(0x206e, 0x206f) AM_MIRROR(0x710) AM_WRITE(ultratnk_fire_1_w)
+
+ AM_RANGE(0x2800, 0x2fff) AM_NOP /* diagnostic ROM */
+ AM_RANGE(0x3000, 0x3fff) AM_ROM
+
+ADDRESS_MAP_END
+
+
+static INPUT_PORTS_START( ultratnk )
+
+ PORT_START_TAG("IN0")
+ PORT_SERVICE( 0x40, IP_ACTIVE_LOW )
+ PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_VBLANK )
+
+ PORT_START_TAG("IN1")
+ PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_SERVICE1 ) PORT_NAME("Option 1") PORT_TOGGLE
+
+ PORT_START_TAG("COLLISION")
+ PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_UNUSED )
+ PORT_BIT( 0x02, IP_ACTIVE_HIGH, IPT_SPECIAL ) PORT_CUSTOM( get_collision, 0 )
+ PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_UNUSED )
+ PORT_BIT( 0x08, IP_ACTIVE_HIGH, IPT_SPECIAL ) PORT_CUSTOM( get_collision, 1 )
+ PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_UNUSED ) /* VCC */
+ PORT_BIT( 0x20, IP_ACTIVE_HIGH, IPT_SPECIAL ) PORT_CUSTOM( get_collision, 2 )
+ PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_TILT ) /* SLAM */
+ PORT_BIT( 0x80, IP_ACTIVE_HIGH, IPT_SPECIAL ) PORT_CUSTOM( get_collision, 3 )
+
+ PORT_START_TAG("COIN")
+ PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_COIN1 )
+ PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_COIN2 )
+ PORT_BIT( 0x10, IP_ACTIVE_HIGH, IPT_SERVICE2 ) PORT_NAME("Option 2") PORT_TOGGLE
+ PORT_BIT( 0x40, IP_ACTIVE_HIGH, IPT_SERVICE3 ) PORT_NAME("Option 3") PORT_TOGGLE
+
+ PORT_START_TAG("DIP")
+ PORT_DIPNAME( 0x01, 0x00, DEF_STR( Unused ) ) PORT_DIPLOCATION("DIP:8")
+ PORT_DIPSETTING( 0x00, DEF_STR( Off ) )
+ PORT_DIPSETTING( 0x01, DEF_STR( On ) )
+ PORT_DIPNAME( 0x02, 0x00, DEF_STR( Unused ) ) PORT_DIPLOCATION("DIP:7")
+ PORT_DIPSETTING( 0x00, DEF_STR( Off ) )
+ PORT_DIPSETTING( 0x02, DEF_STR( On ) )
+ PORT_DIPNAME( 0x0c, 0x08, DEF_STR( Coinage ) ) PORT_DIPLOCATION("DIP:6,5")
+ PORT_DIPSETTING( 0x0c, DEF_STR( 2C_1C ) )
+ PORT_DIPSETTING( 0x08, DEF_STR( 1C_1C ) )
+ PORT_DIPSETTING( 0x04, DEF_STR( 1C_2C ) )
+ PORT_DIPSETTING( 0x00, DEF_STR( Free_Play ) )
+ PORT_DIPNAME( 0x30, 0x10, "Game Length" ) PORT_DIPLOCATION("DIP:4,3")
+ PORT_DIPSETTING( 0x00, "60 Seconds" )
+ PORT_DIPSETTING( 0x10, "90 Seconds" )
+ PORT_DIPSETTING( 0x20, "120 Seconds" )
+ PORT_DIPSETTING( 0x30, "150 Seconds" )
+ PORT_DIPNAME( 0xc0, 0x40, "Extended Play" ) PORT_DIPLOCATION("DIP:2,1")
+ PORT_DIPSETTING( 0x40, "25 Points" )
+ PORT_DIPSETTING( 0x80, "50 Points" )
+ PORT_DIPSETTING( 0xc0, "75 Points" )
+ PORT_DIPSETTING( 0x00, DEF_STR( None ) )
+
+ PORT_START_TAG("ANALOG")
+ PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_START1 )
+ PORT_BIT( 0x02, IP_ACTIVE_HIGH, IPT_SPECIAL ) PORT_CUSTOM( get_joystick, "JOY-W" )
+ PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_START2 )
+ PORT_BIT( 0x08, IP_ACTIVE_HIGH, IPT_SPECIAL ) PORT_CUSTOM( get_joystick, "JOY-Y" )
+ PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_BUTTON1 ) PORT_PLAYER(1)
+ PORT_BIT( 0x20, IP_ACTIVE_HIGH, IPT_SPECIAL ) PORT_CUSTOM( get_joystick, "JOY-X" )
+ PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_BUTTON1 ) PORT_PLAYER(2)
+ PORT_BIT( 0x80, IP_ACTIVE_HIGH, IPT_SPECIAL ) PORT_CUSTOM( get_joystick, "JOY-Z" )
+
+ PORT_START_TAG("JOY-W")
+ PORT_BIT( 0x01, IP_ACTIVE_HIGH, IPT_JOYSTICKLEFT_DOWN ) PORT_PLAYER(1)
+ PORT_BIT( 0x02, IP_ACTIVE_HIGH, IPT_JOYSTICKLEFT_UP ) PORT_PLAYER(1)
+
+ PORT_START_TAG("JOY-X")
+ PORT_BIT( 0x01, IP_ACTIVE_HIGH, IPT_JOYSTICKRIGHT_DOWN ) PORT_PLAYER(1)
+ PORT_BIT( 0x02, IP_ACTIVE_HIGH, IPT_JOYSTICKRIGHT_UP ) PORT_PLAYER(1)
+
+ PORT_START_TAG("JOY-Y")
+ PORT_BIT( 0x01, IP_ACTIVE_HIGH, IPT_JOYSTICKLEFT_DOWN ) PORT_PLAYER(2)
+ PORT_BIT( 0x02, IP_ACTIVE_HIGH, IPT_JOYSTICKLEFT_UP ) PORT_PLAYER(2)
+
+ PORT_START_TAG("JOY-Z")
+ PORT_BIT( 0x01, IP_ACTIVE_HIGH, IPT_JOYSTICKRIGHT_DOWN ) PORT_PLAYER(2)
+ PORT_BIT( 0x02, IP_ACTIVE_HIGH, IPT_JOYSTICKRIGHT_UP ) PORT_PLAYER(2)
+
+ PORT_START_TAG("MOTOR1")
+ PORT_ADJUSTER( 35, "Motor 1 RPM" )
+
+ PORT_START_TAG("MOTOR2")
+ PORT_ADJUSTER( 40, "Motor 2 RPM" )
+
+INPUT_PORTS_END
+
+
+static const gfx_layout motion_layout =
+{
+ 15, 16,
+ RGN_FRAC(1,4),
+ 1,
+ { 0 },
+ {
+ 7 + RGN_FRAC(0,4), 6 + RGN_FRAC(0,4), 5 + RGN_FRAC(0,4), 4 + RGN_FRAC(0,4),
+ 7 + RGN_FRAC(1,4), 6 + RGN_FRAC(1,4), 5 + RGN_FRAC(1,4), 4 + RGN_FRAC(1,4),
+ 7 + RGN_FRAC(2,4), 6 + RGN_FRAC(2,4), 5 + RGN_FRAC(2,4), 4 + RGN_FRAC(2,4),
+ 7 + RGN_FRAC(3,4), 6 + RGN_FRAC(3,4), 5 + RGN_FRAC(3,4)
+ },
+ {
+ 0x00, 0x08, 0x10, 0x18, 0x20, 0x28, 0x30, 0x38,
+ 0x40, 0x48, 0x50, 0x58, 0x60, 0x68, 0x70, 0x78
+ },
+ 0x80
+};
+
+
+static GFXDECODE_START( ultratnk )
+ GFXDECODE_ENTRY( REGION_GFX1, 0, gfx_8x8x1, 0, 5 )
+ GFXDECODE_ENTRY( REGION_GFX2, 0, motion_layout, 0, 5 )
+GFXDECODE_END
+
+
+static MACHINE_DRIVER_START( ultratnk )
+
+ /* basic machine hardware */
+ MDRV_CPU_ADD(M6502, PIXEL_CLOCK / 8)
+ MDRV_CPU_PROGRAM_MAP(ultratnk_cpu_map, 0)
+
+ MDRV_WATCHDOG_VBLANK_INIT(8)
+ MDRV_MACHINE_RESET(ultratnk)
+
+ /* video hardware */
+ MDRV_VIDEO_ATTRIBUTES(VIDEO_TYPE_RASTER)
+ MDRV_SCREEN_FORMAT(BITMAP_FORMAT_INDEXED16)
+ MDRV_SCREEN_RAW_PARAMS(PIXEL_CLOCK, HTOTAL, 0, 256, VTOTAL, 0, 224)
+ MDRV_GFXDECODE(ultratnk)
+ MDRV_PALETTE_LENGTH(4)
+ MDRV_COLORTABLE_LENGTH(10)
+
+ MDRV_PALETTE_INIT(ultratnk)
+ MDRV_VIDEO_START(ultratnk)
+ MDRV_VIDEO_UPDATE(ultratnk)
+ MDRV_VIDEO_EOF(ultratnk)
+
+ /* sound hardware */
+ MDRV_SPEAKER_STANDARD_MONO("mono")
+
+ MDRV_SOUND_ADD(DISCRETE, 0)
+ MDRV_SOUND_CONFIG_DISCRETE(ultratnk)
+ MDRV_SOUND_ROUTE(0, "mono", 1.0)
+
+MACHINE_DRIVER_END
+
+
+ROM_START( ultratnk )
+ ROM_REGION( 0x4000, REGION_CPU1, 0 )
+ ROM_LOAD_NIB_LOW ( "030180.n1", 0x3000, 0x0800, CRC(b6aa6056) SHA1(6de094017b5d87a238053fac88129d20260f8222) ) /* ROM 3 */
+ ROM_LOAD_NIB_HIGH( "030181.k1", 0x3000, 0x0800, CRC(17145c97) SHA1(afe0c9c562c27cd1fba57ea83377b0a4c12496db) ) /* ROM 3 */
+ ROM_LOAD_NIB_LOW ( "030182.m1", 0x3800, 0x0800, CRC(034366a2) SHA1(dc289ce4c79e9937977ca8804ce07b4c8e40e969) ) /* ROM 4 */
+ ROM_LOAD_NIB_HIGH( "030183.l1", 0x3800, 0x0800, CRC(be141602) SHA1(17aad9bab9bf6bd22dc3c2214b049bbd68c87380) ) /* ROM 4 */
+
+ ROM_REGION( 0x0200, REGION_GFX1, ROMREGION_DISPOSE ) /* playfield */
+ ROM_LOAD_NIB_HIGH( "30172-01.j6", 0x0000, 0x0200, CRC(1d364b23) SHA1(44c5792ed3f33f40cd8632718b0e82152559ecdf) )
+ ROM_LOAD_NIB_LOW ( "30173-01.h6", 0x0000, 0x0200, CRC(5c32f331) SHA1(c1d675891490fbc533eaa0da57545398d7325df8) )
+
+ ROM_REGION( 0x1000, REGION_GFX2, ROMREGION_DISPOSE ) /* motion */
+ ROM_LOAD( "30174-01.n6", 0x0000, 0x0400, CRC(d0e20e73) SHA1(0df1ed4a73255032bb809fb4d0a4bf3f151c749d) )
+ ROM_LOAD( "30175-01.m6", 0x0400, 0x0400, CRC(a47459c9) SHA1(4ca92edc172fbac923ba71731a25546c04ffc7b0) )
+ ROM_LOAD( "30176-01.l6", 0x0800, 0x0400, CRC(1cc7c2dd) SHA1(7f8aebe8375751183afeae35ea2d241d22ee7a4f) )
+ ROM_LOAD( "30177-01.k6", 0x0c00, 0x0400, CRC(3a91b09f) SHA1(1e713cb612eb7d78fc4a003e4e60308f62e0b169) )
+
+ ROM_REGION( 0x0020, REGION_PROMS, 0 )
+ ROM_LOAD( "30218-01.j10", 0x0000, 0x0020, CRC(d7a2c7b4) SHA1(7453921ecb6268b604dee3743f6e217db19c9871) )
+
+ ROM_REGION( 0x0200, REGION_USER1, 0 )
+ ROM_LOAD( "30024-01.p8", 0x0000, 0x0200, CRC(e71d2e22) SHA1(434c3a8237468604cce7feb40e6061d2670013b3) ) /* SYNC */
+ROM_END
+
+
+GAME( 1978, ultratnk, 0, ultratnk, ultratnk, 0, 0, "Atari", "Ultra Tank", 0 )