trunk/src/mess/drivers/ti630.c
| r0 | r31052 | |
| 1 | // license:MAME|GPL-2.0+ |
| 2 | // copyright-holders: Felipe Sanches |
| 3 | /*************************************************************************** |
| 4 | |
| 5 | Intelbras TI630 telephone |
| 6 | Driver by Felipe Correa da Silva Sanches <juca@members.fsf.org> |
| 7 | |
| 8 | http://images.quebarato.com.br/T440x/telefone+ks+ti+630+seminovo+intelbras+sao+paulo+sp+brasil__2E255D_1.jpg |
| 9 | |
| 10 | Changelog: |
| 11 | |
| 12 | 2014 JUN 17 [Felipe Sanches]: |
| 13 | * Initial driver skeleton |
| 14 | * LCD works |
| 15 | |
| 16 | ================ |
| 17 | Messages displayed on screen are in brazilian portuguese. |
| 18 | During boot, it says: |
| 19 | |
| 20 | "TI auto-test." |
| 21 | "Wait!" |
| 22 | |
| 23 | Then it says: |
| 24 | |
| 25 | "Initializing..." |
| 26 | "Wait!" |
| 27 | |
| 28 | And finally: |
| 29 | |
| 30 | "TI did not receive" |
| 31 | "the dial tone" |
| 32 | |
| 33 | It means we probably would have to emulate a modem device for it to treat communications with a PABX phone hub. |
| 34 | ================ |
| 35 | */ |
| 36 | |
| 37 | #include "emu.h" |
| 38 | #include "cpu/mcs51/mcs51.h" |
| 39 | #include "video/hd44780.h" |
| 40 | #include "rendlay.h" |
| 41 | |
| 42 | class ti630_state : public driver_device |
| 43 | { |
| 44 | public: |
| 45 | ti630_state(const machine_config &mconfig, device_type type, const char *tag) |
| 46 | : driver_device(mconfig, type, tag) |
| 47 | , m_maincpu(*this, "maincpu") |
| 48 | , m_lcdc(*this, "hd44780") |
| 49 | { } |
| 50 | |
| 51 | DECLARE_WRITE8_MEMBER(ti630_io_w); |
| 52 | DECLARE_READ8_MEMBER(ti630_io_r); |
| 53 | DECLARE_DRIVER_INIT(ti630); |
| 54 | DECLARE_PALETTE_INIT(ti630); |
| 55 | private: |
| 56 | virtual void machine_start(); |
| 57 | virtual void machine_reset(); |
| 58 | required_device<cpu_device> m_maincpu; |
| 59 | required_device<hd44780_device> m_lcdc; |
| 60 | }; |
| 61 | |
| 62 | #define LOG_IO_PORTS 0 |
| 63 | |
| 64 | static ADDRESS_MAP_START(i80c31_prg, AS_PROGRAM, 8, ti630_state) |
| 65 | AM_RANGE(0x0000, 0xffff) AM_ROM |
| 66 | ADDRESS_MAP_END |
| 67 | |
| 68 | DRIVER_INIT_MEMBER( ti630_state, ti630 ) |
| 69 | { |
| 70 | } |
| 71 | |
| 72 | static ADDRESS_MAP_START(i80c31_io, AS_IO, 8, ti630_state) |
| 73 | AM_RANGE(0x0000,0x0000) /*AM_MIRROR(?)*/ AM_DEVWRITE("hd44780", hd44780_device, control_write) |
| 74 | AM_RANGE(0x1000,0x1000) /*AM_MIRROR(?)*/ AM_DEVWRITE("hd44780", hd44780_device, data_write) |
| 75 | AM_RANGE(0x2000,0x2000) /*AM_MIRROR(?)*/ AM_DEVREAD("hd44780", hd44780_device, control_read) |
| 76 | AM_RANGE(0x8000,0xffff) AM_RAM /*TODO: verify the ammont of RAM and the correct address range to which it is mapped. This is just a first reasonable guess that apparently yields good results in the emulation */ |
| 77 | |
| 78 | AM_RANGE(MCS51_PORT_P0, MCS51_PORT_P3) AM_READWRITE(ti630_io_r, ti630_io_w) |
| 79 | ADDRESS_MAP_END |
| 80 | |
| 81 | void ti630_state::machine_start() |
| 82 | { |
| 83 | } |
| 84 | |
| 85 | void ti630_state::machine_reset() |
| 86 | { |
| 87 | } |
| 88 | |
| 89 | READ8_MEMBER(ti630_state::ti630_io_r) |
| 90 | { |
| 91 | switch (offset) |
| 92 | { |
| 93 | case 0x01: |
| 94 | { |
| 95 | UINT8 value = 0; |
| 96 | #if LOG_IO_PORTS |
| 97 | printf("P1 read value:%02X\n", value); |
| 98 | #endif |
| 99 | return value; |
| 100 | } |
| 101 | default: |
| 102 | #if LOG_IO_PORTS |
| 103 | printf("Unhandled I/O Read at offset 0x%02X (return 0)\n", offset); |
| 104 | #endif |
| 105 | return 0; |
| 106 | } |
| 107 | } |
| 108 | |
| 109 | WRITE8_MEMBER(ti630_state::ti630_io_w) |
| 110 | { |
| 111 | static UINT8 p0=0, p1=0, p2=0, p3=0; |
| 112 | switch (offset) |
| 113 | { |
| 114 | case 0x00: |
| 115 | { |
| 116 | if (data != p0) |
| 117 | { |
| 118 | p0=data; |
| 119 | #if LOG_IO_PORTS |
| 120 | printf("Write to P0: %02X\n", data); |
| 121 | #endif |
| 122 | } |
| 123 | break; |
| 124 | } |
| 125 | case 0x01: |
| 126 | { |
| 127 | if (data != p1) |
| 128 | { |
| 129 | p1=data; |
| 130 | #if LOG_IO_PORTS |
| 131 | printf("Write to P1: %02X\n", data); |
| 132 | #endif |
| 133 | } |
| 134 | break; |
| 135 | } |
| 136 | case 0x02: |
| 137 | { |
| 138 | if (data != p2) |
| 139 | { |
| 140 | p2=data; |
| 141 | #if LOG_IO_PORTS |
| 142 | printf("Write to P2: %02X\n", data); |
| 143 | #endif |
| 144 | } |
| 145 | break; |
| 146 | } |
| 147 | case 0x03: |
| 148 | { |
| 149 | if (data != p3) |
| 150 | { |
| 151 | p3=data; |
| 152 | #if LOG_IO_PORTS |
| 153 | printf("Write to P3: %02X\n", data); |
| 154 | #endif |
| 155 | } |
| 156 | break; |
| 157 | } |
| 158 | } |
| 159 | } |
| 160 | |
| 161 | PALETTE_INIT_MEMBER(ti630_state, ti630) |
| 162 | { |
| 163 | palette.set_pen_color(0, rgb_t(138, 146, 148)); |
| 164 | palette.set_pen_color(1, rgb_t(92, 83, 88)); |
| 165 | } |
| 166 | |
| 167 | static const gfx_layout ti630_charlayout = |
| 168 | { |
| 169 | 5, 8, /* 5 x 8 characters */ |
| 170 | 256, /* 256 characters */ |
| 171 | 1, /* 1 bits per pixel */ |
| 172 | { 0 }, /* no bitplanes */ |
| 173 | { 3, 4, 5, 6, 7}, |
| 174 | { 0, 8, 2*8, 3*8, 4*8, 5*8, 6*8, 7*8}, |
| 175 | 8*8 /* 8 bytes */ |
| 176 | }; |
| 177 | |
| 178 | static GFXDECODE_START( ti630 ) |
| 179 | GFXDECODE_ENTRY( "hd44780:cgrom", 0x0000, ti630_charlayout, 0, 1 ) |
| 180 | GFXDECODE_END |
| 181 | |
| 182 | static MACHINE_CONFIG_START( ti630, ti630_state ) |
| 183 | /* basic machine hardware */ |
| 184 | MCFG_CPU_ADD("maincpu", I80C31, XTAL_10MHz) |
| 185 | MCFG_CPU_PROGRAM_MAP(i80c31_prg) |
| 186 | MCFG_CPU_IO_MAP(i80c31_io) |
| 187 | |
| 188 | /* video hardware */ |
| 189 | MCFG_SCREEN_ADD("screen", LCD) |
| 190 | MCFG_SCREEN_REFRESH_RATE(50) |
| 191 | MCFG_SCREEN_VBLANK_TIME(ATTOSECONDS_IN_USEC(2500)) /* not accurate */ |
| 192 | MCFG_SCREEN_UPDATE_DEVICE("hd44780", hd44780_device, screen_update) |
| 193 | MCFG_SCREEN_SIZE(6*16, 9*2) |
| 194 | MCFG_SCREEN_VISIBLE_AREA(0, 6*16-1, 0, 9*2-1) |
| 195 | MCFG_SCREEN_PALETTE("palette") |
| 196 | |
| 197 | MCFG_DEFAULT_LAYOUT(layout_lcd) |
| 198 | MCFG_PALETTE_ADD("palette", 2) |
| 199 | MCFG_PALETTE_INIT_OWNER(ti630_state, ti630) |
| 200 | MCFG_GFXDECODE_ADD("gfxdecode", "palette", ti630) |
| 201 | |
| 202 | MCFG_HD44780_ADD("hd44780") |
| 203 | MCFG_HD44780_LCD_SIZE(2, 16) |
| 204 | MACHINE_CONFIG_END |
| 205 | |
| 206 | ROM_START( ti630 ) |
| 207 | ROM_REGION( 0x10000, "maincpu", 0 ) |
| 208 | ROM_LOAD( "ti630.ci11", 0x00000, 0x10000, CRC(2602cbdc) SHA1(98266bea52a5893e0af0b5872eca0a0a1e0c5f9c) ) |
| 209 | ROM_END |
| 210 | |
| 211 | /* YEAR NAME PARENT COMPAT MACHINE INPUT CLASS INIT COMPANY FULLNAME FLAGS */ |
| 212 | COMP( 1999, ti630, 0, 0, ti630, 0, ti630_state, ti630, "Intelbras", "TI630 telephone", GAME_IMPERFECT_GRAPHICS | GAME_NO_SOUND) |