Merge pull request #77 from shattered/_6d9f6c6

vt240.c: mc7105 WIP (nw)

src/mess/drivers/vt240.c

@@ -18,11 +18,28 @@
 ****************************************************************************/
 
 #include "emu.h"
+
+#include "bus/rs232/rs232.h"
 #include "cpu/i8085/i8085.h"
 #include "cpu/t11/t11.h"
+#include "machine/clock.h"
+#include "machine/dec_lk201.h"
+#include "machine/i8251.h"
+#include "machine/mc68681.h"
+#include "machine/ms7004.h"
 #include "machine/ram.h"
 #include "video/upd7220.h"
 
+#define VERBOSE_DBG 1       /* general debug messages */
+
+#define DBG_LOG(N,M,A) \
+	do { \
+	if(VERBOSE_DBG>=N) \
+		{ \
+			logerror("%11.6f at %s: ",machine().time().as_double(),machine().describe_context()); \
+			logerror A; \
+		} \
+	} while (0)
 
 class vt240_state : public driver_device
 {
@@ -30,10 +47,18 @@ public:
 	vt240_state(const machine_config &mconfig, device_type type, const char *tag)
 		: driver_device(mconfig, type, tag),
 		m_maincpu(*this, "maincpu"),
+		m_i8251(*this, "i8251"),
+		m_duart(*this, "duart"),
 		m_hgdc(*this, "upd7220"),
 		m_video_ram(*this, "video_ram"){ }
 
 	required_device<cpu_device> m_maincpu;
+
+	required_device<i8251_device> m_i8251;
+	DECLARE_WRITE_LINE_MEMBER(write_keyboard_clock);
+
+	required_device<mc68681_device> m_duart;
+
 	required_device<upd7220_device> m_hgdc;
 	DECLARE_READ8_MEMBER( test_r );
 	DECLARE_READ8_MEMBER( pcg_r );
@@ -44,12 +69,19 @@ public:
 	//UINT8 *m_char_rom;
 
 	required_shared_ptr<UINT16> m_video_ram;
+
 	DECLARE_DRIVER_INIT(vt240);
 	virtual void machine_reset();
 	INTERRUPT_GEN_MEMBER(vt240_irq);
 	UPD7220_DRAW_TEXT_LINE_MEMBER( hgdc_draw_text );
 };
 
+WRITE_LINE_MEMBER(vt240_state::write_keyboard_clock)
+{
+	m_i8251->write_txc(state);
+	m_i8251->write_rxc(state);
+}
+
 /* TODO */
 UPD7220_DRAW_TEXT_LINE_MEMBER( vt240_state::hgdc_draw_text )
 {
@@ -101,14 +133,30 @@ READ8_MEMBER( vt240_state::test_r )
 }
 
 
-static ADDRESS_MAP_START(vt240_mem, AS_PROGRAM, 8, vt240_state)
+// PDF page 78 (4-25)
+static ADDRESS_MAP_START( vt240_mem, AS_PROGRAM, 16, vt240_state )
 	ADDRESS_MAP_UNMAP_HIGH
-	AM_RANGE(0x0000, 0x3fff) AM_ROM AM_REGION("ipl", 0)
+	AM_RANGE (0000000, 0077777) AM_ROM
-	AM_RANGE(0x4000, 0x5fff) AM_ROM AM_REGION("ipl", 0x8000)
+	// 0170xxx MEM MAP/8085 decoder
+	AM_RANGE (0171000, 0171003) AM_DEVREADWRITE8("i8251", i8251_device, data_r, data_w, 0x00ff)
+	AM_RANGE (0171004, 0171007) AM_DEVREADWRITE8("i8251", i8251_device, status_r, control_w, 0x00ff)
+	AM_RANGE (0172000, 0172077) AM_DEVREADWRITE8("duart", mc68681_device, read, write, 0xff)
+	// 0173000 Video logic
+	// 0174000 Video logic
+	// 017500x Video logic
+	// 0176xxx NVR
+	// 017700x System comm logic
+ADDRESS_MAP_END
+
+// PDF page 134 (6-9)
+static ADDRESS_MAP_START(vt240_char_mem, AS_PROGRAM, 8, vt240_state)
+	ADDRESS_MAP_UNMAP_HIGH
+	AM_RANGE(0x0000, 0x3fff) AM_ROM AM_REGION("charcpu", 0)
+	AM_RANGE(0x4000, 0x5fff) AM_ROM AM_REGION("charcpu", 0x8000)
 	AM_RANGE(0x8000, 0x87ff) AM_RAM
 ADDRESS_MAP_END
 
