_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

64.REPORT

FILE INFORMATION

FILENAME(S): 64.REPORT

FILE TYPE(S): PRG

FILE SIZE: 17.1K

FIRST SEEN: 2025-10-19 22:48:24

APPEARS ON: 5 disk(s)

FILE HASH

d432e98a2a1ba809dc2f9ca2a9144798e2019db56e351f32f1bed60c945954e0

FOUND ON DISKS (5 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
MICRO MANIAC 64.REPORT PRG Radd Maxx 8 2 DOWNLOAD FILE
64 MANAGER 1 06B 64.REPORT PRG Sailor, Ganheden 6 19 DOWNLOAD FILE
64 MANAGER 1 06B 64.REPORT PRG DuncanTwain 6 19 DOWNLOAD FILE
64 MANAGER 1 06B 64.REPORT PRG DuncanTwain 6 19 DOWNLOAD FILE
64 MANAGER 1 06B 64.REPORT PRG hedning, shine 6 19 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 0B 08 0A 00 8A 34  35 32 30 00 4E 08 64 00  |.......4520.N.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 30 38 38  3A 4C 43 B2 34 38 3A 8B  |BC.31088:LC.48:.|
00000040: C2 28 38 30 39 29 B2 32  34 36 A7 3A 40 41 00 88  |.(809).246.:@A..|
00000050: 08 69 00 4F 46 B2 30 3A  4F 53 B2 30 3A 4F 54 B2  |.i.OF.0:OS.0:OT.|
00000060: 30 3A 53 4E B2 30 3A 53  4C B2 32 35 34 3A 52 4E  |0:SN.0:SL.254:RN|
00000070: B2 30 3A 4F B2 31 3A 43  30 24 B2 C7 28 30 29 3A  |.0:O.1:C0$..(0):|
00000080: 43 31 24 B2 C7 28 31 29  00 A7 08 6E 00 4B 59 B2  |C1$..(1)...n.KY.|
00000090: 30 3A 4B 59 24 B2 22 20  22 AA 22 22 3A 9F 31 35  |0:KY$." "."":.15|
000000A0: 2C 38 2C 31 35 3A 8E 00  EC 08 C8 00 58 24 B2 22  |,8,15:......X$."|
000000B0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000000C0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000000D0: 20 20 20 20 20 20 20 22  3A 59 41 B2 C2 28 32 31  |       ":YA..(21|
000000E0: 34 29 3A 58 41 B2 C2 28  32 31 31 29 00 19 09 D2  |4):XA..(211)....|
000000F0: 00 40 50 2C 59 41 2C 58  41 2C C8 28 58 24 2C 33  |.@P,YA,XA,.(X$,3|
00000100: 39 AB 58 41 29 3A 58 24  B2 22 22 3A 40 50 2C 59  |9.XA):X$."":@P,Y|
00000110: 41 2C 58 41 2C 22 22 3A  8E 00 3E 09 31 01 99 3A  |A,XA,"":..>.1..:|
00000120: 99 22 11 45 4E 54 45 52  20 46 49 4C 45 4E 41 4D  |.".ENTER FILENAM|
00000130: 45 3F 20 22 3B 3A 46 54  24 B2 22 46 53 2E 00 51  |E? ";:FT$."FS..Q|
00000140: 09 33 01 8D 35 30 30 3A  58 31 B2 58 3A 59 31 B2  |.3..500:X1.X:Y1.|
00000150: 59 00 89 09 36 01 9F 32  2C 38 2C 32 2C 22 30 3A  |Y...6..2,8,2,"0:|
00000160: 22 AA 46 54 24 AA 4E 46  24 3A 84 31 35 2C 41 2C  |".FT$.NF$:.15,A,|
00000170: 42 24 3A 8B 46 54 24 B2  22 46 53 2E 22 A7 84 32  |B$:.FT$."FS."..2|
00000180: 2C 4E 53 2C 4E 46 2C 43  41 00 90 09 37 01 A0 32  |,NS,NF,CA...7..2|
00000190: 00 AB 09 40 01 8B 41 B2  30 A7 9E 42 41 AA 34 32  |...@..A.0..BA.42|
000001A0: 2C 4E 46 24 3A 46 36 B2  30 3A 8E 00 D9 09 4A 01  |,NF$:F6.0:....J.|
000001B0: 40 50 2C 32 34 2C 30 2C  C8 28 42 24 2C 32 30 29  |@P,24,0,.(B$,20)|
000001C0: 3A 99 22 20 2D 20 44 49  52 45 43 54 4F 52 59 20  |:." - DIRECTORY |
000001D0: 28 59 2F 4E 29 3F 20 22  3B 00 10 0A 54 01 41 43  |(Y/N)? ";...T.AC|
000001E0: 24 B2 22 59 4E 22 3A 54  59 B2 30 3A 4C B2 31 3A  |$."YN":TY.0:L.1:|
000001F0: 8D 35 35 30 3A 40 50 2C  32 34 2C 30 2C 22 22 3A  |.550:@P,24,0,"":|
00000200: 8D 32 30 30 3A 8B 41 24  B2 22 4E 22 A7 33 36 30  |.200:.A$."N".360|
00000210: 00 2B 0A 59 01 41 24 B2  22 44 41 2E 2A 22 3A 8B  |.+.Y.A$."DA.*":.|
00000220: 46 36 A7 41 24 B2 22 52  46 2E 2A 00 4E 0A 5E 01  |F6.A$."RF.*.N.^.|
00000230: 9E 42 42 AA 31 35 3A 46  47 B2 30 3A 8D 31 33 38  |.BB.15:FG.0:.138|
00000240: 30 3A 99 22 93 22 3B 3A  9E 42 42 AA 35 37 00 66  |0:.".";:.BB.57.f|
00000250: 0A 68 01 58 B2 58 31 3A  59 B2 59 31 3A 8D 35 31  |.h.X.X1:Y.Y1:.51|
00000260: 30 3A 89 33 31 30 00 91  0A 90 01 43 24 B2 22 9A  |0:.310.....C$.".|
00000270: 97 05 22 3A 40 43 2C 43  24 3A 99 C7 28 31 34 32  |..":@C,C$:..(142|
00000280: 29 A6 32 30 AB C3 28 54  54 24 29 AD 32 29 54 54  |).20..(TT$).2)TT|
00000290: 24 00 B4 0A 9A 01 81 49  49 B2 31 A4 34 3A 99 22  |$......II.1.4:."|
000002A0: 81 A3 A3 A3 A3 A3 A3 A3  A3 A3 A3 05 22 3B 3A 82  |............";:.|
000002B0: 49 49 3A 8E 00 F2 0A C2  01 50 24 B2 4E 46 24 3A  |II:......P$.NF$:|
000002C0: 4E 46 24 B2 41 24 3A 59  B2 59 AA 32 3A 58 B2 30  |NF$.A$:Y.Y.2:X.0|
000002D0: 3A 99 22 9E 22 3B 3A 40  50 2C 59 2C 58 2C 51 24  |:.".";:@P,Y,X,Q$|
000002E0: 3A 99 22 05 22 3B 3A 8D  35 30 30 3A 4E 46 24 B2  |:.".";:.500:NF$.|
000002F0: 50 24 00 F8 0A CC 01 8E  00 14 0B F4 01 59 B2 C2  |P$...........Y..|
00000300: 28 32 31 34 29 3A 58 B2  C2 28 32 31 31 29 3A 99  |(214):X..(211):.|
00000310: 4E 46 24 3B 00 27 0B FE  01 4B 59 B2 31 3A 97 42  |NF$;.'...KY.1:.B|
00000320: 41 AA 4C 43 2C 36 34 00  5C 0B FF 01 97 32 31 31  |A.LC,64.\....211|
00000330: 2C 58 AB 31 AA 4B 59 3A  4C B2 31 33 3A 54 59 B2  |,X.1.KY:L.13:TY.|
00000340: 30 3A 8D 35 36 30 3A 8B  52 46 20 B0 41 24 B3 22  |0:.560:.RF .A$."|
00000350: 21 22 A7 4B 59 B2 31 3A  89 35 31 31 00 75 0B 03  |!".KY.1:.511.u..|
00000360: 02 40 48 2C 22 3F 22 2C  41 24 3A 8B 4B 59 B3 B1  |.@H,"?",A$:.KY..|
00000370: 30 A7 35 31 31 00 8E 0B  04 02 40 48 2C 22 2A 22  |0.511.....@H,"*"|
00000380: 2C 41 24 3A 8B 4B 59 B3  B1 30 A7 35 31 31 00 A7  |,A$:.KY..0.511..|
00000390: 0B 05 02 40 48 2C 22 40  22 2C 41 24 3A 8B 4B 59  |...@H,"@",A$:.KY|
000003A0: B3 B1 30 A7 35 31 31 00  B4 0B 06 02 97 42 41 AA  |..0.511......BA.|
000003B0: 4C 43 2C 30 00 C1 0B 08  02 4E 46 24 B2 41 24 3A  |LC,0.....NF$.A$:|
000003C0: 8E 00 D7 0B 26 02 59 B2  C2 28 32 31 34 29 3A 58  |....&.Y..(214):X|
000003D0: B2 C2 28 32 31 31 29 00  E0 0B 30 02 8D 36 30 30  |..(211)...0..600|
000003E0: 00 FE 0B 32 02 8B 4C B2  31 A7 3A 40 48 2C 41 24  |...2..L.1.:@H,A$|
000003F0: 2C 41 43 24 3A 8B 4B 59  B2 30 A7 35 36 30 00 10  |,AC$:.KY.0.560..|
00000400: 0C 35 02 8B 54 59 B2 31  A7 41 B2 C5 28 41 24 29  |.5..TY.1.A..(A$)|
00000410: 00 16 0C 3A 02 8E 00 2E  0C 58 02 8B C2 28 35 32  |...:.....X...(52|
00000420: 29 AB C2 28 35 30 29 B3  33 A7 8D 36 35 30 00 4F  |)..(50).3..650.O|
00000430: 0C 5D 02 40 47 2C 59 2C  58 2C 4C 2C 54 59 2C 41  |.].@G,Y,X,L,TY,A|
00000440: 24 3A 8D 32 32 30 30 3A  8B 52 46 A7 36 30 30 00  |$:.2200:.RF.600.|
00000450: 55 0C 62 02 8E 00 88 0C  8A 02 97 31 39 38 2C 31  |U.b........198,1|
00000460: 3A 97 36 33 31 2C 31 33  3A 58 5A B2 C2 28 32 31  |:.631,13:XZ..(21|
00000470: 31 29 3A 59 5A B2 C2 28  32 31 34 29 3A 4F 41 B2  |1):YZ..(214):OA.|
00000480: C2 28 42 41 AA 4C 43 29  00 C8 0C 94 02 97 42 41  |.(BA.LC)......BA|
00000490: AA 4C 43 2C 30 3A 40 47  2C 32 34 2C 30 2C 33 39  |.LC,0:@G,24,0,39|
000004A0: 2C 30 2C 54 53 24 3A 40  50 2C 32 34 2C 30 2C 22  |,0,TS$:@P,24,0,"|
000004B0: 4F 4E 45 20 4D 4F 4D 45  4E 54 2C 20 50 4C 45 41  |ONE MOMENT, PLEA|
000004C0: 53 45 22 3A 8D 32 30 30  00 FE 0C 9E 02 5A B2 B8  |SE":.200.....Z..|
000004D0: 28 30 29 3A 40 50 2C 32  34 2C 30 2C 54 53 24 3A  |(0):@P,24,0,TS$:|
000004E0: 97 42 41 AA 4C 43 2C 4F  41 3A 40 50 2C 59 5A 2C  |.BA.LC,OA:@P,YZ,|
000004F0: 58 5A 2C 22 22 3A 54 53  24 B2 22 22 3A 8E 00 11  |XZ,"":TS$."":...|
00000500: 0D AC 03 42 24 B2 22 44  41 54 41 22 3A 89 39 35  |...B$."DATA":.95|
00000510: 30 00 20 0D B1 03 42 24  B2 22 53 59 53 54 45 4D  |0. ...B$."SYSTEM|
00000520: 00 5B 0D B6 03 84 31 35  2C 41 3A 40 50 2C 32 34  |.[....15,A:@P,24|
00000530: 2C 30 2C 22 50 4C 41 43  45 20 22 AA 42 24 AA 22  |,0,"PLACE ".B$."|
00000540: 20 44 49 53 4B 20 49 4E  20 44 52 49 56 45 2D 20  | DISK IN DRIVE- |
00000550: 50 52 45 53 53 20 53 50  41 43 45 00 78 0D C0 03  |PRESS SPACE.x...|
00000560: A1 4B 59 24 3A 8D 32 32  30 30 3A 8B 4B 59 24 B3  |.KY$:.2200:.KY$.|
00000570: B1 22 20 22 A7 39 36 30  00 8C 0D C5 03 40 50 2C  |." ".960.....@P,|
00000580: 32 34 2C 30 2C 22 22 3A  8D 32 30 30 00 A1 0D CA  |24,0,"":.200....|
00000590: 03 8B 42 24 B2 22 53 59  53 54 45 4D 22 A7 39 39  |..B$."SYSTEM".99|
000005A0: 30 00 A7 0D CB 03 8E 00  CE 0D DE 03 40 50 2C 32  |0...........@P,2|
000005B0: 34 2C 30 2C 22 4C 4F 41  44 49 4E 47 20 4F 50 54  |4,0,"LOADING OPT|
000005C0: 49 4F 4E 2E 2E 2E 22 3A  8D 32 30 30 3A 8E 00 01  |ION...":.200:...|
000005D0: 0E 64 05 46 4C B2 30 3A  9F 31 2C 38 2C 30 2C 22  |.d.FL.0:.1,8,0,"|
000005E0: 24 30 3A 22 AA 41 24 3A  84 31 35 2C 42 31 2C 42  |$0:".A$:.15,B1,B|
000005F0: 24 3A 8B 42 31 A7 8D 31  35 30 30 3A 89 31 34 35  |$:.B1..1500:.145|
00000600: 35 00 11 0E 69 05 99 22  93 22 3B 3A 9E 42 41 AA  |5...i..".";:.BA.|
00000610: 33 00 24 0E 6E 05 8B C2  28 32 35 34 29 B2 30 A7  |3.$.n...(254).0.|
00000620: 31 34 35 30 00 37 0E 78  05 8B C2 28 31 39 38 29  |1450.7.x...(198)|
00000630: B2 30 A7 31 34 30 30 00  4F 0E 82 05 A1 4B 59 24  |.0.1400.O....KY$|
00000640: 3A 8D 32 32 30 30 3A 8B  52 46 A7 31 34 30 30 00  |:.2200:.RF.1400.|
00000650: 62 0E 96 05 8B 4B 59 24  B3 B1 22 20 22 A7 31 34  |b....KY$.." ".14|
00000660: 30 30 00 72 0E A0 05 9E  42 41 AA 36 3A 89 31 33  |00.r....BA.6:.13|
00000670: 39 30 00 9B 0E AA 05 99  3A 99 22 46 52 45 45 20  |90......:."FREE |
00000680: 42 4C 4F 43 4B 53 20 3D  22 C2 28 32 35 31 29 AA  |BLOCKS =".(251).|
00000690: 32 35 36 AC C2 28 32 35  32 29 3B 00 A2 0E AF 05  |256..(252);.....|
000006A0: A0 31 00 B5 0E B4 05 8B  C2 28 31 39 38 29 B2 30  |.1.......(198).0|
000006B0: A7 31 34 36 30 00 CD 0E  BE 05 A1 4B 59 24 3A 8D  |.1460......KY$:.|
000006C0: 32 32 30 30 3A 8B 52 46  A7 31 34 36 30 00 D3 0E  |2200:.RF.1460...|
000006D0: D2 05 8E 00 F8 0E DC 05  99 22 93 22 3B 3A 8D 34  |.........".";:.4|
000006E0: 30 30 3A 40 50 2C 32 34  2C 32 30 AB C3 28 42 24  |00:@P,24,20..(B$|
000006F0: 29 AD 32 2C 42 24 3A 8E  00 1F 0F 98 08 52 46 B2  |).2,B$:......RF.|
00000700: 30 3A 8B 4B 59 24 B3 B1  22 85 22 AF 4B 59 24 B3  |0:.KY$..".".KY$.|
00000710: B1 22 89 22 AF 4B 59 24  B3 B1 22 10 22 A7 8E 00  |.".".KY$.."."...|
00000720: 39 0F 99 08 8B 4B 59 24  B2 22 10 22 A7 8D 39 30  |9....KY$."."..90|
00000730: 30 30 3A 52 46 B2 31 3A  8E 00 76 0F 9A 08 4B 50  |00:RF.1:..v...KP|
00000740: 24 B2 4B 59 24 3A 4B 50  B2 4B 59 3A 50 32 B2 C2  |$.KY$:KP.KY:P2..|
00000750: 28 32 29 3A 97 31 39 38  2C 31 3A 97 36 33 31 2C  |(2):.198,1:.631,|
00000760: 31 33 3A 58 5A B2 C2 28  32 31 31 29 3A 59 5A B2  |13:XZ..(211):YZ.|
00000770: C2 28 32 31 34 29 00 A0  0F 9B 08 4F 41 B2 C2 28  |.(214).....OA..(|
00000780: 42 41 AA 4C 43 29 3A 97  42 41 AA 4C 43 2C 30 3A  |BA.LC):.BA.LC,0:|
00000790: 40 47 2C 32 34 2C 30 2C  33 39 2C 30 2C 54 53 24  |@G,24,0,39,0,TS$|
000007A0: 00 CF 0F 9C 08 40 50 2C  32 34 2C 30 2C 22 22 3A  |.....@P,24,0,"":|
000007B0: 8D 32 30 30 3A 40 50 2C  32 34 2C 30 2C 22 12 41  |.200:@P,24,0,".A|
000007C0: 52 45 20 59 4F 55 20 53  55 52 45 3F 92 20 22 00  |RE YOU SURE?. ".|
000007D0: E7 0F 9D 08 59 41 B2 C2  28 32 31 34 29 3A 58 41  |....YA..(214):XA|
000007E0: B2 C2 28 32 31 31 29 00  13 10 9E 08 40 47 2C 59  |..(211).....@G,Y|
000007F0: 41 2C 58 41 2C 31 2C 30  2C 52 53 24 3A 40 48 2C  |A,XA,1,0,RS$:@H,|
00000800: 52 53 24 2C 22 59 4E 22  3A 8B 4B 59 B2 30 A7 32  |RS$,"YN":.KY.0.2|
00000810: 32 30 36 00 2D 10 9F 08  4B 59 24 B2 4B 50 24 3A  |206.-...KY$.KP$:|
00000820: 8B 52 53 24 B2 22 59 22  A7 32 32 31 30 00 5A 10  |.RS$."Y".2210.Z.|
00000830: A0 08 40 50 2C 32 34 2C  30 2C 54 53 24 3A 54 53  |..@P,24,0,TS$:TS|
00000840: 24 B2 22 22 3A 40 50 2C  59 5A 2C 58 5A 2C 22 22  |$."":@P,YZ,XZ,""|
00000850: 3A 97 42 41 AA 4C 43 2C  4F 41 00 79 10 A1 08 4B  |:.BA.LC,OA.y...K|
00000860: 59 B2 4B 50 3A 4B 59 24  B2 4B 50 24 3A 97 32 2C  |Y.KP:KY$.KP$:.2,|
00000870: 50 32 3A 52 46 B2 31 3A  8E 00 80 10 A2 08 A0 31  |P2:RF.1:.......1|
00000880: 00 8F 10 A7 08 8B 4B 59  24 B2 22 89 22 A7 8A 00  |......KY$."."...|
00000890: A1 10 AC 08 8B 4B 59 24  B2 22 85 22 A7 34 33 36  |.....KY$.".".436|
000008A0: 35 00 A7 10 B1 08 8E 00  D8 10 C4 09 99 22 93 22  |5............"."|
000008B0: 3B 3A 8D 34 30 30 3A 99  A6 32 30 AB C3 28 54 53  |;:.400:..20..(TS|
000008C0: 24 29 AD 32 29 54 53 24  3A 99 A3 32 30 AB C3 28  |$).2)TS$:..20..(|
000008D0: 54 53 24 29 AD 32 29 3B  00 01 11 CE 09 81 49 49  |TS$).2);......II|
000008E0: B2 31 A4 C3 28 54 53 24  29 3A 99 22 A3 22 3B 3A  |.1..(TS$):.".";:|
000008F0: 82 49 49 3A 99 3A 97 35  33 32 37 32 2C 43 41 3A  |.II:.:.53272,CA:|
00000900: 8E 00 11 11 CC 0B 8B 4E  46 B2 30 A7 8D 36 32 36  |.......NF.0..626|
00000910: 30 00 23 11 D6 0B 52 28  31 30 33 29 B2 30 3A 52  |0.#...R(103).0:R|
00000920: 31 B2 30 00 30 11 DB 0B  8B 46 33 A7 33 30 38 35  |1.0.0....F3.3085|
00000930: 00 4E 11 E0 0B 42 24 B2  22 49 4E 44 45 58 22 3A  |.N...B$."INDEX":|
00000940: 8B 42 54 24 B3 B1 22 49  22 A7 33 30 37 30 00 83  |.BT$.."I".3070..|
00000950: 11 EA 0B 40 4C 3B 22 49  4E 2E 22 AA 4E 46 24 3A  |...@L;"IN.".NF$:|
00000960: 84 31 35 2C 41 3A 8B 41  A7 8D 39 35 30 3A 40 50  |.15,A:.A..950:@P|
00000970: 2C 32 34 2C 30 2C 22 22  3A 8D 32 30 30 3A 89 33  |,24,0,"":.200:.3|
00000980: 30 35 30 00 96 11 FE 0B  8B 42 54 24 B2 22 53 22  |050......BT$."S"|
00000990: A7 8D 36 37 38 30 00 B7  11 0D 0C 42 4C 24 B2 22  |..6780.....BL$."|
000009A0: 22 3A 81 49 B2 31 A4 50  57 3A 42 4C 24 B2 42 4C  |":.I.1.PW:BL$.BL|
000009B0: 24 AA 22 20 22 3A 82 00  C7 11 12 0C 8B 46 34 B2  |$." ":.......F4.|
000009C0: 30 A7 8D 36 34 30 30 00  D5 11 13 0C 97 35 33 32  |0..6400......532|
000009D0: 37 32 2C 43 41 00 E4 11  15 0C 8B 4E 4B B2 30 A7  |72,CA......NK.0.|
000009E0: 33 31 30 30 00 FD 11 16  0C 81 4A B2 31 A4 4E 4B  |3100......J.1.NK|
000009F0: 3A 81 49 B2 30 A4 4E 41  28 32 29 AB 31 00 29 12  |:.I.0.NA(2).1.).|
00000A00: 17 0C 8B C6 28 CA 28 4C  44 24 28 49 29 2C 32 29  |....(.(LD$(I),2)|
00000A10: 29 B2 42 46 28 4A 2C 30  29 A7 42 46 28 4A 2C 31  |).BF(J,0).BF(J,1|
00000A20: 29 B2 49 3A 89 33 30 39  37 00 30 12 18 0C 82 49  |).I:.3097.0....I|
00000A30: 00 37 12 19 0C 82 4A 00  79 12 1C 0C 99 22 93 52  |.7....J.y....".R|
00000A40: 45 50 4F 52 54 49 4E 47  20 54 4F 20 22 3B 3A 41  |EPORTING TO ";:A|
00000A50: 24 28 31 29 B2 22 53 43  52 45 45 4E 22 3A 41 24  |$(1)."SCREEN":A$|
00000A60: 28 32 29 B2 22 44 49 53  4B 22 3A 41 24 28 33 29  |(2)."DISK":A$(3)|
00000A70: B2 22 50 52 49 4E 54 45  52 00 92 12 26 0C 40 48  |."PRINTER...&.@H|
00000A80: 2C 52 44 24 2C 22 53 44  50 22 3A 99 41 24 28 4B  |,RD$,"SDP":.A$(K|
00000A90: 59 29 00 B0 12 2B 0C 46  37 B2 30 3A 8B 52 44 24  |Y)...+.F7.0:.RD$|
00000AA0: B2 22 44 22 AF 54 24 B2  22 54 22 A7 46 37 B2 31  |."D".T$."T".F7.1|
00000AB0: 00 C8 12 30 0C 44 56 B2  33 3A 8B 52 44 24 B3 B1  |...0.DV.3:.RD$..|
00000AC0: 22 44 22 A7 33 31 35 30  00 DB 12 3A 0C 44 56 B2  |"D".3150...:.DV.|
00000AD0: 44 4E 3A 41 24 B2 22 2C  53 2C 57 00 07 13 44 0C  |DN:A$.",S,W...D.|
00000AE0: 98 31 35 2C 22 53 30 3A  22 AA 44 46 24 3A 9F 35  |.15,"S0:".DF$:.5|
00000AF0: 2C 44 56 2C 38 2C 22 30  3A 22 AA 44 46 24 AA 41  |,DV,8,"0:".DF$.A|
00000B00: 24 3A 89 33 31 37 30 00  1F 13 4E 0C 8B 52 44 24  |$:.3170...N..RD$|
00000B10: B2 22 53 22 A7 9F 35 2C  33 3A 89 33 31 37 30 00  |."S"..5,3:.3170.|
00000B20: 41 13 51 0C 9F 34 2C 34  3A 98 34 2C C7 28 30 29  |A.Q..4,4:.4,.(0)|
00000B30: 3B 3A 8B 53 54 B1 B2 30  A7 A0 34 3A 89 33 31 36  |;:.ST..0..4:.316|
00000B40: 30 00 6F 13 52 0C A0 34  3A 40 50 2C 32 34 2C 30  |0.o.R..4:@P,24,0|
00000B50: 2C 22 52 45 41 44 59 20  50 52 49 4E 54 45 52 20  |,"READY PRINTER |
00000B60: 41 4E 44 20 50 52 45 53  53 20 53 50 41 43 45 00  |AND PRESS SPACE.|
00000B70: 82 13 53 0C 8B C2 28 31  39 38 29 B2 30 A7 33 31  |..S...(198).0.31|
00000B80: 35 35 00 A9 13 54 0C 40  50 2C 32 34 2C 30 2C 22  |55...T.@P,24,0,"|
00000B90: 22 3A 8D 32 30 30 3A A1  4B 59 24 3A 8B 4B 59 24  |":.200:.KY$:.KY$|
00000BA0: B2 22 20 22 A7 33 31 35  33 00 C4 13 55 0C 8B 4B  |." ".3153...U..K|
00000BB0: 59 24 B2 22 85 22 B0 4B  59 24 B2 22 89 22 A7 8D  |Y$.".".KY$."."..|
00000BC0: 32 32 30 30 00 DC 13 56  0C 8B 4B 59 24 B2 22 93  |2200...V..KY$.".|
00000BD0: 22 A7 46 33 B2 31 3A 89  34 33 36 30 00 E6 13 57  |".F3.1:.4360...W|
00000BE0: 0C 89 33 31 35 35 00 07  14 58 0C 44 56 B2 44 4E  |..3155...X.DV.DN|
00000BF0: 3A 9F 35 2C 44 56 2C 28  C2 28 35 33 32 37 32 29  |:.5,DV,(.(53272)|
00000C00: AF 32 29 AC 33 2E 35 00  3A 14 62 0C 49 52 B2 30  |.2).3.5.:.b.IR.0|
00000C10: 3A 9F 31 2C 38 2C 32 2C  22 23 22 3A 8D 33 38 33  |:.1,8,2,"#":.383|
00000C20: 30 3A 9E 42 41 AA 33 39  2C 31 30 32 3A 8B 42 54  |0:.BA.39,102:.BT|
00000C30: 24 B2 22 46 22 A7 52 4E  B2 30 00 57 14 67 0C 8B  |$."F".RN.0.W.g..|
00000C40: 4E 41 28 33 29 B2 30 A7  53 4C 28 33 29 B2 30 3A  |NA(3).0.SL(3).0:|
00000C50: 4E 4C 28 33 29 B2 30 00  74 14 68 0C 8B 4E 41 28  |NL(3).0.t.h..NA(|
00000C60: 31 29 B2 30 A7 53 4C 28  31 29 B2 30 3A 4E 4C 28  |1).0.SL(1).0:NL(|
00000C70: 31 29 B2 30 00 B4 14 76  0C 46 33 B2 30 3A 8B 4E  |1).0...v.F3.0:.N|
00000C80: 41 28 31 29 AA 4E 41 28  33 29 B2 30 A7 46 31 B2  |A(1).NA(3).0.F1.|
00000C90: 31 3A 53 53 B2 30 3A 45  4C B2 32 35 35 3A 8D 33  |1:SS.0:EL.255:.3|
00000CA0: 33 33 30 3A 8D 33 33 35  30 3A 46 33 B2 31 3A 89  |330:.3350:F3.1:.|
00000CB0: 34 33 35 39 00 D9 14 80  0C 53 53 B2 53 4C 28 31  |4359.....SS.SL(1|
00000CC0: 29 AA 4E 4C 28 31 29 3A  45 4C B2 4C 50 AB 53 4C  |).NL(1):EL.LP.SL|
00000CD0: 28 33 29 AB 4E 4C 28 33  29 00 E3 14 94 0C 8D 33  |(3).NL(3)......3|
00000CE0: 32 38 30 00 F2 14 9E 0C  52 31 B2 31 3A 8D 33 33  |280.....R1.1:.33|
00000CF0: 35 30 00 05 15 A8 0C 8D  33 34 33 30 3A 8B 46 33  |50......3430:.F3|
00000D00: A7 34 33 35 39 00 1B 15  B2 0C 8D 33 34 37 30 3A  |.4359......3470:|
00000D10: 8B 4E 52 B2 52 4E A7 46  33 B2 31 00 2F 15 B7 0C  |.NR.RN.F3.1./...|
00000D20: 8B 46 33 B2 31 AF 4E 42  B2 30 A7 34 33 36 30 00  |.F3.1.NB.0.4360.|
00000D30: 39 15 BC 0C 89 33 32 32  30 00 45 15 D0 0C 8B 46  |9....3220.E....F|
00000D40: 31 B2 31 A7 8E 00 6F 15  DA 0C 52 28 31 30 33 29  |1.1...o...R(103)|
00000D50: B2 52 28 31 30 33 29 AA  31 3A 43 4C B2 30 3A 4C  |.R(103).1:CL.0:L|
00000D60: 49 B2 31 3A 8B 52 31 B2  30 A7 8D 34 32 32 30 00  |I.1:.R1.0..4220.|
00000D70: 8D 15 E4 0C 52 31 B2 30  3A 53 53 B2 53 4C 28 31  |....R1.0:SS.SL(1|
00000D80: 29 3A 45 4C B2 53 53 AA  4E 4C 28 31 29 00 B9 15  |):EL.SS.NL(1)...|
00000D90: EE 0C 8B 53 53 AB 43 4C  B3 B1 30 A7 81 49 B2 43  |...SS.CL..0..I.C|
00000DA0: 4C AA 31 A4 53 53 3A 91  46 37 AA 31 8D 33 34 36  |L.1.SS:.F7.1.346|
00000DB0: 37 3A 82 3A 43 4C B2 53  53 00 C3 15 F8 0C 8D 33  |7:.:CL.SS......3|
00000DC0: 35 35 30 00 EB 15 02 0D  8B 54 32 A7 54 33 B2 31  |550......T2.T3.1|
00000DD0: 3A 4C 49 B2 32 3A 8D 33  35 35 30 3A 91 46 37 AA  |:LI.2:.3550:.F7.|
00000DE0: 31 8D 33 34 36 36 3A 54  33 B2 30 00 F1 15 0C 0D  |1.3466:T3.0.....|
00000DF0: 8E 00 FA 15 16 0D 4C 49  B2 32 00 24 16 20 0D 45  |......LI.2.$. .E|
00000E00: 4C B2 4C 50 3A 8B 46 31  B2 30 AF 4E 41 28 33 29  |L.LP:.F1.0.NA(3)|
00000E10: B1 30 A7 45 4C B2 4C 50  AB 53 4C 28 33 29 AB 4E  |.0.EL.LP.SL(3).N|
00000E20: 4C 28 33 29 00 34 16 34  0D 8B 52 31 B2 30 A7 8D  |L(3).4.4..R1.0..|
00000E30: 34 32 32 30 00 49 16 39  0D 52 31 B2 30 3A 8B 46  |4220.I.9.R1.0:.F|
00000E40: 33 A7 8D 34 33 31 30 3A  8E 00 69 16 3E 0D 8D 33  |3..4310:..i.>..3|
00000E50: 39 33 30 3A 8D 34 31 30  30 3A 8B 53 4C 28 32 29  |930:.4100:.SL(2)|
00000E60: B3 B1 36 35 A7 33 33 38  30 00 7E 16 48 0D 8D 33  |..65.3380.~.H..3|
00000E70: 35 35 30 3A 52 31 B2 30  3A 8B 46 32 A7 8E 00 88  |550:R1.0:.F2....|
00000E80: 16 52 0D 89 33 33 38 30  00 94 16 66 0D 8B 46 31  |.R..3380...f..F1|
00000E90: B2 31 A7 8E 00 C3 16 6B  0D 53 53 B2 4C 50 3A 45  |.1.....k.SS.LP:E|
00000EA0: 4C B2 4C 50 3A 8B 4E 41  28 33 29 A7 45 4C B2 4C  |L.LP:.NA(3).EL.L|
00000EB0: 50 AB 53 4C 28 33 29 3A  53 53 B2 45 4C AB 4E 4C  |P.SL(3):SS.EL.NL|
00000EC0: 28 33 29 00 EF 16 70 0D  8B 53 53 AB 43 4C B3 B1  |(3)...p..SS.CL..|
00000ED0: 30 A7 81 49 B2 43 4C AA  31 A4 53 53 3A 91 46 37  |0..I.CL.1.SS:.F7|
00000EE0: AA 31 8D 33 34 36 37 3A  82 3A 43 4C B2 53 53 00  |.1.3467:.:CL.SS.|
00000EF0: FE 16 7A 0D 4C 49 B2 33  3A 8D 33 35 35 30 00 29  |..z.LI.3:.3550.)|
00000F00: 17 84 0D 8B 4E 41 28 33  29 A7 8B 45 4C B3 B1 4C  |....NA(3)..EL..L|
00000F10: 50 A7 81 49 B2 45 4C AA  31 A4 4C 50 3A 91 46 37  |P..I.EL.1.LP:.F7|
00000F20: AA 31 8D 33 34 36 37 3A  82 00 2F 17 89 0D 8E 00  |.1.3467:../.....|
00000F30: 3B 17 8A 0D 43 4C B2 43  4C AA 31 00 47 17 8B 0D  |;...CL.CL.1.G...|
00000F40: 98 35 2C 22 22 3A 8E 00  5C 17 8E 0D 8B 52 44 24  |.5,"":..\....RD$|
00000F50: B3 B1 22 53 22 B0 46 31  B2 31 A7 8E 00 98 17 93  |.."S".F1.1......|
00000F60: 0D 40 50 2C 32 34 2C 30  2C 22 05 53 50 41 43 45  |.@P,24,0,".SPACE|
00000F70: 98 20 43 4F 4E 54 49 4E  55 45 53 2F 05 43 4C 52  |. CONTINUES/.CLR|
00000F80: 98 20 53 54 4F 50 53 2F  05 43 54 52 4C 20 50 98  |. STOPS/.CTRL P.|
00000F90: 20 50 52 49 4E 54 53 05  00 C9 17 98 0D 53 B2 35  | PRINTS......S.5|
00000FA0: 34 32 37 32 3A 97 53 AA  32 34 2C 31 35 3A 97 53  |4272:.S.24,15:.S|
00000FB0: AA 33 2C 38 3A 97 53 AA  32 2C 30 3A 97 53 AA 35  |.3,8:.S.2,0:.S.5|
00000FC0: 2C 39 3A 97 53 AA 36 2C  39 00 DB 17 A2 0D 97 53  |,9:.S.6,9......S|
00000FD0: AA 31 2C 32 35 3A 97 53  2C 38 39 00 FA 17 AC 0D  |.1,25:.S,89.....|
00000FE0: 97 53 AA 34 2C 33 33 3A  97 53 AA 34 2C 33 32 3A  |.S.4,33:.S.4,32:|
00000FF0: 81 49 B2 31 A4 34 35 30  3A 82 00 0F 18 B6 0D 81  |.I.1.450:.......|
00001000: 49 B2 30 A4 32 34 3A 97  53 AA 49 2C 30 3A 82 00  |I.0.24:.S.I,0:..|
00001010: 2F 18 C0 0D A1 4B 59 24  3A 8B 4B 59 24 B2 22 89  |/....KY$:.KY$.".|
00001020: 22 B0 4B 59 24 B2 22 85  22 A7 8D 32 32 30 30 00  |".KY$."."..2200.|
00001030: 54 18 C1 0D 8B 4B 59 24  B3 B1 22 20 22 AF 4B 59  |T....KY$.." ".KY|
00001040: 24 B3 B1 22 93 22 AF 4B  59 24 B3 B1 22 10 22 A7  |$..".".KY$..".".|
00001050: 33 35 32 30 00 6D 18 C2  0D 8B 4B 59 24 B2 22 10  |3520.m....KY$.".|
00001060: 22 A7 8D 39 30 37 35 3A  89 33 34 37 35 00 7F 18  |"..9075:.3475...|
00001070: C5 0D 8B 4B 59 24 B2 22  93 22 A7 46 33 B2 31 00  |...KY$.".".F3.1.|
00001080: C0 18 CA 0D 40 50 2C 32  34 2C 30 2C 22 2D 2D 2D  |....@P,24,0,"---|
00001090: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
000010A0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
000010B0: 2D 2D 2D 2D 22 3A 40 50  2C 32 34 2C 30 2C 22 22  |----":@P,24,0,""|
000010C0: 00 C6 18 D4 0D 8E 00 CF  18 DE 0D 46 32 B2 30 00  |...........F2.0.|
000010D0: DF 18 E8 0D 8B 4E 41 28  4C 49 29 B2 30 A7 8E 00  |.....NA(LI).0...|
000010E0: F3 18 F2 0D 8B 46 31 B2  31 AF 4C 49 B2 32 A7 43  |.....F1.1.LI.2.C|
000010F0: 4C B2 30 00 18 19 FC 0D  8B 43 4C AA 4E 4C 28 4C  |L.0......CL.NL(L|
00001100: 49 29 AC 32 B1 4C 50 AB  4E 4C 28 33 29 AB 53 4C  |I).2.LP.NL(3).SL|
00001110: 28 33 29 A7 46 32 B2 31  00 33 19 06 0E 81 49 B2  |(3).F2.1.3....I.|
00001120: 31 A4 4E 4C 28 4C 49 29  3A 43 4C 24 B2 42 4C 24  |1.NL(LI):CL$.BL$|
00001130: AA 22 22 00 6F 19 10 0E  81 4A B2 30 A4 4E 41 28  |."".o....J.0.NA(|
00001140: 4C 49 29 AB 31 3A 91 4C  49 89 33 36 31 30 2C 33  |LI).1:.LI.3610,3|
00001150: 36 32 30 3A 46 44 24 B2  46 44 24 28 4A 29 3A 54  |620:FD$.FD$(J):T|
00001160: 31 24 B2 46 54 24 28 4A  29 3A 89 33 36 33 30 00  |1$.FT$(J):.3630.|
00001170: 8F 19 1A 0E 46 44 24 B2  48 44 24 28 4A 29 3A 54  |....FD$.HD$(J):T|
00001180: 31 24 B2 48 54 24 28 4A  29 3A 89 33 36 33 30 00  |1$.HT$(J):.3630.|
00001190: BE 19 24 0E 46 44 24 B2  4C 44 24 28 4A 29 3A 54  |..$.FD$.LD$(J):T|
000011A0: 31 24 B2 4C 54 24 28 4A  29 3A 8B 54 33 B1 30 AF  |1$.LT$(J):.T3.0.|
000011B0: C6 28 46 44 24 29 B2 38  34 A7 33 37 39 30 00 D7  |.(FD$).84.3790..|
000011C0: 19 2E 0E 8B C6 28 CA 28  46 44 24 2C 35 29 29 B3  |.....(.(FD$,5)).|
000011D0: B1 49 A7 33 37 39 30 00  08 1A 38 0E 43 4D B2 C6  |.I.3790...8.CM..|
000011E0: 28 CA 28 46 44 24 2C 36  29 29 3A 4C 4E B2 C6 28  |(.(FD$,6)):LN..(|
000011F0: CA 28 46 44 24 2C 34 29  29 3A 53 42 B2 C6 28 CA  |.(FD$,4)):SB..(.|
00001200: 28 46 44 24 2C 32 29 29  00 1B 1A 3D 0E 43 4E B2  |(FD$,2))...=.CN.|
00001210: C6 28 CA 28 46 44 24 2C  37 29 29 00 28 1A 42 0E  |.(.(FD$,7)).(.B.|
00001220: 8B 54 33 A7 33 37 34 30  00 62 1A 4C 0E 41 24 B2  |.T3.3740.b.L.A$.|
00001230: C7 28 C6 28 46 44 24 29  29 3A 8B 4C 49 B2 33 AF  |.(.(FD$)):.LI.3.|
00001240: CA 28 46 44 24 2C 39 2C  31 29 B3 B1 22 4E 22 A7  |.(FD$,9,1).."N".|
00001250: 51 B2 4E 4B AA 31 3A 8D  34 31 38 30 3A 89 33 37  |Q.NK.1:.4180:.37|
00001260: 35 30 00 71 1A 56 0E 8B  41 43 B2 31 A7 33 37 32  |50.q.V..AC.1.372|
00001270: 30 00 9D 1A 60 0E 43 53  24 B2 22 52 44 54 46 22  |0...`.CS$."RDTF"|
00001280: 3A 40 48 2C 41 24 2C 43  53 24 3A 91 4B 59 89 33  |:@H,A$,CS$:.KY.3|
00001290: 37 31 30 2C 33 37 30 30  2C 33 37 34 30 00 AC 1A  |710,3700,3740...|
000012A0: 6A 0E 46 24 B2 52 45 24  28 53 42 29 00 CC 1A 6B  |j.F$.RE$(SB)...k|
000012B0: 0E 8B 28 C6 28 CA 28 46  41 24 28 53 42 29 2C 35  |..(.(.(FA$(SB),5|
000012C0: 29 29 AF 31 29 B2 30 A7  33 37 35 30 00 FF 1A 6C  |)).1).0.3750...l|
000012D0: 0E 8B C6 28 CA 28 46 44  24 2C 38 29 29 B3 33 32  |...(.(FD$,8)).32|
000012E0: A7 9E 42 42 AA 35 31 2C  C5 28 46 24 29 2C 4C 4E  |..BB.51,.(F$),LN|
000012F0: 2C C6 28 CA 28 46 44 24  2C 38 29 29 2C 46 24 00  |,.(.(FD$,8)),F$.|
00001300: 27 1B 6D 0E 8B CA 28 46  44 24 2C 38 2C 31 29 B2  |'.m...(FD$,8,1).|
00001310: 22 20 22 A7 3A 40 4D 2C  43 30 24 2C 46 44 24 2C  |" ".:@M,C0$,FD$,|
00001320: 38 3A 89 33 36 39 32 00  31 1B 73 0E 89 33 37 35  |8:.3692.1.s..375|
00001330: 30 00 46 1B 74 0E 46 24  B2 44 50 24 28 53 42 29  |0.F.t.F$.DP$(SB)|
00001340: 3A 89 33 37 35 30 00 6F  1B 7E 0E 9E 42 42 AA 35  |:.3750.o.~..BB.5|
00001350: 31 2C 52 28 53 42 29 2C  4C 4E 2C C6 28 CA 28 46  |1,R(SB),LN,.(.(F|
00001360: 44 24 2C 38 29 29 2C 46  24 3A 89 33 37 35 30 00  |D$,8)),F$:.3750.|
00001370: 90 1B 88 0E 8B CA 28 46  44 24 2C 39 2C 31 29 B2  |......(FD$,9,1).|
00001380: 22 4E 22 A7 46 24 B2 22  20 22 3A 89 33 37 35 30  |"N".F$." ":.3750|
00001390: 00 B9 1B 92 0E 9E 42 42  AA 35 31 2C 41 43 28 4A  |......BB.51,AC(J|
000013A0: 29 2C 4C 4E 2C C6 28 CA  28 46 44 24 2C 38 29 29  |),LN,.(.(FD$,8))|
000013B0: 2C 46 24 3A 89 33 37 35  30 00 D8 1B 9C 0E 46 24  |,F$:.3750.....F$|
000013C0: B2 54 31 24 3A 8B 46 24  B2 22 22 A7 46 24 B2 C8  |.T1$:.F$."".F$..|
000013D0: 28 42 4C 24 2C 4C 4E 29  00 E2 1B A1 0E 89 33 37  |(BL$,LN)......37|
000013E0: 36 30 00 F2 1B A6 0E 46  24 B2 C8 28 46 24 2C 4C  |60.....F$..(F$,L|
000013F0: 4E 29 00 14 1C B0 0E 8B  43 4E B2 38 39 AF 54 24  |N)......CN.89.T$|
00001400: B2 22 54 22 A7 9E 42 41  AA 32 37 2C 46 24 3A 89  |."T"..BA.27,F$:.|
00001410: 33 37 36 36 00 25 1C B3  0E 8B 54 24 B2 22 54 22  |3766.%....T$."T"|
00001420: A7 33 37 36 36 00 5C 1C  B5 0E 8B 43 4E B2 38 39  |.3766.\....CN.89|
00001430: A7 9E 42 41 AA 32 37 2C  46 24 3A 41 B2 28 4C 4E  |..BA.27,F$:A.(LN|
00001440: AB C3 28 46 24 29 29 AD  32 3A 43 4D B2 43 4D AA  |..(F$)).2:CM.CM.|
00001450: B4 28 41 29 AC B5 28 B6  28 41 29 29 00 77 1C B6  |.(A)..(.(A)).w..|
00001460: 0E 8B 54 24 B3 B1 22 54  22 B0 52 44 24 B3 B1 22  |..T$.."T".RD$.."|
00001470: 44 22 A7 33 37 38 30 00  91 1C BA 0E 98 35 2C 46  |D".3780......5,F|
00001480: 24 3A 99 22 12 22 46 24  3A 82 4A 3A 89 33 38 32  |$:."."F$:.J:.382|
00001490: 30 00 B1 1C C4 0E 8B 43  4D B3 31 A7 46 24 B2 CA  |0......CM.1.F$..|
000014A0: 28 46 24 2C B6 28 43 4D  29 AA 32 29 3A 43 4D B2  |(F$,.(CM).2):CM.|
000014B0: 31 00 CB 1C C9 0E 8B 43  4D B3 B2 50 57 A7 3A 40  |1......CM..PW.:@|
000014C0: 4D 2C 46 24 2C 43 4C 24  2C 43 4D 00 D2 1C CE 0E  |M,F$,CL$,CM.....|
000014D0: 82 4A 00 F4 1C D8 0E 8B  52 44 24 B2 22 50 22 AF  |.J......RD$."P".|
000014E0: C6 28 44 46 24 AA 43 30  24 29 B1 30 A7 98 35 2C  |.(DF$.C0$).0..5,|
000014F0: 44 46 24 3B 00 0D 1D DD  0E 8B 52 44 24 B3 B1 22  |DF$;......RD$.."|
00001500: 53 22 A7 9E 42 41 AA 32  37 2C 43 4C 24 00 20 1D  |S"..BA.27,CL$. .|
00001510: E2 0E 98 35 2C 43 4C 24  3A 43 4C B2 43 4C AA 31  |...5,CL$:CL.CL.1|
00001520: 00 29 1D EC 0E 82 49 3A  8E 00 32 1D F6 0E 46 30  |.)....I:..2...F0|
00001530: B2 30 00 40 1D F9 0E 4E  41 B2 30 3A 4E 42 B2 30  |.0.@...NA.0:NB.0|
00001540: 00 77 1D 00 0F 9E 38 32  38 2C 31 2C 41 46 25 28  |.w....828,1,AF%(|
00001550: 30 29 3A 9E 38 32 38 2C  31 2C 41 43 28 30 29 3A  |0):.828,1,AC(0):|
00001560: 86 41 46 25 28 4E 41 28  32 29 29 2C 41 43 28 4E  |.AF%(NA(2)),AC(N|
00001570: 41 28 32 29 AB 31 29 00  8D 1D 0A 0F 54 32 B2 30  |A(2).1).....T2.0|
00001580: 3A 81 49 B2 30 A4 4E 41  28 32 29 AB 31 00 B0 1D  |:.I.0.NA(2).1...|
00001590: 0F 0F 8B 4C 54 24 28 49  29 B3 B1 22 22 AF C6 28  |...LT$(I)..""..(|
000015A0: 4C 44 24 28 49 29 29 B3  B1 38 34 A7 54 32 B2 31  |LD$(I))..84.T2.1|
000015B0: 00 D9 1D 14 0F 8B C6 28  CA 28 4C 44 24 28 49 29  |.......(.(LD$(I)|
000015C0: 2C 39 29 29 B2 38 39 A7  41 46 25 28 4E 41 29 B2  |,9)).89.AF%(NA).|
000015D0: 49 3A 4E 41 B2 4E 41 AA  31 00 FE 1D 1E 0F 8B C6  |I:NA.NA.1.......|
000015E0: 28 C9 28 4C 44 24 28 49  29 2C 31 29 29 B3 B1 37  |(.(LD$(I),1))..7|
000015F0: 38 A7 46 30 B2 31 3A 4E  42 B2 4E 42 AA 31 00 1C  |8.F0.1:NB.NB.1..|
00001600: 1E 28 0F 82 3A 9E 38 32  38 2C 32 2C 41 28 30 2C  |.(..:.828,2,A(0,|
00001610: 30 29 3A 86 41 28 4E 41  2C 4E 4B 29 00 3B 1E 32  |0):.A(NA,NK).;.2|
00001620: 0F 8B 42 54 24 B3 B1 22  53 22 B0 4E 4B B2 30 A7  |..BT$.."S".NK.0.|
00001630: 4E 42 B2 30 3A 46 30 B2  30 3A 8E 00 4A 1E 3C 0F  |NB.0:F0.0:..J.<.|
00001640: 8D 34 32 32 30 3A 49 52  B2 30 00 86 1E 46 0F 8B  |.4220:IR.0...F..|
00001650: 4E 42 A7 81 49 B2 31 A4  4E 4B 3A 42 46 24 28 49  |NB..I.1.NK:BF$(I|
00001660: 29 B2 C8 28 52 45 24 28  42 46 28 49 2C 30 29 29  |)..(RE$(BF(I,0))|
00001670: 2C C6 28 CA 28 4C 44 24  28 42 46 28 49 2C 31 29  |,.(.(LD$(BF(I,1)|
00001680: 29 2C 34 29 29 29 00 90  1E 4B 0F 8B 4E 42 A7 82  |),4)))...K..NB..|
00001690: 00 96 1E 50 0F 8E 00 A2  1E 5A 0F 8B 46 30 B2 30  |...P.....Z..F0.0|
000016A0: A7 8E 00 AF 1E 6E 0F 81  42 46 B2 31 A4 4E 4B 00  |.....n..BF.1.NK.|
000016B0: E9 1E 78 0F 8B 42 46 24  28 42 46 29 B3 B1 C8 28  |..x..BF$(BF)...(|
000016C0: 52 45 24 28 42 46 28 42  46 2C 30 29 29 2C C6 28  |RE$(BF(BF,0)),.(|
000016D0: CA 28 4C 44 24 28 42 46  28 42 46 2C 31 29 29 2C  |.(LD$(BF(BF,1)),|
000016E0: 34 29 29 29 A7 33 39 37  35 00 F1 1E 82 0F 82 3A  |4))).3975......:|
000016F0: 8E 00 0B 1F 87 0F 52 31  B2 31 3A 40 45 2C 52 45  |......R1.1:@E,RE|
00001700: 24 28 30 29 2C 54 45 24  28 30 29 00 1B 1F A0 0F  |$(0),TE$(0).....|
00001710: 81 51 B2 4E 4B A4 42 46  A9 AB 31 00 31 1F A2 0F  |.Q.NK.BF..1.1...|
00001720: 8B 51 B2 30 A7 5A 24 B2  22 50 22 3A 89 34 30 30  |.Q.0.Z$."P":.400|
00001730: 36 00 57 1F A5 0F 5A 24  B2 C9 28 4C 44 24 28 42  |6.W...Z$..(LD$(B|
00001740: 46 28 51 2C 31 29 29 2C  31 29 3A 8B 5A 24 B2 22  |F(Q,1)),1):.Z$."|
00001750: 4E 22 A7 34 30 34 35 00  7C 1F A6 0F 8B 43 4C AA  |N".4045.|....CL.|
00001760: 4E 4C 28 32 29 AA 34 B3  B2 4C 50 AB 53 4C 28 33  |NL(2).4..LP.SL(3|
00001770: 29 AB 4E 4C 28 33 29 A7  34 30 31 30 00 A9 1F A7  |).NL(3).4010....|
00001780: 0F 8D 33 34 33 30 3A 8D  33 34 37 30 3A 8D 33 32  |..3430:.3470:.32|
00001790: 38 30 3A 52 31 B2 31 3A  45 4C B2 4C 50 AB 53 4C  |80:R1.1:EL.LP.SL|
000017A0: 28 33 29 AB 4E 4C 28 33  29 00 D4 1F AA 0F 8B 46  |(3).NL(3)......F|
000017B0: 37 B2 30 AF 4E 41 B1 30  A7 98 35 3A 98 35 2C 22  |7.0.NA.0..5:.5,"|
000017C0: 54 4F 54 41 4C 20 46 4F  52 20 22 3B 3A 43 4C B2  |TOTAL FOR ";:CL.|
000017D0: 43 4C AA 31 00 EE 1F AB  0F 8B 4E 41 A7 98 35 2C  |CL.1......NA..5,|
000017E0: 42 46 24 28 51 29 3A 43  4C B2 43 4C AA 31 00 06  |BF$(Q):CL.CL.1..|
000017F0: 20 B4 0F 81 49 B2 30 A4  4E 41 AB 31 3A 41 46 B2  | ...I.0.NA.1:AF.|
00001800: 41 46 25 28 49 29 00 18  20 BE 0F 41 43 28 41 46  |AF%(I).. ..AC(AF|
00001810: 29 B2 41 28 49 2C 51 29  00 47 20 C8 0F 41 28 49  |).A(I,Q).G ..A(I|
00001820: 2C 51 29 B2 30 3A 82 3A  4C 49 B2 32 3A 41 43 B2  |,Q).0:.:LI.2:AC.|
00001830: 31 3A 8D 33 35 35 30 3A  41 43 B2 30 3A 91 46 37  |1:.3550:AC.0:.F7|
00001840: AA 31 8D 33 34 36 36 00  62 20 CA 0F 8B 5A 24 B3  |.1.3466.b ...Z$.|
00001850: B1 22 50 22 B0 46 32 AA  46 33 B3 B1 30 A7 34 30  |."P".F2.F3..0.40|
00001860: 34 35 00 93 20 CC 0F 41  43 B2 30 3A 8D 34 30 39  |45.. ..AC.0:.409|
00001870: 30 3A 41 43 B2 31 3A 4C  49 B2 32 3A 8B 42 46 B2  |0:AC.1:LI.2:.BF.|
00001880: 51 A7 3A 40 45 2C 52 45  24 28 30 29 2C 54 45 24  |Q.:@E,RE$(0),TE$|
00001890: 28 30 29 00 99 20 CD 0F  82 00 BB 20 D2 0F 40 45  |(0).. ..... ..@E|
000018A0: 2C 52 45 24 28 30 29 2C  54 45 24 28 30 29 3A 8D  |,RE$(0),TE$(0):.|
000018B0: 33 39 31 30 3A 41 43 B2  30 3A 8E 00 E3 20 FA 0F  |3910:AC.0:... ..|
000018C0: 8D 33 34 33 30 3A 8D 33  34 37 30 3A 8B 51 B2 42  |.3430:.3470:.Q.B|
000018D0: 46 A7 3A 40 45 2C 52 45  24 28 30 29 2C 54 45 24  |F.:@E,RE$(0),TE$|
000018E0: 28 30 29 00 01 21 FF 0F  8D 33 32 38 30 3A 45 4C  |(0)..!...3280:EL|
000018F0: B2 4C 50 AB 53 4C 28 33  29 AB 4E 4C 28 33 29 3A  |.LP.SL(3).NL(3):|
00001900: 8E 00 0D 21 04 10 8B 4E  41 B2 30 A7 8E 00 1B 21  |...!...NA.0....!|
00001910: 09 10 81 4A B2 30 A4 4E  41 AB 31 00 4B 21 0E 10  |...J.0.NA.1.K!..|
00001920: 54 59 24 B2 C8 28 4C 44  24 28 41 46 25 28 4A 29  |TY$..(LD$(AF%(J)|
00001930: 29 2C 31 29 3A 54 31 B2  C6 28 CA 28 4C 44 24 28  |),1):T1..(.(LD$(|
00001940: 41 46 25 28 4A 29 29 2C  32 29 29 00 61 21 18 10  |AF%(J)),2)).a!..|
00001950: 8B 54 59 24 B2 22 52 22  A7 54 31 B2 52 28 54 31  |.TY$."R".T1.R(T1|
00001960: 29 00 7C 21 22 10 8B 54  59 24 B2 22 46 22 A7 54  |).|!"..TY$."F".T|
00001970: 31 B2 C5 28 52 45 24 28  54 31 29 29 00 97 21 2C  |1..(RE$(T1))..!,|
00001980: 10 8B 54 59 24 B2 22 44  22 A7 54 31 B2 C5 28 44  |..TY$."D".T1..(D|
00001990: 50 24 28 54 31 29 29 00  A3 21 36 10 81 49 B2 30  |P$(T1))..!6..I.0|
000019A0: A4 4E 4B 00 B8 21 40 10  41 28 4A 2C 49 29 B2 41  |.NK..!@.A(J,I).A|
000019B0: 28 4A 2C 49 29 AA 54 31  00 C2 21 4A 10 82 3A 82  |(J,I).T1..!J..:.|
000019C0: 3A 8E 00 D1 21 54 10 41  46 B2 41 46 25 28 43 42  |:...!T.AF.AF%(CB|
000019D0: 29 00 0E 22 5E 10 4C 4E  B2 C6 28 CA 28 4C 44 24  |).."^.LN..(.(LD$|
000019E0: 28 41 46 29 2C 34 29 29  3A 44 43 B2 C6 28 CA 28  |(AF),4)):DC..(.(|
000019F0: 4C 44 24 28 41 46 29 2C  38 29 29 3A 53 42 B2 C6  |LD$(AF),8)):SB..|
00001A00: 28 CA 28 4C 44 24 28 41  46 29 2C 32 29 29 00 2A  |(.(LD$(AF),2)).*|
00001A10: 22 68 10 9E 42 42 AA 35  31 2C 41 28 43 42 2C 51  |"h..BB.51,A(CB,Q|
00001A20: 29 2C 4C 4E 2C 44 43 2C  46 24 00 50 22 72 10 41  |),LN,DC,F$.P"r.A|
00001A30: 28 43 42 2C 51 29 B2 30  3A 43 42 B2 43 42 AA 31  |(CB,Q).0:CB.CB.1|
00001A40: 3A 8B 41 46 25 28 43 42  29 B2 30 A7 43 42 B2 30  |:.AF%(CB).0.CB.0|
00001A50: 00 56 22 77 10 8E 00 7A  22 7C 10 40 45 2C 52 45  |.V"w...z"|.@E,RE|
00001A60: 24 28 30 29 2C 54 45 24  28 30 29 3A 8B 46 39 A7  |$(0),TE$(0):.F9.|
00001A70: 3A 40 42 2C 44 50 24 28  30 29 00 AF 22 81 10 A1  |:@B,DP$(0).."...|
00001A80: 41 24 3A 8B 41 24 B3 B1  22 22 AF 41 24 B3 B1 22  |A$:.A$.."".A$.."|
00001A90: 10 22 A7 4B 59 24 B2 41  24 3A 8D 32 32 30 30 3A  |.".KY$.A$:.2200:|
00001AA0: 8B 4B 59 24 B2 22 93 22  A7 46 33 B2 31 3A 8E 00  |.KY$.".".F3.1:..|
00001AB0: C1 22 86 10 8B 42 54 24  B2 22 46 22 A7 34 32 36  |."...BT$."F".426|
00001AC0: 30 00 E9 22 90 10 9E 42  AA 31 38 2C 49 52 3A 49  |0.."...B.18,IR:I|
00001AD0: 52 B2 49 52 AA 31 3A 8B  52 4E B3 30 B0 52 4E B1  |R.IR.1:.RN.0.RN.|
00001AE0: 4E 52 A7 46 33 B2 31 3A  8E 00 F3 22 9A 10 89 34  |NR.F3.1:..."...4|
00001AF0: 32 37 35 00 05 23 A4 10  8B 52 4E B2 4E 52 A7 46  |275..#...RN.NR.F|
00001B00: 33 B2 31 3A 8E 00 1D 23  AE 10 9E 42 3A 8B C2 28  |3.1:...#...B:..(|
00001B10: 32 29 B2 31 32 38 A7 46  33 B2 31 3A 8E 00 27 23  |2).128.F3.1:..'#|
00001B20: B2 10 89 34 32 38 30 00  3D 23 B3 10 9E 42 AA 36  |...4280.=#...B.6|
00001B30: 3A 8B C2 28 32 29 B2 31  A7 34 32 38 30 00 47 23  |:..(2).1.4280.G#|
00001B40: B4 10 89 34 32 34 30 00  70 23 B8 10 40 52 2C 52  |...4240.p#..@R,R|
00001B50: 4E 2C 52 45 24 28 30 29  3A 52 4E B2 52 4E AA 31  |N,RE$(0):RN.RN.1|
00001B60: 3A 52 28 31 30 30 29 B2  52 4E 3A 9E 42 42 3A 8E  |:R(100).RN:.BB:.|
00001B70: 00 7C 23 D6 10 8B 4E 41  B2 30 A7 8E 00 94 23 DB  |.|#...NA.0....#.|
00001B80: 10 42 46 B2 30 3A 8B 42  54 24 B3 B1 22 53 22 A7  |.BF.0:.BT$.."S".|
00001B90: 4E 4B B2 30 00 9E 23 DC  10 89 33 39 37 35 00 CF  |NK.0..#...3975..|
00001BA0: 23 E0 10 8B 42 54 24 B2  22 53 22 A7 46 33 B2 31  |#...BT$."S".F3.1|
00001BB0: 3A 4C 49 B2 32 3A 45 4C  B2 4C 50 AB 53 4C 28 33  |:LI.2:EL.LP.SL(3|
00001BC0: 29 AB 4E 4C 28 33 29 3A  8D 33 39 34 30 3A 8E 00  |).NL(3):.3940:..|
00001BD0: E9 23 EA 10 90 3A 20 20  20 20 20 20 20 20 8B 4C  |.#...:        .L|
00001BE0: 49 B2 32 A7 8D 33 39 38  30 00 FA 23 F4 10 8B 4C  |I.2..3980..#...L|
00001BF0: 49 B3 B1 32 A7 8D 34 30  30 30 00 00 24 FE 10 8E  |I..2..4000..$...|
00001C00: 00 0A 24 07 11 8D 33 34  37 30 00 1B 24 08 11 A0  |..$...3470..$...|
00001C10: 35 3A A0 31 3A A0 38 3A  A0 31 35 00 41 24 09 11  |5:.1:.8:.15.A$..|
00001C20: 99 22 93 22 3B 3A 8D 34  30 30 3A 99 3A 99 2C 22  |.".";:.400:.:.,"|
00001C30: 11 52 45 50 4F 52 54 20  43 4F 4D 50 4C 45 54 45  |.REPORT COMPLETE|
00001C40: 11 00 79 24 0A 11 99 22  52 55 4E 20 41 4E 4F 54  |..y$..."RUN ANOT|
00001C50: 48 45 52 20 52 45 50 4F  52 54 20 59 2F 4E 3F 20  |HER REPORT Y/N? |
00001C60: 22 3B 3A 4C B2 31 3A 54  59 B2 30 3A 41 43 24 B2  |";:L.1:TY.0:AC$.|
00001C70: 22 59 4E 22 3A 8D 35 35  30 00 9D 24 0B 11 52 4E  |"YN":.550..$..RN|
00001C80: B2 30 3A 43 53 24 B2 22  22 3A 4E 42 B2 30 3A 46  |.0:CS$."":NB.0:F|
00001C90: 31 B2 30 3A 40 42 2C 42  46 24 28 30 29 00 B4 24  |1.0:@B,BF$(0)..$|
00001CA0: 0C 11 8B 41 24 B2 22 59  22 A7 8D 31 30 30 3A 89  |...A$."Y"..100:.|
00001CB0: 34 35 38 30 00 E8 24 0D  11 97 32 2C 30 3A 40 58  |4580..$...2,0:@X|
00001CC0: 2C 22 36 34 2E 43 52 45  41 54 45 45 44 49 54 22  |,"64.CREATEEDIT"|
00001CD0: 3A A0 31 35 3A 9F 31 35  2C 38 2C 31 35 3A 8D 39  |:.15:.15,8,15:.9|
00001CE0: 34 35 3A 89 34 33 36 35  00 09 25 12 11 99 22 98  |45:.4365..%...".|
00001CF0: 22 3B 3A 40 50 2C 59 2C  58 2C 51 24 3A 99 22 20  |";:@P,Y,X,Q$:." |
00001D00: 22 3B 3A 8B 49 B2 33 A7  99 00 17 25 1C 11 99 50  |";:.I.3....%...P|
00001D10: 24 22 20 22 3B 3A 8E 00  21 25 26 11 59 B2 59 AA  |$" ";:..!%&.Y.Y.|
00001D20: 32 00 29 25 30 11 58 B2  30 00 5E 25 3A 11 99 22  |2.)%0.X.0.^%:.."|
00001D30: 9E 22 3B 3A 40 50 2C 59  2C 58 2C 51 24 3A 58 31  |.";:@P,Y,X,Q$:X1|
00001D40: B2 C2 28 32 31 31 29 AA  31 3A 8B C6 28 50 24 AA  |..(211).1:..(P$.|
00001D50: 22 41 22 29 B3 B1 33 32  A7 99 22 20 22 3B 00 93  |"A")..32.." ";..|
00001D60: 25 44 11 99 22 05 22 3B  3A 8B 49 B2 33 A7 99 3A  |%D..".";:.I.3..:|
00001D70: 99 50 24 22 20 22 3A 40  47 2C 59 AA 31 2C 30 2C  |.P$" ":@G,Y.1,0,|
00001D80: 4C 4E 2C 54 59 2C 41 24  3A 41 B2 4B 59 3A 89 34  |LN,TY,A$:A.KY:.4|
00001D90: 34 35 30 00 9C 25 4E 11  99 50 24 3B 00 B6 25 58  |450..%N..P$;..%X|
00001DA0: 11 40 47 2C 59 2C 58 31  2C 4C 4E 2C 54 59 2C 41  |.@G,Y,X1,LN,TY,A|
00001DB0: 24 3A 41 B2 4B 59 00 D0  25 62 11 8D 32 32 30 30  |$:A.KY..%b..2200|
00001DC0: 3A 8B 52 46 A7 50 24 B2  41 24 3A 89 34 34 31 30  |:.RF.P$.A$:.4410|
00001DD0: 00 E8 25 6C 11 8B C2 28  35 32 29 AB C2 28 35 30  |..%l...(52)..(50|
00001DE0: 29 B3 32 A7 8D 36 35 30  00 FE 25 80 11 8B 4C 4E  |).2..650..%...LN|
00001DF0: B3 B1 31 33 A7 9E 42 41  AA 32 37 2C 41 24 00 22  |..13..BA.27,A$."|
00001E00: 26 8A 11 8B 43 53 24 B1  22 22 A7 3A 40 48 2C 41  |&...CS$."".:@H,A|
00001E10: 24 2C 43 53 24 3A 8B C2  28 32 29 B2 30 A7 34 34  |$,CS$:..(2).0.44|
00001E20: 34 30 00 4F 26 94 11 8B  54 59 B2 31 AF 4D 58 B1  |40.O&...TY.1.MX.|
00001E30: 30 AF 28 C5 28 41 24 29  B1 4D 58 B0 C5 28 41 24  |0.(.(A$).MX..(A$|
00001E40: 29 B3 B2 30 29 AF 49 B3  B1 38 A7 34 34 34 30 00  |)..0).I..8.4440.|
00001E50: 62 26 9E 11 43 53 24 B2  22 22 3A 50 24 B2 22 22  |b&..CS$."":P$.""|
00001E60: 3A 8E 00 A0 26 A8 11 8D  31 30 30 3A 8D 36 35 34  |:...&...100:.654|
00001E70: 30 3A 99 22 93 22 3B 3A  54 54 24 B2 22 52 45 50  |0:.".";:TT$."REP|
00001E80: 4F 52 54 20 47 45 4E 45  52 41 54 45 22 3A 8D 34  |ORT GENERATE":.4|
00001E90: 30 30 3A 41 43 24 B2 22  44 4B 22 3A 54 59 B2 30  |00:AC$."DK":TY.0|
00001EA0: 00 AF 26 B2 11 9E 42 41  AA 34 35 2C 4E 46 24 00  |..&...BA.45,NF$.|
00001EB0: DC 26 B7 11 8B C6 28 4E  46 24 29 B2 39 35 A7 52  |.&....(NF$).95.R|
00001EC0: 4E 24 B2 CA 28 4E 46 24  2C 32 29 3A 9E 42 41 AA  |N$..(NF$,2):.BA.|
00001ED0: 34 32 2C 52 4E 24 3A 89  36 38 34 30 00 17 27 BC  |42,RN$:.6840..'.|
00001EE0: 11 99 3A 99 22 11 52 45  50 4F 52 54 20 46 52 4F  |..:.".REPORT FRO|
00001EF0: 4D 20 12 4B 92 45 59 42  4F 41 52 44 20 4F 52 20  |M .K.EYBOARD OR |
00001F00: 12 44 92 49 53 4B 46 49  4C 45 3F 20 22 3B 3A 4C  |.D.ISKFILE? ";:L|
00001F10: B2 31 3A 8D 35 35 30 00  30 27 C6 11 52 46 24 B2  |.1:.550.0'..RF$.|
00001F20: 41 24 3A 8B 52 46 24 B2  22 4B 22 A7 34 35 39 30  |A$:.RF$."K".4590|
00001F30: 00 6F 27 D0 11 4E 46 24  B2 22 22 3A 99 3A 99 22  |.o'..NF$."":.:."|
00001F40: 11 45 4E 54 45 52 20 52  45 50 4F 52 54 20 46 49  |.ENTER REPORT FI|
00001F50: 4C 45 20 4E 41 4D 45 3F  20 22 3B 3A 46 54 24 B2  |LE NAME? ";:FT$.|
00001F60: 22 52 46 2E 22 3A 46 36  B2 31 3A 8D 33 30 37 00  |"RF.":F6.1:.307.|
00001F70: 97 27 DA 11 41 24 B2 46  54 24 AA 4E 46 24 3A 52  |.'..A$.FT$.NF$:R|
00001F80: 4E 24 B2 4E 46 24 3A 8D  35 39 30 30 3A 9E 42 41  |N$.NF$:.5900:.BA|
00001F90: AA 34 32 2C 4E 46 24 00  D7 27 E4 11 99 3A 99 22  |.42,NF$..'...:."|
00001FA0: 11 44 4F 20 59 4F 55 20  57 49 53 48 20 54 4F 20  |.DO YOU WISH TO |
00001FB0: 4D 4F 44 49 46 59 20 54  48 45 20 52 45 50 4F 52  |MODIFY THE REPOR|
00001FC0: 54 3F 20 22 3B 3A 41 43  24 B2 22 59 4E 22 3A 4C  |T? ";:AC$."YN":L|
00001FD0: B2 31 3A 8D 35 35 30 00  E8 27 E9 11 8B 41 24 B2  |.1:.550..'...A$.|
00001FE0: 22 4E 22 A7 33 30 32 30  00 FD 27 EE 11 8B 46 33  |"N".3020..'...F3|
00001FF0: B2 30 A7 8D 33 30 35 3A  8D 36 32 38 30 00 06 28  |.0..305:.6280..(|
00002000: F3 11 46 33 B2 30 00 20  28 F8 11 54 53 24 B2 22  |..F3.0. (..TS$."|
00002010: 53 45 4C 45 43 54 49 4F  4E 22 3A 8D 32 35 30 30  |SELECTION":.2500|
00002020: 00 36 28 FD 11 8B C3 28  53 53 24 29 B2 30 A7 53  |.6(....(SS$).0.S|
00002030: 53 24 B2 46 46 24 00 68  28 02 12 51 24 B2 22 45  |S$.FF$.h(..Q$."E|
00002040: 4E 54 45 52 20 53 45 41  52 43 48 20 43 52 49 54  |NTER SEARCH CRIT|
00002050: 45 52 49 41 22 3A 50 24  B2 C8 28 53 53 24 2C C3  |ERIA":P$..(SS$,.|
00002060: 28 53 53 24 29 AB 31 29  00 7E 28 05 12 58 B2 C2  |(SS$).1).~(..X..|
00002070: 28 32 31 34 29 3A 59 B2  C2 28 32 31 31 29 00 C1  |(214):Y..(211)..|
00002080: 28 06 12 40 50 2C 32 34  2C 30 2C 22 50 52 45 53  |(..@P,24,0,"PRES|
00002090: 53 20 52 45 54 55 52 4E  20 49 46 20 4E 4F 4E 45  |S RETURN IF NONE|
000020A0: 20 41 52 45 20 52 45 51  55 49 52 45 44 22 3A 8D  | ARE REQUIRED":.|
000020B0: 32 30 30 3A 97 32 31 34  2C 58 3A 97 32 31 31 2C  |200:.214,X:.211,|
000020C0: 59 00 FB 28 07 12 43 53  24 B2 22 22 3A 4C 4E B2  |Y..(..CS$."":LN.|
000020D0: 34 30 3A 54 59 B2 30 3A  59 B2 34 3A 49 B2 33 3A  |40:TY.0:Y.4:I.3:|
000020E0: 8D 34 33 39 30 3A 49 B2  30 3A 58 B2 C2 28 32 31  |.4390:I.0:X..(21|
000020F0: 34 29 3A 59 B2 C2 28 32  31 31 29 00 1D 29 08 12  |4):Y..(211)..)..|
00002100: 40 50 2C 32 34 2C 30 2C  22 22 3A 8D 32 30 30 3A  |@P,24,0,"":.200:|
00002110: 97 32 31 34 2C 58 3A 97  32 31 31 2C 59 00 2F 29  |.214,X:.211,Y./)|
00002120: 0C 12 8B 41 24 B2 22 22  A7 41 24 B2 46 46 24 00  |...A$."".A$.FF$.|
00002130: 4D 29 16 12 53 53 24 B2  41 24 3A 8B C9 28 53 53  |M)..SS$.A$:..(SS|
00002140: 24 2C 31 29 B2 46 46 24  A7 34 36 36 30 00 76 29  |$,1).FF$.4660.v)|
00002150: 20 12 8B C6 28 C9 28 53  53 24 2C 31 29 29 B2 32  | ...(.(SS$,1)).2|
00002160: 32 32 A7 53 53 24 B2 C8  28 53 53 24 2C C3 28 53  |22.SS$..(SS$,.(S|
00002170: 53 24 29 AB 31 29 00 86  29 2A 12 53 53 24 B2 53  |S$).1)..)*.SS$.S|
00002180: 53 24 AA 46 46 24 00 CB  29 34 12 51 24 B2 22 49  |S$.FF$..)4.Q$."I|
00002190: 4E 20 4F 52 44 45 52 20  42 59 20 12 49 92 4E 44  |N ORDER BY .I.ND|
000021A0: 45 58 2C 20 12 53 92 4F  52 54 A0 4F 52 20 12 46  |EX, .S.ORT.OR .F|
000021B0: 92 49 4C 45 3F 22 3A 54  59 B2 30 3A 50 24 B2 42  |.ILE?":TY.0:P$.B|
000021C0: 54 24 3A 43 53 24 B2 22  49 53 46 00 FB 29 3E 12  |T$:CS$."ISF..)>.|
000021D0: 4C 4E B2 31 3A 59 B2 31  34 3A 8D 34 34 30 30 3A  |LN.1:Y.14:.4400:|
000021E0: 42 54 24 B2 41 24 3A 4D  58 B2 31 35 3A 8B 42 54  |BT$.A$:MX.15:.BT|
000021F0: 24 B3 B1 22 53 22 A7 34  38 33 30 00 1B 2A 43 12  |$.."S".4830..*C.|
00002200: 54 53 24 B2 22 53 4F 52  54 20 43 4F 4E 44 49 54  |TS$."SORT CONDIT|
00002210: 49 4F 4E 53 22 3A 8D 32  35 30 30 00 56 2A 48 12  |IONS":.2500.V*H.|
00002220: 51 24 B2 22 45 4E 54 45  52 20 4E 55 4D 42 45 52  |Q$."ENTER NUMBER|
00002230: 20 4F 46 20 53 4F 52 54  20 4B 45 59 53 3F 22 3A  | OF SORT KEYS?":|
00002240: 50 24 B2 C4 28 4E 4B 29  3A 4C 4E B2 32 3A 59 B2  |P$..(NK):LN.2:Y.|
00002250: 35 3A 54 59 B2 31 00 74  2A 52 12 8D 34 34 30 30  |5:TY.1.t*R..4400|
00002260: 3A 4E 4B B2 C5 28 41 24  29 3A 8B 4E 4B B2 30 A7  |:NK..(A$):.NK.0.|
00002270: 34 36 39 30 00 86 2A 57  12 8B 4B 59 24 B2 22 88  |4690..*W..KY$.".|
00002280: 22 A7 34 38 33 30 00 C7  2A 5C 12 99 3A 99 22 11  |".4830..*\..:.".|
00002290: 46 49 45 4C 44 20 20 20  4C 45 4E 20 20 20 12 41  |FIELD   LEN   .A|
000022A0: 92 4C 50 48 41 2F 4E 55  4D 20 20 20 20 20 20 12  |.LPHA/NUM      .|
000022B0: 41 92 53 43 44 2F 12 44  92 45 53 44 22 3A 81 4A  |A.SCD/.D.ESD":.J|
000022C0: B2 30 A4 4E 4B AB 31 00  01 2B 66 12 43 B2 30 3A  |.0.NK.1..+f.C.0:|
000022D0: 59 B2 4A AA 38 3A 54 59  B2 31 3A 4C 4E B2 33 3A  |Y.J.8:TY.1:LN.3:|
000022E0: 51 24 B2 22 22 3A 8B C3  28 53 4B 24 28 4A 29 29  |Q$."":..(SK$(J))|
000022F0: B2 30 A7 53 4B 24 28 4A  29 B2 43 30 24 AA 43 30  |.0.SK$(J).C0$.C0|
00002300: 24 00 29 2B 70 12 50 24  B2 C4 28 C6 28 53 4B 24  |$.)+p.P$..(.(SK$|
00002310: 28 4A 29 29 AA 31 29 3A  54 4D B2 C6 28 CA 28 53  |(J)).1):TM..(.(S|
00002320: 4B 24 28 4A 29 2C 32 29  29 00 48 2B 7A 12 50 33  |K$(J),2)).H+z.P3|
00002330: 24 B2 22 41 22 3A 8B 28  54 4D B0 36 34 29 B2 54  |$."A":.(TM.64).T|
00002340: 4D A7 50 33 24 B2 22 44  00 75 2B 84 12 50 31 24  |M.P3$."D.u+..P1$|
00002350: B2 C4 28 54 4D AF 36 33  29 3A 50 32 24 B2 22 41  |..(TM.63):P2$."A|
00002360: 22 3A 8B 28 54 4D B0 31  32 38 29 B2 54 4D A7 50  |":.(TM.128).TM.P|
00002370: 32 24 B2 22 4E 00 B1 2B  8E 12 4D 58 B2 4E 46 3A  |2$."N..+..MX.NF:|
00002380: 8D 34 34 30 30 3A 54 4D  B2 C5 28 41 24 29 AB 31  |.4400:TM..(A$).1|
00002390: 3A 8B C6 28 53 4B 24 28  4A 29 29 B2 54 4D A7 53  |:..(SK$(J)).TM.S|
000023A0: 4B 24 28 4A 29 B2 C7 28  54 4D 29 3A 89 34 37 36  |K$(J)..(TM):.476|
000023B0: 30 00 D9 2B 93 12 53 4B  24 28 4A 29 B2 C7 28 54  |0..+..SK$(J)..(T|
000023C0: 4D 29 3A 50 31 24 B2 C4  28 C6 28 CA 28 46 41 24  |M):P1$..(.(.(FA$|
000023D0: 28 54 4D 29 2C 34 29 29  29 00 09 2C 98 12 4D 58  |(TM),4)))..,..MX|
000023E0: B2 C6 28 CA 28 46 41 24  28 54 4D 29 2C 34 29 29  |..(.(FA$(TM),4))|
000023F0: 3A 50 24 B2 50 31 24 3A  8B C5 28 50 24 29 B2 30  |:P$.P1$:..(P$).0|
00002400: A7 50 24 B2 C4 28 4D 58  29 00 26 2C A2 12 58 B2  |.P$..(MX).&,..X.|
00002410: 38 3A 4C 4E B2 32 3A 8D  34 34 31 30 3A 43 B2 43  |8:LN.2:.4410:C.C|
00002420: AA C5 28 41 24 29 00 61  2C AC 12 50 24 B2 50 32  |..(A$).a,..P$.P2|
00002430: 24 3A 43 53 24 B2 22 41  4E 22 3A 8B 50 24 B2 22  |$:CS$."AN":.P$."|
00002440: 22 A7 50 24 B2 C7 28 36  35 AA 28 C6 28 CA 28 46  |".P$..(65.(.(.(F|
00002450: 41 24 28 54 4D 29 2C 35  29 29 AF 31 29 AC 31 33  |A$(TM),5)).1).13|
00002460: 29 00 8A 2C B6 12 58 B2  31 37 3A 4C 4E B2 31 3A  |)..,..X.17:LN.1:|
00002470: 54 59 B2 30 3A 8D 34 34  31 30 3A 8B 41 24 B2 22  |TY.0:.4410:.A$."|
00002480: 4E 22 A7 43 B2 43 B0 31  32 38 00 A2 2C BB 12 50  |N".C.C.128..,..P|
00002490: 24 B2 50 33 24 3A 8B 50  24 B2 22 22 A7 50 24 B2  |$.P3$:.P$."".P$.|
000024A0: 22 41 00 C9 2C C0 12 58  B2 33 33 3A 43 53 24 B2  |"A..,..X.33:CS$.|
000024B0: 22 41 44 22 3A 8D 34 34  31 30 3A 8B 41 24 B2 22  |"AD":.4410:.A$."|
000024C0: 44 22 A7 43 B2 43 B0 36  34 00 EC 2C CA 12 53 4B  |D".C.C.64..,..SK|
000024D0: 24 28 4A 29 B2 53 4B 24  28 4A 29 AA C7 28 43 29  |$(J).SK$(J)..(C)|
000024E0: 3A 8B 41 B3 B1 39 35 A7  34 37 31 30 00 06 2D D4  |:.A..95.4710..-.|
000024F0: 12 42 46 28 4A AA 31 2C  30 29 B2 C6 28 53 4B 24  |.BF(J.1,0)..(SK$|
00002500: 28 4A 29 29 3A 82 00 31  2D DE 12 54 53 24 B2 22  |(J)):..1-..TS$."|
00002510: 4F 55 54 50 55 54 20 43  4F 4E 44 49 54 49 4F 4E  |OUTPUT CONDITION|
00002520: 53 22 3A 8D 32 35 30 30  3A 59 B2 33 3A 54 59 B2  |S":.2500:Y.3:TY.|
00002530: 30 00 72 2D E8 12 51 24  B2 22 4F 55 54 50 55 54  |0.r-..Q$."OUTPUT|
00002540: 20 54 4F 20 12 53 92 43  52 45 45 4E 2C 20 12 50  | TO .S.CREEN, .P|
00002550: 92 52 49 4E 54 45 52 2C  20 12 44 92 49 53 4B 3F  |.RINTER, .D.ISK?|
00002560: 22 3A 43 53 24 B2 22 53  50 44 22 3A 50 24 B2 52  |":CS$."SPD":P$.R|
00002570: 44 24 00 91 2D F2 12 8D  34 33 39 30 3A 52 44 24  |D$..-...4390:RD$|
00002580: B2 41 24 3A 8B 52 44 24  B2 22 53 22 A7 34 39 38  |.A$:.RD$."S".498|
00002590: 30 00 B7 2D FC 12 50 24  B2 22 34 22 3A 4D 58 B2  |0..-..P$."4":MX.|
000025A0: 37 3A 8B 52 44 24 B2 22  44 22 A7 50 24 B2 22 38  |7:.RD$."D".P$."8|
000025B0: 22 3A 4D 58 B2 31 35 00  EE 2D 06 13 51 24 B2 22  |":MX.15..-..Q$."|
000025C0: 45 4E 54 45 52 20 44 45  56 49 43 45 20 4E 55 4D  |ENTER DEVICE NUM|
000025D0: 42 45 52 3F 22 3A 54 59  B2 31 3A 4C 4E B2 31 3A  |BER?":TY.1:LN.1:|
000025E0: 8D 34 33 39 30 3A 44 4E  B2 C5 28 41 24 29 00 01  |.4390:DN..(A$)..|
000025F0: 2E 10 13 8B 52 44 24 B3  B1 22 44 22 A7 34 39 34  |....RD$.."D".494|
00002600: 30 00 27 2E 1A 13 50 24  B2 54 24 3A 51 24 B2 22  |0.'...P$.T$:Q$."|
00002610: 45 4E 54 45 52 20 12 53  92 45 51 20 4F 52 20 12  |ENTER .S.EQ OR .|
00002620: 54 92 45 58 54 20 3F 00  61 2E 1F 13 43 53 24 B2  |T.EXT ?.a...CS$.|
00002630: 22 53 54 22 3A 50 24 B2  54 24 3A 54 59 B2 30 3A  |"ST":P$.T$:TY.0:|
00002640: 8D 34 33 39 30 3A 54 24  B2 41 24 3A 8B C3 28 44  |.4390:T$.A$:..(D|
00002650: 46 24 29 B1 33 A7 50 24  B2 CA 28 44 46 24 2C 34  |F$).3.P$..(DF$,4|
00002660: 29 00 A3 2E 24 13 51 24  B2 22 45 4E 54 45 52 20  |)...$.Q$."ENTER |
00002670: 44 49 53 4B 20 46 49 4C  45 20 4E 41 4D 45 3F 22  |DISK FILE NAME?"|
00002680: 3A 41 24 B2 22 22 3A 8D  34 35 30 3A 44 46 24 B2  |:A$."":.450:DF$.|
00002690: 22 53 42 2E 22 AA 41 24  3A 9E 42 41 AA 32 37 2C  |"SB.".A$:.BA.27,|
000026A0: 44 46 24 00 C7 2E 38 13  8B 54 24 B2 22 54 22 A7  |DF$...8..T$."T".|
000026B0: 51 24 28 37 29 B2 22 53  54 52 49 50 20 53 50 41  |Q$(7)."STRIP SPA|
000026C0: 43 45 53 20 59 2F 4E 00  D1 2E 42 13 89 34 39 38  |CES Y/N...B..498|
000026D0: 30 00 01 2F 4C 13 50 24  B2 22 30 22 3A 8B 52 44  |0../L.P$."0":.RD|
000026E0: 24 B2 22 50 22 AF 52 46  24 B2 22 4B 22 A7 50 57  |$."P".RF$."K".PW|
000026F0: B2 50 50 3A 4C 50 B2 50  4C 3A 53 4C 28 33 29 B2  |.PP:LP.PL:SL(3).|
00002700: 33 00 2F 2F 56 13 51 24  B2 22 45 4E 54 45 52 20  |3.//V.Q$."ENTER |
00002710: 50 52 49 4E 54 45 52 20  43 4F 4E 54 52 4F 4C 20  |PRINTER CONTROL |
00002720: 43 48 41 52 41 43 54 45  52 3F 22 3A 49 B2 38 00  |CHARACTER?":I.8.|
00002730: 5B 2F 5B 13 4D 58 B2 32  35 35 3A 54 59 B2 31 3A  |[/[.MX.255:TY.1:|
00002740: 4C 4E B2 33 3A 8D 34 33  39 30 3A 44 46 24 B2 C7  |LN.3:.4390:DF$..|
00002750: 28 C5 28 41 24 29 29 3A  49 B2 30 00 7A 2F 74 13  |(.(A$)):I.0.z/t.|
00002760: 8B 52 44 24 B2 22 44 22  AF 54 24 B2 22 54 22 A7  |.RD$."D".T$."T".|
00002770: 53 43 B2 31 3A 89 35 30  32 30 00 BF 2F 7E 13 4D  |SC.1:.5020../~.M|
00002780: 58 B2 32 35 35 3A 51 24  B2 22 45 4E 54 45 52 20  |X.255:Q$."ENTER |
00002790: 4C 49 4E 45 20 4C 45 4E  47 54 48 3F 22 3A 54 59  |LINE LENGTH?":TY|
000027A0: B2 31 3A 50 24 B2 C4 28  50 57 29 3A 4C 4E B2 33  |.1:P$..(PW):LN.3|
000027B0: 3A 8D 34 33 39 30 3A 50  57 B2 C5 28 41 24 29 00  |:.4390:PW..(A$).|
000027C0: FC 2F 92 13 51 24 B2 22  45 4E 54 45 52 20 4E 55  |./..Q$."ENTER NU|
000027D0: 4D 42 45 52 20 4F 46 20  4C 49 4E 45 53 20 50 45  |MBER OF LINES PE|
000027E0: 52 20 50 41 47 45 3F 22  3A 50 24 B2 C4 28 4C 50  |R PAGE?":P$..(LP|
000027F0: 29 3A 4C 4E B2 32 3A 8D  34 33 39 30 00 0E 30 97  |):LN.2:.4390..0.|
00002800: 13 4C 50 B2 C5 28 41 24  29 3A 53 43 B2 31 00 36  |.LP..(A$):SC.1.6|
00002810: 30 9C 13 99 22 05 22 3A  54 53 24 B2 22 44 45 46  |0...".":TS$."DEF|
00002820: 49 4E 45 20 50 52 49 4E  54 20 5A 4F 4E 45 53 22  |INE PRINT ZONES"|
00002830: 3A 8D 32 35 30 30 00 78  30 A1 13 49 B2 31 3A 40  |:.2500.x0..I.1:@|
00002840: 50 2C 32 34 2C 30 2C 22  98 50 52 45 53 53 20 05  |P,24,0,".PRESS .|
00002850: 53 50 41 43 45 98 20 53  45 4C 45 43 54 53 2F 05  |SPACE. SELECTS/.|
00002860: 52 45 54 55 52 4E 98 20  45 58 45 43 55 54 45 53  |RETURN. EXECUTES|
00002870: 13 11 11 11 11 11 11 11  00 95 30 B0 13 8B 53 43  |..........0...SC|
00002880: B2 34 A7 53 43 B2 30 3A  8B 4E 41 28 32 29 B2 30  |.4.SC.0:.NA(2).0|
00002890: A7 53 43 B2 31 00 D2 30  BA 13 99 22 91 9E 44 45  |.SC.1..0..."..DE|
000028A0: 46 49 4E 45 20 05 22 46  24 28 53 43 29 22 9E 20  |FINE ."F$(SC)". |
000028B0: 20 20 20 2D 05 22 4E 41  28 53 43 29 22 9E 9D 20  |   -."NA(SC)".. |
000028C0: 50 52 49 4E 54 20 41 52  45 41 53 20 55 53 45 44  |PRINT AREAS USED|
000028D0: 20 05 00 E5 30 BF 13 8B  C2 28 31 39 38 29 B2 30  | ...0....(198).0|
000028E0: A7 35 30 35 35 00 0B 31  C4 13 A1 4B 59 24 3A 8D  |.5055..1...KY$:.|
000028F0: 32 32 30 30 3A 8B 4B 59  24 B2 22 20 22 A7 53 43  |2200:.KY$." ".SC|
00002900: B2 53 43 AA 31 3A 89 35  30 34 30 00 20 31 C9 13  |.SC.1:.5040. 1..|
00002910: 8B 4B 59 24 B3 B1 C7 28  31 33 29 A7 35 30 35 35  |.KY$...(13).5055|
00002920: 00 40 31 CE 13 8B 53 43  B2 30 A7 8D 32 32 30 31  |.@1...SC.0..2201|
00002930: 3A 91 52 46 AA 31 89 36  30 36 30 2C 35 30 32 35  |:.RF.1.6060,5025|
00002940: 00 7C 31 D8 13 8D 35 35  39 30 3A 4D 58 B2 4C 50  |.|1...5590:MX.LP|
00002950: 3A 43 24 28 31 29 B2 22  31 31 31 31 31 31 31 32  |:C$(1)."11111112|
00002960: 30 30 22 AA 22 22 3A 43  24 28 32 29 B2 22 31 31  |00"."":C$(2)."11|
00002970: 31 31 31 31 31 32 32 30  22 AA 22 22 00 B7 31 E2  |11111220".""..1.|
00002980: 13 43 24 28 33 29 B2 22  31 31 31 31 31 31 31 32  |.C$(3)."11111112|
00002990: 32 30 22 AA 22 22 3A 51  24 B2 4E 4C 24 3A 8B 42  |20"."":Q$.NL$:.B|
000029A0: 54 24 B2 22 53 22 A7 3A  40 4D 2C 22 31 22 2C 43  |T$."S".:@M,"1",C|
000029B0: 24 28 32 29 2C 31 30 00  DC 31 EC 13 50 24 B2 C4  |$(2),10..1..P$..|
000029C0: 28 4E 4C 28 53 43 29 29  3A 59 B2 35 3A 4C 4E B2  |(NL(SC)):Y.5:LN.|
000029D0: 32 3A 54 59 B2 31 3A 8D  34 34 30 30 00 01 32 F1  |2:TY.1:.4400..2.|
000029E0: 13 4E 4C 28 53 43 29 B2  C5 28 41 24 29 3A 4D 58  |.NL(SC)..(A$):MX|
000029F0: B2 4D 58 AB 4E 4C 28 53  43 29 3A 51 24 B2 53 4C  |.MX.NL(SC):Q$.SL|
00002A00: 24 00 43 32 F6 13 43 43  24 B2 22 22 3A 81 4C 4E  |$.C2..CC$."":.LN|
00002A10: B2 31 A4 4E 4C 28 53 43  29 3A 43 43 24 B2 43 43  |.1.NL(SC):CC$.CC|
00002A20: 24 AA 43 31 24 3A 82 3A  41 24 B2 22 54 4F 50 3F  |$.C1$:.:A$."TOP?|
00002A30: 22 3A 8B 53 43 B2 33 A7  41 24 B2 22 42 4F 54 54  |":.SC.3.A$."BOTT|
00002A40: 4F 4D 3F 00 5C 32 00 14  51 24 B2 51 24 AA 41 24  |OM?.\2..Q$.Q$.A$|
00002A50: 3A 8B 53 43 B3 B1 32 A7  35 31 38 30 00 95 32 0A  |:.SC..2.5180..2.|
00002A60: 14 51 24 B2 22 50 52 49  4E 54 20 12 41 92 4C 4C  |.Q$."PRINT .A.LL|
00002A70: 20 4F 52 20 12 42 92 52  45 41 4B 20 4F 4E 4C 59  | OR .B.REAK ONLY|
00002A80: 3F 22 3A 43 53 24 B2 22  41 42 22 3A 54 59 B2 30  |?":CS$."AB":TY.0|
00002A90: 3A 4C 4E B2 31 00 B5 32  14 14 50 24 B2 C7 28 53  |:LN.1..2..P$..(S|
00002AA0: 4C 28 53 43 29 29 3A 8B  50 24 B2 43 30 24 A7 50  |L(SC)):.P$.C0$.P|
00002AB0: 24 B2 22 41 22 00 CC 32  1E 14 8D 34 33 39 30 3A  |$."A"..2...4390:|
00002AC0: 53 4C 28 53 43 29 B2 C6  28 41 24 29 00 D6 32 32  |SL(SC)..(A$)..22|
00002AD0: 14 89 35 31 39 30 00 FE  32 3C 14 49 B2 38 3A 50  |..5190..2<.I.8:P|
00002AE0: 24 B2 C4 28 53 4C 28 53  43 29 29 3A 8D 34 33 39  |$..(SL(SC)):.439|
00002AF0: 30 3A 53 4C 28 53 43 29  B2 C5 28 41 24 29 00 29  |0:SL(SC)..(A$).)|
00002B00: 33 46 14 8B 54 24 B2 22  54 22 AF 52 44 24 B2 22  |3F..T$."T".RD$."|
00002B10: 44 22 A7 41 24 B2 22 30  30 22 3A 40 4D 2C 41 24  |D".A$."00":@M,A$|
00002B20: 2C 43 24 28 53 43 29 2C  35 00 3A 33 50 14 81 4A  |,C$(SC),5.:3P..J|
00002B30: B2 30 A4 4E 28 53 43 29  AB 31 00 5F 33 5A 14 43  |.0.N(SC).1._3Z.C|
00002B40: 41 24 B2 43 24 28 53 43  29 AA 22 22 3A 49 B2 30  |A$.C$(SC)."":I.0|
00002B50: 3A 8D 35 35 39 30 3A 8B  4A B3 30 A7 4A B2 30 00  |:.5590:.J.0.J.0.|
00002B60: 8C 33 64 14 91 53 43 89  35 32 33 30 2C 35 32 34  |.3d..SC.5230,524|
00002B70: 30 3A 4F 24 B2 46 44 24  28 4A 29 3A 54 31 24 B2  |0:O$.FD$(J):T1$.|
00002B80: 46 54 24 28 4A 29 3A 89  35 32 35 30 00 AB 33 6E  |FT$(J):.5250..3n|
00002B90: 14 4F 24 B2 48 44 24 28  4A 29 3A 54 31 24 B2 48  |.O$.HD$(J):T1$.H|
00002BA0: 54 24 28 4A 29 3A 89 35  32 35 30 00 C4 33 78 14  |T$(J):.5250..3x.|
00002BB0: 4F 24 B2 4C 44 24 28 4A  29 3A 54 31 24 B2 4C 54  |O$.LD$(J):T1$.LT|
00002BC0: 24 28 4A 29 00 E7 33 82  14 8B 4F 24 B2 22 22 A7  |$(J)..3...O$."".|
00002BD0: 4F 24 B2 4F 31 24 3A 40  4D 2C C8 28 43 43 24 2C  |O$.O1$:@M,.(CC$,|
00002BE0: 31 29 2C 4F 24 2C 36 00  21 34 8C 14 99 22 50 52  |1),O$,6.!4..."PR|
00002BF0: 49 4E 54 20 41 52 45 41  20 23 20 22 4A AA 31 A3  |INT AREA # "J.1.|
00002C00: 32 35 29 4E 28 53 43 29  AB 4E 41 28 53 43 29 22  |25)N(SC).NA(SC)"|
00002C10: 41 52 45 41 53 20 4F 50  45 4E 22 3A 8D 35 38 37  |AREAS OPEN":.587|
00002C20: 30 00 3B 34 96 14 41 24  B2 22 22 3A 49 B2 49 AA  |0.;4..A$."":I.I.|
00002C30: 31 3A 8B 49 B2 31 31 A7  49 B2 33 00 59 34 A0 14  |1:.I.11.I.3.Y4..|
00002C40: 41 B2 C6 28 CA 28 43 41  24 2C 49 29 29 3A 8B 41  |A..(.(CA$,I)):.A|
00002C50: B3 B1 34 38 A7 35 33 31  30 00 74 34 AA 14 8B 41  |..48.5310.t4...A|
00002C60: 24 B2 22 91 22 A7 49 B2  49 AB 32 3A 8B 49 B3 32  |$.".".I.I.2:.I.2|
00002C70: A7 49 B2 32 00 7E 34 B4  14 89 35 32 37 30 00 A0  |.I.2.~4...5270..|
00002C80: 34 B6 14 4F 24 B2 4F 31  24 3A 49 B2 30 3A 54 31  |4..O$.O1$:I.0:T1|
00002C90: 24 B2 22 22 3A 8D 35 35  39 30 3A 89 35 32 36 30  |$."":.5590:.5260|
00002CA0: 00 AA 34 BE 14 8D 35 38  31 30 00 B4 34 C8 14 8D  |..4...5810..4...|
00002CB0: 34 34 31 30 00 C7 34 C9  14 42 24 B2 4F 24 AA 22  |4410..4..B$.O$."|
00002CC0: 22 3A 8D 35 36 30 30 00  E1 34 CB 14 8B C8 28 42  |":.5600..4....(B|
00002CD0: 24 2C 32 29 B2 C8 28 4F  24 2C 32 29 A7 35 33 33  |$,2)..(O$,2).533|
00002CE0: 39 00 15 35 CC 14 42 24  B2 C8 28 4F 24 2C 31 29  |9..5..B$..(O$,1)|
00002CF0: 3A 40 48 2C 42 24 2C 22  52 44 46 22 3A 91 4B 59  |:@H,B$,"RDF":.KY|
00002D00: 8D 35 33 32 35 2C 35 33  32 37 2C 35 33 32 39 3A  |.5325,5327,5329:|
00002D10: 89 35 33 33 39 00 42 35  CD 14 4B 59 B2 C6 28 CA  |.5339.B5..KY..(.|
00002D20: 28 4F 24 2C 32 29 29 3A  8B 4B 59 B1 4E 56 28 32  |(O$,2)):.KY.NV(2|
00002D30: 29 A7 4B 59 B2 31 3A 40  4D 2C 43 30 24 2C 4F 24  |).KY.1:@M,C0$,O$|
00002D40: 2C 32 00 73 35 CE 14 40  4D 2C C7 28 31 32 29 2C  |,2.s5..@M,.(12),|
00002D50: 4F 24 2C 34 3A 40 4D 2C  43 30 24 2C 4F 24 2C 38  |O$,4:@M,C0$,O$,8|
00002D60: 3A 40 4D 2C 22 4E 22 2C  4F 24 2C 31 30 3A 89 35  |:@M,"N",O$,10:.5|
00002D70: 38 37 30 00 A0 35 CF 14  4B 59 B2 C6 28 CA 28 4F  |870..5..KY..(.(O|
00002D80: 24 2C 32 29 29 3A 8B 4B  59 B1 4E 56 28 33 29 A7  |$,2)):.KY.NV(3).|
00002D90: 4B 59 B2 31 3A 40 4D 2C  43 30 24 2C 4F 24 2C 32  |KY.1:@M,C0$,O$,2|
00002DA0: 00 D2 35 D0 14 40 4D 2C  CA 28 44 41 24 28 4B 59  |..5..@M,.(DA$(KY|
00002DB0: 29 2C 34 2C 31 29 2C 4F  24 2C 34 3A 40 4D 2C 43  |),4,1),O$,4:@M,C|
00002DC0: 30 24 AA 22 4E 4E 22 2C  4F 24 2C 38 3A 89 35 38  |0$."NN",O$,8:.58|
00002DD0: 37 30 00 FF 35 D1 14 4B  59 B2 C6 28 CA 28 4F 24  |70..5..KY..(.(O$|
00002DE0: 2C 32 29 29 3A 8B 4B 59  B1 4E 56 28 31 29 A7 4B  |,2)):.KY.NV(1).K|
00002DF0: 59 B2 31 3A 40 4D 2C 43  30 24 2C 4F 24 2C 32 00  |Y.1:@M,C0$,O$,2.|
00002E00: 2B 36 D2 14 40 4D 2C CA  28 46 41 24 28 4B 59 29  |+6..@M,.(FA$(KY)|
00002E10: 2C 34 2C 31 29 2C 4F 24  2C 34 3A 40 4D 2C 43 30  |,4,1),O$,4:@M,C0|
00002E20: 24 AA 22 4E 4E 22 2C 4F  24 2C 38 00 35 36 D4 14  |$."NN",O$,8.56..|
00002E30: 89 35 38 37 30 00 5F 36  DB 14 8B C8 28 4F 24 2C  |.5870._6....(O$,|
00002E40: 31 29 B3 B1 22 54 22 AF  53 43 B3 B1 32 AF 49 B1  |1).."T".SC..2.I.|
00002E50: 31 A7 3A 40 4D 2C 22 30  22 2C 43 41 24 2C 33 00  |1.:@M,"0",CA$,3.|
00002E60: 6E 36 DC 14 8B 49 B3 33  A7 8D 35 34 37 30 00 91  |n6...I.3..5470..|
00002E70: 36 E1 14 8B 49 B3 B1 35  B0 CA 28 42 24 2C 35 2C  |6...I..5..(B$,5,|
00002E80: 31 29 B2 CA 28 4F 24 2C  35 2C 31 29 A7 35 33 35  |1)..(O$,5,1).535|
00002E90: 30 00 B1 36 E2 14 40 4D  2C CA 28 43 43 24 2C C6  |0..6..@M,.(CC$,.|
00002EA0: 28 CA 28 4F 24 2C 35 29  29 2C 31 29 2C 4F 24 2C  |(.(O$,5)),1),O$,|
00002EB0: 36 00 F3 36 E6 14 43 53  24 B2 22 5F 91 88 8C 86  |6..6..CS$."_....|
00002EC0: 93 04 22 3A 8D 34 33 37  30 3A 41 24 B2 C7 28 41  |..":.4370:A$..(A|
00002ED0: 29 3A 40 48 2C 41 24 2C  43 53 24 3A 43 53 24 B2  |):@H,A$,CS$:CS$.|
00002EE0: 22 22 3A 50 24 B2 22 22  3A 8B 4B 59 B2 30 A7 35  |"":P$."":.KY.0.5|
00002EF0: 32 37 30 00 14 37 F0 14  91 4B 59 89 35 33 38 30  |270..7...KY.5380|
00002F00: 2C 35 32 39 30 2C 35 33  38 30 2C 35 33 38 30 2C  |,5290,5380,5380,|
00002F10: 35 33 30 32 00 30 37 F1  14 8B 4E 41 28 53 43 29  |5302.07...NA(SC)|
00002F20: B2 30 A7 4A B2 4E 28 53  43 29 3A 89 35 34 34 30  |.0.J.N(SC):.5440|
00002F30: 00 6F 37 F2 14 91 53 43  8D 35 33 36 34 2C 35 33  |.o7...SC.5364,53|
00002F40: 36 36 2C 35 33 36 38 3A  4A B2 4A AB 31 3A 4E 41  |66,5368:J.J.1:NA|
00002F50: 28 53 43 29 B2 4E 41 28  53 43 29 AB 31 3A 8B 4A  |(SC).NA(SC).1:.J|
00002F60: B1 B2 4E 41 28 53 43 29  AB 31 A7 35 32 31 30 00  |..NA(SC).1.5210.|
00002F70: 79 37 F3 14 89 35 34 35  30 00 BB 37 F4 14 9E 42  |y7...5450..7...B|
00002F80: 41 AA 33 36 2C 4A 2C 48  44 24 28 4A 29 3A 9E 42  |A.36,J,HD$(J):.B|
00002F90: 41 AA 33 36 2C 4A 2C 48  54 24 28 4A 29 3A 48 44  |A.36,J,HT$(J):HD|
00002FA0: 24 28 4E 41 28 31 29 29  B2 22 22 3A 48 54 24 28  |$(NA(1))."":HT$(|
00002FB0: 4E 41 28 31 29 29 B2 22  22 3A 8E 00 FD 37 F6 14  |NA(1))."":...7..|
00002FC0: 9E 42 41 AA 33 36 2C 4A  2C 4C 44 24 28 4A 29 3A  |.BA.36,J,LD$(J):|
00002FD0: 9E 42 41 AA 33 36 2C 4A  2C 4C 54 24 28 4A 29 3A  |.BA.36,J,LT$(J):|
00002FE0: 4C 44 24 28 4E 41 28 32  29 29 B2 22 22 3A 4C 54  |LD$(NA(2))."":LT|
00002FF0: 24 28 4E 41 28 32 29 29  B2 22 22 3A 8E 00 3F 38  |$(NA(2))."":..?8|
00003000: F8 14 9E 42 41 AA 33 36  2C 4A 2C 46 44 24 28 4A  |...BA.36,J,FD$(J|
00003010: 29 3A 9E 42 41 AA 33 36  2C 4A 2C 46 54 24 28 4A  |):.BA.36,J,FT$(J|
00003020: 29 3A 46 44 24 28 4E 41  28 33 29 29 B2 22 22 3A  |):FD$(NA(3))."":|
00003030: 46 54 24 28 4E 41 28 33  29 29 B2 22 22 3A 8E 00  |FT$(NA(3))."":..|
00003040: 5F 38 04 15 8B C6 28 CA  28 4F 24 2C 34 29 29 B2  |_8....(.(O$,4)).|
00003050: 30 A7 4A B2 4E 28 53 43  29 3A 89 35 34 34 30 00  |0.J.N(SC):.5440.|
00003060: 7A 38 0E 15 8B 4A B1 4E  41 28 53 43 29 AB 31 A7  |z8...J.NA(SC).1.|
00003070: 4E 41 28 53 43 29 B2 4A  AA 31 00 A7 38 18 15 91  |NA(SC).J.1..8...|
00003080: 53 43 89 35 34 31 30 2C  35 34 32 30 3A 46 44 24  |SC.5410,5420:FD$|
00003090: 28 4A 29 B2 4F 24 3A 46  54 24 28 4A 29 B2 54 31  |(J).O$:FT$(J).T1|
000030A0: 24 3A 89 35 34 33 30 00  C6 38 22 15 48 44 24 28  |$:.5430..8".HD$(|
000030B0: 4A 29 B2 4F 24 3A 48 54  24 28 4A 29 B2 54 31 24  |J).O$:HT$(J).T1$|
000030C0: 3A 89 35 34 33 30 00 DF  38 2C 15 4C 44 24 28 4A  |:.5430..8,.LD$(J|
000030D0: 29 B2 4F 24 3A 4C 54 24  28 4A 29 B2 54 31 24 00  |).O$:LT$(J).T1$.|
000030E0: F1 38 36 15 8B 41 B2 39  35 A7 4A B2 4E 28 53 43  |.86..A.95.J.N(SC|
000030F0: 29 00 08 39 3B 15 8B 41  B2 31 34 30 A7 4A B2 4A  |)..9;..A.140.J.J|
00003100: AB 31 3A 89 35 32 31 30  00 32 39 40 15 41 B2 C6  |.1:.5210.29@.A..|
00003110: 28 CA 28 4F 24 2C 36 29  29 AA C6 28 CA 28 4F 24  |(.(O$,6))..(.(O$|
00003120: 2C 34 29 29 3A 8B 41 B1  B2 50 57 A7 41 B2 50 57  |,4)):.A..PW.A.PW|
00003130: AB 31 00 53 39 45 15 41  31 B2 C6 28 CA 28 4F 24  |.1.S9E.A1..(.(O$|
00003140: 2C 35 29 29 3A 40 4D 2C  C7 28 41 29 2C 43 43 24  |,5)):@M,.(A),CC$|
00003150: 2C 41 31 00 59 39 4A 15  82 00 63 39 54 15 89 35  |,A1.Y9J...c9T..5|
00003160: 30 32 30 00 71 39 5E 15  8B 49 B2 32 A7 35 35 36  |020.q9^..I.2.556|
00003170: 30 00 89 39 90 15 43 41  24 B2 22 31 31 31 31 31  |0..9..CA$."11111|
00003180: 31 31 31 31 30 22 AA 22  22 00 B1 39 9A 15 8B 41  |11110".""..9...A|
00003190: 24 B2 22 54 22 A7 3A 40  4D 2C 22 30 22 2C 43 41  |$."T".:@M,"0",CA|
000031A0: 24 2C 32 3A 40 4D 2C 22  30 30 22 2C 43 41 24 2C  |$,2:@M,"00",CA$,|
000031B0: 38 00 B7 39 AE 15 8E 00  CB 39 B8 15 8B C8 28 4F  |8..9.....9....(O|
000031C0: 24 2C 31 29 B3 B1 22 46  22 A7 8E 00 F4 39 C2 15  |$,1).."F"....9..|
000031D0: 8B C6 28 CA 28 46 41 24  28 C6 28 41 24 29 29 2C  |..(.(FA$(.(A$)),|
000031E0: 35 29 29 B2 30 A7 3A 40  4D 2C 22 30 30 22 2C 43  |5)).0.:@M,"00",C|
000031F0: 41 24 2C 38 00 01 3A CC  15 8B 53 43 B3 B1 32 A7  |A$,8..:...SC..2.|
00003200: 8E 00 25 3A CE 15 81 49  51 B2 31 A4 4E 4B 3A 8B  |..%:...IQ.1.NK:.|
00003210: C6 28 41 24 29 B3 B1 42  46 28 49 51 2C 30 29 A7  |.(A$)..BF(IQ,0).|
00003220: 82 49 51 3A 8E 00 39 3A  D1 15 40 4D 2C 22 31 22  |.IQ:..9:..@M,"1"|
00003230: 2C 43 41 24 2C 31 30 3A  8E 00 5D 3A D6 15 99 22  |,CA$,10:..]:..."|
00003240: 05 22 3A 54 53 24 B2 46  24 28 53 43 29 AA 22 20  |.":TS$.F$(SC)." |
00003250: 5A 4F 4E 45 22 3A 8D 32  35 30 30 3A 8E 00 75 3A  |ZONE":.2500:..u:|
00003260: E0 15 50 24 B2 41 24 3A  8B 49 B2 33 A7 54 31 24  |..P$.A$:.I.3.T1$|
00003270: B2 41 24 3A 8E 00 8F 3A  EA 15 8B 54 59 25 28 49  |.A$:...:...TY%(I|
00003280: 29 B2 31 A7 41 24 B2 C7  28 C5 28 41 24 29 29 00  |).1.A$..(.(A$)).|
00003290: A6 3A EF 15 8B 49 B2 32  A7 41 24 B2 C7 28 C6 28  |.:...I.2.A$..(.(|
000032A0: 41 24 29 AB 31 29 00 B7  3A F4 15 40 4D 2C 41 24  |A$).1)..:..@M,A$|
000032B0: 2C 4F 24 2C 49 3A 8E 00  F0 3A 12 16 4D 58 B2 30  |,O$,I:...:..MX.0|
000032C0: 3A 91 49 89 35 36 39 30  2C 35 37 30 30 2C 35 36  |:.I.5690,5700,56|
000032D0: 37 30 2C 35 37 34 30 2C  35 37 31 30 2C 35 37 32  |70,5740,5710,572|
000032E0: 30 2C 35 38 30 30 2C 35  36 38 30 2C 35 38 30 30  |0,5800,5680,5800|
000032F0: 00 00 3B 1C 16 43 53 24  B2 22 4E 4C 50 22 3A 8E  |..;..CS$."NLP":.|
00003300: 00 06 3B 26 16 8E 00 12  3B 30 16 4D 58 B2 31 30  |..;&....;0.MX.10|
00003310: 3A 8E 00 23 3B 3A 16 43  53 24 B2 22 46 52 44 54  |:..#;:.CS$."FRDT|
00003320: 22 3A 8E 00 52 3B 44 16  40 48 2C C8 28 4F 24 2C  |":..R;D.@H,.(O$,|
00003330: 31 29 2C 22 46 52 44 22  3A 4D 58 B2 4E 56 28 4B  |1),"FRD":MX.NV(K|
00003340: 59 29 3A 50 24 B2 C7 28  C6 28 50 24 29 AA 31 29  |Y):P$..(.(P$).1)|
00003350: 3A 8E 00 62 3B 4E 16 4D  58 B2 4E 4C 28 53 43 29  |:..b;N.MX.NL(SC)|
00003360: 3A 8E 00 85 3B 58 16 8B  50 24 B3 43 31 24 A7 50  |:...;X..P$.C1$.P|
00003370: 24 B2 CA 28 43 43 24 2C  C6 28 CA 28 4F 24 2C 35  |$..(CC$,.(.(O$,5|
00003380: 29 29 2C 31 29 00 9E 3B  62 16 4D 58 B2 50 57 AB  |)),1)..;b.MX.PW.|
00003390: C6 28 CA 28 4F 24 2C 34  29 29 AA 31 3A 8E 00 B0  |.(.(O$,4)).1:...|
000033A0: 3B 6C 16 4D 58 B2 C6 28  CA 28 4F 24 2C 32 29 29  |;l.MX..(.(O$,2))|
000033B0: 00 DE 3B 71 16 8B C8 28  4F 24 2C 31 29 B2 22 46  |..;q...(O$,1)."F|
000033C0: 22 AF 4D 58 B3 B2 4E 56  28 31 29 A7 4D 58 B2 C6  |".MX..NV(1).MX..|
000033D0: 28 CA 28 46 41 24 28 4D  58 29 2C 34 29 29 00 09  |(.(FA$(MX),4))..|
000033E0: 3C 76 16 8B C8 28 4F 24  2C 31 29 B2 22 54 22 A7  |<v...(O$,1)."T".|
000033F0: 4D 58 B2 50 57 3A 50 24  B2 CA 28 4F 24 2C 34 2C  |MX.PW:P$..(O$,4,|
00003400: 31 29 AA 22 20 20 22 3A  8E 00 28 3C 80 16 8B C8  |1)."  ":..(<....|
00003410: 28 4F 24 2C 31 29 B2 22  52 22 A7 4D 58 B2 C6 28  |(O$,1)."R".MX..(|
00003420: CA 28 4F 24 2C 34 29 29  00 56 3C 8A 16 8B C8 28  |.(O$,4)).V<....(|
00003430: 4F 24 2C 31 29 B2 22 44  22 AF 4D 58 B3 B2 4E 56  |O$,1)."D".MX..NV|
00003440: 28 33 29 A7 4D 58 B2 C6  28 CA 28 44 41 24 28 4D  |(3).MX..(.(DA$(M|
00003450: 58 29 2C 34 29 29 00 6F  3C 8F 16 8B 4D 58 B3 C3  |X),4)).o<...MX..|
00003460: 28 54 31 24 29 A7 4D 58  B2 C3 28 54 31 24 29 00  |(T1$).MX..(T1$).|
00003470: 89 3C 94 16 8B 50 24 B2  43 30 24 A7 50 24 B2 C7  |.<...P$.C0$.P$..|
00003480: 28 4D 58 29 AA 22 20 20  22 00 8F 3C 9E 16 8E 00  |(MX)."  "..<....|
00003490: 9E 3C A8 16 43 53 24 B2  22 59 4E 22 3A 8E 00 B9  |.<..CS$."YN":...|
000034A0: 3C B2 16 4D 58 B2 30 3A  8B 49 B2 33 A7 50 24 B2  |<..MX.0:.I.3.P$.|
000034B0: 54 31 24 3A 89 35 38 34  30 00 D0 3C BC 16 50 24  |T1$:.5840..<..P$|
000034C0: B2 CA 28 4F 24 2C 49 2C  31 29 3A 8D 35 36 35 30  |..(O$,I,1):.5650|
000034D0: 00 0A 3D C6 16 8B 54 59  25 28 49 29 B2 31 A7 50  |..=...TY%(I).1.P|
000034E0: 24 B2 CA 28 C4 28 C6 28  50 24 29 29 2C 32 29 AA  |$..(.(.(P$)),2).|
000034F0: 22 20 20 22 3A 8B C5 28  50 24 29 B2 33 32 AF 49  |"  ":..(P$).32.I|
00003500: B2 38 A7 50 24 B2 22 20  20 22 00 3B 3D D0 16 51  |.8.P$."  ".;=..Q|
00003510: 24 B2 51 24 28 49 29 3A  59 B2 59 25 28 49 29 3A  |$.Q$(I):Y.Y%(I):|
00003520: 58 B2 58 25 28 49 29 3A  4C 4E B2 4C 4E 25 28 49  |X.X%(I):LN.LN%(I|
00003530: 29 3A 54 59 B2 54 59 25  28 49 29 00 41 3D DA 16  |):TY.TY%(I).A=..|
00003540: 8E 00 66 3D EE 16 54 4D  B2 49 3A 81 49 B2 31 A4  |..f=..TM.I:.I.1.|
00003550: 31 30 3A 8D 35 38 31 30  3A 8D 34 33 37 30 3A 82  |10:.5810:.4370:.|
00003560: 49 3A 49 B2 54 4D 00 9F  3D F8 16 40 50 2C 31 31  |I:I.TM..=..@P,11|
00003570: 2C 30 2C 22 2E 2E 2E 2E  2E 2E 2E 2E 2E 31 2E 2E  |,0,".........1..|
00003580: 2E 2E 2E 2E 2E 2E 2E 32  2E 2E 2E 2E 2E 2E 2E 2E  |.......2........|
00003590: 2E 33 2E 2E 2E 2E 2E 2E  2E 2E 2E 34 22 3A 8E 00  |.3.........4":..|
000035A0: C6 3D 02 17 41 24 B2 22  52 46 2E 22 AA 4E 46 24  |.=..A$."RF.".NF$|
000035B0: 3A 42 24 B2 22 44 41 54  41 22 3A 8D 36 34 38 30  |:B$."DATA":.6480|
000035C0: 3A 8B 45 52 A7 8E 00 DA  3D 0C 17 9F 38 2C 38 2C  |:.ER....=...8,8,|
000035D0: 38 2C 41 24 AA 22 2C 53  2C 52 00 04 3E 16 17 40  |8,A$.",S,R..>..@|
000035E0: 49 4E 2C 38 2C 4E 46 24  3A 84 38 2C 4E 4B 3A 9E  |IN,8,NF$:.8,NK:.|
000035F0: 42 41 AA 34 32 2C 4E 46  24 3A 8B 4E 4B B2 30 A7  |BA.42,NF$:.NK.0.|
00003600: 35 39 33 30 00 3C 3E 20  17 81 4A B2 30 A4 4E 4B  |5930.<> ..J.0.NK|
00003610: AB 31 3A 40 49 4C 2C 32  2C 38 2C 53 4B 24 28 4A  |.1:@IL,2,8,SK$(J|
00003620: 29 3A 42 46 28 4A AA 31  2C 30 29 B2 C6 28 53 4B  |):BF(J.1,0)..(SK|
00003630: 24 28 4A 29 AA C7 28 30  29 29 3A 82 00 63 3E 2A  |$(J)..(0)):..c>*|
00003640: 17 40 49 4E 2C 38 2C 53  53 24 3A 40 49 4E 2C 38  |.@IN,8,SS$:@IN,8|
00003650: 2C 52 44 24 3A 40 49 4E  2C 38 2C 54 24 3A 84 38  |,RD$:@IN,8,T$:.8|
00003660: 2C 50 57 00 8C 3E 34 17  84 38 2C 4C 50 3A 40 49  |,PW..>4..8,LP:@I|
00003670: 4E 2C 38 2C 42 54 24 20  3A 40 49 4E 2C 38 2C 4D  |N,8,BT$ :@IN,8,M|
00003680: 41 24 3A 40 49 4E 2C 38  2C 56 41 24 00 A6 3E 3E  |A$:@IN,8,VA$..>>|
00003690: 17 84 38 2C 44 4E 3A 40  49 4E 2C 38 2C 44 46 24  |..8,DN:@IN,8,DF$|
000036A0: 3A 84 38 2C 4E 4C 00 C1  3E 48 17 84 38 2C 4E 41  |:.8,NL..>H..8,NA|
000036B0: 28 31 29 3A 8B 4E 41 28  31 29 B2 30 A7 35 39 39  |(1):.NA(1).0.599|
000036C0: 30 00 D4 3E 52 17 84 38  2C 4E 4C 28 31 29 2C 53  |0..>R..8,NL(1),S|
000036D0: 4C 28 31 29 00 04 3F 5C  17 81 4A B2 30 A4 4E 41  |L(1)..?\..J.0.NA|
000036E0: 28 31 29 AB 31 3A 40 49  4C 2C 31 30 2C 38 2C 48  |(1).1:@IL,10,8,H|
000036F0: 44 24 28 4A 29 3A 40 49  4E 2C 38 2C 48 54 24 28  |D$(J):@IN,8,HT$(|
00003700: 4A 29 3A 82 00 1F 3F 66  17 84 38 2C 4E 41 28 32  |J):...?f..8,NA(2|
00003710: 29 3A 8B 4E 41 28 32 29  B2 30 A7 36 30 32 30 00  |):.NA(2).0.6020.|
00003720: 35 3F 70 17 84 38 2C 4E  4C 28 32 29 2C 53 4C 28  |5?p..8,NL(2),SL(|
00003730: 32 29 2C 5A 57 00 65 3F  7A 17 81 4A B2 30 A4 4E  |2),ZW.e?z..J.0.N|
00003740: 41 28 32 29 AB 31 3A 40  49 4C 2C 31 30 2C 38 2C  |A(2).1:@IL,10,8,|
00003750: 4C 44 24 28 4A 29 3A 40  49 4E 2C 38 2C 4C 54 24  |LD$(J):@IN,8,LT$|
00003760: 28 4A 29 3A 82 00 80 3F  84 17 84 38 2C 4E 41 28  |(J):...?...8,NA(|
00003770: 33 29 3A 8B 4E 41 28 33  29 B2 30 A7 36 30 35 30  |3):.NA(3).0.6050|
00003780: 00 93 3F 8E 17 84 38 2C  4E 4C 28 33 29 2C 53 4C  |..?...8,NL(3),SL|
00003790: 28 33 29 00 C3 3F 98 17  81 4A B2 30 A4 4E 41 28  |(3)..?...J.0.NA(|
000037A0: 33 29 AB 31 3A 40 49 4C  2C 31 30 2C 38 2C 46 44  |3).1:@IL,10,8,FD|
000037B0: 24 28 4A 29 3A 40 49 4E  2C 38 2C 46 54 24 28 4A  |$(J):@IN,8,FT$(J|
000037C0: 29 3A 82 00 CC 3F A2 17  A0 38 3A 8E 00 F3 3F AC  |):...?...8:...?.|
000037D0: 17 54 53 24 B2 22 52 45  50 4F 52 54 20 44 41 54  |.TS$."REPORT DAT|
000037E0: 41 22 3A 8D 32 35 30 30  3A 50 24 B2 22 59 22 3A  |A":.2500:P$."Y":|
000037F0: 59 B2 33 00 39 40 B6 17  49 B2 30 3A 51 24 B2 22  |Y.3.9@..I.0:Q$."|
00003800: 53 41 56 45 20 54 48 45  20 52 45 50 4F 52 54 20  |SAVE THE REPORT |
00003810: 43 4F 4E 44 49 54 49 4F  4E 53 3F 22 3A 4C 4E B2  |CONDITIONS?":LN.|
00003820: 31 3A 54 59 B2 30 3A 8D  34 33 39 30 3A 8B 41 24  |1:TY.0:.4390:.A$|
00003830: B2 22 4E 22 A7 33 30 32  30 00 7E 40 C0 17 51 24  |."N".3020.~@..Q$|
00003840: B2 22 45 4E 54 45 52 20  52 45 50 4F 52 54 20 46  |."ENTER REPORT F|
00003850: 49 4C 45 20 4E 41 4D 45  3F 20 22 3A 41 24 B2 52  |ILE NAME? ":A$.R|
00003860: 4E 24 3A 8D 34 35 30 3A  98 31 35 2C 22 53 30 3A  |N$:.450:.15,"S0:|
00003870: 52 46 2E 22 AA 41 24 3A  52 4E 24 B2 41 24 00 9A  |RF.".A$:RN$.A$..|
00003880: 40 D4 17 9F 38 2C 38 2C  38 2C 22 30 3A 52 46 2E  |@...8,8,8,"0:RF.|
00003890: 22 AA 41 24 AA 22 2C 53  2C 57 00 B6 40 DE 17 98  |".A$.",S,W..@...|
000038A0: 38 2C 4E 46 24 3A 98 38  2C 4E 4B 3A 8B 4E 4B B2  |8,NF$:.8,NK:.NK.|
000038B0: 30 A7 36 31 33 30 00 D1  40 E8 17 81 49 B2 30 A4  |0.6130..@...I.0.|
000038C0: 4E 4B AB 31 3A 98 38 2C  53 4B 24 28 49 29 3B 3A  |NK.1:.8,SK$(I);:|
000038D0: 82 00 EF 40 F2 17 98 38  2C 53 53 24 3A 98 38 2C  |...@...8,SS$:.8,|
000038E0: 52 44 24 3A 98 38 2C 54  24 3A 98 38 2C 50 57 00  |RD$:.8,T$:.8,PW.|
000038F0: 0E 41 FC 17 98 38 2C 4C  50 3A 98 38 2C 42 54 24  |.A...8,LP:.8,BT$|
00003900: 3A 98 38 2C 4D 41 24 3A  98 38 2C 56 41 24 00 25  |:.8,MA$:.8,VA$.%|
00003910: 41 06 18 98 38 2C 44 4E  3A 98 38 2C 44 46 24 3A  |A...8,DN:.8,DF$:|
00003920: 98 38 2C 4E 4C 00 40 41  10 18 98 38 2C 4E 41 28  |.8,NL.@A...8,NA(|
00003930: 31 29 3A 8B 4E 41 28 31  29 B2 30 A7 36 31 39 30  |1):.NA(1).0.6190|
00003940: 00 56 41 1A 18 98 38 2C  4E 4C 28 31 29 3A 98 38  |.VA...8,NL(1):.8|
00003950: 2C 53 4C 28 31 29 00 7A  41 24 18 81 4A B2 30 A4  |,SL(1).zA$..J.0.|
00003960: 4E 41 28 31 29 AB 31 3A  98 38 2C 48 44 24 28 4A  |NA(1).1:.8,HD$(J|
00003970: 29 3B 48 54 24 28 4A 29  3A 82 00 95 41 2E 18 98  |);HT$(J):...A...|
00003980: 38 2C 4E 41 28 32 29 3A  8B 4E 41 28 32 29 B2 30  |8,NA(2):.NA(2).0|
00003990: A7 36 32 32 30 00 B1 41  38 18 98 38 2C 4E 4C 28  |.6220..A8..8,NL(|
000039A0: 32 29 3A 98 38 2C 53 4C  28 32 29 3A 98 38 2C 5A  |2):.8,SL(2):.8,Z|
000039B0: 57 00 D5 41 42 18 81 4A  B2 30 A4 4E 41 28 32 29  |W..AB..J.0.NA(2)|
000039C0: AB 31 3A 98 38 2C 4C 44  24 28 4A 29 3B 4C 54 24  |.1:.8,LD$(J);LT$|
000039D0: 28 4A 29 3A 82 00 F0 41  4C 18 98 38 2C 4E 41 28  |(J):...AL..8,NA(|
000039E0: 33 29 3A 8B 4E 41 28 33  29 B2 30 A7 36 32 34 31  |3):.NA(3).0.6241|
000039F0: 00 06 42 56 18 98 38 2C  4E 4C 28 33 29 3A 98 38  |..BV..8,NL(3):.8|
00003A00: 2C 53 4C 28 33 29 00 2A  42 60 18 81 4A B2 30 A4  |,SL(3).*B`..J.0.|
00003A10: 4E 41 28 33 29 AB 31 3A  98 38 2C 46 44 24 28 4A  |NA(3).1:.8,FD$(J|
00003A20: 29 3B 46 54 24 28 4A 29  3A 82 00 44 42 61 18 84  |);FT$(J):..DBa..|
00003A30: 31 35 2C 4A 3A 8B 4A B3  B1 37 32 A7 A0 38 3A 89  |15,J:.J..72..8:.|
00003A40: 33 30 32 30 00 73 42 6A  18 A0 38 3A 40 50 2C 32  |3020.sBj..8:@P,2|
00003A50: 34 2C 30 2C 22 44 49 53  4B 20 46 55 4C 4C 20 2D  |4,0,"DISK FULL -|
00003A60: 20 4F 4E 45 20 4D 4F 4D  45 4E 54 2C 20 50 4C 45  | ONE MOMENT, PLE|
00003A70: 41 53 45 00 91 42 6F 18  8D 32 30 30 3A 98 31 35  |ASE..Bo..200:.15|
00003A80: 2C 22 56 30 22 3A 59 B2  59 AB 34 3A 89 36 30 37  |,"V0":Y.Y.4:.607|
00003A90: 30 00 9D 42 74 18 46 41  24 B2 4E 46 24 00 C9 42  |0..Bt.FA$.NF$..B|
00003AA0: 7E 18 46 39 B2 30 3A 41  24 B2 22 46 53 2E 22 AA  |~.F9.0:A$."FS.".|
00003AB0: 46 41 24 3A 42 24 B2 22  44 41 54 41 22 3A 8D 36  |FA$:B$."DATA":.6|
00003AC0: 34 38 30 3A 8B 45 52 A7  8E 00 EC 42 88 18 40 50  |480:.ER....B..@P|
00003AD0: 2C 32 34 2C 30 2C 22 46  4F 55 4E 44 20 46 49 4C  |,24,0,"FOUND FIL|
00003AE0: 45 20 4C 4F 41 44 49 4E  47 2E 2E 2E 00 15 43 89  |E LOADING.....C.|
00003AF0: 18 9F 32 2C 38 2C 32 2C  22 53 43 2E 22 AA 4E 46  |..2,8,2,"SC.".NF|
00003B00: 24 3A 9E 42 42 AA 39 2C  31 3A 9E 42 42 AA 33 30  |$:.BB.9,1:.BB.30|
00003B10: 2C 31 3A A0 32 00 41 43  8D 18 40 4C 3B 22 54 53  |,1:.2.AC..@L;"TS|
00003B20: 2E 22 AA 4E 46 24 2C 22  42 41 30 30 22 3A 40 4C  |.".NF$,"BA00":@L|
00003B30: 3B 22 42 4D 2E 22 AA 4E  46 24 2C 22 46 46 30 30  |;"BM.".NF$,"FF00|
00003B40: 22 00 69 43 92 18 4E 44  B2 30 3A 9F 31 2C 38 2C  |".iC..ND.0:.1,8,|
00003B50: 32 2C 22 41 52 2E 22 AA  4E 46 24 3A 84 31 35 2C  |2,"AR.".NF$:.15,|
00003B60: 41 3A 8B 41 A7 36 33 34  30 00 76 43 9C 18 9E 42  |A:.A.6340.vC...B|
00003B70: 42 AA 33 3A A0 31 00 9E  43 A6 18 46 39 B2 31 3A  |B.3:.1..C..F9.1:|
00003B80: 9F 31 2C 38 2C 32 2C 22  44 50 2E 22 AA 4E 46 24  |.1,8,2,"DP.".NF$|
00003B90: 3A 84 31 35 2C 41 3A 8B  41 A7 36 33 34 30 00 C2  |:.15,A:.A.6340..|
00003BA0: 43 B0 18 84 31 2C 4E 44  3A 86 44 41 24 28 4E 44  |C...1,ND:.DA$(ND|
00003BB0: 29 2C 44 50 24 28 4E 44  29 3A 97 52 54 AA 34 2C  |),DP$(ND):.RT.4,|
00003BC0: 4E 44 00 EA 43 BA 18 4E  56 28 33 29 B2 4E 44 3A  |ND..C..NV(3).ND:|
00003BD0: 81 49 B2 30 A4 4E 44 AB  31 3A 40 49 4C 2C 34 2C  |.I.0.ND.1:@IL,4,|
00003BE0: 31 2C 44 41 24 28 49 29  3A 82 00 F6 43 C4 18 A0  |1,DA$(I):...C...|
00003BF0: 31 3A 46 34 B2 31 00 29  44 D8 18 9F 31 2C 38 2C  |1:F4.1.)D...1,8,|
00003C00: 32 2C 22 46 53 2E 22 AA  4E 46 24 3A 84 31 2C 4E  |2,"FS.".NF$:.1,N|
00003C10: 53 2C 4E 46 2C 43 41 2C  4C 52 2C 4E 52 2C 53 43  |S,NF,CA,LR,NR,SC|
00003C20: 24 2C 50 31 24 2C 50 32  24 00 6F 44 E2 18 86 46  |$,P1$,P2$.oD...F|
00003C30: 41 24 28 4E 46 AB 31 29  2C 52 45 24 28 4E 46 AB  |A$(NF.1),RE$(NF.|
00003C40: 31 29 2C 54 45 24 28 4E  46 AB 31 29 2C 52 28 31  |1),TE$(NF.1),R(1|
00003C50: 30 35 29 3A 97 31 30 31  38 2C 31 30 35 3A 97 52  |05):.1018,105:.R|
00003C60: 54 AA 35 2C 4E 46 3A 4E  56 28 31 29 B2 4E 46 00  |T.5,NF:NV(1).NF.|
00003C70: 7C 44 E7 18 52 28 31 30  34 29 B2 32 00 B1 44 EC  ||D..R(104).2..D.|
00003C80: 18 4E 56 28 32 29 B2 31  30 35 3A 97 52 54 AA 31  |.NV(2).105:.RT.1|
00003C90: 2C B5 28 4C 52 AD 32 35  36 29 3A 97 52 54 2C 4C  |,.(LR.256):.RT,L|
00003CA0: 52 AB 28 32 35 36 AC B5  28 4C 52 AD 32 35 36 29  |R.(256..(LR.256)|
00003CB0: 29 00 DE 44 F6 18 97 52  54 AA 33 2C B5 28 4E 52  |)..D...RT.3,.(NR|
00003CC0: AD 32 35 36 29 3A 97 52  54 AA 32 2C 4E 52 AB 28  |.256):.RT.2,NR.(|
00003CD0: 32 35 36 AC B5 28 4E 52  AD 32 35 36 29 29 00 19  |256..(NR.256))..|
00003CE0: 45 00 19 46 52 B2 34 37  33 36 30 3A 81 49 B2 30  |E..FR.47360:.I.0|
00003CF0: A4 4E 46 AB 31 3A 40 49  4C 2C 35 2C 31 2C 46 41  |.NF.1:@IL,5,1,FA|
00003D00: 24 28 49 29 3A 97 46 52  AA 49 2C C6 28 CA 28 46  |$(I):.FR.I,.(.(F|
00003D10: 41 24 28 49 29 2C 34 29  29 00 48 45 0A 19 82 3A  |A$(I),4)).HE...:|
00003D20: 9E 42 41 AA 33 30 2C 52  45 24 28 30 29 3A 9E 42  |.BA.30,RE$(0):.B|
00003D30: 41 AA 33 30 2C 54 45 24  28 30 29 3A A0 31 3A 97  |A.30,TE$(0):.1:.|
00003D40: 35 33 32 37 32 2C 43 41  00 7B 45 0F 19 4F 31 24  |53272,CA.{E..O1$|
00003D50: B2 22 46 22 AA 43 30 24  AA 22 20 22 AA CA 28 46  |."F".C0$." "..(F|
00003D60: 41 24 28 30 29 2C 34 2C  31 29 AA 43 31 24 AA 43  |A$(0),4,1).C1$.C|
00003D70: 30 24 AA 22 4E 20 4E 4E  22 3A 8E 00 A1 45 50 19  |0$."N NN":...EP.|
00003D80: 9F 38 2C 38 2C 38 2C 41  24 3A A1 23 38 2C 50 24  |.8,8,8,A$:.#8,P$|
00003D90: 3A 45 52 B2 53 54 3A A0  38 3A 8B 45 52 B2 30 A7  |:ER.ST:.8:.ER.0.|
00003DA0: 8E 00 AC 45 5A 19 8D 39  35 30 3A 8E 00 EB 45 8C  |...EZ..950:...E.|
00003DB0: 19 54 59 B2 30 3A 4C 50  B2 32 34 3A 50 4C B2 36  |.TY.0:LP.24:PL.6|
00003DC0: 36 3A 50 57 B2 33 39 3A  50 50 B2 38 30 3A 52 46  |6:PW.39:PP.80:RF|
00003DD0: 24 B2 22 4B 22 3A 52 44  24 B2 22 53 22 3A 54 24  |$."K":RD$."S":T$|
00003DE0: B2 22 53 22 3A 42 54 24  B2 22 46 00 F7 45 96 19  |."S":BT$."F..E..|
00003DF0: 4D 41 24 B2 22 4E 22 00  3E 46 A0 19 86 46 24 28  |MA$."N".>F...F$(|
00003E00: 33 29 3A 46 24 28 31 29  B2 22 48 45 41 44 45 52  |3):F$(1)."HEADER|
00003E10: 22 3A 46 24 28 32 29 B2  22 4C 49 53 54 20 20 22  |":F$(2)."LIST  "|
00003E20: 3A 46 24 28 33 29 B2 22  46 4F 4F 54 45 52 22 3A  |:F$(3)."FOOTER":|
00003E30: 46 24 28 30 29 B2 22 45  58 49 54 20 20 22 00 81  |F$(0)."EXIT  "..|
00003E40: 46 AA 19 4E 4C 24 B2 22  4E 55 4D 42 45 52 20 4F  |F..NL$."NUMBER O|
00003E50: 46 20 4C 49 4E 45 53 20  49 4E 20 5A 4F 4E 45 3F  |F LINES IN ZONE?|
00003E60: 22 3A 53 4C 24 B2 22 4E  55 4D 42 45 52 20 4F 46  |":SL$."NUMBER OF|
00003E70: 20 4C 49 4E 45 53 20 46  52 4F 4D 20 54 48 45 20  | LINES FROM THE |
00003E80: 22 00 AE 46 BE 19 49 B2  31 3A 51 24 28 49 29 B2  |"..F..I.1:Q$(I).|
00003E90: 22 44 41 54 41 20 54 59  50 45 20 28 12 46 92 2D  |"DATA TYPE (.F.-|
00003EA0: 12 52 92 2D 12 44 92 2D  12 54 92 29 3A 22 00 D4  |.R.-.D.-.T.):"..|
00003EB0: 46 C3 19 58 25 28 49 29  B2 30 3A 59 25 28 49 29  |F..X%(I).0:Y%(I)|
00003EC0: B2 37 3A 54 59 25 28 49  29 B2 30 3A 4C 4E 25 28  |.7:TY%(I).0:LN%(|
00003ED0: 49 29 B2 31 00 12 47 C8  19 49 B2 32 3A 51 24 28  |I).1..G..I.2:Q$(|
00003EE0: 49 29 B2 22 53 55 42 53  43 52 49 50 54 3A 22 3A  |I)."SUBSCRIPT:":|
00003EF0: 58 25 28 49 29 B2 32 35  3A 59 25 28 49 29 B2 37  |X%(I).25:Y%(I).7|
00003F00: 3A 54 59 25 28 49 29 B2  31 3A 4C 4E 25 28 49 29  |:TY%(I).1:LN%(I)|
00003F10: B2 33 00 50 47 D2 19 49  B2 33 3A 51 24 28 49 29  |.3.PG..I.3:Q$(I)|
00003F20: B2 22 54 45 58 54 2F 54  49 54 4C 45 22 3A 58 25  |."TEXT/TITLE":X%|
00003F30: 28 49 29 B2 30 3A 59 25  28 49 29 B2 39 3A 54 59  |(I).0:Y%(I).9:TY|
00003F40: 25 28 49 29 B2 30 3A 4C  4E 25 28 49 29 B2 34 30  |%(I).0:LN%(I).40|
00003F50: 00 93 47 DC 19 49 B2 34  3A 51 24 28 49 29 B2 22  |..G..I.4:Q$(I)."|
00003F60: 4C 45 4E 47 54 48 20 4F  46 20 41 52 45 41 3A 22  |LENGTH OF AREA:"|
00003F70: 3A 58 25 28 49 29 B2 30  3A 59 25 28 49 29 B2 31  |:X%(I).0:Y%(I).1|
00003F80: 32 3A 54 59 25 28 49 29  B2 31 3A 4C 4E 25 28 49  |2:TY%(I).1:LN%(I|
00003F90: 29 B2 32 00 D9 47 E6 19  49 B2 35 3A 51 24 28 49  |).2..G..I.5:Q$(I|
00003FA0: 29 B2 22 4C 49 4E 45 20  4E 55 4D 42 45 52 20 20  |)."LINE NUMBER  |
00003FB0: 20 20 20 3A 22 3A 58 25  28 49 29 B2 32 30 3A 59  |   :":X%(I).20:Y|
00003FC0: 25 28 49 29 B2 31 32 3A  54 59 25 28 49 29 B2 31  |%(I).12:TY%(I).1|
00003FD0: 3A 4C 4E 25 28 49 29 B2  32 00 1C 48 F0 19 49 B2  |:LN%(I).2..H..I.|
00003FE0: 36 3A 51 24 28 49 29 B2  22 43 4F 4C 55 4D 4E 20  |6:Q$(I)."COLUMN |
00003FF0: 4E 55 4D 42 45 52 20 3A  22 3A 58 25 28 49 29 B2  |NUMBER :":X%(I).|
00004000: 30 3A 59 25 28 49 29 B2  31 34 3A 54 59 25 28 49  |0:Y%(I).14:TY%(I|
00004010: 29 B2 31 3A 4C 4E 25 28  49 29 B2 33 00 3E 48 FA  |).1:LN%(I).3.>H.|
00004020: 19 49 B2 37 3A 51 24 28  49 29 B2 22 43 45 4E 54  |.I.7:Q$(I)."CENT|
00004030: 45 52 49 4E 47 20 28 59  2F 4E 29 3F 20 22 00 66  |ERING (Y/N)? ".f|
00004040: 48 FF 19 58 25 28 49 29  B2 32 30 3A 59 25 28 49  |H..X%(I).20:Y%(I|
00004050: 29 B2 31 34 3A 54 59 25  28 49 29 B2 30 3A 4C 4E  |).14:TY%(I).0:LN|
00004060: 25 28 49 29 B2 31 00 A9  48 04 1A 49 B2 38 3A 51  |%(I).1..H..I.8:Q|
00004070: 24 28 49 29 B2 22 23 20  4F 46 20 44 45 43 49 4D  |$(I)."# OF DECIM|
00004080: 41 4C 53 20 3A 22 3A 58  25 28 49 29 B2 30 3A 59  |ALS :":X%(I).0:Y|
00004090: 25 28 49 29 B2 31 36 3A  54 59 25 28 49 29 B2 31  |%(I).16:TY%(I).1|
000040A0: 3A 4C 4E 25 28 49 29 B2  31 00 CA 48 0E 1A 49 B2  |:LN%(I).1..H..I.|
000040B0: 39 3A 51 24 28 49 29 B2  22 41 43 43 55 4D 55 4C  |9:Q$(I)."ACCUMUL|
000040C0: 41 54 45 20 28 59 2F 4E  29 3F 00 F2 48 13 1A 58  |ATE (Y/N)?..H..X|
000040D0: 25 28 49 29 B2 32 30 3A  59 25 28 49 29 B2 31 36  |%(I).20:Y%(I).16|
000040E0: 3A 54 59 25 28 49 29 B2  30 3A 4C 4E 25 28 49 29  |:TY%(I).0:LN%(I)|
000040F0: B2 31 00 29 49 18 1A 49  B2 31 30 3A 51 24 28 31  |.1.)I..I.10:Q$(1|
00004100: 30 29 B2 22 42 52 45 41  4B 20 54 59 50 45 20 28  |0)."BREAK TYPE (|
00004110: 12 4E 92 4F 4E 45 2C 20  12 4C 92 4E 46 44 53 2C  |.N.ONE, .L.NFDS,|
00004120: 20 12 50 92 41 47 45 29  3F 00 50 49 22 1A 58 25  | .P.AGE)?.PI".X%|
00004130: 28 49 29 B2 30 3A 59 25  28 49 29 B2 31 38 3A 54  |(I).0:Y%(I).18:T|
00004140: 59 25 28 49 29 B2 30 3A  4C 4E 25 28 49 29 B2 31  |Y%(I).0:LN%(I).1|
00004150: 00 7D 49 2C 1A 81 49 B2  31 A4 33 3A 4E 4C 28 49  |.}I,..I.1.3:NL(I|
00004160: 29 B2 31 3A 4E 41 28 49  29 B2 30 3A 82 3A 53 4C  |).1:NA(I).0:.:SL|
00004170: 28 31 29 B2 33 3A 53 4C  28 33 29 B2 33 00 A0 49  |(1).3:SL(3).3..I|
00004180: 40 1A 46 46 24 B2 C7 28  32 35 35 29 3A 52 54 B2  |@.FF$..(255):RT.|
00004190: 35 33 32 34 32 3A 97 33  38 36 35 36 2C 32 35 35  |53242:.38656,255|
000041A0: 00 C1 49 54 1A 4E 28 31  29 B2 31 30 3A 86 48 44  |..IT.N(1).10:.HD|
000041B0: 24 28 4E 28 31 29 29 2C  48 54 24 28 4E 28 31 29  |$(N(1)),HT$(N(1)|
000041C0: 29 00 E2 49 5E 1A 4E 28  32 29 B2 35 30 3A 86 4C  |)..I^.N(2).50:.L|
000041D0: 44 24 28 4E 28 32 29 29  2C 4C 54 24 28 4E 28 32  |D$(N(2)),LT$(N(2|
000041E0: 29 29 00 03 4A 68 1A 4E  28 33 29 B2 31 30 3A 86  |))..Jh.N(3).10:.|
000041F0: 46 44 24 28 4E 28 33 29  29 2C 46 54 24 28 4E 28  |FD$(N(3)),FT$(N(|
00004200: 33 29 29 00 23 4A 72 1A  86 53 4B 24 28 31 35 29  |3)).#Jr..SK$(15)|
00004210: 2C 42 46 28 31 35 2C 31  29 2C 42 46 24 28 31 35  |,BF(15,1),BF$(15|
00004220: 29 3A 8E 00 67 4A 7C 1A  49 B2 30 3A 51 24 B2 22  |):..gJ|.I.0:Q$."|
00004230: 53 4F 52 54 20 54 48 45  20 46 49 4C 45 3F 22 3A  |SORT THE FILE?":|
00004240: 4C 4E B2 31 3A 50 24 B2  22 4E 22 3A 43 53 24 B2  |LN.1:P$."N":CS$.|
00004250: 22 59 4E 22 3A 8D 34 33  39 30 3A 8B 41 24 B2 22  |"YN":.4390:.A$."|
00004260: 59 22 A7 36 38 31 30 00  71 4A 81 1A 8B 46 33 A7  |Y".6810.qJ...F3.|
00004270: 8E 00 9B 4A 86 1A 41 24  B2 22 50 54 2E 22 AA 52  |...J..A$."PT.".R|
00004280: 4E 24 3A 42 24 B2 22 44  41 54 41 22 3A 8D 36 34  |N$:B$."DATA":.64|
00004290: 38 30 3A 8B 45 52 A7 36  30 36 30 00 A7 4A 90 1A  |80:.ER.6060..J..|
000042A0: 40 4C 3B 41 24 3A 8E 00  C9 4A 9A 1A 52 4E 24 B2  |@L;A$:...J..RN$.|
000042B0: 22 5F 22 AA 52 4E 24 3A  9E 42 41 AA 34 32 2C 52  |"_".RN$:.BA.42,R|
000042C0: 4E 24 3A 9E 38 32 38 AA  33 00 F5 4A A4 1A 41 24  |N$:.828.3..J..A$|
000042D0: B2 22 36 34 2E 53 4F 52  54 22 3A 42 24 B2 22 53  |."64.SORT":B$."S|
000042E0: 59 53 54 45 4D 22 3A 8D  36 34 38 30 3A 8B 45 52  |YSTEM":.6480:.ER|
000042F0: A7 36 38 32 30 00 1E 4B  AE 1A 40 43 2C 22 99 90  |.6820..K..@C,"..|
00004300: 05 22 3A 40 4C 3B 22 36  34 2E 53 4F 52 54 2E 47  |.":@L;"64.SORT.G|
00004310: 22 2C 22 39 31 30 30 22  3A 40 58 2C 41 24 00 62  |","9100":@X,A$.b|
00004320: 4B B8 1A 40 4C 3B 22 36  34 2E 24 37 30 30 30 22  |K..@L;"64.$7000"|
00004330: 3A 40 4C 3B 22 36 34 2E  24 37 41 30 30 22 3A 40  |:@L;"64.$7A00":@|
00004340: 4C 3B 22 36 34 2E 24 38  30 30 30 22 3A 40 4C 3B  |L;"64.$8000":@L;|
00004350: 22 36 34 2E 24 30 33 33  43 22 3A 4E 46 24 B2 52  |"64.$033C":NF$.R|
00004360: 4E 24 00 75 4B E0 1A 8D  35 38 39 30 3A 8B 45 52  |N$.uK...5890:.ER|
00004370: A7 36 38 38 30 00 7F 4B  EA 1A 8D 36 32 39 30 00  |.6880..K...6290.|
00004380: 89 4B FE 1A 89 33 30 38  35 00 AC 4B 28 23 97 31  |.K...3085..K(#.1|
00004390: 39 38 2C 30 3A 9F 34 2C  34 3A 98 34 3A 8B 53 54  |98,0:.4,4:.4:.ST|
000043A0: B1 B2 30 A7 A0 34 3A 89  39 30 38 35 00 E0 4B 5F  |..0..4:.9085..K_|
000043B0: 23 A0 34 3A 40 50 2C 32  34 2C 30 2C 22 52 45 41  |#.4:@P,24,0,"REA|
000043C0: 44 59 20 50 52 49 4E 54  45 52 20 41 4E 44 20 50  |DY PRINTER AND P|
000043D0: 52 45 53 53 20 53 50 41  43 45 22 3A 8D 32 30 30  |RESS SPACE":.200|
000043E0: 00 F3 4B 64 23 8B C2 28  31 39 38 29 B2 30 A7 39  |..Kd#..(198).0.9|
000043F0: 30 36 30 00 15 4C 6E 23  A1 4B 59 24 3A 8B 4B 59  |060..Ln#.KY$:.KY|
00004400: 24 B3 B1 22 20 22 AF 4B  59 24 B3 B1 22 10 22 A7  |$.." ".KY$..".".|
00004410: 8D 32 32 30 30 00 34 4C  73 23 40 50 2C 32 34 2C  |.2200.4Ls#@P,24,|
00004420: 30 2C 22 22 3A 8D 32 30  30 3A 8B 4B 59 24 B2 22  |0,"":.200:.KY$."|
00004430: 93 22 A7 8E 00 3E 4C 78  23 89 39 30 30 30 00 58  |."...>Lx#.9000.X|
00004440: 4C 7D 23 9F 34 2C 34 2C  28 C2 28 35 33 32 37 32  |L}#.4,4,(.(53272|
00004450: 29 AF 32 29 AC 33 2E 35  00 7E 4C 82 23 81 5A 49  |).2).3.5.~L.#.ZI|
00004460: B2 31 A4 32 3A 98 34 3A  82 3A 40 44 3A 81 5A 49  |.1.2:.4:.:@D:.ZI|
00004470: B2 31 A4 34 3A 98 34 3A  82 3A A0 34 3A 8E 00 00  |.1.4:.4:.:.4:...|
00004480: 00                                                |.               |
.......4520.N.D.BA.12.4096:BB.8.4096.9:B
.7.4096:BC.31088:LC.48:.B(809).246.:@A..
.I.OF.0:OS.0:OT.0:SN.0:SL.254:RN.0:O.1:C
0$.G(0):C1$.G(1)...N.KY.0:KY$." "."":.15
,8,15:....H.X$."                        
               ":YA.B(214):XA.B(211)...R
