|
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
Length: 1177344 (0x11f700)
Description: Bits:30005751 SW1323/I8 RC703 Facility for UCSD Pascal rel. 1.0
Types: 8" Floppy Disk, ImdContainer
Dumping the first 0x20 bytes of each record
0x000000…000080 (0, 0, 1) 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 ┆ ┆
[…0x34…]
0x002900…002b00 (1, 0, 2) 65 67 69 6e 20 67 65 74 28 64 61 66 69 6c d7 00 cd 00 13 9e 00 a5 a6 ad b6 01 02 00 cd 00 0d 9e ┆egin get(dafil ┆
0x002b00…002d00 (1, 0, 3) 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 ┆ ┆
0x002d00…002f00 (1, 0, 4) 01 b9 f6 a5 a6 ad d7 a6 03 69 78 78 00 cd 00 13 9e 00 a5 a6 ad b6 01 02 00 cd 00 0d 9e 00 a5 a6 ┆ ixx ┆
0x002f00…003100 (1, 0, 5) 00 00 06 00 00 00 03 46 41 43 00 00 00 00 2e 02 0e 00 00 00 56 a7 00 00 00 00 06 00 1a 00 02 00 ┆ FAC . V ┆
0x003100…003300 (1, 0, 6) 0d 72 65 77 72 69 74 65 28 64 61 66 69 6c 00 cd 00 13 9e 00 a5 a6 ad b6 01 02 00 cd 00 0d 9e 00 ┆ rewrite(dafil ┆
0x003300…003500 (1, 0, 7) 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 ┆ ┆
0x003500…003700 (1, 0, 8) ad dc a2 83 b3 00 cd 00 13 9e 00 a5 a6 ad d7 a6 07 3a 3d 64 61 66 69 6c 00 cd 00 13 9e 00 a5 a6 ┆ :=dafil ┆
0x003700…003900 (1, 0, 9) 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 ┆ ┆
0x003900…003b00 (1, 0, 10) 0d 9e 00 b9 f0 a5 a6 ad d7 a6 03 6b 65 79 00 cd 00 13 9e 00 a5 a6 ad d9 00 cd 00 0d 9e 00 a5 a6 ┆ key ┆
0x003b00…003d00 (1, 0, 11) 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 ┆ ┆
0x003d00…003f00 (1, 0, 12) ec a5 a6 ad d7 a6 04 65 6e 64 3b 00 cd 00 13 9e 00 a5 a6 ad cd 00 16 9e 00 ad 00 65 1b 00 51 04 ┆ end; e Q ┆
0x003f00…004100 (1, 0, 13) 00 00 00 00 06 00 f0 1b 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆
0x004100…004300 (1, 0, 14) ad cd 00 16 9e 00 01 cc 02 a9 81 7b cc 03 d9 da c8 a1 ee a5 81 7c d9 01 0a 88 01 95 a4 83 b8 cc ┆ æ ø ┆
0x004300…004500 (1, 0, 15) a9 aa 9f a5 80 03 00 00 cd 00 0a 93 84 a1 63 a5 80 03 a5 aa 65 50 cd 00 12 9e 00 a5 80 03 cd 00 ┆ c eP ┆
0x004500…004700 (1, 1, 1) 0d 9e 00 a5 a6 ad d7 a6 0a 5d 20 6f 66 20 70 61 69 72 74 00 cd 00 13 9e 00 a5 a6 ad d9 00 cd 00 ┆ Å of pairt ┆
0x004700…004900 (1, 1, 2) c6 05 d9 50 cd 00 17 c6 05 a5 aa 65 c6 80 85 a9 aa 9e 01 cd 00 19 c6 80 85 c7 a0 00 cd 00 17 c6 ┆ P e ┆
0x004900…004b00 (1, 1, 3) 00 00 15 00 76 04 0a 01 c6 2d da aa 50 c6 04 d9 aa 50 c6 04 d7 a6 00 b7 04 a1 e4 a5 a7 da c6 2d ┆ v - P P -┆
0x004b00…004d00 (1, 1, 4) e2 a2 09 af 04 ab aa 9f c6 03 cf 04 c6 03 3a af 04 ab aa 9f e2 a2 01 0f cf 05 df 01 82 cc 08 b9 ┆ : ┆
0x004d00…004f00 (1, 1, 5) 79 73 66 69 6c 2c 27 d7 00 cd 00 13 a5 a6 ad a5 81 6e 00 cd 00 13 a5 a6 ad a6 03 27 29 3b d7 00 ┆ysfil,' n '); ┆
0x004f00…005100 (1, 1, 6) 0b 01 d8 cc 07 cf 02 a6 07 75 6e 69 74 76 6f 6c d7 cf 06 de a2 38 08 cf 05 cf 02 c6 02 cf 04 c6 ┆ unitvol 8 ┆
0x005100…005300 (1, 1, 7) a9 07 cc 05 dc db a2 0a aa 08 dc a2 0c 00 9a dc a2 0b db a3 11 9a dc a2 0a 00 9a dc a2 09 a5 aa ┆ ┆
0x005300…005500 (1, 1, 8) 3f 00 0c 00 04 00 09 00 54 00 0e 01 a5 aa 8e b3 04 cf ff 03 00 00 00 00 00 00 04 a0 10 bd 10 a5 ┆? T ┆
0x005500…005700 (1, 1, 9) 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 ┆ ┆
0x005700…005900 (1, 1, 10) da b9 0a 3e cc 01 b9 10 3c cc 01 b9 0b ac 00 00 01 00 b9 04 11 00 0e 00 ad 01 00 00 06 00 06 00 ┆ > < ┆
0x005900…005b00 (1, 1, 11) 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 ┆ ┆
0x005b00…005d00 (1, 1, 12) 6d 65 29 3b d7 00 cd 00 13 9e 00 a5 a6 ad cd 00 16 9e 00 a5 a6 ad d8 a2 83 b3 00 cd 00 13 9e 00 ┆me); ┆
0x005d00…005f00 (1, 1, 13) 28 2a 24 53 2b 2a 29 0d 40 30 38 0d 69 6e 74 65 72 66 61 63 65 0d 20 20 40 30 34 0d 20 20 74 79 ┆(*$S+*) @08 interface @04 ty┆
0x005f00…006100 (1, 1, 14) 00 cd 00 13 9e 00 a5 a6 ad 3b 00 cd 00 11 9e 00 a5 a6 ad cd 00 16 9e 00 a5 a6 ad a6 0a 70 75 74 ┆ ; put┆
0x006100…006300 (1, 1, 15) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 69 6c 6c 3a 69 6e 74 65 67 65 72 3b 0d 20 20 20 ┆ fill:integer; ┆
0x006300…006500 (2, 0, 1) 20 20 20 20 70 72 6f 63 65 64 75 72 65 20 72 65 70 6c 61 63 65 69 73 71 28 69 73 71 6e 61 6d 65 ┆ procedure replaceisq(isqname┆
0x006500…006700 (2, 0, 2) 20 20 20 20 20 67 65 74 28 73 79 73 66 69 6c 29 3b 0d 20 20 20 20 20 20 20 20 20 20 73 79 73 5b ┆ get(sysfil); sysÆ┆
0x006700…006900 (2, 0, 3) 20 20 69 78 78 70 72 74 2c 0d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 78 70 72 74 ┆ ixxprt, ixprt┆
0x006900…006b00 (2, 0, 4) 20 20 20 20 20 20 62 65 67 69 6e 0d 20 20 20 20 20 20 20 20 6f 70 65 6e 69 73 71 66 69 6c 3b 0d ┆ begin openisqfil; ┆
0x006b00…006d00 (2, 0, 5) 20 20 20 69 73 71 72 65 73 3a 69 73 71 65 72 72 6f 72 73 3b 0d 20 20 20 64 6f 74 72 61 70 3a 62 ┆ isqres:isqerrors; dotrap:b┆
0x006d00…006f00 (2, 0, 6) 69 6c 65 6f 70 65 6e 29 0d 20 20 20 20 20 20 20 20 20 20 65 6c 73 65 0d 20 20 20 20 20 20 20 20 ┆ileopen) else ┆
0x006f00…007100 (2, 0, 7) 73 71 5d 20 64 6f 0d 20 20 20 20 20 20 40 31 36 0d 20 20 65 6e 64 20 28 2a 69 78 74 6f 6b 65 79 ┆sqÅ do @16 end (*ixtokey┆
0x007100…007300 (2, 0, 8) 20 20 20 20 20 20 65 6c 73 65 0d 20 20 20 20 20 20 20 20 69 66 20 28 73 74 61 74 75 73 3c 3e 61 ┆ else if (status<>a┆
0x007300…007500 (2, 0, 9) 20 20 65 6e 64 20 28 2a 62 6c 6f 63 6b 70 72 74 2a 29 3b 0d 70 72 6f 63 65 64 75 72 65 20 73 65 ┆ end (*blockprt*); procedure se┆
0x007500…007700 (2, 0, 10) 75 5b 69 73 71 5d 2e 66 79 73 6e 72 29 3b 0d 20 20 20 20 20 20 20 20 73 79 73 66 69 6c 5e 3a 3d ┆uÆisqÅ.fysnr); sysfil^:=┆
0x007700…007900 (2, 0, 11) 64 20 28 2a 72 65 73 64 61 74 61 2a 29 3b 0d 70 72 6f 63 65 64 75 72 65 20 63 6c 73 64 61 74 61 ┆d (*resdata*); procedure clsdata┆
0x007900…007b00 (2, 0, 12) 20 20 20 20 20 20 62 65 67 69 6e 0d 20 20 20 20 20 20 20 20 69 66 20 69 78 70 72 74 3c 61 6e 74 ┆ begin if ixprt<ant┆
0x007b00…007d00 (2, 0, 13) 20 20 20 20 20 20 40 33 31 0d 20 20 65 6e 64 20 28 2a 67 65 74 62 6c 6f 63 6b 2a 29 3b 0d 70 72 ┆ @31 end (*getblock*); pr┆
0x007d00…007f00 (2, 0, 14) 20 20 20 20 20 20 6f 75 74 72 65 63 3b 0d 20 20 20 20 20 20 20 20 65 6e 64 0d 20 20 20 20 20 20 ┆ outrec; end ┆
0x007f00…008100 (2, 0, 15) 20 20 73 65 65 6b 62 6c 6f 63 6b 28 30 29 3b 0d 20 20 20 20 67 65 74 62 6c 6f 63 6b 3b 0d 20 20 ┆ seekblock(0); getblock; ┆
0x008100…008300 (2, 1, 1) 20 20 20 20 20 20 62 65 67 69 6e 0d 20 20 20 20 20 20 20 20 73 65 65 6b 72 65 63 28 72 65 63 70 ┆ begin seekrec(recp┆
0x008300…008500 (2, 1, 2) 20 20 20 20 20 20 20 20 67 65 74 62 6c 6f 63 6b 3b 0d 20 20 20 20 20 20 20 20 69 6e 62 6c 6f 63 ┆ getblock; inbloc┆
0x008500…008700 (2, 1, 3) 6c 65 65 6d 74 79 29 0d 20 20 20 20 20 20 65 6c 73 65 0d 20 20 20 20 20 20 20 20 65 72 72 6f 72 ┆leemty) else error┆
0x008700…008900 (2, 1, 4) 6f 63 6b 3b 0d 20 20 20 20 20 20 70 75 74 62 6c 6f 63 6b 3b 0d 20 20 20 20 20 20 66 6f 72 20 69 ┆ock; putblock; for i┆
0x008900…008b00 (2, 1, 5) 20 20 20 20 20 20 20 20 20 20 69 66 20 61 6e 74 61 6c 62 6c 6f 63 6b 73 20 3c 6d 61 78 62 6c 6f ┆ if antalblocks <maxblo┆
0x008b00…008d00 (2, 1, 6) 20 20 20 20 65 6e 64 20 28 2a 77 69 74 68 2a 29 0d 20 20 65 6e 64 20 28 2a 73 70 6c 69 74 62 6c ┆ end (*with*) end (*splitbl┆
0x008d00…008f00 (2, 1, 7) 0d 20 20 20 20 20 20 20 20 20 20 20 20 73 65 65 6b 62 6c 6f 63 6b 28 62 6c 6f 63 6b 6e 75 6d 29 ┆ seekblock(blocknum)┆
0x008f00…009100 (2, 1, 8) 28 27 69 6e 69 74 27 29 3b 0d 20 20 20 20 20 20 20 20 6e 6f 74 69 6e 69 74 20 3a 20 77 72 69 74 ┆('init'); notinit : writ┆
0x009100…009300 (2, 1, 9) 20 20 20 20 20 20 20 20 20 20 20 20 65 72 72 6f 72 28 6f 76 65 72 66 6c 6f 77 29 0d 20 20 20 20 ┆ error(overflow) ┆
0x009300…009500 (2, 1, 10) 20 20 20 20 20 20 64 6f 74 72 61 70 20 3a 3d 66 61 6c 73 65 3b 0d 20 20 20 20 20 20 63 6c 6f 73 ┆ dotrap :=false; clos┆
0x009500…009700 (2, 1, 11) 66 69 6e 64 3b 0d 20 20 20 20 20 20 69 66 20 6d 61 74 63 68 20 74 68 65 6e 0d 20 20 20 20 20 20 ┆find; if match then ┆
0x009700…009900 (2, 1, 12) 6e 0d 20 20 20 20 69 73 71 3a 3d 69 73 71 6e 61 6d 65 3b 0d 20 20 20 20 63 68 61 6e 67 65 74 72 ┆n isq:=isqname; changetr┆
0x009900…009b00 (2, 1, 13) 20 20 20 20 20 20 20 20 20 20 20 69 78 74 6f 6b 65 79 3b 0d 20 20 20 20 20 20 20 20 20 20 20 6b ┆ ixtokey; k┆
0x009b00…009d00 (2, 1, 14) 20 20 20 20 20 20 6c 6f 63 6f 6b 3a 3d 66 61 6c 73 65 3b 0d 20 20 20 20 20 20 77 68 69 6c 65 20 ┆ locok:=false; while ┆
0x009d00…009f00 (2, 1, 15) 66 20 73 79 73 69 6e 69 74 20 74 68 65 6e 0d 20 20 20 20 20 20 20 20 20 69 66 20 73 74 61 74 75 ┆f sysinit then if statu┆
0x009f00…00a100 (3, 0, 1) 20 20 20 20 20 20 62 65 67 69 6e 0d 20 20 20 20 20 20 20 20 69 66 20 63 6d 70 3d 30 20 74 68 65 ┆ begin if cmp=0 the┆
0x00a100…00a300 (3, 0, 2) 20 20 40 32 39 0d 20 20 65 6e 64 20 28 2a 72 65 77 64 61 74 61 2a 29 3b 0d 70 72 6f 63 65 64 75 ┆ @29 end (*rewdata*); procedu┆
0x00a300…00a500 (3, 0, 3) 20 20 20 62 65 67 69 6e 0d 20 20 20 20 20 20 20 20 20 20 20 20 69 78 78 70 72 74 3a 3d 31 3b 0d ┆ begin ixxprt:=1; ┆
0x00a500…00a700 (3, 0, 4) 20 20 20 20 20 20 40 33 31 0d 20 20 65 6e 64 20 28 2a 67 65 74 62 6c 6f 63 6b 2a 29 3b 0d 70 72 ┆ @31 end (*getblock*); pr┆
0x00a700…00a900 (3, 0, 5) 20 20 20 20 20 20 20 20 20 20 65 72 72 6f 72 20 28 66 69 6c 65 63 6c 6f 73 65 64 29 0d 20 20 20 ┆ error (fileclosed) ┆
0x00a900…00ab00 (3, 0, 6) 20 20 73 65 65 6b 62 6c 6f 63 6b 28 30 29 3b 0d 20 20 20 20 67 65 74 62 6c 6f 63 6b 3b 0d 20 20 ┆ seekblock(0); getblock; ┆
0x00ab00…00ad00 (3, 0, 7) 3b 0d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 62 65 74 61 3a 3d 62 6c 6f 63 6b 73 69 7a ┆; beta:=blocksiz┆
0x00ad00…00af00 (3, 0, 8) 20 20 20 20 40 34 32 0d 20 20 65 6e 64 20 28 2a 64 65 6c 77 72 6b 66 69 6c 65 2a 29 3b 0d 70 72 ┆ @42 end (*delwrkfile*); pr┆
0x00af00…00b100 (3, 0, 9) 20 20 0d 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 ┆ ┆
0x00b100…00b300 (3, 0, 10) 77 72 69 74 65 28 27 6e 6f 73 70 61 63 65 27 29 3b 0d 20 20 20 20 20 20 20 20 6f 76 65 72 66 6c ┆write('nospace'); overfl┆
0x00b300…00b500 (3, 0, 11) 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 ┆ ┆
0x00b500…00b700 (3, 0, 12) 20 20 20 20 20 20 20 20 65 6f 66 69 6c 65 20 3a 20 77 72 69 74 65 20 28 27 65 6f 66 69 6c 65 27 ┆ eofile : write ('eofile'┆
0x00b700…00b900 (3, 0, 13) 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 ┆ ┆
0x00b900…00bb00 (3, 0, 14) 3a 3d 73 77 69 74 63 68 3b 0d 20 20 20 20 20 20 20 20 20 20 69 73 71 72 65 73 3a 3d 6f 6b 0d 20 ┆:=switch; isqres:=ok ┆
0x00bb00…00bd00 (3, 0, 15) 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 ┆ ┆
0x00bd00…00bf00 (3, 1, 1) 20 20 70 72 6f 63 65 64 75 72 65 20 6c 6f 63 61 74 65 28 73 79 73 6e 61 76 6e 3a 73 74 72 69 6e ┆ procedure locate(sysnavn:strin┆
0x00bf00…00c100 (3, 1, 2) 28 2a 24 53 2b 2a 29 0d 40 30 38 0d 69 6e 74 65 72 66 61 63 65 0d 20 20 40 30 34 0d 20 20 74 79 ┆(*$S+*) @08 interface @04 ty┆
0x00c100…00c300 (3, 1, 3) 72 61 70 3a 3d 74 72 75 65 3b 0d 20 20 20 20 20 20 73 79 73 69 6e 69 74 3a 3d 6c 6f 63 6f 6b 3b ┆rap:=true; sysinit:=locok;┆
0x00c300…00c500 (3, 1, 4) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 69 6c 6c 3a 69 6e 74 65 67 65 72 3b 0d 20 20 20 ┆ fill:integer; ┆
0x00c500…00c700 (3, 1, 5) 20 20 20 20 20 20 65 6c 73 65 0d 20 20 20 20 20 20 20 20 69 73 71 72 65 73 3a 3d 66 69 6c 65 6e ┆ else isqres:=filen┆
0x00c700…00c900 (3, 1, 6) 20 20 20 20 70 72 6f 63 65 64 75 72 65 20 6f 70 65 6e 69 73 71 28 69 73 71 6e 61 6d 65 3a 69 73 ┆ procedure openisq(isqname:is┆
0x00c900…00cb00 (3, 1, 7) 65 73 3a 3d 6f 6b 0d 20 20 20 20 20 20 20 20 65 6e 64 0d 20 20 20 20 20 20 20 20 65 6c 73 65 0d ┆es:=ok end else ┆
0x00cb00…00cd00 (3, 1, 8) 74 75 74 79 70 65 3d 72 65 63 6f 72 64 0d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 ┆tutype=record f┆
0x00cd00…00cf00 (3, 1, 9) 20 20 20 20 20 20 62 65 67 69 6e 0d 20 20 20 20 20 20 20 20 70 75 74 69 78 78 3b 0d 20 20 20 20 ┆ begin putixx; ┆
0x00cf00…00d100 (3, 1, 10) 20 20 20 73 79 73 3a 61 72 72 61 79 20 5b 69 73 71 6e 61 6d 65 73 5d 20 6f 66 20 73 79 73 72 65 ┆ sys:array ÆisqnamesÅ of sysre┆
0x00d100…00d300 (3, 1, 11) 2e 73 74 61 74 75 73 20 6f 66 0d 20 20 20 20 20 20 20 20 20 20 61 66 74 65 72 6f 70 65 6e 20 3a ┆.status of afteropen :┆
0x00d300…00d500 (3, 1, 12) 20 69 78 74 6f 6b 65 79 3b 0d 20 20 62 65 67 69 6e 0d 20 20 20 20 77 69 74 68 20 73 69 74 75 5b ┆ ixtokey; begin with situÆ┆
0x00d500…00d700 (3, 1, 13) 20 20 20 20 20 20 20 20 65 72 72 6f 72 28 75 70 64 61 74 65 65 72 72 6f 72 29 0d 20 20 20 20 65 ┆ error(updateerror) e┆
0x00d700…00d900 (3, 1, 14) 20 20 65 6e 64 20 28 2a 73 65 74 62 6c 6f 63 6b 70 72 74 2a 29 3b 0d 66 75 6e 63 74 69 6f 6e 20 ┆ end (*setblockprt*); function ┆
0x00d900…00db00 (3, 1, 15) 78 3b 0d 20 20 20 20 20 20 20 20 20 20 73 65 74 72 65 63 70 72 74 28 61 6e 74 61 6c 72 65 63 73 ┆x; setrecprt(antalrecs┆
0x00db00…00dd00 (4, 0, 1) 20 20 20 20 20 20 20 20 20 20 20 20 69 78 78 70 72 74 3a 3d 69 78 78 70 72 74 2b 31 3b 0d 20 20 ┆ ixxprt:=ixxprt+1; ┆
0x00dd00…00df00 (4, 0, 2) 72 6f 72 20 28 65 6f 66 69 6c 65 29 0d 20 20 20 20 20 20 20 20 20 20 65 6e 64 3b 0d 20 20 20 20 ┆ror (eofile) end; ┆
0x00df00…00e100 (4, 0, 3) 0d 20 20 76 61 72 0d 20 20 20 20 69 3a 69 6e 74 65 67 65 72 3b 0d 20 20 20 20 73 70 61 63 65 3a ┆ var i:integer; space:┆
0x00e100…00e300 (4, 0, 4) 20 20 65 6e 64 20 28 2a 69 73 71 72 65 73 75 6c 74 2a 29 3b 0d 66 75 6e 63 74 69 6f 6e 20 73 79 ┆ end (*isqresult*); function sy┆
0x00e300…00e500 (4, 0, 5) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 62 65 67 69 6e 0d 20 20 20 20 20 20 20 20 20 20 20 20 ┆ begin ┆
0x00e500…00e700 (4, 0, 6) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 79 73 76 61 6c 69 73 71 3a 3d 61 6c 66 61 20 ┆ sysvalisq:=alfa ┆
0x00e700…00e900 (4, 0, 7) 20 70 75 74 72 65 63 3b 0d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 70 61 63 65 3a 3d ┆ putrec; space:=┆
0x00e900…00eb00 (4, 0, 8) 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 ┆ ┆
0x00eb00…00ed00 (4, 0, 9) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 65 6e 64 0d 20 20 20 20 20 20 20 20 20 20 ┆ end ┆
0x00ed00…00ef00 (4, 0, 10) 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 ┆ ┆
0x00ef00…00f100 (4, 0, 11) 61 74 75 73 3c 3e 61 66 74 65 72 63 6c 6f 73 65 20 74 68 65 6e 0d 20 20 20 20 20 20 20 20 20 20 ┆atus<>afterclose then ┆
0x00f100…00f300 (4, 0, 12) 28 2a 24 53 2b 2a 29 0d 40 30 38 0d 69 6e 74 65 72 66 61 63 65 0d 20 20 40 30 34 0d 20 20 74 79 ┆(*$S+*) @08 interface @04 ty┆
0x00f300…00f500 (4, 0, 13) 20 20 20 20 20 20 20 20 20 20 70 75 74 62 6c 6f 63 6b 3b 0d 20 20 20 20 20 20 20 20 20 20 6b 65 ┆ putblock; ke┆
0x00f500…00f700 (4, 0, 14) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 69 6c 6c 3a 69 6e 74 65 67 65 72 3b 0d 20 20 20 ┆ fill:integer; ┆
0x00f700…00f900 (4, 0, 15) 20 20 20 20 65 6c 73 65 0d 20 20 20 20 20 20 20 20 20 20 65 72 72 6f 72 20 28 73 79 73 6e 6f 74 ┆ else error (sysnot┆
0x00f900…00fb00 (4, 1, 1) 20 20 20 20 70 72 6f 63 65 64 75 72 65 20 6f 70 65 6e 69 73 71 28 69 73 71 6e 61 6d 65 3a 69 73 ┆ procedure openisq(isqname:is┆
0x00fb00…00fd00 (4, 1, 2) 20 20 20 20 20 20 20 20 20 20 62 65 67 69 6e 0d 20 20 20 20 20 20 20 20 20 20 20 20 69 6e 69 74 ┆ begin init┆
0x00fd00…00ff00 (4, 1, 3) 6e 61 6d 65 73 3b 65 72 72 6f 72 63 6f 64 65 3a 69 73 71 65 72 72 6f 72 73 29 3b 0d 20 20 20 20 ┆names;errorcode:isqerrors); ┆
0x00ff00…010100 (4, 1, 4) 73 65 71 3b 0d 20 20 76 61 72 0d 20 20 20 20 62 65 66 6f 72 65 2c 20 62 61 64 3a 62 6f 6f 6c 65 ┆seq; var before, bad:boole┆
0x010100…010300 (4, 1, 5) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 65 78 74 72 65 63 3a 69 6e 74 65 67 65 72 ┆ nextrec:integer┆
0x010300…010500 (4, 1, 6) 20 20 20 20 20 20 20 20 20 20 62 61 64 3a 3d 66 61 6c 73 65 3b 0d 20 20 20 20 20 20 20 20 20 20 ┆ bad:=false; ┆
0x010500…010700 (4, 1, 7) 20 40 31 31 0d 20 20 65 6e 64 20 28 2a 69 6e 72 65 63 2a 29 3b 0d 70 72 6f 63 65 64 75 72 65 20 ┆ @11 end (*inrec*); procedure ┆
0x010700…010900 (4, 1, 8) 0d 20 20 20 20 20 20 20 20 20 65 72 72 6f 72 20 28 73 79 73 6e 6f 74 69 6e 69 74 29 0d 20 20 20 ┆ error (sysnotinit) ┆
0x010900…010b00 (4, 1, 9) 20 20 62 65 67 69 6e 0d 20 20 20 20 77 69 74 68 20 73 69 74 75 5b 69 73 71 5d 20 64 6f 0d 20 20 ┆ begin with situÆisqÅ do ┆
0x010b00…010d00 (4, 1, 10) 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 20 69 3a 3d 31 20 74 6f 20 6d 61 78 62 6c 6f 63 6b 73 ┆ for i:=1 to maxblocks┆
0x010d00…010f00 (4, 1, 11) 5d 20 64 6f 0d 20 20 20 20 20 20 40 32 34 0d 20 20 65 6e 64 20 28 2a 73 65 74 72 65 63 70 72 74 ┆Å do @24 end (*setrecprt┆
0x010f00…011100 (4, 1, 12) 20 20 20 20 66 69 6e 69 73 71 28 69 73 71 29 3b 0d 20 20 20 20 20 20 20 20 20 20 20 69 66 20 69 ┆ finisq(isq); if i┆
0x011100…011300 (4, 1, 13) 20 20 62 65 67 69 6e 0d 20 20 20 20 40 33 30 0d 20 20 65 6e 64 20 28 2a 63 6c 73 64 61 74 61 2a ┆ begin @30 end (*clsdata*┆
0x011300…011500 (4, 1, 14) 20 20 20 65 6e 64 20 28 2a 72 65 6f 72 67 69 73 71 2a 29 3b 0d 70 72 6f 63 65 64 75 72 65 20 67 ┆ end (*reorgisq*); procedure g┆
0x011500…011700 (4, 1, 15) 75 5b 69 73 71 5d 2e 62 6c 6f 63 6b 6e 75 6d 3a 3d 69 6e 64 65 78 3b 0d 20 20 20 20 40 33 33 0d ┆uÆisqÅ.blocknum:=index; @33 ┆
0x011700…011900 (5, 0, 1) 20 20 65 6e 64 20 28 2a 67 65 74 69 78 78 2a 29 3b 0d 70 72 6f 63 65 64 75 72 65 20 70 75 74 69 ┆ end (*getixx*); procedure puti┆
0x011900…011b00 (5, 0, 2) 3b 0d 20 20 20 20 20 20 20 20 20 20 20 20 6b 65 79 74 6f 69 78 78 3b 0d 20 20 20 20 20 20 20 20 ┆; keytoixx; ┆
0x011b00…011d00 (5, 0, 3) 65 79 73 29 3b 0d 20 20 20 20 20 20 65 6e 64 6f 66 66 69 6c 65 3a 3d 28 63 6d 70 3e 30 29 3b 0d ┆eys); endoffile:=(cmp>0); ┆
0x011d00…011f00 (5, 0, 4) 20 20 20 20 20 20 20 20 20 20 20 20 65 6c 73 65 0d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 ┆ else i┆
0x011f00…012100 (5, 0, 5) 20 20 20 20 20 20 20 20 6d 6f 76 69 78 78 28 69 2b 31 2c 69 29 3b 0d 20 20 20 20 20 20 61 6e 74 ┆ movixx(i+1,i); ant┆
0x012100…012300 (5, 0, 6) 20 20 20 20 20 69 66 20 69 6f 72 65 73 75 6c 74 3d 30 20 74 68 65 6e 0d 20 20 20 20 20 20 20 20 ┆ if ioresult=0 then ┆
0x012300…012500 (5, 0, 7) 20 63 6c 73 73 65 71 3b 0d 20 20 62 65 67 69 6e 0d 20 20 20 20 40 34 31 0d 20 20 65 6e 64 20 28 ┆ clsseq; begin @41 end (┆
0x012500…012700 (5, 0, 8) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 62 65 67 69 6e 0d 20 20 20 20 20 20 20 20 20 20 20 20 ┆ begin ┆
0x012700…012900 (5, 0, 9) 20 20 20 20 62 65 67 69 6e 0d 20 20 20 20 20 20 77 72 69 74 65 6c 6e 3b 20 77 72 69 74 65 28 27 ┆ begin writeln; write('┆
0x012900…012b00 (5, 0, 10) 6f 63 6b 73 3a 3d 30 3b 0d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 78 70 ┆ocks:=0; ixp┆
0x012b00…012d00 (5, 0, 11) 72 69 74 65 20 28 27 66 69 6c 65 6f 70 65 6e 27 29 3b 0d 20 20 20 20 20 20 20 20 66 69 6c 65 63 ┆rite ('fileopen'); filec┆
0x012d00…012f00 (5, 0, 12) 20 20 20 20 20 20 20 20 20 20 20 20 65 6e 64 0d 20 20 20 20 20 20 20 20 20 20 20 20 65 6c 73 65 ┆ end else┆
0x012f00…013100 (5, 0, 13) 20 20 62 65 67 69 6e 0d 20 20 20 20 69 66 20 73 79 73 69 6e 69 74 20 74 68 65 6e 0d 20 20 20 20 ┆ begin if sysinit then ┆
0x013100…013300 (5, 0, 14) 31 20 74 68 65 6e 0d 20 20 20 20 20 20 20 20 62 65 67 69 6e 0d 20 20 20 20 20 20 20 20 20 20 61 ┆1 then begin a┆
0x013300…013500 (5, 0, 15) 65 29 0d 20 20 65 6e 64 20 28 2a 74 72 61 70 6f 66 66 69 73 71 2a 29 3b 0d 70 72 6f 63 65 64 75 ┆e) end (*trapoffisq*); procedu┆
0x013500…013700 (5, 1, 1) 20 20 20 20 20 20 20 20 65 6c 73 65 0d 20 20 20 20 20 20 20 20 20 20 62 6c 61 6e 6b 65 6e 74 72 ┆ else blankentr┆
0x013700…013900 (5, 1, 2) 20 20 20 20 20 20 20 20 67 65 74 28 73 79 73 66 69 6c 29 0d 20 20 20 20 20 20 65 6e 64 20 3b 0d ┆ get(sysfil) end ; ┆
0x013900…013b00 (5, 1, 3) 20 62 65 67 69 6e 0d 20 20 20 20 20 20 20 20 20 20 62 65 66 6f 72 65 3a 3d 64 6f 74 72 61 70 3b ┆ begin before:=dotrap;┆
0x013b00…013d00 (5, 1, 4) 6f 74 66 6f 75 6e 64 0d 20 20 20 20 65 6e 64 0d 20 20 20 20 65 6c 73 65 0d 20 20 20 20 20 20 69 ┆otfound end else i┆
0x013d00…013f00 (5, 1, 5) 20 20 20 20 20 20 20 20 20 20 20 20 65 72 72 6f 72 28 69 6f 65 72 72 6f 72 29 0d 20 20 20 20 20 ┆ error(ioerror) ┆
0x013f00…014100 (5, 1, 6) 20 20 20 20 20 20 20 20 20 20 73 65 65 6b 62 6c 6f 63 6b 28 62 6c 6f 63 6b 70 72 74 29 3b 0d 20 ┆ seekblock(blockprt); ┆
0x014100…014300 (5, 1, 7) 74 72 61 70 3b 20 64 6f 74 72 61 70 3a 3d 66 61 6c 73 65 3b 0d 20 20 20 20 20 20 20 20 20 20 69 ┆trap; dotrap:=false; i┆
0x014300…014500 (5, 1, 8) 20 20 69 73 71 3a 3d 69 73 71 6e 61 6d 65 3b 0d 20 20 20 20 77 69 74 68 20 73 69 74 75 5b 69 73 ┆ isq:=isqname; with situÆis┆
0x014500…014700 (5, 1, 9) 20 20 20 20 20 20 20 20 20 20 64 6f 74 72 61 70 3a 3d 62 65 66 6f 72 65 3b 0d 20 20 20 20 20 20 ┆ dotrap:=before; ┆
0x014700…014900 (5, 1, 10) 20 20 65 6e 64 20 28 2a 63 6c 6f 73 65 69 73 71 2a 29 3b 0d 70 72 6f 63 65 64 75 72 65 20 63 6c ┆ end (*closeisq*); procedure cl┆
0x014900…014b00 (5, 1, 11) 69 6e 0d 20 20 20 20 20 20 20 20 20 62 65 66 6f 72 65 3a 3d 64 6f 74 72 61 70 3b 20 64 6f 74 72 ┆in before:=dotrap; dotr┆
0x014b00…014d00 (5, 1, 12) 20 20 20 20 64 6f 74 72 61 70 3a 3d 62 65 66 6f 72 65 3b 0d 20 20 20 20 20 20 73 79 73 69 6e 69 ┆ dotrap:=before; sysini┆
0x014d00…014f00 (5, 1, 13) 20 20 20 20 20 20 20 20 20 20 20 20 20 70 75 74 72 65 63 0d 20 20 20 20 20 20 20 20 20 20 20 65 ┆ putrec e┆
0x014f00…015100 (5, 1, 14) 20 20 20 20 20 20 62 65 67 69 6e 0d 20 20 20 20 20 20 20 20 69 66 20 61 6e 74 61 6c 72 65 63 73 ┆ begin if antalrecs┆
0x015100…015300 (5, 1, 15) 20 69 66 20 73 74 61 74 75 73 3c 3e 61 66 74 65 72 6f 70 65 6e 20 74 68 65 6e 0d 20 20 20 20 20 ┆ if status<>afteropen then ┆
0x015300…015500 (6, 0, 1) 20 20 20 20 20 20 20 20 65 6c 73 65 0d 20 20 20 20 20 20 20 20 62 65 67 69 6e 0d 20 20 20 20 20 ┆ else begin ┆
0x015500…015700 (6, 0, 2) 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 ┆ ┆
0x015700…015900 (6, 0, 3) 6c 73 65 0d 20 20 20 20 20 20 20 20 20 20 20 20 65 72 72 6f 72 20 28 66 69 6c 65 65 6d 74 79 29 ┆lse error (fileemty)┆
0x015900…015b00 (6, 0, 4) 28 2a 24 53 2b 2a 29 0d 55 4e 49 54 20 40 75 3b 0d 0d 49 4e 54 45 52 46 41 43 45 0d 20 20 74 79 ┆(*$S+*) UNIT @u; INTERFACE ty┆
0x015b00…015d00 (6, 0, 5) 20 20 20 20 20 20 20 20 65 6c 73 65 0d 20 20 20 20 20 20 20 20 20 20 65 72 72 6f 72 20 28 6e 6f ┆ else error (no┆
0x015d00…015f00 (6, 0, 6) 20 72 65 63 6f 72 64 20 6c 2c 72 20 3a 20 69 6e 74 65 67 65 72 20 20 65 6e 64 3b 0d 20 20 20 20 ┆ record l,r : integer end; ┆
0x015f00…016100 (6, 0, 7) 3a 69 6e 74 65 67 65 72 3b 0d 20 20 20 20 73 70 61 63 65 3a 62 6f 6f 6c 65 61 6e 3b 0d 20 20 62 ┆:integer; space:boolean; b┆
0x016100…016300 (6, 0, 8) 20 20 20 20 20 20 48 45 41 50 20 20 20 20 3a 5e 69 6e 74 65 67 65 72 3b 0d 20 20 20 20 20 20 66 ┆ HEAP :^integer; f┆
0x016300…016500 (6, 0, 9) 20 20 20 20 20 20 20 20 20 20 65 6e 64 0d 20 20 20 20 20 20 20 20 20 20 65 6c 73 65 0d 20 20 20 ┆ end else ┆
0x016500…016700 (6, 0, 10) 28 66 69 31 29 3b 0d 20 20 74 31 3a 3d 31 3b 20 74 32 3a 3d 31 3b 0d 20 20 77 68 69 6c 65 20 28 ┆(fi1); t1:=1; t2:=1; while (┆
0x016700…016900 (6, 0, 11) 62 6c 61 6e 6b 65 6e 74 72 79 29 3b 0d 20 20 20 20 20 20 20 20 20 20 20 20 67 65 74 72 65 63 3b ┆blankentry); getrec;┆
0x016900…016b00 (6, 0, 12) 20 20 20 20 69 66 20 74 31 3c 3d 61 6e 74 31 20 74 68 65 6e 20 67 65 74 28 66 69 31 29 3b 0d 20 ┆ if t1<=ant1 then get(fi1); ┆
0x016b00…016d00 (6, 0, 13) 20 20 20 20 20 20 65 6c 73 65 0d 20 20 20 20 20 20 20 20 69 66 20 73 79 73 69 6e 69 74 20 74 68 ┆ else if sysinit th┆
0x016d00…016f00 (6, 0, 14) 20 6d 61 72 6b 28 48 45 41 50 29 3b 0d 20 20 6e 65 77 28 69 72 65 63 29 3b 0d 20 20 52 45 43 41 ┆ mark(HEAP); new(irec); RECA┆
0x016f00…017100 (6, 0, 15) 20 20 20 20 62 6c 61 6e 6b 65 6e 74 72 79 3a 3d 72 65 63 70 72 74 3b 0d 20 20 20 20 20 20 20 70 ┆ blankentry:=recprt; p┆
0x017100…017300 (6, 1, 1) 62 65 67 69 6e 0d 20 20 28 2a 24 52 2d 2a 29 0d 20 20 73 65 65 6b 28 69 6e 66 2c 66 72 61 29 3b ┆begin (*$R-*) seek(inf,fra);┆
0x017300…017500 (6, 1, 2) 20 20 20 20 20 20 20 20 20 70 75 74 62 6c 6f 63 6b 0d 20 20 20 20 20 20 20 65 6e 64 0d 20 20 20 ┆ putblock end ┆
0x017500…017700 (6, 1, 3) 20 20 20 20 63 75 72 72 65 6e 74 3a 3d 63 75 72 72 65 6e 74 2b 31 3b 0d 20 20 20 20 65 6e 64 3b ┆ current:=current+1; end;┆
0x017700…017900 (6, 1, 4) 20 20 65 72 72 6f 72 28 66 69 6c 65 65 6d 74 79 29 0d 20 20 20 20 20 20 20 65 6c 73 65 0d 20 20 ┆ error(fileemty) else ┆
0x017900…017b00 (6, 1, 5) 20 20 20 20 20 20 20 20 77 68 69 6c 65 20 6d 69 6e 64 72 65 65 6e 64 28 78 2c 61 5e 5b 6a 5d 29 ┆ while mindreend(x,a^ÆjÅ)┆
0x017b00…017d00 (6, 1, 6) 20 20 20 20 20 20 20 20 20 20 69 73 71 72 65 73 3a 3d 6f 6b 0d 20 20 20 20 20 20 20 20 65 6e 64 ┆ isqres:=ok end┆
0x017d00…017f00 (6, 1, 7) 20 20 20 20 20 20 65 6e 64 3b 0d 20 20 20 20 20 75 6e 74 69 6c 20 6c 3e 3d 72 3b 0d 20 20 20 75 ┆ end; until l>=r; u┆
0x017f00…018100 (6, 1, 8) 20 20 20 20 20 20 20 20 20 20 69 78 70 72 74 3a 3d 31 0d 20 20 20 20 20 20 20 20 20 20 65 6e 64 ┆ ixprt:=1 end┆
0x018100…018300 (6, 1, 9) 20 20 69 66 20 69 6f 72 65 73 75 6c 74 3c 3e 30 20 74 68 65 6e 20 65 78 69 74 28 40 71 29 3b 0d ┆ if ioresult<>0 then exit(@q); ┆
0x018300…018500 (6, 1, 10) 20 20 20 20 65 6e 64 20 28 2a 77 69 74 68 2a 29 0d 20 20 65 6e 64 20 28 2a 72 65 70 6c 61 63 65 ┆ end (*with*) end (*replace┆
0x018500…018700 (6, 1, 11) 63 3b 6e 6f 6f 66 72 65 63 73 3a 69 6e 74 65 67 65 72 29 3a 69 6e 74 65 67 65 72 3b 0d 74 79 70 ┆c;noofrecs:integer):integer; typ┆
0x018700…018900 (6, 1, 12) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 61 6c 66 61 3a 3d 61 6c 66 61 2b 61 6c 66 61 3b ┆ alfa:=alfa+alfa;┆
0x018900…018b00 (6, 1, 13) 10 21 66 75 6e 63 74 69 6f 6e 20 6f 70 65 6e 76 6f 6c 28 76 6f 6c 6e 61 6d 65 3a 73 74 72 69 6e ┆ !function openvol(volname:strin┆
0x018b00…018d00 (6, 1, 14) 01 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 ┆ ┆
0x018d00…018f00 (6, 1, 15) 69 3a 3d 20 31 20 74 6f 20 6c 67 64 20 64 6f 0d 20 20 20 62 65 67 69 6e 0d 20 20 20 20 20 69 66 ┆i:= 1 to lgd do begin if┆
0x018f00…019100 (7, 0, 1) 10 23 20 20 69 66 20 28 6e 6f 6f 66 72 65 63 73 3c 3e 30 29 20 61 6e 64 20 28 6e 6f 6f 66 72 65 ┆ # if (noofrecs<>0) and (noofre┆
0x019100…019300 (7, 0, 2) 10 2a 77 72 69 74 65 28 27 6b 6f 6d 6d 61 6e 64 6f 3f 20 27 29 3b 20 72 65 61 64 28 63 29 3b 20 ┆ *write('kommando? '); read(c); ┆
0x019300…019500 (7, 0, 3) 65 20 66 6c 65 72 65 20 64 6f 0d 10 26 62 65 67 69 6e 0d 10 28 52 65 61 64 49 6e 46 69 6c 65 3b ┆e flere do &begin (ReadInFile;┆
0x019500…019700 (7, 0, 4) 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 ┆ ┆
0x019700…019900 (7, 0, 5) 20 20 20 20 20 63 6c 6f 73 65 28 69 6e 66 2c 6c 6f 63 6b 29 3b 20 63 6c 6f 73 65 28 72 65 73 66 ┆ close(inf,lock); close(resf┆
0x019900…019b00 (7, 0, 6) 00 00 00 00 01 00 08 0a 0a 00 40 07 00 00 00 00 00 00 00 00 0f 00 be 00 11 00 0c 05 16 00 d4 00 ┆ @ ┆
0x019b00…019d00 (7, 0, 7) 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 ┆ ┆
0x019d00…019f00 (7, 0, 8) e1 22 37 00 d1 21 0e 00 19 5e 23 56 eb e9 c8 00 a7 02 c5 02 ed 00 ee 02 2d 04 c1 06 cd 05 f7 00 ┆ "7 ! ^#V - ┆
0x019f00…01a100 (7, 0, 9) 00 00 00 00 01 00 14 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆
0x01a100…01a300 (7, 0, 10) fa 09 02 79 2f 3c 4f 54 5d 1a ce 00 27 77 2b 1b 0c c2 09 02 23 f9 d2 24 02 2b 36 01 f9 3a 45 00 ┆ y/<OTÅ 'w+ # $ +6 :E ┆
0x01a300…01a500 (7, 0, 11) c6 04 da aa 50 b6 02 03 c6 04 00 cd 00 13 9e 00 b6 02 03 cd 00 16 9e 00 d9 00 cb a1 12 b6 02 03 ┆ P ┆
0x01a500…01a700 (7, 0, 12) 00 eb 2a 51 00 3a 53 00 47 d2 20 04 3e 00 ce 99 96 eb 86 eb 27 12 2b 1b 05 c2 0c 04 0c c3 fe 03 ┆ *Q :S G > ' + ┆
0x01a700…01a900 (7, 0, 13) aa 50 00 cc 7e 01 cc 7d ca 7e 93 9e 22 00 c3 84 a1 6c d8 c6 2b c6 7e cf 05 a5 81 c6 ca 7d 01 05 ┆ P ü å ü " l + ü å ┆
0x01a900…01ab00 (7, 0, 14) 47 2a 3d 00 7e 12 13 23 05 c2 04 06 2a 3b 00 eb 21 52 00 06 04 7e 12 2b 1b 05 c2 15 06 1b 3a 47 ┆G*= ü # *; !R ü + :G┆
0x01ab00…01ad00 (7, 0, 15) c6 80 f7 00 cd 00 13 9e 00 b6 02 03 d7 a6 0e 20 20 65 72 20 69 6c 6c 65 67 61 6c 20 20 00 cd 00 ┆ er illegal ┆
0x01ad00…01af00 (7, 1, 1) de 05 dd 05 dc 05 db 05 da 05 d9 05 d7 05 d5 05 d3 05 d0 05 cc 05 cb 05 ca 05 c9 05 c7 05 c6 05 ┆ ┆
0x01af00…01b100 (7, 1, 2) 9e 00 d8 cd 00 16 9e 00 ad 00 10 00 3b 01 06 00 04 00 0a 00 46 01 0a 01 01 cc 03 a9 85 52 da 95 ┆ ; F R ┆
0x01b100…01b300 (7, 1, 3) 00 0a 00 00 02 00 01 01 da 05 d9 05 d7 05 d5 05 d3 05 d0 05 cc 05 cb 05 ca 05 c9 05 c7 05 c6 05 ┆ ┆
0x01b300…01b500 (7, 1, 4) cd 00 13 9e 00 d8 a5 80 f9 de 01 05 88 01 95 a4 29 00 cd 00 13 9e 00 d8 d7 a6 07 3a 3d 69 6e 66 ┆ ) :=inf┆
0x01b500…01b700 (7, 1, 5) 44 45 43 4f 50 53 20 20 0b 00 01 00 00 00 00 00 44 45 43 4f 50 53 20 20 06 00 01 00 00 00 00 00 ┆DECOPS DECOPS ┆
[…truncated at 200 lines…]