|
DataMuseum.dkPresents historical artifacts from the history of: CP/M |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about CP/M Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 32384 (0x7e80)
Names: »COMPAS.CMD«
└─⟦2c1de5642⟧ Bits:30005891 Label program og COMPAS Pascal v3.03
└─ ⟦this⟧ »COMPAS.CMD«
0x0000…0020 20 63 6f 6d 70 69 6c 65 20 74 68 65 20 70 72 6f 67 72 61 6d 20 69 6e 74 6f 20 61 20 63 6f 6d 6d ┆ compile the program into a comm┆
0x0020…0040 61 6e 64 20 66 69 6c 65 20 6f 6e 20 61 0d 0a 64 69 73 6b 2e 20 54 68 65 20 63 6f 6d 6d 61 6e 64 ┆and file on a disk. The command┆
0x0040…0060 20 6c 69 6e 65 20 66 6f 72 6d 61 74 73 20 69 73 3a 0d 0a 0d 0a 20 20 20 20 20 20 20 20 50 52 4f ┆ line formats is: PRO┆
0x0060…0080 47 52 41 4d 20 3c 66 69 6c 65 6e 61 6d 65 3e 2c 3c 73 73 65 67 6d 69 6e 3e 2c 3c 73 73 65 67 6d ┆GRAM <filename>,<ssegmin>,<ssegm┆
0x0080…00a0 61 78 3e 2c 3c 63 73 65 67 6d 69 6e 3e 2c 3c 64 73 65 67 6d 69 6e 3e 0d 0a 0d 0a 49 66 20 3c 66 ┆ax>,<csegmin>,<dsegmin> If <f┆
0x00a0…00c0 69 6c 65 6e 61 6d 65 3e 20 69 73 20 6f 6d 69 74 74 65 64 2c 20 74 68 65 20 63 75 72 72 65 6e 74 ┆ilename> is omitted, the current┆
0x00c0…00e0 20 66 69 6c 65 20 6e 61 6d 65 20 69 73 20 75 73 65 64 2c 20 77 69 74 68 20 69 74 73 20 74 79 70 ┆ file name is used, with its typ┆
0x00e0…0100 65 20 63 68 61 6e 67 65 64 0d 0a 74 6f 20 27 2e 43 4d 44 27 2e 20 54 68 65 20 66 69 6c 65 20 74 ┆e changed to '.CMD'. The file t┆
0x0100…0120 79 70 65 20 64 65 66 61 75 6c 74 73 20 74 6f 20 27 2e 43 4d 44 27 2e 20 3c 73 73 65 67 6d 69 6e ┆ype defaults to '.CMD'. <ssegmin┆
0x0120…0140 3e 2c 20 3c 73 73 65 67 6d 61 78 3e 2c 20 3c 63 73 65 67 6d 69 6e 3e 2c 0d 0a 61 6e 64 20 3c 64 ┆>, <ssegmax>, <csegmin>, and <d┆
0x0140…0160 73 65 67 6d 69 6e 3e 20 61 72 65 20 68 65 78 20 6e 75 6d 62 65 72 73 20 28 75 70 20 74 6f 20 66 ┆segmin> are hex numbers (up to f┆
0x0160…0180 6f 75 72 20 68 65 78 20 64 69 67 69 74 73 29 2e 20 41 6e 79 20 6f 6e 65 20 6f 66 20 74 68 65 20 ┆our hex digits). Any one of the ┆
0x0180…01a0 66 6f 75 72 20 68 65 78 0d 0a 70 61 72 61 6d 65 74 65 72 73 20 6d 61 79 20 62 65 20 6f 6d 69 74 ┆four hex parameters may be omit┆
0x01a0…01c0 74 65 64 2c 20 66 6f 72 20 69 6e 73 74 61 6e 63 65 20 27 50 52 4f 47 52 41 4d 20 54 45 53 54 2c ┆ted, for instance 'PROGRAM TEST,┆
0x01c0…01e0 38 30 30 27 20 28 6f 6e 6c 79 20 3c 73 73 65 67 6d 69 6e 3e 29 20 6f 72 0d 0a 27 50 52 4f 47 52 ┆800' (only <ssegmin>) or 'PROGR┆
0x01e0…0200 41 4d 20 54 45 53 54 2c 2c 2c 43 44 38 2c 31 32 45 34 27 20 28 6f 6e 6c 79 20 3c 63 73 65 67 6d ┆AM TEST,,,CD8,12E4' (only <csegm┆
0x0200…0220 69 6e 3e 20 61 6e 64 20 3c 64 73 65 67 6d 69 6e 3e 29 2e 0d 0a 0d 0a 3c 73 73 65 67 6d 69 6e 3e ┆in> and <dsegmin>). <ssegmin>┆
0x0220…0240 20 61 6e 64 20 3c 73 73 65 67 6d 61 78 3e 20 73 70 65 63 69 66 79 20 74 68 65 20 6d 69 6e 69 6d ┆ and <ssegmax> specify the minim┆
0x0240…0260 75 6d 20 61 6e 64 20 6d 61 78 69 6d 75 6d 20 73 69 7a 65 73 20 28 69 6e 20 70 61 72 61 67 72 61 ┆um and maximum sizes (in paragra┆
0x0260…0280 68 70 73 29 0d 0a 6f 66 20 74 68 65 20 73 74 61 63 6b 20 73 65 67 6d 65 6e 74 2e 20 3c 73 73 65 ┆hps) of the stack segment. <sse┆
0x0280…02a0 67 6d 69 6e 3e 20 64 65 66 61 75 6c 74 73 20 74 6f 20 31 30 30 20 68 65 78 20 28 34 4b 20 62 79 ┆gmin> defaults to 100 hex (4K by┆
0x02a0…02c0 74 65 73 29 2c 20 61 6e 64 20 3c 73 73 65 67 6d 61 78 3e 0d 0a 64 65 66 61 75 6c 74 73 20 74 6f ┆tes), and <ssegmax> defaults to┆
0x02c0…02e0 20 74 68 65 20 76 61 6c 75 65 20 6f 66 20 3c 73 73 65 67 6d 69 6e 3e 2e 20 3c 63 73 65 67 6d 69 ┆ the value of <ssegmin>. <csegmi┆
0x02e0…0300 6e 3e 20 61 6e 64 20 3c 64 73 65 67 6d 69 6e 3e 20 73 70 65 63 69 66 79 20 74 68 65 20 6d 69 6e ┆n> and <dsegmin> specify the min┆
0x0300…0320 69 2d 0d 0a 6d 75 6d 20 73 69 7a 65 73 20 28 69 6e 20 70 61 72 61 67 72 61 68 70 73 29 20 6f 66 ┆i- mum sizes (in paragrahps) of┆
0x0320…0340 20 74 68 65 20 63 6f 64 65 20 61 6e 64 20 64 61 74 61 20 73 65 67 6d 65 6e 74 73 2e 20 54 68 65 ┆ the code and data segments. The┆
0x0340…0360 79 20 64 65 66 61 75 6c 74 20 74 6f 20 74 68 65 0d 0a 6c 6f 77 65 73 74 20 70 6f 73 73 69 62 6c ┆y default to the lowest possibl┆
0x0360…0380 65 20 76 61 6c 75 65 73 2e 20 54 68 65 79 20 6d 61 79 20 6e 65 76 65 72 20 62 65 20 6c 61 72 67 ┆e values. They may never be larg┆
0x0380…03a0 65 72 20 74 68 61 6e 20 68 65 78 20 46 46 46 20 28 36 34 4b 20 62 79 74 65 73 29 2c 20 61 6e 64 ┆er than hex FFF (64K bytes), and┆
0x03a0…03c0 0d 0a 75 73 75 61 6c 6c 79 20 74 68 65 79 20 61 72 65 20 6f 6e 6c 79 20 73 70 65 63 69 66 69 65 ┆ usually they are only specifie┆
0x03c0…03e0 64 20 66 6f 72 20 70 72 6f 67 72 61 6d 73 20 74 68 61 74 20 77 69 6c 6c 20 63 68 61 69 6e 20 74 ┆d for programs that will chain t┆
0x03e0…0400 6f 20 6f 74 68 65 72 20 70 72 6f 67 72 61 6d 73 0d 0a 77 69 74 68 20 6c 61 72 67 65 72 20 63 6f ┆o other programs with larger co┆
0x0400…0420 64 65 20 61 6e 64 2f 6f 72 20 64 61 74 61 20 73 65 67 6d 65 6e 74 73 2e 20 4f 6e 20 63 6f 6d 70 ┆de and/or data segments. On comp┆
0x0420…0440 69 6c 69 6e 67 20 74 68 65 20 70 72 6f 67 72 61 6d 2c 20 43 4f 4d 50 41 53 20 77 72 69 74 65 73 ┆iling the program, COMPAS writes┆
0x0440…0460 0d 0a 61 20 63 6f 70 79 20 6f 66 20 74 68 65 20 72 75 6e 2d 74 69 6d 65 20 70 61 63 6b 61 67 65 ┆ a copy of the run-time package┆
0x0460…0480 20 69 6e 74 6f 20 74 68 65 20 63 6f 6d 6d 61 6e 64 20 66 69 6c 65 20 61 6e 64 20 67 65 6e 65 72 ┆ into the command file and gener┆
0x0480…04a0 61 74 65 73 20 61 20 43 50 2f 4d 2d 38 36 0d 0a 63 6f 6d 6d 61 6e 64 20 66 69 6c 65 20 68 65 61 ┆ates a CP/M-86 command file hea┆
0x04a0…04c0 64 65 72 2e 20 4f 6e 63 65 20 63 6f 6d 70 69 6c 65 64 2c 20 74 68 65 20 70 72 6f 67 72 61 6d 20 ┆der. Once compiled, the program ┆
0x04c0…04e0 63 61 6e 20 62 65 20 65 78 65 63 75 74 65 64 20 66 72 6f 6d 20 43 50 2f 4d 2d 38 36 0d 0a 73 69 ┆can be executed from CP/M-86 si┆
0x04e0…0500 6d 70 6c 79 20 62 79 20 74 79 70 69 6e 67 20 69 74 73 20 6e 61 6d 65 2e 0d 0a 0d 0a 25 4f 43 4f ┆mply by typing its name. %OCO┆
0x0500…0520 4d 50 41 53 20 4f 4e 2d 4c 49 4e 45 20 48 45 4c 50 3a 20 54 68 65 20 4f 42 4a 45 43 54 20 63 6f ┆MPAS ON-LINE HELP: The OBJECT co┆
0x0520…0540 6d 6d 61 6e 64 2e 0d 0a 0d 0a 54 68 65 20 4f 42 4a 45 43 54 20 63 6f 6d 6d 61 6e 64 20 70 72 6f ┆mmand. The OBJECT command pro┆
0x0540…0560 64 75 63 65 73 20 61 6e 20 6f 62 6a 65 63 74 20 66 69 6c 65 20 77 68 69 63 68 20 63 6f 6e 74 61 ┆duces an object file which conta┆
0x0560…0580 69 6e 73 20 74 68 65 20 63 6f 6d 70 69 6c 65 64 20 70 72 6f 67 72 61 6d 0d 0a 63 6f 64 65 20 6f ┆ins the compiled program code o┆
0x0580…05a0 6e 6c 79 20 28 69 2e 65 2e 20 77 69 74 68 6f 75 74 20 74 68 65 20 72 75 6e 2d 74 69 6d 65 20 70 ┆nly (i.e. without the run-time p┆
0x05a0…05c0 61 63 6b 61 67 65 20 61 6e 64 20 74 68 65 20 63 6f 6d 6d 61 6e 64 20 66 69 6c 65 20 68 65 61 64 ┆ackage and the command file head┆
0x05c0…05e0 65 72 29 2e 20 54 68 65 0d 0a 63 6f 6d 6d 61 6e 64 20 6c 69 6e 65 20 66 6f 72 6d 61 74 20 69 73 ┆er). The command line format is┆
0x05e0…0600 3a 0d 0a 0d 0a 20 20 20 20 20 20 20 20 4f 42 4a 45 43 54 20 3c 66 69 6c 65 6e 61 6d 65 3e 0d 0a ┆: OBJECT <filename> ┆
0x0600…0620 0d 0a 49 66 20 3c 66 69 6c 65 6e 61 6d 65 3e 20 69 73 20 6f 6d 69 74 74 65 64 2c 20 74 68 65 20 ┆ If <filename> is omitted, the ┆
0x0620…0640 63 75 72 72 65 6e 74 20 66 69 6c 65 20 6e 61 6d 65 20 69 73 20 75 73 65 64 2c 20 77 69 74 68 20 ┆current file name is used, with ┆
0x0640…0660 69 74 73 20 74 79 70 65 20 63 68 61 6e 67 65 64 0d 0a 74 6f 20 27 2e 43 48 4e 27 20 28 73 68 6f ┆its type changed to '.CHN' (sho┆
0x0660…0680 72 74 20 66 6f 72 20 63 68 61 69 6e 29 2e 20 54 68 65 20 66 69 6c 65 20 74 79 70 65 20 64 65 66 ┆rt for chain). The file type def┆
0x0680…06a0 61 75 6c 74 73 20 74 6f 20 27 2e 43 48 4e 27 2e 20 4f 62 6a 65 63 74 20 28 63 68 61 69 6e 29 0d ┆aults to '.CHN'. Object (chain) ┆
0x06a0…06c0 0a 66 69 6c 65 73 20 6d 61 79 20 6f 6e 6c 79 20 62 65 20 61 63 74 69 76 61 74 65 64 20 74 68 72 ┆ files may only be activated thr┆
0x06c0…06e0 6f 75 67 68 20 74 68 65 20 63 68 61 69 6e 20 70 72 6f 63 65 64 75 72 65 20 6f 66 20 43 4f 4d 50 ┆ough the chain procedure of COMP┆
0x06e0…0700 41 53 20 50 61 73 63 61 6c 2e 20 46 6f 72 0d 0a 66 75 72 74 68 65 72 20 64 65 74 61 69 6c 73 20 ┆AS Pascal. For further details ┆
0x0700…0720 6f 6e 20 70 72 6f 67 72 61 6d 20 63 68 61 69 6e 69 6e 67 2c 20 70 6c 65 61 73 65 20 72 65 66 65 ┆on program chaining, please refe┆
0x0720…0740 72 20 74 6f 20 74 68 65 20 43 4f 4d 50 41 53 20 50 61 73 63 61 6c 20 50 72 6f 67 2d 0d 0a 72 61 ┆r to the COMPAS Pascal Prog- ra┆
0x0740…0760 6d 6d 69 6e 67 20 4d 61 6e 75 61 6c 2e 0d 0a 0d 0a 25 46 43 4f 4d 50 41 53 20 4f 4e 2d 4c 49 4e ┆mming Manual. %FCOMPAS ON-LIN┆
0x0760…0780 45 20 48 45 4c 50 3a 20 54 68 65 20 46 49 4e 44 20 63 6f 6d 6d 61 6e 64 2e 0d 0a 0d 0a 54 68 65 ┆E HELP: The FIND command. The┆
0x0780…07a0 20 46 49 4e 44 20 63 6f 6d 6d 61 6e 64 20 69 73 20 75 73 65 64 20 74 6f 20 6c 6f 63 61 74 65 20 ┆ FIND command is used to locate ┆
0x07a0…07c0 61 20 73 74 61 74 65 6d 65 6e 74 20 69 6e 20 74 68 65 20 73 6f 75 72 63 65 20 74 65 78 74 20 77 ┆a statement in the source text w┆
0x07c0…07e0 68 69 63 68 20 63 6f 72 2d 0d 0a 72 65 73 70 6f 6e 64 73 20 74 6f 20 61 6e 20 6f 66 66 73 65 74 ┆hich cor- responds to an offset┆
0x07e0…0800 20 61 64 64 72 65 73 73 20 69 6e 20 74 68 65 20 6f 62 6a 65 63 74 20 63 6f 64 65 2e 20 54 68 65 ┆ address in the object code. The┆
0x0800…0820 20 63 6f 6d 6d 61 6e 64 20 6c 69 6e 65 20 66 6f 72 6d 61 74 20 69 73 3a 0d 0a 0d 0a 20 20 20 20 ┆ command line format is: ┆
0x0820…0840 20 20 20 20 46 49 4e 44 20 3c 6f 66 66 73 65 74 3e 0d 0a 0d 0a 77 68 65 72 65 20 3c 6f 66 66 73 ┆ FIND <offset> where <offs┆
0x0840…0860 65 74 3e 20 69 73 20 74 68 65 20 6f 66 66 73 65 74 20 61 64 64 72 65 73 73 20 6f 66 20 74 68 65 ┆et> is the offset address of the┆
0x0860…0880 20 73 74 61 74 65 6d 65 6e 74 20 74 6f 20 62 65 20 6c 6f 63 61 74 65 64 2e 20 54 68 65 20 6f 66 ┆ statement to be located. The of┆
0x0880…08a0 66 2d 0d 0a 73 65 74 20 61 64 64 72 65 73 73 20 6d 75 73 74 20 62 65 20 73 70 65 63 69 66 69 65 ┆f- set address must be specifie┆
0x08a0…08c0 64 20 69 6e 20 68 65 78 20 28 75 70 20 74 6f 20 66 6f 75 72 20 68 65 78 20 64 69 67 69 74 73 29 ┆d in hex (up to four hex digits)┆
0x08c0…08e0 2e 20 3c 6f 66 66 73 65 74 3e 20 6d 61 79 20 62 65 0d 0a 6f 6d 69 74 74 65 64 2c 20 69 6e 20 77 ┆. <offset> may be omitted, in w┆
0x08e0…0900 68 69 63 68 20 63 61 73 65 20 69 74 20 64 65 66 61 75 6c 74 73 20 74 6f 20 74 68 65 20 6f 66 66 ┆hich case it defaults to the off┆
0x0900…0920 73 65 74 20 61 64 64 72 65 73 73 20 6f 66 20 74 68 65 20 6c 61 73 74 20 72 75 6e 20 74 69 6d 65 ┆set address of the last run time┆
0x0920…0940 0d 0a 65 72 72 6f 72 2e 20 54 68 75 73 2c 20 74 6f 20 6c 6f 63 61 74 65 20 74 68 65 20 73 74 61 ┆ error. Thus, to locate the sta┆
0x0940…0960 74 65 6d 65 6e 74 20 74 68 61 74 20 63 61 75 73 65 64 20 61 20 72 75 6e 20 74 69 6d 65 20 65 72 ┆tement that caused a run time er┆
0x0960…0980 72 6f 72 2c 20 73 69 6d 70 6c 79 20 65 6e 2d 0d 0a 74 65 72 20 27 46 49 4e 44 27 2e 0d 0a 0d 0a ┆ror, simply en- ter 'FIND'. ┆
0x0980…09a0 49 66 20 74 68 65 20 6f 66 66 73 65 74 20 61 64 64 72 65 73 73 20 69 73 20 66 6f 75 6e 64 2c 20 ┆If the offset address is found, ┆
0x09a0…09c0 74 68 65 20 63 6f 6d 70 69 6c 65 72 20 73 74 6f 70 73 20 61 6e 64 20 64 69 73 70 6c 61 79 73 20 ┆the compiler stops and displays ┆
0x09c0…09e0 27 54 61 72 67 65 74 20 61 64 2d 0d 0a 64 72 65 73 73 20 66 6f 75 6e 64 27 20 66 6f 6c 6c 6f 77 ┆'Target ad- dress found' follow┆
0x09e0…0a00 65 64 20 62 79 20 27 50 72 65 73 73 20 3c 52 45 54 55 52 4e 3e 20 74 6f 20 65 64 69 74 20 6f 72 ┆ed by 'Press <RETURN> to edit or┆
0x0a00…0a20 20 3c 45 53 43 3e 20 74 6f 20 61 62 6f 72 74 2e 20 57 68 65 6e 20 79 6f 75 0d 0a 70 72 65 73 73 ┆ <ESC> to abort. When you press┆
0x0a20…0a40 20 52 45 54 55 52 4e 2c 20 74 68 65 20 65 64 69 74 6f 72 20 69 73 20 69 6e 76 6f 6b 65 64 2c 20 ┆ RETURN, the editor is invoked, ┆
0x0a40…0a60 61 6e 64 20 74 68 65 20 63 75 72 73 6f 72 20 69 73 20 70 6c 61 63 65 64 20 61 74 20 6f 72 20 6a ┆and the cursor is placed at or j┆
0x0a60…0a80 75 73 74 20 61 66 74 65 72 0d 0a 74 68 65 20 72 65 6c 65 76 61 6e 74 20 73 65 63 74 69 6f 6e 2e ┆ust after the relevant section.┆
0x0a80…0aa0 20 49 66 20 74 68 65 20 6f 66 66 73 65 74 20 69 73 20 6f 75 74 20 6f 66 20 72 61 6e 67 65 2c 20 ┆ If the offset is out of range, ┆
0x0aa0…0ac0 74 68 65 20 63 6f 6d 70 69 6c 65 72 20 6f 75 74 70 75 74 73 0d 0a 27 54 61 72 67 65 74 20 61 64 ┆the compiler outputs 'Target ad┆
0x0ac0…0ae0 64 72 65 73 73 20 6e 6f 74 20 66 6f 75 6e 64 27 2e 0d 0a 0d 0a 25 57 43 4f 4d 50 41 53 20 4f 4e ┆dress not found'. %WCOMPAS ON┆
0x0ae0…0b00 2d 4c 49 4e 45 20 48 45 4c 50 3a 20 54 68 65 20 57 48 45 52 45 20 63 6f 6d 6d 61 6e 64 2e 0d 0a ┆-LINE HELP: The WHERE command. ┆
0x0b00…0b20 0d 0a 54 68 65 20 57 48 45 52 45 20 63 6f 6d 6d 61 6e 64 20 69 6e 76 6f 6b 65 73 20 74 68 65 20 ┆ The WHERE command invokes the ┆
0x0b20…0b40 65 64 69 74 6f 72 2c 20 61 6e 64 20 6d 6f 76 65 73 20 74 68 65 20 63 75 72 73 6f 72 20 74 6f 20 ┆editor, and moves the cursor to ┆
0x0b40…0b60 61 20 73 70 65 63 69 66 69 63 20 70 6f 73 69 2d 0d 0a 74 69 6f 6e 20 69 6e 20 74 68 65 20 74 65 ┆a specific posi- tion in the te┆
0x0b60…0b80 78 74 2e 20 54 68 65 20 63 6f 6d 6d 61 6e 64 20 6c 69 6e 65 20 66 6f 72 6d 61 74 20 69 73 3a 0d ┆xt. The command line format is: ┆
0x0b80…0ba0 0a 0d 0a 20 20 20 20 20 20 20 20 57 48 45 52 45 20 3c 6f 66 66 73 65 74 3e 0d 0a 0d 0a 77 68 65 ┆ WHERE <offset> whe┆
0x0ba0…0bc0 72 65 20 3c 6f 66 66 73 65 74 3e 20 69 73 20 61 20 68 65 78 20 6e 75 6d 62 65 72 20 73 70 65 63 ┆re <offset> is a hex number spec┆
0x0bc0…0be0 69 66 79 69 6e 67 20 74 68 65 20 6f 66 66 73 65 74 20 61 64 64 72 65 73 73 20 6f 66 20 74 68 65 ┆ifying the offset address of the┆
0x0be0…0c00 20 73 70 6f 74 20 74 6f 20 62 65 0d 0a 6c 6f 63 61 74 65 64 2e 20 57 68 65 6e 65 76 65 72 20 79 ┆ spot to be located. Whenever y┆
0x0c00…0c20 6f 75 20 6c 65 61 76 65 20 74 68 65 20 65 64 69 74 6f 72 2c 20 74 68 65 20 6f 66 66 73 65 74 20 ┆ou leave the editor, the offset ┆
0x0c20…0c40 61 64 64 72 65 73 73 20 6f 66 20 74 68 65 20 63 75 72 73 6f 72 20 69 73 0d 0a 72 65 63 6f 72 64 ┆address of the cursor is record┆
0x0c40…0c60 65 64 20 61 73 20 74 68 65 20 64 65 66 61 75 6c 74 20 3c 6f 66 66 73 65 74 3e 20 76 61 6c 75 65 ┆ed as the default <offset> value┆
0x0c60…0c80 2e 20 54 68 75 73 2c 20 69 66 20 79 6f 75 20 75 73 65 20 57 48 45 52 45 20 28 77 69 74 68 6f 75 ┆. Thus, if you use WHERE (withou┆
0x0c80…0ca0 74 20 61 6e 20 61 72 2d 0d 0a 67 75 6d 65 6e 74 29 20 69 6e 73 74 65 61 64 20 6f 66 20 45 44 49 ┆t an ar- gument) instead of EDI┆
0x0ca0…0cc0 54 20 74 6f 20 69 6e 76 6f 6b 65 20 74 68 65 20 65 64 69 74 6f 72 2c 20 74 68 65 20 63 75 72 73 ┆T to invoke the editor, the curs┆
0x0cc0…0ce0 6f 72 20 77 69 6c 6c 20 62 65 20 6d 6f 76 65 64 20 74 6f 20 74 68 65 0d 0a 73 70 6f 74 20 79 6f ┆or will be moved to the spot yo┆
0x0ce0…0d00 75 20 6c 65 66 74 20 70 72 65 76 69 6f 75 73 6c 79 20 69 6e 73 74 65 61 64 20 6f 66 20 74 6f 20 ┆u left previously instead of to ┆
0x0d00…0d20 74 68 65 20 62 65 67 69 6e 6e 69 6e 67 20 6f 66 20 74 68 65 20 74 65 78 74 2e 20 49 6e 20 61 64 ┆the beginning of the text. In ad┆
0x0d20…0d40 64 69 74 69 6f 6e 2c 0d 0a 77 68 65 6e 20 74 68 65 20 63 6f 6d 70 69 6c 65 72 20 72 65 70 6f 72 ┆dition, when the compiler repor┆
0x0d40…0d60 74 73 20 61 6e 20 65 72 72 6f 72 2c 20 69 74 20 61 6c 73 6f 20 72 65 63 6f 72 64 73 20 74 68 65 ┆ts an error, it also records the┆
0x0d60…0d80 20 6f 66 66 73 65 74 20 61 64 64 72 65 73 73 20 6f 66 20 74 68 65 0d 0a 65 72 72 6f 72 20 61 73 ┆ offset address of the error as┆
0x0d80…0da0 20 74 68 65 20 64 65 66 61 75 6c 74 20 57 48 45 52 45 20 61 72 67 75 6d 65 6e 74 2e 20 49 6e 20 ┆ the default WHERE argument. In ┆
0x0da0…0dc0 74 68 69 73 20 63 61 73 65 2c 20 57 48 45 52 45 20 77 69 74 68 6f 75 74 20 61 6e 20 61 72 67 75 ┆this case, WHERE without an argu┆
0x0dc0…0de0 6d 65 6e 74 0d 0a 77 69 6c 6c 20 69 6e 76 6f 6b 65 20 74 68 65 20 65 64 69 74 6f 72 20 61 6e 64 ┆ment will invoke the editor and┆
0x0de0…0e00 20 6d 6f 76 65 20 74 68 65 20 63 75 72 73 6f 72 20 74 6f 20 74 68 65 20 73 70 6f 74 20 69 6e 20 ┆ move the cursor to the spot in ┆
0x0e00…0e20 65 72 72 6f 72 2e 0d 0a 0d 0a 25 44 43 4f 4d 50 41 53 20 4f 4e 2d 4c 49 4e 45 20 48 45 4c 50 3a ┆error. %DCOMPAS ON-LINE HELP:┆
0x0e20…0e40 20 54 68 65 20 44 49 52 20 63 6f 6d 6d 61 6e 64 2e 0d 0a 0d 0a 54 68 65 20 44 49 52 20 63 6f 6d ┆ The DIR command. The DIR com┆
0x0e40…0e60 6d 61 6e 64 20 69 73 20 75 73 65 64 20 74 6f 20 64 69 73 70 6c 61 79 20 74 68 65 20 64 69 72 65 ┆mand is used to display the dire┆
0x0e60…0e80 63 74 6f 72 79 20 6f 66 20 61 20 64 69 73 6b 2e 20 54 68 65 20 63 6f 6d 6d 61 6e 64 20 6c 69 6e ┆ctory of a disk. The command lin┆
0x0e80…0ea0 65 0d 0a 66 6f 72 6d 61 74 20 69 73 3a 0d 0a 0d 0a 20 20 20 20 20 20 20 20 44 49 52 20 3c 61 66 ┆e format is: DIR <af┆
0x0ea0…0ec0 6e 3e 0d 0a 0d 0a 77 68 65 72 65 20 3c 61 66 6e 3e 20 69 73 20 61 6e 20 61 6d 62 69 67 75 6f 75 ┆n> where <afn> is an ambiguou┆
0x0ec0…0ee0 73 20 66 69 6c 65 20 6e 61 6d 65 20 61 73 20 74 68 65 20 6f 6e 65 20 75 73 65 64 20 69 6e 20 61 ┆s file name as the one used in a┆
0x0ee0…0f00 20 43 50 2f 4d 20 44 49 52 20 63 6f 6d 6d 61 6e 64 2c 0d 0a 69 2e 65 2e 20 71 75 65 73 74 69 6f ┆ CP/M DIR command, i.e. questio┆
0x0f00…0f20 6e 20 6d 61 72 6b 73 20 28 3f 29 20 61 6e 64 20 61 73 74 65 72 69 73 6b 73 20 28 2a 29 20 6d 61 ┆n marks (?) and asterisks (*) ma┆
0x0f20…0f40 79 20 62 65 20 69 6e 74 65 72 73 70 65 72 73 65 64 20 74 68 72 6f 75 67 68 20 74 68 65 20 66 69 ┆y be interspersed through the fi┆
0x0f40…0f60 6c 65 0d 0a 6e 61 6d 65 20 61 6e 64 20 74 79 70 65 20 66 69 65 6c 64 73 2e 0d 0a 0d 0a 41 20 71 ┆le name and type fields. A q┆
0x0f60…0f80 75 65 73 74 69 6f 6e 20 6d 61 72 6b 20 77 69 6c 6c 20 6d 61 74 63 68 20 61 6e 79 20 63 68 61 72 ┆uestion mark will match any char┆
0x0f80…0fa0 61 63 74 65 72 20 69 6e 20 74 68 61 74 20 70 6f 73 69 74 69 6f 6e 2c 20 61 6e 64 20 61 6e 20 61 ┆acter in that position, and an a┆
0x0fa0…0fc0 73 74 65 72 69 73 6b 20 77 69 6c 6c 0d 0a 6d 61 74 63 68 20 61 6e 79 20 63 6f 6d 62 69 6e 61 74 ┆sterisk will match any combinat┆
0x0fc0…0fe0 69 6f 6e 20 6f 66 20 63 68 61 72 61 63 74 65 72 73 20 77 69 74 68 69 6e 20 74 68 65 20 66 69 65 ┆ion of characters within the fie┆
0x0fe0…1000 6c 64 20 69 6e 20 77 68 69 63 68 20 69 74 20 69 73 20 75 73 65 64 2e 20 49 66 0d 0a 62 6f 74 68 ┆ld in which it is used. If both┆
0x1000…1020 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆
[…0x9f…]
0x2400…2420 20 74 68 65 20 6e 61 6d 65 20 66 69 65 6c 64 20 61 6e 64 20 74 68 65 20 74 79 70 65 20 66 69 65 ┆ the name field and the type fie┆
0x2420…2440 6c 64 20 61 72 65 20 6f 6d 69 74 74 65 64 2c 20 6c 65 61 76 69 6e 67 20 6f 6e 6c 79 20 61 20 64 ┆ld are omitted, leaving only a d┆
0x2440…2460 72 69 76 65 20 69 64 65 6e 2d 0d 0a 74 69 66 69 65 72 20 61 6e 64 20 61 20 63 6f 6c 6f 6e 2c 20 ┆rive iden- tifier and a colon, ┆
0x2460…2480 74 68 65 6e 20 61 6c 6c 20 66 69 6c 65 73 20 6f 6e 20 74 68 61 74 20 64 72 69 76 65 20 61 72 65 ┆then all files on that drive are┆
0x2480…24a0 20 6c 69 73 74 65 64 2e 20 49 66 20 3c 61 66 6e 3e 20 69 73 20 6f 6d 69 74 2d 0d 0a 74 65 64 20 ┆ listed. If <afn> is omit- ted ┆
0x24a0…24c0 65 6e 74 69 72 65 6c 79 2c 20 74 68 65 6e 20 61 6c 6c 20 66 69 6c 65 73 20 6f 66 20 74 68 65 20 ┆entirely, then all files of the ┆
0x24c0…24e0 63 75 72 72 65 6e 74 6c 79 20 6c 6f 67 67 65 64 20 64 72 69 76 65 20 61 72 65 20 6c 69 73 74 65 ┆currently logged drive are liste┆
0x24e0…2500 64 2e 0d 0a 0d 0a 4e 6f 74 65 20 74 68 61 74 20 73 79 73 74 65 6d 20 66 69 6c 65 73 20 61 72 65 ┆d. Note that system files are┆
0x2500…2520 20 6e 6f 74 20 64 69 73 70 6c 61 79 65 64 2e 0d 0a 0d 0a 25 55 43 4f 4d 50 41 53 20 4f 4e 2d 4c ┆ not displayed. %UCOMPAS ON-L┆
0x2520…2540 49 4e 45 20 48 45 4c 50 3a 20 54 68 65 20 55 53 45 20 63 6f 6d 6d 61 6e 64 2e 0d 0a 0d 0a 54 68 ┆INE HELP: The USE command. Th┆
0x2540…2560 65 20 55 53 45 20 63 6f 6d 6d 61 6e 64 20 69 73 20 75 73 65 64 20 74 6f 20 6c 6f 67 20 69 6e 20 ┆e USE command is used to log in ┆
0x2560…2580 6e 65 77 20 64 69 73 6b 73 2c 20 61 6e 64 20 74 6f 20 63 68 61 6e 67 65 20 74 68 65 20 63 75 72 ┆new disks, and to change the cur┆
0x2580…25a0 72 65 6e 74 6c 79 20 6c 6f 67 2d 0d 0a 67 65 64 20 64 72 69 76 65 20 61 6e 64 20 75 73 65 72 20 ┆rently log- ged drive and user ┆
0x25a0…25c0 6e 75 6d 62 65 72 2e 20 54 68 65 20 63 6f 6d 6d 61 6e 64 20 6c 69 6e 65 20 66 6f 72 6d 61 74 20 ┆number. The command line format ┆
0x25c0…25e0 69 73 3a 0d 0a 0d 0a 20 20 20 20 20 20 20 20 55 53 45 20 3c 64 72 69 76 65 3e 3c 75 73 65 72 3e ┆is: USE <drive><user>┆
0x25e0…2600 0d 0a 0d 0a 77 68 65 72 65 20 3c 64 72 69 76 65 3e 20 69 73 20 61 20 64 72 69 76 65 20 69 64 65 ┆ where <drive> is a drive ide┆
0x2600…2620 6e 74 69 66 69 65 72 20 28 41 2d 50 29 2c 20 61 6e 64 20 3c 75 73 65 72 3e 20 69 73 20 61 20 75 ┆ntifier (A-P), and <user> is a u┆
0x2620…2640 73 65 72 20 6e 75 6d 62 65 72 20 28 30 2d 31 35 29 2e 0d 0a 49 66 20 3c 64 72 69 76 65 3e 20 69 ┆ser number (0-15). If <drive> i┆
0x2640…2660 73 20 73 70 65 63 69 66 69 65 64 2c 20 74 68 65 20 63 75 72 72 65 6e 74 6c 79 20 6c 6f 67 67 65 ┆s specified, the currently logge┆
0x2660…2680 64 20 64 72 69 76 65 20 69 73 20 63 68 61 6e 67 65 64 2c 20 61 6e 64 20 69 66 20 3c 75 73 65 72 ┆d drive is changed, and if <user┆
0x2680…26a0 3e 0d 0a 69 73 20 73 70 65 63 69 66 69 65 64 2c 20 74 68 65 20 63 75 72 72 65 6e 74 20 75 73 65 ┆> is specified, the current use┆
0x26a0…26c0 72 20 6e 75 6d 62 65 72 20 69 73 20 63 68 61 6e 67 65 64 2e 20 54 68 65 20 55 53 45 20 63 6f 6d ┆r number is changed. The USE com┆
0x26c0…26e0 6d 61 6e 64 20 65 6e 64 73 20 62 79 20 64 69 73 2d 0d 0a 70 6c 61 79 69 6e 67 20 74 68 65 20 63 ┆mand ends by dis- playing the c┆
0x26e0…2700 75 72 72 65 6e 74 6c 79 20 6c 6f 67 67 65 64 20 64 72 69 76 65 20 61 6e 64 20 75 73 65 72 20 6e ┆urrently logged drive and user n┆
0x2700…2720 75 6d 62 65 72 2e 0d 0a 0d 0a 57 68 65 6e 65 76 65 72 20 61 20 64 69 73 6b 20 69 73 20 63 68 61 ┆umber. Whenever a disk is cha┆
0x2720…2740 6e 67 65 64 20 69 6e 20 6f 6e 65 20 6f 66 20 74 68 65 20 64 72 69 76 65 73 2c 20 61 20 55 53 45 ┆nged in one of the drives, a USE┆
0x2740…2760 20 63 6f 6d 6d 61 6e 64 20 73 68 6f 75 6c 64 20 62 65 20 69 73 2d 0d 0a 73 75 65 64 20 74 6f 20 ┆ command should be is- sued to ┆
0x2760…2780 6c 6f 67 20 69 6e 20 74 68 61 74 20 64 69 73 6b 2e 20 4f 74 68 65 72 77 69 73 65 2c 20 43 50 2f ┆log in that disk. Otherwise, CP/┆
0x2780…27a0 4d 20 77 69 6c 6c 20 72 65 70 6f 72 74 20 61 6e 20 52 2f 4f 20 65 72 72 6f 72 20 69 66 20 79 6f ┆M will report an R/O error if yo┆
0x27a0…27c0 75 20 74 72 79 0d 0a 74 6f 20 77 72 69 74 65 20 74 6f 20 74 68 61 74 20 64 69 73 6b 2e 0d 0a 0d ┆u try to write to that disk. ┆
0x27c0…27e0 0a 25 4d 43 4f 4d 50 41 53 20 4f 4e 2d 4c 49 4e 45 20 48 45 4c 50 3a 20 54 68 65 20 4d 45 4d 4f ┆ %MCOMPAS ON-LINE HELP: The MEMO┆
0x27e0…2800 52 59 20 63 6f 6d 6d 61 6e 64 2e 0d 0a 0d 0a 54 68 65 20 4d 45 4d 4f 52 59 20 63 6f 6d 6d 61 6e ┆RY command. The MEMORY comman┆
0x2800…2820 64 20 64 69 73 70 6c 61 79 73 20 74 68 65 20 73 69 7a 65 20 6f 66 20 66 72 65 65 20 6d 65 6d 6f ┆d displays the size of free memo┆
0x2820…2840 72 79 3a 0d 0a 0d 0a 20 20 20 20 20 20 20 20 46 72 65 65 3a 20 72 72 72 72 72 72 20 62 79 74 65 ┆ry: Free: rrrrrr byte┆
0x2840…2860 73 20 28 61 61 61 61 20 70 61 72 61 67 72 61 70 68 73 29 0d 0a 0d 0a 54 68 65 20 6e 75 6d 62 65 ┆s (aaaa paragraphs) The numbe┆
0x2860…2880 72 20 69 73 20 70 61 72 65 6e 74 68 65 73 65 73 20 69 73 20 74 68 65 20 70 61 72 61 67 72 61 70 ┆r is parentheses is the paragrap┆
0x2880…28a0 68 20 73 69 7a 65 20 28 69 6e 20 68 65 78 29 20 6f 66 20 66 72 65 65 20 6d 65 6d 6f 72 79 2e 20 ┆h size (in hex) of free memory. ┆
0x28a0…28c0 4f 6e 65 0d 0a 70 61 72 61 67 72 61 70 68 20 63 6f 72 72 65 73 70 6f 6e 64 73 20 74 6f 20 31 36 ┆One paragraph corresponds to 16┆
0x28c0…28e0 20 62 79 74 65 73 2e 0d 0a 0d 0a 25 5a 43 4f 4d 50 41 53 20 4f 4e 2d 4c 49 4e 45 20 48 45 4c 50 ┆ bytes. %ZCOMPAS ON-LINE HELP┆
0x28e0…2900 3a 20 54 68 65 20 5a 41 50 20 63 6f 6d 6d 61 6e 64 2e 0d 0a 0d 0a 54 68 65 20 5a 41 50 20 63 6f ┆: The ZAP command. The ZAP co┆
0x2900…2920 6d 6d 61 6e 64 20 65 72 61 73 65 73 20 74 68 65 20 74 65 78 74 20 69 6e 20 6d 65 6d 6f 72 79 20 ┆mmand erases the text in memory ┆
0x2920…2940 61 6e 64 20 73 65 74 73 20 74 68 65 20 63 75 72 72 65 6e 74 20 66 69 6c 65 20 6e 61 6d 65 20 74 ┆and sets the current file name t┆
0x2940…2960 6f 0d 0a 27 57 4f 52 4b 2e 50 41 53 27 2e 20 41 73 20 61 20 73 61 66 65 74 79 20 70 72 65 63 61 ┆o 'WORK.PAS'. As a safety preca┆
0x2960…2980 75 74 69 6f 6e 2c 20 5a 41 50 20 61 73 6b 73 20 27 41 72 65 20 79 6f 75 20 73 75 72 65 20 28 59 ┆ution, ZAP asks 'Are you sure (Y┆
0x2980…29a0 2f 4e 29 3f 27 2e 20 41 6e 79 20 61 6e 73 77 65 72 0d 0a 62 75 74 20 27 59 27 20 6f 72 20 27 79 ┆/N)?'. Any answer but 'Y' or 'y┆
0x29a0…29c0 27 20 77 69 6c 6c 20 6c 65 61 76 65 20 74 68 65 20 74 65 78 74 20 75 6e 63 68 61 6e 67 65 64 2e ┆' will leave the text unchanged.┆
0x29c0…29e0 0d 0a 0d 0a 25 51 43 4f 4d 50 41 53 20 4f 4e 2d 4c 49 4e 45 20 48 45 4c 50 3a 20 54 68 65 20 51 ┆ %QCOMPAS ON-LINE HELP: The Q┆
0x29e0…2a00 55 49 54 20 63 6f 6d 6d 61 6e 64 2e 0d 0a 0d 0a 54 68 65 20 51 55 49 54 20 63 6f 6d 6d 61 6e 64 ┆UIT command. The QUIT command┆
0x2a00…2a20 20 74 72 61 6e 73 66 65 72 73 20 63 6f 6e 74 72 6f 6c 20 74 6f 20 43 50 2f 4d 2e 20 59 6f 75 20 ┆ transfers control to CP/M. You ┆
0x2a20…2a40 6d 61 79 20 6c 61 74 65 72 20 77 61 72 6d 2d 73 74 61 72 74 20 43 4f 4d 50 41 53 0d 0a 62 79 20 ┆may later warm-start COMPAS by ┆
0x2a40…2a60 65 6e 74 65 72 69 6e 67 20 27 43 4f 4d 50 41 53 20 2a 27 2e 20 54 68 69 73 20 6f 66 20 63 6f 75 ┆entering 'COMPAS *'. This of cou┆
0x2a60…2a80 72 73 65 20 72 65 71 75 69 72 65 73 20 74 68 61 74 20 6e 6f 20 76 69 74 61 6c 20 6d 65 6d 6f 72 ┆rse requires that no vital memor┆
0x2a80…2aa0 79 20 61 72 65 61 73 0d 0a 68 61 76 65 20 62 65 65 6e 20 6f 76 65 72 77 72 69 74 74 65 6e 20 62 ┆y areas have been overwritten b┆
0x2aa0…2ac0 79 20 6f 74 68 65 72 20 70 72 6f 67 72 61 6d 73 20 72 75 6e 20 69 74 20 74 68 65 20 6d 65 61 6e ┆y other programs run it the mean┆
0x2ac0…2ae0 74 69 6d 65 2e 0d 0a 0d 0a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a ┆time. ┆
0x2ae0…2b00 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a ┆ ┆
0x2b00…2b20 30 20 53 41 59 20 22 43 75 72 72 65 6e 74 20 70 61 79 20 20 20 20 20 22 20 47 45 54 20 70 61 79 ┆0 SAY "Current pay " GET pay┆
0x2b20…2b40 72 61 74 65 20 50 49 43 54 55 52 45 20 27 39 39 39 39 2e 39 39 39 27 0d 0a 1a 1a 1a 1a 1a 1a 1a ┆rate PICTURE '9999.999' ┆
0x2b40…2b60 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a ┆ ┆
[…0x1…]
0x2b80…2ba0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆
[…0x1…]
0x2bc0…2be0 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆
[…0x1…]
0x2c00…2c20 26 44 64 65 66 69 6e 65 64 0d 0a 26 45 20 65 78 70 65 63 74 65 64 0d 0a 26 46 66 69 6c 65 0d 0a ┆&Ddefined &E expected &Ffile ┆
0x2c20…2c40 26 48 20 61 72 65 20 6e 6f 74 20 61 6c 6c 6f 77 65 64 20 68 65 72 65 0d 0a 26 49 49 6c 6c 65 67 ┆&H are not allowed here &IIlleg┆
0x2c40…2c60 61 6c 20 0d 0a 26 4a 20 69 64 65 6e 74 69 66 69 65 72 0d 0a 26 4e 45 78 70 72 65 73 73 69 6f 6e ┆al &J identifier &NExpression┆
0x2c60…2c80 20 69 73 20 6e 6f 74 20 6f 66 20 74 79 70 65 20 0d 0a 26 4f 6f 6e 73 74 61 6e 74 0d 0a 26 50 74 ┆ is not of type &Oonstant &Pt┆
0x2c80…2ca0 79 70 65 0d 0a 26 52 49 6e 74 65 67 65 72 20 6f 72 20 72 65 61 6c 20 0d 0a 26 53 55 6e 6b 6e 6f ┆ype &RInteger or real &SUnkno┆
0x2ca0…2cc0 77 6e 20 69 64 65 6e 74 69 66 69 65 72 20 6f 72 20 73 79 6e 74 61 78 20 65 72 72 6f 72 20 69 6e ┆wn identifier or syntax error in┆
0x2cc0…2ce0 20 0d 0a 26 54 73 74 61 74 65 6d 65 6e 74 0d 0a 26 55 55 6e 6b 6e 6f 77 6e 20 6f 72 20 69 6c 6c ┆ &Tstatement &UUnknown or ill┆
[…truncated at 200 lines…]