diff options
Diffstat (limited to 'src/mess/drivers/crvision.c')
-rw-r--r-- | src/mess/drivers/crvision.c | 903 |
1 files changed, 0 insertions, 903 deletions
diff --git a/src/mess/drivers/crvision.c b/src/mess/drivers/crvision.c deleted file mode 100644 index e6b26b8d287..00000000000 --- a/src/mess/drivers/crvision.c +++ /dev/null @@ -1,903 +0,0 @@ -// license:BSD-3-Clause -// copyright-holders:Wilbert Pol, Curt Coder -/* - This 1980s computer was manufactured by Vtech of Hong Kong. - known as: CreatiVision, Dick Smith Wizzard, Funvision, Rameses, VZ 2000 and possibly others. - - There is also a CreatiVision Mk 2, possibly also known as the Laser 500. This was a hardware variant, - sort of "evolved" hardware made compatible for the scheduled "ColecoVision expansion module", which - never actually shipped for CreatiVision, but for the Laser 2001 home computer (successor to - CreatiVision). - - TODO: - - CreatiVision - - - fix Diagnostic A (video) sprites generator test - - proper keyboard emulation, need keyboard schematics - - memory expansion 16K, can be chained - - centronics control/status port - - non-working cartridges: - * Diagnostic B (keyboard) - - homebrew roms with graphics issues: - * Christmas Demo 1.0 - * Titanic Frogger Demo 1.0 - * Titanic Frogger Demo 1.1 - - Salora Manager - - - keyboard Ctrl+I/J/N don't print out BASIC commands - - RAM mapping - - cassette (figure out correct input level) - - floppy (interface cartridge needed) - -*/ - -/* - -Salora Manager - -PCB Layout ----------- - -Main board - -35 0352 02 -700391F - -|-------------------------------------------------------------------------------| -| |-----CN1-----| |-----CN2-----| | -| 10.738MHz --| -| 4116 CN3 | -| ROM01 VDC | -| 4116 --| -| | -| ROM23 4116 - | -| | | -| 4116 | | -| LS04 CN6 --| -| 4116 | 6821 | -| LS32 | | -| 4116 - | -| LS139 PSG | -| 4116 | -| LS138 | -| 4116 CN4 | -| LS244 | -| | -| LS245 | -| | -| LS244 | -| 6502 --| -| LS244 | -| |-------------CN5-------------| | -|-------------------------------------------------------------------------------| - -Notes: -All IC's shown. Prototype-ish board, with many jumper wires and extra capacitors. - -ROM01 - Toshiba TMM2464P 8Kx8 one-time PROM, labeled "0.1" -ROM23 - Toshiba TMM2464P 8Kx8 one-time PROM, labeled "23" -6502 - Rockwell R6502AP 8-bit Microprocessor -6821 - Hitachi HD468B21P Peripheral Interface Adaptor -VDC - Texas Instruments TMS9929A Video Display Controller (covered w/heatsink) -PSG - Texas Instruments SN76489AN Programmable Sound Generator -4116 - Toshiba TMM416P-3 16Kx1 RAM (covered w/heatsink) -CN1 - sub board connector (17x2 pin header) -CN2 - RF board connector (17x1 pin header) -CN3 - printer connector (7x2 PCB edge male) -CN4 - expansion connector (30x2 PCB edge male) -CN5 - cartridge connector (18x2 PCB edge female) -CN6 - keyboard connector (16x1 pin header) - - -Sub board - -700472 -35 0473 03 - -|---------------------------------------| -| 17.73447MHz |-----CN1-----| | -| | -| 74S04 4116 | -| | -| LS90 4116 | -| | -| LS10 4116 | -| | -| LS367 4116 | -| | -| LS393 4116 | -| | -| LS244 4116 | -| | -| LS257 4116 | -| | -| LS257 4116 | -| | -| LS139 | -| | -|---------------------------------------| - -Notes: -All IC's shown. - -4116 - Toshiba TMM416P-3 16Kx1 RAM -CN1 - main board connector (17x2 pin header) - -*/ - -#include "includes/crvision.h" - -/*************************************************************************** - MEMORY MAPS -***************************************************************************/ - -/*------------------------------------------------- - ADDRESS_MAP( crvision_map ) --------------------------------------------------*/ - -static ADDRESS_MAP_START( crvision_map, AS_PROGRAM, 8, crvision_state ) - AM_RANGE(0x0000, 0x03ff) AM_MIRROR(0x0c00) AM_RAM - AM_RANGE(0x1000, 0x1003) AM_MIRROR(0x0ffc) AM_DEVREADWRITE(PIA6821_TAG, pia6821_device, read, write) - AM_RANGE(0x2000, 0x2000) AM_MIRROR(0x0ffe) AM_DEVREAD(TMS9929_TAG, tms9928a_device, vram_read) - AM_RANGE(0x2001, 0x2001) AM_MIRROR(0x0ffe) AM_DEVREAD(TMS9929_TAG, tms9928a_device, register_read) - AM_RANGE(0x3000, 0x3000) AM_MIRROR(0x0ffe) AM_DEVWRITE(TMS9929_TAG, tms9928a_device, vram_write) - AM_RANGE(0x3001, 0x3001) AM_MIRROR(0x0ffe) AM_DEVWRITE(TMS9929_TAG, tms9928a_device, register_write) - AM_RANGE(0x4000, 0x7fff) AM_ROMBANK(BANK_ROM2) - AM_RANGE(0x8000, 0xbfff) AM_ROMBANK(BANK_ROM1) -// AM_RANGE(0xc000, 0xe7ff) AM_RAMBANK(3) - AM_RANGE(0xe800, 0xe800) AM_DEVWRITE("cent_data_out", output_latch_device, write) - AM_RANGE(0xe801, 0xe801) AM_DEVREAD("cent_status_in", input_buffer_device, read) - AM_RANGE(0xe801, 0xe801) AM_DEVWRITE("cent_ctrl_out", output_latch_device, write) -// AM_RANGE(0xe802, 0xf7ff) AM_RAMBANK(4) - AM_RANGE(0xf800, 0xffff) AM_ROM AM_REGION(M6502_TAG, 0) -ADDRESS_MAP_END - -/*------------------------------------------------- - ADDRESS_MAP( lasr2001_map ) --------------------------------------------------*/ - -static ADDRESS_MAP_START( lasr2001_map, AS_PROGRAM, 8, laser2001_state ) - AM_RANGE(0x0000, 0x03ff) AM_MIRROR(0x0c00) AM_RAM - AM_RANGE(0x1000, 0x1003) AM_MIRROR(0x0ffc) AM_DEVREADWRITE(PIA6821_TAG, pia6821_device, read, write) - AM_RANGE(0x2000, 0x2000) AM_MIRROR(0x0ffe) AM_DEVREAD(TMS9929_TAG, tms9928a_device, vram_read) - AM_RANGE(0x2001, 0x2001) AM_MIRROR(0x0ffe) AM_DEVREAD(TMS9929_TAG, tms9928a_device, register_read) - AM_RANGE(0x3000, 0x3000) AM_MIRROR(0x0ffe) AM_DEVWRITE(TMS9929_TAG, tms9928a_device, vram_write) - AM_RANGE(0x3001, 0x3001) AM_MIRROR(0x0ffe) AM_DEVWRITE(TMS9929_TAG, tms9928a_device, register_write) - AM_RANGE(0x4000, 0x7fff) AM_RAMBANK(BANK_ROM2) - AM_RANGE(0x8000, 0xbfff) AM_RAMBANK(BANK_ROM1) - AM_RANGE(0xc000, 0xffff) AM_ROM AM_REGION(M6502_TAG, 0) -ADDRESS_MAP_END - -/*************************************************************************** - INPUT PORTS -***************************************************************************/ - -/*------------------------------------------------- - INPUT_CHANGED_MEMBER( trigger_nmi ) --------------------------------------------------*/ - -INPUT_CHANGED_MEMBER( crvision_state::trigger_nmi ) -{ - m_maincpu->set_input_line(INPUT_LINE_NMI, newval ? CLEAR_LINE : ASSERT_LINE); -} - -/*------------------------------------------------- - INPUT_PORTS( crvision ) --------------------------------------------------*/ - -static INPUT_PORTS_START( crvision ) - // Player 1 Joystick - - PORT_START("PA0.0") - PORT_BIT( 0xff, IP_ACTIVE_LOW, IPT_UNUSED ) - - PORT_START("PA0.1") - PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_JOYSTICK_DOWN ) - PORT_BIT( 0xfd, IP_ACTIVE_LOW, IPT_UNUSED ) - - PORT_START("PA0.2") - PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_JOYSTICK_RIGHT ) - PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_1) PORT_CHAR('1') - PORT_BIT( 0xf3, IP_ACTIVE_LOW, IPT_UNUSED ) - - PORT_START("PA0.3") - PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_JOYSTICK_UP ) - PORT_BIT( 0xf7, IP_ACTIVE_LOW, IPT_UNUSED ) - - PORT_START("PA0.4") - PORT_BIT( 0xff, IP_ACTIVE_LOW, IPT_UNUSED ) - - PORT_START("PA0.5") - PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_JOYSTICK_LEFT ) - PORT_BIT( 0xdf, IP_ACTIVE_LOW, IPT_UNUSED ) - - PORT_START("PA0.6") - PORT_BIT( 0xff, IP_ACTIVE_LOW, IPT_UNUSED ) - - PORT_START("PA0.7") - PORT_BIT( 0x7f, IP_ACTIVE_LOW, IPT_UNUSED ) - PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_BUTTON2 ) PORT_NAME("P1 Button 2 / CNT'L") PORT_CODE(KEYCODE_LCONTROL) PORT_CODE(KEYCODE_RCONTROL) - - // Player 1 Keyboard - - PORT_START("PA1.0") - PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_F) PORT_CHAR('F') - PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_G) PORT_CHAR('G') - PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME(UTF8_LEFT) PORT_CODE(KEYCODE_BACKSPACE) PORT_CHAR(8) - PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_A) PORT_CHAR('A') - PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_S) PORT_CHAR('S') - PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_D) PORT_CHAR('D') - PORT_BIT( 0x81, IP_ACTIVE_LOW, IPT_UNUSED ) - - PORT_START("PA1.1") - PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_B) PORT_CHAR('B') - PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_Z) PORT_CHAR('Z') - PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_X) PORT_CHAR('X') - PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_C) PORT_CHAR('C') - PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_V) PORT_CHAR('V') - PORT_BIT( 0x83, IP_ACTIVE_LOW, IPT_UNUSED ) - - PORT_START("PA1.2") - PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_W) PORT_CHAR('W') - PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_E) PORT_CHAR('E') - PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_R) PORT_CHAR('R') - PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_T) PORT_CHAR('T') - PORT_BIT( 0x87, IP_ACTIVE_LOW, IPT_UNUSED ) - - PORT_START("PA1.3") - PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_Q) PORT_CHAR('Q') - PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_4) PORT_CHAR('4') PORT_CHAR('$') - PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_5) PORT_CHAR('5') PORT_CHAR('%') - PORT_BIT( 0x8f, IP_ACTIVE_LOW, IPT_UNUSED ) - - PORT_START("PA1.4") - PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_2) PORT_CHAR('2') PORT_CHAR('"') - PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_6) PORT_CHAR('6') PORT_CHAR('&') - PORT_BIT( 0x9f, IP_ACTIVE_LOW, IPT_UNUSED ) - - PORT_START("PA1.5") - PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_3) PORT_CHAR('3') PORT_CHAR('#') - PORT_BIT( 0xbf, IP_ACTIVE_LOW, IPT_UNUSED ) - - PORT_START("PA1.6") - PORT_BIT( 0xff, IP_ACTIVE_LOW, IPT_UNUSED ) - - PORT_START("PA1.7") - PORT_BIT( 0x7f, IP_ACTIVE_LOW, IPT_UNUSED ) - PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_BUTTON1 ) PORT_NAME("P1 Button 1 / SHIFT") PORT_CODE(KEYCODE_LSHIFT) PORT_CODE(KEYCODE_RSHIFT) - - // Player 2 Joystick - - PORT_START("PA2.0") - PORT_BIT( 0xff, IP_ACTIVE_LOW, IPT_UNUSED ) - - PORT_START("PA2.1") - PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_JOYSTICK_DOWN ) PORT_PLAYER(2) PORT_CODE(KEYCODE_2_PAD) - PORT_BIT( 0xfd, IP_ACTIVE_LOW, IPT_UNUSED ) - - PORT_START("PA2.2") - PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_JOYSTICK_RIGHT ) PORT_PLAYER(2) PORT_CODE(KEYCODE_6_PAD) - PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("SPACE") PORT_CODE(KEYCODE_SPACE) PORT_CHAR(' ') - PORT_BIT( 0xf3, IP_ACTIVE_LOW, IPT_UNUSED ) - - PORT_START("PA2.3") - PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_JOYSTICK_UP ) PORT_PLAYER(2) PORT_CODE(KEYCODE_8_PAD) - PORT_BIT( 0xf7, IP_ACTIVE_LOW, IPT_UNUSED ) - - PORT_START("PA2.4") - PORT_BIT( 0xff, IP_ACTIVE_LOW, IPT_UNUSED ) - - PORT_START("PA2.5") - PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_JOYSTICK_LEFT ) PORT_PLAYER(2) PORT_CODE(KEYCODE_4_PAD) - PORT_BIT( 0xdf, IP_ACTIVE_LOW, IPT_UNUSED ) - - PORT_START("PA2.6") - PORT_BIT( 0xff, IP_ACTIVE_LOW, IPT_UNUSED ) - - PORT_START("PA2.7") - PORT_BIT( 0x7f, IP_ACTIVE_LOW, IPT_UNUSED ) - PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_BUTTON2 ) PORT_NAME("P2 Button 2 / \xE2\x86\x92") PORT_CODE(KEYCODE_TAB) PORT_CHAR(9) PORT_PLAYER(2) - - // Player 2 Keyboard - - PORT_START("PA3.0") - PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_U) PORT_CHAR('U') - PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_Y) PORT_CHAR('Y') - PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("RET'N") PORT_CODE(KEYCODE_ENTER) PORT_CHAR('\r') - PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_P) PORT_CHAR('P') - PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_O) PORT_CHAR('O') - PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_I) PORT_CHAR('I') - PORT_BIT( 0x81, IP_ACTIVE_LOW, IPT_UNUSED ) - - PORT_START("PA3.1") - PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_7) PORT_CHAR('7') PORT_CHAR('\'') - PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_OPENBRACE) PORT_CHAR(':') PORT_CHAR('*') - PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_0) PORT_CHAR('0') PORT_CHAR('@') - PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_9) PORT_CHAR('9') PORT_CHAR(')') - PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_8) PORT_CHAR('8') PORT_CHAR('(') - PORT_BIT( 0x83, IP_ACTIVE_LOW, IPT_UNUSED ) - - PORT_START("PA3.2") - PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_L) PORT_CHAR('L') - PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_K) PORT_CHAR('K') - PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_J) PORT_CHAR('J') - PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_H) PORT_CHAR('H') - PORT_BIT( 0x87, IP_ACTIVE_LOW, IPT_UNUSED ) - - PORT_START("PA3.3") - PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_CLOSEBRACE) PORT_CHAR(';') PORT_CHAR('+') - PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_COMMA) PORT_CHAR(',') PORT_CHAR('<') - PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_M) PORT_CHAR('M') - PORT_BIT( 0x8f, IP_ACTIVE_LOW, IPT_UNUSED ) - - PORT_START("PA3.4") - PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_SLASH) PORT_CHAR('/') PORT_CHAR('?') - PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_N) PORT_CHAR('N') - PORT_BIT( 0x9f, IP_ACTIVE_LOW, IPT_UNUSED ) - - PORT_START("PA3.5") - PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_STOP) PORT_CHAR('.') PORT_CHAR('>') - PORT_BIT( 0xbf, IP_ACTIVE_LOW, IPT_UNUSED ) - - PORT_START("PA3.6") - PORT_BIT( 0xff, IP_ACTIVE_LOW, IPT_UNUSED ) - - PORT_START("PA3.7") - PORT_BIT( 0x7f, IP_ACTIVE_LOW, IPT_UNUSED ) - PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_BUTTON1 ) PORT_NAME("P2 Button 1 / - =") PORT_CODE(KEYCODE_MINUS) PORT_CHAR('-') PORT_CHAR('=') PORT_PLAYER(2) - - PORT_START("NMI") - PORT_BIT( 0x01, IP_ACTIVE_HIGH, IPT_START ) PORT_NAME("Reset") PORT_CODE(KEYCODE_F10) PORT_CHANGED_MEMBER(DEVICE_SELF, crvision_state, trigger_nmi, 0) -INPUT_PORTS_END - -/*------------------------------------------------- - INPUT_PORTS( manager ) --------------------------------------------------*/ - -static INPUT_PORTS_START( manager ) - PORT_START("Y.0") - PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_UNKNOWN ) - PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_UNKNOWN ) - PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_STOP) PORT_CHAR('.') PORT_CHAR('>') - PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("RETURN") PORT_CODE(KEYCODE_ENTER) PORT_CHAR('\r') - PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_3) PORT_CHAR('3') PORT_CHAR('-') - PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_E) PORT_CHAR('E') PORT_CHAR('e') - PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_S) PORT_CHAR('S') PORT_CHAR('s') - PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_X) PORT_CHAR('X') PORT_CHAR('x') - - PORT_START("Y.1") - PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_UNKNOWN ) - PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_UNKNOWN ) - PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("\xC3\x84 \xC3\xA4") PORT_CODE(KEYCODE_QUOTE) PORT_CHAR(0x00C4) PORT_CHAR(0x00E4) - PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_EQUALS) PORT_CHAR(';') PORT_CHAR('+') - PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_2) PORT_CHAR('2') PORT_CHAR('"') - PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_W) PORT_CHAR('W') PORT_CHAR('w') - PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_A) PORT_CHAR('A') PORT_CHAR('a') - PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_Z) PORT_CHAR('Z') PORT_CHAR('z') - - PORT_START("Y.2") - PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_I) PORT_CHAR('I') PORT_CHAR('i') - PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_UNKNOWN ) - PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_SLASH) PORT_CHAR('/') PORT_CHAR('?') - PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("\xC3\x85 \xC3\xA5") PORT_CODE(KEYCODE_BACKSLASH) PORT_CHAR(0x00C5) PORT_CHAR(0x00E5) - PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_1) PORT_CHAR('1') PORT_CHAR('!') - PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_Q) PORT_CHAR('Q') PORT_CHAR('q') - PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("CTRL") PORT_CODE(KEYCODE_LCONTROL) PORT_CHAR(UCHAR_MAMEKEY(LCONTROL)) - PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("SHIFT") PORT_CODE(KEYCODE_LSHIFT) PORT_CODE(KEYCODE_RSHIFT) PORT_CHAR(UCHAR_SHIFT_1) - - PORT_START("Y.3") - PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_N) PORT_CHAR('N') PORT_CHAR('n') - PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_X) PORT_CHAR('X') PORT_CHAR('x') - PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("\xC3\x96 \xC3\xB6") PORT_CODE(KEYCODE_COLON) PORT_CHAR(0x00D6) PORT_CHAR(0x00F6) - PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_MINUS) PORT_CHAR(':') PORT_CHAR('*') - PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_4) PORT_CHAR('4') PORT_CHAR('$') - PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_R) PORT_CHAR('R') PORT_CHAR('r') - PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_D) PORT_CHAR('D') PORT_CHAR('d') - PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_C) PORT_CHAR('C') PORT_CHAR('c') - - PORT_START("Y.4") - PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_UNKNOWN ) - PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_UNKNOWN ) - PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_COMMA) PORT_CHAR(',') PORT_CHAR('<') - PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_P) PORT_CHAR('P') PORT_CHAR('p') - PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_5) PORT_CHAR('5') PORT_CHAR('%') - PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_T) PORT_CHAR('T') PORT_CHAR('t') - PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_F) PORT_CHAR('F') PORT_CHAR('f') - PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_V) PORT_CHAR('V') PORT_CHAR('v') - - PORT_START("Y.5") - PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_J) PORT_CHAR('J') PORT_CHAR('j') - PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_UNKNOWN ) - PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_L) PORT_CHAR('L') PORT_CHAR('l') - PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_0) PORT_CHAR('0') PORT_CHAR('=') - PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_6) PORT_CHAR('6') PORT_CHAR('&') - PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_Y) PORT_CHAR('Y') PORT_CHAR('y') - PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_G) PORT_CHAR('G') PORT_CHAR('g') - PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_B) PORT_CHAR('B') PORT_CHAR('b') - - PORT_START("Y.6") - PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_UNKNOWN ) - PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_S) PORT_CHAR('S') PORT_CHAR('s') - PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_K) PORT_CHAR('K') PORT_CHAR('k') - PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_9) PORT_CHAR('9') PORT_CHAR(')') - PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_7) PORT_CHAR('7') PORT_CHAR('\'') - PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_U) PORT_CHAR('U') PORT_CHAR('u') - PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_H) PORT_CHAR('H') PORT_CHAR('h') - PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_N) PORT_CHAR('N') PORT_CHAR('n') - - PORT_START("Y.7") - PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_X) PORT_CHAR('X') PORT_CHAR('x') - PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_N) PORT_CHAR('N') PORT_CHAR('n') - PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_SPACE) PORT_CHAR(' ') - PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_O) PORT_CHAR('O') PORT_CHAR('o') - PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_8) PORT_CHAR('8') PORT_CHAR('(') - PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_I) PORT_CHAR('I') PORT_CHAR('i') - PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_J) PORT_CHAR('J') PORT_CHAR('j') - PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_M) PORT_CHAR('M') PORT_CHAR('m') - - PORT_START("JOY.0") - PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_UNUSED ) - PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_JOYSTICK_DOWN ) - PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_JOYSTICK_RIGHT ) - PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_JOYSTICK_UP ) - PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_UNUSED ) - PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_JOYSTICK_LEFT ) - PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_UNUSED ) - PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_BUTTON1 ) - - PORT_START("JOY.1") - PORT_BIT( 0x7f, IP_ACTIVE_LOW, IPT_UNUSED ) - PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_BUTTON2 ) - - PORT_START("JOY.2") - PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_UNUSED ) - PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_JOYSTICK_DOWN ) PORT_PLAYER(2) - PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_JOYSTICK_RIGHT ) PORT_PLAYER(2) - PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_JOYSTICK_UP ) PORT_PLAYER(2) - PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_UNUSED ) - PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_JOYSTICK_LEFT ) PORT_PLAYER(2) - PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_UNUSED ) - PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_BUTTON1 ) PORT_PLAYER(2) - - PORT_START("JOY.3") - PORT_BIT( 0x7f, IP_ACTIVE_LOW, IPT_UNUSED ) - PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_BUTTON2 ) PORT_PLAYER(2) -INPUT_PORTS_END - -/*************************************************************************** - DEVICE CONFIGURATION -***************************************************************************/ - -WRITE8_MEMBER( crvision_state::pia_pa_w ) -{ - /* - Signal Description - - PA0 Keyboard raster player 1 output (joystick) - PA1 Keyboard raster player 1 output (hand keys) - PA2 Keyboard raster player 2 output (joystick) - PA3 Keyboard raster player 2 output (hand keys) - PA4 ? - PA5 ? - PA6 Cassette motor - PA7 Cassette data in/out - */ - - /* keyboard raster */ - m_keylatch = ~data & 0x0f; - - /* cassette motor */ - m_cassette->change_state(BIT(data,6) ? CASSETTE_MOTOR_DISABLED : CASSETTE_MOTOR_ENABLED, CASSETTE_MASK_MOTOR); - - /* cassette data output */ - m_cassette->output( BIT(data, 7) ? +1.0 : -1.0); -} - -UINT8 crvision_state::read_keyboard(int pa) -{ - UINT8 value = 0; - - for (int i = 0; i < 8; i++) - { - switch (pa & 3) - { - case 0: value = m_inp_pa0[i]->read(); break; - case 1: value = m_inp_pa1[i]->read(); break; - case 2: value = m_inp_pa2[i]->read(); break; - case 3: value = m_inp_pa3[i]->read(); break; - } - - if (value != 0xff) - { - if (value == 0xff - (1 << i)) - return value; - else - return value - (1 << i); - } - } - - return 0xff; -} - -READ8_MEMBER( crvision_state::pia_pa_r ) -{ - /* - PA0 Keyboard raster player 1 output (joystick) - PA1 Keyboard raster player 1 output (hand keys) - PA2 Keyboard raster player 2 output (joystick) - PA3 Keyboard raster player 2 output (hand keys) - PA4 ? - PA5 ? - PA6 Cassette motor - PA7 Cassette data in/out - */ - - UINT8 data = 0x7f; - - if ((m_cassette)->input() > -0.1469) data |= 0x80; - - return data; -} - -READ8_MEMBER( crvision_state::pia_pb_r ) -{ - /* - Signal Description - - PB0 Keyboard input - PB1 Keyboard input - PB2 Keyboard input - PB3 Keyboard input - PB4 Keyboard input - PB5 Keyboard input - PB6 Keyboard input - PB7 Keyboard input - */ - - UINT8 data = 0xff; - - for (int i = 0; i < 4; i++) - if (m_keylatch >> i & 1) - data &= read_keyboard(i); - - return data; -} - -READ8_MEMBER( laser2001_state::pia_pa_r ) -{ - /* - Signal Description - - PA0 Keyboard column 0 - PA1 Keyboard column 1 - PA2 Keyboard column 2 - PA3 Keyboard column 3 - PA4 Keyboard column 4 - PA5 Keyboard column 5 - PA6 Keyboard column 6 - PA7 Keyboard column 7 - */ - - UINT8 data = 0xff; - - for (int i = 0; i < 8; i++) - if (~m_keylatch >> i & 1) - data &= m_inp_y[i]->read(); - - return data; -} - -WRITE8_MEMBER( laser2001_state::pia_pa_w ) -{ - /* - PA0 Joystick player 1 output 0 - PA1 Joystick player 1 output 1 - PA2 Joystick player 2 output 0 - PA3 Joystick player 2 output 1 - PA4 ? - PA5 ? - PA6 ? - PA7 ? - */ - - m_joylatch = data; -} - -READ8_MEMBER( laser2001_state::pia_pb_r ) -{ - UINT8 data = 0xff; - - for (int i = 0; i < 4; i++) - if (~m_joylatch >> i & 1) - data &= m_inp_joy[i]->read(); - - return data; -} - -WRITE8_MEMBER( laser2001_state::pia_pb_w ) -{ - /* - Signal Description - - PB0 Keyboard row 0, PSG data 7, centronics data 0 - PB1 Keyboard row 1, PSG data 6, centronics data 1 - PB2 Keyboard row 2, PSG data 5, centronics data 2 - PB3 Keyboard row 3, PSG data 4, centronics data 3 - PB4 Keyboard row 4, PSG data 3, centronics data 4 - PB5 Keyboard row 5, PSG data 2, centronics data 5 - PB6 Keyboard row 6, PSG data 1, centronics data 6 - PB7 Keyboard row 7, PSG data 0, centronics data 7 - */ - - /* keyboard latch */ - m_keylatch = data; - - /* centronics data */ - m_cent_data_out->write(space, 0, data); -} - -READ_LINE_MEMBER( laser2001_state::pia_ca1_r ) -{ - return (m_cassette)->input() > -0.1469; -} - -WRITE_LINE_MEMBER( laser2001_state::pia_ca2_w ) -{ - m_cassette->output(state ? +1.0 : -1.0); -} - - -WRITE_LINE_MEMBER(laser2001_state::write_centronics_busy) -{ - m_centronics_busy = state; - m_pia->cb1_w(pia_cb1_r()); -} - -WRITE_LINE_MEMBER(laser2001_state::write_psg_ready) -{ - m_psg_ready = state; - m_pia->cb1_w(pia_cb1_r()); -} - -READ_LINE_MEMBER( laser2001_state::pia_cb1_r ) -{ - /* actually this is a diode-AND (READY & _BUSY), but ctronics.c returns busy status if no device is mounted -> Manager won't boot */ - return m_psg_ready && (!m_centronics_busy || m_pia->ca2_output_z()); -} - -WRITE_LINE_MEMBER( laser2001_state::pia_cb2_w ) -{ - if (m_pia->ca2_output_z()) - { - if (!state) m_psg->write(m_keylatch); - } - else - { - m_centronics->write_strobe(state); - } -} - -/*************************************************************************** - MACHINE INITIALIZATION -***************************************************************************/ - -void crvision_state::machine_start() -{ - // zerofill/state saving - m_keylatch = 0; - save_item(NAME(m_keylatch)); - - if (m_cart->exists()) - { - m_maincpu->space(AS_PROGRAM).install_read_handler(0x4000, 0x7fff, read8_delegate(FUNC(crvision_cart_slot_device::read_rom40),(crvision_cart_slot_device*)m_cart)); - m_maincpu->space(AS_PROGRAM).install_read_handler(0x8000, 0xbfff, read8_delegate(FUNC(crvision_cart_slot_device::read_rom80),(crvision_cart_slot_device*)m_cart)); - } -} - -void laser2001_state::machine_start() -{ - crvision_state::machine_start(); - - // zerofill/state saving - m_joylatch = 0; - m_centronics_busy = 0; - m_psg_ready = 0; - - save_item(NAME(m_joylatch)); - save_item(NAME(m_centronics_busy)); - save_item(NAME(m_psg_ready)); -} - - -/*************************************************************************** - MACHINE DRIVERS -***************************************************************************/ - -static SLOT_INTERFACE_START(crvision_cart) - SLOT_INTERFACE_INTERNAL("crv_rom4k", CRVISION_ROM_4K) - SLOT_INTERFACE_INTERNAL("crv_rom6k", CRVISION_ROM_6K) - SLOT_INTERFACE_INTERNAL("crv_rom8k", CRVISION_ROM_8K) - SLOT_INTERFACE_INTERNAL("crv_rom10k", CRVISION_ROM_10K) - SLOT_INTERFACE_INTERNAL("crv_rom12k", CRVISION_ROM_12K) - SLOT_INTERFACE_INTERNAL("crv_rom16k", CRVISION_ROM_16K) - SLOT_INTERFACE_INTERNAL("crv_rom18k", CRVISION_ROM_18K) -SLOT_INTERFACE_END - -/*------------------------------------------------- - MACHINE_CONFIG_START( creativision, crvision_state ) --------------------------------------------------*/ - -static MACHINE_CONFIG_START( creativision, crvision_state ) - // basic machine hardware - MCFG_CPU_ADD(M6502_TAG, M6502, XTAL_2MHz) - MCFG_CPU_PROGRAM_MAP(crvision_map) - - // devices - MCFG_DEVICE_ADD(PIA6821_TAG, PIA6821, 0) - MCFG_PIA_READPA_HANDLER(READ8(crvision_state, pia_pa_r)) - MCFG_PIA_READPB_HANDLER(READ8(crvision_state, pia_pb_r)) - MCFG_PIA_WRITEPA_HANDLER(WRITE8(crvision_state, pia_pa_w)) - MCFG_PIA_WRITEPB_HANDLER(DEVWRITE8(SN76489_TAG, sn76496_base_device, write)) - - MCFG_CASSETTE_ADD("cassette") - MCFG_CASSETTE_DEFAULT_STATE(CASSETTE_STOPPED | CASSETTE_MOTOR_DISABLED | CASSETTE_SPEAKER_ENABLED) - - MCFG_CENTRONICS_ADD(CENTRONICS_TAG, centronics_devices, "printer") - MCFG_CENTRONICS_BUSY_HANDLER(DEVWRITELINE("cent_status_in", input_buffer_device, write_bit7)) - - MCFG_DEVICE_ADD("cent_status_in", INPUT_BUFFER, 0) - - MCFG_CENTRONICS_OUTPUT_LATCH_ADD("cent_data_out", CENTRONICS_TAG) - - MCFG_DEVICE_ADD("cent_ctrl_out", OUTPUT_LATCH, 0) - MCFG_OUTPUT_LATCH_BIT4_HANDLER(DEVWRITELINE(CENTRONICS_TAG, centronics_device, write_strobe)) - - // sound hardware - MCFG_SPEAKER_STANDARD_MONO("mono") - MCFG_SOUND_ADD(SN76489_TAG, SN76489A, XTAL_2MHz) - MCFG_SN76496_READY_HANDLER(DEVWRITELINE(PIA6821_TAG, pia6821_device, cb1_w)) - MCFG_SOUND_ROUTE(ALL_OUTPUTS, "mono", 1.00) - - MCFG_SOUND_WAVE_ADD(WAVE_TAG, "cassette") - MCFG_SOUND_ROUTE(1, "mono", 0.25) - - // cartridge - MCFG_CRVISION_CARTRIDGE_ADD("cartslot", crvision_cart, NULL) - - // internal ram - MCFG_RAM_ADD(RAM_TAG) - MCFG_RAM_DEFAULT_SIZE("1K") // MAIN RAM - MCFG_RAM_EXTRA_OPTIONS("15K") // 16K expansion (lower 14K available only, upper 2K shared with BIOS ROM) - - // software lists - MCFG_SOFTWARE_LIST_ADD("cart_list", "crvision") -MACHINE_CONFIG_END - -/*------------------------------------------------- - MACHINE_CONFIG_DERIVED( ntsc, creativision ) --------------------------------------------------*/ - -static MACHINE_CONFIG_DERIVED( ntsc, creativision ) - // video hardware - MCFG_DEVICE_ADD( TMS9929_TAG, TMS9918, XTAL_10_738635MHz / 2 ) - MCFG_TMS9928A_VRAM_SIZE(0x4000) - MCFG_TMS9928A_OUT_INT_LINE_CB(INPUTLINE(M6502_TAG, INPUT_LINE_IRQ0)) - MCFG_TMS9928A_SCREEN_ADD_NTSC( SCREEN_TAG ) - MCFG_SCREEN_UPDATE_DEVICE( TMS9929_TAG, tms9918_device, screen_update ) -MACHINE_CONFIG_END - -/*------------------------------------------------- - MACHINE_CONFIG_DERIVED( pal, creativision ) --------------------------------------------------*/ - -static MACHINE_CONFIG_DERIVED_CLASS( pal, creativision, crvision_pal_state ) - // video hardware - MCFG_DEVICE_ADD( TMS9929_TAG, TMS9929, XTAL_10_738635MHz / 2 ) - MCFG_TMS9928A_VRAM_SIZE(0x4000) - MCFG_TMS9928A_OUT_INT_LINE_CB(INPUTLINE(M6502_TAG, INPUT_LINE_IRQ0)) - MCFG_TMS9928A_SCREEN_ADD_PAL( SCREEN_TAG ) - MCFG_SCREEN_UPDATE_DEVICE( TMS9929_TAG, tms9929_device, screen_update ) -MACHINE_CONFIG_END - -/*------------------------------------------------- - MACHINE_CONFIG_START( lasr2001, laser2001_state ) --------------------------------------------------*/ - -static MACHINE_CONFIG_START( lasr2001, laser2001_state ) - // basic machine hardware - MCFG_CPU_ADD(M6502_TAG, M6502, XTAL_17_73447MHz/9) - MCFG_CPU_PROGRAM_MAP(lasr2001_map) - - // devices - MCFG_DEVICE_ADD(PIA6821_TAG, PIA6821, 0) - MCFG_PIA_READPA_HANDLER(READ8(laser2001_state, pia_pa_r)) - MCFG_PIA_READPB_HANDLER(READ8(laser2001_state, pia_pb_r)) - MCFG_PIA_READCA1_HANDLER(READLINE(laser2001_state, pia_ca1_r)) - MCFG_PIA_WRITEPA_HANDLER(WRITE8(laser2001_state, pia_pa_w)) - MCFG_PIA_WRITEPB_HANDLER(WRITE8(laser2001_state, pia_pb_w)) - MCFG_PIA_CA2_HANDLER(WRITELINE(laser2001_state, pia_ca2_w)) - MCFG_PIA_CB2_HANDLER(WRITELINE(laser2001_state, pia_cb2_w)) - - MCFG_CASSETTE_ADD("cassette") - MCFG_CASSETTE_DEFAULT_STATE(CASSETTE_STOPPED | CASSETTE_MOTOR_ENABLED | CASSETTE_SPEAKER_ENABLED) - - MCFG_CENTRONICS_ADD("centronics", centronics_devices, "printer") - MCFG_CENTRONICS_BUSY_HANDLER(WRITELINE(laser2001_state, write_centronics_busy)) - - MCFG_CENTRONICS_OUTPUT_LATCH_ADD("cent_data_out", CENTRONICS_TAG) - - // video hardware - MCFG_DEVICE_ADD( TMS9929_TAG, TMS9929A, XTAL_10_738635MHz / 2 ) - MCFG_TMS9928A_VRAM_SIZE(0x4000) - MCFG_TMS9928A_OUT_INT_LINE_CB(INPUTLINE(M6502_TAG, INPUT_LINE_IRQ0)) - MCFG_TMS9928A_SCREEN_ADD_PAL( SCREEN_TAG ) - MCFG_SCREEN_UPDATE_DEVICE( TMS9929_TAG, tms9929a_device, screen_update ) - - // sound hardware - MCFG_SPEAKER_STANDARD_MONO("mono") - MCFG_SOUND_ADD(SN76489_TAG, SN76489A, XTAL_17_73447MHz/9) - MCFG_SN76496_READY_HANDLER(WRITELINE(laser2001_state, write_psg_ready)) - - MCFG_SOUND_ROUTE(ALL_OUTPUTS, "mono", 1.00) - - MCFG_SOUND_WAVE_ADD(WAVE_TAG, "cassette") - MCFG_SOUND_ROUTE(1, "mono", 0.25) - - // cartridge - MCFG_CRVISION_CARTRIDGE_ADD("cartslot", crvision_cart, NULL) - - // internal ram - MCFG_RAM_ADD(RAM_TAG) - MCFG_RAM_DEFAULT_SIZE("16K") - MCFG_RAM_EXTRA_OPTIONS("32K") - - // software list - MCFG_SOFTWARE_LIST_ADD("cart_list","crvision") -MACHINE_CONFIG_END - -/*************************************************************************** - ROMS -***************************************************************************/ - -ROM_START( crvision ) - ROM_REGION( 0x10000, M6502_TAG, 0 ) - ROM_LOAD( "crvision.u20", 0x0000, 0x0800, CRC(c3c590c6) SHA1(5ac620c529e4965efb5560fe824854a44c983757) ) -ROM_END - -ROM_START( fnvision ) - ROM_REGION( 0x10000, M6502_TAG, 0 ) - ROM_LOAD( "funboot.rom", 0x0000, 0x0800, CRC(05602697) SHA1(c280b20c8074ba9abb4be4338b538361dfae517f) ) -ROM_END - -#define rom_wizzard rom_crvision -#define rom_crvisioj rom_crvision -#define rom_crvisio2 rom_crvision -#define rom_rameses rom_fnvision -#define rom_vz2000 rom_fnvision - -ROM_START( manager ) - ROM_REGION( 0x10000, M6502_TAG, 0 ) - ROM_LOAD( "01", 0x0000, 0x2000, CRC(702f4cf5) SHA1(cd14ee74e787d24b76c166de484dae24206e219b) ) - ROM_LOAD( "23", 0x2000, 0x2000, CRC(46489d88) SHA1(467f5bcd62d0b4117c443e13373df8f3c45df7b2) ) - - ROM_REGION( 0x1000, "disk", 0 ) - ROM_LOAD( "floppy interface cartridge", 0x0000, 0x1000, NO_DUMP ) -ROM_END - -/*************************************************************************** - SYSTEM DRIVERS -***************************************************************************/ - -/* YEAR NAME PARENT COMPAT MACHINE INPUT INIT COMPANY FULLNAME */ -CONS( 1982, crvision, 0, 0, pal, crvision, driver_device, 0, "Video Technology", "CreatiVision", 0 ) -CONS( 1982, fnvision, crvision, 0, pal, crvision, driver_device, 0, "Video Technology", "FunVision", 0 ) -CONS( 1982, crvisioj, crvision, 0, ntsc, crvision, driver_device, 0, "Cheryco", "CreatiVision (Japan)", 0 ) -CONS( 1982, wizzard, crvision, 0, pal, crvision, driver_device, 0, "Dick Smith Electronics", "Wizzard (Oceania)", 0 ) -CONS( 1982, rameses, crvision, 0, pal, crvision, driver_device, 0, "Hanimex", "Rameses (Oceania)", 0 ) -CONS( 1983, vz2000, crvision, 0, pal, crvision, driver_device, 0, "Dick Smith Electronics", "VZ 2000 (Oceania)", 0 ) -CONS( 1983, crvisio2, crvision, 0, pal, crvision, driver_device, 0, "Video Technology", "CreatiVision MK-II (Europe)", 0 ) -//COMP( 1983, lasr2001, 0, 0, lasr2001, lasr2001, driver_device, 0, "Video Technology", "Laser 2001", MACHINE_NOT_WORKING ) -//COMP( 1983, vz2001, lasr2001, 0, lasr2001, lasr2001, driver_device, 0, "Dick Smith Electronics", "VZ 2001 (Oceania)", MACHINE_NOT_WORKING ) -COMP( 1983, manager, 0, 0, lasr2001, manager, driver_device, 0, "Salora", "Manager (Finland)", 0 ) |