// license:BSD-3-Clause // copyright-holders:Angelo Salese, Tomasz Slanina, David Haywood /* Two Minute Drill - Taito 1993 ----------------------------- Half Video, Half Mechanical? (video hw + motion/acceleration sensor ?) preliminary driver by David Haywood Tomasz Slanina Angelo Salese TODO: - understand the ball hit sensor - simulate the sensors (there are still some shutter errors/defender errors that pops up) - Hook-up timers for shutter/defender sensors (check service mode) - Dip-Switches Brief hardware overview: ------------------------ Main processor - 68000 16Mhz Sound - Yamaha YM2610B Taito custom ICs - TC0400YSC (m68k -> ym2610 communication) - TC0260DAR (palette chip) - TC0630FDP (Taito F3 video chip) - TC0510NIO (known input chip) DAC -26.6860Mhz -32.0000Mhz */ #include "emu.h" #include "includes/taito_f3.h" #include "cpu/m68000/m68000.h" #include "machine/taitoio.h" #include "sound/2610intf.h" #include "speaker.h" class _2mindril_state : public taito_f3_state { public: _2mindril_state(const machine_config &mconfig, device_type type, const char *tag) : taito_f3_state(mconfig, type, tag), m_in0(*this, "IN0") { } void drill(machine_config &config); void init_drill(); protected: virtual void machine_start() override; virtual void machine_reset() override; private: /* input-related */ required_ioport m_in0; u8 m_defender_sensor; u8 m_shutter_sensor; u16 m_irq_reg; /* devices */ u8 arm_pwr_r(); u8 sensors_r(); void coins_w(u8 data); void sensors_w(u16 data); u16 irq_r(); void irq_w(offs_t offset, u16 data, u16 mem_mask); INTERRUPT_GEN_MEMBER(vblank_irq); //INTERRUPT_GEN_MEMBER(drill_device_irq); void irqhandler(int state); void drill_map(address_map &map); #ifdef UNUSED_FUNCTION enum { TIMER_SHUTTER_REQ, TIMER_DEFENDER_REQ }; protected: virtual void device_timer(emu_timer &timer, device_timer_id id, int param, void *ptr); #endif }; u8 _2mindril_state::arm_pwr_r() { int arm_pwr = m_in0->read();//throw if (arm_pwr > 0xe0) return ~0x18; if (arm_pwr > 0xc0) return ~0x14; if (arm_pwr > 0x80) return ~0x12; if (arm_pwr > 0x40) return ~0x10; else return ~0x00; } u8 _2mindril_state::sensors_r() { return (m_defender_sensor) | (m_shutter_sensor); } void _2mindril_state::coins_w(u8 data) { machine().bookkeeping().coin_counter_w(0, data & 0x04); machine().bookkeeping().coin_counter_w(1, data & 0x08); machine().bookkeeping().coin_lockout_w(0, ~data & 0x01); machine().bookkeeping().coin_lockout_w(1, ~data & 0x02); } /* PORT_DIPNAME( 0x0100, 0x0000, DEF_STR( Unknown ) )//up sensor <- shutter PORT_DIPSETTING( 0x0000, DEF_STR( Off ) ) PORT_DIPSETTING( 0x0100, DEF_STR( On ) ) PORT_DIPNAME( 0x0200, 0x0000, DEF_STR( Unknown ) )//down sensor PORT_DIPSETTING( 0x0000, DEF_STR( Off ) ) PORT_DIPSETTING( 0x0200, DEF_STR( On ) ) PORT_DIPNAME( 0x0400, 0x0000, DEF_STR( Unknown ) )//left sensor <-defender PORT_DIPSETTING( 0x0000, DEF_STR( Off ) ) PORT_DIPSETTING( 0x0400, DEF_STR( On ) ) PORT_DIPNAME( 0x0800, 0x0000, DEF_STR( Unknown ) )//right sensor PORT_DIPSETTING( 0x0000, DEF_STR( Off ) ) PORT_DIPSETTING( 0x0800, DEF_STR( On ) ) */ #ifdef UNUSED_FUNCTION void _2mindril_state::device_timer(emu_timer &timer, device_timer_id id, int param, void *ptr) { switch (id) { case TIMER_SHUTTER_REQ: m_shutter_sensor = param; break; case TIMER_DEFENDER_REQ: m_defender_sensor = param; break; default: throw emu_fatalerror("Unknown id in _2mindril_state::device_timer"); } } #endif void _2mindril_state::sensors_w(u16 data) { /*---- xxxx ---- ---- select "lamps" (guess)*/ /*---- ---- ---- -x-- lamp*/ if (data & 1) { //timer_set( attotime::from_seconds(2), TIMER_SHUTTER_REQ, 0x01); m_shutter_sensor = 0x01; } else if (data & 2) { //timer_set( attotime::from_seconds(2), TIMER_SHUTTER_REQ, 0x02); m_shutter_sensor = 0x02; } if (data & 0x1000 || data & 0x4000) { //timer_set( attotime::from_seconds(2), TIMER_DEFENDER_REQ, 0x08); m_defender_sensor = 0x08; } else if (data & 0x2000 || data & 0x8000) { //timer_set( attotime::from_seconds(2), TIMER_DEFENDER_REQ, 0x04); m_defender_sensor = 0x04; } } u16 _2mindril_state::irq_r() { return m_irq_reg; } void _2mindril_state::irq_w(offs_t offset, u16 data, u16 mem_mask) { /* (note: could rather be irq mask) ---- ---- ---x ---- irq lv 5 ack, 0->1 latch ---- ---- ---- x--- irq lv 4 ack, 0->1 latch ---- ---- -??- -??? connected to the other levels? */ if (((m_irq_reg & 8) == 0) && data & 8) m_maincpu->set_input_line(4, CLEAR_LINE); if (((m_irq_reg & 0x10) == 0) && data & 0x10) m_maincpu->set_input_line(5, CLEAR_LINE); if (data & 0xffe7) printf("%04x\n",data); COMBINE_DATA(&m_irq_reg); } void _2mindril_state::drill_map(address_map &map) { map(0x000000, 0x07ffff).rom(); map(0x200000, 0x20ffff).ram(); map(0x300000, 0x3000ff).ram(); map(0x400000, 0x40ffff).ram().share("spriteram"); map(0x410000, 0x41bfff).ram().w(FUNC(_2mindril_state::pf_ram_w)).share("pf_ram"); map(0x41c000, 0x41dfff).ram().w(FUNC(_2mindril_state::textram_w)).share("textram"); map(0x41e000, 0x41ffff).ram().w(FUNC(_2mindril_state::charram_w)).share("charram"); map(0x420000, 0x42ffff).ram().share("line_ram"); map(0x430000, 0x43ffff).ram().w(FUNC(_2mindril_state::pivot_w)).share("pivot_ram"); map(0x460000, 0x46000f).w(FUNC(_2mindril_state::control_0_w)); map(0x460010, 0x46001f).w(FUNC(_2mindril_state::control_1_w)); map(0x500000, 0x501fff).ram().w(m_palette, FUNC(palette_device::write16)).share("palette"); map(0x502022, 0x502023).nopw(); //countinously switches between 0 and 2 map(0x600000, 0x600007).rw("ymsnd", FUNC(ym2610_device::read), FUNC(ym2610_device::write)).umask16(0x00ff); map(0x60000c, 0x60000d).rw(FUNC(_2mindril_state::irq_r), FUNC(_2mindril_state::irq_w)); map(0x60000e, 0x60000f).ram(); // unknown purpose, zeroed at start-up and nothing else map(0x700000, 0x70000f).rw("tc0510nio", FUNC(tc0510nio_device::read), FUNC(tc0510nio_device::write)).umask16(0xff00); map(0x800000, 0x800001).w(FUNC(_2mindril_state::sensors_w)); } static INPUT_PORTS_START( drill ) PORT_START("DSW") //Dip-Switches. PCB labelled DIPSWA PORT_DIPNAME( 0x01, 0x01, DEF_STR( Unknown ) ) PORT_DIPLOCATION("DIPSWA:1") PORT_DIPSETTING( 0x01, DEF_STR( Off ) ) PORT_DIPSETTING( 0x00, DEF_STR( On ) ) PORT_DIPNAME( 0x02, 0x02, DEF_STR( Unknown ) ) PORT_DIPLOCATION("DIPSWA:2") PORT_DIPSETTING( 0x02, DEF_STR( Off ) ) PORT_DIPSETTING( 0x00, DEF_STR( On ) ) PORT_DIPNAME( 0x04, 0x04, DEF_STR( Unknown ) ) PORT_DIPLOCATION("DIPSWA:3") PORT_DIPSETTING( 0x04, DEF_STR( Off ) ) PORT_DIPSETTING( 0x00, DEF_STR( On ) ) PORT_DIPNAME( 0x08, 0x08, DEF_STR( Unknown ) ) PORT_DIPLOCATION("DIPSWA:4") PORT_DIPSETTING( 0x08, DEF_STR( Off ) ) PORT_DIPSETTING( 0x00, DEF_STR( On ) ) PORT_DIPNAME( 0x10, 0x10, DEF_STR( Unknown ) ) PORT_DIPLOCATION("DIPSWA:5") PORT_DIPSETTING( 0x10, DEF_STR( Off ) ) PORT_DIPSETTING( 0x00, DEF_STR( On ) ) PORT_DIPNAME( 0x20, 0x20, DEF_STR( Unknown ) ) PORT_DIPLOCATION("DIPSWA:6") PORT_DIPSETTING( 0x20, DEF_STR( Off ) ) PORT_DIPSETTING( 0x00, DEF_STR( On ) ) PORT_DIPNAME( 0x40, 0x40, DEF_STR( Unknown ) ) PORT_DIPLOCATION("DIPSWA:7") PORT_DIPSETTING( 0x40, DEF_STR( Off ) ) PORT_DIPSETTING( 0x00, DEF_STR( On ) ) PORT_DIPNAME( 0x80, 0x80, DEF_STR( Unknown ) ) PORT_DIPLOCATION("DIPSWA:8") PORT_DIPSETTING( 0x80, DEF_STR( Off ) ) PORT_DIPSETTING( 0x00, DEF_STR( On ) ) PORT_START("IN0")//sensors PORT_BIT( 0xff, 0x00, IPT_DIAL ) PORT_SENSITIVITY(25) PORT_KEYDELTA(20) PORT_START("COINS") PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_SERVICE ) PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_SERVICE1 ) PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_COIN1 ) PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_UNUSED ) PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_BUTTON1 ) PORT_NAME("Select SW-1") PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_BUTTON2 ) PORT_NAME("Select SW-2") PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_BUTTON3 ) PORT_NAME("Select SW-3") PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_BUTTON4 ) PORT_NAME("Select SW-4") INPUT_PORTS_END static const gfx_layout charlayout = { 8,8, 256, 4, { 0,1,2,3 }, { 20, 16, 28, 24, 4, 0, 12, 8 }, { STEP8(0,4*8) }, 32*8 }; static const gfx_layout pivotlayout = { 8,8, 2048, 4, { 0,1,2,3 }, { 20, 16, 28, 24, 4, 0, 12, 8 }, { STEP8(0,4*8) }, 32*8 }; static const gfx_layout layout_6bpp_sprite_hi = { 16,16, RGN_FRAC(1,1), 6, { STEP2(0,1)/**/,0,0,0,0/**/ }, { STEP4(3*2,-2), STEP4(7*2,-2), STEP4(11*2,-2), STEP4(15*2,-2) }, { STEP16(0,16*2) }, 16*16*2 }; static const gfx_layout layout_6bpp_tile_hi = { 16,16, RGN_FRAC(1,1), 6, { 8,0/**/,0,0,0,0/**/ }, { STEP8(7,-1), STEP8(8*2+7,-1) }, { STEP16(0,8*2*2) }, 16*16*2 }; static GFXDECODE_START( gfx_2mindril ) GFXDECODE_ENTRY( nullptr, 0, charlayout, 0x0000, 0x0400>>4 ) /* Dynamically modified */ GFXDECODE_ENTRY( nullptr, 0, pivotlayout, 0x0000, 0x400>>4 ) /* Dynamically modified */ GFXDECODE_ENTRY( "sprites", 0, gfx_16x16x4_packed_lsb, 0x1000, 0x1000>>4 ) // low 4bpp of 6bpp sprite data GFXDECODE_ENTRY( "tilemap", 0, gfx_16x16x4_packed_lsb, 0x0000, 0x2000>>4 ) // low 4bpp of 6bpp tilemap data GFXDECODE_ENTRY( "tilemap_hi", 0, layout_6bpp_tile_hi, 0x0000, 0x2000>>4 ) // hi 2bpp of 6bpp tilemap data GFXDECODE_ENTRY( "sprites_hi", 0, layout_6bpp_sprite_hi, 0x1000, 0x1000>>4 ) // hi 2bpp of 6bpp sprite data GFXDECODE_END INTERRUPT_GEN_MEMBER(_2mindril_state::vblank_irq) { device.execute().set_input_line(4, ASSERT_LINE); } #if 0 INTERRUPT_GEN_MEMBER(_2mindril_state::drill_device_irq) { device.execute().set_input_line(5, ASSERT_LINE); } #endif /* WRONG,it does something with 60000c & 700002,likely to be called when the player throws the ball.*/ void _2mindril_state::irqhandler(int state) { // m_maincpu->set_input_line(5, state ? ASSERT_LINE : CLEAR_LINE); } void _2mindril_state::machine_start() { save_item(NAME(m_defender_sensor)); save_item(NAME(m_shutter_sensor)); save_item(NAME(m_irq_reg)); } void _2mindril_state::machine_reset() { m_defender_sensor = 0; m_shutter_sensor = 0; m_irq_reg = 0; } void _2mindril_state::drill(machine_config &config) { M68000(config, m_maincpu, 16000000); m_maincpu->set_addrmap(AS_PROGRAM, &_2mindril_state::drill_map); m_maincpu->set_vblank_int("screen", FUNC(_2mindril_state::vblank_irq)); GFXDECODE(config, m_gfxdecode, m_palette, gfx_2mindril); tc0510nio_device &tc0510nio(TC0510NIO(config, "tc0510nio", 0)); tc0510nio.read_0_callback().set_ioport("DSW"); tc0510nio.read_1_callback().set(FUNC(_2mindril_state::arm_pwr_r)); tc0510nio.read_2_callback().set(FUNC(_2mindril_state::sensors_r)); tc0510nio.write_4_callback().set(FUNC(_2mindril_state::coins_w)); tc0510nio.read_7_callback().set_ioport("COINS"); SCREEN(config, m_screen, SCREEN_TYPE_RASTER); m_screen->set_refresh_hz(60); m_screen->set_vblank_time(ATTOSECONDS_IN_USEC(2500)); /* inaccurate, same as Taito F3? (needs screen raw params anyway) */ m_screen->set_size(40*8+48*2, 32*8); m_screen->set_visarea(46, 40*8-1 + 46, 24, 24+224-1); m_screen->set_screen_update(FUNC(_2mindril_state::screen_update)); m_screen->screen_vblank().set(FUNC(_2mindril_state::screen_vblank)); PALETTE(config, m_palette).set_format(palette_device::RRRRGGGGBBBBRGBx, 0x2000); SPEAKER(config, "lspeaker").front_left(); SPEAKER(config, "rspeaker").front_right(); ym2610b_device &ymsnd(YM2610B(config, "ymsnd", 16000000/2)); ymsnd.irq_handler().set(FUNC(_2mindril_state::irqhandler)); ymsnd.add_route(0, "lspeaker", 0.25); ymsnd.add_route(0, "rspeaker", 0.25); ymsnd.add_route(1, "lspeaker", 1.0); ymsnd.add_route(2, "rspeaker", 1.0); } ROM_START( 2mindril ) ROM_REGION( 0x80000, "maincpu", 0 ) /* 68000 Code */ ROM_LOAD16_BYTE( "d58-38.ic11", 0x00000, 0x40000, CRC(c58e8e4f) SHA1(648db679c3bfb5de1cd6c1b1217773a2fe56f11b) ) // Ver 2.93A 1994/02/16 09:45:00 ROM_LOAD16_BYTE( "d58-37.ic9", 0x00001, 0x40000, CRC(19e5cc3c) SHA1(04ac0eef893c579fe90d91d7fd55c5741a2b7460) ) ROM_REGION( 0x200000, "ymsnd", 0 ) /* Samples */ ROM_LOAD( "d58-11.ic31", 0x000000, 0x200000, CRC(dc26d58d) SHA1(cffb18667da18f5367b02af85a2f7674dd61ae97) ) ROM_REGION( 0x400000, "sprites", ROMREGION_ERASE00 ) ROM_REGION( 0x200000, "sprites_hi", ROMREGION_ERASE00 ) ROM_REGION( 0x400000, "tilemap", 0 ) ROM_LOAD32_WORD( "d58-08.ic27", 0x000000, 0x200000, CRC(9f5a3f52) SHA1(7b696bd823819965b974c853cebc1660750db61e) ) ROM_LOAD32_WORD( "d58-09.ic28", 0x000002, 0x200000, CRC(d8f6a86a) SHA1(d6b2ec309e21064574ee63e025ae4716b1982a98) ) ROM_REGION( 0x200000, "tilemap_hi", 0 ) ROM_LOAD ( "d58-10.ic29", 0x000000, 0x200000, CRC(74c87e08) SHA1(f39b3a64f8338ccf5ca6eb76cee92a10fe0aad8f) ) ROM_END void _2mindril_state::init_drill() { m_game = TMDRILL; tile_decode(); } GAME( 1993, 2mindril, 0, drill, drill, _2mindril_state, init_drill, ROT0, "Taito America Corporation", "Two Minute Drill (Ver 2.93A 1994/02/16)", MACHINE_NOT_WORKING | MACHINE_IMPERFECT_GRAPHICS | MACHINE_MECHANICAL)