Subversion Repositories sqmusic

/***************************************************************************

Capcom System 1

===============

Driver provided by:

Paul Leaman (paul@vortexcomputing.demon.co.uk)

68000 for game, Z80, YM-2151 and OKIM6295 for sound.

68000 clock speeds are unknown for all games (except where commented)

todo: move the bootleg sets with modified hardware into their own

      drivers, like fcrash.c

Notes

-----

- All original PALs are protected. The images loaded in the ROM definitions are

  logically equivalent replacements with a GAL16V8 target. The actual pld types

  found on the boards can also be PAL16P8, PAL16L8 etc.

- There are five PALs on the A-Board, they are the same across all A-Board

  revisions, but their location varies.

  The A-Boards are interchangeable, so the IC locations are not specified in

  the ROM definitions and are listed here instead:

  PAL ID  88617A  89626A

  ------  ------  ------

  PRG1    12H     9K

  IOA1    12F     4A

  BUF1    16H     13K

  ROM1    15H     14K

  SOU1    13E     10F

  For Q-Sound games, the A-Board misses the Z80, Oki and amp, which are replaced

  by the D-Board; the SOU1 PAL is missing as well, while PRG1 is replaced by

  PRG2. The other PALs are the same.

- The B-board usually has two PALs (later revisions have three). The first PAL

  is used to map tile codes to the graphics ROMs, and changes from game to game.

  The other doesn't change from game to game and there are only two versions,

  called LWIO and IOB1, which are almost identical, the only difference being

  that outputs o16 and o17 are R/W in IOB1 and Write only in LWIO. Since those

  outputs are not used anyway except that in Forgotten Worlds, one wonders why

  they were changed.

  SF2 revision "E" World and USA 910228 maps CPS-B at 8001C0 instead of 800140

  and seems to be the only one that uses the IOB2 and C632B PALs instead of the

  IOB1 and C632, while STF29 PAL is confirmed to be the same as the other SF2 sets.

  pin 1  CN2 D9  = /IOCS (i.e. address 8xxxxx)

  pin 2  CN2 D7  = /RDB

  pin 3  CN2 C6  = /UDSWR

  pin 4  CN2 D6  = /LDSWR

  pin 5  CN2 C19 = A8

  pin 6  CN2 C20 = A7

  pin 7  CN2 C21 = A6

  pin 8  CN2 C22 = A5

  pin 9  CN2 C23 = A4

  pin 10 GND

  pin 11 CN2 C24 = A3

  pin 12 CN2 C25 = A2

  LWIO:

  /o19 = /i1 * /i2 * /i5 * /i6 *  i7 *  i8 * /i9            800060-80006f R    not used

  /o18 = /i1 * /i2 * /i5 * /i6 *  i7 * /i8 *  i9            800050-80005f R    forgotten worlds dial (on 88618B & 88621B B-boards)

   o17 = /i1 * /i4 * /i5 * /i6 *  i7 * /i8 * /i9 * /i11     800040-800047 W    forgotten worlds dial (on 88618B & 88621B B-boards)

   o16 = /i1 * /i4 * /i5 * /i6 *  i7 * /i8 * /i9 *  i11     800048-80004f W    forgotten worlds dial (on 88618B & 88621B B-boards)

  /o15 = /i1 *  i5 * /i6 *  i7                              800140-80017f R/W  CPS-B

  /o14 = /i1 * /i4 * /i5 * /i6 * /i7 *  i8 *  i9 * /i11     800030-800037 W    not used (overlaps coinctrl on A-board)

  /o13 = /i1 * /i2 * /i5 * /i6 * /i7 * /i8 * /i9 *  i11     800008-80000f R    not used

  /o12 = /i1 * /i2 * /i5 * /i6 * /i7 * /i8 *  i9 *  i11     800018-80001f R    not used (overlaps system/dsw inputs on A-board)

  IOB1:

  /o19 = /i1 * /i2 * /i5 * /i6 *  i7 *  i8 * /i9            800060-80006f R    not used

  /o18 = /i1 * /i2 * /i5 * /i6 *  i7 * /i8 *  i9            800050-80005f R    not used

   o17 = /i1 * /i5 * /i6 *  i7 * /i8 * /i9 * /i11           800040-800047 R/W  not used

   o16 = /i1 * /i5 * /i6 *  i7 * /i8 * /i9 *  i11           800048-80004f R/W  not used

  /o15 = /i1 *  i5 * /i6 *  i7                              800140-80017f R/W  CPS-B

  /o14 = /i1 * /i4 * /i5 * /i6 * /i7 *  i8 *  i9 * /i11     800030-800037 W    not used (overlaps coinctrl on A-board)

  /o13 = /i1 * /i2 * /i5 * /i6 * /i7 * /i8 * /i9 *  i11     800008-80000f R    not used

  /o12 = /i1 * /i2 * /i5 * /i6 * /i7 * /i8 *  i9 *  i11     800018-80001f R    not used (overlaps system/dsw inputs on A-board)

Stephh's notes (based on the games M68000 code and some tests) :

1) 'forgottn' and clones

  - Keys in the "scroll 1 test" screen :

      * P1 UP    : char code += 0x0200

      * P1 DOWN  : char code -= 0x0200

      * P1 RIGHT : attribute ^= 0x20 ; also affects Hflip

      * P1 LEFT  : attribute ^= 0x40 ; also affects Vflip

      * P1 button 1 : (attribute++) & 0x1f ; also affects color

      * P1 button 2 : (attribute--) & 0x1f ; also affects color

2) 'ghouls' and clones

2a) 'ghouls'

  - NO debug features

2b) 'ghoulsu'

  - How to activate the debug features :

      * set "Game Mode" Dip Switch to "Game"

      * set both "Coin A" and "Coin B" Dip Switches to 1C_1C

      * reset the game (F3 key)

      * insert a coin

      * set "Game Mode" Dip Switch to "Test"

      * set the debug Dip Switches to what you want

      * start a 1 player game

  - Some debug features :

      * "Armor on New Life" is effective at the beginning of a new life

        Note that even when you start without armor, you need to be hit twice

      * "Starting Weapon" is effective only when you start a new game

        or when you continue play

      * "Starting Level" is effective only when you start a new game

        (you must NOT continue play !)

      * "Slow Motion" and "Invulnerability" can be changed at any time

2c) 'daimakai'

  - NO debug features

  - Different Dip Switches than in 'ghouls'

3) 'strider' and clones

  - TO DO !

4) 'dynwar' and clones

4a) 'dynwar'

  - According to code at 0x0125fa and 0x012634, bits 0 and 1 of DSWC also affect the energy cost

    (table at 0x012662) when you press button 3 ("tactics" in the manual) :

    bit 0  bit 1    cost         possible BCD values (based on kind of "tactics")

     OFF    OFF     normal       0x10 (rockslide) 0x08 (ambush) 0x14 (flame) 0x12 (explosion)

     ON     OFF     very low     0x03             0x02          0x05         0x04

     OFF    ON      low          0x06             0x04          0x10         0x08

     ON     ON      high         0x13             0x10          0x19         0x16

    So IMO, there might be an ingame bug at 0x000c7e which should read bits 2 and 3 of DSWC

    (instead of having them unused) :

    000C7E: 0240 0003                andi.w  #$3, D0

    should be

    000C7E: 0240 000c                andi.w  #$c, D0

    However, only bits 4 to 7 are tested while you are in the "test mode".

    Note that code at 0x000c7e is only executed once when you reset the machine;

    this means that you can change the "Freeze" and "Turbo Mode" Dip Switches before

    reseting the game to change the energy cost settings, then put them back to "Off"

    after the startup routine (when screen is black) so you can play the game.

  - Both "Coin A" and "Coin B" Dip Switches must be set to "2 Coins/1 Credit" to make

    this mode available. If only one Dip Switch is set to it, it is the same as 2C_1C.

4b) 'dynwarj'

  - The "energy cost" bug also exists in this version as well as code at 0x000c7e;

    in fact, only code that reads these settings is at a different address :

    check code at 0x01267a and 0x0126b4 and table at 0x0126e2.

  - Both "Coin A" and "Coin B" Dip Switches must be set to "2 Coins/1 Credit" to make

    this mode available. If only one Dip Switch is set to it, it is the same as 2C_1C.

5) 'willow' and clones

  - How to activate the debug features :

      * set "Game Mode" Dip Switch to "Game"

      * set both "Coin A" and "Coin B" Dip Switches to 1C_1C

      * reset the game (F3 key)

      * insert a coin

      * set "Game Mode" Dip Switch to "Test"

      * set the debug Dip Switches to what you want

      * start a 1 player game

  - Some debug features :

      * "Starting Level" is effective only when you start a new game

        (you must NOT continue play !)

      * Once you set "Maximum magic/sword power" to "On", setting it to "Off" won't have

        any effect until you start a new game (you must NOT continue play !)

      * "Slow Motion Delay" is effective only when "Slow Motion" is set to "On"

      * Even if "Freeze" Dip Switch is set to "On" a message will be displayed to its end.

      * I can't tell what kind of infos are displayed when "Display Debug Infos"

        Dip Switch is sry to "On" :( Any hint about them are welcome !

  - Both "Coin A" and "Coin B" Dip Switches must be set to "2 Coins/1 Credit" to make

    this mode available. If only one Dip Switch is set to it, it is the same as 2C_1C.

  - When the "Stage Magic Continue" Dip Switch is set to "On", your magic and sword power

    will be increased at the end of the level if you haven't bought the magic/sword item.

    But you won't notice this before you use the character again.

    For example, magic power will be increased at the end of level 1 but you won't notice

    it before level 3, and sword power will be increased at the end of level 2 but you

    won't notice it before level 4.

6) 'ganbare'

  - Using the payout setting dip switch results in some occasional hopper errors, if this

    happens, then the clear ram dip switch needs to be used. This needs to be resolved.

TO DO (2006.09.20) :

  - Check 'strider' and its clones and add debug features

  - Check other games to see if there are some debug or hidden features

  - Add addresses from routines with debug features in the notes

  - Look at what IN2 and IN3 do for the following sets :

      * 'cworld2j' (IN2 only)

      * 'qad' and 'qadjr'

      * 'qtono2j'

  - Check daimakar dip switches. E.g. changing the number of lives also changes the

    starting level.

Stephh's log (2006.09.20) :

  - Changed the "readinputport" reads by "readinputportbytag" reads.

    This way, inputs and Dip Switch can be in any order

    (and I don't have the nasty conditional Dip Switch bug).

    BTW, I've slightly changed the read memory map :

      * one handler for the 3 Dip Switches banks : cps1_dsw_r

      * one handler for the system inputs (IN0) : cps1_in0_r

      * one handler for the player inputs (IN1) : cps1_in1_r

      * renamed cps1_input2_r to cps_in2_r

      * renamed cps1_input3_r to cps_in3_r

  - Applied these changes to src/drivers/fcrash.c as well.

  - Added debug features in the following sets :

      * 'ghoulsu'

      * 'willow', 'willowo' and 'willowj'

  - Checked sets with no debug features :

      * 'forgottnua' and 'lostwrld'

      * 'ghouls' and 'daimakai'

      * 'dynwar' and 'dynwarj'

2008-07:

  - replaced input read handler with direct AM_READ_PORT where suitable

***************************************************************************/

