summaryrefslogtreecommitdiffstatshomepage
path: root/src/mame/drivers/dai3wksi.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'src/mame/drivers/dai3wksi.cpp')
-rw-r--r--src/mame/drivers/dai3wksi.cpp663
1 files changed, 0 insertions, 663 deletions
diff --git a/src/mame/drivers/dai3wksi.cpp b/src/mame/drivers/dai3wksi.cpp
deleted file mode 100644
index dae27754f33..00000000000
--- a/src/mame/drivers/dai3wksi.cpp
+++ /dev/null
@@ -1,663 +0,0 @@
-// license:BSD-3-Clause
-// copyright-holders:Hau,Derrick Renaud
-/*
-
--Galaxy Force
--Run Away
---------------------------
-Dai 3 Wakusei
-(c)1979 Sun Electronics
-
-SIV-01-B
-TVG_13.6 [8e8b40b1]
-TVG_14.7 [d48cbabe]
-TVG_15.8 [cf44bd60]
-TVG_16.9 [ae723f56]
---------------------------
-
--Warp 1
-SIV-01-C
-
-Dumped by Chack'n
-01/04/2009
-
-Written by Hau
-02/18/2009
-12/14/2010
-
-Discrete by Andy
-11/11/2009
-
-
-Driver Notes:
-
-- Two player games are automatically displayed in cocktail mode.
- Is this by design (a cocktail only romset)?
-
-- Discrete audio needs adding to replace hardcoded samples
-
-- The warp1 set gets stuck at boot. Slight protection? Bypass with bpset 0x23, go, PC = 0x26, go
-
-- Is Warp-1 sound same as Dai 3 Wakusei?
-
-- Dips need identifying
-
-- warp1bl is said by the dumper to be black and white, while the original is said to be colour
-
-*/
-
-#include "emu.h"
-
-#include "cpu/z80/z80.h"
-#include "machine/rescap.h"
-#include "sound/samples.h"
-#include "sound/sn76477.h"
-#include "emupal.h"
-#include "screen.h"
-#include "speaker.h"
-
-
-namespace {
-
-#define USE_SAMPLES (1)
-
-
-class dai3wksi_state : public driver_device
-{
-public:
- dai3wksi_state(const machine_config &mconfig, device_type type, const char *tag) :
- driver_device(mconfig, type, tag),
- m_maincpu(*this, "maincpu"),
- m_samples(*this, "samples"),
- m_ic77(*this, "ic77"),
- m_ic78(*this, "ic78"),
- m_ic79(*this, "ic79"),
- m_ic80(*this, "ic80"),
- m_ic81(*this, "ic81"),
- m_palette(*this, "palette"),
- m_videoram(*this, "videoram"),
- m_in2(*this, "IN2")
- { }
-
- void dai3wksi(machine_config &config);
- void warp1bl(machine_config &config);
-
-protected:
- virtual void machine_start() override;
- virtual void machine_reset() override;
-
-private:
- // devices
- required_device<cpu_device> m_maincpu;
- required_device<samples_device> m_samples;
- optional_device<sn76477_device> m_ic77;
- optional_device<sn76477_device> m_ic78;
- optional_device<sn76477_device> m_ic79;
- optional_device<sn76477_device> m_ic80;
- optional_device<sn76477_device> m_ic81;
- required_device<palette_device> m_palette;
-
- // video
- required_shared_ptr<uint8_t> m_videoram;
- uint8_t m_flipscreen;
- uint8_t m_redscreen;
- uint8_t m_redterop;
- uint32_t screen_update_color(screen_device &screen, bitmap_rgb32 &bitmap, const rectangle &cliprect);
- uint32_t screen_update_bw(screen_device &screen, bitmap_rgb32 &bitmap, const rectangle &cliprect);
-
- // sound
- uint8_t m_port_last1;
- uint8_t m_port_last2;
- uint8_t m_enabled_sound;
- uint8_t m_sound3_counter;
- void audio_1_w(uint8_t data);
- void audio_2_w(uint8_t data);
- void audio_3_w(uint8_t data);
-
- // i/o ports
- required_ioport m_in2;
-
- void main_map(address_map &map);
-};
-
-
-/*************************************
- *
- * Video system
- *
- *************************************/
-
-static const uint8_t vr_prom1[64*8*2]={
- 6, 6,6,6,6,6,6,6,6, 6,6,6,6,6,6,6,6, 3,3,3,3,3,3,3,3, 5,5,5,5,5,5,5,5, 3,3,3,3,3,3,3,3, 2,2,2,2,2,2,2,2, 6,6,6,6,6,6,6,6, 4,4,4,4,4,4,4,
- 6, 6,6,6,6,6,6,6,6, 6,6,6,6,6,6,6,6, 3,3,3,3,3,3,3,3, 5,5,5,5,5,5,5,5, 3,3,3,3,3,3,3,3, 2,2,2,2,2,2,2,2, 6,6,6,6,6,6,6,6, 4,4,4,4,4,4,4,
- 6, 6,6,6,6,6,6,6,6, 6,6,6,6,6,6,6,6, 3,3,3,3,3,3,3,3, 5,5,5,5,5,5,5,5, 3,3,3,3,3,3,3,3, 2,2,2,2,2,2,2,2, 6,6,6,6,6,6,6,6, 4,4,4,4,4,4,4,
- 6, 6,6,6,6,6,6,6,6, 6,6,6,6,6,6,6,6, 3,3,3,3,3,3,3,3, 4,4,4,4,4,4,4,4, 3,3,3,3,3,3,3,3, 2,2,2,2,2,2,2,2, 6,6,6,6,6,6,6,6, 4,4,4,4,4,4,4,
- 6, 6,6,6,6,6,6,6,6, 6,6,6,6,6,6,6,6, 3,3,3,3,3,3,3,3, 4,4,4,4,4,4,4,4, 3,3,3,3,3,3,3,3, 2,2,2,2,2,2,2,2, 6,6,6,6,6,6,6,6, 4,4,4,4,4,4,4,
- 3, 3,3,6,6,6,6,6,6, 6,6,6,6,6,6,6,6, 3,3,3,3,3,3,3,3, 5,5,5,5,5,5,5,5, 3,3,3,3,3,3,3,3, 2,2,2,2,2,2,2,2, 6,6,6,6,6,6,6,6, 4,4,4,4,4,4,4,
- 3, 3,3,6,6,6,6,6,6, 6,6,6,6,6,6,6,6, 3,3,3,3,3,3,3,3, 5,5,5,5,5,5,5,5, 3,3,3,3,3,3,3,3, 2,2,2,2,2,2,2,2, 6,6,6,6,6,6,6,6, 4,4,4,4,4,4,4,
- 3, 3,3,6,6,6,6,6,6, 6,6,6,6,6,6,6,6, 3,3,3,3,3,3,3,3, 5,5,5,5,5,5,5,5, 3,3,3,3,3,3,3,3, 2,2,2,2,2,2,2,2, 6,6,6,6,6,6,6,6, 4,4,4,4,4,4,4,
-
- 6, 6,6,2,2,6,6,6,6, 6,6,6,6,6,6,6,6, 3,3,3,3,3,3,3,3, 5,5,5,5,5,5,5,5, 3,3,3,3,3,3,3,3, 2,2,2,2,2,2,2,2, 6,6,6,6,6,6,6,6, 4,4,4,4,4,4,4,
- 6, 6,6,2,2,6,6,6,6, 6,6,6,6,6,6,6,6, 3,3,3,3,3,3,3,3, 5,5,5,5,5,5,5,5, 3,3,3,3,3,3,3,3, 2,2,2,2,2,2,2,2, 6,6,6,6,6,6,6,6, 4,4,4,4,4,4,4,
- 6, 6,6,2,2,6,6,6,6, 6,6,6,6,6,6,6,6, 3,3,3,3,3,3,3,3, 5,5,5,5,5,5,5,5, 3,3,3,3,3,3,3,3, 2,2,2,2,2,2,2,2, 6,6,6,6,6,6,6,6, 4,4,4,4,4,4,4,
- 6, 6,6,2,2,6,6,6,6, 6,6,6,6,6,6,6,6, 3,3,3,3,3,3,3,3, 4,4,4,4,4,4,4,4, 3,3,3,3,3,3,3,3, 2,2,2,2,2,2,2,2, 6,6,6,6,6,6,6,6, 4,4,4,4,4,4,4,
- 6, 6,6,2,2,6,6,6,6, 6,6,6,6,6,6,6,6, 3,3,3,3,3,3,3,3, 4,4,4,4,4,4,4,4, 3,3,3,3,3,3,3,3, 2,2,2,2,2,2,2,2, 6,6,6,6,6,6,6,6, 4,4,4,4,4,4,4,
- 3, 3,3,2,2,6,6,6,6, 6,6,6,6,6,6,6,6, 3,3,3,3,3,3,3,3, 5,5,5,5,5,5,5,5, 3,3,3,3,3,3,3,3, 2,2,2,2,2,2,2,2, 6,6,6,6,6,6,6,6, 4,4,4,4,4,4,4,
- 3, 3,3,2,2,6,6,6,6, 6,6,6,6,6,6,6,6, 3,3,3,3,3,3,3,3, 5,5,5,5,5,5,5,5, 3,3,3,3,3,3,3,3, 2,2,2,2,2,2,2,2, 6,6,6,6,6,6,6,6, 4,4,4,4,4,4,4,
- 3, 3,3,2,2,6,6,6,6, 6,6,6,6,6,6,6,6, 3,3,3,3,3,3,3,3, 5,5,5,5,5,5,5,5, 3,3,3,3,3,3,3,3, 2,2,2,2,2,2,2,2, 6,6,6,6,6,6,6,6, 4,4,4,4,4,4,4,
-};
-
-static const uint8_t vr_prom2[64*8*2]={
- 6, 6,6,6,6,6,6,6,6, 6,6,6,6,6,6,6,6, 3,3,3,3,3,3,3,3, 7,7,7,7,7,7,7,7, 3,3,3,3,3,3,3,3, 2,2,2,2,2,2,2,2, 6,6,6,6,6,6,6,6, 4,4,4,4,4,4,4,
- 6, 6,6,6,6,6,6,6,6, 6,6,6,6,6,6,6,6, 3,3,3,3,3,3,3,3, 7,7,7,7,7,7,7,7, 3,3,3,3,3,3,3,3, 2,2,2,2,2,2,2,2, 6,6,6,6,6,6,6,6, 4,4,4,4,4,4,4,
- 6, 6,6,6,6,6,6,6,6, 6,6,6,6,6,6,6,6, 3,3,3,3,3,3,3,3, 7,7,7,7,7,7,7,7, 3,3,3,3,3,3,3,3, 2,2,2,2,2,2,2,2, 6,6,6,6,6,6,6,6, 4,4,4,4,4,4,4,
- 6, 6,6,6,6,6,6,6,6, 6,6,6,6,6,6,6,6, 3,3,3,3,3,3,3,3, 6,6,6,6,6,6,6,6, 3,3,3,3,3,3,3,3, 2,2,2,2,2,2,2,2, 6,6,6,6,6,6,6,6, 4,4,4,4,4,4,4,
- 6, 6,6,6,6,6,6,6,6, 6,6,6,6,6,6,6,6, 3,3,3,3,3,3,3,3, 6,6,6,6,6,6,6,6, 3,3,3,3,3,3,3,3, 2,2,2,2,2,2,2,2, 6,6,6,6,6,6,6,6, 4,4,4,4,4,4,4,
- 3, 3,3,6,6,6,6,6,6, 6,6,6,6,6,6,6,6, 3,3,3,3,3,3,3,3, 7,7,7,7,7,7,7,7, 3,3,3,3,3,3,3,3, 2,2,2,2,2,2,2,2, 6,6,6,6,6,6,6,6, 4,4,4,4,4,4,4,
- 3, 3,3,6,6,6,6,6,6, 6,6,6,6,6,6,6,6, 3,3,3,3,3,3,3,3, 7,7,7,7,7,7,7,7, 3,3,3,3,3,3,3,3, 2,2,2,2,2,2,2,2, 6,6,6,6,6,6,6,6, 4,4,4,4,4,4,4,
- 3, 3,3,6,6,6,6,6,6, 6,6,6,6,6,6,6,6, 3,3,3,3,3,3,3,3, 7,7,7,7,7,7,7,7, 3,3,3,3,3,3,3,3, 2,2,2,2,2,2,2,2, 6,6,6,6,6,6,6,6, 4,4,4,4,4,4,4,
-
- 6, 6,6,2,2,6,6,6,6, 6,6,6,6,6,6,6,6, 3,3,3,3,3,3,3,3, 7,7,7,7,7,7,7,7, 3,3,3,3,3,3,3,3, 2,2,2,2,2,2,2,2, 6,6,6,6,6,6,6,6, 4,4,4,4,4,4,4,
- 6, 6,6,2,2,6,6,6,6, 6,6,6,6,6,6,6,6, 3,3,3,3,3,3,3,3, 7,7,7,7,7,7,7,7, 3,3,3,3,3,3,3,3, 2,2,2,2,2,2,2,2, 6,6,6,6,6,6,6,6, 4,4,4,4,4,4,4,
- 6, 6,6,2,2,6,6,6,6, 6,6,6,6,6,6,6,6, 3,3,3,3,3,3,3,3, 7,7,7,7,7,7,7,7, 3,3,3,3,3,3,3,3, 2,2,2,2,2,2,2,2, 6,6,6,6,6,6,6,6, 4,4,4,4,4,4,4,
- 6, 6,6,2,2,6,6,6,6, 6,6,6,6,6,6,6,6, 3,3,3,3,3,3,3,3, 6,6,6,6,6,6,6,6, 3,3,3,3,3,3,3,3, 2,2,2,2,2,2,2,2, 6,6,6,6,6,6,6,6, 4,4,4,4,4,4,4,
- 6, 6,6,2,2,6,6,6,6, 6,6,6,6,6,6,6,6, 3,3,3,3,3,3,3,3, 6,6,6,6,6,6,6,6, 3,3,3,3,3,3,3,3, 2,2,2,2,2,2,2,2, 6,6,6,6,6,6,6,6, 4,4,4,4,4,4,4,
- 3, 3,3,2,2,6,6,6,6, 6,6,6,6,6,6,6,6, 3,3,3,3,3,3,3,3, 7,7,7,7,7,7,7,7, 3,3,3,3,3,3,3,3, 2,2,2,2,2,2,2,2, 6,6,6,6,6,6,6,6, 4,4,4,4,4,4,4,
- 3, 3,3,2,2,6,6,6,6, 6,6,6,6,6,6,6,6, 3,3,3,3,3,3,3,3, 7,7,7,7,7,7,7,7, 3,3,3,3,3,3,3,3, 2,2,2,2,2,2,2,2, 6,6,6,6,6,6,6,6, 4,4,4,4,4,4,4,
- 3, 3,3,2,2,6,6,6,6, 6,6,6,6,6,6,6,6, 3,3,3,3,3,3,3,3, 7,7,7,7,7,7,7,7, 3,3,3,3,3,3,3,3, 2,2,2,2,2,2,2,2, 6,6,6,6,6,6,6,6, 4,4,4,4,4,4,4,
-};
-
-uint32_t dai3wksi_state::screen_update_color(screen_device &screen, bitmap_rgb32 &bitmap, const rectangle &cliprect)
-{
- for (offs_t offs = 0; offs < m_videoram.bytes(); offs++)
- {
- uint8_t x = offs << 2;
- uint8_t y = offs >> 6;
- uint8_t data = m_videoram[offs];
- uint8_t color;
- int value = (x >> 2) + ((y >> 5) << 6) + 64 * 8 * (m_redterop ? 1 : 0);
-
- if (m_redscreen)
- {
- color = 0x02;
- }
- else
- {
- if (m_in2->read() & 0x03)
- color = vr_prom2[value];
- else
- color = vr_prom1[value];
- }
-
- for (int i = 0; i <= 3; i++)
- {
- rgb_t pen = (data & (1 << i)) ? m_palette->pen_color(color) : rgb_t::black();
-
- if (m_flipscreen)
- bitmap.pix(255-y, 255-x) = pen;
- else
- bitmap.pix(y, x) = pen;
-
- x++;
- }
- }
-
- return 0;
-}
-
-uint32_t dai3wksi_state::screen_update_bw(screen_device &screen, bitmap_rgb32 &bitmap, const rectangle &cliprect)
-{
- for (offs_t offs = 0; offs < m_videoram.bytes(); offs++)
- {
- uint8_t x = offs << 2;
- uint8_t y = offs >> 6;
- uint8_t data = m_videoram[offs];
-
- for (int i = 0; i <= 3; i++)
- {
- rgb_t pen = (data & (1 << i)) ? rgb_t::white() : rgb_t::black();
-
- if (m_flipscreen)
- bitmap.pix(255-y, 255-x) = pen;
- else
- bitmap.pix(y, x) = pen;
-
- x++;
- }
- }
-
- return 0;
-}
-
-/*************************************
- *
- * Audio system
- *
- *************************************/
-
-#define SAMPLE_SOUND1 0
-#define SAMPLE_SOUND2 1
-#define SAMPLE_SOUND3_1 2
-#define SAMPLE_SOUND3_2 3
-#define SAMPLE_SOUND4 4
-#define SAMPLE_SOUND5 5
-#define SAMPLE_SOUND6_1 6
-#define SAMPLE_SOUND6_2 7
-
-#define CHANNEL_SOUND1 0
-#define CHANNEL_SOUND2 1
-#define CHANNEL_SOUND3 2
-#define CHANNEL_SOUND4 3
-#define CHANNEL_SOUND5 4
-#define CHANNEL_SOUND6 5
-
-
-#if (USE_SAMPLES)
-void dai3wksi_state::audio_1_w(uint8_t data)
-{
- uint8_t rising_bits = data & ~m_port_last1;
-
- m_enabled_sound = data & 0x80;
-
- if ((rising_bits & 0x20) && m_enabled_sound)
- {
- if (data & 0x04)
- m_samples->start(CHANNEL_SOUND5, SAMPLE_SOUND5);
- else
- m_samples->start(CHANNEL_SOUND5, SAMPLE_SOUND5, true);
- }
- if (!(data & 0x20) && (m_port_last1 & 0x20))
- m_samples->stop(CHANNEL_SOUND5);
-
- m_port_last1 = data;
-}
-
-void dai3wksi_state::audio_2_w(uint8_t data)
-{
- uint8_t rising_bits = data & ~m_port_last2;
-
- m_flipscreen = data & 0x10;
- m_redscreen = ~data & 0x20;
- m_redterop = data & 0x40;
-
- if (m_enabled_sound)
- {
- if (rising_bits & 0x01) m_samples->start(CHANNEL_SOUND1, SAMPLE_SOUND1);
- if (rising_bits & 0x02) m_samples->start(CHANNEL_SOUND2, SAMPLE_SOUND2);
- if (rising_bits & 0x08) m_samples->start(CHANNEL_SOUND4, SAMPLE_SOUND4);
- if (rising_bits & 0x04)
- {
- if (!m_sound3_counter)
- m_samples->start(CHANNEL_SOUND3, SAMPLE_SOUND3_1);
- else
- m_samples->start(CHANNEL_SOUND3, SAMPLE_SOUND3_2);
-
- m_sound3_counter ^= 1;
- }
- }
-
- m_port_last2 = data;
-}
-
-void dai3wksi_state::audio_3_w(uint8_t data)
-{
- if (m_enabled_sound)
- {
- if (data & 0x40)
- m_samples->start(CHANNEL_SOUND6, SAMPLE_SOUND6_1);
- else if (data & 0x80)
- m_samples->start(CHANNEL_SOUND6, SAMPLE_SOUND6_2);
- }
-}
-
-
-static const char *const dai3wksi_sample_names[] =
-{
- "*dai3wksi",
- "1",
- "2",
- "3",
- "3-2",
- "4",
- "5",
- "6",
- "6-2",
- nullptr
-};
-
-
-#else
-
-void dai3wksi_state::audio_1_w(uint8_t data)
-{
- machine().sound().system_enable(data & 0x80);
-
- m_ic79->enable_w((~data >> 5) & 0x01); // invader movement enable
- m_ic79->envelope_1_w((~data >> 2) & 0x01); // invader movement envelope control
-}
-
-void dai3wksi_state::audio_2_w(uint8_t data)
-{
- m_flipscreen = data & 0x10;
- m_redscreen = ~data & 0x20;
- m_redterop = data & 0x40;
-
- m_ic77->enable_w((~data >> 0) & 0x01); // ship movement
- m_ic78->enable_w((~data >> 1) & 0x01); // danger text
- // ic76 - invader hit (~data >> 2) & 0x01
- m_ic80->enable_w((~data >> 3) & 0x01); // planet explosion
-}
-
-void dai3wksi_state::audio_3_w(uint8_t data)
-{
- m_ic81->enable_w((~data >> 2) & 0x01); // player shoot enable
- m_ic81->vco_w((~data >> 3) & 0x01); // player shoot vco control
-}
-
-#endif
-
-
-/*************************************
- *
- * Memory handlers
- *
- *************************************/
-
-void dai3wksi_state::main_map(address_map &map)
-{
- map(0x0000, 0x1bff).rom();
- map(0x2000, 0x23ff).ram();
- map(0x2400, 0x24ff).mirror(0x100).portr("IN0");
- map(0x2800, 0x28ff).mirror(0x100).portr("IN1");
- map(0x3000, 0x3000).w(FUNC(dai3wksi_state::audio_1_w));
- map(0x3400, 0x3400).w(FUNC(dai3wksi_state::audio_2_w));
- map(0x3800, 0x3800).w(FUNC(dai3wksi_state::audio_3_w));
- map(0x8000, 0xbfff).ram().share(m_videoram);
-}
-
-
-/*************************************
- *
- * Port definitions
- *
- *************************************/
-
-static INPUT_PORTS_START( dai3wksi )
- PORT_START("IN0")
- PORT_BIT( 0x01, IP_ACTIVE_HIGH, IPT_JOYSTICK_UP ) PORT_4WAY PORT_PLAYER(1)
- PORT_BIT( 0x02, IP_ACTIVE_HIGH, IPT_JOYSTICK_DOWN ) PORT_4WAY PORT_PLAYER(1)
- PORT_SERVICE( 0x04, IP_ACTIVE_HIGH )
- PORT_BIT( 0x08, IP_ACTIVE_HIGH, IPT_JOYSTICK_UP ) PORT_4WAY PORT_PLAYER(2)
- PORT_DIPNAME( 0x10, 0x00, "DIPSW #7" ) PORT_DIPLOCATION("SW1:7")
- PORT_DIPSETTING( 0x00, DEF_STR( Off ) )
- PORT_DIPSETTING( 0x10, DEF_STR( On ) )
- PORT_DIPNAME( 0x20, 0x00, "DIPSW #8" ) PORT_DIPLOCATION("SW1:8")
- PORT_DIPSETTING( 0x00, DEF_STR( Off ) )
- PORT_DIPSETTING( 0x20, DEF_STR( On ) )
- PORT_BIT( 0x40, IP_ACTIVE_HIGH, IPT_JOYSTICK_DOWN ) PORT_4WAY PORT_PLAYER(2)
- PORT_BIT( 0x80, IP_ACTIVE_HIGH, IPT_COIN1 )
-
- PORT_START("IN1")
- PORT_BIT( 0x01, IP_ACTIVE_HIGH, IPT_START2 )
- PORT_BIT( 0x02, IP_ACTIVE_HIGH, IPT_START1 )
- PORT_BIT( 0x04, IP_ACTIVE_HIGH, IPT_BUTTON1 ) PORT_PLAYER(2)
- PORT_BIT( 0x08, IP_ACTIVE_HIGH, IPT_JOYSTICK_RIGHT ) PORT_4WAY PORT_PLAYER(2)
- PORT_BIT( 0x10, IP_ACTIVE_HIGH, IPT_JOYSTICK_LEFT ) PORT_4WAY PORT_PLAYER(2)
- PORT_BIT( 0x20, IP_ACTIVE_HIGH, IPT_BUTTON1 ) PORT_PLAYER(1)
- PORT_BIT( 0x40, IP_ACTIVE_HIGH, IPT_JOYSTICK_RIGHT ) PORT_4WAY PORT_PLAYER(1)
- PORT_BIT( 0x80, IP_ACTIVE_HIGH, IPT_JOYSTICK_LEFT ) PORT_4WAY PORT_PLAYER(1)
-
- PORT_START("IN2")
- PORT_DIPNAME( 0x01, 0x00, "DIPSW #1" ) PORT_DIPLOCATION("SW1:1")
- PORT_DIPSETTING( 0x00, DEF_STR( Off ) )
- PORT_DIPSETTING( 0x01, DEF_STR( On ) )
- PORT_DIPNAME( 0x02, 0x00, "DIPSW #2" ) PORT_DIPLOCATION("SW1:2")
- PORT_DIPSETTING( 0x00, DEF_STR( Off ) )
- PORT_DIPSETTING( 0x02, DEF_STR( On ) )
- PORT_BIT( 0xfc, IP_ACTIVE_HIGH, IPT_UNKNOWN )
-INPUT_PORTS_END
-
-static INPUT_PORTS_START( warp1bl ) // the bootleg seems to expect active low
- PORT_START("IN0")
- PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_JOYSTICK_UP ) PORT_4WAY PORT_PLAYER(1)
- PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_JOYSTICK_DOWN ) PORT_4WAY PORT_PLAYER(1)
- PORT_SERVICE( 0x04, IP_ACTIVE_LOW )
- PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_JOYSTICK_UP ) PORT_4WAY PORT_PLAYER(2)
- PORT_DIPNAME( 0x10, 0x10, "DIPSW #7" ) PORT_DIPLOCATION("SW1:7")
- PORT_DIPSETTING( 0x10, DEF_STR( Off ) )
- PORT_DIPSETTING( 0x00, DEF_STR( On ) )
- PORT_DIPNAME( 0x20, 0x20, "Show High Scores" ) PORT_DIPLOCATION("SW1:8")
- PORT_DIPSETTING( 0x20, DEF_STR( Off ) )
- PORT_DIPSETTING( 0x00, DEF_STR( On ) )
- PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_JOYSTICK_DOWN ) PORT_4WAY PORT_PLAYER(2)
- PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_COIN1 )
-
- PORT_START("IN1")
- PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_START2 )
- PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_START1 )
- PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_BUTTON1 ) PORT_PLAYER(2)
- PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_JOYSTICK_RIGHT ) PORT_4WAY PORT_PLAYER(2)
- PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_JOYSTICK_LEFT ) PORT_4WAY PORT_PLAYER(2)
- PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_BUTTON1 ) PORT_PLAYER(1)
- PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_JOYSTICK_RIGHT ) PORT_4WAY PORT_PLAYER(1)
- PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_JOYSTICK_LEFT ) PORT_4WAY PORT_PLAYER(1)
-
- PORT_START("IN2")
- PORT_DIPNAME( 0x01, 0x01, "DIPSW #1" ) PORT_DIPLOCATION("SW1:1")
- PORT_DIPSETTING( 0x01, DEF_STR( Off ) )
- PORT_DIPSETTING( 0x00, DEF_STR( On ) )
- PORT_DIPNAME( 0x02, 0x02, "DIPSW #2" ) PORT_DIPLOCATION("SW1:2")
- PORT_DIPSETTING( 0x02, DEF_STR( Off ) )
- PORT_DIPSETTING( 0x00, DEF_STR( On ) )
- PORT_BIT( 0xfc, IP_ACTIVE_LOW, IPT_UNKNOWN )
-INPUT_PORTS_END
-
-/*************************************
- *
- * Machine drivers
- *
- *************************************/
-
-void dai3wksi_state::machine_start()
-{
- // Set up save state
- save_item(NAME(m_flipscreen));
- save_item(NAME(m_redscreen));
- save_item(NAME(m_redterop));
- save_item(NAME(m_port_last1));
- save_item(NAME(m_port_last2));
- save_item(NAME(m_enabled_sound));
- save_item(NAME(m_sound3_counter));
-}
-
-void dai3wksi_state::machine_reset()
-{
- m_port_last1 = 0;
- m_port_last2 = 0;
- m_enabled_sound = 0;
- m_sound3_counter = 0;
-}
-
-
-void dai3wksi_state::dai3wksi(machine_config &config)
-{
- // basic machine hardware
- Z80(config, m_maincpu, XTAL(10'000'000)/4);
- m_maincpu->set_addrmap(AS_PROGRAM, &dai3wksi_state::main_map);
- m_maincpu->set_vblank_int("screen", FUNC(dai3wksi_state::irq0_line_hold));
-
- // video hardware
- screen_device &screen(SCREEN(config, "screen", SCREEN_TYPE_RASTER));
- screen.set_size(256, 256);
- screen.set_visarea(4, 251, 8, 247);
- screen.set_refresh_hz(60);
- screen.set_screen_update(FUNC(dai3wksi_state::screen_update_color));
-
- PALETTE(config, m_palette, palette_device::BRG_3BIT);
-
- SPEAKER(config, "mono").front_center();
-
-#if (USE_SAMPLES)
- SAMPLES(config, m_samples);
- m_samples->set_channels(6);
- m_samples->set_samples_names(dai3wksi_sample_names);
- m_samples->add_route(ALL_OUTPUTS, "mono", 0.50);
-#else
- // Invader Hit
- sn76477_device &ic76(SN76477(config, "ic76"));
- ic76.set_noise_params(0, 0, 0);
- ic76.set_decay_res(RES_K(4.7));
- ic76.set_attack_params(CAP_U(0.1), RES_K(4.7));
- ic76.set_amp_res(RES_K(150));
- ic76.set_feedback_res(RES_K(47));
- ic76.set_vco_params(0, CAP_U(0.022), RES_K(33));
- ic76.set_pitch_voltage(5.0);
- ic76.set_slf_params(0, 0);
- ic76.set_oneshot_params(0, 0);
- ic76.set_vco_mode(0);
- ic76.set_mixer_params(0, 0, 0);
- ic76.set_envelope_params(0, 0);
- ic76.set_enable(0);
- ic76.add_route(ALL_OUTPUTS, "mono", 0.4);
-
- // Ship Movement
- SN76477(config, m_ic77);
- m_ic77->set_noise_params(0, 0, 0);
- m_ic77->set_decay_res(RES_K(4.7));
- m_ic77->set_attack_params(CAP_U(0.1), RES_K(4.7));
- m_ic77->set_amp_res(RES_K(150));
- m_ic77->set_feedback_res(RES_K(47));
- m_ic77->set_vco_params(0, 0, 0);
- m_ic77->set_pitch_voltage(0);
- m_ic77->set_slf_params(CAP_U(0.0022), RES_K(200));
- m_ic77->set_oneshot_params(CAP_U(10), RES_K(4.7));
- m_ic77->set_vco_mode(5);
- m_ic77->set_mixer_params(5, 0, 0);
- m_ic77->set_envelope_params(5, 0);
- m_ic77->set_enable(1);
- m_ic77->add_route(ALL_OUTPUTS, "mono", 0.4);
-
- // Danger
- SN76477(config, m_ic78);
- m_ic78->set_noise_params(RES_K(47), 0, 0);
- m_ic78->set_decay_res(RES_K(200));
- m_ic78->set_attack_params(CAP_U(0.1), RES_K(4.7));
- m_ic78->set_amp_res(RES_K(150));
- m_ic78->set_feedback_res(RES_K(47));
- m_ic78->set_vco_params(0, CAP_U(0.47), RES_K(75));
- m_ic78->set_pitch_voltage(5.0);
- m_ic78->set_slf_params(CAP_N(1), RES_K(47));
- m_ic78->set_oneshot_params(CAP_U(10), RES_K(22));
- m_ic78->set_vco_mode(5);
- m_ic78->set_mixer_params(0, 0, 0);
- m_ic78->set_envelope_params(5, 0);
- m_ic78->set_enable(1);
- m_ic78->add_route(ALL_OUTPUTS, "mono", 0.4);
-
- // Invader Marching Noise
- SN76477(config, m_ic79);
- m_ic79->set_noise_params(0, 0, 0);
- m_ic79->set_decay_res(RES_K(56));
- m_ic79->set_attack_params(CAP_U(0.1), RES_K(4.7));
- m_ic79->set_amp_res(RES_K(150));
- m_ic79->set_feedback_res(RES_K(47));
- m_ic79->set_vco_params(0, CAP_U(0.01), RES_K(100));
- m_ic79->set_pitch_voltage(5.0);
- m_ic79->set_slf_params(CAP_N(1), RES_K(150));
- m_ic79->set_oneshot_params(CAP_U(10), RES_K(22));
- m_ic79->set_vco_mode(5);
- m_ic79->set_mixer_params(0, 0, 0);
- m_ic79->set_envelope_params(5, 5);
- m_ic79->set_enable(1);
- m_ic79->add_route(ALL_OUTPUTS, "mono", 0.4);
-
- // Big Planet Explosion
- SN76477(config, m_ic80);
- m_ic80->set_noise_params(RES_K(47), RES_K(330), CAP_P(470));
- m_ic80->set_decay_res(RES_M(2));
- m_ic80->set_attack_params(CAP_U(1.0), RES_K(4.7));
- m_ic80->set_amp_res(RES_K(150));
- m_ic80->set_feedback_res(RES_K(47));
- m_ic80->set_vco_params(0, 0, 0);
- m_ic80->set_pitch_voltage(5.0);
- m_ic80->set_slf_params(0, 0);
- m_ic80->set_oneshot_params(CAP_U(10), RES_K(55));
- m_ic80->set_vco_mode(5);
- m_ic80->set_mixer_params(0, 5, 0);
- m_ic80->set_envelope_params(5, 0);
- m_ic80->set_enable(1);
- m_ic80->add_route(ALL_OUTPUTS, "mono", 0.4);
-
- // Plane Shoot noise
- SN76477(config, m_ic81);
- m_ic81->set_noise_params(0, 0, 0);
- m_ic81->set_decay_res(RES_K(200));
- m_ic81->set_attack_params(CAP_U(10), RES_K(4.7));
- m_ic81->set_amp_res(RES_K(150));
- m_ic81->set_feedback_res(RES_K(47));
- m_ic81->set_vco_params(2.5, CAP_U(0.01), RES_K(100));
- m_ic81->set_pitch_voltage(5.0);
- m_ic81->set_slf_params(CAP_N(0.47), RES_K(100));
- m_ic81->set_oneshot_params(CAP_U(10), RES_K(6.8));
- m_ic81->set_vco_mode(0);
- m_ic81->set_mixer_params(0, 5, 5);
- m_ic81->set_envelope_params(5, 0);
- m_ic81->set_enable(1);
- m_ic81->add_route(ALL_OUTPUTS, "mono", 0.4);
-#endif
-}
-
-void dai3wksi_state::warp1bl(machine_config &config)
-{
- dai3wksi(config);
-
- subdevice<screen_device>("screen")->set_screen_update(FUNC(dai3wksi_state::screen_update_bw));
-
- PALETTE(config.replace(), m_palette, palette_device::MONOCHROME);
-}
-
-/*************************************
- *
- * ROM definitions
- *
- *************************************/
-
-ROM_START( dai3wksi )
- ROM_REGION( 0x10000, "maincpu", 0 )
- ROM_LOAD( "tvg_13.6", 0x0000, 0x0800, CRC(8e8b40b1) SHA1(25b9223486dd348ea302e8e8f1d47c804a88b142) )
- ROM_LOAD( "tvg_14.7", 0x0800, 0x0800, CRC(d48cbabe) SHA1(64b571cd778fc7d67a5fa998a0defd36c04f111f) )
- ROM_LOAD( "tvg_15.8", 0x1000, 0x0800, CRC(cf44bd60) SHA1(61e0b3f9c4a1f9da1de57fb8276d4fc9e43b8f24) )
- ROM_LOAD( "tvg_16.9", 0x1800, 0x0400, CRC(ae723f56) SHA1(c25c27d6144533b2b2a888bfa8dbf48ed8d8b09a) )
-ROM_END
-
-ROM_START( warp1 )
- ROM_REGION( 0x10000, "maincpu", 0 )
- ROM_LOAD( "tvg_23.6", 0x0000, 0x0800, CRC(2025a316) SHA1(704798ec1d0039cb977396330801a625c8b02cff) )
- ROM_LOAD( "tvg_24.7", 0x0800, 0x0800, CRC(6cca323d) SHA1(e5dc4f09990c3f9e408e25e189a9355d7c021128) )
- ROM_LOAD( "tvg_25.8", 0x1000, 0x0800, CRC(5aa6eb1e) SHA1(ccf18d9618635c38747a57dad2214e6ca14c835d) )
- ROM_LOAD( "tvg_26.9", 0x1800, 0x0400, CRC(6bf25327) SHA1(ee9f635d70a97628ab82efa12efdb39349b52e2b) )
-ROM_END
-
-ROM_START( warp1bl )
- ROM_REGION( 0x10000, "maincpu", 0 )
- ROM_LOAD( "warp1_0.bin", 0x0000, 0x0400, CRC(d4383a9a) SHA1(eda0b388bd0adf22059f0848ce91fee889700f0c) )
- ROM_LOAD( "warp1_1.bin", 0x0400, 0x0400, CRC(6005eddc) SHA1(a06dbdbe3356eb011dbce756e6c76adef4c50beb) )
- ROM_LOAD( "warp1_2.bin", 0x0800, 0x0400, CRC(76ea7ebc) SHA1(60eb870f30aaf95589c7326ca6664974e39f3e27) )
- ROM_LOAD( "warp1_3.bin", 0x0c00, 0x0400, CRC(0c34ef33) SHA1(513fe5a875746d94d2ea0b7eed81ca0cf869c457) )
- ROM_LOAD( "warp1_4.bin", 0x1000, 0x0400, CRC(41ffad36) SHA1(479af4506f3637a95d2d41d04e1d66debb28da03) )
- ROM_LOAD( "warp1_5.bin", 0x1400, 0x0400, CRC(f67a1e1d) SHA1(aeb7b018889de4bd32ee8f65d8c0c32bbee07440) )
- ROM_LOAD( "warp1_6.bin", 0x1800, 0x0400, CRC(44e9327f) SHA1(aa217b0fbbef6a408231dc0dfedd94167c351c28) )
-ROM_END
-
-} // Anonymous namespace
-
-
-/*************************************
- *
- * Game drivers
- *
- *************************************/
-
-GAME( 1979, dai3wksi, 0, dai3wksi, dai3wksi, dai3wksi_state, empty_init, ROT270, "Sun Electronics", "Dai 3 Wakusei (Japan)", MACHINE_WRONG_COLORS | MACHINE_IMPERFECT_SOUND | MACHINE_SUPPORTS_SAVE )
-GAME( 1979, warp1, 0, dai3wksi, dai3wksi, dai3wksi_state, empty_init, ROT270, "Sun Electronics", "Warp-1 (Japan)", MACHINE_NOT_WORKING | MACHINE_WRONG_COLORS | MACHINE_IMPERFECT_SOUND | MACHINE_SUPPORTS_SAVE ) // protected? can be booted by skipping call to $04c8
-GAME( 1979, warp1bl, warp1, warp1bl, warp1bl, dai3wksi_state, empty_init, ROT270, "bootleg", "Warp-1 (Japan, bootleg)", MACHINE_WRONG_COLORS | MACHINE_IMPERFECT_SOUND | MACHINE_SUPPORTS_SAVE )