Table of Contents

TDUIN

Table Of Contents

Source Code

TDUIN.txt
  1. *WEOR
  2. TDU721 *** REMOVE THIS LINE WHEN USING AS INPUT TO *TDU*. ***
  3. *WEOR
  4. TDU722 *** REMOVE THIS LINE WHEN USING AS INPUT TO *TDU*. ***
  5.  
  6. " TERMINAL DEFINITION FILE FOR CDC VIKING 722 TERMINAL "
  7.  
  8. " VARIABLES FOR FULL SCREEN EDITOR FUNCTION KEY DEFINITIONS "
  9. ^K1 = ('SK1/VNS/L/ FWD/;SKS1/VPS/L/ BKW/')
  10. ^K2 = ('SK2/VN/L/LINEUP/;SKS2/VP/L/LINEDN/')
  11. ^K3 = ('SK3/.I/L/ INSC/;SKS3/.D/L/ DELC/')
  12. ^K4 = ('SK4/IBP1/L/ INSL/;SKS4/D;PN/L/ DELL/')
  13. ^K5 = ('SK5/SM/L/ MARK/;SKS5/U/L/ UNDO/')
  14. ^K6 = ('SK6/MMTP/L/ MOVE/;SKS6/CMTP/L/ COPY/')
  15. ^K7 = ('SK7/H/L/ HELP/;SKS7/SVO0/L/ LEFT/')
  16. ^K8 = ('SK8/Q/L/ QUIT/;SKS8/SVO&C;.P+20/L/RIGHT/')
  17. ^K9 = ('SK9/.E/L/ENDLIN/;SKS9/UM/L/UNMARK')
  18.  
  19. " MODEL NAME AND COMMUNICATION TYPE "
  20. ^M^O^D^E^L_^N^A^M^E ^V^A^L^U^E = '722'
  21. ^C^O^M^M^U^N^I^C^A^T^I^O^N^S ^T^Y^P^E = ^A^S^Y^N^C^H
  22.  
  23. " END OF INFORMATION SPECIFICATION "
  24. ^E^N^D_^O^F_^I^N^F^O^R^M^A^T^I^O^N ^I^N = (0)
  25.  
  26. " CURSOR POSITIONING INFORMATION "
  27. ^C^U^R^S^O^R_^P^O^S_^E^N^C^O^D^I^N^G ^B^I^A^S = (32) ^T^Y^P^E = ^B^I^N^A^R^Y_^C^U^R^S^O^R
  28. ^C^U^R^S^O^R_^P^O^S_^C^O^L^U^M^N_^F^I^R^S^T ^V^A^L^U^E = TRUE
  29. ^C^U^R^S^O^R_^P^O^S_^C^O^L^U^M^N_^L^E^N^G^T^H ^V^A^L^U^E = (0)
  30. ^C^U^R^S^O^R_^P^O^S_^R^O^W_^L^E^N^G^T^H ^V^A^L^U^E = (0)
  31. ^C^U^R^S^O^R_^P^O^S_^B^E^G^I^N ^O^U^T = (^E^S^C 31(16))
  32.  
  33. " CURSOR MOVEMENT INFORMATION "
  34. ^C^U^R^S^O^R_^H^O^M^E ^I^N^O^U^T = (^E^M)
  35. ^C^U^R^S^O^R_^U^P ^I^N^O^U^T = (^S^U^B)
  36. ^C^U^R^S^O^R_^D^O^W^N ^I^N^O^U^T = (^L^F)
  37. ^C^U^R^S^O^R_^L^E^F^T ^I^N^O^U^T = (^B^S)
  38. ^C^U^R^S^O^R_^R^I^G^H^T ^I^N^O^U^T = (^N^A^K)
  39.  
  40. " CURSOR BEHAVIOR (^F^O^R ^C^U^R^S^O^R ^M^O^V^E^M^E^N^T ^K^E^Y^S) "
  41. ^M^O^V^E_^P^A^S^T_^R^I^G^H^T ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  42. ^M^O^V^E_^P^A^S^T_^L^E^F^T ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  43. ^M^O^V^E_^P^A^S^T_^T^O^P ^T^Y^P^E = ^W^R^A^P_^S^A^M^E_^N^E^X^T
  44. ^M^O^V^E_^P^A^S^T_^B^O^T^T^O^M ^T^Y^P^E = ^S^C^R^O^L^L_^N^E^X^T
  45.  
  46. " CURSOR BEHAVIOR (^F^O^R ^C^H^A^R^A^C^T^E^R ^K^E^Y^S) "
  47. ^C^H^A^R_^P^A^S^T_^R^I^G^H^T ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  48. ^C^H^A^R_^P^A^S^T_^L^E^F^T ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  49. ^C^H^A^R_^P^A^S^T_^L^A^S^T_^P^O^S^I^T^I^O^N ^T^Y^P^E = ^S^C^R^O^L^L_^N^E^X^T
  50.  
  51. " PROTECTED CURSOR BEHAVIOR (^F^O^R ^C^U^R^S^O^R ^M^O^V^E^M^E^N^T ^K^E^Y^S) "
  52. ^P^R^O^T^E^C^T^E^D_^P^A^S^T_^R^I^G^H^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  53. ^P^R^O^T^E^C^T^E^D_^P^A^S^T_^L^E^F^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  54. ^P^R^O^T^E^C^T^E^D_^P^A^S^T_^U^P ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  55. ^P^R^O^T^E^C^T^E^D_^P^A^S^T_^D^O^W^N ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  56.  
  57. " PROTECTED CURSOR BEHAVIOR (^F^O^R ^C^H^A^R^A^C^T^E^R ^K^E^Y^S) "
  58. ^F^I^E^L^D_^P^A^S^T_^R^I^G^H^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  59. ^F^I^E^L^D_^P^A^S^T_^L^E^F^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  60. ^F^I^E^L^D_^P^A^S^T_^L^A^S^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  61. ^F^I^E^L^D_^B^E^F^O^R^E_^F^I^R^S^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  62.  
  63. " TERMINAL ATTRIBUTES "
  64. ^C^L^E^A^R^S_^W^H^E^N_^C^H^A^N^G^E_^S^I^Z^E ^V^A^L^U^E = FALSE
  65. ^F^U^N^C^T^I^O^N_^K^E^Y_^L^E^A^V^E^S_^M^A^R^K ^V^A^L^U^E = FALSE
  66. ^H^A^S_^H^I^D^D^E^N ^V^A^L^U^E = FALSE
  67. ^H^A^S_^P^R^O^T^E^C^T ^V^A^L^U^E = FALSE
  68. ^H^O^M^E_^A^T_^T^O^P ^V^A^L^U^E = FALSE
  69. ^M^U^L^T^I^P^L^E_^S^I^Z^E^S ^V^A^L^U^E = FALSE
  70. ^T^A^B^S_^T^O_^H^O^M^E ^V^A^L^U^E = FALSE
  71. ^T^A^B^S_^T^O_^T^A^B_^S^T^O^P^S ^V^A^L^U^E = FALSE
  72. ^T^A^B^S_^T^O_^U^N^P^R^O^T^E^C^T^E^D ^V^A^L^U^E = FALSE
  73.  
  74. " SCREEN SIZES "
  75. ^S^E^T_^S^I^Z^E ^R^O^W^S = 24 ^C^O^L^U^M^N^S = 80 ^O^U^T = ()
  76.  
  77. " TERMINAL CAPABILITIES "
  78. ^E^R^A^S^E_^E^N^D_^O^F_^L^I^N^E ^I^N^O^U^T = (^S^Y^N)
  79. ^E^R^A^S^E_^P^A^G^E_^H^O^M^E ^I^N^O^U^T = (^C^A^N)
  80. ^T^A^B_^F^O^R^W^A^R^D ^I^N^O^U^T = (^H^T)
  81.  
  82. " MISCELLANEOUS TERMINAL SEQUENCES "
  83. ^O^U^T^P^U^T_^B^E^G^I^N ^O^U^T = ()
  84. ^O^U^T^P^U^T_^E^N^D ^O^U^T = ()
  85. ^B^E^L^L_^N^A^K ^O^U^T = (^B^E^L)
  86.  
  87. " PROGRAMMABLE FUNCTION KEY INPUT INFORMATION "
  88. ^F1 ^I^N = (^R^S '^Q')
  89. ^F2 ^I^N = (^R^S '^R')
  90. ^F3 ^I^N = (^R^S '^S')
  91. ^F4 ^I^N = (^R^S '^T')
  92. ^F5 ^I^N = (^R^S '^U')
  93. ^F6 ^I^N = (^R^S '^V')
  94. ^F7 ^I^N = (^R^S '^W')
  95. ^F8 ^I^N = (^R^S '^X')
  96. ^F9 ^I^N = (^R^S '^Y')
  97. ^F10 ^I^N = (^R^S '^Z')
  98. ^F11 ^I^N = (^R^S '^0')
  99. ^F12 ^I^N = ()
  100. ^F13 ^I^N = ()
  101. ^F14 ^I^N = ()
  102. ^F15 ^I^N = ()
  103. ^F16 ^I^N = ()
  104.  
  105. ^F1_^S ^I^N = (^R^S '^A')
  106. ^F2_^S ^I^N = (^R^S '^B')
  107. ^F3_^S ^I^N = (^R^S '^C')
  108. ^F4_^S ^I^N = (^R^S '^D')
  109. ^F5_^S ^I^N = (^R^S '^E')
  110. ^F6_^S ^I^N = (^R^S '^F')
  111. ^F7_^S ^I^N = (^R^S '^G')
  112. ^F8_^S ^I^N = (^R^S '^H')
  113. ^F9_^S ^I^N = (^R^S '^I')
  114. ^F10_^S ^I^N = (^R^S '^J')
  115. ^F11_^S ^I^N = (^R^S '^K')
  116. ^F12_^S ^I^N = ()
  117. ^F13_^S ^I^N = ()
  118. ^F14_^S ^I^N = ()
  119. ^F15_^S ^I^N = ()
  120. ^F16_^S ^I^N = ()
  121.  
  122. " CDC STANDARD FUNCTION KEY INPUT INFORMATION "
  123. ^B^A^C^K ^I^N = ()
  124. ^B^A^C^K_^S ^I^N = ()
  125. ^H^E^L^P ^I^N = ()
  126. ^H^E^L^P_^S ^I^N = ()
  127. ^S^T^O^P ^I^N = (14(16))
  128. ^S^T^O^P_^S ^I^N = (10(16))
  129. ^D^O^W^N ^I^N = ()
  130. ^D^O^W^N_^S ^I^N = ()
  131. ^U^P ^I^N = ()
  132. ^U^P_^S ^I^N = ()
  133. ^F^W^D ^I^N = ()
  134. ^F^W^D_^S ^I^N = ()
  135. ^B^K^W ^I^N = ()
  136. ^B^K^W_^S ^I^N = ()
  137. ^E^D^I^T ^I^N = ()
  138. ^E^D^I^T_^S ^I^N = ()
  139. ^D^A^T^A ^I^N = ()
  140. ^D^A^T^A_^S ^I^N = ()
  141.  
  142. " LINE DRAWING CHARACTER SPECIFICATION "
  143. ^L^D_^F^I^N^E_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = ('-')
  144. ^L^D_^F^I^N^E_^V^E^R^T^I^C^A^L ^O^U^T = ('^1')
  145. ^L^D_^F^I^N^E_^U^P^P^E^R_^L^E^F^T ^O^U^T = ('*')
  146. ^L^D_^F^I^N^E_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = ('*')
  147. ^L^D_^F^I^N^E_^L^O^W^E^R_^L^E^F^T ^O^U^T = ('*')
  148. ^L^D_^F^I^N^E_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = ('*')
  149. ^L^D_^F^I^N^E_^U^P_^T ^O^U^T = ('*')
  150. ^L^D_^F^I^N^E_^D^O^W^N_^T ^O^U^T = ('*')
  151. ^L^D_^F^I^N^E_^L^E^F^T_^T ^O^U^T = ('*')
  152. ^L^D_^F^I^N^E_^R^I^G^H^T_^T ^O^U^T = ('*')
  153. ^L^D_^F^I^N^E_^C^R^O^S^S ^O^U^T = ('*')
  154. ^L^D_^M^E^D^I^U^M_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = ('-')
  155. ^L^D_^M^E^D^I^U^M_^V^E^R^T^I^C^A^L ^O^U^T = ('^1')
  156. ^L^D_^M^E^D^I^U^M_^U^P^P^E^R_^L^E^F^T ^O^U^T = ('*')
  157. ^L^D_^M^E^D^I^U^M_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = ('*')
  158. ^L^D_^M^E^D^I^U^M_^L^O^W^E^R_^L^E^F^T ^O^U^T = ('*')
  159. ^L^D_^M^E^D^I^U^M_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = ('*')
  160. ^L^D_^M^E^D^I^U^M_^U^P_^T ^O^U^T = ('*')
  161. ^L^D_^M^E^D^I^U^M_^D^O^W^N_^T ^O^U^T = ('*')
  162. ^L^D_^M^E^D^I^U^M_^L^E^F^T_^T ^O^U^T = ('*')
  163. ^L^D_^M^E^D^I^U^M_^R^I^G^H^T_^T ^O^U^T = ('*')
  164. ^L^D_^M^E^D^I^U^M_^C^R^O^S^S ^O^U^T = ('*')
  165. ^L^D_^B^O^L^D_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = ('-')
  166. ^L^D_^B^O^L^D_^V^E^R^T^I^C^A^L ^O^U^T = ('^1')
  167. ^L^D_^B^O^L^D_^U^P^P^E^R_^L^E^F^T ^O^U^T = ('*')
  168. ^L^D_^B^O^L^D_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = ('*')
  169. ^L^D_^B^O^L^D_^L^O^W^E^R_^L^E^F^T ^O^U^T = ('*')
  170. ^L^D_^B^O^L^D_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = ('*')
  171. ^L^D_^B^O^L^D_^U^P_^T ^O^U^T = ('*')
  172. ^L^D_^B^O^L^D_^D^O^W^N_^T ^O^U^T = ('*')
  173. ^L^D_^B^O^L^D_^L^E^F^T_^T ^O^U^T = ('*')
  174. ^L^D_^B^O^L^D_^R^I^G^H^T_^T ^O^U^T = ('*')
  175. ^L^D_^B^O^L^D_^C^R^O^S^S ^O^U^T = ('*')
  176.  
  177. " DEFAULT KEY DEFINITIONS FOR THE FULL SCREEN EDITOR "
  178. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  179. ^N^A^M^E = ('FSEKEYS')...
  180. ^O^U^T = (^K1 ';' ^K2 ';' ^K3 ';' ^K4 ';' ^K5)
  181. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  182. ^N^A^M^E = ('FSEKEYS')...
  183. ^O^U^T = (^K6 ';' ^K7 ';' ^K8 ';' ^K9)
  184.  
  185. " END OF TERMINAL DEFINITION FILE FOR CDC 722 TERMINAL "
  186. *WEOR
  187. TDUVT10 *** REMOVE THIS LINE WHEN USING AS INPUT TO *TDU*. ***
  188. *WEOR
  189. TDUT415 *** REMOVE THIS LINE WHEN USING AS INPUT TO *TDU*. ***
  190. *')
  191. ^L^D_^F^I^N^E_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = ('*')
  192. ^L^D_^F^I^N^E_^L^O^W^E^R_^L^E^F^T ^O^U^T = ('*')
  193. ^L^D_^F^I^N^E_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = ('*')
  194. ^L^D_^F^I^N^E_^U^P_^T ^O^U^T = ('*')
  195. ^L^D_^F^I^N^E_^D^O^W^N_^T ^O^U^T = ('*')
  196. ^L^D_^F^I^N^E_^L^E^F^T_^T ^O^U^T = ('*')
  197. ^L^D_^F^I^N^E_^R^I^G^H^T_^T ^O^U^T = ('*')
  198. ^L^D_^F^I^N^E_^C^R^O^S^S ^O^U^T = ('*')
  199. ^L^D_^M^E^D^I^U^M_^B^E^G^I^N ^O^U^T = ( ^S^T^A^R^T_^A^L^T^E^R^N^A^T^E)
  200. ^L^D_^M^E^D^I^U^M_^E^N^D ^O^U^T = ( ^S^T^O^P_^A^L^T^E^R^N^A^T^E)
  201. ^L^D_^M^E^D^I^U^M_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = ('-')
  202. ^L^D_^M^E^D^I^U^M_^V^E^R^T^I^C^A^L ^O^U^T = ('^1')
  203. ^L^D_^M^E^D^I^U^M_^U^P^P^E^R_^L^E^F^T ^O^U^T = ('*')
  204. ^L^D_^M^E^D^I^U^M_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = ('*')
  205. ^L^D_^M^E^D^I^U^M_^L^O^W^E^R_^L^E^F^T ^O^U^T = ('*')
  206. ^L^D_^M^E^D^I^U^M_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = ('*')
  207. ^L^D_^M^E^D^I^U^M_^U^P_^T ^O^U^T = ('*')
  208. ^L^D_^M^E^D^I^U^M_^D^O^W^N_^T ^O^U^T = ('*')
  209. ^L^D_^M^E^D^I^U^M_^L^E^F^T_^T ^O^U^T = ('*')
  210. ^L^D_^M^E^D^I^U^M_^R^I^G^H^T_^T ^O^U^T = ('*')
  211. ^L^D_^M^E^D^I^U^M_^C^R^O^S^S ^O^U^T = ('*')
  212. ^L^D_^B^O^L^D_^B^E^G^I^N ^O^U^T = ( ^S^T^A^R^T_^I^N^V^E^R^S^E )
  213. ^L^D_^B^O^L^D_^E^N^D ^O^U^T = ( ^S^T^O^P_^I^N^V^E^R^S^E )
  214. ^L^D_^B^O^L^D_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = ('-')
  215. ^L^D_^B^O^L^D_^V^E^R^T^I^C^A^L ^O^U^T = ('^1')
  216. ^L^D_^B^O^L^D_^U^P^P^E^R_^L^E^F^T ^O^U^T = ('*')
  217. ^L^D_^B^O^L^D_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = ('*')
  218. ^L^D_^B^O^L^D_^L^O^W^E^R_^L^E^F^T ^O^U^T = ('*')
  219. ^L^D_^B^O^L^D_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = ('*')
  220. ^L^D_^B^O^L^D_^U^P_^T ^O^U^T = ('*')
  221. ^L^D_^B^O^L^D_^D^O^W^N_^T ^O^U^T = ('*')
  222. ^L^D_^B^O^L^D_^L^E^F^T_^T ^O^U^T = ('*')
  223. ^L^D_^B^O^L^D_^R^I^G^H^T_^T ^O^U^T = ('*')
  224. ^L^D_^B^O^L^D_^C^R^O^S^S ^O^U^T = ('*')
  225.  
  226. " DEFAULT KEY DEFINITIONS FOR THE FULL SCREEN EDITOR "
  227. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  228. ^N^A^M^E = ('FSEKEYS')...
  229. ^O^U^T = (^K1 ';' ^K2 ';' ^K3 ';' ^K4 ';' ^K5 ';' ^K6)
  230. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  231. ^N^A^M^E = ('FSEKEYS')...
  232. ^O^U^T = (^K7 ';' ^K8 ';' ^K9 ';' ^K10 ';' ^K11 ';' ^K12)
  233.  
  234. " END OF TERMINAL DEFINITION FILE FOR TEKTRONIX T4115 TERMINAL "
  235. *WEOR
  236. TDUZ19 *** REMOVE THIS LINE WHEN USING AS INPUT TO *TDU*. ***
  237. *WEOR
  238. TDUADM3 *** REMOVE THIS LINE WHEN USING AS INPUT TO *TDU*. ***
  239.  
  240. " TERMINAL DEFINITION FILE FOR LEAR SIEGLER ADM3A TERMINAL "
  241.  
  242. " VARIABLES FOR FULL SCREEN EDITOR FUNCTION KEY DEFINITIONS "
  243. ^K1 = ('SK1/VNS/L/ FWD/;SKS1/VPS/L/ BKW/')
  244. ^K2 = ('SK2/VN/L/LINEUP/;SKS2/VP/L/LINEDN/')
  245. ^K3 = ('SK3/.I/L/ INSC/;SKS3/.D/L/ DELC/')
  246. ^K4 = ('SK4/IBP1/L/ INSL/;SKS4/D;PN/L/ DELL/')
  247. ^K5 = ('SK5/SM/L/ MARK/;SKS5/U/L/ UNDO/')
  248. ^K6 = ('SK6/MMTP/L/ MOVE/;SKS6/CMTP/L/ COPY/')
  249. ^K7 = ('SK7/H/L/ HELP/;SKS7/SVO0/L/ LEFT/')
  250. ^K8 = ('SK8/Q/L/ QUIT/;SKS8/SVO&C;.P+20/L/RIGHT/')
  251. ^K9 = ('SK9/.E/L/ENDLIN/;SKS9/SMW/L/MRKCHR/')
  252. ^K10 = ('SK10/SS/L/CLEAR/;SKS10/UM/L/UNMARK/')
  253. ^K11 = ('SK11/PF/L/FIRST/;SKS11/VL/L/ LAST/')
  254. ^K12 = ('SK12/IBP/L/ INSB/;SKS12/DB/L/ DELB/')
  255. ^K13 = ('SK13"L/&?/"L"LOCATE";SKS13/LN/L/LOCNXT/')
  256. ^K14 = ('SK14/.S/L/SPLIT/;SKS14/.J/L/ JOIN/')
  257. ^K15 = ('SK15/.F/L/ PARA/')
  258.  
  259. " MODEL NAME AND COMMUNICATION TYPE "
  260. ^M^O^D^E^L_^N^A^M^E ^V^A^L^U^E = 'ADM3A'
  261. ^C^O^M^M^U^N^I^C^A^T^I^O^N^S ^T^Y^P^E = ^A^S^Y^N^C^H
  262.  
  263. " END OF INFORMATION SPECIFICATION "
  264. ^E^N^D_^O^F_^I^N^F^O^R^M^A^T^I^O^N ^I^N = (0)
  265.  
  266. " CURSOR POSITIONING INFORMATION "
  267. ^C^U^R^S^O^R_^P^O^S_^E^N^C^O^D^I^N^G ^B^I^A^S = (20(16)) ^T^Y^P^E = ^B^I^N^A^R^Y_^C^U^R^S^O^R
  268. ^C^U^R^S^O^R_^P^O^S_^C^O^L^U^M^N_^F^I^R^S^T ^V^A^L^U^E = FALSE
  269. ^C^U^R^S^O^R_^P^O^S_^C^O^L^U^M^N_^L^E^N^G^T^H ^V^A^L^U^E = (0)
  270. ^C^U^R^S^O^R_^P^O^S_^R^O^W_^L^E^N^G^T^H ^V^A^L^U^E = (0)
  271. ^C^U^R^S^O^R_^P^O^S_^B^E^G^I^N ^O^U^T = (1B(16) 3D(16))
  272.  
  273. " CURSOR MOVEMENT INFORMATION "
  274. ^C^U^R^S^O^R_^H^O^M^E ^I^N^O^U^T = (^R^S)
  275. ^C^U^R^S^O^R_^U^P ^I^N^O^U^T = (^V^T)
  276. ^C^U^R^S^O^R_^D^O^W^N ^I^N^O^U^T = (^L^F)
  277. ^C^U^R^S^O^R_^L^E^F^T ^I^N^O^U^T = (^B^S)
  278. ^C^U^R^S^O^R_^R^I^G^H^T ^I^N^O^U^T = (^F^F)
  279.  
  280. " CURSOR BEHAVIOR (^F^O^R ^C^U^R^S^O^R ^M^O^V^E^M^E^N^T ^K^E^Y^S) "
  281. ^M^O^V^E_^P^A^S^T_^R^I^G^H^T ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  282. ^M^O^V^E_^P^A^S^T_^L^E^F^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  283. ^M^O^V^E_^P^A^S^T_^T^O^P ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  284. ^M^O^V^E_^P^A^S^T_^B^O^T^T^O^M ^T^Y^P^E = ^S^C^R^O^L^L_^N^E^X^T
  285.  
  286. " CURSOR BEHAVIOR (^F^O^R ^C^H^A^R^A^C^T^E^R ^K^E^Y^S) "
  287. ^C^H^A^R_^P^A^S^T_^R^I^G^H^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  288. ^C^H^A^R_^P^A^S^T_^L^E^F^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  289. ^C^H^A^R_^P^A^S^T_^L^A^S^T_^P^O^S^I^T^I^O^N ^T^Y^P^E = ^S^C^R^O^L^L_^N^E^X^T
  290.  
  291. " PROTECTED CURSOR BEHAVIOR (^F^O^R ^C^U^R^S^O^R ^M^O^V^E^M^E^N^T ^K^E^Y^S) "
  292. ^P^R^O^T^E^C^T^E^D_^P^A^S^T_^R^I^G^H^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  293. ^P^R^O^T^E^C^T^E^D_^P^A^S^T_^L^E^F^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  294. ^P^R^O^T^E^C^T^E^D_^P^A^S^T_^U^P ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  295. ^P^R^O^T^E^C^T^E^D_^P^A^S^T_^D^O^W^N ^T^Y^P^E = ^S^C^R^O^L^L_^N^E^X^T
  296.  
  297. " PROTECTED CURSOR BEHAVIOR (^F^O^R ^C^H^A^R^A^C^T^E^R ^K^E^Y^S) "
  298. ^F^I^E^L^D_^P^A^S^T_^R^I^G^H^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  299. ^F^I^E^L^D_^P^A^S^T_^L^E^F^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  300. ^F^I^E^L^D_^P^A^S^T_^L^A^S^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  301. ^F^I^E^L^D_^B^E^F^O^R^E_^F^I^R^S^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  302.  
  303. " TERMINAL ATTRIBUTES "
  304. ^C^L^E^A^R^S_^W^H^E^N_^C^H^A^N^G^E_^S^I^Z^E ^V^A^L^U^E = FALSE
  305. ^F^U^N^C^T^I^O^N_^K^E^Y_^L^E^A^V^E^S_^M^A^R^K ^V^A^L^U^E = FALSE
  306. ^H^A^S_^H^I^D^D^E^N ^V^A^L^U^E = FALSE
  307. ^H^A^S_^P^R^O^T^E^C^T ^V^A^L^U^E = FALSE
  308. ^H^O^M^E_^A^T_^T^O^P ^V^A^L^U^E = TRUE
  309. ^M^U^L^T^I^P^L^E_^S^I^Z^E^S ^V^A^L^U^E = FALSE
  310. ^T^A^B^S_^T^O_^H^O^M^E ^V^A^L^U^E = FALSE
  311. ^T^A^B^S_^T^O_^T^A^B_^S^T^O^P^S ^V^A^L^U^E = FALSE
  312. ^T^A^B^S_^T^O_^U^N^P^R^O^T^E^C^T^E^D ^V^A^L^U^E = FALSE
  313.  
  314. " SCREEN SIZES "
  315. ^S^E^T_^S^I^Z^E ^R^O^W^S = 24 ^C^O^L^U^M^N^S = 80 ^O^U^T = ()
  316.  
  317. " TERMINAL CAPABILITIES "
  318. ^E^R^A^S^E_^P^A^G^E_^H^O^M^E ^I^N^O^U^T = (^S^U^B)
  319.  
  320. " MISCELLANEOUS TERMINAL SEQUENCES "
  321. ^B^E^L^L_^N^A^K ^O^U^T = (^B^E^L)
  322.  
  323. " PROGRAMMABLE FUNCTION KEY INPUT INFORMATION "
  324. ^F1 ^I^N = (^E^S^C 31(16))
  325. ^F2 ^I^N = (^E^S^C 32(16))
  326. ^F3 ^I^N = (^E^S^C 33(16))
  327. ^F4 ^I^N = (^E^S^C 34(16))
  328. ^F5 ^I^N = (^E^S^C 35(16))
  329. ^F6 ^I^N = (^E^S^C 36(16))
  330. ^F7 ^I^N = (^E^S^C 37(16))
  331. ^F8 ^I^N = (^E^S^C 38(16))
  332. ^F9 ^I^N = (^E^S^C 39(16))
  333. ^F10 ^I^N = (^E^S^C 30(16))
  334. ^F11 ^I^N = (^E^S^C 3A(16))
  335. ^F12 ^I^N = (^E^S^C 2D(16))
  336. ^F13 ^I^N = (^E^S^C 5B(16))
  337. ^F14 ^I^N = (^E^S^C 5D(16))
  338. ^F15 ^I^N = (^E^S^C 5E(16))
  339. ^F16 ^I^N = ()
  340. ^F1_^S ^I^N = (^E^S^C 21(16))
  341. ^F2_^S ^I^N = (^E^S^C 22(16))
  342. ^F3_^S ^I^N = (^E^S^C 23(16))
  343. ^F4_^S ^I^N = (^E^S^C 24(16))
  344. ^F5_^S ^I^N = (^E^S^C 25(16))
  345. ^F6_^S ^I^N = (^E^S^C 26(16))
  346. ^F7_^S ^I^N = (^E^S^C 27(16))
  347. ^F8_^S ^I^N = (^E^S^C 28(16))
  348. ^F9_^S ^I^N = (^E^S^C 29(16))
  349. ^F11_^S ^I^N = (^E^S^C 2A(16))
  350. ^F12_^S ^I^N = (^E^S^C 3D(16))
  351. ^F13_^S ^I^N = (^E^S^C 7B(16))
  352. ^F14_^S ^I^N = (^E^S^C 7D(16))
  353. ^F15_^S ^I^N = (^E^S^C 7E(16))
  354. ^F16_^S ^I^N = ()
  355.  
  356. " CDC STANDARD FUNCTION KEY INPUT INFORMATION "
  357. ^B^A^C^K ^I^N = ()
  358. ^B^A^C^K_^S ^I^N = ()
  359. ^H^E^L^P ^I^N = ()
  360. ^H^E^L^P_^S ^I^N = ()
  361. ^S^T^O^P ^I^N = (14(16))
  362. ^S^T^O^P_^S ^I^N = (10(16))
  363. ^D^O^W^N ^I^N = ()
  364. ^D^O^W^N_^S ^I^N = ()
  365. ^U^P ^I^N = ()
  366. ^U^P_^S ^I^N = ()
  367. ^F^W^D ^I^N = ()
  368. ^F^W^D_^S ^I^N = ()
  369. ^B^K^W ^I^N = ()
  370. ^B^K^W_^S ^I^N = ()
  371. ^E^D^I^T ^I^N = ()
  372. ^E^D^I^T_^S ^I^N = ()
  373. ^D^A^T^A ^I^N = ()
  374. ^D^A^T^A_^S ^I^N = ()
  375.  
  376. " LINE DRAWING CHARACTER SPECIFICATION "
  377. ^L^D_^F^I^N^E_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = ('-')
  378. ^L^D_^F^I^N^E_^V^E^R^T^I^C^A^L ^O^U^T = ('^1')
  379. ^L^D_^F^I^N^E_^U^P^P^E^R_^L^E^F^T ^O^U^T = ('*')
  380. ^L^D_^F^I^N^E_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = ('*')
  381. ^L^D_^F^I^N^E_^L^O^W^E^R_^L^E^F^T ^O^U^T = ('*')
  382. ^L^D_^F^I^N^E_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = ('*')
  383. ^L^D_^F^I^N^E_^U^P_^T ^O^U^T = ('*')
  384. ^L^D_^F^I^N^E_^D^O^W^N_^T ^O^U^T = ('*')
  385. ^L^D_^F^I^N^E_^L^E^F^T_^T ^O^U^T = ('*')
  386. ^L^D_^F^I^N^E_^R^I^G^H^T_^T ^O^U^T = ('*')
  387. ^L^D_^F^I^N^E_^C^R^O^S^S ^O^U^T = ('*')
  388. ^L^D_^M^E^D^I^U^M_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = ('-')
  389. ^L^D_^M^E^D^I^U^M_^V^E^R^T^I^C^A^L ^O^U^T = ('^1')
  390. ^L^D_^M^E^D^I^U^M_^U^P^P^E^R_^L^E^F^T ^O^U^T = ('*')
  391. ^L^D_^M^E^D^I^U^M_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = ('*')
  392. ^L^D_^M^E^D^I^U^M_^L^O^W^E^R_^L^E^F^T ^O^U^T = ('*')
  393. ^L^D_^M^E^D^I^U^M_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = ('*')
  394. ^L^D_^M^E^D^I^U^M_^U^P_^T ^O^U^T = ('*')
  395. ^L^D_^M^E^D^I^U^M_^D^O^W^N_^T ^O^U^T = ('*')
  396. ^L^D_^M^E^D^I^U^M_^L^E^F^T_^T ^O^U^T = ('*')
  397. ^L^D_^M^E^D^I^U^M_^R^I^G^H^T_^T ^O^U^T = ('*')
  398. ^L^D_^M^E^D^I^U^M_^C^R^O^S^S ^O^U^T = ('*')
  399. ^L^D_^B^O^L^D_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = ('-')
  400. ^L^D_^B^O^L^D_^V^E^R^T^I^C^A^L ^O^U^T = ('^1')
  401. ^L^D_^B^O^L^D_^U^P^P^E^R_^L^E^F^T ^O^U^T = ('*')
  402. ^L^D_^B^O^L^D_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = ('*')
  403. ^L^D_^B^O^L^D_^L^O^W^E^R_^L^E^F^T ^O^U^T = ('*')
  404. ^L^D_^B^O^L^D_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = ('*')
  405. ^L^D_^B^O^L^D_^U^P_^T ^O^U^T = ('*')
  406. ^L^D_^B^O^L^D_^D^O^W^N_^T ^O^U^T = ('*')
  407. ^L^D_^B^O^L^D_^L^E^F^T_^T ^O^U^T = ('*')
  408. ^L^D_^B^O^L^D_^R^I^G^H^T_^T ^O^U^T = ('*')
  409. ^L^D_^B^O^L^D_^C^R^O^S^S ^O^U^T = ('*')
  410.  
  411. " DEFAULT KEY DEFINITIONS FOR THE FULL SCREEN EDITOR "
  412. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  413. ^N^A^M^E = ('FSEKEYS')...
  414. ^O^U^T = (^K1 ';' ^K2 ';' ^K3 ';' ^K4 ';' ^K5)
  415. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  416. ^N^A^M^E = ('FSEKEYS')...
  417. ^O^U^T = (^K6 ';' ^K7 ';' ^K8 ';' ^K9 ';' ^K10)
  418. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  419. ^N^A^M^E = ('FSEKEYS')...
  420. ^O^U^T = (^K11 ';' ^K12 ';' ^K13 ';' ^K14 ';' ^K15)
  421.  
  422. " END OF TERMINAL DEFINITION FILE FOR LEAR SIEGLER ADM3A TERMINAL "
  423. *WEOR
  424. TDUADM5 *** REMOVE THIS LINE WHEN USING AS INPUT TO *TDU*. ***
  425.  
  426. " TERMINAL DEFINITION FILE FOR LEAR SIEGLER ADM5 TERMINAL "
  427.  
  428. " VARIABLES FOR FULL SCREEN EDITOR FUNCTION KEY DEFINITIONS "
  429. ^K1 = ('SK1/VNS/L/ FWD/;SKS1/VPS/L/ BKW/')
  430. ^K2 = ('SK2/VN/L/LINEUP/;SKS2/VP/L/LINEDN/')
  431. ^K3 = ('SK3/.I/L/ INSC/;SKS3/.D/L/ DELC/')
  432. ^K4 = ('SK4/IBP1/L/ INSL/;SKS4/D;PN/L/ DELL/')
  433. ^K5 = ('SK5/SM/L/ MARK/;SKS5/U/L/ UNDO/')
  434. ^K6 = ('SK6/MMTP/L/ MOVE/;SKS6/CMTP/L/ COPY/')
  435. ^K7 = ('SK7/H/L/ HELP/;SKS7/SVO0/L/ LEFT/')
  436. ^K8 = ('SK8/Q/L/ QUIT/;SKS8/SVO&C;.P+20/L/RIGHT/')
  437. ^K9 = ('SK9/.E/L/ENDLIN/;SKS9/SMW/L/MRKCHR/')
  438. ^K10 = ('SK10/SS/L/CLEAR/;SKS10/UM/L/UNMARK/')
  439. ^K11 = ('SK11/PF/L/FIRST/;SKS11/VL/L/ LAST/')
  440. ^K12 = ('SK12/IBP/L/ INSB/;SKS12/DB/L/ DELB/')
  441. ^K13 = ('SK13"L/&?/"L"LOCATE";SKS13/LN/L/LOCNXT/')
  442. ^K14 = ('SK14/.S/L/SPLIT/;SKS14/.J/L/ JOIN/')
  443.  
  444. " MODEL NAME AND COMMUNICATION TYPE "
  445. ^M^O^D^E^L_^N^A^M^E ^V^A^L^U^E = 'ADM5'
  446. ^C^O^M^M^U^N^I^C^A^T^I^O^N^S ^T^Y^P^E = ^A^S^Y^N^C^H
  447.  
  448. " END OF INFORMATION SPECIFICATION "
  449. ^E^N^D_^O^F_^I^N^F^O^R^M^A^T^I^O^N ^I^N = (0)
  450.  
  451. " CURSOR POSITIONING INFORMATION "
  452. ^C^U^R^S^O^R_^P^O^S_^E^N^C^O^D^I^N^G ^B^I^A^S = (20(16)) ^T^Y^P^E = ^B^I^N^A^R^Y_^C^U^R^S^O^R
  453. ^C^U^R^S^O^R_^P^O^S_^C^O^L^U^M^N_^F^I^R^S^T ^V^A^L^U^E = FALSE
  454. ^C^U^R^S^O^R_^P^O^S_^C^O^L^U^M^N_^L^E^N^G^T^H ^V^A^L^U^E = (0)
  455. ^C^U^R^S^O^R_^P^O^S_^R^O^W_^L^E^N^G^T^H ^V^A^L^U^E = (0)
  456. ^C^U^R^S^O^R_^P^O^S_^B^E^G^I^N ^O^U^T = (1B(16) 3D(16))
  457.  
  458. " CURSOR MOVEMENT INFORMATION "
  459. ^C^U^R^S^O^R_^H^O^M^E ^I^N^O^U^T = (^R^S)
  460. ^C^U^R^S^O^R_^U^P ^I^N^O^U^T = (^V^T)
  461. ^C^U^R^S^O^R_^D^O^W^N ^I^N^O^U^T = (^L^F)
  462. ^C^U^R^S^O^R_^L^E^F^T ^I^N^O^U^T = (^B^S)
  463. ^C^U^R^S^O^R_^R^I^G^H^T ^I^N^O^U^T = (^F^F)
  464.  
  465. " CURSOR BEHAVIOR (^F^O^R ^C^U^R^S^O^R ^M^O^V^E^M^E^N^T ^K^E^Y^S) "
  466. ^M^O^V^E_^P^A^S^T_^R^I^G^H^T ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  467. ^M^O^V^E_^P^A^S^T_^L^E^F^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  468. ^M^O^V^E_^P^A^S^T_^T^O^P ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  469. ^M^O^V^E_^P^A^S^T_^B^O^T^T^O^M ^T^Y^P^E = ^S^C^R^O^L^L_^N^E^X^T
  470.  
  471. " CURSOR BEHAVIOR (^F^O^R ^C^H^A^R^A^C^T^E^R ^K^E^Y^S) "
  472. ^C^H^A^R_^P^A^S^T_^R^I^G^H^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  473. ^C^H^A^R_^P^A^S^T_^L^E^F^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  474. ^C^H^A^R_^P^A^S^T_^L^A^S^T_^P^O^S^I^T^I^O^N ^T^Y^P^E = ^S^C^R^O^L^L_^N^E^X^T
  475.  
  476. " PROTECTED CURSOR BEHAVIOR (^F^O^R ^C^U^R^S^O^R ^M^O^V^E^M^E^N^T ^K^E^Y^S) "
  477. ^P^R^O^T^E^C^T^E^D_^P^A^S^T_^R^I^G^H^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  478. ^P^R^O^T^E^C^T^E^D_^P^A^S^T_^L^E^F^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  479. ^P^R^O^T^E^C^T^E^D_^P^A^S^T_^U^P ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  480. ^P^R^O^T^E^C^T^E^D_^P^A^S^T_^D^O^W^N ^T^Y^P^E = ^S^C^R^O^L^L_^N^E^X^T
  481.  
  482. " PROTECTED CURSOR BEHAVIOR (^F^O^R ^C^H^A^R^A^C^T^E^R ^K^E^Y^S) "
  483. ^F^I^E^L^D_^P^A^S^T_^R^I^G^H^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  484. ^F^I^E^L^D_^P^A^S^T_^L^E^F^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  485. ^F^I^E^L^D_^P^A^S^T_^L^A^S^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  486. ^F^I^E^L^D_^B^E^F^O^R^E_^F^I^R^S^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  487.  
  488. " TERMINAL ATTRIBUTES "
  489. ^C^L^E^A^R^S_^W^H^E^N_^C^H^A^N^G^E_^S^I^Z^E ^V^A^L^U^E = FALSE
  490. ^F^U^N^C^T^I^O^N_^K^E^Y_^L^E^A^V^E^S_^M^A^R^K ^V^A^L^U^E = FALSE
  491. ^H^A^S_^H^I^D^D^E^N ^V^A^L^U^E = FALSE
  492. ^H^A^S_^P^R^O^T^E^C^T ^V^A^L^U^E = FALSE
  493. ^H^O^M^E_^A^T_^T^O^P ^V^A^L^U^E = TRUE
  494. ^M^U^L^T^I^P^L^E_^S^I^Z^E^S ^V^A^L^U^E = FALSE
  495. ^T^A^B^S_^T^O_^H^O^M^E ^V^A^L^U^E = FALSE
  496. ^T^A^B^S_^T^O_^T^A^B_^S^T^O^P^S ^V^A^L^U^E = FALSE
  497. ^T^A^B^S_^T^O_^U^N^P^R^O^T^E^C^T^E^D ^V^A^L^U^E = FALSE
  498.  
  499. " SCREEN SIZES "
  500. ^S^E^T_^S^I^Z^E ^R^O^W^S = 24 ^C^O^L^U^M^N^S = 80 ^O^U^T = ()
  501.  
  502. " TERMINAL CAPABILITIES "
  503. ^E^R^A^S^E_^E^N^D_^O^F_^P^A^G^E ^I^N^O^U^T = (1B(16) 59(16))
  504. ^E^R^A^S^E_^P^A^G^E_^H^O^M^E ^I^N^O^U^T = (^S^U^B)
  505.  
  506. " MISCELLANEOUS TERMINAL SEQUENCES "
  507. ^B^E^L^L_^N^A^K ^O^U^T = (^B^E^L)
  508.  
  509. " PROGRAMMABLE FUNCTION KEY INPUT INFORMATION "
  510. ^F1 ^I^N = (^E^S^C 31(16))
  511. ^F2 ^I^N = (^E^S^C 32(16))
  512. ^F3 ^I^N = (^E^S^C 33(16))
  513. ^F4 ^I^N = (^E^S^C 34(16))
  514. ^F5 ^I^N = (^E^S^C 35(16))
  515. ^F6 ^I^N = (^E^S^C 36(16))
  516. ^F7 ^I^N = (^E^S^C 37(16))
  517. ^F8 ^I^N = (^E^S^C 38(16))
  518. ^F9 ^I^N = (^E^S^C 39(16))
  519. ^F10 ^I^N = (^E^S^C 30(16))
  520. ^F11 ^I^N = (^E^S^C 3A(16))
  521. ^F12 ^I^N = (^E^S^C 2D(16))
  522. ^F13 ^I^N = (^E^S^C 5B(16))
  523. ^F14 ^I^N = (^E^S^C 5D(16))
  524. ^F15 ^I^N = ()
  525. ^F16 ^I^N = ()
  526. ^F1_^S ^I^N = (^E^S^C 21(16))
  527. ^F2_^S ^I^N = (^E^S^C 22(16))
  528. ^F3_^S ^I^N = (^E^S^C 23(16))
  529. ^F4_^S ^I^N = (^E^S^C 24(16))
  530. ^F5_^S ^I^N = (^E^S^C 25(16))
  531. ^F6_^S ^I^N = (^E^S^C 26(16))
  532. ^F7_^S ^I^N = (^E^S^C 27(16))
  533. ^F8_^S ^I^N = (^E^S^C 28(16))
  534. ^F9_^S ^I^N = (^E^S^C 29(16))
  535. ^F11_^S ^I^N = (^E^S^C 2A(16))
  536. ^F12_^S ^I^N = (^E^S^C 3D(16))
  537. ^F13_^S ^I^N = (^E^S^C 7B(16))
  538. ^F14_^S ^I^N = (^E^S^C 7D(16))
  539. ^F15_^S ^I^N = ()
  540. ^F16_^S ^I^N = ()
  541.  
  542. " CDC STANDARD FUNCTION KEY INPUT INFORMATION "
  543. ^B^A^C^K ^I^N = ()
  544. ^B^A^C^K_^S ^I^N = ()
  545. ^H^E^L^P ^I^N = ()
  546. ^H^E^L^P_^S ^I^N = ()
  547. ^S^T^O^P ^I^N = (14(16))
  548. ^S^T^O^P_^S ^I^N = (10(16))
  549. ^D^O^W^N ^I^N = ()
  550. ^D^O^W^N_^S ^I^N = ()
  551. ^U^P ^I^N = ()
  552. ^U^P_^S ^I^N = ()
  553. ^F^W^D ^I^N = ()
  554. ^F^W^D_^S ^I^N = ()
  555. ^B^K^W ^I^N = ()
  556. ^B^K^W_^S ^I^N = ()
  557. ^E^D^I^T ^I^N = ()
  558. ^E^D^I^T_^S ^I^N = ()
  559. ^D^A^T^A ^I^N = ()
  560. ^D^A^T^A_^S ^I^N = ()
  561.  
  562. " LINE DRAWING CHARACTER SPECIFICATION "
  563. ^L^D_^F^I^N^E_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = ('-')
  564. ^L^D_^F^I^N^E_^V^E^R^T^I^C^A^L ^O^U^T = ('^1')
  565. ^L^D_^F^I^N^E_^U^P^P^E^R_^L^E^F^T ^O^U^T = ('*')
  566. ^L^D_^F^I^N^E_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = ('*')
  567. ^L^D_^F^I^N^E_^L^O^W^E^R_^L^E^F^T ^O^U^T = ('*')
  568. ^L^D_^F^I^N^E_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = ('*')
  569. ^L^D_^F^I^N^E_^U^P_^T ^O^U^T = ('*')
  570. ^L^D_^F^I^N^E_^D^O^W^N_^T ^O^U^T = ('*')
  571. ^L^D_^F^I^N^E_^L^E^F^T_^T ^O^U^T = ('*')
  572. ^L^D_^F^I^N^E_^R^I^G^H^T_^T ^O^U^T = ('*')
  573. ^L^D_^F^I^N^E_^C^R^O^S^S ^O^U^T = ('*')
  574. ^L^D_^M^E^D^I^U^M_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = ('-')
  575. ^L^D_^M^E^D^I^U^M_^V^E^R^T^I^C^A^L ^O^U^T = ('^1')
  576. ^L^D_^M^E^D^I^U^M_^U^P^P^E^R_^L^E^F^T ^O^U^T = ('*')
  577. ^L^D_^M^E^D^I^U^M_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = ('*')
  578. ^L^D_^M^E^D^I^U^M_^L^O^W^E^R_^L^E^F^T ^O^U^T = ('*')
  579. ^L^D_^M^E^D^I^U^M_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = ('*')
  580. ^L^D_^M^E^D^I^U^M_^U^P_^T ^O^U^T = ('*')
  581. ^L^D_^M^E^D^I^U^M_^D^O^W^N_^T ^O^U^T = ('*')
  582. ^L^D_^M^E^D^I^U^M_^L^E^F^T_^T ^O^U^T = ('*')
  583. ^L^D_^M^E^D^I^U^M_^R^I^G^H^T_^T ^O^U^T = ('*')
  584. ^L^D_^M^E^D^I^U^M_^C^R^O^S^S ^O^U^T = ('*')
  585. ^L^D_^B^O^L^D_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = ('-')
  586. ^L^D_^B^O^L^D_^V^E^R^T^I^C^A^L ^O^U^T = ('^1')
  587. ^L^D_^B^O^L^D_^U^P^P^E^R_^L^E^F^T ^O^U^T = ('*')
  588. ^L^D_^B^O^L^D_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = ('*')
  589. ^L^D_^B^O^L^D_^L^O^W^E^R_^L^E^F^T ^O^U^T = ('*')
  590. ^L^D_^B^O^L^D_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = ('*')
  591. ^L^D_^B^O^L^D_^U^P_^T ^O^U^T = ('*')
  592. ^L^D_^B^O^L^D_^D^O^W^N_^T ^O^U^T = ('*')
  593. ^L^D_^B^O^L^D_^L^E^F^T_^T ^O^U^T = ('*')
  594. ^L^D_^B^O^L^D_^R^I^G^H^T_^T ^O^U^T = ('*')
  595. ^L^D_^B^O^L^D_^C^R^O^S^S ^O^U^T = ('*')
  596.  
  597. " DEFAULT KEY DEFINITIONS FOR THE FULL SCREEN EDITOR "
  598. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  599. ^N^A^M^E = ('FSEKEYS')...
  600. ^O^U^T = (^K1 ';' ^K2 ';' ^K3 ';' ^K4 ';' ^K5)
  601. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  602. ^N^A^M^E = ('FSEKEYS')...
  603. ^O^U^T = (^K6 ';' ^K7 ';' ^K8 ';' ^K9 ';' ^K10)
  604. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  605. ^N^A^M^E = ('FSEKEYS')...
  606. ^O^U^T = (^K11 ';' ^K12 ';' ^K13 ';' ^K14)
  607.  
  608. " END OF TERMINAL DEFINITION FILE FOR LEAR SIEGLER ADM5 TERMINAL "
  609. *WEOR
  610. TDUVKX3 *** REMOVE THIS LINE WHEN USING AS INPUT TO *TDU*. ***
  611. *WEOR
  612. TDU721T *** REMOVE THIS LINE WHEN USING AS INPUT TO *TDU*. ***
  613. *WEOR
  614. TDU722T *** REMOVE THIS LINE WHEN USING AS INPUT TO *TDU*. ***
  615.  
  616. " TERMINAL DEFINITION FILE FOR CDC VIKING 722 TERMINAL "
  617.  
  618. " VARIABLES FOR FULL SCREEN EDITOR FUNCTION KEY DEFINITIONS "
  619. ^K1 = ('SK1/VNS/L/ FWD/;SKS1/VPS/L/ BKW/')
  620. ^K2 = ('SK2/VN/L/LINEUP/;SKS2/VP/L/LINEDN/')
  621. ^K3 = ('SK3/.I/L/ INSC/;SKS3/.D/L/ DELC/')
  622. ^K4 = ('SK4/IBP1/L/ INSL/;SKS4/D;PN/L/ DELL/')
  623. ^K5 = ('SK5/SM/L/ MARK/;SKS5/U/L/ UNDO/')
  624. ^K6 = ('SK6/MMTP/L/ MOVE/;SKS6/CMTP/L/ COPY/')
  625. ^K7 = ('SK7/H/L/ HELP/;SKS7/SVO0/L/ LEFT/')
  626. ^K8 = ('SK8/Q/L/ QUIT/;SKS8/SVO&C;.P+20/L/RIGHT/')
  627. ^K9 = ('SK9/.E/L/ENDLIN/;SKS9/UM/L/UNMARK')
  628.  
  629. " MODEL NAME AND COMMUNICATION TYPE "
  630. ^M^O^D^E^L_^N^A^M^E ^V^A^L^U^E = '722T'
  631. ^C^O^M^M^U^N^I^C^A^T^I^O^N^S ^T^Y^P^E = ^A^S^Y^N^C^H
  632.  
  633. " END OF INFORMATION SPECIFICATION "
  634. ^E^N^D_^O^F_^I^N^F^O^R^M^A^T^I^O^N ^I^N = (0)
  635.  
  636. " CURSOR POSITIONING INFORMATION "
  637. ^C^U^R^S^O^R_^P^O^S_^E^N^C^O^D^I^N^G ^B^I^A^S = (32) ^T^Y^P^E = ^B^I^N^A^R^Y_^C^U^R^S^O^R
  638. ^C^U^R^S^O^R_^P^O^S_^C^O^L^U^M^N_^F^I^R^S^T ^V^A^L^U^E = TRUE
  639. ^C^U^R^S^O^R_^P^O^S_^C^O^L^U^M^N_^L^E^N^G^T^H ^V^A^L^U^E = (0)
  640. ^C^U^R^S^O^R_^P^O^S_^R^O^W_^L^E^N^G^T^H ^V^A^L^U^E = (0)
  641. ^C^U^R^S^O^R_^P^O^S_^B^E^G^I^N ^O^U^T = (^E^S^C 31(16))
  642.  
  643. " CURSOR MOVEMENT INFORMATION "
  644. ^C^U^R^S^O^R_^H^O^M^E ^I^N^O^U^T = (^E^M)
  645. ^C^U^R^S^O^R_^U^P ^I^N^O^U^T = (^S^U^B)
  646. ^C^U^R^S^O^R_^D^O^W^N ^I^N^O^U^T = (^L^F)
  647. ^C^U^R^S^O^R_^L^E^F^T ^I^N^O^U^T = (^B^S)
  648. ^C^U^R^S^O^R_^R^I^G^H^T ^I^N^O^U^T = (^N^A^K)
  649.  
  650. " CURSOR BEHAVIOR (^F^O^R ^C^U^R^S^O^R ^M^O^V^E^M^E^N^T ^K^E^Y^S) "
  651. ^M^O^V^E_^P^A^S^T_^R^I^G^H^T ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  652. ^M^O^V^E_^P^A^S^T_^L^E^F^T ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  653. ^M^O^V^E_^P^A^S^T_^T^O^P ^T^Y^P^E = ^W^R^A^P_^S^A^M^E_^N^E^X^T
  654. ^M^O^V^E_^P^A^S^T_^B^O^T^T^O^M ^T^Y^P^E = ^S^C^R^O^L^L_^N^E^X^T
  655.  
  656. " CURSOR BEHAVIOR (^F^O^R ^C^H^A^R^A^C^T^E^R ^K^E^Y^S) "
  657. ^C^H^A^R_^P^A^S^T_^R^I^G^H^T ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  658. ^C^H^A^R_^P^A^S^T_^L^E^F^T ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  659. ^C^H^A^R_^P^A^S^T_^L^A^S^T_^P^O^S^I^T^I^O^N ^T^Y^P^E = ^S^C^R^O^L^L_^N^E^X^T
  660.  
  661. " PROTECTED CURSOR BEHAVIOR (^F^O^R ^C^U^R^S^O^R ^M^O^V^E^M^E^N^T ^K^E^Y^S) "
  662. ^P^R^O^T^E^C^T^E^D_^P^A^S^T_^R^I^G^H^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  663. ^P^R^O^T^E^C^T^E^D_^P^A^S^T_^L^E^F^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  664. ^P^R^O^T^E^C^T^E^D_^P^A^S^T_^U^P ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  665. ^P^R^O^T^E^C^T^E^D_^P^A^S^T_^D^O^W^N ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  666.  
  667. " PROTECTED CURSOR BEHAVIOR (^F^O^R ^C^H^A^R^A^C^T^E^R ^K^E^Y^S) "
  668. ^F^I^E^L^D_^P^A^S^T_^R^I^G^H^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  669. ^F^I^E^L^D_^P^A^S^T_^L^E^F^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  670. ^F^I^E^L^D_^P^A^S^T_^L^A^S^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  671. ^F^I^E^L^D_^B^E^F^O^R^E_^F^I^R^S^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  672.  
  673. " TERMINAL ATTRIBUTES "
  674. ^C^L^E^A^R^S_^W^H^E^N_^C^H^A^N^G^E_^S^I^Z^E ^V^A^L^U^E = FALSE
  675. ^F^U^N^C^T^I^O^N_^K^E^Y_^L^E^A^V^E^S_^M^A^R^K ^V^A^L^U^E = FALSE
  676. ^H^A^S_^H^I^D^D^E^N ^V^A^L^U^E = FALSE
  677. ^H^A^S_^P^R^O^T^E^C^T ^V^A^L^U^E = FALSE
  678. ^H^O^M^E_^A^T_^T^O^P ^V^A^L^U^E = FALSE
  679. ^M^U^L^T^I^P^L^E_^S^I^Z^E^S ^V^A^L^U^E = FALSE
  680. ^T^A^B^S_^T^O_^H^O^M^E ^V^A^L^U^E = FALSE
  681. ^T^A^B^S_^T^O_^T^A^B_^S^T^O^P^S ^V^A^L^U^E = FALSE
  682. ^T^A^B^S_^T^O_^U^N^P^R^O^T^E^C^T^E^D ^V^A^L^U^E = FALSE
  683. ^T^Y^P^E_^A^H^E^A^D ^V^A^L^U^E = TRUE
  684.  
  685. " SCREEN SIZES "
  686. ^S^E^T_^S^I^Z^E ^R^O^W^S = 24 ^C^O^L^U^M^N^S = 80 ^O^U^T = ()
  687.  
  688. " TERMINAL CAPABILITIES "
  689. ^E^R^A^S^E_^E^N^D_^O^F_^L^I^N^E ^I^N^O^U^T = (^S^Y^N)
  690. ^E^R^A^S^E_^P^A^G^E_^H^O^M^E ^I^N^O^U^T = (^C^A^N)
  691. ^T^A^B_^F^O^R^W^A^R^D ^I^N^O^U^T = (^H^T)
  692.  
  693. " MISCELLANEOUS TERMINAL SEQUENCES "
  694. ^B^E^L^L_^N^A^K ^O^U^T = (^B^E^L)
  695. ^O^U^T^P^U^T_^B^E^G^I^N ^O^U^T = ()
  696. ^O^U^T^P^U^T_^E^N^D ^O^U^T = ()
  697.  
  698. " PROGRAMMABLE FUNCTION KEY INPUT INFORMATION "
  699. ^F1 ^I^N = (^R^S '^Q')
  700. ^F2 ^I^N = (^R^S '^R')
  701. ^F3 ^I^N = (^R^S '^S')
  702. ^F4 ^I^N = (^R^S '^T')
  703. ^F5 ^I^N = (^R^S '^U')
  704. ^F6 ^I^N = (^R^S '^V')
  705. ^F7 ^I^N = (^R^S '^W')
  706. ^F8 ^I^N = (^R^S '^X')
  707. ^F9 ^I^N = (^R^S '^Y')
  708. ^F10 ^I^N = (^R^S '^Z')
  709. ^F11 ^I^N = (^R^S '^0')
  710. ^F12 ^I^N = ()
  711. ^F13 ^I^N = ()
  712. ^F14 ^I^N = ()
  713. ^F15 ^I^N = ()
  714. ^F16 ^I^N = ()
  715.  
  716. ^F1_^S ^I^N = (^R^S '^A')
  717. ^F2_^S ^I^N = (^R^S '^B')
  718. ^F3_^S ^I^N = (^R^S '^C')
  719. ^F4_^S ^I^N = (^R^S '^D')
  720. ^F5_^S ^I^N = (^R^S '^E')
  721. ^F6_^S ^I^N = (^R^S '^F')
  722. ^F7_^S ^I^N = (^R^S '^G')
  723. ^F8_^S ^I^N = (^R^S '^H')
  724. ^F9_^S ^I^N = (^R^S '^I')
  725. ^F10_^S ^I^N = (^R^S '^J')
  726. ^F11_^S ^I^N = (^R^S '^K')
  727. ^F12_^S ^I^N = ()
  728. ^F13_^S ^I^N = ()
  729. ^F14_^S ^I^N = ()
  730. ^F15_^S ^I^N = ()
  731. ^F16_^S ^I^N = ()
  732.  
  733. " CDC STANDARD FUNCTION KEY INPUT INFORMATION "
  734. ^B^A^C^K ^I^N = ()
  735. ^B^A^C^K_^S ^I^N = ()
  736. ^H^E^L^P ^I^N = ()
  737. ^H^E^L^P_^S ^I^N = ()
  738. ^S^T^O^P ^I^N = (14(16))
  739. ^S^T^O^P_^S ^I^N = (10(16))
  740. ^D^O^W^N ^I^N = ()
  741. ^D^O^W^N_^S ^I^N = ()
  742. ^U^P ^I^N = ()
  743. ^U^P_^S ^I^N = ()
  744. ^F^W^D ^I^N = ()
  745. ^F^W^D_^S ^I^N = ()
  746. ^B^K^W ^I^N = ()
  747. ^B^K^W_^S ^I^N = ()
  748. ^E^D^I^T ^I^N = ()
  749. ^E^D^I^T_^S ^I^N = ()
  750. ^D^A^T^A ^I^N = ()
  751. ^D^A^T^A_^S ^I^N = ()
  752.  
  753. " LINE DRAWING CHARACTER SPECIFICATION "
  754. ^L^D_^F^I^N^E_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = ('-')
  755. ^L^D_^F^I^N^E_^V^E^R^T^I^C^A^L ^O^U^T = ('^1')
  756. ^L^D_^F^I^N^E_^U^P^P^E^R_^L^E^F^T ^O^U^T = ('*')
  757. ^L^D_^F^I^N^E_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = ('*')
  758. ^L^D_^F^I^N^E_^L^O^W^E^R_^L^E^F^T ^O^U^T = ('*')
  759. ^L^D_^F^I^N^E_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = ('*')
  760. ^L^D_^F^I^N^E_^U^P_^T ^O^U^T = ('*')
  761. ^L^D_^F^I^N^E_^D^O^W^N_^T ^O^U^T = ('*')
  762. ^L^D_^F^I^N^E_^L^E^F^T_^T ^O^U^T = ('*')
  763. ^L^D_^F^I^N^E_^R^I^G^H^T_^T ^O^U^T = ('*')
  764. ^L^D_^F^I^N^E_^C^R^O^S^S ^O^U^T = ('*')
  765. ^L^D_^M^E^D^I^U^M_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = ('-')
  766. ^L^D_^M^E^D^I^U^M_^V^E^R^T^I^C^A^L ^O^U^T = ('^1')
  767. ^L^D_^M^E^D^I^U^M_^U^P^P^E^R_^L^E^F^T ^O^U^T = ('*')
  768. ^L^D_^M^E^D^I^U^M_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = ('*')
  769. ^L^D_^M^E^D^I^U^M_^L^O^W^E^R_^L^E^F^T ^O^U^T = ('*')
  770. ^L^D_^M^E^D^I^U^M_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = ('*')
  771. ^L^D_^M^E^D^I^U^M_^U^P_^T ^O^U^T = ('*')
  772. ^L^D_^M^E^D^I^U^M_^D^O^W^N_^T ^O^U^T = ('*')
  773. ^L^D_^M^E^D^I^U^M_^L^E^F^T_^T ^O^U^T = ('*')
  774. ^L^D_^M^E^D^I^U^M_^R^I^G^H^T_^T ^O^U^T = ('*')
  775. ^L^D_^M^E^D^I^U^M_^C^R^O^S^S ^O^U^T = ('*')
  776. ^L^D_^B^O^L^D_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = ('-')
  777. ^L^D_^B^O^L^D_^V^E^R^T^I^C^A^L ^O^U^T = ('^1')
  778. ^L^D_^B^O^L^D_^U^P^P^E^R_^L^E^F^T ^O^U^T = ('*')
  779. ^L^D_^B^O^L^D_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = ('*')
  780. ^L^D_^B^O^L^D_^L^O^W^E^R_^L^E^F^T ^O^U^T = ('*')
  781. ^L^D_^B^O^L^D_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = ('*')
  782. ^L^D_^B^O^L^D_^U^P_^T ^O^U^T = ('*')
  783. ^L^D_^B^O^L^D_^D^O^W^N_^T ^O^U^T = ('*')
  784. ^L^D_^B^O^L^D_^L^E^F^T_^T ^O^U^T = ('*')
  785. ^L^D_^B^O^L^D_^R^I^G^H^T_^T ^O^U^T = ('*')
  786. ^L^D_^B^O^L^D_^C^R^O^S^S ^O^U^T = ('*')
  787.  
  788. " DEFAULT KEY DEFINITIONS FOR THE FULL SCREEN EDITOR "
  789. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  790. ^N^A^M^E = ('FSEKEYS')...
  791. ^O^U^T = (^K1 ';' ^K2 ';' ^K3 ';' ^K4 ';' ^K5)
  792. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  793. ^N^A^M^E = ('FSEKEYS')...
  794. ^O^U^T = (^K6 ';' ^K7 ';' ^K8 ';' ^K9)
  795.  
  796. " END OF TERMINAL DEFINITION FILE FOR CDC 722(T) TERMINAL "
  797. *WEOR
  798. TDUVT1T *** REMOVE THIS LINE WHEN USING AS INPUT TO *TDU*. ***
  799. *WEOR
  800. TDUT41T *** REMOVE THIS LINE WHEN USING AS INPUT TO *TDU*. ***
  801. *')
  802. ^L^D_^F^I^N^E_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = ('*')
  803. ^L^D_^F^I^N^E_^L^O^W^E^R_^L^E^F^T ^O^U^T = ('*')
  804. ^L^D_^F^I^N^E_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = ('*')
  805. ^L^D_^F^I^N^E_^U^P_^T ^O^U^T = ('*')
  806. ^L^D_^F^I^N^E_^D^O^W^N_^T ^O^U^T = ('*')
  807. ^L^D_^F^I^N^E_^L^E^F^T_^T ^O^U^T = ('*')
  808. ^L^D_^F^I^N^E_^R^I^G^H^T_^T ^O^U^T = ('*')
  809. ^L^D_^F^I^N^E_^C^R^O^S^S ^O^U^T = ('*')
  810. ^L^D_^M^E^D^I^U^M_^B^E^G^I^N ^O^U^T = ( ^S^T^A^R^T_^A^L^T^E^R^N^A^T^E)
  811. ^L^D_^M^E^D^I^U^M_^E^N^D ^O^U^T = ( ^S^T^O^P_^A^L^T^E^R^N^A^T^E)
  812. ^L^D_^M^E^D^I^U^M_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = ('-')
  813. ^L^D_^M^E^D^I^U^M_^V^E^R^T^I^C^A^L ^O^U^T = ('^1')
  814. ^L^D_^M^E^D^I^U^M_^U^P^P^E^R_^L^E^F^T ^O^U^T = ('*')
  815. ^L^D_^M^E^D^I^U^M_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = ('*')
  816. ^L^D_^M^E^D^I^U^M_^L^O^W^E^R_^L^E^F^T ^O^U^T = ('*')
  817. ^L^D_^M^E^D^I^U^M_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = ('*')
  818. ^L^D_^M^E^D^I^U^M_^U^P_^T ^O^U^T = ('*')
  819. ^L^D_^M^E^D^I^U^M_^D^O^W^N_^T ^O^U^T = ('*')
  820. ^L^D_^M^E^D^I^U^M_^L^E^F^T_^T ^O^U^T = ('*')
  821. ^L^D_^M^E^D^I^U^M_^R^I^G^H^T_^T ^O^U^T = ('*')
  822. ^L^D_^M^E^D^I^U^M_^C^R^O^S^S ^O^U^T = ('*')
  823. ^L^D_^B^O^L^D_^B^E^G^I^N ^O^U^T = ( ^S^T^A^R^T_^I^N^V^E^R^S^E )
  824. ^L^D_^B^O^L^D_^E^N^D ^O^U^T = ( ^S^T^O^P_^I^N^V^E^R^S^E )
  825. ^L^D_^B^O^L^D_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = ('-')
  826. ^L^D_^B^O^L^D_^V^E^R^T^I^C^A^L ^O^U^T = ('^1')
  827. ^L^D_^B^O^L^D_^U^P^P^E^R_^L^E^F^T ^O^U^T = ('*')
  828. ^L^D_^B^O^L^D_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = ('*')
  829. ^L^D_^B^O^L^D_^L^O^W^E^R_^L^E^F^T ^O^U^T = ('*')
  830. ^L^D_^B^O^L^D_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = ('*')
  831. ^L^D_^B^O^L^D_^U^P_^T ^O^U^T = ('*')
  832. ^L^D_^B^O^L^D_^D^O^W^N_^T ^O^U^T = ('*')
  833. ^L^D_^B^O^L^D_^L^E^F^T_^T ^O^U^T = ('*')
  834. ^L^D_^B^O^L^D_^R^I^G^H^T_^T ^O^U^T = ('*')
  835. ^L^D_^B^O^L^D_^C^R^O^S^S ^O^U^T = ('*')
  836.  
  837. " DEFAULT KEY DEFINITIONS FOR THE FULL SCREEN EDITOR "
  838. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  839. ^N^A^M^E = ('FSEKEYS')...
  840. ^O^U^T = (^K1 ';' ^K2 ';' ^K3 ';' ^K4 ';' ^K5 ';' ^K6)
  841. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  842. ^N^A^M^E = ('FSEKEYS')...
  843. ^O^U^T = (^K7 ';' ^K8 ';' ^K9 ';' ^K10 ';' ^K11 ';' ^K12)
  844.  
  845. " END OF TERMINAL DEFINITION FILE FOR TEKTRONIX T4115(T) TERMINAL "
  846. *WEOR
  847. TDUZ19T *** REMOVE THIS LINE WHEN USING AS INPUT TO *TDU*. ***
  848. *WEOR
  849. TDUAD3T *** REMOVE THIS LINE WHEN USING AS INPUT TO *TDU*. ***
  850.  
  851. " TERMINAL DEFINITION FILE FOR LEAR SIEGLER ADM3A TERMINAL "
  852.  
  853. " VARIABLES FOR FULL SCREEN EDITOR FUNCTION KEY DEFINITIONS "
  854. ^K1 = ('SK1/VNS/L/ FWD/;SKS1/VPS/L/ BKW/')
  855. ^K2 = ('SK2/VN/L/LINEUP/;SKS2/VP/L/LINEDN/')
  856. ^K3 = ('SK3/.I/L/ INSC/;SKS3/.D/L/ DELC/')
  857. ^K4 = ('SK4/IBP1/L/ INSL/;SKS4/D;PN/L/ DELL/')
  858. ^K5 = ('SK5/SM/L/ MARK/;SKS5/U/L/ UNDO/')
  859. ^K6 = ('SK6/MMTP/L/ MOVE/;SKS6/CMTP/L/ COPY/')
  860. ^K7 = ('SK7/H/L/ HELP/;SKS7/SVO0/L/ LEFT/')
  861. ^K8 = ('SK8/Q/L/ QUIT/;SKS8/SVO&&C;.P+20/L/RIGHT/')
  862. ^K9 = ('SK9/.E/L/ENDLIN/;SKS9/SMW/L/MRKCHR/')
  863. ^K10 = ('SK10/SS/L/CLEAR/;SKS10/UM/L/UNMARK/')
  864. ^K11 = ('SK11/PF/L/FIRST/;SKS11/VL/L/ LAST/')
  865. ^K12 = ('SK12/IBP/L/ INSB/;SKS12/DB/L/ DELB/')
  866. ^K13 = ('SK13"L/&?/"L"LOCATE";SKS13/LN/L/LOCNXT/')
  867. ^K14 = ('SK14/.S/L/SPLIT/;SKS14/.J/L/ JOIN/')
  868. ^K15 = ('SK15/.F/L/ PARA/')
  869.  
  870. " MODEL NAME AND COMMUNICATION TYPE "
  871. ^M^O^D^E^L_^N^A^M^E ^V^A^L^U^E = 'ADM3AT'
  872. ^C^O^M^M^U^N^I^C^A^T^I^O^N^S ^T^Y^P^E = ^A^S^Y^N^C^H
  873.  
  874. " END OF INFORMATION SPECIFICATION "
  875. ^E^N^D_^O^F_^I^N^F^O^R^M^A^T^I^O^N ^I^N = (0)
  876.  
  877. " CURSOR POSITIONING INFORMATION "
  878. ^C^U^R^S^O^R_^P^O^S_^E^N^C^O^D^I^N^G ^B^I^A^S = (20(16)) ^T^Y^P^E = ^B^I^N^A^R^Y_^C^U^R^S^O^R
  879. ^C^U^R^S^O^R_^P^O^S_^C^O^L^U^M^N_^F^I^R^S^T ^V^A^L^U^E = FALSE
  880. ^C^U^R^S^O^R_^P^O^S_^C^O^L^U^M^N_^L^E^N^G^T^H ^V^A^L^U^E = (0)
  881. ^C^U^R^S^O^R_^P^O^S_^R^O^W_^L^E^N^G^T^H ^V^A^L^U^E = (0)
  882. ^C^U^R^S^O^R_^P^O^S_^B^E^G^I^N ^O^U^T = (1B(16) 3D(16))
  883.  
  884. " CURSOR MOVEMENT INFORMATION "
  885. ^C^U^R^S^O^R_^H^O^M^E ^I^N^O^U^T = (^R^S)
  886. ^C^U^R^S^O^R_^U^P ^I^N^O^U^T = (^V^T)
  887. ^C^U^R^S^O^R_^D^O^W^N ^I^N^O^U^T = (^L^F)
  888. ^C^U^R^S^O^R_^L^E^F^T ^I^N^O^U^T = (^B^S)
  889. ^C^U^R^S^O^R_^R^I^G^H^T ^I^N^O^U^T = (^F^F)
  890.  
  891. " CURSOR BEHAVIOR (^F^O^R ^C^U^R^S^O^R ^M^O^V^E^M^E^N^T ^K^E^Y^S) "
  892. ^M^O^V^E_^P^A^S^T_^R^I^G^H^T ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  893. ^M^O^V^E_^P^A^S^T_^L^E^F^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  894. ^M^O^V^E_^P^A^S^T_^T^O^P ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  895. ^M^O^V^E_^P^A^S^T_^B^O^T^T^O^M ^T^Y^P^E = ^S^C^R^O^L^L_^N^E^X^T
  896.  
  897. " CURSOR BEHAVIOR (^F^O^R ^C^H^A^R^A^C^T^E^R ^K^E^Y^S) "
  898. ^C^H^A^R_^P^A^S^T_^R^I^G^H^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  899. ^C^H^A^R_^P^A^S^T_^L^E^F^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  900. ^C^H^A^R_^P^A^S^T_^L^A^S^T_^P^O^S^I^T^I^O^N ^T^Y^P^E = ^S^C^R^O^L^L_^N^E^X^T
  901.  
  902. " PROTECTED CURSOR BEHAVIOR (^F^O^R ^C^U^R^S^O^R ^M^O^V^E^M^E^N^T ^K^E^Y^S) "
  903. ^P^R^O^T^E^C^T^E^D_^P^A^S^T_^R^I^G^H^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  904. ^P^R^O^T^E^C^T^E^D_^P^A^S^T_^L^E^F^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  905. ^P^R^O^T^E^C^T^E^D_^P^A^S^T_^U^P ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  906. ^P^R^O^T^E^C^T^E^D_^P^A^S^T_^D^O^W^N ^T^Y^P^E = ^S^C^R^O^L^L_^N^E^X^T
  907.  
  908. " PROTECTED CURSOR BEHAVIOR (^F^O^R ^C^H^A^R^A^C^T^E^R ^K^E^Y^S) "
  909. ^F^I^E^L^D_^P^A^S^T_^R^I^G^H^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  910. ^F^I^E^L^D_^P^A^S^T_^L^E^F^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  911. ^F^I^E^L^D_^P^A^S^T_^L^A^S^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  912. ^F^I^E^L^D_^B^E^F^O^R^E_^F^I^R^S^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  913.  
  914. " TERMINAL ATTRIBUTES "
  915. ^C^L^E^A^R^S_^W^H^E^N_^C^H^A^N^G^E_^S^I^Z^E ^V^A^L^U^E = FALSE
  916. ^F^U^N^C^T^I^O^N_^K^E^Y_^L^E^A^V^E^S_^M^A^R^K ^V^A^L^U^E = FALSE
  917. ^H^A^S_^H^I^D^D^E^N ^V^A^L^U^E = FALSE
  918. ^H^A^S_^P^R^O^T^E^C^T ^V^A^L^U^E = FALSE
  919. ^H^O^M^E_^A^T_^T^O^P ^V^A^L^U^E = TRUE
  920. ^M^U^L^T^I^P^L^E_^S^I^Z^E^S ^V^A^L^U^E = FALSE
  921. ^T^A^B^S_^T^O_^H^O^M^E ^V^A^L^U^E = FALSE
  922. ^T^A^B^S_^T^O_^T^A^B_^S^T^O^P^S ^V^A^L^U^E = FALSE
  923. ^T^A^B^S_^T^O_^U^N^P^R^O^T^E^C^T^E^D ^V^A^L^U^E = FALSE
  924. ^T^Y^P^E_^A^H^E^A^D ^V^A^L^U^E = TRUE
  925.  
  926. " SCREEN SIZES "
  927. ^S^E^T_^S^I^Z^E ^R^O^W^S = 24 ^C^O^L^U^M^N^S = 80 ^O^U^T = ()
  928.  
  929. " TERMINAL CAPABILITIES "
  930. ^E^R^A^S^E_^P^A^G^E_^H^O^M^E ^I^N^O^U^T = (^S^U^B)
  931.  
  932. " MISCELLANEOUS TERMINAL SEQUENCES "
  933. ^B^E^L^L_^N^A^K ^O^U^T = (^B^E^L)
  934.  
  935. " PROGRAMMABLE FUNCTION KEY INPUT INFORMATION "
  936. ^F1 ^I^N = (^E^S^C 31(16))
  937. ^F2 ^I^N = (^E^S^C 32(16))
  938. ^F3 ^I^N = (^E^S^C 33(16))
  939. ^F4 ^I^N = (^E^S^C 34(16))
  940. ^F5 ^I^N = (^E^S^C 35(16))
  941. ^F6 ^I^N = (^E^S^C 36(16))
  942. ^F7 ^I^N = (^E^S^C 37(16))
  943. ^F8 ^I^N = (^E^S^C 38(16))
  944. ^F9 ^I^N = (^E^S^C 39(16))
  945. ^F10 ^I^N = (^E^S^C 30(16))
  946. ^F11 ^I^N = (^E^S^C 3A(16))
  947. ^F12 ^I^N = (^E^S^C 2D(16))
  948. ^F13 ^I^N = (^E^S^C 5B(16))
  949. ^F14 ^I^N = (^E^S^C 5D(16))
  950. ^F15 ^I^N = (^E^S^C 5E(16))
  951. ^F16 ^I^N = ()
  952. ^F1_^S ^I^N = (^E^S^C 21(16))
  953. ^F2_^S ^I^N = (^E^S^C 22(16))
  954. ^F3_^S ^I^N = (^E^S^C 23(16))
  955. ^F4_^S ^I^N = (^E^S^C 24(16))
  956. ^F5_^S ^I^N = (^E^S^C 25(16))
  957. ^F6_^S ^I^N = (^E^S^C 26(16))
  958. ^F7_^S ^I^N = (^E^S^C 27(16))
  959. ^F8_^S ^I^N = (^E^S^C 28(16))
  960. ^F9_^S ^I^N = (^E^S^C 29(16))
  961. ^F11_^S ^I^N = (^E^S^C 2A(16))
  962. ^F12_^S ^I^N = (^E^S^C 3D(16))
  963. ^F13_^S ^I^N = (^E^S^C 7B(16))
  964. ^F14_^S ^I^N = (^E^S^C 7D(16))
  965. ^F15_^S ^I^N = (^E^S^C 7E(16))
  966. ^F16_^S ^I^N = ()
  967.  
  968. " CDC STANDARD FUNCTION KEY INPUT INFORMATION "
  969. ^B^A^C^K ^I^N = ()
  970. ^B^A^C^K_^S ^I^N = ()
  971. ^H^E^L^P ^I^N = ()
  972. ^H^E^L^P_^S ^I^N = ()
  973. ^S^T^O^P ^I^N = (14(16))
  974. ^S^T^O^P_^S ^I^N = (10(16))
  975. ^D^O^W^N ^I^N = ()
  976. ^D^O^W^N_^S ^I^N = ()
  977. ^U^P ^I^N = ()
  978. ^U^P_^S ^I^N = ()
  979. ^F^W^D ^I^N = ()
  980. ^F^W^D_^S ^I^N = ()
  981. ^B^K^W ^I^N = ()
  982. ^B^K^W_^S ^I^N = ()
  983. ^E^D^I^T ^I^N = ()
  984. ^E^D^I^T_^S ^I^N = ()
  985. ^D^A^T^A ^I^N = ()
  986. ^D^A^T^A_^S ^I^N = ()
  987.  
  988. " LINE DRAWING CHARACTER SPECIFICATION "
  989. ^L^D_^F^I^N^E_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = ('-')
  990. ^L^D_^F^I^N^E_^V^E^R^T^I^C^A^L ^O^U^T = ('^1')
  991. ^L^D_^F^I^N^E_^U^P^P^E^R_^L^E^F^T ^O^U^T = ('*')
  992. ^L^D_^F^I^N^E_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = ('*')
  993. ^L^D_^F^I^N^E_^L^O^W^E^R_^L^E^F^T ^O^U^T = ('*')
  994. ^L^D_^F^I^N^E_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = ('*')
  995. ^L^D_^F^I^N^E_^U^P_^T ^O^U^T = ('*')
  996. ^L^D_^F^I^N^E_^D^O^W^N_^T ^O^U^T = ('*')
  997. ^L^D_^F^I^N^E_^L^E^F^T_^T ^O^U^T = ('*')
  998. ^L^D_^F^I^N^E_^R^I^G^H^T_^T ^O^U^T = ('*')
  999. ^L^D_^F^I^N^E_^C^R^O^S^S ^O^U^T = ('*')
  1000. ^L^D_^M^E^D^I^U^M_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = ('-')
  1001. ^L^D_^M^E^D^I^U^M_^V^E^R^T^I^C^A^L ^O^U^T = ('^1')
  1002. ^L^D_^M^E^D^I^U^M_^U^P^P^E^R_^L^E^F^T ^O^U^T = ('*')
  1003. ^L^D_^M^E^D^I^U^M_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = ('*')
  1004. ^L^D_^M^E^D^I^U^M_^L^O^W^E^R_^L^E^F^T ^O^U^T = ('*')
  1005. ^L^D_^M^E^D^I^U^M_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = ('*')
  1006. ^L^D_^M^E^D^I^U^M_^U^P_^T ^O^U^T = ('*')
  1007. ^L^D_^M^E^D^I^U^M_^D^O^W^N_^T ^O^U^T = ('*')
  1008. ^L^D_^M^E^D^I^U^M_^L^E^F^T_^T ^O^U^T = ('*')
  1009. ^L^D_^M^E^D^I^U^M_^R^I^G^H^T_^T ^O^U^T = ('*')
  1010. ^L^D_^M^E^D^I^U^M_^C^R^O^S^S ^O^U^T = ('*')
  1011. ^L^D_^B^O^L^D_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = ('-')
  1012. ^L^D_^B^O^L^D_^V^E^R^T^I^C^A^L ^O^U^T = ('^1')
  1013. ^L^D_^B^O^L^D_^U^P^P^E^R_^L^E^F^T ^O^U^T = ('*')
  1014. ^L^D_^B^O^L^D_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = ('*')
  1015. ^L^D_^B^O^L^D_^L^O^W^E^R_^L^E^F^T ^O^U^T = ('*')
  1016. ^L^D_^B^O^L^D_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = ('*')
  1017. ^L^D_^B^O^L^D_^U^P_^T ^O^U^T = ('*')
  1018. ^L^D_^B^O^L^D_^D^O^W^N_^T ^O^U^T = ('*')
  1019. ^L^D_^B^O^L^D_^L^E^F^T_^T ^O^U^T = ('*')
  1020. ^L^D_^B^O^L^D_^R^I^G^H^T_^T ^O^U^T = ('*')
  1021. ^L^D_^B^O^L^D_^C^R^O^S^S ^O^U^T = ('*')
  1022.  
  1023. " DEFAULT KEY DEFINITIONS FOR THE FULL SCREEN EDITOR "
  1024. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  1025. ^N^A^M^E = ('FSEKEYS')...
  1026. ^O^U^T = (^K1 ';' ^K2 ';' ^K3 ';' ^K4 ';' ^K5)
  1027. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  1028. ^N^A^M^E = ('FSEKEYS')...
  1029. ^O^U^T = (^K6 ';' ^K7 ';' ^K8 ';' ^K9 ';' ^K10)
  1030. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  1031. ^N^A^M^E = ('FSEKEYS')...
  1032. ^O^U^T = (^K11 ';' ^K12 ';' ^K13 ';' ^K14 ';' ^K15)
  1033.  
  1034. " END OF TERMINAL DEFINITION FILE FOR LEAR SIEGLER ADM3A(T) TERMINAL "
  1035. *WEOR
  1036. TDUAD5T *** REMOVE THIS LINE WHEN USING AS INPUT TO *TDU*. ***
  1037.  
  1038. " TERMINAL DEFINITION FILE FOR LEAR SIEGLER ADM5 TERMINAL "
  1039.  
  1040. " VARIABLES FOR FULL SCREEN EDITOR FUNCTION KEY DEFINITIONS "
  1041. ^K1 = ('SK1/VNS/L/ FWD/;SKS1/VPS/L/ BKW/')
  1042. ^K2 = ('SK2/VN/L/LINEUP/;SKS2/VP/L/LINEDN/')
  1043. ^K3 = ('SK3/.I/L/ INSC/;SKS3/.D/L/ DELC/')
  1044. ^K4 = ('SK4/IBP1/L/ INSL/;SKS4/D;PN/L/ DELL/')
  1045. ^K5 = ('SK5/SM/L/ MARK/;SKS5/U/L/ UNDO/')
  1046. ^K6 = ('SK6/MMTP/L/ MOVE/;SKS6/CMTP/L/ COPY/')
  1047. ^K7 = ('SK7/H/L/ HELP/;SKS7/SVO0/L/ LEFT/')
  1048. ^K8 = ('SK8/Q/L/ QUIT/;SKS8/SVO&C;.P+20/L/RIGHT/')
  1049. ^K9 = ('SK9/.E/L/ENDLIN/;SKS9/SMW/L/MRKCHR/')
  1050. ^K10 = ('SK10/SS/L/CLEAR/;SKS10/UM/L/UNMARK/')
  1051. ^K11 = ('SK11/PF/L/FIRST/;SKS11/VL/L/ LAST/')
  1052. ^K12 = ('SK12/IBP/L/ INSB/;SKS12/DB/L/ DELB/')
  1053. ^K13 = ('SK13"L/&?/"L"LOCATE";SKS13/LN/L/LOCNXT/')
  1054. ^K14 = ('SK14/.S/L/SPLIT/;SKS14/.J/L/ JOIN/')
  1055.  
  1056. " MODEL NAME AND COMMUNICATION TYPE "
  1057. ^M^O^D^E^L_^N^A^M^E ^V^A^L^U^E = 'ADM5T'
  1058. ^C^O^M^M^U^N^I^C^A^T^I^O^N^S ^T^Y^P^E = ^A^S^Y^N^C^H
  1059.  
  1060. " END OF INFORMATION SPECIFICATION "
  1061. ^E^N^D_^O^F_^I^N^F^O^R^M^A^T^I^O^N ^I^N = (0)
  1062.  
  1063. " CURSOR POSITIONING INFORMATION "
  1064. ^C^U^R^S^O^R_^P^O^S_^E^N^C^O^D^I^N^G ^B^I^A^S = (20(16)) ^T^Y^P^E = ^B^I^N^A^R^Y_^C^U^R^S^O^R
  1065. ^C^U^R^S^O^R_^P^O^S_^C^O^L^U^M^N_^F^I^R^S^T ^V^A^L^U^E = FALSE
  1066. ^C^U^R^S^O^R_^P^O^S_^C^O^L^U^M^N_^L^E^N^G^T^H ^V^A^L^U^E = (0)
  1067. ^C^U^R^S^O^R_^P^O^S_^R^O^W_^L^E^N^G^T^H ^V^A^L^U^E = (0)
  1068. ^C^U^R^S^O^R_^P^O^S_^B^E^G^I^N ^O^U^T = (1B(16) 3D(16))
  1069.  
  1070. " CURSOR MOVEMENT INFORMATION "
  1071. ^C^U^R^S^O^R_^H^O^M^E ^I^N^O^U^T = (^R^S)
  1072. ^C^U^R^S^O^R_^U^P ^I^N^O^U^T = (^V^T)
  1073. ^C^U^R^S^O^R_^D^O^W^N ^I^N^O^U^T = (^L^F)
  1074. ^C^U^R^S^O^R_^L^E^F^T ^I^N^O^U^T = (^B^S)
  1075. ^C^U^R^S^O^R_^R^I^G^H^T ^I^N^O^U^T = (^F^F)
  1076.  
  1077. " CURSOR BEHAVIOR (^F^O^R ^C^U^R^S^O^R ^M^O^V^E^M^E^N^T ^K^E^Y^S) "
  1078. ^M^O^V^E_^P^A^S^T_^R^I^G^H^T ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  1079. ^M^O^V^E_^P^A^S^T_^L^E^F^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  1080. ^M^O^V^E_^P^A^S^T_^T^O^P ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  1081. ^M^O^V^E_^P^A^S^T_^B^O^T^T^O^M ^T^Y^P^E = ^S^C^R^O^L^L_^N^E^X^T
  1082.  
  1083. " CURSOR BEHAVIOR (^F^O^R ^C^H^A^R^A^C^T^E^R ^K^E^Y^S) "
  1084. ^C^H^A^R_^P^A^S^T_^R^I^G^H^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  1085. ^C^H^A^R_^P^A^S^T_^L^E^F^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  1086. ^C^H^A^R_^P^A^S^T_^L^A^S^T_^P^O^S^I^T^I^O^N ^T^Y^P^E = ^S^C^R^O^L^L_^N^E^X^T
  1087.  
  1088. " PROTECTED CURSOR BEHAVIOR (^F^O^R ^C^U^R^S^O^R ^M^O^V^E^M^E^N^T ^K^E^Y^S) "
  1089. ^P^R^O^T^E^C^T^E^D_^P^A^S^T_^R^I^G^H^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  1090. ^P^R^O^T^E^C^T^E^D_^P^A^S^T_^L^E^F^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  1091. ^P^R^O^T^E^C^T^E^D_^P^A^S^T_^U^P ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  1092. ^P^R^O^T^E^C^T^E^D_^P^A^S^T_^D^O^W^N ^T^Y^P^E = ^S^C^R^O^L^L_^N^E^X^T
  1093.  
  1094. " PROTECTED CURSOR BEHAVIOR (^F^O^R ^C^H^A^R^A^C^T^E^R ^K^E^Y^S) "
  1095. ^F^I^E^L^D_^P^A^S^T_^R^I^G^H^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  1096. ^F^I^E^L^D_^P^A^S^T_^L^E^F^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  1097. ^F^I^E^L^D_^P^A^S^T_^L^A^S^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  1098. ^F^I^E^L^D_^B^E^F^O^R^E_^F^I^R^S^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  1099.  
  1100. " TERMINAL ATTRIBUTES "
  1101. ^C^L^E^A^R^S_^W^H^E^N_^C^H^A^N^G^E_^S^I^Z^E ^V^A^L^U^E = FALSE
  1102. ^F^U^N^C^T^I^O^N_^K^E^Y_^L^E^A^V^E^S_^M^A^R^K ^V^A^L^U^E = FALSE
  1103. ^H^A^S_^H^I^D^D^E^N ^V^A^L^U^E = FALSE
  1104. ^H^A^S_^P^R^O^T^E^C^T ^V^A^L^U^E = FALSE
  1105. ^H^O^M^E_^A^T_^T^O^P ^V^A^L^U^E = TRUE
  1106. ^M^U^L^T^I^P^L^E_^S^I^Z^E^S ^V^A^L^U^E = FALSE
  1107. ^T^A^B^S_^T^O_^H^O^M^E ^V^A^L^U^E = FALSE
  1108. ^T^A^B^S_^T^O_^T^A^B_^S^T^O^P^S ^V^A^L^U^E = FALSE
  1109. ^T^A^B^S_^T^O_^U^N^P^R^O^T^E^C^T^E^D ^V^A^L^U^E = FALSE
  1110. ^T^Y^P^E_^A^H^E^A^D ^V^A^L^U^E = TRUE
  1111.  
  1112. " SCREEN SIZES "
  1113. ^S^E^T_^S^I^Z^E ^R^O^W^S = 24 ^C^O^L^U^M^N^S = 80 ^O^U^T = ()
  1114.  
  1115. " TERMINAL CAPABILITIES "
  1116. ^E^R^A^S^E_^E^N^D_^O^F_^P^A^G^E ^I^N^O^U^T = (1B(16) 59(16))
  1117. ^E^R^A^S^E_^P^A^G^E_^H^O^M^E ^I^N^O^U^T = (^S^U^B)
  1118.  
  1119. " MISCELLANEOUS TERMINAL SEQUENCES "
  1120. ^B^E^L^L_^N^A^K ^O^U^T = (^B^E^L)
  1121.  
  1122. " PROGRAMMABLE FUNCTION KEY INPUT INFORMATION "
  1123. ^F1 ^I^N = (^E^S^C 31(16))
  1124. ^F2 ^I^N = (^E^S^C 32(16))
  1125. ^F3 ^I^N = (^E^S^C 33(16))
  1126. ^F4 ^I^N = (^E^S^C 34(16))
  1127. ^F5 ^I^N = (^E^S^C 35(16))
  1128. ^F6 ^I^N = (^E^S^C 36(16))
  1129. ^F7 ^I^N = (^E^S^C 37(16))
  1130. ^F8 ^I^N = (^E^S^C 38(16))
  1131. ^F9 ^I^N = (^E^S^C 39(16))
  1132. ^F10 ^I^N = (^E^S^C 30(16))
  1133. ^F11 ^I^N = (^E^S^C 3A(16))
  1134. ^F12 ^I^N = (^E^S^C 2D(16))
  1135. ^F13 ^I^N = (^E^S^C 5B(16))
  1136. ^F14 ^I^N = (^E^S^C 5D(16))
  1137. ^F15 ^I^N = ()
  1138. ^F16 ^I^N = ()
  1139. ^F1_^S ^I^N = (^E^S^C 21(16))
  1140. ^F2_^S ^I^N = (^E^S^C 22(16))
  1141. ^F3_^S ^I^N = (^E^S^C 23(16))
  1142. ^F4_^S ^I^N = (^E^S^C 24(16))
  1143. ^F5_^S ^I^N = (^E^S^C 25(16))
  1144. ^F6_^S ^I^N = (^E^S^C 26(16))
  1145. ^F7_^S ^I^N = (^E^S^C 27(16))
  1146. ^F8_^S ^I^N = (^E^S^C 28(16))
  1147. ^F9_^S ^I^N = (^E^S^C 29(16))
  1148. ^F11_^S ^I^N = (^E^S^C 2A(16))
  1149. ^F12_^S ^I^N = (^E^S^C 3D(16))
  1150. ^F13_^S ^I^N = (^E^S^C 7B(16))
  1151. ^F14_^S ^I^N = (^E^S^C 7D(16))
  1152. ^F15_^S ^I^N = ()
  1153. ^F16_^S ^I^N = ()
  1154.  
  1155. " CDC STANDARD FUNCTION KEY INPUT INFORMATION "
  1156. ^B^A^C^K ^I^N = ()
  1157. ^B^A^C^K_^S ^I^N = ()
  1158. ^H^E^L^P ^I^N = ()
  1159. ^H^E^L^P_^S ^I^N = ()
  1160. ^S^T^O^P ^I^N = (14(16))
  1161. ^S^T^O^P_^S ^I^N = (10(16))
  1162. ^D^O^W^N ^I^N = ()
  1163. ^D^O^W^N_^S ^I^N = ()
  1164. ^U^P ^I^N = ()
  1165. ^U^P_^S ^I^N = ()
  1166. ^F^W^D ^I^N = ()
  1167. ^F^W^D_^S ^I^N = ()
  1168. ^B^K^W ^I^N = ()
  1169. ^B^K^W_^S ^I^N = ()
  1170. ^E^D^I^T ^I^N = ()
  1171. ^E^D^I^T_^S ^I^N = ()
  1172. ^D^A^T^A ^I^N = ()
  1173. ^D^A^T^A_^S ^I^N = ()
  1174.  
  1175. " LINE DRAWING CHARACTER SPECIFICATION "
  1176. ^L^D_^F^I^N^E_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = ('-')
  1177. ^L^D_^F^I^N^E_^V^E^R^T^I^C^A^L ^O^U^T = ('^1')
  1178. ^L^D_^F^I^N^E_^U^P^P^E^R_^L^E^F^T ^O^U^T = ('*')
  1179. ^L^D_^F^I^N^E_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = ('*')
  1180. ^L^D_^F^I^N^E_^L^O^W^E^R_^L^E^F^T ^O^U^T = ('*')
  1181. ^L^D_^F^I^N^E_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = ('*')
  1182. ^L^D_^F^I^N^E_^U^P_^T ^O^U^T = ('*')
  1183. ^L^D_^F^I^N^E_^D^O^W^N_^T ^O^U^T = ('*')
  1184. ^L^D_^F^I^N^E_^L^E^F^T_^T ^O^U^T = ('*')
  1185. ^L^D_^F^I^N^E_^R^I^G^H^T_^T ^O^U^T = ('*')
  1186. ^L^D_^F^I^N^E_^C^R^O^S^S ^O^U^T = ('*')
  1187. ^L^D_^M^E^D^I^U^M_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = ('-')
  1188. ^L^D_^M^E^D^I^U^M_^V^E^R^T^I^C^A^L ^O^U^T = ('^1')
  1189. ^L^D_^M^E^D^I^U^M_^U^P^P^E^R_^L^E^F^T ^O^U^T = ('*')
  1190. ^L^D_^M^E^D^I^U^M_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = ('*')
  1191. ^L^D_^M^E^D^I^U^M_^L^O^W^E^R_^L^E^F^T ^O^U^T = ('*')
  1192. ^L^D_^M^E^D^I^U^M_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = ('*')
  1193. ^L^D_^M^E^D^I^U^M_^U^P_^T ^O^U^T = ('*')
  1194. ^L^D_^M^E^D^I^U^M_^D^O^W^N_^T ^O^U^T = ('*')
  1195. ^L^D_^M^E^D^I^U^M_^L^E^F^T_^T ^O^U^T = ('*')
  1196. ^L^D_^M^E^D^I^U^M_^R^I^G^H^T_^T ^O^U^T = ('*')
  1197. ^L^D_^M^E^D^I^U^M_^C^R^O^S^S ^O^U^T = ('*')
  1198. ^L^D_^B^O^L^D_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = ('-')
  1199. ^L^D_^B^O^L^D_^V^E^R^T^I^C^A^L ^O^U^T = ('^1')
  1200. ^L^D_^B^O^L^D_^U^P^P^E^R_^L^E^F^T ^O^U^T = ('*')
  1201. ^L^D_^B^O^L^D_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = ('*')
  1202. ^L^D_^B^O^L^D_^L^O^W^E^R_^L^E^F^T ^O^U^T = ('*')
  1203. ^L^D_^B^O^L^D_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = ('*')
  1204. ^L^D_^B^O^L^D_^U^P_^T ^O^U^T = ('*')
  1205. ^L^D_^B^O^L^D_^D^O^W^N_^T ^O^U^T = ('*')
  1206. ^L^D_^B^O^L^D_^L^E^F^T_^T ^O^U^T = ('*')
  1207. ^L^D_^B^O^L^D_^R^I^G^H^T_^T ^O^U^T = ('*')
  1208. ^L^D_^B^O^L^D_^C^R^O^S^S ^O^U^T = ('*')
  1209.  
  1210. " DEFAULT KEY DEFINITIONS FOR THE FULL SCREEN EDITOR "
  1211. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  1212. ^N^A^M^E = ('FSEKEYS')...
  1213. ^O^U^T = (^K1 ';' ^K2 ';' ^K3 ';' ^K4 ';' ^K5)
  1214. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  1215. ^N^A^M^E = ('FSEKEYS')...
  1216. ^O^U^T = (^K6 ';' ^K7 ';' ^K8 ';' ^K9 ';' ^K10)
  1217. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  1218. ^N^A^M^E = ('FSEKEYS')...
  1219. ^O^U^T = (^K11 ';' ^K12 ';' ^K13 ';' ^K14)
  1220.  
  1221. " END OF TERMINAL DEFINITION FILE FOR LEAR SIEGLER ADM5(T) TERMINAL "
  1222. *WEOR
  1223. TDUVK3T *** REMOVE THIS LINE WHEN USING AS INPUT TO *TDU*. ***
  1224. *WEOR
  1225. TDU7223 *** REMOVE THIS LINE WHEN USING AS INPUT TO *TDU*. ***
  1226. *WEOR
  1227. TDU723T *** REMOVE THIS LINE WHEN USING AS INPUT TO *TDU*. ***
  1228. *WEOR
  1229. TDU3270 *** REMOVE THIS LINE WHEN USING AS INPUT TO *TDU*. ***
  1230.  
  1231. " TERMINAL DEFINITION FILE FOR THE IBM 3270 TERMINAL "
  1232.  
  1233. " VARIABLES "
  1234. ERASE_UNPROT_TO_ADDRESS = (12(16))
  1235. GRAPHIC_ESCAPE = (00(16))
  1236. INSERT_CURSOR = (13(16))
  1237. MODIFY_FIELD = (00(16))
  1238. PROGRAM_TAB = (09(16))
  1239. REPEAT_TO_ADDRESS = (14(16))
  1240. SET_ATTRIBUTE = (00(16))
  1241. SET_BUFFER_ADDRESS = (11(16))
  1242. START_FIELD = (1D(16))
  1243. START_FIELD_EXTENDED = (00(16))
  1244. NULL = (00(16))
  1245.  
  1246. FIRST_ROW = (00(16))
  1247. FIRST_COLUMN = (00(16))
  1248. CURRENT_ROW = (7E(16))
  1249. CURRENT_COLUMN = (7E(16))
  1250. MAXIMUM_ROW = (7F(16))
  1251. MAXIMUM_COLUMN = (7F(16))
  1252.  
  1253. HOME = (FIRST_ROW FIRST_COLUMN)
  1254. START_OF_ROW = (CURRENT_ROW FIRST_COLUMN)
  1255. END_OF_ROW = (CURRENT_ROW MAXIMUM_COLUMN)
  1256. END_OF_PAGE = (MAXIMUM_ROW MAXIMUM_COLUMN)
  1257. CURRENT_POSITION = (CURRENT_ROW CURRENT_COLUMN)
  1258.  
  1259. " VARIABLES FOR FULL SCREEN EDITOR FUNCTION KEY DEFINITIONS "
  1260. K1 = ('SK1/VNS/L/ FWD/;SKS1/VN/L/LINEUP/')
  1261. K2 = ('SK2/VPS/L/ BKW/;SKS2/VP/L/LINEDN/')
  1262. K3 = ('SK3/UM/L/UNMARK/')
  1263. K4 = ('SK4/IBP1/L/ INSL/;SKS4/D;PN/L/ DELL/')
  1264. K5 = ('SK5/SM/L/ MARK/;SKS5/U/L/ UNDO/')
  1265. K6 = ('SK6/MMTP/L/ MOVE/;SKS6/CMTP/L/ COPY/')
  1266. K7 = ('SK7/VH/L/ HOME/;SKS7/H/L/ HELP/')
  1267. K8 = ('SK8/Q/L/ QUIT/;SKS8/SS/L/ CLEAR/')
  1268. K9 = ('SK9/.E/L/ENDLIN/')
  1269.  
  1270. ^M^O^D^E^L_^N^A^M^E ^V^A^L^U^E = '3270'
  1271. ^C^O^M^M^U^N^I^C^A^T^I^O^N^S ^T^Y^P^E = ^A^S^Y^N^C^H
  1272. ^E^N^D_^O^F_^I^N^F^O^R^M^A^T^I^O^N ^I^N = (0)
  1273. ^C^U^R^S^O^R_^P^O^S_^E^N^C^O^D^I^N^G ^B^I^A^S = (0) ^T^Y^P^E = IBM3270_^C^U^R^S^O^R
  1274. ^C^U^R^S^O^R_^P^O^S_^B^E^G^I^N ^I^N = (^S^E^T_^B^U^F^F^E^R_^A^D^D^R^E^S^S)
  1275. ^C^U^R^S^O^R_^P^O^S_^B^E^G^I^N ^O^U^T = (^S^E^T_^B^U^F^F^E^R_^A^D^D^R^E^S^S ^C^U^R^R^E^N^T_^P^O^S^I^T^I^O^N)
  1276.  
  1277. " CURSOR BEHAVIOR (^F^O^R ^C^U^R^S^O^R ^M^O^V^E^M^E^N^T ^K^E^Y^S) "
  1278. ^M^O^V^E_^P^A^S^T_^R^I^G^H^T ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  1279. ^M^O^V^E_^P^A^S^T_^L^E^F^T ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  1280. ^M^O^V^E_^P^A^S^T_^T^O^P ^T^Y^P^E = ^W^R^A^P_^S^A^M^E_^N^E^X^T
  1281. ^M^O^V^E_^P^A^S^T_^B^O^T^T^O^M ^T^Y^P^E = ^W^R^A^P_^S^A^M^E_^N^E^X^T
  1282.  
  1283. " CURSOR BEHAVIOR (^F^O^R ^C^H^A^R^A^C^T^E^R ^K^E^Y^S) "
  1284. ^C^H^A^R_^P^A^S^T_^R^I^G^H^T ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  1285. ^C^H^A^R_^P^A^S^T_^L^E^F^T ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  1286. ^C^H^A^R_^P^A^S^T_^L^A^S^T_^P^O^S^I^T^I^O^N ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  1287.  
  1288. " CURSOR BEHAVIOR (^F^O^R ^C^U^R^S^O^R ^M^O^V^E^M^E^N^T ^I^N ^A ^P^R^O^T^E^C^T^E^D ^E^N^V^I^R^O^N^M^E^N^T) "
  1289. ^P^R^O^T^E^C^T^E^D_^P^A^S^T_^R^I^G^H^T ^T^Y^P^E = ^A^U^T^O_^T^A^B_^N^E^X^T
  1290. ^P^R^O^T^E^C^T^E^D_^P^A^S^T_^L^E^F^T ^T^Y^P^E = ^A^U^T^O_^T^A^B_^P^R^E^V^I^O^U^S
  1291. ^P^R^O^T^E^C^T^E^D_^P^A^S^T_^U^P ^T^Y^P^E = ^A^U^T^O_^T^A^B_^P^R^E^V^I^O^U^S
  1292. ^P^R^O^T^E^C^T^E^D_^P^A^S^T_^D^O^W^N ^T^Y^P^E = ^A^U^T^O_^T^A^B_^N^E^X^T
  1293.  
  1294. " CURSOR BEHAVIOR (^F^O^R ^C^H^A^R^A^C^T^E^R ^I^N^P^U^T ^I^N ^A ^P^R^O^T^E^C^T^E^D ^E^N^V^I^R^O^N^M^E^N^T) "
  1295. ^F^I^E^L^D_^P^A^S^T_^R^I^G^H^T ^T^Y^P^E = ^A^U^T^O_^T^A^B_^N^E^X^T
  1296. ^F^I^E^L^D_^P^A^S^T_^L^E^F^T ^T^Y^P^E = ^A^U^T^O_^T^A^B_^P^R^E^V^I^O^U^S
  1297. ^F^I^E^L^D_^P^A^S^T_^L^A^S^T ^T^Y^P^E = ^A^U^T^O_^T^A^B_^N^E^X^T
  1298. ^F^I^E^L^D_^B^E^F^O^R^E_^F^I^R^S^T ^T^Y^P^E = ^A^U^T^O_^T^A^B_^P^R^E^V^I^O^U^S
  1299.  
  1300. " TERMINAL ATTRIBUTES "
  1301. ^A^U^T^O^M^A^T^I^C_^T^A^B^B^I^N^G ^V^A^L^U^E = TRUE
  1302. ^B^L^O^C^K_^M^O^D^E ^V^A^L^U^E = TRUE
  1303. ^C^L^E^A^R^S_^W^H^E^N_^C^H^A^N^G^E_^S^I^Z^E ^V^A^L^U^E = FALSE
  1304. ^F^U^N^C^T^I^O^N_^K^E^Y_^L^E^A^V^E^S_^M^A^R^K ^V^A^L^U^E = FALSE
  1305. ^H^A^S_^H^I^D^D^E^N ^V^A^L^U^E = TRUE
  1306. ^H^A^S_^P^R^O^T^E^C^T ^V^A^L^U^E = TRUE
  1307. ^H^O^M^E_^A^T_^T^O^P ^V^A^L^U^E = TRUE
  1308. ^M^U^L^T^I^P^L^E_^S^I^Z^E^S ^V^A^L^U^E = FALSE
  1309. ^T^A^B^S_^T^O_^H^O^M^E ^V^A^L^U^E = FALSE
  1310. ^T^A^B^S_^T^O_^T^A^B_^S^T^O^P^S ^V^A^L^U^E = FALSE
  1311. ^T^A^B^S_^T^O_^U^N^P^R^O^T^E^C^T^E^D ^V^A^L^U^E = FALSE
  1312. ^T^Y^P^E_^A^H^E^A^D ^V^A^L^U^E = FALSE
  1313.  
  1314. " SCREEN SIZES "
  1315. ^S^E^T_^S^I^Z^E ^R^O^W^S = 24 ^C^O^L^U^M^N^S = 80 ^O^U^T = ()
  1316.  
  1317. " SCREEN AND LINE MODE TRANSITION "
  1318.  
  1319. " TERMINAL CAPABILITIES "
  1320. ^E^R^A^S^E_^E^N^D_^O^F_^L^I^N^E ^O^U^T = (^R^E^P^E^A^T_^T^O_^A^D^D^R^E^S^S ^E^N^D_^O^F_^R^O^W ...
  1321. ^N^U^L^L ^N^U^L^L ^S^E^T_^B^U^F^F^E^R_^A^D^D^R^E^S^S ^C^U^R^R^E^N^T_^P^O^S^I^T^I^O^N)
  1322. ^E^R^A^S^E_^P^A^G^E_^H^O^M^E ^I^N = (5F(16))
  1323. ^E^R^A^S^E_^P^A^G^E_^H^O^M^E ^O^U^T = (^S^E^T_^B^U^F^F^E^R_^A^D^D^R^E^S^S ^H^O^M^E...
  1324. ^R^E^P^E^A^T_^T^O_^A^D^D^R^E^S^S ^H^O^M^E ^N^U^L^L)
  1325.  
  1326. " MISCELLANEOUS TERMINAL SEQUENCES "
  1327. ^O^U^T^P^U^T_^B^E^G^I^N ^O^U^T = (31(16) 43(16) ...
  1328. ^S^E^T_^B^U^F^F^E^R_^A^D^D^R^E^S^S ^H^O^M^E)
  1329. ^O^U^T^P^U^T_^E^N^D ^O^U^T = (^I^N^S^E^R^T_^C^U^R^S^O^R)
  1330.  
  1331. " PROGRAMMABLE FUNCTION KEY INPUT INFORMATION "
  1332. ^F1 ^I^N = (31(16))
  1333. ^F2 ^I^N = (32(16))
  1334. ^F3 ^I^N = (33(16))
  1335. ^F4 ^I^N = (34(16))
  1336. ^F5 ^I^N = (35(16))
  1337. ^F6 ^I^N = (36(16))
  1338. ^F7 ^I^N = (37(16))
  1339. ^F8 ^I^N = (38(16))
  1340. ^F9 ^I^N = (39(16))
  1341. ^F10 ^I^N = (3A(16))
  1342. ^F11 ^I^N = (23(16))
  1343. ^F12 ^I^N = (40(16))
  1344. ^F1_^S ^I^N = (41(16))
  1345. ^F2_^S ^I^N = (42(16))
  1346. ^F3_^S ^I^N = (43(16))
  1347. ^F4_^S ^I^N = (44(16))
  1348. ^F5_^S ^I^N = (45(16))
  1349. ^F6_^S ^I^N = (46(16))
  1350. ^F7_^S ^I^N = (47(16))
  1351. ^F8_^S ^I^N = (48(16))
  1352. ^F9_^S ^I^N = (49(16))
  1353. ^F10_^S ^I^N = (5B(16))
  1354. ^F11_^S ^I^N = (2E(16))
  1355. ^F12_^S ^I^N = (3C(16))
  1356.  
  1357. " CDC STANDARD FUNCTION KEY INPUT INFORMATION "
  1358. ^N^E^X^T ^I^N = (27(16))
  1359. ^N^E^X^T_^S ^I^N = (3E(16))
  1360.  
  1361. " LOGICAL ATTRIBUTE SPECIFICATIONS "
  1362. ^E^R^R^O^R_^B^E^G^I^N ^O^U^T = (^S^T^A^R^T_^F^I^E^L^D 38(16))
  1363. ^I^N^P^U^T_^T^E^X^T_^B^E^G^I^N ^O^U^T = (^S^T^A^R^T_^F^I^E^L^D 20(16))
  1364. ^I^T^A^L^I^C_^B^E^G^I^N ^O^U^T = (^S^T^A^R^T_^F^I^E^L^D 38(16))
  1365. ^M^E^S^S^A^G^E_^B^E^G^I^N ^O^U^T = (^S^T^A^R^T_^F^I^E^L^D 38(16))
  1366. ^O^U^T^P^U^T_^T^E^X^T_^B^E^G^I^N ^O^U^T = (^S^T^A^R^T_^F^I^E^L^D 34(16))
  1367. ^T^I^T^L^E_^B^E^G^I^N ^O^U^T = (^S^T^A^R^T_^F^I^E^L^D 34(16))
  1368.  
  1369. " LINE DRAWING CHARACTER SPECIFICATION "
  1370. ^L^D_^F^I^N^E_^B^E^G^I^N ^O^U^T = ()
  1371. ^L^D_^F^I^N^E_^E^N^D ^O^U^T = ()
  1372. ^L^D_^F^I^N^E_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = ('-')
  1373. ^L^D_^F^I^N^E_^V^E^R^T^I^C^A^L ^O^U^T = ('^1')
  1374. ^L^D_^F^I^N^E_^U^P^P^E^R_^L^E^F^T ^O^U^T = ('*')
  1375. ^L^D_^F^I^N^E_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = ('*')
  1376. ^L^D_^F^I^N^E_^L^O^W^E^R_^L^E^F^T ^O^U^T = ('*')
  1377. ^L^D_^F^I^N^E_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = ('*')
  1378. ^L^D_^F^I^N^E_^U^P_^T ^O^U^T = ('*')
  1379. ^L^D_^F^I^N^E_^D^O^W^N_^T ^O^U^T = ('*')
  1380. ^L^D_^F^I^N^E_^L^E^F^T_^T ^O^U^T = ('*')
  1381. ^L^D_^F^I^N^E_^R^I^G^H^T_^T ^O^U^T = ('*')
  1382. ^L^D_^F^I^N^E_^C^R^O^S^S ^O^U^T = ('+')
  1383. ^L^D_^M^E^D^I^U^M_^B^E^G^I^N ^O^U^T = ()
  1384. ^L^D_^M^E^D^I^U^M_^E^N^D ^O^U^T = ()
  1385. ^L^D_^M^E^D^I^U^M_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = ('-')
  1386. ^L^D_^M^E^D^I^U^M_^V^E^R^T^I^C^A^L ^O^U^T = ('^1')
  1387. ^L^D_^M^E^D^I^U^M_^U^P^P^E^R_^L^E^F^T ^O^U^T = ('*')
  1388. ^L^D_^M^E^D^I^U^M_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = ('*')
  1389. ^L^D_^M^E^D^I^U^M_^L^O^W^E^R_^L^E^F^T ^O^U^T = ('*')
  1390. ^L^D_^M^E^D^I^U^M_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = ('*')
  1391. ^L^D_^M^E^D^I^U^M_^U^P_^T ^O^U^T = ('*')
  1392. ^L^D_^M^E^D^I^U^M_^D^O^W^N_^T ^O^U^T = ('*')
  1393. ^L^D_^M^E^D^I^U^M_^L^E^F^T_^T ^O^U^T = ('*')
  1394. ^L^D_^M^E^D^I^U^M_^R^I^G^H^T_^T ^O^U^T = ('*')
  1395. ^L^D_^M^E^D^I^U^M_^C^R^O^S^S ^O^U^T = ('+')
  1396. ^L^D_^B^O^L^D_^B^E^G^I^N ^O^U^T = ()
  1397. ^L^D_^B^O^L^D_^E^N^D ^O^U^T = ()
  1398. ^L^D_^B^O^L^D_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = ('-')
  1399. ^L^D_^B^O^L^D_^V^E^R^T^I^C^A^L ^O^U^T = ('^1')
  1400. ^L^D_^B^O^L^D_^U^P^P^E^R_^L^E^F^T ^O^U^T = ('*')
  1401. ^L^D_^B^O^L^D_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = ('*')
  1402. ^L^D_^B^O^L^D_^L^O^W^E^R_^L^E^F^T ^O^U^T = ('*')
  1403. ^L^D_^B^O^L^D_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = ('*')
  1404. ^L^D_^B^O^L^D_^U^P_^T ^O^U^T = ('*')
  1405. ^L^D_^B^O^L^D_^D^O^W^N_^T ^O^U^T = ('*')
  1406. ^L^D_^B^O^L^D_^L^E^F^T_^T ^O^U^T = ('*')
  1407. ^L^D_^B^O^L^D_^R^I^G^H^T_^T ^O^U^T = ('*')
  1408. ^L^D_^B^O^L^D_^C^R^O^S^S ^O^U^T = ('+')
  1409.  
  1410. " DEFAULT KEY DEFINITIONS FOR THE FULL SCREEN EDITOR "
  1411. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  1412. ^N^A^M^E = ('FSEKEYS')...
  1413. ^O^U^T = (^K1 ';' ^K2)
  1414. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  1415. ^N^A^M^E = ('FSEKEYS')...
  1416. ^O^U^T = (^K3 ';' ^K4)
  1417. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  1418. ^N^A^M^E = ('FSEKEYS')...
  1419. ^O^U^T = (^K5 ';' ^K6)
  1420. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  1421. ^N^A^M^E = ('FSEKEYS')...
  1422. ^O^U^T = (^K7 ';' ^K8 ';' ^K9)
  1423.  
  1424. " END OF TERMINAL DEFINITION FILE FOR THE IBM 3270 TERMINAL "
  1425. *WEOR
  1426. TDUPCCN *** REMOVE THIS LINE WHEN USING AS INPUT TO *TDU*. ***
  1427. *WEOR
  1428. TDUPC11 *** REMOVE THIS LINE WHEN USING AS INPUT TO *TDU*. ***
  1429. *WEOR
  1430. TDUPC12 *** REMOVE THIS LINE WHEN USING AS INPUT TO *TDU*. ***
  1431. *WEOR
  1432. TDUPC13 *** REMOVE THIS LINE WHEN USING AS INPUT TO *TDU*. ***
  1433. *WEOR
  1434. TDUMACC *** REMOVE THIS LINE WHEN USING AS INPUT TO *TDU*. ***
  1435. *') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T 8'
  1436. ^F9_^S ^I^N = (ESC '^J') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T 9'
  1437. ^F10_^S ^I^N = (ESC '^K') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T 0'
  1438. ^F11_^S ^I^N = (ESC 'Q') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T Q'
  1439. ^F12_^S ^I^N = (ESC 'W') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T W'
  1440. ^F13_^S ^I^N = (ESC '^L') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T E'
  1441. ^F14_^S ^I^N = (ESC 'R') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T R'
  1442. ^F15_^S ^I^N = (ESC 'T') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T T'
  1443. ^F16_^S ^I^N = (ESC 'Y') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T Y'
  1444.  
  1445. " TERMINAL VIDEO ATTRIBUTES "
  1446. ^A^L^T_^B^E^G^I^N ^O^U^T = (^S^T^A^R^T_^A^L^T^E^R^N^A^T^E)
  1447. ^A^L^T_^E^N^D ^O^U^T = (^S^T^O^P_^A^L^T^E^R^N^A^T^E)
  1448. ^B^L^I^N^K_^B^E^G^I^N ^O^U^T = (^S^T^A^R^T_^B^L^I^N^K)
  1449. ^B^L^I^N^K_^E^N^D ^O^U^T = (^S^T^O^P_^B^L^I^N^K)
  1450. ^I^N^V^E^R^S^E_^B^E^G^I^N ^O^U^T = (^S^T^A^R^T_^I^N^V^E^R^S^E)
  1451. ^I^N^V^E^R^S^E_^E^N^D ^O^U^T = (^S^T^O^P_^I^N^V^E^R^S^E)
  1452. ^U^N^D^E^R^L^I^N^E_^B^E^G^I^N ^O^U^T = (^S^T^A^R^T_^U^N^D^E^R^L^I^N^E)
  1453. ^U^N^D^E^R^L^I^N^E_^E^N^D ^O^U^T = (^S^T^O^P_^U^N^D^E^R^L^I^N^E)
  1454.  
  1455. " LOGICAL ATTRIBUTE SPECIFICATIONS "
  1456. ^E^R^R^O^R_^B^E^G^I^N ^O^U^T = (^S^T^A^R^T_^A^L^T^E^R^N^A^T^E)
  1457. ^E^R^R^O^R_^E^N^D ^O^U^T = (^S^T^O^P_^A^L^T^E^R^N^A^T^E)
  1458. ^I^N^P^U^T_^T^E^X^T_^B^E^G^I^N ^O^U^T = (^S^T^A^R^T_^U^N^D^E^R^L^I^N^E)
  1459. ^I^N^P^U^T_^T^E^X^T_^E^N^D ^O^U^T = (^S^T^O^P_^U^N^D^E^R^L^I^N^E)
  1460. ^I^T^A^L^I^C_^B^E^G^I^N ^O^U^T = (^S^T^A^R^T_^I^N^V^E^R^S^E)
  1461. ^I^T^A^L^I^C_^E^N^D ^O^U^T = (^S^T^O^P_^I^N^V^E^R^S^E)
  1462.  
  1463. " LINE DRAWING CHARACTER SPECIFICATION "
  1464. ^L^D_^F^I^N^E_^B^E^G^I^N ^O^U^T = (SO)
  1465. ^L^D_^F^I^N^E_^E^N^D ^O^U^T = (SI)
  1466. ^L^D_^F^I^N^E_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = (71(16))
  1467. ^L^D_^F^I^N^E_^V^E^R^T^I^C^A^L ^O^U^T = (78(16))
  1468. ^L^D_^F^I^N^E_^U^P^P^E^R_^L^E^F^T ^O^U^T = (6C(16))
  1469. ^L^D_^F^I^N^E_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = (6B(16))
  1470. ^L^D_^F^I^N^E_^L^O^W^E^R_^L^E^F^T ^O^U^T = (6D(16))
  1471. ^L^D_^F^I^N^E_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = (6A(16))
  1472. ^L^D_^F^I^N^E_^U^P_^T ^O^U^T = (77(16))
  1473. ^L^D_^F^I^N^E_^D^O^W^N_^T ^O^U^T = (76(16))
  1474. ^L^D_^F^I^N^E_^L^E^F^T_^T ^O^U^T = (74(16))
  1475. ^L^D_^F^I^N^E_^R^I^G^H^T_^T ^O^U^T = (75(16))
  1476. ^L^D_^F^I^N^E_^C^R^O^S^S ^O^U^T = (6E(16))
  1477.  
  1478. ^L^D_^M^E^D^I^U^M_^B^E^G^I^N ^O^U^T = (SO ^S^T^A^R^T_^A^L^T^E^R^N^A^T^E)
  1479. ^L^D_^M^E^D^I^U^M_^E^N^D ^O^U^T = (SI ^S^T^O^P_^A^L^T^E^R^N^A^T^E)
  1480. ^L^D_^M^E^D^I^U^M_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = (71(16))
  1481. ^L^D_^M^E^D^I^U^M_^V^E^R^T^I^C^A^L ^O^U^T = (78(16))
  1482. ^L^D_^M^E^D^I^U^M_^U^P^P^E^R_^L^E^F^T ^O^U^T = (6C(16))
  1483. ^L^D_^M^E^D^I^U^M_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = (6B(16))
  1484. ^L^D_^M^E^D^I^U^M_^L^O^W^E^R_^L^E^F^T ^O^U^T = (6D(16))
  1485. ^L^D_^M^E^D^I^U^M_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = (6A(16))
  1486. ^L^D_^M^E^D^I^U^M_^U^P_^T ^O^U^T = (77(16))
  1487. ^L^D_^M^E^D^I^U^M_^D^O^W^N_^T ^O^U^T = (76(16))
  1488. ^L^D_^M^E^D^I^U^M_^L^E^F^T_^T ^O^U^T = (74(16))
  1489. ^L^D_^M^E^D^I^U^M_^R^I^G^H^T_^T ^O^U^T = (75(16))
  1490. ^L^D_^M^E^D^I^U^M_^C^R^O^S^S ^O^U^T = (6E(16))
  1491.  
  1492. ^L^D_^B^O^L^D_^B^E^G^I^N ^O^U^T = (^S^T^A^R^T_^I^N^V^E^R^S^E)
  1493. ^L^D_^B^O^L^D_^E^N^D ^O^U^T = (^S^T^O^P_^I^N^V^E^R^S^E)
  1494. ^L^D_^B^O^L^D_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = (' ')
  1495. ^L^D_^B^O^L^D_^V^E^R^T^I^C^A^L ^O^U^T = (' ')
  1496. ^L^D_^B^O^L^D_^U^P^P^E^R_^L^E^F^T ^O^U^T = (' ')
  1497. ^L^D_^B^O^L^D_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = (' ')
  1498. ^L^D_^B^O^L^D_^L^O^W^E^R_^L^E^F^T ^O^U^T = (' ')
  1499. ^L^D_^B^O^L^D_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = (' ')
  1500. ^L^D_^B^O^L^D_^U^P_^T ^O^U^T = (' ')
  1501. ^L^D_^B^O^L^D_^D^O^W^N_^T ^O^U^T = (' ')
  1502. ^L^D_^B^O^L^D_^L^E^F^T_^T ^O^U^T = (' ')
  1503. ^L^D_^B^O^L^D_^R^I^G^H^T_^T ^O^U^T = (' ')
  1504. ^L^D_^B^O^L^D_^C^R^O^S^S ^O^U^T = (' ')
  1505.  
  1506. " VARIABLES FOR FULL SCREEN EDITOR FUNCTION KEY DEFINITIONS "
  1507.  
  1508. ^K1 = ('SK1/SM/L/ MARK /;SKS1/SMW/L/MRKCHR/')
  1509. ^K2 = ('SK2/MMTP/L/ MOVE /;SKS2/CMTP;UM;SA' '/L/ONECPY/')
  1510. ^K3 = ('SK3/IBP/L/ INSB /;SKS3/DB/L/ DELB /')
  1511. ^K4 = ('SK4/PF/L/ FIRST/;SKS4/VL/L/ LAST /')
  1512. ^K5 = ('SK5/U/L/ UNDO /;SKS5/UM/L/UNMARK/')
  1513. ^K6 = ('SK6/Q/L/ QUIT /;SKS6/QR/L/ QUITR/')
  1514. ^K7 = ('SK7"L/&?/"L"LOCATE";SKS7/LN/L/LOCNXT/')
  1515. ^K8 = ('SK8/SP1/L/1 ROW /;SKS8/SP2/L/2 ROWS/')
  1516. ^K9 = ('SK9/V/L/MIDDLE/;SKS9/.E/L/ENDLIN/')
  1517. ^K10 = ('SK10/SVO0/L/ LEFT /;SKS10/SVO&C;.P+20/L/ RIGHT/')
  1518. ^K11 = ('SK11/.S/L/ SPLIT/;SKS11/.J/L/ JOIN /')
  1519. ^K12 = ('SK12/.F/L/ PARA /;SKS12/.C/L/CENTER/')
  1520. ^K13 = ('SK13/SS/L/ CLEAR/;SKS13/.S;D;.E/L/ TRUNC/')
  1521. ^K14 = ('SK14/H/L/ HELP /;SKS14/EDIT/L/UNSPLT/')
  1522. ^K15 = ('SK15/CMTP/L/ COPY /;SKS15/DM/L/ DELM /')
  1523. ^K16 = ('SK16/SVC132/L/132COL/;SKS16/SVC80/L/ 80COL/;')
  1524.  
  1525. " DEFAULT KEY DEFINITIONS FOR THE FULL SCREEN EDITOR "
  1526. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  1527. ^N^A^M^E = ('FSEKEYS')...
  1528. ^O^U^T = (^K1 ';' ^K2 ';' ^K3 ';' ^K4 ';' ^K5)
  1529. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  1530. ^N^A^M^E = ('FSEKEYS')...
  1531. ^O^U^T = (^K6 ';' ^K7 ';' ^K8 ';' ^K9 ';' ^K10)
  1532. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  1533. ^N^A^M^E = ('FSEKEYS')...
  1534. ^O^U^T = (^K11 ';' ^K12 ';' ^K13 ';' ^K14 ';' ^K15 ';' ^K16)
  1535.  
  1536.  
  1537. " END OF NOS TERMINAL DEFINITION FILE FOR MACINTOSH WITH CDC CONNECT "
  1538. *WEOR
  1539. TDUMC11 *** REMOVE THIS LINE WHEN USING AS INPUT TO *TDU*. ***
  1540.  
  1541. " TERMINAL DEFINITION FILE FOR MAC WITH CDC CONNECT VERSION 1.1 86/11/03 "
  1542.  
  1543. " NOS TERMINAL DEFINITION FILE FOR M^A^C^I^N^T^O^S^H ^U^S^I^N^G C^O^N^T^R^O^L D^A^T^A C^O^N^N^E^C^T "
  1544. " (^B^A^S^I^C VT100 ^P^L^U^S ^F^U^N^C^T^I^O^N ^K^E^Y ^D^E^F^I^N^I^T^I^O^N^S). C^O^N^N^E^C^T ^S^H^O^U^L^D ^B^E ^R^U^N ^W^I^T^H "
  1545. " ^L^O^C^A^L ^E^C^H^O ^O^N ^O^R ^E^C^H^O^P^L^E^X ^F^O^R ^T^H^E ^I^N^S^E^R^T/^D^E^L^E^T^E ^F^U^N^C^T^I^O^N^S ^T^O ^W^O^R^K. "
  1546. " I^M^P^O^R^T^A^N^T T^E^R^M^I^N^A^L... ^A^N^D C^O^M^P^A^T^I^B^L^I^T^Y... ^S^E^T^T^I^N^G^S ^I^N C^O^N^N^E^C^T ^A^R^E@D "
  1547. " R^E^P^E^A^T C^T^R^L^S OFF "
  1548. " N^E^W L^I^N^E OFF "
  1549. " A^U^T^O W^R^A^P^A^R^O^U^N^D ON "
  1550. " XON/XOFF F^L^O^W C^O^N^T^R^O^L ON "
  1551. " I^F A^U^T^O W^R^A^P^A^R^O^U^N^D ^I^S OFF, ^M^A^K^E ^T^H^E ^F^O^L^L^O^W^I^N^G ^C^H^A^N^G^E^S@D "
  1552. " ^C^H^A^R_^P^A^S^T_^L^A^S^T_^P^O^S^I^T^I^O^N ^T^Y^P^E = ^S^T^O^P_^N^E^X^T "
  1553. " ^C^H^A^R_^P^A^S^T_^R^I^G^H^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T "
  1554. " "
  1555.  
  1556. " VARIABLES "
  1557. ^P^R^E^F^I^X = (ESC '[')
  1558. ^C^L^E^A^R_^S^T^A^Y = (^P^R^E^F^I^X '2J')
  1559. ^C^L^E^A^R_^A^L^L_^T^A^B^S = (^P^R^E^F^I^X '3^G')
  1560. ^S^E^T_^T^O_24^X80 = (^P^R^E^F^I^X '?3^L')
  1561. ^S^E^T_^T^O_24^X132 = (^P^R^E^F^I^X '?3^H')
  1562. ^S^T^A^R^T_^A^L^T^E^R^N^A^T^E = (^P^R^E^F^I^X '1^M')
  1563. ^S^T^A^R^T_^B^L^I^N^K = (^P^R^E^F^I^X '5^M')
  1564. ^S^T^A^R^T_^I^N^V^E^R^S^E = (^P^R^E^F^I^X '7^M')
  1565. ^S^T^A^R^T_^U^N^D^E^R^L^I^N^E = (^P^R^E^F^I^X '4^M')
  1566. ^S^T^O^P_^A^L^T^E^R^N^A^T^E = (^P^R^E^F^I^X '^M')
  1567. ^S^T^O^P_^B^L^I^N^K = (^P^R^E^F^I^X '^M')
  1568. ^S^T^O^P_^I^N^V^E^R^S^E = (^P^R^E^F^I^X '^M')
  1569. ^S^T^O^P_^U^N^D^E^R^L^I^N^E = (^P^R^E^F^I^X '^M')
  1570.  
  1571. " MODEL NAME AND COMMUNICATION TYPE "
  1572. ^M^O^D^E^L_^N^A^M^E ^V^A^L^U^E = 'MCON11'
  1573. ^C^O^M^M^U^N^I^C^A^T^I^O^N^S ^T^Y^P^E = ^A^S^Y^N^C^H
  1574.  
  1575. " END OF INFORMATION SPECIFICATION "
  1576. ^E^N^D_^O^F_^I^N^F^O^R^M^A^T^I^O^N ^I^N = (0)
  1577.  
  1578. " CURSOR POSITIONING INFORMATION "
  1579. ^C^U^R^S^O^R_^P^O^S_^E^N^C^O^D^I^N^G ^B^I^A^S = (0) ^T^Y^P^E = ^A^N^S^I_^C^U^R^S^O^R
  1580. ^C^U^R^S^O^R_^P^O^S_^C^O^L^U^M^N_^F^I^R^S^T ^V^A^L^U^E = FALSE
  1581. ^C^U^R^S^O^R_^P^O^S_^C^O^L^U^M^N_^L^E^N^G^T^H ^V^A^L^U^E = (0)
  1582. ^C^U^R^S^O^R_^P^O^S_^R^O^W_^L^E^N^G^T^H ^V^A^L^U^E = (0)
  1583. ^C^U^R^S^O^R_^P^O^S_^B^E^G^I^N ^O^U^T = (^P^R^E^F^I^X)
  1584. ^C^U^R^S^O^R_^P^O^S_^S^E^C^O^N^D ^O^U^T = (';')
  1585. ^C^U^R^S^O^R_^P^O^S_^T^H^I^R^D ^O^U^T = ('H')
  1586.  
  1587. " CURSOR MOVEMENT INFORMATION "
  1588. ^C^U^R^S^O^R_^H^O^M^E ^I^N^O^U^T = (^P^R^E^F^I^X 'H') ^L^A^B^E^L='O^P^T^I^O^N H'
  1589. ^C^U^R^S^O^R_^U^P ^I^N^O^U^T = (^P^R^E^F^I^X 'A') ^L^A^B^E^L='O^P^T^I^O^N I'
  1590. ^C^U^R^S^O^R_^D^O^W^N ^I^N^O^U^T = (^P^R^E^F^I^X 'B') ^L^A^B^E^L='O^P^T^I^O^N M'
  1591. ^C^U^R^S^O^R_^R^I^G^H^T ^I^N^O^U^T = (^P^R^E^F^I^X 'C') ^L^A^B^E^L='O^P^T^I^O^N J'
  1592. ^C^U^R^S^O^R_^L^E^F^T ^I^N^O^U^T = (^P^R^E^F^I^X 'D') ^L^A^B^E^L='O^P^T^I^O^N K'
  1593.  
  1594. " CURSOR BEHAVIOR (^F^O^R ^C^U^R^S^O^R ^M^O^V^E^M^E^N^T ^K^E^Y^S) "
  1595. ^M^O^V^E_^P^A^S^T_^R^I^G^H^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  1596. ^M^O^V^E_^P^A^S^T_^L^E^F^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  1597. ^M^O^V^E_^P^A^S^T_^T^O^P ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  1598. ^M^O^V^E_^P^A^S^T_^B^O^T^T^O^M ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  1599.  
  1600. " CURSOR BEHAVIOR (^F^O^R ^C^H^A^R^A^C^T^E^R ^K^E^Y^S) "
  1601. ^C^H^A^R_^P^A^S^T_^R^I^G^H^T ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  1602. ^C^H^A^R_^P^A^S^T_^L^E^F^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  1603. ^C^H^A^R_^P^A^S^T_^L^A^S^T_^P^O^S^I^T^I^O^N ^T^Y^P^E = ^S^C^R^O^L^L_^N^E^X^T
  1604.  
  1605. " TERMINAL ATTRIBUTES "
  1606. ^A^T^T^R^I^B^U^T^E^S_^N^O^T_^M^A^S^K^A^B^L^E ^V^A^L^U^E = TRUE
  1607. ^C^L^E^A^R^S_^W^H^E^N_^C^H^A^N^G^E_^S^I^Z^E ^V^A^L^U^E = TRUE
  1608. ^F^U^N^C^T^I^O^N_^K^E^Y_^L^E^A^V^E^S_^M^A^R^K ^V^A^L^U^E = FALSE
  1609. ^H^A^S_^H^I^D^D^E^N ^V^A^L^U^E = FALSE
  1610. ^H^A^S_^P^R^O^T^E^C^T ^V^A^L^U^E = FALSE
  1611. ^H^O^M^E_^A^T_^T^O^P ^V^A^L^U^E = TRUE
  1612. ^M^U^L^T^I^P^L^E_^S^I^Z^E^S ^V^A^L^U^E = TRUE
  1613. ^T^A^B^S_^T^O_^H^O^M^E ^V^A^L^U^E = FALSE
  1614. ^T^A^B^S_^T^O_^T^A^B_^S^T^O^P^S ^V^A^L^U^E = TRUE
  1615. ^T^A^B^S_^T^O_^U^N^P^R^O^T^E^C^T^E^D ^V^A^L^U^E = FALSE
  1616. ^T^Y^P^E_^A^H^E^A^D ^V^A^L^U^E = TRUE
  1617.  
  1618. " SCREEN SIZES "
  1619. ^S^E^T_^S^I^Z^E ^R^O^W^S = 24 ^C^O^L^U^M^N^S = 80 ^O^U^T = (^S^E^T_^T^O_24^X80)
  1620. ^S^E^T_^S^I^Z^E ^R^O^W^S = 24 ^C^O^L^U^M^N^S = 132 ^O^U^T = (^S^E^T_^T^O_24^X132)
  1621.  
  1622. " TERMINAL CAPABILITIES "
  1623. ^I^N^S^E^R^T_^C^H^A^R ^I^N^O^U^T = (^P^R^E^F^I^X '@A') ^L^A^B^E^L='O^P^T^I^O^N S^P^A^C^E'
  1624. ^I^N^S^E^R^T_^L^I^N^E_^B^O^L ^I^N^O^U^T = (^P^R^E^F^I^X 'L') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T S^P^A^C^E'
  1625. ^D^E^L^E^T^E_^C^H^A^R ^I^N^O^U^T = (^P^R^E^F^I^X 'P') ^L^A^B^E^L='O^P^T^I^O^N B^A^C^K^S^P^A^C^E'
  1626. ^D^E^L^E^T^E_^L^I^N^E_^B^O^L ^I^N^O^U^T = (^P^R^E^F^I^X 'M') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T B^A^C^K^S^P^A^C^E'
  1627. ^E^R^A^S^E_^E^N^D_^O^F_^L^I^N^E ^I^N^O^U^T = (^P^R^E^F^I^X 'K') ^L^A^B^E^L='O^P^T^I^O^N C'
  1628. ^E^R^A^S^E_^L^I^N^E_^S^T^A^Y ^I^N^O^U^T = (^P^R^E^F^I^X '2K')
  1629. ^E^R^A^S^E_^P^A^G^E_^S^T^A^Y ^I^N^O^U^T = (^C^L^E^A^R_^S^T^A^Y) ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T C'
  1630. ^B^A^C^K^S^P^A^C^E ^I^N = (BS)
  1631. ^T^A^B_^F^O^R^W^A^R^D ^I^N^O^U^T = (HT)
  1632. ^T^A^B_^C^L^E^A^R_^A^L^L ^I^N^O^U^T = (^C^L^E^A^R_^A^L^L_^T^A^B^S)
  1633. ^T^A^B_^S^E^T ^I^N^O^U^T = (ESC 'H')
  1634.  
  1635. " SCREEN AND LINE MODE TRANSITION "
  1636. ^S^E^T_^S^C^R^E^E^N_^M^O^D^E ^O^U^T = (ESC '<' ^C^L^E^A^R_^A^L^L_^T^A^B^S ESC '(B' ESC ')0' SI ESC '=')
  1637. ^S^E^T_^L^I^N^E_^M^O^D^E ^O^U^T = (ESC '<' ^C^L^E^A^R_^A^L^L_^T^A^B^S ESC '(B' ESC ')0' SI ESC '>')
  1638.  
  1639. " MISCELLANEOUS TERMINAL SEQUENCES "
  1640. ^O^U^T^P^U^T_^B^E^G^I^N ^O^U^T = (^P^R^E^F^I^X '4^L')
  1641. ^B^E^L^L_^N^A^K ^O^U^T = (BEL)
  1642.  
  1643. " CDC STANDARD FUNCTION KEY INPUT INFORMATION "
  1644.  
  1645. ^N^E^X^T ^I^N = (CR) ^L^A^B^E^L='R^E^T^U^R^N'
  1646. ^N^E^X^T_^S ^I^N = (ESC CR) ^L^A^B^E^L='S^H^I^F^T R^E^T^U^R^N'
  1647. ^D^A^T^A ^I^N = (ESC 27(16)) ^L^A^B^E^L='O^P^T^I^O^N "'
  1648. ^D^A^T^A_^S ^I^N = (ESC '"') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T "'
  1649. ^B^A^C^K ^I^N = (ESC ';') ^L^A^B^E^L='O^P^T^I^O^N ;'
  1650. ^B^A^C^K_^S ^I^N = (ESC '@D') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T ;'
  1651. ^H^E^L^P ^I^N = (ESC '/') ^L^A^B^E^L='O^P^T^I^O^N ?'
  1652. ^H^E^L^P_^S ^I^N = (ESC '?') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T ?'
  1653. ^E^D^I^T ^I^N = (ESC '.') ^L^A^B^E^L='O^P^T^I^O^N .'
  1654. ^E^D^I^T_^S ^I^N = (ESC '^N') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T .'
  1655. ^S^T^O^P ^I^N = (DC4) ^L^A^B^E^L='C^O^M^M^A^N^D T'
  1656. ^S^T^O^P_^S ^I^N = (DLE) ^L^A^B^E^L='C^O^M^M^A^N^D P'
  1657. ^D^O^W^N ^I^N = (ESC '^D') ^L^A^B^E^L='O^P^T^I^O^N D'
  1658. ^D^O^W^N_^S ^I^N = (ESC '^M') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T D'
  1659. ^U^P ^I^N = (ESC '^U') ^L^A^B^E^L='O^P^T^I^O^N U'
  1660. ^U^P_^S ^I^N = (ESC 'U') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T U'
  1661. ^F^W^D ^I^N = (ESC '^F') ^L^A^B^E^L='O^P^T^I^O^N F'
  1662. ^F^W^D_^S ^I^N = (ESC 'F') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T F'
  1663. ^B^K^W ^I^N = (ESC '^B') ^L^A^B^E^L='O^P^T^I^O^N B'
  1664. ^B^K^W_^S ^I^N = (ESC 'B') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T B'
  1665.  
  1666. " PROGRAMMABLE FUNCTION KEY INPUT INFORMATION "
  1667.  
  1668. ^F1 ^I^N = (ESC '1') ^L^A^B^E^L='O^P^T^I^O^N 1'
  1669. ^F2 ^I^N = (ESC '2') ^L^A^B^E^L='O^P^T^I^O^N 2'
  1670. ^F3 ^I^N = (ESC '3') ^L^A^B^E^L='O^P^T^I^O^N 3'
  1671. ^F4 ^I^N = (ESC '4') ^L^A^B^E^L='O^P^T^I^O^N 4'
  1672. ^F5 ^I^N = (ESC '5') ^L^A^B^E^L='O^P^T^I^O^N 5'
  1673. ^F6 ^I^N = (ESC '6') ^L^A^B^E^L='O^P^T^I^O^N 6'
  1674. ^F7 ^I^N = (ESC '^G') ^L^A^B^E^L='O^P^T^I^O^N 7'
  1675. ^F8 ^I^N = (ESC '^H') ^L^A^B^E^L='O^P^T^I^O^N 8'
  1676. ^F9 ^I^N = (ESC '9') ^L^A^B^E^L='O^P^T^I^O^N 9'
  1677. ^F10 ^I^N = (ESC '0') ^L^A^B^E^L='O^P^T^I^O^N 0'
  1678. ^F11 ^I^N = (ESC '^Q') ^L^A^B^E^L='O^P^T^I^O^N Q'
  1679. ^F12 ^I^N = (ESC '^W') ^L^A^B^E^L='O^P^T^I^O^N W'
  1680. ^F13 ^I^N = (ESC '^E') ^L^A^B^E^L='O^P^T^I^O^N E'
  1681. ^F14 ^I^N = (ESC '^R') ^L^A^B^E^L='O^P^T^I^O^N R'
  1682. ^F15 ^I^N = (ESC '^T') ^L^A^B^E^L='O^P^T^I^O^N T'
  1683. ^F16 ^I^N = (ESC '^Y') ^L^A^B^E^L='O^P^T^I^O^N Y'
  1684. ^F1_^S ^I^N = (ESC '!') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T 1'
  1685. ^F2_^S ^I^N = (ESC '@A') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T 2'
  1686. ^F3_^S ^I^N = (ESC '^I') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T 3'
  1687. ^F4_^S ^I^N = (ESC '$') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T 4'
  1688. ^F5_^S ^I^N = (ESC '%') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T 5'
  1689. ^F6_^S ^I^N = (ESC '@B') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T 6'
  1690. ^F7_^S ^I^N = (ESC '&') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T 7'
  1691. ^F8_^S ^I^N = (ESC '*') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T 8'
  1692. ^F9_^S ^I^N = (ESC '^J') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T 9'
  1693. ^F10_^S ^I^N = (ESC '^K') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T 0'
  1694. ^F11_^S ^I^N = (ESC 'Q') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T Q'
  1695. ^F12_^S ^I^N = (ESC 'W') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T W'
  1696. ^F13_^S ^I^N = (ESC '^L') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T E'
  1697. ^F14_^S ^I^N = (ESC 'R') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T R'
  1698. ^F15_^S ^I^N = (ESC 'T') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T T'
  1699. ^F16_^S ^I^N = (ESC 'Y') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T Y'
  1700.  
  1701. " TERMINAL VIDEO ATTRIBUTES "
  1702. ^A^L^T_^B^E^G^I^N ^O^U^T = (^S^T^A^R^T_^A^L^T^E^R^N^A^T^E)
  1703. ^A^L^T_^E^N^D ^O^U^T = (^S^T^O^P_^A^L^T^E^R^N^A^T^E)
  1704. ^B^L^I^N^K_^B^E^G^I^N ^O^U^T = (^S^T^A^R^T_^B^L^I^N^K)
  1705. ^B^L^I^N^K_^E^N^D ^O^U^T = (^S^T^O^P_^B^L^I^N^K)
  1706. ^I^N^V^E^R^S^E_^B^E^G^I^N ^O^U^T = (^S^T^A^R^T_^I^N^V^E^R^S^E)
  1707. ^I^N^V^E^R^S^E_^E^N^D ^O^U^T = (^S^T^O^P_^I^N^V^E^R^S^E)
  1708. ^U^N^D^E^R^L^I^N^E_^B^E^G^I^N ^O^U^T = (^S^T^A^R^T_^U^N^D^E^R^L^I^N^E)
  1709. ^U^N^D^E^R^L^I^N^E_^E^N^D ^O^U^T = (^S^T^O^P_^U^N^D^E^R^L^I^N^E)
  1710.  
  1711. " LOGICAL ATTRIBUTE SPECIFICATIONS "
  1712. ^E^R^R^O^R_^B^E^G^I^N ^O^U^T = (^S^T^A^R^T_^A^L^T^E^R^N^A^T^E)
  1713. ^E^R^R^O^R_^E^N^D ^O^U^T = (^S^T^O^P_^A^L^T^E^R^N^A^T^E)
  1714. ^I^N^P^U^T_^T^E^X^T_^B^E^G^I^N ^O^U^T = (^S^T^A^R^T_^U^N^D^E^R^L^I^N^E)
  1715. ^I^N^P^U^T_^T^E^X^T_^E^N^D ^O^U^T = (^S^T^O^P_^U^N^D^E^R^L^I^N^E)
  1716. ^I^T^A^L^I^C_^B^E^G^I^N ^O^U^T = (^S^T^A^R^T_^I^N^V^E^R^S^E)
  1717. ^I^T^A^L^I^C_^E^N^D ^O^U^T = (^S^T^O^P_^I^N^V^E^R^S^E)
  1718.  
  1719. " LINE DRAWING CHARACTER SPECIFICATION "
  1720. ^L^D_^F^I^N^E_^B^E^G^I^N ^O^U^T = (SO)
  1721. ^L^D_^F^I^N^E_^E^N^D ^O^U^T = (SI)
  1722. ^L^D_^F^I^N^E_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = (71(16))
  1723. ^L^D_^F^I^N^E_^V^E^R^T^I^C^A^L ^O^U^T = (78(16))
  1724. ^L^D_^F^I^N^E_^U^P^P^E^R_^L^E^F^T ^O^U^T = (6C(16))
  1725. ^L^D_^F^I^N^E_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = (6B(16))
  1726. ^L^D_^F^I^N^E_^L^O^W^E^R_^L^E^F^T ^O^U^T = (6D(16))
  1727. ^L^D_^F^I^N^E_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = (6A(16))
  1728. ^L^D_^F^I^N^E_^U^P_^T ^O^U^T = (77(16))
  1729. ^L^D_^F^I^N^E_^D^O^W^N_^T ^O^U^T = (76(16))
  1730. ^L^D_^F^I^N^E_^L^E^F^T_^T ^O^U^T = (74(16))
  1731. ^L^D_^F^I^N^E_^R^I^G^H^T_^T ^O^U^T = (75(16))
  1732. ^L^D_^F^I^N^E_^C^R^O^S^S ^O^U^T = (6E(16))
  1733.  
  1734. ^L^D_^M^E^D^I^U^M_^B^E^G^I^N ^O^U^T = (SO ^S^T^A^R^T_^A^L^T^E^R^N^A^T^E)
  1735. ^L^D_^M^E^D^I^U^M_^E^N^D ^O^U^T = (SI ^S^T^O^P_^A^L^T^E^R^N^A^T^E)
  1736. ^L^D_^M^E^D^I^U^M_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = (71(16))
  1737. ^L^D_^M^E^D^I^U^M_^V^E^R^T^I^C^A^L ^O^U^T = (78(16))
  1738. ^L^D_^M^E^D^I^U^M_^U^P^P^E^R_^L^E^F^T ^O^U^T = (6C(16))
  1739. ^L^D_^M^E^D^I^U^M_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = (6B(16))
  1740. ^L^D_^M^E^D^I^U^M_^L^O^W^E^R_^L^E^F^T ^O^U^T = (6D(16))
  1741. ^L^D_^M^E^D^I^U^M_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = (6A(16))
  1742. ^L^D_^M^E^D^I^U^M_^U^P_^T ^O^U^T = (77(16))
  1743. ^L^D_^M^E^D^I^U^M_^D^O^W^N_^T ^O^U^T = (76(16))
  1744. ^L^D_^M^E^D^I^U^M_^L^E^F^T_^T ^O^U^T = (74(16))
  1745. ^L^D_^M^E^D^I^U^M_^R^I^G^H^T_^T ^O^U^T = (75(16))
  1746. ^L^D_^M^E^D^I^U^M_^C^R^O^S^S ^O^U^T = (6E(16))
  1747.  
  1748. ^L^D_^B^O^L^D_^B^E^G^I^N ^O^U^T = (^S^T^A^R^T_^I^N^V^E^R^S^E)
  1749. ^L^D_^B^O^L^D_^E^N^D ^O^U^T = (^S^T^O^P_^I^N^V^E^R^S^E)
  1750. ^L^D_^B^O^L^D_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = (' ')
  1751. ^L^D_^B^O^L^D_^V^E^R^T^I^C^A^L ^O^U^T = (' ')
  1752. ^L^D_^B^O^L^D_^U^P^P^E^R_^L^E^F^T ^O^U^T = (' ')
  1753. ^L^D_^B^O^L^D_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = (' ')
  1754. ^L^D_^B^O^L^D_^L^O^W^E^R_^L^E^F^T ^O^U^T = (' ')
  1755. ^L^D_^B^O^L^D_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = (' ')
  1756. ^L^D_^B^O^L^D_^U^P_^T ^O^U^T = (' ')
  1757. ^L^D_^B^O^L^D_^D^O^W^N_^T ^O^U^T = (' ')
  1758. ^L^D_^B^O^L^D_^L^E^F^T_^T ^O^U^T = (' ')
  1759. ^L^D_^B^O^L^D_^R^I^G^H^T_^T ^O^U^T = (' ')
  1760. ^L^D_^B^O^L^D_^C^R^O^S^S ^O^U^T = (' ')
  1761.  
  1762. " VARIABLES FOR FULL SCREEN EDITOR FUNCTION KEY DEFINITIONS "
  1763.  
  1764. ^K1 = ('SK1/SM/L/ MARK /;SKS1/SMW/L/MRKCHR/')
  1765. ^K2 = ('SK2/MMTP/L/ MOVE /;SKS2/CMTP;UM;SA' '/L/ONECPY/')
  1766. ^K3 = ('SK3/IBP/L/ INSB /;SKS3/DB/L/ DELB /')
  1767. ^K4 = ('SK4/PF/L/ FIRST/;SKS4/VL/L/ LAST /')
  1768. ^K5 = ('SK5/U/L/ UNDO /;SKS5/UM/L/UNMARK/')
  1769. ^K6 = ('SK6/Q/L/ QUIT /;SKS6/QR/L/ QUITR/')
  1770. ^K7 = ('SK7"L/&?/"L"LOCATE";SKS7/LN/L/LOCNXT/')
  1771. ^K8 = ('SK8/SP1/L/1 ROW /;SKS8/SP2/L/2 ROWS/')
  1772. ^K9 = ('SK9/V/L/MIDDLE/;SKS9/.E/L/ENDLIN/')
  1773. ^K10 = ('SK10/SVO0/L/ LEFT /;SKS10/SVO&C;.P+20/L/ RIGHT/')
  1774. ^K11 = ('SK11/.S/L/ SPLIT/;SKS11/.J/L/ JOIN /')
  1775. ^K12 = ('SK12/.F/L/ PARA /;SKS12/.C/L/CENTER/')
  1776. ^K13 = ('SK13/SS/L/ CLEAR/;SKS13/.S;D;.E/L/ TRUNC/')
  1777. ^K14 = ('SK14/H/L/ HELP /;SKS14/EDIT/L/UNSPLT/')
  1778. ^K15 = ('SK15/CMTP/L/ COPY /;SKS15/DM/L/ DELM /')
  1779. ^K16 = ('SK16/SVC132/L/132COL/;SKS16/SVC80/L/ 80COL/;')
  1780.  
  1781. " DEFAULT KEY DEFINITIONS FOR THE FULL SCREEN EDITOR "
  1782. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  1783. ^N^A^M^E = ('FSEKEYS')...
  1784. ^O^U^T = (^K1 ';' ^K2 ';' ^K3 ';' ^K4 ';' ^K5)
  1785. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  1786. ^N^A^M^E = ('FSEKEYS')...
  1787. ^O^U^T = (^K6 ';' ^K7 ';' ^K8 ';' ^K9 ';' ^K10)
  1788. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  1789. ^N^A^M^E = ('FSEKEYS')...
  1790. ^O^U^T = (^K11 ';' ^K12 ';' ^K13 ';' ^K14 ';' ^K15 ';' ^K16)
  1791.  
  1792.  
  1793. " END OF NOS TERMINAL DEFINITION FILE FOR MACINTOSH WITH CDC CONNECT "
  1794. *WEOR
  1795. TDUMC20 *** REMOVE THIS LINE WHEN USING AS INPUT TO *TDU*. ***
  1796.  
  1797. " NOS TERMINAL DEFINITION FILE FOR MACINTOSH "
  1798. " RUNNING CONTROL DATA CONNECT V2.0 OR DESKTOP/VE V1.1 "
  1799.  
  1800. " MCON20 APRIL, 1988 "
  1801.  
  1802. " T^O ^C^H^A^N^G^E ^T^H^E ^F^U^L^L ^S^C^R^E^E^N ^L^I^N^E ^C^O^U^N^T ^F^O^R ^L^A^R^G^E^R ^S^C^R^E^E^N^S, ^M^A^K^E ^F^O^L^L^O^W^I^N^G
  1803. " ^M^O^D^I^F^I^C^A^T^I^O^N^S ^T^O ^T^H^I^S T^E^R^M^I^N^A^L D^E^F^I^N^I^T^I^O^N ^S^O^U^R^C^E ^B^E^F^O^R^E ^R^E^C^O^M^P^I^L^I^N^G:
  1804. " R^E^P^L^A^C^E F^U^L^L_S^C^R^E^E^N_L^I^N^E_C^O^U^N^T ^V^A^R^I^A^B^L^E ^V^A^L^U^E 24 ^W^I^T^H ^F^U^L^L ^S^C^R^E^E^N ^L^I^N^E "
  1805. " ^C^O^U^N^T (24 ^T^O 64) ^D^E^F^I^N^E^D ^I^N CONNECT ^O^R D^E^S^K^T^O^P/VE T^E^R^M^I^N^A^L S^E^T^T^I^N^G^S. "
  1806. " R^E^P^L^A^C^E ^R^O^W^S = 24 ^I^N ^S^E^T_^S^I^Z^E ^L^I^N^E^S ^W^I^T^H M^A^C ^F^U^L^L ^S^C^R^E^E^N ^L^I^N^E ^C^O^U^N^T. "
  1807. " R^E^P^L^A^C^E ^M^O^D^E^L_^N^A^M^E ^V^A^L^U^E ^W^I^T^H ^U^N^I^Q^U^E ^T^E^R^M^I^N^A^L ^N^A^M^E ^S^U^C^H ^A^S "
  1808. " MC20XX ^W^H^E^R^E XX ^I^S ^T^H^E ^F^U^L^L ^S^C^R^E^E^N ^L^I^N^E ^C^O^U^N^T (24 ^T^O 64). "
  1809.  
  1810. " VARIABLES "
  1811. F^U^L^L_S^C^R^E^E^N_L^I^N^E_C^O^U^N^T = ('24') "^S^E^T^S M^A^C F^U^L^L_S^C^R^E^E^N_L^I^N^E_C^O^U^N^T"
  1812. ^C^L^E^A^R_^A^L^L_^T^A^B^S = (ESC '[3^G')
  1813. ^S^E^T_80_^C^O^L^S = (ESC '[?3^L')
  1814. ^S^E^T_132_^C^O^L^S = (ESC '[?3^H')
  1815. ^S^T^A^R^T_^B^O^L^D = (ESC '[1^M')
  1816. ^S^T^A^R^T_^I^N^V^E^R^S^E = (ESC '[7^M')
  1817. ^S^T^A^R^T_^U^N^D^E^R^L^I^N^E = (ESC '[4^M')
  1818. ^S^T^O^P_^A^T^T^R^S = (ESC '[^M')
  1819. ^S^E^T_^G^R^A^P^H^I^C^S = (ESC '(B' ESC ')0' SI)
  1820. ^E^N^A^B^L^E_^A^U^T^O_^T^A^B = (ESC '[=3^H')
  1821. ^D^I^S^A^B^L^E_^A^U^T^O_^W^R^A^P = (ESC '[?7^L')
  1822. ^G^L^O^B^A^L_^P^R^O^T^E^C^T_^O^N = (ESC '[=1^H')
  1823. ^G^L^O^B^A^L_^P^R^O^T^E^C^T_^O^F^F = (ESC '[=1^L')
  1824. ^C^U^R^S^O^R_^P^O^S_721 = (ESC '[=6^H')
  1825. ^R^E^S^E^T_^T^E^R^M^I^N^A^L = (ESC '^C')
  1826. ^E^N^T^E^R_^S^C^R^E^E^N_^M^O^D^E = (ESC '[=5^H')
  1827. ^E^N^T^E^R_^L^I^N^E_^M^O^D^E = (ESC '[=5^L')
  1828. NOS_^H^O^S^T = (ESC '[2^T')
  1829. ^S^E^T_^S^C^R^E^E^N_^S^I^Z^E = (ESC '[' F^U^L^L_S^C^R^E^E^N_L^I^N^E_C^O^U^N^T ';80^Z')
  1830.  
  1831. " MODEL NAME AND COMMUNICATION TYPE "
  1832. ^M^O^D^E^L_^N^A^M^E ^V^A^L^U^E = 'MCON20'
  1833. ^C^O^M^M^U^N^I^C^A^T^I^O^N^S ^T^Y^P^E = ^A^S^Y^N^C^H
  1834.  
  1835. " END OF INFORMATION SPECIFICATION "
  1836. ^E^N^D_^O^F_^I^N^F^O^R^M^A^T^I^O^N ^I^N = (0)
  1837.  
  1838. " CURSOR POSITIONING INFORMATION "
  1839. ^C^U^R^S^O^R_^P^O^S_^E^N^C^O^D^I^N^G ^B^I^A^S = (0) ^T^Y^P^E = ^A^N^S^I_^C^U^R^S^O^R
  1840. ^C^U^R^S^O^R_^P^O^S_^C^O^L^U^M^N_^F^I^R^S^T ^V^A^L^U^E = FALSE
  1841. ^C^U^R^S^O^R_^P^O^S_^C^O^L^U^M^N_^L^E^N^G^T^H ^V^A^L^U^E = (0)
  1842. ^C^U^R^S^O^R_^P^O^S_^R^O^W_^L^E^N^G^T^H ^V^A^L^U^E = (0)
  1843. ^C^U^R^S^O^R_^P^O^S_^B^E^G^I^N ^O^U^T = (ESC '[')
  1844. ^C^U^R^S^O^R_^P^O^S_^S^E^C^O^N^D ^O^U^T = (';')
  1845. ^C^U^R^S^O^R_^P^O^S_^T^H^I^R^D ^O^U^T = ('H')
  1846.  
  1847. " CURSOR MOVEMENT INFORMATION "
  1848. ^C^U^R^S^O^R_^H^O^M^E ^I^N^O^U^T = (ESC '[H') ^L^A^B^E^L='O^P^T^I^O^N H'
  1849. ^C^U^R^S^O^R_^U^P ^I^N^O^U^T = (ESC '[A') ^L^A^B^E^L='^U^P ^A^R^R^O^W'
  1850. ^C^U^R^S^O^R_^D^O^W^N ^I^N^O^U^T = (ESC '[B') ^L^A^B^E^L='^D^O^W^N ^A^R^R^O^W'
  1851. ^C^U^R^S^O^R_^R^I^G^H^T ^I^N^O^U^T = (ESC '[C') ^L^A^B^E^L='^R^I^G^H^T ^A^R^R^O^W'
  1852. ^C^U^R^S^O^R_^L^E^F^T ^I^N^O^U^T = (ESC '[D') ^L^A^B^E^L='^L^E^F^T ^A^R^R^O^W'
  1853.  
  1854. " CURSOR BEHAVIOR (^F^O^R ^C^U^R^S^O^R ^M^O^V^E^M^E^N^T ^K^E^Y^S) "
  1855. ^M^O^V^E_^P^A^S^T_^R^I^G^H^T ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  1856. ^M^O^V^E_^P^A^S^T_^L^E^F^T ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  1857. ^M^O^V^E_^P^A^S^T_^T^O^P ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  1858. ^M^O^V^E_^P^A^S^T_^B^O^T^T^O^M ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  1859.  
  1860. " CURSOR BEHAVIOR (^F^O^R ^C^H^A^R^A^C^T^E^R ^K^E^Y^S) "
  1861. ^C^H^A^R_^P^A^S^T_^L^E^F^T ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  1862. ^C^H^A^R_^P^A^S^T_^R^I^G^H^T ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  1863. ^C^H^A^R_^P^A^S^T_^L^A^S^T_^P^O^S^I^T^I^O^N ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  1864.  
  1865. " TERMINAL ATTRIBUTES "
  1866. ^A^T^T^R^I^B^U^T^E^S_^N^O^T_^M^A^S^K^A^B^L^E ^V^A^L^U^E = TRUE
  1867. ^C^L^E^A^R^S_^W^H^E^N_^C^H^A^N^G^E_^S^I^Z^E ^V^A^L^U^E = TRUE "^F^O^R 80/132 ^C^O^L^U^M^N ^C^H^A^N^G^E"
  1868. ^F^U^N^C^T^I^O^N_^K^E^Y_^L^E^A^V^E^S_^M^A^R^K ^V^A^L^U^E = FALSE
  1869. ^H^A^S_^H^I^D^D^E^N ^V^A^L^U^E = FALSE
  1870. ^H^A^S_^P^R^O^T^E^C^T ^V^A^L^U^E = FALSE
  1871. ^H^O^M^E_^A^T_^T^O^P ^V^A^L^U^E = TRUE
  1872. ^M^U^L^T^I^P^L^E_^S^I^Z^E^S ^V^A^L^U^E = TRUE
  1873. ^T^A^B^S_^T^O_^H^O^M^E ^V^A^L^U^E = FALSE
  1874. ^T^A^B^S_^T^O_^T^A^B_^S^T^O^P^S ^V^A^L^U^E = TRUE
  1875. ^T^A^B^S_^T^O_^U^N^P^R^O^T^E^C^T^E^D ^V^A^L^U^E = TRUE
  1876. ^T^Y^P^E_^A^H^E^A^D ^V^A^L^U^E = TRUE
  1877. ^A^U^T^O^M^A^T^I^C_^T^A^B^B^I^N^G ^V^A^L^U^E = TRUE
  1878.  
  1879. " SCREEN SIZES "
  1880. ^S^E^T_^S^I^Z^E ^R^O^W^S = 24 ^C^O^L^U^M^N^S = 80 ^O^U^T = (^S^E^T_80_^C^O^L^S)
  1881. ^S^E^T_^S^I^Z^E ^R^O^W^S = 24 ^C^O^L^U^M^N^S = 132 ^O^U^T = (^S^E^T_132_^C^O^L^S)
  1882.  
  1883. " TERMINAL CAPABILITIES "
  1884. ^I^N^S^E^R^T_^C^H^A^R ^I^N^O^U^T = (ESC '[@A') ^L^A^B^E^L='O^P^T^I^O^N S^P^A^C^E'
  1885. ^I^N^S^E^R^T_^L^I^N^E_^B^O^L ^I^N^O^U^T = (ESC '[L') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T S^P^A^C^E'
  1886. ^D^E^L^E^T^E_^C^H^A^R ^I^N^O^U^T = (ESC '[P') ^L^A^B^E^L='O^P^T^I^O^N D^E^L^E^T^E'
  1887. ^D^E^L^E^T^E_^L^I^N^E_^B^O^L ^I^N^O^U^T = (ESC '[M') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T D^E^L^E^T^E'
  1888. ^E^R^A^S^E_^E^N^D_^O^F_^L^I^N^E ^I^N^O^U^T = (ESC '[N') ^L^A^B^E^L='O^P^T^I^O^N C^L^E^A^R'
  1889. ^E^R^A^S^E_^L^I^N^E_^S^T^A^Y ^I^N^O^U^T = (ESC '[2N')
  1890. ^E^R^A^S^E_^P^A^G^E_^S^T^A^Y ^I^N^O^U^T = (ESC '[2J') ^L^A^B^E^L='C^L^E^A^R'
  1891. ^B^A^C^K^S^P^A^C^E ^I^N = (BS) ^L^A^B^E^L='D^E^L^E^T^E'
  1892. ^T^A^B_^F^O^R^W^A^R^D ^I^N^O^U^T = (HT) ^L^A^B^E^L='T^A^B'
  1893. ^T^A^B_^B^A^C^K^W^A^R^D ^I^N^O^U^T = (ESC '[Z') ^L^A^B^E^L='O^P^T^I^O^N T^A^B'
  1894. ^T^A^B_^C^L^E^A^R_^A^L^L ^I^N^O^U^T = (^C^L^E^A^R_^A^L^L_^T^A^B^S)
  1895. ^T^A^B_^S^E^T ^I^N^O^U^T = (ESC 'H')
  1896.  
  1897. " SCREEN AND LINE MODE TRANSITION "
  1898. ^S^E^T_^S^C^R^E^E^N_^M^O^D^E ^O^U^T = (NOS_^H^O^S^T ^E^N^T^E^R_^S^C^R^E^E^N_^M^O^D^E ..
  1899. ^C^L^E^A^R_^A^L^L_^T^A^B^S ^S^E^T_^G^R^A^P^H^I^C^S ^D^I^S^A^B^L^E_^A^U^T^O_^W^R^A^P ..
  1900. ^E^N^A^B^L^E_^A^U^T^O_^T^A^B ^C^U^R^S^O^R_^P^O^S_721 ^S^E^T_^S^C^R^E^E^N_^S^I^Z^E)
  1901.  
  1902. ^S^E^T_^L^I^N^E_^M^O^D^E ^O^U^T = (^E^N^T^E^R_^L^I^N^E_^M^O^D^E ^S^E^T_^G^R^A^P^H^I^C^S ^R^E^S^E^T_^T^E^R^M^I^N^A^L)
  1903.  
  1904. " MISCELLANEOUS TERMINAL SEQUENCES "
  1905. ^P^R^O^T^E^C^T_^B^E^G^I^N ^O^U^T = (ESC 'V')
  1906. ^P^R^O^T^E^C^T_^E^N^D ^O^U^T = (ESC 'W')
  1907. ^P^R^O^T^E^C^T_^A^L^L ^O^U^T = (ESC '[1^P')
  1908. ^O^U^T^P^U^T_^B^E^G^I^N ^O^U^T = (^G^L^O^B^A^L_^P^R^O^T^E^C^T_^O^F^F)
  1909. ^O^U^T^P^U^T_^E^N^D ^O^U^T = (^G^L^O^B^A^L_^P^R^O^T^E^C^T_^O^N)
  1910. ^B^E^L^L_^N^A^K ^O^U^T = (BEL)
  1911.  
  1912. " CDC STANDARD FUNCTION KEY INPUT INFORMATION "
  1913. ^N^E^X^T ^I^N = (CR) ^L^A^B^E^L='R^E^T^U^R^N'
  1914. ^D^A^T^A ^I^N = (ESC 'O' 27(16)) ^L^A^B^E^L='O^P^T^I^O^N "'
  1915. ^D^A^T^A_^S ^I^N = (ESC 'O' 22(16)) ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T "'
  1916. ^B^A^C^K ^I^N = (ESC 'O;') ^L^A^B^E^L='O^P^T^I^O^N ;'
  1917. ^B^A^C^K_^S ^I^N = (ESC 'O:') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T ;'
  1918. ^H^E^L^P ^I^N = (ESC 'O/') ^L^A^B^E^L='O^P^T^I^O^N ?'
  1919. ^H^E^L^P_^S ^I^N = (ESC 'O?') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T ?'
  1920. ^E^D^I^T ^I^N = (ESC 'O.') ^L^A^B^E^L='O^P^T^I^O^N .'
  1921. ^E^D^I^T_^S ^I^N = (ESC 'O>') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T .'
  1922. ^D^O^W^N ^I^N = (ESC 'O+') ^L^A^B^E^L='O^P^T^I^O^N D'
  1923. ^D^O^W^N_^S ^I^N = (ESC 'O-') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T D'
  1924. ^U^P ^I^N = (ESC 'O(') ^L^A^B^E^L='O^P^T^I^O^N U'
  1925. ^U^P_^S ^I^N = (ESC 'O)') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T U'
  1926. ^F^W^D ^I^N = (ESC 'OX') ^L^A^B^E^L='O^P^T^I^O^N F'
  1927. ^F^W^D_^S ^I^N = (ESC 'O^O') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T F'
  1928. ^B^K^W ^I^N = (ESC 'OW') ^L^A^B^E^L='O^P^T^I^O^N B'
  1929. ^B^K^W_^S ^I^N = (ESC 'O^F') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T B'
  1930.  
  1931. " PROGRAMMABLE FUNCTION KEY INPUT INFORMATION "
  1932. ^F1 ^I^N = (ESC 'O^Q') ^L^A^B^E^L='F1 O^P^T^I^O^N 1'
  1933. ^F2 ^I^N = (ESC 'O^R') ^L^A^B^E^L='F2 O^P^T^I^O^N 2'
  1934. ^F3 ^I^N = (ESC 'O^S') ^L^A^B^E^L='F3 O^P^T^I^O^N 3'
  1935. ^F4 ^I^N = (ESC 'O^T') ^L^A^B^E^L='F4 O^P^T^I^O^N 4'
  1936. ^F5 ^I^N = (ESC 'O^U') ^L^A^B^E^L='F5 O^P^T^I^O^N 5'
  1937. ^F6 ^I^N = (ESC 'O^V') ^L^A^B^E^L='F6 O^P^T^I^O^N 6'
  1938. ^F7 ^I^N = (ESC 'O^W') ^L^A^B^E^L='F7 O^P^T^I^O^N 7'
  1939. ^F8 ^I^N = (ESC 'O^X') ^L^A^B^E^L='F8 O^P^T^I^O^N 8'
  1940. ^F9 ^I^N = (ESC 'O^Y') ^L^A^B^E^L='F9 O^P^T^I^O^N 9'
  1941. ^F10 ^I^N = (ESC 'O^Z') ^L^A^B^E^L='10 O^P^T^I^O^N 0'
  1942. ^F11 ^I^N = (ESC 'O^0') ^L^A^B^E^L='11 O^P^T^I^O^N Q'
  1943. ^F12 ^I^N = (ESC 'O^1') ^L^A^B^E^L='12 O^P^T^I^O^N W'
  1944. ^F13 ^I^N = (ESC 'O^2') ^L^A^B^E^L='13 O^P^T^I^O^N E'
  1945. ^F14 ^I^N = (ESC 'O^3') ^L^A^B^E^L='14 O^P^T^I^O^N R'
  1946. ^F15 ^I^N = (ESC 'O_') ^L^A^B^E^L='15 O^P^T^I^O^N T'
  1947. ^F16 ^I^N = (ESC 'OU') ^L^A^B^E^L='16 O^P^T^I^O^N Y'
  1948. ^F1_^S ^I^N = (ESC 'O^G') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T 1'
  1949. ^F2_^S ^I^N = (ESC 'O^H') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T 2'
  1950. ^F3_^S ^I^N = (ESC 'O^I') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T 3'
  1951. ^F4_^S ^I^N = (ESC 'O^J') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T 4'
  1952. ^F5_^S ^I^N = (ESC 'O^M') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T 5'
  1953. ^F6_^S ^I^N = (ESC 'O^L') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T 6'
  1954. ^F7_^S ^I^N = (ESC 'OM') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T 7'
  1955. ^F8_^S ^I^N = (ESC 'O^N') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T 8'
  1956. ^F9_^S ^I^N = (ESC 'O^P') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T 9'
  1957. ^F10_^S ^I^N = (ESC 'OO') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T 0'
  1958. ^F11_^S ^I^N = (ESC 'O^A') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T Q'
  1959. ^F12_^S ^I^N = (ESC 'O^B') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T W'
  1960. ^F13_^S ^I^N = (ESC 'O^C') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T E'
  1961. ^F14_^S ^I^N = (ESC 'O^D') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T R'
  1962. ^F15_^S ^I^N = (ESC 'O^E') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T T'
  1963. ^F16_^S ^I^N = (ESC 'OV') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T Y'
  1964.  
  1965. " TERMINAL VIDEO ATTRIBUTES "
  1966. ^A^L^T_^B^E^G^I^N ^O^U^T = (^S^T^A^R^T_^B^O^L^D)
  1967. ^A^L^T_^E^N^D ^O^U^T = (^S^T^O^P_^A^T^T^R^S)
  1968. ^B^L^I^N^K_^B^E^G^I^N ^O^U^T = () "^N^O^T ^S^U^P^P^O^R^T^E^D"
  1969. ^B^L^I^N^K_^E^N^D ^O^U^T = () "^N^O^T ^S^U^P^P^O^R^T^E^D"
  1970. ^I^N^V^E^R^S^E_^B^E^G^I^N ^O^U^T = (^S^T^A^R^T_^I^N^V^E^R^S^E)
  1971. ^I^N^V^E^R^S^E_^E^N^D ^O^U^T = (^S^T^O^P_^A^T^T^R^S)
  1972. ^U^N^D^E^R^L^I^N^E_^B^E^G^I^N ^O^U^T = (^S^T^A^R^T_^U^N^D^E^R^L^I^N^E)
  1973. ^U^N^D^E^R^L^I^N^E_^E^N^D ^O^U^T = (^S^T^O^P_^A^T^T^R^S)
  1974.  
  1975. " LOGICAL ATTRIBUTE SPECIFICATIONS "
  1976. ^E^R^R^O^R_^B^E^G^I^N ^O^U^T = (^S^T^A^R^T_^B^O^L^D)
  1977. ^E^R^R^O^R_^E^N^D ^O^U^T = (^S^T^O^P_^A^T^T^R^S)
  1978. ^I^N^P^U^T_^T^E^X^T_^B^E^G^I^N ^O^U^T = (^S^T^A^R^T_^U^N^D^E^R^L^I^N^E)
  1979. ^I^N^P^U^T_^T^E^X^T_^E^N^D ^O^U^T = (^S^T^O^P_^A^T^T^R^S)
  1980. ^I^T^A^L^I^C_^B^E^G^I^N ^O^U^T = (^S^T^A^R^T_^I^N^V^E^R^S^E)
  1981. ^I^T^A^L^I^C_^E^N^D ^O^U^T = (^S^T^O^P_^A^T^T^R^S)
  1982.  
  1983. " LINE DRAWING CHARACTER SPECIFICATION "
  1984. ^L^D_^F^I^N^E_^B^E^G^I^N ^O^U^T = (SO)
  1985. ^L^D_^F^I^N^E_^E^N^D ^O^U^T = (SI)
  1986. ^L^D_^F^I^N^E_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = (71(16))
  1987. ^L^D_^F^I^N^E_^V^E^R^T^I^C^A^L ^O^U^T = (78(16))
  1988. ^L^D_^F^I^N^E_^U^P^P^E^R_^L^E^F^T ^O^U^T = (6C(16))
  1989. ^L^D_^F^I^N^E_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = (6B(16))
  1990. ^L^D_^F^I^N^E_^L^O^W^E^R_^L^E^F^T ^O^U^T = (6D(16))
  1991. ^L^D_^F^I^N^E_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = (6A(16))
  1992. ^L^D_^F^I^N^E_^U^P_^T ^O^U^T = (77(16))
  1993. ^L^D_^F^I^N^E_^D^O^W^N_^T ^O^U^T = (76(16))
  1994. ^L^D_^F^I^N^E_^L^E^F^T_^T ^O^U^T = (74(16))
  1995. ^L^D_^F^I^N^E_^R^I^G^H^T_^T ^O^U^T = (75(16))
  1996. ^L^D_^F^I^N^E_^C^R^O^S^S ^O^U^T = (6E(16))
  1997.  
  1998. ^L^D_^M^E^D^I^U^M_^B^E^G^I^N ^O^U^T = (SO ^S^T^A^R^T_^B^O^L^D)
  1999. ^L^D_^M^E^D^I^U^M_^E^N^D ^O^U^T = (SI ^S^T^O^P_^A^T^T^R^S)
  2000. ^L^D_^M^E^D^I^U^M_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = (71(16))
  2001. ^L^D_^M^E^D^I^U^M_^V^E^R^T^I^C^A^L ^O^U^T = (78(16))
  2002. ^L^D_^M^E^D^I^U^M_^U^P^P^E^R_^L^E^F^T ^O^U^T = (6C(16))
  2003. ^L^D_^M^E^D^I^U^M_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = (6B(16))
  2004. ^L^D_^M^E^D^I^U^M_^L^O^W^E^R_^L^E^F^T ^O^U^T = (6D(16))
  2005. ^L^D_^M^E^D^I^U^M_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = (6A(16))
  2006. ^L^D_^M^E^D^I^U^M_^U^P_^T ^O^U^T = (77(16))
  2007. ^L^D_^M^E^D^I^U^M_^D^O^W^N_^T ^O^U^T = (76(16))
  2008. ^L^D_^M^E^D^I^U^M_^L^E^F^T_^T ^O^U^T = (74(16))
  2009. ^L^D_^M^E^D^I^U^M_^R^I^G^H^T_^T ^O^U^T = (75(16))
  2010. ^L^D_^M^E^D^I^U^M_^C^R^O^S^S ^O^U^T = (6E(16))
  2011.  
  2012. ^L^D_^B^O^L^D_^B^E^G^I^N ^O^U^T = (^S^T^A^R^T_^I^N^V^E^R^S^E)
  2013. ^L^D_^B^O^L^D_^E^N^D ^O^U^T = (^S^T^O^P_^A^T^T^R^S)
  2014. ^L^D_^B^O^L^D_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = (' ')
  2015. ^L^D_^B^O^L^D_^V^E^R^T^I^C^A^L ^O^U^T = (' ')
  2016. ^L^D_^B^O^L^D_^U^P^P^E^R_^L^E^F^T ^O^U^T = (' ')
  2017. ^L^D_^B^O^L^D_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = (' ')
  2018. ^L^D_^B^O^L^D_^L^O^W^E^R_^L^E^F^T ^O^U^T = (' ')
  2019. ^L^D_^B^O^L^D_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = (' ')
  2020. ^L^D_^B^O^L^D_^U^P_^T ^O^U^T = (' ')
  2021. ^L^D_^B^O^L^D_^D^O^W^N_^T ^O^U^T = (' ')
  2022. ^L^D_^B^O^L^D_^L^E^F^T_^T ^O^U^T = (' ')
  2023. ^L^D_^B^O^L^D_^R^I^G^H^T_^T ^O^U^T = (' ')
  2024. ^L^D_^B^O^L^D_^C^R^O^S^S ^O^U^T = (' ')
  2025.  
  2026. " VARIABLES FOR FULL SCREEN EDITOR FUNCTION KEY DEFINITIONS "
  2027. ^K1 = ('SK1/SM/L/ MARK /;SKS1/SMW/L/MRKCHR/')
  2028. ^K2 = ('SK2/MMTP/L/ MOVE /;SKS2/CMTP;UM;SA' '/L/ONECPY/')
  2029. ^K3 = ('SK3/IBP/L/ INSB /;SKS3/DB/L/ DELB /')
  2030. ^K4 = ('SK4/PF/L/ FIRST/;SKS4/VL/L/ LAST /')
  2031. ^K5 = ('SK5/U/L/ UNDO /;SKS5/UM/L/UNMARK/')
  2032. ^K6 = ('SK6/Q/L/ QUIT /;SKS6/QR/L/ QUITR/')
  2033. ^K7 = ('SK7"L/&?/"L"LOCATE";SKS7/LN/L/LOCNXT/')
  2034. ^K8 = ('SK8/SP1/L/1 ROW /;SKS8/SP2/L/2 ROWS/')
  2035. ^K9 = ('SK9/V/L/MIDDLE/;SKS9/.E/L/ENDLIN/')
  2036. ^K10 = ('SK10/SVO0/L/ LEFT /;SKS10/SVO&C;.P+20/L/ RIGHT/')
  2037. ^K11 = ('SK11/.S/L/ SPLIT/;SKS11/.J/L/ JOIN /')
  2038. ^K12 = ('SK12/.F/L/ PARA /;SKS12/.C/L/CENTER/')
  2039. ^K13 = ('SK13/SS/L/ CLEAR/;SKS13/.S;D;.E/L/ TRUNC/')
  2040. ^K14 = ('SK14/H/L/ HELP /;SKS14/EDIT/L/UNSPLT/')
  2041. ^K15 = ('SK15/CMTP/L/ COPY /;SKS15/DM/L/ DELM /')
  2042. ^K16 = ('SK16/SVC132/L/132COL/;SKS16/SVC80/L/ 80COL/;')
  2043.  
  2044. " DEFAULT KEY DEFINITIONS FOR THE FULL SCREEN EDITOR "
  2045. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  2046. ^N^A^M^E = ('FSEKEYS')...
  2047. ^O^U^T = (^K1 ';' ^K2 ';' ^K3 ';' ^K4 ';' ^K5)
  2048. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  2049. ^N^A^M^E = ('FSEKEYS')...
  2050. ^O^U^T = (^K6 ';' ^K7 ';' ^K8 ';' ^K9 ';' ^K10)
  2051. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  2052. ^N^A^M^E = ('FSEKEYS')...
  2053. ^O^U^T = (^K11 ';' ^K12 ';' ^K13 ';' ^K14 ';' ^K15 ';' ^K16)
  2054.  
  2055.  
  2056. " END OF NOS TERMINAL DEFINITION FILE FOR MACINTOSH "
  2057. " RUNNING CONTROL DATA CONNECT V2.0 OR DESKTOP/VE V1.1 "
  2058. *WEOR
  2059. TDUMC21 *** REMOVE THIS LINE WHEN USING AS INPUT TO *TDU*. ***
  2060.  
  2061. " NOS TERMINAL DEFINITION FILE FOR MACINTOSH "
  2062. " RUNNING CONTROL DATA CONNECT V2.1 OR DESKTOP/VE V1.2 "
  2063.  
  2064. " MCON21 DECEMBER, 1988 "
  2065.  
  2066. " T^O ^C^H^A^N^G^E ^T^H^E ^F^U^L^L ^S^C^R^E^E^N ^L^I^N^E ^C^O^U^N^T ^F^O^R ^L^A^R^G^E^R ^S^C^R^E^E^N^S, ^M^A^K^E ^F^O^L^L^O^W^I^N^G
  2067. " ^M^O^D^I^F^I^C^A^T^I^O^N^S ^T^O ^T^H^I^S T^E^R^M^I^N^A^L D^E^F^I^N^I^T^I^O^N ^S^O^U^R^C^E ^B^E^F^O^R^E ^R^E^C^O^M^P^I^L^I^N^G:
  2068. " R^E^P^L^A^C^E F^U^L^L_S^C^R^E^E^N_L^I^N^E_C^O^U^N^T ^V^A^R^I^A^B^L^E ^V^A^L^U^E 24 ^W^I^T^H ^F^U^L^L ^S^C^R^E^E^N ^L^I^N^E "
  2069. " ^C^O^U^N^T (24 ^T^O 64) ^D^E^F^I^N^E^D ^I^N CONNECT ^O^R D^E^S^K^T^O^P/VE T^E^R^M^I^N^A^L S^E^T^T^I^N^G^S. "
  2070. " R^E^P^L^A^C^E ^R^O^W^S = 24 ^I^N ^S^E^T_^S^I^Z^E ^L^I^N^E^S ^W^I^T^H M^A^C ^F^U^L^L ^S^C^R^E^E^N ^L^I^N^E ^C^O^U^N^T. "
  2071. " R^E^P^L^A^C^E ^M^O^D^E^L_^N^A^M^E ^V^A^L^U^E ^W^I^T^H ^U^N^I^Q^U^E ^T^E^R^M^I^N^A^L ^N^A^M^E ^S^U^C^H ^A^S "
  2072. " MC21XX ^W^H^E^R^E XX ^I^S ^T^H^E ^F^U^L^L ^S^C^R^E^E^N ^L^I^N^E ^C^O^U^N^T (24 ^T^O 64). "
  2073.  
  2074. " VARIABLES "
  2075. F^U^L^L_S^C^R^E^E^N_L^I^N^E_C^O^U^N^T = ('24') "^S^E^T^S M^A^C F^U^L^L_S^C^R^E^E^N_L^I^N^E_C^O^U^N^T"
  2076. ^C^L^E^A^R_^A^L^L_^T^A^B^S = (ESC '[3^G')
  2077. ^S^E^T_80_^C^O^L^S = (ESC '[?3^L')
  2078. ^S^E^T_132_^C^O^L^S = (ESC '[?3^H')
  2079. ^S^T^A^R^T_^B^O^L^D = (ESC '[1^M')
  2080. ^S^T^A^R^T_^I^N^V^E^R^S^E = (ESC '[7^M')
  2081. ^S^T^A^R^T_^U^N^D^E^R^L^I^N^E = (ESC '[4^M')
  2082. ^S^T^O^P_^B^O^L^D = (ESC '[21^M')
  2083. ^S^T^O^P_^I^N^V^E^R^S^E = (ESC '[27^M')
  2084. ^S^T^O^P_^U^N^D^E^R^L^I^N^E = (ESC '[24^M')
  2085. ^S^E^T_^G^R^A^P^H^I^C^S = (ESC '(B' ESC ')0' SI)
  2086. ^E^N^A^B^L^E_^A^U^T^O_^T^A^B = (ESC '[=3^H')
  2087. ^D^I^S^A^B^L^E_^A^U^T^O_^W^R^A^P = (ESC '[?7^L')
  2088. ^E^N^A^B^L^E_^I^N^S^E^R^T^I^O^N = (ESC '[4^H')
  2089. ^D^I^S^A^B^L^E_^I^N^S^E^R^T^I^O^N = (ESC '[4^L')
  2090. ^G^L^O^B^A^L_^P^R^O^T^E^C^T_^O^N = (ESC '[=1^H')
  2091. ^G^L^O^B^A^L_^P^R^O^T^E^C^T_^O^F^F = (ESC '[=1^L')
  2092. ^C^U^R^S^O^R_^P^O^S_721 = (ESC '[=6^H')
  2093. ^R^E^S^E^T_^T^E^R^M^I^N^A^L = (ESC '^C')
  2094. ^E^N^T^E^R_^S^C^R^E^E^N_^M^O^D^E = (ESC '[=5^H')
  2095. ^E^N^T^E^R_^L^I^N^E_^M^O^D^E = (ESC '[=5^L')
  2096. NOS_^H^O^S^T = (ESC '[2^T')
  2097. ^S^E^T_^S^C^R^E^E^N_^S^I^Z^E = (ESC '[' F^U^L^L_S^C^R^E^E^N_L^I^N^E_C^O^U^N^T ';80^Z')
  2098.  
  2099. " MODEL NAME AND COMMUNICATION TYPE "
  2100. ^M^O^D^E^L_^N^A^M^E ^V^A^L^U^E = 'MCON21'
  2101. ^C^O^M^M^U^N^I^C^A^T^I^O^N^S ^T^Y^P^E = ^A^S^Y^N^C^H
  2102.  
  2103. " END OF INFORMATION SPECIFICATION "
  2104. ^E^N^D_^O^F_^I^N^F^O^R^M^A^T^I^O^N ^I^N = (0)
  2105.  
  2106. " CURSOR POSITIONING INFORMATION "
  2107. ^C^U^R^S^O^R_^P^O^S_^E^N^C^O^D^I^N^G ^B^I^A^S = (0) ^T^Y^P^E = ^A^N^S^I_^C^U^R^S^O^R
  2108. ^C^U^R^S^O^R_^P^O^S_^C^O^L^U^M^N_^F^I^R^S^T ^V^A^L^U^E = FALSE
  2109. ^C^U^R^S^O^R_^P^O^S_^C^O^L^U^M^N_^L^E^N^G^T^H ^V^A^L^U^E = (0)
  2110. ^C^U^R^S^O^R_^P^O^S_^R^O^W_^L^E^N^G^T^H ^V^A^L^U^E = (0)
  2111. ^C^U^R^S^O^R_^P^O^S_^B^E^G^I^N ^O^U^T = (ESC '[')
  2112. ^C^U^R^S^O^R_^P^O^S_^S^E^C^O^N^D ^O^U^T = (';')
  2113. ^C^U^R^S^O^R_^P^O^S_^T^H^I^R^D ^O^U^T = ('H')
  2114.  
  2115. " CURSOR MOVEMENT INFORMATION "
  2116. ^C^U^R^S^O^R_^H^O^M^E ^I^N^O^U^T = (ESC '[H') ^L^A^B^E^L='O^P^T^I^O^N H'
  2117. ^C^U^R^S^O^R_^U^P ^I^N^O^U^T = (ESC '[A') ^L^A^B^E^L='^U^P ^A^R^R^O^W'
  2118. ^C^U^R^S^O^R_^D^O^W^N ^I^N^O^U^T = (ESC '[B') ^L^A^B^E^L='^D^O^W^N ^A^R^R^O^W'
  2119. ^C^U^R^S^O^R_^R^I^G^H^T ^I^N^O^U^T = (ESC '[C') ^L^A^B^E^L='^R^I^G^H^T ^A^R^R^O^W'
  2120. ^C^U^R^S^O^R_^L^E^F^T ^I^N^O^U^T = (ESC '[D') ^L^A^B^E^L='^L^E^F^T ^A^R^R^O^W'
  2121.  
  2122. " CURSOR BEHAVIOR (^F^O^R ^C^U^R^S^O^R ^M^O^V^E^M^E^N^T ^K^E^Y^S) "
  2123. ^M^O^V^E_^P^A^S^T_^R^I^G^H^T ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  2124. ^M^O^V^E_^P^A^S^T_^L^E^F^T ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  2125. ^M^O^V^E_^P^A^S^T_^T^O^P ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  2126. ^M^O^V^E_^P^A^S^T_^B^O^T^T^O^M ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  2127.  
  2128. " CURSOR BEHAVIOR (^F^O^R ^C^H^A^R^A^C^T^E^R ^K^E^Y^S) "
  2129. ^C^H^A^R_^P^A^S^T_^L^E^F^T ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  2130. ^C^H^A^R_^P^A^S^T_^R^I^G^H^T ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  2131. ^C^H^A^R_^P^A^S^T_^L^A^S^T_^P^O^S^I^T^I^O^N ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  2132.  
  2133. " TERMINAL ATTRIBUTES "
  2134. ^C^L^E^A^R^S_^W^H^E^N_^C^H^A^N^G^E_^S^I^Z^E ^V^A^L^U^E = TRUE "^F^O^R 80/132 ^C^O^L^U^M^N ^C^H^A^N^G^E"
  2135. ^F^U^N^C^T^I^O^N_^K^E^Y_^L^E^A^V^E^S_^M^A^R^K ^V^A^L^U^E = FALSE
  2136. ^H^A^S_^H^I^D^D^E^N ^V^A^L^U^E = FALSE
  2137. ^H^A^S_^P^R^O^T^E^C^T ^V^A^L^U^E = TRUE
  2138. ^H^O^M^E_^A^T_^T^O^P ^V^A^L^U^E = TRUE
  2139. ^M^U^L^T^I^P^L^E_^S^I^Z^E^S ^V^A^L^U^E = TRUE
  2140. ^T^A^B^S_^T^O_^H^O^M^E ^V^A^L^U^E = FALSE
  2141. ^T^A^B^S_^T^O_^T^A^B_^S^T^O^P^S ^V^A^L^U^E = TRUE
  2142. ^T^A^B^S_^T^O_^U^N^P^R^O^T^E^C^T^E^D ^V^A^L^U^E = TRUE
  2143. ^T^Y^P^E_^A^H^E^A^D ^V^A^L^U^E = TRUE
  2144. ^A^U^T^O^M^A^T^I^C_^T^A^B^B^I^N^G ^V^A^L^U^E = TRUE
  2145.  
  2146. " SCREEN SIZES "
  2147. ^S^E^T_^S^I^Z^E ^R^O^W^S = 24 ^C^O^L^U^M^N^S = 80 ^O^U^T = (^S^E^T_80_^C^O^L^S)
  2148. ^S^E^T_^S^I^Z^E ^R^O^W^S = 24 ^C^O^L^U^M^N^S = 132 ^O^U^T = (^S^E^T_132_^C^O^L^S)
  2149.  
  2150. " TERMINAL CAPABILITIES "
  2151. ^I^N^S^E^R^T_^C^H^A^R ^I^N^O^U^T = (ESC '[@A') ^L^A^B^E^L='O^P^T^I^O^N S^P^A^C^E'
  2152. ^I^N^S^E^R^T_^L^I^N^E_^B^O^L ^I^N^O^U^T = (ESC '[L') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T S^P^A^C^E'
  2153. ^D^E^L^E^T^E_^C^H^A^R ^I^N^O^U^T = (ESC '[P') ^L^A^B^E^L='O^P^T^I^O^N D^E^L^E^T^E'
  2154. ^D^E^L^E^T^E_^L^I^N^E_^B^O^L ^I^N^O^U^T = (ESC '[M') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T D^E^L^E^T^E'
  2155. ^E^R^A^S^E_^E^N^D_^O^F_^L^I^N^E ^I^N^O^U^T = (ESC '[N') ^L^A^B^E^L='O^P^T^I^O^N C^L^E^A^R'
  2156. ^E^R^A^S^E_^L^I^N^E_^S^T^A^Y ^I^N^O^U^T = (ESC '[2N')
  2157. ^E^R^A^S^E_^P^A^G^E_^S^T^A^Y ^I^N^O^U^T = (ESC '[2J') ^L^A^B^E^L='C^L^E^A^R'
  2158. ^B^A^C^K^S^P^A^C^E ^I^N = (BS) ^L^A^B^E^L='D^E^L^E^T^E'
  2159. ^T^A^B_^F^O^R^W^A^R^D ^I^N^O^U^T = (HT) ^L^A^B^E^L='T^A^B'
  2160. ^T^A^B_^B^A^C^K^W^A^R^D ^I^N^O^U^T = (ESC '[Z') ^L^A^B^E^L='O^P^T^I^O^N T^A^B'
  2161. ^T^A^B_^C^L^E^A^R_^A^L^L ^I^N^O^U^T = (^C^L^E^A^R_^A^L^L_^T^A^B^S)
  2162. ^T^A^B_^S^E^T ^I^N^O^U^T = (ESC 'H')
  2163. ^T^A^B_^C^L^E^A^R ^I^N^O^U^T = (ESC '[^G')
  2164. ^I^N^S^E^R^T_^M^O^D^E_^B^E^G^I^N ^I^N^O^U^T = (^E^N^A^B^L^E_^I^N^S^E^R^T^I^O^N)
  2165. ^I^N^S^E^R^T_^M^O^D^E_^E^N^D ^I^N^O^U^T = (^D^I^S^A^B^L^E_^I^N^S^E^R^T^I^O^N)
  2166.  
  2167. " SCREEN AND LINE MODE TRANSITION "
  2168. ^S^E^T_^S^C^R^E^E^N_^M^O^D^E ^O^U^T = (NOS_^H^O^S^T ^E^N^T^E^R_^S^C^R^E^E^N_^M^O^D^E ..
  2169. ^C^L^E^A^R_^A^L^L_^T^A^B^S ^S^E^T_^G^R^A^P^H^I^C^S ^D^I^S^A^B^L^E_^A^U^T^O_^W^R^A^P ..
  2170. ^E^N^A^B^L^E_^A^U^T^O_^T^A^B ^C^U^R^S^O^R_^P^O^S_721 ^S^E^T_^S^C^R^E^E^N_^S^I^Z^E)
  2171.  
  2172. ^S^E^T_^L^I^N^E_^M^O^D^E ^O^U^T = (^E^N^T^E^R_^L^I^N^E_^M^O^D^E ^S^E^T_^G^R^A^P^H^I^C^S ^R^E^S^E^T_^T^E^R^M^I^N^A^L)
  2173.  
  2174. " MISCELLANEOUS TERMINAL SEQUENCES "
  2175. ^P^R^O^T^E^C^T_^B^E^G^I^N ^O^U^T = (ESC 'V')
  2176. ^P^R^O^T^E^C^T_^E^N^D ^O^U^T = (ESC 'W')
  2177. ^P^R^O^T^E^C^T_^A^L^L ^O^U^T = (ESC '[1^P')
  2178. ^O^U^T^P^U^T_^B^E^G^I^N ^O^U^T = (^G^L^O^B^A^L_^P^R^O^T^E^C^T_^O^F^F ^D^I^S^A^B^L^E_^I^N^S^E^R^T^I^O^N)
  2179. ^O^U^T^P^U^T_^E^N^D ^O^U^T = (^G^L^O^B^A^L_^P^R^O^T^E^C^T_^O^N)
  2180. ^B^E^L^L_^N^A^K ^O^U^T = (BEL)
  2181.  
  2182. " CDC STANDARD FUNCTION KEY INPUT INFORMATION "
  2183. ^N^E^X^T ^I^N = (CR) ^L^A^B^E^L='R^E^T^U^R^N'
  2184. ^D^A^T^A ^I^N = (ESC 'O' 27(16)) ^L^A^B^E^L='O^P^T^I^O^N "'
  2185. ^D^A^T^A_^S ^I^N = (ESC 'O' 22(16)) ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T "'
  2186. ^B^A^C^K ^I^N = (ESC 'O;') ^L^A^B^E^L='O^P^T^I^O^N ;'
  2187. ^B^A^C^K_^S ^I^N = (ESC 'O:') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T ;'
  2188. ^H^E^L^P ^I^N = (ESC 'O/') ^L^A^B^E^L='O^P^T^I^O^N ?'
  2189. ^H^E^L^P_^S ^I^N = (ESC 'O?') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T ?'
  2190. ^E^D^I^T ^I^N = (ESC 'O.') ^L^A^B^E^L='O^P^T^I^O^N .'
  2191. ^E^D^I^T_^S ^I^N = (ESC 'O>') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T .'
  2192. ^D^O^W^N ^I^N = (ESC 'O+') ^L^A^B^E^L='O^P^T^I^O^N D'
  2193. ^D^O^W^N_^S ^I^N = (ESC 'O-') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T D'
  2194. ^U^P ^I^N = (ESC 'O(') ^L^A^B^E^L='O^P^T^I^O^N U'
  2195. ^U^P_^S ^I^N = (ESC 'O)') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T U'
  2196. ^F^W^D ^I^N = (ESC 'OX') ^L^A^B^E^L='O^P^T^I^O^N F'
  2197. ^F^W^D_^S ^I^N = (ESC 'O^O') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T F'
  2198. ^B^K^W ^I^N = (ESC 'OW') ^L^A^B^E^L='O^P^T^I^O^N B'
  2199. ^B^K^W_^S ^I^N = (ESC 'O^F') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T B'
  2200.  
  2201. " PROGRAMMABLE FUNCTION KEY INPUT INFORMATION "
  2202. ^F1 ^I^N = (ESC 'O^Q') ^L^A^B^E^L='F1 O^P^T^I^O^N 1'
  2203. ^F2 ^I^N = (ESC 'O^R') ^L^A^B^E^L='F2 O^P^T^I^O^N 2'
  2204. ^F3 ^I^N = (ESC 'O^S') ^L^A^B^E^L='F3 O^P^T^I^O^N 3'
  2205. ^F4 ^I^N = (ESC 'O^T') ^L^A^B^E^L='F4 O^P^T^I^O^N 4'
  2206. ^F5 ^I^N = (ESC 'O^U') ^L^A^B^E^L='F5 O^P^T^I^O^N 5'
  2207. ^F6 ^I^N = (ESC 'O^V') ^L^A^B^E^L='F6 O^P^T^I^O^N 6'
  2208. ^F7 ^I^N = (ESC 'O^W') ^L^A^B^E^L='F7 O^P^T^I^O^N 7'
  2209. ^F8 ^I^N = (ESC 'O^X') ^L^A^B^E^L='F8 O^P^T^I^O^N 8'
  2210. ^F9 ^I^N = (ESC 'O^Y') ^L^A^B^E^L='F9 O^P^T^I^O^N 9'
  2211. ^F10 ^I^N = (ESC 'O^Z') ^L^A^B^E^L='10 O^P^T^I^O^N 0'
  2212. ^F11 ^I^N = (ESC 'O^0') ^L^A^B^E^L='11 O^P^T^I^O^N Q'
  2213. ^F12 ^I^N = (ESC 'O^1') ^L^A^B^E^L='12 O^P^T^I^O^N W'
  2214. ^F13 ^I^N = (ESC 'O^2') ^L^A^B^E^L='13 O^P^T^I^O^N E'
  2215. ^F14 ^I^N = (ESC 'O^3') ^L^A^B^E^L='14 O^P^T^I^O^N R'
  2216. ^F15 ^I^N = (ESC 'O_') ^L^A^B^E^L='15 O^P^T^I^O^N T'
  2217. ^F16 ^I^N = (ESC 'OU') ^L^A^B^E^L='16 O^P^T^I^O^N Y'
  2218. ^F1_^S ^I^N = (ESC 'O^G') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T 1'
  2219. ^F2_^S ^I^N = (ESC 'O^H') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T 2'
  2220. ^F3_^S ^I^N = (ESC 'O^I') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T 3'
  2221. ^F4_^S ^I^N = (ESC 'O^J') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T 4'
  2222. ^F5_^S ^I^N = (ESC 'O^M') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T 5'
  2223. ^F6_^S ^I^N = (ESC 'O^L') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T 6'
  2224. ^F7_^S ^I^N = (ESC 'OM') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T 7'
  2225. ^F8_^S ^I^N = (ESC 'O^N') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T 8'
  2226. ^F9_^S ^I^N = (ESC 'O^P') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T 9'
  2227. ^F10_^S ^I^N = (ESC 'OO') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T 0'
  2228. ^F11_^S ^I^N = (ESC 'O^A') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T Q'
  2229. ^F12_^S ^I^N = (ESC 'O^B') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T W'
  2230. ^F13_^S ^I^N = (ESC 'O^C') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T E'
  2231. ^F14_^S ^I^N = (ESC 'O^D') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T R'
  2232. ^F15_^S ^I^N = (ESC 'O^E') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T T'
  2233. ^F16_^S ^I^N = (ESC 'OV') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T Y'
  2234.  
  2235. " TERMINAL VIDEO ATTRIBUTES "
  2236. ^A^L^T_^B^E^G^I^N ^O^U^T = (^S^T^A^R^T_^B^O^L^D)
  2237. ^A^L^T_^E^N^D ^O^U^T = (^S^T^O^P_^B^O^L^D)
  2238. ^B^L^I^N^K_^B^E^G^I^N ^O^U^T = () "^N^O^T ^S^U^P^P^O^R^T^E^D"
  2239. ^B^L^I^N^K_^E^N^D ^O^U^T = () "^N^O^T ^S^U^P^P^O^R^T^E^D"
  2240. ^I^N^V^E^R^S^E_^B^E^G^I^N ^O^U^T = (^S^T^A^R^T_^I^N^V^E^R^S^E)
  2241. ^I^N^V^E^R^S^E_^E^N^D ^O^U^T = (^S^T^O^P_^I^N^V^E^R^S^E)
  2242. ^U^N^D^E^R^L^I^N^E_^B^E^G^I^N ^O^U^T = (^S^T^A^R^T_^U^N^D^E^R^L^I^N^E)
  2243. ^U^N^D^E^R^L^I^N^E_^E^N^D ^O^U^T = (^S^T^O^P_^U^N^D^E^R^L^I^N^E)
  2244.  
  2245. " LOGICAL ATTRIBUTE SPECIFICATIONS "
  2246. ^E^R^R^O^R_^B^E^G^I^N ^O^U^T = (^S^T^A^R^T_^B^O^L^D)
  2247. ^E^R^R^O^R_^E^N^D ^O^U^T = (^S^T^O^P_^B^O^L^D)
  2248. ^I^N^P^U^T_^T^E^X^T_^B^E^G^I^N ^O^U^T = (^S^T^A^R^T_^U^N^D^E^R^L^I^N^E)
  2249. ^I^N^P^U^T_^T^E^X^T_^E^N^D ^O^U^T = (^S^T^O^P_^U^N^D^E^R^L^I^N^E)
  2250. ^I^T^A^L^I^C_^B^E^G^I^N ^O^U^T = (^S^T^A^R^T_^I^N^V^E^R^S^E)
  2251. ^I^T^A^L^I^C_^E^N^D ^O^U^T = (^S^T^O^P_^I^N^V^E^R^S^E)
  2252.  
  2253. " LINE DRAWING CHARACTER SPECIFICATION "
  2254. ^L^D_^F^I^N^E_^B^E^G^I^N ^O^U^T = (SO)
  2255. ^L^D_^F^I^N^E_^E^N^D ^O^U^T = (SI)
  2256. ^L^D_^F^I^N^E_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = (71(16))
  2257. ^L^D_^F^I^N^E_^V^E^R^T^I^C^A^L ^O^U^T = (78(16))
  2258. ^L^D_^F^I^N^E_^U^P^P^E^R_^L^E^F^T ^O^U^T = (6C(16))
  2259. ^L^D_^F^I^N^E_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = (6B(16))
  2260. ^L^D_^F^I^N^E_^L^O^W^E^R_^L^E^F^T ^O^U^T = (6D(16))
  2261. ^L^D_^F^I^N^E_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = (6A(16))
  2262. ^L^D_^F^I^N^E_^U^P_^T ^O^U^T = (77(16))
  2263. ^L^D_^F^I^N^E_^D^O^W^N_^T ^O^U^T = (76(16))
  2264. ^L^D_^F^I^N^E_^L^E^F^T_^T ^O^U^T = (74(16))
  2265. ^L^D_^F^I^N^E_^R^I^G^H^T_^T ^O^U^T = (75(16))
  2266. ^L^D_^F^I^N^E_^C^R^O^S^S ^O^U^T = (6E(16))
  2267.  
  2268. ^L^D_^M^E^D^I^U^M_^B^E^G^I^N ^O^U^T = (SO ^S^T^A^R^T_^B^O^L^D)
  2269. ^L^D_^M^E^D^I^U^M_^E^N^D ^O^U^T = (SI ^S^T^O^P_^B^O^L^D)
  2270. ^L^D_^M^E^D^I^U^M_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = (71(16))
  2271. ^L^D_^M^E^D^I^U^M_^V^E^R^T^I^C^A^L ^O^U^T = (78(16))
  2272. ^L^D_^M^E^D^I^U^M_^U^P^P^E^R_^L^E^F^T ^O^U^T = (6C(16))
  2273. ^L^D_^M^E^D^I^U^M_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = (6B(16))
  2274. ^L^D_^M^E^D^I^U^M_^L^O^W^E^R_^L^E^F^T ^O^U^T = (6D(16))
  2275. ^L^D_^M^E^D^I^U^M_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = (6A(16))
  2276. ^L^D_^M^E^D^I^U^M_^U^P_^T ^O^U^T = (77(16))
  2277. ^L^D_^M^E^D^I^U^M_^D^O^W^N_^T ^O^U^T = (76(16))
  2278. ^L^D_^M^E^D^I^U^M_^L^E^F^T_^T ^O^U^T = (74(16))
  2279. ^L^D_^M^E^D^I^U^M_^R^I^G^H^T_^T ^O^U^T = (75(16))
  2280. ^L^D_^M^E^D^I^U^M_^C^R^O^S^S ^O^U^T = (6E(16))
  2281.  
  2282. ^L^D_^B^O^L^D_^B^E^G^I^N ^O^U^T = (^S^T^A^R^T_^I^N^V^E^R^S^E)
  2283. ^L^D_^B^O^L^D_^E^N^D ^O^U^T = (^S^T^O^P_^I^N^V^E^R^S^E)
  2284. ^L^D_^B^O^L^D_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = (' ')
  2285. ^L^D_^B^O^L^D_^V^E^R^T^I^C^A^L ^O^U^T = (' ')
  2286. ^L^D_^B^O^L^D_^U^P^P^E^R_^L^E^F^T ^O^U^T = (' ')
  2287. ^L^D_^B^O^L^D_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = (' ')
  2288. ^L^D_^B^O^L^D_^L^O^W^E^R_^L^E^F^T ^O^U^T = (' ')
  2289. ^L^D_^B^O^L^D_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = (' ')
  2290. ^L^D_^B^O^L^D_^U^P_^T ^O^U^T = (' ')
  2291. ^L^D_^B^O^L^D_^D^O^W^N_^T ^O^U^T = (' ')
  2292. ^L^D_^B^O^L^D_^L^E^F^T_^T ^O^U^T = (' ')
  2293. ^L^D_^B^O^L^D_^R^I^G^H^T_^T ^O^U^T = (' ')
  2294. ^L^D_^B^O^L^D_^C^R^O^S^S ^O^U^T = (' ')
  2295.  
  2296. " VARIABLES FOR FULL SCREEN EDITOR FUNCTION KEY DEFINITIONS "
  2297. ^K1 = ('SK1/SM/L/ MARK /;SKS1/SMW/L/MRKCHR/')
  2298. ^K2 = ('SK2/MMTP/L/ MOVE /;SKS2/CMTP;UM;SA' '/L/ONECPY/')
  2299. ^K3 = ('SK3/IBP/L/ INSB /;SKS3/DB/L/ DELB /')
  2300. ^K4 = ('SK4/PF/L/ FIRST/;SKS4/VL/L/ LAST /')
  2301. ^K5 = ('SK5/U/L/ UNDO /;SKS5/UM/L/UNMARK/')
  2302. ^K6 = ('SK6/Q/L/ QUIT /;SKS6/QR/L/ QUITR/')
  2303. ^K7 = ('SK7"L/&?/"L"LOCATE";SKS7/LN/L/LOCNXT/')
  2304. ^K8 = ('SK8/SP1/L/1 ROW /;SKS8/SP2/L/2 ROWS/')
  2305. ^K9 = ('SK9/V/L/MIDDLE/;SKS9/.E/L/ENDLIN/')
  2306. ^K10 = ('SK10/SVO0/L/ LEFT /;SKS10/SVO&C;.P+20/L/ RIGHT/')
  2307. ^K11 = ('SK11/.S/L/ SPLIT/;SKS11/.J/L/ JOIN /')
  2308. ^K12 = ('SK12/.F/L/ PARA /;SKS12/.C/L/CENTER/')
  2309. ^K13 = ('SK13/SS/L/ CLEAR/;SKS13/.S;D;.E/L/ TRUNC/')
  2310. ^K14 = ('SK14/H/L/ HELP /;SKS14/EDIT/L/UNSPLT/')
  2311. ^K15 = ('SK15/CMTP/L/ COPY /;SKS15/DM/L/ DELM /')
  2312. ^K16 = ('SK16/SVC132/L/132COL/;SKS16/SVC80/L/ 80COL/;')
  2313.  
  2314. " DEFAULT KEY DEFINITIONS FOR THE FULL SCREEN EDITOR "
  2315. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  2316. ^N^A^M^E = ('FSEKEYS')...
  2317. ^O^U^T = (^K1 ';' ^K2 ';' ^K3 ';' ^K4 ';' ^K5)
  2318. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  2319. ^N^A^M^E = ('FSEKEYS')...
  2320. ^O^U^T = (^K6 ';' ^K7 ';' ^K8 ';' ^K9 ';' ^K10)
  2321. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  2322. ^N^A^M^E = ('FSEKEYS')...
  2323. ^O^U^T = (^K11 ';' ^K12 ';' ^K13 ';' ^K14 ';' ^K15 ';' ^K16)
  2324.  
  2325.  
  2326. " END OF NOS TERMINAL DEFINITION FILE FOR MACINTOSH "
  2327. " RUNNING CONTROL DATA CONNECT V2.1 OR DESKTOP/VE V1.2 "
  2328. *WEOR
  2329. TDUMC22
  2330. " NOS T^E^R^M^I^N^A^L D^E^F^I^N^I^T^I^O^N F^I^L^E ^F^O^R M^A^C^I^N^T^O^S^H "
  2331. " ^R^U^N^N^I^N^G C^O^N^T^R^O^L D^A^T^A CONNECT V2.2 "
  2332.  
  2333. " MCON22 DECEMBER, 1989 "
  2334.  
  2335. " T^O ^C^H^A^N^G^E ^T^H^E ^F^U^L^L ^S^C^R^E^E^N ^L^I^N^E ^C^O^U^N^T ^F^O^R ^L^A^R^G^E^R ^S^C^R^E^E^N^S, ^M^A^K^E ^F^O^L^L^O^W^I^N^G
  2336. " ^M^O^D^I^F^I^C^A^T^I^O^N^S ^T^O ^T^H^I^S T^E^R^M^I^N^A^L D^E^F^I^N^I^T^I^O^N ^S^O^U^R^C^E ^B^E^F^O^R^E ^R^E^C^O^M^P^I^L^I^N^G:
  2337. " R^E^P^L^A^C^E F^U^L^L_S^C^R^E^E^N_L^I^N^E_C^O^U^N^T ^V^A^R^I^A^B^L^E ^V^A^L^U^E 24 ^W^I^T^H ^F^U^L^L ^S^C^R^E^E^N ^L^I^N^E "
  2338. " ^C^O^U^N^T (24 ^T^O 64) ^D^E^F^I^N^E^D ^I^N CONNECT T^E^R^M^I^N^A^L S^E^T^T^I^N^G^S. "
  2339. " R^E^P^L^A^C^E ^R^O^W^S = 24 ^I^N ^S^E^T_^S^I^Z^E ^L^I^N^E^S ^W^I^T^H M^A^C ^F^U^L^L ^S^C^R^E^E^N ^L^I^N^E ^C^O^U^N^T. "
  2340. " R^E^P^L^A^C^E ^M^O^D^E^L_^N^A^M^E ^V^A^L^U^E ^W^I^T^H ^U^N^I^Q^U^E ^T^E^R^M^I^N^A^L ^N^A^M^E ^S^U^C^H ^A^S "
  2341. " MC22XX ^W^H^E^R^E XX ^I^S ^T^H^E ^F^U^L^L ^S^C^R^E^E^N ^L^I^N^E ^C^O^U^N^T (24 ^T^O 64). "
  2342.  
  2343. " VARIABLES "
  2344. F^U^L^L_S^C^R^E^E^N_L^I^N^E_C^O^U^N^T = ('24') "^S^E^T^S M^A^C F^U^L^L_S^C^R^E^E^N_L^I^N^E_C^O^U^N^T"
  2345. ^C^L^E^A^R_^A^L^L_^T^A^B^S = (ESC '[3^G')
  2346. ^S^E^T_80_^C^O^L^S = (ESC '[?3^L')
  2347. ^S^E^T_132_^C^O^L^S = (ESC '[?3^H')
  2348. ^S^T^A^R^T_^B^O^L^D = (ESC '[1^M')
  2349. ^S^T^A^R^T_^I^N^V^E^R^S^E = (ESC '[7^M')
  2350. ^S^T^A^R^T_^U^N^D^E^R^L^I^N^E = (ESC '[4^M')
  2351. ^S^T^O^P_^B^O^L^D = (ESC '[21^M')
  2352. ^S^T^O^P_^I^N^V^E^R^S^E = (ESC '[27^M')
  2353. ^S^T^O^P_^U^N^D^E^R^L^I^N^E = (ESC '[24^M')
  2354. ^S^E^T_^G^R^A^P^H^I^C^S = (ESC '(B' ESC ')0' SI)
  2355. ^E^N^A^B^L^E_^A^U^T^O_^T^A^B = (ESC '[=3^H')
  2356. ^D^I^S^A^B^L^E_^A^U^T^O_^W^R^A^P = (ESC '[?7^L')
  2357. ^E^N^A^B^L^E_^I^N^S^E^R^T^I^O^N = (ESC '[4^H')
  2358. ^D^I^S^A^B^L^E_^I^N^S^E^R^T^I^O^N = (ESC '[4^L')
  2359. ^G^L^O^B^A^L_^P^R^O^T^E^C^T_^O^N = (ESC '[=1^H')
  2360. ^G^L^O^B^A^L_^P^R^O^T^E^C^T_^O^F^F = (ESC '[=1^L')
  2361. ^C^U^R^S^O^R_^P^O^S_721 = (ESC '[=6^H')
  2362. ^R^E^S^E^T_^T^E^R^M^I^N^A^L = (ESC '^C')
  2363. ^E^N^T^E^R_^S^C^R^E^E^N_^M^O^D^E = (ESC '[=5^H')
  2364. ^E^N^T^E^R_^L^I^N^E_^M^O^D^E = (ESC '[=5^L')
  2365. ^E^N^T^E^R_^T^E^R^M_^M^O^D^E = (ESC '%!2')
  2366. NOS_^H^O^S^T = (ESC '[2^T')
  2367. ^S^E^T_^S^C^R^E^E^N_^S^I^Z^E = (ESC '[' F^U^L^L_S^C^R^E^E^N_L^I^N^E_C^O^U^N^T ';80^Z')
  2368.  
  2369. " MODEL NAME AND COMMUNICATION TYPE "
  2370. ^M^O^D^E^L_^N^A^M^E ^V^A^L^U^E = 'MCON22'
  2371. ^C^O^M^M^U^N^I^C^A^T^I^O^N^S ^T^Y^P^E = ^A^S^Y^N^C^H
  2372.  
  2373. " END OF INFORMATION SPECIFICATION "
  2374. ^E^N^D_^O^F_^I^N^F^O^R^M^A^T^I^O^N ^I^N = (0)
  2375.  
  2376. " CURSOR POSITIONING INFORMATION "
  2377. ^C^U^R^S^O^R_^P^O^S_^E^N^C^O^D^I^N^G ^B^I^A^S = (0) ^T^Y^P^E = ^A^N^S^I_^C^U^R^S^O^R
  2378. ^C^U^R^S^O^R_^P^O^S_^C^O^L^U^M^N_^F^I^R^S^T ^V^A^L^U^E = FALSE
  2379. ^C^U^R^S^O^R_^P^O^S_^C^O^L^U^M^N_^L^E^N^G^T^H ^V^A^L^U^E = (0)
  2380. ^C^U^R^S^O^R_^P^O^S_^R^O^W_^L^E^N^G^T^H ^V^A^L^U^E = (0)
  2381. ^C^U^R^S^O^R_^P^O^S_^B^E^G^I^N ^O^U^T = (ESC '[')
  2382. ^C^U^R^S^O^R_^P^O^S_^S^E^C^O^N^D ^O^U^T = (';')
  2383. ^C^U^R^S^O^R_^P^O^S_^T^H^I^R^D ^O^U^T = ('H')
  2384.  
  2385. " CURSOR MOVEMENT INFORMATION "
  2386. ^C^U^R^S^O^R_^H^O^M^E ^I^N^O^U^T = (ESC '[H') ^L^A^B^E^L='O^P^T^I^O^N H'
  2387. ^C^U^R^S^O^R_^U^P ^I^N^O^U^T = (ESC '[A') ^L^A^B^E^L='^U^P ^A^R^R^O^W'
  2388. ^C^U^R^S^O^R_^D^O^W^N ^I^N^O^U^T = (ESC '[B') ^L^A^B^E^L='^D^O^W^N ^A^R^R^O^W'
  2389. ^C^U^R^S^O^R_^R^I^G^H^T ^I^N^O^U^T = (ESC '[C') ^L^A^B^E^L='^R^I^G^H^T ^A^R^R^O^W'
  2390. ^C^U^R^S^O^R_^L^E^F^T ^I^N^O^U^T = (ESC '[D') ^L^A^B^E^L='^L^E^F^T ^A^R^R^O^W'
  2391.  
  2392. " CURSOR BEHAVIOR (^F^O^R ^C^U^R^S^O^R ^M^O^V^E^M^E^N^T ^K^E^Y^S) "
  2393. ^M^O^V^E_^P^A^S^T_^R^I^G^H^T ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  2394. ^M^O^V^E_^P^A^S^T_^L^E^F^T ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  2395. ^M^O^V^E_^P^A^S^T_^T^O^P ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  2396. ^M^O^V^E_^P^A^S^T_^B^O^T^T^O^M ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  2397.  
  2398. " CURSOR BEHAVIOR (^F^O^R ^C^H^A^R^A^C^T^E^R ^K^E^Y^S) "
  2399. ^C^H^A^R_^P^A^S^T_^L^E^F^T ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  2400. ^C^H^A^R_^P^A^S^T_^R^I^G^H^T ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  2401. ^C^H^A^R_^P^A^S^T_^L^A^S^T_^P^O^S^I^T^I^O^N ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  2402.  
  2403. " TERMINAL ATTRIBUTES "
  2404. ^C^L^E^A^R^S_^W^H^E^N_^C^H^A^N^G^E_^S^I^Z^E ^V^A^L^U^E = TRUE "^F^O^R 80/132 ^C^O^L^U^M^N ^C^H^A^N^G^E"
  2405. ^F^U^N^C^T^I^O^N_^K^E^Y_^L^E^A^V^E^S_^M^A^R^K ^V^A^L^U^E = FALSE
  2406. ^H^A^S_^H^I^D^D^E^N ^V^A^L^U^E = FALSE
  2407. ^H^A^S_^P^R^O^T^E^C^T ^V^A^L^U^E = TRUE
  2408. ^H^O^M^E_^A^T_^T^O^P ^V^A^L^U^E = TRUE
  2409. ^M^U^L^T^I^P^L^E_^S^I^Z^E^S ^V^A^L^U^E = TRUE
  2410. ^T^A^B^S_^T^O_^H^O^M^E ^V^A^L^U^E = FALSE
  2411. ^T^A^B^S_^T^O_^T^A^B_^S^T^O^P^S ^V^A^L^U^E = TRUE
  2412. ^T^A^B^S_^T^O_^U^N^P^R^O^T^E^C^T^E^D ^V^A^L^U^E = TRUE
  2413. ^T^Y^P^E_^A^H^E^A^D ^V^A^L^U^E = TRUE
  2414. ^A^U^T^O^M^A^T^I^C_^T^A^B^B^I^N^G ^V^A^L^U^E = TRUE
  2415.  
  2416. " SCREEN SIZES "
  2417. ^S^E^T_^S^I^Z^E ^R^O^W^S = 24 ^C^O^L^U^M^N^S = 80 ^O^U^T = (^S^E^T_80_^C^O^L^S)
  2418. ^S^E^T_^S^I^Z^E ^R^O^W^S = 24 ^C^O^L^U^M^N^S = 132 ^O^U^T = (^S^E^T_132_^C^O^L^S)
  2419.  
  2420. " TERMINAL CAPABILITIES "
  2421. ^I^N^S^E^R^T_^C^H^A^R ^I^N^O^U^T = (ESC '[@A') ^L^A^B^E^L='O^P^T^I^O^N S^P^A^C^E'
  2422. ^I^N^S^E^R^T_^L^I^N^E_^B^O^L ^I^N^O^U^T = (ESC '[L') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T S^P^A^C^E'
  2423. ^D^E^L^E^T^E_^C^H^A^R ^I^N^O^U^T = (ESC '[P') ^L^A^B^E^L='O^P^T^I^O^N D^E^L^E^T^E'
  2424. ^D^E^L^E^T^E_^L^I^N^E_^B^O^L ^I^N^O^U^T = (ESC '[M') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T D^E^L^E^T^E'
  2425. ^E^R^A^S^E_^E^N^D_^O^F_^L^I^N^E ^I^N^O^U^T = (ESC '[N') ^L^A^B^E^L='O^P^T^I^O^N C^L^E^A^R'
  2426. ^E^R^A^S^E_^L^I^N^E_^S^T^A^Y ^I^N^O^U^T = (ESC '[2N')
  2427. ^E^R^A^S^E_^P^A^G^E_^S^T^A^Y ^I^N^O^U^T = (ESC '[2J') ^L^A^B^E^L='C^L^E^A^R'
  2428. ^B^A^C^K^S^P^A^C^E ^I^N = (BS) ^L^A^B^E^L='D^E^L^E^T^E'
  2429. ^T^A^B_^F^O^R^W^A^R^D ^I^N^O^U^T = (HT) ^L^A^B^E^L='T^A^B'
  2430. ^T^A^B_^B^A^C^K^W^A^R^D ^I^N^O^U^T = (ESC '[Z') ^L^A^B^E^L='O^P^T^I^O^N T^A^B'
  2431. ^T^A^B_^C^L^E^A^R_^A^L^L ^I^N^O^U^T = (^C^L^E^A^R_^A^L^L_^T^A^B^S)
  2432. ^T^A^B_^S^E^T ^I^N^O^U^T = (ESC 'H')
  2433. ^T^A^B_^C^L^E^A^R ^I^N^O^U^T = (ESC '[^G')
  2434. ^I^N^S^E^R^T_^M^O^D^E_^B^E^G^I^N ^I^N^O^U^T = (^E^N^A^B^L^E_^I^N^S^E^R^T^I^O^N)
  2435. ^I^N^S^E^R^T_^M^O^D^E_^E^N^D ^I^N^O^U^T = (^D^I^S^A^B^L^E_^I^N^S^E^R^T^I^O^N)
  2436.  
  2437. " SCREEN AND LINE MODE TRANSITION "
  2438. ^S^E^T_^S^C^R^E^E^N_^M^O^D^E ^O^U^T = (NOS_^H^O^S^T ^E^N^T^E^R_^T^E^R^M_^M^O^D^E ^E^N^T^E^R_^S^C^R^E^E^N_^M^O^D^E ..
  2439. ^C^L^E^A^R_^A^L^L_^T^A^B^S ^S^E^T_^G^R^A^P^H^I^C^S ^D^I^S^A^B^L^E_^A^U^T^O_^W^R^A^P ..
  2440. ^E^N^A^B^L^E_^A^U^T^O_^T^A^B ^C^U^R^S^O^R_^P^O^S_721 ^S^E^T_^S^C^R^E^E^N_^S^I^Z^E)
  2441.  
  2442. ^S^E^T_^L^I^N^E_^M^O^D^E ^O^U^T = (^E^N^T^E^R_^L^I^N^E_^M^O^D^E ^S^E^T_^G^R^A^P^H^I^C^S ^R^E^S^E^T_^T^E^R^M^I^N^A^L)
  2443.  
  2444. " MISCELLANEOUS TERMINAL SEQUENCES "
  2445. ^P^R^O^T^E^C^T_^B^E^G^I^N ^O^U^T = (ESC 'V')
  2446. ^P^R^O^T^E^C^T_^E^N^D ^O^U^T = (ESC 'W')
  2447. ^P^R^O^T^E^C^T_^A^L^L ^O^U^T = (ESC '[1^P')
  2448. ^O^U^T^P^U^T_^B^E^G^I^N ^O^U^T = (^G^L^O^B^A^L_^P^R^O^T^E^C^T_^O^F^F ^D^I^S^A^B^L^E_^I^N^S^E^R^T^I^O^N)
  2449. ^O^U^T^P^U^T_^E^N^D ^O^U^T = (^G^L^O^B^A^L_^P^R^O^T^E^C^T_^O^N)
  2450. ^B^E^L^L_^N^A^K ^O^U^T = (BEL)
  2451.  
  2452. " CDC STANDARD FUNCTION KEY INPUT INFORMATION "
  2453. ^N^E^X^T ^I^N = (CR) ^L^A^B^E^L='R^E^T^U^R^N'
  2454. ^D^A^T^A ^I^N = (ESC 'O' 27(16)) ^L^A^B^E^L='O^P^T^I^O^N "'
  2455. ^D^A^T^A_^S ^I^N = (ESC 'O' 22(16)) ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T "'
  2456. ^B^A^C^K ^I^N = (ESC 'O;') ^L^A^B^E^L='O^P^T^I^O^N ;'
  2457. ^B^A^C^K_^S ^I^N = (ESC 'O:') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T ;'
  2458. ^H^E^L^P ^I^N = (ESC 'O/') ^L^A^B^E^L='O^P^T^I^O^N ?'
  2459. ^H^E^L^P_^S ^I^N = (ESC 'O?') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T ?'
  2460. ^E^D^I^T ^I^N = (ESC 'O.') ^L^A^B^E^L='O^P^T^I^O^N .'
  2461. ^E^D^I^T_^S ^I^N = (ESC 'O>') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T .'
  2462. ^D^O^W^N ^I^N = (ESC 'O+') ^L^A^B^E^L='O^P^T^I^O^N D'
  2463. ^D^O^W^N_^S ^I^N = (ESC 'O-') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T D'
  2464. ^U^P ^I^N = (ESC 'O(') ^L^A^B^E^L='O^P^T^I^O^N U'
  2465. ^U^P_^S ^I^N = (ESC 'O)') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T U'
  2466. ^F^W^D ^I^N = (ESC 'OX') ^L^A^B^E^L='O^P^T^I^O^N F'
  2467. ^F^W^D_^S ^I^N = (ESC 'O^O') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T F'
  2468. ^B^K^W ^I^N = (ESC 'OW') ^L^A^B^E^L='O^P^T^I^O^N B'
  2469. ^B^K^W_^S ^I^N = (ESC 'O^F') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T B'
  2470.  
  2471. " PROGRAMMABLE FUNCTION KEY INPUT INFORMATION "
  2472. ^F1 ^I^N = (ESC 'O^Q') ^L^A^B^E^L='F1 O^P^T^I^O^N 1'
  2473. ^F2 ^I^N = (ESC 'O^R') ^L^A^B^E^L='F2 O^P^T^I^O^N 2'
  2474. ^F3 ^I^N = (ESC 'O^S') ^L^A^B^E^L='F3 O^P^T^I^O^N 3'
  2475. ^F4 ^I^N = (ESC 'O^T') ^L^A^B^E^L='F4 O^P^T^I^O^N 4'
  2476. ^F5 ^I^N = (ESC 'O^U') ^L^A^B^E^L='F5 O^P^T^I^O^N 5'
  2477. ^F6 ^I^N = (ESC 'O^V') ^L^A^B^E^L='F6 O^P^T^I^O^N 6'
  2478. ^F7 ^I^N = (ESC 'O^W') ^L^A^B^E^L='F7 O^P^T^I^O^N 7'
  2479. ^F8 ^I^N = (ESC 'O^X') ^L^A^B^E^L='F8 O^P^T^I^O^N 8'
  2480. ^F9 ^I^N = (ESC 'O^Y') ^L^A^B^E^L='F9 O^P^T^I^O^N 9'
  2481. ^F10 ^I^N = (ESC 'O^Z') ^L^A^B^E^L='10 O^P^T^I^O^N 0'
  2482. ^F11 ^I^N = (ESC 'O^0') ^L^A^B^E^L='11 O^P^T^I^O^N Q'
  2483. ^F12 ^I^N = (ESC 'O^1') ^L^A^B^E^L='12 O^P^T^I^O^N W'
  2484. ^F13 ^I^N = (ESC 'O^2') ^L^A^B^E^L='13 O^P^T^I^O^N E'
  2485. ^F14 ^I^N = (ESC 'O^3') ^L^A^B^E^L='14 O^P^T^I^O^N R'
  2486. ^F15 ^I^N = (ESC 'O_') ^L^A^B^E^L='15 O^P^T^I^O^N T'
  2487. ^F16 ^I^N = (ESC 'OU') ^L^A^B^E^L='16 O^P^T^I^O^N Y'
  2488. ^F1_^S ^I^N = (ESC 'O^G') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T 1'
  2489. ^F2_^S ^I^N = (ESC 'O^H') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T 2'
  2490. ^F3_^S ^I^N = (ESC 'O^I') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T 3'
  2491. ^F4_^S ^I^N = (ESC 'O^J') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T 4'
  2492. ^F5_^S ^I^N = (ESC 'O^M') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T 5'
  2493. ^F6_^S ^I^N = (ESC 'O^L') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T 6'
  2494. ^F7_^S ^I^N = (ESC 'OM') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T 7'
  2495. ^F8_^S ^I^N = (ESC 'O^N') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T 8'
  2496. ^F9_^S ^I^N = (ESC 'O^P') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T 9'
  2497. ^F10_^S ^I^N = (ESC 'OO') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T 0'
  2498. ^F11_^S ^I^N = (ESC 'O^A') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T Q'
  2499. ^F12_^S ^I^N = (ESC 'O^B') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T W'
  2500. ^F13_^S ^I^N = (ESC 'O^C') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T E'
  2501. ^F14_^S ^I^N = (ESC 'O^D') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T R'
  2502. ^F15_^S ^I^N = (ESC 'O^E') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T T'
  2503. ^F16_^S ^I^N = (ESC 'OV') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T Y'
  2504.  
  2505. " TERMINAL VIDEO ATTRIBUTES "
  2506. ^A^L^T_^B^E^G^I^N ^O^U^T = (^S^T^A^R^T_^B^O^L^D)
  2507. ^A^L^T_^E^N^D ^O^U^T = (^S^T^O^P_^B^O^L^D)
  2508. ^B^L^I^N^K_^B^E^G^I^N ^O^U^T = () "^N^O^T ^S^U^P^P^O^R^T^E^D"
  2509. ^B^L^I^N^K_^E^N^D ^O^U^T = () "^N^O^T ^S^U^P^P^O^R^T^E^D"
  2510. ^I^N^V^E^R^S^E_^B^E^G^I^N ^O^U^T = (^S^T^A^R^T_^I^N^V^E^R^S^E)
  2511. ^I^N^V^E^R^S^E_^E^N^D ^O^U^T = (^S^T^O^P_^I^N^V^E^R^S^E)
  2512. ^U^N^D^E^R^L^I^N^E_^B^E^G^I^N ^O^U^T = (^S^T^A^R^T_^U^N^D^E^R^L^I^N^E)
  2513. ^U^N^D^E^R^L^I^N^E_^E^N^D ^O^U^T = (^S^T^O^P_^U^N^D^E^R^L^I^N^E)
  2514.  
  2515. " LOGICAL ATTRIBUTE SPECIFICATIONS "
  2516. ^E^R^R^O^R_^B^E^G^I^N ^O^U^T = (^S^T^A^R^T_^B^O^L^D)
  2517. ^E^R^R^O^R_^E^N^D ^O^U^T = (^S^T^O^P_^B^O^L^D)
  2518. ^I^N^P^U^T_^T^E^X^T_^B^E^G^I^N ^O^U^T = (^S^T^A^R^T_^U^N^D^E^R^L^I^N^E)
  2519. ^I^N^P^U^T_^T^E^X^T_^E^N^D ^O^U^T = (^S^T^O^P_^U^N^D^E^R^L^I^N^E)
  2520. ^I^T^A^L^I^C_^B^E^G^I^N ^O^U^T = (^S^T^A^R^T_^I^N^V^E^R^S^E)
  2521. ^I^T^A^L^I^C_^E^N^D ^O^U^T = (^S^T^O^P_^I^N^V^E^R^S^E)
  2522.  
  2523. " LINE DRAWING CHARACTER SPECIFICATION "
  2524. ^L^D_^F^I^N^E_^B^E^G^I^N ^O^U^T = (SO)
  2525. ^L^D_^F^I^N^E_^E^N^D ^O^U^T = (SI)
  2526. ^L^D_^F^I^N^E_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = (71(16))
  2527. ^L^D_^F^I^N^E_^V^E^R^T^I^C^A^L ^O^U^T = (78(16))
  2528. ^L^D_^F^I^N^E_^U^P^P^E^R_^L^E^F^T ^O^U^T = (6C(16))
  2529. ^L^D_^F^I^N^E_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = (6B(16))
  2530. ^L^D_^F^I^N^E_^L^O^W^E^R_^L^E^F^T ^O^U^T = (6D(16))
  2531. ^L^D_^F^I^N^E_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = (6A(16))
  2532. ^L^D_^F^I^N^E_^U^P_^T ^O^U^T = (77(16))
  2533. ^L^D_^F^I^N^E_^D^O^W^N_^T ^O^U^T = (76(16))
  2534. ^L^D_^F^I^N^E_^L^E^F^T_^T ^O^U^T = (74(16))
  2535. ^L^D_^F^I^N^E_^R^I^G^H^T_^T ^O^U^T = (75(16))
  2536. ^L^D_^F^I^N^E_^C^R^O^S^S ^O^U^T = (6E(16))
  2537.  
  2538. ^L^D_^M^E^D^I^U^M_^B^E^G^I^N ^O^U^T = (SO ^S^T^A^R^T_^B^O^L^D)
  2539. ^L^D_^M^E^D^I^U^M_^E^N^D ^O^U^T = (SI ^S^T^O^P_^B^O^L^D)
  2540. ^L^D_^M^E^D^I^U^M_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = (71(16))
  2541. ^L^D_^M^E^D^I^U^M_^V^E^R^T^I^C^A^L ^O^U^T = (78(16))
  2542. ^L^D_^M^E^D^I^U^M_^U^P^P^E^R_^L^E^F^T ^O^U^T = (6C(16))
  2543. ^L^D_^M^E^D^I^U^M_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = (6B(16))
  2544. ^L^D_^M^E^D^I^U^M_^L^O^W^E^R_^L^E^F^T ^O^U^T = (6D(16))
  2545. ^L^D_^M^E^D^I^U^M_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = (6A(16))
  2546. ^L^D_^M^E^D^I^U^M_^U^P_^T ^O^U^T = (77(16))
  2547. ^L^D_^M^E^D^I^U^M_^D^O^W^N_^T ^O^U^T = (76(16))
  2548. ^L^D_^M^E^D^I^U^M_^L^E^F^T_^T ^O^U^T = (74(16))
  2549. ^L^D_^M^E^D^I^U^M_^R^I^G^H^T_^T ^O^U^T = (75(16))
  2550. ^L^D_^M^E^D^I^U^M_^C^R^O^S^S ^O^U^T = (6E(16))
  2551.  
  2552. ^L^D_^B^O^L^D_^B^E^G^I^N ^O^U^T = (^S^T^A^R^T_^I^N^V^E^R^S^E)
  2553. ^L^D_^B^O^L^D_^E^N^D ^O^U^T = (^S^T^O^P_^I^N^V^E^R^S^E)
  2554. ^L^D_^B^O^L^D_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = (' ')
  2555. ^L^D_^B^O^L^D_^V^E^R^T^I^C^A^L ^O^U^T = (' ')
  2556. ^L^D_^B^O^L^D_^U^P^P^E^R_^L^E^F^T ^O^U^T = (' ')
  2557. ^L^D_^B^O^L^D_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = (' ')
  2558. ^L^D_^B^O^L^D_^L^O^W^E^R_^L^E^F^T ^O^U^T = (' ')
  2559. ^L^D_^B^O^L^D_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = (' ')
  2560. ^L^D_^B^O^L^D_^U^P_^T ^O^U^T = (' ')
  2561. ^L^D_^B^O^L^D_^D^O^W^N_^T ^O^U^T = (' ')
  2562. ^L^D_^B^O^L^D_^L^E^F^T_^T ^O^U^T = (' ')
  2563. ^L^D_^B^O^L^D_^R^I^G^H^T_^T ^O^U^T = (' ')
  2564. ^L^D_^B^O^L^D_^C^R^O^S^S ^O^U^T = (' ')
  2565.  
  2566. " VARIABLES FOR FULL SCREEN EDITOR FUNCTION KEY DEFINITIONS "
  2567. ^K1 = ('SK1/SM/L/ MARK /;SKS1/SMW/L/MRKCHR/')
  2568. ^K2 = ('SK2/MMTP/L/ MOVE /;SKS2/CMTP;UM;SA' '/L/ONECPY/')
  2569. ^K3 = ('SK3/IBP/L/ INSB /;SKS3/DB/L/ DELB /')
  2570. ^K4 = ('SK4/PF/L/ FIRST/;SKS4/VL/L/ LAST /')
  2571. ^K5 = ('SK5/U/L/ UNDO /;SKS5/UM/L/UNMARK/')
  2572. ^K6 = ('SK6/Q/L/ QUIT /;SKS6/QR/L/ QUITR/')
  2573. ^K7 = ('SK7"L/&?/"L"LOCATE";SKS7/LN/L/LOCNXT/')
  2574. ^K8 = ('SK8/SP1/L/1 ROW /;SKS8/SP2/L/2 ROWS/')
  2575. ^K9 = ('SK9/V/L/MIDDLE/;SKS9/.E/L/ENDLIN/')
  2576. ^K10 = ('SK10/SVO0/L/ LEFT /;SKS10/SVO&C;.P+20/L/ RIGHT/')
  2577. ^K11 = ('SK11/.S/L/ SPLIT/;SKS11/.J/L/ JOIN /')
  2578. ^K12 = ('SK12/.F/L/ PARA /;SKS12/.C/L/CENTER/')
  2579. ^K13 = ('SK13/SS/L/ CLEAR/;SKS13/.S;D;.E/L/ TRUNC/')
  2580. ^K14 = ('SK14/H/L/ HELP /;SKS14/EDIT/L/UNSPLT/')
  2581. ^K15 = ('SK15/CMTP/L/ COPY /;SKS15/DM/L/ DELM /')
  2582. ^K16 = ('SK16/SVC132/L/132COL/;SKS16/SVC80/L/ 80COL/;')
  2583.  
  2584. " DEFAULT KEY DEFINITIONS FOR THE FULL SCREEN EDITOR "
  2585. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  2586. ^N^A^M^E = ('FSEKEYS')...
  2587. ^O^U^T = (^K1 ';' ^K2 ';' ^K3 ';' ^K4 ';' ^K5)
  2588. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  2589. ^N^A^M^E = ('FSEKEYS')...
  2590. ^O^U^T = (^K6 ';' ^K7 ';' ^K8 ';' ^K9 ';' ^K10)
  2591. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  2592. ^N^A^M^E = ('FSEKEYS')...
  2593. ^O^U^T = (^K11 ';' ^K12 ';' ^K13 ';' ^K14 ';' ^K15 ';' ^K16)
  2594.  
  2595.  
  2596. " E^N^D ^O^F NOS T^E^R^M^I^N^A^L D^E^F^I^N^I^T^I^O^N F^I^L^E ^F^O^R M^A^C^I^N^T^O^S^H "
  2597. " ^R^U^N^N^I^N^G C^O^N^T^R^O^L D^A^T^A CONNECT V2.2 "
  2598. *WEOR
  2599. TDUVM30
  2600. " NOS T^E^R^M^I^N^A^L D^E^F^I^N^I^T^I^O^N F^I^L^E ^F^O^R A^P^P^L^E M^A^C^I^N^T^O^S^H "
  2601. " ^R^U^N^N^I^N^G C^O^N^T^R^O^L D^A^T^A V^I^S^T^ACOM MAC V3.0 "
  2602.  
  2603. " VMAC30 DECEMBER, 1990 "
  2604.  
  2605. " T^O ^C^H^A^N^G^E ^T^H^E ^F^U^L^L ^S^C^R^E^E^N ^L^I^N^E ^C^O^U^N^T ^F^O^R ^L^A^R^G^E^R ^S^C^R^E^E^N^S, ^M^A^K^E ^F^O^L^L^O^W^I^N^G
  2606. " ^M^O^D^I^F^I^C^A^T^I^O^N^S ^T^O ^T^H^I^S T^E^R^M^I^N^A^L D^E^F^I^N^I^T^I^O^N ^S^O^U^R^C^E ^B^E^F^O^R^E ^R^E^C^O^M^P^I^L^I^N^G:
  2607. " R^E^P^L^A^C^E F^U^L^L_S^C^R^E^E^N_L^I^N^E_C^O^U^N^T ^V^A^R^I^A^B^L^E ^V^A^L^U^E 24 ^W^I^T^H ^F^U^L^L ^S^C^R^E^E^N ^L^I^N^E "
  2608. " ^C^O^U^N^T (24 ^T^O 64) ^D^E^F^I^N^E^D ^I^N V^I^S^T^ACOM MAC T^E^R^M^I^N^A^L S^E^T^T^I^N^G^S. "
  2609. " R^E^P^L^A^C^E ^R^O^W^S = 24 ^I^N ^S^E^T_^S^I^Z^E ^L^I^N^E^S ^W^I^T^H M^A^C ^F^U^L^L ^S^C^R^E^E^N ^L^I^N^E ^C^O^U^N^T. "
  2610. " R^E^P^L^A^C^E ^M^O^D^E^L_^N^A^M^E ^V^A^L^U^E ^W^I^T^H ^U^N^I^Q^U^E ^T^E^R^M^I^N^A^L ^N^A^M^E ^S^U^C^H ^A^S "
  2611. " VM30XX ^W^H^E^R^E XX ^I^S ^T^H^E ^F^U^L^L ^S^C^R^E^E^N ^L^I^N^E ^C^O^U^N^T (24 ^T^O 64). "
  2612.  
  2613. " VARIABLES "
  2614. F^U^L^L_S^C^R^E^E^N_L^I^N^E_C^O^U^N^T = ('24') "^S^E^T^S M^A^C F^U^L^L_S^C^R^E^E^N_L^I^N^E_C^O^U^N^T"
  2615. ^C^L^E^A^R_^A^L^L_^T^A^B^S = (ESC '[3^G')
  2616. ^S^E^T_80_^C^O^L^S = (ESC '[?3^L')
  2617. ^S^E^T_132_^C^O^L^S = (ESC '[?3^H')
  2618. ^S^T^A^R^T_^B^O^L^D = (ESC '[1^M')
  2619. ^S^T^A^R^T_^I^N^V^E^R^S^E = (ESC '[7^M')
  2620. ^S^T^A^R^T_^U^N^D^E^R^L^I^N^E = (ESC '[4^M')
  2621. ^S^T^O^P_^B^O^L^D = (ESC '[21^M')
  2622. ^S^T^O^P_^I^N^V^E^R^S^E = (ESC '[27^M')
  2623. ^S^T^O^P_^U^N^D^E^R^L^I^N^E = (ESC '[24^M')
  2624. ^S^E^T_^G^R^A^P^H^I^C^S = (ESC '(B' ESC ')0' SI)
  2625. ^E^N^A^B^L^E_^A^U^T^O_^T^A^B = (ESC '[=3^H')
  2626. ^D^I^S^A^B^L^E_^A^U^T^O_^W^R^A^P = (ESC '[?7^L')
  2627. ^E^N^A^B^L^E_^I^N^S^E^R^T^I^O^N = (ESC '[4^H')
  2628. ^D^I^S^A^B^L^E_^I^N^S^E^R^T^I^O^N = (ESC '[4^L')
  2629. ^G^L^O^B^A^L_^P^R^O^T^E^C^T_^O^N = (ESC '[=1^H')
  2630. ^G^L^O^B^A^L_^P^R^O^T^E^C^T_^O^F^F = (ESC '[=1^L')
  2631. ^C^U^R^S^O^R_^P^O^S_721 = (ESC '[=6^H')
  2632. ^R^E^S^E^T_^T^E^R^M^I^N^A^L = (ESC '^C')
  2633. ^E^N^T^E^R_^S^C^R^E^E^N_^M^O^D^E = (ESC '[=5^H')
  2634. ^E^N^T^E^R_^L^I^N^E_^M^O^D^E = (ESC '[=5^L')
  2635. ^E^N^T^E^R_^T^E^R^M_^M^O^D^E = (ESC '%!2')
  2636. NOS_^H^O^S^T = (ESC '[2^T')
  2637. ^S^E^T_^S^C^R^E^E^N_^S^I^Z^E = (ESC '[' F^U^L^L_S^C^R^E^E^N_L^I^N^E_C^O^U^N^T ';80^Z')
  2638.  
  2639. " MODEL NAME AND COMMUNICATION TYPE "
  2640. ^M^O^D^E^L_^N^A^M^E ^V^A^L^U^E = 'VMAC30'
  2641. ^C^O^M^M^U^N^I^C^A^T^I^O^N^S ^T^Y^P^E = ^A^S^Y^N^C^H
  2642.  
  2643. " END OF INFORMATION SPECIFICATION "
  2644. ^E^N^D_^O^F_^I^N^F^O^R^M^A^T^I^O^N ^I^N = (0)
  2645.  
  2646. " CURSOR POSITIONING INFORMATION "
  2647. ^C^U^R^S^O^R_^P^O^S_^E^N^C^O^D^I^N^G ^B^I^A^S = (0) ^T^Y^P^E = ^A^N^S^I_^C^U^R^S^O^R
  2648. ^C^U^R^S^O^R_^P^O^S_^C^O^L^U^M^N_^F^I^R^S^T ^V^A^L^U^E = FALSE
  2649. ^C^U^R^S^O^R_^P^O^S_^C^O^L^U^M^N_^L^E^N^G^T^H ^V^A^L^U^E = (0)
  2650. ^C^U^R^S^O^R_^P^O^S_^R^O^W_^L^E^N^G^T^H ^V^A^L^U^E = (0)
  2651. ^C^U^R^S^O^R_^P^O^S_^B^E^G^I^N ^O^U^T = (ESC '[')
  2652. ^C^U^R^S^O^R_^P^O^S_^S^E^C^O^N^D ^O^U^T = (';')
  2653. ^C^U^R^S^O^R_^P^O^S_^T^H^I^R^D ^O^U^T = ('H')
  2654.  
  2655. " CURSOR MOVEMENT INFORMATION "
  2656. ^C^U^R^S^O^R_^H^O^M^E ^I^N^O^U^T = (ESC '[H') ^L^A^B^E^L='O^P^T^I^O^N H'
  2657. ^C^U^R^S^O^R_^U^P ^I^N^O^U^T = (ESC '[A') ^L^A^B^E^L='^U^P ^A^R^R^O^W'
  2658. ^C^U^R^S^O^R_^D^O^W^N ^I^N^O^U^T = (ESC '[B') ^L^A^B^E^L='^D^O^W^N ^A^R^R^O^W'
  2659. ^C^U^R^S^O^R_^R^I^G^H^T ^I^N^O^U^T = (ESC '[C') ^L^A^B^E^L='^R^I^G^H^T ^A^R^R^O^W'
  2660. ^C^U^R^S^O^R_^L^E^F^T ^I^N^O^U^T = (ESC '[D') ^L^A^B^E^L='^L^E^F^T ^A^R^R^O^W'
  2661.  
  2662. " CURSOR BEHAVIOR (^F^O^R ^C^U^R^S^O^R ^M^O^V^E^M^E^N^T ^K^E^Y^S) "
  2663. ^M^O^V^E_^P^A^S^T_^R^I^G^H^T ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  2664. ^M^O^V^E_^P^A^S^T_^L^E^F^T ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  2665. ^M^O^V^E_^P^A^S^T_^T^O^P ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  2666. ^M^O^V^E_^P^A^S^T_^B^O^T^T^O^M ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  2667.  
  2668. " CURSOR BEHAVIOR (^F^O^R ^C^H^A^R^A^C^T^E^R ^K^E^Y^S) "
  2669. ^C^H^A^R_^P^A^S^T_^L^E^F^T ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  2670. ^C^H^A^R_^P^A^S^T_^R^I^G^H^T ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  2671. ^C^H^A^R_^P^A^S^T_^L^A^S^T_^P^O^S^I^T^I^O^N ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  2672.  
  2673. " TERMINAL ATTRIBUTES "
  2674. ^C^L^E^A^R^S_^W^H^E^N_^C^H^A^N^G^E_^S^I^Z^E ^V^A^L^U^E = TRUE "^F^O^R 80/132 ^C^O^L^U^M^N ^C^H^A^N^G^E"
  2675. ^F^U^N^C^T^I^O^N_^K^E^Y_^L^E^A^V^E^S_^M^A^R^K ^V^A^L^U^E = FALSE
  2676. ^H^A^S_^H^I^D^D^E^N ^V^A^L^U^E = FALSE
  2677. ^H^A^S_^P^R^O^T^E^C^T ^V^A^L^U^E = TRUE
  2678. ^H^O^M^E_^A^T_^T^O^P ^V^A^L^U^E = TRUE
  2679. ^M^U^L^T^I^P^L^E_^S^I^Z^E^S ^V^A^L^U^E = TRUE
  2680. ^T^A^B^S_^T^O_^H^O^M^E ^V^A^L^U^E = FALSE
  2681. ^T^A^B^S_^T^O_^T^A^B_^S^T^O^P^S ^V^A^L^U^E = TRUE
  2682. ^T^A^B^S_^T^O_^U^N^P^R^O^T^E^C^T^E^D ^V^A^L^U^E = TRUE
  2683. ^T^Y^P^E_^A^H^E^A^D ^V^A^L^U^E = TRUE
  2684. ^A^U^T^O^M^A^T^I^C_^T^A^B^B^I^N^G ^V^A^L^U^E = TRUE
  2685.  
  2686. " SCREEN SIZES "
  2687. ^S^E^T_^S^I^Z^E ^R^O^W^S = 24 ^C^O^L^U^M^N^S = 80 ^O^U^T = (^S^E^T_80_^C^O^L^S)
  2688. ^S^E^T_^S^I^Z^E ^R^O^W^S = 24 ^C^O^L^U^M^N^S = 132 ^O^U^T = (^S^E^T_132_^C^O^L^S)
  2689.  
  2690. " TERMINAL CAPABILITIES "
  2691. ^I^N^S^E^R^T_^C^H^A^R ^I^N^O^U^T = (ESC '[@A') ^L^A^B^E^L='O^P^T^I^O^N S^P^A^C^E'
  2692. ^I^N^S^E^R^T_^L^I^N^E_^B^O^L ^I^N^O^U^T = (ESC '[L') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T S^P^A^C^E'
  2693. ^D^E^L^E^T^E_^C^H^A^R ^I^N^O^U^T = (ESC '[P') ^L^A^B^E^L='O^P^T^I^O^N D^E^L^E^T^E'
  2694. ^D^E^L^E^T^E_^L^I^N^E_^B^O^L ^I^N^O^U^T = (ESC '[M') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T D^E^L^E^T^E'
  2695. ^E^R^A^S^E_^E^N^D_^O^F_^L^I^N^E ^I^N^O^U^T = (ESC '[N') ^L^A^B^E^L='O^P^T^I^O^N C^L^E^A^R'
  2696. ^E^R^A^S^E_^L^I^N^E_^S^T^A^Y ^I^N^O^U^T = (ESC '[2N')
  2697. ^E^R^A^S^E_^P^A^G^E_^S^T^A^Y ^I^N^O^U^T = (ESC '[2J') ^L^A^B^E^L='C^L^E^A^R'
  2698. ^B^A^C^K^S^P^A^C^E ^I^N = (BS) ^L^A^B^E^L='D^E^L^E^T^E'
  2699. ^T^A^B_^F^O^R^W^A^R^D ^I^N^O^U^T = (HT) ^L^A^B^E^L='T^A^B'
  2700. ^T^A^B_^B^A^C^K^W^A^R^D ^I^N^O^U^T = (ESC '[Z') ^L^A^B^E^L='O^P^T^I^O^N T^A^B'
  2701. ^T^A^B_^C^L^E^A^R_^A^L^L ^I^N^O^U^T = (^C^L^E^A^R_^A^L^L_^T^A^B^S)
  2702. ^T^A^B_^S^E^T ^I^N^O^U^T = (ESC 'H')
  2703. ^T^A^B_^C^L^E^A^R ^I^N^O^U^T = (ESC '[^G')
  2704. ^I^N^S^E^R^T_^M^O^D^E_^B^E^G^I^N ^I^N^O^U^T = (^E^N^A^B^L^E_^I^N^S^E^R^T^I^O^N)
  2705. ^I^N^S^E^R^T_^M^O^D^E_^E^N^D ^I^N^O^U^T = (^D^I^S^A^B^L^E_^I^N^S^E^R^T^I^O^N)
  2706.  
  2707. " SCREEN AND LINE MODE TRANSITION "
  2708. ^S^E^T_^S^C^R^E^E^N_^M^O^D^E ^O^U^T = (NOS_^H^O^S^T ^E^N^T^E^R_^T^E^R^M_^M^O^D^E ^E^N^T^E^R_^S^C^R^E^E^N_^M^O^D^E ..
  2709. ^C^L^E^A^R_^A^L^L_^T^A^B^S ^S^E^T_^G^R^A^P^H^I^C^S ^D^I^S^A^B^L^E_^A^U^T^O_^W^R^A^P ..
  2710. ^E^N^A^B^L^E_^A^U^T^O_^T^A^B ^C^U^R^S^O^R_^P^O^S_721 ^S^E^T_^S^C^R^E^E^N_^S^I^Z^E)
  2711.  
  2712. ^S^E^T_^L^I^N^E_^M^O^D^E ^O^U^T = (^E^N^T^E^R_^L^I^N^E_^M^O^D^E ^S^E^T_^G^R^A^P^H^I^C^S ^R^E^S^E^T_^T^E^R^M^I^N^A^L)
  2713.  
  2714. " MISCELLANEOUS TERMINAL SEQUENCES "
  2715. ^P^R^O^T^E^C^T_^B^E^G^I^N ^O^U^T = (ESC 'V')
  2716. ^P^R^O^T^E^C^T_^E^N^D ^O^U^T = (ESC 'W')
  2717. ^P^R^O^T^E^C^T_^A^L^L ^O^U^T = (ESC '[1^P')
  2718. ^O^U^T^P^U^T_^B^E^G^I^N ^O^U^T = (^G^L^O^B^A^L_^P^R^O^T^E^C^T_^O^F^F ^D^I^S^A^B^L^E_^I^N^S^E^R^T^I^O^N)
  2719. ^O^U^T^P^U^T_^E^N^D ^O^U^T = (^G^L^O^B^A^L_^P^R^O^T^E^C^T_^O^N)
  2720. ^B^E^L^L_^N^A^K ^O^U^T = (BEL)
  2721.  
  2722. " CDC STANDARD FUNCTION KEY INPUT INFORMATION "
  2723. ^N^E^X^T ^I^N = (CR) ^L^A^B^E^L='R^E^T^U^R^N'
  2724. ^D^A^T^A ^I^N = (ESC 'O' 27(16)) ^L^A^B^E^L='O^P^T^I^O^N "'
  2725. ^D^A^T^A_^S ^I^N = (ESC 'O' 22(16)) ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T "'
  2726. ^B^A^C^K ^I^N = (ESC 'O;') ^L^A^B^E^L='O^P^T^I^O^N ;'
  2727. ^B^A^C^K_^S ^I^N = (ESC 'O:') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T ;'
  2728. ^H^E^L^P ^I^N = (ESC 'O/') ^L^A^B^E^L='O^P^T^I^O^N ?'
  2729. ^H^E^L^P_^S ^I^N = (ESC 'O?') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T ?'
  2730. ^E^D^I^T ^I^N = (ESC 'O.') ^L^A^B^E^L='O^P^T^I^O^N .'
  2731. ^E^D^I^T_^S ^I^N = (ESC 'O>') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T .'
  2732. ^D^O^W^N ^I^N = (ESC 'O+') ^L^A^B^E^L='O^P^T^I^O^N D'
  2733. ^D^O^W^N_^S ^I^N = (ESC 'O-') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T D'
  2734. ^U^P ^I^N = (ESC 'O(') ^L^A^B^E^L='O^P^T^I^O^N U'
  2735. ^U^P_^S ^I^N = (ESC 'O)') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T U'
  2736. ^F^W^D ^I^N = (ESC 'OX') ^L^A^B^E^L='O^P^T^I^O^N F'
  2737. ^F^W^D_^S ^I^N = (ESC 'O^O') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T F'
  2738. ^B^K^W ^I^N = (ESC 'OW') ^L^A^B^E^L='O^P^T^I^O^N B'
  2739. ^B^K^W_^S ^I^N = (ESC 'O^F') ^L^A^B^E^L='O^P^T^I^O^N S^H^I^F^T B'
  2740.  
  2741. " PROGRAMMABLE FUNCTION KEY INPUT INFORMATION "
  2742. ^F1 ^I^N = (ESC 'O^Q') ^L^A^B^E^L='F1 O^P^T^I^O^N 1'
  2743. ^F2 ^I^N = (ESC 'O^R') ^L^A^B^E^L='F2 O^P^T^I^O^N 2'
  2744. ^F3 ^I^N = (ESC 'O^S') ^L^A^B^E^L='F3 O^P^T^I^O^N 3'
  2745. ^F4 ^I^N = (ESC 'O^T') ^L^A^B^E^L='F4 O^P^T^I^O^N 4'
  2746. ^F5 ^I^N = (ESC 'O^U') ^L^A^B^E^L='F5 O^P^T^I^O^N 5'
  2747. ^F6 ^I^N = (ESC 'O^V') ^L^A^B^E^L='F6 O^P^T^I^O^N 6'
  2748. ^F7 ^I^N = (ESC 'O^W') ^L^A^B^E^L='F7 O^P^T^I^O^N 7'
  2749. ^F8 ^I^N = (ESC 'O^X') ^L^A^B^E^L='F8 O^P^T^I^O^N 8'
  2750. ^F9 ^I^N = (ESC 'O^Y') ^L^A^B^E^L='F9 O^P^T^I^O^N 9'
  2751. ^F10 ^I^N = (ESC 'O^Z') ^L^A^B^E^L='10 O^P^T^I^O^N 0'
  2752. ^F11 ^I^N = (ESC 'O^0') ^L^A^B^E^L='11 O^P^T^I^O^N Q'
  2753. ^F12 ^I^N = (ESC 'O^1') ^L^A^B^E^L='12 O^P^T^I^O^N W'
  2754. ^F13 ^I^N = (ESC 'O^2') ^L^A^B^E^L='13 O^P^T^I^O^N E'
  2755. ^F14 ^I^N = (ESC 'O^3') ^L^A^B^E^L='14 O^P^T^I^O^N R'
  2756. ^F15 ^I^N = (ESC 'O_') ^L^A^B^E^L='15 O^P^T^I^O^N T'
  2757. ^F16 ^I^N = (ESC 'OU') ^L^A^B^E^L='16 O^P^T^I^O^N Y'
  2758. ^F1_^S ^I^N = (ESC 'O^G') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T 1'
  2759. ^F2_^S ^I^N = (ESC 'O^H') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T 2'
  2760. ^F3_^S ^I^N = (ESC 'O^I') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T 3'
  2761. ^F4_^S ^I^N = (ESC 'O^J') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T 4'
  2762. ^F5_^S ^I^N = (ESC 'O^M') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T 5'
  2763. ^F6_^S ^I^N = (ESC 'O^L') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T 6'
  2764. ^F7_^S ^I^N = (ESC 'OM') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T 7'
  2765. ^F8_^S ^I^N = (ESC 'O^N') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T 8'
  2766. ^F9_^S ^I^N = (ESC 'O^P') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T 9'
  2767. ^F10_^S ^I^N = (ESC 'OO') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T 0'
  2768. ^F11_^S ^I^N = (ESC 'O^A') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T Q'
  2769. ^F12_^S ^I^N = (ESC 'O^B') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T W'
  2770. ^F13_^S ^I^N = (ESC 'O^C') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T E'
  2771. ^F14_^S ^I^N = (ESC 'O^D') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T R'
  2772. ^F15_^S ^I^N = (ESC 'O^E') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T T'
  2773. ^F16_^S ^I^N = (ESC 'OV') ^L^A^B^E^L=' O^P^T^I^O^N S^H^I^F^T Y'
  2774.  
  2775. " TERMINAL VIDEO ATTRIBUTES "
  2776. ^A^L^T_^B^E^G^I^N ^O^U^T = (^S^T^A^R^T_^B^O^L^D)
  2777. ^A^L^T_^E^N^D ^O^U^T = (^S^T^O^P_^B^O^L^D)
  2778. ^B^L^I^N^K_^B^E^G^I^N ^O^U^T = () "^N^O^T ^S^U^P^P^O^R^T^E^D"
  2779. ^B^L^I^N^K_^E^N^D ^O^U^T = () "^N^O^T ^S^U^P^P^O^R^T^E^D"
  2780. ^I^N^V^E^R^S^E_^B^E^G^I^N ^O^U^T = (^S^T^A^R^T_^I^N^V^E^R^S^E)
  2781. ^I^N^V^E^R^S^E_^E^N^D ^O^U^T = (^S^T^O^P_^I^N^V^E^R^S^E)
  2782. ^U^N^D^E^R^L^I^N^E_^B^E^G^I^N ^O^U^T = (^S^T^A^R^T_^U^N^D^E^R^L^I^N^E)
  2783. ^U^N^D^E^R^L^I^N^E_^E^N^D ^O^U^T = (^S^T^O^P_^U^N^D^E^R^L^I^N^E)
  2784.  
  2785. " LOGICAL ATTRIBUTE SPECIFICATIONS "
  2786. ^E^R^R^O^R_^B^E^G^I^N ^O^U^T = (^S^T^A^R^T_^B^O^L^D)
  2787. ^E^R^R^O^R_^E^N^D ^O^U^T = (^S^T^O^P_^B^O^L^D)
  2788. ^I^N^P^U^T_^T^E^X^T_^B^E^G^I^N ^O^U^T = (^S^T^A^R^T_^U^N^D^E^R^L^I^N^E)
  2789. ^I^N^P^U^T_^T^E^X^T_^E^N^D ^O^U^T = (^S^T^O^P_^U^N^D^E^R^L^I^N^E)
  2790. ^I^T^A^L^I^C_^B^E^G^I^N ^O^U^T = (^S^T^A^R^T_^I^N^V^E^R^S^E)
  2791. ^I^T^A^L^I^C_^E^N^D ^O^U^T = (^S^T^O^P_^I^N^V^E^R^S^E)
  2792.  
  2793. " LINE DRAWING CHARACTER SPECIFICATION "
  2794. ^L^D_^F^I^N^E_^B^E^G^I^N ^O^U^T = (SO)
  2795. ^L^D_^F^I^N^E_^E^N^D ^O^U^T = (SI)
  2796. ^L^D_^F^I^N^E_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = (71(16))
  2797. ^L^D_^F^I^N^E_^V^E^R^T^I^C^A^L ^O^U^T = (78(16))
  2798. ^L^D_^F^I^N^E_^U^P^P^E^R_^L^E^F^T ^O^U^T = (6C(16))
  2799. ^L^D_^F^I^N^E_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = (6B(16))
  2800. ^L^D_^F^I^N^E_^L^O^W^E^R_^L^E^F^T ^O^U^T = (6D(16))
  2801. ^L^D_^F^I^N^E_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = (6A(16))
  2802. ^L^D_^F^I^N^E_^U^P_^T ^O^U^T = (77(16))
  2803. ^L^D_^F^I^N^E_^D^O^W^N_^T ^O^U^T = (76(16))
  2804. ^L^D_^F^I^N^E_^L^E^F^T_^T ^O^U^T = (74(16))
  2805. ^L^D_^F^I^N^E_^R^I^G^H^T_^T ^O^U^T = (75(16))
  2806. ^L^D_^F^I^N^E_^C^R^O^S^S ^O^U^T = (6E(16))
  2807.  
  2808. ^L^D_^M^E^D^I^U^M_^B^E^G^I^N ^O^U^T = (SO ^S^T^A^R^T_^B^O^L^D)
  2809. ^L^D_^M^E^D^I^U^M_^E^N^D ^O^U^T = (SI ^S^T^O^P_^B^O^L^D)
  2810. ^L^D_^M^E^D^I^U^M_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = (71(16))
  2811. ^L^D_^M^E^D^I^U^M_^V^E^R^T^I^C^A^L ^O^U^T = (78(16))
  2812. ^L^D_^M^E^D^I^U^M_^U^P^P^E^R_^L^E^F^T ^O^U^T = (6C(16))
  2813. ^L^D_^M^E^D^I^U^M_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = (6B(16))
  2814. ^L^D_^M^E^D^I^U^M_^L^O^W^E^R_^L^E^F^T ^O^U^T = (6D(16))
  2815. ^L^D_^M^E^D^I^U^M_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = (6A(16))
  2816. ^L^D_^M^E^D^I^U^M_^U^P_^T ^O^U^T = (77(16))
  2817. ^L^D_^M^E^D^I^U^M_^D^O^W^N_^T ^O^U^T = (76(16))
  2818. ^L^D_^M^E^D^I^U^M_^L^E^F^T_^T ^O^U^T = (74(16))
  2819. ^L^D_^M^E^D^I^U^M_^R^I^G^H^T_^T ^O^U^T = (75(16))
  2820. ^L^D_^M^E^D^I^U^M_^C^R^O^S^S ^O^U^T = (6E(16))
  2821.  
  2822. ^L^D_^B^O^L^D_^B^E^G^I^N ^O^U^T = (^S^T^A^R^T_^I^N^V^E^R^S^E)
  2823. ^L^D_^B^O^L^D_^E^N^D ^O^U^T = (^S^T^O^P_^I^N^V^E^R^S^E)
  2824. ^L^D_^B^O^L^D_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = (' ')
  2825. ^L^D_^B^O^L^D_^V^E^R^T^I^C^A^L ^O^U^T = (' ')
  2826. ^L^D_^B^O^L^D_^U^P^P^E^R_^L^E^F^T ^O^U^T = (' ')
  2827. ^L^D_^B^O^L^D_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = (' ')
  2828. ^L^D_^B^O^L^D_^L^O^W^E^R_^L^E^F^T ^O^U^T = (' ')
  2829. ^L^D_^B^O^L^D_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = (' ')
  2830. ^L^D_^B^O^L^D_^U^P_^T ^O^U^T = (' ')
  2831. ^L^D_^B^O^L^D_^D^O^W^N_^T ^O^U^T = (' ')
  2832. ^L^D_^B^O^L^D_^L^E^F^T_^T ^O^U^T = (' ')
  2833. ^L^D_^B^O^L^D_^R^I^G^H^T_^T ^O^U^T = (' ')
  2834. ^L^D_^B^O^L^D_^C^R^O^S^S ^O^U^T = (' ')
  2835.  
  2836. " VARIABLES FOR FULL SCREEN EDITOR FUNCTION KEY DEFINITIONS "
  2837. ^K1 = ('SK1/SM/L/ MARK /;SKS1/SMW/L/MRKCHR/')
  2838. ^K2 = ('SK2/MMTP/L/ MOVE /;SKS2/CMTP;UM;SA' '/L/ONECPY/')
  2839. ^K3 = ('SK3/IBP/L/ INSB /;SKS3/DB/L/ DELB /')
  2840. ^K4 = ('SK4/PF/L/ FIRST/;SKS4/VL/L/ LAST /')
  2841. ^K5 = ('SK5/U/L/ UNDO /;SKS5/UM/L/UNMARK/')
  2842. ^K6 = ('SK6/Q/L/ QUIT /;SKS6/QR/L/ QUITR/')
  2843. ^K7 = ('SK7"L/&?/"L"LOCATE";SKS7/LN/L/LOCNXT/')
  2844. ^K8 = ('SK8/SP1/L/1 ROW /;SKS8/SP2/L/2 ROWS/')
  2845. ^K9 = ('SK9/V/L/MIDDLE/;SKS9/.E/L/ENDLIN/')
  2846. ^K10 = ('SK10/SVO0/L/ LEFT /;SKS10/SVO&C;.P+20/L/ RIGHT/')
  2847. ^K11 = ('SK11/.S/L/ SPLIT/;SKS11/.J/L/ JOIN /')
  2848. ^K12 = ('SK12/.F/L/ PARA /;SKS12/.C/L/CENTER/')
  2849. ^K13 = ('SK13/SS/L/ CLEAR/;SKS13/.S;D;.E/L/ TRUNC/')
  2850. ^K14 = ('SK14/H/L/ HELP /;SKS14/EDIT/L/UNSPLT/')
  2851. ^K15 = ('SK15/CMTP/L/ COPY /;SKS15/DM/L/ DELM /')
  2852. ^K16 = ('SK16/SVC132/L/132COL/;SKS16/SVC80/L/ 80COL/;')
  2853.  
  2854. " DEFAULT KEY DEFINITIONS FOR THE FULL SCREEN EDITOR "
  2855. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  2856. ^N^A^M^E = ('FSEKEYS')...
  2857. ^O^U^T = (^K1 ';' ^K2 ';' ^K3 ';' ^K4 ';' ^K5)
  2858. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  2859. ^N^A^M^E = ('FSEKEYS')...
  2860. ^O^U^T = (^K6 ';' ^K7 ';' ^K8 ';' ^K9 ';' ^K10)
  2861. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  2862. ^N^A^M^E = ('FSEKEYS')...
  2863. ^O^U^T = (^K11 ';' ^K12 ';' ^K13 ';' ^K14 ';' ^K15 ';' ^K16)
  2864.  
  2865.  
  2866. " E^N^D ^O^F NOS T^E^R^M^I^N^A^L D^E^F^I^N^I^T^I^O^N F^I^L^E ^F^O^R A^P^P^L^E M^A^C^I^N^T^O^S^H "
  2867. " ^R^U^N^N^I^N^G C^O^N^T^R^O^L D^A^T^A V^I^S^T^ACOM MAC V3.0 "
  2868. *WEOR
  2869. TDU924 *** REMOVE THIS LINE WHEN USING AS INPUT TO *TDU*. ***
  2870.  
  2871. " TERMINAL DEFINITION FILE FOR TELEVIDEO 924 TERMINAL "
  2872.  
  2873. " VARIABLES "
  2874. CLEAR_PROTECT = (ESC '(' ESC '''')
  2875. HOME = (RS)
  2876. NORMAL = (ESC 'G0')
  2877. LOCK_KEYBOARD = (ESC '#')
  2878. PROTECT_MODE_OFF = (ESC '''')
  2879. PROTECT_MODE_ON = (ESC '&')
  2880. SELECT_FUNCTION_KEY_SET = (ESC '[7;0^V')
  2881. STOP_PROTECT = (ESC '(')
  2882. START_PROTECT = (ESC ')')
  2883. START_INVISIBLE = (ESC 'G1')
  2884. START_BLINK = (ESC 'G2')
  2885. START_INVERSE = (ESC 'G4')
  2886. START_UNDERLINE = (ESC 'G8')
  2887. UNLOCK_KEYBOARD = (ESC '"')
  2888. DEF01 = (ESC '^111' SOH '@A' CR EM ESC '^1A1' SOH '@G' CR EM)
  2889. DEF02 = (ESC '^121' SOH 'A' CR EM ESC '^1B1' SOH '^A' CR EM)
  2890. DEF03 = (ESC '^131' SOH 'B' CR EM ESC '^1C1' SOH '^B' CR EM)
  2891. DEF04 = (ESC '^141' SOH 'C' CR EM ESC '^1D1' SOH '^C' CR EM)
  2892. DEF05 = (ESC '^151' SOH 'D' CR EM ESC '^1E1' SOH '^D' CR EM)
  2893. DEF06 = (ESC '^161' SOH 'E' CR EM ESC '^1F1' SOH '^E' CR EM)
  2894. DEF07 = (ESC '^171' SOH 'F' CR EM ESC '^1G1' SOH '^F' CR EM)
  2895. DEF08 = (ESC '^181' SOH 'G' CR EM ESC '^1H1' SOH '^G' CR EM)
  2896. DEF09 = (ESC '^191' SOH 'H' CR EM ESC '^1I1' SOH '^H' CR EM)
  2897. DEF10 = (ESC '^1@D1' SOH 'I' CR EM ESC '^1J1' SOH '^I' CR EM)
  2898. DEF11 = (ESC '^1;1' SOH 'J' CR EM ESC '^1K1' SOH '^J' CR EM)
  2899. DEF12 = (ESC '^1<1' SOH 'K' CR EM ESC '^1L1' SOH '^K' CR EM)
  2900. DEF01TO06 = (DEF01 DEF02 DEF03 DEF04 DEF05 DEF06)
  2901. DEF07TO12 = (DEF07 DEF08 DEF09 DEF10 DEF11 DEF12)
  2902. DEFIN1 = (ESC '^32' SELECT_FUNCTION_KEY_SET)
  2903. DEFINN = ('** TV924 ** ^I^N ^S^C^R^E^E^N ^M^O^D^E' CR LF)
  2904. *WEOR
  2905. TDU950 *** REMOVE THIS LINE WHEN USING AS INPUT TO *TDU*. ***
  2906.  
  2907. " TERMINAL DEFINITION FILE FOR TELEVIDEO 950 TERMINAL "
  2908.  
  2909. " VARIABLES "
  2910. ATTRIBUTES_OCCUPY_SPACE = (ESC 'F0')
  2911. CLEAR_PROTECT = (ESC '(' ESC '''')
  2912. LINE_BASED_ATTRIBUTES = (ESC '[=2^L')
  2913. HOME = (RS)
  2914. NORMAL = (ESC 'G0')
  2915. LOCK_KEYBOARD = (ESC '#')
  2916. PROTECT_MODE_OFF = (ESC '''')
  2917. PROTECT_MODE_ON = (ESC '&')
  2918. SELECT_FUNCTION_KEY_SET = (ESC '[7;0^V')
  2919. STOP_PROTECT = (ESC '(')
  2920. START_PROTECT = (ESC ')')
  2921. START_INVISIBLE = (ESC 'G1')
  2922. START_BLINK = (ESC 'G2')
  2923. START_INVERSE = (ESC 'G4')
  2924. START_UNDERLINE = (ESC 'G8')
  2925. TV950_MODE = (ESC '[10;1^V')
  2926. UNLOCK_KEYBOARD = (ESC '"')
  2927. DEF01 = (ESC '^111' SOH '@A' CR EM ESC '^1<1' SOH '@G' CR EM)
  2928. DEF02 = (ESC '^121' SOH 'A' CR EM ESC '^1=1' SOH '^A' CR EM)
  2929. DEF03 = (ESC '^131' SOH 'B' CR EM ESC '^1>1' SOH '^B' CR EM)
  2930. DEF04 = (ESC '^141' SOH 'C' CR EM ESC '^1?1' SOH '^C' CR EM)
  2931. DEF05 = (ESC '^151' SOH 'D' CR EM ESC '^1@A1' SOH '^D' CR EM)
  2932. DEF06 = (ESC '^161' SOH 'E' CR EM ESC '^1A1' SOH '^E' CR EM)
  2933. DEF07 = (ESC '^171' SOH 'F' CR EM ESC '^1B1' SOH '^F' CR EM)
  2934. DEF08 = (ESC '^181' SOH 'G' CR EM ESC '^1C1' SOH '^G' CR EM)
  2935. DEF09 = (ESC '^191' SOH 'H' CR EM ESC '^1D1' SOH '^H' CR EM)
  2936. DEF10 = (ESC '^1:1' SOH 'I' CR EM ESC '^1E1' SOH '^I' CR EM)
  2937. DEF11 = (ESC '^1;1' SOH 'J' CR EM ESC '^1F1' SOH '^J' CR EM)
  2938. DEF12 = (ESC '^1G1' SOH 'K' CR EM ESC '^1L1' SOH '^K' CR EM)
  2939. DEF01TO06 = (DEF01 DEF02 DEF03 DEF04 DEF05 DEF06)
  2940. DEF07TO12 = (DEF07 DEF08 DEF09 DEF10 DEF11 DEF12)
  2941. DEFIN1 = (ESC '^32' TV950_MODE SELECT_FUNCTION_KEY_SET)
  2942. DEFIN2 = (ATTRIBUTES_OCCUPY_SPACE LINE_BASED_ATTRIBUTES)
  2943. DEFINN = ('** TV950 ** ^I^N ^S^C^R^E^E^N ^M^O^D^E' CR LF)
  2944. *WEOR
  2945. TDU955 *** REMOVE THIS LINE WHEN USING AS INPUT TO *TDU*. ***
  2946.  
  2947. " TERMINAL DEFINITION FILE FOR TELEVIDEO 955 TERMINAL "
  2948.  
  2949. " VARIABLES "
  2950. ATTRIBUTES_SPACELESS = (ESC 'F1')
  2951. ATTRIBUTE_MODE_LINE = (ESC '[=2^L')
  2952. CLEAR_PROTECT = (ESC '(' ESC '''')
  2953. HOME = (RS)
  2954. LARGE_SCREEN = (ESC '[=3^H')
  2955. SMALL_SCREEN = (ESC '[=3^L')
  2956. LOCK_KEYBOARD = (ESC '#')
  2957. NORMAL = (ESC 'G0')
  2958. PROTECT_MODE_OFF = (ESC '''')
  2959. PROTECT_MODE_ON = (ESC '&')
  2960. SELECT_FUNCTION_KEY_SET = (ESC '[7;0^V')
  2961. SET_DOWN_KEY_CTRL_J = (ESC '[=9^L')
  2962. START_BLINK = (ESC 'G2')
  2963. START_INVISIBLE = (ESC 'G1')
  2964. START_PROTECT = (ESC ')')
  2965. STOP_PROTECT = (ESC '(')
  2966. START_INVERSE = (ESC 'G4')
  2967. START_UNDERLINE = (ESC 'G8')
  2968. TV955_MODE = (ESC '[10;0^V')
  2969. UNLOCK_KEYBOARD = (ESC '"')
  2970. DEF01 = (ESC '^111' SOH '@A' CR EM ESC '^1A1' SOH '@G' CR EM)
  2971. DEF02 = (ESC '^121' SOH 'A' CR EM ESC '^1B1' SOH '^A' CR EM)
  2972. DEF03 = (ESC '^131' SOH 'B' CR EM ESC '^1C1' SOH '^B' CR EM)
  2973. DEF04 = (ESC '^141' SOH 'C' CR EM ESC '^1D1' SOH '^C' CR EM)
  2974. DEF05 = (ESC '^151' SOH 'D' CR EM ESC '^1E1' SOH '^D' CR EM)
  2975. DEF06 = (ESC '^161' SOH 'E' CR EM ESC '^1F1' SOH '^E' CR EM)
  2976. DEF07 = (ESC '^171' SOH 'F' CR EM ESC '^1G1' SOH '^F' CR EM)
  2977. DEF08 = (ESC '^181' SOH 'G' CR EM ESC '^1H1' SOH '^G' CR EM)
  2978. DEF09 = (ESC '^191' SOH 'H' CR EM ESC '^1I1' SOH '^H' CR EM)
  2979. DEF10 = (ESC '^1@D1' SOH 'I' CR EM ESC '^1J1' SOH '^I' CR EM)
  2980. DEF11 = (ESC '^1;1' SOH 'J' CR EM ESC '^1K1' SOH '^J' CR EM)
  2981. DEF12 = (ESC '^1<1' SOH 'K' CR EM ESC '^1L1' SOH '^K' CR EM)
  2982. DEF13 = (ESC '^1=1' SOH 'L' CR EM ESC '^1M1' SOH '^L' CR EM)
  2983. DEF14 = (ESC '^1>1' SOH 'M' CR EM ESC '^1N1' SOH '^M' CR EM)
  2984. DEF15 = (ESC '^1?1' SOH 'N' CR EM ESC '^1O1' SOH '^N' CR EM)
  2985. DEF16 = (ESC '^1@A1' SOH 'O' CR EM ESC '^1P1' SOH '^O' CR EM)
  2986. DEF01TO08 = (DEF01 DEF02 DEF03 DEF04 DEF05 DEF06 DEF07 DEF08)
  2987. DEF09TO16 = (DEF09 DEF10 DEF11 DEF12 DEF13 DEF14 DEF15 DEF16)
  2988. DEFIN1 = (ESC '^32' TV955_MODE SELECT_FUNCTION_KEY_SET)
  2989. DEFIN2 = (ATTRIBUTES_SPACELESS ATTRIBUTE_MODE_LINE)
  2990. DEFIN3 = (SET_DOWN_KEY_CTRL_J)
  2991. DEFINN = ('** TV955 ** ^I^N ^S^C^R^E^E^N ^M^O^D^E' CR LF)
  2992. DEFINIT = (DEFIN1 DEFIN2 DEFIN3 DEFINN)
  2993.  
  2994. " MODEL NAME AND COMMUNICATION TYPE "
  2995. ^M^O^D^E^L_^N^A^M^E ^V^A^L^U^E = 'TV955'
  2996. ^C^O^M^M^U^N^I^C^A^T^I^O^N^S ^T^Y^P^E = ^A^S^Y^N^C^H
  2997.  
  2998. " END OF INFORMATION SPECIFICATION "
  2999. ^E^N^D_^O^F_^I^N^F^O^R^M^A^T^I^O^N ^I^N = (0)
  3000.  
  3001. " CURSOR POSITIONING INFORMATION "
  3002. ^C^U^R^S^O^R_^P^O^S_^E^N^C^O^D^I^N^G ^B^I^A^S = (0) ^T^Y^P^E = ^A^N^S^I_^C^U^R^S^O^R
  3003. ^C^U^R^S^O^R_^P^O^S_^C^O^L^U^M^N_^F^I^R^S^T ^V^A^L^U^E = FALSE
  3004. ^C^U^R^S^O^R_^P^O^S_^C^O^L^U^M^N_^L^E^N^G^T^H ^V^A^L^U^E = (0)
  3005. ^C^U^R^S^O^R_^P^O^S_^R^O^W_^L^E^N^G^T^H ^V^A^L^U^E = (0)
  3006. ^C^U^R^S^O^R_^P^O^S_^B^E^G^I^N ^O^U^T = (ESC '[')
  3007. ^C^U^R^S^O^R_^P^O^S_^S^E^C^O^N^D ^O^U^T = (';')
  3008. ^C^U^R^S^O^R_^P^O^S_^T^H^I^R^D ^O^U^T = ('H')
  3009.  
  3010. " CURSOR MOVEMENT INFORMATION "
  3011. ^C^U^R^S^O^R_^H^O^M^E ^I^N^O^U^T = (HOME)
  3012. ^C^U^R^S^O^R_^U^P ^I^N^O^U^T = (VT)
  3013. ^C^U^R^S^O^R_^D^O^W^N ^I^N^O^U^T = (SYN)
  3014. ^C^U^R^S^O^R_^L^E^F^T ^I^N^O^U^T = (BS)
  3015. ^C^U^R^S^O^R_^R^I^G^H^T ^I^N^O^U^T = (FF)
  3016.  
  3017. " CURSOR BEHAVIOR (^F^O^R ^C^U^R^S^O^R ^M^O^V^E^M^E^N^T ^K^E^Y^S) "
  3018. ^M^O^V^E_^P^A^S^T_^R^I^G^H^T ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  3019. ^M^O^V^E_^P^A^S^T_^L^E^F^T ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  3020. ^M^O^V^E_^P^A^S^T_^T^O^P ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  3021. ^M^O^V^E_^P^A^S^T_^B^O^T^T^O^M ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  3022.  
  3023. " CURSOR BEHAVIOR (^F^O^R ^C^H^A^R^A^C^T^E^R ^K^E^Y^S) "
  3024. ^C^H^A^R_^P^A^S^T_^R^I^G^H^T ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  3025. ^C^H^A^R_^P^A^S^T_^L^E^F^T ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  3026. ^C^H^A^R_^P^A^S^T_^L^A^S^T_^P^O^S^I^T^I^O^N ^T^Y^P^E = ^S^C^R^O^L^L_^N^E^X^T
  3027.  
  3028. " CURSOR BEHAVIOR (^F^O^R ^C^U^R^S^O^R ^M^O^V^E^M^E^N^T ^I^N ^A ^P^R^O^T^E^C^T^E^D ^E^N^V^I^R^O^N^M^E^N^T) "
  3029. ^P^R^O^T^E^C^T^E^D_^P^A^S^T_^R^I^G^H^T ^T^Y^P^E = ^A^U^T^O_^T^A^B_^N^E^X^T
  3030. ^P^R^O^T^E^C^T^E^D_^P^A^S^T_^L^E^F^T ^T^Y^P^E = ^A^U^T^O_^T^A^B_^N^E^X^T
  3031. ^P^R^O^T^E^C^T^E^D_^P^A^S^T_^U^P ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  3032. ^P^R^O^T^E^C^T^E^D_^P^A^S^T_^D^O^W^N ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  3033.  
  3034. " CURSOR BEHAVIOR (^F^O^R ^C^H^A^R^A^C^T^E^R ^I^N^P^U^T ^I^N ^A ^P^R^O^T^E^C^T^E^D ^E^N^V^I^R^O^N^M^E^N^T) "
  3035. ^F^I^E^L^D_^P^A^S^T_^R^I^G^H^T ^T^Y^P^E = ^A^U^T^O_^T^A^B_^N^E^X^T
  3036. ^F^I^E^L^D_^P^A^S^T_^L^E^F^T ^T^Y^P^E = ^A^U^T^O_^T^A^B_^N^E^X^T
  3037. ^F^I^E^L^D_^P^A^S^T_^L^A^S^T ^T^Y^P^E = ^A^U^T^O_^T^A^B_^N^E^X^T
  3038. ^F^I^E^L^D_^B^E^F^O^R^E_^F^I^R^S^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  3039.  
  3040. " TERMINAL ATTRIBUTES "
  3041. ATTRIBUTE_NEEDS_RESET ^V^A^L^U^E = TRUE
  3042. ATTRIBUTES_NOT_MASKABLE ^V^A^L^U^E = TRUE
  3043. ATTRIBUTES_NOT_CHARACTER ^V^A^L^U^E = TRUE
  3044. AUTOMATIC_TABBING ^V^A^L^U^E = TRUE
  3045. CLEARS_WHEN_CHANGE_SIZE ^V^A^L^U^E = FALSE
  3046. DISABLE_OUTPUT_END ^V^A^L^U^E = TRUE
  3047. FUNCTION_KEY_LEAVES_MARK ^V^A^L^U^E = FALSE
  3048. HAS_HIDDEN ^V^A^L^U^E = TRUE
  3049. HAS_PROTECT ^V^A^L^U^E = FALSE
  3050. HOME_AT_TOP ^V^A^L^U^E = TRUE
  3051. MULTIPLE_SIZES ^V^A^L^U^E = TRUE
  3052. PROTECT_ALL_CLEARS ^V^A^L^U^E = TRUE
  3053. PROTABS_DONT_WRAP_BKW_PAGE ^V^A^L^U^E = TRUE
  3054. PROTABS_DONT_WRAP_FWD_PAGE ^V^A^L^U^E = FALSE
  3055. TABS_TO_HOME ^V^A^L^U^E = FALSE
  3056. TABS_TO_TAB_STOPS ^V^A^L^U^E = FALSE
  3057. TABS_TO_UNPROTECTED ^V^A^L^U^E = TRUE
  3058. TYPE_AHEAD ^V^A^L^U^E = FALSE
  3059. UNPROTABS_DONT_WRAP_BKW_LINE ^V^A^L^U^E = TRUE
  3060. UNPROTABS_DONT_WRAP_FWD_LINE ^V^A^L^U^E = TRUE
  3061.  
  3062. " SCREEN SIZE "
  3063. ^S^E^T_^S^I^Z^E ^R^O^W^S = 24 ^C^O^L^U^M^N^S = 80 ^O^U^T = (SMALL_SCREEN)
  3064. ^S^E^T_^S^I^Z^E ^R^O^W^S = 24 ^C^O^L^U^M^N^S = 132 ^O^U^T = (LARGE_SCREEN)
  3065.  
  3066. " SCREEN AND LINE MODE TRANSITION "
  3067. ^S^C^R^E^E^N_^I^N^I^T ^O^U^T = (DEFINIT)
  3068. ^S^E^T_^S^C^R^E^E^N_^M^O^D^E ^O^U^T = (DEF01TO08 DEF09TO16)
  3069. ^S^E^T_^L^I^N^E_^M^O^D^E ^O^U^T = (CLEAR_PROTECT UNLOCK_KEYBOARD)
  3070.  
  3071. " TERMINAL CAPABILITIES "
  3072. ^D^E^L^E^T^E_^C^H^A^R ^I^N^O^U^T = (ESC 'W')
  3073. ^D^E^L^E^T^E_^L^I^N^E_^B^O^L ^I^N^O^U^T = (ESC 'R')
  3074. ^E^R^A^S^E_^E^N^D_^O^F_^L^I^N^E ^I^N = (ESC 'T')
  3075. ^E^R^A^S^E_^E^N^D_^O^F_^L^I^N^E ^O^U^T = (START_PROTECT ESC 'T' STOP_PROTECT)
  3076. ^E^R^A^S^E_^E^N^D_^O^F_^P^A^G^E ^I^N^O^U^T = (ESC 'Y')
  3077. ^E^R^A^S^E_^U^N^P^R^O^T^E^C^T^E^D ^I^N^O^U^T = (ESC '+')
  3078. ^E^R^A^S^E_^P^A^G^E_^H^O^M^E ^I^N^O^U^T = (SUB)
  3079. ^I^N^S^E^R^T_^C^H^A^R ^I^N^O^U^T = (ESC 'Q')
  3080. ^I^N^S^E^R^T_^L^I^N^E_^B^O^L ^I^N^O^U^T = (ESC 'E')
  3081. ^I^N^S^E^R^T_^M^O^D^E_^B^E^G^I^N ^I^N^O^U^T = (ESC '^Q')
  3082. ^I^N^S^E^R^T_^M^O^D^E_^E^N^D ^I^N^O^U^T = (ESC '^R')
  3083. ^T^A^B_^B^A^C^K^W^A^R^D ^I^N^O^U^T = (ESC 'I')
  3084. ^T^A^B_^C^L^E^A^R_^A^L^L ^I^N^O^U^T = (ESC '3')
  3085. ^T^A^B_^S^E^T ^I^N^O^U^T = (ESC '1')
  3086. ^T^A^B_^F^O^R^W^A^R^D ^I^N^O^U^T = (HT)
  3087.  
  3088. " VIDEO ATTRIBUTES AND SEQUENCES "
  3089. ^B^E^L^L_^N^A^K ^O^U^T = (BEL)
  3090. ^O^U^T^P^U^T_^B^E^G^I^N ^O^U^T = (PROTECT_MODE_OFF LOCK_KEYBOARD)
  3091. ^O^U^T^P^U^T_^E^N^D ^O^U^T = (STOP_PROTECT UNLOCK_KEYBOARD)
  3092. ^D^I^S^P^L^A^Y_^B^E^G^I^N ^O^U^T = (PROTECT_MODE_OFF START_PROTECT)
  3093. ^D^I^S^P^L^A^Y_^E^N^D ^O^U^T = (PROTECT_MODE_ON)
  3094. ^O^U^T^P^U^T_^T^E^X^T_^B^E^G^I^N ^O^U^T = (START_PROTECT)
  3095. ^O^U^T^P^U^T_^T^E^X^T_^E^N^D ^O^U^T = ()
  3096. ^T^I^T^L^E_^B^E^G^I^N ^O^U^T = ()
  3097. ^T^I^T^L^E_^E^N^D ^O^U^T = ()
  3098. ^M^E^S^S^A^G^E_^B^E^G^I^N ^O^U^T = ()
  3099. ^M^E^S^S^A^G^E_^E^N^D ^O^U^T = ()
  3100. ^I^T^A^L^I^C_^B^E^G^I^N ^O^U^T = ()
  3101. ^I^T^A^L^I^C_^E^N^D ^O^U^T = ()
  3102. ^I^N^P^U^T_^T^E^X^T_^B^E^G^I^N ^O^U^T = (START_UNDERLINE)
  3103. ^I^N^P^U^T_^T^E^X^T_^E^N^D ^O^U^T = (NORMAL)
  3104. ^P^R^O^T^E^C^T_^A^L^L ^O^U^T = (HOME START_PROTECT ESC 'Y')
  3105. ^A^L^T_^B^E^G^I^N ^O^U^T = ()
  3106. ^A^L^T_^E^N^D ^O^U^T = ()
  3107. ^B^L^I^N^K_^B^E^G^I^N ^O^U^T = (START_BLINK)
  3108. ^B^L^I^N^K_^E^N^D ^O^U^T = (NORMAL)
  3109. ^H^I^D^D^E^N_^B^E^G^I^N ^O^U^T = (START_INVISIBLE)
  3110. ^H^I^D^D^E^N_^E^N^D ^O^U^T = (NORMAL)
  3111. ^I^N^V^E^R^S^E_^B^E^G^I^N ^O^U^T = (START_INVERSE)
  3112. ^I^N^V^E^R^S^E_^E^N^D ^O^U^T = (NORMAL)
  3113. ^P^R^O^T^E^C^T_^B^E^G^I^N ^O^U^T = (START_PROTECT)
  3114. ^P^R^O^T^E^C^T_^E^N^D ^O^U^T = (STOP_PROTECT)
  3115. ^U^N^D^E^R^L^I^N^E_^B^E^G^I^N ^O^U^T = (START_UNDERLINE)
  3116. ^U^N^D^E^R^L^I^N^E_^E^N^D ^O^U^T = (NORMAL)
  3117. ^E^R^R^O^R_^B^E^G^I^N ^O^U^T = (START_INVERSE)
  3118. ^E^R^R^O^R_^E^N^D ^O^U^T = (NORMAL)
  3119.  
  3120. " PROGRAMMABLE FUNCTION KEY INPUT INFORMATION "
  3121. ^F1 ^I^N = (SOH '@A')
  3122. ^F2 ^I^N = (SOH 'A')
  3123. ^F3 ^I^N = (SOH 'B')
  3124. ^F4 ^I^N = (SOH 'C')
  3125. ^F5 ^I^N = (SOH 'D')
  3126. ^F6 ^I^N = (SOH 'E')
  3127. ^F7 ^I^N = (SOH 'F')
  3128. ^F8 ^I^N = (SOH 'G')
  3129. ^F9 ^I^N = (SOH 'H')
  3130. ^F10 ^I^N = (SOH 'I')
  3131. ^F11 ^I^N = (SOH 'J')
  3132. ^F12 ^I^N = (SOH 'K')
  3133. ^F13 ^I^N = (SOH 'L')
  3134. ^F14 ^I^N = (SOH 'M')
  3135. ^F15 ^I^N = (SOH 'N')
  3136. ^F16 ^I^N = (SOH 'O')
  3137. ^F1_^S ^I^N = (SOH '@G')
  3138. ^F2_^S ^I^N = (SOH '^A')
  3139. ^F3_^S ^I^N = (SOH '^B')
  3140. ^F4_^S ^I^N = (SOH '^C')
  3141. ^F5_^S ^I^N = (SOH '^D')
  3142. ^F6_^S ^I^N = (SOH '^E')
  3143. ^F7_^S ^I^N = (SOH '^F')
  3144. ^F8_^S ^I^N = (SOH '^G')
  3145. ^F9_^S ^I^N = (SOH '^H')
  3146. ^F10_^S ^I^N = (SOH '^I')
  3147. ^F11_^S ^I^N = (SOH '^J')
  3148. ^F12_^S ^I^N = (SOH '^K')
  3149. ^F13_^S ^I^N = (SOH '^L')
  3150. ^F14_^S ^I^N = (SOH '^M')
  3151. ^F15_^S ^I^N = (SOH '^N')
  3152. ^F16_^S ^I^N = (SOH '^O')
  3153.  
  3154. " LINE DRAWING CHARACTER SPECIFICATION "
  3155. ^L^D_^F^I^N^E_^B^E^G^I^N ^O^U^T = (ESC '$')
  3156. ^L^D_^F^I^N^E_^E^N^D ^O^U^T = (ESC '%')
  3157. ^L^D_^F^I^N^E_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = ('K')
  3158. ^L^D_^F^I^N^E_^V^E^R^T^I^C^A^L ^O^U^T = ('J')
  3159. ^L^D_^F^I^N^E_^U^P^P^E^R_^L^E^F^T ^O^U^T = ('F')
  3160. ^L^D_^F^I^N^E_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = ('G')
  3161. ^L^D_^F^I^N^E_^L^O^W^E^R_^L^E^F^T ^O^U^T = ('E')
  3162. ^L^D_^F^I^N^E_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = ('H')
  3163. ^L^D_^F^I^N^E_^U^P_^T ^O^U^T = ('N')
  3164. ^L^D_^F^I^N^E_^D^O^W^N_^T ^O^U^T = ('O')
  3165. ^L^D_^F^I^N^E_^L^E^F^T_^T ^O^U^T = ('M')
  3166. ^L^D_^F^I^N^E_^R^I^G^H^T_^T ^O^U^T = ('L')
  3167. ^L^D_^F^I^N^E_^C^R^O^S^S ^O^U^T = ('I')
  3168. ^L^D_^M^E^D^I^U^M_^B^E^G^I^N ^O^U^T = (ESC '$')
  3169. ^L^D_^M^E^D^I^U^M_^E^N^D ^O^U^T = (ESC '%')
  3170. ^L^D_^M^E^D^I^U^M_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = ('K')
  3171. ^L^D_^M^E^D^I^U^M_^V^E^R^T^I^C^A^L ^O^U^T = ('J')
  3172. ^L^D_^M^E^D^I^U^M_^U^P^P^E^R_^L^E^F^T ^O^U^T = ('F')
  3173. ^L^D_^M^E^D^I^U^M_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = ('G')
  3174. ^L^D_^M^E^D^I^U^M_^L^O^W^E^R_^L^E^F^T ^O^U^T = ('E')
  3175. ^L^D_^M^E^D^I^U^M_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = ('H')
  3176. ^L^D_^M^E^D^I^U^M_^U^P_^T ^O^U^T = ('N')
  3177. ^L^D_^M^E^D^I^U^M_^D^O^W^N_^T ^O^U^T = ('O')
  3178. ^L^D_^M^E^D^I^U^M_^L^E^F^T_^T ^O^U^T = ('M')
  3179. ^L^D_^M^E^D^I^U^M_^R^I^G^H^T_^T ^O^U^T = ('L')
  3180. ^L^D_^M^E^D^I^U^M_^C^R^O^S^S ^O^U^T = ('I')
  3181. ^L^D_^B^O^L^D_^B^E^G^I^N ^O^U^T = (ESC '$')
  3182. ^L^D_^B^O^L^D_^E^N^D ^O^U^T = (ESC '%')
  3183. ^L^D_^B^O^L^D_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = ('K')
  3184. ^L^D_^B^O^L^D_^V^E^R^T^I^C^A^L ^O^U^T = ('J')
  3185. ^L^D_^B^O^L^D_^U^P^P^E^R_^L^E^F^T ^O^U^T = ('F')
  3186. ^L^D_^B^O^L^D_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = ('G')
  3187. ^L^D_^B^O^L^D_^L^O^W^E^R_^L^E^F^T ^O^U^T = ('E')
  3188. ^L^D_^B^O^L^D_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = ('H')
  3189. ^L^D_^B^O^L^D_^U^P_^T ^O^U^T = ('N')
  3190. ^L^D_^B^O^L^D_^D^O^W^N_^T ^O^U^T = ('O')
  3191. ^L^D_^B^O^L^D_^L^E^F^T_^T ^O^U^T = ('M')
  3192. ^L^D_^B^O^L^D_^R^I^G^H^T_^T ^O^U^T = ('L')
  3193. ^L^D_^B^O^L^D_^C^R^O^S^S ^O^U^T = ('I')
  3194.  
  3195. " DEFAULT KEY DEFINITIONS FOR THE FULL SCREEN EDITOR "
  3196. ^K1 = ('SK1/VNS/L/ FWD/;SKS1/V^L/L/ LAST/')
  3197. ^K2 = ('SK2/VPS/L/ BKW/;SKS2/P1/L/ FIRST/')
  3198. ^K3 = ('SK3/VN/L/LINEUP/;SKS3/E/L/ EDIT/')
  3199. ^K4 = ('SK4/VP/L/LINEDN/;SKS4/H/L/ HELP/')
  3200. ^K5 = ('SK5/U/L/ UNDO/;SKS5/UM/L/UNMARK/')
  3201. ^K6 = ('SK6/Q/L/ QUIT/')
  3202. ^K7 = ('SK7/CMTP/L/ COPY/;SKS7/MMTP/L/ MOVE/')
  3203. ^K8 = ('SK8/SM/L/ MARK/;SKS8/SMW/L/MRKCHR/')
  3204. ^K9 = ('SK9/L"&?"/L/LOCATE/;SKS9/LA/L/LOCALL/')
  3205. ^K10 = ('SK10/.C/L/CENTER/;SKS10/.F/L/ PARA/')
  3206. ^K11 = ('SK11/.S/L/ BREAK/;SKS11/.J/L/ JOIN/')
  3207. ^K12 = ('SK12/V/L/MIDDLE/;SKS12/.E/L/SKPEOL/')
  3208.  
  3209. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  3210. ^N^A^M^E = ('FSEKEYS')...
  3211. ^O^U^T = (^K1 ';' ^K2 ';' ^K3 ';' ^K4 ';' ^K5 ';' ^K6)
  3212. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  3213. ^N^A^M^E = ('FSEKEYS')...
  3214. ^O^U^T = (^K7 ';' ^K8 ';' ^K9 ';' ^K10 ';' ^K11)
  3215.  
  3216. " END OF TERMINAL DEFINITION FILE FOR TELEVIDEO 955 TERMINAL "
  3217. *WEOR
  3218. TDU924T *** REMOVE THIS LINE WHEN USING AS INPUT TO *TDU*. ***
  3219.  
  3220. " TERMINAL DEFINITION FILE FOR TELEVIDEO 924 TERMINAL WITH TYPE AHEAD "
  3221.  
  3222. " VARIABLES "
  3223. CLEAR_PROTECT = (ESC '(' ESC '''')
  3224. HOME = (RS)
  3225. NORMAL = (ESC 'G0')
  3226. LOCK_KEYBOARD = (ESC '#')
  3227. PROTECT_MODE_OFF = (ESC '''')
  3228. PROTECT_MODE_ON = (ESC '&')
  3229. SELECT_FUNCTION_KEY_SET = (ESC '[7;0^V')
  3230. STOP_PROTECT = (ESC '(')
  3231. START_PROTECT = (ESC ')')
  3232. START_INVISIBLE = (ESC 'G1')
  3233. START_BLINK = (ESC 'G2')
  3234. START_INVERSE = (ESC 'G4')
  3235. START_UNDERLINE = (ESC 'G8')
  3236. UNLOCK_KEYBOARD = (ESC '"')
  3237. DEF01 = (ESC '^111' SOH '@A' CR EM ESC '^1A1' SOH '@G' CR EM)
  3238. DEF02 = (ESC '^121' SOH 'A' CR EM ESC '^1B1' SOH '^A' CR EM)
  3239. DEF03 = (ESC '^131' SOH 'B' CR EM ESC '^1C1' SOH '^B' CR EM)
  3240. DEF04 = (ESC '^141' SOH 'C' CR EM ESC '^1D1' SOH '^C' CR EM)
  3241. DEF05 = (ESC '^151' SOH 'D' CR EM ESC '^1E1' SOH '^D' CR EM)
  3242. DEF06 = (ESC '^161' SOH 'E' CR EM ESC '^1F1' SOH '^E' CR EM)
  3243. DEF07 = (ESC '^171' SOH 'F' CR EM ESC '^1G1' SOH '^F' CR EM)
  3244. DEF08 = (ESC '^181' SOH 'G' CR EM ESC '^1H1' SOH '^G' CR EM)
  3245. DEF09 = (ESC '^191' SOH 'H' CR EM ESC '^1I1' SOH '^H' CR EM)
  3246. DEF10 = (ESC '^1@D1' SOH 'I' CR EM ESC '^1J1' SOH '^I' CR EM)
  3247. DEF11 = (ESC '^1;1' SOH 'J' CR EM ESC '^1K1' SOH '^J' CR EM)
  3248. DEF12 = (ESC '^1<1' SOH 'K' CR EM ESC '^1L1' SOH '^K' CR EM)
  3249. DEF01TO06 = (DEF01 DEF02 DEF03 DEF04 DEF05 DEF06)
  3250. DEF07TO12 = (DEF07 DEF08 DEF09 DEF10 DEF11 DEF12)
  3251. DEFIN1 = (ESC '^32' SELECT_FUNCTION_KEY_SET)
  3252. DEFINN = ('** TV924 ** ^I^N ^S^C^R^E^E^N ^M^O^D^E' CR LF)
  3253. *WEOR
  3254. TDU950T *** REMOVE THIS LINE WHEN USING AS INPUT TO *TDU*. ***
  3255.  
  3256. " TERMINAL DEFINITION FILE FOR TELEVIDEO 950 TERMINAL WITH TYPE AHEAD "
  3257.  
  3258. " VARIABLES "
  3259. ATTRIBUTES_OCCUPY_SPACE = (ESC 'F0')
  3260. CLEAR_PROTECT = (ESC '(' ESC '''')
  3261. LINE_BASED_ATTRIBUTES = (ESC '[=2^L')
  3262. HOME = (RS)
  3263. NORMAL = (ESC 'G0')
  3264. LOCK_KEYBOARD = (ESC '#')
  3265. PROTECT_MODE_OFF = (ESC '''')
  3266. PROTECT_MODE_ON = (ESC '&')
  3267. SELECT_FUNCTION_KEY_SET = (ESC '[7;0^V')
  3268. STOP_PROTECT = (ESC '(')
  3269. START_PROTECT = (ESC ')')
  3270. START_INVISIBLE = (ESC 'G1')
  3271. START_BLINK = (ESC 'G2')
  3272. START_INVERSE = (ESC 'G4')
  3273. START_UNDERLINE = (ESC 'G8')
  3274. TV950_MODE = (ESC '[10;1^V')
  3275. UNLOCK_KEYBOARD = (ESC '"')
  3276. DEF01 = (ESC '^111' SOH '@A' CR EM ESC '^1<1' SOH '@G' CR EM)
  3277. DEF02 = (ESC '^121' SOH 'A' CR EM ESC '^1=1' SOH '^A' CR EM)
  3278. DEF03 = (ESC '^131' SOH 'B' CR EM ESC '^1>1' SOH '^B' CR EM)
  3279. DEF04 = (ESC '^141' SOH 'C' CR EM ESC '^1?1' SOH '^C' CR EM)
  3280. DEF05 = (ESC '^151' SOH 'D' CR EM ESC '^1@A1' SOH '^D' CR EM)
  3281. DEF06 = (ESC '^161' SOH 'E' CR EM ESC '^1A1' SOH '^E' CR EM)
  3282. DEF07 = (ESC '^171' SOH 'F' CR EM ESC '^1B1' SOH '^F' CR EM)
  3283. DEF08 = (ESC '^181' SOH 'G' CR EM ESC '^1C1' SOH '^G' CR EM)
  3284. DEF09 = (ESC '^191' SOH 'H' CR EM ESC '^1D1' SOH '^H' CR EM)
  3285. DEF10 = (ESC '^1:1' SOH 'I' CR EM ESC '^1E1' SOH '^I' CR EM)
  3286. DEF11 = (ESC '^1;1' SOH 'J' CR EM ESC '^1F1' SOH '^J' CR EM)
  3287. DEF12 = (ESC '^1G1' SOH 'K' CR EM ESC '^1L1' SOH '^K' CR EM)
  3288. DEF01TO06 = (DEF01 DEF02 DEF03 DEF04 DEF05 DEF06)
  3289. DEF07TO12 = (DEF07 DEF08 DEF09 DEF10 DEF11 DEF12)
  3290. DEFIN1 = (ESC '^32' TV950_MODE SELECT_FUNCTION_KEY_SET)
  3291. DEFIN2 = (ATTRIBUTES_OCCUPY_SPACE LINE_BASED_ATTRIBUTES)
  3292. DEFINN = ('** TV950 ** ^I^N ^S^C^R^E^E^N ^M^O^D^E' CR LF)
  3293. *WEOR
  3294. TDU955T *** REMOVE THIS LINE WHEN USING AS INPUT TO *TDU*. ***
  3295.  
  3296. " TERMINAL DEFINITION FILE FOR TELEVIDEO 955 TERMINAL WITH TYPE AHEAD "
  3297.  
  3298. " VARIABLES "
  3299. ATTRIBUTES_SPACELESS = (ESC 'F1')
  3300. ATTRIBUTE_MODE_LINE = (ESC '[=2^L')
  3301. CLEAR_PROTECT = (ESC '(' ESC '''')
  3302. HOME = (RS)
  3303. LARGE_SCREEN = (ESC '[=3^H')
  3304. SMALL_SCREEN = (ESC '[=3^L')
  3305. LOCK_KEYBOARD = (ESC '#')
  3306. NORMAL = (ESC 'G0')
  3307. PROTECT_MODE_OFF = (ESC '''')
  3308. PROTECT_MODE_ON = (ESC '&')
  3309. SELECT_FUNCTION_KEY_SET = (ESC '[7;0^V')
  3310. SET_DOWN_KEY_CTRL_J = (ESC '[=9^L')
  3311. START_BLINK = (ESC 'G2')
  3312. START_INVISIBLE = (ESC 'G1')
  3313. START_PROTECT = (ESC ')')
  3314. STOP_PROTECT = (ESC '(')
  3315. START_INVERSE = (ESC 'G4')
  3316. START_UNDERLINE = (ESC 'G8')
  3317. TV955_MODE = (ESC '[10;0^V')
  3318. UNLOCK_KEYBOARD = (ESC '"')
  3319. DEF01 = (ESC '^111' SOH '@A' CR EM ESC '^1A1' SOH '@G' CR EM)
  3320. DEF02 = (ESC '^121' SOH 'A' CR EM ESC '^1B1' SOH '^A' CR EM)
  3321. DEF03 = (ESC '^131' SOH 'B' CR EM ESC '^1C1' SOH '^B' CR EM)
  3322. DEF04 = (ESC '^141' SOH 'C' CR EM ESC '^1D1' SOH '^C' CR EM)
  3323. DEF05 = (ESC '^151' SOH 'D' CR EM ESC '^1E1' SOH '^D' CR EM)
  3324. DEF06 = (ESC '^161' SOH 'E' CR EM ESC '^1F1' SOH '^E' CR EM)
  3325. DEF07 = (ESC '^171' SOH 'F' CR EM ESC '^1G1' SOH '^F' CR EM)
  3326. DEF08 = (ESC '^181' SOH 'G' CR EM ESC '^1H1' SOH '^G' CR EM)
  3327. DEF09 = (ESC '^191' SOH 'H' CR EM ESC '^1I1' SOH '^H' CR EM)
  3328. DEF10 = (ESC '^1@D1' SOH 'I' CR EM ESC '^1J1' SOH '^I' CR EM)
  3329. DEF11 = (ESC '^1;1' SOH 'J' CR EM ESC '^1K1' SOH '^J' CR EM)
  3330. DEF12 = (ESC '^1<1' SOH 'K' CR EM ESC '^1L1' SOH '^K' CR EM)
  3331. DEF13 = (ESC '^1=1' SOH 'L' CR EM ESC '^1M1' SOH '^L' CR EM)
  3332. DEF14 = (ESC '^1>1' SOH 'M' CR EM ESC '^1N1' SOH '^M' CR EM)
  3333. DEF15 = (ESC '^1?1' SOH 'N' CR EM ESC '^1O1' SOH '^N' CR EM)
  3334. DEF16 = (ESC '^1@A1' SOH 'O' CR EM ESC '^1P1' SOH '^O' CR EM)
  3335. DEF01TO08 = (DEF01 DEF02 DEF03 DEF04 DEF05 DEF06 DEF07 DEF08)
  3336. DEF09TO16 = (DEF09 DEF10 DEF11 DEF12 DEF13 DEF14 DEF15 DEF16)
  3337. DEFIN1 = (ESC '^32' TV955_MODE SELECT_FUNCTION_KEY_SET)
  3338. DEFIN2 = (ATTRIBUTES_SPACELESS ATTRIBUTE_MODE_LINE)
  3339. DEFIN3 = (SET_DOWN_KEY_CTRL_J)
  3340. DEFINN = ('** TV955 ** ^I^N ^S^C^R^E^E^N ^M^O^D^E' CR LF)
  3341. DEFINIT = (DEFIN1 DEFIN2 DEFIN3 DEFINN)
  3342.  
  3343. " MODEL NAME AND COMMUNICATION TYPE "
  3344. ^M^O^D^E^L_^N^A^M^E ^V^A^L^U^E = 'TV955T'
  3345. ^C^O^M^M^U^N^I^C^A^T^I^O^N^S ^T^Y^P^E = ^A^S^Y^N^C^H
  3346.  
  3347. " END OF INFORMATION SPECIFICATION "
  3348. ^E^N^D_^O^F_^I^N^F^O^R^M^A^T^I^O^N ^I^N = (0)
  3349.  
  3350. " CURSOR POSITIONING INFORMATION "
  3351. ^C^U^R^S^O^R_^P^O^S_^E^N^C^O^D^I^N^G ^B^I^A^S = (0) ^T^Y^P^E = ^A^N^S^I_^C^U^R^S^O^R
  3352. ^C^U^R^S^O^R_^P^O^S_^C^O^L^U^M^N_^F^I^R^S^T ^V^A^L^U^E = FALSE
  3353. ^C^U^R^S^O^R_^P^O^S_^C^O^L^U^M^N_^L^E^N^G^T^H ^V^A^L^U^E = (0)
  3354. ^C^U^R^S^O^R_^P^O^S_^R^O^W_^L^E^N^G^T^H ^V^A^L^U^E = (0)
  3355. ^C^U^R^S^O^R_^P^O^S_^B^E^G^I^N ^O^U^T = (ESC '[')
  3356. ^C^U^R^S^O^R_^P^O^S_^S^E^C^O^N^D ^O^U^T = (';')
  3357. ^C^U^R^S^O^R_^P^O^S_^T^H^I^R^D ^O^U^T = ('H')
  3358.  
  3359. " CURSOR MOVEMENT INFORMATION "
  3360. ^C^U^R^S^O^R_^H^O^M^E ^I^N^O^U^T = (HOME)
  3361. ^C^U^R^S^O^R_^U^P ^I^N^O^U^T = (VT)
  3362. ^C^U^R^S^O^R_^D^O^W^N ^I^N^O^U^T = (SYN)
  3363. ^C^U^R^S^O^R_^L^E^F^T ^I^N^O^U^T = (BS)
  3364. ^C^U^R^S^O^R_^R^I^G^H^T ^I^N^O^U^T = (FF)
  3365.  
  3366. " CURSOR BEHAVIOR (^F^O^R ^C^U^R^S^O^R ^M^O^V^E^M^E^N^T ^K^E^Y^S) "
  3367. ^M^O^V^E_^P^A^S^T_^R^I^G^H^T ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  3368. ^M^O^V^E_^P^A^S^T_^L^E^F^T ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  3369. ^M^O^V^E_^P^A^S^T_^T^O^P ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  3370. ^M^O^V^E_^P^A^S^T_^B^O^T^T^O^M ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  3371.  
  3372. " CURSOR BEHAVIOR (^F^O^R ^C^H^A^R^A^C^T^E^R ^K^E^Y^S) "
  3373. ^C^H^A^R_^P^A^S^T_^R^I^G^H^T ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  3374. ^C^H^A^R_^P^A^S^T_^L^E^F^T ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  3375. ^C^H^A^R_^P^A^S^T_^L^A^S^T_^P^O^S^I^T^I^O^N ^T^Y^P^E = ^S^C^R^O^L^L_^N^E^X^T
  3376.  
  3377. " CURSOR BEHAVIOR (^F^O^R ^C^U^R^S^O^R ^M^O^V^E^M^E^N^T ^I^N ^A ^P^R^O^T^E^C^T^E^D ^E^N^V^I^R^O^N^M^E^N^T) "
  3378. ^P^R^O^T^E^C^T^E^D_^P^A^S^T_^R^I^G^H^T ^T^Y^P^E = ^A^U^T^O_^T^A^B_^N^E^X^T
  3379. ^P^R^O^T^E^C^T^E^D_^P^A^S^T_^L^E^F^T ^T^Y^P^E = ^A^U^T^O_^T^A^B_^N^E^X^T
  3380. ^P^R^O^T^E^C^T^E^D_^P^A^S^T_^U^P ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  3381. ^P^R^O^T^E^C^T^E^D_^P^A^S^T_^D^O^W^N ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  3382.  
  3383. " CURSOR BEHAVIOR (^F^O^R ^C^H^A^R^A^C^T^E^R ^I^N^P^U^T ^I^N ^A ^P^R^O^T^E^C^T^E^D ^E^N^V^I^R^O^N^M^E^N^T) "
  3384. ^F^I^E^L^D_^P^A^S^T_^R^I^G^H^T ^T^Y^P^E = ^A^U^T^O_^T^A^B_^N^E^X^T
  3385. ^F^I^E^L^D_^P^A^S^T_^L^E^F^T ^T^Y^P^E = ^A^U^T^O_^T^A^B_^N^E^X^T
  3386. ^F^I^E^L^D_^P^A^S^T_^L^A^S^T ^T^Y^P^E = ^A^U^T^O_^T^A^B_^N^E^X^T
  3387. ^F^I^E^L^D_^B^E^F^O^R^E_^F^I^R^S^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  3388.  
  3389. " TERMINAL ATTRIBUTES "
  3390. ATTRIBUTE_NEEDS_RESET ^V^A^L^U^E = TRUE
  3391. ATTRIBUTES_NOT_MASKABLE ^V^A^L^U^E = TRUE
  3392. ATTRIBUTES_NOT_CHARACTER ^V^A^L^U^E = TRUE
  3393. AUTOMATIC_TABBING ^V^A^L^U^E = TRUE
  3394. CLEARS_WHEN_CHANGE_SIZE ^V^A^L^U^E = FALSE
  3395. DISABLE_OUTPUT_END ^V^A^L^U^E = TRUE
  3396. FUNCTION_KEY_LEAVES_MARK ^V^A^L^U^E = FALSE
  3397. HAS_HIDDEN ^V^A^L^U^E = TRUE
  3398. HAS_PROTECT ^V^A^L^U^E = FALSE
  3399. HOME_AT_TOP ^V^A^L^U^E = TRUE
  3400. MULTIPLE_SIZES ^V^A^L^U^E = TRUE
  3401. PROTECT_ALL_CLEARS ^V^A^L^U^E = TRUE
  3402. PROTABS_DONT_WRAP_BKW_PAGE ^V^A^L^U^E = TRUE
  3403. PROTABS_DONT_WRAP_FWD_PAGE ^V^A^L^U^E = FALSE
  3404. TABS_TO_HOME ^V^A^L^U^E = FALSE
  3405. TABS_TO_TAB_STOPS ^V^A^L^U^E = FALSE
  3406. TABS_TO_UNPROTECTED ^V^A^L^U^E = TRUE
  3407. TYPE_AHEAD ^V^A^L^U^E = TRUE
  3408. UNPROTABS_DONT_WRAP_BKW_LINE ^V^A^L^U^E = TRUE
  3409. UNPROTABS_DONT_WRAP_FWD_LINE ^V^A^L^U^E = TRUE
  3410.  
  3411. " SCREEN SIZE "
  3412. ^S^E^T_^S^I^Z^E ^R^O^W^S = 24 ^C^O^L^U^M^N^S = 80 ^O^U^T = (SMALL_SCREEN)
  3413. ^S^E^T_^S^I^Z^E ^R^O^W^S = 24 ^C^O^L^U^M^N^S = 132 ^O^U^T = (LARGE_SCREEN)
  3414.  
  3415. " SCREEN AND LINE MODE TRANSITION "
  3416. ^S^C^R^E^E^N_^I^N^I^T ^O^U^T = (DEFINIT)
  3417. ^S^E^T_^S^C^R^E^E^N_^M^O^D^E ^O^U^T = (DEF01TO08 DEF09TO16)
  3418. ^S^E^T_^L^I^N^E_^M^O^D^E ^O^U^T = (CLEAR_PROTECT UNLOCK_KEYBOARD)
  3419.  
  3420. " TERMINAL CAPABILITIES "
  3421. ^D^E^L^E^T^E_^C^H^A^R ^I^N^O^U^T = (ESC 'W')
  3422. ^D^E^L^E^T^E_^L^I^N^E_^B^O^L ^I^N^O^U^T = (ESC 'R')
  3423. ^E^R^A^S^E_^E^N^D_^O^F_^L^I^N^E ^I^N = (ESC 'T')
  3424. ^E^R^A^S^E_^E^N^D_^O^F_^L^I^N^E ^O^U^T = (START_PROTECT ESC 'T' STOP_PROTECT)
  3425. ^E^R^A^S^E_^E^N^D_^O^F_^P^A^G^E ^I^N^O^U^T = (ESC 'Y')
  3426. ^E^R^A^S^E_^U^N^P^R^O^T^E^C^T^E^D ^I^N^O^U^T = (ESC '+')
  3427. ^E^R^A^S^E_^P^A^G^E_^H^O^M^E ^I^N^O^U^T = (SUB)
  3428. ^I^N^S^E^R^T_^C^H^A^R ^I^N^O^U^T = (ESC 'Q')
  3429. ^I^N^S^E^R^T_^L^I^N^E_^B^O^L ^I^N^O^U^T = (ESC 'E')
  3430. ^I^N^S^E^R^T_^M^O^D^E_^B^E^G^I^N ^I^N^O^U^T = (ESC '^Q')
  3431. ^I^N^S^E^R^T_^M^O^D^E_^E^N^D ^I^N^O^U^T = (ESC '^R')
  3432. ^T^A^B_^B^A^C^K^W^A^R^D ^I^N^O^U^T = (ESC 'I')
  3433. ^T^A^B_^C^L^E^A^R_^A^L^L ^I^N^O^U^T = (ESC '3')
  3434. ^T^A^B_^S^E^T ^I^N^O^U^T = (ESC '1')
  3435. ^T^A^B_^F^O^R^W^A^R^D ^I^N^O^U^T = (HT)
  3436.  
  3437. " VIDEO ATTRIBUTES AND SEQUENCES "
  3438. ^B^E^L^L_^N^A^K ^O^U^T = (BEL)
  3439. ^O^U^T^P^U^T_^B^E^G^I^N ^O^U^T = (PROTECT_MODE_OFF LOCK_KEYBOARD)
  3440. ^O^U^T^P^U^T_^E^N^D ^O^U^T = (STOP_PROTECT UNLOCK_KEYBOARD)
  3441. ^D^I^S^P^L^A^Y_^B^E^G^I^N ^O^U^T = (PROTECT_MODE_OFF START_PROTECT)
  3442. ^D^I^S^P^L^A^Y_^E^N^D ^O^U^T = (PROTECT_MODE_ON)
  3443. ^O^U^T^P^U^T_^T^E^X^T_^B^E^G^I^N ^O^U^T = (START_PROTECT)
  3444. ^O^U^T^P^U^T_^T^E^X^T_^E^N^D ^O^U^T = ()
  3445. ^T^I^T^L^E_^B^E^G^I^N ^O^U^T = ()
  3446. ^T^I^T^L^E_^E^N^D ^O^U^T = ()
  3447. ^M^E^S^S^A^G^E_^B^E^G^I^N ^O^U^T = ()
  3448. ^M^E^S^S^A^G^E_^E^N^D ^O^U^T = ()
  3449. ^I^T^A^L^I^C_^B^E^G^I^N ^O^U^T = ()
  3450. ^I^T^A^L^I^C_^E^N^D ^O^U^T = ()
  3451. ^I^N^P^U^T_^T^E^X^T_^B^E^G^I^N ^O^U^T = (START_UNDERLINE)
  3452. ^I^N^P^U^T_^T^E^X^T_^E^N^D ^O^U^T = (NORMAL)
  3453. ^P^R^O^T^E^C^T_^A^L^L ^O^U^T = (HOME START_PROTECT ESC 'Y')
  3454. ^A^L^T_^B^E^G^I^N ^O^U^T = ()
  3455. ^A^L^T_^E^N^D ^O^U^T = ()
  3456. ^B^L^I^N^K_^B^E^G^I^N ^O^U^T = (START_BLINK)
  3457. ^B^L^I^N^K_^E^N^D ^O^U^T = (NORMAL)
  3458. ^H^I^D^D^E^N_^B^E^G^I^N ^O^U^T = (START_INVISIBLE)
  3459. ^H^I^D^D^E^N_^E^N^D ^O^U^T = (NORMAL)
  3460. ^I^N^V^E^R^S^E_^B^E^G^I^N ^O^U^T = (START_INVERSE)
  3461. ^I^N^V^E^R^S^E_^E^N^D ^O^U^T = (NORMAL)
  3462. ^P^R^O^T^E^C^T_^B^E^G^I^N ^O^U^T = (START_PROTECT)
  3463. ^P^R^O^T^E^C^T_^E^N^D ^O^U^T = (STOP_PROTECT)
  3464. ^U^N^D^E^R^L^I^N^E_^B^E^G^I^N ^O^U^T = (START_UNDERLINE)
  3465. ^U^N^D^E^R^L^I^N^E_^E^N^D ^O^U^T = (NORMAL)
  3466. ^E^R^R^O^R_^B^E^G^I^N ^O^U^T = (START_INVERSE)
  3467. ^E^R^R^O^R_^E^N^D ^O^U^T = (NORMAL)
  3468.  
  3469. " PROGRAMMABLE FUNCTION KEY INPUT INFORMATION "
  3470. ^F1 ^I^N = (SOH '@A')
  3471. ^F2 ^I^N = (SOH 'A')
  3472. ^F3 ^I^N = (SOH 'B')
  3473. ^F4 ^I^N = (SOH 'C')
  3474. ^F5 ^I^N = (SOH 'D')
  3475. ^F6 ^I^N = (SOH 'E')
  3476. ^F7 ^I^N = (SOH 'F')
  3477. ^F8 ^I^N = (SOH 'G')
  3478. ^F9 ^I^N = (SOH 'H')
  3479. ^F10 ^I^N = (SOH 'I')
  3480. ^F11 ^I^N = (SOH 'J')
  3481. ^F12 ^I^N = (SOH 'K')
  3482. ^F13 ^I^N = (SOH 'L')
  3483. ^F14 ^I^N = (SOH 'M')
  3484. ^F15 ^I^N = (SOH 'N')
  3485. ^F16 ^I^N = (SOH 'O')
  3486. ^F1_^S ^I^N = (SOH '@G')
  3487. ^F2_^S ^I^N = (SOH '^A')
  3488. ^F3_^S ^I^N = (SOH '^B')
  3489. ^F4_^S ^I^N = (SOH '^C')
  3490. ^F5_^S ^I^N = (SOH '^D')
  3491. ^F6_^S ^I^N = (SOH '^E')
  3492. ^F7_^S ^I^N = (SOH '^F')
  3493. ^F8_^S ^I^N = (SOH '^G')
  3494. ^F9_^S ^I^N = (SOH '^H')
  3495. ^F10_^S ^I^N = (SOH '^I')
  3496. ^F11_^S ^I^N = (SOH '^J')
  3497. ^F12_^S ^I^N = (SOH '^K')
  3498. ^F13_^S ^I^N = (SOH '^L')
  3499. ^F14_^S ^I^N = (SOH '^M')
  3500. ^F15_^S ^I^N = (SOH '^N')
  3501. ^F16_^S ^I^N = (SOH '^O')
  3502.  
  3503. " LINE DRAWING CHARACTER SPECIFICATION "
  3504. ^L^D_^F^I^N^E_^B^E^G^I^N ^O^U^T = (ESC '$')
  3505. ^L^D_^F^I^N^E_^E^N^D ^O^U^T = (ESC '%')
  3506. ^L^D_^F^I^N^E_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = ('K')
  3507. ^L^D_^F^I^N^E_^V^E^R^T^I^C^A^L ^O^U^T = ('J')
  3508. ^L^D_^F^I^N^E_^U^P^P^E^R_^L^E^F^T ^O^U^T = ('F')
  3509. ^L^D_^F^I^N^E_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = ('G')
  3510. ^L^D_^F^I^N^E_^L^O^W^E^R_^L^E^F^T ^O^U^T = ('E')
  3511. ^L^D_^F^I^N^E_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = ('H')
  3512. ^L^D_^F^I^N^E_^U^P_^T ^O^U^T = ('N')
  3513. ^L^D_^F^I^N^E_^D^O^W^N_^T ^O^U^T = ('O')
  3514. ^L^D_^F^I^N^E_^L^E^F^T_^T ^O^U^T = ('M')
  3515. ^L^D_^F^I^N^E_^R^I^G^H^T_^T ^O^U^T = ('L')
  3516. ^L^D_^F^I^N^E_^C^R^O^S^S ^O^U^T = ('I')
  3517. ^L^D_^M^E^D^I^U^M_^B^E^G^I^N ^O^U^T = (ESC '$')
  3518. ^L^D_^M^E^D^I^U^M_^E^N^D ^O^U^T = (ESC '%')
  3519. ^L^D_^M^E^D^I^U^M_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = ('K')
  3520. ^L^D_^M^E^D^I^U^M_^V^E^R^T^I^C^A^L ^O^U^T = ('J')
  3521. ^L^D_^M^E^D^I^U^M_^U^P^P^E^R_^L^E^F^T ^O^U^T = ('F')
  3522. ^L^D_^M^E^D^I^U^M_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = ('G')
  3523. ^L^D_^M^E^D^I^U^M_^L^O^W^E^R_^L^E^F^T ^O^U^T = ('E')
  3524. ^L^D_^M^E^D^I^U^M_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = ('H')
  3525. ^L^D_^M^E^D^I^U^M_^U^P_^T ^O^U^T = ('N')
  3526. ^L^D_^M^E^D^I^U^M_^D^O^W^N_^T ^O^U^T = ('O')
  3527. ^L^D_^M^E^D^I^U^M_^L^E^F^T_^T ^O^U^T = ('M')
  3528. ^L^D_^M^E^D^I^U^M_^R^I^G^H^T_^T ^O^U^T = ('L')
  3529. ^L^D_^M^E^D^I^U^M_^C^R^O^S^S ^O^U^T = ('I')
  3530. ^L^D_^B^O^L^D_^B^E^G^I^N ^O^U^T = (ESC '$')
  3531. ^L^D_^B^O^L^D_^E^N^D ^O^U^T = (ESC '%')
  3532. ^L^D_^B^O^L^D_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = ('K')
  3533. ^L^D_^B^O^L^D_^V^E^R^T^I^C^A^L ^O^U^T = ('J')
  3534. ^L^D_^B^O^L^D_^U^P^P^E^R_^L^E^F^T ^O^U^T = ('F')
  3535. ^L^D_^B^O^L^D_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = ('G')
  3536. ^L^D_^B^O^L^D_^L^O^W^E^R_^L^E^F^T ^O^U^T = ('E')
  3537. ^L^D_^B^O^L^D_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = ('H')
  3538. ^L^D_^B^O^L^D_^U^P_^T ^O^U^T = ('N')
  3539. ^L^D_^B^O^L^D_^D^O^W^N_^T ^O^U^T = ('O')
  3540. ^L^D_^B^O^L^D_^L^E^F^T_^T ^O^U^T = ('M')
  3541. ^L^D_^B^O^L^D_^R^I^G^H^T_^T ^O^U^T = ('L')
  3542. ^L^D_^B^O^L^D_^C^R^O^S^S ^O^U^T = ('I')
  3543.  
  3544. " DEFAULT KEY DEFINITIONS FOR THE FULL SCREEN EDITOR "
  3545. ^K1 = ('SK1/VNS/L/ FWD/;SKS1/V^L/L/ LAST/')
  3546. ^K2 = ('SK2/VPS/L/ BKW/;SKS2/P1/L/ FIRST/')
  3547. ^K3 = ('SK3/VN/L/LINEUP/;SKS3/E/L/ EDIT/')
  3548. ^K4 = ('SK4/VP/L/LINEDN/;SKS4/H/L/ HELP/')
  3549. ^K5 = ('SK5/U/L/ UNDO/;SKS5/UM/L/UNMARK/')
  3550. ^K6 = ('SK6/Q/L/ QUIT/')
  3551. ^K7 = ('SK7/CMTP/L/ COPY/;SKS7/MMTP/L/ MOVE/')
  3552. ^K8 = ('SK8/SM/L/ MARK/;SKS8/SMW/L/MRKCHR/')
  3553. ^K9 = ('SK9/L"&?"/L/LOCATE/;SKS9/LA/L/LOCALL/')
  3554. ^K10 = ('SK10/.C/L/CENTER/;SKS10/.F/L/ PARA/')
  3555. ^K11 = ('SK11/.S/L/ BREAK/;SKS11/.J/L/ JOIN/')
  3556. ^K12 = ('SK12/V/L/MIDDLE/;SKS12/.E/L/SKPEOL/')
  3557.  
  3558. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  3559. ^N^A^M^E = ('FSEKEYS')...
  3560. ^O^U^T = (^K1 ';' ^K2 ';' ^K3 ';' ^K4 ';' ^K5 ';' ^K6)
  3561. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  3562. ^N^A^M^E = ('FSEKEYS')...
  3563. ^O^U^T = (^K7 ';' ^K8 ';' ^K9 ';' ^K10 ';' ^K11)
  3564.  
  3565. " END OF TERMINAL DEFINITION FILE FOR TELEVIDEO 955T TERMINAL "
  3566. *WEOR
  3567. TDUSUN *** REMOVE THIS LINE WHEN USING AS INPUT TO *TDU*. ***
  3568. *WEOR
  3569. TDUSUNT *** REMOVE THIS LINE WHEN USING AS INPUT TO *TDU*. ***
  3570. *WEOR
  3571. TDU910I *** REMOVE THIS LINE WHEN USING AS INPUT TO *TDU*. ***
  3572.  
  3573. " TERMINAL DEFINITION FILE FOR CDC 910 WORKSTATION (IRIS) "
  3574.  
  3575. " N^O^T^E: T^H^E ^P^R^O^T^O^C^O^L ^I^S ^E^S^S^E^N^T^I^A^L^L^Y ^E^Q^U^I^V^A^L^E^N^T ^T^O DEC VT-52 "
  3576.  
  3577. " VARIABLES "
  3578.  
  3579. ^A^L^T^E^R^N^A^T^E_^K^E^Y^P^A^D = (^E^S^C '=')
  3580. ^N^O^R^M^A^L_^K^E^Y^P^A^D = (^E^S^C '>')
  3581. ^A^L^T^E^R^N^A^T^E_^C^O^L^O^R = (^E^S^C '9P') " E^X^T^E^N^S^I^O^N ^B^E^Y^O^N^D VT52 "
  3582. ^N^O^R^M^A^L_^C^O^L^O^R = (^E^S^C '0@A') " E^X^T^E^N^S^I^O^N ^B^E^Y^O^N^D VT52 "
  3583.  
  3584. ^K^E^Y^P^A^D_0 = (^E^S^C '?^P')
  3585. ^K^E^Y^P^A^D_1 = (^E^S^C '?^Q')
  3586. ^K^E^Y^P^A^D_2 = (^E^S^C '?^R')
  3587. ^K^E^Y^P^A^D_3 = (^E^S^C '?^S')
  3588. ^K^E^Y^P^A^D_4 = (^E^S^C '?^T')
  3589. ^K^E^Y^P^A^D_5 = (^E^S^C '?^U')
  3590. ^K^E^Y^P^A^D_6 = (^E^S^C '?^V')
  3591. ^K^E^Y^P^A^D_7 = (^E^S^C '?^W')
  3592. ^K^E^Y^P^A^D_8 = (^E^S^C '?^X')
  3593. ^K^E^Y^P^A^D_9 = (^E^S^C '?^Y')
  3594. ^K^E^Y^P^A^D_^M^I^N^U^S = (^E^S^C '?^M')
  3595. ^K^E^Y^P^A^D_^C^O^M^M^A = (^E^S^C '?^L')
  3596. ^K^E^Y^P^A^D_^P^E^R^I^O^D = (^E^S^C '?^N')
  3597. ^K^E^Y^P^A^D_^E^N^T^E^R = (^E^S^C '?M')
  3598. ^K^E^Y^P^A^D_^P^F1 = (^E^S^C 'P')
  3599. ^K^E^Y^P^A^D_^P^F2 = (^E^S^C 'Q')
  3600. ^K^E^Y^P^A^D_^P^F3 = (^E^S^C 'R')
  3601. ^K^E^Y^P^A^D_^P^F4 = (^E^S^C 'S')
  3602.  
  3603. ^G^O^L^D = ^K^E^Y^P^A^D_0
  3604.  
  3605. " VARIABLES FOR FULL SCREEN EDITOR FUNCTION KEY DEFINITIONS "
  3606. ^K1 = ('SK1/VNS/L/ FWD/;SKS1/VPS/L/ BKW/')
  3607. ^K2 = ('SK2/VN/L/LINEUP/;SKS2/VP/L/LINEDN/')
  3608. ^K3 = ('SK3/.I/L/ INSC/;SKS3/.D/L/ DELC/')
  3609. ^K4 = ('SK4/IBP1/L/ INSL/;SKS4/D;PN/L/ DELL/')
  3610. ^K5 = ('SK5/SM/L/ MARK/;SKS5/U/L/ UNDO/')
  3611. ^K6 = ('SK6/MMTP/L/ MOVE/;SKS6/CMTP/L/ COPY/')
  3612. ^K7 = ('SK7/H/L/ HELP/;SKS7/VH/L/ HOME/')
  3613. ^K8 = ('SK8/Q/L/ QUIT/;SKS8/SS/L/CLEAR/')
  3614. ^K9 = ('SK9/.E/L/ENDLIN/;SKS9/UM/L/UNMARK/')
  3615.  
  3616. " MODEL NAME AND COMMUNICATION TYPE "
  3617. ^M^O^D^E^L_^N^A^M^E ^V^A^L^U^E = 'CDC910'
  3618. ^C^O^M^M^U^N^I^C^A^T^I^O^N^S ^T^Y^P^E = ^A^S^Y^N^C^H
  3619.  
  3620. " END OF INFORMATION SPECIFICATION "
  3621. ^E^N^D_^O^F_^I^N^F^O^R^M^A^T^I^O^N ^I^N = (0)
  3622.  
  3623. " CURSOR POSITIONING INFORMATION "
  3624. ^C^U^R^S^O^R_^P^O^S_^E^N^C^O^D^I^N^G ^B^I^A^S = (32) ^T^Y^P^E = ^B^I^N^A^R^Y_^C^U^R^S^O^R
  3625. ^C^U^R^S^O^R_^P^O^S_^C^O^L^U^M^N_^F^I^R^S^T ^V^A^L^U^E = FALSE
  3626. ^C^U^R^S^O^R_^P^O^S_^C^O^L^U^M^N_^L^E^N^G^T^H ^V^A^L^U^E = (0)
  3627. ^C^U^R^S^O^R_^P^O^S_^R^O^W_^L^E^N^G^T^H ^V^A^L^U^E = (0)
  3628. ^C^U^R^S^O^R_^P^O^S_^B^E^G^I^N ^O^U^T = (^E^S^C 'Y')
  3629. ^C^U^R^S^O^R_^P^O^S_^S^E^C^O^N^D ^O^U^T = ()
  3630. ^C^U^R^S^O^R_^P^O^S_^T^H^I^R^D ^O^U^T = ()
  3631.  
  3632. " CURSOR MOVEMENT INFORMATION "
  3633. ^C^U^R^S^O^R_^H^O^M^E ^I^N^O^U^T = (^E^S^C 48(16))
  3634. ^C^U^R^S^O^R_^U^P ^I^N^O^U^T = (^E^S^C 41(16))
  3635. ^C^U^R^S^O^R_^D^O^W^N ^I^N^O^U^T = (^E^S^C 42(16))
  3636. ^C^U^R^S^O^R_^L^E^F^T ^I^N^O^U^T = (^E^S^C 44(16))
  3637. ^C^U^R^S^O^R_^R^I^G^H^T ^I^N^O^U^T = (^E^S^C 43(16))
  3638.  
  3639. " CURSOR BEHAVIOR (^F^O^R ^C^U^R^S^O^R ^M^O^V^E^M^E^N^T ^K^E^Y^S) "
  3640. ^M^O^V^E_^P^A^S^T_^R^I^G^H^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  3641. ^M^O^V^E_^P^A^S^T_^L^E^F^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  3642. ^M^O^V^E_^P^A^S^T_^T^O^P ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  3643. ^M^O^V^E_^P^A^S^T_^B^O^T^T^O^M ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  3644.  
  3645. " CURSOR BEHAVIOR (^F^O^R ^C^H^A^R^A^C^T^E^R ^K^E^Y^S) "
  3646. ^C^H^A^R_^P^A^S^T_^R^I^G^H^T ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  3647. ^C^H^A^R_^P^A^S^T_^L^E^F^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  3648. ^C^H^A^R_^P^A^S^T_^L^A^S^T_^P^O^S^I^T^I^O^N ^T^Y^P^E = ^S^C^R^O^L^L_^N^E^X^T
  3649.  
  3650. " TERMINAL ATTRIBUTES "
  3651. ^C^L^E^A^R^S_^W^H^E^N_^C^H^A^N^G^E_^S^I^Z^E ^V^A^L^U^E = TRUE
  3652. ^F^U^N^C^T^I^O^N_^K^E^Y_^L^E^A^V^E^S_^M^A^R^K ^V^A^L^U^E = TRUE
  3653. ^H^A^S_^H^I^D^D^E^N ^V^A^L^U^E = FALSE
  3654. ^H^A^S_^P^R^O^T^E^C^T ^V^A^L^U^E = FALSE
  3655. ^H^O^M^E_^A^T_^T^O^P ^V^A^L^U^E = TRUE
  3656. ^M^U^L^T^I^P^L^E_^S^I^Z^E^S ^V^A^L^U^E = FALSE
  3657. ^T^A^B^S_^T^O_^H^O^M^E ^V^A^L^U^E = FALSE
  3658. ^T^A^B^S_^T^O_^T^A^B_^S^T^O^P^S ^V^A^L^U^E = TRUE
  3659. ^T^A^B^S_^T^O_^U^N^P^R^O^T^E^C^T^E^D ^V^A^L^U^E = FALSE
  3660. ^T^Y^P^E_^A^H^E^A^D ^V^A^L^U^E = FALSE
  3661.  
  3662. " SCREEN SIZES "
  3663. ^S^E^T_^S^I^Z^E ^R^O^W^S = 40 ^C^O^L^U^M^N^S = 80 ^O^U^T = ()
  3664.  
  3665. ^S^E^T_^S^C^R^E^E^N_^M^O^D^E ^O^U^T=(^A^L^T^E^R^N^A^T^E_^K^E^Y^P^A^D)
  3666.  
  3667. ^S^E^T_^L^I^N^E_^M^O^D^E ^O^U^T=(^N^O^R^M^A^L_^K^E^Y^P^A^D)
  3668.  
  3669. " TERMINAL CAPABILITIES "
  3670. ^D^E^L^E^T^E_^C^H^A^R ^I^N = (^E^S^C 'N')
  3671. ^D^E^L^E^T^E_^L^I^N^E_^B^O^L ^I^N = (^E^S^C 'M')
  3672. ^E^R^A^S^E_^E^N^D_^O^F_^L^I^N^E ^I^N^O^U^T = (^E^S^C 'K')
  3673. ^E^R^A^S^E_^L^I^N^E_^S^T^A^Y ^I^N^O^U^T = (^E^S^C 'I')
  3674. ^E^R^A^S^E_^P^A^G^E_^H^O^M^E ^I^N^O^U^T = (^E^S^C '^V')
  3675. ^I^N^S^E^R^T_^L^I^N^E_^B^O^L ^I^N = (^E^S^C 'L')
  3676. ^I^N^S^E^R^T_^M^O^D^E_^B^E^G^I^N ^I^N = (^E^S^C '@A')
  3677. ^I^N^S^E^R^T_^M^O^D^E_^E^N^D ^I^N = (^E^S^C 'O')
  3678. ^T^A^B_^F^O^R^W^A^R^D ^I^N^O^U^T = (09(16))
  3679. ^T^A^B_^C^L^E^A^R_^A^L^L ^I^N^O^U^T = ()
  3680. ^T^A^B_^S^E^T ^I^N^O^U^T = ()
  3681.  
  3682. " MISCELLANEOUS TERMINAL SEQUENCES "
  3683. ^B^E^L^L_^N^A^K ^O^U^T = (^B^E^L)
  3684. ^B^A^C^K^S^P^A^C^E ^I^N = ^B^S
  3685.  
  3686. " PROGRAMMABLE FUNCTION KEY INPUT INFORMATION "
  3687. ^F1 ^I^N = (^K^E^Y^P^A^D_1) "^L^A^B^E^L='^K1'"
  3688. ^F2 ^I^N = (^K^E^Y^P^A^D_2) "^L^A^B^E^L='^K2'"
  3689. ^F3 ^I^N = (^K^E^Y^P^A^D_3) "^L^A^B^E^L='^K3'"
  3690. ^F4 ^I^N = (^K^E^Y^P^A^D_4) "^L^A^B^E^L='^K4'"
  3691. ^F5 ^I^N = (^K^E^Y^P^A^D_5) "^L^A^B^E^L='^K5'"
  3692. ^F6 ^I^N = (^K^E^Y^P^A^D_6) "^L^A^B^E^L='^K6'"
  3693. ^F7 ^I^N = (^K^E^Y^P^A^D_7) "^L^A^B^E^L='^K7'"
  3694. ^F8 ^I^N = (^K^E^Y^P^A^D_8) "^L^A^B^E^L='^K8'"
  3695. ^F9 ^I^N = (^K^E^Y^P^A^D_9) "^L^A^B^E^L='^K9'"
  3696. ^F10 ^I^N = (^K^E^Y^P^A^D_^P^F1) "^L^A^B^E^L='^P1'"
  3697. ^F11 ^I^N = (^K^E^Y^P^A^D_^P^F2) "^L^A^B^E^L='^P2'"
  3698. ^F12 ^I^N = (^K^E^Y^P^A^D_^P^F3) "^L^A^B^E^L='^P3'"
  3699. ^F13 ^I^N = (^K^E^Y^P^A^D_^P^F4) "^L^A^B^E^L='^P4'"
  3700. ^F14 ^I^N = (^K^E^Y^P^A^D_^M^I^N^U^S) "^L^A^B^E^L='^K-'"
  3701. ^F15 ^I^N = (^K^E^Y^P^A^D_^C^O^M^M^A) "^L^A^B^E^L='^K,'"
  3702. ^F16 ^I^N = (^K^E^Y^P^A^D_^E^N^T^E^R) "^L^A^B^E^L='^K^E'"
  3703. ^F1_^S ^I^N = (^G^O^L^D ^K^E^Y^P^A^D_1) "^L^A^B^E^L='01'"
  3704. ^F2_^S ^I^N = (^G^O^L^D ^K^E^Y^P^A^D_2) "^L^A^B^E^L='02'"
  3705. ^F3_^S ^I^N = (^G^O^L^D ^K^E^Y^P^A^D_3) "^L^A^B^E^L='03'"
  3706. ^F4_^S ^I^N = (^G^O^L^D ^K^E^Y^P^A^D_4) "^L^A^B^E^L='04'"
  3707. ^F5_^S ^I^N = (^G^O^L^D ^K^E^Y^P^A^D_5) "^L^A^B^E^L='05'"
  3708. ^F6_^S ^I^N = (^G^O^L^D ^K^E^Y^P^A^D_6) "^L^A^B^E^L='06'"
  3709. ^F7_^S ^I^N = (^G^O^L^D ^K^E^Y^P^A^D_7) "^L^A^B^E^L='07'"
  3710. ^F8_^S ^I^N = (^G^O^L^D ^K^E^Y^P^A^D_8) "^L^A^B^E^L='08'"
  3711. ^F9_^S ^I^N = (^G^O^L^D ^K^E^Y^P^A^D_9) "^L^A^B^E^L='09'"
  3712. ^F10_^S ^I^N = (^G^O^L^D ^K^E^Y^P^A^D_^P^F1) "^L^A^B^E^L='^P1'"
  3713. ^F11_^S ^I^N = (^G^O^L^D ^K^E^Y^P^A^D_^P^F2) "^L^A^B^E^L='^P2'"
  3714. ^F12_^S ^I^N = (^G^O^L^D ^K^E^Y^P^A^D_^P^F3) "^L^A^B^E^L='^P3'"
  3715. ^F13_^S ^I^N = (^G^O^L^D ^K^E^Y^P^A^D_^P^F4) "^L^A^B^E^L='^P4'"
  3716. ^F14_^S ^I^N = (^G^O^L^D ^K^E^Y^P^A^D_^M^I^N^U^S) "^L^A^B^E^L='0-'"
  3717. ^F15_^S ^I^N = (^G^O^L^D ^K^E^Y^P^A^D_^C^O^M^M^A) "^L^A^B^E^L='0,'"
  3718. ^F16_^S ^I^N = (^G^O^L^D ^K^E^Y^P^A^D_^E^N^T^E^R) "^L^A^B^E^L='0^E'"
  3719.  
  3720. " CDC STANDARD FUNCTION KEY INPUT INFORMATION "
  3721. ^N^E^X^T ^I^N = 13
  3722. ^N^E^X^T_^S ^I^N = ()
  3723. ^B^K^W ^I^N = ()
  3724. ^F^W^D ^I^N = ()
  3725. ^B^A^C^K ^I^N = ()
  3726. ^H^E^L^P ^I^N = ()
  3727. ^S^T^O^P ^I^N = ()
  3728. ^B^K^W_^S ^I^N = ()
  3729. ^F^W^D_^S ^I^N = ()
  3730. ^S^T^O^P_^S ^I^N = ()
  3731. ^D^O^W^N ^I^N = ()
  3732. ^D^O^W^N_^S ^I^N = ()
  3733. ^U^P ^I^N = ()
  3734. ^U^P_^S ^I^N = ()
  3735. ^E^D^I^T ^I^N = ()
  3736. ^E^D^I^T_^S ^I^N = ()
  3737. ^D^A^T^A ^I^N = ()
  3738. ^D^A^T^A_^S ^I^N = ()
  3739.  
  3740. " TERMINAL VIDEO ATTRIBUTES "
  3741. ^A^L^T_^B^E^G^I^N ^O^U^T = ()
  3742. ^A^L^T_^E^N^D ^O^U^T = ()
  3743. ^B^L^I^N^K_^B^E^G^I^N ^O^U^T = ()
  3744. ^B^L^I^N^K_^E^N^D ^O^U^T = ()
  3745. ^I^N^V^E^R^S^E_^B^E^G^I^N ^O^U^T = (^A^L^T^E^R^N^A^T^E_^C^O^L^O^R)
  3746. ^I^N^V^E^R^S^E_^E^N^D ^O^U^T = (^N^O^R^M^A^L_^C^O^L^O^R)
  3747. ^U^N^D^E^R^L^I^N^E_^B^E^G^I^N ^O^U^T = (^A^L^T^E^R^N^A^T^E_^C^O^L^O^R)
  3748. ^U^N^D^E^R^L^I^N^E_^E^N^D ^O^U^T = (^N^O^R^M^A^L_^C^O^L^O^R)
  3749.  
  3750. " LOGICAL ATTRIBUTE SPECIFICATIONS "
  3751. ^E^R^R^O^R_^B^E^G^I^N ^O^U^T = ()
  3752. ^E^R^R^O^R_^E^N^D ^O^U^T = ()
  3753. ^I^N^P^U^T_^T^E^X^T_^B^E^G^I^N ^O^U^T = ()
  3754. ^I^N^P^U^T_^T^E^X^T_^E^N^D ^O^U^T = ()
  3755. ^I^T^A^L^I^C_^B^E^G^I^N ^O^U^T = (^A^L^T^E^R^N^A^T^E_^C^O^L^O^R)
  3756. ^I^T^A^L^I^C_^E^N^D ^O^U^T = (^N^O^R^M^A^L_^C^O^L^O^R)
  3757.  
  3758. " LINE DRAWING CHARACTER SPECIFICATION "
  3759. ^L^D_^F^I^N^E_^B^E^G^I^N ^O^U^T = ()
  3760. ^L^D_^F^I^N^E_^E^N^D ^O^U^T = ()
  3761. ^L^D_^F^I^N^E_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = '-'
  3762. ^L^D_^F^I^N^E_^V^E^R^T^I^C^A^L ^O^U^T = '!'
  3763. ^L^D_^F^I^N^E_^U^P^P^E^R_^L^E^F^T ^O^U^T = '*'
  3764. ^L^D_^F^I^N^E_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = '*'
  3765. ^L^D_^F^I^N^E_^L^O^W^E^R_^L^E^F^T ^O^U^T = '*'
  3766. ^L^D_^F^I^N^E_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = '*'
  3767. ^L^D_^F^I^N^E_^U^P_^T ^O^U^T = '*'
  3768. ^L^D_^F^I^N^E_^D^O^W^N_^T ^O^U^T = '*'
  3769. ^L^D_^F^I^N^E_^L^E^F^T_^T ^O^U^T = '*'
  3770. ^L^D_^F^I^N^E_^R^I^G^H^T_^T ^O^U^T = '*'
  3771. ^L^D_^F^I^N^E_^C^R^O^S^S ^O^U^T = '*'
  3772. ^L^D_^M^E^D^I^U^M_^B^E^G^I^N ^O^U^T = ()
  3773. ^L^D_^M^E^D^I^U^M_^E^N^D ^O^U^T = ()
  3774. ^L^D_^M^E^D^I^U^M_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = '-'
  3775. ^L^D_^M^E^D^I^U^M_^V^E^R^T^I^C^A^L ^O^U^T = '!'
  3776. ^L^D_^M^E^D^I^U^M_^U^P^P^E^R_^L^E^F^T ^O^U^T = '*'
  3777. ^L^D_^M^E^D^I^U^M_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = '*'
  3778. ^L^D_^M^E^D^I^U^M_^L^O^W^E^R_^L^E^F^T ^O^U^T = '*'
  3779. ^L^D_^M^E^D^I^U^M_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = '*'
  3780. ^L^D_^M^E^D^I^U^M_^U^P_^T ^O^U^T = '*'
  3781. ^L^D_^M^E^D^I^U^M_^D^O^W^N_^T ^O^U^T = '*'
  3782. ^L^D_^M^E^D^I^U^M_^L^E^F^T_^T ^O^U^T = '*'
  3783. ^L^D_^M^E^D^I^U^M_^R^I^G^H^T_^T ^O^U^T = '*'
  3784. ^L^D_^M^E^D^I^U^M_^C^R^O^S^S ^O^U^T = '*'
  3785. ^L^D_^B^O^L^D_^B^E^G^I^N ^O^U^T = ()
  3786. ^L^D_^B^O^L^D_^E^N^D ^O^U^T = ()
  3787. ^L^D_^B^O^L^D_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = '-'
  3788. ^L^D_^B^O^L^D_^V^E^R^T^I^C^A^L ^O^U^T = '!'
  3789. ^L^D_^B^O^L^D_^U^P^P^E^R_^L^E^F^T ^O^U^T = '*'
  3790. ^L^D_^B^O^L^D_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = '*'
  3791. ^L^D_^B^O^L^D_^L^O^W^E^R_^L^E^F^T ^O^U^T = '*'
  3792. ^L^D_^B^O^L^D_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = '*'
  3793. ^L^D_^B^O^L^D_^U^P_^T ^O^U^T = '*'
  3794. ^L^D_^B^O^L^D_^D^O^W^N_^T ^O^U^T = '*'
  3795. ^L^D_^B^O^L^D_^L^E^F^T_^T ^O^U^T = '*'
  3796. ^L^D_^B^O^L^D_^R^I^G^H^T_^T ^O^U^T = '*'
  3797. ^L^D_^B^O^L^D_^C^R^O^S^S ^O^U^T = '*'
  3798.  
  3799. " DEFAULT KEY DEFINITIONS FOR THE FULL SCREEN EDITOR "
  3800.  
  3801. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  3802. ^N^A^M^E = ('FSEKEYS')...
  3803. ^O^U^T = (^K1 ';' ^K2 ';' ^K3 ';' ^K4 ';' ^K5)
  3804. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  3805. ^N^A^M^E = ('FSEKEYS')...
  3806. ^O^U^T = (^K6 ';' ^K7 ';' ^K8 ';' ^K9)
  3807.  
  3808. " END OF TERMINAL DEFINITION FILE FOR CDC 910 WORKSTATION "
  3809. *WEOR
  3810. TDU91IT *** REMOVE THIS LINE WHEN USING AS INPUT TO *TDU*. ***
  3811.  
  3812. " TERMINAL DEFINITION FILE FOR CDC 910 WORKSTATION (IRIS) USING TYPE AHEAD "
  3813.  
  3814. " N^O^T^E: T^H^E ^P^R^O^T^O^C^O^L ^I^S ^E^S^S^E^N^T^I^A^L^L^Y ^E^Q^U^I^V^A^L^E^N^T ^T^O DEC VT-52 "
  3815.  
  3816. " VARIABLES "
  3817.  
  3818. ^A^L^T^E^R^N^A^T^E_^K^E^Y^P^A^D = (^E^S^C '=')
  3819. ^N^O^R^M^A^L_^K^E^Y^P^A^D = (^E^S^C '>')
  3820. ^A^L^T^E^R^N^A^T^E_^C^O^L^O^R = (^E^S^C '9P') " E^X^T^E^N^S^I^O^N ^B^E^Y^O^N^D VT52 "
  3821. ^N^O^R^M^A^L_^C^O^L^O^R = (^E^S^C '0@A') " E^X^T^E^N^S^I^O^N ^B^E^Y^O^N^D VT52 "
  3822.  
  3823. ^K^E^Y^P^A^D_0 = (^E^S^C '?^P')
  3824. ^K^E^Y^P^A^D_1 = (^E^S^C '?^Q')
  3825. ^K^E^Y^P^A^D_2 = (^E^S^C '?^R')
  3826. ^K^E^Y^P^A^D_3 = (^E^S^C '?^S')
  3827. ^K^E^Y^P^A^D_4 = (^E^S^C '?^T')
  3828. ^K^E^Y^P^A^D_5 = (^E^S^C '?^U')
  3829. ^K^E^Y^P^A^D_6 = (^E^S^C '?^V')
  3830. ^K^E^Y^P^A^D_7 = (^E^S^C '?^W')
  3831. ^K^E^Y^P^A^D_8 = (^E^S^C '?^X')
  3832. ^K^E^Y^P^A^D_9 = (^E^S^C '?^Y')
  3833. ^K^E^Y^P^A^D_^M^I^N^U^S = (^E^S^C '?^M')
  3834. ^K^E^Y^P^A^D_^C^O^M^M^A = (^E^S^C '?^L')
  3835. ^K^E^Y^P^A^D_^P^E^R^I^O^D = (^E^S^C '?^N')
  3836. ^K^E^Y^P^A^D_^E^N^T^E^R = (^E^S^C '?M')
  3837. ^K^E^Y^P^A^D_^P^F1 = (^E^S^C 'P')
  3838. ^K^E^Y^P^A^D_^P^F2 = (^E^S^C 'Q')
  3839. ^K^E^Y^P^A^D_^P^F3 = (^E^S^C 'R')
  3840. ^K^E^Y^P^A^D_^P^F4 = (^E^S^C 'S')
  3841.  
  3842. ^G^O^L^D = ^K^E^Y^P^A^D_0
  3843.  
  3844. " VARIABLES FOR FULL SCREEN EDITOR FUNCTION KEY DEFINITIONS "
  3845. ^K1 = ('SK1/VNS/L/ FWD/;SKS1/VPS/L/ BKW/')
  3846. ^K2 = ('SK2/VN/L/LINEUP/;SKS2/VP/L/LINEDN/')
  3847. ^K3 = ('SK3/.I/L/ INSC/;SKS3/.D/L/ DELC/')
  3848. ^K4 = ('SK4/IBP1/L/ INSL/;SKS4/D;PN/L/ DELL/')
  3849. ^K5 = ('SK5/SM/L/ MARK/;SKS5/U/L/ UNDO/')
  3850. ^K6 = ('SK6/MMTP/L/ MOVE/;SKS6/CMTP/L/ COPY/')
  3851. ^K7 = ('SK7/H/L/ HELP/;SKS7/VH/L/ HOME/')
  3852. ^K8 = ('SK8/Q/L/ QUIT/;SKS8/SS/L/CLEAR/')
  3853. ^K9 = ('SK9/.E/L/ENDLIN/;SKS9/UM/L/UNMARK/')
  3854.  
  3855. " MODEL NAME AND COMMUNICATION TYPE "
  3856. ^M^O^D^E^L_^N^A^M^E ^V^A^L^U^E = 'CD910T'
  3857. ^C^O^M^M^U^N^I^C^A^T^I^O^N^S ^T^Y^P^E = ^A^S^Y^N^C^H
  3858.  
  3859. " END OF INFORMATION SPECIFICATION "
  3860. ^E^N^D_^O^F_^I^N^F^O^R^M^A^T^I^O^N ^I^N = (0)
  3861.  
  3862. " CURSOR POSITIONING INFORMATION "
  3863. ^C^U^R^S^O^R_^P^O^S_^E^N^C^O^D^I^N^G ^B^I^A^S = (32) ^T^Y^P^E = ^B^I^N^A^R^Y_^C^U^R^S^O^R
  3864. ^C^U^R^S^O^R_^P^O^S_^C^O^L^U^M^N_^F^I^R^S^T ^V^A^L^U^E = FALSE
  3865. ^C^U^R^S^O^R_^P^O^S_^C^O^L^U^M^N_^L^E^N^G^T^H ^V^A^L^U^E = (0)
  3866. ^C^U^R^S^O^R_^P^O^S_^R^O^W_^L^E^N^G^T^H ^V^A^L^U^E = (0)
  3867. ^C^U^R^S^O^R_^P^O^S_^B^E^G^I^N ^O^U^T = (^E^S^C 'Y')
  3868. ^C^U^R^S^O^R_^P^O^S_^S^E^C^O^N^D ^O^U^T = ()
  3869. ^C^U^R^S^O^R_^P^O^S_^T^H^I^R^D ^O^U^T = ()
  3870.  
  3871. " CURSOR MOVEMENT INFORMATION "
  3872. ^C^U^R^S^O^R_^H^O^M^E ^I^N^O^U^T = (^E^S^C 48(16))
  3873. ^C^U^R^S^O^R_^U^P ^I^N^O^U^T = (^E^S^C 41(16))
  3874. ^C^U^R^S^O^R_^D^O^W^N ^I^N^O^U^T = (^E^S^C 42(16))
  3875. ^C^U^R^S^O^R_^L^E^F^T ^I^N^O^U^T = (^E^S^C 44(16))
  3876. ^C^U^R^S^O^R_^R^I^G^H^T ^I^N^O^U^T = (^E^S^C 43(16))
  3877.  
  3878. " CURSOR BEHAVIOR (^F^O^R ^C^U^R^S^O^R ^M^O^V^E^M^E^N^T ^K^E^Y^S) "
  3879. ^M^O^V^E_^P^A^S^T_^R^I^G^H^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  3880. ^M^O^V^E_^P^A^S^T_^L^E^F^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  3881. ^M^O^V^E_^P^A^S^T_^T^O^P ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  3882. ^M^O^V^E_^P^A^S^T_^B^O^T^T^O^M ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  3883.  
  3884. " CURSOR BEHAVIOR (^F^O^R ^C^H^A^R^A^C^T^E^R ^K^E^Y^S) "
  3885. ^C^H^A^R_^P^A^S^T_^R^I^G^H^T ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  3886. ^C^H^A^R_^P^A^S^T_^L^E^F^T ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  3887. ^C^H^A^R_^P^A^S^T_^L^A^S^T_^P^O^S^I^T^I^O^N ^T^Y^P^E = ^S^C^R^O^L^L_^N^E^X^T
  3888.  
  3889. " TERMINAL ATTRIBUTES "
  3890. ^C^L^E^A^R^S_^W^H^E^N_^C^H^A^N^G^E_^S^I^Z^E ^V^A^L^U^E = TRUE
  3891. ^F^U^N^C^T^I^O^N_^K^E^Y_^L^E^A^V^E^S_^M^A^R^K ^V^A^L^U^E = TRUE
  3892. ^H^A^S_^H^I^D^D^E^N ^V^A^L^U^E = FALSE
  3893. ^H^A^S_^P^R^O^T^E^C^T ^V^A^L^U^E = FALSE
  3894. ^H^O^M^E_^A^T_^T^O^P ^V^A^L^U^E = TRUE
  3895. ^M^U^L^T^I^P^L^E_^S^I^Z^E^S ^V^A^L^U^E = FALSE
  3896. ^T^A^B^S_^T^O_^H^O^M^E ^V^A^L^U^E = FALSE
  3897. ^T^A^B^S_^T^O_^T^A^B_^S^T^O^P^S ^V^A^L^U^E = TRUE
  3898. ^T^A^B^S_^T^O_^U^N^P^R^O^T^E^C^T^E^D ^V^A^L^U^E = FALSE
  3899. ^T^Y^P^E_^A^H^E^A^D ^V^A^L^U^E = TRUE
  3900.  
  3901. " SCREEN SIZES "
  3902. ^S^E^T_^S^I^Z^E ^R^O^W^S = 40 ^C^O^L^U^M^N^S = 80 ^O^U^T = ()
  3903.  
  3904. ^S^E^T_^S^C^R^E^E^N_^M^O^D^E ^O^U^T=(^A^L^T^E^R^N^A^T^E_^K^E^Y^P^A^D)
  3905.  
  3906. ^S^E^T_^L^I^N^E_^M^O^D^E ^O^U^T=(^N^O^R^M^A^L_^K^E^Y^P^A^D)
  3907.  
  3908. " TERMINAL CAPABILITIES "
  3909. ^D^E^L^E^T^E_^C^H^A^R ^I^N = (^E^S^C 'N')
  3910. ^D^E^L^E^T^E_^L^I^N^E_^B^O^L ^I^N = (^E^S^C 'M')
  3911. ^E^R^A^S^E_^E^N^D_^O^F_^L^I^N^E ^I^N^O^U^T = (^E^S^C 'K')
  3912. ^E^R^A^S^E_^L^I^N^E_^S^T^A^Y ^I^N^O^U^T = (^E^S^C 'I')
  3913. ^E^R^A^S^E_^P^A^G^E_^H^O^M^E ^I^N^O^U^T = (^E^S^C '^V')
  3914. ^I^N^S^E^R^T_^L^I^N^E_^B^O^L ^I^N = (^E^S^C 'L')
  3915. ^I^N^S^E^R^T_^M^O^D^E_^B^E^G^I^N ^I^N = (^E^S^C '@A')
  3916. ^I^N^S^E^R^T_^M^O^D^E_^E^N^D ^I^N = (^E^S^C 'O')
  3917. ^T^A^B_^F^O^R^W^A^R^D ^I^N^O^U^T = (09(16))
  3918. ^T^A^B_^C^L^E^A^R_^A^L^L ^I^N^O^U^T = ()
  3919. ^T^A^B_^S^E^T ^I^N^O^U^T = ()
  3920.  
  3921. " MISCELLANEOUS TERMINAL SEQUENCES "
  3922. ^B^E^L^L_^N^A^K ^O^U^T = (^B^E^L)
  3923. ^B^A^C^K^S^P^A^C^E ^I^N = ^B^S
  3924.  
  3925. " PROGRAMMABLE FUNCTION KEY INPUT INFORMATION "
  3926. ^F1 ^I^N = (^K^E^Y^P^A^D_1) "^L^A^B^E^L='^K1'"
  3927. ^F2 ^I^N = (^K^E^Y^P^A^D_2) "^L^A^B^E^L='^K2'"
  3928. ^F3 ^I^N = (^K^E^Y^P^A^D_3) "^L^A^B^E^L='^K3'"
  3929. ^F4 ^I^N = (^K^E^Y^P^A^D_4) "^L^A^B^E^L='^K4'"
  3930. ^F5 ^I^N = (^K^E^Y^P^A^D_5) "^L^A^B^E^L='^K5'"
  3931. ^F6 ^I^N = (^K^E^Y^P^A^D_6) "^L^A^B^E^L='^K6'"
  3932. ^F7 ^I^N = (^K^E^Y^P^A^D_7) "^L^A^B^E^L='^K7'"
  3933. ^F8 ^I^N = (^K^E^Y^P^A^D_8) "^L^A^B^E^L='^K8'"
  3934. ^F9 ^I^N = (^K^E^Y^P^A^D_9) "^L^A^B^E^L='^K9'"
  3935. ^F10 ^I^N = (^K^E^Y^P^A^D_^P^F1) "^L^A^B^E^L='^P1'"
  3936. ^F11 ^I^N = (^K^E^Y^P^A^D_^P^F2) "^L^A^B^E^L='^P2'"
  3937. ^F12 ^I^N = (^K^E^Y^P^A^D_^P^F3) "^L^A^B^E^L='^P3'"
  3938. ^F13 ^I^N = (^K^E^Y^P^A^D_^P^F4) "^L^A^B^E^L='^P4'"
  3939. ^F14 ^I^N = (^K^E^Y^P^A^D_^M^I^N^U^S) "^L^A^B^E^L='^K-'"
  3940. ^F15 ^I^N = (^K^E^Y^P^A^D_^C^O^M^M^A) "^L^A^B^E^L='^K,'"
  3941. ^F16 ^I^N = (^K^E^Y^P^A^D_^E^N^T^E^R) "^L^A^B^E^L='^K^E'"
  3942. ^F1_^S ^I^N = (^G^O^L^D ^K^E^Y^P^A^D_1) "^L^A^B^E^L='01'"
  3943. ^F2_^S ^I^N = (^G^O^L^D ^K^E^Y^P^A^D_2) "^L^A^B^E^L='02'"
  3944. ^F3_^S ^I^N = (^G^O^L^D ^K^E^Y^P^A^D_3) "^L^A^B^E^L='03'"
  3945. ^F4_^S ^I^N = (^G^O^L^D ^K^E^Y^P^A^D_4) "^L^A^B^E^L='04'"
  3946. ^F5_^S ^I^N = (^G^O^L^D ^K^E^Y^P^A^D_5) "^L^A^B^E^L='05'"
  3947. ^F6_^S ^I^N = (^G^O^L^D ^K^E^Y^P^A^D_6) "^L^A^B^E^L='06'"
  3948. ^F7_^S ^I^N = (^G^O^L^D ^K^E^Y^P^A^D_7) "^L^A^B^E^L='07'"
  3949. ^F8_^S ^I^N = (^G^O^L^D ^K^E^Y^P^A^D_8) "^L^A^B^E^L='08'"
  3950. ^F9_^S ^I^N = (^G^O^L^D ^K^E^Y^P^A^D_9) "^L^A^B^E^L='09'"
  3951. ^F10_^S ^I^N = (^G^O^L^D ^K^E^Y^P^A^D_^P^F1) "^L^A^B^E^L='^P1'"
  3952. ^F11_^S ^I^N = (^G^O^L^D ^K^E^Y^P^A^D_^P^F2) "^L^A^B^E^L='^P2'"
  3953. ^F12_^S ^I^N = (^G^O^L^D ^K^E^Y^P^A^D_^P^F3) "^L^A^B^E^L='^P3'"
  3954. ^F13_^S ^I^N = (^G^O^L^D ^K^E^Y^P^A^D_^P^F4) "^L^A^B^E^L='^P4'"
  3955. ^F14_^S ^I^N = (^G^O^L^D ^K^E^Y^P^A^D_^M^I^N^U^S) "^L^A^B^E^L='0-'"
  3956. ^F15_^S ^I^N = (^G^O^L^D ^K^E^Y^P^A^D_^C^O^M^M^A) "^L^A^B^E^L='0,'"
  3957. ^F16_^S ^I^N = (^G^O^L^D ^K^E^Y^P^A^D_^E^N^T^E^R) "^L^A^B^E^L='0^E'"
  3958.  
  3959. " CDC STANDARD FUNCTION KEY INPUT INFORMATION "
  3960. ^N^E^X^T ^I^N = 13
  3961. ^N^E^X^T_^S ^I^N = ()
  3962. ^B^K^W ^I^N = ()
  3963. ^F^W^D ^I^N = ()
  3964. ^B^A^C^K ^I^N = ()
  3965. ^H^E^L^P ^I^N = ()
  3966. ^S^T^O^P ^I^N = ()
  3967. ^B^K^W_^S ^I^N = ()
  3968. ^F^W^D_^S ^I^N = ()
  3969. ^S^T^O^P_^S ^I^N = ()
  3970. ^D^O^W^N ^I^N = ()
  3971. ^D^O^W^N_^S ^I^N = ()
  3972. ^U^P ^I^N = ()
  3973. ^U^P_^S ^I^N = ()
  3974. ^E^D^I^T ^I^N = ()
  3975. ^E^D^I^T_^S ^I^N = ()
  3976. ^D^A^T^A ^I^N = ()
  3977. ^D^A^T^A_^S ^I^N = ()
  3978.  
  3979. " TERMINAL VIDEO ATTRIBUTES "
  3980. ^A^L^T_^B^E^G^I^N ^O^U^T = ()
  3981. ^A^L^T_^E^N^D ^O^U^T = ()
  3982. ^B^L^I^N^K_^B^E^G^I^N ^O^U^T = ()
  3983. ^B^L^I^N^K_^E^N^D ^O^U^T = ()
  3984. ^I^N^V^E^R^S^E_^B^E^G^I^N ^O^U^T = (^A^L^T^E^R^N^A^T^E_^C^O^L^O^R)
  3985. ^I^N^V^E^R^S^E_^E^N^D ^O^U^T = (^N^O^R^M^A^L_^C^O^L^O^R)
  3986. ^U^N^D^E^R^L^I^N^E_^B^E^G^I^N ^O^U^T = (^A^L^T^E^R^N^A^T^E_^C^O^L^O^R)
  3987. ^U^N^D^E^R^L^I^N^E_^E^N^D ^O^U^T = (^N^O^R^M^A^L_^C^O^L^O^R)
  3988.  
  3989. " LOGICAL ATTRIBUTE SPECIFICATIONS "
  3990. ^E^R^R^O^R_^B^E^G^I^N ^O^U^T = ()
  3991. ^E^R^R^O^R_^E^N^D ^O^U^T = ()
  3992. ^I^N^P^U^T_^T^E^X^T_^B^E^G^I^N ^O^U^T = ()
  3993. ^I^N^P^U^T_^T^E^X^T_^E^N^D ^O^U^T = ()
  3994. ^I^T^A^L^I^C_^B^E^G^I^N ^O^U^T = (^A^L^T^E^R^N^A^T^E_^C^O^L^O^R)
  3995. ^I^T^A^L^I^C_^E^N^D ^O^U^T = (^N^O^R^M^A^L_^C^O^L^O^R)
  3996.  
  3997. " LINE DRAWING CHARACTER SPECIFICATION "
  3998. ^L^D_^F^I^N^E_^B^E^G^I^N ^O^U^T = ()
  3999. ^L^D_^F^I^N^E_^E^N^D ^O^U^T = ()
  4000. ^L^D_^F^I^N^E_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = '-'
  4001. ^L^D_^F^I^N^E_^V^E^R^T^I^C^A^L ^O^U^T = '!'
  4002. ^L^D_^F^I^N^E_^U^P^P^E^R_^L^E^F^T ^O^U^T = '*'
  4003. ^L^D_^F^I^N^E_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = '*'
  4004. ^L^D_^F^I^N^E_^L^O^W^E^R_^L^E^F^T ^O^U^T = '*'
  4005. ^L^D_^F^I^N^E_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = '*'
  4006. ^L^D_^F^I^N^E_^U^P_^T ^O^U^T = '*'
  4007. ^L^D_^F^I^N^E_^D^O^W^N_^T ^O^U^T = '*'
  4008. ^L^D_^F^I^N^E_^L^E^F^T_^T ^O^U^T = '*'
  4009. ^L^D_^F^I^N^E_^R^I^G^H^T_^T ^O^U^T = '*'
  4010. ^L^D_^F^I^N^E_^C^R^O^S^S ^O^U^T = '*'
  4011. ^L^D_^M^E^D^I^U^M_^B^E^G^I^N ^O^U^T = ()
  4012. ^L^D_^M^E^D^I^U^M_^E^N^D ^O^U^T = ()
  4013. ^L^D_^M^E^D^I^U^M_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = '-'
  4014. ^L^D_^M^E^D^I^U^M_^V^E^R^T^I^C^A^L ^O^U^T = '!'
  4015. ^L^D_^M^E^D^I^U^M_^U^P^P^E^R_^L^E^F^T ^O^U^T = '*'
  4016. ^L^D_^M^E^D^I^U^M_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = '*'
  4017. ^L^D_^M^E^D^I^U^M_^L^O^W^E^R_^L^E^F^T ^O^U^T = '*'
  4018. ^L^D_^M^E^D^I^U^M_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = '*'
  4019. ^L^D_^M^E^D^I^U^M_^U^P_^T ^O^U^T = '*'
  4020. ^L^D_^M^E^D^I^U^M_^D^O^W^N_^T ^O^U^T = '*'
  4021. ^L^D_^M^E^D^I^U^M_^L^E^F^T_^T ^O^U^T = '*'
  4022. ^L^D_^M^E^D^I^U^M_^R^I^G^H^T_^T ^O^U^T = '*'
  4023. ^L^D_^M^E^D^I^U^M_^C^R^O^S^S ^O^U^T = '*'
  4024. ^L^D_^B^O^L^D_^B^E^G^I^N ^O^U^T = ()
  4025. ^L^D_^B^O^L^D_^E^N^D ^O^U^T = ()
  4026. ^L^D_^B^O^L^D_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = '-'
  4027. ^L^D_^B^O^L^D_^V^E^R^T^I^C^A^L ^O^U^T = '!'
  4028. ^L^D_^B^O^L^D_^U^P^P^E^R_^L^E^F^T ^O^U^T = '*'
  4029. ^L^D_^B^O^L^D_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = '*'
  4030. ^L^D_^B^O^L^D_^L^O^W^E^R_^L^E^F^T ^O^U^T = '*'
  4031. ^L^D_^B^O^L^D_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = '*'
  4032. ^L^D_^B^O^L^D_^U^P_^T ^O^U^T = '*'
  4033. ^L^D_^B^O^L^D_^D^O^W^N_^T ^O^U^T = '*'
  4034. ^L^D_^B^O^L^D_^L^E^F^T_^T ^O^U^T = '*'
  4035. ^L^D_^B^O^L^D_^R^I^G^H^T_^T ^O^U^T = '*'
  4036. ^L^D_^B^O^L^D_^C^R^O^S^S ^O^U^T = '*'
  4037.  
  4038. " DEFAULT KEY DEFINITIONS FOR THE FULL SCREEN EDITOR "
  4039.  
  4040. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  4041. ^N^A^M^E = ('FSEKEYS')...
  4042. ^O^U^T = (^K1 ';' ^K2 ';' ^K3 ';' ^K4 ';' ^K5)
  4043. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  4044. ^N^A^M^E = ('FSEKEYS')...
  4045. ^O^U^T = (^K6 ';' ^K7 ';' ^K8 ';' ^K9)
  4046.  
  4047. " END OF TERMINAL DEFINITION FILE FOR CDC 910 WORKSTATION WITH TYPE AHEAD "
  4048. *WEOR
  4049. TDU910C *** REMOVE THIS LINE WHEN USING AS INPUT TO *TDU*. ***
  4050. *WEOR
  4051. TDU91CT *** REMOVE THIS LINE WHEN USING AS INPUT TO *TDU*. ***
  4052. *WEOR
  4053. TDU3151 *** REMOVE THIS LINE WHEN USING AS INPUT TO *TDU*. ***
  4054.  
  4055. " TERMINAL DEFINITION FILE FOR IBM 3151. "
  4056.  
  4057.  
  4058. " VARIABLES "
  4059. HOME = (ESC 'H')
  4060. CLEAR_ALL_TABS = (ESC ' 1')
  4061. LOCK_KEYBOARD = (ESC ':')
  4062. UNLOCK_KEYBOARD = (ESC ';')
  4063. NORMAL = (ESC '4' 40(16))
  4064. START_INVERSE = (ESC '4' 41(16))
  4065. START_UNDERLINE = (ESC '4' 42(16))
  4066. START_BLINK = (ESC '4' 44(16))
  4067. START_ALTERNATE = (ESC '4' 48(16))
  4068. START_INVISIBLE = (ESC '4' 50(16))
  4069. SET_DEFAULT_F_KEYS = (ESC ' ^T')
  4070.  
  4071. " MODEL NAME AND COMMUNICATION TYPE "
  4072. ^M^O^D^E^L_^N^A^M^E ^V^A^L^U^E = '3151'
  4073. ^C^O^M^M^U^N^I^C^A^T^I^O^N^S ^T^Y^P^E = ^A^S^Y^N^C^H
  4074.  
  4075. " END OF INFORMATION SPECIFICATION "
  4076. ^E^N^D_^O^F_^I^N^F^O^R^M^A^T^I^O^N ^I^N = (0)
  4077.  
  4078. " CURSOR POSITIONING INFORMATION "
  4079. ^C^U^R^S^O^R_^P^O^S_^E^N^C^O^D^I^N^G ^B^I^A^S = (20(16)) ^T^Y^P^E = ^I^B^M3151_^C^U^R^S^O^R
  4080. ^C^U^R^S^O^R_^P^O^S_^C^O^L^U^M^N_^F^I^R^S^T ^V^A^L^U^E = FALSE
  4081. ^C^U^R^S^O^R_^P^O^S_^B^E^G^I^N ^O^U^T = (ESC '^Y')
  4082.  
  4083. " CURSOR MOVEMENT INFORMATION "
  4084. ^C^U^R^S^O^R_^H^O^M^E ^I^N^O^U^T = (HOME) ^L^A^B^E^L='HOME'
  4085. ^C^U^R^S^O^R_^U^P ^I^N^O^U^T = (ESC 'A')
  4086. ^C^U^R^S^O^R_^D^O^W^N ^I^N^O^U^T = (ESC 'B')
  4087. ^C^U^R^S^O^R_^R^I^G^H^T ^I^N^O^U^T = (ESC 'C')
  4088. ^C^U^R^S^O^R_^L^E^F^T ^I^N^O^U^T = (ESC 'D')
  4089.  
  4090. " CURSOR BEHAVIOR (^F^O^R ^C^U^R^S^O^R ^M^O^V^E^M^E^N^T ^K^E^Y^S) "
  4091. ^M^O^V^E_^P^A^S^T_^R^I^G^H^T ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  4092. ^M^O^V^E_^P^A^S^T_^L^E^F^T ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  4093. ^M^O^V^E_^P^A^S^T_^T^O^P ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  4094. ^M^O^V^E_^P^A^S^T_^B^O^T^T^O^M ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  4095.  
  4096. " CURSOR BEHAVIOR (^F^O^R ^C^H^A^R^A^C^T^E^R ^K^E^Y^S) "
  4097. ^C^H^A^R_^P^A^S^T_^L^E^F^T ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  4098. ^C^H^A^R_^P^A^S^T_^R^I^G^H^T ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  4099. ^C^H^A^R_^P^A^S^T_^L^A^S^T_^P^O^S^I^T^I^O^N ^T^Y^P^E = ^S^C^R^O^L^L_^N^E^X^T
  4100.  
  4101. " TERMINAL ATTRIBUTES "
  4102. AUTOMATIC_TABBING ^V^A^L^U^E = FALSE
  4103. CLEARS_WHEN_CHANGE_SIZE ^V^A^L^U^E = TRUE
  4104. FUNCTION_KEY_LEAVES_MARK ^V^A^L^U^E = FALSE
  4105. HAS_HIDDEN ^V^A^L^U^E = TRUE
  4106. HAS_PROTECT ^V^A^L^U^E = FALSE
  4107. HOME_AT_TOP ^V^A^L^U^E = TRUE
  4108. MULTIPLE_SIZES ^V^A^L^U^E = TRUE
  4109. TABS_TO_HOME ^V^A^L^U^E = FALSE
  4110. TABS_TO_TAB_STOPS ^V^A^L^U^E = TRUE
  4111. TABS_TO_UNPROTECTED ^V^A^L^U^E = FALSE
  4112. ATTRIBUTES_NOT_MASKABLE ^V^A^L^U^E = TRUE
  4113.  
  4114. " SCREEN SIZE "
  4115. ^S^E^T_^S^I^Z^E ^R^O^W^S = 25 ^C^O^L^U^M^N^S = 80 ^O^U^T = (ESC ' ^R!! 9"P')
  4116. ^S^E^T_^S^I^Z^E ^R^O^W^S = 25 ^C^O^L^U^M^N^S = 132 ^O^U^T = (ESC ' ^R!! 9$D')
  4117.  
  4118. " SCREEN AND LINE MODE TRANSITION "
  4119. ^S^C^R^E^E^N_^I^N^I^T ^O^U^T = (ESC '#:')
  4120. ^L^I^N^E_^I^N^I^T ^O^U^T = (ESC '#;')
  4121. ^S^E^T_^S^C^R^E^E^N_^M^O^D^E ^O^U^T = (SET_DEFAULT_F_KEYS CLEAR_ALL_TABS)
  4122. ^S^E^T_^L^I^N^E_^M^O^D^E ^O^U^T = (UNLOCK_KEYBOARD CLEAR_ALL_TABS)
  4123.  
  4124. " TERMINAL CAPABILITIES "
  4125. ^B^A^C^K^S^P^A^C^E ^I^N = (BS) ^L^A^B^E^L='B^A^C^KS^P^A^C^E'
  4126. ^D^E^L^E^T^E_^C^H^A^R ^I^N^O^U^T = (ESC 'Q') ^L^A^B^E^L='D^E^L^E^T^E'
  4127. ^D^E^L^E^T^E_^L^I^N^E_^B^O^L ^I^N^O^U^T = (ESC 'O') ^L^A^B^E^L='D^E^L_L^N'
  4128. ^E^R^A^S^E_^E^N^D_^O^F_^L^I^N^E ^I^N^O^U^T = (ESC 'I') ^L^A^B^E^L='E^R_EOF'
  4129. ^E^R^A^S^E_^P^A^G^E_^H^O^M^E ^I^N^O^U^T = (ESC 'L') ^L^A^B^E^L='C^L^E^A^R'
  4130. ^E^R^A^S^E_^E^N^D_^O^F_^P^A^G^E ^I^N^O^U^T = (ESC 'J')
  4131. ^I^N^S^E^R^T_^C^H^A^R ^I^N^O^U^T = (ESC 'P') ^L^A^B^E^L='I^N^S^E^R^T'
  4132. ^I^N^S^E^R^T_^L^I^N^E_^B^O^L ^I^N^O^U^T = (ESC 'N') ^L^A^B^E^L='I^N^S_L^N'
  4133. ^T^A^B_^F^O^R^W^A^R^D ^I^N^O^U^T = (HT)
  4134. ^T^A^B_^B^A^C^K^W^A^R^D ^I^N^O^U^T = (ESC '2')
  4135. ^T^A^B_^S^E^T ^I^N^O^U^T = (ESC '0')
  4136. ^T^A^B_^C^L^E^A^R ^I^N^O^U^T = (ESC '1')
  4137. ^T^A^B_^C^L^E^A^R_^A^L^L ^I^N^O^U^T = (CLEAR_ALL_TABS)
  4138.  
  4139. " VIDEO ATTRIBUTES AND SEQUENCES "
  4140. ^B^E^L^L_^N^A^K ^O^U^T = (BEL)
  4141. ^O^U^T^P^U^T_^B^E^G^I^N ^O^U^T = (LOCK_KEYBOARD)
  4142. ^O^U^T^P^U^T_^E^N^D ^O^U^T = (UNLOCK_KEYBOARD)
  4143. ^D^I^S^P^L^A^Y_^B^E^G^I^N ^O^U^T = ()
  4144. ^D^I^S^P^L^A^Y_^E^N^D ^O^U^T = ()
  4145. ^O^U^T^P^U^T_^T^E^X^T_^B^E^G^I^N ^O^U^T = (NORMAL)
  4146. ^O^U^T^P^U^T_^T^E^X^T_^E^N^D ^O^U^T = ()
  4147. ^T^I^T^L^E_^B^E^G^I^N ^O^U^T = ()
  4148. ^T^I^T^L^E_^E^N^D ^O^U^T = ()
  4149. ^M^E^S^S^A^G^E_^B^E^G^I^N ^O^U^T = ()
  4150. ^M^E^S^S^A^G^E_^E^N^D ^O^U^T = ()
  4151. ^I^T^A^L^I^C_^B^E^G^I^N ^O^U^T = (START_INVERSE)
  4152. ^I^T^A^L^I^C_^E^N^D ^O^U^T = (NORMAL)
  4153. ^I^N^P^U^T_^T^E^X^T_^B^E^G^I^N ^O^U^T = (START_UNDERLINE)
  4154. ^I^N^P^U^T_^T^E^X^T_^E^N^D ^O^U^T = (NORMAL)
  4155. ^A^L^T_^B^E^G^I^N ^O^U^T = (START_ALTERNATE)
  4156. ^A^L^T_^E^N^D ^O^U^T = (NORMAL)
  4157. ^B^L^I^N^K_^B^E^G^I^N ^O^U^T = (START_BLINK)
  4158. ^B^L^I^N^K_^E^N^D ^O^U^T = (NORMAL)
  4159. ^I^N^V^E^R^S^E_^B^E^G^I^N ^O^U^T = (START_INVERSE)
  4160. ^I^N^V^E^R^S^E_^E^N^D ^O^U^T = (NORMAL)
  4161. ^U^N^D^E^R^L^I^N^E_^B^E^G^I^N ^O^U^T = (START_UNDERLINE)
  4162. ^U^N^D^E^R^L^I^N^E_^E^N^D ^O^U^T = (NORMAL)
  4163. ^E^R^R^O^R_^B^E^G^I^N ^O^U^T = (START_INVERSE)
  4164. ^E^R^R^O^R_^E^N^D ^O^U^T = (NORMAL)
  4165. ^H^I^D^D^E^N_^B^E^G^I^N ^O^U^T = (START_INVISIBLE)
  4166. ^H^I^D^D^E^N_^E^N^D ^O^U^T = (NORMAL)
  4167.  
  4168. " PROGRAMMABLE FUNCTION KEY INPUT INFORMATION "
  4169. ^F1 ^I^N = (ESC '^A') ^L^A^B^E^L='F1'
  4170. ^F2 ^I^N = (ESC '^B') ^L^A^B^E^L='F2'
  4171. ^F3 ^I^N = (ESC '^C') ^L^A^B^E^L='F3'
  4172. ^F4 ^I^N = (ESC '^D') ^L^A^B^E^L='F4'
  4173. ^F5 ^I^N = (ESC '^E') ^L^A^B^E^L='F5'
  4174. ^F6 ^I^N = (ESC '^F') ^L^A^B^E^L='F6'
  4175. ^F7 ^I^N = (ESC '^G') ^L^A^B^E^L='F7'
  4176. ^F8 ^I^N = (ESC '^H') ^L^A^B^E^L='F8'
  4177. ^F9 ^I^N = (ESC '^I') ^L^A^B^E^L='F9'
  4178. ^F10 ^I^N = (ESC '^J') ^L^A^B^E^L='10'
  4179. ^F11 ^I^N = (ESC '^K') ^L^A^B^E^L='11'
  4180. ^F12 ^I^N = (ESC '^L') ^L^A^B^E^L='12'
  4181. ^F13 ^I^N = (ESC '"^A') ^L^A^B^E^L='S1'
  4182. ^F14 ^I^N = (ESC '"^B') ^L^A^B^E^L='S2'
  4183. ^F15 ^I^N = (ESC '"^C') ^L^A^B^E^L='S3'
  4184. ^F16 ^I^N = (ESC '"^D') ^L^A^B^E^L='S4'
  4185. ^F1_^S ^I^N = (ESC '!^A') ^L^A^B^E^L='S^H^I^F^T-F1'
  4186. ^F2_^S ^I^N = (ESC '!^B') ^L^A^B^E^L='S^H^I^F^T-F2'
  4187. ^F3_^S ^I^N = (ESC '!^C') ^L^A^B^E^L='S^H^I^F^T-F3'
  4188. ^F4_^S ^I^N = (ESC '!^D') ^L^A^B^E^L='S^H^I^F^T-F4'
  4189. ^F5_^S ^I^N = (ESC '!^E') ^L^A^B^E^L='S^H^I^F^T-F5'
  4190. ^F6_^S ^I^N = (ESC '!^F') ^L^A^B^E^L='S^H^I^F^T-F6'
  4191. ^F7_^S ^I^N = (ESC '!^G') ^L^A^B^E^L='S^H^I^F^T-F7'
  4192. ^F8_^S ^I^N = (ESC '!^H') ^L^A^B^E^L='S^H^I^F^T-F8'
  4193. ^F9_^S ^I^N = (ESC '!^I') ^L^A^B^E^L='S^H^I^F^T-F9'
  4194. ^F10_^S ^I^N = (ESC '!^J') ^L^A^B^E^L='S^H^I^F^T-10'
  4195. ^F11_^S ^I^N = (ESC '!^K') ^L^A^B^E^L='S^H^I^F^T-11'
  4196. ^F12_^S ^I^N = (ESC '!^L') ^L^A^B^E^L='S^H^I^F^T-12'
  4197. ^F13_^S ^I^N = (ESC '"^E') ^L^A^B^E^L='C5'
  4198. ^F14_^S ^I^N = (ESC '"^F') ^L^A^B^E^L='C6'
  4199. ^F15_^S ^I^N = (ESC '"^G') ^L^A^B^E^L='C7'
  4200. ^F16_^S ^I^N = (ESC '"^H') ^L^A^B^E^L='C8'
  4201.  
  4202. " CDC STANDARD FUNCTION KEY INPUT INFORMATION "
  4203. ^N^E^X^T ^I^N = 13 ^L^A^B^E^L = 'R^E^T^U^R^N'
  4204.  
  4205. " LINE DRAWING CHARACTER SPECIFICATION "
  4206. ^L^D_^F^I^N^E_^B^E^G^I^N ^O^U^T = (ESC '<A')
  4207. ^L^D_^F^I^N^E_^E^N^D ^O^U^T = (ESC '<@A')
  4208. ^L^D_^F^I^N^E_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = ('^Q')
  4209. ^L^D_^F^I^N^E_^V^E^R^T^I^C^A^L ^O^U^T = ('^X')
  4210. ^L^D_^F^I^N^E_^U^P^P^E^R_^L^E^F^T ^O^U^T = ('^L')
  4211. ^L^D_^F^I^N^E_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = ('^K')
  4212. ^L^D_^F^I^N^E_^L^O^W^E^R_^L^E^F^T ^O^U^T = ('^M')
  4213. ^L^D_^F^I^N^E_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = ('^J')
  4214. ^L^D_^F^I^N^E_^U^P_^T ^O^U^T = ('^V')
  4215. ^L^D_^F^I^N^E_^D^O^W^N_^T ^O^U^T = ('^W')
  4216. ^L^D_^F^I^N^E_^L^E^F^T_^T ^O^U^T = ('^U')
  4217. ^L^D_^F^I^N^E_^R^I^G^H^T_^T ^O^U^T = ('^T')
  4218. ^L^D_^F^I^N^E_^C^R^O^S^S ^O^U^T = ('^N')
  4219. ^L^D_^M^E^D^I^U^M_^B^E^G^I^N ^O^U^T = (START_ALTERNATE ESC '<A')
  4220. ^L^D_^M^E^D^I^U^M_^E^N^D ^O^U^T = (NORMAL ESC '<@A')
  4221. ^L^D_^M^E^D^I^U^M_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = ('^Q')
  4222. ^L^D_^M^E^D^I^U^M_^V^E^R^T^I^C^A^L ^O^U^T = ('^X')
  4223. ^L^D_^M^E^D^I^U^M_^U^P^P^E^R_^L^E^F^T ^O^U^T = ('^L')
  4224. ^L^D_^M^E^D^I^U^M_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = ('^K')
  4225. ^L^D_^M^E^D^I^U^M_^L^O^W^E^R_^L^E^F^T ^O^U^T = ('^M')
  4226. ^L^D_^M^E^D^I^U^M_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = ('^J')
  4227. ^L^D_^M^E^D^I^U^M_^U^P_^T ^O^U^T = ('^V')
  4228. ^L^D_^M^E^D^I^U^M_^D^O^W^N_^T ^O^U^T = ('^W')
  4229. ^L^D_^M^E^D^I^U^M_^L^E^F^T_^T ^O^U^T = ('^U')
  4230. ^L^D_^M^E^D^I^U^M_^R^I^G^H^T_^T ^O^U^T = ('^T')
  4231. ^L^D_^M^E^D^I^U^M_^C^R^O^S^S ^O^U^T = ('^N')
  4232. ^L^D_^B^O^L^D_^B^E^G^I^N ^O^U^T = (START_INVERSE ESC '<A')
  4233. ^L^D_^B^O^L^D_^E^N^D ^O^U^T = (NORMAL ESC '<@A')
  4234. ^L^D_^B^O^L^D_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = ('^Q')
  4235. ^L^D_^B^O^L^D_^V^E^R^T^I^C^A^L ^O^U^T = ('^X')
  4236. ^L^D_^B^O^L^D_^U^P^P^E^R_^L^E^F^T ^O^U^T = ('^L')
  4237. ^L^D_^B^O^L^D_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = ('^K')
  4238. ^L^D_^B^O^L^D_^L^O^W^E^R_^L^E^F^T ^O^U^T = ('^M')
  4239. ^L^D_^B^O^L^D_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = ('^J')
  4240. ^L^D_^B^O^L^D_^U^P_^T ^O^U^T = ('^V')
  4241. ^L^D_^B^O^L^D_^D^O^W^N_^T ^O^U^T = ('^W')
  4242. ^L^D_^B^O^L^D_^L^E^F^T_^T ^O^U^T = ('^U')
  4243. ^L^D_^B^O^L^D_^R^I^G^H^T_^T ^O^U^T = ('^T')
  4244. ^L^D_^B^O^L^D_^C^R^O^S^S ^O^U^T = ('^N')
  4245.  
  4246. " DEFAULT KEY DEFINITIONS FOR THE FULL SCREEN EDITOR "
  4247. ^K1 = ('SK1/VPS/L/ B^K^W/;SKS1/PF/L/ F^I^R^S^T/')
  4248. ^K2 = ('SK2/VNS/L/ F^W^D/;SKS2/VL/L/ L^A^S^T/')
  4249. ^K3 = ('SK3/B/L/ B^A^C^K/;SKS3/SMW/L/ M^R^KC^H/')
  4250. ^K4 = ('SK4/H/L/ H^E^L^P/')
  4251. ^K5 = ('SK5/U/L/ U^N^D^O/')
  4252. ^K6 = ('SK6/Q/L/ Q^U^I^T/')
  4253. ^K7 = ('SK7/CMTP/L/ C^O^P^Y/;SKS7/MMTP/L/ M^O^V^E/')
  4254. ^K8 = ('SK8/SM/L/ M^A^R^K/;SKS8/UM/L/ U^NM^R^K/')
  4255. ^K9 = ('SK9"L/&?/"L"L^O^C^A^T^E";SKS9/LN/L/L^O^CN^X^T/')
  4256. ^K10 = ('SK10/SVC132/L/132C^O^L/;SKS10/SVC80/L/ 80C^O^L/')
  4257. ^K11 = ('SK11/.S/L/ B^R^E^A^K/;SKS11/.J/L/ J^O^I^N/')
  4258. ^K12 = ('SK12/.E/L/ S^K^PEL/;SKS12/IBP/L/ I^N^SB^K/')
  4259. ^K13 = ('SK13/V/L/M^I^D^D^L^E/;SKS13/DB/L/ D^E^LB^K/')
  4260. ^K14 = ('SK14/VN/L/ L^I^NU^P/;SKS14/VP/L/ L^I^ND^N/')
  4261. ^K15 = ('SK15/.F/L/F^O^R^M^A^T/;SKS15/.C/L/C^E^N^T^E^R/')
  4262. ^K16 = ('SK16/IW/L/ I^N^SW^D/;SKS16/DW/L/ D^E^LW^D/')
  4263.  
  4264. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  4265. ^N^A^M^E = ('FSEKEYS')...
  4266. ^O^U^T = (^K1 ';' ^K2 ';' ^K3 ';' ^K4 ';' ^K5)
  4267. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  4268. ^N^A^M^E = ('FSEKEYS')...
  4269. ^O^U^T = (^K6 ';' ^K7 ';' ^K8 ';' ^K9 ';' ^K10)
  4270. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  4271. ^N^A^M^E = ('FSEKEYS')...
  4272. ^O^U^T = (^K11 ';' ^K12 ';' ^K13 ';' ^K14 ';' ^K15 ';' ^K16)
  4273.  
  4274. " END OF TERMINAL DEFINITION FILE FOR IBM 3151. "
  4275. *WEOR
  4276. TDU315T *** REMOVE THIS LINE WHEN USING AS INPUT TO *TDU*. ***
  4277.  
  4278. " TERMINAL DEFINITION FILE FOR IBM 3151 WITH TYPE AHEAD. "
  4279.  
  4280. " VARIABLES "
  4281. HOME = (ESC 'H')
  4282. CLEAR_ALL_TABS = (ESC ' 1')
  4283. LOCK_KEYBOARD = (ESC ':')
  4284. UNLOCK_KEYBOARD = (ESC ';')
  4285. NORMAL = (ESC '4' 40(16))
  4286. START_INVERSE = (ESC '4' 41(16))
  4287. START_UNDERLINE = (ESC '4' 42(16))
  4288. START_BLINK = (ESC '4' 44(16))
  4289. START_ALTERNATE = (ESC '4' 48(16))
  4290. START_INVISIBLE = (ESC '4' 50(16))
  4291. SET_DEFAULT_F_KEYS = (ESC ' ^T')
  4292.  
  4293. " MODEL NAME AND COMMUNICATION TYPE "
  4294. ^M^O^D^E^L_^N^A^M^E ^V^A^L^U^E = '3151T'
  4295. ^C^O^M^M^U^N^I^C^A^T^I^O^N^S ^T^Y^P^E = ^A^S^Y^N^C^H
  4296.  
  4297. " END OF INFORMATION SPECIFICATION "
  4298. ^E^N^D_^O^F_^I^N^F^O^R^M^A^T^I^O^N ^I^N = (0)
  4299.  
  4300. " CURSOR POSITIONING INFORMATION "
  4301. ^C^U^R^S^O^R_^P^O^S_^E^N^C^O^D^I^N^G ^B^I^A^S = (20(16)) ^T^Y^P^E = ^I^B^M3151_^C^U^R^S^O^R
  4302. ^C^U^R^S^O^R_^P^O^S_^C^O^L^U^M^N_^F^I^R^S^T ^V^A^L^U^E = FALSE
  4303. ^C^U^R^S^O^R_^P^O^S_^B^E^G^I^N ^O^U^T = (ESC '^Y')
  4304.  
  4305. " CURSOR MOVEMENT INFORMATION "
  4306. ^C^U^R^S^O^R_^H^O^M^E ^I^N^O^U^T = (HOME) ^L^A^B^E^L='HOME'
  4307. ^C^U^R^S^O^R_^U^P ^I^N^O^U^T = (ESC 'A')
  4308. ^C^U^R^S^O^R_^D^O^W^N ^I^N^O^U^T = (ESC 'B')
  4309. ^C^U^R^S^O^R_^R^I^G^H^T ^I^N^O^U^T = (ESC 'C')
  4310. ^C^U^R^S^O^R_^L^E^F^T ^I^N^O^U^T = (ESC 'D')
  4311.  
  4312. " CURSOR BEHAVIOR (^F^O^R ^C^U^R^S^O^R ^M^O^V^E^M^E^N^T ^K^E^Y^S) "
  4313. ^M^O^V^E_^P^A^S^T_^R^I^G^H^T ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  4314. ^M^O^V^E_^P^A^S^T_^L^E^F^T ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  4315. ^M^O^V^E_^P^A^S^T_^T^O^P ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  4316. ^M^O^V^E_^P^A^S^T_^B^O^T^T^O^M ^T^Y^P^E = ^S^T^O^P_^N^E^X^T
  4317.  
  4318. " CURSOR BEHAVIOR (^F^O^R ^C^H^A^R^A^C^T^E^R ^K^E^Y^S) "
  4319. ^C^H^A^R_^P^A^S^T_^L^E^F^T ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  4320. ^C^H^A^R_^P^A^S^T_^R^I^G^H^T ^T^Y^P^E = ^W^R^A^P_^A^D^J^A^C^E^N^T_^N^E^X^T
  4321. ^C^H^A^R_^P^A^S^T_^L^A^S^T_^P^O^S^I^T^I^O^N ^T^Y^P^E = ^S^C^R^O^L^L_^N^E^X^T
  4322.  
  4323. " TERMINAL ATTRIBUTES "
  4324. TYPE_AHEAD ^V^A^L^U^E = TRUE
  4325. AUTOMATIC_TABBING ^V^A^L^U^E = FALSE
  4326. CLEARS_WHEN_CHANGE_SIZE ^V^A^L^U^E = TRUE
  4327. FUNCTION_KEY_LEAVES_MARK ^V^A^L^U^E = FALSE
  4328. HAS_HIDDEN ^V^A^L^U^E = TRUE
  4329. HAS_PROTECT ^V^A^L^U^E = FALSE
  4330. HOME_AT_TOP ^V^A^L^U^E = TRUE
  4331. MULTIPLE_SIZES ^V^A^L^U^E = TRUE
  4332. TABS_TO_HOME ^V^A^L^U^E = FALSE
  4333. TABS_TO_TAB_STOPS ^V^A^L^U^E = TRUE
  4334. TABS_TO_UNPROTECTED ^V^A^L^U^E = FALSE
  4335. ATTRIBUTES_NOT_MASKABLE ^V^A^L^U^E = TRUE
  4336.  
  4337. " SCREEN SIZE "
  4338. ^S^E^T_^S^I^Z^E ^R^O^W^S = 25 ^C^O^L^U^M^N^S = 80 ^O^U^T = (ESC ' ^R!! 9"P')
  4339. ^S^E^T_^S^I^Z^E ^R^O^W^S = 25 ^C^O^L^U^M^N^S = 132 ^O^U^T = (ESC ' ^R!! 9$D')
  4340.  
  4341. " SCREEN AND LINE MODE TRANSITION "
  4342. ^S^C^R^E^E^N_^I^N^I^T ^O^U^T = (ESC '#:')
  4343. ^L^I^N^E_^I^N^I^T ^O^U^T = (ESC '#;')
  4344. ^S^E^T_^S^C^R^E^E^N_^M^O^D^E ^O^U^T = (SET_DEFAULT_F_KEYS CLEAR_ALL_TABS)
  4345. ^S^E^T_^L^I^N^E_^M^O^D^E ^O^U^T = (UNLOCK_KEYBOARD CLEAR_ALL_TABS)
  4346.  
  4347. " TERMINAL CAPABILITIES "
  4348. ^B^A^C^K^S^P^A^C^E ^I^N = (BS) ^L^A^B^E^L='B^A^C^KS^P^A^C^E'
  4349. ^D^E^L^E^T^E_^C^H^A^R ^I^N^O^U^T = (ESC 'Q') ^L^A^B^E^L='D^E^L^E^T^E'
  4350. ^D^E^L^E^T^E_^L^I^N^E_^B^O^L ^I^N^O^U^T = (ESC 'O') ^L^A^B^E^L='D^E^L_L^N'
  4351. ^E^R^A^S^E_^E^N^D_^O^F_^L^I^N^E ^I^N^O^U^T = (ESC 'I') ^L^A^B^E^L='E^R_EOF'
  4352. ^E^R^A^S^E_^P^A^G^E_^H^O^M^E ^I^N^O^U^T = (ESC 'L') ^L^A^B^E^L='C^L^E^A^R'
  4353. ^E^R^A^S^E_^E^N^D_^O^F_^P^A^G^E ^I^N^O^U^T = (ESC 'J')
  4354. ^I^N^S^E^R^T_^C^H^A^R ^I^N^O^U^T = (ESC 'P') ^L^A^B^E^L='I^N^S^E^R^T'
  4355. ^I^N^S^E^R^T_^L^I^N^E_^B^O^L ^I^N^O^U^T = (ESC 'N') ^L^A^B^E^L='I^N^S_L^N'
  4356. ^T^A^B_^F^O^R^W^A^R^D ^I^N^O^U^T = (HT)
  4357. ^T^A^B_^B^A^C^K^W^A^R^D ^I^N^O^U^T = (ESC '2')
  4358. ^T^A^B_^S^E^T ^I^N^O^U^T = (ESC '0')
  4359. ^T^A^B_^C^L^E^A^R ^I^N^O^U^T = (ESC '1')
  4360. ^T^A^B_^C^L^E^A^R_^A^L^L ^I^N^O^U^T = (CLEAR_ALL_TABS)
  4361.  
  4362. " VIDEO ATTRIBUTES AND SEQUENCES "
  4363. ^B^E^L^L_^N^A^K ^O^U^T = (BEL)
  4364. ^O^U^T^P^U^T_^B^E^G^I^N ^O^U^T = (LOCK_KEYBOARD)
  4365. ^O^U^T^P^U^T_^E^N^D ^O^U^T = (UNLOCK_KEYBOARD)
  4366. ^D^I^S^P^L^A^Y_^B^E^G^I^N ^O^U^T = ()
  4367. ^D^I^S^P^L^A^Y_^E^N^D ^O^U^T = ()
  4368. ^O^U^T^P^U^T_^T^E^X^T_^B^E^G^I^N ^O^U^T = (NORMAL)
  4369. ^O^U^T^P^U^T_^T^E^X^T_^E^N^D ^O^U^T = ()
  4370. ^T^I^T^L^E_^B^E^G^I^N ^O^U^T = ()
  4371. ^T^I^T^L^E_^E^N^D ^O^U^T = ()
  4372. ^M^E^S^S^A^G^E_^B^E^G^I^N ^O^U^T = ()
  4373. ^M^E^S^S^A^G^E_^E^N^D ^O^U^T = ()
  4374. ^I^T^A^L^I^C_^B^E^G^I^N ^O^U^T = (START_INVERSE)
  4375. ^I^T^A^L^I^C_^E^N^D ^O^U^T = (NORMAL)
  4376. ^I^N^P^U^T_^T^E^X^T_^B^E^G^I^N ^O^U^T = (START_UNDERLINE)
  4377. ^I^N^P^U^T_^T^E^X^T_^E^N^D ^O^U^T = (NORMAL)
  4378. ^A^L^T_^B^E^G^I^N ^O^U^T = (START_ALTERNATE)
  4379. ^A^L^T_^E^N^D ^O^U^T = (NORMAL)
  4380. ^B^L^I^N^K_^B^E^G^I^N ^O^U^T = (START_BLINK)
  4381. ^B^L^I^N^K_^E^N^D ^O^U^T = (NORMAL)
  4382. ^I^N^V^E^R^S^E_^B^E^G^I^N ^O^U^T = (START_INVERSE)
  4383. ^I^N^V^E^R^S^E_^E^N^D ^O^U^T = (NORMAL)
  4384. ^U^N^D^E^R^L^I^N^E_^B^E^G^I^N ^O^U^T = (START_UNDERLINE)
  4385. ^U^N^D^E^R^L^I^N^E_^E^N^D ^O^U^T = (NORMAL)
  4386. ^E^R^R^O^R_^B^E^G^I^N ^O^U^T = (START_INVERSE)
  4387. ^E^R^R^O^R_^E^N^D ^O^U^T = (NORMAL)
  4388. ^H^I^D^D^E^N_^B^E^G^I^N ^O^U^T = (START_INVISIBLE)
  4389. ^H^I^D^D^E^N_^E^N^D ^O^U^T = (NORMAL)
  4390.  
  4391. " PROGRAMMABLE FUNCTION KEY INPUT INFORMATION "
  4392. ^F1 ^I^N = (ESC '^A') ^L^A^B^E^L='F1'
  4393. ^F2 ^I^N = (ESC '^B') ^L^A^B^E^L='F2'
  4394. ^F3 ^I^N = (ESC '^C') ^L^A^B^E^L='F3'
  4395. ^F4 ^I^N = (ESC '^D') ^L^A^B^E^L='F4'
  4396. ^F5 ^I^N = (ESC '^E') ^L^A^B^E^L='F5'
  4397. ^F6 ^I^N = (ESC '^F') ^L^A^B^E^L='F6'
  4398. ^F7 ^I^N = (ESC '^G') ^L^A^B^E^L='F7'
  4399. ^F8 ^I^N = (ESC '^H') ^L^A^B^E^L='F8'
  4400. ^F9 ^I^N = (ESC '^I') ^L^A^B^E^L='F9'
  4401. ^F10 ^I^N = (ESC '^J') ^L^A^B^E^L='10'
  4402. ^F11 ^I^N = (ESC '^K') ^L^A^B^E^L='11'
  4403. ^F12 ^I^N = (ESC '^L') ^L^A^B^E^L='12'
  4404. ^F13 ^I^N = (ESC '"^A') ^L^A^B^E^L='S1'
  4405. ^F14 ^I^N = (ESC '"^B') ^L^A^B^E^L='S2'
  4406. ^F15 ^I^N = (ESC '"^C') ^L^A^B^E^L='S3'
  4407. ^F16 ^I^N = (ESC '"^D') ^L^A^B^E^L='S4'
  4408. ^F1_^S ^I^N = (ESC '!^A') ^L^A^B^E^L='S^H^I^F^T-F1'
  4409. ^F2_^S ^I^N = (ESC '!^B') ^L^A^B^E^L='S^H^I^F^T-F2'
  4410. ^F3_^S ^I^N = (ESC '!^C') ^L^A^B^E^L='S^H^I^F^T-F3'
  4411. ^F4_^S ^I^N = (ESC '!^D') ^L^A^B^E^L='S^H^I^F^T-F4'
  4412. ^F5_^S ^I^N = (ESC '!^E') ^L^A^B^E^L='S^H^I^F^T-F5'
  4413. ^F6_^S ^I^N = (ESC '!^F') ^L^A^B^E^L='S^H^I^F^T-F6'
  4414. ^F7_^S ^I^N = (ESC '!^G') ^L^A^B^E^L='S^H^I^F^T-F7'
  4415. ^F8_^S ^I^N = (ESC '!^H') ^L^A^B^E^L='S^H^I^F^T-F8'
  4416. ^F9_^S ^I^N = (ESC '!^I') ^L^A^B^E^L='S^H^I^F^T-F9'
  4417. ^F10_^S ^I^N = (ESC '!^J') ^L^A^B^E^L='S^H^I^F^T-10'
  4418. ^F11_^S ^I^N = (ESC '!^K') ^L^A^B^E^L='S^H^I^F^T-11'
  4419. ^F12_^S ^I^N = (ESC '!^L') ^L^A^B^E^L='S^H^I^F^T-12'
  4420. ^F13_^S ^I^N = (ESC '"^E') ^L^A^B^E^L='C5'
  4421. ^F14_^S ^I^N = (ESC '"^F') ^L^A^B^E^L='C6'
  4422. ^F15_^S ^I^N = (ESC '"^G') ^L^A^B^E^L='C7'
  4423. ^F16_^S ^I^N = (ESC '"^H') ^L^A^B^E^L='C8'
  4424.  
  4425. " CDC STANDARD FUNCTION KEY INPUT INFORMATION "
  4426. ^N^E^X^T ^I^N = 13 ^L^A^B^E^L = 'R^E^T^U^R^N'
  4427.  
  4428. " LINE DRAWING CHARACTER SPECIFICATION "
  4429. ^L^D_^F^I^N^E_^B^E^G^I^N ^O^U^T = (ESC '<A')
  4430. ^L^D_^F^I^N^E_^E^N^D ^O^U^T = (ESC '<@A')
  4431. ^L^D_^F^I^N^E_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = ('^Q')
  4432. ^L^D_^F^I^N^E_^V^E^R^T^I^C^A^L ^O^U^T = ('^X')
  4433. ^L^D_^F^I^N^E_^U^P^P^E^R_^L^E^F^T ^O^U^T = ('^L')
  4434. ^L^D_^F^I^N^E_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = ('^K')
  4435. ^L^D_^F^I^N^E_^L^O^W^E^R_^L^E^F^T ^O^U^T = ('^M')
  4436. ^L^D_^F^I^N^E_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = ('^J')
  4437. ^L^D_^F^I^N^E_^U^P_^T ^O^U^T = ('^V')
  4438. ^L^D_^F^I^N^E_^D^O^W^N_^T ^O^U^T = ('^W')
  4439. ^L^D_^F^I^N^E_^L^E^F^T_^T ^O^U^T = ('^U')
  4440. ^L^D_^F^I^N^E_^R^I^G^H^T_^T ^O^U^T = ('^T')
  4441. ^L^D_^F^I^N^E_^C^R^O^S^S ^O^U^T = ('^N')
  4442. ^L^D_^M^E^D^I^U^M_^B^E^G^I^N ^O^U^T = (START_ALTERNATE ESC '<A')
  4443. ^L^D_^M^E^D^I^U^M_^E^N^D ^O^U^T = (NORMAL ESC '<@A')
  4444. ^L^D_^M^E^D^I^U^M_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = ('^Q')
  4445. ^L^D_^M^E^D^I^U^M_^V^E^R^T^I^C^A^L ^O^U^T = ('^X')
  4446. ^L^D_^M^E^D^I^U^M_^U^P^P^E^R_^L^E^F^T ^O^U^T = ('^L')
  4447. ^L^D_^M^E^D^I^U^M_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = ('^K')
  4448. ^L^D_^M^E^D^I^U^M_^L^O^W^E^R_^L^E^F^T ^O^U^T = ('^M')
  4449. ^L^D_^M^E^D^I^U^M_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = ('^J')
  4450. ^L^D_^M^E^D^I^U^M_^U^P_^T ^O^U^T = ('^V')
  4451. ^L^D_^M^E^D^I^U^M_^D^O^W^N_^T ^O^U^T = ('^W')
  4452. ^L^D_^M^E^D^I^U^M_^L^E^F^T_^T ^O^U^T = ('^U')
  4453. ^L^D_^M^E^D^I^U^M_^R^I^G^H^T_^T ^O^U^T = ('^T')
  4454. ^L^D_^M^E^D^I^U^M_^C^R^O^S^S ^O^U^T = ('^N')
  4455. ^L^D_^B^O^L^D_^B^E^G^I^N ^O^U^T = (START_INVERSE ESC '<A')
  4456. ^L^D_^B^O^L^D_^E^N^D ^O^U^T = (NORMAL ESC '<@A')
  4457. ^L^D_^B^O^L^D_^H^O^R^I^Z^O^N^T^A^L ^O^U^T = ('^Q')
  4458. ^L^D_^B^O^L^D_^V^E^R^T^I^C^A^L ^O^U^T = ('^X')
  4459. ^L^D_^B^O^L^D_^U^P^P^E^R_^L^E^F^T ^O^U^T = ('^L')
  4460. ^L^D_^B^O^L^D_^U^P^P^E^R_^R^I^G^H^T ^O^U^T = ('^K')
  4461. ^L^D_^B^O^L^D_^L^O^W^E^R_^L^E^F^T ^O^U^T = ('^M')
  4462. ^L^D_^B^O^L^D_^L^O^W^E^R_^R^I^G^H^T ^O^U^T = ('^J')
  4463. ^L^D_^B^O^L^D_^U^P_^T ^O^U^T = ('^V')
  4464. ^L^D_^B^O^L^D_^D^O^W^N_^T ^O^U^T = ('^W')
  4465. ^L^D_^B^O^L^D_^L^E^F^T_^T ^O^U^T = ('^U')
  4466. ^L^D_^B^O^L^D_^R^I^G^H^T_^T ^O^U^T = ('^T')
  4467. ^L^D_^B^O^L^D_^C^R^O^S^S ^O^U^T = ('^N')
  4468.  
  4469. " DEFAULT KEY DEFINITIONS FOR THE FULL SCREEN EDITOR "
  4470. ^K1 = ('SK1/VPS/L/ B^K^W/;SKS1/PF/L/ F^I^R^S^T/')
  4471. ^K2 = ('SK2/VNS/L/ F^W^D/;SKS2/VL/L/ L^A^S^T/')
  4472. ^K3 = ('SK3/B/L/ B^A^C^K/;SKS3/SMW/L/ M^R^KC^H/')
  4473. ^K4 = ('SK4/H/L/ H^E^L^P/')
  4474. ^K5 = ('SK5/U/L/ U^N^D^O/')
  4475. ^K6 = ('SK6/Q/L/ Q^U^I^T/')
  4476. ^K7 = ('SK7/CMTP/L/ C^O^P^Y/;SKS7/MMTP/L/ M^O^V^E/')
  4477. ^K8 = ('SK8/SM/L/ M^A^R^K/;SKS8/UM/L/ U^NM^R^K/')
  4478. ^K9 = ('SK9"L/&?/"L"L^O^C^A^T^E";SKS9/LN/L/L^O^CN^X^T/')
  4479. ^K10 = ('SK10/SVC132/L/132C^O^L/;SKS10/SVC80/L/ 80C^O^L/')
  4480. ^K11 = ('SK11/.S/L/ B^R^E^A^K/;SKS11/.J/L/ J^O^I^N/')
  4481. ^K12 = ('SK12/.E/L/ S^K^PEL/;SKS12/IBP/L/ I^N^SB^K/')
  4482. ^K13 = ('SK13/V/L/M^I^D^D^L^E/;SKS13/DB/L/ D^E^LB^K/')
  4483. ^K14 = ('SK14/VN/L/ L^I^NU^P/;SKS14/VP/L/ L^I^ND^N/')
  4484. ^K15 = ('SK15/.F/L/F^O^R^M^A^T/;SKS15/.C/L/C^E^N^T^E^R/')
  4485. ^K16 = ('SK16/IW/L/ I^N^SW^D/;SKS16/DW/L/ D^E^LW^D/')
  4486.  
  4487. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  4488. ^N^A^M^E = ('FSEKEYS')...
  4489. ^O^U^T = (^K1 ';' ^K2 ';' ^K3 ';' ^K4 ';' ^K5)
  4490. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  4491. ^N^A^M^E = ('FSEKEYS')...
  4492. ^O^U^T = (^K6 ';' ^K7 ';' ^K8 ';' ^K9 ';' ^K10)
  4493. ^A^P^P^L^I^C^A^T^I^O^N_^S^T^R^I^N^G...
  4494. ^N^A^M^E = ('FSEKEYS')...
  4495. ^O^U^T = (^K11 ';' ^K12 ';' ^K13 ';' ^K14 ';' ^K15 ';' ^K16)
  4496.  
  4497. " END OF TERMINAL DEFINITION FILE FOR IBM 3151 WITH TYPE AHEAD. "
  4498. *WEOR
  4499. TDUNCDX *** REMOVE THIS LINE WHEN USING AS INPUT TO *TDU*. ***
  4500.  
  4501. " TERMINAL DEFINITION FILE FOR NCD16/NCD19 X^T^E^R^M^I^N^A^L^S. "
  4502. " T^E^R^M^I^N^A^L ^M^U^S^T ^U^S^E ^X^T^E^R^M ^W^I^T^H ^S^P^E^C^I^A^L .X^D^E^F^A^U^L^T^S ^E^N^T^R^Y '^C^Y^B^E^R'. "
  4503.  
  4504. " "
  4505. " NCDX NOS T^E^R^M^I^N^A^L D^E^F^I^N^I^T^I^O^N K^E^Y M^A^P^P^I^N^G^S "
  4506. " "
  4507. " K^E^Y M^O^D^I^F^I^E^R A^C^T^I^O^N "
  4508. " +------------------------------------------------+ "
  4509. " ^1 F1 - F12 ^1 ^1 F1 - F12 ^1 "
  4510. " ^1 ^1 S^H^I^F^T ^1 F1 - F12 S^H^I^F^T^E^D ^1 "
  4511. " ^1------------------------------------------------^1 "
  4512. " ^1 F1 - F4 ^1 C^T^R^L ^1 F13 - F16 ^1 "
  4513. " ^1 ^1 A^L^T ^1 F13 - F16 S^H^I^F^T^E^D ^1 "
  4514. " ^1------------------------------------------------^1 "
  4515. " ^1 I^N^S^E^R^T ^1 ^1 E^N^T^E^R I^N^S^E^R^T M^O^D^E ^1 "
  4516. " ^1 ^1 S^H^I^F^T ^1 I^N^S^E^R^T L^I^N^E ^1 "
  4517. " ^1 ^1 C^T^R^L ^1 I^N^S^E^R^T C^H^A^R^A^C^T^E^R ^1 "
  4518. " ^1------------------------------------------------^1 "
  4519. " ^1 D^E^L^E^T^E ^1 ^1 D^E^L^E^T^E C^H^A^R^A^C^T^E^R ^1 "
  4520. " ^1 ^1 S^H^I^F^T ^1 D^E^L^E^T^E L^I^N^E ^1 "
  4521. " ^1------------------------------------------------^1 "
  4522. " ^1 H^O^M^E ^1 ^1 P^U^T C^U^R^S^O^R ^O^N H^O^M^E L^I^N^E ^1 "
  4523. " ^1------------------------------------------------^1 "
  4524. " ^1 E^N^D ^1 ^1 E^X^I^T I^N^S^E^R^T M^O^D^E ^1 "
  4525. " ^1 ^1 C^T^R^L ^1 D^E^L^E^T^E ^T^O E^N^D ^O^F L^I^N^E ^1 "
  4526. " ^1------------------------------------------------^1 "
  4527. " ^1 P^A^G^E U^P ^1 ^1 P^R^E^V^I^O^U^S S^C^R^E^E^N ^1 "
  4528. " ^1 ^1 S^H^I^F^T ^1 T^O^P ^1 "
  4529. " ^1 ^1 C^T^R^L ^1 H^A^L^F P^A^G^E F^O^R^W^A^R^D ^1 "
  4530. " ^1------------------------------------------------^1 "
  4531. " ^1 P^A^G^E D^O^W^N ^1 ^1 N^E^X^T S^C^R^E^E^N ^1 "
  4532. " ^1 ^1 S^H^I^F^T ^1 B^O^T^T^O^M ^1 "
  4533. " ^1 ^1 C^T^R^L ^1 H^A^L^F P^A^G^E B^A^C^K^W^A^R^D ^1 "
  4534. " +------------------------------------------------+ "
  4535. " "
  4536. " "
  4537. " T^H^E ^F^O^L^L^O^W^I^N^G ^F^I^L^E ^I^S ^R^E^Q^U^I^R^E^D ^T^O ^E^N^A^B^L^E ^T^H^E U^N^I^X ^H^O^S^T ^T^O ^U^S^E ^T^H^I^S TDU. "
  4538. " E^X^T^R^A^C^T ^I^T ^F^R^O^M ^T^H^I^S TDU ^A^N^D ^R^E^M^O^V^E ^T^H^E ^D^O^U^B^L^E-^Q^U^O^T^E^S ^F^R^O^M ^E^A^C^H ^E^N^D ^O^F ^T^H^E "
  4539. " ^L^I^N^E^S. I^T ^C^A^N ^T^H^E^N ^B^E ^U^S^E^D ^O^N ^Y^O^U^R U^N^I^X ^H^O^S^T ^W^H^E^N ^Y^O^U ^U^S^E ^X^T^E^R^M. "
  4540. " "
  4541. "!------------------- B^E^G^I^N^N^I^N^G ^O^F U^N^I^X ^F^I^L^E .X^D^E^F^A^U^L^T^S ----------------------"
  4542. "! "
  4543. "! D^E^F^I^N^E ^C^Y^B^E^R VT100 ^P^R^E^F^I^X, ^U^S^E ^X^R^D^B .X^D^E^F^A^U^L^T^S "
  4544. "! "
  4545. "! N^O^T^E: Y^O^U ^M^U^S^T ^A^L^L^O^W ^T^H^E ^C ^P^R^E-^P^R^O^C^E^S^S^O^R ^T^O ^R^U^N ^O^N ^T^H^I^S ^F^I^L^E. "
  4546. "! D^O NOT ^U^S^E ^T^H^E -^N^O^C^P^P ^O^P^T^I^O^N ^O^N ^T^H^E ^X^R^D^B ^C^O^M^M^A^N^D. "
  4547. "! "
  4548. "! T^O ^A^L^L^O^W ^T^H^E^S^E ^K^E^Y ^M^A^P^P^I^N^G^S ^T^O ^W^O^R^K, ^P^U^T ^T^H^E^M ^I^N ^A ^F^I^L^E ^O^N ^U^N^I^X, "
  4549. "! ^A^N^D ^E^X^E^C^U^T^E ^T^H^E ^C^O^M^M^A^N^D: "
  4550. "! ^X^R^D^B ^W^H^A^T^E^V^E^R_^F^I^L^E^N^A^M^E_^Y^O^U_^U^S^E^D "
  4551. "! T^H^E^N ^I^N^V^O^K^E ^A^N ^X^T^E^R^M ^L^I^K^E ^T^H^I^S: "
  4552. "! ^X^T^E^R^M -^N^A^M^E ^C^Y^B^E^R -132 -^J "
  4553. "! T^H^E '-^N^A^M^E ^C^Y^B^E^R' ^S^P^E^C^I^F^I^E^S ^U^S^E ^O^F ^T^H^E ^C^Y^B^E^R ^K^E^Y ^M^A^P^P^I^N^G. "
  4554. "! T^H^E '-132' ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^S^W^I^T^C^H^I^N^G ^T^O 132 ^C^O^L^U^M^N ^M^O^D^E ^I^S ^A^L^L^O^W^E^D. "
  4555. "! T^H^E '-^J' ^S^P^E^C^I^F^I^E^S ^U^S^E ^O^F ^J^U^M^P ^S^C^R^O^L^L^I^N^G ^I^N^S^T^E^A^D ^O^F ^S^M^O^O^T^H "
  4556. "! ^S^C^R^O^L^L^I^N^G (^T^H^I^S ^I^S ^O^P^T^I^O^N^A^L). "
  4557. "! "
  4558. "#^D^E^F^I^N^E CR ^S^T^R^I^N^G(0^X0^D) "
  4559. "#^D^E^F^I^N^E ESC ^S^T^R^I^N^G(0^X1^B) "
  4560. "#^D^E^F^I^N^E SH_FKEY ^S^T^R^I^N^G(0^X1^B) ^S^T^R^I^N^G([9) "
  4561. "#^D^E^F^I^N^E PREFIX ^S^T^R^I^N^G(0^X1^B) ^S^T^R^I^N^G([) "
  4562. "^C^Y^B^E^R*^S^C^R^O^L^LB^A^R: ^O^N "
  4563. "^C^Y^B^E^R*^S^A^V^EL^I^N^E^S: 150 "
  4564. "^C^Y^B^E^R*^B^O^R^D^E^RW^I^D^T^H: 2 "
  4565. "^C^Y^B^E^R*^F^O^N^T: 10^X20 "
  4566. "^C^Y^B^E^R*^B^O^L^DF^O^N^T: 10^X20B "
  4567. "^C^Y^B^E^R*VT100.^G^E^O^M^E^T^R^Y: 80^X43 "
  4568. "^C^Y^B^E^R*VT100.T^R^A^N^S^L^A^T^I^O^N^S: #^O^V^E^R^R^I^D^E\ "
  4569. *WEOR
  4570. TDUNCDT *** REMOVE THIS LINE WHEN USING AS INPUT TO *TDU*. ***
  4571.  
  4572. " TERMINAL DEFINITION FILE FOR NCD16/NCD19 X^T^E^R^M^I^N^A^L^S ^W^I^T^H ^T^Y^P^E ^A^H^E^A^D. "
  4573. " T^E^R^M^I^N^A^L ^M^U^S^T ^U^S^E ^X^T^E^R^M ^W^I^T^H ^S^P^E^C^I^A^L .X^D^E^F^A^U^L^T^S ^E^N^T^R^Y '^C^Y^B^E^R'. "
  4574.  
  4575. " "
  4576. " NCDX NOS T^E^R^M^I^N^A^L D^E^F^I^N^I^T^I^O^N K^E^Y M^A^P^P^I^N^G^S "
  4577. " "
  4578. " K^E^Y M^O^D^I^F^I^E^R A^C^T^I^O^N "
  4579. " +------------------------------------------------+ "
  4580. " ^1 F1 - F12 ^1 ^1 F1 - F12 ^1 "
  4581. " ^1 ^1 S^H^I^F^T ^1 F1 - F12 S^H^I^F^T^E^D ^1 "
  4582. " ^1------------------------------------------------^1 "
  4583. " ^1 F1 - F4 ^1 C^T^R^L ^1 F13 - F16 ^1 "
  4584. " ^1 ^1 A^L^T ^1 F13 - F16 S^H^I^F^T^E^D ^1 "
  4585. " ^1------------------------------------------------^1 "
  4586. " ^1 I^N^S^E^R^T ^1 ^1 E^N^T^E^R I^N^S^E^R^T M^O^D^E ^1 "
  4587. " ^1 ^1 S^H^I^F^T ^1 I^N^S^E^R^T L^I^N^E ^1 "
  4588. " ^1 ^1 C^T^R^L ^1 I^N^S^E^R^T C^H^A^R^A^C^T^E^R ^1 "
  4589. " ^1------------------------------------------------^1 "
  4590. " ^1 D^E^L^E^T^E ^1 ^1 D^E^L^E^T^E C^H^A^R^A^C^T^E^R ^1 "
  4591. " ^1 ^1 S^H^I^F^T ^1 D^E^L^E^T^E L^I^N^E ^1 "
  4592. " ^1------------------------------------------------^1 "
  4593. " ^1 H^O^M^E ^1 ^1 P^U^T C^U^R^S^O^R ^O^N H^O^M^E L^I^N^E ^1 "
  4594. " ^1------------------------------------------------^1 "
  4595. " ^1 E^N^D ^1 ^1 E^X^I^T I^N^S^E^R^T M^O^D^E ^1 "
  4596. " ^1 ^1 C^T^R^L ^1 D^E^L^E^T^E ^T^O E^N^D ^O^F L^I^N^E ^1 "
  4597. " ^1------------------------------------------------^1 "
  4598. " ^1 P^A^G^E U^P ^1 ^1 P^R^E^V^I^O^U^S S^C^R^E^E^N ^1 "
  4599. " ^1 ^1 S^H^I^F^T ^1 T^O^P ^1 "
  4600. " ^1 ^1 C^T^R^L ^1 H^A^L^F P^A^G^E F^O^R^W^A^R^D ^1 "
  4601. " ^1------------------------------------------------^1 "
  4602. " ^1 P^A^G^E D^O^W^N ^1 ^1 N^E^X^T S^C^R^E^E^N ^1 "
  4603. " ^1 ^1 S^H^I^F^T ^1 B^O^T^T^O^M ^1 "
  4604. " ^1 ^1 C^T^R^L ^1 H^A^L^F P^A^G^E B^A^C^K^W^A^R^D ^1 "
  4605. " +------------------------------------------------+ "
  4606. " "
  4607. " "
  4608. " T^H^E ^F^O^L^L^O^W^I^N^G ^F^I^L^E ^I^S ^R^E^Q^U^I^R^E^D ^T^O ^E^N^A^B^L^E ^T^H^E U^N^I^X ^H^O^S^T ^T^O ^U^S^E ^T^H^I^S TDU. "
  4609. " E^X^T^R^A^C^T ^I^T ^F^R^O^M ^T^H^I^S TDU ^A^N^D ^R^E^M^O^V^E ^T^H^E ^D^O^U^B^L^E-^Q^U^O^T^E^S ^F^R^O^M ^E^A^C^H ^E^N^D ^O^F ^T^H^E "
  4610. " ^L^I^N^E^S. I^T ^C^A^N ^T^H^E^N ^B^E ^U^S^E^D ^O^N ^Y^O^U^R U^N^I^X ^H^O^S^T ^W^H^E^N ^Y^O^U ^U^S^E ^X^T^E^R^M. "
  4611. " "
  4612. "!------------------- B^E^G^I^N^N^I^N^G ^O^F U^N^I^X ^F^I^L^E .X^D^E^F^A^U^L^T^S ----------------------"
  4613. "! "
  4614. "! D^E^F^I^N^E ^C^Y^B^E^R VT100 ^P^R^E^F^I^X, ^U^S^E ^X^R^D^B .X^D^E^F^A^U^L^T^S "
  4615. "! "
  4616. "! N^O^T^E: Y^O^U ^M^U^S^T ^A^L^L^O^W ^T^H^E ^C ^P^R^E-^P^R^O^C^E^S^S^O^R ^T^O ^R^U^N ^O^N ^T^H^I^S ^F^I^L^E. "
  4617. "! D^O NOT ^U^S^E ^T^H^E -^N^O^C^P^P ^O^P^T^I^O^N ^O^N ^T^H^E ^X^R^D^B ^C^O^M^M^A^N^D. "
  4618. "! "
  4619. "! T^O ^A^L^L^O^W ^T^H^E^S^E ^K^E^Y ^M^A^P^P^I^N^G^S ^T^O ^W^O^R^K, ^P^U^T ^T^H^E^M ^I^N ^A ^F^I^L^E ^O^N ^U^N^I^X, "
  4620. "! ^A^N^D ^E^X^E^C^U^T^E ^T^H^E ^C^O^M^M^A^N^D: "
  4621. "! ^X^R^D^B ^W^H^A^T^E^V^E^R_^F^I^L^E^N^A^M^E_^Y^O^U_^U^S^E^D "
  4622. "! T^H^E^N ^I^N^V^O^K^E ^A^N ^X^T^E^R^M ^L^I^K^E ^T^H^I^S: "
  4623. "! ^X^T^E^R^M -^N^A^M^E ^C^Y^B^E^R -132 -^J "
  4624. "! T^H^E '-^N^A^M^E ^C^Y^B^E^R' ^S^P^E^C^I^F^I^E^S ^U^S^E ^O^F ^T^H^E ^C^Y^B^E^R ^K^E^Y ^M^A^P^P^I^N^G. "
  4625. "! T^H^E '-132' ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^S^W^I^T^C^H^I^N^G ^T^O 132 ^C^O^L^U^M^N ^M^O^D^E ^I^S ^A^L^L^O^W^E^D. "
  4626. "! T^H^E '-^J' ^S^P^E^C^I^F^I^E^S ^U^S^E ^O^F ^J^U^M^P ^S^C^R^O^L^L^I^N^G ^I^N^S^T^E^A^D ^O^F ^S^M^O^O^T^H "
  4627. "! ^S^C^R^O^L^L^I^N^G (^T^H^I^S ^I^S ^O^P^T^I^O^N^A^L). "
  4628. "! "
  4629. "#^D^E^F^I^N^E CR ^S^T^R^I^N^G(0^X0^D) "
  4630. "#^D^E^F^I^N^E ESC ^S^T^R^I^N^G(0^X1^B) "
  4631. "#^D^E^F^I^N^E SH_FKEY ^S^T^R^I^N^G(0^X1^B) ^S^T^R^I^N^G([9) "
  4632. "#^D^E^F^I^N^E PREFIX ^S^T^R^I^N^G(0^X1^B) ^S^T^R^I^N^G([) "
  4633. "^C^Y^B^E^R*^S^C^R^O^L^LB^A^R: ^O^N "
  4634. "^C^Y^B^E^R*^S^A^V^EL^I^N^E^S: 150 "
  4635. "^C^Y^B^E^R*^B^O^R^D^E^RW^I^D^T^H: 2 "
  4636. "^C^Y^B^E^R*^F^O^N^T: 10^X20 "
  4637. "^C^Y^B^E^R*^B^O^L^DF^O^N^T: 10^X20B "
  4638. "^C^Y^B^E^R*VT100.^G^E^O^M^E^T^R^Y: 80^X43 "
  4639. "^C^Y^B^E^R*VT100.T^R^A^N^S^L^A^T^I^O^N^S: #^O^V^E^R^R^I^D^E\ "
  4640. *NOSEQ
  4641. *WIDTH 95
  4642. MODULE ^T^D^U^I^N;
  4643.  
  4644. ?? SET ( CHKALL @D= ON ), RIGHT @D= 110 ??
  4645.  
  4646. ^0 M^O^D^U^L^E @D TDUIN ^2
  4647. ^0 C^O^P^Y^R^I^G^H^T C^O^N^T^R^O^L D^A^T^A S^Y^S^T^E^M^S I^N^C. 1992. ^2
  4648. ^0 W^R^I^T^T^E^N@D 1/84 ^B^Y R. L^I^N^D^S^E^Y ^2
  4649. ^0 V^E^R^S^I^O^N@D C^Y^B^E^R 170, ^V^E^R^S^I^O^N 1 ^2
  4650. ^0 P^U^R^P^O^S^E@D T^H^I^S ^M^O^D^U^L^E ^P^R^O^V^I^D^E^S ^T^H^E ^I^N^P^U^T ^R^E^A^D^I^N^G ^A^N^D ^P^A^R^S^I^N^G ^F^U^N^C^T^I^O^N^S ^2
  4651. ^0 ^O^F ^T^H^E TDL ^L^A^N^G^U^A^G^E ^O^N ^B^E^H^A^L^F ^O^F ^T^H^E TDU ^P^R^O^G^R^A^M. ^2
  4652.  
  4653. ^0 ?? PUSH ( LIST @D= OFF ) ?? ^0^U^S^E ^T^H^I^S ^L^I^N^E ^T^O ^S^U^P^P^R^E^S^S ^C^O^M^M^D^E^C^K ^L^I^S^T^2
  4654. ?? PUSH ( LIST @D= ON ) ?? ^0^U^S^E ^T^H^I^S ^L^I^N^E ^T^O ^L^I^S^T ^C^O^M^M^O^N ^D^E^C^K^S ^2
  4655.  
  4656. ?? NEWTITLE @D= 'SCL ^P^A^R^S^I^N^G ^D^E^C^L^A^R^A^T^I^O^N^S' ??
  4657. ?? SKIP @D= 4 ??
  4658.  
  4659. ^0 ****************************** ^2
  4660. ^0 SCL ^T^Y^P^E^S ^A^N^D ^R^O^U^T^I^N^E^S ^F^O^L^L^O^W@D ^2
  4661. *CALL ZTDPCLP
  4662. *CALL ZUTVCTT
  4663.  
  4664. ^0 ***************** ^2
  4665. ^0 ^E^R^R^O^R ^C^O^N^D^I^T^I^O^N^S@D ^2
  4666. *CALL ZTDCCON
  4667. *CALL ZTDCCLC
  4668.  
  4669. ?? OLDTITLE ??
  4670. ?? NEWTITLE @D= 'PDT''^S ^F^O^R TDL' ??
  4671. ?? EJECT ??
  4672.  
  4673. ^0 ********************* ^2
  4674. ^0 PDT'^S ^F^O^R TDL ^F^O^L^L^O^W@D ^2
  4675. *CALL ZTDVPDT
  4676.  
  4677. ?? OLDTITLE ??
  4678. ?? NEWTITLE @D= 'ZTDTTAB' ??
  4679. ?? EJECT ??
  4680.  
  4681. ^0 **************************** ^2
  4682. ^0 ^C^O^M^M^O^N ^D^E^C^K ZTDTTAB ^F^O^L^L^O^W^S@D ^2
  4683. *CALL ZTDTTAB
  4684.  
  4685. ?? OLDTITLE ??
  4686. ?? NEWTITLE @D= 'ZTDVERB' ??
  4687. ?? EJECT ??
  4688.  
  4689. ^0 **************************** ^2
  4690. ^0 ^C^O^M^M^O^N ^D^E^C^K ZTDVERB ^F^O^L^L^O^W^S@D ^2
  4691. *CALL ZTDVERB
  4692.  
  4693. ?? OLDTITLE ??
  4694. ?? NEWTITLE @D= '^T^D^U XREF''^S' ??
  4695. ?? EJECT ??
  4696.  
  4697. ^0 ***************** ^2
  4698. ^0 ^T^D^U ^F^I^L^E ^H^A^N^D^L^E^R@D ^2
  4699. *CALL ZTDPFIL
  4700.  
  4701. ^0 ************************** ^2
  4702. ^0 ^T^D^U ^E^R^R^O^R ^H^A^N^D^L^E^R ^F^O^L^L^O^W^S@D ^2
  4703. *CALL ZTDPERR
  4704.  
  4705. ^0 ****************************** ^2
  4706. ^0 ^T^A^B^L^E-^H^A^N^D^L^I^N^G ^S^T^O^R^E ^P^R^O^C^E^D^U^R^E^S ^2
  4707. *CALLC ZTDPTBS
  4708.  
  4709. ?? OLDTITLE ??
  4710. ?? NEWTITLE @D= '^T^D^U^I^N ^V^A^R^I^A^B^L^E^S' ??
  4711. ?? EJECT ??
  4712. ?? POP ??
  4713.  
  4714. VAR
  4715. ^L^I^N^E_^L^E^N^G^T^H@D INTEGER,
  4716. ^L^I^N^E_^B^U^F^F^E^R@D STRING(^O^S^C$^M^A^X_^S^T^R^I^N^G_^S^I^Z^E),
  4717. ^L^I^N^E_^N^U^M^B^E^R@D INTEGER @D= 0,
  4718.  
  4719. ^S^O^U^R^C^E_^S^T^R^I^N^G@D STRING(^O^S^C$^M^A^X_^S^T^R^I^N^G_^S^I^Z^E), ^0 ^F^O^R ^P^A^R^S^E^R ^T^O ^S^C^A^N ^2
  4720. ^S^O^U^R^C^E_^L^E^N^G^T^H@D ^C^L^T$^S^T^R^I^N^G_^I^N^D^E^X, ^0 ^V^A^L^I^D ^L^E^N^G^T^H ^O^F ^S^O^U^R^C^E_^S^T^R^I^N^G ^2
  4721. ^S^O^U^R^C^E_^I^N^D^E^X@D ^C^L^T$^S^T^R^I^N^G_^I^N^D^E^X, ^0 ^C^U^R^R^E^N^T ^S^C^A^N ^P^O^S^I^T^I^O^N ^I^N ^S^O^U^R^C^E ^2
  4722. ^O^L^D_^I^N^D^E^X@D ^C^L^T$^S^T^R^I^N^G_^I^N^D^E^X, ^0 ^S^A^V^E^D ^S^C^A^N ^P^O^S^I^T^I^O^N ^2
  4723. ^P^D^T@D @B^C^L^T$^P^A^R^A^M^E^T^E^R_^D^E^S^C^R^I^P^T^O^R_^T^A^B^L^E, ^0 ^T^H^E ^P^D^T ^F^O^R ^T^H^E ^C^U^R^R^E^N^T ^V^E^R^B ^2
  4724. ^P^V^T@D @B^C^L^T$^P^A^R^A^M^E^T^E^R_^V^A^L^U^E_^T^A^B^L^E, ^0 ^R^E^T^U^R^N^E^D ^P^V^T ^F^R^O^M ^T^H^E ^P^A^R^S^E ^2
  4725. ^S^T^A^T^U^S@D ^O^S^T$^S^T^A^T^U^S,
  4726.  
  4727. ^E^M^P^T^Y_^F^I^L^E@D BOOLEAN,
  4728. ^E^R^R^O^R_^R^E^T^U^R^N@D ^E^R^R^O^R_^T^Y^P^E,
  4729. ^P^A^R^M_^R^E^C@D ^P^A^R^A^M^E^T^E^R_^R^E^C^O^R^D,
  4730.  
  4731. ^S^I^Z^E_^N^D^X: INTEGER,
  4732. ^J^U^N^K_^S^T^R^I^N^G@D STRING(80),
  4733. ^J^U^N^K_^L^E^N@D INTEGER;
  4734.  
  4735. TYPE
  4736. ^T^D^L_^V^A^R^I^A^B^L^E = PACKED RECORD ^0 ^M^Y ^S^P^E^C^I^A^L^I^Z^E^D ^V^E^R^S^I^O^N ^O^F ^C^L^T$^V^A^R^I^A^B^L^E^2
  4737. ^N^A^M^E@D ^O^S^T$^N^A^M^E,
  4738. ^N^E^X^T_^V^A^R^I^A^B^L^E@D @B^T^D^L_^V^A^R^I^A^B^L^E,
  4739. ^S^T^R_^L^E^N^G^T^H@D 0 .. ^O^S^C$^M^A^X_^S^T^R^I^N^G_^S^I^Z^E,
  4740. ^V^A^L^U^E@D @BSTRING(*),
  4741. RECEND;
  4742.  
  4743. VAR
  4744. ^V^A^R^I^A^B^L^E_^L^I^S^T@D @B^T^D^L_^V^A^R^I^A^B^L^E;
  4745.  
  4746. ?? OLDTITLE ??
  4747. ?? NEWTITLE @D= '^R^E^A^D_^T^D^L_^S^T^A^T^E^M^E^N^T^S' ??
  4748. ?? EJECT ??
  4749.  
  4750. PROCEDURE [XDCL] ^R^E^A^D_^T^D^L_^S^T^A^T^E^M^E^N^T^S;
  4751.  
  4752. ?? NEWTITLE @D= '^S^O^U^R^C^E_^E^R^R^O^R' ??
  4753. ?? SKIP @D= 4 ??
  4754.  
  4755. PROCEDURE ^S^O^U^R^C^E_^E^R^R^O^R (^S^T^A^T^U^S@D ^O^S^T$^S^T^A^T^U^S);
  4756. VAR
  4757. ^L^E^N^G^T^H@D 0 .. ^O^S^C$^M^A^X_^S^T^R^I^N^G_^S^I^Z^E,
  4758. ^M^S^G@D STRING(^O^S^C$^M^A^X_^S^T^R^I^N^G_^S^I^Z^E + 7);
  4759.  
  4760. ^E^R^R^O^R_^S^T^A^T^U^S(^S^T^A^T^U^S);
  4761. ^M^S^G @D= '';
  4762. STRINGREP(^M^S^G, ^L^E^N^G^T^H, ^L^I^N^E_^N^U^M^B^E^R@D 5, '@D ',
  4763. ^S^O^U^R^C^E_^S^T^R^I^N^G(1,^S^O^U^R^C^E_^L^E^N^G^T^H));
  4764. ^R^E^P^O^R^T_^E^R^R^O^R(^M^S^G(1,^L^E^N^G^T^H));
  4765. ^M^S^G @D= '';
  4766. IF ( 7 + ^S^O^U^R^C^E_^I^N^D^E^X ) > ^L^E^N^G^T^H THEN
  4767. ^M^S^G(^L^E^N^G^T^H) @D= '@B'
  4768. ELSE
  4769. ^M^S^G(7 + ^S^O^U^R^C^E_^I^N^D^E^X) @D= '@B'
  4770. IFEND;
  4771. ^R^E^P^O^R^T_^E^R^R^O^R(^M^S^G(1,^L^E^N^G^T^H));
  4772. PROCEND ^S^O^U^R^C^E_^E^R^R^O^R;
  4773. ?? OLDTITLE ??
  4774.  
  4775. ?? NEWTITLE @D= '^A^D^D_^V^A^R^I^A^B^L^E_^T^O_^S^Y^M^B^O^L_^T^A^B^L^E' ??
  4776. ?? EJECT ??
  4777.  
  4778. PROCEDURE ^A^D^D_^V^A^R^I^A^B^L^E_^T^O_^S^Y^M^B^O^L_^T^A^B^L^E (^N^A^M^E@D ^O^S^T$^N^A^M^E_^D^E^S^C^R^I^P^T^O^R;
  4779. VAR ^V^A^R^I^A^B^L^E@D @B^T^D^L_^V^A^R^I^A^B^L^E; VAR ^E^R^R^O^R_^R^E^T^U^R^N@D ^E^R^R^O^R_^T^Y^P^E);
  4780.  
  4781. ALLOCATE ^V^A^R^I^A^B^L^E;
  4782. IF ^V^A^R^I^A^B^L^E = NIL THEN
  4783. ^E^R^R^O^R_^R^E^T^U^R^N @D= ^N^O_^R^O^O^M_^E^R^R^O^R;
  4784. ^O^S^P$^S^E^T_^S^T^A^T^U^S_^A^B^N^O^R^M^A^L(^T^D^C_^P^R^O^D_^C^O^D^E, ^C^L^C$^T^A^B^L^E_^O^V^E^R^F^L^O^W,
  4785. ^N^A^M^E.^S^T^R(1,^N^A^M^E.^L^E^N^G^T^H), ^S^T^A^T^U^S);
  4786. ^O^S^P$^A^P^P^E^N^D_^S^T^A^T^U^S_^P^A^R^A^M^E^T^E^R(
  4787. ' ', ^O^S^C$^S^T^A^T^U^S_^P^A^R^A^M^E^T^E^R_^D^E^L^I^M^I^T^E^R, ^S^T^A^T^U^S);
  4788. ^S^O^U^R^C^E_^E^R^R^O^R(^S^T^A^T^U^S)
  4789. ELSE
  4790. ^E^R^R^O^R_^R^E^T^U^R^N @D= ^N^O_^E^R^R^O^R;
  4791. ^V^A^R^I^A^B^L^E@B.^N^A^M^E @D= ^N^A^M^E.^S^T^R(1,^N^A^M^E.^L^E^N^G^T^H);
  4792. ^V^A^R^I^A^B^L^E@B.^N^E^X^T_^V^A^R^I^A^B^L^E @D= ^V^A^R^I^A^B^L^E_^L^I^S^T;
  4793. ^V^A^R^I^A^B^L^E@B.^S^T^R_^L^E^N^G^T^H @D= 0;
  4794. ^V^A^R^I^A^B^L^E@B.^V^A^L^U^E @D= NIL;
  4795. ^V^A^R^I^A^B^L^E_^L^I^S^T @D= ^V^A^R^I^A^B^L^E
  4796. IFEND
  4797. PROCEND ^A^D^D_^V^A^R^I^A^B^L^E_^T^O_^S^Y^M^B^O^L_^T^A^B^L^E;
  4798. ?? OLDTITLE ??
  4799.  
  4800. ?? NEWTITLE @D= '^A^S^S^I^G^N_^V^A^L^U^E_^T^O_^V^A^R^I^A^B^L^E' ??
  4801. ?? SKIP @D= 4 ??
  4802.  
  4803. PROCEDURE ^A^S^S^I^G^N_^V^A^L^U^E_^T^O_^V^A^R^I^A^B^L^E (^V^A^L^U^E_^S^T^R^I^N^G@D STRING(*);
  4804. ^V^A^L^U^E_^L^E^N^G^T^H@D 0 .. ^O^S^C$^M^A^X_^S^T^R^I^N^G_^S^I^Z^E;
  4805. VAR ^V^A^R^I^A^B^L^E@D @B^T^D^L_^V^A^R^I^A^B^L^E; VAR ^E^R^R^O^R_^R^E^T^U^R^N@D ^E^R^R^O^R_^T^Y^P^E);
  4806.  
  4807. IF ^V^A^R^I^A^B^L^E@B.^V^A^L^U^E <> NIL THEN
  4808. FREE ^V^A^R^I^A^B^L^E@B.^V^A^L^U^E
  4809. IFEND;
  4810. IF ^V^A^L^U^E_^L^E^N^G^T^H > 0 THEN
  4811. ALLOCATE ^V^A^R^I^A^B^L^E@B.^V^A^L^U^E @D [ ^V^A^L^U^E_^L^E^N^G^T^H ]
  4812. ELSE
  4813. ALLOCATE ^V^A^R^I^A^B^L^E@B.^V^A^L^U^E @D [ 1 ]
  4814. IFEND;
  4815. IF ^V^A^R^I^A^B^L^E@B.^V^A^L^U^E = NIL THEN
  4816. ^O^S^P$^S^E^T_^S^T^A^T^U^S_^A^B^N^O^R^M^A^L(^T^D^C_^P^R^O^D_^C^O^D^E, ^C^L^C$^T^A^B^L^E_^O^V^E^R^F^L^O^W,
  4817. ^V^A^R^I^A^B^L^E@B.^N^A^M^E, ^S^T^A^T^U^S);
  4818. ^O^S^P$^A^P^P^E^N^D_^S^T^A^T^U^S_^P^A^R^A^M^E^T^E^R(
  4819. ' ', ^O^S^C$^S^T^A^T^U^S_^P^A^R^A^M^E^T^E^R_^D^E^L^I^M^I^T^E^R, ^S^T^A^T^U^S);
  4820. ^S^O^U^R^C^E_^E^R^R^O^R(^S^T^A^T^U^S);
  4821. ^E^R^R^O^R_^R^E^T^U^R^N @D= ^N^O_^R^O^O^M_^E^R^R^O^R;
  4822. ELSE
  4823. ^E^R^R^O^R_^R^E^T^U^R^N @D= ^N^O_^E^R^R^O^R;
  4824. ^V^A^R^I^A^B^L^E@B.^S^T^R_^L^E^N^G^T^H @D= ^V^A^L^U^E_^L^E^N^G^T^H;
  4825. ^V^A^R^I^A^B^L^E@B.^V^A^L^U^E@B @D= ^V^A^L^U^E_^S^T^R^I^N^G(1,^V^A^L^U^E_^L^E^N^G^T^H)
  4826. IFEND
  4827. PROCEND ^A^S^S^I^G^N_^V^A^L^U^E_^T^O_^V^A^R^I^A^B^L^E;
  4828. ?? OLDTITLE ??
  4829.  
  4830. ?? NEWTITLE @D= '^I^N^I^T^I^A^L^I^Z^E_^P^A^R^S^I^N^G_^T^A^B^L^E^S' ??
  4831. ?? EJECT ??
  4832.  
  4833. PROCEDURE ^I^N^I^T^I^A^L^I^Z^E_^P^A^R^S^I^N^G_^T^A^B^L^E^S;
  4834. VAR
  4835. ^V^A^R_^N^D^X@D INTEGER,
  4836. ^C^H^A^R_^V^A^L^U^E@D STRING(1),
  4837. ^N^A^M^E@D ^O^S^T$^N^A^M^E_^D^E^S^C^R^I^P^T^O^R,
  4838. ^V^A^R^I^A^B^L^E@D @B^T^D^L_^V^A^R^I^A^B^L^E,
  4839. ^E^R^R^O^R_^R^E^T^U^R^N@D ^E^R^R^O^R_^T^Y^P^E;
  4840.  
  4841. ^V^A^R^I^A^B^L^E_^L^I^S^T @D= NIL;
  4842. FOR ^V^A^R_^N^D^X @D= 1 TO ^P^R^E^D^E^F^I^N^E^D_^V^A^R^I^A^B^L^E_^C^O^U^N^T DO
  4843. ^N^A^M^E.^L^E^N^G^T^H @D= ^P^R^E^D^E^F^I^N^E^D_^V^A^R^I^A^B^L^E^S[^V^A^R_^N^D^X].^L^E^N^G^T^H;
  4844. ^N^A^M^E.^S^T^R @D= ^P^R^E^D^E^F^I^N^E^D_^V^A^R^I^A^B^L^E^S[^V^A^R_^N^D^X].^N^A^M^E;
  4845. ^A^D^D_^V^A^R^I^A^B^L^E_^T^O_^S^Y^M^B^O^L_^T^A^B^L^E(^N^A^M^E, ^V^A^R^I^A^B^L^E, ^E^R^R^O^R_^R^E^T^U^R^N);
  4846. IF ^E^R^R^O^R_^R^E^T^U^R^N = ^N^O_^E^R^R^O^R THEN
  4847. ^C^H^A^R_^V^A^L^U^E(1) @D= CHR(^P^R^E^D^E^F^I^N^E^D_^V^A^R^I^A^B^L^E^S[^V^A^R_^N^D^X].^A^S^C^I^I);
  4848. ^A^S^S^I^G^N_^V^A^L^U^E_^T^O_^V^A^R^I^A^B^L^E(^C^H^A^R_^V^A^L^U^E, 1, ^V^A^R^I^A^B^L^E, ^E^R^R^O^R_^R^E^T^U^R^N)
  4849. IFEND
  4850. FOREND
  4851. PROCEND ^I^N^I^T^I^A^L^I^Z^E_^P^A^R^S^I^N^G_^T^A^B^L^E^S;
  4852. ?? OLDTITLE ??
  4853.  
  4854. ?? NEWTITLE @D= '^O^P^E^N_^I^N^P^U^T_^F^I^L^E' ??
  4855. ?? SKIP @D= 4 ??
  4856.  
  4857. PROCEDURE ^O^P^E^N_^I^N^P^U^T_^F^I^L^E;
  4858. ^O^P^E^N_^F^I^L^E(^I^N^P^U^T_^F^I^L^E_^S^E^L, ^I^N^P^U^T_^S^E^L, ^A^S^C^I^I_^S^E^L);
  4859. ^L^I^N^E_^N^U^M^B^E^R @D= 0
  4860. PROCEND ^O^P^E^N_^I^N^P^U^T_^F^I^L^E;
  4861. ?? OLDTITLE ??
  4862.  
  4863. ?? NEWTITLE @D= '^R^E^A^D_^L^I^N^E' ??
  4864. ?? SKIP @D= 4 ??
  4865.  
  4866. PROCEDURE ^R^E^A^D_^L^I^N^E (VAR ^E^O^F_^F^L^A^G@D BOOLEAN);
  4867. ^G^E^T_^F^I^L^E(^I^N^P^U^T_^F^I^L^E_^S^E^L, ^L^I^N^E_^B^U^F^F^E^R, ^L^I^N^E_^L^E^N^G^T^H, ^E^O^F_^F^L^A^G);
  4868. ^L^I^N^E_^N^U^M^B^E^R @D= ^L^I^N^E_^N^U^M^B^E^R + 1
  4869. PROCEND ^R^E^A^D_^L^I^N^E;
  4870. ?? OLDTITLE ??
  4871.  
  4872. ?? NEWTITLE @D= '^A^N^A^L^Y^Z^E_^L^I^N^E^S' ??
  4873. ?? EJECT ??
  4874.  
  4875. PROCEDURE ^A^N^A^L^Y^Z^E_^L^I^N^E^S;
  4876. VAR
  4877. ^E^O^F_^F^L^A^G,
  4878. ^F^O^U^N^D@D BOOLEAN,
  4879. ^P^A^R^M_^N^D^X@D INTEGER,
  4880. ^V^E^R^B_^T^Y^P@D ^V^E^R^B_^T^Y^P^E,
  4881. ^I^N_^O^R^D^I^N^A^L@D ^O^R^D^I^N^A^L_^T^Y^P^E,
  4882. ^O^U^T_^O^R^D^I^N^A^L@D ^O^R^D^I^N^A^L_^T^Y^P^E,
  4883. ^T^O^K^E^N@D ^C^L^T$^T^O^K^E^N;
  4884.  
  4885. ?? NEWTITLE @D= '^T^E^S^T_^P^A^R^M_^G^I^V^E^N' ??
  4886. ?? EJECT ??
  4887.  
  4888. PROCEDURE ^T^E^S^T_^P^A^R^M_^G^I^V^E^N (^P^A^R^M_^N^A^M^E@D STRING(*); VAR ^G^I^V^E^N@D BOOLEAN);
  4889. ^C^L^P$^T^E^S^T_^P^A^R^A^M^E^T^E^R(^P^V^T, ^P^A^R^M_^N^A^M^E, ^G^I^V^E^N, ^S^T^A^T^U^S);
  4890. IF NOT ^G^I^V^E^N THEN
  4891. ^O^S^P$^S^E^T_^S^T^A^T^U^S_^A^B^N^O^R^M^A^L(^T^D^C_^P^R^O^D_^C^O^D^E,
  4892. ^C^L^C$^R^E^Q^U^I^R^E^D_^P^A^R^A^M^E^T^E^R_^M^I^S^S^I^N^G, ^P^A^R^M_^N^A^M^E, ^S^T^A^T^U^S);
  4893. ^O^S^P$^A^P^P^E^N^D_^S^T^A^T^U^S_^P^A^R^A^M^E^T^E^R(
  4894. ' ', ^O^S^C$^S^T^A^T^U^S_^P^A^R^A^M^E^T^E^R_^D^E^L^I^M^I^T^E^R, ^S^T^A^T^U^S);
  4895. ^S^O^U^R^C^E_^E^R^R^O^R(^S^T^A^T^U^S)
  4896. IFEND
  4897. PROCEND ^T^E^S^T_^P^A^R^M_^G^I^V^E^N;
  4898. ?? OLDTITLE ??
  4899.  
  4900. ?? NEWTITLE @D= '^P^A^R^M_^T^O_^N^A^M^E' ??
  4901. ?? SKIP @D= 4 ??
  4902.  
  4903. PROCEDURE ^P^A^R^M_^T^O_^N^A^M^E (^P^A^R^M_^N^A^M^E@D STRING(*); VAR ^R^E^S^U^L^T@D STRING(*);
  4904. VAR ^R^E^S^U^L^T_^L^E^N^G^T^H@D ^O^S^T$^S^T^R^I^N^G_^S^I^Z^E);
  4905. VAR
  4906. ^G^I^V^E^N@D BOOLEAN,
  4907. ^V^A^L^U^E@D ^C^L^T$^V^A^L^U^E;
  4908.  
  4909. ^T^E^S^T_^P^A^R^M_^G^I^V^E^N(^P^A^R^M_^N^A^M^E, ^G^I^V^E^N);
  4910. IF NOT ^G^I^V^E^N THEN
  4911. ^R^E^S^U^L^T_^L^E^N^G^T^H @D= 0
  4912. ELSE
  4913. ^C^L^P$^G^E^T_^V^A^L^U^E(^P^V^T, ^P^A^R^M_^N^A^M^E, 1, 1, ^C^L^C$^L^O^W, ^V^A^L^U^E, ^S^T^A^T^U^S);
  4914. ^C^L^P$^C^O^N^V^E^R^T_^V^A^L^U^E_^T^O_^S^T^R^I^N^G(^V^A^L^U^E, ^R^E^S^U^L^T, ^R^E^S^U^L^T_^L^E^N^G^T^H,
  4915. ^S^T^A^T^U^S);
  4916. IF NOT ^S^T^A^T^U^S.^N^O^R^M^A^L THEN
  4917. ^S^O^U^R^C^E_^E^R^R^O^R(^S^T^A^T^U^S)
  4918. IFEND
  4919. IFEND
  4920. PROCEND ^P^A^R^M_^T^O_^N^A^M^E;
  4921. ?? OLDTITLE ??
  4922.  
  4923. ?? NEWTITLE @D= '^P^A^R^M_^T^O_^I^N^T^E^G^E^R' ??
  4924. ?? SKIP @D= 4 ??
  4925.  
  4926. PROCEDURE ^P^A^R^M_^T^O_^I^N^T^E^G^E^R (^P^A^R^M_^N^A^M^E@D STRING(*); VAR ^R^E^S^U^L^T@D INTEGER);
  4927. VAR
  4928. ^G^I^V^E^N@D BOOLEAN,
  4929. ^T^E^M^P_^I^N^T^E^G^E^R@D ^C^L^T$^I^N^T^E^G^E^R,
  4930. ^V^A^L^U^E@D ^C^L^T$^V^A^L^U^E;
  4931.  
  4932. ^T^E^S^T_^P^A^R^M_^G^I^V^E^N(^P^A^R^M_^N^A^M^E, ^G^I^V^E^N);
  4933. IF NOT ^G^I^V^E^N THEN
  4934. ^R^E^S^U^L^T @D= 0
  4935. ELSE
  4936. ^C^L^P$^G^E^T_^V^A^L^U^E(^P^V^T, ^P^A^R^M_^N^A^M^E, 1, 1, ^C^L^C$^L^O^W, ^V^A^L^U^E, ^S^T^A^T^U^S);
  4937. ^C^L^P$^C^O^N^V^E^R^T_^V^A^L^U^E_^T^O_^I^N^T^E^G^E^R(^V^A^L^U^E, ^T^E^M^P_^I^N^T^E^G^E^R, ^S^T^A^T^U^S);
  4938. IF ^S^T^A^T^U^S.^N^O^R^M^A^L THEN
  4939. ^R^E^S^U^L^T @D= ^T^E^M^P_^I^N^T^E^G^E^R.^I^N^T
  4940. ELSE
  4941. ^S^O^U^R^C^E_^E^R^R^O^R(^S^T^A^T^U^S)
  4942. IFEND
  4943. IFEND
  4944. PROCEND ^P^A^R^M_^T^O_^I^N^T^E^G^E^R;
  4945. ?? OLDTITLE ??
  4946.  
  4947. ?? NEWTITLE @D= '^P^A^R^M_^T^O_^B^O^O^L^E^A^N' ??
  4948. ?? SKIP @D= 4 ??
  4949.  
  4950. PROCEDURE ^P^A^R^M_^T^O_^B^O^O^L^E^A^N (^P^A^R^M_^N^A^M^E@D STRING(*); VAR ^R^E^S^U^L^T@D BOOLEAN);
  4951. VAR
  4952. ^G^I^V^E^N@D BOOLEAN,
  4953. ^V^A^L^U^E@D ^C^L^T$^V^A^L^U^E;
  4954.  
  4955. ^T^E^S^T_^P^A^R^M_^G^I^V^E^N(^P^A^R^M_^N^A^M^E, ^G^I^V^E^N);
  4956. IF NOT ^G^I^V^E^N THEN
  4957. ^R^E^S^U^L^T @D= FALSE
  4958. ELSE
  4959. ^C^L^P$^G^E^T_^V^A^L^U^E(^P^V^T, ^P^A^R^M_^N^A^M^E, 1, 1, ^C^L^C$^L^O^W, ^V^A^L^U^E, ^S^T^A^T^U^S);
  4960. ^C^L^P$^C^O^N^V^E^R^T_^V^A^L^U^E_^T^O_^B^O^O^L^E^A^N(^V^A^L^U^E, ^R^E^S^U^L^T, ^S^T^A^T^U^S);
  4961. IF NOT ^S^T^A^T^U^S.^N^O^R^M^A^L THEN
  4962. ^S^O^U^R^C^E_^E^R^R^O^R(^S^T^A^T^U^S)
  4963. IFEND
  4964. IFEND
  4965. PROCEND ^P^A^R^M_^T^O_^B^O^O^L^E^A^N;
  4966. ?? OLDTITLE ??
  4967.  
  4968. ?? NEWTITLE @D= '^P^A^R^M_^T^O_^S^T^R^I^N^G' ??
  4969. ?? SKIP @D= 4 ??
  4970.  
  4971. PROCEDURE ^P^A^R^M_^T^O_^S^T^R^I^N^G (^P^A^R^M_^N^A^M^E@D STRING(*);
  4972. VAR ^R^E^S^U^L^T@D STRING(*);
  4973. VAR ^R^E^S^U^L^T_^L^E^N^G^T^H@D ^O^S^T$^S^T^R^I^N^G_^S^I^Z^E);
  4974. ^0 ^S^P^E^C^I^A^L ^C^A^S^E@D ^T^H^I^S ^R^O^U^T^I^N^E ^T^A^K^E^S ^A ^M^U^L^T^I-^V^A^L^U^E^D ^P^A^R^A^M^E^T^E^R, ^W^I^T^H ^2
  4975. ^0 ^S^T^R^I^N^G, ^I^N^T^E^G^E^R, ^O^R ^V^A^R^I^A^B^L^E ^V^A^L^U^E^S, ^A^N^D ^C^O^N^C^A^T^E^N^A^T^E^S ^T^H^E^M ^2
  4976. ^0 ^I^N^T^O ^A ^S^I^N^G^L^E ^R^E^S^U^L^T ^S^T^R^I^N^G ^2
  4977.  
  4978. VAR
  4979. ^G^I^V^E^N@D BOOLEAN,
  4980. ^V^A^R^I^A^B^L^E@D @B^T^D^L_^V^A^R^I^A^B^L^E,
  4981. ^S^E^T_^C^O^U^N^T,
  4982. ^S^E^T_^N^D^X@D 0 .. ^C^L^C$^M^A^X_^V^A^L^U^E_^S^E^T^S,
  4983. ^V^A^L^U^E@D ^C^L^T$^V^A^L^U^E;
  4984.  
  4985. ^R^E^S^U^L^T_^L^E^N^G^T^H @D= 0;
  4986. ^T^E^S^T_^P^A^R^M_^G^I^V^E^N(^P^A^R^M_^N^A^M^E, ^G^I^V^E^N);
  4987. IF ^G^I^V^E^N THEN
  4988. ^C^L^P$^G^E^T_^S^E^T_^C^O^U^N^T(^P^V^T, ^P^A^R^M_^N^A^M^E, ^S^E^T_^C^O^U^N^T, ^S^T^A^T^U^S);
  4989. IF NOT ^S^T^A^T^U^S.^N^O^R^M^A^L THEN
  4990. ^S^O^U^R^C^E_^E^R^R^O^R(^S^T^A^T^U^S)
  4991. ELSE
  4992. FOR ^S^E^T_^N^D^X @D= 1 TO ^S^E^T_^C^O^U^N^T DO
  4993. ^C^L^P$^G^E^T_^V^A^L^U^E(^P^V^T, ^P^A^R^M_^N^A^M^E, ^S^E^T_^N^D^X, 1, ^C^L^C$^L^O^W,
  4994. ^V^A^L^U^E, ^S^T^A^T^U^S);
  4995. IF NOT ^S^T^A^T^U^S.^N^O^R^M^A^L THEN
  4996. ^S^O^U^R^C^E_^E^R^R^O^R(^S^T^A^T^U^S)
  4997. ELSE
  4998. CASE ^V^A^L^U^E.^T^Y^P OF
  4999. = ^C^L^C$^S^T^R^I^N^G_^V^A^L^U^E =
  5000. IF ( ^R^E^S^U^L^T_^L^E^N^G^T^H + ^V^A^L^U^E.^S^T^R_^L^E^N^G^T^H ) >
  5001. ^O^S^C$^M^A^X_^S^T^R^I^N^G_^S^I^Z^E THEN
  5002. ^O^S^P$^S^E^T_^S^T^A^T^U^S_^A^B^N^O^R^M^A^L(^T^D^C_^P^R^O^D_^C^O^D^E,
  5003. ^C^L^C$^S^T^R^I^N^G_^O^V^E^R^F^L^O^W, '', ^S^T^A^T^U^S);
  5004. ^S^O^U^R^C^E_^E^R^R^O^R(^S^T^A^T^U^S)
  5005. IFEND;
  5006. STRINGREP(^R^E^S^U^L^T, ^R^E^S^U^L^T_^L^E^N^G^T^H,
  5007. ^R^E^S^U^L^T(1,^R^E^S^U^L^T_^L^E^N^G^T^H),
  5008. ^V^A^L^U^E.^S^T^R(1,^V^A^L^U^E.^S^T^R_^L^E^N^G^T^H));
  5009. = ^C^L^C$^I^N^T^E^G^E^R_^V^A^L^U^E =
  5010. IF ^R^E^S^U^L^T_^L^E^N^G^T^H >= ^O^S^C$^M^A^X_^S^T^R^I^N^G_^S^I^Z^E THEN
  5011. ^O^S^P$^S^E^T_^S^T^A^T^U^S_^A^B^N^O^R^M^A^L(^T^D^C_^P^R^O^D_^C^O^D^E,
  5012. ^C^L^C$^S^T^R^I^N^G_^O^V^E^R^F^L^O^W, '', ^S^T^A^T^U^S);
  5013. ^S^O^U^R^C^E_^E^R^R^O^R(^S^T^A^T^U^S)
  5014. IFEND;
  5015. STRINGREP(^R^E^S^U^L^T, ^R^E^S^U^L^T_^L^E^N^G^T^H,
  5016. ^R^E^S^U^L^T(1,^R^E^S^U^L^T_^L^E^N^G^T^H),
  5017. CHR(^V^A^L^U^E.^I^N^T.^I^N^T));
  5018. = ^C^L^C$^N^A^M^E_^V^A^L^U^E =
  5019. ^F^I^N^D_^V^A^R^I^A^B^L^E(^V^A^L^U^E.^N^A^M^E, ^F^O^U^N^D, ^V^A^R^I^A^B^L^E);
  5020. IF ^F^O^U^N^D THEN
  5021. IF ( ^R^E^S^U^L^T_^L^E^N^G^T^H +
  5022. ^V^A^R^I^A^B^L^E@B.^S^T^R_^L^E^N^G^T^H ) >
  5023. ^O^S^C$^M^A^X_^S^T^R^I^N^G_^S^I^Z^E THEN
  5024. ^O^S^P$^S^E^T_^S^T^A^T^U^S_^A^B^N^O^R^M^A^L(
  5025. ^T^D^C_^P^R^O^D_^C^O^D^E,
  5026. ^C^L^C$^S^T^R^I^N^G_^O^V^E^R^F^L^O^W, '', ^S^T^A^T^U^S);
  5027. ^S^O^U^R^C^E_^E^R^R^O^R(^S^T^A^T^U^S)
  5028. IFEND;
  5029. STRINGREP(^R^E^S^U^L^T, ^R^E^S^U^L^T_^L^E^N^G^T^H,
  5030. ^R^E^S^U^L^T(1,^R^E^S^U^L^T_^L^E^N^G^T^H),
  5031. ^V^A^R^I^A^B^L^E@B.^V^A^L^U^E@B(1,^V^A^R^I^A^B^L^E@B.^S^T^R_^L^E^N^G^T^H))
  5032. ELSE
  5033. ^E^R^R^O^R_^T^A^B^L^E(^N^O^T_^F^O^U^N^D_^E^R^R^O^R,
  5034. ^V^A^L^U^E.^N^A^M^E.^S^T^R(1,^V^A^L^U^E.^N^A^M^E.^L^E^N^G^T^H))
  5035. IFEND;
  5036. = ^C^L^C$^U^N^K^N^O^W^N_^V^A^L^U^E =
  5037. ^R^E^S^U^L^T @D= ' ';
  5038. ^R^E^S^U^L^T_^L^E^N^G^T^H @D= 0;
  5039. = ^C^L^C$^B^O^O^L^E^A^N_^V^A^L^U^E, ^C^L^C$^S^T^A^T^U^S_^V^A^L^U^E,
  5040. ^C^L^C$^V^A^R^I^A^B^L^E_^R^E^F^E^R^E^N^C^E =
  5041. ^O^S^P$^S^E^T_^S^T^A^T^U^S_^A^B^N^O^R^M^A^L(^T^D^C_^P^R^O^D_^C^O^D^E,
  5042. ^T^D^E_^I^N^V^A^L^I^D_^T^Y^P^E, '', ^S^T^A^T^U^S);
  5043. ^S^O^U^R^C^E_^E^R^R^O^R(^S^T^A^T^U^S);
  5044. CASEND
  5045. IFEND
  5046. FOREND
  5047. IFEND
  5048. IFEND
  5049. PROCEND ^P^A^R^M_^T^O_^S^T^R^I^N^G;
  5050. ?? OLDTITLE ??
  5051.  
  5052. ?? NEWTITLE @D= '^E^R^R^O^R_^T^A^B^L^E' ??
  5053. ?? EJECT ??
  5054.  
  5055. PROCEDURE ^E^R^R^O^R_^T^A^B^L^E (^E^R^R^O^R_^R^E^T^U^R^N@D ^E^R^R^O^R_^T^Y^P^E; ^T^E^X^T@D STRING(*));
  5056.  
  5057. CASE ^E^R^R^O^R_^R^E^T^U^R^N OF
  5058. = ^N^O_^R^O^O^M_^E^R^R^O^R =
  5059. ^O^S^P$^S^E^T_^S^T^A^T^U^S_^A^B^N^O^R^M^A^L(^T^D^C_^P^R^O^D_^C^O^D^E, ^T^D^E_^N^O_^R^O^O^M,
  5060. ^T^E^X^T, ^S^T^A^T^U^S);
  5061. ^O^S^P$^A^P^P^E^N^D_^S^T^A^T^U^S_^P^A^R^A^M^E^T^E^R(
  5062. ' ', ^O^S^C$^S^T^A^T^U^S_^P^A^R^A^M^E^T^E^R_^D^E^L^I^M^I^T^E^R, ^S^T^A^T^U^S);
  5063. = ^D^U^P^L^I^C^A^T^E_^E^R^R^O^R =
  5064. ^O^S^P$^S^E^T_^S^T^A^T^U^S_^A^B^N^O^R^M^A^L(^T^D^C_^P^R^O^D_^C^O^D^E, ^T^D^E_^D^U^P^L^I^C^A^T^E_^V^E^R^B,
  5065. ^T^E^X^T, ^S^T^A^T^U^S);
  5066. ^O^S^P$^A^P^P^E^N^D_^S^T^A^T^U^S_^P^A^R^A^M^E^T^E^R(
  5067. ' ', ^O^S^C$^S^T^A^T^U^S_^P^A^R^A^M^E^T^E^R_^D^E^L^I^M^I^T^E^R, ^S^T^A^T^U^S);
  5068. = ^D^U^P^L^I^C^A^T^E_^I^N^P^U^T_^E^R^R^O^R =
  5069. ^O^S^P$^S^E^T_^S^T^A^T^U^S_^A^B^N^O^R^M^A^L(^T^D^C_^P^R^O^D_^C^O^D^E, ^T^D^E_^D^U^P^L^I^C^A^T^E_^I^N^P^U^T,
  5070. ^T^E^X^T, ^S^T^A^T^U^S);
  5071. ^O^S^P$^A^P^P^E^N^D_^S^T^A^T^U^S_^P^A^R^A^M^E^T^E^R(
  5072. ' ', ^O^S^C$^S^T^A^T^U^S_^P^A^R^A^M^E^T^E^R_^D^E^L^I^M^I^T^E^R, ^S^T^A^T^U^S);
  5073. = ^S^U^P^E^R^S^E^T_^E^R^R^O^R =
  5074. ^O^S^P$^S^E^T_^S^T^A^T^U^S_^A^B^N^O^R^M^A^L(^T^D^C_^P^R^O^D_^C^O^D^E, ^T^D^E_^S^U^P^E^R^S^E^T,
  5075. ^T^E^X^T, ^S^T^A^T^U^S);
  5076. ^O^S^P$^A^P^P^E^N^D_^S^T^A^T^U^S_^P^A^R^A^M^E^T^E^R(
  5077. ' ', ^O^S^C$^S^T^A^T^U^S_^P^A^R^A^M^E^T^E^R_^D^E^L^I^M^I^T^E^R, ^S^T^A^T^U^S);
  5078. = ^S^U^B^S^E^T_^E^R^R^O^R =
  5079. ^O^S^P$^S^E^T_^S^T^A^T^U^S_^A^B^N^O^R^M^A^L(^T^D^C_^P^R^O^D_^C^O^D^E, ^T^D^E_^S^U^B^S^E^T,
  5080. ^T^E^X^T, ^S^T^A^T^U^S);
  5081. ^O^S^P$^A^P^P^E^N^D_^S^T^A^T^U^S_^P^A^R^A^M^E^T^E^R(
  5082. ' ', ^O^S^C$^S^T^A^T^U^S_^P^A^R^A^M^E^T^E^R_^D^E^L^I^M^I^T^E^R, ^S^T^A^T^U^S);
  5083. = ^N^O^T_^F^O^U^N^D_^E^R^R^O^R =
  5084. ^O^S^P$^S^E^T_^S^T^A^T^U^S_^A^B^N^O^R^M^A^L(^T^D^C_^P^R^O^D_^C^O^D^E, ^T^D^E_^N^O^T_^F^O^U^N^D,
  5085. ^T^E^X^T, ^S^T^A^T^U^S);
  5086. ^O^S^P$^A^P^P^E^N^D_^S^T^A^T^U^S_^P^A^R^A^M^E^T^E^R(
  5087. ' ', ^O^S^C$^S^T^A^T^U^S_^P^A^R^A^M^E^T^E^R_^D^E^L^I^M^I^T^E^R, ^S^T^A^T^U^S);
  5088. CASEND;
  5089. ^S^O^U^R^C^E_^E^R^R^O^R(^S^T^A^T^U^S)
  5090. PROCEND ^E^R^R^O^R_^T^A^B^L^E;
  5091. ?? OLDTITLE ??
  5092.  
  5093. ?? NEWTITLE @D= '^F^I^N^D_^V^A^R^I^A^B^L^E' ??
  5094. ?? EJECT ??
  5095.  
  5096. PROCEDURE ^F^I^N^D_^V^A^R^I^A^B^L^E (^N^A^M^E@D ^O^S^T$^N^A^M^E_^D^E^S^C^R^I^P^T^O^R;
  5097. VAR ^F^O^U^N^D@D BOOLEAN; VAR ^V^A^R^I^A^B^L^E@D @B^T^D^L_^V^A^R^I^A^B^L^E);
  5098.  
  5099. ^F^O^U^N^D @D= FALSE;
  5100. ^V^A^R^I^A^B^L^E @D= ^V^A^R^I^A^B^L^E_^L^I^S^T;
  5101. WHILE ( ^F^O^U^N^D = FALSE ) AND
  5102. ( ^V^A^R^I^A^B^L^E <> NIL ) DO
  5103. IF ( ^V^A^R^I^A^B^L^E@B.^N^A^M^E = ^N^A^M^E.^S^T^R(1,^N^A^M^E.^L^E^N^G^T^H) ) AND
  5104. ( ^V^A^R^I^A^B^L^E@B.^V^A^L^U^E <> NIL ) THEN
  5105. ^F^O^U^N^D @D= TRUE
  5106. ELSE
  5107. ^V^A^R^I^A^B^L^E @D= ^V^A^R^I^A^B^L^E@B.^N^E^X^T_^V^A^R^I^A^B^L^E
  5108. IFEND
  5109. WHILEND
  5110. PROCEND ^F^I^N^D_^V^A^R^I^A^B^L^E;
  5111. ?? OLDTITLE ??
  5112.  
  5113. ?? NEWTITLE @D= '^S^E^A^R^C^H_^V^E^R^B_^T^A^B^L^E' ??
  5114. ?? EJECT ??
  5115.  
  5116. PROCEDURE ^S^E^A^R^C^H_^V^E^R^B_^T^A^B^L^E (^S^T^R@D ^O^S^T$^N^A^M^E; VAR ^T^Y^P@D ^V^E^R^B_^T^Y^P^E;
  5117. VAR ^I^N_^O^R^D^I^N^A^L@D ^O^R^D^I^N^A^L_^T^Y^P^E; VAR ^O^U^T_^O^R^D^I^N^A^L@D ^O^R^D^I^N^A^L_^T^Y^P^E;
  5118. VAR ^F^O^U^N^D@D BOOLEAN);
  5119. VAR
  5120. ^V^E^R^B_^N^D^X@D 1 .. ^M^A^X_^V^E^R^B_^C^O^U^N^T + 1;
  5121.  
  5122. ^F^O^U^N^D @D= FALSE;
  5123. ^V^E^R^B_^N^D^X @D= 1;
  5124. WHILE ( ^V^E^R^B_^N^D^X <= ^M^A^X_^V^E^R^B_^C^O^U^N^T ) AND ( NOT ^F^O^U^N^D ) DO
  5125. IF ^V^E^R^B_^T^A^B^L^E[^V^E^R^B_^N^D^X].^N^A^M^E = ^S^T^R THEN
  5126. ^F^O^U^N^D @D= TRUE;
  5127. ^T^Y^P @D= ^V^E^R^B_^T^A^B^L^E[^V^E^R^B_^N^D^X].^T^Y^P;
  5128. ^I^N_^O^R^D^I^N^A^L @D= ^V^E^R^B_^T^A^B^L^E[^V^E^R^B_^N^D^X].^I^N_^O^R^D^I^N^A^L;
  5129. ^O^U^T_^O^R^D^I^N^A^L @D= ^V^E^R^B_^T^A^B^L^E[^V^E^R^B_^N^D^X].^O^U^T_^O^R^D^I^N^A^L
  5130. ELSE
  5131. ^V^E^R^B_^N^D^X @D= ^V^E^R^B_^N^D^X + 1
  5132. IFEND
  5133. WHILEND
  5134. PROCEND ^S^E^A^R^C^H_^V^E^R^B_^T^A^B^L^E;
  5135. ?? OLDTITLE ??
  5136.  
  5137. ?? NEWTITLE @D= '^P^R^O^C^E^S^S_^V^E^R^B' ??
  5138. ?? EJECT ??
  5139.  
  5140. PROCEDURE ^P^R^O^C^E^S^S_^V^E^R^B (^T^Y^P@D ^V^E^R^B_^T^Y^P^E;
  5141. ^I^N_^O^R^D^I^N^A^L@D ^O^R^D^I^N^A^L_^T^Y^P^E; ^O^U^T_^O^R^D^I^N^A^L@D ^O^R^D^I^N^A^L_^T^Y^P^E;
  5142. ^N^A^M^E@D ^O^S^T$^N^A^M^E_^D^E^S^C^R^I^P^T^O^R);
  5143.  
  5144. ?? NEWTITLE @D= '^W^R^I^T^E_^P^A^R^M' ??
  5145. ?? SKIP @D= 4 ??
  5146.  
  5147. PROCEDURE ^W^R^I^T^E_^P^A^R^M (^O^R^D^I^N^A^L@D ^O^R^D^I^N^A^L_^T^Y^P^E;
  5148. ^F^L^A^G_^O^R^D^I^N^A^L@D ^O^R^D^I^N^A^L_^T^Y^P^E);
  5149. VAR
  5150. ^R^E^S^U^L^T@D INTEGER,
  5151. ^V^A^R^I^A^B^L^E@D @B^T^D^L_^V^A^R^I^A^B^L^E,
  5152. ^V^A^L^U^E@D ^C^L^T$^V^A^L^U^E,
  5153. ^B^A^D_^N^A^M^E,
  5154. ^F^O^U^N^D@D BOOLEAN,
  5155. ^N^A^M^E_^N^D^X,
  5156. ^T^E^M^P_^S^T^R^I^N^G_^L^E^N@D ^O^S^T$^S^T^R^I^N^G_^S^I^Z^E,
  5157. ^T^E^M^P_^S^T^R^I^N^G@D STRING(^O^S^C$^M^A^X_^S^T^R^I^N^G_^S^I^Z^E);
  5158.  
  5159. CASE ^O^R^D^I^N^A^L OF
  5160. = ^P^A^R^M_^N^A^M^E_^O^R^D = ^0 ^M^O^D^E^L ^N^A^M^E ^A^N^D ^L^E^N^G^T^H ^2
  5161. ^P^A^R^M_^T^O_^N^A^M^E('VALUE', ^T^E^M^P_^S^T^R^I^N^G, ^T^E^M^P_^S^T^R^I^N^G_^L^E^N);
  5162. IF ^T^E^M^P_^S^T^R^I^N^G_^L^E^N = 0 THEN
  5163. ^O^S^P$^S^E^T_^S^T^A^T^U^S_^A^B^N^O^R^M^A^L(^T^D^C_^P^R^O^D_^C^O^D^E,
  5164. ^T^D^E_^N^A^M^E_^R^E^Q^U^I^R^E^D, '', ^S^T^A^T^U^S);
  5165. ^S^O^U^R^C^E_^E^R^R^O^R(^S^T^A^T^U^S)
  5166. ELSEIF ^T^E^M^P_^S^T^R^I^N^G_^L^E^N > 6 THEN
  5167. ^O^S^P$^S^E^T_^S^T^A^T^U^S_^A^B^N^O^R^M^A^L(^T^D^C_^P^R^O^D_^C^O^D^E,
  5168. ^T^D^E_^N^A^M^E_^T^O^O_^L^O^N^G, '', ^S^T^A^T^U^S);
  5169. ^S^O^U^R^C^E_^E^R^R^O^R(^S^T^A^T^U^S)
  5170. ELSE
  5171. ^B^A^D_^N^A^M^E @D= FALSE;
  5172. FOR ^S^I^Z^E_^N^D^X @D= 1 TO ^T^E^M^P_^S^T^R^I^N^G_^L^E^N DO
  5173. IF NOT (
  5174. ( ( ^T^E^M^P_^S^T^R^I^N^G(^S^I^Z^E_^N^D^X) >= '0' ) AND
  5175. ( ^T^E^M^P_^S^T^R^I^N^G(^S^I^Z^E_^N^D^X) <= '9' ) ) OR
  5176. ( ( ^T^E^M^P_^S^T^R^I^N^G(^S^I^Z^E_^N^D^X) >= 'A' ) AND
  5177. ( ^T^E^M^P_^S^T^R^I^N^G(^S^I^Z^E_^N^D^X) <= 'Z' ) ) OR
  5178. ( ( ^T^E^M^P_^S^T^R^I^N^G(^S^I^Z^E_^N^D^X) >= '^A' ) AND
  5179. ( ^T^E^M^P_^S^T^R^I^N^G(^S^I^Z^E_^N^D^X) <= '^Z' ) ) ) THEN
  5180. ^B^A^D_^N^A^M^E @D= TRUE
  5181. IFEND
  5182. FOREND;
  5183. IF ^B^A^D_^N^A^M^E THEN
  5184. ^O^S^P$^S^E^T_^S^T^A^T^U^S_^A^B^N^O^R^M^A^L(^T^D^C_^P^R^O^D_^C^O^D^E,
  5185. ^T^D^E_^I^N^V^A^L^I^D_^N^A^M^E, '', ^S^T^A^T^U^S);
  5186. ^S^O^U^R^C^E_^E^R^R^O^R(^S^T^A^T^U^S)
  5187. ELSE
  5188. ^P^A^R^M_^R^E^C.^M^O^D^E^L_^N^A^M^E @D=
  5189. ^T^E^M^P_^S^T^R^I^N^G(1,^T^E^M^P_^S^T^R^I^N^G_^L^E^N);
  5190. ^P^A^R^M_^R^E^C.^M^O^D^E^L_^N^A^M^E_^L^E^N @D= ^T^E^M^P_^S^T^R^I^N^G_^L^E^N
  5191. IFEND
  5192. IFEND;
  5193. = ^P^A^R^M_^C^O^M^M^U^N^I^C^A^T^I^O^N^S_^O^R^D =
  5194. ^C^L^P$^G^E^T_^V^A^L^U^E(^P^V^T, 'TYPE', 1, 1, ^C^L^C$^L^O^W, ^V^A^L^U^E, ^S^T^A^T^U^S);
  5195. IF NOT ^S^T^A^T^U^S.^N^O^R^M^A^L THEN
  5196. ^S^O^U^R^C^E_^E^R^R^O^R(^S^T^A^T^U^S)
  5197. ELSE
  5198. IF ^V^A^L^U^E.^T^Y^P <> ^C^L^C$^N^A^M^E_^V^A^L^U^E THEN
  5199. ^O^S^P$^S^E^T_^S^T^A^T^U^S_^A^B^N^O^R^M^A^L(^T^D^C_^P^R^O^D_^C^O^D^E,
  5200. ^T^D^E_^I^N^V^A^L^I^D_^C^O^M^M, '', ^S^T^A^T^U^S);
  5201. ^S^O^U^R^C^E_^E^R^R^O^R(^S^T^A^T^U^S)
  5202. ELSE
  5203. ^F^I^N^D_^V^A^R^I^A^B^L^E(^V^A^L^U^E.^N^A^M^E, ^F^O^U^N^D, ^V^A^R^I^A^B^L^E);
  5204. IF ^F^O^U^N^D THEN
  5205. IF ( ORD(^V^A^R^I^A^B^L^E@B.^V^A^L^U^E@B(1)) < 0 ) OR
  5206. ( ORD(^V^A^R^I^A^B^L^E@B.^V^A^L^U^E@B(1)) >
  5207. ^C^O^M^M^U^N^I^C^A^T^I^O^N^S_^T^Y^P^E_^M^A^X ) THEN
  5208. ^O^S^P$^S^E^T_^S^T^A^T^U^S_^A^B^N^O^R^M^A^L(^T^D^C_^P^R^O^D_^C^O^D^E,
  5209. ^T^D^E_^I^N^V^A^L^I^D_^C^O^M^M, '', ^S^T^A^T^U^S);
  5210. ^S^O^U^R^C^E_^E^R^R^O^R(^S^T^A^T^U^S)
  5211. ELSE
  5212. ^P^A^R^M_^R^E^C.^C^O^M^M^U^N^I^C^A^T^I^O^N^S @D=
  5213. ORD(^V^A^R^I^A^B^L^E@B.^V^A^L^U^E@B(1))
  5214. IFEND
  5215. ELSE
  5216. ^O^S^P$^S^E^T_^S^T^A^T^U^S_^A^B^N^O^R^M^A^L(^T^D^C_^P^R^O^D_^C^O^D^E,
  5217. ^T^D^E_^I^N^V^A^L^I^D_^C^O^M^M, '', ^S^T^A^T^U^S);
  5218. ^S^O^U^R^C^E_^E^R^R^O^R(^S^T^A^T^U^S)
  5219. IFEND
  5220. IFEND
  5221. IFEND;
  5222. = ^P^A^R^M_^C^U^R^S^O^R_^E^N^C^O^D^I^N^G_^O^R^D =
  5223. ^C^L^P$^G^E^T_^V^A^L^U^E(^P^V^T, 'TYPE', 1, 1, ^C^L^C$^L^O^W, ^V^A^L^U^E, ^S^T^A^T^U^S);
  5224. IF NOT ^S^T^A^T^U^S.^N^O^R^M^A^L THEN
  5225. ^S^O^U^R^C^E_^E^R^R^O^R(^S^T^A^T^U^S)
  5226. ELSE
  5227. IF ^V^A^L^U^E.^T^Y^P <> ^C^L^C$^N^A^M^E_^V^A^L^U^E THEN
  5228. ^O^S^P$^S^E^T_^S^T^A^T^U^S_^A^B^N^O^R^M^A^L(^T^D^C_^P^R^O^D_^C^O^D^E,
  5229. ^T^D^E_^I^N^V^A^L^I^D_^C^U^R^S^O^R, '', ^S^T^A^T^U^S);
  5230. ^S^O^U^R^C^E_^E^R^R^O^R(^S^T^A^T^U^S)
  5231. ELSE
  5232. ^F^I^N^D_^V^A^R^I^A^B^L^E(^V^A^L^U^E.^N^A^M^E, ^F^O^U^N^D, ^V^A^R^I^A^B^L^E);
  5233. IF ^F^O^U^N^D THEN
  5234. IF ( ORD(^V^A^R^I^A^B^L^E@B.^V^A^L^U^E@B(1)) < 0 ) OR
  5235. ( ORD(^V^A^R^I^A^B^L^E@B.^V^A^L^U^E@B(1)) >
  5236. ^C^U^R^S^O^R_^E^N^C^O^D^I^N^G_^M^A^X ) THEN
  5237. ^O^S^P$^S^E^T_^S^T^A^T^U^S_^A^B^N^O^R^M^A^L(^T^D^C_^P^R^O^D_^C^O^D^E,
  5238. ^T^D^E_^I^N^V^A^L^I^D_^C^U^R^S^O^R, '', ^S^T^A^T^U^S);
  5239. ^S^O^U^R^C^E_^E^R^R^O^R(^S^T^A^T^U^S)
  5240. ELSE
  5241. ^P^A^R^M_^R^E^C.^C^U^R^S^O^R_^E^N^C^O^D^I^N^G @D=
  5242. ORD(^V^A^R^I^A^B^L^E@B.^V^A^L^U^E@B(1))
  5243. IFEND
  5244. ELSE
  5245. ^O^S^P$^S^E^T_^S^T^A^T^U^S_^A^B^N^O^R^M^A^L(^T^D^C_^P^R^O^D_^C^O^D^E,
  5246. ^T^D^E_^I^N^V^A^L^I^D_^C^U^R^S^O^R, '', ^S^T^A^T^U^S);
  5247. ^S^O^U^R^C^E_^E^R^R^O^R(^S^T^A^T^U^S)
  5248. IFEND
  5249. IFEND
  5250. IFEND;
  5251. ^P^A^R^M_^T^O_^I^N^T^E^G^E^R('BIAS', ^R^E^S^U^L^T);
  5252. IF ( ^R^E^S^U^L^T < LOWERVALUE(^P^A^R^M_^R^E^C.^C^U^R^S^O^R_^B^I^A^S) ) OR
  5253. ( ^R^E^S^U^L^T > UPPERVALUE(^P^A^R^M_^R^E^C.^C^U^R^S^O^R_^B^I^A^S) ) THEN
  5254. ^O^S^P$^S^E^T_^S^T^A^T^U^S_^A^B^N^O^R^M^A^L(^T^D^C_^P^R^O^D_^C^O^D^E,
  5255. ^T^D^E_^B^I^A^S_^O^U^T_^O^F_^R^A^N^G^E, '', ^S^T^A^T^U^S);
  5256. ^S^O^U^R^C^E_^E^R^R^O^R(^S^T^A^T^U^S)
  5257. ELSE
  5258. ^P^A^R^M_^R^E^C.^C^U^R^S^O^R_^B^I^A^S @D= ^R^E^S^U^L^T
  5259. IFEND;
  5260. = ^P^A^R^M_^F^L^A^G^S_^O^R^D = ^0 ^B^O^O^L^E^A^N ^F^L^A^G^S ^2
  5261. ^P^A^R^M_^T^O_^B^O^O^L^E^A^N('VALUE', ^P^A^R^M_^R^E^C.^F^L^A^G[^F^L^A^G_^O^R^D^I^N^A^L]);
  5262. = ^P^A^R^M_^S^I^Z^E_^O^R^D = ^0 ^S^C^R^E^E^N ^S^I^Z^E^S ^2
  5263. ^S^I^Z^E_^N^D^X @D= 0;
  5264. WHILE ( ^S^I^Z^E_^N^D^X <= ^S^C^R^E^E^N_^S^I^Z^E_^M^A^X ) AND
  5265. ( ( ^P^A^R^M_^R^E^C.^S^I^Z^E[^S^I^Z^E_^N^D^X].^C^O^L^S <> 0 ) OR
  5266. ( ^P^A^R^M_^R^E^C.^S^I^Z^E[^S^I^Z^E_^N^D^X].^R^O^W^S <> 0 ) ) DO
  5267. ^S^I^Z^E_^N^D^X @D= ^S^I^Z^E_^N^D^X + 1
  5268. WHILEND;
  5269. IF ^S^I^Z^E_^N^D^X > ^S^C^R^E^E^N_^S^I^Z^E_^M^A^X THEN
  5270. ^O^S^P$^S^E^T_^S^T^A^T^U^S_^A^B^N^O^R^M^A^L(^T^D^C_^P^R^O^D_^C^O^D^E,
  5271. ^T^D^E_^S^C^R^E^E^N_^S^I^Z^E_^O^V^E^R^F^L^O^W, '', ^S^T^A^T^U^S);
  5272. ^S^O^U^R^C^E_^E^R^R^O^R(^S^T^A^T^U^S)
  5273. ELSE
  5274. ^P^A^R^M_^T^O_^I^N^T^E^G^E^R('ROWS', ^J^U^N^K_^L^E^N);
  5275. IF ( ^J^U^N^K_^L^E^N < 0 ) OR ( ^J^U^N^K_^L^E^N > ^S^I^Z^E_^R^O^W_^M^A^X ) THEN
  5276. ^O^S^P$^S^E^T_^S^T^A^T^U^S_^A^B^N^O^R^M^A^L(^T^D^C_^P^R^O^D_^C^O^D^E,
  5277. ^T^D^E_^S^C^R^E^E^N_^R^O^W_^O^V^E^R^F^L^O^W, '', ^S^T^A^T^U^S);
  5278. ^S^O^U^R^C^E_^E^R^R^O^R(^S^T^A^T^U^S)
  5279. ELSE
  5280. ^P^A^R^M_^R^E^C.^S^I^Z^E[^S^I^Z^E_^N^D^X].^R^O^W^S @D= ^J^U^N^K_^L^E^N
  5281. IFEND;
  5282. ^P^A^R^M_^T^O_^I^N^T^E^G^E^R('COLUMNS', ^J^U^N^K_^L^E^N);
  5283. IF ( ^J^U^N^K_^L^E^N < 0 ) OR ( ^J^U^N^K_^L^E^N > ^S^I^Z^E_^C^O^L_^M^A^X ) THEN
  5284. ^O^S^P$^S^E^T_^S^T^A^T^U^S_^A^B^N^O^R^M^A^L(^T^D^C_^P^R^O^D_^C^O^D^E,
  5285. ^T^D^E_^S^C^R^E^E^N_^C^O^L_^O^V^E^R^F^L^O^W, '', ^S^T^A^T^U^S);
  5286. ^S^O^U^R^C^E_^E^R^R^O^R(^S^T^A^T^U^S)
  5287. ELSE
  5288. ^P^A^R^M_^R^E^C.^S^I^Z^E[^S^I^Z^E_^N^D^X].^C^O^L^S @D= ^J^U^N^K_^L^E^N
  5289. IFEND;
  5290. ^T^E^S^T_^P^A^R^M_^G^I^V^E^N('OUT', ^F^O^U^N^D); ^0 ^W^R^I^T^E_^O^U^T ^I^S^N'^T ^P^I^C^K^Y ^2
  5291. IF ^F^O^U^N^D THEN
  5292. ^W^R^I^T^E_^O^U^T(^S^I^Z^E_^O^U^T^P^U^T_^O^R^D + ^S^I^Z^E_^N^D^X)
  5293. IFEND
  5294. IFEND;
  5295. = ^P^A^R^M_^C^U^R^S^O^R_^B^E^H^A^V^I^O^R_^O^R^D =
  5296. ^C^L^P$^G^E^T_^V^A^L^U^E(^P^V^T, 'TYPE', 1, 1, ^C^L^C$^L^O^W, ^V^A^L^U^E, ^S^T^A^T^U^S);
  5297. IF NOT ^S^T^A^T^U^S.^N^O^R^M^A^L THEN
  5298. ^S^O^U^R^C^E_^E^R^R^O^R(^S^T^A^T^U^S)
  5299. ELSE
  5300. IF ^V^A^L^U^E.^T^Y^P <> ^C^L^C$^N^A^M^E_^V^A^L^U^E THEN
  5301. ^O^S^P$^S^E^T_^S^T^A^T^U^S_^A^B^N^O^R^M^A^L(^T^D^C_^P^R^O^D_^C^O^D^E,
  5302. ^T^D^E_^I^N^V^A^L^I^D_^C^U^R^S^O^R_^B^E^H^A^V^I^O^R, '', ^S^T^A^T^U^S);
  5303. ^S^O^U^R^C^E_^E^R^R^O^R(^S^T^A^T^U^S)
  5304. ELSE
  5305. ^F^I^N^D_^V^A^R^I^A^B^L^E(^V^A^L^U^E.^N^A^M^E, ^F^O^U^N^D, ^V^A^R^I^A^B^L^E);
  5306. IF ^F^O^U^N^D THEN
  5307. IF ( ORD(^V^A^R^I^A^B^L^E@B.^V^A^L^U^E@B(1)) < 0 ) OR
  5308. ( ORD(^V^A^R^I^A^B^L^E@B.^V^A^L^U^E@B(1)) >
  5309. ^C^U^R^S^O^R_^B^E^H^A^V^I^O^R_^M^A^X ) THEN
  5310. ^O^S^P$^S^E^T_^S^T^A^T^U^S_^A^B^N^O^R^M^A^L(^T^D^C_^P^R^O^D_^C^O^D^E,
  5311. ^T^D^E_^I^N^V^A^L^I^D_^C^U^R^S^O^R_^B^E^H^A^V^I^O^R, '', ^S^T^A^T^U^S);
  5312. ^S^O^U^R^C^E_^E^R^R^O^R(^S^T^A^T^U^S)
  5313. ELSE
  5314. ^P^A^R^M_^R^E^C.^C^U^R^S^O^R_^B^E^H^A^V^I^O^R[^F^L^A^G_^O^R^D^I^N^A^L] @D=
  5315. ORD(^V^A^R^I^A^B^L^E@B.^V^A^L^U^E@B(1))
  5316. IFEND
  5317. ELSE
  5318. ^O^S^P$^S^E^T_^S^T^A^T^U^S_^A^B^N^O^R^M^A^L(^T^D^C_^P^R^O^D_^C^O^D^E,
  5319. ^T^D^E_^I^N^V^A^L^I^D_^C^U^R^S^O^R_^B^E^H^A^V^I^O^R, '', ^S^T^A^T^U^S);
  5320. ^S^O^U^R^C^E_^E^R^R^O^R(^S^T^A^T^U^S)
  5321. IFEND
  5322. IFEND
  5323. IFEND;
  5324. = ^P^A^R^M_^C^U^R^S^O^R_^P^O^S_^C^O^L^U^M^N_^F^L^A^G_^O^R^D = ^0 ^C^O^L^U^M^N/^R^O^W ^F^I^R^S^T ^2
  5325. ^P^A^R^M_^T^O_^B^O^O^L^E^A^N('VALUE', ^P^A^R^M_^R^E^C.^C^U^R^S^O^R_^P^O^S_^C^O^L^U^M^N_^F^L^A^G);
  5326. = ^P^A^R^M_^C^U^R^S^O^R_^P^O^S_^L^E^N^G^T^H_^O^R^D = ^0 # ^C^H^A^R^S ^P^E^R ^E^A^C^H ^X/^Y ^V^A^L^U^E ^2
  5327. ^P^A^R^M_^T^O_^I^N^T^E^G^E^R('VALUE', ^R^E^S^U^L^T);
  5328. IF ( ^R^E^S^U^L^T < 0 ) OR
  5329. ( ^R^E^S^U^L^T > UPPERVALUE(
  5330. ^P^A^R^M_^R^E^C.^C^U^R^S^O^R_^P^O^S_^L^E^N^G^T^H[^F^L^A^G_^O^R^D^I^N^A^L]) ) THEN
  5331. ^O^S^P$^S^E^T_^S^T^A^T^U^S_^A^B^N^O^R^M^A^L(^T^D^C_^P^R^O^D_^C^O^D^E,
  5332. ^T^D^E_^C^U^R^S^O^R_^L^E^N_^O^U^T_^O^F_^R^A^N^G^E, '', ^S^T^A^T^U^S);
  5333. ^S^O^U^R^C^E_^E^R^R^O^R(^S^T^A^T^U^S)
  5334. ELSE
  5335. ^P^A^R^M_^R^E^C.^C^U^R^S^O^R_^P^O^S_^L^E^N^G^T^H[^F^L^A^G_^O^R^D^I^N^A^L] @D= ^R^E^S^U^L^T
  5336. IFEND;
  5337. = ^P^A^R^M_^F^U^N^C^T^I^O^N_^K^E^Y_^M^A^R^K_^O^R^D = ^0 # ^C^H^A^R^S ^O^F ^B^L^O^T^C^H ^L^E^F^T^O^V^E^R ^2
  5338. ^P^A^R^M_^T^O_^I^N^T^E^G^E^R('VALUE', ^R^E^S^U^L^T);
  5339. IF ( ^R^E^S^U^L^T < 0 ) OR
  5340. ( ^R^E^S^U^L^T > UPPERVALUE(
  5341. ^P^A^R^M_^R^E^C.^F^U^N^C^T^I^O^N_^K^E^Y_^M^A^R^K) ) THEN
  5342. ^O^S^P$^S^E^T_^S^T^A^T^U^S_^A^B^N^O^R^M^A^L(^T^D^C_^P^R^O^D_^C^O^D^E,
  5343. ^T^D^E_^F^U^N^C^T^I^O^N_^K^E^Y_^M^A^R^K_^R^A^N^G^E, '', ^S^T^A^T^U^S);
  5344. ^S^O^U^R^C^E_^E^R^R^O^R(^S^T^A^T^U^S)
  5345. ELSE
  5346. ^P^A^R^M_^R^E^C.^F^U^N^C^T^I^O^N_^K^E^Y_^M^A^R^K @D= ^R^E^S^U^L^T
  5347. IFEND;
  5348. CASEND
  5349. PROCEND ^W^R^I^T^E_^P^A^R^M;
  5350. ?? OLDTITLE ??
  5351.  
  5352. ?? NEWTITLE @D= '^W^R^I^T^E_^I^N' ??
  5353. ?? EJECT ??
  5354.  
  5355. PROCEDURE ^W^R^I^T^E_^I^N (^O^R^D^I^N^A^L@D ^O^R^D^I^N^A^L_^T^Y^P^E);
  5356. VAR
  5357. ^I^N_^G^I^V^E^N,
  5358. ^I^N^O^U^T_^G^I^V^E^N,
  5359. ^L^A^B^E^L_^G^I^V^E^N@D BOOLEAN,
  5360. ^L^A^B^E^L_^L^E^N@D ^O^S^T$^S^T^R^I^N^G_^S^I^Z^E,
  5361. ^L^A^B^E^L_^N^A^M^E@D ^O^S^T$^N^A^M^E,
  5362. ^S^T^R^I^N^G_^L^E^N@D ^O^S^T$^S^T^R^I^N^G_^S^I^Z^E,
  5363. ^I^N^P^U^T_^S^T^R^I^N^G@D STRING(^O^S^C$^M^A^X_^S^T^R^I^N^G_^S^I^Z^E);
  5364.  
  5365. ^C^L^P$^T^E^S^T_^P^A^R^A^M^E^T^E^R(^P^V^T, 'LABEL', ^L^A^B^E^L_^G^I^V^E^N, ^S^T^A^T^U^S);
  5366. IF ^L^A^B^E^L_^G^I^V^E^N THEN
  5367. ^P^A^R^M_^T^O_^N^A^M^E('LABEL', ^L^A^B^E^L_^N^A^M^E, ^L^A^B^E^L_^L^E^N);
  5368. ^S^T^O^R^E_^K^E^Y_^N^A^M^E_^N^O^D^E(^O^R^D^I^N^A^L, ^L^A^B^E^L_^L^E^N, ^L^A^B^E^L_^N^A^M^E,
  5369. ^E^R^R^O^R_^R^E^T^U^R^N);
  5370. IF ^E^R^R^O^R_^R^E^T^U^R^N <> ^N^O_^E^R^R^O^R THEN
  5371. ^E^R^R^O^R_^T^A^B^L^E(^E^R^R^O^R_^R^E^T^U^R^N, ^L^A^B^E^L_^N^A^M^E)
  5372. IFEND
  5373. IFEND;
  5374. ^C^L^P$^T^E^S^T_^P^A^R^A^M^E^T^E^R(^P^V^T, 'IN', ^I^N_^G^I^V^E^N, ^S^T^A^T^U^S);
  5375. ^C^L^P$^T^E^S^T_^P^A^R^A^M^E^T^E^R(^P^V^T, 'INOUT', ^I^N^O^U^T_^G^I^V^E^N, ^S^T^A^T^U^S);
  5376. IF ^I^N_^G^I^V^E^N AND ^I^N^O^U^T_^G^I^V^E^N THEN
  5377. ^O^S^P$^S^E^T_^S^T^A^T^U^S_^A^B^N^O^R^M^A^L(^T^D^C_^P^R^O^D_^C^O^D^E,
  5378. ^T^D^E_^D^U^P^L^I^C^A^T^E_^I^N_^I^N^O^U^T, '', ^S^T^A^T^U^S);
  5379. ^S^O^U^R^C^E_^E^R^R^O^R(^S^T^A^T^U^S)
  5380. IFEND;
  5381. IF ^I^N_^G^I^V^E^N THEN
  5382. ^P^A^R^M_^T^O_^S^T^R^I^N^G('IN', ^I^N^P^U^T_^S^T^R^I^N^G, ^S^T^R^I^N^G_^L^E^N)
  5383. ELSEIF ^I^N^O^U^T_^G^I^V^E^N THEN
  5384. ^P^A^R^M_^T^O_^S^T^R^I^N^G('INOUT', ^I^N^P^U^T_^S^T^R^I^N^G, ^S^T^R^I^N^G_^L^E^N)
  5385. ELSE
  5386. RETURN ^0 ^N^O ^M^A^J^O^R ^O^B^J^E^C^T^I^O^N ^I^F ^U^N^S^P^E^C^I^F^I^E^D ^2
  5387. IFEND;
  5388. ^S^T^O^R^E_^I^N^P^U^T_^N^O^D^E(^O^R^D^I^N^A^L, ^S^T^R^I^N^G_^L^E^N, ^I^N^P^U^T_^S^T^R^I^N^G,
  5389. ^E^R^R^O^R_^R^E^T^U^R^N);
  5390. IF ^E^R^R^O^R_^R^E^T^U^R^N <> ^N^O_^E^R^R^O^R THEN
  5391. ^E^R^R^O^R_^T^A^B^L^E(^E^R^R^O^R_^R^E^T^U^R^N, ^N^A^M^E.^S^T^R(1,^N^A^M^E.^L^E^N^G^T^H))
  5392. IFEND
  5393. PROCEND ^W^R^I^T^E_^I^N;
  5394. ?? OLDTITLE ??
  5395.  
  5396. ?? NEWTITLE @D= '^W^R^I^T^E_^O^U^T' ??
  5397. ?? EJECT ??
  5398.  
  5399. PROCEDURE ^W^R^I^T^E_^O^U^T (^O^R^D^I^N^A^L@D ^O^R^D^I^N^A^L_^T^Y^P^E);
  5400. VAR
  5401. ^O^U^T_^G^I^V^E^N,
  5402. ^I^N^O^U^T_^G^I^V^E^N@D BOOLEAN,
  5403. ^S^T^R^I^N^G_^L^E^N@D ^O^S^T$^S^T^R^I^N^G_^S^I^Z^E,
  5404. ^O^U^T^P^U^T_^S^T^R^I^N^G@D STRING(^O^S^C$^M^A^X_^S^T^R^I^N^G_^S^I^Z^E);
  5405.  
  5406. ^C^L^P$^T^E^S^T_^P^A^R^A^M^E^T^E^R(^P^V^T, 'OUT', ^O^U^T_^G^I^V^E^N, ^S^T^A^T^U^S);
  5407. ^C^L^P$^T^E^S^T_^P^A^R^A^M^E^T^E^R(^P^V^T, 'INOUT', ^I^N^O^U^T_^G^I^V^E^N, ^S^T^A^T^U^S);
  5408. IF ^O^U^T_^G^I^V^E^N AND ^I^N^O^U^T_^G^I^V^E^N THEN
  5409. ^O^S^P$^S^E^T_^S^T^A^T^U^S_^A^B^N^O^R^M^A^L(^T^D^C_^P^R^O^D_^C^O^D^E,
  5410. ^T^D^E_^D^U^P^L^I^C^A^T^E_^O^U^T_^I^N^O^U^T, '', ^S^T^A^T^U^S);
  5411. ^S^O^U^R^C^E_^E^R^R^O^R(^S^T^A^T^U^S)
  5412. IFEND;
  5413. IF ^O^U^T_^G^I^V^E^N THEN
  5414. ^P^A^R^M_^T^O_^S^T^R^I^N^G('OUT', ^O^U^T^P^U^T_^S^T^R^I^N^G, ^S^T^R^I^N^G_^L^E^N)
  5415. ELSEIF ^I^N^O^U^T_^G^I^V^E^N THEN
  5416. ^P^A^R^M_^T^O_^S^T^R^I^N^G('INOUT', ^O^U^T^P^U^T_^S^T^R^I^N^G, ^S^T^R^I^N^G_^L^E^N)
  5417. ELSE
  5418. RETURN ^0 ^N^O ^M^A^J^O^R ^O^B^J^E^C^T^I^O^N ^I^F ^U^N^S^P^E^C^I^F^I^E^D ^2
  5419. IFEND;
  5420. ^S^T^O^R^E_^O^U^T^P^U^T_^N^O^D^E(^O^R^D^I^N^A^L, ^S^T^R^I^N^G_^L^E^N, ^O^U^T^P^U^T_^S^T^R^I^N^G,
  5421. ^E^R^R^O^R_^R^E^T^U^R^N);
  5422. IF ^E^R^R^O^R_^R^E^T^U^R^N <> ^N^O_^E^R^R^O^R THEN
  5423. ^E^R^R^O^R_^T^A^B^L^E(^E^R^R^O^R_^R^E^T^U^R^N, ^N^A^M^E.^S^T^R(1,^N^A^M^E.^L^E^N^G^T^H))
  5424. IFEND
  5425. PROCEND ^W^R^I^T^E_^O^U^T;
  5426. ?? OLDTITLE ??
  5427.  
  5428. ?? NEWTITLE @D= '^W^R^I^T^E_^I^N^I^T' ??
  5429. ?? EJECT ??
  5430.  
  5431. PROCEDURE ^W^R^I^T^E_^I^N^I^T (^O^R^D^I^N^A^L@D ^O^R^D^I^N^A^L_^T^Y^P^E);
  5432. VAR
  5433. ^O^U^T_^G^I^V^E^N@D BOOLEAN,
  5434. ^S^T^R^I^N^G_^L^E^N@D ^O^S^T$^S^T^R^I^N^G_^S^I^Z^E,
  5435. ^O^U^T^P^U^T_^S^T^R^I^N^G@D STRING(^O^S^C$^M^A^X_^S^T^R^I^N^G_^S^I^Z^E);
  5436.  
  5437. ^C^L^P$^T^E^S^T_^P^A^R^A^M^E^T^E^R(^P^V^T, 'OUT', ^O^U^T_^G^I^V^E^N, ^S^T^A^T^U^S);
  5438. IF ^O^U^T_^G^I^V^E^N THEN
  5439. ^P^A^R^M_^T^O_^S^T^R^I^N^G('OUT', ^O^U^T^P^U^T_^S^T^R^I^N^G, ^S^T^R^I^N^G_^L^E^N);
  5440. ^S^T^O^R^E_^R^E^S^E^T_^S^E^Q^U^E^N^C^E(^O^R^D^I^N^A^L, ^S^T^R^I^N^G_^L^E^N, ^O^U^T^P^U^T_^S^T^R^I^N^G,
  5441. ^E^R^R^O^R_^R^E^T^U^R^N);
  5442. IF ^E^R^R^O^R_^R^E^T^U^R^N <> ^N^O_^E^R^R^O^R THEN
  5443. ^E^R^R^O^R_^T^A^B^L^E(^E^R^R^O^R_^R^E^T^U^R^N, ^N^A^M^E.^S^T^R(1,^N^A^M^E.^L^E^N^G^T^H))
  5444. IFEND
  5445. IFEND
  5446. PROCEND ^W^R^I^T^E_^I^N^I^T;
  5447. ?? OLDTITLE ??
  5448.  
  5449. ?? NEWTITLE @D= '^W^R^I^T^E_^A^P^P^S^T^R' ??
  5450. ?? EJECT ??
  5451.  
  5452. PROCEDURE ^W^R^I^T^E_^A^P^P^S^T^R;
  5453. VAR
  5454. ^C^H^A^R_^N^D^X@D INTEGER,
  5455. ^S^T^R^I^N^G_^L^E^N@D ^O^S^T$^S^T^R^I^N^G_^S^I^Z^E,
  5456. ^O^U^T^P^U^T_^S^T^R^I^N^G@D STRING(^O^S^C$^M^A^X_^S^T^R^I^N^G_^S^I^Z^E),
  5457. ^N^A^M^E_^L^E^N@D ^O^S^T$^S^T^R^I^N^G_^S^I^Z^E,
  5458. ^N^A^M^E@D ^O^S^T$^N^A^M^E;
  5459.  
  5460. ^P^A^R^M_^T^O_^N^A^M^E('NAME', ^N^A^M^E, ^N^A^M^E_^L^E^N);
  5461. IF (^N^A^M^E_^L^E^N < 1) OR (^N^A^M^E_^L^E^N > 7) THEN
  5462. ^O^S^P$^S^E^T_^S^T^A^T^U^S_^A^B^N^O^R^M^A^L(^T^D^C_^P^R^O^D_^C^O^D^E,
  5463. ^T^D^E_^A^P^P^S^T^R_^N^A^M^E_^T^O^O_^L^O^N^G, '', ^S^T^A^T^U^S);
  5464. ^S^O^U^R^C^E_^E^R^R^O^R(^S^T^A^T^U^S)
  5465. IFEND;
  5466. FOR ^C^H^A^R_^N^D^X @D= 1 ^T^O ^N^A^M^E_^L^E^N DO ^0 ^T^E^S^T ^F^O^R ^V^A^L^I^D^I^T^Y ^I^N C-63 ^2
  5467. IF ^U^T^V$^C^O^N^V^E^R^T_^A^S^C^I^I_^T^O_^A^S^C^I^I64[^N^A^M^E(^C^H^A^R_^N^D^X)] = 0 THEN
  5468. ^O^S^P$^S^E^T_^S^T^A^T^U^S_^A^B^N^O^R^M^A^L(^T^D^C_^P^R^O^D_^C^O^D^E,
  5469. ^T^D^E_^I^N^V^A^L^I^D_^A^P^P^S^T^R_^N^A^M^E, ^N^A^M^E(1,^N^A^M^E_^L^E^N), ^S^T^A^T^U^S);
  5470. ^O^S^P$^A^P^P^E^N^D_^S^T^A^T^U^S_^P^A^R^A^M^E^T^E^R(
  5471. ' ', ^O^S^C$^S^T^A^T^U^S_^P^A^R^A^M^E^T^E^R_^D^E^L^I^M^I^T^E^R, ^S^T^A^T^U^S);
  5472. ^S^O^U^R^C^E_^E^R^R^O^R(^S^T^A^T^U^S)
  5473. IFEND
  5474. FOREND;
  5475. ^P^A^R^M_^T^O_^S^T^R^I^N^G('OUT', ^O^U^T^P^U^T_^S^T^R^I^N^G, ^S^T^R^I^N^G_^L^E^N);
  5476. ^S^T^O^R^E_^A^P^P^S^T^R_^N^O^D^E(^N^A^M^E(1,^N^A^M^E_^L^E^N), ^S^T^R^I^N^G_^L^E^N, ^O^U^T^P^U^T_^S^T^R^I^N^G,
  5477. ^E^R^R^O^R_^R^E^T^U^R^N);
  5478. IF ^E^R^R^O^R_^R^E^T^U^R^N <> ^N^O_^E^R^R^O^R THEN
  5479. ^E^R^R^O^R_^T^A^B^L^E(^E^R^R^O^R_^R^E^T^U^R^N, ^N^A^M^E(1,^N^A^M^E_^L^E^N))
  5480. IFEND
  5481. PROCEND ^W^R^I^T^E_^A^P^P^S^T^R;
  5482. ?? OLDTITLE ??
  5483. ?? EJECT ??
  5484.  
  5485. CASE ^T^Y^P OF
  5486. = ^V_^P^A^R^M =
  5487. ^C^L^P$^S^C^A^N_^P^A^R^A^M^E^T^E^R_^L^I^S^T(^S^O^U^R^C^E_^S^T^R^I^N^G, ^S^O^U^R^C^E_^I^N^D^E^X,
  5488. @B^P^A^R^M_^P^D^T, ^P^V^T, ^S^T^A^T^U^S);
  5489. IF ^S^T^A^T^U^S.^N^O^R^M^A^L THEN
  5490. ^W^R^I^T^E_^P^A^R^M(^I^N_^O^R^D^I^N^A^L, ^O^U^T_^O^R^D^I^N^A^L)
  5491. ELSE
  5492. ^S^O^U^R^C^E_^E^R^R^O^R(^S^T^A^T^U^S)
  5493. IFEND;
  5494. = ^V_^I^N =
  5495. ^C^L^P$^S^C^A^N_^P^A^R^A^M^E^T^E^R_^L^I^S^T(^S^O^U^R^C^E_^S^T^R^I^N^G, ^S^O^U^R^C^E_^I^N^D^E^X,
  5496. @B^I^N_^P^D^T, ^P^V^T, ^S^T^A^T^U^S);
  5497. IF ^S^T^A^T^U^S.^N^O^R^M^A^L THEN
  5498. ^W^R^I^T^E_^I^N(^I^N_^O^R^D^I^N^A^L)
  5499. ELSE
  5500. ^S^O^U^R^C^E_^E^R^R^O^R(^S^T^A^T^U^S)
  5501. IFEND;
  5502. = ^V_^O^U^T =
  5503. ^C^L^P$^S^C^A^N_^P^A^R^A^M^E^T^E^R_^L^I^S^T(^S^O^U^R^C^E_^S^T^R^I^N^G, ^S^O^U^R^C^E_^I^N^D^E^X,
  5504. @B^O^U^T_^P^D^T, ^P^V^T, ^S^T^A^T^U^S);
  5505. IF ^S^T^A^T^U^S.^N^O^R^M^A^L THEN
  5506. ^W^R^I^T^E_^O^U^T(^O^U^T_^O^R^D^I^N^A^L)
  5507. ELSE
  5508. ^S^O^U^R^C^E_^E^R^R^O^R(^S^T^A^T^U^S)
  5509. IFEND;
  5510. = ^V_^I^N^O^U^T =
  5511. ^C^L^P$^S^C^A^N_^P^A^R^A^M^E^T^E^R_^L^I^S^T(^S^O^U^R^C^E_^S^T^R^I^N^G, ^S^O^U^R^C^E_^I^N^D^E^X,
  5512. @B^I^N^O^U^T_^P^D^T, ^P^V^T, ^S^T^A^T^U^S);
  5513. IF ^S^T^A^T^U^S.^N^O^R^M^A^L THEN
  5514. ^W^R^I^T^E_^I^N(^I^N_^O^R^D^I^N^A^L);
  5515. ^W^R^I^T^E_^O^U^T(^O^U^T_^O^R^D^I^N^A^L)
  5516. ELSE
  5517. ^S^O^U^R^C^E_^E^R^R^O^R(^S^T^A^T^U^S)
  5518. IFEND;
  5519. = ^V_^I^N^I^T =
  5520. ^C^L^P$^S^C^A^N_^P^A^R^A^M^E^T^E^R_^L^I^S^T(^S^O^U^R^C^E_^S^T^R^I^N^G, ^S^O^U^R^C^E_^I^N^D^E^X,
  5521. @B^I^N^I^T_^P^D^T, ^P^V^T, ^S^T^A^T^U^S);
  5522. IF ^S^T^A^T^U^S.^N^O^R^M^A^L THEN
  5523. ^W^R^I^T^E_^I^N^I^T(^O^U^T_^O^R^D^I^N^A^L)
  5524. ELSE
  5525. ^S^O^U^R^C^E_^E^R^R^O^R(^S^T^A^T^U^S)
  5526. IFEND;
  5527. = ^V_^A^P^P^S^T^R =
  5528. ^C^L^P$^S^C^A^N_^P^A^R^A^M^E^T^E^R_^L^I^S^T(^S^O^U^R^C^E_^S^T^R^I^N^G, ^S^O^U^R^C^E_^I^N^D^E^X,
  5529. @B^A^P^P^S^T^R_^P^D^T, ^P^V^T, ^S^T^A^T^U^S);
  5530. IF ^S^T^A^T^U^S.^N^O^R^M^A^L THEN
  5531. ^W^R^I^T^E_^A^P^P^S^T^R
  5532. ELSE
  5533. ^S^O^U^R^C^E_^E^R^R^O^R(^S^T^A^T^U^S)
  5534. IFEND;
  5535. CASEND;
  5536. ^C^L^P$^F^R^E^E_^P^A^R^A^M^E^T^E^R_^V^A^L^U^E_^T^A^B^L^E(^P^V^T)
  5537. PROCEND ^P^R^O^C^E^S^S_^V^E^R^B;
  5538. ?? OLDTITLE ??
  5539.  
  5540. ?? NEWTITLE @D= '^P^R^O^C^E^S^S_^V^A^R^I^A^B^L^E' ??
  5541. ?? EJECT ??
  5542.  
  5543. PROCEDURE ^P^R^O^C^E^S^S_^V^A^R^I^A^B^L^E (^N^A^M^E@D ^O^S^T$^N^A^M^E_^D^E^S^C^R^I^P^T^O^R);
  5544. VAR
  5545. ^F^O^U^N^D@D BOOLEAN,
  5546. ^E^R^R^O^R_^R^E^T^U^R^N@D ^E^R^R^O^R_^T^Y^P^E,
  5547. ^V^A^R^I^A^B^L^E@D @B^T^D^L_^V^A^R^I^A^B^L^E;
  5548.  
  5549. ?? NEWTITLE @D= '^P^A^R^S^E_^V^A^R^I^A^B^L^E_^A^S^S^I^G^N^M^E^N^T' ??
  5550. ?? SKIP @D= 4 ??
  5551.  
  5552. PROCEDURE ^P^A^R^S^E_^V^A^R^I^A^B^L^E_^A^S^S^I^G^N^M^E^N^T (VAR ^V^A^R^I^A^B^L^E@D @B^T^D^L_^V^A^R^I^A^B^L^E;
  5553. VAR ^E^R^R^O^R_^R^E^T^U^R^N@D ^E^R^R^O^R_^T^Y^P^E);
  5554. VAR
  5555. ^V^A^R^I^A^B^L^E_^R^E^F^E^R^E^N^C^E@D @B^T^D^L_^V^A^R^I^A^B^L^E,
  5556. ^T^O^K^E^N@D ^C^L^T$^T^O^K^E^N,
  5557. ^F^O^U^N^D@D BOOLEAN,
  5558. ^N^E^W_^S^T^R_^L^E^N^G^T^H,
  5559. ^V^A^L^U^E_^L^E^N^G^T^H@D INTEGER,
  5560. ^N^E^W_^S^T^R,
  5561. ^V^A^L^U^E_^S^T^R^I^N^G@D STRING(^O^S^C$^M^A^X_^S^T^R^I^N^G_^S^I^Z^E);
  5562.  
  5563. ^O^L^D_^I^N^D^E^X @D= ^S^O^U^R^C^E_^I^N^D^E^X;
  5564. ^C^L^P$^S^C^A^N_^T^O^K^E^N(^C^L^C$^N^O^T_^I^N_^E^X^P^R^E^S^S^I^O^N, ^S^O^U^R^C^E_^S^T^R^I^N^G,
  5565. ^S^O^U^R^C^E_^I^N^D^E^X, ^T^O^K^E^N, ^S^T^A^T^U^S);
  5566. IF NOT ^S^T^A^T^U^S.^N^O^R^M^A^L THEN
  5567. ^S^O^U^R^C^E_^I^N^D^E^X @D= ^O^L^D_^I^N^D^E^X; ^0 ^P^O^I^N^T ^T^O ^O^F^F^E^N^D^I^N^G ^T^O^K^E^N ^2
  5568. ^S^O^U^R^C^E_^E^R^R^O^R(^S^T^A^T^U^S);
  5569. ^E^R^R^O^R_^R^E^T^U^R^N @D= ^N^O^T_^F^O^U^N^D_^E^R^R^O^R;
  5570. RETURN
  5571. IFEND;
  5572. IF ^T^O^K^E^N.^T^Y^P <> ^C^L^C$^A^S^S^I^G^N_^T^O^K^E^N THEN
  5573. ^O^S^P$^S^E^T_^S^T^A^T^U^S_^A^B^N^O^R^M^A^L(^T^D^C_^P^R^O^D_^C^O^D^E,
  5574. ^T^D^E_^I^N^V^A^L^I^D_^V^E^R^B_^V^A^R^I^A^B^L^E, '', ^S^T^A^T^U^S);
  5575. ^S^O^U^R^C^E_^I^N^D^E^X @D= ^O^L^D_^I^N^D^E^X; ^0 ^P^O^I^N^T ^T^O ^O^F^F^E^N^D^I^N^G ^T^O^K^E^N ^2
  5576. ^S^O^U^R^C^E_^E^R^R^O^R(^S^T^A^T^U^S);
  5577. ^E^R^R^O^R_^R^E^T^U^R^N @D= ^N^O^T_^F^O^U^N^D_^E^R^R^O^R;
  5578. RETURN
  5579. IFEND;
  5580. ^V^A^L^U^E_^L^E^N^G^T^H @D= 0;
  5581. REPEAT
  5582. ^N^E^W_^S^T^R_^L^E^N^G^T^H @D= 0;
  5583. ^O^L^D_^I^N^D^E^X @D= ^S^O^U^R^C^E_^I^N^D^E^X;
  5584. ^C^L^P$^S^C^A^N_^T^O^K^E^N(^C^L^C$^N^O^T_^I^N_^E^X^P^R^E^S^S^I^O^N, ^S^O^U^R^C^E_^S^T^R^I^N^G,
  5585. ^S^O^U^R^C^E_^I^N^D^E^X, ^T^O^K^E^N, ^S^T^A^T^U^S);
  5586. IF NOT ^S^T^A^T^U^S.^N^O^R^M^A^L THEN
  5587. ^S^O^U^R^C^E_^I^N^D^E^X @D= ^O^L^D_^I^N^D^E^X; ^0 ^P^O^I^N^T ^T^O ^O^F^F^E^N^D^I^N^G ^T^O^K^E^N ^2
  5588. ^S^O^U^R^C^E_^E^R^R^O^R(^S^T^A^T^U^S);
  5589. ^E^R^R^O^R_^R^E^T^U^R^N @D= ^N^O^T_^F^O^U^N^D_^E^R^R^O^R;
  5590. RETURN
  5591. IFEND;
  5592. IF ^T^O^K^E^N.^T^Y^P = ^C^L^C$^N^A^M^E_^T^O^K^E^N THEN
  5593. ^F^I^N^D_^V^A^R^I^A^B^L^E(^T^O^K^E^N.^N^A^M^E, ^F^O^U^N^D, ^V^A^R^I^A^B^L^E_^R^E^F^E^R^E^N^C^E);
  5594. IF NOT ^F^O^U^N^D THEN
  5595. ^E^R^R^O^R_^R^E^T^U^R^N @D= ^N^O^T_^F^O^U^N^D_^E^R^R^O^R;
  5596. ^E^R^R^O^R_^T^A^B^L^E(^E^R^R^O^R_^R^E^T^U^R^N,
  5597. ^T^O^K^E^N.^N^A^M^E.^S^T^R(1,^T^O^K^E^N.^N^A^M^E.^L^E^N^G^T^H));
  5598. RETURN
  5599. IFEND;
  5600. ^N^E^W_^S^T^R @D= ^V^A^R^I^A^B^L^E_^R^E^F^E^R^E^N^C^E@B.^V^A^L^U^E@B;
  5601. ^N^E^W_^S^T^R_^L^E^N^G^T^H @D= ^V^A^R^I^A^B^L^E_^R^E^F^E^R^E^N^C^E@B.^S^T^R_^L^E^N^G^T^H
  5602. ELSEIF ^T^O^K^E^N.^T^Y^P = ^C^L^C$^S^T^R^I^N^G_^T^O^K^E^N THEN
  5603. ^N^E^W_^S^T^R @D= ^T^O^K^E^N.^S^T^R;
  5604. ^N^E^W_^S^T^R_^L^E^N^G^T^H @D= ^T^O^K^E^N.^S^T^R_^L^E^N^G^T^H
  5605. ELSEIF ^T^O^K^E^N.^T^Y^P = ^C^L^C$^I^N^T^E^G^E^R_^T^O^K^E^N THEN
  5606. IF ( ^T^O^K^E^N.^I^N^T.^I^N^T < 0 ) OR
  5607. ( ^T^O^K^E^N.^I^N^T.^I^N^T > 127 ) THEN
  5608. ^O^S^P$^S^E^T_^S^T^A^T^U^S_^A^B^N^O^R^M^A^L(^T^D^C_^P^R^O^D_^C^O^D^E,
  5609. ^T^D^E_^I^N^V^A^L^I^D_^C^H^A^R^A^C^T^E^R, '', ^S^T^A^T^U^S);
  5610. ^S^O^U^R^C^E_^E^R^R^O^R(^S^T^A^T^U^S)
  5611. ELSE
  5612. ^N^E^W_^S^T^R(1) @D= CHR(^T^O^K^E^N.^I^N^T.^I^N^T);
  5613. ^N^E^W_^S^T^R_^L^E^N^G^T^H @D= 1
  5614. IFEND
  5615. ELSEIF ( ^T^O^K^E^N.^T^Y^P <> ^C^L^C$^C^A^T_^T^O^K^E^N ) AND
  5616. ( ^T^O^K^E^N.^T^Y^P <> ^C^L^C$^L^P^A^R^E^N_^T^O^K^E^N ) AND
  5617. ( ^T^O^K^E^N.^T^Y^P <> ^C^L^C$^R^P^A^R^E^N_^T^O^K^E^N ) AND
  5618. ( ^T^O^K^E^N.^T^Y^P <> ^C^L^C$^E^O^S_^T^O^K^E^N ) THEN
  5619. ^O^S^P$^S^E^T_^S^T^A^T^U^S_^A^B^N^O^R^M^A^L(^T^D^C_^P^R^O^D_^C^O^D^E, ^C^L^C$^I^N^V^A^L^I^D,
  5620. ^T^O^K^E^N.^S^T^R(1,^T^O^K^E^N.^S^T^R_^L^E^N^G^T^H), ^S^T^A^T^U^S);
  5621. ^O^S^P$^A^P^P^E^N^D_^S^T^A^T^U^S_^P^A^R^A^M^E^T^E^R(
  5622. ' ', ^O^S^C$^S^T^A^T^U^S_^P^A^R^A^M^E^T^E^R_^D^E^L^I^M^I^T^E^R, ^S^T^A^T^U^S);
  5623. ^S^O^U^R^C^E_^I^N^D^E^X @D= ^O^L^D_^I^N^D^E^X; ^0 ^P^O^I^N^T ^T^O ^O^F^F^E^N^D^I^N^G ^T^O^K^E^N ^2
  5624. ^S^O^U^R^C^E_^E^R^R^O^R(^S^T^A^T^U^S);
  5625. ^E^R^R^O^R_^R^E^T^U^R^N @D= ^N^O^T_^F^O^U^N^D_^E^R^R^O^R;
  5626. RETURN
  5627. IFEND;
  5628. IF ( ^V^A^L^U^E_^L^E^N^G^T^H + ^N^E^W_^S^T^R_^L^E^N^G^T^H ) >
  5629. ^O^S^C$^M^A^X_^S^T^R^I^N^G_^S^I^Z^E THEN
  5630. ^O^S^P$^S^E^T_^S^T^A^T^U^S_^A^B^N^O^R^M^A^L(^T^D^C_^P^R^O^D_^C^O^D^E,
  5631. ^C^L^C$^S^T^R^I^N^G_^O^V^E^R^F^L^O^W, '', ^S^T^A^T^U^S);
  5632. ^S^O^U^R^C^E_^I^N^D^E^X @D= ^O^L^D_^I^N^D^E^X; ^0 ^P^O^I^N^T ^T^O ^O^F^F^E^N^D^I^N^G ^T^O^K^E^N ^2
  5633. ^S^O^U^R^C^E_^E^R^R^O^R(^S^T^A^T^U^S);
  5634. ^E^R^R^O^R_^R^E^T^U^R^N @D= ^N^O_^R^O^O^M_^E^R^R^O^R;
  5635. RETURN
  5636. IFEND;
  5637. IF ^N^E^W_^S^T^R_^L^E^N^G^T^H > 0 THEN
  5638. STRINGREP(^V^A^L^U^E_^S^T^R^I^N^G, ^V^A^L^U^E_^L^E^N^G^T^H,
  5639. ^V^A^L^U^E_^S^T^R^I^N^G(1,^V^A^L^U^E_^L^E^N^G^T^H),
  5640. ^N^E^W_^S^T^R(1,^N^E^W_^S^T^R_^L^E^N^G^T^H))
  5641. IFEND
  5642. UNTIL ^S^O^U^R^C^E_^I^N^D^E^X > ^S^O^U^R^C^E_^L^E^N^G^T^H;
  5643. ^A^S^S^I^G^N_^V^A^L^U^E_^T^O_^V^A^R^I^A^B^L^E(^V^A^L^U^E_^S^T^R^I^N^G, ^V^A^L^U^E_^L^E^N^G^T^H,
  5644. ^V^A^R^I^A^B^L^E, ^E^R^R^O^R_^R^E^T^U^R^N)
  5645. PROCEND ^P^A^R^S^E_^V^A^R^I^A^B^L^E_^A^S^S^I^G^N^M^E^N^T;
  5646. ?? OLDTITLE ??
  5647. ?? EJECT ??
  5648.  
  5649. ^F^I^N^D_^V^A^R^I^A^B^L^E(^N^A^M^E, ^F^O^U^N^D, ^V^A^R^I^A^B^L^E);
  5650. IF ^F^O^U^N^D THEN
  5651. ^P^A^R^S^E_^V^A^R^I^A^B^L^E_^A^S^S^I^G^N^M^E^N^T(^V^A^R^I^A^B^L^E, ^E^R^R^O^R_^R^E^T^U^R^N)
  5652. ELSE
  5653. ^A^D^D_^V^A^R^I^A^B^L^E_^T^O_^S^Y^M^B^O^L_^T^A^B^L^E(^N^A^M^E, ^V^A^R^I^A^B^L^E, ^E^R^R^O^R_^R^E^T^U^R^N);
  5654. IF ^E^R^R^O^R_^R^E^T^U^R^N = ^N^O_^E^R^R^O^R THEN
  5655. ^P^A^R^S^E_^V^A^R^I^A^B^L^E_^A^S^S^I^G^N^M^E^N^T(^V^A^R^I^A^B^L^E, ^E^R^R^O^R_^R^E^T^U^R^N)
  5656. IFEND
  5657. IFEND
  5658. PROCEND ^P^R^O^C^E^S^S_^V^A^R^I^A^B^L^E;
  5659. ?? OLDTITLE ??
  5660.  
  5661. ?? NEWTITLE @D= '^C^H^E^C^K_^A^N^D_^P^R^O^C^E^S^S_^S^T^A^T^E^M^E^N^T' ??
  5662. ?? EJECT ??
  5663.  
  5664. PROCEDURE ^C^H^E^C^K_^A^N^D_^P^R^O^C^E^S^S_^S^T^A^T^E^M^E^N^T;
  5665. IF ^T^O^K^E^N.^T^Y^P <> ^C^L^C$^N^A^M^E_^T^O^K^E^N THEN
  5666. CASE ^T^O^K^E^N.^T^Y^P OF
  5667. = ^C^L^C$^U^N^K^N^O^W^N_^T^O^K^E^N .. ^C^L^C$^S^T^R^I^N^G_^T^O^K^E^N =
  5668. ^J^U^N^K_^S^T^R^I^N^G @D= ^T^O^K^E^N.^S^T^R(1,^T^O^K^E^N.^S^T^R_^L^E^N^G^T^H);
  5669. ^J^U^N^K_^L^E^N @D= ^T^O^K^E^N.^S^T^R_^L^E^N^G^T^H;
  5670. = ^C^L^C$^B^O^O^L^E^A^N_^T^O^K^E^N =
  5671. ^J^U^N^K_^S^T^R^I^N^G @D= '';
  5672. STRINGREP(^J^U^N^K_^S^T^R^I^N^G, ^J^U^N^K_^L^E^N, ^T^O^K^E^N.^B^O^O^L);
  5673. = ^C^L^C$^I^N^T^E^G^E^R_^T^O^K^E^N =
  5674. ^J^U^N^K_^S^T^R^I^N^G @D= 'INTEGER';
  5675. ^J^U^N^K_^L^E^N @D= 7;
  5676. CASEND;
  5677. ^O^S^P$^S^E^T_^S^T^A^T^U^S_^A^B^N^O^R^M^A^L(^T^D^C_^P^R^O^D_^C^O^D^E,
  5678. ^T^D^E_^E^X^P^E^C^T^I^N^G_^V^E^R^B_^V^A^R^I^A^B^L^E, ^J^U^N^K_^S^T^R^I^N^G(1,^J^U^N^K_^L^E^N),
  5679. ^S^T^A^T^U^S);
  5680. ^O^S^P$^A^P^P^E^N^D_^S^T^A^T^U^S_^P^A^R^A^M^E^T^E^R(
  5681. ' ', ^O^S^C$^S^T^A^T^U^S_^P^A^R^A^M^E^T^E^R_^D^E^L^I^M^I^T^E^R, ^S^T^A^T^U^S);
  5682. ^S^O^U^R^C^E_^E^R^R^O^R(^S^T^A^T^U^S)
  5683. ELSE
  5684. ^S^E^A^R^C^H_^V^E^R^B_^T^A^B^L^E(^T^O^K^E^N.^N^A^M^E.^S^T^R(1,^T^O^K^E^N.^N^A^M^E.^L^E^N^G^T^H),
  5685. ^V^E^R^B_^T^Y^P, ^I^N_^O^R^D^I^N^A^L, ^O^U^T_^O^R^D^I^N^A^L, ^F^O^U^N^D);
  5686. IF ^F^O^U^N^D THEN
  5687. ^P^R^O^C^E^S^S_^V^E^R^B(^V^E^R^B_^T^Y^P, ^I^N_^O^R^D^I^N^A^L, ^O^U^T_^O^R^D^I^N^A^L,
  5688. ^T^O^K^E^N.^N^A^M^E);
  5689. ELSE
  5690. ^P^R^O^C^E^S^S_^V^A^R^I^A^B^L^E(^T^O^K^E^N.^N^A^M^E)
  5691. IFEND
  5692. IFEND
  5693. PROCEND ^C^H^E^C^K_^A^N^D_^P^R^O^C^E^S^S_^S^T^A^T^E^M^E^N^T;
  5694.  
  5695. ?? EJECT ??
  5696.  
  5697. ^E^M^P^T^Y_^F^I^L^E @D= TRUE;
  5698. ^P^A^R^M_^R^E^C.^M^O^D^E^L_^N^A^M^E @D= ' ';
  5699. ^P^A^R^M_^R^E^C.^M^O^D^E^L_^N^A^M^E_^L^E^N @D= 0;
  5700. ^P^A^R^M_^R^E^C.^C^O^M^M^U^N^I^C^A^T^I^O^N^S @D= ^A^S^Y^N^C^H_^C^O^M^M;
  5701. ^P^A^R^M_^R^E^C.^C^U^R^S^O^R_^E^N^C^O^D^I^N^G @D= ^I^N^V^A^L^I^D_^C^U^R^S^O^R;
  5702. ^P^A^R^M_^R^E^C.^C^U^R^S^O^R_^B^I^A^S @D= 0;
  5703. FOR ^P^A^R^M_^N^D^X @D= 0 TO ^P^A^R^M_^F^L^A^G_^M^A^X DO
  5704. ^P^A^R^M_^R^E^C.^F^L^A^G[^P^A^R^M_^N^D^X] @D= FALSE
  5705. FOREND;
  5706. FOR ^P^A^R^M_^N^D^X @D= 0 TO ^S^C^R^E^E^N_^S^I^Z^E_^M^A^X DO
  5707. ^P^A^R^M_^R^E^C.^S^I^Z^E[^P^A^R^M_^N^D^X].^C^O^L^S @D= 0;
  5708. ^P^A^R^M_^R^E^C.^S^I^Z^E[^P^A^R^M_^N^D^X].^R^O^W^S @D= 0
  5709. FOREND;
  5710. FOR ^P^A^R^M_^N^D^X @D= 0 TO ^C^U^R^S^O^R_^B^E^H^A^V^I^O^R_^M^A^X DO
  5711. ^P^A^R^M_^R^E^C.^C^U^R^S^O^R_^B^E^H^A^V^I^O^R[^P^A^R^M_^N^D^X] @D= -1
  5712. FOREND;
  5713. ^P^A^R^M_^R^E^C.^C^U^R^S^O^R_^P^O^S_^C^O^L^U^M^N_^F^L^A^G @D= FALSE;
  5714. FOR ^P^A^R^M_^N^D^X @D= 0 TO 1 DO
  5715. ^P^A^R^M_^R^E^C.^C^U^R^S^O^R_^P^O^S_^L^E^N^G^T^H[^P^A^R^M_^N^D^X] @D= 0
  5716. FOREND;
  5717.  
  5718. ^R^E^A^D_^L^I^N^E(^E^O^F_^F^L^A^G);
  5719. WHILE NOT ^E^O^F_^F^L^A^G DO
  5720. ^S^O^U^R^C^E_^S^T^R^I^N^G @D= ^L^I^N^E_^B^U^F^F^E^R;
  5721. ^S^O^U^R^C^E_^L^E^N^G^T^H @D= ^L^I^N^E_^L^E^N^G^T^H;
  5722. ^S^O^U^R^C^E_^I^N^D^E^X @D= 1;
  5723. WHILE ^S^O^U^R^C^E_^I^N^D^E^X <= ^S^O^U^R^C^E_^L^E^N^G^T^H DO ^0 ^P^R^E-^S^C^A^N ^F^O^R ^C^O^N^T^I^N^U^A^T^I^O^N^S^2
  5724. REPEAT
  5725. ^O^L^D_^I^N^D^E^X @D= ^S^O^U^R^C^E_^I^N^D^E^X;
  5726. ^C^L^P$^S^C^A^N_^T^O^K^E^N(^C^L^C$^N^O^T_^I^N_^E^X^P^R^E^S^S^I^O^N, ^S^O^U^R^C^E_^S^T^R^I^N^G,
  5727. ^S^O^U^R^C^E_^I^N^D^E^X, ^T^O^K^E^N, ^S^T^A^T^U^S);
  5728. IF NOT ^S^T^A^T^U^S.^N^O^R^M^A^L THEN
  5729. ^S^O^U^R^C^E_^I^N^D^E^X @D= ^O^L^D_^I^N^D^E^X; ^0 ^P^O^I^N^T ^T^O ^O^F^F^E^N^D^I^N^G ^T^O^K^E^N ^2
  5730. ^S^O^U^R^C^E_^E^R^R^O^R(^S^T^A^T^U^S);
  5731. ^S^O^U^R^C^E_^I^N^D^E^X @D= ^S^O^U^R^C^E_^L^E^N^G^T^H + 1 ^0 ^S^T^O^P ^S^C^A^N^N^I^N^G ^N^O^W ^2
  5732. IFEND
  5733. UNTIL ( ^S^O^U^R^C^E_^I^N^D^E^X > ^S^O^U^R^C^E_^L^E^N^G^T^H ) OR
  5734. ( ^T^O^K^E^N.^T^Y^P = ^C^L^C$^E^L^L^I^P^S^I^S_^T^O^K^E^N );
  5735. IF ^S^T^A^T^U^S.^N^O^R^M^A^L AND
  5736. ( ^T^O^K^E^N.^T^Y^P = ^C^L^C$^E^L^L^I^P^S^I^S_^T^O^K^E^N ) THEN
  5737. ^R^E^A^D_^L^I^N^E(^E^O^F_^F^L^A^G);
  5738. IF ( ^O^L^D_^I^N^D^E^X + ^L^I^N^E_^L^E^N^G^T^H ) > ^O^S^C$^M^A^X_^S^T^R^I^N^G_^S^I^Z^E THEN
  5739. ^O^S^P$^S^E^T_^S^T^A^T^U^S_^A^B^N^O^R^M^A^L(^T^D^C_^P^R^O^D_^C^O^D^E,
  5740. ^T^D^E_^C^O^N^T^I^N^U^A^T^I^O^N_^O^V^E^R^F^L^O^W, '', ^S^T^A^T^U^S);
  5741. ^S^O^U^R^C^E_^E^R^R^O^R(^S^T^A^T^U^S)
  5742. ELSE
  5743. STRINGREP(^S^O^U^R^C^E_^S^T^R^I^N^G, ^S^O^U^R^C^E_^L^E^N^G^T^H,
  5744. ^S^O^U^R^C^E_^S^T^R^I^N^G(1,^O^L^D_^I^N^D^E^X-1),
  5745. ^L^I^N^E_^B^U^F^F^E^R(1,^L^I^N^E_^L^E^N^G^T^H));
  5746. ^S^O^U^R^C^E_^I^N^D^E^X @D= ^O^L^D_^I^N^D^E^X
  5747. IFEND
  5748. IFEND
  5749. WHILEND;
  5750. ^S^O^U^R^C^E_^I^N^D^E^X @D= 1;
  5751. ^C^L^P$^S^C^A^N_^T^O^K^E^N(^C^L^C$^N^O^T_^I^N_^E^X^P^R^E^S^S^I^O^N, ^S^O^U^R^C^E_^S^T^R^I^N^G,
  5752. ^S^O^U^R^C^E_^I^N^D^E^X, ^T^O^K^E^N, ^S^T^A^T^U^S);
  5753. IF ^S^T^A^T^U^S.^N^O^R^M^A^L AND ^0 ^E^R^R^O^R ^R^E^P^O^R^T^E^D ^D^U^R^I^N^G ^P^R^E-^S^C^A^N ^2
  5754. ( ^S^O^U^R^C^E_^I^N^D^E^X <= ^S^O^U^R^C^E_^L^E^N^G^T^H ) THEN
  5755. ^E^M^P^T^Y_^F^I^L^E @D= FALSE; ^0 ^F^O^U^N^D ^S^O^M^E^T^H^I^N^G ^2
  5756. ^C^H^E^C^K_^A^N^D_^P^R^O^C^E^S^S_^S^T^A^T^E^M^E^N^T
  5757. IFEND;
  5758. ^R^E^A^D_^L^I^N^E(^E^O^F_^F^L^A^G);
  5759. WHILEND;
  5760.  
  5761. ^S^T^O^R^E_^P^A^R^A^M^E^T^E^R^S(^P^A^R^M_^R^E^C)
  5762. PROCEND ^A^N^A^L^Y^Z^E_^L^I^N^E^S;
  5763. ?? OLDTITLE ??
  5764.  
  5765. ?? NEWTITLE @D= '^G^L^O^B^A^L_^E^D^I^T^S' ??
  5766. ?? EJECT ??
  5767.  
  5768. PROCEDURE ^G^L^O^B^A^L_^E^D^I^T^S;
  5769. VAR
  5770. ^B^E^H^A^V^I^O^R_^N^D^X@D 0 .. ^C^U^R^S^O^R_^B^E^H^A^V^I^O^R_^M^A^X;
  5771.  
  5772. IF ^E^M^P^T^Y_^F^I^L^E THEN
  5773. ^O^S^P$^S^E^T_^S^T^A^T^U^S_^A^B^N^O^R^M^A^L(^T^D^C_^P^R^O^D_^C^O^D^E, ^T^D^E_^E^M^P^T^Y_^F^I^L^E,
  5774. '', ^S^T^A^T^U^S);
  5775. ^E^R^R^O^R_^S^T^A^T^U^S(^S^T^A^T^U^S)
  5776. ELSE
  5777. IF ^P^A^R^M_^R^E^C.^M^O^D^E^L_^N^A^M^E_^L^E^N = 0 THEN
  5778. ^O^S^P$^S^E^T_^S^T^A^T^U^S_^A^B^N^O^R^M^A^L(^T^D^C_^P^R^O^D_^C^O^D^E,
  5779. ^C^L^C$^R^E^Q^U^I^R^E^D_^P^A^R^A^M^E^T^E^R_^M^I^S^S^I^N^G,
  5780. ^V^E^R^B_^T^A^B^L^E[^P^A^R^M_^N^A^M^E_^V^E^R^B].^N^A^M^E, ^S^T^A^T^U^S);
  5781. ^O^S^P$^A^P^P^E^N^D_^S^T^A^T^U^S_^P^A^R^A^M^E^T^E^R(
  5782. ' ', ^O^S^C$^S^T^A^T^U^S_^P^A^R^A^M^E^T^E^R_^D^E^L^I^M^I^T^E^R, ^S^T^A^T^U^S);
  5783. ^E^R^R^O^R_^S^T^A^T^U^S(^S^T^A^T^U^S)
  5784. IFEND;
  5785. IF ^P^A^R^M_^R^E^C.^C^U^R^S^O^R_^E^N^C^O^D^I^N^G = ^I^N^V^A^L^I^D_^C^U^R^S^O^R THEN
  5786. ^O^S^P$^S^E^T_^S^T^A^T^U^S_^A^B^N^O^R^M^A^L(^T^D^C_^P^R^O^D_^C^O^D^E,
  5787. ^C^L^C$^R^E^Q^U^I^R^E^D_^P^A^R^A^M^E^T^E^R_^M^I^S^S^I^N^G,
  5788. ^V^E^R^B_^T^A^B^L^E[^P^A^R^M_^C^U^R^S^O^R_^E^N^C^O^D^I^N^G_^V^E^R^B].^N^A^M^E, ^S^T^A^T^U^S);
  5789. ^O^S^P$^A^P^P^E^N^D_^S^T^A^T^U^S_^P^A^R^A^M^E^T^E^R(
  5790. ' ', ^O^S^C$^S^T^A^T^U^S_^P^A^R^A^M^E^T^E^R_^D^E^L^I^M^I^T^E^R, ^S^T^A^T^U^S);
  5791. ^E^R^R^O^R_^S^T^A^T^U^S(^S^T^A^T^U^S)
  5792. IFEND;
  5793. IF ^P^A^R^M_^R^E^C.^C^U^R^S^O^R_^E^N^C^O^D^I^N^G = ^B^I^N^A^R^Y_^C^U^R^S^O^R THEN
  5794. ^J^U^N^K_^L^E^N := 0;
  5795. ^S^I^Z^E_^N^D^X := 0;
  5796. WHILE ( ^S^I^Z^E_^N^D^X <= ^S^C^R^E^E^N_^S^I^Z^E_^M^A^X ) AND
  5797. ( ^P^A^R^M_^R^E^C.^S^I^Z^E[^S^I^Z^E_^N^D^X].^C^O^L^S <> 0 ) AND
  5798. ( ^P^A^R^M_^R^E^C.^S^I^Z^E[^S^I^Z^E_^N^D^X].^R^O^W^S <> 0 ) DO
  5799. IF ^J^U^N^K_^L^E^N < ^P^A^R^M_^R^E^C.^S^I^Z^E[^S^I^Z^E_^N^D^X].^C^O^L^S THEN
  5800. ^J^U^N^K_^L^E^N := ^P^A^R^M_^R^E^C.^S^I^Z^E[^S^I^Z^E_^N^D^X].^C^O^L^S
  5801. IFEND;
  5802. ^S^I^Z^E_^N^D^X := ^S^I^Z^E_^N^D^X + 1
  5803. WHILEND;
  5804. IF ^J^U^N^K_^L^E^N + ^P^A^R^M_^R^E^C.^C^U^R^S^O^R_^B^I^A^S > ^B^I^N^A^R^Y_^C^O^L_^M^A^X THEN
  5805. ^O^S^P$^S^E^T_^S^T^A^T^U^S_^A^B^N^O^R^M^A^L(^T^D^C_^P^R^O^D_^C^O^D^E,
  5806. ^C^L^C$^V^A^L^U^E_^O^U^T_^O^F_^R^A^N^G^E,
  5807. ^V^E^R^B_^T^A^B^L^E[^P^A^R^M_^S^E^T_^S^I^Z^E_^V^E^R^B].^N^A^M^E, ^S^T^A^T^U^S);
  5808. ^O^S^P$^A^P^P^E^N^D_^S^T^A^T^U^S_^P^A^R^A^M^E^T^E^R( ' ',
  5809. ^O^S^C$^S^T^A^T^U^S_^P^A^R^A^M^E^T^E^R_^D^E^L^I^M^I^T^E^R, ^S^T^A^T^U^S);
  5810. ^E^R^R^O^R_^S^T^A^T^U^S(^S^T^A^T^U^S)
  5811. IFEND
  5812. IFEND;
  5813. FOR ^B^E^H^A^V^I^O^R_^N^D^X @D= 0 TO ^C^U^R^S^O^R_^B^E^H^A^V^I^O^R_^M^A^X DO
  5814. IF ^P^A^R^M_^R^E^C.^C^U^R^S^O^R_^B^E^H^A^V^I^O^R[^B^E^H^A^V^I^O^R_^N^D^X] < 0 THEN
  5815. IF ^B^E^H^A^V^I^O^R_^N^D^X < ^C^U^R^S^O^R_^B^E^H^A^V^I^O^R_^D^I^V THEN
  5816. ^O^S^P$^S^E^T_^S^T^A^T^U^S_^A^B^N^O^R^M^A^L(^T^D^C_^P^R^O^D_^C^O^D^E,
  5817. ^C^L^C$^R^E^Q^U^I^R^E^D_^P^A^R^A^M^E^T^E^R_^M^I^S^S^I^N^G,
  5818. ^V^E^R^B_^T^A^B^L^E[^P^A^R^M_^C^U^R^S^O^R_^B^E^H^A^V^I^O^R_^V^E^R^B + ^B^E^H^A^V^I^O^R_^N^D^X].^N^A^M^E,
  5819. ^S^T^A^T^U^S);
  5820. ^O^S^P$^A^P^P^E^N^D_^S^T^A^T^U^S_^P^A^R^A^M^E^T^E^R(
  5821. ' ', ^O^S^C$^S^T^A^T^U^S_^P^A^R^A^M^E^T^E^R_^D^E^L^I^M^I^T^E^R, ^S^T^A^T^U^S);
  5822. ^E^R^R^O^R_^S^T^A^T^U^S(^S^T^A^T^U^S)
  5823. IFEND
  5824. IFEND
  5825.  
  5826. FOREND
  5827. IFEND
  5828. PROCEND ^G^L^O^B^A^L_^E^D^I^T^S;
  5829. ?? OLDTITLE ??
  5830.  
  5831. ?? NEWTITLE @D= '^C^L^O^S^E_^I^N^P^U^T_^F^I^L^E' ??
  5832. ?? EJECT ??
  5833.  
  5834. PROCEDURE ^C^L^O^S^E_^I^N^P^U^T_^F^I^L^E;
  5835. ^C^L^O^S^E_^F^I^L^E(^I^N^P^U^T_^F^I^L^E_^S^E^L);
  5836. PROCEND ^C^L^O^S^E_^I^N^P^U^T_^F^I^L^E;
  5837. ?? OLDTITLE ??
  5838. ?? EJECT ??
  5839.  
  5840. ^I^N^I^T^I^A^L^I^Z^E_^P^A^R^S^I^N^G_^T^A^B^L^E^S;
  5841. ^O^P^E^N_^I^N^P^U^T_^F^I^L^E;
  5842. ^A^N^A^L^Y^Z^E_^L^I^N^E^S;
  5843. ^G^L^O^B^A^L_^E^D^I^T^S;
  5844. ^C^L^O^S^E_^I^N^P^U^T_^F^I^L^E;
  5845.  
  5846. PROCEND ^R^E^A^D_^T^D^L_^S^T^A^T^E^M^E^N^T^S;
  5847. ?? OLDTITLE ??
  5848.  
  5849. MODEND ^T^D^U^I^N;