// license:GPL-2.0+
// copyright-holders: Felipe Sanches
/***************************************************************************
icatel - Brazilian public payphone
manufactured by icatel http://www.icatel.com.br/
Partial schematics (drawn based on PCB inspection) available at:
https://github.com/garoa/Icatel/blob/master/doc/icatel.pdf
Driver by Felipe Sanches <juca@members.fsf.org>
Changelog:
2014 DEC 14 [Felipe Sanches]:
* Initial driver skeleton
***************************************************************************/
#include "emu.h"
#include "cpu/mcs51/mcs51.h"
#include "video/hd44780.h"
//#include "sound/speaker.h"
#include "debugger.h"
#include "emupal.h"
#include "screen.h"
class icatel_state : public driver_device
{
public:
icatel_state(const machine_config &mconfig, device_type type, const char *tag)
: driver_device(mconfig, type, tag)
, m_maincpu(*this, "maincpu")
, m_lcdc(*this, "hd44780")
{ }
void icatel(machine_config &config);
void init_icatel();
protected:
virtual void machine_start() override;
virtual void machine_reset() override;
private:
uint8_t magic_string(offs_t offset);
uint8_t i80c31_p1_r();
uint8_t i80c31_p3_r();
void i80c31_p1_w(uint8_t data);
void i80c31_p3_w(uint8_t data);
uint8_t cn8_extension_r();
void cn8_extension_w(uint8_t data);
uint8_t modem_r(offs_t offset);
void modem_w(offs_t offset, uint8_t data);
void ci8_w(uint8_t data);
void ci12_w(uint8_t data);
uint8_t ci15_r();
void ci16_w(uint8_t data);
void icatel_palette(palette_device &palette) const;
HD44780_PIXEL_UPDATE(icatel_pixel_update);
void i80c31_data(address_map &map);
void i80c31_io(address_map &map);
void i80c31_prg(address_map &map);
required_device<i80c31_device> m_maincpu;
required_device<hd44780_device> m_lcdc;
};
void icatel_state::i80c31_prg(address_map &map)
{
map(0x0000, 0x7FFF).mirror(0x8000).rom();
}
void icatel_state::i80c31_io(address_map &map)
{
map(0x0000, 0x3FFF).ram();
map(0x8000, 0x8001).mirror(0x3F3C).w(m_lcdc, FUNC(hd44780_device::write));
map(0x8002, 0x8003).mirror(0x3F3C).r(m_lcdc, FUNC(hd44780_device::read));
map(0x8040, 0x8040).mirror(0x3F1F).w(FUNC(icatel_state::ci12_w)); // 74LS273
map(0x8060, 0x8060).mirror(0x3F1F).w(FUNC(icatel_state::ci8_w));
map(0x8080, 0x8080).mirror(0x3F1F).w(FUNC(icatel_state::ci16_w)); // card reader (?)
map(0x80C0, 0x80C0).mirror(0x3F1F).r(FUNC(icatel_state::ci15_r)); // 74LS244 (tristate buffer)
map(0xC000, 0xCFFF).rw(FUNC(icatel_state::cn8_extension_r), FUNC(icatel_state::cn8_extension_w));
map(0xE000, 0xE0FF).mirror(0xF00).rw(FUNC(icatel_state::modem_r), FUNC(icatel_state::modem_w));
}
void icatel_state::i80c31_data(address_map &map)
{
// map(0x0056,0x005A).r(FUNC(icatel_state::magic_string)); /* This is a hack! */
}
void icatel_state::init_icatel()
{
}
void icatel_state::machine_start()
{
}
void icatel_state::machine_reset()
{
}
uint8_t icatel_state::magic_string(offs_t offset)
{
// logerror("read: magic_string, offset=%04X\n", offset);
char mstr[] = "TP-OK";
return mstr[offset%5];
}
uint8_t icatel_state::i80c31_p1_r()
{
return 0x7f;
}
uint8_t icatel_state::i80c31_p3_r()
{
return 0xff;
}
void icatel_state::i80c31_p1_w(uint8_t data)
{
}
void icatel_state::i80c31_p3_w(uint8_t data)
{
}
//----------------------------------------
uint8_t icatel_state::cn8_extension_r()
{
/* TODO: Implement-me! */
logerror("read: cn8_extension\n");
return 0;
}
void icatel_state::cn8_extension_w(uint8_t data)
{
/* TODO: Implement-me! */
logerror("write: cn8_extension [%02x]\n", data);
}
//----------------------------------------
uint8_t icatel_state::modem_r(offs_t offset)
{
/* TODO: Implement-me! */
logerror("read: modem\n");
return 0;
}
void icatel_state::modem_w(offs_t offset, uint8_t data)
{
/* TODO: Implement-me! */
logerror("write: modem %02x:[%02x]\n", offset, data);
}
//----------------------------------------
void icatel_state::ci8_w(uint8_t data)
{
/* TODO: Implement-me! */
logerror("write: ci8 [%02x]\n", data);
}
//----------------------------------------
void icatel_state::ci12_w(uint8_t data)
{
/* TODO: Implement-me! */
logerror("write: ci12 [%02x]\n", data);
}
//----------------------------------------
uint8_t icatel_state::ci15_r()
{
/* TODO: Implement-me! */
//machine().debug_break();
//logerror("read: ci15\n");
return (1 << 3) | (1 << 0);
}
//----------------------------------------
void icatel_state::ci16_w(uint8_t data)
{
/* TODO: Implement-me! */
// seems to be the card reader.
logerror("write: ci16 [%02x]\n", data);
}
//----------------------------------------
void icatel_state::icatel_palette(palette_device &palette) const
{
palette.set_pen_color(0, rgb_t(138, 146, 148));
palette.set_pen_color(1, rgb_t(92, 83, 88));
}
static const gfx_layout 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( gfx_icatel )
GFXDECODE_ENTRY( "hd44780:cgrom", 0x0000, prot_charlayout, 0, 1 )
GFXDECODE_END
HD44780_PIXEL_UPDATE(icatel_state::icatel_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;
}
}
void icatel_state::icatel(machine_config &config)
{
/* basic machine hardware */
I80C31(config, m_maincpu, XTAL(2'097'152));
m_maincpu->set_addrmap(AS_PROGRAM, &icatel_state::i80c31_prg);
m_maincpu->set_addrmap(AS_DATA, &icatel_state::i80c31_data);
m_maincpu->set_addrmap(AS_IO, &icatel_state::i80c31_io);
m_maincpu->port_in_cb<1>().set(FUNC(icatel_state::i80c31_p1_r));
m_maincpu->port_out_cb<1>().set(FUNC(icatel_state::i80c31_p1_w));
m_maincpu->port_in_cb<3>().set(FUNC(icatel_state::i80c31_p3_r));
m_maincpu->port_out_cb<3>().set(FUNC(icatel_state::i80c31_p3_w));
/* video hardware */
screen_device &screen(SCREEN(config, "screen", SCREEN_TYPE_LCD));
screen.set_refresh_hz(50);
screen.set_vblank_time(ATTOSECONDS_IN_USEC(2500)); /* not accurate */
screen.set_screen_update("hd44780", FUNC(hd44780_device::screen_update));
screen.set_size(6*16, 9*2);
screen.set_visarea(0, 6*16-1, 0, 9*2-1);
screen.set_palette("palette");
PALETTE(config, "palette", FUNC(icatel_state::icatel_palette), 2);
GFXDECODE(config, "gfxdecode", "palette", gfx_icatel);
HD44780(config, m_lcdc, 0);
m_lcdc->set_lcd_size(2, 16);
m_lcdc->set_pixel_update_cb(FUNC(icatel_state::icatel_pixel_update));
}
ROM_START( icatel )
ROM_REGION( 0x8000, "maincpu", 0 )
ROM_LOAD( "icatel_tpci_em._4_v16.05.ci14", 0x00000, 0x8000, CRC(d310586e) SHA1(21736ad5a06cf9695f8cc5ff2dc2d19b101504f5) )
ROM_END
// YEAR NAME PARENT COMPAT MACHINE INPUT CLASS INIT COMPANY FULLNAME FLAGS
COMP( 1995, icatel, 0, 0, icatel, 0, icatel_state, init_icatel, "Icatel", "TPCI (Brazilian public payphone)", MACHINE_IMPERFECT_GRAPHICS | MACHINE_NO_SOUND)
/*The hardware was clearly manufactured in 1995. There's no evindence of the actual date of the firmware.*/