#include "emu.h"

#include "cpu/z80/z80.h"

#include "cpu/pic16c5x/pic16c5x.h"

#include "cpu/m68000/m68000.h"

#include "machine/eeprom.h"

#include "sound/2151intf.h"

#include "sound/okim6295.h"

#include "sound/qsound.h"

#include "sound/msm5205.h"

#include "machine/timekpr.h"

#include "includes/cps1.h"       /* External CPS1 definitions */

READ16_MEMBER(cps_state::cps1_dsw_r)

{

        static const char *const dswname[] = { "IN0", "DSWA", "DSWB", "DSWC" };

        int in = ioport(dswname[offset])->read();

        return (in << 8) | 0xff;

}

READ16_MEMBER(cps_state::cps1_hack_dsw_r)

{

        static const char *const dswname[] = { "IN0", "DSWA", "DSWB", "DSWC" };

        int in = ioport(dswname[offset])->read();

        return (in << 8) | in;

}

READ16_MEMBER(cps_state::forgottn_dial_0_r)

{

        return ((ioport("DIAL0")->read() - m_dial[0]) >> (8 * offset)) & 0xff;

}

READ16_MEMBER(cps_state::forgottn_dial_1_r)

{

        return ((ioport("DIAL1")->read() - m_dial[1]) >> (8 * offset)) & 0xff;

}

