summaryrefslogblamecommitdiffstatshomepage
path: root/src/mame/drivers/dai3wksi.c
blob: 0725fafc40715cf41da69567415cd02b375cb7e0 (plain) (tree)
1
2
3
4
5
6
7
8
9






                          
 
        

































                                                                

                                   



                                           

                                                                                        

                   




                                             

                   



                                     








                                       



















































                                                                                                                                                
                                
 
                                                                                




                                
                                                                      




                                    
                                                              
                            
                                                                                                       
 
                                                

                                     


                    
                                                                             








                                                                              
                                                         


































                                                                           
                 

                                           

                                                                               
                                                        
 
                                             
 
                                                           



                                                                                
                                                                                
         
                                                           

                                                     
                                   



                                           

                                                                               
                                                        
 


                                                    
 
                                   





                                                                                                
                                                     



                                                                                          
                                                     


                 
                                   



                                           

                                                                               
 
                                   





























                                                                                  
     
 

                                           
                                                         
 
                                                            






                                                                                                      
 



                                                                               
 


                                                    








                                                                              
                                                         



















































































































































































                                                                                              
 







                                       
                                                   






                                                                     
                                                                                                                          

































                                                                                                                 






                                                                                                                 
                                                     










                                       
                                                                      
 
                               






                                                             



                                
                                                                      
 



                                    





                                                       


                                                     
 

                                    
 
                            




                                                
                                    
 
                                          

                 


                                                     
     


                                                  
 


                                                  
 


                                                  
 


                                                  
 


                                                  
 


                                                  
      























                                                                                                             
                                                                                                                                                                            
/*

-Galaxy Force
-Run Away
--------------------------
Dai San Wakusei Meteor
(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


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

*/

#include "emu.h"
#include "cpu/z80/z80.h"
#include "sound/samples.h"
#include "machine/rescap.h"
#include "sound/sn76477.h"

#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) { }

	/* video */
	UINT8 *     m_dai3wksi_videoram;
	size_t      m_dai3wksi_videoram_size;
	int         m_dai3wksi_flipscreen;
	int         m_dai3wksi_redscreen;
	int         m_dai3wksi_redterop;

	/* sound */
	UINT8       m_port_last1;
	UINT8       m_port_last2;
	int         m_enabled_sound;
	int         m_sound3_counter;
};


/*************************************
 *
 *  Video system
 *
 *************************************/

static const UINT8 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 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,
};


static void dai3wksi_get_pens(pen_t *pens)
{
	offs_t i;

	for (i = 0; i <= 7; i++)
	{
		pens[i] = MAKE_RGB(pal1bit(i >> 1), pal1bit(i >> 2), pal1bit(i >> 0));
	}
}


