trunk/src/mess/drivers/mcb216.c
| r0 | r26459 | |
|---|
| 1 | // license:MAME |
| 2 | // copyright-holders:Robbbert |
| 3 | /*************************************************************************** |
| 4 | |
| 5 | 2013-12-01 Driver for Cromemco MCB-216 SCC (Single Card Computer) |
| 6 | The driver is working, just missing some hardware info (see ToDo). |
| 7 | |
| 8 | TODO: |
| 9 | - Find out cpu clock speed |
| 10 | - Find out what UART type is used |
| 11 | |
| 12 | Memory allocation |
| 13 | - 0000 to 0FFF - standard roms |
| 14 | - 1000 to 1FFF - optional roms or ram (expect roms) |
| 15 | - 2000 to 23FF - standard ram |
| 16 | - 2400 to FFFF - optional whatever the user wants (expect ram) |
| 17 | |
| 18 | When started, you must press Enter twice, then you will be in BASIC. |
| 19 | To go to the monitor, use the QUIT command, and to return use the B |
| 20 | command. |
| 21 | |
| 22 | The mcb216 can use an optional floppy-disk-drive unit. The only other |
| 23 | storage is paper-tape, which is expected to be attached to the terminal. |
| 24 | |
| 25 | ****************************************************************************/ |
| 26 | |
| 27 | #include "emu.h" |
| 28 | #include "cpu/z80/z80.h" |
| 29 | #include "machine/terminal.h" |
| 30 | |
| 31 | |
| 32 | class mcb216_state : public driver_device |
| 33 | { |
| 34 | public: |
| 35 | mcb216_state(const machine_config &mconfig, device_type type, const char *tag) |
| 36 | : driver_device(mconfig, type, tag) |
| 37 | , m_maincpu(*this, "maincpu") |
| 38 | , m_terminal(*this, TERMINAL_TAG) |
| 39 | { } |
| 40 | |
| 41 | DECLARE_WRITE8_MEMBER(kbd_put); |
| 42 | DECLARE_READ8_MEMBER(keyin_r); |
| 43 | DECLARE_READ8_MEMBER(status_r); |
| 44 | DECLARE_MACHINE_RESET(mcb216); |
| 45 | DECLARE_MACHINE_RESET(cb308); |
| 46 | |
| 47 | private: |
| 48 | UINT8 m_term_data; |
| 49 | required_device<cpu_device> m_maincpu; |
| 50 | required_device<generic_terminal_device> m_terminal; |
| 51 | }; |
| 52 | |
| 53 | static ADDRESS_MAP_START(mcb216_mem, AS_PROGRAM, 8, mcb216_state) |
| 54 | ADDRESS_MAP_UNMAP_HIGH |
| 55 | AM_RANGE(0x0000, 0x0fff) AM_ROM AM_REGION("roms", 0) |
| 56 | AM_RANGE(0x2000, 0x23ff) AM_RAM |
| 57 | AM_RANGE(0x2400, 0xffff) AM_RAM |
| 58 | ADDRESS_MAP_END |
| 59 | |
| 60 | static ADDRESS_MAP_START(mcb216_io, AS_IO, 8, mcb216_state) |
| 61 | ADDRESS_MAP_GLOBAL_MASK(0xff) |
| 62 | AM_RANGE(0x00, 0x00) AM_READ(status_r) |
| 63 | AM_RANGE(0x01, 0x01) AM_READ(keyin_r) AM_DEVWRITE(TERMINAL_TAG, generic_terminal_device, write) |
| 64 | ADDRESS_MAP_END |
| 65 | |
| 66 | static ADDRESS_MAP_START(cb308_mem, AS_PROGRAM, 8, mcb216_state) |
| 67 | ADDRESS_MAP_UNMAP_HIGH |
| 68 | AM_RANGE(0x0000, 0x1fff) AM_RAM |
| 69 | AM_RANGE(0xe000, 0xefff) AM_ROM AM_REGION("roms", 0) |
| 70 | ADDRESS_MAP_END |
| 71 | |
| 72 | // io unknown, assumed to be the same as mcb216 |
| 73 | static ADDRESS_MAP_START(cb308_io, AS_IO, 8, mcb216_state) |
| 74 | ADDRESS_MAP_GLOBAL_MASK(0xff) |
| 75 | AM_RANGE(0x00, 0x00) AM_READ(status_r) |
| 76 | AM_RANGE(0x01, 0x01) AM_READ(keyin_r) AM_DEVWRITE(TERMINAL_TAG, generic_terminal_device, write) |
| 77 | ADDRESS_MAP_END |
| 78 | |
| 79 | |
| 80 | /* Input ports */ |
| 81 | static INPUT_PORTS_START( mcb216 ) |
| 82 | INPUT_PORTS_END |
| 83 | |
| 84 | |
| 85 | READ8_MEMBER( mcb216_state::keyin_r ) |
| 86 | { |
| 87 | UINT8 ret = m_term_data; |
| 88 | m_term_data = 0; |
| 89 | return ret; |
| 90 | } |
| 91 | |
| 92 | // 0x40 - a keystroke is available |
| 93 | // 0x80 - ok to send to terminal |
| 94 | READ8_MEMBER( mcb216_state::status_r ) |
| 95 | { |
| 96 | return (m_term_data) ? 0xc0 : 0x80; |
| 97 | } |
| 98 | |
| 99 | WRITE8_MEMBER( mcb216_state::kbd_put ) |
| 100 | { |
| 101 | m_term_data = data; |
| 102 | } |
| 103 | |
| 104 | static GENERIC_TERMINAL_INTERFACE( terminal_intf ) |
| 105 | { |
| 106 | DEVCB_DRIVER_MEMBER(mcb216_state, kbd_put) |
| 107 | }; |
| 108 | |
| 109 | MACHINE_RESET_MEMBER( mcb216_state, mcb216 ) |
| 110 | { |
| 111 | m_term_data = 0; |
| 112 | } |
| 113 | |
| 114 | MACHINE_RESET_MEMBER( mcb216_state, cb308 ) |
| 115 | { |
| 116 | m_term_data = 0; |
| 117 | m_maincpu->set_state_int(Z80_PC, 0xe000); |
| 118 | } |
| 119 | |
| 120 | static MACHINE_CONFIG_START( mcb216, mcb216_state ) |
| 121 | /* basic machine hardware */ |
| 122 | MCFG_CPU_ADD("maincpu", Z80, 4000000) |
| 123 | MCFG_CPU_PROGRAM_MAP(mcb216_mem) |
| 124 | MCFG_CPU_IO_MAP(mcb216_io) |
| 125 | MCFG_MACHINE_RESET_OVERRIDE(mcb216_state, mcb216) |
| 126 | |
| 127 | /* video hardware */ |
| 128 | MCFG_GENERIC_TERMINAL_ADD(TERMINAL_TAG, terminal_intf) |
| 129 | MACHINE_CONFIG_END |
| 130 | |
| 131 | static MACHINE_CONFIG_START( cb308, mcb216_state ) |
| 132 | /* basic machine hardware */ |
| 133 | MCFG_CPU_ADD("maincpu", Z80, 4000000) |
| 134 | MCFG_CPU_PROGRAM_MAP(cb308_mem) |
| 135 | MCFG_CPU_IO_MAP(cb308_io) |
| 136 | MCFG_MACHINE_RESET_OVERRIDE(mcb216_state, cb308) |
| 137 | |
| 138 | /* video hardware */ |
| 139 | MCFG_GENERIC_TERMINAL_ADD(TERMINAL_TAG, terminal_intf) |
| 140 | MACHINE_CONFIG_END |
| 141 | |
| 142 | /* ROM definition */ |
| 143 | ROM_START( mcb216 ) |
| 144 | ROM_REGION(0x1000, "roms", 0) |
| 145 | ROM_LOAD( "mcb216r0", 0x0000, 0x0800, CRC(86d20cea) SHA1(9fb8fdbcb8d31bd3304a0b3339c7f423188e9d37) ) |
| 146 | ROM_LOAD( "mcb216r1", 0x0800, 0x0800, CRC(68a25b2c) SHA1(3eadd4a5d65726f767742deb4b51a97df813f37d) ) |
| 147 | ROM_END |
| 148 | |
| 149 | ROM_START( cb308 ) |
| 150 | ROM_REGION(0x1000, "roms", 0) |
| 151 | ROM_LOAD( "cb308r0", 0x0000, 0x0800, NO_DUMP ) |
| 152 | ROM_LOAD( "cb308r1", 0x0800, 0x0800, NO_DUMP ) |
| 153 | ROM_END |
| 154 | |
| 155 | /* Driver */ |
| 156 | |
| 157 | /* YEAR NAME PARENT COMPAT MACHINE INPUT CLASS INIT COMPANY FULLNAME FLAGS */ |
| 158 | COMP( 1979, mcb216, 0, 0, mcb216, mcb216, driver_device, 0, "Cromemco", "MCB-216", GAME_NOT_WORKING | GAME_NO_SOUND_HW ) |
| 159 | COMP( 1977, cb308, mcb216, 0, cb308, mcb216, driver_device, 0, "Cromemco", "CB-308", GAME_NOT_WORKING | GAME_NO_SOUND_HW ) |