diff options
Diffstat (limited to 'trunk/src/mame/drivers/acommand.c')
-rw-r--r-- | trunk/src/mame/drivers/acommand.c | 668 |
1 files changed, 668 insertions, 0 deletions
diff --git a/trunk/src/mame/drivers/acommand.c b/trunk/src/mame/drivers/acommand.c new file mode 100644 index 00000000000..198410306cc --- /dev/null +++ b/trunk/src/mame/drivers/acommand.c @@ -0,0 +1,668 @@ +/******************************************************************************************* + +Alien Command (c) 1993 Jaleco + +driver by Angelo Salese + +Actually same HW as the Cisco Heat ones. + +TODO: +-Understand what "devices" area needs to make this working.It's likely that the upper switches +controls the UFO's and the lower switches the astronauts. +-Back tilemap paging is likely to be incorrect. +-3D Artworks for the UFO's,Astronauts etc. +-Merge to the Cisco Heat driver. + +Notes: +-The real HW is a redemption machine with two guns, similar to the "Cosmo Gang the Video" +(Namco) bonus games. + +m68k irq table vectors +lev 1 : 0x64 : 0000 04f0 - rte +lev 2 : 0x68 : 0000 044a - vblank +lev 3 : 0x6c : 0000 0484 - "dynamic color change" (?) +lev 4 : 0x70 : 0000 04f0 - rte +lev 5 : 0x74 : 0000 04f0 - rte +lev 6 : 0x78 : 0000 04f0 - rte +lev 7 : 0x7c : 0000 04f0 - rte + +=========================================================================================== + +Jaleco Alien Command +Redemption Video Game with Guns + +2/7/99 + +Hardware Specs: 68000 at 12Mhz and OKI6295 + +JALMR17 BIN 524,288 02-07-99 1:17a JALMR17.BIN +JALCF2 BIN 1,048,576 02-07-99 1:10a JALCF2.BIN +JALCF3 BIN 131,072 02-07-99 1:12a JALCF3.BIN +JALCF4 BIN 131,072 02-07-99 1:13a JALCF4.BIN +JALCF5 BIN 524,288 02-07-99 1:15a JALCF5.BIN +JALCF6 BIN 131,072 02-07-99 1:14a JALCF6.BIN +JALGP1 BIN 524,288 02-07-99 1:21a JALGP1.BIN +JALGP2 BIN 524,288 02-07-99 1:24a JALGP2.BIN +JALGP3 BIN 524,288 02-07-99 1:20a JALGP3.BIN +JALGP4 BIN 524,288 02-07-99 1:23a JALGP4.BIN +JALGP5 BIN 524,288 02-07-99 1:19a JALGP5.BIN +JALGP6 BIN 524,288 02-07-99 1:23a JALGP6.BIN +JALGP7 BIN 524,288 02-07-99 1:19a JALGP7.BIN +JALGP8 BIN 524,288 02-07-99 1:22a JALGP8.BIN +JALMR14 BIN 524,288 02-07-99 1:17a JALMR14.BIN +JALCF1 BIN 1,048,576 02-07-99 1:11a JALCF1.BIN + + +*******************************************************************************************/ + +#include "emu.h" +#include "cpu/m68000/m68000.h" +#include "sound/okim6295.h" + + +class acommand_state : public driver_device +{ +public: + acommand_state(const machine_config &mconfig, device_type type, const char *tag) + : driver_device(mconfig, type, tag) , + m_ac_bgvram(*this, "ac_bgvram"), + m_ac_txvram(*this, "ac_txvram"), + m_spriteram(*this, "spriteram"), + m_ac_devram(*this, "ac_devram"){ } + + required_shared_ptr<UINT16> m_ac_bgvram; + required_shared_ptr<UINT16> m_ac_txvram; + required_shared_ptr<UINT16> m_spriteram; + required_shared_ptr<UINT16> m_ac_devram; + tilemap_t *m_tx_tilemap; + tilemap_t *m_bg_tilemap; + UINT16 *m_ac_vregs; + UINT16 m_led0; + UINT16 m_led1; + UINT16 m_ufo_sw1; + UINT16 m_ufo_sw2; + DECLARE_WRITE16_MEMBER(ac_bgvram_w); + DECLARE_WRITE16_MEMBER(ac_txvram_w); + DECLARE_WRITE16_MEMBER(ac_bgscroll_w); + DECLARE_WRITE16_MEMBER(ac_txscroll_w); + DECLARE_READ16_MEMBER(ac_devices_r); + DECLARE_WRITE16_MEMBER(ac_devices_w); + DECLARE_WRITE16_MEMBER(ac_unk2_w); +}; + + + +static TILEMAP_MAPPER( bg_scan ) +{ + /* logical (col,row) -> memory offset */ + return (row & 0x0f) + ((col & 0xff) << 4) + ((row & 0x70) << 8); +} + +static TILE_GET_INFO( ac_get_bg_tile_info ) +{ + acommand_state *state = machine.driver_data<acommand_state>(); + int code = state->m_ac_bgvram[tile_index]; + SET_TILE_INFO( + 1, + code & 0xfff, + (code & 0xf000) >> 12, + 0); +} + +static TILE_GET_INFO( ac_get_tx_tile_info ) +{ + acommand_state *state = machine.driver_data<acommand_state>(); + int code = state->m_ac_txvram[tile_index]; + SET_TILE_INFO( + 0, + code & 0xfff, + (code & 0xf000) >> 12, + 0); +} + +static void draw_sprites(running_machine &machine, bitmap_ind16 &bitmap, const rectangle &cliprect, int priority, int pri_mask) +{ + acommand_state *state = machine.driver_data<acommand_state>(); + UINT16 *spriteram16 = state->m_spriteram; + int offs; + + for (offs = 0;offs < state->m_spriteram.bytes()/2;offs += 8) + { + if (!(spriteram16[offs+0] & 0x1000)) + { + int sx = (spriteram16[offs+3] & 0x0ff); + int code = spriteram16[offs+6]; + int color = spriteram16[offs+7]; + int w = (spriteram16[offs+0] & 0x0f); + int h = ((spriteram16[offs+0] & 0xf0) >> 4); + int sy = (spriteram16[offs+4] & 0x0ff) - ((h+1)*0x10); +/**/ int pri = spriteram16[offs+5]; +/**/ int flipy = ((spriteram16[offs+1] & 0x0200) >> 9); +/**/ int flipx = ((spriteram16[offs+1] & 0x0100) >> 8); + + int xx,yy,x; + int delta = 16; + + flipx ^= state->flip_screen(); + flipy ^= state->flip_screen(); + + if ((pri&pri_mask)!=priority) continue; + + if (state->flip_screen()) + { + sx = 368 - sx; + sy = 240 - sy; + delta = -16; + } + + yy = h; + do + { + x = sx; + xx = w; + do + { + drawgfx_transpen(bitmap,cliprect,machine.gfx[2], + code, + color, + flipx, flipy, + ((x + 16) & 0x1ff) - 16,sy & 0x1ff,15); + + code++; + x += delta; + } while (--xx >= 0); + + sy += delta; + } while (--yy >= 0); + } + } +} + + +static VIDEO_START( acommand ) +{ + acommand_state *state = machine.driver_data<acommand_state>(); + state->m_tx_tilemap = tilemap_create(machine, ac_get_tx_tile_info,tilemap_scan_cols,8,8,512,32); + state->m_bg_tilemap = tilemap_create(machine, ac_get_bg_tile_info,bg_scan,16,16,256,16); + + state->m_ac_vregs = auto_alloc_array(machine, UINT16, 0x80/2); + + state->m_tx_tilemap->set_transparent_pen(15); +} + + +#define LED_ON 0x01c00 +#define LED_OFF 0x00000 +/* + a + --- +f | | b + -g- +e | | c + --- + d +a & 1 +b & 2 +c & 4 +d & 8 +e & 10 +f & 20 +g & 40 +7f +*/ +/* 0 1 2 3 4 5 6 7 8 9 a b c d e f*/ +static const UINT8 led_fill[0x10] = { 0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f,0x00,0x00,0x00,0x00,0x00,0x00}; + +static void draw_led(bitmap_ind16 &bitmap, int x, int y,UINT8 value) +{ + bitmap.plot_box(x, y, 6, 10, 0x00000000); + + /*a*/ + bitmap.pix16(y+0, x+1) = ((led_fill[value] & 0x0001) ? LED_ON : LED_OFF); + bitmap.pix16(y+0, x+2) = ((led_fill[value] & 0x0001) ? LED_ON : LED_OFF); + bitmap.pix16(y+0, x+3) = ((led_fill[value] & 0x0001) ? LED_ON : LED_OFF); + /*b*/ + bitmap.pix16(y+1, x+4) = ((led_fill[value] & 0x0002) ? LED_ON : LED_OFF); + bitmap.pix16(y+2, x+4) = ((led_fill[value] & 0x0002) ? LED_ON : LED_OFF); + bitmap.pix16(y+3, x+4) = ((led_fill[value] & 0x0002) ? LED_ON : LED_OFF); + /*c*/ + bitmap.pix16(y+5, x+4) = ((led_fill[value] & 0x0004) ? LED_ON : LED_OFF); + bitmap.pix16(y+6, x+4) = ((led_fill[value] & 0x0004) ? LED_ON : LED_OFF); + bitmap.pix16(y+7, x+4) = ((led_fill[value] & 0x0004) ? LED_ON : LED_OFF); + /*d*/ + bitmap.pix16(y+8, x+1) = ((led_fill[value] & 0x0008) ? LED_ON : LED_OFF); + bitmap.pix16(y+8, x+2) = ((led_fill[value] & 0x0008) ? LED_ON : LED_OFF); + bitmap.pix16(y+8, x+3) = ((led_fill[value] & 0x0008) ? LED_ON : LED_OFF); + /*e*/ + bitmap.pix16(y+5, x+0) = ((led_fill[value] & 0x0010) ? LED_ON : LED_OFF); + bitmap.pix16(y+6, x+0) = ((led_fill[value] & 0x0010) ? LED_ON : LED_OFF); + bitmap.pix16(y+7, x+0) = ((led_fill[value] & 0x0010) ? LED_ON : LED_OFF); + /*f*/ + bitmap.pix16(y+1, x+0) = ((led_fill[value] & 0x0020) ? LED_ON : LED_OFF); + bitmap.pix16(y+2, x+0) = ((led_fill[value] & 0x0020) ? LED_ON : LED_OFF); + bitmap.pix16(y+3, x+0) = ((led_fill[value] & 0x0020) ? LED_ON : LED_OFF); + /*g*/ + bitmap.pix16(y+4, x+1) = ((led_fill[value] & 0x0040) ? LED_ON : LED_OFF); + bitmap.pix16(y+4, x+2) = ((led_fill[value] & 0x0040) ? LED_ON : LED_OFF); + bitmap.pix16(y+4, x+3) = ((led_fill[value] & 0x0040) ? LED_ON : LED_OFF); +} + + +static SCREEN_UPDATE_IND16( acommand ) +{ + acommand_state *state = screen.machine().driver_data<acommand_state>(); + state->m_bg_tilemap->draw(bitmap, cliprect, 0,0); + draw_sprites(screen.machine(),bitmap,cliprect,0,0); + state->m_tx_tilemap->draw(bitmap, cliprect, 0,0); + + /*Order might be wrong,but these for sure are the led numbers tested*/ + draw_led(bitmap, 0, 20, (state->m_led0 & 0x0f00) >> 8); + draw_led(bitmap, 6, 20, (state->m_led0 & 0x00f0) >> 4); + draw_led(bitmap, 12, 20, (state->m_led0 & 0x000f)); + + draw_led(bitmap, 256-18,20,(state->m_led0 & 0xf000) >> 12); + draw_led(bitmap, 256-12,20,(state->m_led1 & 0xf0) >> 4); + draw_led(bitmap, 256-6,20, (state->m_led1 & 0xf)); + return 0; +} + + +WRITE16_MEMBER(acommand_state::ac_bgvram_w) +{ + COMBINE_DATA(&m_ac_bgvram[offset]); + m_bg_tilemap->mark_tile_dirty(offset); +} + +WRITE16_MEMBER(acommand_state::ac_txvram_w) +{ + COMBINE_DATA(&m_ac_txvram[offset]); + m_tx_tilemap->mark_tile_dirty(offset); +} + +WRITE16_MEMBER(acommand_state::ac_bgscroll_w) +{ + switch(offset) + { + case 0: m_bg_tilemap->set_scrollx(0,data); break; + case 1: m_bg_tilemap->set_scrolly(0,data); break; + case 2: /*BG_TILEMAP priority?*/ break; + } +} + +WRITE16_MEMBER(acommand_state::ac_txscroll_w) +{ + switch(offset) + { + case 0: m_tx_tilemap->set_scrollx(0,data); break; + case 1: m_tx_tilemap->set_scrolly(0,data); break; + case 2: /*TX_TILEMAP priority?*/ break; + } +} + +/******************************************************************************************/ + + +READ16_MEMBER(acommand_state::ac_devices_r) +{ + logerror("(PC=%06x) read at %04x\n",cpu_get_pc(&space.device()),offset*2); + + switch(offset) + { + case 0x0008/2: + /* + --x- ---- ---- ---- Ticket Dispenser - 2 + ---x ---- ---- ---- Ticket Dispenser - 1 + ---- -x-- ---- ---- Right Gun HIT + ---- ---x ---- ---- Left Gun HIT + ---- ---- --x- ---- Service Mode (Toggle) + ---- ---- ---x ---- Service Coin + ---- ---- ---- x--- COIN2 + ---- ---- ---- -x-- COIN1 + ---- ---- ---- --x- (Activate Test) + ---- ---- ---- ---x (Advance through Tests) + */ + return ioport("IN0")->read(); + case 0x0014/2: + case 0x0016/2: + return machine().device<okim6295_device>("oki1")->read(space,0); + case 0x0018/2: + case 0x001a/2: + return machine().device<okim6295_device>("oki2")->read(space,0); + case 0x0040/2: + /* + "Upper switch / Under Switch" + xx-x ---- xx-x xx-x + -x-- ---- ---- ---- Catch Switch - 3 + --x- ---- ---- ---- Lower Switch - 3 + ---x ---- ---- ---- Upper Switch - 3 + ---- -x-- ---- ---- Catch Switch - 2 + ---- --x- ---- ---- Lower Switch - 2 + ---- ---x ---- ---- Upper Switch - 2 + ---- ---- -x-- ---- Catch Switch - 1 + ---- ---- --x- ---- Lower Switch - 1 (active high) + ---- ---- ---x ---- Upper Switch - 1 (active low) + ---- ---- ---- --xx Boss Door - Motor + */ + //22dc8 + { + m_ufo_sw1 = m_ac_devram[offset] & 3; + if(m_ac_devram[offset] & 0x10) + m_ufo_sw1|= 0x10; + if(m_ac_devram[offset] & 0x40) + m_ufo_sw1|= 0x20; + if(m_ac_devram[offset] & 0x100) + m_ufo_sw1|=0x100; + if(m_ac_devram[offset] & 0x400) + m_ufo_sw1|=0x200; + if(m_ac_devram[offset] & 0x1000) + m_ufo_sw1|=0x1000; + if(m_ac_devram[offset] & 0x4000) + m_ufo_sw1|=0x2000; +// if(m_ac_devram[0x0048/2] & 0x0001) +// m_ufo_sw1|=0x0040; +// if(m_ac_devram[0x0048/2] & 0x0004) +// m_ufo_sw1|=0x0400; +// if(m_ac_devram[0x0048/2] & 0x0100) +// m_ufo_sw1|=0x4000; + return m_ufo_sw1; + } + case 0x0044/2: + /* + ---- ---- --x- ---- Lower Switch - 5 + ---- ---- ---x ---- Upper Switch - 5 + ---- ---- ---- --x- Lower Switch - 4 (active high) + ---- ---- ---- ---x Upper Switch - 4 (active low) + */ + { + m_ufo_sw2 = 0; + if(m_ac_devram[offset] & 0x01) + m_ufo_sw2|= 1; + if(m_ac_devram[offset] & 0x04) + m_ufo_sw2|= 2; + if(m_ac_devram[offset] & 0x10) + m_ufo_sw2|=0x10; + if(m_ac_devram[offset] & 0x40) + m_ufo_sw2|=0x20; + return m_ufo_sw2; + } + case 0x0048/2: + return m_ac_devram[offset]; + case 0x005c/2: + /* + xxxx xxxx ---- ---- DIPSW4 + ---- ---- xxxx xxxx DIPSW3 + */ + return ioport("IN1")->read(); + } + return m_ac_devram[offset]; +} + +WRITE16_MEMBER(acommand_state::ac_devices_w) +{ + COMBINE_DATA(&m_ac_devram[offset]); + switch(offset) + { + case 0x00/2: + if (ACCESSING_BITS_0_7) + { + okim6295_device *oki1 = machine().device<okim6295_device>("oki1"); + okim6295_device *oki2 = machine().device<okim6295_device>("oki2"); + oki1->set_bank_base(0x40000 * (data & 0x3)); + oki2->set_bank_base(0x40000 * (data & 0x30) >> 4); + } + break; + case 0x14/2: + case 0x16/2: + if(ACCESSING_BITS_0_7) + { + okim6295_device *oki1 = machine().device<okim6295_device>("oki1"); + oki1->write(space,0,data); + } + break; + case 0x18/2: + case 0x1a/2: + if(ACCESSING_BITS_0_7) + { + okim6295_device *oki2 = machine().device<okim6295_device>("oki2"); + oki2->write(space,0,data); + } + break; + case 0x1c/2: + /*IRQ mask?*/ + break; + case 0x40/2: + break; + case 0x44/2: + break; + case 0x48/2: + break; + case 0x50/2: + m_led0 = m_ac_devram[offset]; + //popmessage("%04x",m_led0); + break; + case 0x54/2: + m_led1 = m_ac_devram[offset]; + //popmessage("%04x",m_led0); + break; + } +} + +/*This is always zero ATM*/ +WRITE16_MEMBER(acommand_state::ac_unk2_w) +{ + if(data) + popmessage("UNK-2 enabled %04x",data); +} + +static ADDRESS_MAP_START( acommand_map, AS_PROGRAM, 16, acommand_state ) + AM_RANGE(0x000000, 0x03ffff) AM_ROM + AM_RANGE(0x082000, 0x082005) AM_WRITE(ac_bgscroll_w) + AM_RANGE(0x082100, 0x082105) AM_WRITE(ac_txscroll_w) + AM_RANGE(0x082208, 0x082209) AM_WRITE(ac_unk2_w) + AM_RANGE(0x0a0000, 0x0a3fff) AM_RAM_WRITE(ac_bgvram_w) AM_SHARE("ac_bgvram") + AM_RANGE(0x0b0000, 0x0b3fff) AM_RAM_WRITE(ac_txvram_w) AM_SHARE("ac_txvram") + AM_RANGE(0x0b8000, 0x0bffff) AM_RAM_WRITE(paletteram_RRRRGGGGBBBBRGBx_word_w) AM_SHARE("paletteram") + AM_RANGE(0x0f0000, 0x0f7fff) AM_RAM + AM_RANGE(0x0f8000, 0x0f8fff) AM_RAM AM_SHARE("spriteram") + AM_RANGE(0x0f9000, 0x0fffff) AM_RAM + AM_RANGE(0x100000, 0x1000ff) AM_READ(ac_devices_r) AM_WRITE(ac_devices_w) AM_SHARE("ac_devram") +ADDRESS_MAP_END + +static INPUT_PORTS_START( acommand ) + PORT_START("IN0") + PORT_BIT( 0x0001, IP_ACTIVE_LOW, IPT_START1 ) + PORT_BIT( 0x0002, IP_ACTIVE_LOW, IPT_START2 ) + PORT_BIT( 0x0004, IP_ACTIVE_LOW, IPT_COIN1 ) + PORT_BIT( 0x0008, IP_ACTIVE_LOW, IPT_COIN2 ) + PORT_BIT( 0x0010, IP_ACTIVE_LOW, IPT_SERVICE1 ) + PORT_SERVICE_NO_TOGGLE( 0x0020, IP_ACTIVE_LOW ) + PORT_DIPNAME( 0x0040, 0x0040, "IN0" ) + PORT_DIPSETTING( 0x0040, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x0000, DEF_STR( On ) ) + PORT_DIPNAME( 0x0080, 0x0080, DEF_STR( Unknown ) ) + PORT_DIPSETTING( 0x0080, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x0000, DEF_STR( On ) ) + PORT_BIT( 0x0100, IP_ACTIVE_LOW, IPT_BUTTON1 ) + PORT_DIPNAME( 0x0200, 0x0200, DEF_STR( Unknown ) ) + PORT_DIPSETTING( 0x0200, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x0000, DEF_STR( On ) ) + PORT_BIT( 0x0400, IP_ACTIVE_LOW, IPT_BUTTON1 ) PORT_PLAYER(2) + PORT_DIPNAME( 0x0800, 0x0800, DEF_STR( Unknown ) ) + PORT_DIPSETTING( 0x0800, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x0000, DEF_STR( On ) ) + PORT_DIPNAME( 0x1000, 0x1000, "Ticket Dispenser - 1" ) + PORT_DIPSETTING( 0x1000, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x0000, DEF_STR( On ) ) + PORT_DIPNAME( 0x2000, 0x2000, "Ticket Dispenser - 2") + PORT_DIPSETTING( 0x2000, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x0000, DEF_STR( On ) ) + PORT_DIPNAME( 0x4000, 0x4000, DEF_STR( Unknown ) ) + PORT_DIPSETTING( 0x4000, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x0000, DEF_STR( On ) ) + PORT_DIPNAME( 0x8000, 0x8000, DEF_STR( Unknown ) ) + PORT_DIPSETTING( 0x8000, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x0000, DEF_STR( On ) ) + + PORT_START("IN1") + PORT_DIPNAME( 0x0001, 0x0001, "IN2" ) + PORT_DIPSETTING( 0x0001, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x0000, DEF_STR( On ) ) + PORT_DIPNAME( 0x0002, 0x0002, DEF_STR( Unknown ) ) + PORT_DIPSETTING( 0x0002, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x0000, DEF_STR( On ) ) + PORT_DIPNAME( 0x0004, 0x0004, DEF_STR( Unknown ) ) + PORT_DIPSETTING( 0x0004, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x0000, DEF_STR( On ) ) + PORT_DIPNAME( 0x0008, 0x0008, DEF_STR( Unknown ) ) + PORT_DIPSETTING( 0x0008, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x0000, DEF_STR( On ) ) + PORT_DIPNAME( 0x0010, 0x0010, DEF_STR( Unknown ) ) + PORT_DIPSETTING( 0x0010, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x0000, DEF_STR( On ) ) + PORT_DIPNAME( 0x0020, 0x0020, DEF_STR( Unknown ) ) + PORT_DIPSETTING( 0x0020, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x0000, DEF_STR( On ) ) + PORT_DIPNAME( 0x0040, 0x0040, DEF_STR( Unknown ) ) + PORT_DIPSETTING( 0x0040, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x0000, DEF_STR( On ) ) + PORT_DIPNAME( 0x0080, 0x0080, DEF_STR( Unknown ) ) + PORT_DIPSETTING( 0x0080, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x0000, DEF_STR( On ) ) + PORT_DIPNAME( 0x0100, 0x0100, DEF_STR( Unknown ) ) + PORT_DIPSETTING( 0x0100, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x0000, DEF_STR( On ) ) + PORT_DIPNAME( 0x0200, 0x0200, DEF_STR( Unknown ) ) + PORT_DIPSETTING( 0x0200, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x0000, DEF_STR( On ) ) + PORT_DIPNAME( 0x0400, 0x0400, DEF_STR( Unknown ) ) + PORT_DIPSETTING( 0x0400, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x0000, DEF_STR( On ) ) + PORT_DIPNAME( 0x0800, 0x0800, DEF_STR( Unknown ) ) + PORT_DIPSETTING( 0x0800, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x0000, DEF_STR( On ) ) + PORT_DIPNAME( 0x1000, 0x1000, DEF_STR( Unknown ) ) + PORT_DIPSETTING( 0x1000, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x0000, DEF_STR( On ) ) + PORT_DIPNAME( 0x2000, 0x2000, DEF_STR( Unknown ) ) + PORT_DIPSETTING( 0x2000, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x0000, DEF_STR( On ) ) + PORT_DIPNAME( 0x4000, 0x4000, DEF_STR( Unknown ) ) + PORT_DIPSETTING( 0x4000, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x0000, DEF_STR( On ) ) + PORT_DIPNAME( 0x8000, 0x8000, DEF_STR( Unknown ) ) + PORT_DIPSETTING( 0x8000, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x0000, DEF_STR( On ) ) +INPUT_PORTS_END + +static const gfx_layout charlayout = +{ + 8,8, + RGN_FRAC(1,1), + 4, + { 0, 1, 2, 3 }, + { 0*4, 1*4, 2*4, 3*4, 4*4, 5*4, 6*4, 7*4 }, + { 0*32, 1*32, 2*32, 3*32, 4*32, 5*32, 6*32, 7*32 }, + 32*8 +}; + +static const gfx_layout tilelayout = +{ + 16,16, + RGN_FRAC(1,1), + 4, + { 0, 1, 2, 3 }, + { 0*4, 1*4, 2*4, 3*4, 4*4, 5*4, 6*4, 7*4, + 16*32+0*4, 16*32+1*4, 16*32+2*4, 16*32+3*4, 16*32+4*4, 16*32+5*4, 16*32+6*4, 16*32+7*4 }, + { 0*32, 1*32, 2*32, 3*32, 4*32, 5*32, 6*32, 7*32, + 8*32, 9*32, 10*32, 11*32, 12*32, 13*32, 14*32, 15*32 }, + 32*32 +}; + +static GFXDECODE_START( acommand ) + GFXDECODE_ENTRY( "gfx1", 0, charlayout, 0x2700, 16 ) /*???*/ + GFXDECODE_ENTRY( "gfx2", 0, tilelayout, 0x0f00, 256 ) + GFXDECODE_ENTRY( "gfx3", 0, tilelayout, 0x1800, 256 ) +GFXDECODE_END + +static TIMER_DEVICE_CALLBACK( acommand_scanline ) +{ + int scanline = param; + + if(scanline == 240) // vblank-out irq + cputag_set_input_line(timer.machine(), "maincpu", 2, HOLD_LINE); + + if(scanline == 0) // vblank-in irq? (update palette and layers) + cputag_set_input_line(timer.machine(), "maincpu", 3, HOLD_LINE); +} + +static MACHINE_CONFIG_START( acommand, acommand_state ) + + /* basic machine hardware */ + MCFG_CPU_ADD("maincpu",M68000,12000000) + MCFG_CPU_PROGRAM_MAP(acommand_map) + MCFG_TIMER_ADD_SCANLINE("scantimer", acommand_scanline, "screen", 0, 1) + + /* video hardware */ + MCFG_SCREEN_ADD("screen", RASTER) + MCFG_SCREEN_REFRESH_RATE(60) + MCFG_SCREEN_VBLANK_TIME(ATTOSECONDS_IN_USEC(0)) + MCFG_SCREEN_SIZE(32*8, 32*8) + MCFG_SCREEN_VISIBLE_AREA(0*8, 32*8-1, 2*8, 30*8-1) + MCFG_SCREEN_UPDATE_STATIC(acommand) + + MCFG_GFXDECODE(acommand) + MCFG_PALETTE_LENGTH(0x4000) + + MCFG_VIDEO_START(acommand) + + /* sound hardware */ + MCFG_SPEAKER_STANDARD_STEREO("lspeaker", "rspeaker") + + MCFG_OKIM6295_ADD("oki1", 2112000, OKIM6295_PIN7_HIGH) // clock frequency & pin 7 not verified + MCFG_SOUND_ROUTE(ALL_OUTPUTS, "lspeaker", 1.0) + MCFG_SOUND_ROUTE(ALL_OUTPUTS, "rspeaker", 1.0) + + MCFG_OKIM6295_ADD("oki2", 2112000, OKIM6295_PIN7_HIGH) // clock frequency & pin 7 not verified + MCFG_SOUND_ROUTE(ALL_OUTPUTS, "lspeaker", 1.0) + MCFG_SOUND_ROUTE(ALL_OUTPUTS, "rspeaker", 1.0) +MACHINE_CONFIG_END + +/*************************************************************************** + + Game driver(s) + +***************************************************************************/ + +ROM_START( acommand ) + ROM_REGION( 0x040000, "maincpu", 0 ) + ROM_LOAD16_BYTE( "jalcf3.bin", 0x000000, 0x020000, CRC(f031abf7) SHA1(e381742fd6a6df4ddae42ddb3a074a55dc550b3c) ) + ROM_LOAD16_BYTE( "jalcf4.bin", 0x000001, 0x020000, CRC(dd0c0540) SHA1(3e788fcb30ae725bd0ec9b57424e3946db1e946f) ) + + ROM_REGION( 0x20000, "gfx1", 0 ) /* BG0 */ + ROM_LOAD( "jalcf6.bin", 0x000000, 0x020000, CRC(442173d6) SHA1(56c02bc2761967040127977ecabe844fc45e2218) ) + + ROM_REGION( 0x080000, "gfx2", 0 ) /* BG1 */ + ROM_LOAD( "jalcf5.bin", 0x000000, 0x080000, CRC(ff0be97f) SHA1(5ccab778318dec30849d7b7f25091d4aab8bde32) ) + + ROM_REGION( 0x400000, "gfx3", 0 ) /* SPR */ + ROM_LOAD16_BYTE( "jalgp1.bin", 0x000000, 0x080000, CRC(c4aeeae2) SHA1(ee0d3dd93a604f8e1a96b55c4a1cd001d49f1157) ) + ROM_LOAD16_BYTE( "jalgp2.bin", 0x000001, 0x080000, CRC(f0e4e80e) SHA1(08252ef8b5e309cce2d4654410142f4ae9e3ef22) ) + ROM_LOAD16_BYTE( "jalgp3.bin", 0x100000, 0x080000, CRC(7acebd83) SHA1(64be95186d62003b637fcdf45a9c0b7aab182116) ) + ROM_LOAD16_BYTE( "jalgp4.bin", 0x100001, 0x080000, CRC(6a6b72f3) SHA1(3ba359b1a89eb3f6664ed83d93f79d7f895d4222) ) + ROM_LOAD16_BYTE( "jalgp5.bin", 0x200000, 0x080000, CRC(65ab751d) SHA1(f2cb8701eb8c3567a1d03248e6918c5a7b5df939) ) + ROM_LOAD16_BYTE( "jalgp6.bin", 0x200001, 0x080000, CRC(24e3ab23) SHA1(d1431688e1518ba52935f6ab44b815975bec4c27) ) + ROM_LOAD16_BYTE( "jalgp7.bin", 0x300000, 0x080000, CRC(44b71098) SHA1(a6ec2573f9a266d4f8f315f6e99b12525011f512) ) + ROM_LOAD16_BYTE( "jalgp8.bin", 0x300001, 0x080000, CRC(ce0b7838) SHA1(46e34971cb62565a3948d8c0a18086648c32e13b) ) + + ROM_REGION( 0x100000, "oki1", 0 ) /* M6295 samples */ + ROM_LOAD( "jalcf2.bin", 0x000000, 0x100000, CRC(b982fd97) SHA1(35ee5b1b9be762ccfefda24d73e329ceea876deb) ) + + ROM_REGION( 0x100000, "oki2", 0 ) /* M6295 samples */ + ROM_LOAD( "jalcf1.bin", 0x000000, 0x100000, CRC(24af21d3) SHA1(f68ab81a6c833b57ae9eef916a1c8578f3d893dd) ) + + ROM_REGION( 0x100000, "user1", 0 ) /* ? these two below are identical*/ + ROM_LOAD( "jalmr14.bin", 0x000000, 0x080000, CRC(9d428fb7) SHA1(02f72938d73db932bd217620a175a05215f6016a) ) + ROM_LOAD( "jalmr17.bin", 0x080000, 0x080000, CRC(9d428fb7) SHA1(02f72938d73db932bd217620a175a05215f6016a) ) +ROM_END + +GAME( 1994, acommand, 0, acommand, acommand, 0, ROT0, "Jaleco", "Alien Command" , GAME_NOT_WORKING | GAME_MECHANICAL) |