-static ADDRESS_MAP_START(vt240_io, AS_IO, 8, vt240_state)
+static ADDRESS_MAP_START(vt240_char_io, AS_IO, 8, vt240_state)
 	ADDRESS_MAP_UNMAP_HIGH
 	ADDRESS_MAP_GLOBAL_MASK(0xff)
 	AM_RANGE(0x00, 0x01) AM_DEVREADWRITE("upd7220", upd7220_device, read, write)
@@ -135,7 +183,7 @@ INTERRUPT_GEN_MEMBER(vt240_state::vt240_irq)
 	//device.execute().set_input_line(I8085_RST65_LINE, ASSERT_LINE);
 }
 
-static const gfx_layout vt240_chars_8x8 =
+static const gfx_layout vt240_chars_8x10 =
 {
 	8,10,
 	RGN_FRAC(1,1),
@@ -143,28 +191,31 @@ static const gfx_layout vt240_chars_8x8 =
 	{ 0 },
 	{ STEP8(0,1) },
 	{ 0*8, 1*8, 2*8, 3*8, 4*8, 5*8, 6*8, 7*8, 8*8, 9*8 },
-	8*16
+	8*10
 };
 
 static GFXDECODE_START( vt240 )
-	GFXDECODE_ENTRY( "ipl", 0x0000, vt240_chars_8x8, 0, 8 )
+	GFXDECODE_ENTRY( "charcpu", 0x338*10-2, vt240_chars_8x10, 0, 8 )
 GFXDECODE_END
 
-static MACHINE_CONFIG_START( vt240, vt240_state )
+static MACHINE_CONFIG_FRAGMENT( vt240_motherboard )
-	/* basic machine hardware */
+	MCFG_CPU_ADD("maincpu", T11, XTAL_7_3728MHz) // confirm
-	MCFG_CPU_ADD("maincpu", I8085A, XTAL_16MHz / 4)
 	MCFG_CPU_PROGRAM_MAP(vt240_mem)
-	MCFG_CPU_IO_MAP(vt240_io)
+	MCFG_T11_INITIAL_MODE(5 << 13)
+
+/*
+	MCFG_CPU_ADD("charcpu", I8085A, XTAL_16MHz / 4)
+	MCFG_CPU_PROGRAM_MAP(vt240_char_mem)
+	MCFG_CPU_IO_MAP(vt240_char_io)
 	MCFG_CPU_VBLANK_INT_DRIVER("screen", vt240_state, vt240_irq)
+*/
 
-
-	/* video hardware */
 	MCFG_SCREEN_ADD("screen", RASTER)
 	MCFG_SCREEN_REFRESH_RATE(50)
 	MCFG_SCREEN_VBLANK_TIME(ATTOSECONDS_IN_USEC(2500)) /* not accurate */
 	MCFG_SCREEN_SIZE(640, 480)
 	MCFG_SCREEN_VISIBLE_AREA(0, 640-1, 0, 480-1)
-//  MCFG_VIDEO_START_OVERRIDE(vt240_state,vt240)
+//	MCFG_VIDEO_START_OVERRIDE(vt240_state,vt240)
 	MCFG_SCREEN_UPDATE_DEVICE("upd7220", upd7220_device, screen_update)
 	MCFG_PALETTE_ADD_BLACK_AND_WHITE("palette")
 	MCFG_GFXDECODE_ADD("gfxdecode", "palette", vt240)
@@ -172,15 +223,43 @@ static MACHINE_CONFIG_START( vt240, vt240_state )
 	MCFG_DEVICE_ADD("upd7220", UPD7220, XTAL_4MHz / 4)
 	MCFG_DEVICE_ADDRESS_MAP(AS_0, upd7220_map)
 	MCFG_UPD7220_DRAW_TEXT_CALLBACK_OWNER(vt240_state, hgdc_draw_text)
