/* Truco-Tron - (c) 198? Playtronic SRL, Argentina Written by Ernesto Corvi Notes: - The board uses a battery backed ram for protection, mapped at $7c00-$7fff. - If the battery backup data is corrupt, it comes up with some sort of code entry screen. As far as I can tell, you can't do anything with it. - Replacing the battery backed ram with an eeprom is not really an option since the game stores the current credits count in the battery backed ram. - System clock is 12 Mhz. The CPU clock is unknown. - The Alternate Gfx mode is funky. Not only it has different bitmaps, but also the strings with the game options are truncated. Title is also truncated. */ #include "emu.h" #include "cpu/m6809/m6809.h" #include "sound/dac.h" #include "includes/truco.h" /***************************************************************************/ static ADDRESS_MAP_START( main_map, AS_PROGRAM, 8 ) AM_RANGE(0x0000, 0x17ff) AM_RAM /* general purpose ram */ AM_RANGE(0x1800, 0x7bff) AM_RAM AM_BASE_MEMBER(truco_state, m_videoram) /* video ram */ AM_RANGE(0x7c00, 0x7fff) AM_RAM AM_BASE_MEMBER(truco_state, m_battery_ram) /* battery backed ram */ AM_RANGE(0x8000, 0x8000) AM_READ_PORT("P1") AM_WRITENOP /* controls (and irq ack?) */ AM_RANGE(0x8001, 0x8001) AM_NOP /* unknown */ AM_RANGE(0x8002, 0x8002) AM_READ_PORT("DSW") AM_DEVWRITE("dac", dac_w) /* dipswitches */ AM_RANGE(0x8003, 0x8007) AM_NOP /* unknown */ AM_RANGE(0x8008, 0xffff) AM_ROM ADDRESS_MAP_END static INPUT_PORTS_START( truco ) PORT_START("P1") /* IN0 */ PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_UNKNOWN ) PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_UNKNOWN ) PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_UNKNOWN ) PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_UNKNOWN ) PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_UNKNOWN ) PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_BUTTON1 ) PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_JOYSTICK_UP ) PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_JOYSTICK_DOWN ) PORT_START("DSW") /* DSW1 */ PORT_DIPNAME( 0x01, 0x01, DEF_STR( Unknown ) ) PORT_DIPSETTING ( 0x01, DEF_STR( Off ) ) PORT_DIPSETTING ( 0x00, DEF_STR( On ) ) PORT_DIPNAME( 0x02, 0x02, "Alt. Graphics" ) PORT_DIPSETTING ( 0x02, DEF_STR( Off ) ) PORT_DIPSETTING ( 0x00, DEF_STR( On ) ) PORT_DIPNAME( 0x04, 0x04, DEF_STR( Unknown ) ) PORT_DIPSETTING ( 0x04, DEF_STR( Off ) ) PORT_DIPSETTING ( 0x00, DEF_STR( On ) ) PORT_DIPNAME( 0x08, 0x08, DEF_STR( Unknown ) ) PORT_DIPSETTING ( 0x08, DEF_STR( Off ) ) PORT_DIPSETTING ( 0x00, DEF_STR( On ) ) PORT_DIPNAME( 0x10, 0x10, DEF_STR( Unknown ) ) PORT_DIPSETTING ( 0x10, DEF_STR( Off ) ) PORT_DIPSETTING ( 0x00, DEF_STR( On ) ) PORT_DIPNAME( 0x20, 0x20, DEF_STR( Unknown ) ) PORT_DIPSETTING ( 0x20, DEF_STR( Off ) ) PORT_DIPSETTING ( 0x00, DEF_STR( On ) ) PORT_DIPNAME( 0x40, 0x40, DEF_STR( Unknown ) ) PORT_DIPSETTING ( 0x40, DEF_STR( Off ) ) PORT_DIPSETTING ( 0x00, DEF_STR( On ) ) PORT_DIPNAME( 0x80, 0x80, DEF_STR( Unknown ) ) PORT_DIPSETTING ( 0x80, DEF_STR( Off ) ) PORT_DIPSETTING ( 0x00, DEF_STR( On ) ) PORT_START("COIN") /* IN1 - FAKE - Used for coinup */ PORT_BIT( 0x01, IP_ACTIVE_HIGH, IPT_COIN1 ) PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_UNKNOWN ) PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_UNKNOWN ) PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_UNKNOWN ) 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 ) INPUT_PORTS_END static MACHINE_RESET( truco ) { truco_state *state = machine.driver_data(); int a; /* Setup the data on the battery backed RAM */ /* IRQ check */ state->m_battery_ram[0x002] = 0x51; state->m_battery_ram[0x024] = 0x49; state->m_battery_ram[0x089] = 0x04; state->m_battery_ram[0x170] = 0x12; state->m_battery_ram[0x1a8] = 0xd5; /* Mainloop check */ state->m_battery_ram[0x005] = 0x04; state->m_battery_ram[0x22B] = 0x46; state->m_battery_ram[0x236] = 0xfb; state->m_battery_ram[0x2fe] = 0x1D; state->m_battery_ram[0x359] = 0x5A; /* Boot check */ a = ( state->m_battery_ram[0x000] << 8 ) | state->m_battery_ram[0x001]; a += 0x4d2; state->m_battery_ram[0x01d] = ( a >> 8 ) & 0xff; state->m_battery_ram[0x01e] = a & 0xff; state->m_battery_ram[0x020] = state->m_battery_ram[0x011]; } static INTERRUPT_GEN( truco_interrupt ) { truco_state *state = device->machine().driver_data(); /* coinup */ if ( input_port_read(device->machine(), "COIN") & 1 ) { if ( state->m_trigger == 0 ) { generic_pulse_irq_line(device, M6809_IRQ_LINE); state->m_trigger++; } } else state->m_trigger = 0; } static MACHINE_CONFIG_START( truco, truco_state ) /* basic machine hardware */ MCFG_CPU_ADD("maincpu", M6809, 750000) /* ?? guess */ MCFG_CPU_PROGRAM_MAP(main_map) MCFG_CPU_VBLANK_INT("screen", truco_interrupt) MCFG_MACHINE_RESET(truco) /* video hardware */ MCFG_SCREEN_ADD("screen", RASTER) MCFG_SCREEN_REFRESH_RATE(60) MCFG_SCREEN_VBLANK_TIME(ATTOSECONDS_IN_USEC(2500) /* not accurate */) MCFG_SCREEN_FORMAT(BITMAP_FORMAT_INDEXED16) MCFG_SCREEN_SIZE(256, 192) MCFG_SCREEN_VISIBLE_AREA(0, 256-1, 0, 192-1) MCFG_SCREEN_UPDATE(truco) MCFG_PALETTE_LENGTH(16) MCFG_PALETTE_INIT(truco) /* sound hardware */ MCFG_SPEAKER_STANDARD_MONO("mono") MCFG_SOUND_ADD("dac", DAC, 0) MCFG_SOUND_ROUTE(ALL_OUTPUTS, "mono", 0.80) MACHINE_CONFIG_END /*************************************************************************** Game driver(s) ***************************************************************************/ ROM_START( truco ) ROM_REGION( 0x10000, "maincpu", 0 ) ROM_LOAD( "truco.u3", 0x08000, 0x4000, CRC(4642fb96) SHA1(e821f6fd582b141a5ca2d5bd53f817697048fb81) ) ROM_LOAD( "truco.u2", 0x0c000, 0x4000, CRC(ff355750) SHA1(1538f20b1919928ffca439e4046a104ddfbc756c) ) ROM_END GAME( 198?, truco, 0, truco, truco, 0, ROT0, "Playtronic SRL", "Truco-Tron", GAME_IMPERFECT_SOUND )