home *** CD-ROM | disk | FTP | other *** search
/ Frozen Fish 2: PC / frozenfish_august_1995.bin / bbs / d07xx / d0770.lha / Uedit / Jenkins2.LZH / InUse.table < prev    next >
Text File  |  1991-04-08  |  19KB  |  586 lines
  1. ======= Config!inUse.table ===============================
  2.  
  3. COPYRIGHT 1989
  4. Robert A. Jenkins, Ph.D.
  5. 22901 Shagbark Lane
  6. Miller Woods, IL 60411
  7. (708) 758-0344
  8. All Rights Reserved
  9. Rick Stiles may distribute it as he pleases.
  10. =============================================================================
  11. When I first started adding commands to Rick's standard configuration I often
  12. found myself overwriting his commands, or worrying about whether I might have.
  13. It was obvious that the only way to know what was going on was to make a table
  14. of keys in use, and I certainly wasn't going to do it by hand and then have
  15. him change the commands in an upgrade a month later.
  16.  
  17. This command creates a table of all keys to which a command is attached.  The
  18. table is constructed at the end of this file after the words PLACE TABLE
  19. HERE.  It automatically deletes the old table before making up a new one.
  20.  
  21. Note that it must be attached to some key.  I have chosen ctl-k which has not
  22. been used in the standard configs in the past.  Before you compile it run
  23. teach keys and see if ctl-k is used in the current standard config.  All of
  24. the standard keys do not have a help line, so if you get "no help or unused"
  25. the key still might be used.  Try it and see what happens.
  26. =============================================================================
  27. Config!inUse.table
  28. <ctl-k:
  29. moveCursor(curFile,sFile)
  30. setSearch("PLACE TABLE HERE")
  31. if (not search(curFile,sHilite,eHilite,1)) return
  32. if (not search(curFile,sHilite,eHilite,1)) return
  33. equateLoc(curFile,sHilite,eHilite)
  34. equateLoc(curFile,eHilite,eFile)
  35. clearRgn(curFile,hilite)
  36. moveCursor(curFile,eFile)
  37. insertChar(curFile,eLine)
  38. refreshDisplay
  39. putMsg("Computing...")
  40. ..===== all modifiers ===================================
  41. ..===== F1234567890 =====================================
  42. insertRgn(curFile,eFile,"             Function Keys",all)
  43. insertChar(curFile,eLine)
  44. insertRgn(curFile,eFile,"             1234567890",all)
  45. insertChar(curFile,eLine)
  46. insertRgn(curFile,eFile,"      normal-",all)
  47. equateLoc(curFile,locA,atCursor)
  48. insertChar(curFile,eLine)
  49. insertRgn(curFile,eFile,"        shft-",all)
  50. insertChar(curFile,eLine)
  51. insertRgn(curFile,eFile,"         alt-",all)
  52. insertChar(curFile,eLine)
  53. insertRgn(curFile,eFile,"     shftAlt-",all)
  54. insertChar(curFile,eLine)
  55. insertRgn(curFile,eFile,"         ctl-",all)
  56. insertChar(curFile,eLine)
  57. insertRgn(curFile,eFile,"     shftCtl-",all)
  58. insertChar(curFile,eLine)
  59. insertRgn(curFile,eFile,"      altCtl-",all)
  60. insertChar(curFile,eLine)
  61. insertRgn(curFile,eFile,"  shftAltCtl-",all)
  62. insertChar(curFile,eLine)
  63. insertRgn(curFile,eFile,"      lAmiga-",all)
  64. insertChar(curFile,eLine)
  65. insertRgn(curFile,eFile,"      rAmiga-",all)
  66. insertChar(curFile,eLine)
  67. insertRgn(curFile,eFile,"     virtual-",all)
  68. insertChar(curFile,eLine)
  69. insertRgn(curFile,eFile,"             1234567890",all)
  70. moveCursor(curFile,locA)
  71.  
  72. do(n53,0,10) {
  73.    mul(n52,n53,104)
  74.    do(n50,80,89) {
  75.       add(n51,n50,n52)
  76.       if (inUse(n51)) insertChar(curFile,"*")
  77.          else insertChar(curFile," ") }
  78.       moveCursor(curFile,downLine) }
  79.  
  80. moveCursor(curFile,eFile)
  81. insertChar(curFile,eLine)
  82. insertChar(curFile,eLine)
  83.  
  84.  
  85. ..===== 1234567890-=\ ===============================
  86. insertRgn(curFile,eFile,"             1234567890-=\\",all)
  87. insertChar(curFile,eLine)
  88. insertRgn(curFile,eFile,"      normal-",all)
  89. equateLoc(curFile,locA,atCursor)
  90. insertChar(curFile,eLine)
  91. insertRgn(curFile,eFile,"        shft-",all)
  92. insertChar(curFile,eLine)
  93. insertRgn(curFile,eFile,"         alt-",all)
  94. insertChar(curFile,eLine)
  95. insertRgn(curFile,eFile,"     shftAlt-",all)
  96. insertChar(curFile,eLine)
  97. insertRgn(curFile,eFile,"         ctl-",all)
  98. insertChar(curFile,eLine)
  99. insertRgn(curFile,eFile,"     shftCtl-",all)
  100. insertChar(curFile,eLine)
  101. insertRgn(curFile,eFile,"      altCtl-",all)
  102. insertChar(curFile,eLine)
  103. insertRgn(curFile,eFile,"  shftAltCtl-",all)
  104. insertChar(curFile,eLine)
  105. insertRgn(curFile,eFile,"      lAmiga-",all)
  106. insertChar(curFile,eLine)
  107. insertRgn(curFile,eFile,"      rAmiga-",all)
  108. insertChar(curFile,eLine)
  109. insertRgn(curFile,eFile,"     virtual-",all)
  110. insertChar(curFile,eLine)
  111. insertRgn(curFile,eFile,"             1234567890-=\\",all)
  112. moveCursor(curFile,locA)
  113.  
  114. do(n53,0,10) {
  115.    mul(n52,n53,104)
  116.    do(n50,1,13) {
  117.       add(n51,n50,n52)
  118.       if (inUse(n51)) insertChar(curFile,"*")
  119.          else insertChar(curFile," ") }
  120.       moveCursor(curFile,downLine) }
  121.  
  122. moveCursor(curFile,eFile)
  123. insertChar(curFile,eLine)
  124. insertChar(curFile,eLine)
  125.  
  126. ..===== qwertyuiop[] ===============================
  127. insertRgn(curFile,eFile,"             qwertyuiop[]",all)
  128. insertChar(curFile,eLine)
  129. insertRgn(curFile,eFile,"      normal-",all)
  130. equateLoc(curFile,locA,atCursor)
  131. insertChar(curFile,eLine)
  132. insertRgn(curFile,eFile,"        shft-",all)
  133. insertChar(curFile,eLine)
  134. insertRgn(curFile,eFile,"         alt-",all)
  135. insertChar(curFile,eLine)
  136. insertRgn(curFile,eFile,"     shftAlt-",all)
  137. insertChar(curFile,eLine)
  138. insertRgn(curFile,eFile,"         ctl-",all)
  139. insertChar(curFile,eLine)
  140. insertRgn(curFile,eFile,"     shftCtl-",all)
  141. insertChar(curFile,eLine)
  142. insertRgn(curFile,eFile,"      altCtl-",all)
  143. insertChar(curFile,eLine)
  144. insertRgn(curFile,eFile,"  shftAltCtl-",all)
  145. insertChar(curFile,eLine)
  146. insertRgn(curFile,eFile,"      lAmiga-",all)
  147. insertChar(curFile,eLine)
  148. insertRgn(curFile,eFile,"      rAmiga-",all)
  149. insertChar(curFile,eLine)
  150. insertRgn(curFile,eFile,"     virtual-",all)
  151. insertChar(curFile,eLine)
  152. insertRgn(curFile,eFile,"             qwertyuiop[]",all)
  153. moveCursor(curFile,locA)
  154.  
  155. do(n53,0,10) {
  156.    mul(n52,n53,104)
  157.    do(n50,16,27) {
  158.       add(n51,n50,n52)
  159.       if (inUse(n51)) insertChar(curFile,"*")
  160.          else insertChar(curFile," ") }
  161.       moveCursor(curFile,downLine) }
  162.  
  163. moveCursor(curFile,eFile)
  164. insertChar(curFile,eLine)
  165. insertChar(curFile,eLine)
  166.  
  167. ..==== asdfghjkl;' ======================
  168. insertRgn(curFile,eFile,"             asdfghjkl;'",all)
  169. insertChar(curFile,eLine)
  170. insertRgn(curFile,eFile,"      normal-",all)
  171. equateLoc(curFile,locA,atCursor)
  172. insertChar(curFile,eLine)
  173. insertRgn(curFile,eFile,"        shft-",all)
  174. insertChar(curFile,eLine)
  175. insertRgn(curFile,eFile,"         alt-",all)
  176. insertChar(curFile,eLine)
  177. insertRgn(curFile,eFile,"     shftAlt-",all)
  178. insertChar(curFile,eLine)
  179. insertRgn(curFile,eFile,"         ctl-",all)
  180. insertChar(curFile,eLine)
  181. insertRgn(curFile,eFile,"     shftCtl-",all)
  182. insertChar(curFile,eLine)
  183. insertRgn(curFile,eFile,"      altCtl-",all)
  184. insertChar(curFile,eLine)
  185. insertRgn(curFile,eFile,"  shftAltCtl-",all)
  186. insertChar(curFile,eLine)
  187. insertRgn(curFile,eFile,"      lAmiga-",all)
  188. insertChar(curFile,eLine)
  189. insertRgn(curFile,eFile,"      rAmiga-",all)
  190. insertChar(curFile,eLine)
  191. insertRgn(curFile,eFile,"     virtual-",all)
  192. insertChar(curFile,eLine)
  193. insertRgn(curFile,eFile,"             asdfghjkl;'",all)
  194. moveCursor(curFile,locA)
  195.  
  196. do(n53,0,10) {
  197.    mul(n52,n53,104)
  198.    do(n50,32,42) {
  199.       add(n51,n50,n52)
  200.       if (inUse(n51)) insertChar(curFile,"*")
  201.          else insertChar(curFile," ") }
  202.       moveCursor(curFile,downLine) }
  203.  
  204. moveCursor(curFile,eFile)
  205. insertChar(curFile,eLine)
  206. insertChar(curFile,eLine)
  207.  
  208. ..==== zxcvbnm,./ ======================
  209. insertRgn(curFile,eFile,"             zxcvbnm,./",all)
  210. insertChar(curFile,eLine)
  211. insertRgn(curFile,eFile,"      normal-",all)
  212. equateLoc(curFile,locA,atCursor)
  213. insertChar(curFile,eLine)
  214. insertRgn(curFile,eFile,"        shft-",all)
  215. insertChar(curFile,eLine)
  216. insertRgn(curFile,eFile,"         alt-",all)
  217. insertChar(curFile,eLine)
  218. insertRgn(curFile,eFile,"     shftAlt-",all)
  219. insertChar(curFile,eLine)
  220. insertRgn(curFile,eFile,"         ctl-",all)
  221. insertChar(curFile,eLine)
  222. insertRgn(curFile,eFile,"     shftCtl-",all)
  223. insertChar(curFile,eLine)
  224. insertRgn(curFile,eFile,"      altCtl-",all)
  225. insertChar(curFile,eLine)
  226. insertRgn(curFile,eFile,"  shftAltCtl-",all)
  227. insertChar(curFile,eLine)
  228. insertRgn(curFile,eFile,"      lAmiga-",all)
  229. insertChar(curFile,eLine)
  230. insertRgn(curFile,eFile,"      rAmiga-",all)
  231. insertChar(curFile,eLine)
  232. insertRgn(curFile,eFile,"     virtual-",all)
  233. insertChar(curFile,eLine)
  234. insertRgn(curFile,eFile,"             zxcvbnm,./",all)
  235. moveCursor(curFile,locA)
  236.  
  237. do(n53,0,10) {
  238.    mul(n52,n53,104)
  239.    do(n50,49,58) {
  240.       add(n51,n50,n52)
  241.       if (inUse(n51)) insertChar(curFile,"*")
  242.          else insertChar(curFile," ") }
  243.       moveCursor(curFile,downLine) }
  244.  
  245. moveCursor(curFile,eFile)
  246. insertChar(curFile,eLine)
  247. insertChar(curFile,eLine)
  248.  
  249. ..===== unused ===================
  250. insertRgn(curFile,eFile,"      unused  14 28 43 44 48 59 71 72 73 75",all)
  251. insertChar(curFile,eLine)
  252. insertRgn(curFile,eFile,"      normal-",all)
  253. equateLoc(curFile,locA,atCursor)
  254. insertChar(curFile,eLine)
  255. insertRgn(curFile,eFile,"        shft-",all)
  256. insertChar(curFile,eLine)
  257. insertRgn(curFile,eFile,"         alt-",all)
  258. insertChar(curFile,eLine)
  259. insertRgn(curFile,eFile,"     shftAlt-",all)
  260. insertChar(curFile,eLine)
  261. insertRgn(curFile,eFile,"         ctl-",all)
  262. insertChar(curFile,eLine)
  263. insertRgn(curFile,eFile,"     shftCtl-",all)
  264. insertChar(curFile,eLine)
  265. insertRgn(curFile,eFile,"      altCtl-",all)
  266. insertChar(curFile,eLine)
  267. insertRgn(curFile,eFile,"  shftAltCtl-",all)
  268. insertChar(curFile,eLine)
  269. insertRgn(curFile,eFile,"      lAmiga-",all)
  270. insertChar(curFile,eLine)
  271. insertRgn(curFile,eFile,"      rAmiga-",all)
  272. insertChar(curFile,eLine)
  273. insertRgn(curFile,eFile,"     virtual-",all)
  274. insertChar(curFile,eLine)
  275. insertRgn(curFile,eFile,"              14 28 43 44 48 59 71 72 73 75",all)
  276. moveCursor(curFile,locA)
  277.  
  278. do(n53,0,10) {
  279.    mul(n52,n53,104)
  280.    add(n51,14,n52)
  281.    insertChar(curFile," ")
  282.    insertChar(curFile," ")
  283.    if (inUse(n51)) insertChar(curFile,"*")
  284.       else insertChar(curFile," ")
  285.    add(n51,28,n52)
  286.    insertChar(curFile," ")
  287.    insertChar(curFile," ")
  288.    if (inUse(n51)) insertChar(curFile,"*")
  289.       else insertChar(curFile," ")
  290.    add(n51,43,n52)
  291.    insertChar(curFile," ")
  292.    insertChar(curFile," ")
  293.    if (inUse(n51)) insertChar(curFile,"*")
  294.       else insertChar(curFile," ")
  295.    add(n51,44,n52)
  296.    insertChar(curFile," ")
  297.    insertChar(curFile," ")
  298.    if (inUse(n51)) insertChar(curFile,"*")
  299.       else insertChar(curFile," ")
  300.    add(n51,48,n52)
  301.    insertChar(curFile," ")
  302.    insertChar(curFile," ")
  303.    if (inUse(n51)) insertChar(curFile,"*")
  304.       else insertChar(curFile," ")
  305.    add(n51,59,n52)
  306.    insertChar(curFile," ")
  307.    insertChar(curFile," ")
  308.    if (inUse(n51)) insertChar(curFile,"*")
  309.       else insertChar(curFile," ")
  310.    add(n51,71,n52)
  311.    insertChar(curFile," ")
  312.    insertChar(curFile," ")
  313.    if (inUse(n51)) insertChar(curFile,"*")
  314.       else insertChar(curFile," ")
  315.    add(n51,72,n52)
  316.    insertChar(curFile," ")
  317.    insertChar(curFile," ")
  318.    if (inUse(n51)) insertChar(curFile,"*")
  319.       else insertChar(curFile," ")
  320.    add(n51,73,n52)
  321.    insertChar(curFile," ")
  322.    insertChar(curFile," ")
  323.    if (inUse(n51)) insertChar(curFile,"*")
  324.       else insertChar(curFile," ")
  325.    add(n51,75,n52)
  326.    insertChar(curFile," ")
  327.    insertChar(curFile," ")
  328.    if (inUse(n51)) insertChar(curFile,"*")
  329.       else insertChar(curFile," ")
  330.    moveCursor(curFile,downLine) }
  331.  
  332. moveCursor(curFile,eFile)
  333. insertChar(curFile,eLine)
  334. insertChar(curFile,eLine)
  335.  
  336. ..===== kp0123456789 ===================
  337. insertRgn(curFile,eFile,"          kp 0123456789.-E()/*+",all)
  338. insertChar(curFile,eLine)
  339. insertRgn(curFile,eFile,"      normal-",all)
  340. equateLoc(curFile,locA,atCursor)
  341. insertChar(curFile,eLine)
  342. insertRgn(curFile,eFile,"        shft-",all)
  343. insertChar(curFile,eLine)
  344. insertRgn(curFile,eFile,"         alt-",all)
  345. insertChar(curFile,eLine)
  346. insertRgn(curFile,eFile,"     shftAlt-",all)
  347. insertChar(curFile,eLine)
  348. insertRgn(curFile,eFile,"         ctl-",all)
  349. insertChar(curFile,eLine)
  350. insertRgn(curFile,eFile,"     shftCtl-",all)
  351. insertChar(curFile,eLine)
  352. insertRgn(curFile,eFile,"      altCtl-",all)
  353. insertChar(curFile,eLine)
  354. insertRgn(curFile,eFile,"  shftAltCtl-",all)
  355. insertChar(curFile,eLine)
  356. insertRgn(curFile,eFile,"      lAmiga-",all)
  357. insertChar(curFile,eLine)
  358. insertRgn(curFile,eFile,"      rAmiga-",all)
  359. insertChar(curFile,eLine)
  360. insertRgn(curFile,eFile,"     virtual-",all)
  361. insertChar(curFile,eLine)
  362. insertRgn(curFile,eFile,"          kp 0123456789.-E()/*+",all)
  363. moveCursor(curFile,locA)
  364.  
  365. do(n53,0,10) {
  366.    mul(n52,n53,104)
  367.    add(n51,15,n52)  ..kp0
  368.    if (inUse(n51)) insertChar(curFile,"*")
  369.       else insertChar(curFile," ")
  370.    add(n51,29,n52)  ..kp1
  371.    if (inUse(n51)) insertChar(curFile,"*")
  372.       else insertChar(curFile," ")
  373.    add(n51,30,n52)  ..kp2
  374.    if (inUse(n51)) insertChar(curFile,"*")
  375.       else insertChar(curFile," ")
  376.    add(n51,31,n52)  ..kp3
  377.    if (inUse(n51)) insertChar(curFile,"*")
  378.       else insertChar(curFile," ")
  379.    add(n51,45,n52)  ..kp4
  380.    if (inUse(n51)) insertChar(curFile,"*")
  381.       else insertChar(curFile," ")
  382.    add(n51,46,n52)  ..kp5
  383.    if (inUse(n51)) insertChar(curFile,"*")
  384.       else insertChar(curFile," ")
  385.    add(n51,47,n52)  ..kp6
  386.    if (inUse(n51)) insertChar(curFile,"*")
  387.       else insertChar(curFile," ")
  388.    add(n51,61,n52)  ..kp7
  389.    if (inUse(n51)) insertChar(curFile,"*")
  390.       else insertChar(curFile," ")
  391.    add(n51,62,n52)  ..kp8
  392.    if (inUse(n51)) insertChar(curFile,"*")
  393.       else insertChar(curFile," ")
  394.    add(n51,63,n52)  ..kp9
  395.    if (inUse(n51)) insertChar(curFile,"*")
  396.       else insertChar(curFile," ")
  397.    add(n51,60,n52)  ..kpDot
  398.    if (inUse(n51)) insertChar(curFile,"*")
  399.       else insertChar(curFile," ")
  400.    add(n51,74,n52)  ..kpMinus
  401.    if (inUse(n51)) insertChar(curFile,"*")
  402.       else insertChar(curFile," ")
  403.    add(n51,67,n52)  ..kpEnter
  404.    if (inUse(n51)) insertChar(curFile,"*")
  405.       else insertChar(curFile," ")
  406.    add(n51,90,n52)  ..kpLParen
  407.    if (inUse(n51)) insertChar(curFile,"*")
  408.       else insertChar(curFile," ")
  409.    add(n51,91,n52)  ..kpRParen
  410.    if (inUse(n51)) insertChar(curFile,"*")
  411.       else insertChar(curFile," ")
  412.    add(n51,92,n52)  ..kpSlash
  413.    if (inUse(n51)) insertChar(curFile,"*")
  414.       else insertChar(curFile," ")
  415.    add(n51,93,n52)  ..KpStar
  416.    if (inUse(n51)) insertChar(curFile,"*")
  417.       else insertChar(curFile," ")
  418.    add(n51,94,n52)  ..kpPlus
  419.    if (inUse(n51)) insertChar(curFile,"*")
  420.       else insertChar(curFile," ")
  421.    moveCursor(curFile,downLine) }
  422.  
  423. moveCursor(curFile,eFile)
  424. insertChar(curFile,eLine)
  425. insertChar(curFile,eLine)
  426.  
  427. ..===== buttonDown buttonUp ======================
  428. insertRgn(curFile,eFile,"buttonDown buttonUp",all)
  429. insertChar(curFile,eLine)
  430. insertRgn(curFile,eFile,"      button DU",all)
  431. insertChar(curFile,eLine)
  432. insertRgn(curFile,eFile,"      normal-",all)
  433. equateLoc(curFile,locA,atCursor)
  434. insertChar(curFile,eLine)
  435. insertRgn(curFile,eFile,"        shft-",all)
  436. insertChar(curFile,eLine)
  437. insertRgn(curFile,eFile,"         alt-",all)
  438. insertChar(curFile,eLine)
  439. insertRgn(curFile,eFile,"     shftAlt-",all)
  440. insertChar(curFile,eLine)
  441. insertRgn(curFile,eFile,"         ctl-",all)
  442. insertChar(curFile,eLine)
  443. insertRgn(curFile,eFile,"     shftCtl-",all)
  444. insertChar(curFile,eLine)
  445. insertRgn(curFile,eFile,"      altCtl-",all)
  446. insertChar(curFile,eLine)
  447. insertRgn(curFile,eFile,"  shftAltCtl-",all)
  448. insertChar(curFile,eLine)
  449. insertRgn(curFile,eFile,"      lAmiga-",all)
  450. insertChar(curFile,eLine)
  451. insertRgn(curFile,eFile,"      rAmiga-",all)
  452. insertChar(curFile,eLine)
  453. insertRgn(curFile,eFile,"     virtual-",all)
  454. insertChar(curFile,eLine)
  455. insertRgn(curFile,eFile,"      button DU",all)
  456. moveCursor(curFile,locA)
  457.  
  458. do(n53,0,10) {
  459.    mul(n52,n53,104)
  460.    add(n51,96,n52)  ..buttonDown
  461.    if (inUse(n51)) insertChar(curFile,"*")
  462.       else insertChar(curFile," ")
  463.    add(n51,97,n52)  ..buttonUp
  464.    if (inUse(n51)) insertChar(curFile,"*")
  465.       else insertChar(curFile," ")
  466.    moveCursor(curFile,downLine) }
  467.  
  468. moveCursor(curFile,eFile)
  469. insertChar(curFile,eLine)
  470. insertChar(curFile,eLine)
  471.  
  472. ..===== gadget1234 closeBox==============================
  473. insertRgn(curFile,eFile,"gadgets 1234 closeBox",all)
  474. insertChar(curFile,eLine)
  475. insertRgn(curFile,eFile,"      gadget 1234cB",all)
  476. insertChar(curFile,eLine)
  477. insertRgn(curFile,eFile,"      normal-",all)
  478. equateLoc(curFile,locA,atCursor)
  479. insertChar(curFile,eLine)
  480. insertRgn(curFile,eFile,"        shft-",all)
  481. insertChar(curFile,eLine)
  482. insertRgn(curFile,eFile,"         alt-",all)
  483. insertChar(curFile,eLine)
  484. insertRgn(curFile,eFile,"     shftAlt-",all)
  485. insertChar(curFile,eLine)
  486. insertRgn(curFile,eFile,"         ctl-",all)
  487. insertChar(curFile,eLine)
  488. insertRgn(curFile,eFile,"     shftCtl-",all)
  489. insertChar(curFile,eLine)
  490. insertRgn(curFile,eFile,"      altCtl-",all)
  491. insertChar(curFile,eLine)
  492. insertRgn(curFile,eFile,"  shftAltCtl-",all)
  493. insertChar(curFile,eLine)
  494. insertRgn(curFile,eFile,"      lAmiga-",all)
  495. insertChar(curFile,eLine)
  496. insertRgn(curFile,eFile,"      rAmiga-",all)
  497. insertChar(curFile,eLine)
  498. insertRgn(curFile,eFile,"     virtual-",all)
  499. insertChar(curFile,eLine)
  500. insertRgn(curFile,eFile,"      gadget 1234cB",all)
  501. moveCursor(curFile,locA)
  502.  
  503. do(n53,0,10) {
  504.    mul(n52,n53,104)
  505.    add(n51,98,n52)  ..gadget1
  506.    if (inUse(n51)) insertChar(curFile,"*")
  507.       else insertChar(curFile," ")
  508.    add(n51,99,n52)  ..gadget2
  509.    if (inUse(n51)) insertChar(curFile,"*")
  510.       else insertChar(curFile," ")
  511.    add(n51,100,n52)  ..gadget3
  512.    if (inUse(n51)) insertChar(curFile,"*")
  513.       else insertChar(curFile," ")
  514.    add(n51,101,n52)  ..gadget4
  515.    if (inUse(n51)) insertChar(curFile,"*")
  516.       else insertChar(curFile," ")
  517.    add(n51,102,n52)  ..closeBox
  518.    if (inUse(n51)) insertChar(curFile,"*")
  519.       else insertChar(curFile," ")
  520.    moveCursor(curFile,downLine) }
  521.  
  522. moveCursor(curFile,eFile)
  523. insertChar(curFile,eLine)
  524. insertChar(curFile,eLine)
  525.  
  526. ..===== ESC, TAB, SPACE, RETURN, HELP, BACKSPACE, DEL ===
  527. insertRgn(curFile,eFile,"ESC, TAB, SPACE, RETURN, HELP, BACKSPACE, DEL",all)
  528. insertChar(curFile,eLine)
  529. insertRgn(curFile,eFile,"             ETSRHBD",all)
  530. insertChar(curFile,eLine)
  531. insertRgn(curFile,eFile,"      normal-",all)
  532. equateLoc(curFile,locA,atCursor)
  533. insertChar(curFile,eLine)
  534. insertRgn(curFile,eFile,"        shft-",all)
  535. insertChar(curFile,eLine)
  536. insertRgn(curFile,eFile,"         alt-",all)
  537. insertChar(curFile,eLine)
  538. insertRgn(curFile,eFile,"     shftAlt-",all)
  539. insertChar(curFile,eLine)
  540. insertRgn(curFile,eFile,"         ctl-",all)
  541. insertChar(curFile,eLine)
  542. insertRgn(curFile,eFile,"     shftCtl-",all)
  543. insertChar(curFile,eLine)
  544. insertRgn(curFile,eFile,"      altCtl-",all)
  545. insertChar(curFile,eLine)
  546. insertRgn(curFile,eFile,"  shftAltCtl-",all)
  547. insertChar(curFile,eLine)
  548. insertRgn(curFile,eFile,"      lAmiga-",all)
  549. insertChar(curFile,eLine)
  550. insertRgn(curFile,eFile,"      rAmiga-",all)
  551. insertChar(curFile,eLine)
  552. insertRgn(curFile,eFile,"     virtual-",all)
  553. insertChar(curFile,eLine)
  554. insertRgn(curFile,eFile,"             ETSRHBD",all)
  555. moveCursor(curFile,locA)
  556.  
  557. do(n53,0,10) {
  558.    mul(n52,n53,104)
  559.    add(n51,69,n52)  ..ESC
  560.    if (inUse(n51)) insertChar(curFile,"*")
  561.       else insertChar(curFile," ")
  562.    add(n51,66,n52)  ..TAB
  563.    if (inUse(n51)) insertChar(curFile,"*")
  564.       else insertChar(curFile," ")
  565.    add(n51,64,n52)  ..SHIFT
  566.    if (inUse(n51)) insertChar(curFile,"*")
  567.       else insertChar(curFile," ")
  568.    add(n51,68,n52)  ..RETURN
  569.    if (inUse(n51)) insertChar(curFile,"*")
  570.       else insertChar(curFile," ")
  571.    add(n51,96,n52)  ..HELP
  572.    if (inUse(n51)) insertChar(curFile,"*")
  573.       else insertChar(curFile," ")
  574.    add(n51,65,n52)  ..BACKSPACE
  575.    if (inUse(n51)) insertChar(curFile,"*")
  576.       else insertChar(curFile," ")
  577.    add(n51,70,n52)  ..DEL
  578.    if (inUse(n51)) insertChar(curFile,"*")
  579.       else insertChar(curFile," ")
  580.    moveCursor(curFile,downLine) }
  581.  
  582. moveCursor(curFile,eFile)
  583. insertChar(curFile,eLine)
  584. >Saturday 23-Feb-91 17:13:42
  585. PLACE TABLE HERE
  586.