+
+	MCFG_MC68681_ADD("duart", XTAL_3_6864MHz) /* 2681 duart (not 68681!) */
+//	MCFG_MC68681_IRQ_CALLBACK(WRITELINE(dectalk_state, dectalk_duart_irq_handler))
+	MCFG_MC68681_A_TX_CALLBACK(DEVWRITELINE("rs232", rs232_port_device, write_txd))
+//	MCFG_MC68681_B_TX_CALLBACK(WRITELINE(dectalk_state, dectalk_duart_txa))
+//	MCFG_MC68681_INPORT_CALLBACK(READ8(dectalk_state, dectalk_duart_input))
+//	MCFG_MC68681_OUTPORT_CALLBACK(WRITE8(dectalk_state, dectalk_duart_output))
+//	MCFG_I8251_DTR_HANDLER(DEVWRITELINE("rs232", rs232_port_device, write_dtr))
+//	MCFG_I8251_RTS_HANDLER(DEVWRITELINE("rs232", rs232_port_device, write_rts))
+
+	MCFG_RS232_PORT_ADD("rs232", default_rs232_devices, "null_modem")
+	MCFG_RS232_RXD_HANDLER(DEVWRITELINE("duart", mc68681_device, rx_a_w))
+//	MCFG_RS232_DSR_HANDLER(DEVWRITELINE("duart", mc68681_device, ipX_w))
+MACHINE_CONFIG_END
+
+static MACHINE_CONFIG_START( mc7105, vt240_state )
+	MCFG_FRAGMENT_ADD(vt240_motherboard)
+
+	// serial connection to MS7004 keyboard
+	MCFG_DEVICE_ADD("i8251", I8251, 0)
+//	MCFG_I8251_RXRDY_HANDLER(DEVWRITELINE("pic8259", pic8259_device, ir1_w))
+
+	MCFG_DEVICE_ADD("ms7004", MS7004, 0)
+	MCFG_MS7004_TX_HANDLER(DEVWRITELINE("i8251", i8251_device, write_rxd))
+
+	// baud rate is supposed to be 4800 but keyboard is slightly faster
+	MCFG_DEVICE_ADD("keyboard_clock", CLOCK, 4960*16)
+	MCFG_CLOCK_SIGNAL_HANDLER(WRITELINE(vt240_state, write_keyboard_clock))
 MACHINE_CONFIG_END
 
 /* ROM definition */
 ROM_START( mc7105 )
-	ROM_REGION( 0x10000, "ipl", ROMREGION_ERASEFF )
+	ROM_REGION( 0x10000, "charcpu", ROMREGION_ERASEFF )
 	ROM_LOAD( "027.bin", 0x8000, 0x8000, CRC(a159b412) SHA1(956097ccc2652d494258b3682498cfd3096d7d4f))
 	ROM_LOAD( "028.bin", 0x0000, 0x8000, CRC(b253151f) SHA1(22ffeef8eb5df3c38bfe91266f26d1e7822cdb53))
 
-	ROM_REGION( 0x20000, "subcpu", ROMREGION_ERASEFF )
+	ROM_REGION( 0x20000, "maincpu", ROMREGION_ERASEFF )
 	ROM_LOAD16_BYTE( "029.bin", 0x00000, 0x8000, CRC(4a6db217) SHA1(47637325609ea19ffab61fe31e2700d72fa50729))
 	ROM_LOAD16_BYTE( "031.bin", 0x00001, 0x8000, CRC(47129579) SHA1(39de9e2e26f90c5da5e72a09ff361c1a94b9008a))
 	ROM_LOAD16_BYTE( "030.bin", 0x10000, 0x8000, CRC(05fd7b75) SHA1(2ad8c14e76accfa1b9b8748c58e9ebbc28844a47))
@@ -190,14 +269,14 @@ ROM_END
 /* Driver */
 DRIVER_INIT_MEMBER(vt240_state,vt240)
 {
-	UINT8 *ROM = memregion("ipl")->base();
+	UINT8 *ROM = memregion("charcpu")->base();
 
 	/* patch T11 check */
 	ROM[0x09d] = 0x00;
 	ROM[0x09e] = 0x00;
 	ROM[0x09f] = 0x00;
 
-	/* ROM checksum*/
+	/* ROM checksum */
 	ROM[0x15c] = 0x00;
 	ROM[0x15d] = 0x00;
 	ROM[0x15e] = 0x00;
@@ -206,4 +285,4 @@ DRIVER_INIT_MEMBER(vt240_state,vt240)
 /*    YEAR  NAME    PARENT  COMPAT   MACHINE    INPUT    INIT    COMPANY                      FULLNAME       FLAGS */
 //COMP( 1983, vt240,  0,      0,       vt220,     vt220, driver_device,   0,  "Digital Equipment Corporation", "VT240", GAME_NOT_WORKING | GAME_NO_SOUND)
 //COMP( 1983, vt241,  0,      0,       vt220,     vt220, driver_device,   0,  "Digital Equipment Corporation", "VT241", GAME_NOT_WORKING | GAME_NO_SOUND)
-COMP( 1983, mc7105, 0,      0,       vt240,     vt240, vt240_state,   vt240,  "Elektronika",                  "MC7105", GAME_NOT_WORKING | GAME_NO_SOUND)
+COMP( 1983, mc7105, 0,      0,       mc7105,    vt240, vt240_state,   vt240,  "Elektronika",                  "MC7105", GAME_NOT_WORKING | GAME_NO_SOUND)