home *** CD-ROM | disk | FTP | other *** search
/ ftp.barnyard.co.uk / 2015.02.ftp.barnyard.co.uk.tar / ftp.barnyard.co.uk / cpm / walnut-creek-CDROM / SIMTEL / CPMUG / CPMUG052.ARK / VARBATCH.SYM < prev   
Text File  |  1984-04-29  |  29KB  |  746 lines
  1. $2/12/81, 8:15AM, CODED BY DAN ROSS, PUBLIC DOMAIN
  2.  DEF  *XREF_MEM_ALLOC  = #1AED; $ +06893 ..
  3.  DEF  ?<<A<-  = #001B; $ +00027 ..
  4.        $    58  1474  2249
  5.  DEF  ?<<A<-.  = #001E; $ +00030 ..
  6.        $    63  1361  1446  1451  1456  1647  2136  2221  2226  2231
  7.        $  2422  2768
  8.  DEF  ACTUAL   = #0003; $ +00003 ..
  9.        $     0
  10.  DEF  ADROFTOPOFCURSORSTACKTOHL  = #065A; $ +01626 .Z
  11.        $  2240  2254  2288
  12.  DEF  ADROFTOPOFSOURCESTACKTOHL  = #0652; $ +01618 .R
  13.        $  2148  2160  2234  2248  2281  2437  2448
  14.  DEF  ADROF_JMP_CONST  = #0521; $ +01313 .!
  15.        $  2014  2601
  16.  DEF  ADROF_JMP_WBOOT  = #0001; $ +00001 .. UNUSED
  17.        $  1918
  18.  DEF  ADRSOFVARIABLES  = #0535; $ +01333 .5
  19.        $  2029  2270  2468  2478  2521
  20.  DEF  AFTERBATCHTEXT  = #0559; $ +01369 .Y
  21.        $  2093  2495  2519
  22.  DEF  AFTERGO_ORIGINAL  = #052C; $ +01324 ., UNUSED
  23.        $  2018
  24.  DEF  AFTERMODEL  = #08D1; $ +02257 ..
  25.        $  2103  2642
  26.  DEF  AFTERSAFEMEMORY  = #055B; $ +01371 .[
  27.        $  2099  2506  2954
  28.  DEF  AFTERTABLEOF2NDCHARS  = #0521; $ +01313 .!
  29.        $  2012  2377
  30.  DEF  AFTER_GO_BATCH  = #08DF; $ +02271 ..
  31.        $  1827  2602  2698  2941
  32.  DEF  ASM_ERRS  = #0000; $ +00000 .. UNUSED
  33.        $     0
  34.  DEF  ASM_PASS  = #0002; $ +00002 ..
  35.        $     0   407  1531  1539  1559  1615  1712  2306  2314  2334
  36.        $  2390  2487  2702  2865  2866  2900
  37.  DEF  ASM_STATUS  = #0000; $ +00000 .. UNUSED
  38.        $     0
  39.  DEF  AdrOfModels  = #0109; $ +00265 .. UNUSED
  40.        $  1170
  41.  DEF  AdrOfTopOfCursorStackToHL  = #027D; $ +00637 .}
  42.        $  1465  1479  1513
  43.  DEF  AdrOfTopOfSourceStackToHL  = #0275; $ +00629 .u
  44.        $  1373  1385  1459  1473  1506  1662  1673
  45.  DEF  AdrOfYourPatchProc  = #010D; $ +00269 .. UNUSED
  46.        $  1176
  47.  DEF  AdrOf_JMP_CONST  = #0144; $ +00324 .D
  48.        $  1239  1826  2910  2940
  49.  DEF  AdrOf_JMP_WBOOT  = #0001; $ +00001 ..
  50.        $  1143  2909
  51.  DEF  AdrsOfVariables  = #0158; $ +00344 .X
  52.        $  1254  1495  1693  1703  1746
  53.  DEF  AfterBatchText  = #017C; $ +00380 .|
  54.        $  1318  1720  1744  2895
  55.  DEF  AfterCPMDefaultTextBuf  = #0100; $ +00256 ..
  56.        $  2655  2688  2762  2764
  57.  DEF  AfterGO_Original  = #014F; $ +00335 .O
  58.        $  1243  2912
  59.  DEF  AfterModel  = #04F4; $ +01268 ..
  60.        $  1328  1867  2648  2811  2812  2824  2825
  61.  DEF  AfterSafeMemory  = #017E; $ +00382 .~
  62.        $  1324  1731  2848  2953
  63.  DEF  AfterTableOf2ndChars  = #0144; $ +00324 .D
  64.        $  1237  1602
  65.  DEF  BATCHCONIN  = #05A4; $ +01444 .. UNUSED
  66.        $  2134
  67.  DEF  BATCHCONST  = #0571; $ +01393 .q UNUSED
  68.        $  2110
  69.  DEF  BATCHCONSTREPORT  = #04F4; $ +01268 ..
  70.        $  1981  2116  2122  2624  2629
  71.  DEF  BATCHINPUTCURSOR  = #055D; $ +01373 .]
  72.        $  2103  2243
  73.  DEF  BATCHSTACK  = #0000; $ +00000 ..
  74.        $  2059  2081  2101
  75.  DEF  BELL  = #0007; $ +00007 ..
  76.        $  1906  2417
  77.  DEF  BatchCONIN  = #01C7; $ +00455 ..
  78.        $  1359  2697
  79.  DEF  BatchCONST  = #0194; $ +00404 ..
  80.        $  1335  2696  2925
  81.  DEF  BatchCONSTReport  = #0117; $ +00279 ..
  82.        $  1206  1341  1347  1849  1854
  83.  DEF  BatchInputCursor  = #0180; $ +00384 ..
  84.        $  1328  1468
  85.  DEF  BatchStack  = #0000; $ +00000 ..
  86.        $  1284  1306  1326
  87.  DEF  Bell  = #0007; $ +00007 ..
  88.        $  1131  1642
  89.  DEF  CARRIAGERETURN  = #000D; $ +00013 ..
  90.        $  1908  2022  2023  2025  2168  2174  2182  2186  2206  2306
  91.        $  2313  2334  2341  2487  2518  2572
  92.  DEF  CARRIAGERETURNBYTE  = #0533; $ +01331 .3
  93.        $  2025  2034  2034  2034  2034  2034  2034  2034
  94.  DEF  COMMANDERRRECOVERYSP  = #052C; $ +01324 .,
  95.        $  2020  2366  2371
  96.  DEF  CONTROLCBYTE  = #0532; $ +01330 .2
  97.        $  2024  2047
  98.  DEF  CONTROLPBYTE  = #052E; $ +01326 ..
  99.        $  2022  2035
  100.  DEF  CONTROLZBYTE  = #0530; $ +01328 .0
  101.        $  2023  2041
  102.  DEF  CPMClose  = #0010; $ +00016 ..
  103.        $  2660  2744
  104.  DEF  CPMDefaultFCB  = #005C; $ +00092 .\
  105.        $  2652  2725  2729  2732  2733  2735  2744  2753
  106.  DEF  CPMDefaultTextBuf  = #0080; $ +00128 ..
  107.        $  2653  2655  2767
  108.  DEF  CPMOpen  = #000F; $ +00015 ..
  109.        $  2659  2735
  110.  DEF  CPMPROGRAMSTART  = #0100; $ +00256 .. UNUSED
  111.        $  1922
  112.  DEF  CPMPerformFunction  = #0005; $ +00005 ..
  113.        $  2651  2705  2735  2744  2753  2867  2980
  114.  DEF  CPMProgramStart  = #0100; $ +00256 ..
  115.        $  1147  1153
  116.  DEF  CPMRead  = #0014; $ +00020 ..
  117.        $  2661  2753
  118.  DEF  CPMSystemCall  = #0064; $ +00100 .d
  119.        $  2663  2705  2735  2744  2753  2867
  120.  DEF  CPMTypeOut  = #0002; $ +00002 ..
  121.        $  2658  2705  2867
  122.  DEF  CRLF  = #08D1; $ +02257 ..
  123.        $  2683  2712
  124.  DEF  CURRENTDEPTHOFBATCHSTACK  = #0549; $ +01353 .I
  125.        $  2054  2221  2236  2242  2280  2298
  126.  DEF  CURSORTODE  = #0669; $ +01641 .i
  127.        $  2252  2260  2477
  128.  DEF  CarriageReturn  = #000D; $ +00013 ..
  129.        $  1133  1247  1248  1250  1393  1399  1407  1411  1431  1531
  130.        $  1538  1559  1566  1712  1743  1797  2683  2880
  131.  DEF  CarriageReturnByte  = #0156; $ +00342 .V
  132.        $  1250  1259  1259  1259  1259  1259  1259  1259
  133.  DEF  CloseBatchTextFile  = #0953; $ +02387 .S
  134.        $  2742  2966
  135.  DEF  CommandErrRecoverySP  = #014F; $ +00335 .O
  136.        $  1245  1591  1596
  137.  DEF  ControlCByte  = #0155; $ +00341 .U
  138.        $  1249  1272
  139.  DEF  ControlPByte  = #0151; $ +00337 .Q
  140.        $  1247  1260
  141.  DEF  ControlZByte  = #0153; $ +00339 .S
  142.        $  1248  1266
  143.  DEF  CopyCharToSafeMemory  = #0A58; $ +02648 .X
  144.        $  2829  2874  2882  2891  2892  2902
  145.  DEF  CopyModelToSafeMemory  = #0A41; $ +02625 .A
  146.        $  2816  2964
  147.  DEF  CopyOriginalJMPVectorToModel  = #0B09; $ +02825 ..
  148.        $  2907  2962
  149.  DEF  CopyTextToSafeMemory  = #0A86; $ +02694 ..
  150.        $  2846  2965
  151.  DEF  CurrentDepthOfBatchStack  = #016C; $ +00364 .l
  152.        $  1279  1446  1461  1467  1505  1523
  153.  DEF  CursorToDE  = #028C; $ +00652 ..
  154.        $  1477  1485  1702
  155.  DEF  DATALINKESCAPE  = #0010; $ +00016 ..
  156.        $  1909  2022
  157.  DEF  DISCOVERCURRENTDEPTHOFBATCHSTACK  = #0643; $ +01603 .C
  158.        $  2180  2219  2308  2336  2459  2570
  159.  DEF  DISCOVERNORMALSOURCEFORCURRENTLINE  = #0663; $ +01635 .c
  160.        $  2112  2140  2164  2246  2317  2348  2404  2427  2472  2584
  161.  DEF  DISCOVERNORMALSOURCEFORNEXTLINE  = #064D; $ +01613 .M
  162.        $  2142  2229
  163.  DEF  DISTANT  = #0001; $ +00001 .. UNUSED
  164.  DEF  DO  = #007F; $ +00127 ..
  165.        $   514  1603  1710  1725  1828  1836  2378  2485  2500  2603
  166.        $  2611  2780  2820  2854  2863  2913  2942
  167.  DEF  DataLinkEscape  = #0010; $ +00016 ..
  168.        $  1134  1247
  169.  DEF  DiagnosticInfo  = #010F; $ +00271 ..
  170.        $  1181  2794  2795
  171.  DEF  DiscoverCurrentDepthOfBatchStack  = #0266; $ +00614 .f
  172.        $  1405  1444  1533  1561  1684  1795
  173.  DEF  DiscoverNormalSourceForCurrentLine  = #0286; $ +00646 ..
  174.        $  1337  1365  1389  1471  1542  1573  1629  1652  1697  1809
  175.  DEF  DiscoverNormalSourceForNextLine  = #0270; $ +00624 .p
  176.        $  1367  1454
  177.  DEF  ELSE  = #018F; $ +00399 ..
  178.        $   555  1342  1348  1353  1419  1550  1578  1718  1818  2117
  179.        $  2123  2128  2194  2325  2353  2493  2593  2870
  180.  DEF  ENDDO  = #0099; $ +00153 ..
  181.        $   524  1619  1717  1750  1832  1840  2394  2492  2525  2607
  182.        $  2615  2813  2826  2869  2904  2917  2946
  183.  DEF  ENDIF  = #00DF; $ +00223 ..
  184.        $   576  1351  1352  1355  1372  1375  1381  1388  1396  1400
  185.        $  1401  1408  1422  1537  1540  1547  1557  1558  1565  1580
  186.        $  1614  1616  1634  1656  1738  1751  1785  1798  1820  2126
  187.        $  2127  2130  2147  2150  2156  2163  2171  2175  2176  2183
  188.        $  2197  2312  2315  2322  2332  2333  2340  2355  2389  2391
  189.        $  2409  2431  2513  2526  2560  2573  2595  2728  2734  2739
  190.        $  2748  2771  2772  2789  2797  2808  2840  2877  2878  2888
  191.        $  2901  2935
  192.  DEF  ENDOFTEXT  = #0003; $ +00003 ..
  193.        $  1905  2024  2190  2327  2331  2581
  194.  DEF  ENDPROCEDURE  = #00A5; $ +00165 ..
  195.        $   502  1357  1425  1434  1442  1447  1452  1457  1463  1469
  196.        $  1475  1481  1489  1497  1518  1524  1567  1581  1588  1636
  197.        $  1643  1648  1657  1663  1669  1675  1688  1753  1759  1766
  198.        $  1772  1787  1821  1841  1845  1850  1855  1860  1865  2132
  199.        $  2200  2209  2217  2222  2227  2232  2238  2244  2250  2256
  200.        $  2264  2272  2293  2299  2342  2356  2363  2411  2418  2423
  201.        $  2432  2438  2444  2450  2463  2528  2534  2541  2547  2562
  202.        $  2596  2616  2620  2625  2630  2635  2640  2708  2713  2720
  203.        $  2740  2749  2755  2775  2814  2827  2844  2905  2918  2936
  204.        $  2947  2991
  205.  DEF  ERRINCOMMAND  = #0719; $ +01817 ..
  206.        $  2361  2362  2365  2459  2512
  207.  DEF  ESCAPE  = #04F6; $ +01270 ..
  208.        $  1991  2119  2152  2488  2578
  209.  DEF  EXIT  = #01F9; $ +00505 ..
  210.        $   971  1539  1615  2314  2390  2900
  211.  DEF  EndOfFileWasFound  = #08D4; $ +02260 ..
  212.        $  2686  2754  2768
  213.  DEF  EndOfText  = #0003; $ +00003 ..
  214.        $  1130  1249  1415  1552  1556  1806
  215.  DEF  ErrInCommand  = #033C; $ +00828 .<
  216.        $  1586  1587  1590  1684  1737
  217.  DEF  Error,Message<-  = #002F; $ +00047 ./
  218.        $  2678  2727  2738  2747  2788  2796  2839  2934
  219.  DEF  Escape  = #0119; $ +00281 ..
  220.        $  1216  1344  1377  1713  1803  2857  2865  2874  2891
  221.  DEF  FALSE  = #0000; $ +00000 ..
  222.        $  1117  1211  1288  1293  1892  1986  2063  2068  2686
  223.  DEF  FETCH1BATCHCHARANDADVANCETHECURSOR  = #0670; $ +01648 .p
  224.        $  2258  2324  2352  2486  2489
  225.  DEF  FILESEPARATOR  = #001C; $ +00028 ..
  226.        $  1912  1916
  227.  DEF  FILETERMINATOR  = #009C; $ +00156 ..
  228.        $  1916  2011  2490
  229.  DEF  FIRSTPARTOFREQUESTSTOREINTOVARIABLE  = #07A9; $ +01961 ..
  230.        $  2452  2532  2538
  231.  DEF  Fetch1BatchCharAndAdvanceTheCursor  = #0293; $ +00659 ..
  232.        $  1483  1549  1577  1711  1714
  233.  DEF  FileInputCursor  = #08D5; $ +02261 ..
  234.        $  2688  2759  2774
  235.  DEF  FileSeparator  = #001C; $ +00028 ..
  236.        $  1137  1141
  237.  DEF  FileTerminator  = #009C; $ +00156 ..
  238.        $  1141  1236  1715  2892
  239.  DEF  FirstPartOfRequestStoreIntoVariable  = #03CC; $ +00972 ..
  240.        $  1677  1757  1763
  241.  DEF  GO_BATCH_CONIN  = #08DC; $ +02268 ..
  242.        $  2697  2959  2960
  243.  DEF  GO_BATCH_CONST  = #08D9; $ +02265 ..
  244.        $  1827  2602  2696  2940  2941  2957  2958
  245.  DEF  GO_ORIGINALCONIN  = #0526; $ +01318 .&
  246.        $  2016  2213  2326  2354
  247.  DEF  GO_ORIGINALCONOUT  = #0529; $ +01321 .)
  248.        $  2017  2205  2208  2398  2399  2400  2417
  249.  DEF  GO_ORIGINALCONST  = #0523; $ +01315 .#
  250.        $  2015  2114  2129  2144  2319  2601
  251.  DEF  GO_OriginalCONIN  = #0149; $ +00329 .I
  252.        $  1241  1438  1551  1579
  253.  DEF  GO_OriginalCONOUT  = #014C; $ +00332 .L
  254.        $  1242  1430  1433  1623  1624  1625  1642
  255.  DEF  GO_OriginalCONST  = #0146; $ +00326 .F
  256.        $  1240  1339  1354  1369  1544  1826  2911  2912  2928
  257.  DEF  GO_RHL  = #0772; $ +01906 .r
  258.        $  2385  2413
  259.  DEF  GO_rHL  = #0395; $ +00917 ..
  260.        $  1610  1638
  261.  DEF  HASCY=0AND  = #0019; $ +00025 .. UNUSED
  262.        $   842
  263.  DEF  HASCY=0OR  = #0019; $ +00025 .. UNUSED
  264.        $   867
  265.  DEF  HASCY=0THEN  = #0019; $ +00025 .. UNUSED
  266.        $   892
  267.  DEF  HASCY=1AND  = #0019; $ +00025 .. UNUSED
  268.        $   843
  269.  DEF  HASCY=1OR  = #0019; $ +00025 .. UNUSED
  270.        $   868
  271.  DEF  HASCY=1THEN  = #0019; $ +00025 .. UNUSED
  272.        $   893
  273.  DEF  IF  = #0044; $ +00068 .D
  274.        $   591  1364  1402  1410  1541  1572  1628  1696  1732  1778
  275.        $  1792  1802  1805  1808  2139  2177  2185  2316  2347  2403
  276.        $  2471  2507  2553  2567  2577  2580  2583  2761  2834  2929
  277.  DEF  IF+EXIT  = #001C; $ +00028 .. UNUSED
  278.        $  1069
  279.  DEF  IF+REPEAT  = #0018; $ +00024 .. UNUSED
  280.        $  1044
  281.  DEF  IF+THEN  = #0016; $ +00022 .. UNUSED
  282.        $   815
  283.  DEF  IF-EXIT  = #001C; $ +00028 .. UNUSED
  284.        $  1070
  285.  DEF  IF-REPEAT  = #0018; $ +00024 .. UNUSED
  286.        $  1045
  287.  DEF  IF-THEN  = #0016; $ +00022 .. UNUSED
  288.        $   816
  289.  DEF  IF0EXIT  = #001C; $ +00028 .. UNUSED
  290.        $  1057
  291.  DEF  IF0REPEAT  = #0018; $ +00024 .. UNUSED
  292.        $  1032
  293.  DEF  IF0THEN  = #0017; $ +00023 ..
  294.        $   803  1338  1340  1362  1653  2113  2115  2137  2428  2737
  295.        $  2746
  296.  DEF  IF=EXIT  = #001C; $ +00028 ..
  297.        $  1055  1712  2487  2702  2865  2866
  298.  DEF  IF=REPEAT  = #0018; $ +00024 ..
  299.        $  1030  2887
  300.  DEF  IF=THEN  = #0017; $ +00023 ..
  301.        $   801  1345  1378  1394  1398  1553  1605  2120  2153  2169
  302.        $  2173  2328  2380  2726  2730  2858  2861  2881  2890
  303.  DEF  IFCY=0EXIT  = #001F; $ +00031 .. UNUSED
  304.        $  1071
  305.  DEF  IFCY=0REPEAT  = #001B; $ +00027 .. UNUSED
  306.        $  1046
  307.  DEF  IFCY=0THEN  = #0019; $ +00025 .. UNUSED
  308.        $   817
  309.  DEF  IFCY=1EXIT  = #001F; $ +00031 .. UNUSED
  310.        $  1072
  311.  DEF  IFCY=1REPEAT  = #001B; $ +00027 .. UNUSED
  312.        $  1047
  313.  DEF  IFCY=1THEN  = #0019; $ +00025 .. UNUSED
  314.        $   818
  315.  DEF  IFEVENEXIT  = #001F; $ +00031 .. UNUSED
  316.        $  1077
  317.  DEF  IFEVENREPEAT  = #001B; $ +00027 .. UNUSED
  318.        $  1052
  319.  DEF  IFEVENTHEN  = #0018; $ +00024 .. UNUSED
  320.        $   823
  321.  DEF  IFODDEXIT  = #001E; $ +00030 .. UNUSED
  322.        $  1078
  323.  DEF  IFODDREPEAT  = #001A; $ +00026 .. UNUSED
  324.        $  1053
  325.  DEF  IFODDTHEN  = #0019; $ +00025 .. UNUSED
  326.        $   824
  327.  DEF  IFTHEABOVEAND  = #0320; $ +00800 . 
  328.        $   672
  329.  DEF  IFTHEABOVEOR  = #0279; $ +00633 .y
  330.        $   720
  331.  DEF  IFTHEABOVETHEN  = #030C; $ +00780 ..
  332.        $   754  1813  1814  2588  2589
  333.  DEF  IF|<=|CALL  = #0042; $ +00066 .B UNUSED
  334.        $   270
  335.  DEF  IF|<=|EXIT  = #001F; $ +00031 .. UNUSED
  336.        $  1067
  337.  DEF  IF|<=|GO  = #0029; $ +00041 .) UNUSED
  338.        $   169
  339.  DEF  IF|<=|GO.  = #001C; $ +00028 .. UNUSED
  340.        $   163
  341.  DEF  IF|<=|REPEAT  = #001B; $ +00027 .. UNUSED
  342.        $  1042
  343.  DEF  IF|<=|RET  = #001D; $ +00029 .. UNUSED
  344.        $   216
  345.  DEF  IF|<=|THEN  = #0018; $ +00024 .. UNUSED
  346.        $   813
  347.  DEF  IF|<|EXIT  = #001E; $ +00030 .. UNUSED
  348.        $  1068
  349.  DEF  IF|<|REPEAT  = #001A; $ +00026 .. UNUSED
  350.        $  1043
  351.  DEF  IF|<|THEN  = #0019; $ +00025 .. UNUSED
  352.        $   814
  353.  DEF  IF|>=|EXIT  = #001F; $ +00031 .. UNUSED
  354.        $  1066
  355.  DEF  IF|>=|REPEAT  = #001B; $ +00027 .. UNUSED
  356.        $  1041
  357.  DEF  IF|>=|THEN  = #0018; $ +00024 .. UNUSED
  358.        $   812
  359.  DEF  IF|>|CALL  = #002A; $ +00042 .* UNUSED
  360.        $   265
  361.  DEF  IF|>|EXIT  = #001E; $ +00030 .. UNUSED
  362.        $  1065
  363.  DEF  IF|>|GO  = #0028; $ +00040 .( UNUSED
  364.        $   154
  365.  DEF  IF|>|GO.  = #001B; $ +00027 .. UNUSED
  366.        $   159
  367.  DEF  IF|>|REPEAT  = #001A; $ +00026 .. UNUSED
  368.        $  1040
  369.  DEF  IF|>|RET  = #0022; $ +00034 ." UNUSED
  370.        $   209
  371.  DEF  IF|>|THEN  = #0019; $ +00025 .. UNUSED
  372.        $   811
  373.  DEF  IF~0EXIT  = #001D; $ +00029 .. UNUSED
  374.        $  1058
  375.  DEF  IF~0REPEAT  = #0019; $ +00025 ..
  376.        $  1033  1618  1831  1839  2393  2606  2614  2916  2945
  377.  DEF  IF~0THEN  = #0016; $ +00022 ..
  378.        $   804  1384  1390  1534  1545  1562  1612  2159  2165  2309
  379.        $  2320  2337  2387  2769
  380.  DEF  IF~=EXIT  = #001D; $ +00029 ..
  381.        $  1056  1531  1559  2306  2334
  382.  DEF  IF~=REPEAT  = #0019; $ +00025 ..
  383.        $  1031  1713  1715  1743  2488  2490  2518  2811  2812  2824
  384.        $  2825
  385.  DEF  IF~=THEN  = #0016; $ +00022 ..
  386.        $   802  1529  2304  2782  2787  2793
  387.  DEF  INPUT1CHAR  = #069D; $ +01693 ..
  388.        $  2118  2151  2301  2566
  389.  DEF  INPUT1CHARFROMCONSOLEANDECHO  = #0638; $ +01592 .8
  390.        $  2211  2501  2552
  391.  DEF  INPUT1CHARFROMSAMESOURCEASLASTCHAR  = #06F5; $ +01781 ..
  392.        $  2345  2360  2374
  393.  DEF  INPUTANDINTERPRETCOMMANDCHAR  = #0720; $ +01824 . 
  394.        $  2121  2154  2369  2390  2390
  395.  DEF  IS+AND  = #0016; $ +00022 .. UNUSED
  396.        $   840
  397.  DEF  IS+OR  = #0016; $ +00022 .. UNUSED
  398.        $   865
  399.  DEF  IS+THEN  = #0016; $ +00022 .. UNUSED
  400.        $   890
  401.  DEF  IS-AND  = #0016; $ +00022 .. UNUSED
  402.        $   841
  403.  DEF  IS-OR  = #0016; $ +00022 ..
  404.        $   866  1780  2555
  405.  DEF  IS-THEN  = #0016; $ +00022 .. UNUSED
  406.        $   891
  407.  DEF  IS0AND  = #0017; $ +00023 ..
  408.        $   828  1366  1543  1574  1630  1698  2141  2318  2349  2405
  409.        $  2473
  410.  DEF  IS0OR  = #0016; $ +00022 .. UNUSED
  411.        $   853
  412.  DEF  IS0THEN  = #0017; $ +00023 ..
  413.        $   878  1370  1548  1576  1632  1700  2145  2323  2351  2407
  414.        $  2475
  415.  DEF  IS=AND  = #0017; $ +00023 ..
  416.        $   826  1404  1734  1794  1807  2179  2509  2569  2582  2763
  417.        $  2836  2931
  418.  DEF  IS=OR  = #0016; $ +00022 ..
  419.        $   851  1412  1414  1804  2187  2189  2579
  420.  DEF  IS=THEN  = #0017; $ +00023 ..
  421.        $   876  1416  1736  2191  2511  2765  2838  2933
  422.  DEF  ISEVENAND  = #0018; $ +00024 .. UNUSED
  423.        $   848
  424.  DEF  ISEVENOR  = #0019; $ +00025 .. UNUSED
  425.        $   873
  426.  DEF  ISEVENTHEN  = #0018; $ +00024 .. UNUSED
  427.        $   898
  428.  DEF  ISODDAND  = #0019; $ +00025 .. UNUSED
  429.        $   849
  430.  DEF  ISODDOR  = #0018; $ +00024 .. UNUSED
  431.        $   874
  432.  DEF  ISODDTHEN  = #0019; $ +00025 .. UNUSED
  433.        $   899
  434.  DEF  IS|<=|AND  = #0018; $ +00024 .. UNUSED
  435.        $   838
  436.  DEF  IS|<=|OR  = #0019; $ +00025 .. UNUSED
  437.        $   863
  438.  DEF  IS|<=|THEN  = #0018; $ +00024 .. UNUSED
  439.        $   888
  440.  DEF  IS|<|AND  = #0019; $ +00025 .. UNUSED
  441.        $   839
  442.  DEF  IS|<|OR  = #0018; $ +00024 .. UNUSED
  443.        $   864
  444.  DEF  IS|<|THEN  = #0019; $ +00025 .. UNUSED
  445.        $   889
  446.  DEF  IS|>=|AND  = #0018; $ +00024 .. UNUSED
  447.        $   837
  448.  DEF  IS|>=|OR  = #0019; $ +00025 .. UNUSED
  449.        $   862
  450.  DEF  IS|>=|THEN  = #0018; $ +00024 ..
  451.        $   887  1782  2557
  452.  DEF  IS|>|AND  = #0019; $ +00025 .. UNUSED
  453.        $   836
  454.  DEF  IS|>|OR  = #0018; $ +00024 .. UNUSED
  455.        $   861
  456.  DEF  IS|>|THEN  = #0019; $ +00025 .. UNUSED
  457.        $   886
  458.  DEF  IS~0AND  = #0016; $ +00022 ..
  459.        $   829  1368  2143
  460.  DEF  IS~0OR  = #0017; $ +00023 ..
  461.        $   854  1810  2585
  462.  DEF  IS~0THEN  = #0016; $ +00022 ..
  463.        $   879  1406  1796  1812  2181  2571  2587
  464.  DEF  IS~=AND  = #0016; $ +00022 .. UNUSED
  465.        $   827
  466.  DEF  IS~=OR  = #0017; $ +00023 .. UNUSED
  467.        $   852
  468.  DEF  IS~=THEN  = #0016; $ +00022 .. UNUSED
  469.        $   877
  470.  DEF  Input1Char  = #02C0; $ +00704 ..
  471.        $  1343  1376  1526  1791
  472.  DEF  Input1CharFromBatchTextFile  = #0989; $ +02441 ..
  473.        $  2757  2856  2859  2864  2885
  474.  DEF  Input1CharFromConsoleAndEcho  = #025B; $ +00603 .[
  475.        $  1436  1726  1777
  476.  DEF  Input1CharFromSameSourceAsLastChar  = #0318; $ +00792 ..
  477.        $  1570  1585  1599
  478.  DEF  InputAndInterpretCommandChar  = #0343; $ +00835 .C
  479.        $  1346  1379  1594  1615  1615
  480.  DEF  InstateBatchProcessing  = #0B5D; $ +02909 .]
  481.        $  2938  2967
  482.  DEF  JUST_BEFORE_MODEL  = #0117; $ +00279 ..
  483.        $  1186  1193  1193  1968  1968
  484.  DEF  LINEFEED  = #000A; $ +00010 ..
  485.        $  1907  2172  2178  2208  2568
  486.  DEF  LineFeed  = #000A; $ +00010 ..
  487.        $  1132  1397  1403  1433  1793  2683  2887
  488.  DEF  MAKESOURCEBECONSOLEANDRINGBELLIFCHANGINGANDENABLED  = #078E; $ +01934 ..
  489.        $  2434  2443  2539
  490.  DEF  MAXDEPTHOFBATCHSTACK  = #000A; $ +00010 ..
  491.        $  1902  2086  2106  2610
  492.  DEF  MIDDLEOFINPUTLINE  = #054B; $ +01355 .K
  493.        $  2063  2136  2198  2527
  494.  DEF  MODEL  = #04F4; $ +01268 ..
  495.        $  1170  1975  2779  2786  2792
  496.  DEF  Main  = #0B6E; $ +02926 .n
  497.        $  1154  2949
  498.  DEF  MakeSourceBeConsoleAndRingBellIfChangingAndEnabled  = #03B1; $ +00945 ..
  499.        $  1659  1668  1764
  500.  DEF  MaxDepthOfBatchStack  = #000A; $ +00010 ..
  501.        $  1127  1311  1331  1835
  502.  DEF  MiddleOfInputLine  = #016E; $ +00366 .n
  503.        $  1288  1361  1423  1752
  504.  DEF  Model  = #0117; $ +00279 ..
  505.        $  1170  1200  2648  2779  2786  2792  2819  2955
  506.  DEF  NEGATIVEACK  = #0015; $ +00021 ..
  507.        $  1910  2188
  508.  DEF  NOINITIALVALUE  = #0000; $ +00000 ..
  509.  DEF  NONEXISTENTCHAR  = #0080; $ +00128 ..
  510.        $  1914  1915  1916  2073  2303  2305
  511.  DEF  NOOP  = #08BA; $ +02234 ..
  512.        $  2004  2618
  513.  DEF  NORMALSOURCEFORCURRENTLINE  = #054E; $ +01358 .N
  514.        $  2083  2237  2609
  515.  DEF  NORMALSOURCEFORNEXTLINE  = #0558; $ +01368 .X
  516.        $  2090  2149  2161  2170  2231  2442  2449  2608
  517.  DEF  NROFVARIABLES  = #000A; $ +00010 ..
  518.        $  1901  1902  2029  2362  2556
  519.  DEF  NegativeAck  = #0015; $ +00021 ..
  520.        $  1135  1413
  521.  DEF  NoInitialValue  = #0000; $ +00000 ..
  522.  DEF  NoOp  = #04DD; $ +01245 ..
  523.        $  1229  1843
  524.  DEF  NonexistentChar  = #0080; $ +00128 ..
  525.        $  1139  1140  1141  1298  1528  1530
  526.  DEF  NormalSourceForCurrentLine  = #0171; $ +00369 .q
  527.        $  1308  1462  1834
  528.  DEF  NormalSourceForNextLine  = #017B; $ +00379 .{
  529.        $  1315  1374  1386  1395  1456  1667  1674  1833
  530.  DEF  NrOfVariables  = #000A; $ +00010 ..
  531.        $  1126  1127  1254  1587  1781
  532.  DEF  OPTIMIZED_COMPILATION  = #0001; $ +00001 ..
  533.  DEF  OpenBatchTextFile  = #0900; $ +02304 ..
  534.        $  2722  2950
  535.  DEF  PATCHME  = #0000; $ +00000 .. UNUSED
  536.        $  1899
  537.  DEF  POPTHEBATCHSTACK  = #0698; $ +01688 ..
  538.        $  2295  2310  2338
  539.  DEF  PROCEDURE  = #007F; $ +00127 ..
  540.        $   492  1336  1360  1428  1437  1445  1450  1455  1460  1466
  541.        $  1472  1478  1484  1494  1501  1521  1527  1571  1584  1595
  542.        $  1641  1646  1651  1660  1666  1672  1678  1691  1756  1762
  543.        $  1769  1775  1790  1824  1844  1848  1853  1858  1863  2111
  544.        $  2135  2203  2212  2220  2225  2230  2235  2241  2247  2253
  545.        $  2259  2269  2276  2296  2302  2346  2359  2370  2416  2421
  546.        $  2426  2435  2441  2447  2453  2466  2531  2537  2544  2550
  547.        $  2565  2599  2619  2623  2628  2633  2638  2701  2711  2716
  548.        $  2723  2743  2752  2758  2778  2817  2830  2847  2908  2924
  549.        $  2939  2973
  550.  DEF  PUSHTHEBATCHSTACK  = #0682; $ +01666 ..
  551.        $  2275  2546  2561
  552.  DEF  PatchMe  = #0000; $ +00000 ..
  553.        $  1124  1156  1159
  554.  DEF  PopTheBatchStack  = #02BB; $ +00699 ..
  555.        $  1520  1535  1563
  556.  DEF  PushTheBatchStack  = #02A5; $ +00677 ..
  557.        $  1500  1771  1786
  558.  DEF  RECORDSEPARATOR  = #001E; $ +00030 ..
  559.        $  1913  1915
  560.  DEF  REPEAT  = #010E; $ +00270 ..
  561.        $   930  1380  1536  1564  1635  1784  1819  2155  2311  2339
  562.        $  2410  2559  2594  2707  2868  2903
  563.  DEF  REPORTANDRECOVERFROMCOMMANDERR  = #074D; $ +01869 .M
  564.        $  2367  2396
  565.  DEF  REQUESTANSWER  = #0824; $ +02084 .$
  566.        $  2008  2536
  567.  DEF  REQUESTBATCHINPUT  = #07A0; $ +01952 ..
  568.        $  1999  2446
  569.  DEF  REQUESTFETCHFROMVARIABLE  = #082E; $ +02094 ..
  570.        $  2006  2543
  571.  DEF  REQUESTNOFROMCONST  = #08C1; $ +02241 ..
  572.        $  2003  2627
  573.  DEF  REQUESTQUIET  = #08CC; $ +02252 ..
  574.        $  2001  2637
  575.  DEF  REQUESTRINGFORATTN  = #08C6; $ +02246 ..
  576.        $  2000  2632
  577.  DEF  REQUESTSTOREINTOVARIABLE  = #081D; $ +02077 ..
  578.        $  2010  2530
  579.  DEF  REQUESTTYPEDINPUT  = #0797; $ +01943 ..
  580.        $  1998  2440
  581.  DEF  REQUESTTYPEDOUTPUT  = #084F; $ +02127 .O
  582.        $  2007  2564
  583.  DEF  REQUESTVARIABLEVARIABLE  = #0835; $ +02101 .5
  584.        $  2009  2549
  585.  DEF  REQUESTYESFROMCONST  = #08BB; $ +02235 ..
  586.        $  2002  2622
  587.  DEF  RINGBELL  = #0773; $ +01907 .s
  588.        $  2397  2415  2422  2558
  589.  DEF  RINGBELLIFENABLED  = #0779; $ +01913 .y
  590.        $  2146  2420  2430  2600
  591.  DEF  RINGBELLIFENABLEDANDSOURCEWASBATCHTEXT  = #0781; $ +01921 ..
  592.        $  2425  2436  2551
  593.  DEF  RINGFORATTN  = #04F5; $ +01269 ..
  594.        $  1986  2422  2634  2639
  595.  DEF  Read1SectorOfBatchTextFile  = #097D; $ +02429 .}
  596.        $  2751  2766
  597.  DEF  RecordSeparator  = #001E; $ +00030 ..
  598.        $  1138  1140
  599.  DEF  RelocateAddressesInTheModel  = #09AD; $ +02477 ..
  600.        $  2777  2961
  601.  DEF  RelocationValue  = #08D7; $ +02263 ..
  602.        $  2694  2803  2895  2925  2956
  603.  DEF  ReportAndRecoverFromCommandErr  = #0370; $ +00880 .p
  604.        $  1592  1621
  605.  DEF  RequestAnswer  = #0447; $ +01095 .G
  606.        $  1233  1761
  607.  DEF  RequestBatchInput  = #03C3; $ +00963 ..
  608.        $  1224  1671
  609.  DEF  RequestFetchFromVariable  = #0451; $ +01105 .Q
  610.        $  1231  1768
  611.  DEF  RequestNoFromCONST  = #04E4; $ +01252 ..
  612.        $  1228  1852
  613.  DEF  RequestQuiet  = #04EF; $ +01263 ..
  614.        $  1226  1862
  615.  DEF  RequestRingForAttn  = #04E9; $ +01257 ..
  616.        $  1225  1857
  617.  DEF  RequestStoreIntoVariable  = #0440; $ +01088 .@
  618.        $  1235  1755
  619.  DEF  RequestTypedInput  = #03BA; $ +00954 ..
  620.        $  1223  1665
  621.  DEF  RequestTypedOutput  = #0472; $ +01138 .r
  622.        $  1232  1789
  623.  DEF  RequestVariableVariable  = #0458; $ +01112 .X
  624.        $  1234  1774
  625.  DEF  RequestYesFromCONST  = #04DE; $ +01246 ..
  626.        $  1227  1847
  627.  DEF  RingBell  = #0396; $ +00918 ..
  628.        $  1622  1640  1647  1783
  629.  DEF  RingBellIfEnabled  = #039C; $ +00924 ..
  630.        $  1371  1645  1655  1825
  631.  DEF  RingBellIfEnabledAndSourceWasBatchText  = #03A4; $ +00932 ..
  632.        $  1650  1661  1776
  633.  DEF  RingForAttn  = #0118; $ +00280 ..
  634.        $  1211  1647  1859  1864
  635.  DEF  SECONDPARTOFREQUESTSTOREINTOVARIABLE  = #07B6; $ +01974 ..
  636.        $  2465  2533  2540
  637.  DEF  SELECTAVARIABLE  = #070B; $ +01803 ..
  638.        $  2358  2462  2545
  639.  DEF  SELECTEDVARIABLE  = #0534; $ +01332 .4
  640.        $  2027  2462  2467
  641.  DEF  SUBSTITUTE  = #001A; $ +00026 ..
  642.        $  1911  2023
  643.  DEF  SafeMemory  = #0103; $ +00259 ..
  644.        $  1156  2818  2851  2952  2955  2981  2990
  645.  DEF  SecondPartOfRequestStoreIntoVariable  = #03D9; $ +00985 ..
  646.        $  1690  1758  1765
  647.  DEF  SectorSize  = #0080; $ +00128 ..
  648.        $  2654  2655
  649.  DEF  SelectAVariable  = #032E; $ +00814 ..
  650.        $  1583  1687  1770
  651.  DEF  SelectedVariable  = #0157; $ +00343 .W
  652.        $  1252  1687  1692
  653.  DEF  SizeOfCodeInSafeMemory  = #0107; $ +00263 .. UNUSED
  654.        $  1161
  655.  DEF  SizeOfModel  = #03DD; $ +00989 ..
  656.        $  1161  2648  2649  2851
  657.  DEF  SizeOfSafeMemory  = #0105; $ +00261 ..
  658.        $  1159  2952  2987  2990
  659.  DEF  Start  = #0100; $ +00256 ..
  660.        $  1154  2993
  661.  DEF  Substitute  = #001A; $ +00026 ..
  662.        $  1136  1248  2770  2866  2889
  663.  DEF  TABLEOF2NDCHARS  = #04F7; $ +01271 ..
  664.        $  1997  2376  2377
  665.  DEF  TERMINATEBATCHPROCESSING  = #0895; $ +02197 ..
  666.        $  2005  2011  2330  2408  2491  2598
  667.  DEF  TESTWHETHERUNSOLICITEDCHARFORCESSOURCETOBECONSOLE  = #0648; $ +01608 .H
  668.        $  2158  2224  2329  2350  2386  2406  2429  2474  2586
  669.  DEF  TEXTTERMINATOR  = #009E; $ +00158 .. UNUSED
  670.        $  1915
  671.  DEF  TRUE  = #0001; $ +00001 ..
  672.        $  1118  1120  1421  1859  1893  1895  2196  2634
  673.  DEF  TYPEOUTCHAR_RC  = #062A; $ +01578 .*
  674.        $  2202  2215  2575
  675.  DEF  TableOf2ndChars  = #011A; $ +00282 ..
  676.        $  1222  1601  1602
  677.  DEF  TerminateBatchProcessing  = #04B8; $ +01208 ..
  678.        $  1230  1236  1555  1633  1716  1823
  679.  DEF  TestWhetherUnsolicitedCharForcesSourceToBeConsole  = #026B; $ +00619 .k
  680.        $  1383  1449  1554  1575  1611  1631  1654  1699  1811
  681.  DEF  TextTerminator  = #009E; $ +00158 ..
  682.        $  1140  2684  2702  2727  2738  2747  2788  2796  2839  2934
  683.  DEF  TypeOutCRLF  = #08F0; $ +02288 ..
  684.        $  2710  2718
  685.  DEF  TypeOutChar_rC  = #024D; $ +00589 .M
  686.        $  1427  1440  1800
  687.  DEF  TypeOutLine  = #08F7; $ +02295 ..
  688.        $  2715  2727  2738  2747  2788  2796  2839  2934
  689.  DEF  TypeOutMessage  = #0065; $ +00101 .e
  690.        $  2671  2727  2738  2747  2788  2796  2839  2934
  691.  DEF  TypeOutString  = #08DF; $ +02271 ..
  692.        $  2700  2712  2719
  693.  DEF  UNSOLICITEDCHAR  = #054D; $ +01357 .M
  694.        $  2073  2124  2303  2590
  695.  DEF  UNSOLICITEDCHARWASTYPEDIN  = #054C; $ +01356 .L
  696.        $  2068  2162  2226  2321  2388
  697.  DEF  UnsolicitedChar  = #0170; $ +00368 .p
  698.        $  1298  1349  1528  1815
  699.  DEF  UnsolicitedCharWasTypedIn  = #016F; $ +00367 .o
  700.        $  1293  1387  1451  1546  1613
  701.  DEF  VARIABLENRTOENTRYADR  = #0679; $ +01657 .y
  702.        $  2268  2284  2468
  703.  DEF  VariableNrToEntryAdr  = #029C; $ +00668 ..
  704.        $  1493  1509  1693
  705.  DEF  VerifyLackOfRecursion  = #0B20; $ +02848 . 
  706.        $  2923  2963
  707.  DEF  WARMBOOT  = #0000; $ +00000 .. UNUSED
  708.        $  1921
  709.  DEF  WarmBoot  = #0000; $ +00000 ..
  710.        $  1146  2727  2738  2747  2788  2796  2839  2934  2968
  711.  DEF  YourPatchProc  = #0BB3; $ +02995 ..
  712.        $  1176  2951  2972
  713.  DEF  ZZZ  = #0BDA; $ +03034 .. UNUSED
  714.        $  2993
  715.  DEF  _0  = #0B65; $ +02917 .e
  716.  DEF  _1  = #0472; $ +01138 .r
  717.  DEF  _2  = #0000; $ +00000 ..
  718.  DEF  _3  = #0001; $ +00001 ..
  719.  DEF  _CPU  = #0000; $ +00000 ..
  720.  DEF  _Z80  = #0000; $ +00000 ..
  721.  DEF  _a  = #01E6; $ +00486 ..
  722.  DEF  _b  = #2000; $ +08192  .
  723.  DEF  _d  = #2000; $ +08192  .
  724.  DEF  _e  = #020E; $ +00526 ..
  725.  DEF  _h  = #1FFF; $ +08191 ..
  726.  DEF  _i  = #4000; $ +16384 @.
  727.  DEF  _j  = #0096; $ +00150 ..
  728.  DEF  _k  = #008A; $ +00138 ..
  729.  DEF  _l  = #047E; $ +01150 .~
  730.  DEF  _m  = #0051; $ +00081 .Q
  731.  DEF  _n  = #019D; $ +00413 ..
  732.  DEF  _o  = #01E6; $ +00486 ..
  733.  DEF  _p  = #0000; $ +00000 ..
  734.  DEF  _q  = #04B0; $ +01200 ..
  735.        $   408   412   413
  736.  DEF  _r  = #0137; $ +00311 .7
  737.  DEF  _s  = #1FFF; $ +08191 ..
  738.  DEF  _t  = #016D; $ +00365 .m
  739.  DEF  _u  = #8000; $ -32768 ..
  740.  DEF  _v  = #A000; $ -24576 ..
  741.  DEF  _w  = #6000; $ +24576 `.
  742.  DEF  _x  = #00C8; $ +00200 ..
  743.        $   411   412
  744.  DEF  _y  = #04AF; $ +01199 ..
  745.  DEF  _z  = #E000; $ -08192 ..
  746.