ajax.zip 模拟器,查看源码: Pocket PC上的MAME，街机模拟器-Source-v9.5.zip_ajax.c - VerySource...

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

machine.c

Functions to emulate general aspects of the machine (RAM, ROM, interrupts,

I/O ports)

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

#include "driver.h"

#include "cpu/m6809/m6809.h"

#include "cpu/z80/z80.h"

#include "cpu/konami/konami.h"

#include "vidhrdw/konamiic.h"

unsigned char *ajax_sharedram;

extern unsigned char ajax_priority;

static int firq_enable;

/*ajax_bankswitch_w:

Handled by the LS273 Octal +ve edge trigger D-type Flip-flop with Reset at H11:

BitDescription

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

7MRB3Selects ROM N11/N12

6CCOUNT2Coin Counter 2(*)

5CCOUNT1Coin Counter 1(*)

4SRESETSlave CPU Reset?

3PRI0Layer Priority Selector

2MRB2

1MRB1 |ROM Bank Select

0MRB0/

(*)The Coin Counters are handled by the Konami Custom 051550

*/

static void ajax_bankswitch_w( int offset, int data )

{

unsigned char *RAM = memory_region(REGION_CPU1);

int bankaddress = 0;

/* rom select */

if (!(data & 0x80))bankaddress += 0x8000;

/* coin counters */

coin_counter_w(0,data & 0x20);

coin_counter_w(1,data & 0x40);

/* priority */

ajax_priority = data & 0x08;

/* bank # (ROMS N11 and N12) */

bankaddress += 0x10000 + (data & 0x07)*0x2000;

cpu_setbank(2,&RAM[bankaddress]);

}

/*ajax_lamps_w:

Handled by the LS273 Octal +ve edge trigger D-type Flip-flop with Reset at B9:

BitDescription

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

7LAMP7 & LAMP8 - Game over lamps (*)

6LAMP3 & LAMP4 - Game over lamps (*)

5LAMP1 - Start lamp (*)

4Control panel quaking (**)

3Joystick vibration (**)

2LAMP5 & LAMP6 - Power up lamps (*)

1LAMP2 - Super weapon lamp (*)

0unused

(*) The Lamps are handled by the M54585P

(**)Vibration/Quaking handled by these chips:

ChipLocationDescription

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

PS2401-4B21???

UPA1452HB22???

LS74H2Dual +ve edge trigger D-type Flip-flop with SET and RESET

LS393C20Dual -ve edge trigger 4-bit Binary Ripple Counter with Resets

*/

static void ajax_lamps_w( int offset, int data )

{

osd_led_w(0,(data & 0x02) >> 1);/* super weapon lamp */

osd_led_w(1,(data & 0x04) >> 2);/* power up lamps */

osd_led_w(5,(data & 0x04) >> 2);/* power up lamps */

osd_led_w(2,(data & 0x20) >> 5);/* start lamp */

osd_led_w(3,(data & 0x40) >> 6);/* game over lamps */

osd_led_w(6,(data & 0x40) >> 6);/* game over lamps */

osd_led_w(4,(data & 0x80) >> 7);/* game over lamps */

osd_led_w(7,(data & 0x80) >> 7);/* game over lamps */

}

/*ajax_ls138_f10:

The LS138 1-of-8 Decoder/Demultiplexer at F10 selects what to do:

AddressR/WDescription

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

0x0000(r)???I think this read is because a CPU core bug

(w)0x0000NSFIRQTrigger FIRQ on the M6809

0x0020AFRWatchdog reset (handled by the 051550)

0x0040(w)SOUNDCause interrupt on the Z80

0x0080(w)SOUNDDATASound code number

0x00c0(w) MBL1Enables the LS273 at H11 (Banking + Coin counters)

0x0100(r) MBL2Enables 2P Inputs reading

0x0140(w) MBL3Enables the LS273 at B9 (Lamps + Vibration)

0x0180(r) MIO1Enables 1P Inputs + DIPSW #1 & #2 reading

0x01c0(r) MIO2Enables DIPSW #3 reading

*/

int ajax_ls138_f10_r( int offset )

{

int data = 0;

switch ((offset & 0x01c0) >> 6){

case 0x00:/* ??? */

data = rand();

break;

case 0x04:/* 2P inputs */

data = readinputport(5);

break;

case 0x06:/* 1P inputs + DIPSW #1 & #2 */

if (offset & 0x02)

data = readinputport(offset & 0x01);

else

data = readinputport(3 + (offset & 0x01));

break;

case 0x07:/* DIPSW #3 */

data = readinputport(2);

break;

default:

if (errorlog) fprintf(errorlog,"%04x: (ls138_f10) read from an unknown address %02xn",cpu_get_pc(), offset);

}

return data;

}

void ajax_ls138_f10_w( int offset, int data )

{

switch ((offset & 0x01c0) >> 6){

case 0x00:/* NSFIRQ + AFR */

if (offset)

watchdog_reset_w(0, data);

else{

if (firq_enable)/* Cause interrupt on slave CPU */

cpu_cause_interrupt(1,M6809_INT_FIRQ);

}

break;

case 0x01:/* Cause interrupt on audio CPU */

cpu_cause_interrupt(2,Z80_IRQ_INT);

break;

case 0x02:/* Sound command number */

soundlatch_w(offset,data);

break;

case 0x03:/* Bankswitch + coin counters + priority*/

ajax_bankswitch_w(0, data);

break;

case 0x05:/* Lamps + Joystick vibration + Control panel quaking */

ajax_lamps_w(0, data);

break;

default:

if (errorlog) fprintf(errorlog,"%04x: (ls138_f10) write %02x to an unknown address %02xn",cpu_get_pc(), data, offset);

}

}

/* Shared RAM between the 052001 and the 6809 (6264SL at I8) */

int ajax_sharedram_r( int offset )

{

return ajax_sharedram[offset];

}

void ajax_sharedram_w( int offset, int data )

{

ajax_sharedram[offset] = data;

}

/*ajax_bankswitch_w_2:

Handled by the LS273 Octal +ve edge trigger D-type Flip-flop with Reset at K14:

BitDescription

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

7unused

6RMRDEnable char ROM reading through the video RAM

5RVOenables 051316 wraparound

4FIRQSTFIRQ control

3SRB3

2SRB2 |

1SRB1 |ROM Bank Select

0SRB0/

*/

void ajax_bankswitch_w_2( int offset, int data )

{

unsigned char *RAM = memory_region(REGION_CPU2);

int bankaddress;

/* enable char ROM reading through the video RAM */

K052109_set_RMRD_line((data & 0x40) ? ASSERT_LINE : CLEAR_LINE);

/* bit 5 enables 051316 wraparound */

K051316_wraparound_enable(0, data & 0x20);

/* FIRQ control */

firq_enable = data & 0x10;

/* bank # (ROMS G16 and I16) */

bankaddress = 0x10000 + (data & 0x0f)*0x2000;

cpu_setbank(1,&RAM[bankaddress]);

}

void ajax_init_machine( void )

{

firq_enable = 1;

}

int ajax_interrupt( void )

{

if (K051960_is_IRQ_enabled())

return KONAMI_INT_IRQ;

else

return ignore_interrupt();

}