WRITE16_MEMBER(cps_state::forgottn_dial_0_reset_w)

{

        m_dial[0] = ioport("DIAL0")->read();

}

WRITE16_MEMBER(cps_state::forgottn_dial_1_reset_w)

{

        m_dial[1] = ioport("DIAL1")->read();

}

WRITE8_MEMBER(cps_state::cps1_snd_bankswitch_w)

{

        membank("bank1")->set_entry(data & 0x01);

}

WRITE8_MEMBER(cps_state::cps1_oki_pin7_w)

{

        device_t *device = machine().device("oki");

        downcast<okim6295_device *>(device)->set_pin7(data & 1);

}

WRITE16_MEMBER(cps_state::cps1_soundlatch_w)

{

        if (ACCESSING_BITS_0_7)

                soundlatch_byte_w(space, 0, data & 0xff);

}

WRITE16_MEMBER(cps_state::cps1_soundlatch2_w)

{

        if (ACCESSING_BITS_0_7)

                soundlatch2_byte_w(space, 0, data & 0xff);

}

WRITE16_MEMBER(cps_state::cps1_coinctrl_w)

{

        if (ACCESSING_BITS_8_15)

        {

                coin_counter_w(machine(), 0, data & 0x0100);

                coin_counter_w(machine(), 1, data & 0x0200);

                coin_lockout_w(machine(), 0, ~data & 0x0400);

                coin_lockout_w(machine(), 1, ~data & 0x0800);

                // bit 15 = CPS-A custom reset?

        }

}

WRITE16_MEMBER(cps_state::cpsq_coinctrl2_w)

