/************************************************************************ Zaccaria S2650 '80s games Driver by Mike Coates and Pierpaolo Prazzoli TODO: Quasar ------ - Sound (missing invader effect - still not sure all noise in correct places) - Phase 3 - seems awfully hard - dip settings ? - Hook up Coin Counter - Test/Service Mode - not working? ************************************************************************ Quasar by Zaccaria (1980) 1K files were 2708 2K files were 2716 512 file was an 82S130 (colour and priority PROM) 2650A CPU I8085 Sound Board ************************************************************************/ #include "emu.h" #include "cpu/s2650/s2650.h" #include "cpu/mcs48/mcs48.h" #include "sound/dac.h" #include "video/s2636.h" #include "includes/quasar.h" /************************************************************************ Quasar memory layout Paging for screen is controlled by OUT to 0,1,2 or 3 Paging for IO ports is controlled by OUT to 8,9,A or B ************************************************************************/ WRITE8_MEMBER(quasar_state::video_page_select_w) { m_page = offset & 0x03; } WRITE8_MEMBER(quasar_state::io_page_select_w) { m_io_page = offset & 0x03; } WRITE8_MEMBER(quasar_state::quasar_video_w) { switch (m_page) { case 0: m_video_ram[offset] = data; break; case 1: m_color_ram[offset] = data & 7; break; // 3 bits of ram only - 3 x 2102 case 2: m_effectram[offset] = data; break; case 3: m_effectcontrol = data; break; } } READ8_MEMBER(quasar_state::quasar_IO_r) { UINT8 ans = 0; switch (m_io_page) { case 0: ans = ioport("IN0")->read(); break; case 1: ans = ioport("IN1")->read(); break; case 2: ans = ioport("DSW0")->read(); break; case 3: ans = ioport("DSW1")->read(); break; } return ans; } WRITE8_MEMBER(quasar_state::quasar_bullet_w) { m_bullet_ram[offset] = (data ^ 0xff); } WRITE8_MEMBER(quasar_state::quasar_sh_command_w) { // bit 4 = Sound Invader : Linked to an NE555V circuit // Not handled yet // lower nibble = command to I8035 // not necessarily like this, but it seems to work better than direct mapping // (although schematics has it as direct - but then the schematics are wrong elsewhere to!) soundlatch_byte_w(space, 0, (data & 8) + ((data >> 1) & 3) + ((data << 2) & 4)); } READ8_MEMBER(quasar_state::quasar_sh_command_r) { return soundlatch_byte_r(space, 0) + (ioport("DSW2")->read() & 0x30); } READ8_MEMBER(quasar_state::audio_t1_r) { return (soundlatch_byte_r(space, 0) == 0); } // memory map taken from the manual static ADDRESS_MAP_START( quasar, AS_PROGRAM, 8, quasar_state ) AM_RANGE(0x0000, 0x13ff) AM_ROM AM_RANGE(0x1400, 0x14ff) AM_MIRROR(0x6000) AM_READ(cvs_bullet_ram_or_palette_r) AM_WRITE(quasar_bullet_w) AM_SHARE("bullet_ram") AM_RANGE(0x1500, 0x15ff) AM_MIRROR(0x6000) AM_READWRITE(cvs_s2636_0_or_character_ram_r, cvs_s2636_0_or_character_ram_w) AM_RANGE(0x1600, 0x16ff) AM_MIRROR(0x6000) AM_READWRITE(cvs_s2636_1_or_character_ram_r, cvs_s2636_1_or_character_ram_w) AM_RANGE(0x1700, 0x17ff) AM_MIRROR(0x6000) AM_READWRITE(cvs_s2636_2_or_character_ram_r, cvs_s2636_2_or_character_ram_w) AM_RANGE(0x1800, 0x1bff) AM_MIRROR(0x6000) AM_READ(cvs_video_or_color_ram_r) AM_WRITE(quasar_video_w) AM_SHARE("video_ram") AM_RANGE(0x1c00, 0x1fff) AM_MIRROR(0x6000) AM_RAM AM_RANGE(0x2000, 0x33ff) AM_ROM AM_RANGE(0x4000, 0x53ff) AM_ROM AM_RANGE(0x6000, 0x73ff) AM_ROM ADDRESS_MAP_END static ADDRESS_MAP_START( quasar_io, AS_IO, 8, quasar_state ) AM_RANGE(0x00, 0x03) AM_READWRITE(quasar_IO_r, video_page_select_w) AM_RANGE(0x08, 0x0b) AM_WRITE(io_page_select_w) AM_RANGE(S2650_DATA_PORT, S2650_DATA_PORT) AM_READ(cvs_collision_clear) AM_WRITE(quasar_sh_command_w) AM_RANGE(S2650_CTRL_PORT, S2650_CTRL_PORT) AM_READ(cvs_collision_r) AM_WRITENOP AM_RANGE(S2650_SENSE_PORT, S2650_SENSE_PORT) AM_READ_PORT("SENSE") AM_RANGE(S2650_FO_PORT, S2650_FO_PORT) AM_RAM AM_SHARE("fo_state") ADDRESS_MAP_END /************************************* * * Sound board memory handlers * *************************************/ static ADDRESS_MAP_START( sound_map, AS_PROGRAM, 8, quasar_state ) AM_RANGE(0x0000, 0x07ff) AM_ROM ADDRESS_MAP_END static ADDRESS_MAP_START( sound_portmap, AS_IO, 8, quasar_state ) AM_RANGE(0x00, 0x7f) AM_RAM AM_RANGE(0x80, 0x80) AM_READ(quasar_sh_command_r) AM_RANGE(MCS48_PORT_T1, MCS48_PORT_T1) AM_READ(audio_t1_r) AM_RANGE(MCS48_PORT_P1, MCS48_PORT_P1) AM_DEVWRITE("dac", dac_device, write_signed8) ADDRESS_MAP_END /************************************************************************ Inputs ************************************************************************/ static INPUT_PORTS_START( quasar ) PORT_START("IN0") PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_START1 ) PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_START2 ) PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_COIN2 ) PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_COIN1 ) PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_BUTTON1 ) PORT_COCKTAIL PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_BUTTON1 ) PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_TILT ) PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_SERVICE ) /* test switch */ PORT_START("IN1") PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_UNKNOWN ) /* table (from manual) */ PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_JOYSTICK_RIGHT ) PORT_COCKTAIL PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_JOYSTICK_RIGHT ) PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_JOYSTICK_LEFT ) PORT_COCKTAIL PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_JOYSTICK_LEFT ) PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_BUTTON2 ) PORT_COCKTAIL PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_BUTTON2 ) PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_UNKNOWN ) /* count enable (from manual) */ PORT_START("DSW0") PORT_DIPNAME( 0x0c, 0x04, DEF_STR( Coin_A ) ) /* confirmed */ PORT_DIPSETTING( 0x00, DEF_STR( 2C_1C ) ) PORT_DIPSETTING( 0x04, DEF_STR( 1C_1C ) ) PORT_DIPSETTING( 0x08, DEF_STR( 1C_2C ) ) PORT_DIPSETTING( 0x0c, DEF_STR( 1C_3C ) ) PORT_DIPNAME( 0x03, 0x00, DEF_STR( Coin_B ) ) /* confirmed */ PORT_DIPSETTING( 0x00, DEF_STR( 1C_1C ) ) PORT_DIPSETTING( 0x01, DEF_STR( 1C_2C ) ) PORT_DIPSETTING( 0x02, DEF_STR( 1C_3C ) ) PORT_DIPSETTING( 0x03, DEF_STR( 1C_5C ) ) PORT_DIPNAME( 0x30, 0x00, "Number of Rockets" ) /* confirmed */ PORT_DIPSETTING( 0x00, "3" ) PORT_DIPSETTING( 0x10, "4" ) PORT_DIPSETTING( 0x20, "5" ) PORT_DIPSETTING( 0x30, "6" ) PORT_DIPNAME( 0x40, 0x40, DEF_STR( Free_Play ) ) PORT_DIPSETTING( 0x40, DEF_STR( Off ) ) PORT_DIPSETTING( 0x00, DEF_STR( On ) ) PORT_DIPNAME( 0x80, 0x80, "Test Mode" ) /* confirmed */ PORT_DIPSETTING( 0x00, "Collisions excluded" ) PORT_DIPSETTING( 0x80, "Collisions included" ) PORT_START("DSW1") PORT_DIPNAME( 0x07, 0x01, "High Score" ) PORT_DIPSETTING( 0x00, "No H.S." ) // this option only wants bit 0 OFF PORT_DIPSETTING( 0x01, "Normal H.S." ) PORT_DIPSETTING( 0x03, "Low H.S." ) PORT_DIPSETTING( 0x05, "Medium H.S." ) PORT_DIPSETTING( 0x07, "High H.S." ) PORT_DIPNAME( 0x18, 0x10, DEF_STR( Difficulty ) ) PORT_DIPSETTING( 0x18, DEF_STR( Easy ) ) PORT_DIPSETTING( 0x10, DEF_STR( Medium ) ) PORT_DIPSETTING( 0x08, DEF_STR( Difficult ) ) PORT_DIPSETTING( 0x00, DEF_STR( Very_Difficult ) ) PORT_DIPNAME( 0x60, 0x20, "Extended Play" ) PORT_DIPSETTING( 0x20, "5500" ) /* confirmed */ PORT_DIPSETTING( 0x40, "7500" ) PORT_DIPSETTING( 0x60, "9500" ) PORT_DIPSETTING( 0x00, "17500" ) PORT_DIPNAME( 0x80, 0x80, "Full Screen Rocket" ) /* confirmed */ PORT_DIPSETTING( 0x80, "Stop at edge" ) PORT_DIPSETTING( 0x00, "Wrap Around" ) PORT_START("SENSE") PORT_BIT( 0x80, IP_ACTIVE_HIGH, IPT_CUSTOM ) PORT_VBLANK("screen") PORT_START("DSW2") #if 0 PORT_DIPNAME( 0x0f, 0x00, "Noise to play" ) PORT_DIPSETTING( 0x00, "00" ) PORT_DIPSETTING( 0x01, "01" ) PORT_DIPSETTING( 0x02, "02" ) PORT_DIPSETTING( 0x03, "03" ) PORT_DIPSETTING( 0x04, "04" ) PORT_DIPSETTING( 0x05, "05" ) PORT_DIPSETTING( 0x06, "06" ) PORT_DIPSETTING( 0x07, "07" ) PORT_DIPSETTING( 0x08, "08" ) PORT_DIPSETTING( 0x09, "09" ) PORT_DIPSETTING( 0x0a, "0A" ) PORT_DIPSETTING( 0x0b, "0B" ) PORT_DIPSETTING( 0x0c, "0C" ) PORT_DIPSETTING( 0x0d, "0D" ) PORT_DIPSETTING( 0x0e, "0E" ) PORT_DIPSETTING( 0x0f, "0F" ) #endif PORT_DIPNAME( 0x10, 0x10, "Sound Test" ) PORT_DIPSETTING( 0x10, DEF_STR( Off ) ) PORT_DIPSETTING( 0x00, DEF_STR( On ) ) PORT_DIPNAME( 0x20, 0x20, DEF_STR( Unused ) ) PORT_DIPSETTING( 0x20, DEF_STR( Off ) ) PORT_DIPSETTING( 0x00, DEF_STR( On ) ) INPUT_PORTS_END static const gfx_layout charlayout = { 8,8, RGN_FRAC(1,3), 3, { RGN_FRAC(0,3), RGN_FRAC(1,3), RGN_FRAC(2,3) }, { 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 }; /* S2636 Mappings */ static GFXDECODE_START( quasar ) GFXDECODE_ENTRY( "gfx1", 0x0000, charlayout, 0, 64+1 ) /* ROM chars */ GFXDECODE_END INTERRUPT_GEN_MEMBER(quasar_state::quasar_interrupt) { device.execute().set_input_line_and_vector(0, HOLD_LINE, 0x03); } static const s2636_interface s2636_0_config = { "screen", 0x100, CVS_S2636_Y_OFFSET, CVS_S2636_X_OFFSET, NULL }; static const s2636_interface s2636_1_config = { "screen", 0x100, CVS_S2636_Y_OFFSET, CVS_S2636_X_OFFSET, NULL }; static const s2636_interface s2636_2_config = { "screen", 0x100, CVS_S2636_Y_OFFSET, CVS_S2636_X_OFFSET, NULL }; // **************************************** // Quasar S2650 Main CPU, I8035 sound board // **************************************** MACHINE_START_MEMBER(quasar_state,quasar) { MACHINE_START_CALL_MEMBER(cvs); /* register state save */ save_item(NAME(m_effectcontrol)); save_item(NAME(m_page)); save_item(NAME(m_io_page)); } MACHINE_RESET_MEMBER(quasar_state,quasar) { MACHINE_RESET_CALL_MEMBER(cvs); m_effectcontrol = 0; m_page = 0; m_io_page = 8; } static MACHINE_CONFIG_START( quasar, quasar_state ) /* basic machine hardware */ MCFG_CPU_ADD("maincpu", S2650, 14318000/4) /* 14 mhz crystal divide by 4 on board */ MCFG_CPU_PROGRAM_MAP(quasar) MCFG_CPU_IO_MAP(quasar_io) MCFG_CPU_VBLANK_INT_DRIVER("screen", quasar_state, quasar_interrupt) MCFG_CPU_ADD("soundcpu",I8035,6000000) /* 6MHz crystal divide by 15 in CPU */ MCFG_CPU_PROGRAM_MAP(sound_map) MCFG_CPU_IO_MAP(sound_portmap) MCFG_MACHINE_START_OVERRIDE(quasar_state,quasar) MCFG_MACHINE_RESET_OVERRIDE(quasar_state,quasar) MCFG_QUANTUM_TIME(attotime::from_hz(6000)) /* video hardware */ MCFG_SCREEN_ADD("screen", RASTER) MCFG_SCREEN_REFRESH_RATE(50) /* From dot clock */ MCFG_SCREEN_VBLANK_TIME(ATTOSECONDS_IN_USEC(2500) /* not accurate */) MCFG_SCREEN_SIZE(256, 256) MCFG_SCREEN_VISIBLE_AREA(1*8+1, 29*8-1, 2*8, 32*8-1) MCFG_SCREEN_UPDATE_DRIVER(quasar_state, screen_update_quasar) MCFG_GFXDECODE(quasar) MCFG_PALETTE_LENGTH((64+1)*8+(4*256)) MCFG_S2636_ADD("s2636_0", s2636_0_config) MCFG_S2636_ADD("s2636_1", s2636_1_config) MCFG_S2636_ADD("s2636_2", s2636_2_config) MCFG_PALETTE_INIT_OVERRIDE(quasar_state,quasar) MCFG_VIDEO_START_OVERRIDE(quasar_state,quasar) /* sound hardware */ MCFG_SPEAKER_STANDARD_MONO("mono") MCFG_DAC_ADD("dac") MCFG_SOUND_ROUTE(ALL_OUTPUTS, "mono", 1.0) MACHINE_CONFIG_END ROM_START( quasar ) ROM_REGION( 0x8000, "maincpu", 0 ) ROM_LOAD( "7b_01.bin", 0x0000, 0x0400, CRC(20a7feaf) SHA1(ab89087efca2fcb9568f49ba117755ae2c1bd3a3) ) ROM_CONTINUE( 0x4000, 0x0400 ) ROM_LOAD( "6b_02.bin", 0x0400, 0x0400, CRC(c14af4a1) SHA1(ca2d3aff94db43aa7c25d33b345a53f484f679cd) ) ROM_CONTINUE( 0x4400, 0x0400 ) ROM_LOAD( "5b_03.bin", 0x0800, 0x0400, CRC(3f051d8b) SHA1(1dd7a5eddfb0d7871705ac9ec1b9c16c2b80ddf0) ) ROM_CONTINUE( 0x4800, 0x0400 ) ROM_LOAD( "3b_04.bin", 0x0c00, 0x0400, CRC(e14d04ed) SHA1(3176902e3efd72946468c7e7a221d88fcbf63c97) ) ROM_CONTINUE( 0x4c00, 0x0400 ) ROM_LOAD( "2b_05.bin", 0x1000, 0x0400, CRC(f2113222) SHA1(576e0ac92ba076e00eeeae73892246f92fff252a) ) ROM_CONTINUE( 0x5000, 0x0400 ) ROM_LOAD( "7c_06.bin", 0x2000, 0x0400, CRC(f7f1267d) SHA1(29c99191b0b6186af6772d04543a5fd235f5eafd) ) ROM_LOAD( "6c_07.bin", 0x2400, 0x0400, CRC(772004eb) SHA1(bfafb6005a1a0cff39b76ec0ad4ea1f438a2f174) ) ROM_LOAD( "5c_08.bin", 0x2800, 0x0400, CRC(7a87b6f3) SHA1(213b8ccd7bdd650e19d2746b2d617c1950ba3d2b) ) ROM_LOAD( "3c_09.bin", 0x2c00, 0x0400, CRC(ef87c2cb) SHA1(1ba10dd3996c047e595c54a37c1abb44df3b63c6) ) ROM_LOAD( "2c_10.bin", 0x3000, 0x0400, CRC(be6c4f84) SHA1(b3a779457bd0d33ccb23c21a7e7cd4a6fc78bb7f) ) ROM_REGION( 0x1000, "soundcpu", 0 ) ROM_LOAD( "quasar.snd", 0x0000, 0x0800, CRC(9e489768) SHA1(a9f01ef0a6512543bbdfec56037f37a0440b2b94) ) ROM_REGION( 0x1800, "gfx1", 0 ) ROM_LOAD( "6g.bin", 0x0000, 0x0800, CRC(deb2f4a9) SHA1(9a15d07a9b35bef34ce923973fc59fbd911f8111) ) ROM_LOAD( "7g.bin", 0x0800, 0x0800, CRC(76222f30) SHA1(937286fcb50bd0a61db9e71e04b5eb1a0746e1c0) ) ROM_LOAD( "9g.bin", 0x1000, 0x0800, CRC(fd0a36e9) SHA1(93f1207a36418b9ab15a25163a092308b9916528) ) ROM_REGION( 0x0200, "proms", 0 ) ROM_LOAD( "12m_q.bin", 0x0000, 0x0200, CRC(1ab8633d) SHA1(3aed29f2326676a8d8a5de6f6bb923b6510896d8) ) ROM_END ROM_START( quasara ) ROM_REGION( 0x8000, "maincpu", 0 ) ROM_LOAD( "7b_01.bin", 0x0000, 0x0400, CRC(20a7feaf) SHA1(ab89087efca2fcb9568f49ba117755ae2c1bd3a3) ) ROM_CONTINUE( 0x4000, 0x0400 ) ROM_LOAD( "6b_02.bin", 0x0400, 0x0400, CRC(c14af4a1) SHA1(ca2d3aff94db43aa7c25d33b345a53f484f679cd) ) ROM_CONTINUE( 0x4400, 0x0400 ) ROM_LOAD( "5b_03.bin", 0x0800, 0x0400, CRC(3f051d8b) SHA1(1dd7a5eddfb0d7871705ac9ec1b9c16c2b80ddf0) ) ROM_CONTINUE( 0x4800, 0x0400 ) ROM_LOAD( "3b_04.bin", 0x0c00, 0x0400, CRC(e14d04ed) SHA1(3176902e3efd72946468c7e7a221d88fcbf63c97) ) ROM_CONTINUE( 0x4c00, 0x0400 ) ROM_LOAD( "2b_05.bin", 0x1000, 0x0400, CRC(f2113222) SHA1(576e0ac92ba076e00eeeae73892246f92fff252a) ) ROM_CONTINUE( 0x5000, 0x0400 ) ROM_LOAD( "7c_06.bin", 0x2000, 0x0400, CRC(f7f1267d) SHA1(29c99191b0b6186af6772d04543a5fd235f5eafd) ) ROM_LOAD( "6c_07.bin", 0x2400, 0x0400, CRC(772004eb) SHA1(bfafb6005a1a0cff39b76ec0ad4ea1f438a2f174) ) ROM_LOAD( "5c_08.bin", 0x2800, 0x0400, CRC(7a87b6f3) SHA1(213b8ccd7bdd650e19d2746b2d617c1950ba3d2b) ) ROM_LOAD( "3c_09.bin", 0x2c00, 0x0400, CRC(ef87c2cb) SHA1(1ba10dd3996c047e595c54a37c1abb44df3b63c6) ) ROM_LOAD( "2c_10a.bin", 0x3000, 0x0400, CRC(a31c0435) SHA1(48e1c5da455610145310dfe4c6b6e4302b531876) ) // different from quasar set ROM_REGION( 0x1000, "soundcpu", 0 ) ROM_LOAD( "quasar.snd", 0x0000, 0x0800, CRC(9e489768) SHA1(a9f01ef0a6512543bbdfec56037f37a0440b2b94) ) ROM_REGION( 0x1800, "gfx1", 0 ) ROM_LOAD( "6g.bin", 0x0000, 0x0800, CRC(deb2f4a9) SHA1(9a15d07a9b35bef34ce923973fc59fbd911f8111) ) ROM_LOAD( "7g.bin", 0x0800, 0x0800, CRC(76222f30) SHA1(937286fcb50bd0a61db9e71e04b5eb1a0746e1c0) ) ROM_LOAD( "9g.bin", 0x1000, 0x0800, CRC(fd0a36e9) SHA1(93f1207a36418b9ab15a25163a092308b9916528) ) ROM_REGION( 0x0200, "proms", 0 ) ROM_LOAD( "12m_q.bin", 0x0000, 0x0200, CRC(1ab8633d) SHA1(3aed29f2326676a8d8a5de6f6bb923b6510896d8) ) ROM_END GAME( 1980, quasar, 0, quasar, quasar, driver_device, 0, ROT90, "Zaccaria / Zelco", "Quasar (set 1)", GAME_IMPERFECT_GRAPHICS | GAME_IMPERFECT_SOUND | GAME_SUPPORTS_SAVE ) GAME( 1980, quasara, quasar, quasar, quasar, driver_device, 0, ROT90, "Zaccaria / Zelco", "Quasar (set 2)", GAME_IMPERFECT_GRAPHICS | GAME_IMPERFECT_SOUND | GAME_SUPPORTS_SAVE )