1 // license:BSD-3-Clause
2 // copyright-holders:Mirko Buffoni
3 /***************************************************************************
4 
5 Son Son memory map (preliminary)
6 
7 driver by Mirko Buffoni
8 
9 
10 MAIN CPU:
11 
12 0000-0fff RAM
13 1000-13ff Video RAM
14 1400-17ff Color RAM
15 2020-207f Sprites
16 4000-ffff ROM
17 
18 read:
19 3002      IN0
20 3003      IN1
21 3004      IN2
22 3005      DSW0
23 3006      DSW1
24 
25 write:
26 3000      horizontal scroll
27 3008      watchdog reset
28 3018      flipscreen (inverted)
29 3010      command for the audio CPU
30 3019      trigger FIRQ on audio CPU
31 
32 
33 SOUND CPU:
34 0000-07ff RAM
35 e000-ffff ROM
36 
37 read:
38 a000      command from the main CPU
39 
40 write:
41 2000      8910 #1 control
42 2001      8910 #1 write
43 4000      8910 #2 control
44 4001      8910 #2 write
45 
46 TODO:
47 
48 - Fix Service Mode Output Test: press p1/p2 shot to insert coin
49 - Flip Screen DIP is noted in service manual and added to DIP LOCATIONS, but not working.
50 
51 ***************************************************************************/
52 
53 #include "emu.h"
54 #include "includes/sonson.h"
55 
56 #include "cpu/m6809/m6809.h"
57 #include "machine/74259.h"
58 #include "machine/gen_latch.h"
59 #include "sound/ay8910.h"
60 #include "screen.h"
61 #include "speaker.h"
62 
63 
WRITE_LINE_MEMBER(sonson_state::sh_irqtrigger_w)64 WRITE_LINE_MEMBER(sonson_state::sh_irqtrigger_w)
65 {
66 	// setting bit 0 low then high triggers IRQ on the sound CPU
67 	if (state)
68 		m_audiocpu->set_input_line(M6809_FIRQ_LINE, HOLD_LINE);
69 }
70 
WRITE_LINE_MEMBER(sonson_state::coin1_counter_w)71 WRITE_LINE_MEMBER(sonson_state::coin1_counter_w)
72 {
73 	machine().bookkeeping().coin_counter_w(0, state);
74 }
75 
WRITE_LINE_MEMBER(sonson_state::coin2_counter_w)76 WRITE_LINE_MEMBER(sonson_state::coin2_counter_w)
77 {
78 	machine().bookkeeping().coin_counter_w(1, state);
79 }
80 
main_map(address_map & map)81 void sonson_state::main_map(address_map &map)
82 {
83 	map(0x0000, 0x0fff).ram();
84 	map(0x1000, 0x13ff).ram().w(FUNC(sonson_state::sonson_videoram_w)).share("videoram");
85 	map(0x1400, 0x17ff).ram().w(FUNC(sonson_state::sonson_colorram_w)).share("colorram");
86 	map(0x2020, 0x207f).ram().share("spriteram");
87 	map(0x3000, 0x3000).w(FUNC(sonson_state::sonson_scrollx_w));
88 	map(0x3002, 0x3002).portr("P1");
89 	map(0x3003, 0x3003).portr("P2");
90 	map(0x3004, 0x3004).portr("SYSTEM");
91 	map(0x3005, 0x3005).portr("DSW1");
92 	map(0x3006, 0x3006).portr("DSW2");
93 	map(0x3008, 0x3008).nopw();    // might be Y scroll, but the game always sets it to 0
94 	map(0x3010, 0x3010).w("soundlatch", FUNC(generic_latch_8_device::write));
95 	map(0x3018, 0x301f).w("mainlatch", FUNC(ls259_device::write_d0));
96 	map(0x4000, 0xffff).rom();
97 }
98 
sound_map(address_map & map)99 void sonson_state::sound_map(address_map &map)
100 {
101 	map(0x0000, 0x07ff).ram();
102 	map(0x2000, 0x2001).w("ay1", FUNC(ay8910_device::address_data_w));
103 	map(0x4000, 0x4001).w("ay2", FUNC(ay8910_device::address_data_w));
104 	map(0xa000, 0xa000).r("soundlatch", FUNC(generic_latch_8_device::read));
105 	map(0xe000, 0xffff).rom();
106 }
107 
108 
109 
110 static INPUT_PORTS_START( sonson )
111 	PORT_START("P1")
112 	PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_BUTTON1 )
113 	PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_UNKNOWN )    /* probably unused */
114 	PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_JOYSTICK_LEFT ) PORT_4WAY
115 	PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_JOYSTICK_RIGHT ) PORT_4WAY
116 	PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_JOYSTICK_UP ) PORT_4WAY
117 	PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_JOYSTICK_DOWN ) PORT_4WAY
118 	PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_UNKNOWN )    /* probably unused */
119 	PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_UNKNOWN )    /* probably unused */
120 
121 	PORT_START("P2")
122 	PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_BUTTON1 ) PORT_PLAYER(2)
123 	PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_UNKNOWN )    /* probably unused */
124 	PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_JOYSTICK_LEFT ) PORT_4WAY PORT_PLAYER(2)
125 	PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_JOYSTICK_RIGHT ) PORT_4WAY PORT_PLAYER(2)
126 	PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_JOYSTICK_UP ) PORT_4WAY PORT_PLAYER(2)
127 	PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_JOYSTICK_DOWN ) PORT_4WAY PORT_PLAYER(2)
128 	PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_UNKNOWN )    /* probably unused */
129 	PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_UNKNOWN )    /* probably unused */
130 
131 	PORT_START("SYSTEM")
132 	PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_START1 )
133 	PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_START2 )
134 	PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_UNKNOWN )    /* probably unused */
135 	PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_UNKNOWN )    /* probably unused */
136 	PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_COIN1 )
137 	PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_COIN2 )
138 	PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_UNKNOWN )    /* probably unused */
139 	PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_UNKNOWN )    /* probably unused */
140 
141 	PORT_START("DSW1")
142 	PORT_DIPNAME( 0x0f, 0x0f, DEF_STR( Coinage ) )  PORT_DIPLOCATION("SW1:1,2,3,4")
143 	PORT_DIPSETTING(    0x02, DEF_STR( 4C_1C ) )
144 	PORT_DIPSETTING(    0x05, DEF_STR( 3C_1C ) )
145 	PORT_DIPSETTING(    0x08, DEF_STR( 2C_1C ) )
146 	PORT_DIPSETTING(    0x04, DEF_STR( 3C_2C ) )
147 	PORT_DIPSETTING(    0x01, DEF_STR( 4C_3C ) )
148 	PORT_DIPSETTING(    0x0f, DEF_STR( 1C_1C ) )
149 	PORT_DIPSETTING(    0x03, DEF_STR( 3C_4C ) )
150 	PORT_DIPSETTING(    0x07, DEF_STR( 2C_3C ) )
151 	PORT_DIPSETTING(    0x0e, DEF_STR( 1C_2C ) )
152 	PORT_DIPSETTING(    0x06, DEF_STR( 2C_5C ) )
153 	PORT_DIPSETTING(    0x0d, DEF_STR( 1C_3C ) )
154 	PORT_DIPSETTING(    0x0c, DEF_STR( 1C_4C ) )
155 	PORT_DIPSETTING(    0x0b, DEF_STR( 1C_5C ) )
156 	PORT_DIPSETTING(    0x0a, DEF_STR( 1C_6C ) )
157 	PORT_DIPSETTING(    0x09, DEF_STR( 1C_7C ) )
158 	PORT_DIPSETTING(    0x00, DEF_STR( Free_Play ) )
159 	PORT_DIPNAME( 0x10, 0x10, "Coinage affects" ) PORT_DIPLOCATION("SW1:5")  /* Not documented in manual */
160 	PORT_DIPSETTING(    0x10, DEF_STR( Coin_A ) )
161 	PORT_DIPSETTING(    0x00, DEF_STR( Coin_B ) )
162 	PORT_DIPNAME( 0x20, 0x00, DEF_STR( Demo_Sounds ) ) PORT_DIPLOCATION("SW1:6")
163 	PORT_DIPSETTING(    0x20, DEF_STR( Off ) )
164 	PORT_DIPSETTING(    0x00, DEF_STR( On ) )
165 	PORT_SERVICE( 0x40, IP_ACTIVE_LOW ) PORT_DIPLOCATION("SW1:7")
166 		PORT_DIPNAME( 0x80, 0x80, DEF_STR( Flip_Screen )) PORT_DIPLOCATION("SW1:8")
167 	PORT_DIPSETTING(    0x80, DEF_STR( Off ) )
168 	PORT_DIPSETTING(    0x00, DEF_STR( On ) )
169 
170 	PORT_START("DSW2")
171 	PORT_DIPNAME( 0x03, 0x03, DEF_STR( Lives ) ) PORT_DIPLOCATION("SW2:1,2")
172 	PORT_DIPSETTING(    0x03, "3" )
173 	PORT_DIPSETTING(    0x02, "4" )
174 	PORT_DIPSETTING(    0x01, "5" )
175 	PORT_DIPSETTING(    0x00, "7" )
176 	PORT_DIPNAME( 0x04, 0x00, "2 Players Game" ) PORT_DIPLOCATION("SW2:3")  /* Not documented in manual */
177 	PORT_DIPSETTING(    0x04, "1 Credit" )
178 	PORT_DIPSETTING(    0x00, "2 Credits" )
179 	PORT_DIPNAME( 0x18, 0x08, DEF_STR( Bonus_Life ) ) PORT_DIPLOCATION("SW2:4,5")
180 	PORT_DIPSETTING(    0x08, "20000 80000 100000" )
181 	PORT_DIPSETTING(    0x00, "30000 90000 120000" )
182 	PORT_DIPSETTING(    0x18, "20000" )
183 	PORT_DIPSETTING(    0x10, "30000" )
184 	PORT_DIPNAME( 0x60, 0x40, DEF_STR( Difficulty ) ) PORT_DIPLOCATION("SW2:6,7")
185 	PORT_DIPSETTING(    0x60, DEF_STR( Easy ) )
186 	PORT_DIPSETTING(    0x40, DEF_STR( Normal ) )
187 	PORT_DIPSETTING(    0x20, DEF_STR( Hard ) )
188 	PORT_DIPSETTING(    0x00, DEF_STR( Very_Hard ) )
189 	PORT_DIPNAME( 0x80, 0x80, "Freeze" ) PORT_DIPLOCATION("SW2:8")
190 	PORT_DIPSETTING(    0x80, DEF_STR( Off ) )
191 	PORT_DIPSETTING(    0x00, DEF_STR( On ) )
192 INPUT_PORTS_END
193 
194 
195 
196 static const gfx_layout charlayout =
197 {
198 	8,8,
199 	RGN_FRAC(1,2),
200 	2,
201 	{ RGN_FRAC(1,2), RGN_FRAC(0,2) },
202 	{ 0, 1, 2, 3, 4, 5, 6, 7 },
203 	{ 0*8, 1*8, 2*8, 3*8, 4*8, 5*8, 6*8, 7*8 },
204 	8*8
205 };
206 
207 static const gfx_layout spritelayout =
208 {
209 	16,16,
210 	RGN_FRAC(1,3),
211 	3,
212 	{ RGN_FRAC(2,3), RGN_FRAC(1,3), RGN_FRAC(0,3) },
213 	{ 8*16+7, 8*16+6, 8*16+5, 8*16+4, 8*16+3, 8*16+2, 8*16+1, 8*16+0,
214 			7, 6, 5, 4, 3, 2, 1, 0 },
215 	{ 0*8, 1*8, 2*8, 3*8, 4*8, 5*8, 6*8, 7*8,
216 			8*8, 9*8, 10*8, 11*8, 12*8, 13*8, 14*8, 15*8 },
217 	32*8
218 };
219 
220 static GFXDECODE_START( gfx_sonson )
221 	GFXDECODE_ENTRY( "gfx1", 0, charlayout,      0, 64 )
222 	GFXDECODE_ENTRY( "gfx2", 0, spritelayout, 64*4, 32 )
223 GFXDECODE_END
224 
225 
226 
227 
sonson(machine_config & config)228 void sonson_state::sonson(machine_config &config)
229 {
230 	/* basic machine hardware */
231 	MC6809(config, m_maincpu, XTAL(12'000'000)/2); // HD68B09P (/4 internally)
232 	m_maincpu->set_addrmap(AS_PROGRAM, &sonson_state::main_map);
233 	m_maincpu->set_vblank_int("screen", FUNC(sonson_state::irq0_line_hold));
234 
235 	MC6809(config, m_audiocpu, XTAL(12'000'000)/2); // HD68B09P (/4 internally)
236 	m_audiocpu->set_addrmap(AS_PROGRAM, &sonson_state::sound_map);
237 	m_audiocpu->set_periodic_int(FUNC(sonson_state::irq0_line_hold), attotime::from_hz(4*60));    /* FIRQs are triggered by the main CPU */
238 
239 	ls259_device &mainlatch(LS259(config, "mainlatch")); // A9
240 	mainlatch.q_out_cb<0>().set(FUNC(sonson_state::flipscreen_w));
241 	mainlatch.q_out_cb<1>().set(FUNC(sonson_state::sh_irqtrigger_w));
242 	mainlatch.q_out_cb<6>().set(FUNC(sonson_state::coin2_counter_w));
243 	mainlatch.q_out_cb<7>().set(FUNC(sonson_state::coin1_counter_w));
244 
245 	/* video hardware */
246 	screen_device &screen(SCREEN(config, "screen", SCREEN_TYPE_RASTER));
247 	screen.set_refresh_hz(57.37);
248 	screen.set_size(32*8, 32*8);
249 	screen.set_visarea(1*8, 31*8-1, 1*8, 31*8-1);
250 	screen.set_screen_update(FUNC(sonson_state::screen_update_sonson));
251 	screen.set_palette(m_palette);
252 
253 	GFXDECODE(config, m_gfxdecode, m_palette, gfx_sonson);
254 
255 	PALETTE(config, m_palette, FUNC(sonson_state::sonson_palette), 64*4 + 32*8, 32);
256 
257 	/* sound hardware */
258 	SPEAKER(config, "mono").front_center();
259 
260 	GENERIC_LATCH_8(config, "soundlatch");
261 
262 	AY8910(config, "ay1", XTAL(12'000'000)/8).add_route(ALL_OUTPUTS, "mono", 0.30);   /* 1.5 MHz */
263 
264 	AY8910(config, "ay2", XTAL(12'000'000)/8).add_route(ALL_OUTPUTS, "mono", 0.30);   /* 1.5 MHz */
265 }
266 
267 
268 
269 /***************************************************************************
270 
271   Game driver(s)
272 
273 ***************************************************************************/
274 
275 ROM_START( sonson )
276 	ROM_REGION( 0x10000, "maincpu", 0 ) /* 64k for code + 3*16k for the banked ROMs images */
277 	ROM_LOAD( "ss.01e",       0x4000, 0x4000, CRC(cd40cc54) SHA1(4269586099638d31dd30381e94538701982e9f5a) )
278 	ROM_LOAD( "ss.02e",       0x8000, 0x4000, CRC(c3476527) SHA1(499b879a12b55443ec833e5a2819e9da20e3b033) )
279 	ROM_LOAD( "ss.03e",       0xc000, 0x4000, CRC(1fd0e729) SHA1(e04215b0c3d11ce844ab250ff3e1a845dd0b6c3e) )
280 
281 	ROM_REGION( 0x10000, "audiocpu", 0 )
282 	ROM_LOAD( "ss_6.c11",     0xe000, 0x2000, CRC(1135c48a) SHA1(bfc10363fc42fb589088675a6e8e3d1668d8a6b8) )
283 
284 	ROM_REGION( 0x04000, "gfx1", 0 )
285 	ROM_LOAD( "ss_7.b6",      0x00000, 0x2000, CRC(990890b1) SHA1(0ae5da75e8ff013d32f2a6e3a015d5e1623fbb19) )   /* characters */
286 	ROM_LOAD( "ss_8.b5",      0x02000, 0x2000, CRC(9388ff82) SHA1(31ff5e61d062262754bbf6763d094495c1d2e838) )
287 
288 	ROM_REGION( 0x0c000, "gfx2", 0 )
289 	ROM_LOAD( "ss_9.m5",      0x00000, 0x2000, CRC(8cb1cacf) SHA1(41b479dae84176ceb4eacb30b4dad58b7767606e) )   /* sprites */
290 	ROM_LOAD( "ss_10.m6",     0x02000, 0x2000, CRC(f802815e) SHA1(968145680483620cb0c9e7c00b4927aeace99e0c) )
291 	ROM_LOAD( "ss_11.m3",     0x04000, 0x2000, CRC(4dbad88a) SHA1(721612555714e116564d2b301cfa04980d21ad3b) )
292 	ROM_LOAD( "ss_12.m4",     0x06000, 0x2000, CRC(aa05e687) SHA1(4988d540e3deb9107f0448cd8ef47fa73ec926fe) )
293 	ROM_LOAD( "ss_13.m1",     0x08000, 0x2000, CRC(66119bfa) SHA1(73790be24287d8136c844b26cf36a679e489a37b) )
294 	ROM_LOAD( "ss_14.m2",     0x0a000, 0x2000, CRC(e14ef54e) SHA1(69ab42defff2cb91c6e07ea8805f64868a028630) )
295 
296 	ROM_REGION( 0x0340, "proms", 0 )
297 	ROM_LOAD( "ssb4.b2",      0x0000, 0x0020, CRC(c8eaf234) SHA1(d39dfab6dcad6b0a719c466b5290d2d081e4b58d) )    /* red/green component */
298 	ROM_LOAD( "ssb5.b1",      0x0020, 0x0020, CRC(0e434add) SHA1(238c281813d6079b9ae877bd0ced33abbbe39442) )    /* blue component */
299 	ROM_LOAD( "ssb2.c4",      0x0040, 0x0100, CRC(c53321c6) SHA1(439d98a98cdf2118b887c725a7759a98e2c377d9) )    /* character lookup table */
300 	ROM_LOAD( "ssb3.h7",      0x0140, 0x0100, CRC(7d2c324a) SHA1(3dcf09bd3f58bddb9760183d2c1b0fe5d77536ea) )    /* sprite lookup table */
301 	ROM_LOAD( "ssb1.k11",     0x0240, 0x0100, CRC(a04b0cfe) SHA1(89ab33c6b0aa313ebda2f11516cea667a9951a81) )    /* unknown (not used) */
302 ROM_END
303 
304 ROM_START( sonsonj )
305 	ROM_REGION( 0x10000, "maincpu", 0 ) /* 64k for code + 3*16k for the banked ROMs images */
306 	ROM_LOAD( "ss_0.l9",      0x4000, 0x2000, CRC(705c168f) SHA1(28d3b186cd0b927d96664051fb759b64ecc18908) )
307 	ROM_LOAD( "ss_1.j9",      0x6000, 0x2000, CRC(0f03b57d) SHA1(7d14a88f43952d5c4df2951a5b62e399ba5ef37b) )
308 	ROM_LOAD( "ss_2.l8",      0x8000, 0x2000, CRC(a243a15d) SHA1(a736a163fbb20fa0e318f53ccf29d155b6f77781) )
309 	ROM_LOAD( "ss_3.j8",      0xa000, 0x2000, CRC(cb64681a) SHA1(f902e462df34016a28a5d7705294e31c9185135a) )
310 	ROM_LOAD( "ss_4.l7",      0xc000, 0x2000, CRC(4c3e9441) SHA1(4316bf4ada6598dd7a7b089f2720b1e1d59123be) )
311 	ROM_LOAD( "ss_5.j7",      0xe000, 0x2000, CRC(847f660c) SHA1(33fe54622765ca68992d22b2d62778a027db1719) )
312 
313 	ROM_REGION( 0x10000, "audiocpu", 0 )
314 	ROM_LOAD( "ss_6.c11",     0xe000, 0x2000, CRC(1135c48a) SHA1(bfc10363fc42fb589088675a6e8e3d1668d8a6b8) )
315 
316 	ROM_REGION( 0x04000, "gfx1", 0 )
317 	ROM_LOAD( "ss_7.b6",      0x00000, 0x2000, CRC(990890b1) SHA1(0ae5da75e8ff013d32f2a6e3a015d5e1623fbb19) )   /* characters */
318 	ROM_LOAD( "ss_8.b5",      0x02000, 0x2000, CRC(9388ff82) SHA1(31ff5e61d062262754bbf6763d094495c1d2e838) )
319 
320 	ROM_REGION( 0x0c000, "gfx2", 0 )
321 	ROM_LOAD( "ss_9.m5",      0x00000, 0x2000, CRC(8cb1cacf) SHA1(41b479dae84176ceb4eacb30b4dad58b7767606e) )   /* sprites */
322 	ROM_LOAD( "ss_10.m6",     0x02000, 0x2000, CRC(f802815e) SHA1(968145680483620cb0c9e7c00b4927aeace99e0c) )
323 	ROM_LOAD( "ss_11.m3",     0x04000, 0x2000, CRC(4dbad88a) SHA1(721612555714e116564d2b301cfa04980d21ad3b) )
324 	ROM_LOAD( "ss_12.m4",     0x06000, 0x2000, CRC(aa05e687) SHA1(4988d540e3deb9107f0448cd8ef47fa73ec926fe) )
325 	ROM_LOAD( "ss_13.m1",     0x08000, 0x2000, CRC(66119bfa) SHA1(73790be24287d8136c844b26cf36a679e489a37b) )
326 	ROM_LOAD( "ss_14.m2",     0x0a000, 0x2000, CRC(e14ef54e) SHA1(69ab42defff2cb91c6e07ea8805f64868a028630) )
327 
328 	ROM_REGION( 0x0340, "proms", 0 )
329 	ROM_LOAD( "ssb4.b2",      0x0000, 0x0020, CRC(c8eaf234) SHA1(d39dfab6dcad6b0a719c466b5290d2d081e4b58d) )    /* red/green component */
330 	ROM_LOAD( "ssb5.b1",      0x0020, 0x0020, CRC(0e434add) SHA1(238c281813d6079b9ae877bd0ced33abbbe39442) )    /* blue component */
331 	ROM_LOAD( "ssb2.c4",      0x0040, 0x0100, CRC(c53321c6) SHA1(439d98a98cdf2118b887c725a7759a98e2c377d9) )    /* character lookup table */
332 	ROM_LOAD( "ssb3.h7",      0x0140, 0x0100, CRC(7d2c324a) SHA1(3dcf09bd3f58bddb9760183d2c1b0fe5d77536ea) )    /* sprite lookup table */
333 	ROM_LOAD( "ssb1.k11",     0x0240, 0x0100, CRC(a04b0cfe) SHA1(89ab33c6b0aa313ebda2f11516cea667a9951a81) )    /* unknown (not used) */
334 ROM_END
335 
336 
337 GAME( 1984, sonson,  0,      sonson, sonson, sonson_state, empty_init, ROT0, "Capcom", "Son Son",         MACHINE_SUPPORTS_SAVE )
338 GAME( 1984, sonsonj, sonson, sonson, sonson, sonson_state, empty_init, ROT0, "Capcom", "Son Son (Japan)", MACHINE_SUPPORTS_SAVE )
339