{

        if (ACCESSING_BITS_0_7)

        {

                coin_counter_w(machine(), 2, data & 0x01);

                coin_lockout_w(machine(), 2, ~data & 0x02);

                coin_counter_w(machine(), 3, data & 0x04);

                coin_lockout_w(machine(), 3, ~data & 0x08);

        }

}

INTERRUPT_GEN_MEMBER(cps_state::cps1_interrupt)

{

        /* Strider also has a IRQ4 handler. It is input port related, but the game */

        /* works without it. It is the *only* CPS1 game to have that. */

        /* ...until we found out that ganbare relies on it, see below */

        device.execute().set_input_line(2, HOLD_LINE);

}

TIMER_DEVICE_CALLBACK_MEMBER(cps_state::ganbare_interrupt)

{

        /* not sure on the timing or source of this - the game needs it once per frame, */

        /* otherwise you get a "HARD ERROR" after boot */

        if (param == 0)

                m_maincpu->set_input_line(4, HOLD_LINE);

}

/********************************************************************

*

*  Q Sound

*  =======

*

********************************************************************/

READ16_MEMBER(cps_state::qsound_rom_r)

{

        UINT8 *rom = memregion("user1")->base();

        if (rom)

                return rom[offset] | 0xff00;

        else

        {

                popmessage("%06x: read sound ROM byte %04x", space.device().safe_pc(), offset);

                return 0;

        }

}

READ16_MEMBER(cps_state::qsound_sharedram1_r)

{

        return m_qsound_sharedram1[offset] | 0xff00;

}

WRITE16_MEMBER(cps_state::qsound_sharedram1_w)

{

        if (ACCESSING_BITS_0_7)

                m_qsound_sharedram1[offset] = data;

}

READ16_MEMBER(cps_state::qsound_sharedram2_r)

{

        return m_qsound_sharedram2[offset] | 0xff00;

}

WRITE16_MEMBER(cps_state::qsound_sharedram2_w)

{

        if (ACCESSING_BITS_0_7)

                m_qsound_sharedram2[offset] = data;

}

WRITE8_MEMBER(cps_state::qsound_banksw_w)

{

        /* Z80 bank register for music note data. It's odd that it isn't encrypted though. */

        int bank = data & 0x0f;

        if ((0x10000 + (bank * 0x4000)) >= memregion("audiocpu")->bytes())

        {

                logerror("WARNING: Q sound bank overflow (%02x)\n", data);

                bank = 0;

        }

        membank("bank1")->set_entry(bank);

}

/********************************************************************

*

*  EEPROM

*  ======

*

*   The EEPROM is accessed by a serial protocol using the register

*   0xf1c006

*

********************************************************************/

static const eeprom_interface qsound_eeprom_interface =

{

        7,      /* address bits */

        8,      /* data bits */

        "0110", /*  read command */

        "0101", /* write command */

        "0111"  /* erase command */

};

static const eeprom_interface pang3_eeprom_interface =

{

        6,      /* address bits */

        16,     /* data bits */

        "0110", /*  read command */

        "0101", /* write command */

        "0111"  /* erase command */

};

