diff options
Diffstat (limited to 'src/mame/drivers/gamecstl.c')
-rw-r--r-- | src/mame/drivers/gamecstl.c | 524 |
1 files changed, 524 insertions, 0 deletions
diff --git a/src/mame/drivers/gamecstl.c b/src/mame/drivers/gamecstl.c new file mode 100644 index 00000000000..74e9e981573 --- /dev/null +++ b/src/mame/drivers/gamecstl.c @@ -0,0 +1,524 @@ +/* + Cristaltec "Game Cristal" (MAME bootleg) + + Skeleton driver by R. Belmont, based on taitowlf.c by Ville Linde + + Specs: P3-866, SiS 630 graphics card, SiS 7018 sound, Windows 98, DirectX 8.1. + + Input is via a custom COM1 port JAMMA adaptor. + + The custom emulator is a heavily modified version of MAME32. If you extract the + disk image, it's in C:\GH4\GH4.EXE. It's UPX compressed, so unpack it before doing + any forensics. The emulator does run on Windows as new as XP Pro SP2 but you can't + control it due to the lack of the custom input. +*/ + +#include "driver.h" +#include "memconv.h" +#include "machine/8237dma.h" +#include "machine/pic8259.h" +#include "machine/pit8253.h" +#include "machine/mc146818.h" +#include "machine/pcshare.h" +#include "machine/pci.h" +#include "machine/8042kbdc.h" +#include "machine/pckeybrd.h" +#include "machine/idectrl.h" +#include "cpu/i386/i386.h" + +static UINT32 *cga_ram; +static UINT32 *bios_ram; + +static const rgb_t cga_palette[16] = +{ + MAKE_RGB( 0x00, 0x00, 0x00 ), MAKE_RGB( 0x00, 0x00, 0xaa ), MAKE_RGB( 0x00, 0xaa, 0x00 ), MAKE_RGB( 0x00, 0xaa, 0xaa ), + MAKE_RGB( 0xaa, 0x00, 0x00 ), MAKE_RGB( 0xaa, 0x00, 0xaa ), MAKE_RGB( 0xaa, 0x55, 0x00 ), MAKE_RGB( 0xaa, 0xaa, 0xaa ), + MAKE_RGB( 0x55, 0x55, 0x55 ), MAKE_RGB( 0x55, 0x55, 0xff ), MAKE_RGB( 0x55, 0xff, 0x55 ), MAKE_RGB( 0x55, 0xff, 0xff ), + MAKE_RGB( 0xff, 0x55, 0x55 ), MAKE_RGB( 0xff, 0x55, 0xff ), MAKE_RGB( 0xff, 0xff, 0x55 ), MAKE_RGB( 0xff, 0xff, 0xff ), +}; + +static VIDEO_START(gamecstl) +{ + int i; + for (i=0; i < 16; i++) + { + palette_set_color(machine, i, cga_palette[i]); + } +} + +static void draw_char(mame_bitmap *bitmap, const rectangle *cliprect, const gfx_element *gfx, int ch, int att, int x, int y) +{ + int i,j; + UINT8 *dp; + int index = 0; + dp = gfx->gfxdata + ch * gfx->char_modulo; + + for (j=y; j < y+8; j++) + { + UINT16 *p = BITMAP_ADDR16(bitmap, j, 0); + for (i=x; i < x+8; i++) + { + UINT8 pen = dp[index++]; + if (pen) + { + p[i] = Machine->remapped_colortable[gfx->color_base + (att & 0xf)]; + } + else + { + p[i] = Machine->remapped_colortable[gfx->color_base + ((att >> 4) & 0x7)]; + } + } + } +} + +static VIDEO_UPDATE(gamecstl) +{ + int i, j; + const gfx_element *gfx = machine->gfx[0]; + UINT32 *cga = cga_ram; + int index = 0; + + fillbitmap(bitmap, 0, cliprect); + + for (j=0; j < 25; j++) + { + for (i=0; i < 80; i+=2) + { + int att0 = (cga[index] >> 8) & 0xff; + int ch0 = (cga[index] >> 0) & 0xff; + int att1 = (cga[index] >> 24) & 0xff; + int ch1 = (cga[index] >> 16) & 0xff; + + draw_char(bitmap, cliprect, gfx, ch0, att0, i*8, j*8); + draw_char(bitmap, cliprect, gfx, ch1, att1, (i*8)+8, j*8); + index++; + } + } + return 0; +} + +static READ8_HANDLER(at_dma8237_1_r) +{ + return dma8237_1_r(offset / 2); +} + +static WRITE8_HANDLER(at_dma8237_1_w) +{ + dma8237_1_w(offset / 2, data); +} + +static READ32_HANDLER(at32_dma8237_1_r) +{ + return read32le_with_read8_handler(at_dma8237_1_r, offset, mem_mask); +} + +static WRITE32_HANDLER(at32_dma8237_1_w) +{ + write32le_with_write8_handler(at_dma8237_1_w, offset, data, mem_mask); +} + + + +// Intel 82439TX System Controller (MXTC) +static UINT8 mxtc_config_reg[256]; + +static UINT8 mxtc_config_r(int function, int reg) +{ +// mame_printf_debug("MXTC: read %d, %02X\n", function, reg); + + return mxtc_config_reg[reg]; +} + +static void mxtc_config_w(int function, int reg, UINT8 data) +{ +// mame_printf_debug("MXTC: write %d, %02X, %02X at %08X\n", function, reg, data, activecpu_get_pc()); + + switch(reg) + { + case 0x59: // PAM0 + { + if (data & 0x10) // enable RAM access to region 0xf0000 - 0xfffff + { + memory_set_bankptr(1, bios_ram); + } + else // disable RAM access (reads go to BIOS ROM) + { + memory_set_bankptr(1, memory_region(REGION_USER1) + 0x30000); + } + break; + } + } + + mxtc_config_reg[reg] = data; +} + +static void intel82439tx_init(void) +{ + mxtc_config_reg[0x60] = 0x02; + mxtc_config_reg[0x61] = 0x02; + mxtc_config_reg[0x62] = 0x02; + mxtc_config_reg[0x63] = 0x02; + mxtc_config_reg[0x64] = 0x02; + mxtc_config_reg[0x65] = 0x02; +} + +static UINT32 intel82439tx_pci_r(int function, int reg, UINT32 mem_mask) +{ + UINT32 r = 0; + if (!(mem_mask & 0xff000000)) + { + r |= mxtc_config_r(function, reg + 3) << 24; + } + if (!(mem_mask & 0x00ff0000)) + { + r |= mxtc_config_r(function, reg + 2) << 16; + } + if (!(mem_mask & 0x0000ff00)) + { + r |= mxtc_config_r(function, reg + 1) << 8; + } + if (!(mem_mask & 0x000000ff)) + { + r |= mxtc_config_r(function, reg + 0) << 0; + } + return r; +} + +static void intel82439tx_pci_w(int function, int reg, UINT32 data, UINT32 mem_mask) +{ + if (!(mem_mask & 0xff000000)) + { + mxtc_config_w(function, reg + 3, (data >> 24) & 0xff); + } + if (!(mem_mask & 0x00ff0000)) + { + mxtc_config_w(function, reg + 2, (data >> 16) & 0xff); + } + if (!(mem_mask & 0x0000ff00)) + { + mxtc_config_w(function, reg + 1, (data >> 8) & 0xff); + } + if (!(mem_mask & 0x000000ff)) + { + mxtc_config_w(function, reg + 0, (data >> 0) & 0xff); + } +} + +// Intel 82371AB PCI-to-ISA / IDE bridge (PIIX4) +static UINT8 piix4_config_reg[4][256]; + +static UINT8 piix4_config_r(int function, int reg) +{ +// mame_printf_debug("PIIX4: read %d, %02X\n", function, reg); + return piix4_config_reg[function][reg]; +} + +static void piix4_config_w(int function, int reg, UINT8 data) +{ +// mame_printf_debug("PIIX4: write %d, %02X, %02X at %08X\n", function, reg, data, activecpu_get_pc()); + piix4_config_reg[function][reg] = data; +} + +static UINT32 intel82371ab_pci_r(int function, int reg, UINT32 mem_mask) +{ + UINT32 r = 0; + if (!(mem_mask & 0xff000000)) + { + r |= piix4_config_r(function, reg + 3) << 24; + } + if (!(mem_mask & 0x00ff0000)) + { + r |= piix4_config_r(function, reg + 2) << 16; + } + if (!(mem_mask & 0x0000ff00)) + { + r |= piix4_config_r(function, reg + 1) << 8; + } + if (!(mem_mask & 0x000000ff)) + { + r |= piix4_config_r(function, reg + 0) << 0; + } + return r; +} + +static void intel82371ab_pci_w(int function, int reg, UINT32 data, UINT32 mem_mask) +{ + if (!(mem_mask & 0xff000000)) + { + piix4_config_w(function, reg + 3, (data >> 24) & 0xff); + } + if (!(mem_mask & 0x00ff0000)) + { + piix4_config_w(function, reg + 2, (data >> 16) & 0xff); + } + if (!(mem_mask & 0x0000ff00)) + { + piix4_config_w(function, reg + 1, (data >> 8) & 0xff); + } + if (!(mem_mask & 0x000000ff)) + { + piix4_config_w(function, reg + 0, (data >> 0) & 0xff); + } +} + +// ISA Plug-n-Play +static WRITE32_HANDLER( pnp_config_w ) +{ + if (!(mem_mask & 0x0000ff00)) + { +// mame_printf_debug("PNP Config: %02X\n", (data >> 8) & 0xff); + } +} + +static WRITE32_HANDLER( pnp_data_w ) +{ + if (!(mem_mask & 0x0000ff00)) + { +// mame_printf_debug("PNP Data: %02X\n", (data >> 8) & 0xff); + } +} + + + +static READ32_HANDLER( ide0_r ) +{ + return ide_controller32_0_r(0x1f0/4 + offset, mem_mask); +} + +static WRITE32_HANDLER( ide0_w ) +{ + ide_controller32_0_w(0x1f0/4 + offset, data, mem_mask); +} + +static READ32_HANDLER( fdc_r ) +{ + return ide_controller32_0_r(0x3f0/4 + offset, mem_mask); +} + +static WRITE32_HANDLER( fdc_w ) +{ + //mame_printf_debug("FDC: write %08X, %08X, %08X\n", data, offset, mem_mask); + ide_controller32_0_w(0x3f0/4 + offset, data, mem_mask); +} + + + +static WRITE32_HANDLER(bios_ram_w) +{ + if (mxtc_config_reg[0x59] & 0x20) // write to RAM if this region is write-enabled + { + COMBINE_DATA(bios_ram + offset); + } +} + +/*****************************************************************************/ + +static ADDRESS_MAP_START( gamecstl_map, ADDRESS_SPACE_PROGRAM, 32 ) + AM_RANGE(0x00000000, 0x0009ffff) AM_RAM + AM_RANGE(0x000a0000, 0x000affff) AM_RAM + AM_RANGE(0x000b0000, 0x000b7fff) AM_RAM AM_BASE(&cga_ram) + AM_RANGE(0x000e0000, 0x000effff) AM_RAM + AM_RANGE(0x000f0000, 0x000fffff) AM_ROMBANK(1) + AM_RANGE(0x000f0000, 0x000fffff) AM_WRITE(bios_ram_w) + AM_RANGE(0x00100000, 0x01ffffff) AM_RAM + AM_RANGE(0xfffc0000, 0xffffffff) AM_ROM AM_REGION(REGION_USER1, 0) /* System BIOS */ +ADDRESS_MAP_END + +static ADDRESS_MAP_START(gamecstl_io, ADDRESS_SPACE_IO, 32) + AM_RANGE(0x0000, 0x001f) AM_READWRITE(dma8237_32le_0_r, dma8237_32le_0_w) + AM_RANGE(0x0020, 0x003f) AM_READWRITE(pic8259_32le_0_r, pic8259_32le_0_w) + AM_RANGE(0x0040, 0x005f) AM_READWRITE(pit8253_32le_0_r, pit8253_32le_0_w) + AM_RANGE(0x0060, 0x006f) AM_READWRITE(kbdc8042_32le_r, kbdc8042_32le_w) + AM_RANGE(0x0070, 0x007f) AM_READWRITE(mc146818_port32le_r, mc146818_port32le_w) + AM_RANGE(0x0080, 0x009f) AM_READWRITE(at_page32_r, at_page32_w) + AM_RANGE(0x00a0, 0x00bf) AM_READWRITE(pic8259_32le_1_r, pic8259_32le_1_w) + AM_RANGE(0x00c0, 0x00df) AM_READWRITE(at32_dma8237_1_r, at32_dma8237_1_w) + AM_RANGE(0x00e8, 0x00eb) AM_NOP + AM_RANGE(0x01f0, 0x01f7) AM_READWRITE(ide0_r, ide0_w) + AM_RANGE(0x0300, 0x03af) AM_NOP + AM_RANGE(0x03b0, 0x03df) AM_NOP + AM_RANGE(0x0278, 0x027b) AM_WRITE(pnp_config_w) + AM_RANGE(0x03f0, 0x03ff) AM_READWRITE(fdc_r, fdc_w) + AM_RANGE(0x0a78, 0x0a7b) AM_WRITE(pnp_data_w) + AM_RANGE(0x0cf8, 0x0cff) AM_READWRITE(pci_32le_r, pci_32le_w) +ADDRESS_MAP_END + +/*****************************************************************************/ + +static const gfx_layout CGA_charlayout = +{ + 8,8, /* 8 x 16 characters */ + 256, /* 256 characters */ + 1, /* 1 bits per pixel */ + { 0 }, /* no bitplanes; 1 bit per pixel */ + /* x offsets */ + { 0,1,2,3,4,5,6,7 }, + /* y offsets */ + { 0*8,1*8,2*8,3*8, + 4*8,5*8,6*8,7*8, + 0*8,1*8,2*8,3*8, + 4*8,5*8,6*8,7*8 }, + 8*8 /* every char takes 8 bytes */ +}; + +static GFXDECODE_START( CGA ) +/* Support up to four CGA fonts */ + GFXDECODE_ENTRY( REGION_GFX1, 0x0000, CGA_charlayout, 0, 256 ) /* Font 0 */ + GFXDECODE_ENTRY( REGION_GFX1, 0x0800, CGA_charlayout, 0, 256 ) /* Font 1 */ + GFXDECODE_ENTRY( REGION_GFX1, 0x1000, CGA_charlayout, 0, 256 ) /* Font 2 */ + GFXDECODE_ENTRY( REGION_GFX1, 0x1800, CGA_charlayout, 0, 256 ) /* Font 3*/ +GFXDECODE_END + +#define AT_KEYB_HELPER(bit, text, key1) \ + PORT_BIT( bit, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_NAME(text) PORT_CODE(key1) + +static INPUT_PORTS_START(gamecstl) + PORT_START_TAG("pc_keyboard_0") + PORT_BIT ( 0x0001, 0x0000, IPT_UNUSED ) /* unused scancode 0 */ + AT_KEYB_HELPER( 0x0002, "Esc", KEYCODE_Q ) /* Esc 01 81 */ + + PORT_START_TAG("pc_keyboard_1") + AT_KEYB_HELPER( 0x0020, "Y", KEYCODE_Y ) /* Y 15 95 */ + AT_KEYB_HELPER( 0x1000, "Enter", KEYCODE_ENTER ) /* Enter 1C 9C */ + + PORT_START_TAG("pc_keyboard_2") + + PORT_START_TAG("pc_keyboard_3") + AT_KEYB_HELPER( 0x0002, "N", KEYCODE_N ) /* N 31 B1 */ + AT_KEYB_HELPER( 0x0800, "F1", KEYCODE_S ) /* F1 3B BB */ + + PORT_START_TAG("pc_keyboard_4") + + PORT_START_TAG("pc_keyboard_5") + + PORT_START_TAG("pc_keyboard_6") + AT_KEYB_HELPER( 0x0040, "(MF2)Cursor Up", KEYCODE_UP ) /* Up 67 e7 */ + AT_KEYB_HELPER( 0x0080, "(MF2)Page Up", KEYCODE_PGUP ) /* Page Up 68 e8 */ + AT_KEYB_HELPER( 0x0100, "(MF2)Cursor Left", KEYCODE_LEFT ) /* Left 69 e9 */ + AT_KEYB_HELPER( 0x0200, "(MF2)Cursor Right", KEYCODE_RIGHT ) /* Right 6a ea */ + AT_KEYB_HELPER( 0x0800, "(MF2)Cursor Down", KEYCODE_DOWN ) /* Down 6c ec */ + AT_KEYB_HELPER( 0x1000, "(MF2)Page Down", KEYCODE_PGDN ) /* Page Down 6d ed */ + AT_KEYB_HELPER( 0x4000, "Del", KEYCODE_A ) /* Delete 6f ef */ + + PORT_START_TAG("pc_keyboard_7") +INPUT_PORTS_END + +static int irq_callback(int irqline) +{ + int r = 0; + r = pic8259_acknowledge(1); + if (r==0) + { + r = pic8259_acknowledge(0); + } + return r; +} + +static MACHINE_RESET(gamecstl) +{ + memory_set_bankptr(1, memory_region(REGION_USER1) + 0x30000); + + dma8237_reset(); + cpunum_set_irq_callback(0, irq_callback); +} + +static MACHINE_DRIVER_START(gamecstl) + + /* basic machine hardware */ + MDRV_CPU_ADD(PENTIUM, 200000000) + MDRV_CPU_PROGRAM_MAP(gamecstl_map, 0) + MDRV_CPU_IO_MAP(gamecstl_io, 0) + + MDRV_SCREEN_REFRESH_RATE(60) + MDRV_SCREEN_VBLANK_TIME(DEFAULT_60HZ_VBLANK_DURATION) + + MDRV_MACHINE_RESET(gamecstl) + + MDRV_NVRAM_HANDLER( mc146818 ) + + /* video hardware */ + MDRV_VIDEO_ATTRIBUTES(VIDEO_TYPE_RASTER ) + MDRV_SCREEN_FORMAT(BITMAP_FORMAT_RGB15) + MDRV_SCREEN_SIZE(640, 480) + MDRV_SCREEN_VISIBLE_AREA(0, 639, 0, 199) + MDRV_GFXDECODE(CGA) + MDRV_PALETTE_LENGTH(16) + + MDRV_VIDEO_START(gamecstl) + MDRV_VIDEO_UPDATE(gamecstl) + +MACHINE_DRIVER_END + +static struct pci_device_info intel82439tx = +{ + intel82439tx_pci_r, + intel82439tx_pci_w +}; + +static struct pci_device_info intel82371ab = +{ + intel82371ab_pci_r, + intel82371ab_pci_w +}; + +static void set_gate_a20(int a20) +{ + cpunum_set_input_line(0, INPUT_LINE_A20, a20); +} + +static void keyboard_interrupt(int state) +{ + pic8259_set_irq_line(0, 1, state); +} + +static void ide_interrupt(int state) +{ + pic8259_set_irq_line(1, 6, state); +} + +static struct kbdc8042_interface at8042 = +{ + KBDC8042_AT386, set_gate_a20, keyboard_interrupt +}; + +static struct ide_interface ide_intf = +{ + ide_interrupt +}; + +static DRIVER_INIT( gamecstl ) +{ + bios_ram = auto_malloc(0x10000); + + init_pc_common(PCCOMMON_KEYBOARD_AT | PCCOMMON_DMA8237_AT | PCCOMMON_TIMER_8254); + mc146818_init(MC146818_STANDARD); + + intel82439tx_init(); + + pci_init(); + pci_add_device(0, 0, &intel82439tx); + pci_add_device(0, 7, &intel82371ab); + + kbdc8042_init(&at8042); + + ide_controller_init(0, &ide_intf); +} + +/*****************************************************************************/ + +// not the correct BIOS, f205v owes me a dump of it... +ROM_START(gamecstl) + ROM_REGION32_LE(0x40000, REGION_USER1, 0) + ROM_LOAD("p5tx-la.bin", 0x00000, 0x40000, BAD_DUMP CRC(072e6d51) SHA1(70414349b37e478fc28ecbaba47ad1033ae583b7)) + + ROM_REGION(0x08100, REGION_GFX1, 0) + ROM_LOAD("cga.chr", 0x00000, 0x01000, CRC(42009069) SHA1(ed08559ce2d7f97f68b9f540bddad5b6295294dd)) + + DISK_REGION( REGION_DISKS ) + DISK_IMAGE( "gamecstl", 0, MD5(501ddbebb530b8fd67eb64a4a2de3e35) SHA1(2477468ef1c1d4529057064a319ebfe9fd8facd7) ) +ROM_END + +/*****************************************************************************/ + +GAME(2002, gamecstl, 0, gamecstl, gamecstl, gamecstl, ROT0, "Cristaltec", "GameCristal", GAME_NOT_WORKING | GAME_NO_SOUND); + |