diff options
Diffstat (limited to 'src/devices/cpu/alto2/a2dht.cpp')
| -rw-r--r-- | src/devices/cpu/alto2/a2dht.cpp | 62 |
1 files changed, 31 insertions, 31 deletions
diff --git a/src/devices/cpu/alto2/a2dht.cpp b/src/devices/cpu/alto2/a2dht.cpp index 27f2103344c..cb2a0ee7fa9 100644 --- a/src/devices/cpu/alto2/a2dht.cpp +++ b/src/devices/cpu/alto2/a2dht.cpp @@ -9,48 +9,48 @@ /* * Copied from ALTOCODE24.MU - * ;Display Horizontal Task. - * ;11 cycles if no block change, 17 if new control block. + * ;Display Horizontal Task. + * ;11 cycles if no block change, 17 if new control block. * - * DHT: MAR← CBA-1; - * L← SLC -1, BUS=0; - * SLC← L, :DHT0; + * DHT: MAR← CBA-1; + * L← SLC -1, BUS=0; + * SLC← L, :DHT0; * - * DHT0: T← 37400; MORE TO DO IN THIS BLOCK - * SINK← MD; - * L← T← MD AND T, SETMODE; - * HTAB← L LCY 8, :NORMODE; + * DHT0: T← 37400; MORE TO DO IN THIS BLOCK + * SINK← MD; + * L← T← MD AND T, SETMODE; + * HTAB← L LCY 8, :NORMODE; * - * NORMODE:L← T← 377 . T; - * AECL← L, :REST; + * NORMODE:L← T← 377 . T; + * AECL← L, :REST; * - * HALFMODE: L← T← 377 . T; - * AECL← L, :REST, T← 0; + * HALFMODE: L← T← 377 . T; + * AECL← L, :REST, T← 0; * - * REST: L← DWA + T,TASK; INCREMENT DWA BY 0 OR NWRDS - * NDNX: DWA← L, :DHT; + * REST: L← DWA + T,TASK; INCREMENT DWA BY 0 OR NWRDS + * NDNX: DWA← L, :DHT; * - * DHT1: L← T← MD+1, BUS=0; - * CBA← L, MAR← T, :MOREB; + * DHT1: L← T← MD+1, BUS=0; + * CBA← L, MAR← T, :MOREB; * - * NOMORE: BLOCK, :DNX; - * MOREB: T← 37400; - * L← T← MD AND T, SETMODE; - * MAR← CBA+1, :NORMX, EVENFIELD; + * NOMORE: BLOCK, :DNX; + * MOREB: T← 37400; + * L← T← MD AND T, SETMODE; + * MAR← CBA+1, :NORMX, EVENFIELD; * - * NORMX: HTAB← L LCY 8, :NODD; - * HALFX: HTAB← L LCY 8, :NEVEN; + * NORMX: HTAB← L LCY 8, :NODD; + * HALFX: HTAB← L LCY 8, :NEVEN; * - * NODD: L←T← 377 . T; - * AECL← L, :XREST; ODD FIELD, FULL RESOLUTION + * NODD: L←T← 377 . T; + * AECL← L, :XREST; ODD FIELD, FULL RESOLUTION * - * NEVEN: L← 377 AND T; EVEN FIELD OR HALF RESOLUTION - * AECL←L, T←0; + * NEVEN: L← 377 AND T; EVEN FIELD OR HALF RESOLUTION + * AECL←L, T←0; * - * XREST: L← MD+T; - * T←MD-1; - * DNX: DWA←L, L←T, TASK; - * SLC←L, :DHT; + * XREST: L← MD+T; + * T←MD-1; + * DNX: DWA←L, L←T, TASK; + * SLC←L, :DHT; */ /** |