/*

PAL PRG1 (16P8B @ 12H):

I0 = AS

I1 = /BGACKB

I2 = A23

I3 = A22

I4 = A21

I5 = A20

I6 = A19

I7 = A18

I8 = A17

I9 = A16

n.c.      = pin19 =   ( !I0 &  I1 )

n.c.      = pin18 =   ( !I0 &  I1 )

n.c.      = pin17 = ! (  I0 &  I1 & (!I2 | !I3 | !I4 | !I5 | !I6 | !I7) )

n.c.      = pin16 = ! (  I2 &  I3 &  I4 &  I5 &  I6 &  I7 )

/IOCS     = pin15 = ! (  I0 &  I1 &  I2 & !I3 & !I4 & !I5 )

/ONE WAIT = pin14 = ! (  I0 &  I1 & ( I2 | !I3) )

/databus  = pin13 = ! (  I0 &  I1 & (!I2 | !I3 | !I4 | !I5 | !I6 | !I7) )

/workram  = pin12 = ! (  I0 &  I1 &  I2 &  I3 &  I4 &  I5 &  I6 &  I7 )

In Q-Sound games, PRG1 is replaced by PRG2:

/IOCS     = pin 15 = ! (  I0 &  I1 &  I2 & !I3 & !I4 & !I5 )

/ONE WAIT = pin 14 = ! (  I0 &  I1 & (!I2 | !I3 | !I4 | !I5 | ( I6 &  I7 &  I8 &  I9)) )

/databus  = pin 13 = ! (  I0 &  I1 & (!I2 | !I3 | !I4 | !I5 | (!I6 & !I7 & !I8)) )

/workram  = pin 12 = ! (  I0 &  I1 &  I2 &  I3 &  I4 &  I5 &  I6 &  I7 &  I8 &  I9 )

PAL IOA1 (16P8B @ 12F):

I0 = /IOCS

I1 = /RDB

I2 = /UDSWR

I3 = /LDSWR

I4 = AB8

I5 = AB7

I6 = AB6

I7 = AB5

I8 = AB4

I9 = AB3

player input      = pin19 = ! ( !I0 & !I1 & !I4 & !I5 & !I6 & !I7 & !I8 & !I9 )

system input/dips = pin18 = ! ( !I0 & !I1 & !I4 & !I5 & !I6 & !I7 &  I8 &  I9 )

outputs           = pin17 = ! ( !I0 & !I2 & !I4 & !I5 & !I6 &  I7 &  I8 & !I9 )

sound 1B          = pin16 = ! ( !I0 & !I3 &  I4 &  I5 & !I6 & !I7 & !I8 &  I9 )

sound 0B          = pin15 = ! ( !I0 & !I3 &  I4 &  I5 & !I6 & !I7 & !I8 & !I9 )

n.c.              = pin14 =   ( !I1 & !I2 )

/PPU1             = pin13 = ! ( !I0 &  I4 & !I5 & !I6 )

n.c.              = pin12 =   ( !I1 & !I2 )

PAL BUF1 (16P8B @ 16H):

I0 = A23 (all address lines can come both from 68000 and CPS-A custom)

I1 = A22

I2 = A21

I3 = A20

I4 = A19

I5 = A18

I6 = A17

I7 = A16

I8 = ASB

BUF0 = pin19 = ! ( I0 & !I1 & !I2 &  I3 & !I4 & !I5 & !I6 & !I7 )

BUF1 = pin18 = ! ( I0 & !I1 & !I2 &  I3 & !I4 & !I5 & !I6 &  I7 )

BUF2 = pin17 = ! ( I0 & !I1 & !I2 &  I3 & !I4 & !I5 &  I6 & !I7 )

BUF3 = pin16 = ! ( I0 & !I1 & !I2 &  I3 & !I4 & !I5 &  I6 &  I7 )

BUF4 = pin15 = ! ( I0 & !I1 & !I2 &  I3 & !I4 &  I5 & !I6 & !I7 )

BUF5 = pin14 = ! ( I0 & !I1 & !I2 &  I3 & !I4 &  I5 & !I6 &  I7 )

BUF6 = pin13 = ! ( I0 & !I1 & !I2 &  I3 & !I4 &  I5 &  I6 & !I7 )

/RDB = pin12 =   ( I0 & !I1 & !I2 &  I3 & !I8 )

BUF0-BUF2 are gfxram on A-board. BUF3-BUF6 go to B-board (provision for expansion, never used)

PAL ROM1 (16P8B @ 15H):

I0 = A23 (all address lines can come both from 68000 and CPS-A custom)

I1 = A22

I2 = A21

I3 = A20

I4 = A19

I5 = A18

I6 = A17

I7 = A16

I8 = ASB

PRG0 = pin17 = ! ( !I8 & !I0 & !I1 & !I2 & !I3 & !I4 & !I5 )

PRG1 = pin16 = ! ( !I8 & !I0 & !I1 & !I2 & !I3 & !I4 &  I5 )

PRG2 = pin15 = ! ( !I8 & !I0 & !I1 & !I2 & !I3 &  I4 & !I5 )

PRG3 = pin14 = ! ( !I8 & !I0 & !I1 & !I2 & !I3 &  I4 &  I5 )

PRG4 = pin19 = ! ( !I8 & !I0 & !I1 & !I2 &  I3 & !I4 )

PRG5 = pin18 = ! ( !I8 & !I0 & !I1 & !I2 &  I3 &  I4 )

PRG6 = pin13 = ! ( !I8 & !I0 & !I1 &  I2 & !I3 & !I4 )

/RDB = pin12 =   ( !I8 & !I0 & !I1 )

All PRGx go to B-board. Provision for up to 4MB of ROM space, which was never used in full.

*/

