DASM EDITOR
FILE INFORMATION
FILENAME(S): DASM EDITOR
FILE TYPE(S): PRG
FILE SIZE: 8K
FIRST SEEN: 2025-10-19 22:48:24
APPEARS ON: 1 disk(s)
FILE HASH
2a08f4cc58c6d8f6ffe733eb381f37d8a84d250489d9c101bdce06129339a92e
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| USER 64 | DASM EDITOR | PRG | Radd Maxx | 28 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 04 26 04 0A 00 8F 20 2A 2A 2A 2A 2A 2A 2A 20 |..&.... ******* |
00000010: 44 41 53 4D 20 2D 20 45 44 49 54 4F 52 20 2A 2A |DASM - EDITOR **|
00000020: 2A 2A 2A 2A 2A 2A 00 4B 04 14 00 8F 20 2A 20 20 |******.K.... * |
00000030: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000040: 20 20 20 20 20 20 20 20 20 20 2A 00 70 04 1E 00 | *.p...|
00000050: 8F 20 2A 20 20 20 20 42 59 20 52 4F 42 45 52 54 |. * BY ROBERT|
00000060: 20 42 41 4B 45 52 20 20 20 20 20 20 20 20 20 2A | BAKER *|
00000070: 00 95 04 28 00 8F 20 2A 20 20 20 20 20 20 20 20 |...(.. * |
00000080: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000090: 20 20 20 20 2A 00 BA 04 32 00 8F 20 2A 2A 2A 2A | *...2.. ****|
000000A0: 2A 20 56 31 2E 32 20 2A 2A 2A 2A 20 30 38 2F 30 |* V1.2 **** 08/0|
000000B0: 31 2F 38 31 20 2A 2A 2A 2A 2A 00 C0 04 3C 00 3A |1/81 *****...<.:|
000000C0: 00 C6 04 46 00 3A 00 EC 04 50 00 99 22 93 22 3B |...F.:...P..".";|
000000D0: A6 38 29 3B 22 12 44 20 41 20 53 20 4D 20 20 20 |.8);".D A S M |
000000E0: 45 20 44 20 49 20 54 20 4F 20 52 22 00 21 05 5A |E D I T O R".!.Z|
000000F0: 00 9C 3A 55 24 B2 22 11 C0 C0 C0 C0 C0 C0 C0 C0 |..:U$.".........|
00000100: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000110: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000120: 91 00 52 05 64 00 42 24 B2 22 20 20 20 20 20 20 |..R.d.B$." |
00000130: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000140: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000150: 20 22 00 9A 05 6E 00 51 24 28 31 29 B2 22 12 43 | "...n.Q$(1).".C|
00000160: 52 45 41 54 45 92 22 3A 51 24 28 32 29 B2 22 12 |REATE.":Q$(2).".|
00000170: 20 45 44 49 54 20 92 22 3A 51 24 28 33 29 B2 22 | EDIT .":Q$(3)."|
00000180: 12 20 43 4F 50 59 20 92 22 3A 51 24 28 34 29 B2 |. COPY .":Q$(4).|
00000190: 22 12 20 52 45 41 44 20 92 22 00 BB 05 78 00 51 |". READ ."...x.Q|
000001A0: 24 28 35 29 B2 22 12 50 52 49 4E 54 20 92 22 3A |$(5).".PRINT .":|
000001B0: 51 24 28 36 29 B2 51 24 28 35 29 00 D7 05 82 00 |Q$(6).Q$(5).....|
000001C0: 9F 20 31 35 2C 38 2C 31 35 3A 43 52 24 B2 C7 28 |. 15,8,15:CR$..(|
000001D0: 31 33 29 3A 99 55 24 00 F1 05 8C 00 99 22 20 20 |13):.U$......" |
000001E0: 20 30 20 20 C0 20 20 12 20 44 4F 4E 45 20 22 3A | 0 . . DONE ":|
000001F0: 99 00 22 06 96 00 99 22 20 20 20 31 20 20 C0 20 |.."...." 1 . |
00000200: 20 22 3B 51 24 28 31 29 3B 22 20 C0 C0 C0 C0 20 | ";Q$(1);" .... |
00000210: 4E 45 57 20 53 4F 55 52 43 45 20 46 49 4C 45 22 |NEW SOURCE FILE"|
00000220: 3A 99 00 5C 06 A0 00 99 22 20 20 20 32 20 20 C0 |:..\...." 2 .|
00000230: 20 20 22 3B 51 24 28 32 29 3B 22 20 C0 C0 AE 22 | ";Q$(2);" ..."|
00000240: 3A 99 20 A6 31 38 29 3B 22 AB C0 20 4F 4C 44 20 |:. .18);".. OLD |
00000250: 53 4F 55 52 43 45 20 46 49 4C 45 22 00 84 06 AA |SOURCE FILE"....|
00000260: 00 99 22 20 20 20 33 20 20 C0 20 20 22 3B 51 24 |.." 3 . ";Q$|
00000270: 28 33 29 3B 22 20 C0 C0 B3 22 3A 99 A6 31 38 29 |(3);" ...":..18)|
00000280: 3B 22 DD 22 00 AC 06 B4 00 99 22 20 20 20 34 20 |;"."......" 4 |
00000290: 20 C0 20 20 22 3B 51 24 28 34 29 3B 22 20 C0 C0 | . ";Q$(4);" ..|
000002A0: B3 22 3A 99 A6 31 38 29 3B 22 DD 22 00 CC 06 BE |.":..18);"."....|
000002B0: 00 99 22 20 20 20 35 20 20 C0 20 20 22 3B 51 24 |.." 5 . ";Q$|
000002C0: 28 35 29 3B 22 20 C0 C0 BD 22 3A 99 00 F8 06 C8 |(5);" ...":.....|
000002D0: 00 99 22 20 20 20 36 20 20 C0 20 20 22 3B 51 24 |.." 6 . ";Q$|
000002E0: 28 36 29 3B 22 C0 C0 C0 C0 C0 20 4C 49 53 54 49 |(6);"..... LISTI|
000002F0: 4E 47 20 46 49 4C 45 22 00 1F 07 D2 00 99 20 55 |NG FILE"...... U|
00000300: 24 3A 99 22 53 45 4C 45 43 54 20 44 45 53 49 52 |$:."SELECT DESIR|
00000310: 45 44 20 46 55 4E 43 54 49 4F 4E 3A 20 22 3B 00 |ED FUNCTION: ";.|
00000320: 40 07 DC 00 8D 20 32 36 31 30 3A 46 B2 56 3A 8B |@.... 2610:F.V:.|
00000330: 20 52 24 B2 22 30 22 20 A7 20 99 22 93 22 3A 80 | R$."0" . .".":.|
00000340: 00 56 07 E6 00 8B 20 46 B3 31 20 B0 20 46 B1 36 |.V.... F.1 . F.6|
00000350: 20 A7 20 32 32 30 00 70 07 F0 00 8D 20 32 32 35 | . 220.p.... 225|
00000360: 30 3A 8B 20 46 B1 34 20 A7 20 8D 20 32 33 31 30 |0:. F.4 . . 2310|
00000370: 00 80 07 FA 00 8B 20 46 B1 33 20 A7 20 32 37 30 |...... F.3 . 270|
00000380: 00 BA 07 04 01 99 22 44 4F 20 59 4F 55 20 57 41 |......"DO YOU WA|
00000390: 4E 54 20 41 20 50 52 49 4E 54 45 44 20 43 4F 50 |NT A PRINTED COP|
000003A0: 59 22 3B 3A 8D 20 32 36 33 30 3A 8B 20 41 B2 38 |Y";:. 2630:. A.8|
000003B0: 39 20 A7 20 8D 20 32 33 31 30 00 E1 07 0E 01 91 |9 . . 2310......|
000003C0: 20 46 20 89 20 33 31 30 2C 31 35 34 30 2C 31 38 | F . 310,1540,18|
000003D0: 31 30 2C 32 30 38 30 2C 32 30 38 30 2C 31 39 37 |10,2080,2080,197|
000003E0: 30 00 FE 07 18 01 8F 20 3D 3D 3D 3D 3D 3D 3D 3D |0...... ========|
000003F0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 1B |==============..|
00000400: 08 22 01 8F 20 43 52 45 41 54 45 20 4E 45 57 20 |.".. CREATE NEW |
00000410: 53 4F 55 52 43 45 20 46 49 4C 45 00 38 08 2C 01 |SOURCE FILE.8.,.|
00000420: 8F 20 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |. ==============|
00000430: 3D 3D 3D 3D 3D 3D 3D 3D 00 52 08 36 01 8D 20 32 |========.R.6.. 2|
00000440: 33 32 30 3A 46 4C 24 B2 46 4C 24 AA 22 2E 53 52 |320:FL$.FL$.".SR|
00000450: 43 22 00 84 08 40 01 9F 20 32 2C 38 2C 32 2C 44 |C"...@.. 2,8,2,D|
00000460: 52 24 AA 22 3A 22 AA 46 4C 24 AA 22 2C 53 2C 57 |R$.":".FL$.",S,W|
00000470: 22 3A 8D 20 32 34 34 30 3A 8B 20 45 4E 20 A7 20 |":. 2440:. EN . |
00000480: 32 32 31 30 00 8F 08 4A 01 8D 20 32 32 35 30 00 |2210...J.. 2250.|
00000490: 97 08 54 01 4E B2 31 00 BA 08 5E 01 4C 24 B2 22 |..T.N.1...^.L$."|
000004A0: 22 3A 43 24 B2 4C 24 3A 4F 24 B2 4C 24 3A 54 24 |":C$.L$:O$.L$:T$|
000004B0: B2 4F 24 3A 8D 20 32 34 37 30 00 CC 08 68 01 8F |.O$:. 2470...h..|
000004C0: 20 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 DE 08 72 | ===========...r|
000004D0: 01 8F 20 4C 41 42 45 4C 20 46 49 45 4C 44 00 F0 |.. LABEL FIELD..|
000004E0: 08 7C 01 8F 20 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |.|.. ===========|
000004F0: 00 04 09 86 01 99 3A 99 22 91 22 3B A3 37 29 3B |......:.".";.7);|
00000500: 3A 43 B2 31 00 23 09 90 01 8D 20 32 36 36 30 3A |:C.1.#.... 2660:|
00000510: 8B 20 43 B2 31 20 AF 20 41 B2 34 32 20 A7 20 31 |. C.1 . A.42 . 1|
00000520: 30 39 30 00 34 09 9A 01 8B 20 41 B2 33 32 20 A7 |090.4.... A.32 .|
00000530: 20 36 30 30 00 56 09 A4 01 53 24 B2 4C 24 3A 8B | 600.V...S$.L$:.|
00000540: 20 28 41 B1 36 34 29 20 AF 20 28 41 B3 39 31 29 | (A.64) . (A.91)|
00000550: 20 A7 20 35 35 30 00 79 09 AE 01 8B 20 28 43 B1 | . 550.y.... (C.|
00000560: 31 29 20 AF 20 28 41 B1 34 37 29 20 AF 20 28 41 |1) . (A.47) . (A|
00000570: B3 35 38 29 20 A7 35 35 30 00 92 09 B8 01 8B 20 |.58) .550...... |
00000580: 41 B2 31 36 30 20 B0 20 42 B2 31 37 20 A7 20 33 |A.160 . B.17 . 3|
00000590: 39 30 00 AB 09 C2 01 8B 20 42 B2 31 33 20 B0 20 |90...... B.13 . |
000005A0: 42 B2 31 39 20 A7 20 31 33 37 30 00 C0 09 CC 01 |B.19 . 1370.....|
000005B0: 8B 20 41 B2 31 35 37 20 A7 20 8D 20 32 37 31 30 |. A.157 . . 2710|
000005C0: 00 D4 09 D6 01 8B 20 41 B2 32 39 20 A7 20 8D 20 |...... A.29 . . |
000005D0: 32 36 39 30 00 F2 09 E0 01 54 B2 36 3A 8B 20 41 |2690.....T.6:. A|
000005E0: B2 32 30 20 A7 20 8D 20 32 37 33 30 3A 89 20 35 |.20 . . 2730:. 5|
000005F0: 36 30 00 13 0A EA 01 8B 20 28 41 B3 B1 31 34 38 |60...... (A..148|
00000600: 29 20 B0 20 28 C3 28 4C 24 29 B1 35 29 20 A7 20 |) . (.(L$).5) . |
00000610: 34 30 30 00 1E 0A F4 01 8D 20 32 37 37 30 00 3F |400...... 2770.?|
00000620: 0A FE 01 8D 20 32 36 36 30 3A 8B 20 41 B2 31 34 |.... 2660:. A.14|
00000630: 31 20 B0 20 42 B2 31 39 20 A7 20 31 33 37 30 00 |1 . B.19 . 1370.|
00000640: 5B 0A 08 02 8B 20 28 41 B1 36 34 29 20 AF 20 28 |[.... (A.64) . (|
00000650: 41 B3 39 31 29 20 A7 20 35 34 30 00 7F 0A 12 02 |A.91) . 540.....|
00000660: 8B 20 28 43 B2 31 29 20 B0 20 28 41 B3 34 38 29 |. (C.1) . (A.48)|
00000670: 20 B0 20 28 41 B1 35 39 29 20 A7 20 35 31 30 00 | . (A.59) . 510.|
00000680: 90 0A 1C 02 8D 20 32 38 32 30 3A 89 20 35 36 30 |..... 2820:. 560|
00000690: 00 A3 0A 26 02 8B 20 43 B3 37 20 A7 20 8D 20 32 |...&.. C.7 . . 2|
000006A0: 35 34 30 00 B3 0A 30 02 4C 24 B2 53 24 3A 89 20 |540...0.L$.S$:. |
000006B0: 34 30 30 00 C7 0A 3A 02 8F 20 3D 3D 3D 3D 3D 3D |400...:.. ======|
000006C0: 3D 3D 3D 3D 3D 3D 3D 00 DB 0A 44 02 8F 20 43 4F |=======...D.. CO|
000006D0: 4D 4D 41 4E 44 20 46 49 45 4C 44 00 EF 0A 4E 02 |MMAND FIELD...N.|
000006E0: 8F 20 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 |. =============.|
000006F0: FF 0A 58 02 99 20 A3 31 35 29 3B 3A 43 B2 31 00 |..X.. .15);:C.1.|
00000700: 17 0B 62 02 8D 20 32 36 36 30 3A 8B 20 41 B2 33 |..b.. 2660:. A.3|
00000710: 32 20 A7 20 37 35 30 00 4A 0B 6C 02 53 24 B2 43 |2 . 750.J.l.S$.C|
00000720: 24 3A 8B 20 28 41 B1 33 32 29 20 AF 20 28 41 B3 |$:. (A.32) . (A.|
00000730: 39 36 29 20 AF 20 28 43 B3 36 29 20 A7 20 8D 20 |96) . (C.6) . . |
00000740: 32 35 34 30 3A 89 20 37 31 30 00 6D 0B 76 02 8B |2540:. 710.m.v..|
00000750: 20 28 42 B2 31 37 29 20 B0 20 28 43 B2 31 20 AF | (B.17) . (C.1 .|
00000760: 20 41 B2 31 36 30 29 20 A7 20 33 39 30 00 8A 0B | A.160) . 390...|
00000770: 80 02 8B 20 41 B2 31 36 30 20 A7 20 99 3A 99 20 |... A.160 . .:. |
00000780: 22 91 22 3B 3A 89 20 31 31 30 00 A3 0B 8A 02 8B |".";:. 110......|
00000790: 20 42 B2 31 33 20 B0 20 42 B2 31 39 20 A7 20 31 | B.13 . B.19 . 1|
000007A0: 33 37 30 00 B8 0B 94 02 8B 20 41 B2 31 35 37 20 |370...... A.157 |
000007B0: A7 20 8D 20 32 37 31 30 00 CC 0B 9E 02 8B 20 41 |. . 2710...... A|
000007C0: B2 32 39 20 A7 20 8D 20 32 36 39 30 00 EB 0B A8 |.29 . . 2690....|
000007D0: 02 54 B2 31 34 3A 8B 20 41 B2 32 30 20 A7 20 8D |.T.14:. A.20 . .|
000007E0: 20 32 37 33 30 3A 89 20 37 31 30 00 0C 0C B2 02 | 2730:. 710.....|
000007F0: 8B 20 28 41 B3 B1 31 34 38 29 20 B0 20 28 C3 28 |. (A..148) . (.(|
00000800: 43 24 29 B1 34 29 20 A7 20 36 31 30 00 2D 0C BC |C$).4) . 610.-..|
00000810: 02 8D 20 32 37 39 30 3A 8B 20 41 B2 31 34 31 20 |.. 2790:. A.141 |
00000820: B0 20 42 B2 31 39 20 A7 20 31 33 37 30 00 3D 0C |. B.19 . 1370.=.|
00000830: C6 02 43 24 B2 53 24 3A 89 20 36 31 30 00 51 0C |..C$.S$:. 610.Q.|
00000840: D0 02 8F 20 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |... ============|
00000850: 3D 00 65 0C DA 02 8F 20 4F 50 45 52 41 4E 44 20 |=.e.... OPERAND |
00000860: 46 49 45 4C 44 00 79 0C E4 02 8F 20 3D 3D 3D 3D |FIELD.y.... ====|
00000870: 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 89 0C EE 02 99 20 |=========...... |
00000880: A3 32 33 29 3B 3A 43 B2 31 00 A7 0C F8 02 8D 20 |.23);:C.1...... |
00000890: 32 36 36 30 3A 8B 20 41 B2 33 32 20 A7 20 99 3A |2660:. A.32 . .:|
000008A0: 99 3A 89 20 39 31 30 00 DB 0C 02 03 53 24 B2 4F |.:. 910.....S$.O|
000008B0: 24 3A 8B 20 28 41 B1 33 32 29 20 AF 20 28 41 B3 |$:. (A.32) . (A.|
000008C0: 39 36 29 20 AF 20 28 43 B3 31 34 29 20 A7 20 8D |96) . (C.14) . .|
000008D0: 20 32 35 34 30 3A 89 20 38 37 30 00 FC 0C 0C 03 | 2540:. 870.....|
000008E0: 8B 20 43 B2 31 20 AF 20 41 B2 31 36 30 20 A7 20 |. C.1 . A.160 . |
000008F0: 99 3A 99 22 91 22 3B 3A 89 36 30 30 00 17 0D 16 |.:.".";:.600....|
00000900: 03 8B 20 41 B2 31 36 30 20 A7 20 99 3A 99 22 91 |.. A.160 . .:.".|
00000910: 22 3B 3A 89 37 35 30 00 28 0D 20 03 8B 20 42 B2 |";:.750.(. .. B.|
00000920: 31 37 20 A7 20 33 39 30 00 41 0D 2A 03 8B 20 42 |17 . 390.A.*.. B|
00000930: B2 31 33 20 B0 20 42 B2 31 39 20 A7 20 31 33 37 |.13 . B.19 . 137|
00000940: 30 00 56 0D 34 03 8B 20 41 B2 31 35 37 20 A7 20 |0.V.4.. A.157 . |
00000950: 8D 20 32 37 31 30 00 6A 0D 3E 03 8B 20 41 B2 32 |. 2710.j.>.. A.2|
00000960: 39 20 A7 20 8D 20 32 36 39 30 00 88 0D 48 03 54 |9 . . 2690...H.T|
00000970: B2 32 32 3A 8B 20 41 B2 32 30 20 A7 20 8D 20 32 |.22:. A.20 . . 2|
00000980: 37 33 30 3A 89 38 37 30 00 AA 0D 52 03 8B 20 28 |730:.870...R.. (|
00000990: 41 B3 B1 31 34 38 29 20 B0 20 28 C3 28 4F 24 29 |A..148) . (.(O$)|
000009A0: B1 31 32 29 20 A7 20 37 36 30 00 CB 0D 5C 03 8D |.12) . 760...\..|
000009B0: 20 32 37 39 30 3A 8B 20 41 B2 31 34 31 20 B0 20 | 2790:. A.141 . |
000009C0: 42 B2 31 39 20 A7 20 31 33 37 30 00 DB 0D 66 03 |B.19 . 1370...f.|
000009D0: 4F 24 B2 53 24 3A 89 20 37 36 30 00 EF 0D 70 03 |O$.S$:. 760...p.|
000009E0: 8F 20 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 |. =============.|
000009F0: 03 0E 7A 03 8F 20 43 4F 4D 4D 45 4E 54 20 46 49 |..z.. COMMENT FI|
00000A00: 45 4C 44 00 17 0E 84 03 8F 20 3D 3D 3D 3D 3D 3D |ELD...... ======|
00000A10: 3D 3D 3D 3D 3D 3D 3D 00 26 0E 8E 03 99 20 A3 37 |=======.&.... .7|
00000A20: 29 3B 3A 43 B2 31 00 51 0E 98 03 8D 20 32 36 36 |);:C.1.Q.... 266|
00000A30: 30 3A 8B 20 43 B2 31 20 AF 20 41 B2 31 36 30 20 |0:. C.1 . A.160 |
00000A40: A7 20 99 3A 99 22 91 91 91 22 3B 3A 89 20 37 35 |. .:."...";:. 75|
00000A50: 30 00 6D 0E A2 03 8B 20 41 B2 31 36 30 20 A7 20 |0.m.... A.160 . |
00000A60: 99 3A 99 22 91 22 3B 3A 89 20 39 31 30 00 A2 0E |.:.".";:. 910...|
00000A70: AC 03 53 24 B2 54 24 3A 8B 20 28 42 B1 33 31 29 |..S$.T$:. (B.31)|
00000A80: 20 AF 20 28 42 B3 39 36 29 20 AF 20 28 43 B3 32 | . (B.96) . (C.2|
00000A90: 36 29 20 A7 20 8D 20 32 35 34 30 3A 89 20 31 30 |6) . . 2540:. 10|
00000AA0: 35 30 00 BC 0E B6 03 8B 20 42 B2 31 37 20 A7 20 |50...... B.17 . |
00000AB0: 99 22 91 91 22 3B 3A 89 20 33 39 30 00 D5 0E C0 |."..";:. 390....|
00000AC0: 03 8B 20 42 B2 31 33 20 B0 20 42 B2 31 39 20 A7 |.. B.13 . B.19 .|
00000AD0: 20 31 33 38 30 00 EA 0E CA 03 8B 20 41 B2 31 35 | 1380...... A.15|
00000AE0: 37 20 A7 20 8D 20 32 37 31 30 00 FE 0E D4 03 8B |7 . . 2710......|
00000AF0: 20 41 B2 32 39 20 A7 20 8D 20 32 36 39 30 00 1D | A.29 . . 2690..|
00000B00: 0F DE 03 54 B2 36 3A 8B 20 41 B2 32 30 20 A7 20 |...T.6:. A.20 . |
00000B10: 8D 20 32 37 33 30 3A 89 20 31 30 35 30 00 3F 0F |. 2730:. 1050.?.|
00000B20: E8 03 8B 20 28 41 B3 B1 31 34 38 29 20 B0 20 28 |... (A..148) . (|
00000B30: C3 28 54 24 29 B1 32 34 29 20 A7 20 39 32 30 00 |.(T$).24) . 920.|
00000B40: 4A 0F F2 03 8D 20 32 37 37 30 00 6B 0F FC 03 8D |J.... 2770.k....|
00000B50: 20 32 36 36 30 3A 8B 20 41 B2 31 34 31 20 B0 20 | 2660:. A.141 . |
00000B60: 42 B2 31 39 20 A7 20 31 33 38 30 00 88 0F 06 04 |B.19 . 1380.....|
00000B70: 8B 20 28 42 B3 33 32 29 20 B0 20 28 42 B1 39 35 |. (B.32) . (B.95|
00000B80: 29 20 A7 20 31 30 32 30 00 93 0F 10 04 8D 20 32 |) . 1020...... 2|
00000B90: 38 32 30 00 A3 0F 1A 04 54 24 B2 53 24 3A 89 20 |820.....T$.S$:. |
00000BA0: 39 32 30 00 BB 0F 24 04 8F 20 3D 3D 3D 3D 3D 3D |920...$.. ======|
00000BB0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 D3 0F 2E 04 |===========.....|
00000BC0: 8F 20 46 55 4C 4C 20 4C 49 4E 45 20 43 4F 4D 4D |. FULL LINE COMM|
00000BD0: 45 4E 54 00 EB 0F 38 04 8F 20 3D 3D 3D 3D 3D 3D |ENT...8.. ======|
00000BE0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 07 10 42 04 |===========...B.|
00000BF0: 8B 20 4C 24 AA 43 24 AA 4F 24 AA 54 24 B3 B1 22 |. L$.C$.O$.T$.."|
00000C00: 22 20 A7 20 34 30 30 00 17 10 4C 04 4C 24 B2 52 |" . 400...L.L$.R|
00000C10: 24 3A 99 20 52 24 3B 00 26 10 56 04 99 20 A3 39 |$:. R$;.&.V.. .9|
00000C20: 29 3B 3A 43 B2 31 00 59 10 60 04 8D 20 32 36 36 |);:C.1.Y.`.. 266|
00000C30: 30 3A 53 24 B2 54 24 3A 8B 20 28 28 42 B1 33 32 |0:S$.T$:. ((B.32|
00000C40: 29 20 AF 20 28 42 B3 39 36 29 29 20 B0 20 41 B2 |) . (B.96)) . A.|
00000C50: 33 32 20 A7 20 31 33 33 30 00 72 10 6A 04 8B 20 |32 . 1330.r.j.. |
00000C60: 42 B2 31 33 20 B0 20 42 B2 31 39 20 67 20 31 33 |B.13 . B.19 g 13|
00000C70: 37 30 00 86 10 74 04 8B 20 41 B3 B1 31 35 37 20 |70...t.. A..157 |
00000C80: A7 20 31 31 37 30 00 B2 10 7E 04 8B 20 43 B2 33 |. 1170...~.. C.3|
00000C90: 32 20 A7 20 99 3A 99 22 91 91 91 91 22 3A 99 20 |2 . .:."....":. |
00000CA0: A3 33 39 29 3B 3A 43 B2 43 AB 31 3A 89 20 31 31 |.39);:C.C.1:. 11|
00000CB0: 32 30 00 C4 10 88 04 8D 20 32 37 31 30 3A 89 20 |20...... 2710:. |
00000CC0: 31 31 32 30 00 EB 10 92 04 8B 20 41 B2 32 39 20 |1120...... A.29 |
00000CD0: AF 20 43 B3 C3 28 54 24 29 AA 31 20 A7 20 8D 20 |. C..(T$).1 . . |
00000CE0: 32 37 30 30 3A 89 20 31 33 35 30 00 07 11 9C 04 |2700:. 1350.....|
00000CF0: 8B 20 41 B3 B1 31 36 30 20 AF 20 42 B3 B1 31 37 |. A..160 . B..17|
00000D00: 20 A7 20 31 32 31 30 00 23 11 A6 04 99 3A 99 22 | . 1210.#....:."|
00000D10: 91 22 3B 3A 8B 20 43 B1 33 30 20 A7 20 99 22 91 |.";:. C.30 . .".|
00000D20: 91 22 3B 00 2E 11 B0 04 89 20 31 31 31 30 00 51 |.";...... 1110.Q|
00000D30: 11 BA 04 8B 20 28 41 B3 B1 31 34 38 29 20 B0 20 |.... (A..148) . |
00000D40: 28 C3 28 54 24 29 B1 34 39 29 20 A7 20 31 32 38 |(.(T$).49) . 128|
00000D50: 30 00 81 11 C4 04 8B 20 43 B1 33 31 20 A7 20 99 |0...... C.31 . .|
00000D60: 20 22 20 22 3B CA 28 54 24 2C 43 29 3A 99 20 22 | " ";.(T$,C):. "|
00000D70: 91 22 3B A3 43 AB 32 33 29 3B 3A 89 20 31 32 35 |.";.C.23);:. 125|
00000D80: 30 00 B0 11 CE 04 99 20 22 20 22 3B CA 28 54 24 |0...... " ";.(T$|
00000D90: 2C 43 2C 33 31 AB 43 29 3B A3 37 30 29 3B 22 20 |,C,31.C);.70);" |
00000DA0: 22 3A 99 20 A3 39 29 3B CA 28 54 24 2C 33 31 29 |":. .9);.(T$,31)|
00000DB0: 00 C2 11 D8 04 99 22 91 91 91 22 3B A3 38 AA 43 |......"...";.8.C|
00000DC0: 29 3B 00 E3 11 E2 04 8D 20 32 36 36 30 3A 8B 20 |);...... 2660:. |
00000DD0: 41 B2 31 34 31 20 B0 20 42 B2 31 39 20 A7 20 31 |A.141 . B.19 . 1|
00000DE0: 33 37 30 00 00 12 EC 04 8B 20 28 42 B3 33 32 29 |370...... (B.32)|
00000DF0: 20 B0 20 28 42 B1 39 35 29 20 A7 20 31 32 35 30 | . (B.95) . 1250|
00000E00: 00 33 12 F6 04 53 24 B2 54 24 3A 8D 20 32 37 35 |.3...S$.T$:. 275|
00000E10: 30 3A 57 24 B2 CA 28 54 24 2C 43 29 3A 54 24 B2 |0:W$..(T$,C):T$.|
00000E20: 53 24 AA 57 24 3A 8D 20 32 37 30 30 3A 89 20 31 |S$.W$:. 2700:. 1|
00000E30: 31 32 30 00 54 12 00 05 8B 20 28 41 B3 B1 32 30 |120.T.... (A..20|
00000E40: 29 20 B0 20 28 43 B1 C3 28 54 24 29 29 20 A7 20 |) . (C..(T$)) . |
00000E50: 31 31 32 30 00 86 12 0A 05 8B 20 43 B1 33 31 20 |1120...... C.31 |
00000E60: A7 20 99 20 CA 28 54 24 2C 43 AA 31 29 3B 22 20 |. . .(T$,C.1);" |
00000E70: 22 3A 99 20 22 91 22 3B A3 43 AB 32 33 29 3B 3A |":. ".";.C.23);:|
00000E80: 89 20 31 33 32 30 00 BB 12 14 05 99 20 CA 28 54 |. 1320...... .(T|
00000E90: 24 2C 43 AA 31 2C 33 32 AB 43 29 3B 22 20 22 3B |$,C.1,32.C);" ";|
00000EA0: A3 37 30 29 3B 22 20 22 3A 99 20 A3 39 29 3B CA |.70);" ":. .9);.|
00000EB0: 28 54 24 2C 33 33 29 3B 22 20 22 00 CD 12 1E 05 |(T$,33);" ".....|
00000EC0: 99 20 22 91 91 91 22 3B A6 38 AA 43 29 00 F8 12 |. "...";.8.C)...|
00000ED0: 28 05 53 24 B2 54 24 3A 52 24 B2 CA 28 54 24 2C |(.S$.T$:R$..(T$,|
00000EE0: 43 AA 31 29 3A 8D 20 32 37 35 30 3A 54 24 B2 53 |C.1):. 2750:T$.S|
00000EF0: 24 3A 89 20 31 31 32 30 00 0A 13 32 05 8B 20 43 |$:. 1120...2.. C|
00000F00: B1 35 30 20 A7 20 31 31 32 30 00 15 13 3C 05 8D |.50 . 1120...<..|
00000F10: 20 32 35 34 30 00 2B 13 46 05 8B 20 43 B2 33 32 | 2540.+.F.. C.32|
00000F20: 20 A7 20 99 3A 99 20 A6 39 29 3B 00 3C 13 50 05 | . .:. .9);.<.P.|
00000F30: 54 24 B2 53 24 3A 89 20 31 31 32 30 00 4D 13 5A |T$.S$:. 1120.M.Z|
00000F40: 05 8B 20 43 B3 33 32 20 A7 20 99 3A 99 00 6B 13 |.. C.32 . .:..k.|
00000F50: 64 05 99 3A 99 3A 8B 20 41 B2 31 34 31 20 B0 20 |d..:.:. A.141 . |
00000F60: 42 B2 31 39 20 A7 20 31 34 31 30 00 98 13 6E 05 |B.19 . 1410...n.|
00000F70: 8B 20 4C 24 B2 22 2A 22 20 B0 20 43 24 B3 B1 22 |. L$."*" . C$.."|
00000F80: 22 20 A7 20 8D 20 32 33 38 30 3A 8D 20 32 34 32 |" . . 2380:. 242|
00000F90: 30 3A 89 20 31 34 35 30 00 AD 13 78 05 99 22 91 |0:. 1450...x..".|
00000FA0: 91 91 91 3B 3A 47 4F 54 4F 20 33 39 30 00 CF 13 |...;:GOTO 390...|
00000FB0: 82 05 99 22 91 91 91 91 3E 3E 3E 3E 11 11 11 22 |..."....>>>>..."|
00000FC0: 3A 8B 20 42 B3 B1 31 39 20 A7 20 31 34 35 30 00 |:. B..19 . 1450.|
00000FD0: DE 13 8C 05 8B 20 4D 20 A7 20 31 36 31 30 00 14 |..... M . 1610..|
00000FE0: 14 96 05 43 24 B2 22 2E 45 4E 44 22 3A 4C 24 B2 |...C$.".END":L$.|
00000FF0: 22 22 3A 4F 24 B2 4C 24 3A 54 24 B2 4F 24 3A 8D |"":O$.L$:T$.O$:.|
00001000: 20 32 34 33 30 3A 8B 20 4D B2 30 20 A7 20 8D 20 | 2430:. M.0 . . |
00001010: 32 36 38 30 00 1F 14 A0 05 89 20 32 32 31 30 00 |2680...... 2210.|
00001020: 31 14 AA 05 8B 20 4D B3 B1 31 20 A7 20 31 34 39 |1.... M..1 . 149|
00001030: 30 00 47 14 B4 05 8D 20 32 35 36 30 3A 8B 20 45 |0.G.... 2560:. E|
00001040: 20 A7 20 31 37 37 30 00 6A 14 BE 05 8D 20 32 35 | . 1770.j.... 25|
00001050: 30 30 3A 99 22 91 91 91 91 22 3B 3A 8B 20 4C 24 |00:."....";:. L$|
00001060: B2 22 2A 22 20 A7 31 31 31 30 00 74 14 C8 05 89 |."*" .1110.t....|
00001070: 20 33 39 30 00 89 14 D2 05 8B 20 41 B3 B1 31 34 | 390...... A..14|
00001080: 31 20 A7 20 4E B2 4E AA 31 00 93 14 DC 05 89 20 |1 . N.N.1...... |
00001090: 33 35 30 00 A3 14 E6 05 8F 20 3D 3D 3D 3D 3D 3D |350...... ======|
000010A0: 3D 3D 3D 00 B3 14 F0 05 8F 20 45 44 49 54 20 46 |===...... EDIT F|
000010B0: 49 4C 45 00 C3 14 FA 05 8F 20 3D 3D 3D 3D 3D 3D |ILE...... ======|
000010C0: 3D 3D 3D 00 D2 14 04 06 8D 20 32 33 32 30 3A 45 |===...... 2320:E|
000010D0: B2 30 00 F8 14 0E 06 98 31 35 2C 22 53 22 AA 44 |.0......15,"S".D|
000010E0: 52 24 AA 22 3A 22 AA 46 4C 24 AA 22 2E 42 41 4B |R$.":".FL$.".BAK|
000010F0: 22 3A 84 31 35 2C 45 4E 00 2B 15 18 06 98 31 35 |":.15,EN.+....15|
00001100: 2C 22 52 22 AA 44 52 24 AA 22 3A 22 AA 46 4C 24 |,"R".DR$.":".FL$|
00001110: AA 22 2E 42 41 4B 3D 22 AA 44 52 24 AA 22 3A 22 |.".BAK=".DR$.":"|
00001120: AA 46 4C 24 AA 22 2E 53 52 43 22 00 42 15 22 06 |.FL$.".SRC".B.".|
00001130: 8D 20 32 34 34 30 3A 8B 20 45 4E 20 A7 20 32 32 |. 2440:. EN . 22|
00001140: 31 30 00 78 15 2C 06 9F 20 31 2C 38 2C 32 2C 44 |10.x.,.. 1,8,2,D|
00001150: 52 24 AA 22 3A 22 AA 46 4C 24 AA 22 2E 42 41 4B |R$.":".FL$.".BAK|
00001160: 2C 53 2C 52 22 3A 8D 20 32 34 34 30 3A 8B 20 45 |,S,R":. 2440:. E|
00001170: 4E 20 A7 20 32 32 31 30 00 AE 15 36 06 9F 20 32 |N . 2210...6.. 2|
00001180: 2C 38 2C 33 2C 44 52 24 AA 22 3A 22 AA 46 4C 24 |,8,3,DR$.":".FL$|
00001190: AA 22 2E 53 52 43 2C 53 2C 57 22 3A 8D 20 32 34 |.".SRC,S,W":. 24|
000011A0: 34 30 3A 8B 20 45 4E 20 A7 20 32 32 31 30 00 C4 |40:. EN . 2210..|
000011B0: 15 40 06 8D 20 32 35 36 30 3A 8B 20 45 20 A7 20 |.@.. 2560:. E . |
000011C0: 31 37 37 30 00 FD 15 4A 06 4D B2 30 3A 8D 20 32 |1770...J.M.0:. 2|
000011D0: 32 35 30 3A 8D 20 32 34 39 30 3A 99 20 55 24 3A |250:. 2490:. U$:|
000011E0: 99 22 20 20 20 31 20 C0 20 45 44 49 54 20 4C 49 |." 1 . EDIT LI|
000011F0: 4E 45 20 42 59 20 4C 49 4E 45 22 3A 99 00 2D 16 |NE BY LINE":..-.|
00001200: 54 06 99 22 20 20 20 32 20 C0 20 49 4E 53 45 52 |T.." 2 . INSER|
00001210: 54 20 4C 49 4E 45 28 53 29 20 42 45 46 4F 52 45 |T LINE(S) BEFORE|
00001220: 20 54 48 49 53 20 4C 49 4E 45 22 3A 99 00 5A 16 | THIS LINE":..Z.|
00001230: 5E 06 99 22 20 20 20 33 20 C0 20 43 4F 50 59 20 |^.." 3 . COPY |
00001240: 46 52 4F 4D 20 54 48 49 53 20 4C 49 4E 45 20 54 |FROM THIS LINE T|
00001250: 4F 20 4C 49 4E 45 23 22 3A 99 00 8C 16 68 06 99 |O LINE#":....h..|
00001260: 22 20 20 20 34 20 C0 20 44 45 4C 45 54 45 20 46 |" 4 . DELETE F|
00001270: 52 4F 4D 20 54 48 49 53 20 4C 49 4E 45 20 54 4F |ROM THIS LINE TO|
00001280: 20 4C 49 4E 45 23 22 3A 99 20 55 24 00 B2 16 72 | LINE#":. U$...r|
00001290: 06 99 22 53 45 4C 45 43 54 20 44 45 53 49 52 45 |.."SELECT DESIRE|
000012A0: 44 20 45 44 49 54 49 4E 47 20 4D 4F 44 45 3A 20 |D EDITING MODE: |
000012B0: 22 3B 00 D4 16 7C 06 8D 20 32 36 31 30 3A 4D B2 |";...|.. 2610:M.|
000012C0: 56 3A 8B 20 56 B3 31 20 B0 20 56 B1 34 20 A7 20 |V:. V.1 . V.4 . |
000012D0: 31 36 36 30 00 EE 16 86 06 8D 20 32 32 35 30 3A |1660...... 2250:|
000012E0: 91 20 4D 20 89 20 31 34 37 30 2C 33 34 30 00 0F |. M . 1470,340..|
000012F0: 17 90 06 8D 20 32 35 30 30 3A 99 20 55 24 3A 8B |.... 2500:. U$:.|
00001300: 20 4D B2 33 20 A7 20 99 22 43 4F 50 59 22 3B 00 | M.3 . ."COPY";.|
00001310: 26 17 9A 06 8B 20 4D B2 34 20 A7 20 99 22 44 45 |&.... M.4 . ."DE|
00001320: 4C 45 54 45 22 3B 00 66 17 A4 06 99 22 20 46 52 |LETE";.f...." FR|
00001330: 4F 4D 20 54 48 49 53 20 4C 49 4E 45 20 54 4F 20 |OM THIS LINE TO |
00001340: 2E 2E 2E 2E 2E 11 22 3A 99 22 28 45 4E 44 20 3D |......":."(END =|
00001350: 20 45 4E 44 20 4F 46 20 49 4E 50 55 54 20 46 49 | END OF INPUT FI|
00001360: 4C 45 29 22 3A 99 00 81 17 AE 06 99 22 4C 49 4E |LE)":......."LIN|
00001370: 45 23 20 20 22 3B 4E 3A 99 22 91 22 3B A6 36 29 |E# ";N:.".";.6)|
00001380: 3B 00 A5 17 B8 06 85 20 52 24 3A 4C B2 C5 28 52 |;...... R$:L..(R|
00001390: 24 29 3A 8B 20 52 24 B2 22 45 4E 44 22 20 A7 20 |$):. R$."END" . |
000013A0: 4C B2 31 45 35 00 BD 17 C2 06 8D 20 32 32 35 30 |L.1E5...... 2250|
000013B0: 3A 8B 20 4C B3 4E 20 A7 20 31 36 38 30 00 D2 17 |:. L.N . 1680...|
000013C0: CC 06 8B 20 4D B2 33 20 A7 20 99 22 43 4F 50 59 |... M.3 . ."COPY|
000013D0: 22 3B 00 E8 17 D6 06 8B 20 4D B2 34 20 A7 20 99 |";...... M.4 . .|
000013E0: 22 44 45 4C 45 54 22 3B 00 0C 18 E0 06 99 22 49 |"DELET";......"I|
000013F0: 4E 47 20 4C 49 4E 45 28 53 29 20 2E 2E 2E 2E 2E |NG LINE(S) .....|
00001400: 22 3A 99 3A 99 3A 89 20 31 38 38 30 00 3C 18 EA |":.:.:. 1880.<..|
00001410: 06 8D 20 32 32 35 30 3A 99 22 45 4E 44 20 4F 46 |.. 2250:."END OF|
00001420: 20 4F 52 49 47 49 4E 41 4C 20 49 4E 50 55 54 20 | ORIGINAL INPUT |
00001430: 46 49 4C 45 22 3A 8D 20 32 36 38 30 00 61 18 F4 |FILE":. 2680.a..|
00001440: 06 99 22 57 41 4E 54 20 54 4F 20 41 44 44 20 41 |.."WANT TO ADD A|
00001450: 44 44 49 54 49 4F 4E 41 4C 20 4C 49 4E 45 53 22 |DDITIONAL LINES"|
00001460: 3B 00 84 18 FE 06 8D 20 32 36 33 30 3A 4D B2 30 |;...... 2630:M.0|
00001470: 3A 8B 20 41 B2 37 38 20 A7 20 4D B2 32 3A 89 20 |:. A.78 . M.2:. |
00001480: 31 34 33 30 00 9B 18 08 07 4E B2 5A AA 31 3A 8D |1430.....N.Z.1:.|
00001490: 20 32 32 35 30 3A 89 20 33 35 30 00 D6 18 12 07 | 2250:. 350.....|
000014A0: 99 3A 85 22 4E 45 57 20 4F 55 54 50 55 54 20 4D |.:."NEW OUTPUT M|
000014B0: 4F 44 55 4C 45 20 4E 41 4D 45 20 20 20 A2 9D 9D |ODULE NAME ...|
000014C0: 9D 22 3B 46 4C 24 3A 8B 20 46 4C 24 B2 22 A2 22 |.";FL$:. FL$."."|
000014D0: A7 20 31 38 31 30 00 13 19 1C 07 8D 20 32 33 35 |. 1810...... 235|
000014E0: 30 3A 9F 20 32 2C 38 2C 33 2C 44 52 24 AA 22 3A |0:. 2,8,3,DR$.":|
000014F0: 22 AA 46 4C 24 AA 22 2E 53 52 43 2C 53 2C 57 22 |".FL$.".SRC,S,W"|
00001500: 3A 8D 20 32 34 34 30 3A 8B 20 45 4E 20 A7 20 32 |:. 2440:. EN . 2|
00001510: 32 31 30 00 26 19 26 07 8D 20 32 32 35 30 3A 45 |210.&.&.. 2250:E|
00001520: B2 30 3A 4E B2 30 00 5D 19 30 07 99 3A 85 22 49 |.0:N.0.].0..:."I|
00001530: 4E 50 55 54 20 4D 4F 44 55 4C 45 20 4E 41 4D 45 |NPUT MODULE NAME|
00001540: 20 20 20 A2 9D 9D 9D 22 3B 46 4C 24 3A 8B 20 46 | ....";FL$:. F|
00001550: 4C 24 B2 22 A2 22 20 A7 20 31 38 34 30 00 9A 19 |L$."." . 1840...|
00001560: 3A 07 8D 20 32 33 35 30 3A 9F 20 31 2C 38 2C 32 |:.. 2350:. 1,8,2|
00001570: 2C 44 52 24 AA 22 3A 22 AA 46 4C 24 AA 22 2E 53 |,DR$.":".FL$.".S|
00001580: 52 43 2C 53 2C 52 22 3A 8D 20 32 34 34 30 3A 8B |RC,S,R":. 2440:.|
00001590: 20 45 4E 20 A7 20 32 32 31 30 00 BE 19 44 07 8D | EN . 2210...D..|
000015A0: 20 32 32 35 30 3A 99 22 43 4F 50 59 49 4E 47 20 | 2250:."COPYING |
000015B0: 46 49 4C 45 2E 2E 2E 2E 2E 22 3A 99 3A 99 00 D4 |FILE.....":.:...|
000015C0: 19 4E 07 8D 20 32 35 36 30 3A 8B 20 45 20 A7 20 |.N.. 2560:. E . |
000015D0: 31 39 31 30 00 EE 19 58 07 8B 20 4D B3 34 20 A7 |1910...X.. M.4 .|
000015E0: 20 8D 20 32 33 38 30 3A 8D 20 32 34 32 30 00 05 | . 2380:. 2420..|
000015F0: 1A 62 07 8B 20 4D 20 AF 20 28 4E B2 4C 29 20 A7 |.b.. M . (N.L) .|
00001600: 20 31 36 30 30 00 10 1A 6C 07 89 20 31 38 37 30 | 1600...l.. 1870|
00001610: 00 1F 1A 76 07 8B 20 4D 20 A7 20 31 37 37 30 00 |...v.. M . 1770.|
00001620: 3A 1A 80 07 A0 20 31 3A 8D 20 32 34 34 30 3A 8B |:.... 1:. 2440:.|
00001630: 20 45 4E 20 A7 20 32 32 31 30 00 5B 1A 8A 07 8D | EN . 2210.[....|
00001640: 20 32 36 38 30 3A 99 22 43 4F 50 59 20 41 4E 4F | 2680:."COPY ANO|
00001650: 54 48 45 52 20 46 49 4C 45 22 3B 00 7D 1A 94 07 |THER FILE";.}...|
00001660: 8D 20 32 36 33 30 3A 8B 20 41 B2 37 38 20 A7 20 |. 2630:. A.78 . |
00001670: 8D 20 32 34 32 30 3A 89 20 32 32 31 30 00 88 1A |. 2420:. 2210...|
00001680: 9E 07 89 20 31 38 33 30 00 A1 1A A8 07 8F 20 3D |... 1830...... =|
00001690: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
000016A0: 3D 00 BA 1A B2 07 8F 20 50 52 49 4E 54 20 4C 49 |=...... PRINT LI|
000016B0: 53 54 49 4E 47 20 46 49 4C 45 00 D3 1A BC 07 8F |STING FILE......|
000016C0: 20 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D | ===============|
000016D0: 3D 3D 3D 00 ED 1A C6 07 8D 20 32 33 32 30 3A 46 |===...... 2320:F|
000016E0: 4C 24 B2 46 4C 24 AA 22 2E 4C 53 54 22 00 1F 1B |L$.FL$.".LST"...|
000016F0: D0 07 9F 20 31 2C 38 2C 34 2C 44 52 24 AA 22 3A |... 1,8,4,DR$.":|
00001700: 22 AA 46 4C 24 AA 22 2C 53 2C 52 22 3A 8D 20 32 |".FL$.",S,R":. 2|
00001710: 34 34 30 3A 8B 20 45 4E 20 A7 20 32 32 31 30 00 |440:. EN . 2210.|
00001720: 44 1B DA 07 8D 20 32 32 35 30 3A 99 3A 99 22 50 |D.... 2250:.:."P|
00001730: 52 49 4E 54 49 4E 47 20 46 49 4C 45 2E 2E 2E 2E |RINTING FILE....|
00001740: 2E 22 3A 99 00 6F 1B E4 07 84 31 2C 4C 24 3A 8D |.":..o....1,L$:.|
00001750: 20 32 34 34 30 3A 8B 20 45 4E B1 30 20 B0 20 4C | 2440:. EN.0 . L|
00001760: 24 B2 22 2E 45 4E 44 22 20 A7 20 32 32 31 30 00 |$.".END" . 2210.|
00001770: 92 1B EE 07 8B 20 C8 28 4C 24 2C 31 29 B2 22 2E |..... .(L$,1).".|
00001780: 22 20 A7 20 4C 24 B2 22 20 22 AA CA 28 4C 24 2C |" . L$." "..(L$,|
00001790: 32 29 00 A3 1B F8 07 98 34 2C 4C 24 3A 89 20 32 |2)......4,L$:. 2|
000017A0: 30 32 30 00 B3 1B 02 08 8F 20 3D 3D 3D 3D 3D 3D |020...... ======|
000017B0: 3D 3D 3D 00 C3 1B 0C 08 8F 20 52 45 41 44 20 46 |===...... READ F|
000017C0: 49 4C 45 00 D3 1B 16 08 8F 20 3D 3D 3D 3D 3D 3D |ILE...... ======|
000017D0: 3D 3D 3D 00 ED 1B 20 08 8D 20 32 33 32 30 3A 46 |===... .. 2320:F|
000017E0: 4C 24 B2 46 4C 24 AA 22 2E 53 52 43 22 00 22 1C |L$.FL$.".SRC".".|
000017F0: 2A 08 45 B2 30 3A 9F 20 31 2C 38 2C 32 2C 44 52 |*.E.0:. 1,8,2,DR|
00001800: 24 AA 22 3A 22 AA 46 4C 24 AA 22 2C 53 2C 52 22 |$.":".FL$.",S,R"|
00001810: 3A 8D 32 34 34 30 3A 8B 20 45 4E 20 A7 20 32 32 |:.2440:. EN . 22|
00001820: 31 30 00 4F 1C 34 08 8D 20 32 32 35 30 3A 8B 20 |10.O.4.. 2250:. |
00001830: 46 B2 35 20 A7 20 99 3A 99 22 50 52 49 4E 54 49 |F.5 . .:."PRINTI|
00001840: 4E 47 20 46 49 4C 45 2E 2E 2E 2E 2E 22 3A 99 00 |NG FILE.....":..|
00001850: 65 1C 3E 08 8D 20 32 35 37 30 3A 8B 20 45 20 A7 |e.>.. 2570:. E .|
00001860: 20 32 31 37 30 00 78 1C 48 08 8B 20 46 B2 34 20 | 2170.x.H.. F.4 |
00001870: A7 20 8D 20 32 35 30 30 00 97 1C 52 08 8D 20 32 |. . 2500...R.. 2|
00001880: 33 38 30 3A A1 20 52 24 3A 8B 20 52 24 B2 22 22 |380:. R$:. R$.""|
00001890: 20 A7 20 32 31 31 30 00 BC 1C 5C 08 8B 20 28 C6 | . 2110...\.. (.|
000018A0: 28 52 24 29 20 AF 20 31 32 37 29 B2 31 39 20 A7 |(R$) . 127).19 .|
000018B0: 20 99 20 55 24 3A 89 20 32 32 31 30 00 D4 1C 66 | . U$:. 2210...f|
000018C0: 08 8D 20 32 36 30 30 3A 8B 20 46 B2 35 20 A7 20 |.. 2600:. F.5 . |
000018D0: 32 31 30 30 00 DF 1C 70 08 89 20 32 31 31 30 00 |2100...p.. 2110.|
000018E0: F2 1C 7A 08 8B 20 46 B2 34 20 A7 20 8D 20 32 36 |..z.. F.4 . . 26|
000018F0: 30 30 00 14 1D 84 08 8F 20 3D 3D 3D 3D 3D 3D 3D |00...... =======|
00001900: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00001910: 3D 3D 3D 3D 00 36 1D 8E 08 8F 20 43 4C 4F 53 45 |====.6.... CLOSE|
00001920: 20 41 4C 4C 20 46 49 4C 45 53 20 41 4E 44 20 52 | ALL FILES AND R|
00001930: 45 53 54 41 52 54 00 58 1D 98 08 8F 20 3D 3D 3D |ESTART.X.... ===|
00001940: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00001950: 3D 3D 3D 3D 3D 3D 3D 3D 00 72 1D A2 08 A0 20 31 |========.r.... 1|
00001960: 3A A0 20 32 3A A0 20 34 3A A0 20 31 35 3A 89 20 |:. 2:. 4:. 15:. |
00001970: 38 30 00 94 1D AC 08 8F 20 3D 3D 3D 3D 3D 3D 3D |80...... =======|
00001980: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00001990: 3D 3D 3D 3D 00 B6 1D B6 08 8F 20 2A 2A 2A 2A 2A |====...... *****|
000019A0: 2A 2A 20 53 55 42 52 4F 55 54 49 4E 45 53 2A 2A |** SUBROUTINES**|
000019B0: 2A 2A 2A 2A 2A 2A 00 D8 1D C0 08 8F 20 3D 3D 3D |******...... ===|
000019C0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
000019D0: 3D 3D 3D 3D 3D 3D 3D 3D 00 F9 1D CA 08 99 22 93 |========......".|
000019E0: 22 3B 51 24 28 46 29 3B 3A 8B 20 4D B2 30 20 A7 |";Q$(F);:. M.0 .|
000019F0: 20 99 3A 89 20 32 33 30 30 00 1F 1E D4 08 99 22 | .:. 2300......"|
00001A00: 20 20 C0 20 20 22 3B 3A 8B 20 4D B2 31 20 A7 20 | . ";:. M.1 . |
00001A10: 99 22 4C 49 4E 45 20 42 59 20 4C 49 4E 45 22 00 |."LINE BY LINE".|
00001A20: 35 1E DE 08 8B 20 4D B2 32 20 A7 20 99 22 49 4E |5.... M.2 . ."IN|
00001A30: 53 45 52 54 22 00 49 1E E8 08 8B 20 4D B2 33 20 |SERT".I.... M.3 |
00001A40: A7 20 99 22 43 4F 50 59 22 00 5F 1E F2 08 8B 20 |. ."COPY"._.... |
00001A50: 4D B2 34 20 A7 20 99 22 44 45 4C 45 54 45 22 00 |M.4 . ."DELETE".|
00001A60: 6A 1E FC 08 99 20 55 24 3A 8E 00 7A 1E 06 09 50 |j.... U$:..z...P|
00001A70: B2 31 3A 9F 20 34 2C 34 3A 8E 00 9A 1E 10 09 99 |.1:. 4,4:.......|
00001A80: 3A 85 22 4D 4F 44 55 4C 45 20 4E 41 4D 45 20 20 |:."MODULE NAME |
00001A90: 20 A2 9D 9D 9D 22 3B 46 4C 24 00 AF 1E 1A 09 8B | ....";FL$......|
00001AA0: 20 46 4C 24 B2 22 A2 22 20 A7 20 32 33 32 30 00 | FL$."." . 2320.|
00001AB0: C1 1E 24 09 46 4C 24 B2 C8 28 46 4C 24 2C 31 32 |..$.FL$..(FL$,12|
00001AC0: 29 00 DB 1E 2E 09 99 3A 99 22 44 52 49 56 45 23 |)......:."DRIVE#|
00001AD0: 20 30 20 4F 52 20 31 3A 20 22 3B 00 02 1F 38 09 | 0 OR 1: ";...8.|
00001AE0: A1 20 44 52 24 3A 8B 20 44 52 24 B3 B1 22 30 22 |. DR$:. DR$.."0"|
00001AF0: 20 AF 20 44 52 24 B3 B1 22 31 22 20 A7 20 32 33 | . DR$.."1" . 23|
00001B00: 36 30 00 0E 1F 42 09 99 20 44 52 24 3A 8E 00 1C |60...B.. DR$:...|
00001B10: 1F 4C 09 8B 20 50 B2 30 20 A7 20 8E 00 36 1F 56 |.L.. P.0 . ..6.V|
00001B20: 09 98 34 2C A6 36 AB C3 28 C4 28 4E 29 29 29 3B |..4,.6..(.(N)));|
00001B30: 4E 3B A6 32 29 3B 00 52 1F 60 09 8B 20 4C 24 B2 |N;.2);.R.`.. L$.|
00001B40: 22 2A 22 20 A7 20 98 34 2C 22 2A 20 22 3B 54 24 |"*" . .4,"* ";T$|
00001B50: 3A 8E 00 86 1F 6A 09 98 34 2C 4C 24 3B A6 38 AB |:....j..4,L$;.8.|
00001B60: C3 28 4C 24 29 29 3B 43 24 3B A6 37 AB C3 28 43 |.(L$));C$;.7..(C|
00001B70: 24 29 29 3B 4F 24 3B A6 31 35 AB C3 28 4F 24 29 |$));O$;.15..(O$)|
00001B80: 29 3B 54 24 3A 8E 00 90 1F 74 09 5A B2 5A AA 31 |);T$:....t.Z.Z.1|
00001B90: 00 B4 1F 7E 09 98 32 2C 4C 24 3B 22 2C 22 3B 43 |...~..2,L$;",";C|
00001BA0: 24 3B 22 2C 22 3B 4F 24 3B 22 2C 22 3B 54 24 3B |$;",";O$;",";T$;|
00001BB0: 43 52 24 3B 00 E1 1F 88 09 84 31 35 2C 45 4E 24 |CR$;......15,EN$|
00001BC0: 2C 45 4D 24 2C 45 54 24 2C 45 53 24 3A 45 4E B2 |,EM$,ET$,ES$:EN.|
00001BD0: C5 28 45 4E 24 29 3A 8B 20 45 4E B2 30 20 A7 20 |.(EN$):. EN.0 . |
00001BE0: 8E 00 18 20 92 09 8D 20 32 32 35 30 3A 99 22 12 |... ... 2250:.".|
00001BF0: 44 49 53 4B 20 45 52 52 4F 52 21 92 11 22 3A 99 |DISK ERROR!..":.|
00001C00: 20 45 4E 24 3B 22 20 22 3B 45 4D 24 2C 45 54 24 | EN$;" ";EM$,ET$|
00001C10: 3B 22 20 22 3B 45 53 24 00 27 20 9C 09 99 3A 99 |;" ";ES$.' ...:.|
00001C20: 3A 89 20 32 36 30 30 00 42 20 A6 09 56 B2 34 3A |:. 2600.B ..V.4:|
00001C30: 8B 20 4D B2 32 20 A7 20 99 22 92 A6 22 3B 3A 56 |. M.2 . ."..";:V|
00001C40: B2 33 00 61 20 B0 09 99 20 C9 28 22 20 20 20 20 |.3.a ... .(" |
00001C50: 22 AA C4 28 4E 29 2C 56 29 3B 22 92 3E 22 3B 3A |"..(N),V);".>";:|
00001C60: 8E 00 86 20 BA 09 4C 24 B2 4C 31 24 3A 43 24 B2 |... ..L$.L1$:C$.|
00001C70: 43 31 24 3A 4F 24 B2 4F 31 24 3A 54 24 B2 54 31 |C1$:O$.O1$:T$.T1|
00001C80: 24 3A 4E B2 4E 31 00 9B 20 C4 09 8D 20 32 34 37 |$:N.N1.. ... 247|
00001C90: 30 3A 99 20 A3 37 29 3B 4C 24 3B 00 B0 20 CE 09 |0:. .7);L$;.. ..|
00001CA0: 8B 20 4C 24 B3 B1 22 2A 22 20 A7 20 32 35 33 30 |. L$.."*" . 2530|
00001CB0: 00 DE 20 D8 09 99 22 20 22 3B C8 28 54 24 2C 33 |.. ..." ";.(T$,3|
00001CC0: 31 29 3B A3 35 30 29 3B 22 20 22 3A 99 20 A3 39 |1);.50);" ":. .9|
00001CD0: 29 3B CA 28 54 24 2C 33 32 29 3A 99 3A 8E 00 03 |);.(T$,32):.:...|
00001CE0: 21 E2 09 99 20 A3 31 35 29 3B 43 24 3B A3 32 33 |!... .15);C$;.23|
00001CF0: 29 3B 4F 24 3A 99 3A 99 20 A3 37 29 3B 54 24 3A |);O$:.:. .7);T$:|
00001D00: 99 3A 8E 00 23 21 EC 09 8B 20 43 B1 C3 28 53 24 |.:..#!... C..(S$|
00001D10: 29 20 A7 20 53 24 B2 53 24 AA 52 24 1A 89 20 32 |) . S$.S$.R$.. 2|
00001D20: 37 30 30 00 4B 21 F6 09 57 24 B2 CA 28 53 24 2C |700.K!..W$..(S$,|
00001D30: 43 AA 31 29 3A 8D 20 32 37 35 30 3A 53 24 B2 53 |C.1):. 2750:S$.S|
00001D40: 24 AA 57 24 3A 89 20 32 37 30 30 00 79 21 00 0A |$.W$:. 2700.y!..|
00001D50: 8D 20 32 35 37 30 3A 4E 31 B2 4E 3A 4C 31 24 B2 |. 2570:N1.N:L1$.|
00001D60: 4C 24 3A 43 31 24 B2 43 24 3A 4F 31 24 B2 4F 24 |L$:C1$.C$:O1$.O$|
00001D70: 3A 54 31 24 B2 54 24 3A 8E 00 93 21 0A 0A 84 31 |:T1$.T$:...!...1|
00001D80: 2C 4C 24 2C 43 24 2C 4F 24 2C 54 24 3A 8D 20 32 |,L$,C$,O$,T$:. 2|
00001D90: 34 34 30 00 AB 21 14 0A 8B 20 43 24 B2 22 2E 45 |440..!... C$.".E|
00001DA0: 4E 44 22 20 A7 20 45 B2 31 3A 8E 00 B7 21 1E 0A |ND" . E.1:...!..|
00001DB0: 4E B2 4E AA 31 3A 8E 00 E7 21 28 0A 99 22 12 20 |N.N.1:...!(..". |
00001DC0: 20 20 20 20 20 20 44 45 50 52 45 53 53 20 41 4E | DEPRESS AN|
00001DD0: 59 20 4B 45 59 20 54 4F 20 43 4F 4E 54 49 4E 55 |Y KEY TO CONTINU|
00001DE0: 45 20 20 20 20 20 22 00 FF 21 32 0A A1 20 52 24 |E "..!2.. R$|
00001DF0: 3A 8B 20 52 24 B2 22 22 20 A7 20 32 36 31 30 00 |:. R$."" . 2610.|
00001E00: 21 22 3C 0A 56 B2 C5 28 52 24 29 3A 41 B2 C6 28 |!"<.V..(R$):A..(|
00001E10: 52 24 29 3A 42 B2 28 41 20 AF 20 31 32 37 29 3A |R$):B.(A . 127):|
00001E20: 8E 00 32 22 46 0A 99 22 20 28 59 2F 4E 29 3A 20 |..2"F.." (Y/N): |
00001E30: 22 3B 00 54 22 50 0A 8D 20 32 36 31 30 3A 8B 20 |";.T"P.. 2610:. |
00001E40: 41 B3 B1 38 39 20 AF 20 41 B3 B1 37 38 20 A7 20 |A..89 . A..78 . |
00001E50: 32 36 34 30 00 64 22 5A 0A 99 20 52 24 3A 99 20 |2640.d"Z.. R$:. |
00001E60: 55 24 3A 8E 00 9B 22 64 0A 99 22 11 5E 9D 22 3B |U$:..."d..".^.";|
00001E70: 3A 8D 20 32 36 31 30 3A 99 22 20 9D 91 22 3B 3A |:. 2610:." ..";:|
00001E80: 8B 20 41 B2 33 34 20 B0 20 41 B2 34 34 20 B0 20 |. A.34 . A.44 . |
00001E90: 41 B2 35 38 20 A7 20 32 36 36 30 00 A1 22 6E 0A |A.58 . 2660.."n.|
00001EA0: 8E 00 C6 22 78 0A 99 3A 99 22 4E 45 57 20 46 49 |..."x..:."NEW FI|
00001EB0: 4C 45 20 3D 22 3B 5A 3B 22 4C 49 4E 45 53 22 3A |LE =";Z;"LINES":|
00001EC0: 99 20 55 24 3A 8E 00 D8 22 82 0A 8B 20 43 B1 C3 |. U$:..."... C..|
00001ED0: 28 53 24 29 20 A7 20 8E 00 EA 22 8C 0A 43 B2 43 |(S$) . ..."..C.C|
00001EE0: AA 31 3A 99 20 52 24 3B 3A 8E 00 02 23 96 0A 8B |.1:. R$;:...#...|
00001EF0: 20 43 B1 31 20 A7 20 43 B2 43 AB 31 3A 99 20 52 | C.1 . C.C.1:. R|
00001F00: 24 3B 00 08 23 A0 0A 8E 00 1A 23 AA 0A 8B 20 43 |$;..#.....#... C|
00001F10: B1 C3 28 53 24 29 20 A7 20 8E 00 40 23 B4 0A 52 |..(S$) . ..@#..R|
00001F20: 24 B2 CA 28 53 24 2C 43 AA 31 29 3A 99 20 52 24 |$..(S$,C.1):. R$|
00001F30: 3B 22 20 22 3A 99 22 91 22 3B A3 54 AA 43 29 3B |;" ":.".";.T.C);|
00001F40: 00 5E 23 BE 0A 8B 20 43 B1 31 20 A7 20 53 24 B2 |.^#... C.1 . S$.|
00001F50: C8 28 53 24 2C 43 AB 31 29 AA 52 24 3A 8E 00 6A |.(S$,C.1).R$:..j|
00001F60: 23 C8 0A 53 24 B2 52 24 3A 8E 00 82 23 D2 0A 57 |#..S$.R$:...#..W|
00001F70: 24 B2 CA 28 53 24 2C 43 29 3A 99 22 20 22 3B 57 |$..(S$,C):." ";W|
00001F80: 24 3B 00 96 23 DC 0A 99 3A 99 22 91 22 3B A3 54 |$;..#...:.".";.T|
00001F90: AA 43 29 3B 3A 8E 00 A1 23 E6 0A 8D 20 32 37 37 |.C);:...#... 277|
00001FA0: 30 00 BF 23 F0 0A 8D 20 32 36 36 30 3A 8B 20 41 |0..#... 2660:. A|
00001FB0: B2 31 34 31 20 B0 20 42 B2 31 39 20 A7 20 8E 00 |.141 . B.19 . ..|
00001FC0: DC 23 FA 0A 8B 20 28 41 B3 33 33 29 20 B0 20 28 |.#... (A.33) . (|
00001FD0: 41 B1 39 35 29 20 A7 20 32 38 30 30 00 F7 23 04 |A.95) . 2800..#.|
00001FE0: 0B 8D 20 32 37 35 30 3A 53 24 B2 53 24 AA 57 24 |.. 2750:S$.S$.W$|
00001FF0: 3A 89 20 32 37 30 30 00 00 00 |:. 2700... |
..&.... ******* DASM - EDITOR ********.K
.... * *.P...
. * BY ROBERT BAKER *...(.. *
*...2.. ****
* V1.2 **** 08/01/81 *****...<.:.F.F.:..
.P..".";.8);".D A S M E D I T O R".!.Z
..:U$.".................................
..........R.D.B$."
"...N.Q$(1).".CREATE.":
Q$(2).". EDIT .":Q$(3).". COPY .":Q$(4).
". READ ."...X.Q$(5).".PRINT .":Q$(6).Q$
(5).W.... 15,8,15:CR$.G(13):.U$......"
0 . . DONE ":.."...." 1 . ";Q$(1)
;" .... NEW SOURCE FILE":..\. .." 2 .
";Q$(2);" ...":. .18);".. OLD SOURCE F
ILE"......" 3 . ";Q$(3);" ...":..18)
;"."......" 4 . ";Q$(4);" ...":..18)
;".".L...." 5 . ";Q$(5);" ...":....H
.." 6 . ";Q$(6);"..... LISTING FILE"
...R.. U$:."SELECT DESIRED FUNCTION: ";.
@.... 2610:F.V:. R$."0" . .".":..V.... F
.1 . F.6 . 220.P.... 2250:. F.4 . . 2310
...... F.3 . 270......"DO YOU WANT A PRI
NTED COPY";:. 2630:. A.89 . . 2310......
F . 310,1540,1810,2080,2080,1970......
======================...".. CREATE NEW
SOURCE FILE.8.,.. ======================
.R.6.. 2320:FL$.FL$.".SRC"...@.. 2,8,2,D
R$.":".FL$.",S,W":. 2440:. EN . 2210...J
.. 2250...T.N.1...^.L$."":C$.L$:O$.L$:T$
.O$:. 2470.L.H.. ===========...R.. LABEL
FIELD...|.. ===========......:.".";.7);
:C.1.#.... 2660:. C.1 . A.42 . 1090.4...
. A.32 . 600.V...S$.L$:. (A.64) . (A.91)
. 550.Y.... (C.1) . (A.47) . (A.58) .55
0...... A.160 . B.17 . 390...B.. B.13 .
B.19 . 1370...L.. A.157 . . 2710.T.V.. A
.29 . . 2690.....T.6:. A.20 . . 2730:. 5
60...... (A..148) . (C(L$).5) . 400.....
. 2770.?.... 2660:. A.141 . B.19 . 1370.
[.... (A.64) . (A.91) . 540..... (C.1)
. (A.48) . (A.59) . 510...... 2820:. 560
...&.. C.7 . . 2540...0.L$.S$:. 400.G.:.
. =============...D.. COMMAND FIELD...N.
. =============...X.. .15);:C.1...B.. 26
60:. A.32 . 750.J.L.S$.C$:. (A.32) . (A.
96) . (C.6) . . 2540:. 710.M.V.. (B.17)
. (C.1 . A.160) . 390...... A.160 . .:.
".";:. 110...... B.13 . B.19 . 1370.....
. A.157 . . 2710.L.... A.29 . . 2690....
.T.14:. A.20 . . 2730:. 710...... (A..14
8) . (C(C$).4) . 610.-.... 2790:. A.141
. B.19 . 1370.=.F.C$.S$:. 610.Q.P.. ====
=========.E.Z.. OPERAND FIELD.Y.... ====
=========...... .23);:C.1...... 2660:. A
.32 . .:.:. 910.....S$.O$:. (A.32) . (A.
96) . (C.14) . . 2540:. 870...... C.1 .
A.160 . .:.".";:.600...... A.160 . .:.".
";:.750.(. .. B.17 . 390.A.*.. B.13 . B.
19 . 1370.V.4.. A.157 . . 2710.J.>.. A.2
9 . . 2690...H.T.22:. A.20 . . 2730:.870
...R.. (A..148) . (C(O$).12) . 760.K.\..
2790:. A.141 . B.19 . 1370...F.O$.S$:.
760...P.. =============...Z.. COMMENT FI
ELD...... =============.&.... .7);:C.1.Q
.... 2660:. C.1 . A.160 . .:."...";:. 75
0.M.... A.160 . .:.".";:. 910.....S$.T$:
. (B.31) . (B.96) . (C.26) . . 2540:. 10
50...... B.17 . ."..";:. 390.U.... B.13
. B.19 . 1380...J.. A.157 . . 2710...T..
A.29 . . 2690.....T.6:. A.20 . . 2730:.
1050.?.... (A..148) . (C(T$).24) . 920.
J.... 2770.K.... 2660:. A.141 . B.19 . 1
380...... (B.32) . (B.95) . 1020...... 2
820.....T$.S$:. 920...$.. ==============
===.S.... FULL LINE COMMENT...8.. ======
===========...B.. L$.C$.O$.T$.."" . 400.
..L.L$.R$:. R$;.&.V.. .9);:C.1.Y.`.. 266
0:S$.T$:. ((B.32) . (B.96)) . A.32 . 133
0.R.J.. B.13 . B.19 G 1370...T.. A..157
. 1170...~.. C.32 . .:."....":. .39);:C.
C.1:. 1120.D.... 2710:. 1120...... A.29
. C.C(T$).1 . . 2700:. 1350...... A..160
. B..17 . 1210.#....:.".";:. C.30 . .".
.";...... 1110.Q.... (A..148) . (C(T$).4
9) . 1280...D.. C.31 . . " ";J(T$,C):. "
.";.C.23);:. 1250...N.. " ";J(T$,C,31.C)
;.70);" ":. .9);J(T$,31).B.X.."...";.8.C
);...... 2660:. A.141 . B.19 . 1370.....
. (B.32) . (B.95) . 1250.3...S$.T$:. 275
0:W$.J(T$,C):T$.S$.W$:. 2700:. 1120.T...
. (A..20) . (C.C(T$)) . 1120...... C.31
. . J(T$,C.1);" ":. ".";.C.23);:. 1320..
.... J(T$,C.1,32.C);" ";.70);" ":. .9);J
(T$,33);" ".M.... "...";.8.C)...(.S$.T$:
R$.J(T$,C.1):. 2750:T$.S$:. 1120...2.. C
.50 . 1120...<.. 2540.+.F.. C.32 . .:. .
9);.<.P.T$.S$:. 1120.M.Z.. C.32 . .:..K.
D..:.:. A.141 . B.19 . 1410...N.. L$."*"
. C$.."" . . 2380:. 2420:. 1450...X..".
...;:GOTO 390.O...."....>>>>...":. B..19
. 1450...... M . 1610.....C$.".END":L$.
"":O$.L$:T$.O$:. 2430:. M.0 . . 2680...
.. 2210.1.... M..1 . 1490.G.... 2560:. E
. 1770.J.... 2500:."....";:. L$."*" .11
10.T.H.. 390...R.. A..141 . N.N.1......
350...... =========...... EDIT FILE.C...
. =========.R.... 2320:E.0......15,"S".D
R$.":".FL$.".BAK":.15,EN.+....15,"R".DR$
.":".FL$.".BAK=".DR$.":".FL$.".SRC".B.".
. 2440:. EN . 2210.X.,.. 1,8,2,DR$.":".F
L$.".BAK,S,R":. 2440:. EN . 2210...6.. 2
,8,3,DR$.":".FL$.".SRC,S,W":. 2440:. EN
. 2210.D.@.. 2560:. E . 1770...J.M.0:. 2
250:. 2490:. U$:." 1 . EDIT LINE BY LI
NE":..-.T.." 2 . INSERT LINE(S) BEFORE
THIS LINE":..Z.^.." 3 . COPY FROM THI
S LINE TO LINE#":....H.." 4 . DELETE F
ROM THIS LINE TO LINE#":. U$...R.."SELEC
T DESIRED EDITING MODE: ";.T.|.. 2610:M.
V:. V.1 . V.4 . 1660...... 2250:. M . 14
70,340...... 2500:. U$:. M.3 . ."COPY";.
&.... M.4 . ."DELETE";.F...." FROM THIS
LINE TO ......":."(END = END OF INPUT FI
LE)":......."LINE# ";N:.".";.6);......
R$:L.E(R$):. R$."END" . L.1E5...B.. 2250
:. L.N . 1680.R.L.. M.3 . ."COPY";...V..
M.4 . ."DELET";......"ING LINE(S) .....
":.:.:. 1880.<.... 2250:."END OF ORIGINA
L INPUT FILE":. 2680.A...."WANT TO ADD A
DDITIONAL LINES";...... 2630:M.0:. A.78
. M.2:. 1430.....N.Z.1:. 2250:. 350.V...
.:."NEW OUTPUT MODULE NAME ....";FL$:.
FL$.".". 1810...... 2350:. 2,8,3,DR$.":
".FL$.".SRC,S,W":. 2440:. EN . 2210.&.&.
. 2250:E.0:N.0.].0..:."INPUT MODULE NAME
....";FL$:. FL$."." . 1840...:.. 2350
:. 1,8,2,DR$.":".FL$.".SRC,S,R":. 2440:.
EN . 2210...D.. 2250:."COPYING FILE....
.":.:..T.N.. 2560:. E . 1910...X.. M.4 .
. 2380:. 2420...B.. M . (N.L) . 1600...
L.. 1870...V.. M . 1770.:... 1:. 2440:.
EN . 2210.[.... 2680:."COPY ANOTHER FIL
E";.}.... 2630:. A.78 . . 2420:. 2210...
... 1830...... ==================......
PRINT LISTING FILE.S.... ===============
===...F.. 2320:FL$.FL$.".LST"...P.. 1,8,
4,DR$.":".FL$.",S,R":. 2440:. EN . 2210.
D.Z.. 2250:.:."PRINTING FILE.....":..O..
..1,L$:. 2440:. EN.0 . L$.".END" . 2210.
..... H(L$,1)."." . L$." ".J(L$,2)......
4,L$:. 2020...... =========.C.... READ F
ILE.S.... =========... .. 2320:FL$.FL$."
.SRC".".*.E.0:. 1,8,2,DR$.":".FL$.",S,R"
:.2440:. EN . 2210.O.4.. 2250:. F.5 . .:
."PRINTING FILE.....":..E.>.. 2570:. E .
2170.X.H.. F.4 . . 2500...R.. 2380:. R$
:. R$."" . 2110...\.. (F(R$) . 127).19 .
. U$:. 2210.T.F.. 2600:. F.5 . 2100...P
.. 2110...Z.. F.4 . . 2600...... =======
====================.6.... CLOSE ALL FIL
ES AND RESTART.X.... ===================
========.R... 1: 2: 4: 15:. 80......
===========================...... *****
** SUBROUTINES********.X.... ===========
================...J..".";Q$(F);:. M.0 .
.:. 2300...T.." . ";:. M.1 . ."LINE B
Y LINE".5.... M.2 . ."INSERT".I.... M.3
. ."COPY"._.... M.4 . ."DELETE".J.... U$
:..Z...P.1:. 4,4:.......:."MODULE NAME
....";FL$...... FL$."." . 2320.A.$.FL$.
H(FL$,12)......:."DRIVE# 0 OR 1: ";...8.
. DR$:. DR$.."0" . DR$.."1" . 2360...B..
DR$:....L.. P.0 . ..6.V..4,.6.C(D(N)));
N;.2);.R.`.. L$."*" . .4,"* ";T$:....J..
4,L$;.8.C(L$));C$;.7.C(C$));O$;.15.C(O$)
);T$:....T.Z.Z.1...~..2,L$;",";C$;",";O$
;",";T$;CR$;......15,EN$,EM$,ET$,ES$:EN.
E(EN$):. EN.0 . ... ... 2250:.".DISK ERR
OR!..":. EN$;" ";EM$,ET$;" ";ES$.' ...:.
:. 2600.B ..V.4:. M.2 . ."..";:V.3.A ...
I(" ".D(N),V);".>";:... ..L$.L1$:C$.
C1$:O$.O1$:T$.T1$:N.N1.. D.. 2470:. .7);
L$;.. N.. L$.."*" . 2530.. X.." ";H(T$,3
1);.50);" ":. .9);J(T$,32):.:...!... .15
);C$;.23);O$:.:. .7);T$:.:..#!... C.C(S$
) . S$.S$.R$.. 2700.K!..W$.J(S$,C.1):. 2
750:S$.S$.W$:. 2700.Y!... 2570:N1.N:L1$.
L$:C1$.C$:O1$.O$:T1$.T$:...!...1,L$,C$,O
$,T$:. 2440..!... C$.".END" . E.1:...!..
N.N.1:...!(..". DEPRESS ANY KEY TO
CONTINUE "..!2.. R$:. R$."" . 2610.
!"<.V.E(R$):A.F(R$):B.(A . 127):..2"F.."
(Y/N): ";.T"P.. 2610:. A..89 . A..78 .
2640.D"Z.. R$:. U$:..."D..".^.";:. 2610:
." ..";:. A.34 . A.44 . A.58 . 2660.."N.
..F"X..:."NEW FILE =";Z;"LINES":. U$:..X
"... C.C(S$) . ..."..C.C.1:. R$;:...#...
C.1 . C.C.1:. R$;..# ....#... C.C(S$) .
..@#..R$.J(S$,C.1):. R$;" ":.".";.T.C);
.^#... C.1 . S$.H(S$,C.1).R$:..J#H.S$.R$
:...#R.W$.J(S$,C):." ";W$;..#...:.".";.T
.C);:...#... 2770..#... 2660:. A.141 . B
.19 . ...#... (A.33) . (A.95) . 2800..#.
.. 2750:S$.S$.W$:. 2700...
> CLICK IMAGE PREVIEW FOR FULL MODAL