trunk/src/mess/drivers/mod8.c
| r26414 | r26415 | |
| 1 | 1 | /*************************************************************************** |
| 2 | 2 | |
| 3 | | Microsystems International Limited MOD-8 |
| 3 | Microsystems International Limited MOD-8 |
| 4 | 4 | |
| 5 | | M.I.L. was formed in 1968 from a joint venture between the Canadian |
| 6 | | Government and Northern Telecom. It produced a variety of computer |
| 7 | | chips, eproms, etc, plus parts for the telephone company. It folded |
| 8 | | in 1975. |
| 9 | | (Info from http://www.cse.yorku.ca/museum/v_tour/artifacts/artifacts.htm) |
| 5 | M.I.L. was formed in 1968 from a joint venture between the Canadian |
| 6 | Government and Northern Telecom. It produced a variety of computer |
| 7 | chips, eproms, etc, plus parts for the telephone company. It folded |
| 8 | in 1975. |
| 9 | (Info from http://www.cse.yorku.ca/museum/v_tour/artifacts/artifacts.htm) |
| 10 | 10 | |
| 11 | 11 | |
| 12 | | 14/06/2011 Modernised & above notes added. |
| 13 | | 02/12/2009 Working driver [Miodrag Milanovic] |
| 14 | | 18/11/2009 Skeleton driver. |
| 12 | 2009-11-18 Skeleton driver. |
| 13 | 2009-12-02 Working driver [Miodrag Milanovic] |
| 14 | 2011-06-14 Modernised & above notes added. |
| 15 | 15 | |
| 16 | Commands: |
| 17 | All commands consist of 3 uppercase letters. If further info is required |
| 18 | then a * prompt is printed on a new line, where you will enter the data. |
| 19 | All numbers are OCTAL (3/6 digits with leading zeros). Since a teletypewriter |
| 20 | is being used, there is no cursor. Do NOT press Enter except after these |
| 21 | commands, otherwise things get confusing. |
| 22 | |
| 23 | LOC - set current location pointer (the CLP) |
| 24 | DLP - display CLP |
| 25 | DPS - dump symbolic |
| 26 | LDO - load octal |
| 27 | DPO - dump octal |
| 28 | LBF - load BNPF format |
| 29 | DBF - dump BNPF format |
| 30 | EDT - enter Edit Mode |
| 31 | XQT - initiate program execution |
| 32 | CPY - copy routine |
| 33 | TRN - translate routine |
| 34 | SBP - set breakpoint |
| 35 | CBP - clear breakpoint |
| 36 | PRG - program PROM |
| 37 | |
| 38 | Pressing Ctrl-A will escape back to the monitor. You will see 8 dashes. |
| 39 | |
| 40 | Commands in the Edit Mode: |
| 41 | When you enter the Edit Mode it displays the CLP followed by a slash. |
| 42 | |
| 43 | nnn - enter a new value into this memory location and increment the CLP |
| 44 | ` (tic) - decrement CLP |
| 45 | @ - same as XQT |
| 46 | R - return to monitor |
| 47 | *nnnnnn - change CLP to this value |
| 48 | space - display current contents of memory |
| 49 | |
| 50 | While in 'space' mode, press a letter to increment CLP, or shift-delete |
| 51 | (underscore character) followed by a new byte for this location. |
| 52 | |
| 16 | 53 | ****************************************************************************/ |
| 17 | 54 | |
| 18 | 55 | #include "emu.h" |
| r26414 | r26415 | |
| 23 | 60 | { |
| 24 | 61 | public: |
| 25 | 62 | mod8_state(const machine_config &mconfig, device_type type, const char *tag) |
| 26 | | : driver_device(mconfig, type, tag), |
| 27 | | m_teleprinter(*this, TELEPRINTER_TAG) |
| 28 | | , |
| 29 | | m_maincpu(*this, "maincpu") { } |
| 63 | : driver_device(mconfig, type, tag) |
| 64 | , m_teleprinter(*this, TELEPRINTER_TAG) |
| 65 | , m_maincpu(*this, "maincpu") |
| 66 | { } |
| 30 | 67 | |
| 31 | | required_device<teleprinter_device> m_teleprinter; |
| 32 | 68 | DECLARE_WRITE8_MEMBER(out_w); |
| 33 | 69 | DECLARE_WRITE8_MEMBER(tty_w); |
| 34 | 70 | DECLARE_WRITE8_MEMBER(kbd_put); |
| 35 | 71 | DECLARE_READ8_MEMBER(tty_r); |
| 72 | IRQ_CALLBACK_MEMBER(mod8_irq_callback); |
| 73 | private: |
| 36 | 74 | UINT16 m_tty_data; |
| 37 | 75 | UINT8 m_tty_key_data; |
| 38 | 76 | int m_tty_cnt; |
| 39 | 77 | virtual void machine_reset(); |
| 40 | | IRQ_CALLBACK_MEMBER(mod8_irq_callback); |
| 78 | required_device<teleprinter_device> m_teleprinter; |
| 41 | 79 | required_device<cpu_device> m_maincpu; |
| 42 | 80 | }; |
| 43 | 81 | |
| r26414 | r26415 | |
| 112 | 150 | MCFG_CPU_PROGRAM_MAP(mod8_mem) |
| 113 | 151 | MCFG_CPU_IO_MAP(mod8_io) |
| 114 | 152 | |
| 115 | | |
| 116 | 153 | /* video hardware */ |
| 117 | 154 | MCFG_GENERIC_TELEPRINTER_ADD(TELEPRINTER_TAG, teleprinter_intf) |
| 118 | 155 | MACHINE_CONFIG_END |
| r26414 | r26415 | |
| 132 | 169 | |
| 133 | 170 | /* Driver */ |
| 134 | 171 | |
| 135 | | /* YEAR NAME PARENT COMPAT MACHINE INPUT INIT COMPANY FULLNAME FLAGS */ |
| 136 | | COMP( 1974, mod8, 0, 0, mod8, mod8, driver_device, 0, "Microsystems International Ltd", "MOD-8", GAME_NO_SOUND_HW) |
| 172 | /* YEAR NAME PARENT COMPAT MACHINE INPUT CLASS INIT COMPANY FULLNAME FLAGS */ |
| 173 | COMP( 1974, mod8, 0, 0, mod8, mod8, driver_device, 0, "Microsystems International Ltd", "MOD-8", GAME_NO_SOUND_HW) |