QUIKWORD
FILE INFORMATION
FILENAME(S): QUIKWORD
FILE TYPE(S): PRG
FILE SIZE: 13.8K
FIRST SEEN: 2025-11-30 16:10:30
APPEARS ON: 2 disk(s)
FILE HASH
c9bee6cd5bd09cfadb01a415a765c00c8c5aab7c4e28a59439eb84103b84a8f6
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| CDU DECEMBER 89 | QUIKWORD | PRG | BrainSkull, Sammlung, UK CD | 7 | 1 | DOWNLOAD FILE |
| CDU DECEMBER 89 | QUIKWORD | PRG | Xii | 7 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0A 08 0A 00 89 20 32 30 00 14 08 14 00 4C |....... 20.....L|
00000010: B2 4C AA 31 00 30 08 32 00 8B 20 4C B2 31 20 A7 |.L.1.0.2.. L.1 .|
00000020: 20 93 20 22 54 4F 50 2E 45 58 45 22 2C 38 2C 31 | . "TOP.EXE",8,1|
00000030: 00 40 08 3C 00 97 20 32 30 34 39 AA 36 2C 35 34 |.@.<.. 2049.6,54|
00000040: 00 66 08 64 00 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D |.f.d.. ---------|
00000050: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000060: 2D 2D 2D 2D 2D 2D 00 87 08 65 00 8F 20 51 55 49 |------...e.. QUI|
00000070: 4B 57 4F 52 44 20 42 41 53 49 43 20 45 4E 56 49 |KWORD BASIC ENVI|
00000080: 52 4F 4E 4D 45 4E 54 00 A8 08 66 00 8F 20 45 58 |RONMENT...f.. EX|
00000090: 50 41 4E 44 41 42 4C 45 20 57 4F 52 44 20 50 52 |PANDABLE WORD PR|
000000A0: 4F 43 45 53 53 4F 52 2E 00 C8 08 67 00 8F 20 28 |OCESSOR....g.. (|
000000B0: 43 29 20 31 39 38 39 20 41 52 47 55 53 20 53 50 |C) 1989 ARGUS SP|
000000C0: 45 43 49 41 4C 49 53 54 00 E9 08 68 00 8F 20 50 |ECIALIST...h.. P|
000000D0: 55 42 4C 49 43 41 54 49 4F 4E 53 20 49 4E 43 4C |UBLICATIONS INCL|
000000E0: 55 44 49 4E 47 20 52 41 4D 00 07 09 69 00 8F 20 |UDING RAM...i.. |
000000F0: 42 41 53 49 43 20 49 4E 54 45 52 50 52 45 54 45 |BASIC INTERPRETE|
00000100: 52 20 26 20 4E 45 57 00 21 09 6A 00 8F 20 45 58 |R & NEW.!.j.. EX|
00000110: 54 45 4E 53 49 4F 4E 20 4B 45 59 57 4F 52 44 53 |TENSION KEYWORDS|
00000120: 2E 00 47 09 6B 00 8F 20 2D 2D 2D 2D 2D 2D 2D 2D |..G.k.. --------|
00000130: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000140: 2D 2D 2D 2D 2D 2D 2D 00 5E 09 6E 00 97 20 36 35 |-------.^.n.. 65|
00000150: 30 2C 32 35 35 20 3A 20 97 20 31 2C 35 34 00 8E |0,255 : . 1,54..|
00000160: 09 78 00 97 20 35 30 35 39 32 2C 32 33 34 20 3A |.x.. 50592,234 :|
00000170: 20 8F 20 43 4F 52 52 45 43 54 20 4C 49 4E 45 2E | . CORRECT LINE.|
00000180: 49 4E 50 55 54 23 20 52 4F 55 54 49 4E 45 00 AD |INPUT# ROUTINE..|
00000190: 09 7D 00 97 20 35 30 34 37 37 2C 33 20 3A 20 8F |.}.. 50477,3 : .|
000001A0: 20 43 4F 52 52 20 54 4F 20 4C 49 4E 45 00 D7 09 | CORR TO LINE...|
000001B0: 82 00 CF 20 35 31 2C 32 34 35 37 33 20 3A 20 CF |... 51,24573 : .|
000001C0: 20 35 35 2C 32 34 35 37 33 20 3A 20 97 20 32 34 | 55,24573 : . 24|
000001D0: 35 37 34 2C 31 34 31 00 F3 09 8C 00 CF 20 37 38 |574,141...... 78|
000001E0: 35 2C 35 31 30 38 34 20 3A 20 8F 20 55 53 52 20 |5,51084 : . USR |
000001F0: 4A 4D 50 00 F9 09 91 00 3A 00 1F 0A 96 00 8F 20 |JMP.....:...... |
00000200: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000210: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 |---------------.|
00000220: 3A 0A A0 00 8F 20 44 45 46 49 4E 45 20 54 45 58 |:.... DEFINE TEX|
00000230: 54 20 50 4F 49 4E 54 45 52 53 00 60 0A AA 00 8F |T POINTERS.`....|
00000240: 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D | ---------------|
00000250: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000260: 00 7C 0A B4 00 54 53 20 B2 20 32 34 35 37 35 20 |.|...TS . 24575 |
00000270: 3A 20 54 45 20 B2 20 34 30 39 35 39 00 C5 0A BE |: TE . 40959....|
00000280: 00 53 50 54 52 20 B2 20 35 31 30 37 33 20 3A 20 |.SPTR . 51073 : |
00000290: 45 4F 46 20 B2 20 35 31 30 37 35 20 3A 20 49 4E |EOF . 51075 : IN|
000002A0: 53 20 B2 20 35 31 30 37 37 20 3A 20 48 4D 45 20 |S . 51077 : HME |
000002B0: B2 20 35 31 30 37 39 20 3A 20 43 53 52 20 B2 20 |. 51079 : CSR . |
000002C0: 35 31 30 38 31 00 DB 0A C0 00 42 53 20 B2 20 54 |51081.....BS . T|
000002D0: 53 20 3A 20 42 45 20 B2 20 54 53 00 02 0B C2 00 |S : BE . TS.....|
000002E0: 43 24 20 B2 20 22 22 20 3A 20 43 20 B2 20 30 20 |C$ . "" : C . 0 |
000002F0: 3A 20 4E 20 B2 20 30 20 3A 20 49 4E 24 20 B2 20 |: N . 0 : IN$ . |
00000300: 22 22 00 22 0B C4 00 48 28 30 29 B2 54 53 20 3A |""."...H(0).TS :|
00000310: 20 49 53 20 B2 20 54 45 20 3A 20 53 53 20 B2 20 | IS . TE : SS . |
00000320: 31 35 00 38 0B C5 00 44 45 56 20 B2 20 38 20 3A |15.8...DEV . 8 :|
00000330: 20 46 24 20 B2 20 22 22 00 3E 0B C6 00 3A 00 64 | F$ . "".>...:.d|
00000340: 0B C8 00 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.... -----------|
00000350: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000360: 2D 2D 2D 2D 00 7D 0B D2 00 8F 20 44 45 46 49 4E |----.}.... DEFIN|
00000370: 45 20 43 44 41 20 53 54 52 49 4E 47 53 00 A3 0B |E CDA STRINGS...|
00000380: DC 00 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |... ------------|
00000390: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000003A0: 2D 2D 2D 00 D7 0B E6 00 43 30 24 B2 22 9E C0 C0 |---.....C0$."...|
000003B0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000003C0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000003D0: C0 C0 C0 C0 C0 C0 22 00 0B 0C F0 00 43 31 24 B2 |......".....C1$.|
000003E0: 22 9E 43 4F 4D 4D 41 4E 44 20 20 20 20 20 20 20 |".COMMAND |
000003F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000400: 20 20 20 20 20 20 20 20 20 20 22 00 3F 0C FA 00 | ".?...|
00000410: 43 32 24 B2 22 9E 20 20 20 20 20 20 20 20 20 20 |C2$.". |
00000420: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000430: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 00 | ".|
00000440: 73 0C 04 01 43 33 24 B2 22 9E 43 53 52 20 20 20 |s...C3$.".CSR |
00000450: 20 20 20 20 45 4F 46 20 20 20 20 20 20 20 49 4E | EOF IN|
00000460: 53 20 20 20 20 20 20 20 48 4D 45 20 20 20 20 20 |S HME |
00000470: 20 20 22 00 85 0C 0E 01 43 34 24 B2 22 43 41 4E | ".....C4$."CAN|
00000480: 27 54 2C 20 22 00 AB 0C 18 01 43 35 24 B2 22 4E |'T, ".....C5$."N|
00000490: 4F 20 42 4C 4F 43 4B 22 20 3A 20 43 36 24 B2 22 |O BLOCK" : C6$."|
000004A0: 53 54 41 43 4B 20 46 55 4C 4C 22 00 D6 0C 1A 01 |STACK FULL".....|
000004B0: 43 37 24 B2 22 53 41 56 45 20 41 53 20 22 20 3A |C7$."SAVE AS " :|
000004C0: 20 43 38 24 B2 22 44 55 4D 50 20 53 43 52 45 45 | C8$."DUMP SCREE|
000004D0: 4E 20 41 53 20 22 00 F4 0C 1B 01 43 46 24 B2 22 |N AS ".....CF$."|
000004E0: 9E 4C 2F 41 2F 53 2F 44 2F 45 2F 56 2F 43 2F 4E |.L/A/S/D/E/V/C/N|
000004F0: 2F 4F 3F 22 00 0C 0D 1C 01 43 42 24 B2 22 9E 53 |/O?".....CB$.".S|
00000500: 2F 45 2F 43 2F 4D 2F 44 2F 46 3F 22 00 2C 0D 1D |/E/C/M/D/F?".,..|
00000510: 01 43 54 24 B2 22 9E 54 2F 57 2F 43 2F 53 2F 45 |.CT$.".T/W/C/S/E|
00000520: 2F 46 2F 52 2F 4E 2F 50 2F 4C 3F 22 00 52 0D 22 |/F/R/N/P/L?".R."|
00000530: 01 97 20 35 31 31 30 38 2C 31 33 34 20 3A 20 8F |.. 51108,134 : .|
00000540: 20 55 53 52 31 20 4D 41 54 43 48 45 53 20 5B 46 | USR1 MATCHES [F|
00000550: 32 5D 00 58 0D 27 01 3A 00 7E 0D 2C 01 8F 20 2D |2].X.'.:.~.,.. -|
00000560: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000570: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 9F |--------------..|
00000580: 0D 36 01 8F 20 49 4E 49 54 49 41 4C 49 53 45 20 |.6.. INITIALISE |
00000590: 42 55 46 46 45 52 20 26 20 53 43 52 45 45 4E 00 |BUFFER & SCREEN.|
000005A0: C5 0D 40 01 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |..@.. ----------|
000005B0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000005C0: 2D 2D 2D 2D 2D 00 E7 0D 4A 01 8B 20 CC 28 45 4F |-----...J.. .(EO|
000005D0: 46 29 B2 30 20 A7 3A DB 20 54 53 2C 28 54 45 AB |F).0 .:. TS,(TE.|
000005E0: 54 53 29 2C 31 34 31 00 1E 0E 54 01 CF 20 35 33 |TS),141...T.. 53|
000005F0: 32 38 30 2C 32 33 31 33 20 3A 20 DB 20 35 35 32 |280,2313 : . 552|
00000600: 39 36 2C 31 32 30 2C 37 20 3A 20 DB 20 28 35 35 |96,120,7 : . (55|
00000610: 32 39 36 AA 31 32 30 29 2C 38 38 30 2C 31 00 2A |296.120),880,1.*|
00000620: 0E 5E 01 CF 20 43 53 52 2C 30 00 62 0E 68 01 CF |.^.. CSR,0.b.h..|
00000630: 20 53 50 54 52 2C 54 53 20 3A 20 CF 20 32 35 31 | SPTR,TS : . 251|
00000640: 2C 54 53 20 3A 20 CF 20 32 35 33 2C 54 53 20 3A |,TS : . 253,TS :|
00000650: 20 CF 20 49 4E 53 2C 30 20 3A 20 CF 20 48 4D 45 | . INS,0 : . HME|
00000660: 2C 30 00 94 0E 72 01 8B 20 C2 28 35 31 30 38 33 |,0...r.. .(51083|
00000670: 29 B2 30 20 A7 20 46 49 4C 45 24 B2 22 49 4E 54 |).0 . FILE$."INT|
00000680: 52 4F 22 20 3A 20 8D 20 32 37 35 30 20 3A 20 8D |RO" : . 2750 : .|
00000690: 20 37 30 30 00 9A 0E 7C 01 3A 00 C0 0E 90 01 8F | 700...|.:......|
000006A0: 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A | ***************|
000006B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000006C0: 00 DE 0E 9A 01 8F 20 4D 41 49 4E 20 53 59 53 20 |...... MAIN SYS |
000006D0: 43 4F 4D 4D 41 4E 44 20 4D 4F 44 55 4C 45 00 04 |COMMAND MODULE..|
000006E0: 0F A4 01 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.... ***********|
000006F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000700: 2A 2A 2A 2A 00 21 0F AE 01 43 43 24 B2 22 9E 46 |****.!...CC$.".F|
00000710: 2F 53 2F 48 2F 55 2F 44 2F 52 2F 49 2F 42 3F 05 |/S/H/U/D/R/I/B?.|
00000720: 22 00 2E 0F B8 01 99 20 C7 28 31 34 29 3B 00 5C |"...... .(14);.\|
00000730: 0F C2 01 99 20 22 13 22 3B 20 43 32 24 3B 20 43 |.... "."; C2$; C|
00000740: 33 24 3B 20 43 30 24 3B 20 3A 20 D5 20 30 2C 32 |3$; C0$; : . 0,2|
00000750: 33 20 3A 20 99 20 46 49 4C 45 24 3B 00 62 0F CC |3 : . FILE$;.b..|
00000760: 01 3A 00 6E 0F D6 01 9E 20 35 31 32 35 33 00 7B |.:.n.... 51253.{|
00000770: 0F E0 01 43 20 B2 20 B7 28 58 29 00 81 0F EA 01 |...C . .(X).....|
00000780: 3A 00 95 0F F4 01 8B 20 43 20 B2 20 31 33 33 20 |:...... C . 133 |
00000790: A7 20 36 31 30 00 A5 0F FE 01 8B 20 43 20 B2 20 |. 610...... C . |
000007A0: 33 20 A7 20 80 00 BC 0F 08 02 8B 20 43 20 B2 20 |3 . ....... C . |
000007B0: 31 34 38 20 A7 20 8D 20 33 37 30 30 00 D2 0F 0D |148 . . 3700....|
000007C0: 02 8B 20 43 20 B2 20 32 30 20 A7 20 8D 20 33 38 |.. C . 20 . . 38|
000007D0: 30 30 00 E8 0F 12 02 8B 20 43 20 B2 20 31 39 20 |00...... C . 19 |
000007E0: A7 20 8D 20 33 39 30 30 00 FF 0F 1C 02 8B 20 43 |. . 3900...... C|
000007F0: 20 B2 20 31 33 34 20 A7 20 8D 20 35 36 30 30 00 | . 134 . . 5600.|
00000800: 05 10 4E 02 3A 00 0F 10 58 02 89 20 34 37 30 00 |..N.:...X.. 470.|
00000810: 30 10 62 02 99 20 22 13 22 3B 20 43 31 24 3B 20 |0.b.. "."; C1$; |
00000820: 3A 20 D5 20 30 2C 38 20 3A 20 99 20 43 43 24 3B |: . 0,8 : . CC$;|
00000830: 00 3A 10 6C 02 8D 20 39 30 30 00 4D 10 76 02 81 |.:.l.. 900.M.v..|
00000840: 20 4E B2 31 20 A4 20 C3 28 43 43 24 29 00 67 10 | N.1 . .(CC$).g.|
00000850: 80 02 8B 20 43 24 B2 CA 28 43 43 24 2C 4E 2C 31 |... C$..(CC$,N,1|
00000860: 29 20 A7 20 36 36 30 00 6F 10 8A 02 82 20 4E 00 |) . 660.o.... N.|
00000870: 7A 10 8F 02 8D 20 36 39 35 30 00 BB 10 94 02 91 |z.... 6950......|
00000880: 20 4E 20 8D 20 30 2C 32 36 30 30 2C 30 2C 33 34 | N . 0,2600,0,34|
00000890: 30 30 2C 30 2C 34 30 30 30 2C 30 2C 33 35 30 30 |00,0,4000,0,3500|
000008A0: 2C 30 2C 33 36 30 30 2C 30 2C 37 30 30 2C 30 2C |,0,3600,0,700,0,|
000008B0: 34 31 30 30 2C 30 2C 34 33 30 30 00 C5 10 9E 02 |4100,0,4300.....|
000008C0: 89 20 34 35 30 00 CB 10 A8 02 3A 00 F1 10 BC 02 |. 450.....:.....|
000008D0: 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |. **************|
000008E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000008F0: 2A 00 0F 11 C6 02 8F 20 52 45 46 4F 52 4D 41 54 |*...... REFORMAT|
00000900: 20 46 52 4F 4D 20 54 53 20 54 4F 20 45 4F 46 00 | FROM TS TO EOF.|
00000910: 35 11 D0 02 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |5.... **********|
00000920: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000930: 2A 2A 2A 2A 2A 00 53 11 DA 02 CF 20 35 33 2C 54 |*****.S.... 53,T|
00000940: 53 20 3A 20 CF 20 32 35 31 2C 54 53 AA CC 28 45 |S : . 251,TS..(E|
00000950: 4F 46 29 00 88 11 E4 02 9E 20 35 30 39 38 36 20 |OF)...... 50986 |
00000960: 3A 20 4E 20 B2 20 54 53 AA CC 28 45 4F 46 29 20 |: N . TS..(EOF) |
00000970: 3A 20 DB 20 4E AA 31 2C 20 49 53 AB 4E AB 31 2C |: . N.1, IS.N.1,|
00000980: 20 31 34 31 20 3A 20 8E 00 8E 11 EE 02 3A 00 B4 | 141 : ......:..|
00000990: 11 20 03 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |. .. ***********|
000009A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000009B0: 2A 2A 2A 2A 00 CB 11 2A 03 8F 20 44 55 4D 4D 59 |****...*.. DUMMY|
000009C0: 20 53 55 42 52 4F 55 54 49 4E 45 00 EF 11 34 03 | SUBROUTINE...4.|
000009D0: 8F 20 46 4F 52 20 55 4E 44 45 46 49 4E 45 44 20 |. FOR UNDEFINED |
000009E0: 27 4F 4E 27 20 53 54 41 54 45 4D 45 4E 54 53 00 |'ON' STATEMENTS.|
000009F0: 15 12 3E 03 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..>.. **********|
00000A00: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000A10: 2A 2A 2A 2A 2A 00 1B 12 48 03 8E 00 21 12 52 03 |*****...H...!.R.|
00000A20: 3A 00 47 12 84 03 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |:.G.... ********|
00000A30: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000A40: 2A 2A 2A 2A 2A 2A 2A 00 6C 12 8E 03 8F 20 47 45 |*******.l.... GE|
00000A50: 54 20 4B 45 59 20 43 48 41 52 41 43 54 45 52 2C |T KEY CHARACTER,|
00000A60: 20 41 4E 59 20 50 55 52 50 4F 53 45 00 92 12 98 | ANY PURPOSE....|
00000A70: 03 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.. *************|
00000A80: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000A90: 2A 2A 00 AB 12 A2 03 A1 20 43 24 20 3A 20 8B 20 |**...... C$ : . |
00000AA0: 43 24 B2 22 22 20 A7 20 39 33 30 00 BD 12 AC 03 |C$."" . 930.....|
00000AB0: 43 20 B2 20 C6 28 43 24 29 20 3A 20 8E 00 C3 12 |C . .(C$) : ....|
00000AC0: B6 03 3A 00 E8 12 E8 03 8F 20 2A 2A 2A 2A 2A 2A |..:...... ******|
00000AD0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000AE0: 2A 2A 2A 2A 2A 2A 2A 2A 00 0B 13 F2 03 8F 20 47 |********...... G|
00000AF0: 45 54 20 26 20 44 49 53 50 4C 41 59 20 44 49 53 |ET & DISPLAY DIS|
00000B00: 4B 20 44 49 52 45 43 54 4F 52 59 00 23 13 FC 03 |K DIRECTORY.#...|
00000B10: 8F 20 20 20 20 20 20 20 20 20 20 20 20 4D 4F 44 |. MOD|
00000B20: 55 4C 45 00 48 13 06 04 8F 20 2A 2A 2A 2A 2A 2A |ULE.H.... ******|
00000B30: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000B40: 2A 2A 2A 2A 2A 2A 2A 2A 00 76 13 10 04 99 22 93 |********.v....".|
00000B50: 9E 22 3B 3A 97 37 38 35 2C 39 33 3A 97 37 38 36 |.";:.785,93:.786|
00000B60: 2C 32 30 37 3A 8F 20 53 45 54 2D 55 50 20 55 53 |,207:. SET-UP US|
00000B70: 52 20 4A 55 4D 50 00 91 13 1A 04 9F 20 31 35 2C |R JUMP...... 15,|
00000B80: 44 45 56 2C 31 35 2C 22 22 3A 98 31 35 2C 22 49 |DEV,15,"":.15,"I|
00000B90: 22 00 A5 13 1F 04 9F 33 2C 44 45 56 2C 30 2C 22 |"......3,DEV,0,"|
00000BA0: 24 2A 3D 53 22 00 BF 13 24 04 A1 23 33 2C 58 24 |$*=S"...$..#3,X$|
00000BB0: 20 3A 20 A1 23 33 2C 58 24 20 3A 20 41 B2 31 00 | : .#3,X$ : A.1.|
00000BC0: D3 13 2E 04 97 37 38 31 2C 33 3A 9E 35 33 31 32 |.....781,3:.5312|
00000BD0: 35 3A 99 00 03 14 33 04 99 22 2D 2D 2D 2D 2D 2D |5:....3.."------|
00000BE0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000BF0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000C00: 2D 05 22 00 17 14 38 04 8D 20 32 30 30 30 20 3A |-."...8.. 2000 :|
00000C10: 20 8D 20 32 32 30 30 00 2C 14 3D 04 8B 20 4B 24 | . 2200.,.=.. K$|
00000C20: B3 B1 22 58 22 20 A7 20 31 30 39 30 00 32 14 3E |.."X" . 1090.2.>|
00000C30: 04 D7 00 3D 14 3F 04 89 20 31 31 32 30 00 51 14 |...=.?.. 1120.Q.|
00000C40: 42 04 8B 4B 24 B3 B1 22 4D 22 20 A7 20 31 31 32 |B..K$.."M" . 112|
00000C50: 30 00 62 14 4C 04 99 22 13 22 3B 3A 8D 20 32 35 |0.b.L..".";:. 25|
00000C60: 34 30 00 7B 14 56 04 99 22 93 9E 22 3B 46 49 4C |40.{.V.."..";FIL|
00000C70: 45 24 20 3A 20 89 20 31 30 37 35 00 8E 14 60 04 |E$ : . 1075...`.|
00000C80: A0 20 33 3A D3 2E 84 31 35 2C 45 52 52 24 00 A0 |. 3:...15,ERR$..|
00000C90: 14 62 04 98 31 35 2C 22 55 39 22 3A A0 20 31 35 |.b..15,"U9":. 15|
00000CA0: 00 B7 14 65 04 8B 20 4B 24 B3 B1 22 58 22 20 A7 |...e.. K$.."X" .|
00000CB0: 20 8D 20 32 35 30 30 00 BD 14 6A 04 8E 00 C3 14 | . 2500...j.....|
00000CC0: 74 04 3A 00 E8 14 D0 07 8F 20 2A 2A 2A 2A 2A 2A |t.:...... ******|
00000CD0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000CE0: 2A 2A 2A 2A 2A 2A 2A 2A 00 05 15 DA 07 8F 20 47 |********...... G|
00000CF0: 45 54 20 49 4E 20 44 49 52 45 43 54 4F 52 59 20 |ET IN DIRECTORY |
00000D00: 4E 41 4D 45 53 00 2A 15 E4 07 8F 20 2A 2A 2A 2A |NAMES.*.... ****|
00000D10: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000D20: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 49 15 EE 07 97 |**********.I....|
00000D30: 37 38 31 2C 33 3A 8F 20 58 20 52 45 47 2E 20 3D |781,3:. X REG. =|
00000D40: 20 43 48 4E 4C 20 4E 4F 2E 00 64 15 F8 07 9E 35 | CHNL NO..d....5|
00000D50: 33 31 32 35 20 3A 20 8F 20 43 41 4C 4C 20 47 45 |3125 : . CALL GE|
00000D60: 54 44 49 52 00 7D 15 02 08 8B 20 41 B2 30 20 A7 |TDIR.}.... A.0 .|
00000D70: 20 41 B2 31 3A 99 3A 89 20 32 30 37 30 00 8E 15 | A.1:.:. 2070...|
00000D80: 0C 08 41 B2 30 3A 99 A3 32 30 29 22 22 3B 00 A9 |..A.0:..20)"";..|
00000D90: 15 16 08 8B 20 53 54 B3 B1 30 20 A7 20 32 31 30 |.... ST..0 . 210|
00000DA0: 30 20 3A 20 8F 20 45 4F 46 00 C1 15 20 08 A1 4B |0 : . EOF... ..K|
00000DB0: 24 3A 8B 20 4B 24 B2 22 53 22 20 A7 20 32 31 30 |$:. K$."S" . 210|
00000DC0: 30 00 D8 15 25 08 54 B2 54 AA 41 3A 8B 54 B1 B2 |0...%.T.T.A:.T..|
00000DD0: 32 32 A7 54 B2 30 3A 8E 00 F4 15 2A 08 89 20 32 |22.T.0:....*.. 2|
00000DE0: 30 34 30 20 3A 20 8F 20 44 4F 20 4E 45 58 54 20 |040 : . DO NEXT |
00000DF0: 4C 49 4E 45 00 FA 15 34 08 8E 00 00 16 3E 08 3A |LINE...4.....>.:|
00000E00: 00 25 16 98 08 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A |.%.... *********|
00000E10: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000E20: 2A 2A 2A 2A 2A 00 39 16 A2 08 8F 20 44 4F 20 48 |*****.9.... DO H|
00000E30: 49 47 48 4C 49 47 48 54 53 00 5E 16 AC 08 8F 20 |IGHLIGHTS.^.... |
00000E40: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000E50: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 80 |**************..|
00000E60: 16 B6 08 53 4B B2 31 31 30 34 3A 53 43 B2 53 4B |...SK.1104:SC.SK|
00000E70: 3A 54 56 B2 30 3A 54 42 B2 30 3A 4B 24 B2 22 22 |:TV.0:TB.0:K$.""|
00000E80: 00 A1 16 C0 08 9E 36 35 34 38 34 20 3A 20 8F 20 |......65484 : . |
00000E90: 52 45 53 45 54 20 44 45 46 41 55 4C 54 20 49 2F |RESET DEFAULT I/|
00000EA0: 4F 00 BB 16 CA 08 8D 20 32 34 30 30 3A 20 8F 20 |O...... 2400: . |
00000EB0: 43 41 4C 4C 20 49 4E 56 45 52 54 00 D5 16 D4 08 |CALL INVERT.....|
00000EC0: 8B 58 B2 33 32 AF 54 56 B1 30 A7 54 56 B2 30 3A |.X.32.TV.0.TV.0:|
00000ED0: 89 32 33 33 30 00 E9 16 DE 08 A1 4B 24 3A 8B 4B |.2330......K$:.K|
00000EE0: 24 B2 22 22 A7 32 32 37 30 00 FA 16 E3 08 8B 20 |$."".2270...... |
00000EF0: 4B 24 B2 22 58 22 20 A7 20 8E 00 20 17 E8 08 8B |K$."X" . .. ....|
00000F00: 28 4B 24 B2 22 1D 22 B0 4B 24 B2 22 9D 22 29 AF |(K$.".".K$.".").|
00000F10: 54 42 B2 30 A7 54 42 B2 32 30 3A 89 32 33 33 30 |TB.0.TB.20:.2330|
00000F20: 00 40 17 F2 08 8B 28 4B 24 B2 22 1D 22 B0 4B 24 |.@....(K$.".".K$|
00000F30: B2 22 9D 22 29 AF 54 42 B2 32 30 A7 54 42 B2 30 |.".").TB.20.TB.0|
00000F40: 00 62 17 FC 08 8B 4B 24 B2 22 11 22 A7 54 56 B2 |.b....K$.".".TV.|
00000F50: 54 56 AA 34 30 3A 8B 54 56 B1 38 38 30 A7 54 56 |TV.40:.TV.880.TV|
00000F60: B2 30 00 84 17 06 09 8B 4B 24 B2 22 91 22 A7 54 |.0......K$.".".T|
00000F70: 56 B2 54 56 AB 34 30 3A 8B 54 56 B3 30 A7 54 56 |V.TV.40:.TV.0.TV|
00000F80: B2 38 38 30 00 9D 17 10 09 8B 4B 24 B2 C7 28 31 |.880......K$..(1|
00000F90: 33 29 B0 4B 24 B2 22 4D 22 20 A7 20 8E 00 BA 17 |3).K$."M" . ....|
00000FA0: 1A 09 8D 20 32 34 30 30 3A 53 43 B2 53 4B AA 54 |... 2400:SC.SK.T|
00000FB0: 56 AA 54 42 3A 89 32 32 35 30 00 C0 17 24 09 3A |V.TB:.2250...$.:|
00000FC0: 00 E5 17 60 09 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A |...`.. *********|
00000FD0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000FE0: 2A 2A 2A 2A 2A 00 FC 17 6A 09 8F 20 49 4E 56 45 |*****...j.. INVE|
00000FF0: 52 53 45 20 46 49 4C 45 4E 41 4D 45 00 21 18 74 |RSE FILENAME.!.t|
00001000: 09 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.. *************|
00001010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001020: 2A 00 31 18 7E 09 58 B2 B7 28 53 43 29 20 3A 20 |*.1.~.X..(SC) : |
00001030: 8E 00 37 18 88 09 3A 00 5C 18 C4 09 8F 20 2A 2A |..7...:.\.... **|
00001040: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001050: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 7E 18 CE |************.~..|
00001060: 09 8F 20 45 58 54 52 41 43 54 20 46 49 4C 45 4E |.. EXTRACT FILEN|
00001070: 41 4D 45 20 49 4E 54 4F 20 46 49 4C 45 24 00 A3 |AME INTO FILE$..|
00001080: 18 D8 09 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.... ***********|
00001090: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000010A0: 2A 2A 2A 00 DD 18 E2 09 97 37 38 33 2C 30 3A 97 |***......783,0:.|
000010B0: 37 38 32 2C 54 42 3A 97 37 38 31 2C 28 54 56 AD |782,TB:.781,(TV.|
000010C0: 34 30 29 AA 32 3A 9E 36 35 35 32 30 3A 8F 20 50 |40).2:.65520:. P|
000010D0: 4C 4F 54 20 54 4F 20 53 43 52 45 45 4E 00 01 19 |LOT TO SCREEN...|
000010E0: EC 09 97 36 33 31 2C 31 33 3A 97 31 39 38 2C 31 |...631,13:.198,1|
000010F0: 3A 9F 32 2C 30 3A 84 32 2C 46 49 4C 45 24 3A A0 |:.2,0:.2,FILE$:.|
00001100: 32 00 24 19 F6 09 81 4E B2 31 36 A4 31 A9 AB 31 |2.$....N.16.1..1|
00001110: 3A 8B CA 28 46 49 24 2C 4E 2C 31 29 B2 22 20 22 |:..(FI$,N,1)." "|
00001120: A7 3A 82 4E 00 39 19 00 0A 46 49 4C 45 24 B2 C8 |.:.N.9...FILE$..|
00001130: 28 46 49 4C 45 24 2C 4E 29 00 3F 19 14 0A 8E 00 |(FILE$,N).?.....|
00001140: 45 19 1E 0A 3A 00 6A 19 28 0A 8F 20 2A 2A 2A 2A |E...:.j.(.. ****|
00001150: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001160: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 8A 19 32 0A 8F |**********...2..|
00001170: 20 44 49 53 4B 20 46 49 4C 45 20 48 41 4E 44 4C | DISK FILE HANDL|
00001180: 49 4E 47 20 4D 4F 44 55 4C 45 00 AF 19 3C 0A 8F |ING MODULE...<..|
00001190: 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A | ***************|
000011A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
000011B0: C2 19 4B 0A D5 20 30 2C 30 20 3A 20 99 20 43 32 |..K.. 0,0 : . C2|
000011C0: 24 3B 00 DF 19 50 0A D5 20 30 2C 30 20 3A 20 99 |$;...P.. 0,0 : .|
000011D0: 20 22 9E 46 49 4C 45 20 22 3B 20 43 46 24 3B 00 | ".FILE "; CF$;.|
000011E0: E9 19 5A 0A 8D 20 39 30 30 00 FE 19 64 0A 81 20 |..Z.. 900...d.. |
000011F0: 4E 20 B2 20 31 20 A4 20 C3 28 43 46 24 29 00 19 |N . 1 . .(CF$)..|
00001200: 1A 6E 0A 8B 20 43 24 B2 CA 28 43 46 24 2C 4E 2C |.n.. C$..(CF$,N,|
00001210: 31 29 20 A7 20 32 36 39 30 00 21 1A 78 0A 82 20 |1) . 2690.!.x.. |
00001220: 4E 00 2C 1A 7D 0A 8D 20 36 39 35 30 00 75 1A 82 |N.,.}.. 6950.u..|
00001230: 0A 91 20 4E 20 8D 20 30 2C 32 37 30 30 2C 30 2C |.. N . 0,2700,0,|
00001240: 32 38 30 30 2C 30 2C 32 39 30 30 2C 30 2C 35 34 |2800,0,2900,0,54|
00001250: 30 30 2C 30 2C 35 33 30 30 2C 30 2C 33 33 30 30 |00,0,5300,0,3300|
00001260: 2C 30 2C 33 31 30 30 2C 30 2C 33 32 30 30 2C 30 |,0,3100,0,3200,0|
00001270: 2C 36 39 30 30 00 91 1A 85 0A CF 20 37 38 35 2C |,6900...... 785,|
00001280: 35 31 30 38 34 20 3A 20 8F 20 55 53 52 20 4A 4D |51084 : . USR JM|
00001290: 50 00 C5 1A 87 0A DB 20 35 35 32 39 36 2C 31 32 |P...... 55296,12|
000012A0: 30 2C 37 20 3A 20 DB 20 28 35 35 32 39 36 AA 31 |0,7 : . (55296.1|
000012B0: 32 30 29 2C 38 38 30 2C 31 20 3A 20 8D 20 37 30 |20),880,1 : . 70|
000012C0: 30 20 3A 20 8E 00 CB 1A 88 0A 3A 00 F0 1A 8C 0A |0 : ......:.....|
000012D0: 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |. **************|
000012E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000012F0: 00 05 1B 96 0A 8F 20 4C 4F 41 44 20 54 45 58 54 |...... LOAD TEXT|
00001300: 20 46 49 4C 45 00 2A 1B A0 0A 8F 20 2A 2A 2A 2A | FILE.*.... ****|
00001310: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001320: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 35 1B B4 0A 8D |**********.5....|
00001330: 20 31 30 30 30 00 4E 1B BE 0A CF 20 32 35 33 2C | 1000.N.... 253,|
00001340: 54 53 20 3A 20 97 20 35 31 30 38 33 2C 30 00 6F |TS : . 51083,0.o|
00001350: 1B C8 0A 9F 20 32 2C 44 45 56 2C 32 2C 20 46 49 |.... 2,DEV,2, FI|
00001360: 4C 45 24 20 3A 20 9E 20 35 31 36 33 38 2C 32 00 |LE$ : . 51638,2.|
00001370: A4 1B D2 0A A0 20 32 20 3A 20 CF 20 53 50 54 52 |..... 2 : . SPTR|
00001380: 2C 54 53 20 3A 20 CF 20 45 4F 46 2C 28 CC 28 32 |,TS : . EOF,(.(2|
00001390: 35 33 29 AB 54 53 29 AB 31 20 3A 20 CF 20 32 35 |53).TS).1 : . 25|
000013A0: 33 2C 54 53 00 AA 1B DC 0A 8E 00 B0 1B E6 0A 3A |3,TS...........:|
000013B0: 00 D5 1B F0 0A 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A |...... *********|
000013C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000013D0: 2A 2A 2A 2A 2A 00 EC 1B FA 0A 8F 20 41 50 50 45 |*****...... APPE|
000013E0: 4E 44 20 54 45 58 54 20 46 49 4C 45 00 11 1C 04 |ND TEXT FILE....|
000013F0: 0B 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.. *************|
00001400: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001410: 2A 00 1E 1C 0E 0B 43 24 B2 46 49 4C 45 24 00 29 |*.....C$.FILE$.)|
00001420: 1C 18 0B 8D 20 31 30 30 30 00 4B 1C 22 0B CF 20 |.... 1000.K.".. |
00001430: 32 35 33 2C 28 54 53 AA CC 28 45 4F 46 29 29 20 |253,(TS..(EOF)) |
00001440: 3A 20 97 20 35 31 30 38 33 2C 30 00 6C 1C 2C 0B |: . 51083,0.l.,.|
00001450: 9F 20 32 2C 44 45 56 2C 32 2C 20 46 49 4C 45 24 |. 2,DEV,2, FILE$|
00001460: 20 3A 20 9E 20 35 31 36 33 38 2C 32 00 79 1C 31 | : . 51638,2.y.1|
00001470: 0B 46 49 4C 45 24 B2 43 24 00 84 1C 36 0B 89 20 |.FILE$.C$...6.. |
00001480: 32 37 37 30 00 8A 1C 40 0B 3A 00 AF 1C 54 0B 8F |2770...@.:...T..|
00001490: 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A | ***************|
000014A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
000014B0: CB 1C 5E 0B 8F 20 53 41 56 45 20 54 45 58 54 20 |..^.. SAVE TEXT |
000014C0: 46 49 4C 45 20 41 53 20 53 45 51 00 F0 1C 68 0B |FILE AS SEQ...h.|
000014D0: 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |. **************|
000014E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000014F0: 00 03 1D 6B 0B D5 20 30 2C 30 20 3A 20 99 20 43 |...k.. 0,0 : . C|
00001500: 32 24 3B 00 16 1D 6D 0B D5 20 31 2C 30 20 3A 20 |2$;...m.. 1,0 : |
00001510: 99 20 43 32 24 3B 00 29 1D 72 0B D5 20 30 2C 30 |. C2$;.).r.. 0,0|
00001520: 20 3A 20 99 20 43 37 24 3B 00 43 1D 7C 0B 8B 20 | : . C7$;.C.|.. |
00001530: C3 28 46 49 4C 45 24 29 20 B1 20 30 20 A7 20 32 |.(FILE$) . 0 . 2|
00001540: 39 36 30 00 52 1D 81 0B D3 2E 85 20 46 49 4C 45 |960.R...... FILE|
00001550: 53 24 00 97 1D 86 0B 8D 20 32 35 35 30 20 3A 20 |S$...... 2550 : |
00001560: 89 20 32 39 37 30 20 3A 20 8F 20 55 53 45 20 4C |. 2970 : . USE L|
00001570: 41 53 54 20 50 41 52 54 20 4F 46 20 22 45 58 54 |AST PART OF "EXT|
00001580: 52 41 43 54 22 20 54 4F 20 22 43 52 55 4E 43 48 |RACT" TO "CRUNCH|
00001590: 22 20 46 49 4C 45 24 00 A4 1D 90 0B 99 20 46 49 |" FILE$...... FI|
000015A0: 4C 45 24 3B 00 B4 1D 9A 0B 9F 20 31 35 2C 44 45 |LE$;...... 15,DE|
000015B0: 56 2C 31 35 00 CA 1D 9F 0B 43 24 20 B2 20 46 49 |V,15.....C$ . FI|
000015C0: 4C 45 24 AA 22 2C 57 2C 53 22 00 E8 1D A1 0B 9F |LE$.",W,S"......|
000015D0: 20 32 2C 44 45 56 2C 32 2C 20 43 24 20 3A 20 97 | 2,DEV,2, C$ : .|
000015E0: 20 35 31 30 38 33 2C 31 00 0F 1E A4 0B D3 2E 84 | 51083,1........|
000015F0: 31 35 2C 45 52 52 24 20 3A 20 8B 20 C5 28 45 52 |15,ERR$ : . .(ER|
00001600: 52 24 29 B2 36 33 20 A7 20 8D 20 33 30 30 30 00 |R$).63 . . 3000.|
00001610: 3D 1E A9 0B 4E 20 B2 20 CC 28 32 35 33 29 20 3A |=...N . .(253) :|
00001620: 20 CF 20 32 35 33 2C 54 53 20 3A 20 CF 20 32 35 | . 253,TS : . 25|
00001630: 31 2C 28 54 53 AA CC 28 45 4F 46 29 29 00 66 1E |1,(TS..(EOF)).f.|
00001640: AE 0B 9E 20 35 31 36 33 38 2C 32 20 3A 20 A0 20 |... 51638,2 : . |
00001650: 32 20 3A 20 A0 20 31 35 20 3A 20 CF 20 32 35 33 |2 : . 15 : . 253|
00001660: 2C 4E 20 3A 20 8E 00 6C 1E B3 0B 3A 00 91 1E B8 |,N : ..l...:....|
00001670: 0B 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.. *************|
00001680: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001690: 2A 00 B1 1E C2 0B 8F 20 41 55 54 4F 20 44 45 4C |*...... AUTO DEL|
000016A0: 45 54 45 20 45 58 49 53 54 49 4E 47 20 46 49 4C |ETE EXISTING FIL|
000016B0: 45 00 D6 1E CC 0B 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |E...... ********|
000016C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000016D0: 2A 2A 2A 2A 2A 2A 00 ED 1E D6 0B 45 52 52 24 20 |******.....ERR$ |
000016E0: B2 20 22 53 30 3A 22 AA 46 49 4C 45 24 00 0D 1F |. "S0:".FILE$...|
000016F0: E0 0B A0 20 32 20 3A 20 98 31 35 2C 45 52 52 24 |... 2 : .15,ERR$|
00001700: 20 3A 20 D3 2E 84 31 35 2C 45 52 52 24 00 23 1F | : ...15,ERR$.#.|
00001710: EA 0B 9F 20 32 2C 44 45 56 2C 32 2C 20 43 24 20 |... 2,DEV,2, C$ |
00001720: 3A 20 8E 00 29 1F F4 0B 3A 00 4E 1F 1C 0C 8F 20 |: ..)...:.N.... |
00001730: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001740: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 70 |**************.p|
00001750: 1F 26 0C 8F 20 43 4C 45 41 52 20 54 45 58 54 20 |.&.. CLEAR TEXT |
00001760: 41 4E 44 20 52 45 53 45 54 20 41 53 20 4E 45 57 |AND RESET AS NEW|
00001770: 00 95 1F 30 0C 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A |...0.. *********|
00001780: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001790: 2A 2A 2A 2A 2A 00 A8 1F 3A 0C D5 20 30 2C 30 20 |*****...:.. 0,0 |
000017A0: 3A 20 99 20 43 32 24 3B 00 DD 1F 44 0C D5 20 30 |: . C2$;...D.. 0|
000017B0: 2C 30 20 3A 20 99 20 22 43 4C 45 41 52 20 54 45 |,0 : . "CLEAR TE|
000017C0: 58 54 20 26 20 52 45 53 45 54 20 28 59 2F 4E 29 |XT & RESET (Y/N)|
000017D0: 20 3F 22 3B 20 3A 20 8D 20 36 39 35 30 00 F7 1F | ?"; : . 6950...|
000017E0: 4E 0C 8D 20 39 30 30 20 3A 20 8B 20 43 24 B3 B1 |N.. 900 : . C$..|
000017F0: 22 59 22 20 A7 20 8E 00 07 20 6C 0C CF 20 45 4F |"Y" . ... l.. EO|
00001800: 46 2C 30 20 3A 20 8A 00 0D 20 76 0C 3A 00 32 20 |F,0 : ... v.:.2 |
00001810: 80 0C 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |... ************|
00001820: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001830: 2A 2A 00 4E 20 8A 0C 8F 20 43 52 45 41 54 45 20 |**.N ... CREATE |
00001840: 44 49 53 4B 20 46 49 4C 45 20 4E 41 4D 45 00 73 |DISK FILE NAME.s|
00001850: 20 94 0C 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A | ... ***********|
00001860: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001870: 2A 2A 2A 00 8B 20 9E 0C D5 20 30 2C 30 20 3A 20 |***.. ... 0,0 : |
00001880: 99 20 43 32 24 3B 20 43 32 24 3B 00 BF 20 A8 0C |. C2$; C2$;.. ..|
00001890: D5 20 30 2C 30 20 3A 20 99 20 22 9E 4E 41 4D 45 |. 0,0 : . ".NAME|
000018A0: 20 22 3B 20 46 49 4C 45 24 3B 20 3A 20 D5 20 30 | "; FILE$; : . 0|
000018B0: 2C 35 20 3A 20 D3 2E 85 20 46 49 4C 45 53 24 00 |,5 : ... FILES$.|
000018C0: CE 20 B2 0C 8D 20 32 35 35 30 20 3A 20 8E 00 D4 |. ... 2550 : ...|
000018D0: 20 BC 0C 3A 00 F9 20 E4 0C 8F 20 2A 2A 2A 2A 2A | ..:.. ... *****|
000018E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000018F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 1C 21 EE 0C 8F 20 |*********..!... |
00001900: 56 49 45 57 20 46 49 4C 45 20 41 4E 44 20 50 52 |VIEW FILE AND PR|
00001910: 45 53 45 52 56 45 20 46 49 4C 45 24 00 41 21 F8 |ESERVE FILE$.A!.|
00001920: 0C 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.. *************|
00001930: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001940: 2A 00 6A 21 02 0D 43 24 20 B2 20 46 49 4C 45 24 |*.j!..C$ . FILE$|
00001950: 20 3A 20 8D 20 31 30 30 30 20 3A 20 46 49 4C 45 | : . 1000 : FILE|
00001960: 24 20 B2 20 43 24 20 3A 20 8E 00 70 21 0C 0D 3A |$ . C$ : ..p!..:|
00001970: 00 95 21 48 0D 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A |..!H.. *********|
00001980: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001990: 2A 2A 2A 2A 2A 00 AC 21 52 0D 8F 20 41 53 4B 20 |*****..!R.. ASK |
000019A0: 53 43 52 4F 4C 4C 20 56 41 4C 55 45 00 D1 21 5C |SCROLL VALUE..!\|
000019B0: 0D 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.. *************|
000019C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000019D0: 2A 00 E4 21 66 0D D5 20 30 2C 30 20 3A 20 99 20 |*..!f.. 0,0 : . |
000019E0: 43 32 24 3B 00 00 22 70 0D D5 20 30 2C 30 20 3A |C2$;.."p.. 0,0 :|
000019F0: 20 99 20 22 9E 53 43 52 4F 4C 4C 22 3B 20 53 53 | . ".SCROLL"; SS|
00001A00: 00 14 22 7A 0D D5 20 30 2C 37 20 3A 20 D3 2E 85 |.."z.. 0,7 : ...|
00001A10: 20 49 4E 24 00 24 22 84 0D 53 53 20 B2 20 C5 28 | IN$.$"..SS . .(|
00001A20: 49 4E 24 29 00 3B 22 8E 0D 8B 20 53 53 20 B3 B2 |IN$).;"... SS ..|
00001A30: 30 20 A7 20 53 53 20 B2 20 31 35 00 41 22 98 0D |0 . SS . 15.A"..|
00001A40: 8E 00 47 22 A2 0D 3A 00 6C 22 AC 0D 8F 20 2A 2A |..G"..:.l"... **|
00001A50: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001A60: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 8A 22 B6 |************..".|
00001A70: 0D 8F 20 53 43 52 4F 4C 4C 20 53 43 52 45 45 4E |.. SCROLL SCREEN|
00001A80: 20 55 50 20 42 59 20 53 43 4C 00 AF 22 C0 0D 8F | UP BY SCL.."...|
00001A90: 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A | ***************|
00001AA0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
00001AB0: C1 22 CA 0D CF 20 32 35 33 2C CC 28 53 50 54 52 |."... 253,.(SPTR|
00001AC0: 29 00 D2 22 D4 0D 81 20 4E 20 B2 20 31 20 A4 20 |).."... N . 1 . |
00001AD0: 53 53 00 F4 22 DE 0D 9E 20 35 31 34 33 37 20 3A |SS.."... 51437 :|
00001AE0: 20 8B 20 CC 28 32 35 33 29 B3 B2 54 53 20 A7 20 | . .(253)..TS . |
00001AF0: 33 35 39 30 00 FC 22 E8 0D 82 20 4E 00 12 23 F2 |3590.."... N..#.|
00001B00: 0D 9E 20 35 31 34 33 37 20 3A 20 9E 20 35 31 34 |.. 51437 : . 514|
00001B10: 30 38 00 28 23 FC 0D CF 20 53 50 54 52 2C CC 28 |08.(#... SPTR,.(|
00001B20: 32 35 33 29 20 3A 20 8E 00 45 23 06 0E CF 20 53 |253) : ..E#... S|
00001B30: 50 54 52 2C 54 53 20 3A 20 CF 20 32 35 33 2C 54 |PTR,TS : . 253,T|
00001B40: 53 20 3A 20 8E 00 6A 23 10 0E 8F 20 2A 2A 2A 2A |S : ..j#... ****|
00001B50: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001B60: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 8A 23 1A 0E 8F |**********..#...|
00001B70: 20 53 43 52 4F 4C 4C 20 53 43 52 45 45 4E 20 44 | SCROLL SCREEN D|
00001B80: 4F 57 4E 20 42 59 20 53 43 4C 00 AF 23 24 0E 8F |OWN BY SCL..#$..|
00001B90: 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A | ***************|
00001BA0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
00001BB0: C1 23 2E 0E CF 20 32 35 33 2C CC 28 53 50 54 52 |.#... 253,.(SPTR|
00001BC0: 29 00 D2 23 38 0E 81 20 4E 20 B2 20 31 20 A4 20 |)..#8.. N . 1 . |
00001BD0: 53 53 00 FD 23 42 0E 9E 20 35 31 34 30 38 20 3A |SS..#B.. 51408 :|
00001BE0: 20 8B 20 CC 28 32 35 33 29 B1 B2 28 54 53 AA CC | . .(253)..(TS..|
00001BF0: 28 45 4F 46 29 29 20 A7 20 33 36 37 30 00 05 24 |(EOF)) . 3670..$|
00001C00: 4C 0E 82 20 4E 00 1B 24 56 0E CF 20 53 50 54 52 |L.. N..$V.. SPTR|
00001C10: 2C CC 28 32 35 33 29 20 3A 20 8E 00 21 24 60 0E |,.(253) : ..!$`.|
00001C20: 3A 00 46 24 74 0E 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |:.F$t.. ********|
00001C30: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001C40: 2A 2A 2A 2A 2A 2A 00 64 24 7E 0E 8F 20 49 4E 53 |******.d$~.. INS|
00001C50: 45 52 54 20 53 49 4E 47 4C 45 20 43 48 41 52 41 |ERT SINGLE CHARA|
00001C60: 43 54 45 52 00 89 24 88 0E 8F 20 2A 2A 2A 2A 2A |CTER..$... *****|
00001C70: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001C80: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 AD 24 8D 0E 4E 20 |*********..$..N |
00001C90: B2 20 CC 28 32 35 33 29 20 3A 20 4E 4C 20 B2 20 |. .(253) : NL . |
00001CA0: CC 28 45 4F 46 29 AB CC 28 43 53 52 29 00 BE 24 |.(EOF)..(CSR)..$|
00001CB0: 92 0E D2 20 4E 2C 20 4E AB 31 2C 20 4E 4C 00 DF |... N, N.1, NL..|
00001CC0: 24 9C 0E 97 20 4E 2C 20 33 32 20 3A 20 CF 20 45 |$... N, 32 : . E|
00001CD0: 4F 46 2C CC 28 45 4F 46 29 AA 31 20 3A 20 8E 00 |OF,.(EOF).1 : ..|
00001CE0: E5 24 A6 0E 3A 00 0A 25 D8 0E 8F 20 2A 2A 2A 2A |.$..:..%... ****|
00001CF0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001D00: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 28 25 E2 0E 8F |**********.(%...|
00001D10: 20 44 45 4C 45 54 45 20 53 49 4E 47 4C 45 20 43 | DELETE SINGLE C|
00001D20: 48 41 52 41 43 54 45 52 00 4D 25 EC 0E 8F 20 2A |HARACTER.M%... *|
00001D30: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001D40: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 71 25 |*************.q%|
00001D50: F6 0E 4E 20 B2 20 CC 28 32 35 33 29 20 3A 20 4E |..N . .(253) : N|
00001D60: 4C 20 B2 20 CC 28 45 4F 46 29 AB CC 28 43 53 52 |L . .(EOF)..(CSR|
00001D70: 29 00 81 25 FB 0E 8B 20 4E B3 B2 54 53 20 A7 20 |)..%... N..TS . |
00001D80: 8E 00 94 25 00 0F D2 20 4E AB 31 2C 20 4E 2C 20 |...%... N.1, N, |
00001D90: 4E 4C AA 32 00 A7 25 0A 0F CF 20 45 4F 46 2C CC |NL.2..%... EOF,.|
00001DA0: 28 45 4F 46 29 AB 31 00 BE 25 14 0F CF 20 32 35 |(EOF).1..%... 25|
00001DB0: 33 2C CC 28 32 35 33 29 AB 31 20 3A 20 8E 00 C4 |3,.(253).1 : ...|
00001DC0: 25 1E 0F 3A 00 E9 25 3C 0F 8F 20 2A 2A 2A 2A 2A |%..:..%<.. *****|
00001DD0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001DE0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 0D 26 46 0F 8F 20 |*********..&F.. |
00001DF0: 50 55 4C 4C 20 48 4F 4D 45 20 53 54 41 43 4B 20 |PULL HOME STACK |
00001E00: 26 20 50 45 52 46 4F 52 4D 20 48 4D 45 00 32 26 |& PERFORM HME.2&|
00001E10: 50 0F 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |P.. ************|
00001E20: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001E30: 2A 2A 00 5C 26 5A 0F 4E 20 B2 20 CC 28 48 4D 45 |**.\&Z.N . .(HME|
00001E40: 29 20 3A 20 CF 20 53 50 54 52 2C 48 28 4E 29 20 |) : . SPTR,H(N) |
00001E50: 3A 20 CF 20 32 35 33 2C 48 28 4E 29 00 7A 26 64 |: . 253,H(N).z&d|
00001E60: 0F 4E 20 B2 20 4E 20 AB 20 31 20 3A 20 8B 20 4E |.N . N . 1 : . N|
00001E70: B3 30 20 A7 20 4E 20 B2 20 30 00 8A 26 6E 0F CF |.0 . N . 0..&n..|
00001E80: 20 48 4D 45 2C 4E 20 3A 20 8E 00 90 26 78 0F 3A | HME,N : ...&x.:|
00001E90: 00 B5 26 A0 0F 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A |..&... *********|
00001EA0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001EB0: 2A 2A 2A 2A 2A 00 DA 26 AA 0F 8F 20 50 55 53 48 |*****..&... PUSH|
00001EC0: 20 48 4F 4D 45 20 53 54 41 43 4B 20 57 49 54 48 | HOME STACK WITH|
00001ED0: 20 53 43 4E 2E 20 41 44 44 52 00 FF 26 B4 0F 8F | SCN. ADDR..&...|
00001EE0: 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A | ***************|
00001EF0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
00001F00: 27 27 BE 0F 4E 20 B2 20 CC 28 48 4D 45 29 20 3A |''..N . .(HME) :|
00001F10: 20 4E B2 4E AA 31 20 3A 20 8B 20 4E B3 B2 31 30 | N.N.1 : . N..10|
00001F20: 20 A7 20 34 30 35 30 00 32 27 C3 0F 8D 20 36 39 | . 4050.2'... 69|
00001F30: 35 30 00 67 27 C8 0F D5 20 30 2C 30 20 3A 20 99 |50.g'... 0,0 : .|
00001F40: 20 43 32 24 3B 20 3A 20 D5 20 30 2C 30 20 3A 20 | C2$; : . 0,0 : |
00001F50: 99 20 43 34 24 3B 20 43 36 24 3B 20 3A 20 8D 20 |. C4$; C6$; : . |
00001F60: 39 30 30 20 3A 20 8E 00 86 27 D2 0F CF 20 48 4D |900 : ...'... HM|
00001F70: 45 2C 4E 20 3A 20 48 28 4E 29 B2 CC 28 53 50 54 |E,N : H(N)..(SPT|
00001F80: 52 29 20 3A 20 8E 00 8C 27 DC 0F 3A 00 B1 27 04 |R) : ...'..:..'.|
00001F90: 10 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.. *************|
00001FA0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001FB0: 2A 00 CC 27 0E 10 8F 20 54 4F 47 47 4C 45 20 49 |*..'... TOGGLE I|
00001FC0: 4E 53 45 52 54 20 4D 4F 44 45 20 2D 00 EF 27 18 |NSERT MODE -..'.|
00001FD0: 10 8F 20 4D 4F 56 45 20 54 45 58 54 20 46 52 4F |.. MOVE TEXT FRO|
00001FE0: 4D 20 43 55 52 53 4F 52 20 54 4F 20 45 4F 46 00 |M CURSOR TO EOF.|
00001FF0: 14 28 22 10 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.(".. **********|
00002000: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002010: 2A 2A 2A 2A 00 2C 28 2C 10 8B 20 CC 28 49 4E 53 |****.,(,.. .(INS|
00002020: 29 20 B1 20 30 20 A7 20 34 31 39 30 00 61 28 36 |) . 0 . 4190.a(6|
00002030: 10 4E 20 B2 20 CC 28 32 35 33 29 20 3A 20 49 4C |.N . .(253) : IL|
00002040: 20 B2 20 28 54 53 AA CC 28 45 4F 46 29 29 20 AB | . (TS..(EOF)) .|
00002050: 20 4E 20 3A 20 49 53 20 B2 20 54 45 20 AB 20 49 | N : IS . TE . I|
00002060: 4C 00 84 28 40 10 D2 20 49 53 2C 20 4E AB 31 2C |L..(@.. IS, N.1,|
00002070: 20 49 4C 20 3A 20 DB 20 4E 2C 20 49 53 AB 4E 2C | IL : . N, IS.N,|
00002080: 20 31 34 31 00 A3 28 4A 10 CF 20 45 4F 46 2C 20 | 141..(J.. EOF, |
00002090: 4E AB 54 53 20 3A 20 CF 20 49 4E 53 2C 20 31 20 |N.TS : . INS, 1 |
000020A0: 3A 20 8E 00 C8 28 54 10 8F 20 2D 2D 2D 2D 2D 2D |: ...(T.. ------|
000020B0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000020C0: 2D 2D 2D 2D 2D 2D 2D 2D 00 FD 28 5E 10 4E 20 B2 |--------..(^.N .|
000020D0: 20 54 53 AA CC 28 45 4F 46 29 20 3A 20 D2 20 4E | TS..(EOF) : . N|
000020E0: 2C 20 49 53 AA 31 2C 20 49 4C 20 3A 20 CF 20 45 |, IS.1, IL : . E|
000020F0: 4F 46 2C 20 CC 28 45 4F 46 29 AA 49 4C 00 20 29 |OF, .(EOF).IL. )|
00002100: 68 10 CF 20 49 4E 53 2C 20 30 20 3A 20 49 53 20 |h.. INS, 0 : IS |
00002110: B2 20 54 45 20 3A 20 8D 20 37 30 30 20 3A 20 8E |. TE : . 700 : .|
00002120: 00 26 29 72 10 3A 00 4B 29 CC 10 8F 20 2A 2A 2A |.&)r.:.K)... ***|
00002130: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002140: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 66 29 D6 10 |***********.f)..|
00002150: 8F 20 42 4C 4F 43 4B 20 43 4F 4D 4D 41 4E 44 20 |. BLOCK COMMAND |
00002160: 4D 4F 44 55 4C 45 00 8B 29 E0 10 8F 20 2A 2A 2A |MODULE..)... ***|
00002170: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002180: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 A3 29 EA 10 |***********..)..|
00002190: 43 58 24 B2 22 9E 53 2F 45 2F 43 2F 4D 2F 44 2F |CX$.".S/E/C/M/D/|
000021A0: 46 3F 22 00 D1 29 F4 10 D5 20 30 2C 30 20 3A 20 |F?"..)... 0,0 : |
000021B0: 99 20 43 32 24 3B 20 3A 20 D5 20 30 2C 30 20 3A |. C2$; : . 0,0 :|
000021C0: 20 99 20 22 42 4C 4F 43 4B 20 22 3B 20 43 42 24 | . "BLOCK "; CB$|
000021D0: 3B 00 DB 29 FE 10 8D 20 39 30 30 00 F0 29 08 11 |;..)... 900..)..|
000021E0: 81 20 4E 20 B2 20 31 20 A4 20 C3 28 43 42 24 29 |. N . 1 . .(CB$)|
000021F0: 00 0D 2A 12 11 8B 20 43 24 20 B2 20 CA 28 43 42 |..*... C$ . .(CB|
00002200: 24 2C 4E 2C 31 29 20 A7 20 34 33 39 30 00 15 2A |$,N,1) . 4390..*|
00002210: 1C 11 82 20 4E 00 20 2A 21 11 8D 20 36 39 35 30 |... N. *!.. 6950|
00002220: 00 54 2A 26 11 91 20 4E 20 8D 20 30 2C 34 35 30 |.T*&.. N . 0,450|
00002230: 30 2C 30 2C 34 36 30 30 2C 30 2C 34 39 30 30 2C |0,0,4600,0,4900,|
00002240: 30 2C 35 30 30 30 2C 30 2C 34 38 30 30 2C 30 2C |0,5000,0,4800,0,|
00002250: 35 32 30 30 00 5A 2A 30 11 8E 00 60 2A 3A 11 3A |5200.Z*0...`*:.:|
00002260: 00 85 2A 94 11 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A |..*... *********|
00002270: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002280: 2A 2A 2A 2A 2A 00 9E 2A 9E 11 8F 20 44 45 46 49 |*****..*... DEFI|
00002290: 4E 45 20 42 4C 4F 43 4B 20 53 54 41 52 54 00 C3 |NE BLOCK START..|
000022A0: 2A A8 11 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |*... ***********|
000022B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000022C0: 2A 2A 2A 00 D7 2A B2 11 42 53 20 B2 20 CC 28 32 |***..*..BS . .(2|
000022D0: 35 33 29 20 3A 20 8E 00 DD 2A BC 11 3A 00 02 2B |53) : ...*..:..+|
000022E0: F8 11 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |... ************|
000022F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002300: 2A 2A 00 19 2B 02 12 8F 20 44 45 46 49 4E 45 20 |**..+... DEFINE |
00002310: 42 4C 4F 43 4B 20 45 4E 44 00 3E 2B 0C 12 8F 20 |BLOCK END.>+... |
00002320: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002330: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 52 |**************.R|
00002340: 2B 16 12 42 45 20 B2 20 CC 28 32 35 33 29 20 3A |+..BE . .(253) :|
00002350: 20 8E 00 58 2B 20 12 3A 00 7D 2B 5C 12 8F 20 2A | ..X+ .:.}+\.. *|
00002360: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002370: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 9A 2B |*************..+|
00002380: 66 12 8F 20 43 48 45 43 4B 20 42 4C 4F 43 4B 20 |f.. CHECK BLOCK |
00002390: 44 45 46 49 4E 45 44 20 4F 4B 00 B7 2B 6B 12 8F |DEFINED OK..+k..|
000023A0: 20 41 42 4F 52 54 20 4F 50 45 52 41 54 49 4F 4E | ABORT OPERATION|
000023B0: 20 49 46 20 4E 4F 54 00 DC 2B 70 12 8F 20 2A 2A | IF NOT..+p.. **|
000023C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000023D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 02 2C 7A |************..,z|
000023E0: 12 8B 20 28 42 53 B1 B2 54 53 20 AF 20 42 45 B3 |.. (BS..TS . BE.|
000023F0: B2 54 45 29 20 AF 20 42 53 20 B3 20 42 45 20 A7 |.TE) . BS . BE .|
00002400: 20 8E 00 0D 2C 7F 12 8D 20 36 39 35 30 00 3E 2C | ...,... 6950.>,|
00002410: 84 12 D5 20 30 2C 30 20 3A 20 99 20 43 32 24 3B |... 0,0 : . C2$;|
00002420: 20 3A 20 D5 20 30 2C 30 20 3A 20 99 20 43 34 24 | : . 0,0 : . C4$|
00002430: 3B 20 43 35 24 3B 20 3A 20 8D 20 39 30 30 00 44 |; C5$; : . 900.D|
00002440: 2C 8E 12 D7 00 4A 2C 98 12 8E 00 50 2C A2 12 3A |,....J,....P,..:|
00002450: 00 75 2C C0 12 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A |.u,... *********|
00002460: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002470: 2A 2A 2A 2A 2A 00 90 2C CA 12 8F 20 44 45 4C 45 |*****..,... DELE|
00002480: 54 45 20 44 45 46 49 4E 45 44 20 42 4C 4F 43 4B |TE DEFINED BLOCK|
00002490: 00 B5 2C D4 12 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A |..,... *********|
000024A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000024B0: 2A 2A 2A 2A 2A 00 C0 2C D7 12 8D 20 34 37 30 30 |*****..,... 4700|
000024C0: 00 DE 2C D9 12 4E 20 B2 20 54 53 AA CC 28 45 4F |..,..N . TS..(EO|
000024D0: 46 29 20 3A 20 4C 20 B2 20 42 45 AB 42 53 00 F1 |F) : L . BE.BS..|
000024E0: 2C DE 12 D2 20 42 53 2C 20 42 45 2C 20 4E AB 42 |,... BS, BE, N.B|
000024F0: 45 00 03 2D E8 12 DB 20 4E AB 4C 2C 20 4C 2C 20 |E..-... N.L, L, |
00002500: 31 34 31 00 19 2D F2 12 CF 20 45 4F 46 2C 20 28 |141..-... EOF, (|
00002510: CC 28 45 4F 46 29 AB 4C 29 00 2F 2D FC 12 42 53 |.(EOF).L)./-..BS|
00002520: 20 B2 20 54 53 20 3A 20 42 45 20 B2 20 54 53 00 | . TS : BE . TS.|
00002530: 56 2D 01 13 8B 20 CC 28 43 53 52 29 B1 CC 28 45 |V-... .(CSR)..(E|
00002540: 4F 46 29 20 A7 3A CF 20 32 35 33 2C 20 54 53 AA |OF) .:. 253, TS.|
00002550: CC 28 45 4F 46 29 00 5C 2D 03 13 8E 00 62 2D 06 |.(EOF).\-....b-.|
00002560: 13 3A 00 87 2D 24 13 8F 20 2A 2A 2A 2A 2A 2A 2A |.:..-$.. *******|
00002570: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002580: 2A 2A 2A 2A 2A 2A 2A 00 A0 2D 2E 13 8F 20 43 4F |*******..-... CO|
00002590: 50 59 20 44 45 46 49 4E 45 44 20 42 4C 4F 43 4B |PY DEFINED BLOCK|
000025A0: 00 C5 2D 38 13 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A |..-8.. *********|
000025B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000025C0: 2A 2A 2A 2A 2A 00 D0 2D 42 13 8D 20 34 37 30 30 |*****..-B.. 4700|
000025D0: 00 EE 2D 4C 13 4E 20 B2 20 54 53 AA CC 28 45 4F |..-L.N . TS..(EO|
000025E0: 46 29 20 3A 20 4C 20 B2 20 42 45 AB 42 53 00 FD |F) : L . BE.BS..|
000025F0: 2D 56 13 43 20 B2 20 CC 28 32 35 33 29 00 11 2E |-V.C . .(253)...|
00002600: 60 13 D2 20 49 53 AB 4C 2C 20 42 53 AB 31 2C 20 |`.. IS.L, BS.1, |
00002610: 4C 00 29 2E 6A 13 D2 20 28 43 AA 4C 29 AB 31 2C |L.).j.. (C.L).1,|
00002620: 20 43 AB 31 2C 20 4E AB 43 00 3E 2E 6F 13 D2 20 | C.1, N.C.>.o.. |
00002630: 43 2C 20 28 49 53 AA 31 29 AB 4C 2C 20 4C 00 52 |C, (IS.1).L, L.R|
00002640: 2E 74 13 CF 20 45 4F 46 2C 20 CC 28 45 4F 46 29 |.t.. EOF, .(EOF)|
00002650: AA 4C 00 58 2E 7E 13 8E 00 5E 2E 83 13 3A 00 83 |.L.X.~...^...:..|
00002660: 2E 88 13 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.... ***********|
00002670: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002680: 2A 2A 2A 00 9C 2E 92 13 8F 20 4D 4F 56 45 20 44 |***...... MOVE D|
00002690: 45 46 49 4E 45 44 20 42 4C 4F 43 4B 00 C1 2E 9C |EFINED BLOCK....|
000026A0: 13 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.. *************|
000026B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000026C0: 2A 00 CC 2E A6 13 8D 20 34 37 30 30 00 EA 2E B0 |*...... 4700....|
000026D0: 13 4E 20 B2 20 54 53 AA CC 28 45 4F 46 29 20 3A |.N . TS..(EOF) :|
000026E0: 20 4C 20 B2 20 42 45 AB 42 53 00 F9 2E BA 13 43 | L . BE.BS.....C|
000026F0: 20 B2 20 CC 28 32 35 33 29 00 0D 2F C4 13 D2 20 | . .(253)../... |
00002700: 49 53 AB 4C 2C 20 42 53 AB 31 2C 20 4C 00 2A 2F |IS.L, BS.1, L.*/|
00002710: CE 13 8B 20 43 B1 B2 42 45 20 A7 3A D2 20 42 53 |... C..BE .:. BS|
00002720: 2C 20 42 45 2C 20 43 AB 42 45 00 4A 2F D8 13 8B |, BE, C.BE.J/...|
00002730: 20 43 B3 B2 42 53 20 A7 3A D2 28 43 AA 4C 29 AB | C..BS .:.(C.L).|
00002740: 31 2C 43 AB 31 2C 42 53 AB 43 00 69 2F E2 13 8B |1,C.1,BS.C.i/...|
00002750: 20 43 B1 B2 42 45 20 A7 3A D2 20 43 AB 4C 2C 28 | C..BE .:. C.L,(|
00002760: 49 53 AA 31 29 AB 4C 2C 4C 00 88 2F E7 13 8B 20 |IS.1).L,L../... |
00002770: 43 B3 B2 42 53 20 A7 3A D2 20 43 2C 20 28 49 53 |C..BS .:. C, (IS|
00002780: AA 31 29 AB 4C 2C 20 4C 00 9E 2F EC 13 42 53 20 |.1).L, L../..BS |
00002790: B2 20 54 53 20 3A 20 42 45 20 B2 20 54 53 00 A4 |. TS : BE . TS..|
000027A0: 2F F6 13 8E 00 AA 2F 00 14 3A 00 CF 2F 50 14 8F |/...../..:../P..|
000027B0: 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A | ***************|
000027C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
000027D0: F0 2F 5A 14 8F 20 46 49 4C 45 20 4F 52 20 53 41 |./Z.. FILE OR SA|
000027E0: 56 45 20 44 45 46 49 4E 45 44 20 42 4C 4F 43 4B |VE DEFINED BLOCK|
000027F0: 00 15 30 64 14 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A |..0d.. *********|
00002800: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002810: 2A 2A 2A 2A 2A 00 20 30 6E 14 8D 20 34 37 30 30 |*****. 0n.. 4700|
00002820: 00 39 30 78 14 54 53 20 B2 20 42 53 20 3A 20 58 |.90x.TS . BS : X|
00002830: 20 B2 20 CC 28 45 4F 46 29 00 55 30 82 14 42 24 | . .(EOF).U0..B$|
00002840: 20 B2 20 46 49 4C 45 24 20 3A 20 46 49 4C 45 24 | . FILE$ : FILE$|
00002850: 20 B2 20 22 22 00 68 30 8C 14 CF 20 45 4F 46 2C | . "".h0... EOF,|
00002860: 20 42 45 AB 42 53 AB 31 00 73 30 96 14 8D 20 32 | BE.BS.1.s0... 2|
00002870: 39 30 30 00 8D 30 A0 14 54 53 20 B2 20 32 34 35 |900..0..TS . 245|
00002880: 37 35 20 3A 20 CF 20 45 4F 46 2C 20 58 00 B0 30 |75 : . EOF, X..0|
00002890: AA 14 42 53 20 B2 20 54 53 20 3A 20 42 45 20 B2 |..BS . TS : BE .|
000028A0: 20 54 53 20 3A 20 46 49 4C 45 24 20 B2 20 42 24 | TS : FILE$ . B$|
000028B0: 00 B6 30 AC 14 8E 00 BC 30 AF 14 3A 00 E1 30 B4 |..0.....0..:..0.|
000028C0: 14 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.. *************|
000028D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000028E0: 2A 00 FE 30 BE 14 8F 20 45 52 41 53 45 20 44 49 |*..0... ERASE DI|
000028F0: 53 4B 20 46 49 4C 45 20 4D 4F 44 55 4C 45 00 23 |SK FILE MODULE.#|
00002900: 31 C8 14 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |1... ***********|
00002910: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002920: 2A 2A 2A 00 3B 31 D2 14 43 24 20 B2 20 46 49 4C |***.;1..C$ . FIL|
00002930: 45 24 20 3A 20 8D 20 31 30 30 30 00 4B 31 DC 14 |E$ : . 1000.K1..|
00002940: 9F 20 31 35 2C 44 45 56 2C 31 35 00 61 31 E6 14 |. 15,DEV,15.a1..|
00002950: 58 24 20 B2 20 22 53 30 3A 22 AA 46 49 4C 45 53 |X$ . "S0:".FILES|
00002960: 24 00 6D 31 F0 14 98 31 35 2C 20 58 24 00 7D 31 |$.m1...15, X$.}1|
00002970: FA 14 D3 2E 84 31 35 2C 20 45 52 52 24 00 97 31 |.....15, ERR$..1|
00002980: 04 15 A0 20 31 35 20 3A 20 46 49 4C 45 24 20 B2 |... 15 : FILE$ .|
00002990: 20 43 24 20 3A 20 8E 00 9D 31 0E 15 3A 00 C2 31 | C$ : ...1..:..1|
000029A0: 18 15 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |... ************|
000029B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000029C0: 2A 2A 00 E3 31 22 15 8F 20 44 55 4D 50 20 53 43 |**..1".. DUMP SC|
000029D0: 52 45 45 4E 20 54 4F 20 44 49 53 4B 20 41 53 20 |REEN TO DISK AS |
000029E0: 50 52 47 00 08 32 2C 15 8F 20 2A 2A 2A 2A 2A 2A |PRG..2,.. ******|
000029F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002A00: 2A 2A 2A 2A 2A 2A 2A 2A 00 20 32 36 15 D5 20 30 |********. 26.. 0|
00002A10: 2C 30 20 3A 20 99 20 43 32 24 3B 20 43 32 24 3B |,0 : . C2$; C2$;|
00002A20: 00 33 32 40 15 D5 20 30 2C 30 20 3A 20 99 20 43 |.32@.. 0,0 : . C|
00002A30: 38 24 3B 00 4E 32 4A 15 43 24 20 B2 20 46 49 4C |8$;.N2J.C$ . FIL|
00002A40: 45 24 20 3A 20 D3 2E 85 20 46 49 4C 45 24 00 59 |E$ : ... FILE$.Y|
00002A50: 32 54 15 8D 20 32 35 35 30 00 7A 32 5E 15 9F 20 |2T.. 2550.z2^.. |
00002A60: 31 35 2C 38 2C 31 35 20 3A 20 58 24 20 B2 20 22 |15,8,15 : X$ . "|
00002A70: 53 30 3A 22 AA 46 49 4C 45 24 00 A6 32 68 15 DA |S0:".FILE$..2h..|
00002A80: 20 46 49 4C 45 24 2C 20 38 2C 20 32 2C 20 31 31 | FILE$, 8, 2, 11|
00002A90: 34 34 2C 20 32 30 32 34 20 3A 20 D3 2E 84 31 35 |44, 2024 : ...15|
00002AA0: 2C 20 45 52 52 24 00 CC 32 72 15 8B 20 C5 28 45 |, ERR$..2r.. .(E|
00002AB0: 52 52 24 29 20 B2 20 36 33 20 A7 20 98 31 35 2C |RR$) . 63 . .15,|
00002AC0: 20 58 24 20 3A 20 89 20 35 34 38 30 00 E6 32 7C | X$ : . 5480..2||
00002AD0: 15 A0 20 31 35 20 3A 20 46 49 4C 45 24 20 B2 20 |.. 15 : FILE$ . |
00002AE0: 43 24 20 3A 20 8E 00 EC 32 86 15 3A 00 11 33 E0 |C$ : ...2..:..3.|
00002AF0: 15 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.. *************|
00002B00: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002B10: 2A 00 2B 33 EA 15 8F 20 54 45 58 54 20 43 4F 4D |*.+3... TEXT COM|
00002B20: 4D 41 4E 44 20 4D 4F 44 55 4C 45 00 50 33 F4 15 |MAND MODULE.P3..|
00002B30: 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |. **************|
00002B40: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002B50: 00 7D 33 FE 15 D5 20 30 2C 30 20 3A 20 99 20 43 |.}3... 0,0 : . C|
00002B60: 32 24 3B 20 3A 20 D5 20 30 2C 30 20 3A 20 99 20 |2$; : . 0,0 : . |
00002B70: 22 54 45 58 54 20 22 3B 20 43 54 24 3B 00 87 33 |"TEXT "; CT$;..3|
00002B80: 08 16 8D 20 39 30 30 00 9C 33 12 16 81 20 4E 20 |... 900..3... N |
00002B90: B2 20 31 20 A4 20 C3 28 43 54 24 29 00 B9 33 1C |. 1 . .(CT$)..3.|
00002BA0: 16 8B 20 43 24 20 B2 20 CA 28 43 54 24 2C 4E 2C |.. C$ . .(CT$,N,|
00002BB0: 31 29 20 A7 20 35 36 38 30 00 C1 33 26 16 82 20 |1) . 5680..3&.. |
00002BC0: 4E 00 CC 33 2B 16 8D 20 36 39 35 30 00 E9 33 30 |N..3+.. 6950..30|
00002BD0: 16 8B 20 4E B2 32 30 20 A7 20 8D 20 36 38 30 30 |.. N.20 . . 6800|
00002BE0: 20 3A 20 89 20 35 36 39 30 00 32 34 35 16 91 20 | : . 5690.245.. |
00002BF0: 4E 20 8D 20 30 2C 35 38 30 30 2C 30 2C 35 39 30 |N . 0,5800,0,590|
00002C00: 30 2C 30 2C 36 30 30 30 2C 30 2C 36 34 30 30 2C |0,0,6000,0,6400,|
00002C10: 30 2C 36 31 30 30 2C 30 2C 36 32 30 30 2C 30 2C |0,6100,0,6200,0,|
00002C20: 36 35 30 30 2C 30 2C 36 36 30 30 2C 30 2C 36 37 |6500,0,6600,0,67|
00002C30: 30 30 00 38 34 3A 16 D7 00 42 34 44 16 89 20 34 |00.84:...B4D.. 4|
00002C40: 35 30 00 48 34 4E 16 3A 00 6D 34 A8 16 8F 20 2A |50.H4N.:.m4... *|
00002C50: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002C60: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 8C 34 |*************..4|
00002C70: B2 16 8F 20 54 52 41 4E 53 50 4F 53 45 20 54 57 |... TRANSPOSE TW|
00002C80: 4F 20 43 48 41 52 41 43 54 45 52 53 00 B1 34 BC |O CHARACTERS..4.|
00002C90: 16 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.. *************|
00002CA0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002CB0: 2A 00 CB 34 C6 16 4E 20 B2 20 CC 28 32 35 33 29 |*..4..N . .(253)|
00002CC0: 20 3A 20 43 20 B2 20 C2 28 4E 29 00 E5 34 D0 16 | : C . .(N)..4..|
00002CD0: 97 20 4E 2C 20 C2 28 4E AA 31 29 20 3A 20 97 20 |. N, .(N.1) : . |
00002CE0: 4E AA 31 2C 43 00 EB 34 DA 16 8E 00 F1 34 E4 16 |N.1,C..4.....4..|
00002CF0: 3A 00 16 35 0C 17 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |:..5... ********|
00002D00: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002D10: 2A 2A 2A 2A 2A 2A 00 37 35 16 17 8F 20 44 45 4C |******.75... DEL|
00002D20: 45 54 45 20 57 4F 52 44 20 46 52 4F 4D 20 43 55 |ETE WORD FROM CU|
00002D30: 52 53 4F 52 20 4F 4E 00 5C 35 20 17 8F 20 2A 2A |RSOR ON.\5 .. **|
00002D40: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002D50: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 75 35 2A |************.u5*|
00002D60: 17 42 53 20 B2 20 CC 28 32 35 33 29 20 3A 20 4E |.BS . .(253) : N|
00002D70: 20 B2 20 42 53 00 82 35 34 17 43 20 B2 20 C2 28 | . BS..54.C . .(|
00002D80: 4E 29 00 A3 35 3E 17 8B 20 43 B2 33 32 20 B0 20 |N)..5>.. C.32 . |
00002D90: 43 B2 31 33 20 B0 20 43 B2 31 34 31 20 A7 20 35 |C.13 . C.141 . 5|
00002DA0: 39 37 30 00 B6 35 48 17 4E B2 4E AA 31 20 3A 20 |970..5H.N.N.1 : |
00002DB0: 89 20 35 39 34 30 00 CE 35 52 17 42 45 B2 4E AA |. 5940..5R.BE.N.|
00002DC0: 31 20 3A 20 8D 20 34 38 32 35 20 3A 20 8E 00 D4 |1 : . 4825 : ...|
00002DD0: 35 5C 17 3A 00 F9 35 70 17 8F 20 2A 2A 2A 2A 2A |5\.:..5p.. *****|
00002DE0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002DF0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 1B 36 7A 17 8F 20 |*********..6z.. |
00002E00: 43 48 41 4E 47 45 20 43 41 53 45 20 4F 46 20 53 |CHANGE CASE OF S|
00002E10: 49 4E 47 4C 45 20 43 48 41 52 2E 00 40 36 84 17 |INGLE CHAR..@6..|
00002E20: 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |. **************|
00002E30: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002E40: 00 5A 36 8E 17 4E 20 B2 20 CC 28 32 35 33 29 20 |.Z6..N . .(253) |
00002E50: 3A 20 43 20 B2 20 C2 28 4E 29 00 77 36 98 17 8B |: C . .(N).w6...|
00002E60: 20 43 B1 B2 31 39 33 20 AF 20 43 B3 B2 32 31 38 | C..193 . C..218|
00002E70: 20 A7 20 36 30 36 30 00 92 36 9D 17 8B 20 43 B1 | . 6060..6... C.|
00002E80: B2 36 35 20 AF 20 43 B3 B2 39 30 20 A7 20 36 30 |.65 . C..90 . 60|
00002E90: 37 30 00 A9 36 A2 17 CF 20 32 35 33 2C CC 28 32 |70..6... 253,.(2|
00002EA0: 35 33 29 AA 31 20 3A 20 8E 00 C6 36 AC 17 43 B2 |53).1 : ...6..C.|
00002EB0: 43 AB 31 32 38 20 3A 20 97 20 4E 2C 43 20 3A 20 |C.128 : . N,C : |
00002EC0: 89 20 36 30 35 30 00 E3 36 B6 17 43 B2 43 AA 31 |. 6050..6..C.C.1|
00002ED0: 32 38 20 3A 20 97 20 4E 2C 43 20 3A 20 89 20 36 |28 : . N,C : . 6|
00002EE0: 30 35 30 00 E9 36 C0 17 3A 00 0E 37 D4 17 8F 20 |050..6..:..7... |
00002EF0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002F00: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 2E |**************..|
00002F10: 37 DE 17 8F 20 50 45 52 46 4F 52 4D 20 47 4F 20 |7... PERFORM GO |
00002F20: 54 4F 20 45 4E 44 20 4F 46 20 46 49 4C 45 00 53 |TO END OF FILE.S|
00002F30: 37 E8 17 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |7... ***********|
00002F40: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002F50: 2A 2A 2A 00 65 37 F2 17 4E 20 B2 20 54 53 AA CC |***.e7..N . TS..|
00002F60: 28 45 4F 46 29 00 71 37 FC 17 CF 20 32 35 33 2C |(EOF).q7... 253,|
00002F70: 4E 00 8C 37 06 18 81 20 58 20 B2 20 31 20 A4 20 |N..7... X . 1 . |
00002F80: 32 31 20 3A 20 9E 20 35 31 34 33 37 00 B1 37 0B |21 : . 51437..7.|
00002F90: 18 8B 20 CC 28 32 35 33 29 B3 B2 54 53 20 A7 3A |.. .(253)..TS .:|
00002FA0: CF 20 32 35 33 2C 54 53 20 3A 20 89 20 36 31 36 |. 253,TS : . 616|
00002FB0: 30 00 B9 37 0C 18 82 20 58 00 E3 37 10 18 9E 20 |0..7... X..7... |
00002FC0: 35 31 34 30 38 20 3A 20 CF 20 53 50 54 52 2C CC |51408 : . SPTR,.|
00002FD0: 28 32 35 33 29 20 3A 20 CF 20 32 35 33 2C 4E 20 |(253) : . 253,N |
00002FE0: 3A 20 8E 00 E9 37 1A 18 3A 00 0E 38 38 18 8F 20 |: ...7..:..88.. |
00002FF0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00003000: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 32 |**************.2|
00003010: 38 42 18 8F 20 46 49 4E 44 20 4F 52 20 53 45 41 |8B.. FIND OR SEA|
00003020: 52 43 48 20 43 4F 4E 54 52 4F 4C 20 4D 4F 44 55 |RCH CONTROL MODU|
00003030: 4C 45 00 57 38 4C 18 8F 20 2A 2A 2A 2A 2A 2A 2A |LE.W8L.. *******|
00003040: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00003050: 2A 2A 2A 2A 2A 2A 2A 00 91 38 56 18 D5 20 30 2C |*******..8V.. 0,|
00003060: 30 20 3A 20 99 20 22 20 20 20 20 20 20 20 20 20 |0 : . " |
00003070: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00003080: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 | "|
00003090: 3B 00 C3 38 5B 18 99 20 22 20 20 20 20 20 20 20 |;..8[.. " |
000030A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000030B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000030C0: 20 22 3B 00 E2 38 60 18 D5 20 30 2C 30 20 3A 20 | ";..8`.. 0,0 : |
000030D0: 99 20 22 46 49 4E 44 20 22 3B 20 4D 41 54 43 48 |. "FIND "; MATCH|
000030E0: 24 3B 00 F9 38 6A 18 D5 20 30 2C 35 20 3A 20 D3 |$;..8j.. 0,5 : .|
000030F0: 2E 85 20 4D 41 54 43 48 24 00 0C 39 6B 18 81 20 |.. MATCH$..9k.. |
00003100: 4E B2 37 35 20 A4 20 31 20 A9 AB 31 00 27 39 6C |N.75 . 1 ..1.'9l|
00003110: 18 8B 20 CA 28 4D 41 24 2C 4E 2C 31 29 B2 22 20 |.. .(MA$,N,1)." |
00003120: 22 20 A7 3A 82 20 4E 00 38 39 6D 18 4D 41 24 B2 |" .:. N.89m.MA$.|
00003130: C8 28 4D 41 24 2C 4E 29 00 4A 39 6E 18 58 B2 CC |.(MA$,N).J9n.X..|
00003140: 28 CE 28 4D 41 24 29 AA 31 29 00 60 39 6F 18 81 |(.(MA$).1).`9o..|
00003150: 20 4E B2 30 20 A4 20 C2 28 CE 28 4D 41 24 29 29 | N.0 . .(.(MA$))|
00003160: 00 82 39 70 18 8B 20 C2 28 58 AA 4E 29 B1 39 30 |..9p.. .(X.N).90|
00003170: 20 A7 20 97 20 58 AA 4E 2C C2 28 58 AA 4E 29 AA | . . X.N,.(X.N).|
00003180: 39 36 00 8A 39 71 18 82 20 4E 00 9D 39 74 18 97 |96..9q.. N..9t..|
00003190: 20 CE 28 46 24 29 2C C3 28 4D 41 24 29 00 BE 39 | .(F$),.(MA$)..9|
000031A0: 7E 18 81 20 4E 20 B2 20 CC 28 32 35 33 29 20 A4 |~.. N . .(253) .|
000031B0: 20 28 54 53 AA CC 28 45 4F 46 29 29 AB 31 00 D0 | (TS..(EOF)).1..|
000031C0: 39 88 18 CF 28 CE 28 46 24 29 AA 31 29 2C 20 4E |9...(.(F$).1), N|
000031D0: 00 E6 39 8A 18 8B 20 46 24 20 B2 20 4D 41 24 20 |..9... F$ . MA$ |
000031E0: A7 20 36 33 33 30 00 01 3A 8D 18 A1 20 43 24 20 |. 6330..:... C$ |
000031F0: 3A 20 8B 20 43 24 B2 22 58 22 20 A7 20 36 33 34 |: . C$."X" . 634|
00003200: 30 00 09 3A 92 18 82 20 4E 00 14 3A 97 18 89 20 |0..:... N..:... |
00003210: 36 33 34 30 00 20 3A BA 18 97 20 32 31 32 2C 30 |6340. :... 212,0|
00003220: 00 2B 3A C4 18 89 20 36 31 34 30 00 31 3A CE 18 |.+:... 6140.1:..|
00003230: 3A 00 56 3A 00 19 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |:.V:... ********|
00003240: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00003250: 2A 2A 2A 2A 2A 2A 00 75 3A 0A 19 8F 20 47 4F 20 |******.u:... GO |
00003260: 54 4F 20 53 54 41 52 54 20 4F 46 20 54 45 58 54 |TO START OF TEXT|
00003270: 20 46 49 4C 45 00 9A 3A 0F 19 8F 20 2A 2A 2A 2A | FILE..:... ****|
00003280: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00003290: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 B6 3A 14 19 CF |**********..:...|
000032A0: 32 35 33 2C 54 53 20 3A 20 CF 20 53 50 54 52 2C |253,TS : . SPTR,|
000032B0: 54 53 20 3A 20 8E 00 BC 3A 1E 19 3A 00 E1 3A 64 |TS : ...:..:..:d|
000032C0: 19 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.. *************|
000032D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000032E0: 2A 00 03 3B 6E 19 8F 20 52 45 53 45 54 20 4D 41 |*..;n.. RESET MA|
000032F0: 54 43 48 24 20 46 4F 52 20 46 49 4E 44 20 54 4F |TCH$ FOR FIND TO|
00003300: 20 22 22 00 28 3B 78 19 8F 20 2A 2A 2A 2A 2A 2A | "".(;x.. ******|
00003310: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00003320: 2A 2A 2A 2A 2A 2A 2A 2A 00 3C 3B 82 19 4D 41 54 |********.<;..MAT|
00003330: 43 48 24 20 B2 20 22 22 20 3A 20 8E 00 42 3B 8C |CH$ . "" : ..B;.|
00003340: 19 3A 00 67 3B C8 19 8F 20 2A 2A 2A 2A 2A 2A 2A |.:.g;... *******|
00003350: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00003360: 2A 2A 2A 2A 2A 2A 2A 00 7D 3B D2 19 8F 20 47 4F |*******.};... GO|
00003370: 20 54 4F 20 4E 45 58 54 20 57 4F 52 44 00 A2 3B | TO NEXT WORD..;|
00003380: DC 19 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |... ************|
00003390: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000033A0: 2A 2A 00 B1 3B E6 19 4E 20 B2 20 CC 28 32 35 33 |**..;..N . .(253|
000033B0: 29 00 C6 3B F0 19 43 20 B2 20 C2 28 4E 29 20 3A |)..;..C . .(N) :|
000033C0: 20 4E B2 4E AA 31 00 DF 3B FA 19 8B 20 43 B2 33 | N.N.1..;... C.3|
000033D0: 32 20 A7 3A CF 20 32 35 33 2C 4E 20 3A 20 8E 00 |2 .:. 253,N : ..|
000033E0: EA 3B 04 1A 89 20 36 36 34 30 00 F0 3B 0E 1A 3A |.;... 6640..;..:|
000033F0: 00 15 3C 2C 1A 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A |..<,.. *********|
00003400: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00003410: 2A 2A 2A 2A 2A 00 2F 3C 36 1A 8F 20 47 4F 20 54 |*****./<6.. GO T|
00003420: 4F 20 50 52 45 56 49 4F 55 53 20 57 4F 52 44 00 |O PREVIOUS WORD.|
00003430: 54 3C 40 1A 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |T<@.. **********|
00003440: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00003450: 2A 2A 2A 2A 00 63 3C 4A 1A 4E 20 B2 20 CC 28 32 |****.c<J.N . .(2|
00003460: 35 33 29 00 78 3C 54 1A 43 20 B2 20 C2 28 4E 29 |53).x<T.C . .(N)|
00003470: 20 3A 20 4E B2 4E AB 31 00 8A 3C 5E 1A 8B 20 43 | : N.N.1..<^.. C|
00003480: B2 33 32 20 A7 20 36 37 37 30 00 95 3C 68 1A 89 |.32 . 6770..<h..|
00003490: 20 36 37 34 30 00 AA 3C 72 1A 43 20 B2 20 C2 28 | 6740..<r.C . .(|
000034A0: 4E 29 20 3A 20 4E B2 4E AB 31 00 C5 3C 7C 1A 8B |N) : N.N.1..<|..|
000034B0: 20 43 B2 33 32 20 A7 3A CF 20 32 35 33 2C 4E AA | C.32 .:. 253,N.|
000034C0: 32 20 3A 20 8E 00 D0 3C 86 1A 89 20 36 37 37 30 |2 : ...<... 6770|
000034D0: 00 D6 3C 8B 1A 3A 00 FB 3C 90 1A 8F 20 2A 2A 2A |..<..:..<... ***|
000034E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000034F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 14 3D 9A 1A |***********..=..|
00003500: 8F 20 44 45 4C 45 54 45 20 4C 49 4E 45 20 4D 4F |. DELETE LINE MO|
00003510: 44 55 4C 45 00 39 3D A4 1A 8F 20 2A 2A 2A 2A 2A |DULE.9=... *****|
00003520: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00003530: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 51 3D AE 1A 4E 20 |*********.Q=..N |
00003540: B2 20 CC 28 32 35 33 29 20 3A 20 42 53 20 B2 20 |. .(253) : BS . |
00003550: 4E 00 75 3D B8 1A 8B 20 C2 28 4E 29 20 B2 20 31 |N.u=... .(N) . 1|
00003560: 34 31 20 B0 20 C2 28 4E 29 20 B2 20 31 33 20 A7 |41 . .(N) . 13 .|
00003570: 20 36 38 36 30 00 8A 3D C2 1A 4E 20 B2 20 4E AA | 6860..=..N . N.|
00003580: 31 20 3A 20 89 20 36 38 34 30 00 AC 3D CC 1A 4E |1 : . 6840..=..N|
00003590: 20 B2 20 4E AA 31 20 3A 20 42 45 20 B2 20 4E 20 | . N.1 : BE . N |
000035A0: 3A 20 8D 20 34 38 32 35 20 3A 20 8E 00 B2 3D D6 |: . 4825 : ...=.|
000035B0: 1A 3A 00 D7 3D F4 1A 8F 20 2A 2A 2A 2A 2A 2A 2A |.:..=... *******|
000035C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000035D0: 2A 2A 2A 2A 2A 2A 2A 00 F8 3D FE 1A 8F 20 43 48 |*******..=... CH|
000035E0: 41 4E 47 45 20 54 4F 20 4F 54 48 45 52 20 44 49 |ANGE TO OTHER DI|
000035F0: 53 4B 20 44 52 49 56 45 00 1D 3E 08 1B 8F 20 2A |SK DRIVE..>... *|
00003600: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00003610: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 39 3E |*************.9>|
00003620: 12 1B 8B 20 44 45 56 20 B2 20 38 20 A7 20 44 45 |... DEV . 8 . DE|
00003630: 56 20 B2 20 39 20 3A 20 8E 00 49 3E 1C 1B 44 45 |V . 9 : ..I>..DE|
00003640: 56 20 B2 20 38 20 3A 20 8E 00 4F 3E 21 1B 3A 00 |V . 8 : ..O>!.:.|
00003650: 74 3E 26 1B 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |t>&.. **********|
00003660: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00003670: 2A 2A 2A 2A 00 8D 3E 27 1B 8F 20 53 4F 55 4E 44 |****..>'.. SOUND|
00003680: 20 42 4C 45 45 50 20 4D 4F 44 55 4C 45 00 B2 3E | BLEEP MODULE..>|
00003690: 28 1B 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |(.. ************|
000036A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000036B0: 2A 2A 00 CE 3E 29 1B 97 20 35 34 32 39 36 2C 31 |**..>).. 54296,1|
000036C0: 35 20 3A 20 97 20 35 34 32 37 37 2C 31 35 00 F7 |5 : . 54277,15..|
000036D0: 3E 2A 1B 97 20 35 34 32 37 36 2C 31 37 20 3A 20 |>*.. 54276,17 : |
000036E0: 97 20 35 34 32 37 33 2C 36 33 20 3A 20 97 20 35 |. 54273,63 : . 5|
000036F0: 34 32 37 32 2C 37 35 00 0E 3F 2B 1B 81 20 54 20 |4272,75..?+.. T |
00003700: B2 20 30 20 A4 20 37 30 20 3A 20 82 20 54 00 34 |. 0 . 70 : . T.4|
00003710: 3F 2C 1B 97 20 35 34 32 37 36 2C 30 20 3A 20 97 |?,.. 54276,0 : .|
00003720: 20 35 34 32 37 33 2C 30 20 3A 20 97 20 35 34 32 | 54273,0 : . 542|
00003730: 37 32 2C 30 00 3A 3F 2D 1B 8E 00 40 3F 2E 1B 3A |72,0.:?-...@?..:|
00003740: 00 00 00 |... |
....... 20.....L.L.1.0.2.. L.1 . . "TOP.
EXE",8,1.@.<.. 2049.6,54.F.D.. ---------
----------------------...E.. QUIKWORD BA
SIC ENVIRONMENT...F.. EXPANDABLE WORD PR
OCESSOR..H.G.. (C) 1989 ARGUS SPECIALIST
...H.. PUBLICATIONS INCLUDING RAM...I..
BASIC INTERPRETER & NEW.!.J.. EXTENSION
KEYWORDS..G.K.. ------------------------
-------.^.N.. 650,255 : . 1,54...X.. 505
92,234 : . CORRECT LINE.INPUT# ROUTINE..
.}.. 50477,3 : . CORR TO LINE.W...O 51,2
4573 : O 55,24573 : . 24574,141.....O 78
5,51084 : . USR JMP.....:...... --------
-----------------------.:. .. DEFINE TEX
T POINTERS.`.... -----------------------
--------.|...TS . 24575 : TE . 40959.E..
.SPTR . 51073 : EOF . 51075 : INS . 5107
7 : HME . 51079 : CSR . 51081.....BS . T
S : BE . TS...B.C$ . "" : C . 0 : N . 0
: IN$ . "".".D.H(0).TS : IS . TE : SS .
15.8.E.DEV . 8 : F$ . "".>.F.:.D.H.. ---
----------------------------.}.R.. DEFIN
E CDA STRINGS...... --------------------
-----------.W...C0$."...................
......................".....C1$.".COMMAN
D ".?...
C2$.".
".S...C3$.".CSR EOF IN
S HME ".....C4$."CAN'T, "...
..C5$."NO BLOCK" : C6$."STACK FULL".V...
C7$."SAVE AS " : C8$."DUMP SCREEN AS "..
...CF$.".L/A/S/D/E/V/C/N/O?".....CB$.".S
/E/C/M/D/F?".,...CT$.".T/W/C/S/E/F/R/N/P
/L?".R.".. 51108,134 : . USR1 MATCHES [F
2].X.'.:.~.,.. -------------------------
------...6.. INITIALISE BUFFER & SCREEN.
E.@.. -------------------------------...
J.. L(EOF).0 .:. TS,(TE.TS),141...T.O 53
280,2313 : . 55296,120,7 : . (55296.120)
,880,1.*.^.O CSR,0.B.H.O SPTR,TS : O 251
,TS : O 253,TS : O INS,0 : O HME,0...R..
B(51083).0 . FILE$."INTRO" : . 2750 : .
700...|.:...... ***********************
********...... MAIN SYS COMMAND MODULE..
.... *******************************.!..
.CC$.".F/S/H/U/D/R/I/B?."...... G(14);.\
.B.. "."; C2$; C3$; C0$; : U 0,23 : . FI
LE$;.B.L.:.N.V.. 51253.{...C . .(X).....
:...... C . 133 . 610...... C . 3 . ....
... C . 148 . . 3700.R.... C . 20 . . 38
00...... C . 19 . . 3900...... C . 134 .
. 5600...N.:...X.. 470.0.B.. "."; C1$;
: U 0,8 : . CC$;.:.L.. 900.M.V.. N.1 . C
(CC$).G.... C$.J(CC$,N,1) . 660.O.... N.
Z.... 6950...... N . 0,2600,0,3400,0,400
0,0,3500,0,3600,0,700,0,4100,0,4300.E...
. 450.K...:...... **********************
*********...F.. REFORMAT FROM TS TO EOF.
5.P.. *******************************.S.
Z.O 53,TS : O 251,TS.L(EOF)...... 50986
: N . TS.L(EOF) : . N.1, IS.N.1, 141 : .
.....:... .. ***************************
****.K.*.. DUMMY SUBROUTINE...4.. FOR UN
DEFINED 'ON' STATEMENTS...>.. **********
*********************...H...!.R.:.G....
*******************************.L.... GE
T KEY CHARACTER, ANY PURPOSE...... *****
**************************...... C$ : .
C$."" . 930.....C . F(C$) : ..C...:.....
. ******************************...... G
ET & DISPLAY DISK DIRECTORY.#....
MODULE.H.... **********************
********.V...."..";:.785,93:.786,207:. S
ET-UP USR JUMP...... 15,DEV,15,"":.15,"I
"......3,DEV,0,"$*=S"...$..#3,X$ : .#3,X
$ : A.1.S....781,3:.53125:....3.."------
---------------------------------."...8.
. 2000 : . 2200.,.=.. K$.."X" . 1090.2.>
.W.=.?.. 1120.Q.B..K$.."M" . 1120.B.L.."
.";:. 2540.{.V.."..";FILE$ : . 1075...`.
3:S..15,ERR$. .B..15,"U9": 15...E.. K
$.."X" . . 2500...J...C.T.:...P.. ******
************************...Z.. GET IN DI
RECTORY NAMES.*.... ********************
**********.I....781,3:. X REG. = CHNL NO
..D....53125 : . CALL GETDIR.}.... A.0 .
A.1:.:. 2070.....A.0:..20)"";...... ST.
.0 . 2100 : . EOF.A. ..K$:. K$."S" . 210
0.X.%.T.T.A:.T..22.T.0:....*.. 2040 : .
DO NEXT LINE...4.....>.:.%.... *********
*********************.9.... DO HIGHLIGHT
S.^.... ******************************..
...SK.1104:SC.SK:TV.0:TB.0:K$.""......65
484 : . RESET DEFAULT I/O...J.. 2400: .
CALL INVERT.U.T..X.32.TV.0.TV.0:.2330...
...K$:.K$."".2270...... K$."X" . .. ....
(K$.".".K$.".").TB.0.TB.20:.2330.@....(K
$.".".K$.".").TB.20.TB.0.B....K$.".".TV.
TV.40:.TV.880.TV.0......K$.".".TV.TV.40:
.TV.0.TV.880......K$.G(13).K$."M" . ....
... 2400:SC.SK.TV.TB:.2250...$.:...`.. *
*****************************...J.. INVE
RSE FILENAME.!.T.. *********************
*********.1.~.X..(SC) : ..7...:.\.D.. **
****************************.~.N.. EXTRA
CT FILENAME INTO FILE$...X.. ***********
*******************......783,0:.782,TB:.
781,(TV.40).2:.65520:. PLOT TO SCREEN...
...631,13:.198,1:.2,0:.2,FILE$: 2.$....N
.16.1..1:.J(FI$,N,1)." ".:.N.9...FILE$.H
(FILE$,N).?.....E...:.J.(.. ************
******************...2.. DISK FILE HANDL
ING MODULE...<.. ***********************
*******.B.K.U 0,0 : . C2$;...P.U 0,0 : .
".FILE "; CF$;...Z.. 900...D.. N . 1 .
C(CF$)...N.. C$.J(CF$,N,1) . 2690.!.X..
N.,.}.. 6950.U.... N . 0,2700,0,2800,0,2
900,0,5400,0,5300,0,3300,0,3100,0,3200,0
,6900.....O 785,51084 : . USR JMP.E....
55296,120,7 : . (55296.120),880,1 : . 70
0 : ..K...:...... **********************
********...... LOAD TEXT FILE.*. .. ****
**************************.5.... 1000.N.
..O 253,TS : . 51083,0.O.H.. 2,DEV,2, FI
LE$ : . 51638,2...R. 2 : O SPTR,TS : O
EOF,(L(253).TS).1 : O 253,TS...........:
.U.... ******************************...
... APPEND TEXT FILE...... *************
*****************.....C$.FILE$.).... 100
0.K.".O 253,(TS.L(EOF)) : . 51083,0.L.,.
. 2,DEV,2, FILE$ : . 51638,2.Y.1.FILE$.C
$...6.. 2770...@.:...T.. ***************
***************.K.^.. SAVE TEXT FILE AS
SEQ...H.. ******************************
...K.U 0,0 : . C2$;...M.U 1,0 : . C2$;.)
.R.U 0,0 : . C7$;.C.|.. C(FILE$) . 0 . 2
960.R...S.. FILES$...... 2550 : . 2970 :
. USE LAST PART OF "EXTRACT" TO "CRUNCH
" FILE$...... FILE$;...... 15,DEV,15.J..
.C$ . FILE$.",W,S"...... 2,DEV,2, C$ : .
51083,1.....S..15,ERR$ : . E(ERR$).63 .
. 3000.=...N . L(253) : O 253,TS : O 25
1,(TS.L(EOF)).F.... 51638,2 : 2 : 15
: O 253,N : ..L...:...... *************
*****************...B.. AUTO DELETE EXIS
TING FILE.V.L.. ************************
******...V.ERR$ . "S0:".FILE$..... 2 :
.15,ERR$ : S..15,ERR$.#.... 2,DEV,2, C$
: ..)...:.N.... ************************
******.P.&.. CLEAR TEXT AND RESET AS NEW
...0.. ******************************...
:.U 0,0 : . C2$;...D.U 0,0 : . "CLEAR TE
XT & RESET (Y/N) ?"; : . 6950...N.. 900
: . C$.."Y" . ... L.O EOF,0 : ... V.:.2
... ******************************.N ...
CREATE DISK FILE NAME.S ... ***********
*******************.. ..U 0,0 : . C2$; C
2$;.. ..U 0,0 : . ".NAME "; FILE$; : U 0
,5 : S.. FILES$.N ... 2550 : ..T ..:.. .
.. ******************************..!...
VIEW FILE AND PRESERVE FILE$.A!... *****
*************************.J!..C$ . FILE$
: . 1000 : FILE$ . C$ : ..P!..:..!H.. *
*****************************..!R.. ASK
SCROLL VALUE.Q!\.. *********************
*********..!F.U 0,0 : . C2$;.."P.U 0,0 :
. ".SCROLL"; SS.."Z.U 0,7 : S.. IN$.$".
.SS . E(IN$).;"... SS ..0 . SS . 15.A"..
..G"..:.L"... **************************
****.."... SCROLL SCREEN UP BY SCL.."...
******************************.A"J.O 25
3,L(SPTR).R"T.. N . 1 . SS.."... 51437 :
. L(253)..TS . 3590.."... N..#... 51437
: . 51408.(#..O SPTR,L(253) : ..E#..O S
PTR,TS : O 253,TS : ..J#... ************
******************..#... SCROLL SCREEN D
OWN BY SCL..#$.. ***********************
*******.A#..O 253,L(SPTR).R#8.. N . 1 .
SS..#B.. 51408 : . L(253)..(TS.L(EOF)) .
3670..$L.. N..$V.O SPTR,L(253) : ..!$`.
:.F$T.. ******************************.D
$~.. INSERT SINGLE CHARACTER..$... *****
*************************..$..N . L(253)
: NL . L(EOF).L(CSR)..$..R N, N.1, NL..
$... N, 32 : O EOF,L(EOF).1 : ...$..:..%
X.. ******************************.(%...
DELETE SINGLE CHARACTER.M%... *********
*********************.Q%..N . L(253) : N
L . L(EOF).L(CSR)..%... N..TS . ...%..R
N.1, N, NL.2..%..O EOF,L(EOF).1..%..O 25
3,L(253).1 : ..D%..:..%<.. *************
*****************..&F.. PULL HOME STACK
& PERFORM HME.2&P.. ********************
**********.\&Z.N . L(HME) : O SPTR,H(N)
: O 253,H(N).Z&D.N . N . 1 : . N.0 . N .
0..&N.O HME,N : ...&X.:..& .. *********
*********************.Z&... PUSH HOME ST
ACK WITH SCN. ADDR..&... ***************
***************.''..N . L(HME) : N.N.1 :
. N..10 . 4050.2'C.. 6950.G'H.U 0,0 : .
C2$; : U 0,0 : . C4$; C6$; : . 900 : ..
.'R.O HME,N : H(N).L(SPTR) : ...'..:..'.
.. ******************************.L'...
TOGGLE INSERT MODE -..'... MOVE TEXT FRO
M CURSOR TO EOF..(".. ******************
************.,(,.. L(INS) . 0 . 4190.A(6
.N . L(253) : IL . (TS.L(EOF)) . N : IS
. TE . IL..(@.R IS, N.1, IL : . N, IS.N,
141..(J.O EOF, N.TS : O INS, 1 : ..H(T.
. ------------------------------..(^.N .
TS.L(EOF) : R N, IS.1, IL : O EOF, L(EO
F).IL. )H.O INS, 0 : IS . TE : . 700 : .
.&)R.:.K)L.. ***************************
***.F)V.. BLOCK COMMAND MODULE..)... ***
***************************..)..CX$.".S/
E/C/M/D/F?".Q)..U 0,0 : . C2$; : U 0,0 :
. "BLOCK "; CB$;..)... 900..)... N . 1
. C(CB$)..*... C$ . J(CB$,N,1) . 4390..*
... N. *!.. 6950.T*&.. N . 0,4500,0,4600
,0,4900,0,5000,0,4800,0,5200.Z*0...`*:.:
..*... ******************************..*
... DEFINE BLOCK START.C*... ***********
*******************.W*..BS . L(253) : ..
.*..:..+... ****************************
**..+... DEFINE BLOCK END.>+... ********
**********************.R+..BE . L(253) :
..X+ .:.}+\.. *************************
*****..+F.. CHECK BLOCK DEFINED OK..+K..
ABORT OPERATION IF NOT..+P.. **********
********************..,Z.. (BS..TS . BE.
.TE) . BS . BE . ...,.. 6950.>,..U 0,0
: . C2$; : U 0,0 : . C4$; C5$; : . 900.D
,..W.J,....P,..:.U,... *****************
*************..,J.. DELETE DEFINED BLOCK
..,T.. ******************************..,
W.. 4700..,Y.N . TS.L(EOF) : L . BE.BS..
,..R BS, BE, N.BE..-... N.L, L, 141..-..
O EOF, (L(EOF).L)./-..BS . TS : BE . TS.
V-... L(CSR).L(EOF) .:O 253, TS.L(EOF).\
-....B-..:..-$.. ***********************
*******. -... COPY DEFINED BLOCK.E-8.. *
*****************************.P-B.. 4700
..-L.N . TS.L(EOF) : L . BE.BS..-V.C . L
(253)...`.R IS.L, BS.1, L.).J.R (C.L).1,
C.1, N.C.>.O.R C, (IS.1).L, L.R.T.O EOF
, L(EOF).L.X.~...^...:...... ***********
*******************...... MOVE DEFINED B
LOCK.A.... *****************************
*.L.... 4700.....N . TS.L(EOF) : L . BE.
BS.....C . L(253)../D.R IS.L, BS.1, L.*/
N.. C..BE .:R BS, BE, C.BE.J/X.. C..BS .
:R(C.L).1,C.1,BS.C.I/... C..BE .:R C.L,(
IS.1).L,L../... C..BS .:R C, (IS.1).L, L
../..BS . TS : BE . TS../...../..:.O/P..
******************************../Z.. FI
LE OR SAVE DEFINED BLOCK..0D.. *********
*********************. 0N.. 4700.90X.TS
. BS : X . L(EOF).U0..B$ . FILE$ : FILE$
. "".H0..O EOF, BE.BS.1.S0... 2900..0 .
TS . 24575 : O EOF, X..0..BS . TS : BE .
TS : FILE$ . B$..0.....0..:..0... *****
*************************..0... ERASE DI
SK FILE MODULE.#1H.. *******************
***********.;1R.C$ . FILE$ : . 1000.K1..
. 15,DEV,15.A1..X$ . "S0:".FILES$.M1...1
5, X$.}1..S..15, ERR$..1.. 15 : FILE$ .
C$ : ...1..:.B1... ********************
**********..1".. DUMP SCREEN TO DISK AS
PRG..2,.. ******************************
. 26.U 0,0 : . C2$; C2$;.32@.U 0,0 : . C
8$;.N2J.C$ . FILE$ : S.. FILE$.Y2T.. 255
0.Z2^.. 15,8,15 : X$ . "S0:".FILE$..2H.Z
FILE$, 8, 2, 1144, 2024 : S..15, ERR$.L
2R.. E(ERR$) . 63 . .15, X$ : . 5480..2|
. 15 : FILE$ . C$ : ...2..:..3... *****
*************************.+3... TEXT COM
MAND MODULE.P3... **********************
********.}3..U 0,0 : . C2$; : U 0,0 : .
"TEXT "; CT$;..3... 900..3... N . 1 . C(
CT$)..3... C$ . J(CT$,N,1) . 5680.A3&..
N.L3+.. 6950..30.. N.20 . . 6800 : . 569
0.245.. N . 0,5800,0,5900,0,6000,0,6400,
0,6100,0,6200,0,6500,0,6600,0,6700.84:.W
.B4D.. 450.H4N.:.M4... *****************
*************..4... TRANSPOSE TWO CHARAC
TERS..4... *****************************
*.K4F.N . L(253) : C . B(N)..4P.. N, B(N
.1) : . N.1,C..4Z....4..:..5... ********
**********************.75... DELETE WORD
FROM CURSOR ON.\5 .. ******************
************.U5*.BS . L(253) : N . BS..5
4.C . B(N)..5>.. C.32 . C.13 . C.141 . 5
970..5H.N.N.1 : . 5940.N5R.BE.N.1 : . 48
25 : ..T5\.:..5P.. *********************
*********..6Z.. CHANGE CASE OF SINGLE CH
AR..@6... ******************************
.Z6..N . L(253) : C . B(N).W6... C..193
. C..218 . 6060..6... C..65 . C..90 . 60
70..6..O 253,L(253).1 : ..F6..C.C.128 :
. N,C : . 6050..6..C.C.128 : . N,C : . 6
050..6..:..7T.. ************************
******..7... PERFORM GO TO END OF FILE.S
7... ******************************.E7..
N . TS.L(EOF).Q7..O 253,N..7... X . 1 .
21 : . 51437..7... L(253)..TS .:O 253,TS
: . 6160..7... X..7... 51408 : O SPTR,L
(253) : O 253,N : ...7..:..88.. ********
**********************.28B.. FIND OR SEA
RCH CONTROL MODULE.W8L.. ***************
***************..8V.U 0,0 : . "
";.C8[..
"
";..8`.U 0,0 : . "FIND "; MATCH$;..8J.U
0,5 : S.. MATCH$..9K.. N.75 . 1 ..1.'9L
.. J(MA$,N,1)." " .:. N.89M.MA$.H(MA$,N)
.J9N.X.L(N(MA$).1).`9O.. N.0 . B(N(MA$))
..9P.. B(X.N).90 . . X.N,B(X.N).96..9Q..
N..9T.. N(F$),C(MA$)..9~.. N . L(253) .
(TS.L(EOF)).1.P9..O(N(F$).1), N..9... F
$ . MA$ . 6330..:... C$ : . C$."X" . 634
0..:... N..:... 6340. :... 212,0.+:D.. 6
140.1:N.:.V:... ************************
******.U:... GO TO START OF TEXT FILE..:
... ******************************..:..O
253,TS : O SPTR,TS : ...:..:..:D.. *****
*************************..;N.. RESET MA
TCH$ FOR FIND TO "".(;X.. **************
****************.<;..MATCH$ . "" : ..B;.
.:.G;H.. ******************************.
};R.. GO TO NEXT WORD..;... ************
******************..;..N . L(253).F;..C
. B(N) : N.N.1..;... C.32 .:O 253,N : ..
.;... 6640..;..:..<,.. *****************
*************./<6.. GO TO PREVIOUS WORD.
T<@.. ******************************.C<J
.N . L(253).X<T.C . B(N) : N.N.1..<^.. C
.32 . 6770..<H.. 6740..<R.C . B(N) : N.N
.1.E<|.. C.32 .:O 253,N.2 : ..P<... 6770
.V<..:..<... ***************************
***..=... DELETE LINE MODULE.9=... *****
*************************.Q=..N . L(253)
: BS . N.U=... B(N) . 141 . B(N) . 13 .
6860..=B.N . N.1 : . 6840..=L.N . N.1 :
BE . N : . 4825 : ...=V.:.W=... *******
***********************..=... CHANGE TO
OTHER DISK DRIVE..>... *****************
*************.9>... DEV . 8 . DEV . 9 :
..I>..DEV . 8 : ..O>!.:.T>&.. **********
********************..>'.. SOUND BLEEP M
ODULE..>(.. ****************************
**.N>).. 54296,15 : . 54277,15..>*.. 542
76,17 : . 54273,63 : . 54272,75..?+.. T
. 0 . 70 : . T.4?,.. 54276,0 : . 54273,0
: . 54272,0.:?-...@?..:...
> CLICK IMAGE PREVIEW FOR FULL MODAL