1 /***************************************************************************
2
3 Prehistoric Isle in 1930 (World) (c) 1989 SNK
4 Prehistoric Isle in 1930 (USA) (c) 1989 SNK
5 Genshi-Tou 1930's (Japan) (c) 1989 SNK
6
7 Emulation by Bryan McPhail, mish@tendril.co.uk
8
9 ***************************************************************************/
10
11 #include "driver.h"
12 #include "vidhrdw/generic.h"
13
14 extern WRITE16_HANDLER( prehisle_bg_videoram16_w );
15 extern WRITE16_HANDLER( prehisle_fg_videoram16_w );
16 extern WRITE16_HANDLER( prehisle_control16_w );
17 extern READ16_HANDLER( prehisle_control16_r );
18
19 extern VIDEO_START( prehisle );
20 extern VIDEO_UPDATE( prehisle );
21
22 extern UINT16 *prehisle_bg_videoram16;
23
24 static UINT16 *prehisle_ram16;
25
26 /******************************************************************************/
27
WRITE16_HANDLER(prehisle_sound16_w)28 static WRITE16_HANDLER( prehisle_sound16_w )
29 {
30 soundlatch_w(0, data & 0xff);
31 cpu_set_nmi_line(1, PULSE_LINE);
32 }
33
34 /*******************************************************************************/
35
MEMORY_READ16_START(prehisle_readmem)36 static MEMORY_READ16_START( prehisle_readmem )
37 { 0x000000, 0x03ffff, MRA16_ROM },
38 { 0x070000, 0x073fff, MRA16_RAM },
39 { 0x090000, 0x0907ff, MRA16_RAM },
40 { 0x0a0000, 0x0a07ff, MRA16_RAM },
41 { 0x0b0000, 0x0b3fff, MRA16_RAM },
42 { 0x0d0000, 0x0d07ff, MRA16_RAM },
43 { 0x0e0000, 0x0e00ff, prehisle_control16_r },
44 MEMORY_END
45
46 static MEMORY_WRITE16_START( prehisle_writemem )
47 { 0x000000, 0x03ffff, MWA16_ROM },
48 { 0x070000, 0x073fff, MWA16_RAM, &prehisle_ram16 },
49 { 0x090000, 0x0907ff, prehisle_fg_videoram16_w, &videoram16 },
50 { 0x0a0000, 0x0a07ff, MWA16_RAM, &spriteram16 },
51 { 0x0b0000, 0x0b3fff, prehisle_bg_videoram16_w, &prehisle_bg_videoram16 },
52 { 0x0d0000, 0x0d07ff, paletteram16_RRRRGGGGBBBBxxxx_word_w, &paletteram16 },
53 { 0x0f0070, 0x0ff071, prehisle_sound16_w },
54 { 0x0f0000, 0x0ff0ff, prehisle_control16_w },
55 MEMORY_END
56
57 /******************************************************************************/
58
59 static WRITE_HANDLER( D7759_write_port_0_w )
60 {
61 UPD7759_port_w(offset,data);
62 UPD7759_start_w (0,0);
63 UPD7759_start_w (0,1);
64 }
65
MEMORY_READ_START(prehisle_sound_readmem)66 static MEMORY_READ_START( prehisle_sound_readmem )
67 { 0x0000, 0xefff, MRA_ROM },
68 { 0xf000, 0xf7ff, MRA_RAM },
69 { 0xf800, 0xf800, soundlatch_r },
70 MEMORY_END
71
72 static MEMORY_WRITE_START( prehisle_sound_writemem )
73 { 0x0000, 0xefff, MWA_ROM },
74 { 0xf000, 0xf7ff, MWA_RAM },
75 { 0xf800, 0xf800, MWA_NOP }, /* ???*/
76 MEMORY_END
77
78 static PORT_READ_START( prehisle_sound_readport )
79 { 0x00, 0x00, YM3812_status_port_0_r },
80 PORT_END
81
82 static PORT_WRITE_START( prehisle_sound_writeport )
83 { 0x00, 0x00, YM3812_control_port_0_w },
84 { 0x20, 0x20, YM3812_write_port_0_w },
85 { 0x40, 0x40, D7759_write_port_0_w},
86 { 0x80, 0x80, UPD7759_0_reset_w },
87 PORT_END
88
89 /******************************************************************************/
90
91 INPUT_PORTS_START( prehisle )
92 PORT_START /* Player 1 controls */
93 PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_JOYSTICK_UP | IPF_8WAY )
94 PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_JOYSTICK_DOWN | IPF_8WAY )
95 PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_JOYSTICK_LEFT | IPF_8WAY )
96 PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_JOYSTICK_RIGHT | IPF_8WAY )
97 PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_BUTTON1 )
98 PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_BUTTON2 )
99 PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_BUTTON3 )
100 PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_START1 )
101
102 PORT_START /* Player 2 controls */
103 PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_JOYSTICK_UP | IPF_8WAY | IPF_PLAYER2 )
104 PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_JOYSTICK_DOWN | IPF_8WAY | IPF_PLAYER2 )
105 PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_JOYSTICK_LEFT | IPF_8WAY | IPF_PLAYER2 )
106 PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_JOYSTICK_RIGHT | IPF_8WAY | IPF_PLAYER2 )
107 PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_BUTTON1 | IPF_PLAYER2 )
108 PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_BUTTON2 | IPF_PLAYER2 )
109 PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_BUTTON3 | IPF_PLAYER2 )
110 PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_START2 )
111
112 PORT_START /* coin */
113 PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_COIN1 )
114 PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_COIN2 )
115 PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_SERVICE1 )
116 PORT_SERVICE_NO_TOGGLE( 0x08, IP_ACTIVE_LOW )
117 PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_TILT )
118 PORT_BIT( 0xe0, IP_ACTIVE_LOW, IPT_UNUSED )
119
120 PORT_START /* Dip switches */
121 PORT_DIPNAME( 0x01, 0x01, DEF_STR( Flip_Screen ) )
122 PORT_DIPSETTING( 0x01, DEF_STR( Off ) )
123 PORT_DIPSETTING( 0x00, DEF_STR( On ) )
124 PORT_DIPNAME( 0x02, 0x02, "Level Select" )
125 PORT_DIPSETTING( 0x02, DEF_STR( Off ) )
126 PORT_DIPSETTING( 0x00, DEF_STR( On ) )
127 PORT_DIPNAME( 0x04, 0x04, DEF_STR( Bonus_Life ) )
128 PORT_DIPSETTING( 0x04, "Only Twice" )
129 PORT_DIPSETTING( 0x00, "Always" )
130 PORT_DIPNAME( 0x08, 0x08, DEF_STR( Unknown ) )
131 PORT_DIPSETTING( 0x08, DEF_STR( Off ) )
132 PORT_DIPSETTING( 0x00, DEF_STR( On ) )
133 PORT_DIPNAME( 0x30, 0x30, DEF_STR( Coinage ) )
134 PORT_DIPSETTING( 0x00, "A 4C/1C B 1C/4C" )
135 PORT_DIPSETTING( 0x10, "A 3C/1C B 1C/3C" )
136 PORT_DIPSETTING( 0x20, "A 2C/1C B 1C/2C" )
137 PORT_DIPSETTING( 0x30, DEF_STR( 1C_1C ) )
138 PORT_DIPNAME( 0xc0, 0xc0, DEF_STR( Lives ) )
139 PORT_DIPSETTING( 0x80, "2" )
140 PORT_DIPSETTING( 0xc0, "3" )
141 PORT_DIPSETTING( 0x40, "4" )
142 PORT_DIPSETTING( 0x00, "5" )
143
144 PORT_START
145 PORT_DIPNAME( 0x03, 0x03, DEF_STR( Difficulty ) )
146 PORT_DIPSETTING( 0x02, "Easy" )
147 PORT_DIPSETTING( 0x03, "Standard" )
148 PORT_DIPSETTING( 0x01, "Middle" )
149 PORT_DIPSETTING( 0x00, "Difficult" )
150 PORT_DIPNAME( 0x0c, 0x0c, "Game Mode" )
151 PORT_DIPSETTING( 0x08, "Demo Sounds Off" )
152 PORT_DIPSETTING( 0x0c, "Demo Sounds On" )
153 PORT_DIPSETTING( 0x00, "Freeze" )
154 PORT_DIPSETTING( 0x04, "Infinite Lives" )
155 PORT_DIPNAME( 0x30, 0x30, DEF_STR( Bonus_Life ) )
156 PORT_DIPSETTING( 0x30, "100K 200K" )
157 PORT_DIPSETTING( 0x20, "150K 300K" )
158 PORT_DIPSETTING( 0x10, "300K 500K" )
159 PORT_DIPSETTING( 0x00, "None" )
160 PORT_DIPNAME( 0x40, 0x40, "Allow Continue" )
161 PORT_DIPSETTING( 0x00, DEF_STR( No ) )
162 PORT_DIPSETTING( 0x40, DEF_STR( Yes ) )
163 PORT_BIT( 0x80, IP_ACTIVE_HIGH, IPT_VBLANK )
164 INPUT_PORTS_END
165
166 /******************************************************************************/
167
168 static struct GfxLayout charlayout =
169 {
170 8,8, /* 8*8 characters */
171 1024,
172 4, /* 4 bits per pixel */
173 { 0, 1, 2, 3 },
174 { 0, 4, 8, 12, 16, 20, 24, 28},
175 { 0*32, 1*32, 2*32, 3*32, 4*32, 5*32, 6*32, 7*32 },
176 32*8 /* every char takes 32 consecutive bytes */
177 };
178
179 static struct GfxLayout tilelayout =
180 {
181 16,16, /* 16*16 sprites */
182 0x800,
183 4, /* 4 bits per pixel */
184 { 0, 1, 2, 3 },
185 { 0,4,8,12,16,20,24,28,
186 0+64*8,4+64*8,8+64*8,12+64*8,16+64*8,20+64*8,24+64*8,28+64*8 },
187 { 0*32, 1*32, 2*32, 3*32, 4*32, 5*32, 6*32, 7*32,
188 8*32, 9*32, 10*32, 11*32, 12*32, 13*32, 14*32, 15*32 },
189 128*8 /* every sprite takes 64 consecutive bytes */
190 };
191
192 static struct GfxLayout spritelayout =
193 {
194 16,16, /* 16*16 sprites */
195 5120,
196 4, /* 4 bits per pixel */
197 { 0, 1, 2, 3 },
198 { 0,4,8,12,16,20,24,28,
199 0+64*8,4+64*8,8+64*8,12+64*8,16+64*8,20+64*8,24+64*8,28+64*8 },
200 { 0*32, 1*32, 2*32, 3*32, 4*32, 5*32, 6*32, 7*32,
201 8*32, 9*32, 10*32, 11*32, 12*32, 13*32, 14*32, 15*32 },
202 128*8 /* every sprite takes 64 consecutive bytes */
203 };
204
205 static struct GfxDecodeInfo gfxdecodeinfo[] =
206 {
207 { REGION_GFX1, 0, &charlayout, 0, 16 },
208 { REGION_GFX2, 0, &tilelayout, 768, 16 },
209 { REGION_GFX3, 0, &tilelayout, 512, 16 },
210 { REGION_GFX4, 0, &spritelayout, 256, 16 },
211 { -1 } /* end of array */
212 };
213
214 /******************************************************************************/
215
irqhandler(int irq)216 static void irqhandler(int irq)
217 {
218 cpu_set_irq_line(1,0,irq ? ASSERT_LINE : CLEAR_LINE);
219 }
220
221 static struct YM3812interface ym3812_interface =
222 {
223 1, /* 1 chip */
224 4000000, /* 4 MHz */
225 { 100 },
226 { irqhandler },
227 };
228
229 static struct UPD7759_interface upd7759_interface =
230 {
231 1, /* number of chips */
232 { 90 }, /* volume */
233 { REGION_SOUND1 }, /* memory region */
234 UPD7759_STANDALONE_MODE, /* chip mode */
235 { NULL }
236 };
237
238 /******************************************************************************/
239
240 static MACHINE_DRIVER_START( prehisle )
241
242 /* basic machine hardware */
243 MDRV_CPU_ADD(M68000, 12000000)
MDRV_CPU_MEMORY(prehisle_readmem,prehisle_writemem)244 MDRV_CPU_MEMORY(prehisle_readmem,prehisle_writemem)
245 MDRV_CPU_VBLANK_INT(irq4_line_hold,1)
246
247 MDRV_CPU_ADD(Z80, 4000000)
248 MDRV_CPU_FLAGS(CPU_AUDIO_CPU)
249 MDRV_CPU_MEMORY(prehisle_sound_readmem,prehisle_sound_writemem)
250 MDRV_CPU_PORTS(prehisle_sound_readport,prehisle_sound_writeport)
251
252 MDRV_FRAMES_PER_SECOND(60)
253 MDRV_VBLANK_DURATION(DEFAULT_REAL_60HZ_VBLANK_DURATION)
254
255 /* video hardware */
256 MDRV_VIDEO_ATTRIBUTES(VIDEO_TYPE_RASTER)
257 MDRV_SCREEN_SIZE(32*8, 32*8)
258 MDRV_VISIBLE_AREA(0*8, 32*8-1, 2*8, 30*8-1)
259 MDRV_GFXDECODE(gfxdecodeinfo)
260 MDRV_PALETTE_LENGTH(1024)
261
262 MDRV_VIDEO_START(prehisle)
263 MDRV_VIDEO_UPDATE(prehisle)
264
265 /* sound hardware */
266 MDRV_SOUND_ADD(YM3812, ym3812_interface)
267 MDRV_SOUND_ADD(UPD7759, upd7759_interface)
268 MACHINE_DRIVER_END
269
270 /******************************************************************************/
271
272 ROM_START( prehisle )
273 ROM_REGION( 0x40000, REGION_CPU1, 0 )
274 ROM_LOAD16_BYTE( "gt.2", 0x00000, 0x20000, CRC(7083245a) SHA1(c4f72440e3fb130c8c44224c958bf70c61e8c34e) )
275 ROM_LOAD16_BYTE( "gt.3", 0x00001, 0x20000, CRC(6d8cdf58) SHA1(0078e54db899132d2b1244aed0b974173717f82e) )
276
277 ROM_REGION( 0x10000, REGION_CPU2, 0 ) /* Sound CPU */
278 ROM_LOAD( "gt.1", 0x000000, 0x10000, CRC(80a4c093) SHA1(abe59e43259eb80b504bd5541f58cd0e5eb998ab) )
279
280 ROM_REGION( 0x008000, REGION_GFX1, ROMREGION_DISPOSE )
281 ROM_LOAD( "gt15.b15", 0x000000, 0x08000, CRC(ac652412) SHA1(916c04c3a8a7bfb961313ab73c0a27d7f5e48de1) )
282
283 ROM_REGION( 0x040000, REGION_GFX2, ROMREGION_DISPOSE )
284 ROM_LOAD( "pi8914.b14", 0x000000, 0x40000, CRC(207d6187) SHA1(505dfd1424b894e7b898f91b89f021ddde433c48) )
285
286 ROM_REGION( 0x040000, REGION_GFX3, ROMREGION_DISPOSE )
287 ROM_LOAD( "pi8916.h16", 0x000000, 0x40000, CRC(7cffe0f6) SHA1(aba08617964fc425418b098be5167021768bd47c) )
288
289 ROM_REGION( 0x0a0000, REGION_GFX4, ROMREGION_DISPOSE )
290 ROM_LOAD( "pi8910.k14", 0x000000, 0x80000, CRC(5a101b0b) SHA1(9645ab1f8d058cf2c6c42ccb4ce92a9b5db10c51) )
291 ROM_LOAD( "gt.5", 0x080000, 0x20000, CRC(3d3ab273) SHA1(b5706ada9eb2c22fcc0ac8ede2d2ee02ee853191) )
292
293 ROM_REGION( 0x10000, REGION_GFX5, 0 ) /* background tilemaps */
294 ROM_LOAD( "gt.11", 0x000000, 0x10000, CRC(b4f0fcf0) SHA1(b81cc0b6e3e6f5616789bb3e77807dc0ef718a38) )
295
296 ROM_REGION( 0x20000, REGION_SOUND1, 0 ) /* ADPCM samples */
297 ROM_LOAD( "gt.4", 0x000000, 0x20000, CRC(85dfb9ec) SHA1(78c865e7ccffddb71dcddccab358fa945f521f25) )
298 ROM_END
299
300 ROM_START( prehislu )
301 ROM_REGION( 0x40000, REGION_CPU1, 0 )
302 ROM_LOAD16_BYTE( "gt-u2.2h", 0x00000, 0x20000, CRC(a14f49bb) SHA1(6b39a894c3d3862be349a58c748d2d763d5a269c) )
303 ROM_LOAD16_BYTE( "gt-u3.3h", 0x00001, 0x20000, CRC(f165757e) SHA1(26cf369fed1713deec182852d76fe014ed46d6ac) )
304
305 ROM_REGION( 0x10000, REGION_CPU2, 0 ) /* Sound CPU */
306 ROM_LOAD( "gt.1", 0x000000, 0x10000, CRC(80a4c093) SHA1(abe59e43259eb80b504bd5541f58cd0e5eb998ab) )
307
308 ROM_REGION( 0x008000, REGION_GFX1, ROMREGION_DISPOSE )
309 ROM_LOAD( "gt15.b15", 0x000000, 0x08000, CRC(ac652412) SHA1(916c04c3a8a7bfb961313ab73c0a27d7f5e48de1) )
310
311 ROM_REGION( 0x040000, REGION_GFX2, ROMREGION_DISPOSE )
312 ROM_LOAD( "pi8914.b14", 0x000000, 0x40000, CRC(207d6187) SHA1(505dfd1424b894e7b898f91b89f021ddde433c48) )
313
314 ROM_REGION( 0x040000, REGION_GFX3, ROMREGION_DISPOSE )
315 ROM_LOAD( "pi8916.h16", 0x000000, 0x40000, CRC(7cffe0f6) SHA1(aba08617964fc425418b098be5167021768bd47c) )
316
317 ROM_REGION( 0x0a0000, REGION_GFX4, ROMREGION_DISPOSE )
318 ROM_LOAD( "pi8910.k14", 0x000000, 0x80000, CRC(5a101b0b) SHA1(9645ab1f8d058cf2c6c42ccb4ce92a9b5db10c51) )
319 ROM_LOAD( "gt.5", 0x080000, 0x20000, CRC(3d3ab273) SHA1(b5706ada9eb2c22fcc0ac8ede2d2ee02ee853191) )
320
321 ROM_REGION( 0x10000, REGION_GFX5, 0 ) /* background tilemaps */
322 ROM_LOAD( "gt.11", 0x000000, 0x10000, CRC(b4f0fcf0) SHA1(b81cc0b6e3e6f5616789bb3e77807dc0ef718a38) )
323
324 ROM_REGION( 0x20000, REGION_SOUND1, 0 ) /* ADPCM samples */
325 ROM_LOAD( "gt.4", 0x000000, 0x20000, CRC(85dfb9ec) SHA1(78c865e7ccffddb71dcddccab358fa945f521f25) )
326 ROM_END
327
328 ROM_START( gensitou )
329 ROM_REGION( 0x40000, REGION_CPU1, 0 )
330 ROM_LOAD16_BYTE( "gt2j.bin", 0x00000, 0x20000, CRC(a2da0b6b) SHA1(d102118f83b96094fd4ea4b3468713c4946c949d) )
331 ROM_LOAD16_BYTE( "gt3j.bin", 0x00001, 0x20000, CRC(c1a0ae8e) SHA1(2c9643abfd71edf8612e63d69cea4fbc19aad19d) )
332
333 ROM_REGION( 0x10000, REGION_CPU2, 0 ) /* Sound CPU */
334 ROM_LOAD( "gt.1", 0x000000, 0x10000, CRC(80a4c093) SHA1(abe59e43259eb80b504bd5541f58cd0e5eb998ab) )
335
336 ROM_REGION( 0x008000, REGION_GFX1, ROMREGION_DISPOSE )
337 ROM_LOAD( "gt15.b15", 0x000000, 0x08000, CRC(ac652412) SHA1(916c04c3a8a7bfb961313ab73c0a27d7f5e48de1) )
338
339 ROM_REGION( 0x040000, REGION_GFX2, ROMREGION_DISPOSE )
340 ROM_LOAD( "pi8914.b14", 0x000000, 0x40000, CRC(207d6187) SHA1(505dfd1424b894e7b898f91b89f021ddde433c48) )
341
342 ROM_REGION( 0x040000, REGION_GFX3, ROMREGION_DISPOSE )
343 ROM_LOAD( "pi8916.h16", 0x000000, 0x40000, CRC(7cffe0f6) SHA1(aba08617964fc425418b098be5167021768bd47c) )
344
345 ROM_REGION( 0x0a0000, REGION_GFX4, ROMREGION_DISPOSE )
346 ROM_LOAD( "pi8910.k14", 0x000000, 0x80000, CRC(5a101b0b) SHA1(9645ab1f8d058cf2c6c42ccb4ce92a9b5db10c51) )
347 ROM_LOAD( "gt.5", 0x080000, 0x20000, CRC(3d3ab273) SHA1(b5706ada9eb2c22fcc0ac8ede2d2ee02ee853191) )
348
349 ROM_REGION( 0x10000, REGION_GFX5, 0 ) /* background tilemaps */
350 ROM_LOAD( "gt.11", 0x000000, 0x10000, CRC(b4f0fcf0) SHA1(b81cc0b6e3e6f5616789bb3e77807dc0ef718a38) )
351
352 ROM_REGION( 0x20000, REGION_SOUND1, 0 ) /* ADPCM samples */
353 ROM_LOAD( "gt.4", 0x000000, 0x20000, CRC(85dfb9ec) SHA1(78c865e7ccffddb71dcddccab358fa945f521f25) )
354 ROM_END
355
356 /******************************************************************************/
357
358 static READ16_HANDLER( world_cycle_r )
359 {
360 int pc=activecpu_get_pc();
361 int ret=prehisle_ram16[0x12];
362
363 if ((ret&0x8000) && (pc==0x260c || pc==0x268a || pc==0x2b0a || pc==0x34a8 || pc==0x6ae4 || pc==0x83ac || pc==0x25ce || pc==0x29c4)) {
364 cpu_spinuntil_int();
365 return ret&0x7fff;
366 }
367 return ret;
368 }
369
DRIVER_INIT(prehisle)370 static DRIVER_INIT( prehisle )
371 {
372 install_mem_read16_handler(0, 0x70024, 0x70025, world_cycle_r);
373 }
374
READ16_HANDLER(usa_cycle_r)375 static READ16_HANDLER( usa_cycle_r )
376 {
377 int pc=activecpu_get_pc();
378 int ret=prehisle_ram16[0x12];
379
380 if ((ret&0x8000) && (pc==0x281e || pc==0x28a6 || pc==0x295a || pc==0x2868 || pc==0x8f98 || pc==0x3b1e)) {
381 cpu_spinuntil_int();
382 return ret&0x7fff;
383 }
384 return ret;
385 }
386
DRIVER_INIT(prehislu)387 static DRIVER_INIT( prehislu )
388 {
389 install_mem_read16_handler(0, 0x70024, 0x70025, usa_cycle_r);
390 }
391
READ16_HANDLER(jap_cycle_r)392 static READ16_HANDLER( jap_cycle_r )
393 {
394 int pc=activecpu_get_pc();
395 int ret=prehisle_ram16[0x12];
396
397 if ((ret&0x8000) && (pc==0x34b6 /* Todo! */ )) {
398 cpu_spinuntil_int();
399 return ret&0x7fff;
400 }
401 return ret;
402 }
403
DRIVER_INIT(gensitou)404 static DRIVER_INIT( gensitou )
405 {
406 install_mem_read16_handler(0, 0x70024, 0x70025, jap_cycle_r);
407 }
408
409 /******************************************************************************/
410
411 GAME( 1989, prehisle, 0, prehisle, prehisle, prehisle, ROT0, "SNK", "Prehistoric Isle in 1930 (World)" )
412 GAME( 1989, prehislu, prehisle, prehisle, prehisle, prehislu, ROT0, "SNK of America", "Prehistoric Isle in 1930 (US)" )
413 GAME( 1989, gensitou, prehisle, prehisle, prehisle, gensitou, ROT0, "SNK", "Genshi-Tou 1930's" )
414