/*************************************************************************** Atari Boxer (prototype) driver AKA Boxing, both game titles appear in the schematics This game had some weird controls that don't work well in MAME. ***************************************************************************/ #include "emu.h" #include "cpu/m6502/m6502.h" #define MASTER_CLOCK XTAL_12_096MHz /************************************* * * Driver data * *************************************/ class boxer_state : public driver_device { public: boxer_state(const machine_config &mconfig, device_type type, const char *tag) : driver_device(mconfig, type, tag) { } /* memory pointers */ UINT8 * m_tile_ram; UINT8 * m_sprite_ram; /* misc */ UINT8 m_pot_state; UINT8 m_pot_latch; /* devices */ device_t *m_maincpu; }; /************************************* * * Interrupts / Timers * *************************************/ static TIMER_CALLBACK( pot_interrupt ) { boxer_state *state = machine.driver_data(); int mask = param; if (state->m_pot_latch & mask) device_set_input_line(state->m_maincpu, INPUT_LINE_NMI, ASSERT_LINE); state->m_pot_state |= mask; } static TIMER_CALLBACK( periodic_callback ) { boxer_state *state = machine.driver_data(); int scanline = param; device_set_input_line(state->m_maincpu, 0, ASSERT_LINE); if (scanline == 0) { UINT8 mask[256]; int i; memset(mask, 0, sizeof mask); mask[input_port_read(machine, "STICK0_X")] |= 0x01; mask[input_port_read(machine, "STICK0_Y")] |= 0x02; mask[input_port_read(machine, "PADDLE0")] |= 0x04; mask[input_port_read(machine, "STICK1_X")] |= 0x08; mask[input_port_read(machine, "STICK1_Y")] |= 0x10; mask[input_port_read(machine, "PADDLE1")] |= 0x20; for (i = 1; i < 256; i++) if (mask[i] != 0) machine.scheduler().timer_set(machine.primary_screen->time_until_pos(i), FUNC(pot_interrupt), mask[i]); state->m_pot_state = 0; } scanline += 64; if (scanline >= 262) scanline = 0; machine.scheduler().timer_set(machine.primary_screen->time_until_pos(scanline), FUNC(periodic_callback), scanline); } /************************************* * * Video system * *************************************/ static PALETTE_INIT( boxer ) { palette_set_color(machine,0, MAKE_RGB(0x00,0x00,0x00)); palette_set_color(machine,1, MAKE_RGB(0xff,0xff,0xff)); palette_set_color(machine,2, MAKE_RGB(0xff,0xff,0xff)); palette_set_color(machine,3, MAKE_RGB(0x00,0x00,0x00)); } static void draw_boxer( running_machine &machine, bitmap_t* bitmap, const rectangle* cliprect ) { boxer_state *state = machine.driver_data(); int n; for (n = 0; n < 2; n++) { const UINT8* p = machine.region(n == 0 ? "user1" : "user2")->base(); int i, j; int x = 196 - state->m_sprite_ram[0 + 2 * n]; int y = 192 - state->m_sprite_ram[1 + 2 * n]; int l = state->m_sprite_ram[4 + 2 * n] & 15; int r = state->m_sprite_ram[5 + 2 * n] & 15; for (i = 0; i < 8; i++) { for (j = 0; j < 4; j++) { UINT8 code; code = p[32 * l + 4 * i + j]; drawgfx_transpen(bitmap, cliprect, machine.gfx[n], code, 0, code & 0x80, 0, x + 8 * j, y + 8 * i, 1); code = p[32 * r + 4 * i - j + 3]; drawgfx_transpen(bitmap, cliprect, machine.gfx[n], code, 0, !(code & 0x80), 0, x + 8 * j + 32, y + 8 * i, 1); } } } } static SCREEN_UPDATE( boxer ) { boxer_state *state = screen->machine().driver_data(); int i, j; bitmap_fill(bitmap, cliprect, 1); for (i = 0; i < 16; i++) { for (j = 0; j < 32; j++) { UINT8 code = state->m_tile_ram[32 * i + j]; drawgfx_transpen(bitmap, cliprect, screen->machine().gfx[2], code, 0, code & 0x40, code & 0x40, 8 * j + 4, 8 * (i % 2) + 32 * (i / 2), 0); } } draw_boxer(screen->machine(), bitmap, cliprect); return 0; } /************************************* * * Memory handlers * *************************************/ static READ8_HANDLER( boxer_input_r ) { UINT8 val = input_port_read(space->machine(), "IN0"); if (input_port_read(space->machine(), "IN3") < space->machine().primary_screen->vpos()) val |= 0x02; return (val << ((offset & 7) ^ 7)) & 0x80; } static READ8_HANDLER( boxer_misc_r ) { boxer_state *state = space->machine().driver_data(); UINT8 val = 0; switch (offset & 3) { case 0: val = state->m_pot_state & state->m_pot_latch; break; case 1: val = space->machine().primary_screen->vpos(); break; case 2: val = input_port_read(space->machine(), "IN1"); break; case 3: val = input_port_read(space->machine(), "IN2"); break; } return val ^ 0x3f; } static WRITE8_HANDLER( boxer_bell_w ) { } static WRITE8_HANDLER( boxer_sound_w ) { } static WRITE8_HANDLER( boxer_pot_w ) { boxer_state *state = space->machine().driver_data(); /* BIT0 => HPOT1 */ /* BIT1 => VPOT1 */ /* BIT2 => RPOT1 */ /* BIT3 => HPOT2 */ /* BIT4 => VPOT2 */ /* BIT5 => RPOT2 */ state->m_pot_latch = data & 0x3f; device_set_input_line(state->m_maincpu, INPUT_LINE_NMI, CLEAR_LINE); } static WRITE8_HANDLER( boxer_irq_reset_w ) { boxer_state *state = space->machine().driver_data(); device_set_input_line(state->m_maincpu, 0, CLEAR_LINE); } static WRITE8_HANDLER( boxer_crowd_w ) { /* BIT0 => ATTRACT */ /* BIT1 => CROWD-1 */ /* BIT2 => CROWD-2 */ /* BIT3 => CROWD-3 */ coin_lockout_global_w(space->machine(), data & 1); } static WRITE8_HANDLER( boxer_led_w ) { set_led_status(space->machine(), 1, !(data & 1)); set_led_status(space->machine(), 0, !(data & 2)); } /************************************* * * Address maps * *************************************/ static ADDRESS_MAP_START( boxer_map, AS_PROGRAM, 8 ) ADDRESS_MAP_GLOBAL_MASK(0x3fff) AM_RANGE(0x0000, 0x01ff) AM_RAM AM_RANGE(0x0200, 0x03ff) AM_RAM AM_BASE_MEMBER(boxer_state, m_tile_ram) AM_RANGE(0x0800, 0x08ff) AM_READ(boxer_input_r) AM_RANGE(0x1000, 0x17ff) AM_READ(boxer_misc_r) AM_RANGE(0x1800, 0x1800) AM_WRITE(boxer_pot_w) AM_RANGE(0x1900, 0x19ff) AM_WRITE(boxer_led_w) AM_RANGE(0x1a00, 0x1aff) AM_WRITE(boxer_sound_w) AM_RANGE(0x1b00, 0x1bff) AM_WRITE(boxer_crowd_w) AM_RANGE(0x1c00, 0x1cff) AM_WRITE(boxer_irq_reset_w) AM_RANGE(0x1d00, 0x1dff) AM_WRITE(boxer_bell_w) AM_RANGE(0x1e00, 0x1eff) AM_WRITEONLY AM_BASE_MEMBER(boxer_state, m_sprite_ram) AM_RANGE(0x1f00, 0x1fff) AM_WRITE(watchdog_reset_w) AM_RANGE(0x3000, 0x3fff) AM_ROM ADDRESS_MAP_END /************************************* * * Input ports * *************************************/ static INPUT_PORTS_START( boxer ) PORT_START("IN0") PORT_BIT ( 0x01, IP_ACTIVE_HIGH, IPT_UNUSED ) PORT_BIT ( 0x02, IP_ACTIVE_HIGH, IPT_UNUSED ) /* TIMER */ PORT_BIT ( 0x04, IP_ACTIVE_LOW, IPT_TILT ) PORT_SERVICE( 0x08, IP_ACTIVE_HIGH ) PORT_BIT ( 0x10, IP_ACTIVE_HIGH, IPT_START1 ) PORT_BIT ( 0x20, IP_ACTIVE_HIGH, IPT_START2 ) PORT_BIT ( 0x40, IP_ACTIVE_LOW, IPT_COIN1 ) PORT_BIT ( 0x80, IP_ACTIVE_LOW, IPT_COIN2 ) PORT_START("IN1") PORT_DIPNAME( 0x03, 0x01, "Number of Rounds" ) PORT_DIPSETTING( 0x03, "1" ) PORT_DIPSETTING( 0x02, "2" ) PORT_DIPSETTING( 0x01, "3" ) PORT_DIPSETTING( 0x00, "4" ) PORT_START("IN2") PORT_DIPNAME( 0x03, 0x01, DEF_STR( Coinage ) ) PORT_DIPSETTING( 0x00, DEF_STR( 2C_1C ) ) PORT_DIPSETTING( 0x01, DEF_STR( 1C_1C ) ) PORT_DIPSETTING( 0x02, DEF_STR( 1C_2C ) ) PORT_DIPSETTING( 0x03, DEF_STR( Free_Play ) ) PORT_START("STICK0_X") PORT_BIT ( 0xff, 0x80, IPT_AD_STICK_X ) PORT_MINMAX(0x20,0xe0) PORT_SENSITIVITY(30) PORT_KEYDELTA(16) PORT_REVERSE PORT_PLAYER(1) PORT_START("STICK0_Y") PORT_BIT ( 0xff, 0x80, IPT_AD_STICK_Y ) PORT_MINMAX(0x20,0xe0) PORT_SENSITIVITY(30) PORT_KEYDELTA(16) PORT_REVERSE PORT_PLAYER(1) PORT_START("PADDLE0") PORT_BIT( 0xff, 0x80, IPT_PADDLE ) PORT_MINMAX(0x20,0xe0) PORT_SENSITIVITY(30) PORT_KEYDELTA(16) PORT_CODE_DEC(KEYCODE_Z) PORT_CODE_INC(KEYCODE_X) PORT_CENTERDELTA(0) PORT_PLAYER(1) PORT_START("STICK1_X") PORT_BIT ( 0xff, 0x80, IPT_AD_STICK_X ) PORT_MINMAX(0x20,0xe0) PORT_SENSITIVITY(30) PORT_KEYDELTA(16) PORT_REVERSE PORT_PLAYER(2) PORT_START("STICK1_Y") PORT_BIT ( 0xff, 0x80, IPT_AD_STICK_Y ) PORT_MINMAX(0x20,0xe0) PORT_SENSITIVITY(30) PORT_KEYDELTA(16) PORT_REVERSE PORT_PLAYER(2) PORT_START("PADDLE1") PORT_BIT( 0xff, 0x80, IPT_PADDLE ) PORT_MINMAX(0x20,0xe0) PORT_SENSITIVITY(30) PORT_KEYDELTA(16) PORT_CODE_DEC(KEYCODE_Q) PORT_CODE_INC(KEYCODE_W) PORT_CENTERDELTA(0) PORT_PLAYER(2) PORT_START("IN3") PORT_DIPNAME( 0xff, 0x5c, "Round Time" ) /* actually a potentiometer */ PORT_DIPSETTING( 0x3c, "15 seconds" ) PORT_DIPSETTING( 0x5c, "30 seconds" ) PORT_DIPSETTING( 0x7c, "45 seconds" ) INPUT_PORTS_END /************************************* * * Graphics definitions * *************************************/ static const gfx_layout tile_layout = { 8, 8, 64, 1, { 0 }, { 0x7, 0x6, 0x5, 0x4, 0xf, 0xe, 0xd, 0xc }, { 0x00, 0x10, 0x20, 0x30, 0x40, 0x50, 0x60, 0x70 }, 0x80 }; static const gfx_layout sprite_layout = { 8, 8, 64, 1, { 0 }, { 0x4, 0x5, 0x6, 0x7, 0xc, 0xd, 0xe, 0xf }, { 0x00, 0x10, 0x20, 0x30, 0x40, 0x50, 0x60, 0x70 }, 0x80 }; static GFXDECODE_START( boxer ) GFXDECODE_ENTRY( "gfx1", 0, sprite_layout, 0, 1 ) GFXDECODE_ENTRY( "gfx2", 0, sprite_layout, 0, 1 ) GFXDECODE_ENTRY( "gfx3", 0, tile_layout, 2, 1 ) GFXDECODE_END /************************************* * * Machine driver * *************************************/ static MACHINE_START( boxer ) { boxer_state *state = machine.driver_data(); state->m_maincpu = machine.device("maincpu"); state->save_item(NAME(state->m_pot_state)); state->save_item(NAME(state->m_pot_latch)); } static MACHINE_RESET( boxer ) { boxer_state *state = machine.driver_data(); machine.scheduler().timer_set(machine.primary_screen->time_until_pos(0), FUNC(periodic_callback)); state->m_pot_state = 0; state->m_pot_latch = 0; } static MACHINE_CONFIG_START( boxer, boxer_state ) /* basic machine hardware */ MCFG_CPU_ADD("maincpu", M6502, MASTER_CLOCK / 16) MCFG_CPU_PROGRAM_MAP(boxer_map) MCFG_MACHINE_START(boxer) MCFG_MACHINE_RESET(boxer) /* video hardware */ MCFG_SCREEN_ADD("screen", RASTER) MCFG_SCREEN_REFRESH_RATE(60) MCFG_SCREEN_FORMAT(BITMAP_FORMAT_INDEXED16) MCFG_SCREEN_SIZE(256, 262) MCFG_SCREEN_VISIBLE_AREA(8, 247, 0, 239) MCFG_SCREEN_UPDATE(boxer) MCFG_GFXDECODE(boxer) MCFG_PALETTE_LENGTH(4) MCFG_PALETTE_INIT(boxer) /* sound hardware */ MACHINE_CONFIG_END /************************************* * * ROM definition * *************************************/ ROM_START( boxer ) ROM_REGION( 0x4000, "maincpu", 0 ) ROM_LOAD_NIB_LOW ( "3400l.e1", 0x3400, 0x0400, CRC(df85afa4) SHA1(5a74a08f1e0b0bbec02999d5e46513d8afd333ac) ) ROM_LOAD_NIB_HIGH( "3400m.a1", 0x3400, 0x0400, CRC(23fe06aa) SHA1(03a4eedbf60f07d1dd8d7af576828df5f032146e) ) ROM_LOAD_NIB_LOW ( "3800l.j1", 0x3800, 0x0400, CRC(087263fb) SHA1(cc3715a68bd05f23b4abf9f18ca14a8fe55163f7) ) ROM_LOAD_NIB_HIGH( "3800m.d1", 0x3800, 0x0400, CRC(3bbf605e) SHA1(be4ff1702eb837710421a7dafcdc60fe2d3259e8) ) ROM_LOAD_NIB_LOW ( "3c00l.h1", 0x3C00, 0x0400, CRC(09e204f2) SHA1(565d4c8865da7d96a45e909973d570101de61f63) ) ROM_LOAD_NIB_HIGH( "3c00m.c1", 0x3C00, 0x0400, CRC(2f8ebc85) SHA1(05a4e29ec7e49173200d5fe5344274fd6afd16d7) ) ROM_REGION( 0x0400, "gfx1", 0 ) /* lower boxer */ ROM_LOAD( "bx137l.c8", 0x0000, 0x0400, CRC(e91f2048) SHA1(64039d07557e210aa4f6663cd7e72814cb881310) ) ROM_REGION( 0x0400, "gfx2", 0 ) /* upper boxer */ ROM_LOAD( "bx137u.m8", 0x0000, 0x0400, CRC(e4fee386) SHA1(79b70aca4a92c56363689a363b643d46294d3e88) ) ROM_REGION( 0x0400, "gfx3", 0 ) /* tiles */ ROM_LOAD( "9417.k2", 0x0000, 0x0400, CRC(7e3d22cf) SHA1(92e6bbe049dc8fcd674f2ff96cde3786f714508d) ) ROM_REGION( 0x0200, "user1", 0 ) /* lower boxer map */ ROM_LOAD( "bx115l.b7", 0x0000, 0x0200, CRC(31f2234f) SHA1(d53f3a1d0db3cf3024de61ef64f76c6dfdf6861c) ) ROM_REGION( 0x0200, "user2", 0 ) /* upper boxer map */ ROM_LOAD( "bx115u.l7", 0x0000, 0x0200, CRC(124d3f24) SHA1(09fab2ae218b8584c0e3c8e02f5680ce083a33d6) ) ROM_REGION( 0x0100, "proms", 0 ) /* sync prom */ ROM_LOAD( "9402.m3", 0x0000, 0x0100, CRC(00e224a0) SHA1(1a384ef488791c62566c91b18d6a1fb4a5def2ba) ) ROM_END /************************************* * * Game driver * *************************************/ GAME( 1978, boxer, 0, boxer, boxer, 0, 0, "Atari", "Boxer (prototype)", GAME_NO_SOUND )