summaryrefslogtreecommitdiffstatshomepage
path: root/src/devices/cpu/alto2/a2dht.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'src/devices/cpu/alto2/a2dht.cpp')
-rw-r--r--src/devices/cpu/alto2/a2dht.cpp62
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;
*/
/**