trunk/src/mess/drivers/ts802.c
| r0 | r18870 | |
|---|
| 1 | /*************************************************************************** |
| 2 | |
| 3 | Skeleton driver for Televideo TS802 |
| 4 | |
| 5 | 2012-11-06 |
| 6 | After 5 seconds it shows an error and loops. |
| 7 | |
| 8 | TODO: |
| 9 | - Everything - this is just a skeleton |
| 10 | |
| 11 | |
| 12 | ****************************************************************************/ |
| 13 | |
| 14 | #include "emu.h" |
| 15 | #include "cpu/z80/z80.h" |
| 16 | #include "machine/terminal.h" |
| 17 | |
| 18 | |
| 19 | class ts802_state : public driver_device |
| 20 | { |
| 21 | public: |
| 22 | ts802_state(const machine_config &mconfig, device_type type, const char *tag) |
| 23 | : driver_device(mconfig, type, tag), |
| 24 | m_maincpu(*this, "maincpu"), |
| 25 | m_terminal(*this, TERMINAL_TAG) |
| 26 | { } |
| 27 | |
| 28 | required_device<cpu_device> m_maincpu; |
| 29 | required_device<generic_terminal_device> m_terminal; |
| 30 | DECLARE_READ8_MEMBER(port00_r) { return 0x80; }; |
| 31 | DECLARE_READ8_MEMBER(port0f_r) { return 0x05; }; |
| 32 | DECLARE_WRITE8_MEMBER( kbd_put ); |
| 33 | UINT8 m_term_data; |
| 34 | virtual void machine_reset(); |
| 35 | }; |
| 36 | |
| 37 | static ADDRESS_MAP_START(ts802_mem, AS_PROGRAM, 8, ts802_state) |
| 38 | ADDRESS_MAP_UNMAP_HIGH |
| 39 | AM_RANGE(0x0000, 0x0fff) AM_ROM |
| 40 | AM_RANGE(0x1000, 0xffff) AM_RAM |
| 41 | ADDRESS_MAP_END |
| 42 | |
| 43 | static ADDRESS_MAP_START(ts802_io, AS_IO, 8, ts802_state) |
| 44 | //ADDRESS_MAP_UNMAP_HIGH |
| 45 | ADDRESS_MAP_GLOBAL_MASK(0xff) |
| 46 | AM_RANGE(0x00, 0x00) AM_READ(port00_r) |
| 47 | AM_RANGE(0x0d, 0x0d) AM_DEVWRITE(TERMINAL_TAG, generic_terminal_device, write) |
| 48 | AM_RANGE(0x0f, 0x0f) AM_READ(port0f_r) |
| 49 | AM_RANGE(0x20, 0x20) AM_WRITENOP |
| 50 | ADDRESS_MAP_END |
| 51 | |
| 52 | |
| 53 | /* Input ports */ |
| 54 | static INPUT_PORTS_START( ts802 ) |
| 55 | INPUT_PORTS_END |
| 56 | |
| 57 | |
| 58 | void ts802_state::machine_reset() |
| 59 | { |
| 60 | } |
| 61 | |
| 62 | WRITE8_MEMBER( ts802_state::kbd_put ) |
| 63 | { |
| 64 | m_term_data = data; |
| 65 | } |
| 66 | |
| 67 | static GENERIC_TERMINAL_INTERFACE( terminal_intf ) |
| 68 | { |
| 69 | DEVCB_DRIVER_MEMBER(ts802_state, kbd_put) |
| 70 | }; |
| 71 | |
| 72 | static MACHINE_CONFIG_START( ts802, ts802_state ) |
| 73 | /* basic machine hardware */ |
| 74 | MCFG_CPU_ADD("maincpu", Z80, 4000000) // more likely a 8080 |
| 75 | MCFG_CPU_PROGRAM_MAP(ts802_mem) |
| 76 | MCFG_CPU_IO_MAP(ts802_io) |
| 77 | |
| 78 | MCFG_GENERIC_TERMINAL_ADD(TERMINAL_TAG, terminal_intf) |
| 79 | MACHINE_CONFIG_END |
| 80 | |
| 81 | /* ROM definition */ |
| 82 | ROM_START( ts802 ) |
| 83 | ROM_REGION(0x10000, "maincpu", 0) |
| 84 | ROM_LOAD( "ts802.rom", 0x0000, 0x1000, CRC(60bd086a) SHA1(82c5b60223e0d895683d3592a56684ef2dabfba6) ) |
| 85 | ROM_END |
| 86 | |
| 87 | /* Driver */ |
| 88 | |
| 89 | /* YEAR NAME PARENT COMPAT MACHINE INPUT STATE INIT COMPANY FULLNAME FLAGS */ |
| 90 | COMP( 19??, ts802, 0, 0, ts802, ts802, driver_device, 0, "Televideo", "TS802", GAME_IS_SKELETON) |