home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1996-07-18 | 13.3 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
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 05 23 f4 20 21 52 | 75 6e 49 6d 61 67 65 20 |...#. !R|unImage |
|00000010| 66 6f 72 20 21 46 69 6c | 65 53 61 66 65 20 56 31 |for !Fil|eSafe V1|
|00000020| 2e 37 30 0d 00 06 23 f4 | 20 62 79 20 47 6c 79 6e |.70...#.| by Glyn|
|00000030| 6e 20 53 6e 6f 77 64 65 | 6e 20 28 32 38 2f 30 36 |n Snowde|n (28/06|
|00000040| 2f 31 39 39 36 29 0d 00 | 0a 09 f2 69 6e 69 74 0d |/1996)..|...init.|
|00000050| 00 14 05 3a 0d 00 1e 0c | c8 95 ac 71 75 69 74 25 |...:....|...quit%|
|00000060| 0d 00 28 09 f2 70 6f 6c | 6c 0d 00 32 05 ce 0d 00 |..(..pol|l..2....|
|00000070| 3c 16 c8 99 22 57 69 6d | 70 5f 43 6c 6f 73 65 44 |<..."Wim|p_CloseD|
|00000080| 6f 77 6e 22 0d 00 40 14 | e7 20 6f 66 69 6c 65 25 |own"..@.|. ofile%|
|00000090| 20 d9 23 66 69 6c 65 25 | 0d 00 41 1f e7 20 61 66 | .#file%|..A.. af|
|000000a0| 69 6c 65 25 20 d9 23 69 | 6e 70 75 74 25 3a d9 23 |ile% .#i|nput%:.#|
|000000b0| 6f 75 74 70 75 74 25 0d | 00 42 13 e7 20 73 66 69 |output%.|.B.. sfi|
|000000c0| 6c 65 25 20 d9 23 73 65 | 74 25 0d 00 46 05 e0 0d |le% .#se|t%..F...|
|000000d0| 00 50 05 3a 0d 00 5a 0a | dd f2 69 6e 69 74 0d 00 |.P.:..Z.|..init..|
|000000e0| 78 13 61 70 70 24 3d 22 | 46 69 6c 65 53 61 66 65 |x.app$="|FileSafe|
|000000f0| 22 0d 00 82 6f de 20 62 | 6c 6f 63 6b 25 20 32 30 |"...o. b|lock% 20|
|00000100| 34 38 2c 69 6d 65 6e 75 | 25 20 39 39 2c 6e 61 6d |48,imenu|% 99,nam|
|00000110| 65 25 20 31 31 2c 69 6e | 66 6f 69 6e 64 25 20 32 |e% 11,in|foind% 2|
|00000120| 35 35 2c 65 6e 63 69 6e | 64 25 20 32 35 35 2c 73 |55,encin|d% 255,s|
|00000130| 61 76 65 69 6e 64 25 20 | 35 35 35 2c 64 65 63 69 |aveind% |555,deci|
|00000140| 6e 64 25 20 32 35 35 2c | 6d 6f 72 65 69 6e 64 25 |nd% 255,|moreind%|
|00000150| 20 35 35 35 2c 63 6f 6e | 69 6e 64 25 20 35 35 35 | 555,con|ind% 555|
|00000160| 0d 00 8c 0b 71 75 69 74 | 25 3d a3 0d 00 96 2a c8 |....quit|%=....*.|
|00000170| 99 22 57 69 6d 70 5f 49 | 6e 69 74 69 61 6c 69 73 |."Wimp_I|nitialis|
|00000180| 65 22 2c 32 30 30 2c 26 | 34 42 35 33 34 31 35 34 |e",200,&|4B534154|
|00000190| 2c 61 70 70 24 0d 00 9b | 33 76 65 72 73 69 6f 6e |,app$...|3version|
|000001a0| 24 3d 22 31 2e 37 30 22 | 3a 66 69 6c 65 66 6c 61 |$="1.70"|:filefla|
|000001b0| 67 25 3d 31 3a 74 79 70 | 65 25 3d 26 38 36 34 3a |g%=1:typ|e%=&864:|
|000001c0| 63 6f 75 6e 74 25 3d 30 | 0d 00 9c 3c 69 66 6c 61 |count%=0|...<ifla|
|000001d0| 67 31 25 3d a3 3a 69 66 | 6c 61 67 32 25 3d a3 3a |g1%=.:if|lag2%=.:|
|000001e0| 69 66 6c 61 67 33 25 3d | a3 3a 6f 66 69 6c 65 25 |iflag3%=|.:ofile%|
|000001f0| 3d a3 3a 61 66 69 6c 65 | 25 3d a3 3a 73 66 69 6c |=.:afile|%=.:sfil|
|00000200| 65 25 3d a3 0d 00 a0 21 | ee 20 85 20 f2 65 72 72 |e%=....!|. . .err|
|00000210| 6f 72 28 f6 24 2b 22 20 | 61 74 20 6c 69 6e 65 20 |or(.$+" |at line |
|00000220| 22 2b c3 9e 29 0d 00 aa | 31 c8 99 22 57 69 6d 70 |"+..)...|1.."Wimp|
|00000230| 5f 4f 70 65 6e 54 65 6d | 70 6c 61 74 65 22 2c 2c |_OpenTem|plate",,|
|00000240| 22 3c 4f 62 65 79 24 44 | 69 72 3e 2e 54 65 6d 70 |"<Obey$D|ir>.Temp|
|00000250| 6c 61 74 65 73 22 0d 00 | b4 11 24 6e 61 6d 65 25 |lates"..|..$name%|
|00000260| 3d 22 49 6e 66 6f 22 0d | 00 be 42 c8 99 22 57 69 |="Info".|..B.."Wi|
|00000270| 6d 70 5f 4c 6f 61 64 54 | 65 6d 70 6c 61 74 65 22 |mp_LoadT|emplate"|
|00000280| 2c 2c 62 6c 6f 63 6b 25 | 2c 69 6e 66 6f 69 6e 64 |,,block%|,infoind|
|00000290| 25 2c 69 6e 66 6f 69 6e | 64 25 2b 31 35 30 2c 2d |%,infoin|d%+150,-|
|000002a0| 31 2c 6e 61 6d 65 25 2c | 30 0d 00 c8 29 c8 99 22 |1,name%,|0...).."|
|000002b0| 57 69 6d 70 5f 43 72 65 | 61 74 65 57 69 6e 64 6f |Wimp_Cre|ateWindo|
|000002c0| 77 22 2c 2c 62 6c 6f 63 | 6b 25 20 b8 20 69 6e 66 |w",,bloc|k% . inf|
|000002d0| 6f 25 0d 00 d2 13 24 6e | 61 6d 65 25 3d 22 65 6e |o%....$n|ame%="en|
|000002e0| 63 6f 64 65 22 0d 00 d3 | 40 c8 99 22 57 69 6d 70 |code"...|@.."Wimp|
|000002f0| 5f 4c 6f 61 64 54 65 6d | 70 6c 61 74 65 22 2c 2c |_LoadTem|plate",,|
|00000300| 62 6c 6f 63 6b 25 2c 65 | 6e 63 69 6e 64 25 2c 65 |block%,e|ncind%,e|
|00000310| 6e 63 69 6e 64 25 2b 31 | 35 30 2c 2d 31 2c 6e 61 |ncind%+1|50,-1,na|
|00000320| 6d 65 25 2c 30 0d 00 d4 | 2b c8 99 22 57 69 6d 70 |me%,0...|+.."Wimp|
|00000330| 5f 43 72 65 61 74 65 57 | 69 6e 64 6f 77 22 2c 2c |_CreateW|indow",,|
|00000340| 62 6c 6f 63 6b 25 20 b8 | 20 65 6e 63 6f 64 65 25 |block% .| encode%|
|00000350| 0d 00 d5 13 24 6e 61 6d | 65 25 3d 22 64 65 63 6f |....$nam|e%="deco|
|00000360| 64 65 22 0d 00 d6 40 c8 | 99 22 57 69 6d 70 5f 4c |de"...@.|."Wimp_L|
|00000370| 6f 61 64 54 65 6d 70 6c | 61 74 65 22 2c 2c 62 6c |oadTempl|ate",,bl|
|00000380| 6f 63 6b 25 2c 64 65 63 | 69 6e 64 25 2c 64 65 63 |ock%,dec|ind%,dec|
|00000390| 69 6e 64 25 2b 31 35 30 | 2c 2d 31 2c 6e 61 6d 65 |ind%+150|,-1,name|
|000003a0| 25 2c 30 0d 00 d7 2b c8 | 99 22 57 69 6d 70 5f 43 |%,0...+.|."Wimp_C|
|000003b0| 72 65 61 74 65 57 69 6e | 64 6f 77 22 2c 2c 62 6c |reateWin|dow",,bl|
|000003c0| 6f 63 6b 25 20 b8 20 64 | 65 63 6f 64 65 25 0d 00 |ock% . d|ecode%..|
|000003d0| d8 13 24 6e 61 6d 65 25 | 3d 22 73 61 76 65 61 73 |..$name%|="saveas|
|000003e0| 22 0d 00 d9 42 c8 99 22 | 57 69 6d 70 5f 4c 6f 61 |"...B.."|Wimp_Loa|
|000003f0| 64 54 65 6d 70 6c 61 74 | 65 22 2c 2c 62 6c 6f 63 |dTemplat|e",,bloc|
|00000400| 6b 25 2c 73 61 76 65 69 | 6e 64 25 2c 73 61 76 65 |k%,savei|nd%,save|
|00000410| 69 6e 64 25 2b 35 30 30 | 2c 2d 31 2c 6e 61 6d 65 |ind%+500|,-1,name|
|00000420| 25 2c 30 0d 00 da 29 c8 | 99 22 57 69 6d 70 5f 43 |%,0...).|."Wimp_C|
|00000430| 72 65 61 74 65 57 69 6e | 64 6f 77 22 2c 2c 62 6c |reateWin|dow",,bl|
|00000440| 6f 63 6b 25 20 b8 20 73 | 61 76 65 25 0d 00 db 14 |ock% . s|ave%....|
|00000450| 24 6e 61 6d 65 25 3d 22 | 6d 6f 72 65 69 6e 66 22 |$name%="|moreinf"|
|00000460| 0d 00 dc 42 c8 99 22 57 | 69 6d 70 5f 4c 6f 61 64 |...B.."W|imp_Load|
|00000470| 54 65 6d 70 6c 61 74 65 | 22 2c 2c 62 6c 6f 63 6b |Template|",,block|
|00000480| 25 2c 6d 6f 72 65 69 6e | 64 25 2c 6d 6f 72 65 69 |%,morein|d%,morei|
|00000490| 6e 64 25 2b 35 30 30 2c | 2d 31 2c 6e 61 6d 65 25 |nd%+500,|-1,name%|
|000004a0| 2c 30 0d 00 dd 2c c8 99 | 22 57 69 6d 70 5f 43 72 |,0...,..|"Wimp_Cr|
|000004b0| 65 61 74 65 57 69 6e 64 | 6f 77 22 2c 2c 62 6c 6f |eateWind|ow",,blo|
|000004c0| 63 6b 25 20 b8 20 6d 6f | 72 65 69 6e 66 25 0d 00 |ck% . mo|reinf%..|
|000004d0| de 13 24 6e 61 6d 65 25 | 3d 22 63 6f 6e 66 69 67 |..$name%|="config|
|000004e0| 22 0d 00 df 40 c8 99 22 | 57 69 6d 70 5f 4c 6f 61 |"...@.."|Wimp_Loa|
|000004f0| 64 54 65 6d 70 6c 61 74 | 65 22 2c 2c 62 6c 6f 63 |dTemplat|e",,bloc|
|00000500| 6b 25 2c 63 6f 6e 69 6e | 64 25 2c 63 6f 6e 69 6e |k%,conin|d%,conin|
|00000510| 64 25 2b 35 30 30 2c 2d | 31 2c 6e 61 6d 65 25 2c |d%+500,-|1,name%,|
|00000520| 30 0d 00 e0 2b c8 99 22 | 57 69 6d 70 5f 43 72 65 |0...+.."|Wimp_Cre|
|00000530| 61 74 65 57 69 6e 64 6f | 77 22 2c 2c 62 6c 6f 63 |ateWindo|w",,bloc|
|00000540| 6b 25 20 b8 20 63 6f 6e | 66 69 67 25 0d 00 f0 1a |k% . con|fig%....|
|00000550| c8 99 22 57 69 6d 70 5f | 43 6c 6f 73 65 54 65 6d |.."Wimp_|CloseTem|
|00000560| 70 6c 61 74 65 22 0d 00 | fa 40 69 62 68 61 6e 64 |plate"..|.@ibhand|
|00000570| 6c 65 25 3d a4 63 72 65 | 61 74 65 5f 69 63 6f 6e |le%=.cre|ate_icon|
|00000580| 28 2d 31 2c 30 2c 30 2c | 36 38 2c 36 38 2c 26 33 |(-1,0,0,|68,68,&3|
|00000590| 30 30 32 2c 22 21 66 69 | 6c 65 73 61 66 65 22 2c |002,"!fi|lesafe",|
|000005a0| 30 2c 30 2c 30 29 0d 01 | 04 1d f7 20 8d 50 60 4e |0,0,0)..|... .P`N|
|000005b0| 3a f2 73 65 74 75 70 6d | 65 6e 75 28 69 6d 65 6e |:.setupm|enu(imen|
|000005c0| 75 25 29 0d 01 05 29 f2 | 57 69 6d 70 5f 50 75 74 |u%)...).|Wimp_Put|
|000005d0| 54 65 78 74 49 6e 49 63 | 6f 6e 28 69 6e 66 6f 25 |TextInIc|on(info%|
|000005e0| 2c 35 2c 76 65 72 73 69 | 6f 6e 24 29 0d 01 06 18 |,5,versi|on$)....|
|000005f0| c8 99 22 4f 53 5f 47 65 | 74 45 6e 76 22 20 b8 20 |.."OS_Ge|tEnv" . |
|00000600| 65 6e 76 24 0d 01 07 16 | e7 20 a7 65 6e 76 24 2c |env$....|. .env$,|
|00000610| 22 2d 71 75 69 74 22 29 | 20 8c 0d 01 08 12 49 25 |"-quit")| .....I%|
|00000620| 3d a7 65 6e 76 24 2c 22 | 22 22 22 29 0d 01 09 17 |=.env$,"|""")....|
|00000630| 49 25 3d a7 65 6e 76 24 | 2c 22 22 22 22 2c 49 25 |I%=.env$|,"""",I%|
|00000640| 2b 31 29 0d 01 0a 05 f5 | 0d 01 0b 09 49 25 2b 3d |+1).....|....I%+=|
|00000650| 31 0d 01 0c 16 fd 20 c1 | 65 6e 76 24 2c 49 25 2c |1..... .|env$,I%,|
|00000660| 31 29 3c 3e 22 20 22 0d | 01 0d 12 65 6e 76 24 3d |1)<>" ".|...env$=|
|00000670| c1 65 6e 76 24 2c 49 25 | 29 0d 01 0e 05 cd 0d 01 |.env$,I%|).......|
|00000680| 0f 3d e7 20 65 6e 76 24 | 3c 3e 22 22 20 69 6e 66 |.=. env$|<>"" inf|
|00000690| 69 6c 65 24 3d 65 6e 76 | 24 3a 66 69 6c 65 66 6c |ile$=env|$:filefl|
|000006a0| 61 67 25 3d a3 3a f2 4c | 6f 61 64 46 69 6c 65 3a |ag%=.:.L|oadFile:|
|000006b0| 66 69 6c 65 66 6c 61 67 | 25 3d b9 0d 01 10 43 f2 |fileflag|%=....C.|
|000006c0| 6c 6f 61 64 73 65 74 74 | 69 6e 67 73 3a f2 73 65 |loadsett|ings:.se|
|000006d0| 74 73 65 74 74 69 6e 67 | 73 3a e7 20 77 65 6c 63 |tsetting|s:. welc|
|000006e0| 6f 6d 65 25 20 6f 70 65 | 6e 66 6c 61 67 25 3d b9 |ome% ope|nflag%=.|
|000006f0| 20 8b 20 6f 70 65 6e 66 | 6c 61 67 25 3d a3 0d 01 | . openf|lag%=...|
|00000700| 17 05 e1 0d 01 18 05 3a | 0d 01 22 10 dd 20 f2 65 |.......:|..".. .e|
|00000710| 72 72 6f 72 28 61 24 29 | 0d 01 2c 16 f2 72 65 70 |rror(a$)|..,..rep|
|00000720| 6f 72 74 28 61 24 2c 25 | 31 30 30 30 31 29 0d 01 |ort(a$,%|10001)..|
|00000730| 36 16 c8 99 22 57 69 6d | 70 5f 43 6c 6f 73 65 44 |6..."Wim|p_CloseD|
|00000740| 6f 77 6e 22 0d 01 3a 14 | e7 20 6f 66 69 6c 65 25 |own"..:.|. ofile%|
|00000750| 20 d9 23 66 69 6c 65 25 | 0d 01 3b 1f e7 20 61 66 | .#file%|..;.. af|
|00000760| 69 6c 65 25 20 d9 23 69 | 6e 70 75 74 25 3a d9 23 |ile% .#i|nput%:.#|
|00000770| 6f 75 74 70 75 74 25 0d | 01 3c 13 e7 20 73 66 69 |output%.|.<.. sfi|
|00000780| 6c 65 25 20 d9 23 73 65 | 74 25 0d 01 40 05 e0 0d |le% .#se|t%..@...|
|00000790| 01 4a 05 e1 0d 01 54 05 | 3a 0d 01 5e 19 dd 20 f2 |.J....T.|:..^.. .|
|000007a0| 72 65 70 6f 72 74 28 65 | 72 72 24 2c 66 6c 61 67 |report(e|rr$,flag|
|000007b0| 25 29 0d 01 68 0e 6e 61 | 6d 65 24 3d 61 70 70 24 |%)..h.na|me$=app$|
|000007c0| 0d 01 72 2c e7 20 66 6c | 61 67 25 20 80 20 31 36 |..r,. fl|ag% . 16|
|000007d0| 20 8c 20 6e 61 6d 65 24 | 3d 22 45 72 72 6f 72 20 | . name$|="Error |
|000007e0| 66 72 6f 6d 20 22 2b 6e | 61 6d 65 24 0d 01 7c 0f |from "+n|ame$..|.|
|000007f0| 21 62 6c 6f 63 6b 25 3d | 32 35 35 0d 01 86 17 24 |!block%=|255....$|
|00000800| 28 62 6c 6f 63 6b 25 2b | 34 29 3d 65 72 72 24 2b |(block%+|4)=err$+|
|00000810| bd 30 0d 01 90 37 c8 99 | 22 57 69 6d 70 5f 52 65 |.0...7..|"Wimp_Re|
|00000820| 70 6f 72 74 45 72 72 6f | 72 22 2c 62 6c 6f 63 6b |portErro|r",block|
|00000830| 25 2c 66 6c 61 67 25 2c | 6e 61 6d 65 24 20 b8 20 |%,flag%,|name$ . |
|00000840| 65 72 72 63 6c 69 63 6b | 25 0d 01 9a 05 e1 0d 01 |errclick|%.......|
|00000850| a4 05 3a 0d 01 ae 0a dd | f2 70 6f 6c 6c 0d 01 b8 |..:.....|.poll...|
|00000860| 1f c8 99 22 57 69 6d 70 | 5f 50 6f 6c 6c 22 2c 30 |..."Wimp|_Poll",0|
|00000870| 2c 62 6c 6f 63 6b 25 20 | b8 20 62 25 0d 01 c2 0b |,block% |. b%....|
|00000880| c8 8e 20 62 25 20 ca 0d | 01 cc 24 20 c9 20 32 3a |.. b% ..|..$ . 2:|
|00000890| c8 99 22 57 69 6d 70 5f | 4f 70 65 6e 57 69 6e 64 |.."Wimp_|OpenWind|
|000008a0| 6f 77 22 2c 2c 62 6c 6f | 63 6b 25 0d 01 d6 47 20 |ow",,blo|ck%...G |
|000008b0| c9 20 33 3a c8 99 22 57 | 69 6d 70 5f 43 6c 6f 73 |. 3:.."W|imp_Clos|
|000008c0| 65 57 69 6e 64 6f 77 22 | 2c 2c 62 6c 6f 63 6b 25 |eWindow"|,,block%|
|000008d0| 3a e7 20 6f 70 65 6e 66 | 6c 61 67 25 20 63 6f 75 |:. openf|lag% cou|
|000008e0| 6e 74 25 3d 35 31 3a 6f | 70 65 6e 66 6c 61 67 25 |nt%=51:o|penflag%|
|000008f0| 3d a3 0d 01 e0 1a 20 c9 | 20 36 3a f2 63 6c 69 63 |=..... .| 6:.clic|
|00000900| 6b 28 62 6c 6f 63 6b 25 | 21 31 32 29 0d 01 e5 13 |k(block%|!12)....|
|00000910| 20 c9 20 37 3a f2 73 74 | 61 72 74 73 61 76 65 0d | . 7:.st|artsave.|
|00000920| 01 e6 1f 20 c9 20 38 3a | f2 64 65 63 6f 64 65 6b |... . 8:|.decodek|
|00000930| 65 79 73 28 62 6c 6f 63 | 6b 25 21 32 34 29 0d 01 |eys(bloc|k%!24)..|
|00000940| ea 14 20 c9 20 39 3a f2 | 64 65 63 6f 64 65 6d 65 |.. . 9:.|decodeme|
|00000950| 6e 75 0d 01 f4 15 20 c9 | 20 31 37 2c 31 38 3a f2 |nu.... .| 17,18:.|
|00000960| 72 65 63 65 69 76 65 0d | 01 fe 05 cb 0d 02 03 5c |receive.|.......\|
|00000970| e7 20 6f 70 65 6e 66 6c | 61 67 25 20 21 62 6c 6f |. openfl|ag% !blo|
|00000980| 63 6b 25 3d 6d 6f 72 65 | 69 6e 66 25 3a c8 99 22 |ck%=more|inf%:.."|
|00000990| 57 69 6d 70 5f 47 65 74 | 57 69 6e 64 6f 77 53 74 |Wimp_Get|WindowSt|
|000009a0| 61 74 65 22 2c 2c 62 6c | 6f 63 6b 25 3a c8 99 22 |ate",,bl|ock%:.."|
|000009b0| 57 69 6d 70 5f 4f 70 65 | 6e 57 69 6e 64 6f 77 22 |Wimp_Ope|nWindow"|
|000009c0| 2c 2c 62 6c 6f 63 6b 25 | 0d 02 04 4a e7 20 63 6f |,,block%|...J. co|
|000009d0| 75 6e 74 25 3d 35 30 30 | 20 21 62 6c 6f 63 6b 25 |unt%=500| !block%|
|000009e0| 3d 6d 6f 72 65 69 6e 66 | 25 3a c8 99 22 57 69 6d |=moreinf|%:.."Wim|
|000009f0| 70 5f 43 6c 6f 73 65 57 | 69 6e 64 6f 77 22 2c 2c |p_CloseW|indow",,|
|00000a00| 62 6c 6f 63 6b 25 3a 6f | 70 65 6e 66 6c 61 67 25 |block%:o|penflag%|
|00000a10| 3d a3 0d 02 05 13 63 6f | 75 6e 74 25 3d 63 6f 75 |=.....co|unt%=cou|
|00000a20| 6e 74 25 2b 31 0d 02 08 | 05 e1 0d 02 12 05 3a 0d |nt%+1...|......:.|
|00000a30| 02 1c 0e dd 20 f2 72 65 | 63 65 69 76 65 0d 02 26 |.... .re|ceive..&|
|00000a40| 12 c8 8e 20 62 6c 6f 63 | 6b 25 21 31 36 20 ca 0d |... bloc|k%!16 ..|
|00000a50| 02 30 10 20 c9 20 30 3a | 71 75 69 74 25 3d b9 0d |.0. . 0:|quit%=..|
|00000a60| 02 34 12 20 c9 20 32 3a | f2 44 61 74 61 53 61 76 |.4. . 2:|.DataSav|
|00000a70| 65 0d 02 35 12 20 c9 20 | 33 3a f2 4c 6f 61 64 46 |e..5. . |3:.LoadF|
|00000a80| 69 6c 65 0d 02 36 22 20 | c9 20 35 3a e7 20 62 6c |ile..6" |. 5:. bl|
|00000a90| 6f 63 6b 25 21 34 30 3d | 38 36 34 20 f2 4c 6f 61 |ock%!40=|864 .Loa|
|00000aa0| 64 46 69 6c 65 0d 02 3a | 05 cb 0d 02 44 05 e1 0d |dFile..:|....D...|
|00000ab0| 02 4e 05 3a 0d 02 58 12 | dd 20 f2 63 6c 69 63 6b |.N.:..X.|. .click|
|00000ac0| 28 77 69 6e 25 29 0d 02 | 62 0d c8 8e 20 77 69 6e |(win%)..|b... win|
|00000ad0| 25 20 ca 0d 02 6c 18 20 | c9 2d 32 3a f2 69 62 61 |% ...l. |.-2:.iba|
|00000ae0| 72 28 62 6c 6f 63 6b 25 | 21 38 29 0d 02 6d 25 20 |r(block%|!8)..m% |
|00000af0| c9 20 65 6e 63 6f 64 65 | 25 3a e7 20 62 6c 6f 63 |. encode|%:. bloc|
|00000b00| 6b 25 21 31 36 3d 32 20 | f2 65 6e 63 73 61 76 65 |k%!16=2 |.encsave|
|00000b10| 0d 02 6e 25 20 c9 20 64 | 65 63 6f 64 65 25 3a e7 |..n% . d|ecode%:.|
|00000b20| 20 62 6c 6f 63 6b 25 21 | 31 36 3d 32 3a f2 64 65 | block%!|16=2:.de|
|00000b30| 63 73 61 76 65 0d 02 6f | 1f 20 c9 20 73 61 76 65 |csave..o|. . save|
|00000b40| 25 3a f2 44 6f 53 61 76 | 65 28 62 6c 6f 63 6b 25 |%:.DoSav|e(block%|
|00000b50| 21 31 36 29 0d 02 70 67 | 20 c9 20 69 6e 66 6f 25 |!16)..pg| . info%|
|00000b60| 3a e7 20 28 62 6c 6f 63 | 6b 25 21 31 36 3d 2d 31 |:. (bloc|k%!16=-1|
|00000b70| 20 84 20 62 6c 6f 63 6b | 25 21 31 36 3d 30 20 84 | . block|%!16=0 .|
|00000b80| 20 62 6c 6f 63 6b 25 21 | 31 36 3d 31 20 84 20 62 | block%!|16=1 . b|
|00000b90| 6c 6f 63 6b 25 21 31 36 | 3d 32 29 20 f2 6d 6f 72 |lock%!16|=2) .mor|
|00000ba0| 65 69 6e 66 20 8b 20 f2 | 65 78 74 72 61 69 6e 66 |einf . .|extrainf|
|00000bb0| 28 62 6c 6f 63 6b 25 21 | 31 36 29 0d 02 71 26 20 |(block%!|16)..q& |
|00000bc0| c9 20 63 6f 6e 66 69 67 | 25 3a f2 63 6f 6e 66 70 |. config|%:.confp|
|00000bd0| 72 65 73 73 65 64 28 62 | 6c 6f 63 6b 25 21 31 36 |ressed(b|lock%!16|
|00000be0| 29 0d 02 80 05 cd 0d 02 | 8a 05 cb 0d 02 94 05 e1 |).......|........|
|00000bf0| 0d 02 9e 05 3a 0d 02 a8 | 14 dd 20 f2 69 62 61 72 |....:...|.. .ibar|
|00000c00| 28 62 75 74 74 6f 6e 25 | 29 0d 02 b2 10 c8 8e 20 |(button%|)...... |
|00000c10| 62 75 74 74 6f 6e 25 20 | ca 0d 02 c6 29 20 c9 20 |button% |....) . |
|00000c20| 32 3a f2 73 68 6f 77 6d | 65 6e 75 28 69 6d 65 6e |2:.showm|enu(imen|
|00000c30| 75 25 2c 21 62 6c 6f 63 | 6b 25 2d 36 34 2c 32 32 |u%,!bloc|k%-64,22|
|00000c40| 38 29 0d 02 d0 0b 20 c9 | 20 31 2c 34 3a 0d 02 da |8).... .| 1,4:...|
|00000c50| 05 cb 0d 02 e4 05 e1 0d | 02 ee 05 3a 0d 02 f8 47 |........|...:...G|
|00000c60| dd 20 a4 63 72 65 61 74 | 65 5f 69 63 6f 6e 28 77 |. .creat|e_icon(w|
|00000c70| 68 61 6e 25 2c 69 78 25 | 2c 69 79 25 2c 69 77 25 |han%,ix%|,iy%,iw%|
|00000c80| 2c 69 68 25 2c 66 6c 61 | 67 25 2c 74 65 78 74 24 |,ih%,fla|g%,text$|
|00000c90| 2c 70 74 72 31 25 2c 70 | 74 72 32 25 2c 70 74 72 |,ptr1%,p|tr2%,ptr|
|00000ca0| 33 25 29 0d 03 02 11 21 | 62 6c 6f 63 6b 25 3d 77 |3%)....!|block%=w|
|00000cb0| 68 61 6e 25 0d 03 0c 10 | 62 6c 6f 63 6b 25 21 34 |han%....|block%!4|
|00000cc0| 3d 69 78 25 0d 03 16 10 | 62 6c 6f 63 6b 25 21 38 |=ix%....|block%!8|
|00000cd0| 3d 69 79 25 0d 03 20 15 | 62 6c 6f 63 6b 25 21 31 |=iy%.. .|block%!1|
|00000ce0| 32 3d 69 78 25 2b 69 77 | 25 0d 03 2a 15 62 6c 6f |2=ix%+iw|%..*.blo|
|00000cf0| 63 6b 25 21 31 36 3d 69 | 79 25 2b 69 68 25 0d 03 |ck%!16=i|y%+ih%..|
|00000d00| 34 13 62 6c 6f 63 6b 25 | 21 32 30 3d 66 6c 61 67 |4.block%|!20=flag|
|00000d10| 25 0d 03 3e 16 24 28 62 | 6c 6f 63 6b 25 2b 32 34 |%..>.$(b|lock%+24|
|00000d20| 29 3d 74 65 78 74 24 0d | 03 48 2a c8 99 22 57 69 |)=text$.|.H*.."Wi|
|00000d30| 6d 70 5f 43 72 65 61 74 | 65 49 63 6f 6e 22 2c 2c |mp_Creat|eIcon",,|
|00000d40| 62 6c 6f 63 6b 25 20 b8 | 20 69 68 61 6e 64 6c 65 |block% .| ihandle|
|00000d50| 25 0d 03 52 0d 3d 69 68 | 61 6e 64 6c 65 25 0d 03 |%..R.=ih|andle%..|
|00000d60| 5c 05 3a 0d 03 66 17 dd | 20 f2 73 65 74 75 70 6d |\.:..f..| .setupm|
|00000d70| 65 6e 75 28 6d 65 6e 75 | 25 29 0d 03 70 11 f3 20 |enu(menu|%)..p.. |
|00000d80| 74 69 74 6c 65 24 2c 6e | 75 6d 25 0d 03 7a 11 24 |title$,n|um%..z.$|
|00000d90| 6d 65 6e 75 25 3d 74 69 | 74 6c 65 24 0d 03 84 1b |menu%=ti|tle$....|
|00000da0| 77 69 64 74 68 25 3d 28 | a9 28 74 69 74 6c 65 24 |width%=(|.(title$|
|00000db0| 29 2d 32 29 2a 31 36 0d | 03 8e 16 6d 65 6e 75 25 |)-2)*16.|...menu%|
|00000dc0| 21 31 32 3d 26 30 30 30 | 37 30 32 30 37 0d 03 98 |!12=&000|70207...|
|00000dd0| 0f 6d 65 6e 75 25 21 32 | 30 3d 34 34 0d 03 a2 0e |.menu%!2|0=44....|
|00000de0| 6d 65 6e 75 25 21 32 34 | 3d 30 0d 03 ac 11 70 74 |menu%!24|=0....pt|
|00000df0| 72 25 3d 6d 65 6e 75 25 | 2b 32 38 0d 03 b6 11 e3 |r%=menu%|+28.....|
|00000e00| 20 69 25 3d 31 20 b8 20 | 6e 75 6d 25 0d 03 c0 1c | i%=1 . |num%....|
|00000e10| 20 f3 20 6d 66 6c 61 67 | 73 25 2c 73 75 62 70 74 | . mflag|s%,subpt|
|00000e20| 72 25 2c 69 74 65 6d 24 | 0d 03 ca 12 20 21 70 74 |r%,item$|.... !pt|
|00000e30| 72 25 3d 6d 66 6c 61 67 | 73 25 0d 03 d4 13 20 70 |r%=mflag|s%.... p|
|00000e40| 74 72 25 21 34 3d 73 75 | 62 70 74 72 25 0d 03 de |tr%!4=su|bptr%...|
|00000e50| 14 20 70 74 72 25 21 38 | 3d 26 37 30 30 30 30 32 |. ptr%!8|=&700002|
|00000e60| 31 0d 03 e8 15 20 24 28 | 70 74 72 25 2b 31 32 29 |1.... $(|ptr%+12)|
|00000e70| 3d 69 74 65 6d 24 0d 03 | f2 17 20 61 25 3d 28 a9 |=item$..|.. a%=(.|
|00000e80| 28 69 74 65 6d 24 29 2b | 31 29 2a 31 36 0d 03 fc |(item$)+|1)*16...|
|00000e90| 1a 20 e7 20 61 25 3e 77 | 69 64 74 68 25 20 77 69 |. . a%>w|idth% wi|
|00000ea0| 64 74 68 25 3d 61 25 0d | 04 06 0d 20 70 74 72 25 |dth%=a%.|... ptr%|
|00000eb0| 2b 3d 32 34 0d 04 10 05 | ed 0d 04 1a 13 6d 65 6e |+=24....|.....men|
|00000ec0| 75 25 21 31 36 3d 77 69 | 64 74 68 25 0d 04 24 05 |u%!16=wi|dth%..$.|
|00000ed0| e1 0d 04 2e 05 3a 0d 04 | 38 1e dd 20 f2 73 68 6f |.....:..|8.. .sho|
|00000ee0| 77 6d 65 6e 75 28 6d 65 | 6e 75 25 2c 6d 78 25 2c |wmenu(me|nu%,mx%,|
|00000ef0| 6d 79 25 29 0d 04 42 26 | c8 99 22 57 69 6d 70 5f |my%)..B&|.."Wimp_|
|00000f00| 43 72 65 61 74 65 4d 65 | 6e 75 22 2c 2c 6d 65 6e |CreateMe|nu",,men|
|00000f10| 75 25 2c 6d 78 25 2c 6d | 79 25 0d 04 4c 05 e1 0d |u%,mx%,m|y%..L...|
|00000f20| 04 56 05 3a 0d 04 60 11 | dd 20 f2 64 65 63 6f 64 |.V.:..`.|. .decod|
|00000f30| 65 6d 65 6e 75 0d 04 6a | 10 c8 8e 20 21 62 6c 6f |emenu..j|... !blo|
|00000f40| 63 6b 25 20 ca 0d 04 6f | a0 20 c9 20 31 3a f2 73 |ck% ...o|. . 1:.s|
|00000f50| 65 74 73 65 74 74 69 6e | 67 73 3a 21 62 6c 6f 63 |etsettin|gs:!bloc|
|00000f60| 6b 25 3d 63 6f 6e 66 69 | 67 25 3a c8 99 22 57 69 |k%=confi|g%:.."Wi|
|00000f70| 6d 70 5f 47 65 74 57 69 | 6e 64 6f 77 53 74 61 74 |mp_GetWi|ndowStat|
|00000f80| 65 22 2c 2c 62 6c 6f 63 | 6b 25 3a c8 99 22 57 69 |e",,bloc|k%:.."Wi|
|00000f90| 6d 70 5f 4f 70 65 6e 57 | 69 6e 64 6f 77 22 2c 2c |mp_OpenW|indow",,|
|00000fa0| 62 6c 6f 63 6b 25 3a f2 | 57 69 6d 70 5f 49 63 6f |block%:.|Wimp_Ico|
|00000fb0| 6e 43 61 72 65 74 28 63 | 6f 6e 66 69 67 25 2c 31 |nCaret(c|onfig%,1|
|00000fc0| 30 2c a9 a4 57 69 6d 70 | 5f 47 65 74 54 65 78 74 |0,..Wimp|_GetText|
|00000fd0| 46 72 6f 6d 49 63 6f 6e | 28 63 6f 6e 66 69 67 25 |FromIcon|(config%|
|00000fe0| 2c 31 30 29 29 0d 04 74 | 10 20 c9 20 32 3a 71 75 |,10))..t|. . 2:qu|
|00000ff0| 69 74 25 3d b9 0d 04 7e | 05 cb 0d 04 88 05 e1 0d |it%=...~|........|
|00001000| 04 92 05 3a 0d 04 9c 2e | dd 20 f2 57 69 6d 70 5f |...:....|. .Wimp_|
|00001010| 50 75 74 54 65 78 74 49 | 6e 49 63 6f 6e 28 77 69 |PutTextI|nIcon(wi|
|00001020| 6e 64 6f 77 25 2c 69 63 | 6f 6e 25 2c 74 65 78 74 |ndow%,ic|on%,text|
|00001030| 24 29 0d 04 a6 25 62 6c | 6f 63 6b 25 21 30 3d 77 |$)...%bl|ock%!0=w|
|00001040| 69 6e 64 6f 77 25 20 3a | 20 62 6c 6f 63 6b 25 21 |indow% :| block%!|
|00001050| 34 3d 69 63 6f 6e 25 0d | 04 b0 22 c8 99 20 22 57 |4=icon%.|..".. "W|
|00001060| 69 6d 70 5f 47 65 74 49 | 63 6f 6e 53 74 61 74 65 |imp_GetI|conState|
|00001070| 22 2c 2c 62 6c 6f 63 6b | 25 0d 04 ba 38 e7 20 28 |",,block|%...8. (|
|00001080| 28 62 6c 6f 63 6b 25 21 | 32 34 29 20 80 20 26 31 |(block%!|24) . &1|
|00001090| 30 30 29 3d 30 20 85 20 | 31 2c 22 49 63 6f 6e 20 |00)=0 . |1,"Icon |
|000010a0| 69 73 6e 27 74 20 69 6e | 64 69 72 65 63 74 65 64 |isn't in|directed|
|000010b0| 22 0d 04 c4 16 24 28 62 | 6c 6f 63 6b 25 21 32 38 |"....$(b|lock%!28|
|000010c0| 29 3d 74 65 78 74 24 0d | 04 ce 25 62 6c 6f 63 6b |)=text$.|..%block|
|000010d0| 25 21 30 3d 77 69 6e 64 | 6f 77 25 20 3a 20 62 6c |%!0=wind|ow% : bl|
|000010e0| 6f 63 6b 25 21 34 3d 69 | 63 6f 6e 25 0d 04 d8 1c |ock%!4=i|con%....|
|000010f0| 62 6c 6f 63 6b 25 21 38 | 3d 30 20 3a 20 62 6c 6f |block%!8|=0 : blo|
|00001100| 63 6b 25 21 31 32 3d 30 | 0d 04 e2 22 c8 99 20 22 |ck%!12=0|...".. "|
|00001110| 57 69 6d 70 5f 53 65 74 | 49 63 6f 6e 53 74 61 74 |Wimp_Set|IconStat|
|00001120| 65 22 2c 2c 62 6c 6f 63 | 6b 25 0d 04 ec 05 e1 0d |e",,bloc|k%......|
|00001130| 04 f6 05 3a 0d 05 00 34 | dd 20 a4 46 69 6c 65 5f |...:...4|. .File_|
|00001140| 50 61 74 68 4e 61 6d 65 | 3d a4 47 65 74 5f 53 74 |PathName|=.Get_St|
|00001150| 72 69 6e 67 41 74 41 64 | 64 72 65 73 73 28 62 6c |ringAtAd|dress(bl|
|00001160| 6f 63 6b 25 2b 34 34 29 | 0d 05 0a 05 3a 0d 05 14 |ock%+44)|....:...|
|00001170| 20 dd 20 a4 47 65 74 5f | 53 74 72 69 6e 67 41 74 | . .Get_|StringAt|
|00001180| 41 64 64 72 65 73 73 28 | 70 74 72 25 29 0d 05 1e |Address(|ptr%)...|
|00001190| 10 ea 20 73 24 20 3a 20 | 73 24 3d 22 22 0d 05 28 |.. s$ : |s$=""..(|
|000011a0| 39 c8 95 20 28 3f 70 74 | 72 25 3c 3e 31 33 29 80 |9.. (?pt|r%<>13).|
|000011b0| 28 3f 70 74 72 25 3c 3e | 30 29 20 3a 20 73 24 2b |(?ptr%<>|0) : s$+|
|000011c0| 3d bd 28 3f 70 74 72 25 | 29 3a 20 70 74 72 25 2b |=.(?ptr%|): ptr%+|
|000011d0| 3d 31 20 3a ce 3a 0d 05 | 32 07 3d 73 24 0d 05 3c |=1 :.:..|2.=s$..<|
|000011e0| 05 3a 0d 05 46 0f dd 20 | f2 4c 6f 61 64 46 69 6c |.:..F.. |.LoadFil|
|000011f0| 65 0d 05 50 36 e7 20 66 | 69 6c 65 66 6c 61 67 25 |e..P6. f|ileflag%|
|00001200| 20 69 6e 66 69 6c 65 24 | 3d a4 46 69 6c 65 5f 50 | infile$|=.File_P|
|00001210| 61 74 68 4e 61 6d 65 3a | 74 79 70 65 25 3d 62 6c |athName:|type%=bl|
|00001220| 6f 63 6b 25 21 34 30 0d | 05 51 26 e7 20 28 74 79 |ock%!40.|.Q&. (ty|
|00001230| 70 65 25 3d 34 30 39 36 | 20 84 20 74 79 70 65 25 |pe%=4096| . type%|
|00001240| 3d 38 31 39 32 29 20 e5 | 20 8d 74 42 45 0d 05 55 |=8192) .| .tBE..U|
|00001250| 51 6f 66 69 6c 65 25 3d | b9 3a 66 69 6c 65 25 3d |Qofile%=|.:file%=|
|00001260| 8e 20 69 6e 66 69 6c 65 | 24 3a e3 49 3d 31 b8 33 |. infile|$:.I=1.3|
|00001270| 3a 76 61 6c 73 74 72 24 | 3d 76 61 6c 73 74 72 24 |:valstr$|=valstr$|
|00001280| 2b bd 28 9a 23 66 69 6c | 65 25 29 3a ed 3a d9 23 |+.(.#fil|e%):.:.#|
|00001290| 66 69 6c 65 25 3a 6f 66 | 69 6c 65 25 3d a3 0d 05 |file%:of|ile%=...|
|000012a0| 64 15 e7 20 76 61 6c 73 | 74 72 24 3d 22 43 4f 44 |d.. vals|tr$="COD|
|000012b0| 22 20 8c 0d 05 65 0c 20 | 66 6c 61 67 25 3d 30 0d |" ...e. |flag%=0.|
|000012c0| 05 66 14 20 21 62 6c 6f | 63 6b 25 3d 64 65 63 6f |.f. !blo|ck%=deco|
|000012d0| 64 65 25 0d 05 67 24 20 | c8 99 22 57 69 6d 70 5f |de%..g$ |.."Wimp_|
|000012e0| 47 65 74 57 69 6e 64 6f | 77 53 74 61 74 65 22 2c |GetWindo|wState",|
|000012f0| 2c 62 6c 6f 63 6b 25 0d | 05 68 20 20 c8 99 22 57 |,block%.|.h .."W|
|00001300| 69 6d 70 5f 4f 70 65 6e | 57 69 6e 64 6f 77 22 2c |imp_Open|Window",|
|00001310| 2c 62 6c 6f 63 6b 25 0d | 05 69 21 20 f2 57 69 6d |,block%.|.i! .Wim|
|00001320| 70 5f 49 63 6f 6e 43 61 | 72 65 74 28 64 65 63 6f |p_IconCa|ret(deco|
|00001330| 64 65 25 2c 31 2c 30 29 | 0d 05 6e 05 cc 0d 05 6f |de%,1,0)|..n....o|
|00001340| 0c 20 66 6c 61 67 25 3d | 31 0d 05 70 14 20 21 62 |. flag%=|1..p. !b|
|00001350| 6c 6f 63 6b 25 3d 65 6e | 63 6f 64 65 25 0d 05 71 |lock%=en|code%..q|
|00001360| 24 20 c8 99 22 57 69 6d | 70 5f 47 65 74 57 69 6e |$ .."Wim|p_GetWin|
|00001370| 64 6f 77 53 74 61 74 65 | 22 2c 2c 62 6c 6f 63 6b |dowState|",,block|
|00001380| 25 0d 05 72 20 20 c8 99 | 22 57 69 6d 70 5f 4f 70 |%..r ..|"Wimp_Op|
|00001390| 65 6e 57 69 6e 64 6f 77 | 22 2c 2c 62 6c 6f 63 6b |enWindow|",,block|
|000013a0| 25 0d 05 73 21 20 f2 57 | 69 6d 70 5f 49 63 6f 6e |%..s! .W|imp_Icon|
|000013b0| 43 61 72 65 74 28 65 6e | 63 6f 64 65 25 2c 31 2c |Caret(en|code%,1,|
|000013c0| 30 29 0d 05 78 05 cd 0d | 05 7d 0e 76 61 6c 73 74 |0)..x...|.}.valst|
|000013d0| 72 24 3d 22 22 0d 05 82 | 05 e1 0d 05 8c 05 3a 0d |r$=""...|......:.|
|000013e0| 05 96 16 dd 20 f2 44 6f | 53 61 76 65 28 73 77 69 |.... .Do|Save(swi|
|000013f0| 74 63 68 25 29 0d 05 a0 | 10 c8 8e 20 73 77 69 74 |tch%)...|... swit|
|00001400| 63 68 25 20 ca 0d 05 aa | 49 20 c9 20 30 3a e7 20 |ch% ....|I . 0:. |
|00001410| 62 6c 6f 63 6b 25 21 38 | 20 80 20 36 34 20 f2 64 |block%!8| . 64 .d|
|00001420| 72 61 67 62 6f 78 3a 6f | 75 74 66 69 6c 65 24 3d |ragbox:o|utfile$=|
|00001430| a4 57 69 6d 70 5f 47 65 | 74 54 65 78 74 46 72 6f |.Wimp_Ge|tTextFro|
|00001440| 6d 49 63 6f 6e 28 73 61 | 76 65 25 2c 31 29 0d 05 |mIcon(sa|ve%,1)..|
|00001450| b4 22 20 c9 20 32 3a e7 | 20 62 6c 6f 63 6b 25 21 |." . 2:.| block%!|
|00001460| 38 20 80 20 35 20 f2 71 | 75 69 63 6b 73 61 76 65 |8 . 5 .q|uicksave|
|00001470| 0d 05 be 05 cb 0d 05 c8 | 05 e1 0d 05 d2 05 3a 0d |........|......:.|
|00001480| 05 dc 10 dd 20 f2 71 75 | 69 63 6b 73 61 76 65 0d |.... .qu|icksave.|
|00001490| 05 e6 50 e7 20 73 61 76 | 65 62 6f 78 25 20 6f 75 |..P. sav|ebox% ou|
|000014a0| 74 66 69 6c 65 24 3d a4 | 57 69 6d 70 5f 47 65 74 |tfile$=.|Wimp_Get|
|000014b0| 54 65 78 74 46 72 6f 6d | 49 63 6f 6e 28 73 61 76 |TextFrom|Icon(sav|
|000014c0| 65 25 2c 31 29 20 8b 20 | 6f 75 74 66 69 6c 65 24 |e%,1) . |outfile$|
|000014d0| 3d 22 3c 57 69 6d 70 24 | 53 63 72 61 70 3e 22 0d |="<Wimp$|Scrap>".|
|000014e0| 05 f0 4c e7 20 28 a7 6f | 75 74 66 69 6c 65 24 2c |..L. (.o|utfile$,|
|000014f0| 22 2e 22 29 20 80 20 73 | 61 76 65 62 6f 78 25 29 |".") . s|avebox%)|
|00001500| 20 21 62 6c 6f 63 6b 25 | 3d 73 61 76 65 25 3a c8 | !block%|=save%:.|
|00001510| 99 22 57 69 6d 70 5f 43 | 6c 6f 73 65 57 69 6e 64 |."Wimp_C|loseWind|
|00001520| 6f 77 22 2c 2c 62 6c 6f | 63 6b 25 0d 06 18 5c e7 |ow",,blo|ck%...\.|
|00001530| 20 28 ac a7 6f 75 74 66 | 69 6c 65 24 2c 22 2e 22 | (..outf|ile$,"."|
|00001540| 29 20 80 20 73 61 76 65 | 62 6f 78 25 29 20 f2 72 |) . save|box%) .r|
|00001550| 65 70 6f 72 74 28 22 54 | 6f 20 73 61 76 65 2c 20 |eport("T|o save, |
|00001560| 64 72 61 67 20 74 68 65 | 20 69 63 6f 6e 20 74 6f |drag the| icon to|
|00001570| 20 61 20 64 69 72 65 63 | 74 6f 72 79 20 76 69 65 | a direc|tory vie|
|00001580| 77 65 72 22 2c 31 29 0d | 06 27 1f e7 20 66 6c 61 |wer",1).|.'.. fla|
|00001590| 67 25 3d 30 20 f2 64 65 | 63 6f 64 65 20 8b 20 f2 |g%=0 .de|code . .|
|000015a0| 65 6e 63 6f 64 65 0d 06 | 2c 05 e1 0d 06 36 05 3a |encode..|,....6.:|
|000015b0| 0d 06 40 0e dd 20 f2 64 | 72 61 67 62 6f 78 0d 06 |..@.. .d|ragbox..|
|000015c0| 4a 11 21 62 6c 6f 63 6b | 25 3d 73 61 76 65 25 0d |J.!block|%=save%.|
|000015d0| 06 54 24 c8 99 20 22 57 | 69 6d 70 5f 47 65 74 57 |.T$.. "W|imp_GetW|
|000015e0| 69 6e 64 6f 77 53 74 61 | 74 65 22 2c 2c 62 6c 6f |indowSta|te",,blo|
|000015f0| 63 6b 25 0d 06 5e 1a 6f | 78 25 3d 62 6c 6f 63 6b |ck%..^.o|x%=block|
|00001600| 25 21 34 2d 62 6c 6f 63 | 6b 25 21 32 30 0d 06 68 |%!4-bloc|k%!20..h|
|00001610| 1b 6f 79 25 3d 62 6c 6f | 63 6b 25 21 31 36 2d 62 |.oy%=blo|ck%!16-b|
|00001620| 6c 6f 63 6b 25 21 32 34 | 0d 06 72 0e 62 6c 6f 63 |lock%!24|..r.bloc|
|00001630| 6b 25 21 34 3d 30 0d 06 | 7c 22 c8 99 20 22 57 69 |k%!4=0..||".. "Wi|
|00001640| 6d 70 5f 47 65 74 49 63 | 6f 6e 53 74 61 74 65 22 |mp_GetIc|onState"|
|00001650| 2c 2c 62 6c 6f 63 6b 25 | 0d 06 86 24 62 6c 6f 63 |,,block%|...$bloc|
|00001660| 6b 25 21 34 3d 35 3a 62 | 6c 6f 63 6b 25 21 38 3d |k%!4=5:b|lock%!8=|
|00001670| 6f 78 25 2b 62 6c 6f 63 | 6b 25 21 38 0d 06 90 1b |ox%+bloc|k%!8....|
|00001680| 62 6c 6f 63 6b 25 21 31 | 32 3d 6f 79 25 2b 62 6c |block%!1|2=oy%+bl|
|00001690| 6f 63 6b 25 21 31 32 0d | 06 9a 1b 62 6c 6f 63 6b |ock%!12.|...block|
|000016a0| 25 21 31 36 3d 6f 78 25 | 2b 62 6c 6f 63 6b 25 21 |%!16=ox%|+block%!|
|000016b0| 31 36 0d 06 a4 1b 62 6c | 6f 63 6b 25 21 32 30 3d |16....bl|ock%!20=|
|000016c0| 6f 79 25 2b 62 6c 6f 63 | 6b 25 21 32 30 0d 06 ae |oy%+bloc|k%!20...|
|000016d0| 1b 62 6c 6f 63 6b 25 21 | 32 34 3d 30 3a 62 6c 6f |.block%!|24=0:blo|
|000016e0| 63 6b 25 21 32 38 3d 30 | 0d 06 b8 17 62 6c 6f 63 |ck%!28=0|....bloc|
|000016f0| 6b 25 21 33 32 3d 26 37 | 46 46 46 46 46 46 46 0d |k%!32=&7|FFFFFFF.|
|00001700| 06 c2 17 62 6c 6f 63 6b | 25 21 33 36 3d 26 37 46 |...block|%!36=&7F|
|00001710| 46 46 46 46 46 46 0d 06 | cc 1d c8 99 20 22 57 69 |FFFFFF..|.... "Wi|
|00001720| 6d 70 5f 44 72 61 67 42 | 6f 78 22 2c 2c 62 6c 6f |mp_DragB|ox",,blo|
|00001730| 63 6b 25 0d 06 d6 05 e1 | 0d 06 e0 05 3a 0d 06 ea |ck%.....|....:...|
|00001740| 2a dd 20 a4 57 69 6d 70 | 5f 47 65 74 54 65 78 74 |*. .Wimp|_GetText|
|00001750| 46 72 6f 6d 49 63 6f 6e | 28 77 69 6e 64 6f 77 25 |FromIcon|(window%|
|00001760| 2c 69 63 6f 6e 25 29 0d | 06 f4 25 62 6c 6f 63 6b |,icon%).|..%block|
|00001770| 25 21 30 3d 77 69 6e 64 | 6f 77 25 20 3a 20 62 6c |%!0=wind|ow% : bl|
|00001780| 6f 63 6b 25 21 34 3d 69 | 63 6f 6e 25 0d 06 fe 22 |ock%!4=i|con%..."|
|00001790| c8 99 20 22 57 69 6d 70 | 5f 47 65 74 49 63 6f 6e |.. "Wimp|_GetIcon|
|000017a0| 53 74 61 74 65 22 2c 2c | 62 6c 6f 63 6b 25 0d 07 |State",,|block%..|
|000017b0| 08 38 e7 20 28 28 62 6c | 6f 63 6b 25 21 32 34 29 |.8. ((bl|ock%!24)|
|000017c0| 20 80 20 26 31 30 30 29 | 3d 30 20 85 20 31 2c 22 | . &100)|=0 . 1,"|
|000017d0| 49 63 6f 6e 20 69 73 6e | 27 74 20 69 6e 64 69 72 |Icon isn|'t indir|
|000017e0| 65 63 74 65 64 22 0d 07 | 12 11 3d 24 28 62 6c 6f |ected"..|..=$(blo|
|000017f0| 63 6b 25 21 32 38 29 0d | 07 1c 05 3a 0d 07 26 0f |ck%!28).|...:..&.|
|00001800| dd 20 f2 44 61 74 61 53 | 61 76 65 0d 07 30 1f 6f |. .DataS|ave..0.o|
|00001810| 75 74 66 69 6c 65 24 3d | a4 73 74 72 69 6e 67 28 |utfile$=|.string(|
|00001820| 62 6c 6f 63 6b 25 2b 34 | 34 29 0d 07 3a 1f e7 20 |block%+4|4)..:.. |
|00001830| 66 6c 61 67 25 3d 30 20 | f2 64 65 63 6f 64 65 20 |flag%=0 |.decode |
|00001840| 8b 20 f2 65 6e 63 6f 64 | 65 0d 07 44 16 62 6c 6f |. .encod|e..D.blo|
|00001850| 63 6b 25 21 31 32 3d 62 | 6c 6f 63 6b 25 21 38 0d |ck%!12=b|lock%!8.|
|00001860| 07 4e 1b 62 6c 6f 63 6b | 25 21 31 36 3d 31 3a 21 |.N.block|%!16=1:!|
|00001870| 62 6c 6f 63 6b 25 3d 32 | 35 36 0d 07 58 3a f4 20 |block%=2|56..X:. |
|00001880| 53 59 53 20 22 57 69 6d | 70 5f 53 65 6e 64 4d 65 |SYS "Wim|p_SendMe|
|00001890| 73 73 61 67 65 22 2c 31 | 38 2c 62 6c 6f 63 6b 25 |ssage",1|8,block%|
|000018a0| 2c 62 6c 6f 63 6b 25 21 | 32 30 2c 62 6c 6f 63 6b |,block%!|20,block|
|000018b0| 25 21 32 34 0d 07 62 05 | e1 0d 07 6c 05 3a 0d 07 |%!24..b.|...l.:..|
|000018c0| 76 10 dd 20 f2 73 74 61 | 72 74 73 61 76 65 0d 07 |v.. .sta|rtsave..|
|000018d0| 80 24 c8 99 20 22 57 69 | 6d 70 5f 47 65 74 50 6f |.$.. "Wi|mp_GetPo|
|000018e0| 69 6e 74 65 72 49 6e 66 | 6f 22 2c 2c 62 6c 6f 63 |interInf|o",,bloc|
|000018f0| 6b 25 0d 07 8a 2b 62 6c | 6f 63 6b 25 21 32 30 3d |k%...+bl|ock%!20=|
|00001900| 62 6c 6f 63 6b 25 21 31 | 32 3a 62 6c 6f 63 6b 25 |block%!1|2:block%|
|00001910| 21 32 34 3d 62 6c 6f 63 | 6b 25 21 31 36 0d 07 94 |!24=bloc|k%!16...|
|00001920| 28 62 6c 6f 63 6b 25 21 | 32 38 3d 21 62 6c 6f 63 |(block%!|28=!bloc|
|00001930| 6b 25 3a 62 6c 6f 63 6b | 25 21 33 32 3d 62 6c 6f |k%:block|%!32=blo|
|00001940| 63 6b 25 21 34 0d 07 9e | 10 62 6c 6f 63 6b 25 21 |ck%!4...|.block%!|
|00001950| 33 36 3d 32 34 0d 07 a8 | 1a 21 62 6c 6f 63 6b 25 |36=24...|.!block%|
|00001960| 3d 36 34 3a 62 6c 6f 63 | 6b 25 21 31 32 3d 30 0d |=64:bloc|k%!12=0.|
|00001970| 07 b2 1f 62 6c 6f 63 6b | 25 21 31 36 3d 31 3a 62 |...block|%!16=1:b|
|00001980| 6c 6f 63 6b 25 21 34 30 | 3d 74 79 70 65 25 0d 07 |lock%!40|=type%..|
|00001990| bc 23 24 28 62 6c 6f 63 | 6b 25 2b 34 34 29 3d a4 |.#$(bloc|k%+44)=.|
|000019a0| 67 65 74 6c 65 61 66 28 | 6f 75 74 66 69 6c 65 24 |getleaf(|outfile$|
|000019b0| 29 0d 07 c6 37 c8 99 20 | 22 57 69 6d 70 5f 53 65 |)...7.. |"Wimp_Se|
|000019c0| 6e 64 4d 65 73 73 61 67 | 65 22 2c 31 38 2c 62 6c |ndMessag|e",18,bl|
|000019d0| 6f 63 6b 25 2c 62 6c 6f | 63 6b 25 21 32 30 2c 62 |ock%,blo|ck%!20,b|
|000019e0| 6c 6f 63 6b 25 21 32 34 | 0d 07 d0 05 e1 0d 07 da |lock%!24|........|
|000019f0| 05 3a 0d 07 e4 12 dd 20 | a4 67 65 74 6c 65 61 66 |.:..... |.getleaf|
|00001a00| 28 61 24 29 0d 07 ee 0f | c8 95 20 a7 61 24 2c 22 |(a$)....|.. .a$,"|
|00001a10| 2e 22 29 0d 07 f8 16 61 | 24 3d c1 61 24 2c a7 61 |.")....a|$=.a$,.a|
|00001a20| 24 2c 22 2e 22 29 2b 31 | 29 0d 08 02 05 ce 0d 08 |$,".")+1|).......|
|00001a30| 0c 0a 3d 61 24 2b bd 30 | 0d 08 16 05 3a 0d 08 20 |..=a$+.0|....:.. |
|00001a40| 13 dd 20 a4 73 74 72 69 | 6e 67 28 70 74 72 25 29 |.. .stri|ng(ptr%)|
|00001a50| 0d 08 2a 08 ea 20 61 24 | 0d 08 34 0f c8 95 20 3f |..*.. a$|..4... ?|
|00001a60| 70 74 72 25 3c 3e 30 0d | 08 3e 18 61 24 2b 3d bd |ptr%<>0.|.>.a$+=.|
|00001a70| 28 3f 70 74 72 25 29 3a | 70 74 72 25 2b 3d 31 0d |(?ptr%):|ptr%+=1.|
|00001a80| 08 48 05 ce 0d 08 52 07 | 3d 61 24 0d 08 5c 05 3a |.H....R.|=a$..\.:|
|00001a90| 0d 08 66 0d dd 20 f2 65 | 6e 63 6f 64 65 0d 08 6b |..f.. .e|ncode..k|
|00001aa0| 30 73 74 61 72 74 63 6f | 64 65 25 3d bb a4 57 69 |0startco|de%=..Wi|
|00001ab0| 6d 70 5f 47 65 74 54 65 | 78 74 46 72 6f 6d 49 63 |mp_GetTe|xtFromIc|
|00001ac0| 6f 6e 28 65 6e 63 6f 64 | 65 25 2c 31 29 0d 08 70 |on(encod|e%,1)..p|
|00001ad0| 30 f2 57 69 6d 70 5f 50 | 75 74 54 65 78 74 49 6e |0.Wimp_P|utTextIn|
|00001ae0| 49 63 6f 6e 28 65 6e 63 | 6f 64 65 25 2c 33 2c 22 |Icon(enc|ode%,3,"|
|00001af0| 45 6e 63 6f 64 69 6e 67 | 2e 2e 2e 22 29 0d 08 7a |Encoding|...")..z|
|00001b00| 14 c8 99 22 48 6f 75 72 | 67 6c 61 73 73 5f 4f 6e |..."Hour|glass_On|
|00001b10| 22 0d 08 7f 0c 61 66 69 | 6c 65 25 3d b9 0d 08 84 |"....afi|le%=....|
|00001b20| 14 69 6e 70 75 74 25 3d | 8e 20 69 6e 66 69 6c 65 |.input%=|. infile|
|00001b30| 24 0d 08 8e 16 6f 75 74 | 70 75 74 25 3d ae 20 6f |$....out|put%=. o|
|00001b40| 75 74 66 69 6c 65 24 0d | 08 ca 18 6e 75 6c 6c 25 |utfile$.|...null%|
|00001b50| 3d b3 28 2d 73 74 61 72 | 74 63 6f 64 65 25 29 0d |=.(-star|tcode%).|
|00001b60| 08 cb 14 d5 23 6f 75 74 | 70 75 74 25 2c 22 43 4f |....#out|put%,"CO|
|00001b70| 44 22 3b 0d 08 cf 27 d5 | 23 6f 75 74 70 75 74 25 |D";...'.|#output%|
|00001b80| 2c c3 28 74 79 70 65 25 | 29 3b 3a d5 23 6f 75 74 |,.(type%|);:.#out|
|00001b90| 70 75 74 25 2c bd 28 31 | 29 3b 0d 08 d0 0c 63 6f |put%,.(1|);....co|
|00001ba0| 75 6e 74 25 3d 30 0d 08 | d1 16 73 74 65 70 25 3d |unt%=0..|..step%=|
|00001bb0| a2 23 69 6e 70 75 74 25 | 2f 31 30 30 0d 08 d4 05 |.#input%|/100....|
|00001bc0| f5 0d 08 d9 13 63 6f 75 | 6e 74 25 3d 63 6f 75 6e |.....cou|nt%=coun|
|00001bd0| 74 25 2b 31 0d 08 de 12 | 63 6f 64 65 25 3d 9a 23 |t%+1....|code%=.#|
|00001be0| 69 6e 70 75 74 25 0d 08 | e8 1a d5 23 6f 75 74 70 |input%..|...#outp|
|00001bf0| 75 74 25 2c 63 6f 64 65 | 25 2b b3 28 32 35 36 29 |ut%,code|%+.(256)|
|00001c00| 0d 08 ed 7b e7 20 28 63 | 6f 75 6e 74 25 3d 73 74 |...{. (c|ount%=st|
|00001c10| 65 70 25 20 80 20 65 6e | 63 6f 64 65 70 25 29 20 |ep% . en|codep%) |
|00001c20| f2 57 69 6d 70 5f 50 75 | 74 54 65 78 74 49 6e 49 |.Wimp_Pu|tTextInI|
|00001c30| 63 6f 6e 28 65 6e 63 6f | 64 65 25 2c 33 2c 22 45 |con(enco|de%,3,"E|
|00001c40| 6e 63 6f 64 69 6e 67 2e | 2e 2e 20 28 22 2b c3 28 |ncoding.|.. ("+.(|
|00001c50| a8 28 28 a2 23 6f 75 74 | 70 75 74 25 2f a2 23 69 |.((.#out|put%/.#i|
|00001c60| 6e 70 75 74 25 29 2a 31 | 30 30 29 29 2b 22 25 29 |nput%)*1|00))+"%)|
|00001c70| 22 29 3a 63 6f 75 6e 74 | 25 3d 30 0d 08 f2 0e fd |"):count|%=0.....|
|00001c80| 20 c5 23 69 6e 70 75 74 | 25 0d 08 f7 42 e7 20 65 | .#input|%...B. e|
|00001c90| 6e 63 6f 64 65 70 25 20 | f2 57 69 6d 70 5f 50 75 |ncodep% |.Wimp_Pu|
|00001ca0| 74 54 65 78 74 49 6e 49 | 63 6f 6e 28 65 6e 63 6f |tTextInI|con(enco|
|00001cb0| 64 65 25 2c 33 2c 22 45 | 6e 63 6f 64 69 6e 67 2e |de%,3,"E|ncoding.|
|00001cc0| 2e 2e 20 28 31 30 30 25 | 29 22 29 0d 08 fc 0c d9 |.. (100%|)").....|
|00001cd0| 23 69 6e 70 75 74 25 0d | 09 06 0d d9 23 6f 75 74 |#input%.|....#out|
|00001ce0| 70 75 74 25 0d 09 07 0c | 61 66 69 6c 65 25 3d a3 |put%....|afile%=.|
|00001cf0| 0d 09 08 22 ff 28 22 53 | 65 74 74 79 70 65 20 22 |...".("S|ettype "|
|00001d00| 2b 6f 75 74 66 69 6c 65 | 24 2b 22 20 26 38 36 34 |+outfile|$+" &864|
|00001d10| 22 29 0d 09 09 2e 21 62 | 6c 6f 63 6b 25 3d 73 61 |")....!b|lock%=sa|
|00001d20| 76 65 25 3a c8 99 22 57 | 69 6d 70 5f 43 6c 6f 73 |ve%:.."W|imp_Clos|
|00001d30| 65 57 69 6e 64 6f 77 22 | 2c 2c 62 6c 6f 63 6b 25 |eWindow"|,,block%|
|00001d40| 0d 09 0a 30 21 62 6c 6f | 63 6b 25 3d 65 6e 63 6f |...0!blo|ck%=enco|
|00001d50| 64 65 25 3a c8 99 22 57 | 69 6d 70 5f 43 6c 6f 73 |de%:.."W|imp_Clos|
|00001d60| 65 57 69 6e 64 6f 77 22 | 2c 2c 62 6c 6f 63 6b 25 |eWindow"|,,block%|
|00001d70| 0d 09 0b 2f f2 57 69 6d | 70 5f 50 75 74 54 65 78 |.../.Wim|p_PutTex|
|00001d80| 74 49 6e 49 63 6f 6e 28 | 65 6e 63 6f 64 65 25 2c |tInIcon(|encode%,|
|00001d90| 33 2c 22 57 61 69 74 69 | 6e 67 2e 2e 2e 22 29 0d |3,"Waiti|ng...").|
|00001da0| 09 0c 25 f2 57 69 6d 70 | 5f 50 75 74 54 65 78 74 |..%.Wimp|_PutText|
|00001db0| 49 6e 49 63 6f 6e 28 65 | 6e 63 6f 64 65 25 2c 31 |InIcon(e|ncode%,1|
|00001dc0| 2c 22 22 29 0d 09 0d 4f | e7 20 ac 73 61 76 65 62 |,"")...O|. .saveb|
|00001dd0| 6f 78 25 20 ff 28 22 2a | 44 65 6c 65 74 65 20 22 |ox% .("*|Delete "|
|00001de0| 2b 69 6e 66 69 6c 65 24 | 29 3a ff 28 22 2a 43 6f |+infile$|):.("*Co|
|00001df0| 70 79 20 3c 57 69 6d 70 | 24 53 63 72 61 70 3e 20 |py <Wimp|$Scrap> |
|00001e00| 22 2b 69 6e 66 69 6c 65 | 24 2b 22 20 44 7e 56 7e |"+infile|$+" D~V~|
|00001e10| 43 22 29 0d 09 0e 15 c8 | 99 22 48 6f 75 72 67 6c |C").....|."Hourgl|
|00001e20| 61 73 73 5f 4f 66 66 22 | 0d 09 10 05 e1 0d 09 1a |ass_Off"|........|
|00001e30| 05 3a 0d 09 24 0d dd 20 | f2 64 65 63 6f 64 65 0d |.:..$.. |.decode.|
|00001e40| 09 29 30 73 74 61 72 74 | 63 6f 64 65 25 3d bb a4 |.)0start|code%=..|
|00001e50| 57 69 6d 70 5f 47 65 74 | 54 65 78 74 46 72 6f 6d |Wimp_Get|TextFrom|
|00001e60| 49 63 6f 6e 28 64 65 63 | 6f 64 65 25 2c 31 29 0d |Icon(dec|ode%,1).|
|00001e70| 09 26 14 c8 99 22 48 6f | 75 72 67 6c 61 73 73 5f |.&..."Ho|urglass_|
|00001e80| 4f 6e 22 0d 09 29 30 f2 | 57 69 6d 70 5f 50 75 74 |On"..)0.|Wimp_Put|
|00001e90| 54 65 78 74 49 6e 49 63 | 6f 6e 28 64 65 63 6f 64 |TextInIc|on(decod|
|00001ea0| 65 25 2c 33 2c 22 44 65 | 63 6f 64 69 6e 67 2e 2e |e%,3,"De|coding..|
|00001eb0| 2e 22 29 0d 09 2a 0c 61 | 66 69 6c 65 25 3d b9 0d |.")..*.a|file%=..|
|00001ec0| 09 2e 14 69 6e 70 75 74 | 25 3d 8e 20 69 6e 66 69 |...input|%=. infi|
|00001ed0| 6c 65 24 0d 09 38 16 6f | 75 74 70 75 74 25 3d ae |le$..8.o|utput%=.|
|00001ee0| 20 6f 75 74 66 69 6c 65 | 24 0d 09 60 18 6e 75 6c | outfile|$..`.nul|
|00001ef0| 6c 25 3d b3 28 2d 73 74 | 61 72 74 63 6f 64 65 25 |l%=.(-st|artcode%|
|00001f00| 29 0d 09 61 0e cf 23 69 | 6e 70 75 74 25 3d 33 0d |)..a..#i|nput%=3.|
|00001f10| 09 65 44 f5 3a 74 65 6d | 70 24 3d bd 28 9a 23 69 |.eD.:tem|p$=.(.#i|
|00001f20| 6e 70 75 74 25 29 3a e7 | 20 97 28 74 65 6d 70 24 |nput%):.| .(temp$|
|00001f30| 29 3c 3e 31 20 74 79 70 | 65 24 3d 74 79 70 65 24 |)<>1 typ|e$=type$|
|00001f40| 2b 74 65 6d 70 24 3a fd | 20 97 28 74 65 6d 70 24 |+temp$:.| .(temp$|
|00001f50| 29 3d 31 0d 09 66 0c 63 | 6f 75 6e 74 25 3d 30 0d |)=1..f.c|ount%=0.|
|00001f60| 09 67 16 73 74 65 70 25 | 3d a2 23 69 6e 70 75 74 |.g.step%|=.#input|
|00001f70| 25 2f 31 30 30 0d 09 6a | 05 f5 0d 09 6f 13 63 6f |%/100..j|....o.co|
|00001f80| 75 6e 74 25 3d 63 6f 75 | 6e 74 25 2b 31 0d 09 74 |unt%=cou|nt%+1..t|
|00001f90| 12 63 6f 64 65 25 3d 9a | 23 69 6e 70 75 74 25 0d |.code%=.|#input%.|
|00001fa0| 09 7e 1a d5 23 6f 75 74 | 70 75 74 25 2c 63 6f 64 |.~..#out|put%,cod|
|00001fb0| 65 25 2d b3 28 32 35 36 | 29 0d 09 83 7b e7 20 28 |e%-.(256|)...{. (|
|00001fc0| 63 6f 75 6e 74 25 3d 73 | 74 65 70 25 20 80 20 64 |count%=s|tep% . d|
|00001fd0| 65 63 6f 64 65 70 25 29 | 20 f2 57 69 6d 70 5f 50 |ecodep%)| .Wimp_P|
|00001fe0| 75 74 54 65 78 74 49 6e | 49 63 6f 6e 28 64 65 63 |utTextIn|Icon(dec|
|00001ff0| 6f 64 65 25 2c 33 2c 22 | 44 65 63 6f 64 69 6e 67 |ode%,3,"|Decoding|
|00002000| 2e 2e 2e 20 28 22 2b c3 | 28 a8 28 28 a2 23 6f 75 |... ("+.|(.((.#ou|
|00002010| 74 70 75 74 25 2f a2 23 | 69 6e 70 75 74 25 29 2a |tput%/.#|input%)*|
|00002020| 31 30 30 29 29 2b 22 25 | 29 22 29 3a 63 6f 75 6e |100))+"%|)"):coun|
|00002030| 74 25 3d 30 0d 09 88 0e | fd 20 c5 23 69 6e 70 75 |t%=0....|. .#inpu|
|00002040| 74 25 0d 09 8d 42 e7 20 | 64 65 63 6f 64 65 70 25 |t%...B. |decodep%|
|00002050| 20 f2 57 69 6d 70 5f 50 | 75 74 54 65 78 74 49 6e | .Wimp_P|utTextIn|
|00002060| 49 63 6f 6e 28 64 65 63 | 6f 64 65 25 2c 33 2c 22 |Icon(dec|ode%,3,"|
|00002070| 44 65 63 6f 64 69 6e 67 | 2e 2e 2e 20 28 31 30 30 |Decoding|... (100|
|00002080| 25 29 22 29 0d 09 92 0c | d9 23 69 6e 70 75 74 25 |%)")....|.#input%|
|00002090| 0d 09 97 0d d9 23 6f 75 | 74 70 75 74 25 0d 09 9c |.....#ou|tput%...|
|000020a0| 0c 61 66 69 6c 65 25 3d | a3 0d 09 9d 30 ff 28 22 |.afile%=|....0.("|
|000020b0| 53 65 74 74 79 70 65 20 | 22 2b 6f 75 74 66 69 6c |Settype |"+outfil|
|000020c0| 65 24 2b 22 20 22 2b c3 | 7e bb 74 79 70 65 24 29 |e$+" "+.|~.type$)|
|000020d0| 3a 74 79 70 65 24 3d 22 | 22 0d 09 9e 2e 21 62 6c |:type$="|"....!bl|
|000020e0| 6f 63 6b 25 3d 73 61 76 | 65 25 3a c8 99 22 57 69 |ock%=sav|e%:.."Wi|
|000020f0| 6d 70 5f 43 6c 6f 73 65 | 57 69 6e 64 6f 77 22 2c |mp_Close|Window",|
|00002100| 2c 62 6c 6f 63 6b 25 0d | 09 9f 30 21 62 6c 6f 63 |,block%.|..0!bloc|
|00002110| 6b 25 3d 64 65 63 6f 64 | 65 25 3a c8 99 22 57 69 |k%=decod|e%:.."Wi|
|00002120| 6d 70 5f 43 6c 6f 73 65 | 57 69 6e 64 6f 77 22 2c |mp_Close|Window",|
|00002130| 2c 62 6c 6f 63 6b 25 0d | 09 a0 2f f2 57 69 6d 70 |,block%.|../.Wimp|
|00002140| 5f 50 75 74 54 65 78 74 | 49 6e 49 63 6f 6e 28 64 |_PutText|InIcon(d|
|00002150| 65 63 6f 64 65 25 2c 33 | 2c 22 57 61 69 74 69 6e |ecode%,3|,"Waitin|
|00002160| 67 2e 2e 2e 22 29 0d 09 | a1 25 f2 57 69 6d 70 5f |g...")..|.%.Wimp_|
|00002170| 50 75 74 54 65 78 74 49 | 6e 49 63 6f 6e 28 64 65 |PutTextI|nIcon(de|
|00002180| 63 6f 64 65 25 2c 31 2c | 22 22 29 0d 09 a3 4f e7 |code%,1,|"")...O.|
|00002190| 20 ac 73 61 76 65 62 6f | 78 25 20 ff 28 22 2a 44 | .savebo|x% .("*D|
|000021a0| 65 6c 65 74 65 20 22 2b | 69 6e 66 69 6c 65 24 29 |elete "+|infile$)|
|000021b0| 3a ff 28 22 2a 43 6f 70 | 79 20 3c 57 69 6d 70 24 |:.("*Cop|y <Wimp$|
|000021c0| 53 63 72 61 70 3e 20 22 | 2b 69 6e 66 69 6c 65 24 |Scrap> "|+infile$|
|000021d0| 2b 22 20 44 7e 56 7e 43 | 22 29 0d 09 a4 15 c8 99 |+" D~V~C|")......|
|000021e0| 22 48 6f 75 72 67 6c 61 | 73 73 5f 4f 66 66 22 0d |"Hourgla|ss_Off".|
|000021f0| 09 a5 05 e1 0d 09 a6 05 | 3a 0d 09 b0 2d dd 20 f2 |........|:...-. .|
|00002200| 57 69 6d 70 5f 41 6c 65 | 72 74 42 6f 78 28 74 69 |Wimp_Ale|rtBox(ti|
|00002210| 74 6c 65 24 2c 6d 65 73 | 73 61 67 65 24 2c 62 75 |tle$,mes|sage$,bu|
|00002220| 74 74 6f 6e 25 29 0d 09 | ba 0f ea 20 72 65 73 70 |tton%)..|... resp|
|00002230| 6f 6e 73 65 25 0d 09 c4 | 18 24 28 62 6c 6f 63 6b |onse%...|.$(block|
|00002240| 25 2b 34 29 3d 6d 65 73 | 73 61 67 65 24 0d 09 ce |%+4)=mes|sage$...|
|00002250| 10 c8 8e 20 62 75 74 74 | 6f 6e 25 20 ca 0d 09 d8 |... butt|on% ....|
|00002260| 2e 20 c9 20 32 20 20 20 | 20 3a 20 72 65 73 70 6f |. . 2 | : respo|
|00002270| 6e 73 65 25 3d 31 20 20 | 20 20 20 3a 20 f4 7c 2e |nse%=1 | : .|.|
|00002280| 2e 2e 45 72 72 6f 72 20 | 42 6f 78 0d 09 e2 39 20 |..Error |Box...9 |
|00002290| c9 20 31 20 20 20 20 3a | 20 72 65 73 70 6f 6e 73 |. 1 :| respons|
|000022a0| 65 25 3d 31 35 20 20 20 | 20 3a 20 f4 7c 2e 2e 2e |e%=15 | : .|...|
|000022b0| 4f 4b 20 61 6e 64 20 43 | 41 4e 43 45 4c 20 62 75 |OK and C|ANCEL bu|
|000022c0| 74 6f 6e 73 0d 09 ec 21 | 20 c9 20 33 20 20 20 20 |tons...!| . 3 |
|000022d0| 3a 20 72 65 73 70 6f 6e | 73 65 25 3d 28 31 3c 3c |: respon|se%=(1<<|
|000022e0| 35 29 2b 31 36 0d 09 f6 | 21 20 c9 20 34 20 20 20 |5)+16...|! . 4 |
|000022f0| 20 3a 20 72 65 73 70 6f | 6e 73 65 25 3d 28 31 3c | : respo|nse%=(1<|
|00002300| 3c 36 29 2b 31 36 0d 0a | 00 2e 20 7f 20 3a 20 72 |<6)+16..|.. . : r|
|00002310| 65 73 70 6f 6e 73 65 25 | 3d 31 36 20 20 20 20 3a |esponse%|=16 :|
|00002320| 20 f4 7c 2e 2e 2e 4f 4b | 20 62 75 74 74 6f 6e 20 | .|...OK| button |
|00002330| 6f 6e 6c 79 0d 0a 0a 05 | cb 0d 0a 14 3e c8 99 20 |only....|....>.. |
|00002340| 22 57 69 6d 70 5f 52 65 | 70 6f 72 74 45 72 72 6f |"Wimp_Re|portErro|
|00002350| 72 22 2c 62 6c 6f 63 6b | 25 2c 72 65 73 70 6f 6e |r",block|%,respon|
|00002360| 73 65 25 2c 74 69 74 6c | 65 24 20 b8 20 2c 72 65 |se%,titl|e$ . ,re|
|00002370| 73 70 6f 6e 73 65 25 0d | 0a 1e 05 e1 0d 0a 28 05 |sponse%.|......(.|
|00002380| 3a 0d 0a 32 2b dd 20 f2 | 57 69 6d 70 5f 49 63 6f |:..2+. .|Wimp_Ico|
|00002390| 6e 43 61 72 65 74 28 77 | 69 6e 64 6f 77 25 2c 69 |nCaret(w|indow%,i|
|000023a0| 63 6f 6e 25 2c 63 68 61 | 72 73 25 29 0d 0a 3c 37 |con%,cha|rs%)..<7|
|000023b0| c8 99 22 57 69 6d 70 5f | 53 65 74 43 61 72 65 74 |.."Wimp_|SetCaret|
|000023c0| 50 6f 73 69 74 69 6f 6e | 22 2c 77 69 6e 64 6f 77 |Position|",window|
|000023d0| 25 2c 69 63 6f 6e 25 2c | 2c 2c 2d 31 2c 63 68 61 |%,icon%,|,,-1,cha|
|000023e0| 72 73 25 0d 0a 46 05 e1 | 0d 0a 50 05 3a 0d 0a 5a |rs%..F..|..P.:..Z|
|000023f0| 17 dd 20 f2 64 65 63 6f | 64 65 6b 65 79 73 28 6b |.. .deco|dekeys(k|
|00002400| 65 79 25 29 0d 0a 5f 0f | e7 20 6b 65 79 25 3d 31 |ey%).._.|. key%=1|
|00002410| 33 20 8c 0d 0a 61 25 c8 | 99 22 57 69 6d 70 5f 47 |3 ...a%.|."Wimp_G|
|00002420| 65 74 43 61 72 65 74 50 | 6f 73 69 74 69 6f 6e 22 |etCaretP|osition"|
|00002430| 2c 2c 62 6c 6f 63 6b 25 | 0d 0a 64 12 20 c8 8e 20 |,,block%|..d. .. |
|00002440| 62 6c 6f 63 6b 25 21 30 | 20 ca 0d 0a 6e 18 20 20 |block%!0| ...n. |
|00002450| c9 20 65 6e 63 6f 64 65 | 25 3a f2 65 6e 63 73 61 |. encode|%:.encsa|
|00002460| 76 65 0d 0a 78 18 20 20 | c9 20 64 65 63 6f 64 65 |ve..x. |. decode|
|00002470| 25 3a f2 64 65 63 73 61 | 76 65 0d 0a 82 18 20 20 |%:.decsa|ve.... |
|00002480| c9 20 73 61 76 65 25 3a | f2 44 6f 53 61 76 65 28 |. save%:|.DoSave(|
|00002490| 32 29 0d 0a 87 49 20 20 | c9 20 63 6f 6e 66 69 67 |2)...I |. config|
|000024a0| 25 3a 21 62 6c 6f 63 6b | 25 3d 63 6f 6e 66 69 67 |%:!block|%=config|
|000024b0| 25 3a c8 99 22 57 69 6d | 70 5f 43 6c 6f 73 65 57 |%:.."Wim|p_CloseW|
|000024c0| 69 6e 64 6f 77 22 2c 2c | 62 6c 6f 63 6b 25 3a f2 |indow",,|block%:.|
|000024d0| 73 65 74 73 65 74 74 69 | 6e 67 73 0d 0a 8c 06 20 |setsetti|ngs.... |
|000024e0| cb 0d 0a 96 05 cd 0d 0a | 9b 1c c8 99 22 57 69 6d |........|...."Wim|
|000024f0| 70 5f 50 72 6f 63 65 73 | 73 4b 65 79 22 2c 6b 65 |p_Proces|sKey",ke|
|00002500| 79 25 0d 0a a0 05 e1 0d | 0a aa 05 3a 0d 0a b4 0e |y%......|...:....|
|00002510| dd 20 f2 6d 6f 72 65 69 | 6e 66 0d 0a be 34 21 62 |. .morei|nf...4!b|
|00002520| 6c 6f 63 6b 25 3d 6d 6f | 72 65 69 6e 66 25 3a c8 |lock%=mo|reinf%:.|
|00002530| 99 22 57 69 6d 70 5f 47 | 65 74 57 69 6e 64 6f 77 |."Wimp_G|etWindow|
|00002540| 53 74 61 74 65 22 2c 2c | 62 6c 6f 63 6b 25 0d 0a |State",,|block%..|
|00002550| d2 1f c8 99 22 57 69 6d | 70 5f 4f 70 65 6e 57 69 |...."Wim|p_OpenWi|
|00002560| 6e 64 6f 77 22 2c 2c 62 | 6c 6f 63 6b 25 0d 0b 04 |ndow",,b|lock%...|
|00002570| 05 e1 0d 0b 0e 05 3a 0d | 0b 18 16 dd 20 f2 65 78 |......:.|.... .ex|
|00002580| 74 72 61 69 6e 66 28 69 | 63 6f 6e 25 29 0d 0b 22 |trainf(i|con%).."|
|00002590| 0e c8 8e 20 69 63 6f 6e | 25 20 ca 0d 0b 2c 45 20 |... icon|% ...,E |
|000025a0| c9 20 33 3a e7 20 69 66 | 6c 61 67 31 25 20 63 75 |. 3:. if|lag1% cu|
|000025b0| 72 72 65 6e 74 31 24 3d | 22 21 46 69 6c 65 53 61 |rrent1$=|"!FileSa|
|000025c0| 66 65 22 20 8b 20 63 75 | 72 72 65 6e 74 31 24 3d |fe" . cu|rrent1$=|
|000025d0| 22 46 69 6c 65 20 65 6e | 63 72 79 70 74 6f 72 22 |"File en|cryptor"|
|000025e0| 0d 0b 31 43 20 20 20 20 | 20 20 20 20 f2 57 69 6d |..1C | .Wim|
|000025f0| 70 5f 50 75 74 54 65 78 | 74 49 6e 49 63 6f 6e 28 |p_PutTex|tInIcon(|
|00002600| 69 6e 66 6f 25 2c 33 2c | 63 75 72 72 65 6e 74 31 |info%,3,|current1|
|00002610| 24 29 3a 69 66 6c 61 67 | 31 25 3d ac 69 66 6c 61 |$):iflag|1%=.ifla|
|00002620| 67 31 25 0d 0b 36 40 20 | c9 20 34 3a e7 20 69 66 |g1%..6@ |. 4:. if|
|00002630| 6c 61 67 32 25 20 63 75 | 72 72 65 6e 74 32 24 3d |lag2% cu|rrent2$=|
|00002640| 22 41 75 74 68 6f 72 3a | 22 20 8b 20 63 75 72 72 |"Author:|" . curr|
|00002650| 65 6e 74 32 24 3d 22 45 | 6e 63 72 79 70 74 69 6f |ent2$="E|ncryptio|
|00002660| 6e 3a 22 0d 0b 40 43 20 | 20 20 20 20 20 20 20 f2 |n:"..@C | .|
|00002670| 57 69 6d 70 5f 50 75 74 | 54 65 78 74 49 6e 49 63 |Wimp_Put|TextInIc|
|00002680| 6f 6e 28 69 6e 66 6f 25 | 2c 31 2c 63 75 72 72 65 |on(info%|,1,curre|
|00002690| 6e 74 32 24 29 3a 69 66 | 6c 61 67 32 25 3d ac 69 |nt2$):if|lag2%=.i|
|000026a0| 66 6c 61 67 32 25 0d 0b | 40 3a 20 c9 20 35 3a e7 |flag2%..|@: . 5:.|
|000026b0| 20 69 66 6c 61 67 33 25 | 20 63 75 72 72 65 6e 74 | iflag3%| current|
|000026c0| 33 24 3d 22 31 2e 37 30 | 22 20 8b 20 63 75 72 72 |3$="1.70|" . curr|
|000026d0| 65 6e 74 33 24 3d 22 32 | 33 2f 30 36 2f 39 36 22 |ent3$="2|3/06/96"|
|000026e0| 0d 0b 45 43 20 20 20 20 | 20 20 20 20 f2 57 69 6d |..EC | .Wim|
|000026f0| 70 5f 50 75 74 54 65 78 | 74 49 6e 49 63 6f 6e 28 |p_PutTex|tInIcon(|
|00002700| 69 6e 66 6f 25 2c 35 2c | 63 75 72 72 65 6e 74 33 |info%,5,|current3|
|00002710| 24 29 3a 69 66 6c 61 67 | 33 25 3d ac 69 66 6c 61 |$):iflag|3%=.ifla|
|00002720| 67 33 25 0d 0b 4a 05 cb | 0d 0b 54 05 e1 0d 0b 5e |g3%..J..|..T....^|
|00002730| 05 3a 0d 0b 68 21 dd 20 | a4 73 65 6c 65 63 74 65 |.:..h!. |.selecte|
|00002740| 64 28 21 62 6c 6f 63 6b | 25 2c 62 6c 6f 63 6b 25 |d(!block|%,block%|
|00002750| 21 34 29 0d 0b 72 21 c8 | 99 22 57 69 6d 70 5f 47 |!4)..r!.|."Wimp_G|
|00002760| 65 74 49 63 6f 6e 53 74 | 61 74 65 22 2c 2c 62 6c |etIconSt|ate",,bl|
|00002770| 6f 63 6b 25 0d 0b 7c 1e | 3d 28 28 28 62 6c 6f 63 |ock%..|.|=(((bloc|
|00002780| 6b 25 21 32 34 29 80 28 | 31 3c 3c 32 31 29 29 3e |k%!24).(|1<<21))>|
|00002790| 30 29 0d 0b 86 05 3a 0d | 0b 90 2b dd 20 f2 73 65 |0)....:.|..+. .se|
|000027a0| 6c 65 63 74 69 63 6f 6e | 28 21 62 6c 6f 63 6b 25 |lecticon|(!block%|
|000027b0| 2c 62 6c 6f 63 6b 25 21 | 34 2c 73 65 6c 65 63 74 |,block%!|4,select|
|000027c0| 25 29 0d 0b 9a 21 c8 99 | 22 57 69 6d 70 5f 47 65 |%)...!..|"Wimp_Ge|
|000027d0| 74 49 63 6f 6e 53 74 61 | 74 65 22 2c 2c 62 6c 6f |tIconSta|te",,blo|
|000027e0| 63 6b 25 0d 0b a4 2b e7 | 20 73 65 6c 65 63 74 25 |ck%...+.| select%|
|000027f0| 20 8c 20 62 6c 6f 63 6b | 25 21 38 3d 31 3c 3c 32 | . block|%!8=1<<2|
|00002800| 31 20 8b 20 62 6c 6f 63 | 6b 25 21 38 3d 30 0d 0b |1 . bloc|k%!8=0..|
|00002810| ae 13 62 6c 6f 63 6b 25 | 21 31 32 3d 31 3c 3c 32 |..block%|!12=1<<2|
|00002820| 31 0d 0b b8 47 e7 20 28 | 62 6c 6f 63 6b 25 21 32 |1...G. (|block%!2|
|00002830| 34 20 80 20 62 6c 6f 63 | 6b 25 21 31 32 29 3c 3e |4 . bloc|k%!12)<>|
|00002840| 62 6c 6f 63 6b 25 21 38 | 20 8c 20 c8 99 22 57 69 |block%!8| . .."Wi|
|00002850| 6d 70 5f 53 65 74 49 63 | 6f 6e 53 74 61 74 65 22 |mp_SetIc|onState"|
|00002860| 2c 2c 62 6c 6f 63 6b 25 | 0d 0b c2 05 e1 0d 0b cc |,,block%|........|
|00002870| 05 3a 0d 0b d6 12 dd 20 | f2 73 65 74 73 65 74 74 |.:..... |.setsett|
|00002880| 69 6e 67 73 0d 0b e0 42 | e7 20 65 6e 63 6f 64 65 |ings...B|. encode|
|00002890| 70 25 20 f2 73 65 6c 65 | 63 74 69 63 6f 6e 28 63 |p% .sele|cticon(c|
|000028a0| 6f 6e 66 69 67 25 2c 34 | 2c 31 29 20 8b 20 f2 73 |onfig%,4|,1) . .s|
|000028b0| 65 6c 65 63 74 69 63 6f | 6e 28 63 6f 6e 66 69 67 |electico|n(config|
|000028c0| 25 2c 34 2c 30 29 0d 0b | ea 42 e7 20 64 65 63 6f |%,4,0)..|.B. deco|
|000028d0| 64 65 70 25 20 f2 73 65 | 6c 65 63 74 69 63 6f 6e |dep% .se|lecticon|
|000028e0| 28 63 6f 6e 66 69 67 25 | 2c 35 2c 31 29 20 8b 20 |(config%|,5,1) . |
|000028f0| f2 73 65 6c 65 63 74 69 | 63 6f 6e 28 63 6f 6e 66 |.selecti|con(conf|
|00002900| 69 67 25 2c 35 2c 30 29 | 0d 0b f4 42 e7 20 73 61 |ig%,5,0)|...B. sa|
|00002910| 76 65 62 6f 78 25 20 f2 | 73 65 6c 65 63 74 69 63 |vebox% .|selectic|
|00002920| 6f 6e 28 63 6f 6e 66 69 | 67 25 2c 37 2c 31 29 20 |on(confi|g%,7,1) |
|00002930| 8b 20 f2 73 65 6c 65 63 | 74 69 63 6f 6e 28 63 6f |. .selec|ticon(co|
|00002940| 6e 66 69 67 25 2c 37 2c | 30 29 0d 0b fe 44 e7 20 |nfig%,7,|0)...D. |
|00002950| 77 65 6c 63 6f 6d 65 25 | 20 f2 73 65 6c 65 63 74 |welcome%| .select|
|00002960| 69 63 6f 6e 28 63 6f 6e | 66 69 67 25 2c 31 35 2c |icon(con|fig%,15,|
|00002970| 31 29 20 8b 20 f2 73 65 | 6c 65 63 74 69 63 6f 6e |1) . .se|lecticon|
|00002980| 28 63 6f 6e 66 69 67 25 | 2c 31 35 2c 30 29 0d 0c |(config%|,15,0)..|
|00002990| 08 2c f2 57 69 6d 70 5f | 50 75 74 54 65 78 74 49 |.,.Wimp_|PutTextI|
|000029a0| 6e 49 63 6f 6e 28 63 6f | 6e 66 69 67 25 2c 31 30 |nIcon(co|nfig%,10|
|000029b0| 2c 65 6e 63 66 69 6c 65 | 24 29 0d 0c 12 2c f2 57 |,encfile|$)...,.W|
|000029c0| 69 6d 70 5f 50 75 74 54 | 65 78 74 49 6e 49 63 6f |imp_PutT|extInIco|
|000029d0| 6e 28 63 6f 6e 66 69 67 | 25 2c 31 32 2c 64 65 63 |n(config|%,12,dec|
|000029e0| 66 69 6c 65 24 29 0d 0c | 1c 05 e1 0d 0c 26 05 3a |file$)..|.....&.:|
|000029f0| 0d 0c 30 12 dd 20 f2 67 | 65 74 73 65 74 74 69 6e |..0.. .g|etsettin|
|00002a00| 67 73 0d 0c 3a 32 e7 20 | a4 73 65 6c 65 63 74 65 |gs..:2. |.selecte|
|00002a10| 64 28 63 6f 6e 66 69 67 | 25 2c 34 29 20 65 6e 63 |d(config|%,4) enc|
|00002a20| 6f 64 65 70 25 3d b9 20 | 8b 20 65 6e 63 6f 64 65 |odep%=. |. encode|
|00002a30| 70 25 3d a3 0d 0c 44 32 | e7 20 a4 73 65 6c 65 63 |p%=...D2|. .selec|
|00002a40| 74 65 64 28 63 6f 6e 66 | 69 67 25 2c 35 29 20 64 |ted(conf|ig%,5) d|
|00002a50| 65 63 6f 64 65 70 25 3d | b9 20 8b 20 64 65 63 6f |ecodep%=|. . deco|
|00002a60| 64 65 70 25 3d a3 0d 0c | 4e 32 e7 20 a4 73 65 6c |dep%=...|N2. .sel|
|00002a70| 65 63 74 65 64 28 63 6f | 6e 66 69 67 25 2c 37 29 |ected(co|nfig%,7)|
|00002a80| 20 73 61 76 65 62 6f 78 | 25 3d b9 20 8b 20 73 61 | savebox|%=. . sa|
|00002a90| 76 65 62 6f 78 25 3d a3 | 0d 0c 58 33 e7 20 a4 73 |vebox%=.|..X3. .s|
|00002aa0| 65 6c 65 63 74 65 64 28 | 63 6f 6e 66 69 67 25 2c |elected(|config%,|
|00002ab0| 31 35 29 20 77 65 6c 63 | 6f 6d 65 25 3d b9 20 8b |15) welc|ome%=. .|
|00002ac0| 20 77 65 6c 63 6f 6d 65 | 25 3d a3 0d 0c 62 2e 65 | welcome|%=...b.e|
|00002ad0| 6e 63 66 69 6c 65 24 3d | a4 57 69 6d 70 5f 47 65 |ncfile$=|.Wimp_Ge|
|00002ae0| 74 54 65 78 74 46 72 6f | 6d 49 63 6f 6e 28 63 6f |tTextFro|mIcon(co|
|00002af0| 6e 66 69 67 25 2c 31 30 | 29 0d 0c 6c 2e 64 65 63 |nfig%,10|)..l.dec|
|00002b00| 66 69 6c 65 24 3d a4 57 | 69 6d 70 5f 47 65 74 54 |file$=.W|imp_GetT|
|00002b10| 65 78 74 46 72 6f 6d 49 | 63 6f 6e 28 63 6f 6e 66 |extFromI|con(conf|
|00002b20| 69 67 25 2c 31 32 29 0d | 0c 76 05 e1 0d 0c 80 05 |ig%,12).|.v......|
|00002b30| 3a 0d 0c 8a 13 dd 20 f2 | 6c 6f 61 64 73 65 74 74 |:..... .|loadsett|
|00002b40| 69 6e 67 73 0d 0c 8f 0c | 73 66 69 6c 65 25 3d b9 |ings....|sfile%=.|
|00002b50| 0d 0c 94 20 73 65 74 25 | 3d 8e 20 22 3c 4f 62 65 |... set%|=. "<Obe|
|00002b60| 79 24 44 69 72 3e 2e 53 | 65 74 74 69 6e 67 73 22 |y$Dir>.S|ettings"|
|00002b70| 0d 0c 9e 39 74 65 6d 70 | 31 24 3d bd 28 9a 23 73 |...9temp|1$=.(.#s|
|00002b80| 65 74 25 29 3a e7 20 74 | 65 6d 70 31 24 3d 22 2d |et%):. t|emp1$="-|
|00002b90| 22 20 74 65 6d 70 31 24 | 3d 74 65 6d 70 31 24 2b |" temp1$|=temp1$+|
|00002ba0| bd 28 9a 23 73 65 74 25 | 29 0d 0c a3 16 65 6e 63 |.(.#set%|)....enc|
|00002bb0| 6f 64 65 70 25 3d bb 28 | 74 65 6d 70 31 24 29 0d |odep%=.(|temp1$).|
|00002bc0| 0c a8 39 74 65 6d 70 31 | 24 3d bd 28 9a 23 73 65 |..9temp1|$=.(.#se|
|00002bd0| 74 25 29 3a e7 20 74 65 | 6d 70 31 24 3d 22 2d 22 |t%):. te|mp1$="-"|
|00002be0| 20 74 65 6d 70 31 24 3d | 74 65 6d 70 31 24 2b bd | temp1$=|temp1$+.|
|00002bf0| 28 9a 23 73 65 74 25 29 | 0d 0c ad 16 64 65 63 6f |(.#set%)|....deco|
|00002c00| 64 65 70 25 3d bb 28 74 | 65 6d 70 31 24 29 0d 0c |dep%=.(t|emp1$)..|
|00002c10| b2 39 74 65 6d 70 31 24 | 3d bd 28 9a 23 73 65 74 |.9temp1$|=.(.#set|
|00002c20| 25 29 3a e7 20 74 65 6d | 70 31 24 3d 22 2d 22 20 |%):. tem|p1$="-" |
|00002c30| 74 65 6d 70 31 24 3d 74 | 65 6d 70 31 24 2b bd 28 |temp1$=t|emp1$+.(|
|00002c40| 9a 23 73 65 74 25 29 0d | 0c b7 16 73 61 76 65 62 |.#set%).|...saveb|
|00002c50| 6f 78 25 3d bb 28 74 65 | 6d 70 31 24 29 0d 0c bc |ox%=.(te|mp1$)...|
|00002c60| 39 74 65 6d 70 31 24 3d | bd 28 9a 23 73 65 74 25 |9temp1$=|.(.#set%|
|00002c70| 29 3a e7 20 74 65 6d 70 | 31 24 3d 22 2d 22 20 74 |):. temp|1$="-" t|
|00002c80| 65 6d 70 31 24 3d 74 65 | 6d 70 31 24 2b bd 28 9a |emp1$=te|mp1$+.(.|
|00002c90| 23 73 65 74 25 29 0d 0c | c1 16 77 65 6c 63 6f 6d |#set%)..|..welcom|
|00002ca0| 65 25 3d bb 28 74 65 6d | 70 31 24 29 0d 0c c6 50 |e%=.(tem|p1$)...P|
|00002cb0| 65 6e 63 66 69 6c 65 24 | 3d 22 22 3a f5 3a 6e 75 |encfile$|="":.:nu|
|00002cc0| 6c 6c 25 3d 9a 23 73 65 | 74 25 3a e7 20 6e 75 6c |ll%=.#se|t%:. nul|
|00002cd0| 6c 25 3c 3e 33 32 20 65 | 6e 63 66 69 6c 65 24 3d |l%<>32 e|ncfile$=|
|00002ce0| 65 6e 63 66 69 6c 65 24 | 2b bd 28 6e 75 6c 6c 25 |encfile$|+.(null%|
|00002cf0| 29 3a fd 20 6e 75 6c 6c | 25 3d 33 32 0d 0c d0 50 |):. null|%=32...P|
|00002d00| 64 65 63 66 69 6c 65 24 | 3d 22 22 3a f5 3a 6e 75 |decfile$|="":.:nu|
|00002d10| 6c 6c 25 3d 9a 23 73 65 | 74 25 3a e7 20 6e 75 6c |ll%=.#se|t%:. nul|
|00002d20| 6c 25 3c 3e 33 32 20 64 | 65 63 66 69 6c 65 24 3d |l%<>32 d|ecfile$=|
|00002d30| 64 65 63 66 69 6c 65 24 | 2b bd 28 6e 75 6c 6c 25 |decfile$|+.(null%|
|00002d40| 29 3a fd 20 6e 75 6c 6c | 25 3d 33 32 0d 0c da 0a |):. null|%=32....|
|00002d50| d9 23 73 65 74 25 0d 0c | df 0c 73 66 69 6c 65 25 |.#set%..|..sfile%|
|00002d60| 3d a3 0d 0c e4 05 e1 0d | 0c ee 05 3a 0d 0c f8 13 |=.......|...:....|
|00002d70| dd 20 f2 73 61 76 65 73 | 65 74 74 69 6e 67 73 0d |. .saves|ettings.|
|00002d80| 0c 99 0c 73 66 69 6c 65 | 25 3d b9 0d 0d 02 20 73 |...sfile|%=.... s|
|00002d90| 65 74 25 3d ae 20 22 3c | 4f 62 65 79 24 44 69 72 |et%=. "<|Obey$Dir|
|00002da0| 3e 2e 53 65 74 74 69 6e | 67 73 22 0d 0d 0c 17 d5 |>.Settin|gs".....|
|00002db0| 23 73 65 74 25 2c c3 28 | 65 6e 63 6f 64 65 70 25 |#set%,.(|encodep%|
|00002dc0| 29 3b 0d 0d 16 17 d5 23 | 73 65 74 25 2c c3 28 64 |);.....#|set%,.(d|
|00002dd0| 65 63 6f 64 65 70 25 29 | 3b 0d 0d 20 17 d5 23 73 |ecodep%)|;.. ..#s|
|00002de0| 65 74 25 2c c3 28 73 61 | 76 65 62 6f 78 25 29 3b |et%,.(sa|vebox%);|
|00002df0| 0d 0d 2a 17 d5 23 73 65 | 74 25 2c c3 28 77 65 6c |..*..#se|t%,.(wel|
|00002e00| 63 6f 6d 65 25 29 3b 0d | 0d 34 14 d5 23 73 65 74 |come%);.|.4..#set|
|00002e10| 25 2c 65 6e 63 66 69 6c | 65 24 3b 0d 0d 3e 11 d5 |%,encfil|e$;..>..|
|00002e20| 23 73 65 74 25 2c bd 28 | 33 32 29 3b 0d 0d 48 14 |#set%,.(|32);..H.|
|00002e30| d5 23 73 65 74 25 2c 64 | 65 63 66 69 6c 65 24 3b |.#set%,d|ecfile$;|
|00002e40| 0d 0d 52 11 d5 23 73 65 | 74 25 2c bd 28 33 32 29 |..R..#se|t%,.(32)|
|00002e50| 3b 0d 0d 5c 0a d9 23 73 | 65 74 25 0d 0d 61 0c 73 |;..\..#s|et%..a.s|
|00002e60| 66 69 6c 65 25 3d a3 0d | 0d 66 05 e1 0d 0d 70 05 |file%=..|.f....p.|
|00002e70| 3a 0d 0d 7a 18 dd 20 f2 | 63 6f 6e 66 70 72 65 73 |:..z.. .|confpres|
|00002e80| 73 65 64 28 62 75 74 25 | 29 0d 0d 84 0d c8 8e 20 |sed(but%|)...... |
|00002e90| 62 75 74 25 20 ca 0d 0d | 8e 43 20 c9 20 31 36 3a |but% ...|.C . 16:|
|00002ea0| f2 67 65 74 73 65 74 74 | 69 6e 67 73 3a 21 62 6c |.getsett|ings:!bl|
|00002eb0| 6f 63 6b 25 3d 63 6f 6e | 66 69 67 25 3a c8 99 22 |ock%=con|fig%:.."|
|00002ec0| 57 69 6d 70 5f 43 6c 6f | 73 65 57 69 6e 64 6f 77 |Wimp_Clo|seWindow|
|00002ed0| 22 2c 2c 62 6c 6f 63 6b | 25 0d 0d 98 36 20 c9 20 |",,block|%...6 . |
|00002ee0| 31 37 3a 21 62 6c 6f 63 | 6b 25 3d 63 6f 6e 66 69 |17:!bloc|k%=confi|
|00002ef0| 67 25 3a c8 99 22 57 69 | 6d 70 5f 43 6c 6f 73 65 |g%:.."Wi|mp_Close|
|00002f00| 57 69 6e 64 6f 77 22 2c | 2c 62 6c 6f 63 6b 25 0d |Window",|,block%.|
|00002f10| 0d a2 51 20 c9 20 31 38 | 3a f2 67 65 74 73 65 74 |..Q . 18|:.getset|
|00002f20| 74 69 6e 67 73 3a f2 73 | 61 76 65 73 65 74 74 69 |tings:.s|avesetti|
|00002f30| 6e 67 73 3a 21 62 6c 6f | 63 6b 25 3d 63 6f 6e 66 |ngs:!blo|ck%=conf|
|00002f40| 69 67 25 3a c8 99 22 57 | 69 6d 70 5f 43 6c 6f 73 |ig%:.."W|imp_Clos|
|00002f50| 65 57 69 6e 64 6f 77 22 | 2c 2c 62 6c 6f 63 6b 25 |eWindow"|,,block%|
|00002f60| 0d 0d ac 05 cb 0d 0d b6 | 05 e1 0d 0d c0 05 3a 0d |........|......:.|
|00002f70| 0d ca 0e dd 20 f2 65 6e | 63 73 61 76 65 0d 0d c5 |.... .en|csave...|
|00002f80| 62 e7 20 bb a4 57 69 6d | 70 5f 47 65 74 54 65 78 |b. ..Wim|p_GetTex|
|00002f90| 74 46 72 6f 6d 49 63 6f | 6e 28 65 6e 63 6f 64 65 |tFromIco|n(encode|
|00002fa0| 25 2c 31 29 3c 31 20 f2 | 57 69 6d 70 5f 50 75 74 |%,1)<1 .|Wimp_Put|
|00002fb0| 54 65 78 74 49 6e 49 63 | 6f 6e 28 65 6e 63 6f 64 |TextInIc|on(encod|
|00002fc0| 65 25 2c 33 2c 22 4e 75 | 6d 62 65 72 20 6e 6f 74 |e%,3,"Nu|mber not|
|00002fd0| 20 76 61 6c 69 64 22 29 | 3a e5 20 8d 54 6e 4e 0d | valid")|:. .TnN.|
|00002fe0| 0d d4 10 e7 20 73 61 76 | 65 62 6f 78 25 20 8c 0d |.... sav|ebox% ..|
|00002ff0| 0d de 2a 20 f2 57 69 6d | 70 5f 50 75 74 54 65 78 |..* .Wim|p_PutTex|
|00003000| 74 49 6e 49 63 6f 6e 28 | 73 61 76 65 25 2c 31 2c |tInIcon(|save%,1,|
|00003010| 65 6e 63 66 69 6c 65 24 | 29 0d 0d e3 26 20 f2 73 |encfile$|)...& .s|
|00003020| 65 74 69 63 6f 6e 74 65 | 78 74 28 73 61 76 65 25 |eticonte|xt(save%|
|00003030| 2c 30 2c 22 53 66 69 6c | 65 5f 38 36 34 22 29 0d |,0,"Sfil|e_864").|
|00003040| 0d e8 12 20 21 62 6c 6f | 63 6b 25 3d 73 61 76 65 |... !blo|ck%=save|
|00003050| 25 0d 0d f2 24 20 c8 99 | 22 57 69 6d 70 5f 47 65 |%...$ ..|"Wimp_Ge|
|00003060| 74 57 69 6e 64 6f 77 53 | 74 61 74 65 22 2c 2c 62 |tWindowS|tate",,b|
|00003070| 6c 6f 63 6b 25 0d 0d fc | 20 20 c8 99 22 57 69 6d |lock%...| .."Wim|
|00003080| 70 5f 4f 70 65 6e 57 69 | 6e 64 6f 77 22 2c 2c 62 |p_OpenWi|ndow",,b|
|00003090| 6c 6f 63 6b 25 0d 0e 06 | 27 20 f2 57 69 6d 70 5f |lock%...|' .Wimp_|
|000030a0| 49 63 6f 6e 43 61 72 65 | 74 28 73 61 76 65 25 2c |IconCare|t(save%,|
|000030b0| 31 2c a9 65 6e 63 66 69 | 6c 65 24 29 0d 0e 10 05 |1,.encfi|le$)....|
|000030c0| cc 0d 0e 1a 0f 20 f2 44 | 6f 53 61 76 65 28 32 29 |..... .D|oSave(2)|
|000030d0| 0d 0e 24 05 cd 0d 0e 2e | 05 e1 0d 0e 38 05 3a 0d |..$.....|....8.:.|
|000030e0| 0f a0 0e dd 20 f2 64 65 | 63 73 61 76 65 0d 0f a5 |.... .de|csave...|
|000030f0| 62 e7 20 bb a4 57 69 6d | 70 5f 47 65 74 54 65 78 |b. ..Wim|p_GetTex|
|00003100| 74 46 72 6f 6d 49 63 6f | 6e 28 64 65 63 6f 64 65 |tFromIco|n(decode|
|00003110| 25 2c 31 29 3c 31 20 f2 | 57 69 6d 70 5f 50 75 74 |%,1)<1 .|Wimp_Put|
|00003120| 54 65 78 74 49 6e 49 63 | 6f 6e 28 64 65 63 6f 64 |TextInIc|on(decod|
|00003130| 65 25 2c 33 2c 22 4e 75 | 6d 62 65 72 20 6e 6f 74 |e%,3,"Nu|mber not|
|00003140| 20 76 61 6c 69 64 22 29 | 3a e5 20 8d 54 44 50 0d | valid")|:. .TDP.|
|00003150| 0f aa 10 e7 20 73 61 76 | 65 62 6f 78 25 20 8c 0d |.... sav|ebox% ..|
|00003160| 0f ab 67 20 6f 66 69 6c | 65 25 3d b9 3a 66 69 6c |..g ofil|e%=.:fil|
|00003170| 65 25 3d 8e 20 69 6e 66 | 69 6c 65 24 3a cf 23 66 |e%=. inf|ile$:.#f|
|00003180| 69 6c 65 25 3d 33 3a f5 | 3a 74 65 6d 70 24 3d bd |ile%=3:.|:temp$=.|
|00003190| 28 9a 23 66 69 6c 65 25 | 29 3a e7 20 97 28 74 65 |(.#file%|):. .(te|
|000031a0| 6d 70 24 29 3c 3e 31 20 | 74 79 70 65 24 3d 74 79 |mp$)<>1 |type$=ty|
|000031b0| 70 65 24 2b 74 65 6d 70 | 24 3a fd 20 97 28 74 65 |pe$+temp|$:. .(te|
|000031c0| 6d 70 24 29 3d 31 0d 0f | ac 15 20 d9 23 66 69 6c |mp$)=1..|.. .#fil|
|000031d0| 65 25 3a 6f 66 69 6c 65 | 25 3d a3 0d 0f ad 11 20 |e%:ofile|%=..... |
|000031e0| 74 65 6d 70 25 3d bb 74 | 79 70 65 24 0d 0f ae 0d |temp%=.t|ype$....|
|000031f0| 20 74 79 70 65 24 3d 22 | 22 0d 0f b3 34 20 f2 73 | type$="|"...4 .s|
|00003200| 65 74 69 63 6f 6e 74 65 | 78 74 28 73 61 76 65 25 |eticonte|xt(save%|
|00003210| 2c 30 2c 22 53 66 69 6c | 65 5f 22 2b c2 22 30 30 |,0,"Sfil|e_"+."00|
|00003220| 22 2b c3 7e 74 65 6d 70 | 25 2c 33 29 29 0d 0f b4 |"+.~temp|%,3))...|
|00003230| 2a 20 f2 57 69 6d 70 5f | 50 75 74 54 65 78 74 49 |* .Wimp_|PutTextI|
|00003240| 6e 49 63 6f 6e 28 73 61 | 76 65 25 2c 31 2c 64 65 |nIcon(sa|ve%,1,de|
|00003250| 63 66 69 6c 65 24 29 0d | 0f be 12 20 21 62 6c 6f |cfile$).|... !blo|
|00003260| 63 6b 25 3d 73 61 76 65 | 25 0d 0f c8 24 20 c8 99 |ck%=save|%...$ ..|
|00003270| 22 57 69 6d 70 5f 47 65 | 74 57 69 6e 64 6f 77 53 |"Wimp_Ge|tWindowS|
|00003280| 74 61 74 65 22 2c 2c 62 | 6c 6f 63 6b 25 0d 0f d2 |tate",,b|lock%...|
|00003290| 20 20 c8 99 22 57 69 6d | 70 5f 4f 70 65 6e 57 69 | .."Wim|p_OpenWi|
|000032a0| 6e 64 6f 77 22 2c 2c 62 | 6c 6f 63 6b 25 0d 0f dc |ndow",,b|lock%...|
|000032b0| 27 20 f2 57 69 6d 70 5f | 49 63 6f 6e 43 61 72 65 |' .Wimp_|IconCare|
|000032c0| 74 28 73 61 76 65 25 2c | 31 2c a9 64 65 63 66 69 |t(save%,|1,.decfi|
|000032d0| 6c 65 24 29 0d 0f e6 05 | cc 0d 0f f0 20 20 28 62 |le$)....|.... (b|
|000032e0| 6c 6f 63 6b 25 21 38 20 | 80 20 34 29 3d b9 3a f2 |lock%!8 |. 4)=.:.|
|000032f0| 44 6f 53 61 76 65 28 32 | 29 0d 0f fa 05 cd 0d 10 |DoSave(2|).......|
|00003300| 04 05 e1 0d 10 0e 05 3a | 0d 10 18 2a dd 20 f2 73 |.......:|...*. .s|
|00003310| 65 74 69 63 6f 6e 74 65 | 78 74 28 21 62 6c 6f 63 |eticonte|xt(!bloc|
|00003320| 6b 25 2c 62 6c 6f 63 6b | 25 21 34 2c 74 65 78 74 |k%,block|%!4,text|
|00003330| 24 29 0d 10 22 21 c8 99 | 22 57 69 6d 70 5f 47 65 |$).."!..|"Wimp_Ge|
|00003340| 74 49 63 6f 6e 53 74 61 | 74 65 22 2c 2c 62 6c 6f |tIconSta|te",,blo|
|00003350| 63 6b 25 0d 10 2c 1d 74 | 65 78 74 24 3d c0 74 65 |ck%..,.t|ext$=.te|
|00003360| 78 74 24 2c 62 6c 6f 63 | 6b 25 21 33 36 2d 31 29 |xt$,bloc|k%!36-1)|
|00003370| 0d 10 31 30 f4 20 50 52 | 4f 43 57 69 6d 70 5f 41 |..10. PR|OCWimp_A|
|00003380| 6c 65 72 74 42 6f 78 28 | 22 44 65 62 75 67 20 6d |lertBox(|"Debug m|
|00003390| 65 73 73 61 67 65 22 2c | 74 65 78 74 24 2c 30 29 |essage",|text$,0)|
|000033a0| 0d 10 36 1b e7 20 24 28 | 62 6c 6f 63 6b 25 21 33 |..6.. $(|block%!3|
|000033b0| 32 29 3c 3e 74 65 78 74 | 24 20 8c 0d 10 40 16 24 |2)<>text|$ ...@.$|
|000033c0| 28 62 6c 6f 63 6b 25 21 | 33 32 29 3d 74 65 78 74 |(block%!|32)=text|
|000033d0| 24 0d 10 4a 0e 62 6c 6f | 63 6b 25 21 38 3d 30 0d |$..J.blo|ck%!8=0.|
|000033e0| 10 54 0f 62 6c 6f 63 6b | 25 21 31 32 3d 30 0d 10 |.T.block|%!12=0..|
|000033f0| 5e 21 c8 99 22 57 69 6d | 70 5f 53 65 74 49 63 6f |^!.."Wim|p_SetIco|
|00003400| 6e 53 74 61 74 65 22 2c | 2c 62 6c 6f 63 6b 25 0d |nState",|,block%.|
|00003410| 10 68 05 cd 0d 10 72 05 | e1 0d 10 7c 05 3a 0d 10 |.h....r.|...|.:..|
|00003420| 86 25 45 46 20 f2 73 65 | 74 77 69 6e 64 6f 77 74 |.%EF .se|twindowt|
|00003430| 69 74 6c 65 28 21 62 6c | 6f 63 6b 25 2c 74 65 78 |itle(!bl|ock%,tex|
|00003440| 74 24 29 0d 10 90 23 c8 | 99 22 57 69 6d 70 5f 47 |t$)...#.|."Wimp_G|
|00003450| 65 74 57 69 6e 64 6f 77 | 53 74 61 74 65 22 2c 2c |etWindow|State",,|
|00003460| 62 6c 6f 63 6b 25 0d 10 | 9a 37 e7 20 28 28 62 6c |block%..|.7. ((bl|
|00003470| 6f 63 6b 25 21 36 30 29 | 80 26 31 30 30 29 3d 30 |ock%!60)|.&100)=0|
|00003480| 20 85 20 31 2c 22 54 69 | 74 6c 65 20 69 73 6e 27 | . 1,"Ti|tle isn'|
|00003490| 74 20 69 6e 64 69 72 65 | 63 74 65 64 22 0d 10 a4 |t indire|cted"...|
|000034a0| 16 24 28 62 6c 6f 63 6b | 25 21 37 36 29 3d 74 65 |.$(block|%!76)=te|
|000034b0| 78 74 24 0d 10 ae 29 c8 | 99 22 57 69 6d 70 5f 55 |xt$...).|."Wimp_U|
|000034c0| 70 64 61 74 65 57 69 6e | 64 6f 77 22 2c 2c 62 6c |pdateWin|dow",,bl|
|000034d0| 6f 63 6b 25 20 b8 20 6d | 6f 72 65 25 0d 10 b8 05 |ock% . m|ore%....|
|000034e0| e1 0d 4e 20 37 dc 20 46 | 69 6c 65 53 61 66 65 2c |..N 7. F|ileSafe,|
|000034f0| 33 2c 30 2c 69 6e 66 6f | 25 2c 49 6e 66 6f 2c 30 |3,0,info|%,Info,0|
|00003500| 2c 30 2c 43 6f 6e 66 69 | 67 2e 2e 2e 2c 26 38 30 |,0,Confi|g...,&80|
|00003510| 2c 2d 31 2c 51 75 69 74 | 0d ff |,-1,Quit|.. |
+--------+-------------------------+-------------------------+--------+--------+
