diff options
Diffstat (limited to 'trunk/src/mame/drivers/rltennis.c')
-rw-r--r-- | trunk/src/mame/drivers/rltennis.c | 234 |
1 files changed, 234 insertions, 0 deletions
diff --git a/trunk/src/mame/drivers/rltennis.c b/trunk/src/mame/drivers/rltennis.c new file mode 100644 index 00000000000..da2849494b3 --- /dev/null +++ b/trunk/src/mame/drivers/rltennis.c @@ -0,0 +1,234 @@ +/**************************************************************************************** +Reality Tennis - (c) 1993 TCH + + driver by Tomasz Slanina + + based on informations provided by Antonio 'Peluko' Carrillo + +Game Credits: +Antonio 'Peluko' Carrillo: programmer and game designer +David Sandoval: hardware designer + +PCB Layout +---------- + +|-----------------------------------------------------| +| |-----| KM424C257 tennis_6 tennis_12 - | +| |Bt478| KM424C257 | +| |-----| tennis_5 tennis_11 - | +| |-------| | +| |Actel | |-------| tennis_10 - | +| | A1020B| |Actel | | +|J |-------| | A1020B| tennis_9 - | +|A 32MHz JOAQUIN |-------| | +|M JUANA tennis_8 - | +|M 28C264 | +|A tennis_1 tennis_2 tennis_7 tennis_14 | +| GAL22V10 | +| MT5C256 MT5C256 tennis_13 | +| |------------------| 74HC404 | +| | 68000P8 | tennis_3 tennis_4 | +| |------------------| | +| NE555 DAC DAC | +|-----------------------------------------------------| + +Video hardware: +--------------- +Blitter based. Two layers with tricky doublebuffering. +Two Actel FPGA chips (marked as JOAQUIN and JUANA). +Juana can read data from ROMs. JOAQUIN - write to VRAM. +Both can access 256x256 pixel pages. +Size and direction of data read/write, as well as active page is +selectable for each of the chips. + +Sound hardware (verify): +------------------------ +~15 kHz 8 bit sigend (music) and unsigned (sfx) sample player. +Two custom DACs are conencted directly to data lines of sound ROMs. +A0-A10 address lines are controlled by a counter, clocked by scaline +clock ( not verified, just guessed ). Top lines are controlled by cpu, +and select 2k sample to play. There's probably no way to stop the sample +player - when there's nothing to play - first, empty 2k of ROMs are selected. + + TODO: +- proper timing and interrupts (remove extra hacky blitter int generation @ vblank) +- fix various gfx glitches here and there, mostly related to wrong size of data + (what's the correct size? based on src or dest rectangle ? is there some kind of zoom? or just rect clipping?) +- what the 70000a blitter reg is for ? + + +****************************************************************************************/ +#include "emu.h" +#include "includes/rltennis.h" +#include "cpu/m68000/m68000.h" +#include "machine/nvram.h" +#include "sound/dac.h" + +#define RLT_REFRESH_RATE 60 +#define RLT_TIMER_FREQ (RLT_REFRESH_RATE*256) +#define RLT_XTAL XTAL_12MHz + +static READ16_HANDLER( rlt_io_r ) +{ + rltennis_state *state = space->machine().driver_data<rltennis_state>(); + + return (input_port_read(space->machine(), "P1" )&0x1fff) | (state->m_unk_counter<<13); /* top 3 bits controls smaple address update */ +} + +static WRITE16_HANDLER(rlt_snd1_w) +{ + rltennis_state *state = space->machine().driver_data<rltennis_state>(); + COMBINE_DATA(&state->m_data760000); +} + +static WRITE16_HANDLER(rlt_snd2_w) +{ + rltennis_state *state = space->machine().driver_data<rltennis_state>(); + COMBINE_DATA(&state->m_data740000); +} + +static ADDRESS_MAP_START( rltennis_main, AS_PROGRAM, 16 ) + AM_RANGE(0x000000, 0x0fffff) AM_ROM + AM_RANGE(0x100000, 0x10ffff) AM_RAM AM_SHARE("nvram") + AM_RANGE(0x200000, 0x20ffff) AM_RAM + AM_RANGE(0x700000, 0x70000f) AM_WRITE(rlt_blitter_w) + AM_RANGE(0x720000, 0x720001) AM_WRITE(rlt_ramdac_address_wm_w) + AM_RANGE(0x720002, 0x720003) AM_READWRITE(rlt_ramdac_data_r, rlt_ramdac_data_w) + AM_RANGE(0x720006, 0x720007) AM_WRITE(rlt_ramdac_address_rm_w) + AM_RANGE(0x740000, 0x740001) AM_WRITE(rlt_snd1_w) + AM_RANGE(0x760000, 0x760001) AM_WRITE(rlt_snd2_w) + AM_RANGE(0x780000, 0x780001) AM_WRITENOP /* sound control, unknown, usually = 0x0044 */ + AM_RANGE(0x7a0000, 0x7a0003) AM_READNOP /* unknown, read only at boot time*/ + AM_RANGE(0x7e0000, 0x7e0001) AM_READ(rlt_io_r) + AM_RANGE(0x7e0002, 0x7e0003) AM_READ_PORT("P2") +ADDRESS_MAP_END + +static INPUT_PORTS_START( rltennis ) + PORT_START("P1") + PORT_BIT( 0x0001, IP_ACTIVE_LOW, IPT_JOYSTICK_UP ) PORT_8WAY PORT_PLAYER(1) + PORT_BIT( 0x0002, IP_ACTIVE_LOW, IPT_JOYSTICK_DOWN ) PORT_8WAY PORT_PLAYER(1) + PORT_BIT( 0x0004, IP_ACTIVE_LOW, IPT_JOYSTICK_LEFT ) PORT_8WAY PORT_PLAYER(1) + PORT_BIT( 0x0008, IP_ACTIVE_LOW, IPT_JOYSTICK_RIGHT ) PORT_8WAY PORT_PLAYER(1) + PORT_BIT( 0x0010, IP_ACTIVE_LOW, IPT_BUTTON1 ) PORT_PLAYER(1) + PORT_BIT( 0x0020, IP_ACTIVE_LOW, IPT_BUTTON3 ) PORT_PLAYER(1) + PORT_BIT( 0x0040, IP_ACTIVE_LOW, IPT_BUTTON2 ) PORT_PLAYER(1) + PORT_BIT( 0x0080, IP_ACTIVE_LOW, IPT_UNUSED ) + PORT_BIT( 0x0100, IP_ACTIVE_LOW, IPT_START1 ) + PORT_BIT( 0x0200, IP_ACTIVE_LOW, IPT_START2 ) + PORT_BIT( 0x0400, IP_ACTIVE_LOW, IPT_COIN1 ) + PORT_BIT( 0x0800, IP_ACTIVE_LOW, IPT_COIN2 ) + PORT_BIT( 0x1000, IP_ACTIVE_LOW, IPT_SERVICE ) + + PORT_BIT( 0xe000, IP_ACTIVE_LOW, IPT_UNUSED ) + + PORT_START("P2") + PORT_BIT( 0x0001, IP_ACTIVE_LOW, IPT_JOYSTICK_UP ) PORT_8WAY PORT_PLAYER(2) + PORT_BIT( 0x0002, IP_ACTIVE_LOW, IPT_JOYSTICK_DOWN ) PORT_8WAY PORT_PLAYER(2) + PORT_BIT( 0x0004, IP_ACTIVE_LOW, IPT_JOYSTICK_LEFT ) PORT_8WAY PORT_PLAYER(2) + PORT_BIT( 0x0008, IP_ACTIVE_LOW, IPT_JOYSTICK_RIGHT ) PORT_8WAY PORT_PLAYER(2) + PORT_BIT( 0x0010, IP_ACTIVE_LOW, IPT_BUTTON1 ) PORT_PLAYER(2) + PORT_BIT( 0x0020, IP_ACTIVE_LOW, IPT_BUTTON3 ) PORT_PLAYER(2) + PORT_BIT( 0x0040, IP_ACTIVE_LOW, IPT_BUTTON2 ) PORT_PLAYER(2) + PORT_BIT( 0xff80, IP_ACTIVE_LOW, IPT_UNUSED ) +INPUT_PORTS_END + +static TIMER_CALLBACK( sample_player ) +{ + rltennis_state *state = machine.driver_data<rltennis_state>(); + + if((state->m_dac_counter&0x7ff) == 0x7ff) /* reload top address bits */ + { + state->m_sample_rom_offset_1=(( state->m_data740000 >> state->m_offset_shift ) & 0xff )<<11; + state->m_sample_rom_offset_2=(( state->m_data760000 >> state->m_offset_shift ) & 0xff )<<11; + state->m_offset_shift^=8; /* switch between MSB and LSB */ + } + ++state->m_dac_counter; /* update low address bits */ + + dac_signed_data_w(state->m_dac_1, state->m_samples_1[state->m_sample_rom_offset_1 + ( state->m_dac_counter&0x7ff )]); + dac_data_w(state->m_dac_2, state->m_samples_2[state->m_sample_rom_offset_2 + ( state->m_dac_counter&0x7ff )]); + state->m_timer->adjust(attotime::from_hz( RLT_TIMER_FREQ )); +} + +static INTERRUPT_GEN( rltennis_interrupt ) +{ + rltennis_state *state = device->machine().driver_data<rltennis_state>(); + ++state->m_unk_counter; /* frame counter? verify */ + device_set_input_line(device, 4, HOLD_LINE); + device_set_input_line(device, 1, HOLD_LINE); /* hack, to avoid dead loop */ +} + +static MACHINE_START( rltennis ) +{ + rltennis_state *state = machine.driver_data<rltennis_state>(); + state->m_maincpu = machine.device( "maincpu"); + state->m_screen = machine.device( "screen"); + state->m_palette = auto_alloc_array(machine, UINT8, 256*3 ); + state->m_dac_1 = machine.device("dac1"); + state->m_dac_2 = machine.device("dac2"); + state->m_samples_1 = machine.region("samples1")->base(); + state->m_samples_2 = machine.region("samples2")->base(); + state->m_gfx = machine.region("gfx1")->base(); + state->m_timer = machine.scheduler().timer_alloc(FUNC(sample_player)); +} + +static MACHINE_RESET( rltennis ) +{ + rltennis_state *state = machine.driver_data<rltennis_state>(); + state->m_timer->adjust(attotime::from_hz(RLT_TIMER_FREQ)); +} + +static MACHINE_CONFIG_START( rltennis, rltennis_state ) + + MCFG_CPU_ADD("maincpu", M68000, RLT_XTAL/2) /* 68000P8 ??? */ + MCFG_CPU_PROGRAM_MAP(rltennis_main) + MCFG_CPU_VBLANK_INT("screen", rltennis_interrupt) + + MCFG_SCREEN_ADD("screen", RASTER) + MCFG_SCREEN_REFRESH_RATE( RLT_REFRESH_RATE ) + MCFG_SCREEN_FORMAT(BITMAP_FORMAT_INDEXED16) + MCFG_SCREEN_SIZE(320, 240) + MCFG_SCREEN_VISIBLE_AREA(0,319, 0, 239) + + MCFG_SCREEN_UPDATE(rltennis) + MCFG_PALETTE_LENGTH(256) + + MCFG_MACHINE_START( rltennis ) + MCFG_MACHINE_RESET( rltennis ) + MCFG_NVRAM_ADD_0FILL("nvram") + + MCFG_VIDEO_START( rltennis ) + + MCFG_SPEAKER_STANDARD_MONO("mono") + + MCFG_SOUND_ADD("dac1", DAC, 0) + MCFG_SOUND_ROUTE(ALL_OUTPUTS, "mono", .5) + MCFG_SOUND_ADD("dac2", DAC, 0) + MCFG_SOUND_ROUTE(ALL_OUTPUTS, "mono", .5) + +MACHINE_CONFIG_END + +ROM_START( rltennis ) + ROM_REGION( 0x100000, "maincpu", 0 ) + ROM_LOAD16_BYTE( "tennis_1.u12", 0x00001, 0x80000, CRC(2ded10d7) SHA1(cca1e858c9c759ef5c0aca6ee50d23d5d532534c) ) + ROM_LOAD16_BYTE( "tennis_2.u19", 0x00000, 0x80000, CRC(a0dbd2ed) SHA1(8db7dbb6a36fd0fb382a4938d7eba1f7662aa672) ) + + ROM_REGION( 0x1000000, "gfx1", ROMREGION_ERASE00 ) + ROM_LOAD( "tennis_5.u33", 0x000000, 0x80000, CRC(067a2e4b) SHA1(ab5a227de2b0c51b17aeca68c8af1bf224904ac8) ) + ROM_LOAD( "tennis_6.u34", 0x080000, 0x80000, CRC(901df2c1) SHA1(7e57d7c7e281ddc02a3e34178d3e471bd8e1d572) ) + ROM_LOAD( "tennis_7.u35", 0x100000, 0x80000, CRC(8d70fb37) SHA1(250c4c3d32e5a7e17413ee41e1abccb0492b63fd) ) + ROM_LOAD( "tennis_8.u36", 0x180000, 0x80000, CRC(26d202ba) SHA1(0e841e35de328f23624a19780a734a18f5409d69) ) + ROM_LOAD( "tennis_9.u37", 0x200000, 0x80000, CRC(1d164ee0) SHA1(b9c80b3c0dadbff36a04141b8995a5282a8d10f7) ) + ROM_LOAD( "tennis_10.u38",0x280000, 0x80000, CRC(fd2c6647) SHA1(787f236d5b72ee24d39e783eb2453bea58f07290) ) + ROM_LOAD( "tennis_11.u39",0x300000, 0x80000, CRC(a59dc0c8) SHA1(48f258e74fbb64b7538c9777d7598774ca8396eb) ) + ROM_LOAD( "tennis_12.u40",0x380000, 0x80000, CRC(b9677887) SHA1(84b79864555d3d6e9c443913910a055e27d30d08) ) + ROM_LOAD( "tennis_13.u41",0x400000, 0x80000, CRC(3d4fbcac) SHA1(e01f479d7d516ff83cbbd82d83617146d7a242d3) ) + ROM_LOAD( "tennis_14.u42",0x480000, 0x80000, CRC(37fe0f5d) SHA1(7593f1ea07bc0a741c952e6850bed1bf0a824510) ) + + ROM_REGION( 0x080000, "samples1", 0 ) + ROM_LOAD( "tennis_4.u59", 0x00000, 0x80000, CRC(f56462ea) SHA1(638777e12f2649a5b4366f034f0ba721fc4580a8) ) + + ROM_REGION( 0x080000, "samples2", 0 ) + ROM_LOAD( "tennis_3.u52", 0x00000, 0x80000, CRC(517dcd0e) SHA1(b2703e185ee8cf7e115ea07151e7bee8be34948b) ) +ROM_END + +GAME( 1993, rltennis, 0, rltennis, rltennis, 0, ROT0, "TCH", "Reality Tennis", GAME_IMPERFECT_GRAPHICS) |