home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1992-06-10 | 15.1 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.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| file
| data
| default
| |
| 100%
| xdgMime
| image/x-tga
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 1d f4 20 3e 3c | 42 65 64 69 74 24 70 61 |..... ><|Bedit$pa|
|00000010| 74 68 3e 2e 21 52 75 6e | 49 6d 61 67 65 0d 00 14 |th>.!Run|Image...|
|00000020| 39 f4 20 52 69 73 63 20 | 4f 53 20 61 70 70 6c 69 |9. Risc |OS appli|
|00000030| 63 61 74 69 6f 6e 20 74 | 6f 20 54 72 61 6e 73 66 |cation t|o Transf|
|00000040| 6f 72 6d 20 53 63 69 47 | 72 61 70 68 20 64 61 74 |orm SciG|raph dat|
|00000050| 61 66 69 6c 65 2e 0d 00 | 1e 05 3a 0d 00 28 15 74 |afile...|..:..(.t|
|00000060| 69 74 6c 65 24 3d 22 53 | 63 69 54 72 61 6e 73 22 |itle$="S|ciTrans"|
|00000070| 0d 00 32 32 de 20 62 6c | 6f 63 6b 25 20 26 34 30 |..22. bl|ock% &40|
|00000080| 30 2c 6f 6c 64 62 6c 6b | 25 20 26 34 30 30 2c 65 |0,oldblk|% &400,e|
|00000090| 72 72 62 6c 6b 25 20 26 | 31 30 30 2c 73 74 72 25 |rrblk% &|100,str%|
|000000a0| 20 38 0d 00 3c 41 24 62 | 6c 6f 63 6b 25 3d 22 54 | 8..<A$b|lock%="T|
|000000b0| 41 53 4b 22 3a c8 99 20 | 22 57 69 6d 70 5f 49 6e |ASK":.. |"Wimp_In|
|000000c0| 69 74 69 61 6c 69 73 65 | 22 2c 32 30 30 2c 21 62 |itialise|",200,!b|
|000000d0| 6c 6f 63 6b 25 2c 74 69 | 74 6c 65 24 20 b8 20 2c |lock%,ti|tle$ . ,|
|000000e0| 75 73 25 0d 00 46 23 de | 20 6f 6b 73 25 20 32 3a |us%..F#.| oks% 2:|
|000000f0| 24 6f 6b 73 25 3d 22 4f | 4b 22 3a de 20 63 61 72 |$oks%="O|K":. car|
|00000100| 65 74 25 20 35 30 0d 00 | 50 46 de 20 66 6e 61 6d |et% 50..|PF. fnam|
|00000110| 65 25 20 32 35 35 2c 76 | 61 6c 69 64 25 20 33 2c |e% 255,v|alid% 3,|
|00000120| 73 70 72 69 74 65 25 20 | 32 30 2c 74 72 61 63 65 |sprite% |20,trace|
|00000130| 25 20 32 30 2c 69 63 6f | 6e 62 6c 6b 25 20 31 30 |% 20,ico|nblk% 10|
|00000140| 30 2c 6d 65 6e 75 25 20 | 26 32 30 30 0d 00 5a 17 |0,menu% |&200..Z.|
|00000150| de 20 50 61 72 61 6d 28 | 38 29 2c 45 72 72 6f 72 |. Param(|8),Error|
|00000160| 28 38 29 0d 00 64 28 de | 20 58 28 31 30 30 29 2c |(8)..d(.| X(100),|
|00000170| 59 28 31 30 30 29 2c 45 | 72 72 59 28 31 30 30 29 |Y(100),E|rrY(100)|
|00000180| 2c 46 72 6f 7a 65 6e 25 | 28 38 29 0d 00 6e 16 de |,Frozen%|(8)..n..|
|00000190| 20 64 46 69 24 28 38 29 | 2c 64 46 64 50 69 28 38 | dFi$(8)|,dFdPi(8|
|000001a0| 29 0d 00 78 11 24 76 61 | 6c 69 64 25 3d 22 61 7e |)..x.$va|lid%="a~|
|000001b0| 20 22 0d 00 82 25 de 20 | 57 6f 72 6b 25 20 26 34 | "...%. |Work% &4|
|000001c0| 30 30 2c 49 6e 64 25 20 | 26 34 30 30 2c 49 64 65 |00,Ind% |&400,Ide|
|000001d0| 6e 74 25 20 26 32 30 0d | 00 8c 15 45 6e 64 49 6e |nt% &20.|...EndIn|
|000001e0| 64 25 3d 49 6e 64 25 2b | 26 34 30 30 0d 00 96 36 |d%=Ind%+|&400...6|
|000001f0| c8 99 20 22 57 69 6d 70 | 5f 4f 70 65 6e 54 65 6d |.. "Wimp|_OpenTem|
|00000200| 70 6c 61 74 65 22 2c 2c | 22 3c 53 63 69 54 72 61 |plate",,|"<SciTra|
|00000210| 6e 73 24 44 69 72 3e 2e | 54 65 6d 70 6c 61 74 65 |ns$Dir>.|Template|
|00000220| 73 22 0d 00 a0 18 f4 20 | 49 6e 66 6f 72 6d 61 74 |s"..... |Informat|
|00000230| 69 6f 6e 20 77 69 6e 64 | 6f 77 0d 00 aa 1a 24 49 |ion wind|ow....$I|
|00000240| 64 65 6e 74 25 3d 22 49 | 6e 66 6f 22 2b c4 38 2c |dent%="I|nfo"+.8,|
|00000250| bd 31 33 29 0d 00 b4 0a | 50 6f 73 25 3d 30 0d 00 |.13)....|Pos%=0..|
|00000260| be 4e c8 99 20 22 57 69 | 6d 70 5f 4c 6f 61 64 54 |.N.. "Wi|mp_LoadT|
|00000270| 65 6d 70 6c 61 74 65 22 | 2c 2c 57 6f 72 6b 25 2c |emplate"|,,Work%,|
|00000280| 49 6e 64 25 2c 45 6e 64 | 49 6e 64 25 2c 2d 31 2c |Ind%,End|Ind%,-1,|
|00000290| 49 64 65 6e 74 25 2c 50 | 6f 73 25 20 b8 20 2c 2c |Ident%,P|os% . ,,|
|000002a0| 49 6e 64 25 2c 2c 2c 2c | 50 6f 73 25 0d 00 c8 29 |Ind%,,,,|Pos%...)|
|000002b0| c8 99 20 22 57 69 6d 70 | 5f 43 72 65 61 74 65 57 |.. "Wimp|_CreateW|
|000002c0| 69 6e 64 6f 77 22 2c 2c | 57 6f 72 6b 25 20 b8 20 |indow",,|Work% . |
|000002d0| 69 6e 66 6f 25 0d 00 d2 | 31 e7 20 50 6f 73 25 3d |info%...|1. Pos%=|
|000002e0| 30 20 85 20 31 2c 22 43 | 61 6e 27 74 20 66 69 6e |0 . 1,"C|an't fin|
|000002f0| 64 20 77 69 6e 64 6f 77 | 20 64 65 66 69 6e 69 74 |d window| definit|
|00000300| 69 6f 6e 22 3a e0 0d 00 | dc 11 f4 20 4d 61 69 6e |ion":...|... Main|
|00000310| 20 77 69 6e 64 6f 77 0d | 00 e6 1a 24 49 64 65 6e | window.|...$Iden|
|00000320| 74 25 3d 22 4d 61 69 6e | 22 2b c4 38 2c bd 31 33 |t%="Main|"+.8,.13|
|00000330| 29 0d 00 f0 0a 50 6f 73 | 25 3d 30 0d 00 fa 4e c8 |)....Pos|%=0...N.|
|00000340| 99 20 22 57 69 6d 70 5f | 4c 6f 61 64 54 65 6d 70 |. "Wimp_|LoadTemp|
|00000350| 6c 61 74 65 22 2c 2c 57 | 6f 72 6b 25 2c 49 6e 64 |late",,W|ork%,Ind|
|00000360| 25 2c 45 6e 64 49 6e 64 | 25 2c 2d 31 2c 49 64 65 |%,EndInd|%,-1,Ide|
|00000370| 6e 74 25 2c 50 6f 73 25 | 20 b8 20 2c 2c 49 6e 64 |nt%,Pos%| . ,,Ind|
|00000380| 25 2c 2c 2c 2c 50 6f 73 | 25 0d 01 04 29 c8 99 20 |%,,,,Pos|%...).. |
|00000390| 22 57 69 6d 70 5f 43 72 | 65 61 74 65 57 69 6e 64 |"Wimp_Cr|eateWind|
|000003a0| 6f 77 22 2c 2c 57 6f 72 | 6b 25 20 b8 20 6d 61 69 |ow",,Wor|k% . mai|
|000003b0| 6e 25 0d 01 0e 31 e7 20 | 50 6f 73 25 3d 30 20 85 |n%...1. |Pos%=0 .|
|000003c0| 20 31 2c 22 43 61 6e 27 | 74 20 66 69 6e 64 20 77 | 1,"Can'|t find w|
|000003d0| 69 6e 64 6f 77 20 64 65 | 66 69 6e 69 74 69 6f 6e |indow de|finition|
|000003e0| 22 3a e0 0d 01 18 0f 77 | 69 6e 64 25 3d 6d 61 69 |":.....w|ind%=mai|
|000003f0| 6e 25 0d 01 22 1d 58 54 | 72 61 6e 73 25 3d a4 69 |n%..".XT|rans%=.i|
|00000400| 63 6f 6e 5f 73 65 6c 65 | 63 74 65 64 28 31 29 0d |con_sele|cted(1).|
|00000410| 01 2c 2f e7 20 58 54 72 | 61 6e 73 25 3d a3 20 8c |.,/. XTr|ans%=. .|
|00000420| 20 f2 67 72 65 79 69 63 | 6f 6e 28 33 29 20 8b 20 | .greyic|on(3) . |
|00000430| f2 75 6e 67 72 65 79 69 | 63 6f 6e 28 33 29 0d 01 |.ungreyi|con(3)..|
|00000440| 36 1e 59 54 72 61 6e 73 | 25 3d a4 69 63 6f 6e 5f |6.YTrans|%=.icon_|
|00000450| 73 65 6c 65 63 74 65 64 | 28 35 29 3a 0d 01 40 11 |selected|(5):..@.|
|00000460| e7 20 59 54 72 61 6e 73 | 25 3d a3 20 8c 0d 01 4a |. YTrans|%=. ...J|
|00000470| 2f 20 f2 64 65 73 65 6c | 65 63 74 69 63 6f 6e 28 |/ .desel|ecticon(|
|00000480| 38 29 3a f2 67 72 65 79 | 69 63 6f 6e 28 37 29 3a |8):.grey|icon(7):|
|00000490| f2 67 72 65 79 69 63 6f | 6e 28 38 29 0d 01 54 05 |.greyico|n(8)..T.|
|000004a0| cc 0d 01 5e 22 20 f2 75 | 6e 67 72 65 79 69 63 6f |...^" .u|ngreyico|
|000004b0| 6e 28 37 29 3a f2 75 6e | 67 72 65 79 69 63 6f 6e |n(7):.un|greyicon|
|000004c0| 28 38 29 0d 01 68 05 cd | 0d 01 72 13 f4 20 53 61 |(8)..h..|..r.. Sa|
|000004d0| 76 65 20 66 69 6c 65 20 | 62 6f 78 0d 01 7c 1a 24 |ve file |box..|.$|
|000004e0| 49 64 65 6e 74 25 3d 22 | 46 69 6c 65 22 2b c4 38 |Ident%="|File"+.8|
|000004f0| 2c bd 31 33 29 0d 01 86 | 0a 50 6f 73 25 3d 30 0d |,.13)...|.Pos%=0.|
|00000500| 01 90 4e c8 99 20 22 57 | 69 6d 70 5f 4c 6f 61 64 |..N.. "W|imp_Load|
|00000510| 54 65 6d 70 6c 61 74 65 | 22 2c 2c 57 6f 72 6b 25 |Template|",,Work%|
|00000520| 2c 49 6e 64 25 2c 45 6e | 64 49 6e 64 25 2c 2d 31 |,Ind%,En|dInd%,-1|
|00000530| 2c 49 64 65 6e 74 25 2c | 50 6f 73 25 20 b8 20 2c |,Ident%,|Pos% . ,|
|00000540| 2c 49 6e 64 25 2c 2c 2c | 2c 50 6f 73 25 0d 01 9a |,Ind%,,,|,Pos%...|
|00000550| 29 c8 99 20 22 57 69 6d | 70 5f 43 72 65 61 74 65 |).. "Wim|p_Create|
|00000560| 57 69 6e 64 6f 77 22 2c | 2c 57 6f 72 6b 25 20 b8 |Window",|,Work% .|
|00000570| 20 66 69 6c 65 25 0d 01 | a4 31 e7 20 50 6f 73 25 | file%..|.1. Pos%|
|00000580| 3d 30 20 85 20 31 2c 22 | 43 61 6e 27 74 20 66 69 |=0 . 1,"|Can't fi|
|00000590| 6e 64 20 77 69 6e 64 6f | 77 20 64 65 66 69 6e 69 |nd windo|w defini|
|000005a0| 74 69 6f 6e 22 3a e0 0d | 01 ae 1b f4 20 61 64 64 |tion":..|.... add|
|000005b0| 20 69 6e 20 73 61 76 65 | 20 62 6f 78 20 69 63 6f | in save| box ico|
|000005c0| 6e 73 0d 01 b8 39 6f 6b | 25 3d a4 69 63 6f 6e 28 |ns...9ok|%=.icon(|
|000005d0| 66 69 6c 65 25 2c 31 39 | 32 2c 2d 31 36 30 2c 32 |file%,19|2,-160,2|
|000005e0| 33 38 2c 2d 31 31 32 2c | 26 43 37 30 31 39 31 33 |38,-112,|&C701913|
|000005f0| 44 2c 6f 6b 73 25 2c 30 | 2c 33 29 0d 01 c2 42 6e |D,oks%,0|,3)...Bn|
|00000600| 61 6d 65 25 3d a4 69 63 | 6f 6e 28 66 69 6c 65 25 |ame%=.ic|on(file%|
|00000610| 2c 31 30 2c 2d 31 36 30 | 2c 31 38 36 2c 2d 31 31 |,10,-160|,186,-11|
|00000620| 32 2c 26 37 30 30 46 31 | 33 44 2c 66 6e 61 6d 65 |2,&700F1|3D,fname|
|00000630| 25 2c 76 61 6c 69 64 25 | 2c 32 35 36 29 0d 01 cc |%,valid%|,256)...|
|00000640| 3d 66 69 63 6f 6e 25 3d | a4 69 63 6f 6e 28 66 69 |=ficon%=|.icon(fi|
|00000650| 6c 65 25 2c 37 38 2c 2d | 39 32 2c 31 34 36 2c 2d |le%,78,-|92,146,-|
|00000660| 32 30 2c 26 44 37 30 30 | 36 31 30 32 2c 73 70 72 |20,&D700|6102,spr|
|00000670| 69 74 65 25 2c 31 2c 32 | 30 29 0d 01 d6 30 74 79 |ite%,1,2|0)...0ty|
|00000680| 70 65 25 3d 26 32 46 46 | 3a f4 20 73 65 74 20 75 |pe%=&2FF|:. set u|
|00000690| 70 20 53 63 69 47 72 61 | 70 68 20 64 61 74 61 20 |p SciGra|ph data |
|000006a0| 66 69 6c 65 20 74 79 70 | 65 2e 0d 01 e0 1b c8 99 |file typ|e.......|
|000006b0| 20 22 57 69 6d 70 5f 43 | 6c 6f 73 65 54 65 6d 70 | "Wimp_C|loseTemp|
|000006c0| 6c 61 74 65 22 0d 01 ea | 44 de 20 73 70 72 69 74 |late"...|D. sprit|
|000006d0| 65 32 25 20 32 30 2c 73 | 70 72 5f 74 78 74 25 20 |e2% 20,s|pr_txt% |
|000006e0| 31 32 3a 24 73 70 72 69 | 74 65 32 25 3d 22 73 21 |12:$spri|te2%="s!|
|000006f0| 22 2b 74 69 74 6c 65 24 | 3a 24 73 70 72 5f 74 78 |"+title$|:$spr_tx|
|00000700| 74 25 3d 74 69 74 6c 65 | 24 0d 01 f4 40 73 69 63 |t%=title|$...@sic|
|00000710| 6f 6e 25 3d a4 69 63 6f | 6e 28 2d 31 2c 30 2c 2d |on%=.ico|n(-1,0,-|
|00000720| 31 36 2c 31 32 38 2c 39 | 32 2c 26 31 37 30 30 33 |16,128,9|2,&17003|
|00000730| 31 32 42 2c 73 70 72 5f | 74 78 74 25 2c 73 70 72 |12B,spr_|txt%,spr|
|00000740| 69 74 65 32 25 2c 31 31 | 29 0d 01 fe 15 71 75 69 |ite2%,11|)....qui|
|00000750| 74 25 3d a3 3a 6d 79 72 | 65 66 25 3d 2d 31 0d 02 |t%=.:myr|ef%=-1..|
|00000760| 08 18 ee 20 85 20 e7 20 | a4 77 69 6d 70 65 72 72 |... . . |.wimperr|
|00000770| 6f 72 20 8c 20 e0 0d 02 | 12 05 f5 0d 02 1c 25 c8 |or . ...|......%.|
|00000780| 99 20 22 57 69 6d 70 5f | 50 6f 6c 6c 22 2c 31 2c |. "Wimp_|Poll",1,|
|00000790| 62 6c 6f 63 6b 25 20 b8 | 20 72 65 61 73 6f 6e 25 |block% .| reason%|
|000007a0| 0d 02 26 10 c8 8e 20 72 | 65 61 73 6f 6e 25 20 ca |..&... r|eason% .|
|000007b0| 0d 02 30 23 c9 20 32 3a | c8 99 22 57 69 6d 70 5f |..0#. 2:|.."Wimp_|
|000007c0| 4f 70 65 6e 57 69 6e 64 | 6f 77 22 2c 2c 62 6c 6f |OpenWind|ow",,blo|
|000007d0| 63 6b 25 0d 02 3a 24 c9 | 20 33 3a c8 99 22 57 69 |ck%..:$.| 3:.."Wi|
|000007e0| 6d 70 5f 43 6c 6f 73 65 | 57 69 6e 64 6f 77 22 2c |mp_Close|Window",|
|000007f0| 2c 62 6c 6f 63 6b 25 0d | 02 44 18 c9 20 36 3a f2 |,block%.|.D.. 6:.|
|00000800| 62 75 74 74 6f 6e 73 28 | 62 6c 6f 63 6b 25 29 0d |buttons(|block%).|
|00000810| 02 4e 11 c9 20 37 3a f2 | 64 72 61 67 64 6f 6e 65 |.N.. 7:.|dragdone|
|00000820| 0d 02 58 14 c9 20 38 3a | f2 6b 65 79 28 62 6c 6f |..X.. 8:|.key(blo|
|00000830| 63 6b 25 29 0d 02 62 26 | c9 20 39 3a f2 6d 65 6e |ck%)..b&|. 9:.men|
|00000840| 75 73 65 6c 65 63 74 28 | 62 6c 6f 63 6b 25 21 30 |uselect(|block%!0|
|00000850| 2c 62 6c 6f 63 6b 25 21 | 34 29 0d 02 6c 1c c9 20 |,block%!|4)..l.. |
|00000860| 31 37 2c 31 38 3a f2 72 | 65 63 65 69 76 65 28 62 |17,18:.r|eceive(b|
|00000870| 6c 6f 63 6b 25 29 0d 02 | 76 17 c9 20 31 39 3a f2 |lock%)..|v.. 19:.|
|00000880| 6e 6f 61 63 6b 28 62 6c | 6f 63 6b 25 29 0d 02 80 |noack(bl|ock%)...|
|00000890| 05 cb 0d 02 8a 0b fd 20 | 71 75 69 74 25 0d 02 94 |....... |quit%...|
|000008a0| 17 c8 99 20 22 57 69 6d | 70 5f 43 6c 6f 73 65 44 |... "Wim|p_CloseD|
|000008b0| 6f 77 6e 22 0d 02 9e 05 | e0 0d 02 a8 05 3a 0d 02 |own"....|.....:..|
|000008c0| b2 12 dd 20 f2 72 65 63 | 65 69 76 65 28 62 25 29 |... .rec|eive(b%)|
|000008d0| 0d 02 bc 0e c8 8e 20 62 | 25 21 31 36 20 ca 0d 02 |...... b|%!16 ...|
|000008e0| c6 0f c9 20 30 3a 71 75 | 69 74 25 3d b9 0d 02 d0 |... 0:qu|it%=....|
|000008f0| 15 c9 20 31 3a f2 73 61 | 76 65 74 6f 75 73 28 62 |.. 1:.sa|vetous(b|
|00000900| 25 29 0d 02 da 15 c9 20 | 32 3a f2 64 61 74 61 73 |%)..... |2:.datas|
|00000910| 61 76 65 28 62 25 29 0d | 02 e4 15 c9 20 33 3a f2 |ave(b%).|.... 3:.|
|00000920| 64 61 74 61 6c 6f 61 64 | 28 62 25 29 0d 02 ee 15 |dataload|(b%)....|
|00000930| c9 20 36 3a f2 72 61 6d | 66 65 74 63 68 28 62 25 |. 6:.ram|fetch(b%|
|00000940| 29 0d 02 f8 18 c9 20 37 | 3a f2 72 61 6d 74 72 61 |)..... 7|:.ramtra|
|00000950| 6e 73 6d 69 74 28 62 25 | 29 0d 03 02 0a c9 20 26 |nsmit(b%|)..... &|
|00000960| 35 30 32 0d 03 0c 1a 20 | 62 25 21 31 32 3d 62 25 |502.... |b%!12=b%|
|00000970| 21 38 3a 62 25 21 31 36 | 3d 26 35 30 33 0d 03 16 |!8:b%!16|=&503...|
|00000980| 28 20 68 65 6c 70 25 3d | 62 25 2b 32 30 3a 77 69 |( help%=|b%+20:wi|
|00000990| 6e 64 25 3d 62 25 21 33 | 32 3a 69 63 6f 6e 25 3d |nd%=b%!3|2:icon%=|
|000009a0| 62 25 21 33 36 0d 03 20 | 20 20 68 65 6c 70 24 3d |b%!36.. | help$=|
|000009b0| a4 67 65 74 68 65 6c 70 | 28 77 69 6e 64 25 2c 69 |.gethelp|(wind%,i|
|000009c0| 63 6f 6e 25 29 0d 03 2a | 28 20 24 68 65 6c 70 25 |con%)..*|( $help%|
|000009d0| 3d 68 65 6c 70 24 2b 22 | 7c 4d 22 3a 68 65 6c 70 |=help$+"||M":help|
|000009e0| 25 2b 3d a9 28 68 65 6c | 70 24 29 2b 32 0d 03 34 |%+=.(hel|p$)+2..4|
|000009f0| 21 20 3f 68 65 6c 70 25 | 3d 30 3a 21 62 25 3d 28 |! ?help%|=0:!b%=(|
|00000a00| 68 65 6c 70 25 2b 34 2d | 62 25 29 80 ac 33 0d 03 |help%+4-|b%)..3..|
|00000a10| 3e 25 20 c8 99 20 22 57 | 69 6d 70 5f 53 65 6e 64 |>% .. "W|imp_Send|
|00000a20| 4d 65 73 73 61 67 65 22 | 2c 31 37 2c 62 25 2c 62 |Message"|,17,b%,b|
|00000a30| 25 21 34 0d 03 48 05 cb | 0d 03 52 05 e1 0d 03 5c |%!4..H..|..R....\|
|00000a40| 05 3a 0d 03 66 1b dd 20 | a4 67 65 74 68 65 6c 70 |.:..f.. |.gethelp|
|00000a50| 28 77 69 6e 64 25 2c 69 | 63 6f 6e 25 29 0d 03 70 |(wind%,i|con%)..p|
|00000a60| 08 ea 20 68 24 0d 03 7a | 0e c8 8e 20 77 69 6e 64 |.. h$..z|... wind|
|00000a70| 25 20 ca 0d 03 84 09 c9 | 20 2d 32 3a 0d 03 8e cc |% ......| -2:....|
|00000a80| 20 e7 20 69 63 6f 6e 25 | 3d 73 69 63 6f 6e 25 20 | . icon%|=sicon% |
|00000a90| 8c 20 68 24 3d 22 54 68 | 69 73 20 69 73 20 74 68 |. h$="Th|is is th|
|00000aa0| 65 20 22 2b 74 69 74 6c | 65 24 2b 22 20 61 70 70 |e "+titl|e$+" app|
|00000ab0| 6c 69 63 61 74 69 6f 6e | 2e 7c 4d 43 6c 69 63 6b |lication|.|MClick|
|00000ac0| 20 77 69 74 68 20 53 45 | 4c 45 43 54 20 74 6f 20 | with SE|LECT to |
|00000ad0| 6f 70 65 6e 20 6d 61 69 | 6e 20 77 69 6e 64 6f 77 |open mai|n window|
|00000ae0| 2c 20 6f 72 20 77 69 74 | 68 20 4d 45 4e 55 20 66 |, or wit|h MENU f|
|00000af0| 6f 72 20 61 6e 20 69 63 | 6f 6e 62 61 72 20 6d 65 |or an ic|onbar me|
|00000b00| 6e 75 2e 7c 4d 54 6f 20 | 74 72 61 6e 73 66 6f 72 |nu.|MTo |transfor|
|00000b10| 6d 20 61 20 21 53 63 69 | 47 72 61 70 68 20 64 61 |m a !Sci|Graph da|
|00000b20| 74 61 20 66 69 6c 65 2c | 20 64 72 61 67 20 69 74 |ta file,| drag it|
|00000b30| 27 73 20 69 63 6f 6e 20 | 6f 6e 74 6f 20 74 68 69 |'s icon |onto thi|
|00000b40| 73 20 69 63 6f 6e 2e 22 | 0d 03 98 0c c9 20 69 6e |s icon."|..... in|
|00000b50| 66 6f 25 3a 0d 03 a2 0f | 20 c8 8e 20 69 63 6f 6e |fo%:....| .. icon|
|00000b60| 25 20 ca 0d 03 ac 66 20 | c9 20 33 3a 20 68 24 3d |% ....f |. 3: h$=|
|00000b70| 22 54 68 69 73 20 61 70 | 70 6c 69 63 61 74 69 6f |"This ap|plicatio|
|00000b80| 6e 20 74 72 61 6e 73 66 | 6f 72 6d 73 20 74 68 65 |n transf|orms the|
|00000b90| 20 58 20 61 6e 64 2f 6f | 72 20 59 20 64 61 74 61 | X and/o|r Y data|
|00000ba0| 7c 4d 61 63 63 6f 72 64 | 69 6e 67 20 74 6f 20 75 ||Maccord|ing to u|
|00000bb0| 73 65 72 20 73 70 65 63 | 69 66 69 65 64 20 66 75 |ser spec|ified fu|
|00000bc0| 6e 63 74 69 6f 6e 73 2e | 22 0d 03 b6 b5 20 c9 20 |nctions.|".... . |
|00000bd0| 35 3a 20 68 24 3d 22 54 | 68 65 20 61 75 74 68 6f |5: h$="T|he autho|
|00000be0| 72 2c 20 44 72 2e 20 52 | 6f 64 65 72 69 63 6b 20 |r, Dr. R|oderick |
|00000bf0| 46 65 72 67 75 73 6f 6e | 2c 20 63 61 6e 20 62 65 |Ferguson|, can be|
|00000c00| 20 63 6f 6e 74 61 63 74 | 65 64 20 61 74 20 3a 2d | contact|ed at :-|
|00000c10| 7c 4d 48 65 72 69 6f 74 | 2d 57 61 74 74 20 55 6e ||MHeriot|-Watt Un|
|00000c20| 69 76 65 72 73 69 74 79 | 20 43 68 65 6d 69 73 74 |iversity| Chemist|
|00000c30| 72 79 20 44 65 70 61 72 | 74 6d 65 6e 74 20 28 45 |ry Depar|tment (E|
|00000c40| 64 69 6e 62 75 72 67 68 | 2c 20 53 63 6f 74 6c 61 |dinburgh|, Scotla|
|00000c50| 6e 64 29 7c 4d 6f 6e 20 | 30 33 31 2d 34 34 39 2d |nd)|Mon |031-449-|
|00000c60| 35 31 31 31 2c 20 65 78 | 74 65 6e 73 69 6f 6e 20 |5111, ex|tension |
|00000c70| 34 31 30 39 20 6f 72 20 | 34 32 33 39 2e 22 0d 03 |4109 or |4239."..|
|00000c80| c0 2a 20 c9 20 37 3a 20 | 68 24 3d 22 54 68 69 73 |.* . 7: |h$="This|
|00000c90| 20 69 73 20 74 68 65 20 | 6c 61 74 65 73 74 20 76 | is the |latest v|
|00000ca0| 65 72 73 69 6f 6e 2e 22 | 0d 03 ca 06 20 7f 0d 03 |ersion."|.... ...|
|00000cb0| d4 2d 20 68 24 3d 22 54 | 68 69 73 20 69 73 20 74 |.- h$="T|his is t|
|00000cc0| 68 65 20 22 2b 74 69 74 | 6c 65 24 2b 22 20 61 70 |he "+tit|le$+" ap|
|00000cd0| 70 6c 69 63 61 74 69 6f | 6e 2e 22 0d 03 de 06 20 |plicatio|n.".... |
|00000ce0| cb 0d 03 e8 0b c9 20 6d | 61 69 6e 25 0d 03 f2 0f |...... m|ain%....|
|00000cf0| 20 c8 8e 20 69 63 6f 6e | 25 20 ca 0d 03 fc 2d 20 | .. icon|% ....- |
|00000d00| c9 20 31 2c 35 3a 20 68 | 24 3d 22 43 6c 69 63 6b |. 1,5: h|$="Click|
|00000d10| 20 68 65 72 65 20 74 6f | 20 74 6f 67 67 6c 65 20 | here to| toggle |
|00000d20| 6f 6e 2f 6f 66 66 2e 22 | 0d 04 06 49 20 c9 20 32 |on/off."|...I . 2|
|00000d30| 2c 33 3a 20 68 24 3d 22 | 45 6e 74 65 72 20 74 68 |,3: h$="|Enter th|
|00000d40| 65 20 74 72 61 6e 73 66 | 6f 72 6d 61 74 69 6f 6e |e transf|ormation|
|00000d50| 20 66 75 6e 63 74 69 6f | 6e 20 66 6f 72 20 74 68 | functio|n for th|
|00000d60| 65 20 27 58 27 20 64 61 | 74 61 20 68 65 72 65 2e |e 'X' da|ta here.|
|00000d70| 22 0d 04 10 49 20 c9 20 | 36 2c 37 3a 20 68 24 3d |"...I . |6,7: h$=|
|00000d80| 22 45 6e 74 65 72 20 74 | 68 65 20 74 72 61 6e 73 |"Enter t|he trans|
|00000d90| 66 6f 72 6d 61 74 69 6f | 6e 20 66 75 6e 63 74 69 |formatio|n functi|
|00000da0| 6f 6e 20 66 6f 72 20 74 | 68 65 20 27 59 27 20 64 |on for t|he 'Y' d|
|00000db0| 61 74 61 20 68 65 72 65 | 2e 22 0d 04 1a 3a 20 c9 |ata here|."...: .|
|00000dc0| 20 38 3a 20 68 24 3d 22 | 43 6c 69 63 6b 20 68 65 | 8: h$="|Click he|
|00000dd0| 72 65 20 74 6f 20 74 72 | 61 6e 73 66 6f 72 6d 20 |re to tr|ansform |
|00000de0| 59 20 64 61 74 61 20 65 | 72 72 6f 72 73 20 61 6c |Y data e|rrors al|
|00000df0| 73 6f 2e 22 0d 04 24 06 | 20 7f 0d 04 2e 30 20 68 |so."..$.| ....0 h|
|00000e00| 24 3d 22 54 68 69 73 20 | 69 73 20 74 68 65 20 27 |$="This |is the '|
|00000e10| 53 63 69 54 72 61 6e 73 | 27 20 63 6f 6e 74 72 6f |SciTrans|' contro|
|00000e20| 6c 20 77 69 6e 64 6f 77 | 2e 22 0d 04 38 06 20 cb |l window|."..8. .|
|00000e30| 0d 04 42 05 cb 0d 04 4c | 07 3d 68 24 0d 04 56 05 |..B....L|.=h$..V.|
|00000e40| 3a 0d 04 60 0e dd 20 f2 | 6b 65 79 28 62 25 29 0d |:..`.. .|key(b%).|
|00000e50| 04 6a 0e 77 69 6e 64 25 | 3d 62 25 21 30 0d 04 74 |.j.wind%|=b%!0..t|
|00000e60| 0e 69 63 6f 6e 25 3d 62 | 25 21 34 0d 04 7e 0c 6b |.icon%=b|%!4..~.k|
|00000e70| 25 3d 62 25 21 32 34 0d | 04 88 0b c8 8e 20 6b 25 |%=b%!24.|..... k%|
|00000e80| 20 ca 0d 04 92 1f c9 20 | 26 31 38 46 3a f2 6d 6f | ...... |&18F:.mo|
|00000e90| 76 65 75 70 28 77 69 6e | 64 25 2c 69 63 6f 6e 25 |veup(win|d%,icon%|
|00000ea0| 29 0d 04 9c 21 c9 20 26 | 31 38 45 3a f2 6d 6f 76 |)...!. &|18E:.mov|
|00000eb0| 65 64 6f 77 6e 28 77 69 | 6e 64 25 2c 69 63 6f 6e |edown(wi|nd%,icon|
|00000ec0| 25 29 0d 04 a6 08 c9 20 | 31 33 0d 04 b0 24 e7 20 |%)..... |13...$. |
|00000ed0| 77 69 6e 64 25 3d 66 69 | 6c 65 25 20 8c 20 f2 73 |wind%=fi|le% . .s|
|00000ee0| 61 76 65 69 74 28 24 66 | 6e 61 6d 65 25 29 0d 04 |aveit($f|name%)..|
|00000ef0| ba 22 e7 20 77 69 6e 64 | 25 3d 6d 61 69 6e 25 20 |.". wind|%=main% |
|00000f00| 8c 20 f2 61 63 63 65 70 | 74 28 77 69 6e 64 25 29 |. .accep|t(wind%)|
|00000f10| 0d 04 c4 43 c9 20 32 37 | 3a 21 62 6c 6f 63 6b 25 |...C. 27|:!block%|
|00000f20| 3d 66 69 6c 65 25 3a c8 | 99 20 22 57 69 6d 70 5f |=file%:.|. "Wimp_|
|00000f30| 43 6c 6f 73 65 57 69 6e | 64 6f 77 22 2c 2c 62 6c |CloseWin|dow",,bl|
|00000f40| 6f 63 6b 25 3a f2 72 65 | 6c 65 61 73 65 28 63 73 |ock%:.re|lease(cs|
|00000f50| 74 25 29 0d 04 ce 1d 7f | 3a c8 99 20 22 57 69 6d |t%).....|:.. "Wim|
|00000f60| 70 5f 50 72 6f 63 65 73 | 73 4b 65 79 22 2c 6b 25 |p_Proces|sKey",k%|
|00000f70| 0d 04 d8 05 cb 0d 04 e2 | 05 e1 0d 04 ec 05 3a 0d |........|......:.|
|00000f80| 04 f6 1a dd 20 f2 6d 6f | 76 65 75 70 28 77 69 6e |.... .mo|veup(win|
|00000f90| 64 25 2c 69 63 6f 6e 25 | 29 0d 05 00 08 ea 20 41 |d%,icon%|)..... A|
|00000fa0| 25 0d 05 0a 0c 69 63 6f | 6e 25 2d 3d 34 0d 05 14 |%....ico|n%-=4...|
|00000fb0| 0e c8 8e 20 77 69 6e 64 | 25 20 ca 0d 05 1e 21 c9 |... wind|% ....!.|
|00000fc0| 20 6d 61 69 6e 25 20 3a | e7 20 69 63 6f 6e 25 3d | main% :|. icon%=|
|00000fd0| 2d 31 20 8c 20 69 63 6f | 6e 25 3d 37 0d 05 28 05 |-1 . ico|n%=7..(.|
|00000fe0| cb 0d 05 32 26 c8 99 20 | 22 57 69 6d 70 5f 47 65 |...2&.. |"Wimp_Ge|
|00000ff0| 74 43 61 72 65 74 50 6f | 73 69 74 69 6f 6e 22 2c |tCaretPo|sition",|
|00001000| 2c 63 61 72 65 74 25 0d | 05 3c 14 69 63 6f 6e 62 |,caret%.|.<.iconb|
|00001010| 6c 6b 25 21 30 3d 77 69 | 6e 64 25 0d 05 46 14 69 |lk%!0=wi|nd%..F.i|
|00001020| 63 6f 6e 62 6c 6b 25 21 | 34 3d 69 63 6f 6e 25 0d |conblk%!|4=icon%.|
|00001030| 05 50 24 c8 99 20 22 57 | 69 6d 70 5f 47 65 74 49 |.P$.. "W|imp_GetI|
|00001040| 63 6f 6e 53 74 61 74 65 | 22 2c 2c 69 63 6f 6e 62 |conState|",,iconb|
|00001050| 6c 6b 25 0d 05 5a 35 c8 | 99 20 22 57 69 6d 70 5f |lk%..Z5.|. "Wimp_|
|00001060| 53 65 74 43 61 72 65 74 | 50 6f 73 69 74 69 6f 6e |SetCaret|Position|
|00001070| 22 2c 63 61 72 65 74 25 | 21 30 2c 69 63 6f 6e 25 |",caret%|!0,icon%|
|00001080| 2c 2c 2c 2d 31 2c 2d 31 | 0d 05 64 05 e1 0d 05 6e |,,,-1,-1|..d....n|
|00001090| 05 3a 0d 05 78 1c dd 20 | f2 6d 6f 76 65 64 6f 77 |.:..x.. |.movedow|
|000010a0| 6e 28 77 69 6e 64 25 2c | 69 63 6f 6e 25 29 0d 05 |n(wind%,|icon%)..|
|000010b0| 82 0c 69 63 6f 6e 25 2b | 3d 34 0d 05 8c 0e c8 8e |..icon%+|=4......|
|000010c0| 20 77 69 6e 64 25 20 ca | 0d 05 96 21 c9 20 6d 61 | wind% .|...!. ma|
|000010d0| 69 6e 25 20 3a e7 20 69 | 63 6f 6e 25 3d 31 31 20 |in% :. i|con%=11 |
|000010e0| 8c 20 69 63 6f 6e 25 3d | 33 0d 05 a0 05 cb 0d 05 |. icon%=|3.......|
|000010f0| aa 26 c8 99 20 22 57 69 | 6d 70 5f 47 65 74 43 61 |.&.. "Wi|mp_GetCa|
|00001100| 72 65 74 50 6f 73 69 74 | 69 6f 6e 22 2c 2c 63 61 |retPosit|ion",,ca|
|00001110| 72 65 74 25 0d 05 b4 14 | 69 63 6f 6e 62 6c 6b 25 |ret%....|iconblk%|
|00001120| 21 30 3d 77 69 6e 64 25 | 0d 05 be 14 69 63 6f 6e |!0=wind%|....icon|
|00001130| 62 6c 6b 25 21 34 3d 69 | 63 6f 6e 25 0d 05 c8 24 |blk%!4=i|con%...$|
|00001140| c8 99 20 22 57 69 6d 70 | 5f 47 65 74 49 63 6f 6e |.. "Wimp|_GetIcon|
|00001150| 53 74 61 74 65 22 2c 2c | 69 63 6f 6e 62 6c 6b 25 |State",,|iconblk%|
|00001160| 0d 05 d2 35 c8 99 20 22 | 57 69 6d 70 5f 53 65 74 |...5.. "|Wimp_Set|
|00001170| 43 61 72 65 74 50 6f 73 | 69 74 69 6f 6e 22 2c 63 |CaretPos|ition",c|
|00001180| 61 72 65 74 25 21 30 2c | 69 63 6f 6e 25 2c 2c 2c |aret%!0,|icon%,,,|
|00001190| 2d 31 2c 2d 31 0d 05 dc | 05 e1 0d 05 e6 05 3a 0d |-1,-1...|......:.|
|000011a0| 05 f0 14 dd 20 f2 61 63 | 63 65 70 74 28 77 69 6e |.... .ac|cept(win|
|000011b0| 64 25 29 0d 05 fa 08 ea | 20 41 25 0d 06 04 0e c8 |d%).....| A%.....|
|000011c0| 8e 20 77 69 6e 64 25 20 | ca 0d 06 0e 1b c9 20 6d |. wind% |...... m|
|000011d0| 61 69 6e 25 20 3a f2 67 | 65 74 5f 6d 61 69 6e 5f |ain% :.g|et_main_|
|000011e0| 76 61 72 73 0d 06 18 05 | cb 0d 06 22 05 e1 0d 06 |vars....|..."....|
|000011f0| 2c 05 3a 0d 06 36 14 dd | 20 f2 67 65 74 5f 6d 61 |,.:..6..| .get_ma|
|00001200| 69 6e 5f 76 61 72 73 0d | 06 40 1d 58 54 72 61 6e |in_vars.|.@.XTran|
|00001210| 73 25 3d a4 69 63 6f 6e | 5f 73 65 6c 65 63 74 65 |s%=.icon|_selecte|
|00001220| 64 28 31 29 0d 06 4a 1d | 59 54 72 61 6e 73 25 3d |d(1)..J.|YTrans%=|
|00001230| a4 69 63 6f 6e 5f 73 65 | 6c 65 63 74 65 64 28 35 |.icon_se|lected(5|
|00001240| 29 0d 06 54 22 e7 20 59 | 54 72 61 6e 73 25 3d a3 |)..T". Y|Trans%=.|
|00001250| 20 8c 20 f2 64 65 73 65 | 6c 65 63 74 69 63 6f 6e | . .dese|lecticon|
|00001260| 28 38 29 0d 06 5e 1d 45 | 54 72 61 6e 73 25 3d a4 |(8)..^.E|Trans%=.|
|00001270| 69 63 6f 6e 5f 73 65 6c | 65 63 74 65 64 28 38 29 |icon_sel|ected(8)|
|00001280| 0d 06 68 3b 46 58 24 3d | a4 67 65 74 76 61 72 73 |..h;FX$=|.getvars|
|00001290| 74 72 28 33 29 3a e7 20 | 46 58 24 3d 22 22 20 8c |tr(3):. |FX$="" .|
|000012a0| 20 46 58 24 3d 22 58 22 | 3a f2 73 65 74 76 61 72 | FX$="X"|:.setvar|
|000012b0| 69 63 6f 6e 28 33 2c 46 | 58 24 29 0d 06 72 3b 46 |icon(3,F|X$)..r;F|
|000012c0| 59 24 3d a4 67 65 74 76 | 61 72 73 74 72 28 37 29 |Y$=.getv|arstr(7)|
|000012d0| 3a e7 20 46 59 24 3d 22 | 22 20 8c 20 46 59 24 3d |:. FY$="|" . FY$=|
|000012e0| 22 59 22 3a f2 73 65 74 | 76 61 72 69 63 6f 6e 28 |"Y":.set|varicon(|
|000012f0| 37 2c 46 59 24 29 0d 06 | 7c 05 e1 0d 06 86 05 3a |7,FY$)..||......:|
|00001300| 0d 06 90 2c dd 20 a4 67 | 65 74 76 61 72 76 61 6c |...,. .g|etvarval|
|00001310| 28 69 63 6f 6e 25 29 3d | bb 28 a4 67 65 74 76 61 |(icon%)=|.(.getva|
|00001320| 72 73 74 72 28 69 63 6f | 6e 25 29 29 0d 06 9a 05 |rstr(ico|n%))....|
|00001330| 3a 0d 06 a4 17 dd 20 a4 | 67 65 74 76 61 72 73 74 |:..... .|getvarst|
|00001340| 72 28 69 63 6f 6e 25 29 | 0d 06 ae 0d ea 20 72 65 |r(icon%)|..... re|
|00001350| 73 75 6c 74 24 0d 06 b8 | 14 69 63 6f 6e 62 6c 6b |sult$...|.iconblk|
|00001360| 25 21 30 3d 77 69 6e 64 | 25 0d 06 c2 14 69 63 6f |%!0=wind|%....ico|
|00001370| 6e 62 6c 6b 25 21 34 3d | 69 63 6f 6e 25 0d 06 cc |nblk%!4=|icon%...|
|00001380| 24 c8 99 20 22 57 69 6d | 70 5f 47 65 74 49 63 6f |$.. "Wim|p_GetIco|
|00001390| 6e 53 74 61 74 65 22 2c | 2c 69 63 6f 6e 62 6c 6b |nState",|,iconblk|
|000013a0| 25 0d 06 d6 13 3d 24 28 | 69 63 6f 6e 62 6c 6b 25 |%....=$(|iconblk%|
|000013b0| 21 32 38 29 0d 06 e0 05 | 3a 0d 06 ea 1d dd 20 f2 |!28)....|:..... .|
|000013c0| 73 65 74 76 61 72 69 63 | 6f 6e 28 69 63 6f 6e 25 |setvaric|on(icon%|
|000013d0| 2c 76 61 6c 24 29 0d 06 | f4 14 69 63 6f 6e 62 6c |,val$)..|..iconbl|
|000013e0| 6b 25 21 30 3d 77 69 6e | 64 25 0d 06 fe 14 69 63 |k%!0=win|d%....ic|
|000013f0| 6f 6e 62 6c 6b 25 21 34 | 3d 69 63 6f 6e 25 0d 07 |onblk%!4|=icon%..|
|00001400| 08 24 c8 99 20 22 57 69 | 6d 70 5f 47 65 74 49 63 |.$.. "Wi|mp_GetIc|
|00001410| 6f 6e 53 74 61 74 65 22 | 2c 2c 69 63 6f 6e 62 6c |onState"|,,iconbl|
|00001420| 6b 25 0d 07 12 17 24 28 | 69 63 6f 6e 62 6c 6b 25 |k%....$(|iconblk%|
|00001430| 21 32 38 29 3d 76 61 6c | 24 0d 07 1c 10 69 63 6f |!28)=val|$....ico|
|00001440| 6e 62 6c 6b 25 21 38 3d | 30 0d 07 26 11 69 63 6f |nblk%!8=|0..&.ico|
|00001450| 6e 62 6c 6b 25 21 31 32 | 3d 30 0d 07 30 24 c8 99 |nblk%!12|=0..0$..|
|00001460| 20 22 57 69 6d 70 5f 53 | 65 74 49 63 6f 6e 53 74 | "Wimp_S|etIconSt|
|00001470| 61 74 65 22 2c 2c 69 63 | 6f 6e 62 6c 6b 25 0d 07 |ate",,ic|onblk%..|
|00001480| 3a 05 e1 0d 07 44 05 3a | 0d 07 4e 1c dd 20 f2 64 |:....D.:|..N.. .d|
|00001490| 65 73 65 6c 65 63 74 69 | 63 6f 6e 28 48 61 6e 64 |eselecti|con(Hand|
|000014a0| 6c 65 25 29 0d 07 58 14 | 69 63 6f 6e 62 6c 6b 25 |le%)..X.|iconblk%|
|000014b0| 21 30 3d 77 69 6e 64 25 | 0d 07 62 16 69 63 6f 6e |!0=wind%|..b.icon|
|000014c0| 62 6c 6b 25 21 34 3d 48 | 61 6e 64 6c 65 25 0d 07 |blk%!4=H|andle%..|
|000014d0| 6c 10 69 63 6f 6e 62 6c | 6b 25 21 38 3d 30 0d 07 |l.iconbl|k%!8=0..|
|000014e0| 76 17 69 63 6f 6e 62 6c | 6b 25 21 31 32 3d 26 32 |v.iconbl|k%!12=&2|
|000014f0| 30 30 30 30 30 0d 07 80 | 24 c8 99 20 22 57 69 6d |00000...|$.. "Wim|
|00001500| 70 5f 53 65 74 49 63 6f | 6e 53 74 61 74 65 22 2c |p_SetIco|nState",|
|00001510| 2c 69 63 6f 6e 62 6c 6b | 25 0d 07 8a 05 e1 0d 07 |,iconblk|%.......|
|00001520| 94 05 3a 0d 07 9e 1a dd | 20 f2 73 65 6c 65 63 74 |..:.....| .select|
|00001530| 69 63 6f 6e 28 48 61 6e | 64 6c 65 25 29 0d 07 a8 |icon(Han|dle%)...|
|00001540| 14 69 63 6f 6e 62 6c 6b | 25 21 30 3d 77 69 6e 64 |.iconblk|%!0=wind|
|00001550| 25 0d 07 b2 16 69 63 6f | 6e 62 6c 6b 25 21 34 3d |%....ico|nblk%!4=|
|00001560| 48 61 6e 64 6c 65 25 0d | 07 bc 16 69 63 6f 6e 62 |Handle%.|...iconb|
|00001570| 6c 6b 25 21 38 3d 26 32 | 30 30 30 30 30 0d 07 c6 |lk%!8=&2|00000...|
|00001580| 17 69 63 6f 6e 62 6c 6b | 25 21 31 32 3d 26 32 30 |.iconblk|%!12=&20|
|00001590| 30 30 30 30 0d 07 d0 24 | c8 99 20 22 57 69 6d 70 |0000...$|.. "Wimp|
|000015a0| 5f 53 65 74 49 63 6f 6e | 53 74 61 74 65 22 2c 2c |_SetIcon|State",,|
|000015b0| 69 63 6f 6e 62 6c 6b 25 | 0d 07 da 05 e1 0d 07 e4 |iconblk%|........|
|000015c0| 05 3a 0d 07 ee 1d dd 20 | a4 69 63 6f 6e 5f 73 65 |.:..... |.icon_se|
|000015d0| 6c 65 63 74 65 64 28 48 | 61 6e 64 6c 65 25 29 0d |lected(H|andle%).|
|000015e0| 07 f8 0c ea 20 66 6c 61 | 67 73 25 0d 08 02 14 69 |.... fla|gs%....i|
|000015f0| 63 6f 6e 62 6c 6b 25 21 | 30 3d 77 69 6e 64 25 0d |conblk%!|0=wind%.|
|00001600| 08 0c 16 69 63 6f 6e 62 | 6c 6b 25 21 34 3d 48 61 |...iconb|lk%!4=Ha|
|00001610| 6e 64 6c 65 25 0d 08 16 | 24 c8 99 20 22 57 69 6d |ndle%...|$.. "Wim|
|00001620| 70 5f 47 65 74 49 63 6f | 6e 53 74 61 74 65 22 2c |p_GetIco|nState",|
|00001630| 2c 69 63 6f 6e 62 6c 6b | 25 0d 08 20 16 66 6c 61 |,iconblk|%.. .fla|
|00001640| 67 73 25 3d 69 63 6f 6e | 62 6c 6b 25 21 32 34 0d |gs%=icon|blk%!24.|
|00001650| 08 2a 24 3d 2d 28 28 66 | 6c 61 67 73 25 20 80 20 |.*$=-((f|lags% . |
|00001660| 26 32 30 30 30 30 30 29 | 20 81 20 26 32 30 30 30 |&200000)| . &2000|
|00001670| 30 30 29 0d 08 34 05 3a | 0d 08 3e 18 dd 20 f2 67 |00)..4.:|..>.. .g|
|00001680| 72 65 79 69 63 6f 6e 28 | 48 61 6e 64 6c 65 25 29 |reyicon(|Handle%)|
|00001690| 0d 08 48 14 69 63 6f 6e | 62 6c 6b 25 21 30 3d 77 |..H.icon|blk%!0=w|
|000016a0| 69 6e 64 25 0d 08 52 16 | 69 63 6f 6e 62 6c 6b 25 |ind%..R.|iconblk%|
|000016b0| 21 34 3d 48 61 6e 64 6c | 65 25 0d 08 5c 16 69 63 |!4=Handl|e%..\.ic|
|000016c0| 6f 6e 62 6c 6b 25 21 38 | 3d 26 34 30 30 30 30 30 |onblk%!8|=&400000|
|000016d0| 0d 08 66 17 69 63 6f 6e | 62 6c 6b 25 21 31 32 3d |..f.icon|blk%!12=|
|000016e0| 26 34 30 30 30 30 30 0d | 08 70 24 c8 99 20 22 57 |&400000.|.p$.. "W|
|000016f0| 69 6d 70 5f 53 65 74 49 | 63 6f 6e 53 74 61 74 65 |imp_SetI|conState|
|00001700| 22 2c 2c 69 63 6f 6e 62 | 6c 6b 25 0d 08 7a 05 e1 |",,iconb|lk%..z..|
|00001710| 0d 08 84 05 3a 0d 08 8e | 1a dd 20 f2 75 6e 67 72 |....:...|.. .ungr|
|00001720| 65 79 69 63 6f 6e 28 48 | 61 6e 64 6c 65 25 29 0d |eyicon(H|andle%).|
|00001730| 08 98 14 69 63 6f 6e 62 | 6c 6b 25 21 30 3d 77 69 |...iconb|lk%!0=wi|
|00001740| 6e 64 25 0d 08 a2 16 69 | 63 6f 6e 62 6c 6b 25 21 |nd%....i|conblk%!|
|00001750| 34 3d 48 61 6e 64 6c 65 | 25 0d 08 ac 10 69 63 6f |4=Handle|%....ico|
|00001760| 6e 62 6c 6b 25 21 38 3d | 30 0d 08 b6 17 69 63 6f |nblk%!8=|0....ico|
|00001770| 6e 62 6c 6b 25 21 31 32 | 3d 26 34 30 30 30 30 30 |nblk%!12|=&400000|
|00001780| 0d 08 c0 24 c8 99 20 22 | 57 69 6d 70 5f 53 65 74 |...$.. "|Wimp_Set|
|00001790| 49 63 6f 6e 53 74 61 74 | 65 22 2c 2c 69 63 6f 6e |IconStat|e",,icon|
|000017a0| 62 6c 6b 25 0d 08 ca 05 | e1 0d 08 d4 05 3a 0d 08 |blk%....|.....:..|
|000017b0| de 12 dd 20 f2 62 75 74 | 74 6f 6e 73 28 62 25 29 |... .but|tons(b%)|
|000017c0| 0d 08 e8 19 ea 20 77 69 | 6e 64 25 2c 69 63 6f 6e |..... wi|nd%,icon|
|000017d0| 25 2c 62 75 74 74 6f 6e | 25 0d 08 f2 10 62 75 74 |%,button|%....but|
|000017e0| 74 6f 6e 25 3d 62 25 21 | 38 0d 08 fc 0f 77 69 6e |ton%=b%!|8....win|
|000017f0| 64 25 3d 62 25 21 31 32 | 0d 09 06 0f 69 63 6f 6e |d%=b%!12|....icon|
|00001800| 25 3d 62 25 21 31 36 0d | 09 10 0e c8 8e 20 77 69 |%=b%!16.|..... wi|
|00001810| 6e 64 25 20 ca 0d 09 1a | 09 c9 20 2d 32 3a 0d 09 |nd% ....|.. -2:..|
|00001820| 24 14 e7 20 69 63 6f 6e | 25 3d 73 69 63 6f 6e 25 |$.. icon|%=sicon%|
|00001830| 20 8c 0d 09 2e 34 e7 20 | 28 62 75 74 74 6f 6e 25 | ....4. |(button%|
|00001840| 20 80 20 32 29 20 8c 20 | f2 6d 65 6e 75 28 62 25 | . 2) . |.menu(b%|
|00001850| 29 20 8b 20 f2 6f 70 65 | 6e 77 69 6e 64 6f 77 28 |) . .ope|nwindow(|
|00001860| 6d 61 69 6e 25 29 0d 09 | 38 05 cd 0d 09 42 0c c9 |main%)..|8....B..|
|00001870| 20 66 69 6c 65 25 3a 0d | 09 4c 26 e7 20 69 63 6f | file%:.|.L&. ico|
|00001880| 6e 25 3d 66 69 63 6f 6e | 25 20 80 20 28 62 25 21 |n%=ficon|% . (b%!|
|00001890| 38 20 80 20 26 35 30 29 | 3c 3e 30 20 8c 0d 09 56 |8 . &50)|<>0 ...V|
|000018a0| 0d 21 62 25 3d 66 69 6c | 65 25 0d 09 60 20 c8 99 |.!b%=fil|e%..` ..|
|000018b0| 20 22 57 69 6d 70 5f 47 | 65 74 57 69 6e 64 6f 77 | "Wimp_G|etWindow|
|000018c0| 53 74 61 74 65 22 2c 2c | 62 25 0d 09 6a 24 77 65 |State",,|b%..j$we|
|000018d0| 78 25 3d 62 25 21 34 2d | 62 25 21 32 30 3a 77 65 |x%=b%!4-|b%!20:we|
|000018e0| 79 25 3d 62 25 21 31 36 | 2d 62 25 21 32 34 0d 09 |y%=b%!16|-b%!24..|
|000018f0| 74 0f 62 25 21 34 3d 66 | 69 63 6f 6e 25 0d 09 7e |t.b%!4=f|icon%..~|
|00001900| 1e c8 99 20 22 57 69 6d | 70 5f 47 65 74 49 63 6f |... "Wim|p_GetIco|
|00001910| 6e 53 74 61 74 65 22 2c | 2c 62 25 0d 09 88 14 21 |nState",|,b%....!|
|00001920| 62 25 3d 66 69 6c 65 25 | 3a 62 25 21 34 3d 35 0d |b%=file%|:b%!4=5.|
|00001930| 09 92 23 62 25 21 38 3d | 62 25 21 38 2b 77 65 78 |..#b%!8=|b%!8+wex|
|00001940| 25 3a 62 25 21 31 32 3d | 62 25 21 31 32 2b 77 65 |%:b%!12=|b%!12+we|
|00001950| 79 25 0d 09 9c 25 62 25 | 21 31 36 3d 62 25 21 31 |y%...%b%|!16=b%!1|
|00001960| 36 2b 77 65 78 25 3a 62 | 25 21 32 30 3d 62 25 21 |6+wex%:b|%!20=b%!|
|00001970| 32 30 2b 77 65 79 25 0d | 09 a6 13 62 25 21 32 34 |20+wey%.|...b%!24|
|00001980| 3d 30 3a 62 25 21 32 38 | 3d 30 0d 09 b0 23 62 25 |=0:b%!28|=0...#b%|
|00001990| 21 33 32 3d 26 37 46 46 | 46 46 46 46 46 3a 62 25 |!32=&7FF|FFFFF:b%|
|000019a0| 21 33 36 3d 26 37 46 46 | 46 46 46 46 46 0d 09 ba |!36=&7FF|FFFFF...|
|000019b0| 19 c8 99 20 22 57 69 6d | 70 5f 44 72 61 67 42 6f |... "Wim|p_DragBo|
|000019c0| 78 22 2c 2c 62 25 0d 09 | c4 05 cd 0d 09 ce 22 e7 |x",,b%..|......".|
|000019d0| 20 69 63 6f 6e 25 3d 6f | 6b 25 20 8c 20 f2 73 61 | icon%=o|k% . .sa|
|000019e0| 76 65 69 74 28 24 66 6e | 61 6d 65 25 29 0d 09 d8 |veit($fn|ame%)...|
|000019f0| 0c c9 20 6d 61 69 6e 25 | 3a 0d 09 e2 11 20 c8 8e |.. main%|:.... ..|
|00001a00| 20 62 75 74 74 6f 6e 25 | 20 ca 0d 09 ec 0b 20 c9 | button%| ..... .|
|00001a10| 20 31 2c 34 3a 0d 09 f6 | 10 20 20 c8 8e 20 69 63 | 1,4:...|. .. ic|
|00001a20| 6f 6e 25 20 ca 0d 0a 00 | 0a 20 20 c9 20 31 3a 0d |on% ....|. . 1:.|
|00001a30| 0a 0a 20 20 20 20 58 54 | 72 61 6e 73 25 3d a4 69 |.. XT|rans%=.i|
|00001a40| 63 6f 6e 5f 73 65 6c 65 | 63 74 65 64 28 31 29 0d |con_sele|cted(1).|
|00001a50| 0a 14 32 20 20 20 e7 20 | 58 54 72 61 6e 73 25 3d |..2 . |XTrans%=|
|00001a60| a3 20 8c 20 f2 67 72 65 | 79 69 63 6f 6e 28 33 29 |. . .gre|yicon(3)|
|00001a70| 20 8b 20 f2 75 6e 67 72 | 65 79 69 63 6f 6e 28 33 | . .ungr|eyicon(3|
|00001a80| 29 0d 0a 1e 0a 20 20 c9 | 20 35 3a 0d 0a 28 22 20 |).... .| 5:..(" |
|00001a90| 20 20 20 59 54 72 61 6e | 73 25 3d a4 69 63 6f 6e | YTran|s%=.icon|
|00001aa0| 5f 73 65 6c 65 63 74 65 | 64 28 35 29 3a 0d 0a 32 |_selecte|d(5):..2|
|00001ab0| 14 20 20 20 e7 20 59 54 | 72 61 6e 73 25 3d a3 20 |. . YT|rans%=. |
|00001ac0| 8c 0d 0a 3c 18 20 20 20 | 20 f2 64 65 73 65 6c 65 |...<. | .desele|
|00001ad0| 63 74 69 63 6f 6e 28 38 | 29 0d 0a 46 14 20 20 20 |cticon(8|)..F. |
|00001ae0| 20 f2 67 72 65 79 69 63 | 6f 6e 28 37 29 0d 0a 50 | .greyic|on(7)..P|
|00001af0| 14 20 20 20 20 f2 67 72 | 65 79 69 63 6f 6e 28 38 |. .gr|eyicon(8|
|00001b00| 29 0d 0a 5a 08 20 20 20 | cc 0d 0a 64 16 20 20 20 |)..Z. |...d. |
|00001b10| 20 f2 75 6e 67 72 65 79 | 69 63 6f 6e 28 37 29 0d | .ungrey|icon(7).|
|00001b20| 0a 6e 16 20 20 20 20 f2 | 75 6e 67 72 65 79 69 63 |.n. .|ungreyic|
|00001b30| 6f 6e 28 38 29 0d 0a 78 | 08 20 20 20 cd 0d 0a 82 |on(8)..x|. ....|
|00001b40| 24 20 20 c9 20 38 3a 20 | 45 54 72 61 6e 73 25 3d |$ . 8: |ETrans%=|
|00001b50| a4 69 63 6f 6e 5f 73 65 | 6c 65 63 74 65 64 28 38 |.icon_se|lected(8|
|00001b60| 29 0d 0a 8c 07 20 20 cb | 0d 0a 96 13 20 c9 20 32 |).... .|.... . 2|
|00001b70| 3a 20 f2 6d 65 6e 75 28 | 62 25 29 0d 0a a0 06 20 |: .menu(|b%).... |
|00001b80| cb 0d 0a aa 05 cb 0d 0a | b4 05 e1 0d 0a be 05 3a |........|.......:|
|00001b90| 0d 0a c8 18 dd 20 f2 6f | 70 65 6e 77 69 6e 64 6f |..... .o|penwindo|
|00001ba0| 77 28 77 69 6e 64 25 29 | 0d 0a d2 12 62 6c 6f 63 |w(wind%)|....bloc|
|00001bb0| 6b 25 21 30 3d 77 69 6e | 64 25 0d 0a dc 23 c8 99 |k%!0=win|d%...#..|
|00001bc0| 20 22 57 69 6d 70 5f 47 | 65 74 57 69 6e 64 6f 77 | "Wimp_G|etWindow|
|00001bd0| 49 6e 66 6f 22 2c 2c 62 | 6c 6f 63 6b 25 0d 0a e6 |Info",,b|lock%...|
|00001be0| 20 c8 99 20 22 57 69 6d | 70 5f 4f 70 65 6e 57 69 | .. "Wim|p_OpenWi|
|00001bf0| 6e 64 6f 77 22 2c 2c 62 | 6c 6f 63 6b 25 0d 0a f0 |ndow",,b|lock%...|
|00001c00| 05 e1 0d 0a fa 05 3a 0d | 0b 04 0f dd 20 f2 6d 65 |......:.|.... .me|
|00001c10| 6e 75 28 62 25 29 0d 0b | 0e 10 6d 65 6e 75 5f 78 |nu(b%)..|..menu_x|
|00001c20| 25 3d 62 25 21 30 0d 0b | 18 10 6d 65 6e 75 5f 79 |%=b%!0..|..menu_y|
|00001c30| 25 3d 62 25 21 34 0d 0b | 22 14 6d 65 6e 75 5f 77 |%=b%!4..|".menu_w|
|00001c40| 69 6e 64 25 3d 62 25 21 | 31 32 0d 0b 2c 13 c8 8e |ind%=b%!|12..,...|
|00001c50| 20 6d 65 6e 75 5f 77 69 | 6e 64 25 20 ca 0d 0b 36 | menu_wi|nd% ...6|
|00001c60| 62 c9 20 2d 32 3a f2 64 | 72 61 77 6d 65 6e 75 28 |b. -2:.d|rawmenu(|
|00001c70| 31 2c 6d 65 6e 75 25 2c | 22 53 63 69 54 72 61 6e |1,menu%,|"SciTran|
|00001c80| 73 2c 20 20 49 6e 66 6f | 2c 20 20 51 75 69 74 22 |s, Info|, Quit"|
|00001c90| 29 3a c8 99 20 22 57 69 | 6d 70 5f 43 72 65 61 74 |):.. "Wi|mp_Creat|
|00001ca0| 65 4d 65 6e 75 22 2c 2c | 6d 65 6e 75 25 2b 34 2c |eMenu",,|menu%+4,|
|00001cb0| 6d 65 6e 75 5f 78 25 2d | 31 30 30 2c 31 37 36 0d |menu_x%-|100,176.|
|00001cc0| 0b 40 0c c9 20 6d 61 69 | 6e 25 3a 0d 0b 4a 72 20 |.@.. mai|n%:..Jr |
|00001cd0| f2 64 72 61 77 6d 65 6e | 75 28 32 2c 6d 65 6e 75 |.drawmen|u(2,menu|
|00001ce0| 25 2c 22 54 72 61 6e 73 | 66 6f 72 6d 73 2c 20 4c |%,"Trans|forms, L|
|00001cf0| 69 6e 20 20 4c 6f 67 2c | 20 4c 6f 67 20 20 4c 69 |in Log,| Log Li|
|00001d00| 6e 2c 20 4c 6f 67 20 20 | 4c 6f 67 2c 20 4c 69 6e |n, Log |Log, Lin|
|00001d10| 20 20 4c 4e 2c 20 4c 4e | 20 20 20 4c 69 6e 2c 20 | LN, LN| Lin, |
|00001d20| 4c 4e 20 20 20 4c 4e 2c | 41 72 72 68 2e 20 4c 4e |LN LN,|Arrh. LN|
|00001d30| 20 2c 41 72 72 68 2e 20 | 4c 6f 67 22 29 0d 0b 54 | ,Arrh. |Log")..T|
|00001d40| 32 20 c8 99 20 22 57 69 | 6d 70 5f 43 72 65 61 74 |2 .. "Wi|mp_Creat|
|00001d50| 65 4d 65 6e 75 22 2c 2c | 6d 65 6e 75 25 2b 34 2c |eMenu",,|menu%+4,|
|00001d60| 6d 65 6e 75 5f 78 25 2c | 6d 65 6e 75 5f 79 25 0d |menu_x%,|menu_y%.|
|00001d70| 0b 5e 05 cb 0d 0b 68 05 | e1 0d 0b 72 05 3a 0d 0b |.^....h.|...r.:..|
|00001d80| 7c 19 dd 20 f2 64 72 61 | 77 6d 65 6e 75 28 68 25 ||.. .dra|wmenu(h%|
|00001d90| 2c 6d 25 2c 6d 24 29 0d | 0b 86 18 ea 20 4c 24 2c |,m%,m$).|.... L$,|
|00001da0| 70 74 72 25 2c 6d 61 78 | 25 2c 54 24 2c 41 25 0d |ptr%,max|%,T$,A%.|
|00001db0| 0b 90 17 21 6d 25 3d 68 | 25 3a 6d 25 21 31 36 3d |...!m%=h|%:m%!16=|
|00001dc0| 26 37 30 32 30 37 0d 0b | 9a 0c 6d 25 21 32 34 3d |&70207..|..m%!24=|
|00001dd0| 34 30 0d 0b a4 16 6d 25 | 21 32 38 3d 30 3a 70 74 |40....m%|!28=0:pt|
|00001de0| 72 25 3d 6d 25 2b 33 32 | 0d 0b ae 16 54 24 3d c0 |r%=m%+32|....T$=.|
|00001df0| 6d 24 2c a7 6d 24 2c 22 | 2c 22 29 2d 31 29 0d 0b |m$,.m$,"|,")-1)..|
|00001e00| b8 19 24 28 6d 25 2b 34 | 29 3d 54 24 3a 6d 61 78 |..$(m%+4|)=T$:max|
|00001e10| 25 3d a9 28 54 24 29 0d | 0b c2 0d 6d 24 3d 6d 24 |%=.(T$).|...m$=m$|
|00001e20| 2b 22 2c 22 0d 0b cc 0d | c8 95 20 6d 24 3c 3e 22 |+","....|.. m$<>"|
|00001e30| 22 0d 0b d6 0f 41 25 3d | a7 6d 24 2c 22 2c 22 29 |"....A%=|.m$,",")|
|00001e40| 0d 0b e0 17 e7 20 41 25 | 3e 6d 61 78 25 20 8c 20 |..... A%|>max% . |
|00001e50| 6d 61 78 25 3d 41 25 0d | 0b ea 10 6d 24 3d c1 6d |max%=A%.|...m$=.m|
|00001e60| 24 2c 41 25 2b 31 29 0d | 0b f4 0e e7 20 6d 24 3c |$,A%+1).|.... m$<|
|00001e70| 3e 22 22 20 8c 0d 0b fe | 15 21 70 74 72 25 3d 30 |>"" ....|.!ptr%=0|
|00001e80| 3a 70 74 72 25 21 34 3d | 2d 31 0d 0c 08 0f 41 25 |:ptr%!4=|-1....A%|
|00001e90| 3d a7 6d 24 2c 22 2c 22 | 29 0d 0c 12 17 e7 20 41 |=.m$,","|)..... A|
|00001ea0| 25 3e 6d 61 78 25 20 8c | 20 6d 61 78 25 3d 41 25 |%>max% .| max%=A%|
|00001eb0| 0d 0c 1c 27 e7 20 c0 6d | 24 2c 41 25 2d 31 29 3d |...'. .m|$,A%-1)=|
|00001ec0| 22 20 20 49 6e 66 6f 22 | 20 8c 20 70 74 72 25 21 |" Info"| . ptr%!|
|00001ed0| 34 3d 69 6e 66 6f 25 0d | 0c 26 13 70 74 72 25 21 |4=info%.|.&.ptr%!|
|00001ee0| 38 3d 26 37 30 30 30 30 | 32 31 0d 0c 30 10 4c 24 |8=&70000|21..0.L$|
|00001ef0| 3d c0 6d 24 2c 41 25 2d | 31 29 0d 0c 3a 1a 24 28 |=.m$,A%-|1)..:.$(|
|00001f00| 70 74 72 25 2b 31 32 29 | 3d c0 4c 24 2c 31 31 29 |ptr%+12)|=.L$,11)|
|00001f10| 2b bd 31 33 0d 0c 44 0c | 70 74 72 25 2b 3d 32 34 |+.13..D.|ptr%+=24|
|00001f20| 0d 0c 4e 05 cd 0d 0c 58 | 05 ce 0d 0c 62 1b 70 74 |..N....X|....b.pt|
|00001f30| 72 25 21 2d 32 34 3d 70 | 74 72 25 21 2d 32 34 20 |r%!-24=p|tr%!-24 |
|00001f40| 84 20 26 38 30 0d 0c 6c | 11 6d 25 21 32 30 3d 31 |. &80..l|.m%!20=1|
|00001f50| 36 2a 6d 61 78 25 0d 0c | 76 05 e1 0d 0c 80 05 3a |6*max%..|v......:|
|00001f60| 0d 0c 8a 18 dd 20 f2 6d | 65 6e 75 73 65 6c 65 63 |..... .m|enuselec|
|00001f70| 74 28 41 25 2c 42 25 29 | 0d 0c 94 0e ea 20 43 25 |t(A%,B%)|..... C%|
|00001f80| 2c 77 69 6e 64 25 0d 0c | 9e 35 c8 99 20 22 57 69 |,wind%..|.5.. "Wi|
|00001f90| 6d 70 5f 47 65 74 50 6f | 69 6e 74 65 72 49 6e 66 |mp_GetPo|interInf|
|00001fa0| 6f 22 2c 2c 62 6c 6f 63 | 6b 25 3a 73 74 61 79 25 |o",,bloc|k%:stay%|
|00001fb0| 3d 62 6c 6f 63 6b 25 21 | 38 3d 31 0d 0c a8 0f c8 |=block%!|8=1.....|
|00001fc0| 8e 20 21 6d 65 6e 75 25 | 20 ca 0d 0c b2 09 20 c9 |. !menu%| ..... .|
|00001fd0| 20 31 3a 0d 0c bc 0c 20 | c8 8e 20 41 25 20 ca 0d | 1:.... |.. A% ..|
|00001fe0| 0c c6 10 20 c9 20 31 3a | 71 75 69 74 25 3d b9 0d |... . 1:|quit%=..|
|00001ff0| 0c d0 06 20 cb 0d 0c da | 09 20 c9 20 32 3a 0d 0c |... ....|. . 2:..|
|00002000| e4 0c 20 c8 8e 20 41 25 | 20 ca 0d 0c ee 23 20 c9 |.. .. A%| ....# .|
|00002010| 20 30 3a 20 46 58 24 3d | 22 58 22 20 20 20 20 20 | 0: FX$=|"X" |
|00002020| 3a 46 59 24 3d 22 4c 4f | 47 28 59 29 22 0d 0c f8 |:FY$="LO|G(Y)"...|
|00002030| 1e 20 c9 20 31 3a 20 46 | 58 24 3d 22 4c 4f 47 28 |. . 1: F|X$="LOG(|
|00002040| 58 29 22 3a 46 59 24 3d | 22 59 22 0d 0d 02 23 20 |X)":FY$=|"Y"...# |
|00002050| c9 20 32 3a 20 46 58 24 | 3d 22 4c 4f 47 28 58 29 |. 2: FX$|="LOG(X)|
|00002060| 22 3a 46 59 24 3d 22 4c | 4f 47 28 59 29 22 0d 0d |":FY$="L|OG(Y)"..|
|00002070| 0c 22 20 c9 20 33 3a 20 | 46 58 24 3d 22 58 22 20 |." . 3: |FX$="X" |
|00002080| 20 20 20 20 3a 46 59 24 | 3d 22 4c 4e 28 59 29 22 | :FY$|="LN(Y)"|
|00002090| 0d 0d 16 1e 20 c9 20 34 | 3a 20 46 58 24 3d 22 4c |.... . 4|: FX$="L|
|000020a0| 4e 28 58 29 22 20 3a 46 | 59 24 3d 22 59 22 0d 0d |N(X)" :F|Y$="Y"..|
|000020b0| 20 22 20 c9 20 35 3a 20 | 46 58 24 3d 22 4c 4e 28 | " . 5: |FX$="LN(|
|000020c0| 58 29 22 20 3a 46 59 24 | 3d 22 4c 4e 28 59 29 22 |X)" :FY$|="LN(Y)"|
|000020d0| 0d 0d 2a 2b 20 c9 20 36 | 3a 20 46 58 24 3d 22 31 |..*+ . 6|: FX$="1|
|000020e0| 30 30 30 2f 28 58 2b 32 | 37 33 2e 31 36 29 22 3a |000/(X+2|73.16)":|
|000020f0| 46 59 24 3d 22 4c 4e 28 | 59 29 22 0d 0d 34 2c 20 |FY$="LN(|Y)"..4, |
|00002100| c9 20 37 3a 20 46 58 24 | 3d 22 31 30 30 30 2f 28 |. 7: FX$|="1000/(|
|00002110| 58 2b 32 37 33 2e 31 36 | 29 22 3a 46 59 24 3d 22 |X+273.16|)":FY$="|
|00002120| 4c 4f 47 28 59 29 22 0d | 0d 3e 06 20 cb 0d 0d 48 |LOG(Y)".|.>. ...H|
|00002130| 10 20 77 69 6e 64 25 3d | 6d 61 69 6e 25 0d 0d 52 |. wind%=|main%..R|
|00002140| 35 20 f2 73 65 74 76 61 | 72 69 63 6f 6e 28 33 2c |5 .setva|ricon(3,|
|00002150| 46 58 24 29 3a f2 75 6e | 67 72 65 79 69 63 6f 6e |FX$):.un|greyicon|
|00002160| 28 33 29 3a f2 73 65 6c | 65 63 74 69 63 6f 6e 28 |(3):.sel|ecticon(|
|00002170| 31 29 0d 0d 5c 44 20 f2 | 73 65 74 76 61 72 69 63 |1)..\D .|setvaric|
|00002180| 6f 6e 28 37 2c 46 59 24 | 29 3a f2 75 6e 67 72 65 |on(7,FY$|):.ungre|
|00002190| 79 69 63 6f 6e 28 37 29 | 3a f2 75 6e 67 72 65 79 |yicon(7)|:.ungrey|
|000021a0| 69 63 6f 6e 28 38 29 3a | f2 73 65 6c 65 63 74 69 |icon(8):|.selecti|
|000021b0| 63 6f 6e 28 35 29 0d 0d | 66 1e 20 58 54 72 61 6e |con(5)..|f. XTran|
|000021c0| 73 25 3d a4 69 63 6f 6e | 5f 73 65 6c 65 63 74 65 |s%=.icon|_selecte|
|000021d0| 64 28 31 29 0d 0d 70 1e | 20 59 54 72 61 6e 73 25 |d(1)..p.| YTrans%|
|000021e0| 3d a4 69 63 6f 6e 5f 73 | 65 6c 65 63 74 65 64 28 |=.icon_s|elected(|
|000021f0| 35 29 0d 0d 7a 05 cb 0d | 0d 84 0d e7 20 73 74 61 |5)..z...|.... sta|
|00002200| 79 25 20 8c 0d 0d 8e 14 | 62 6c 6f 63 6b 25 21 30 |y% .....|block%!0|
|00002210| 3d 6d 65 6e 75 5f 78 25 | 0d 0d 98 14 62 6c 6f 63 |=menu_x%|....bloc|
|00002220| 6b 25 21 34 3d 6d 65 6e | 75 5f 79 25 0d 0d a2 18 |k%!4=men|u_y%....|
|00002230| 62 6c 6f 63 6b 25 21 31 | 32 3d 6d 65 6e 75 5f 77 |block%!1|2=menu_w|
|00002240| 69 6e 64 25 0d 0d ac 11 | f2 6d 65 6e 75 28 62 6c |ind%....|.menu(bl|
|00002250| 6f 63 6b 25 29 0d 0d b6 | 05 cd 0d 0d c0 05 e1 0d |ock%)...|........|
|00002260| 0d ca 05 3a 0d 0d d4 32 | dd 20 a4 69 63 6f 6e 28 |...:...2|. .icon(|
|00002270| 77 25 2c 78 31 25 2c 79 | 31 25 2c 78 32 25 2c 79 |w%,x1%,y|1%,x2%,y|
|00002280| 32 25 2c 66 6c 61 67 73 | 25 2c 69 31 25 2c 69 32 |2%,flags|%,i1%,i2|
|00002290| 25 2c 69 33 25 29 0d 0d | de 1b 21 62 6c 6f 63 6b |%,i3%)..|..!block|
|000022a0| 25 3d 77 25 3a 62 6c 6f | 63 6b 25 21 34 3d 78 31 |%=w%:blo|ck%!4=x1|
|000022b0| 25 0d 0d e8 1e 62 6c 6f | 63 6b 25 21 38 3d 79 31 |%....blo|ck%!8=y1|
|000022c0| 25 3a 62 6c 6f 63 6b 25 | 21 31 32 3d 78 32 25 0d |%:block%|!12=x2%.|
|000022d0| 0d f2 22 62 6c 6f 63 6b | 25 21 31 36 3d 79 32 25 |.."block|%!16=y2%|
|000022e0| 3a 62 6c 6f 63 6b 25 21 | 32 30 3d 66 6c 61 67 73 |:block%!|20=flags|
|000022f0| 25 0d 0d fc 1f 62 6c 6f | 63 6b 25 21 32 34 3d 69 |%....blo|ck%!24=i|
|00002300| 31 25 3a 62 6c 6f 63 6b | 25 21 32 38 3d 69 32 25 |1%:block|%!28=i2%|
|00002310| 0d 0e 06 11 62 6c 6f 63 | 6b 25 21 33 32 3d 69 33 |....bloc|k%!32=i3|
|00002320| 25 0d 0e 10 2a c8 99 20 | 22 57 69 6d 70 5f 43 72 |%...*.. |"Wimp_Cr|
|00002330| 65 61 74 65 49 63 6f 6e | 22 2c 2c 62 6c 6f 63 6b |eateIcon|",,block|
|00002340| 25 20 b8 20 68 61 6e 64 | 6c 65 25 0d 0e 1a 0c 3d |% . hand|le%....=|
|00002350| 68 61 6e 64 6c 65 25 0d | 0e 24 05 3a 0d 0e 2e 0f |handle%.|.$.:....|
|00002360| dd 20 f2 64 72 61 67 64 | 6f 6e 65 0d 0e 38 24 c8 |. .dragd|one..8$.|
|00002370| 99 20 22 57 69 6d 70 5f | 47 65 74 50 6f 69 6e 74 |. "Wimp_|GetPoint|
|00002380| 65 72 49 6e 66 6f 22 2c | 2c 62 6c 6f 63 6b 25 0d |erInfo",|,block%.|
|00002390| 0e 42 10 62 6c 6f 63 6b | 25 21 32 30 3d 36 34 0d |.B.block|%!20=64.|
|000023a0| 0e 4c 0f 62 6c 6f 63 6b | 25 21 33 32 3d 30 0d 0e |.L.block|%!32=0..|
|000023b0| 56 0f 62 6c 6f 63 6b 25 | 21 33 36 3d 31 0d 0e 60 |V.block%|!36=1..`|
|000023c0| 17 62 6c 6f 63 6b 25 21 | 34 30 3d 62 6c 6f 63 6b |.block%!|40=block|
|000023d0| 25 21 31 32 0d 0e 6a 17 | 62 6c 6f 63 6b 25 21 34 |%!12..j.|block%!4|
|000023e0| 34 3d 62 6c 6f 63 6b 25 | 21 31 36 0d 0e 74 15 62 |4=block%|!16..t.b|
|000023f0| 6c 6f 63 6b 25 21 34 38 | 3d 21 62 6c 6f 63 6b 25 |lock%!48|=!block%|
|00002400| 0d 0e 7e 16 62 6c 6f 63 | 6b 25 21 35 32 3d 62 6c |..~.bloc|k%!52=bl|
|00002410| 6f 63 6b 25 21 34 0d 0e | 88 17 62 6c 6f 63 6b 25 |ock%!4..|..block%|
|00002420| 21 35 36 3d 65 6e 64 25 | 2d 62 73 74 25 0d 0e 92 |!56=end%|-bst%...|
|00002430| 13 62 6c 6f 63 6b 25 21 | 36 30 3d 74 79 70 65 25 |.block%!|60=type%|
|00002440| 0d 0e 9c 22 24 28 62 6c | 6f 63 6b 25 2b 36 34 29 |..."$(bl|ock%+64)|
|00002450| 3d a4 6c 65 61 66 28 24 | 66 6e 61 6d 65 25 29 2b |=.leaf($|fname%)+|
|00002460| bd 30 0d 0e a6 3a c8 99 | 20 22 57 69 6d 70 5f 53 |.0...:..| "Wimp_S|
|00002470| 65 6e 64 4d 65 73 73 61 | 67 65 22 2c 31 37 2c 62 |endMessa|ge",17,b|
|00002480| 6c 6f 63 6b 25 2b 32 30 | 2c 62 6c 6f 63 6b 25 21 |lock%+20|,block%!|
|00002490| 31 32 2c 62 6c 6f 63 6b | 25 21 31 36 0d 0e b0 20 |12,block|%!16... |
|000024a0| 6d 79 72 65 66 25 3d 62 | 6c 6f 63 6b 25 21 32 38 |myref%=b|lock%!28|
|000024b0| 3a 73 74 61 72 74 25 3d | 62 73 74 25 0d 0e ba 05 |:start%=|bst%....|
|000024c0| e1 0d 0e c4 05 3a 0d 0e | ce 12 dd 20 a4 6c 65 61 |.....:..|... .lea|
|000024d0| 66 28 70 61 74 68 24 29 | 0d 0e d8 2e c8 95 20 a7 |f(path$)|...... .|
|000024e0| 70 61 74 68 24 2c 22 2e | 22 29 3a 70 61 74 68 24 |path$,".|"):path$|
|000024f0| 3d c1 70 61 74 68 24 2c | a7 70 61 74 68 24 2c 22 |=.path$,|.path$,"|
|00002500| 2e 22 29 2b 31 29 0d 0e | e2 05 ce 0d 0e ec 0a 3d |.")+1)..|.......=|
|00002510| 70 61 74 68 24 0d 0e f6 | 05 3a 0d 0f 00 10 dd 20 |path$...|.:..... |
|00002520| a4 77 69 6d 70 65 72 72 | 6f 72 0d 0f 0a 1e c8 99 |.wimperr|or......|
|00002530| 20 22 57 69 6d 70 5f 43 | 6f 6d 6d 61 6e 64 57 69 | "Wimp_C|ommandWi|
|00002540| 6e 64 6f 77 22 2c 2d 31 | 0d 0f 14 16 c8 99 20 22 |ndow",-1|...... "|
|00002550| 48 6f 75 72 67 6c 61 73 | 73 5f 4f 66 66 22 0d 0f |Hourglas|s_Off"..|
|00002560| 1e 19 c8 99 20 22 57 69 | 6d 70 5f 44 72 61 67 42 |.... "Wi|mp_DragB|
|00002570| 6f 78 22 2c 2c 2d 31 0d | 0f 28 0e 21 65 72 72 62 |ox",,-1.|.(.!errb|
|00002580| 6c 6b 25 3d 9f 0d 0f 32 | 36 24 28 65 72 72 62 6c |lk%=...2|6$(errbl|
|00002590| 6b 25 2b 34 29 3d f6 24 | 2b 22 20 28 49 6e 74 65 |k%+4)=.$|+" (Inte|
|000025a0| 72 6e 61 6c 20 65 72 72 | 6f 72 20 63 6f 64 65 20 |rnal err|or code |
|000025b0| 22 2b c3 9e 2b 22 29 22 | 2b bd 30 0d 0f 3c 37 c8 |"+..+")"|+.0..<7.|
|000025c0| 99 20 22 57 69 6d 70 5f | 52 65 70 6f 72 74 45 72 |. "Wimp_|ReportEr|
|000025d0| 72 6f 72 22 2c 65 72 72 | 62 6c 6b 25 2c 33 2c 74 |ror",err|blk%,3,t|
|000025e0| 69 74 6c 65 24 20 b8 20 | 2c 72 65 73 70 6f 6e 73 |itle$ . |,respons|
|000025f0| 65 25 0d 0f 46 30 e7 20 | 72 65 73 70 6f 6e 73 65 |e%..F0. |response|
|00002600| 25 3d 32 20 8c 20 c8 99 | 20 22 57 69 6d 70 5f 43 |%=2 . ..| "Wimp_C|
|00002610| 6c 6f 73 65 44 6f 77 6e | 22 3a 20 3d b9 20 8b 20 |loseDown|": =. . |
|00002620| 3d a3 0d 0f 50 05 3a 0d | 0f 5a 0f dd 20 f2 6d 6f |=...P.:.|.Z.. .mo|
|00002630| 61 6e 28 54 24 29 0d 0f | 64 1e c8 99 20 22 57 69 |an(T$)..|d... "Wi|
|00002640| 6d 70 5f 43 6f 6d 6d 61 | 6e 64 57 69 6e 64 6f 77 |mp_Comma|ndWindow|
|00002650| 22 2c 2d 31 0d 0f 6e 21 | 21 65 72 72 62 6c 6b 25 |",-1..n!|!errblk%|
|00002660| 3d 30 3a 24 28 65 72 72 | 62 6c 6b 25 2b 34 29 3d |=0:$(err|blk%+4)=|
|00002670| 54 24 2b bd 30 0d 0f 78 | 2c c8 99 20 22 57 69 6d |T$+.0..x|,.. "Wim|
|00002680| 70 5f 52 65 70 6f 72 74 | 45 72 72 6f 72 22 2c 65 |p_Report|Error",e|
|00002690| 72 72 62 6c 6b 25 2c 26 | 31 35 2c 74 69 74 6c 65 |rrblk%,&|15,title|
|000026a0| 24 0d 0f 82 05 e1 0d 0f | 8c 05 3a 0d 0f 96 13 dd |$.......|..:.....|
|000026b0| 20 f2 73 61 76 65 74 6f | 75 73 28 62 25 29 0d 0f | .saveto|us(b%)..|
|000026c0| a0 29 e3 20 46 25 3d 30 | 20 b8 20 34 33 20 88 20 |.). F%=0| . 43 . |
|000026d0| 34 3a 6f 6c 64 62 6c 6b | 25 21 46 25 3d 62 25 21 |4:oldblk|%!F%=b%!|
|000026e0| 46 25 3a ed 20 46 25 0d | 0f aa 16 62 25 21 31 32 |F%:. F%.|...b%!12|
|000026f0| 3d 62 25 21 38 3a 62 25 | 21 31 36 3d 36 0d 0f b4 |=b%!8:b%|!16=6...|
|00002700| 15 66 66 24 3d a4 67 6e | 61 6d 65 28 62 25 2b 34 |.ff$=.gn|ame(b%+4|
|00002710| 34 29 0d 0f be 18 62 73 | 74 25 3d a4 63 6c 61 69 |4)....bs|t%=.clai|
|00002720| 6d 28 62 25 21 33 36 2a | 32 29 0d 0f c8 27 62 65 |m(b%!36*|2)...'be|
|00002730| 6e 64 25 3d 62 73 74 25 | 2b 62 25 21 33 36 2a 32 |nd%=bst%|+b%!36*2|
|00002740| 3a 62 73 74 32 25 3d 62 | 73 74 25 2b 62 25 21 33 |:bst2%=b|st%+b%!3|
|00002750| 36 0d 0f d2 21 62 25 21 | 32 30 3d 62 73 74 32 25 |6...!b%!|20=bst2%|
|00002760| 3a 62 25 21 32 34 3d 62 | 65 6e 64 25 2d 62 73 74 |:b%!24=b|end%-bst|
|00002770| 32 25 0d 0f dc 24 c8 99 | 20 22 57 69 6d 70 5f 53 |2%...$..| "Wimp_S|
|00002780| 65 6e 64 4d 65 73 73 61 | 67 65 22 2c 31 37 2c 62 |endMessa|ge",17,b|
|00002790| 25 2c 62 25 21 34 0d 0f | e6 20 6d 79 72 65 66 25 |%,b%!4..|. myref%|
|000027a0| 3d 62 25 21 38 3a 72 65 | 74 72 79 25 3d b9 3a 73 |=b%!8:re|try%=.:s|
|000027b0| 69 7a 65 25 3d 30 0d 0f | f0 05 e1 0d 0f fa 05 3a |ize%=0..|.......:|
|000027c0| 0d 10 04 10 dd 20 f2 6e | 6f 61 63 6b 28 62 25 29 |..... .n|oack(b%)|
|000027d0| 0d 10 0e 14 e7 20 62 25 | 21 31 32 3d 6d 79 72 65 |..... b%|!12=myre|
|000027e0| 66 25 20 8c 0d 10 18 0e | e7 20 72 65 74 72 79 25 |f% .....|. retry%|
|000027f0| 20 8c 0d 10 22 25 6f 6c | 64 62 6c 6b 25 21 31 32 | ..."%ol|dblk%!12|
|00002800| 3d 6f 6c 64 62 6c 6b 25 | 21 38 3a 6f 6c 64 62 6c |=oldblk%|!8:oldbl|
|00002810| 6b 25 21 31 36 3d 32 0d | 10 2c 10 21 6f 6c 64 62 |k%!16=2.|.,.!oldb|
|00002820| 6c 6b 25 3d 31 30 30 0d | 10 36 23 24 28 6f 6c 64 |lk%=100.|.6#$(old|
|00002830| 62 6c 6b 25 2b 34 34 29 | 3d 22 3c 57 69 6d 70 24 |blk%+44)|="<Wimp$|
|00002840| 53 63 72 61 70 3e 22 2b | bd 30 0d 10 40 2e c8 99 |Scrap>"+|.0..@...|
|00002850| 20 22 57 69 6d 70 5f 53 | 65 6e 64 4d 65 73 73 61 | "Wimp_S|endMessa|
|00002860| 67 65 22 2c 31 37 2c 6f | 6c 64 62 6c 6b 25 2c 6f |ge",17,o|ldblk%,o|
|00002870| 6c 64 62 6c 6b 25 21 34 | 0d 10 4a 1d 6d 79 72 65 |ldblk%!4|..J.myre|
|00002880| 66 25 3d 6f 6c 64 62 6c | 6b 25 21 38 3a 72 65 74 |f%=oldbl|k%!8:ret|
|00002890| 72 79 25 3d a3 0d 10 54 | 17 cc 20 85 20 31 2c 22 |ry%=...T|.. . 1,"|
|000028a0| 50 69 70 65 20 42 72 6f | 6b 65 6e 22 0d 10 5e 05 |Pipe Bro|ken"..^.|
|000028b0| cd 0d 10 68 05 cd 0d 10 | 72 05 e1 0d 10 7c 05 3a |...h....|r....|.:|
|000028c0| 0d 10 86 13 dd 20 f2 64 | 61 74 61 73 61 76 65 28 |..... .d|atasave(|
|000028d0| 62 25 29 0d 10 90 14 e7 | 20 62 25 21 31 32 3d 6d |b%).....| b%!12=m|
|000028e0| 79 72 65 66 25 20 8c 0d | 10 9a 1a f2 73 61 76 65 |yref% ..|....save|
|000028f0| 69 74 28 a4 67 6e 61 6d | 65 28 62 25 2b 34 34 29 |it(.gnam|e(b%+44)|
|00002900| 29 0d 10 a4 16 62 25 21 | 31 32 3d 62 25 21 38 3a |)....b%!|12=b%!8:|
|00002910| 62 25 21 31 36 3d 33 0d | 10 ae 24 c8 99 20 22 57 |b%!16=3.|..$.. "W|
|00002920| 69 6d 70 5f 53 65 6e 64 | 4d 65 73 73 61 67 65 22 |imp_Send|Message"|
|00002930| 2c 31 38 2c 62 25 2c 62 | 25 21 34 0d 10 b8 05 cd |,18,b%,b|%!4.....|
|00002940| 0d 10 c2 05 e1 0d 10 cc | 05 3a 0d 10 d6 16 dd 20 |........|.:..... |
|00002950| f2 72 61 6d 74 72 61 6e | 73 6d 69 74 28 62 25 29 |.ramtran|smit(b%)|
|00002960| 0d 10 e0 10 73 69 7a 65 | 25 2b 3d 62 25 21 32 34 |....size|%+=b%!24|
|00002970| 0d 10 ea 19 e7 20 62 25 | 21 32 34 3d 62 65 6e 64 |..... b%|!24=bend|
|00002980| 25 2d 62 73 74 32 25 20 | 8c 0d 10 f4 16 62 25 21 |%-bst2% |.....b%!|
|00002990| 31 32 3d 62 25 21 38 3a | 62 25 21 31 36 3d 36 0d |12=b%!8:|b%!16=6.|
|000029a0| 10 fe 24 c8 99 20 22 57 | 69 6d 70 5f 53 65 6e 64 |..$.. "W|imp_Send|
|000029b0| 4d 65 73 73 61 67 65 22 | 2c 31 38 2c 62 25 2c 62 |Message"|,18,b%,b|
|000029c0| 25 21 34 0d 11 08 05 cc | 0d 11 12 0a f2 70 6f 70 |%!4.....|.....pop|
|000029d0| 75 70 0d 11 1c 05 cd 0d | 11 26 05 e1 0d 11 30 05 |up......|.&....0.|
|000029e0| 3a 0d 11 3a 13 dd 20 f2 | 64 61 74 61 6c 6f 61 64 |:..:.. .|dataload|
|000029f0| 28 62 25 29 0d 11 44 12 | e7 20 62 25 21 34 30 3d |(b%)..D.|. b%!40=|
|00002a00| 26 32 46 46 20 8c 0d 11 | 4e 1f 66 66 24 3d a4 67 |&2FF ...|N.ff$=.g|
|00002a10| 6e 61 6d 65 28 62 25 2b | 34 34 29 3a 58 25 3d 8e |name(b%+|44):X%=.|
|00002a20| 28 66 66 24 29 0d 11 58 | 10 73 25 3d a2 23 58 25 |(ff$)..X|.s%=.#X%|
|00002a30| 3a d9 23 58 25 0d 11 62 | 25 62 73 74 25 3d a4 63 |:.#X%..b|%bst%=.c|
|00002a40| 6c 61 69 6d 28 73 25 2a | 34 29 3a 62 65 6e 64 25 |laim(s%*|4):bend%|
|00002a50| 3d 62 73 74 25 2b 73 25 | 2a 33 0d 11 6c 22 c8 99 |=bst%+s%|*3..l"..|
|00002a60| 20 22 4f 53 5f 46 69 6c | 65 22 2c 26 46 46 2c 66 | "OS_Fil|e",&FF,f|
|00002a70| 66 24 2c 62 73 74 25 2b | 33 2a 73 25 0d 11 76 24 |f$,bst%+|3*s%..v$|
|00002a80| 65 6e 64 25 3d a4 63 6f | 6e 76 65 72 74 28 62 73 |end%=.co|nvert(bs|
|00002a90| 74 25 2b 33 2a 73 25 2c | 73 25 2c 62 73 74 25 29 |t%+3*s%,|s%,bst%)|
|00002aa0| 0d 11 80 0a f2 70 6f 70 | 75 70 0d 11 8a 29 e7 20 |.....pop|up...). |
|00002ab0| 62 25 21 31 32 3d 6d 79 | 72 65 66 25 20 8c 20 2a |b%!12=my|ref% . *|
|00002ac0| 44 45 4c 45 54 45 20 3c | 57 69 6d 70 24 53 63 72 |DELETE <|Wimp$Scr|
|00002ad0| 61 70 3e 0d 11 94 16 62 | 25 21 31 32 3d 62 25 21 |ap>....b|%!12=b%!|
|00002ae0| 38 3a 62 25 21 31 36 3d | 34 0d 11 9e 24 c8 99 20 |8:b%!16=|4...$.. |
|00002af0| 22 57 69 6d 70 5f 53 65 | 6e 64 4d 65 73 73 61 67 |"Wimp_Se|ndMessag|
|00002b00| 65 22 2c 31 37 2c 62 25 | 2c 62 25 21 34 0d 11 a8 |e",17,b%|,b%!4...|
|00002b10| 05 cd 0d 11 b2 05 e1 0d | 11 bc 05 3a 0d 11 c6 13 |........|...:....|
|00002b20| dd 20 f2 72 61 6d 66 65 | 74 63 68 28 62 25 29 0d |. .ramfe|tch(b%).|
|00002b30| 11 d0 39 e7 20 62 25 21 | 32 34 3c 63 6e 64 25 2d |..9. b%!|24<cnd%-|
|00002b40| 73 74 61 72 74 25 20 8c | 20 63 65 6e 64 25 3d 73 |start% .| cend%=s|
|00002b50| 74 61 72 74 25 2b 62 25 | 21 32 34 20 8b 20 63 65 |tart%+b%|!24 . ce|
|00002b60| 6e 64 25 3d 63 6e 64 25 | 0d 11 da 3e c8 99 20 22 |nd%=cnd%|...>.. "|
|00002b70| 57 69 6d 70 5f 54 72 61 | 6e 73 66 65 72 42 6c 6f |Wimp_Tra|nsferBlo|
|00002b80| 63 6b 22 2c 75 73 25 2c | 73 74 61 72 74 25 2c 62 |ck",us%,|start%,b|
|00002b90| 25 21 34 2c 62 25 21 32 | 30 2c 63 65 6e 64 25 2d |%!4,b%!2|0,cend%-|
|00002ba0| 73 74 61 72 74 25 0d 11 | e4 2a 62 25 21 31 32 3d |start%..|.*b%!12=|
|00002bb0| 62 25 21 38 3a 62 25 21 | 31 36 25 3d 37 3a 62 25 |b%!8:b%!|16%=7:b%|
|00002bc0| 21 32 34 3d 63 65 6e 64 | 25 2d 73 74 61 72 74 25 |!24=cend|%-start%|
|00002bd0| 0d 11 ee 24 c8 99 20 22 | 57 69 6d 70 5f 53 65 6e |...$.. "|Wimp_Sen|
|00002be0| 64 4d 65 73 73 61 67 65 | 22 2c 31 38 2c 62 25 2c |dMessage|",18,b%,|
|00002bf0| 62 25 21 34 0d 11 f8 10 | 73 74 61 72 74 25 3d 63 |b%!4....|start%=c|
|00002c00| 65 6e 64 25 0d 12 02 4c | e7 20 73 74 61 72 74 25 |end%...L|. start%|
|00002c10| 3d 63 6e 64 25 20 8c 20 | 21 6d 65 6e 75 25 3d 66 |=cnd% . |!menu%=f|
|00002c20| 69 6c 65 25 3a c8 99 20 | 22 57 69 6d 70 5f 43 6c |ile%:.. |"Wimp_Cl|
|00002c30| 6f 73 65 57 69 6e 64 6f | 77 22 2c 2c 6d 65 6e 75 |oseWindo|w",,menu|
|00002c40| 25 3a f2 72 65 6c 65 61 | 73 65 28 63 73 74 25 29 |%:.relea|se(cst%)|
|00002c50| 0d 12 0c 05 e1 0d 12 16 | 05 3a 0d 12 20 17 dd 20 |........|.:.. .. |
|00002c60| a4 67 6e 61 6d 65 28 70 | 74 72 25 29 3a ea 20 66 |.gname(p|tr%):. f|
|00002c70| 24 0d 12 2a 21 c8 95 20 | 3f 70 74 72 25 3a 66 24 |$..*!.. |?ptr%:f$|
|00002c80| 2b 3d bd 3f 70 74 72 25 | 3a 70 74 72 25 2b 3d 31 |+=.?ptr%|:ptr%+=1|
|00002c90| 3a ce 0d 12 34 07 3d 66 | 24 0d 12 3e 05 3a 0d 12 |:...4.=f|$..>.:..|
|00002ca0| 48 14 dd 20 f2 73 61 76 | 65 69 74 28 6e 61 6d 65 |H.. .sav|eit(name|
|00002cb0| 24 29 0d 12 52 13 e7 20 | a7 6e 61 6d 65 24 2c 22 |$)..R.. |.name$,"|
|00002cc0| 2e 22 29 20 8c 0d 12 5c | 0e 74 79 70 65 25 3d 26 |.") ...\|.type%=&|
|00002cd0| 32 46 46 0d 12 66 2a c8 | 99 20 22 4f 53 5f 46 69 |2FF..f*.|. "OS_Fi|
|00002ce0| 6c 65 22 2c 31 30 2c 6e | 61 6d 65 24 2c 74 79 70 |le",10,n|ame$,typ|
|00002cf0| 65 25 2c 2c 63 73 74 25 | 2c 63 6e 64 25 0d 12 70 |e%,,cst%|,cnd%..p|
|00002d00| 1f f2 72 65 6c 65 61 73 | 65 28 63 73 74 25 29 3a |..releas|e(cst%):|
|00002d10| 21 6d 65 6e 75 25 3d 66 | 69 6c 65 25 0d 12 7a 20 |!menu%=f|ile%..z |
|00002d20| c8 99 20 22 57 69 6d 70 | 5f 43 6c 6f 73 65 57 69 |.. "Wimp|_CloseWi|
|00002d30| 6e 64 6f 77 22 2c 2c 6d | 65 6e 75 25 0d 12 84 40 |ndow",,m|enu%...@|
|00002d40| cc 20 24 62 6c 6f 63 6b | 25 3d 22 20 20 20 20 54 |. $block|%=" T|
|00002d50| 6f 20 73 61 76 65 2c 20 | 64 72 61 67 20 74 68 65 |o save, |drag the|
|00002d60| 20 69 63 6f 6e 20 74 6f | 20 61 20 64 69 72 65 63 | icon to| a direc|
|00002d70| 74 6f 72 79 20 76 69 65 | 77 65 72 22 0d 12 8e 29 |tory vie|wer"...)|
|00002d80| c8 99 20 22 57 69 6d 70 | 5f 52 65 70 6f 72 74 45 |.. "Wimp|_ReportE|
|00002d90| 72 72 6f 72 22 2c 62 6c | 6f 63 6b 25 2c 31 2c 74 |rror",bl|ock%,1,t|
|00002da0| 69 74 6c 65 24 0d 12 98 | 05 cd 0d 12 a2 05 e1 0d |itle$...|........|
|00002db0| 12 ac 05 3a 0d 12 b6 0c | dd 20 f2 70 6f 70 75 70 |...:....|. .popup|
|00002dc0| 0d 12 c0 26 63 73 74 25 | 3d 62 73 74 25 3a 63 6e |...&cst%|=bst%:cn|
|00002dd0| 64 25 3d 65 6e 64 25 3a | 66 6e 24 3d a4 6c 65 61 |d%=end%:|fn$=.lea|
|00002de0| 66 28 66 66 24 29 0d 12 | ca 17 66 6d 24 3d c0 66 |f(ff$)..|..fm$=.f|
|00002df0| 66 24 2c a9 66 66 24 2d | a9 66 6e 24 29 0d 12 d4 |f$,.ff$-|.fn$)...|
|00002e00| 22 24 66 6e 61 6d 65 25 | 3d 66 6d 24 2b 66 6e 24 |"$fname%|=fm$+fn$|
|00002e10| 3a 21 6f 6c 64 62 6c 6b | 25 3d 66 69 6c 65 25 0d |:!oldblk|%=file%.|
|00002e20| 12 de 22 f4 20 74 79 70 | 65 25 3d 46 4e 67 65 74 |..". typ|e%=FNget|
|00002e30| 66 69 6c 65 74 79 70 65 | 28 66 6d 24 2c 66 6e 24 |filetype|(fm$,fn$|
|00002e40| 29 0d 12 e8 20 f4 20 24 | 73 70 72 69 74 65 25 3d |)... . $|sprite%=|
|00002e50| 46 4e 74 65 78 74 74 79 | 70 65 28 74 79 70 65 25 |FNtextty|pe(type%|
|00002e60| 29 0d 12 f2 17 24 73 70 | 72 69 74 65 25 3d 22 66 |)....$sp|rite%="f|
|00002e70| 69 6c 65 5f 32 66 66 22 | 0d 12 fc 25 c8 99 20 22 |ile_2ff"|...%.. "|
|00002e80| 57 69 6d 70 5f 47 65 74 | 57 69 6e 64 6f 77 53 74 |Wimp_Get|WindowSt|
|00002e90| 61 74 65 22 2c 2c 6f 6c | 64 62 6c 6b 25 0d 13 06 |ate",,ol|dblk%...|
|00002ea0| 21 c8 99 20 22 57 69 6d | 70 5f 4f 70 65 6e 57 69 |!.. "Wim|p_OpenWi|
|00002eb0| 6e 64 6f 77 22 2c 2c 6f | 6c 64 62 6c 6b 25 0d 13 |ndow",,o|ldblk%..|
|00002ec0| 10 38 c8 99 20 22 57 69 | 6d 70 5f 53 65 74 43 61 |.8.. "Wi|mp_SetCa|
|00002ed0| 72 65 74 50 6f 73 69 74 | 69 6f 6e 22 2c 66 69 6c |retPosit|ion",fil|
|00002ee0| 65 25 2c 6e 61 6d 65 25 | 2c 2c 2c 2d 31 2c a9 24 |e%,name%|,,,-1,.$|
|00002ef0| 66 6e 61 6d 65 25 0d 13 | 1a 05 e1 0d 13 24 05 3a |fname%..|.....$.:|
|00002f00| 0d 13 2e 28 dd 20 a4 74 | 65 78 74 74 79 70 65 28 |...(. .t|exttype(|
|00002f10| 74 79 70 65 25 29 3d 22 | 66 69 6c 65 5f 22 2b c3 |type%)="|file_"+.|
|00002f20| 7e 28 74 79 70 65 25 29 | 0d 13 38 05 3a 0d 13 42 |~(type%)|..8.:..B|
|00002f30| 19 dd 20 a4 67 65 74 66 | 69 6c 65 74 79 70 65 28 |.. .getf|iletype(|
|00002f40| 70 24 2c 6e 24 29 0d 13 | 4c 0b ea 20 74 79 70 65 |p$,n$)..|L.. type|
|00002f50| 25 0d 13 56 25 c8 99 20 | 22 4f 53 5f 46 69 6c 65 |%..V%.. |"OS_File|
|00002f60| 22 2c 31 33 2c 6e 24 2c | 2c 2c 70 24 20 b8 20 2c |",13,n$,|,,p$ . ,|
|00002f70| 2c 74 79 70 65 25 0d 13 | 60 16 3d 28 74 79 70 65 |,type%..|`.=(type|
|00002f80| 25 3e 3e 38 29 20 80 20 | 26 46 46 46 0d 13 6a 05 |%>>8) . |&FFF..j.|
|00002f90| 3a 0d 13 74 3b dd 20 a4 | 63 6c 61 69 6d 28 73 69 |:..t;. .|claim(si|
|00002fa0| 7a 65 25 29 3a c8 99 20 | 22 4f 53 5f 4d 6f 64 75 |ze%):.. |"OS_Modu|
|00002fb0| 6c 65 22 2c 36 2c 2c 2c | 73 69 7a 65 25 20 b8 20 |le",6,,,|size% . |
|00002fc0| 2c 2c 70 74 72 25 3a 3d | 70 74 72 25 0d 13 7e 05 |,,ptr%:=|ptr%..~.|
|00002fd0| 3a 0d 13 88 3d dd 20 f2 | 72 65 6c 65 61 73 65 28 |:...=. .|release(|
|00002fe0| f8 20 70 74 72 25 29 3a | e7 20 70 74 72 25 20 8c |. ptr%):|. ptr% .|
|00002ff0| 20 c8 99 20 22 4f 53 5f | 4d 6f 64 75 6c 65 22 2c | .. "OS_|Module",|
|00003000| 37 2c 2c 70 74 72 25 3a | 70 74 72 25 3d 30 0d 13 |7,,ptr%:|ptr%=0..|
|00003010| 92 05 e1 0d 13 9c 05 3a | 0d 13 a6 12 dd 20 f2 75 |.......:|..... .u|
|00003020| 6e 28 f8 20 61 64 64 72 | 25 29 0d 13 b0 21 61 64 |n(. addr|%)...!ad|
|00003030| 64 72 25 2b 3d 38 2b 28 | 21 61 64 64 72 25 20 80 |dr%+=8+(|!addr% .|
|00003040| 20 26 46 46 46 46 46 46 | 29 2a 34 0d 13 ba 05 e1 | &FFFFFF|)*4.....|
|00003050| 0d 13 c4 05 3a 0d 13 ce | 1e dd 20 a4 63 6f 6e 76 |....:...|.. .conv|
|00003060| 65 72 74 28 66 72 6f 6d | 25 2c 6c 65 6e 25 2c 74 |ert(from|%,len%,t|
|00003070| 6f 25 29 0d 13 d8 15 c8 | 99 20 22 48 6f 75 72 67 |o%).....|. "Hourg|
|00003080| 6c 61 73 73 5f 4f 6e 22 | 0d 13 e2 13 ea 20 70 74 |lass_On"|..... pt|
|00003090| 72 25 2c 4e 6f 4d 6f 64 | 65 6c 25 0d 13 ec 0e 4e |r%,NoMod|el%....N|
|000030a0| 6f 4d 6f 64 65 6c 25 3d | a3 0d 13 f6 0e f4 20 67 |oModel%=|...... g|
|000030b0| 65 74 20 64 61 74 61 0d | 14 00 0a 70 74 72 25 3d |et data.|...ptr%=|
|000030c0| 30 0d 14 0a 20 f4 20 4c | 6f 6f 6b 20 66 6f 72 20 |0... . L|ook for |
|000030d0| 27 44 41 54 41 27 20 73 | 74 61 74 65 6d 65 6e 74 |'DATA' s|tatement|
|000030e0| 2e 0d 14 14 10 4c 69 6e | 65 31 24 3d a4 72 65 61 |.....Lin|e1$=.rea|
|000030f0| 64 0d 14 1e 2b f5 3a 4c | 24 3d a4 72 65 61 64 3a |d...+.:L|$=.read:|
|00003100| fd 20 c0 4c 24 2c 34 29 | 3d 22 44 41 54 41 22 20 |. .L$,4)|="DATA" |
|00003110| 84 20 70 74 72 25 3e 3d | 6c 65 6e 25 0d 14 28 45 |. ptr%>=|len%..(E|
|00003120| e7 20 70 74 72 25 3e 3d | 6c 65 6e 25 20 8c 20 f2 |. ptr%>=|len% . .|
|00003130| 6d 6f 61 6e 28 22 4e 6f | 20 27 44 41 54 41 27 20 |moan("No| 'DATA' |
|00003140| 73 74 61 74 65 6d 65 6e | 74 20 69 6e 20 66 69 6c |statemen|t in fil|
|00003150| 65 20 27 22 2b 66 24 2b | 22 27 2e 22 29 3a fa 3a |e '"+f$+|"'."):.:|
|00003160| e1 0d 14 32 0c 4c 24 3d | a4 72 65 61 64 0d 14 3c |...2.L$=|.read..<|
|00003170| 1e 4e 64 61 74 61 25 3d | bb 28 a4 65 78 74 72 61 |.Ndata%=|.(.extra|
|00003180| 63 74 28 22 2c 22 2c 4c | 24 29 29 0d 14 46 1d 53 |ct(",",L|$))..F.S|
|00003190| 69 67 65 78 3d bb 28 a4 | 65 78 74 72 61 63 74 28 |igex=.(.|extract(|
|000031a0| 22 2c 22 2c 4c 24 29 29 | 0d 14 50 13 e3 20 41 25 |",",L$))|..P.. A%|
|000031b0| 3d 31 20 b8 20 4e 64 61 | 74 61 25 0d 14 5a 0c 4c |=1 . Nda|ta%..Z.L|
|000031c0| 24 3d a4 72 65 61 64 0d | 14 64 1d 58 28 41 25 29 |$=.read.|.d.X(A%)|
|000031d0| 3d bb 28 a4 65 78 74 72 | 61 63 74 28 22 2c 22 2c |=.(.extr|act(",",|
|000031e0| 4c 24 29 29 0d 14 6e 1d | 59 28 41 25 29 3d bb 28 |L$))..n.|Y(A%)=.(|
|000031f0| a4 65 78 74 72 61 63 74 | 28 22 2c 22 2c 4c 24 29 |.extract|(",",L$)|
|00003200| 29 0d 14 78 20 45 72 72 | 59 28 41 25 29 3d bb 28 |)..x Err|Y(A%)=.(|
|00003210| a4 65 78 74 72 61 63 74 | 28 22 2c 22 2c 4c 24 29 |.extract|(",",L$)|
|00003220| 29 0d 14 82 08 ed 20 41 | 25 0d 14 8c 0d 50 6f 73 |)..... A|%....Pos|
|00003230| 25 3d 70 74 72 25 0d 14 | 96 21 f4 20 4c 6f 6f 6b |%=ptr%..|.!. Look|
|00003240| 20 66 6f 72 20 27 4d 4f | 44 45 4c 27 20 73 74 61 | for 'MO|DEL' sta|
|00003250| 74 65 6d 65 6e 74 2e 0d | 14 a0 2c f5 3a 4c 24 3d |tement..|..,.:L$=|
|00003260| a4 72 65 61 64 3a fd 20 | c0 4c 24 2c 35 29 3d 22 |.read:. |.L$,5)="|
|00003270| 4d 4f 44 45 4c 22 20 84 | 20 70 74 72 25 3e 3d 6c |MODEL" .| ptr%>=l|
|00003280| 65 6e 25 0d 14 aa 12 e7 | 20 70 74 72 25 3e 3d 6c |en%.....| ptr%>=l|
|00003290| 65 6e 25 20 8c 0d 14 b4 | 0e 4e 6f 4d 6f 64 65 6c |en% ....|.NoModel|
|000032a0| 25 3d b9 0d 14 be 05 cc | 0d 14 c8 11 4d 54 69 74 |%=......|....MTit|
|000032b0| 6c 65 24 3d a4 72 65 61 | 64 0d 14 d2 0f 46 75 6e |le$=.rea|d....Fun|
|000032c0| 63 24 3d a4 72 65 61 64 | 0d 14 dc 12 41 75 78 46 |c$=.read|....AuxF|
|000032d0| 75 6e 63 24 3d a4 72 65 | 61 64 0d 14 e6 14 50 61 |unc$=.re|ad....Pa|
|000032e0| 72 61 6d 73 25 3d bb 28 | a4 72 65 61 64 29 0d 14 |rams%=.(|.read)..|
|000032f0| f0 1d e3 20 41 25 3d 31 | 20 b8 20 50 61 72 61 6d |... A%=1| . Param|
|00003300| 73 25 3a 4c 24 3d a4 72 | 65 61 64 0d 14 fa 21 50 |s%:L$=.r|ead...!P|
|00003310| 61 72 61 6d 28 41 25 29 | 3d bb 28 a4 65 78 74 72 |aram(A%)|=.(.extr|
|00003320| 61 63 74 28 22 2c 22 2c | 4c 24 29 29 0d 15 04 23 |act(",",|L$))...#|
|00003330| 46 72 6f 7a 65 6e 25 28 | 41 25 29 3d bb 28 a4 65 |Frozen%(|A%)=.(.e|
|00003340| 78 74 72 61 63 74 28 22 | 2c 22 2c 4c 24 29 29 0d |xtract("|,",L$)).|
|00003350| 15 0e 08 ed 20 41 25 0d | 15 18 28 e3 20 41 25 3d |.... A%.|..(. A%=|
|00003360| 31 20 b8 20 50 61 72 61 | 6d 73 25 3a 64 46 69 24 |1 . Para|ms%:dFi$|
|00003370| 28 41 25 29 3d a4 72 65 | 61 64 3a ed 20 41 25 0d |(A%)=.re|ad:. A%.|
|00003380| 15 22 05 cd 0d 15 2c 0d | 70 74 72 25 3d 50 6f 73 |."....,.|ptr%=Pos|
|00003390| 25 0d 15 36 2d f5 3a 4c | 24 3d a4 72 65 61 64 3a |%..6-.:L|$=.read:|
|000033a0| fd 20 c0 4c 24 2c 36 29 | 3d 22 4c 45 47 45 4e 44 |. .L$,6)|="LEGEND|
|000033b0| 22 20 84 20 70 74 72 25 | 3e 3d 6c 65 6e 25 0d 15 |" . ptr%|>=len%..|
|000033c0| 40 11 e7 20 70 74 72 25 | 3c 6c 65 6e 25 20 8c 0d |@.. ptr%|<len% ..|
|000033d0| 15 4a 10 54 69 74 6c 65 | 24 3d a4 72 65 61 64 0d |.J.Title|$=.read.|
|000033e0| 15 54 11 58 6c 61 62 6c | 65 24 3d a4 72 65 61 64 |.T.Xlabl|e$=.read|
|000033f0| 0d 15 5e 11 59 6c 61 62 | 6c 65 24 3d a4 72 65 61 |..^.Ylab|le$=.rea|
|00003400| 64 0d 15 68 14 58 45 66 | 6c 61 67 25 3d bb 28 a4 |d..h.XEf|lag%=.(.|
|00003410| 72 65 61 64 29 0d 15 72 | 14 59 45 66 6c 61 67 25 |read)..r|.YEflag%|
|00003420| 3d bb 28 a4 72 65 61 64 | 29 0d 15 7c 05 cd 0d 15 |=.(.read|)..|....|
|00003430| 86 18 f4 20 44 6f 20 74 | 72 61 6e 73 66 6f 72 6d |... Do t|ransform|
|00003440| 61 74 69 6f 6e 73 0d 15 | 90 13 e3 20 41 25 3d 31 |ations..|... A%=1|
|00003450| 20 b8 20 4e 64 61 74 61 | 25 0d 15 9a 45 f2 5f 54 | . Ndata|%...E._T|
|00003460| 72 61 6e 73 66 6f 72 6d | 28 58 28 41 25 29 2c 59 |ransform|(X(A%),Y|
|00003470| 28 41 25 29 2c 45 72 72 | 59 28 41 25 29 2c 58 54 |(A%),Err|Y(A%),XT|
|00003480| 72 61 6e 73 25 2c 59 54 | 72 61 6e 73 25 2c 45 54 |rans%,YT|rans%,ET|
|00003490| 72 61 6e 73 25 2c 46 58 | 24 2c 46 59 24 29 0d 15 |rans%,FX|$,FY$)..|
|000034a0| a4 08 ed 20 41 25 0d 15 | ae 10 f4 20 77 72 69 74 |... A%..|... writ|
|000034b0| 65 20 64 61 74 61 0d 15 | b8 0a 70 74 72 25 3d 30 |e data..|..ptr%=0|
|000034c0| 0d 15 c2 12 f2 77 72 69 | 74 65 28 4c 69 6e 65 31 |.....wri|te(Line1|
|000034d0| 24 29 0d 15 cc 12 f2 77 | 72 69 74 65 28 22 44 41 |$).....w|rite("DA|
|000034e0| 54 41 22 29 0d 15 d6 2a | f2 77 72 69 74 65 28 c3 |TA")...*|.write(.|
|000034f0| 28 4e 64 61 74 61 25 29 | 2b 22 2c 22 2b a4 5f 52 |(Ndata%)|+","+._R|
|00003500| 6f 75 6e 64 28 53 69 67 | 65 78 2c 35 29 29 0d 15 |ound(Sig|ex,5))..|
|00003510| e0 13 e3 20 41 25 3d 31 | 20 b8 20 4e 64 61 74 61 |... A%=1| . Ndata|
|00003520| 25 0d 15 ea 44 4c 24 3d | a4 5f 52 6f 75 6e 64 28 |%...DL$=|._Round(|
|00003530| 58 28 41 25 29 2c 35 29 | 2b 22 2c 22 2b a4 5f 52 |X(A%),5)|+","+._R|
|00003540| 6f 75 6e 64 28 59 28 41 | 25 29 2c 35 29 2b 22 2c |ound(Y(A|%),5)+",|
|00003550| 22 2b a4 5f 52 6f 75 6e | 64 28 45 72 72 59 28 41 |"+._Roun|d(ErrY(A|
|00003560| 25 29 2c 35 29 0d 15 f4 | 0e f2 77 72 69 74 65 28 |%),5)...|..write(|
|00003570| 4c 24 29 0d 15 fe 08 ed | 20 41 25 0d 16 08 12 e7 |L$).....| A%.....|
|00003580| 20 4e 6f 4d 6f 64 65 6c | 25 3d a3 20 8c 0d 16 12 | NoModel|%=. ....|
|00003590| 13 f2 77 72 69 74 65 28 | 22 4d 4f 44 45 4c 22 29 |..write(|"MODEL")|
|000035a0| 0d 16 1c 13 f2 77 72 69 | 74 65 28 4d 54 69 74 6c |.....wri|te(MTitl|
|000035b0| 65 24 29 0d 16 26 11 f2 | 77 72 69 74 65 28 46 75 |e$)..&..|write(Fu|
|000035c0| 6e 63 24 29 0d 16 30 14 | f2 77 72 69 74 65 28 41 |nc$)..0.|.write(A|
|000035d0| 75 78 46 75 6e 63 24 29 | 0d 16 3a 16 f2 77 72 69 |uxFunc$)|..:..wri|
|000035e0| 74 65 28 c3 28 50 61 72 | 61 6d 73 25 29 29 0d 16 |te(.(Par|ams%))..|
|000035f0| 44 14 e3 20 41 25 3d 31 | 20 b8 20 50 61 72 61 6d |D.. A%=1| . Param|
|00003600| 73 25 0d 16 4e 33 f2 77 | 72 69 74 65 28 a4 5f 52 |s%..N3.w|rite(._R|
|00003610| 6f 75 6e 64 28 50 61 72 | 61 6d 28 41 25 29 2c 35 |ound(Par|am(A%),5|
|00003620| 29 2b 22 2c 22 2b c3 28 | 46 72 6f 7a 65 6e 25 28 |)+","+.(|Frozen%(|
|00003630| 41 25 29 29 29 0d 16 58 | 08 ed 20 41 25 0d 16 62 |A%)))..X|.. A%..b|
|00003640| 14 e3 20 41 25 3d 31 20 | b8 20 50 61 72 61 6d 73 |.. A%=1 |. Params|
|00003650| 25 0d 16 6c 14 f2 77 72 | 69 74 65 28 64 46 69 24 |%..l..wr|ite(dFi$|
|00003660| 28 41 25 29 29 0d 16 76 | 08 ed 20 41 25 0d 16 80 |(A%))..v|.. A%...|
|00003670| 05 cd 0d 16 8a 14 f2 77 | 72 69 74 65 28 22 4c 45 |.......w|rite("LE|
|00003680| 47 45 4e 44 22 29 0d 16 | 94 12 f2 77 72 69 74 65 |GEND")..|...write|
|00003690| 28 54 69 74 6c 65 24 29 | 0d 16 9e 13 f2 77 72 69 |(Title$)|.....wri|
|000036a0| 74 65 28 58 6c 61 62 6c | 65 24 29 0d 16 a8 13 f2 |te(Xlabl|e$).....|
|000036b0| 77 72 69 74 65 28 59 6c | 61 62 6c 65 24 29 0d 16 |write(Yl|able$)..|
|000036c0| b2 16 f2 77 72 69 74 65 | 28 c3 28 58 45 66 6c 61 |...write|(.(XEfla|
|000036d0| 67 25 29 29 0d 16 bc 16 | f2 77 72 69 74 65 28 c3 |g%))....|.write(.|
|000036e0| 28 59 45 66 6c 61 67 25 | 29 29 0d 16 c6 0d 74 6f |(YEflag%|))....to|
|000036f0| 25 2b 3d 70 74 72 25 0d | 16 d0 16 c8 99 20 22 48 |%+=ptr%.|..... "H|
|00003700| 6f 75 72 67 6c 61 73 73 | 5f 4f 66 66 22 0d 16 da |ourglass|_Off"...|
|00003710| 08 3d 74 6f 25 0d 16 e4 | 05 3a 0d 16 ee 17 dd 20 |.=to%...|.:..... |
|00003720| a4 65 78 74 72 61 63 74 | 28 54 24 2c f8 20 4c 24 |.extract|(T$,. L$|
|00003730| 29 0d 16 f8 0b ea 20 41 | 25 2c 41 24 0d 17 02 0e |)..... A|%,A$....|
|00003740| 41 25 3d a7 4c 24 2c 54 | 24 29 0d 17 0c 0c e7 20 |A%=.L$,T|$)..... |
|00003750| 41 25 3d 30 20 8c 0d 17 | 16 0f 41 24 3d 4c 24 3a |A%=0 ...|..A$=L$:|
|00003760| 4c 24 3d 22 22 0d 17 20 | 05 cc 0d 17 2a 1d 41 24 |L$="".. |....*.A$|
|00003770| 3d c0 4c 24 2c 41 25 2d | 31 29 3a 4c 24 3d c1 4c |=.L$,A%-|1):L$=.L|
|00003780| 24 2c 41 25 2b 31 29 0d | 17 34 05 cd 0d 17 3e 07 |$,A%+1).|.4....>.|
|00003790| 3d 41 24 0d 17 48 05 3a | 0d 17 52 13 dd 20 a4 5f |=A$..H.:|..R.. ._|
|000037a0| 52 6f 75 6e 64 28 58 2c | 44 25 29 0d 17 5c 11 ea |Round(X,|D%)..\..|
|000037b0| 20 41 25 2c 41 24 2c 42 | 24 2c 50 25 0d 17 66 09 | A%,A$,B|$,P%..f.|
|000037c0| 50 25 3d 40 25 0d 17 70 | 1b 40 25 3d 26 30 31 30 |P%=@%..p|.@%=&010|
|000037d0| 30 30 30 30 41 2b 32 35 | 36 2a 28 44 25 2b 31 29 |0000A+25|6*(D%+1)|
|000037e0| 0d 17 7a 17 41 24 3d c3 | 28 58 29 3a 41 25 3d a7 |..z.A$=.|(X):A%=.|
|000037f0| 41 24 2c 22 2e 22 29 0d | 17 84 22 e7 20 41 25 3e |A$,".").|..". A%>|
|00003800| 30 20 8c 20 42 24 3d c0 | 41 24 2c 41 25 2b 44 25 |0 . B$=.|A$,A%+D%|
|00003810| 29 20 8b 20 42 24 3d 41 | 24 0d 17 8e 09 40 25 3d |) . B$=A|$....@%=|
|00003820| 50 25 0d 17 98 07 3d 42 | 24 0d 17 a2 05 3a 0d 17 |P%....=B|$....:..|
|00003830| ac 18 dd 20 a4 5f 52 6f | 75 6e 64 46 69 78 65 64 |... ._Ro|undFixed|
|00003840| 28 58 2c 44 25 29 0d 17 | b6 1a ea 20 41 25 2c 45 |(X,D%)..|... A%,E|
|00003850| 25 2c 41 24 2c 42 24 2c | 45 24 2c 50 25 2c 52 25 |%,A$,B$,|E$,P%,R%|
|00003860| 0d 17 c0 09 50 25 3d 40 | 25 0d 17 ca 1b 40 25 3d |....P%=@|%....@%=|
|00003870| 26 30 31 30 32 30 30 30 | 41 2b 32 35 36 2a 28 44 |&0102000|A+256*(D|
|00003880| 25 2b 31 29 0d 17 d4 0b | 41 24 3d c3 28 58 29 0d |%+1)....|A$=.(X).|
|00003890| 17 de 0f 41 25 3d a7 41 | 24 2c 22 2e 22 29 0d 17 |...A%=.A|$,".")..|
|000038a0| e8 0f 45 25 3d a7 41 24 | 2c 22 45 22 29 0d 17 f2 |..E%=.A$|,"E")...|
|000038b0| 0c e7 20 45 25 3e 30 20 | 8c 0d 17 fc 0e 45 24 3d |.. E%>0 |.....E$=|
|000038c0| c1 41 24 2c 45 25 29 0d | 18 06 10 41 24 3d c0 41 |.A$,E%).|...A$=.A|
|000038d0| 24 2c 45 25 2d 31 29 0d | 18 10 05 cc 0d 18 1a 09 |$,E%-1).|........|
|000038e0| 45 24 3d 22 22 0d 18 24 | 05 cd 0d 18 2e 0c e7 20 |E$=""..$|....... |
|000038f0| 41 25 3e 30 20 8c 0d 18 | 38 13 52 25 3d a9 28 c1 |A%>0 ...|8.R%=.(.|
|00003900| 41 24 2c 41 25 2b 31 29 | 29 0d 18 42 20 42 24 3d |A$,A%+1)|)..B B$=|
|00003910| c0 41 24 2c 41 25 2b 44 | 25 29 2b c4 44 25 2d 52 |.A$,A%+D|%)+.D%-R|
|00003920| 25 2c 22 30 22 29 2b 45 | 24 0d 18 4c 05 cc 0d 18 |%,"0")+E|$..L....|
|00003930| 56 19 42 24 3d 41 24 2b | 22 2e 22 2b c4 44 25 2c |V.B$=A$+|"."+.D%,|
|00003940| 22 30 22 29 2b 45 24 0d | 18 60 05 cd 0d 18 6a 09 |"0")+E$.|.`....j.|
|00003950| 40 25 3d 50 25 0d 18 74 | 07 3d 42 24 0d 18 7e 05 |@%=P%..t|.=B$..~.|
|00003960| 3a 0d 18 88 0b dd 20 a4 | 72 65 61 64 0d 18 92 08 |:..... .|read....|
|00003970| ea 20 41 24 0d 18 9c 24 | c8 95 20 28 66 72 6f 6d |. A$...$|.. (from|
|00003980| 25 3f 70 74 72 25 3c 3e | 31 30 20 80 20 70 74 72 |%?ptr%<>|10 . ptr|
|00003990| 25 3c 3d 6c 65 6e 25 29 | 0d 18 a6 1f 41 24 2b 3d |%<=len%)|....A$+=|
|000039a0| bd 28 66 72 6f 6d 25 3f | 70 74 72 25 29 3a 70 74 |.(from%?|ptr%):pt|
|000039b0| 72 25 2b 3d 31 3a ce 0d | 18 b0 0f 70 74 72 25 2b |r%+=1:..|...ptr%+|
|000039c0| 3d 31 3a 3d 41 24 0d 18 | ba 05 3a 0d 18 c4 10 dd |=1:=A$..|..:.....|
|000039d0| 20 f2 77 72 69 74 65 28 | 41 24 29 0d 18 ce 08 ea | .write(|A$).....|
|000039e0| 20 42 24 0d 18 d8 0d 42 | 24 3d 41 24 2b bd 31 30 | B$....B|$=A$+.10|
|000039f0| 0d 18 e2 12 24 28 70 74 | 72 25 2b 74 6f 25 29 3d |....$(pt|r%+to%)=|
|00003a00| 42 24 0d 18 ec 0f 70 74 | 72 25 2b 3d a9 28 42 24 |B$....pt|r%+=.(B$|
|00003a10| 29 0d 18 f6 05 e1 0d 19 | 00 05 3a 0d 19 0a 41 dd |).......|..:...A.|
|00003a20| 20 f2 5f 54 72 61 6e 73 | 66 6f 72 6d 28 f8 20 58 | ._Trans|form(. X|
|00003a30| 2c f8 20 59 2c f8 20 45 | 72 72 59 2c 58 54 72 61 |,. Y,. E|rrY,XTra|
|00003a40| 6e 73 25 2c 59 54 72 61 | 6e 73 25 2c 45 54 72 61 |ns%,YTra|ns%,ETra|
|00003a50| 6e 73 25 2c 46 58 24 2c | 46 59 24 29 0d 19 14 2a |ns%,FX$,|FY$)...*|
|00003a60| ea 20 78 2c 79 2c 79 30 | 2c 79 31 2c 79 32 2c 50 |. x,y,y0|,y1,y2,P|
|00003a70| 31 2c 50 32 2c 50 33 2c | 50 34 2c 50 35 2c 50 36 |1,P2,P3,|P4,P5,P6|
|00003a80| 2c 50 37 2c 50 38 0d 19 | 1e 18 e7 20 58 54 72 61 |,P7,P8..|... XTra|
|00003a90| 6e 73 25 20 8c 20 78 3d | a0 28 46 58 24 29 0d 19 |ns% . x=|.(FX$)..|
|00003aa0| 28 08 79 30 3d 59 0d 19 | 32 0f e7 20 59 54 72 61 |(.y0=Y..|2.. YTra|
|00003ab0| 6e 73 25 20 8c 0d 19 3c | 34 20 50 31 3d 50 61 72 |ns% ...<|4 P1=Par|
|00003ac0| 61 6d 28 31 29 3a 50 32 | 3d 50 61 72 61 6d 28 32 |am(1):P2|=Param(2|
|00003ad0| 29 3a 50 33 3d 50 61 72 | 61 6d 28 33 29 3a 50 34 |):P3=Par|am(3):P4|
|00003ae0| 3d 50 61 72 61 6d 28 34 | 29 0d 19 46 34 20 50 35 |=Param(4|)..F4 P5|
|00003af0| 3d 50 61 72 61 6d 28 35 | 29 3a 50 36 3d 50 61 72 |=Param(5|):P6=Par|
|00003b00| 61 6d 28 36 29 3a 50 37 | 3d 50 61 72 61 6d 28 37 |am(6):P7|=Param(7|
|00003b10| 29 3a 50 38 3d 50 61 72 | 61 6d 28 38 29 0d 19 50 |):P8=Par|am(8)..P|
|00003b20| 0d 20 79 3d a0 28 46 59 | 24 29 0d 19 5a 10 20 e7 |. y=.(FY|$)..Z. .|
|00003b30| 20 45 54 72 61 6e 73 25 | 20 8c 0d 19 64 19 20 20 | ETrans%| ...d. |
|00003b40| 59 3d 79 30 2d 45 72 72 | 59 3a 79 31 3d a0 28 46 |Y=y0-Err|Y:y1=.(F|
|00003b50| 59 24 29 0d 19 6e 19 20 | 20 59 3d 79 30 2b 45 72 |Y$)..n. | Y=y0+Er|
|00003b60| 72 59 3a 79 32 3d a0 28 | 46 59 24 29 0d 19 78 18 |rY:y2=.(|FY$)..x.|
|00003b70| 20 20 e7 20 79 31 3e 79 | 32 20 8c 20 c8 94 20 79 | . y1>y|2 . .. y|
|00003b80| 31 2c 79 32 0d 19 82 14 | 20 20 45 72 72 59 3d 28 |1,y2....| ErrY=(|
|00003b90| 79 32 2d 79 31 29 2f 32 | 0d 19 8c 06 20 cd 0d 19 |y2-y1)/2|.... ...|
|00003ba0| 96 0c 20 59 3d 79 3a 58 | 3d 78 0d 19 a0 05 cd 0d |.. Y=y:X|=x......|
|00003bb0| 19 aa 05 e1 0d 19 b4 05 | 3a 0d 19 be 13 dd 20 f2 |........|:..... .|
|00003bc0| 74 72 61 63 65 28 46 6c | 61 67 25 29 0d 19 c8 0d |trace(Fl|ag%)....|
|00003bd0| e7 20 46 6c 61 67 25 20 | 8c 0d 19 d2 13 24 74 72 |. Flag% |.....$tr|
|00003be0| 61 63 65 25 3d 22 54 72 | 61 63 65 22 0d 19 dc 22 |ace%="Tr|ace"..."|
|00003bf0| c8 99 20 22 57 69 6d 70 | 5f 43 6f 6d 6d 61 6e 64 |.. "Wimp|_Command|
|00003c00| 57 69 6e 64 6f 77 22 2c | 74 72 61 63 65 25 0d 19 |Window",|trace%..|
|00003c10| e6 07 fc 20 ee 0d 19 f0 | 1a 2a 53 50 4f 4f 4c 20 |... ....|.*SPOOL |
|00003c20| 52 41 4d 3a 24 2e 54 72 | 61 63 65 46 69 6c 65 0d |RAM:$.Tr|aceFile.|
|00003c30| 19 fa 05 cc 0d 1a 04 07 | fc 20 87 0d 1a 0e 0a 2a |........|. .....*|
|00003c40| 53 50 4f 4f 4c 0d 1a 18 | 1d c8 99 20 22 57 69 6d |SPOOL...|... "Wim|
|00003c50| 70 5f 43 6f 6d 6d 61 6e | 64 57 69 6e 64 6f 77 22 |p_Comman|dWindow"|
|00003c60| 2c 30 0d 1a 22 05 cd 0d | 1a 2c 05 e1 0d ff |,0.."...|.,.... |
+--------+-------------------------+-------------------------+--------+--------+
