64.REPORT
FILE INFORMATION
FILENAME(S): 64.REPORT
FILE TYPE(S): PRG
FILE SIZE: 16.5K
FIRST SEEN: 2025-11-30 21:21:08
APPEARS ON: 1 disk(s)
FILE HASH
8a43f1bfa131fee709c691ee4cdd0475101891ce16f2bd36190bb7681556ec4c
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| EASYFILE | 64.REPORT | PRG | DuncanTwain | 28 | 4 | 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 1E 11 D6 0B 52 28 31 30 33 29 B2 30 00 2B |0.....R(103).0.+|
00000920: 11 DB 0B 8B 46 33 A7 33 30 38 35 00 49 11 E0 0B |....F3.3085.I...|
00000930: 42 24 B2 22 49 4E 44 45 58 22 3A 8B 42 54 24 B3 |B$."INDEX":.BT$.|
00000940: B1 22 49 22 A7 33 30 37 30 00 7E 11 EA 0B 40 4C |."I".3070.~...@L|
00000950: 3B 22 49 4E 2E 22 AA 4E 46 24 3A 84 31 35 2C 41 |;"IN.".NF$:.15,A|
00000960: 3A 8B 41 A7 8D 39 35 30 3A 40 50 2C 32 34 2C 30 |:.A..950:@P,24,0|
00000970: 2C 22 22 3A 8D 32 30 30 3A 89 33 30 35 30 00 91 |,"":.200:.3050..|
00000980: 11 FE 0B 8B 42 54 24 B2 22 53 22 A7 8D 36 37 38 |....BT$."S"..678|
00000990: 30 00 B2 11 0D 0C 42 4C 24 B2 22 22 3A 81 49 B2 |0.....BL$."":.I.|
000009A0: 31 A4 50 57 3A 42 4C 24 B2 42 4C 24 AA 22 20 22 |1.PW:BL$.BL$." "|
000009B0: 3A 82 00 C2 11 12 0C 8B 46 34 B2 30 A7 8D 36 34 |:.......F4.0..64|
000009C0: 30 30 00 D0 11 17 0C 97 35 33 32 37 32 2C 43 41 |00......53272,CA|
000009D0: 00 12 12 1C 0C 99 22 93 52 45 50 4F 52 54 49 4E |......".REPORTIN|
000009E0: 47 20 54 4F 20 22 3B 3A 41 24 28 31 29 B2 22 53 |G TO ";:A$(1)."S|
000009F0: 43 52 45 45 4E 22 3A 41 24 28 32 29 B2 22 44 49 |CREEN":A$(2)."DI|
00000A00: 53 4B 22 3A 41 24 28 33 29 B2 22 50 52 49 4E 54 |SK":A$(3)."PRINT|
00000A10: 45 52 00 2B 12 26 0C 40 48 2C 52 44 24 2C 22 53 |ER.+.&.@H,RD$,"S|
00000A20: 44 50 22 3A 99 41 24 28 4B 59 29 00 49 12 2B 0C |DP":.A$(KY).I.+.|
00000A30: 46 37 B2 30 3A 8B 52 44 24 B2 22 44 22 AF 54 24 |F7.0:.RD$."D".T$|
00000A40: B2 22 54 22 A7 46 37 B2 31 00 61 12 30 0C 44 56 |."T".F7.1.a.0.DV|
00000A50: B2 33 3A 8B 52 44 24 B3 B1 22 44 22 A7 33 31 35 |.3:.RD$.."D".315|
00000A60: 30 00 74 12 3A 0C 44 56 B2 44 4E 3A 41 24 B2 22 |0.t.:.DV.DN:A$."|
00000A70: 2C 53 2C 57 00 A0 12 44 0C 98 31 35 2C 22 53 30 |,S,W...D..15,"S0|
00000A80: 3A 22 AA 44 46 24 3A 9F 35 2C 44 56 2C 38 2C 22 |:".DF$:.5,DV,8,"|
00000A90: 30 3A 22 AA 44 46 24 AA 41 24 3A 89 33 31 37 30 |0:".DF$.A$:.3170|
00000AA0: 00 B8 12 4E 0C 8B 52 44 24 B2 22 53 22 A7 9F 35 |...N..RD$."S"..5|
00000AB0: 2C 33 3A 89 33 31 37 30 00 DA 12 51 0C 9F 34 2C |,3:.3170...Q..4,|
00000AC0: 34 3A 98 34 2C C7 28 30 29 3B 3A 8B 53 54 B1 B2 |4:.4,.(0);:.ST..|
00000AD0: 30 A7 A0 34 3A 89 33 31 36 30 00 08 13 52 0C A0 |0..4:.3160...R..|
00000AE0: 34 3A 40 50 2C 32 34 2C 30 2C 22 52 45 41 44 59 |4:@P,24,0,"READY|
00000AF0: 20 50 52 49 4E 54 45 52 20 41 4E 44 20 50 52 45 | PRINTER AND PRE|
00000B00: 53 53 20 53 50 41 43 45 00 1B 13 53 0C 8B C2 28 |SS SPACE...S...(|
00000B10: 31 39 38 29 B2 30 A7 33 31 35 35 00 32 13 54 0C |198).0.3155.2.T.|
00000B20: A1 4B 59 24 3A 8B 4B 59 24 B2 22 20 22 A7 33 31 |.KY$:.KY$." ".31|
00000B30: 35 33 00 4D 13 55 0C 8B 4B 59 24 B2 22 85 22 B0 |53.M.U..KY$.".".|
00000B40: 4B 59 24 B2 22 89 22 A7 8D 32 32 30 30 00 5F 13 |KY$."."..2200._.|
00000B50: 56 0C 8B 4B 59 24 B2 22 93 22 A7 34 33 36 30 00 |V..KY$.".".4360.|
00000B60: 69 13 57 0C 89 33 31 35 35 00 8A 13 58 0C 44 56 |i.W..3155...X.DV|
00000B70: B2 44 4E 3A 9F 35 2C 44 56 2C 28 C2 28 35 33 32 |.DN:.5,DV,(.(532|
00000B80: 37 32 29 AF 32 29 AC 33 2E 35 00 BD 13 62 0C 49 |72).2).3.5...b.I|
00000B90: 52 B2 30 3A 9F 31 2C 38 2C 32 2C 22 23 22 3A 8D |R.0:.1,8,2,"#":.|
00000BA0: 33 38 33 30 3A 9E 42 41 AA 33 39 2C 31 30 32 3A |3830:.BA.39,102:|
00000BB0: 8B 42 54 24 B2 22 46 22 A7 52 4E B2 30 00 F7 13 |.BT$."F".RN.0...|
00000BC0: 76 0C 46 33 B2 30 3A 8B 4E 41 28 31 29 AA 4E 41 |v.F3.0:.NA(1).NA|
00000BD0: 28 33 29 B2 30 A7 46 31 B2 31 3A 53 53 B2 30 3A |(3).0.F1.1:SS.0:|
00000BE0: 45 4C B2 32 35 35 3A 8D 33 33 35 30 3A 46 33 B2 |EL.255:.3350:F3.|
00000BF0: 31 3A 89 34 33 35 39 00 1C 14 80 0C 53 53 B2 53 |1:.4359.....SS.S|
00000C00: 4C 28 31 29 AA 4E 4C 28 31 29 3A 45 4C B2 4C 50 |L(1).NL(1):EL.LP|
00000C10: AB 53 4C 28 33 29 AB 4E 4C 28 33 29 00 36 14 94 |.SL(3).NL(3).6..|
00000C20: 0C 8D 33 32 38 30 3A 8B 46 33 A7 8D 34 33 31 30 |..3280:.F3..4310|
00000C30: 3A 89 33 32 34 30 00 40 14 9E 0C 8D 33 33 35 30 |:.3240.@....3350|
00000C40: 00 53 14 A8 0C 8D 33 34 33 30 3A 8B 46 33 A7 34 |.S....3430:.F3.4|
00000C50: 33 35 39 00 69 14 B2 0C 8D 33 34 37 30 3A 8B 4E |359.i....3470:.N|
00000C60: 52 B2 52 4E A7 46 33 B2 31 00 7D 14 B7 0C 8B 46 |R.RN.F3.1.}....F|
00000C70: 33 B2 31 AF 4E 42 B2 30 A7 34 33 36 30 00 87 14 |3.1.NB.0.4360...|
00000C80: BC 0C 89 33 32 32 30 00 9B 14 D0 0C 52 28 31 30 |...3220.....R(10|
00000C90: 33 29 B2 52 28 31 30 33 29 AA 31 00 A9 14 DA 0C |3).R(103).1.....|
00000CA0: 43 4C B2 31 3A 4C 49 B2 31 00 C2 14 E4 0C 53 53 |CL.1:LI.1.....SS|
00000CB0: B2 53 4C 28 31 29 3A 45 4C B2 53 53 AA 4E 4C 28 |.SL(1):EL.SS.NL(|
00000CC0: 31 29 00 EC 14 EE 0C 8B 53 53 AB 43 4C B3 B1 30 |1)......SS.CL..0|
00000CD0: A7 81 49 B2 43 4C A4 53 53 3A 91 46 37 AA 31 8D |..I.CL.SS:.F7.1.|
00000CE0: 33 34 36 37 3A 82 3A 43 4C B2 53 53 00 F6 14 F8 |3467:.:CL.SS....|
00000CF0: 0C 8D 33 35 35 30 00 1E 15 02 0D 8B 54 32 A7 54 |..3550......T2.T|
00000D00: 33 B2 31 3A 4C 49 B2 32 3A 8D 33 35 35 30 3A 91 |3.1:LI.2:.3550:.|
00000D10: 46 37 AA 31 8D 33 34 36 36 3A 54 33 B2 30 00 24 |F7.1.3466:T3.0.$|
00000D20: 15 0C 0D 8E 00 2D 15 16 0D 4C 49 B2 32 00 57 15 |.....-...LI.2.W.|
00000D30: 20 0D 45 4C B2 4C 50 3A 8B 46 31 B2 30 AF 4E 41 | .EL.LP:.F1.0.NA|
00000D40: 28 33 29 B1 30 A7 45 4C B2 4C 50 AB 53 4C 28 33 |(3).0.EL.LP.SL(3|
00000D50: 29 AB 4E 4C 28 33 29 00 6D 15 34 0D 8D 34 32 32 |).NL(3).m.4..422|
00000D60: 30 3A 8B 46 33 A7 8D 34 33 31 30 3A 8E 00 8D 15 |0:.F3..4310:....|
00000D70: 3E 0D 8D 33 39 33 30 3A 8D 34 31 30 30 3A 8B 53 |>..3930:.4100:.S|
00000D80: 4C 28 32 29 B3 B1 36 35 A7 33 33 38 30 00 A2 15 |L(2)..65.3380...|
00000D90: 48 0D 8D 33 35 35 30 3A 8B 46 32 A7 42 30 B2 30 |H..3550:.F2.B0.0|
00000DA0: 3A 8E 00 AC 15 52 0D 89 33 33 38 30 00 DB 15 66 |:....R..3380...f|
00000DB0: 0D 53 53 B2 4C 50 3A 45 4C B2 4C 50 3A 8B 4E 41 |.SS.LP:EL.LP:.NA|
00000DC0: 28 33 29 A7 45 4C B2 4C 50 AB 53 4C 28 33 29 3A |(3).EL.LP.SL(3):|
00000DD0: 53 53 B2 45 4C AB 4E 4C 28 33 29 00 07 16 70 0D |SS.EL.NL(3)...p.|
00000DE0: 8B 53 53 AB 43 4C B3 B1 30 A7 81 49 B2 43 4C AA |.SS.CL..0..I.CL.|
00000DF0: 31 A4 53 53 3A 91 46 37 AA 31 8D 33 34 36 37 3A |1.SS:.F7.1.3467:|
00000E00: 82 3A 43 4C B2 53 53 00 16 16 7A 0D 4C 49 B2 33 |.:CL.SS...z.LI.3|
00000E10: 3A 8D 33 35 35 30 00 43 16 84 0D 8B 4E 41 28 33 |:.3550.C....NA(3|
00000E20: 29 A7 8B 45 4C AA 31 B3 B1 4C 50 A7 81 49 B2 45 |)..EL.1..LP..I.E|
00000E30: 4C AA 31 A4 4C 50 3A 91 46 37 AA 31 8D 33 34 36 |L.1.LP:.F7.1.346|
00000E40: 37 3A 82 00 49 16 89 0D 8E 00 55 16 8A 0D 43 4C |7:..I.....U...CL|
00000E50: B2 43 4C AA 31 00 61 16 8B 0D 98 35 2C 22 22 3A |.CL.1.a....5,"":|
00000E60: 8E 00 71 16 8E 0D 8B 52 44 24 B3 B1 22 53 22 A7 |..q....RD$.."S".|
00000E70: 8E 00 AD 16 93 0D 40 50 2C 32 34 2C 30 2C 22 05 |......@P,24,0,".|
00000E80: 53 50 41 43 45 98 20 43 4F 4E 54 49 4E 55 45 53 |SPACE. CONTINUES|
00000E90: 2F 20 05 43 4C 52 98 20 53 54 4F 50 53 2F 05 43 |/ .CLR. STOPS/.C|
00000EA0: 54 52 4C 20 50 98 20 50 52 49 4E 54 05 00 DE 16 |TRL P. PRINT....|
00000EB0: 98 0D 53 B2 35 34 32 37 32 3A 97 53 AA 32 34 2C |..S.54272:.S.24,|
00000EC0: 31 35 3A 97 53 AA 33 2C 38 3A 97 53 AA 32 2C 30 |15:.S.3,8:.S.2,0|
00000ED0: 3A 97 53 AA 35 2C 39 3A 97 53 AA 36 2C 39 00 F0 |:.S.5,9:.S.6,9..|
00000EE0: 16 A2 0D 97 53 AA 31 2C 32 35 3A 97 53 2C 38 39 |....S.1,25:.S,89|
00000EF0: 00 0F 17 AC 0D 97 53 AA 34 2C 33 33 3A 97 53 AA |......S.4,33:.S.|
00000F00: 34 2C 33 32 3A 81 49 B2 31 A4 34 35 30 3A 82 00 |4,32:.I.1.450:..|
00000F10: 24 17 B6 0D 81 49 B2 30 A4 32 34 3A 97 53 AA 49 |$....I.0.24:.S.I|
00000F20: 2C 30 3A 82 00 44 17 C0 0D A1 4B 59 24 3A 8B 4B |,0:..D....KY$:.K|
00000F30: 59 24 B2 22 89 22 B0 4B 59 24 B2 22 85 22 A7 8D |Y$.".".KY$."."..|
00000F40: 32 32 30 30 00 69 17 C1 0D 8B 4B 59 24 B3 B1 22 |2200.i....KY$.."|
00000F50: 20 22 AF 4B 59 24 B3 B1 22 93 22 AF 4B 59 24 B3 | ".KY$..".".KY$.|
00000F60: B1 22 10 22 A7 33 35 32 30 00 82 17 C2 0D 8B 4B |.".".3520......K|
00000F70: 59 24 B2 22 10 22 A7 8D 39 30 37 35 3A 89 33 34 |Y$."."..9075:.34|
00000F80: 37 35 00 94 17 C5 0D 8B 4B 59 24 B2 22 93 22 A7 |75......KY$.".".|
00000F90: 46 33 B2 31 00 D5 17 CA 0D 40 50 2C 32 34 2C 30 |F3.1.....@P,24,0|
00000FA0: 2C 22 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |,"--------------|
00000FB0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000FC0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 3A 40 50 2C 32 34 |---------":@P,24|
00000FD0: 2C 30 2C 22 22 00 DB 17 D4 0D 8E 00 E4 17 DE 0D |,0,""...........|
00000FE0: 46 32 B2 30 00 F4 17 E8 0D 8B 4E 41 28 4C 49 29 |F2.0......NA(LI)|
00000FF0: B2 30 A7 8E 00 08 18 F2 0D 8B 46 31 B2 31 AF 4C |.0........F1.1.L|
00001000: 49 B2 32 A7 43 4C B2 30 00 2E 18 FC 0D 8B 43 4C |I.2.CL.0......CL|
00001010: AA 4E 4C 28 4C 49 29 AC 32 B1 B2 4C 50 AB 4E 4C |.NL(LI).2..LP.NL|
00001020: 28 33 29 AB 53 4C 28 33 29 A7 46 32 B2 31 00 49 |(3).SL(3).F2.1.I|
00001030: 18 06 0E 81 49 B2 31 A4 4E 4C 28 4C 49 29 3A 43 |....I.1.NL(LI):C|
00001040: 4C 24 B2 42 4C 24 AA 22 22 00 85 18 10 0E 81 4A |L$.BL$.""......J|
00001050: B2 30 A4 4E 41 28 4C 49 29 AB 31 3A 91 4C 49 89 |.0.NA(LI).1:.LI.|
00001060: 33 36 31 30 2C 33 36 32 30 3A 46 44 24 B2 46 44 |3610,3620:FD$.FD|
00001070: 24 28 4A 29 3A 54 31 24 B2 46 54 24 28 4A 29 3A |$(J):T1$.FT$(J):|
00001080: 89 33 36 33 30 00 A5 18 1A 0E 46 44 24 B2 48 44 |.3630.....FD$.HD|
00001090: 24 28 4A 29 3A 54 31 24 B2 48 54 24 28 4A 29 3A |$(J):T1$.HT$(J):|
000010A0: 89 33 36 33 30 00 D4 18 24 0E 46 44 24 B2 4C 44 |.3630...$.FD$.LD|
000010B0: 24 28 4A 29 3A 54 31 24 B2 4C 54 24 28 4A 29 3A |$(J):T1$.LT$(J):|
000010C0: 8B 54 33 B1 30 AF C6 28 46 44 24 29 B2 38 34 A7 |.T3.0..(FD$).84.|
000010D0: 33 37 39 30 00 ED 18 2E 0E 8B C6 28 CA 28 46 44 |3790.......(.(FD|
000010E0: 24 2C 35 29 29 B3 B1 49 A7 33 37 39 30 00 1E 19 |$,5))..I.3790...|
000010F0: 38 0E 43 4D B2 C6 28 CA 28 46 44 24 2C 36 29 29 |8.CM..(.(FD$,6))|
00001100: 3A 4C 4E B2 C6 28 CA 28 46 44 24 2C 34 29 29 3A |:LN..(.(FD$,4)):|
00001110: 53 42 B2 C6 28 CA 28 46 44 24 2C 32 29 29 00 31 |SB..(.(FD$,2)).1|
00001120: 19 3D 0E 43 4E B2 C6 28 CA 28 46 44 24 2C 37 29 |.=.CN..(.(FD$,7)|
00001130: 29 00 3E 19 42 0E 8B 54 33 A7 33 37 34 30 00 78 |).>.B..T3.3740.x|
00001140: 19 4C 0E 41 24 B2 C7 28 C6 28 46 44 24 29 29 3A |.L.A$..(.(FD$)):|
00001150: 8B 4C 49 B2 33 AF CA 28 46 44 24 2C 39 2C 31 29 |.LI.3..(FD$,9,1)|
00001160: B3 B1 22 4E 22 A7 51 B2 4E 4B AA 31 3A 8D 34 31 |.."N".Q.NK.1:.41|
00001170: 38 30 3A 89 33 37 35 30 00 87 19 56 0E 8B 41 43 |80:.3750...V..AC|
00001180: B2 31 A7 33 37 32 30 00 B3 19 60 0E 43 53 24 B2 |.1.3720...`.CS$.|
00001190: 22 52 44 54 46 22 3A 40 48 2C 41 24 2C 43 53 24 |"RDTF":@H,A$,CS$|
000011A0: 3A 91 4B 59 89 33 37 31 30 2C 33 37 30 30 2C 33 |:.KY.3710,3700,3|
000011B0: 37 34 30 00 C2 19 6A 0E 46 24 B2 52 45 24 28 53 |740...j.F$.RE$(S|
000011C0: 42 29 00 E2 19 6B 0E 8B 28 C6 28 CA 28 46 41 24 |B)...k..(.(.(FA$|
000011D0: 28 53 42 29 2C 35 29 29 AF 31 29 B2 30 A7 33 37 |(SB),5)).1).0.37|
000011E0: 35 30 00 15 1A 6C 0E 8B C6 28 CA 28 46 44 24 2C |50...l...(.(FD$,|
000011F0: 38 29 29 B3 33 32 A7 9E 42 42 AA 35 31 2C C5 28 |8)).32..BB.51,.(|
00001200: 46 24 29 2C 4C 4E 2C C6 28 CA 28 46 44 24 2C 38 |F$),LN,.(.(FD$,8|
00001210: 29 29 2C 46 24 00 3D 1A 6D 0E 8B CA 28 46 44 24 |)),F$.=.m...(FD$|
00001220: 2C 38 2C 31 29 B2 22 20 22 A7 3A 40 4D 2C 43 30 |,8,1)." ".:@M,C0|
00001230: 24 2C 46 44 24 2C 38 3A 89 33 36 39 32 00 47 1A |$,FD$,8:.3692.G.|
00001240: 73 0E 89 33 37 35 30 00 5C 1A 74 0E 46 24 B2 44 |s..3750.\.t.F$.D|
00001250: 50 24 28 53 42 29 3A 89 33 37 35 30 00 85 1A 7E |P$(SB):.3750...~|
00001260: 0E 9E 42 42 AA 35 31 2C 52 28 53 42 29 2C 4C 4E |..BB.51,R(SB),LN|
00001270: 2C C6 28 CA 28 46 44 24 2C 38 29 29 2C 46 24 3A |,.(.(FD$,8)),F$:|
00001280: 89 33 37 35 30 00 A6 1A 88 0E 8B CA 28 46 44 24 |.3750.......(FD$|
00001290: 2C 39 2C 31 29 B2 22 4E 22 A7 46 24 B2 22 20 22 |,9,1)."N".F$." "|
000012A0: 3A 89 33 37 35 30 00 CF 1A 92 0E 9E 42 42 AA 35 |:.3750......BB.5|
000012B0: 31 2C 41 43 28 4A 29 2C 4C 4E 2C C6 28 CA 28 46 |1,AC(J),LN,.(.(F|
000012C0: 44 24 2C 38 29 29 2C 46 24 3A 89 33 37 35 30 00 |D$,8)),F$:.3750.|
000012D0: E0 1A 9C 0E 46 24 B2 54 31 24 3A 89 33 37 36 30 |....F$.T1$:.3760|
000012E0: 00 F0 1A A6 0E 46 24 B2 C8 28 46 24 2C 4C 4E 29 |.....F$..(F$,LN)|
000012F0: 00 12 1B B0 0E 8B 43 4E B2 38 39 AF 54 24 B2 22 |......CN.89.T$."|
00001300: 54 22 A7 9E 42 41 AA 32 37 2C 46 24 3A 89 33 37 |T"..BA.27,F$:.37|
00001310: 36 36 00 23 1B B3 0E 8B 54 24 B2 22 54 22 A7 33 |66.#....T$."T".3|
00001320: 37 36 36 00 59 1B B5 0E 8B 43 4E B2 38 39 A7 9E |766.Y....CN.89..|
00001330: 42 41 AA 32 37 2C 46 24 3A 43 4D B2 43 4D AA B5 |BA.27,F$:CM.CM..|
00001340: 28 28 4C 4E AB C3 28 46 24 29 29 AD 32 29 3A 8B |((LN..(F$)).2):.|
00001350: 43 4D B3 31 A7 43 4D B2 31 00 74 1B B6 0E 8B 54 |CM.1.CM.1.t....T|
00001360: 24 B3 B1 22 54 22 B0 52 44 24 B3 B1 22 44 22 A7 |$.."T".RD$.."D".|
00001370: 33 37 38 30 00 8E 1B BA 0E 98 35 2C 46 24 3A 99 |3780......5,F$:.|
00001380: 22 12 22 46 24 3A 82 4A 3A 89 33 38 32 30 00 B2 |"."F$:.J:.3820..|
00001390: 1B C4 0E 9E 42 41 AA 32 37 2C 46 24 3A 8B 43 4D |....BA.27,F$:.CM|
000013A0: B3 B2 50 57 A7 3A 40 4D 2C 46 24 2C 43 4C 24 2C |..PW.:@M,F$,CL$,|
000013B0: 43 4D 00 B9 1B CE 0E 82 4A 00 DB 1B D8 0E 8B 52 |CM......J......R|
000013C0: 44 24 B2 22 50 22 AF C6 28 44 46 24 AA 43 30 24 |D$."P"..(DF$.C0$|
000013D0: 29 B1 30 A7 98 35 2C 44 46 24 3B 00 F4 1B DD 0E |).0..5,DF$;.....|
000013E0: 8B 52 44 24 B3 B1 22 53 22 A7 9E 42 41 AA 32 37 |.RD$.."S"..BA.27|
000013F0: 2C 43 4C 24 00 07 1C E2 0E 98 35 2C 43 4C 24 3A |,CL$......5,CL$:|
00001400: 43 4C B2 43 4C AA 31 00 10 1C EC 0E 82 49 3A 8E |CL.CL.1......I:.|
00001410: 00 19 1C F6 0E 46 30 B2 30 00 27 1C F9 0E 4E 41 |.....F0.0.'...NA|
00001420: B2 30 3A 4E 42 B2 30 00 5E 1C 00 0F 9E 38 32 38 |.0:NB.0.^....828|
00001430: 2C 31 2C 41 46 25 28 30 29 3A 9E 38 32 38 2C 31 |,1,AF%(0):.828,1|
00001440: 2C 41 43 28 30 29 3A 86 41 46 25 28 4E 41 28 32 |,AC(0):.AF%(NA(2|
00001450: 29 29 2C 41 43 28 4E 41 28 32 29 AB 31 29 00 6F |)),AC(NA(2).1).o|
00001460: 1C 0A 0F 81 49 B2 30 A4 4E 41 28 32 29 AB 31 00 |....I.0.NA(2).1.|
00001470: 92 1C 0F 0F 8B 4C 54 24 28 49 29 B3 B1 22 22 AF |.....LT$(I).."".|
00001480: C6 28 4C 44 24 28 49 29 29 B3 B1 38 34 A7 54 32 |.(LD$(I))..84.T2|
00001490: B2 31 00 BB 1C 14 0F 8B C6 28 CA 28 4C 44 24 28 |.1.......(.(LD$(|
000014A0: 49 29 2C 39 29 29 B2 38 39 A7 41 46 25 28 4E 41 |I),9)).89.AF%(NA|
000014B0: 29 B2 49 3A 4E 41 B2 4E 41 AA 31 00 E0 1C 1E 0F |).I:NA.NA.1.....|
000014C0: 8B C6 28 C9 28 4C 44 24 28 49 29 2C 31 29 29 B3 |..(.(LD$(I),1)).|
000014D0: B1 37 38 A7 46 30 B2 31 3A 4E 42 B2 4E 42 AA 31 |.78.F0.1:NB.NB.1|
000014E0: 00 00 1D 28 0F 82 3A 9E 38 32 38 2C 32 2C 41 28 |...(..:.828,2,A(|
000014F0: 30 2C 30 29 3A 86 41 28 4E 41 2C 4E 4B AA 31 29 |0,0):.A(NA,NK.1)|
00001500: 00 1F 1D 32 0F 8B 42 54 24 B3 B1 22 53 22 B0 4E |...2..BT$.."S".N|
00001510: 4B B2 30 A7 4E 42 B2 30 3A 46 30 B2 30 3A 8E 00 |K.0.NB.0:F0.0:..|
00001520: 2E 1D 3C 0F 8D 34 32 32 30 3A 49 52 B2 30 00 54 |..<..4220:IR.0.T|
00001530: 1D 46 0F 8B 4E 42 A7 81 49 B2 30 A4 4E 42 AB 31 |.F..NB..I.0.NB.1|
00001540: 3A 42 46 24 28 49 29 B2 52 45 24 28 42 46 28 49 |:BF$(I).RE$(BF(I|
00001550: 29 29 3A 82 00 5A 1D 50 0F 8E 00 66 1D 5A 0F 8B |)):..Z.P...f.Z..|
00001560: 46 30 B2 30 A7 8E 00 81 1D 64 0F 8B 46 33 A7 42 |F0.0.....d..F3.B|
00001570: 46 B2 30 3A 4E 42 B2 4E 42 AA 31 3A 89 33 39 38 |F.0:NB.NB.1:.398|
00001580: 30 00 90 1D 6E 0F 81 42 46 B2 30 A4 4E 42 AB 31 |0...n..BF.0.NB.1|
00001590: 00 AF 1D 78 0F 8B 52 45 24 28 42 46 28 42 46 29 |...x..RE$(BF(BF)|
000015A0: 29 B3 B1 42 46 24 28 42 46 29 A7 33 39 38 30 00 |)..BF$(BF).3980.|
000015B0: B7 1D 82 0F 82 3A 8E 00 E6 1D 8C 0F 53 52 B2 42 |.....:......SR.B|
000015C0: 30 AC 28 4E 4C 28 32 29 AA 34 29 3A 40 45 2C 52 |0.(NL(2).4):@E,R|
000015D0: 45 24 28 30 29 2C 54 45 24 28 30 29 3A 40 42 2C |E$(0),TE$(0):@B,|
000015E0: 52 45 24 28 30 29 00 29 1E 96 0F 8B 43 4C AA 53 |RE$(0).)....CL.S|
000015F0: 52 B1 4C 50 AB 53 4C 28 33 29 AB 4E 4C 28 33 29 |R.LP.SL(3).NL(3)|
00001600: A7 8D 33 34 33 30 3A 8D 33 34 37 30 3A 8D 33 32 |..3430:.3470:.32|
00001610: 38 30 3A 42 30 B2 30 3A 45 4C B2 4C 50 AB 53 4C |80:B0.0:EL.LP.SL|
00001620: 28 33 29 AB 4E 4C 28 33 29 00 42 1E A0 0F 4C 49 |(3).NL(3).B...LI|
00001630: B2 32 3A 41 43 B2 31 3A 81 51 B2 42 46 A4 4E 42 |.2:AC.1:.Q.BF.NB|
00001640: AB 31 00 6C 1E AA 0F 8B 46 37 B2 30 AF 4E 41 B1 |.1.l....F7.0.NA.|
00001650: 30 A7 98 35 3A 98 35 2C 22 42 52 45 41 4B 20 4F |0..5:.5,"BREAK O|
00001660: 4E 20 22 3B 3A 43 4C B2 43 4C AA 31 00 8E 1E AB |N ";:CL.CL.1....|
00001670: 0F 8B 4E 41 A7 98 35 2C 42 46 24 28 51 29 3A 43 |..NA..5,BF$(Q):C|
00001680: 4C B2 43 4C AA 31 3A 42 30 B2 42 30 AA 31 00 A6 |L.CL.1:B0.B0.1..|
00001690: 1E B4 0F 81 49 B2 30 A4 4E 41 AB 31 3A 41 46 B2 |....I.0.NA.1:AF.|
000016A0: 41 46 25 28 49 29 00 B8 1E BE 0F 41 43 28 41 46 |AF%(I).....AC(AF|
000016B0: 29 B2 41 28 49 2C 51 29 00 D8 1E C8 0F 41 28 49 |).A(I,Q).....A(I|
000016C0: 2C 51 29 B2 30 3A 82 3A 8D 33 35 35 30 3A 91 46 |,Q).0:.:.3550:.F|
000016D0: 37 AA 31 8D 33 34 36 36 00 DE 1E CD 0F 82 00 FE |7.1.3466........|
000016E0: 1E D2 0F 40 45 2C 52 45 24 28 30 29 2C 54 45 24 |...@E,RE$(0),TE$|
000016F0: 28 30 29 3A 8D 33 39 31 30 3A 41 43 B2 30 00 25 |(0):.3910:AC.0.%|
00001700: 1F E6 0F 8B C9 28 4C 44 24 28 42 46 28 42 46 29 |.....(LD$(BF(BF)|
00001710: 29 2C 31 29 B2 22 50 22 AF 46 32 AA 46 33 B2 30 |),1)."P".F2.F3.0|
00001720: A7 34 30 39 30 00 2B 1F F0 0F 8E 00 53 1F FA 0F |.4090.+.....S...|
00001730: 8D 33 34 33 30 3A 8D 33 34 37 30 3A 8D 33 32 38 |.3430:.3470:.328|
00001740: 30 3A 45 4C B2 4C 50 AB 53 4C 28 33 29 AB 4E 4C |0:EL.LP.SL(3).NL|
00001750: 28 33 29 00 5F 1F 04 10 8B 4E 41 B2 30 A7 8E 00 |(3)._....NA.0...|
00001760: 6D 1F 09 10 81 4A B2 30 A4 4E 41 AB 31 00 9D 1F |m....J.0.NA.1...|
00001770: 0E 10 54 59 24 B2 C8 28 4C 44 24 28 41 46 25 28 |..TY$..(LD$(AF%(|
00001780: 4A 29 29 2C 31 29 3A 54 31 B2 C6 28 CA 28 4C 44 |J)),1):T1..(.(LD|
00001790: 24 28 41 46 25 28 4A 29 29 2C 32 29 29 00 B3 1F |$(AF%(J)),2))...|
000017A0: 18 10 8B 54 59 24 B2 22 52 22 A7 54 31 B2 52 28 |...TY$."R".T1.R(|
000017B0: 54 31 29 00 CE 1F 22 10 8B 54 59 24 B2 22 46 22 |T1)..."..TY$."F"|
000017C0: A7 54 31 B2 C5 28 52 45 24 28 54 31 29 29 00 E9 |.T1..(RE$(T1))..|
000017D0: 1F 2C 10 8B 54 59 24 B2 22 44 22 A7 54 31 B2 C5 |.,..TY$."D".T1..|
000017E0: 28 44 50 24 28 54 31 29 29 00 04 20 31 10 41 28 |(DP$(T1)).. 1.A(|
000017F0: 4A 2C 4E 4B AA 31 29 B2 41 28 4A 2C 4E 4B AA 31 |J,NK.1).A(J,NK.1|
00001800: 29 AA 54 31 00 10 20 36 10 81 49 B2 30 A4 4E 42 |).T1.. 6..I.0.NB|
00001810: 00 25 20 40 10 41 28 4A 2C 49 29 B2 41 28 4A 2C |.% @.A(J,I).A(J,|
00001820: 49 29 AA 54 31 00 2F 20 4A 10 82 3A 82 3A 8E 00 |I).T1./ J..:.:..|
00001830: 3E 20 54 10 41 46 B2 41 46 25 28 43 42 29 00 7B |> T.AF.AF%(CB).{|
00001840: 20 5E 10 4C 4E B2 C6 28 CA 28 4C 44 24 28 41 46 | ^.LN..(.(LD$(AF|
00001850: 29 2C 34 29 29 3A 44 43 B2 C6 28 CA 28 4C 44 24 |),4)):DC..(.(LD$|
00001860: 28 41 46 29 2C 38 29 29 3A 53 42 B2 C6 28 CA 28 |(AF),8)):SB..(.(|
00001870: 4C 44 24 28 41 46 29 2C 32 29 29 00 97 20 68 10 |LD$(AF),2)).. h.|
00001880: 9E 42 42 AA 35 31 2C 41 28 43 42 2C 51 29 2C 4C |.BB.51,A(CB,Q),L|
00001890: 4E 2C 44 43 2C 46 24 00 BD 20 72 10 41 28 43 42 |N,DC,F$.. r.A(CB|
000018A0: 2C 51 29 B2 30 3A 43 42 B2 43 42 AA 31 3A 8B 41 |,Q).0:CB.CB.1:.A|
000018B0: 46 25 28 43 42 29 B2 30 A7 43 42 B2 30 00 C3 20 |F%(CB).0.CB.0.. |
000018C0: 77 10 8E 00 E7 20 7C 10 40 45 2C 52 45 24 28 30 |w.... |.@E,RE$(0|
000018D0: 29 2C 54 45 24 28 30 29 3A 8B 46 39 A7 3A 40 42 |),TE$(0):.F9.:@B|
000018E0: 2C 44 50 24 28 30 29 00 1C 21 81 10 A1 41 24 3A |,DP$(0)..!...A$:|
000018F0: 8B 41 24 B3 B1 22 22 AF 41 24 B3 B1 22 10 22 A7 |.A$.."".A$..".".|
00001900: 4B 59 24 B2 41 24 3A 8D 32 32 30 30 3A 8B 4B 59 |KY$.A$:.2200:.KY|
00001910: 24 B2 22 93 22 A7 46 33 B2 31 3A 8E 00 2E 21 86 |$.".".F3.1:...!.|
00001920: 10 8B 42 54 24 B2 22 46 22 A7 34 32 36 30 00 56 |..BT$."F".4260.V|
00001930: 21 90 10 9E 42 AA 31 38 2C 49 52 3A 49 52 B2 49 |!...B.18,IR:IR.I|
00001940: 52 AA 31 3A 8B 52 4E B3 30 B0 52 4E B1 4E 52 A7 |R.1:.RN.0.RN.NR.|
00001950: 46 33 B2 31 3A 8E 00 60 21 9A 10 89 34 32 37 35 |F3.1:..`!...4275|
00001960: 00 72 21 A4 10 8B 52 4E B2 4E 52 A7 46 33 B2 31 |.r!...RN.NR.F3.1|
00001970: 3A 8E 00 8A 21 AE 10 9E 42 3A 8B C2 28 32 29 B2 |:...!...B:..(2).|
00001980: 31 32 38 A7 46 33 B2 31 3A 8E 00 94 21 B2 10 89 |128.F3.1:...!...|
00001990: 34 32 38 30 00 AA 21 B3 10 9E 42 AA 36 3A 8B C2 |4280..!...B.6:..|
000019A0: 28 32 29 B2 31 A7 34 32 38 30 00 B4 21 B4 10 89 |(2).1.4280..!...|
000019B0: 34 32 34 30 00 DD 21 B8 10 40 52 2C 52 4E 2C 52 |4240..!..@R,RN,R|
000019C0: 45 24 28 30 29 3A 52 4E B2 52 4E AA 31 3A 52 28 |E$(0):RN.RN.1:R(|
000019D0: 31 30 30 29 B2 52 4E 3A 9E 42 42 3A 8E 00 E9 21 |100).RN:.BB:...!|
000019E0: D6 10 8B 4E 41 B2 30 A7 8E 00 1A 22 E0 10 8B 42 |...NA.0...."...B|
000019F0: 54 24 B2 22 53 22 A7 46 33 B2 31 3A 4C 49 B2 32 |T$."S".F3.1:LI.2|
00001A00: 3A 45 4C B2 4C 50 AB 53 4C 28 33 29 AB 4E 4C 28 |:EL.LP.SL(3).NL(|
00001A10: 33 29 3A 8D 33 39 34 30 3A 8E 00 2A 22 EA 10 8B |3):.3940:..*"...|
00001A20: 4C 49 B2 32 A7 8D 33 39 38 30 00 3B 22 F4 10 8B |LI.2..3980.;"...|
00001A30: 4C 49 B3 B1 32 A7 8D 34 30 30 30 00 41 22 FE 10 |LI..2..4000.A"..|
00001A40: 8E 00 4B 22 07 11 8D 33 34 37 30 00 5C 22 08 11 |..K"...3470.\"..|
00001A50: A0 35 3A A0 31 3A A0 38 3A A0 31 35 00 82 22 09 |.5:.1:.8:.15..".|
00001A60: 11 99 22 93 22 3B 3A 8D 34 30 30 3A 99 3A 99 2C |..".";:.400:.:.,|
00001A70: 22 11 52 45 50 4F 52 54 20 43 4F 4D 50 4C 45 54 |".REPORT COMPLET|
00001A80: 45 11 00 BA 22 0A 11 99 22 52 55 4E 20 41 4E 4F |E..."..."RUN ANO|
00001A90: 54 48 45 52 20 52 45 50 4F 52 54 20 59 2F 4E 3F |THER REPORT Y/N?|
00001AA0: 20 22 3B 3A 4C B2 31 3A 54 59 B2 30 3A 41 43 24 | ";:L.1:TY.0:AC$|
00001AB0: B2 22 59 4E 22 3A 8D 35 35 30 00 DE 22 0B 11 52 |."YN":.550.."..R|
00001AC0: 4E B2 30 3A 43 53 24 B2 22 22 3A 4E 42 B2 30 3A |N.0:CS$."":NB.0:|
00001AD0: 46 31 B2 30 3A 40 42 2C 42 46 24 28 30 29 00 F5 |F1.0:@B,BF$(0)..|
00001AE0: 22 0C 11 8B 41 24 B2 22 59 22 A7 8D 31 30 30 3A |"...A$."Y"..100:|
00001AF0: 89 34 35 38 30 00 29 23 0D 11 97 32 2C 30 3A 40 |.4580.)#...2,0:@|
00001B00: 58 2C 22 36 34 2E 43 52 45 41 54 45 45 44 49 54 |X,"64.CREATEEDIT|
00001B10: 22 3A A0 31 35 3A 9F 31 35 2C 38 2C 31 35 3A 8D |":.15:.15,8,15:.|
00001B20: 39 34 35 3A 89 34 33 36 35 00 53 23 12 11 99 22 |945:.4365.S#..."|
00001B30: 98 22 3B 3A 40 50 2C 59 2C 58 2C 51 24 3A 99 22 |.";:@P,Y,X,Q$:."|
00001B40: 20 22 3B 3A 8B 49 B2 33 A7 99 3A 99 41 24 28 33 | ";:.I.3..:.A$(3|
00001B50: 29 3A 8E 00 61 23 1C 11 99 50 24 22 20 22 3B 3A |):..a#...P$" ";:|
00001B60: 8E 00 6B 23 26 11 59 B2 59 AA 32 00 73 23 30 11 |..k#&.Y.Y.2.s#0.|
00001B70: 58 B2 30 00 A8 23 3A 11 99 22 9E 22 3B 3A 40 50 |X.0..#:..".";:@P|
00001B80: 2C 59 2C 58 2C 51 24 3A 58 31 B2 C2 28 32 31 31 |,Y,X,Q$:X1..(211|
00001B90: 29 AA 31 3A 8B C6 28 50 24 AA 22 41 22 29 B3 B1 |).1:..(P$."A")..|
00001BA0: 33 32 A7 99 22 20 22 3B 00 DD 23 44 11 99 22 05 |32.." ";..#D..".|
00001BB0: 22 3B 3A 8B 49 B2 33 A7 99 3A 99 50 24 22 20 22 |";:.I.3..:.P$" "|
00001BC0: 3A 40 47 2C 59 AA 31 2C 30 2C 4C 4E 2C 54 59 2C |:@G,Y.1,0,LN,TY,|
00001BD0: 41 24 3A 41 B2 4B 59 3A 89 34 34 35 30 00 E6 23 |A$:A.KY:.4450..#|
00001BE0: 4E 11 99 50 24 3B 00 17 24 58 11 40 47 2C 59 2C |N..P$;..$X.@G,Y,|
00001BF0: 58 31 2C 4C 4E 2C 54 59 2C 41 24 3A 41 B2 4B 59 |X1,LN,TY,A$:A.KY|
00001C00: 3A 8B C6 28 41 24 29 B2 33 32 B0 C5 28 41 24 29 |:..(A$).32..(A$)|
00001C10: B3 30 A7 34 34 34 30 00 31 24 62 11 8D 32 32 30 |.0.4440.1$b..220|
00001C20: 30 3A 8B 52 46 A7 50 24 B2 41 24 3A 89 34 34 31 |0:.RF.P$.A$:.441|
00001C30: 30 00 49 24 6C 11 8B C2 28 35 32 29 AB C2 28 35 |0.I$l...(52)..(5|
00001C40: 30 29 B3 32 A7 8D 36 35 30 00 5F 24 80 11 8B 4C |0).2..650._$...L|
00001C50: 4E B3 B1 31 33 A7 9E 42 41 AA 32 37 2C 41 24 00 |N..13..BA.27,A$.|
00001C60: 83 24 8A 11 8B 43 53 24 B1 22 22 A7 3A 40 48 2C |.$...CS$."".:@H,|
00001C70: 41 24 2C 43 53 24 3A 8B C2 28 32 29 B2 30 A7 34 |A$,CS$:..(2).0.4|
00001C80: 34 34 30 00 AF 24 94 11 8B 54 59 B2 31 AF 4D 58 |440..$...TY.1.MX|
00001C90: B1 30 AF 28 C5 28 41 24 29 B1 4D 58 B0 C5 28 41 |.0.(.(A$).MX..(A|
00001CA0: 24 29 B2 30 29 AF 49 B3 B1 38 A7 34 34 34 30 00 |$).0).I..8.4440.|
00001CB0: C2 24 9E 11 43 53 24 B2 22 22 3A 50 24 B2 22 22 |.$..CS$."":P$.""|
00001CC0: 3A 8E 00 00 25 A8 11 8D 31 30 30 3A 8D 36 35 34 |:...%...100:.654|
00001CD0: 30 3A 99 22 93 22 3B 3A 54 54 24 B2 22 52 45 50 |0:.".";:TT$."REP|
00001CE0: 4F 52 54 20 47 45 4E 45 52 41 54 45 22 3A 8D 34 |ORT GENERATE":.4|
00001CF0: 30 30 3A 41 43 24 B2 22 44 4B 22 3A 54 59 B2 30 |00:AC$."DK":TY.0|
00001D00: 00 0F 25 B2 11 9E 42 41 AA 34 35 2C 4E 46 24 00 |..%...BA.45,NF$.|
00001D10: 3C 25 B7 11 8B C6 28 4E 46 24 29 B2 39 35 A7 52 |<%....(NF$).95.R|
00001D20: 4E 24 B2 CA 28 4E 46 24 2C 32 29 3A 9E 42 41 AA |N$..(NF$,2):.BA.|
00001D30: 34 32 2C 52 4E 24 3A 89 36 38 34 30 00 77 25 BC |42,RN$:.6840.w%.|
00001D40: 11 99 3A 99 22 11 52 45 50 4F 52 54 20 46 52 4F |..:.".REPORT FRO|
00001D50: 4D 20 12 4B 92 45 59 42 4F 41 52 44 20 4F 52 20 |M .K.EYBOARD OR |
00001D60: 12 44 92 49 53 4B 46 49 4C 45 3F 20 22 3B 3A 4C |.D.ISKFILE? ";:L|
00001D70: B2 31 3A 8D 35 35 30 00 90 25 C6 11 52 46 24 B2 |.1:.550..%..RF$.|
00001D80: 41 24 3A 8B 52 46 24 B2 22 4B 22 A7 34 35 39 30 |A$:.RF$."K".4590|
00001D90: 00 CF 25 D0 11 4E 46 24 B2 22 22 3A 99 3A 99 22 |..%..NF$."":.:."|
00001DA0: 11 45 4E 54 45 52 20 52 45 50 4F 52 54 20 46 49 |.ENTER REPORT FI|
00001DB0: 4C 45 20 4E 41 4D 45 3F 20 22 3B 3A 46 54 24 B2 |LE NAME? ";:FT$.|
00001DC0: 22 52 46 2E 22 3A 46 36 B2 31 3A 8D 33 30 37 00 |"RF.":F6.1:.307.|
00001DD0: F7 25 DA 11 41 24 B2 46 54 24 AA 4E 46 24 3A 52 |.%..A$.FT$.NF$:R|
00001DE0: 4E 24 B2 4E 46 24 3A 8D 35 39 30 30 3A 9E 42 41 |N$.NF$:.5900:.BA|
00001DF0: AA 34 32 2C 4E 46 24 00 37 26 E4 11 99 3A 99 22 |.42,NF$.7&...:."|
00001E00: 11 44 4F 20 59 4F 55 20 57 49 53 48 20 54 4F 20 |.DO YOU WISH TO |
00001E10: 4D 4F 44 49 46 59 20 54 48 45 20 52 45 50 4F 52 |MODIFY THE REPOR|
00001E20: 54 3F 20 22 3B 3A 41 43 24 B2 22 59 4E 22 3A 4C |T? ";:AC$."YN":L|
00001E30: B2 31 3A 8D 35 35 30 00 48 26 E9 11 8B 41 24 B2 |.1:.550.H&...A$.|
00001E40: 22 4E 22 A7 33 30 32 30 00 5D 26 EE 11 8B 46 33 |"N".3020.]&...F3|
00001E50: B2 30 A7 8D 33 30 35 3A 8D 36 32 38 30 00 66 26 |.0..305:.6280.f&|
00001E60: F3 11 46 33 B2 30 00 80 26 F8 11 54 53 24 B2 22 |..F3.0..&..TS$."|
00001E70: 53 45 4C 45 43 54 49 4F 4E 22 3A 8D 32 35 30 30 |SELECTION":.2500|
00001E80: 00 96 26 FD 11 8B C3 28 53 53 24 29 B2 30 A7 53 |..&....(SS$).0.S|
00001E90: 53 24 B2 46 46 24 00 C8 26 02 12 51 24 B2 22 45 |S$.FF$..&..Q$."E|
00001EA0: 4E 54 45 52 20 53 45 41 52 43 48 20 43 52 49 54 |NTER SEARCH CRIT|
00001EB0: 45 52 49 41 22 3A 50 24 B2 C8 28 53 53 24 2C C3 |ERIA":P$..(SS$,.|
00001EC0: 28 53 53 24 29 AB 31 29 00 DE 26 05 12 58 B2 C2 |(SS$).1)..&..X..|
00001ED0: 28 32 31 34 29 3A 59 B2 C2 28 32 31 31 29 00 21 |(214):Y..(211).!|
00001EE0: 27 06 12 40 50 2C 32 34 2C 30 2C 22 50 52 45 53 |'..@P,24,0,"PRES|
00001EF0: 53 20 52 45 54 55 52 4E 20 49 46 20 4E 4F 4E 45 |S RETURN IF NONE|
00001F00: 20 41 52 45 20 52 45 51 55 49 52 45 44 22 3A 8D | ARE REQUIRED":.|
00001F10: 32 30 30 3A 97 32 31 34 2C 58 3A 97 32 31 31 2C |200:.214,X:.211,|
00001F20: 59 00 5B 27 07 12 43 53 24 B2 22 22 3A 4C 4E B2 |Y.['..CS$."":LN.|
00001F30: 34 30 3A 54 59 B2 30 3A 59 B2 34 3A 49 B2 33 3A |40:TY.0:Y.4:I.3:|
00001F40: 8D 34 33 39 30 3A 49 B2 30 3A 58 B2 C2 28 32 31 |.4390:I.0:X..(21|
00001F50: 34 29 3A 59 B2 C2 28 32 31 31 29 00 7D 27 08 12 |4):Y..(211).}'..|
00001F60: 40 50 2C 32 34 2C 30 2C 22 22 3A 8D 32 30 30 3A |@P,24,0,"":.200:|
00001F70: 97 32 31 34 2C 58 3A 97 32 31 31 2C 59 00 8F 27 |.214,X:.211,Y..'|
00001F80: 0C 12 8B 41 24 B2 22 22 A7 41 24 B2 46 46 24 00 |...A$."".A$.FF$.|
00001F90: AD 27 16 12 53 53 24 B2 41 24 3A 8B C9 28 53 53 |.'..SS$.A$:..(SS|
00001FA0: 24 2C 31 29 B2 46 46 24 A7 34 36 36 30 00 D6 27 |$,1).FF$.4660..'|
00001FB0: 20 12 8B C6 28 C9 28 53 53 24 2C 31 29 29 B2 32 | ...(.(SS$,1)).2|
00001FC0: 32 32 A7 53 53 24 B2 C8 28 53 53 24 2C C3 28 53 |22.SS$..(SS$,.(S|
00001FD0: 53 24 29 AB 31 29 00 E6 27 2A 12 53 53 24 B2 53 |S$).1)..'*.SS$.S|
00001FE0: 53 24 AA 46 46 24 00 2B 28 34 12 51 24 B2 22 49 |S$.FF$.+(4.Q$."I|
00001FF0: 4E 20 4F 52 44 45 52 20 42 59 20 12 49 92 4E 44 |N ORDER BY .I.ND|
00002000: 45 58 2C 20 12 53 92 4F 52 54 A0 4F 52 20 12 46 |EX, .S.ORT.OR .F|
00002010: 92 49 4C 45 3F 22 3A 54 59 B2 30 3A 50 24 B2 42 |.ILE?":TY.0:P$.B|
00002020: 54 24 3A 43 53 24 B2 22 49 53 46 00 5B 28 3E 12 |T$:CS$."ISF.[(>.|
00002030: 4C 4E B2 31 3A 59 B2 31 34 3A 8D 34 34 30 30 3A |LN.1:Y.14:.4400:|
00002040: 42 54 24 B2 41 24 3A 4D 58 B2 31 35 3A 8B 42 54 |BT$.A$:MX.15:.BT|
00002050: 24 B3 B1 22 53 22 A7 34 38 33 30 00 7B 28 43 12 |$.."S".4830.{(C.|
00002060: 54 53 24 B2 22 53 4F 52 54 20 43 4F 4E 44 49 54 |TS$."SORT CONDIT|
00002070: 49 4F 4E 53 22 3A 8D 32 35 30 30 00 B6 28 48 12 |IONS":.2500..(H.|
00002080: 51 24 B2 22 45 4E 54 45 52 20 4E 55 4D 42 45 52 |Q$."ENTER NUMBER|
00002090: 20 4F 46 20 53 4F 52 54 20 4B 45 59 53 3F 22 3A | OF SORT KEYS?":|
000020A0: 50 24 B2 C4 28 4E 4B 29 3A 4C 4E B2 32 3A 59 B2 |P$..(NK):LN.2:Y.|
000020B0: 35 3A 54 59 B2 31 00 D4 28 52 12 8D 34 34 30 30 |5:TY.1..(R..4400|
000020C0: 3A 4E 4B B2 C5 28 41 24 29 3A 8B 4E 4B B2 30 A7 |:NK..(A$):.NK.0.|
000020D0: 34 38 34 30 00 15 29 5C 12 99 3A 99 22 11 46 49 |4840..)\..:.".FI|
000020E0: 45 4C 44 20 20 20 4C 45 4E 20 20 20 12 41 92 4C |ELD LEN .A.L|
000020F0: 50 48 41 2F 4E 55 4D 20 20 20 20 20 20 12 41 92 |PHA/NUM .A.|
00002100: 53 43 44 2F 12 44 92 45 53 44 22 3A 81 4A B2 30 |SCD/.D.ESD":.J.0|
00002110: A4 4E 4B AB 31 00 4F 29 66 12 43 B2 30 3A 59 B2 |.NK.1.O)f.C.0:Y.|
00002120: 4A AA 38 3A 54 59 B2 31 3A 4C 4E B2 33 3A 51 24 |J.8:TY.1:LN.3:Q$|
00002130: B2 22 22 3A 8B C3 28 53 4B 24 28 4A 29 29 B2 30 |."":..(SK$(J)).0|
00002140: A7 53 4B 24 28 4A 29 B2 43 30 24 AA 43 30 24 00 |.SK$(J).C0$.C0$.|
00002150: 77 29 70 12 50 24 B2 C4 28 C6 28 53 4B 24 28 4A |w)p.P$..(.(SK$(J|
00002160: 29 29 AA 31 29 3A 54 4D B2 C6 28 CA 28 53 4B 24 |)).1):TM..(.(SK$|
00002170: 28 4A 29 2C 32 29 29 00 96 29 7A 12 50 33 24 B2 |(J),2))..)z.P3$.|
00002180: 22 41 22 3A 8B 28 54 4D B0 36 34 29 B2 54 4D A7 |"A":.(TM.64).TM.|
00002190: 50 33 24 B2 22 44 00 C3 29 84 12 50 31 24 B2 C4 |P3$."D..)..P1$..|
000021A0: 28 54 4D AF 36 33 29 3A 50 32 24 B2 22 41 22 3A |(TM.63):P2$."A":|
000021B0: 8B 28 54 4D B0 31 32 38 29 B2 54 4D A7 50 32 24 |.(TM.128).TM.P2$|
000021C0: B2 22 4E 00 FF 29 8E 12 4D 58 B2 4E 46 3A 8D 34 |."N..)..MX.NF:.4|
000021D0: 34 30 30 3A 54 4D B2 C5 28 41 24 29 AB 31 3A 8B |400:TM..(A$).1:.|
000021E0: C6 28 53 4B 24 28 4A 29 29 B2 54 4D A7 53 4B 24 |.(SK$(J)).TM.SK$|
000021F0: 28 4A 29 B2 C7 28 54 4D 29 3A 89 34 37 36 30 00 |(J)..(TM):.4760.|
00002200: 27 2A 93 12 53 4B 24 28 4A 29 B2 C7 28 54 4D 29 |'*..SK$(J)..(TM)|
00002210: 3A 50 31 24 B2 C4 28 C6 28 CA 28 46 41 24 28 54 |:P1$..(.(.(FA$(T|
00002220: 4D 29 2C 34 29 29 29 00 57 2A 98 12 4D 58 B2 C6 |M),4))).W*..MX..|
00002230: 28 CA 28 46 41 24 28 54 4D 29 2C 34 29 29 3A 50 |(.(FA$(TM),4)):P|
00002240: 24 B2 50 31 24 3A 8B C5 28 50 24 29 B2 30 A7 50 |$.P1$:..(P$).0.P|
00002250: 24 B2 C4 28 4D 58 29 00 74 2A A2 12 58 B2 38 3A |$..(MX).t*..X.8:|
00002260: 4C 4E B2 32 3A 8D 34 34 31 30 3A 43 B2 43 AA C5 |LN.2:.4410:C.C..|
00002270: 28 41 24 29 00 AF 2A AC 12 50 24 B2 50 32 24 3A |(A$)..*..P$.P2$:|
00002280: 43 53 24 B2 22 41 4E 22 3A 8B 50 24 B2 22 22 A7 |CS$."AN":.P$."".|
00002290: 50 24 B2 C7 28 36 35 AA 28 C6 28 CA 28 46 41 24 |P$..(65.(.(.(FA$|
000022A0: 28 54 4D 29 2C 35 29 29 AF 31 29 AC 31 33 29 00 |(TM),5)).1).13).|
000022B0: D8 2A B6 12 58 B2 31 37 3A 4C 4E B2 31 3A 54 59 |.*..X.17:LN.1:TY|
000022C0: B2 30 3A 8D 34 34 31 30 3A 8B 41 24 B2 22 4E 22 |.0:.4410:.A$."N"|
000022D0: A7 43 B2 43 B0 31 32 38 00 F0 2A BB 12 50 24 B2 |.C.C.128..*..P$.|
000022E0: 50 33 24 3A 8B 50 24 B2 22 22 A7 50 24 B2 22 41 |P3$:.P$."".P$."A|
000022F0: 00 17 2B C0 12 58 B2 33 33 3A 43 53 24 B2 22 41 |..+..X.33:CS$."A|
00002300: 44 22 3A 8D 34 34 31 30 3A 8B 41 24 B2 22 44 22 |D":.4410:.A$."D"|
00002310: A7 43 B2 43 B0 36 34 00 3A 2B CA 12 53 4B 24 28 |.C.C.64.:+..SK$(|
00002320: 4A 29 B2 53 4B 24 28 4A 29 AA C7 28 43 29 3A 8B |J).SK$(J)..(C):.|
00002330: 41 B3 B1 39 35 A7 34 37 31 30 00 40 2B D4 12 82 |A..95.4710.@+...|
00002340: 00 66 2B DE 12 54 53 24 B2 22 4F 55 54 50 55 54 |.f+..TS$."OUTPUT|
00002350: 20 43 4F 4E 44 49 54 49 4F 4E 53 22 3A 8D 32 35 | CONDITIONS":.25|
00002360: 30 30 3A 59 B2 33 00 A7 2B E8 12 51 24 B2 22 4F |00:Y.3..+..Q$."O|
00002370: 55 54 50 55 54 20 54 4F 20 12 53 92 43 52 45 45 |UTPUT TO .S.CREE|
00002380: 4E 2C 20 12 50 92 52 49 4E 54 45 52 2C 20 12 44 |N, .P.RINTER, .D|
00002390: 92 49 53 4B 3F 22 3A 43 53 24 B2 22 53 50 44 22 |.ISK?":CS$."SPD"|
000023A0: 3A 50 24 B2 52 44 24 00 C6 2B F2 12 8D 34 33 39 |:P$.RD$..+...439|
000023B0: 30 3A 52 44 24 B2 41 24 3A 8B 52 44 24 B2 22 53 |0:RD$.A$:.RD$."S|
000023C0: 22 A7 34 39 38 30 00 EC 2B FC 12 50 24 B2 22 34 |".4980..+..P$."4|
000023D0: 22 3A 4D 58 B2 37 3A 8B 52 44 24 B2 22 44 22 A7 |":MX.7:.RD$."D".|
000023E0: 50 24 B2 22 38 22 3A 4D 58 B2 31 35 00 23 2C 06 |P$."8":MX.15.#,.|
000023F0: 13 51 24 B2 22 45 4E 54 45 52 20 44 45 56 49 43 |.Q$."ENTER DEVIC|
00002400: 45 20 4E 55 4D 42 45 52 3F 22 3A 54 59 B2 31 3A |E NUMBER?":TY.1:|
00002410: 4C 4E B2 31 3A 8D 34 33 39 30 3A 44 4E B2 C5 28 |LN.1:.4390:DN..(|
00002420: 41 24 29 00 36 2C 10 13 8B 52 44 24 B3 B1 22 44 |A$).6,...RD$.."D|
00002430: 22 A7 34 39 34 30 00 5C 2C 1A 13 50 24 B2 54 24 |".4940.\,..P$.T$|
00002440: 3A 51 24 B2 22 45 4E 54 45 52 20 12 53 92 45 51 |:Q$."ENTER .S.EQ|
00002450: 20 4F 52 20 12 54 92 45 58 54 20 3F 00 96 2C 1F | OR .T.EXT ?..,.|
00002460: 13 43 53 24 B2 22 53 54 22 3A 50 24 B2 54 24 3A |.CS$."ST":P$.T$:|
00002470: 54 59 B2 30 3A 8D 34 33 39 30 3A 54 24 B2 41 24 |TY.0:.4390:T$.A$|
00002480: 3A 8B C3 28 44 46 24 29 B1 33 A7 50 24 B2 CA 28 |:..(DF$).3.P$..(|
00002490: 44 46 24 2C 34 29 00 D8 2C 24 13 51 24 B2 22 45 |DF$,4)..,$.Q$."E|
000024A0: 4E 54 45 52 20 44 49 53 4B 20 46 49 4C 45 20 4E |NTER DISK FILE N|
000024B0: 41 4D 45 3F 22 3A 41 24 B2 22 22 3A 8D 34 35 30 |AME?":A$."":.450|
000024C0: 3A 44 46 24 B2 22 53 42 2E 22 AA 41 24 3A 9E 42 |:DF$."SB.".A$:.B|
000024D0: 41 AA 32 37 2C 44 46 24 00 FC 2C 38 13 8B 54 24 |A.27,DF$..,8..T$|
000024E0: B2 22 54 22 A7 51 24 28 37 29 B2 22 53 54 52 49 |."T".Q$(7)."STRI|
000024F0: 50 20 53 50 41 43 45 53 20 59 2F 4E 00 06 2D 42 |P SPACES Y/N..-B|
00002500: 13 89 34 39 38 30 00 37 2D 4C 13 50 24 B2 22 30 |..4980.7-L.P$."0|
00002510: 22 3A 8B 52 44 24 B2 22 50 22 AF 52 46 24 B2 22 |":.RD$."P".RF$."|
00002520: 4B 22 A7 50 57 B2 50 50 3A 4C 50 B2 50 4C 3A 53 |K".PW.PP:LP.PL:S|
00002530: 4C 28 33 29 B2 35 38 00 65 2D 56 13 51 24 B2 22 |L(3).58.e-V.Q$."|
00002540: 45 4E 54 45 52 20 50 52 49 4E 54 45 52 20 43 4F |ENTER PRINTER CO|
00002550: 4E 54 52 4F 4C 20 43 48 41 52 41 43 54 45 52 3F |NTROL CHARACTER?|
00002560: 22 3A 49 B2 38 00 91 2D 5B 13 4D 58 B2 32 35 35 |":I.8..-[.MX.255|
00002570: 3A 54 59 B2 31 3A 4C 4E B2 33 3A 8D 34 33 39 30 |:TY.1:LN.3:.4390|
00002580: 3A 44 46 24 B2 C7 28 C5 28 41 24 29 29 3A 49 B2 |:DF$..(.(A$)):I.|
00002590: 30 00 B0 2D 74 13 8B 52 44 24 B2 22 44 22 AF 54 |0..-t..RD$."D".T|
000025A0: 24 B2 22 54 22 A7 53 43 B2 31 3A 89 35 30 32 30 |$."T".SC.1:.5020|
000025B0: 00 F5 2D 7E 13 4D 58 B2 32 35 35 3A 51 24 B2 22 |..-~.MX.255:Q$."|
000025C0: 45 4E 54 45 52 20 4C 49 4E 45 20 4C 45 4E 47 54 |ENTER LINE LENGT|
000025D0: 48 3F 22 3A 54 59 B2 31 3A 50 24 B2 C4 28 50 57 |H?":TY.1:P$..(PW|
000025E0: 29 3A 4C 4E B2 33 3A 8D 34 33 39 30 3A 50 57 B2 |):LN.3:.4390:PW.|
000025F0: C5 28 41 24 29 00 32 2E 92 13 51 24 B2 22 45 4E |.(A$).2...Q$."EN|
00002600: 54 45 52 20 4E 55 4D 42 45 52 20 4F 46 20 4C 49 |TER NUMBER OF LI|
00002610: 4E 45 53 20 50 45 52 20 50 41 47 45 3F 22 3A 50 |NES PER PAGE?":P|
00002620: 24 B2 C4 28 4C 50 29 3A 4C 4E B2 32 3A 8D 34 33 |$..(LP):LN.2:.43|
00002630: 39 30 00 44 2E 97 13 4C 50 B2 C5 28 41 24 29 3A |90.D...LP..(A$):|
00002640: 53 43 B2 31 00 6C 2E 9C 13 99 22 05 22 3A 54 53 |SC.1.l....".":TS|
00002650: 24 B2 22 44 45 46 49 4E 45 20 50 52 49 4E 54 20 |$."DEFINE PRINT |
00002660: 5A 4F 4E 45 53 22 3A 8D 32 35 30 30 00 B1 2E A1 |ZONES":.2500....|
00002670: 13 49 B2 31 3A 40 50 2C 32 34 2C 30 2C 22 98 50 |.I.1:@P,24,0,".P|
00002680: 52 45 53 53 20 05 53 50 41 43 45 98 20 2F 20 05 |RESS .SPACE. / .|
00002690: 52 45 54 55 52 4E 98 20 54 4F 20 53 45 4C 45 43 |RETURN. TO SELEC|
000026A0: 54 2F 45 58 45 43 55 54 45 13 11 11 11 11 11 11 |T/EXECUTE.......|
000026B0: 11 00 CE 2E B0 13 8B 53 43 B2 34 A7 53 43 B2 30 |.......SC.4.SC.0|
000026C0: 3A 8B 4E 41 28 32 29 B2 30 A7 53 43 B2 31 00 0B |:.NA(2).0.SC.1..|
000026D0: 2F BA 13 99 22 91 9E 44 45 46 49 4E 45 20 05 22 |/..."..DEFINE ."|
000026E0: 46 24 28 53 43 29 22 9E 20 20 20 20 2D 05 22 4E |F$(SC)". -."N|
000026F0: 41 28 53 43 29 22 9E 9D 20 50 52 49 4E 54 20 41 |A(SC)".. PRINT A|
00002700: 52 45 41 53 20 55 53 45 44 20 05 00 1E 2F BF 13 |REAS USED .../..|
00002710: 8B C2 28 31 39 38 29 B2 30 A7 35 30 35 35 00 44 |..(198).0.5055.D|
00002720: 2F C4 13 A1 4B 59 24 3A 8D 32 32 30 30 3A 8B 4B |/...KY$:.2200:.K|
00002730: 59 24 B2 22 20 22 A7 53 43 B2 53 43 AA 31 3A 89 |Y$." ".SC.SC.1:.|
00002740: 35 30 34 30 00 59 2F C9 13 8B 4B 59 24 B3 B1 C7 |5040.Y/...KY$...|
00002750: 28 31 33 29 A7 35 30 35 35 00 79 2F CE 13 8B 53 |(13).5055.y/...S|
00002760: 43 B2 30 A7 8D 32 32 30 31 3A 91 52 46 AA 31 89 |C.0..2201:.RF.1.|
00002770: 36 30 36 30 2C 35 30 32 35 00 B5 2F D8 13 8D 35 |6060,5025../...5|
00002780: 35 39 30 3A 4D 58 B2 4C 50 3A 43 24 28 31 29 B2 |590:MX.LP:C$(1).|
00002790: 22 31 31 31 31 31 31 31 32 30 30 22 AA 22 22 3A |"1111111200"."":|
000027A0: 43 24 28 32 29 B2 22 31 31 31 31 31 31 31 32 32 |C$(2)."111111122|
000027B0: 30 22 AA 22 22 00 F0 2F E2 13 43 24 28 33 29 B2 |0".""../..C$(3).|
000027C0: 22 31 31 31 31 31 31 31 32 32 30 22 AA 22 22 3A |"1111111220"."":|
000027D0: 51 24 B2 4E 4C 24 3A 8B 42 54 24 B2 22 53 22 A7 |Q$.NL$:.BT$."S".|
000027E0: 3A 40 4D 2C 22 31 22 2C 43 24 28 32 29 2C 31 30 |:@M,"1",C$(2),10|
000027F0: 00 15 30 EC 13 50 24 B2 C4 28 4E 4C 28 53 43 29 |..0..P$..(NL(SC)|
00002800: 29 3A 59 B2 35 3A 4C 4E B2 32 3A 54 59 B2 31 3A |):Y.5:LN.2:TY.1:|
00002810: 8D 34 34 30 30 00 3A 30 F1 13 4E 4C 28 53 43 29 |.4400.:0..NL(SC)|
00002820: B2 C5 28 41 24 29 3A 4D 58 B2 4D 58 AB 4E 4C 28 |..(A$):MX.MX.NL(|
00002830: 53 43 29 3A 51 24 B2 53 4C 24 00 7C 30 F6 13 43 |SC):Q$.SL$.|0..C|
00002840: 43 24 B2 22 22 3A 81 4C 4E B2 31 A4 4E 4C 28 53 |C$."":.LN.1.NL(S|
00002850: 43 29 3A 43 43 24 B2 43 43 24 AA 43 31 24 3A 82 |C):CC$.CC$.C1$:.|
00002860: 3A 41 24 B2 22 54 4F 50 3F 22 3A 8B 53 43 B2 33 |:A$."TOP?":.SC.3|
00002870: A7 41 24 B2 22 42 4F 54 54 4F 4D 3F 00 95 30 00 |.A$."BOTTOM?..0.|
00002880: 14 51 24 B2 51 24 AA 41 24 3A 8B 53 43 B3 B1 32 |.Q$.Q$.A$:.SC..2|
00002890: A7 35 31 38 30 00 CE 30 0A 14 51 24 B2 22 50 52 |.5180..0..Q$."PR|
000028A0: 49 4E 54 20 12 41 92 4C 4C 20 4F 52 20 12 42 92 |INT .A.LL OR .B.|
000028B0: 52 45 41 4B 20 4F 4E 4C 59 3F 22 3A 43 53 24 B2 |REAK ONLY?":CS$.|
000028C0: 22 41 42 22 3A 54 59 B2 30 3A 4C 4E B2 31 00 EE |"AB":TY.0:LN.1..|
000028D0: 30 14 14 50 24 B2 C7 28 53 4C 28 53 43 29 29 3A |0..P$..(SL(SC)):|
000028E0: 8B 50 24 B2 43 30 24 A7 50 24 B2 22 41 22 00 05 |.P$.C0$.P$."A"..|
000028F0: 31 1E 14 8D 34 33 39 30 3A 53 4C 28 53 43 29 B2 |1...4390:SL(SC).|
00002900: C6 28 41 24 29 00 0F 31 32 14 89 35 31 39 30 00 |.(A$)..12..5190.|
00002910: 33 31 3C 14 50 24 B2 C4 28 53 4C 28 53 43 29 29 |31<.P$..(SL(SC))|
00002920: 3A 8D 34 33 39 30 3A 53 4C 28 53 43 29 B2 C5 28 |:.4390:SL(SC)..(|
00002930: 41 24 29 00 5E 31 46 14 8B 54 24 B2 22 54 22 AF |A$).^1F..T$."T".|
00002940: 52 44 24 B2 22 44 22 A7 41 24 B2 22 30 30 22 3A |RD$."D".A$."00":|
00002950: 40 4D 2C 41 24 2C 43 24 28 53 43 29 2C 35 00 6F |@M,A$,C$(SC),5.o|
00002960: 31 50 14 81 4A B2 30 A4 4E 28 53 43 29 AB 31 00 |1P..J.0.N(SC).1.|
00002970: 94 31 5A 14 43 41 24 B2 43 24 28 53 43 29 AA 22 |.1Z.CA$.C$(SC)."|
00002980: 22 3A 49 B2 30 3A 8D 35 35 39 30 3A 8B 4A B3 30 |":I.0:.5590:.J.0|
00002990: A7 4A B2 30 00 C1 31 64 14 91 53 43 89 35 32 33 |.J.0..1d..SC.523|
000029A0: 30 2C 35 32 34 30 3A 4F 24 B2 46 44 24 28 4A 29 |0,5240:O$.FD$(J)|
000029B0: 3A 54 31 24 B2 46 54 24 28 4A 29 3A 89 35 32 35 |:T1$.FT$(J):.525|
000029C0: 30 00 E0 31 6E 14 4F 24 B2 48 44 24 28 4A 29 3A |0..1n.O$.HD$(J):|
000029D0: 54 31 24 B2 48 54 24 28 4A 29 3A 89 35 32 35 30 |T1$.HT$(J):.5250|
000029E0: 00 F9 31 78 14 4F 24 B2 4C 44 24 28 4A 29 3A 54 |..1x.O$.LD$(J):T|
000029F0: 31 24 B2 4C 54 24 28 4A 29 00 0B 32 82 14 8B 4F |1$.LT$(J)..2...O|
00002A00: 24 B2 22 22 A7 4F 24 B2 4F 31 24 00 45 32 8C 14 |$."".O$.O1$.E2..|
00002A10: 99 22 50 52 49 4E 54 20 41 52 45 41 20 23 20 22 |."PRINT AREA # "|
00002A20: 4A AA 31 A3 32 35 29 4E 28 53 43 29 AB 4E 41 28 |J.1.25)N(SC).NA(|
00002A30: 53 43 29 22 41 52 45 41 53 20 4F 50 45 4E 22 3A |SC)"AREAS OPEN":|
00002A40: 8D 35 38 37 30 00 5F 32 96 14 41 24 B2 22 22 3A |.5870._2..A$."":|
00002A50: 49 B2 49 AA 31 3A 8B 49 B2 31 31 A7 49 B2 33 00 |I.I.1:.I.11.I.3.|
00002A60: 7D 32 A0 14 41 B2 C6 28 CA 28 43 41 24 2C 49 29 |}2..A..(.(CA$,I)|
00002A70: 29 3A 8B 41 B3 B1 34 38 A7 35 33 31 30 00 98 32 |):.A..48.5310..2|
00002A80: AA 14 8B 41 24 B2 22 91 22 A7 49 B2 49 AB 32 3A |...A$.".".I.I.2:|
00002A90: 8B 49 B3 32 A7 49 B2 32 00 A2 32 B4 14 89 35 32 |.I.2.I.2..2...52|
00002AA0: 37 30 00 C4 32 B6 14 4F 24 B2 4F 31 24 3A 49 B2 |70..2..O$.O1$:I.|
00002AB0: 30 3A 54 31 24 B2 22 22 3A 8D 35 35 39 30 3A 89 |0:T1$."":.5590:.|
00002AC0: 35 32 36 30 00 CE 32 BE 14 8D 35 38 31 30 00 D8 |5260..2...5810..|
00002AD0: 32 C8 14 8D 34 34 31 30 00 03 33 C9 14 8B 49 B2 |2...4410..3...I.|
00002AE0: 35 A7 8B C7 28 C5 28 41 24 29 29 B3 B1 CA 28 4F |5...(.(A$))...(O|
00002AF0: 24 2C 35 2C 31 29 A7 3A 40 4D 2C 43 30 24 2C 4F |$,5,1).:@M,C0$,O|
00002B00: 24 2C 36 00 25 33 CD 14 8B 41 24 28 31 29 B2 22 |$,6.%3...A$(1)."|
00002B10: 52 22 AF 49 B3 33 A7 3A 40 4D 2C C7 28 31 32 29 |R".I.3.:@M,.(12)|
00002B20: 2C 4F 24 2C 34 00 52 33 CE 14 8B 28 41 24 28 31 |,O$,4.R3...(A$(1|
00002B30: 29 B2 22 44 22 B0 41 24 28 31 29 B2 22 52 22 29 |)."D".A$(1)."R")|
00002B40: AF 49 B3 33 A7 3A 40 4D 2C C7 28 30 29 2C 4F 24 |.I.3.:@M,.(0),O$|
00002B50: 2C 38 00 7A 33 CF 14 8B 41 24 28 31 29 B3 B1 22 |,8.z3...A$(1).."|
00002B60: 54 22 AF 53 43 B3 B1 32 AF 49 B1 31 A7 3A 40 4D |T".SC..2.I.1.:@M|
00002B70: 2C 22 30 22 2C 43 41 24 2C 33 00 89 33 D2 14 8B |,"0",CA$,3..3...|
00002B80: 49 B3 33 A7 8D 35 34 37 30 00 93 33 DC 14 8D 35 |I.3..5470..3...5|
00002B90: 36 30 30 00 D4 33 E6 14 43 53 24 B2 22 5F 91 88 |600..3..CS$."_..|
00002BA0: 8C 86 93 22 3A 8D 34 33 37 30 3A 41 24 B2 C7 28 |...":.4370:A$..(|
00002BB0: 41 29 3A 40 48 2C 41 24 2C 43 53 24 3A 43 53 24 |A):@H,A$,CS$:CS$|
00002BC0: B2 22 22 3A 50 24 B2 22 22 3A 8B 4B 59 B2 30 A7 |."":P$."":.KY.0.|
00002BD0: 35 32 37 30 00 F5 33 F0 14 91 4B 59 89 35 33 38 |5270..3...KY.538|
00002BE0: 30 2C 35 32 39 30 2C 35 33 38 30 2C 35 33 38 30 |0,5290,5380,5380|
00002BF0: 2C 35 33 30 32 00 14 34 F1 14 8B 4E 41 28 53 43 |,5302..4...NA(SC|
00002C00: 29 B2 30 A7 41 B2 39 35 3A 4F 24 B2 22 22 3A 89 |).0.A.95:O$."":.|
00002C10: 35 34 30 30 00 53 34 F2 14 91 53 43 8D 35 33 36 |5400.S4...SC.536|
00002C20: 34 2C 35 33 36 36 2C 35 33 36 38 3A 4A B2 4A AB |4,5366,5368:J.J.|
00002C30: 31 3A 4E 41 28 53 43 29 B2 4E 41 28 53 43 29 AB |1:NA(SC).NA(SC).|
00002C40: 31 3A 8B 4A B1 B2 4E 41 28 53 43 29 AB 31 A7 35 |1:.J..NA(SC).1.5|
00002C50: 32 31 30 00 5D 34 F3 14 89 35 34 35 30 00 9F 34 |210.]4...5450..4|
00002C60: F4 14 9E 42 41 AA 33 36 2C 4A 2C 48 44 24 28 4A |...BA.36,J,HD$(J|
00002C70: 29 3A 9E 42 41 AA 33 36 2C 4A 2C 48 54 24 28 4A |):.BA.36,J,HT$(J|
00002C80: 29 3A 48 44 24 28 4E 41 28 31 29 29 B2 22 22 3A |):HD$(NA(1))."":|
00002C90: 48 54 24 28 4E 41 28 31 29 29 B2 22 22 3A 8E 00 |HT$(NA(1))."":..|
00002CA0: E1 34 F6 14 9E 42 41 AA 33 36 2C 4A 2C 4C 44 24 |.4...BA.36,J,LD$|
00002CB0: 28 4A 29 3A 9E 42 41 AA 33 36 2C 4A 2C 4C 54 24 |(J):.BA.36,J,LT$|
00002CC0: 28 4A 29 3A 4C 44 24 28 4E 41 28 32 29 29 B2 22 |(J):LD$(NA(2))."|
00002CD0: 22 3A 4C 54 24 28 4E 41 28 32 29 29 B2 22 22 3A |":LT$(NA(2))."":|
00002CE0: 8E 00 23 35 F8 14 9E 42 41 AA 33 36 2C 4A 2C 46 |..#5...BA.36,J,F|
00002CF0: 44 24 28 4A 29 3A 9E 42 41 AA 33 36 2C 4A 2C 46 |D$(J):.BA.36,J,F|
00002D00: 54 24 28 4A 29 3A 46 44 24 28 4E 41 28 33 29 29 |T$(J):FD$(NA(3))|
00002D10: B2 22 22 3A 46 54 24 28 4E 41 28 33 29 29 B2 22 |."":FT$(NA(3))."|
00002D20: 22 3A 8E 00 3B 35 04 15 40 4D 2C C7 28 C5 28 41 |":..;5..@M,.(.(A|
00002D30: 24 28 36 29 29 29 2C 4F 24 2C 36 00 59 35 05 15 |$(6))),O$,6.Y5..|
00002D40: 8B C5 28 41 24 28 34 29 29 B2 30 A7 4A B2 4E 28 |..(A$(4)).0.J.N(|
00002D50: 53 43 29 3A 89 35 34 34 30 00 74 35 0E 15 8B 4A |SC):.5440.t5...J|
00002D60: B1 4E 41 28 53 43 29 AB 31 A7 4E 41 28 53 43 29 |.NA(SC).1.NA(SC)|
00002D70: B2 4A AA 31 00 A1 35 18 15 91 53 43 89 35 34 31 |.J.1..5...SC.541|
00002D80: 30 2C 35 34 32 30 3A 46 44 24 28 4A 29 B2 4F 24 |0,5420:FD$(J).O$|
00002D90: 3A 46 54 24 28 4A 29 B2 54 31 24 3A 89 35 34 33 |:FT$(J).T1$:.543|
00002DA0: 30 00 C0 35 22 15 48 44 24 28 4A 29 B2 4F 24 3A |0..5".HD$(J).O$:|
00002DB0: 48 54 24 28 4A 29 B2 54 31 24 3A 89 35 34 33 30 |HT$(J).T1$:.5430|
00002DC0: 00 D9 35 2C 15 4C 44 24 28 4A 29 B2 4F 24 3A 4C |..5,.LD$(J).O$:L|
00002DD0: 54 24 28 4A 29 B2 54 31 24 00 EB 35 36 15 8B 41 |T$(J).T1$..56..A|
00002DE0: B2 39 35 A7 4A B2 4E 28 53 43 29 00 02 36 3B 15 |.95.J.N(SC)..6;.|
00002DF0: 8B 41 B2 31 34 30 A7 4A B2 4A AB 31 3A 89 35 32 |.A.140.J.J.1:.52|
00002E00: 31 30 00 28 36 40 15 41 B2 C5 28 41 24 28 36 29 |10.(6@.A..(A$(6)|
00002E10: 29 AA C5 28 41 24 28 34 29 29 3A 8B 41 B1 B2 50 |)..(A$(4)):.A..P|
00002E20: 57 A7 41 B2 50 57 AB 31 00 41 36 45 15 40 4D 2C |W.A.PW.1.A6E.@M,|
00002E30: C7 28 41 29 2C 43 43 24 2C C5 28 41 24 28 35 29 |.(A),CC$,.(A$(5)|
00002E40: 29 00 47 36 4A 15 82 00 51 36 54 15 89 35 30 32 |).G6J...Q6T..502|
00002E50: 30 00 67 36 5E 15 8B 49 B2 32 A7 50 24 B2 22 30 |0.g6^..I.2.P$."0|
00002E60: 22 3A 89 35 35 36 30 00 78 36 68 15 8B 41 B3 B1 |":.5560.x6h..A..|
00002E70: 31 33 39 A7 35 35 32 30 00 A9 36 72 15 49 B2 30 |139.5520..6r.I.0|
00002E80: 3A 8D 35 38 34 30 3A 8D 34 34 31 30 3A 41 24 28 |:.5840:.4410:A$(|
00002E90: 49 29 B2 41 24 3A 49 B2 31 3A 41 24 B2 22 46 22 |I).A$:I.1:A$."F"|
00002EA0: 3A 41 24 28 49 29 B2 41 24 00 C5 36 7C 15 49 B2 |:A$(I).A$..6|.I.|
00002EB0: 32 3A 41 24 B2 22 33 22 3A 41 24 28 49 29 B2 41 |2:A$."3":A$(I).A|
00002EC0: 24 3A 49 B2 31 00 D2 36 86 15 41 24 B2 41 24 28 |$:I.1..6..A$.A$(|
00002ED0: 30 29 00 06 37 90 15 50 24 B2 22 30 22 3A 8B 41 |0)..7..P$."0":.A|
00002EE0: 24 B2 22 41 22 B0 41 24 B2 22 52 22 A7 3A 40 4D |$."A".A$."R".:@M|
00002EF0: 2C 50 24 2C 43 41 24 2C 37 3A 40 4D 2C 50 24 2C |,P$,CA$,7:@M,P$,|
00002F00: 43 41 24 2C 31 30 00 34 37 9A 15 8B 41 24 B2 22 |CA$,10.47...A$."|
00002F10: 54 22 A7 3A 40 4D 2C 50 24 2C 43 41 24 2C 32 3A |T".:@M,P$,CA$,2:|
00002F20: 50 24 B2 22 30 30 30 22 3A 40 4D 2C 50 24 2C 43 |P$."000":@M,P$,C|
00002F30: 41 24 2C 38 00 4E 37 A4 15 8B 41 24 B2 22 44 22 |A$,8.N7...A$."D"|
00002F40: A7 3A 40 4D 2C 50 24 2C 43 41 24 2C 31 30 00 54 |.:@M,P$,CA$,10.T|
00002F50: 37 AE 15 8E 00 69 37 B8 15 8B 41 24 28 31 29 B3 |7....i7...A$(1).|
00002F60: B1 22 46 22 A7 35 35 38 30 00 9E 37 C2 15 8B C6 |."F".5580..7....|
00002F70: 28 CA 28 46 41 24 28 C5 28 41 24 29 AB 31 29 2C |(.(FA$(.(A$).1),|
00002F80: 35 29 29 B2 30 A7 3A 40 4D 2C 50 24 2C 43 41 24 |5)).0.:@M,P$,CA$|
00002F90: 2C 38 3A 40 4D 2C 50 24 2C 43 41 24 2C 39 00 B2 |,8:@M,P$,CA$,9..|
00002FA0: 37 CC 15 41 24 B2 C4 28 C5 28 41 24 29 AB 31 29 |7..A$..(.(A$).1)|
00002FB0: 3A 8E 00 D6 37 D6 15 99 22 05 22 3A 54 53 24 B2 |:...7...".":TS$.|
00002FC0: 46 24 28 53 43 29 AA 22 20 5A 4F 4E 45 22 3A 8D |F$(SC)." ZONE":.|
00002FD0: 32 35 30 30 3A 8E 00 F1 37 E0 15 41 24 28 49 29 |2500:...7..A$(I)|
00002FE0: B2 41 24 3A 8B 49 B2 33 A7 54 31 24 B2 41 24 3A |.A$:.I.3.T1$.A$:|
00002FF0: 8E 00 0B 38 EA 15 8B 54 59 25 28 49 29 B2 31 A7 |...8...TY%(I).1.|
00003000: 41 24 B2 C7 28 C5 28 41 24 29 29 00 34 38 F4 15 |A$..(.(A$)).48..|
00003010: 40 4D 2C 41 24 2C 4F 24 2C 49 3A 8B 49 B2 32 A7 |@M,A$,O$,I:.I.2.|
00003020: 50 24 B2 CA 28 C4 28 C6 28 41 24 29 AA 31 29 2C |P$..(.(.(A$).1),|
00003030: 32 29 3A 8E 00 43 38 FE 15 50 24 B2 41 24 28 49 |2):..C8..P$.A$(I|
00003040: 29 3A 8E 00 7C 38 12 16 4D 58 B2 30 3A 91 49 89 |):..|8..MX.0:.I.|
00003050: 35 36 39 30 2C 35 37 30 30 2C 35 36 37 30 2C 35 |5690,5700,5670,5|
00003060: 37 34 30 2C 35 37 31 30 2C 35 37 32 30 2C 35 38 |740,5710,5720,58|
00003070: 30 30 2C 35 36 38 30 2C 35 38 30 30 00 8C 38 1C |00,5680,5800..8.|
00003080: 16 43 53 24 B2 22 4E 4C 50 22 3A 8E 00 92 38 26 |.CS$."NLP":...8&|
00003090: 16 8E 00 9E 38 30 16 4D 58 B2 31 30 3A 8E 00 AF |....80.MX.10:...|
000030A0: 38 3A 16 43 53 24 B2 22 46 52 44 54 22 3A 8E 00 |8:.CS$."FRDT":..|
000030B0: DC 38 44 16 40 48 2C 41 24 28 31 29 2C 22 46 52 |.8D.@H,A$(1),"FR|
000030C0: 44 22 3A 4D 58 B2 4E 56 28 4B 59 29 3A 50 24 B2 |D":MX.NV(KY):P$.|
000030D0: C7 28 C6 28 50 24 29 AA 31 29 3A 8E 00 EC 38 4E |.(.(P$).1):...8N|
000030E0: 16 4D 58 B2 4E 4C 28 53 43 29 3A 8E 00 0D 39 58 |.MX.NL(SC):...9X|
000030F0: 16 8B 50 24 B3 43 31 24 A7 50 24 B2 CA 28 43 43 |..P$.C1$.P$..(CC|
00003100: 24 2C C5 28 41 24 28 35 29 29 2C 31 29 00 22 39 |$,.(A$(5)),1)."9|
00003110: 62 16 4D 58 B2 50 57 AB C5 28 41 24 28 34 29 29 |b.MX.PW..(A$(4))|
00003120: 3A 8E 00 4C 39 6C 16 8B 41 24 28 31 29 B2 22 46 |:..L9l..A$(1)."F|
00003130: 22 A7 4D 58 B2 C6 28 CA 28 46 41 24 28 C6 28 CA |".MX..(.(FA$(.(.|
00003140: 28 4F 24 2C 32 29 29 29 2C 34 29 29 00 75 39 76 |(O$,2))),4)).u9v|
00003150: 16 8B 41 24 28 31 29 B2 22 54 22 A7 4D 58 B2 50 |..A$(1)."T".MX.P|
00003160: 57 3A 50 24 B2 CA 28 4F 24 2C 34 2C 31 29 AA 22 |W:P$..(O$,4,1)."|
00003170: 20 20 22 3A 8E 00 92 39 80 16 8B 41 24 28 31 29 | ":...9...A$(1)|
00003180: B2 22 52 22 A7 4D 58 B2 C6 28 CA 28 4F 24 2C 34 |."R".MX..(.(O$,4|
00003190: 29 29 00 BC 39 8A 16 8B 41 24 28 31 29 B2 22 44 |))..9...A$(1)."D|
000031A0: 22 A7 4D 58 B2 C6 28 CA 28 44 41 24 28 C6 28 CA |".MX..(.(DA$(.(.|
000031B0: 28 4F 24 2C 32 29 29 29 2C 34 29 29 00 DF 39 94 |(O$,2))),4))..9.|
000031C0: 16 8B 50 24 B2 43 30 24 B0 50 24 B3 C7 28 4D 58 |..P$.C0$.P$..(MX|
000031D0: 29 A7 50 24 B2 C7 28 4D 58 29 AA 22 20 20 22 00 |).P$..(MX)." ".|
000031E0: E5 39 9E 16 8E 00 F4 39 A8 16 43 53 24 B2 22 59 |.9.....9..CS$."Y|
000031F0: 4E 22 3A 8E 00 0F 3A B2 16 4D 58 B2 30 3A 8B 49 |N":...:..MX.0:.I|
00003200: B2 33 A7 50 24 B2 54 31 24 3A 89 35 38 34 30 00 |.3.P$.T1$:.5840.|
00003210: 26 3A BC 16 50 24 B2 CA 28 4F 24 2C 49 2C 31 29 |&:..P$..(O$,I,1)|
00003220: 3A 8D 35 36 35 30 00 60 3A C6 16 8B 54 59 25 28 |:.5650.`:...TY%(|
00003230: 49 29 B2 31 A7 50 24 B2 CA 28 C4 28 C6 28 50 24 |I).1.P$..(.(.(P$|
00003240: 29 29 2C 32 29 AA 22 20 20 22 3A 8B C5 28 50 24 |)),2)." ":..(P$|
00003250: 29 B2 33 32 AF 49 B2 38 A7 50 24 B2 22 20 20 22 |).32.I.8.P$." "|
00003260: 00 91 3A D0 16 51 24 B2 51 24 28 49 29 3A 59 B2 |..:..Q$.Q$(I):Y.|
00003270: 59 25 28 49 29 3A 58 B2 58 25 28 49 29 3A 4C 4E |Y%(I):X.X%(I):LN|
00003280: B2 4C 4E 25 28 49 29 3A 54 59 B2 54 59 25 28 49 |.LN%(I):TY.TY%(I|
00003290: 29 00 97 3A DA 16 8E 00 B7 3A EE 16 54 4D B2 49 |)..:.....:..TM.I|
000032A0: 3A 81 49 B2 31 A4 31 30 3A 8D 35 38 31 30 3A 41 |:.I.1.10:.5810:A|
000032B0: 24 28 49 29 B2 50 24 00 C8 3A F8 16 8D 34 33 37 |$(I).P$..:...437|
000032C0: 30 3A 82 3A 49 B2 54 4D 00 01 3B FD 16 40 50 2C |0:.:I.TM..;..@P,|
000032D0: 31 31 2C 30 2C 22 2E 2E 2E 2E 2E 2E 2E 2E 2E 31 |11,0,".........1|
000032E0: 2E 2E 2E 2E 2E 2E 2E 2E 2E 32 2E 2E 2E 2E 2E 2E |.........2......|
000032F0: 2E 2E 2E 33 2E 2E 2E 2E 2E 2E 2E 2E 2E 34 22 3A |...3.........4":|
00003300: 8E 00 28 3B 02 17 41 24 B2 22 52 46 2E 22 AA 4E |..(;..A$."RF.".N|
00003310: 46 24 3A 42 24 B2 22 44 41 54 41 22 3A 8D 36 34 |F$:B$."DATA":.64|
00003320: 38 30 3A 8B 45 52 A7 8E 00 3C 3B 0C 17 9F 38 2C |80:.ER...<;...8,|
00003330: 38 2C 38 2C 41 24 AA 22 2C 53 2C 52 00 66 3B 16 |8,8,A$.",S,R.f;.|
00003340: 17 40 49 4E 2C 38 2C 4E 46 24 3A 84 38 2C 4E 4B |.@IN,8,NF$:.8,NK|
00003350: 3A 9E 42 41 AA 34 32 2C 4E 46 24 3A 8B 4E 4B B2 |:.BA.42,NF$:.NK.|
00003360: 30 A7 35 39 33 30 00 9A 3B 20 17 81 4A B2 30 A4 |0.5930..; ..J.0.|
00003370: 4E 4B AB 31 3A 40 49 4C 2C 32 2C 38 2C 53 4B 24 |NK.1:@IL,2,8,SK$|
00003380: 28 4A 29 3A 42 46 28 4A 29 B2 C6 28 53 4B 24 28 |(J):BF(J)..(SK$(|
00003390: 4A 29 AA C7 28 30 29 29 3A 82 00 C1 3B 2A 17 40 |J)..(0)):...;*.@|
000033A0: 49 4E 2C 38 2C 53 53 24 3A 40 49 4E 2C 38 2C 52 |IN,8,SS$:@IN,8,R|
000033B0: 44 24 3A 40 49 4E 2C 38 2C 54 24 3A 84 38 2C 50 |D$:@IN,8,T$:.8,P|
000033C0: 57 00 EA 3B 34 17 84 38 2C 4C 50 3A 40 49 4E 2C |W..;4..8,LP:@IN,|
000033D0: 38 2C 42 54 24 20 3A 40 49 4E 2C 38 2C 4D 41 24 |8,BT$ :@IN,8,MA$|
000033E0: 3A 40 49 4E 2C 38 2C 56 41 24 00 04 3C 3E 17 84 |:@IN,8,VA$..<>..|
000033F0: 38 2C 44 4E 3A 40 49 4E 2C 38 2C 44 46 24 3A 84 |8,DN:@IN,8,DF$:.|
00003400: 38 2C 4E 4C 00 1F 3C 48 17 84 38 2C 4E 41 28 31 |8,NL..<H..8,NA(1|
00003410: 29 3A 8B 4E 41 28 31 29 B2 30 A7 35 39 39 30 00 |):.NA(1).0.5990.|
00003420: 32 3C 52 17 84 38 2C 4E 4C 28 31 29 2C 53 4C 28 |2<R..8,NL(1),SL(|
00003430: 31 29 00 62 3C 5C 17 81 4A B2 30 A4 4E 41 28 31 |1).b<\..J.0.NA(1|
00003440: 29 AB 31 3A 40 49 4C 2C 31 30 2C 38 2C 48 44 24 |).1:@IL,10,8,HD$|
00003450: 28 4A 29 3A 40 49 4E 2C 38 2C 48 54 24 28 4A 29 |(J):@IN,8,HT$(J)|
00003460: 3A 82 00 7D 3C 66 17 84 38 2C 4E 41 28 32 29 3A |:..}<f..8,NA(2):|
00003470: 8B 4E 41 28 32 29 B2 30 A7 36 30 32 30 00 93 3C |.NA(2).0.6020..<|
00003480: 70 17 84 38 2C 4E 4C 28 32 29 2C 53 4C 28 32 29 |p..8,NL(2),SL(2)|
00003490: 2C 5A 57 00 C3 3C 7A 17 81 4A B2 30 A4 4E 41 28 |,ZW..<z..J.0.NA(|
000034A0: 32 29 AB 31 3A 40 49 4C 2C 31 30 2C 38 2C 4C 44 |2).1:@IL,10,8,LD|
000034B0: 24 28 4A 29 3A 40 49 4E 2C 38 2C 4C 54 24 28 4A |$(J):@IN,8,LT$(J|
000034C0: 29 3A 82 00 DE 3C 84 17 84 38 2C 4E 41 28 33 29 |):...<...8,NA(3)|
000034D0: 3A 8B 4E 41 28 33 29 B2 30 A7 36 30 35 30 00 F1 |:.NA(3).0.6050..|
000034E0: 3C 8E 17 84 38 2C 4E 4C 28 33 29 2C 53 4C 28 33 |<...8,NL(3),SL(3|
000034F0: 29 00 21 3D 98 17 81 4A B2 30 A4 4E 41 28 33 29 |).!=...J.0.NA(3)|
00003500: AB 31 3A 40 49 4C 2C 31 30 2C 38 2C 46 44 24 28 |.1:@IL,10,8,FD$(|
00003510: 4A 29 3A 40 49 4E 2C 38 2C 46 54 24 28 4A 29 3A |J):@IN,8,FT$(J):|
00003520: 82 00 2A 3D A2 17 A0 38 3A 8E 00 51 3D AC 17 54 |..*=...8:..Q=..T|
00003530: 53 24 B2 22 52 45 50 4F 52 54 20 44 41 54 41 22 |S$."REPORT DATA"|
00003540: 3A 8D 32 35 30 30 3A 50 24 B2 22 59 22 3A 59 B2 |:.2500:P$."Y":Y.|
00003550: 33 00 97 3D B6 17 49 B2 30 3A 51 24 B2 22 53 41 |3..=..I.0:Q$."SA|
00003560: 56 45 20 54 48 45 20 52 45 50 4F 52 54 20 43 4F |VE THE REPORT CO|
00003570: 4E 44 49 54 49 4F 4E 53 3F 22 3A 4C 4E B2 31 3A |NDITIONS?":LN.1:|
00003580: 54 59 B2 30 3A 8D 34 33 39 30 3A 8B 41 24 B2 22 |TY.0:.4390:.A$."|
00003590: 4E 22 A7 33 30 32 30 00 DC 3D C0 17 51 24 B2 22 |N".3020..=..Q$."|
000035A0: 45 4E 54 45 52 20 52 45 50 4F 52 54 20 46 49 4C |ENTER REPORT FIL|
000035B0: 45 20 4E 41 4D 45 3F 20 22 3A 41 24 B2 52 4E 24 |E NAME? ":A$.RN$|
000035C0: 3A 8D 34 35 30 3A 98 31 35 2C 22 53 30 3A 52 46 |:.450:.15,"S0:RF|
000035D0: 2E 22 AA 41 24 3A 52 4E 24 B2 41 24 00 F8 3D D4 |.".A$:RN$.A$..=.|
000035E0: 17 9F 38 2C 38 2C 38 2C 22 30 3A 52 46 2E 22 AA |..8,8,8,"0:RF.".|
000035F0: 41 24 AA 22 2C 53 2C 57 00 14 3E DE 17 98 38 2C |A$.",S,W..>...8,|
00003600: 4E 46 24 3A 98 38 2C 4E 4B 3A 8B 4E 4B B2 30 A7 |NF$:.8,NK:.NK.0.|
00003610: 36 31 33 30 00 2F 3E E8 17 81 49 B2 30 A4 4E 4B |6130./>...I.0.NK|
00003620: AB 31 3A 98 38 2C 53 4B 24 28 49 29 3B 3A 82 00 |.1:.8,SK$(I);:..|
00003630: 4D 3E F2 17 98 38 2C 53 53 24 3A 98 38 2C 52 44 |M>...8,SS$:.8,RD|
00003640: 24 3A 98 38 2C 54 24 3A 98 38 2C 50 57 00 6C 3E |$:.8,T$:.8,PW.l>|
00003650: FC 17 98 38 2C 4C 50 3A 98 38 2C 42 54 24 3A 98 |...8,LP:.8,BT$:.|
00003660: 38 2C 4D 41 24 3A 98 38 2C 56 41 24 00 83 3E 06 |8,MA$:.8,VA$..>.|
00003670: 18 98 38 2C 44 4E 3A 98 38 2C 44 46 24 3A 98 38 |..8,DN:.8,DF$:.8|
00003680: 2C 4E 4C 00 9E 3E 10 18 98 38 2C 4E 41 28 31 29 |,NL..>...8,NA(1)|
00003690: 3A 8B 4E 41 28 31 29 B2 30 A7 36 31 39 30 00 B4 |:.NA(1).0.6190..|
000036A0: 3E 1A 18 98 38 2C 4E 4C 28 31 29 3A 98 38 2C 53 |>...8,NL(1):.8,S|
000036B0: 4C 28 31 29 00 D8 3E 24 18 81 4A B2 30 A4 4E 41 |L(1)..>$..J.0.NA|
000036C0: 28 31 29 AB 31 3A 98 38 2C 48 44 24 28 4A 29 3B |(1).1:.8,HD$(J);|
000036D0: 48 54 24 28 4A 29 3A 82 00 F3 3E 2E 18 98 38 2C |HT$(J):...>...8,|
000036E0: 4E 41 28 32 29 3A 8B 4E 41 28 32 29 B2 30 A7 36 |NA(2):.NA(2).0.6|
000036F0: 32 32 30 00 0F 3F 38 18 98 38 2C 4E 4C 28 32 29 |220..?8..8,NL(2)|
00003700: 3A 98 38 2C 53 4C 28 32 29 3A 98 38 2C 5A 57 00 |:.8,SL(2):.8,ZW.|
00003710: 33 3F 42 18 81 4A B2 30 A4 4E 41 28 32 29 AB 31 |3?B..J.0.NA(2).1|
00003720: 3A 98 38 2C 4C 44 24 28 4A 29 3B 4C 54 24 28 4A |:.8,LD$(J);LT$(J|
00003730: 29 3A 82 00 4E 3F 4C 18 98 38 2C 4E 41 28 33 29 |):..N?L..8,NA(3)|
00003740: 3A 8B 4E 41 28 33 29 B2 30 A7 36 32 34 31 00 64 |:.NA(3).0.6241.d|
00003750: 3F 56 18 98 38 2C 4E 4C 28 33 29 3A 98 38 2C 53 |?V..8,NL(3):.8,S|
00003760: 4C 28 33 29 00 88 3F 60 18 81 4A B2 30 A4 4E 41 |L(3)..?`..J.0.NA|
00003770: 28 33 29 AB 31 3A 98 38 2C 46 44 24 28 4A 29 3B |(3).1:.8,FD$(J);|
00003780: 46 54 24 28 4A 29 3A 82 00 A2 3F 61 18 84 31 35 |FT$(J):...?a..15|
00003790: 2C 4A 3A 8B 4A B3 B1 37 32 A7 A0 38 3A 89 33 30 |,J:.J..72..8:.30|
000037A0: 32 30 00 D1 3F 6A 18 A0 38 3A 40 50 2C 32 34 2C |20..?j..8:@P,24,|
000037B0: 30 2C 22 44 49 53 4B 20 46 55 4C 4C 20 2D 20 4F |0,"DISK FULL - O|
000037C0: 4E 45 20 4D 4F 4D 45 4E 54 2C 20 50 4C 45 41 53 |NE MOMENT, PLEAS|
000037D0: 45 00 EF 3F 6F 18 8D 32 30 30 3A 98 31 35 2C 22 |E..?o..200:.15,"|
000037E0: 56 30 22 3A 59 B2 59 AB 34 3A 89 36 30 37 30 00 |V0":Y.Y.4:.6070.|
000037F0: FB 3F 74 18 46 41 24 B2 4E 46 24 00 27 40 7E 18 |.?t.FA$.NF$.'@~.|
00003800: 46 39 B2 30 3A 41 24 B2 22 46 53 2E 22 AA 46 41 |F9.0:A$."FS.".FA|
00003810: 24 3A 42 24 B2 22 44 41 54 41 22 3A 8D 36 34 38 |$:B$."DATA":.648|
00003820: 30 3A 8B 45 52 A7 8E 00 4A 40 88 18 40 50 2C 32 |0:.ER...J@..@P,2|
00003830: 34 2C 30 2C 22 46 4F 55 4E 44 20 46 49 4C 45 20 |4,0,"FOUND FILE |
00003840: 4C 4F 41 44 49 4E 47 2E 2E 2E 00 73 40 89 18 9F |LOADING....s@...|
00003850: 32 2C 38 2C 32 2C 22 53 43 2E 22 AA 4E 46 24 3A |2,8,2,"SC.".NF$:|
00003860: 9E 42 42 AA 39 2C 31 3A 9E 42 42 AA 33 30 2C 31 |.BB.9,1:.BB.30,1|
00003870: 3A A0 32 00 9F 40 8D 18 40 4C 3B 22 54 53 2E 22 |:.2..@..@L;"TS."|
00003880: AA 4E 46 24 2C 22 42 41 30 30 22 3A 40 4C 3B 22 |.NF$,"BA00":@L;"|
00003890: 42 4D 2E 22 AA 4E 46 24 2C 22 46 46 30 30 22 00 |BM.".NF$,"FF00".|
000038A0: C7 40 92 18 4E 44 B2 30 3A 9F 31 2C 38 2C 32 2C |.@..ND.0:.1,8,2,|
000038B0: 22 41 52 2E 22 AA 4E 46 24 3A 84 31 35 2C 41 3A |"AR.".NF$:.15,A:|
000038C0: 8B 41 A7 36 33 34 30 00 D4 40 9C 18 9E 42 42 AA |.A.6340..@...BB.|
000038D0: 33 3A A0 31 00 FC 40 A6 18 46 39 B2 31 3A 9F 31 |3:.1..@..F9.1:.1|
000038E0: 2C 38 2C 32 2C 22 44 50 2E 22 AA 4E 46 24 3A 84 |,8,2,"DP.".NF$:.|
000038F0: 31 35 2C 41 3A 8B 41 A7 36 33 34 30 00 20 41 B0 |15,A:.A.6340. A.|
00003900: 18 84 31 2C 4E 44 3A 86 44 41 24 28 4E 44 29 2C |..1,ND:.DA$(ND),|
00003910: 44 50 24 28 4E 44 29 3A 97 52 54 AA 34 2C 4E 44 |DP$(ND):.RT.4,ND|
00003920: 00 48 41 BA 18 4E 56 28 33 29 B2 4E 44 3A 81 49 |.HA..NV(3).ND:.I|
00003930: B2 30 A4 4E 44 AB 31 3A 40 49 4C 2C 34 2C 31 2C |.0.ND.1:@IL,4,1,|
00003940: 44 41 24 28 49 29 3A 82 00 54 41 C4 18 A0 31 3A |DA$(I):..TA...1:|
00003950: 46 34 B2 31 00 87 41 D8 18 9F 31 2C 38 2C 32 2C |F4.1..A...1,8,2,|
00003960: 22 46 53 2E 22 AA 4E 46 24 3A 84 31 2C 4E 53 2C |"FS.".NF$:.1,NS,|
00003970: 4E 46 2C 43 41 2C 4C 52 2C 4E 52 2C 53 43 24 2C |NF,CA,LR,NR,SC$,|
00003980: 50 31 24 2C 50 32 24 00 CD 41 E2 18 86 46 41 24 |P1$,P2$..A...FA$|
00003990: 28 4E 46 AB 31 29 2C 52 45 24 28 4E 46 AB 31 29 |(NF.1),RE$(NF.1)|
000039A0: 2C 54 45 24 28 4E 46 AB 31 29 2C 52 28 31 30 35 |,TE$(NF.1),R(105|
000039B0: 29 3A 97 31 30 31 38 2C 31 30 35 3A 97 52 54 AA |):.1018,105:.RT.|
000039C0: 35 2C 4E 46 3A 4E 56 28 31 29 B2 4E 46 00 DA 41 |5,NF:NV(1).NF..A|
000039D0: E7 18 52 28 31 30 34 29 B2 32 00 0F 42 EC 18 4E |..R(104).2..B..N|
000039E0: 56 28 32 29 B2 31 30 35 3A 97 52 54 AA 31 2C B5 |V(2).105:.RT.1,.|
000039F0: 28 4C 52 AD 32 35 36 29 3A 97 52 54 2C 4C 52 AB |(LR.256):.RT,LR.|
00003A00: 28 32 35 36 AC B5 28 4C 52 AD 32 35 36 29 29 00 |(256..(LR.256)).|
00003A10: 3C 42 F6 18 97 52 54 AA 33 2C B5 28 4E 52 AD 32 |<B...RT.3,.(NR.2|
00003A20: 35 36 29 3A 97 52 54 AA 32 2C 4E 52 AB 28 32 35 |56):.RT.2,NR.(25|
00003A30: 36 AC B5 28 4E 52 AD 32 35 36 29 29 00 77 42 00 |6..(NR.256)).wB.|
00003A40: 19 46 52 B2 34 37 33 36 30 3A 81 49 B2 30 A4 4E |.FR.47360:.I.0.N|
00003A50: 46 AB 31 3A 40 49 4C 2C 35 2C 31 2C 46 41 24 28 |F.1:@IL,5,1,FA$(|
00003A60: 49 29 3A 97 46 52 AA 49 2C C6 28 CA 28 46 41 24 |I):.FR.I,.(.(FA$|
00003A70: 28 49 29 2C 34 29 29 00 A8 42 0A 19 82 3A 9E 42 |(I),4))..B...:.B|
00003A80: 41 AA 33 30 2C 52 45 24 28 30 29 3A 9E 42 41 AA |A.30,RE$(0):.BA.|
00003A90: 33 30 2C 54 45 24 28 30 29 3A A0 31 3A 97 35 33 |30,TE$(0):.1:.53|
00003AA0: 32 37 32 2C 43 41 3A 8E 00 CE 42 50 19 9F 38 2C |272,CA:...BP..8,|
00003AB0: 38 2C 38 2C 41 24 3A A1 23 38 2C 50 24 3A 45 52 |8,8,A$:.#8,P$:ER|
00003AC0: B2 53 54 3A A0 38 3A 8B 45 52 B2 30 A7 8E 00 D9 |.ST:.8:.ER.0....|
00003AD0: 42 5A 19 8D 39 35 30 3A 8E 00 18 43 8C 19 54 59 |BZ..950:...C..TY|
00003AE0: B2 30 3A 4C 50 B2 32 34 3A 50 4C B2 36 36 3A 50 |.0:LP.24:PL.66:P|
00003AF0: 57 B2 33 39 3A 50 50 B2 38 30 3A 52 46 24 B2 22 |W.39:PP.80:RF$."|
00003B00: 4B 22 3A 52 44 24 B2 22 53 22 3A 54 24 B2 22 53 |K":RD$."S":T$."S|
00003B10: 22 3A 42 54 24 B2 22 46 00 24 43 96 19 4D 41 24 |":BT$."F.$C..MA$|
00003B20: B2 22 4E 22 00 6B 43 A0 19 86 46 24 28 33 29 3A |."N".kC...F$(3):|
00003B30: 46 24 28 31 29 B2 22 48 45 41 44 45 52 22 3A 46 |F$(1)."HEADER":F|
00003B40: 24 28 32 29 B2 22 4C 49 53 54 20 20 22 3A 46 24 |$(2)."LIST ":F$|
00003B50: 28 33 29 B2 22 46 4F 4F 54 45 52 22 3A 46 24 28 |(3)."FOOTER":F$(|
00003B60: 30 29 B2 22 45 58 49 54 20 20 22 00 AE 43 AA 19 |0)."EXIT "..C..|
00003B70: 4E 4C 24 B2 22 4E 55 4D 42 45 52 20 4F 46 20 4C |NL$."NUMBER OF L|
00003B80: 49 4E 45 53 20 49 4E 20 5A 4F 4E 45 3F 22 3A 53 |INES IN ZONE?":S|
00003B90: 4C 24 B2 22 4E 55 4D 42 45 52 20 4F 46 20 4C 49 |L$."NUMBER OF LI|
00003BA0: 4E 45 53 20 46 52 4F 4D 20 54 48 45 20 22 00 DB |NES FROM THE "..|
00003BB0: 43 BE 19 49 B2 31 3A 51 24 28 49 29 B2 22 44 41 |C..I.1:Q$(I)."DA|
00003BC0: 54 41 20 54 59 50 45 20 28 12 46 92 2D 12 52 92 |TA TYPE (.F.-.R.|
00003BD0: 2D 12 44 92 2D 12 54 92 29 3A 22 00 01 44 C3 19 |-.D.-.T.):"..D..|
00003BE0: 58 25 28 49 29 B2 30 3A 59 25 28 49 29 B2 37 3A |X%(I).0:Y%(I).7:|
00003BF0: 54 59 25 28 49 29 B2 30 3A 4C 4E 25 28 49 29 B2 |TY%(I).0:LN%(I).|
00003C00: 31 00 3F 44 C8 19 49 B2 32 3A 51 24 28 49 29 B2 |1.?D..I.2:Q$(I).|
00003C10: 22 53 55 42 53 43 52 49 50 54 3A 22 3A 58 25 28 |"SUBSCRIPT:":X%(|
00003C20: 49 29 B2 32 35 3A 59 25 28 49 29 B2 37 3A 54 59 |I).25:Y%(I).7:TY|
00003C30: 25 28 49 29 B2 31 3A 4C 4E 25 28 49 29 B2 33 00 |%(I).1:LN%(I).3.|
00003C40: 7D 44 D2 19 49 B2 33 3A 51 24 28 49 29 B2 22 54 |}D..I.3:Q$(I)."T|
00003C50: 45 58 54 2F 54 49 54 4C 45 22 3A 58 25 28 49 29 |EXT/TITLE":X%(I)|
00003C60: B2 30 3A 59 25 28 49 29 B2 39 3A 54 59 25 28 49 |.0:Y%(I).9:TY%(I|
00003C70: 29 B2 30 3A 4C 4E 25 28 49 29 B2 34 30 00 C0 44 |).0:LN%(I).40..D|
00003C80: DC 19 49 B2 34 3A 51 24 28 49 29 B2 22 4C 45 4E |..I.4:Q$(I)."LEN|
00003C90: 47 54 48 20 4F 46 20 41 52 45 41 3A 22 3A 58 25 |GTH OF AREA:":X%|
00003CA0: 28 49 29 B2 30 3A 59 25 28 49 29 B2 31 32 3A 54 |(I).0:Y%(I).12:T|
00003CB0: 59 25 28 49 29 B2 31 3A 4C 4E 25 28 49 29 B2 32 |Y%(I).1:LN%(I).2|
00003CC0: 00 06 45 E6 19 49 B2 35 3A 51 24 28 49 29 B2 22 |..E..I.5:Q$(I)."|
00003CD0: 4C 49 4E 45 20 4E 55 4D 42 45 52 20 20 20 20 20 |LINE NUMBER |
00003CE0: 3A 22 3A 58 25 28 49 29 B2 32 30 3A 59 25 28 49 |:":X%(I).20:Y%(I|
00003CF0: 29 B2 31 32 3A 54 59 25 28 49 29 B2 31 3A 4C 4E |).12:TY%(I).1:LN|
00003D00: 25 28 49 29 B2 32 00 49 45 F0 19 49 B2 36 3A 51 |%(I).2.IE..I.6:Q|
00003D10: 24 28 49 29 B2 22 43 4F 4C 55 4D 4E 20 4E 55 4D |$(I)."COLUMN NUM|
00003D20: 42 45 52 20 3A 22 3A 58 25 28 49 29 B2 30 3A 59 |BER :":X%(I).0:Y|
00003D30: 25 28 49 29 B2 31 34 3A 54 59 25 28 49 29 B2 31 |%(I).14:TY%(I).1|
00003D40: 3A 4C 4E 25 28 49 29 B2 33 00 6B 45 FA 19 49 B2 |:LN%(I).3.kE..I.|
00003D50: 37 3A 51 24 28 49 29 B2 22 43 45 4E 54 45 52 49 |7:Q$(I)."CENTERI|
00003D60: 4E 47 20 28 59 2F 4E 29 3F 20 22 00 93 45 FF 19 |NG (Y/N)? "..E..|
00003D70: 58 25 28 49 29 B2 32 30 3A 59 25 28 49 29 B2 31 |X%(I).20:Y%(I).1|
00003D80: 34 3A 54 59 25 28 49 29 B2 30 3A 4C 4E 25 28 49 |4:TY%(I).0:LN%(I|
00003D90: 29 B2 31 00 D6 45 04 1A 49 B2 38 3A 51 24 28 49 |).1..E..I.8:Q$(I|
00003DA0: 29 B2 22 23 20 4F 46 20 44 45 43 49 4D 41 4C 53 |)."# OF DECIMALS|
00003DB0: 20 3A 22 3A 58 25 28 49 29 B2 30 3A 59 25 28 49 | :":X%(I).0:Y%(I|
00003DC0: 29 B2 31 36 3A 54 59 25 28 49 29 B2 31 3A 4C 4E |).16:TY%(I).1:LN|
00003DD0: 25 28 49 29 B2 31 00 F7 45 0E 1A 49 B2 39 3A 51 |%(I).1..E..I.9:Q|
00003DE0: 24 28 49 29 B2 22 41 43 43 55 4D 55 4C 41 54 45 |$(I)."ACCUMULATE|
00003DF0: 20 28 59 2F 4E 29 3F 00 1F 46 13 1A 58 25 28 49 | (Y/N)?..F..X%(I|
00003E00: 29 B2 32 30 3A 59 25 28 49 29 B2 31 36 3A 54 59 |).20:Y%(I).16:TY|
00003E10: 25 28 49 29 B2 30 3A 4C 4E 25 28 49 29 B2 31 00 |%(I).0:LN%(I).1.|
00003E20: 56 46 18 1A 49 B2 31 30 3A 51 24 28 31 30 29 B2 |VF..I.10:Q$(10).|
00003E30: 22 42 52 45 41 4B 20 54 59 50 45 20 28 12 4E 92 |"BREAK TYPE (.N.|
00003E40: 4F 4E 45 2C 20 12 4C 92 4E 46 44 53 2C 20 12 50 |ONE, .L.NFDS, .P|
00003E50: 92 41 47 45 29 3F 00 7D 46 22 1A 58 25 28 49 29 |.AGE)?.}F".X%(I)|
00003E60: B2 30 3A 59 25 28 49 29 B2 31 38 3A 54 59 25 28 |.0:Y%(I).18:TY%(|
00003E70: 49 29 B2 30 3A 4C 4E 25 28 49 29 B2 31 00 AA 46 |I).0:LN%(I).1..F|
00003E80: 2C 1A 81 49 B2 31 A4 33 3A 4E 4C 28 49 29 B2 31 |,..I.1.3:NL(I).1|
00003E90: 3A 4E 41 28 49 29 B2 30 3A 82 3A 53 4C 28 31 29 |:NA(I).0:.:SL(1)|
00003EA0: B2 33 3A 53 4C 28 33 29 B2 33 00 D0 46 36 1A 4F |.3:SL(3).3..F6.O|
00003EB0: 31 24 B2 22 46 22 AA 43 30 24 AA 22 20 22 AA 43 |1$."F".C0$." ".C|
00003EC0: 30 24 AA 43 31 24 AA 43 30 24 AA 22 4E 20 4E 4E |0$.C1$.C0$."N NN|
00003ED0: 00 F3 46 40 1A 46 46 24 B2 C7 28 32 35 35 29 3A |..F@.FF$..(255):|
00003EE0: 52 54 B2 35 33 32 34 32 3A 97 33 38 36 35 36 2C |RT.53242:.38656,|
00003EF0: 32 35 35 00 14 47 54 1A 4E 28 31 29 B2 31 30 3A |255..GT.N(1).10:|
00003F00: 86 48 44 24 28 4E 28 31 29 29 2C 48 54 24 28 4E |.HD$(N(1)),HT$(N|
00003F10: 28 31 29 29 00 35 47 5E 1A 4E 28 32 29 B2 35 30 |(1)).5G^.N(2).50|
00003F20: 3A 86 4C 44 24 28 4E 28 32 29 29 2C 4C 54 24 28 |:.LD$(N(2)),LT$(|
00003F30: 4E 28 32 29 29 00 56 47 68 1A 4E 28 33 29 B2 31 |N(2)).VGh.N(3).1|
00003F40: 30 3A 86 46 44 24 28 4E 28 33 29 29 2C 46 54 24 |0:.FD$(N(3)),FT$|
00003F50: 28 4E 28 33 29 29 00 74 47 72 1A 86 53 4B 24 28 |(N(3)).tGr..SK$(|
00003F60: 31 35 29 2C 42 46 28 31 35 29 2C 42 46 24 28 31 |15),BF(15),BF$(1|
00003F70: 35 29 3A 8E 00 B8 47 7C 1A 49 B2 30 3A 51 24 B2 |5):...G|.I.0:Q$.|
00003F80: 22 53 4F 52 54 20 54 48 45 20 46 49 4C 45 3F 22 |"SORT THE FILE?"|
00003F90: 3A 4C 4E B2 31 3A 50 24 B2 22 4E 22 3A 43 53 24 |:LN.1:P$."N":CS$|
00003FA0: B2 22 59 4E 22 3A 8D 34 33 39 30 3A 8B 41 24 B2 |."YN":.4390:.A$.|
00003FB0: 22 59 22 A7 36 38 31 30 00 C2 47 81 1A 8B 46 33 |"Y".6810..G...F3|
00003FC0: A7 8E 00 EC 47 86 1A 41 24 B2 22 50 54 2E 22 AA |....G..A$."PT.".|
00003FD0: 52 4E 24 3A 42 24 B2 22 44 41 54 41 22 3A 8D 36 |RN$:B$."DATA":.6|
00003FE0: 34 38 30 3A 8B 45 52 A7 36 30 36 30 00 F8 47 90 |480:.ER.6060..G.|
00003FF0: 1A 40 4C 3B 41 24 3A 8E 00 1A 48 9A 1A 52 4E 24 |.@L;A$:...H..RN$|
00004000: B2 22 5F 22 AA 52 4E 24 3A 9E 42 41 AA 34 32 2C |."_".RN$:.BA.42,|
00004010: 52 4E 24 3A 9E 38 32 38 AA 33 00 46 48 A4 1A 41 |RN$:.828.3.FH..A|
00004020: 24 B2 22 36 34 2E 53 4F 52 54 22 3A 42 24 B2 22 |$."64.SORT":B$."|
00004030: 53 59 53 54 45 4D 22 3A 8D 36 34 38 30 3A 8B 45 |SYSTEM":.6480:.E|
00004040: 52 A7 36 38 32 30 00 6F 48 AE 1A 40 43 2C 22 99 |R.6820.oH..@C,".|
00004050: 90 05 22 3A 40 4C 3B 22 36 34 2E 53 4F 52 54 2E |..":@L;"64.SORT.|
00004060: 47 22 2C 22 39 31 30 30 22 3A 40 58 2C 41 24 00 |G","9100":@X,A$.|
00004070: B3 48 B8 1A 40 4C 3B 22 36 34 2E 24 37 30 30 30 |.H..@L;"64.$7000|
00004080: 22 3A 40 4C 3B 22 36 34 2E 24 37 41 30 30 22 3A |":@L;"64.$7A00":|
00004090: 40 4C 3B 22 36 34 2E 24 38 30 30 30 22 3A 40 4C |@L;"64.$8000":@L|
000040A0: 3B 22 36 34 2E 24 30 33 33 43 22 3A 4E 46 24 B2 |;"64.$033C":NF$.|
000040B0: 52 4E 24 00 C6 48 E0 1A 8D 35 38 39 30 3A 8B 45 |RN$..H...5890:.E|
000040C0: 52 A7 36 38 38 30 00 D0 48 EA 1A 8D 36 32 39 30 |R.6880..H...6290|
000040D0: 00 DA 48 FE 1A 89 33 30 38 35 00 FD 48 28 23 97 |..H...3085..H(#.|
000040E0: 31 39 38 2C 30 3A 9F 34 2C 34 3A 98 34 3A 8B 53 |198,0:.4,4:.4:.S|
000040F0: 54 B1 B2 30 A7 A0 34 3A 89 39 30 38 35 00 31 49 |T..0..4:.9085.1I|
00004100: 5F 23 A0 34 3A 40 50 2C 32 34 2C 30 2C 22 52 45 |_#.4:@P,24,0,"RE|
00004110: 41 44 59 20 50 52 49 4E 54 45 52 20 41 4E 44 20 |ADY PRINTER AND |
00004120: 50 52 45 53 53 20 53 50 41 43 45 22 3A 8D 32 30 |PRESS SPACE":.20|
00004130: 30 00 44 49 64 23 8B C2 28 31 39 38 29 B2 30 A7 |0.DId#..(198).0.|
00004140: 39 30 36 30 00 66 49 6E 23 A1 4B 59 24 3A 8B 4B |9060.fIn#.KY$:.K|
00004150: 59 24 B3 B1 22 20 22 AF 4B 59 24 B3 B1 22 10 22 |Y$.." ".KY$.."."|
00004160: A7 8D 32 32 30 30 00 85 49 73 23 40 50 2C 32 34 |..2200..Is#@P,24|
00004170: 2C 30 2C 22 22 3A 8D 32 30 30 3A 8B 4B 59 24 B2 |,0,"":.200:.KY$.|
00004180: 22 93 22 A7 8E 00 8F 49 78 23 89 39 30 30 30 00 |"."....Ix#.9000.|
00004190: A9 49 7D 23 9F 34 2C 34 2C 28 C2 28 35 33 32 37 |.I}#.4,4,(.(5327|
000041A0: 32 29 AF 32 29 AC 33 2E 35 00 CF 49 82 23 81 5A |2).2).3.5..I.#.Z|
000041B0: 49 B2 31 A4 32 3A 98 34 3A 82 3A 40 44 3A 81 5A |I.1.2:.4:.:@D:.Z|
000041C0: 49 B2 31 A4 34 3A 98 34 3A 82 3A A0 34 3A 8E 00 |I.1.4:.4:.:.4:..|
000041D0: 00 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.+....F3.3085.I...B$."INDE
X":.BT$.."I".3070.~...@L;"IN.".NF$:.15,A
:.A..950:@P,24,0,"":.200:.3050......BT$.
"S"..6780.....BL$."":.I.1.PW:BL$.BL$." "
:..B....F4.0..6400.P....53272,CA......".
REPORTING TO ";:A$(1)."SCREEN":A$(2)."DI
SK":A$(3)."PRINTER.+.&.@H,RD$,"SDP":.A$(
KY).I.+.F7.0:.RD$."D".T$."T".F7.1.A.0.DV
.3:.RD$.."D".3150.T.:.DV.DN:A$.",S,W. .D
..15,"S0:".DF$:.5,DV,8,"0:".DF$.A$:.3170
...N..RD$."S"..5,3:.3170.Z.Q..4,4:.4,G(0
);:.ST..0. 4:.3160...R. 4:@P,24,0,"READY
PRINTER AND PRESS SPACE...S..B(198).0.3
155.2.T..KY$:.KY$." ".3153.M.U..KY$.".".
KY$."."..2200._.V..KY$.".".4360.I.W..315
5...X.DV.DN:.5,DV,(B(53272).2).3.5...B.I
R.0:.1,8,2,"#":.3830:.BA.39,102:.BT$."F"
.RN.0...V.F3.0:.NA(1).NA(3).0.F1.1:SS.0:
EL.255:.3350:F3.1:.4359.....SS.SL(1).NL(
1):EL.LP.SL(3).NL(3).6....3280:.F3..4310
:.3240.@....3350.S....3430:.F3.4359.I...
.3470:.NR.RN.F3.1.}....F3.1.NB.0.4360...
...3220...P.R(103).R(103).1...Z.CL.1:LI.
1.B...SS.SL(1):EL.SS.NL(1)......SS.CL..0
..I.CL.SS:.F7.1.3467:.:CL.SS......3550..
....T2.T3.1:LI.2:.3550:.F7.1.3466:T3.0.$
.....-...LI.2.W. .EL.LP:.F1.0.NA(3).0.EL
.LP.SL(3).NL(3).M.4..4220:.F3..4310:....
>..3930:.4100:.SL(2)..65.3380...H..3550:
.F2.B0.0:....R..3380...F.SS.LP:EL.LP:.NA
(3).EL.LP.SL(3):SS.EL.NL(3)...P..SS.CL..
0..I.CL.1.SS:.F7.1.3467:.:CL.SS...Z.LI.3
:.3550.C....NA(3)..EL.1..LP..I.EL.1.LP:.
F7.1.3467:..I.....U...CL.CL.1.A....5,"":
..Q....RD$.."S".......@P,24,0,".SPACE. C
ONTINUES/ .CLR. STOPS/.CTRL P. PRINT....
..S.54272:.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:..D..
..KY$:.KY$.".".KY$."."..2200.I.A..KY$.."
".KY$..".".KY$..".".3520...B..KY$."."..
9075:.3475...E..KY$.".".F3.1.U.J.@P,24,0
,"--------------------------------------
-":@P,24,0,""...T.......F2.0......NA(LI)
.0........F1.1.LI.2.CL.0......CL.NL(LI).
2..LP.NL(3).SL(3).F2.1.I....I.1.NL(LI):C
L$.BL$.""......J.0.NA(LI).1:.LI.3610,362
0:FD$.FD$(J):T1$.FT$(J):.3630.....FD$.HD
$(J):T1$.HT$(J):.3630.T.$.FD$.LD$(J):T1$
.LT$(J):.T3.0.F(FD$).84.3790......F(J(FD
$,5))..I.3790...8.CM.F(J(FD$,6)):LN.F(J(
FD$,4)):SB.F(J(FD$,2)).1.=.CN.F(J(FD$,7)
).>.B..T3.3740.X.L.A$.G(F(FD$)):.LI.3.J(
FD$,9,1).."N".Q.NK.1:.4180:.3750...V..AC
.1.3720...`.CS$."RDTF":@H,A$,CS$:.KY.371
0,3700,3740.B.J.F$.RE$(SB)...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.G.S..3750.
\.T.F$.DP$(SB):.3750...~..BB.51,R(SB),LN
,F(J(FD$,8)),F$:.3750......J(FD$,9,1)."N
".F$." ":.3750.O....BB.51,AC(J),LN,F(J(F
D$,8)),F$:.3750.....F$.T1$:.3760.....F$.
H(F$,LN)......CN.89.T$."T"..BA.27,F$:.37
66.#....T$."T".3766.Y....CN.89..BA.27,F$
:CM.CM..((LN.C(F$)).2):.CM.1.CM.1.T....T
$.."T".RD$.."D".3780......5,F$:."."F$:.J
:.3820...D..BA.27,F$:.CM..PW.:@M,F$,CL$,
CM...N..J...X..RD$."P".F(DF$.C0$).0..5,D
F$;......RD$.."S"..BA.27,CL$......5,CL$:
CL.CL.1......I:......F0.0.'...NA.0:NB.0.
^....828,1,AF%(0):.828,1,AC(0):.AF%(NA(2
)),AC(NA(2).1).O....I.0.NA(2).1......LT$
(I).."".F(LD$(I))..84.T2.1......F(J(LD$(
I),9)).89.AF%(NA).I:NA.NA.1......F(I(LD$
(I),1))..78.F0.1:NB.NB.1...(..:.828,2,A(
0,0):.A(NA,NK.1)...2..BT$.."S".NK.0.NB.0
:F0.0:....<..4220:IR.0.T.F..NB..I.0.NB.1
:BF$(I).RE$(BF(I)):..Z.P...F.Z..F0.0....
.D..F3.BF.0:NB.NB.1:.3980...N..BF.0.NB.1
...X..RE$(BF(BF))..BF$(BF).3980......:..
....SR.B0.(NL(2).4):@E,RE$(0),TE$(0):@B,
RE$(0).)....CL.SR.LP.SL(3).NL(3)..3430:.
3470:.3280:B0.0:EL.LP.SL(3).NL(3).B. .LI
.2:AC.1:.Q.BF.NB.1.L....F7.0.NA.0..5:.5,
"BREAK ON ";:CL.CL.1......NA..5,BF$(Q):C
L.CL.1:B0.B0.1......I.0.NA.1:AF.AF%(I)..
...AC(AF).A(I,Q).X.H.A(I,Q).0:.:.3550:.F
7.1.3466...M.....R.@E,RE$(0),TE$(0):.391
0:AC.0.%....I(LD$(BF(BF)),1)."P".F2.F3.0
.4090.+.....S....3430:.3470:.3280:EL.LP.
SL(3).NL(3)._....NA.0...M....J.0.NA.1...
..TY$.H(LD$(AF%(J)),1):T1.F(J(LD$(AF%(J)
),2))......TY$."R".T1.R(T1).N."..TY$."F"
.T1.E(RE$(T1))...,..TY$."D".T1.E(DP$(T1)
).. 1.A(J,NK.1).A(J,NK.1).T1.. 6..I.0.NB
.% @.A(J,I).A(J,I).T1./ J..:.:..> T.AF.A
F%(CB).{ ^.LN.F(J(LD$(AF),4)):DC.F(J(LD$
(AF),8)):SB.F(J(LD$(AF),2)).. H..BB.51,A
(CB,Q),LN,DC,F$.. R.A(CB,Q).0:CB.CB.1:.A
F%(CB).0.CB.0.C W.... |.@E,RE$(0),TE$(0)
:.F9.:@B,DP$(0)..!...A$:.A$.."".A$..".".
KY$.A$:.2200:.KY$.".".F3.1:...!...BT$."F
".4260.V!...B.18,IR:IR.IR.1:.RN.0.RN.NR.
F3.1:..`!...4275.R!...RN.NR.F3.1:...!...
B:.B(2).128.F3.1:...!...4280..!...B.6:.B
(2).1.4280..!...4240..!..@R,RN,RE$(0):RN
.RN.1:R(100).RN:.BB:...!V..NA.0...."...B
T$."S".F3.1:LI.2:EL.LP.SL(3).NL(3):.3940
:..*"...LI.2..3980.;"...LI..2..4000.A"..
..K"...3470.\".. 5: 1: 8: 15.."...".";:.
400:.:.,".REPORT COMPLETE..."..."RUN ANO
THER REPORT Y/N? ";:L.1:TY.0:AC$."YN":.5
50.."..RN.0:CS$."":NB.0:F1.0:@B,BF$(0)..
"...A$."Y"..100:.4580.)#...2,0:@X,"64.CR
EATEEDIT": 15:.15,8,15:.945:.4365.S#..."
.";:@P,Y,X,Q$:." ";:.I.3..:.A$(3):..A#..
.P$" ";:..K#&.Y.Y.2.S#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:.F(A$).32.E(A$).0.4440.1$B..220
0:.RF.P$.A$:.4410.I$L..B(52).B(50).2..65
0._$...LN..13..BA.27,A$..$...CS$."".:@H,
A$,CS$:.B(2).0.4440..$...TY.1.MX.0.(E(A$
).MX.E(A$).0).I..8.4440.B$..CS$."":P$.""
:...%...100:.6540:.".";:TT$."REPORT GENE
RATE":.400:AC$."DK":TY.0..%...BA.45,NF$.
<%...F(NF$).95.RN$.J(NF$,2):.BA.42,RN$:.
6840.W%...:.".REPORT FROM .K.EYBOARD OR
.D.ISKFILE? ";:L.1:.550..%F.RF$.A$:.RF$.
"K".4590.O%P.NF$."":.:.".ENTER REPORT FI
LE NAME? ";:FT$."RF.":F6.1:.307..%Z.A$.F
T$.NF$:RN$.NF$:.5900:.BA.42,NF$.7&...:."
.DO YOU WISH TO MODIFY THE REPORT? ";:AC
$."YN":L.1:.550.H&...A$."N".3020.]&...F3
.0..305:.6280.F&..F3.0..&..TS$."SELECTIO
N":.2500..&...C(SS$).0.SS$.FF$.H&..Q$."E
NTER SEARCH CRITERIA":P$.H(SS$,C(SS$).1)
..&..X.B(214):Y.B(211).!'..@P,24,0,"PRES
S RETURN IF NONE ARE REQUIRED":.200:.214
,X:.211,Y.['..CS$."":LN.40:TY.0:Y.4:I.3:
.4390:I.0:X.B(214):Y.B(211).}'..@P,24,0,
"":.200:.214,X:.211,Y..'...A$."".A$.FF$.
.'..SS$.A$:.I(SS$,1).FF$.4660.V' ..F(I(S
S$,1)).222.SS$.H(SS$,C(SS$).1)..'*.SS$.S
S$.FF$.+(4.Q$."IN ORDER BY .I.NDEX, .S.O
RT OR .F.ILE?":TY.0:P$.BT$:CS$."ISF.[(>.
LN.1:Y.14:.4400:BT$.A$:MX.15:.BT$.."S".4
830.{(C.TS$."SORT CONDITIONS":.2500..(H.
Q$."ENTER NUMBER OF SORT KEYS?":P$.D(NK)
:LN.2:Y.5:TY.1.T(R..4400:NK.E(A$):.NK.0.
4840..)\..:.".FIELD LEN .A.LPHA/NUM
.A.SCD/.D.ESD":.J.0.NK.1.O)F.C.0:Y.
J.8:TY.1:LN.3:Q$."":.C(SK$(J)).0.SK$(J).
C0$.C0$.W)P.P$.D(F(SK$(J)).1):TM.F(J(SK$
(J),2))..)Z.P3$."A":.(TM.64).TM.P3$."D.C
)..P1$.D(TM.63):P2$."A":.(TM.128).TM.P2$
."N..)..MX.NF:.4400:TM.E(A$).1:.F(SK$(J)
).TM.SK$(J).G(TM):.4760.'*..SK$(J).G(TM)
:P1$.D(F(J(FA$(TM),4))).W*..MX.F(J(FA$(T
M),4)):P$.P1$:.E(P$).0.P$.D(MX).T*..X.8:
LN.2:.4410:C.C.E(A$)..*..P$.P2$:CS$."AN"
:.P$."".P$.G(65.(F(J(FA$(TM),5)).1).13).
X*..X.17:LN.1:TY.0:.4410:.A$."N".C.C.128
..*..P$.P3$:.P$."".P$."A..+..X.33:CS$."A
D":.4410:.A$."D".C.C.64.:+J.SK$(J).SK$(J
).G(C):.A..95.4710.@+T...F+..TS$."OUTPUT
CONDITIONS":.2500:Y.3..+..Q$."OUTPUT TO
.S.CREEN, .P.RINTER, .D.ISK?":CS$."SPD"
:P$.RD$.F+...4390:RD$.A$:.RD$."S".4980..
+..P$."4":MX.7:.RD$."D".P$."8":MX.15.#,.
.Q$."ENTER DEVICE NUMBER?":TY.1:LN.1:.43
90:DN.E(A$).6,...RD$.."D".4940.\,..P$.T$
:Q$."ENTER .S.EQ OR .T.EXT ?..,..CS$."ST
":P$.T$:TY.0:.4390:T$.A$:.C(DF$).3.P$.J(
DF$,4).X,$.Q$."ENTER DISK FILE NAME?":A$
."":.450:DF$."SB.".A$:.BA.27,DF$..,8..T$
."T".Q$(7)."STRIP SPACES Y/N..-B..4980.7
-L.P$."0":.RD$."P".RF$."K".PW.PP:LP.PL:S
L(3).58.E-V.Q$."ENTER PRINTER CONTROL CH
ARACTER?":I.8..-[.MX.255:TY.1:LN.3:.4390
:DF$.G(E(A$)):I.0..-T..RD$."D".T$."T".SC
.1:.5020..-~.MX.255:Q$."ENTER LINE LENGT
H?":TY.1:P$.D(PW):LN.3:.4390:PW.E(A$).2.
..Q$."ENTER NUMBER OF LINES PER PAGE?":P
$.D(LP):LN.2:.4390.D...LP.E(A$):SC.1.L..
..".":TS$."DEFINE PRINT ZONES":.2500....
.I.1:@P,24,0,".PRESS .SPACE. / .RETURN.
TO SELECT/EXECUTE.........N....SC.4.SC.0
:.NA(2).0.SC.1../..."..DEFINE ."F$(SC)".
-."NA(SC)".. PRINT AREAS USED .../..
.B(198).0.5055.D/D..KY$:.2200:.KY$." ".S
C.SC.1:.5040.Y/I..KY$..G(13).5055.Y/N..S
C.0..2201:.RF.1.6060,5025../X..5590:MX.L
P:C$(1)."1111111200"."":C$(2)."111111122
0".""../..C$(3)."1111111220"."":Q$.NL$:.
BT$."S".:@M,"1",C$(2),10..0..P$.D(NL(SC)
):Y.5:LN.2:TY.1:.4400.:0..NL(SC).E(A$):M
X.MX.NL(SC):Q$.SL$.|0..CC$."":.LN.1.NL(S
C):CC$.CC$.C1$:.:A$."TOP?":.SC.3.A$."BOT
TOM?..0..Q$.Q$.A$:.SC..2.5180.N0..Q$."PR
INT .A.LL OR .B.REAK ONLY?":CS$."AB":TY.
0:LN.1..0..P$.G(SL(SC)):.P$.C0$.P$."A"..
1...4390:SL(SC).F(A$)..12..5190.31<.P$.D
(SL(SC)):.4390:SL(SC).E(A$).^1F..T$."T".
RD$."D".A$."00":@M,A$,C$(SC),5.O1P..J.0.
N(SC).1..1Z.CA$.C$(SC)."":I.0:.5590:.J.0
.J.0.A1D..SC.5230,5240:O$.FD$(J):T1$.FT$
(J):.5250..1N.O$.HD$(J):T1$.HT$(J):.5250
..1X.O$.LD$(J):T1$.LT$(J)..2...O$."".O$.
O1$.E2..."PRINT AREA # "J.1.25)N(SC).NA(
SC)"AREAS OPEN":.5870._2..A$."":I.I.1:.I
.11.I.3.}2 .A.F(J(CA$,I)):.A..48.5310..2
...A$.".".I.I.2:.I.2.I.2..2...5270.D2..O
$.O1$:I.0:T1$."":.5590:.5260.N2...5810.X
2H..4410..3I..I.5..G(E(A$))..J(O$,5,1).:
@M,C0$,O$,6.%3M..A$(1)."R".I.3.:@M,G(12)
,O$,4.R3N..(A$(1)."D".A$(1)."R").I.3.:@M
,G(0),O$,8.Z3O..A$(1).."T".SC..2.I.1.:@M
,"0",CA$,3..3R..I.3..5470..3...5600.T3..
CS$."_.....":.4370:A$.G(A):@H,A$,CS$:CS$
."":P$."":.KY.0.5270..3...KY.5380,5290,5
380,5380,5302..4...NA(SC).0.A.95:O$."":.
5400.S4...SC.5364,5366,5368:J.J.1:NA(SC)
.NA(SC).1:.J..NA(SC).1.5210.]4...5450..4
...BA.36,J,HD$(J):.BA.36,J,HT$(J):HD$(NA
(1))."":HT$(NA(1))."":...4...BA.36,J,LD$
(J):.BA.36,J,LT$(J):LD$(NA(2))."":LT$(NA
(2))."":..#5...BA.36,J,FD$(J):.BA.36,J,F
T$(J):FD$(NA(3))."":FT$(NA(3))."":..;5..
@M,G(E(A$(6))),O$,6.Y5...E(A$(4)).0.J.N(
SC):.5440.T5...J.NA(SC).1.NA(SC).J.1..5.
..SC.5410,5420:FD$(J).O$:FT$(J).T1$:.543
0..5".HD$(J).O$:HT$(J).T1$:.5430.Y5,.LD$
(J).O$:LT$(J).T1$..56..A.95.J.N(SC)..6;.
.A.140.J.J.1:.5210.(6@.A.E(A$(6)).E(A$(4
)):.A..PW.A.PW.1.A6E.@M,G(A),CC$,E(A$(5)
).G6J...Q6T..5020.G6^..I.2.P$."0":.5560.
X6H..A..139.5520..6R.I.0:.5840:.4410:A$(
I).A$:I.1:A$."F":A$(I).A$.E6|.I.2:A$."3"
:A$(I).A$:I.1.R6..A$.A$(0)..7..P$."0":.A
$."A".A$."R".:@M,P$,CA$,7:@M,P$,CA$,10.4
7...A$."T".:@M,P$,CA$,2:P$."000":@M,P$,C
A$,8.N7...A$."D".:@M,P$,CA$,10.T7....I7.
..A$(1).."F".5580..7B..F(J(FA$(E(A$).1),
5)).0.:@M,P$,CA$,8:@M,P$,CA$,9..7L.A$.D(
E(A$).1):..V7V..".":TS$.F$(SC)." ZONE":.
2500:...7..A$(I).A$:.I.3.T1$.A$:...8...T
Y%(I).1.A$.G(E(A$)).48..@M,A$,O$,I:.I.2.
P$.J(D(F(A$).1),2):..C8..P$.A$(I):..|8..
MX.0:.I.5690,5700,5670,5740,5710,5720,58
00,5680,5800..8..CS$."NLP":...8&....80.M
X.10:...8:.CS$."FRDT":...8D.@H,A$(1),"FR
D":MX.NV(KY):P$.G(F(P$).1):...8N.MX.NL(S
C):...9X..P$.C1$.P$.J(CC$,E(A$(5)),1)."9
B.MX.PW.E(A$(4)):..L9L..A$(1)."F".MX.F(J
(FA$(F(J(O$,2))),4)).U9V..A$(1)."T".MX.P
W:P$.J(O$,4,1)." ":...9...A$(1)."R".MX.
F(J(O$,4))..9...A$(1)."D".MX.F(J(DA$(F(J
(O$,2))),4))..9...P$.C0$.P$.G(MX).P$.G(M
X)." "..9.....9..CS$."YN":...:..MX.0:.I
.3.P$.T1$:.5840.&:..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)..:Z....:..TM.I
:.I.1.10:.5810:A$(I).P$.H:...4370:.:I.TM
..;..@P,11,0,".........1.........2......
...3.........4":..(;..A$."RF.".NF$:B$."D
ATA":.6480:.ER...<;...8,8,8,A$.",S,R.F;.
.@IN,8,NF$:.8,NK:.BA.42,NF$:.NK.0.5930..
; ..J.0.NK.1:@IL,2,8,SK$(J):BF(J).F(SK$(
J).G(0)):..A;*.@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..<H
..8,NA(1):.NA(1).0.5990.2<R..8,NL(1),SL(
1).B<\..J.0.NA(1).1:@IL,10,8,HD$(J):@IN,
8,HT$(J):..}<F..8,NA(2):.NA(2).0.6020..<
P..8,NL(2),SL(2),ZW.C<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).!=...J
.0.NA(3).1:@IL,10,8,FD$(J):@IN,8,FT$(J):
..*=.. 8:..Q=..TS$."REPORT DATA":.2500:P
$."Y":Y.3..=..I.0:Q$."SAVE THE REPORT CO
NDITIONS?":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./>...I.0.NK.1:.8,SK$(I);:..M>...8,S
S$:.8,RD$:.8,T$:.8,PW.L>...8,LP:.8,BT$:.
8,MA$:.8,VA$..>...8,DN:.8,DF$:.8,NL..>..
.8,NA(1):.NA(1).0.6190..>...8,NL(1):.8,S
L(1).X>$..J.0.NA(1).1:.8,HD$(J);HT$(J):.
..>...8,NA(2):.NA(2).0.6220..?8..8,NL(2)
:.8,SL(2):.8,ZW.3?B..J.0.NA(2).1:.8,LD$(
J);LT$(J):..N?L..8,NA(3):.NA(3).0.6241.D
?V..8,NL(3):.8,SL(3)..?`..J.0.NA(3).1:.8
,FD$(J);FT$(J):...?A..15,J:.J..72. 8:.30
20.Q?J. 8:@P,24,0,"DISK FULL - ONE MOMEN
T, PLEASE..?O..200:.15,"V0":Y.Y.4:.6070.
.?T.FA$.NF$.'@~.F9.0:A$."FS.".FA$:B$."DA
TA":.6480:.ER...J@..@P,24,0,"FOUND FILE
LOADING....S@...2,8,2,"SC.".NF$:.BB.9,1:
.BB.30,1: 2..@..@L;"TS.".NF$,"BA00":@L;"
BM.".NF$,"FF00".G@..ND.0:.1,8,2,"AR.".NF
$:.15,A:.A.6340.T@...BB.3: 1..@..F9.1:.1
,8,2,"DP.".NF$:.15,A:.A.6340. A...1,ND:.
DA$(ND),DP$(ND):.RT.4,ND.HA..NV(3).ND:.I
.0.ND.1:@IL,4,1,DA$(I):..TAD. 1:F4.1..AX
..1,8,2,"FS.".NF$:.1,NS,NF,CA,LR,NR,SC$,
P1$,P2$.MA...FA$(NF.1),RE$(NF.1),TE$(NF.
1),R(105):.1018,105:.RT.5,NF:NV(1).NF.ZA
..R(104).2..B..NV(2).105:.RT.1,.(LR.256)
:.RT,LR.(256..(LR.256)).<B...RT.3,.(NR.2
56):.RT.2,NR.(256..(NR.256)).WB..FR.4736
0:.I.0.NF.1:@IL,5,1,FA$(I):.FR.I,F(J(FA$
(I),4))..B...:.BA.30,RE$(0):.BA.30,TE$(0
): 1:.53272,CA:..NBP..8,8,8,A$:.#8,P$:ER
.ST: 8:.ER.0...YBZ..950:...C..TY.0:LP.24
:PL.66:PW.39:PP.80:RF$."K":RD$."S":T$."S
":BT$."F.$C..MA$."N".KC ..F$(3):F$(1)."H
EADER":F$(2)."LIST ":F$(3)."FOOTER":F$(
0)."EXIT "..C..NL$."NUMBER OF LINES IN
ZONE?":SL$."NUMBER OF LINES FROM THE "..
C..I.1:Q$(I)."DATA TYPE (.F.-.R.-.D.-.T.
):"..DC.X%(I).0:Y%(I).7:TY%(I).0:LN%(I).
1.?DH.I.2:Q$(I)."SUBSCRIPT:":X%(I).25:Y%
(I).7:TY%(I).1:LN%(I).3.}DR.I.3:Q$(I)."T
EXT/TITLE":X%(I).0:Y%(I).9:TY%(I).0:LN%(
I).40..D..I.4:Q$(I)."LENGTH OF AREA:":X%
(I).0:Y%(I).12:TY%(I).1:LN%(I).2..E..I.5
:Q$(I)."LINE NUMBER :":X%(I).20:Y%(I
).12:TY%(I).1:LN%(I).2.IE..I.6:Q$(I)."CO
LUMN NUMBER :":X%(I).0:Y%(I).14:TY%(I).1
:LN%(I).3.KE..I.7:Q$(I)."CENTERING (Y/N)
? "..E..X%(I).20:Y%(I).14:TY%(I).0:LN%(I
).1.VE..I.8:Q$(I)."# OF DECIMALS :":X%(I
).0:Y%(I).16:TY%(I).1:LN%(I).1..E..I.9:Q
$(I)."ACCUMULATE (Y/N)?..F..X%(I).20:Y%(
I).16:TY%(I).0:LN%(I).1.VF..I.10:Q$(10).
"BREAK TYPE (.N.ONE, .L.NFDS, .P.AGE)?.}
F".X%(I).0:Y%(I).18:TY%(I).0:LN%(I).1..F
,..I.1.3:NL(I).1:NA(I).0:.:SL(1).3:SL(3)
.3.PF6.O1$."F".C0$." ".C0$.C1$.C0$."N NN
..F@.FF$.G(255):RT.53242:.38656,255..GT.
N(1).10:.HD$(N(1)),HT$(N(1)).5G^.N(2).50
:.LD$(N(2)),LT$(N(2)).VGH.N(3).10:.FD$(N
(3)),FT$(N(3)).TGR..SK$(15),BF(15),BF$(1
5):...G|.I.0:Q$."SORT THE FILE?":LN.1:P$
."N":CS$."YN":.4390:.A$."Y".6810.BG...F3
....G..A$."PT.".RN$:B$."DATA":.6480:.ER.
6060..G..@L;A$:...H..RN$."_".RN$:.BA.42,
RN$:.828.3.FH..A$."64.SORT":B$."SYSTEM":
.6480:.ER.6820.OH..@C,"...":@L;"64.SORT.
G","9100":@X,A$..H..@L;"64.$7000":@L;"64
.$7A00":@L;"64.$8000":@L;"64.$033C":NF$.
RN$.FH...5890:.ER.6880.PH...6290.ZH...30
85..H(#.198,0:.4,4:.4:.ST..0. 4:.9085.1I
_# 4:@P,24,0,"READY PRINTER AND PRESS SP
ACE":.200.DID#.B(198).0.9060.FIN#.KY$:.K
Y$.." ".KY$.."."..2200..IS#@P,24,0,"":.2
00:.KY$."."....IX#.9000..I}#.4,4,(B(5327
2).2).3.5.OI.#.ZI.1.2:.4:.:@D:.ZI.1.4:.4
:.: 4:....
> CLICK IMAGE PREVIEW FOR FULL MODAL