.@P,YA,XA,H(X$,39.XA):X$."":@P,YA,XA,"":
..>.1..:.".ENTER FILENAME? ";:FT$."FS..Q
.3..500:X1.X:Y1.Y...6..2,8,2,"0:".FT$.NF
$:.15,A,B$:.FT$."FS."..2,NS,NF,CA...7. 2
...@..A.0..BA.42,NF$:F6.0:..Y.J.@P,24,0,
H(B$,20):." - DIRECTORY (Y/N)? ";...T.AC
$."YN":TY.0:L.1:.550:@P,24,0,"":.200:.A$
."N".360.+.Y.A$."DA.*":.F6.A$."RF.*.N.^.
.BB.15:FG.0:.1380:.".";:.BB.57.F.H.X.X1:
Y.Y1:.510:.310.....C$."...":@C,C$:.G(142
).20.C(TT$).2)TT$......II.1.4:."........
....";:.II:....B.P$.NF$:NF$.A$:Y.Y.2:X.0
:.".";:@P,Y,X,Q$:.".";:.500:NF$.P$...L..
.....Y.B(214):X.B(211):.NF$;.'...KY.1:.B
A.LC,64.\....211,X.1.KY:L.13:TY.0:.560:.
RF .A$."!".KY.1:.511.U...@H,"?",A$:.KY..
0.511.....@H,"*",A$:.KY..0.511.....@H,"@
",A$:.KY..0.511......BA.LC,0.A...NF$.A$:
..W.&.Y.B(214):X.B(211)...0..600...2..L.
1.:@H,A$,AC$:.KY.0.560...5..TY.1.A.E(A$)
...:.....X..B(52).B(50).3..650.O.].@G,Y,
X,L,TY,A$:.2200:.RF.600.U.B........198,1
:.631,13:XZ.B(211):YZ.B(214):OA.B(BA.LC)
.H....BA.LC,0:@G,24,0,39,0,TS$:@P,24,0,"
ONE MOMENT, PLEASE":.200.....Z..(0):@P,2
4,0,TS$:.BA.LC,OA:@P,YZ,XZ,"":TS$."":...
...B$."DATA":.950. ...B$."SYSTEM.[....15
,A:@P,24,0,"PLACE ".B$." DISK IN DRIVE- 
PRESS SPACE.X....KY$:.2200:.KY$.." ".960
...E.@P,24,0,"":.200...J..B$."SYSTEM".99
0...K...N...@P,24,0,"LOADING OPTION...":
.200:....D.FL.0:.1,8,0,"$0:".A$:.15,B1,B
$:.B1..1500:.1455...I..".";:.BA.3.$.N..B
(254).0.1450.7.X..B(198).0.1400.O....KY$
:.2200:.RF.1400.B....KY$.." ".1400.R. ..
BA.6:.1390......:."FREE BLOCKS ="B(251).
256.B(252);..... 1......B(198).0.1460.M.
...KY$:.2200:.RF.1460.S.R........".";:.4
00:@P,24,20.C(B$).2,B$:......RF.0:.KY$..
".".KY$..".".KY$.."."...9....KY$."."..90
00:RF.1:..V...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$.O...@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.-...KY$.KP$:
.RS$."Y".2210.Z. .@P,24,0,TS$:TS$."":@P,
YZ,XZ,"":.BA.LC,OA.Y...KY.KP:KY$.KP$:.2,
P2:RF.1:...... 1......KY$."."........KY$
.".".4365.......X.D..".";:.400:..20.C(TS
$).2)TS$:..20.C(TS$).2);...N..II.1.C(TS$
):.".";:.II:.:.53272,CA:....L..NF.0..626
0.#.V.R(103).0:R1.0.0....F3.3085.N...B$.
"INDEX":.BT$.."I".3070.....@L;"IN.".NF$:
.15,A:.A..950:@P,24,0,"":.200:.3050.....
.BT$."S"..6780.....BL$."":.I.1.PW:BL$.BL
$." ":..G....F4.0..6400.U....53272,CA...
...NK.0.3100......J.1.NK:.I.0.NA(2).1.).
...F(J(LD$(I),2)).BF(J,0).BF(J,1).I:.309
7.0....I.7....J.Y....".REPORTING TO ";:A
$(1)."SCREEN":A$(2)."DISK":A$(3)."PRINTE
R...&.@H,RD$,"SDP":.A$(KY)...+.F7.0:.RD$
."D".T$."T".F7.1.H.0.DV.3:.RD$.."D".3150
...:.DV.DN:A$.",S,W...D..15,"S0:".DF$:.5
,DV,8,"0:".DF$.A$:.3170...N..RD$."S"..5,
3:.3170.A.Q..4,4:.4,G(0);:.ST..0. 4:.316
0.O.R. 4:@P,24,0,"READY PRINTER AND PRES
S SPACE...S..B(198).0.3155...T.@P,24,0,"
":.200:.KY$:.KY$." ".3153.D.U..KY$.".".K
Y$."."..2200...V..KY$.".".F3.1:.4360...W
..3155...X.DV.DN:.5,DV,(B(53272).2).3.5.
:.B.IR.0:.1,8,2,"#":.3830:.BA.39,102:.BT
$."F".RN.0.W.G..NA(3).0.SL(3).0:NL(3).0.
T.H..NA(1).0.SL(1).0:NL(1).0...V.F3.0:.N
A(1).NA(3).0.F1.1:SS.0:EL.255:.3330:.335
0:F3.1:.4359.Y...SS.SL(1).NL(1):EL.LP.SL
(3).NL(3)......3280.....R1.1:.3350......
3430:.F3.4359......3470:.NR.RN.F3.1./...
.F3.1.NB.0.4360.9....3220.E.P..F1.1...O.
Z.R(103).R(103).1:CL.0:LI.1:.R1.0..4220.
....R1.0:SS.SL(1):EL.SS.NL(1)......SS.CL
..0..I.CL.1.SS:.F7.1.3467:.:CL.SS.C....3
550......T2.T3.1:LI.2:.3550:.F7.1.3466:T
3.0...........LI.2.$. .EL.LP:.F1.0.NA(3)
.0.EL.LP.SL(3).NL(3).4.4..R1.0..4220.I.9
.R1.0:.F3..4310:..I.>..3930:.4100:.SL(2)
..65.3380.~.H..3550:R1.0:.F2.....R..3380
...F..F1.1...C.K.SS.LP:EL.LP:.NA(3).EL.L
P.SL(3):SS.EL.NL(3)...P..SS.CL..0..I.CL.
1.SS:.F7.1.3467:.:CL.SS...Z.LI.3:.3550.)
....NA(3)..EL..LP..I.EL.1.LP:.F7.1.3467:
../.....;...CL.CL.1.G....5,"":..\....RD$
.."S".F1.1.......@P,24,0,".SPACE. CONTIN
UES/.CLR. STOPS/.CTRL P. PRINTS..I...S.5
4272:.S.24,15:.S.3,8:.S.2,0:.S.5,9:.S.6,
9......S.1,25:.S,89......S.4,33:.S.4,32:
.I.1.450:.......I.0.24:.S.I,0:../....KY$
:.KY$.".".KY$."."..2200.T.A..KY$.." ".KY
$..".".KY$..".".3520.M.B..KY$."."..9075:
.3475..E..KY$.".".F3.1...J.@P,24,0,"---
------------------------------------":@P
,24,0,"".F.T...O...F2.0......NA(LI).0...
.....F1.1.LI.2.CL.0......CL.NL(LI).2.LP.
NL(3).SL(3).F2.1.3....I.1.NL(LI):CL$.BL$
."".O....J.0.NA(LI).1:.LI.3610,3620:FD$.
FD$(J):T1$.FT$(J):.3630.....FD$.HD$(J):T
1$.HT$(J):.3630...$.FD$.LD$(J):T1$.LT$(J
):.T3.0.F(FD$).84.3790.W....F(J(FD$,5)).
.I.3790...8.CM.F(J(FD$,6)):LN.F(J(FD$,4)
):SB.F(J(FD$,2))...=.CN.F(J(FD$,7)).(.B.
.T3.3740.B.L.A$.G(F(FD$)):.LI.3.J(FD$,9,
1).."N".Q.NK.1:.4180:.3750.Q.V..AC.1.372
0...`.CS$."RDTF":@H,A$,CS$:.KY.3710,3700
,3740...J.F$.RE$(SB).L.K..(F(J(FA$(SB),5
)).1).0.3750...L..F(J(FD$,8)).32..BB.51,
E(F$),LN,F(J(FD$,8)),F$.'.M..J(FD$,8,1).
" ".:@M,C0$,FD$,8:.3692.1.S..3750.F.T.F$
.DP$(SB):.3750.O.~..BB.51,R(SB),LN,F(J(F
D$,8)),F$:.3750......J(FD$,9,1)."N".F$."
 ":.3750......BB.51,AC(J),LN,F(J(FD$,8))
,F$:.3750.X...F$.T1$:.F$."".F$.H(BL$,LN)
......3760.....F$.H(F$,LN)......CN.89.T$
."T"..BA.27,F$:.3766.%....T$."T".3766.\.
...CN.89..BA.27,F$:A.(LN.C(F$)).2:CM.CM.
.(A)..(.(A)).W....T$.."T".RD$.."D".3780.
.....5,F$:."."F$:.J:.3820...D..CM.1.F$.J
(F$,.(CM).2):CM.1.K.I..CM..PW.:@M,F$,CL$
,CM.R.N..J...X..RD$."P".F(DF$.C0$).0..5,
DF$;......RD$.."S"..BA.27,CL$. ....5,CL$
:CL.CL.1.)....I:..2...F0.0.@...NA.0:NB.0
.W....828,1,AF%(0):.828,1,AC(0):.AF%(NA(
2)),AC(NA(2).1).....T2.0:.I.0.NA(2).1...
...LT$(I).."".F(LD$(I))..84.T2.1.Y....F(
J(LD$(I),9)).89.AF%(NA).I:NA.NA.1......F
(I(LD$(I),1))..78.F0.1:NB.NB.1...(..:.82
8,2,A(0,0):.A(NA,NK).;.2..BT$.."S".NK.0.
NB.0:F0.0:..J.<..4220:IR.0...F..NB..I.1.
NK:BF$(I).H(RE$(BF(I,0)),F(J(LD$(BF(I,1)
),4)))...K..NB.....P.....Z..F0.0.....N..
BF.1.NK...X..BF$(BF)..H(RE$(BF(BF,0)),F(
J(LD$(BF(BF,1)),4))).3975......:......R1
.1:@E,RE$(0),TE$(0)... ..Q.NK.BF..1.1...
.Q.0.Z$."P":.4006.W...Z$.I(LD$(BF(Q,1)),
1):.Z$."N".4045.|....CL.NL(2).4..LP.SL(3
).NL(3).4010......3430:.3470:.3280:R1.1:
EL.LP.SL(3).NL(3).T....F7.0.NA.0..5:.5,"
TOTAL FOR ";:CL.CL.1......NA..5,BF$(Q):C
L.CL.1.. ...I.0.NA.1:AF.AF%(I).. ..AC(AF
).A(I,Q).G H.A(I,Q).0:.:LI.2:AC.1:.3550:
AC.0:.F7.1.3466.B J..Z$.."P".F2.F3..0.40
45.. L.AC.0:.4090:AC.1:LI.2:.BF.Q.:@E,RE
$(0),TE$(0).. M.... R.@E,RE$(0),TE$(0):.
3910:AC.0:... ...3430:.3470:.Q.BF.:@E,RE
$(0),TE$(0)..!...3280:EL.LP.SL(3).NL(3):
...!...NA.0....!...J.0.NA.1.K!..TY$.H(LD
$(AF%(J)),1):T1.F(J(LD$(AF%(J)),2)).A!..
.TY$."R".T1.R(T1).|!"..TY$."F".T1.E(RE$(
T1))..!,..TY$."D".T1.E(DP$(T1))..!6..I.0
.NK..!@.A(J,I).A(J,I).T1.B!J..:.:..Q!T.A
F.AF%(CB).."^.LN.F(J(LD$(AF),4)):DC.F(J(
LD$(AF),8)):SB.F(J(LD$(AF),2)).*"H..BB.5
1,A(CB,Q),LN,DC,F$.P"R.A(CB,Q).0:CB.CB.1
:.AF%(CB).0.CB.0.V"W...Z"|.@E,RE$(0),TE$
(0):.F9.:@B,DP$(0).."...A$:.A$.."".A$.."
.".KY$.A$:.2200:.KY$.".".F3.1:..A"...BT$
."F".4260.."...B.18,IR:IR.IR.1:.RN.0.RN.
NR.F3.1:..."...4275..#...RN.NR.F3.1:...#
...B:.B(2).128.F3.1:..'#...4280.=#...B.6
:.B(2).1.4280.G#...4240.P#..@R,RN,RE$(0)
:RN.RN.1:R(100).RN:.BB:..|#V..NA.0....#.
.BF.0:.BT$.."S".NK.0..#...3975.O#...BT$.
"S".F3.1:LI.2:EL.LP.SL(3).NL(3):.3940:..
.#...:        .LI.2..3980..#...LI..2..40
00..$.....$...3470..$.. 5: 1: 8: 15.A$..
.".";:.400:.:.,".REPORT COMPLETE..Y$..."
RUN ANOTHER REPORT Y/N? ";:L.1:TY.0:AC$.
"YN":.550..$..RN.0:CS$."":NB.0:F1.0:@B,B
F$(0)..$...A$."Y"..100:.4580..$...2,0:@X
,"64.CREATEEDIT": 15:.15,8,15:.945:.4365
..%...".";:@P,Y,X,Q$:." ";:.I.3....%...P
$" ";:..!%&.Y.Y.2.)%0.X.0.^%:..".";:@P,Y
,X,Q$:X1.B(211).1:.F(P$."A")..32.." ";..
%D..".";:.I.3..:.P$" ":@G,Y.1,0,LN,TY,A$
:A.KY:.4450..%N..P$;..%X.@G,Y,X1,LN,TY,A
$:A.KY.P%B..2200:.RF.P$.A$:.4410..%L..B(
52).B(50).2..650..%...LN..13..BA.27,A$."
&...CS$."".:@H,A$,CS$:.B(2).0.4440.O&...
TY.1.MX.0.(E(A$).MX.E(A$)..0).I..8.4440.
B&..CS$."":P$."":.. &...100:.6540:.".";:
TT$."REPORT GENERATE":.400:AC$."DK":TY.0
..&...BA.45,NF$..&...F(NF$).95.RN$.J(NF$
,2):.BA.42,RN$:.6840..'...:.".REPORT FRO
M .K.EYBOARD OR .D.ISKFILE? ";:L.1:.550.
0'F.RF$.A$:.RF$."K".4590.O'P.NF$."":.:."
.ENTER REPORT FILE NAME? ";:FT$."RF.":F6
.1:.307..'Z.A$.FT$.NF$:RN$.NF$:.5900:.BA
.42,NF$.W'...:.".DO YOU WISH TO MODIFY T
HE REPORT? ";:AC$."YN":L.1:.550..'...A$.
"N".3020..'...F3.0..305:.6280..(..F3.0. 
(..TS$."SELECTION":.2500.6(...C(SS$).0.S
S$.FF$.H(..Q$."ENTER SEARCH CRITERIA":P$
.H(SS$,C(SS$).1).~(..X.B(214):Y.B(211).A
(..@P,24,0,"PRESS RETURN IF NONE ARE REQ
UIRED":.200:.214,X:.211,Y..(..CS$."":LN.
40:TY.0:Y.4:I.3:.4390:I.0:X.B(214):Y.B(2
11)..)..@P,24,0,"":.200:.214,X:.211,Y./)
...A$."".A$.FF$.M)..SS$.A$:.I(SS$,1).FF$
.4660.V) ..F(I(SS$,1)).222.SS$.H(SS$,C(S
S$).1)..)*.SS$.SS$.FF$.K)4.Q$."IN ORDER 
BY .I.NDEX, .S.ORT OR .F.ILE?":TY.0:P$.B
T$:CS$."ISF..)>.LN.1:Y.14:.4400:BT$.A$:M
X.15:.BT$.."S".4830..*C.TS$."SORT CONDIT
IONS":.2500.V*H.Q$."ENTER NUMBER OF SORT
 KEYS?":P$.D(NK):LN.2:Y.5:TY.1.T*R..4400
:NK.E(A$):.NK.0.4690..*W..KY$.".".4830.G
*\..:.".FIELD   LEN   .A.LPHA/NUM      .
A.SCD/.D.ESD":.J.0.NK.1..+F.C.0:Y.J.8:TY
.1:LN.3:Q$."":.C(SK$(J)).0.SK$(J).C0$.C0
$.)+P.P$.D(F(SK$(J)).1):TM.F(J(SK$(J),2)
).H+Z.P3$."A":.(TM.64).TM.P3$."D.U+..P1$
.D(TM.63):P2$."A":.(TM.128).TM.P2$."N..+
..MX.NF:.4400:TM.E(A$).1:.F(SK$(J)).TM.S
K$(J).G(TM):.4760.Y+..SK$(J).G(TM):P1$.D
(F(J(FA$(TM),4)))..,..MX.F(J(FA$(TM),4))
:P$.P1$:.E(P$).0.P$.D(MX).&,..X.8:LN.2:.
4410:C.C.E(A$).A,..P$.P2$:CS$."AN":.P$."
".P$.G(65.(F(J(FA$(TM),5)).1).13)..,..X.
17:LN.1:TY.0:.4410:.A$."N".C.C.128..,..P
$.P3$:.P$."".P$."A.I,..X.33:CS$."AD":.44
10:.A$."D".C.C.64..,J.SK$(J).SK$(J).G(C)
:.A..95.4710..-T.BF(J.1,0).F(SK$(J)):..1
-..TS$."OUTPUT CONDITIONS":.2500:Y.3:TY.
0.R-..Q$."OUTPUT TO .S.CREEN, .P.RINTER,
 .D.ISK?":CS$."SPD":P$.RD$..-...4390:RD$
.A$:.RD$."S".4980..-..P$."4":MX.7:.RD$."
D".P$."8":MX.15..-..Q$."ENTER DEVICE NUM
BER?":TY.1:LN.1:.4390:DN.E(A$)......RD$.
."D".4940.'...P$.T$:Q$."ENTER .S.EQ OR .
T.EXT ?.A...CS$."ST":P$.T$:TY.0:.4390:T$
.A$:.C(DF$).3.P$.J(DF$,4)...$.Q$."ENTER 
DISK FILE NAME?":A$."":.450:DF$."SB.".A$
:.BA.27,DF$.G.8..T$."T".Q$(7)."STRIP SPA
CES Y/N.Q.B..4980../L.P$."0":.RD$."P".RF
$."K".PW.PP:LP.PL:SL(3).3.//V.Q$."ENTER 
PRINTER CONTROL CHARACTER?":I.8.[/[.MX.2
55:TY.1:LN.3:.4390:DF$.G(E(A$)):I.0.Z/T.
.RD$."D".T$."T".SC.1:.5020../~.MX.255:Q$
."ENTER LINE LENGTH?":TY.1:P$.D(PW):LN.3
:.4390:PW.E(A$)../..Q$."ENTER NUMBER OF 
LINES PER PAGE?":P$.D(LP):LN.2:.4390..0.
.LP.E(A$):SC.1.60...".":TS$."DEFINE PRIN
T ZONES":.2500.X0..I.1:@P,24,0,".PRESS .
SPACE. SELECTS/.RETURN. EXECUTES........
..0...SC.4.SC.0:.NA(2).0.SC.1.R0..."..DE
FINE ."F$(SC)".    -."NA(SC)".. PRINT AR
EAS USED ...0...B(198).0.5055..1D..KY$:.
2200:.KY$." ".SC.SC.1:.5040. 1I..KY$..G(
13).5055.@1N..SC.0..2201:.RF.1.6060,5025
.|1X..5590:MX.LP:C$(1)."1111111200"."":C
$(2)."1111111220".""..1..C$(3)."11111112
20"."":Q$.NL$:.BT$."S".:@M,"1",C$(2),10.
.1..P$.D(NL(SC)):Y.5:LN.2:TY.1:.4400..2.
.NL(SC).E(A$):MX.MX.NL(SC):Q$.SL$.C2..CC
$."":.LN.1.NL(SC):CC$.CC$.C1$:.:A$."TOP?
":.SC.3.A$."BOTTOM?.\2..Q$.Q$.A$:.SC..2.
5180..2..Q$."PRINT .A.LL OR .B.REAK ONLY
?":CS$."AB":TY.0:LN.1..2..P$.G(SL(SC)):.
P$.C0$.P$."A".L2...4390:SL(SC).F(A$).V22
..5190..2<.I.8:P$.D(SL(SC)):.4390:SL(SC)
.E(A$).)3F..T$."T".RD$."D".A$."00":@M,A$
,C$(SC),5.:3P..J.0.N(SC).1._3Z.CA$.C$(SC
)."":I.0:.5590:.J.0.J.0..3D..SC.5230,524
0:O$.FD$(J):T1$.FT$(J):.5250..3N.O$.HD$(
J):T1$.HT$(J):.5250.D3X.O$.LD$(J):T1$.LT
$(J)..3...O$."".O$.O1$:@M,H(CC$,1),O$,6.
!4..."PRINT AREA # "J.1.25)N(SC).NA(SC)"
AREAS OPEN":.5870.;4..A$."":I.I.1:.I.11.
I.3.Y4 .A.F(J(CA$,I)):.A..48.5310.T4...A
$.".".I.I.2:.I.2.I.2.~4...5270. 4..O$.O1
$:I.0:T1$."":.5590:.5260..4...5810..4H..
4410.G4I.B$.O$."":.5600..4K..H(B$,2).H(O
$,2).5339..5L.B$.H(O$,1):@H,B$,"RDF":.KY
.5325,5327,5329:.5339.B5M.KY.F(J(O$,2)):
.KY.NV(2).KY.1:@M,C0$,O$,2.S5N.@M,G(12),
O$,4:@M,C0$,O$,8:@M,"N",O$,10:.5870. 5O.
KY.F(J(O$,2)):.KY.NV(3).KY.1:@M,C0$,O$,2
.R5P.@M,J(DA$(KY),4,1),O$,4:@M,C0$."NN",
O$,8:.5870..5Q.KY.F(J(O$,2)):.KY.NV(1).K
Y.1:@M,C0$,O$,2.+6R.@M,J(FA$(KY),4,1),O$
,4:@M,C0$."NN",O$,8.56T..5870._6...H(O$,
1).."T".SC..2.I.1.:@M,"0",CA$,3.N6...I.3
..5470..6...I..5.J(B$,5,1).J(O$,5,1).535
0..6..@M,J(CC$,F(J(O$,5)),1),O$,6..6..CS
$."_......":.4370:A$.G(A):@H,A$,CS$:CS$.
"":P$."":.KY.0.5270..7...KY.5380,5290,53
80,5380,5302.07...NA(SC).0.J.N(SC):.5440
.O7...SC.5364,5366,5368:J.J.1:NA(SC).NA(
SC).1:.J..NA(SC).1.5210.Y7...5450..7...B
A.36,J,HD$(J):.BA.36,J,HT$(J):HD$(NA(1))
."":HT$(NA(1))."":...7...BA.36,J,LD$(J):
.BA.36,J,LT$(J):LD$(NA(2))."":LT$(NA(2))
."":..?8...BA.36,J,FD$(J):.BA.36,J,FT$(J
):FD$(NA(3))."":FT$(NA(3))."":.._8...F(J
(O$,4)).0.J.N(SC):.5440.Z8...J.NA(SC).1.
NA(SC).J.1..8...SC.5410,5420:FD$(J).O$:F
T$(J).T1$:.5430.F8".HD$(J).O$:HT$(J).T1$
:.5430..8,.LD$(J).O$:LT$(J).T1$..86..A.9
5.J.N(SC)..9;..A.140.J.J.1:.5210.29@.A.F
(J(O$,6)).F(J(O$,4)):.A..PW.A.PW.1.S9E.A
1.F(J(O$,5)):@M,G(A),CC$,A1.Y9J...C9T..5
020.Q9^..I.2.5560..9..CA$."1111111110"."
"..9...A$."T".:@M,"0",CA$,2:@M,"00",CA$,
8..9....K9...H(O$,1).."F"....9B..F(J(FA$
(F(A$)),5)).0.:@M,"00",CA$,8..:L..SC..2.
..%:N..IQ.1.NK:.F(A$)..BF(IQ,0)..IQ:..9:
Q.@M,"1",CA$,10:..]:V..".":TS$.F$(SC)." 
ZONE":.2500:..U:..P$.A$:.I.3.T1$.A$:...:
...TY%(I).1.A$.G(E(A$))..:...I.2.A$.G(F(
A$).1)..:..@M,A$,O$,I:...:..MX.0:.I.5690
,5700,5670,5740,5710,5720,5800,5680,5800
..;..CS$."NLP":...;&....;0.MX.10:..#;:.C
S$."FRDT":..R;D.@H,H(O$,1),"FRD":MX.NV(K
Y):P$.G(F(P$).1):..B;N.MX.NL(SC):...;X..
P$.C1$.P$.J(CC$,F(J(O$,5)),1)..;B.MX.PW.
F(J(O$,4)).1:...;L.MX.F(J(O$,2))..;Q..H(
O$,1)."F".MX..NV(1).MX.F(J(FA$(MX),4))..
<V..H(O$,1)."T".MX.PW:P$.J(O$,4,1)."  ":
..(<...H(O$,1)."R".MX.F(J(O$,4)).V<...H(
O$,1)."D".MX..NV(3).MX.F(J(DA$(MX),4)).O
<...MX.C(T1$).MX.C(T1$)..<...P$.C0$.P$.G
(MX)."  "..<.....<..CS$."YN":...<..MX.0:
.I.3.P$.T1$:.5840.P<..P$.J(O$,I,1):.5650
..=F..TY%(I).1.P$.J(D(F(P$)),2)."  ":.E(
P$).32.I.8.P$."  ".;=P.Q$.Q$(I):Y.Y%(I):
X.X%(I):LN.LN%(I):TY.TY%(I).A=Z...F=..TM
.I:.I.1.10:.5810:.4370:.I:I.TM..=..@P,11
,0,".........1.........2.........3......
...4":..F=..A$."RF.".NF$:B$."DATA":.6480
:.ER...Z=...8,8,8,A$.",S,R..>..@IN,8,NF$
:.8,NK:.BA.42,NF$:.NK.0.5930.<> ..J.0.NK
.1:@IL,2,8,SK$(J):BF(J.1,0).F(SK$(J).G(0
)):..C>*.@IN,8,SS$:@IN,8,RD$:@IN,8,T$:.8
,PW..>4..8,LP:@IN,8,BT$ :@IN,8,MA$:@IN,8
,VA$..>>..8,DN:@IN,8,DF$:.8,NL.A>H..8,NA
(1):.NA(1).0.5990.T>R..8,NL(1),SL(1)..?\
..J.0.NA(1).1:@IL,10,8,HD$(J):@IN,8,HT$(
J):...?F..8,NA(2):.NA(2).0.6020.5?P..8,N
L(2),SL(2),ZW.E?Z..J.0.NA(2).1:@IL,10,8,
LD$(J):@IN,8,LT$(J):...?...8,NA(3):.NA(3
).0.6050..?...8,NL(3),SL(3).C?...J.0.NA(
3).1:@IL,10,8,FD$(J):@IN,8,FT$(J):..L?..
 8:...?..TS$."REPORT DATA":.2500:P$."Y":
Y.3.9@..I.0:Q$."SAVE THE REPORT CONDITIO
NS?":LN.1:TY.0:.4390:.A$."N".3020.~@..Q$
."ENTER REPORT FILE NAME? ":A$.RN$:.450:
.15,"S0:RF.".A$:RN$.A$..@T..8,8,8,"0:RF.
".A$.",S,W..@...8,NF$:.8,NK:.NK.0.6130.Q
@...I.0.NK.1:.8,SK$(I);:...@...8,SS$:.8,
RD$:.8,T$:.8,PW..A...8,LP:.8,BT$:.8,MA$:
.8,VA$.%A...8,DN:.8,DF$:.8,NL.@A...8,NA(
1):.NA(1).0.6190.VA...8,NL(1):.8,SL(1).Z
A$..J.0.NA(1).1:.8,HD$(J);HT$(J):...A...
8,NA(2):.NA(2).0.6220..A8..8,NL(2):.8,SL
(2):.8,ZW.UAB..J.0.NA(2).1:.8,LD$(J);LT$
(J):...AL..8,NA(3):.NA(3).0.6241..BV..8,
NL(3):.8,SL(3).*B`..J.0.NA(3).1:.8,FD$(J
);FT$(J):..DBA..15,J:.J..72. 8:.3020.SBJ
. 8:@P,24,0,"DISK FULL - ONE MOMENT, PLE
ASE..BO..200:.15,"V0":Y.Y.4:.6070..BT.FA
$.NF$.IB~.F9.0:A$."FS.".FA$:B$."DATA":.6
480:.ER....B..@P,24,0,"FOUND FILE LOADIN
G.....C...2,8,2,"SC.".NF$:.BB.9,1:.BB.30
,1: 2.AC..@L;"TS.".NF$,"BA00":@L;"BM.".N
F$,"FF00".IC..ND.0:.1,8,2,"AR.".NF$:.15,
A:.A.6340.VC...BB.3: 1..C..F9.1:.1,8,2,"
DP.".NF$:.15,A:.A.6340.BC...1,ND:.DA$(ND
),DP$(ND):.RT.4,ND..C..NV(3).ND:.I.0.ND.
1:@IL,4,1,DA$(I):...CD. 1:F4.1.)DX..1,8,
2,"FS.".NF$:.1,NS,NF,CA,LR,NR,SC$,P1$,P2
$.OD...FA$(NF.1),RE$(NF.1),TE$(NF.1),R(1
05):.1018,105:.RT.5,NF:NV(1).NF.|D..R(10
4).2..D..NV(2).105:.RT.1,.(LR.256):.RT,L
R.(256..(LR.256))..D...RT.3,.(NR.256):.R
T.2,NR.(256..(NR.256))..E..FR.47360:.I.0
.NF.1:@IL,5,1,FA$(I):.FR.I,F(J(FA$(I),4)
).HE...:.BA.30,RE$(0):.BA.30,TE$(0): 1:.
53272,CA.{E..O1$."F".C0$." ".J(FA$(0),4,
1).C1$.C0$."N NN":...EP..8,8,8,A$:.#8,P$
:ER.ST: 8:.ER.0....EZ..950:...E..TY.0:LP
.24:PL.66:PW.39:PP.80:RF$."K":RD$."S":T$
."S":BT$."F..E..MA$."N".>F ..F$(3):F$(1)
."HEADER":F$(2)."LIST  ":F$(3)."FOOTER":
F$(0)."EXIT  "..F..NL$."NUMBER OF LINES 
IN ZONE?":SL$."NUMBER OF LINES FROM THE 
"..F..I.1:Q$(I)."DATA TYPE (.F.-.R.-.D.-
.T.):".TFC.X%(I).0:Y%(I).7:TY%(I).0:LN%(
I).1..GH.I.2:Q$(I)."SUBSCRIPT:":X%(I).25
:Y%(I).7:TY%(I).1:LN%(I).3.PGR.I.3:Q$(I)
."TEXT/TITLE":X%(I).0:Y%(I).9:TY%(I).0:L
N%(I).40..G..I.4:Q$(I)."LENGTH OF AREA:"
:X%(I).0:Y%(I).12:TY%(I).1:LN%(I).2.YG..
I.5:Q$(I)."LINE NUMBER     :":X%(I).20:Y
%(I).12:TY%(I).1:LN%(I).2..H..I.6:Q$(I).
"COLUMN NUMBER :":X%(I).0:Y%(I).14:TY%(I
).1:LN%(I).3.>H..I.7:Q$(I)."CENTERING (Y
/N)? ".FH..X%(I).20:Y%(I).14:TY%(I).0:LN
%(I).1..H..I.8:Q$(I)."# OF DECIMALS :":X
%(I).0:Y%(I).16:TY%(I).1:LN%(I).1.JH..I.
9:Q$(I)."ACCUMULATE (Y/N)?..H..X%(I).20:
Y%(I).16:TY%(I).0:LN%(I).1.)I..I.10:Q$(1
0)."BREAK TYPE (.N.ONE, .L.NFDS, .P.AGE)
?.PI".X%(I).0:Y%(I).18:TY%(I).0:LN%(I).1
.}I,..I.1.3:NL(I).1:NA(I).0:.:SL(1).3:SL
(3).3. I@.FF$.G(255):RT.53242:.38656,255
.AIT.N(1).10:.HD$(N(1)),HT$(N(1))..I^.N(
2).50:.LD$(N(2)),LT$(N(2))..JH.N(3).10:.
FD$(N(3)),FT$(N(3)).#JR..SK$(15),BF(15,1
),BF$(15):..GJ|.I.0:Q$."SORT THE FILE?":
LN.1:P$."N":CS$."YN":.4390:.A$."Y".6810.
QJ...F3....J..A$."PT.".RN$:B$."DATA":.64
80:.ER.6060..J..@L;A$:..IJ..RN$."_".RN$:
.BA.42,RN$:.828.3..J..A$."64.SORT":B$."S
YSTEM":.6480:.ER.6820..K..@C,"...":@L;"6
4.SORT.G","9100":@X,A$.BK..@L;"64.$7000"
:@L;"64.$7A00":@L;"64.$8000":@L;"64.$033
C":NF$.RN$.UK...5890:.ER.6880.K...6290.
.K...3085..K(#.198,0:.4,4:.4:.ST..0. 4:.
9085..K_# 4:@P,24,0,"READY PRINTER AND P
RESS SPACE":.200..KD#.B(198).0.9060..LN#
.KY$:.KY$.." ".KY$.."."..2200.4LS#@P,24,
0,"":.200:.KY$."."...>LX#.9000.XL}#.4,4,
(B(53272).2).3.5.~L.#.ZI.1.2:.4:.:@D:.ZI
.1.4:.4:.: 4:....
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL