diff options
Diffstat (limited to 'src/mame/drivers/hprot1.cpp')
-rw-r--r-- | src/mame/drivers/hprot1.cpp | 381 |
1 files changed, 381 insertions, 0 deletions
diff --git a/src/mame/drivers/hprot1.cpp b/src/mame/drivers/hprot1.cpp new file mode 100644 index 00000000000..6cff402b711 --- /dev/null +++ b/src/mame/drivers/hprot1.cpp @@ -0,0 +1,381 @@ +// license:GPL-2.0+ +// copyright-holders: Felipe Sanches +/*************************************************************************** + + HENRY Prot I/II - brazilian document timestamp printers + http://www.dataponto.com.br/protocoladores-prot1.html + + Driver by Felipe Sanches + Technical info at https://www.garoa.net.br/wiki/HENRY + + Changelog: + + 2014 JUN 13 [Felipe Sanches]: + * new derivative "CARD I PCB rev.08A" + * new derivative "CARD II PCB rev.6" + * fixed LCD rendering (now both lines are displayed properly) + * inverted logic of the inputs so that now we can navigate the menu + + 2014 JAN 03 [Felipe Sanches]: + * Initial driver skeleton + * Address lines bitswaping + * LCD works. We can see boot messages. + * Inputs are not working correctly + +TO-DO list: + +======= hprotr8a =========== +Loops during boot displaying an error message related to low power supply voltage. +We need to emulate the ADM695AN chip (Microprocessor Supervisory Circuits) in order to properly boot the device. + +======= hprot2r6 =========== +There are unhandled memory writes at 0xE000 and 0xA000 + +LCD commands are sent, but nothing shows up on screen. +The commands sent are supposed to display the message: + +"*Pouca Energia*" (LCD cmds range: 80-8F) (cmds logged but not displayed on screen) +"* no Sistema *" (LCD cmds range: C0-CF) (cmds logged but not displayed on screen) + +which means something like "too little energy for the system to operate". +We need to emulate the ADM695AN chip (Microprocessor Supervisory Circuits) in order to properly boot the device. + +Infinite loop is reached at address 0x7699 +======= hprot1 =========== + + There seems to be an eeprom or a realtime clock placed at U2 (DIP8): + pin1 -> 8031 pin 14 (T0: Timer 0 external input) + pin2 -> crystal at X2 (labeled 32.768) + pin3 -> ? + pin4 -> GND + pin5 -> ? + pin6 -> 8031 pin 5 (Port 1 bit 4) + pin7 -> 8031 pin 4 (Port 1 bit 3) + pin8 -> VCC + +****************************************************************************/ + +#include "emu.h" +#include "cpu/mcs51/mcs51.h" +#include "video/hd44780.h" +#include "sound/speaker.h" +#include "rendlay.h" + +class hprot1_state : public driver_device +{ +public: + hprot1_state(const machine_config &mconfig, device_type type, const char *tag) + : driver_device(mconfig, type, tag) + , m_maincpu(*this, "maincpu") + , m_lcdc(*this, "hd44780") + { } + + //DECLARE_WRITE8_MEMBER(henry_io_w); + DECLARE_READ8_MEMBER(henry_io_r); + DECLARE_DRIVER_INIT(hprot1); + DECLARE_PALETTE_INIT(hprot1); +private: + virtual void machine_start(); + virtual void machine_reset(); + required_device<cpu_device> m_maincpu; + required_device<hd44780_device> m_lcdc; +}; + +#define LOG_IO_PORTS 0 + +static ADDRESS_MAP_START(i80c31_prg, AS_PROGRAM, 8, hprot1_state) + AM_RANGE(0x0000, 0xffff) AM_ROM +ADDRESS_MAP_END + +DRIVER_INIT_MEMBER( hprot1_state, hprot1 ) +{ + int i; + UINT8 *ROM = memregion("maincpu")->base(); + UINT8 bitswapped_ROM[0x10000]; + + for(i=0x0000;i<0x10000;i++) + bitswapped_ROM[i] = ROM[i]; + + for(i=0x0000;i<0x10000;i++) + ROM[BITSWAP16(i, 15, 14, 13, 12, 11, 10, 9, 8, 3, 2, 1, 0, 4, 5, 6, 7)] = bitswapped_ROM[i]; +} + +//A4 = display RS +//A5 = display R/W +//(A11 == 0) && (A10 == 0) => display CS +//(A14 == 1) && (A15 == 1) => enable signal for the mux that selects peripherals +//11?? 00?? ??00 ???? write data +//11?? 00?? ??01 ???? write command +//11?? 00?? ??10 ???? read data +//11?? 00?? ??11 ???? read command +//mirror=0x33cf + +//write: 0xc400 => U12 (74373 - possibly for the dot matrix printhead ?) +//write: 0xc800 => U11 (74373 - possibly for the dot matrix printhead ?) +//read: 0xc020 => display +//write: 0xc000 => display +//write: 0xc010 => display + +//P1.4 => WhatchDog Input (after timeout resets CPU) + +static ADDRESS_MAP_START(i80c31_io, AS_IO, 8, hprot1_state) + AM_RANGE(0x0000,0x7fff) AM_RAM +/*TODO: verify the mirror mask value for the HD44780 device */ + AM_RANGE(0xc000,0xc000) AM_MIRROR(0x13cf) AM_DEVWRITE("hd44780", hd44780_device, control_write) + AM_RANGE(0xc010,0xc010) AM_MIRROR(0x13cf) AM_DEVWRITE("hd44780", hd44780_device, data_write) + AM_RANGE(0xc020,0xc020) AM_MIRROR(0x13cf) AM_DEVREAD("hd44780", hd44780_device, control_read) + AM_RANGE(0xc030,0xc030) AM_MIRROR(0x13cf) AM_DEVREAD("hd44780", hd44780_device, data_read) +/*TODO: attach the watchdog/brownout reset device: + AM_RANGE(0xe000,0xe0??) AM_MIRROR(?) AM_DEVREAD("adm965an", adm965an_device, data_read) */ + + //AM_RANGE(MCS51_PORT_P0, MCS51_PORT_P3) AM_READWRITE(henry_io_r, henry_io_w) + AM_RANGE(MCS51_PORT_P0, MCS51_PORT_P3) AM_READ(henry_io_r) +ADDRESS_MAP_END + +static INPUT_PORTS_START( hprot1 ) +/* FIXME: I am still unsure whether all these inputs are Active High or Active Low: */ + PORT_START("inputs") + PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_BUTTON1 ) PORT_NAME("Upper Black Button") PORT_CODE(KEYCODE_A) + PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_BUTTON2 ) PORT_NAME("Lower Black Button") PORT_CODE(KEYCODE_B) + PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_BUTTON3 ) PORT_NAME("Blue Button") PORT_CODE(KEYCODE_C) + PORT_BIT( 0x08, IP_ACTIVE_HIGH, IPT_UNUSED ) + PORT_BIT( 0x10, IP_ACTIVE_HIGH, IPT_UNUSED ) + PORT_BIT( 0x20, IP_ACTIVE_HIGH, IPT_BUTTON4 ) PORT_NAME("Paper Detector") PORT_CODE(KEYCODE_D) + PORT_BIT( 0x40, IP_ACTIVE_HIGH, IPT_BUTTON5 ) PORT_NAME("XMIN Endstop") PORT_CODE(KEYCODE_E) + PORT_BIT( 0x80, IP_ACTIVE_HIGH, IPT_UNUSED ) +INPUT_PORTS_END + +static INPUT_PORTS_START( hprot_jumpers ) +/* +There is a set of 3 jumpers that switch the communications circuitry between a +RS232 chip (U8: MAX232AN) and a differential bus transceiver (U7: SN65176BP) + +It seems that all three jumpers must select the same configuration: +eighter differential bus or RS232. +And I don't see yet how this could affect the emulation of the device, so, for now, I'll +simply leave this note here but not actually include this details in the driver code. + + PORT_START("jumpers") + PORT_DIPNAME( 0x01, 0x01, "TX") + PORT_DIPSETTING( 0x01, "differential bus") + PORT_DIPSETTING( 0x00, "RS232") + PORT_DIPNAME( 0x02, 0x02, "RX") + PORT_DIPSETTING( 0x02, "differential bus") + PORT_DIPSETTING( 0x00, "RS232") + PORT_DIPNAME( 0x04, 0x04, "CPU-TX") + PORT_DIPSETTING( 0x04, "differential bus") + PORT_DIPSETTING( 0x00, "RS232") +*/ +INPUT_PORTS_END + +/* TODO: meanings for the jumpers may be different among machines, + so we may have to have individual declarations for each board. */ +static INPUT_PORTS_START( hprot2r6 ) + PORT_INCLUDE(hprot1) + PORT_INCLUDE(hprot_jumpers) +INPUT_PORTS_END + +static INPUT_PORTS_START( hprotr8a ) + PORT_INCLUDE(hprot1) + PORT_INCLUDE(hprot_jumpers) +INPUT_PORTS_END + +void hprot1_state::machine_start() +{ +} + +void hprot1_state::machine_reset() +{ +} + +READ8_MEMBER(hprot1_state::henry_io_r) +{ + switch (offset) + { + case 0x01: + { + UINT8 value = ioport("inputs")->read(); +#if LOG_IO_PORTS + printf("value:%02X\n", value); +#endif + return value; + } + default: +#if LOG_IO_PORTS + printf("Unhandled I/O Read at offset 0x%02X (return 0)\n", offset); +#endif + return 0; + } +} + +/* +WRITE8_MEMBER(hprot1_state::henry_io_w) +{ + static UINT8 p0=0, p1=0, p2=0, p3=0; + switch (offset) + { + case 0x00: + { + if (data != p0) + { + p0=data; +#if LOG_IO_PORTS + printf("Write to P0: %02X\n", data); +#endif + } + break; + } + case 0x01: + { + if (data != p1) + { + p1=data; + if (data != 0xFF && data != 0xEF) +#if LOG_IO_PORTS + printf("Write to P1: %02X\n", data); +#endif + } + break; + } + case 0x02: + { + if (data != p2) + { + p2=data; +#if LOG_IO_PORTS + printf("Write to P2: %02X\n", data); +#endif + } + break; + } + case 0x03: + { + if (data != p3) + { + p3=data; +#if LOG_IO_PORTS + printf("Write to P3: %02X\n", data); +#endif + } + break; + } + } +} +*/ + +PALETTE_INIT_MEMBER(hprot1_state, hprot1) +{ + palette.set_pen_color(0, rgb_t(138, 146, 148)); + palette.set_pen_color(1, rgb_t(92, 83, 88)); +} + +static const gfx_layout henry_prot_charlayout = +{ + 5, 8, /* 5 x 8 characters */ + 256, /* 256 characters */ + 1, /* 1 bits per pixel */ + { 0 }, /* no bitplanes */ + { 3, 4, 5, 6, 7}, + { 0, 8, 2*8, 3*8, 4*8, 5*8, 6*8, 7*8}, + 8*8 /* 8 bytes */ +}; + +static GFXDECODE_START( hprot1 ) + GFXDECODE_ENTRY( "hd44780:cgrom", 0x0000, henry_prot_charlayout, 0, 1 ) +GFXDECODE_END + +static HD44780_PIXEL_UPDATE(hprot1_pixel_update) +{ + if ( pos < 16 && line==0 ) + { + bitmap.pix16(y, pos*6 + x) = state; + } + + if ( pos >= 64 && pos < 80 && line==0 ) + { + bitmap.pix16(y+9,(pos-64)*6 + x) = state; + } +} + +static MACHINE_CONFIG_START( hprot1, hprot1_state ) + /* basic machine hardware */ + MCFG_CPU_ADD("maincpu", I80C31, XTAL_10MHz) + MCFG_CPU_PROGRAM_MAP(i80c31_prg) + MCFG_CPU_IO_MAP(i80c31_io) + + /* video hardware */ + MCFG_SCREEN_ADD("screen", LCD) + MCFG_SCREEN_REFRESH_RATE(50) + MCFG_SCREEN_VBLANK_TIME(ATTOSECONDS_IN_USEC(2500)) /* not accurate */ + MCFG_SCREEN_UPDATE_DEVICE("hd44780", hd44780_device, screen_update) + MCFG_SCREEN_SIZE(6*16, 9*2) + MCFG_SCREEN_VISIBLE_AREA(0, 6*16-1, 0, 9*2-1) + MCFG_SCREEN_PALETTE("palette") + + MCFG_DEFAULT_LAYOUT(layout_lcd) + MCFG_PALETTE_ADD("palette", 2) + MCFG_PALETTE_INIT_OWNER(hprot1_state, hprot1) + MCFG_GFXDECODE_ADD("gfxdecode", "palette", hprot1) + + MCFG_HD44780_ADD("hd44780") + MCFG_HD44780_LCD_SIZE(2, 16) + MCFG_HD44780_PIXEL_UPDATE_CB(hprot1_pixel_update) + + /* TODO: figure out which RTC chip is in use. */ + + /* TODO: emulate the ADM695AN chip (watchdog/brownout reset)*/ +MACHINE_CONFIG_END + +static MACHINE_CONFIG_DERIVED( hprotr8a, hprot1 ) + MCFG_CPU_REPLACE("maincpu", I80C31, 11059200) // value of X1 cristal on the PCB + MCFG_CPU_PROGRAM_MAP(i80c31_prg) + MCFG_CPU_IO_MAP(i80c31_io) + + /* sound hardware */ + MCFG_SPEAKER_STANDARD_MONO("mono") + MCFG_SOUND_ADD("speaker", SPEAKER_SOUND, 0) + MCFG_SOUND_ROUTE(ALL_OUTPUTS, "mono", 0.50) + + /* TODO: add an RS232 interface (emulate MAX232N chip) + (the board has GND/VCC/RX/TX pins available in a connector) */ + + /* TODO: add an I2C interface (the board has GND/VCC/SDA/SCL pins available in a connector) */ +MACHINE_CONFIG_END + +static MACHINE_CONFIG_DERIVED( hprot2r6, hprot1 ) + MCFG_CPU_REPLACE("maincpu", I80C31, 11059200) // value of X1 cristal on the PCB + MCFG_CPU_PROGRAM_MAP(i80c31_prg) + MCFG_CPU_IO_MAP(i80c31_io) + + /* sound hardware */ + MCFG_SPEAKER_STANDARD_MONO("mono") + MCFG_SOUND_ADD("speaker", SPEAKER_SOUND, 0) + MCFG_SOUND_ROUTE(ALL_OUTPUTS, "mono", 0.50) + + /* TODO: add an RS232 interface (emulate MAX232N chip) */ +MACHINE_CONFIG_END + +ROM_START( hprot1 ) + ROM_REGION( 0x10000, "maincpu", 0 ) + ROM_LOAD( "henry_prot1_rev1_v19.bin", 0x00000, 0x10000, CRC(dd7787fd) SHA1(61a37dd406b3440d568bd6da75a9fdc8a0f0e1e3) ) +ROM_END + +ROM_START( hprotr8a ) + ROM_REGION( 0x10000, "maincpu", 0 ) + ROM_LOAD( "hprot_card1_rev08a.u2", 0x00000, 0x10000, CRC(e827480f) SHA1(bd53e6cce9a0832ca01f1a485ddaab43c0baa136) ) +ROM_END + +ROM_START( hprot2r6 ) + ROM_REGION( 0x10000, "maincpu", 0 ) + ROM_LOAD( "hprot_card2_rev6.u2", 0x00000, 0x10000, CRC(791f2425) SHA1(70af8911a27921cac6d98a5cd07602a7f59c2848) ) +ROM_END + +/* YEAR NAME PARENT COMPAT MACHINE INPUT CLASS INIT COMPANY FULLNAME FLAGS */ +COMP( 2002, hprot1, 0, 0, hprot1, hprot1, hprot1_state, hprot1, "HENRY", "Henry Prot I v19 (REV.1)", MACHINE_IMPERFECT_GRAPHICS | MACHINE_NO_SOUND) +/* fw version: "R19" Release date: February 1st, 2002. */ + +COMP( 2006, hprotr8a, hprot1, 0, hprotr8a, hprotr8a, hprot1_state, hprot1, "HENRY", "Henry Prot CARD I (REV.08A)", MACHINE_NOT_WORKING) +/* fw version: "V6.5QI I" Release date: September 18th, 2006. */ + +COMP( 2003, hprot2r6, hprot1, 0, hprot2r6, hprot2r6, hprot1_state, hprot1, "HENRY", "Henry Prot CARD II (REV.6)", MACHINE_NOT_WORKING) +/* fw version: "V5.8CF II" Release date: June 23rd, 2003. */ |