static SCREEN_UPDATE( dai3wksi )
{
	dai3wksi_state *state = screen->machine().driver_data<dai3wksi_state>();
	offs_t offs;
	pen_t pens[8];

	dai3wksi_get_pens(pens);

	for (offs = 0; offs < state->m_dai3wksi_videoram_size; offs++)
	{
		offs_t i;

		UINT8 x = offs << 2;
		UINT8 y = offs >> 6;
		UINT8 data = state->m_dai3wksi_videoram[offs];
		UINT8 color;
		int value = (x >> 2) + ((y >> 5) << 6) + 64 * 8 * (state->m_dai3wksi_redterop ? 1 : 0);

		if (state->m_dai3wksi_redscreen)
		{
			color = 0x02;
		}
		else
		{
			if (input_port_read(screen->machine(), "IN2") & 0x03)
				color = vr_prom2[value];
			else
				color = vr_prom1[value];
		}

		for (i = 0; i <= 3; i++)
		{
			pen_t pen = (data & (1 << i)) ? pens[color] : pens[0];

			if (state->m_dai3wksi_flipscreen)
				*BITMAP_ADDR32(bitmap, 255-y, 255-x) = pen;
			else
				*BITMAP_ADDR32(bitmap, 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)
static WRITE8_HANDLER( dai3wksi_audio_1_w )
{
	dai3wksi_state *state = space->machine().driver_data<dai3wksi_state>();
	device_t *samples = space->machine().device("samples");
	UINT8 rising_bits = data & ~state->m_port_last1;

	state->m_enabled_sound = data & 0x80;

	if ((rising_bits & 0x20) && state->m_enabled_sound)
	{
		if (data & 0x04)
			sample_start(samples, CHANNEL_SOUND5, SAMPLE_SOUND5, 0);
		else
			sample_start(samples, CHANNEL_SOUND5, SAMPLE_SOUND5, 1);
	}
	if (!(data & 0x20) && (state->m_port_last1 & 0x20))
		sample_stop(samples, CHANNEL_SOUND5);

	state->m_port_last1 = data;
}

static WRITE8_HANDLER( dai3wksi_audio_2_w )
{
	dai3wksi_state *state = space->machine().driver_data<dai3wksi_state>();
	device_t *samples = space->machine().device("samples");
	UINT8 rising_bits = data & ~state->m_port_last2;

	state->m_dai3wksi_flipscreen = data & 0x10;
	state->m_dai3wksi_redscreen  = ~data & 0x20;
	state->m_dai3wksi_redterop   = data & 0x40;

	if (state->m_enabled_sound)
	{
		if (rising_bits & 0x01) sample_start(samples, CHANNEL_SOUND1, SAMPLE_SOUND1, 0);
		if (rising_bits & 0x02) sample_start(samples, CHANNEL_SOUND2, SAMPLE_SOUND2, 0);
		if (rising_bits & 0x08) sample_start(samples, CHANNEL_SOUND4, SAMPLE_SOUND4, 0);
		if (rising_bits & 0x04)
		{
			if (!state->m_sound3_counter)
				sample_start(samples, CHANNEL_SOUND3, SAMPLE_SOUND3_1, 0);
			else
				sample_start(samples, CHANNEL_SOUND3, SAMPLE_SOUND3_2, 0);

			state->m_sound3_counter ^= 1;
		}
	}

	state->m_port_last2 = data;
}

static WRITE8_HANDLER( dai3wksi_audio_3_w )
{
	dai3wksi_state *state = space->machine().driver_data<dai3wksi_state>();
	device_t *samples = space->machine().device("samples");

	if (state->m_enabled_sound)
	{
		if (data & 0x40)
			sample_start(samples, CHANNEL_SOUND6, SAMPLE_SOUND6_1, 0);
		else if (data & 0x80)
			sample_start(samples, CHANNEL_SOUND6, SAMPLE_SOUND6_2, 0);
	}
}


static const char *const dai3wksi_sample_names[] =
{
	"*dai3wksi",
	"1.wav",
	"2.wav",
	"3.wav",
	"3-2.wav",
	"4.wav",
	"5.wav",
	"6.wav",
	"6-2.wav",
	0
};


static const samples_interface dai3wksi_samples_interface =
{
	6,	/* 6 channels */
	dai3wksi_sample_names
};

#else

static WRITE8_HANDLER( dai3wksi_audio_1_w )
{
	device_t *ic79 = space->machine().device("ic79");

	space->machine().sound().system_enable(data & 0x80);

	sn76477_enable_w(ic79, (~data >> 5) & 0x01);		/* invader movement enable */
	sn76477_envelope_1_w(ic79, (~data >> 2) & 0x01);	/* invader movement envelope control*/
}

static WRITE8_HANDLER( dai3wksi_audio_2_w )
{

	dai3wksi_state *state = space->machine().driver_data<dai3wksi_state>();
	device_t *ic77 = space->machine().device("ic77");
	device_t *ic78 = space->machine().device("ic78");
	device_t *ic80 = space->machine().device("ic80");

	state->m_dai3wksi_flipscreen =  data & 0x10;
	state->m_dai3wksi_redscreen  = ~data & 0x20;
	state->m_dai3wksi_redterop   =  data & 0x40;

	sn76477_enable_w(ic77, (~data >> 0) & 0x01);	/* ship movement */
	sn76477_enable_w(ic78, (~data >> 1) & 0x01);	/* danger text */
	/* ic76 - invader hit  (~data >> 2) & 0x01 */
	sn76477_enable_w(ic80, (~data >> 3) & 0x01);	/* planet explosion */
}

static WRITE8_HANDLER( dai3wksi_audio_3_w )
{
	device_t *ic81 = space->machine().device("ic81");

	sn76477_enable_w(ic81, (~data >> 2) & 0x01);	/* player shoot enable */
	sn76477_vco_w(ic81, (~data >> 3) & 0x01);		/* player shoot vco control */
}


/* Invader Hit */
static const sn76477_interface dai3wksi_sn76477_ic76 =
{
	0,				/*  4 noise_res (N/C)        */
	0,				/*  5 filter_res (N/C)       */
	0,				/*  6 filter_cap (N/C)       */
	RES_K(4.7),		/*  7 decay_res              */
	CAP_U(0.1),		/*  8 attack_decay_cap       */
	RES_K(4.7), 	/* 10 attack_res             */
	RES_K(150),		/* 11 amplitude_res          */
	RES_K(47),		/* 12 feedback_res           */
	0,				/* 16 vco_voltage (variable) */
	CAP_U(0.022),	/* 17 vco_cap                */
	RES_K(33),		/* 18 vco_res                */
	5.0,			/* 19 pitch_voltage          */
	0,				/* 20 slf_res (N/C)          */
	0,				/* 21 slf_cap (N/C)          */
	0,				/* 23 oneshot_cap (N/C)      */
	0,				/* 24 oneshot_res (N/C)      */
	0,				/* 22 vco                    */
	0,				/* 26 mixer A                */
	0,				/* 25 mixer B                */
	0,				/* 27 mixer C                */
	0,				/* 1  envelope 1             */
	0,				/* 28 envelope 2             */
	0				/* 9  enable                 */
};


/* Ship Movement */
static const sn76477_interface dai3wksi_sn76477_ic77 =
{
	0,				/*  4 noise_res (N/C)      */
	0,				/*  5 filter_res (N/C)     */
	0,				/*  6 filter_cap (N/C)     */
	RES_K(4.7),		/*  7 decay_res            */
	CAP_U(0.1),		/*  8 attack_decay_cap     */
	RES_K(4.7), 	/* 10 attack_res           */
	RES_K(150),		/* 11 amplitude_res        */
	RES_K(47),		/* 12 feedback_res         */
	0,				/* 16 vco_voltage (N/C)    */
	0,				/* 17 vco_cap (N/C)        */
	0,				/* 18 vco_res (N/C)        */
	0,				/* 19 pitch_voltage        */
	RES_K(200),		/* 20 slf_res              */
	CAP_U(0.0022),	/* 21 slf_cap              */
	CAP_U(10),		/* 23 oneshot_cap          */
	RES_K(4.7),		/* 24 oneshot_res          */
	5,				/* 22 vco                  */
	5,				/* 26 mixer A              */
	0,				/* 25 mixer B              */
	0,				/* 27 mixer C              */
	5,				/* 1  envelope 1           */
	0,				/* 28 envelope 2           */
	1				/* 9  enable (variable)    */
};


/* Danger */
static const sn76477_interface dai3wksi_sn76477_ic78 =
{
	RES_K(47),		/*  4 noise_res            */
	0,				/*  5 filter_res (N/C)     */
	0,				/*  6 filter_cap (N/C)     */
	RES_K(200),		/*  7 decay_res            */
	CAP_U(0.1),		/*  8 attack_decay_cap     */
	RES_K(4.7), 	/* 10 attack_res           */
	RES_K(150),		/* 11 amplitude_res        */
	RES_K(47),		/* 12 feedback_res         */
	0,				/* 16 vco_voltage (N/C)    */
	CAP_U(0.47),	/* 17 vco_cap              */
	RES_K(75),		/* 18 vco_res              */
	5.0,			/* 19 pitch_voltage        */
	RES_K(47),		/* 20 slf_res              */
	CAP_N(1),		/* 21 slf_cap              */
	CAP_U(10),		/* 23 oneshot_cap          */
	RES_K(22),		/* 24 oneshot_res          */
	5,				/* 22 vco                  */
	0,				/* 26 mixer A              */
	0,				/* 25 mixer B              */
	0,				/* 27 mixer C              */
	5,				/* 1  envelope 1           */
	0,				/* 28 envelope 2           */
	1				/* 9  enable (variable)    */
};


/* Invader Marching Noise */
static const sn76477_interface dai3wksi_sn76477_ic79 =
{
	0,				/*  4 noise_res (N/C)      */
	0,				/*  5 filter_res (N/C)     */
	0,				/*  6 filter_cap (N/C)     */
	RES_K(56),		/*  7 decay_res            */
	CAP_U(0.1),		/*  8 attack_decay_cap     */
	RES_K(4.7), 	/* 10 attack_res           */
	RES_K(150),		/* 11 amplitude_res        */
	RES_K(47),		/* 12 feedback_res         */
	0,				/* 16 vco_voltage (N/C)    */
	CAP_U(0.01),	/* 17 vco_cap              */
	RES_K(100),		/* 18 vco_res              */
	5.0,			/* 19 pitch_voltage        */
	RES_K(150),		/* 20 slf_res              */
	CAP_N(1),		/* 21 slf_cap              */
	CAP_U(10),		/* 23 oneshot_cap          */
	RES_K(22),		/* 24 oneshot_res          */
	5,				/* 22 vco                  */
	0,				/* 26 mixer A              */
	0,				/* 25 mixer B              */
	0,				/* 27 mixer C              */
	5,				/* 1  envelope 1 (variable)*/
	5,				/* 28 envelope 2           */
	1				/* 9  enable (variable)    */
};


/* Big Planet Explosion */
static const sn76477_interface dai3wksi_sn76477_ic80 =
{
	RES_K(47),		/*  4 noise_res            */
	RES_K(330),		/*  5 filter_res           */
	CAP_P(470),		/*  6 filter_cap           */
	RES_M(2),		/*  7 decay_res            */
	CAP_U(1),		/*  8 attack_decay_cap     */
	RES_K(4.7), 	/* 10 attack_res           */
	RES_K(150),		/* 11 amplitude_res        */
	RES_K(47),		/* 12 feedback_res         */
	0,				/* 16 vco_voltage (N/C)    */
	0,				/* 17 vco_cap (N/C)        */
	0,				/* 18 vco_res (N/C)        */
	5.0,			/* 19 pitch_voltage        */
	0,				/* 20 slf_res (N/C)        */
	0,				/* 21 slf_cap (N/C)        */
	CAP_U(10),		/* 23 oneshot_cap          */
	RES_K(55),		/* 24 oneshot_res          */
	5,				/* 22 vco                  */
	0,				/* 26 mixer A              */
	5,				/* 25 mixer B              */
	0,				/* 27 mixer C              */
	5,				/* 1  envelope 1           */
	0,				/* 28 envelope 2           */
	1				/* 9  enable (variable)    */
};


/* Plane Shoot noise */
static const sn76477_interface dai3wksi_sn76477_ic81 =
{
	0,				/*  4 noise_res (N/C)      */
	0,				/*  5 filter_res (N/C)     */
	0,				/*  6 filter_cap (N/C)     */
	RES_K(200),		/*  7 decay_res            */
	CAP_U(10),		/*  8 attack_decay_cap     */
	RES_K(4.7), 	/* 10 attack_res           */
	RES_K(150),		/* 11 amplitude_res        */
	RES_K(47),		/* 12 feedback_res         */
	2.5,			/* 16 vco_voltage    */
	CAP_U(0.01),	/* 17 vco_cap              */
	RES_K(100),		/* 18 vco_res              */
	5.0,			/* 19 pitch_voltage        */
	RES_K(100),		/* 20 slf_res              */
	CAP_N(0.47),	/* 21 slf_cap              */
	CAP_U(10),		/* 23 oneshot_cap          */
	RES_K(6.8),		/* 24 oneshot_res          */
	0,				/* 22 vco (variable)       */
	0,				/* 26 mixer A              */
	5,				/* 25 mixer B              */
	5,				/* 27 mixer C              */
	5,				/* 1  envelope 1           */
	0,				/* 28 envelope 2           */
	1				/* 9  enable (variable)    */
};

#endif



/*************************************
 *
 *  Memory handlers
 *
 *************************************/

static ADDRESS_MAP_START( main_map, AS_PROGRAM, 8 )
	AM_RANGE(0x0000, 0x1bff) AM_ROM
	AM_RANGE(0x2000, 0x23ff) AM_RAM
	AM_RANGE(0x2400, 0x24ff) AM_MIRROR(0x100) AM_READ_PORT("IN0")
	AM_RANGE(0x2800, 0x28ff) AM_MIRROR(0x100) AM_READ_PORT("IN1")
	AM_RANGE(0x3000, 0x3000) AM_WRITE(dai3wksi_audio_1_w)
	AM_RANGE(0x3400, 0x3400) AM_WRITE(dai3wksi_audio_2_w)
	AM_RANGE(0x3800, 0x3800) AM_WRITE(dai3wksi_audio_3_w)
	AM_RANGE(0x8000, 0xbfff) AM_RAM AM_BASE_SIZE_MEMBER(dai3wksi_state, m_dai3wksi_videoram, m_dai3wksi_videoram_size)
ADDRESS_MAP_END


/*************************************
 *
 *  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


/*************************************
 *
 *  Machine drivers
 *
 *************************************/

static MACHINE_START( dai3wksi )
{
	dai3wksi_state *state = machine.driver_data<dai3wksi_state>();

	/* Set up save state */
	state->save_item(NAME(state->m_dai3wksi_flipscreen));
	state->save_item(NAME(state->m_dai3wksi_redscreen));
	state->save_item(NAME(state->m_dai3wksi_redterop));
	state->save_item(NAME(state->m_port_last1));
	state->save_item(NAME(state->m_port_last2));
	state->save_item(NAME(state->m_enabled_sound));
	state->save_item(NAME(state->m_sound3_counter));
}

static MACHINE_RESET( dai3wksi )
{
	dai3wksi_state *state = machine.driver_data<dai3wksi_state>();

	state->m_port_last1 = 0;
	state->m_port_last2 = 0;
	state->m_enabled_sound = 0;
	state->m_sound3_counter = 0;
}


static MACHINE_CONFIG_START( dai3wksi, dai3wksi_state )

	/* basic machine hardware */
	MCFG_CPU_ADD("maincpu", Z80, XTAL_10MHz/4)
	MCFG_CPU_PROGRAM_MAP(main_map)
	MCFG_CPU_VBLANK_INT("screen", irq0_line_hold)

	MCFG_MACHINE_START(dai3wksi)
	MCFG_MACHINE_RESET(dai3wksi)

	/* video hardware */
	MCFG_SCREEN_ADD("screen", RASTER)
	MCFG_SCREEN_FORMAT(BITMAP_FORMAT_RGB32)
	MCFG_SCREEN_SIZE(256, 256)
	MCFG_SCREEN_VISIBLE_AREA(4, 251, 8, 247)
	MCFG_SCREEN_REFRESH_RATE(60)
	MCFG_SCREEN_UPDATE(dai3wksi)

	MCFG_SPEAKER_STANDARD_MONO("mono")

#if (USE_SAMPLES)
	MCFG_SOUND_ADD("samples", SAMPLES, 0)
	MCFG_SOUND_CONFIG(dai3wksi_samples_interface)
	MCFG_SOUND_ROUTE(ALL_OUTPUTS, "mono", 0.50)
#else
	MCFG_SOUND_ADD("ic76", SN76477, 0)
	MCFG_SOUND_CONFIG(dai3wksi_sn76477_ic76)
	MCFG_SOUND_ROUTE(ALL_OUTPUTS, "mono", 0.4)

	MCFG_SOUND_ADD("ic77", SN76477, 0)
	MCFG_SOUND_CONFIG(dai3wksi_sn76477_ic77)
	MCFG_SOUND_ROUTE(ALL_OUTPUTS, "mono", 0.4)

	MCFG_SOUND_ADD("ic78", SN76477, 0)
	MCFG_SOUND_CONFIG(dai3wksi_sn76477_ic78)
	MCFG_SOUND_ROUTE(ALL_OUTPUTS, "mono", 0.4)

	MCFG_SOUND_ADD("ic79", SN76477, 0)
	MCFG_SOUND_CONFIG(dai3wksi_sn76477_ic79)
	MCFG_SOUND_ROUTE(ALL_OUTPUTS, "mono", 0.4)

	MCFG_SOUND_ADD("ic80", SN76477, 0)
	MCFG_SOUND_CONFIG(dai3wksi_sn76477_ic80)
	MCFG_SOUND_ROUTE(ALL_OUTPUTS, "mono", 0.4)

	MCFG_SOUND_ADD("ic81", SN76477, 0)
	MCFG_SOUND_CONFIG(dai3wksi_sn76477_ic81)
	MCFG_SOUND_ROUTE(ALL_OUTPUTS, "mono", 0.4)
#endif
MACHINE_CONFIG_END


/*************************************
 *
 *  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


/*************************************
 *
 *  Game drivers
 *
 *************************************/

GAME( 1979, dai3wksi, 0, dai3wksi, dai3wksi, 0, ROT270, "Sun Electronics", "Dai San Wakusei Meteor (Japan)", GAME_WRONG_COLORS | GAME_IMPERFECT_SOUND | GAME_SUPPORTS_SAVE )