mirror of
https://github.com/holub/mame
synced 2025-05-11 16:48:52 +03:00
ff3a768786
- Much improved CS4031 emulation, added DMA, interrupt controller, timer, RTC directly to the device as sub devices and added the generic functions needed for AT compatibility - Moved the ct486 driver to its own file, to avoid all the legacy stuff in at.c - Added support for the IOCHCK signal to the ISA bus, this is used instead of directly issuing an NMI to the main CPU - Moved ISA device slot definitions to its own file to avoid copy & pasting the same list to different drivers - Updated MC146818 RTC for devcb2
932 lines
27 KiB
C
932 lines
27 KiB
C
/***************************************************************************
|
|
|
|
Epson HX-20
|
|
|
|
http://fjkraan.home.xs4all.nl/comp/hx20/
|
|
|
|
****************************************************************************/
|
|
|
|
/*
|
|
|
|
TODO:
|
|
|
|
- m6800.c rewrite
|
|
- keyboard interrupt
|
|
- LCD controller
|
|
- serial
|
|
- SW6 read
|
|
- RS-232
|
|
- microcassette
|
|
- printer
|
|
- ROM cartridge
|
|
- floppy TF-20
|
|
- barcode reader
|
|
|
|
*/
|
|
|
|
#include "includes/hx20.h"
|
|
|
|
|
|
|
|
//**************************************************************************
|
|
// READ/WRITE HANDLERS
|
|
//**************************************************************************
|
|
|
|
//-------------------------------------------------
|
|
// update_interrupt -
|
|
//-------------------------------------------------
|
|
|
|
void hx20_state::update_interrupt()
|
|
{
|
|
int irq = m_rtc_irq || m_kbrequest;
|
|
|
|
m_maincpu->set_input_line(M6800_IRQ_LINE, irq);
|
|
}
|
|
|
|
|
|
//-------------------------------------------------
|
|
// ksc_w -
|
|
//-------------------------------------------------
|
|
|
|
WRITE8_MEMBER( hx20_state::ksc_w )
|
|
{
|
|
logerror("KSC %02x\n", data);
|
|
|
|
m_ksc = data;
|
|
}
|
|
|
|
|
|
//-------------------------------------------------
|
|
// krtn07_r -
|
|
//-------------------------------------------------
|
|
|
|
READ8_MEMBER( hx20_state::krtn07_r )
|
|
{
|
|
UINT8 data = 0xff;
|
|
|
|
if (!BIT(m_ksc, 0)) data &= m_ksc0->read();
|
|
if (!BIT(m_ksc, 1)) data &= m_ksc1->read();
|
|
if (!BIT(m_ksc, 2)) data &= m_ksc2->read();
|
|
if (!BIT(m_ksc, 3)) data &= m_ksc3->read();
|
|
if (!BIT(m_ksc, 4)) data &= m_ksc4->read();
|
|
if (!BIT(m_ksc, 5)) data &= m_ksc5->read();
|
|
if (!BIT(m_ksc, 6)) data &= m_ksc6->read();
|
|
if (!BIT(m_ksc, 7)) data &= m_ksc7->read();
|
|
|
|
return data;
|
|
}
|
|
|
|
|
|
//-------------------------------------------------
|
|
// krtn89_r -
|
|
//-------------------------------------------------
|
|
|
|
READ8_MEMBER( hx20_state::krtn89_r )
|
|
{
|
|
/*
|
|
|
|
bit description
|
|
|
|
0 KRTN8
|
|
1 KRTN9
|
|
2
|
|
3
|
|
4
|
|
5
|
|
6 _PWSW
|
|
7 _BUSY
|
|
|
|
*/
|
|
|
|
UINT8 data = 0xff;
|
|
|
|
if (!BIT(m_ksc, 0)) data &= m_ksc0->read() >> 8;
|
|
if (!BIT(m_ksc, 1)) data &= m_ksc1->read() >> 8;
|
|
if (!BIT(m_ksc, 2)) data &= m_ksc2->read() >> 8;
|
|
if (!BIT(m_ksc, 3)) data &= m_ksc3->read() >> 8;
|
|
if (!BIT(m_ksc, 4)) data &= m_ksc4->read() >> 8;
|
|
if (!BIT(m_ksc, 5)) data &= m_ksc5->read() >> 8;
|
|
if (!BIT(m_ksc, 6)) data &= m_ksc6->read() >> 8;
|
|
if (!BIT(m_ksc, 7)) data &= m_ksc7->read() >> 8;
|
|
|
|
return data;
|
|
}
|
|
|
|
|
|
//-------------------------------------------------
|
|
// lcd_cs_w -
|
|
//-------------------------------------------------
|
|
|
|
WRITE8_MEMBER( hx20_state::lcd_cs_w )
|
|
{
|
|
/*
|
|
|
|
bit description
|
|
|
|
0 LCD CS bit 0
|
|
1 LCD CS bit 1
|
|
2 LCD CS bit 2
|
|
3 LCD C/_D
|
|
4 KEY INT MASK
|
|
5 SERIAL POUT
|
|
6 MO1
|
|
7 MO2
|
|
|
|
*/
|
|
|
|
logerror("LCD CS %02x\n", data);
|
|
|
|
// LCD
|
|
m_lcdc0->cs_w(1);
|
|
m_lcdc1->cs_w(1);
|
|
m_lcdc2->cs_w(1);
|
|
m_lcdc3->cs_w(1);
|
|
m_lcdc4->cs_w(1);
|
|
m_lcdc5->cs_w(1);
|
|
|
|
switch (data & 0x07)
|
|
{
|
|
case 1: m_lcdc0->cs_w(0); break;
|
|
case 2: m_lcdc1->cs_w(0); break;
|
|
case 3: m_lcdc2->cs_w(0); break;
|
|
case 4: m_lcdc3->cs_w(0); break;
|
|
case 5: m_lcdc4->cs_w(0); break;
|
|
case 6: m_lcdc5->cs_w(0); break;
|
|
}
|
|
|
|
int cd = BIT(data, 3);
|
|
|
|
m_lcdc0->cd_w(cd);
|
|
m_lcdc1->cd_w(cd);
|
|
m_lcdc2->cd_w(cd);
|
|
m_lcdc3->cd_w(cd);
|
|
m_lcdc4->cd_w(cd);
|
|
m_lcdc5->cd_w(cd);
|
|
|
|
// serial
|
|
m_sio->pout_w(BIT(data, 5));
|
|
}
|
|
|
|
|
|
//-------------------------------------------------
|
|
// lcd_data_w -
|
|
//-------------------------------------------------
|
|
|
|
WRITE8_MEMBER( hx20_state::lcd_data_w )
|
|
{
|
|
logerror("LCD DATA %02x\n", data);
|
|
|
|
m_lcd_data = data;
|
|
}
|
|
|
|
|
|
//-------------------------------------------------
|
|
// main_p1_r - main CPU port 1 read
|
|
//-------------------------------------------------
|
|
|
|
READ8_MEMBER( hx20_state::main_p1_r )
|
|
{
|
|
/*
|
|
|
|
bit description
|
|
|
|
0 RS-232 DSR
|
|
1 RS-232 CTS
|
|
2
|
|
3 _INT EX
|
|
4 _PWA
|
|
5 _K.B REQUEST
|
|
6 SERIAL PIN
|
|
7 CARTRIDGE MI1 (0=ROM, 1=microcassette)
|
|
|
|
*/
|
|
|
|
UINT8 data = 0x98;
|
|
|
|
// RS-232
|
|
data |= m_rs232->dsr_r();
|
|
data |= m_rs232->cts_r() << 1;
|
|
|
|
// keyboard
|
|
data |= m_kbrequest << 5;
|
|
|
|
// serial
|
|
data |= m_sio->pin_r() << 6;
|
|
|
|
return data;
|
|
}
|
|
|
|
|
|
//-------------------------------------------------
|
|
// main_p1_w - main CPU port 1 write
|
|
//-------------------------------------------------
|
|
|
|
WRITE8_MEMBER( hx20_state::main_p1_w )
|
|
{
|
|
/*
|
|
|
|
bit description
|
|
|
|
0
|
|
1
|
|
2
|
|
3
|
|
4
|
|
5
|
|
6
|
|
7
|
|
|
|
*/
|
|
}
|
|
|
|
|
|
//-------------------------------------------------
|
|
// main_p2_r - main CPU port 2 read
|
|
//-------------------------------------------------
|
|
|
|
READ8_MEMBER( hx20_state::main_p2_r )
|
|
{
|
|
/*
|
|
|
|
bit description
|
|
|
|
0 bar code reader data
|
|
1
|
|
2 SLAVE P34
|
|
3 RX
|
|
4
|
|
5
|
|
6
|
|
7
|
|
|
|
*/
|
|
|
|
UINT8 data = M6801_MODE_4;
|
|
|
|
// serial
|
|
data &= ~(!m_slave_flag << 2);
|
|
|
|
if (m_slave_sio)
|
|
data |= m_slave_rx << 3;
|
|
else
|
|
data |= m_sio->rx_r() << 3;
|
|
|
|
return data;
|
|
}
|
|
|
|
|
|
//-------------------------------------------------
|
|
// main_p2_w - main CPU port 2 write
|
|
//-------------------------------------------------
|
|
|
|
WRITE8_MEMBER( hx20_state::main_p2_w )
|
|
{
|
|
/*
|
|
|
|
bit description
|
|
|
|
0
|
|
1 RS-232 TXD
|
|
2 serial select (0=peripheral, 1=slave 6301)
|
|
3
|
|
4 TX
|
|
5
|
|
6
|
|
7
|
|
|
|
*/
|
|
|
|
// RS-232
|
|
m_rs232->tx(BIT(data, 1));
|
|
|
|
// serial
|
|
m_slave_sio = BIT(data, 2);
|
|
|
|
if (m_slave_sio)
|
|
m_slave_tx = BIT(data, 4);
|
|
else
|
|
m_sio->tx_w(BIT(data, 4));
|
|
}
|
|
|
|
|
|
//-------------------------------------------------
|
|
// slave_p1_r - slave CPU port 1 read
|
|
//-------------------------------------------------
|
|
|
|
READ8_MEMBER( hx20_state::slave_p1_r )
|
|
{
|
|
/*
|
|
|
|
bit description
|
|
|
|
0
|
|
1
|
|
2
|
|
3
|
|
4
|
|
5
|
|
6 printer reset pulse
|
|
7 printer timing pulse
|
|
|
|
*/
|
|
|
|
UINT8 data = 0;
|
|
|
|
return data;
|
|
}
|
|
|
|
|
|
//-------------------------------------------------
|
|
// slave_p1_w - slave CPU port 1 write
|
|
//-------------------------------------------------
|
|
|
|
WRITE8_MEMBER( hx20_state::slave_p1_w )
|
|
{
|
|
/*
|
|
|
|
bit description
|
|
|
|
0 printer head 1 (1=on)
|
|
1 printer head 2
|
|
2 printer head 3
|
|
3 printer head 4
|
|
4 printer motor (0=on)
|
|
5 speaker (1=on)
|
|
6
|
|
7
|
|
|
|
*/
|
|
|
|
// speaker
|
|
m_speaker->level_w(BIT(data, 5));
|
|
}
|
|
|
|
|
|
//-------------------------------------------------
|
|
// slave_p2_r - slave CPU port 2 read
|
|
//-------------------------------------------------
|
|
|
|
READ8_MEMBER( hx20_state::slave_p2_r )
|
|
{
|
|
/*
|
|
|
|
bit description
|
|
|
|
0 RS-232 RXD / microcassette (0=read, 1=write)
|
|
1
|
|
2
|
|
3 TX
|
|
4
|
|
5
|
|
6
|
|
7
|
|
|
|
*/
|
|
|
|
UINT8 data = M6801_MODE_7;
|
|
|
|
// serial
|
|
data |= m_slave_tx << 3;
|
|
|
|
return data;
|
|
}
|
|
|
|
|
|
//-------------------------------------------------
|
|
// slave_p2_w - slave CPU port 2 write
|
|
//-------------------------------------------------
|
|
|
|
WRITE8_MEMBER( hx20_state::slave_p2_w )
|
|
{
|
|
/*
|
|
|
|
bit description
|
|
|
|
0
|
|
1 microcassette internal clock, write data
|
|
2 serial select (0=brake, 1=normal)
|
|
3
|
|
4 RX
|
|
5
|
|
6
|
|
7
|
|
|
|
*/
|
|
|
|
// serial
|
|
m_slave_rx = BIT(data, 4);
|
|
}
|
|
|
|
|
|
//-------------------------------------------------
|
|
// slave_p3_r - slave CPU port 3 read
|
|
//-------------------------------------------------
|
|
|
|
READ8_MEMBER( hx20_state::slave_p3_r )
|
|
{
|
|
/*
|
|
|
|
bit description
|
|
|
|
0
|
|
1
|
|
2 external cassette read data
|
|
3
|
|
4
|
|
5
|
|
6
|
|
7
|
|
|
|
*/
|
|
|
|
UINT8 data = 0;
|
|
|
|
return data;
|
|
}
|
|
|
|
|
|
//-------------------------------------------------
|
|
// slave_p3_w - slave CPU port 3 write
|
|
//-------------------------------------------------
|
|
|
|
WRITE8_MEMBER( hx20_state::slave_p3_w )
|
|
{
|
|
/*
|
|
|
|
bit description
|
|
|
|
0 external cassette remote (0=on)
|
|
1 RS-232 RTS
|
|
2
|
|
3 external cassette write data
|
|
4 slave status flag
|
|
5 bar code power (1=on)
|
|
6 RS-232 power (1=on)
|
|
7 program power (1=on)
|
|
|
|
*/
|
|
|
|
// RS-232
|
|
m_rs232->rts_w(BIT(data, 1));
|
|
|
|
// main
|
|
m_slave_flag = BIT(data, 4);
|
|
}
|
|
|
|
|
|
//-------------------------------------------------
|
|
// slave_p4_r - slave CPU port 4 read
|
|
//-------------------------------------------------
|
|
|
|
READ8_MEMBER( hx20_state::slave_p4_r )
|
|
{
|
|
/*
|
|
|
|
bit description
|
|
|
|
0 PLUG 2
|
|
1
|
|
2
|
|
3
|
|
4
|
|
5
|
|
6
|
|
7 RS-232 CD
|
|
|
|
*/
|
|
|
|
UINT8 data = 0;
|
|
|
|
// RS-232
|
|
data |= m_rs232->dcd_r() << 7;
|
|
|
|
return data;
|
|
}
|
|
|
|
|
|
//-------------------------------------------------
|
|
// slave_p4_w - slave CPU port 4 write
|
|
//-------------------------------------------------
|
|
|
|
WRITE8_MEMBER( hx20_state::slave_p4_w )
|
|
{
|
|
/*
|
|
|
|
bit description
|
|
|
|
0
|
|
1 port enable always on / printer motor control (0=open, 1=brake)
|
|
2 clear shift register / microcassette power switch (1=on)
|
|
3 ROM cartridge power switch (1=on) / microcassette command
|
|
4 ROM address counter clear / clock
|
|
5 cassette/RS-232 select (0=RS-232, 1=microcassette)
|
|
6 ROM cartridge select / microcassette clock (0=counter, 1=head switch)
|
|
7
|
|
|
|
*/
|
|
}
|
|
|
|
|
|
|
|
//**************************************************************************
|
|
// ADDRESS MAPS
|
|
//**************************************************************************
|
|
|
|
//-------------------------------------------------
|
|
// ADDRESS_MAP( hx20_mem )
|
|
//-------------------------------------------------
|
|
|
|
static ADDRESS_MAP_START( hx20_mem, AS_PROGRAM, 8, hx20_state )
|
|
AM_RANGE(0x0000, 0x001f) AM_READWRITE_LEGACY(m6801_io_r, m6801_io_w)
|
|
AM_RANGE(0x0020, 0x0020) AM_WRITE(ksc_w)
|
|
AM_RANGE(0x0022, 0x0022) AM_READ(krtn07_r)
|
|
AM_RANGE(0x0026, 0x0026) AM_WRITE(lcd_cs_w)
|
|
AM_RANGE(0x0028, 0x0028) AM_READ(krtn89_r)
|
|
AM_RANGE(0x002a, 0x002a) AM_WRITE(lcd_data_w)
|
|
AM_RANGE(0x002c, 0x002c) // mask interruption by using IC 8E in sleep mode
|
|
AM_RANGE(0x0040, 0x007f) AM_DEVREADWRITE(MC146818_TAG, mc146818_device, read, write)
|
|
AM_RANGE(0x0080, 0x00ff) AM_RAM
|
|
AM_RANGE(0x0100, 0x3fff) AM_RAM
|
|
AM_RANGE(0x8000, 0xffff) AM_ROM AM_REGION(HD6301V1_MAIN_TAG, 0)
|
|
ADDRESS_MAP_END
|
|
|
|
|
|
//-------------------------------------------------
|
|
// ADDRESS_MAP( hx20_io )
|
|
//-------------------------------------------------
|
|
|
|
static ADDRESS_MAP_START( hx20_io, AS_IO, 8, hx20_state )
|
|
AM_RANGE(M6801_PORT1, M6801_PORT1) AM_READWRITE(main_p1_r, main_p1_w)
|
|
AM_RANGE(M6801_PORT2, M6801_PORT2) AM_READWRITE(main_p2_r, main_p2_w)
|
|
AM_RANGE(M6801_PORT3, M6801_PORT3) AM_NOP // A0-A7, D0-D7
|
|
AM_RANGE(M6801_PORT4, M6801_PORT4) AM_NOP // A8-A15
|
|
ADDRESS_MAP_END
|
|
|
|
|
|
//-------------------------------------------------
|
|
// ADDRESS_MAP( hx20_io )
|
|
//-------------------------------------------------
|
|
|
|
static ADDRESS_MAP_START( hx20_sub_mem, AS_PROGRAM, 8, hx20_state )
|
|
AM_RANGE(0x0000, 0x001f) AM_READWRITE_LEGACY(m6801_io_r, m6801_io_w)
|
|
AM_RANGE(0x0080, 0x00ff) AM_RAM
|
|
AM_RANGE(0xf000, 0xffff) AM_ROM AM_REGION(HD6301V1_SLAVE_TAG, 0)
|
|
ADDRESS_MAP_END
|
|
|
|
|
|
//-------------------------------------------------
|
|
// ADDRESS_MAP( hx20_io )
|
|
//-------------------------------------------------
|
|
|
|
static ADDRESS_MAP_START( hx20_sub_io, AS_IO, 8, hx20_state )
|
|
AM_RANGE(M6801_PORT1, M6801_PORT1) AM_READWRITE(slave_p1_r, slave_p1_w)
|
|
AM_RANGE(M6801_PORT2, M6801_PORT2) AM_READWRITE(slave_p2_r, slave_p2_w)
|
|
AM_RANGE(M6801_PORT3, M6801_PORT3) AM_READWRITE(slave_p3_r, slave_p3_w)
|
|
AM_RANGE(M6801_PORT4, M6801_PORT4) AM_READWRITE(slave_p4_r, slave_p4_w)
|
|
ADDRESS_MAP_END
|
|
|
|
|
|
|
|
//**************************************************************************
|
|
// INPUT PORTS
|
|
//**************************************************************************
|
|
|
|
//-------------------------------------------------
|
|
// INPUT_PORTS( hx20 )
|
|
//-------------------------------------------------
|
|
|
|
static INPUT_PORTS_START( hx20 )
|
|
PORT_START("KSC0")
|
|
PORT_BIT( 0x0001, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_0) PORT_CHAR('0') PORT_CHAR('_')
|
|
PORT_BIT( 0x0002, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_1) PORT_CHAR('1') PORT_CHAR('!')
|
|
PORT_BIT( 0x0004, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_2) PORT_CHAR('2') PORT_CHAR('\"')
|
|
PORT_BIT( 0x0008, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_3) PORT_CHAR('3') PORT_CHAR('#')
|
|
PORT_BIT( 0x0010, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_4) PORT_CHAR('4') PORT_CHAR('$')
|
|
PORT_BIT( 0x0020, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_5) PORT_CHAR('5') PORT_CHAR('%')
|
|
PORT_BIT( 0x0040, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_6) PORT_CHAR('6') PORT_CHAR('&')
|
|
PORT_BIT( 0x0080, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_7) PORT_CHAR('7') PORT_CHAR('\'')
|
|
PORT_BIT( 0x0100, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("PF1") PORT_CODE(KEYCODE_F1) PORT_CHAR(UCHAR_MAMEKEY(F1))
|
|
PORT_BIT( 0x0200, IP_ACTIVE_LOW, IPT_SPECIAL ) // SW6:1
|
|
PORT_BIT( 0xfc00, IP_ACTIVE_LOW, IPT_UNUSED )
|
|
|
|
PORT_START("KSC1")
|
|
PORT_BIT( 0x0001, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_8) PORT_CHAR('8') PORT_CHAR('(')
|
|
PORT_BIT( 0x0002, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_9) PORT_CHAR('9') PORT_CHAR(')')
|
|
PORT_BIT( 0x0004, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CHAR(':') PORT_CHAR('*')
|
|
PORT_BIT( 0x0008, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CHAR(';') PORT_CHAR('+')
|
|
PORT_BIT( 0x0010, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CHAR(',') PORT_CHAR('<')
|
|
PORT_BIT( 0x0020, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CHAR('-') PORT_CHAR('=')
|
|
PORT_BIT( 0x0040, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CHAR('.') PORT_CHAR('>')
|
|
PORT_BIT( 0x0080, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CHAR('/') PORT_CHAR('?')
|
|
PORT_BIT( 0x0100, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("PF2") PORT_CODE(KEYCODE_F2) PORT_CHAR(UCHAR_MAMEKEY(F2))
|
|
PORT_BIT( 0x0200, IP_ACTIVE_LOW, IPT_SPECIAL ) // SW6:2
|
|
PORT_BIT( 0xfc00, IP_ACTIVE_LOW, IPT_UNUSED )
|
|
|
|
PORT_START("KSC2")
|
|
PORT_BIT( 0x0001, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CHAR('@') PORT_CHAR('^')
|
|
PORT_BIT( 0x0002, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_A) PORT_CHAR('a') PORT_CHAR('A')
|
|
PORT_BIT( 0x0004, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_B) PORT_CHAR('b') PORT_CHAR('B')
|
|
PORT_BIT( 0x0008, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_C) PORT_CHAR('c') PORT_CHAR('C')
|
|
PORT_BIT( 0x0010, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_D) PORT_CHAR('d') PORT_CHAR('D')
|
|
PORT_BIT( 0x0020, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_E) PORT_CHAR('e') PORT_CHAR('E')
|
|
PORT_BIT( 0x0040, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_F) PORT_CHAR('f') PORT_CHAR('F')
|
|
PORT_BIT( 0x0080, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_G) PORT_CHAR('g') PORT_CHAR('G')
|
|
PORT_BIT( 0x0100, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("PF3") PORT_CODE(KEYCODE_F3) PORT_CHAR(UCHAR_MAMEKEY(F3))
|
|
PORT_BIT( 0x0200, IP_ACTIVE_LOW, IPT_SPECIAL ) // SW6:3
|
|
PORT_BIT( 0xfc00, IP_ACTIVE_LOW, IPT_UNUSED )
|
|
|
|
PORT_START("KSC3")
|
|
PORT_BIT( 0x0001, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_H) PORT_CHAR('h') PORT_CHAR('H')
|
|
PORT_BIT( 0x0002, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_I) PORT_CHAR('i') PORT_CHAR('I')
|
|
PORT_BIT( 0x0004, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_J) PORT_CHAR('j') PORT_CHAR('J')
|
|
PORT_BIT( 0x0008, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_K) PORT_CHAR('k') PORT_CHAR('K')
|
|
PORT_BIT( 0x0010, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_L) PORT_CHAR('l') PORT_CHAR('L')
|
|
PORT_BIT( 0x0020, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_M) PORT_CHAR('m') PORT_CHAR('M')
|
|
PORT_BIT( 0x0040, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_N) PORT_CHAR('n') PORT_CHAR('N')
|
|
PORT_BIT( 0x0080, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_O) PORT_CHAR('o') PORT_CHAR('O')
|
|
PORT_BIT( 0x0100, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("PF4") PORT_CODE(KEYCODE_F4) PORT_CHAR(UCHAR_MAMEKEY(F4))
|
|
PORT_BIT( 0x0200, IP_ACTIVE_LOW, IPT_SPECIAL ) // SW6:4
|
|
PORT_BIT( 0xfc00, IP_ACTIVE_LOW, IPT_UNUSED )
|
|
|
|
PORT_START("KSC4")
|
|
PORT_BIT( 0x0001, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_P) PORT_CHAR('p') PORT_CHAR('P')
|
|
PORT_BIT( 0x0002, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_Q) PORT_CHAR('q') PORT_CHAR('Q')
|
|
PORT_BIT( 0x0004, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_R) PORT_CHAR('r') PORT_CHAR('R')
|
|
PORT_BIT( 0x0008, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_S) PORT_CHAR('s') PORT_CHAR('S')
|
|
PORT_BIT( 0x0010, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_T) PORT_CHAR('t') PORT_CHAR('T')
|
|
PORT_BIT( 0x0020, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_U) PORT_CHAR('u') PORT_CHAR('U')
|
|
PORT_BIT( 0x0040, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_V) PORT_CHAR('v') PORT_CHAR('V')
|
|
PORT_BIT( 0x0080, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_W) PORT_CHAR('w') PORT_CHAR('W')
|
|
PORT_BIT( 0x0100, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("PF5") PORT_CODE(KEYCODE_F5) PORT_CHAR(UCHAR_MAMEKEY(F5))
|
|
PORT_BIT( 0x0200, IP_ACTIVE_LOW, IPT_UNUSED )
|
|
PORT_BIT( 0xfc00, IP_ACTIVE_LOW, IPT_UNUSED )
|
|
|
|
PORT_START("KSC5")
|
|
PORT_BIT( 0x0001, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_X) PORT_CHAR('x') PORT_CHAR('X')
|
|
PORT_BIT( 0x0002, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_Y) PORT_CHAR('y') PORT_CHAR('Y')
|
|
PORT_BIT( 0x0004, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CODE(KEYCODE_Z) PORT_CHAR('z') PORT_CHAR('Z')
|
|
PORT_BIT( 0x0008, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CHAR('[') PORT_CHAR('{')
|
|
PORT_BIT( 0x0010, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CHAR(']') PORT_CHAR('}')
|
|
PORT_BIT( 0x0020, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_CHAR('\\') PORT_CHAR('|')
|
|
PORT_BIT( 0x0040, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME(UTF8_LEFT" "UTF8_UP) PORT_CODE(KEYCODE_LEFT) PORT_CHAR(UCHAR_MAMEKEY(LEFT))
|
|
PORT_BIT( 0x0080, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME(UTF8_RIGHT" "UTF8_DOWN) PORT_CODE(KEYCODE_RIGHT) PORT_CHAR(UCHAR_MAMEKEY(RIGHT))
|
|
PORT_BIT( 0x0100, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("PAPER FEED")
|
|
PORT_BIT( 0x0200, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("SHIFT") PORT_CODE(KEYCODE_LSHIFT) PORT_CODE(KEYCODE_RSHIFT) PORT_CHAR(UCHAR_SHIFT_1)
|
|
PORT_BIT( 0xfc00, IP_ACTIVE_LOW, IPT_UNUSED )
|
|
|
|
PORT_START("KSC6")
|
|
PORT_BIT( 0x0001, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("RETURN") PORT_CODE(KEYCODE_ENTER) PORT_CHAR('\r')
|
|
PORT_BIT( 0x0002, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("Space") PORT_CODE(KEYCODE_SPACE) PORT_CHAR(' ')
|
|
PORT_BIT( 0x0004, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("TAB") PORT_CODE(KEYCODE_TAB) PORT_CHAR('\t')
|
|
PORT_BIT( 0x0008, IP_ACTIVE_LOW, IPT_UNUSED )
|
|
PORT_BIT( 0x0010, IP_ACTIVE_LOW, IPT_UNUSED )
|
|
PORT_BIT( 0x0020, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("NUM")
|
|
PORT_BIT( 0x0040, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("GRPH")
|
|
PORT_BIT( 0x0080, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("CAPS LOCK") PORT_CODE(KEYCODE_CAPSLOCK) PORT_CHAR(UCHAR_MAMEKEY(CAPSLOCK))
|
|
PORT_BIT( 0x0100, IP_ACTIVE_LOW, IPT_UNUSED )
|
|
PORT_BIT( 0x0200, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("CTRL") PORT_CODE(KEYCODE_LCONTROL) PORT_CHAR(UCHAR_MAMEKEY(LCONTROL))
|
|
PORT_BIT( 0xfc00, IP_ACTIVE_LOW, IPT_UNUSED )
|
|
|
|
PORT_START("KSC7")
|
|
PORT_BIT( 0x0001, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("HOME CLR") PORT_CODE(KEYCODE_HOME) PORT_CHAR(UCHAR_MAMEKEY(HOME))
|
|
PORT_BIT( 0x0002, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("SCRN")
|
|
PORT_BIT( 0x0004, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("BREAK")
|
|
PORT_BIT( 0x0008, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("PAUSE")
|
|
PORT_BIT( 0x0010, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("INS DEL") PORT_CODE(KEYCODE_DEL) PORT_CHAR(UCHAR_MAMEKEY(DEL))
|
|
PORT_BIT( 0x0020, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("MENU")
|
|
PORT_BIT( 0x0040, IP_ACTIVE_LOW, IPT_UNUSED )
|
|
PORT_BIT( 0x0080, IP_ACTIVE_LOW, IPT_UNUSED )
|
|
PORT_BIT( 0x0100, IP_ACTIVE_LOW, IPT_UNUSED )
|
|
PORT_BIT( 0x0200, IP_ACTIVE_LOW, IPT_KEYBOARD ) PORT_NAME("PRTR ON/OFF")
|
|
PORT_BIT( 0xfc00, IP_ACTIVE_LOW, IPT_UNUSED )
|
|
|
|
PORT_START("SW6")
|
|
PORT_DIPNAME( 0x07, 0x07, "Country" ) PORT_DIPLOCATION("SW6:1,2,3")
|
|
PORT_DIPSETTING( 0x00, "Spain" )
|
|
PORT_DIPSETTING( 0x01, "Italy" )
|
|
PORT_DIPSETTING( 0x02, "Sweden" )
|
|
PORT_DIPSETTING( 0x03, "Denmark" )
|
|
PORT_DIPSETTING( 0x04, "England" )
|
|
PORT_DIPSETTING( 0x05, "Germany" )
|
|
PORT_DIPSETTING( 0x06, "France" )
|
|
PORT_DIPSETTING( 0x07, "America" )
|
|
PORT_DIPNAME( 0x08, 0x00, "Floppy Drive TF-20" ) PORT_DIPLOCATION("SW6:4")
|
|
PORT_DIPSETTING( 0x00, "Installed" )
|
|
PORT_DIPSETTING( 0x08, "Not Installed" )
|
|
INPUT_PORTS_END
|
|
|
|
|
|
//-------------------------------------------------
|
|
// INPUT_PORTS( hx20e )
|
|
//-------------------------------------------------
|
|
|
|
static INPUT_PORTS_START( hx20e )
|
|
PORT_INCLUDE(hx20)
|
|
|
|
PORT_MODIFY("SW6")
|
|
PORT_DIPNAME( 0x07, 0x00, "Country" ) PORT_DIPLOCATION("SW6:1,2,3")
|
|
PORT_DIPSETTING( 0x00, "Sweden (ASCII)" )
|
|
PORT_DIPSETTING( 0x01, "Germany (ASCII)" )
|
|
PORT_DIPSETTING( 0x02, "France (ASCII)" )
|
|
PORT_DIPSETTING( 0x03, "Denmark" )
|
|
PORT_DIPSETTING( 0x04, "Sweden" )
|
|
PORT_DIPSETTING( 0x05, "Germany" )
|
|
PORT_DIPSETTING( 0x06, "France" )
|
|
PORT_DIPSETTING( 0x07, "Norway" )
|
|
INPUT_PORTS_END
|
|
|
|
|
|
|
|
//**************************************************************************
|
|
// DEVICE CONFIGURATION
|
|
//**************************************************************************
|
|
|
|
//-------------------------------------------------
|
|
// mc146818_interface rtc_intf
|
|
//-------------------------------------------------
|
|
|
|
WRITE_LINE_MEMBER( hx20_state::rtc_irq_w )
|
|
{
|
|
m_rtc_irq = state;
|
|
|
|
update_interrupt();
|
|
}
|
|
|
|
|
|
//-------------------------------------------------
|
|
// rs232_port_interface rs232_intf
|
|
//-------------------------------------------------
|
|
|
|
static const rs232_port_interface rs232_intf =
|
|
{
|
|
DEVCB_NULL,
|
|
DEVCB_NULL,
|
|
DEVCB_NULL,
|
|
DEVCB_NULL,
|
|
DEVCB_NULL
|
|
};
|
|
|
|
|
|
|
|
//**************************************************************************
|
|
// VIDEO
|
|
//**************************************************************************
|
|
|
|
//-------------------------------------------------
|
|
// PALETTE_INIT( hx20 )
|
|
//-------------------------------------------------
|
|
|
|
void hx20_state::palette_init()
|
|
{
|
|
palette_set_color_rgb(machine(), 0, 0xa5, 0xad, 0xa5);
|
|
palette_set_color_rgb(machine(), 1, 0x31, 0x39, 0x10);
|
|
}
|
|
|
|
|
|
//-------------------------------------------------
|
|
// SCREEN_UPDATE( hx20 )
|
|
//-------------------------------------------------
|
|
|
|
UINT32 hx20_state::screen_update(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect)
|
|
{
|
|
m_lcdc0->screen_update(screen, bitmap, cliprect);
|
|
m_lcdc1->screen_update(screen, bitmap, cliprect);
|
|
m_lcdc2->screen_update(screen, bitmap, cliprect);
|
|
m_lcdc3->screen_update(screen, bitmap, cliprect);
|
|
m_lcdc4->screen_update(screen, bitmap, cliprect);
|
|
m_lcdc5->screen_update(screen, bitmap, cliprect);
|
|
|
|
return 0;
|
|
}
|
|
|
|
|
|
|
|
//**************************************************************************
|
|
// MACHINE INITIALIZATION
|
|
//**************************************************************************
|
|
|
|
//-------------------------------------------------
|
|
// MACHINE_START( hx20 )
|
|
//-------------------------------------------------
|
|
|
|
void hx20_state::machine_start()
|
|
{
|
|
// state saving
|
|
save_item(NAME(m_slave_rx));
|
|
save_item(NAME(m_slave_tx));
|
|
save_item(NAME(m_slave_flag));
|
|
save_item(NAME(m_ksc));
|
|
save_item(NAME(m_kbrequest));
|
|
save_item(NAME(m_lcd_data));
|
|
}
|
|
|
|
|
|
|
|
//**************************************************************************
|
|
// MACHINE CONFIGURATION
|
|
//**************************************************************************
|
|
|
|
//-------------------------------------------------
|
|
// MACHINE_CONFIG( hx20 )
|
|
//-------------------------------------------------
|
|
|
|
static MACHINE_CONFIG_START( hx20, hx20_state )
|
|
// basic machine hardware
|
|
MCFG_CPU_ADD(HD6301V1_MAIN_TAG, HD63701, XTAL_2_4576MHz)
|
|
MCFG_CPU_PROGRAM_MAP(hx20_mem)
|
|
MCFG_CPU_IO_MAP(hx20_io)
|
|
|
|
MCFG_CPU_ADD(HD6301V1_SLAVE_TAG, HD63701, XTAL_2_4576MHz)
|
|
MCFG_CPU_PROGRAM_MAP(hx20_sub_mem)
|
|
MCFG_CPU_IO_MAP(hx20_sub_io)
|
|
|
|
// video hardware
|
|
MCFG_DEFAULT_LAYOUT(layout_lcd)
|
|
MCFG_SCREEN_ADD(SCREEN_TAG, LCD)
|
|
MCFG_SCREEN_REFRESH_RATE(50)
|
|
MCFG_SCREEN_VBLANK_TIME(ATTOSECONDS_IN_USEC(2500))
|
|
MCFG_SCREEN_SIZE(120, 32)
|
|
MCFG_SCREEN_VISIBLE_AREA(0, 120-1, 0, 32-1)
|
|
MCFG_SCREEN_UPDATE_DRIVER(hx20_state, screen_update)
|
|
MCFG_PALETTE_LENGTH(2)
|
|
MCFG_UPD7227_ADD(UPD7227_0_TAG, 0, 0)
|
|
MCFG_UPD7227_ADD(UPD7227_1_TAG, 40, 0)
|
|
MCFG_UPD7227_ADD(UPD7227_2_TAG, 80, 0)
|
|
MCFG_UPD7227_ADD(UPD7227_3_TAG, 0, 16)
|
|
MCFG_UPD7227_ADD(UPD7227_4_TAG, 40, 16)
|
|
MCFG_UPD7227_ADD(UPD7227_5_TAG, 80, 16)
|
|
|
|
// sound hardware
|
|
MCFG_SPEAKER_STANDARD_MONO("mono")
|
|
MCFG_SOUND_ADD(SPEAKER_TAG, SPEAKER_SOUND, 0)
|
|
MCFG_SOUND_ROUTE(ALL_OUTPUTS, "mono", 0.25)
|
|
|
|
// devices
|
|
MCFG_MC146818_IRQ_ADD(MC146818_TAG, MC146818_STANDARD, WRITELINE(hx20_state, rtc_irq_w))
|
|
MCFG_RS232_PORT_ADD(RS232_TAG, rs232_intf, default_rs232_devices, NULL)
|
|
MCFG_CASSETTE_ADD(CASSETTE_TAG, default_cassette_interface)
|
|
MCFG_EPSON_SIO_ADD("sio", "tf20")
|
|
|
|
// internal ram
|
|
MCFG_RAM_ADD(RAM_TAG)
|
|
MCFG_RAM_DEFAULT_SIZE("16K")
|
|
MCFG_RAM_EXTRA_OPTIONS("32K")
|
|
|
|
// software lists
|
|
MCFG_SOFTWARE_LIST_ADD("flop_list", "hx20_flop")
|
|
MACHINE_CONFIG_END
|
|
|
|
|
|
|
|
//**************************************************************************
|
|
// ROMS
|
|
//**************************************************************************
|
|
|
|
//-------------------------------------------------
|
|
// ROM( hx20 )
|
|
//-------------------------------------------------
|
|
|
|
ROM_START( ehx20 )
|
|
ROM_REGION( 0x8000, HD6301V1_MAIN_TAG, ROMREGION_ERASEFF )
|
|
ROM_DEFAULT_BIOS( "v11" )
|
|
ROM_SYSTEM_BIOS( 0, "v10", "version 1.0" )
|
|
ROMX_LOAD( "hx20_v10.12e", 0x0000, 0x2000, CRC(ed7482c6) SHA1(8fba63037f2418aee9e933a353b052a5ed816ead), ROM_BIOS(1) )
|
|
ROMX_LOAD( "hx20_v10.13e", 0x2000, 0x2000, CRC(f5cc8868) SHA1(3248a1ddf0d8df7e9f2fe96955385218d760c4ad), ROM_BIOS(1) )
|
|
ROMX_LOAD( "hx20_v10.14e", 0x4000, 0x2000, CRC(27d743ed) SHA1(ebae367b0fa5f42ac78424df2534312296fd6fdc), ROM_BIOS(1) )
|
|
ROMX_LOAD( "hx20_v10.15e", 0x6000, 0x2000, CRC(33fbb1ab) SHA1(292ace94b4dad267aa7786dc64e68ac6f3c98aa7), ROM_BIOS(1) )
|
|
ROM_SYSTEM_BIOS( 1, "v11", "version 1.1" )
|
|
ROMX_LOAD( "hx20_v11.12e", 0x0000, 0x2000, CRC(4de0b4b6) SHA1(f15c537824b7effde9d9b9a21e92a081fb089371), ROM_BIOS(2) )
|
|
ROMX_LOAD( "hx20_v11.13e", 0x2000, 0x2000, CRC(10d6ae76) SHA1(3163954ed9981f70f590ee98bcc8e19e4be6527a), ROM_BIOS(2) )
|
|
ROMX_LOAD( "hx20_v11.14e", 0x4000, 0x2000, CRC(26c203a1) SHA1(b282d7233b2689820fcf718dbe1e93d623b67e4f), ROM_BIOS(2) )
|
|
ROMX_LOAD( "hx20_v11.15e", 0x6000, 0x2000, CRC(101cb3e8) SHA1(e0b5cf107a9387e34a0e46f54328b89696c0bdc5), ROM_BIOS(2) )
|
|
|
|
ROM_REGION( 0x1000, HD6301V1_SLAVE_TAG, 0 )
|
|
ROM_LOAD( "hd6301v1.6d", 0x0000, 0x1000, CRC(b36f5b99) SHA1(c6b54163bb268e4f4f5c79aa2e83ec51f775b16a) )
|
|
ROM_END
|
|
|
|
|
|
//-------------------------------------------------
|
|
// ROM( hx20e )
|
|
//-------------------------------------------------
|
|
|
|
ROM_START( ehx20e )
|
|
ROM_REGION( 0x8000, HD6301V1_MAIN_TAG, ROMREGION_ERASEFF )
|
|
ROMX_LOAD( "hx20_v11e.12e", 0x0000, 0x2000, CRC(4de0b4b6) SHA1(f15c537824b7effde9d9b9a21e92a081fb089371), ROM_BIOS(3) )
|
|
ROMX_LOAD( "hx20_v11e.13e", 0x2000, 0x2000, CRC(10d6ae76) SHA1(3163954ed9981f70f590ee98bcc8e19e4be6527a), ROM_BIOS(3) )
|
|
ROMX_LOAD( "hx20_v11e.14e", 0x4000, 0x2000, CRC(26c203a1) SHA1(b282d7233b2689820fcf718dbe1e93d623b67e4f), ROM_BIOS(3) )
|
|
ROMX_LOAD( "hx20_v11e.15e", 0x6000, 0x2000, CRC(fd339aa5) SHA1(860c3579c45e96c5e6a877f4fbe77abacb0d674e), ROM_BIOS(3) )
|
|
|
|
ROM_REGION( 0x1000, HD6301V1_SLAVE_TAG, 0 )
|
|
ROM_LOAD( "hd6301v1.6d", 0x0000, 0x1000, CRC(b36f5b99) SHA1(c6b54163bb268e4f4f5c79aa2e83ec51f775b16a) )
|
|
ROM_END
|
|
|
|
|
|
|
|
//**************************************************************************
|
|
// SYSTEM DRIVERS
|
|
//**************************************************************************
|
|
|
|
// YEAR NAME PARENT COMPAT MACHINE INPUT INIT COMPANY FULLNAME FLAGS
|
|
COMP( 1983, ehx20, 0, 0, hx20, hx20, driver_device, 0, "Epson", "Epson HX-20", GAME_NOT_WORKING )
|
|
COMP( 1983, ehx20e, ehx20, 0, hx20, hx20e, driver_device, 0, "Epson", "Epson HX-20 (Europe)", GAME_NOT_WORKING )
|