diff options
Diffstat (limited to 'trunk/src/mame/drivers/igs009.c')
-rw-r--r-- | trunk/src/mame/drivers/igs009.c | 835 |
1 files changed, 835 insertions, 0 deletions
diff --git a/trunk/src/mame/drivers/igs009.c b/trunk/src/mame/drivers/igs009.c new file mode 100644 index 00000000000..70a575e61ed --- /dev/null +++ b/trunk/src/mame/drivers/igs009.c @@ -0,0 +1,835 @@ +/*************************************************************************** + + -= IGS009 Based Games =- + + driver by Luca Elia + +CPU : Z180 +Sound : M6295 + YM2413 +Video : IGS009 +NVRAM : Battery for main RAM + +- The hardware is similar to other IGS002 + IGS003 based boards. + The interesting part is the background tilemap, that is designed specifically + for simulating the nine reels of a slot machine. + +***************************************************************************/ + +#include "emu.h" +#include "cpu/z180/z180.h" +#include "machine/8255ppi.h" +#include "sound/2413intf.h" +#include "sound/okim6295.h" +#include "machine/nvram.h" + + +class igs009_state : public driver_device +{ +public: + igs009_state(const machine_config &mconfig, device_type type, const char *tag) + : driver_device(mconfig, type, tag) { } + + tilemap_t *m_gp98_reel1_tilemap; + UINT8 *m_gp98_reel1_ram; + tilemap_t *m_gp98_reel2_tilemap; + UINT8 *m_gp98_reel2_ram; + tilemap_t *m_gp98_reel3_tilemap; + UINT8 *m_gp98_reel3_ram; + tilemap_t *m_gp98_reel4_tilemap; + UINT8 *m_gp98_reel4_ram; + UINT8 *m_fg_tile_ram; + UINT8 *m_fg_color_ram; + UINT8 *m_bg_scroll; + UINT8 *m_bg_scroll2; + tilemap_t *m_fg_tilemap; + int m_video_enable; + int m_nmi_enable; + int m_hopper; + UINT8 m_out[3]; + UINT8 m_igs_magic[2]; +}; + + +/*************************************************************************** + Video Hardware +***************************************************************************/ + + + +static WRITE8_HANDLER( gp98_reel1_ram_w ) +{ + igs009_state *state = space->machine().driver_data<igs009_state>(); + state->m_gp98_reel1_ram[offset] = data; + tilemap_mark_tile_dirty(state->m_gp98_reel1_tilemap,offset); +} + +static TILE_GET_INFO( get_jingbell_reel1_tile_info ) +{ + igs009_state *state = machine.driver_data<igs009_state>(); + int code = state->m_gp98_reel1_ram[tile_index]; + + SET_TILE_INFO( + 0, + (code)+(((tile_index+1)&0x3)*0x100), + (code & 0x80) ? 0xc : 0, + 0); +} + + +static TILE_GET_INFO( get_gp98_reel1_tile_info ) +{ + igs009_state *state = machine.driver_data<igs009_state>(); + int code = state->m_gp98_reel1_ram[tile_index]; + + SET_TILE_INFO( + 0, + (code*4)+(tile_index&0x3), + 0, + 0); +} + + +static WRITE8_HANDLER( gp98_reel2_ram_w ) +{ + igs009_state *state = space->machine().driver_data<igs009_state>(); + state->m_gp98_reel2_ram[offset] = data; + tilemap_mark_tile_dirty(state->m_gp98_reel2_tilemap,offset); +} + +static TILE_GET_INFO( get_jingbell_reel2_tile_info ) +{ + igs009_state *state = machine.driver_data<igs009_state>(); + int code = state->m_gp98_reel2_ram[tile_index]; + + SET_TILE_INFO( + 0, + (code)+(((tile_index+1)&0x3)*0x100), + (code & 0x80) ? 0xc : 0, + 0); +} + +static TILE_GET_INFO( get_gp98_reel2_tile_info ) +{ + igs009_state *state = machine.driver_data<igs009_state>(); + int code = state->m_gp98_reel2_ram[tile_index]; + + SET_TILE_INFO( + 0, + (code*4)+(tile_index&0x3), + 0, + 0); +} + + + +static WRITE8_HANDLER( gp98_reel3_ram_w ) +{ + igs009_state *state = space->machine().driver_data<igs009_state>(); + state->m_gp98_reel3_ram[offset] = data; + tilemap_mark_tile_dirty(state->m_gp98_reel3_tilemap,offset); +} + +static TILE_GET_INFO( get_jingbell_reel3_tile_info ) +{ + igs009_state *state = machine.driver_data<igs009_state>(); + int code = state->m_gp98_reel3_ram[tile_index]; + + SET_TILE_INFO( + 0, + (code)+(((tile_index+1)&0x3)*0x100), + (code & 0x80) ? 0xc : 0, + 0); +} + +static TILE_GET_INFO( get_gp98_reel3_tile_info ) +{ + igs009_state *state = machine.driver_data<igs009_state>(); + int code = state->m_gp98_reel3_ram[tile_index]; + + SET_TILE_INFO( + 0, + (code*4)+(tile_index&0x3), + 0, + 0); +} + + + +static WRITE8_HANDLER( gp98_reel4_ram_w ) +{ + igs009_state *state = space->machine().driver_data<igs009_state>(); + state->m_gp98_reel4_ram[offset] = data; + tilemap_mark_tile_dirty(state->m_gp98_reel4_tilemap,offset); +} + +static TILE_GET_INFO( get_jingbell_reel4_tile_info ) +{ + igs009_state *state = machine.driver_data<igs009_state>(); + int code = state->m_gp98_reel4_ram[tile_index]; + + SET_TILE_INFO( + 0, + (code)+(((tile_index+1)&0x3)*0x100), + (code & 0x80) ? 0xc : 0, + 0); +} + +static TILE_GET_INFO( get_gp98_reel4_tile_info ) +{ + igs009_state *state = machine.driver_data<igs009_state>(); + int code = state->m_gp98_reel4_ram[tile_index]; + + SET_TILE_INFO( + 0, + (code*4)+(tile_index&0x3), + 0, + 0); +} + + + + + + + +static WRITE8_HANDLER( bg_scroll_w ) +{ + igs009_state *state = space->machine().driver_data<igs009_state>(); + state->m_bg_scroll[offset] = data; +// tilemap_set_scrolly(bg_tilemap,offset,data); +} + + +static TILE_GET_INFO( get_fg_tile_info ) +{ + igs009_state *state = machine.driver_data<igs009_state>(); + int code = state->m_fg_tile_ram[tile_index] | (state->m_fg_color_ram[tile_index] << 8); + SET_TILE_INFO(1, code, (4*(code >> 14)+3), 0); +} + +static WRITE8_HANDLER( fg_tile_w ) +{ + igs009_state *state = space->machine().driver_data<igs009_state>(); + state->m_fg_tile_ram[offset] = data; + tilemap_mark_tile_dirty(state->m_fg_tilemap,offset); +} + +static WRITE8_HANDLER( fg_color_w ) +{ + igs009_state *state = space->machine().driver_data<igs009_state>(); + state->m_fg_color_ram[offset] = data; + tilemap_mark_tile_dirty(state->m_fg_tilemap,offset); +} + +static VIDEO_START(jingbell) +{ + igs009_state *state = machine.driver_data<igs009_state>(); + state->m_fg_tilemap = tilemap_create(machine, get_fg_tile_info, tilemap_scan_rows, 8, 8, 0x80,0x20); + tilemap_set_transparent_pen(state->m_fg_tilemap, 0); + + state->m_gp98_reel1_tilemap = tilemap_create(machine,get_jingbell_reel1_tile_info,tilemap_scan_rows,8,32, 128, 8); + state->m_gp98_reel2_tilemap = tilemap_create(machine,get_jingbell_reel2_tile_info,tilemap_scan_rows,8,32, 128, 8); + state->m_gp98_reel3_tilemap = tilemap_create(machine,get_jingbell_reel3_tile_info,tilemap_scan_rows,8,32, 128, 8); + state->m_gp98_reel4_tilemap = tilemap_create(machine,get_jingbell_reel4_tile_info,tilemap_scan_rows,8,32, 128, 8); + + tilemap_set_scroll_cols(state->m_gp98_reel1_tilemap, 128); + tilemap_set_scroll_cols(state->m_gp98_reel2_tilemap, 128); + tilemap_set_scroll_cols(state->m_gp98_reel3_tilemap, 128); + tilemap_set_scroll_cols(state->m_gp98_reel4_tilemap, 128); +} + + +static VIDEO_START(gp98) +{ + igs009_state *state = machine.driver_data<igs009_state>(); + state->m_fg_tilemap = tilemap_create(machine, get_fg_tile_info, tilemap_scan_rows, 8, 8, 0x80,0x20); + tilemap_set_transparent_pen(state->m_fg_tilemap, 0); + + state->m_gp98_reel1_tilemap = tilemap_create(machine,get_gp98_reel1_tile_info,tilemap_scan_rows,8,32, 128, 8); + state->m_gp98_reel2_tilemap = tilemap_create(machine,get_gp98_reel2_tile_info,tilemap_scan_rows,8,32, 128, 8); + state->m_gp98_reel3_tilemap = tilemap_create(machine,get_gp98_reel3_tile_info,tilemap_scan_rows,8,32, 128, 8); + state->m_gp98_reel4_tilemap = tilemap_create(machine,get_gp98_reel4_tile_info,tilemap_scan_rows,8,32, 128, 8); + + tilemap_set_scroll_cols(state->m_gp98_reel1_tilemap, 128); + tilemap_set_scroll_cols(state->m_gp98_reel2_tilemap, 128); + tilemap_set_scroll_cols(state->m_gp98_reel3_tilemap, 128); + tilemap_set_scroll_cols(state->m_gp98_reel4_tilemap, 128); + +} + + +static SCREEN_UPDATE(jingbell) +{ + igs009_state *state = screen->machine().driver_data<igs009_state>(); + int layers_ctrl = state->m_video_enable ? -1 : 0; + +#ifdef MAME_DEBUG + if (screen->machine().input().code_pressed(KEYCODE_Z)) + { + int mask = 0; + if (screen->machine().input().code_pressed(KEYCODE_Q)) mask |= 1; + if (screen->machine().input().code_pressed(KEYCODE_W)) mask |= 2; + if (screen->machine().input().code_pressed(KEYCODE_A)) mask |= 4; + if (mask != 0) layers_ctrl &= mask; + } +#endif + + if (layers_ctrl & 1) + { + int zz,i; + int startclipmin = 0; + const rectangle &visarea = screen->visible_area(); + + + for (i= 0;i < 0x80;i++) + { + tilemap_set_scrolly(state->m_gp98_reel1_tilemap, i, state->m_bg_scroll[i]*2); + tilemap_set_scrolly(state->m_gp98_reel2_tilemap, i, state->m_bg_scroll[i+0x80]*2); + tilemap_set_scrolly(state->m_gp98_reel3_tilemap, i, state->m_bg_scroll[i+0x100]*2); + tilemap_set_scrolly(state->m_gp98_reel4_tilemap, i, state->m_bg_scroll[i+0x180]*2); + } + + + + + for (zz=0;zz<0x80-8;zz++) // -8 because of visible area (2*8 = 16) + { + rectangle clip; + int rowenable = state->m_bg_scroll2[zz]; + + /* draw top of screen */ + clip.min_x = visarea.min_x; + clip.max_x = visarea.max_x; + clip.min_y = startclipmin; + clip.max_y = startclipmin+2; + + bitmap_fill(bitmap,&clip,screen->machine().pens[rowenable]); + + if (rowenable==0) + { // 0 and 1 are the same? or is there a global switchoff? + tilemap_draw(bitmap,&clip,state->m_gp98_reel1_tilemap,0,0); + } + else if (rowenable==1) + { + tilemap_draw(bitmap,&clip,state->m_gp98_reel2_tilemap,0,0); + } + else if (rowenable==2) + { + tilemap_draw(bitmap,&clip,state->m_gp98_reel3_tilemap,0,0); + } + else if (rowenable==3) + { + tilemap_draw(bitmap,&clip,state->m_gp98_reel4_tilemap,0,0); + } + + + startclipmin+=2; + } + + } + else bitmap_fill(bitmap, cliprect, get_black_pen(screen->machine())); + + + if (layers_ctrl & 2) tilemap_draw(bitmap, cliprect, state->m_fg_tilemap, 0, 0); + + return 0; +} + +/*************************************************************************** + Memory Maps +***************************************************************************/ + + +static CUSTOM_INPUT( hopper_r ) +{ + igs009_state *state = field.machine().driver_data<igs009_state>(); + return state->m_hopper && !(field.machine().primary_screen->frame_number()%10); +} + + +static void show_out(igs009_state *state) +{ +#ifdef MAME_DEBUG + popmessage("%02x %02x %02x", state->m_out[0], state->m_out[1], state->m_out[2]); +#endif +} + +static WRITE8_HANDLER( jingbell_nmi_and_coins_w ) +{ + igs009_state *state = space->machine().driver_data<igs009_state>(); + if ((state->m_nmi_enable ^ data) & (~0xdd)) + { + logerror("PC %06X: nmi_and_coins = %02x\n",cpu_get_pc(&space->device()),data); +// popmessage("%02x",data); + } + + coin_counter_w(space->machine(), 0, data & 0x01); // coin_a + coin_counter_w(space->machine(), 1, data & 0x04); // coin_c + coin_counter_w(space->machine(), 2, data & 0x08); // key in + coin_counter_w(space->machine(), 3, data & 0x10); // coin state->m_out mech + + set_led_status(space->machine(), 6, data & 0x40); // led for coin state->m_out / state->m_hopper active + + state->m_nmi_enable = data; // data & 0x80 // nmi enable? + + state->m_out[0] = data; + show_out(state); +} + +static WRITE8_HANDLER( jingbell_video_and_leds_w ) +{ + igs009_state *state = space->machine().driver_data<igs009_state>(); + set_led_status(space->machine(), 4, data & 0x01); // start? + set_led_status(space->machine(), 5, data & 0x04); // l_bet? + + state->m_video_enable = data & 0x40; + state->m_hopper = (~data)& 0x80; + + state->m_out[1] = data; + show_out(state); +} + +static WRITE8_HANDLER( jingbell_leds_w ) +{ + igs009_state *state = space->machine().driver_data<igs009_state>(); + set_led_status(space->machine(), 0, data & 0x01); // stop_1 + set_led_status(space->machine(), 1, data & 0x02); // stop_2 + set_led_status(space->machine(), 2, data & 0x04); // stop_3 + set_led_status(space->machine(), 3, data & 0x08); // stop + // data & 0x10? + + state->m_out[2] = data; + show_out(state); +} + + +static WRITE8_HANDLER( jingbell_magic_w ) +{ + igs009_state *state = space->machine().driver_data<igs009_state>(); + state->m_igs_magic[offset] = data; + + if (offset == 0) + return; + + switch(state->m_igs_magic[0]) + { + case 0x01: + break; + + default: +// popmessage("magic %x <- %04x",state->m_igs_magic[0],data); + logerror("%06x: warning, writing to igs_magic %02x = %02x\n", cpu_get_pc(&space->device()), state->m_igs_magic[0], data); + } +} + +static READ8_HANDLER( jingbell_magic_r ) +{ + igs009_state *state = space->machine().driver_data<igs009_state>(); + switch(state->m_igs_magic[0]) + { + case 0x00: + if ( !(state->m_igs_magic[1] & 0x01) ) return input_port_read(space->machine(), "DSW1"); + if ( !(state->m_igs_magic[1] & 0x02) ) return input_port_read(space->machine(), "DSW2"); + if ( !(state->m_igs_magic[1] & 0x04) ) return input_port_read(space->machine(), "DSW3"); + if ( !(state->m_igs_magic[1] & 0x08) ) return input_port_read(space->machine(), "DSW4"); + if ( !(state->m_igs_magic[1] & 0x10) ) return input_port_read(space->machine(), "DSW5"); + logerror("%06x: warning, reading dsw with igs_magic[1] = %02x\n", cpu_get_pc(&space->device()), state->m_igs_magic[1]); + break; + + default: + logerror("%06x: warning, reading with igs_magic = %02x\n", cpu_get_pc(&space->device()), state->m_igs_magic[0]); + } + + return 0; +} + + + + +static ADDRESS_MAP_START( jingbell_map, AS_PROGRAM, 8 ) + AM_RANGE( 0x00000, 0x0f3ff ) AM_ROM + AM_RANGE( 0x0f400, 0x0ffff ) AM_RAM AM_SHARE("nvram") +ADDRESS_MAP_END + +static ADDRESS_MAP_START( jingbell_portmap, AS_IO, 8 ) + AM_RANGE( 0x0000, 0x003f ) AM_RAM // Z180 internal regs + + AM_RANGE( 0x1000, 0x11ff ) AM_RAM_WRITE( bg_scroll_w ) AM_BASE_MEMBER(igs009_state, m_bg_scroll ) + + AM_RANGE( 0x2000, 0x23ff ) AM_RAM_WRITE( paletteram_xBBBBBGGGGGRRRRR_split1_w ) AM_BASE_GENERIC( paletteram ) + AM_RANGE( 0x2400, 0x27ff ) AM_RAM_WRITE( paletteram_xBBBBBGGGGGRRRRR_split2_w ) AM_BASE_GENERIC( paletteram2 ) + + AM_RANGE( 0x3000, 0x33ff ) AM_RAM_WRITE( gp98_reel1_ram_w ) AM_BASE_MEMBER(igs009_state, m_gp98_reel1_ram ) + AM_RANGE( 0x3400, 0x37ff ) AM_RAM_WRITE( gp98_reel2_ram_w ) AM_BASE_MEMBER(igs009_state, m_gp98_reel2_ram ) + AM_RANGE( 0x3800, 0x3bff ) AM_RAM_WRITE( gp98_reel3_ram_w ) AM_BASE_MEMBER(igs009_state, m_gp98_reel3_ram ) + AM_RANGE( 0x3c00, 0x3fff ) AM_RAM_WRITE( gp98_reel4_ram_w ) AM_BASE_MEMBER(igs009_state, m_gp98_reel4_ram ) + + AM_RANGE( 0x4000, 0x407f ) AM_RAM AM_BASE_MEMBER(igs009_state, m_bg_scroll2 ) + + AM_RANGE( 0x5000, 0x5fff ) AM_RAM_WRITE( fg_tile_w ) AM_BASE_MEMBER(igs009_state, m_fg_tile_ram ) + + AM_RANGE( 0x6480, 0x6480 ) AM_WRITE( jingbell_nmi_and_coins_w ) + + AM_RANGE( 0x6481, 0x6481 ) AM_READ_PORT( "SERVICE" ) + AM_RANGE( 0x6482, 0x6482 ) AM_READ_PORT( "COINS" ) + AM_RANGE( 0x6490, 0x6490 ) AM_READ_PORT( "BUTTONS1" ) + AM_RANGE( 0x6491, 0x6491 ) AM_WRITE( jingbell_video_and_leds_w ) + AM_RANGE( 0x6492, 0x6492 ) AM_WRITE( jingbell_leds_w ) + AM_RANGE( 0x64a0, 0x64a0 ) AM_READ_PORT( "BUTTONS2" ) + + AM_RANGE( 0x64b0, 0x64b1 ) AM_DEVWRITE( "ymsnd", ym2413_w ) + + AM_RANGE( 0x64c0, 0x64c0 ) AM_DEVREADWRITE_MODERN("oki", okim6295_device, read, write) + + AM_RANGE( 0x64d0, 0x64d1 ) AM_READWRITE( jingbell_magic_r, jingbell_magic_w ) // DSW1-5 + + AM_RANGE( 0x7000, 0x7fff ) AM_RAM_WRITE( fg_color_w ) AM_BASE_MEMBER(igs009_state, m_fg_color_ram ) + + AM_RANGE( 0x8000, 0xffff ) AM_ROM AM_REGION("data", 0) +ADDRESS_MAP_END + + +/*************************************************************************** + Input Ports +***************************************************************************/ + +static INPUT_PORTS_START( jingbell ) + PORT_START("DSW1") + PORT_DIPNAME( 0x01, 0x00, DEF_STR( Demo_Sounds ) ) + PORT_DIPSETTING( 0x01, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x00, DEF_STR( On ) ) + PORT_DIPNAME( 0x02, 0x00, "W-Up Bonus" ) + PORT_DIPSETTING( 0x02, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x00, DEF_STR( On ) ) // it's shown in attract mode + PORT_DIPUNKNOWN( 0x04, 0x04 ) + PORT_DIPUNKNOWN( 0x08, 0x08 ) + PORT_DIPUNKNOWN( 0x10, 0x10 ) + PORT_DIPUNKNOWN( 0x20, 0x20 ) + PORT_DIPUNKNOWN( 0x40, 0x40 ) + PORT_DIPUNKNOWN( 0x80, 0x80 ) + + PORT_START("DSW2") + PORT_DIPUNKNOWN( 0x01, 0x01 ) + PORT_DIPUNKNOWN( 0x02, 0x02 ) + PORT_DIPUNKNOWN( 0x04, 0x04 ) + PORT_DIPUNKNOWN( 0x08, 0x08 ) + PORT_DIPUNKNOWN( 0x10, 0x10 ) + PORT_DIPUNKNOWN( 0x20, 0x20 ) + PORT_DIPUNKNOWN( 0x40, 0x40 ) + PORT_DIPUNKNOWN( 0x80, 0x80 ) + + PORT_START("DSW3") + PORT_DIPUNKNOWN( 0x01, 0x01 ) + PORT_DIPUNKNOWN( 0x02, 0x02 ) + PORT_DIPUNKNOWN( 0x04, 0x04 ) + PORT_DIPUNKNOWN( 0x08, 0x08 ) + PORT_DIPUNKNOWN( 0x10, 0x10 ) + PORT_DIPUNKNOWN( 0x20, 0x20 ) + PORT_DIPUNKNOWN( 0x40, 0x40 ) + PORT_DIPUNKNOWN( 0x80, 0x80 ) + + PORT_START("DSW4") + PORT_DIPUNKNOWN( 0x01, 0x01 ) + PORT_DIPUNKNOWN( 0x02, 0x02 ) + PORT_DIPUNKNOWN( 0x04, 0x04 ) + PORT_DIPUNKNOWN( 0x08, 0x08 ) + PORT_DIPUNKNOWN( 0x10, 0x10 ) + PORT_DIPUNKNOWN( 0x20, 0x20 ) + PORT_DIPUNKNOWN( 0x40, 0x40 ) + PORT_DIPUNKNOWN( 0x80, 0x80 ) + + PORT_START("DSW5") + PORT_DIPUNKNOWN( 0x01, 0x01 ) + PORT_DIPUNKNOWN( 0x02, 0x02 ) + PORT_DIPUNKNOWN( 0x04, 0x04 ) + PORT_DIPUNKNOWN( 0x08, 0x08 ) + PORT_DIPUNKNOWN( 0x10, 0x10 ) + PORT_DIPUNKNOWN( 0x20, 0x20 ) + PORT_DIPUNKNOWN( 0x40, 0x40 ) + PORT_DIPUNKNOWN( 0x80, 0x80 ) + + PORT_START("SERVICE") + PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_UNKNOWN ) + PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_SERVICE1 ) PORT_NAME("Memory Clear") // stats, memory + PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_SPECIAL ) PORT_CUSTOM( hopper_r, (void *)0 ) // hopper sensor + PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_UNKNOWN ) + PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_GAMBLE_PAYOUT ) PORT_NAME("Pay Out") + PORT_SERVICE_NO_TOGGLE( 0x20, IP_ACTIVE_LOW ) // test (press during boot) + PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_GAMBLE_BOOK ) PORT_NAME("Records") + PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_UNKNOWN ) + + PORT_START("COINS") + PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_COIN1 ) + PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_UNKNOWN ) + PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_COIN2 ) + PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_GAMBLE_KEYIN ) + PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_GAMBLE_KEYOUT ) PORT_NAME("Key Down") // pays out + PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_UNKNOWN ) + PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_UNKNOWN ) + PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_UNKNOWN ) + + PORT_START("BUTTONS1") + PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_SLOT_STOP1 ) + PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_SLOT_STOP2 ) + PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_SLOT_STOP3 ) + PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_BUTTON4 ) PORT_CODE(KEYCODE_V) PORT_NAME("Stop") + 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 ) + + PORT_START("BUTTONS2") + PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_START1 ) PORT_NAME("Start / H_Dup") + PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_GAMBLE_LOW ) PORT_NAME("Small") + PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_BUTTON1 ) PORT_NAME("Left Bet / H_Dup") + PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_GAMBLE_TAKE ) + PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_BUTTON2 ) PORT_NAME("Right Bet / Dup") + PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_GAMBLE_HIGH ) PORT_NAME("Big") + PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_UNKNOWN ) + PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_UNKNOWN ) +INPUT_PORTS_END + +/*************************************************************************** + Graphics Layout +***************************************************************************/ + +static const gfx_layout layout_8x8x6 = +{ + 8, 8, + RGN_FRAC(1, 3), + 6, + { RGN_FRAC(0,3)+8,RGN_FRAC(0,3)+0, + RGN_FRAC(1,3)+8,RGN_FRAC(1,3)+0, + RGN_FRAC(2,3)+8,RGN_FRAC(2,3)+0 }, + { STEP8(0,1) }, + { STEP8(0,2*8) }, + 8*8*2 +}; + +static const gfx_layout layout_8x32x6 = +{ + 8, 32, + RGN_FRAC(1, 3), + 6, + { RGN_FRAC(0,3)+8,RGN_FRAC(0,3)+0, + RGN_FRAC(1,3)+8,RGN_FRAC(1,3)+0, + RGN_FRAC(2,3)+8,RGN_FRAC(2,3)+0 }, + { STEP8(0,1) }, + { STEP32(0,2*8) }, + 8*32*2 +}; + +static GFXDECODE_START( jingbell ) + GFXDECODE_ENTRY( "gfx1", 0, layout_8x32x6, 0, 16 ) + GFXDECODE_ENTRY( "gfx2", 0, layout_8x8x6, 0, 16 ) +GFXDECODE_END + +static const gfx_layout tiles8x8_layout = +{ + 8,8, + RGN_FRAC(1,3), + 6, + { RGN_FRAC(2,3)+0, RGN_FRAC(2,3)+1, RGN_FRAC(1,3)+0, RGN_FRAC(1,3)+1, RGN_FRAC(0,3)+0, RGN_FRAC(0,3)+1 }, + { 8,10,12,14, 0, 2, 4, 6, }, + { 0*16, 1*16, 2*16, 3*16, 4*16, 5*16, 6*16, 7*16 }, + 16*8 +}; + +static const gfx_layout tiles8x32_layout = +{ + 8,32, + RGN_FRAC(1,3), + 6, + { RGN_FRAC(2,3)+0, RGN_FRAC(2,3)+1, RGN_FRAC(1,3)+0, RGN_FRAC(1,3)+1, RGN_FRAC(0,3)+0, RGN_FRAC(0,3)+1 }, + { 8,10,12,14, 0, 2, 4, 6, }, + { 0*16, 1*16, 2*16, 3*16, 4*16, 5*16, 6*16, 7*16,8*16,9*16,10*16,11*16,12*16,13*16,14*16,15*16,16*16,17*16,18*16,19*16,20*16,21*16,22*16,23*16,24*16,25*16,26*16,27*16,28*16,29*16,30*16,31*16 }, + 32*16 +}; + +static GFXDECODE_START( gp98 ) + GFXDECODE_ENTRY( "gfx1", 0, tiles8x32_layout, 0, 16 ) + GFXDECODE_ENTRY( "gfx2", 0, tiles8x8_layout, 0, 16 ) +GFXDECODE_END + + +/*************************************************************************** + Machine Drivers +***************************************************************************/ + +static MACHINE_RESET( jingbell ) +{ + igs009_state *state = machine.driver_data<igs009_state>(); + state->m_nmi_enable = 0; + state->m_hopper = 0; + state->m_video_enable = 1; +} + +static INTERRUPT_GEN( jingbell_interrupt ) +{ + igs009_state *state = device->machine().driver_data<igs009_state>(); + if (state->m_nmi_enable & 0x80) + device_set_input_line(device, INPUT_LINE_NMI, PULSE_LINE); +} + +static MACHINE_CONFIG_START( jingbell, igs009_state ) + /* basic machine hardware */ + MCFG_CPU_ADD("maincpu", Z180, XTAL_12MHz / 2) /* HD64180RP8, 8 MHz? */ + MCFG_CPU_PROGRAM_MAP(jingbell_map) + MCFG_CPU_IO_MAP(jingbell_portmap) + MCFG_CPU_VBLANK_INT("screen",jingbell_interrupt) + + MCFG_MACHINE_RESET(jingbell) + + MCFG_NVRAM_ADD_0FILL("nvram") + + /* video hardware */ + MCFG_SCREEN_ADD("screen", RASTER) + MCFG_SCREEN_REFRESH_RATE(60) + MCFG_SCREEN_VBLANK_TIME(ATTOSECONDS_IN_USEC(0)) + MCFG_SCREEN_FORMAT(BITMAP_FORMAT_INDEXED16) + MCFG_SCREEN_SIZE(512, 256) + MCFG_SCREEN_VISIBLE_AREA(0, 512-1, 0, 256-16-1) + MCFG_SCREEN_UPDATE(jingbell) + + MCFG_GFXDECODE(jingbell) + MCFG_PALETTE_LENGTH(0x400) + + MCFG_VIDEO_START(jingbell) + + /* sound hardware */ + MCFG_SPEAKER_STANDARD_MONO("mono") + MCFG_SOUND_ADD("ymsnd", YM2413, XTAL_3_579545MHz) + MCFG_SOUND_ROUTE(ALL_OUTPUTS, "mono", 1.0) + + MCFG_OKIM6295_ADD("oki", XTAL_12MHz / 12, OKIM6295_PIN7_HIGH) + MCFG_SOUND_ROUTE(ALL_OUTPUTS, "mono", 1.0) +MACHINE_CONFIG_END + +static MACHINE_CONFIG_DERIVED( gp98, jingbell ) + MCFG_GFXDECODE(gp98) + + MCFG_VIDEO_START(gp98) +MACHINE_CONFIG_END + + +/*************************************************************************** + +Jingle Bell +(C) 1998 IGS + +CPU: + 1x HD64180RP8 (u18)(main) + 2x NEC D8255AC (u19,u20)(main) + 1x custom IGS009-F56D246 (u22) + 1x U3567HX881 (u45)(sound equivalent to ym2413) + 1x AR17961-AP0848 (u46)(sound equivalent to m6295) + 1x oscillator 12.000 + 1x oscillator 3.579545 + +ROMs: + 3x M27C512 (1,2,3) + 1x LE27C2001F (4) + 2x MX27C2000 (5,6) + 1x D27256 (7) + 1x MX27C512 (v) + 1x NM27C010 (sp) + 2x PALCE16V8H (read protected) + 1x PALCE22V10H (read protected) + 1x PALCE22V10H (dumped) + +Notes: + 1x 38x2 edge connector + 1x 10x2 edge connector + 1x pushbutton + 1x battery + 5x 8x2 switches dip + +12/02/2008 f205v + +***************************************************************************/ + +ROM_START( jingbell ) + ROM_REGION( 0x10000, "maincpu", 0 ) + ROM_LOAD( "jinglev133i.u44", 0x00000, 0x10000, CRC(df60dc39) SHA1(ff57afd50c045b621395353fdc50ffd1e1b65e9e) ) + + ROM_REGION( 0x8000, "data", 0 ) + ROM_LOAD( "jingle133i7.u43", 0x0000, 0x8000, CRC(a7affa15) SHA1(f9d33e32b57ad267d383e075663994e0af0b3016) ) + + ROM_REGION( 0x30000, "gfx1", 0 ) + ROM_LOAD( "jingle133i1.u17", 0x00000, 0x10000, CRC(cadd7910) SHA1(aa514ddb29c8c9a77478d56bea4ae71995fdd518) ) + ROM_LOAD( "jingle133i2.u16", 0x10000, 0x10000, CRC(a9e1f5aa) SHA1(68d7f4e9e9a5bbce0904e406ee6fe82e9e52a9ba) ) + ROM_LOAD( "jingle133i3.u15", 0x20000, 0x10000, CRC(865b7d3a) SHA1(c1dff3a27d747ee499aaee0c4468534f0249a3e5) ) + + ROM_REGION( 0xc0000, "gfx2", 0 ) + ROM_LOAD( "jingle133i4.u25", 0x00000, 0x40000, CRC(7aa1d344) SHA1(141e27df93cb35ab852d9022e0b08bd596f1186b) ) + ROM_LOAD( "jingle133i5.u24", 0x40000, 0x40000, CRC(021261d1) SHA1(5b23f9bd818193c343f9f4c9317955b17efb8cfa) ) + ROM_LOAD( "jingle133i6.u23", 0x80000, 0x40000, CRC(c40228fd) SHA1(4dc05337d64ed2b8d66fc5f0ca8ffbf96799f768) ) + + ROM_REGION( 0x40000, "oki", 0 ) + ROM_LOAD( "jingle133isp.u38", 0x00000, 0x20000, CRC(a42d73b1) SHA1(93157e9630d5c8bb34c71186415d0aa8c5d51951) ) + + ROM_REGION( 0x2dd, "plds",0 ) + ROM_LOAD( "palce16v8h-ch-jin-u12v.u12", 0x000, 0x117, BAD_DUMP CRC(c89d2f52) SHA1(f9d52d9c42ef95b7b85bbf6d09888ebdeac11fd3) ) + ROM_LOAD( "palce16v8h-ch-jin-u33v.u33", 0x000, 0x117, BAD_DUMP CRC(c89d2f52) SHA1(f9d52d9c42ef95b7b85bbf6d09888ebdeac11fd3) ) + ROM_LOAD( "palce22v10h-ajbu24.u24", 0x000, 0x2dd, CRC(6310f441) SHA1(b610e170ccca1fcb06a57f718ece1408b696ba9c) ) + ROM_LOAD( "palce22v10h-ch-jin-u27.u27", 0x000, 0x2dd, BAD_DUMP CRC(5c4e9024) SHA1(e9d1e4df3d79c21f4ce053a84bb7b7a43d650f91) ) +ROM_END + +static DRIVER_INIT( jingbell ) +{ + int i; + UINT8 *rom = (UINT8 *)machine.region("maincpu")->base(); + size_t size = machine.region("maincpu")->bytes(); + + for (i=0; i<size; i++) + { + UINT8 x = rom[i]; + if (i & 0x0080) + { + if ((i & 0x0420) == 0x0420) x ^= 0x20; + else x ^= 0x22; + } + else + { + if (i & 0x0200) x ^= 0x02; + else x ^= 0x22; + } + + if ((i & 0x1208) == 0x1208) x ^= 0x01; + + rom[i] = x; + } + + // protection patch + rom[0x01f19] = 0x18; +} + +ROM_START( gp98 ) + ROM_REGION( 0x20000, "maincpu", 0 ) + ROM_LOAD( "prg", 0x00000, 0x20000, CRC(1c02b8cc) SHA1(b8a29cbd96581f8ae1c1028279b8ee703be29f5f) ) + + ROM_REGION( 0x8000, "data", 0 ) + ROM_COPY( "maincpu", 0x18000, 0x00000, 0x8000 ) + + ROM_REGION( 0x180000, "tempgfx", 0 ) // 6bpp (2bpp per rom) font at tile # 0x4000 + ROM_LOAD( "49", 0x000000, 0x80000, BAD_DUMP CRC(a9d9367d) SHA1(91c74740fc8394f1e1cd68feb8c993afd2042d70) ) + ROM_LOAD( "50", 0x080000, 0x80000, CRC(48f6190d) SHA1(b430131a258b4e2fc178ac0e3e3f0010a82eac65) ) + ROM_LOAD( "51", 0x100000, 0x80000, CRC(30a2ef85) SHA1(38ea637acd83b175eccd2969ef21879265b88992) ) + + ROM_REGION( 0xc0000, "gfx1", 0 ) + ROM_COPY( "tempgfx", 0x000000, 0x00000, 0x40000 ) + ROM_COPY( "tempgfx", 0x080000, 0x40000, 0x40000 ) + ROM_COPY( "tempgfx", 0x100000, 0x80000, 0x40000 ) + + ROM_REGION( 0xc0000, "gfx2", 0 ) + ROM_COPY( "tempgfx", 0x040000, 0x00000, 0x40000 ) + ROM_COPY( "tempgfx", 0x0c0000, 0x40000, 0x40000 ) + ROM_COPY( "tempgfx", 0x140000, 0x80000, 0x40000 ) + + + ROM_REGION( 0x40000, "oki", ROMREGION_ERASE00 ) + /* no OKI on this */ +ROM_END + +GAME( 1995?, jingbell, 0, jingbell, jingbell, jingbell, ROT0, "IGS", "Jingle Bell (Italy, V133I)", GAME_NOT_WORKING | GAME_IMPERFECT_GRAPHICS | GAME_UNEMULATED_PROTECTION ) +GAME( 1998, gp98, 0, gp98, jingbell, 0, ROT0, "Romtec Co. Ltd", "Grand Prix '98",GAME_NOT_WORKING| GAME_NO_SOUND ) |