// license:BSD-3-Clause // copyright-holders:Sandro Ronco /*************************************************************************** Philips VG-5000mu Driver by Sandro Ronco with help from Daniel Coulom 05/2010 (Sandro Ronco) - EF9345 video controller - keyboard input ports 05/2009 Skeleton driver. Known issues: - 1200 bauds cassette don't works Informations ( see the very informative http://vg5k.free.fr/ ): - Variants: Radiola VG5000 and Schneider VG5000 - CPU: Zilog Z80 running at 4MHz - ROM: 18KB (16 KB BASIC + 2 KB charset ) - RAM: 24 KB - Video: SGS Thomson EF9345 processor - Text mode: 25 rows x 40 columns - Character matrix: 8 x 10 - ASCII characters set, 128 graphics mode characters, 192 user characters. - Graphics mode: not available within basic, only semi graphic is available. - Colors: 8 - Sound: Synthesizer, 4 Octaves - Keyboard: 63 keys AZERTY, Caps Lock, CTRL key to access 33 BASIC instructions - I/O: Tape recorder connector (1200/2400 bauds), Scart connector to TV (RGB), External PSU (VU0022) connector, Bus connector (2x25 pins) - There are 2 versions of the VG5000 ROM, one with Basic v1.0, contained in two 8 KB ROMs, and one with Basic 1.1, contained in a single 16 KB ROM. - RAM: 24 KB (3 x 8 KB) type SRAM D4168C, more precisely: 2 x 8 KB, used by the system 1 x 8 KB, used by the video processor - Memory Map: $0000 - $3fff BASIC + monitor $4000 - $47cf Screen $47d0 - $7fff reserved area for BASIC, variables, etc $8000 - $bfff Memory Expansion 16K or ROM cart $c000 - $ffff Memory Expansion 32K or ROM cart - This computer was NOT MSX-compatible! ****************************************************************************/ #include "emu.h" #include "cpu/z80/z80.h" #include "imagedev/cassette.h" #include "imagedev/printer.h" #include "machine/ram.h" #include "machine/timer.h" #include "sound/dac.h" #include "sound/volt_reg.h" #include "video/ef9345.h" #include "screen.h" #include "softlist.h" #include "speaker.h" #include "formats/vg5k_cas.h" class vg5k_state : public driver_device { public: vg5k_state(const machine_config &mconfig, device_type type, const char *tag) : driver_device(mconfig, type, tag) , m_maincpu(*this, "maincpu") , m_ef9345(*this, "ef9345") , m_dac(*this, "dac") , m_printer(*this, "printer") , m_cassette(*this, "cassette") , m_ram(*this, RAM_TAG) { } void vg5k(machine_config &config); void init_vg5k(); private: required_device m_maincpu; required_device m_ef9345; required_device m_dac; required_device m_printer; required_device m_cassette; required_device m_ram; offs_t m_ef9345_offset; virtual void machine_start() override; virtual void machine_reset() override; DECLARE_READ8_MEMBER( printer_r ); DECLARE_WRITE8_MEMBER( printer_w ); DECLARE_WRITE8_MEMBER ( ef9345_offset_w ); DECLARE_READ8_MEMBER ( ef9345_io_r ); DECLARE_WRITE8_MEMBER ( ef9345_io_w ); DECLARE_READ8_MEMBER ( cassette_r ); DECLARE_WRITE8_MEMBER ( cassette_w ); TIMER_CALLBACK_MEMBER(z80_irq_clear); TIMER_DEVICE_CALLBACK_MEMBER(z80_irq); TIMER_DEVICE_CALLBACK_MEMBER(vg5k_scanline); void vg5k_io(address_map &map); void vg5k_mem(address_map &map); }; READ8_MEMBER( vg5k_state::printer_r ) { return (m_printer->is_ready() ? 0x00 : 0xff); } WRITE8_MEMBER( vg5k_state::printer_w ) { m_printer->output(data); } WRITE8_MEMBER ( vg5k_state::ef9345_offset_w ) { m_ef9345_offset = data; } READ8_MEMBER ( vg5k_state::ef9345_io_r ) { return m_ef9345->data_r(m_ef9345_offset); } WRITE8_MEMBER ( vg5k_state::ef9345_io_w ) { m_ef9345->data_w(m_ef9345_offset, data); } READ8_MEMBER ( vg5k_state::cassette_r ) { double level = m_cassette->input(); return (level > 0.03) ? 0xff : 0x00; } WRITE8_MEMBER ( vg5k_state::cassette_w ) { m_dac->write(BIT(data, 3)); if (data == 0x03) m_cassette->output(+1); else if (data == 0x02) m_cassette->output(-1); else m_cassette->output(0); } void vg5k_state::vg5k_mem(address_map &map) { map.unmap_value_high(); map(0x0000, 0x3fff).rom(); map(0x4000, 0x7fff).ram(); map(0x8000, 0xffff).noprw(); /* messram expansion memory */ } void vg5k_state::vg5k_io(address_map &map) { map.unmap_value_high(); map.global_mask(0xff); /* joystick */ map(0x07, 0x07).portr("JOY0"); map(0x08, 0x08).portr("JOY1"); /* printer */ map(0x10, 0x10).r(FUNC(vg5k_state::printer_r)); map(0x11, 0x11).w(FUNC(vg5k_state::printer_w)); /* keyboard */ map(0x80, 0x80).portr("ROW1"); map(0x81, 0x81).portr("ROW2"); map(0x82, 0x82).portr("ROW3"); map(0x83, 0x83).portr("ROW4"); map(0x84, 0x84).portr("ROW5"); map(0x85, 0x85).portr("ROW6"); map(0x86, 0x86).portr("ROW7"); map(0x87, 0x87).portr("ROW8"); /* EF9345 */ map(0x8f, 0x8f).w(FUNC(vg5k_state::ef9345_offset_w)); map(0xcf, 0xcf).rw(FUNC(vg5k_state::ef9345_io_r), FUNC(vg5k_state::ef9345_io_w)); /* cassette */ map(0xaf, 0xaf).rw(FUNC(vg5k_state::cassette_r), FUNC(vg5k_state::cassette_w)); } /* Input ports */ static INPUT_PORTS_START( vg5k ) PORT_START("ROW1") PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_HOME) PORT_NAME("LIST EFFE") PORT_CHAR(UCHAR_MAMEKEY(F1)) PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_UNUSED ) PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_LSHIFT) PORT_CODE(KEYCODE_RSHIFT) PORT_NAME("MAJ") PORT_CHAR(UCHAR_SHIFT_1) PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_LEFT) PORT_CHAR(UCHAR_MAMEKEY(LEFT)) PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_RIGHT) PORT_CHAR(UCHAR_MAMEKEY(RIGHT)) PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_DOWN) PORT_CHAR(UCHAR_MAMEKEY(DOWN)) PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_LCONTROL) PORT_CODE(KEYCODE_RCONTROL) PORT_NAME("CTRL ACCENT") PORT_CHAR(UCHAR_SHIFT_2) PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_INSERT) PORT_NAME("INSC INSL") PORT_CHAR(UCHAR_MAMEKEY(INSERT)) PORT_START("ROW2") PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_F2) PORT_NAME("RUN STOP") PORT_CHAR(UCHAR_MAMEKEY(F2)) PORT_CHAR(UCHAR_MAMEKEY(PAUSE)) PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_A) PORT_CHAR('q') PORT_CHAR('Q') PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_SPACE) PORT_NAME("ESPACE") PORT_CHAR(' ') PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_CAPSLOCK) PORT_NAME("LCK") PORT_CHAR(UCHAR_MAMEKEY(CAPSLOCK)) PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_UNUSED ) PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_ENTER) PORT_NAME("RET") PORT_CHAR(13) PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_UP) PORT_CHAR(UCHAR_MAMEKEY(UP)) PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_Q) PORT_CHAR('a') PORT_CHAR('A') PORT_START("ROW3") PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_Z) PORT_CHAR('w') PORT_CHAR('W') 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_CODE(KEYCODE_C) PORT_CHAR('c') PORT_CHAR('C') PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_V) PORT_CHAR('v') PORT_CHAR('V') PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_B) PORT_CHAR('b') PORT_CHAR('B') PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_1) PORT_CHAR('1') PORT_CHAR('#') PORT_CHAR(0xe2) // â PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_M) PORT_CHAR(':') PORT_CHAR('*') PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_W) PORT_CHAR('z') PORT_CHAR('Z') PORT_START("ROW4") PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_S) PORT_CHAR('s') PORT_CHAR('S') PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_E) PORT_CHAR('e') PORT_CHAR('E') PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_3) PORT_CHAR('3') PORT_CHAR('"') PORT_CHAR(0xea) // ê PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_4) PORT_CHAR('4') PORT_CHAR(0xa3) PORT_CHAR(0xef) // £ ï PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_5) PORT_CHAR('5') PORT_CHAR('$') PORT_CHAR(0xf9) // ù PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_6) PORT_CHAR('6') PORT_CHAR('%') PORT_CHAR(0xf4) // ô PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_2) PORT_CHAR('2') PORT_CHAR('!') PORT_CHAR(0xe9) // é PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_STOP) PORT_CHAR(';') PORT_CHAR('@') PORT_START("ROW5") PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_TAB) PORT_CHAR(0xf7) PORT_CHAR('_') // ÷ PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_MINUS) PORT_CHAR(0xd7) PORT_CHAR('|') // × PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_F) PORT_CHAR('f') PORT_CHAR('F') PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_G) PORT_CHAR('g') PORT_CHAR('G') PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_U) PORT_CHAR('u') PORT_CHAR('U') 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_O) PORT_CHAR('o') PORT_CHAR('O') PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_P) PORT_CHAR('p') PORT_CHAR('P') PORT_START("ROW6") PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_UNUSED ) PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_0) PORT_CHAR('0') PORT_CHAR(')') PORT_CHAR(0xe0) // à 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_SLASH) PORT_CHAR(0x2026) PORT_CHAR(0x3c0) // … π PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_QUOTE) PORT_CHAR(',') PORT_CHAR('/') PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_7) PORT_CHAR('7') PORT_CHAR('&') PORT_CHAR(0xe8) // è PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_8) PORT_CHAR('8') PORT_CHAR('\'') PORT_CHAR(0xfb) // û PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_9) PORT_CHAR('9') PORT_CHAR('(') PORT_CHAR(0xe7) // ç PORT_START("ROW7") PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_TILDE) PORT_CHAR('-') PORT_CHAR('?') PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_BACKSLASH) PORT_CHAR('+') PORT_CHAR('.') PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_R) PORT_CHAR('r') PORT_CHAR('R') PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_T) PORT_CHAR('t') PORT_CHAR('T') PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_Y) PORT_CHAR('y') PORT_CHAR('Y') PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_OPENBRACE) PORT_CHAR('<') PORT_CHAR('>') PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_CLOSEBRACE) PORT_NAME("PRT") PORT_CHAR(UCHAR_MAMEKEY(PRTSCR)) PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_D) PORT_CHAR('d') PORT_CHAR('D') PORT_START("ROW8") PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_EQUALS) PORT_CHAR('=') PORT_CHAR('^') PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_BACKSPACE) PORT_NAME("EFFC EFFL") PORT_CHAR(8) PORT_CHAR(UCHAR_MAMEKEY(DEL)) PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_N) PORT_CHAR('n') PORT_CHAR('N') PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_J) PORT_CHAR('j') PORT_CHAR('J') PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_H) PORT_CHAR('h') PORT_CHAR('H') PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_K) PORT_CHAR('k') PORT_CHAR('K') PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_L) PORT_CHAR('l') PORT_CHAR('L') PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_COLON) PORT_CHAR('m') PORT_CHAR('M') PORT_START("JOY0") PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_JOYSTICK_UP ) PORT_PLAYER(1) PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_JOYSTICK_RIGHT ) PORT_PLAYER(1) PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_JOYSTICK_DOWN ) PORT_PLAYER(1) PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_JOYSTICK_LEFT ) PORT_PLAYER(1) PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_BUTTON1 ) PORT_PLAYER(1) PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_UNUSED ) PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_UNUSED ) PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_UNUSED ) PORT_START("JOY1") PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_JOYSTICK_UP ) PORT_PLAYER(2) PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_JOYSTICK_RIGHT ) PORT_PLAYER(2) PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_JOYSTICK_DOWN ) PORT_PLAYER(2) PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_JOYSTICK_LEFT ) PORT_PLAYER(2) PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_BUTTON1 ) PORT_PLAYER(2) PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_UNUSED ) PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_UNUSED ) PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_UNUSED ) INPUT_PORTS_END TIMER_CALLBACK_MEMBER(vg5k_state::z80_irq_clear) { m_maincpu->set_input_line(0, CLEAR_LINE); } TIMER_DEVICE_CALLBACK_MEMBER(vg5k_state::z80_irq) { m_maincpu->set_input_line(0, ASSERT_LINE); machine().scheduler().timer_set(attotime::from_usec(100), timer_expired_delegate(FUNC(vg5k_state::z80_irq_clear),this)); } TIMER_DEVICE_CALLBACK_MEMBER(vg5k_state::vg5k_scanline) { m_ef9345->update_scanline((uint16_t)param); } void vg5k_state::machine_start() { save_item(NAME(m_ef9345_offset)); } void vg5k_state::machine_reset() { m_ef9345_offset = 0; } /* F4 Character Displayer */ static const gfx_layout vg5k_charlayout = { 8, 16, /* 8 x 16 characters */ 256, /* 256 characters */ 1, /* 1 bits per pixel */ { 0 }, /* no bitplanes */ /* x offsets */ { 7, 6, 5, 4, 3, 2, 1, 0 }, /* y offsets */ { 0, 8, 2*8, 3*8, 4*8, 5*8, 6*8, 7*8, 8*8, 9*8, 10*8, 11*8, 12*8, 13*8, 14*8, 15*8 }, 8*16 /* every char takes 16 bytes */ }; static GFXDECODE_START( gfx_vg5k ) GFXDECODE_ENTRY( "ef9345", 0x2000, vg5k_charlayout, 0, 4 ) GFXDECODE_END void vg5k_state::init_vg5k() { uint8_t *FNT = memregion("ef9345")->base(); uint16_t dest = 0x2000; /* Unscramble the chargen rom as the format is too complex for gfxdecode to handle unaided */ for (uint16_t a = 0; a < 8192; a+=4096) for (uint16_t b = 0; b < 2048; b+=64) for (uint16_t c = 0; c < 4; c++) for (uint16_t d = 0; d < 64; d+=4) FNT[dest++]=FNT[a|b|c|d]; /* install expansion memory*/ address_space &program = m_maincpu->space(AS_PROGRAM); uint8_t *ram = m_ram->pointer(); uint16_t ram_size = m_ram->size(); if (ram_size > 0x4000) program.install_ram(0x8000, 0x3fff + ram_size, ram); } void vg5k_state::vg5k(machine_config &config) { /* basic machine hardware */ Z80(config, m_maincpu, XTAL(4'000'000)); m_maincpu->set_addrmap(AS_PROGRAM, &vg5k_state::vg5k_mem); m_maincpu->set_addrmap(AS_IO, &vg5k_state::vg5k_io); TIMER(config, "vg5k_scanline").configure_scanline(FUNC(vg5k_state::vg5k_scanline), "screen", 0, 10); TIMER(config, "irq_timer").configure_periodic(FUNC(vg5k_state::z80_irq), attotime::from_msec(20)); EF9345(config, m_ef9345, 0); m_ef9345->set_palette_tag("palette"); /* video hardware */ screen_device &screen(SCREEN(config, "screen", SCREEN_TYPE_RASTER)); screen.set_refresh_hz(50); screen.set_vblank_time(ATTOSECONDS_IN_USEC(2500)); /* not accurate */ screen.set_screen_update("ef9345", FUNC(ef9345_device::screen_update)); screen.set_size(336, 300); screen.set_visarea(00, 336-1, 00, 270-1); GFXDECODE(config, "gfxdecode", "palette", gfx_vg5k); PALETTE(config, "palette").set_entries(8); /* sound hardware */ SPEAKER(config, "speaker").front_center(); DAC_1BIT(config, "dac", 0).add_route(ALL_OUTPUTS, "speaker", 0.125); voltage_regulator_device &vref(VOLTAGE_REGULATOR(config, "vref", 0)); vref.add_route(0, "dac", 1.0, DAC_VREF_POS_INPUT); /* cassette */ CASSETTE(config, m_cassette); m_cassette->set_formats(vg5k_cassette_formats); m_cassette->set_default_state(CASSETTE_STOPPED | CASSETTE_SPEAKER_ENABLED); m_cassette->add_route(0, "speaker", 0.05); m_cassette->set_interface("vg5k_cass"); /* printer */ PRINTER(config, m_printer, 0); /* internal ram */ RAM(config, RAM_TAG).set_default_size("16K").set_extra_options("32K,48K"); /* Software lists */ SOFTWARE_LIST(config, "cass_list").set_original("vg5k"); } /* ROM definition */ ROM_START( vg5k ) ROM_REGION( 0x10000, "maincpu", ROMREGION_ERASEFF ) ROM_SYSTEM_BIOS(0, "v11", "BASIC v1.1") ROMX_LOAD( "vg5k11.bin", 0x0000, 0x4000, CRC(a6f4a0ea) SHA1(58eccce33cc21fc17bc83921018f531b8001eda3), ROM_BIOS(0) ) // dumped from a Philips VG-5000. ROM_SYSTEM_BIOS(1, "v10", "BASIC v1.0") ROMX_LOAD( "vg5k10.bin", 0x0000, 0x4000, BAD_DUMP CRC(57983260) SHA1(5ad1787a6a597b5c3eedb7c3704b649faa9be4ca), ROM_BIOS(1) ) ROM_REGION( 0x4000, "ef9345", 0 ) ROM_LOAD( "charset.rom", 0x0000, 0x2000, BAD_DUMP CRC(b2f49eb3) SHA1(d0ef530be33bfc296314e7152302d95fdf9520fc) ) // from dcvg5k ROM_END /* Driver */ // YEAR NAME PARENT COMPAT MACHINE INPUT CLASS INIT COMPANY FULLNAME FLAGS COMP( 1984, vg5k, 0, 0, vg5k, vg5k, vg5k_state, init_vg5k, "Philips", "VG-5000", MACHINE_SUPPORTS_SAVE | MACHINE_NOT_WORKING )