// license:BSD-3-Clause // copyright-holders:Tomasz Slanina, Angelo Salese /**************************************************************************** Time Attacker driver by Tomasz Slanina analog[at]op.pl improvements by Angelo Salese Z80A, xtal 8MHz, dipsw 8-position x2, volume pots x6, 2114 ram x5, 7910CQ + NE555P sound section, SN74198N shifter no proms TODO: - non-tilemap video offsets/sizes are guessworked; - random brick flickering effect is guessworked too, leave MACHINE_IMPERFECT_COLORS in until is tested on HW. - outputs (coin counter port same as sound writes?); - some dipswitches; - sound (requires Epson 7910 Multi-Melody emulation?) \- victory BGM cuts off too late? Connector pinout from manual Solder Side Parts Side ----------- ---------- GND 1 GND GND 2 GND GND 3 GND Speaker 4 Speaker +12V 5 +12V Antenna 6 Antenna 7 8 +5V 9 +5V VR a 10 VR b 2P VR Center 11 1P VR Center Coin 12 2P Serve Coin Alarm 13 1P Start Counter (Out) 14 2P Start TV Sync 15 1P Serve Counter (futei) 16 TV G Counter (In) 17 TV B Medal Out 18 TV R ****************************************************************************/ #include "emu.h" #include "cpu/z80/z80.h" #include "screen.h" #include "sound/samples.h" #include "speaker.h" class tattack_state : public driver_device { public: tattack_state(const machine_config &mconfig, device_type type, const char *tag) : driver_device(mconfig, type, tag), m_maincpu(*this, "maincpu"), m_ram(*this, "ram"), m_videoram(*this, "videoram"), m_colorram(*this, "colorram"), m_gfxdecode(*this, "gfxdecode"), m_samples(*this,"samples") { } DECLARE_WRITE8_MEMBER(paddle_w); DECLARE_WRITE8_MEMBER(ball_w); DECLARE_WRITE8_MEMBER(brick_dma_w); DECLARE_WRITE8_MEMBER(sound_w); void init_tattack(); TILE_GET_INFO_MEMBER(get_tile_info); DECLARE_PALETTE_INIT(tattack); uint32_t screen_update_tattack(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect); void tattack(machine_config &config); void tattack_map(address_map &map); protected: virtual void video_start() override; private: required_device m_maincpu; required_shared_ptr m_ram; required_shared_ptr m_videoram; required_shared_ptr m_colorram; required_device m_gfxdecode; required_device m_samples; tilemap_t *m_tmap; uint8_t m_ball_regs[2]; uint8_t m_paddle_reg; int m_paddle_ysize; bool m_bottom_edge_enable; bool m_bricks_color_bank; void draw_gameplay_bitmap(bitmap_ind16 &bitmap, const rectangle &cliprect); void draw_edge_bitmap(bitmap_ind16 &bitmap, const rectangle &cliprect); static const uint8_t white_pen = 0xf; static const uint8_t green_pen = 0x5; static const uint8_t yellow_pen = 0x7; static const uint8_t red_pen = 0x3; static const int paddle_xpos = 38; }; TILE_GET_INFO_MEMBER(tattack_state::get_tile_info) { int code = m_videoram[tile_index]; int color = m_colorram[tile_index]; if((color&1 ) || (color>15) ) logerror("COLOR %i\n",color); color>>=1; SET_TILE_INFO_MEMBER(0, code, color, 0); } void tattack_state::draw_edge_bitmap(bitmap_ind16 &bitmap, const rectangle &cliprect) { // left column bitmap.plot_box(0,16,216,4,white_pen); // upper row bitmap.plot_box(216,16,6,226,white_pen); // right column bitmap.plot_box(0,238,216,4,white_pen); if(m_bottom_edge_enable == true) bitmap.plot_box(paddle_xpos,16,4,226,white_pen); } void tattack_state::draw_gameplay_bitmap(bitmap_ind16 &bitmap, const rectangle &cliprect) { uint16_t ram_offs; const uint16_t ram_base = 0x40+(m_ram[0x33] & 0x10); const int x_base = -8; int xi,yi; // draw brick pattern for(ram_offs=ram_base;ram_offs-1;bit--) { bool draw_block = ((cur_column >> bit) & 1) == 1; // blinking // If player hits a blinking brick then a 30 seconds bonus is awarded. // Sometimes game forgets to update the location or the blinking itself (both bits 0) // can be either intentional or a game bug. // TODO: the mask used here is guessed if((m_ram[0x33] & 0x3) == 3) { int blink_row = m_ram[0x2b]; int blink_col = m_ram[0x2c]; if(bit == blink_col && (ram_offs & 0xf) == blink_row) draw_block = false; } if(draw_block == true) { for(xi=0;xi<3;xi++) { for(yi=0;yi<15;yi++) { int resx = bit*4+xi+160+x_base; int resy = (ram_offs & 0xf)*16+yi+16; if(cliprect.contains(resx,resy)) bitmap.pix16(resy, resx) = m_bricks_color_bank == true ? red_pen : (bit & 4 ? yellow_pen : green_pen); } } } } } // draw paddle if(m_bottom_edge_enable == false) { for(xi=0;xi<4;xi++) for(yi=0;yimark_all_dirty(); m_tmap->draw(screen, bitmap, cliprect, 0,0); // draw bricks/ball/paddle draw_gameplay_bitmap(bitmap, cliprect); // draw edges // probably enables thru 0xe040? draw_edge_bitmap(bitmap,cliprect); return 0; } void tattack_state::video_start() { m_tmap = &machine().tilemap().create(*m_gfxdecode, tilemap_get_info_delegate(FUNC(tattack_state::get_tile_info),this),TILEMAP_SCAN_ROWS,8,8,32,32 ); } WRITE8_MEMBER(tattack_state::paddle_w) { m_paddle_reg = data; } WRITE8_MEMBER(tattack_state::ball_w) { m_ball_regs[offset] = data; } WRITE8_MEMBER(tattack_state::brick_dma_w) { // bit 7: 0->1 transfers from RAM to internal video buffer // bit 6: bricks color bank m_bricks_color_bank = BIT(data,6); // bit 5: flip screen flip_screen_set(!(data & 0x20)); // bit 4: x paddle half size m_paddle_ysize = data & 0x10 ? 8 : 16; // bit 3: enable bottom edge m_bottom_edge_enable = BIT(data,3); // popmessage("%02x",data&0x7f); } WRITE8_MEMBER(tattack_state::sound_w) { // bit 4 enabled on coin insertion (coin counter?) // bit 3-0 samples enable, @see tattack_sample_names for(int i=0;i<4;i++) { // don't restart playing if it is still enabled (victory BGM relies on this) if(data & 1 << i && m_samples->playing(i) == false) m_samples->start(i,i); //if((data & 1 << i) == 0 && m_samples->playing(i) == true) // m_samples->stop(i); } } void tattack_state::tattack_map(address_map &map) { map(0x0000, 0x0fff).rom(); map(0x4000, 0x4000).portr("AN_PADDLE"); // $315, checks again with same memory, loops if different (?) map(0x5000, 0x53ff).ram().share("videoram"); map(0x6000, 0x6000).portr("DSW2"); map(0x7000, 0x73ff).ram().share("colorram"); // color map ? something else .. only bits 1-3 are used map(0xa000, 0xa000).portr("DSW1"); // dsw ? something else ? map(0xc000, 0xc000).portr("INPUTS").w(this, FUNC(tattack_state::sound_w)); // sound map(0xc001, 0xc001).w(this, FUNC(tattack_state::brick_dma_w)); // bit 7 = strobe ($302) map(0xc002, 0xc002).nopw(); // same as sound port, outputs? map(0xc005, 0xc005).w(this, FUNC(tattack_state::paddle_w)); map(0xc006, 0xc007).w(this, FUNC(tattack_state::ball_w)); map(0xe000, 0xe3ff).ram().share("ram"); } static INPUT_PORTS_START( tattack ) PORT_START("INPUTS") PORT_DIPNAME( 0x01, 0x00, "1-01" ) // reset switch? PORT_DIPSETTING( 0x01, DEF_STR( Off ) ) PORT_DIPSETTING( 0x00, DEF_STR( On ) ) PORT_DIPNAME( 0x02, 0x02, "1-02" ) PORT_DIPSETTING( 0x02, DEF_STR( Off ) ) PORT_DIPSETTING( 0x00, DEF_STR( On ) ) PORT_DIPNAME( 0x04, 0x04, "1-03" ) PORT_DIPSETTING( 0x04, DEF_STR( Off ) ) PORT_DIPSETTING( 0x00, DEF_STR( On ) ) PORT_DIPNAME( 0x08, 0x08, "1-04" ) PORT_DIPSETTING( 0x08, DEF_STR( Off ) ) PORT_DIPSETTING( 0x00, DEF_STR( On ) ) PORT_BIT( 0x10, IP_ACTIVE_HIGH, IPT_BUTTON1 ) PORT_BIT( 0x20, IP_ACTIVE_HIGH, IPT_START2 ) PORT_BIT( 0x40, IP_ACTIVE_HIGH, IPT_START1 ) PORT_BIT( 0x80, IP_ACTIVE_HIGH, IPT_COIN1 ) PORT_START("DSW1") PORT_DIPNAME( 0x01, 0x00, "Enable green square blocks" ) PORT_DIPSETTING( 0x00, DEF_STR( No ) ) PORT_DIPSETTING( 0x01, DEF_STR( Yes ) ) PORT_DIPNAME( 0x02, 0x00, DEF_STR( Coin_A ) ) PORT_DIPSETTING( 0x00, DEF_STR( 1C_1C ) ) PORT_DIPSETTING( 0x02, DEF_STR( 1C_2C ) ) PORT_DIPNAME( 0x04, 0x04, "Number of bricks to destroy" ) PORT_DIPSETTING( 0x04, "112" ) PORT_DIPSETTING( 0x00, "5" ) // testing option? PORT_DIPNAME( 0x08, 0x00, "DSW1 4" ) PORT_DIPSETTING( 0x08, DEF_STR( Off ) ) PORT_DIPSETTING( 0x00, DEF_STR( On ) ) PORT_DIPNAME( 0x30, 0x00, "Paddle in middle of screen" ) PORT_DIPSETTING( 0x00, "Never on screen" ) PORT_DIPSETTING( 0x10, "Mode 1" ) // - appears after a set number of bricks destroyed, might be same setting PORT_DIPSETTING( 0x20, "Mode 2" ) // / PORT_DIPSETTING( 0x30, "Always on screen" ) PORT_DIPNAME( 0x40, 0x00, "DSW1 7" ) PORT_DIPSETTING( 0x40, DEF_STR( Off ) ) PORT_DIPSETTING( 0x00, DEF_STR( On ) ) PORT_DIPNAME( 0x80, 0x00, "DSW1 8" ) PORT_DIPSETTING( 0x80, DEF_STR( Off ) ) PORT_DIPSETTING( 0x00, DEF_STR( On ) ) PORT_START("DSW2") PORT_DIPNAME( 0x01, 0x00, "DSW2 1" ) PORT_DIPSETTING( 0x01, DEF_STR( Off ) ) PORT_DIPSETTING( 0x00, DEF_STR( On ) ) PORT_DIPNAME( 0x02, 0x00, "DSW2 2" ) PORT_DIPSETTING( 0x02, DEF_STR( Off ) ) PORT_DIPSETTING( 0x00, DEF_STR( On ) ) PORT_DIPNAME( 0x04, 0x00, "DSW2 3" ) PORT_DIPSETTING( 0x04, DEF_STR( Off ) ) PORT_DIPSETTING( 0x00, DEF_STR( On ) ) PORT_DIPNAME( 0x08, 0x00, "DSW2 4" ) PORT_DIPSETTING( 0x08, DEF_STR( Off ) ) PORT_DIPSETTING( 0x00, DEF_STR( On ) ) PORT_DIPNAME( 0x10, 0x00, "DSW2 5" ) PORT_DIPSETTING( 0x10, DEF_STR( Off ) ) PORT_DIPSETTING( 0x00, DEF_STR( On ) ) PORT_DIPNAME( 0x20, 0x00, DEF_STR( Cabinet ) ) PORT_DIPSETTING( 0x00, DEF_STR( Upright ) ) PORT_DIPSETTING( 0x20, DEF_STR( Cocktail ) ) PORT_DIPNAME( 0xc0, 0xc0, DEF_STR( Lives ) ) PORT_DIPSETTING( 0x00, "3" ) PORT_DIPSETTING( 0x40, "5" ) PORT_DIPSETTING( 0x80, "7" ) PORT_DIPSETTING( 0xc0, DEF_STR( Infinite ) ) PORT_START("AN_PADDLE") PORT_BIT( 0xff, 0x00, IPT_PADDLE ) PORT_MINMAX(0,0xff) PORT_SENSITIVITY(10) PORT_KEYDELTA(10) PORT_CENTERDELTA(0) INPUT_PORTS_END static const gfx_layout charlayout = { 8,8, RGN_FRAC(1,1), 1, { 0 }, { 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 }; static GFXDECODE_START( gfx_tattack ) GFXDECODE_ENTRY( "gfx1", 0 , charlayout, 0, 8 ) GFXDECODE_END PALETTE_INIT_MEMBER(tattack_state, tattack) { int i,r,g,b; for(i=0;i<8;i++) { if(i) { r=(i&1)?0xff:0; g=(i&2)?0xff:0; b=(i&4)?0xff:0; } else r=g=b=128; palette.set_pen_color(2*i,rgb_t(0x00,0x00,0xff)); palette.set_pen_color(2*i+1,rgb_t(r,g,b)); } } static const char *const tattack_sample_names[] = { "*tattack", "paddle_hit", "wall_hit", "brick_destroy", "win_bgm", nullptr }; MACHINE_CONFIG_START(tattack_state::tattack) /* basic machine hardware */ MCFG_DEVICE_ADD("maincpu", Z80, 8000000 / 2) /* 4 MHz ? */ MCFG_DEVICE_PROGRAM_MAP(tattack_map) MCFG_DEVICE_VBLANK_INT_DRIVER("screen", tattack_state, irq0_line_hold) /* video hardware */ MCFG_SCREEN_ADD("screen", RASTER) MCFG_SCREEN_REFRESH_RATE(60) MCFG_SCREEN_VBLANK_TIME(ATTOSECONDS_IN_USEC(2500) /* not accurate */) MCFG_SCREEN_SIZE(32*8, 32*8) MCFG_SCREEN_VISIBLE_AREA(24, 256-32-1, 13, 256-11-1) MCFG_SCREEN_UPDATE_DRIVER(tattack_state, screen_update_tattack) MCFG_SCREEN_PALETTE("palette") MCFG_DEVICE_ADD("gfxdecode", GFXDECODE, "palette", gfx_tattack) MCFG_PALETTE_ADD("palette", 16) MCFG_PALETTE_INIT_OWNER(tattack_state, tattack) /* sound hardware */ SPEAKER(config, "mono").front_center(); MCFG_DEVICE_ADD("samples", SAMPLES) MCFG_SAMPLES_CHANNELS(4) MCFG_SAMPLES_NAMES(tattack_sample_names) MCFG_SOUND_ROUTE(ALL_OUTPUTS, "mono", 0.6) /* Discrete ???? */ // MCFG_DEVICE_ADD("discrete", DISCRETE) // MCFG_DISCRETE_INTF(tattack) // MCFG_SOUND_ROUTE(ALL_OUTPUTS, "mono", 1.0) MACHINE_CONFIG_END /*************************************************************************** Game driver(s) ***************************************************************************/ ROM_START( tattack ) ROM_REGION( 0x10000, "maincpu", 0 ) ROM_LOAD( "rom.9a", 0x0000, 0x1000, CRC(47120994) SHA1(b6e90abbc50cba77df4c0aaf50d1f97b99e33b6d) ) ROM_REGION( 0x1000, "gfx1", 0 ) ROM_LOAD( "rom.6c", 0x0000, 0x1000, CRC(88ce45cf) SHA1(c7a43bfc9e9c2aeb75a98f723558bc88e53401a7) ) ROM_END void tattack_state::init_tattack() { // uint8_t *rom = memregion("maincpu")->base(); // rom[0x1b4]=0; // rom[0x1b5]=0; // rom[0x262]=0; // rom[0x263]=0; // rom[0x264]=0; // rom[0x32a]=0; // rom[0x32b]=0; // rom[0x32c]=0; /* possible jumps to 0 (protection checks?) rom[0x8a]=0; rom[0x8b]=0; rom[0x8c]=0; rom[0x99]=0; rom[0x9a]=0; rom[0x9b]=0; rom[0xd5]=0; rom[0xd6]=0; rom[0xd7]=0; rom[0x65a]=0; rom[0x65b]=0; rom[0x65c]=0; */ } GAME( 1983?, tattack, 0, tattack, tattack, tattack_state, init_tattack, ROT270, "Shonan", "Time Attacker", MACHINE_IMPERFECT_SOUND | MACHINE_IMPERFECT_COLORS | MACHINE_NO_COCKTAIL ) // there is another undumped version with katakana Shonan logo and black background