static ADDRESS_MAP_START( main_map, AS_PROGRAM, 16, cps_state )

        AM_RANGE(0x000000, 0x3fffff) AM_ROM

        AM_RANGE(0x800000, 0x800007) AM_READ_PORT("IN1")            /* Player input ports */

        /* forgottn, willow, cawing, nemo, varth read from 800010. Probably debug input leftover from development */

        AM_RANGE(0x800018, 0x80001f) AM_READ(cps1_dsw_r)            /* System input ports / Dip Switches */

        AM_RANGE(0x800020, 0x800021) AM_READNOP                     /* ? Used by Rockman ? not mapped according to PAL */

        AM_RANGE(0x800030, 0x800037) AM_WRITE(cps1_coinctrl_w)

        /* Forgotten Worlds has dial controls on B-board mapped at 800040-80005f. See DRIVER_INIT */

        AM_RANGE(0x800100, 0x80013f) AM_WRITE(cps1_cps_a_w) AM_SHARE("cps_a_regs")  /* CPS-A custom */

        /* CPS-B custom is mapped by the PAL IOB2 on the B-board. SF2 revision "E" World and USA 910228 has it a a different

           address, see DRIVER_INIT */

        AM_RANGE(0x800140, 0x80017f) AM_READWRITE(cps1_cps_b_r, cps1_cps_b_w) AM_SHARE("cps_b_regs")

        AM_RANGE(0x800180, 0x800187) AM_WRITE(cps1_soundlatch_w)    /* Sound command */

        AM_RANGE(0x800188, 0x80018f) AM_WRITE(cps1_soundlatch2_w)   /* Sound timer fade */

        AM_RANGE(0x900000, 0x92ffff) AM_RAM_WRITE(cps1_gfxram_w) AM_SHARE("gfxram") /* SF2CE executes code from here */

        AM_RANGE(0xff0000, 0xffffff) AM_RAM AM_SHARE("mainram")

ADDRESS_MAP_END

/*

PAL SOU1 (16P8 @ 13E):

I0 = /MREQ

I1 = A15

I2 = A14

I3 = A13

I4 = A12

I5 = bank latch

I6 = /RD

I7 = /WR

I8 = /BANK

bank latch = pin19 = ! ( !I0 & !I7 & !I8 )

/SWR       = pin18 = ! ( !I0 & !I7 )

/SRD       = pin17 = ! ( !I0 & !I6 )

ls138      = pin16 = ! ( !I0 &  I1 &  I2 &  I3 &  I4 )

workram    = pin15 = ! ( !I0 &  I1 &  I2 & !I3 &  I4 )

SOUNDA14   = pin14 = ! ( !I0 & ((!I1 & !I2) | ( I1 & !I2 & !I5)) )

SOUNDA15   = pin13 =   (  I1 )

/SOUNDCE   = pin12 = ! ( !I0 & (!I1 | ( I1 & !I2)) )

*/

static ADDRESS_MAP_START( sub_map, AS_PROGRAM, 8, cps_state )

        AM_RANGE(0x0000, 0x7fff) AM_ROM

        AM_RANGE(0x8000, 0xbfff) AM_ROMBANK("bank1")

        AM_RANGE(0xd000, 0xd7ff) AM_RAM

        AM_RANGE(0xf000, 0xf001) AM_DEVREADWRITE("2151", ym2151_device, read, write)

        AM_RANGE(0xf002, 0xf002) AM_DEVREADWRITE("oki", okim6295_device, read, write)

        AM_RANGE(0xf004, 0xf004) AM_WRITE(cps1_snd_bankswitch_w)

        AM_RANGE(0xf006, 0xf006) AM_WRITE(cps1_oki_pin7_w) /* controls pin 7 of OKI chip */

        AM_RANGE(0xf008, 0xf008) AM_READ(soundlatch_byte_r) /* Sound command */

        AM_RANGE(0xf00a, 0xf00a) AM_READ(soundlatch2_byte_r) /* Sound timer fade */

ADDRESS_MAP_END

static ADDRESS_MAP_START( qsound_main_map, AS_PROGRAM, 16, cps_state )

        AM_RANGE(0x000000, 0x1fffff) AM_ROM

        AM_RANGE(0x800000, 0x800007) AM_READ_PORT("IN1")            /* Player input ports */

        AM_RANGE(0x800018, 0x80001f) AM_READ(cps1_dsw_r)            /* System input ports / Dip Switches */

        AM_RANGE(0x800030, 0x800037) AM_WRITE(cps1_coinctrl_w)

        AM_RANGE(0x800100, 0x80013f) AM_WRITE(cps1_cps_a_w) AM_SHARE("cps_a_regs")  /* CPS-A custom */

        AM_RANGE(0x800140, 0x80017f) AM_READWRITE(cps1_cps_b_r, cps1_cps_b_w) AM_SHARE("cps_b_regs")    /* CPS-B custom (mapped by LWIO/IOB1 PAL on B-board) */

        AM_RANGE(0x900000, 0x92ffff) AM_RAM_WRITE(cps1_gfxram_w) AM_SHARE("gfxram") /* SF2CE executes code from here */

        AM_RANGE(0xf00000, 0xf0ffff) AM_READ(qsound_rom_r)          /* Slammasters protection */

        AM_RANGE(0xf18000, 0xf19fff) AM_READWRITE(qsound_sharedram1_r, qsound_sharedram1_w)  /* Q RAM */

        AM_RANGE(0xf1c000, 0xf1c001) AM_READ_PORT("IN2")            /* Player 3 controls (later games) */

        AM_RANGE(0xf1c002, 0xf1c003) AM_READ_PORT("IN3")            /* Player 4 controls ("Muscle Bombers") */

        AM_RANGE(0xf1c004, 0xf1c005) AM_WRITE(cpsq_coinctrl2_w)     /* Coin control2 (later games) */

        AM_RANGE(0xf1c006, 0xf1c007) AM_READ_PORT("EEPROMIN") AM_WRITE_PORT("EEPROMOUT")

        AM_RANGE(0xf1e000, 0xf1ffff) AM_READWRITE(qsound_sharedram2_r, qsound_sharedram2_w)  /* Q RAM */

        AM_RANGE(0xff0000, 0xffffff) AM_RAM AM_SHARE("mainram")

