home *** CD-ROM | disk | FTP | other *** search
/ APDL Public Domain 1 / APDL_PD1A.iso / discutils / protection / decoder < prev    next >
ArcFS Archive  |  1995-10-01  |  19.7 KB

open in: MacOS 8.1     |     Win98     |     DOS

browse contents    |     view JSON data     |     view as text


This file was processed as: ArcFS Archive (archive/arcFS).

ConfidenceProgramDetectionMatch TypeSupport
100% dexvert ArcFS Archive (archive/arcFS) magic Supported
100% file RISC OS archive (ArcFS format) default
99% file data default
100% TrID Acorn ArcFS Archive default
100% gt2 Kopftext: 'Archive' default (weak)
100% detectItEasy Archive: ArcFS default



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 41 72 63 68 69 76 65 00 | f8 01 00 00 54 03 00 00 |Archive.|....T...|
|00000010| 28 00 00 00 64 00 00 00 | 00 00 00 00 00 00 00 00 |(...d...|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000050| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000060| 82 21 44 65 63 6f 64 65 | 72 00 00 00 ff ff ff ff |.!Decode|r.......|
|00000070| 44 ff ff ff 51 10 1e 19 | 30 00 00 00 ff ff ff ff |D...Q...|0.......|
|00000080| d8 00 00 80 82 21 52 75 | 6e 00 04 00 2d fd 2d fd |.....!Ru|n...-.-.|
|00000090| 74 00 00 00 42 eb ff ff | 97 19 ef 0a 0b 00 d7 b5 |t...B...|........|
|000000a0| 74 00 00 00 24 00 00 00 | 82 21 52 75 6e 49 6d 61 |t...$...|.!RunIma|
|000000b0| 67 65 00 fd 91 1d 00 00 | 42 fb ff ff 7f 3c 92 26 |ge......|B....<.&|
|000000c0| 0b 00 9a d7 91 1d 00 00 | bc 00 00 00 82 21 53 70 |........|.....!Sp|
|000000d0| 72 69 74 65 73 00 2d fd | c4 04 00 00 42 f9 ff ff |rites.-.|....B...|
|000000e0| 7a 9d ee 0a 0b 00 0e 6f | c4 04 00 00 71 1e 00 00 |z......o|....q...|
|000000f0| 82 54 65 6d 70 6c 61 74 | 65 73 00 fd c7 02 00 00 |.Templat|es......|
|00000100| 42 ec ff ff b3 11 40 1a | 0b 00 03 f2 c7 02 00 00 |B.....@.|........|
|00000110| 59 23 00 00 00 00 00 00 | c3 00 04 00 2d fd 2d fd |Y#......|....-.-.|
|00000120| 2d fd 00 00 fd fd fd fd | fd d1 fd d1 fd d1 fd ca |-.......|........|
|00000130| fd d1 fd d1 e9 42 e2 cf | 82 21 45 6e 63 6f 64 65 |.....B..|.!Encode|
|00000140| 72 00 00 00 ff ff ff ff | 44 ff ff ff 43 16 1e 19 |r.......|D...C...|
|00000150| 30 00 00 00 ff ff ff ff | d4 01 00 80 82 21 42 6f |0.......|.....!Bo|
|00000160| 6f 74 00 fd fd fd 00 fd | d1 00 00 00 42 eb ff ff |ot......|....B...|
|00000170| ae 7d 1f 1a 0b 00 d6 57 | d1 00 00 00 44 26 00 00 |.}.....W|....D&..|
|00000180| 82 21 52 75 6e 00 fd fd | fd fd 00 fd e4 00 00 00 |.!Run...|........|
|00000190| 42 eb ff ff 09 b0 1e 1a | 0b 00 37 e5 e4 00 00 00 |B.......|..7.....|
|000001a0| 39 27 00 00 82 21 52 75 | 6e 49 6d 61 67 65 00 fd |9'...!Ru|nImage..|
|000001b0| 61 1c 00 00 42 fb ff ff | 29 c1 90 26 0b 00 42 2a |a...B...|)..&..B*|
|000001c0| 61 1c 00 00 41 28 00 00 | 82 21 53 70 72 69 74 65 |a...A(..|.!Sprite|
|000001d0| 73 00 00 fd b4 03 00 00 | 42 f9 ff ff cd 9e ee 0a |s.......|B.......|
|000001e0| 0b 00 4b 0b b4 03 00 00 | c6 44 00 00 82 54 65 6d |..K.....|.D...Tem|
|000001f0| 70 6c 61 74 65 73 00 fd | c9 02 00 00 42 ec ff ff |plates..|....B...|
|00000200| 49 3a 3e 1a 0b 00 e4 e9 | c9 02 00 00 9e 48 00 00 |I:>.....|.....H..|
|00000210| 00 fd fd fd fd fd fd fd | fd fd 00 fd 00 fd d1 fd |........|........|
|00000220| d1 fd d1 fd d1 fd 2d fd | 2d fd 2d fd 00 fd 00 fd |......-.|-.-.....|
|00000230| ec 6d e5 d0 00 00 00 00 | 00 00 00 00 00 00 00 00 |.m......|........|
|00000240| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000250| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000260| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000270| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000280| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000290| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000300| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000310| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000320| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000330| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000340| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000350| 00 00 00 00 46 69 6c 65 | 44 61 74 61 82 21 52 75 |....File|Data.!Ru|
|00000360| 6e 00 04 00 2d fd 2d fd | 74 00 00 00 42 eb ff ff |n...-.-.|t...B...|
|00000370| 97 19 ef 0a 03 00 d7 b5 | 53 65 74 20 64 65 63 6f |........|Set deco|
|00000380| 64 65 72 24 44 69 72 20 | 3c 4f 62 65 79 24 44 69 |der$Dir |<Obey$Di|
|00000390| 72 3e 0a 49 63 6f 6e 53 | 70 72 69 74 65 73 20 3c |r>.IconS|prites <|
|000003a0| 64 65 63 6f 64 65 72 24 | 44 69 72 3e 2e 21 53 70 |decoder$|Dir>.!Sp|
|000003b0| 72 69 74 65 73 0a 57 69 | 6d 70 53 6c 6f 74 20 2d |rites.Wi|mpSlot -|
|000003c0| 6d 69 6e 20 33 32 6b 20 | 2d 6d 61 78 20 33 32 6b |min 32k |-max 32k|
|000003d0| 0a 52 55 4e 20 3c 64 65 | 63 6f 64 65 72 24 44 69 |.RUN <de|coder$Di|
|000003e0| 72 3e 2e 21 52 75 6e 49 | 6d 61 67 65 46 69 6c 65 |r>.!RunI|mageFile|
|000003f0| 44 61 74 61 82 21 52 75 | 6e 49 6d 61 67 65 00 fd |Data.!Ru|nImage..|
|00000400| 91 1d 00 00 42 fb ff ff | 7f 3c 92 26 03 00 9a d7 |....B...|.<.&....|
|00000410| 0d 00 0a 10 f4 20 3e 21 | 52 75 6e 49 6d 61 67 65 |..... >!|RunImage|
|00000420| 0d 00 14 1f f2 69 6e 69 | 74 69 61 6c 69 73 65 5f |.....ini|tialise_|
|00000430| 74 61 73 6b 28 22 44 65 | 63 6f 64 65 72 22 29 0d |task("De|coder").|
|00000440| 00 1e 46 ee 20 85 20 64 | 3d a4 65 72 72 6f 72 28 |..F. . d|=.error(|
|00000450| f6 24 2b 22 20 20 28 20 | 49 6e 74 65 72 6e 61 6c |.$+" ( |Internal|
|00000460| 20 65 72 72 6f 72 20 22 | 2b c3 28 9e 29 2b 22 20 | error "|+.(.)+" |
|00000470| 29 22 2c 31 2c 22 44 65 | 63 6f 64 65 72 22 29 3a |)",1,"De|coder"):|
|00000480| f2 71 75 69 74 0d 00 28 | 16 f2 69 6e 73 74 61 6c |.quit..(|..instal|
|00000490| 6c 5f 74 65 6d 70 6c 61 | 74 65 73 0d 00 32 15 f2 |l_templa|tes..2..|
|000004a0| 63 72 65 61 74 65 5f 6d | 61 69 6e 5f 6d 65 6e 75 |create_m|ain_menu|
|000004b0| 0d 00 3c 2a 69 63 6f 6e | 25 3d a4 69 6e 73 74 61 |..<*icon|%=.insta|
|000004c0| 6c 6c 5f 6f 6e 5f 69 63 | 6f 6e 5f 62 61 72 28 22 |ll_on_ic|on_bar("|
|000004d0| 21 64 65 63 6f 64 65 72 | 22 29 0d 00 46 04 0d 00 |!decoder|")..F...|
|000004e0| 50 05 f5 0d 00 5a 04 0d | 00 64 2d 20 20 20 72 65 |P....Z..|.d- re|
|000004f0| 61 73 6f 6e 5f 63 6f 64 | 65 25 3d a4 70 6f 6c 6c |ason_cod|e%=.poll|
|00000500| 5f 77 69 6d 70 28 20 30 | 20 2c 20 72 65 74 75 72 |_wimp( 0| , retur|
|00000510| 6e 25 20 29 0d 00 6e 04 | 0d 00 78 18 20 20 20 c8 |n% )..n.|..x. .|
|00000520| 8e 20 72 65 61 73 6f 6e | 5f 63 6f 64 65 25 20 ca |. reason|_code% .|
|00000530| 0d 00 82 2e 20 20 20 20 | 20 20 c9 20 32 20 20 20 |.... | . 2 |
|00000540| 20 20 20 20 3a 20 20 f2 | 6f 70 65 6e 5f 77 69 6e | : .|open_win|
|00000550| 64 6f 77 28 20 72 65 74 | 75 72 6e 25 20 29 0d 00 |dow( ret|urn% )..|
|00000560| 8c 2f 20 20 20 20 20 20 | c9 20 33 20 20 20 20 20 |./ |. 3 |
|00000570| 20 20 3a 20 20 f2 63 6c | 6f 73 65 5f 77 69 6e 64 | : .cl|ose_wind|
|00000580| 6f 77 28 20 72 65 74 75 | 72 6e 25 20 29 0d 00 96 |ow( retu|rn% )...|
|00000590| 30 20 20 20 20 20 20 c9 | 20 36 20 20 20 20 20 20 |0 .| 6 |
|000005a0| 20 3a 20 20 f2 6d 6f 75 | 73 65 5f 63 68 61 6e 67 | : .mou|se_chang|
|000005b0| 65 20 28 20 72 65 74 75 | 72 6e 25 20 29 0d 00 a0 |e ( retu|rn% )...|
|000005c0| 2e 20 20 20 20 20 20 c9 | 20 38 20 20 20 20 20 20 |. .| 8 |
|000005d0| 20 3a 20 20 f2 6b 65 79 | 5f 70 72 65 73 73 65 64 | : .key|_pressed|
|000005e0| 28 20 72 65 74 75 72 6e | 25 20 29 0d 00 aa 23 20 |( return|% )...# |
|000005f0| 20 20 20 20 20 c9 20 39 | 20 20 20 20 20 20 20 3a | . 9| :|
|00000600| 20 20 f2 6d 65 6e 75 5f | 73 65 6c 65 63 74 0d 00 | .menu_|select..|
|00000610| b4 2b 20 20 20 20 20 20 | c9 20 31 37 20 2c 20 31 |.+ |. 17 , 1|
|00000620| 38 20 3a 20 20 f2 73 65 | 65 5f 77 68 61 74 5f 77 |8 : .se|e_what_w|
|00000630| 69 6d 70 5f 77 61 6e 74 | 73 0d 00 be 0b 20 20 20 |imp_want|s.... |
|00000640| 20 20 20 7f 0d 00 c8 08 | 20 20 20 cb 0d 00 d2 04 | .....| .....|
|00000650| 0d 00 dc 07 fd 20 a3 0d | 00 e6 04 0d 00 f0 1f dd |..... ..|........|
|00000660| f2 6d 6f 75 73 65 5f 63 | 68 61 6e 67 65 20 28 20 |.mouse_c|hange ( |
|00000670| 70 6f 69 6e 74 65 72 25 | 20 29 0d 00 fa 04 0d 01 |pointer%| )......|
|00000680| 04 17 20 20 20 c8 8e 20 | 70 6f 69 6e 74 65 72 25 |.. .. |pointer%|
|00000690| 21 31 32 20 ca 0d 01 0e | 3d 20 20 20 20 20 20 c9 |!12 ....|= .|
|000006a0| 20 20 64 65 63 6f 64 65 | 5f 68 61 6e 64 6c 65 25 | decode|_handle%|
|000006b0| 20 3a 20 20 20 20 20 f2 | 64 65 63 6f 64 65 5f 77 | : .|decode_w|
|000006c0| 69 6e 64 6f 77 28 70 6f | 69 6e 74 65 72 25 21 31 |indow(po|inter%!1|
|000006d0| 36 29 0d 01 18 32 20 20 | 20 20 20 20 c9 20 20 2d |6)...2 | . -|
|000006e0| 32 20 20 20 20 20 20 20 | 20 20 20 20 20 20 3a 20 |2 | : |
|000006f0| 20 20 20 20 f2 69 63 6f | 6e 5f 62 61 72 5f 62 75 | .ico|n_bar_bu|
|00000700| 74 74 6f 6e 0d 01 22 08 | 20 20 20 7f 0d 01 2c 08 |tton..".| ...,.|
|00000710| 20 20 20 cb 0d 01 36 04 | 0d 01 40 05 e1 0d 01 4a | ...6.|..@....J|
|00000720| 04 0d 01 54 1c dd f2 64 | 65 63 6f 64 65 5f 77 69 |...T...d|ecode_wi|
|00000730| 6e 64 6f 77 28 68 61 6e | 64 6c 65 25 29 0d 01 5e |ndow(han|dle%)..^|
|00000740| 14 20 20 20 e7 20 68 61 | 6e 64 6c 65 25 3d 31 20 |. . ha|ndle%=1 |
|00000750| 8c 0d 01 68 2a 20 20 20 | 20 20 20 70 61 73 73 77 |...h* | passw|
|00000760| 6f 72 64 24 3d a4 73 74 | 72 69 6e 67 28 74 65 78 |ord$=.st|ring(tex|
|00000770| 74 5f 62 75 66 66 65 72 | 32 25 29 0d 01 72 17 20 |t_buffer|2%)..r. |
|00000780| 20 20 20 20 20 e7 20 64 | 69 72 65 63 74 6f 72 79 | . d|irectory|
|00000790| 20 8c 0d 01 7c 33 20 20 | 20 20 20 20 20 20 20 f2 | ...|3 | .|
|000007a0| 64 65 63 6f 64 65 5f 64 | 69 72 65 63 74 6f 72 79 |decode_d|irectory|
|000007b0| 28 66 69 6c 65 6e 61 6d | 65 24 2c 70 61 73 73 77 |(filenam|e$,passw|
|000007c0| 6f 72 64 24 29 0d 01 86 | 0b 20 20 20 20 20 20 cc |ord$)...|. .|
|000007d0| 0d 01 90 2e 20 20 20 20 | 20 20 20 20 20 f2 64 65 |.... | .de|
|000007e0| 63 6f 64 65 5f 66 69 6c | 65 28 66 69 6c 65 6e 61 |code_fil|e(filena|
|000007f0| 6d 65 24 2c 70 61 73 73 | 77 6f 72 64 24 29 0d 01 |me$,pass|word$)..|
|00000800| 9a 0b 20 20 20 20 20 20 | cd 0d 01 a4 08 20 20 20 |.. |..... |
|00000810| cd 0d 01 ae 05 e1 0d 01 | b8 04 0d 01 c2 22 dd f2 |........|....."..|
|00000820| 64 65 63 6f 64 65 5f 66 | 69 6c 65 28 6e 61 6d 65 |decode_f|ile(name|
|00000830| 24 2c 70 61 73 73 77 6f | 72 64 24 29 0d 01 cc 3b |$,passwo|rd$)...;|
|00000840| 20 20 20 ea 20 6b 65 79 | 25 2c 6c 6f 6f 70 25 2c | . key|%,loop%,|
|00000850| 74 79 70 65 25 2c 6c 6f | 61 64 25 2c 65 78 65 63 |type%,lo|ad%,exec|
|00000860| 25 2c 6c 65 6e 25 2c 61 | 74 74 72 25 2c 61 25 2c |%,len%,a|ttr%,a%,|
|00000870| 6c 65 6e 67 74 68 25 0d | 01 d6 04 0d 01 e0 2a 20 |length%.|......* |
|00000880| 20 20 c8 99 20 22 4f 53 | 5f 46 69 6c 65 22 2c 35 | .. "OS|_File",5|
|00000890| 2c 6e 61 6d 65 24 20 b8 | 20 74 79 70 65 25 2c 2c |,name$ .| type%,,|
|000008a0| 6c 6f 61 64 25 0d 01 ea | 23 20 20 20 66 69 6c 65 |load%...|# file|
|000008b0| 74 79 70 65 25 3d 28 6c | 6f 61 64 25 3e 3e 3e 38 |type%=(l|oad%>>>8|
|000008c0| 29 20 80 20 26 46 46 46 | 0d 01 f4 28 20 20 20 e7 |) . &FFF|...( .|
|000008d0| 20 66 69 6c 65 74 79 70 | 65 25 3c 3e 26 31 30 30 | filetyp|e%<>&100|
|000008e0| 20 80 20 64 69 72 65 63 | 74 6f 72 79 20 8c 20 e1 | . direc|tory . .|
|000008f0| 0d 01 fe 56 20 20 20 e7 | 20 66 69 6c 65 74 79 70 |...V .| filetyp|
|00000900| 65 25 3c 3e 26 31 30 30 | 20 8c 20 64 75 6d 6d 79 |e%<>&100| . dummy|
|00000910| 25 3d a4 65 72 72 6f 72 | 28 22 54 68 61 74 20 69 |%=.error|("That i|
|00000920| 73 20 6e 6f 74 20 61 6e | 20 65 6e 63 6f 64 65 64 |s not an| encoded|
|00000930| 20 66 69 6c 65 2e 22 2c | 31 2c 22 44 65 63 6f 64 | file.",|1,"Decod|
|00000940| 65 72 22 29 3a e1 0d 02 | 08 04 0d 02 12 17 20 20 |er"):...|...... |
|00000950| 20 e7 20 70 61 73 73 77 | 6f 72 64 24 3d 22 22 20 | . passw|ord$="" |
|00000960| 8c 0d 02 1c 3b 20 20 20 | 20 20 20 64 75 6d 6d 79 |....; | dummy|
|00000970| 25 3d a4 65 72 72 6f 72 | 28 22 4e 6f 20 70 61 73 |%=.error|("No pas|
|00000980| 73 77 6f 72 64 20 70 72 | 65 73 65 6e 74 21 22 2c |sword pr|esent!",|
|00000990| 31 2c 22 44 65 63 6f 64 | 65 72 22 29 0d 02 26 08 |1,"Decod|er")..&.|
|000009a0| 20 20 20 cc 0d 02 30 22 | 20 20 20 20 20 20 e3 20 | ...0"| . |
|000009b0| 6c 6f 6f 70 25 3d 31 20 | b8 20 a9 28 70 61 73 73 |loop%=1 |. .(pass|
|000009c0| 77 6f 72 64 24 29 0d 02 | 3a 3d 20 20 20 20 20 20 |word$)..|:= |
|000009d0| 20 20 20 6b 65 79 25 3d | 28 28 97 28 c1 70 61 73 | key%=|((.(.pas|
|000009e0| 73 77 6f 72 64 24 2c 6c | 6f 6f 70 25 2c 31 29 29 |sword$,l|oop%,1))|
|000009f0| 2a 6c 6f 6f 70 25 29 2b | 6b 65 79 25 29 20 83 20 |*loop%)+|key%) . |
|00000a00| 32 35 36 0d 02 44 11 20 | 20 20 20 20 20 ed 20 6c |256..D. | . l|
|00000a10| 6f 6f 70 25 0d 02 4e 16 | 20 20 20 20 20 20 69 6e |oop%..N.| in|
|00000a20| 25 3d 8e 28 6e 61 6d 65 | 24 29 0d 02 58 27 20 20 |%=.(name|$)..X' |
|00000a30| 20 20 20 20 6f 75 74 25 | 3d ae 28 22 3c 64 65 63 | out%|=.("<dec|
|00000a40| 6f 64 65 72 24 44 69 72 | 3e 2e 53 63 72 61 70 22 |oder$Dir|>.Scrap"|
|00000a50| 29 0d 02 62 1b 20 20 20 | 20 20 20 e8 20 23 69 6e |)..b. | . #in|
|00000a60| 25 2c 61 25 2c 6c 65 6e | 67 74 68 25 0d 02 6c ca |%,a%,len|gth%..l.|
|00000a70| 20 20 20 20 20 20 e7 20 | 28 61 25 3c 3e 6b 65 79 | . |(a%<>key|
|00000a80| 25 29 20 84 20 28 a9 28 | 70 61 73 73 77 6f 72 64 |%) . (.(|password|
|00000a90| 24 29 3c 3e 6c 65 6e 67 | 74 68 25 29 20 8c 20 64 |$)<>leng|th%) . d|
|00000aa0| 75 6d 6d 79 25 3d a4 65 | 72 72 6f 72 28 22 49 6e |ummy%=.e|rror("In|
|00000ab0| 63 6f 72 72 65 63 74 20 | 70 61 73 73 77 6f 72 64 |correct |password|
|00000ac0| 21 22 2c 31 2c 22 44 65 | 63 6f 64 65 72 22 29 3a |!",1,"De|coder"):|
|00000ad0| d9 20 23 69 6e 25 3a d9 | 20 23 6f 75 74 25 3a 62 |. #in%:.| #out%:b|
|00000ae0| 6c 6f 63 6b 25 21 30 3d | 64 65 63 6f 64 65 5f 68 |lock%!0=|decode_h|
|00000af0| 61 6e 64 6c 65 25 3a c8 | 99 20 22 57 69 6d 70 5f |andle%:.|. "Wimp_|
|00000b00| 43 6c 6f 73 65 57 69 6e | 64 6f 77 22 2c 2c 62 6c |CloseWin|dow",,bl|
|00000b10| 6f 63 6b 25 3a ff 28 22 | 52 45 4d 4f 56 45 20 3c |ock%:.("|REMOVE <|
|00000b20| 64 65 63 6f 64 65 72 24 | 44 69 72 3e 2e 53 63 72 |decoder$|Dir>.Scr|
|00000b30| 61 70 22 29 3a e1 0d 02 | 76 2d 20 20 20 20 20 20 |ap"):...|v- |
|00000b40| e8 20 23 69 6e 25 2c 74 | 79 70 65 25 2c 6c 6f 61 |. #in%,t|ype%,loa|
|00000b50| 64 25 2c 65 78 65 63 25 | 2c 6c 65 6e 25 2c 61 74 |d%,exec%|,len%,at|
|00000b60| 74 72 25 0d 02 80 15 20 | 20 20 20 20 20 c8 95 20 |tr%.... | .. |
|00000b70| ac 28 c5 23 69 6e 25 29 | 0d 02 8a 15 20 20 20 20 |.(.#in%)|.... |
|00000b80| 20 20 20 20 20 61 25 3d | 9a 23 69 6e 25 0d 02 94 | a%=|.#in%...|
|00000b90| 1f 20 20 20 20 20 20 20 | 20 20 d5 23 6f 75 74 25 |. | .#out%|
|00000ba0| 2c 28 61 25 20 82 20 6b | 65 79 25 29 0d 02 9e 0b |,(a% . k|ey%)....|
|00000bb0| 20 20 20 20 20 20 ce 0d | 02 a8 11 20 20 20 20 20 | ..|... |
|00000bc0| 20 d9 20 23 6f 75 74 25 | 0d 02 b2 10 20 20 20 20 | . #out%|.... |
|00000bd0| 20 20 d9 20 23 69 6e 25 | 0d 02 bc 1c 20 20 20 20 | . #in%|.... |
|00000be0| 20 20 ff 28 22 52 45 4d | 4f 56 45 20 22 2b 6e 61 | .("REM|OVE "+na|
|00000bf0| 6d 65 24 29 0d 02 c6 41 | 20 20 20 20 20 20 c8 99 |me$)...A| ..|
|00000c00| 20 22 4f 53 5f 46 69 6c | 65 22 2c 31 2c 22 3c 64 | "OS_Fil|e",1,"<d|
|00000c10| 65 63 6f 64 65 72 24 44 | 69 72 3e 2e 53 63 72 61 |ecoder$D|ir>.Scra|
|00000c20| 70 22 2c 6c 6f 61 64 25 | 2c 65 78 65 63 25 2c 2c |p",load%|,exec%,,|
|00000c30| 61 74 74 72 25 0d 02 d0 | 39 20 20 20 20 20 20 ff |attr%...|9 .|
|00000c40| 28 22 43 4f 50 59 20 3c | 64 65 63 6f 64 65 72 24 |("COPY <|decoder$|
|00000c50| 44 69 72 3e 2e 53 63 72 | 61 70 20 22 2b 6e 61 6d |Dir>.Scr|ap "+nam|
|00000c60| 65 24 2b 22 20 44 20 7e | 56 20 7e 43 22 29 0d 02 |e$+" D ~|V ~C")..|
|00000c70| da 08 20 20 20 cd 0d 02 | e4 04 0d 02 ee 1e 20 20 |.. ...|...... |
|00000c80| 20 62 6c 6f 63 6b 25 21 | 30 3d 64 65 63 6f 64 65 | block%!|0=decode|
|00000c90| 5f 68 61 6e 64 6c 65 25 | 0d 02 f8 24 20 20 20 c8 |_handle%|...$ .|
|00000ca0| 99 20 22 57 69 6d 70 5f | 43 6c 6f 73 65 57 69 6e |. "Wimp_|CloseWin|
|00000cb0| 64 6f 77 22 2c 2c 62 6c | 6f 63 6b 25 0d 03 02 04 |dow",,bl|ock%....|
|00000cc0| 0d 03 0c 05 e1 0d 03 16 | 04 0d 03 20 2b dd f2 64 |........|... +..d|
|00000cd0| 65 63 6f 64 65 5f 64 69 | 72 65 63 74 6f 72 79 28 |ecode_di|rectory(|
|00000ce0| 66 69 6c 65 6e 61 6d 65 | 24 2c 70 61 73 73 77 6f |filename|$,passwo|
|00000cf0| 72 64 24 29 0d 03 2a 3d | 20 20 20 f2 70 72 6f 63 |rd$)..*=| .proc|
|00000d00| 65 73 73 5f 74 72 65 65 | 28 64 69 72 65 63 74 6f |ess_tree|(directo|
|00000d10| 72 79 5f 62 75 66 66 65 | 72 25 2c 66 69 6c 65 6e |ry_buffe|r%,filen|
|00000d20| 61 6d 65 24 2c 30 2c 70 | 61 73 73 77 6f 72 64 24 |ame$,0,p|assword$|
|00000d30| 29 0d 03 34 05 e1 0d 03 | 3e 04 0d 03 48 24 dd 20 |)..4....|>...H$. |
|00000d40| f2 69 6e 69 74 69 61 6c | 69 73 65 5f 74 61 73 6b |.initial|ise_task|
|00000d50| 20 28 20 74 61 73 6b 6e | 61 6d 65 24 20 29 0d 03 | ( taskn|ame$ )..|
|00000d60| 52 0e 20 20 20 ea 20 6c | 6f 6f 70 25 0d 03 5c 12 |R. . l|oop%..\.|
|00000d70| 20 20 20 de 20 74 61 73 | 6b 69 64 25 20 34 0d 03 | . tas|kid% 4..|
|00000d80| 66 16 20 20 20 24 74 61 | 73 6b 69 64 25 3d 22 54 |f. $ta|skid%="T|
|00000d90| 41 53 4b 22 0d 03 70 14 | 20 20 20 de 20 72 65 74 |ASK"..p.| . ret|
|00000da0| 75 72 6e 25 20 32 35 36 | 0d 03 7a 3d 20 20 20 c8 |urn% 256|..z= .|
|00000db0| 99 20 22 57 69 6d 70 5f | 49 6e 69 74 69 61 6c 69 |. "Wimp_|Initiali|
|00000dc0| 73 65 22 2c 32 30 30 2c | 21 74 61 73 6b 69 64 25 |se",200,|!taskid%|
|00000dd0| 2c 74 61 73 6b 6e 61 6d | 65 24 20 b8 20 76 65 72 |,tasknam|e$ . ver|
|00000de0| 73 69 6f 6e 25 0d 03 84 | 04 0d 03 8e 89 20 20 20 |sion%...|..... |
|00000df0| de 20 64 65 63 6f 64 65 | 5f 77 69 6e 64 6f 77 5f |. decode|_window_|
|00000e00| 62 75 66 66 65 72 25 20 | 35 30 30 2c 69 6e 66 6f |buffer% |500,info|
|00000e10| 5f 77 69 6e 64 6f 77 5f | 62 75 66 66 65 72 25 20 |_window_|buffer% |
|00000e20| 35 30 30 2c 74 65 78 74 | 5f 62 75 66 66 65 72 31 |500,text|_buffer1|
|00000e30| 25 20 35 30 30 2c 74 65 | 78 74 5f 62 75 66 66 65 |% 500,te|xt_buffe|
|00000e40| 72 32 25 20 35 30 30 2c | 62 6c 6f 63 6b 25 20 35 |r2% 500,|block% 5|
|00000e50| 30 30 2c 6d 65 6e 75 25 | 20 35 30 30 2c 64 69 72 |00,menu%| 500,dir|
|00000e60| 65 63 74 6f 72 79 5f 62 | 75 66 66 65 72 25 20 32 |ectory_b|uffer% 2|
|00000e70| 35 36 0d 03 98 04 0d 03 | a2 16 20 20 20 e3 20 6c |56......|.. . l|
|00000e80| 6f 6f 70 25 3d 30 20 b8 | 20 34 39 39 0d 03 ac 27 |oop%=0 .| 499...'|
|00000e90| 20 20 20 20 20 20 64 65 | 63 6f 64 65 5f 77 69 6e | de|code_win|
|00000ea0| 64 6f 77 5f 62 75 66 66 | 65 72 25 3f 6c 6f 6f 70 |dow_buff|er%?loop|
|00000eb0| 25 3d 30 0d 03 b6 25 20 | 20 20 20 20 20 69 6e 66 |%=0...% | inf|
|00000ec0| 6f 5f 77 69 6e 64 6f 77 | 5f 62 75 66 66 65 72 25 |o_window|_buffer%|
|00000ed0| 3f 6c 6f 6f 70 25 3d 30 | 0d 03 c0 1f 20 20 20 20 |?loop%=0|.... |
|00000ee0| 20 20 74 65 78 74 5f 62 | 75 66 66 65 72 31 25 3f | text_b|uffer1%?|
|00000ef0| 6c 6f 6f 70 25 3d 30 0d | 03 ca 1f 20 20 20 20 20 |loop%=0.|... |
|00000f00| 20 74 65 78 74 5f 62 75 | 66 66 65 72 32 25 3f 6c | text_bu|ffer2%?l|
|00000f10| 6f 6f 70 25 3d 30 0d 03 | d4 18 20 20 20 20 20 20 |oop%=0..|.. |
|00000f20| 62 6c 6f 63 6b 25 3f 6c | 6f 6f 70 25 3d 30 0d 03 |block%?l|oop%=0..|
|00000f30| de 17 20 20 20 20 20 20 | 6d 65 6e 75 25 3f 6c 6f |.. |menu%?lo|
|00000f40| 6f 70 25 3d 30 0d 03 e8 | 08 20 20 20 ed 0d 03 f2 |op%=0...|. ....|
|00000f50| 04 0d 03 fc 05 e1 0d 04 | 06 04 0d 04 10 17 dd f2 |........|........|
|00000f60| 69 6e 73 74 61 6c 6c 5f | 74 65 6d 70 6c 61 74 65 |install_|template|
|00000f70| 73 0d 04 1a 35 20 20 20 | c8 99 20 22 57 69 6d 70 |s...5 |.. "Wimp|
|00000f80| 5f 4f 70 65 6e 54 65 6d | 70 6c 61 74 65 22 2c 2c |_OpenTem|plate",,|
|00000f90| 22 3c 4f 62 65 79 24 44 | 69 72 3e 2e 54 65 6d 70 |"<Obey$D|ir>.Temp|
|00000fa0| 6c 61 74 65 73 22 0d 04 | 24 63 20 20 20 c8 99 20 |lates"..|$c .. |
|00000fb0| 22 57 69 6d 70 5f 4c 6f | 61 64 54 65 6d 70 6c 61 |"Wimp_Lo|adTempla|
|00000fc0| 74 65 22 2c 2c 69 6e 66 | 6f 5f 77 69 6e 64 6f 77 |te",,inf|o_window|
|00000fd0| 5f 62 75 66 66 65 72 25 | 2c 74 65 78 74 5f 62 75 |_buffer%|,text_bu|
|00000fe0| 66 66 65 72 31 25 2c 28 | 74 65 78 74 5f 62 75 66 |ffer1%,(|text_buf|
|00000ff0| 66 65 72 31 25 2b 35 30 | 30 29 2c 2d 31 2c 22 69 |fer1%+50|0),-1,"i|
|00001000| 6e 66 6f 62 6f 78 22 2c | 30 0d 04 2e 41 20 20 20 |nfobox",|0...A |
|00001010| c8 99 20 22 57 69 6d 70 | 5f 43 72 65 61 74 65 57 |.. "Wimp|_CreateW|
|00001020| 69 6e 64 6f 77 22 2c 2c | 69 6e 66 6f 5f 77 69 6e |indow",,|info_win|
|00001030| 64 6f 77 5f 62 75 66 66 | 65 72 25 20 b8 20 69 6e |dow_buff|er% . in|
|00001040| 66 6f 5f 68 61 6e 64 6c | 65 25 0d 04 38 68 20 20 |fo_handl|e%..8h |
|00001050| 20 c8 99 20 22 57 69 6d | 70 5f 4c 6f 61 64 54 65 | .. "Wim|p_LoadTe|
|00001060| 6d 70 6c 61 74 65 22 2c | 2c 64 65 63 6f 64 65 5f |mplate",|,decode_|
|00001070| 77 69 6e 64 6f 77 5f 62 | 75 66 66 65 72 25 2c 74 |window_b|uffer%,t|
|00001080| 65 78 74 5f 62 75 66 66 | 65 72 32 25 2c 28 74 65 |ext_buff|er2%,(te|
|00001090| 78 74 5f 62 75 66 66 65 | 72 32 25 2b 35 30 30 29 |xt_buffe|r2%+500)|
|000010a0| 2c 2d 31 2c 22 4c 6f 63 | 6b 57 69 6e 64 6f 77 22 |,-1,"Loc|kWindow"|
|000010b0| 2c 30 0d 04 42 45 20 20 | 20 c8 99 20 22 57 69 6d |,0..BE | .. "Wim|
|000010c0| 70 5f 43 72 65 61 74 65 | 57 69 6e 64 6f 77 22 2c |p_Create|Window",|
|000010d0| 2c 64 65 63 6f 64 65 5f | 77 69 6e 64 6f 77 5f 62 |,decode_|window_b|
|000010e0| 75 66 66 65 72 25 20 b8 | 20 64 65 63 6f 64 65 5f |uffer% .| decode_|
|000010f0| 68 61 6e 64 6c 65 25 0d | 04 4c 1e 20 20 20 c8 99 |handle%.|.L. ..|
|00001100| 20 22 57 69 6d 70 5f 43 | 6c 6f 73 65 54 65 6d 70 | "Wimp_C|loseTemp|
|00001110| 6c 61 74 65 22 0d 04 56 | 05 e1 0d 04 60 04 0d 04 |late"..V|....`...|
|00001120| 6a 1f dd 20 f2 6f 70 65 | 6e 5f 77 69 6e 64 6f 77 |j.. .ope|n_window|
|00001130| 20 28 20 70 6f 69 6e 74 | 65 72 25 20 29 0d 04 74 | ( point|er% )..t|
|00001140| 25 20 20 20 c8 99 20 22 | 57 69 6d 70 5f 4f 70 65 |% .. "|Wimp_Ope|
|00001150| 6e 57 69 6e 64 6f 77 22 | 2c 2c 70 6f 69 6e 74 65 |nWindow"|,,pointe|
|00001160| 72 25 0d 04 7e 05 e1 0d | 04 88 04 0d 04 92 20 dd |r%..~...|...... .|
|00001170| 20 f2 63 6c 6f 73 65 5f | 77 69 6e 64 6f 77 20 28 | .close_|window (|
|00001180| 20 70 6f 69 6e 74 65 72 | 25 20 29 0d 04 9c 26 20 | pointer|% )...& |
|00001190| 20 20 c8 99 20 22 57 69 | 6d 70 5f 43 6c 6f 73 65 | .. "Wi|mp_Close|
|000011a0| 57 69 6e 64 6f 77 22 2c | 2c 70 6f 69 6e 74 65 72 |Window",|,pointer|
|000011b0| 25 0d 04 a6 05 e1 0d 04 | b0 04 0d 04 ba 21 dd 20 |%.......|.....!. |
|000011c0| f2 64 65 6c 65 74 65 5f | 77 69 6e 64 6f 77 20 28 |.delete_|window (|
|000011d0| 20 70 6f 69 6e 74 65 72 | 25 20 29 0d 04 c4 27 20 | pointer|% )...' |
|000011e0| 20 20 c8 99 20 22 57 69 | 6d 70 5f 44 65 6c 65 74 | .. "Wi|mp_Delet|
|000011f0| 65 57 69 6e 64 6f 77 22 | 2c 2c 70 6f 69 6e 74 65 |eWindow"|,,pointe|
|00001200| 72 25 0d 04 ce 05 e1 0d | 04 d8 04 0d 04 e2 23 dd |r%......|......#.|
|00001210| 20 a4 70 6f 6c 6c 5f 77 | 69 6d 70 20 28 20 6d 61 | .poll_w|imp ( ma|
|00001220| 73 6b 25 20 2c 20 72 65 | 74 75 72 6e 20 29 0d 04 |sk% , re|turn )..|
|00001230| ec 15 20 20 20 ea 20 72 | 65 61 73 6f 6e 5f 63 6f |.. . r|eason_co|
|00001240| 64 65 25 0d 04 f6 35 20 | 20 20 c8 99 20 22 57 69 |de%...5 | .. "Wi|
|00001250| 6d 70 5f 50 6f 6c 6c 22 | 20 2c 20 6d 61 73 6b 25 |mp_Poll"| , mask%|
|00001260| 20 2c 20 72 65 74 75 72 | 6e 20 b8 20 72 65 61 73 | , retur|n . reas|
|00001270| 6f 6e 5f 63 6f 64 65 25 | 0d 05 00 12 3d 20 72 65 |on_code%|....= re|
|00001280| 61 73 6f 6e 5f 63 6f 64 | 65 25 0d 05 0a 04 0d 05 |ason_cod|e%......|
|00001290| 14 21 dd 20 f2 75 70 64 | 61 74 65 5f 77 69 6e 64 |.!. .upd|ate_wind|
|000012a0| 6f 77 20 28 20 70 6f 69 | 6e 74 65 72 25 20 29 0d |ow ( poi|nter% ).|
|000012b0| 05 1e 27 20 20 20 c8 99 | 20 22 57 69 6d 70 5f 55 |..' ..| "Wimp_U|
|000012c0| 70 64 61 74 65 57 69 6e | 64 6f 77 22 2c 2c 70 6f |pdateWin|dow",,po|
|000012d0| 69 6e 74 65 72 25 0d 05 | 28 05 e1 0d 05 32 04 0d |inter%..|(....2..|
|000012e0| 05 3c 11 dd 20 f2 63 6c | 6f 73 65 5f 64 6f 77 6e |.<.. .cl|ose_down|
|000012f0| 0d 05 46 1a 20 20 20 c8 | 99 20 22 57 69 6d 70 5f |..F. .|. "Wimp_|
|00001300| 43 6c 6f 73 65 44 6f 77 | 6e 22 0d 05 50 05 e1 0d |CloseDow|n"..P...|
|00001310| 05 5a 04 0d 05 64 0a dd | f2 71 75 69 74 0d 05 6e |.Z...d..|.quit..n|
|00001320| 12 20 20 20 f2 63 6c 6f | 73 65 5f 64 6f 77 6e 0d |. .clo|se_down.|
|00001330| 05 78 08 20 20 20 e0 0d | 05 82 05 e1 0d 05 8c 04 |.x. ..|........|
|00001340| 0d 05 96 24 dd 20 a4 69 | 6e 73 74 61 6c 6c 5f 6f |...$. .i|nstall_o|
|00001350| 6e 5f 69 63 6f 6e 5f 62 | 61 72 20 28 20 6e 61 6d |n_icon_b|ar ( nam|
|00001360| 65 24 20 29 0d 05 a0 04 | 0d 05 aa 20 20 20 20 de |e$ )....|... .|
|00001370| 20 62 6c 6f 63 6b 25 21 | 32 34 20 28 a9 20 28 6e | block%!|24 (. (n|
|00001380| 61 6d 65 24 29 2b 31 29 | 0d 05 b4 04 0d 05 be 18 |ame$)+1)|........|
|00001390| 20 20 20 62 6c 6f 63 6b | 25 21 30 20 20 20 20 20 | block|%!0 |
|000013a0| 3d 20 2d 32 0d 05 c8 17 | 20 20 20 62 6c 6f 63 6b |= -2....| block|
|000013b0| 25 21 34 20 20 20 20 20 | 3d 20 30 0d 05 d2 17 20 |%!4 |= 0.... |
|000013c0| 20 20 62 6c 6f 63 6b 25 | 21 38 20 20 20 20 20 3d | block%|!8 =|
|000013d0| 20 30 0d 05 dc 18 20 20 | 20 62 6c 6f 63 6b 25 21 | 0.... | block%!|
|000013e0| 31 32 20 20 20 20 3d 20 | 37 30 0d 05 e6 18 20 20 |12 = |70.... |
|000013f0| 20 62 6c 6f 63 6b 25 21 | 31 36 20 20 20 20 3d 20 | block%!|16 = |
|00001400| 37 30 0d 05 f0 25 20 20 | 20 62 6c 6f 63 6b 25 21 |70...% | block%!|
|00001410| 32 30 20 20 20 20 3d 20 | 25 31 30 30 30 30 31 30 |20 = |%1000010|
|00001420| 30 30 30 30 30 31 30 0d | 05 fa 1b 20 20 20 24 28 |0000010.|... $(|
|00001430| 62 6c 6f 63 6b 25 21 32 | 34 29 20 3d 20 6e 61 6d |block%!2|4) = nam|
|00001440| 65 24 0d 06 04 17 20 20 | 20 62 6c 6f 63 6b 25 21 |e$.... | block%!|
|00001450| 32 38 20 20 20 20 3d 20 | 31 0d 06 0e 20 20 20 20 |28 = |1... |
|00001460| 62 6c 6f 63 6b 25 21 33 | 32 20 20 20 20 3d 20 a9 |block%!3|2 = .|
|00001470| 28 6e 61 6d 65 24 29 2b | 31 0d 06 18 04 0d 06 22 |(name$)+|1......"|
|00001480| 2b 20 20 20 c8 99 20 22 | 57 69 6d 70 5f 43 72 65 |+ .. "|Wimp_Cre|
|00001490| 61 74 65 49 63 6f 6e 22 | 2c 2c 62 6c 6f 63 6b 25 |ateIcon"|,,block%|
|000014a0| 20 b8 20 69 63 6f 6e 25 | 0d 06 2c 04 0d 06 36 0a | . icon%|..,...6.|
|000014b0| 3d 69 63 6f 6e 25 0d 06 | 40 04 0d 06 4a 1a dd 20 |=icon%..|@...J.. |
|000014c0| f2 73 65 65 5f 77 68 61 | 74 5f 77 69 6d 70 5f 77 |.see_wha|t_wimp_w|
|000014d0| 61 6e 74 73 0d 06 54 04 | 0d 06 5e 16 20 20 20 c8 |ants..T.|..^. .|
|000014e0| 8e 20 72 65 74 75 72 6e | 25 21 31 36 20 ca 0d 06 |. return|%!16 ...|
|000014f0| 68 04 0d 06 72 16 20 20 | 20 20 20 20 c9 20 20 30 |h...r. | . 0|
|00001500| 20 3a 20 f2 71 75 69 74 | 0d 06 7c 2e 20 20 20 20 | : .quit|..|. |
|00001510| 20 20 c9 20 20 33 20 3a | 20 66 69 6c 65 6e 61 6d | . 3 :| filenam|
|00001520| 65 24 3d a4 73 74 72 69 | 6e 67 28 72 65 74 75 72 |e$=.stri|ng(retur|
|00001530| 6e 25 2b 34 34 29 0d 06 | 86 24 20 20 20 20 20 20 |n%+44)..|.$ |
|00001540| 20 20 20 20 20 20 20 20 | 20 20 f2 6c 6f 61 64 28 | | .load(|
|00001550| 66 69 6c 65 6e 61 6d 65 | 24 29 0d 06 90 0b 20 20 |filename|$).... |
|00001560| 20 20 20 20 7f 0d 06 9a | 04 0d 06 a4 08 20 20 20 | ....|..... |
|00001570| cb 0d 06 ae 04 0d 06 b8 | 05 e1 0d 06 c2 04 0d 06 |........|........|
|00001580| cc 16 dd 20 f2 69 63 6f | 6e 5f 62 61 72 5f 62 75 |... .ico|n_bar_bu|
|00001590| 74 74 6f 6e 0d 06 d6 04 | 0d 06 e0 15 20 20 20 c8 |tton....|.... .|
|000015a0| 8e 20 72 65 74 75 72 6e | 25 21 38 20 ca 0d 06 ea |. return|%!8 ....|
|000015b0| 10 20 20 20 20 20 20 c9 | 20 34 20 20 3a 0d 06 f4 |. .| 4 :...|
|000015c0| 47 20 20 20 20 20 20 c9 | 20 32 20 20 3a 20 20 f2 |G .| 2 : .|
|000015d0| 63 72 65 61 74 65 5f 6d | 65 6e 75 20 28 6d 65 6e |create_m|enu (men|
|000015e0| 75 25 20 2c 20 21 72 65 | 74 75 72 6e 25 2d 6d 65 |u% , !re|turn%-me|
|000015f0| 6e 75 25 21 31 36 2f 32 | 2d 32 34 2c 35 36 2b 33 |nu%!16/2|-24,56+3|
|00001600| 2a 34 34 29 0d 06 fe 10 | 20 20 20 20 20 20 c9 20 |*44)....| . |
|00001610| 31 20 20 3a 0d 07 08 08 | 20 20 20 cb 0d 07 12 04 |1 :....| .....|
|00001620| 0d 07 1c 05 e1 0d 07 26 | 04 0d 07 30 12 dd 20 f2 |.......&|...0.. .|
|00001630| 6d 65 6e 75 5f 73 65 6c | 65 63 74 0d 07 3a 04 0d |menu_sel|ect..:..|
|00001640| 07 44 14 20 20 20 c8 8e | 20 21 72 65 74 75 72 6e |.D. ..| !return|
|00001650| 25 20 ca 0d 07 4e 1f 20 | 20 20 20 20 20 c9 20 20 |% ...N. | . |
|00001660| 30 20 20 3a 20 20 f4 20 | 27 49 6e 66 6f 20 62 6f |0 : . |'Info bo|
|00001670| 78 27 0d 07 58 18 20 20 | 20 20 20 20 c9 20 20 31 |x'..X. | . 1|
|00001680| 20 20 3a 20 20 f2 71 75 | 69 74 0d 07 62 0b 20 20 | : .qu|it..b. |
|00001690| 20 20 20 20 7f 0d 07 6c | 08 20 20 20 cb 0d 07 76 | ...l|. ...v|
|000016a0| 04 0d 07 80 28 20 20 20 | c8 99 20 22 57 69 6d 70 |....( |.. "Wimp|
|000016b0| 5f 47 65 74 50 6f 69 6e | 74 65 72 49 6e 66 6f 22 |_GetPoin|terInfo"|
|000016c0| 2c 2c 72 65 74 75 72 6e | 25 0d 07 8a 04 0d 07 94 |,,return|%.......|
|000016d0| 05 e1 0d 07 9e 04 0d 07 | a8 16 dd f2 63 72 65 61 |........|....crea|
|000016e0| 74 65 5f 6d 61 69 6e 5f | 6d 65 6e 75 0d 07 b2 04 |te_main_|menu....|
|000016f0| 0d 07 bc 1f 20 20 20 24 | 6d 65 6e 75 25 20 20 20 |.... $|menu% |
|00001700| 20 20 20 3d 20 20 22 44 | 65 63 6f 64 65 72 22 0d | = "D|ecoder".|
|00001710| 07 c6 17 20 20 20 6d 65 | 6e 75 25 3f 31 32 20 20 |... me|nu%?12 |
|00001720| 20 20 3d 20 20 37 0d 07 | d0 17 20 20 20 6d 65 6e | = 7..|.. men|
|00001730| 75 25 3f 31 33 20 20 20 | 20 3d 20 20 32 0d 07 da |u%?13 | = 2...|
|00001740| 17 20 20 20 6d 65 6e 75 | 25 3f 31 34 20 20 20 20 |. menu|%?14 |
|00001750| 3d 20 20 37 0d 07 e4 17 | 20 20 20 6d 65 6e 75 25 |= 7....| menu%|
|00001760| 3f 31 35 20 20 20 20 3d | 20 20 30 0d 07 ee 1f 20 |?15 =| 0.... |
|00001770| 20 20 6d 65 6e 75 25 21 | 31 36 20 20 20 20 3d 20 | menu%!|16 = |
|00001780| 20 28 36 2a 31 36 29 2b | 31 32 0d 07 f8 18 20 20 | (6*16)+|12.... |
|00001790| 20 6d 65 6e 75 25 21 32 | 30 20 20 20 20 3d 20 20 | menu%!2|0 = |
|000017a0| 34 34 0d 08 02 17 20 20 | 20 6d 65 6e 75 25 21 32 |44.... | menu%!2|
|000017b0| 34 20 20 20 20 3d 20 20 | 30 0d 08 0c 17 20 20 20 |4 = |0.... |
|000017c0| 6d 65 6e 75 25 21 32 38 | 20 20 20 20 3d 20 20 30 |menu%!28| = 0|
|000017d0| 0d 08 16 22 20 20 20 6d | 65 6e 75 25 21 33 32 20 |..." m|enu%!32 |
|000017e0| 20 20 20 3d 20 20 69 6e | 66 6f 5f 68 61 6e 64 6c | = in|fo_handl|
|000017f0| 65 25 0d 08 20 1e 20 20 | 20 6d 65 6e 75 25 21 33 |e%.. . | menu%!3|
|00001800| 36 20 20 20 20 3d 20 20 | 26 37 30 30 30 30 30 31 |6 = |&7000001|
|00001810| 0d 08 2a 1e 20 20 20 24 | 28 6d 65 6e 75 25 2b 34 |..*. $|(menu%+4|
|00001820| 30 29 20 3d 20 20 22 20 | 49 6e 66 6f 20 22 0d 08 |0) = " |Info "..|
|00001830| 34 19 20 20 20 6d 65 6e | 75 25 21 35 32 20 20 20 |4. men|u%!52 |
|00001840| 20 3d 20 20 26 38 30 0d | 08 3e 18 20 20 20 6d 65 | = &80.|.>. me|
|00001850| 6e 75 25 21 35 36 20 20 | 20 20 3d 20 20 2d 31 0d |nu%!56 | = -1.|
|00001860| 08 48 1e 20 20 20 6d 65 | 6e 75 25 21 36 30 20 20 |.H. me|nu%!60 |
|00001870| 20 20 3d 20 20 26 37 30 | 30 30 30 30 31 0d 08 52 | = &70|00001..R|
|00001880| 1e 20 20 20 24 28 6d 65 | 6e 75 25 2b 36 34 29 20 |. $(me|nu%+64) |
|00001890| 3d 20 20 22 20 51 75 69 | 74 20 22 0d 08 5c 04 0d |= " Qui|t "..\..|
|000018a0| 08 66 05 e1 0d 08 70 04 | 0d 08 7a 31 dd 20 f2 63 |.f....p.|..z1. .c|
|000018b0| 72 65 61 74 65 5f 6d 65 | 6e 75 20 28 20 70 6f 69 |reate_me|nu ( poi|
|000018c0| 6e 74 65 72 25 20 2c 20 | 78 5f 70 6f 73 25 20 2c |nter% , |x_pos% ,|
|000018d0| 20 79 5f 70 6f 73 25 20 | 29 0d 08 84 04 0d 08 8e | y_pos% |).......|
|000018e0| 37 20 20 20 c8 99 20 22 | 57 69 6d 70 5f 43 72 65 |7 .. "|Wimp_Cre|
|000018f0| 61 74 65 4d 65 6e 75 22 | 2c 2c 70 6f 69 6e 74 65 |ateMenu"|,,pointe|
|00001900| 72 25 20 2c 20 78 5f 70 | 6f 73 25 20 2c 20 79 5f |r% , x_p|os% , y_|
|00001910| 70 6f 73 25 0d 08 98 04 | 0d 08 a2 05 e1 0d 08 ac |pos%....|........|
|00001920| 04 0d 08 b6 16 dd a4 73 | 74 72 69 6e 67 28 61 64 |.......s|tring(ad|
|00001930| 64 72 65 73 73 25 29 0d | 08 c0 04 0d 08 ca 0b 20 |dress%).|....... |
|00001940| 20 20 ea 20 73 24 0d 08 | d4 04 0d 08 de 0c 20 20 | . s$..|...... |
|00001950| 20 73 24 3d 22 22 0d 08 | e8 04 0d 08 f2 32 20 20 | s$=""..|.....2 |
|00001960| 20 c8 95 20 3f 61 64 64 | 72 65 73 73 25 3c 3e 30 | .. ?add|ress%<>0|
|00001970| 20 80 20 3f 61 64 64 72 | 65 73 73 25 3c 3e 31 33 | . ?addr|ess%<>13|
|00001980| 20 80 20 a9 28 73 24 29 | 3c 32 35 30 0d 08 fc 04 | . .(s$)|<250....|
|00001990| 0d 09 06 1a 20 20 20 20 | 20 20 73 24 2b 3d bd 28 |.... | s$+=.(|
|000019a0| 3f 61 64 64 72 65 73 73 | 25 29 0d 09 10 15 20 20 |?address|%).... |
|000019b0| 20 20 20 20 61 64 64 72 | 65 73 73 25 2b 3d 31 0d | addr|ess%+=1.|
|000019c0| 09 1a 04 0d 09 24 08 20 | 20 20 ce 0d 09 2e 04 0d |.....$. | ......|
|000019d0| 09 38 07 3d 73 24 0d 09 | 42 04 0d 09 4c 21 dd a4 |.8.=s$..|B...L!..|
|000019e0| 65 72 72 6f 72 28 45 72 | 72 6f 72 24 2c 46 6c 61 |error(Er|ror$,Fla|
|000019f0| 67 73 25 2c 54 69 74 6c | 65 24 29 0d 09 56 04 0d |gs%,Titl|e$)..V..|
|00001a00| 09 60 0f 20 20 20 ea 20 | 63 6c 69 63 6b 25 0d 09 |.`. . |click%..|
|00001a10| 6a 10 20 20 20 21 62 6c | 6f 63 6b 25 3d 30 0d 09 |j. !bl|ock%=0..|
|00001a20| 74 1e 20 20 20 24 28 62 | 6c 6f 63 6b 25 2b 34 29 |t. $(b|lock%+4)|
|00001a30| 3d 45 72 72 6f 72 24 2b | bd 28 30 29 0d 09 7e 3a |=Error$+|.(0)..~:|
|00001a40| 20 20 20 c8 99 22 57 69 | 6d 70 5f 52 65 70 6f 72 | .."Wi|mp_Repor|
|00001a50| 74 45 72 72 6f 72 22 2c | 62 6c 6f 63 6b 25 2c 46 |tError",|block%,F|
|00001a60| 6c 61 67 73 25 2c 54 69 | 74 6c 65 24 20 b8 20 2c |lags%,Ti|tle$ . ,|
|00001a70| 63 6c 69 63 6b 25 0d 09 | 88 04 0d 09 92 0b 3d 63 |click%..|......=c|
|00001a80| 6c 69 63 6b 25 0d 09 9c | 04 0d 09 a6 15 dd f2 6c |lick%...|.......l|
|00001a90| 6f 61 64 28 66 69 6c 65 | 6e 61 6d 65 24 29 0d 09 |oad(file|name$)..|
|00001aa0| b0 04 0d 09 ba 14 20 20 | 20 ea 20 6c 6f 61 64 25 |...... | . load%|
|00001ab0| 2c 74 79 70 65 25 0d 09 | c4 04 0d 09 ce 2e 20 20 |,type%..|...... |
|00001ac0| 20 c8 99 20 22 4f 53 5f | 46 69 6c 65 22 2c 35 2c | .. "OS_|File",5,|
|00001ad0| 66 69 6c 65 6e 61 6d 65 | 24 20 b8 20 74 79 70 65 |filename|$ . type|
|00001ae0| 25 2c 2c 6c 6f 61 64 25 | 0d 09 d8 1e 20 20 20 e7 |%,,load%|.... .|
|00001af0| 20 74 79 70 65 25 3d 32 | 20 8c 20 64 69 72 65 63 | type%=2| . direc|
|00001b00| 74 6f 72 79 3d b9 0d 09 | e2 1e 20 20 20 62 6c 6f |tory=...|.. blo|
|00001b10| 63 6b 25 21 30 3d 64 65 | 63 6f 64 65 5f 68 61 6e |ck%!0=de|code_han|
|00001b20| 64 6c 65 25 0d 09 ec 13 | 20 20 20 62 6c 6f 63 6b |dle%....| block|
|00001b30| 25 21 34 3d 32 30 30 0d | 09 f6 13 20 20 20 62 6c |%!4=200.|... bl|
|00001b40| 6f 63 6b 25 21 38 3d 33 | 30 30 0d 0a 00 14 20 20 |ock%!8=3|00.... |
|00001b50| 20 62 6c 6f 63 6b 25 21 | 31 32 3d 38 30 30 0d 0a | block%!|12=800..|
|00001b60| 0a 14 20 20 20 62 6c 6f | 63 6b 25 21 31 36 3d 35 |.. blo|ck%!16=5|
|00001b70| 30 30 0d 0a 14 12 20 20 | 20 62 6c 6f 63 6b 25 21 |00.... | block%!|
|00001b80| 32 30 3d 30 0d 0a 1e 12 | 20 20 20 62 6c 6f 63 6b |20=0....| block|
|00001b90| 25 21 32 34 3d 30 0d 0a | 28 13 20 20 20 62 6c 6f |%!24=0..|(. blo|
|00001ba0| 63 6b 25 21 32 38 3d 2d | 31 0d 0a 32 1b 20 20 20 |ck%!28=-|1..2. |
|00001bb0| f2 6f 70 65 6e 5f 77 69 | 6e 64 6f 77 28 62 6c 6f |.open_wi|ndow(blo|
|00001bc0| 63 6b 25 29 0d 0a 3c 05 | e1 0d 0a 46 04 0d 0a 50 |ck%)..<.|...F...P|
|00001bd0| 1d dd f2 6b 65 79 5f 70 | 72 65 73 73 65 64 28 20 |...key_p|ressed( |
|00001be0| 70 6f 69 6e 74 65 72 25 | 20 29 0d 0a 5a 26 20 20 |pointer%| )..Z& |
|00001bf0| 20 e7 20 64 65 63 6f 64 | 65 5f 68 61 6e 64 6c 65 | . decod|e_handle|
|00001c00| 25 3d 28 70 6f 69 6e 74 | 65 72 25 21 30 29 20 8c |%=(point|er%!0) .|
|00001c10| 0d 0a 64 1e 20 20 20 20 | 20 20 e7 20 28 70 6f 69 |..d. | . (poi|
|00001c20| 6e 74 65 72 25 21 32 34 | 29 3d 31 33 20 8c 0d 0a |nter%!24|)=13 ...|
|00001c30| 6e 2d 20 20 20 20 20 20 | 20 20 20 70 61 73 73 77 |n- | passw|
|00001c40| 6f 72 64 24 3d a4 73 74 | 72 69 6e 67 28 74 65 78 |ord$=.st|ring(tex|
|00001c50| 74 5f 62 75 66 66 65 72 | 32 25 29 0d 0a 78 2e 20 |t_buffer|2%)..x. |
|00001c60| 20 20 20 20 20 20 20 20 | f2 64 65 63 6f 64 65 5f | |.decode_|
|00001c70| 66 69 6c 65 28 66 69 6c | 65 6e 61 6d 65 24 2c 70 |file(fil|ename$,p|
|00001c80| 61 73 73 77 6f 72 64 24 | 29 0d 0a 82 0b 20 20 20 |assword$|).... |
|00001c90| 20 20 20 cd 0d 0a 8c 08 | 20 20 20 cc 0d 0a 96 2c | .....| ....,|
|00001ca0| 20 20 20 20 20 20 c8 99 | 20 22 57 69 6d 70 5f 50 | ..| "Wimp_P|
|00001cb0| 72 6f 63 65 73 73 4b 65 | 79 22 2c 28 70 6f 69 6e |rocessKe|y",(poin|
|00001cc0| 74 65 72 25 21 32 34 29 | 0d 0a a0 08 20 20 20 cd |ter%!24)|.... .|
|00001cd0| 0d 0a aa 05 e1 0d 0a b4 | 04 0d 0a be 32 dd f2 70 |........|....2..p|
|00001ce0| 72 6f 63 65 73 73 5f 74 | 72 65 65 28 62 75 66 66 |rocess_t|ree(buff|
|00001cf0| 65 72 25 2c 66 69 6c 65 | 24 2c 6c 65 76 65 6c 25 |er%,file|$,level%|
|00001d00| 2c 70 61 73 73 77 6f 72 | 64 24 29 0d 0a c8 38 20 |,passwor|d$)...8 |
|00001d10| 20 20 ea 20 70 6f 69 6e | 74 65 72 25 2c 6f 62 6a | . poin|ter%,obj|
|00001d20| 65 63 74 5f 74 79 70 65 | 25 2c 6e 61 6d 65 24 2c |ect_type|%,name$,|
|00001d30| 72 65 61 64 25 2c 6c 6f | 6f 70 25 2c 6f 66 66 73 |read%,lo|op%,offs|
|00001d40| 65 74 25 0d 0a d2 70 20 | 20 20 e7 20 66 69 6c 65 |et%...p | . file|
|00001d50| 24 3d 22 22 20 8c 20 64 | 75 6d 6d 79 25 3d a4 65 |$="" . d|ummy%=.e|
|00001d60| 72 72 6f 72 28 22 59 6f | 75 20 6d 75 73 74 20 65 |rror("Yo|u must e|
|00001d70| 6e 74 65 72 20 61 20 6e | 61 6d 65 20 62 65 66 6f |nter a n|ame befo|
|00001d80| 72 65 20 74 72 79 69 6e | 67 20 74 6f 20 61 6c 74 |re tryin|g to alt|
|00001d90| 65 72 20 61 74 74 72 69 | 62 75 74 65 73 2e 22 2c |er attri|butes.",|
|00001da0| 31 2c 22 4d 75 6c 74 69 | 20 61 63 63 65 73 73 22 |1,"Multi| access"|
|00001db0| 29 3a e1 0d 0a dc 2a 20 | 20 20 c8 99 20 22 4f 53 |):....* | .. "OS|
|00001dc0| 5f 46 69 6c 65 22 2c 35 | 2c 66 69 6c 65 24 20 b8 |_File",5|,file$ .|
|00001dd0| 20 6f 62 6a 65 63 74 5f | 74 79 70 65 25 0d 0a e6 | object_|type%...|
|00001de0| 19 20 20 20 e7 20 6f 62 | 6a 65 63 74 5f 74 79 70 |. . ob|ject_typ|
|00001df0| 65 25 3d 31 20 8c 0d 0a | f0 27 20 20 20 20 20 20 |e%=1 ...|.' |
|00001e00| f2 64 65 63 6f 64 65 5f | 66 69 6c 65 28 66 69 6c |.decode_|file(fil|
|00001e10| 65 24 2c 70 61 73 73 77 | 6f 72 64 24 29 0d 0a fa |e$,passw|ord$)...|
|00001e20| 08 20 20 20 cc 0d 0b 04 | 4f 20 20 20 20 20 20 c8 |. ....|O .|
|00001e30| 99 20 22 4f 53 5f 47 42 | 50 42 22 2c 39 2c 66 69 |. "OS_GB|PB",9,fi|
|00001e40| 6c 65 24 2b bd 28 30 29 | 2c 62 75 66 66 65 72 25 |le$+.(0)|,buffer%|
|00001e50| 2c 31 2c 30 2c 32 35 36 | 2c 22 2a 22 2b bd 28 30 |,1,0,256|,"*"+.(0|
|00001e60| 29 20 b8 20 2c 2c 2c 72 | 65 61 64 25 2c 6f 66 66 |) . ,,,r|ead%,off|
|00001e70| 73 65 74 25 0d 0b 0e 18 | 20 20 20 20 20 20 c8 95 |set%....| ..|
|00001e80| 20 6f 66 66 73 65 74 25 | 3c 3e 2d 31 0d 0b 18 2f | offset%|<>-1.../|
|00001e90| 20 20 20 20 20 20 20 20 | 20 6e 61 6d 65 24 3d 66 | | name$=f|
|00001ea0| 69 6c 65 24 2b 22 2e 22 | 2b a4 66 69 6c 65 6e 61 |ile$+"."|+.filena|
|00001eb0| 6d 65 28 62 75 66 66 65 | 72 25 29 0d 0b 22 30 20 |me(buffe|r%).."0 |
|00001ec0| 20 20 20 20 20 20 20 20 | c8 99 20 22 4f 53 5f 46 | |.. "OS_F|
|00001ed0| 69 6c 65 22 2c 35 2c 6e | 61 6d 65 24 20 b8 20 6f |ile",5,n|ame$ . o|
|00001ee0| 62 6a 65 63 74 5f 74 79 | 70 65 25 0d 0b 2c 1f 20 |bject_ty|pe%..,. |
|00001ef0| 20 20 20 20 20 20 20 20 | e7 20 6f 62 6a 65 63 74 | |. object|
|00001f00| 5f 74 79 70 65 25 3d 30 | 20 8c 0d 0b 36 52 20 20 |_type%=0| ...6R |
|00001f10| 20 20 20 20 20 20 20 20 | 20 20 64 75 6d 6d 79 25 | | dummy%|
|00001f20| 3d a4 65 72 72 6f 72 28 | 22 4f 6f 70 73 2c 20 74 |=.error(|"Oops, t|
|00001f30| 68 61 74 20 66 69 6c 65 | 20 64 6f 65 73 6e 27 74 |hat file| doesn't|
|00001f40| 20 65 78 69 73 74 2e 22 | 2c 31 2c 22 4d 75 6c 74 | exist."|,1,"Mult|
|00001f50| 69 20 61 63 63 65 73 73 | 22 29 3a e1 0d 0b 40 0e |i access|"):...@.|
|00001f60| 20 20 20 20 20 20 20 20 | 20 cc 0d 0b 4a 3f 20 20 | | ...J? |
|00001f70| 20 20 20 20 20 20 20 20 | 20 20 f2 70 72 6f 63 65 | | .proce|
|00001f80| 73 73 5f 74 72 65 65 28 | 62 75 66 66 65 72 25 2c |ss_tree(|buffer%,|
|00001f90| 6e 61 6d 65 24 2c 6c 65 | 76 65 6c 25 2b 31 2c 70 |name$,le|vel%+1,p|
|00001fa0| 61 73 73 77 6f 72 64 24 | 29 0d 0b 54 0e 20 20 20 |assword$|)..T. |
|00001fb0| 20 20 20 20 20 20 cd 0d | 0b 5e 53 20 20 20 20 20 | ..|.^S |
|00001fc0| 20 20 20 20 c8 99 20 22 | 4f 53 5f 47 42 50 42 22 | .. "|OS_GBPB"|
|00001fd0| 2c 39 2c 66 69 6c 65 24 | 2c 62 75 66 66 65 72 25 |,9,file$|,buffer%|
|00001fe0| 2c 31 2c 6f 66 66 73 65 | 74 25 2c 32 35 36 2c 22 |,1,offse|t%,256,"|
|00001ff0| 2a 22 2b bd 28 30 29 20 | b8 20 2c 2c 2c 72 65 61 |*"+.(0) |. ,,,rea|
|00002000| 64 25 2c 6f 66 66 73 65 | 74 25 0d 0b 68 0b 20 20 |d%,offse|t%..h. |
|00002010| 20 20 20 20 ce 0d 0b 72 | 08 20 20 20 cd 0d 0b 7c | ...r|. ...||
|00002020| 05 e1 0d 0b 86 04 0d 0b | 90 17 dd a4 66 69 6c 65 |........|....file|
|00002030| 6e 61 6d 65 28 62 75 66 | 66 65 72 25 29 0d 0b 9a |name(buf|fer%)...|
|00002040| 17 20 20 20 ea 20 70 6f | 69 6e 74 65 72 25 2c 6e |. . po|inter%,n|
|00002050| 61 6d 65 24 0d 0b a4 0f | 20 20 20 6e 61 6d 65 24 |ame$....| name$|
|00002060| 3d 22 22 0d 0b ae 11 20 | 20 20 70 6f 69 6e 74 65 |="".... | pointe|
|00002070| 72 25 3d 30 0d 0b b8 20 | 20 20 20 c8 95 20 3f 28 |r%=0... | .. ?(|
|00002080| 62 75 66 66 65 72 25 2b | 70 6f 69 6e 74 65 72 25 |buffer%+|pointer%|
|00002090| 29 3c 3e 30 0d 0b c2 27 | 20 20 20 20 20 20 6e 61 |)<>0...'| na|
|000020a0| 6d 65 24 2b 3d bd 28 3f | 28 62 75 66 66 65 72 25 |me$+=.(?|(buffer%|
|000020b0| 2b 70 6f 69 6e 74 65 72 | 25 29 29 0d 0b cc 15 20 |+pointer|%)).... |
|000020c0| 20 20 20 20 20 70 6f 69 | 6e 74 65 72 25 2b 3d 31 | poi|nter%+=1|
|000020d0| 0d 0b d6 08 20 20 20 ce | 0d 0b e0 0a 3d 6e 61 6d |.... .|....=nam|
|000020e0| 65 24 0d 0b ea 04 0d 0b | f4 19 dd f2 70 72 6f 63 |e$......|....proc|
|000020f0| 65 73 73 5f 66 69 6c 65 | 28 6e 61 6d 65 24 29 0d |ess_file|(name$).|
|00002100| 0b fe 0e 20 20 20 ea 20 | 61 74 74 72 25 0d 0c 08 |... . |attr%...|
|00002110| 28 20 20 20 c8 99 20 22 | 4f 53 5f 46 69 6c 65 22 |( .. "|OS_File"|
|00002120| 2c 35 2c 6e 61 6d 65 24 | 20 b8 20 2c 2c 2c 2c 2c |,5,name$| . ,,,,,|
|00002130| 61 74 74 72 25 0d 0c 12 | 41 20 20 20 61 74 74 72 |attr%...|A attr|
|00002140| 25 3d 28 61 74 74 72 25 | 20 80 20 25 31 31 31 31 |%=(attr%| . %1111|
|00002150| 31 31 31 31 31 31 31 31 | 31 31 31 31 31 31 31 31 |11111111|11111111|
|00002160| 31 31 31 31 30 30 30 30 | 30 30 30 30 30 30 30 29 |11110000|0000000)|
|00002170| 2b 66 6c 61 67 25 0d 0c | 1c 24 20 20 20 c8 99 20 |+flag%..|.$ .. |
|00002180| 22 4f 53 5f 46 69 6c 65 | 22 2c 34 2c 6e 61 6d 65 |"OS_File|",4,name|
|00002190| 24 2c 2c 2c 2c 61 74 74 | 72 25 0d 0c 26 05 e1 0d |$,,,,att|r%..&...|
|000021a0| ff 46 69 6c 65 44 61 74 | 61 82 21 53 70 72 69 74 |.FileDat|a.!Sprit|
|000021b0| 65 73 00 2d fd c4 04 00 | 00 42 f9 ff ff 7a 9d ee |es.-....|.B...z..|
|000021c0| 0a 03 00 0e 6f 02 00 00 | 00 10 00 00 00 c8 04 00 |....o...|........|
|000021d0| 00 6c 02 00 00 66 69 6c | 65 5f 31 30 30 00 00 00 |.l...fil|e_100...|
|000021e0| 00 03 00 00 00 11 00 00 | 00 00 00 00 00 1f 00 00 |........|........|
|000021f0| 00 2c 00 00 00 4c 01 00 | 00 0c 00 00 00 44 22 22 |.,...L..|.....D""|
|00002200| 22 22 22 22 22 22 22 22 | 22 22 22 22 44 44 22 22 |""""""""|""""DD""|
|00002210| 22 22 22 22 22 22 22 22 | 22 22 22 22 44 44 22 22 |""""""""|""""DD""|
|00002220| 22 22 22 77 77 77 77 26 | 22 22 22 22 44 44 22 22 |"""wwww&|""""DD""|
|00002230| 22 22 76 66 76 77 77 77 | 27 22 22 22 44 44 22 22 |""vfvwww|'"""DD""|
|00002240| 22 66 76 77 77 77 77 77 | 77 27 22 22 44 44 22 22 |"fvwwwww|w'""DD""|
|00002250| 62 76 42 55 55 55 55 25 | 72 67 22 22 44 44 22 22 |bvBUUUU%|rg""DD""|
|00002260| 62 57 55 44 77 77 27 52 | 55 67 22 22 44 44 22 22 |bWUDww'R|Ug""DD""|
|00002270| 52 55 55 55 55 55 55 55 | 55 55 22 22 44 44 22 22 |RUUUUUUU|UU""DD""|
|00002280| 35 33 33 33 33 33 33 33 | 33 33 25 22 44 44 22 22 |53333333|33%"DD""|
|00002290| 35 33 33 33 33 33 33 33 | 33 33 25 22 44 44 22 22 |53333333|33%"DD""|
|000022a0| 35 33 33 33 73 77 33 33 | 33 33 25 22 44 44 22 22 |5333sw33|33%"DD""|
|000022b0| 35 33 33 33 73 76 33 33 | 33 33 25 22 44 44 22 22 |5333sv33|33%"DD""|
|000022c0| 35 33 33 33 67 66 37 33 | 33 33 25 22 44 44 22 22 |5333gf73|33%"DD""|
|000022d0| 52 35 33 33 33 33 33 33 | 33 55 22 22 44 44 22 22 |R5333333|3U""DD""|
|000022e0| 22 52 55 33 33 33 33 53 | 55 22 22 22 44 44 44 44 |"RU3333S|U"""DDDD|
|000022f0| 44 44 44 55 55 55 55 45 | 44 44 44 44 44 00 00 00 |DDDUUUUE|DDDDD...|
|00002300| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002310| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002320| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002330| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002340| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002350| 00 00 f0 ff ff ff ff ff | 00 00 00 00 00 00 00 00 |........|........|
|00002360| 00 ff ff 00 00 00 00 f0 | ff 0f 00 00 00 00 00 00 |........|........|
|00002370| f0 ff 00 00 00 00 00 00 | f0 ff 00 00 00 00 00 00 |........|........|
|00002380| f0 0f 00 00 00 00 00 00 | 00 ff 00 00 00 00 00 00 |........|........|
|00002390| f0 ff ff ff ff ff ff ff | ff ff 00 00 00 00 00 00 |........|........|
|000023a0| ff ff ff ff ff ff ff ff | ff ff 0f 00 00 00 00 00 |........|........|
|000023b0| ff ff ff ff ff ff ff ff | ff ff 0f 00 00 00 00 00 |........|........|
|000023c0| ff ff ff ff ff ff ff ff | ff ff 0f 00 00 00 00 00 |........|........|
|000023d0| ff ff ff ff ff ff ff ff | ff ff 0f 00 00 00 00 00 |........|........|
|000023e0| ff ff ff ff ff ff ff ff | ff ff 0f 00 00 00 00 00 |........|........|
|000023f0| f0 ff ff ff ff ff ff ff | ff ff 00 00 00 00 00 00 |........|........|
|00002400| 00 f0 ff ff ff ff ff ff | ff 00 00 00 00 00 00 00 |........|........|
|00002410| 00 00 00 ff ff ff ff 0f | 00 00 00 00 00 00 00 00 |........|........|
|00002420| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002430| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 4c 02 00 |........|.....L..|
|00002440| 00 21 64 65 63 6f 64 65 | 72 00 00 00 00 03 00 00 |.!decode|r.......|
|00002450| 00 10 00 00 00 00 00 00 | 00 1f 00 00 00 2c 00 00 |........|.....,..|
|00002460| 00 3c 01 00 00 0c 00 00 | 00 ff ff ff ff ff ff ff |.<......|........|
|00002470| ff ff ff ff ff ff ff ff | ff ff 88 88 88 88 88 88 |........|........|
|00002480| 88 88 88 88 88 88 88 88 | ff ff 88 88 88 88 88 88 |........|........|
|00002490| 88 88 88 88 88 88 88 88 | ff ff 88 88 88 88 88 88 |........|........|
|000024a0| 88 88 88 88 88 88 88 88 | ff ff 88 88 88 88 88 88 |........|........|
|000024b0| 88 88 88 88 98 99 99 8e | f8 ff 88 88 88 88 88 88 |........|........|
|000024c0| 88 88 88 88 99 e9 99 e9 | 88 ff 88 88 88 88 88 88 |........|........|
|000024d0| 88 88 88 98 e9 88 88 99 | 8e 88 88 88 88 88 88 88 |........|........|
|000024e0| 88 88 88 98 e9 88 88 99 | 8e 99 99 99 99 99 99 99 |........|........|
|000024f0| 99 99 99 99 e9 88 88 99 | 8e e8 ee ee 8e 88 88 88 |........|........|
|00002500| 88 88 88 98 e9 88 88 99 | 8e 98 99 99 89 88 88 88 |........|........|
|00002510| 88 88 88 98 e9 88 88 99 | 8e 98 89 98 89 88 88 88 |........|........|
|00002520| 88 88 88 88 99 e9 99 e9 | 88 88 88 88 88 88 88 88 |........|........|
|00002530| 88 88 88 88 98 99 99 8e | f8 ff 88 88 88 88 88 88 |........|........|
|00002540| 88 88 88 88 88 88 88 88 | ff ff 88 88 88 88 88 88 |........|........|
|00002550| 88 88 88 88 88 88 88 88 | ff ff 88 88 88 88 88 88 |........|........|
|00002560| 88 88 88 88 88 88 88 88 | ff ff ff ff ff ff ff ff |........|........|
|00002570| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00002580| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00002590| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|000025a0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|000025b0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|000025c0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|000025d0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|000025e0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|000025f0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00002600| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00002610| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00002620| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00002630| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00002640| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00002650| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00002660| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00002670| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00002680| ff ff ff ff ff ff ff ff | ff 46 69 6c 65 44 61 74 |........|.FileDat|
|00002690| 61 82 54 65 6d 70 6c 61 | 74 65 73 00 fd c7 02 00 |a.Templa|tes.....|
|000026a0| 00 42 ec ff ff b3 11 40 | 1a 03 00 03 f2 ff ff ff |.B.....@|........|
|000026b0| ff 00 00 00 00 00 00 00 | 00 00 00 00 00 44 00 00 |........|.....D..|
|000026c0| 00 d9 00 00 00 01 00 00 | 00 4c 6f 63 6b 57 69 6e |........|.LockWin|
|000026d0| 64 6f 77 0d 00 1d 01 00 | 00 aa 01 00 00 01 00 00 |dow.....|........|
|000026e0| 00 69 6e 66 6f 62 6f 78 | 0d 61 6d 0d 42 00 00 00 |.infobox|.am.B...|
|000026f0| 00 84 01 00 00 58 01 00 | 00 dc 03 00 00 20 02 00 |.....X..|..... ..|
|00002700| 00 00 00 00 00 00 00 00 | 00 28 07 00 00 12 00 05 |........|.(......|
|00002710| 87 07 02 07 01 03 01 0c | 00 00 00 00 00 38 ff ff |........|.....8..|
|00002720| ff 58 02 00 00 00 00 00 | 00 3d 00 00 00 00 30 00 |.X......|.=....0.|
|00002730| 00 01 00 00 00 00 00 00 | 00 44 65 63 6f 64 65 20 |........|.Decode |
|00002740| 66 69 6c 65 0d 04 00 00 | 00 2e ff ff ff a8 ff ff |file....|........|
|00002750| ff aa ff ff ff 0c 00 00 | 00 1a 60 00 c7 4c 6f 63 |........|..`..Loc|
|00002760| 6b 75 70 0d 65 64 3e 0d | 7f 24 00 00 00 80 ff ff |kup.ed>.|.$......|
|00002770| ff 66 00 00 00 c4 ff ff | ff 1a 90 01 c7 21 64 65 |.f......|.....!de|
|00002780| 63 6f 64 65 72 0d 3e 0d | 7f 6e 00 00 00 88 ff ff |coder.>.|.n......|
|00002790| ff 1e 01 00 00 b8 ff ff | ff 19 60 00 c7 50 61 73 |........|..`..Pas|
|000027a0| 73 77 6f 72 64 20 3a 0d | 7f 1e 01 00 00 7c ff ff |sword :.|.....|..|
|000027b0| ff 4c 02 00 00 c8 ff ff | ff 3d f1 20 70 d8 00 00 |.L......|.=. p...|
|000027c0| 00 ff ff ff ff 0f 00 00 | 00 0d a2 02 00 00 98 01 |........|........|
|000027d0| 00 00 fe 04 00 00 74 02 | 00 00 00 00 00 00 38 ff |......t.|......8.|
|000027e0| ff ff 2c 07 00 00 12 00 | 03 84 07 02 07 01 03 01 |..,.....|........|
|000027f0| 0c 00 00 00 00 00 00 fc | ff ff 00 05 00 00 00 00 |........|........|
|00002800| 00 00 3d 01 00 00 00 30 | 00 00 01 00 00 00 00 00 |..=....0|........|
|00002810| 00 00 58 01 00 00 ff ff | ff ff 13 00 00 00 08 00 |..X.....|........|
|00002820| 00 00 1c 00 00 00 00 ff | ff ff cc 00 00 00 30 ff |........|......0.|
|00002830| ff ff 19 00 00 07 4e 61 | 6d 65 3a 0d 6c 65 64 3e |......Na|me:.led>|
|00002840| 0d 7f a4 00 00 00 00 ff | ff ff 50 02 00 00 30 ff |........|..P...0.|
|00002850| ff ff 3d 01 00 07 6b 01 | 00 00 ff ff ff ff 1b 00 |..=...k.|........|
|00002860| 00 00 04 00 00 00 cc fe | ff ff b4 00 00 00 fc fe |........|........|
|00002870| ff ff 19 00 00 07 50 75 | 72 70 6f 73 65 3a 0d 3e |......Pu|rpose:.>|
|00002880| 0d 7f a4 00 00 00 cc fe | ff ff 50 02 00 00 fc fe |........|..P.....|
|00002890| ff ff 3d 01 00 07 73 01 | 00 00 ff ff ff ff 1b 00 |..=...s.|........|
|000028a0| 00 00 0a 00 00 00 98 fe | ff ff ba 00 00 00 c8 fe |........|........|
|000028b0| ff ff 19 00 00 07 41 75 | 74 68 6f 72 3a 0d 64 3e |......Au|thor:.d>|
|000028c0| 0d 7f a4 00 00 00 98 fe | ff ff 50 02 00 00 c8 fe |........|..P.....|
|000028d0| ff ff 3d 01 00 07 89 01 | 00 00 ff ff ff ff 1b 00 |..=.....|........|
|000028e0| 00 00 04 00 00 00 64 fe | ff ff b4 00 00 00 94 fe |......d.|........|
|000028f0| ff ff 19 00 00 07 56 65 | 72 73 69 6f 6e 3a 0d 3e |......Ve|rsion:.>|
|00002900| 0d 7f a4 00 00 00 64 fe | ff ff 50 02 00 00 94 fe |......d.|..P.....|
|00002910| ff ff 3d 01 00 07 9a 01 | 00 00 ff ff ff ff 1b 00 |..=.....|........|
|00002920| 00 00 41 62 6f 75 74 20 | 74 68 69 73 20 70 72 6f |..About |this pro|
|00002930| 67 72 61 6d 0d 44 65 63 | 6f 64 65 72 0d 44 65 63 |gram.Dec|oder.Dec|
|00002940| 6f 64 65 73 20 65 6e 63 | 6f 64 65 64 20 66 69 6c |odes enc|oded fil|
|00002950| 65 73 0d a9 20 4d 69 6e | 64 77 61 72 70 2c 20 31 |es.. Min|dwarp, 1|
|00002960| 39 38 39 0d 31 2e 32 30 | 20 28 31 39 2d 31 32 2d |989.1.20| (19-12-|
|00002970| 38 39 29 0d 46 69 6c 65 | 44 61 74 61 82 21 42 6f |89).File|Data.!Bo|
|00002980| 6f 74 00 fd fd fd 00 fd | d1 00 00 00 42 eb ff ff |ot......|....B...|
|00002990| ae 7d 1f 1a 03 00 d6 57 | 53 65 74 20 45 6e 63 6f |.}.....W|Set Enco|
|000029a0| 64 65 72 24 44 69 72 20 | 3c 4f 62 65 79 24 44 69 |der$Dir |<Obey$Di|
|000029b0| 72 3e 0a 53 65 74 20 41 | 6c 69 61 73 24 40 52 75 |r>.Set A|lias$@Ru|
|000029c0| 6e 54 79 70 65 5f 31 30 | 30 20 45 52 52 4f 52 20 |nType_10|0 ERROR |
|000029d0| 31 30 30 20 54 68 61 74 | 20 69 73 20 61 20 70 61 |100 That| is a pa|
|000029e0| 73 73 77 6f 72 64 20 70 | 72 6f 74 65 63 74 65 64 |ssword p|rotected|
|000029f0| 20 66 69 6c 65 2e 20 50 | 6c 65 61 73 65 20 64 65 | file. P|lease de|
|00002a00| 63 6f 64 65 20 62 65 66 | 6f 72 65 20 74 72 79 69 |code bef|ore tryi|
|00002a10| 6e 67 20 74 6f 20 65 78 | 65 63 75 74 65 2e 3c 31 |ng to ex|ecute.<1|
|00002a20| 33 3e 0a 49 63 6f 6e 53 | 70 72 69 74 65 73 20 3c |3>.IconS|prites <|
|00002a30| 45 6e 63 6f 64 65 72 24 | 44 69 72 3e 2e 21 53 70 |Encoder$|Dir>.!Sp|
|00002a40| 72 69 74 65 73 0a 53 65 | 74 20 46 69 6c 65 24 54 |rites.Se|t File$T|
|00002a50| 79 70 65 5f 31 30 30 20 | 45 6e 63 6f 64 65 64 20 |ype_100 |Encoded |
|00002a60| 73 6f 66 74 77 61 72 65 | 0a 46 69 6c 65 44 61 74 |software|.FileDat|
|00002a70| 61 82 21 52 75 6e 00 fd | fd fd fd 00 fd e4 00 00 |a.!Run..|........|
|00002a80| 00 42 eb ff ff 09 b0 1e | 1a 03 00 37 e5 53 65 74 |.B......|...7.Set|
|00002a90| 20 45 6e 63 6f 64 65 72 | 24 44 69 72 20 3c 4f 62 | Encoder|$Dir <Ob|
|00002aa0| 65 79 24 44 69 72 3e 0a | 49 63 6f 6e 53 70 72 69 |ey$Dir>.|IconSpri|
|00002ab0| 74 65 73 20 3c 65 6e 63 | 6f 64 65 72 24 44 69 72 |tes <enc|oder$Dir|
|00002ac0| 3e 2e 21 53 70 72 69 74 | 65 73 0a 53 65 74 20 41 |>.!Sprit|es.Set A|
|00002ad0| 6c 69 61 73 24 40 52 75 | 6e 54 79 70 65 5f 31 30 |lias$@Ru|nType_10|
|00002ae0| 30 20 45 52 52 4f 52 20 | 31 30 30 20 54 68 61 74 |0 ERROR |100 That|
|00002af0| 20 69 73 20 61 20 70 61 | 73 73 77 6f 72 64 20 70 | is a pa|ssword p|
|00002b00| 72 6f 74 65 63 74 65 64 | 20 66 69 6c 65 2e 20 50 |rotected| file. P|
|00002b10| 6c 65 61 73 65 20 64 65 | 63 6f 64 65 20 62 65 66 |lease de|code bef|
|00002b20| 6f 72 65 20 74 72 79 69 | 6e 67 20 74 6f 20 65 78 |ore tryi|ng to ex|
|00002b30| 65 63 75 74 65 2e 3c 31 | 33 3e 0a 57 69 6d 70 53 |ecute.<1|3>.WimpS|
|00002b40| 6c 6f 74 20 2d 6d 69 6e | 20 33 32 6b 20 2d 6d 61 |lot -min| 32k -ma|
|00002b50| 78 20 33 32 6b 0a 52 55 | 4e 20 3c 65 6e 63 6f 64 |x 32k.RU|N <encod|
|00002b60| 65 72 24 44 69 72 3e 2e | 21 52 75 6e 49 6d 61 67 |er$Dir>.|!RunImag|
|00002b70| 65 46 69 6c 65 44 61 74 | 61 82 21 52 75 6e 49 6d |eFileDat|a.!RunIm|
|00002b80| 61 67 65 00 fd 61 1c 00 | 00 42 fb ff ff 29 c1 90 |age..a..|.B...)..|
|00002b90| 26 03 00 42 2a 0d 00 0a | 10 f4 20 3e 21 52 75 6e |&..B*...|.. >!Run|
|00002ba0| 49 6d 61 67 65 0d 00 14 | 1f f2 69 6e 69 74 69 61 |Image...|..initia|
|00002bb0| 6c 69 73 65 5f 74 61 73 | 6b 28 22 45 6e 63 6f 64 |lise_tas|k("Encod|
|00002bc0| 65 72 22 29 0d 00 1e 46 | ee 20 85 20 64 3d a4 65 |er")...F|. . d=.e|
|00002bd0| 72 72 6f 72 28 f6 24 2b | 22 20 20 28 20 49 6e 74 |rror(.$+|" ( Int|
|00002be0| 65 72 6e 61 6c 20 65 72 | 72 6f 72 20 22 2b c3 28 |ernal er|ror "+.(|
|00002bf0| 9e 29 2b 22 20 29 22 2c | 31 2c 22 45 6e 63 6f 64 |.)+" )",|1,"Encod|
|00002c00| 65 72 22 29 3a f2 71 75 | 69 74 0d 00 28 16 f2 69 |er"):.qu|it..(..i|
|00002c10| 6e 73 74 61 6c 6c 5f 74 | 65 6d 70 6c 61 74 65 73 |nstall_t|emplates|
|00002c20| 0d 00 32 15 f2 63 72 65 | 61 74 65 5f 6d 61 69 6e |..2..cre|ate_main|
|00002c30| 5f 6d 65 6e 75 0d 00 3c | 2a 69 63 6f 6e 25 3d a4 |_menu..<|*icon%=.|
|00002c40| 69 6e 73 74 61 6c 6c 5f | 6f 6e 5f 69 63 6f 6e 5f |install_|on_icon_|
|00002c50| 62 61 72 28 22 21 65 6e | 63 6f 64 65 72 22 29 0d |bar("!en|coder").|
|00002c60| 00 46 04 0d 00 50 05 f5 | 0d 00 5a 04 0d 00 64 2d |.F...P..|..Z...d-|
|00002c70| 20 20 20 72 65 61 73 6f | 6e 5f 63 6f 64 65 25 3d | reaso|n_code%=|
|00002c80| a4 70 6f 6c 6c 5f 77 69 | 6d 70 28 20 30 20 2c 20 |.poll_wi|mp( 0 , |
|00002c90| 72 65 74 75 72 6e 25 20 | 29 0d 00 6e 04 0d 00 78 |return% |)..n...x|
|00002ca0| 18 20 20 20 c8 8e 20 72 | 65 61 73 6f 6e 5f 63 6f |. .. r|eason_co|
|00002cb0| 64 65 25 20 ca 0d 00 82 | 2e 20 20 20 20 20 20 c9 |de% ....|. .|
|00002cc0| 20 32 20 20 20 20 20 20 | 20 3a 20 20 f2 6f 70 65 | 2 | : .ope|
|00002cd0| 6e 5f 77 69 6e 64 6f 77 | 28 20 72 65 74 75 72 6e |n_window|( return|
|00002ce0| 25 20 29 0d 00 8c 2f 20 | 20 20 20 20 20 c9 20 33 |% ).../ | . 3|
|00002cf0| 20 20 20 20 20 20 20 3a | 20 20 f2 63 6c 6f 73 65 | :| .close|
|00002d00| 5f 77 69 6e 64 6f 77 28 | 20 72 65 74 75 72 6e 25 |_window(| return%|
|00002d10| 20 29 0d 00 96 2f 20 20 | 20 20 20 20 c9 20 36 20 | ).../ | . 6 |
|00002d20| 20 20 20 20 20 20 3a 20 | 20 f2 6d 6f 75 73 65 5f | : | .mouse_|
|00002d30| 63 68 61 6e 67 65 28 20 | 72 65 74 75 72 6e 25 20 |change( |return% |
|00002d40| 29 0d 00 a0 2e 20 20 20 | 20 20 20 c9 20 38 20 20 |).... | . 8 |
|00002d50| 20 20 20 20 20 3a 20 20 | f2 6b 65 79 5f 70 72 65 | : |.key_pre|
|00002d60| 73 73 65 64 28 20 72 65 | 74 75 72 6e 25 20 29 0d |ssed( re|turn% ).|
|00002d70| 00 aa 23 20 20 20 20 20 | 20 c9 20 39 20 20 20 20 |..# | . 9 |
|00002d80| 20 20 20 3a 20 20 f2 6d | 65 6e 75 5f 73 65 6c 65 | : .m|enu_sele|
|00002d90| 63 74 0d 00 b4 2b 20 20 | 20 20 20 20 c9 20 31 37 |ct...+ | . 17|
|00002da0| 20 2c 20 31 38 20 3a 20 | 20 f2 73 65 65 5f 77 68 | , 18 : | .see_wh|
|00002db0| 61 74 5f 77 69 6d 70 5f | 77 61 6e 74 73 0d 00 be |at_wimp_|wants...|
|00002dc0| 0b 20 20 20 20 20 20 7f | 0d 00 c8 08 20 20 20 cb |. .|.... .|
|00002dd0| 0d 00 d2 04 0d 00 dc 07 | fd 20 a3 0d 00 e6 04 0d |........|. ......|
|00002de0| 00 f0 1d dd f2 6b 65 79 | 5f 70 72 65 73 73 65 64 |.....key|_pressed|
|00002df0| 28 20 70 6f 69 6e 74 65 | 72 25 20 29 0d 00 fa 26 |( pointe|r% )...&|
|00002e00| 20 20 20 e7 20 65 6e 63 | 6f 64 65 5f 68 61 6e 64 | . enc|ode_hand|
|00002e10| 6c 65 25 3d 28 70 6f 69 | 6e 74 65 72 25 21 30 29 |le%=(poi|nter%!0)|
|00002e20| 20 8c 0d 01 04 1e 20 20 | 20 20 20 20 e7 20 28 70 | ..... | . (p|
|00002e30| 6f 69 6e 74 65 72 25 21 | 32 34 29 3d 31 33 20 8c |ointer%!|24)=13 .|
|00002e40| 0d 01 0e 2d 20 20 20 20 | 20 20 20 20 20 70 61 73 |...- | pas|
|00002e50| 73 77 6f 72 64 24 3d a4 | 73 74 72 69 6e 67 28 74 |sword$=.|string(t|
|00002e60| 65 78 74 5f 62 75 66 66 | 65 72 32 25 29 0d 01 18 |ext_buff|er2%)...|
|00002e70| 2e 20 20 20 20 20 20 20 | 20 20 f2 65 6e 63 6f 64 |. | .encod|
|00002e80| 65 5f 66 69 6c 65 28 66 | 69 6c 65 6e 61 6d 65 24 |e_file(f|ilename$|
|00002e90| 2c 70 61 73 73 77 6f 72 | 64 24 29 0d 01 22 0b 20 |,passwor|d$)..". |
|00002ea0| 20 20 20 20 20 cd 0d 01 | 2c 08 20 20 20 cc 0d 01 | ...|,. ...|
|00002eb0| 36 2c 20 20 20 20 20 20 | c8 99 20 22 57 69 6d 70 |6, |.. "Wimp|
|00002ec0| 5f 50 72 6f 63 65 73 73 | 4b 65 79 22 2c 28 70 6f |_Process|Key",(po|
|00002ed0| 69 6e 74 65 72 25 21 32 | 34 29 0d 01 40 08 20 20 |inter%!2|4)..@. |
|00002ee0| 20 cd 0d 01 4a 05 e1 0d | 01 54 04 0d 01 5e 1f dd | ...J...|.T...^..|
|00002ef0| f2 6d 6f 75 73 65 5f 63 | 68 61 6e 67 65 20 28 20 |.mouse_c|hange ( |
|00002f00| 70 6f 69 6e 74 65 72 25 | 20 29 0d 01 68 04 0d 01 |pointer%| )..h...|
|00002f10| 72 17 20 20 20 c8 8e 20 | 70 6f 69 6e 74 65 72 25 |r. .. |pointer%|
|00002f20| 21 31 32 20 ca 0d 01 7c | 3d 20 20 20 20 20 20 c9 |!12 ...||= .|
|00002f30| 20 20 65 6e 63 6f 64 65 | 5f 68 61 6e 64 6c 65 25 | encode|_handle%|
|00002f40| 20 3a 20 20 20 20 20 f2 | 65 6e 63 6f 64 65 5f 77 | : .|encode_w|
|00002f50| 69 6e 64 6f 77 28 70 6f | 69 6e 74 65 72 25 21 31 |indow(po|inter%!1|
|00002f60| 36 29 0d 01 86 32 20 20 | 20 20 20 20 c9 20 20 2d |6)...2 | . -|
|00002f70| 32 20 20 20 20 20 20 20 | 20 20 20 20 20 20 3a 20 |2 | : |
|00002f80| 20 20 20 20 f2 69 63 6f | 6e 5f 62 61 72 5f 62 75 | .ico|n_bar_bu|
|00002f90| 74 74 6f 6e 0d 01 90 08 | 20 20 20 7f 0d 01 9a 08 |tton....| .....|
|00002fa0| 20 20 20 cb 0d 01 a4 04 | 0d 01 ae 05 e1 0d 01 b8 | .....|........|
|00002fb0| 04 0d 01 c2 1c dd f2 65 | 6e 63 6f 64 65 5f 77 69 |.......e|ncode_wi|
|00002fc0| 6e 64 6f 77 28 68 61 6e | 64 6c 65 25 29 0d 01 cc |ndow(han|dle%)...|
|00002fd0| 14 20 20 20 e7 20 68 61 | 6e 64 6c 65 25 3d 31 20 |. . ha|ndle%=1 |
|00002fe0| 8c 0d 01 d6 2a 20 20 20 | 20 20 20 70 61 73 73 77 |....* | passw|
|00002ff0| 6f 72 64 24 3d a4 73 74 | 72 69 6e 67 28 74 65 78 |ord$=.st|ring(tex|
|00003000| 74 5f 62 75 66 66 65 72 | 32 25 29 0d 01 e0 17 20 |t_buffer|2%).... |
|00003010| 20 20 20 20 20 e7 20 64 | 69 72 65 63 74 6f 72 79 | . d|irectory|
|00003020| 20 8c 0d 01 ea 33 20 20 | 20 20 20 20 20 20 20 f2 | ....3 | .|
|00003030| 65 6e 63 6f 64 65 5f 64 | 69 72 65 63 74 6f 72 79 |encode_d|irectory|
|00003040| 28 66 69 6c 65 6e 61 6d | 65 24 2c 70 61 73 73 77 |(filenam|e$,passw|
|00003050| 6f 72 64 24 29 0d 01 f4 | 0b 20 20 20 20 20 20 cc |ord$)...|. .|
|00003060| 0d 01 fe 2e 20 20 20 20 | 20 20 20 20 20 f2 65 6e |.... | .en|
|00003070| 63 6f 64 65 5f 66 69 6c | 65 28 66 69 6c 65 6e 61 |code_fil|e(filena|
|00003080| 6d 65 24 2c 70 61 73 73 | 77 6f 72 64 24 29 0d 02 |me$,pass|word$)..|
|00003090| 08 0b 20 20 20 20 20 20 | cd 0d 02 12 08 20 20 20 |.. |..... |
|000030a0| cd 0d 02 1c 05 e1 0d 02 | 26 04 0d 02 30 22 dd f2 |........|&...0"..|
|000030b0| 65 6e 63 6f 64 65 5f 66 | 69 6c 65 28 6e 61 6d 65 |encode_f|ile(name|
|000030c0| 24 2c 70 61 73 73 77 6f | 72 64 24 29 0d 02 3a 33 |$,passwo|rd$)..:3|
|000030d0| 20 20 20 ea 20 6b 65 79 | 25 2c 6c 6f 6f 70 25 2c | . key|%,loop%,|
|000030e0| 74 79 70 65 25 2c 6c 6f | 61 64 25 2c 65 78 65 63 |type%,lo|ad%,exec|
|000030f0| 25 2c 6c 65 6e 25 2c 61 | 74 74 72 25 2c 61 25 0d |%,len%,a|ttr%,a%.|
|00003100| 02 44 04 0d 02 4e 17 20 | 20 20 e7 20 70 61 73 73 |.D...N. | . pass|
|00003110| 77 6f 72 64 24 3d 22 22 | 20 8c 0d 02 58 3b 20 20 |word$=""| ...X; |
|00003120| 20 20 20 20 64 75 6d 6d | 79 25 3d a4 65 72 72 6f | dumm|y%=.erro|
|00003130| 72 28 22 4e 6f 20 70 61 | 73 73 77 6f 72 64 20 70 |r("No pa|ssword p|
|00003140| 72 65 73 65 6e 74 21 22 | 2c 31 2c 22 45 6e 63 6f |resent!"|,1,"Enco|
|00003150| 64 65 72 22 29 0d 02 62 | 08 20 20 20 cc 0d 02 6c |der")..b|. ...l|
|00003160| 22 20 20 20 20 20 20 e3 | 20 6c 6f 6f 70 25 3d 31 |" .| loop%=1|
|00003170| 20 b8 20 a9 28 70 61 73 | 73 77 6f 72 64 24 29 0d | . .(pas|sword$).|
|00003180| 02 76 3d 20 20 20 20 20 | 20 20 20 20 6b 65 79 25 |.v= | key%|
|00003190| 3d 28 28 97 28 c1 70 61 | 73 73 77 6f 72 64 24 2c |=((.(.pa|ssword$,|
|000031a0| 6c 6f 6f 70 25 2c 31 29 | 29 2a 6c 6f 6f 70 25 29 |loop%,1)|)*loop%)|
|000031b0| 2b 6b 65 79 25 29 20 83 | 20 32 35 36 0d 02 80 11 |+key%) .| 256....|
|000031c0| 20 20 20 20 20 20 ed 20 | 6c 6f 6f 70 25 0d 02 8a | . |loop%...|
|000031d0| 3e 20 20 20 20 20 20 c8 | 99 20 22 4f 53 5f 46 69 |> .|. "OS_Fi|
|000031e0| 6c 65 22 2c 35 2c 6e 61 | 6d 65 24 20 b8 20 74 79 |le",5,na|me$ . ty|
|000031f0| 70 65 25 2c 2c 6c 6f 61 | 64 25 2c 65 78 65 63 25 |pe%,,loa|d%,exec%|
|00003200| 2c 6c 65 6e 25 2c 61 74 | 74 72 25 0d 02 94 15 20 |,len%,at|tr%.... |
|00003210| 20 20 20 20 20 e7 20 74 | 79 70 65 25 3d 31 20 8c | . t|ype%=1 .|
|00003220| 0d 02 9e 19 20 20 20 20 | 20 20 20 20 20 69 6e 25 |.... | in%|
|00003230| 3d 8e 28 6e 61 6d 65 24 | 29 0d 02 a8 2a 20 20 20 |=.(name$|)...* |
|00003240| 20 20 20 20 20 20 6f 75 | 74 25 3d ae 28 22 3c 65 | ou|t%=.("<e|
|00003250| 6e 63 6f 64 65 72 24 44 | 69 72 3e 2e 53 63 72 61 |ncoder$D|ir>.Scra|
|00003260| 70 22 29 0d 02 b2 43 20 | 20 20 20 20 20 20 20 20 |p")...C | |
|00003270| f1 20 23 6f 75 74 25 2c | 6b 65 79 25 2c a9 28 70 |. #out%,|key%,.(p|
|00003280| 61 73 73 77 6f 72 64 24 | 29 2c 74 79 70 65 25 2c |assword$|),type%,|
|00003290| 6c 6f 61 64 25 2c 65 78 | 65 63 25 2c 6c 65 6e 25 |load%,ex|ec%,len%|
|000032a0| 2c 61 74 74 72 25 0d 02 | bc 18 20 20 20 20 20 20 |,attr%..|.. |
|000032b0| 20 20 20 c8 95 20 ac 28 | c5 23 69 6e 25 29 0d 02 | .. .(|.#in%)..|
|000032c0| c6 18 20 20 20 20 20 20 | 20 20 20 20 20 20 61 25 |.. | a%|
|000032d0| 3d 9a 23 69 6e 25 0d 02 | d0 22 20 20 20 20 20 20 |=.#in%..|." |
|000032e0| 20 20 20 20 20 20 d5 23 | 6f 75 74 25 2c 28 61 25 | .#|out%,(a%|
|000032f0| 20 82 20 6b 65 79 25 29 | 0d 02 da 0e 20 20 20 20 | . key%)|.... |
|00003300| 20 20 20 20 20 ce 0d 02 | e4 14 20 20 20 20 20 20 | ...|.. |
|00003310| 20 20 20 d9 20 23 6f 75 | 74 25 0d 02 ee 13 20 20 | . #ou|t%.... |
|00003320| 20 20 20 20 20 20 20 d9 | 20 23 69 6e 25 0d 02 f8 | .| #in%...|
|00003330| 1f 20 20 20 20 20 20 20 | 20 20 ff 28 22 52 45 4d |. | .("REM|
|00003340| 4f 56 45 20 22 2b 6e 61 | 6d 65 24 29 0d 03 02 31 |OVE "+na|me$)...1|
|00003350| 20 20 20 20 20 20 20 20 | 20 ff 28 22 53 45 54 54 | | .("SETT|
|00003360| 59 50 45 20 3c 65 6e 63 | 6f 64 65 72 24 44 69 72 |YPE <enc|oder$Dir|
|00003370| 3e 2e 53 63 72 61 70 20 | 31 30 30 22 29 0d 03 0c |>.Scrap |100")...|
|00003380| 3c 20 20 20 20 20 20 20 | 20 20 ff 28 22 43 4f 50 |< | .("COP|
|00003390| 59 20 3c 65 6e 63 6f 64 | 65 72 24 44 69 72 3e 2e |Y <encod|er$Dir>.|
|000033a0| 53 63 72 61 70 20 22 2b | 6e 61 6d 65 24 2b 22 20 |Scrap "+|name$+" |
|000033b0| 44 20 7e 56 20 7e 43 22 | 29 0d 03 16 0b 20 20 20 |D ~V ~C"|).... |
|000033c0| 20 20 20 cd 0d 03 20 08 | 20 20 20 cd 0d 03 2a 04 | ... .| ...*.|
|000033d0| 0d 03 34 1e 20 20 20 62 | 6c 6f 63 6b 25 21 30 3d |..4. b|lock%!0=|
|000033e0| 65 6e 63 6f 64 65 5f 68 | 61 6e 64 6c 65 25 0d 03 |encode_h|andle%..|
|000033f0| 3e 24 20 20 20 c8 99 20 | 22 57 69 6d 70 5f 43 6c |>$ .. |"Wimp_Cl|
|00003400| 6f 73 65 57 69 6e 64 6f | 77 22 2c 2c 62 6c 6f 63 |oseWindo|w",,bloc|
|00003410| 6b 25 0d 03 48 04 0d 03 | 52 05 e1 0d 03 5c 04 0d |k%..H...|R....\..|
|00003420| 03 66 27 dd f2 65 6e 63 | 6f 64 65 5f 64 69 72 65 |.f'..enc|ode_dire|
|00003430| 63 74 6f 72 79 28 6e 61 | 6d 65 24 2c 70 61 73 73 |ctory(na|me$,pass|
|00003440| 77 6f 72 64 24 29 0d 03 | 70 39 20 20 20 f2 70 72 |word$)..|p9 .pr|
|00003450| 6f 63 65 73 73 5f 74 72 | 65 65 28 64 69 72 65 63 |ocess_tr|ee(direc|
|00003460| 74 6f 72 79 5f 62 75 66 | 66 65 72 25 2c 6e 61 6d |tory_buf|fer%,nam|
|00003470| 65 24 2c 30 2c 70 61 73 | 73 77 6f 72 64 24 29 0d |e$,0,pas|sword$).|
|00003480| 03 7a 05 e1 0d 03 84 04 | 0d 03 8e 24 dd 20 f2 69 |.z......|...$. .i|
|00003490| 6e 69 74 69 61 6c 69 73 | 65 5f 74 61 73 6b 20 28 |nitialis|e_task (|
|000034a0| 20 74 61 73 6b 6e 61 6d | 65 24 20 29 0d 03 98 04 | tasknam|e$ )....|
|000034b0| 0d 03 a2 12 20 20 20 de | 20 74 61 73 6b 69 64 25 |.... .| taskid%|
|000034c0| 20 34 0d 03 ac 16 20 20 | 20 24 74 61 73 6b 69 64 | 4.... | $taskid|
|000034d0| 25 3d 22 54 41 53 4b 22 | 0d 03 b6 14 20 20 20 de |%="TASK"|.... .|
|000034e0| 20 72 65 74 75 72 6e 25 | 20 32 35 36 0d 03 c0 3d | return%| 256...=|
|000034f0| 20 20 20 c8 99 20 22 57 | 69 6d 70 5f 49 6e 69 74 | .. "W|imp_Init|
|00003500| 69 61 6c 69 73 65 22 2c | 32 30 30 2c 21 74 61 73 |ialise",|200,!tas|
|00003510| 6b 69 64 25 2c 74 61 73 | 6b 6e 61 6d 65 24 20 b8 |kid%,tas|kname$ .|
|00003520| 20 76 65 72 73 69 6f 6e | 25 0d 03 ca 04 0d 03 d4 | version|%.......|
|00003530| 93 20 20 20 de 20 65 6e | 63 6f 64 65 5f 77 69 6e |. . en|code_win|
|00003540| 64 6f 77 5f 62 75 66 66 | 65 72 25 20 35 30 30 2c |dow_buff|er% 500,|
|00003550| 69 6e 66 6f 5f 77 69 6e | 64 6f 77 5f 62 75 66 66 |info_win|dow_buff|
|00003560| 65 72 25 20 35 30 30 2c | 74 65 78 74 5f 62 75 66 |er% 500,|text_buf|
|00003570| 66 65 72 31 25 20 35 30 | 30 2c 74 65 78 74 5f 62 |fer1% 50|0,text_b|
|00003580| 75 66 66 65 72 32 25 20 | 35 30 30 2c 62 6c 6f 63 |uffer2% |500,bloc|
|00003590| 6b 25 20 35 30 30 2c 6d | 65 6e 75 25 20 35 30 30 |k% 500,m|enu% 500|
|000035a0| 2c 74 65 78 74 25 20 35 | 30 30 2c 64 69 72 65 63 |,text% 5|00,direc|
|000035b0| 74 6f 72 79 5f 62 75 66 | 66 65 72 25 20 32 35 36 |tory_buf|fer% 256|
|000035c0| 0d 03 de 04 0d 03 e8 05 | e1 0d 03 f2 04 0d 03 fc |........|........|
|000035d0| 17 dd f2 69 6e 73 74 61 | 6c 6c 5f 74 65 6d 70 6c |...insta|ll_templ|
|000035e0| 61 74 65 73 0d 04 06 35 | 20 20 20 c8 99 20 22 57 |ates...5| .. "W|
|000035f0| 69 6d 70 5f 4f 70 65 6e | 54 65 6d 70 6c 61 74 65 |imp_Open|Template|
|00003600| 22 2c 2c 22 3c 4f 62 65 | 79 24 44 69 72 3e 2e 54 |",,"<Obe|y$Dir>.T|
|00003610| 65 6d 70 6c 61 74 65 73 | 22 0d 04 10 63 20 20 20 |emplates|"...c |
|00003620| c8 99 20 22 57 69 6d 70 | 5f 4c 6f 61 64 54 65 6d |.. "Wimp|_LoadTem|
|00003630| 70 6c 61 74 65 22 2c 2c | 69 6e 66 6f 5f 77 69 6e |plate",,|info_win|
|00003640| 64 6f 77 5f 62 75 66 66 | 65 72 25 2c 74 65 78 74 |dow_buff|er%,text|
|00003650| 5f 62 75 66 66 65 72 31 | 25 2c 28 74 65 78 74 5f |_buffer1|%,(text_|
|00003660| 62 75 66 66 65 72 31 25 | 2b 35 30 30 29 2c 2d 31 |buffer1%|+500),-1|
|00003670| 2c 22 69 6e 66 6f 62 6f | 78 22 2c 30 0d 04 1a 41 |,"infobo|x",0...A|
|00003680| 20 20 20 c8 99 20 22 57 | 69 6d 70 5f 43 72 65 61 | .. "W|imp_Crea|
|00003690| 74 65 57 69 6e 64 6f 77 | 22 2c 2c 69 6e 66 6f 5f |teWindow|",,info_|
|000036a0| 77 69 6e 64 6f 77 5f 62 | 75 66 66 65 72 25 20 b8 |window_b|uffer% .|
|000036b0| 20 69 6e 66 6f 5f 68 61 | 6e 64 6c 65 25 0d 04 24 | info_ha|ndle%..$|
|000036c0| 68 20 20 20 c8 99 20 22 | 57 69 6d 70 5f 4c 6f 61 |h .. "|Wimp_Loa|
|000036d0| 64 54 65 6d 70 6c 61 74 | 65 22 2c 2c 65 6e 63 6f |dTemplat|e",,enco|
|000036e0| 64 65 5f 77 69 6e 64 6f | 77 5f 62 75 66 66 65 72 |de_windo|w_buffer|
|000036f0| 25 2c 74 65 78 74 5f 62 | 75 66 66 65 72 32 25 2c |%,text_b|uffer2%,|
|00003700| 28 74 65 78 74 5f 62 75 | 66 66 65 72 32 25 2b 35 |(text_bu|ffer2%+5|
|00003710| 30 30 29 2c 2d 31 2c 22 | 4c 6f 63 6b 57 69 6e 64 |00),-1,"|LockWind|
|00003720| 6f 77 22 2c 30 0d 04 2e | 45 20 20 20 c8 99 20 22 |ow",0...|E .. "|
|00003730| 57 69 6d 70 5f 43 72 65 | 61 74 65 57 69 6e 64 6f |Wimp_Cre|ateWindo|
|00003740| 77 22 2c 2c 65 6e 63 6f | 64 65 5f 77 69 6e 64 6f |w",,enco|de_windo|
|00003750| 77 5f 62 75 66 66 65 72 | 25 20 b8 20 65 6e 63 6f |w_buffer|% . enco|
|00003760| 64 65 5f 68 61 6e 64 6c | 65 25 0d 04 38 1e 20 20 |de_handl|e%..8. |
|00003770| 20 c8 99 20 22 57 69 6d | 70 5f 43 6c 6f 73 65 54 | .. "Wim|p_CloseT|
|00003780| 65 6d 70 6c 61 74 65 22 | 0d 04 42 05 e1 0d 04 4c |emplate"|..B....L|
|00003790| 04 0d 04 56 1f dd 20 f2 | 6f 70 65 6e 5f 77 69 6e |...V.. .|open_win|
|000037a0| 64 6f 77 20 28 20 70 6f | 69 6e 74 65 72 25 20 29 |dow ( po|inter% )|
|000037b0| 0d 04 60 25 20 20 20 c8 | 99 20 22 57 69 6d 70 5f |..`% .|. "Wimp_|
|000037c0| 4f 70 65 6e 57 69 6e 64 | 6f 77 22 2c 2c 70 6f 69 |OpenWind|ow",,poi|
|000037d0| 6e 74 65 72 25 0d 04 6a | 05 e1 0d 04 74 04 0d 04 |nter%..j|....t...|
|000037e0| 7e 20 dd 20 f2 63 6c 6f | 73 65 5f 77 69 6e 64 6f |~ . .clo|se_windo|
|000037f0| 77 20 28 20 70 6f 69 6e | 74 65 72 25 20 29 0d 04 |w ( poin|ter% )..|
|00003800| 88 26 20 20 20 c8 99 20 | 22 57 69 6d 70 5f 43 6c |.& .. |"Wimp_Cl|
|00003810| 6f 73 65 57 69 6e 64 6f | 77 22 2c 2c 70 6f 69 6e |oseWindo|w",,poin|
|00003820| 74 65 72 25 0d 04 92 05 | e1 0d 04 9c 04 0d 04 a6 |ter%....|........|
|00003830| 21 dd 20 f2 64 65 6c 65 | 74 65 5f 77 69 6e 64 6f |!. .dele|te_windo|
|00003840| 77 20 28 20 70 6f 69 6e | 74 65 72 25 20 29 0d 04 |w ( poin|ter% )..|
|00003850| b0 27 20 20 20 c8 99 20 | 22 57 69 6d 70 5f 44 65 |.' .. |"Wimp_De|
|00003860| 6c 65 74 65 57 69 6e 64 | 6f 77 22 2c 2c 70 6f 69 |leteWind|ow",,poi|
|00003870| 6e 74 65 72 25 0d 04 ba | 05 e1 0d 04 c4 04 0d 04 |nter%...|........|
|00003880| ce 23 dd 20 a4 70 6f 6c | 6c 5f 77 69 6d 70 20 28 |.#. .pol|l_wimp (|
|00003890| 20 6d 61 73 6b 25 20 2c | 20 72 65 74 75 72 6e 20 | mask% ,| return |
|000038a0| 29 0d 04 d8 15 20 20 20 | ea 20 72 65 61 73 6f 6e |).... |. reason|
|000038b0| 5f 63 6f 64 65 25 0d 04 | e2 35 20 20 20 c8 99 20 |_code%..|.5 .. |
|000038c0| 22 57 69 6d 70 5f 50 6f | 6c 6c 22 20 2c 20 6d 61 |"Wimp_Po|ll" , ma|
|000038d0| 73 6b 25 20 2c 20 72 65 | 74 75 72 6e 20 b8 20 72 |sk% , re|turn . r|
|000038e0| 65 61 73 6f 6e 5f 63 6f | 64 65 25 0d 04 ec 12 3d |eason_co|de%....=|
|000038f0| 20 72 65 61 73 6f 6e 5f | 63 6f 64 65 25 0d 04 f6 | reason_|code%...|
|00003900| 04 0d 05 00 21 dd 20 f2 | 75 70 64 61 74 65 5f 77 |....!. .|update_w|
|00003910| 69 6e 64 6f 77 20 28 20 | 70 6f 69 6e 74 65 72 25 |indow ( |pointer%|
|00003920| 20 29 0d 05 0a 27 20 20 | 20 c8 99 20 22 57 69 6d | )...' | .. "Wim|
|00003930| 70 5f 55 70 64 61 74 65 | 57 69 6e 64 6f 77 22 2c |p_Update|Window",|
|00003940| 2c 70 6f 69 6e 74 65 72 | 25 0d 05 14 05 e1 0d 05 |,pointer|%.......|
|00003950| 1e 04 0d 05 28 11 dd 20 | f2 63 6c 6f 73 65 5f 64 |....(.. |.close_d|
|00003960| 6f 77 6e 0d 05 32 1a 20 | 20 20 c8 99 20 22 57 69 |own..2. | .. "Wi|
|00003970| 6d 70 5f 43 6c 6f 73 65 | 44 6f 77 6e 22 0d 05 3c |mp_Close|Down"..<|
|00003980| 05 e1 0d 05 46 04 0d 05 | 50 0a dd f2 71 75 69 74 |....F...|P...quit|
|00003990| 0d 05 5a 12 20 20 20 f2 | 63 6c 6f 73 65 5f 64 6f |..Z. .|close_do|
|000039a0| 77 6e 0d 05 64 08 20 20 | 20 e0 0d 05 6e 05 e1 0d |wn..d. | ...n...|
|000039b0| 05 78 04 0d 05 82 24 dd | 20 a4 69 6e 73 74 61 6c |.x....$.| .instal|
|000039c0| 6c 5f 6f 6e 5f 69 63 6f | 6e 5f 62 61 72 20 28 20 |l_on_ico|n_bar ( |
|000039d0| 6e 61 6d 65 24 20 29 0d | 05 8c 04 0d 05 96 20 20 |name$ ).|...... |
|000039e0| 20 20 de 20 62 6c 6f 63 | 6b 25 21 32 34 20 28 a9 | . bloc|k%!24 (.|
|000039f0| 20 28 6e 61 6d 65 24 29 | 2b 31 29 0d 05 a0 04 0d | (name$)|+1).....|
|00003a00| 05 aa 18 20 20 20 62 6c | 6f 63 6b 25 21 30 20 20 |... bl|ock%!0 |
|00003a10| 20 20 20 3d 20 2d 32 0d | 05 b4 17 20 20 20 62 6c | = -2.|... bl|
|00003a20| 6f 63 6b 25 21 34 20 20 | 20 20 20 3d 20 30 0d 05 |ock%!4 | = 0..|
|00003a30| be 17 20 20 20 62 6c 6f | 63 6b 25 21 38 20 20 20 |.. blo|ck%!8 |
|00003a40| 20 20 3d 20 30 0d 05 c8 | 18 20 20 20 62 6c 6f 63 | = 0...|. bloc|
|00003a50| 6b 25 21 31 32 20 20 20 | 20 3d 20 37 30 0d 05 d2 |k%!12 | = 70...|
|00003a60| 18 20 20 20 62 6c 6f 63 | 6b 25 21 31 36 20 20 20 |. bloc|k%!16 |
|00003a70| 20 3d 20 37 30 0d 05 dc | 25 20 20 20 62 6c 6f 63 | = 70...|% bloc|
|00003a80| 6b 25 21 32 30 20 20 20 | 20 3d 20 25 31 30 30 30 |k%!20 | = %1000|
|00003a90| 30 31 30 30 30 30 30 30 | 31 30 0d 05 e6 1b 20 20 |01000000|10.... |
|00003aa0| 20 24 28 62 6c 6f 63 6b | 25 21 32 34 29 20 3d 20 | $(block|%!24) = |
|00003ab0| 6e 61 6d 65 24 0d 05 f0 | 17 20 20 20 62 6c 6f 63 |name$...|. bloc|
|00003ac0| 6b 25 21 32 38 20 20 20 | 20 3d 20 31 0d 05 fa 20 |k%!28 | = 1... |
|00003ad0| 20 20 20 62 6c 6f 63 6b | 25 21 33 32 20 20 20 20 | block|%!32 |
|00003ae0| 3d 20 a9 28 6e 61 6d 65 | 24 29 2b 31 0d 06 04 04 |= .(name|$)+1....|
|00003af0| 0d 06 0e 2b 20 20 20 c8 | 99 20 22 57 69 6d 70 5f |...+ .|. "Wimp_|
|00003b00| 43 72 65 61 74 65 49 63 | 6f 6e 22 2c 2c 62 6c 6f |CreateIc|on",,blo|
|00003b10| 63 6b 25 20 b8 20 69 63 | 6f 6e 25 0d 06 18 04 0d |ck% . ic|on%.....|
|00003b20| 06 22 0a 3d 69 63 6f 6e | 25 0d 06 2c 04 0d 06 36 |.".=icon|%..,...6|
|00003b30| 1a dd 20 f2 73 65 65 5f | 77 68 61 74 5f 77 69 6d |.. .see_|what_wim|
|00003b40| 70 5f 77 61 6e 74 73 0d | 06 40 04 0d 06 4a 16 20 |p_wants.|.@...J. |
|00003b50| 20 20 c8 8e 20 72 65 74 | 75 72 6e 25 21 31 36 20 | .. ret|urn%!16 |
|00003b60| ca 0d 06 54 04 0d 06 5e | 16 20 20 20 20 20 20 c9 |...T...^|. .|
|00003b70| 20 20 30 20 3a 20 f2 71 | 75 69 74 0d 06 68 2e 20 | 0 : .q|uit..h. |
|00003b80| 20 20 20 20 20 c9 20 20 | 33 20 3a 20 66 69 6c 65 | . |3 : file|
|00003b90| 6e 61 6d 65 24 3d a4 73 | 74 72 69 6e 67 28 72 65 |name$=.s|tring(re|
|00003ba0| 74 75 72 6e 25 2b 34 34 | 29 0d 06 72 24 20 20 20 |turn%+44|)..r$ |
|00003bb0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 f2 6c 6f | | .lo|
|00003bc0| 61 64 28 66 69 6c 65 6e | 61 6d 65 24 29 0d 06 7c |ad(filen|ame$)..||
|00003bd0| 0b 20 20 20 20 20 20 7f | 0d 06 86 04 0d 06 90 08 |. .|........|
|00003be0| 20 20 20 cb 0d 06 9a 04 | 0d 06 a4 05 e1 0d 06 ae | .....|........|
|00003bf0| 04 0d 06 b8 16 dd 20 f2 | 69 63 6f 6e 5f 62 61 72 |...... .|icon_bar|
|00003c00| 5f 62 75 74 74 6f 6e 0d | 06 c2 04 0d 06 cc 15 20 |_button.|....... |
|00003c10| 20 20 c8 8e 20 72 65 74 | 75 72 6e 25 21 38 20 ca | .. ret|urn%!8 .|
|00003c20| 0d 06 d6 10 20 20 20 20 | 20 20 c9 20 34 20 20 3a |.... | . 4 :|
|00003c30| 0d 06 e0 47 20 20 20 20 | 20 20 c9 20 32 20 20 3a |...G | . 2 :|
|00003c40| 20 20 f2 63 72 65 61 74 | 65 5f 6d 65 6e 75 20 28 | .creat|e_menu (|
|00003c50| 6d 65 6e 75 25 20 2c 20 | 21 72 65 74 75 72 6e 25 |menu% , |!return%|
|00003c60| 2d 6d 65 6e 75 25 21 31 | 36 2f 32 2d 32 34 2c 35 |-menu%!1|6/2-24,5|
|00003c70| 36 2b 33 2a 34 34 29 0d | 06 ea 10 20 20 20 20 20 |6+3*44).|... |
|00003c80| 20 c9 20 31 20 20 3a 0d | 06 f4 08 20 20 20 cb 0d | . 1 :.|... ..|
|00003c90| 06 fe 04 0d 07 08 05 e1 | 0d 07 12 04 0d 07 1c 12 |........|........|
|00003ca0| dd 20 f2 6d 65 6e 75 5f | 73 65 6c 65 63 74 0d 07 |. .menu_|select..|
|00003cb0| 26 04 0d 07 30 14 20 20 | 20 c8 8e 20 21 72 65 74 |&...0. | .. !ret|
|00003cc0| 75 72 6e 25 20 ca 0d 07 | 3a 1f 20 20 20 20 20 20 |urn% ...|:. |
|00003cd0| c9 20 20 30 20 20 3a 20 | 20 f4 20 27 49 6e 66 6f |. 0 : | . 'Info|
|00003ce0| 20 62 6f 78 27 0d 07 44 | 18 20 20 20 20 20 20 c9 | box'..D|. .|
|00003cf0| 20 20 31 20 20 3a 20 20 | f2 71 75 69 74 0d 07 4e | 1 : |.quit..N|
|00003d00| 0b 20 20 20 20 20 20 7f | 0d 07 58 08 20 20 20 cb |. .|..X. .|
|00003d10| 0d 07 62 04 0d 07 6c 28 | 20 20 20 c8 99 20 22 57 |..b...l(| .. "W|
|00003d20| 69 6d 70 5f 47 65 74 50 | 6f 69 6e 74 65 72 49 6e |imp_GetP|ointerIn|
|00003d30| 66 6f 22 2c 2c 72 65 74 | 75 72 6e 25 0d 07 76 04 |fo",,ret|urn%..v.|
|00003d40| 0d 07 80 05 e1 0d 07 8a | 04 0d 07 94 16 dd f2 63 |........|.......c|
|00003d50| 72 65 61 74 65 5f 6d 61 | 69 6e 5f 6d 65 6e 75 0d |reate_ma|in_menu.|
|00003d60| 07 9e 04 0d 07 a8 1f 20 | 20 20 24 6d 65 6e 75 25 |....... | $menu%|
|00003d70| 20 20 20 20 20 20 3d 20 | 20 22 45 6e 63 6f 64 65 | = | "Encode|
|00003d80| 72 22 0d 07 b2 17 20 20 | 20 6d 65 6e 75 25 3f 31 |r".... | menu%?1|
|00003d90| 32 20 20 20 20 3d 20 20 | 37 0d 07 bc 17 20 20 20 |2 = |7.... |
|00003da0| 6d 65 6e 75 25 3f 31 33 | 20 20 20 20 3d 20 20 32 |menu%?13| = 2|
|00003db0| 0d 07 c6 17 20 20 20 6d | 65 6e 75 25 3f 31 34 20 |.... m|enu%?14 |
|00003dc0| 20 20 20 3d 20 20 37 0d | 07 d0 17 20 20 20 6d 65 | = 7.|... me|
|00003dd0| 6e 75 25 3f 31 35 20 20 | 20 20 3d 20 20 30 0d 07 |nu%?15 | = 0..|
|00003de0| da 1f 20 20 20 6d 65 6e | 75 25 21 31 36 20 20 20 |.. men|u%!16 |
|00003df0| 20 3d 20 20 28 36 2a 31 | 36 29 2b 31 32 0d 07 e4 | = (6*1|6)+12...|
|00003e00| 18 20 20 20 6d 65 6e 75 | 25 21 32 30 20 20 20 20 |. menu|%!20 |
|00003e10| 3d 20 20 34 34 0d 07 ee | 17 20 20 20 6d 65 6e 75 |= 44...|. menu|
|00003e20| 25 21 32 34 20 20 20 20 | 3d 20 20 30 0d 07 f8 17 |%!24 |= 0....|
|00003e30| 20 20 20 6d 65 6e 75 25 | 21 32 38 20 20 20 20 3d | menu%|!28 =|
|00003e40| 20 20 30 0d 08 02 22 20 | 20 20 6d 65 6e 75 25 21 | 0..." | menu%!|
|00003e50| 33 32 20 20 20 20 3d 20 | 20 69 6e 66 6f 5f 68 61 |32 = | info_ha|
|00003e60| 6e 64 6c 65 25 0d 08 0c | 1e 20 20 20 6d 65 6e 75 |ndle%...|. menu|
|00003e70| 25 21 33 36 20 20 20 20 | 3d 20 20 26 37 30 30 30 |%!36 |= &7000|
|00003e80| 30 30 31 0d 08 16 1e 20 | 20 20 24 28 6d 65 6e 75 |001.... | $(menu|
|00003e90| 25 2b 34 30 29 20 3d 20 | 20 22 20 49 6e 66 6f 20 |%+40) = | " Info |
|00003ea0| 22 0d 08 20 19 20 20 20 | 6d 65 6e 75 25 21 35 32 |".. . |menu%!52|
|00003eb0| 20 20 20 20 3d 20 20 26 | 38 30 0d 08 2a 18 20 20 | = &|80..*. |
|00003ec0| 20 6d 65 6e 75 25 21 35 | 36 20 20 20 20 3d 20 20 | menu%!5|6 = |
|00003ed0| 2d 31 0d 08 34 1e 20 20 | 20 6d 65 6e 75 25 21 36 |-1..4. | menu%!6|
|00003ee0| 30 20 20 20 20 3d 20 20 | 26 37 30 30 30 30 30 31 |0 = |&7000001|
|00003ef0| 0d 08 3e 1e 20 20 20 24 | 28 6d 65 6e 75 25 2b 36 |..>. $|(menu%+6|
|00003f00| 34 29 20 3d 20 20 22 20 | 51 75 69 74 20 22 0d 08 |4) = " |Quit "..|
|00003f10| 48 04 0d 08 52 05 e1 0d | 08 5c 04 0d 08 66 31 dd |H...R...|.\...f1.|
|00003f20| 20 f2 63 72 65 61 74 65 | 5f 6d 65 6e 75 20 28 20 | .create|_menu ( |
|00003f30| 70 6f 69 6e 74 65 72 25 | 20 2c 20 78 5f 70 6f 73 |pointer%| , x_pos|
|00003f40| 25 20 2c 20 79 5f 70 6f | 73 25 20 29 0d 08 70 04 |% , y_po|s% )..p.|
|00003f50| 0d 08 7a 37 20 20 20 c8 | 99 20 22 57 69 6d 70 5f |..z7 .|. "Wimp_|
|00003f60| 43 72 65 61 74 65 4d 65 | 6e 75 22 2c 2c 70 6f 69 |CreateMe|nu",,poi|
|00003f70| 6e 74 65 72 25 20 2c 20 | 78 5f 70 6f 73 25 20 2c |nter% , |x_pos% ,|
|00003f80| 20 79 5f 70 6f 73 25 0d | 08 84 04 0d 08 8e 05 e1 | y_pos%.|........|
|00003f90| 0d 08 98 04 0d 08 a2 16 | dd a4 73 74 72 69 6e 67 |........|..string|
|00003fa0| 28 61 64 64 72 65 73 73 | 25 29 0d 08 ac 04 0d 08 |(address|%)......|
|00003fb0| b6 0b 20 20 20 ea 20 73 | 24 0d 08 c0 04 0d 08 ca |.. . s|$.......|
|00003fc0| 0c 20 20 20 73 24 3d 22 | 22 0d 08 d4 04 0d 08 de |. s$="|".......|
|00003fd0| 32 20 20 20 c8 95 20 3f | 61 64 64 72 65 73 73 25 |2 .. ?|address%|
|00003fe0| 3c 3e 30 20 80 20 3f 61 | 64 64 72 65 73 73 25 3c |<>0 . ?a|ddress%<|
|00003ff0| 3e 31 33 20 80 20 a9 28 | 73 24 29 3c 32 35 30 0d |>13 . .(|s$)<250.|
|00004000| 08 e8 04 0d 08 f2 1a 20 | 20 20 20 20 20 73 24 2b |....... | s$+|
|00004010| 3d bd 28 3f 61 64 64 72 | 65 73 73 25 29 0d 08 fc |=.(?addr|ess%)...|
|00004020| 15 20 20 20 20 20 20 61 | 64 64 72 65 73 73 25 2b |. a|ddress%+|
|00004030| 3d 31 0d 09 06 04 0d 09 | 10 08 20 20 20 ce 0d 09 |=1......|.. ...|
|00004040| 1a 04 0d 09 24 07 3d 73 | 24 0d 09 2e 04 0d 09 38 |....$.=s|$......8|
|00004050| 21 dd a4 65 72 72 6f 72 | 28 45 72 72 6f 72 24 2c |!..error|(Error$,|
|00004060| 46 6c 61 67 73 25 2c 54 | 69 74 6c 65 24 29 0d 09 |Flags%,T|itle$)..|
|00004070| 42 04 0d 09 4c 0f 20 20 | 20 ea 20 63 6c 69 63 6b |B...L. | . click|
|00004080| 25 0d 09 56 10 20 20 20 | 21 62 6c 6f 63 6b 25 3d |%..V. |!block%=|
|00004090| 30 0d 09 60 1e 20 20 20 | 24 28 62 6c 6f 63 6b 25 |0..`. |$(block%|
|000040a0| 2b 34 29 3d 45 72 72 6f | 72 24 2b bd 28 30 29 0d |+4)=Erro|r$+.(0).|
|000040b0| 09 6a 3a 20 20 20 c8 99 | 22 57 69 6d 70 5f 52 65 |.j: ..|"Wimp_Re|
|000040c0| 70 6f 72 74 45 72 72 6f | 72 22 2c 62 6c 6f 63 6b |portErro|r",block|
|000040d0| 25 2c 46 6c 61 67 73 25 | 2c 54 69 74 6c 65 24 20 |%,Flags%|,Title$ |
|000040e0| b8 20 2c 63 6c 69 63 6b | 25 0d 09 74 04 0d 09 7e |. ,click|%..t...~|
|000040f0| 0b 3d 63 6c 69 63 6b 25 | 0d 09 88 04 0d 09 92 15 |.=click%|........|
|00004100| dd f2 6c 6f 61 64 28 66 | 69 6c 65 6e 61 6d 65 24 |..load(f|ilename$|
|00004110| 29 0d 09 9c 04 0d 09 a6 | 14 20 20 20 ea 20 6c 6f |).......|. . lo|
|00004120| 61 64 25 2c 74 79 70 65 | 25 0d 09 b0 12 20 20 20 |ad%,type|%.... |
|00004130| 64 69 72 65 63 74 6f 72 | 79 3d a3 0d 09 ba 2e 20 |director|y=..... |
|00004140| 20 20 c8 99 20 22 4f 53 | 5f 46 69 6c 65 22 2c 35 | .. "OS|_File",5|
|00004150| 2c 66 69 6c 65 6e 61 6d | 65 24 20 b8 20 74 79 70 |,filenam|e$ . typ|
|00004160| 65 25 2c 2c 6c 6f 61 64 | 25 0d 09 c4 23 20 20 20 |e%,,load|%...# |
|00004170| 66 69 6c 65 74 79 70 65 | 25 3d 28 6c 6f 61 64 25 |filetype|%=(load%|
|00004180| 3e 3e 3e 38 29 20 80 20 | 26 46 46 46 0d 09 ce 66 |>>>8) . |&FFF...f|
|00004190| 20 20 20 e7 20 66 69 6c | 65 74 79 70 65 25 3d 26 | . fil|etype%=&|
|000041a0| 31 30 30 20 8c 20 64 75 | 6d 6d 79 25 3d a4 65 72 |100 . du|mmy%=.er|
|000041b0| 72 6f 72 28 22 45 6e 63 | 6f 64 69 6e 67 20 61 20 |ror("Enc|oding a |
|000041c0| 70 72 65 76 69 6f 75 73 | 6c 79 20 65 6e 63 6f 64 |previous|ly encod|
|000041d0| 65 64 20 66 69 6c 65 20 | 69 73 20 73 69 6c 6c 79 |ed file |is silly|
|000041e0| 20 21 22 2c 31 2c 22 45 | 6e 63 6f 64 65 72 22 29 | !",1,"E|ncoder")|
|000041f0| 3a e1 0d 09 d8 1e 20 20 | 20 e7 20 74 79 70 65 25 |:..... | . type%|
|00004200| 3d 32 20 8c 20 64 69 72 | 65 63 74 6f 72 79 3d b9 |=2 . dir|ectory=.|
|00004210| 0d 09 e2 1e 20 20 20 62 | 6c 6f 63 6b 25 21 30 3d |.... b|lock%!0=|
|00004220| 65 6e 63 6f 64 65 5f 68 | 61 6e 64 6c 65 25 0d 09 |encode_h|andle%..|
|00004230| ec 13 20 20 20 62 6c 6f | 63 6b 25 21 34 3d 32 30 |.. blo|ck%!4=20|
|00004240| 30 0d 09 f6 13 20 20 20 | 62 6c 6f 63 6b 25 21 38 |0.... |block%!8|
|00004250| 3d 33 30 30 0d 0a 00 14 | 20 20 20 62 6c 6f 63 6b |=300....| block|
|00004260| 25 21 31 32 3d 38 30 30 | 0d 0a 0a 14 20 20 20 62 |%!12=800|.... b|
|00004270| 6c 6f 63 6b 25 21 31 36 | 3d 35 30 30 0d 0a 14 12 |lock%!16|=500....|
|00004280| 20 20 20 62 6c 6f 63 6b | 25 21 32 30 3d 30 0d 0a | block|%!20=0..|
|00004290| 1e 12 20 20 20 62 6c 6f | 63 6b 25 21 32 34 3d 30 |.. blo|ck%!24=0|
|000042a0| 0d 0a 28 13 20 20 20 62 | 6c 6f 63 6b 25 21 32 38 |..(. b|lock%!28|
|000042b0| 3d 2d 31 0d 0a 32 1b 20 | 20 20 f2 6f 70 65 6e 5f |=-1..2. | .open_|
|000042c0| 77 69 6e 64 6f 77 28 62 | 6c 6f 63 6b 25 29 0d 0a |window(b|lock%)..|
|000042d0| 3c 05 e1 0d 0a 46 04 0d | 0a 50 32 dd f2 70 72 6f |<....F..|.P2..pro|
|000042e0| 63 65 73 73 5f 74 72 65 | 65 28 62 75 66 66 65 72 |cess_tre|e(buffer|
|000042f0| 25 2c 66 69 6c 65 24 2c | 6c 65 76 65 6c 25 2c 70 |%,file$,|level%,p|
|00004300| 61 73 73 77 6f 72 64 24 | 29 0d 0a 5a 38 20 20 20 |assword$|)..Z8 |
|00004310| ea 20 70 6f 69 6e 74 65 | 72 25 2c 6f 62 6a 65 63 |. pointe|r%,objec|
|00004320| 74 5f 74 79 70 65 25 2c | 6e 61 6d 65 24 2c 72 65 |t_type%,|name$,re|
|00004330| 61 64 25 2c 6c 6f 6f 70 | 25 2c 6f 66 66 73 65 74 |ad%,loop|%,offset|
|00004340| 25 0d 0a 64 70 20 20 20 | e7 20 66 69 6c 65 24 3d |%..dp |. file$=|
|00004350| 22 22 20 8c 20 64 75 6d | 6d 79 25 3d a4 65 72 72 |"" . dum|my%=.err|
|00004360| 6f 72 28 22 59 6f 75 20 | 6d 75 73 74 20 65 6e 74 |or("You |must ent|
|00004370| 65 72 20 61 20 6e 61 6d | 65 20 62 65 66 6f 72 65 |er a nam|e before|
|00004380| 20 74 72 79 69 6e 67 20 | 74 6f 20 61 6c 74 65 72 | trying |to alter|
|00004390| 20 61 74 74 72 69 62 75 | 74 65 73 2e 22 2c 31 2c | attribu|tes.",1,|
|000043a0| 22 4d 75 6c 74 69 20 61 | 63 63 65 73 73 22 29 3a |"Multi a|ccess"):|
|000043b0| e1 0d 0a 6e 2a 20 20 20 | c8 99 20 22 4f 53 5f 46 |...n* |.. "OS_F|
|000043c0| 69 6c 65 22 2c 35 2c 66 | 69 6c 65 24 20 b8 20 6f |ile",5,f|ile$ . o|
|000043d0| 62 6a 65 63 74 5f 74 79 | 70 65 25 0d 0a 78 19 20 |bject_ty|pe%..x. |
|000043e0| 20 20 e7 20 6f 62 6a 65 | 63 74 5f 74 79 70 65 25 | . obje|ct_type%|
|000043f0| 3d 31 20 8c 0d 0a 82 1e | 20 20 20 20 20 20 f2 70 |=1 .....| .p|
|00004400| 72 6f 63 65 73 73 5f 66 | 69 6c 65 28 66 69 6c 65 |rocess_f|ile(file|
|00004410| 24 29 0d 0a 8c 08 20 20 | 20 cc 0d 0a 96 4f 20 20 |$).... | ....O |
|00004420| 20 20 20 20 c8 99 20 22 | 4f 53 5f 47 42 50 42 22 | .. "|OS_GBPB"|
|00004430| 2c 39 2c 66 69 6c 65 24 | 2b bd 28 30 29 2c 62 75 |,9,file$|+.(0),bu|
|00004440| 66 66 65 72 25 2c 31 2c | 30 2c 32 35 36 2c 22 2a |ffer%,1,|0,256,"*|
|00004450| 22 2b bd 28 30 29 20 b8 | 20 2c 2c 2c 72 65 61 64 |"+.(0) .| ,,,read|
|00004460| 25 2c 6f 66 66 73 65 74 | 25 0d 0a a0 18 20 20 20 |%,offset|%.... |
|00004470| 20 20 20 c8 95 20 6f 66 | 66 73 65 74 25 3c 3e 2d | .. of|fset%<>-|
|00004480| 31 0d 0a aa 2f 20 20 20 | 20 20 20 20 20 20 6e 61 |1.../ | na|
|00004490| 6d 65 24 3d 66 69 6c 65 | 24 2b 22 2e 22 2b a4 66 |me$=file|$+"."+.f|
|000044a0| 69 6c 65 6e 61 6d 65 28 | 62 75 66 66 65 72 25 29 |ilename(|buffer%)|
|000044b0| 0d 0a b4 2a 20 20 20 20 | 20 20 20 20 20 f2 65 6e |...* | .en|
|000044c0| 63 6f 64 65 5f 66 69 6c | 65 28 6e 61 6d 65 24 2c |code_fil|e(name$,|
|000044d0| 70 61 73 73 77 6f 72 64 | 24 29 0d 0a be 30 20 20 |password|$)...0 |
|000044e0| 20 20 20 20 20 20 20 c8 | 99 20 22 4f 53 5f 46 69 | .|. "OS_Fi|
|000044f0| 6c 65 22 2c 35 2c 6e 61 | 6d 65 24 20 b8 20 6f 62 |le",5,na|me$ . ob|
|00004500| 6a 65 63 74 5f 74 79 70 | 65 25 0d 0a c8 1f 20 20 |ject_typ|e%.... |
|00004510| 20 20 20 20 20 20 20 e7 | 20 6f 62 6a 65 63 74 5f | .| object_|
|00004520| 74 79 70 65 25 3d 30 20 | 8c 0d 0a d2 52 20 20 20 |type%=0 |....R |
|00004530| 20 20 20 20 20 20 20 20 | 20 64 75 6d 6d 79 25 3d | | dummy%=|
|00004540| a4 65 72 72 6f 72 28 22 | 4f 6f 70 73 2c 20 74 68 |.error("|Oops, th|
|00004550| 61 74 20 66 69 6c 65 20 | 64 6f 65 73 6e 27 74 20 |at file |doesn't |
|00004560| 65 78 69 73 74 2e 22 2c | 31 2c 22 4d 75 6c 74 69 |exist.",|1,"Multi|
|00004570| 20 61 63 63 65 73 73 22 | 29 3a e1 0d 0a dc 0e 20 | access"|):..... |
|00004580| 20 20 20 20 20 20 20 20 | cc 0d 0a e6 22 20 20 20 | |...." |
|00004590| 20 20 20 20 20 20 20 20 | 20 e7 20 6f 62 6a 65 63 | | . objec|
|000045a0| 74 5f 74 79 70 65 25 3d | 32 20 8c 0d 0a f0 42 20 |t_type%=|2 ....B |
|000045b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 f2 70 | | .p|
|000045c0| 72 6f 63 65 73 73 5f 74 | 72 65 65 28 62 75 66 66 |rocess_t|ree(buff|
|000045d0| 65 72 25 2c 6e 61 6d 65 | 24 2c 6c 65 76 65 6c 25 |er%,name|$,level%|
|000045e0| 2b 31 2c 70 61 73 73 77 | 6f 72 64 24 29 0d 0a fa |+1,passw|ord$)...|
|000045f0| 11 20 20 20 20 20 20 20 | 20 20 20 20 20 cd 0d 0b |. | ...|
|00004600| 04 0e 20 20 20 20 20 20 | 20 20 20 cd 0d 0b 0e 53 |.. | ....S|
|00004610| 20 20 20 20 20 20 20 20 | 20 c8 99 20 22 4f 53 5f | | .. "OS_|
|00004620| 47 42 50 42 22 2c 39 2c | 66 69 6c 65 24 2c 62 75 |GBPB",9,|file$,bu|
|00004630| 66 66 65 72 25 2c 31 2c | 6f 66 66 73 65 74 25 2c |ffer%,1,|offset%,|
|00004640| 32 35 36 2c 22 2a 22 2b | bd 28 30 29 20 b8 20 2c |256,"*"+|.(0) . ,|
|00004650| 2c 2c 72 65 61 64 25 2c | 6f 66 66 73 65 74 25 0d |,,read%,|offset%.|
|00004660| 0b 18 0b 20 20 20 20 20 | 20 ce 0d 0b 22 08 20 20 |... | ...". |
|00004670| 20 cd 0d 0b 2c 05 e1 0d | 0b 36 04 0d 0b 40 17 dd | ...,...|.6...@..|
|00004680| a4 66 69 6c 65 6e 61 6d | 65 28 62 75 66 66 65 72 |.filenam|e(buffer|
|00004690| 25 29 0d 0b 4a 17 20 20 | 20 ea 20 70 6f 69 6e 74 |%)..J. | . point|
|000046a0| 65 72 25 2c 6e 61 6d 65 | 24 0d 0b 54 0f 20 20 20 |er%,name|$..T. |
|000046b0| 6e 61 6d 65 24 3d 22 22 | 0d 0b 5e 11 20 20 20 70 |name$=""|..^. p|
|000046c0| 6f 69 6e 74 65 72 25 3d | 30 0d 0b 68 20 20 20 20 |ointer%=|0..h |
|000046d0| c8 95 20 3f 28 62 75 66 | 66 65 72 25 2b 70 6f 69 |.. ?(buf|fer%+poi|
|000046e0| 6e 74 65 72 25 29 3c 3e | 30 0d 0b 72 27 20 20 20 |nter%)<>|0..r' |
|000046f0| 20 20 20 6e 61 6d 65 24 | 2b 3d bd 28 3f 28 62 75 | name$|+=.(?(bu|
|00004700| 66 66 65 72 25 2b 70 6f | 69 6e 74 65 72 25 29 29 |ffer%+po|inter%))|
|00004710| 0d 0b 7c 15 20 20 20 20 | 20 20 70 6f 69 6e 74 65 |..|. | pointe|
|00004720| 72 25 2b 3d 31 0d 0b 86 | 08 20 20 20 ce 0d 0b 90 |r%+=1...|. ....|
|00004730| 0a 3d 6e 61 6d 65 24 0d | 0b 9a 04 0d 0b a4 19 dd |.=name$.|........|
|00004740| f2 70 72 6f 63 65 73 73 | 5f 66 69 6c 65 28 6e 61 |.process|_file(na|
|00004750| 6d 65 24 29 0d 0b ae 0e | 20 20 20 ea 20 61 74 74 |me$)....| . att|
|00004760| 72 25 0d 0b b8 28 20 20 | 20 c8 99 20 22 4f 53 5f |r%...( | .. "OS_|
|00004770| 46 69 6c 65 22 2c 35 2c | 6e 61 6d 65 24 20 b8 20 |File",5,|name$ . |
|00004780| 2c 2c 2c 2c 2c 61 74 74 | 72 25 0d 0b c2 41 20 20 |,,,,,att|r%...A |
|00004790| 20 61 74 74 72 25 3d 28 | 61 74 74 72 25 20 80 20 | attr%=(|attr% . |
|000047a0| 25 31 31 31 31 31 31 31 | 31 31 31 31 31 31 31 31 |%1111111|11111111|
|000047b0| 31 31 31 31 31 31 31 31 | 31 30 30 30 30 30 30 30 |11111111|10000000|
|000047c0| 30 30 30 30 29 2b 66 6c | 61 67 25 0d 0b cc 24 20 |0000)+fl|ag%...$ |
|000047d0| 20 20 c8 99 20 22 4f 53 | 5f 46 69 6c 65 22 2c 34 | .. "OS|_File",4|
|000047e0| 2c 6e 61 6d 65 24 2c 2c | 2c 2c 61 74 74 72 25 0d |,name$,,|,,attr%.|
|000047f0| 0b d6 05 e1 0d ff 46 69 | 6c 65 44 61 74 61 82 21 |......Fi|leData.!|
|00004800| 53 70 72 69 74 65 73 00 | 00 fd b4 03 00 00 42 f9 |Sprites.|......B.|
|00004810| ff ff cd 9e ee 0a 03 00 | 4b 0b 02 00 00 00 10 00 |........|K.......|
|00004820| 00 00 b8 03 00 00 3c 01 | 00 00 21 65 6e 63 6f 64 |......<.|..!encod|
|00004830| 65 72 00 00 00 00 03 00 | 00 00 10 00 00 00 00 00 |er......|........|
|00004840| 00 00 1f 00 00 00 2c 00 | 00 00 2c 00 00 00 0c 00 |......,.|..,.....|
|00004850| 00 00 44 44 44 44 44 44 | 44 44 44 44 44 44 44 44 |..DDDDDD|DDDDDDDD|
|00004860| 44 44 44 22 22 22 22 22 | 22 22 22 22 22 22 22 22 |DDD"""""|""""""""|
|00004870| 22 44 44 22 22 22 22 22 | 22 22 22 22 22 22 22 22 |"DD"""""|""""""""|
|00004880| 22 44 44 22 22 22 22 22 | 42 74 77 22 22 22 22 22 |"DD"""""|Btw"""""|
|00004890| 22 44 44 22 22 22 22 42 | 74 77 77 77 22 22 22 22 |"DD""""B|twww""""|
|000048a0| 22 44 44 22 22 22 22 44 | 77 77 77 77 27 22 22 22 |"DD""""D|wwww'"""|
|000048b0| 22 44 44 22 22 22 22 42 | 74 77 77 77 22 22 22 22 |"DD""""B|twww""""|
|000048c0| 22 44 44 22 22 22 22 22 | 44 77 77 27 22 22 22 22 |"DD"""""|Dww'""""|
|000048d0| 22 44 44 22 22 22 22 22 | 22 74 27 22 22 22 22 22 |"DD"""""|"t'"""""|
|000048e0| 22 44 44 22 22 22 22 22 | 42 74 77 22 22 22 22 22 |"DD"""""|Btw"""""|
|000048f0| 22 44 44 22 22 22 22 22 | 44 77 77 27 22 22 22 22 |"DD"""""|Dww'""""|
|00004900| 22 44 44 22 22 22 22 22 | 44 77 77 27 22 22 22 22 |"DD"""""|Dww'""""|
|00004910| 22 44 44 22 22 22 22 42 | 74 77 77 77 22 22 22 22 |"DD""""B|twww""""|
|00004920| 22 44 44 22 22 22 22 42 | 74 77 77 77 22 22 22 22 |"DD""""B|twww""""|
|00004930| 22 44 44 22 22 22 22 22 | 22 22 22 22 22 22 22 22 |"DD"""""|""""""""|
|00004940| 22 44 44 22 22 22 22 22 | 22 22 22 22 22 22 22 22 |"DD"""""|""""""""|
|00004950| 22 44 44 44 44 44 44 44 | 44 44 44 44 44 44 44 44 |"DDDDDDD|DDDDDDDD|
|00004960| 44 44 6c 02 00 00 66 69 | 6c 65 5f 31 30 30 00 00 |DDl...fi|le_100..|
|00004970| 00 00 03 00 00 00 11 00 | 00 00 00 00 00 00 1f 00 |........|........|
|00004980| 00 00 2c 00 00 00 4c 01 | 00 00 0c 00 00 00 44 22 |..,...L.|......D"|
|00004990| 22 22 22 22 22 22 22 22 | 22 22 22 22 22 44 44 22 |""""""""|"""""DD"|
|000049a0| 22 22 22 22 22 22 22 22 | 22 22 22 22 22 44 44 22 |""""""""|"""""DD"|
|000049b0| 22 22 22 22 77 77 77 77 | 26 22 22 22 22 44 44 22 |""""wwww|&""""DD"|
|000049c0| 22 22 22 76 66 76 77 77 | 77 27 22 22 22 44 44 22 |"""vfvww|w'"""DD"|
|000049d0| 22 22 66 76 77 77 77 77 | 77 77 27 22 22 44 44 22 |""fvwwww|ww'""DD"|
|000049e0| 22 62 76 42 55 55 55 55 | 25 72 67 22 22 44 44 22 |"bvBUUUU|%rg""DD"|
|000049f0| 22 62 57 55 44 77 77 27 | 52 55 67 22 22 44 44 22 |"bWUDww'|RUg""DD"|
|00004a00| 22 52 55 55 55 55 55 55 | 55 55 55 22 22 44 44 22 |"RUUUUUU|UUU""DD"|
|00004a10| 22 35 33 33 33 33 33 33 | 33 33 33 25 22 44 44 22 |"5333333|333%"DD"|
|00004a20| 22 35 33 33 33 33 33 33 | 33 33 33 25 22 44 44 22 |"5333333|333%"DD"|
|00004a30| 22 35 33 33 33 73 77 33 | 33 33 33 25 22 44 44 22 |"5333sw3|333%"DD"|
|00004a40| 22 35 33 33 33 73 76 33 | 33 33 33 25 22 44 44 22 |"5333sv3|333%"DD"|
|00004a50| 22 35 33 33 33 67 66 37 | 33 33 33 25 22 44 44 22 |"5333gf7|333%"DD"|
|00004a60| 22 52 35 33 33 33 33 33 | 33 33 55 22 22 44 44 22 |"R533333|33U""DD"|
|00004a70| 22 22 52 55 33 33 33 33 | 53 55 22 22 22 44 44 44 |""RU3333|SU"""DDD|
|00004a80| 44 44 44 44 55 55 55 55 | 45 44 44 44 44 44 00 00 |DDDDUUUU|EDDDDD..|
|00004a90| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00004aa0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00004ab0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00004ac0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00004ad0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00004ae0| 00 00 00 f0 ff ff ff ff | ff 00 00 00 00 00 00 00 |........|........|
|00004af0| 00 00 ff ff 00 00 00 00 | f0 ff 0f 00 00 00 00 00 |........|........|
|00004b00| 00 f0 ff 00 00 00 00 00 | 00 f0 ff 00 00 00 00 00 |........|........|
|00004b10| 00 f0 0f 00 00 00 00 00 | 00 00 ff 00 00 00 00 00 |........|........|
|00004b20| 00 f0 ff ff ff ff ff ff | ff ff ff 00 00 00 00 00 |........|........|
|00004b30| 00 ff ff ff ff ff ff ff | ff ff ff 0f 00 00 00 00 |........|........|
|00004b40| 00 ff ff ff ff ff ff ff | ff ff ff 0f 00 00 00 00 |........|........|
|00004b50| 00 ff ff ff ff ff ff ff | ff ff ff 0f 00 00 00 00 |........|........|
|00004b60| 00 ff ff ff ff ff ff ff | ff ff ff 0f 00 00 00 00 |........|........|
|00004b70| 00 ff ff ff ff ff ff ff | ff ff ff 0f 00 00 00 00 |........|........|
|00004b80| 00 f0 ff ff ff ff ff ff | ff ff ff 00 00 00 00 00 |........|........|
|00004b90| 00 00 f0 ff ff ff ff ff | ff ff 00 00 00 00 00 00 |........|........|
|00004ba0| 00 00 00 00 ff ff ff ff | 0f 00 00 00 00 00 00 00 |........|........|
|00004bb0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00004bc0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 46 69 |........|......Fi|
|00004bd0| 6c 65 44 61 74 61 82 54 | 65 6d 70 6c 61 74 65 73 |leData.T|emplates|
|00004be0| 00 fd c9 02 00 00 42 ec | ff ff 49 3a 3e 1a 03 00 |......B.|..I:>...|
|00004bf0| e4 e9 ff ff ff ff 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00004c00| 00 00 44 00 00 00 d9 00 | 00 00 01 00 00 00 4c 6f |..D.....|......Lo|
|00004c10| 63 6b 57 69 6e 64 6f 77 | 0d 00 1d 01 00 00 ac 01 |ckWindow|........|
|00004c20| 00 00 01 00 00 00 69 6e | 66 6f 62 6f 78 0d 00 00 |......in|fobox...|
|00004c30| 00 00 00 00 00 00 84 01 | 00 00 58 01 00 00 dc 03 |........|..X.....|
|00004c40| 00 00 20 02 00 00 00 00 | 00 00 00 00 00 00 2c 07 |.. .....|......,.|
|00004c50| 00 00 12 00 05 87 07 02 | 07 01 03 01 0c 00 00 00 |........|........|
|00004c60| 00 00 38 ff ff ff 58 02 | 00 00 00 00 00 00 3d 00 |..8...X.|......=.|
|00004c70| 00 00 00 30 00 00 01 00 | 00 00 00 00 00 00 45 6e |...0....|......En|
|00004c80| 63 6f 64 65 20 66 69 6c | 65 0d 04 00 00 00 2e ff |code fil|e.......|
|00004c90| ff ff a8 ff ff ff aa ff | ff ff 0c 00 00 00 1a 60 |........|.......`|
|00004ca0| 00 c7 4c 6f 63 6b 75 70 | 0d 65 64 3e 0d 7f 24 00 |..Lockup|.ed>..$.|
|00004cb0| 00 00 80 ff ff ff 66 00 | 00 00 c4 ff ff ff 1a 90 |......f.|........|
|00004cc0| 01 c7 21 65 6e 63 6f 64 | 65 72 0d 3e 0d 7f 6e 00 |..!encod|er.>..n.|
|00004cd0| 00 00 88 ff ff ff 1e 01 | 00 00 b8 ff ff ff 19 60 |........|.......`|
|00004ce0| 00 c7 50 61 73 73 77 6f | 72 64 20 3a 0d 7f 1e 01 |..Passwo|rd :....|
|00004cf0| 00 00 7c ff ff ff 4c 02 | 00 00 c8 ff ff ff 3d f1 |..|...L.|......=.|
|00004d00| 20 70 d8 00 00 00 ff ff | ff ff 0f 00 00 00 0d 84 | p......|........|
|00004d10| 01 00 00 50 00 00 00 e0 | 03 00 00 2c 01 00 00 00 |...P....|...,....|
|00004d20| 00 00 00 38 ff ff ff 30 | 07 00 00 12 00 01 84 07 |...8...0|........|
|00004d30| 02 07 01 03 01 0c 00 00 | 00 00 00 00 fc ff ff 00 |........|........|
|00004d40| 05 00 00 00 00 00 00 3d | 01 00 00 00 30 00 00 01 |.......=|....0...|
|00004d50| 00 00 00 00 00 00 00 58 | 01 00 00 ff ff ff ff 13 |.......X|........|
|00004d60| 00 00 00 08 00 00 00 1c | 00 00 00 00 ff ff ff cc |........|........|
|00004d70| 00 00 00 30 ff ff ff 19 | 00 00 07 4e 61 6d 65 3a |...0....|...Name:|
|00004d80| 0d 6c 65 64 3e 0d 7f a4 | 00 00 00 00 ff ff ff 50 |.led>...|.......P|
|00004d90| 02 00 00 30 ff ff ff 3d | 01 00 07 6b 01 00 00 ff |...0...=|...k....|
|00004da0| ff ff ff 1b 00 00 00 04 | 00 00 00 cc fe ff ff b4 |........|........|
|00004db0| 00 00 00 fc fe ff ff 19 | 00 00 07 50 75 72 70 6f |........|...Purpo|
|00004dc0| 73 65 3a 0d 3e 0d 7f a4 | 00 00 00 cc fe ff ff 50 |se:.>...|.......P|
|00004dd0| 02 00 00 fc fe ff ff 3d | 01 00 07 73 01 00 00 ff |.......=|...s....|
|00004de0| ff ff ff 1b 00 00 00 0a | 00 00 00 98 fe ff ff ba |........|........|
|00004df0| 00 00 00 c8 fe ff ff 19 | 00 00 07 41 75 74 68 6f |........|...Autho|
|00004e00| 72 3a 0d 64 3e 0d 7f a4 | 00 00 00 98 fe ff ff 50 |r:.d>...|.......P|
|00004e10| 02 00 00 c8 fe ff ff 3d | 01 00 07 8b 01 00 00 ff |.......=|........|
|00004e20| ff ff ff 1b 00 00 00 04 | 00 00 00 64 fe ff ff b4 |........|...d....|
|00004e30| 00 00 00 94 fe ff ff 19 | 00 00 07 56 65 72 73 69 |........|...Versi|
|00004e40| 6f 6e 3a 0d 3e 0d 7f a4 | 00 00 00 64 fe ff ff 50 |on:.>...|...d...P|
|00004e50| 02 00 00 94 fe ff ff 3d | 01 00 07 9c 01 00 00 ff |.......=|........|
|00004e60| ff ff ff 1b 00 00 00 41 | 62 6f 75 74 20 74 68 69 |.......A|bout thi|
|00004e70| 73 20 70 72 6f 67 72 61 | 6d 0d 45 6e 63 6f 64 65 |s progra|m.Encode|
|00004e80| 72 0d 45 6e 63 6f 64 65 | 20 66 69 6c 65 73 20 66 |r.Encode| files f|
|00004e90| 6f 72 20 73 61 66 65 74 | 79 0d a9 20 4d 69 6e 64 |or safet|y.. Mind|
|00004ea0| 77 61 72 70 2c 20 31 39 | 38 39 0d 31 2e 32 30 20 |warp, 19|89.1.20 |
|00004eb0| 28 31 39 2d 31 32 2d 38 | 39 29 0d |(19-12-8|9). |
+--------+-------------------------+-------------------------+--------+--------+