summaryrefslogtreecommitdiffstatshomepage
path: root/src/mame/drivers/undrfire.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/mame/drivers/undrfire.c')
-rw-r--r--src/mame/drivers/undrfire.c741
1 files changed, 741 insertions, 0 deletions
diff --git a/src/mame/drivers/undrfire.c b/src/mame/drivers/undrfire.c
new file mode 100644
index 00000000000..a91fffe987e
--- /dev/null
+++ b/src/mame/drivers/undrfire.c
@@ -0,0 +1,741 @@
+/***************************************************************************
+
+ Underfire (c) 1993 Taito
+
+ Driver by Bryan McPhail & David Graves.
+
+ Board Info:
+
+ TC0470LIN : ?
+ TC0480SCP : known tilemap chip
+ TC0510NIO : known input chip
+ TC0570SPC : must be the object chip (next to spritemap and OBJ roms)
+ TC0590PIV : Piv tilemaps
+ TC0620SCC : lightgun ??? pivot port ???
+ TC0650FDA : palette ? (Slapshot and F3 games also have one)
+
+ M43E0278A
+ K1100744A Main Board
+
+ 2018 2088 43256 43256 68020-25
+ 2018 2088 D67-23 D67-17 93C46
+ 2018 2088 43256 43256
+ 2018 D67-18 D67-19 TC0510NIO
+ 2018
+ 2018 TC0570 SPC 43256
+ 43256
+ D67-13 43256 TC0650FDA
+ D67-07 2018
+ D67-06
+ TC0470LIN D67-05
+ D67-04 43256
+ TC0590PIV D67-03 43256 D67-10 43256
+ 43256 D67-11
+ D67-09 TC0480SCP D67-12 TC0620SCC
+ D67-08
+
+ MB8421
+ MB8421 43256 EnsoniqOTIS
+ D67-20 D67-01
+ 43256 EnsoniqESP-R6
+ 68000-12 D67-21 D67-02 EnsoniqSuperGlu
+
+ 40MHz 16MHz 30.476MHz 68681
+
+
+ Under Fire combines the sprite system used in Taito Z games with
+ the TC0480SCP tilemap chip plus some features from the Taito F3 system.
+ It has an extra tilemap chip which is a dead ringer for the TC0100SCN
+ (check the inits). Why did Taito give it a different name in this
+ incarnation?
+
+
+ Game misbehaviours
+ ------------------
+
+ (i) Sprites on some rounds had sprite/tile priority issues.
+ Solved by upping sprite priority while TC0480SCP row zoom is
+ enabled - kludge.
+
+
+ Todo
+ ----
+
+ This game needs a fake aim target!
+
+ What does the 0xb00000 area do... alpha blending ??
+
+ What is the unknown hardware at 0x600000... an alternative
+ or legacy lightgun hookup?
+
+ Pivot port which may be used for rotation: but not
+ seen changing except in game inits. Perhaps only used
+ in later levels?
+
+
+ Gun calibration
+ ---------------
+
+ The values below work well (set speed down to 4 so you can enter
+ them). They give a little reloading margin all around screen.
+
+ Use X=0x2000 Y=0x100 for top center
+ Use X=0x3740 (same Y) top left
+ Use X=0x8c0 (same Y) top right
+ Then for the points from left to right near bottom (all Y=0x3400):
+ X=0x3f00,0x3740,0x2f80,0x27c0,0x2000,0x1840,0x1080,0x8c0,0x100
+
+
+Code documentation
+------------------
+
+$17b6e2: loop which keeps displaying the trail of aim dots in test mode
+
+$181826: routine which calls subs to derive aim coords for P1 and P2 and
+pokes them in the game's internal sprite table format into RAM - along
+with the nine blue "flag point" sprites on the calibration screen
+which seem to have fixed coordinates. [It also refreshes some green
+text on screen - the calls to $1bfa.]
+
+$18141a sub appears to be doing all the calculations - including an
+indirected subroutine so there may be quite a lot of possible code.
+It is called with parameter of 1 for player 2 (and 0 for player 1).
+
+$1821c8 sub is called just after - this is simpler and seems to be
+copying the calculation results (modified slightly by 3 pixels in each
+direction - to adjust for size of aim sprite?) into the table in ram.
+
+(Subsequently a standard conversion routine turns the table on the fly
+into dwords that are actually poked into spriteram. To locate the code
+do a watchpoint on the first sprite in spriteram - the P1 aim point.)
+
+In-game: $18141a is called 3 times when you hit fire - 3 bullets - and
+once when you hit shotgun. Like Spacegun it is only doing the aim
+calculations when it needs to, so to provide an artificial target we
+need to reproduce the $18141a calculations.
+
+
+***************************************************************************/
+
+#include "driver.h"
+#include "cpu/m68000/m68000.h"
+#include "video/taitoic.h"
+#include "audio/taitosnd.h"
+#include "machine/eeprom.h"
+#include "sound/es5506.h"
+#include "includes/taito_f3.h"
+#include "audio/taito_en.h"
+
+VIDEO_START( undrfire );
+VIDEO_UPDATE( undrfire );
+
+static UINT16 coin_word;
+static UINT16 port_sel = 0;
+extern UINT16 undrfire_rotate_ctrl[8];
+static int frame_counter=0;
+
+static UINT32 *undrfire_ram; /* will be read in video for gun target calcs */
+
+
+/***********************************************************
+ COLOR RAM
+
+Extract a standard version of this
+("taito_8bpg_palette_word_w"?) to Taitoic.c ?
+***********************************************************/
+
+static WRITE32_HANDLER( color_ram_w )
+{
+ int a,r,g,b;
+ COMBINE_DATA(&paletteram32[offset]);
+
+ {
+ a = paletteram32[offset];
+ r = (a &0xff0000) >> 16;
+ g = (a &0xff00) >> 8;
+ b = (a &0xff);
+
+ palette_set_color(Machine,offset,MAKE_RGB(r,g,b));
+ }
+}
+
+
+/***********************************************************
+ INTERRUPTS
+***********************************************************/
+
+static TIMER_CALLBACK( undrfire_interrupt5 )
+{
+ cpunum_set_input_line(0,5,HOLD_LINE);
+}
+
+
+/**********************************************************
+ EPROM
+**********************************************************/
+
+static UINT8 default_eeprom[128]=
+{
+ 0x02,0x01,0x11,0x12,0x01,0x01,0x01,0x00,0x80,0x80,0x30,0x01,0x00,0x00,0x62,0x45,
+ 0xe0,0xa0,0xff,0x28,0xff,0xff,0xfa,0xd7,0x33,0x28,0x00,0x00,0x33,0x28,0x00,0x00,
+ 0x00,0x00,0x00,0x00,0x00,0x00,0xe0,0xa0,0xff,0x28,0xff,0xff,0xff,0xff,0xfa,0xd7,
+ 0x33,0x28,0x00,0x00,0x33,0x28,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0xff,0xff,
+ 0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,
+ 0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,
+ 0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,
+ 0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff
+};
+
+static struct EEPROM_interface undrfire_eeprom_interface =
+{
+ 6, /* address bits */
+ 16, /* data bits */
+ "0110", /* read command */
+ "0101", /* write command */
+ "0111", /* erase command */
+ "0100000000", /* unlock command */
+ "0100110000", /* lock command */
+};
+
+static NVRAM_HANDLER( undrfire )
+{
+ if (read_or_write)
+ EEPROM_save(file);
+ else {
+ EEPROM_init(&undrfire_eeprom_interface);
+ if (file)
+ EEPROM_load(file);
+ else
+ EEPROM_set_data(default_eeprom,128); /* Default the gun setup values */
+ }
+}
+
+
+/**********************************************************
+ GAME INPUTS
+**********************************************************/
+
+static READ32_HANDLER( undrfire_input_r )
+{
+ switch (offset)
+ {
+ case 0x00:
+ {
+ return (input_port_0_word_r(0,0) << 16) | input_port_1_word_r(0,0) |
+ (EEPROM_read_bit() << 7) | frame_counter;
+ }
+
+ case 0x01:
+ {
+ return input_port_2_word_r(0,0) | (coin_word << 16);
+ }
+ }
+
+ return 0xffffffff;
+}
+
+static WRITE32_HANDLER( undrfire_input_w )
+{
+ switch (offset)
+ {
+ case 0x00:
+ {
+ if (ACCESSING_MSB32) /* $500000 is watchdog */
+ {
+ watchdog_reset_w(0,data >> 24);
+ }
+
+ if (ACCESSING_LSB32)
+ {
+ EEPROM_set_clock_line((data & 0x20) ? ASSERT_LINE : CLEAR_LINE);
+ EEPROM_write_bit(data & 0x40);
+ EEPROM_set_cs_line((data & 0x10) ? CLEAR_LINE : ASSERT_LINE);
+ return;
+ }
+
+ return;
+ }
+
+ case 0x01:
+ {
+ if (ACCESSING_MSB32)
+ {
+ coin_lockout_w(0,~data & 0x01000000);
+ coin_lockout_w(1,~data & 0x02000000);
+ coin_counter_w(0, data & 0x04000000);
+ coin_counter_w(1, data & 0x08000000);
+ coin_word = (data >> 16) &0xffff;
+ }
+ }
+ }
+}
+
+
+/* Some unknown hardware byte mapped at $600002-5 */
+
+static READ32_HANDLER( unknown_hardware_r )
+{
+ switch (offset) /* four single bytes are read in sequence at $156e */
+ {
+ case 0x00: /* $600002-3 */
+ {
+ return 0xffff; // no idea what they should be
+ }
+
+ case 0x01: /* $600004-5 */
+ {
+ return 0xffff0000; // no idea what they should be
+ }
+ }
+
+ return 0x0;
+}
+
+
+static WRITE32_HANDLER( unknown_int_req_w )
+{
+ /* 10000 cycle delay is arbitrary */
+ timer_set(ATTOTIME_IN_CYCLES(10000,0),0, undrfire_interrupt5);
+}
+
+
+static READ32_HANDLER( undrfire_lightgun_r )
+{
+ int x,y;
+
+ switch (offset)
+ {
+ /* NB we are raising the raw inputs by an arbitrary amount,
+ but presumably the guns on the original will not have had
+ full 0-0xffff travel. We don't center around 0x8000... but
+ who knows if the real machine does. */
+
+ case 0x00: /* P1 */
+ {
+ x = input_port_3_word_r(0,0) << 6;
+ y = input_port_4_word_r(0,0) << 6;
+
+ return ((x << 24) &0xff000000) | ((x << 8) &0xff0000)
+ | ((y << 8) &0xff00) | ((y >> 8) &0xff) ;
+ }
+
+ case 0x01: /* P2 */
+ {
+ x = input_port_5_word_r(0,0) << 6;
+ y = input_port_6_word_r(0,0) << 6;
+
+ return ((x << 24) &0xff000000) | ((x << 8) &0xff0000)
+ | ((y << 8) &0xff00) | ((y >> 8) &0xff) ;
+ }
+ }
+
+logerror("CPU #0 PC %06x: warning - read unmapped lightgun offset %06x\n",activecpu_get_pc(),offset);
+
+ return 0x0;
+}
+
+
+static WRITE32_HANDLER( rotate_control_w ) /* only a guess that it's rotation */
+{
+ if (ACCESSING_LSW32)
+ {
+ undrfire_rotate_ctrl[port_sel] = data;
+ return;
+ }
+
+ if (ACCESSING_MSW32)
+ {
+ port_sel = (data &0x70000) >> 16;
+ }
+}
+
+
+static WRITE32_HANDLER( motor_control_w )
+{
+/*
+ Standard value poked is 0x00910200 (we ignore lsb and msb
+ which seem to be always zero)
+
+ 0x0, 0x8000 and 0x9100 are written at startup
+
+ Two bits are written in test mode to this middle word
+ to test gun vibration:
+
+ ........ .x...... P1 gun vibration
+ ........ x....... P2 gun vibration
+*/
+}
+
+
+/***********************************************************
+ MEMORY STRUCTURES
+***********************************************************/
+
+static ADDRESS_MAP_START( undrfire_readmem, ADDRESS_SPACE_PROGRAM, 32 )
+ AM_RANGE(0x000000, 0x1fffff) AM_READ(MRA32_ROM)
+ AM_RANGE(0x200000, 0x21ffff) AM_READ(MRA32_RAM) /* main CPUA ram */
+ AM_RANGE(0x300000, 0x303fff) AM_READ(MRA32_RAM) /* sprite ram */
+// AM_RANGE(0x304000, 0x304003) AM_READ(MRA32_RAM) // debugging
+// AM_RANGE(0x304400, 0x304403) AM_READ(MRA32_RAM) // debugging
+ AM_RANGE(0x500000, 0x500007) AM_READ(undrfire_input_r)
+ AM_RANGE(0x600000, 0x600007) AM_READ(unknown_hardware_r) /* unknown byte reads at $156e */
+ AM_RANGE(0x700000, 0x7007ff) AM_READ(MRA32_RAM)
+ AM_RANGE(0x800000, 0x80ffff) AM_READ(TC0480SCP_long_r) /* tilemaps */
+ AM_RANGE(0x830000, 0x83002f) AM_READ(TC0480SCP_ctrl_long_r) // debugging
+ AM_RANGE(0x900000, 0x90ffff) AM_READ(TC0100SCN_long_r) /* piv tilemaps */
+ AM_RANGE(0x920000, 0x92000f) AM_READ(TC0100SCN_ctrl_long_r)
+ AM_RANGE(0xa00000, 0xa0ffff) AM_READ(MRA32_RAM) /* palette ram */
+ AM_RANGE(0xb00000, 0xb003ff) AM_READ(MRA32_RAM) // ?? single bytes
+ AM_RANGE(0xf00000, 0xf00007) AM_READ(undrfire_lightgun_r) /* stick coords read at $11b2-bc */
+ADDRESS_MAP_END
+
+static ADDRESS_MAP_START( undrfire_writemem, ADDRESS_SPACE_PROGRAM, 32 )
+ AM_RANGE(0x000000, 0x1fffff) AM_WRITE(MWA32_ROM)
+ AM_RANGE(0x200000, 0x21ffff) AM_WRITE(MWA32_RAM) AM_BASE(&undrfire_ram)
+ AM_RANGE(0x300000, 0x303fff) AM_WRITE(MWA32_RAM) AM_BASE(&spriteram32) AM_SIZE(&spriteram_size)
+// AM_RANGE(0x304000, 0x304003) AM_WRITE(MWA32_RAM) // ??? doesn't change
+// AM_RANGE(0x304400, 0x304403) AM_WRITE(MWA32_RAM) // ??? doesn't change
+ AM_RANGE(0x400000, 0x400003) AM_WRITE(motor_control_w) /* gun vibration */
+ AM_RANGE(0x500000, 0x500007) AM_WRITE(undrfire_input_w) /* eerom etc. */
+ AM_RANGE(0x600000, 0x600007) AM_WRITE(unknown_int_req_w) /* int request for unknown hardware */
+ AM_RANGE(0x700000, 0x7007ff) AM_WRITE(MWA32_RAM) AM_BASE(&f3_shared_ram)
+ AM_RANGE(0x800000, 0x80ffff) AM_WRITE(TC0480SCP_long_w) /* tilemaps */
+ AM_RANGE(0x830000, 0x83002f) AM_WRITE(TC0480SCP_ctrl_long_w)
+ AM_RANGE(0x900000, 0x90ffff) AM_WRITE(TC0100SCN_long_w) /* piv tilemaps */
+ AM_RANGE(0x920000, 0x92000f) AM_WRITE(TC0100SCN_ctrl_long_w)
+ AM_RANGE(0xa00000, 0xa0ffff) AM_WRITE(color_ram_w) AM_BASE(&paletteram32)
+ AM_RANGE(0xb00000, 0xb003ff) AM_WRITE(MWA32_RAM) // single bytes, blending ??
+ AM_RANGE(0xd00000, 0xd00003) AM_WRITE(rotate_control_w) /* perhaps port based rotate control? */
+ADDRESS_MAP_END
+
+
+/***********************************************************
+ INPUT PORTS (dips in eprom)
+***********************************************************/
+
+static INPUT_PORTS_START( undrfire )
+ PORT_START_TAG("IN0")
+ PORT_BIT( 0x0001, IP_ACTIVE_LOW, IPT_UNKNOWN )
+ PORT_BIT( 0x0002, IP_ACTIVE_LOW, IPT_UNKNOWN )
+ PORT_BIT( 0x0004, IP_ACTIVE_LOW, IPT_UNKNOWN )
+ PORT_BIT( 0x0008, IP_ACTIVE_HIGH, IPT_BUTTON3 ) PORT_PLAYER(1) /* ? where is freeze input */
+ PORT_BIT( 0x0010, IP_ACTIVE_LOW, IPT_BUTTON1 ) PORT_PLAYER(1)
+ PORT_BIT( 0x0020, IP_ACTIVE_LOW, IPT_BUTTON2 ) PORT_PLAYER(1)
+ PORT_BIT( 0x0040, IP_ACTIVE_LOW, IPT_BUTTON1 ) PORT_PLAYER(2)
+ PORT_BIT( 0x0080, IP_ACTIVE_LOW, IPT_BUTTON2 ) PORT_PLAYER(2)
+ PORT_BIT( 0x0100, IP_ACTIVE_LOW, IPT_UNKNOWN )
+ PORT_BIT( 0x0200, IP_ACTIVE_LOW, IPT_UNKNOWN )
+ PORT_BIT( 0x0400, IP_ACTIVE_LOW, IPT_UNKNOWN )
+ PORT_BIT( 0x0800, IP_ACTIVE_LOW, IPT_UNKNOWN )
+ PORT_BIT( 0x1000, IP_ACTIVE_LOW, IPT_UNKNOWN )
+ PORT_BIT( 0x2000, IP_ACTIVE_LOW, IPT_UNKNOWN )
+ PORT_BIT( 0x4000, IP_ACTIVE_LOW, IPT_UNKNOWN )
+ PORT_BIT( 0x8000, IP_ACTIVE_LOW, IPT_UNKNOWN )
+
+ PORT_START_TAG("IN1")
+ PORT_BIT( 0x0001, IP_ACTIVE_HIGH, IPT_SPECIAL ) /* Frame counter */
+ PORT_BIT( 0x0002, IP_ACTIVE_LOW, IPT_UNKNOWN )
+ PORT_BIT( 0x0004, IP_ACTIVE_LOW, IPT_UNKNOWN )
+ PORT_BIT( 0x0008, IP_ACTIVE_LOW, IPT_UNKNOWN )
+ PORT_BIT( 0x0010, IP_ACTIVE_LOW, IPT_UNKNOWN )
+ PORT_BIT( 0x0020, IP_ACTIVE_LOW, IPT_UNKNOWN )
+ PORT_BIT( 0x0040, IP_ACTIVE_LOW, IPT_UNKNOWN )
+ PORT_BIT( 0x0080, IP_ACTIVE_HIGH, IPT_SPECIAL ) /* reserved for EEROM */
+ PORT_BIT( 0x0100, IP_ACTIVE_LOW, IPT_UNKNOWN )
+ PORT_BIT( 0x0200, IP_ACTIVE_LOW, IPT_UNKNOWN )
+ PORT_BIT( 0x0400, IP_ACTIVE_LOW, IPT_UNKNOWN )
+ PORT_BIT( 0x0800, IP_ACTIVE_LOW, IPT_UNKNOWN )
+ PORT_BIT( 0x1000, IP_ACTIVE_LOW, IPT_START1 )
+ PORT_BIT( 0x2000, IP_ACTIVE_LOW, IPT_START2 )
+ PORT_BIT( 0x4000, IP_ACTIVE_LOW, IPT_UNKNOWN )
+ PORT_BIT( 0x8000, IP_ACTIVE_LOW, IPT_UNKNOWN )
+
+ PORT_START_TAG("IN2")
+ PORT_SERVICE_NO_TOGGLE(0x01, IP_ACTIVE_LOW)
+ PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_SERVICE1 )
+ PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_COIN1 )
+ PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_COIN2 )
+ PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_UNKNOWN )
+ PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_UNKNOWN )
+ PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_UNKNOWN )
+ PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_UNKNOWN )
+
+ /* Gun inputs (real range is 0-0xffff: we use standard 0-255 and shift later) */
+
+ PORT_START_TAG("IN3") /* IN 3, P1X */
+ PORT_BIT( 0xff, 0x80, IPT_LIGHTGUN_X ) PORT_CROSSHAIR(X, -1.0, 0.0, 0) PORT_SENSITIVITY(20) PORT_KEYDELTA(25) PORT_REVERSE PORT_PLAYER(1)
+
+ PORT_START_TAG("IN4") /* IN 4, P1Y */
+ PORT_BIT( 0xff, 0x80, IPT_LIGHTGUN_Y ) PORT_CROSSHAIR(Y, 1.0, 0.0, 0) PORT_SENSITIVITY(20) PORT_KEYDELTA(25) PORT_PLAYER(1)
+
+ PORT_START_TAG("IN5") /* IN 5, P2X */
+ PORT_BIT( 0xff, 0x80, IPT_LIGHTGUN_X ) PORT_CROSSHAIR(X, -1.0, 0.0, 0) PORT_SENSITIVITY(20) PORT_KEYDELTA(25) PORT_REVERSE PORT_PLAYER(2)
+
+ PORT_START_TAG("IN6") /* IN 6, P2Y */
+ PORT_BIT( 0xff, 0x80, IPT_LIGHTGUN_Y ) PORT_CROSSHAIR(Y, 1.0, 0.0, 0) PORT_SENSITIVITY(20) PORT_KEYDELTA(25) PORT_PLAYER(2)
+
+ PORT_START_TAG("FAKE")
+ PORT_BIT( 0x01, 0x00, IPT_DIPSWITCH_NAME ) PORT_NAME("Show gun target") PORT_CODE(KEYCODE_F1) PORT_TOGGLE
+ PORT_DIPSETTING( 0x00, DEF_STR( No ) )
+ PORT_DIPSETTING( 0x01, DEF_STR( Yes ) )
+INPUT_PORTS_END
+
+
+
+/**********************************************************
+ GFX DECODING
+**********************************************************/
+
+static const gfx_layout tile16x16_layout =
+{
+ 16,16, /* 16*16 sprites */
+ RGN_FRAC(1,2),
+ 5, /* 5 bits per pixel */
+ { RGN_FRAC(1,2), 0, 8, 16, 24 },
+ { 32, 33, 34, 35, 36, 37, 38, 39, 0, 1, 2, 3, 4, 5, 6, 7 },
+ { 0*64, 1*64, 2*64, 3*64, 4*64, 5*64, 6*64, 7*64,
+ 8*64, 9*64, 10*64, 11*64, 12*64, 13*64, 14*64, 15*64 },
+ 64*16 /* every sprite takes 128 consecutive bytes */
+};
+
+static const gfx_layout charlayout =
+{
+ 16,16, /* 16*16 characters */
+ RGN_FRAC(1,1),
+ 4, /* 4 bits per pixel */
+ { 0, 1, 2, 3 },
+ { 1*4, 0*4, 5*4, 4*4, 3*4, 2*4, 7*4, 6*4, 9*4, 8*4, 13*4, 12*4, 11*4, 10*4, 15*4, 14*4 },
+ { 0*64, 1*64, 2*64, 3*64, 4*64, 5*64, 6*64, 7*64, 8*64, 9*64, 10*64, 11*64, 12*64, 13*64, 14*64, 15*64 },
+ 128*8 /* every sprite takes 128 consecutive bytes */
+};
+
+static const gfx_layout pivlayout =
+{
+ 8,8, /* 8*8 characters */
+ RGN_FRAC(1,2),
+ 6, /* 4 bits per pixel */
+ { RGN_FRAC(1,2), RGN_FRAC(1,2)+1, 0, 1, 2, 3 },
+ { 2*4, 3*4, 0*4, 1*4, 6*4, 7*4, 4*4, 5*4 },
+ { 0*32, 1*32, 2*32, 3*32, 4*32, 5*32, 6*32, 7*32 },
+ 32*8 /* every sprite takes 32 consecutive bytes */
+};
+
+static GFXDECODE_START( undrfire )
+ GFXDECODE_ENTRY( REGION_GFX2, 0x0, tile16x16_layout, 0, 512 )
+ GFXDECODE_ENTRY( REGION_GFX1, 0x0, charlayout, 0, 512 )
+ GFXDECODE_ENTRY( REGION_GFX3, 0x0, pivlayout, 0, 512 )
+GFXDECODE_END
+
+
+/***********************************************************
+ MACHINE DRIVERS
+***********************************************************/
+
+static MACHINE_RESET( undrfire )
+{
+ taito_f3_soundsystem_reset();
+
+ f3_68681_reset();
+}
+
+
+static INTERRUPT_GEN( undrfire_interrupt )
+{
+ frame_counter^=1;
+ cpunum_set_input_line(0, 4, HOLD_LINE);
+}
+
+static MACHINE_DRIVER_START( undrfire )
+
+ /* basic machine hardware */
+ MDRV_CPU_ADD(M68EC020, 16000000) /* 16 MHz */
+ MDRV_CPU_PROGRAM_MAP(undrfire_readmem,undrfire_writemem)
+ MDRV_CPU_VBLANK_INT(undrfire_interrupt,1)
+
+ TAITO_F3_SOUND_SYSTEM_CPU(16000000)
+
+ MDRV_SCREEN_REFRESH_RATE(60)
+ MDRV_SCREEN_VBLANK_TIME(DEFAULT_60HZ_VBLANK_DURATION)
+
+ MDRV_MACHINE_RESET(undrfire)
+ MDRV_NVRAM_HANDLER(undrfire)
+
+ /* video hardware */
+ MDRV_VIDEO_ATTRIBUTES(VIDEO_TYPE_RASTER)
+ MDRV_SCREEN_FORMAT(BITMAP_FORMAT_INDEXED16)
+ MDRV_SCREEN_SIZE(40*8, 32*8)
+ MDRV_SCREEN_VISIBLE_AREA(0, 40*8-1, 3*8, 32*8-1)
+ MDRV_GFXDECODE(undrfire)
+ MDRV_PALETTE_LENGTH(16384)
+
+ MDRV_VIDEO_START(undrfire)
+ MDRV_VIDEO_UPDATE(undrfire)
+
+ /* sound hardware */
+ TAITO_F3_SOUND_SYSTEM_ES5505(30476100/2)
+MACHINE_DRIVER_END
+
+
+
+/***************************************************************************
+ DRIVERS
+***************************************************************************/
+
+ROM_START( undrfire )
+ ROM_REGION( 0x200000, REGION_CPU1, 0 ) /* 2048K for 68020 code (CPU A) */
+ ROM_LOAD32_BYTE( "d67-19", 0x00000, 0x80000, CRC(1d88fa5a) SHA1(5e498efb9535a8f4e82b5525390b8bde7c45c07e) )
+ ROM_LOAD32_BYTE( "d67-18", 0x00001, 0x80000, CRC(f41ae7fd) SHA1(bdd0df01b11205c263d2fa280746826b831d58bc) )
+ ROM_LOAD32_BYTE( "d67-17", 0x00002, 0x80000, CRC(34e030b7) SHA1(62c270c817199a56e647ea74849fe5c07717ac18) )
+ ROM_LOAD32_BYTE( "d67-23", 0x00003, 0x80000, CRC(28e84e0a) SHA1(74c73c6df07d33ef4c0a29f8c1ee1a33eee922da) )
+
+ ROM_REGION( 0x140000, REGION_CPU2, 0 )
+ ROM_LOAD16_BYTE( "d67-20", 0x100000, 0x20000, CRC(974ebf69) SHA1(8a5de503c514bf0da0c956e2dfdf0cfb83ea1f72) )
+ ROM_LOAD16_BYTE( "d67-21", 0x100001, 0x20000, CRC(8fc6046f) SHA1(28522ce5c5900f74d3faa86710256a7201b32500) )
+
+ ROM_REGION( 0x400000, REGION_GFX1, ROMREGION_DISPOSE )
+ ROM_LOAD16_BYTE( "d67-08", 0x000000, 0x200000, CRC(56730d44) SHA1(110872714b3c26a82473c7b80c120918b91b1b4b) ) /* SCR 16x16 tiles */
+ ROM_LOAD16_BYTE( "d67-09", 0x000001, 0x200000, CRC(3c19f9e3) SHA1(7ba8475d37cbf8bf38029124afdf62c915c8668d) )
+
+ ROM_REGION( 0x1000000, REGION_GFX2, ROMREGION_DISPOSE )
+ ROM_LOAD32_BYTE( "d67-03", 0x000003, 0x200000, CRC(3b6e99a9) SHA1(1e0e66763ddfa18a2d291626b245633555092959) ) /* OBJ 16x16 tiles */
+ ROM_LOAD32_BYTE( "d67-04", 0x000002, 0x200000, CRC(8f2934c9) SHA1(ead95b34eec3a6df27199edcbdd5595bc6555a50) )
+ ROM_LOAD32_BYTE( "d67-05", 0x000001, 0x200000, CRC(e2e7dcf3) SHA1(185dbd0489931123a295139dc0a045ad239018fb) )
+ ROM_LOAD32_BYTE( "d67-06", 0x000000, 0x200000, CRC(a2a63488) SHA1(a1ed140cc3757c3c05a0a822089c6efc83bf4805) )
+ ROM_LOAD32_BYTE( "d67-07", 0x800000, 0x200000, CRC(189c0ee5) SHA1(de85b39dc67f31ef80800ff6ec9a391652eb12e4) )
+
+ ROM_REGION( 0x400000, REGION_GFX3, ROMREGION_DISPOSE )
+ ROM_LOAD16_BYTE( "d67-10", 0x000000, 0x100000, CRC(d79e6ce9) SHA1(8b38302971816d599cdaa3279cb6395441373c6f) ) /* PIV 8x8 tiles, 6bpp */
+ ROM_LOAD16_BYTE( "d67-11", 0x000001, 0x100000, CRC(7a401bb3) SHA1(47257a6a4b37ec1ceb4e974b776ee3ea30db06fa) )
+ ROM_LOAD ( "d67-12", 0x300000, 0x100000, CRC(67b16fec) SHA1(af0f9f50516331780ef6cfab1e12a23edf87daa7) )
+ ROM_FILL ( 0x200000, 0x100000, 0 )
+
+ ROM_REGION16_LE( 0x80000, REGION_USER1, 0 )
+ ROM_LOAD16_WORD( "d67-13", 0x00000, 0x80000, CRC(42e7690d) SHA1(5f00f3f814653733bf9a5cb010675799de02fa76) ) /* STY, spritemap */
+
+ ROM_REGION16_BE( 0x1000000, REGION_SOUND1, ROMREGION_ERASE00 )
+ ROM_LOAD16_BYTE( "d67-01", 0x000000, 0x200000, CRC(a2f18122) SHA1(640014c6e6d66c59fe0accf370ad3bab9f40429a) ) /* Ensoniq samples */
+ ROM_LOAD16_BYTE( "d67-02", 0xc00000, 0x200000, CRC(fceb715e) SHA1(9326513acb0696669d4f2345649ab37c8c6ed171) )
+ROM_END
+
+
+ROM_START( undrfiru )
+ ROM_REGION( 0x200000, REGION_CPU1, 0 ) /* 2048K for 68020 code (CPU A) */
+ ROM_LOAD32_BYTE( "d67-19", 0x00000, 0x80000, CRC(1d88fa5a) SHA1(5e498efb9535a8f4e82b5525390b8bde7c45c07e) )
+ ROM_LOAD32_BYTE( "d67-18", 0x00001, 0x80000, CRC(f41ae7fd) SHA1(bdd0df01b11205c263d2fa280746826b831d58bc) )
+ ROM_LOAD32_BYTE( "d67-17", 0x00002, 0x80000, CRC(34e030b7) SHA1(62c270c817199a56e647ea74849fe5c07717ac18) )
+ ROM_LOAD32_BYTE( "d67-22", 0x00003, 0x80000, CRC(5fef7e9c) SHA1(03a6ea0715ce8705d74550186b22940f8a49c088) )
+
+ ROM_REGION( 0x140000, REGION_CPU2, 0 )
+ ROM_LOAD16_BYTE( "d67-20", 0x100000, 0x20000, CRC(974ebf69) SHA1(8a5de503c514bf0da0c956e2dfdf0cfb83ea1f72) )
+ ROM_LOAD16_BYTE( "d67-21", 0x100001, 0x20000, CRC(8fc6046f) SHA1(28522ce5c5900f74d3faa86710256a7201b32500) )
+
+ ROM_REGION( 0x400000, REGION_GFX1, ROMREGION_DISPOSE )
+ ROM_LOAD16_BYTE( "d67-08", 0x000000, 0x200000, CRC(56730d44) SHA1(110872714b3c26a82473c7b80c120918b91b1b4b) ) /* SCR 16x16 tiles */
+ ROM_LOAD16_BYTE( "d67-09", 0x000001, 0x200000, CRC(3c19f9e3) SHA1(7ba8475d37cbf8bf38029124afdf62c915c8668d) )
+
+ ROM_REGION( 0x1000000, REGION_GFX2, ROMREGION_DISPOSE )
+ ROM_LOAD32_BYTE( "d67-03", 0x000003, 0x200000, CRC(3b6e99a9) SHA1(1e0e66763ddfa18a2d291626b245633555092959) ) /* OBJ 16x16 tiles */
+ ROM_LOAD32_BYTE( "d67-04", 0x000002, 0x200000, CRC(8f2934c9) SHA1(ead95b34eec3a6df27199edcbdd5595bc6555a50) )
+ ROM_LOAD32_BYTE( "d67-05", 0x000001, 0x200000, CRC(e2e7dcf3) SHA1(185dbd0489931123a295139dc0a045ad239018fb) )
+ ROM_LOAD32_BYTE( "d67-06", 0x000000, 0x200000, CRC(a2a63488) SHA1(a1ed140cc3757c3c05a0a822089c6efc83bf4805) )
+ ROM_LOAD32_BYTE( "d67-07", 0x800000, 0x200000, CRC(189c0ee5) SHA1(de85b39dc67f31ef80800ff6ec9a391652eb12e4) )
+
+ ROM_REGION( 0x400000, REGION_GFX3, ROMREGION_DISPOSE )
+ ROM_LOAD16_BYTE( "d67-10", 0x000000, 0x100000, CRC(d79e6ce9) SHA1(8b38302971816d599cdaa3279cb6395441373c6f) ) /* PIV 8x8 tiles, 6bpp */
+ ROM_LOAD16_BYTE( "d67-11", 0x000001, 0x100000, CRC(7a401bb3) SHA1(47257a6a4b37ec1ceb4e974b776ee3ea30db06fa) )
+ ROM_LOAD ( "d67-12", 0x300000, 0x100000, CRC(67b16fec) SHA1(af0f9f50516331780ef6cfab1e12a23edf87daa7) )
+ ROM_FILL ( 0x200000, 0x100000, 0 )
+
+ ROM_REGION16_LE( 0x80000, REGION_USER1, 0 )
+ ROM_LOAD16_WORD( "d67-13", 0x00000, 0x80000, CRC(42e7690d) SHA1(5f00f3f814653733bf9a5cb010675799de02fa76) ) /* STY, spritemap */
+
+ ROM_REGION16_BE( 0x1000000, REGION_SOUND1, ROMREGION_ERASE00 )
+ ROM_LOAD16_BYTE( "d67-01", 0x000000, 0x200000, CRC(a2f18122) SHA1(640014c6e6d66c59fe0accf370ad3bab9f40429a) ) /* Ensoniq samples */
+ ROM_LOAD16_BYTE( "d67-02", 0xc00000, 0x200000, CRC(fceb715e) SHA1(9326513acb0696669d4f2345649ab37c8c6ed171) )
+ROM_END
+
+ROM_START( undrfirj )
+ ROM_REGION( 0x200000, REGION_CPU1, 0 ) /* 2048K for 68020 code (CPU A) */
+ ROM_LOAD32_BYTE( "d67-19", 0x00000, 0x80000, CRC(1d88fa5a) SHA1(5e498efb9535a8f4e82b5525390b8bde7c45c07e) )
+ ROM_LOAD32_BYTE( "d67-18", 0x00001, 0x80000, CRC(f41ae7fd) SHA1(bdd0df01b11205c263d2fa280746826b831d58bc) )
+ ROM_LOAD32_BYTE( "d67-17", 0x00002, 0x80000, CRC(34e030b7) SHA1(62c270c817199a56e647ea74849fe5c07717ac18) )
+ ROM_LOAD32_BYTE( "d67-16", 0x00003, 0x80000, CRC(c6e62f26) SHA1(6a430916f829a4b0240ccf8477dcbb1f39a26e90) )
+
+ ROM_REGION( 0x140000, REGION_CPU2, 0 )
+ ROM_LOAD16_BYTE( "d67-20", 0x100000, 0x20000, CRC(974ebf69) SHA1(8a5de503c514bf0da0c956e2dfdf0cfb83ea1f72) )
+ ROM_LOAD16_BYTE( "d67-21", 0x100001, 0x20000, CRC(8fc6046f) SHA1(28522ce5c5900f74d3faa86710256a7201b32500) )
+
+ ROM_REGION( 0x400000, REGION_GFX1, ROMREGION_DISPOSE )
+ ROM_LOAD16_BYTE( "d67-08", 0x000000, 0x200000, CRC(56730d44) SHA1(110872714b3c26a82473c7b80c120918b91b1b4b) ) /* SCR 16x16 tiles */
+ ROM_LOAD16_BYTE( "d67-09", 0x000001, 0x200000, CRC(3c19f9e3) SHA1(7ba8475d37cbf8bf38029124afdf62c915c8668d) )
+
+ ROM_REGION( 0x1000000, REGION_GFX2, ROMREGION_DISPOSE )
+ ROM_LOAD32_BYTE( "d67-03", 0x000003, 0x200000, CRC(3b6e99a9) SHA1(1e0e66763ddfa18a2d291626b245633555092959) ) /* OBJ 16x16 tiles */
+ ROM_LOAD32_BYTE( "d67-04", 0x000002, 0x200000, CRC(8f2934c9) SHA1(ead95b34eec3a6df27199edcbdd5595bc6555a50) )
+ ROM_LOAD32_BYTE( "d67-05", 0x000001, 0x200000, CRC(e2e7dcf3) SHA1(185dbd0489931123a295139dc0a045ad239018fb) )
+ ROM_LOAD32_BYTE( "d67-06", 0x000000, 0x200000, CRC(a2a63488) SHA1(a1ed140cc3757c3c05a0a822089c6efc83bf4805) )
+ ROM_LOAD32_BYTE( "d67-07", 0x800000, 0x200000, CRC(189c0ee5) SHA1(de85b39dc67f31ef80800ff6ec9a391652eb12e4) )
+
+ ROM_REGION( 0x400000, REGION_GFX3, ROMREGION_DISPOSE )
+ ROM_LOAD16_BYTE( "d67-10", 0x000000, 0x100000, CRC(d79e6ce9) SHA1(8b38302971816d599cdaa3279cb6395441373c6f) ) /* PIV 8x8 tiles, 6bpp */
+ ROM_LOAD16_BYTE( "d67-11", 0x000001, 0x100000, CRC(7a401bb3) SHA1(47257a6a4b37ec1ceb4e974b776ee3ea30db06fa) )
+ ROM_LOAD ( "d67-12", 0x300000, 0x100000, CRC(67b16fec) SHA1(af0f9f50516331780ef6cfab1e12a23edf87daa7) )
+ ROM_FILL ( 0x200000, 0x100000, 0 )
+
+ ROM_REGION16_LE( 0x80000, REGION_USER1, 0 )
+ ROM_LOAD16_WORD( "d67-13", 0x00000, 0x80000, CRC(42e7690d) SHA1(5f00f3f814653733bf9a5cb010675799de02fa76) ) /* STY, spritemap */
+
+ ROM_REGION16_BE( 0x1000000, REGION_SOUND1, ROMREGION_ERASE00 )
+ ROM_LOAD16_BYTE( "d67-01", 0x000000, 0x200000, CRC(a2f18122) SHA1(640014c6e6d66c59fe0accf370ad3bab9f40429a) ) /* Ensoniq samples */
+ ROM_LOAD16_BYTE( "d67-02", 0xc00000, 0x200000, CRC(fceb715e) SHA1(9326513acb0696669d4f2345649ab37c8c6ed171) )
+ROM_END
+
+
+static READ32_HANDLER( main_cycle_r )
+{
+ int ptr;
+ if ((activecpu_get_sp()&2)==0) ptr=undrfire_ram[(activecpu_get_sp()&0x1ffff)/4];
+ else ptr=(((undrfire_ram[(activecpu_get_sp()&0x1ffff)/4])&0x1ffff)<<16) |
+ (undrfire_ram[((activecpu_get_sp()&0x1ffff)/4)+1]>>16);
+
+ if (activecpu_get_pc()==0x682 && ptr==0x1156)
+ cpu_spinuntil_int();
+
+ return undrfire_ram[0x4f8/4];
+}
+
+static DRIVER_INIT( undrfire )
+{
+ UINT32 offset,i;
+ UINT8 *gfx = memory_region(REGION_GFX3);
+ int size=memory_region_length(REGION_GFX3);
+ int data;
+
+ /* Speedup handlers */
+ memory_install_read32_handler(0, ADDRESS_SPACE_PROGRAM, 0x2004f8, 0x2004fb, 0, 0, main_cycle_r);
+
+ /* make piv tile GFX format suitable for gfxdecode */
+ offset = size/2;
+ for (i = size/2+size/4; i<size; i++)
+ {
+ int d1,d2,d3,d4;
+
+ /* Expand 2bits into 4bits format */
+ data = gfx[i];
+ d1 = (data>>0) & 3;
+ d2 = (data>>2) & 3;
+ d3 = (data>>4) & 3;
+ d4 = (data>>6) & 3;
+
+ gfx[offset] = (d1<<2) | (d2<<6);
+ offset++;
+
+ gfx[offset] = (d3<<2) | (d4<<6);
+ offset++;
+ }
+}
+
+
+GAME( 1993, undrfire, 0, undrfire, undrfire, undrfire, ROT0, "Taito Corporation Japan", "Under Fire (World)", 0 )
+GAME( 1993, undrfiru, undrfire, undrfire, undrfire, undrfire, ROT0, "Taito America Corporation", "Under Fire (US)", 0 )
+GAME( 1993, undrfirj, undrfire, undrfire, undrfire, undrfire, ROT0, "Taito Corporation", "Under Fire (Japan)", 0 )