ADDRESS_MAP_END

ADDRESS_MAP_START( qsound_sub_map, AS_PROGRAM, 8, cps_state )   // used by cps2.c too

        AM_RANGE(0x0000, 0x7fff) AM_ROM

        AM_RANGE(0x8000, 0xbfff) AM_ROMBANK("bank1")    /* banked (contains music data) */

        AM_RANGE(0xc000, 0xcfff) AM_RAM AM_SHARE("qsound_ram1")

        AM_RANGE(0xd000, 0xd002) AM_DEVWRITE("qsound", qsound_device, qsound_w)

        AM_RANGE(0xd003, 0xd003) AM_WRITE(qsound_banksw_w)

        AM_RANGE(0xd007, 0xd007) AM_DEVREAD("qsound", qsound_device, qsound_r)

        AM_RANGE(0xf000, 0xffff) AM_RAM AM_SHARE("qsound_ram2")

ADDRESS_MAP_END

/***********************************************************

             INPUT PORTS, DIPs

***********************************************************/

#define CPS1_COINAGE_1(diploc) \

        PORT_DIPNAME( 0x07, 0x07, DEF_STR( Coin_A ) ) PORT_DIPLOCATION(diploc ":1,2,3") \

        PORT_DIPSETTING(    0x00, DEF_STR( 4C_1C ) ) \

        PORT_DIPSETTING(    0x01, DEF_STR( 3C_1C ) ) \

        PORT_DIPSETTING(    0x02, DEF_STR( 2C_1C ) ) \

        PORT_DIPSETTING(    0x07, DEF_STR( 1C_1C ) ) \

        PORT_DIPSETTING(    0x06, DEF_STR( 1C_2C ) ) \

        PORT_DIPSETTING(    0x05, DEF_STR( 1C_3C ) ) \

        PORT_DIPSETTING(    0x04, DEF_STR( 1C_4C ) ) \

        PORT_DIPSETTING(    0x03, DEF_STR( 1C_6C ) ) \

        PORT_DIPNAME( 0x38, 0x38, DEF_STR( Coin_B ) ) PORT_DIPLOCATION(diploc ":4,5,6") \

        PORT_DIPSETTING(    0x00, DEF_STR( 4C_1C ) ) \

        PORT_DIPSETTING(    0x08, DEF_STR( 3C_1C ) ) \

        PORT_DIPSETTING(    0x10, DEF_STR( 2C_1C ) ) \

        PORT_DIPSETTING(    0x38, DEF_STR( 1C_1C ) ) \

        PORT_DIPSETTING(    0x30, DEF_STR( 1C_2C ) ) \

        PORT_DIPSETTING(    0x28, DEF_STR( 1C_3C ) ) \

        PORT_DIPSETTING(    0x20, DEF_STR( 1C_4C ) ) \

        PORT_DIPSETTING(    0x18, DEF_STR( 1C_6C ) )

#define CPS1_COINAGE_2(diploc) \

        PORT_DIPNAME( 0x07, 0x07, DEF_STR( Coinage ) ) PORT_DIPLOCATION(diploc ":1,2,3") \

        PORT_DIPSETTING(    0x00, DEF_STR( 4C_1C ) ) \

        PORT_DIPSETTING(    0x01, DEF_STR( 3C_1C ) ) \

        PORT_DIPSETTING(    0x02, DEF_STR( 2C_1C ) ) \

        PORT_DIPSETTING(    0x07, DEF_STR( 1C_1C ) ) \

        PORT_DIPSETTING(    0x06, DEF_STR( 1C_2C ) ) \

        PORT_DIPSETTING(    0x05, DEF_STR( 1C_3C ) ) \

        PORT_DIPSETTING(    0x04, DEF_STR( 1C_4C ) ) \

        PORT_DIPSETTING(    0x03, DEF_STR( 1C_6C ) )

