home *** CD-ROM | disk | FTP | other *** search
/ ARM Club 1 / ARM_CLUB_CD.iso / contents / apps / files / k / protek / !PROtek / !RunImage < prev    next >
Unknown  |  1993-12-20  |  4.2 KB

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text


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

ConfidenceProgramDetectionMatch TypeSupport
100% file data default



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 44 10 9f e5 3c 20 9f e5 | 34 30 9f e5 04 00 12 e4 |D...< ..|40......|
|00000010| 04 00 03 e4 04 10 51 e2 | fb ff ff 5a 00 00 8f e2 |......Q.|...Z....|
|00000020| 05 00 00 ef 42 41 53 49 | 43 20 2d 51 75 69 74 20 |....BASI|C -Quit |
|00000030| 40 30 30 30 30 39 30 30 | 30 2c 30 30 30 30 41 30 |@0000900|0,0000A0|
|00000040| 37 38 00 65 78 a0 00 00 | c8 90 00 00 78 10 00 00 |78.ex...|....x...|
|00000050| 0d 00 0a 1d f4 20 3e 3c | 50 52 4f 74 65 6b 24 44 |..... ><|PROtek$D|
|00000060| 69 72 3e 2e 21 52 75 6e | 49 6d 61 67 65 0d 00 14 |ir>.!Run|Image...|
|00000070| 15 f4 20 a9 20 57 69 6c | 6c 69 61 6d 20 43 6f 6f |.. . Wil|liam Coo|
|00000080| 6b 65 0d 00 1e 05 3a 0d | 00 28 0e ee 20 85 20 f2 |ke....:.|.(.. . .|
|00000090| 65 72 72 6f 72 0d 00 32 | 0f f2 66 69 6c 65 72 63 |error..2|..filerc|
|000000a0| 6c 6f 73 65 0d 00 3c 05 | 3a 0d 00 46 0e ee 20 85 |lose..<.|:..F.. .|
|000000b0| 20 f2 65 72 72 6f 72 0d | 00 50 09 f2 69 6e 69 74 | .error.|.P..init|
|000000c0| 0d 00 5a 0e f2 74 65 6d | 70 6c 61 74 65 73 0d 00 |..Z..tem|plates..|
|000000d0| 64 0d f2 72 65 61 64 66 | 69 6c 65 0d 00 6e 05 3a |d..readf|ile..n.:|
|000000e0| 0d 00 78 0e ee 20 85 20 | f2 65 72 72 6f 72 0d 00 |..x.. . |.error..|
|000000f0| 82 0c f2 6f 70 65 6e 77 | 69 6e 0d 00 8c 11 f2 63 |...openw|in.....c|
|00000100| 6f 6e 66 69 6e 65 6d 6f | 75 73 65 0d 00 96 0a f2 |onfinemo|use.....|
|00000110| 73 65 74 75 70 0d 00 a0 | 05 3a 0d 00 aa 05 f5 0d |setup...|.:......|
|00000120| 00 b4 23 c8 99 20 22 57 | 69 6d 70 5f 50 6f 6c 6c |..#.. "W|imp_Poll|
|00000130| 49 64 6c 65 22 2c 2c 5a | 20 b8 20 72 65 61 73 6f |Idle",,Z| . reaso|
|00000140| 6e 25 0d 00 be 16 20 20 | 20 20 20 20 c8 8e 20 72 |n%.... | .. r|
|00000150| 65 61 73 6f 6e 25 20 ca | 0d 00 c8 2d 20 20 20 20 |eason% .|...- |
|00000160| 20 20 20 20 20 20 20 20 | c9 20 38 3a 20 f2 6b 65 | |. 8: .ke|
|00000170| 79 5f 70 72 65 73 73 28 | 5a 21 30 2c 5a 21 34 2c |y_press(|Z!0,Z!4,|
|00000180| 5a 21 32 34 29 0d 00 d2 | 0b 20 20 20 20 20 20 cb |Z!24)...|. .|
|00000190| 0d 00 dc 0b fd 20 71 75 | 69 74 25 0d 00 e6 23 ff |..... qu|it%...#.|
|000001a0| 20 28 22 50 6f 69 6e 74 | 65 72 20 30 22 29 3a ff | ("Point|er 0"):.|
|000001b0| 20 28 22 50 6f 69 6e 74 | 65 72 20 31 22 29 0d 00 | ("Point|er 1")..|
|000001c0| f0 0e f2 66 69 6c 65 72 | 6f 70 65 6e 0d 00 fa 17 |...filer|open....|
|000001d0| c8 99 20 22 57 69 6d 70 | 5f 43 6c 6f 73 65 44 6f |.. "Wimp|_CloseDo|
|000001e0| 77 6e 22 0d 01 04 16 c8 | 99 20 22 4f 53 5f 45 78 |wn".....|. "OS_Ex|
|000001f0| 69 74 41 6e 64 44 69 65 | 22 0d 01 0e 0f ff 20 28 |itAndDie|"..... (|
|00000200| 22 43 6c 6f 73 65 22 29 | 0d 01 18 05 e0 0d 01 22 |"Close")|......."|
|00000210| 05 3a 0d 01 2c 10 dd 20 | f2 74 65 6d 70 6c 61 74 |.:..,.. |.templat|
|00000220| 65 73 0d 01 36 3a c8 99 | 20 22 57 69 6d 70 5f 4f |es..6:..| "Wimp_O|
|00000230| 70 65 6e 54 65 6d 70 6c | 61 74 65 22 2c 2c 22 3c |penTempl|ate",,"<|
|00000240| 50 52 4f 74 65 6b 24 44 | 69 72 3e 2e 46 69 6c 65 |PROtek$D|ir>.File|
|00000250| 73 2e 54 65 6d 70 6c 61 | 74 65 73 22 0d 01 40 4a |s.Templa|tes"..@J|
|00000260| c8 99 20 22 57 69 6d 70 | 5f 4c 6f 61 64 54 65 6d |.. "Wimp|_LoadTem|
|00000270| 70 6c 61 74 65 22 2c 2c | 74 65 6d 70 6c 61 74 65 |plate",,|template|
|00000280| 25 2c 69 6e 64 69 72 25 | 2c 65 6e 64 62 75 66 25 |%,indir%|,endbuf%|
|00000290| 2c 2d 31 2c 22 6d 61 69 | 6e 22 2c 30 20 b8 2c 2c |,-1,"mai|n",0 .,,|
|000002a0| 69 6e 64 69 72 25 0d 01 | 4a 12 74 65 6d 70 6c 61 |indir%..|J.templa|
|000002b0| 74 65 25 21 36 34 3d 31 | 0d 01 54 2d c8 99 20 22 |te%!64=1|..T-.. "|
|000002c0| 57 69 6d 70 5f 43 72 65 | 61 74 65 57 69 6e 64 6f |Wimp_Cre|ateWindo|
|000002d0| 77 22 2c 2c 74 65 6d 70 | 6c 61 74 65 25 20 b8 20 |w",,temp|late% . |
|000002e0| 6d 61 69 6e 25 0d 01 5e | 11 21 77 69 6e 64 6f 77 |main%..^|.!window|
|000002f0| 3d 6d 61 69 6e 25 0d 01 | 68 23 c8 99 20 22 57 69 |=main%..|h#.. "Wi|
|00000300| 6d 70 5f 47 65 74 57 69 | 6e 64 6f 77 49 6e 66 6f |mp_GetWi|ndowInfo|
|00000310| 22 2c 2c 77 69 6e 64 6f | 77 0d 01 72 1b c8 99 20 |",,windo|w..r... |
|00000320| 22 57 69 6d 70 5f 43 6c | 6f 73 65 54 65 6d 70 6c |"Wimp_Cl|oseTempl|
|00000330| 61 74 65 22 0d 01 7c 05 | e1 0d 01 86 05 3a 0d 01 |ate"..|.|.....:..|
|00000340| 90 0b dd 20 f2 73 68 75 | 74 0d 01 9a 0d c8 8e 20 |... .shu|t...... |
|00000350| 5a 21 31 36 20 ca 0d 01 | a4 0f c9 20 30 3a 71 75 |Z!16 ...|... 0:qu|
|00000360| 69 74 25 3d b9 0d 01 ae | 05 cb 0d 01 b8 05 e1 0d |it%=....|........|
|00000370| 01 c2 05 3a 0d 01 cc 0b | dd 20 f2 69 6e 69 74 0d |...:....|. .init.|
|00000380| 01 d6 12 ff 20 28 22 46 | 58 20 32 30 30 2c 32 22 |.... ("F|X 200,2"|
|00000390| 29 0d 01 e0 0b de 20 5a | 20 35 30 30 0d 01 ea 0c |)..... Z| 500....|
|000003a0| de 20 71 25 20 35 30 30 | 0d 01 f4 10 de 20 62 6c |. q% 500|..... bl|
|000003b0| 6f 63 6b 25 20 35 30 30 | 0d 01 fe 0f de 20 62 6c |ock% 500|..... bl|
|000003c0| 6f 63 6b 20 35 30 30 0d | 02 08 13 de 20 74 65 6d |ock 500.|.... tem|
|000003d0| 70 6c 61 74 65 25 20 39 | 30 30 0d 02 12 10 de 20 |plate% 9|00..... |
|000003e0| 69 6e 64 69 72 25 20 36 | 30 30 0d 02 1c 12 de 20 |indir% 6|00..... |
|000003f0| 65 6e 64 62 75 66 25 20 | 31 35 30 30 0d 02 26 10 |endbuf% |1500..&.|
|00000400| de 20 77 69 6e 64 6f 77 | 20 39 30 30 0d 02 30 0e |. window| 900..0.|
|00000410| de 20 74 65 6d 70 20 35 | 30 30 0d 02 3a 20 de 20 |. temp 5|00..: . |
|00000420| 67 65 74 63 68 61 72 28 | 31 30 29 3a de 20 72 65 |getchar(|10):. re|
|00000430| 61 6c 63 68 61 72 28 31 | 30 29 0d 02 44 0b 71 75 |alchar(1|0)..D.qu|
|00000440| 69 74 25 3d a3 0d 02 4e | 0c 77 72 6f 6e 67 25 3d |it%=...N|.wrong%=|
|00000450| 30 0d 02 58 15 63 6f 64 | 65 24 3d 22 22 3a 70 61 |0..X.cod|e$="":pa|
|00000460| 73 73 24 3d 22 22 0d 02 | 62 34 c8 99 20 22 57 69 |ss$=""..|b4.. "Wi|
|00000470| 6d 70 5f 49 6e 69 74 69 | 61 6c 69 73 65 22 2c 32 |mp_Initi|alise",2|
|00000480| 30 30 2c 26 34 42 35 33 | 34 31 35 34 2c 22 44 69 |00,&4B53|4154,"Di|
|00000490| 73 63 20 50 52 4f 74 65 | 6b 22 0d 02 6c 05 e1 0d |sc PROte|k"..l...|
|000004a0| 02 76 05 3a 0d 02 80 0c | dd 20 f2 65 72 72 6f 72 |.v.:....|. .error|
|000004b0| 0d 02 8a 2e 85 20 30 2c | f6 24 2b 22 20 61 74 20 |..... 0,|.$+" at |
|000004c0| 22 2b c3 28 9e 29 2b 22 | 20 45 72 72 6f 72 20 6e |"+.(.)+"| Error n|
|000004d0| 75 6d 62 65 72 20 22 2b | c3 28 9f 29 3a e0 0d 02 |umber "+|.(.):...|
|000004e0| 94 05 e1 0d 02 9e 05 3a | 0d 02 a8 0e dd 20 f2 6f |.......:|..... .o|
|000004f0| 70 65 6e 77 69 6e 0d 02 | b2 20 c8 99 20 22 57 69 |penwin..|. .. "Wi|
|00000500| 6d 70 5f 4f 70 65 6e 57 | 69 6e 64 6f 77 22 2c 2c |mp_OpenW|indow",,|
|00000510| 77 69 6e 64 6f 77 0d 02 | bc 05 e1 0d 02 c6 05 3a |window..|.......:|
|00000520| 0d 02 d0 0e dd 20 f2 6d | 65 73 73 61 67 65 0d 02 |..... .m|essage..|
|00000530| da 10 ea 20 74 61 73 6b | 25 2c 72 65 66 25 0d 02 |... task|%,ref%..|
|00000540| e4 0d 74 61 73 6b 25 3d | 5a 21 34 0d 02 ee 0c 72 |..task%=|Z!4....r|
|00000550| 65 66 25 3d 5a 21 38 0d | 02 f8 0d c8 8e 20 5a 21 |ef%=Z!8.|..... Z!|
|00000560| 31 36 20 ca 0d 03 02 05 | cb 0d 03 0c 05 e1 0d 03 |16 .....|........|
|00000570| 16 05 3a 0d 03 20 0c dd | 20 f2 73 65 74 75 70 0d |..:.. ..| .setup.|
|00000580| 03 2a 2e c8 99 20 22 57 | 69 6d 70 5f 53 65 74 43 |.*... "W|imp_SetC|
|00000590| 61 72 65 74 50 6f 73 69 | 74 69 6f 6e 22 2c 6d 61 |aretPosi|tion",ma|
|000005a0| 69 6e 25 2c 35 2c 2c 2c | 2d 31 2c 2d 31 0d 03 34 |in%,5,,,|-1,-1..4|
|000005b0| 1a f2 77 72 69 74 65 28 | 6d 61 69 6e 25 2c 31 34 |..write(|main%,14|
|000005c0| 2c 6e 61 6d 65 24 29 0d | 03 3e 05 e1 0d 03 48 05 |,name$).|.>....H.|
|000005d0| 3a 0d 03 52 1f dd 20 f2 | 6b 65 79 5f 70 72 65 73 |:..R.. .|key_pres|
|000005e0| 73 28 77 69 6e 64 2c 69 | 63 6f 6e 2c 6b 65 79 29 |s(wind,i|con,key)|
|000005f0| 0d 03 5c 15 e7 20 77 69 | 6e 64 3c 3e 6d 61 69 6e |..\.. wi|nd<>main|
|00000600| 25 20 e1 20 8b 0d 03 66 | 25 e7 20 69 63 6f 6e 3d |% . ...f|%. icon=|
|00000610| 35 20 80 20 6b 65 79 3d | 31 33 20 f2 72 65 61 64 |5 . key=|13 .read|
|00000620| 6d 6f 76 65 41 3a e1 20 | 20 8b 0d 03 70 25 e7 20 |moveA:. | ...p%. |
|00000630| 69 63 6f 6e 3d 31 31 20 | 80 20 6b 65 79 3d 31 33 |icon=11 |. key=13|
|00000640| 20 f2 72 65 61 64 6d 6f | 76 65 42 20 8b 20 e1 0d | .readmo|veB . ..|
|00000650| 03 7a 05 e1 0d 03 84 05 | 3a 0d 03 8e 10 dd 20 f2 |.z......|:..... .|
|00000660| 72 65 61 64 6d 6f 76 65 | 41 0d 03 98 1b 70 61 73 |readmove|A....pas|
|00000670| 73 24 3d a4 67 65 74 69 | 63 6f 6e 28 6d 61 69 6e |s$=.geti|con(main|
|00000680| 25 2c 35 29 0d 03 a2 2f | c8 99 20 22 57 69 6d 70 |%,5).../|.. "Wimp|
|00000690| 5f 53 65 74 43 61 72 65 | 74 50 6f 73 69 74 69 6f |_SetCare|tPositio|
|000006a0| 6e 22 2c 6d 61 69 6e 25 | 2c 31 31 2c 2c 2c 2d 31 |n",main%|,11,,,-1|
|000006b0| 2c 2d 31 0d 03 ac 05 e1 | 0d 03 b6 05 3a 0d 03 c0 |,-1.....|....:...|
|000006c0| 10 dd 20 f2 72 65 61 64 | 6d 6f 76 65 42 0d 03 ca |.. .read|moveB...|
|000006d0| 1d 63 6f 64 65 49 24 3d | a4 67 65 74 69 63 6f 6e |.codeI$=|.geticon|
|000006e0| 28 6d 61 69 6e 25 2c 31 | 31 29 0d 03 d4 0d f2 76 |(main%,1|1).....v|
|000006f0| 61 6c 69 64 61 74 65 0d | 03 de 05 e1 0d 03 e8 05 |alidate.|........|
|00000700| 3a 0d 03 f2 0f dd 20 f2 | 76 61 6c 69 64 61 74 65 |:..... .|validate|
|00000710| 0d 03 fc 24 e7 20 70 61 | 73 73 24 3c 3e 70 61 73 |...$. pa|ss$<>pas|
|00000720| 73 77 6f 72 64 24 20 8c | 20 f2 63 72 61 73 68 3a |sword$ .| .crash:|
|00000730| e1 20 20 8b 0d 04 06 20 | e7 20 63 6f 64 65 49 24 |. .... |. codeI$|
|00000740| 3c 3e 63 6f 64 65 24 20 | 8c 20 f2 63 72 61 73 68 |<>code$ |. .crash|
|00000750| 3a e1 20 8b 0d 04 10 0b | 71 75 69 74 25 3d b9 0d |:. .....|quit%=..|
|00000760| 04 1a 05 e1 0d 04 24 05 | 3a 0d 04 2e 0c dd 20 f2 |......$.|:..... .|
|00000770| 63 72 61 73 68 0d 04 38 | 13 77 72 6f 6e 67 25 3d |crash..8|.wrong%=|
|00000780| 77 72 6f 6e 67 25 2b 31 | 0d 04 42 1e e7 20 77 72 |wrong%+1|..B.. wr|
|00000790| 6f 6e 67 25 3e 32 20 f2 | 72 65 73 65 74 20 8b 20 |ong%>2 .|reset . |
|000007a0| f2 63 6c 65 61 72 0d 04 | 4c 05 e1 0d 04 56 05 3a |.clear..|L....V.:|
|000007b0| 0d 04 60 13 dd 20 f2 63 | 6f 6e 66 69 6e 65 6d 6f |..`.. .c|onfinemo|
|000007c0| 75 73 65 0d 04 6a 0d de | 20 64 75 6d 70 20 32 30 |use..j..| dump 20|
|000007d0| 0d 04 74 10 64 75 6d 70 | 21 30 3d 6d 61 69 6e 25 |..t.dump|!0=main%|
|000007e0| 0d 04 7e 24 c8 99 20 22 | 57 69 6d 70 5f 47 65 74 |..~$.. "|Wimp_Get|
|000007f0| 57 69 6e 64 6f 77 4f 75 | 74 6c 69 6e 65 22 2c 2c |WindowOu|tline",,|
|00000800| 64 75 6d 70 0d 04 88 40 | 78 3d 64 75 6d 70 21 34 |dump...@|x=dump!4|
|00000810| 3a 79 3d 64 75 6d 70 21 | 38 3a 77 69 64 74 68 3d |:y=dump!|8:width=|
|00000820| 64 75 6d 70 21 31 32 2d | 64 75 6d 70 21 34 3a 68 |dump!12-|dump!4:h|
|00000830| 65 69 67 68 74 3d 64 75 | 6d 70 21 31 36 2d 64 75 |eight=du|mp!16-du|
|00000840| 6d 70 21 38 0d 04 92 28 | c8 97 20 c8 93 20 78 2b |mp!8...(|.. .. x+|
|00000850| 35 30 2c 79 2b 35 30 2c | 77 69 64 74 68 2d 31 30 |50,y+50,|width-10|
|00000860| 30 2c 68 65 69 67 68 74 | 2d 31 30 30 0d 04 9c 05 |0,height|-100....|
|00000870| e1 0d 04 a6 05 3a 0d 04 | b0 0f dd 20 f2 72 65 61 |.....:..|... .rea|
|00000880| 64 66 69 6c 65 0d 04 ba | 2b 69 6e 66 69 6c 65 3d |dfile...|+infile=|
|00000890| 8e 20 22 3c 50 52 4f 74 | 65 6b 24 44 69 72 3e 2e |. "<PROt|ek$Dir>.|
|000008a0| 46 69 6c 65 73 2e 44 61 | 74 61 a0 46 69 6c 65 22 |Files.Da|ta.File"|
|000008b0| 0d 04 c4 05 3a 0d 04 ce | 16 f4 20 72 65 61 64 20 |....:...|.. read |
|000008c0| 69 6e 20 70 61 73 73 77 | 6f 72 64 0d 04 d8 05 3a |in passw|ord....:|
|000008d0| 0d 04 e2 05 f5 0d 04 ec | 10 69 6e 25 3d 9a 23 69 |........|.in%=.#i|
|000008e0| 6e 66 69 6c 65 0d 04 f6 | 12 69 6e 63 6f 6d 65 24 |nfile...|.income$|
|000008f0| 3d bd 28 69 6e 25 29 0d | 05 00 16 69 6e 63 6f 6d |=.(in%).|...incom|
|00000900| 65 25 3d 97 28 69 6e 63 | 6f 6d 65 24 29 0d 05 0a |e%=.(inc|ome$)...|
|00000910| 19 64 65 63 6f 64 65 64 | 25 3d 69 6e 63 6f 6d 65 |.decoded|%=income|
|00000920| 25 20 82 20 26 46 0d 05 | 14 21 64 65 63 6f 64 65 |% . &F..|.!decode|
|00000930| 64 24 3d 64 65 63 6f 64 | 65 64 24 2b bd 28 64 65 |d$=decod|ed$+.(de|
|00000940| 63 6f 64 65 64 25 29 0d | 05 1e 11 fd 20 69 6e 63 |coded%).|.... inc|
|00000950| 6f 6d 65 25 3d 32 35 35 | 0d 05 28 18 70 61 73 73 |ome%=255|..(.pass|
|00000960| 77 6f 72 64 24 3d c0 64 | 65 63 6f 64 65 64 24 29 |word$=.d|ecoded$)|
|00000970| 0d 05 32 05 3a 0d 05 3c | 12 f4 20 72 65 61 64 20 |..2.:..<|.. read |
|00000980| 69 6e 20 63 6f 64 65 0d | 05 46 05 3a 0d 05 50 05 |in code.|.F.:..P.|
|00000990| f5 0d 05 5a 10 69 6e 25 | 3d 9a 23 69 6e 66 69 6c |...Z.in%|=.#infil|
|000009a0| 65 0d 05 64 12 69 6e 63 | 6f 6d 65 24 3d bd 28 69 |e..d.inc|ome$=.(i|
|000009b0| 6e 25 29 0d 05 6e 16 69 | 6e 63 6f 6d 65 25 3d 97 |n%)..n.i|ncome%=.|
|000009c0| 28 69 6e 63 6f 6d 65 24 | 29 0d 05 78 19 64 65 63 |(income$|)..x.dec|
|000009d0| 6f 64 65 64 25 3d 69 6e | 63 6f 6d 65 25 20 82 20 |oded%=in|come% . |
|000009e0| 26 46 0d 05 82 23 64 65 | 63 6f 64 65 64 32 24 3d |&F...#de|coded2$=|
|000009f0| 64 65 63 6f 64 65 64 32 | 24 2b bd 28 64 65 63 6f |decoded2|$+.(deco|
|00000a00| 64 65 64 25 29 0d 05 8c | 11 fd 20 69 6e 63 6f 6d |ded%)...|.. incom|
|00000a10| 65 25 3d 32 35 35 0d 05 | 96 15 63 6f 64 65 24 3d |e%=255..|..code$=|
|00000a20| c0 64 65 63 6f 64 65 64 | 32 24 29 0d 05 a0 05 3a |.decoded|2$)....:|
|00000a30| 0d 05 aa 12 f4 20 72 65 | 61 64 20 69 6e 20 6e 61 |..... re|ad in na|
|00000a40| 6d 65 0d 05 b4 05 3a 0d | 05 be 05 f5 0d 05 c8 10 |me....:.|........|
|00000a50| 69 6e 25 3d 9a 23 69 6e | 66 69 6c 65 0d 05 d2 12 |in%=.#in|file....|
|00000a60| 69 6e 63 6f 6d 65 24 3d | bd 28 69 6e 25 29 0d 05 |income$=|.(in%)..|
|00000a70| dc 16 69 6e 63 6f 6d 65 | 25 3d 97 28 69 6e 63 6f |..income|%=.(inco|
|00000a80| 6d 65 24 29 0d 05 e6 19 | 64 65 63 6f 64 65 64 25 |me$)....|decoded%|
|00000a90| 3d 69 6e 63 6f 6d 65 25 | 20 82 20 26 46 0d 05 f0 |=income%| . &F...|
|00000aa0| 1f e7 64 65 63 6f 64 65 | 64 25 3d 32 35 35 20 8c |..decode|d%=255 .|
|00000ab0| 20 64 65 63 6f 64 65 64 | 25 3d 33 32 0d 05 fa 23 | decoded|%=32...#|
|00000ac0| 64 65 63 6f 64 65 64 33 | 24 3d 64 65 63 6f 64 65 |decoded3|$=decode|
|00000ad0| 64 33 24 2b bd 28 64 65 | 63 6f 64 65 64 25 29 0d |d3$+.(de|coded%).|
|00000ae0| 06 04 11 fd 20 69 6e 63 | 6f 6d 65 25 3d 32 35 35 |.... inc|ome%=255|
|00000af0| 0d 06 0e 15 6e 61 6d 65 | 24 3d c0 64 65 63 6f 64 |....name|$=.decod|
|00000b00| 65 64 33 24 29 0d 06 18 | 05 3a 0d 06 22 0c d9 23 |ed3$)...|.:.."..#|
|00000b10| 69 6e 66 69 6c 65 0d 06 | 2c 05 3a 0d 06 36 05 e1 |infile..|,.:..6..|
|00000b20| 0d 06 40 05 3a 0d 06 4a | 11 dd 20 f2 66 69 6c 65 |..@.:..J|.. .file|
|00000b30| 72 63 6c 6f 73 65 0d 06 | 54 16 6e 61 6d 65 24 3d |rclose..|T.name$=|
|00000b40| 22 50 52 4f 74 65 6b 24 | 44 69 72 22 0d 06 5e 10 |"PROtek$|Dir"..^.|
|00000b50| de 20 62 6c 6f 63 6b 25 | 20 35 30 30 0d 06 68 34 |. block%| 500..h4|
|00000b60| c8 99 20 22 58 4f 53 5f | 52 65 61 64 56 61 72 56 |.. "XOS_|ReadVarV|
|00000b70| 61 6c 22 2c 6e 61 6d 65 | 24 2c 62 6c 6f 63 6b 25 |al",name|$,block%|
|00000b80| 2c 26 31 30 30 2c 30 2c | 30 20 b8 20 2c 2c 52 32 |,&100,0,|0 . ,,R2|
|00000b90| 0d 06 72 11 62 6c 6f 63 | 6b 25 3f 52 32 3d 26 30 |..r.bloc|k%?R2=&0|
|00000ba0| 44 0d 06 7c 11 70 61 74 | 68 24 3d 24 62 6c 6f 63 |D..|.pat|h$=$bloc|
|00000bb0| 6b 25 0d 06 86 05 3a 0d | 06 90 1c 70 61 74 68 24 |k%....:.|...path$|
|00000bc0| 3d c0 70 61 74 68 24 2c | a9 28 70 61 74 68 24 29 |=.path$,|.(path$)|
|00000bd0| 2d 38 29 0d 06 9a 05 3a | 0d 06 a4 1f ff 20 28 22 |-8)....:|..... ("|
|00000be0| 46 69 6c 65 72 5f 43 6c | 6f 73 65 44 69 72 20 22 |Filer_Cl|oseDir "|
|00000bf0| 2b 70 61 74 68 24 29 0d | 06 ae 05 e1 0d 06 b8 05 |+path$).|........|
|00000c00| 3a 0d 06 c2 10 dd 20 f2 | 66 69 6c 65 72 6f 70 65 |:..... .|filerope|
|00000c10| 6e 0d 06 cc 1e ff 20 28 | 22 46 69 6c 65 72 5f 4f |n..... (|"Filer_O|
|00000c20| 70 65 6e 44 69 72 20 22 | 2b 70 61 74 68 24 29 0d |penDir "|+path$).|
|00000c30| 06 d6 05 e1 0d 06 e0 05 | 3a 0d 06 ea 0c dd 20 f2 |........|:..... .|
|00000c40| 63 6c 65 61 72 0d 06 f4 | 16 f2 77 72 69 74 65 28 |clear...|..write(|
|00000c50| 6d 61 69 6e 25 2c 35 2c | 22 22 29 0d 06 fe 17 f2 |main%,5,|"").....|
|00000c60| 77 72 69 74 65 28 6d 61 | 69 6e 25 2c 31 31 2c 22 |write(ma|in%,11,"|
|00000c70| 22 29 0d 07 08 2e c8 99 | 20 22 57 69 6d 70 5f 53 |")......| "Wimp_S|
|00000c80| 65 74 43 61 72 65 74 50 | 6f 73 69 74 69 6f 6e 22 |etCaretP|osition"|
|00000c90| 2c 6d 61 69 6e 25 2c 35 | 2c 2c 2c 2d 31 2c 2d 31 |,main%,5|,,,-1,-1|
|00000ca0| 0d 07 12 05 e1 0d 07 1c | 05 3a 0d 07 26 0c dd 20 |........|.:..&.. |
|00000cb0| f2 72 65 73 65 74 0d 07 | 30 1d 2a 3c 50 52 4f 74 |.reset..|0.*<PROt|
|00000cc0| 65 6b 24 44 69 72 3e 2e | 46 69 6c 65 73 2e 52 65 |ek$Dir>.|Files.Re|
|00000cd0| 73 65 74 0d 07 3a 05 e1 | 0d 07 44 05 3a 0d 07 4e |set..:..|..D.:..N|
|00000ce0| 10 dd 20 a4 63 6c 69 70 | 28 70 74 72 29 0d 07 58 |.. .clip|(ptr)..X|
|00000cf0| 08 ea 20 66 24 0d 07 62 | 09 66 24 3d 22 22 0d 07 |.. f$..b|.f$=""..|
|00000d00| 6c 24 c8 95 20 3f 70 74 | 72 3c 3e 30 20 80 20 3f |l$.. ?pt|r<>0 . ?|
|00000d10| 70 74 72 3c 3e 31 30 20 | 80 20 3f 70 74 72 3c 3e |ptr<>10 |. ?ptr<>|
|00000d20| 31 33 0d 07 76 16 66 24 | 3d 66 24 2b bd 3f 70 74 |13..v.f$|=f$+.?pt|
|00000d30| 72 3a 70 74 72 2b 3d 31 | 0d 07 80 05 ce 0d 07 8a |r:ptr+=1|........|
|00000d40| 07 3d 66 24 0d 07 94 04 | 0d 07 9e 15 dd a4 69 63 |.=f$....|......ic|
|00000d50| 6f 6e 61 64 64 72 28 77 | 25 2c 69 25 29 0d 07 a8 |onaddr(w|%,i%)...|
|00000d60| 0d 74 65 6d 70 21 30 3d | 77 25 0d 07 b2 0d 74 65 |.temp!0=|w%....te|
|00000d70| 6d 70 21 34 3d 69 25 0d | 07 bc 1f c8 99 22 57 69 |mp!4=i%.|....."Wi|
|00000d80| 6d 70 5f 47 65 74 49 63 | 6f 6e 53 74 61 74 65 22 |mp_GetIc|onState"|
|00000d90| 2c 2c 74 65 6d 70 0d 07 | c6 0c 3d 74 65 6d 70 21 |,,temp..|..=temp!|
|00000da0| 32 38 0d 07 d0 04 0d 07 | da 19 dd f2 77 72 69 74 |28......|....writ|
|00000db0| 65 28 77 25 2c 69 25 2c | 63 68 61 72 73 24 29 0d |e(w%,i%,|chars$).|
|00000dc0| 07 e4 09 ea 20 77 77 25 | 0d 07 ee 11 77 77 25 3d |.... ww%|....ww%=|
|00000dd0| 77 25 3a 69 69 25 3d 69 | 25 0d 07 f8 0a ea 20 69 |w%:ii%=i|%..... i|
|00000de0| 6e 64 25 0d 08 02 1b 69 | 6e 64 25 3d a4 69 63 6f |nd%....i|nd%=.ico|
|00000df0| 6e 61 64 64 72 28 77 77 | 25 2c 69 69 25 29 0d 08 |naddr(ww|%,ii%)..|
|00000e00| 0c 10 24 69 6e 64 25 3d | 63 68 61 72 73 24 0d 08 |..$ind%=|chars$..|
|00000e10| 16 17 f2 75 70 64 61 74 | 65 5f 69 63 6f 6e 28 77 |...updat|e_icon(w|
|00000e20| 25 2c 69 25 29 0d 08 20 | 05 e1 0d 08 2a 04 0d 08 |%,i%).. |....*...|
|00000e30| 34 14 dd a4 67 65 74 69 | 63 6f 6e 28 77 25 2c 69 |4...geti|con(w%,i|
|00000e40| 25 29 0d 08 3e 08 ea 20 | 61 25 0d 08 48 0e 62 6c |%)..>.. |a%..H.bl|
|00000e50| 6f 63 6b 21 30 3d 77 25 | 0d 08 52 0e 62 6c 6f 63 |ock!0=w%|..R.bloc|
|00000e60| 6b 21 34 3d 69 25 0d 08 | 5c 20 c8 99 22 57 69 6d |k!4=i%..|\ .."Wim|
|00000e70| 70 5f 47 65 74 49 63 6f | 6e 53 74 61 74 65 22 2c |p_GetIco|nState",|
|00000e80| 2c 62 6c 6f 63 6b 0d 08 | 66 0f 61 25 3d 62 6c 6f |,block..|f.a%=blo|
|00000e90| 63 6b 21 32 38 0d 08 70 | 0e 3d a4 63 6c 69 70 28 |ck!28..p|.=.clip(|
|00000ea0| 61 25 29 0d 08 7a 08 3d | 24 61 25 0d 08 84 04 0d |a%)..z.=|$a%.....|
|00000eb0| 08 8e 05 e1 0d 08 98 04 | 0d 08 a2 47 dd f2 75 70 |........|...G..up|
|00000ec0| 64 61 74 65 5f 69 63 6f | 6e 28 77 25 2c 69 25 29 |date_ico|n(w%,i%)|
|00000ed0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000ee0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 3a f4 | | :.|
|00000ef0| 20 75 70 64 61 74 65 20 | 61 6e 20 69 63 6f 6e 0d | update |an icon.|
|00000f00| 08 ac 19 62 6c 6f 63 6b | 21 30 3d 77 25 3a 62 6c |...block|!0=w%:bl|
|00000f10| 6f 63 6b 21 34 3d 69 25 | 0d 08 b6 20 c8 99 22 57 |ock!4=i%|... .."W|
|00000f20| 69 6d 70 5f 47 65 74 49 | 63 6f 6e 53 74 61 74 65 |imp_GetI|conState|
|00000f30| 22 2c 2c 62 6c 6f 63 6b | 0d 08 c0 23 61 61 78 30 |",,block|...#aax0|
|00000f40| 25 3d 62 6c 6f 63 6b 21 | 38 20 20 3a 20 61 61 79 |%=block!|8 : aay|
|00000f50| 30 25 3d 62 6c 6f 63 6b | 21 31 32 0d 08 ca 23 61 |0%=block|!12...#a|
|00000f60| 61 78 31 25 3d 62 6c 6f | 63 6b 21 31 36 20 3a 20 |ax1%=blo|ck!16 : |
|00000f70| 61 61 79 31 25 3d 62 6c | 6f 63 6b 21 32 30 0d 08 |aay1%=bl|ock!20..|
|00000f80| d4 13 ea 20 6d 6f 72 65 | 25 2c 78 30 25 2c 79 30 |... more|%,x0%,y0|
|00000f90| 25 0d 08 de 0e 62 6c 6f | 63 6b 21 30 3d 77 25 0d |%....blo|ck!0=w%.|
|00000fa0| 08 e8 22 62 6c 6f 63 6b | 21 34 3d 61 61 78 30 25 |.."block|!4=aax0%|
|00000fb0| 20 20 3a 20 62 6c 6f 63 | 6b 21 38 3d 61 61 79 30 | : bloc|k!8=aay0|
|00000fc0| 25 0d 08 f2 23 62 6c 6f | 63 6b 21 31 32 3d 61 61 |%...#blo|ck!12=aa|
|00000fd0| 78 31 25 20 3a 20 62 6c | 6f 63 6b 21 31 36 3d 61 |x1% : bl|ock!16=a|
|00000fe0| 61 79 31 25 0d 08 fc 2a | c8 99 20 22 57 69 6d 70 |ay1%...*|.. "Wimp|
|00000ff0| 5f 55 70 64 61 74 65 57 | 69 6e 64 6f 77 22 2c 30 |_UpdateW|indow",0|
|00001000| 2c 62 6c 6f 63 6b 20 b8 | 20 6d 6f 72 65 25 0d 09 |,block .| more%..|
|00001010| 06 20 f2 72 65 64 72 61 | 77 5f 62 69 74 28 62 6c |. .redra|w_bit(bl|
|00001020| 6f 63 6b 2b 34 2c 78 30 | 25 2c 79 30 25 29 0d 09 |ock+4,x0|%,y0%)..|
|00001030| 10 0c c8 95 20 6d 6f 72 | 65 25 0d 09 1a 2a c8 99 |.... mor|e%...*..|
|00001040| 20 22 57 69 6d 70 5f 47 | 65 74 52 65 63 74 61 6e | "Wimp_G|etRectan|
|00001050| 67 6c 65 22 2c 30 2c 62 | 6c 6f 63 6b 20 b8 20 6d |gle",0,b|lock . m|
|00001060| 6f 72 65 25 0d 09 24 05 | ce 0d 09 2e 05 e1 0d 09 |ore%..$.|........|
|00001070| 38 05 3a 0d 09 42 1e dd | 20 f2 72 65 64 72 61 77 |8.:..B..| .redraw|
|00001080| 5f 62 69 74 28 62 2c f8 | 20 78 25 2c f8 20 79 25 |_bit(b,.| x%,. y%|
|00001090| 29 0d 09 4c 0b ea 20 78 | 25 2c 79 25 0d 09 56 0f |)..L.. x|%,y%..V.|
|000010a0| 78 25 3d 62 21 30 2d 62 | 21 31 36 0d 09 60 10 79 |x%=b!0-b|!16..`.y|
|000010b0| 25 3d 62 21 31 32 2d 62 | 21 32 30 0d 09 6a 05 e1 |%=b!12-b|!20..j..|
|000010c0| 0d 09 74 05 3a 0d ff | |..t.:.. | |
+--------+-------------------------+-------------------------+--------+--------+