home *** CD-ROM | disk | FTP | other *** search
/ ARM Club 1 / ARM_CLUB_CD.iso / contents / comdemos / progs / datavision / !DataVis / !dv4 < prev    next >
Unknown  |  1992-09-05  |  15.9 KB

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text


This file was not able to be converted.
This format is not currently supported by dexvert.

ConfidenceProgramDetectionMatch TypeSupport
10% dexvert Truevision Targa Graphic (image/tga) magic Supported
100% file data default
100% xdgMime image/x-tga default (weak)



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 17 f4 20 3e 20 | 24 2e 21 44 61 74 61 56 |..... > |$.!DataV|
|00000010| 69 73 2e 21 64 76 34 0d | 00 0f 1e c8 99 20 22 57 |is.!dv4.|..... "W|
|00000020| 69 6d 70 5f 43 6f 6d 6d | 61 6e 64 57 69 6e 64 6f |imp_Comm|andWindo|
|00000030| 77 22 2c 2d 31 0d 00 14 | 10 eb 20 31 35 3a fb 20 |w",-1...|.. 15:. |
|00000040| 31 38 30 3a db 0d 00 1e | 0b ee 85 e5 8d 74 7c 4c |180:....|.....t|L|
|00000050| 0d 00 28 12 c8 97 20 ee | 3a 87 3a 46 47 25 3d 31 |..(... .|:.:FG%=1|
|00000060| 38 30 0d 00 32 0c de 4d | 45 24 28 32 30 29 0d 00 |80..2..M|E$(20)..|
|00000070| 3c 6b de 4d 41 43 24 28 | 39 39 29 3a de 4d 41 4c |<k.MAC$(|99):.MAL|
|00000080| 24 28 39 39 29 3a 4d 41 | 49 25 3d 30 3a 56 41 25 |$(99):MA|I%=0:VA%|
|00000090| 3d 31 3a de 4f 50 24 28 | 38 29 3a 53 50 4d 24 3d |=1:.OP$(|8):SPM$=|
|000000a0| 22 30 20 30 20 20 30 30 | 30 30 30 30 22 3a de 46 |"0 0 00|0000":.F|
|000000b0| 55 24 28 35 29 3a e3 49 | 3d 31 b8 38 3a f3 4f 50 |U$(5):.I|=1.8:.OP|
|000000c0| 24 28 49 29 3a ed 49 3a | e3 49 3d 31 b8 35 3a f3 |$(I):.I:|.I=1.5:.|
|000000d0| 46 55 24 28 49 29 3a ed | 49 0d 00 46 6d dc 22 54 |FU$(I):.|I..Fm."T|
|000000e0| 65 78 74 22 2c 22 4d 75 | 6c 74 69 2d 54 65 78 74 |ext","Mu|lti-Text|
|000000f0| 22 2c 22 50 6f 70 2d 75 | 70 20 57 69 6e 64 6f 77 |","Pop-u|p Window|
|00000100| 22 2c 22 44 65 66 61 75 | 6c 74 20 56 61 6c 75 65 |","Defau|lt Value|
|00000110| 22 2c 22 52 61 6e 67 65 | 20 43 68 65 63 6b 22 2c |","Range| Check",|
|00000120| 22 52 65 71 75 69 72 65 | 64 20 56 61 6c 75 65 73 |"Require|d Values|
|00000130| 22 2c 22 52 6f 75 6e 64 | 69 6e 67 22 2c 22 46 6f |","Round|ing","Fo|
|00000140| 72 6d 75 6c 61 22 0d 00 | 50 22 dc 22 53 55 4d 22 |rmula"..|P"."SUM"|
|00000150| 2c 22 41 56 47 22 2c 22 | 4d 41 58 22 2c 22 4d 49 |,"AVG","|MAX","MI|
|00000160| 4e 22 2c 22 53 54 44 22 | 0d 00 5a 66 ff 22 43 4c |N","STD"|..Zf."CL|
|00000170| 4f 53 45 22 3a 58 3d ad | a4 4d 79 46 69 6c 65 28 |OSE":X=.|.MyFile(|
|00000180| 22 4e 49 4d 22 29 3a e8 | 23 58 2c 46 49 24 2c 53 |"NIM"):.|#X,FI$,S|
|00000190| 54 24 2c 44 41 24 2c 44 | 52 24 2c 5a 5a 24 2c 4d |T$,DA$,D|R$,ZZ$,M|
|000001a0| 44 24 3a ff 22 43 4c 4f | 53 45 22 3a 46 4f 24 3d |D$:."CLO|SE":FO$=|
|000001b0| 46 49 24 2b 22 41 22 3a | 53 54 24 3d 22 31 22 3a |FI$+"A":|ST$="1":|
|000001c0| 53 54 4f 24 3d 53 54 24 | 3a e5 8d 44 4e 42 0d 00 |STO$=ST$|:..DNB..|
|000001d0| 64 10 dd f2 4d 41 49 4e | 3a 67 6f 25 3d 30 0d 00 |d...MAIN|:go%=0..|
|000001e0| 6e 41 e7 53 54 24 3d 22 | 31 22 8c 20 54 41 24 3d |nA.ST$="|1". TA$=|
|000001f0| 46 49 24 2b 22 4e 22 3a | 58 3d ad a4 4d 79 46 69 |FI$+"N":|X=..MyFi|
|00000200| 6c 65 28 54 41 24 29 3a | e8 23 58 2c 44 49 24 3a |le(TA$):|.#X,DI$:|
|00000210| f2 44 69 72 28 44 49 24 | 29 3a e5 8d 74 6a 40 0d |.Dir(DI$|):..tj@.|
|00000220| 00 78 09 e5 8d 74 4c 40 | 0d 00 82 61 f2 45 52 57 |.x...tL@|...a.ERW|
|00000230| 49 4e 3a fb 31 38 30 3a | f1 8a 32 30 2c 31 32 29 |IN:.180:|..20,12)|
|00000240| 3b 22 43 61 6e 6e 6f 74 | 20 72 65 61 64 20 74 68 |;"Cannot| read th|
|00000250| 65 20 66 69 6c 65 20 3a | 22 3b 46 49 24 3b 8a 32 |e file :|";FI$;.2|
|00000260| 30 2c 31 34 29 3b 22 28 | 66 69 6c 65 20 65 6d 70 |0,14);"(|file emp|
|00000270| 74 79 29 22 3a fb 46 47 | 25 3a ef 37 3a f2 4d 4b |ty)":.FG|%:.7:.MK|
|00000280| 4c 49 4b 3a e5 8d 74 40 | 4c 0d 00 8c 37 e7 53 54 |LIK:..t@|L...7.ST|
|00000290| 24 3d 22 32 22 8c 20 54 | 41 24 3d 46 49 24 2b 22 |$="2". T|A$=FI$+"|
|000002a0| 4e 22 3a 58 3d ad a4 4d | 79 46 69 6c 65 28 54 41 |N":X=..M|yFile(TA|
|000002b0| 24 29 3a e8 23 58 2c 44 | 49 24 3a e5 8d 74 6a 40 |$):.#X,D|I$:..tj@|
|000002c0| 0d 00 96 35 dd f2 4d 4b | 4c 49 4b 3a f5 3a c8 97 |...5..MK|LIK:.:..|
|000002d0| 20 55 2c 55 2c 42 55 54 | 3a fd 42 55 54 3d 30 3a | U,U,BUT|:.BUT=0:|
|000002e0| f5 3a c8 97 20 55 2c 55 | 2c 42 55 54 3a fd 42 55 |.:.. U,U|,BUT:.BU|
|000002f0| 54 3d 34 3a e1 0d 00 a0 | 31 dd f2 45 52 57 49 4e |T=4:....|1..ERWIN|
|00000300| 3a 58 3d 31 39 3a 59 3d | 31 31 3a 57 25 3d 34 30 |:X=19:Y=|11:W%=40|
|00000310| 3a 4c 25 3d 33 3a fb 31 | 38 30 3a f2 4c 57 4e 3a |:L%=3:.1|80:.LWN:|
|00000320| fb 46 47 25 3a e1 0d 00 | aa 75 d9 23 30 3a 58 3d |.FG%:...|.u.#0:X=|
|00000330| ad a4 4d 79 46 69 6c 65 | 28 46 4f 24 29 3a cf 23 |..MyFile|(FO$):.#|
|00000340| 58 3d 30 3a e8 23 58 2c | 5a 5a 24 3a 4e 4f 46 25 |X=0:.#X,|ZZ$:NOF%|
|00000350| 3d bb 28 5a 5a 24 29 3a | cf 23 58 3d 35 3a e8 23 |=.(ZZ$):|.#X=5:.#|
|00000360| 58 2c 5a 5a 24 3a 4e 4f | 52 25 3d bb 28 5a 5a 24 |X,ZZ$:NO|R%=.(ZZ$|
|00000370| 29 3a cf 23 58 3d 31 35 | 3a e8 23 58 2c 5a 5a 24 |):.#X=15|:.#X,ZZ$|
|00000380| 3a 52 45 43 25 3d bb 28 | 5a 5a 24 29 3a cf 23 58 |:REC%=.(|ZZ$):.#X|
|00000390| 3d 34 35 3a e8 23 58 2c | 53 4f 24 0d 00 b4 3b cf |=45:.#X,|SO$...;.|
|000003a0| 23 58 3d 32 38 3a e8 23 | 58 2c 56 41 24 3a e7 56 |#X=28:.#|X,VA$:.V|
|000003b0| 41 24 3d 22 30 22 8c 54 | 41 24 3d 46 49 24 2b 22 |A$="0".T|A$=FI$+"|
|000003c0| 45 22 3a 4e 3d ae a4 4d | 79 46 69 6c 65 28 54 41 |E":N=..M|yFile(TA|
|000003d0| 24 29 3a d9 23 4e 0d 00 | be 19 e7 56 41 24 3d 22 |$):.#N..|...VA$="|
|000003e0| 31 22 8c 4d 41 49 25 3d | 31 3a e5 8d 64 52 40 0d |1".MAI%=|1:..dR@.|
|000003f0| 00 c8 0b 67 6f 25 3d 31 | 3a e1 0d 00 d2 88 54 41 |...go%=1|:.....TA|
|00000400| 24 3d 46 49 24 2b 22 45 | 22 3a ff 22 43 4c 4f 53 |$=FI$+"E|":."CLOS|
|00000410| 45 22 3a 58 3d ad a4 4d | 79 46 69 6c 65 28 54 41 |E":X=..M|yFile(TA|
|00000420| 24 29 3a e8 23 58 2c 4d | 41 43 24 28 30 29 3a e8 |$):.#X,M|AC$(0):.|
|00000430| 23 58 2c 4d 41 4c 24 28 | 30 29 3a e3 49 3d 31 b8 |#X,MAL$(|0):.I=1.|
|00000440| bb 28 c0 4d 41 43 24 28 | 30 29 2c 32 29 29 3a e8 |.(.MAC$(|0),2)):.|
|00000450| 23 58 2c 4d 41 43 24 28 | 49 29 3a e8 23 58 2c 4d |#X,MAC$(|I):.#X,M|
|00000460| 41 4c 24 28 49 29 3a ed | 49 3a 56 41 25 3d 49 3a |AL$(I):.|I:VA%=I:|
|00000470| 53 50 4d 24 3d 4d 41 43 | 24 28 30 29 3a e5 8d 64 |SPM$=MAC|$(0):..d|
|00000480| 48 40 0d 00 dc 0c dd f2 | 46 4f 50 4f 55 54 0d 00 |H@......|FOPOUT..|
|00000490| e6 2e ff 22 43 4c 4f 53 | 45 22 3a 58 3d ad a4 4d |..."CLOS|E":X=..M|
|000004a0| 79 46 69 6c 65 28 46 4f | 24 29 3a 50 4f 49 3d 28 |yFile(FO|$):POI=(|
|000004b0| 43 46 25 2d 31 29 2a 36 | 31 2b 36 33 0d 00 f0 13 |CF%-1)*6|1+63....|
|000004c0| cf 23 58 3d 50 4f 49 3a | e8 23 58 2c 46 4c 24 0d |.#X=POI:|.#X,FL$.|
|000004d0| 00 fa 20 cf 23 58 3d 50 | 4f 49 2b 32 32 3a e8 23 |.. .#X=P|OI+22:.#|
|000004e0| 58 2c 5a 5a 24 3a 58 31 | 3d bb 28 5a 5a 24 29 0d |X,ZZ$:X1|=.(ZZ$).|
|000004f0| 01 04 20 cf 23 58 3d 50 | 4f 49 2b 32 36 3a e8 23 |.. .#X=P|OI+26:.#|
|00000500| 58 2c 5a 5a 24 3a 59 31 | 3d bb 28 5a 5a 24 29 0d |X,ZZ$:Y1|=.(ZZ$).|
|00000510| 01 0e 20 cf 23 58 3d 50 | 4f 49 2b 33 30 3a e8 23 |.. .#X=P|OI+30:.#|
|00000520| 58 2c 5a 5a 24 3a 58 32 | 3d bb 28 5a 5a 24 29 0d |X,ZZ$:X2|=.(ZZ$).|
|00000530| 01 18 20 cf 23 58 3d 50 | 4f 49 2b 33 34 3a e8 23 |.. .#X=P|OI+34:.#|
|00000540| 58 2c 5a 5a 24 3a 59 32 | 3d bb 28 5a 5a 24 29 0d |X,ZZ$:Y2|=.(ZZ$).|
|00000550| 01 22 16 cf 23 58 3d 50 | 4f 49 2b 33 38 3a e8 23 |."..#X=P|OI+38:.#|
|00000560| 58 2c 54 59 24 0d 01 2c | 21 cf 23 58 3d 50 4f 49 |X,TY$..,|!.#X=POI|
|00000570| 2b 34 31 3a e8 23 58 2c | 5a 5a 24 3a 49 4e 25 3d |+41:.#X,|ZZ$:IN%=|
|00000580| bb 28 5a 5a 24 29 0d 01 | 36 21 cf 23 58 3d 50 4f |.(ZZ$)..|6!.#X=PO|
|00000590| 49 2b 34 36 3a e8 23 58 | 2c 5a 5a 24 3a 54 49 25 |I+46:.#X|,ZZ$:TI%|
|000005a0| 3d bb 28 5a 5a 24 29 0d | 01 40 16 cf 23 58 3d 50 |=.(ZZ$).|.@..#X=P|
|000005b0| 4f 49 2b 35 34 3a e8 23 | 58 2c 54 52 24 0d 01 4a |OI+54:.#|X,TR$..J|
|000005c0| 16 cf 23 58 3d 50 4f 49 | 2b 35 38 3a e8 23 58 2c |..#X=POI|+58:.#X,|
|000005d0| 4e 50 24 0d 01 54 05 e1 | 0d 01 5e 09 dd f2 4c 57 |NP$..T..|..^...LW|
|000005e0| 4e 0d 01 68 79 f1 8a 58 | 2c 59 29 3b bd 28 31 35 |N..hy..X|,Y);.(15|
|000005f0| 34 29 3b c4 57 25 2c bd | 28 31 35 39 29 29 3b bd |4);.W%,.|(159));.|
|00000600| 28 31 35 38 29 3a e3 49 | 3d 59 2b 31 b8 59 2b 4c |(158):.I|=Y+1.Y+L|
|00000610| 25 3a f1 8a 58 2c 49 29 | 3b bd 28 31 35 35 29 3b |%:..X,I)|;.(155);|
|00000620| c4 57 25 2c 22 20 22 29 | 3b bd 28 31 35 37 29 3a |.W%," ")|;.(157):|
|00000630| ed 49 3a f1 8a 58 2c 59 | 2b 28 4c 25 2b 31 29 29 |.I:..X,Y|+(L%+1))|
|00000640| 3b bd 28 31 35 36 29 3b | c4 57 25 2c bd 28 31 36 |;.(156);|.W%,.(16|
|00000650| 30 29 29 3b bd 28 31 36 | 31 29 0d 01 72 05 e1 0d |0));.(16|1)..r...|
|00000660| 01 7c 0a dd f2 54 49 4d | 45 0d 01 86 5e 53 25 3d |.|...TIM|E...^S%=|
|00000670| 28 91 20 81 31 30 30 29 | 83 36 30 3a 4d 25 3d 28 |(. .100)|.60:M%=(|
|00000680| 91 20 81 36 30 30 30 29 | 83 36 30 3a 48 25 3d 28 |. .6000)|.60:H%=(|
|00000690| 91 20 81 33 36 30 30 30 | 30 29 83 32 34 3a f1 8a |. .36000|0).24:..|
|000006a0| 37 33 2c 30 29 3b 22 3a | 22 3b 8a 37 36 2c 30 29 |73,0);":|";.76,0)|
|000006b0| 3b 22 3a 22 3a e7 53 25 | 3c 31 30 8c f1 8a 37 37 |;":":.S%|<10...77|
|000006c0| 2c 30 29 3b 22 30 22 0d | 01 90 16 e7 4d 25 3c 31 |,0);"0".|....M%<1|
|000006d0| 30 8c f1 8a 37 34 2c 30 | 29 3b 22 30 22 0d 01 9a |0...74,0|);"0"...|
|000006e0| 16 e7 48 25 3c 31 30 8c | f1 8a 37 31 2c 30 29 3b |..H%<10.|..71,0);|
|000006f0| 22 30 22 0d 01 a4 3d f1 | 8a 37 33 2d a9 28 c3 28 |"0"...=.|.73-.(.(|
|00000700| 48 25 29 29 2c 30 29 3b | 48 25 3b 8a 37 36 2d a9 |H%)),0);|H%;.76-.|
|00000710| 28 c3 28 4d 25 29 29 2c | 30 29 3b 4d 25 3b 8a 37 |(.(M%)),|0);M%;.7|
|00000720| 39 2d a9 28 c3 28 53 25 | 29 29 2c 30 29 3b 53 25 |9-.(.(S%|)),0);S%|
|00000730| 0d 01 ae 05 e1 0d 01 b8 | 0a dd f2 54 45 58 54 0d |........|...TEXT.|
|00000740| 01 c2 0d 54 24 3d 22 22 | 3a 4c 3d 30 0d 01 cc 17 |...T$=""|:L=0....|
|00000750| e7 4c 3c 4c 25 8c f1 8a | 58 2c 59 29 3b bd 28 32 |.L<L%...|X,Y);.(2|
|00000760| 35 35 29 0d 01 d6 08 49 | 4e 3d a5 0d 01 e0 16 e7 |55)....I|N=......|
|00000770| 49 4e 3d 31 33 8c 4e 50 | 25 3d 30 3a e5 8d 54 7a |IN=13.NP|%=0:..Tz|
|00000780| 42 0d 01 ea 11 e7 49 4e | 3d 31 32 37 8c e5 8d 54 |B.....IN|=127...T|
|00000790| 5c 42 0d 01 f4 15 e7 49 | 4e 3d 39 8c 4e 50 25 3d |\B.....I|N=9.NP%=|
|000007a0| 31 3a e5 8d 54 7a 42 0d | 01 fe 0f e7 4c 3d 4c 25 |1:..TzB.|....L=L%|
|000007b0| 8c e5 8d 64 56 41 0d 02 | 08 28 f1 8a 58 2c 59 29 |...dVA..|.(..X,Y)|
|000007c0| 3b bd 28 49 4e 29 3a 54 | 24 3d 54 24 2b bd 28 49 |;.(IN):T|$=T$+.(I|
|000007d0| 4e 29 3a 4c 3d 4c 2b 31 | 3a 58 3d 58 2b 31 0d 02 |N):L=L+1|:X=X+1..|
|000007e0| 12 09 e5 8d 64 4c 41 0d | 02 1c 0e e7 4c 3d 30 8c |....dLA.|....L=0.|
|000007f0| e5 8d 64 42 41 0d 02 26 | 24 f1 8a 58 2c 59 29 3b |..dBA..&|$..X,Y);|
|00000800| 22 20 22 3a 58 3d 58 2d | 31 3a 4c 3d 4c 2d 31 3a |" ":X=X-|1:L=L-1:|
|00000810| 54 24 3d c0 54 24 2c 4c | 29 0d 02 30 09 e5 8d 64 |T$=.T$,L|)..0...d|
|00000820| 4c 41 0d 02 3a 0e f1 8a | 58 2c 59 29 3b 22 20 22 |LA..:...|X,Y);" "|
|00000830| 0d 02 44 05 e1 0d 02 4e | 09 f2 4d 41 49 4e 0d 02 |..D....N|..MAIN..|
|00000840| 58 54 58 3d 34 37 3a 59 | 3d 31 33 3a 57 25 3d 32 |XTX=47:Y|=13:W%=2|
|00000850| 32 3a 4c 25 3d 35 3a f2 | 4c 57 4e 3a 53 45 51 3d |2:L%=5:.|LWN:SEQ=|
|00000860| 31 3a 46 49 45 4c 44 3d | 53 45 51 3a 59 45 41 52 |1:FIELD=|SEQ:YEAR|
|00000870| 3d 53 45 51 3a 44 41 59 | 3d 53 45 51 3a 4d 4f 4e |=SEQ:DAY|=SEQ:MON|
|00000880| 54 48 3d 53 45 51 3a 51 | 55 41 52 54 45 52 3d 53 |TH=SEQ:Q|UARTER=S|
|00000890| 45 51 0d 02 62 0a 4d 46 | 59 25 3d 30 0d 02 6c 8a |EQ..b.MF|Y%=0..l.|
|000008a0| 4d 45 24 28 31 29 3d 22 | 43 72 65 61 74 65 20 4d |ME$(1)="|Create M|
|000008b0| 61 63 72 6f 22 3a 4d 45 | 24 28 32 29 3d 22 45 72 |acro":ME|$(2)="Er|
|000008c0| 61 73 65 20 4d 61 63 72 | 6f 22 3a 4d 45 24 28 33 |ase Macr|o":ME$(3|
|000008d0| 29 3d 22 45 72 61 73 65 | 20 61 6c 6c 20 4d 61 63 |)="Erase| all Mac|
|000008e0| 72 6f 73 22 3a 4d 45 24 | 28 34 29 3d 22 45 6e 74 |ros":ME$|(4)="Ent|
|000008f0| 72 79 20 43 6f 6e 66 69 | 67 75 72 61 74 69 6f 6e |ry Confi|guration|
|00000900| 22 3a 4d 45 24 28 35 29 | 3d 22 51 75 69 74 22 3a |":ME$(5)|="Quit":|
|00000910| 58 3d 34 38 3a 59 3d 31 | 34 3a 4c 25 3d 35 3a f2 |X=48:Y=1|4:L%=5:.|
|00000920| 53 45 4c 45 43 54 0d 02 | 76 19 e7 53 45 4c 25 3d |SELECT..|v..SEL%=|
|00000930| 31 20 80 56 41 25 3c 39 | 39 8c e5 8d 74 7c 42 0d |1 .VA%<9|9...t|B.|
|00000940| 02 80 11 e7 53 45 4c 25 | 3d 35 8c e5 8d 64 74 4b |....SEL%|=5...dtK|
|00000950| 0d 02 8a 11 e7 53 45 4c | 25 3d 34 8c e5 8d 74 56 |.....SEL|%=4...tV|
|00000960| 45 0d 02 94 11 e7 53 45 | 4c 25 3d 32 8c e5 8d 44 |E.....SE|L%=2...D|
|00000970| 5a 4a 0d 02 9e 11 e7 53 | 45 4c 25 3d 33 8c e5 8d |ZJ.....S|EL%=3...|
|00000980| 64 4c 4b 0d 02 a8 09 e5 | 8d 44 6c 42 0d 02 b2 05 |dLK.....|.DlB....|
|00000990| fa 0d 02 bc ba db 3a f1 | 8a 32 2c 32 29 3b 22 43 |......:.|.2,2);"C|
|000009a0| 72 65 61 74 65 20 4d 61 | 63 72 6f 20 4e 6f 2e 20 |reate Ma|cro No. |
|000009b0| 22 3b 56 41 25 3b 8a 32 | 2c 33 29 3b c4 31 39 2c |";VA%;.2|,3);.19,|
|000009c0| bd 28 32 34 31 29 29 3a | f2 53 45 4c 3a 58 3d 32 |.(241)):|.SEL:X=2|
|000009d0| 3a 59 3d 34 3a 57 25 3d | 32 34 3a 4c 25 3d 34 3a |:Y=4:W%=|24:L%=4:|
|000009e0| f2 4c 57 4e 3a f1 8a 33 | 2c 35 29 3b 22 20 20 53 |.LWN:..3|,5);" S|
|000009f0| 65 6c 65 63 74 20 45 78 | 65 63 75 74 65 20 50 6f |elect Ex|ecute Po|
|00000a00| 69 6e 74 3a 22 3a 4d 45 | 24 28 31 29 3d 22 4f 6e |int:":ME|$(1)="On|
|00000a10| 20 45 6e 74 72 79 22 3a | 4d 45 24 28 32 29 3d 22 | Entry":|ME$(2)="|
|00000a20| 4f 6e 20 45 78 69 74 22 | 3a 4d 45 24 28 33 29 3d |On Exit"|:ME$(3)=|
|00000a30| 22 51 75 69 74 22 3a 58 | 3d 33 3a 59 3d 36 3a 4c |"Quit":X|=3:Y=6:L|
|00000a40| 25 3d 33 3a f2 53 45 4c | 45 43 54 0d 02 c6 11 e7 |%=3:.SEL|ECT.....|
|00000a50| 53 45 4c 25 3d 33 8c e5 | 8d 44 58 42 0d 02 d0 2f |SEL%=3..|.DXB.../|
|00000a60| e7 53 45 4c 25 3d 31 8c | 4d 4f 41 24 3d 22 31 31 |.SEL%=1.|MOA$="11|
|00000a70| 31 30 30 30 30 31 22 3a | 41 43 54 24 3d 22 49 22 |100001":|ACT$="I"|
|00000a80| 3a 4c 25 3d 37 3a e5 8d | 64 6e 42 0d 02 da 30 e7 |:L%=7:..|dnB...0.|
|00000a90| 53 45 4c 25 3d 32 8c 4d | 4f 41 24 3d 22 31 31 31 |SEL%=2.M|OA$="111|
|00000aa0| 31 31 31 31 30 22 3a 41 | 43 54 24 3d 22 4f 22 3a |11110":A|CT$="O":|
|00000ab0| 4c 25 3d 31 30 3a e5 8d | 64 6e 42 0d 02 e4 09 e5 |L%=10:..|dnB.....|
|00000ac0| 8d 64 46 42 0d 02 ee 53 | cf 23 41 3d 28 53 46 25 |.dFB...S|.#A=(SF%|
|00000ad0| 2d 31 29 2a 36 31 2b 31 | 31 37 3a e8 23 41 2c 43 |-1)*61+1|17:.#A,C|
|00000ae0| 48 24 3a e7 41 43 54 24 | 3d 22 49 22 80 c0 43 48 |H$:.ACT$|="I"..CH|
|00000af0| 24 2c 31 29 3d 22 31 22 | 84 c0 43 48 24 2c 31 29 |$,1)="1"|..CH$,1)|
|00000b00| 3d 22 32 22 8c d4 31 2c | 2d 31 35 2c 32 30 30 2c |="2"..1,|-15,200,|
|00000b10| 32 3a e5 8d 44 58 42 0d | 02 f8 38 e7 41 43 54 24 |2:..DXB.|..8.ACT$|
|00000b20| 3d 22 4f 22 80 c2 43 48 | 24 2c 31 29 3d 22 31 22 |="O"..CH|$,1)="1"|
|00000b30| 84 c2 43 48 24 2c 31 29 | 3d 22 32 22 8c d4 31 2c |..CH$,1)|="2"..1,|
|00000b40| 2d 31 35 2c 32 30 30 2c | 32 3a e5 8d 44 58 42 0d |-15,200,|2:..DXB.|
|00000b50| 03 02 3f 58 3d 32 3a 59 | 3d 31 30 3a 57 25 3d 33 |..?X=2:Y|=10:W%=3|
|00000b60| 32 3a f2 4c 57 4e 3a f1 | 8a 33 2c 31 31 29 3b 22 |2:.LWN:.|.3,11);"|
|00000b70| 4d 61 63 72 6f 20 4f 70 | 74 69 6f 6e 73 20 41 76 |Macro Op|tions Av|
|00000b80| 61 69 6c 61 62 6c 65 3a | 22 3a 4c 3d 31 33 0d 03 |ailable:|":L=13..|
|00000b90| 0c 32 e3 49 3d 31 b8 31 | 35 3a e7 c1 4d 4f 41 24 |.2.I=1.1|5:..MOA$|
|00000ba0| 2c 49 2c 31 29 3d 22 31 | 22 8c 4d 45 24 28 4c 2d |,I,1)="1|".ME$(L-|
|00000bb0| 31 32 29 3d 4f 50 24 28 | 49 29 3a 4c 3d 4c 2b 31 |12)=OP$(|I):L=L+1|
|00000bc0| 0d 03 16 1f ed 49 3a 4d | 45 24 28 4c 2d 31 32 29 |.....I:M|E$(L-12)|
|00000bd0| 3d 22 51 75 69 74 22 3a | 4c 25 3d 4c 2d 31 32 0d |="Quit":|L%=L-12.|
|00000be0| 03 20 1c 58 3d 33 3a 59 | 3d 31 33 3a f2 53 45 4c |. .X=3:Y|=13:.SEL|
|00000bf0| 45 43 54 3a 41 53 3d 53 | 45 4c 25 0d 03 2a 2e e7 |ECT:AS=S|EL%..*..|
|00000c00| 41 43 54 24 3d 22 49 22 | 8c 20 ee 20 41 53 20 e5 |ACT$="I"|. . AS .|
|00000c10| 20 8d 44 52 43 2c 8d 54 | 50 44 2c 8d 64 62 44 2c | .DRC,.T|PD,.dbD,|
|00000c20| 8d 54 60 48 2c 8d 44 58 | 42 0d 03 34 37 ee 20 41 |.T`H,.DX|B..47. A|
|00000c30| 53 20 e5 20 8d 44 52 43 | 2c 8d 54 50 44 2c 8d 64 |S . .DRC|,.TPD,.d|
|00000c40| 62 44 2c 8d 54 6c 46 2c | 8d 44 40 46 2c 8d 74 7c |bD,.TlF,|.D@F,.t||
|00000c50| 47 2c 8d 64 64 47 2c 8d | 54 60 48 2c 8d 44 58 42 |G,.ddG,.|T`H,.DXB|
|00000c60| 0d 03 3e 11 e7 4d 46 59 | 25 3d 30 8c e5 8d 44 58 |..>..MFY|%=0...DX|
|00000c70| 42 0d 03 48 2c 56 41 25 | 3d 53 50 25 3a db 3a f1 |B..H,VA%|=SP%:.:.|
|00000c80| 8a 32 2c 32 29 3b 22 4d | 61 63 72 6f 20 6d 6f 64 |.2,2);"M|acro mod|
|00000c90| 69 66 69 65 64 2e 22 3a | e5 8d 44 58 42 0d 03 52 |ified.":|..DXB..R|
|00000ca0| 50 db 3a 58 3d 32 3a 59 | 3d 32 3a 57 25 3d 32 39 |P.:X=2:Y|=2:W%=29|
|00000cb0| 3a 4c 25 3d 33 3a f2 4c | 57 4e 3a f1 8a 33 2c 33 |:L%=3:.L|WN:..3,3|
|00000cc0| 29 3b 22 45 6e 74 65 72 | 20 43 6f 2d 6f 72 64 69 |);"Enter| Co-ordi|
|00000cd0| 6e 61 74 65 73 3a 22 3b | 8a 33 2c 34 29 3b 22 58 |nates:";|.3,4);"X|
|00000ce0| 3d 22 3b 8a 33 2c 35 29 | 3b 22 59 3d 22 0d 03 5c |=";.3,5)|;"Y="..\|
|00000cf0| 3b 58 3d 35 3a 59 3d 34 | 3a 4c 25 3d 32 3a f2 54 |;X=5:Y=4|:L%=2:.T|
|00000d00| 45 58 54 3a 58 32 3d bb | 28 54 24 29 3a 58 3d 35 |EXT:X2=.|(T$):X=5|
|00000d10| 3a 59 3d 58 3a 4c 25 3d | 32 3a f2 54 45 58 54 3a |:Y=X:L%=|2:.TEXT:|
|00000d20| 59 32 3d bb 28 54 24 29 | 0d 03 66 47 f1 8a 32 2c |Y2=.(T$)|..fG..2,|
|00000d30| 38 29 3b 22 45 6e 74 65 | 72 20 54 65 78 74 3a 20 |8);"Ente|r Text: |
|00000d40| 28 6d 61 78 69 6d 75 6d | 20 32 30 30 20 63 68 61 |(maximum| 200 cha|
|00000d50| 72 61 63 74 65 72 73 29 | 22 3a 58 3d 32 3a 59 3d |racters)|":X=2:Y=|
|00000d60| 31 30 3a 4c 25 3d 32 30 | 30 3a f2 54 45 58 54 0d |10:L%=20|0:.TEXT.|
|00000d70| 03 70 2d f2 43 4f 4e 56 | 28 58 32 2c 32 29 3a 54 |.p-.CONV|(X2,2):T|
|00000d80| 31 24 3d 53 54 4e 24 3a | f2 43 4f 4e 56 28 59 32 |1$=STN$:|.CONV(Y2|
|00000d90| 2c 32 29 3a 54 32 24 3d | 53 54 4e 24 0d 03 7a 32 |,2):T2$=|STN$..z2|
|00000da0| 4d 41 43 24 28 56 41 25 | 29 3d 54 31 24 2b 54 32 |MAC$(VA%|)=T1$+T2|
|00000db0| 24 2b 54 24 3a f2 4d 41 | 4c 28 22 41 22 29 3a 56 |$+T$:.MA|L("A"):V|
|00000dc0| 41 25 3d 56 41 25 2b 31 | 3a e5 8d 54 7e 43 0d 03 |A%=VA%+1|:..T~C..|
|00000dd0| 84 0e dd f2 4d 41 4c 28 | 54 50 24 29 0d 03 8e 5a |....MAL(|TP$)...Z|
|00000de0| f2 43 4f 4e 56 28 53 46 | 25 2c 33 29 3a 4d 41 4c |.CONV(SF|%,3):MAL|
|00000df0| 24 28 56 41 25 29 3d 53 | 54 4e 24 2b 41 43 54 24 |$(VA%)=S|TN$+ACT$|
|00000e00| 2b 54 50 24 3a e7 41 43 | 54 24 3d 22 49 22 8c 54 |+TP$:.AC|T$="I".T|
|00000e10| 54 24 3d c2 54 52 24 2c | 31 29 3a 54 53 24 3d c0 |T$=.TR$,|1):TS$=.|
|00000e20| 54 52 24 2c 31 29 3a f2 | 54 54 3a 54 52 24 3d 54 |TR$,1):.|TT:TR$=T|
|00000e30| 53 24 2b 54 54 24 0d 03 | 98 35 e7 41 43 54 24 3d |S$+TT$..|.5.ACT$=|
|00000e40| 22 4f 22 8c 54 54 24 3d | c0 54 52 24 2c 31 29 3a |"O".TT$=|.TR$,1):|
|00000e50| 54 53 24 3d c2 54 52 24 | 2c 31 29 3a f2 54 54 3a |TS$=.TR$|,1):.TT:|
|00000e60| 54 52 24 3d 54 54 24 2b | 54 53 24 0d 03 a2 27 cf |TR$=TT$+|TS$...'.|
|00000e70| 23 41 3d 28 53 46 25 2d | 31 29 2a 36 31 2b 31 31 |#A=(SF%-|1)*61+11|
|00000e80| 37 3a f1 23 41 2c 54 52 | 24 3a ff 22 43 4c 4f 53 |7:.#A,TR|$:."CLOS|
|00000e90| 45 22 0d 03 ac 0c 4d 41 | 49 25 3d 31 3a e1 0d 03 |E"....MA|I%=1:...|
|00000ea0| b6 3e dd f2 43 4f 4e 56 | 28 56 4c 2c 4d 4c 29 3a |.>..CONV|(VL,ML):|
|00000eb0| 53 54 4e 24 3d c3 28 56 | 4c 29 3a e7 a9 28 53 54 |STN$=.(V|L):..(ST|
|00000ec0| 4e 24 29 3e 4d 4c 20 8c | 53 54 4e 24 3d c0 53 54 |N$)>ML .|STN$=.ST|
|00000ed0| 4e 24 2c 4d 4c 29 3a e5 | 8d 64 4a 43 0d 03 c0 2b |N$,ML):.|.dJC...+|
|00000ee0| 53 54 4e 24 3d c3 28 56 | 4c 29 3a 53 54 4e 24 3d |STN$=.(V|L):STN$=|
|00000ef0| 53 54 4e 24 2b c4 28 4d | 4c 2d a9 28 53 54 4e 24 |STN$+.(M|L-.(STN$|
|00000f00| 29 29 2c 22 20 22 29 0d | 03 ca 05 e1 0d 03 d4 12 |))," ").|........|
|00000f10| dd f2 43 4f 4e 54 28 56 | 4c 24 2c 4d 4c 29 0d 03 |..CONT(V|L$,ML)..|
|00000f20| de 29 53 54 4e 24 3d 56 | 4c 24 3a 53 54 4e 24 3d |.)STN$=V|L$:STN$=|
|00000f30| 53 54 4e 24 2b c4 28 4d | 4c 2d a9 28 53 54 4e 24 |STN$+.(M|L-.(STN$|
|00000f40| 29 29 2c 22 20 22 29 0d | 03 e8 05 e1 0d 03 f2 19 |))," ").|........|
|00000f50| dd f2 54 54 3a e7 54 53 | 24 3d 22 33 22 8c 54 53 |..TT:.TS|$="3".TS|
|00000f60| 24 3d 22 32 22 0d 03 fc | 14 e7 54 53 24 3d 22 30 |$="2"...|..TS$="0|
|00000f70| 22 8c 54 53 24 3d 22 31 | 22 0d 04 06 05 e1 0d 04 |".TS$="1|".......|
|00000f80| 10 66 db 3a 58 3d 32 3a | 59 3d 32 3a 57 25 3d 32 |.f.:X=2:|Y=2:W%=2|
|00000f90| 39 3a 4c 25 3d 32 3a f2 | 4c 57 4e 3a f1 8a 33 2c |9:L%=2:.|LWN:..3,|
|00000fa0| 33 29 3b 22 48 6f 77 20 | 4d 61 6e 79 20 49 74 65 |3);"How |Many Ite|
|00000fb0| 6d 73 20 6f 66 20 54 65 | 78 74 3f 20 28 31 2d 39 |ms of Te|xt? (1-9|
|00000fc0| 29 22 3a 58 3d 33 3a 59 | 3d 34 3a 4c 25 3d 31 3a |)":X=3:Y|=4:L%=1:|
|00000fd0| f2 54 45 58 54 3a e7 bb | 28 54 24 29 3d 30 8c e5 |.TEXT:..|(T$)=0..|
|00000fe0| 8d 44 58 42 0d 04 1a 14 | 4e 54 25 3d bb 28 54 24 |.DXB....|NT%=.(T$|
|00000ff0| 29 3a 4d 54 24 3d 22 22 | 0d 04 24 0c e3 46 3d 31 |):MT$=""|..$..F=1|
|00001000| b8 4e 54 25 0d 04 2e 44 | 58 3d 32 3a 59 3d 37 3a |.NT%...D|X=2:Y=7:|
|00001010| 57 25 3d 33 35 3a 4c 25 | 3d 38 3a f2 4c 57 4e 3a |W%=35:L%|=8:.LWN:|
|00001020| f1 8a 33 2c 38 29 3b 22 | 54 65 78 74 20 49 74 65 |..3,8);"|Text Ite|
|00001030| 6d 20 23 22 3b 46 3b 8a | 33 2c 39 29 3b c4 33 35 |m #";F;.|3,9);.35|
|00001040| 2c bd 28 32 34 31 29 29 | 0d 04 38 73 f1 8a 33 2c |,.(241))|..8s..3,|
|00001050| 31 30 29 3b 22 45 6e 74 | 65 72 20 43 6f 2d 6f 72 |10);"Ent|er Co-or|
|00001060| 64 69 6e 61 74 65 73 3a | 22 3b 8a 33 2c 31 31 29 |dinates:|";.3,11)|
|00001070| 3b 22 58 3d 22 3b 8a 33 | 2c 31 32 29 3b 22 59 3d |;"X=";.3|,12);"Y=|
|00001080| 22 3a 58 3d 35 3a 59 3d | 31 31 3a 4c 25 3d 32 3a |":X=5:Y=|11:L%=2:|
|00001090| f2 54 45 58 54 3a 58 32 | 3d bb 28 54 24 29 3a 58 |.TEXT:X2|=.(T$):X|
|000010a0| 3d 35 3a 59 3d 31 32 3a | 4c 25 3d 32 3a f2 54 45 |=5:Y=12:|L%=2:.TE|
|000010b0| 58 54 3a 59 32 3d bb 28 | 54 24 29 0d 04 42 46 f1 |XT:Y2=.(|T$)..BF.|
|000010c0| 8a 33 2c 31 33 29 3b 22 | 45 6e 74 65 72 20 54 65 |.3,13);"|Enter Te|
|000010d0| 78 74 3a 20 28 6d 61 78 | 69 6d 75 6d 20 32 30 20 |xt: (max|imum 20 |
|000010e0| 63 68 61 72 61 63 74 65 | 72 73 29 22 3a 58 3d 33 |characte|rs)":X=3|
|000010f0| 3a 59 3d 31 34 3a 4c 25 | 3d 32 30 3a f2 54 45 58 |:Y=14:L%|=20:.TEX|
|00001100| 54 0d 04 4c 4f f2 43 4f | 4e 56 28 58 32 2c 32 29 |T..LO.CO|NV(X2,2)|
|00001110| 3a 54 31 24 3d 53 54 4e | 24 3a f2 43 4f 4e 56 28 |:T1$=STN|$:.CONV(|
|00001120| 59 32 2c 32 29 3a 54 32 | 24 3d 53 54 4e 24 3a f2 |Y2,2):T2|$=STN$:.|
|00001130| 43 4f 4e 54 28 54 24 2c | 32 30 29 3a 4d 54 24 3d |CONT(T$,|20):MT$=|
|00001140| 4d 54 24 2b 54 31 24 2b | 54 32 24 2b 53 54 4e 24 |MT$+T1$+|T2$+STN$|
|00001150| 0d 04 56 06 ed 46 0d 04 | 60 32 4d 41 43 24 28 56 |..V..F..|`2MAC$(V|
|00001160| 41 25 29 3d c3 28 4e 54 | 25 29 2b 4d 54 24 3a f2 |A%)=.(NT|%)+MT$:.|
|00001170| 4d 41 4c 28 22 42 22 29 | 3a 56 41 25 3d 56 41 25 |MAL("B")|:VA%=VA%|
|00001180| 2b 31 3a e5 8d 54 7e 43 | 0d 04 6a 68 dd f2 53 54 |+1:..T~C|..jh..ST|
|00001190| 41 4e 3a ef 32 33 2c 31 | 35 34 2c 32 35 35 2c 31 |AN:.23,1|54,255,1|
|000011a0| 32 38 2c 31 39 31 2c 31 | 36 30 2c 31 36 30 2c 31 |28,191,1|60,160,1|
|000011b0| 36 30 2c 31 36 30 2c 31 | 36 30 2c 32 33 2c 31 35 |60,160,1|60,23,15|
|000011c0| 39 2c 32 35 35 2c 30 2c | 32 35 35 2c 30 2c 30 2c |9,255,0,|255,0,0,|
|000011d0| 30 2c 30 2c 30 2c 32 33 | 2c 31 35 38 2c 32 35 35 |0,0,0,23|,158,255|
|000011e0| 2c 31 2c 32 35 33 2c 35 | 2c 35 2c 35 2c 35 2c 35 |,1,253,5|,5,5,5,5|
|000011f0| 0d 04 74 9f ef 32 33 2c | 31 35 35 2c 31 36 30 2c |..t..23,|155,160,|
|00001200| 31 36 30 2c 31 36 30 2c | 31 36 30 2c 31 36 30 2c |160,160,|160,160,|
|00001210| 31 36 30 2c 31 36 30 2c | 31 36 30 2c 32 33 2c 31 |160,160,|160,23,1|
|00001220| 35 37 2c 35 2c 35 2c 35 | 2c 35 2c 35 2c 35 2c 35 |57,5,5,5|,5,5,5,5|
|00001230| 2c 35 2c 32 33 2c 31 35 | 36 2c 31 36 30 2c 31 36 |,5,23,15|6,160,16|
|00001240| 30 2c 31 36 30 2c 31 36 | 30 2c 31 36 30 2c 31 39 |0,160,16|0,160,19|
|00001250| 31 2c 31 32 38 2c 32 35 | 35 2c 32 33 2c 31 36 30 |1,128,25|5,23,160|
|00001260| 2c 30 2c 30 2c 30 2c 30 | 2c 30 2c 32 35 35 2c 30 |,0,0,0,0|,0,255,0|
|00001270| 2c 32 35 35 2c 32 33 2c | 31 36 31 2c 35 2c 35 2c |,255,23,|161,5,5,|
|00001280| 35 2c 35 2c 35 2c 32 35 | 33 2c 31 2c 32 35 35 0d |5,5,5,25|3,1,255.|
|00001290| 04 7e 05 e1 0d 04 88 a9 | dd f2 53 48 41 44 3a ef |.~......|..SHAD:.|
|000012a0| 32 33 2c 31 35 37 2c 37 | 2c 37 2c 37 2c 37 2c 37 |23,157,7|,7,7,7,7|
|000012b0| 2c 37 2c 37 2c 37 2c 32 | 33 2c 31 35 38 2c 30 2c |,7,7,7,2|3,158,0,|
|000012c0| 30 2c 32 35 32 2c 34 2c | 37 2c 37 2c 37 2c 37 2c |0,252,4,|7,7,7,7,|
|000012d0| 32 33 2c 31 35 39 2c 30 | 2c 30 2c 32 35 35 2c 30 |23,159,0|,0,255,0|
|000012e0| 2c 30 2c 30 2c 30 2c 30 | 2c 32 33 2c 31 36 30 2c |,0,0,0,0|,23,160,|
|000012f0| 30 2c 30 2c 30 2c 30 2c | 30 2c 32 35 35 2c 32 35 |0,0,0,0,|0,255,25|
|00001300| 35 2c 32 35 35 2c 32 33 | 2c 31 36 31 2c 37 2c 37 |5,255,23|,161,7,7|
|00001310| 2c 37 2c 37 2c 37 2c 32 | 35 35 2c 32 35 35 2c 32 |,7,7,7,2|55,255,2|
|00001320| 35 35 2c 32 33 2c 31 36 | 32 2c 30 2c 30 2c 30 2c |55,23,16|2,0,0,0,|
|00001330| 32 35 35 2c 32 35 35 2c | 30 2c 30 2c 30 0d 04 92 |255,255,|0,0,0...|
|00001340| 61 ef 32 33 2c 31 35 34 | 2c 30 2c 30 2c 36 33 2c |a.23,154|,0,0,63,|
|00001350| 33 32 2c 33 32 2c 33 32 | 2c 33 32 2c 33 32 2c 32 |32,32,32|,32,32,2|
|00001360| 33 2c 31 35 35 2c 33 32 | 2c 33 32 2c 33 32 2c 33 |3,155,32|,32,32,3|
|00001370| 32 2c 33 32 2c 33 32 2c | 33 32 2c 33 32 2c 32 33 |2,32,32,|32,32,23|
|00001380| 2c 31 35 36 2c 33 32 2c | 33 32 2c 33 32 2c 33 32 |,156,32,|32,32,32|
|00001390| 2c 33 32 2c 36 33 2c 31 | 35 2c 31 35 3a e1 0d 04 |,32,63,1|5,15:...|
|000013a0| 9c ca dd f2 53 4c 49 4e | 45 3a ef 32 33 2c 31 35 |....SLIN|E:.23,15|
|000013b0| 34 2c 32 35 35 2c 31 32 | 38 2c 31 32 38 2c 31 32 |4,255,12|8,128,12|
|000013c0| 38 2c 31 32 38 2c 31 32 | 38 2c 31 32 38 2c 31 32 |8,128,12|8,128,12|
|000013d0| 38 2c 32 33 2c 31 35 35 | 2c 31 32 38 2c 31 32 38 |8,23,155|,128,128|
|000013e0| 2c 31 32 38 2c 31 32 38 | 2c 31 32 38 2c 31 32 38 |,128,128|,128,128|
|000013f0| 2c 31 32 38 2c 31 32 38 | 2c 32 33 2c 31 35 36 2c |,128,128|,23,156,|
|00001400| 31 32 38 2c 31 32 38 2c | 31 32 38 2c 31 32 38 2c |128,128,|128,128,|
|00001410| 31 32 38 2c 31 32 38 2c | 31 32 38 2c 32 35 35 2c |128,128,|128,255,|
|00001420| 32 33 2c 31 36 30 2c 30 | 2c 30 2c 30 2c 30 2c 30 |23,160,0|,0,0,0,0|
|00001430| 2c 30 2c 30 2c 32 35 35 | 2c 32 33 2c 31 36 31 2c |,0,0,255|,23,161,|
|00001440| 31 2c 31 2c 31 2c 31 2c | 31 2c 31 2c 31 2c 32 35 |1,1,1,1,|1,1,1,25|
|00001450| 35 2c 32 33 2c 31 35 37 | 2c 31 2c 31 2c 31 2c 31 |5,23,157|,1,1,1,1|
|00001460| 2c 31 2c 31 2c 31 2c 31 | 0d 04 a6 38 ef 32 33 2c |,1,1,1,1|...8.23,|
|00001470| 31 35 38 2c 32 35 35 2c | 31 2c 31 2c 31 2c 31 2c |158,255,|1,1,1,1,|
|00001480| 31 2c 31 2c 31 2c 32 33 | 2c 31 35 39 2c 32 35 35 |1,1,1,23|,159,255|
|00001490| 2c 30 2c 30 2c 30 2c 30 | 2c 30 2c 30 2c 30 3a e1 |,0,0,0,0|,0,0,0:.|
|000014a0| 0d 04 b0 ca dd f2 49 4e | 56 45 3a ef 32 33 2c 31 |......IN|VE:.23,1|
|000014b0| 35 34 2c 32 35 35 2c 32 | 35 35 2c 31 39 32 2c 32 |54,255,2|55,192,2|
|000014c0| 32 33 2c 32 32 33 2c 32 | 32 33 2c 32 32 33 2c 32 |23,223,2|23,223,2|
|000014d0| 32 33 2c 32 33 2c 31 35 | 35 2c 32 32 33 2c 32 32 |23,23,15|5,223,22|
|000014e0| 33 2c 32 32 33 2c 32 32 | 33 2c 32 32 33 2c 32 32 |3,223,22|3,223,22|
|000014f0| 33 2c 32 32 33 2c 32 32 | 33 2c 32 33 2c 31 35 36 |3,223,22|3,23,156|
|00001500| 2c 32 32 33 2c 32 32 33 | 2c 32 32 33 2c 32 32 33 |,223,223|,223,223|
|00001510| 2c 32 32 33 2c 31 39 32 | 2c 32 35 35 2c 32 35 35 |,223,192|,255,255|
|00001520| 2c 32 33 2c 31 36 30 2c | 32 35 35 2c 32 35 35 2c |,23,160,|255,255,|
|00001530| 32 35 35 2c 32 35 35 2c | 32 35 35 2c 30 2c 32 35 |255,255,|255,0,25|
|00001540| 35 2c 32 35 35 2c 32 33 | 2c 31 36 31 2c 32 35 31 |5,255,23|,161,251|
|00001550| 2c 32 35 31 2c 32 35 31 | 2c 32 35 31 2c 32 35 31 |,251,251|,251,251|
|00001560| 2c 33 2c 32 35 35 2c 32 | 35 35 0d 04 ba 77 ef 32 |,3,255,2|55...w.2|
|00001570| 33 2c 31 35 37 2c 32 35 | 31 2c 32 35 31 2c 32 35 |3,157,25|1,251,25|
|00001580| 31 2c 32 35 31 2c 32 35 | 31 2c 32 35 31 2c 32 35 |1,251,25|1,251,25|
|00001590| 31 2c 32 35 31 2c 32 33 | 2c 31 35 38 2c 32 35 35 |1,251,23|,158,255|
|000015a0| 2c 32 35 35 2c 33 2c 32 | 35 31 2c 32 35 31 2c 32 |,255,3,2|51,251,2|
|000015b0| 35 31 2c 32 35 31 2c 32 | 35 31 2c 32 33 2c 31 35 |51,251,2|51,23,15|
|000015c0| 39 2c 32 35 35 2c 32 35 | 35 2c 30 2c 32 35 35 2c |9,255,25|5,0,255,|
|000015d0| 32 35 35 2c 32 35 35 2c | 32 35 35 2c 32 35 35 3a |255,255,|255,255:|
|000015e0| e1 0d 04 c4 3c dd f2 47 | 52 45 59 3a e3 49 3d 31 |....<..G|REY:.I=1|
|000015f0| 35 34 b8 31 36 31 3a ef | 32 33 2c 49 2c 38 35 2c |54.161:.|23,I,85,|
|00001600| 31 37 30 2c 38 35 2c 31 | 37 30 2c 38 35 2c 31 37 |170,85,1|70,85,17|
|00001610| 30 2c 38 35 2c 31 37 30 | 3a ed 49 3a e1 0d 04 ce |0,85,170|:.I:....|
|00001620| ce dd f2 54 48 44 49 3a | ef 32 33 2c 31 35 34 2c |...THDI:|.23,154,|
|00001630| 32 35 35 2c 31 39 32 2c | 31 36 30 2c 31 34 34 2c |255,192,|160,144,|
|00001640| 31 33 36 2c 31 33 32 2c | 31 33 30 2c 31 32 39 2c |136,132,|130,129,|
|00001650| 32 33 2c 31 35 35 2c 31 | 32 39 2c 31 32 39 2c 31 |23,155,1|29,129,1|
|00001660| 32 39 2c 31 32 39 2c 31 | 32 39 2c 31 32 39 2c 31 |29,129,1|29,129,1|
|00001670| 32 39 2c 31 32 39 2c 32 | 33 2c 31 35 36 2c 31 32 |29,129,2|3,156,12|
|00001680| 39 2c 31 33 31 2c 31 33 | 35 2c 31 34 33 2c 31 35 |9,131,13|5,143,15|
|00001690| 39 2c 31 39 31 2c 32 35 | 35 2c 32 35 35 2c 32 33 |9,191,25|5,255,23|
|000016a0| 2c 31 36 30 2c 32 35 35 | 2c 32 35 35 2c 32 35 35 |,160,255|,255,255|
|000016b0| 2c 32 35 35 2c 32 35 35 | 2c 32 35 35 2c 32 35 35 |,255,255|,255,255|
|000016c0| 2c 32 35 35 2c 32 33 2c | 31 36 31 2c 31 32 37 2c |,255,23,|161,127,|
|000016d0| 31 39 31 2c 32 32 33 2c | 32 33 39 2c 32 34 37 2c |191,223,|239,247,|
|000016e0| 32 35 31 2c 32 35 33 2c | 32 35 35 0d 04 d8 68 ef |251,253,|255...h.|
|000016f0| 32 33 2c 31 35 37 2c 32 | 35 35 2c 32 35 35 2c 32 |23,157,2|55,255,2|
|00001700| 35 35 2c 32 35 35 2c 32 | 35 35 2c 32 35 35 2c 32 |55,255,2|55,255,2|
|00001710| 35 35 2c 32 35 35 2c 32 | 33 2c 31 35 38 2c 32 35 |55,255,2|3,158,25|
|00001720| 35 2c 33 2c 37 2c 31 35 | 2c 33 31 2c 36 33 2c 31 |5,3,7,15|,31,63,1|
|00001730| 32 37 2c 32 35 35 2c 32 | 33 2c 31 35 39 2c 32 35 |27,255,2|3,159,25|
|00001740| 35 2c 30 2c 30 2c 30 2c | 30 2c 30 2c 30 2c 32 35 |5,0,0,0,|0,0,0,25|
|00001750| 35 3a e1 0d 04 e2 41 db | 3a 58 3d 31 3a 59 3d 31 |5:....A.|:X=1:Y=1|
|00001760| 3a 57 25 3d 34 39 3a 4c | 25 3d 39 3a f2 4c 57 4e |:W%=49:L|%=9:.LWN|
|00001770| 3a f1 8a 33 2c 32 29 3b | 22 53 65 6c 65 63 74 20 |:..3,2);|"Select |
|00001780| 61 20 57 69 6e 64 6f 77 | 20 53 74 79 6c 65 3a 22 |a Window| Style:"|
|00001790| 3a fb 34 34 0d 04 ec 7f | 58 3d 33 3a 59 3d 34 3a |:.44....|X=3:Y=4:|
|000017a0| 57 25 3d 34 3a 4c 25 3d | 34 3a f2 4c 57 4e 3a 58 |W%=4:L%=|4:.LWN:X|
|000017b0| 3d 31 31 3a 59 3d 34 3a | 57 25 3d 34 3a 4c 25 3d |=11:Y=4:|W%=4:L%=|
|000017c0| 34 3a f2 53 48 41 44 3a | f2 4c 57 4e 3a 58 3d 32 |4:.SHAD:|.LWN:X=2|
|000017d0| 30 3a f2 53 4c 49 4e 45 | 3a f2 4c 57 4e 3a 58 3d |0:.SLINE|:.LWN:X=|
|000017e0| 32 38 3a f2 49 4e 56 45 | 3a f2 4c 57 4e 3a 58 3d |28:.INVE|:.LWN:X=|
|000017f0| 33 36 3a f2 47 52 45 59 | 3a f2 4c 57 4e 3a 58 3d |36:.GREY|:.LWN:X=|
|00001800| 34 34 3a f2 54 48 44 49 | 3a f2 4c 57 4e 3a f2 53 |44:.THDI|:.LWN:.S|
|00001810| 54 41 4e 0d 04 f6 7f 58 | 3d 33 3a 59 3d 34 3a 57 |TAN....X|=3:Y=4:W|
|00001820| 25 3d 34 3a 4c 25 3d 34 | 3a f2 4c 57 4e 3a 58 3d |%=4:L%=4|:.LWN:X=|
|00001830| 31 31 3a 59 3d 34 3a 57 | 25 3d 34 3a 4c 25 3d 34 |11:Y=4:W|%=4:L%=4|
|00001840| 3a f2 53 48 41 44 3a f2 | 4c 57 4e 3a 58 3d 32 30 |:.SHAD:.|LWN:X=20|
|00001850| 3a f2 53 4c 49 4e 45 3a | f2 4c 57 4e 3a 58 3d 32 |:.SLINE:|.LWN:X=2|
|00001860| 38 3a f2 49 4e 56 45 3a | f2 4c 57 4e 3a 58 3d 33 |8:.INVE:|.LWN:X=3|
|00001870| 36 3a f2 47 52 45 59 3a | f2 4c 57 4e 3a 58 3d 34 |6:.GREY:|.LWN:X=4|
|00001880| 34 3a f2 54 48 44 49 3a | f2 4c 57 4e 3a f2 53 54 |4:.THDI:|.LWN:.ST|
|00001890| 41 4e 0d 05 00 38 c8 97 | 20 58 50 2c 59 50 2c 42 |AN...8..| XP,YP,B|
|000018a0| 55 54 3a 58 50 3d a8 28 | 58 50 2f 31 36 29 3a 59 |UT:XP=.(|XP/16):Y|
|000018b0| 50 3d 33 31 2d a8 28 59 | 50 2f 33 32 29 3a e7 42 |P=31-.(Y|P/32):.B|
|000018c0| 55 54 3d 30 8c e5 8d 54 | 40 45 0d 05 0a 22 e7 58 |UT=0...T|@E...".X|
|000018d0| 50 3e 3d 33 20 80 20 58 | 50 3c 3d 36 20 8c 20 53 |P>=3 . X|P<=6 . S|
|000018e0| 54 24 3d 22 31 22 3a e5 | 8d 44 50 45 0d 05 14 24 |T$="1":.|.DPE...$|
|000018f0| e7 58 50 3e 3d 31 31 20 | 80 20 58 50 3c 3d 31 34 |.XP>=11 |. XP<=14|
|00001900| 20 8c 20 53 54 24 3d 22 | 32 22 3a e5 8d 44 50 45 | . ST$="|2":..DPE|
|00001910| 0d 05 1e 24 e7 58 50 3e | 3d 32 30 20 80 20 58 50 |...$.XP>|=20 . XP|
|00001920| 3c 3d 32 33 20 8c 20 53 | 54 24 3d 22 33 22 3a e5 |<=23 . S|T$="3":.|
|00001930| 8d 44 50 45 0d 05 28 24 | e7 58 50 3e 3d 32 38 20 |.DPE..($|.XP>=28 |
|00001940| 80 20 58 50 3c 3d 33 31 | 20 8c 20 53 54 24 3d 22 |. XP<=31| . ST$="|
|00001950| 34 22 3a e5 8d 44 50 45 | 0d 05 32 24 e7 58 50 3e |4":..DPE|..2$.XP>|
|00001960| 3d 33 39 20 80 20 58 50 | 3c 3d 33 39 20 8c 20 53 |=39 . XP|<=39 . S|
|00001970| 54 24 3d 22 35 22 3a e5 | 8d 44 50 45 0d 05 3c 24 |T$="5":.|.DPE..<$|
|00001980| e7 58 50 3e 3d 34 34 20 | 80 20 58 50 3c 3d 34 37 |.XP>=44 |. XP<=47|
|00001990| 20 8c 20 53 54 24 3d 22 | 36 22 3a e5 8d 44 50 45 | . ST$="|6":..DPE|
|000019a0| 0d 05 46 09 e5 8d 54 40 | 45 0d 05 50 81 ef 37 3a |..F...T@|E..P..7:|
|000019b0| fb 31 32 37 3a 58 3d 31 | 3a 59 3d 31 35 3a 57 25 |.127:X=1|:Y=15:W%|
|000019c0| 3d 32 35 3a 4c 25 3d 36 | 3a f2 4c 57 4e 3a f1 8a |=25:L%=6|:.LWN:..|
|000019d0| 32 2c 31 36 29 3b 22 45 | 6e 74 65 72 20 57 69 6e |2,16);"E|nter Win|
|000019e0| 64 6f 77 20 43 6f 6f 72 | 64 69 6e 61 74 65 73 3a |dow Coor|dinates:|
|000019f0| 22 3b 8a 32 2c 31 38 29 | 3b 22 58 3d 22 3b 8a 32 |";.2,18)|;"X=";.2|
|00001a00| 2c 31 39 29 3b 22 59 3d | 22 3b 8a 32 2c 32 30 29 |,19);"Y=|";.2,20)|
|00001a10| 3b 22 57 49 44 54 48 3d | 22 3b 8a 32 2c 32 31 29 |;"WIDTH=|";.2,21)|
|00001a20| 3b 22 4c 45 4e 47 54 48 | 3d 22 0d 05 5a 68 58 3d |;"LENGTH|="..ZhX=|
|00001a30| 34 3a 59 3d 31 38 3a 4c | 25 3d 32 3a f2 54 45 58 |4:Y=18:L|%=2:.TEX|
|00001a40| 54 3a 58 31 3d bb 28 54 | 24 29 3a 58 3d 34 3a 59 |T:X1=.(T|$):X=4:Y|
|00001a50| 3d 31 39 3a f2 54 45 58 | 54 3a 58 32 3d bb 28 54 |=19:.TEX|T:X2=.(T|
|00001a60| 24 29 3a 58 3d 38 3a 59 | 3d 32 30 3a f2 54 45 58 |$):X=8:Y|=20:.TEX|
|00001a70| 54 3a 58 33 3d bb 28 54 | 24 29 3a 58 3d 39 3a 59 |T:X3=.(T|$):X=9:Y|
|00001a80| 3d 32 31 3a f2 54 45 58 | 54 3a 58 34 3d bb 28 54 |=21:.TEX|T:X4=.(T|
|00001a90| 24 29 0d 05 64 97 58 3d | 33 30 3a 59 3d 31 35 3a |$)..d.X=|30:Y=15:|
|00001aa0| 57 25 3d 32 34 3a 4c 25 | 3d 35 3a f2 4c 57 4e 3a |W%=24:L%|=5:.LWN:|
|00001ab0| f1 8a 33 31 2c 31 36 29 | 3b 22 45 6e 74 65 72 20 |..31,16)|;"Enter |
|00001ac0| 41 63 63 6f 6d 70 61 6e | 79 69 6e 67 20 54 65 78 |Accompan|ying Tex|
|00001ad0| 74 3a 22 3b 8a 33 31 2c | 31 38 29 3b 22 58 3d 22 |t:";.31,|18);"X="|
|00001ae0| 3b 8a 33 31 2c 31 39 29 | 3b 22 59 3d 22 3a 58 3d |;.31,19)|;"Y=":X=|
|00001af0| 33 33 3a 59 3d 31 38 3a | 4c 25 3d 32 3a f2 54 45 |33:Y=18:|L%=2:.TE|
|00001b00| 58 54 3a 58 35 3d bb 28 | 54 24 29 3a 58 3d 33 33 |XT:X5=.(|T$):X=33|
|00001b10| 3a 59 3d 31 39 3a 4c 25 | 3d 32 3a f2 54 45 58 54 |:Y=19:L%|=2:.TEXT|
|00001b20| 3a 58 36 3d bb 28 54 24 | 29 0d 05 6e 19 58 3d 33 |:X6=.(T$|)..n.X=3|
|00001b30| 31 3a 59 3d 32 30 3a 4c | 25 3d 32 30 3a f2 54 45 |1:Y=20:L|%=20:.TE|
|00001b40| 58 54 0d 05 78 cc f2 43 | 4f 4e 56 28 58 31 2c 32 |XT..x..C|ONV(X1,2|
|00001b50| 29 3a 4d 41 43 24 28 56 | 41 25 29 3d 4d 41 43 24 |):MAC$(V|A%)=MAC$|
|00001b60| 28 56 41 25 29 2b 53 54 | 24 2b 53 54 4e 24 3a f2 |(VA%)+ST|$+STN$:.|
|00001b70| 43 4f 4e 56 28 58 32 2c | 32 29 3a 4d 41 43 24 28 |CONV(X2,|2):MAC$(|
|00001b80| 56 41 25 29 3d 4d 41 43 | 24 28 56 41 25 29 2b 53 |VA%)=MAC|$(VA%)+S|
|00001b90| 54 4e 24 3a f2 43 4f 4e | 56 28 58 33 2c 32 29 3a |TN$:.CON|V(X3,2):|
|00001ba0| 4d 41 43 24 28 56 41 25 | 29 3d 4d 41 43 24 28 56 |MAC$(VA%|)=MAC$(V|
|00001bb0| 41 25 29 2b 53 54 4e 24 | 3a f2 43 4f 4e 56 28 58 |A%)+STN$|:.CONV(X|
|00001bc0| 34 2c 32 29 3a 4d 41 43 | 24 28 56 41 25 29 3d 4d |4,2):MAC|$(VA%)=M|
|00001bd0| 41 43 24 28 56 41 25 29 | 2b 53 54 4e 24 3a f2 43 |AC$(VA%)|+STN$:.C|
|00001be0| 4f 4e 56 28 58 35 2c 32 | 29 3a 4d 41 43 24 28 56 |ONV(X5,2|):MAC$(V|
|00001bf0| 41 25 29 3d 4d 41 43 24 | 28 56 41 25 29 2b 53 54 |A%)=MAC$|(VA%)+ST|
|00001c00| 4e 24 3a f2 43 4f 4e 56 | 28 58 36 2c 32 29 0d 05 |N$:.CONV|(X6,2)..|
|00001c10| 82 42 4d 41 43 24 28 56 | 41 25 29 3d 4d 41 43 24 |.BMAC$(V|A%)=MAC$|
|00001c20| 28 56 41 25 29 2b 53 54 | 4e 24 3a f2 43 4f 4e 54 |(VA%)+ST|N$:.CONT|
|00001c30| 28 54 24 2c 32 30 29 3a | 4d 41 43 24 28 56 41 25 |(T$,20):|MAC$(VA%|
|00001c40| 29 3d 4d 41 43 24 28 56 | 41 25 29 2b 53 54 4e 24 |)=MAC$(V|A%)+STN$|
|00001c50| 0d 05 8c 1d f2 4d 41 4c | 28 22 43 22 29 3a 56 41 |.....MAL|("C"):VA|
|00001c60| 25 3d 56 41 25 2b 31 3a | e5 8d 54 7e 43 0d 05 96 |%=VA%+1:|..T~C...|
|00001c70| 53 e7 4d 41 49 25 3d 30 | 8c e5 8d 44 58 42 3a 8b |S.MAI%=0|...DXB:.|
|00001c80| db 3a fb 31 32 38 3a 58 | 3d 32 3a 59 3d 32 3a 57 |.:.128:X|=2:Y=2:W|
|00001c90| 25 3d 33 30 3a 4c 25 3d | 39 3a f2 4c 57 4e 3a f1 |%=30:L%=|9:.LWN:.|
|00001ca0| 8a 33 2c 33 29 3b 22 53 | 65 74 20 45 61 63 68 20 |.3,3);"S|et Each |
|00001cb0| 4f 70 74 69 6f 6e 3a 20 | 22 3b bd 28 31 33 32 29 |Option: |";.(132)|
|00001cc0| 0d 05 a0 16 f1 8a 33 2c | 34 29 3b c4 33 30 2c bd |......3,|4);.30,.|
|00001cd0| 28 32 34 31 29 29 0d 05 | aa 8c f1 8a 33 2c 36 29 |(241))..|....3,6)|
|00001ce0| 3b 22 45 6e 74 72 79 20 | 50 61 67 65 22 3b 8a 33 |;"Entry |Page";.3|
|00001cf0| 2c 37 29 3b 22 42 65 65 | 70 20 6f 6e 20 52 45 54 |,7);"Bee|p on RET|
|00001d00| 55 52 4e 22 3b 8a 33 2c | 38 29 3b 22 49 6e 76 65 |URN";.3,|8);"Inve|
|00001d10| 72 74 20 46 69 65 6c 64 | 20 54 69 74 6c 65 73 22 |rt Field| Titles"|
|00001d20| 3b 8a 33 2c 39 29 3b 22 | 45 6e 63 61 73 65 20 45 |;.3,9);"|Encase E|
|00001d30| 6e 74 72 79 22 3b 8a 33 | 2c 31 30 29 3b 22 48 61 |ntry";.3|,10);"Ha|
|00001d40| 72 64 20 43 6f 70 79 22 | 3b 8a 33 2c 31 31 29 3b |rd Copy"|;.3,11);|
|00001d50| 22 53 65 74 20 4d 61 73 | 74 65 72 20 54 69 74 6c |"Set Mas|ter Titl|
|00001d60| 65 22 0d 05 b4 3e 4c 3d | 36 3a e3 49 3d 36 b8 31 |e"...>L=|6:.I=6.1|
|00001d70| 31 3a e7 c1 53 50 4d 24 | 2c 49 2c 31 29 3d 22 31 |1:..SPM$|,I,1)="1|
|00001d80| 22 8c f1 8a 33 31 2c 4c | 29 3b bd 28 31 33 33 29 |"...31,L|);.(133)|
|00001d90| 3a 8b f1 8a 33 31 2c 4c | 29 3b bd 28 31 33 30 29 |:...31,L|);.(130)|
|00001da0| 0d 05 be 0c 4c 3d 4c 2b | 31 3a ed 49 0d 05 c8 38 |....L=L+|1:.I...8|
|00001db0| c8 97 20 58 50 2c 59 50 | 2c 42 55 54 3a 58 50 3d |.. XP,YP|,BUT:XP=|
|00001dc0| a8 28 58 50 2f 31 36 29 | 3a 59 50 3d 33 31 2d a8 |.(XP/16)|:YP=31-.|
|00001dd0| 28 59 50 2f 33 32 29 3a | e7 42 55 54 3d 30 8c e5 |(YP/32):|.BUT=0..|
|00001de0| 8d 64 48 45 0d 05 d2 20 | e7 58 50 3d 32 30 20 80 |.dHE... |.XP=20 .|
|00001df0| 20 59 50 3d 33 20 8c ef | 37 3a fb 46 47 25 3a e5 | YP=3 ..|7:.FG%:.|
|00001e00| 8d 44 58 42 0d 05 dc 1b | e7 59 50 3c 36 20 84 20 |.DXB....|.YP<6 . |
|00001e10| 59 50 3e 31 31 8c e5 8d | 64 48 45 3a 8b ef 37 0d |YP>11...|dHE:..7.|
|00001e20| 05 e6 78 42 49 54 25 3d | 59 50 3a 49 24 3d c3 28 |..xBIT%=|YP:I$=.(|
|00001e30| 42 49 54 25 2d 35 29 3a | 42 49 54 24 3d c1 53 50 |BIT%-5):|BIT$=.SP|
|00001e40| 4d 24 2c 42 49 54 25 2c | 31 29 3a 54 31 24 3d c0 |M$,BIT%,|1):T1$=.|
|00001e50| 53 50 4d 24 2c 42 49 54 | 25 2d 31 29 3a 54 32 24 |SPM$,BIT|%-1):T2$|
|00001e60| 3d c1 53 50 4d 24 2c 42 | 49 54 25 2b 31 2c a9 28 |=.SPM$,B|IT%+1,.(|
|00001e70| 53 50 4d 24 29 2d 42 49 | 54 25 29 3a e7 42 49 54 |SPM$)-BI|T%):.BIT|
|00001e80| 24 3d 22 30 22 8c 42 49 | 54 24 3d 22 31 22 8b 42 |$="0".BI|T$="1".B|
|00001e90| 49 54 24 3d 22 30 22 0d | 05 f0 21 e7 49 24 3d 22 |IT$="0".|..!.I$="|
|00001ea0| 36 22 80 c1 53 50 4d 24 | 2c 31 31 2c 31 29 3d 22 |6"..SPM$|,11,1)="|
|00001eb0| 30 22 8c e5 8d 54 62 46 | 0d 05 fa 3f e7 49 24 3d |0"...TbF|...?.I$=|
|00001ec0| 22 36 22 80 c1 53 50 4d | 24 2c 31 31 2c 31 29 3d |"6"..SPM|$,11,1)=|
|00001ed0| 22 31 22 8c 53 50 4d 24 | 3d c0 53 50 4d 24 2c 31 |"1".SPM$|=.SPM$,1|
|00001ee0| 31 29 3a 54 32 24 3d c2 | 53 50 4d 24 2c 28 31 31 |1):T2$=.|SPM$,(11|
|00001ef0| 2d 42 49 54 25 29 29 0d | 06 04 15 53 50 4d 24 3d |-BIT%)).|...SPM$=|
|00001f00| 54 31 24 2b 42 49 54 24 | 2b 54 32 24 0d 06 0e 17 |T1$+BIT$|+T2$....|
|00001f10| f5 3a c8 97 20 55 2c 55 | 2c 42 55 54 3a fd 42 55 |.:.. U,U|,BUT:.BU|
|00001f20| 54 3d 30 0d 06 18 09 e5 | 8d 74 74 45 0d 06 22 71 |T=0.....|.ttE.."q|
|00001f30| 58 3d 30 3a 59 3d 31 34 | 3a 4c 25 3d 32 3a 57 25 |X=0:Y=14|:L%=2:W%|
|00001f40| 3d 37 38 3a f2 4c 57 4e | 3a f1 8a 31 2c 31 35 29 |=78:.LWN|:..1,15)|
|00001f50| 3b 22 45 6e 74 65 72 20 | 4d 61 73 74 65 72 20 54 |;"Enter |Master T|
|00001f60| 69 74 6c 65 3a 22 3a 58 | 3d 31 3a 59 3d 31 36 3a |itle:":X|=1:Y=16:|
|00001f70| 4c 25 3d 37 38 3a f2 54 | 45 58 54 3a fb 46 47 25 |L%=78:.T|EXT:.FG%|
|00001f80| 3a db 3a 53 50 4d 24 3d | 54 31 24 2b 42 49 54 24 |:.:SPM$=|T1$+BIT$|
|00001f90| 2b 54 32 24 2b 54 24 3a | e5 8d 74 56 45 0d 06 2c |+T2$+T$:|..tVE..,|
|00001fa0| 1a e7 54 59 24 3d 22 35 | 22 84 54 59 24 3d 22 36 |..TY$="5|".TY$="6|
|00001fb0| 22 8c e5 8d 54 7e 43 0d | 06 36 a1 db 3a 58 3d 32 |"...T~C.|.6..:X=2|
|00001fc0| 3a 59 3d 32 3a 57 25 3d | 36 35 3a 4c 25 3d 32 3a |:Y=2:W%=|65:L%=2:|
|00001fd0| f2 4c 57 4e 3a f1 8a 33 | 2c 33 29 3b 22 45 6e 74 |.LWN:..3|,3);"Ent|
|00001fe0| 65 72 20 64 65 66 61 75 | 6c 74 20 76 61 6c 75 65 |er defau|lt value|
|00001ff0| 20 66 6f 72 20 22 3b 46 | 4c 24 3b 22 3a 22 3a cf | for ";F|L$;":":.|
|00002000| 23 41 3d 28 53 46 25 2d | 31 29 2a 36 31 2b 31 30 |#A=(SF%-|1)*61+10|
|00002010| 34 3a e8 23 41 2c 49 4e | 24 3a 58 3d 33 3a 59 3d |4:.#A,IN|$:X=3:Y=|
|00002020| 34 3a 4c 25 3d bb 28 49 | 4e 24 29 3a f2 54 45 58 |4:L%=.(I|N$):.TEX|
|00002030| 54 3a 4d 41 43 24 28 56 | 41 25 29 3d 54 24 3a f2 |T:MAC$(V|A%)=T$:.|
|00002040| 4d 41 4c 28 22 44 22 29 | 3a 56 41 25 3d 56 41 25 |MAL("D")|:VA%=VA%|
|00002050| 2b 31 3a e5 8d 54 7e 43 | 0d 06 40 1a e7 54 59 24 |+1:..T~C|..@..TY$|
|00002060| 3d 22 35 22 84 54 59 24 | 3d 22 36 22 8c e5 8d 54 |="5".TY$|="6"...T|
|00002070| 7e 43 0d 06 4a 78 db 3a | 58 3d 32 3a 59 3d 32 3a |~C..Jx.:|X=2:Y=2:|
|00002080| 57 25 3d 36 30 3a 4c 25 | 3d 34 3a f2 4c 57 4e 3a |W%=60:L%|=4:.LWN:|
|00002090| f1 8a 33 2c 33 29 3b 22 | 44 65 66 69 6e 65 20 76 |..3,3);"|Define v|
|000020a0| 61 6c 69 64 20 72 61 6e | 67 65 20 66 6f 72 20 22 |alid ran|ge for "|
|000020b0| 3b 46 4c 24 3b 22 3a 22 | 3b 8a 33 2c 35 29 22 45 |;FL$;":"|;.3,5)"E|
|000020c0| 6e 74 65 72 20 6c 6f 77 | 20 76 61 6c 75 65 3a 22 |nter low| value:"|
|000020d0| 3b 8a 33 2c 36 29 3b 22 | 45 6e 74 65 72 20 68 69 |;.3,6);"|Enter hi|
|000020e0| 67 68 20 76 61 6c 75 65 | 3a 22 0d 06 54 26 58 3d |gh value|:"..T&X=|
|000020f0| 32 31 3a 59 3d 35 3a 4c | 25 3d 31 32 3a e7 54 59 |21:Y=5:L|%=12:.TY|
|00002100| 24 3d 22 35 22 8c f2 54 | 59 35 3a e5 8d 44 68 46 |$="5"..T|Y5:..DhF|
|00002110| 0d 06 5e 17 e7 54 59 24 | 3d 22 36 22 8c f2 54 59 |..^..TY$|="6"..TY|
|00002120| 36 3a e5 8d 44 68 46 0d | 06 68 36 f2 54 45 58 54 |6:..DhF.|.h6.TEXT|
|00002130| 3a 54 31 3d bb 28 54 24 | 29 3a 54 31 24 3d 54 24 |:T1=.(T$|):T1$=T$|
|00002140| 3a 59 3d 36 3a 58 3d 32 | 31 3a e7 54 59 24 3d 22 |:Y=6:X=2|1:.TY$="|
|00002150| 35 22 8c f2 54 59 35 3a | e5 8d 74 46 46 0d 06 72 |5"..TY5:|..tFF..r|
|00002160| 17 e7 54 59 24 3d 22 36 | 22 8c f2 54 59 36 3a e5 |..TY$="6|"..TY6:.|
|00002170| 8d 74 46 46 0d 06 7c 19 | f2 54 45 58 54 3a 54 32 |.tFF..|.|.TEXT:T2|
|00002180| 3d bb 28 54 24 29 3a 54 | 32 24 3d 54 24 0d 06 86 |=.(T$):T|2$=T$...|
|00002190| 32 54 32 24 3d 54 24 3a | e7 54 59 24 3d 22 36 22 |2T2$=T$:|.TY$="6"|
|000021a0| 84 54 59 24 3d 22 35 22 | 8c 4d 41 43 24 28 56 41 |.TY$="5"|.MAC$(VA|
|000021b0| 25 29 3d 54 31 24 2b 54 | 24 3a e5 8d 74 6e 46 0d |%)=T1$+T|$:..tnF.|
|000021c0| 06 90 18 e7 54 31 24 3d | 22 22 8c 54 31 3d 2d 39 |....T1$=|"".T1=-9|
|000021d0| 39 39 39 39 39 39 39 0d | 06 9a 17 e7 54 32 24 3d |9999999.|....T2$=|
|000021e0| 22 22 8c 54 32 3d 39 39 | 39 39 39 39 39 39 0d 06 |"".T2=99|999999..|
|000021f0| a4 4f f2 43 4f 4e 56 28 | 54 31 2c 31 32 29 3a 4d |.O.CONV(|T1,12):M|
|00002200| 41 43 24 28 56 41 25 29 | 3d 4d 41 43 24 28 56 41 |AC$(VA%)|=MAC$(VA|
|00002210| 25 29 2b 53 54 4e 24 3a | f2 43 4f 4e 56 28 54 32 |%)+STN$:|.CONV(T2|
|00002220| 2c 31 32 29 3a 4d 41 43 | 24 28 56 41 25 29 3d 4d |,12):MAC|$(VA%)=M|
|00002230| 41 43 24 28 56 41 25 29 | 2b 53 54 4e 24 0d 06 ae |AC$(VA%)|+STN$...|
|00002240| 0a 49 24 3d 22 31 22 0d | 06 b8 34 4d 41 43 24 28 |.I$="1".|..4MAC$(|
|00002250| 56 41 25 29 3d 4d 41 43 | 24 28 56 41 25 29 2b 49 |VA%)=MAC|$(VA%)+I|
|00002260| 24 3a f2 4d 41 4c 28 22 | 45 22 29 3a 56 41 25 3d |$:.MAL("|E"):VA%=|
|00002270| 56 41 25 2b 31 3a e5 8d | 54 7e 43 0d 06 c2 05 fa |VA%+1:..|T~C.....|
|00002280| 0d 06 cc 09 dd f2 54 59 | 35 0d 06 d6 1d f1 8a 58 |......TY|5......X|
|00002290| 32 2c 59 32 29 3b 22 2e | 2e 2f 2e 2e 2f 2e 2e 22 |2,Y2);".|./../.."|
|000022a0| 3a 4e 24 3d 22 22 0d 06 | e0 1a 58 33 3d 58 32 3a |:N$=""..|..X3=X2:|
|000022b0| f2 44 41 54 3a e7 44 45 | 3d 31 8c e5 8d 64 56 46 |.DAT:.DE|=1...dVF|
|000022c0| 0d 06 ea 27 4e 24 3d 4e | 24 2b 44 41 54 24 3a 58 |...'N$=N|$+DAT$:X|
|000022d0| 33 3d 58 32 2b 33 3a f2 | 44 41 54 3a e7 44 45 3d |3=X2+3:.|DAT:.DE=|
|000022e0| 31 8c e5 8d 64 56 46 0d | 06 f4 2f 4e 24 3d 4e 24 |1...dVF.|../N$=N$|
|000022f0| 2b 22 2f 22 2b 44 41 54 | 24 2b 22 2f 22 3a 58 33 |+"/"+DAT|$+"/":X3|
|00002300| 3d 58 32 2b 36 3a f2 44 | 41 54 3a e7 44 45 3d 31 |=X2+6:.D|AT:.DE=1|
|00002310| 8c e5 8d 64 56 46 0d 06 | fe 0e 4e 24 3d 4e 24 2b |...dVF..|..N$=N$+|
|00002320| 44 41 54 24 0d 07 08 1b | 49 4e 3d a5 3a f2 43 48 |DAT$....|IN=.:.CH|
|00002330| 45 4b 3a e7 49 4e 3d 31 | 33 8c e5 8d 54 5c 47 0d |EK:.IN=1|3...T\G.|
|00002340| 07 12 17 e7 49 4e 3d 31 | 32 37 8c e5 8d 64 56 46 |....IN=1|27...dVF|
|00002350| 8b e5 8d 54 48 47 0d 07 | 1c 05 e1 0d 07 26 09 dd |...THG..|.....&..|
|00002360| f2 44 41 54 0d 07 30 16 | 44 45 3d 30 3a 44 41 54 |.DAT..0.|DE=0:DAT|
|00002370| 24 3d 22 22 3a 58 34 3d | 58 33 0d 07 3a 1b 49 4e |$="":X4=|X3..:.IN|
|00002380| 3d a5 3a e7 49 4e 3d 31 | 32 37 8c 44 45 3d 31 3a |=.:.IN=1|27.DE=1:|
|00002390| e5 8d 44 62 47 0d 07 44 | 23 e7 49 4e 3c 34 38 84 |..DbG..D|#.IN<48.|
|000023a0| 49 4e 3e 35 37 8c d4 31 | 2c 2d 31 35 2c 31 30 30 |IN>57..1|,-15,100|
|000023b0| 2c 32 3a e5 8d 54 7a 47 | 0d 07 4e 3b f1 8a 58 33 |,2:..TzG|..N;..X3|
|000023c0| 2c 59 32 29 3b bd 28 49 | 4e 29 3a 44 41 54 24 3d |,Y2);.(I|N):DAT$=|
|000023d0| 44 41 54 24 2b bd 28 49 | 4e 29 3a 58 33 3d 58 33 |DAT$+.(I|N):X3=X3|
|000023e0| 2b 31 3a e7 58 33 3e 28 | 58 34 2b 31 29 8c e5 8d |+1:.X3>(|X4+1)...|
|000023f0| 44 62 47 0d 07 58 09 e5 | 8d 54 7a 47 0d 07 62 05 |DbG..X..|.TzG..b.|
|00002400| e1 0d 07 6c 09 dd f2 54 | 59 36 0d 07 76 1a f1 8a |...l...T|Y6..v...|
|00002410| 58 32 2c 59 32 29 3b 22 | 2e 2e 3a 2e 2e 22 3a 4e |X2,Y2);"|..:..":N|
|00002420| 24 3d 22 22 0d 07 80 1a | 58 33 3d 58 32 3a f2 44 |$=""....|X3=X2:.D|
|00002430| 41 54 3a e7 44 45 3d 31 | 8c e5 8d 44 76 47 0d 07 |AT:.DE=1|...DvG..|
|00002440| 8a 1f 4e 24 3d 4e 24 2b | 44 41 54 24 2b 22 3a 22 |..N$=N$+|DAT$+":"|
|00002450| 3a 58 33 3d 58 32 2b 33 | 3a f2 44 41 54 0d 07 94 |:X3=X2+3|:.DAT...|
|00002460| 0e 4e 24 3d 4e 24 2b 44 | 41 54 24 0d 07 9e 1b 49 |.N$=N$+D|AT$....I|
|00002470| 4e 3d a5 3a f2 43 48 45 | 4b 3a e7 49 4e 3d 31 33 |N=.:.CHE|K:.IN=13|
|00002480| 8c e5 8d 74 72 47 0d 07 | a8 17 e7 49 4e 3d 31 32 |...trG..|...IN=12|
|00002490| 37 8c e5 8d 44 76 47 8b | e5 8d 74 5e 47 0d 07 b2 |7...DvG.|..t^G...|
|000024a0| 05 e1 0d 07 bc 76 db 3a | 58 3d 32 3a 59 3d 32 3a |.....v.:|X=2:Y=2:|
|000024b0| 57 25 3d 34 37 3a 4c 25 | 3d 32 3a f2 4c 57 4e 3a |W%=47:L%|=2:.LWN:|
|000024c0| f1 8a 33 2c 33 29 3b 22 | 48 6f 77 20 6d 61 6e 79 |..3,3);"|How many|
|000024d0| 20 76 61 6c 75 65 73 20 | 28 31 2d 31 36 29 20 66 | values |(1-16) f|
|000024e0| 6f 72 20 22 3b 46 4c 24 | 3b 22 3f 3a 22 3a 58 3d |or ";FL$|;"?:":X=|
|000024f0| 33 3a 59 3d 34 3a 4c 25 | 3d 32 3a f2 54 45 58 54 |3:Y=4:L%|=2:.TEXT|
|00002500| 3a e7 bb 28 54 24 29 3d | 30 84 bb 28 54 24 29 3e |:..(T$)=|0..(T$)>|
|00002510| 31 36 8c e5 8d 44 58 42 | 0d 07 c6 45 58 3d 31 30 |16...DXB|...EX=10|
|00002520| 3a 59 3d 37 3a 4c 25 3d | bb 28 54 24 29 3a 57 25 |:Y=7:L%=|.(T$):W%|
|00002530| 3d 32 38 3a f2 4c 57 4e | 3a f2 43 4f 4e 54 28 54 |=28:.LWN|:.CONT(T|
|00002540| 24 2c 32 29 3a 4d 41 43 | 24 28 56 41 25 29 3d 4d |$,2):MAC|$(VA%)=M|
|00002550| 41 43 24 28 56 41 25 29 | 2b 53 54 4e 24 0d 07 d0 |AC$(VA%)|+STN$...|
|00002560| 6d e3 49 3d 31 b8 bb 28 | 54 24 29 3a f1 8a 31 31 |m.I=1..(|T$):..11|
|00002570| 2c 49 2b 37 29 3b 22 45 | 6e 74 65 72 20 76 61 6c |,I+7);"E|nter val|
|00002580| 75 65 20 22 3b 49 3b 22 | 3a 22 3a 58 3d 32 37 3a |ue ";I;"|:":X=27:|
|00002590| 59 3d 49 2b 37 3a 4c 25 | 3d 31 32 3a f2 54 45 58 |Y=I+7:L%|=12:.TEX|
|000025a0| 54 3a f2 43 4f 4e 54 28 | 54 24 2c 31 32 29 3a 4d |T:.CONT(|T$,12):M|
|000025b0| 41 43 24 28 56 41 25 29 | 3d 4d 41 43 24 28 56 41 |AC$(VA%)|=MAC$(VA|
|000025c0| 25 29 2b 53 54 4e 24 3a | ed 49 0d 07 da 1d f2 4d |%)+STN$:|.I.....M|
|000025d0| 41 4c 28 22 46 22 29 3a | 56 41 25 3d 56 41 25 2b |AL("F"):|VA%=VA%+|
|000025e0| 31 3a e5 8d 54 7e 43 0d | 07 e4 05 db 0d 07 ee 47 |1:..T~C.|.......G|
|000025f0| 58 3d 32 3a 59 3d 38 3a | 57 25 3d 37 30 3a 4c 25 |X=2:Y=8:|W%=70:L%|
|00002600| 3d 32 3a f2 4c 57 4e 3a | f1 8a 33 2c 39 29 3b 22 |=2:.LWN:|..3,9);"|
|00002610| 45 6e 74 65 72 20 72 6f | 75 6e 64 69 6e 67 20 66 |Enter ro|unding f|
|00002620| 69 67 75 72 65 20 66 6f | 72 20 22 3b 46 4c 24 3b |igure fo|r ";FL$;|
|00002630| 22 3a 22 0d 07 f8 32 58 | 3d 33 3a 59 3d 31 30 3a |":"...2X|=3:Y=10:|
|00002640| 4c 25 3d 31 3a f2 54 45 | 58 54 3a 54 52 49 4d 25 |L%=1:.TE|XT:TRIM%|
|00002650| 3d bb 28 54 24 29 3a e7 | 54 52 49 4d 25 3e 38 8c |=.(T$):.|TRIM%>8.|
|00002660| e5 8d 64 78 47 0d 08 02 | 30 4d 41 43 24 28 56 41 |..dxG...|0MAC$(VA|
|00002670| 25 29 3d c3 28 54 52 49 | 4d 25 29 3a f2 4d 41 4c |%)=.(TRI|M%):.MAL|
|00002680| 28 22 47 22 29 3a 56 41 | 25 3d 56 41 25 2b 31 3a |("G"):VA|%=VA%+1:|
|00002690| e5 8d 54 7e 43 0d 08 0c | 99 58 3d 32 3a 59 3d 38 |..T~C...|.X=2:Y=8|
|000026a0| 3a 57 25 3d 37 30 3a 4c | 25 3d 32 3a f2 4c 57 4e |:W%=70:L|%=2:.LWN|
|000026b0| 3a f1 8a 33 2c 39 29 3b | 22 45 6e 74 65 72 20 6e |:..3,9);|"Enter n|
|000026c0| 75 6d 62 65 72 20 6f 66 | 20 64 65 63 69 6d 61 6c |umber of| decimal|
|000026d0| 20 70 6c 61 63 65 73 20 | 61 6c 6c 20 6e 75 6d 65 | places |all nume|
|000026e0| 72 69 63 20 66 69 65 6c | 64 73 20 77 69 6c 6c 20 |ric fiel|ds will |
|000026f0| 62 65 20 54 72 69 6d 6d | 65 64 20 74 6f 3a 22 3a |be Trimm|ed to:":|
|00002700| 58 3d 33 3a 59 3d 31 30 | 3a 4c 25 3d 31 3a f2 54 |X=3:Y=10|:L%=1:.T|
|00002710| 45 58 54 3a 54 52 49 4d | 25 3d bb 28 54 24 29 3a |EXT:TRIM|%=.(T$):|
|00002720| e7 54 52 49 4d 25 3e 38 | 8c e5 8d 54 4c 48 0d 08 |.TRIM%>8|...TLH..|
|00002730| 16 3d 54 31 24 3d c0 53 | 50 4d 24 2c 32 29 3a 54 |.=T1$=.S|PM$,2):T|
|00002740| 32 24 3d c1 53 50 4d 24 | 2c 34 2c a9 28 53 50 4d |2$=.SPM$|,4,.(SPM|
|00002750| 24 29 2d 33 29 3a 53 50 | 4d 24 3d 54 31 24 2b 54 |$)-3):SP|M$=T1$+T|
|00002760| 24 2b 54 32 24 3a e5 8d | 54 7e 43 0d 08 20 20 e7 |$+T2$:..|T~C.. .|
|00002770| 54 59 24 3d 22 30 22 84 | 54 59 24 3d 22 35 22 8c |TY$="0".|TY$="5".|
|00002780| e5 8d 54 6a 48 8b e5 8d | 54 7e 43 0d 08 2a 1d db |..TjH...|T~C..*..|
|00002790| 3a 58 3d 32 3a 59 3d 32 | 3a 57 25 3d 36 30 3a 4c |:X=2:Y=2|:W%=60:L|
|000027a0| 25 3d 35 3a f2 4c 57 4e | 0d 08 34 12 e7 54 59 24 |%=5:.LWN|..4..TY$|
|000027b0| 3d 22 35 22 8c e5 8d 74 | 66 49 0d 08 3e 40 f1 8a |="5"...t|fI..>@..|
|000027c0| 33 2c 33 29 3b 22 50 6c | 65 61 73 65 20 65 6e 74 |3,3);"Pl|ease ent|
|000027d0| 65 72 20 46 6f 72 6d 75 | 6c 61 20 66 6f 72 20 22 |er Formu|la for "|
|000027e0| 3b 46 4c 24 3b 22 3a 22 | 3b 8a 33 2c 35 29 3b 22 |;FL$;":"|;.3,5);"|
|000027f0| 23 22 3b 53 46 25 3b 22 | 3d 22 0d 08 48 24 58 3d |#";SF%;"|="..H$X=|
|00002800| 38 3a 59 3d 35 3a 4c 25 | 3d 35 30 3a f2 54 45 58 |8:Y=5:L%|=50:.TEX|
|00002810| 54 3a e7 54 24 3d 22 22 | 8c e5 8d 54 7e 43 0d 08 |T:.T$=""|...T~C..|
|00002820| 52 46 f1 8a 33 2c 37 29 | 3b 22 50 6c 65 61 73 65 |RF..3,7)|;"Please|
|00002830| 20 77 61 69 74 3a 20 63 | 68 65 63 6b 69 6e 67 20 | wait: c|hecking |
|00002840| 46 6f 72 6d 75 6c 61 2e | 20 20 20 20 20 20 20 20 |Formula.| |
|00002850| 22 3a 4d 46 25 3d 53 46 | 25 2d 31 3a f2 46 4f 52 |":MF%=SF|%-1:.FOR|
|00002860| 54 52 41 4e 0d 08 5c 60 | e7 45 52 25 3d 31 8c f1 |TRAN..\`|.ER%=1..|
|00002870| 8a 33 2c 37 29 3b 22 46 | 4f 52 4d 55 4c 41 20 45 |.3,7);"F|ORMULA E|
|00002880| 52 52 4f 52 21 20 50 4c | 45 41 53 45 20 52 45 2d |RROR! PL|EASE RE-|
|00002890| 45 4e 54 45 52 20 20 20 | 20 20 20 20 20 20 20 20 |ENTER | |
|000028a0| 22 3a d4 31 2c 2d 31 35 | 2c 31 37 30 2c 38 3a f1 |":.1,-15|,170,8:.|
|000028b0| 8a 38 2c 35 29 3b c4 35 | 30 2c 22 20 22 29 3a e5 |.8,5);.5|0," "):.|
|000028c0| 8d 44 48 48 0d 08 66 2a | 4d 41 43 24 28 56 41 25 |.DHH..f*|MAC$(VA%|
|000028d0| 29 3d 54 24 3a f2 4d 41 | 4c 28 22 48 22 29 3a 56 |)=T$:.MA|L("H"):V|
|000028e0| 41 25 3d 56 41 25 2b 31 | 3a e5 8d 54 7e 43 0d 08 |A%=VA%+1|:..T~C..|
|000028f0| 70 13 dd f2 46 4f 52 54 | 52 41 4e 3a 45 52 25 3d |p...FORT|RAN:ER%=|
|00002900| 30 0d 08 7a 1f e3 46 3d | 31 b8 35 3a e7 c0 54 24 |0..z..F=|1.5:..T$|
|00002910| 2c 33 29 3d 46 55 24 28 | 46 29 8c e5 8d 54 64 49 |,3)=FU$(|F)...TdI|
|00002920| 0d 08 84 06 ed 46 0d 08 | 8e 2a 46 54 52 24 3d 22 |.....F..|.*FTR$="|
|00002930| 22 3a e3 49 3d 31 b8 a9 | 28 54 24 29 3a e7 c1 54 |":.I=1..|(T$):..T|
|00002940| 24 2c 49 2c 31 29 3d 22 | 23 22 8c e5 8d 74 62 48 |$,I,1)="|#"...tbH|
|00002950| 0d 08 98 1c 46 54 52 24 | 3d 46 54 52 24 2b c1 54 |....FTR$|=FTR$+.T|
|00002960| 24 2c 49 2c 31 29 3a e5 | 8d 64 68 48 0d 08 a2 12 |$,I,1):.|.dhH....|
|00002970| e7 49 3d a9 28 54 24 29 | 8c e5 8d 54 50 49 0d 08 |.I=.(T$)|...TPI..|
|00002980| ac 10 4c 3d 49 2b 31 3a | 46 54 24 3d 22 22 0d 08 |..L=I+1:|FT$=""..|
|00002990| b6 39 e7 97 28 c1 54 24 | 2c 4c 2c 31 29 29 3e 34 |.9..(.T$|,L,1))>4|
|000029a0| 37 80 97 28 c1 54 24 2c | 4c 2c 31 29 29 3c 35 38 |7..(.T$,|L,1))<58|
|000029b0| 8c 46 54 24 3d 46 54 24 | 2b c1 54 24 2c 4c 2c 31 |.FT$=FT$|+.T$,L,1|
|000029c0| 29 8b e5 8d 64 54 48 0d | 08 c0 18 4c 3d 4c 2b 31 |)...dTH.|...L=L+1|
|000029d0| 3a e7 4c 3e a9 28 54 24 | 29 8c e5 8d 64 54 48 0d |:.L>.(T$|)...dTH.|
|000029e0| 08 ca 09 e5 8d 74 76 48 | 0d 08 d4 1e e7 bb 28 46 |.....tvH|......(F|
|000029f0| 54 24 29 3d 30 84 bb 28 | 46 54 24 29 3e 4d 46 25 |T$)=0..(|FT$)>MF%|
|00002a00| 8c e5 8d 54 50 49 0d 08 | de 17 46 54 52 24 3d 46 |...TPI..|..FTR$=F|
|00002a10| 54 52 24 2b 22 31 22 3a | 49 3d 4c 2d 31 0d 08 e8 |TR$+"1":|I=L-1...|
|00002a20| 06 ed 49 0d 08 f2 0b ee | 85 e5 8d 54 50 49 0d 08 |..I.....|...TPI..|
|00002a30| fc 0e 46 54 3d a0 28 46 | 54 52 24 29 0d 09 06 05 |..FT=.(F|TR$)....|
|00002a40| e1 0d 09 10 09 45 52 25 | 3d 31 0d 09 1a 09 e5 8d |.....ER%|=1......|
|00002a50| 44 5c 48 0d 09 24 20 e7 | a9 28 54 24 29 3d 33 84 |D\H..$ .|.(T$)=3.|
|00002a60| c1 54 24 2c 34 2c 31 29 | 3c 3e 22 23 22 8c e5 8d |.T$,4,1)|<>"#"...|
|00002a70| 54 50 49 0d 09 2e 41 4d | 24 3d c0 54 24 2c 33 29 |TPI...AM|$=.T$,3)|
|00002a80| 3a 4c 3d 35 3a f2 46 47 | 45 54 3a f2 43 4f 4e 56 |:L=5:.FG|ET:.CONV|
|00002a90| 28 bb 28 46 54 24 29 2c | 33 29 3a 46 54 52 24 3d |(.(FT$),|3):FTR$=|
|00002aa0| 4d 24 2b 53 54 4e 24 3a | e7 4c 45 25 3d 31 8c e5 |M$+STN$:|.LE%=1..|
|00002ab0| 8d 54 50 49 0d 09 38 12 | e7 4c 3d a9 28 54 24 29 |.TPI..8.|.L=.(T$)|
|00002ac0| 8c e5 8d 54 50 49 0d 09 | 42 54 4c 3d 4c 2b 31 3a |...TPI..|BTL=L+1:|
|00002ad0| f2 46 47 45 54 3a f2 43 | 4f 4e 56 28 bb 28 46 54 |.FGET:.C|ONV(.(FT|
|00002ae0| 24 29 2c 33 29 3a 46 54 | 52 24 3d 46 54 52 24 2b |$),3):FT|R$=FTR$+|
|00002af0| 53 54 4e 24 3a 54 24 3d | 46 54 52 24 3a 54 31 3d |STN$:T$=|FTR$:T1=|
|00002b00| bb 28 c1 54 24 2c 34 2c | 33 29 29 3a 54 32 3d bb |.(.T$,4,|3)):T2=.|
|00002b10| 28 c1 54 24 2c 37 2c 33 | 29 29 0d 09 4c 12 e7 54 |(.T$,7,3|))..L..T|
|00002b20| 32 3c 3d 54 31 20 8c e5 | 8d 54 50 49 0d 09 56 09 |2<=T1 ..|.TPI..V.|
|00002b30| e5 8d 54 46 49 0d 09 60 | 17 dd f2 46 47 45 54 3a |..TFI..`|...FGET:|
|00002b40| 46 54 24 3d 22 22 3a 4c | 45 25 3d 30 0d 09 6a 33 |FT$="":L|E%=0..j3|
|00002b50| e7 97 28 c1 54 24 2c 4c | 2c 31 29 29 3e 34 37 80 |..(.T$,L|,1))>47.|
|00002b60| 97 28 c1 54 24 2c 4c 2c | 31 29 29 3c 35 38 8c 46 |.(.T$,L,|1))<58.F|
|00002b70| 54 24 3d 46 54 24 2b c1 | 54 24 2c 4c 2c 31 29 0d |T$=FT$+.|T$,L,1).|
|00002b80| 09 74 18 e7 4c 3d a9 28 | 54 24 29 8c 4c 45 25 3d |.t..L=.(|T$).LE%=|
|00002b90| 31 3a e5 8d 74 52 49 0d | 09 7e 17 e7 c1 54 24 2c |1:..tRI.|.~...T$,|
|00002ba0| 4c 2c 31 29 3d 22 23 22 | 8c e5 8d 74 52 49 0d 09 |L,1)="#"|...tRI..|
|00002bb0| 88 0f 4c 3d 4c 2b 31 3a | e5 8d 44 6a 49 0d 09 92 |..L=L+1:|..DjI...|
|00002bc0| 1e e7 bb 28 46 54 24 29 | 3d 30 84 bb 28 46 54 24 |...(FT$)|=0..(FT$|
|00002bd0| 29 3e 4d 46 25 8c e5 8d | 54 50 49 0d 09 9c 05 e1 |)>MF%...|TPI.....|
|00002be0| 0d 09 a6 66 f1 8a 33 2c | 33 29 3b 22 50 6c 65 61 |...f..3,|3);"Plea|
|00002bf0| 73 65 20 65 6e 74 65 72 | 20 44 61 74 65 20 46 6f |se enter| Date Fo|
|00002c00| 72 6d 75 6c 61 20 66 6f | 72 20 22 3b 46 4c 24 3b |rmula fo|r ";FL$;|
|00002c10| 22 3a 22 3b 8a 33 2c 35 | 29 3b 22 23 22 3b 53 46 |":";.3,5|);"#";SF|
|00002c20| 25 3b 22 3d 22 3a 58 3d | 38 3a 59 3d 35 3a 4c 25 |%;"=":X=|8:Y=5:L%|
|00002c30| 3d 35 30 3a f2 54 45 58 | 54 3a e7 54 24 3d 22 22 |=50:.TEX|T:.T$=""|
|00002c40| 8c e5 8d 54 7e 43 0d 09 | b0 33 f1 8a 33 2c 37 29 |...T~C..|.3..3,7)|
|00002c50| 3b 22 50 6c 65 61 73 65 | 20 77 61 69 74 3a 20 63 |;"Please| wait: c|
|00002c60| 68 65 63 6b 69 6e 67 20 | 46 6f 72 6d 75 6c 61 2e |hecking |Formula.|
|00002c70| 20 20 20 20 20 20 20 20 | 22 0d 09 ba 22 e7 54 24 | |"...".T$|
|00002c80| 3d 22 54 4f 44 41 59 22 | 8c 4d 41 43 24 28 56 41 |="TODAY"|.MAC$(VA|
|00002c90| 25 29 3d 54 24 3a e5 8d | 44 50 4a 0d 09 c4 2a e7 |%)=T$:..|DPJ...*.|
|00002ca0| c0 54 24 2c 36 29 3d 22 | 54 4f 44 41 59 2b 22 84 |.T$,6)="|TODAY+".|
|00002cb0| c0 54 24 2c 36 29 3d 22 | 54 4f 44 41 59 2d 22 8c |.T$,6)="|TODAY-".|
|00002cc0| e5 8d 64 62 49 0d 09 ce | 15 e7 c0 54 24 2c 31 29 |..dbI...|...T$,1)|
|00002cd0| 3d 22 23 22 8c e5 8d 54 | 40 4a 0d 09 d8 59 f1 8a |="#"...T|@J...Y..|
|00002ce0| 33 2c 37 29 3b 22 46 4f | 52 4d 55 4c 41 20 45 52 |3,7);"FO|RMULA ER|
|00002cf0| 52 4f 52 21 20 50 4c 45 | 41 53 45 20 52 45 2d 45 |ROR! PLE|ASE RE-E|
|00002d00| 4e 54 45 52 20 20 20 20 | 20 20 20 20 20 20 20 22 |NTER | "|
|00002d10| 3a d4 31 2c 2d 31 35 2c | 31 37 30 2c 38 3a f1 8a |:.1,-15,|170,8:..|
|00002d20| 38 2c 35 29 3b c4 35 30 | 2c 22 20 22 29 3a e5 8d |8,5);.50|," "):..|
|00002d30| 74 66 49 0d 09 e2 12 e7 | a9 28 54 24 29 3d 36 8c |tfI.....|.(T$)=6.|
|00002d40| e5 8d 64 58 49 0d 09 ec | 18 46 54 24 3d c1 54 24 |..dXI...|.FT$=.T$|
|00002d50| 2c 37 2c 28 a9 28 54 24 | 29 2d 36 29 29 0d 09 f6 |,7,(.(T$|)-6))...|
|00002d60| 24 4d 41 43 24 28 56 41 | 25 29 3d 22 54 22 2b c1 |$MAC$(VA|%)="T"+.|
|00002d70| 54 24 2c 36 2c 31 29 2b | 46 54 24 3a e5 8d 44 50 |T$,6,1)+|FT$:..DP|
|00002d80| 4a 0d 0a 00 1c 4c 3d 32 | 3a 46 54 24 3d 22 22 3a |J....L=2|:FT$="":|
|00002d90| e7 54 24 3d 22 23 22 8c | e5 8d 64 58 49 0d 0a 0a |.T$="#".|..dXI...|
|00002da0| 28 e7 97 28 c1 54 24 2c | 4c 2c 31 29 29 3c 34 38 |(..(.T$,|L,1))<48|
|00002db0| 84 97 28 c1 54 24 2c 4c | 2c 31 29 29 3e 35 37 8c |..(.T$,L|,1))>57.|
|00002dc0| e5 8d 54 68 4a 0d 0a 14 | 1a 46 54 24 3d 46 54 24 |..ThJ...|.FT$=FT$|
|00002dd0| 2b c1 54 24 2c 4c 2c 31 | 29 3a 4c 3d 4c 2b 31 0d |+.T$,L,1|):L=L+1.|
|00002de0| 0a 1e 18 e7 4c 3e a9 28 | 54 24 29 8c e5 8d 64 58 |....L>.(|T$)...dX|
|00002df0| 49 8b e5 8d 54 4a 4a 0d | 0a 28 2a e7 c1 54 24 2c |I...TJJ.|.(*..T$,|
|00002e00| 4c 2c 31 29 3d 22 2b 22 | 84 c1 54 24 2c 4c 2c 31 |L,1)="+"|..T$,L,1|
|00002e10| 29 3d 22 2d 22 8c e5 8d | 54 72 4a 8b e5 8d 64 58 |)="-"...|TrJ...dX|
|00002e20| 49 0d 0a 32 12 e7 4c 3d | a9 28 54 24 29 8c e5 8d |I..2..L=|.(T$)...|
|00002e30| 64 58 49 0d 0a 3c 34 f2 | 43 4f 4e 56 28 bb 28 46 |dXI..<4.|CONV(.(F|
|00002e40| 54 24 29 2c 33 29 3a e7 | bb 28 53 54 4e 24 29 3e |T$),3):.|.(STN$)>|
|00002e50| 28 53 46 25 2d 31 29 84 | bb 28 53 54 4e 24 29 3d |(SF%-1).|.(STN$)=|
|00002e60| 30 8c e5 8d 64 58 49 0d | 0a 46 3b 4d 41 43 24 28 |0...dXI.|.F;MAC$(|
|00002e70| 56 41 25 29 3d 22 23 22 | 2b 53 54 4e 24 2b c1 54 |VA%)="#"|+STN$+.T|
|00002e80| 24 2c 4c 2c 31 29 2b c1 | 54 24 2c 28 4c 2b 31 29 |$,L,1)+.|T$,(L+1)|
|00002e90| 2c a9 28 54 24 29 2d 28 | a9 28 46 54 24 29 2b 32 |,.(T$)-(|.(FT$)+2|
|00002ea0| 29 29 0d 0a 50 1d f2 4d | 41 4c 28 22 48 22 29 3a |))..P..M|AL("H"):|
|00002eb0| 56 41 25 3d 56 41 25 2b | 31 3a e5 8d 54 7e 43 0d |VA%=VA%+|1:..T~C.|
|00002ec0| 0a 5a 11 e7 4d 41 49 25 | 3d 30 8c e5 8d 44 58 42 |.Z..MAI%|=0...DXB|
|00002ed0| 0d 0a 64 7e db 3a f1 8a | 32 2c 32 29 3b 22 45 72 |..d~.:..|2,2);"Er|
|00002ee0| 61 73 65 20 4d 61 63 72 | 6f 22 3b 8a 32 2c 33 29 |ase Macr|o";.2,3)|
|00002ef0| 3b c4 31 31 2c bd 28 32 | 34 31 29 29 3b 8a 32 2c |;.11,.(2|41));.2,|
|00002f00| 35 29 3b 22 53 65 6c 65 | 63 74 20 61 20 66 69 65 |5);"Sele|ct a fie|
|00002f10| 6c 64 20 75 70 6f 6e 20 | 77 68 69 63 68 20 74 68 |ld upon |which th|
|00002f20| 65 20 4d 61 63 72 6f 22 | 3b 8a 32 2c 36 29 3b 22 |e Macro"|;.2,6);"|
|00002f30| 79 6f 75 20 77 69 73 68 | 20 74 6f 20 65 72 61 73 |you wish| to eras|
|00002f40| 65 20 77 6f 72 6b 73 3a | 22 3a f2 53 45 4c 0d 0a |e works:|":.SEL..|
|00002f50| 6e 83 58 3d 32 3a 59 3d | 38 3a 57 25 3d 32 34 3a |n.X=2:Y=|8:W%=24:|
|00002f60| 4c 25 3d 34 3a f2 4c 57 | 4e 3a f1 8a 33 2c 39 29 |L%=4:.LW|N:..3,9)|
|00002f70| 3b 22 20 20 53 65 6c 65 | 63 74 20 45 78 65 63 75 |;" Sele|ct Execu|
|00002f80| 74 65 20 50 6f 69 6e 74 | 3a 22 3a 4d 45 24 28 31 |te Point|:":ME$(1|
|00002f90| 29 3d 22 4f 6e 20 45 6e | 74 72 79 22 3a 4d 45 24 |)="On En|try":ME$|
|00002fa0| 28 32 29 3d 22 4f 6e 20 | 45 78 69 74 22 3a 4d 45 |(2)="On |Exit":ME|
|00002fb0| 24 28 33 29 3d 22 51 75 | 69 74 22 3a 58 3d 33 3a |$(3)="Qu|it":X=3:|
|00002fc0| 59 3d 31 30 3a 4c 25 3d | 33 3a f2 53 45 4c 45 43 |Y=10:L%=|3:.SELEC|
|00002fd0| 54 0d 0a 78 1c 49 24 3d | c3 28 53 45 4c 25 29 3a |T..x.I$=|.(SEL%):|
|00002fe0| e7 49 24 3d 22 33 22 8c | e5 8d 44 58 42 0d 0a 82 |.I$="3".|..DXB...|
|00002ff0| 33 43 46 25 3d 53 46 25 | 3a f2 46 4f 50 4f 55 54 |3CF%=SF%|:.FOPOUT|
|00003000| 3a e7 49 24 3d 22 31 22 | 8c 54 49 24 3d c0 54 52 |:.I$="1"|.TI$=.TR|
|00003010| 24 2c 31 29 8b 54 49 24 | 3d c2 54 52 24 2c 31 29 |$,1).TI$|=.TR$,1)|
|00003020| 0d 0a 8c 1a e7 54 49 24 | 3d 22 30 22 84 54 49 24 |.....TI$|="0".TI$|
|00003030| 3d 22 33 22 8c e5 8d 44 | 58 42 0d 0a 96 39 f2 43 |="3"...D|XB...9.C|
|00003040| 4f 4e 56 28 53 46 25 2c | 33 29 3a 53 45 24 3d 53 |ONV(SF%,|3):SE$=S|
|00003050| 54 4e 24 3a e7 49 24 3d | 22 31 22 8c 53 45 24 3d |TN$:.I$=|"1".SE$=|
|00003060| 53 45 24 2b 22 49 22 8b | 53 45 24 3d 53 45 24 2b |SE$+"I".|SE$=SE$+|
|00003070| 22 4f 22 0d 0a a0 07 4c | 3d 31 0d 0a aa 1a e7 c0 |"O"....L|=1......|
|00003080| 4d 41 4c 24 28 4c 29 2c | 34 29 3d 53 45 24 8c e5 |MAL$(L),|4)=SE$..|
|00003090| 8d 64 48 4a 0d 0a b4 16 | 4c 3d 4c 2b 31 3a e7 4c |.dHJ....|L=L+1:.L|
|000030a0| 3d 56 41 25 8c e5 8d 44 | 58 42 0d 0a be 09 e5 8d |=VA%...D|XB......|
|000030b0| 74 6a 4a 0d 0a c8 4a e7 | 4c 3d 31 80 56 41 25 3d |tjJ...J.|L=1.VA%=|
|000030c0| 32 8c 56 41 25 3d 31 3a | cf 23 41 3d 32 38 3a f1 |2.VA%=1:|.#A=28:.|
|000030d0| 23 41 2c 22 30 22 3a e3 | 4a 3d 30 b8 34 30 3a 4d |#A,"0":.|J=0.40:M|
|000030e0| 41 43 24 28 4a 29 3d 22 | 22 3a 4d 41 4c 24 28 4a |AC$(J)="|":MAL$(J|
|000030f0| 29 3d 22 22 3a ed 4a 3a | e5 8d 54 62 4b 0d 0a d2 |)="":.J:|..TbK...|
|00003100| 11 d4 20 31 2c 2d 31 35 | 2c 32 30 30 2c 35 0d 0a |.. 1,-15|,200,5..|
|00003110| dc 36 e7 4c 3d 56 41 25 | 2d 31 8c 56 41 25 3d 56 |.6.L=VA%|-1.VA%=V|
|00003120| 41 25 2d 31 3a 4d 41 43 | 24 28 56 41 25 29 3d 22 |A%-1:MAC|$(VA%)="|
|00003130| 22 3a 4d 41 4c 24 28 56 | 41 25 29 3d 22 22 3a e5 |":MAL$(V|A%)="":.|
|00003140| 8d 64 70 4a 0d 0a e6 5c | e3 4a 3d 4c 20 b8 28 56 |.dpJ...\|.J=L .(V|
|00003150| 41 25 2d 32 29 3a 4d 41 | 43 24 28 4a 29 3d 4d 41 |A%-2):MA|C$(J)=MA|
|00003160| 43 24 28 4a 2b 31 29 3a | 4d 41 4c 24 28 4a 29 3d |C$(J+1):|MAL$(J)=|
|00003170| 4d 41 4c 24 28 4a 2b 31 | 29 3a ed 4a 3a 56 41 25 |MAL$(J+1|):.J:VA%|
|00003180| 3d 56 41 25 2d 31 3a 4d | 41 43 24 28 56 41 25 29 |=VA%-1:M|AC$(VA%)|
|00003190| 3d 22 22 3a 4d 41 4c 24 | 28 56 41 25 29 3d 22 22 |="":MAL$|(VA%)=""|
|000031a0| 0d 0a f0 14 e7 54 49 24 | 3d 22 31 22 8c 54 49 24 |.....TI$|="1".TI$|
|000031b0| 3d 22 30 22 0d 0a fa 14 | e7 54 49 24 3d 22 32 22 |="0"....|.TI$="2"|
|000031c0| 8c 54 49 24 3d 22 33 22 | 0d 0b 04 1b e7 49 24 3d |.TI$="3"|.....I$=|
|000031d0| 22 31 22 8c 54 52 24 3d | 54 49 24 2b c2 54 52 24 |"1".TR$=|TI$+.TR$|
|000031e0| 2c 31 29 0d 0b 0e 1b e7 | 49 24 3d 22 32 22 8c 54 |,1).....|I$="2".T|
|000031f0| 52 24 3d c0 54 52 24 2c | 31 29 2b 54 49 24 0d 0b |R$=.TR$,|1)+TI$..|
|00003200| 18 31 cf 23 41 3d 28 53 | 46 25 2d 31 29 2a 36 31 |.1.#A=(S|F%-1)*61|
|00003210| 2b 31 31 37 3a f1 23 41 | 2c 54 52 24 3a d4 31 2c |+117:.#A|,TR$:.1,|
|00003220| 2d 31 35 2c 31 30 30 2c | 31 3a e5 8d 44 58 42 0d |-15,100,|1:..DXB.|
|00003230| 0b 22 3e e3 49 3d 31 b8 | 4e 4f 46 25 3a cf 23 41 |.">.I=1.|NOF%:.#A|
|00003240| 3d 28 49 2d 31 29 2a 36 | 31 2b 31 31 37 3a e8 23 |=(I-1)*6|1+117:.#|
|00003250| 41 2c 54 52 24 3a 54 31 | 24 3d c0 54 52 24 2c 31 |A,TR$:T1|$=.TR$,1|
|00003260| 29 3a 54 32 24 3d c2 54 | 52 24 2c 31 29 0d 0b 2c |):T2$=.T|R$,1)..,|
|00003270| 14 e7 54 31 24 3d 22 31 | 22 8c 54 31 24 3d 22 30 |..T1$="1|".T1$="0|
|00003280| 22 0d 0b 36 14 e7 54 31 | 24 3d 22 32 22 8c 54 31 |"..6..T1|$="2".T1|
|00003290| 24 3d 22 33 22 0d 0b 40 | 14 e7 54 32 24 3d 22 31 |$="3"..@|..T2$="1|
|000032a0| 22 8c 54 32 24 3d 22 30 | 22 0d 0b 4a 14 e7 54 32 |".T2$="0|"..J..T2|
|000032b0| 24 3d 22 32 22 8c 54 32 | 24 3d 22 33 22 0d 0b 54 |$="2".T2|$="3"..T|
|000032c0| a0 54 52 24 3d 54 31 24 | 2b 54 32 24 3a cf 23 41 |.TR$=T1$|+T2$:.#A|
|000032d0| 3d 28 49 2d 31 29 2a 36 | 31 2b 31 31 37 3a f1 23 |=(I-1)*6|1+117:.#|
|000032e0| 41 2c 54 52 24 3a ed 49 | 3a 53 50 4d 24 3d 22 30 |A,TR$:.I|:SPM$="0|
|000032f0| 20 30 20 20 30 30 30 30 | 30 30 22 3a 4d 41 49 25 | 0 0000|00":MAI%|
|00003300| 3d 30 3a ff 22 43 4c 4f | 53 45 22 3a ff 22 52 45 |=0:."CLO|SE":."RE|
|00003310| 4d 4f 56 45 20 3c 44 61 | 74 61 56 69 73 69 6f 6e |MOVE <Da|taVision|
|00003320| 24 44 69 72 3e 2e 22 2b | 46 49 24 2b 22 45 22 3a |$Dir>."+|FI$+"E":|
|00003330| db 3a f1 8a 32 2c 32 29 | 3b 22 41 6c 6c 20 4d 61 |.:..2,2)|;"All Ma|
|00003340| 63 72 6f 73 20 68 61 76 | 65 20 62 65 65 6e 20 45 |cros hav|e been E|
|00003350| 72 61 73 65 64 2e 22 3a | e5 8d 44 58 42 0d 0b 5e |rased.":|..DXB..^|
|00003360| 11 e7 4d 41 49 25 3d 30 | 8c e5 8d 44 58 42 0d 0b |..MAI%=0|...DXB..|
|00003370| 68 80 db 3a f1 8a 32 2c | 32 29 3b 22 4d 6f 64 69 |h..:..2,|2);"Modi|
|00003380| 66 79 20 4d 61 63 72 6f | 22 3b 8a 32 2c 33 29 3b |fy Macro|";.2,3);|
|00003390| c4 31 32 2c bd 28 32 34 | 31 29 29 3b 8a 32 2c 35 |.12,.(24|1));.2,5|
|000033a0| 29 3b 22 53 65 6c 65 63 | 74 20 61 20 66 69 65 6c |);"Selec|t a fiel|
|000033b0| 64 20 75 70 6f 6e 20 77 | 68 69 63 68 20 74 68 65 |d upon w|hich the|
|000033c0| 20 4d 61 63 72 6f 22 3b | 8a 32 2c 36 29 3b 22 79 | Macro";|.2,6);"y|
|000033d0| 6f 75 20 77 69 73 68 20 | 74 6f 20 4d 6f 64 69 66 |ou wish |to Modif|
|000033e0| 79 20 77 6f 72 6b 73 3a | 22 3a f2 53 45 4c 0d 0b |y works:|":.SEL..|
|000033f0| 72 9c 58 3d 32 3a 59 3d | 38 3a 57 25 3d 32 34 3a |r.X=2:Y=|8:W%=24:|
|00003400| 4c 25 3d 34 3a f2 4c 57 | 4e 3a f1 8a 33 2c 39 29 |L%=4:.LW|N:..3,9)|
|00003410| 3b 22 20 20 53 65 6c 65 | 63 74 20 45 78 65 63 75 |;" Sele|ct Execu|
|00003420| 74 65 20 50 6f 69 6e 74 | 3a 22 3a 4d 45 24 28 31 |te Point|:":ME$(1|
|00003430| 29 3d 22 4f 6e 20 45 6e | 74 72 79 22 3a 4d 45 24 |)="On En|try":ME$|
|00003440| 28 32 29 3d 22 4f 6e 20 | 45 78 69 74 22 3a 4d 45 |(2)="On |Exit":ME|
|00003450| 24 28 33 29 3d 22 51 75 | 69 74 22 3a 58 3d 33 3a |$(3)="Qu|it":X=3:|
|00003460| 59 3d 31 30 3a 4c 25 3d | 33 3a f2 53 45 4c 45 43 |Y=10:L%=|3:.SELEC|
|00003470| 54 3a 49 24 3d c3 28 53 | 45 4c 25 29 3a e7 49 24 |T:I$=.(S|EL%):.I$|
|00003480| 3d 22 33 22 8c e5 8d 44 | 58 42 0d 0b 7c 33 43 46 |="3"...D|XB..|3CF|
|00003490| 25 3d 53 46 25 3a f2 46 | 4f 50 4f 55 54 3a e7 49 |%=SF%:.F|OPOUT:.I|
|000034a0| 24 3d 22 31 22 8c 54 49 | 24 3d c0 54 52 24 2c 31 |$="1".TI|$=.TR$,1|
|000034b0| 29 8b 54 49 24 3d c2 54 | 52 24 2c 31 29 0d 0b 86 |).TI$=.T|R$,1)...|
|000034c0| 1a e7 54 49 24 3d 22 30 | 22 84 54 49 24 3d 22 33 |..TI$="0|".TI$="3|
|000034d0| 22 8c e5 8d 44 58 42 0d | 0b 90 39 f2 43 4f 4e 56 |"...DXB.|..9.CONV|
|000034e0| 28 53 46 25 2c 33 29 3a | 53 45 24 3d 53 54 4e 24 |(SF%,3):|SE$=STN$|
|000034f0| 3a e7 49 24 3d 22 31 22 | 8c 53 45 24 3d 53 45 24 |:.I$="1"|.SE$=SE$|
|00003500| 2b 22 49 22 8b 53 45 24 | 3d 53 45 24 2b 22 4f 22 |+"I".SE$|=SE$+"O"|
|00003510| 0d 0b 9a 0f 4c 3d 31 3a | 41 43 54 24 3d 49 24 0d |....L=1:|ACT$=I$.|
|00003520| 0b a4 1a e7 c0 4d 41 4c | 24 28 4c 29 2c 34 29 3d |.....MAL|$(L),4)=|
|00003530| 53 45 24 8c e5 8d 64 42 | 4b 0d 0b ae 16 4c 3d 4c |SE$...dB|K....L=L|
|00003540| 2b 31 3a e7 4c 3d 56 41 | 25 8c e5 8d 44 58 42 0d |+1:.L=VA|%...DXB.|
|00003550| 0b b8 09 e5 8d 74 64 4b | 0d 0b c2 49 53 50 25 3d |.....tdK|...ISP%=|
|00003560| 56 41 25 3a 41 53 3d 97 | 28 c2 4d 41 4c 24 28 4c |VA%:AS=.|(.MAL$(L|
|00003570| 29 2c 31 29 29 2d 36 34 | 3a 4d 41 43 24 28 4c 29 |),1))-64|:MAC$(L)|
|00003580| 3d 22 22 3a 4d 41 4c 24 | 28 4c 29 3d 22 22 3a 56 |="":MAL$|(L)="":V|
|00003590| 41 25 3d 4c 3a 4d 46 59 | 25 3d 31 3a e5 8d 54 74 |A%=L:MFY|%=1:..Tt|
|000035a0| 43 0d 0b cc 11 e7 4d 41 | 49 25 3d 30 8c e5 8d 44 |C.....MA|I%=0...D|
|000035b0| 58 42 0d 0b d6 75 db 3a | f1 8a 32 2c 32 29 3b 22 |XB...u.:|..2,2);"|
|000035c0| 45 72 61 73 65 20 41 6c | 6c 20 4d 61 63 72 6f 73 |Erase Al|l Macros|
|000035d0| 22 3b 8a 32 2c 33 29 3b | c4 31 36 2c bd 28 32 34 |";.2,3);|.16,.(24|
|000035e0| 31 29 29 3b 8a 32 2c 35 | 29 3b 22 41 72 65 20 79 |1));.2,5|);"Are y|
|000035f0| 6f 75 20 73 75 72 65 20 | 79 6f 75 20 77 61 6e 74 |ou sure |you want|
|00003600| 20 74 6f 20 65 72 61 73 | 65 20 61 6c 6c 20 6d 61 | to eras|e all ma|
|00003610| 63 72 6f 73 3f 22 3b 3a | f2 59 4e 3a e7 59 4e 3d |cros?";:|.YN:.YN=|
|00003620| 30 8c e5 8d 44 58 42 0d | 0b e0 2c 4c 3d 31 3a 56 |0...DXB.|..,L=1:V|
|00003630| 41 25 3d 32 3a ff 22 43 | 4c 4f 53 45 22 3a 41 3d |A%=2:."C|LOSE":A=|
|00003640| ad a4 4d 79 46 69 6c 65 | 28 46 4f 24 29 3a e5 8d |..MyFile|(FO$):..|
|00003650| 64 48 4a 0d 0b ea 09 e5 | 8d 74 47 45 0d 0b f4 13 |dHJ.....|.tGE....|
|00003660| db 3a e7 4d 41 49 25 3d | 30 8c e5 8d 74 40 4c 0d |.:.MAI%=|0...t@L.|
|00003670| 0b fe 3a f2 43 4f 4e 56 | 28 28 56 41 25 2d 31 29 |..:.CONV|((VA%-1)|
|00003680| 2c 32 29 3a 54 31 24 3d | c2 53 50 4d 24 2c a9 28 |,2):T1$=|.SPM$,.(|
|00003690| 53 50 4d 24 29 2d 32 29 | 3a 4d 41 43 24 28 30 29 |SPM$)-2)|:MAC$(0)|
|000036a0| 3d 53 54 4e 24 2b 54 31 | 24 0d 0c 08 50 ff 22 43 |=STN$+T1|$...P."C|
|000036b0| 4c 4f 53 45 22 3a 54 41 | 24 3d 46 49 24 2b 22 45 |LOSE":TA|$=FI$+"E|
|000036c0| 22 3a 58 3d ae a4 4d 79 | 46 69 6c 65 28 54 41 24 |":X=..My|File(TA$|
|000036d0| 29 3a e3 49 3d 30 b8 28 | 56 41 25 2d 31 29 3a f1 |):.I=0.(|VA%-1):.|
|000036e0| 23 58 2c 4d 41 43 24 28 | 49 29 3a f1 23 58 2c 4d |#X,MAC$(|I):.#X,M|
|000036f0| 41 4c 24 28 49 29 3a ed | 49 0d 0c 12 34 ff 22 43 |AL$(I):.|I...4."C|
|00003700| 4c 4f 53 45 22 3a 58 3d | ad a4 4d 79 46 69 6c 65 |LOSE":X=|..MyFile|
|00003710| 28 46 4f 24 29 3a cf 23 | 58 3d 32 38 3a f1 23 58 |(FO$):.#|X=28:.#X|
|00003720| 2c 22 31 22 3a ff 22 43 | 4c 4f 53 45 22 0d 0c 1c |,"1":."C|LOSE"...|
|00003730| 09 e5 8d 74 40 4c 0d 0c | 26 2e dd f2 53 45 4c 45 |...t@L..|&...SELE|
|00003740| 43 54 3a 45 44 25 3d 59 | 2b 28 4c 25 2d 31 29 3a |CT:ED%=Y|+(L%-1):|
|00003750| 42 47 25 3d 58 2b 28 57 | 25 2d 31 29 3a 53 53 45 |BG%=X+(W|%-1):SSE|
|00003760| 4c 25 3d 31 0d 0c 30 3e | e3 49 3d 31 b8 4c 25 3a |L%=1..0>|.I=1.L%:|
|00003770| f1 8a 58 2c 59 2b 28 49 | 2d 31 29 29 3b 22 20 20 |..X,Y+(I|-1));" |
|00003780| 22 3b 4d 45 24 28 49 29 | 3b c4 28 57 25 2d 32 29 |";ME$(I)|;.(W%-2)|
|00003790| 2d a9 28 4d 45 24 28 49 | 29 29 2c 22 20 22 29 3a |-.(ME$(I|))," "):|
|000037a0| ed 49 0d 0c 3a 2b c8 97 | 20 58 50 2c 59 50 2c 42 |.I..:+..| XP,YP,B|
|000037b0| 55 54 3a 58 50 3d a8 28 | 58 50 2f 31 36 29 3a 59 |UT:XP=.(|XP/16):Y|
|000037c0| 50 3d 33 31 2d a8 28 59 | 50 2f 33 32 29 0d 0c 44 |P=31-.(Y|P/32)..D|
|000037d0| 18 e7 59 50 3c 59 20 84 | 20 59 50 3e 45 44 25 8c |..YP<Y .| YP>ED%.|
|000037e0| e5 8d 54 70 4c 0d 0c 4e | 18 e7 58 50 3c 58 20 84 |..TpL..N|..XP<X .|
|000037f0| 20 58 50 3e 42 47 25 8c | e5 8d 54 70 4c 0d 0c 58 | XP>BG%.|..TpL..X|
|00003800| 72 53 45 4c 25 3d 28 59 | 50 2d 59 29 2b 31 3a f2 |rSEL%=(Y|P-Y)+1:.|
|00003810| 43 4c 45 41 3a fb 20 31 | 33 31 3a fb 31 32 37 3a |CLEA:. 1|31:.127:|
|00003820| f1 8a 58 2c 59 50 29 3b | 22 20 20 22 3b 4d 45 24 |..X,YP);|" ";ME$|
|00003830| 28 53 45 4c 25 29 3b c4 | 28 57 25 2d 32 29 2d a9 |(SEL%);.|(W%-2)-.|
|00003840| 28 4d 45 24 28 53 45 4c | 25 29 29 2c 22 20 22 29 |(ME$(SEL|%))," ")|
|00003850| 3a fb 20 46 47 25 3a fb | 31 32 37 3a e7 42 55 54 |:. FG%:.|127:.BUT|
|00003860| 3d 34 8c e5 8d 44 62 4c | 3a 8b e5 8d 54 7a 4c 0d |=4...DbL|:...TzL.|
|00003870| 0c 62 08 ef 37 3a e1 0d | 0c 6c 52 dd f2 43 4c 45 |.b..7:..|.lR..CLE|
|00003880| 41 3a e7 53 53 45 4c 25 | 3c 3e 53 45 4c 25 8c e3 |A:.SSEL%|<>SEL%..|
|00003890| 49 3d 31 b8 4c 25 3a f1 | 8a 58 2c 59 2b 28 49 2d |I=1.L%:.|.X,Y+(I-|
|000038a0| 31 29 29 3b 22 20 20 22 | 3b 4d 45 24 28 49 29 3b |1));" "|;ME$(I);|
|000038b0| c4 28 57 25 2d 32 29 2d | a9 28 4d 45 24 28 49 29 |.(W%-2)-|.(ME$(I)|
|000038c0| 29 2c 22 20 22 29 3a ed | 49 0d 0c 76 10 53 53 45 |)," "):.|I..v.SSE|
|000038d0| 4c 25 3d 53 45 4c 25 3a | e1 0d 0c 80 05 20 0d 0c |L%=SEL%:|..... ..|
|000038e0| 8a 05 20 0d 0c 94 05 20 | 0d 0c 9e 05 20 0d 0c a8 |.. .... |.... ...|
|000038f0| 09 20 d9 20 23 30 0d 0c | b2 0a 20 f2 51 75 69 74 |. . #0..|.. .Quit|
|00003900| 0d 0c bc 1b e7 9f 3d 31 | 37 8c ef 33 3a d9 20 23 |......=1|7..3:. #|
|00003910| 30 3a ef 32 36 3a f2 51 | 75 69 74 0d 0c c6 10 e7 |0:.26:.Q|uit.....|
|00003920| 67 6f 25 3d 30 8c e5 8d | 64 6e 4c 0d 0c d0 0b 46 |go%=0...|dnL....F|
|00003930| 47 25 3d 31 38 30 0d 0c | da 52 f2 45 52 57 49 4e |G%=180..|.R.ERWIN|
|00003940| 3a fb 31 38 30 3a f1 8a | 32 30 2c 31 32 29 3b 22 |:.180:..|20,12);"|
|00003950| 53 79 73 74 65 6d 20 52 | 65 70 6f 72 74 65 64 20 |System R|eported |
|00003960| 45 72 72 6f 72 20 23 22 | 3b 9f 3b 22 3a 22 3b 8a |Error #"|;.;":";.|
|00003970| 32 30 2c 31 34 29 3b f6 | 24 3a ef 37 3a fb 46 47 |20,14);.|$:.7:.FG|
|00003980| 25 3a f2 4d 4b 4c 49 4b | 0d 0c e4 19 ff 22 43 4c |%:.MKLIK|....."CL|
|00003990| 4f 53 45 22 3a ef 33 3a | ef 32 36 3a e5 8d 44 58 |OSE":.3:|.26:..DX|
|000039a0| 42 0d 0c ee 7b f2 45 52 | 57 49 4e 3a fb 31 38 30 |B...{.ER|WIN:.180|
|000039b0| 3a f1 8a 32 30 2c 31 32 | 29 3b 22 43 61 6e 6e 6f |:..20,12|);"Canno|
|000039c0| 74 20 72 65 61 64 20 74 | 68 65 20 66 69 6c 65 20 |t read t|he file |
|000039d0| 3a 22 3b 46 49 24 3b 8a | 32 30 2c 31 34 29 3b 22 |:";FI$;.|20,14);"|
|000039e0| 28 64 6f 65 73 20 6e 6f | 74 20 65 78 69 73 74 2f |(does no|t exist/|
|000039f0| 6e 6f 74 20 61 20 44 61 | 74 61 56 69 73 69 6f 6e |not a Da|taVision|
|00003a00| 20 66 69 6c 65 29 22 3a | fb 46 47 25 3a ef 37 3a | file)":|.FG%:.7:|
|00003a10| f2 4d 4b 4c 49 4b 3a e5 | 8d 74 40 4c 0d 0c f8 09 |.MKLIK:.|.t@L....|
|00003a20| dd f2 53 45 4c 0d 0d 02 | 6f fb 31 32 38 3a 46 47 |..SEL...|o.128:FG|
|00003a30| 25 3d 31 32 38 3a 58 3d | 35 30 3a 59 3d 32 3a 57 |%=128:X=|50:Y=2:W|
|00003a40| 25 3d 32 31 3a 4c 25 3d | 32 33 3a f2 4c 57 4e 3a |%=21:L%=|23:.LWN:|
|00003a50| fb 46 47 25 3a f1 8a 35 | 31 2c 33 29 3b 22 53 65 |.FG%:..5|1,3);"Se|
|00003a60| 6c 65 63 74 20 61 20 46 | 69 65 6c 64 3a 20 22 3b |lect a F|ield: ";|
|00003a70| bd 28 31 33 38 29 3b 22 | 20 22 3b bd 28 31 33 39 |.(138);"| ";.(139|
|00003a80| 29 3b 8a 35 31 2c 34 29 | 3b c4 32 31 2c bd 28 32 |);.51,4)|;.21,.(2|
|00003a90| 34 31 29 29 0d 0d 0c 36 | 53 53 46 25 3d 31 3a 53 |41))...6|SSF%=1:S|
|00003aa0| 46 25 3d 31 3a 59 32 3d | 36 3a 53 52 25 3d 53 46 |F%=1:Y2=|6:SR%=SF|
|00003ab0| 25 3a ff 22 43 4c 4f 53 | 45 22 3a 41 3d ad a4 4d |%:."CLOS|E":A=..M|
|00003ac0| 79 46 69 6c 65 28 46 4f | 24 29 0d 0d 16 21 46 52 |yFile(FO|$)...!FR|
|00003ad0| 25 3d 53 52 25 2b 31 39 | 3a e7 46 52 25 3e 4e 4f |%=SR%+19|:.FR%>NO|
|00003ae0| 46 25 8c 46 52 25 3d 4e | 4f 46 25 0d 0d 20 7b 4c |F%.FR%=N|OF%.. {L|
|00003af0| 3d 36 3a 4c 4c 3d 31 3a | e3 49 3d 53 52 25 b8 46 |=6:LL=1:|.I=SR%.F|
|00003b00| 52 25 3a cf 23 41 3d 28 | 49 2d 31 29 2a 36 31 2b |R%:.#A=(|I-1)*61+|
|00003b10| 36 33 3a e8 23 41 2c 46 | 4c 24 3a f1 8a 35 32 2c |63:.#A,F|L$:..52,|
|00003b20| 4c 29 3b 46 4c 24 3a 4d | 45 24 28 4c 4c 29 3d 46 |L);FL$:M|E$(LL)=F|
|00003b30| 4c 24 3a 4c 3d 4c 2b 31 | 3a 4c 4c 3d 4c 4c 2b 31 |L$:L=L+1|:LL=LL+1|
|00003b40| 3a ed 49 3a e7 20 4c 4c | 3c 32 31 20 8c 20 e3 20 |:.I:. LL|<21 . . |
|00003b50| 49 3d 4c 4c 20 b8 32 30 | 3a 4d 45 24 28 49 29 3d |I=LL .20|:ME$(I)=|
|00003b60| 22 20 22 3a ed 49 0d 0d | 2a 2b c8 97 20 58 50 2c |" ":.I..|*+.. XP,|
|00003b70| 59 50 2c 42 55 54 3a 58 | 50 3d a8 28 58 50 2f 31 |YP,BUT:X|P=.(XP/1|
|00003b80| 36 29 3a 59 50 3d 33 31 | 2d a8 28 59 50 2f 33 32 |6):YP=31|-.(YP/32|
|00003b90| 29 0d 0d 34 20 e7 58 50 | 3d 36 37 20 80 20 59 50 |)..4 .XP|=67 . YP|
|00003ba0| 3d 33 20 80 20 42 55 54 | 3d 34 20 8c e5 8d 44 5c |=3 . BUT|=4 ...D\|
|00003bb0| 4d 0d 0d 3e 20 e7 58 50 | 3d 36 39 20 80 20 59 50 |M..> .XP|=69 . YP|
|00003bc0| 3d 33 20 80 20 42 55 54 | 3d 34 20 8c e5 8d 44 70 |=3 . BUT|=4 ...Dp|
|00003bd0| 4d 0d 0d 48 40 e7 20 58 | 50 3e 37 31 20 84 20 58 |M..H@. X|P>71 . X|
|00003be0| 50 3c 35 31 20 84 20 59 | 50 3e 32 35 20 84 20 59 |P<51 . Y|P>25 . Y|
|00003bf0| 50 3c 36 20 8c 53 53 46 | 25 3d 30 3a f2 43 4c 45 |P<6 .SSF|%=0:.CLE|
|00003c00| 41 46 3a 53 53 46 25 3d | 53 46 25 3a e5 8d 54 6a |AF:SSF%=|SF%:..Tj|
|00003c10| 4d 0d 0d 52 72 59 50 3d | 59 50 2d 35 3a 53 46 25 |M..RrYP=|YP-5:SF%|
|00003c20| 3d 28 59 50 2b 53 52 25 | 29 2d 31 3a f2 43 4c 45 |=(YP+SR%|)-1:.CLE|
|00003c30| 41 46 3a fb 31 33 31 3a | f1 8a 35 32 2c 59 50 2b |AF:.131:|..52,YP+|
|00003c40| 35 29 3b 4d 45 24 28 59 | 50 29 3b 89 28 32 30 2d |5);ME$(Y|P);.(20-|
|00003c50| a9 28 4d 45 24 28 59 50 | 29 29 29 3a fb 46 47 25 |.(ME$(YP|))):.FG%|
|00003c60| 3a e7 42 55 54 3d 34 20 | 80 20 53 46 25 3c 28 4e |:.BUT=4 |. SF%<(N|
|00003c70| 4f 46 25 2b 31 29 8c e5 | 8d 74 44 4d 3a 8b e5 8d |OF%+1)..|.tDM:...|
|00003c80| 54 6a 4d 0d 0d 5c 13 e7 | 46 52 25 3d 4e 4f 46 25 |TjM..\..|FR%=NOF%|
|00003c90| 8c e5 8d 54 6a 4d 0d 0d | 66 6e 53 52 25 3d 53 52 |...TjM..|fnSR%=SR|
|00003ca0| 25 2b 32 30 3a 58 3d 35 | 30 3a 59 3d 32 3a 57 25 |%+20:X=5|0:Y=2:W%|
|00003cb0| 3d 32 31 3a 4c 25 3d 32 | 33 3a f2 4c 57 4e 3a f1 |=21:L%=2|3:.LWN:.|
|00003cc0| 8a 35 31 2c 33 29 3b 22 | 53 65 6c 65 63 74 20 61 |.51,3);"|Select a|
|00003cd0| 20 46 69 65 6c 64 3a 20 | 22 3b bd 28 31 33 38 29 | Field: |";.(138)|
|00003ce0| 3b 22 20 22 3b bd 28 31 | 33 39 29 3b 8a 35 31 2c |;" ";.(1|39);.51,|
|00003cf0| 34 29 3b c4 32 31 2c bd | 28 32 34 31 29 29 3a e5 |4);.21,.|(241)):.|
|00003d00| 8d 54 56 4d 0d 0d 70 10 | e7 53 52 25 3d 31 8c e5 |.TVM..p.|.SR%=1..|
|00003d10| 8d 54 6a 4d 0d 0d 7a 6e | 53 52 25 3d 53 52 25 2d |.TjM..zn|SR%=SR%-|
|00003d20| 32 30 3a 58 3d 35 30 3a | 59 3d 32 3a 57 25 3d 32 |20:X=50:|Y=2:W%=2|
|00003d30| 31 3a 4c 25 3d 32 33 3a | f2 4c 57 4e 3a f1 8a 35 |1:L%=23:|.LWN:..5|
|00003d40| 31 2c 33 29 3b 22 53 65 | 6c 65 63 74 20 61 20 46 |1,3);"Se|lect a F|
|00003d50| 69 65 6c 64 3a 20 22 3b | bd 28 31 33 38 29 3b 22 |ield: ";|.(138);"|
|00003d60| 20 22 3b bd 28 31 33 39 | 29 3b 8a 35 31 2c 34 29 | ";.(139|);.51,4)|
|00003d70| 3b c4 32 31 2c bd 28 32 | 34 31 29 29 3a e5 8d 54 |;.21,.(2|41)):..T|
|00003d80| 56 4d 0d 0d 84 65 ef 37 | 3a cf 23 41 3d 28 53 46 |VM...e.7|:.#A=(SF|
|00003d90| 25 2d 31 29 2a 36 31 2b | 36 33 3a e8 23 41 2c 46 |%-1)*61+|63:.#A,F|
|00003da0| 4c 24 3a cf 23 41 3d 28 | 53 46 25 2d 31 29 2a 36 |L$:.#A=(|SF%-1)*6|
|00003db0| 31 2b 31 30 31 3a e8 23 | 41 2c 54 59 24 3a cf 23 |1+101:.#|A,TY$:.#|
|00003dc0| 41 3d 28 53 46 25 2d 31 | 29 2a 36 31 2b 31 31 37 |A=(SF%-1|)*61+117|
|00003dd0| 3a e8 23 41 2c 54 52 24 | 3a fb 31 38 30 3a 46 47 |:.#A,TR$|:.180:FG|
|00003de0| 25 3d 31 38 30 3a e1 0d | 0d 8e 42 dd f2 43 4c 45 |%=180:..|..B..CLE|
|00003df0| 41 46 3a e7 53 53 46 25 | 3c 3e 53 46 25 8c e3 49 |AF:.SSF%|<>SF%..I|
|00003e00| 3d 31 b8 32 30 3a f1 8a | 35 32 2c 49 2b 35 29 3b |=1.20:..|52,I+5);|
|00003e10| 4d 45 24 28 49 29 3b 89 | 28 32 30 2d a9 28 4d 45 |ME$(I);.|(20-.(ME|
|00003e20| 24 28 49 29 29 29 3a ed | 49 0d 0d 98 0e 53 53 46 |$(I))):.|I....SSF|
|00003e30| 25 3d 53 46 25 3a e1 0d | 0d a2 2c dd f2 59 4e 3a |%=SF%:..|..,..YN:|
|00003e40| 78 70 3d b1 3a 79 70 3d | bc 3a f1 22 20 22 3b 3a |xp=.:yp=|.:." ";:|
|00003e50| fb 31 33 31 3a f1 22 59 | 45 53 2f 4e 4f 22 3a fb |.131:."Y|ES/NO":.|
|00003e60| 46 47 25 0d 0d ac 38 c8 | 97 20 58 50 2c 59 50 2c |FG%...8.|. XP,YP,|
|00003e70| 42 55 54 3a 58 50 3d a8 | 28 58 50 2f 31 36 29 3a |BUT:XP=.|(XP/16):|
|00003e80| 59 50 3d 33 31 2d a8 28 | 59 50 2f 33 32 29 3a e7 |YP=31-.(|YP/32):.|
|00003e90| 42 55 54 3d 30 8c e5 8d | 74 6c 4d 0d 0d b6 12 e7 |BUT=0...|tlM.....|
|00003ea0| 59 50 3c 3e 79 70 20 8c | e5 8d 74 6c 4d 0d 0d c0 |YP<>yp .|..tlM...|
|00003eb0| 2b e7 58 50 3d 78 70 2b | 31 20 84 20 58 50 3d 78 |+.XP=xp+|1 . XP=x|
|00003ec0| 70 2b 32 20 84 20 58 50 | 3d 78 70 2b 33 8c 59 4e |p+2 . XP|=xp+3.YN|
|00003ed0| 3d 31 3a e5 8d 64 5e 4d | 0d 0d ca 22 e7 58 50 3d |=1:..d^M|...".XP=|
|00003ee0| 78 70 2b 35 20 84 20 58 | 50 3d 78 70 2b 36 20 8c |xp+5 . X|P=xp+6 .|
|00003ef0| 59 4e 3d 30 3a e5 8d 64 | 5e 4d 0d 0d d4 09 e5 8d |YN=0:..d|^M......|
|00003f00| 74 6c 4d 0d 0d de 1b f1 | 8a 78 70 2c 79 70 29 3b |tlM.....|.xp,yp);|
|00003f10| 22 20 59 45 53 2f 4e 4f | 22 3a ef 37 3a e1 0d 0d |" YES/NO|":.7:...|
|00003f20| e8 13 dd a4 4d 79 46 69 | 6c 65 28 66 69 6c 65 24 |....MyFi|le(file$|
|00003f30| 29 0d 0d f2 0a 3d 66 69 | 6c 65 24 0d 0d fc 0b dd |)....=fi|le$.....|
|00003f40| 20 f2 51 75 69 74 0d 0e | 06 1e c8 99 20 22 57 69 | .Quit..|.... "Wi|
|00003f50| 6d 70 5f 43 6f 6d 6d 61 | 6e 64 57 69 6e 64 6f 77 |mp_Comma|ndWindow|
|00003f60| 22 2c 2d 31 0d 0e 10 06 | c8 98 0d 0e 1a 05 e1 0d |",-1....|........|
|00003f70| 9c 40 0d dd f2 44 69 72 | 28 64 24 29 0d 9c 4a 29 |.@...Dir|(d$)..J)|
|00003f80| e7 20 64 24 20 3c 3e 20 | 22 22 20 8c 20 ff 20 22 |. d$ <> |"" . . "|
|00003f90| 44 69 72 20 22 2b a4 4d | 79 46 69 6c 65 28 c1 64 |Dir "+.M|yFile(.d|
|00003fa0| 24 2c 32 29 29 0d 9c 54 | 05 e1 0d ff |$,2))..T|.... |
+--------+-------------------------+-------------------------+--------+--------+