#define CPS1_COINAGE_3(diploc) \

        PORT_DIPNAME( 0x07, 0x07, DEF_STR( Coin_A ) ) PORT_DIPLOCATION(diploc ":1,2,3") \

        PORT_DIPSETTING(    0x01, DEF_STR( 4C_1C ) ) \

        PORT_DIPSETTING(    0x02, DEF_STR( 3C_1C ) ) \

        PORT_DIPSETTING(    0x03, DEF_STR( 2C_1C ) ) \

        PORT_DIPSETTING(    0x00, "2 Coins/1 Credit (1 to continue)" ) \

        PORT_DIPSETTING(    0x07, DEF_STR( 1C_1C ) ) \

        PORT_DIPSETTING(    0x06, DEF_STR( 1C_2C ) ) \

        PORT_DIPSETTING(    0x05, DEF_STR( 1C_3C ) ) \

        PORT_DIPSETTING(    0x04, DEF_STR( 1C_4C ) ) \

        PORT_DIPNAME( 0x38, 0x38, DEF_STR( Coin_B ) ) PORT_DIPLOCATION(diploc ":4,5,6") \

        PORT_DIPSETTING(    0x08, DEF_STR( 4C_1C ) ) \

        PORT_DIPSETTING(    0x10, DEF_STR( 3C_1C ) ) \

        PORT_DIPSETTING(    0x18, DEF_STR( 2C_1C ) ) \

        PORT_DIPSETTING(    0x00, "2 Coins/1 Credit (1 to continue)" ) \

        PORT_DIPSETTING(    0x38, DEF_STR( 1C_1C ) ) \

        PORT_DIPSETTING(    0x30, DEF_STR( 1C_2C ) ) \

        PORT_DIPSETTING(    0x28, DEF_STR( 1C_3C ) ) \

        PORT_DIPSETTING(    0x20, DEF_STR( 1C_4C ) )

#define CPS1_DIFFICULTY_1(diploc) \

        PORT_DIPNAME( 0x07, 0x04, DEF_STR( Difficulty ) ) PORT_DIPLOCATION(diploc ":1,2,3") \

        PORT_DIPSETTING(    0x07, "1 (Easiest)" ) \

        PORT_DIPSETTING(    0x06, "2" ) \

        PORT_DIPSETTING(    0x05, "3" ) \

        PORT_DIPSETTING(    0x04, "4 (Normal)" ) \

        PORT_DIPSETTING(    0x03, "5" ) \

        PORT_DIPSETTING(    0x02, "6" ) \

        PORT_DIPSETTING(    0x01, "7" ) \

        PORT_DIPSETTING(    0x00, "8 (Hardest)" )

#define CPS1_DIFFICULTY_2(diploc) \

        PORT_DIPNAME( 0x07, 0x07, DEF_STR( Difficulty ) ) PORT_DIPLOCATION(diploc ":1,2,3") \

        PORT_DIPSETTING(    0x04, "1 (Easiest)" ) \

        PORT_DIPSETTING(    0x05, "2" ) \

        PORT_DIPSETTING(    0x06, "3" ) \

        PORT_DIPSETTING(    0x07, "4 (Normal)" ) \

        PORT_DIPSETTING(    0x03, "5" ) \

        PORT_DIPSETTING(    0x02, "6" ) \

        PORT_DIPSETTING(    0x01, "7" ) \

        PORT_DIPSETTING(    0x00, "8 (Hardest)" )

/* CPS1 games with 2 players and 3 buttons each */

static INPUT_PORTS_START( cps1_3b )

        PORT_START("IN0")

        PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_COIN1 )

        PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_COIN2 )

        PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_SERVICE1 )

        PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_UNKNOWN )

        PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_START1 )

        PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_START2 )

        PORT_SERVICE( 0x40, IP_ACTIVE_LOW )

        PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_UNKNOWN )

        PORT_START("IN1")

        PORT_BIT( 0x0001, IP_ACTIVE_LOW, IPT_JOYSTICK_RIGHT ) PORT_8WAY PORT_PLAYER(1)

        PORT_BIT( 0x0002, IP_ACTIVE_LOW, IPT_JOYSTICK_LEFT ) PORT_8WAY PORT_PLAYER(1)

        PORT_BIT( 0x0004, IP_ACTIVE_LOW, IPT_JOYSTICK_DOWN ) PORT_8WAY PORT_PLAYER(1)

        PORT_BIT( 0x0008, IP_ACTIVE_LOW, IPT_JOYSTICK_UP ) PORT_8WAY PORT_PLAYER(1)

        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_BUTTON3 ) PORT_PLAYER(1)

        PORT_BIT( 0x0080, IP_ACTIVE_LOW, IPT_UNKNOWN )

        PORT_BIT( 0x0100, IP_ACTIVE_LOW, IPT_JOYSTICK_RIGHT ) PORT_8WAY PORT_PLAYER(2)

        PORT_BIT( 0x0200, IP_ACTIVE_LOW, IPT_JOYSTICK_LEFT ) PORT_8WAY PORT_PLAYER(2)