home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1990-01-12 | 7.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 10 f4 20 3e 21 | 52 75 6e 49 6d 61 67 65 |..... >!|RunImage|
|00000010| 0d 00 14 1f f2 69 6e 69 | 74 69 61 6c 69 73 65 5f |.....ini|tialise_|
|00000020| 74 61 73 6b 28 22 45 6e | 63 6f 64 65 72 22 29 0d |task("En|coder").|
|00000030| 00 1e 46 ee 20 85 20 64 | 3d a4 65 72 72 6f 72 28 |..F. . d|=.error(|
|00000040| f6 24 2b 22 20 20 28 20 | 49 6e 74 65 72 6e 61 6c |.$+" ( |Internal|
|00000050| 20 65 72 72 6f 72 20 22 | 2b c3 28 9e 29 2b 22 20 | error "|+.(.)+" |
|00000060| 29 22 2c 31 2c 22 45 6e | 63 6f 64 65 72 22 29 3a |)",1,"En|coder"):|
|00000070| f2 71 75 69 74 0d 00 28 | 16 f2 69 6e 73 74 61 6c |.quit..(|..instal|
|00000080| 6c 5f 74 65 6d 70 6c 61 | 74 65 73 0d 00 32 15 f2 |l_templa|tes..2..|
|00000090| 63 72 65 61 74 65 5f 6d | 61 69 6e 5f 6d 65 6e 75 |create_m|ain_menu|
|000000a0| 0d 00 3c 2a 69 63 6f 6e | 25 3d a4 69 6e 73 74 61 |..<*icon|%=.insta|
|000000b0| 6c 6c 5f 6f 6e 5f 69 63 | 6f 6e 5f 62 61 72 28 22 |ll_on_ic|on_bar("|
|000000c0| 21 65 6e 63 6f 64 65 72 | 22 29 0d 00 46 04 0d 00 |!encoder|")..F...|
|000000d0| 50 05 f5 0d 00 5a 04 0d | 00 64 2d 20 20 20 72 65 |P....Z..|.d- re|
|000000e0| 61 73 6f 6e 5f 63 6f 64 | 65 25 3d a4 70 6f 6c 6c |ason_cod|e%=.poll|
|000000f0| 5f 77 69 6d 70 28 20 30 | 20 2c 20 72 65 74 75 72 |_wimp( 0| , retur|
|00000100| 6e 25 20 29 0d 00 6e 04 | 0d 00 78 18 20 20 20 c8 |n% )..n.|..x. .|
|00000110| 8e 20 72 65 61 73 6f 6e | 5f 63 6f 64 65 25 20 ca |. reason|_code% .|
|00000120| 0d 00 82 2e 20 20 20 20 | 20 20 c9 20 32 20 20 20 |.... | . 2 |
|00000130| 20 20 20 20 3a 20 20 f2 | 6f 70 65 6e 5f 77 69 6e | : .|open_win|
|00000140| 64 6f 77 28 20 72 65 74 | 75 72 6e 25 20 29 0d 00 |dow( ret|urn% )..|
|00000150| 8c 2f 20 20 20 20 20 20 | c9 20 33 20 20 20 20 20 |./ |. 3 |
|00000160| 20 20 3a 20 20 f2 63 6c | 6f 73 65 5f 77 69 6e 64 | : .cl|ose_wind|
|00000170| 6f 77 28 20 72 65 74 75 | 72 6e 25 20 29 0d 00 96 |ow( retu|rn% )...|
|00000180| 2f 20 20 20 20 20 20 c9 | 20 36 20 20 20 20 20 20 |/ .| 6 |
|00000190| 20 3a 20 20 f2 6d 6f 75 | 73 65 5f 63 68 61 6e 67 | : .mou|se_chang|
|000001a0| 65 28 20 72 65 74 75 72 | 6e 25 20 29 0d 00 a0 2e |e( retur|n% )....|
|000001b0| 20 20 20 20 20 20 c9 20 | 38 20 20 20 20 20 20 20 | . |8 |
|000001c0| 3a 20 20 f2 6b 65 79 5f | 70 72 65 73 73 65 64 28 |: .key_|pressed(|
|000001d0| 20 72 65 74 75 72 6e 25 | 20 29 0d 00 aa 23 20 20 | return%| )...# |
|000001e0| 20 20 20 20 c9 20 39 20 | 20 20 20 20 20 20 3a 20 | . 9 | : |
|000001f0| 20 f2 6d 65 6e 75 5f 73 | 65 6c 65 63 74 0d 00 b4 | .menu_s|elect...|
|00000200| 2b 20 20 20 20 20 20 c9 | 20 31 37 20 2c 20 31 38 |+ .| 17 , 18|
|00000210| 20 3a 20 20 f2 73 65 65 | 5f 77 68 61 74 5f 77 69 | : .see|_what_wi|
|00000220| 6d 70 5f 77 61 6e 74 73 | 0d 00 be 0b 20 20 20 20 |mp_wants|.... |
|00000230| 20 20 7f 0d 00 c8 08 20 | 20 20 cb 0d 00 d2 04 0d | ..... | ......|
|00000240| 00 dc 07 fd 20 a3 0d 00 | e6 04 0d 00 f0 1d dd f2 |.... ...|........|
|00000250| 6b 65 79 5f 70 72 65 73 | 73 65 64 28 20 70 6f 69 |key_pres|sed( poi|
|00000260| 6e 74 65 72 25 20 29 0d | 00 fa 26 20 20 20 e7 20 |nter% ).|..& . |
|00000270| 65 6e 63 6f 64 65 5f 68 | 61 6e 64 6c 65 25 3d 28 |encode_h|andle%=(|
|00000280| 70 6f 69 6e 74 65 72 25 | 21 30 29 20 8c 0d 01 04 |pointer%|!0) ....|
|00000290| 1e 20 20 20 20 20 20 e7 | 20 28 70 6f 69 6e 74 65 |. .| (pointe|
|000002a0| 72 25 21 32 34 29 3d 31 | 33 20 8c 0d 01 0e 2d 20 |r%!24)=1|3 ....- |
|000002b0| 20 20 20 20 20 20 20 20 | 70 61 73 73 77 6f 72 64 | |password|
|000002c0| 24 3d a4 73 74 72 69 6e | 67 28 74 65 78 74 5f 62 |$=.strin|g(text_b|
|000002d0| 75 66 66 65 72 32 25 29 | 0d 01 18 2e 20 20 20 20 |uffer2%)|.... |
|000002e0| 20 20 20 20 20 f2 65 6e | 63 6f 64 65 5f 66 69 6c | .en|code_fil|
|000002f0| 65 28 66 69 6c 65 6e 61 | 6d 65 24 2c 70 61 73 73 |e(filena|me$,pass|
|00000300| 77 6f 72 64 24 29 0d 01 | 22 0b 20 20 20 20 20 20 |word$)..|". |
|00000310| cd 0d 01 2c 08 20 20 20 | cc 0d 01 36 2c 20 20 20 |...,. |...6, |
|00000320| 20 20 20 c8 99 20 22 57 | 69 6d 70 5f 50 72 6f 63 | .. "W|imp_Proc|
|00000330| 65 73 73 4b 65 79 22 2c | 28 70 6f 69 6e 74 65 72 |essKey",|(pointer|
|00000340| 25 21 32 34 29 0d 01 40 | 08 20 20 20 cd 0d 01 4a |%!24)..@|. ...J|
|00000350| 05 e1 0d 01 54 04 0d 01 | 5e 1f dd f2 6d 6f 75 73 |....T...|^...mous|
|00000360| 65 5f 63 68 61 6e 67 65 | 20 28 20 70 6f 69 6e 74 |e_change| ( point|
|00000370| 65 72 25 20 29 0d 01 68 | 04 0d 01 72 17 20 20 20 |er% )..h|...r. |
|00000380| c8 8e 20 70 6f 69 6e 74 | 65 72 25 21 31 32 20 ca |.. point|er%!12 .|
|00000390| 0d 01 7c 3d 20 20 20 20 | 20 20 c9 20 20 65 6e 63 |..|= | . enc|
|000003a0| 6f 64 65 5f 68 61 6e 64 | 6c 65 25 20 3a 20 20 20 |ode_hand|le% : |
|000003b0| 20 20 f2 65 6e 63 6f 64 | 65 5f 77 69 6e 64 6f 77 | .encod|e_window|
|000003c0| 28 70 6f 69 6e 74 65 72 | 25 21 31 36 29 0d 01 86 |(pointer|%!16)...|
|000003d0| 32 20 20 20 20 20 20 c9 | 20 20 2d 32 20 20 20 20 |2 .| -2 |
|000003e0| 20 20 20 20 20 20 20 20 | 20 3a 20 20 20 20 20 f2 | | : .|
|000003f0| 69 63 6f 6e 5f 62 61 72 | 5f 62 75 74 74 6f 6e 0d |icon_bar|_button.|
|00000400| 01 90 08 20 20 20 7f 0d | 01 9a 08 20 20 20 cb 0d |... ..|... ..|
|00000410| 01 a4 04 0d 01 ae 05 e1 | 0d 01 b8 04 0d 01 c2 1c |........|........|
|00000420| dd f2 65 6e 63 6f 64 65 | 5f 77 69 6e 64 6f 77 28 |..encode|_window(|
|00000430| 68 61 6e 64 6c 65 25 29 | 0d 01 cc 14 20 20 20 e7 |handle%)|.... .|
|00000440| 20 68 61 6e 64 6c 65 25 | 3d 31 20 8c 0d 01 d6 2a | handle%|=1 ....*|
|00000450| 20 20 20 20 20 20 70 61 | 73 73 77 6f 72 64 24 3d | pa|ssword$=|
|00000460| a4 73 74 72 69 6e 67 28 | 74 65 78 74 5f 62 75 66 |.string(|text_buf|
|00000470| 66 65 72 32 25 29 0d 01 | e0 17 20 20 20 20 20 20 |fer2%)..|.. |
|00000480| e7 20 64 69 72 65 63 74 | 6f 72 79 20 8c 0d 01 ea |. direct|ory ....|
|00000490| 33 20 20 20 20 20 20 20 | 20 20 f2 65 6e 63 6f 64 |3 | .encod|
|000004a0| 65 5f 64 69 72 65 63 74 | 6f 72 79 28 66 69 6c 65 |e_direct|ory(file|
|000004b0| 6e 61 6d 65 24 2c 70 61 | 73 73 77 6f 72 64 24 29 |name$,pa|ssword$)|
|000004c0| 0d 01 f4 0b 20 20 20 20 | 20 20 cc 0d 01 fe 2e 20 |.... | ..... |
|000004d0| 20 20 20 20 20 20 20 20 | f2 65 6e 63 6f 64 65 5f | |.encode_|
|000004e0| 66 69 6c 65 28 66 69 6c | 65 6e 61 6d 65 24 2c 70 |file(fil|ename$,p|
|000004f0| 61 73 73 77 6f 72 64 24 | 29 0d 02 08 0b 20 20 20 |assword$|).... |
|00000500| 20 20 20 cd 0d 02 12 08 | 20 20 20 cd 0d 02 1c 05 | .....| .....|
|00000510| e1 0d 02 26 04 0d 02 30 | 22 dd f2 65 6e 63 6f 64 |...&...0|"..encod|
|00000520| 65 5f 66 69 6c 65 28 6e | 61 6d 65 24 2c 70 61 73 |e_file(n|ame$,pas|
|00000530| 73 77 6f 72 64 24 29 0d | 02 3a 33 20 20 20 ea 20 |sword$).|.:3 . |
|00000540| 6b 65 79 25 2c 6c 6f 6f | 70 25 2c 74 79 70 65 25 |key%,loo|p%,type%|
|00000550| 2c 6c 6f 61 64 25 2c 65 | 78 65 63 25 2c 6c 65 6e |,load%,e|xec%,len|
|00000560| 25 2c 61 74 74 72 25 2c | 61 25 0d 02 44 04 0d 02 |%,attr%,|a%..D...|
|00000570| 4e 17 20 20 20 e7 20 70 | 61 73 73 77 6f 72 64 24 |N. . p|assword$|
|00000580| 3d 22 22 20 8c 0d 02 58 | 3b 20 20 20 20 20 20 64 |="" ...X|; d|
|00000590| 75 6d 6d 79 25 3d a4 65 | 72 72 6f 72 28 22 4e 6f |ummy%=.e|rror("No|
|000005a0| 20 70 61 73 73 77 6f 72 | 64 20 70 72 65 73 65 6e | passwor|d presen|
|000005b0| 74 21 22 2c 31 2c 22 45 | 6e 63 6f 64 65 72 22 29 |t!",1,"E|ncoder")|
|000005c0| 0d 02 62 08 20 20 20 cc | 0d 02 6c 22 20 20 20 20 |..b. .|..l" |
|000005d0| 20 20 e3 20 6c 6f 6f 70 | 25 3d 31 20 b8 20 a9 28 | . loop|%=1 . .(|
|000005e0| 70 61 73 73 77 6f 72 64 | 24 29 0d 02 76 3d 20 20 |password|$)..v= |
|000005f0| 20 20 20 20 20 20 20 6b | 65 79 25 3d 28 28 97 28 | k|ey%=((.(|
|00000600| c1 70 61 73 73 77 6f 72 | 64 24 2c 6c 6f 6f 70 25 |.passwor|d$,loop%|
|00000610| 2c 31 29 29 2a 6c 6f 6f | 70 25 29 2b 6b 65 79 25 |,1))*loo|p%)+key%|
|00000620| 29 20 83 20 32 35 36 0d | 02 80 11 20 20 20 20 20 |) . 256.|... |
|00000630| 20 ed 20 6c 6f 6f 70 25 | 0d 02 8a 3e 20 20 20 20 | . loop%|...> |
|00000640| 20 20 c8 99 20 22 4f 53 | 5f 46 69 6c 65 22 2c 35 | .. "OS|_File",5|
|00000650| 2c 6e 61 6d 65 24 20 b8 | 20 74 79 70 65 25 2c 2c |,name$ .| type%,,|
|00000660| 6c 6f 61 64 25 2c 65 78 | 65 63 25 2c 6c 65 6e 25 |load%,ex|ec%,len%|
|00000670| 2c 61 74 74 72 25 0d 02 | 94 15 20 20 20 20 20 20 |,attr%..|.. |
|00000680| e7 20 74 79 70 65 25 3d | 31 20 8c 0d 02 9e 19 20 |. type%=|1 ..... |
|00000690| 20 20 20 20 20 20 20 20 | 69 6e 25 3d 8e 28 6e 61 | |in%=.(na|
|000006a0| 6d 65 24 29 0d 02 a8 2a | 20 20 20 20 20 20 20 20 |me$)...*| |
|000006b0| 20 6f 75 74 25 3d ae 28 | 22 3c 65 6e 63 6f 64 65 | out%=.(|"<encode|
|000006c0| 72 24 44 69 72 3e 2e 53 | 63 72 61 70 22 29 0d 02 |r$Dir>.S|crap")..|
|000006d0| b2 43 20 20 20 20 20 20 | 20 20 20 f1 20 23 6f 75 |.C | . #ou|
|000006e0| 74 25 2c 6b 65 79 25 2c | a9 28 70 61 73 73 77 6f |t%,key%,|.(passwo|
|000006f0| 72 64 24 29 2c 74 79 70 | 65 25 2c 6c 6f 61 64 25 |rd$),typ|e%,load%|
|00000700| 2c 65 78 65 63 25 2c 6c | 65 6e 25 2c 61 74 74 72 |,exec%,l|en%,attr|
|00000710| 25 0d 02 bc 18 20 20 20 | 20 20 20 20 20 20 c8 95 |%.... | ..|
|00000720| 20 ac 28 c5 23 69 6e 25 | 29 0d 02 c6 18 20 20 20 | .(.#in%|).... |
|00000730| 20 20 20 20 20 20 20 20 | 20 61 25 3d 9a 23 69 6e | | a%=.#in|
|00000740| 25 0d 02 d0 22 20 20 20 | 20 20 20 20 20 20 20 20 |%..." | |
|00000750| 20 d5 23 6f 75 74 25 2c | 28 61 25 20 82 20 6b 65 | .#out%,|(a% . ke|
|00000760| 79 25 29 0d 02 da 0e 20 | 20 20 20 20 20 20 20 20 |y%).... | |
|00000770| ce 0d 02 e4 14 20 20 20 | 20 20 20 20 20 20 d9 20 |..... | . |
|00000780| 23 6f 75 74 25 0d 02 ee | 13 20 20 20 20 20 20 20 |#out%...|. |
|00000790| 20 20 d9 20 23 69 6e 25 | 0d 02 f8 1f 20 20 20 20 | . #in%|.... |
|000007a0| 20 20 20 20 20 ff 28 22 | 52 45 4d 4f 56 45 20 22 | .("|REMOVE "|
|000007b0| 2b 6e 61 6d 65 24 29 0d | 03 02 31 20 20 20 20 20 |+name$).|..1 |
|000007c0| 20 20 20 20 ff 28 22 53 | 45 54 54 59 50 45 20 3c | .("S|ETTYPE <|
|000007d0| 65 6e 63 6f 64 65 72 24 | 44 69 72 3e 2e 53 63 72 |encoder$|Dir>.Scr|
|000007e0| 61 70 20 31 30 30 22 29 | 0d 03 0c 3c 20 20 20 20 |ap 100")|...< |
|000007f0| 20 20 20 20 20 ff 28 22 | 43 4f 50 59 20 3c 65 6e | .("|COPY <en|
|00000800| 63 6f 64 65 72 24 44 69 | 72 3e 2e 53 63 72 61 70 |coder$Di|r>.Scrap|
|00000810| 20 22 2b 6e 61 6d 65 24 | 2b 22 20 44 20 7e 56 20 | "+name$|+" D ~V |
|00000820| 7e 43 22 29 0d 03 16 0b | 20 20 20 20 20 20 cd 0d |~C")....| ..|
|00000830| 03 20 08 20 20 20 cd 0d | 03 2a 04 0d 03 34 1e 20 |. . ..|.*...4. |
|00000840| 20 20 62 6c 6f 63 6b 25 | 21 30 3d 65 6e 63 6f 64 | block%|!0=encod|
|00000850| 65 5f 68 61 6e 64 6c 65 | 25 0d 03 3e 24 20 20 20 |e_handle|%..>$ |
|00000860| c8 99 20 22 57 69 6d 70 | 5f 43 6c 6f 73 65 57 69 |.. "Wimp|_CloseWi|
|00000870| 6e 64 6f 77 22 2c 2c 62 | 6c 6f 63 6b 25 0d 03 48 |ndow",,b|lock%..H|
|00000880| 04 0d 03 52 05 e1 0d 03 | 5c 04 0d 03 66 27 dd f2 |...R....|\...f'..|
|00000890| 65 6e 63 6f 64 65 5f 64 | 69 72 65 63 74 6f 72 79 |encode_d|irectory|
|000008a0| 28 6e 61 6d 65 24 2c 70 | 61 73 73 77 6f 72 64 24 |(name$,p|assword$|
|000008b0| 29 0d 03 70 39 20 20 20 | f2 70 72 6f 63 65 73 73 |)..p9 |.process|
|000008c0| 5f 74 72 65 65 28 64 69 | 72 65 63 74 6f 72 79 5f |_tree(di|rectory_|
|000008d0| 62 75 66 66 65 72 25 2c | 6e 61 6d 65 24 2c 30 2c |buffer%,|name$,0,|
|000008e0| 70 61 73 73 77 6f 72 64 | 24 29 0d 03 7a 05 e1 0d |password|$)..z...|
|000008f0| 03 84 04 0d 03 8e 24 dd | 20 f2 69 6e 69 74 69 61 |......$.| .initia|
|00000900| 6c 69 73 65 5f 74 61 73 | 6b 20 28 20 74 61 73 6b |lise_tas|k ( task|
|00000910| 6e 61 6d 65 24 20 29 0d | 03 98 04 0d 03 a2 12 20 |name$ ).|....... |
|00000920| 20 20 de 20 74 61 73 6b | 69 64 25 20 34 0d 03 ac | . task|id% 4...|
|00000930| 16 20 20 20 24 74 61 73 | 6b 69 64 25 3d 22 54 41 |. $tas|kid%="TA|
|00000940| 53 4b 22 0d 03 b6 14 20 | 20 20 de 20 72 65 74 75 |SK".... | . retu|
|00000950| 72 6e 25 20 32 35 36 0d | 03 c0 3d 20 20 20 c8 99 |rn% 256.|..= ..|
|00000960| 20 22 57 69 6d 70 5f 49 | 6e 69 74 69 61 6c 69 73 | "Wimp_I|nitialis|
|00000970| 65 22 2c 32 30 30 2c 21 | 74 61 73 6b 69 64 25 2c |e",200,!|taskid%,|
|00000980| 74 61 73 6b 6e 61 6d 65 | 24 20 b8 20 76 65 72 73 |taskname|$ . vers|
|00000990| 69 6f 6e 25 0d 03 ca 04 | 0d 03 d4 93 20 20 20 de |ion%....|.... .|
|000009a0| 20 65 6e 63 6f 64 65 5f | 77 69 6e 64 6f 77 5f 62 | encode_|window_b|
|000009b0| 75 66 66 65 72 25 20 35 | 30 30 2c 69 6e 66 6f 5f |uffer% 5|00,info_|
|000009c0| 77 69 6e 64 6f 77 5f 62 | 75 66 66 65 72 25 20 35 |window_b|uffer% 5|
|000009d0| 30 30 2c 74 65 78 74 5f | 62 75 66 66 65 72 31 25 |00,text_|buffer1%|
|000009e0| 20 35 30 30 2c 74 65 78 | 74 5f 62 75 66 66 65 72 | 500,tex|t_buffer|
|000009f0| 32 25 20 35 30 30 2c 62 | 6c 6f 63 6b 25 20 35 30 |2% 500,b|lock% 50|
|00000a00| 30 2c 6d 65 6e 75 25 20 | 35 30 30 2c 74 65 78 74 |0,menu% |500,text|
|00000a10| 25 20 35 30 30 2c 64 69 | 72 65 63 74 6f 72 79 5f |% 500,di|rectory_|
|00000a20| 62 75 66 66 65 72 25 20 | 32 35 36 0d 03 de 04 0d |buffer% |256.....|
|00000a30| 03 e8 05 e1 0d 03 f2 04 | 0d 03 fc 17 dd f2 69 6e |........|......in|
|00000a40| 73 74 61 6c 6c 5f 74 65 | 6d 70 6c 61 74 65 73 0d |stall_te|mplates.|
|00000a50| 04 06 35 20 20 20 c8 99 | 20 22 57 69 6d 70 5f 4f |..5 ..| "Wimp_O|
|00000a60| 70 65 6e 54 65 6d 70 6c | 61 74 65 22 2c 2c 22 3c |penTempl|ate",,"<|
|00000a70| 4f 62 65 79 24 44 69 72 | 3e 2e 54 65 6d 70 6c 61 |Obey$Dir|>.Templa|
|00000a80| 74 65 73 22 0d 04 10 63 | 20 20 20 c8 99 20 22 57 |tes"...c| .. "W|
|00000a90| 69 6d 70 5f 4c 6f 61 64 | 54 65 6d 70 6c 61 74 65 |imp_Load|Template|
|00000aa0| 22 2c 2c 69 6e 66 6f 5f | 77 69 6e 64 6f 77 5f 62 |",,info_|window_b|
|00000ab0| 75 66 66 65 72 25 2c 74 | 65 78 74 5f 62 75 66 66 |uffer%,t|ext_buff|
|00000ac0| 65 72 31 25 2c 28 74 65 | 78 74 5f 62 75 66 66 65 |er1%,(te|xt_buffe|
|00000ad0| 72 31 25 2b 35 30 30 29 | 2c 2d 31 2c 22 69 6e 66 |r1%+500)|,-1,"inf|
|00000ae0| 6f 62 6f 78 22 2c 30 0d | 04 1a 41 20 20 20 c8 99 |obox",0.|..A ..|
|00000af0| 20 22 57 69 6d 70 5f 43 | 72 65 61 74 65 57 69 6e | "Wimp_C|reateWin|
|00000b00| 64 6f 77 22 2c 2c 69 6e | 66 6f 5f 77 69 6e 64 6f |dow",,in|fo_windo|
|00000b10| 77 5f 62 75 66 66 65 72 | 25 20 b8 20 69 6e 66 6f |w_buffer|% . info|
|00000b20| 5f 68 61 6e 64 6c 65 25 | 0d 04 24 68 20 20 20 c8 |_handle%|..$h .|
|00000b30| 99 20 22 57 69 6d 70 5f | 4c 6f 61 64 54 65 6d 70 |. "Wimp_|LoadTemp|
|00000b40| 6c 61 74 65 22 2c 2c 65 | 6e 63 6f 64 65 5f 77 69 |late",,e|ncode_wi|
|00000b50| 6e 64 6f 77 5f 62 75 66 | 66 65 72 25 2c 74 65 78 |ndow_buf|fer%,tex|
|00000b60| 74 5f 62 75 66 66 65 72 | 32 25 2c 28 74 65 78 74 |t_buffer|2%,(text|
|00000b70| 5f 62 75 66 66 65 72 32 | 25 2b 35 30 30 29 2c 2d |_buffer2|%+500),-|
|00000b80| 31 2c 22 4c 6f 63 6b 57 | 69 6e 64 6f 77 22 2c 30 |1,"LockW|indow",0|
|00000b90| 0d 04 2e 45 20 20 20 c8 | 99 20 22 57 69 6d 70 5f |...E .|. "Wimp_|
|00000ba0| 43 72 65 61 74 65 57 69 | 6e 64 6f 77 22 2c 2c 65 |CreateWi|ndow",,e|
|00000bb0| 6e 63 6f 64 65 5f 77 69 | 6e 64 6f 77 5f 62 75 66 |ncode_wi|ndow_buf|
|00000bc0| 66 65 72 25 20 b8 20 65 | 6e 63 6f 64 65 5f 68 61 |fer% . e|ncode_ha|
|00000bd0| 6e 64 6c 65 25 0d 04 38 | 1e 20 20 20 c8 99 20 22 |ndle%..8|. .. "|
|00000be0| 57 69 6d 70 5f 43 6c 6f | 73 65 54 65 6d 70 6c 61 |Wimp_Clo|seTempla|
|00000bf0| 74 65 22 0d 04 42 05 e1 | 0d 04 4c 04 0d 04 56 1f |te"..B..|..L...V.|
|00000c00| dd 20 f2 6f 70 65 6e 5f | 77 69 6e 64 6f 77 20 28 |. .open_|window (|
|00000c10| 20 70 6f 69 6e 74 65 72 | 25 20 29 0d 04 60 25 20 | pointer|% )..`% |
|00000c20| 20 20 c8 99 20 22 57 69 | 6d 70 5f 4f 70 65 6e 57 | .. "Wi|mp_OpenW|
|00000c30| 69 6e 64 6f 77 22 2c 2c | 70 6f 69 6e 74 65 72 25 |indow",,|pointer%|
|00000c40| 0d 04 6a 05 e1 0d 04 74 | 04 0d 04 7e 20 dd 20 f2 |..j....t|...~ . .|
|00000c50| 63 6c 6f 73 65 5f 77 69 | 6e 64 6f 77 20 28 20 70 |close_wi|ndow ( p|
|00000c60| 6f 69 6e 74 65 72 25 20 | 29 0d 04 88 26 20 20 20 |ointer% |)...& |
|00000c70| c8 99 20 22 57 69 6d 70 | 5f 43 6c 6f 73 65 57 69 |.. "Wimp|_CloseWi|
|00000c80| 6e 64 6f 77 22 2c 2c 70 | 6f 69 6e 74 65 72 25 0d |ndow",,p|ointer%.|
|00000c90| 04 92 05 e1 0d 04 9c 04 | 0d 04 a6 21 dd 20 f2 64 |........|...!. .d|
|00000ca0| 65 6c 65 74 65 5f 77 69 | 6e 64 6f 77 20 28 20 70 |elete_wi|ndow ( p|
|00000cb0| 6f 69 6e 74 65 72 25 20 | 29 0d 04 b0 27 20 20 20 |ointer% |)...' |
|00000cc0| c8 99 20 22 57 69 6d 70 | 5f 44 65 6c 65 74 65 57 |.. "Wimp|_DeleteW|
|00000cd0| 69 6e 64 6f 77 22 2c 2c | 70 6f 69 6e 74 65 72 25 |indow",,|pointer%|
|00000ce0| 0d 04 ba 05 e1 0d 04 c4 | 04 0d 04 ce 23 dd 20 a4 |........|....#. .|
|00000cf0| 70 6f 6c 6c 5f 77 69 6d | 70 20 28 20 6d 61 73 6b |poll_wim|p ( mask|
|00000d00| 25 20 2c 20 72 65 74 75 | 72 6e 20 29 0d 04 d8 15 |% , retu|rn )....|
|00000d10| 20 20 20 ea 20 72 65 61 | 73 6f 6e 5f 63 6f 64 65 | . rea|son_code|
|00000d20| 25 0d 04 e2 35 20 20 20 | c8 99 20 22 57 69 6d 70 |%...5 |.. "Wimp|
|00000d30| 5f 50 6f 6c 6c 22 20 2c | 20 6d 61 73 6b 25 20 2c |_Poll" ,| mask% ,|
|00000d40| 20 72 65 74 75 72 6e 20 | b8 20 72 65 61 73 6f 6e | return |. reason|
|00000d50| 5f 63 6f 64 65 25 0d 04 | ec 12 3d 20 72 65 61 73 |_code%..|..= reas|
|00000d60| 6f 6e 5f 63 6f 64 65 25 | 0d 04 f6 04 0d 05 00 21 |on_code%|.......!|
|00000d70| dd 20 f2 75 70 64 61 74 | 65 5f 77 69 6e 64 6f 77 |. .updat|e_window|
|00000d80| 20 28 20 70 6f 69 6e 74 | 65 72 25 20 29 0d 05 0a | ( point|er% )...|
|00000d90| 27 20 20 20 c8 99 20 22 | 57 69 6d 70 5f 55 70 64 |' .. "|Wimp_Upd|
|00000da0| 61 74 65 57 69 6e 64 6f | 77 22 2c 2c 70 6f 69 6e |ateWindo|w",,poin|
|00000db0| 74 65 72 25 0d 05 14 05 | e1 0d 05 1e 04 0d 05 28 |ter%....|.......(|
|00000dc0| 11 dd 20 f2 63 6c 6f 73 | 65 5f 64 6f 77 6e 0d 05 |.. .clos|e_down..|
|00000dd0| 32 1a 20 20 20 c8 99 20 | 22 57 69 6d 70 5f 43 6c |2. .. |"Wimp_Cl|
|00000de0| 6f 73 65 44 6f 77 6e 22 | 0d 05 3c 05 e1 0d 05 46 |oseDown"|..<....F|
|00000df0| 04 0d 05 50 0a dd f2 71 | 75 69 74 0d 05 5a 12 20 |...P...q|uit..Z. |
|00000e00| 20 20 f2 63 6c 6f 73 65 | 5f 64 6f 77 6e 0d 05 64 | .close|_down..d|
|00000e10| 08 20 20 20 e0 0d 05 6e | 05 e1 0d 05 78 04 0d 05 |. ...n|....x...|
|00000e20| 82 24 dd 20 a4 69 6e 73 | 74 61 6c 6c 5f 6f 6e 5f |.$. .ins|tall_on_|
|00000e30| 69 63 6f 6e 5f 62 61 72 | 20 28 20 6e 61 6d 65 24 |icon_bar| ( name$|
|00000e40| 20 29 0d 05 8c 04 0d 05 | 96 20 20 20 20 de 20 62 | )......|. . b|
|00000e50| 6c 6f 63 6b 25 21 32 34 | 20 28 a9 20 28 6e 61 6d |lock%!24| (. (nam|
|00000e60| 65 24 29 2b 31 29 0d 05 | a0 04 0d 05 aa 18 20 20 |e$)+1)..|...... |
|00000e70| 20 62 6c 6f 63 6b 25 21 | 30 20 20 20 20 20 3d 20 | block%!|0 = |
|00000e80| 2d 32 0d 05 b4 17 20 20 | 20 62 6c 6f 63 6b 25 21 |-2.... | block%!|
|00000e90| 34 20 20 20 20 20 3d 20 | 30 0d 05 be 17 20 20 20 |4 = |0.... |
|00000ea0| 62 6c 6f 63 6b 25 21 38 | 20 20 20 20 20 3d 20 30 |block%!8| = 0|
|00000eb0| 0d 05 c8 18 20 20 20 62 | 6c 6f 63 6b 25 21 31 32 |.... b|lock%!12|
|00000ec0| 20 20 20 20 3d 20 37 30 | 0d 05 d2 18 20 20 20 62 | = 70|.... b|
|00000ed0| 6c 6f 63 6b 25 21 31 36 | 20 20 20 20 3d 20 37 30 |lock%!16| = 70|
|00000ee0| 0d 05 dc 25 20 20 20 62 | 6c 6f 63 6b 25 21 32 30 |...% b|lock%!20|
|00000ef0| 20 20 20 20 3d 20 25 31 | 30 30 30 30 31 30 30 30 | = %1|00001000|
|00000f00| 30 30 30 31 30 0d 05 e6 | 1b 20 20 20 24 28 62 6c |00010...|. $(bl|
|00000f10| 6f 63 6b 25 21 32 34 29 | 20 3d 20 6e 61 6d 65 24 |ock%!24)| = name$|
|00000f20| 0d 05 f0 17 20 20 20 62 | 6c 6f 63 6b 25 21 32 38 |.... b|lock%!28|
|00000f30| 20 20 20 20 3d 20 31 0d | 05 fa 20 20 20 20 62 6c | = 1.|.. bl|
|00000f40| 6f 63 6b 25 21 33 32 20 | 20 20 20 3d 20 a9 28 6e |ock%!32 | = .(n|
|00000f50| 61 6d 65 24 29 2b 31 0d | 06 04 04 0d 06 0e 2b 20 |ame$)+1.|......+ |
|00000f60| 20 20 c8 99 20 22 57 69 | 6d 70 5f 43 72 65 61 74 | .. "Wi|mp_Creat|
|00000f70| 65 49 63 6f 6e 22 2c 2c | 62 6c 6f 63 6b 25 20 b8 |eIcon",,|block% .|
|00000f80| 20 69 63 6f 6e 25 0d 06 | 18 04 0d 06 22 0a 3d 69 | icon%..|....".=i|
|00000f90| 63 6f 6e 25 0d 06 2c 04 | 0d 06 36 1a dd 20 f2 73 |con%..,.|..6.. .s|
|00000fa0| 65 65 5f 77 68 61 74 5f | 77 69 6d 70 5f 77 61 6e |ee_what_|wimp_wan|
|00000fb0| 74 73 0d 06 40 04 0d 06 | 4a 16 20 20 20 c8 8e 20 |ts..@...|J. .. |
|00000fc0| 72 65 74 75 72 6e 25 21 | 31 36 20 ca 0d 06 54 04 |return%!|16 ...T.|
|00000fd0| 0d 06 5e 16 20 20 20 20 | 20 20 c9 20 20 30 20 3a |..^. | . 0 :|
|00000fe0| 20 f2 71 75 69 74 0d 06 | 68 2e 20 20 20 20 20 20 | .quit..|h. |
|00000ff0| c9 20 20 33 20 3a 20 66 | 69 6c 65 6e 61 6d 65 24 |. 3 : f|ilename$|
|00001000| 3d a4 73 74 72 69 6e 67 | 28 72 65 74 75 72 6e 25 |=.string|(return%|
|00001010| 2b 34 34 29 0d 06 72 24 | 20 20 20 20 20 20 20 20 |+44)..r$| |
|00001020| 20 20 20 20 20 20 20 20 | f2 6c 6f 61 64 28 66 69 | |.load(fi|
|00001030| 6c 65 6e 61 6d 65 24 29 | 0d 06 7c 0b 20 20 20 20 |lename$)|..|. |
|00001040| 20 20 7f 0d 06 86 04 0d | 06 90 08 20 20 20 cb 0d | ......|... ..|
|00001050| 06 9a 04 0d 06 a4 05 e1 | 0d 06 ae 04 0d 06 b8 16 |........|........|
|00001060| dd 20 f2 69 63 6f 6e 5f | 62 61 72 5f 62 75 74 74 |. .icon_|bar_butt|
|00001070| 6f 6e 0d 06 c2 04 0d 06 | cc 15 20 20 20 c8 8e 20 |on......|.. .. |
|00001080| 72 65 74 75 72 6e 25 21 | 38 20 ca 0d 06 d6 10 20 |return%!|8 ..... |
|00001090| 20 20 20 20 20 c9 20 34 | 20 20 3a 0d 06 e0 47 20 | . 4| :...G |
|000010a0| 20 20 20 20 20 c9 20 32 | 20 20 3a 20 20 f2 63 72 | . 2| : .cr|
|000010b0| 65 61 74 65 5f 6d 65 6e | 75 20 28 6d 65 6e 75 25 |eate_men|u (menu%|
|000010c0| 20 2c 20 21 72 65 74 75 | 72 6e 25 2d 6d 65 6e 75 | , !retu|rn%-menu|
|000010d0| 25 21 31 36 2f 32 2d 32 | 34 2c 35 36 2b 33 2a 34 |%!16/2-2|4,56+3*4|
|000010e0| 34 29 0d 06 ea 10 20 20 | 20 20 20 20 c9 20 31 20 |4).... | . 1 |
|000010f0| 20 3a 0d 06 f4 08 20 20 | 20 cb 0d 06 fe 04 0d 07 | :.... | .......|
|00001100| 08 05 e1 0d 07 12 04 0d | 07 1c 12 dd 20 f2 6d 65 |........|.... .me|
|00001110| 6e 75 5f 73 65 6c 65 63 | 74 0d 07 26 04 0d 07 30 |nu_selec|t..&...0|
|00001120| 14 20 20 20 c8 8e 20 21 | 72 65 74 75 72 6e 25 20 |. .. !|return% |
|00001130| ca 0d 07 3a 1f 20 20 20 | 20 20 20 c9 20 20 30 20 |...:. | . 0 |
|00001140| 20 3a 20 20 f4 20 27 49 | 6e 66 6f 20 62 6f 78 27 | : . 'I|nfo box'|
|00001150| 0d 07 44 18 20 20 20 20 | 20 20 c9 20 20 31 20 20 |..D. | . 1 |
|00001160| 3a 20 20 f2 71 75 69 74 | 0d 07 4e 0b 20 20 20 20 |: .quit|..N. |
|00001170| 20 20 7f 0d 07 58 08 20 | 20 20 cb 0d 07 62 04 0d | ...X. | ...b..|
|00001180| 07 6c 28 20 20 20 c8 99 | 20 22 57 69 6d 70 5f 47 |.l( ..| "Wimp_G|
|00001190| 65 74 50 6f 69 6e 74 65 | 72 49 6e 66 6f 22 2c 2c |etPointe|rInfo",,|
|000011a0| 72 65 74 75 72 6e 25 0d | 07 76 04 0d 07 80 05 e1 |return%.|.v......|
|000011b0| 0d 07 8a 04 0d 07 94 16 | dd f2 63 72 65 61 74 65 |........|..create|
|000011c0| 5f 6d 61 69 6e 5f 6d 65 | 6e 75 0d 07 9e 04 0d 07 |_main_me|nu......|
|000011d0| a8 1f 20 20 20 24 6d 65 | 6e 75 25 20 20 20 20 20 |.. $me|nu% |
|000011e0| 20 3d 20 20 22 45 6e 63 | 6f 64 65 72 22 0d 07 b2 | = "Enc|oder"...|
|000011f0| 17 20 20 20 6d 65 6e 75 | 25 3f 31 32 20 20 20 20 |. menu|%?12 |
|00001200| 3d 20 20 37 0d 07 bc 17 | 20 20 20 6d 65 6e 75 25 |= 7....| menu%|
|00001210| 3f 31 33 20 20 20 20 3d | 20 20 32 0d 07 c6 17 20 |?13 =| 2.... |
|00001220| 20 20 6d 65 6e 75 25 3f | 31 34 20 20 20 20 3d 20 | menu%?|14 = |
|00001230| 20 37 0d 07 d0 17 20 20 | 20 6d 65 6e 75 25 3f 31 | 7.... | menu%?1|
|00001240| 35 20 20 20 20 3d 20 20 | 30 0d 07 da 1f 20 20 20 |5 = |0.... |
|00001250| 6d 65 6e 75 25 21 31 36 | 20 20 20 20 3d 20 20 28 |menu%!16| = (|
|00001260| 36 2a 31 36 29 2b 31 32 | 0d 07 e4 18 20 20 20 6d |6*16)+12|.... m|
|00001270| 65 6e 75 25 21 32 30 20 | 20 20 20 3d 20 20 34 34 |enu%!20 | = 44|
|00001280| 0d 07 ee 17 20 20 20 6d | 65 6e 75 25 21 32 34 20 |.... m|enu%!24 |
|00001290| 20 20 20 3d 20 20 30 0d | 07 f8 17 20 20 20 6d 65 | = 0.|... me|
|000012a0| 6e 75 25 21 32 38 20 20 | 20 20 3d 20 20 30 0d 08 |nu%!28 | = 0..|
|000012b0| 02 22 20 20 20 6d 65 6e | 75 25 21 33 32 20 20 20 |." men|u%!32 |
|000012c0| 20 3d 20 20 69 6e 66 6f | 5f 68 61 6e 64 6c 65 25 | = info|_handle%|
|000012d0| 0d 08 0c 1e 20 20 20 6d | 65 6e 75 25 21 33 36 20 |.... m|enu%!36 |
|000012e0| 20 20 20 3d 20 20 26 37 | 30 30 30 30 30 31 0d 08 | = &7|000001..|
|000012f0| 16 1e 20 20 20 24 28 6d | 65 6e 75 25 2b 34 30 29 |.. $(m|enu%+40)|
|00001300| 20 3d 20 20 22 20 49 6e | 66 6f 20 22 0d 08 20 19 | = " In|fo ".. .|
|00001310| 20 20 20 6d 65 6e 75 25 | 21 35 32 20 20 20 20 3d | menu%|!52 =|
|00001320| 20 20 26 38 30 0d 08 2a | 18 20 20 20 6d 65 6e 75 | &80..*|. menu|
|00001330| 25 21 35 36 20 20 20 20 | 3d 20 20 2d 31 0d 08 34 |%!56 |= -1..4|
|00001340| 1e 20 20 20 6d 65 6e 75 | 25 21 36 30 20 20 20 20 |. menu|%!60 |
|00001350| 3d 20 20 26 37 30 30 30 | 30 30 31 0d 08 3e 1e 20 |= &7000|001..>. |
|00001360| 20 20 24 28 6d 65 6e 75 | 25 2b 36 34 29 20 3d 20 | $(menu|%+64) = |
|00001370| 20 22 20 51 75 69 74 20 | 22 0d 08 48 04 0d 08 52 | " Quit |"..H...R|
|00001380| 05 e1 0d 08 5c 04 0d 08 | 66 31 dd 20 f2 63 72 65 |....\...|f1. .cre|
|00001390| 61 74 65 5f 6d 65 6e 75 | 20 28 20 70 6f 69 6e 74 |ate_menu| ( point|
|000013a0| 65 72 25 20 2c 20 78 5f | 70 6f 73 25 20 2c 20 79 |er% , x_|pos% , y|
|000013b0| 5f 70 6f 73 25 20 29 0d | 08 70 04 0d 08 7a 37 20 |_pos% ).|.p...z7 |
|000013c0| 20 20 c8 99 20 22 57 69 | 6d 70 5f 43 72 65 61 74 | .. "Wi|mp_Creat|
|000013d0| 65 4d 65 6e 75 22 2c 2c | 70 6f 69 6e 74 65 72 25 |eMenu",,|pointer%|
|000013e0| 20 2c 20 78 5f 70 6f 73 | 25 20 2c 20 79 5f 70 6f | , x_pos|% , y_po|
|000013f0| 73 25 0d 08 84 04 0d 08 | 8e 05 e1 0d 08 98 04 0d |s%......|........|
|00001400| 08 a2 16 dd a4 73 74 72 | 69 6e 67 28 61 64 64 72 |.....str|ing(addr|
|00001410| 65 73 73 25 29 0d 08 ac | 04 0d 08 b6 0b 20 20 20 |ess%)...|..... |
|00001420| ea 20 73 24 0d 08 c0 04 | 0d 08 ca 0c 20 20 20 73 |. s$....|.... s|
|00001430| 24 3d 22 22 0d 08 d4 04 | 0d 08 de 32 20 20 20 c8 |$=""....|...2 .|
|00001440| 95 20 3f 61 64 64 72 65 | 73 73 25 3c 3e 30 20 80 |. ?addre|ss%<>0 .|
|00001450| 20 3f 61 64 64 72 65 73 | 73 25 3c 3e 31 33 20 80 | ?addres|s%<>13 .|
|00001460| 20 a9 28 73 24 29 3c 32 | 35 30 0d 08 e8 04 0d 08 | .(s$)<2|50......|
|00001470| f2 1a 20 20 20 20 20 20 | 73 24 2b 3d bd 28 3f 61 |.. |s$+=.(?a|
|00001480| 64 64 72 65 73 73 25 29 | 0d 08 fc 15 20 20 20 20 |ddress%)|.... |
|00001490| 20 20 61 64 64 72 65 73 | 73 25 2b 3d 31 0d 09 06 | addres|s%+=1...|
|000014a0| 04 0d 09 10 08 20 20 20 | ce 0d 09 1a 04 0d 09 24 |..... |.......$|
|000014b0| 07 3d 73 24 0d 09 2e 04 | 0d 09 38 21 dd a4 65 72 |.=s$....|..8!..er|
|000014c0| 72 6f 72 28 45 72 72 6f | 72 24 2c 46 6c 61 67 73 |ror(Erro|r$,Flags|
|000014d0| 25 2c 54 69 74 6c 65 24 | 29 0d 09 42 04 0d 09 4c |%,Title$|)..B...L|
|000014e0| 0f 20 20 20 ea 20 63 6c | 69 63 6b 25 0d 09 56 10 |. . cl|ick%..V.|
|000014f0| 20 20 20 21 62 6c 6f 63 | 6b 25 3d 30 0d 09 60 1e | !bloc|k%=0..`.|
|00001500| 20 20 20 24 28 62 6c 6f | 63 6b 25 2b 34 29 3d 45 | $(blo|ck%+4)=E|
|00001510| 72 72 6f 72 24 2b bd 28 | 30 29 0d 09 6a 3a 20 20 |rror$+.(|0)..j: |
|00001520| 20 c8 99 22 57 69 6d 70 | 5f 52 65 70 6f 72 74 45 | .."Wimp|_ReportE|
|00001530| 72 72 6f 72 22 2c 62 6c | 6f 63 6b 25 2c 46 6c 61 |rror",bl|ock%,Fla|
|00001540| 67 73 25 2c 54 69 74 6c | 65 24 20 b8 20 2c 63 6c |gs%,Titl|e$ . ,cl|
|00001550| 69 63 6b 25 0d 09 74 04 | 0d 09 7e 0b 3d 63 6c 69 |ick%..t.|..~.=cli|
|00001560| 63 6b 25 0d 09 88 04 0d | 09 92 15 dd f2 6c 6f 61 |ck%.....|.....loa|
|00001570| 64 28 66 69 6c 65 6e 61 | 6d 65 24 29 0d 09 9c 04 |d(filena|me$)....|
|00001580| 0d 09 a6 14 20 20 20 ea | 20 6c 6f 61 64 25 2c 74 |.... .| load%,t|
|00001590| 79 70 65 25 0d 09 b0 12 | 20 20 20 64 69 72 65 63 |ype%....| direc|
|000015a0| 74 6f 72 79 3d a3 0d 09 | ba 2e 20 20 20 c8 99 20 |tory=...|.. .. |
|000015b0| 22 4f 53 5f 46 69 6c 65 | 22 2c 35 2c 66 69 6c 65 |"OS_File|",5,file|
|000015c0| 6e 61 6d 65 24 20 b8 20 | 74 79 70 65 25 2c 2c 6c |name$ . |type%,,l|
|000015d0| 6f 61 64 25 0d 09 c4 23 | 20 20 20 66 69 6c 65 74 |oad%...#| filet|
|000015e0| 79 70 65 25 3d 28 6c 6f | 61 64 25 3e 3e 3e 38 29 |ype%=(lo|ad%>>>8)|
|000015f0| 20 80 20 26 46 46 46 0d | 09 ce 66 20 20 20 e7 20 | . &FFF.|..f . |
|00001600| 66 69 6c 65 74 79 70 65 | 25 3d 26 31 30 30 20 8c |filetype|%=&100 .|
|00001610| 20 64 75 6d 6d 79 25 3d | a4 65 72 72 6f 72 28 22 | dummy%=|.error("|
|00001620| 45 6e 63 6f 64 69 6e 67 | 20 61 20 70 72 65 76 69 |Encoding| a previ|
|00001630| 6f 75 73 6c 79 20 65 6e | 63 6f 64 65 64 20 66 69 |ously en|coded fi|
|00001640| 6c 65 20 69 73 20 73 69 | 6c 6c 79 20 21 22 2c 31 |le is si|lly !",1|
|00001650| 2c 22 45 6e 63 6f 64 65 | 72 22 29 3a e1 0d 09 d8 |,"Encode|r"):....|
|00001660| 1e 20 20 20 e7 20 74 79 | 70 65 25 3d 32 20 8c 20 |. . ty|pe%=2 . |
|00001670| 64 69 72 65 63 74 6f 72 | 79 3d b9 0d 09 e2 1e 20 |director|y=..... |
|00001680| 20 20 62 6c 6f 63 6b 25 | 21 30 3d 65 6e 63 6f 64 | block%|!0=encod|
|00001690| 65 5f 68 61 6e 64 6c 65 | 25 0d 09 ec 13 20 20 20 |e_handle|%.... |
|000016a0| 62 6c 6f 63 6b 25 21 34 | 3d 32 30 30 0d 09 f6 13 |block%!4|=200....|
|000016b0| 20 20 20 62 6c 6f 63 6b | 25 21 38 3d 33 30 30 0d | block|%!8=300.|
|000016c0| 0a 00 14 20 20 20 62 6c | 6f 63 6b 25 21 31 32 3d |... bl|ock%!12=|
|000016d0| 38 30 30 0d 0a 0a 14 20 | 20 20 62 6c 6f 63 6b 25 |800.... | block%|
|000016e0| 21 31 36 3d 35 30 30 0d | 0a 14 12 20 20 20 62 6c |!16=500.|... bl|
|000016f0| 6f 63 6b 25 21 32 30 3d | 30 0d 0a 1e 12 20 20 20 |ock%!20=|0.... |
|00001700| 62 6c 6f 63 6b 25 21 32 | 34 3d 30 0d 0a 28 13 20 |block%!2|4=0..(. |
|00001710| 20 20 62 6c 6f 63 6b 25 | 21 32 38 3d 2d 31 0d 0a | block%|!28=-1..|
|00001720| 32 1b 20 20 20 f2 6f 70 | 65 6e 5f 77 69 6e 64 6f |2. .op|en_windo|
|00001730| 77 28 62 6c 6f 63 6b 25 | 29 0d 0a 3c 05 e1 0d 0a |w(block%|)..<....|
|00001740| 46 04 0d 0a 50 32 dd f2 | 70 72 6f 63 65 73 73 5f |F...P2..|process_|
|00001750| 74 72 65 65 28 62 75 66 | 66 65 72 25 2c 66 69 6c |tree(buf|fer%,fil|
|00001760| 65 24 2c 6c 65 76 65 6c | 25 2c 70 61 73 73 77 6f |e$,level|%,passwo|
|00001770| 72 64 24 29 0d 0a 5a 38 | 20 20 20 ea 20 70 6f 69 |rd$)..Z8| . poi|
|00001780| 6e 74 65 72 25 2c 6f 62 | 6a 65 63 74 5f 74 79 70 |nter%,ob|ject_typ|
|00001790| 65 25 2c 6e 61 6d 65 24 | 2c 72 65 61 64 25 2c 6c |e%,name$|,read%,l|
|000017a0| 6f 6f 70 25 2c 6f 66 66 | 73 65 74 25 0d 0a 64 70 |oop%,off|set%..dp|
|000017b0| 20 20 20 e7 20 66 69 6c | 65 24 3d 22 22 20 8c 20 | . fil|e$="" . |
|000017c0| 64 75 6d 6d 79 25 3d a4 | 65 72 72 6f 72 28 22 59 |dummy%=.|error("Y|
|000017d0| 6f 75 20 6d 75 73 74 20 | 65 6e 74 65 72 20 61 20 |ou must |enter a |
|000017e0| 6e 61 6d 65 20 62 65 66 | 6f 72 65 20 74 72 79 69 |name bef|ore tryi|
|000017f0| 6e 67 20 74 6f 20 61 6c | 74 65 72 20 61 74 74 72 |ng to al|ter attr|
|00001800| 69 62 75 74 65 73 2e 22 | 2c 31 2c 22 4d 75 6c 74 |ibutes."|,1,"Mult|
|00001810| 69 20 61 63 63 65 73 73 | 22 29 3a e1 0d 0a 6e 2a |i access|"):...n*|
|00001820| 20 20 20 c8 99 20 22 4f | 53 5f 46 69 6c 65 22 2c | .. "O|S_File",|
|00001830| 35 2c 66 69 6c 65 24 20 | b8 20 6f 62 6a 65 63 74 |5,file$ |. object|
|00001840| 5f 74 79 70 65 25 0d 0a | 78 19 20 20 20 e7 20 6f |_type%..|x. . o|
|00001850| 62 6a 65 63 74 5f 74 79 | 70 65 25 3d 31 20 8c 0d |bject_ty|pe%=1 ..|
|00001860| 0a 82 1e 20 20 20 20 20 | 20 f2 70 72 6f 63 65 73 |... | .proces|
|00001870| 73 5f 66 69 6c 65 28 66 | 69 6c 65 24 29 0d 0a 8c |s_file(f|ile$)...|
|00001880| 08 20 20 20 cc 0d 0a 96 | 4f 20 20 20 20 20 20 c8 |. ....|O .|
|00001890| 99 20 22 4f 53 5f 47 42 | 50 42 22 2c 39 2c 66 69 |. "OS_GB|PB",9,fi|
|000018a0| 6c 65 24 2b bd 28 30 29 | 2c 62 75 66 66 65 72 25 |le$+.(0)|,buffer%|
|000018b0| 2c 31 2c 30 2c 32 35 36 | 2c 22 2a 22 2b bd 28 30 |,1,0,256|,"*"+.(0|
|000018c0| 29 20 b8 20 2c 2c 2c 72 | 65 61 64 25 2c 6f 66 66 |) . ,,,r|ead%,off|
|000018d0| 73 65 74 25 0d 0a a0 18 | 20 20 20 20 20 20 c8 95 |set%....| ..|
|000018e0| 20 6f 66 66 73 65 74 25 | 3c 3e 2d 31 0d 0a aa 2f | offset%|<>-1.../|
|000018f0| 20 20 20 20 20 20 20 20 | 20 6e 61 6d 65 24 3d 66 | | name$=f|
|00001900| 69 6c 65 24 2b 22 2e 22 | 2b a4 66 69 6c 65 6e 61 |ile$+"."|+.filena|
|00001910| 6d 65 28 62 75 66 66 65 | 72 25 29 0d 0a b4 2a 20 |me(buffe|r%)...* |
|00001920| 20 20 20 20 20 20 20 20 | f2 65 6e 63 6f 64 65 5f | |.encode_|
|00001930| 66 69 6c 65 28 6e 61 6d | 65 24 2c 70 61 73 73 77 |file(nam|e$,passw|
|00001940| 6f 72 64 24 29 0d 0a be | 30 20 20 20 20 20 20 20 |ord$)...|0 |
|00001950| 20 20 c8 99 20 22 4f 53 | 5f 46 69 6c 65 22 2c 35 | .. "OS|_File",5|
|00001960| 2c 6e 61 6d 65 24 20 b8 | 20 6f 62 6a 65 63 74 5f |,name$ .| object_|
|00001970| 74 79 70 65 25 0d 0a c8 | 1f 20 20 20 20 20 20 20 |type%...|. |
|00001980| 20 20 e7 20 6f 62 6a 65 | 63 74 5f 74 79 70 65 25 | . obje|ct_type%|
|00001990| 3d 30 20 8c 0d 0a d2 52 | 20 20 20 20 20 20 20 20 |=0 ....R| |
|000019a0| 20 20 20 20 64 75 6d 6d | 79 25 3d a4 65 72 72 6f | dumm|y%=.erro|
|000019b0| 72 28 22 4f 6f 70 73 2c | 20 74 68 61 74 20 66 69 |r("Oops,| that fi|
|000019c0| 6c 65 20 64 6f 65 73 6e | 27 74 20 65 78 69 73 74 |le doesn|'t exist|
|000019d0| 2e 22 2c 31 2c 22 4d 75 | 6c 74 69 20 61 63 63 65 |.",1,"Mu|lti acce|
|000019e0| 73 73 22 29 3a e1 0d 0a | dc 0e 20 20 20 20 20 20 |ss"):...|.. |
|000019f0| 20 20 20 cc 0d 0a e6 22 | 20 20 20 20 20 20 20 20 | ...."| |
|00001a00| 20 20 20 20 e7 20 6f 62 | 6a 65 63 74 5f 74 79 70 | . ob|ject_typ|
|00001a10| 65 25 3d 32 20 8c 0d 0a | f0 42 20 20 20 20 20 20 |e%=2 ...|.B |
|00001a20| 20 20 20 20 20 20 20 20 | 20 f2 70 72 6f 63 65 73 | | .proces|
|00001a30| 73 5f 74 72 65 65 28 62 | 75 66 66 65 72 25 2c 6e |s_tree(b|uffer%,n|
|00001a40| 61 6d 65 24 2c 6c 65 76 | 65 6c 25 2b 31 2c 70 61 |ame$,lev|el%+1,pa|
|00001a50| 73 73 77 6f 72 64 24 29 | 0d 0a fa 11 20 20 20 20 |ssword$)|.... |
|00001a60| 20 20 20 20 20 20 20 20 | cd 0d 0b 04 0e 20 20 20 | |..... |
|00001a70| 20 20 20 20 20 20 cd 0d | 0b 0e 53 20 20 20 20 20 | ..|..S |
|00001a80| 20 20 20 20 c8 99 20 22 | 4f 53 5f 47 42 50 42 22 | .. "|OS_GBPB"|
|00001a90| 2c 39 2c 66 69 6c 65 24 | 2c 62 75 66 66 65 72 25 |,9,file$|,buffer%|
|00001aa0| 2c 31 2c 6f 66 66 73 65 | 74 25 2c 32 35 36 2c 22 |,1,offse|t%,256,"|
|00001ab0| 2a 22 2b bd 28 30 29 20 | b8 20 2c 2c 2c 72 65 61 |*"+.(0) |. ,,,rea|
|00001ac0| 64 25 2c 6f 66 66 73 65 | 74 25 0d 0b 18 0b 20 20 |d%,offse|t%.... |
|00001ad0| 20 20 20 20 ce 0d 0b 22 | 08 20 20 20 cd 0d 0b 2c | ..."|. ...,|
|00001ae0| 05 e1 0d 0b 36 04 0d 0b | 40 17 dd a4 66 69 6c 65 |....6...|@...file|
|00001af0| 6e 61 6d 65 28 62 75 66 | 66 65 72 25 29 0d 0b 4a |name(buf|fer%)..J|
|00001b00| 17 20 20 20 ea 20 70 6f | 69 6e 74 65 72 25 2c 6e |. . po|inter%,n|
|00001b10| 61 6d 65 24 0d 0b 54 0f | 20 20 20 6e 61 6d 65 24 |ame$..T.| name$|
|00001b20| 3d 22 22 0d 0b 5e 11 20 | 20 20 70 6f 69 6e 74 65 |=""..^. | pointe|
|00001b30| 72 25 3d 30 0d 0b 68 20 | 20 20 20 c8 95 20 3f 28 |r%=0..h | .. ?(|
|00001b40| 62 75 66 66 65 72 25 2b | 70 6f 69 6e 74 65 72 25 |buffer%+|pointer%|
|00001b50| 29 3c 3e 30 0d 0b 72 27 | 20 20 20 20 20 20 6e 61 |)<>0..r'| na|
|00001b60| 6d 65 24 2b 3d bd 28 3f | 28 62 75 66 66 65 72 25 |me$+=.(?|(buffer%|
|00001b70| 2b 70 6f 69 6e 74 65 72 | 25 29 29 0d 0b 7c 15 20 |+pointer|%))..|. |
|00001b80| 20 20 20 20 20 70 6f 69 | 6e 74 65 72 25 2b 3d 31 | poi|nter%+=1|
|00001b90| 0d 0b 86 08 20 20 20 ce | 0d 0b 90 0a 3d 6e 61 6d |.... .|....=nam|
|00001ba0| 65 24 0d 0b 9a 04 0d 0b | a4 19 dd f2 70 72 6f 63 |e$......|....proc|
|00001bb0| 65 73 73 5f 66 69 6c 65 | 28 6e 61 6d 65 24 29 0d |ess_file|(name$).|
|00001bc0| 0b ae 0e 20 20 20 ea 20 | 61 74 74 72 25 0d 0b b8 |... . |attr%...|
|00001bd0| 28 20 20 20 c8 99 20 22 | 4f 53 5f 46 69 6c 65 22 |( .. "|OS_File"|
|00001be0| 2c 35 2c 6e 61 6d 65 24 | 20 b8 20 2c 2c 2c 2c 2c |,5,name$| . ,,,,,|
|00001bf0| 61 74 74 72 25 0d 0b c2 | 41 20 20 20 61 74 74 72 |attr%...|A attr|
|00001c00| 25 3d 28 61 74 74 72 25 | 20 80 20 25 31 31 31 31 |%=(attr%| . %1111|
|00001c10| 31 31 31 31 31 31 31 31 | 31 31 31 31 31 31 31 31 |11111111|11111111|
|00001c20| 31 31 31 31 30 30 30 30 | 30 30 30 30 30 30 30 29 |11110000|0000000)|
|00001c30| 2b 66 6c 61 67 25 0d 0b | cc 24 20 20 20 c8 99 20 |+flag%..|.$ .. |
|00001c40| 22 4f 53 5f 46 69 6c 65 | 22 2c 34 2c 6e 61 6d 65 |"OS_File|",4,name|
|00001c50| 24 2c 2c 2c 2c 61 74 74 | 72 25 0d 0b d6 05 e1 0d |$,,,,att|r%......|
|00001c60| ff | |. | |
+--------+-------------------------+-------------------------+--------+--------+
