diff --git a/scripts/target/mame/mess.lua b/scripts/target/mame/mess.lua
index 291399f4d21..856f667fbbf 100644
--- a/scripts/target/mame/mess.lua
+++ b/scripts/target/mame/mess.lua
@@ -3420,6 +3420,7 @@ files {
 	MAME_DIR .. "src/mame/drivers/micronic.cpp",
 	MAME_DIR .. "src/mame/includes/micronic.h",
 	MAME_DIR .. "src/mame/drivers/mini2440.cpp",
+	MAME_DIR .. "src/mame/drivers/minitel_2_rpic.cpp",
 	MAME_DIR .. "src/mame/drivers/mmd1.cpp",
 	MAME_DIR .. "src/mame/drivers/mod8.cpp",
 	MAME_DIR .. "src/mame/drivers/modellot.cpp",
diff --git a/src/devices/video/ef9345.cpp b/src/devices/video/ef9345.cpp
index ed3ec8adc3a..3978723e18a 100644
--- a/src/devices/video/ef9345.cpp
+++ b/src/devices/video/ef9345.cpp
@@ -9,6 +9,7 @@
     This code is based on Daniel Coulom's implementation in DCVG5k
     and DCAlice released by Daniel Coulom under GPL license
 
+    TS9347 variant support added by Jean-François DEL NERO
 *********************************************************************/
 
 #include "emu.h"
@@ -29,6 +30,7 @@
 
 // devices
 const device_type EF9345 = device_creator<ef9345_device>;
+const device_type TS9347 = device_creator<ts9347_device>;
 
 // default address map
 static ADDRESS_MAP_START( ef9345, AS_0, 8, ef9345_device )
@@ -105,10 +107,25 @@ ef9345_device::ef9345_device(const machine_config &mconfig, const char *tag, dev
 	device_video_interface(mconfig, *this),
 	m_space_config("videoram", ENDIANNESS_LITTLE, 8, 16, 0, nullptr, *ADDRESS_MAP_NAME(ef9345)),
 	m_charset(*this, DEVICE_SELF),
+	m_variant(EF9345_MODE::TYPE_EF9345),
 	m_palette(*this, finder_base::DUMMY_TAG)
 {
 }
 
+ef9345_device::ef9345_device(const machine_config &mconfig, device_type type, const char *name, const char *tag, device_t *owner, uint32_t clock, EF9345_MODE variant, const char *shortname, const char *source) :
+	device_t(mconfig, type, name, tag, owner, clock, shortname, source),
+	device_memory_interface(mconfig, *this),
+	device_video_interface(mconfig, *this),
+	m_space_config("videoram", ENDIANNESS_LITTLE, 8, 16, 0, nullptr, *ADDRESS_MAP_NAME(ef9345)),
+	m_charset(*this, DEVICE_SELF),
+	m_variant(variant),
+	m_palette(*this, finder_base::DUMMY_TAG)
+{
+}
+
+ts9347_device::ts9347_device(const machine_config &mconfig, const char *tag, device_t *owner, uint32_t clock)
+	: ef9345_device(mconfig, TS9347, "TS9347",tag, owner, clock, EF9345_MODE::TYPE_TS9347,"ts9347",__FILE__){ }
+
 //-------------------------------------------------
 //  static_set_palette_tag: Set the tag of the
 //  palette device
@@ -239,7 +256,17 @@ void ef9345_device::draw_char_80(uint8_t *c, uint16_t x, uint16_t y)
 // set then ef9345 mode
 void ef9345_device::set_video_mode(void)
 {
-	m_char_mode = ((m_pat & 0x80) >> 5) | ((m_tgs & 0xc0) >> 6);
+	if (m_variant == EF9345_MODE::TYPE_TS9347)
+	{
+		// Only TGS 7 & 6 used for the char mode with the TS9347
+		m_char_mode = ((m_tgs & 0xc0) >> 6);
+	}
+	else
+	{
+		// PAT 7, TGS 7 & 6
+		m_char_mode = ((m_pat & 0x80) >> 5) | ((m_tgs & 0xc0) >> 6);
+	}
+
 	uint16_t new_width = (m_char_mode == MODE12x80 || m_char_mode == MODE8x80) ? 492 : 336;
 
 	if (m_screen->width() != new_width)
@@ -385,6 +412,11 @@ void ef9345_device::bichrome40(uint8_t type, uint16_t address, uint8_t dial, uin
 	uint16_t i;
 	uint8_t pix[80];
 
+	if (m_variant == EF9345_MODE::TYPE_TS9347)
+	{
+		c0 = 0;
+	}
+
 	if (flash && m_pat & 0x40 && m_blink)
 		c1 = c0;                    //flash
 	if (hided && m_pat & 0x08)
@@ -472,6 +504,12 @@ void ef9345_device::quadrichrome40(uint8_t c, uint8_t b, uint8_t a, uint16_t x,
 	uint8_t lowresolution = (b & 0x02) >> 1, ramx, ramy, ramblock;
 	uint16_t ramindex;
 
+	if (m_variant == EF9345_MODE::TYPE_TS9347)
+	{
+		// No quadrichrome support into the TS9347
+		return;
+	}
+
 	//quadrichrome don't suppor double size
 	m_last_dial[x] = 0;
 
@@ -688,6 +726,11 @@ void ef9345_device::makechar(uint16_t x, uint16_t y)
 			makechar_24x40(x, y);
 			break;
 		case MODEVAR40:
+			if (m_variant == EF9345_MODE::TYPE_TS9347)
+			{ // TS9347 char mode definition is different.
+				makechar_16x40(x, y);
+				break;
+			}
 		case MODE8x80:
 			logerror("Unemulated EF9345 mode: %02x\n", m_char_mode);
 			break;
@@ -695,7 +738,14 @@ void ef9345_device::makechar(uint16_t x, uint16_t y)
 			makechar_12x80(x, y);
 			break;
 		case MODE16x40:
-			makechar_16x40(x, y);
+			if (m_variant == EF9345_MODE::TYPE_TS9347)
+			{
+				logerror("Unemulated EF9345 mode: %02x\n", m_char_mode);
+			}
+			else
+			{
+				makechar_16x40(x, y);
+			}
 			break;
 		default:
 			logerror("Unknown EF9345 mode: %02x\n", m_char_mode);
@@ -991,14 +1041,22 @@ void ef9345_device::update_scanline(uint16_t scanline)
 	}
 	else if (scanline < 250)
 	{
-		if (m_pat & 4)
+		if (m_variant == EF9345_MODE::TYPE_TS9347)
+		{
 			for(i = 0; i < 40; i++)
 				makechar(i, (scanline / 10));
+		}
 		else
-			draw_border(scanline / 10);
+		{
+			if (m_pat & 4) // Lower bulk enable
+				for(i = 0; i < 40; i++)
+					makechar(i, (scanline / 10));
+			else
+				draw_border(scanline / 10);
 
-		if (scanline == 240)
-			draw_border(26);
+			if (scanline == 240)
+				draw_border(26);
+		}
 	}
 }
 
diff --git a/src/devices/video/ef9345.h b/src/devices/video/ef9345.h
index 2945f9b8a5b..a6102fe96cc 100644
--- a/src/devices/video/ef9345.h
+++ b/src/devices/video/ef9345.h
@@ -42,6 +42,15 @@ public:
 	uint32_t screen_update(screen_device &screen, bitmap_rgb32 &bitmap, const rectangle &cliprect);
 
 protected:
+
+	enum class EF9345_MODE {
+		TYPE_EF9345    = 0x001,
+		TYPE_TS9347    = 0x002
+	};
+
+	// pass-through constructor
+	ef9345_device(const machine_config &mconfig, device_type type, const char *name, const char *tag, device_t *owner, uint32_t clock, EF9345_MODE variant, const char *shortname, const char *source);
+
 	// device-level overrides
 	virtual void device_start() override;
 	virtual void device_reset() override;
@@ -109,10 +118,19 @@ private:
 	emu_timer *m_busy_timer;
 	emu_timer *m_blink_timer;
 
+	const EF9345_MODE m_variant;
+
 	required_device<palette_device> m_palette;
 };
 
+class ts9347_device : public ef9345_device
+{
+public :
+	ts9347_device(const machine_config &mconfig, const char *tag, device_t *owner, uint32_t clock);
+};
+
 // device type definition
 extern const device_type EF9345;
+extern const device_type TS9347;
 
 #endif
diff --git a/src/mame/drivers/minitel_2_rpic.cpp b/src/mame/drivers/minitel_2_rpic.cpp
new file mode 100644
index 00000000000..93d90b171f4
--- /dev/null
+++ b/src/mame/drivers/minitel_2_rpic.cpp
@@ -0,0 +1,450 @@
+// license:BSD-3-Clause
+// copyright-holders: Jean-Francois DEL NERO
+/***************************************************************************
+
+	Minitel 2
+
+	The Minitel is a small, on-line computer/Videotex terminal with multi-services that
+	can be connected to any French telephone line. This terminal was widely used in France
+	during the 80's and 90's.
+
+	There are several modeles and version. Most of them are based on a mcu from the 8051 family
+	and a EF9345 like semi graphic video chip.
+
+	The current implementation is an Minitel 2 from "La RADIOTECHNIQUE PORTENSEIGNE" / RPIC (Philips)
+	You can found more informations about this hardware there :
+	http://hxc2001.free.fr/minitel
+
+	What is implemented and working :
+
+	- Main MCU
+	- Video output
+	- Keyboard
+
+	What is not yet implemented :
+
+	- Modem and sound output.
+	- The rear serial port.
+	- Parameters I2C 24C02 EEPROM.
+
+	The original firmware and the experimental demo rom are currently both working.
+
+	Please note the current special function keys assignation :
+
+	F1 -> Suite
+	F2 -> Retour
+	F3 -> Envoi
+	F4 -> Repetition
+	F5 -> TEL
+	F6 -> Guide
+	F7 -> Sommaire
+	F8 -> Connexion/Fin
+	F9 -> Fonction
+	F10-> ON / OFF
+
+	With the official ROM you need to press F10 to switch on the CRT.
+
+****************************************************************************/
+
+#include "emu.h"
+
+#include "cpu/mcs51/mcs51.h"
+#include "video/ef9345.h"
+
+#include "screen.h"
+#include "softlist.h"
+
+#include "logmacro.h"
+
+// IO expander latch usage definitions
+enum
+{
+	CTRL_REG_DTMF = 0x02,
+	CTRL_REG_MCBC = 0x04,
+	CTRL_REG_OPTO = 0x08,
+	CTRL_REG_RELAY = 0x10,
+	CTRL_REG_CRTON = 0x20
+};
+
+// 80C32 Port IO usage definitions
+enum
+{
+	PORT_1_KBSERIN = 0x01,
+	PORT_1_MDM_DCD = 0x02,
+	PORT_1_MDM_PRD = 0x04,
+	PORT_1_MDM_TXD = 0x08,
+	PORT_1_MDM_RTS = 0x10,
+	PORT_1_KBLOAD = 0x20,
+	PORT_1_SCL = 0x40,
+	PORT_1_SDA = 0x80
+};
+
+class minitel_state : public driver_device
+{
+public:
+	minitel_state(const machine_config &mconfig, device_type type, const char *tag)
+		: driver_device(mconfig, type, tag)
+		, m_maincpu(*this, "maincpu")
+		, m_ts9347(*this, "ts9347")
+		, m_palette(*this, "palette")
+		, m_io_kbd(*this, "Y%u", 0)
+		{
+		}
+
+	required_device<cpu_device> m_maincpu;
+	required_device<ts9347_device> m_ts9347;
+	required_device<palette_device> m_palette;
+
+	TIMER_DEVICE_CALLBACK_MEMBER(minitel_scanline);
+
+	DECLARE_WRITE8_MEMBER ( port_w );
+	DECLARE_READ8_MEMBER ( port_r );
+
+	DECLARE_WRITE8_MEMBER ( dev_crtl_reg_w );
+	DECLARE_READ8_MEMBER ( dev_keyb_ser_r );
+
+	DECLARE_READ8_MEMBER ( ts9347_io_r );
+	DECLARE_WRITE8_MEMBER ( ts9347_io_w );
+
+protected:
+	required_ioport_array<16> m_io_kbd;
+	virtual void machine_start() override;
+
+	char port0, port1, port2, port3;
+
+	int keyboard_para_ser;
+	unsigned char keyboard_x_row_reg;
+
+	unsigned char last_ctrl_reg;
+};
+
+void minitel_state::machine_start()
+{
+	m_palette->set_pen_color( 0, 0, 0, 0);
+	m_palette->set_pen_color( 1, 86, 86, 86);
+	m_palette->set_pen_color( 2, 172, 172, 172);
+	m_palette->set_pen_color( 3, 255, 255, 255);
+	m_palette->set_pen_color( 4, 44, 44, 44);
+	m_palette->set_pen_color( 5, 86, 86, 86);
+	m_palette->set_pen_color( 6, 172, 172, 172);
+	m_palette->set_pen_color( 7, 255, 255, 255);
+}
+
+WRITE8_MEMBER(minitel_state::port_w)
+{
+	LOG("port_w: write %02X to PORT (offset=%02X)\n", data, offset);
+
+	switch(offset| 0x20000)
+	{
+		case MCS51_PORT_P0:
+			port0 = data;
+		break;
+		case MCS51_PORT_P1:
+
+			if( (port1 ^ data) & PORT_1_KBSERIN )
+			{
+				LOG("PORT_1_KBSERIN : %d \n", data & PORT_1_KBSERIN );
+			}
+
+			if( (port1 ^ data) & PORT_1_MDM_DCD )
+			{
+				LOG("PORT_1_MDM_DCD : %d \n", data & PORT_1_MDM_DCD );
+			}
+
+			if( (port1 ^ data) & PORT_1_MDM_PRD )
+			{
+				LOG("PORT_1_MDM_PRD : %d \n", data & PORT_1_MDM_PRD );
+			}
+
+			if( (port1 ^ data) & PORT_1_MDM_TXD )
+			{
+				LOG("PORT_1_MDM_TXD : %d \n", data & PORT_1_MDM_TXD );
+			}
+
+			if( (port1 ^ data) & PORT_1_MDM_RTS )
+			{
+				LOG("PORT_1_MDM_RTS : %d \n", data & PORT_1_MDM_RTS );
+			}
+
+			if( (port1 ^ data) & PORT_1_KBLOAD )
+			{
+				LOG("PORT_1_KBLOAD : %d PC:0x%x\n", data & PORT_1_KBLOAD,m_maincpu->pc() );
+
+				if(data & PORT_1_KBLOAD)
+					keyboard_para_ser = 1;
+				else
+					keyboard_para_ser = 0;
+			}
+
+			if( (port1 ^ data) & PORT_1_SCL )
+			{
+				LOG("PORT_1_SCL : %d \n", data & PORT_1_SCL );
+			}
+
+			if( (port1 ^ data) & PORT_1_SDA )
+			{
+				LOG("PORT_1_SDA : %d \n", data & PORT_1_SDA );
+			}
+
+			port1=data;
+		break;
+
+		case MCS51_PORT_P2:
+			port2=data;
+		break;
+
+		case MCS51_PORT_P3:
+			port3=data;
+		break;
+	}
+}
+
+READ8_MEMBER(minitel_state::port_r)
+{
+	LOG("port_r: read PORT (offset=%02X) %x\n", offset,m_maincpu->pc());
+
+	switch(offset | 0x20000)
+	{
+		case MCS51_PORT_P0:
+			LOG("port_r: read %02X from PORT0\n", port0);
+			return port0;
+		case MCS51_PORT_P1:
+			LOG("port_r: read %02X from PORT1 - Keyboard -> %x\n", port1,((keyboard_x_row_reg>>7)&1));
+			return ( (port1&0xFE) | ((keyboard_x_row_reg>>7)&1) ) ;
+		case MCS51_PORT_P2:
+			LOG("port_r: read %02X from PORT2\n", port2);
+			return port2;
+		case MCS51_PORT_P3:
+			LOG("port_r: read %02X from PORT3\n", port3);
+			return port3;
+	}
+	return 0;
+}
+
+WRITE8_MEMBER(minitel_state::dev_crtl_reg_w)
+{
+	if( last_ctrl_reg != data)
+	{
+		LOG("minitel_state::hw_ctrl_reg : %x %x\n",offset, data);
+
+		if( (last_ctrl_reg ^ data) & CTRL_REG_DTMF )
+		{
+			LOG("CTRL_REG_DTMF : %d \n", data & CTRL_REG_DTMF );
+		}
+
+		if( (last_ctrl_reg ^ data) & CTRL_REG_MCBC )
+		{
+			LOG("CTRL_REG_MCBC : %d \n", data & CTRL_REG_MCBC );
+		}
+
+		if( (last_ctrl_reg ^ data) & CTRL_REG_OPTO )
+		{
+			LOG("CTRL_REG_OPTO : %d \n", data & CTRL_REG_OPTO );
+		}
+
+		if( (last_ctrl_reg ^ data) & CTRL_REG_RELAY )
+		{
+			LOG("CTRL_REG_RELAY : %d \n", data & CTRL_REG_RELAY );
+		}
+
+		if( (last_ctrl_reg ^ data) & CTRL_REG_CRTON )
+		{
+			LOG("CTRL_REG_CRTON : %d \n", data & CTRL_REG_CRTON );
+		}
+	}
+
+	last_ctrl_reg = data;
+}
+
+READ8_MEMBER(minitel_state::dev_keyb_ser_r)
+{
+	LOG("minitel_state::keyb read : %x\n",offset);
+
+	if ( keyboard_para_ser )
+	{
+		// load the 4014 with the keyboard row state
+		keyboard_x_row_reg = m_io_kbd[(offset>>8)&0xF]->read();
+		LOG("4014 Load : 0x%.2X 0x%.2X\n",(offset>>8)&0xF,keyboard_x_row_reg);
+	}
+	else
+	{
+		//shift the keyboard register...
+		keyboard_x_row_reg = keyboard_x_row_reg << 1;
+	}
+
+	return 0xFF;
+}
+
+READ8_MEMBER ( minitel_state::ts9347_io_r )
+{
+	return m_ts9347->data_r(space, offset, 0xff);
+}
+
+WRITE8_MEMBER ( minitel_state::ts9347_io_w )
+{
+	LOG("minitel_state::ts9347_io_w : %x %x\n",offset, data);
+
+	m_ts9347->data_w(space, offset, data, 0xff);
+}
+
+TIMER_DEVICE_CALLBACK_MEMBER(minitel_state::minitel_scanline)
+{
+	m_ts9347->update_scanline((uint16_t)param);
+}
+
+static ADDRESS_MAP_START( mem_prg, AS_PROGRAM, 8, minitel_state )
+	AM_RANGE(0x0000, 0x7fff) AM_ROM
+ADDRESS_MAP_END
+
+static ADDRESS_MAP_START( mem_io, AS_IO, 8, minitel_state )
+	AM_RANGE(0x2000, 0x3fff) AM_READWRITE(dev_keyb_ser_r, dev_crtl_reg_w)
+	/* ts9347 */
+	AM_RANGE(0x4000, 0x5ffF) AM_READWRITE(ts9347_io_r, ts9347_io_w)
+	AM_RANGE(MCS51_PORT_P0, MCS51_PORT_P3) AM_READWRITE(port_r, port_w)
+ADDRESS_MAP_END
+
+/* Input ports */
+static INPUT_PORTS_START( minitel2 )
+	PORT_START("Y0")
+	PORT_BIT(0x01, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_OPENBRACE) PORT_CHAR('-')
+	PORT_BIT(0x02, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_Y) PORT_CHAR('y') PORT_CHAR('Y')
+	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_D) PORT_CHAR('d') PORT_CHAR('D')
+	PORT_BIT(0x10, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_NAME("Suite") PORT_CODE(KEYCODE_F1)
+	PORT_BIT(0x20, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_NAME("Retour") PORT_CODE(KEYCODE_F2)
+	PORT_BIT(0x40, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_SPACE) PORT_CHAR(' ')
+	PORT_BIT(0x80, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_C) PORT_CHAR('c') PORT_CHAR('C')
+
+	PORT_START("Y1")
+	PORT_BIT(0x01, IP_ACTIVE_LOW, IPT_UNUSED)
+	PORT_BIT(0x02, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_ESC) PORT_CHAR(27)
+	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_KEYBOARD) PORT_CODE(KEYCODE_LCONTROL)
+	PORT_BIT(0x10, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_NAME("Connexion/Fin") PORT_CODE(KEYCODE_F8)
+	PORT_BIT(0x20, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_NAME("Fonction") PORT_CODE(KEYCODE_F9)
+	PORT_BIT(0x40, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_RSHIFT) // Right maj
+	PORT_BIT(0x80, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_LSHIFT) // Left maj
+
+	PORT_START("Y2")
+	PORT_BIT(0x01, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_2) PORT_CHAR('2')
+	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_L) PORT_CHAR('l') PORT_CHAR('L')
+	PORT_BIT(0x08, IP_ACTIVE_LOW, IPT_UNUSED)
+	PORT_BIT(0x10, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_5) PORT_CHAR('5')
+	PORT_BIT(0x20, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_8) PORT_CHAR('8')
+	PORT_BIT(0x40, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_N) PORT_CHAR('n') PORT_CHAR('N')
+	PORT_BIT(0x80, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_J) PORT_CHAR('j') PORT_CHAR('J')
+
+	PORT_START("Y3")
+
+	PORT_START("Y4")
+	PORT_BIT(0x01, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_COLON) PORT_CHAR(':')
+	PORT_BIT(0x02, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_U) PORT_CHAR('u') PORT_CHAR('U')
+	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_KEYBOARD) PORT_NAME("Envoi") PORT_CODE(KEYCODE_F3)
+	PORT_BIT(0x20, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_NAME("Repetition") PORT_CODE(KEYCODE_F4)
+	PORT_BIT(0x40, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_LEFT)
+	PORT_BIT(0x80, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_V) PORT_CHAR('v') PORT_CHAR('V')
+
+	PORT_START("Y5")
+
+	PORT_START("Y6")
+	PORT_BIT(0x01, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CHAR('?')
+	PORT_BIT(0x02, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_I) PORT_CHAR('i') PORT_CHAR('I')
+	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_BIT(0x10, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_NAME("Tel") PORT_CODE(KEYCODE_F5)
+	PORT_BIT(0x20, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_6) PORT_CHAR('6')
+	PORT_BIT(0x40, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_RIGHT)
+	PORT_BIT(0x80, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_H) PORT_CHAR('h') PORT_CHAR('H')
+
+	PORT_START("Y7")
+
+	PORT_START("Y8")
+	PORT_BIT(0x01, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_QUOTE) PORT_CHAR(';')
+	PORT_BIT(0x02, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_STOP) PORT_CHAR('.') PORT_CHAR(']')
+	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_KEYBOARD) PORT_NAME("BS") PORT_CODE(KEYCODE_BACKSPACE) PORT_CHAR(8)
+	PORT_BIT(0x20, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_NAME("BackS  Delete") PORT_CODE(KEYCODE_BACKSLASH2) PORT_CHAR(8) PORT_CHAR(UCHAR_MAMEKEY(DEL))
+	PORT_BIT(0x40, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_DOWN)
+	PORT_BIT(0x80, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_X) PORT_CHAR('x') PORT_CHAR('X')
+
+	PORT_START("Y9")
+
+	PORT_START("Y10")
+	PORT_BIT(0x01, IP_ACTIVE_LOW, IPT_UNUSED)
+	PORT_BIT(0x02, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_P) PORT_CHAR('p') PORT_CHAR('P')
+	PORT_BIT(0x04, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_M) PORT_CHAR('m') PORT_CHAR('M')
+	PORT_BIT(0x08, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_0) PORT_CHAR('0')
+	PORT_BIT(0x10, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_3) PORT_CHAR('3')
+	PORT_BIT(0x20, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CHAR('*')
+	PORT_BIT(0x40, IP_ACTIVE_LOW, IPT_UNUSED)
+	PORT_BIT(0x80, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CHAR('#')
+
+	PORT_START("Y11")
+
+	PORT_START("Y12")
+	PORT_BIT(0x01, IP_ACTIVE_LOW, IPT_UNUSED)
+	PORT_BIT(0x02, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_1) PORT_CHAR('1')
+	PORT_BIT(0x04, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_4) PORT_CHAR('4')
+	PORT_BIT(0x08, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_NAME("Return") PORT_CODE(KEYCODE_ENTER) PORT_CHAR(13)
+	PORT_BIT(0x10, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_7) PORT_CHAR('7')
+	PORT_BIT(0x20, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_NAME("On/Off") PORT_CODE(KEYCODE_F10)
+	PORT_BIT(0x40, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_B) PORT_CHAR('b') PORT_CHAR('B')
+	PORT_BIT(0x80, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_G) PORT_CHAR('g') PORT_CHAR('G')
+
+	PORT_START("Y13")
+
+	PORT_START("Y14")
+	PORT_BIT(0x01, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CHAR('\'')
+	PORT_BIT(0x02, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_COMMA) PORT_CHAR(',') PORT_CHAR('[')
+	PORT_BIT(0x04, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_Z) PORT_CHAR('z') PORT_CHAR('Z')
+	PORT_BIT(0x08, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_Q) PORT_CHAR('q') PORT_CHAR('Q')
+	PORT_BIT(0x10, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_NAME("Guide") PORT_CODE(KEYCODE_F6)
+	PORT_BIT(0x20, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_NAME("Sommaire") PORT_CODE(KEYCODE_F7)
+	PORT_BIT(0x40, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_UP)
+	PORT_BIT(0x80, IP_ACTIVE_LOW, IPT_KEYBOARD) PORT_CODE(KEYCODE_W) PORT_CHAR('w') PORT_CHAR('W')
+
+	PORT_START("Y15")
+
+INPUT_PORTS_END
+
+static MACHINE_CONFIG_START( minitel2, minitel_state )
+	/* basic machine hardware */
+	MCFG_CPU_ADD("maincpu", I80C32, XTAL_14_31818MHz) //verified on pcb
+	MCFG_CPU_PROGRAM_MAP(mem_prg)
+	MCFG_CPU_IO_MAP(mem_io)
+
+	MCFG_DEVICE_ADD("ts9347", TS9347, 0)
+	MCFG_EF9345_PALETTE("palette")
+	MCFG_TIMER_DRIVER_ADD_SCANLINE("minitel_sl", minitel_state, minitel_scanline, "screen", 0, 10)
+
+	/* video hardware */
+	MCFG_SCREEN_ADD("screen", RASTER)
+	MCFG_SCREEN_REFRESH_RATE(60)
+	MCFG_SCREEN_UPDATE_DEVICE("ts9347", ts9347_device, screen_update)
+	MCFG_SCREEN_SIZE(512-1, 312-1)
+	MCFG_SCREEN_VISIBLE_AREA(0, 512-1, 0, 266-1)
+	MCFG_PALETTE_ADD("palette", 8+1)
+	/*MCFG_PALETTE_INIT_OWNER(minitel_state, minitel)*/
+
+MACHINE_CONFIG_END
+
+ROM_START( minitel2 )
+
+	ROM_REGION( 0x10000, "maincpu", ROMREGION_ERASEFF )
+	ROM_DEFAULT_BIOS("FT_BV4")
+
+	ROM_SYSTEM_BIOS(0, "FT_BV4", "Minitel 2 ROM BV4")
+	ROMX_LOAD( "MINITEL2_BV4.BIN",   0x0000, 0x8000, CRC(8844A0A7) SHA1(D3E9079B080DBCEE27AD870EC6C39AC42E7DEACF), ROM_BIOS(1) )
+
+	ROM_SYSTEM_BIOS(1, "DEMOV1", "Minitel 2 Demo")
+	ROMX_LOAD( "demo_minitel.bin",   0x0000, 0x8000, CRC(607F2482) SHA1(7965EDBEF68E45D09DC67A4684DA56003EFF6328), ROM_BIOS(2) )
+
+	ROM_REGION( 0x4000, "ts9347", 0 )
+	ROM_LOAD( "charset.rom", 0x0000, 0x2000, BAD_DUMP CRC(b2f49eb3) SHA1(d0ef530be33bfc296314e7152302d95fdf9520fc) )            // from dcvg5k
+ROM_END
+
+COMP( 1989, minitel2,      0,     0, minitel2,    minitel2,driver_device,   0, "Philips", "Minitel 2", MACHINE_TYPE_COMPUTER | MACHINE_NO_SOUND)
diff --git a/src/mame/mame.lst b/src/mame/mame.lst
index cad4ade9668..d145d631f42 100644
--- a/src/mame/mame.lst
+++ b/src/mame/mame.lst
@@ -20608,6 +20608,9 @@ minicom                         //
 @source:miniforce.cpp
 miniforce                       // D26 cabinet test board
 
+@source:minitel_2_rpic.cpp
+minitel2                        //
+
 @source:minivadr.cpp
 minivadr                        // D26 cabinet test board
 
diff --git a/src/mame/mess.flt b/src/mame/mess.flt
index 95edcafd68f..dea19ce80df 100644
--- a/src/mame/mess.flt
+++ b/src/mame/mess.flt
@@ -354,6 +354,7 @@ mikrosha.cpp
 mini2440.cpp
 minicom.cpp
 miniforce.cpp
+minitel_2_rpic.cpp
 mits680b.cpp
 mk1.cpp
 mk14.cpp