diff options
Diffstat (limited to 'src/mame/drivers/ultratnk.c')
-rw-r--r-- | src/mame/drivers/ultratnk.c | 351 |
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 ) |