diff --git a/scripts/src/video.lua b/scripts/src/video.lua index a09ef123fca..fafc07e37f6 100644 --- a/scripts/src/video.lua +++ b/scripts/src/video.lua @@ -154,6 +154,18 @@ if (VIDEOS["EF9345"]~=null) then } end +-------------------------------------------------- +-- +--@src/devices/video/ef9364.h,VIDEOS["EF9364"] = true +-------------------------------------------------- + +if (VIDEOS["EF9364"]~=null) then + files { + MAME_DIR .. "src/devices/video/ef9364.cpp", + MAME_DIR .. "src/devices/video/ef9364.h", + } +end + -------------------------------------------------- -- --@src/devices/video/ef9365.h,VIDEOS["EF9365"] = true diff --git a/scripts/target/mame/arcade.lua b/scripts/target/mame/arcade.lua index e7599d3f935..496d50eb71a 100644 --- a/scripts/target/mame/arcade.lua +++ b/scripts/target/mame/arcade.lua @@ -275,6 +275,7 @@ VIDEOS["BUFSPRITE"] = true VIDEOS["DM9368"] = true --VIDEOS["EF9340_1"] = true --VIDEOS["EF9345"] = true +--VIDEOS["EF9364"] = true --VIDEOS["EF9365"] = true --VIDEOS["GF4500"] = true VIDEOS["GF7600GS"] = true diff --git a/scripts/target/mame/mess.lua b/scripts/target/mame/mess.lua index d6f3b786332..f89b2b0557e 100644 --- a/scripts/target/mame/mess.lua +++ b/scripts/target/mame/mess.lua @@ -273,6 +273,7 @@ VIDEOS["DL1416"] = true VIDEOS["DM9368"] = true VIDEOS["EF9340_1"] = true VIDEOS["EF9345"] = true +VIDEOS["EF9364"] = true VIDEOS["EF9365"] = true VIDEOS["GF4500"] = true --VIDEOS+= EPIC12"] = true @@ -3084,6 +3085,7 @@ files { MAME_DIR .. "src/mame/audio/gamate.cpp", MAME_DIR .. "src/mame/drivers/gameking.cpp", MAME_DIR .. "src/mame/drivers/gimix.cpp", + MAME_DIR .. "src/mame/drivers/goupil.cpp", MAME_DIR .. "src/mame/drivers/grfd2301.cpp", MAME_DIR .. "src/mame/drivers/harriet.cpp", MAME_DIR .. "src/mame/drivers/hprot1.cpp", diff --git a/src/devices/video/ef9364.cpp b/src/devices/video/ef9364.cpp new file mode 100644 index 00000000000..b850f05d531 --- /dev/null +++ b/src/devices/video/ef9364.cpp @@ -0,0 +1,359 @@ +// license:BSD-3-Clause +// copyright-holders:Jean-Francois DEL NERO + +/********************************************************************* + + ef9364.cpp + + Thomson EF9364 / Sescosem SFF96364 video controller emulator code + + This circuit is a simple black and white 8x8 character generator. + It display 64 columns * 16 rows text page. + It is able to do automatic text scrolling, page erase. + The characters font is stored into an external 1KB EPROM. + + To see how to use this driver, have a look to the Goupil machine + driver (goupil.cpp). + If you have any question or remark, don't hesitate to contact me + at the email present on this website : http://hxc2001.free.fr/ + + 01/20/2016 + Jean-Francois DEL NERO +*********************************************************************/ + +#include "emu.h" +#include "ef9364.h" + +// devices +const device_type EF9364 = &device_creator; + +//------------------------------------------------- +// default address map +//------------------------------------------------- +static ADDRESS_MAP_START( ef9364, AS_0, 8, ef9364_device ) + AM_RANGE(0x00000, ( ( EF9364_TXTPLANE_MAX_SIZE * EF9364_MAX_TXTPLANES ) - 1 ) ) AM_RAM +ADDRESS_MAP_END + +//------------------------------------------------- +// memory_space_config - return a description of +// any address spaces owned by this device +//------------------------------------------------- + +const address_space_config *ef9364_device::memory_space_config(address_spacenum spacenum) const +{ + return (spacenum == AS_0) ? &m_space_config : NULL; +} + +//************************************************************************** +// INLINE HELPERS +//************************************************************************** + +//************************************************************************** +// live device +//************************************************************************** + +//------------------------------------------------- +// ef9364_device - constructor +//------------------------------------------------- + +ef9364_device::ef9364_device(const machine_config &mconfig, const char *tag, device_t *owner, UINT32 clock) : + device_t(mconfig, EF9364, "EF9364", tag, owner, clock, "ef9364", __FILE__), + device_memory_interface(mconfig, *this), + device_video_interface(mconfig, *this), + m_space_config("textram", ENDIANNESS_LITTLE, 8, 12, 0, nullptr, *ADDRESS_MAP_NAME(ef9364)), + m_palette(*this) +{ + clock_freq = clock; +} + +//------------------------------------------------- +// static_set_palette_tag: Set the tag of the +// palette device +//------------------------------------------------- + +void ef9364_device::static_set_palette_tag(device_t &device, const char *tag) +{ + downcast(device).m_palette.set_tag(tag); +} + +//------------------------------------------------- +// static_set_nb_of_pages: Set the number of hardware pages +//------------------------------------------------- + +void ef9364_device::static_set_nb_of_pages(device_t &device, int nb_of_pages ) +{ + if( nb_of_pages > 0 && nb_of_pages <= 8 ) + { + downcast(device).nb_of_pages = nb_of_pages; + } +} + +//------------------------------------------------- +// set_color_entry: Set the color value +// into the palette +//------------------------------------------------- + +void ef9364_device::set_color_entry( int index, UINT8 r, UINT8 g, UINT8 b ) +{ + if( index < 2 ) + { + palette[index] = rgb_t(r, g, b); + } + else + { + logerror("Invalid EF9364 Palette entry : %02x\n", index); + } +} + +//------------------------------------------------- +// device_start - device-specific startup +//------------------------------------------------- + +void ef9364_device::device_start() +{ + m_textram = &space(0); + m_charset = region(); + + bitplane_xres = EF9364_NB_OF_COLUMNS*8; + bitplane_yres = EF9364_NB_OF_ROWS*(8+4); + + vsync_scanline_pos = 250; + + // Default palette : Black and white + palette[0] = rgb_t(0, 0, 0); + palette[1] = rgb_t(255, 255, 255); + + m_screen_out.allocate( bitplane_xres, m_screen->height() ); + + cursor_cnt = 0; + cursor_state = 0; + + save_item(NAME(m_border)); + + save_item(NAME(m_screen_out)); +} + +//------------------------------------------------- +// device_reset - device-specific reset +//------------------------------------------------- + +void ef9364_device::device_reset() +{ + int i; + + x_curs_pos = 0; + y_curs_pos = 0; + + char_latch = 0x00; + + for(i=0;iwrite_byte ( i , 0x7F ); + } + + memset(m_border, 0, sizeof(m_border)); + + m_screen_out.fill(0); + + set_video_mode(); +} + +//------------------------------------------------- +// set_video_mode: Set output screen format +//------------------------------------------------- + +void ef9364_device::set_video_mode(void) +{ + UINT16 new_width = bitplane_xres; + + if (m_screen->width() != new_width) + { + rectangle visarea = m_screen->visible_area(); + visarea.max_x = new_width - 1; + + m_screen->configure(new_width, m_screen->height(), visarea, m_screen->frame_period().attoseconds()); + } + + //border color + memset(m_border, 0, sizeof(m_border)); +} + +//------------------------------------------------- +// draw_border: Draw the left and right borders +// ( No border for the moment ;) ) +//------------------------------------------------- + +void ef9364_device::draw_border(UINT16 line) +{ +} + +//------------------------------------------------- +// screen_update: Framebuffer video ouput +//------------------------------------------------- + +UINT32 ef9364_device::screen_update(screen_device &screen, bitmap_rgb32 &bitmap, const rectangle &cliprect) +{ + int x,y,r; + unsigned char c; + + for( r = 0 ; r < EF9364_NB_OF_ROWS ; r++ ) + { + for( y = 0 ; y < 8 ; y++ ) + { + for( x = 0 ; x < EF9364_NB_OF_COLUMNS * 8 ; x++ ) + { + if( ( ( x >> 3 ) != x_curs_pos ) || ( r != y_curs_pos ) || !cursor_state) + { + c = m_textram->read_byte( ( r * EF9364_NB_OF_COLUMNS ) + ( x>>3 ) ); + + if( m_charset->u8(((c&0x7F)<<3) + y ) & (0x80>>(x&7)) ) + m_screen_out.pix32((r*12)+y, x) = palette[1]; + else + m_screen_out.pix32((r*12)+y, x) = palette[0]; + } + else + { + if(y != 7) + m_screen_out.pix32((r*12)+y, x) = palette[0]; + else + m_screen_out.pix32((r*12)+y, x) = palette[1]; + } + } + } + } + + cursor_cnt = (cursor_cnt + 1) % 13; + if(!cursor_cnt) + cursor_state ^= 1; + + copybitmap(bitmap, m_screen_out, 0, 0, 0, 0, cliprect); + return 0; +} + +//------------------------------------------------- +// update_scanline: Scanline callback +//------------------------------------------------- + +void ef9364_device::update_scanline(UINT16 scanline) +{ + if (scanline == vsync_scanline_pos) + { + // vsync + } + + if (scanline == 0) + { + draw_border(0); + } +} + +//------------------------------------------------- +// data_w: Registers write access callback +//------------------------------------------------- + +void ef9364_device::command_w(UINT8 cmd) +{ + int x,y,i,j; + + switch( cmd&7 ) + { + case 0x0: // Page Erase & Cursor home + for( y=0 ; y < EF9364_NB_OF_ROWS ; y++ ) + { + for( x=0 ; x < EF9364_NB_OF_COLUMNS ; x++ ) + { + m_textram->write_byte ( y * EF9364_NB_OF_COLUMNS + x , 0x7F ); + } + } + x_curs_pos = 0; + y_curs_pos = 0; + break; + + case 0x1: // Erase to end of the line and return cursor + for( ; x_curs_pos < EF9364_NB_OF_COLUMNS ; x_curs_pos++ ) + { + m_textram->write_byte ( y_curs_pos * EF9364_NB_OF_COLUMNS + x_curs_pos , 0x7F ); + } + x_curs_pos = 0; + break; + + case 0x2: // Line feed + y_curs_pos++; + if( y_curs_pos >= EF9364_NB_OF_ROWS ) + { + // Scroll + for( j = 1 ; j < EF9364_NB_OF_ROWS ; j++ ) + { + for( i = 0 ; i < EF9364_NB_OF_COLUMNS ; i++ ) + { + m_textram->write_byte ( (j-1) * EF9364_NB_OF_COLUMNS + i , m_textram->read_byte ( j * EF9364_NB_OF_COLUMNS + i ) ); + } + } + // Erase last line + for( i = 0 ; i < EF9364_NB_OF_COLUMNS ; i++ ) + { + m_textram->write_byte ( ( EF9364_NB_OF_ROWS - 1 ) * EF9364_NB_OF_COLUMNS + i , 0x7F ); + } + + y_curs_pos = EF9364_NB_OF_ROWS - 1; + } + break; + + case 0x3: // Nop + + break; + + case 0x4: // Cursor left + if(x_curs_pos) + x_curs_pos--; + break; + + case 0x5: // Erasure of cursor Line. + for( x = 0 ; x < EF9364_NB_OF_COLUMNS ; x++ ) + { + m_textram->write_byte ( y_curs_pos * EF9364_NB_OF_COLUMNS + x , 0x7F ); + } + break; + + case 0x6: // Cursor up + if(y_curs_pos) + y_curs_pos--; + break; + + case 0x7: // Write char + if(cmd&0x8) + m_textram->write_byte ( y_curs_pos * EF9364_NB_OF_COLUMNS + x_curs_pos , char_latch ); + + x_curs_pos++; + if( x_curs_pos >= EF9364_NB_OF_COLUMNS ) + { + x_curs_pos=0; + y_curs_pos++; + if( y_curs_pos >= EF9364_NB_OF_ROWS ) + { + // Scroll + for( j = 1 ; j < EF9364_NB_OF_ROWS ; j++ ) + { + for( i = 0 ; i < EF9364_NB_OF_COLUMNS ; i++ ) + { + m_textram->write_byte ( (j-1) * EF9364_NB_OF_COLUMNS + i , m_textram->read_byte ( j * EF9364_NB_OF_COLUMNS + i ) ); + } + } + // Erase last line + for( i = 0 ; i < EF9364_NB_OF_COLUMNS ; i++ ) + { + m_textram->write_byte ( ( EF9364_NB_OF_ROWS - 1 ) * EF9364_NB_OF_COLUMNS + i , 0x7F ); + } + + y_curs_pos = EF9364_NB_OF_ROWS - 1; + } + } + break; + + } +} + +void ef9364_device::char_latch_w(UINT8 data) +{ + char_latch = data; +} diff --git a/src/devices/video/ef9364.h b/src/devices/video/ef9364.h new file mode 100644 index 00000000000..1519d817196 --- /dev/null +++ b/src/devices/video/ef9364.h @@ -0,0 +1,104 @@ +// license:BSD-3-Clause +// copyright-holders:Jean-Francois DEL NERO +/********************************************************************* + + ef9364.h + + Thomson EF9364 video controller + +*********************************************************************/ + +#pragma once + +#ifndef __EF9364_H__ +#define __EF9364_H__ + +#define EF9364_NB_OF_COLUMNS 64 +#define EF9364_NB_OF_ROWS 16 + +#define EF9364_TXTPLANE_MAX_SIZE ( EF9364_NB_OF_COLUMNS * EF9364_NB_OF_ROWS ) +#define EF9364_MAX_TXTPLANES 2 + +#define MCFG_EF9364_PALETTE(_palette_tag) \ + ef9364_device::static_set_palette_tag(*device, "^" _palette_tag); + +#define MCFG_EF9364_PAGES_CNT(_pages_number) \ + ef9364_device::static_set_nb_of_pages(*device,_pages_number); + +#define MCFG_EF9364_IRQ_HANDLER(_devcb) \ + devcb = &ef9364_device::set_irq_handler(*device, DEVCB_##_devcb); + +//************************************************************************** +// TYPE DEFINITIONS +//************************************************************************** + +// ======================> ef9364_device + +class ef9364_device : public device_t, + public device_memory_interface, + public device_video_interface +{ +public: + // construction/destruction + ef9364_device(const machine_config &mconfig, const char *tag, device_t *owner, UINT32 clock); + + // static configuration + static void static_set_palette_tag(device_t &device, const char *tag); + static void static_set_nb_of_pages(device_t &device, int nb_bitplanes ); + + // device interface + + void update_scanline(UINT16 scanline); + void set_color_entry( int index, UINT8 r, UINT8 g, UINT8 b ); + + UINT32 screen_update(screen_device &screen, bitmap_rgb32 &bitmap, const rectangle &cliprect); + void char_latch_w(UINT8 data); + void command_w(UINT8 cmd); + +protected: + // device-level overrides + virtual void device_start() override; + virtual void device_reset() override; + + // device_config_memory_interface overrides + virtual const address_space_config *memory_space_config(address_spacenum spacenum = AS_0) const override; + + // address space configurations + const address_space_config m_space_config; + + // inline helper + +private: + void screen_scanning( int force_clear ); + void set_video_mode(void); + void draw_border(UINT16 line); + + // internal state + + memory_region *m_charset; + address_space *m_textram; + + UINT8 x_curs_pos; + UINT8 y_curs_pos; + UINT8 char_latch; + + UINT8 m_border[80]; //border color + + rgb_t palette[2]; + int nb_of_pages; + int bitplane_xres; + int bitplane_yres; + int vsync_scanline_pos; + int cursor_cnt; + int cursor_state; + + UINT32 clock_freq; + bitmap_rgb32 m_screen_out; + + required_device m_palette; +}; + +// device type definition +extern const device_type EF9364; + +#endif diff --git a/src/mame/drivers/goupil.cpp b/src/mame/drivers/goupil.cpp new file mode 100644 index 00000000000..8d71443a39b --- /dev/null +++ b/src/mame/drivers/goupil.cpp @@ -0,0 +1,511 @@ +// license:BSD-3-Clause +// copyright-holders:Jean-François DEL NERO +/*************************************************************************** + + SMT Goupil G1 driver + + Current state : + + -> CPU / ROM / RAM working + -> Video output working + -> Keyboard support working (need to be polished... ) + -> Floppy FDC not fully implemented. + -> Sound support missing. + + Software : + -> The Monitor is working + -> The internal Basic is working (-> 6800 0xC3 illegal opcode emulation needed). + + 02/04/2016 + Jean-François DEL NERO + +****************************************************************************/ + +#include "emu.h" +#include "cpu/m6800/m6800.h" +#include "machine/6522via.h" +#include "machine/i8279.h" +#include "video/ef9364.h" +#include "video/mc6845.h" +#include "machine/6850acia.h" +#include "machine/wd_fdc.h" + +#include "softlist.h" + +#define MAIN_CLOCK XTAL_4MHz +#define VIDEO_CLOCK MAIN_CLOCK / 8 /* 1.75 Mhz */ +#define CPU_CLOCK MAIN_CLOCK / 4 /* 1 Mhz */ + +class goupil_g1_state : public driver_device +{ +public: + goupil_g1_state(const machine_config &mconfig, device_type type, const char *tag) + : driver_device(mconfig, type, tag) + , m_acia(*this, "ef6850") + , m_ef9364(*this, "ef9364") + , m_maincpu(*this, "maincpu") + , m_via_video(*this, "m_via_video") + , m_via_keyb(*this, "m_via_keyb") + , m_via_modem(*this, "m_via_modem") + , m_fdc(*this, "fd1791") + , m_floppy0(*this, "fd1791:0") + , m_floppy1(*this, "fd1791:1") + , m_floppy(NULL) + { } + + DECLARE_WRITE8_MEMBER(via_video_pba_w); + DECLARE_WRITE8_MEMBER(via_video_pbb_w); + DECLARE_WRITE_LINE_MEMBER(via_video_ca2_w); + + DECLARE_READ8_MEMBER(kbd1_r); + DECLARE_READ8_MEMBER(kbd2_r); + DECLARE_READ8_MEMBER(shift_kb1_r); + DECLARE_READ8_MEMBER(shift_kb2_r); + DECLARE_READ8_MEMBER(ctrl_kb1_r); + DECLARE_READ8_MEMBER(ctrl_kb2_r); + + DECLARE_WRITE8_MEMBER(scanlines_kbd1_w); + DECLARE_WRITE8_MEMBER(scanlines_kbd2_w); + + DECLARE_READ_LINE_MEMBER(via_keyb_ca2_r); + + virtual void machine_start() override; + virtual void machine_reset() override; + + UINT8 m_row_kbd1; + UINT8 m_row_kbd2; + int old_state_ca2; + UINT8 via_video_pbb_data; + UINT8 cnttim; + UINT8 valkeyb; + TIMER_DEVICE_CALLBACK_MEMBER(goupil_scanline); + +private: + required_device m_acia; + required_device m_ef9364; + required_device m_maincpu; + required_device m_via_video; + required_device m_via_keyb; + required_device m_via_modem; + required_device m_fdc; + required_device m_floppy0; + required_device m_floppy1; + floppy_image_device *m_floppy; +}; + +/********************************** +* Floppy controller I/O Handlers * +***********************************/ +// TODO + +/********************************** +* Keyboard I/O Handlers * +***********************************/ + +TIMER_DEVICE_CALLBACK_MEMBER( goupil_g1_state::goupil_scanline ) +{ + m_ef9364->update_scanline((UINT16)param); +} + +static ADDRESS_MAP_START(goupil_mem, AS_PROGRAM, 8, goupil_g1_state) + ADDRESS_MAP_UNMAP_HIGH + AM_RANGE(0x0000,0x3fff) AM_RAM + AM_RANGE(0x4000,0x7fff) AM_RAM + AM_RANGE(0xC000,0xE3FF) AM_ROM AM_REGION("maincpu", 0x1000) // Basic ROM (BASIC 1 up to BASIC 9). + + AM_RANGE(0xe400,0xe7ff) AM_RAM + AM_RANGE(0xE800,0xE80F) AM_DEVREADWRITE("ef6850", acia6850_device, data_r, data_w) + AM_RANGE(0xE810,0xE81F) AM_DEVREADWRITE("m_via_video", via6522_device, read, write) + + AM_RANGE(0xE820,0xE820) AM_DEVREADWRITE("i8279_kb1", i8279_device, data_r, data_w ) + AM_RANGE(0xE821,0xE821) AM_DEVREADWRITE("i8279_kb1", i8279_device, status_r, cmd_w ) + + AM_RANGE(0xE830,0xE830) AM_DEVREADWRITE("i8279_kb2", i8279_device, data_r, data_w ) + AM_RANGE(0xE831,0xE831) AM_DEVREADWRITE("i8279_kb2", i8279_device, status_r, cmd_w ) + + AM_RANGE(0xE840,0xE84F) AM_DEVREADWRITE("m_via_keyb", via6522_device, read, write) + + AM_RANGE(0xE860,0xE86F) AM_DEVREADWRITE("m_via_modem", via6522_device, read, write) + + AM_RANGE(0xe8f0,0xe8ff) AM_DEVREADWRITE("fd1791", fd1791_t, read, write) + //AM_RANGE(0xf08a,0xf08a) AM_READWRITE( fdc_sel0_r, fdc_sel0_w ) + //AM_RANGE(0xf08b,0xf08b) AM_READWRITE( fdc_sel1_r, fdc_sel1_w ) + + AM_RANGE(0xf400,0xf7ff) AM_ROM AM_REGION("maincpu", 0x0800) // Modem (MOD 3) + AM_RANGE(0xf800,0xffff) AM_ROM AM_REGION("maincpu", 0x0000) // Monitor (MON 1 + MON 2) +ADDRESS_MAP_END + +static ADDRESS_MAP_START( goupil_io, AS_IO, 8, goupil_g1_state) + ADDRESS_MAP_UNMAP_HIGH +ADDRESS_MAP_END + +WRITE8_MEMBER( goupil_g1_state::scanlines_kbd1_w ) +{ + m_row_kbd1 = data; +} + +READ8_MEMBER( goupil_g1_state::ctrl_kb1_r ) +{ + char kbdrow[6]; + unsigned char data; + + kbdrow[0] = 'C'; + kbdrow[1] = 'T'; + kbdrow[2] = 'R'; + kbdrow[3] = '0'; + kbdrow[4] = 0; + + data = ioport(kbdrow)->read(); + if( data & 0x02 ) + return 1; + else + return 0; +} + +READ8_MEMBER( goupil_g1_state::ctrl_kb2_r ) +{ + return 1; +} + +READ8_MEMBER( goupil_g1_state::shift_kb1_r ) +{ + char kbdrow[6]; + unsigned char data; + + kbdrow[0] = 'C'; + kbdrow[1] = 'T'; + kbdrow[2] = 'R'; + kbdrow[3] = '0'; + kbdrow[4] = 0; + + data = ioport(kbdrow)->read(); + if( data & 0x01 ) + return 1; + else + return 0; +} + +READ8_MEMBER( goupil_g1_state::shift_kb2_r ) +{ + return 1; +} + +READ8_MEMBER( goupil_g1_state::kbd1_r ) +{ + char kbdrow[6]; + UINT8 data = 0xff; + + kbdrow[0] = 'A'; + kbdrow[1] = 'X'; + kbdrow[2] = '0' + ( m_row_kbd1 & 7 ) ; + kbdrow[3] = 0; + + data = ioport(kbdrow)->read(); + + return data; +} + +WRITE8_MEMBER( goupil_g1_state::scanlines_kbd2_w ) +{ + m_row_kbd2 = data & 7; +} + +READ_LINE_MEMBER( goupil_g1_state::via_keyb_ca2_r ) +{ + return 0; +} + +READ8_MEMBER( goupil_g1_state::kbd2_r ) +{ + char kbdrow[6]; + UINT8 data = 0xff; + + kbdrow[0] = 'B'; + kbdrow[1] = 'X'; + kbdrow[2] = '0' + ( m_row_kbd2 & 7 ) ; + kbdrow[3] = 0; + + data = ioport(kbdrow)->read(); + + return data; +} + +/* Input ports */ +static INPUT_PORTS_START( goupil_g1 ) + PORT_START("AX0") + PORT_BIT(0x01, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_Z) PORT_CHAR('z') PORT_CHAR('Z') + PORT_BIT(0x02, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_D) PORT_CHAR('d') PORT_CHAR('D') + PORT_BIT(0x04, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_E) PORT_CHAR('e') PORT_CHAR('E') + PORT_BIT(0x08, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_S) PORT_CHAR('s') PORT_CHAR('S') + PORT_BIT(0x10, IP_ACTIVE_LOW, IPT_UNUSED) + PORT_BIT(0x20, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_C) PORT_CHAR('c') PORT_CHAR('C') + PORT_BIT(0x40, IP_ACTIVE_LOW, IPT_UNUSED) + PORT_BIT(0x80, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_X) PORT_CHAR('x') PORT_CHAR('X') + PORT_START("AX1") + PORT_BIT(0x01, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_R) PORT_CHAR('r') PORT_CHAR('R') + PORT_BIT(0x02, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_G) PORT_CHAR('g') PORT_CHAR('G') + PORT_BIT(0x04, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_T) PORT_CHAR('t') PORT_CHAR('T') + PORT_BIT(0x08, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_F) PORT_CHAR('f') PORT_CHAR('F') + PORT_BIT(0x10, IP_ACTIVE_LOW, IPT_UNUSED) + PORT_BIT(0x20, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_B) PORT_CHAR('b') PORT_CHAR('B') + PORT_BIT(0x40, IP_ACTIVE_LOW, IPT_UNUSED) + PORT_BIT(0x80, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_V) PORT_CHAR('v') PORT_CHAR('V') + PORT_START("AX2") + PORT_BIT(0x01, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_Y) PORT_CHAR('y') PORT_CHAR('Y') + PORT_BIT(0x02, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_J) PORT_CHAR('j') PORT_CHAR('J') + PORT_BIT(0x04, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_U) PORT_CHAR('u') PORT_CHAR('U') + PORT_BIT(0x08, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_H) PORT_CHAR('h') PORT_CHAR('H') + PORT_BIT(0x10, IP_ACTIVE_LOW, IPT_UNUSED) + PORT_BIT(0x20, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_COMMA) PORT_CHAR(',') PORT_CHAR('?') + PORT_BIT(0x40, IP_ACTIVE_LOW, IPT_UNUSED) + PORT_BIT(0x80, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_N) PORT_CHAR('n') PORT_CHAR('N') + PORT_START("AX3") + PORT_BIT(0x01, IP_ACTIVE_LOW, IPT_UNUSED) + PORT_BIT(0x02, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_Q) PORT_CHAR('q') PORT_CHAR('Q') + PORT_BIT(0x04, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_A) PORT_CHAR('a') PORT_CHAR('A') + PORT_BIT(0x08, IP_ACTIVE_LOW, IPT_UNUSED) + PORT_BIT(0x10, IP_ACTIVE_LOW, IPT_UNUSED) + 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_F2) + PORT_BIT(0x80, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_F3) + PORT_START("AX4") + 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_KEYBOARD) PORT_CODE(KEYCODE_L) PORT_CHAR('l') PORT_CHAR('L') + PORT_BIT(0x04, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_O) PORT_CHAR('o') PORT_CHAR('O') + PORT_BIT(0x08, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_K) PORT_CHAR('k') PORT_CHAR('K') + PORT_BIT(0x10, IP_ACTIVE_LOW, IPT_UNUSED) + PORT_BIT(0x20, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_STOP) PORT_CHAR(':') PORT_CHAR('/') + PORT_BIT(0x40, IP_ACTIVE_LOW, IPT_UNUSED) + PORT_BIT(0x80, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_COLON) PORT_CHAR(';') PORT_CHAR('.') + PORT_START("AX5") + PORT_BIT(0x01, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_NAME("TAB") PORT_CODE(KEYCODE_TAB) PORT_CHAR(UCHAR_MAMEKEY(TAB)) + PORT_BIT(0x02, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_NAME("Return") PORT_CODE(KEYCODE_ENTER) PORT_CHAR(13) + PORT_BIT(0x04, IP_ACTIVE_LOW, IPT_UNUSED) + PORT_BIT(0x08, IP_ACTIVE_LOW, IPT_UNUSED) + PORT_BIT(0x10, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_NAME("BS") PORT_CODE(KEYCODE_BACKSPACE) PORT_CHAR(8) + PORT_BIT(0x20, IP_ACTIVE_LOW, IPT_UNUSED) + PORT_BIT(0x40, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_MINUS) PORT_CHAR('-') PORT_CHAR('_') + PORT_BIT(0x80, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_SPACE) PORT_CHAR(' ') + PORT_START("AX6") + PORT_BIT(0x01, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_P) PORT_CHAR('p') PORT_CHAR('P') + PORT_BIT(0x02, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_QUOTE) PORT_CHAR(0x00F9) PORT_CHAR('%') + PORT_BIT(0x04, IP_ACTIVE_LOW, IPT_UNUSED) + PORT_BIT(0x08, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_M) PORT_CHAR('m') PORT_CHAR('M') + PORT_BIT(0x10, IP_ACTIVE_LOW, IPT_UNUSED) + PORT_BIT(0x20, IP_ACTIVE_LOW, IPT_UNUSED) + PORT_BIT(0x40, IP_ACTIVE_LOW, IPT_UNUSED) + PORT_BIT(0x80, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_EQUALS) PORT_CHAR('=') PORT_CHAR('+') + PORT_START("AX7") + PORT_BIT(0x01, IP_ACTIVE_LOW, IPT_UNUSED) + PORT_BIT(0x02, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_F1) + PORT_BIT(0x04, IP_ACTIVE_LOW, IPT_UNUSED) + PORT_BIT(0x08, IP_ACTIVE_LOW, IPT_UNUSED) + PORT_BIT(0x10, IP_ACTIVE_LOW, IPT_UNUSED) + 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("CTR0") + PORT_BIT(0x01, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_NAME("Shift") PORT_CODE(KEYCODE_LSHIFT) + PORT_BIT(0x02, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_NAME("Ctrl") PORT_CODE(KEYCODE_LCONTROL) PORT_CHAR(UCHAR_SHIFT_2) + + PORT_START("BX0") + PORT_BIT(0x01, IP_ACTIVE_LOW, IPT_UNUSED) + PORT_BIT(0x02, IP_ACTIVE_LOW, IPT_UNUSED) + PORT_BIT(0x04, IP_ACTIVE_LOW, IPT_UNUSED) + PORT_BIT(0x08, IP_ACTIVE_LOW, IPT_UNUSED) + PORT_BIT(0x10, IP_ACTIVE_LOW, IPT_UNUSED) + 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("BX1") + PORT_BIT(0x01, IP_ACTIVE_LOW, IPT_UNUSED) + PORT_BIT(0x02, IP_ACTIVE_LOW, IPT_UNUSED) + PORT_BIT(0x04, IP_ACTIVE_LOW, IPT_UNUSED) + PORT_BIT(0x08, IP_ACTIVE_LOW, IPT_UNUSED) + PORT_BIT(0x10, IP_ACTIVE_LOW, IPT_UNUSED) + 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("BX2") + PORT_BIT(0x01, IP_ACTIVE_LOW, IPT_UNUSED) + PORT_BIT(0x02, IP_ACTIVE_LOW, IPT_UNUSED) + PORT_BIT(0x04, IP_ACTIVE_LOW, IPT_UNUSED) + PORT_BIT(0x08, IP_ACTIVE_LOW, IPT_UNUSED) + PORT_BIT(0x10, IP_ACTIVE_LOW, IPT_UNUSED) + 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("BX3") + PORT_BIT(0x01, IP_ACTIVE_LOW, IPT_UNUSED) + PORT_BIT(0x02, IP_ACTIVE_LOW, IPT_UNUSED) + PORT_BIT(0x04, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_1) PORT_CHAR('1') + PORT_BIT(0x08, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_4) PORT_CHAR('4') + PORT_BIT(0x10, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_0) PORT_CHAR('0') + PORT_BIT(0x20, IP_ACTIVE_LOW, IPT_UNUSED) + PORT_BIT(0x40, IP_ACTIVE_LOW, IPT_UNUSED) + PORT_BIT(0x80, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_7) PORT_CHAR('7') + PORT_START("BX4") + PORT_BIT(0x01, IP_ACTIVE_LOW, IPT_UNUSED) + PORT_BIT(0x02, IP_ACTIVE_LOW, IPT_UNUSED) + PORT_BIT(0x04, IP_ACTIVE_LOW, IPT_UNUSED) + PORT_BIT(0x08, IP_ACTIVE_LOW, IPT_UNUSED) + PORT_BIT(0x10, IP_ACTIVE_LOW, IPT_UNUSED) + 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("BX5") + PORT_BIT(0x01, IP_ACTIVE_LOW, IPT_UNUSED) + PORT_BIT(0x02, IP_ACTIVE_LOW, IPT_UNUSED) + PORT_BIT(0x04, IP_ACTIVE_LOW, IPT_UNUSED) + PORT_BIT(0x08, IP_ACTIVE_LOW, IPT_UNUSED) + PORT_BIT(0x10, IP_ACTIVE_LOW, IPT_UNUSED) + 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("BX6") + PORT_BIT(0x01, IP_ACTIVE_LOW, IPT_UNUSED) + PORT_BIT(0x02, IP_ACTIVE_LOW, IPT_UNUSED) + PORT_BIT(0x04, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_3) PORT_CHAR('3') + PORT_BIT(0x08, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_6) PORT_CHAR('6') + PORT_BIT(0x10, IP_ACTIVE_LOW, IPT_UNUSED) + PORT_BIT(0x20, IP_ACTIVE_LOW, IPT_UNUSED) + PORT_BIT(0x40, IP_ACTIVE_LOW, IPT_UNUSED) + PORT_BIT(0x80, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_9) PORT_CHAR('9') + PORT_START("BX7") + PORT_BIT(0x01, IP_ACTIVE_LOW, IPT_UNUSED) + PORT_BIT(0x02, IP_ACTIVE_LOW, IPT_UNUSED) + PORT_BIT(0x04, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_2) PORT_CHAR('2') + PORT_BIT(0x08, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_5) PORT_CHAR('5') + PORT_BIT(0x10, IP_ACTIVE_LOW, IPT_UNUSED) + PORT_BIT(0x20, IP_ACTIVE_LOW, IPT_UNUSED) + PORT_BIT(0x40, IP_ACTIVE_LOW, IPT_UNUSED) + PORT_BIT(0x80, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_8) PORT_CHAR('8') +INPUT_PORTS_END + +static SLOT_INTERFACE_START( goupil_floppies ) + SLOT_INTERFACE( "525qd", FLOPPY_525_QD ) +SLOT_INTERFACE_END + +void goupil_g1_state::machine_start() +{ + std::string region_tag; + + m_floppy = NULL; + valkeyb = 0xFF; +} + +void goupil_g1_state::machine_reset() +{ +} + +WRITE8_MEMBER(goupil_g1_state::via_video_pba_w) +{ + #ifdef DBGMODE + printf("%s: write via_video_pba_w reg : 0x%X\n",machine().describe_context(),data); + #endif + m_ef9364->char_latch_w(data); +} + +WRITE8_MEMBER(goupil_g1_state::via_video_pbb_w) +{ + #ifdef DBGMODE + printf("%s: write via_video_pbb_w reg : 0x%X\n",machine().describe_context(),data); + #endif + via_video_pbb_data = data; +} + +WRITE_LINE_MEMBER( goupil_g1_state::via_video_ca2_w ) +{ + if(old_state_ca2==0 and state==1) + { + m_ef9364->command_w(via_video_pbb_data&0xF); + } + old_state_ca2 = state; +} + +static MACHINE_CONFIG_START( goupil_g1, goupil_g1_state ) + /* basic machine hardware */ + MCFG_CPU_ADD("maincpu",M6808, CPU_CLOCK) + MCFG_CPU_PROGRAM_MAP(goupil_mem) + MCFG_CPU_IO_MAP(goupil_io) + + /* sound hardware */ + // TODO ! + + MCFG_DEVICE_ADD ("ef6850", ACIA6850, 0) + + /* screen */ + MCFG_SCREEN_ADD("screen", RASTER) + MCFG_SCREEN_REFRESH_RATE(50) + MCFG_SCREEN_UPDATE_DEVICE("ef9364", ef9364_device, screen_update) + + MCFG_SCREEN_SIZE((64*8), (16*(8+4))) + MCFG_SCREEN_VISIBLE_AREA(0, (64*8)-1, 0, (16*(8+4))-1) + MCFG_PALETTE_ADD("palette", 16) + + MCFG_DEVICE_ADD("ef9364", EF9364, VIDEO_CLOCK) + MCFG_EF9364_PALETTE("palette") + MCFG_EF9364_PAGES_CNT(1); + MCFG_TIMER_DRIVER_ADD_SCANLINE("goupil_sl", goupil_g1_state, goupil_scanline, "screen", 0, 10) + + MCFG_DEVICE_ADD("m_via_video", VIA6522, 0) + MCFG_VIA6522_WRITEPA_HANDLER(WRITE8(goupil_g1_state, via_video_pba_w)) + MCFG_VIA6522_WRITEPB_HANDLER(WRITE8(goupil_g1_state, via_video_pbb_w)) + MCFG_VIA6522_CA2_HANDLER(WRITELINE(goupil_g1_state, via_video_ca2_w)) + + MCFG_DEVICE_ADD("m_via_keyb", VIA6522, 0) + MCFG_VIA6522_IRQ_HANDLER(DEVWRITELINE("maincpu", m6808_cpu_device, irq_line)) + + MCFG_DEVICE_ADD("m_via_modem", VIA6522, 0) + MCFG_VIA6522_IRQ_HANDLER(DEVWRITELINE("maincpu", m6808_cpu_device, irq_line)) + + /* Floppy */ + MCFG_FD1791_ADD("fd1791", XTAL_8MHz ) + MCFG_FLOPPY_DRIVE_ADD("fd1791:0", goupil_floppies, "525qd", floppy_image_device::default_floppy_formats) + MCFG_FLOPPY_DRIVE_ADD("fd1791:1", goupil_floppies, "525qd", floppy_image_device::default_floppy_formats) + + MCFG_DEVICE_ADD("i8279_kb1", I8279, CPU_CLOCK) + MCFG_I8279_OUT_SL_CB(WRITE8(goupil_g1_state, scanlines_kbd1_w)) // scan SL lines + MCFG_I8279_IN_RL_CB(READ8(goupil_g1_state, kbd1_r)) // kbd RL lines + MCFG_I8279_IN_SHIFT_CB(READ8(goupil_g1_state, shift_kb1_r)) + MCFG_I8279_IN_CTRL_CB(READ8(goupil_g1_state, ctrl_kb1_r)) + MCFG_I8279_OUT_IRQ_CB(DEVWRITELINE("m_via_keyb", via6522_device, write_ca1)) + + MCFG_DEVICE_ADD("i8279_kb2", I8279, CPU_CLOCK) + MCFG_I8279_OUT_SL_CB(WRITE8(goupil_g1_state, scanlines_kbd2_w)) // scan SL lines + MCFG_I8279_IN_RL_CB(READ8(goupil_g1_state, kbd2_r)) // kbd RL lines + MCFG_I8279_IN_SHIFT_CB(READ8(goupil_g1_state, shift_kb2_r)) + MCFG_I8279_IN_CTRL_CB(READ8(goupil_g1_state, ctrl_kb2_r)) + +MACHINE_CONFIG_END + +/* ROM definition */ +ROM_START( goupilg1 ) + ROM_REGION( 0x10000, "maincpu", 0 ) + ROM_DEFAULT_BIOS("v1_0") + + ROM_SYSTEM_BIOS(0, "v1_0", "Version 1.0") + ROMX_LOAD( "SMT_Goupil_G1_MON_1.bin", 0x0000, 0x0400, CRC(98B7BE69) SHA1(69E83FE78A43FCF2B08FB0BCEFB0D217A57B1ECB), ROM_BIOS(1) ) + ROM_LOAD ( "SMT_Goupil_G1_MON_2.bin", 0x0400, 0x0400, CRC(19386B81) SHA1(E52F63FD29D374319781E9677DE6D3FD61A3684C) ) + + ROM_LOAD( "SMT_Goupil_G1_MOD_3.bin", 0x0800, 0x0400, CRC(E662F152) SHA1(11B91C5737E7572A2C18472B66BBD16B485132D5) ) + + ROMX_LOAD( "SMT_Goupil_G1_Basic_1.bin", 0x1000, 0x0400, CRC(AD105B12) SHA1(631CD4B997F76B57BF2509E4BFF30B1595C8BD13), ROM_BIOS(1) ) + ROMX_LOAD( "SMT_Goupil_G1_Basic_2.bin", 0x1400, 0x0400, CRC(0C5C309C) SHA1(F1CAB4B0F9191E53113790A95F1AB7108F9406A1), ROM_BIOS(1) ) + ROMX_LOAD( "SMT_Goupil_G1_Basic_3.bin", 0x1800, 0x0400, CRC(1F1EB127) SHA1(DBBB880C79D515ACBFCB2BE9A4C96962F3E4EDEA), ROM_BIOS(1) ) + ROMX_LOAD( "SMT_Goupil_G1_Basic_4.bin", 0x1C00, 0x0400, CRC(09BE48E4) SHA1(86CAE0D159583C1D572A5754F3BB6B4A2E479359), ROM_BIOS(1) ) + ROMX_LOAD( "SMT_Goupil_G1_Basic_5.bin", 0x2000, 0x0400, CRC(BDEB395C) SHA1(32A50468F1CA772EE45A1F5C61C66F3ECC774074), ROM_BIOS(1) ) + ROMX_LOAD( "SMT_Goupil_G1_Basic_6.bin", 0x2400, 0x0400, CRC(850A4000) SHA1(720F0BB3E45877835219B7E1D943EF4F19B9977D), ROM_BIOS(1) ) + ROMX_LOAD( "SMT_Goupil_G1_Basic_7.bin", 0x2800, 0x0400, CRC(586C7670) SHA1(13E2E96B9F1A53555CE0D55F657CF3C6B96F10A0), ROM_BIOS(1) ) + ROMX_LOAD( "SMT_Goupil_G1_Basic_8.bin", 0x2C00, 0x0400, CRC(33281300) SHA1(CE631FA8157A3F8869C5FEFE24B7F40E06696DF9), ROM_BIOS(1) ) + ROMX_LOAD( "SMT_Goupil_G1_Basic_9.bin", 0x3000, 0x0400, CRC(A3911201) SHA1(8623A0A2D83EB3A27A795030643C5C05A4350A9F), ROM_BIOS(1) ) + + ROM_REGION( 0x400, "ef9364", 0 ) + ROM_LOAD( "SMT_Goupil_G1_Charset.bin", 0x0000, 0x0400, CRC(8B6DA54B) SHA1(AC2204600F45C6DD0DF1E759B62ED25928F02A12) ) +ROM_END + +/* Driver */ + +/* YEAR NAME PARENT COMPAT MACHINE INPUT CLASS INIT COMPANY FULLNAME FLAGS */ +COMP( 1979, goupilg1, 0, 0, goupil_g1, goupil_g1,driver_device, 0, "SMT", "Goupil G1", MACHINE_IS_SKELETON ) diff --git a/src/mame/mess.lst b/src/mame/mess.lst index afd520e0563..c1c186a40c7 100644 --- a/src/mame/mess.lst +++ b/src/mame/mess.lst @@ -2829,6 +2829,7 @@ hp_ipc lggp40 mt735 squale +goupilg1 micral rd100 proteus3