64.MANIPULATE
FILE INFORMATION
FILENAME(S): 64.MANIPULATE
FILE TYPE(S): PRG
FILE SIZE: 10.6K
FIRST SEEN: 2025-10-19 22:48:24
APPEARS ON: 5 disk(s)
FILE HASH
2bb8707e4ad03e27cd76b800d7844afd2080c04789363c4d26268504551a51c1
FOUND ON DISKS (5 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| MICRO MANIAC | 64.MANIPULATE | PRG | Radd Maxx | 25 | 2 | DOWNLOAD FILE |
| 64 MANAGER 1 06B | 64.MANIPULATE | PRG | Sailor, Ganheden | 12 | 2 | DOWNLOAD FILE |
| 64 MANAGER 1 06B | 64.MANIPULATE | PRG | DuncanTwain | 12 | 2 | DOWNLOAD FILE |
| 64 MANAGER 1 06B | 64.MANIPULATE | PRG | DuncanTwain | 12 | 2 | DOWNLOAD FILE |
| 64 MANAGER 1 06B | 64.MANIPULATE | PRG | hedning, shine | 12 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 04 0B 04 0A 00 8A 34 30 30 30 00 3E 04 64 00 |.......4000.>.d.|
00000010: 42 41 B2 31 32 AC 34 30 39 36 3A 42 42 B2 38 AC |BA.12.4096:BB.8.|
00000020: 34 30 39 36 AA 39 3A 42 B2 37 AC 34 30 39 36 3A |4096.9:B.7.4096:|
00000030: 42 43 B2 33 31 31 30 34 3A 4C 43 B2 34 38 00 6F |BC.31104:LC.48.o|
00000040: 04 69 00 53 4C B2 32 35 34 3A 4F B2 31 3A 53 4E |.i.SL.254:O.1:SN|
00000050: B2 30 3A 46 52 B2 34 37 33 36 30 3A 52 54 B2 35 |.0:FR.47360:RT.5|
00000060: 33 32 34 32 3A 53 53 24 B2 C7 28 32 35 35 29 00 |3242:SS$..(255).|
00000070: 99 04 6A 00 43 24 B2 C7 28 31 33 29 3A 51 4F 24 |..j.C$..(13):QO$|
00000080: B2 C7 28 33 34 29 3A 41 46 24 B2 22 20 41 20 44 |..(34):AF$." A D|
00000090: 41 54 41 20 46 49 4C 45 22 00 C7 04 6E 00 57 41 |ATA FILE"...n.WA|
000000A0: 24 B2 C7 28 C2 28 31 30 31 37 29 29 3A 4B 59 B2 |$..(.(1017)):KY.|
000000B0: 30 3A 4B 59 24 B2 22 20 22 AA 22 22 3A 9F 31 35 |0:KY$." "."":.15|
000000C0: 2C 38 2C 31 35 3A 8E 00 0D 05 C8 00 58 41 24 B2 |,8,15:......XA$.|
000000D0: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |" |
000000E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000000F0: 20 20 20 20 20 20 20 20 22 3A 59 41 B2 C2 28 32 | ":YA..(2|
00000100: 31 34 29 3A 58 41 B2 C2 28 32 31 31 29 00 3C 05 |14):XA..(211).<.|
00000110: D2 00 40 50 2C 59 41 2C 58 41 2C C8 28 58 41 24 |..@P,YA,XA,.(XA$|
00000120: 2C 33 39 AB 58 41 29 3A 58 41 24 B2 22 22 3A 40 |,39.XA):XA$."":@|
00000130: 50 2C 59 41 2C 58 41 2C 22 22 3A 8E 00 5C 05 FA |P,YA,XA,"":..\..|
00000140: 00 40 42 2C 44 50 24 28 30 29 3A 52 28 31 30 30 |.@B,DP$(0):R(100|
00000150: 29 B2 52 4E AA 31 3A 9E 42 42 3A 8E 00 70 05 2C |).RN.1:.BB:..p.,|
00000160: 01 46 39 B2 30 3A 99 22 93 22 3B 3A 8D 34 30 30 |.F9.0:.".";:.400|
00000170: 00 8C 05 31 01 99 3A 99 22 11 45 4E 54 45 52 20 |...1..:.".ENTER |
00000180: 46 49 4C 45 4E 41 4D 45 3F 20 22 3B 00 9F 05 32 |FILENAME? ";...2|
00000190: 01 8D 35 30 30 3A 58 31 B2 58 3A 59 31 B2 59 00 |..500:X1.X:Y1.Y.|
000001A0: CE 05 36 01 9F 32 2C 38 2C 32 2C 22 30 3A 46 53 |..6..2,8,2,"0:FS|
000001B0: 2E 22 AA 4E 46 24 3A 84 31 35 2C 41 2C 42 24 3A |.".NF$:.15,A,B$:|
000001C0: 84 32 2C 4E 53 2C 4E 46 2C 43 41 3A A0 32 00 EC |.2,NS,NF,CA:.2..|
000001D0: 05 40 01 8B 41 B2 30 B0 46 39 B2 32 A7 9E 42 41 |.@..A.0.F9.2..BA|
000001E0: AA 34 32 2C 4E 46 24 3A 89 33 37 30 00 1F 06 4A |.42,NF$:.370...J|
000001F0: 01 40 50 2C 32 34 2C 30 2C C8 28 42 24 2C 32 30 |.@P,24,0,.(B$,20|
00000200: 29 3A 99 22 20 2D 20 44 49 52 45 43 54 4F 52 59 |):." - DIRECTORY|
00000210: 20 28 59 2F 4E 29 3F 20 22 3B 3A 8D 32 30 30 00 | (Y/N)? ";:.200.|
00000220: 56 06 54 01 41 43 24 B2 22 59 4E 22 3A 54 59 B2 |V.T.AC$."YN":TY.|
00000230: 30 3A 4C B2 31 3A 8D 35 35 30 3A 40 50 2C 32 34 |0:L.1:.550:@P,24|
00000240: 2C 30 2C 22 22 3A 8D 32 30 30 3A 8B 41 24 B2 22 |,0,"":.200:.A$."|
00000250: 4E 22 A7 33 36 30 00 83 06 5E 01 9E 42 42 AA 31 |N".360...^..BB.1|
00000260: 35 3A 41 24 B2 22 44 41 2E 2A 22 3A 46 47 B2 30 |5:A$."DA.*":FG.0|
00000270: 3A 8D 31 33 38 30 3A 99 22 93 22 3B 3A 9E 42 42 |:.1380:.".";:.BB|
00000280: AA 35 37 00 9B 06 68 01 58 B2 58 31 3A 59 B2 59 |.57...h.X.X1:Y.Y|
00000290: 31 3A 8D 35 31 30 3A 89 33 31 30 00 A6 06 72 01 |1:.510:.310...r.|
000002A0: 46 39 B2 30 3A 8E 00 D7 06 90 01 53 43 24 B2 22 |F9.0:......SC$."|
000002B0: 9A 97 05 22 3A 40 43 2C 53 43 24 3A 99 C7 28 31 |...":@C,SC$:..(1|
000002C0: 34 32 29 3B 3A 99 A6 32 30 AB C3 28 54 54 24 29 |42);:..20..(TT$)|
000002D0: AD 32 29 3B 54 54 24 00 FA 06 9A 01 81 49 49 B2 |.2);TT$......II.|
000002E0: 31 A4 34 3A 99 22 81 A3 A3 A3 A3 A3 A3 A3 A3 A3 |1.4:."..........|
000002F0: A3 05 22 3B 3A 82 49 49 3A 8E 00 1A 07 C2 01 40 |..";:.II:......@|
00000300: 50 2C 32 34 2C 30 2C 4D 44 24 3A 99 22 46 49 4C |P,24,0,MD$:."FIL|
00000310: 45 22 3B 3A 8D 32 30 30 3A 8E 00 36 07 F4 01 59 |E";:.200:..6...Y|
00000320: B2 C2 28 32 31 34 29 3A 58 B2 C2 28 32 31 31 29 |..(214):X..(211)|
00000330: 3A 99 4E 46 24 3B 00 49 07 FE 01 4B 59 B2 31 3A |:.NF$;.I...KY.1:|
00000340: 97 42 41 AA 4C 43 2C 36 34 00 7E 07 FF 01 97 32 |.BA.LC,64.~....2|
00000350: 31 31 2C 58 AB 31 AA 4B 59 3A 4C B2 31 33 3A 54 |11,X.1.KY:L.13:T|
00000360: 59 B2 30 3A 8D 35 36 30 3A 8B 52 46 20 B0 41 24 |Y.0:.560:.RF .A$|
00000370: B3 22 21 22 A7 4B 59 B2 31 3A 89 35 31 31 00 97 |."!".KY.1:.511..|
00000380: 07 03 02 40 48 2C 22 3F 22 2C 41 24 3A 8B 4B 59 |...@H,"?",A$:.KY|
00000390: B3 B1 30 A7 35 31 31 00 B0 07 04 02 40 48 2C 22 |..0.511.....@H,"|
000003A0: 2A 22 2C 41 24 3A 8B 4B 59 B3 B1 30 A7 35 31 31 |*",A$:.KY..0.511|
000003B0: 00 C9 07 05 02 40 48 2C 22 40 22 2C 41 24 3A 8B |.....@H,"@",A$:.|
000003C0: 4B 59 B3 B1 30 A7 35 31 31 00 D6 07 06 02 97 42 |KY..0.511......B|
000003D0: 41 AA 4C 43 2C 30 00 E3 07 08 02 4E 46 24 B2 41 |A.LC,0.....NF$.A|
000003E0: 24 3A 8E 00 F9 07 26 02 59 B2 C2 28 32 31 34 29 |$:....&.Y..(214)|
000003F0: 3A 58 B2 C2 28 32 31 31 29 00 1C 08 30 02 8D 36 |:X..(211)...0..6|
00000400: 30 30 3A 8B 4C B2 31 A7 3A 40 48 2C 41 24 2C 41 |00:.L.1.:@H,A$,A|
00000410: 43 24 3A 8B 4B 59 B2 30 A7 35 36 30 00 2E 08 35 |C$:.KY.0.560...5|
00000420: 02 8B 54 59 B2 31 A7 41 B2 C5 28 41 24 29 00 34 |..TY.1.A..(A$).4|
00000430: 08 3A 02 8E 00 4C 08 58 02 8B C2 28 35 32 29 AB |.:...L.X...(52).|
00000440: C2 28 35 30 29 B3 33 A7 8D 36 35 30 00 67 08 5D |.(50).3..650.g.]|
00000450: 02 40 47 2C 59 2C 58 2C 4C 2C 54 59 2C 41 24 3A |.@G,Y,X,L,TY,A$:|
00000460: 8D 32 32 30 30 3A 8E 00 9A 08 8A 02 97 31 39 38 |.2200:.......198|
00000470: 2C 31 3A 97 36 33 31 2C 31 33 3A 58 5A B2 C2 28 |,1:.631,13:XZ..(|
00000480: 32 31 31 29 3A 59 5A B2 C2 28 32 31 34 29 3A 4F |211):YZ..(214):O|
00000490: 41 B2 C2 28 42 41 AA 4C 43 29 00 DA 08 94 02 97 |A..(BA.LC)......|
000004A0: 42 41 AA 4C 43 2C 30 3A 40 47 2C 32 34 2C 30 2C |BA.LC,0:@G,24,0,|
000004B0: 33 39 2C 30 2C 54 53 24 3A 40 50 2C 32 34 2C 30 |39,0,TS$:@P,24,0|
000004C0: 2C 22 4F 4E 45 20 4D 4F 4D 45 4E 54 2C 20 50 4C |,"ONE MOMENT, PL|
000004D0: 45 41 53 45 22 3A 8D 32 30 30 00 10 09 9E 02 5A |EASE":.200.....Z|
000004E0: B2 B8 28 30 29 3A 40 50 2C 32 34 2C 30 2C 54 53 |..(0):@P,24,0,TS|
000004F0: 24 3A 97 42 41 AA 4C 43 2C 4F 41 3A 40 50 2C 59 |$:.BA.LC,OA:@P,Y|
00000500: 5A 2C 58 5A 2C 22 22 3A 54 53 24 B2 22 22 3A 8E |Z,XZ,"":TS$."":.|
00000510: 00 4D 09 B6 03 84 31 35 2C 41 24 3A 40 50 2C 32 |.M....15,A$:@P,2|
00000520: 34 2C 30 2C 22 50 4C 41 43 45 20 53 59 53 54 45 |4,0,"PLACE SYSTE|
00000530: 4D 20 44 49 53 4B 20 49 4E 20 44 52 49 56 45 2D |M DISK IN DRIVE-|
00000540: 20 50 52 45 53 53 20 53 50 41 43 45 22 00 6A 09 | PRESS SPACE".j.|
00000550: C0 03 A1 4B 59 24 3A 8D 32 32 30 30 3A 8B 4B 59 |...KY$:.2200:.KY|
00000560: 24 B3 B1 22 20 22 A7 39 36 30 00 96 09 CA 03 40 |$.." ".960.....@|
00000570: 50 2C 32 34 2C 30 2C 22 52 45 54 55 52 4E 49 4E |P,24,0,"RETURNIN|
00000580: 47 20 54 4F 20 4D 41 49 4E 20 4D 45 4E 55 22 3A |G TO MAIN MENU":|
00000590: 8D 32 30 30 3A 8E 00 B2 09 E2 04 46 47 B2 31 3A |.200:......FG.1:|
000005A0: 8D 31 30 30 3A 8D 31 32 36 30 3A 8D 31 33 38 30 |.100:.1260:.1380|
000005B0: 3A 8A 00 D6 09 EC 04 99 22 93 22 3B 3A 54 54 24 |:.......".";:TT$|
000005C0: B2 22 44 49 53 4B 20 44 49 52 45 43 54 4F 52 59 |."DISK DIRECTORY|
000005D0: 22 3A 8D 34 30 30 00 F4 09 00 05 99 3A 99 A3 31 |":.400......:..1|
000005E0: 33 29 22 11 11 11 11 12 45 92 56 45 52 59 54 48 |3)".....E.VERYTH|
000005F0: 49 4E 47 22 00 10 0A 0A 05 99 A3 31 33 29 22 11 |ING".......13)".|
00000600: 12 4D 92 41 4E 41 47 45 52 20 46 49 4C 45 53 22 |.M.ANAGER FILES"|
00000610: 00 2B 0A 14 05 99 A3 31 33 29 22 11 12 52 92 45 |.+.....13)"..R.E|
00000620: 50 4F 52 54 20 46 49 4C 45 53 22 00 50 0A 1E 05 |PORT FILES".P...|
00000630: 99 3A 99 A3 31 30 29 22 11 11 11 45 4E 54 45 52 |.:..10)"...ENTER|
00000640: 20 53 45 4C 45 43 54 49 4F 4E 3F 20 45 9D 22 3B | SELECTION? E.";|
00000650: 00 6C 0A 28 05 4C B2 31 3A 54 59 B2 30 3A 41 43 |.l.(.L.1:TY.0:AC|
00000660: 24 B2 22 45 4D 52 22 3A 8D 35 35 30 00 87 0A 46 |$."EMR":.550...F|
00000670: 05 41 24 B2 22 2A 22 3A 8B 4B 59 B2 32 A7 41 24 |.A$."*":.KY.2.A$|
00000680: B2 22 44 41 2E 2A 22 00 9B 0A 50 05 8B 4B 59 B2 |."DA.*"...P..KY.|
00000690: 33 A7 41 24 B2 22 52 46 2E 2A 22 00 A1 0A 5A 05 |3.A$."RF.*"...Z.|
000006A0: 8E 00 D7 0A 64 05 46 4C B2 30 3A 9F 31 2C 38 2C |....d.FL.0:.1,8,|
000006B0: 30 2C 22 24 30 3A 22 AA 41 24 3A 84 31 35 2C 42 |0,"$0:".A$:.15,B|
000006C0: 31 2C 42 24 3A 8B 42 31 B3 B1 30 A7 8D 31 35 30 |1,B$:.B1..0..150|
000006D0: 30 3A 89 31 34 35 35 00 E7 0A 69 05 99 22 93 22 |0:.1455...i.."."|
000006E0: 3B 3A 9E 42 41 AA 33 00 FA 0A 6E 05 8B C2 28 32 |;:.BA.3...n...(2|
000006F0: 35 34 29 B2 30 A7 31 34 35 30 00 0D 0B 78 05 8B |54).0.1450...x..|
00000700: C2 28 31 39 38 29 B2 30 A7 31 34 30 30 00 25 0B |.(198).0.1400.%.|
00000710: 82 05 A1 4B 59 24 3A 8D 32 32 30 30 3A 8B 52 46 |...KY$:.2200:.RF|
00000720: A7 31 34 30 30 00 43 0B 8C 05 8B 4B 59 24 B2 22 |.1400.C....KY$."|
00000730: 10 22 AF 46 47 B2 31 A7 8D 39 30 30 30 3A 89 31 |.".FG.1..9000:.1|
00000740: 34 30 30 00 56 0B 96 05 8B 4B 59 24 B3 B1 22 20 |400.V....KY$.." |
00000750: 22 A7 31 34 30 30 00 66 0B A0 05 9E 42 41 AA 36 |".1400.f....BA.6|
00000760: 3A 89 31 33 39 30 00 90 0B AA 05 99 3A 99 22 46 |:.1390......:."F|
00000770: 52 45 45 20 42 4C 4F 43 4B 53 20 3D 22 3B C2 28 |REE BLOCKS =";.(|
00000780: 32 35 31 29 AA 32 35 36 AC C2 28 32 35 32 29 3B |251).256..(252);|
00000790: 00 9D 0B AF 05 A0 31 3A 97 32 2C 52 52 00 B0 0B |......1:.2,RR...|
000007A0: B4 05 8B C2 28 31 39 38 29 B2 30 A7 31 34 36 30 |....(198).0.1460|
000007B0: 00 D3 0B BE 05 A1 4B 59 24 3A 8B 4B 59 24 B2 22 |......KY$:.KY$."|
000007C0: 10 22 AF 46 47 B2 31 A7 8D 39 30 30 30 3A 89 31 |.".FG.1..9000:.1|
000007D0: 34 36 30 00 E6 0B C8 05 8D 32 32 30 30 3A 8B 52 |460......2200:.R|
000007E0: 46 A7 31 34 36 30 00 EC 0B D2 05 8E 00 11 0C DC |F.1460..........|
000007F0: 05 99 22 93 22 3B 3A 8D 34 30 30 3A 40 50 2C 32 |..".";:.400:@P,2|
00000800: 34 2C 32 30 AB C3 28 42 24 29 AD 32 2C 42 24 3A |4,20..(B$).2,B$:|
00000810: 8E 00 1B 0C 0E 06 8A 31 35 35 35 00 4F 0C 13 06 |.......1555.O...|
00000820: 8D 31 30 30 3A 9F 32 2C 38 2C 32 2C 22 30 3A 46 |.100:.2,8,2,"0:F|
00000830: 53 2E 48 45 4C 50 20 53 43 52 45 45 4E 53 20 22 |S.HELP SCREENS "|
00000840: 3A 84 31 35 2C 41 3A 84 32 2C 4E 53 3A A0 32 00 |:.15,A:.2,NS:.2.|
00000850: 64 0C 18 06 8B 41 B3 B1 30 A7 8D 39 35 30 3A 89 |d....A..0..950:.|
00000860: 31 35 35 30 00 9B 0C 22 06 9F 32 2C 38 2C 32 2C |1550..."..2,8,2,|
00000870: 22 53 43 2E 48 45 4C 50 20 53 43 52 45 45 4E 53 |"SC.HELP SCREENS|
00000880: 20 22 3A 9E 42 42 AA 39 2C 31 3A 9E 42 42 AA 33 | ":.BB.9,1:.BB.3|
00000890: 30 2C 31 3A A0 32 3A 53 43 B2 31 00 CF 0C 2C 06 |0,1:.2:SC.1...,.|
000008A0: 97 35 33 32 37 32 2C 32 33 3A 9E 42 42 AA 31 32 |.53272,23:.BB.12|
000008B0: 2C 53 43 3A 97 31 30 32 34 2C 33 32 3A 40 50 2C |,SC:.1024,32:@P,|
000008C0: 32 34 2C 30 2C 22 46 37 2C 46 38 2C 58 3F 22 00 |24,0,"F7,F8,X?".|
000008D0: E2 0C 31 06 8B C2 28 31 39 38 29 B2 30 A7 31 35 |..1...(198).0.15|
000008E0: 38 35 00 08 0D 36 06 A1 4B 59 24 3A 8D 32 32 30 |85...6..KY$:.220|
000008F0: 30 3A 8B 4B 59 24 B2 22 88 22 AF 53 43 B3 4E 53 |0:.KY$.".".SC.NS|
00000900: A7 53 43 B2 53 43 AA 31 00 22 0D 40 06 8B 4B 59 |.SC.SC.1.".@..KY|
00000910: 24 B2 22 8C 22 AF 53 43 B1 31 A7 53 43 B2 53 43 |$.".".SC.1.SC.SC|
00000920: AB 31 00 36 0D 4A 06 8B 4B 59 24 B2 22 58 22 A7 |.1.6.J..KY$."X".|
00000930: 97 32 2C 30 3A 8A 00 40 0D 54 06 89 31 35 38 30 |.2,0:..@.T..1580|
00000940: 00 67 0D 98 08 52 46 B2 30 3A 8B 4B 59 24 B3 B1 |.g...RF.0:.KY$..|
00000950: 22 85 22 AF 4B 59 24 B3 B1 22 89 22 AF 4B 59 24 |".".KY$..".".KY$|
00000960: B3 B1 22 10 22 A7 8E 00 81 0D 99 08 8B 4B 59 24 |.."."........KY$|
00000970: B2 22 10 22 A7 8D 39 30 30 30 3A 52 46 B2 31 3A |."."..9000:RF.1:|
00000980: 8E 00 BE 0D 9A 08 4B 50 24 B2 4B 59 24 3A 4B 50 |......KP$.KY$:KP|
00000990: B2 4B 59 3A 50 32 B2 C2 28 32 29 3A 97 31 39 38 |.KY:P2..(2):.198|
000009A0: 2C 31 3A 97 36 33 31 2C 31 33 3A 58 5A B2 C2 28 |,1:.631,13:XZ..(|
000009B0: 32 31 31 29 3A 59 5A B2 C2 28 32 31 34 29 00 E8 |211):YZ..(214)..|
000009C0: 0D 9B 08 4F 41 B2 C2 28 42 41 AA 4C 43 29 3A 97 |...OA..(BA.LC):.|
000009D0: 42 41 AA 4C 43 2C 30 3A 40 47 2C 32 34 2C 30 2C |BA.LC,0:@G,24,0,|
000009E0: 33 39 2C 30 2C 54 53 24 00 17 0E 9C 08 40 50 2C |39,0,TS$.....@P,|
000009F0: 32 34 2C 30 2C 22 22 3A 8D 32 30 30 3A 40 50 2C |24,0,"":.200:@P,|
00000A00: 32 34 2C 30 2C 22 12 41 52 45 20 59 4F 55 20 53 |24,0,".ARE YOU S|
00000A10: 55 52 45 3F 92 20 22 00 2F 0E 9D 08 59 41 B2 C2 |URE?. "./...YA..|
00000A20: 28 32 31 34 29 3A 58 41 B2 C2 28 32 31 31 29 00 |(214):XA..(211).|
00000A30: 5B 0E 9E 08 40 47 2C 59 41 2C 58 41 2C 31 2C 30 |[...@G,YA,XA,1,0|
00000A40: 2C 52 53 24 3A 40 48 2C 52 53 24 2C 22 59 4E 22 |,RS$:@H,RS$,"YN"|
00000A50: 3A 8B 4B 59 B2 30 A7 32 32 30 36 00 75 0E 9F 08 |:.KY.0.2206.u...|
00000A60: 4B 59 24 B2 4B 50 24 3A 8B 52 53 24 B2 22 59 22 |KY$.KP$:.RS$."Y"|
00000A70: A7 32 32 31 30 00 A2 0E A0 08 40 50 2C 32 34 2C |.2210.....@P,24,|
00000A80: 30 2C 54 53 24 3A 54 53 24 B2 22 22 3A 40 50 2C |0,TS$:TS$."":@P,|
00000A90: 59 5A 2C 58 5A 2C 22 22 3A 97 42 41 AA 4C 43 2C |YZ,XZ,"":.BA.LC,|
00000AA0: 4F 41 00 C1 0E A1 08 4B 59 B2 4B 50 3A 4B 59 24 |OA.....KY.KP:KY$|
00000AB0: B2 4B 50 24 3A 97 32 2C 50 32 3A 52 46 B2 31 3A |.KP$:.2,P2:RF.1:|
00000AC0: 8E 00 C8 0E A2 08 A0 31 00 E8 0E A7 08 97 32 2C |.......1......2,|
00000AD0: 30 3A 8B 4B 59 24 B2 22 89 22 A7 4B 59 B2 52 52 |0:.KY$.".".KY.RR|
00000AE0: 3A 97 32 2C 52 52 3A 8A 00 FA 0E AC 08 8B 4B 59 |:.2,RR:.......KY|
00000AF0: 24 B2 22 85 22 A7 34 30 39 30 00 00 0F B1 08 8E |$.".".4090......|
00000B00: 00 35 0F A0 0F 8D 31 30 30 3A 99 22 93 22 3B 3A |.5....100:.".";:|
00000B10: 54 54 24 B2 22 4D 41 4E 49 50 55 4C 41 54 45 20 |TT$."MANIPULATE |
00000B20: 46 49 4C 45 53 22 3A 8D 34 30 30 3A 53 50 B2 31 |FILES":.400:SP.1|
00000B30: 3A 99 22 11 22 00 49 0F A5 0F 8B C2 28 38 30 39 |:.".".I.....(809|
00000B40: 29 B2 32 34 36 A7 3A 40 41 00 60 0F AA 0F 99 A6 |).246.:@A.`.....|
00000B50: 53 50 29 22 11 12 42 92 4C 41 4E 4B 22 41 46 24 |SP)"..B.LANK"AF$|
00000B60: 00 76 0F AF 0F 99 A6 53 50 29 22 11 12 43 92 4F |.v.....SP)"..C.O|
00000B70: 50 59 22 41 46 24 00 93 0F B1 0F 99 A6 53 50 29 |PY"AF$.......SP)|
00000B80: 22 11 12 44 92 49 53 4B 20 44 49 52 45 43 54 4F |"..D.ISK DIRECTO|
00000B90: 52 59 22 00 AB 0F B4 0F 99 A6 53 50 29 22 11 12 |RY".......SP)"..|
00000BA0: 45 92 58 54 45 4E 44 22 41 46 24 00 C0 0F B6 0F |E.XTEND"AF$.....|
00000BB0: 99 A6 53 50 29 22 11 12 46 92 49 58 22 41 46 24 |..SP)"..F.IX"AF$|
00000BC0: 00 D2 0F B7 0F 99 22 13 11 11 11 22 3A 53 50 B2 |......"....":SP.|
00000BD0: 32 32 00 EA 0F B8 0F 99 A6 53 50 29 22 11 12 48 |22.......SP)"..H|
00000BE0: 92 45 4C 50 20 46 49 4C 45 22 00 01 10 B9 0F 99 |.ELP FILE"......|
00000BF0: A6 53 50 29 22 11 12 50 92 52 49 4E 54 22 41 46 |.SP)"..P.RINT"AF|
00000C00: 24 00 21 10 BE 0F 99 A6 53 50 29 22 11 12 52 92 |$.!.....SP)"..R.|
00000C10: 45 2D 41 52 52 41 4E 47 45 20 41 20 46 49 4C 45 |E-ARRANGE A FILE|
00000C20: 22 00 3E 10 C3 0F 99 A6 53 50 29 22 11 12 53 92 |".>.....SP)"..S.|
00000C30: 43 52 41 54 43 48 20 41 20 46 49 4C 45 22 00 5E |CRATCH A FILE".^|
00000C40: 10 C8 0F 99 A6 53 50 29 22 11 45 12 58 92 49 54 |.....SP)".E.X.IT|
00000C50: 20 54 4F 20 4D 41 49 4E 20 4D 45 4E 55 22 00 9D | TO MAIN MENU"..|
00000C60: 10 D2 0F 99 A6 31 31 29 22 11 11 45 4E 54 45 52 |.....11)"..ENTER|
00000C70: 20 53 45 4C 45 43 54 49 4F 4E 3F 20 22 3B 3A 54 | SELECTION? ";:T|
00000C80: 59 B2 30 3A 4C B2 31 3A 41 43 24 B2 22 42 43 44 |Y.0:L.1:AC$."BCD|
00000C90: 45 46 48 50 52 53 58 22 3A 8D 35 35 30 00 D8 10 |EFHPRSX":.550...|
00000CA0: E6 0F 91 4B 59 89 20 35 33 30 30 2C 34 33 30 30 |...KY. 5300,4300|
00000CB0: 2C 34 31 30 30 2C 34 32 30 30 2C 35 34 30 30 2C |,4100,4200,5400,|
00000CC0: 31 35 35 30 2C 35 31 30 30 2C 34 35 30 30 2C 35 |1550,5100,4500,5|
00000CD0: 32 30 30 2C 34 30 38 30 00 FD 10 F0 0F 40 50 2C |200,4080.....@P,|
00000CE0: 32 34 2C 30 2C 22 52 45 54 55 52 4E 49 4E 47 20 |24,0,"RETURNING |
00000CF0: 54 4F 20 4D 41 49 4E 20 4D 45 4E 55 22 00 24 11 |TO MAIN MENU".$.|
00000D00: FA 0F 97 32 2C 30 3A 40 58 2C 22 36 34 2E 43 52 |...2,0:@X,"64.CR|
00000D10: 45 41 54 45 45 44 49 54 22 3A 8D 39 35 30 3A 89 |EATEEDIT":.950:.|
00000D20: 34 30 39 30 00 4A 11 04 10 40 50 2C 32 34 2C 30 |4090.J...@P,24,0|
00000D30: 2C 22 4C 4F 41 44 49 4E 47 20 4F 50 54 49 4F 4E |,"LOADING OPTION|
00000D40: 2E 2E 2E 22 3A 8A 31 32 35 30 00 5E 11 68 10 8F |...":.1250.^.h..|
00000D50: 20 45 58 54 45 4E 44 20 41 20 46 49 4C 45 00 89 | EXTEND A FILE..|
00000D60: 11 72 10 99 22 93 22 3B 3A 54 54 24 B2 22 45 58 |.r..".";:TT$."EX|
00000D70: 54 45 4E 44 22 AA 41 46 24 3A 46 39 B2 31 3A 8D |TEND".AF$:F9.1:.|
00000D80: 33 30 30 3A 8D 36 36 30 30 00 B2 11 7C 10 99 3A |300:.6600...|..:|
00000D90: 99 22 11 54 48 45 20 46 49 4C 45 20 4E 4F 57 20 |.".THE FILE NOW |
00000DA0: 48 41 53 22 3B 3A 99 4E 52 22 52 45 43 4F 52 44 |HAS";:.NR"RECORD|
00000DB0: 53 22 00 DC 11 7D 10 4E 32 B2 4E 52 3A 8D 35 37 |S"...}.N2.NR:.57|
00000DC0: 30 30 3A 4E 52 B2 4E 52 AA 4E 31 3A 8B 4E 52 B1 |00:NR.NR.N1:.NR.|
00000DD0: 32 30 30 30 A7 4E 52 B2 32 30 30 30 00 07 12 81 |2000.NR.2000....|
00000DE0: 10 99 22 11 59 4F 55 20 43 41 4E 20 48 41 56 45 |..".YOU CAN HAVE|
00000DF0: 20 41 20 54 4F 54 41 4C 20 4F 46 22 4E 52 22 52 | A TOTAL OF"NR"R|
00000E00: 45 43 4F 52 44 53 22 00 44 12 86 10 40 50 2C 31 |ECORDS".D...@P,1|
00000E10: 30 2C 30 2C 22 54 4F 54 41 4C 20 4E 55 4D 42 45 |0,0,"TOTAL NUMBE|
00000E20: 52 20 4F 46 20 52 45 43 4F 52 44 53 20 57 41 4E |R OF RECORDS WAN|
00000E30: 54 45 44 3F 20 22 3A 54 59 B2 31 3A 4C B2 34 3A |TED? ":TY.1:L.4:|
00000E40: 8D 35 35 30 00 60 12 90 10 41 B2 B5 28 41 29 3A |.550.`...A..(A):|
00000E50: 8B 41 B1 4E 52 B0 41 B3 B2 4E 32 A7 34 32 33 30 |.A.NR.A..N2.4230|
00000E60: 00 92 12 9A 10 42 4D B2 30 3A 4D 44 24 B2 22 41 |.....BM.0:MD$."A|
00000E70: 44 44 49 4E 47 22 AA C4 28 41 AB 4E 31 29 AA 22 |DDING"..(A.N1)."|
00000E80: 20 52 45 43 4F 52 44 53 20 54 4F 20 22 3A 8D 34 | RECORDS TO ":.4|
00000E90: 35 30 00 AC 12 A4 10 9F 33 2C 38 2C 33 2C 22 44 |50......3,8,3,"D|
00000EA0: 41 2E 22 AA 4E 46 24 AA 22 2C 41 22 00 CA 12 A9 |A.".NF$.",A"....|
00000EB0: 10 40 4D 2C 57 41 24 2C 52 45 24 28 30 29 2C 31 |.@M,WA$,RE$(0),1|
00000EC0: 3A 81 4A B2 31 A4 41 AB 4E 31 00 E5 12 AE 10 81 |:.J.1.A.N1......|
00000ED0: 49 B2 30 A4 4E 46 AB 31 3A 98 33 2C 52 45 24 28 |I.0.NF.1:.3,RE$(|
00000EE0: 49 29 3B 3A 82 00 1F 13 B3 10 40 50 2C 32 34 2C |I);:......@P,24,|
00000EF0: 33 34 2C C4 28 4A 29 3A 82 3A A0 33 3A 40 50 2C |34,.(J):.:.3:@P,|
00000F00: 32 34 2C 30 2C 22 50 52 4F 43 45 53 53 49 4E 47 |24,0,"PROCESSING|
00000F10: 2E 2E 2E 22 3A 8D 32 30 30 3A 8D 36 30 30 30 00 |...":.200:.6000.|
00000F20: 42 13 B5 10 8B 52 56 B2 31 A7 4E 46 24 B2 44 46 |B....RV.1.NF$.DF|
00000F30: 24 3A 41 B2 43 43 3A 8D 36 37 30 30 3A 89 34 32 |$:A.CC:.6700:.42|
00000F40: 38 33 00 6F 13 B6 10 98 31 35 2C 22 53 30 3A 46 |83.o....15,"S0:F|
00000F50: 53 2E 22 AA 4E 46 24 3A 9F 32 2C 38 2C 33 2C 22 |S.".NF$:.2,8,3,"|
00000F60: 46 53 2E 22 AA 4E 46 24 AA 22 2C 53 2C 57 22 00 |FS.".NF$.",S,W".|
00000F70: B6 13 B7 10 98 32 2C 4E 53 3B 43 24 3B 4E 46 3B |.....2,NS;C$;NF;|
00000F80: 43 24 3B 43 41 3B 43 24 3B 54 4C 3B 43 24 3B 41 |C$;CA;C$;TL;C$;A|
00000F90: 3B 43 24 3B 51 4F 24 3B 53 43 24 3B 51 4F 24 3B |;C$;QO$;SC$;QO$;|
00000FA0: 43 24 3B 51 4F 24 3B 50 31 24 3B 51 4F 24 3B 43 |C$;QO$;P1$;QO$;C|
00000FB0: 24 3B 51 4F 24 3B 00 EA 13 B8 10 98 32 2C 50 32 |$;QO$;......2,P2|
00000FC0: 24 3B 51 4F 24 3A 81 49 B2 30 A4 4E 46 AB 31 3A |$;QO$:.I.0.NF.1:|
00000FD0: 98 32 2C 46 41 24 28 49 29 3B 3A 82 3A A0 32 3A |.2,FA$(I);:.:.2:|
00000FE0: 8B 42 4D B2 31 A7 34 32 38 33 00 23 14 B9 10 9F |.BM.1.4283.#....|
00000FF0: 31 2C 38 2C 32 2C 22 42 4D 2E 22 AA 4E 46 24 3A |1,8,2,"BM.".NF$:|
00001000: 40 49 4C 2C 34 2C 31 2C 41 24 3A 40 49 4C 2C 38 |@IL,4,1,A$:@IL,8|
00001010: 35 2C 31 2C 41 24 3A 40 49 4C 2C 38 35 2C 31 2C |5,1,A$:@IL,85,1,|
00001020: 41 32 24 00 45 14 BA 10 40 49 4C 2C 38 30 2C 31 |A2$.E...@IL,80,1|
00001030: 2C 41 33 24 3A 41 24 B2 41 24 AA 41 32 24 AA 41 |,A3$:A$.A$.A2$.A|
00001040: 33 24 3A A0 31 00 60 14 BB 10 98 31 35 2C 22 53 |3$:.1.`....15,"S|
00001050: 30 3A 42 4D 2E 22 AA 4E 46 24 3A 8D 35 35 30 30 |0:BM.".NF$:.5500|
00001060: 00 9B 14 BC 10 9F 31 2C 38 2C 31 2C 22 42 4D 2E |......1,8,1,"BM.|
00001070: 22 AA 4E 46 24 AA 22 2C 50 22 3A 98 31 2C 22 20 |".NF$.",P":.1," |
00001080: 20 22 AA C7 28 28 41 AB 31 29 AD 38 AA 31 29 AA | "..((A.1).8.1).|
00001090: C7 28 30 29 AA 41 24 3B 3A A0 31 00 A6 14 CB 10 |.(0).A$;:.1.....|
000010A0: 97 32 2C 30 3A 8A 00 C6 14 CC 10 8F 20 20 20 20 |.2,0:....... |
000010B0: 20 20 20 20 20 43 4F 50 59 20 41 20 46 49 4C 45 | COPY A FILE|
000010C0: 20 20 20 2D 2D 2D 00 F5 14 D6 10 99 22 93 22 3B | ---......".";|
000010D0: 3A 40 50 2C 32 34 2C 30 2C 22 50 4C 41 43 45 20 |:@P,24,0,"PLACE |
000010E0: 53 4F 55 52 43 45 20 44 49 53 4B 20 49 4E 20 44 |SOURCE DISK IN D|
000010F0: 52 49 56 45 22 00 23 15 D7 10 99 22 13 22 3B 3A |RIVE".#....".";:|
00001100: 54 54 24 B2 22 43 4F 50 59 22 AA 41 46 24 3A 46 |TT$."COPY".AF$:F|
00001110: 39 B2 30 3A 8D 34 30 30 3A 8D 33 30 35 3A 8D 36 |9.0:.400:.305:.6|
00001120: 36 30 30 00 58 15 D8 10 40 4C 3B 22 42 4D 2E 22 |600.X...@L;"BM."|
00001130: AA 4E 46 24 2C 22 46 46 30 30 22 3A 9F 32 2C 38 |.NF$,"FF00":.2,8|
00001140: 2C 32 2C 22 53 43 2E 22 AA 4E 46 24 3A 9E 42 42 |,2,"SC.".NF$:.BB|
00001150: AA 33 30 2C 31 3A A0 32 00 98 15 DB 10 40 4C 3B |.30,1:.2.....@L;|
00001160: 22 54 53 2E 22 AA 4E 46 24 2C 22 42 41 30 30 22 |"TS.".NF$,"BA00"|
00001170: 3A 4F 44 B2 30 3A 42 53 B2 B8 28 30 29 AB 35 31 |:OD.0:BS..(0).51|
00001180: 32 3A 54 54 B2 54 4C AA 33 AC 4E 46 3A 42 44 B2 |2:TT.TL.3.NF:BD.|
00001190: B5 28 42 53 AD 54 54 29 00 CC 15 E0 10 99 3A 99 |.(BS.TT)......:.|
000011A0: 22 11 43 4F 50 59 20 12 41 92 43 54 49 56 45 20 |".COPY .A.CTIVE |
000011B0: 52 45 43 4F 52 44 53 20 4F 52 20 12 45 92 4E 54 |RECORDS OR .E.NT|
000011C0: 49 52 45 20 46 49 4C 45 3F 20 22 3B 00 EE 15 E5 |IRE FILE? ";....|
000011D0: 10 41 43 24 B2 22 41 45 22 3A 54 59 B2 30 3A 4C |.AC$."AE":TY.0:L|
000011E0: B2 31 3A 8D 35 35 30 3A 43 54 24 B2 41 24 00 21 |.1:.550:CT$.A$.!|
000011F0: 16 E6 10 99 3A 99 22 11 44 45 53 54 49 4E 41 54 |....:.".DESTINAT|
00001200: 49 4F 4E 20 46 49 4C 45 4E 41 4D 45 3F 20 22 3B |ION FILENAME? ";|
00001210: 3A 4C B2 31 33 3A 8D 35 35 30 3A 44 46 24 B2 41 |:L.13:.550:DF$.A|
00001220: 24 00 3D 16 EA 10 44 46 B2 4E 46 AB 31 3A 86 42 |$.=...DF.NF.1:.B|
00001230: 24 28 44 46 2C 42 44 AB 31 29 3A A0 31 00 55 16 |$(DF,BD.1):.1.U.|
00001240: F4 10 97 31 39 38 2C 31 3A 97 36 33 31 2C 33 32 |...198,1:.631,32|
00001250: 3A 50 50 B2 30 00 8A 16 F6 10 44 24 B2 22 53 4F |:PP.0.....D$."SO|
00001260: 55 52 43 45 22 3A 8D 34 39 30 30 3A 9F 31 2C 38 |URCE":.4900:.1,8|
00001270: 2C 32 2C 22 23 22 3A 4D 44 24 B2 22 52 45 41 44 |,2,"#":MD$."READ|
00001280: 49 4E 47 20 22 3A 8D 34 35 30 00 C2 16 F8 10 40 |ING ":.450.....@|
00001290: 52 2C 30 2C 52 45 24 28 30 29 3A 52 4E B2 4F 44 |R,0,RE$(0):RN.OD|
000012A0: 3A 81 49 B2 30 A4 42 44 AB 31 3A 8D 34 38 30 30 |:.I.0.BD.1:.4800|
000012B0: 3A 8B 46 32 B3 B1 31 A7 42 44 B2 49 3A 89 34 33 |:.F2..1.BD.I:.43|
000012C0: 35 35 00 EE 16 F9 10 40 50 2C 32 34 2C 33 34 2C |55.....@P,24,34,|
000012D0: C4 28 52 4E 29 3A 8D 32 30 30 3A 8B 52 56 B2 31 |.(RN):.200:.RV.1|
000012E0: A7 8D 34 37 30 30 3A 82 3A 89 34 33 35 35 00 0F |..4700:.:.4355..|
000012F0: 17 FE 10 81 4A B2 30 A4 4E 46 AB 31 3A 42 24 28 |....J.0.NF.1:B$(|
00001300: 4A 2C 49 29 B2 52 45 24 28 4A 29 3A 82 3A 82 00 |J,I).RE$(J):.:..|
00001310: 1C 17 03 11 4F 44 B2 52 4E 3A A0 31 00 4B 17 30 |....OD.RN:.1.K.0|
00001320: 11 44 24 B2 22 44 45 53 54 49 4E 41 54 49 4F 4E |.D$."DESTINATION|
00001330: 22 3A 8D 34 39 30 30 3A 4D 44 24 B2 22 57 52 49 |":.4900:MD$."WRI|
00001340: 54 49 4E 47 20 22 3A 8D 34 35 30 00 89 17 35 11 |TING ":.450...5.|
00001350: 8B 50 50 B2 30 A7 50 50 B2 31 3A 98 31 35 2C 22 |.PP.0.PP.1:.15,"|
00001360: 53 30 3A 44 41 2E 22 AA 44 46 24 3A 9F 31 2C 38 |S0:DA.".DF$:.1,8|
00001370: 2C 38 2C 22 44 41 2E 22 AA 44 46 24 AA 22 2C 53 |,8,"DA.".DF$.",S|
00001380: 2C 57 22 3A 89 34 34 32 30 00 A3 17 3A 11 9F 31 |,W":.4420...:..1|
00001390: 2C 38 2C 38 2C 22 44 41 2E 22 AA 44 46 24 AA 22 |,8,8,"DA.".DF$."|
000013A0: 2C 41 22 00 D2 17 44 11 81 49 B2 30 A4 42 44 AB |,A"...D..I.0.BD.|
000013B0: 31 3A 81 4A B2 30 A4 44 46 3A 98 31 2C 42 24 28 |1:.J.0.DF:.1,B$(|
000013C0: 4A 2C 49 29 3B 3A 42 24 28 4A 2C 49 29 B2 22 22 |J,I);:B$(J,I).""|
000013D0: 3A 82 00 02 18 45 11 43 43 B2 43 43 AA 31 3A 40 |:....E.CC.CC.1:@|
000013E0: 50 2C 32 34 2C 33 34 2C C4 28 43 43 29 3A 8D 32 |P,24,34,.(CC):.2|
000013F0: 30 30 3A 82 3A A0 31 3A 8B 46 32 B2 31 A7 34 33 |00:.:.1:.F2.1.43|
00001400: 34 32 00 0C 18 49 11 8D 34 34 35 30 00 32 18 4B |42...I..4450.2.K|
00001410: 11 50 50 B2 30 3A 40 50 2C 32 34 2C 30 2C 22 50 |.PP.0:@P,24,0,"P|
00001420: 52 4F 43 45 53 53 49 4E 47 2E 2E 2E 22 3A 8D 32 |ROCESSING...":.2|
00001430: 30 30 00 72 18 4C 11 8B 52 56 B2 30 A7 98 31 35 |00.r.L..RV.0..15|
00001440: 2C 22 53 30 3A 53 43 2E 22 AA 44 46 24 3A 9F 32 |,"S0:SC.".DF$:.2|
00001450: 2C 38 2C 32 2C 22 53 43 2E 22 AA 44 46 24 AA 22 |,8,2,"SC.".DF$."|
00001460: 2C 53 2C 57 22 3A 9E 42 42 AA 32 37 2C 4E 53 3A |,S,W":.BB.27,NS:|
00001470: A0 32 00 A1 18 4D 11 4E 52 B2 43 43 3A 97 52 54 |.2...M.NR.CC:.RT|
00001480: AA 33 2C B5 28 4E 52 AD 32 35 36 29 3A 97 52 54 |.3,.(NR.256):.RT|
00001490: AA 32 2C 4E 52 AB C2 28 52 54 AA 33 29 AC 32 35 |.2,NR..(RT.3).25|
000014A0: 36 00 D7 18 4E 11 4E 46 24 B2 44 46 24 3A 41 B2 |6...N.NF$.DF$:A.|
000014B0: 43 43 3A 8D 36 30 30 30 3A 40 4C 3B 22 54 53 2E |CC:.6000:@L;"TS.|
000014C0: 22 AA 4E 46 24 2C 22 42 41 30 30 22 3A 42 4D B2 |".NF$,"BA00":BM.|
000014D0: 31 3A 89 34 32 37 37 00 01 19 62 11 44 24 B2 22 |1:.4277...b.D$."|
000014E0: 53 4F 55 52 43 45 22 3A 8D 34 39 30 30 3A 4D 44 |SOURCE":.4900:MD|
000014F0: 24 B2 22 52 45 41 44 49 4E 47 20 22 3A 8D 34 35 |$."READING ":.45|
00001500: 30 00 3C 19 63 11 9E 38 32 38 2C 32 2C 42 24 28 |0.<.c..828,2,B$(|
00001510: 30 2C 30 29 3A 8D 36 35 30 3A 86 41 52 24 28 31 |0,0):.650:.AR$(1|
00001520: 35 30 29 3A 9F 31 2C 38 2C 32 2C 22 30 3A 41 52 |50):.1,8,2,"0:AR|
00001530: 2E 22 AA 4E 46 24 AA 22 2C 53 2C 52 00 57 19 64 |.".NF$.",S,R.W.d|
00001540: 11 49 B2 AB 31 3A 84 31 35 2C 41 3A 8B 41 A7 A0 |.I..1:.15,A:.A..|
00001550: 31 3A 89 34 34 35 36 00 79 19 65 11 49 B2 49 AA |1:.4456.y.e.I.I.|
00001560: 31 3A 40 49 4E 2C 31 2C 41 52 24 28 49 29 3A 8B |1:@IN,1,AR$(I):.|
00001570: 53 54 B2 30 A7 34 34 35 33 00 AC 19 66 11 A0 31 |ST.0.4453...f..1|
00001580: 3A 49 49 B2 49 3A 9F 31 2C 38 2C 32 2C 22 44 50 |:II.I:.1,8,2,"DP|
00001590: 2E 22 AA 4E 46 24 AA 22 2C 53 2C 52 22 3A 84 31 |.".NF$.",S,R":.1|
000015A0: 2C 4E 44 3A 86 44 50 24 28 4E 44 29 00 CE 19 67 |,ND:.DP$(ND)...g|
000015B0: 11 81 49 B2 30 A4 4E 44 AB 31 3A 40 49 4C 2C 34 |..I.0.ND.1:@IL,4|
000015C0: 2C 31 2C 44 50 24 28 49 29 3A 82 3A A0 31 00 02 |,1,DP$(I):.:.1..|
000015D0: 1A 68 11 44 24 B2 22 44 45 53 54 49 4E 41 54 49 |.h.D$."DESTINATI|
000015E0: 4F 4E 22 3A 8D 34 39 30 30 3A 4D 44 24 B2 22 57 |ON":.4900:MD$."W|
000015F0: 52 49 54 49 4E 47 20 22 3A 8D 34 35 30 3A 8B 41 |RITING ":.450:.A|
00001600: A7 8E 00 28 1A 69 11 98 31 35 2C 22 53 30 3A 41 |...(.i..15,"S0:A|
00001610: 52 2E 22 AA 44 46 24 3A 98 31 35 2C 22 53 30 3A |R.".DF$:.15,"S0:|
00001620: 44 50 2E 22 AA 44 46 24 00 62 1A 6A 11 9F 31 2C |DP.".DF$.b.j..1,|
00001630: 38 2C 32 2C 22 44 50 2E 22 AA 44 46 24 AA 22 2C |8,2,"DP.".DF$.",|
00001640: 53 2C 57 22 3A 98 31 2C 4E 44 3A 81 49 B2 30 A4 |S,W":.1,ND:.I.0.|
00001650: 4E 44 AB 31 3A 98 31 2C 44 50 24 28 49 29 3B 3A |ND.1:.1,DP$(I);:|
00001660: 82 49 00 99 1A 6B 11 A0 31 3A 9F 31 2C 38 2C 32 |.I...k..1:.1,8,2|
00001670: 2C 22 41 52 2E 22 AA 44 46 24 AA 22 2C 53 2C 57 |,"AR.".DF$.",S,W|
00001680: 22 3A 81 49 B2 30 A4 49 49 3A 98 31 2C 41 52 24 |":.I.0.II:.1,AR$|
00001690: 28 49 29 3A 82 49 3A A0 31 00 9F 1A 6C 11 8E 00 |(I):.I:.1...l...|
000016A0: C3 1A 94 11 99 22 93 22 3B 3A 54 54 24 B2 22 52 |.....".";:TT$."R|
000016B0: 45 2D 41 52 52 41 4E 47 45 22 AA 41 46 24 3A 8D |E-ARRANGE".AF$:.|
000016C0: 34 30 30 00 FA 1A 95 11 40 50 2C 32 34 2C 30 2C |400.....@P,24,0,|
000016D0: 22 50 4C 41 43 45 20 44 45 53 54 49 4E 41 54 49 |"PLACE DESTINATI|
000016E0: 4F 4E 20 44 49 53 4B 45 54 54 45 20 49 4E 20 44 |ON DISKETTE IN D|
000016F0: 52 49 56 45 22 3A 8D 32 30 30 00 23 1B 96 11 40 |RIVE":.200.#...@|
00001700: 50 2C 34 2C 30 2C 22 44 45 53 54 49 4E 41 54 49 |P,4,0,"DESTINATI|
00001710: 4F 4E 20 46 49 4C 45 4E 41 4D 45 3F 20 22 3A 8D |ON FILENAME? ":.|
00001720: 33 30 36 00 58 1B 97 11 9F 32 2C 38 2C 32 2C 22 |306.X....2,8,2,"|
00001730: 30 3A 46 53 2E 22 AA 4E 46 24 3A 84 32 2C 4E 53 |0:FS.".NF$:.2,NS|
00001740: 2C 4E 46 2C 43 41 2C 54 4C 2C 4E 52 2C 43 43 24 |,NF,CA,TL,NR,CC$|
00001750: 2C 50 31 24 2C 50 32 24 00 72 1B 98 11 44 46 B2 |,P1$,P2$.r...DF.|
00001760: 4E 46 AB 31 3A 44 4C B2 54 4C 3A 44 46 24 B2 4E |NF.1:DL.TL:DF$.N|
00001770: 46 24 00 AF 1B 99 11 86 4C 25 28 44 46 2C 34 29 |F$......L%(DF,4)|
00001780: 3A 81 49 B2 30 A4 44 46 3A 40 49 4C 2C 35 2C 32 |:.I.0.DF:@IL,5,2|
00001790: 2C 41 24 3A 81 4A B2 30 A4 33 3A 4C 25 28 49 2C |,A$:.J.0.3:L%(I,|
000017A0: 4A 29 B2 C6 28 CA 28 41 24 2C 4A AA 31 29 29 00 |J)..(.(A$,J.1)).|
000017B0: D7 1B 9B 11 82 3A 82 3A A0 32 3A 9F 32 2C 38 2C |.....:.:.2:.2,8,|
000017C0: 32 2C 22 53 43 2E 22 AA 4E 46 24 3A 9E 42 42 AA |2,"SC.".NF$:.BB.|
000017D0: 33 30 2C 31 3A A0 32 00 09 1C 9E 11 40 50 2C 32 |30,1:.2.....@P,2|
000017E0: 34 2C 30 2C 22 50 4C 41 43 45 20 53 4F 55 52 43 |4,0,"PLACE SOURC|
000017F0: 45 20 44 49 53 4B 45 54 54 45 20 49 4E 20 44 52 |E DISKETTE IN DR|
00001800: 49 56 45 22 3A 8D 32 30 30 00 3B 1C A0 11 40 50 |IVE":.200.;...@P|
00001810: 2C 36 2C 30 2C 22 53 4F 55 52 43 45 20 46 49 4C |,6,0,"SOURCE FIL|
00001820: 45 4E 41 4D 45 3F 20 22 3A 4E 46 24 B2 22 20 22 |ENAME? ":NF$." "|
00001830: 3A 8D 33 30 36 3A 8D 36 36 30 30 00 67 1C A3 11 |:.306:.6600.g...|
00001840: 40 4C 3B 22 54 53 2E 22 AA 4E 46 24 2C 22 42 41 |@L;"TS.".NF$,"BA|
00001850: 30 30 22 3A 40 4C 3B 22 42 4D 2E 22 AA 4E 46 24 |00":@L;"BM.".NF$|
00001860: 2C 22 46 46 30 30 22 00 82 1C A5 11 57 41 B2 44 |,"FF00".....WA.D|
00001870: 46 3A 8B 4E 46 AB 31 B3 44 46 A7 57 41 B2 4E 46 |F:.NF.1.DF.WA.NF|
00001880: AB 31 00 9C 1C A6 11 81 49 B2 30 A4 57 41 3A 4C |.1......I.0.WA:L|
00001890: 25 28 49 2C 34 29 B2 49 AA 31 3A 82 00 E0 1C A8 |%(I,4).I.1:.....|
000018A0: 11 4F 44 B2 30 3A 42 53 B2 B8 28 30 29 AB 31 30 |.OD.0:BS..(0).10|
000018B0: 32 34 3A 54 54 B2 44 4C AA 33 AC 44 46 3A 42 44 |24:TT.DL.3.DF:BD|
000018C0: B2 B5 28 42 53 AD 54 54 29 3A 86 42 24 28 44 46 |..(BS.TT):.B$(DF|
000018D0: 2C 42 44 AB 31 29 3A A0 31 3A 40 43 2C 43 43 24 |,BD.1):.1:@C,CC$|
000018E0: 00 29 1D F8 11 97 35 33 32 37 32 2C 43 41 3A 49 |.)....53272,CA:I|
000018F0: B2 30 3A 58 24 B2 22 20 20 20 20 20 20 20 20 20 |.0:X$." |
00001900: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001910: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 | "|
00001920: 3A 54 59 B2 31 3A 4C B2 33 00 67 1D 02 12 9E 20 |:TY.1:L.3.g.... |
00001930: 42 42 AA 31 32 2C 4C 25 28 49 2C 30 29 AA 31 3A |BB.12,L%(I,0).1:|
00001940: 40 50 2C 4C 25 28 49 2C 31 29 2C 4C 25 28 49 2C |@P,L%(I,1),L%(I,|
00001950: 32 29 2C 22 12 22 AA C8 28 58 24 2C 4C 25 28 49 |2),"."..(X$,L%(I|
00001960: 2C 33 29 29 AA 22 92 00 93 1D 0C 12 40 50 2C 32 |,3))."......@P,2|
00001970: 34 2C 30 2C 22 46 49 45 4C 44 22 AA C4 28 49 AA |4,0,"FIELD"..(I.|
00001980: 31 29 AA 22 3D 20 53 4F 55 52 43 45 20 46 49 45 |1)."= SOURCE FIE|
00001990: 4C 44 3F 00 B5 1D 0D 12 59 B2 C2 28 32 31 34 29 |LD?.....Y..(214)|
000019A0: 3A 58 B2 C2 28 32 31 31 29 AA 31 3A 99 4C 25 28 |:X..(211).1:.L%(|
000019B0: 49 2C 34 29 3B 00 CD 1D 16 12 8D 35 36 30 3A 8B |I,4);......560:.|
000019C0: 41 B3 30 B0 41 B1 4E 46 A7 34 36 33 30 00 EF 1D |A.0.A.NF.4630...|
000019D0: 18 12 4C 25 28 49 2C 34 29 B2 41 3A 8B 4B 59 24 |..L%(I,4).A:.KY$|
000019E0: B2 22 5F 22 A7 52 56 B2 31 3A 89 34 33 34 30 00 |."_".RV.1:.4340.|
000019F0: 0D 1E 1B 12 8B 4B 59 24 B2 22 91 22 A7 49 B2 49 |.....KY$.".".I.I|
00001A00: AB 32 3A 8B 49 B3 AB 31 A7 49 B2 AB 31 00 1F 1E |.2:.I..1.I..1...|
00001A10: 20 12 8B 4B 59 24 B2 22 13 22 A7 49 B2 AB 31 00 | ..KY$.".".I..1.|
00001A20: 34 1E 25 12 49 B2 49 AA 31 3A 8B 49 B1 44 46 A7 |4.%.I.I.1:.I.DF.|
00001A30: 49 B2 44 46 00 3E 1E 2A 12 89 34 36 31 30 00 57 |I.DF.>.*..4610.W|
00001A40: 1E 5C 12 81 4A B2 30 A4 44 46 3A 43 46 B2 4C 25 |.\..J.0.DF:CF.L%|
00001A50: 28 4A 2C 34 29 AB 31 00 7F 1E 66 12 8B 20 43 46 |(J,4).1...f.. CF|
00001A60: B2 AB 31 A7 42 24 28 4A 2C 49 29 B2 C8 28 58 24 |..1.B$(J,I)..(X$|
00001A70: 2C 4C 25 28 4A 2C 33 29 29 3A 89 34 37 35 30 00 |,L%(J,3)):.4750.|
00001A80: 96 1E 70 12 54 59 B2 C6 28 CA 28 46 41 24 28 43 |..p.TY..(.(FA$(C|
00001A90: 46 29 2C 35 29 29 00 C4 1E 7A 12 8B 54 59 B2 30 |F),5))...z..TY.0|
00001AA0: A7 42 24 28 4A 2C 49 29 B2 C8 28 52 45 24 28 43 |.B$(J,I)..(RE$(C|
00001AB0: 46 29 AA 58 24 2C 4C 25 28 4A 2C 33 29 29 3A 89 |F).X$,L%(J,3)):.|
00001AC0: 34 37 35 30 00 F6 1E 84 12 46 24 B2 52 45 24 28 |4750.....F$.RE$(|
00001AD0: 43 46 29 3A 9E 42 41 AA 32 37 2C 46 24 3A 42 24 |CF):.BA.27,F$:B$|
00001AE0: 28 4A 2C 49 29 B2 C9 28 58 24 AA 46 24 2C 4C 25 |(J,I)..(X$.F$,L%|
00001AF0: 28 4A 2C 33 29 29 00 26 1F 8E 12 82 3A 8B C8 28 |(J,3)).&....:..(|
00001B00: 52 45 24 28 30 29 2C 31 29 B2 57 41 24 A7 42 24 |RE$(0),1).WA$.B$|
00001B10: 28 30 2C 49 29 B2 57 41 24 AA CA 28 42 24 28 30 |(0,I).WA$..(B$(0|
00001B20: 2C 49 29 2C 32 29 00 2C 1F 98 12 8E 00 59 1F C0 |,I),2).,.....Y..|
00001B30: 12 46 32 B2 31 3A 8B 43 54 24 B2 22 41 22 A7 9E |.F2.1:.CT$."A"..|
00001B40: 42 3A 8B C2 28 32 29 B3 B1 31 B0 52 4E B2 AB 31 |B:..(2)..1.RN..1|
00001B50: A7 46 32 B2 31 32 38 3A 8E 00 6D 1F C5 12 8B 52 |.F2.128:..m....R|
00001B60: 4E B2 4E 52 A7 46 32 B2 31 32 38 3A 8E 00 88 1F |N.NR.F2.128:....|
00001B70: CA 12 40 52 2C 52 4E 2C 52 45 24 28 30 29 3A 52 |..@R,RN,RE$(0):R|
00001B80: 4E B2 52 4E AA 31 3A 8E 00 BE 1F 24 13 40 50 2C |N.RN.1:....$.@P,|
00001B90: 32 34 2C 30 2C 22 50 4C 41 43 45 20 22 3A 99 44 |24,0,"PLACE ":.D|
00001BA0: 24 3B 22 20 44 49 53 4B 20 49 4E 20 44 52 49 56 |$;" DISK IN DRIV|
00001BB0: 45 2D 53 50 41 43 45 22 3B 3A 8D 32 30 30 00 D1 |E-SPACE";:.200..|
00001BC0: 1F 29 13 8B C2 28 31 39 38 29 B2 30 A7 34 39 30 |.)...(198).0.490|
00001BD0: 35 00 EF 1F 2A 13 A1 4B 59 24 3A 8D 32 32 30 30 |5...*..KY$:.2200|
00001BE0: 3A 8B 4B 59 24 B3 B1 22 20 22 A7 34 39 30 35 00 |:.KY$.." ".4905.|
00001BF0: 05 20 2B 13 40 50 2C 32 34 2C 30 2C 22 22 3A 8D |. +.@P,24,0,"":.|
00001C00: 32 30 30 3A 8E 00 3E 20 EC 13 99 22 93 22 3B 3A |200:..> ...".";:|
00001C10: 54 54 24 B2 22 50 52 49 4E 54 22 AA 41 46 24 3A |TT$."PRINT".AF$:|
00001C20: 8D 33 30 30 3A 8D 36 36 30 30 3A 40 4C 3B 22 54 |.300:.6600:@L;"T|
00001C30: 53 2E 22 AA 4E 46 24 2C 22 42 41 30 30 22 00 48 |S.".NF$,"BA00".H|
00001C40: 20 F1 13 8D 35 33 30 31 00 7E 20 F6 13 9F 31 2C | ...5301.~ ...1,|
00001C50: 38 2C 32 2C 22 23 22 3A 40 50 2C 32 34 2C 30 2C |8,2,"#":@P,24,0,|
00001C60: 22 52 45 41 44 59 20 50 52 49 4E 54 45 52 20 41 |"READY PRINTER A|
00001C70: 4E 44 20 50 52 45 53 53 20 53 50 41 43 45 00 91 |ND PRESS SPACE..|
00001C80: 20 F7 13 8B C2 28 31 39 38 29 B2 30 A7 35 31 31 | ....(198).0.511|
00001C90: 31 00 AF 20 FB 13 A1 4B 59 24 3A 8D 32 32 30 30 |1.. ...KY$:.2200|
00001CA0: 3A 8B 4B 59 24 B3 B1 22 20 22 A7 35 31 31 31 00 |:.KY$.." ".5111.|
00001CB0: C3 20 FD 13 40 50 2C 32 34 2C 30 2C 22 22 3A 8D |. ..@P,24,0,"":.|
00001CC0: 32 30 30 00 E6 20 FE 13 97 31 39 38 2C 30 3A 9F |200.. ...198,0:.|
00001CD0: 34 2C 34 3A 98 34 3A 8B 53 54 B1 B2 30 A7 A0 34 |4,4:.4:.ST..0..4|
00001CE0: 3A 89 35 31 32 30 00 20 21 FF 13 A0 34 3A 40 50 |:.5120. !...4:@P|
00001CF0: 2C 32 34 2C 30 2C 22 52 45 41 44 59 20 50 52 49 |,24,0,"READY PRI|
00001D00: 4E 54 45 52 20 41 4E 44 20 50 52 45 53 53 20 53 |NTER AND PRESS S|
00001D10: 50 41 43 45 22 3A 8D 32 30 30 3A 89 35 31 31 31 |PACE":.200:.5111|
00001D20: 00 44 21 00 14 4C 50 B2 36 36 3A 9F 34 2C 34 2C |.D!..LP.66:.4,4,|
00001D30: 28 43 41 AF 32 29 AC 33 2E 35 3A 81 52 4E B2 53 |(CA.2).3.5:.RN.S|
00001D40: 41 A4 45 4E 00 57 21 05 14 8B C2 28 31 39 38 29 |A.EN.W!....(198)|
00001D50: B2 30 A7 35 31 32 37 00 66 21 06 14 A1 4B 59 24 |.0.5127.f!...KY$|
00001D60: 3A 8D 32 32 30 30 00 8D 21 07 14 40 52 2C 52 4E |:.2200..!..@R,RN|
00001D70: 2C 52 45 24 28 30 29 3A 8B C8 28 52 45 24 28 30 |,RE$(0):..(RE$(0|
00001D80: 29 2C 31 29 B2 57 41 24 A7 35 31 35 30 00 B2 21 |),1).WA$.5150..!|
00001D90: 0A 14 41 24 B2 22 52 45 43 4F 52 44 20 4E 55 4D |..A$."RECORD NUM|
00001DA0: 42 45 52 20 22 AA CA 28 C4 28 52 4E AA 31 29 2C |BER "..(.(RN.1),|
00001DB0: 32 29 00 C2 21 0B 14 98 34 3A 98 34 3A 98 34 2C |2)..!...4:.4:.4,|
00001DC0: 41 24 00 DF 21 0C 14 81 49 B2 31 A4 C3 28 41 24 |A$..!...I.1..(A$|
00001DD0: 29 3A 98 34 2C 22 2D 22 3B 3A 82 49 3A 98 34 00 |):.4,"-";:.I:.4.|
00001DE0: FA 21 0F 14 81 49 B2 30 A4 4E 46 AB 31 3A 98 34 |.!...I.0.NF.1:.4|
00001DF0: 2C 52 45 24 28 49 29 3B 3A 82 00 01 22 14 14 98 |,RE$(I);:..."...|
00001E00: 34 00 0E 22 1E 14 82 52 4E 3A A0 31 3A 8A 00 30 |4.."...RN:.1:..0|
00001E10: 22 50 14 99 22 93 22 3B 3A 54 54 24 B2 22 53 43 |"P..".";:TT$."SC|
00001E20: 52 41 54 43 48 22 AA 41 46 24 3A 99 22 93 22 3B |RATCH".AF$:.".";|
00001E30: 00 51 22 51 14 8D 34 30 30 3A 99 3A 99 22 11 45 |.Q"Q..400:.:.".E|
00001E40: 4E 54 45 52 20 46 49 4C 45 4E 41 4D 45 3F 20 22 |NTER FILENAME? "|
00001E50: 3B 00 5A 22 52 14 8D 35 30 30 00 91 22 5A 14 99 |;.Z"R..500.."Z..|
00001E60: 3A 99 22 11 45 52 41 53 45 20 54 48 45 20 12 4D |:.".ERASE THE .M|
00001E70: 92 41 54 48 2C 20 12 44 92 41 54 41 20 4F 52 20 |.ATH, .D.ATA OR |
00001E80: 12 49 92 4E 44 45 58 20 46 49 4C 45 53 3F 20 22 |.I.NDEX FILES? "|
00001E90: 3B 00 B4 22 5B 14 54 59 B2 30 3A 4C B2 31 3A 41 |;.."[.TY.0:L.1:A|
00001EA0: 43 24 B2 22 4D 44 49 22 3A 8D 35 35 30 3A 57 48 |C$."MDI":.550:WH|
00001EB0: 24 B2 41 24 00 E6 22 5F 14 99 3A 99 22 11 41 52 |$.A$.."_..:.".AR|
00001EC0: 45 20 59 4F 55 20 53 55 52 45 20 28 59 2F 4E 29 |E YOU SURE (Y/N)|
00001ED0: 3F 20 22 3B 3A 4C B2 31 3A 54 59 B2 30 3A 41 43 |? ";:L.1:TY.0:AC|
00001EE0: 24 B2 22 59 4E 22 00 FA 22 61 14 8D 35 35 30 3A |$."YN".."a..550:|
00001EF0: 8B 41 24 B3 B1 22 59 22 A7 8A 00 1B 23 62 14 40 |.A$.."Y"....#b.@|
00001F00: 50 2C 32 34 2C 30 2C 22 53 43 52 41 54 43 48 49 |P,24,0,"SCRATCHI|
00001F10: 4E 47 20 46 49 4C 45 2E 2E 2E 22 00 2E 23 64 14 |NG FILE..."..#d.|
00001F20: 8B 57 48 24 B3 B1 22 4D 22 A7 35 32 32 35 00 5A |.WH$.."M".5225.Z|
00001F30: 23 66 14 98 31 35 2C 22 53 30 3A 41 52 2E 22 AA |#f..15,"S0:AR.".|
00001F40: 4E 46 24 3A 98 31 35 2C 22 53 30 3A 44 50 2E 22 |NF$:.15,"S0:DP."|
00001F50: AA 4E 46 24 3A A0 31 35 3A 8A 00 6D 23 69 14 8B |.NF$:.15:..m#i..|
00001F60: 57 48 24 B3 B1 22 44 22 A7 35 32 34 35 00 A4 23 |WH$.."D".5245..#|
00001F70: 6E 14 98 31 35 2C 22 53 30 3A 44 41 2E 22 AA 4E |n..15,"S0:DA.".N|
00001F80: 46 24 3A 98 31 35 2C 22 53 30 3A 42 4D 2E 22 AA |F$:.15,"S0:BM.".|
00001F90: 4E 46 24 3A 98 31 35 2C 22 53 30 3A 54 53 2E 22 |NF$:.15,"S0:TS."|
00001FA0: AA 4E 46 24 00 D0 23 78 14 98 31 35 2C 22 53 30 |.NF$..#x..15,"S0|
00001FB0: 3A 46 53 2E 22 AA 4E 46 24 3A 98 31 35 2C 22 53 |:FS.".NF$:.15,"S|
00001FC0: 30 3A 53 43 2E 22 AA 4E 46 24 3A A0 31 35 3A 8A |0:SC.".NF$:.15:.|
00001FD0: 00 EB 23 7D 14 98 31 35 2C 22 53 30 3A 49 4E 2E |..#}..15,"S0:IN.|
00001FE0: 22 AA 4E 46 24 3A A0 31 35 3A 8A 00 1C 24 B4 14 |".NF$:.15:...$..|
00001FF0: 99 22 93 22 3B 3A 54 54 24 B2 22 42 4C 41 4E 4B |.".";:TT$."BLANK|
00002000: 22 AA 41 46 24 3A 8D 33 30 30 3A 8D 36 36 30 30 |".AF$:.300:.6600|
00002010: 3A 8D 35 33 30 31 3A 89 35 33 30 39 00 56 24 B5 |:.5301:.5309.V$.|
00002020: 14 99 3A 99 22 11 45 4E 54 45 52 20 53 54 41 52 |..:.".ENTER STAR|
00002030: 54 49 4E 47 20 52 45 43 4F 52 44 20 4E 55 4D 42 |TING RECORD NUMB|
00002040: 45 52 3F 20 31 9D 22 3B 3A 54 59 B2 31 3A 4C B2 |ER? 1.";:TY.1:L.|
00002050: 34 3A 8D 35 35 30 00 76 24 B6 14 41 B2 B5 28 41 |4:.550.v$..A..(A|
00002060: 29 3A 8B 41 B3 31 B0 41 B1 4E 52 A7 8D 35 36 30 |):.A.1.A.NR..560|
00002070: 3A 89 35 33 30 32 00 81 24 B7 14 53 41 B2 41 AB |:.5302..$..SA.A.|
00002080: 31 00 A8 24 B9 14 99 3A 99 22 11 45 4E 54 45 52 |1..$...:.".ENTER|
00002090: 20 45 4E 44 49 4E 47 20 52 45 43 4F 52 44 20 4E | ENDING RECORD N|
000020A0: 55 4D 42 45 52 3F 22 3B 00 CD 24 BA 14 59 B2 C2 |UMBER?";..$..Y..|
000020B0: 28 32 31 34 29 3A 58 B2 C2 28 32 31 31 29 AA 31 |(214):X..(211).1|
000020C0: 3A 54 59 B2 31 3A 4C B2 34 3A 99 4E 52 00 EF 24 |:TY.1:L.4:.NR..$|
000020D0: BB 14 8D 35 36 30 3A 41 B2 B5 28 41 29 3A 8B 41 |...560:A..(A):.A|
000020E0: B3 53 41 AA 31 B0 41 B1 4E 52 A7 35 33 30 37 00 |.SA.1.A.NR.5307.|
000020F0: FC 24 BC 14 45 4E B2 41 AB 31 3A 8E 00 33 25 BD |.$..EN.A.1:..3%.|
00002100: 14 99 3A 99 22 11 41 52 45 20 59 4F 55 20 53 55 |..:.".ARE YOU SU|
00002110: 52 45 20 28 59 2F 4E 29 3F 20 22 3B 3A 54 59 B2 |RE (Y/N)? ";:TY.|
00002120: 30 3A 41 43 24 B2 22 59 4E 22 3A 4C B2 31 3A 8D |0:AC$."YN":L.1:.|
00002130: 35 35 30 00 41 25 BE 14 8B 41 24 B2 22 4E 22 A7 |550.A%...A$."N".|
00002140: 8A 00 84 25 BF 14 40 50 2C 32 34 2C 30 2C 22 42 |...%..@P,24,0,"B|
00002150: 4C 41 4E 4B 49 4E 47 20 46 49 4C 45 2E 2E 2E 22 |LANKING FILE..."|
00002160: 3A 40 4D 2C 57 41 24 2C 52 45 24 28 30 29 2C 31 |:@M,WA$,RE$(0),1|
00002170: 3A 40 4C 3B 22 54 53 2E 22 AA 4E 46 24 2C 22 42 |:@L;"TS.".NF$,"B|
00002180: 41 30 30 22 00 C3 25 C8 14 9F 31 2C 38 2C 32 2C |A00"..%...1,8,2,|
00002190: 22 23 22 3A 81 49 B2 53 41 A4 45 4E 3A 9E 42 AA |"#":.I.SA.EN:.B.|
000021A0: 31 32 2C 49 3A 40 57 2C 49 2C 52 45 24 28 30 29 |12,I:@W,I,RE$(0)|
000021B0: 3A 40 50 2C 32 34 2C 33 34 2C C4 28 49 AA 31 29 |:@P,24,34,.(I.1)|
000021C0: 3A 82 49 00 CC 25 D2 14 A0 31 3A 8A 00 07 26 18 |:.I..%...1:...&.|
000021D0: 15 99 22 93 22 3B 3A 54 54 24 B2 22 46 49 58 22 |..".";:TT$."FIX"|
000021E0: AA 41 46 24 3A 8D 33 30 30 3A 8D 36 36 30 30 3A |.AF$:.300:.6600:|
000021F0: 40 50 2C 32 34 2C 30 2C 22 50 52 4F 43 45 53 53 |@P,24,0,"PROCESS|
00002200: 49 4E 47 2E 2E 2E 22 00 11 26 22 15 8D 36 30 30 |ING..."..&"..600|
00002210: 30 00 25 26 2C 15 42 4D B2 31 3A 41 B2 4E 52 3A |0.%&,.BM.1:A.NR:|
00002220: 89 34 32 38 33 00 3E 26 7C 15 8F 20 20 20 20 20 |.4283.>&|.. |
00002230: 20 20 4D 41 4B 45 20 42 4D 2E 46 49 4C 45 00 6E | MAKE BM.FILE.n|
00002240: 26 80 15 8B 42 4D B3 B1 31 A7 8E 20 20 3A 8F 20 |&...BM..1.. :. |
00002250: 46 4C 41 47 20 54 4F 20 42 55 49 4C 44 20 4D 41 |FLAG TO BUILD MA|
00002260: 50 20 46 52 4F 4D 20 53 43 52 41 54 43 48 00 A8 |P FROM SCRATCH..|
00002270: 26 81 15 41 24 B2 22 22 3A 42 24 B2 22 22 3A 81 |&..A$."":B$."":.|
00002280: 49 B2 31 A4 31 30 3A 42 24 B2 42 24 AA C7 28 32 |I.1.10:B$.B$..(2|
00002290: 35 35 29 3A 82 3A 81 49 B2 31 A4 32 35 3A 41 24 |55):.:.I.1.25:A$|
000022A0: B2 41 24 AA 42 24 3A 82 00 E9 26 86 15 40 4C 3B |.A$.B$:...&..@L;|
000022B0: 22 54 53 2E 22 AA 4E 46 24 2C 22 42 41 30 30 22 |"TS.".NF$,"BA00"|
000022C0: 3A 43 B2 36 35 32 38 30 3A 81 49 B2 32 A4 32 35 |:C.65280:.I.2.25|
000022D0: 31 3A 97 43 AA 49 2C 30 3A 82 3A 8F 20 55 53 45 |1:.C.I,0:.:. USE|
000022E0: 44 20 42 49 54 20 4D 41 50 00 21 27 90 15 A0 31 |D BIT MAP.!'...1|
000022F0: 3A 52 4E B2 30 3A 59 B2 30 3A 53 53 24 B2 22 46 |:RN.0:Y.0:SS$."F|
00002300: 31 3D 27 2A 27 22 AA 53 53 24 3A 9F 31 2C 38 2C |1='*'".SS$:.1,8,|
00002310: 32 2C 22 23 22 3A 40 52 2C 30 2C 52 45 24 28 30 |2,"#":@R,0,RE$(0|
00002320: 29 00 51 27 9A 15 44 B2 32 35 35 3A 59 B2 59 AA |).Q'..D.255:Y.Y.|
00002330: 31 3A 81 49 B2 30 A4 37 3A 9E 42 3A 8B C2 28 32 |1:.I.0.7:.B:..(2|
00002340: 29 B2 31 32 38 B0 52 4E B1 B2 4E 52 A7 35 35 36 |).128.RN..NR.556|
00002350: 30 00 7C 27 A4 15 52 4E B2 52 4E AA 31 3A 8B C6 |0.|'..RN.RN.1:..|
00002360: 28 52 45 24 28 30 29 29 B3 B1 C6 28 57 41 24 29 |(RE$(0))...(WA$)|
00002370: A7 44 B2 44 AB 32 AE 28 37 AB 49 29 00 82 27 AE |.D.D.2.(7.I)..'.|
00002380: 15 82 00 9F 27 B8 15 40 4D 2C C7 28 44 29 2C 41 |....'..@M,.(D),A|
00002390: 24 2C 59 3A 8B 52 4E B3 4E 52 A7 35 35 33 30 00 |$,Y:.RN.NR.5530.|
000023A0: A8 27 C2 15 A0 31 3A 8E 00 DA 27 44 16 41 24 B2 |.'...1:...'D.A$.|
000023B0: 22 21 23 24 25 26 22 3A 8D 35 39 35 30 20 20 20 |"!#$%&":.5950 |
000023C0: 20 20 3A 8F 20 20 48 4F 57 20 4D 41 4E 59 20 42 | :. HOW MANY B|
000023D0: 4C 4F 43 4B 53 20 4C 45 46 54 00 09 28 62 16 46 |LOCKS LEFT..(b.F|
000023E0: 42 B2 46 42 AA 55 53 AB 34 31 AB B5 28 53 53 AD |B.FB.US.41..(SS.|
000023F0: 32 35 34 29 AB 31 AB B5 28 28 35 AC 4E 46 AA 35 |254).1..((5.NF.5|
00002400: 38 29 AD 32 35 34 29 AB 31 00 2B 28 67 16 46 42 |8).254).1.+(g.FB|
00002410: B2 46 42 AB 31 AB B5 28 46 42 AD 31 32 37 29 3A |.FB.1..(FB.127):|
00002420: 4E 43 B2 46 42 AC 32 35 34 AB 31 00 4E 28 6C 16 |NC.FB.254.1.N(l.|
00002430: 4E 52 B2 B5 28 4E 43 AD 54 4C 29 AB 31 3A 8B 4E |NR..(NC.TL).1:.N|
00002440: 52 B1 32 30 30 30 A7 4E 52 B2 32 30 30 30 00 54 |R.2000.NR.2000.T|
00002450: 28 76 16 8E 00 73 28 3E 17 9F 31 2C 38 2C 30 2C |(v...s(>..1,8,0,|
00002460: 22 24 30 3A 22 AA 41 24 3A 40 49 4C 2C 36 2C 31 |"$0:".A$:@IL,6,1|
00002470: 2C 58 24 00 8B 28 48 17 A1 23 31 2C 58 24 3A 8B |,X$..(H..#1,X$:.|
00002480: 58 24 B3 B1 22 22 A7 35 39 36 30 00 AC 28 52 17 |X$.."".5960..(R.|
00002490: A1 23 31 2C 58 24 2C 58 24 2C 58 24 2C 59 24 3A |.#1,X$,X$,X$,Y$:|
000024A0: 58 B2 C6 28 58 24 AA C7 28 30 29 29 00 CD 28 5C |X..(X$..(0))..(\|
000024B0: 17 59 B2 C6 28 59 24 AA C7 28 30 29 29 3A A0 31 |.Y..(Y$..(0)):.1|
000024C0: 3A 46 42 B2 58 AA 59 AC 32 35 36 3A 8E 00 05 29 |:FB.X.Y.256:...)|
000024D0: 70 17 9F 32 2C 38 2C 32 2C 22 23 22 3A 9F 33 2C |p..2,8,2,"#":.3,|
000024E0: 38 2C 35 2C 22 30 3A 44 41 2E 22 AA 4E 46 24 3A |8,5,"0:DA.".NF$:|
000024F0: A0 33 20 20 20 20 3A 8F 20 4D 41 4B 45 20 54 53 |.3 :. MAKE TS|
00002500: 2E 46 49 4C 45 00 0F 29 98 17 8D 36 34 30 30 00 |.FILE..)...6400.|
00002510: 37 29 D4 17 9F 33 2C 38 2C 33 2C 22 40 30 3A 54 |7)...3,8,3,"@0:T|
00002520: 53 2E 22 AA 4E 46 24 AA 22 2C 50 2C 57 22 3A 98 |S.".NF$.",P,W":.|
00002530: 33 2C 22 20 20 22 3B 00 49 29 10 18 98 33 2C C7 |3," ";.I)...3,.|
00002540: 28 54 29 3B C7 28 53 29 3B 00 5F 29 1A 18 98 31 |(T);.(S);._)...1|
00002550: 35 2C 22 55 31 3A 22 3B 32 3B 30 3B 54 3B 53 00 |5,"U1:";2;0;T;S.|
00002560: 69 29 24 18 8D 36 32 32 30 00 7B 29 2E 18 98 33 |i)$..6220.{)...3|
00002570: 2C C7 28 54 29 3B C7 28 53 29 3B 00 8A 29 38 18 |,.(T);.(S);..)8.|
00002580: 8B 54 B3 B1 30 A7 36 31 37 30 00 96 29 42 18 A0 |.T..0.6170..)B..|
00002590: 32 3A A0 33 3A 8E 00 B1 29 4C 18 A1 23 32 2C 54 |2:.3:...)L..#2,T|
000025A0: 24 2C 53 24 3A 54 B2 C6 28 54 24 AA C7 28 30 29 |$,S$:T..(T$..(0)|
000025B0: 29 00 C4 29 56 18 53 B2 C6 28 53 24 AA C7 28 30 |)..)V.S..(S$..(0|
000025C0: 29 29 3A 8E 00 EB 29 9C 18 46 42 B2 30 3A 9F 31 |)):...)..FB.0:.1|
000025D0: 2C 38 2C 32 2C 41 24 3A 84 31 35 2C 41 3A A0 31 |,8,2,A$:.15,A:.1|
000025E0: 3A 8B 41 B2 30 A7 8D 35 39 35 30 00 F1 29 A6 18 |:.A.0..5950..)..|
000025F0: 8E 00 0A 2A 00 19 98 31 35 2C 22 4D 2D 52 22 C7 |...*...15,"M-R".|
00002600: 28 31 34 34 29 3B C7 28 32 29 00 2A 2A 0A 19 A1 |(144);.(2).**...|
00002610: 23 31 35 2C 41 24 3A 53 B2 30 3A 8B 41 24 B3 B1 |#15,A$:S.0:.A$..|
00002620: 22 22 A7 53 B2 C6 28 41 24 29 00 43 2A 14 19 98 |"".S..(A$).C*...|
00002630: 31 35 2C 22 4D 2D 52 22 C7 28 31 34 37 29 3B C7 |15,"M-R".(147);.|
00002640: 28 32 29 00 63 2A 1E 19 A1 23 31 35 2C 41 24 3A |(2).c*...#15,A$:|
00002650: 54 B2 30 3A 8B 41 24 B3 B1 22 22 A7 54 B2 C6 28 |T.0:.A$.."".T..(|
00002660: 41 24 29 00 7C 2A 28 19 98 31 35 2C 22 4D 2D 52 |A$).|*(..15,"M-R|
00002670: 22 C7 28 31 34 38 29 3B C7 28 32 29 00 9C 2A 32 |".(148);.(2)..*2|
00002680: 19 A1 23 31 35 2C 41 24 3A 4F B2 30 3A 8B 41 24 |..#15,A$:O.0:.A$|
00002690: B3 B1 22 22 A7 4F B2 C6 28 41 24 29 00 B0 2A 46 |.."".O..(A$)..*F|
000026A0: 19 4F B2 4F AA 31 3A 8B 54 B2 30 A7 54 B2 31 38 |.O.O.1:.T.0.T.18|
000026B0: 00 C6 2A 50 19 98 31 35 2C 22 55 31 3A 22 3B 32 |..*P..15,"U1:";2|
000026C0: 3B 30 3B 54 3B 53 00 D8 2A 5A 19 98 31 35 2C 22 |;0;T;S..*Z..15,"|
000026D0: 42 2D 50 22 3B 32 3B 4F 00 E4 2A 64 19 8D 36 32 |B-P";2;O..*d..62|
000026E0: 32 30 3A 8E 00 25 2B C8 19 9F 32 2C 38 2C 32 2C |20:..%+...2,8,2,|
000026F0: 22 30 3A 46 53 2E 22 AA 4E 46 24 3A 84 32 2C 4E |"0:FS.".NF$:.2,N|
00002700: 53 2C 4E 46 2C 43 41 2C 54 4C 2C 4E 52 2C 53 43 |S,NF,CA,TL,NR,SC|
00002710: 24 2C 50 31 24 2C 50 32 24 3A 4E 31 B2 4E 52 3A |$,P1$,P2$:N1.NR:|
00002720: 4C 52 B2 54 4C 00 57 2B D2 19 86 46 41 24 28 4E |LR.TL.W+...FA$(N|
00002730: 46 AB 31 29 2C 52 45 24 28 4E 46 AB 31 29 3A 97 |F.1),RE$(NF.1):.|
00002740: 52 54 AA 35 2C 4E 46 3A 97 52 54 AA 31 2C B5 28 |RT.5,NF:.RT.1,.(|
00002750: 4C 52 AD 32 35 36 29 00 93 2B D7 19 97 52 54 2C |LR.256)..+...RT,|
00002760: 4C 52 AB 32 35 36 AC C2 28 52 54 AA 31 29 3A 97 |LR.256..(RT.1):.|
00002770: 52 54 AA 33 2C B5 28 4E 52 AD 32 35 36 29 3A 97 |RT.3,.(NR.256):.|
00002780: 52 54 AA 32 2C 4E 52 AB 32 35 36 AC C2 28 52 54 |RT.2,NR.256..(RT|
00002790: AA 33 29 00 CD 2B DC 19 81 49 B2 30 A4 4E 46 AB |.3)..+...I.0.NF.|
000027A0: 31 3A 40 49 4C 2C 35 2C 32 2C 41 24 3A 46 41 24 |1:@IL,5,2,A$:FA$|
000027B0: 28 49 29 B2 41 24 3A 97 46 52 AA 49 2C C6 28 CA |(I).A$:.FR.I,.(.|
000027C0: 28 46 41 24 28 49 29 2C 34 29 29 3A 82 00 E4 2B |(FA$(I),4)):...+|
000027D0: E6 19 A0 32 3A 9E 42 41 AA 33 30 2C 52 45 24 28 |...2:.BA.30,RE$(|
000027E0: 30 29 3A 8E 00 19 2C 2C 1A 9F 32 2C 38 2C 32 2C |0):...,,..2,8,2,|
000027F0: 22 30 3A 46 53 2E 22 AA 4E 46 24 3A 84 32 2C 4E |"0:FS.".NF$:.2,N|
00002800: 53 2C 4E 46 2C 43 41 2C 54 4C 2C 4E 52 2C 53 43 |S,NF,CA,TL,NR,SC|
00002810: 24 2C 50 31 24 2C 50 32 24 00 2E 2C 31 1A 86 20 |$,P1$,P2$..,1.. |
00002820: 56 41 24 28 4E 46 AB 31 29 3A 41 B2 43 43 00 67 |VA$(NF.1):A.CC.g|
00002830: 2C 36 1A 81 49 B2 30 A4 4E 46 AB 31 3A 40 49 4C |,6..I.0.NF.1:@IL|
00002840: 2C 35 2C 32 2C 41 24 3A 56 41 24 28 49 29 B2 41 |,5,2,A$:VA$(I).A|
00002850: 24 3A 82 3A A0 32 3A 98 31 35 2C 22 53 30 3A 46 |$:.:.2:.15,"S0:F|
00002860: 53 2E 22 AA 44 46 24 00 85 2C 40 1A 9F 32 2C 38 |S.".DF$..,@..2,8|
00002870: 2C 32 2C 22 30 3A 46 53 2E 22 AA 4E 46 24 AA 22 |,2,"0:FS.".NF$."|
00002880: 2C 53 2C 57 22 00 CC 2C 4A 1A 98 32 2C 4E 53 3B |,S,W"..,J..2,NS;|
00002890: 43 24 3B 4E 46 3B 43 24 3B 43 41 3B 43 24 3B 54 |C$;NF;C$;CA;C$;T|
000028A0: 4C 3B 43 24 3B 41 3B 43 24 3B 51 4F 24 3B 53 43 |L;C$;A;C$;QO$;SC|
000028B0: 24 3B 51 4F 24 3B 43 24 3B 51 4F 24 3B 50 31 24 |$;QO$;C$;QO$;P1$|
000028C0: 3B 51 4F 24 3B 43 24 3B 51 4F 24 3B 00 DB 2C 4F |;QO$;C$;QO$;..,O|
000028D0: 1A 98 32 2C 50 32 24 3B 51 4F 24 00 FB 2C 54 1A |..2,P2$;QO$..,T.|
000028E0: 81 49 B2 30 A4 4E 46 AB 31 3A 98 32 2C 56 41 24 |.I.0.NF.1:.2,VA$|
000028F0: 28 49 29 3B 3A 82 3A A0 32 3A 8E 00 1E 2D 28 23 |(I);:.:.2:...-(#|
00002900: 97 31 39 38 2C 30 3A 9F 34 2C 34 3A 98 34 3A 8B |.198,0:.4,4:.4:.|
00002910: 53 54 B1 B2 30 A7 A0 34 3A 89 39 30 38 35 00 52 |ST..0..4:.9085.R|
00002920: 2D 5F 23 A0 34 3A 40 50 2C 32 34 2C 30 2C 22 52 |-_#.4:@P,24,0,"R|
00002930: 45 41 44 59 20 50 52 49 4E 54 45 52 20 41 4E 44 |EADY PRINTER AND|
00002940: 20 50 52 45 53 53 20 53 50 41 43 45 22 3A 8D 32 | PRESS SPACE":.2|
00002950: 30 30 00 65 2D 64 23 8B C2 28 31 39 38 29 B2 30 |00.e-d#..(198).0|
00002960: A7 39 30 36 30 00 79 2D 69 23 40 50 2C 32 34 2C |.9060.y-i#@P,24,|
00002970: 30 2C 22 22 3A 8D 32 30 30 00 9B 2D 6E 23 A1 4B |0,"":.200..-n#.K|
00002980: 59 24 3A 8B 4B 59 24 B3 B1 22 20 22 AF 4B 59 24 |Y$:.KY$.." ".KY$|
00002990: B3 B1 22 10 22 A7 8D 32 32 30 30 00 AA 2D 73 23 |.."."..2200..-s#|
000029A0: 8B 4B 59 24 B2 22 93 22 A7 8E 00 B4 2D 78 23 89 |.KY$."."....-x#.|
000029B0: 39 30 30 30 00 CE 2D 7D 23 9F 34 2C 34 2C 28 C2 |9000..-}#.4,4,(.|
000029C0: 28 35 33 32 37 32 29 AF 32 29 AC 33 2E 35 00 F4 |(53272).2).3.5..|
000029D0: 2D 82 23 81 5A 49 B2 31 A4 32 3A 98 34 3A 82 3A |-.#.ZI.1.2:.4:.:|
000029E0: 40 44 3A 81 5A 49 B2 31 A4 34 3A 98 34 3A 82 3A |@D:.ZI.1.4:.4:.:|
000029F0: A0 34 3A 8E 00 2D 2E 18 F6 9F 31 2C 39 2C 31 35 |.4:..-....1,9,15|
00002A00: 2C 22 53 30 3A 36 34 2E 4D 41 4E 49 50 55 4C 41 |,"S0:64.MANIPULA|
00002A10: 54 45 22 3A A0 31 3A 94 22 30 3A 36 34 2E 4D 41 |TE":.1:."0:64.MA|
00002A20: 4E 49 50 55 4C 41 54 45 22 2C 39 3A 90 00 66 2E |NIPULATE",9:..f.|
00002A30: 22 F6 9F 31 2C 38 2C 31 35 2C 22 53 30 3A 36 34 |"..1,8,15,"S0:64|
00002A40: 2E 4D 41 4E 49 50 55 4C 41 54 45 22 3A A0 31 3A |.MANIPULATE":.1:|
00002A50: 94 22 30 3A 36 34 2E 4D 41 4E 49 50 55 4C 41 54 |."0:64.MANIPULAT|
00002A60: 45 22 2C 38 3A 90 00 00 00 |E",8:.... |
.......4000.>.D.BA.12.4096:BB.8.4096.9:B
.7.4096:BC.31104:LC.48.O.I.SL.254:O.1:SN
.0:FR.47360:RT.53242:SS$.G(255)...J.C$.G
(13):QO$.G(34):AF$." A DATA FILE".G.N.WA
$.G(B(1017)):KY.0:KY$." "."":.15,8,15:..
..H.XA$."
":YA.B(214):XA.B(211).<.R.@P,YA,
XA,H(XA$,39.XA):XA$."":@P,YA,XA,"":..\..
.@B,DP$(0):R(100).RN.1:.BB:..P.,.F9.0:."
.";:.400...1..:.".ENTER FILENAME? ";...2
..500:X1.X:Y1.Y.N.6..2,8,2,"0:FS.".NF$:.
15,A,B$:.2,NS,NF,CA: 2...@..A.0.F9.2..BA
.42,NF$:.370...J.@P,24,0,H(B$,20):." - D
IRECTORY (Y/N)? ";:.200.V.T.AC$."YN":TY.
0:L.1:.550:@P,24,0,"":.200:.A$."N".360..
.^..BB.15:A$."DA.*":FG.0:.1380:.".";:.BB
.57...H.X.X1:Y.Y1:.510:.310...R.F9.0:..W
...SC$."...":@C,SC$:.G(142);:..20.C(TT$)
.2);TT$......II.1.4:."............";:.II
:....B.@P,24,0,MD$:."FILE";:.200:..6...Y
.B(214):X.B(211):.NF$;.I...KY.1:.BA.LC,6
4.~....211,X.1.KY:L.13:TY.0:.560:.RF .A$
."!".KY.1:.511.....@H,"?",A$:.KY..0.511.
....@H,"*",A$:.KY..0.511.I...@H,"@",A$:.
KY..0.511.V....BA.LC,0.....NF$.A$:....&.
Y.B(214):X.B(211)...0..600:.L.1.:@H,A$,A
C$:.KY.0.560...5..TY.1.A.E(A$).4.:...L.X
..B(52).B(50).3..650.G.].@G,Y,X,L,TY,A$:
.2200:.......198,1:.631,13:XZ.B(211):YZ.
B(214):OA.B(BA.LC).Z....BA.LC,0:@G,24,0,
39,0,TS$:@P,24,0,"ONE MOMENT, PLEASE":.2
00.....Z..(0):@P,24,0,TS$:.BA.LC,OA:@P,Y
Z,XZ,"":TS$."":..M....15,A$:@P,24,0,"PLA
CE SYSTEM DISK IN DRIVE- PRESS SPACE".J.
...KY$:.2200:.KY$.." ".960...J.@P,24,0,"
RETURNING TO MAIN MENU":.200:......FG.1:
.100:.1260:.1380:..V....".";:TT$."DISK D
IRECTORY":.400......:..13)".....E.VERYTH
ING".......13)"..M.ANAGER FILES".+.....1
3)"..R.EPORT FILES".P....:..10)"...ENTER
SELECTION? E.";.L.(.L.1:TY.0:AC$."EMR":
.550...F.A$."*":.KY.2.A$."DA.*"...P..KY.
3.A$."RF.*"...Z...W.D.FL.0:.1,8,0,"$0:".
A$:.15,B1,B$:.B1..0..1500:.1455...I.."."
;:.BA.3...N..B(254).0.1450...X..B(198).0
.1400.%....KY$:.2200:.RF.1400.C....KY$."
.".FG.1..9000:.1400.V....KY$.." ".1400.F
. ..BA.6:.1390......:."FREE BLOCKS =";B(
251).256.B(252);..... 1:.2,RR......B(198
).0.1460.S....KY$:.KY$.".".FG.1..9000:.1
460...H..2200:.RF.1460...R........".";:.
400:@P,24,20.C(B$).2,B$:.......1555.O...
.100:.2,8,2,"0:FS.HELP SCREENS ":.15,A:.
2,NS: 2.D....A..0..950:.1550..."..2,8,2,
"SC.HELP SCREENS ":.BB.9,1:.BB.30,1: 2:S
C.1.O.,..53272,23:.BB.12,SC:.1024,32:@P,
24,0,"F7,F8,X?"...1..B(198).0.1585...6..
KY$:.2200:.KY$.".".SC.NS.SC.SC.1.".@..KY
$.".".SC.1.SC.SC.1.6.J..KY$."X"..2,0:..@
.T..1580.G...RF.0:.KY$..".".KY$..".".KY$
.."."........KY$."."..9000:RF.1:......KP
$.KY$:KP.KY:P2.B(2):.198,1:.631,13:XZ.B(
211):YZ.B(214).....OA.B(BA.LC):.BA.LC,0:
@G,24,0,39,0,TS$.....@P,24,0,"":.200:@P,
24,0,".ARE YOU SURE?. "./...YA.B(214):XA
.B(211).[...@G,YA,XA,1,0,RS$:@H,RS$,"YN"
:.KY.0.2206.U...KY$.KP$:.RS$."Y".2210...
.@P,24,0,TS$:TS$."":@P,YZ,XZ,"":.BA.LC,
OA.A...KY.KP:KY$.KP$:.2,P2:RF.1:..H... 1
......2,0:.KY$.".".KY.RR:.2,RR:.......KY
$.".".4090.......5. ..100:.".";:TT$."MAN
IPULATE FILES":.400:SP.1:.".".I....B(809
).246.:@A.`.....SP)"..B.LANK"AF$.V.....S
P)"..C.OPY"AF$.......SP)"..D.ISK DIRECTO
RY".......SP)"..E.XTEND"AF$.......SP)"..
F.IX"AF$.R...."....":SP.22.......SP)"..H
.ELP FILE".......SP)"..P.RINT"AF$.!.....
SP)"..R.E-ARRANGE A FILE".>.C...SP)"..S.
CRATCH A FILE".^.H...SP)".E.X.IT TO MAIN
MENU"...R...11)"..ENTER SELECTION? ";:T
Y.0:L.1:AC$."BCDEFHPRSX":.550.X....KY. 5
300,4300,4100,4200,5400,1550,5100,4500,5
200,4080.....@P,24,0,"RETURNING TO MAIN
MENU".$....2,0:@X,"64.CREATEEDIT":.950:.
4090.J...@P,24,0,"LOADING OPTION...":.12
50.^.H.. EXTEND A FILE...R..".";:TT$."EX
TEND".AF$:F9.1:.300:.6600...|..:.".THE F
ILE NOW HAS";:.NR"RECORDS"...}.N2.NR:.57
00:NR.NR.N1:.NR.2000.NR.2000......".YOU
CAN HAVE A TOTAL OF"NR"RECORDS".D...@P,1
0,0,"TOTAL NUMBER OF RECORDS WANTED? ":T
Y.1:L.4:.550.`...A..(A):.A.NR.A..N2.4230
.....BM.0:MD$."ADDING".D(A.N1)." RECORDS
TO ":.450......3,8,3,"DA.".NF$.",A".J..
.@M,WA$,RE$(0),1:.J.1.A.N1......I.0.NF.1
:.3,RE$(I);:......@P,24,34,D(J):.: 3:@P,
24,0,"PROCESSING...":.200:.6000.B....RV.
1.NF$.DF$:A.CC:.6700:.4283.O....15,"S0:F
S.".NF$:.2,8,3,"FS.".NF$.",S,W"......2,N
S;C$;NF;C$;CA;C$;TL;C$;A;C$;QO$;SC$;QO$;
C$;QO$;P1$;QO$;C$;QO$;......2,P2$;QO$:.I
.0.NF.1:.2,FA$(I);:.: 2:.BM.1.4283.#....
1,8,2,"BM.".NF$:@IL,4,1,A$:@IL,85,1,A$:@
IL,85,1,A2$.E...@IL,80,1,A3$:A$.A$.A2$.A
3$: 1.`....15,"S0:BM.".NF$:.5500......1,
8,1,"BM.".NF$.",P":.1," ".G((A.1).8.1).
G(0).A$;: 1...K..2,0:..F.L.. COP
Y A FILE ---...V..".";:@P,24,0,"PLACE
SOURCE DISK IN DRIVE".#.W..".";:TT$."COP
Y".AF$:F9.0:.400:.305:.6600.X.X.@L;"BM."
.NF$,"FF00":.2,8,2,"SC.".NF$:.BB.30,1: 2
.....@L;"TS.".NF$,"BA00":OD.0:BS..(0).51
2:TT.TL.3.NF:BD..(BS.TT).L....:.".COPY .
A.CTIVE RECORDS OR .E.NTIRE FILE? ";....
.AC$."AE":TY.0:L.1:.550:CT$.A$.!....:.".
DESTINATION FILENAME? ";:L.13:.550:DF$.A
$.=...DF.NF.1:.B$(DF,BD.1): 1.U....198,1
:.631,32:PP.0.....D$."SOURCE":.4900:.1,8
,2,"#":MD$."READING ":.450.B...@R,0,RE$(
0):RN.OD:.I.0.BD.1:.4800:.F2..1.BD.I:.43
55.....@P,24,34,D(RN):.200:.RV.1..4700:.
:.4355......J.0.NF.1:B$(J,I).RE$(J):.:..
....OD.RN: 1.K.0.D$."DESTINATION":.4900:
MD$."WRITING ":.450...5..PP.0.PP.1:.15,"
S0:DA.".DF$:.1,8,8,"DA.".DF$.",S,W":.442
0...:..1,8,8,"DA.".DF$.",A".R.D..I.0.BD.
1:.J.0.DF:.1,B$(J,I);:B$(J,I)."":....E.C
C.CC.1:@P,24,34,D(CC):.200:.: 1:.F2.1.43
42...I..4450.2.K.PP.0:@P,24,0,"PROCESSIN
G...":.200.R.L..RV.0..15,"S0:SC.".DF$:.2
,8,2,"SC.".DF$.",S,W":.BB.27,NS: 2...M.N
R.CC:.RT.3,.(NR.256):.RT.2,NR.B(RT.3).25
6.W.N.NF$.DF$:A.CC:.6000:@L;"TS.".NF$,"B
A00":BM.1:.4277...B.D$."SOURCE":.4900:MD
$."READING ":.450.<.C..828,2,B$(0,0):.65
0:.AR$(150):.1,8,2,"0:AR.".NF$.",S,R.W.D
.I..1:.15,A:.A. 1:.4456.Y.E.I.I.1:@IN,1,
AR$(I):.ST.0.4453...F. 1:II.I:.1,8,2,"DP
.".NF$.",S,R":.1,ND:.DP$(ND).N.G..I.0.ND
.1:@IL,4,1,DP$(I):.: 1...H.D$."DESTINATI
ON":.4900:MD$."WRITING ":.450:.A...(.I..
15,"S0:AR.".DF$:.15,"S0:DP.".DF$.B.J..1,
8,2,"DP.".DF$.",S,W":.1,ND:.I.0.ND.1:.1,
DP$(I);:.I...K. 1:.1,8,2,"AR.".DF$.",S,W
":.I.0.II:.1,AR$(I):.I: 1...L...C...."."
;:TT$."RE-ARRANGE".AF$:.400.....@P,24,0,
"PLACE DESTINATION DISKETTE IN DRIVE":.2
00.#...@P,4,0,"DESTINATION FILENAME? ":.
306.X....2,8,2,"0:FS.".NF$:.2,NS,NF,CA,T
L,NR,CC$,P1$,P2$.R...DF.NF.1:DL.TL:DF$.N
F$......L%(DF,4):.I.0.DF:@IL,5,2,A$:.J.0
.3:L%(I,J).F(J(A$,J.1)).W....:.: 2:.2,8,
2,"SC.".NF$:.BB.30,1: 2.....@P,24,0,"PLA
CE SOURCE DISKETTE IN DRIVE":.200.;. .@P
,6,0,"SOURCE FILENAME? ":NF$." ":.306:.6
600.G...@L;"TS.".NF$,"BA00":@L;"BM.".NF$
,"FF00".....WA.DF:.NF.1.DF.WA.NF.1......
I.0.WA:L%(I,4).I.1:......OD.0:BS..(0).10
24:TT.DL.3.DF:BD..(BS.TT):.B$(DF,BD.1):
1:@C,CC$.)....53272,CA:I.0:X$."
":TY.1:L.
3.G.... BB.12,L%(I,0).1:@P,L%(I,1),L%(I,
2),".".H(X$,L%(I,3))."......@P,24,0,"FIE
LD".D(I.1)."= SOURCE FIELD?.....Y.B(214)
:X.B(211).1:.L%(I,4);.M....560:.A.0.A.NF
.4630.....L%(I,4).A:.KY$."_".RV.1:.4340.
.....KY$.".".I.I.2:.I..1.I..1... ..KY$."
.".I..1.4.%.I.I.1:.I.DF.I.DF.>.*..4610.W
.\..J.0.DF:CF.L%(J,4).1..F.. CF..1.B$(J
,I).H(X$,L%(J,3)):.4750...P.TY.F(J(FA$(C
F),5)).D.Z..TY.0.B$(J,I).H(RE$(CF).X$,L%
(J,3)):.4750.....F$.RE$(CF):.BA.27,F$:B$
(J,I).I(X$.F$,L%(J,3)).&....:.H(RE$(0),1
).WA$.B$(0,I).WA$.J(B$(0,I),2).,.....Y..
.F2.1:.CT$."A"..B:.B(2)..1.RN..1.F2.128:
..M.E..RN.NR.F2.128:....J.@R,RN,RE$(0):R
N.RN.1:....$.@P,24,0,"PLACE ":.D$;" DISK
IN DRIVE-SPACE";:.200.Q.)..B(198).0.490
5...*..KY$:.2200:.KY$.." ".4905.. +.@P,2
4,0,"":.200:..> ...".";:TT$."PRINT".AF$:
.300:.6600:@L;"TS.".NF$,"BA00".H ...5301
.~ ...1,8,2,"#":@P,24,0,"READY PRINTER A
ND PRESS SPACE.. ...B(198).0.5111.. ...K
Y$:.2200:.KY$.." ".5111.C ..@P,24,0,"":.
200.. ...198,0:.4,4:.4:.ST..0. 4:.5120.
!.. 4:@P,24,0,"READY PRINTER AND PRESS S
PACE":.200:.5111.D!..LP.66:.4,4,(CA.2).3
.5:.RN.SA.EN.W!...B(198).0.5127.F!...KY$
:.2200..!..@R,RN,RE$(0):.H(RE$(0),1).WA$
.5150..!..A$."RECORD NUMBER ".J(D(RN.1),
2).B!...4:.4:.4,A$..!...I.1.C(A$):.4,"-"
;:.I:.4..!...I.0.NF.1:.4,RE$(I);:..."...
4.."...RN: 1:..0"P..".";:TT$."SCRATCH".A
F$:.".";.Q"Q..400:.:.".ENTER FILENAME? "
;.Z"R..500.."Z..:.".ERASE THE .M.ATH, .D
.ATA OR .I.NDEX FILES? ";.."[.TY.0:L.1:A
C$."MDI":.550:WH$.A$.."_..:.".ARE YOU SU
RE (Y/N)? ";:L.1:TY.0:AC$."YN".."A..550:
.A$.."Y"....#B.@P,24,0,"SCRATCHING FILE.
.."..#D..WH$.."M".5225.Z#F..15,"S0:AR.".
NF$:.15,"S0:DP.".NF$: 15:..M#I..WH$.."D"
.5245..#N..15,"S0:DA.".NF$:.15,"S0:BM.".
NF$:.15,"S0:TS.".NF$.P#X..15,"S0:FS.".NF
$:.15,"S0:SC.".NF$: 15:...#}..15,"S0:IN.
".NF$: 15:...$...".";:TT$."BLANK".AF$:.3
00:.6600:.5301:.5309.V$...:.".ENTER STAR
TING RECORD NUMBER? 1.";:TY.1:L.4:.550.V
$..A..(A):.A.1.A.NR..560:.5302..$..SA.A.
1..$...:.".ENTER ENDING RECORD NUMBER?";
.M$..Y.B(214):X.B(211).1:TY.1:L.4:.NR..$
...560:A..(A):.A.SA.1.A.NR.5307..$..EN.A
.1:..3%...:.".ARE YOU SURE (Y/N)? ";:TY.
0:AC$."YN":L.1:.550.A%...A$."N"....%..@P
,24,0,"BLANKING FILE...":@M,WA$,RE$(0),1
:@L;"TS.".NF$,"BA00".C%H..1,8,2,"#":.I.S
A.EN:.B.12,I:@W,I,RE$(0):@P,24,34,D(I.1)
:.I.L%R. 1:...&...".";:TT$."FIX".AF$:.30
0:.6600:@P,24,0,"PROCESSING..."..&"..600
0.%&,.BM.1:A.NR:.4283.>&|.. MAKE B
M.FILE.N&...BM..1.. :. FLAG TO BUILD MA
P FROM SCRATCH..&..A$."":B$."":.I.1.10:B
$.B$.G(255):.:.I.1.25:A$.A$.B$:...&..@L;
"TS.".NF$,"BA00":C.65280:.I.2.251:.C.I,0
:.:. USED BIT MAP.!'.. 1:RN.0:Y.0:SS$."F
1='*'".SS$:.1,8,2,"#":@R,0,RE$(0).Q'..D.
255:Y.Y.1:.I.0.7:.B:.B(2).128.RN..NR.556
0.|'..RN.RN.1:.F(RE$(0))..F(WA$).D.D.2.(
7.I)..'.....'..@M,G(D),A$,Y:.RN.NR.5530.
.'B. 1:..Z'D.A$."!#$%&":.5950 :. HO
W MANY BLOCKS LEFT..(B.FB.FB.US.41..(SS.
254).1..((5.NF.58).254).1.+(G.FB.FB.1..(
FB.127):NC.FB.254.1.N(L.NR..(NC.TL).1:.N
R.2000.NR.2000.T(V...S(>..1,8,0,"$0:".A$
:@IL,6,1,X$..(H..#1,X$:.X$.."".5960..(R.
.#1,X$,X$,X$,Y$:X.F(X$.G(0)).M(\.Y.F(Y$.
G(0)): 1:FB.X.Y.256:...)P..2,8,2,"#":.3,
8,5,"0:DA.".NF$: 3 :. MAKE TS.FILE..)
...6400.7)T..3,8,3,"@0:TS.".NF$.",P,W":.
3," ";.I)...3,G(T);G(S);._)...15,"U1:";
2;0;T;S.I)$..6220.{)...3,G(T);G(S);..)8.
.T..0.6170..)B. 2: 3:...)L..#2,T$,S$:T.F
(T$.G(0)).D)V.S.F(S$.G(0)):...)..FB.0:.1
,8,2,A$:.15,A: 1:.A.0..5950..).....*...1
5,"M-R"G(144);G(2).**...#15,A$:S.0:.A$..
"".S.F(A$).C*...15,"M-R"G(147);G(2).C*..
.#15,A$:T.0:.A$.."".T.F(A$).|*(..15,"M-R
"G(148);G(2)..*2..#15,A$:O.0:.A$.."".O.F
(A$)..*F.O.O.1:.T.0.T.18.F*P..15,"U1:";2
;0;T;S.X*Z..15,"B-P";2;O..*D..6220:..%+H
..2,8,2,"0:FS.".NF$:.2,NS,NF,CA,TL,NR,SC
$,P1$,P2$:N1.NR:LR.TL.W+R..FA$(NF.1),RE$
(NF.1):.RT.5,NF:.RT.1,.(LR.256)..+W..RT,
LR.256.B(RT.1):.RT.3,.(NR.256):.RT.2,NR.
256.B(RT.3).M+...I.0.NF.1:@IL,5,2,A$:FA$
(I).A$:.FR.I,F(J(FA$(I),4)):...+.. 2:.BA
.30,RE$(0):...,,..2,8,2,"0:FS.".NF$:.2,N
S,NF,CA,TL,NR,SC$,P1$,P2$..,1.. VA$(NF.1
):A.CC.G,6..I.0.NF.1:@IL,5,2,A$:VA$(I).A
$:.: 2:.15,"S0:FS.".DF$..,@..2,8,2,"0:FS
.".NF$.",S,W".L,J..2,NS;C$;NF;C$;CA;C$;T
L;C$;A;C$;QO$;SC$;QO$;C$;QO$;P1$;QO$;C$;
QO$;..,O..2,P2$;QO$..,T..I.0.NF.1:.2,VA$
(I);:.: 2:...-(#.198,0:.4,4:.4:.ST..0. 4
:.9085.R-_# 4:@P,24,0,"READY PRINTER AND
PRESS SPACE":.200.E-D#.B(198).0.9060.Y-
I#@P,24,0,"":.200..-N#.KY$:.KY$.." ".KY$
.."."..2200..-S#.KY$."."....-X#.9000.N-}
#.4,4,(B(53272).2).3.5..-.#.ZI.1.2:.4:.:
@D:.ZI.1.4:.4:.: 4:..-....1,9,15,"S0:64.
MANIPULATE": 1:."0:64.MANIPULATE",9:..F.
"..1,8,15,"S0:64.MANIPULATE": 1:."0:64.M
ANIPULATE",8:....
> CLICK IMAGE PREVIEW FOR FULL MODAL