/*************************************************************************** Tank Battalion memory map (preliminary) driver by Brad Oliver $0000-$000f : bullet ram, first entry is player's bullet $0010-$01ff : zero page & stack $0200-$07ff : RAM $0800-$0bff : videoram $0c00-$0c1f : I/O Read: $0c00-$0c03 : p1 joystick $0c04 $0c07 : stop at grid self-test if bit 7 is low $0c0f : stop at first self-test if bit 7 is low $0c18 : Cabinet, 0 = table, 1 = upright $0c19-$0c1a : Coinage, 00 = free play, 01 = 2 coin 1 credit, 10 = 1 coin 2 credits, 11 = 1 coin 1 credit $0c1b-$0c1c : Bonus, 00 = 10000, 01 = 15000, 10 = 20000, 11 = none $0c1d : Tanks, 0 = 3, 1 = 2 $0c1e-$0c1f : ?? Write: $0c00-$0c01 : p1/p2 start leds $0c02 : ?? written to at end of IRQ, either 0 or 1 - coin counter? $0c03 : ?? written to during IRQ if grid test is on $0c08 : ?? written to during IRQ if grid test is on $0c09 : Sound - coin ding $0c0a : NMI enable (active low) ?? game only ?? $0c0b : Sound - background noise, 0 - low rumble, 1 - high rumble $0c0c : Sound - player fire $0c0d : Sound - explosion $0c0f : NMI enable (active high) ?? demo only ?? $0c10 : IRQ ack ?? $0c18 : Watchdog ?? Not written to while game screen is up $2000-$3fff : ROM TODO: . Resistor values on the color prom need to be verified Changes: 28 Feb 98 LBO . Fixed the coin interrupts . Fixed the color issues, should be 100% if I guessed at the resistor values properly . Fixed the 2nd player cocktail joystick, had the polarity reversed . Hacked the sound sample triggers so they work better Known issues: . The 'moving' tank rumble noise seems to keep playing a second too long . Sample support is all a crapshoot. I have no idea how it really works ***************************************************************************/ #include "driver.h" #include "cpu/m6502/m6502.h" #include "sound/samples.h" extern UINT8 *tankbatt_bulletsram; extern size_t tankbatt_bulletsram_size; static int tankbatt_nmi_enable; /* No need to init this - the game will set it on reset */ static int tankbatt_sound_enable; extern WRITE8_HANDLER( tankbatt_videoram_w ); extern PALETTE_INIT( tankbatt ); extern VIDEO_START( tankbatt ); extern VIDEO_UPDATE( tankbatt ); WRITE8_HANDLER( tankbatt_led_w ) { set_led_status(offset,data & 1); } READ8_HANDLER( tankbatt_in0_r ) { int val; val = readinputport(0); return ((val << (7-offset)) & 0x80); } READ8_HANDLER( tankbatt_in1_r ) { int val; val = readinputport(1); return ((val << (7-offset)) & 0x80); } READ8_HANDLER( tankbatt_dsw_r ) { int val; val = readinputport(2); return ((val << (7-offset)) & 0x80); } WRITE8_HANDLER( tankbatt_interrupt_enable_w ) { tankbatt_nmi_enable = !data; tankbatt_sound_enable = !data; if (data != 0) { cpunum_set_input_line(0, 0, CLEAR_LINE); cpunum_set_input_line(0, INPUT_LINE_NMI, CLEAR_LINE); } /* hack - turn off the engine noise if the normal game nmi's are disabled */ if (data) sample_stop (2); // interrupt_enable_w (offset, !data); } WRITE8_HANDLER( tankbatt_demo_interrupt_enable_w ) { tankbatt_nmi_enable = data; if (data != 0) { cpunum_set_input_line(0, 0, CLEAR_LINE); cpunum_set_input_line(0, INPUT_LINE_NMI, CLEAR_LINE); } // interrupt_enable_w (offset, data); } WRITE8_HANDLER( tankbatt_sh_expl_w ) { if (tankbatt_sound_enable) sample_start (1, 3, 0); } WRITE8_HANDLER( tankbatt_sh_engine_w ) { if (tankbatt_sound_enable) { if (data) sample_start (2, 2, 1); else sample_start (2, 1, 1); } else sample_stop (2); } WRITE8_HANDLER( tankbatt_sh_fire_w ) { if (tankbatt_sound_enable) sample_start (0, 0, 0); } static ADDRESS_MAP_START( readmem, ADDRESS_SPACE_PROGRAM, 8 ) AM_RANGE(0x0000, 0x01ff) AM_READ(MRA8_RAM) AM_RANGE(0x0c00, 0x0c07) AM_READ(tankbatt_in0_r) AM_RANGE(0x0c08, 0x0c0f) AM_READ(tankbatt_in1_r) AM_RANGE(0x0c18, 0x0c1f) AM_READ(tankbatt_dsw_r) AM_RANGE(0x0200, 0x0bff) AM_READ(MRA8_RAM) AM_RANGE(0x6000, 0x7fff) AM_READ(MRA8_ROM) AM_RANGE(0xf800, 0xffff) AM_READ(MRA8_ROM) /* for the reset / interrupt vectors */ ADDRESS_MAP_END static ADDRESS_MAP_START( writemem, ADDRESS_SPACE_PROGRAM, 8 ) AM_RANGE(0x0010, 0x01ff) AM_WRITE(MWA8_RAM) AM_RANGE(0x0800, 0x0bff) AM_WRITE(tankbatt_videoram_w) AM_BASE(&videoram) AM_RANGE(0x0000, 0x000f) AM_WRITE(MWA8_RAM) AM_BASE(&tankbatt_bulletsram) AM_SIZE(&tankbatt_bulletsram_size) AM_RANGE(0x0c18, 0x0c18) AM_WRITE(MWA8_NOP) /* watchdog ?? */ AM_RANGE(0x0c00, 0x0c01) AM_WRITE(tankbatt_led_w) AM_RANGE(0x0c0a, 0x0c0a) AM_WRITE(tankbatt_interrupt_enable_w) AM_RANGE(0x0c0b, 0x0c0b) AM_WRITE(tankbatt_sh_engine_w) AM_RANGE(0x0c0c, 0x0c0c) AM_WRITE(tankbatt_sh_fire_w) AM_RANGE(0x0c0d, 0x0c0d) AM_WRITE(tankbatt_sh_expl_w) AM_RANGE(0x0c0f, 0x0c0f) AM_WRITE(tankbatt_demo_interrupt_enable_w) AM_RANGE(0x0200, 0x07ff) AM_WRITE(MWA8_RAM) AM_RANGE(0x2000, 0x3fff) AM_WRITE(MWA8_ROM) ADDRESS_MAP_END INTERRUPT_GEN( tankbatt_interrupt ) { if ((readinputport (0) & 0x60) == 0) cpunum_set_input_line(0,0,HOLD_LINE); else if (tankbatt_nmi_enable) cpunum_set_input_line(0,INPUT_LINE_NMI,PULSE_LINE); } INPUT_PORTS_START( tankbatt ) PORT_START /* IN0 */ PORT_BIT ( 0x01, IP_ACTIVE_LOW, IPT_JOYSTICK_UP ) PORT_4WAY PORT_BIT ( 0x02, IP_ACTIVE_LOW, IPT_JOYSTICK_LEFT ) PORT_4WAY PORT_BIT ( 0x04, IP_ACTIVE_LOW, IPT_JOYSTICK_DOWN ) PORT_4WAY PORT_BIT ( 0x08, IP_ACTIVE_LOW, IPT_JOYSTICK_RIGHT ) PORT_4WAY PORT_BIT ( 0x10, IP_ACTIVE_LOW, IPT_BUTTON1 ) PORT_BIT( 0x60, IP_ACTIVE_LOW, IPT_COIN1 ) PORT_IMPULSE(2) PORT_BIT ( 0x80, IP_ACTIVE_LOW, IPT_TILT ) PORT_START /* IN1 */ PORT_BIT ( 0x01, IP_ACTIVE_LOW, IPT_JOYSTICK_UP ) PORT_4WAY PORT_COCKTAIL PORT_BIT ( 0x02, IP_ACTIVE_LOW, IPT_JOYSTICK_LEFT ) PORT_4WAY PORT_COCKTAIL PORT_BIT ( 0x04, IP_ACTIVE_LOW, IPT_JOYSTICK_DOWN ) PORT_4WAY PORT_COCKTAIL PORT_BIT ( 0x08, IP_ACTIVE_LOW, IPT_JOYSTICK_RIGHT ) PORT_4WAY PORT_COCKTAIL PORT_BIT ( 0x10, IP_ACTIVE_LOW, IPT_BUTTON1 ) PORT_COCKTAIL PORT_BIT ( 0x20, IP_ACTIVE_LOW, IPT_START1 ) PORT_BIT ( 0x40, IP_ACTIVE_LOW, IPT_START2 ) PORT_SERVICE( 0x80, IP_ACTIVE_LOW ) PORT_START /* DSW */ PORT_DIPNAME( 0x01, 0x01, DEF_STR( Cabinet ) ) PORT_DIPSETTING( 0x01, DEF_STR( Upright ) ) PORT_DIPSETTING( 0x00, DEF_STR( Cocktail ) ) PORT_DIPNAME( 0x06, 0x06, DEF_STR( Coinage ) ) PORT_DIPSETTING( 0x04, DEF_STR( 2C_1C ) ) PORT_DIPSETTING( 0x06, DEF_STR( 1C_1C ) ) PORT_DIPSETTING( 0x02, DEF_STR( 1C_2C ) ) PORT_DIPSETTING( 0x00, DEF_STR( Free_Play ) ) PORT_DIPNAME( 0x18, 0x08, DEF_STR( Bonus_Life ) ) PORT_DIPSETTING( 0x00, "10000" ) PORT_DIPSETTING( 0x10, "15000" ) PORT_DIPSETTING( 0x08, "20000" ) PORT_DIPSETTING( 0x18, DEF_STR( None ) ) PORT_DIPNAME( 0x20, 0x00, DEF_STR( Lives ) ) PORT_DIPSETTING( 0x20, "2" ) PORT_DIPSETTING( 0x00, "3" ) PORT_DIPNAME( 0x40, 0x40, DEF_STR( Unknown ) ) PORT_DIPSETTING( 0x40, DEF_STR( Off ) ) PORT_DIPSETTING( 0x00, DEF_STR( On ) ) PORT_DIPNAME( 0x80, 0x80, DEF_STR( Unknown ) ) PORT_DIPSETTING( 0x80, DEF_STR( Off ) ) PORT_DIPSETTING( 0x00, DEF_STR( On ) ) INPUT_PORTS_END static const gfx_layout charlayout = { 8,8, /* 8*8 characters */ 256, /* 256 characters */ 1, /* 1 bit per pixel */ { 0 }, /* only one bitplane */ { 0, 1, 2, 3, 4, 5, 6, 7 }, { 0*8, 1*8, 2*8, 3*8, 4*8, 5*8, 6*8, 7*8 }, 8*8 /* every char takes 8 consecutive bytes */ }; static const gfx_layout bulletlayout = { /* there is no gfx ROM for this one, it is generated by the hardware */ 3,3, /* 3*3 box */ 1, /* just one */ 1, /* 1 bit per pixel */ { 8*8 }, { 2, 2, 2 }, /* I "know" that this bit of the */ { 2, 2, 2 }, /* graphics ROMs is 1 */ 0 /* no use */ }; static GFXDECODE_START( tankbatt ) GFXDECODE_ENTRY( REGION_GFX1, 0, charlayout, 0, 64 ) GFXDECODE_ENTRY( REGION_GFX1, 0, bulletlayout, 0, 64 ) GFXDECODE_END static const char *tankbatt_sample_names[] = { "*tankbatt", "fire.wav", "engine1.wav", "engine2.wav", "explode1.wav", 0 /* end of array */ }; static struct Samplesinterface samples_interface = { 3, /* 3 channels */ tankbatt_sample_names }; static MACHINE_DRIVER_START( tankbatt ) /* basic machine hardware */ MDRV_CPU_ADD(M6502, 1000000) /* 1 MHz ???? */ MDRV_CPU_PROGRAM_MAP(readmem,writemem) MDRV_CPU_VBLANK_INT(tankbatt_interrupt,1) MDRV_SCREEN_REFRESH_RATE(60) MDRV_SCREEN_VBLANK_TIME(DEFAULT_60HZ_VBLANK_DURATION) /* video hardware */ MDRV_VIDEO_ATTRIBUTES(VIDEO_TYPE_RASTER) MDRV_SCREEN_FORMAT(BITMAP_FORMAT_INDEXED16) MDRV_SCREEN_SIZE(32*8, 32*8) MDRV_SCREEN_VISIBLE_AREA(0*8, 32*8-1, 2*8, 30*8-1) MDRV_GFXDECODE(tankbatt) MDRV_PALETTE_LENGTH(65) MDRV_COLORTABLE_LENGTH(128) MDRV_PALETTE_INIT(tankbatt) MDRV_VIDEO_START(tankbatt) MDRV_VIDEO_UPDATE(tankbatt) /* sound hardware */ MDRV_SPEAKER_STANDARD_MONO("mono") MDRV_SOUND_ADD(SAMPLES, 0) MDRV_SOUND_CONFIG(samples_interface) MDRV_SOUND_ROUTE(ALL_OUTPUTS, "mono", 0.25) MACHINE_DRIVER_END /*************************************************************************** Game driver(s) ***************************************************************************/ ROM_START( tankbatt ) ROM_REGION( 0x10000, REGION_CPU1, 0 ) ROM_LOAD( "tb1-1.1a", 0x6000, 0x0800, CRC(278a0b8c) SHA1(11ea8fe8401b3cd986616a30a759c0ac1a5ce73b) ) ROM_LOAD( "tb1-2.1b", 0x6800, 0x0800, CRC(e0923370) SHA1(8d3dbea877bed9f9c267d8002dc180f6eb1e5a8f) ) ROM_LOAD( "tb1-3.1c", 0x7000, 0x0800, CRC(85005ea4) SHA1(91583081803a5ef600fb90bee34be9edd87f157e) ) ROM_LOAD( "tb1-4.1d", 0x7800, 0x0800, CRC(3dfb5bcf) SHA1(aa24bf74f4d5dc81baf3843196c837e0b731077b) ) ROM_RELOAD( 0xf800, 0x0800 ) /* for the reset and interrupt vectors */ ROM_REGION( 0x0800, REGION_GFX1, ROMREGION_DISPOSE ) ROM_LOAD( "tb1-5.2k", 0x0000, 0x0800, CRC(aabd4fb1) SHA1(5cff659b531d0f1b6faa503f7c06045c3a209a84) ) ROM_REGION( 0x0100, REGION_PROMS, 0 ) ROM_LOAD( "bct1-1.l3", 0x0000, 0x0100, CRC(d17518bc) SHA1(f3b0deffa586808bc59e9a24ec1699c54ebe84cc) ) /* prom is a Fujitsu MB7052 or equivalent */ ROM_END GAME( 1980, tankbatt, 0, tankbatt, tankbatt, 0, ROT90, "Namco", "Tank Battalion", 0 )