64.ARITHEDIT
FILE INFORMATION
FILENAME(S): 64.ARITHEDIT
FILE TYPE(S): PRG
FILE SIZE: 16.7K
FIRST SEEN: 2025-11-30 21:21:08
APPEARS ON: 1 disk(s)
FILE HASH
727445b1da058f7af1e648e74f6fd686708c3e299dfea235c2250bd9adec71f8
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| EASYFILE | 64.ARITHEDIT | PRG | DuncanTwain | 13 | 19 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 04 0B 04 0A 00 8A 31 30 30 30 00 3E 04 64 00 |.......1000.>.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 00 74 |BC.31088:LC.48.t|
00000040: 04 6E 00 57 41 24 B2 C7 28 C2 28 31 30 31 37 29 |.n.WA$..(.(1017)|
00000050: 29 3A 4B 59 B2 30 3A 4B 59 24 B2 22 20 22 AA 22 |):KY.0:KY$." "."|
00000060: 22 3A 9F 31 35 2C 38 2C 31 35 3A 52 52 B2 C2 28 |":.15,8,15:RR..(|
00000070: 32 29 3A 8E 00 BA 04 C8 00 58 41 24 B2 22 20 20 |2):......XA$." |
00000080: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000090: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000000A0: 20 20 20 20 20 22 3A 59 41 B2 C2 28 32 31 34 29 | ":YA..(214)|
000000B0: 3A 58 41 B2 C2 28 32 31 31 29 00 E9 04 D2 00 40 |:XA..(211).....@|
000000C0: 50 2C 59 41 2C 58 41 2C C8 28 58 41 24 2C 33 39 |P,YA,XA,.(XA$,39|
000000D0: AB 58 41 29 3A 58 41 24 B2 22 22 3A 40 50 2C 59 |.XA):XA$."":@P,Y|
000000E0: 41 2C 58 41 2C 22 22 3A 8E 00 09 05 FA 00 40 42 |A,XA,"":......@B|
000000F0: 2C 44 50 24 28 30 29 3A 52 28 31 30 30 29 B2 52 |,DP$(0):R(100).R|
00000100: 4E AA 31 3A 9E 42 42 3A 8E 00 1D 05 2C 01 46 39 |N.1:.BB:....,.F9|
00000110: B2 30 3A 99 22 93 22 3B 3A 8D 34 30 30 00 48 05 |.0:.".";:.400.H.|
00000120: 31 01 99 3A 99 22 11 45 4E 54 45 52 20 46 49 4C |1..:.".ENTER FIL|
00000130: 45 4E 41 4D 45 3F 20 22 3B 3A 8D 35 30 30 3A 58 |ENAME? ";:.500:X|
00000140: 31 B2 58 3A 59 31 B2 59 00 77 05 36 01 9F 32 2C |1.X:Y1.Y.w.6..2,|
00000150: 38 2C 32 2C 22 30 3A 46 53 2E 22 AA 4E 46 24 3A |8,2,"0:FS.".NF$:|
00000160: 84 31 35 2C 41 2C 42 24 3A 84 32 2C 4E 53 2C 4E |.15,A,B$:.2,NS,N|
00000170: 46 2C 43 41 3A A0 32 00 95 05 40 01 8B 41 B2 30 |F,CA:.2...@..A.0|
00000180: B0 46 39 B2 32 A7 9E 42 41 AA 34 32 2C 4E 46 24 |.F9.2..BA.42,NF$|
00000190: 3A 89 33 37 30 00 C3 05 4A 01 40 50 2C 32 34 2C |:.370...J.@P,24,|
000001A0: 30 2C C8 28 42 24 2C 32 30 29 3A 99 22 20 2D 20 |0,.(B$,20):." - |
000001B0: 44 49 52 45 43 54 4F 52 59 20 28 59 2F 4E 29 3F |DIRECTORY (Y/N)?|
000001C0: 20 22 3B 00 FA 05 54 01 41 43 24 B2 22 59 4E 22 | ";...T.AC$."YN"|
000001D0: 3A 54 59 B2 30 3A 4C B2 31 3A 8D 35 35 30 3A 40 |:TY.0:L.1:.550:@|
000001E0: 50 2C 32 34 2C 30 2C 22 22 3A 8D 32 30 30 3A 8B |P,24,0,"":.200:.|
000001F0: 41 24 B2 22 4E 22 A7 33 36 30 00 27 06 5E 01 9E |A$."N".360.'.^..|
00000200: 42 42 AA 31 35 3A 41 24 B2 22 44 41 2E 2A 22 3A |BB.15:A$."DA.*":|
00000210: 46 47 B2 30 3A 8D 31 33 38 30 3A 99 22 93 22 3B |FG.0:.1380:.".";|
00000220: 3A 9E 42 42 AA 35 37 00 3F 06 68 01 58 B2 58 31 |:.BB.57.?.h.X.X1|
00000230: 3A 59 B2 59 31 3A 8D 35 31 30 3A 89 33 31 30 00 |:Y.Y1:.510:.310.|
00000240: 4A 06 72 01 46 39 B2 30 3A 8E 00 75 06 90 01 43 |J.r.F9.0:..u...C|
00000250: 24 B2 22 9A 97 05 22 3A 40 43 2C 43 24 3A 99 C7 |$."...":@C,C$:..|
00000260: 28 31 34 32 29 A6 32 30 AB C3 28 54 54 24 29 AD |(142).20..(TT$).|
00000270: 32 29 54 54 24 00 98 06 9A 01 81 49 49 B2 31 A4 |2)TT$......II.1.|
00000280: 34 3A 99 22 81 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 05 |4:."............|
00000290: 22 3B 3A 82 49 49 3A 8E 00 A7 06 B8 01 4C 56 B2 |";:.II:......LV.|
000002A0: 4C 31 3A 4D 44 B2 4D 00 D8 06 C2 01 40 50 2C 32 |L1:MD.M.....@P,2|
000002B0: 34 2C 31 39 2C CA 28 4D 53 24 28 32 29 2C 31 30 |4,19,.(MS$(2),10|
000002C0: 29 3A 40 50 2C 32 34 2C 31 39 2C CA 28 4D 53 24 |):@P,24,19,.(MS$|
000002D0: 28 4C 56 29 2C 31 30 29 00 FF 06 CC 01 40 50 2C |(LV),10).....@P,|
000002E0: 32 34 2C 30 2C 51 24 28 30 29 3A 40 50 2C 32 34 |24,0,Q$(0):@P,24|
000002F0: 2C 30 2C 51 24 28 4D 44 29 3A 8B 4D 44 A7 8E 00 |,0,Q$(MD):.MD...|
00000300: 25 07 D6 01 40 50 2C 32 34 2C 30 2C 22 53 43 52 |%...@P,24,0,"SCR|
00000310: 22 3A 99 C4 28 53 43 29 22 20 52 45 43 22 52 4E |":..(SC)" REC"RN|
00000320: AA 31 3B 3A 8E 00 41 07 F4 01 59 B2 C2 28 32 31 |.1;:..A...Y..(21|
00000330: 34 29 3A 58 B2 C2 28 32 31 31 29 3A 99 4E 46 24 |4):X..(211):.NF$|
00000340: 3B 00 54 07 FE 01 4B 59 B2 31 3A 97 42 41 AA 4C |;.T...KY.1:.BA.L|
00000350: 43 2C 36 34 00 89 07 FF 01 97 32 31 31 2C 58 AB |C,64......211,X.|
00000360: 31 AA 4B 59 3A 4C B2 31 33 3A 54 59 B2 30 3A 8D |1.KY:L.13:TY.0:.|
00000370: 35 36 30 3A 8B 52 46 20 B0 41 24 B3 22 21 22 A7 |560:.RF .A$."!".|
00000380: 4B 59 B2 31 3A 89 35 31 31 00 A2 07 03 02 40 48 |KY.1:.511.....@H|
00000390: 2C 22 3F 22 2C 41 24 3A 8B 4B 59 B3 B1 30 A7 35 |,"?",A$:.KY..0.5|
000003A0: 31 31 00 BB 07 04 02 40 48 2C 22 2A 22 2C 41 24 |11.....@H,"*",A$|
000003B0: 3A 8B 4B 59 B3 B1 30 A7 35 31 31 00 D4 07 05 02 |:.KY..0.511.....|
000003C0: 40 48 2C 22 40 22 2C 41 24 3A 8B 4B 59 B3 B1 30 |@H,"@",A$:.KY..0|
000003D0: A7 35 31 31 00 E1 07 06 02 97 42 41 AA 4C 43 2C |.511......BA.LC,|
000003E0: 30 00 EE 07 08 02 4E 46 24 B2 41 24 3A 8E 00 04 |0.....NF$.A$:...|
000003F0: 08 26 02 59 B2 C2 28 32 31 34 29 3A 58 B2 C2 28 |.&.Y..(214):X..(|
00000400: 32 31 31 29 00 0D 08 30 02 8D 36 30 30 00 2B 08 |211)...0..600.+.|
00000410: 32 02 8B 4C B2 31 A7 3A 40 48 2C 41 24 2C 41 43 |2..L.1.:@H,A$,AC|
00000420: 24 3A 8B 4B 59 B2 30 A7 35 36 30 00 3D 08 35 02 |$:.KY.0.560.=.5.|
00000430: 8B 54 59 B2 31 A7 41 B2 C5 28 41 24 29 00 43 08 |.TY.1.A..(A$).C.|
00000440: 3A 02 8E 00 69 08 58 02 8D 36 35 30 3A 40 47 2C |:...i.X..650:@G,|
00000450: 59 2C 58 2C 4C 2C 54 59 2C 41 24 3A 8D 32 32 30 |Y,X,L,TY,A$:.220|
00000460: 30 3A 8B 52 46 A7 36 30 30 00 6F 08 62 02 8E 00 |0:.RF.600.o.b...|
00000470: 84 08 8A 02 8B C2 28 35 32 29 AB C2 28 35 30 29 |......(52)..(50)|
00000480: B1 33 A7 8E 00 B7 08 8F 02 97 31 39 38 2C 31 3A |.3........198,1:|
00000490: 97 36 33 31 2C 31 33 3A 58 5A B2 C2 28 32 31 31 |.631,13:XZ..(211|
000004A0: 29 3A 59 5A B2 C2 28 32 31 34 29 3A 4F 41 B2 C2 |):YZ..(214):OA..|
000004B0: 28 42 41 AA 4C 43 29 00 F7 08 94 02 97 42 41 AA |(BA.LC)......BA.|
000004C0: 4C 43 2C 30 3A 40 47 2C 32 34 2C 30 2C 33 39 2C |LC,0:@G,24,0,39,|
000004D0: 30 2C 54 53 24 3A 40 50 2C 32 34 2C 30 2C 22 4F |0,TS$:@P,24,0,"O|
000004E0: 4E 45 20 4D 4F 4D 45 4E 54 2C 20 50 4C 45 41 53 |NE MOMENT, PLEAS|
000004F0: 45 22 3A 8D 32 30 30 00 2D 09 9E 02 5A B2 B8 28 |E":.200.-...Z..(|
00000500: 30 29 3A 40 50 2C 32 34 2C 30 2C 54 53 24 3A 97 |0):@P,24,0,TS$:.|
00000510: 42 41 AA 4C 43 2C 4F 41 3A 40 50 2C 59 5A 2C 58 |BA.LC,OA:@P,YZ,X|
00000520: 5A 2C 22 22 3A 54 53 24 B2 22 22 3A 8E 00 36 09 |Z,"":TS$."":..6.|
00000530: BC 02 49 B2 44 46 00 56 09 C6 02 8D 37 31 36 30 |..I.DF.V....7160|
00000540: 3A 8B 46 31 B2 31 A7 53 43 B2 53 3A 8D 37 33 38 |:.F1.1.SC.S:.738|
00000550: 30 3A 89 37 31 30 00 7F 09 D0 02 8D 36 35 30 3A |0:.710......650:|
00000560: 40 47 2C 59 2C 58 2C 4C 2C 54 59 2C 52 45 24 28 |@G,Y,X,L,TY,RE$(|
00000570: 49 29 3A 41 24 B2 4B 59 24 3A 8D 32 32 30 30 00 |I):A$.KY$:.2200.|
00000580: 9E 09 D1 02 40 48 2C 41 24 2C 43 44 24 3A 8B 4B |....@H,A$,CD$:.K|
00000590: 59 B3 B1 32 AF 4B 59 B3 B1 33 A7 37 32 39 00 BE |Y..2.KY..3.729..|
000005A0: 09 D2 02 8D 37 33 36 30 3A 49 B2 46 46 3A 8D 37 |....7360:I.FF:.7|
000005B0: 31 36 30 3A 8B 46 31 B3 B1 31 89 37 31 30 00 D0 |160:.F1..1.710..|
000005C0: 09 D3 02 8B C2 28 31 39 38 29 B2 30 A7 37 32 33 |.....(198).0.723|
000005D0: 00 F4 09 D4 02 A1 4B 59 24 3A 8D 32 32 30 30 3A |......KY$:.2200:|
000005E0: 41 24 B2 4B 59 24 3A 40 48 2C 41 24 2C 22 93 5F |A$.KY$:@H,A$,"._|
000005F0: 91 88 8C 11 00 08 0A D5 02 4B 59 B2 4B 59 AB 32 |.........KY.KY.2|
00000600: 3A 8B 4B 59 B3 31 A7 8E 00 17 0A D6 02 8B 4B 59 |:.KY.1........KY|
00000610: B1 33 A7 4B 59 B2 32 00 26 0A D7 02 8B 4B 59 B2 |.3.KY.2.&....KY.|
00000620: 31 A7 4B 59 B2 33 00 2F 0A D8 02 89 37 32 32 00 |1.KY.3./....722.|
00000630: 39 0A D9 02 8B 4B 59 A7 8E 00 50 0A DA 02 8B 41 |9....KY...P....A|
00000640: 24 B2 22 91 22 AF 49 B3 B1 30 A7 49 B2 49 AB 31 |$.".".I..0.I.I.1|
00000650: 00 60 0A E4 02 8B 41 24 B2 22 91 22 A7 37 31 30 |.`....A$.".".710|
00000660: 00 7C 0A EE 02 8B 41 24 B2 22 13 22 A7 8D 37 31 |.|....A$."."..71|
00000670: 36 30 3A 49 B2 46 46 3A 89 37 31 30 00 8E 0A F8 |60:I.FF:.710....|
00000680: 02 8B 49 B3 4E 46 AB 31 A7 49 B2 49 AA 31 00 97 |..I.NF.1.I.I.1..|
00000690: 0A 02 03 89 37 31 30 00 B6 0A 20 03 40 52 2C 52 |....710... .@R,R|
000006A0: 4E 2C 52 45 24 28 30 29 3A 52 28 31 30 30 29 B2 |N,RE$(0):R(100).|
000006B0: 52 4E AA 31 3A 8E 00 C4 0A 52 03 9E 42 42 AA 31 |RN.1:....R..BB.1|
000006C0: 32 2C 53 43 00 DF 0A 5C 03 97 32 2C 53 43 AB 31 |2,SC...\..2,SC.1|
000006D0: 3A 9E 42 AA 33 3A 46 46 B2 C2 28 32 29 3A 8E 00 |:.B.3:FF..(2):..|
000006E0: 06 0B 84 03 49 B2 52 28 31 30 31 29 AB 31 3A 52 |....I.R(101).1:R|
000006F0: 28 31 30 31 29 B2 30 3A 8B 49 B1 4E 46 AB 31 A7 |(101).0:.I.NF.1.|
00000700: 49 B2 4E 46 AB 31 00 13 0B 85 03 8B 49 B3 30 A7 |I.NF.1......I.0.|
00000710: 49 B2 30 00 1E 0B 86 03 8D 37 31 30 3A 8E 00 60 |I.0......710:..`|
00000720: 0B B6 03 84 31 35 2C 41 24 3A 40 50 2C 32 34 2C |....15,A$:@P,24,|
00000730: 30 2C 22 50 4C 41 43 45 20 53 59 53 54 45 4D 20 |0,"PLACE SYSTEM |
00000740: 44 49 53 4B 20 49 4E 20 44 52 49 56 45 2D 20 50 |DISK IN DRIVE- P|
00000750: 52 45 53 53 20 53 50 41 43 45 22 3A 89 39 38 35 |RESS SPACE":.985|
00000760: 00 9C 0B D4 03 84 31 35 2C 41 24 3A 40 50 2C 32 |......15,A$:@P,2|
00000770: 34 2C 30 2C 22 50 4C 41 43 45 20 45 41 53 59 53 |4,0,"PLACE EASYS|
00000780: 43 52 49 50 54 20 49 4E 20 44 52 49 56 45 20 2D |CRIPT IN DRIVE -|
00000790: 20 50 52 45 53 53 20 53 50 41 43 45 00 B9 0B D9 | PRESS SPACE....|
000007A0: 03 A1 4B 59 24 3A 8D 32 32 30 30 3A 8B 4B 59 24 |..KY$:.2200:.KY$|
000007B0: B3 B1 22 20 22 A7 39 38 35 00 E0 0B DE 03 40 50 |.." ".985.....@P|
000007C0: 2C 32 34 2C 30 2C 22 4C 4F 41 44 49 4E 47 20 4F |,24,0,"LOADING O|
000007D0: 50 54 49 4F 4E 2E 2E 2E 22 3A 8D 32 30 30 3A 8E |PTION...":.200:.|
000007E0: 00 00 0C E8 03 8D 31 30 30 3A 8B C2 28 32 29 B3 |......100:..(2).|
000007F0: B1 30 A7 4B 59 B2 C2 28 32 29 3A 89 31 31 37 30 |.0.KY..(2):.1170|
00000800: 00 2A 0C ED 03 99 22 93 22 3B 3A 54 54 24 B2 22 |.*....".";:TT$."|
00000810: 43 4F 4D 4D 4F 44 4F 52 45 20 36 34 20 4D 41 4E |COMMODORE 64 MAN|
00000820: 41 47 45 52 22 3A 8D 34 30 30 00 4E 0C FD 03 97 |AGER":.400.N....|
00000830: 42 41 AA 4C 43 2C 30 3A 99 C7 28 38 29 3B 3A 8B |BA.LC,0:..(8);:.|
00000840: C2 28 38 30 39 29 B2 32 34 36 A7 3A 40 41 00 62 |.(809).246.:@A.b|
00000850: 0C 06 04 99 A6 31 35 29 22 4D 41 49 4E 20 4D 45 |.....15)"MAIN ME|
00000860: 4E 55 00 78 0C 10 04 99 A6 31 35 29 22 9A B7 B7 |NU.x.....15)"...|
00000870: B7 B7 B7 B7 B7 B7 B7 05 00 A6 0C 24 04 99 A6 33 |...........$...3|
00000880: 29 22 11 11 11 12 41 92 52 49 54 48 4D 45 54 49 |)"....A.RITHMETI|
00000890: 43 22 A3 32 33 29 22 12 46 92 4F 52 4D 41 54 20 |C".23)".F.ORMAT |
000008A0: 41 20 44 49 53 4B 00 D8 0C 2E 04 99 A6 33 29 22 |A DISK.......3)"|
000008B0: 11 12 42 92 41 43 4B 55 50 20 41 20 44 49 53 4B |..B.ACKUP A DISK|
000008C0: 22 A3 32 33 29 22 12 4D 92 41 4E 49 50 55 4C 41 |".23)".M.ANIPULA|
000008D0: 54 45 20 46 49 4C 45 53 00 09 0D 38 04 99 A6 33 |TE FILES...8...3|
000008E0: 29 22 11 12 43 92 52 45 41 54 45 2F 52 45 56 49 |)"..C.REATE/REVI|
000008F0: 53 45 22 A3 32 33 29 22 12 52 92 45 50 4F 52 54 |SE".23)".R.EPORT|
00000900: 20 47 45 4E 45 52 41 54 45 00 3B 0D 42 04 99 A6 | GENERATE.;.B...|
00000910: 33 29 22 11 12 44 92 49 53 4B 20 44 49 52 45 43 |3)"..D.ISK DIREC|
00000920: 54 4F 52 59 22 A3 32 33 29 22 12 57 92 4F 52 44 |TORY".23)".W.ORD|
00000930: 20 50 52 4F 43 45 53 53 49 4E 47 00 69 0D 4C 04 | PROCESSING.i.L.|
00000940: 99 A6 33 29 22 11 12 45 92 4E 54 45 52 2F 45 44 |..3)"..E.NTER/ED|
00000950: 49 54 22 A3 32 33 29 22 12 58 92 2D 45 58 49 54 |IT".23)".X.-EXIT|
00000960: 20 54 4F 20 42 41 53 49 43 00 7B 0D 56 04 99 A6 | TO BASIC.{.V...|
00000970: 31 38 29 22 11 12 48 92 45 4C 50 00 90 0D 60 04 |18)"..H.ELP...`.|
00000980: 41 43 24 B2 22 41 42 43 44 45 46 4D 52 57 58 48 |AC$."ABCDEFMRWXH|
00000990: 00 BF 0D 6A 04 40 50 2C 32 30 2C 31 30 2C 22 45 |...j.@P,20,10,"E|
000009A0: 4E 54 45 52 20 53 45 4C 45 43 54 49 4F 4E 3F 20 |NTER SELECTION? |
000009B0: 22 3A 54 59 B2 30 3A 4C B2 31 3A 8D 35 35 30 00 |":TY.0:L.1:.550.|
000009C0: DE 0D 88 04 40 50 2C 32 34 2C 30 2C 22 4C 4F 41 |....@P,24,0,"LOA|
000009D0: 44 49 4E 47 20 4F 50 54 49 4F 4E 2E 2E 2E 00 1E |DING OPTION.....|
000009E0: 0E 92 04 91 4B 59 89 20 31 31 38 30 2C 31 31 39 |....KY. 1180,119|
000009F0: 30 2C 31 32 30 30 2C 31 32 31 30 2C 31 32 33 30 |0,1200,1210,1230|
00000A00: 2C 31 32 34 30 2C 31 32 34 31 2C 31 32 34 32 2C |,1240,1241,1242,|
00000A10: 31 32 34 33 2C 31 32 34 36 2C 31 35 35 30 00 28 |1243,1246,1550.(|
00000A20: 0E 9C 04 8A 33 30 30 30 00 46 0E A6 04 40 58 2C |....3000.F...@X,|
00000A30: 22 36 34 2E 42 41 43 4B 55 50 22 3A 8D 39 35 30 |"64.BACKUP":.950|
00000A40: 3A 89 31 31 39 30 00 68 0E B0 04 40 58 2C 22 36 |:.1190.h...@X,"6|
00000A50: 34 2E 43 52 45 41 54 45 45 44 49 54 22 3A 8D 39 |4.CREATEEDIT":.9|
00000A60: 35 30 3A 89 31 32 30 30 00 72 0E BA 04 8A 31 32 |50:.1200.r....12|
00000A70: 35 30 00 7C 0E CE 04 8A 37 30 30 30 00 86 0E D8 |50.|....7000....|
00000A80: 04 8A 32 30 30 30 00 A8 0E D9 04 40 58 2C 22 36 |..2000.....@X,"6|
00000A90: 34 2E 4D 41 4E 49 50 55 4C 41 54 45 22 3A 8D 39 |4.MANIPULATE":.9|
00000AA0: 35 30 3A 89 31 32 34 31 00 C6 0E DA 04 40 58 2C |50:.1241.....@X,|
00000AB0: 22 36 34 2E 52 45 50 4F 52 54 22 3A 8D 39 35 30 |"64.REPORT":.950|
00000AC0: 3A 89 31 32 34 32 00 E6 0E DB 04 40 58 3B 22 45 |:.1242.....@X;"E|
00000AD0: 41 53 59 20 53 43 52 49 50 54 22 3A 8D 39 38 30 |ASY SCRIPT":.980|
00000AE0: 3A 89 31 32 34 33 00 02 0F DE 04 52 46 B2 30 3A |:.1243.....RF.0:|
00000AF0: 8D 32 32 30 31 3A 8B 52 46 B2 31 A7 97 32 2C 30 |.2201:.RF.1..2,0|
00000B00: 3A 8A 00 0B 0F DF 04 9E 36 39 37 00 2C 0F E2 04 |:.......697.,...|
00000B10: 46 47 B2 31 3A 8D 31 30 30 3A 8D 31 32 36 30 3A |FG.1:.100:.1260:|
00000B20: 8D 31 33 38 30 3A 97 32 2C 30 3A 8A 00 50 0F EC |.1380:.2,0:..P..|
00000B30: 04 99 22 93 22 3B 3A 54 54 24 B2 22 44 49 53 4B |..".";:TT$."DISK|
00000B40: 20 44 49 52 45 43 54 4F 52 59 22 3A 8D 34 30 30 | DIRECTORY":.400|
00000B50: 00 6D 0F 00 05 99 3A 99 A3 31 33 29 22 11 11 11 |.m....:..13)"...|
00000B60: 11 12 45 92 56 45 52 59 54 48 49 4E 47 00 88 0F |..E.VERYTHING...|
00000B70: 0A 05 99 A3 31 33 29 22 11 12 4D 92 41 4E 41 47 |....13)"..M.ANAG|
00000B80: 45 52 20 46 49 4C 45 53 00 A2 0F 14 05 99 A3 31 |ER FILES.......1|
00000B90: 33 29 22 11 12 52 92 45 50 4F 52 54 20 46 49 4C |3)"..R.EPORT FIL|
00000BA0: 45 53 00 C7 0F 1E 05 99 3A 99 A3 31 30 29 22 11 |ES......:..10)".|
00000BB0: 11 11 45 4E 54 45 52 20 53 45 4C 45 43 54 49 4F |..ENTER SELECTIO|
00000BC0: 4E 3F 20 45 9D 22 3B 00 E3 0F 28 05 4C B2 31 3A |N? E.";...(.L.1:|
00000BD0: 54 59 B2 30 3A 41 43 24 B2 22 45 4D 52 22 3A 8D |TY.0:AC$."EMR":.|
00000BE0: 35 35 30 00 FD 0F 46 05 41 24 B2 22 2A 22 3A 8B |550...F.A$."*":.|
00000BF0: 4B 59 B2 32 A7 41 24 B2 22 44 41 2E 2A 00 10 10 |KY.2.A$."DA.*...|
00000C00: 50 05 8B 4B 59 B2 33 A7 41 24 B2 22 52 46 2E 2A |P..KY.3.A$."RF.*|
00000C10: 00 16 10 5A 05 8E 00 49 10 64 05 46 4C B2 30 3A |...Z...I.d.FL.0:|
00000C20: 9F 31 2C 38 2C 30 2C 22 24 30 3A 22 AA 41 24 3A |.1,8,0,"$0:".A$:|
00000C30: 84 31 35 2C 42 31 2C 42 24 3A 8B 42 31 A7 8D 31 |.15,B1,B$:.B1..1|
00000C40: 35 30 30 3A 89 31 34 35 35 00 59 10 69 05 99 22 |500:.1455.Y.i.."|
00000C50: 93 22 3B 3A 9E 42 41 AA 33 00 6C 10 6E 05 8B C2 |.";:.BA.3.l.n...|
00000C60: 28 32 35 34 29 B2 30 A7 31 34 35 30 00 7F 10 78 |(254).0.1450...x|
00000C70: 05 8B C2 28 31 39 38 29 B2 30 A7 31 34 30 30 00 |...(198).0.1400.|
00000C80: 97 10 82 05 A1 4B 59 24 3A 8D 32 32 30 30 3A 8B |.....KY$:.2200:.|
00000C90: 52 46 A7 31 34 30 30 00 AA 10 96 05 8B 4B 59 24 |RF.1400......KY$|
00000CA0: B3 B1 22 20 22 A7 31 34 30 30 00 BA 10 A0 05 9E |.." ".1400......|
00000CB0: 42 41 AA 36 3A 89 31 33 39 30 00 E3 10 AA 05 99 |BA.6:.1390......|
00000CC0: 3A 99 22 46 52 45 45 20 42 4C 4F 43 4B 53 20 3D |:."FREE BLOCKS =|
00000CD0: 22 C2 28 32 35 31 29 AA 32 35 36 AC C2 28 32 35 |".(251).256..(25|
00000CE0: 32 29 3B 00 F0 10 AF 05 A0 31 3A 97 32 2C 52 52 |2);......1:.2,RR|
00000CF0: 00 03 11 B4 05 8B C2 28 31 39 38 29 B2 30 A7 31 |.......(198).0.1|
00000D00: 34 36 30 00 1B 11 BE 05 A1 4B 59 24 3A 8D 32 32 |460......KY$:.22|
00000D10: 30 30 3A 8B 52 46 A7 31 34 36 30 00 21 11 D2 05 |00:.RF.1460.!...|
00000D20: 8E 00 46 11 DC 05 99 22 93 22 3B 3A 8D 34 30 30 |..F....".";:.400|
00000D30: 3A 40 50 2C 32 34 2C 32 30 AB C3 28 42 24 29 AD |:@P,24,20..(B$).|
00000D40: 32 2C 42 24 3A 8E 00 50 11 0E 06 8A 31 35 35 35 |2,B$:..P....1555|
00000D50: 00 84 11 13 06 8D 31 30 30 3A 9F 32 2C 38 2C 32 |......100:.2,8,2|
00000D60: 2C 22 30 3A 46 53 2E 48 45 4C 50 20 53 43 52 45 |,"0:FS.HELP SCRE|
00000D70: 45 4E 53 20 22 3A 84 31 35 2C 41 3A 84 32 2C 4E |ENS ":.15,A:.2,N|
00000D80: 53 3A A0 32 00 96 11 18 06 8B 41 A7 8D 39 35 30 |S:.2......A..950|
00000D90: 3A 89 31 35 35 30 00 CD 11 22 06 9F 32 2C 38 2C |:.1550..."..2,8,|
00000DA0: 32 2C 22 53 43 2E 48 45 4C 50 20 53 43 52 45 45 |2,"SC.HELP SCREE|
00000DB0: 4E 53 20 22 3A 9E 42 42 AA 39 2C 31 3A 9E 42 42 |NS ":.BB.9,1:.BB|
00000DC0: AA 33 30 2C 31 3A A0 32 3A 53 43 B2 31 00 00 12 |.30,1:.2:SC.1...|
00000DD0: 2C 06 97 35 33 32 37 32 2C 32 33 3A 9E 42 42 AA |,..53272,23:.BB.|
00000DE0: 31 32 2C 53 43 3A 97 31 30 32 34 2C 33 32 3A 40 |12,SC:.1024,32:@|
00000DF0: 50 2C 32 34 2C 30 2C 22 46 37 2C 46 38 2C 58 3F |P,24,0,"F7,F8,X?|
00000E00: 00 13 12 31 06 8B C2 28 31 39 38 29 B2 30 A7 31 |...1...(198).0.1|
00000E10: 35 38 35 00 39 12 36 06 A1 4B 59 24 3A 8D 32 32 |585.9.6..KY$:.22|
00000E20: 30 30 3A 8B 4B 59 24 B2 22 88 22 AF 53 43 B3 4E |00:.KY$.".".SC.N|
00000E30: 53 A7 53 43 B2 53 43 AA 31 00 53 12 40 06 8B 4B |S.SC.SC.1.S.@..K|
00000E40: 59 24 B2 22 8C 22 AF 53 43 B1 31 A7 53 43 B2 53 |Y$.".".SC.1.SC.S|
00000E50: 43 AB 31 00 67 12 4A 06 8B 4B 59 24 B2 22 58 22 |C.1.g.J..KY$."X"|
00000E60: A7 97 32 2C 30 3A 8A 00 71 12 54 06 89 31 35 38 |..2,0:..q.T..158|
00000E70: 30 00 9D 12 D0 07 8D 31 30 30 3A 99 22 93 22 3B |0......100:.".";|
00000E80: 3A 54 54 24 B2 22 46 4F 52 4D 41 54 20 41 20 44 |:TT$."FORMAT A D|
00000E90: 49 53 4B 45 54 54 45 22 3A 8D 34 30 30 00 CB 12 |ISKETTE":.400...|
00000EA0: E4 07 99 3A 99 22 48 41 56 45 20 59 4F 55 20 50 |...:."HAVE YOU P|
00000EB0: 4C 41 43 45 44 20 54 48 45 20 44 49 53 4B 45 54 |LACED THE DISKET|
00000EC0: 54 45 20 59 4F 55 20 57 49 53 48 00 08 13 EE 07 |TE YOU WISH.....|
00000ED0: 99 22 54 4F 20 46 4F 52 4D 41 54 20 49 4E 20 54 |."TO FORMAT IN T|
00000EE0: 48 45 20 44 52 49 56 45 20 28 59 2F 4E 29 3F 20 |HE DRIVE (Y/N)? |
00000EF0: 22 3B 3A 54 59 B2 30 3A 4C B2 31 3A 41 43 24 B2 |";:TY.0:L.1:AC$.|
00000F00: 22 59 22 3A 8D 35 35 30 00 3A 13 0C 08 99 3A 99 |"Y":.550.:....:.|
00000F10: 22 11 11 45 4E 54 45 52 20 44 49 53 4B 45 54 54 |"..ENTER DISKETT|
00000F20: 45 20 54 49 54 4C 45 3F 20 22 3B 3A 54 59 B2 30 |E TITLE? ";:TY.0|
00000F30: 3A 4C B2 31 36 3A 8D 35 35 30 00 5A 13 20 08 9E |:L.16:.550.Z. ..|
00000F40: 42 41 AA 32 37 2C 41 24 3A 8B 41 24 B2 22 22 A7 |BA.27,A$:.A$."".|
00000F50: 8D 35 36 30 3A 89 32 30 38 30 00 8E 13 2A 08 44 |.560:.2080...*.D|
00000F60: 54 24 B2 41 24 3A 99 3A 99 22 11 45 4E 54 45 52 |T$.A$:.:.".ENTER|
00000F70: 20 44 49 53 4B 45 54 54 45 20 49 44 3F 20 22 3B | DISKETTE ID? ";|
00000F80: 3A 54 59 B2 30 3A 4C B2 32 3A 8D 35 35 30 00 A6 |:TY.0:L.2:.550..|
00000F90: 13 3E 08 8B 41 24 B2 22 20 20 22 A7 8D 35 36 30 |.>..A$." "..560|
00000FA0: 3A 89 32 31 31 30 00 DB 13 48 08 44 49 24 B2 41 |:.2110...H.DI$.A|
00000FB0: 24 3A 99 3A 99 22 11 11 54 48 49 53 20 57 49 4C |$:.:."..THIS WIL|
00000FC0: 4C 20 45 52 41 53 45 20 41 4E 59 20 49 4E 46 4F |L ERASE ANY INFO|
00000FD0: 52 4D 41 54 49 4F 4E 20 59 4F 55 00 FE 13 52 08 |RMATION YOU...R.|
00000FE0: 99 22 4D 41 59 20 48 41 56 45 20 4F 4E 20 54 48 |."MAY HAVE ON TH|
00000FF0: 49 53 20 44 49 53 4B 45 54 54 45 21 21 21 00 29 |IS DISKETTE!!!.)|
00001000: 14 5C 08 99 22 11 11 11 44 4F 20 59 4F 55 20 57 |.\.."...DO YOU W|
00001010: 49 53 48 20 54 4F 20 43 4F 4E 54 49 4E 55 45 20 |ISH TO CONTINUE |
00001020: 28 59 2F 4E 29 3F 20 22 3B 00 44 14 66 08 54 59 |(Y/N)? ";.D.f.TY|
00001030: B2 30 3A 4C B2 31 3A 41 43 24 B2 22 59 4E 22 3A |.0:L.1:AC$."YN":|
00001040: 8D 35 35 30 00 5F 14 7A 08 8B 20 41 24 B2 22 4E |.550._.z.. A$."N|
00001050: 22 A7 4B 59 24 B2 22 85 22 3A 89 32 32 31 30 00 |".KY$.".":.2210.|
00001060: 96 14 84 08 98 31 35 2C 22 4E 30 3A 22 AA 44 54 |.....15,"N0:".DT|
00001070: 24 AA 22 2C 22 AA 44 49 24 3A 40 50 2C 32 34 2C |$.",".DI$:@P,24,|
00001080: 30 2C 22 46 4F 52 4D 41 54 54 49 4E 47 20 44 49 |0,"FORMATTING DI|
00001090: 53 4B 45 54 54 45 00 CE 14 89 08 84 31 35 2C 41 |SKETTE......15,A|
000010A0: 2C 45 52 24 3A 40 50 2C 32 34 2C 30 2C 45 52 24 |,ER$:@P,24,0,ER$|
000010B0: 3A 99 22 20 2D 20 50 52 45 53 53 20 41 4E 59 20 |:." - PRESS ANY |
000010C0: 4B 45 59 22 3B 3A 8D 32 30 30 3A A0 31 35 00 E1 |KEY";:.200:.15..|
000010D0: 14 8A 08 8B C2 28 31 39 38 29 B2 30 A7 32 31 38 |.....(198).0.218|
000010E0: 36 00 F7 14 8E 08 A1 41 24 3A 4B 59 24 B2 22 85 |6......A$:KY$.".|
000010F0: 22 3A 89 32 32 31 30 00 1E 15 98 08 52 46 B2 30 |":.2210.....RF.0|
00001100: 3A 8B 4B 59 24 B3 B1 22 85 22 AF 4B 59 24 B3 B1 |:.KY$..".".KY$..|
00001110: 22 89 22 AF 4B 59 24 B3 B1 22 10 22 A7 8E 00 5B |".".KY$.."."...[|
00001120: 15 99 08 4B 50 24 B2 4B 59 24 3A 4B 50 B2 4B 59 |...KP$.KY$:KP.KY|
00001130: 3A 50 32 B2 C2 28 32 29 3A 97 31 39 38 2C 31 3A |:P2..(2):.198,1:|
00001140: 97 36 33 31 2C 31 33 3A 58 5A B2 C2 28 32 31 31 |.631,13:XZ..(211|
00001150: 29 3A 59 5A B2 C2 28 32 31 34 29 00 85 15 9A 08 |):YZ..(214).....|
00001160: 4F 41 B2 C2 28 42 41 AA 4C 43 29 3A 97 42 41 AA |OA..(BA.LC):.BA.|
00001170: 4C 43 2C 30 3A 40 47 2C 32 34 2C 30 2C 33 39 2C |LC,0:@G,24,0,39,|
00001180: 30 2C 54 53 24 00 9E 15 9B 08 8B 4B 50 24 B2 22 |0,TS$......KP$."|
00001190: 10 22 A7 8D 39 30 30 30 3A 89 32 32 30 38 00 C2 |."..9000:.2208..|
000011A0: 15 9C 08 40 50 2C 32 34 2C 30 2C 22 12 41 52 45 |...@P,24,0,".ARE|
000011B0: 20 59 4F 55 20 53 55 52 45 3F 92 20 22 3A 8D 32 | YOU SURE?. ":.2|
000011C0: 30 30 00 DA 15 9D 08 59 41 B2 C2 28 32 31 34 29 |00.....YA..(214)|
000011D0: 3A 58 41 B2 C2 28 32 31 31 29 00 06 16 9E 08 40 |:XA..(211).....@|
000011E0: 47 2C 59 41 2C 58 41 2C 31 2C 30 2C 52 53 24 3A |G,YA,XA,1,0,RS$:|
000011F0: 40 48 2C 52 53 24 2C 22 59 4E 22 3A 8B 4B 59 B2 |@H,RS$,"YN":.KY.|
00001200: 30 A7 32 32 30 36 00 20 16 9F 08 4B 59 24 B2 4B |0.2206. ...KY$.K|
00001210: 50 24 3A 8B 52 53 24 B2 22 59 22 A7 32 32 31 30 |P$:.RS$."Y".2210|
00001220: 00 4D 16 A0 08 40 50 2C 32 34 2C 30 2C 54 53 24 |.M...@P,24,0,TS$|
00001230: 3A 54 53 24 B2 22 22 3A 40 50 2C 59 5A 2C 58 5A |:TS$."":@P,YZ,XZ|
00001240: 2C 22 22 3A 97 42 41 AA 4C 43 2C 4F 41 00 6C 16 |,"":.BA.LC,OA.l.|
00001250: A1 08 4B 59 B2 4B 50 3A 4B 59 24 B2 4B 50 24 3A |..KY.KP:KY$.KP$:|
00001260: 97 32 2C 50 32 3A 52 46 B2 31 3A 8E 00 73 16 A2 |.2,P2:RF.1:..s..|
00001270: 08 A0 31 00 AF 16 A3 08 8B 52 52 B2 35 AF 58 53 |..1......RR.5.XS|
00001280: B2 31 A7 98 31 35 2C 22 53 30 3A 49 4E 2E 22 3B |.1..15,"S0:IN.";|
00001290: 4E 46 24 3A 9F 31 2C 38 2C 31 2C 22 30 3A 49 4E |NF$:.1,8,1,"0:IN|
000012A0: 2E 22 AA 4E 46 24 3A 9E 42 AA 32 34 3A A0 31 00 |.".NF$:.B.24:.1.|
000012B0: CF 16 A7 08 97 32 2C 30 3A 8B 4B 59 24 B2 22 89 |.....2,0:.KY$.".|
000012C0: 22 A7 4B 59 B2 52 52 3A 97 32 2C 52 52 3A 8A 00 |".KY.RR:.2,RR:..|
000012D0: DE 16 AC 08 8B 4B 59 24 B2 22 85 22 A7 8A 00 E4 |.....KY$."."....|
000012E0: 16 B1 08 8E 00 FE 16 B8 0B 8D 31 30 30 3A 9E 42 |..........100:.B|
000012F0: 41 AA 34 35 2C 4E 46 24 3A 89 33 33 30 30 00 26 |A.45,NF$:.3300.&|
00001300: 17 1C 0C 4E 45 B2 31 38 3A 86 45 52 24 28 4E 45 |...NE.18:.ER$(NE|
00001310: 29 3A 81 49 B2 31 A4 4E 45 3A 87 45 52 24 28 49 |):.I.1.NE:.ER$(I|
00001320: 29 3A 82 49 3A 8E 00 5E 17 26 0C 83 49 4E 56 41 |):.I:..^.&..INVA|
00001330: 4C 49 44 20 43 48 41 52 41 43 54 45 52 2C 27 54 |LID CHARACTER,'T|
00001340: 4F 27 20 4E 4F 54 20 46 4F 55 4E 44 2C 4E 4F 54 |O' NOT FOUND,NOT|
00001350: 20 4C 41 53 54 20 46 55 4E 43 54 49 4F 4E 00 A4 | LAST FUNCTION..|
00001360: 17 44 0C 83 42 52 41 43 4B 45 54 20 4D 49 53 4D |.D..BRACKET MISM|
00001370: 41 54 43 48 2C 4E 4F 2E 20 4F 46 20 44 45 43 49 |ATCH,NO. OF DECI|
00001380: 4D 41 4C 53 20 4E 4F 54 20 53 50 45 43 49 46 49 |MALS NOT SPECIFI|
00001390: 45 44 2C 54 4F 4F 20 4D 41 4E 59 20 44 45 43 49 |ED,TOO MANY DECI|
000013A0: 4D 41 4C 53 00 E0 17 62 0C 83 43 4F 4E 53 54 41 |MALS...b..CONSTA|
000013B0: 4E 54 20 54 4F 4F 20 4C 4F 4E 47 2C 4E 4F 54 20 |NT TOO LONG,NOT |
000013C0: 41 20 4E 55 4D 42 45 52 2C 49 4C 4C 45 47 41 4C |A NUMBER,ILLEGAL|
000013D0: 20 52 45 47 49 53 54 45 52 20 4E 55 4D 42 45 52 | REGISTER NUMBER|
000013E0: 00 11 18 80 0C 83 49 4C 4C 45 47 41 4C 20 44 49 |......ILLEGAL DI|
000013F0: 53 50 4C 41 59 20 4E 55 4D 42 45 52 2C 49 4C 4C |SPLAY NUMBER,ILL|
00001400: 45 47 41 4C 20 46 49 45 4C 44 20 4E 55 4D 42 45 |EGAL FIELD NUMBE|
00001410: 52 00 54 18 94 0C 83 4E 55 4D 42 45 52 20 4F 46 |R.T....NUMBER OF|
00001420: 20 44 45 43 49 4D 41 4C 53 20 4E 4F 54 20 4E 45 | DECIMALS NOT NE|
00001430: 45 44 45 44 2C 53 54 52 49 4E 47 20 43 4F 4D 50 |EDED,STRING COMP|
00001440: 41 52 45 53 20 4D 55 53 54 20 42 45 20 49 4E 20 |ARES MUST BE IN |
00001450: 28 29 27 53 00 88 18 A8 0C 83 22 53 54 52 49 4E |()'S......"STRIN|
00001460: 47 20 46 4F 55 4E 44 2C 20 45 58 50 45 43 54 49 |G FOUND, EXPECTI|
00001470: 4E 47 20 4E 55 4D 42 45 52 22 2C 54 59 50 45 20 |NG NUMBER",TYPE |
00001480: 4D 49 53 4D 41 54 43 48 00 AE 18 BC 0C 83 53 54 |MISMATCH......ST|
00001490: 52 49 4E 47 20 43 41 4E 4E 4F 54 20 42 45 20 50 |RING CANNOT BE P|
000014A0: 55 54 20 49 4E 20 52 45 47 49 53 54 45 52 00 C8 |UT IN REGISTER..|
000014B0: 18 C6 0C 83 22 53 54 52 55 43 54 55 52 45 20 45 |...."STRUCTURE E|
000014C0: 52 52 4F 52 20 20 20 22 00 E3 18 D0 0C 83 4D 49 |RROR "......MI|
000014D0: 53 53 49 4E 47 20 41 4E 20 41 50 4F 53 54 52 4F |SSING AN APOSTRO|
000014E0: 50 48 45 00 14 19 E4 0C 4C 4D B2 31 35 30 3A 97 |PHE.....LM.150:.|
000014F0: 42 41 AA 4C 43 2C 30 3A 4C 4C B2 34 30 3A 44 50 |BA.LC,0:LL.40:DP|
00001500: B2 32 35 30 3A 54 54 24 B2 22 41 52 49 54 48 4D |.250:TT$."ARITHM|
00001510: 45 54 49 43 00 41 19 EE 0C 43 4D 24 B2 22 91 13 |ETIC.A...CM$."..|
00001520: 86 8A 88 8C 87 8B 5F 04 15 11 22 AA C7 28 31 33 |......_..."..(13|
00001530: 29 AA C7 28 31 34 31 29 AA 22 0F 22 3A 8D 33 30 |)..(141).".":.30|
00001540: 30 00 65 19 F8 0C 86 41 52 24 28 4C 4D AA 31 29 |0.e....AR$(LM.1)|
00001550: 2C 44 49 25 28 4E 53 AB 31 2C 38 30 2C 32 29 3A |,DI%(NS.1,80,2):|
00001560: 8D 33 31 30 30 00 91 19 2A 0D 9F 31 2C 38 2C 32 |.3100...*..1,8,2|
00001570: 2C 22 30 3A 41 52 2E 22 AA 4E 46 24 AA 22 2C 53 |,"0:AR.".NF$.",S|
00001580: 2C 52 22 3A 84 31 35 2C 41 3A 8B 41 A7 33 34 30 |,R":.15,A:.A.340|
00001590: 30 00 99 19 34 0D 49 B2 30 00 BB 19 3E 0D 49 B2 |0...4.I.0...>.I.|
000015A0: 49 AA 31 3A 40 49 4E 2C 31 2C 41 52 24 28 49 29 |I.1:@IN,1,AR$(I)|
000015B0: 3A 8B 53 54 B2 30 A7 33 33 39 30 00 C2 19 48 0D |:.ST.0.3390...H.|
000015C0: A0 31 00 E6 19 52 0D 9F 31 2C 38 2C 32 2C 22 30 |.1...R..1,8,2,"0|
000015D0: 3A 44 50 2E 22 AA 4E 46 24 AA 22 2C 53 2C 52 22 |:DP.".NF$.",S,R"|
000015E0: 3A 84 31 35 2C 41 00 F2 19 5C 0D 8B 41 A7 33 34 |:.15,A...\..A.34|
000015F0: 38 30 00 05 1A 66 0D 84 31 2C 41 3A 8B 41 B2 30 |80...f..1,A:.A.0|
00001600: A7 33 34 38 30 00 19 1A 70 0D 40 49 4C 2C 34 2C |.3480...p.@IL,4,|
00001610: 31 2C 58 24 3A 41 B2 53 54 00 41 1A 75 0D 81 49 |1,X$:A.ST.A.u..I|
00001620: B2 31 A4 C3 28 58 24 29 3A 41 28 49 29 B2 C6 28 |.1..(X$):A(I)..(|
00001630: CA 28 58 24 2C 49 2C 31 29 29 AF 31 32 37 3A 82 |.(X$,I,1)).127:.|
00001640: 49 00 54 1A 76 0D 8B 41 28 31 29 B1 B2 4E 53 A7 |I.T.v..A(1)..NS.|
00001650: 33 34 37 30 00 76 1A 7A 0D 44 49 25 28 41 28 31 |3470.v.z.DI%(A(1|
00001660: 29 2C 30 2C 30 29 B2 44 49 25 28 41 28 31 29 2C |),0,0).DI%(A(1),|
00001670: 30 2C 30 29 AA 31 00 AD 1A 84 0D 81 49 B2 32 A4 |0,0).1......I.2.|
00001680: C3 28 58 24 29 AB 31 3A 44 49 25 28 41 28 31 29 |.(X$).1:DI%(A(1)|
00001690: 2C 44 49 25 28 41 28 31 29 2C 30 2C 30 29 2C 49 |,DI%(A(1),0,0),I|
000016A0: AB 32 29 B2 41 28 49 29 AA 31 3A 82 49 00 D2 1A |.2).A(I).1:.I...|
000016B0: 89 0D 44 49 25 28 41 28 31 29 2C 44 49 25 28 41 |..DI%(A(1),DI%(A|
000016C0: 28 31 29 2C 30 2C 30 29 2C 49 AB 32 29 B2 41 28 |(1),0,0),I.2).A(|
000016D0: 49 29 00 E0 1A 8E 0D 8B 41 B2 30 A7 33 34 34 30 |I)......A.0.3440|
000016E0: 00 E7 1A 98 0D A0 31 00 F8 1A A2 0D 44 32 B2 30 |......1.....D2.0|
000016F0: 3A 81 49 B2 31 A4 4E 53 00 07 1B AC 0D 99 22 93 |:.I.1.NS......".|
00001700: 22 3B 3A 8D 34 30 30 00 33 1B B6 0D 99 22 11 4E |";:.400.3....".N|
00001710: 4F 2E 20 4F 46 20 44 49 53 50 4C 41 59 20 50 4F |O. OF DISPLAY PO|
00001720: 53 27 4E 20 4F 4E 20 53 43 52 45 45 4E 22 49 22 |S'N ON SCREEN"I"|
00001730: 3F 22 3B 00 59 1B C0 0D 59 B2 C2 28 32 31 34 29 |?";.Y...Y..(214)|
00001740: 3A 58 B2 C2 28 32 31 31 29 AA 31 3A 99 44 49 25 |:X..(211).1:.DI%|
00001750: 28 49 AB 31 2C 30 2C 30 29 00 6B 1B CA 0D 54 59 |(I.1,0,0).k...TY|
00001760: B2 31 3A 4C B2 32 3A 8D 35 36 30 00 90 1B CF 0D |.1:L.2:.560.....|
00001770: 8B 28 41 B2 30 AF 41 24 B3 22 30 22 29 B0 41 AA |.(A.0.A$."0").A.|
00001780: 44 32 B1 44 50 B0 41 B1 38 30 A7 89 33 35 33 30 |D2.DP.A.80..3530|
00001790: 00 C3 1B D4 0D 44 31 B2 41 3A 44 32 B2 44 32 AA |.....D1.A:D2.D2.|
000017A0: 44 31 3A 44 49 25 28 49 AB 31 2C 30 2C 30 29 B2 |D1:DI%(I.1,0,0).|
000017B0: 41 3A 8B 41 B2 30 B0 4B 59 24 B2 22 88 22 A7 33 |A:.A.0.KY$.".".3|
000017C0: 36 39 30 00 D1 1B DE 0D 99 3A 81 4A B2 31 A4 44 |690......:.J.1.D|
000017D0: 31 00 F2 1B E0 0D 99 3A 99 22 11 91 22 3B 3A 59 |1......:."..";:Y|
000017E0: 31 B2 C2 28 32 31 34 29 3A 58 31 B2 C2 28 32 31 |1..(214):X1..(21|
000017F0: 31 29 00 26 1C E3 0D 40 50 2C 59 31 2C 58 31 2C |1).&...@P,Y1,X1,|
00001800: 22 22 3A 99 C9 28 22 20 22 AA C4 28 44 32 AB 44 |"":..(" "..(D2.D|
00001810: 31 AA 4A 29 2C 33 29 22 2E 22 A3 35 29 22 4C 49 |1.J),3)".".5)"LI|
00001820: 4E 45 3F 20 22 3B 00 55 1C E8 0D 59 B2 C2 28 32 |NE? ";.U...Y..(2|
00001830: 31 34 29 3A 58 B2 C2 28 32 31 31 29 3A 99 CA 28 |14):X..(211):..(|
00001840: C4 28 44 49 25 28 49 AB 31 2C 4A 2C 30 29 29 2C |.(DI%(I.1,J,0)),|
00001850: 32 29 22 20 22 00 76 1C F2 0D 54 59 B2 31 3A 4C |2)" ".v...TY.1:L|
00001860: B2 32 3A 8D 35 36 30 3A 8B 41 B3 31 B0 41 B1 32 |.2:.560:.A.1.A.2|
00001870: 34 A7 33 35 37 30 00 AE 1C 06 0E 44 49 25 28 49 |4.3570.....DI%(I|
00001880: AB 31 2C 4A 2C 30 29 B2 41 3A 40 50 2C 59 2C 31 |.1,J,0).A:@P,Y,1|
00001890: 35 2C 22 43 4F 4C 55 4D 4E 3F 20 22 3A 59 B2 C2 |5,"COLUMN? ":Y..|
000018A0: 28 32 31 34 29 3A 58 B2 C2 28 32 31 31 29 00 CB |(214):X..(211)..|
000018B0: 1C 10 0E 99 CA 28 C4 28 44 49 25 28 49 AB 31 2C |.....(.(DI%(I.1,|
000018C0: 4A 2C 31 29 29 2C 32 29 22 20 22 00 EE 1C 1A 0E |J,1)),2)" ".....|
000018D0: 54 59 B2 31 3A 4C B2 32 3A 8D 35 36 30 3A 8B 41 |TY.1:L.2:.560:.A|
000018E0: B3 31 B0 41 B1 4C 4C AB 31 A7 33 36 31 30 00 26 |.1.A.LL.1.3610.&|
000018F0: 1D 2E 0E 44 49 25 28 49 AB 31 2C 4A 2C 31 29 B2 |...DI%(I.1,J,1).|
00001900: 41 3A 40 50 2C 59 2C 32 37 2C 22 4C 45 4E 47 54 |A:@P,Y,27,"LENGT|
00001910: 48 3F 20 22 3A 59 B2 C2 28 32 31 34 29 3A 58 B2 |H? ":Y..(214):X.|
00001920: C2 28 32 31 31 29 00 42 1D 38 0E 41 B2 44 49 25 |.(211).B.8.A.DI%|
00001930: 28 49 AB 31 2C 4A 2C 32 29 3A 8B 41 B2 30 A7 41 |(I.1,J,2):.A.0.A|
00001940: B2 39 00 54 1D 42 0E 99 CA 28 C4 28 41 29 2C 32 |.9.T.B...(.(A),2|
00001950: 29 22 20 22 00 89 1D 4C 0E 54 59 B2 31 3A 4C B2 |)" "...L.TY.1:L.|
00001960: 32 3A 8D 35 36 30 3A 8B 41 B3 31 B0 41 B1 31 31 |2:.560:.A.1.A.11|
00001970: B0 41 AA 44 49 25 28 49 AB 31 2C 4A 2C 31 29 B1 |.A.DI%(I.1,J,1).|
00001980: 4C 4C AA 31 A7 33 36 36 30 00 AB 1D 56 0E 44 49 |LL.1.3660...V.DI|
00001990: 25 28 49 AB 31 2C 4A 2C 32 29 B2 41 3A 8B 4B 59 |%(I.1,J,2).A:.KY|
000019A0: 24 B3 B1 22 5F 22 A7 33 35 35 35 00 B2 1D 60 0E |$.."_".3555...`.|
000019B0: 82 4A 00 DC 1D 6A 0E 82 49 3A 58 58 B2 30 3A 52 |.J...j..I:XX.0:R|
000019C0: 56 B2 30 3A 97 42 41 AA 4C 43 2C 36 34 3A 4C 4E |V.0:.BA.LC,64:LN|
000019D0: B2 31 3A 49 B2 31 3A 8D 34 32 36 30 00 08 1E 6F |.1:I.1:.4260...o|
000019E0: 0E 97 35 33 32 34 37 2C 4E 46 3A 97 35 33 32 34 |..53247,NF:.5324|
000019F0: 36 2C 44 32 3A 97 31 30 31 38 2C 31 30 35 3A 97 |6,D2:.1018,105:.|
00001A00: 35 33 32 37 32 2C 43 41 00 18 1E 70 0E 8D 33 37 |53272,CA...p..37|
00001A10: 31 30 3A 89 34 30 39 30 00 3F 1E 7E 0E 8B 52 52 |10:.4090.?.~..RR|
00001A20: B2 31 A7 3A 40 50 2C 32 34 2C 30 2C 22 98 12 45 |.1.:@P,24,0,"..E|
00001A30: 44 49 54 20 4D 4F 44 45 92 22 3A 8D 32 30 30 00 |DIT MODE.":.200.|
00001A40: 63 1E 83 0E 8B 52 52 B2 31 A7 3A 40 50 2C 32 34 |c....RR.1.:@P,24|
00001A50: 2C 33 34 2C 22 98 4C 22 3A 99 C4 28 49 29 3B 22 |,34,".L":..(I);"|
00001A60: 05 22 3B 00 A4 1E 88 0E 97 32 31 31 2C 58 58 3A |.";......211,XX:|
00001A70: 97 31 39 39 2C 52 56 3A 59 B2 4C 4E AB 31 3A 58 |.199,RV:Y.LN.1:X|
00001A80: B2 30 3A 4C B2 4C 4C 3A 54 59 B2 30 3A 8D 36 35 |.0:L.LL:TY.0:.65|
00001A90: 30 3A 40 47 2C 59 2C 58 2C 4C 2C 54 59 2C 41 52 |0:@G,Y,X,L,TY,AR|
00001AA0: 24 28 49 29 00 D8 1E 92 0E 8D 32 32 30 30 3A 41 |$(I)......2200:A|
00001AB0: 24 B2 4B 59 24 3A 58 58 B2 C2 28 32 31 31 29 3A |$.KY$:XX..(211):|
00001AC0: 52 56 B2 C2 28 31 39 39 29 3A 8D 32 32 30 30 3A |RV..(199):.2200:|
00001AD0: 8B 52 46 A7 33 37 31 30 00 F4 1E 97 0E 8B 52 52 |.RF.3710......RR|
00001AE0: B2 31 A7 3A 40 50 2C 4C 4E AB 31 2C 30 2C 41 52 |.1.:@P,LN.1,0,AR|
00001AF0: 24 28 49 29 00 FE 1E 98 0E 89 33 38 31 30 00 30 |$(I)......3810.0|
00001B00: 1F 9C 0E 50 50 B2 C2 28 32 35 31 29 3A 41 B2 49 |...PP..(251):A.I|
00001B10: 3A 49 B2 B5 28 49 AD 32 34 29 AC 32 34 3A 8B 49 |:I..(I.24).24:.I|
00001B20: AA 32 33 B1 31 35 30 A7 49 B2 31 35 30 AB 32 33 |.23.150.I.150.23|
00001B30: 00 3D 1F A1 0E 8B 49 B2 30 A7 49 B2 31 00 54 1F |.=....I.0.I.1.T.|
00001B40: A6 0E 8D 34 32 36 30 3A 4C 4E B2 41 AB 49 AA 31 |...4260:LN.A.I.1|
00001B50: 3A 49 B2 41 00 90 1F BA 0E 58 24 B2 C8 28 41 52 |:I.A.....X$..(AR|
00001B60: 24 28 49 29 2C 50 50 AB 31 29 AA 22 12 22 AA CA |$(I),PP.1)."."..|
00001B70: 28 41 52 24 28 49 29 2C 50 50 2C 31 29 AA 22 92 |(AR$(I),PP,1).".|
00001B80: 22 AA CA 28 41 52 24 28 49 29 2C 50 50 AA 31 29 |"..(AR$(I),PP.1)|
00001B90: 00 AB 1F C4 0E 40 50 2C 32 34 2C 30 2C 45 52 24 |.....@P,24,0,ER$|
00001BA0: 28 C2 28 32 29 29 3A 8D 32 30 30 00 C1 1F CE 0E |(.(2)):.200.....|
00001BB0: 58 58 B2 30 3A 40 50 2C 4C 4E AB 31 2C 30 2C 58 |XX.0:@P,LN.1,0,X|
00001BC0: 24 00 CB 1F D8 0E 89 33 37 31 35 00 E4 1F E2 0E |$......3715.....|
00001BD0: 40 48 2C 41 24 2C 43 4D 24 3A 8B 4B 59 B2 30 89 |@H,A$,CM$:.KY.0.|
00001BE0: 33 37 32 30 00 23 20 F6 0E 91 4B 59 89 33 38 37 |3720.# ...KY.387|
00001BF0: 30 2C 33 38 38 30 2C 33 39 31 30 2C 33 39 32 30 |0,3880,3910,3920|
00001C00: 2C 34 30 30 30 2C 34 30 32 30 2C 33 39 36 30 2C |,4000,4020,3960,|
00001C10: 33 39 37 30 2C 34 30 38 35 2C 33 39 34 30 2C 33 |3970,4085,3940,3|
00001C20: 39 33 30 00 47 20 00 0F 91 4B 59 AB 31 31 89 33 |930.G ...KY.11.3|
00001C30: 38 35 30 2C 33 38 35 30 2C 33 38 35 30 2C 33 39 |850,3850,3850,39|
00001C40: 35 35 2C 33 38 39 30 00 59 20 0A 0F 8B 41 24 B3 |55,3890.Y ...A$.|
00001C50: B1 22 11 22 A7 58 58 B2 30 00 71 20 14 0F 49 B2 |.".".XX.0.q ..I.|
00001C60: 49 AA 31 3A 4C 4E B2 4C 4E AA 31 3A 89 34 30 34 |I.1:LN.LN.1:.404|
00001C70: 30 00 89 20 1E 0F 49 B2 49 AB 31 3A 4C 4E B2 4C |0.. ..I.I.1:LN.L|
00001C80: 4E AB 31 3A 89 34 30 34 30 00 AF 20 28 0F 8B 49 |N.1:.4040.. (..I|
00001C90: AB 4C 4E B2 30 A7 49 B2 31 3A 4C 4E B2 31 3A 99 |.LN.0.I.1:LN.1:.|
00001CA0: 22 13 22 3B 3A 58 58 B2 30 3A 89 33 37 31 30 00 |".";:XX.0:.3710.|
00001CB0: CD 20 2D 0F 49 B2 31 3A 4C 4E B2 31 3A 8D 34 32 |. -.I.1:LN.1:.42|
00001CC0: 36 30 3A 58 58 B2 30 3A 89 33 37 31 30 00 D3 20 |60:XX.0:.3710.. |
00001CD0: 32 0F 8E 00 EB 20 46 0F 40 50 2C 4C 4E AB 31 2C |2.... F.@P,LN.1,|
00001CE0: 30 2C 22 22 3A 9E 42 41 AA 31 35 00 27 21 4B 0F |0,"":.BA.15.'!K.|
00001CF0: 9E 42 41 AA 33 36 2C 49 2C 41 52 24 28 49 29 3A |.BA.36,I,AR$(I):|
00001D00: 41 52 24 28 4C 4D AA 31 29 B2 22 22 3A 40 50 2C |AR$(LM.1)."":@P,|
00001D10: 32 33 2C 30 2C 41 52 24 28 32 34 AB 4C 4E AA 49 |23,0,AR$(24.LN.I|
00001D20: 29 3A 89 34 30 34 30 00 55 21 50 0F 40 50 2C 4C |):.4040.U!P.@P,L|
00001D30: 4E AB 31 2C 30 2C 22 22 3A 9E 42 41 AA 31 32 3A |N.1,0,"":.BA.12:|
00001D40: 9E 42 41 AA 33 33 2C 49 2C 41 52 24 28 49 29 3A |.BA.33,I,AR$(I):|
00001D50: 89 34 30 34 30 00 6B 21 5A 0F 8B 32 34 AB 4C 4E |.4040.k!Z..24.LN|
00001D60: AA 49 B1 B2 4C 4D A7 34 30 34 30 00 97 21 5F 0F |.I..LM.4040..!_.|
00001D70: 9E 42 41 AA 32 31 3A 40 50 2C 32 33 2C 30 2C 41 |.BA.21:@P,23,0,A|
00001D80: 52 24 28 32 35 AB 4C 4E AA 49 29 3A 49 B2 49 AA |R$(25.LN.I):I.I.|
00001D90: 31 3A 89 34 30 34 30 00 C2 21 64 0F 8B 49 AB 4C |1:.4040..!d..I.L|
00001DA0: 4E B3 B1 30 A7 9E 42 41 AA 31 38 3A 40 50 2C 30 |N..0..BA.18:@P,0|
00001DB0: 2C 30 2C 41 52 24 28 49 AB 4C 4E 29 3A 49 B2 49 |,0,AR$(I.LN):I.I|
00001DC0: AB 31 00 CC 21 6E 0F 89 34 30 34 30 00 DC 21 73 |.1..!n..4040..!s|
00001DD0: 0F 8D 39 31 30 30 3A 89 34 30 34 30 00 F5 21 78 |..9100:.4040..!x|
00001DE0: 0F 4D 24 B2 41 52 24 28 49 29 3A 4D 46 B2 31 3A |.M$.AR$(I):MF.1:|
00001DF0: 89 34 30 34 30 00 28 22 82 0F 8B 4D 46 B2 31 A7 |.4040.("...MF.1.|
00001E00: 41 52 24 28 49 29 B2 4D 24 3A 40 50 2C 4C 4E AB |AR$(I).M$:@P,LN.|
00001E10: 31 2C 30 2C 41 52 24 28 49 29 3A 49 B2 49 AA 31 |1,0,AR$(I):I.I.1|
00001E20: 3A 4C 4E B2 4C 4E AA 31 00 32 22 8C 0F 89 34 30 |:LN.LN.1.2"...40|
00001E30: 34 30 00 64 22 A0 0F 8B 49 AA 34 38 AB 4C 4E B3 |40.d"...I.48.LN.|
00001E40: B2 4C 4D A7 43 B2 49 AA 32 34 3A 49 B2 49 AA 32 |.LM.C.I.24:I.I.2|
00001E50: 35 AB 4C 4E 3A 8D 34 32 36 30 3A 49 B2 43 3A 89 |5.LN:.4260:I.C:.|
00001E60: 33 37 31 30 00 6E 22 AA 0F 89 34 30 34 30 00 9E |3710.n"...4040..|
00001E70: 22 B4 0F 8B 49 AB 32 33 AB 4C 4E B1 30 A7 43 B2 |"...I.23.LN.0.C.|
00001E80: 49 AB 32 34 3A 49 B2 49 AB 4C 4E AB 32 33 3A 8D |I.24:I.I.LN.23:.|
00001E90: 34 32 36 30 3A 49 B2 43 3A 89 33 37 31 30 00 A8 |4260:I.C:.3710..|
00001EA0: 22 BE 0F 89 34 30 34 30 00 BE 22 C8 0F 8B 49 B1 |"...4040.."...I.|
00001EB0: 4C 4D A7 49 B2 49 AB 31 3A 4C 4E B2 32 34 00 D0 |LM.I.I.1:LN.24..|
00001EC0: 22 D2 0F 8B 49 B2 30 A7 49 B2 31 3A 4C 4E B2 31 |"...I.0.I.1:LN.1|
00001ED0: 00 F7 22 DC 0F 8B 4C 4E B1 32 34 A7 4C 4E B2 32 |.."...LN.24.LN.2|
00001EE0: 34 3A 9E 42 41 AA 32 31 3A 40 50 2C 32 33 2C 30 |4:.BA.21:@P,23,0|
00001EF0: 2C 41 52 24 28 49 29 00 1B 23 E6 0F 8B 4C 4E B2 |,AR$(I)..#...LN.|
00001F00: 30 A7 4C 4E B2 31 3A 9E 42 41 AA 31 38 3A 40 50 |0.LN.1:.BA.18:@P|
00001F10: 2C 30 2C 30 2C 41 52 24 28 49 29 00 25 23 F0 0F |,0,0,AR$(I).%#..|
00001F20: 89 33 37 31 30 00 2B 23 F5 0F 8E 00 53 23 FA 0F |.3710.+#....S#..|
00001F30: 40 50 2C 32 34 2C 30 2C 22 98 43 48 45 43 4B 49 |@P,24,0,".CHECKI|
00001F40: 4E 47 20 53 54 52 55 43 54 55 52 45 05 22 3A 8D |NG STRUCTURE.":.|
00001F50: 32 30 30 00 85 23 FB 0F 41 B2 49 3A 81 49 B2 31 |200..#..A.I:.I.1|
00001F60: A4 4C 4D 3A 9E 42 42 AA 36 2C 41 52 24 28 49 29 |.LM:.BB.6,AR$(I)|
00001F70: 3A 8B C2 28 32 29 B3 B1 30 A7 8D 33 37 34 30 3A |:..(2)..0..3740:|
00001F80: 89 34 30 39 30 00 BF 23 FD 0F 82 49 3A 49 B2 41 |.4090..#...I:I.A|
00001F90: 3A 9E 42 42 AA 35 34 2C 4C 4D AA 31 2C 41 52 24 |:.BB.54,LM.1,AR$|
00001FA0: 28 30 29 3A 8B C2 28 32 29 A7 58 24 B2 41 52 24 |(0):..(2).X$.AR$|
00001FB0: 28 49 29 3A 8D 33 37 38 30 3A 89 34 30 39 30 00 |(I):.3780:.4090.|
00001FC0: D6 23 FE 0F 8D 35 36 30 30 3A 8B 41 24 B2 22 4E |.#...5600:.A$."N|
00001FD0: 22 A7 33 36 39 36 00 09 24 FF 0F 40 50 2C 32 34 |".3696..$..@P,24|
00001FE0: 2C 30 2C 22 98 53 54 4F 52 49 4E 47 20 4D 41 54 |,0,".STORING MAT|
00001FF0: 48 05 22 3A 8D 32 30 30 3A 98 31 35 2C 22 53 30 |H.":.200:.15,"S0|
00002000: 3A 44 50 2E 22 AA 4E 46 24 00 26 24 04 10 9F 31 |:DP.".NF$.&$...1|
00002010: 2C 38 2C 32 2C 22 30 3A 44 50 2E 22 AA 4E 46 24 |,8,2,"0:DP.".NF$|
00002020: AA 22 2C 53 2C 57 00 3B 24 0E 10 84 31 35 2C 41 |.",S,W.;$...15,A|
00002030: 2C 42 24 3A 8B 41 A7 34 35 30 30 00 64 24 22 10 |,B$:.A.4500.d$".|
00002040: 98 31 2C 44 32 3A 81 49 49 B2 31 A4 4E 53 3A 8B |.1,D2:.II.1.NS:.|
00002050: 44 49 25 28 49 49 AB 31 2C 30 2C 30 29 B2 30 A7 |DI%(II.1,0,0).0.|
00002060: 34 31 38 30 00 A6 24 2C 10 81 4A B2 31 A4 44 49 |4180..$,..J.1.DI|
00002070: 25 28 49 49 AB 31 2C 30 2C 30 29 3A 58 24 B2 C7 |%(II.1,0,0):X$..|
00002080: 28 49 49 AB 31 29 3A 81 4B B2 30 A4 31 3A 58 24 |(II.1):.K.0.1:X$|
00002090: B2 58 24 AA C7 28 44 49 25 28 49 49 AB 31 2C 4A |.X$..(DI%(II.1,J|
000020A0: 2C 4B 29 AB 31 29 00 CE 24 4A 10 82 4B 3A 58 24 |,K).1)..$J..K:X$|
000020B0: B2 58 24 AA C7 28 44 49 25 28 49 49 AB 31 2C 4A |.X$..(DI%(II.1,J|
000020C0: 2C 4B 29 29 3A 98 31 2C 58 24 3B 3A 82 4A 00 EA |,K)):.1,X$;:.J..|
000020D0: 24 54 10 82 49 49 3A A0 31 3A 84 31 35 2C 41 2C |$T..II:.1:.15,A,|
000020E0: 42 24 3A 8B 41 A7 34 35 30 30 00 19 25 5E 10 98 |B$:.A.4500..%^..|
000020F0: 31 35 2C 22 53 30 3A 41 52 2E 22 AA 4E 46 24 3A |15,"S0:AR.".NF$:|
00002100: 9F 31 2C 38 2C 32 2C 22 30 3A 41 52 2E 22 AA 4E |.1,8,2,"0:AR.".N|
00002110: 46 24 AA 22 2C 53 2C 57 22 00 2E 25 72 10 84 31 |F$.",S,W"..%r..1|
00002120: 35 2C 41 2C 42 24 3A 8B 41 A7 34 35 30 30 00 57 |5,A,B$:.A.4500.W|
00002130: 25 7C 10 81 49 49 B2 31 A4 4C 4D 3A 8B 41 52 24 |%|..II.1.LM:.AR$|
00002140: 28 49 49 29 B3 B1 22 22 A7 9E 42 41 AA 32 37 2C |(II)..""..BA.27,|
00002150: 41 52 24 28 49 49 29 00 73 25 81 10 8B 41 52 24 |AR$(II).s%...AR$|
00002160: 28 49 49 29 B3 B1 22 22 A7 98 31 2C 41 52 24 28 |(II)..""..1,AR$(|
00002170: 49 49 29 00 91 25 86 10 82 49 49 3A A0 31 3A 84 |II)..%...II:.1:.|
00002180: 31 35 2C 41 2C 42 24 3A 8B 41 B2 30 A7 34 32 35 |15,A,B$:.A.0.425|
00002190: 30 00 9B 25 90 10 89 34 35 30 30 00 D4 25 9A 10 |0..%...4500..%..|
000021A0: 9F 31 2C 38 2C 32 2C 22 41 52 2E 22 AA 4E 46 24 |.1,8,2,"AR.".NF$|
000021B0: 3A 9E 42 42 AA 33 3A A0 31 3A 8B C2 28 31 30 31 |:.BB.3:.1:..(101|
000021C0: 36 29 B3 32 35 35 A7 4B 59 24 B2 22 85 22 3A 89 |6).255.KY$.".":.|
000021D0: 32 32 31 30 00 11 26 9C 10 40 50 2C 32 34 2C 30 |2210..&..@P,24,0|
000021E0: 2C 22 4D 41 54 48 20 46 49 4C 45 20 54 4F 4F 20 |,"MATH FILE TOO |
000021F0: 4C 41 52 47 45 22 3A 8D 32 30 30 3A 58 24 B2 41 |LARGE":.200:X$.A|
00002200: 52 24 28 49 29 3A 8D 33 37 39 30 3A 89 34 30 39 |R$(I):.3790:.409|
00002210: 30 00 3A 26 A4 10 99 22 93 22 3B 3A 81 4A B2 49 |0.:&...".";:.J.I|
00002220: A4 49 AA 32 33 3A 40 50 2C 4A AB 49 2C 30 2C 41 |.I.23:@P,J.I,0,A|
00002230: 52 24 28 4A 29 3A 82 4A 3A 8E 00 72 26 94 11 A0 |R$(J):.J:..r&...|
00002240: 31 3A 40 50 2C 32 34 2C 30 2C 22 45 52 52 4F 52 |1:@P,24,0,"ERROR|
00002250: 20 2D 20 22 AA 42 24 3A 8D 32 30 30 3A 58 24 B2 | - ".B$:.200:X$.|
00002260: 41 52 24 28 49 29 3A 8D 33 37 39 30 3A 89 34 30 |AR$(I):.3790:.40|
00002270: 39 30 00 9A 26 E0 15 41 B2 C2 28 42 41 AA 4C 43 |90..&..A..(BA.LC|
00002280: 29 3A 97 42 41 AA 4C 43 2C 30 3A 40 50 2C 32 34 |):.BA.LC,0:@P,24|
00002290: 2C 30 2C 22 22 3A 8D 32 30 30 00 D3 26 E5 15 40 |,0,"":.200..&..@|
000022A0: 50 2C 32 34 2C 30 2C 22 41 52 45 20 59 4F 55 20 |P,24,0,"ARE YOU |
000022B0: 53 55 52 45 28 59 2F 4E 29 3F 20 22 3A 4C B2 31 |SURE(Y/N)? ":L.1|
000022C0: 3A 54 59 B2 30 3A 41 43 24 B2 22 59 4E 22 3A 8D |:TY.0:AC$."YN":.|
000022D0: 35 35 30 00 F3 26 FE 15 97 42 41 AA 4C 43 2C 41 |550..&...BA.LC,A|
000022E0: 3A 40 50 2C 32 34 2C 30 2C 22 20 22 3A 8D 32 30 |:@P,24,0," ":.20|
000022F0: 30 3A 8E 00 26 27 E4 16 9F 32 2C 38 2C 32 2C 22 |0:..&'...2,8,2,"|
00002300: 30 3A 53 43 2E 22 AA 4E 46 24 3A 9E 42 42 AA 33 |0:SC.".NF$:.BB.3|
00002310: 30 2C 31 3A A0 32 3A 40 43 2C 53 43 24 3A 9E 42 |0,1:.2:@C,SC$:.B|
00002320: 42 AA 34 38 3A 8E 00 41 27 4C 18 A1 23 32 2C 54 |B.48:..A'L..#2,T|
00002330: 24 2C 53 24 3A 54 B2 C6 28 54 24 AA C7 28 30 29 |$,S$:T..(T$..(0)|
00002340: 29 00 54 27 56 18 53 B2 C6 28 53 24 AA C7 28 30 |).T'V.S..(S$..(0|
00002350: 29 29 3A 8E 00 6D 27 00 19 98 31 35 2C 22 4D 2D |)):..m'...15,"M-|
00002360: 52 22 C7 28 31 34 34 29 3B C7 28 32 29 00 8D 27 |R".(144);.(2)..'|
00002370: 0A 19 A1 23 31 35 2C 41 24 3A 53 B2 30 3A 8B 41 |...#15,A$:S.0:.A|
00002380: 24 B3 B1 22 22 A7 53 B2 C6 28 41 24 29 00 A6 27 |$.."".S..(A$)..'|
00002390: 14 19 98 31 35 2C 22 4D 2D 52 22 C7 28 31 34 37 |...15,"M-R".(147|
000023A0: 29 3B C7 28 32 29 00 C6 27 1E 19 A1 23 31 35 2C |);.(2)..'...#15,|
000023B0: 41 24 3A 54 B2 30 3A 8B 41 24 B3 B1 22 22 A7 54 |A$:T.0:.A$.."".T|
000023C0: B2 C6 28 41 24 29 00 DF 27 28 19 98 31 35 2C 22 |..(A$)..'(..15,"|
000023D0: 4D 2D 52 22 C7 28 31 34 38 29 3B C7 28 32 29 00 |M-R".(148);.(2).|
000023E0: FF 27 32 19 A1 23 31 35 2C 41 24 3A 4F B2 30 3A |.'2..#15,A$:O.0:|
000023F0: 8B 41 24 B3 B1 22 22 A7 4F B2 C6 28 41 24 29 00 |.A$.."".O..(A$).|
00002400: 13 28 46 19 4F B2 4F AA 31 3A 8B 54 B2 30 A7 54 |.(F.O.O.1:.T.0.T|
00002410: B2 31 38 00 29 28 50 19 98 31 35 2C 22 55 31 3A |.18.)(P..15,"U1:|
00002420: 22 3B 32 3B 30 3B 54 3B 53 00 3B 28 5A 19 98 31 |";2;0;T;S.;(Z..1|
00002430: 35 2C 22 42 2D 50 22 3B 32 3B 4F 00 47 28 64 19 |5,"B-P";2;O.G(d.|
00002440: 8D 36 32 32 30 3A 8E 00 51 28 58 1B 8A 38 33 39 |.6220:..Q(X..839|
00002450: 30 00 5A 28 9E 1B 8D 34 35 30 00 87 28 B2 1B 58 |0.Z(...450..(..X|
00002460: B2 C2 28 32 31 31 29 AA 31 3A 59 B2 C2 28 32 31 |..(211).1:Y..(21|
00002470: 34 29 3A 8B C6 28 50 24 AA 43 44 24 29 B3 B1 33 |4):..(P$.CD$)..3|
00002480: 32 A7 99 22 20 22 3B 00 90 28 BC 1B 99 50 24 3B |2.." ";..(...P$;|
00002490: 00 9B 28 C6 1B 8D 35 36 30 3A 8E 00 CB 28 F8 1B |..(...560:...(..|
000024A0: 41 24 B2 46 41 24 28 49 29 3A 46 31 B2 30 3A 53 |A$.FA$(I):F1.0:S|
000024B0: B2 C6 28 CA 28 41 24 2C 31 29 29 AA 31 3A 8B 53 |..(.(A$,1)).1:.S|
000024C0: B3 B1 53 43 A7 46 31 B2 31 3A 8E 00 F6 28 02 1C |..SC.F1.1:...(..|
000024D0: 59 B2 C6 28 CA 28 41 24 2C 32 29 29 3A 58 B2 C6 |Y..(.(A$,2)):X..|
000024E0: 28 CA 28 41 24 2C 33 29 29 3A 4C B2 C6 28 CA 28 |(.(A$,3)):L..(.(|
000024F0: 41 24 2C 34 29 29 00 0A 29 0C 1C 54 59 B2 C6 28 |A$,4))..)..TY..(|
00002500: CA 28 41 24 2C 35 29 29 3A 8E 00 14 29 20 1C 4D |.(A$,5)):...) .M|
00002510: 44 B2 31 34 00 39 29 21 1C 5A 58 B2 52 4E 3A 8B |D.14.9)!.ZX.RN:.|
00002520: 58 4C B2 30 B0 52 45 24 28 58 44 29 B2 4B 24 B0 |XL.0.RE$(XD).K$.|
00002530: 58 42 B2 31 A7 37 32 30 33 00 61 29 22 1C 8D 38 |XB.1.7203.a)"..8|
00002540: 39 30 30 3A 8B 41 24 B2 22 4E 22 A7 52 45 24 28 |900:.A$."N".RE$(|
00002550: 58 44 29 B2 4B 24 3A 8D 38 35 30 3A 89 37 32 31 |XD).K$:.850:.721|
00002560: 30 00 8F 29 23 1C 4C 56 B2 32 3A 8D 34 35 30 3A |0..)#.LV.2:.450:|
00002570: 40 57 2C 52 4E 2C 52 45 24 28 30 29 3A 84 31 35 |@W,RN,RE$(0):.15|
00002580: 2C 41 2C 42 24 3A 8B 41 B2 30 A7 37 32 30 35 00 |,A,B$:.A.0.7205.|
00002590: AF 29 24 1C 4D 44 B2 32 32 3A 51 24 28 32 32 29 |.)$.MD.22:Q$(22)|
000025A0: B2 51 24 28 32 33 29 AA 42 24 3A 89 34 35 30 00 |.Q$(23).B$:.450.|
000025B0: D0 29 25 1C 53 59 B2 31 35 3A 8B C8 28 52 45 24 |.)%.SY.15:..(RE$|
000025C0: 28 30 29 2C 31 29 B2 57 41 24 A7 53 59 B2 31 32 |(0),1).WA$.SY.12|
000025D0: 00 F9 29 26 1C 9E 42 AA 53 59 2C 52 4E 3A 8B 58 |..)&..B.SY,RN:.X|
000025E0: 4C B2 30 B0 53 59 B2 31 32 B0 52 45 24 28 58 44 |L.0.SY.12.RE$(XD|
000025F0: 29 B2 4B 24 A7 37 32 31 30 00 26 2A 29 1C 58 53 |).K$.7210.&*).XS|
00002600: B2 31 3A 41 24 B2 C8 28 52 45 24 28 58 44 29 2C |.1:A$..(RE$(XD),|
00002610: 58 4C 29 3A 9E 42 41 AA 32 37 2C 41 24 3A 9E 42 |XL):.BA.27,A$:.B|
00002620: 43 AA 36 2C 41 24 00 3F 2A 2A 1C 52 4E B2 5A 58 |C.6,A$.?**.RN.ZX|
00002630: 3A 4C 56 B2 31 3A 4D 44 B2 30 3A 89 34 35 30 00 |:LV.1:MD.0:.450.|
00002640: 49 2A 5C 1C 8D 37 33 35 30 00 5C 2A 7A 1C 8B C2 |I*\..7350.\*z...|
00002650: 28 31 39 38 29 B2 30 A7 37 32 39 30 00 7D 2A 7F |(198).0.7290.}*.|
00002660: 1C A1 41 24 3A 40 48 2C 41 24 2C 4D 53 24 28 4C |..A$:@H,A$,MS$(L|
00002670: 56 29 3A 8B 4B 59 B2 30 A7 37 32 39 30 00 8A 2A |V):.KY.0.7290..*|
00002680: 84 1C 52 28 31 30 34 29 B2 30 00 A4 2A 8E 1C 40 |..R(104).0..*..@|
00002690: 48 2C 41 24 2C 4D 53 24 3A 4B 59 24 B2 41 24 3A |H,A$,MS$:KY$.A$:|
000026A0: 4B B2 4B 59 00 E8 2A 90 1C 91 4B 8D 20 37 33 35 |K.KY..*...K. 735|
000026B0: 30 2C 37 33 36 30 2C 37 33 36 30 2C 32 32 30 30 |0,7360,7360,2200|
000026C0: 2C 32 32 30 30 2C 37 38 33 30 2C 37 34 38 30 2C |,2200,7830,7480,|
000026D0: 37 37 32 30 2C 37 36 33 30 2C 37 36 33 30 2C 37 |7720,7630,7630,7|
000026E0: 34 34 30 2C 37 34 30 30 00 FD 2A 93 1C 4B B2 4B |440,7400..*..K.K|
000026F0: AB 31 32 3A 8B 4B B3 31 A7 37 32 39 30 00 45 2B |.12:.K.1.7290.E+|
00002700: 98 1C 91 4B 8D 38 32 39 30 2C 38 33 37 30 2C 38 |...K.8290,8370,8|
00002710: 33 35 30 2C 37 37 37 30 2C 37 36 38 30 2C 37 36 |350,7770,7680,76|
00002720: 38 30 2C 37 37 36 30 2C 38 32 31 30 2C 37 36 37 |80,7760,8210,767|
00002730: 30 2C 37 38 33 30 2C 37 39 38 30 2C 37 35 30 30 |0,7830,7980,7500|
00002740: 2C 38 32 30 30 00 4F 2B A2 1C 89 37 32 39 30 00 |,8200.O+...7290.|
00002750: 68 2B B6 1C 4C 56 B2 30 3A 4D 44 B2 30 3A 52 4E |h+..LV.0:MD.0:RN|
00002760: B2 AB 31 3A 58 48 B2 30 00 8A 2B BB 1C 40 42 2C |..1:XH.0..+..@B,|
00002770: 52 45 24 28 30 29 3A 9E 42 41 AA 33 39 2C 4E 47 |RE$(0):.BA.39,NG|
00002780: 3A 40 42 2C 44 50 24 28 30 29 00 AB 2B C0 1C 8B |:@B,DP$(0)..+...|
00002790: 4B 59 B2 32 A7 53 43 B2 53 43 AA 31 3A 8B 53 43 |KY.2.SC.SC.1:.SC|
000027A0: B1 4E 53 A7 53 43 B2 4E 53 3A 8E 00 CA 2B CA 1C |.NS.SC.NS:...+..|
000027B0: 8B 4B 59 B2 33 A7 53 43 B2 53 43 AB 31 3A 8B 53 |.KY.3.SC.SC.1:.S|
000027C0: 43 B3 31 A7 53 43 B2 31 3A 8E 00 D8 2B D4 1C 8D |C.1.SC.1:...+...|
000027D0: 38 35 30 3A 89 34 35 30 00 FC 2B E8 1C 4F 4C B2 |850:.450..+..OL.|
000027E0: 4C 56 3A 4C 56 B2 32 3A 4D 44 B2 31 31 3A 54 59 |LV:LV.2:MD.11:TY|
000027F0: B2 31 3A 4C B2 34 3A 50 24 B2 22 22 00 1F 2C ED |.1:L.4:P$.""..,.|
00002800: 1C 8D 37 30 37 30 3A 8B 4B 59 24 B2 22 93 22 A7 |..7070:.KY$.".".|
00002810: 4C 56 B2 4F 4C 3A 4D 44 B2 30 3A 89 34 35 30 00 |LV.OL:MD.0:.450.|
00002820: 45 2C F2 1C 52 4E B2 B5 28 C5 28 41 24 29 AB 2E |E,..RN..(.(A$)..|
00002830: 35 29 3A 8B 52 4E B3 30 B0 52 4E B1 4E 52 AB 31 |5):.RN.0.RN.NR.1|
00002840: A7 37 34 30 35 00 6E 2C FC 1C 8D 38 30 30 3A 4D |.7405.n,...800:M|
00002850: 44 B2 30 3A 4C 56 B2 31 3A 52 28 31 30 34 29 B2 |D.0:LV.1:R(104).|
00002860: 31 3A 8D 32 35 30 3A 8D 37 33 38 30 3A 8E 00 A5 |1:.250:.7380:...|
00002870: 2C 10 1D 4D 44 B2 31 32 3A 4C 56 B2 32 3A 54 59 |,..MD.12:LV.2:TY|
00002880: B2 31 3A 4C B2 33 3A 50 24 B2 C4 28 44 46 AA 31 |.1:L.3:P$..(DF.1|
00002890: 29 3A 8D 37 30 37 30 3A 8B 4B 59 24 B2 22 93 22 |):.7070:.KY$."."|
000028A0: A7 37 34 36 30 00 C3 2C 1A 1D 41 B2 B5 28 41 AB |.7460..,..A..(A.|
000028B0: 31 29 3A 8B 41 B3 30 B0 41 B1 4E 46 AB 31 A7 37 |1):.A.0.A.NF.1.7|
000028C0: 34 34 30 00 CC 2C 1F 1D 44 46 B2 41 00 DF 2C 24 |440..,..DF.A..,$|
000028D0: 1D 4D 44 B2 30 3A 4C 56 B2 30 3A 89 34 35 30 00 |.MD.0:LV.0:.450.|
000028E0: 0D 2D 38 1D 4C 56 B2 32 3A 4D 44 B2 32 3A 8D 34 |.-8.LV.2:MD.2:.4|
000028F0: 35 30 3A 43 44 24 B2 22 93 88 8C 5F 22 3A 4B 24 |50:CD$."..._":K$|
00002900: B2 52 45 24 28 58 44 29 3A 8D 37 30 30 00 21 2D |.RE$(XD):.700.!-|
00002910: 3A 1D 8B 41 24 B2 22 93 22 A7 8D 37 33 35 30 3A |:..A$."."..7350:|
00002920: 8E 00 41 2D 3D 1D 8D 32 35 30 3A 8D 38 35 30 3A |..A-=..250:.850:|
00002930: 8B 52 28 31 30 31 29 B2 30 A7 8D 37 32 30 30 3A |.R(101).0..7200:|
00002940: 8E 00 50 2D 3F 1D 8D 39 30 30 3A 89 37 34 38 32 |..P-?..900:.7482|
00002950: 00 80 2D 4C 1D 4D B2 4D 44 3A 4C 31 B2 4C 56 3A |..-L.M.MD:L1.LV:|
00002960: 40 42 2C 52 45 24 28 30 29 3A 81 4A B2 30 A4 31 |@B,RE$(0):.J.0.1|
00002970: 30 3A 43 46 28 4A 29 B2 AB 31 3A 82 3A 4A B2 30 |0:CF(J)..1:.:J.0|
00002980: 00 94 2D 51 1D 4D 44 B2 31 39 3A 4C 56 B2 32 3A |..-Q.MD.19:LV.2:|
00002990: 8D 34 35 30 00 AB 2D 55 1D 58 B2 32 31 3A 59 B2 |.450..-U.X.21:Y.|
000029A0: 32 34 3A 4C B2 33 3A 54 59 B2 31 00 C1 2D 56 1D |24:L.3:TY.1..-V.|
000029B0: 8D 35 36 30 3A 8B 4B 59 24 B2 22 93 22 A7 34 34 |.560:.KY$.".".44|
000029C0: 30 00 D3 2D 57 1D 8B 4B 59 24 B2 22 5F 22 A7 37 |0..-W..KY$."_".7|
000029D0: 35 33 30 00 F3 2D 58 1D 58 42 B2 30 3A 49 B2 41 |530..-X.XB.0:I.A|
000029E0: AB 31 3A 8B 49 B3 30 B0 49 B1 4E 46 AB 31 A7 37 |.1:.I.0.I.NF.1.7|
000029F0: 35 31 30 00 08 2E 59 1D 8B 58 4C B2 30 B0 49 B3 |510...Y..XL.0.I.|
00002A00: B1 58 44 A7 37 35 31 35 00 1F 2E 5A 1D 8D 38 39 |.XD.7515...Z..89|
00002A10: 30 30 3A 8B 41 24 B2 22 4E 22 A7 37 35 30 39 00 |00:.A$."N".7509.|
00002A20: 45 2E 5B 1D 58 42 B2 31 3A 8D 37 31 36 30 3A 8B |E.[.XB.1:.7160:.|
00002A30: 46 31 B2 31 A7 53 43 B2 53 3A 8D 37 33 38 30 3A |F1.1.SC.S:.7380:|
00002A40: 89 37 35 31 35 00 66 2E 60 1D 4D 44 B2 32 30 3A |.7515.f.`.MD.20:|
00002A50: 8D 34 35 30 3A 8D 36 30 30 3A 8B 4B 59 24 B2 22 |.450:.600:.KY$."|
00002A60: 93 22 A7 34 34 30 00 88 2E 62 1D 52 45 24 28 49 |.".440...b.RE$(I|
00002A70: 29 B2 41 24 3A 43 46 28 4A 29 B2 49 3A 4A B2 4A |).A$:CF(J).I:J.J|
00002A80: AA 31 3A 89 37 35 30 35 00 A5 2E 6A 1D 40 45 2C |.1:.7505...j.@E,|
00002A90: 52 45 24 28 30 29 2C 54 45 24 28 30 29 3A 8D 37 |RE$(0),TE$(0):.7|
00002AA0: 38 33 30 3A 8E 00 B3 2E 7E 1D 8B 4A B2 30 A7 37 |830:....~..J.0.7|
00002AB0: 35 37 30 00 D8 2E 88 1D 81 49 B2 30 A4 4A AB 31 |570......I.0.J.1|
00002AC0: 3A 52 45 24 28 43 46 28 49 29 29 B2 54 45 24 28 |:RE$(CF(I)).TE$(|
00002AD0: 43 46 28 49 29 29 3A 82 00 FC 2E 92 1D 9E 42 42 |CF(I)):.......BB|
00002AE0: 3A 8D 37 33 38 30 3A 4B 31 B2 4B 3A 4B B2 37 3A |:.7380:K1.K:K.7:|
00002AF0: 8D 37 32 30 30 3A 4B B2 4B 31 3A 8E 00 3B 2F CE |.7200:K.K1:..;/.|
00002B00: 1D 4C 56 B2 32 3A 4D 44 B2 31 3A 52 4E B2 AB 31 |.LV.2:MD.1:RN..1|
00002B10: 3A 40 42 2C 44 50 24 28 30 29 3A 8B 4B B2 39 A7 |:@B,DP$(0):.K.9.|
00002B20: 3A 40 42 2C 54 45 24 28 30 29 3A 40 45 2C 52 45 |:@B,TE$(0):@E,RE|
00002B30: 24 28 30 29 2C 54 45 24 28 30 29 00 56 2F D8 1D |$(0),TE$(0).V/..|
00002B40: 8D 37 33 38 30 3A 43 44 24 B2 22 93 88 8C 5F 86 |.7380:CD$."..._.|
00002B50: 22 3A 8D 37 30 30 00 80 2F DA 1D 8B 41 24 B2 22 |":.700../...A$."|
00002B60: 86 22 A7 52 45 24 28 49 29 B2 54 45 24 28 49 29 |.".RE$(I).TE$(I)|
00002B70: 3A 8D 38 36 30 3A 8D 37 36 30 3A 89 37 36 34 32 |:.860:.760:.7642|
00002B80: 00 94 2F DD 1D 8B 41 24 B2 22 93 22 A7 8D 37 33 |../...A$."."..73|
00002B90: 35 30 3A 8E 00 BE 2F EC 1D 9E 42 AA 39 2C 30 3A |50:.../...B.9,0:|
00002BA0: 8B 52 4E B1 4E 52 AB 31 B0 52 4E B2 AB 31 A7 4C |.RN.NR.1.RN..1.L|
00002BB0: 56 B2 30 3A 4D 44 B2 31 36 3A 89 34 35 30 00 E8 |V.0:MD.16:.450..|
00002BC0: 2F F1 1D 8D 32 35 30 3A 8D 38 35 30 3A 8B 52 28 |/...250:.850:.R(|
00002BD0: 31 30 31 29 B2 30 A7 58 42 B2 31 3A 8D 37 32 30 |101).0.XB.1:.720|
00002BE0: 30 3A 58 42 B2 30 3A 8E 00 F7 2F F2 1D 8D 39 30 |0:XB.0:.../...90|
00002BF0: 30 3A 89 37 36 34 32 00 21 30 F6 1D 4F 4C B2 4C |0:.7642.!0..OL.L|
00002C00: 56 3A 4C 56 B2 32 3A 4D 44 B2 31 35 3A 8D 34 35 |V:LV.2:MD.15:.45|
00002C10: 30 3A 43 44 24 B2 22 93 88 8C 5F 22 3A 8D 37 30 |0:CD$."..._":.70|
00002C20: 30 00 35 30 F8 1D 8B 41 24 B2 22 93 22 A7 8D 37 |0.50...A$."."..7|
00002C30: 33 35 30 3A 8E 00 53 30 FB 1D 4C 56 B2 4F 4C 3A |350:..S0..LV.OL:|
00002C40: 4D 44 B2 30 3A 8D 32 35 30 3A 8D 38 35 30 3A 89 |MD.0:.250:.850:.|
00002C50: 34 35 30 00 62 30 00 1E 8B 58 48 B2 30 A7 37 36 |450.b0...XH.0.76|
00002C60: 38 38 00 79 30 01 1E 8B 58 4C B2 30 B0 28 58 46 |88.y0...XL.0.(XF|
00002C70: B2 30 AF 4B B2 36 29 A7 8E 00 AF 30 02 1E 8B 4B |.0.K.6)....0...K|
00002C80: B2 35 A7 58 46 B2 58 46 AA 31 3A 9E 42 AA 31 38 |.5.XF.XF.1:.B.18|
00002C90: 2C 58 46 3A 52 4E B2 52 4E AB 31 3A 8B 52 4E B3 |,XF:RN.RN.1:.RN.|
00002CA0: 30 A7 58 46 B2 58 46 AB 32 3A 89 37 36 38 32 00 |0.XF.XF.2:.7682.|
00002CB0: D1 30 03 1E 8B 4B B2 36 A7 58 46 B2 58 46 AB 31 |.0...K.6.XF.XF.1|
00002CC0: 3A 9E 42 AA 31 38 2C 58 46 3A 52 4E B2 52 4E AA |:.B.18,XF:RN.RN.|
00002CD0: 31 00 F5 30 08 1E 8B 4B B2 35 A7 52 4E B2 52 4E |1..0...K.5.RN.RN|
00002CE0: AA 31 3A 8B 52 4E B1 4E 52 AB 31 A7 52 4E B2 4E |.1:.RN.NR.1.RN.N|
00002CF0: 52 AB 31 3A 8E 00 13 31 0A 1E 8B 4B B2 36 A7 52 |R.1:...1...K.6.R|
00002D00: 4E B2 52 4E AB 31 3A 8B 52 4E B3 30 A7 52 4E B2 |N.RN.1:.RN.0.RN.|
00002D10: 30 3A 8E 00 2C 31 14 1E 8D 38 30 30 3A 8D 32 35 |0:..,1...800:.25|
00002D20: 30 3A 4C 56 B2 31 3A 89 37 33 38 30 00 5A 31 28 |0:LV.1:.7380.Z1(|
00002D30: 1E 4D 44 B2 31 33 3A 4C 56 B2 32 3A 50 24 B2 22 |.MD.13:LV.2:P$."|
00002D40: 4E 22 3A 54 59 B2 30 3A 4C B2 31 3A 41 43 24 B2 |N":TY.0:L.1:AC$.|
00002D50: 22 59 4E 22 3A 8D 37 30 37 30 00 7C 31 32 1E 8B |"YN":.7070.|12..|
00002D60: 41 24 B3 B1 22 59 22 A7 4C 56 B2 31 3A 4D 44 B2 |A$.."Y".LV.1:MD.|
00002D70: 30 3A 8D 34 35 30 3A 89 37 37 34 35 00 A6 31 3C |0:.450:.7745..1<|
00002D80: 1E 40 4D 2C 57 41 24 2C 52 45 24 28 30 29 2C 31 |.@M,WA$,RE$(0),1|
00002D90: 3A 8D 32 35 30 3A 8D 38 35 30 3A 4D 44 B2 32 31 |:.250:.850:MD.21|
00002DA0: 3A 8D 37 32 30 32 00 B1 31 41 1E 8D 38 36 30 3A |:.7202..1A..860:|
00002DB0: 8E 00 C0 31 50 1E 8B 58 48 B2 30 A7 37 37 36 39 |...1P..XH.0.7769|
00002DC0: 00 F0 31 51 1E 58 47 B2 58 47 AA 31 3A 41 24 B2 |..1Q.XG.XG.1:A$.|
00002DD0: 52 45 24 28 58 44 29 3A 40 4D 2C 53 24 2C 52 45 |RE$(XD):@M,S$,RE|
00002DE0: 24 28 58 44 29 2C 31 3A 9E 42 AA 31 38 2C 58 47 |$(XD),1:.B.18,XG|
00002DF0: 00 10 32 52 1E 8B 52 4E B3 30 A7 97 32 2C 30 3A |..2R..RN.0..2,0:|
00002E00: 52 45 24 28 58 44 29 B2 41 24 3A 89 37 38 30 32 |RE$(XD).A$:.7802|
00002E10: 00 2D 32 53 1E 8D 38 30 30 3A 49 24 B2 C8 28 52 |.-2S..800:I$..(R|
00002E20: 45 24 28 58 44 29 2C C3 28 53 24 29 29 00 4F 32 |E$(XD),.(S$)).O2|
00002E30: 54 1E 8B 49 24 B3 B1 53 24 A7 97 32 2C 30 3A 52 |T..I$..S$..2,0:R|
00002E40: 45 24 28 58 44 29 B2 41 24 3A 89 37 38 30 32 00 |E$(XD).A$:.7802.|
00002E50: 66 32 55 1E 58 46 B2 58 47 3A 8D 32 35 30 3A 8D |f2U.XF.XG:.250:.|
00002E60: 37 33 38 30 3A 8E 00 78 32 59 1E 52 4E B2 52 4E |7380:..x2Y.RN.RN|
00002E70: AA 31 3A 89 37 38 30 30 00 91 32 5A 1E 52 4E B2 |.1:.7800..2Z.RN.|
00002E80: 30 3A 4D 44 B2 33 3A 4C 56 B2 32 3A 8D 37 33 35 |0:MD.3:LV.2:.735|
00002E90: 35 00 B4 32 64 1E 52 28 31 30 34 29 B2 31 3A 8D |5..2d.R(104).1:.|
00002EA0: 37 38 37 30 3A 8B 53 53 24 B2 22 22 A7 8D 37 33 |7870:.SS$.""..73|
00002EB0: 35 30 3A 8E 00 CE 32 78 1E 4D 44 B2 37 3A 4C 56 |50:...2x.MD.7:LV|
00002EC0: B2 32 3A 8D 34 35 30 3A 4F B2 31 3A 9E 42 00 F4 |.2:.450:O.1:.B..|
00002ED0: 32 7A 1E 8B C2 28 32 29 B3 B1 31 A7 4D 44 B2 39 |2z...(2)..1.MD.9|
00002EE0: 3A 4C 56 B2 30 3A 58 48 B2 30 3A 58 42 B2 30 3A |:LV.0:XH.0:XB.0:|
00002EF0: 89 34 35 30 00 11 33 7B 1E A1 41 24 3A 8B 41 24 |.450..3{..A$:.A$|
00002F00: B2 22 93 22 B0 4B 59 24 B2 22 93 22 A7 37 33 35 |.".".KY$.".".735|
00002F10: 30 00 30 33 7D 1E 4D 44 B2 30 3A 4C 56 B2 31 3A |0.03}.MD.0:LV.1:|
00002F20: 8B 4B B2 31 31 A7 8D 34 35 30 3A 89 37 37 36 30 |.K.11..450:.7760|
00002F30: 00 4E 33 82 1E 8D 38 30 30 3A 8D 32 35 30 3A 8D |.N3...800:.250:.|
00002F40: 37 33 38 30 3A 8B 4B B2 36 A7 37 37 36 30 00 64 |7380:.K.6.7760.d|
00002F50: 33 87 1E 8B 4B B2 31 32 A7 8D 37 35 35 30 3A 89 |3...K.12..7550:.|
00002F60: 37 37 36 30 00 6A 33 8C 1E 8E 00 92 33 96 1E 52 |7760.j3.....3..R|
00002F70: 4E B2 30 3A 4C 56 B2 32 3A 4D 44 B2 34 3A 52 28 |N.0:LV.2:MD.4:R(|
00002F80: 31 30 34 29 B2 31 3A 8D 37 33 35 35 3A 89 37 37 |104).1:.7355:.77|
00002F90: 38 30 00 B5 33 BE 1E 53 53 24 B2 22 22 3A 4E 48 |80..3..SS$."":NH|
00002FA0: B2 30 3A 43 44 24 B2 22 93 88 8C 5F 86 8A 87 22 |.0:CD$."..._..."|
00002FB0: 3A 8D 37 30 30 00 C3 33 C8 1E 8B 41 24 B2 22 93 |:.700..3...A$.".|
00002FC0: 22 A7 8E 00 EC 33 CD 1E 8B 41 24 B2 22 87 22 A7 |"....3...A$.".".|
00002FD0: 8D 38 38 30 30 3A 41 24 B2 22 5F 22 3A 8B 4B 59 |.8800:A$."_":.KY|
00002FE0: B2 31 36 A7 53 53 24 B2 22 22 3A 8E 00 FD 33 CE |.16.SS$."":...3.|
00002FF0: 1E 8B 41 24 B2 22 5F 22 A7 37 39 37 30 00 15 34 |..A$."_".7970..4|
00003000: D2 1E 42 24 B2 52 45 24 28 49 29 3A 9E 42 41 AA |..B$.RE$(I):.BA.|
00003010: 32 37 2C 42 24 00 36 34 D3 1E 8B 42 24 B2 22 22 |27,B$.64...B$.""|
00003020: A7 42 24 B2 C8 28 52 45 24 28 49 29 2C C2 28 32 |.B$..(RE$(I),.(2|
00003030: 31 31 29 AB 58 29 00 4B 34 D4 1E 8B 42 24 B2 22 |11).X).K4...B$."|
00003040: 22 A7 42 24 B2 52 45 24 28 49 29 00 5D 34 DC 1E |".B$.RE$(I).]4..|
00003050: 8B 41 24 B3 B1 22 86 22 A7 37 39 34 30 00 79 34 |.A$..".".7940.y4|
00003060: E6 1E 8B C3 28 53 53 24 29 B3 B1 30 A7 53 53 24 |....(SS$)..0.SS$|
00003070: B2 53 53 24 AA 22 41 4E 44 00 93 34 EB 1E 4E 53 |.SS$."AND..4..NS|
00003080: 24 B2 22 46 22 3A 8B 54 59 B2 31 A7 4E 53 24 B2 |$."F":.TY.1.NS$.|
00003090: 22 4E 22 00 BA 34 F0 1E 53 53 24 B2 53 53 24 AA |"N"..4..SS$.SS$.|
000030A0: 4E 53 24 AA CA 28 C4 28 49 AA 31 29 2C 32 29 AA |NS$..(.(I.1),2).|
000030B0: 22 3D 27 22 AA 42 24 AA 22 27 00 C9 34 F5 1E 8D |"='".B$."'..4...|
000030C0: 37 36 30 3A 89 37 38 38 30 00 F6 34 04 1F 8B 4E |760:.7880..4...N|
000030D0: 48 B2 30 AF C3 28 53 53 24 29 B3 B1 30 A7 4E 48 |H.0..(SS$)..0.NH|
000030E0: B2 31 3A 53 53 24 B2 53 53 24 AA 22 41 4E 44 22 |.1:SS$.SS$."AND"|
000030F0: 3A 89 37 39 36 30 00 11 35 0E 1F 8B C3 28 53 53 |:.7960..5....(SS|
00003100: 24 29 B3 B1 30 A7 53 53 24 B2 53 53 24 AA 22 4F |$)..0.SS$.SS$."O|
00003110: 52 00 48 35 18 1F 4E 48 B2 31 3A 53 53 24 B2 53 |R.H5..NH.1:SS$.S|
00003120: 53 24 AA 22 48 22 AA CA 28 C4 28 49 AA 31 29 2C |S$."H"..(.(I.1),|
00003130: 32 29 AA 22 27 22 AA 42 24 AA 22 27 22 3A 8D 37 |2)."'".B$."'":.7|
00003140: 36 30 3A 89 37 38 38 30 00 57 35 1D 1F 8D 37 36 |60:.7880.W5...76|
00003150: 30 3A 89 37 38 38 30 00 6C 35 22 1F 53 53 24 B2 |0:.7880.l5".SS$.|
00003160: 53 53 24 AA C7 28 32 35 35 29 3A 8E 00 8D 35 2C |SS$..(255):...5,|
00003170: 1F 52 4E B2 44 46 3A 8D 37 34 34 30 3A 58 44 B2 |.RN.DF:.7440:XD.|
00003180: 44 46 3A 44 46 B2 52 4E 3A 52 4E B2 30 00 C8 35 |DF:DF.RN:RN.0..5|
00003190: 36 1F 58 4C B2 C6 28 CA 28 46 41 24 28 58 44 29 |6.XL..(.(FA$(XD)|
000031A0: 2C 34 29 29 3A 9E 38 32 38 AA 33 3A 40 50 2C 32 |,4)):.828.3:@P,2|
000031B0: 34 2C 30 2C 22 22 3A 8D 32 30 30 3A 8B 58 4C B1 |4,0,"":.200:.XL.|
000031C0: 31 32 A7 58 4C B2 31 32 00 03 36 3B 1F 41 B2 36 |12.XL.12..6;.A.6|
000031D0: 31 34 33 32 3A 97 41 2C 30 3A 97 41 AA 31 2C 58 |1432:.A,0:.A.1,X|
000031E0: 44 3A 97 41 AA 32 2C 58 4C AA 32 3A 97 41 AA 33 |D:.A.2,XL.2:.A.3|
000031F0: 2C 58 4C 3A 9E 42 43 3A 40 52 2C 30 2C 52 45 24 |,XL:.BC:@R,0,RE$|
00003200: 28 30 29 00 3E 36 40 1F 40 50 2C 32 34 2C 30 2C |(0).>6@.@P,24,0,|
00003210: 4D 53 24 28 32 29 3A 5A 58 B2 30 3A 53 53 24 B2 |MS$(2):ZX.0:SS$.|
00003220: 22 46 22 AA CA 28 C4 28 58 44 AA 31 29 2C 32 29 |"F"..(.(XD.1),2)|
00003230: AA 22 3D 27 2A 27 22 AA C7 28 32 35 35 29 00 60 |."='*'"..(255).`|
00003240: 36 4A 1F 52 4E B2 5A 58 3A 9E 42 3A 8B C2 28 32 |6J.RN.ZX:.B:..(2|
00003250: 29 B3 B1 31 B0 52 4E B1 B2 4E 52 A7 38 30 35 30 |)..1.RN..NR.8050|
00003260: 00 95 36 54 1F 41 24 B2 C8 28 52 45 24 28 58 44 |..6T.A$..(RE$(XD|
00003270: 29 2C 58 4C 29 3A 40 50 2C 32 34 2C 30 2C 41 24 |),XL):@P,24,0,A$|
00003280: 3A 99 52 4E AA 31 3B 3A 9E 42 43 AA 36 2C 41 24 |:.RN.1;:.BC.6,A$|
00003290: 3A 58 53 B2 31 00 A7 36 5E 1F 5A 58 B2 5A 58 AA |:XS.1..6^.ZX.ZX.|
000032A0: 31 3A 89 38 30 31 30 00 BA 36 72 1F 4C 56 B2 30 |1:.8010..6r.LV.0|
000032B0: 3A 4D 44 B2 30 3A 89 34 35 30 00 C3 36 08 20 47 |:MD.0:.450..6. G|
000032C0: 45 B2 31 00 FC 36 12 20 40 42 2C 52 45 24 28 30 |E.1..6. @B,RE$(0|
000032D0: 29 3A 4C 56 B2 32 3A 4D 44 B2 30 3A 8D 34 35 30 |):LV.2:MD.0:.450|
000032E0: 3A 99 22 13 12 22 3B 3A 40 42 2C 52 45 24 28 30 |:."..";:@B,RE$(0|
000032F0: 29 3A 81 49 B2 46 46 A4 4E 46 AB 31 00 0F 37 1C |):.I.FF.NF.1..7.|
00003300: 20 8D 37 31 36 30 3A 8B 46 31 A7 38 32 36 30 00 | .7160:.F1.8260.|
00003310: 28 37 1E 20 44 44 B2 B5 28 4C AD 32 29 3A 8B 44 |(7. DD..(L.2):.D|
00003320: 44 B2 30 A7 44 44 B2 31 00 3E 37 21 20 4C 4E B2 |D.0.DD.1.>7! LN.|
00003330: 4C 3A 8B 47 45 B2 31 A7 4C 4E B2 49 AA 31 00 5A |L:.GE.1.LN.I.1.Z|
00003340: 37 22 20 40 4D 2C C9 28 C4 28 4C 4E 29 2C 4C 29 |7" @M,.(.(LN),L)|
00003350: 2C 52 45 24 28 49 29 2C 44 44 00 78 37 3A 20 40 |,RE$(I),DD.x7: @|
00003360: 50 2C 59 2C 58 2C 52 45 24 28 49 29 3A 82 3A 40 |P,Y,X,RE$(I):.:@|
00003370: 42 2C 52 45 24 28 30 29 00 BA 37 44 20 47 45 B2 |B,RE$(0)..7D GE.|
00003380: 30 3A 40 50 2C 32 34 2C 30 2C 22 92 52 45 43 20 |0:@P,24,0,".REC |
00003390: 4C 45 4E 3D 22 3A 99 C4 28 4C 52 29 22 20 43 48 |LEN=":..(LR)" CH|
000033A0: 41 52 53 2C 20 23 20 4F 46 20 52 45 43 4F 52 44 |ARS, # OF RECORD|
000033B0: 53 20 3D 22 C4 28 4E 52 29 3B 00 C5 37 4E 20 4C |S =".(NR);..7N L|
000033C0: 56 B2 30 3A 8E 00 D1 37 62 20 8B 58 4C B2 30 A7 |V.0:...7b .XL.0.|
000033D0: 8E 00 EF 37 67 20 4D 44 B2 36 3A 4C 56 B2 32 3A |...7g MD.6:LV.2:|
000033E0: 8D 37 33 35 35 3A 49 B2 58 44 3A 52 4E B2 30 00 |.7355:I.XD:RN.0.|
000033F0: 10 38 6C 20 8D 37 31 36 30 3A 8B 46 31 B2 31 A7 |.8l .7160:.F1.1.|
00003400: 53 43 B2 53 3A 8D 37 33 38 30 3A 89 38 33 30 30 |SC.S:.7380:.8300|
00003410: 00 2D 38 76 20 8D 36 30 30 3A 8B 4B 59 24 B2 22 |.-8v .600:.KY$."|
00003420: 93 22 A7 97 32 2C 30 3A 89 37 38 30 32 00 5A 38 |."..2,0:.7802.Z8|
00003430: 80 20 53 24 B2 C8 28 41 24 2C 58 4C 29 3A 9E 42 |. S$..(A$,XL):.B|
00003440: 41 AA 32 37 2C 53 24 3A 8B 53 24 B2 22 22 A7 53 |A.27,S$:.S$."".S|
00003450: 24 B2 C8 28 41 24 2C 58 4C 29 00 7E 38 8A 20 9E |$..(A$,XL).~8. .|
00003460: 42 43 AA 33 2C 53 24 3A 58 48 B2 31 3A 58 46 B2 |BC.3,S$:XH.1:XF.|
00003470: 4B 59 3A 58 47 B2 58 46 3A 89 37 38 30 32 00 93 |KY:XG.XF:.7802..|
00003480: 38 9E 20 8B 4C 56 B2 30 A7 8D 39 30 30 30 3A 89 |8. .LV.0..9000:.|
00003490: 34 35 30 00 B2 38 A3 20 40 50 2C 32 34 2C 30 2C |450..8. @P,24,0,|
000034A0: 22 22 3A 8D 32 30 30 3A 8D 39 30 30 30 3A 89 34 |"":.200:.9000:.4|
000034B0: 35 30 00 B8 38 B2 20 8F 00 E2 38 C6 20 54 54 24 |50..8. ...8. TT$|
000034C0: B2 22 45 4E 54 45 52 2F 45 44 49 54 22 3A 8D 31 |."ENTER/EDIT":.1|
000034D0: 30 30 3A 9E 42 41 AA 34 35 2C 4E 46 24 3A 8D 33 |00:.BA.45,NF$:.3|
000034E0: 30 30 00 F8 38 D0 20 97 39 AC 34 30 39 36 AA 37 |00..8. .9.4096.7|
000034F0: AC 32 35 36 2C 32 35 35 00 2D 39 DA 20 53 4C B2 |.256,255.-9. SL.|
00003500: 32 35 34 3A 4F B2 31 3A 53 4E B2 30 3A 52 54 B2 |254:O.1:SN.0:RT.|
00003510: 35 33 32 34 32 3A 4E 47 B2 31 30 35 3A 4C 4D B2 |53242:NG.105:LM.|
00003520: 32 34 3A 86 41 52 24 28 4C 4D AA 31 29 00 67 39 |24:.AR$(LM.1).g9|
00003530: E4 20 43 44 24 B2 22 11 22 AA C7 28 31 33 29 AA |. CD$."."..(13).|
00003540: C7 28 31 34 31 29 3A 53 52 24 B2 22 86 8A 87 8B |.(141):SR$."....|
00003550: 22 3A 44 46 B2 30 3A 46 52 B2 31 31 AC 34 30 39 |":DF.0:FR.11.409|
00003560: 36 AA 39 AC 32 35 36 00 90 39 EE 20 43 55 24 B2 |6.9.256..9. CU$.|
00003570: 22 91 22 3A 4B 59 B2 30 3A 4B 59 24 B2 22 20 22 |".":KY.0:KY$." "|
00003580: AA 22 22 3A 43 4D 24 B2 22 3E 3C 3D 3E 3D 3C 3E |."":CM$."><=>=<>|
00003590: 00 D2 39 F8 20 4D 53 24 28 30 29 B2 C7 28 32 32 |..9. MS$(0)..(22|
000035A0: 32 29 AA 22 93 88 8C 85 89 C9 C1 C3 41 2C 45 2C |2)."........A,E,|
000035B0: 46 2C 47 2C 49 2C 50 2C 53 2C 5E 2C 3D 22 3A 52 |F,G,I,P,S,^,=":R|
000035C0: 45 B2 30 3A 4F 54 B2 30 3A 4F 46 B2 30 3A 4F 53 |E.0:OT.0:OF.0:OS|
000035D0: B2 30 00 FD 39 F9 20 4D 53 24 28 31 29 B2 22 20 |.0..9. MS$(1)." |
000035E0: 93 88 8C 85 89 49 C3 C5 41 2C 43 2C 44 2C 45 2C |.....I..A,C,D,E,|
000035F0: 47 2C 50 2C 53 2C 2B 2C 2D 2C 3D 20 22 00 28 3A |G,P,S,+,-,= ".(:|
00003600: FE 20 4D 53 24 28 32 29 B2 22 20 20 20 20 20 20 |. MS$(2)." |
00003610: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00003620: 20 20 20 20 20 20 20 22 00 52 3A 02 21 4D 53 24 | ".R:.!MS$|
00003630: B2 22 93 88 8C 85 89 41 43 44 45 C5 46 47 49 52 |.".....ACDE.FGIR|
00003640: 50 53 2B 2D 20 5E 3D C1 C9 C3 22 AA C7 28 32 32 |PS+- ^=..."..(22|
00003650: 32 29 00 5E 3A 20 21 9E 42 42 AA 39 2C 31 00 75 |2).^: !.BB.9,1.u|
00003660: 3A 3E 21 9F 31 2C 38 2C 32 2C 22 30 3A 46 53 2E |:>!.1,8,2,"0:FS.|
00003670: 22 AA 4E 46 24 00 98 3A 48 21 40 50 2C 32 34 2C |".NF$..:H!@P,24,|
00003680: 30 2C 22 46 4F 55 4E 44 20 46 49 4C 45 20 4C 4F |0,"FOUND FILE LO|
00003690: 41 44 49 4E 47 2E 2E 2E 00 AE 3A 52 21 84 31 2C |ADING.....:R!.1,|
000036A0: 4E 53 2C 4E 46 2C 43 41 2C 4C 52 2C 4E 52 00 E9 |NS,NF,CA,LR,NR..|
000036B0: 3A 5C 21 86 46 41 24 28 4E 46 AB 31 29 2C 52 45 |:\!.FA$(NF.1),RE|
000036C0: 24 28 4E 46 AB 31 29 2C 54 45 24 28 4E 46 AB 31 |$(NF.1),TE$(NF.1|
000036D0: 29 2C 52 28 4E 47 29 3A 97 52 54 AA 35 2C 4E 46 |),R(NG):.RT.5,NF|
000036E0: 3A 97 31 30 31 38 2C 4E 47 00 14 3B 66 21 97 52 |:.1018,NG..;f!.R|
000036F0: 54 AA 31 2C B5 28 4C 52 AD 32 35 36 29 3A 97 52 |T.1,.(LR.256):.R|
00003700: 54 2C 4C 52 AB 28 32 35 36 AC B5 28 4C 52 AD 32 |T,LR.(256..(LR.2|
00003710: 35 36 29 29 00 41 3B 70 21 97 52 54 AA 33 2C B5 |56)).A;p!.RT.3,.|
00003720: 28 4E 52 AD 32 35 36 29 3A 97 52 54 AA 32 2C 4E |(NR.256):.RT.2,N|
00003730: 52 AB 28 32 35 36 AC B5 28 4E 52 AD 32 35 36 29 |R.(256..(NR.256)|
00003740: 29 00 5A 3B 7A 21 84 31 2C 53 43 24 3A 84 31 2C |).Z;z!.1,SC$:.1,|
00003750: 50 31 24 3A 84 31 2C 50 32 24 00 91 3B 84 21 81 |P1$:.1,P2$..;.!.|
00003760: 49 B2 30 A4 4E 46 AB 31 3A 40 49 4C 2C 35 2C 31 |I.0.NF.1:@IL,5,1|
00003770: 2C 46 41 24 28 49 29 3A 97 46 52 AA 49 2C C6 28 |,FA$(I):.FR.I,.(|
00003780: CA 28 46 41 24 28 49 29 2C 34 2C 31 29 29 3A 82 |.(FA$(I),4,1)):.|
00003790: 49 00 9E 3B 8E 21 A0 31 3A 8D 35 38 36 30 00 D8 |I..;.!.1:.5860..|
000037A0: 3B 98 21 41 24 B2 22 49 4E 2E 22 AA 4E 46 24 3A |;.!A$."IN.".NF$:|
000037B0: 40 4C 3B 41 24 3A 8B 53 54 B2 36 34 A7 9E 42 43 |@L;A$:.ST.64..BC|
000037C0: 3A 58 4C B2 C2 28 42 43 AA 31 32 29 3A 58 44 B2 |:XL..(BC.12):XD.|
000037D0: C2 28 42 43 AA 31 30 29 00 00 3C D4 21 4E 44 B2 |.(BC.10)..<.!ND.|
000037E0: 30 3A 9F 31 2C 38 2C 32 2C 22 41 52 2E 22 AA 4E |0:.1,8,2,"AR.".N|
000037F0: 46 24 3A 84 31 35 2C 41 3A 8B 41 A7 38 37 32 30 |F$:.15,A:.A.8720|
00003800: 00 0D 3C D9 21 9E 42 42 AA 33 3A A0 31 00 39 3C |..<.!.BB.3:.1.9<|
00003810: FC 21 9F 31 2C 38 2C 32 2C 22 44 50 2E 22 AA 4E |.!.1,8,2,"DP.".N|
00003820: 46 24 3A 84 31 2C 4E 44 3A 86 44 41 24 28 4E 44 |F$:.1,ND:.DA$(ND|
00003830: 29 2C 44 50 24 28 4E 44 29 00 58 3C 06 22 81 49 |),DP$(ND).X<.".I|
00003840: B2 30 A4 4E 44 AB 31 3A 40 49 4C 2C 34 2C 31 2C |.0.ND.1:@IL,4,1,|
00003850: 44 41 24 28 49 29 3A 82 00 80 3C 10 22 A0 31 3A |DA$(I):...<.".1:|
00003860: 97 52 54 AA 34 2C 4E 44 3A A0 31 35 3A 40 4C 3B |.RT.4,ND:.15:@L;|
00003870: 22 42 4D 2E 22 AA 4E 46 24 2C 22 46 46 30 30 22 |"BM.".NF$,"FF00"|
00003880: 00 A5 3C 12 22 9F 32 2C 38 2C 32 2C 22 23 22 3A |..<.".2,8,2,"#":|
00003890: 9F 33 2C 38 2C 35 2C 22 30 3A 42 4D 2E 22 AA 4E |.3,8,5,"0:BM.".N|
000038A0: 46 24 3A A0 33 00 C5 3C 15 22 9F 31 35 2C 38 2C |F$:.3..<.".15,8,|
000038B0: 31 35 3A 8D 36 34 30 30 3A 4D 54 B2 54 3A 4D 53 |15:.6400:MT.T:MS|
000038C0: B2 53 3A A0 32 00 E1 3C 1A 22 A0 31 35 3A 40 4C |.S:.2..<.".15:@L|
000038D0: 3B 22 54 53 2E 22 AA 4E 46 24 2C 22 42 41 30 30 |;"TS.".NF$,"BA00|
000038E0: 22 00 0C 3D 24 22 9F 31 2C 38 2C 32 2C 22 23 22 |"..=$".1,8,2,"#"|
000038F0: 3A 9E 42 41 AA 33 30 2C 52 45 24 28 30 29 3A 9E |:.BA.30,RE$(0):.|
00003900: 42 41 AA 33 30 2C 54 45 24 28 30 29 00 2A 3D 2E |BA.30,TE$(0).*=.|
00003910: 22 86 51 24 28 32 33 29 3A 97 52 54 AB 32 2C 4D |".Q$(23):.RT.2,M|
00003920: 54 3A 97 52 54 AB 31 2C 4D 53 00 4B 3D 33 22 51 |T:.RT.1,MS.K=3"Q|
00003930: 24 28 30 30 29 B2 22 20 20 20 20 20 20 20 20 20 |$(00)." |
00003940: 20 20 20 20 20 20 20 20 20 20 22 00 8D 3D 38 22 | "..=8"|
00003950: 51 24 28 31 29 B2 22 45 4E 54 45 52 22 3A 51 24 |Q$(1)."ENTER":Q$|
00003960: 28 32 29 B2 22 43 48 41 4E 47 45 22 3A 51 24 28 |(2)."CHANGE":Q$(|
00003970: 33 29 B2 22 53 45 41 52 43 48 22 3A 51 24 28 34 |3)."SEARCH":Q$(4|
00003980: 29 B2 22 41 43 43 55 4D 55 4C 41 54 45 00 CE 3D |)."ACCUMULATE..=|
00003990: 42 22 51 24 28 35 29 B2 22 22 3A 51 24 28 36 29 |B"Q$(5)."":Q$(6)|
000039A0: B2 22 49 4E 44 45 58 22 3A 51 24 28 37 29 B2 22 |."INDEX":Q$(7)."|
000039B0: 53 45 41 52 43 48 49 4E 47 22 3A 51 24 28 38 29 |SEARCHING":Q$(8)|
000039C0: B2 22 41 43 43 55 4D 55 4C 41 54 49 4E 47 00 F5 |."ACCUMULATING..|
000039D0: 3D 4C 22 51 24 28 39 29 B2 22 52 45 43 4F 52 44 |=L"Q$(9)."RECORD|
000039E0: 20 4E 4F 54 20 46 4F 55 4E 44 22 3A 51 24 28 31 | NOT FOUND":Q$(1|
000039F0: 30 29 B2 22 22 00 2D 3E 4D 22 51 24 28 31 31 29 |0)."".->M"Q$(11)|
00003A00: B2 22 45 4E 54 45 52 20 52 45 43 4F 52 44 20 4E |."ENTER RECORD N|
00003A10: 55 4D 42 45 52 3F 22 3A 51 24 28 31 32 29 B2 22 |UMBER?":Q$(12)."|
00003A20: 46 49 45 4C 44 20 4E 55 4D 42 45 52 3F 00 68 3E |FIELD NUMBER?.h>|
00003A30: 4E 22 51 24 28 31 33 29 B2 22 44 45 4C 45 54 45 |N"Q$(13)."DELETE|
00003A40: 20 2D 20 41 52 45 20 59 4F 55 20 53 55 52 45 3F | - ARE YOU SURE?|
00003A50: 22 3A 51 24 28 31 34 29 B2 22 53 54 4F 52 49 4E |":Q$(14)."STORIN|
00003A60: 47 20 52 45 43 4F 52 44 00 93 3E 4F 22 51 24 28 |G RECORD..>O"Q$(|
00003A70: 31 35 29 B2 22 43 41 4C 43 55 4C 41 54 45 22 3A |15)."CALCULATE":|
00003A80: 51 24 28 31 36 29 B2 22 12 46 49 4C 45 20 46 55 |Q$(16).".FILE FU|
00003A90: 4C 4C 92 00 D4 3E 50 22 51 24 28 31 38 29 B2 22 |LL...>P"Q$(18)."|
00003AA0: 22 3A 51 24 28 31 39 29 B2 22 43 48 41 4E 47 45 |":Q$(19)."CHANGE|
00003AB0: 20 46 49 45 4C 44 20 4E 55 4D 42 45 52 3F 22 3A | FIELD NUMBER?":|
00003AC0: 51 24 28 32 30 29 B2 22 45 4E 54 45 52 20 43 48 |Q$(20)."ENTER CH|
00003AD0: 41 4E 47 45 00 0A 3F 51 22 51 24 28 32 31 29 B2 |ANGE..?Q"Q$(21).|
00003AE0: 22 44 45 4C 45 54 49 4E 47 20 52 45 43 4F 52 44 |"DELETING RECORD|
00003AF0: 22 3A 51 24 28 32 33 29 B2 22 12 44 49 53 4B 20 |":Q$(23).".DISK |
00003B00: 45 52 52 4F 52 92 20 2D 20 22 00 2D 3F 56 22 53 |ERROR. - ".-?V"S|
00003B10: 43 B2 31 3A 9F 31 35 2C 38 2C 31 35 3A 97 35 33 |C.1:.15,8,15:.53|
00003B20: 32 37 32 2C 43 41 3A 89 20 37 32 36 30 00 55 3F |272,CA:. 7260.U?|
00003B30: 60 22 99 22 93 22 3B 3A 40 50 2C 32 34 2C 30 2C |`".".";:@P,24,0,|
00003B40: 22 53 45 41 52 43 48 20 53 54 52 49 4E 47 20 45 |"SEARCH STRING E|
00003B50: 44 49 54 4F 52 00 7D 3F 6A 22 43 4D 24 B2 22 91 |DITOR.}?j"CM$.".|
00003B60: 13 86 8A 88 8C 87 8B 5F 5F 5F 11 22 AA C7 28 31 |.......___."..(1|
00003B70: 33 29 AA C7 28 31 34 31 29 AA 22 91 93 00 9C 3F |3)..(141)."....?|
00003B80: 74 22 81 49 B2 31 A4 4C 4D 3A 40 50 2C 49 AB 31 |t".I.1.LM:@P,I.1|
00003B90: 2C 30 2C 41 52 24 28 49 29 3A 82 49 00 C3 3F 79 |,0,AR$(I):.I..?y|
00003BA0: 22 54 59 B2 30 3A 4C 4C B2 34 30 3A 4C 4E B2 31 |"TY.0:LL.40:LN.1|
00003BB0: 3A 49 B2 31 3A 58 58 B2 30 3A 97 42 41 AA 4C 43 |:I.1:XX.0:.BA.LC|
00003BC0: 2C 36 34 00 F0 3F 7E 22 8D 33 37 31 30 3A 53 53 |,64..?~".3710:SS|
00003BD0: 24 B2 22 22 3A 81 49 B2 31 A4 4C 4D 3A 41 24 B2 |$."":.I.1.LM:A$.|
00003BE0: 41 52 24 28 49 29 3A 9E 42 41 AA 32 37 2C 41 24 |AR$(I):.BA.27,A$|
00003BF0: 00 0B 40 88 22 8B C3 28 41 24 29 AA C3 28 53 53 |..@."..(A$)..(SS|
00003C00: 24 29 B1 32 35 34 A7 38 38 36 30 00 28 40 92 22 |$).254.8860.(@."|
00003C10: 53 53 24 B2 53 53 24 AA 41 24 3A 82 49 3A 97 42 |SS$.SS$.A$:.I:.B|
00003C20: 41 AA 4C 43 2C 30 3A 8E 00 58 40 9C 22 40 50 2C |A.LC,0:..X@."@P,|
00003C30: 32 34 2C 30 2C 22 53 45 41 52 43 48 20 53 54 52 |24,0,"SEARCH STR|
00003C40: 49 4E 47 20 54 4F 4F 20 4C 4F 4E 47 22 3A 8D 32 |ING TOO LONG":.2|
00003C50: 30 30 3A 89 38 38 32 30 00 7C 40 C4 22 97 31 39 |00:.8820.|@.".19|
00003C60: 38 2C 31 3A 97 36 33 31 2C 31 33 3A 40 47 2C 32 |8,1:.631,13:@G,2|
00003C70: 34 2C 30 2C 33 39 2C 30 2C 41 41 24 00 B3 40 CE |4,0,39,0,AA$..@.|
00003C80: 22 40 50 2C 32 34 2C 30 2C 22 49 4E 44 45 58 20 |"@P,24,0,"INDEX |
00003C90: 46 49 45 4C 44 20 41 4C 54 45 52 45 44 2C 20 41 |FIELD ALTERED, A|
00003CA0: 52 45 20 59 4F 55 20 53 55 52 45 3F 20 22 3A 8D |RE YOU SURE? ":.|
00003CB0: 32 30 30 00 DC 40 D8 22 41 43 24 B2 22 59 4E 22 |200..@."AC$."YN"|
00003CC0: 3A 4C B2 31 3A 54 59 B2 30 3A 8D 35 35 30 3A 40 |:L.1:TY.0:.550:@|
00003CD0: 50 2C 32 34 2C 30 2C 41 41 24 3A 8E 00 F8 40 28 |P,24,0,AA$:...@(|
00003CE0: 23 97 31 39 38 2C 30 3A 8D 39 30 35 30 3A 8B 4B |#.198,0:.9050:.K|
00003CF0: 59 24 B2 22 93 22 A7 8E 00 12 41 2D 23 9F 34 2C |Y$."."....A-#.4,|
00003D00: 34 2C 28 C2 28 35 33 32 37 32 29 AF 32 29 AC 33 |4,(.(53272).2).3|
00003D10: 2E 35 00 38 41 32 23 81 5A 49 B2 31 A4 32 3A 98 |.5.8A2#.ZI.1.2:.|
00003D20: 34 3A 82 3A 40 44 3A 81 5A 49 B2 31 A4 34 3A 98 |4:.:@D:.ZI.1.4:.|
00003D30: 34 3A 82 3A A0 34 3A 8E 00 50 41 5A 23 9F 34 2C |4:.:.4:..PAZ#.4,|
00003D40: 34 3A 98 34 3A 8B 53 54 B1 B2 30 A7 A0 34 3A 8E |4:.4:.ST..0..4:.|
00003D50: 00 84 41 5F 23 A0 34 3A 40 50 2C 32 34 2C 30 2C |..A_#.4:@P,24,0,|
00003D60: 22 52 45 41 44 59 20 50 52 49 4E 54 45 52 20 41 |"READY PRINTER A|
00003D70: 4E 44 20 50 52 45 53 53 20 53 50 41 43 45 22 3A |ND PRESS SPACE":|
00003D80: 8D 32 30 30 00 97 41 64 23 8B C2 28 31 39 38 29 |.200..Ad#..(198)|
00003D90: B2 30 A7 39 30 36 30 00 AB 41 69 23 40 50 2C 32 |.0.9060..Ai#@P,2|
00003DA0: 34 2C 30 2C 22 22 3A 8D 32 30 30 00 CD 41 6E 23 |4,0,"":.200..An#|
00003DB0: A1 4B 59 24 3A 8B 4B 59 24 B3 B1 22 20 22 AF 4B |.KY$:.KY$.." ".K|
00003DC0: 59 24 B3 B1 22 10 22 A7 8D 32 32 30 30 00 DC 41 |Y$.."."..2200..A|
00003DD0: 73 23 8B 4B 59 24 B2 22 93 22 A7 8E 00 E6 41 78 |s#.KY$."."....Ax|
00003DE0: 23 89 39 30 35 30 00 FB 41 8C 23 8D 39 30 35 30 |#.9050..A.#.9050|
00003DF0: 3A 8B 4B 59 24 B2 22 93 22 A7 8E 00 10 42 91 23 |:.KY$."."....B.#|
00003E00: 9F 34 2C 34 3A 50 4C B2 36 36 3A 8D 39 35 30 30 |.4,4:PL.66:.9500|
00003E10: 00 39 42 96 23 81 4A 4A B2 31 A4 4C 4D 3A 8B 41 |.9B.#.JJ.1.LM:.A|
00003E20: 52 24 28 4A 4A 29 B3 B1 22 22 A7 9E 42 41 AA 32 |R$(JJ)..""..BA.2|
00003E30: 37 2C 41 52 24 28 4A 4A 29 00 4E 42 A0 23 8B 41 |7,AR$(JJ).NB.#.A|
00003E40: 52 24 28 4A 4A 29 B2 22 22 A7 39 31 34 30 00 66 |R$(JJ)."".9140.f|
00003E50: 42 AA 23 8B 43 4F B2 36 33 A7 8D 31 30 37 35 30 |B.#.CO.63..10750|
00003E60: 3A 8D 39 35 30 30 00 88 42 AF 23 98 34 2C 41 52 |:.9500..B.#.4,AR|
00003E70: 24 28 4A 4A 29 3A 43 4F B2 43 4F AA 31 3A A1 4B |$(JJ):CO.CO.1:.K|
00003E80: 59 24 3A 8D 32 32 30 30 00 97 42 B4 23 82 4A 4A |Y$:.2200..B.#.JJ|
00003E90: 3A 8D 31 30 37 35 30 00 AB 42 BE 23 43 4F B2 31 |:.10750..B.#CO.1|
00003EA0: 3A 81 49 49 B2 31 A4 4E 53 A9 32 00 B6 42 C8 23 |:.II.1.NS.2..B.#|
00003EB0: 8D 31 30 35 30 30 00 E5 42 E6 23 81 4A B2 31 A4 |.10500..B.#.J.1.|
00003EC0: 42 3A 41 B2 49 49 3A 8D 31 31 30 33 30 3A 8B 49 |B:A.II:.11030:.I|
00003ED0: 49 AA 31 B3 B2 4E 53 A7 41 B2 49 49 AA 31 3A 8D |I.1..NS.A.II.1:.|
00003EE0: 31 31 30 33 30 00 03 43 EB 23 8B 43 4F B2 36 33 |11030..C.#.CO.63|
00003EF0: A7 8D 31 30 37 35 30 3A 43 4F B2 31 3A 8D 31 30 |..10750:CO.1:.10|
00003F00: 35 30 30 00 12 43 EC 23 A1 4B 59 24 3A 8D 32 32 |500..C.#.KY$:.22|
00003F10: 30 30 00 2C 43 F0 23 82 4A 3A 50 4C B2 33 33 3A |00.,C.#.J:PL.33:|
00003F20: 8B 43 4F B1 33 30 A7 50 4C B2 36 36 00 4F 43 FA |.CO.30.PL.66.OC.|
00003F30: 23 8D 31 30 37 35 30 3A 43 4F B2 B6 28 50 4C AB |#.10750:CO..(PL.|
00003F40: 36 36 29 AA 31 3A 50 4C B2 36 36 3A 82 49 49 00 |66).1:PL.66:.II.|
00003F50: 61 43 04 24 8B 43 4F B2 33 34 A7 8D 31 30 37 35 |aC.$.CO.34..1075|
00003F60: 30 00 75 43 0E 24 A0 34 3A 4B 59 24 B2 22 20 22 |0.uC.$.4:KY$." "|
00003F70: AA 22 22 3A 8E 00 A2 43 1C 25 98 34 2C 22 41 52 |."":...C.%.4,"AR|
00003F80: 49 54 48 4D 45 54 49 43 20 46 4F 52 20 46 49 4C |ITHMETIC FOR FIL|
00003F90: 45 2E 2E 2E 22 4E 46 24 3A 98 34 3A 43 4F B2 33 |E..."NF$:.4:CO.3|
00003FA0: 3A 8E 00 D7 43 10 27 43 B2 35 32 AB 32 AC 28 B5 |:...C.'C.52.2.(.|
00003FB0: 28 28 41 AB 31 29 AD 32 AA 31 29 AC 32 AB B5 28 |((A.1).2.1).2..(|
00003FC0: 41 AD 32 29 AC 32 29 3A 8B 43 B2 44 A7 98 34 3A |A.2).2):.C.D..4:|
00003FD0: 43 4F B2 43 4F AA 31 00 08 44 1A 27 9E 42 41 AA |CO.CO.1..D.'.BA.|
00003FE0: 32 37 2C 41 24 3A 98 34 2C 41 24 3B A6 34 30 AB |27,A$:.4,A$;.40.|
00003FF0: C3 28 41 24 29 29 3A 8B 43 B3 B1 34 38 A7 98 34 |.(A$)):.C..48..4|
00004000: 3A 43 4F B2 43 4F AA 31 00 12 44 24 27 44 B2 43 |:CO.CO.1..D$'D.C|
00004010: 3A 8E 00 36 44 04 29 41 B2 49 49 3A 8D 31 31 30 |:..6D.)A.II:.110|
00004020: 30 30 3A 41 B2 41 AA 31 3A 8B 41 B3 B2 4E 53 A7 |00:A.A.1:.A..NS.|
00004030: 8D 31 31 30 30 30 00 45 44 0E 29 98 34 3A 43 4F |.11000.ED.).4:CO|
00004040: B2 43 4F AA 31 00 69 44 18 29 41 B2 49 49 3A 8D |.CO.1.iD.)A.II:.|
00004050: 31 31 30 32 30 3A 41 B2 41 AA 31 3A 8B 41 B3 B2 |11020:A.A.1:.A..|
00004060: 4E 53 A7 8D 31 31 30 32 30 00 8C 44 22 29 42 B2 |NS..11020..D")B.|
00004070: 44 49 25 28 49 49 AB 31 2C 30 2C 30 29 3A 8B 49 |DI%(II.1,0,0):.I|
00004080: 49 AA 31 B1 4E 53 A7 31 30 35 35 30 00 AD 44 2C |I.1.NS.10550..D,|
00004090: 29 8B 42 B3 44 49 25 28 49 49 2C 30 2C 30 29 A7 |).B.DI%(II,0,0).|
000040A0: 42 B2 44 49 25 28 49 49 2C 30 2C 30 29 00 B3 44 |B.DI%(II,0,0)..D|
000040B0: 36 29 8E 00 CA 44 FE 29 81 4A 4B B2 43 4F A4 50 |6)...D.).JK.CO.P|
000040C0: 4C 3A 98 34 3A 82 4A 4B 3A 8E 00 05 45 F8 2A 41 |L:.4:.JK:...E.*A|
000040D0: 24 B2 C4 28 44 49 25 28 41 AB 31 2C 30 2C 30 29 |$..(DI%(A.1,0,0)|
000040E0: 29 AA 22 20 44 49 53 50 4C 41 59 20 50 4F 53 49 |)." DISPLAY POSI|
000040F0: 54 49 4F 4E 53 20 4F 4E 20 53 43 52 45 45 4E 22 |TIONS ON SCREEN"|
00004100: AA C4 28 41 29 00 12 45 02 2B 8D 31 30 30 30 30 |..(A)..E.+.10000|
00004110: 3A 8E 00 45 45 0C 2B 41 24 B2 22 4E 55 4D 42 45 |:..EE.+A$."NUMBE|
00004120: 52 20 4C 49 4E 45 20 20 20 20 20 43 4F 4C 55 4D |R LINE COLUM|
00004130: 4E 20 20 20 20 4C 45 4E 47 54 48 22 3A 8D 31 30 |N LENGTH":.10|
00004140: 30 30 30 3A 8E 00 65 45 16 2B 41 24 B2 22 22 3A |000:..eE.+A$."":|
00004150: 8B 4A B1 44 49 25 28 41 AB 31 2C 30 2C 30 29 A7 |.J.DI%(A.1,0,0).|
00004160: 31 31 30 34 35 00 93 45 1B 2B 81 4B B2 30 A4 32 |11045..E.+.K.0.2|
00004170: 3A 42 24 B2 C4 28 44 49 25 28 41 AB 31 2C 4A 2C |:B$..(DI%(A.1,J,|
00004180: 4B 29 29 3A 8B C5 28 42 24 29 B2 30 A7 42 24 B2 |K)):..(B$).0.B$.|
00004190: 22 20 22 00 B6 45 20 2B 41 24 B2 41 24 AA C9 28 |" "..E +A$.A$..(|
000041A0: 22 20 20 20 20 20 20 20 20 20 20 22 AA 42 24 2C |" ".B$,|
000041B0: 31 30 29 3A 82 4B 00 F3 45 22 2B 54 B2 30 3A 81 |10):.K..E"+T.0:.|
000041C0: 4B B2 30 A4 41 AB 32 3A 54 B2 54 AA 44 49 25 28 |K.0.A.2:T.T.DI%(|
000041D0: 4B 2C 30 2C 30 29 3A 82 3A 54 B2 54 AA 4A 3A 40 |K,0,0):.:T.T.J:@|
000041E0: 4D 2C C4 28 54 29 2C 41 24 2C 36 AB C3 28 C4 28 |M,.(T),A$,6..(.(|
000041F0: 54 29 29 00 17 46 23 2B 8B 41 B2 31 A7 3A 40 4D |T))..F#+.A.1.:@M|
00004200: 2C C4 28 4A 29 AA 22 20 20 22 2C 41 24 2C 36 AB |,.(J)." ",A$,6.|
00004210: C3 28 C4 28 4A 29 29 00 24 46 25 2B 8D 31 30 30 |.(.(J)).$F%+.100|
00004220: 30 30 3A 8E 00 5E 46 18 F6 A0 31 3A 9F 31 2C 39 |00:..^F...1:.1,9|
00004230: 2C 31 35 2C 22 53 30 3A 36 34 2E 41 52 49 54 48 |,15,"S0:64.ARITH|
00004240: 45 44 49 54 22 3A A0 31 3A 94 22 30 3A 36 34 2E |EDIT":.1:."0:64.|
00004250: 41 52 49 54 48 45 44 49 54 22 2C 39 3A 90 00 98 |ARITHEDIT",9:...|
00004260: 46 22 F6 A0 31 3A 9F 31 2C 38 2C 31 35 2C 22 53 |F"..1:.1,8,15,"S|
00004270: 30 3A 36 34 2E 41 52 49 54 48 45 44 49 54 22 3A |0:64.ARITHEDIT":|
00004280: A0 31 3A 94 22 30 3A 36 34 2E 41 52 49 54 48 45 |.1:."0:64.ARITHE|
00004290: 44 49 54 22 2C 38 3A 90 00 00 00 |DIT",8:.... |
.......1000.>.D.BA.12.4096:BB.8.4096.9:B
.7.4096:BC.31088:LC.48.T.N.WA$.G(B(1017)
):KY.0:KY$." "."":.15,8,15:RR.B(2):....H
.XA$."
":YA.B(214):XA.B(211)...R.@P,YA,XA,
H(XA$,39.XA):XA$."":@P,YA,XA,"":......@B
,DP$(0):R(100).RN.1:.BB:....,.F9.0:.".";
:.400.H.1..:.".ENTER FILENAME? ";:.500:X
1.X:Y1.Y.W.6..2,8,2,"0:FS.".NF$:.15,A,B$
:.2,NS,NF,CA: 2...@..A.0.F9.2..BA.42,NF$
:.370.C.J.@P,24,0,H(B$,20):." - DIRECTOR
Y (Y/N)? ";...T.AC$."YN":TY.0:L.1:.550:@
P,24,0,"":.200:.A$."N".360.'.^..BB.15:A$
."DA.*":FG.0:.1380:.".";:.BB.57.?.H.X.X1
:Y.Y1:.510:.310.J.R.F9.0:..U...C$."...":
@C,C$:.G(142).20.C(TT$).2)TT$......II.1.
4:."............";:.II:......LV.L1:MD.M.
X.B.@P,24,19,J(MS$(2),10):@P,24,19,J(MS$
(LV),10)...L.@P,24,0,Q$(0):@P,24,0,Q$(MD
):.MD...%.V.@P,24,0,"SCR":.D(SC)" REC"RN
.1;:..A...Y.B(214):X.B(211):.NF$;.T...KY
.1:.BA.LC,64......211,X.1.KY:L.13:TY.0:.
560:.RF .A$."!".KY.1:.511.....@H,"?",A$:
.KY..0.511.....@H,"*",A$:.KY..0.511.T...
@H,"@",A$:.KY..0.511......BA.LC,0.....NF
$.A$:....&.Y.B(214):X.B(211)...0..600.+.
2..L.1.:@H,A$,AC$:.KY.0.560.=.5..TY.1.A.
E(A$).C.:...I.X..650:@G,Y,X,L,TY,A$:.220
0:.RF.600.O.B........B(52).B(50).3......
..198,1:.631,13:XZ.B(211):YZ.B(214):OA.B
(BA.LC)......BA.LC,0:@G,24,0,39,0,TS$:@P
,24,0,"ONE MOMENT, PLEASE":.200.-...Z..(
0):@P,24,0,TS$:.BA.LC,OA:@P,YZ,XZ,"":TS$
."":..6...I.DF.V.F..7160:.F1.1.SC.S:.738
0:.710..P..650:@G,Y,X,L,TY,RE$(I):A$.KY
$:.2200...Q.@H,A$,CD$:.KY..2.KY..3.729..
.R..7360:I.FF:.7160:.F1..1.710.P.S..B(19
8).0.723...T..KY$:.2200:A$.KY$:@H,A$,"._
.......U.KY.KY.2:.KY.1.....V..KY.3.KY.2.
&.W..KY.1.KY.3./.X..722.9.Y..KY...P.Z..A
$.".".I..0.I.I.1.`....A$.".".710.|....A$
."."..7160:I.FF:.710......I.NF.1.I.I.1..
....710... .@R,RN,RE$(0):R(100).RN.1:..D
.R..BB.12,SC...\..2,SC.1:.B.3:FF.B(2):..
....I.R(101).1:R(101).0:.I.NF.1.I.NF.1..
....I.0.I.0......710:..`....15,A$:@P,24,
0,"PLACE SYSTEM DISK IN DRIVE- PRESS SPA
CE":.985...T..15,A$:@P,24,0,"PLACE EASYS
CRIPT IN DRIVE - PRESS SPACE...Y..KY$:.2
200:.KY$.." ".985.....@P,24,0,"LOADING O
PTION...":.200:.......100:.B(2)..0.KY.B(
2):.1170.*....".";:TT$."COMMODORE 64 MAN
AGER":.400.N....BA.LC,0:.G(8);:.B(809).2
46.:@A.B.....15)"MAIN MENU.X.....15)"...
...........$...3)"....A.RITHMETIC".23)".
F.ORMAT A DISK.X.....3)"..B.ACKUP A DISK
".23)".M.ANIPULATE FILES...8...3)"..C.RE
ATE/REVISE".23)".R.EPORT GENERATE.;.B...
3)"..D.ISK DIRECTORY".23)".W.ORD PROCESS
ING.I.L...3)"..E.NTER/EDIT".23)".X.-EXIT
TO BASIC.{.V...18)"..H.ELP...`.AC$."ABC
DEFMRWXH...J.@P,20,10,"ENTER SELECTION?
":TY.0:L.1:.550.....@P,24,0,"LOADING OPT
ION.........KY. 1180,1190,1200,1210,1230
,1240,1241,1242,1243,1246,1550.(....3000
.F...@X,"64.BACKUP":.950:.1190.H...@X,"6
4.CREATEEDIT":.950:.1200.R....1250.|.N..
7000...X..2000...Y.@X,"64.MANIPULATE":.9
50:.1241.F.Z.@X,"64.REPORT":.950:.1242..
...@X;"EASY SCRIPT":.980:.1243.....RF.0:
.2201:.RF.1..2,0:.......697.,...FG.1:.10
0:.1260:.1380:.2,0:..P....".";:TT$."DISK
DIRECTORY":.400.M....:..13)".....E.VERY
THING.......13)"..M.ANAGER FILES.......1
3)"..R.EPORT FILES.G....:..10)"...ENTER
SELECTION? E.";...(.L.1:TY.0:AC$."EMR":.
550...F.A$."*":.KY.2.A$."DA.*...P..KY.3.
A$."RF.*...Z...I.D.FL.0:.1,8,0,"$0:".A$:
.15,B1,B$:.B1..1500:.1455.Y.I..".";:.BA.
3.L.N..B(254).0.1450..X..B(198).0.1400.
.....KY$:.2200:.RF.1400......KY$.." ".14
00... ..BA.6:.1390......:."FREE BLOCKS =
"B(251).256.B(252);..... 1:.2,RR......B(
198).0.1460......KY$:.2200:.RF.1460.!.R.
..F....".";:.400:@P,24,20.C(B$).2,B$:..P
....1555......100:.2,8,2,"0:FS.HELP SCRE
ENS ":.15,A:.2,NS: 2......A..950:.1550.M
."..2,8,2,"SC.HELP SCREENS ":.BB.9,1:.BB
.30,1: 2:SC.1...,..53272,23:.BB.12,SC:.1
024,32:@P,24,0,"F7,F8,X?...1..B(198).0.1
585.9.6..KY$:.2200:.KY$.".".SC.NS.SC.SC.
1.S.@..KY$.".".SC.1.SC.SC.1.G.J..KY$."X"
..2,0:..Q.T..1580...P..100:.".";:TT$."FO
RMAT A DISKETTE":.400.K....:."HAVE YOU P
LACED THE DISKETTE YOU WISH......"TO FOR
MAT IN THE DRIVE (Y/N)? ";:TY.0:L.1:AC$.
"Y":.550.:....:."..ENTER DISKETTE TITLE?
";:TY.0:L.16:.550.Z. ..BA.27,A$:.A$."".
.560:.2080...*.DT$.A$:.:.".ENTER DISKETT
E ID? ";:TY.0:L.2:.550...>..A$." "..560
:.2110...H.DI$.A$:.:."..THIS WILL ERASE
ANY INFORMATION YOU...R.."MAY HAVE ON TH
IS DISKETTE!!!.).\.."...DO YOU WISH TO C
ONTINUE (Y/N)? ";.D.F.TY.0:L.1:AC$."YN":
.550._.Z.. A$."N".KY$.".":.2210......15,
"N0:".DT$.",".DI$:@P,24,0,"FORMATTING DI
SKETTE.N....15,A,ER$:@P,24,0,ER$:." - PR
ESS ANY KEY";:.200: 15......B(198).0.218
6......A$:KY$.".":.2210.....RF.0:.KY$.."
.".KY$..".".KY$.."."...[...KP$.KY$:KP.KY
:P2.B(2):.198,1:.631,13:XZ.B(211):YZ.B(2
14).....OA.B(BA.LC):.BA.LC,0:@G,24,0,39,
0,TS$......KP$."."..9000:.2208.B...@P,24
,0,".ARE YOU SURE?. ":.200.Z...YA.B(214)
:XA.B(211).....@G,YA,XA,1,0,RS$:@H,RS$,"
YN":.KY.0.2206. ...KY$.KP$:.RS$."Y".2210
.M. .@P,24,0,TS$:TS$."":@P,YZ,XZ,"":.BA.
LC,OA.L...KY.KP:KY$.KP$:.2,P2:RF.1:..S..
. 1......RR.5.XS.1..15,"S0:IN.";NF$:.1,8
,1,"0:IN.".NF$:.B.24: 1.O....2,0:.KY$.".
".KY.RR:.2,RR:.......KY$."."............
..100:.BA.45,NF$:.3300.&...NE.18:.ER$(NE
):.I.1.NE:.ER$(I):.I:..^.&..INVALID CHAR
ACTER,'TO' NOT FOUND,NOT LAST FUNCTION..
.D..BRACKET MISMATCH,NO. OF DECIMALS NOT
SPECIFIED,TOO MANY DECIMALS...B..CONSTA
NT TOO LONG,NOT A NUMBER,ILLEGAL REGISTE
R NUMBER......ILLEGAL DISPLAY NUMBER,ILL
EGAL FIELD NUMBER.T....NUMBER OF DECIMAL
S NOT NEEDED,STRING COMPARES MUST BE IN
()'S......"STRING FOUND, EXPECTING NUMBE
R",TYPE MISMATCH......STRING CANNOT BE P
UT IN REGISTER.H.F.."STRUCTURE ERROR "
...P..MISSING AN APOSTROPHE.....LM.150:.
BA.LC,0:LL.40:DP.250:TT$."ARITHMETIC.A..
.CM$."........_...".G(13).G(141).".":.30
0.E....AR$(LM.1),DI%(NS.1,80,2):.3100...
*..1,8,2,"0:AR.".NF$.",S,R":.15,A:.A.340
0...4.I.0...>.I.I.1:@IN,1,AR$(I):.ST.0.3
390.B.H. 1...R..1,8,2,"0:DP.".NF$.",S,R"
:.15,A...\..A.3480...F..1,A:.A.0.3480...
P.@IL,4,1,X$:A.ST.A.U..I.1.C(X$):A(I).F(
J(X$,I,1)).127:.I.T.V..A(1)..NS.3470.V.Z
.DI%(A(1),0,0).DI%(A(1),0,0).1......I.2.
C(X$).1:DI%(A(1),DI%(A(1),0,0),I.2).A(I)
.1:.I.R...DI%(A(1),DI%(A(1),0,0),I.2).A(
I)......A.0.3440..... 1.....D2.0:.I.1.NS
......".";:.400.3....".NO. OF DISPLAY PO
S'N ON SCREEN"I"?";.Y...Y.B(214):X.B(211
).1:.DI%(I.1,0,0).K.J.TY.1:L.2:.560...O.
.(A.0.A$."0").A.D2.DP.A.80..3530.C.T.D1.
A:D2.D2.D1:DI%(I.1,0,0).A:.A.0.KY$.".".3
690.Q....:.J.1.D1......:."..";:Y1.B(214)
:X1.B(211).&...@P,Y1,X1,"":.I(" ".D(D2.D
1.J),3)".".5)"LINE? ";.U...Y.B(214):X.B(
211):.J(D(DI%(I.1,J,0)),2)" ".V...TY.1:L
.2:.560:.A.1.A.24.3570.....DI%(I.1,J,0).
A:@P,Y,15,"COLUMN? ":Y.B(214):X.B(211).K
....J(D(DI%(I.1,J,1)),2)" ".....TY.1:L.2
:.560:.A.1.A.LL.1.3610.&...DI%(I.1,J,1).
A:@P,Y,27,"LENGTH? ":Y.B(214):X.B(211).B
.8.A.DI%(I.1,J,2):.A.0.A.9.T.B..J(D(A),2
)" "...L.TY.1:L.2:.560:.A.1.A.11.A.DI%(I
.1,J,1).LL.1.3660...V.DI%(I.1,J,2).A:.KY
$.."_".3555...`..J...J..I:XX.0:RV.0:.BA.
LC,64:LN.1:I.1:.4260...O..53247,NF:.5324
6,D2:.1018,105:.53272,CA...P..3710:.4090
.?.~..RR.1.:@P,24,0,"..EDIT MODE.":.200.
C....RR.1.:@P,24,34,".L":.D(I);".";.....
.211,XX:.199,RV:Y.LN.1:X.0:L.LL:TY.0:.65
0:@G,Y,X,L,TY,AR$(I).X....2200:A$.KY$:XX
.B(211):RV.B(199):.2200:.RF.3710......RR
.1.:@P,LN.1,0,AR$(I)......3810.0...PP.B(
251):A.I:I..(I.24).24:.I.23.150.I.150.23
.=....I.0.I.1.T....4260:LN.A.I.1:I.A....
.X$.H(AR$(I),PP.1).".".J(AR$(I),PP,1).".
".J(AR$(I),PP.1)...D.@P,24,0,ER$(B(2)):.
200.A.N.XX.0:@P,LN.1,0,X$.K.X..3715.....
@H,A$,CM$:.KY.0.3720.# ...KY.3870,3880,3
910,3920,4000,4020,3960,3970,4085,3940,3
930.G ...KY.11.3850,3850,3850,3955,3890.
Y ...A$..".".XX.0.Q ..I.I.1:LN.LN.1:.404
0.. ..I.I.1:LN.LN.1:.4040.. (..I.LN.0.I.
1:LN.1:.".";:XX.0:.3710.M -.I.1:LN.1:.42
60:XX.0:.3710.S 2.... F.@P,LN.1,0,"":.BA
.15.'!K..BA.36,I,AR$(I):AR$(LM.1)."":@P,
23,0,AR$(24.LN.I):.4040.U!P.@P,LN.1,0,""
:.BA.12:.BA.33,I,AR$(I):.4040.K!Z..24.LN
.I..LM.4040..!_..BA.21:@P,23,0,AR$(25.LN
.I):I.I.1:.4040.B!D..I.LN..0..BA.18:@P,0
,0,AR$(I.LN):I.I.1.L!N..4040..!S..9100:.
4040..!X.M$.AR$(I):MF.1:.4040.("...MF.1.
AR$(I).M$:@P,LN.1,0,AR$(I):I.I.1:LN.LN.1
.2"...4040.D" ..I.48.LN..LM.C.I.24:I.I.2
5.LN:.4260:I.C:.3710.N"...4040.."...I.23
.LN.0.C.I.24:I.I.LN.23:.4260:I.C:.3710..
"...4040.."H..I.LM.I.I.1:LN.24.P"R..I.0.
I.1:LN.1.."...LN.24.LN.24:.BA.21:@P,23,0
,AR$(I)..#...LN.0.LN.1:.BA.18:@P,0,0,AR$
(I).%#...3710.+#....S#..@P,24,0,".CHECKI
NG STRUCTURE.":.200..#..A.I:.I.1.LM:.BB.
6,AR$(I):.B(2)..0..3740:.4090..#...I:I.A
:.BB.54,LM.1,AR$(0):.B(2).X$.AR$(I):.378
0:.4090.V#...5600:.A$."N".3696..$..@P,24
,0,".STORING MATH.":.200:.15,"S0:DP.".NF
$.&$...1,8,2,"0:DP.".NF$.",S,W.;$...15,A
,B$:.A.4500.D$"..1,D2:.II.1.NS:.DI%(II.1
,0,0).0.4180..$,..J.1.DI%(II.1,0,0):X$.G
(II.1):.K.0.1:X$.X$.G(DI%(II.1,J,K).1).N
$J..K:X$.X$.G(DI%(II.1,J,K)):.1,X$;:.J..
$T..II: 1:.15,A,B$:.A.4500..%^..15,"S0:A
R.".NF$:.1,8,2,"0:AR.".NF$.",S,W"..%R..1
5,A,B$:.A.4500.W%|..II.1.LM:.AR$(II)..""
..BA.27,AR$(II).S%...AR$(II)..""..1,AR$(
II)..%...II: 1:.15,A,B$:.A.0.4250..%...4
500.T%...1,8,2,"AR.".NF$:.BB.3: 1:.B(101
6).255.KY$.".":.2210..&..@P,24,0,"MATH F
ILE TOO LARGE":.200:X$.AR$(I):.3790:.409
0.:&...".";:.J.I.I.23:@P,J.I,0,AR$(J):.J
:..R&.. 1:@P,24,0,"ERROR - ".B$:.200:X$.
AR$(I):.3790:.4090..&..A.B(BA.LC):.BA.LC
,0:@P,24,0,"":.200.S&..@P,24,0,"ARE YOU
SURE(Y/N)? ":L.1:TY.0:AC$."YN":.550..&..
.BA.LC,A:@P,24,0," ":.200:..&'...2,8,2,"
0:SC.".NF$:.BB.30,1: 2:@C,SC$:.BB.48:..A
'L..#2,T$,S$:T.F(T$.G(0)).T'V.S.F(S$.G(0
)):..M'...15,"M-R"G(144);G(2)..'...#15,A
$:S.0:.A$.."".S.F(A$)..'...15,"M-R"G(147
);G(2).F'...#15,A$:T.0:.A$.."".T.F(A$)..
'(..15,"M-R"G(148);G(2)..'2..#15,A$:O.0:
.A$.."".O.F(A$)..(F.O.O.1:.T.0.T.18.)(P.
.15,"U1:";2;0;T;S.;(Z..15,"B-P";2;O.G(D.
.6220:..Q(X..8390.Z(...450..(..X.B(211).
1:Y.B(214):.F(P$.CD$)..32.." ";..(...P$;
..(F..560:..K(..A$.FA$(I):F1.0:S.F(J(A$,
1)).1:.S..SC.F1.1:...(..Y.F(J(A$,2)):X.F
(J(A$,3)):L.F(J(A$,4))..)..TY.F(J(A$,5))
:...) .MD.14.9)!.ZX.RN:.XL.0.RE$(XD).K$.
XB.1.7203.A)"..8900:.A$."N".RE$(XD).K$:.
850:.7210..)#.LV.2:.450:@W,RN,RE$(0):.15
,A,B$:.A.0.7205..)$.MD.22:Q$(22).Q$(23).
B$:.450.P)%.SY.15:.H(RE$(0),1).WA$.SY.12
..)&..B.SY,RN:.XL.0.SY.12.RE$(XD).K$.721
0.&*).XS.1:A$.H(RE$(XD),XL):.BA.27,A$:.B
C.6,A$.?**.RN.ZX:LV.1:MD.0:.450.I*\..735
0.\*Z..B(198).0.7290.}*..A$:@H,A$,MS$(L
V):.KY.0.7290..*..R(104).0..*..@H,A$,MS$
:KY$.A$:K.KY..*...K. 7350,7360,7360,2200
,2200,7830,7480,7720,7630,7630,7440,7400
..*..K.K.12:.K.1.7290.E+...K.8290,8370,8
350,7770,7680,7680,7760,8210,7670,7830,7
980,7500,8200.O+...7290.H+..LV.0:MD.0:RN
..1:XH.0..+..@B,RE$(0):.BA.39,NG:@B,DP$(
0)..+...KY.2.SC.SC.1:.SC.NS.SC.NS:..J+J.
.KY.3.SC.SC.1:.SC.1.SC.1:..X+T..850:.450
..+..OL.LV:LV.2:MD.11:TY.1:L.4:P$.""..,.
..7070:.KY$.".".LV.OL:MD.0:.450.E,..RN..
(E(A$)..5):.RN.0.RN.NR.1.7405.N,...800:M
D.0:LV.1:R(104).1:.250:.7380:...,..MD.12
:LV.2:TY.1:L.3:P$.D(DF.1):.7070:.KY$."."
.7460.C,..A..(A.1):.A.0.A.NF.1.7440.L,..
DF.A..,$.MD.0:LV.0:.450..-8.LV.2:MD.2:.4
50:CD$."..._":K$.RE$(XD):.700.!-:..A$.".
"..7350:..A-=..250:.850:.R(101).0..7200:
..P-?..900:.7482..-L.M.MD:L1.LV:@B,RE$(0
):.J.0.10:CF(J)..1:.:J.0..-Q.MD.19:LV.2:
.450..-U.X.21:Y.24:L.3:TY.1.A-V..560:.KY
$.".".440.S-W..KY$."_".7530..-X.XB.0:I.A
.1:.I.0.I.NF.1.7510...Y..XL.0.I..XD.7515
...Z..8900:.A$."N".7509.E.[.XB.1:.7160:.
F1.1.SC.S:.7380:.7515.F.`.MD.20:.450:.60
0:.KY$.".".440...B.RE$(I).A$:CF(J).I:J.J
.1:.7505...J.@E,RE$(0),TE$(0):.7830:....
~..J.0.7570.X....I.0.J.1:RE$(CF(I)).TE$(
CF(I)):.......BB:.7380:K1.K:K.7:.7200:K.
K1:..;/N.LV.2:MD.1:RN..1:@B,DP$(0):.K.9.
:@B,TE$(0):@E,RE$(0),TE$(0).V/X..7380:CD
$."..._.":.700../Z..A$.".".RE$(I).TE$(I)
:.860:.760:.7642../...A$."."..7350:.../.
..B.9,0:.RN.NR.1.RN..1.LV.0:MD.16:.450..
/...250:.850:.R(101).0.XB.1:.7200:XB.0:.
../...900:.7642.!0..OL.LV:LV.2:MD.15:.45
0:CD$."..._":.700.50...A$."."..7350:..S0
..LV.OL:MD.0:.250:.850:.450.B0...XH.0.76
88.Y0...XL.0.(XF.0.K.6)....0...K.5.XF.XF
.1:.B.18,XF:RN.RN.1:.RN.0.XF.XF.2:.7682.
Q0...K.6.XF.XF.1:.B.18,XF:RN.RN.1..0...K
.5.RN.RN.1:.RN.NR.1.RN.NR.1:...1...K.6.R
N.RN.1:.RN.0.RN.0:..,1...800:.250:LV.1:.
7380.Z1(.MD.13:LV.2:P$."N":TY.0:L.1:AC$.
"YN":.7070.|12..A$.."Y".LV.1:MD.0:.450:.
7745..1<.@M,WA$,RE$(0),1:.250:.850:MD.21
:.7202..1A..860:...1P..XH.0.7769..1Q.XG.
XG.1:A$.RE$(XD):@M,S$,RE$(XD),1:.B.18,XG
..2R..RN.0..2,0:RE$(XD).A$:.7802.-2S..80
0:I$.H(RE$(XD),C(S$)).O2T..I$..S$..2,0:R
E$(XD).A$:.7802.F2U.XF.XG:.250:.7380:..X
2Y.RN.RN.1:.7800..2Z.RN.0:MD.3:LV.2:.735
5..2D.R(104).1:.7870:.SS$.""..7350:..N2X
.MD.7:LV.2:.450:O.1:.B..2Z..B(2)..1.MD.9
:LV.0:XH.0:XB.0:.450..3{..A$:.A$.".".KY$
.".".7350.03}.MD.0:LV.1:.K.11..450:.7760
.N3...800:.250:.7380:.K.6.7760.D3...K.12
..7550:.7760.J3.....3..RN.0:LV.2:MD.4:R(
104).1:.7355:.7780..3..SS$."":NH.0:CD$."
..._...":.700.C3H..A$."."....3M..A$.".".
.8800:A$."_":.KY.16.SS$."":...3N..A$."_"
.7970..4R.B$.RE$(I):.BA.27,B$.64S..B$.""
.B$.H(RE$(I),B(211).X).K4T..B$."".B$.RE$
(I).]4...A$..".".7940.Y4...C(SS$)..0.SS$
.SS$."AND..4..NS$."F":.TY.1.NS$."N"..4..
SS$.SS$.NS$.J(D(I.1),2)."='".B$."'.I4...
760:.7880..4...NH.0.C(SS$)..0.NH.1:SS$.S
S$."AND":.7960..5...C(SS$)..0.SS$.SS$."O
R.H5..NH.1:SS$.SS$."H".J(D(I.1),2)."'".B
$."'":.760:.7880.W5...760:.7880.L5".SS$.
SS$.G(255):...5,.RN.DF:.7440:XD.DF:DF.RN
:RN.0.H56.XL.F(J(FA$(XD),4)):.828.3:@P,2
4,0,"":.200:.XL.12.XL.12..6;.A.61432:.A,
0:.A.1,XD:.A.2,XL.2:.A.3,XL:.BC:@R,0,RE$
(0).>6@.@P,24,0,MS$(2):ZX.0:SS$."F".J(D(
XD.1),2)."='*'".G(255).`6J.RN.ZX:.B:.B(2
)..1.RN..NR.8050..6T.A$.H(RE$(XD),XL):@P
,24,0,A$:.RN.1;:.BC.6,A$:XS.1..6^.ZX.ZX.
1:.8010..6R.LV.0:MD.0:.450.C6. GE.1..6.
@B,RE$(0):LV.2:MD.0:.450:."..";:@B,RE$(0
):.I.FF.NF.1..7. .7160:.F1.8260.(7. DD..
(L.2):.DD.0.DD.1.>7! LN.L:.GE.1.LN.I.1.Z
7" @M,I(D(LN),L),RE$(I),DD.X7: @P,Y,X,RE
$(I):.:@B,RE$(0)..7D GE.0:@P,24,0,".REC
LEN=":.D(LR)" CHARS, # OF RECORDS ="D(NR
);.E7N LV.0:..Q7B .XL.0....7G MD.6:LV.2:
.7355:I.XD:RN.0..8L .7160:.F1.1.SC.S:.73
80:.8300.-8V .600:.KY$."."..2,0:.7802.Z8
. S$.H(A$,XL):.BA.27,S$:.S$."".S$.H(A$,X
L).~8. .BC.3,S$:XH.1:XF.KY:XG.XF:.7802..
8. .LV.0..9000:.450..8. @P,24,0,"":.200:
.9000:.450..8. ...8F TT$."ENTER/EDIT":.1
00:.BA.45,NF$:.300..8P .9.4096.7.256,255
.-9Z SL.254:O.1:SN.0:RT.53242:NG.105:LM.
24:.AR$(LM.1).G9. CD$.".".G(13).G(141):S
R$."....":DF.0:FR.11.4096.9.256..9. CU$.
".":KY.0:KY$." "."":CM$."><=>=<>.R9. MS$
(0).G(222).".....IACA,E,F,G,I,P,S,^,=":R
E.0:OT.0:OF.0:OS.0..9. MS$(1)." .....ICE
A,C,D,E,G,P,S,+,-,= ".(:. MS$(2)."
".R:.!MS$.".....A
CDEEFGIRPS+- ^=AIC".G(222).^: !.BB.9,1.U
:>!.1,8,2,"0:FS.".NF$..:H!@P,24,0,"FOUND
FILE LOADING.....:R!.1,NS,NF,CA,LR,NR..
:\!.FA$(NF.1),RE$(NF.1),TE$(NF.1),R(NG):
.RT.5,NF:.1018,NG..;F!.RT.1,.(LR.256):.R
T,LR.(256..(LR.256)).A;P!.RT.3,.(NR.256)
:.RT.2,NR.(256..(NR.256)).Z;Z!.1,SC$:.1,
P1$:.1,P2$..;.!.I.0.NF.1:@IL,5,1,FA$(I):
.FR.I,F(J(FA$(I),4,1)):.I..;.! 1:.5860.X
;.!A$."IN.".NF$:@L;A$:.ST.64..BC:XL.B(BC
.12):XD.B(BC.10)..<T!ND.0:.1,8,2,"AR.".N
F$:.15,A:.A.8720..<Y!.BB.3: 1.9<.!.1,8,2
,"DP.".NF$:.1,ND:.DA$(ND),DP$(ND).X<.".I
.0.ND.1:@IL,4,1,DA$(I):...<." 1:.RT.4,ND
: 15:@L;"BM.".NF$,"FF00"..<.".2,8,2,"#":
.3,8,5,"0:BM.".NF$: 3.E<.".15,8,15:.6400
:MT.T:MS.S: 2..<." 15:@L;"TS.".NF$,"BA00
"..=$".1,8,2,"#":.BA.30,RE$(0):.BA.30,TE
$(0).*=.".Q$(23):.RT.2,MT:.RT.1,MS.K=3"Q
$(00)." "..=8"Q$(1)."E
NTER":Q$(2)."CHANGE":Q$(3)."SEARCH":Q$(4
)."ACCUMULATE.N=B"Q$(5)."":Q$(6)."INDEX"
:Q$(7)."SEARCHING":Q$(8)."ACCUMULATING..
=L"Q$(9)."RECORD NOT FOUND":Q$(10)."".->
M"Q$(11)."ENTER RECORD NUMBER?":Q$(12)."
FIELD NUMBER?.H>N"Q$(13)."DELETE - ARE Y
OU SURE?":Q$(14)."STORING RECORD..>O"Q$(
15)."CALCULATE":Q$(16).".FILE FULL..T>P"
Q$(18)."":Q$(19)."CHANGE FIELD NUMBER?":
Q$(20)."ENTER CHANGE..?Q"Q$(21)."DELETIN
G RECORD":Q$(23).".DISK ERROR. - ".-?V"S
C.1:.15,8,15:.53272,CA:. 7260.U?`".".";:
@P,24,0,"SEARCH STRING EDITOR.}?J"CM$.".
.......___.".G(13).G(141)."....?T".I.1.L
M:@P,I.1,0,AR$(I):.I.C?Y"TY.0:LL.40:LN.1
:I.1:XX.0:.BA.LC,64..?~".3710:SS$."":.I.
1.LM:A$.AR$(I):.BA.27,A$..@.".C(A$).C(SS
$).254.8860.(@."SS$.SS$.A$:.I:.BA.LC,0:.
.X@."@P,24,0,"SEARCH STRING TOO LONG":.2
00:.8820.|@D".198,1:.631,13:@G,24,0,39,0
,AA$..@N"@P,24,0,"INDEX FIELD ALTERED, A
RE YOU SURE? ":.200..@X"AC$."YN":L.1:TY.
0:.550:@P,24,0,AA$:...@(#.198,0:.9050:.K
Y$."."....A-#.4,4,(B(53272).2).3.5.8A2#.
ZI.1.2:.4:.:@D:.ZI.1.4:.4:.: 4:..PAZ#.4,
4:.4:.ST..0. 4:...A_# 4:@P,24,0,"READY P
RINTER AND PRESS SPACE":.200..AD#.B(198)
.0.9060..AI#@P,24,0,"":.200.MAN#.KY$:.KY
$.." ".KY$.."."..2200..AS#.KY$."."....AX
#.9050..A.#.9050:.KY$."."....B.#.4,4:PL.
66:.9500.9B.#.JJ.1.LM:.AR$(JJ)..""..BA.2
7,AR$(JJ).NB #.AR$(JJ)."".9140.FB.#.CO.6
3..10750:.9500..B.#.4,AR$(JJ):CO.CO.1:.K
Y$:.2200..B.#.JJ:.10750..B.#CO.1:.II.1.N
S.2..BH#.10500..B.#.J.1.B:A.II:.11030:.I
I.1..NS.A.II.1:.11030..C.#.CO.63..10750:
CO.1:.10500..C.#.KY$:.2200.,C.#.J:PL.33:
.CO.30.PL.66.OC.#.10750:CO..(PL.66).1:PL
.66:.II.AC.$.CO.34..10750.UC.$ 4:KY$." "
."":...C.%.4,"ARITHMETIC FOR FILE..."NF$
:.4:CO.3:..WC.'C.52.2.(.((A.1).2.1).2..(
A.2).2):.C.D..4:CO.CO.1..D.'.BA.27,A$:.4
,A$;.40.C(A$)):.C..48..4:CO.CO.1..D$'D.C
:..6D.)A.II:.11000:A.A.1:.A..NS..11000.E
D.).4:CO.CO.1.ID.)A.II:.11020:A.A.1:.A..
NS..11020..D")B.DI%(II.1,0,0):.II.1.NS.1
0550..D,).B.DI%(II,0,0).B.DI%(II,0,0)..D
6)..JD.).JK.CO.PL:.4:.JK:...E.*A$.D(DI%(
A.1,0,0))." DISPLAY POSITIONS ON SCREEN"
.D(A)..E.+.10000:..EE.+A$."NUMBER LINE
COLUMN LENGTH":.10000:..EE.+A$."":
.J.DI%(A.1,0,0).11045..E.+.K.0.2:B$.D(DI
%(A.1,J,K)):.E(B$).0.B$." "..E +A$.A$.I(
" ".B$,10):.K..E"+T.0:.K.0.A.2:
T.T.DI%(K,0,0):.:T.T.J:@M,D(T),A$,6.C(D(
T))..F#+.A.1.:@M,D(J)." ",A$,6.C(D(J)).
$F%+.10000:..^F.. 1:.1,9,15,"S0:64.ARITH
EDIT": 1:."0:64.ARITHEDIT",9:...F". 1:.1
,8,15,"S0:64.ARITHEDIT": 1:."0:64.ARITHE
DIT",8:....
> CLICK IMAGE PREVIEW FOR FULL MODAL