summaryrefslogtreecommitdiffstatshomepage
path: root/src/mame/drivers/fortecar.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'src/mame/drivers/fortecar.cpp')
-rw-r--r--src/mame/drivers/fortecar.cpp794
1 files changed, 0 insertions, 794 deletions
diff --git a/src/mame/drivers/fortecar.cpp b/src/mame/drivers/fortecar.cpp
deleted file mode 100644
index 04166a54623..00000000000
--- a/src/mame/drivers/fortecar.cpp
+++ /dev/null
@@ -1,794 +0,0 @@
-// license:BSD-3-Clause
-// copyright-holders:Angelo Salese, Roberto Fresca
-/*************************************************************************************************
-
- Forte Card
- 1994, Fortex Ltd.
-
- Driver by Angelo Salese.
- Additional work by Roberto Fresca & Rob Ragon.
-
- Notes:
- - NMI mask and vblank bit are made thru SW usage of the I register (that is unused
- if the z80 is in IM 1).
-
-
- TODO:
- - fortecar requires a proper EEPROM dump, doesn't start due of it.
- - fortecrd has non-default data in the default EEPROM.
-
- English set: bp 512 do pc=53e
- Spanish set: bp 512 do pc=562
-
--------------------------------------------------------------------------------------------------
-
- The Fortex company manufactured its first game 'Forte Card' in 1994. It soon became a favorite
- with the Bulgarian players. Improved versions were developed and were sold in Russia, Austria,
- Brazil, Argentina and the Balkan peninsular.
-
- In 1995, Fortex, first of all Bulgarian games manufacturers, exhibited at the Plovdiv Fair a com-
- puter based version of Forte Card. The following years were times of hard teamwork, which resul-
- ted in a variety of products: centralized cash desk, on-line jackpot and a network control and
- management system for game centers.
-
--------------------------------------------------------------------------------------------------
-
- Forte Card (POKER GAME)
-
- CPU SGS Z8400AB1 (Z80ACPU)
- VIDEO CM607P
- PIO M5L8255AP
- snd ay38910/P (microchip)
- + 8251A
-
- RAM 6116 + GOLDSTAR GM76C256ALL-70
- dip 1X8
-
--------------------------------------------------------------------------------------------------
-
- Forte Card - By Fortex Ltd.
- (Spanish Version)
-
- Sound AY 3-8910 @1.5Mhz
- USART 8251
- uProc Z80 @3MHz
- Video 6845 @1.5MHz
- PIO 8255
- NVRam 6116
- RAM 84256 (Video, I think)
- EEPROM NM93CS56N - (MICROWIRETM Bus Interface)
- 256-/1024-/2048-/4096-Bit Serial EEPROM
- with Data Protect and Sequential Read.
- RTC V3021
- Dip 1x8
-
- Xtal: 12 MHz.
-
-
- NOTE:
-
- The CM607P IC is an exact clone of Motorola's MC6845P CRT Controller circuit
- from MC6800 family. Used to perform the interface to raster scan CRT displays.
- Made in Bulgaria in the Pravetz factory, where Pravetz-8 and Pravetz-16 compu-
- ters were made in 1980's.
-
- FULL equivalent to MC6845P, UM6845R, EF6845P, HD6845P, etc.
-
- The ST93CS56 and ST93CS57 are 2K bit Electrically Erasable Programmable Memory (EEPROM)
- fabricated with SGS-THOMSON's High Endurance Single Polysilicon CMOS technology. The memory
- is accessed through a serial input D and output Q. The 2K bit memory is organized as 128 x 16 bit
- words.The memory is accessed by a set of instructions which include Read, Write, Page Write, Write
- All and instructions used to set the memory protection. A Read instruction loads the address of the
- first word to be read into an internal address pointer.
-
-
--------------------------------------------------------------------------------------------------
-
- Game Notes...
-
-
- There are 3 keys for service modes:
-
- 1) The Owner Key.
- 2) The Rental Key.
- 3) The Credits Key.
-
-
- To enter credits through an operator:
-
- 1) Turn ON the Credits Key.
- 2) Press RED button to add x1000, or BLACK to add x100
- 3) Turn OFF the Credit Key.
-
-
--------------------------------------------------------------------------------------------------
-
- From the manual (sic)...
-
- Initialization of the Forte Card circuit board
- (Init machine)
-
- 1) Open the door of the machine, switch on the game and wait until the message
- 'Permanent RAM test failed' appears.
- 2) Turn the Main Control and hold it in this position.
- 3) Enter the serial number of the circuit board with the eight keys.
- 4) Press STAR key and wait until the message 'Machine initialization completed' appears.
- 5) Release the Main Control, switch off the game and close the door.
- 6) Switch on the game and wait until the demonstration displays appear.
- 7) Turn the Main Control, adjust the time. This is the last step of the initialization procedure.
-
-
--------------------------------------------------------------------------------------------------
-
- Edge Connector / Pinouts....
-
- -------------------+--+------------------
- Components Side |PN| Solder Side
- -------------------+--+------------------
- GND |01| GND
- GND |02| GND
- +5V |03| +5V
- +5V |04| +5V
- +12V |05| +12V
- CUR. LOOP IN + |06| CUR. LOOP OUT +
- CUR. LOOP IN - |07| CUR. LOOP OUT -
- DOOR SWITCH |08| COUNTER IN
- PAYMENT |09| COUNTER OUT
- COIN |10| COUNTER KEY IN
- HOPPER COUNT |11| HOPPER DRIVE
- BANKNOTE IN |12| RESERVED
- CREDIT |13| RESERVED
- MANAGER |14| RESERVED
- PAGE 1 |15| RESERVE OUT
- RED BUTTON |16| RED LAMP
- BLACK BUTTON |17| BLACK LAMP
- HOLD 1 BUTTON |18| HOLD 1 LAMP
- HOLD 2 BUTTON |19| HOLD 2 LAMP
- HOLD 3 BUTTON |20| HOLD 3 LAMP
- HOLD 4 BUTTON |21| HOLD 4 LAMP
- HOLD 5 BUTTON |22| HOLD 5 LAMP
- START BUTTON |23| START LAMP
- GAIN SOUND |24| SPEAKER OUT
- GND SOUND |25| SP.OUT R/INTENSITY
- COMP.SYNC / H SYNC |26| RED
- V SYNC |27| GREEN
- GND MONITOR |28| BLUE
-
-
- Note: MANAGER and PAGE 1, are "Owner" and "Rental" modes.
-
-
--------------------------------------------------------------------------------------------------
-
- Serial EEPROM
- -------------
-
- Forte Card (Ver 110, Spanish)
-
- 0x80 x 16bit words
-
- Word Bytes Description Mode Notes
- -----+-------+-----------------------------------+-------+--------
- 0x00 00-01 Total Entradas (low) Owner
- 0x01 02-03 Total Entradas (med) Owner
- 0x02 04-05 Total Entradas (high) Owner
- 0x03 06-07 Total Salidas (low) Owner
- 0x04 08-09 Total Salidas (med) Owner
- 0x05 0A-0B Total Salidas (high) Owner
- 0x06 0C-0D Total Juegos (low) Owner
- 0x07 0E-0F Total Juegos (med) Owner
- 0x08 10-11 Total Juegos (high) Owner
- 0x09 12-13 Total Ganancias (low) Owner
- 0x0A 14-15 Total Ganancias (med) Owner
- 0x0B 16-17 Total Ganancias (high) Owner
- 0x0C 18-19 Total Ganancias C/Apuestas (low) Owner
- 0x0D 1A-1B Total Ganancias C/Apuestas (med) Owner
- 0x0E 1C-1D Total Ganancias C/Apuestas (high) Owner
- 0x0F 1E-1F Total Apuestas (low) Owner
-
- 0x10 20-21 Total Apuestas (med) Owner
- 0x11 22-23 Total Apuestas (high) Owner
- 0x12 24-25 Valor Moneda / Nivel Ganancia
- 0x13 26-27 Min Bet / Max Bet step (0-B) - (Clase C, bit1 active??)
- 0x14 28-29 Jokers (1-2) / ????
- 0x15 2A-2B Registro Dinero Minimo (low)
- 0x16 2C-2D Registro Dinero Minimo (high)
- 0x17 2E-2F Factor de Calculo (1-10-100)
- 0x18 30-31 Serial Number (low, 4 digits)
- 0x19 32-33 Serial Number (high, 0970)
- 0x1A 34-35 Unknown (6F2B)
- 0x1B 36-37 Unknown (0341)
- 0x1C 38-39 Unknown (980C)
- 0x1D 3A-3B Balance (low) Owner
- 0x1E 3C-3D Balance (med) Owner
- 0x1F 3E-3F Balance (high) Owner
-
- 0x20 40-41 Unknown (0000)
- 0x21 42-43 Unknown (0000)
- 0x22 44-45 Unknown (0000)
- 0x23 46-47 Unknown (0000)
- 0x24 48-49 Unknown (0000)
- 0x25 4A-4B Unknown (0000)
- 0x26 4C-4D Unknown (0000)
- 0x27 4E-4F Unknown (0000)
- 0x28 50-51 Unknown (0000)
- 0x29 52-53 Unknown (0000)
- 0x2A 54-55 Unknown (0000)
- 0x2B 56-57 Unknown (0000)
- 0x2C 58-59 Unknown (0000)
- 0x2D 5A-5B Unknown (0000)
- 0x2E 5C-5D Unknown (0000)
- 0x2F 5E-5F Unknown (0000)
-
- 0x30 60-61 Unknown (0000)
- 0x31 62-63 Unknown (0000)
- 0x32 64-65 Unknown (0000)
- 0x33 66-67 Unknown (0000)
- 0x34 68-69 Unknown (0000)
- 0x35 6A-6B Unknown (0000)
- 0x36 6C-6D Unknown (0000)
- 0x37 6E-6F Unknown (0000)
- 0x38 70-71 Unknown (0000)
- 0x39 72-73 Unknown (0000)
- 0x3A 74-75 Unknown (0000)
- 0x3B 76-77 Unknown (0000)
- 0x3C 78-79 Unknown (0000)
- 0x3D 7A-7B Unknown (0000)
- 0x3E 7C-7D Unknown (0000)
- 0x3F 7E-7F Unknown (0000)
-
- 0x40 80-81 Unknown (0000)
- 0x41 82-83 Unknown (0000)
- 0x42 84-85 Unknown (0000)
- 0x43 86-87 Unknown (1187)
- 0x44 88-89 Unknown (B042)
- 0x45 8A-8B Unknown (0000)
- 0x46 8C-8D Unknown (0000)
- 0x47 8E-8F Unknown (0000)
- 0x48 90-91 Unknown (0000)
- 0x49 92-93 Unknown (0000)
- 0x4A 94-95 Unknown (0000)
- 0x4B 96-97 Unknown (0000)
- 0x4C 98-99 Unknown (0000)
- 0x4D 9A-9B Unknown (0000)
- 0x4E 9C-9D Unknown (0000)
- 0x4F 9E-9F Unknown (0000)
-
- 0x50 A0-A1 Unknown (0000)
- 0x51 A2-A3 Unknown (0000)
- 0x52 A4-A5 Unknown (0000)
- 0x53 A6-A7 Unknown (0000)
- 0x54 A8-A9 Unknown (0000)
- 0x55 AA-AB Unknown (0000)
- 0x56 AC-AD Unknown (0000)
- 0x57 AE-AF Unknown (0000)
- 0x58 B0-B1 Unknown (0000)
- 0x59 B2-B3 Unknown (0000)
- 0x5A B4-B5 Unknown (0000)
- 0x5B B6-B7 Unknown (0000)
- 0x5C B8-B9 Unknown (0000)
- 0x5D BA-BB Unknown (0000)
- 0x5E BC-BD Unknown (0000)
- 0x5F BE-BF Unknown (0000)
-
- 0x60 C0-C1 Unknown (0000)
- 0x61 C2-C3 Unknown (0000)
- 0x62 C4-C5 Unknown (0000)
- 0x63 C6-C7 Unknown (0000)
- 0x64 C8-C9 Unknown (0000)
- 0x65 CA-CB Unknown (0000)
- 0x66 CC-CD Unknown (0000)
- 0x67 CE-CF Unknown (0000)
- 0x68 D0-D1 Unknown (0000)
- 0x69 D2-D3 Unknown (0000)
- 0x6A D4-D5 Unknown (0000)
- 0x6B D6-D7 Unknown (1187)
- 0x6C D8-D9 Unknown (B042)
- 0x6D DA-DB Global Entradas (low) Rental
- 0x6E DC-DD Global Entradas (high) Rental
- 0x6F DE-DF Unknown (1187)
-
- 0x70 E0-E1 Unknown (B042)
- 0x71 E2-E3 Global Salidas (low) Rental
- 0x72 E4-E5 Global Salidas (high) Rental
- 0x73 E6-E7 Unknown (172E)
- 0x74 E8-E9 Unknown (980B)
- 0x75 EA-EB Total Entradas Anterior (low)
- 0x76 EC-ED Total Entradas Anterior (high)
- 0x77 EE-EF Unknown (172E)
- 0x78 F0-F1 Unknown (980B)
- 0x79 F2-F3 Total Salidas Anterior (low)
- 0x7A F4-F5 Total Salidas Anterior (high)
- 0x7B F6-F7 Unknown (2114)
- 0x7C F8-F9 ??? / Valor Billete
- 0x7D FA-FB Unknown (0000)
- 0x7E FC-FD Unknown (0000)
- 0x7F FE-FF Checksum
-
-
-**************************************************************************************************/
-
-#include "emu.h"
-#include "cpu/z80/z80.h"
-#include "machine/eepromser.h"
-#include "machine/i8255.h"
-#include "machine/nvram.h"
-#include "machine/v3021.h"
-#include "machine/watchdog.h"
-#include "sound/ay8910.h"
-#include "video/mc6845.h"
-#include "video/resnet.h"
-#include "emupal.h"
-#include "screen.h"
-#include "speaker.h"
-
-#include "fortecrd.lh"
-
-
-#define MASTER_CLOCK XTAL(12'000'000)
-#define CPU_CLOCK (MASTER_CLOCK/4)
-#define CRTC_CLOCK (MASTER_CLOCK/8)
-#define AY_CLOCK (MASTER_CLOCK/8)
-
-
-class fortecar_state : public driver_device
-{
-public:
- fortecar_state(const machine_config &mconfig, device_type type, const char *tag) :
- driver_device(mconfig, type, tag),
- m_maincpu(*this,"maincpu"),
- m_watchdog(*this, "watchdog"),
- m_vram(*this, "vram"),
- m_eeprom(*this, "eeprom"),
- m_gfxdecode(*this, "gfxdecode"),
- m_palette(*this, "palette"),
- m_lamps(*this, "lamp%u", 0U)
- { }
-
- void fortecar(machine_config &config);
-
- void init_fortecar();
-
-protected:
- virtual void machine_start() override;
- virtual void machine_reset() override;
-
-private:
- required_device<cpu_device> m_maincpu;
- required_device<watchdog_timer_device> m_watchdog;
- required_shared_ptr<uint8_t> m_vram;
- required_device<eeprom_serial_93cxx_device> m_eeprom;
- required_device<gfxdecode_device> m_gfxdecode;
- required_device<palette_device> m_palette;
- output_finder<8> m_lamps;
-
- DECLARE_WRITE8_MEMBER(ppi0_portc_w);
- DECLARE_READ8_MEMBER(ppi0_portc_r);
- DECLARE_WRITE8_MEMBER(ayporta_w);
- DECLARE_WRITE8_MEMBER(ayportb_w);
-
- void fortecar_palette(palette_device &palette) const;
- uint32_t screen_update(screen_device &screen, bitmap_rgb32 &bitmap, const rectangle &cliprect);
-
- void fortecar_map(address_map &map);
- void fortecar_ports(address_map &map);
-};
-
-
-/***********************************
-* Video Hardware *
-***********************************/
-
-void fortecar_state::machine_start()
-{
- m_lamps.resolve();
-}
-
-uint32_t fortecar_state::screen_update(screen_device &screen, bitmap_rgb32 &bitmap, const rectangle &cliprect)
-{
- int count = 0;
-
- for (int y = 0; y < 0x1e; y++)
- {
- for(int x = 0; x < 0x4b; x++)
- {
- int tile = (m_vram[(count*4)+1] | (m_vram[(count*4)+2]<<8)) & 0xfff;
- int color = m_vram[(count*4)+3] & 0x1f;
- int bpp = (m_vram[(count*4)+3] & 0x20) >> 5;
-
- if(bpp)
- color &= 0x3;
-
- m_gfxdecode->gfx(bpp)->opaque(bitmap, cliprect, tile, color, 0, 0, x*8, y*8);
- count++;
-
- }
- }
-
- return 0;
-}
-
-void fortecar_state::fortecar_palette(palette_device &palette) const
-{
-/* Video resistors...
-
-O1 (LS374) R1K RED
-O2 (LS374) R510 RED
-O3 (LS374) R220 RED
-O4 (LS374) R1K GREEN
-O5 (LS374) R510 GREEN
-O6 (LS374) R220 GREEN
-O7 (LS374) R510 BLUE
-O8 (LS374) R220 BLUE
-
-R = 82 Ohms Pull Down.
-*/
- static constexpr int resistances_rg[3] = { 1000, 510, 220 };
- static constexpr int resistances_b [2] = { 510, 220 };
-
- double weights_r[3], weights_g[3], weights_b[2];
- compute_resistor_weights(0, 255, -1.0,
- 3, resistances_rg, weights_r, 82, 0,
- 3, resistances_rg, weights_g, 82, 0,
- 2, resistances_b, weights_b, 82, 0);
-
- uint8_t const *const color_prom = memregion("proms")->base();
- for (int i = 0; i < 512; i++)
- {
- int bit0, bit1, bit2;
-
- // red component
- bit0 = BIT(color_prom[i], 0);
- bit1 = BIT(color_prom[i], 1);
- bit2 = BIT(color_prom[i], 2);
- int const r = combine_weights(weights_r, bit0, bit1, bit2);
-
- // green component
- bit0 = BIT(color_prom[i], 3);
- bit1 = BIT(color_prom[i], 4);
- bit2 = BIT(color_prom[i], 5);
- int const g = combine_weights(weights_g, bit0, bit1, bit2);
-
- // blue component
- bit0 = BIT(color_prom[i], 6);
- bit1 = BIT(color_prom[i], 7);
- int const b = combine_weights(weights_b, bit0, bit1);
-
- palette.set_pen_color(i, rgb_t(r, g, b));
- }
-}
-
-
-/***********************************
-* Misc R/W Handlers *
-***********************************/
-
-WRITE8_MEMBER(fortecar_state::ppi0_portc_w)
-{
-/*
-NM93CS56N Serial EEPROM
-
-CS PPI_PC0
-CK PPI_PC1
-DIN PPI_PC2
-DOUT PPI_PC4
-*/
- m_eeprom->di_write((data & 0x04) >> 2);
- m_eeprom->cs_write((data & 0x01) ? ASSERT_LINE : CLEAR_LINE);
- m_eeprom->clk_write((data & 0x02) ? ASSERT_LINE : CLEAR_LINE);
-}
-
-READ8_MEMBER(fortecar_state::ppi0_portc_r)
-{
-// popmessage("%s",machine().describe_context());
- return ((m_eeprom->do_read() << 4) & 0x10);
-}
-
-WRITE8_MEMBER(fortecar_state::ayporta_w)
-{
-/* System Lamps...
-
- - bits -
- 7654 3210
- ---- ---x START lamp.
- ---- --x- HOLD5 lamp.
- ---- -x-- HOLD4 lamp.
- ---- x--- HOLD3 lamp.
- ---x ---- HOLD2 lamp.
- --x- ---- HOLD1 lamp.
- -x-- ---- BLACK lamp.
- x--- ---- RED/BET lamp.
-
- Also used for POST?...
-
- 0x01 (start): RAM test d000-d7ff
- 0x02 (hold5): VRAM test d800-ffff
- 0x04 (hold4): Video SYNC test
- 0x08 (hold3): ROM check
- 0x10 (hold2): NVRAM check
- 0x20 (hold1): IRQ test
- 0x40 (black): Stack RAM check
-*/
- for (int i = 0; i < 8; i++)
- m_lamps[i] = BIT(data, i);
-}
-
-
-WRITE8_MEMBER(fortecar_state::ayportb_w)
-{
-/*
-
-There is a RC to 7705's Reset.
-Bit7 of port B is a watchdog.
-
-A square wave is fed to through resistor R to capacitor C, with a constant charge/discharge
-time relative to the value of resistor R and value of capacitor C. If the square wave halts,
-capacitor C will charge beyond the hysteresis threshold of the TL7705 (leg 6), causing it to
-trigger a reset.
-
-Seems to work properly, but must be checked closely...
-
-*/
- if (((data >> 7) & 0x01) == 0) /* check for bit7 */
- {
- m_watchdog->watchdog_reset();
- }
-
-// logerror("AY port B write %02x\n",data);
-}
-
-
-/***********************************
-* Memory Map Information *
-***********************************/
-
-void fortecar_state::fortecar_map(address_map &map)
-{
- map(0x0000, 0xbfff).rom();
- map(0xc000, 0xc7ff).rom();
- map(0xd000, 0xd7ff).ram().share("nvram");
- map(0xd800, 0xffff).ram().share("vram");
-}
-
-void fortecar_state::fortecar_ports(address_map &map)
-{
- map.global_mask(0xff);
- map(0x20, 0x20).w("crtc", FUNC(mc6845_device::address_w)); // pc=444
- map(0x21, 0x21).w("crtc", FUNC(mc6845_device::register_w));
- map(0x40, 0x40).r("aysnd", FUNC(ay8910_device::data_r));
- map(0x40, 0x41).w("aysnd", FUNC(ay8910_device::address_data_w));
- map(0x60, 0x63).rw("fcppi0", FUNC(i8255_device::read), FUNC(i8255_device::write));//M5L8255AP
-// map(0x80, 0x81) //8251A UART
- map(0xa0, 0xa0).rw("rtc", FUNC(v3021_device::read), FUNC(v3021_device::write));
- map(0xa1, 0xa1).portr("DSW");
-}
-/*
-
-CRTC REGISTER: 00 01 02 03 04 05 06 07 08 09 0a 0b 0c 0d 0e 0f
-CRTC DATA : 5f 4b 50 08 21 05 1e 1f 00 07 20 00 06 00 00 00
-
-Error messages:
-
-"FALSA PRUEBA NVR" (NVRAM new, no serial EEPROM connected)
-"FALLO EN NVR" (NVRAM ok, no serial EEPROM connected)
-"FALSA PRUEBA NVRAM PERMANENTE" (NVRAM new, serial EEPROM connected)
-
-*/
-
-
-/***********************************
-* Input Ports *
-***********************************/
-
-static INPUT_PORTS_START( fortecar )
- PORT_START("DSW") /* 8bit */
- PORT_DIPNAME( 0x01, 0x01, "DSW-1" ) PORT_DIPLOCATION("DSW:1")
- PORT_DIPSETTING( 0x01, DEF_STR( Off ) )
- PORT_DIPSETTING( 0x00, DEF_STR( On ) )
- PORT_DIPNAME( 0x02, 0x02, "Attract Mode" ) PORT_DIPLOCATION("DSW:2")
- PORT_DIPSETTING( 0x00, DEF_STR( Off ) )
- PORT_DIPSETTING( 0x02, DEF_STR( On ) )
- PORT_DIPNAME( 0x04, 0x04, "DSW-3" ) PORT_DIPLOCATION("DSW:3")
- PORT_DIPSETTING( 0x04, DEF_STR( Off ) )
- PORT_DIPSETTING( 0x00, DEF_STR( On ) )
- PORT_DIPNAME( 0x08, 0x08, "DSW-4" ) PORT_DIPLOCATION("DSW:4")
- PORT_DIPSETTING( 0x08, DEF_STR( Off ) )
- PORT_DIPSETTING( 0x00, DEF_STR( On ) )
- PORT_DIPNAME( 0x10, 0x10, "DSW-5" ) PORT_DIPLOCATION("DSW:5")
- PORT_DIPSETTING( 0x10, DEF_STR( Off ) )
- PORT_DIPSETTING( 0x00, DEF_STR( On ) )
- PORT_DIPNAME( 0x20, 0x20, "DSW-6" ) PORT_DIPLOCATION("DSW:6")
- PORT_DIPSETTING( 0x20, DEF_STR( Off ) )
- PORT_DIPSETTING( 0x00, DEF_STR( On ) )
- PORT_DIPNAME( 0x40, 0x40, "DSW-7" ) PORT_DIPLOCATION("DSW:7")
- PORT_DIPSETTING( 0x40, DEF_STR( Off ) )
- PORT_DIPSETTING( 0x00, DEF_STR( On ) )
- PORT_DIPNAME( 0x80, 0x80, "DSW-8" ) PORT_DIPLOCATION("DSW:8")
- PORT_DIPSETTING( 0x80, DEF_STR( Off ) )
- PORT_DIPSETTING( 0x00, DEF_STR( On ) )
-
- PORT_START("INPUT") /* 8bit */
- PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_GAMBLE_HIGH ) PORT_NAME("Red / Bet")
- PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_GAMBLE_LOW ) PORT_NAME("Black")
- PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_POKER_HOLD1 )
- PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_POKER_HOLD2 )
- PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_POKER_HOLD3 )
- PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_POKER_HOLD4 )
- PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_POKER_HOLD5 )
- PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_GAMBLE_DEAL )
-
- PORT_START("SYSTEM") /* 8bit */
- PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_SERVICE1 ) PORT_NAME("Rear Door") PORT_CODE(KEYCODE_D) PORT_TOGGLE
- PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_GAMBLE_KEYOUT ) PORT_NAME("Payout")
- PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_COIN1 ) PORT_NAME("Coin In")
- PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_UNKNOWN ) /* to trace */
- PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_COIN2 ) PORT_NAME("Note In")
- PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_SERVICE1 ) PORT_NAME("Credits Key") PORT_CODE(KEYCODE_Q) PORT_TOGGLE
- PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_SERVICE1 ) PORT_NAME("Owner Key") PORT_CODE(KEYCODE_0) PORT_TOGGLE
- PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_SERVICE1 ) PORT_NAME("Rental Key") PORT_CODE(KEYCODE_9) PORT_TOGGLE
-INPUT_PORTS_END
-
-
-/***************************************
-* Graphics Layouts *
-***************************************/
-
-static const gfx_layout tiles8x8_layout_3bpp =
-{
- 8, 8,
- RGN_FRAC(1,3),
- 3,
- { RGN_FRAC(2,3)+4, RGN_FRAC(1,3)+4, RGN_FRAC(0,3)+4 },
- { 8, 9, 10, 11, 0, 1, 2, 3 },
- { 0*16, 1*16, 2*16, 3*16, 4*16, 5*16, 6*16, 7*16 },
- 16*8
-};
-
-static const gfx_layout tiles8x8_layout_6bpp =
-{
- 8, 8,
- RGN_FRAC(1,3),
- 6,
- { RGN_FRAC(2,3)+0, RGN_FRAC(1,3)+0, RGN_FRAC(0,3)+0, RGN_FRAC(2,3)+4, RGN_FRAC(1,3)+4, RGN_FRAC(0,3)+4 },
- { 8, 9, 10, 11, 0, 1, 2, 3 },
- { 0*16, 1*16, 2*16, 3*16, 4*16, 5*16, 6*16, 7*16 },
- 16*8
-};
-
-
-/****************************************
-* Graphics Decode Information *
-****************************************/
-
-static GFXDECODE_START( gfx_fortecar )
- GFXDECODE_ENTRY( "gfx1", 0, tiles8x8_layout_3bpp, 0x000, 0x20 )
- GFXDECODE_ENTRY( "gfx1", 0, tiles8x8_layout_6bpp, 0x100, 0x04 )
-GFXDECODE_END
-
-
-/***********************************
-* Machine Start & Reset *
-***********************************/
-
-void fortecar_state::machine_reset()
-{
- /* apparently there's a random fill in there (checked thru trojan TODO: extract proper algorithm) */
- for (int i = 0; i < m_vram.bytes(); i++)
- m_vram[i] = machine().rand();
-}
-
-
-/***********************************
-* Machine Drivers *
-***********************************/
-
-void fortecar_state::fortecar(machine_config &config)
-{
- /* basic machine hardware */
- Z80(config, m_maincpu, CPU_CLOCK); /* 3 MHz, measured */
- m_maincpu->set_addrmap(AS_PROGRAM, &fortecar_state::fortecar_map);
- m_maincpu->set_addrmap(AS_IO, &fortecar_state::fortecar_ports);
-
- WATCHDOG_TIMER(config, m_watchdog).set_time(attotime::from_msec(200)); /* guess */
-
- NVRAM(config, "nvram", nvram_device::DEFAULT_ALL_0);
-
- /* video hardware */
- screen_device &screen(SCREEN(config, "screen", SCREEN_TYPE_RASTER));
- screen.set_refresh_hz(60);
- screen.set_vblank_time(ATTOSECONDS_IN_USEC(0));
- screen.set_size(640, 256);
- screen.set_visarea(0, 600-1, 0, 240-1); /* driven by CRTC */
- screen.set_screen_update(FUNC(fortecar_state::screen_update));
-
- EEPROM_93C56_16BIT(config, "eeprom").default_value(0);
-
- i8255_device &fcppi0(I8255A(config, "fcppi0"));
- /* Init with 0x9a... A, B and high C as input
- Serial Eprom connected to Port C */
- fcppi0.in_pa_callback().set_ioport("SYSTEM");
- fcppi0.in_pb_callback().set_ioport("INPUT");
- fcppi0.in_pc_callback().set(FUNC(fortecar_state::ppi0_portc_r));
- fcppi0.out_pc_callback().set(FUNC(fortecar_state::ppi0_portc_w));
-
- V3021(config, "rtc");
-
- GFXDECODE(config, m_gfxdecode, m_palette, gfx_fortecar);
- PALETTE(config, m_palette, FUNC(fortecar_state::fortecar_palette), 0x200);
-
- mc6845_device &crtc(MC6845(config, "crtc", CRTC_CLOCK)); /* 1.5 MHz, measured */
- crtc.set_screen("screen");
- crtc.set_show_border_area(false);
- crtc.set_char_width(8);
- crtc.out_vsync_callback().set_inputline(m_maincpu, INPUT_LINE_NMI);
-
- SPEAKER(config, "mono").front_center();
-
- ay8910_device &aysnd(AY8910(config, "aysnd", AY_CLOCK)); /* 1.5 MHz, measured */
- aysnd.port_a_write_callback().set(FUNC(fortecar_state::ayporta_w));
- aysnd.port_b_write_callback().set(FUNC(fortecar_state::ayportb_w));
- aysnd.add_route(ALL_OUTPUTS, "mono", 0.50);
-}
-
-
-/*******************************
-* ROMs Load *
-*******************************/
-
-ROM_START( fortecrd )
- ROM_REGION( 0x10000, "maincpu", 0 )
- ROM_LOAD( "forte_card.u7", 0x00000, 0x010000, CRC(79fc6dd3) SHA1(5454f2ee12b62d573b61c54e48398f43332b000e) )
-
- ROM_REGION( 0x30000, "gfx1", 0 )
- ROM_LOAD( "forte_card.u38", 0x00000, 0x10000, CRC(258fb7bf) SHA1(cd75001fe40836b2dc229caddfc38f6076df7a79) )
- ROM_LOAD( "forte_card.u39", 0x10000, 0x10000, CRC(3d9c478e) SHA1(eb86115d1c36038f2c80cd116f5aeddd94036424) )
- ROM_LOAD( "forte_card.u40", 0x20000, 0x10000, CRC(9693bb83) SHA1(e3e3bc750c89a1edd1072ce3890b2ce498dec633) )
-
- ROM_REGION( 0x0800, "nvram", 0 ) /* default NVRAM */
- ROM_LOAD( "fortecrd_nvram.u6", 0x0000, 0x0800, CRC(7d3e7eb5) SHA1(788fe7adc381bcc6eaefed33f5aa1081340608a0) )
-
- ROM_REGION16_BE( 0x0100, "eeprom", 0 ) /* default serial EEPROM */
- ROM_LOAD16_WORD_SWAP( "forte_card_93cs56_serial_12345678.u13", 0x0000, 0x0100, CRC(2fc5961d) SHA1(f958c8b2b4e48cc6e5a607a6751acde5592bd27f) )
-
- ROM_REGION( 0x0200, "proms", 0 )
- ROM_LOAD( "forte_card_82s147.u47", 0x0000, 0x0200, CRC(7e631818) SHA1(ac08b0de30260278af3a1c5dee5810d4304cb9ca) )
-ROM_END
-
-ROM_START( fortecar )
- ROM_REGION( 0x10000, "maincpu", 0 )
- ROM_LOAD( "fortecar.u7", 0x00000, 0x010000, CRC(2a4b3429) SHA1(8fa630dac949e758678a1a36b05b3412abe8ae16) )
-
- ROM_REGION( 0x30000, "gfx1", 0 )
- ROM_LOAD( "fortecar.u38", 0x00000, 0x10000, CRC(c2090690) SHA1(f0aa8935b90a2ab6043555ece69f926372246648) )
- ROM_LOAD( "fortecar.u39", 0x10000, 0x10000, CRC(fc3ddf4f) SHA1(4a95b24c4edb67f6d59f795f86dfbd12899e01b0) )
- ROM_LOAD( "fortecar.u40", 0x20000, 0x10000, CRC(9693bb83) SHA1(e3e3bc750c89a1edd1072ce3890b2ce498dec633) )
-
- /* taken from the Spanish version, these are likely to be identical anyway */
- ROM_REGION( 0x0800, "nvram", 0 ) /* default NVRAM */
- ROM_LOAD( "fortecrd_nvram.u6", 0x0000, 0x0800, BAD_DUMP CRC(7d3e7eb5) SHA1(788fe7adc381bcc6eaefed33f5aa1081340608a0) )
-
- ROM_REGION16_BE( 0x0100, "eeprom", 0 ) /* default serial EEPROM */
- ROM_LOAD16_WORD_SWAP( "forte_card_93cs56_serial_12345678.u13", 0x0000, 0x0100, BAD_DUMP CRC(2fc5961d) SHA1(f958c8b2b4e48cc6e5a607a6751acde5592bd27f) )
-
- ROM_REGION( 0x200, "proms", 0 )
- ROM_LOAD( "forte_card_82s147.u47", 0x0000, 0x0200, BAD_DUMP CRC(7e631818) SHA1(ac08b0de30260278af3a1c5dee5810d4304cb9ca) )
-ROM_END
-
-
-/***********************************
-* Driver Init *
-***********************************/
-
-void fortecar_state::init_fortecar()
-{
- // ...
-}
-
-
-/***********************************
-* Game Drivers *
-***********************************/
-
-// YEAR NAME PARENT MACHINE INPUT CLASS INIT ROT COMPANY FULLNAME FLAGS LAYOUT
-GAMEL( 1994, fortecrd, 0, fortecar, fortecar, fortecar_state, init_fortecar, ROT0, "Fortex Ltd", "Forte Card (Ver 110, Spanish)", 0, layout_fortecrd )
-GAMEL( 1994, fortecar, fortecrd, fortecar, fortecar, fortecar_state, init_fortecar, ROT0, "Fortex Ltd", "Forte Card (Ver 103, English)", MACHINE_NOT_WORKING, layout_fortecrd )