home *** CD-ROM | disk | FTP | other *** search
/ APDL Public Domain 1 / APDL_PD1A.iso / utilities / bitflip / !BitFlip / !RunImage < prev    next >
Unknown  |  1994-02-06  |  8.8 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
100% xdgMime image/x-tga default



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 20 20 f4 20 3e | 20 3c 42 69 74 46 6c 69 |... . >| <BitFli|
|00000010| 70 24 44 69 72 3e 2e 21 | 52 75 6e 49 6d 61 67 65 |p$Dir>.!|RunImage|
|00000020| 0d 00 14 2f 20 f4 20 a9 | 20 4a 61 73 70 65 72 20 |.../ . .| Jasper |
|00000030| 57 61 6c 6c 61 63 65 2c | 20 44 65 61 64 46 69 73 |Wallace,| DeadFis|
|00000040| 68 20 53 6f 66 74 77 61 | 72 65 20 31 39 39 34 0d |h Softwa|re 1994.|
|00000050| 00 1e 16 20 f4 20 43 4d | 4f 53 20 52 41 4d 20 73 |... . CM|OS RAM s|
|00000060| 65 74 74 65 72 0d 00 28 | 4c 20 f4 20 48 65 6c 6c |etter..(|L . Hell|
|00000070| 6f 20 48 61 63 6b 65 72 | 73 21 21 2c 20 59 65 73 |o Hacker|s!!, Yes|
|00000080| 20 79 6f 75 20 6d 61 79 | 20 74 61 6b 65 20 74 68 | you may| take th|
|00000090| 69 73 20 74 6f 20 70 69 | 65 63 65 73 20 74 6f 20 |is to pi|eces to |
|000000a0| 73 65 65 20 68 6f 77 20 | 69 74 20 77 6f 72 6b 73 |see how |it works|
|000000b0| 2e 0d 00 32 22 20 76 65 | 72 73 69 6f 6e 24 3d 22 |...2" ve|rsion$="|
|000000c0| 30 2e 30 30 20 28 30 36 | 2d 46 65 62 2d 31 39 39 |0.00 (06|-Feb-199|
|000000d0| 34 29 22 0d 00 3c 42 20 | c8 99 20 22 57 69 6d 70 |4)"..<B |.. "Wimp|
|000000e0| 5f 49 6e 69 74 69 61 6c | 69 73 65 22 2c 33 31 30 |_Initial|ise",310|
|000000f0| 2c 26 34 42 35 33 34 31 | 35 34 2c 22 43 4d 4f 53 |,&4B5341|54,"CMOS|
|00000100| 20 52 41 4d 20 53 65 74 | 74 65 72 22 20 b8 20 2c | RAM Set|ter" . ,|
|00000110| 74 61 73 6b 25 0d 00 46 | 22 20 ee 20 85 20 f2 63 |task%..F|" . . .c|
|00000120| 6c 6f 73 65 3a f6 3a f1 | 22 20 61 74 20 6c 69 6e |lose:.:.|" at lin|
|00000130| 65 20 22 3b 9e 3a e0 0d | 00 50 0a 20 f2 69 6e 69 |e ";.:..|.P. .ini|
|00000140| 74 0d 00 5a 10 20 f2 63 | 72 65 61 74 65 69 63 6f |t..Z. .c|reateico|
|00000150| 6e 0d 00 64 1c 20 ee 20 | 85 20 e7 20 a4 65 72 72 |n..d. . |. . .err|
|00000160| 6f 72 20 8c 20 f2 63 6c | 6f 73 65 3a e0 0d 00 6e |or . .cl|ose:...n|
|00000170| 06 20 f5 0d 00 78 0a 20 | f2 70 6f 6c 6c 0d 00 82 |. ...x. |.poll...|
|00000180| 0c 20 fd 20 71 75 69 74 | 25 0d 00 8c 0b 20 f2 63 |. . quit|%.... .c|
|00000190| 6c 6f 73 65 0d 00 96 06 | 20 e0 0d 00 a0 06 20 3a |lose....| ..... :|
|000001a0| 0d 00 aa 11 20 dd f2 63 | 72 65 61 74 65 69 63 6f |.... ..c|reateico|
|000001b0| 6e 0d 00 b4 28 20 f4 20 | 63 72 65 61 74 65 20 69 |n...( . |create i|
|000001c0| 63 6f 6e 20 61 6e 64 20 | 70 6c 61 63 65 20 6f 6e |con and |place on|
|000001d0| 20 69 63 6f 6e 20 62 61 | 72 0d 00 be 37 20 21 62 | icon ba|r...7 !b|
|000001e0| 25 3d 2d 31 3a 62 25 21 | 34 3d 30 3a 62 25 21 38 |%=-1:b%!|4=0:b%!8|
|000001f0| 3d 30 3a 62 25 21 31 32 | 3d 33 34 3a 62 25 21 31 |=0:b%!12|=34:b%!1|
|00000200| 36 3d 36 38 3a 62 25 21 | 32 30 3d 26 33 30 30 32 |6=68:b%!|20=&3002|
|00000210| 0d 00 c8 36 20 24 28 62 | 25 2b 32 34 29 3d 22 21 |...6 $(b|%+24)="!|
|00000220| 42 69 74 46 6c 69 70 22 | 3a c8 99 20 22 57 69 6d |BitFlip"|:.. "Wim|
|00000230| 70 5f 43 72 65 61 74 65 | 49 63 6f 6e 22 2c 2c 62 |p_Create|Icon",,b|
|00000240| 25 20 b8 20 69 25 0d 00 | d2 06 20 e1 0d 00 dc 06 |% . i%..|.. .....|
|00000250| 20 3a 0d 00 e6 0c 20 dd | f2 63 6c 6f 73 65 0d 00 | :.... .|.close..|
|00000260| f0 17 20 f4 20 54 68 61 | 74 73 20 61 6c 6c 20 66 |.. . Tha|ts all f|
|00000270| 6f 6c 6b 73 21 0d 00 fa | 28 20 c8 99 20 22 57 69 |olks!...|( .. "Wi|
|00000280| 6d 70 5f 43 6c 6f 73 65 | 44 6f 77 6e 22 2c 74 61 |mp_Close|Down",ta|
|00000290| 73 6b 25 2c 26 34 42 35 | 33 34 31 35 34 0d 01 04 |sk%,&4B5|34154...|
|000002a0| 06 20 e1 0d 01 0e 06 20 | 3a 0d 01 18 0b 20 dd f2 |. ..... |:.... ..|
|000002b0| 70 6f 6c 6c 0d 01 22 37 | 20 f4 20 4d 61 69 6e 20 |poll.."7| . Main |
|000002c0| 77 69 6d 70 20 70 6f 6c | 6c 69 6e 67 20 72 6f 75 |wimp pol|ling rou|
|000002d0| 74 69 6e 65 2e 20 44 75 | 6d 2d 64 65 2d 64 75 6d |tine. Du|m-de-dum|
|000002e0| 2d 64 75 6d 2d 64 75 6d | 6d 6d 6d 0d 01 2c 1e 20 |-dum-dum|mmm..,. |
|000002f0| ea 20 6f 6c 64 74 69 6d | 65 25 2c 6e 65 77 74 69 |. oldtim|e%,newti|
|00000300| 6d 65 25 2c 6d 61 73 6b | 25 0d 01 36 11 20 6d 61 |me%,mask|%..6. ma|
|00000310| 73 6b 25 3d 26 38 33 38 | 33 31 0d 01 40 29 20 c8 |sk%=&838|31..@) .|
|00000320| 99 20 22 4f 53 5f 52 65 | 61 64 4d 6f 6e 6f 74 6f |. "OS_Re|adMonoto|
|00000330| 6e 69 63 54 69 6d 65 22 | 20 b8 20 6e 65 77 74 69 |nicTime"| . newti|
|00000340| 6d 65 25 0d 01 4a 1d 20 | c8 95 20 28 6e 65 77 74 |me%..J. |.. (newt|
|00000350| 69 6d 65 25 2d 6f 6c 64 | 74 69 6d 65 25 29 3e 30 |ime%-old|time%)>0|
|00000360| 0d 01 54 13 20 20 6f 6c | 64 74 69 6d 65 25 2b 3d |..T. ol|dtime%+=|
|00000370| 32 30 30 0d 01 5e 07 20 | ce 20 0d 01 68 2e 20 c8 |200..^. |. ..h. .|
|00000380| 99 20 22 57 69 6d 70 5f | 50 6f 6c 6c 49 64 6c 65 |. "Wimp_|PollIdle|
|00000390| 22 2c 6d 61 73 6b 25 2c | 62 25 2c 6f 6c 64 74 69 |",mask%,|b%,oldti|
|000003a0| 6d 65 25 20 b8 20 72 25 | 0d 01 72 0c 20 c8 8e 20 |me% . r%|..r. .. |
|000003b0| 72 25 20 ca 0d 01 7c 10 | 20 c9 20 31 3a f2 72 65 |r% ...|.| . 1:.re|
|000003c0| 64 72 61 77 0d 01 86 21 | 20 c9 20 32 3a c8 99 20 |draw...!| . 2:.. |
|000003d0| 22 57 69 6d 70 5f 4f 70 | 65 6e 57 69 6e 64 6f 77 |"Wimp_Op|enWindow|
|000003e0| 22 2c 2c 62 25 0d 01 90 | 3c 20 c9 20 33 3a c8 99 |",,b%...|< . 3:..|
|000003f0| 20 22 57 69 6d 70 5f 43 | 6c 6f 73 65 57 69 6e 64 | "Wimp_C|loseWind|
|00000400| 6f 77 22 2c 2c 62 25 3a | e7 20 62 25 21 30 3d 64 |ow",,b%:|. b%!0=d|
|00000410| 69 73 70 77 68 25 20 64 | 69 73 70 6c 61 79 25 3d |ispwh% d|isplay%=|
|00000420| a3 0d 01 9a 14 20 c9 20 | 36 3a f2 6d 6f 75 73 65 |..... . |6:.mouse|
|00000430| 63 6c 69 63 6b 0d 01 a4 | 13 20 c9 20 39 3a f2 6d |click...|. . 9:.m|
|00000440| 65 6e 75 63 6c 69 63 6b | 0d 01 ae 15 20 c9 20 31 |enuclick|.... . 1|
|00000450| 37 2c 31 38 3a f2 72 65 | 63 65 69 76 65 0d 01 b8 |7,18:.re|ceive...|
|00000460| 06 20 cb 0d 01 c2 06 20 | e1 0d 01 cc 06 20 3a 0d |. ..... |..... :.|
|00000470| 01 d6 0c 20 dd a4 65 72 | 72 6f 72 0d 01 e0 38 20 |... ..er|ror...8 |
|00000480| f4 20 4d 61 69 6e 20 28 | 47 75 65 73 73 2c 20 4e |. Main (|Guess, N|
|00000490| 6f 3f 2c 20 57 61 69 74 | 20 66 6f 72 20 69 74 2e |o?, Wait| for it.|
|000004a0| 2e 2e 29 20 45 72 72 6f | 72 20 72 6f 75 74 69 6e |..) Erro|r routin|
|000004b0| 65 21 21 0d 01 ea 0a 20 | 21 62 25 3d 9f 0d 01 f4 |e!!.... |!b%=....|
|000004c0| 0d 20 c8 8e 20 21 62 25 | 20 ca 0d 01 fe 1f 20 c9 |. .. !b%| ..... .|
|000004d0| 20 31 3c 3c 33 30 3a 65 | 72 72 5f 73 74 72 24 3d | 1<<30:e|rr_str$=|
|000004e0| 22 22 3a 62 6f 78 25 3d | 33 0d 02 08 23 20 c9 20 |"":box%=|3...# . |
|000004f0| 28 31 3c 3c 33 30 29 2b | 31 3a 65 72 72 5f 73 74 |(1<<30)+|1:err_st|
|00000500| 72 24 3d 22 22 3a 62 6f | 78 25 3d 31 0d 02 12 23 |r$="":bo|x%=1...#|
|00000510| 20 c9 20 28 31 3c 3c 33 | 30 29 2b 32 3a 65 72 72 | . (1<<3|0)+2:err|
|00000520| 5f 73 74 72 24 3d 22 22 | 3a 62 6f 78 25 3d 32 0d |_str$=""|:box%=2.|
|00000530| 02 1c 25 20 7f 3a 65 72 | 72 5f 73 74 72 24 3d 22 |..% .:er|r_str$="|
|00000540| 20 61 74 20 6c 69 6e 65 | 20 22 2b c3 9e 3a 62 6f | at line| "+..:bo|
|00000550| 78 25 3d 33 0d 02 26 06 | 20 cb 0d 02 30 1b 20 24 |x%=3..&.| ...0. $|
|00000560| 28 62 25 2b 34 29 3d f6 | 24 2b 65 72 72 5f 73 74 |(b%+4)=.|$+err_st|
|00000570| 72 24 2b bd 30 0d 02 3a | 3a 20 c8 99 20 22 57 69 |r$+.0..:|: .. "Wi|
|00000580| 6d 70 5f 52 65 70 6f 72 | 74 45 72 72 6f 72 22 2c |mp_Repor|tError",|
|00000590| 62 25 2c 62 6f 78 25 2c | 22 46 6c 69 70 20 42 69 |b%,box%,|"Flip Bi|
|000005a0| 74 22 20 b8 20 2c 72 65 | 73 70 6f 6e 73 65 25 0d |t" . ,re|sponse%.|
|000005b0| 02 44 13 20 3d 28 72 65 | 73 70 6f 6e 73 65 25 3d |.D. =(re|sponse%=|
|000005c0| 32 29 0d 02 4e 06 20 3a | 0d 02 58 0e 20 dd f2 72 |2)..N. :|..X. ..r|
|000005d0| 65 63 65 69 76 65 0d 02 | 62 44 20 f4 20 72 65 63 |eceive..|bD . rec|
|000005e0| 65 69 76 65 73 20 61 6e | 64 20 68 61 6e 64 6c 65 |eives an|d handle|
|000005f0| 73 20 77 69 6d 70 20 6d | 65 73 73 61 67 65 73 2e |s wimp m|essages.|
|00000600| 20 59 65 73 20 74 68 69 | 73 20 70 72 6f 67 72 61 | Yes thi|s progra|
|00000610| 6d 20 67 6f 73 73 69 70 | 73 21 0d 02 6c 0f 20 c8 |m gossip|s!..l. .|
|00000620| 8e 20 62 25 21 31 36 20 | ca 0d 02 76 10 20 c9 20 |. b%!16 |...v. . |
|00000630| 30 3a 71 75 69 74 25 3d | b9 0d 02 80 06 20 cb 0d |0:quit%=|..... ..|
|00000640| 02 8a 06 20 e1 0d 02 94 | 06 20 3a 0d 02 9e 0b 20 |... ....|. :.... |
|00000650| dd f2 69 6e 69 74 0d 02 | a8 1f 20 f4 20 4d 61 69 |..init..|.. . Mai|
|00000660| 6e 20 69 6e 69 74 69 73 | 61 74 69 6f 6e 20 72 6f |n initis|ation ro|
|00000670| 75 74 69 6e 65 0d 02 b2 | 52 20 f4 20 57 6f 70 70 |utine...|R . Wopp|
|00000680| 65 72 20 6f 66 20 61 20 | 32 44 20 61 72 72 61 79 |er of a |2D array|
|00000690| 20 66 6f 72 20 74 68 65 | 20 43 6d 6f 73 20 62 69 | for the| Cmos bi|
|000006a0| 74 73 20 28 61 72 72 61 | 79 20 67 69 76 65 73 20 |ts (arra|y gives |
|000006b0| 62 79 74 65 2c 62 69 74 | 20 69 6e 20 69 63 6f 6e |byte,bit| in icon|
|000006c0| 20 6f 72 64 65 72 29 0d | 02 bc 11 20 de 20 63 6d | order).|... . cm|
|000006d0| 6f 73 25 28 32 2c 39 29 | 0d 02 c6 20 20 63 6d 6f |os%(2,9)|... cmo|
|000006e0| 73 25 28 30 2c 30 29 3d | 31 34 30 3a 63 6d 6f 73 |s%(0,0)=|140:cmos|
|000006f0| 25 28 31 2c 30 29 3d 30 | 0d 02 d0 20 20 63 6d 6f |%(1,0)=0|... cmo|
|00000700| 73 25 28 30 2c 31 29 3d | 31 38 38 3a 63 6d 6f 73 |s%(0,1)=|188:cmos|
|00000710| 25 28 31 2c 31 29 3d 36 | 0d 02 da 1f 20 63 6d 6f |%(1,1)=6|.... cmo|
|00000720| 73 25 28 30 2c 32 29 3d | 32 38 3a 63 6d 6f 73 25 |s%(0,2)=|28:cmos%|
|00000730| 28 31 2c 32 29 3d 33 0d | 02 e4 1f 20 63 6d 6f 73 |(1,2)=3.|... cmos|
|00000740| 25 28 30 2c 33 29 3d 32 | 38 3a 63 6d 6f 73 25 28 |%(0,3)=2|8:cmos%(|
|00000750| 31 2c 33 29 3d 34 0d 02 | ee 1f 20 63 6d 6f 73 25 |1,3)=4..|.. cmos%|
|00000760| 28 30 2c 34 29 3d 32 38 | 3a 63 6d 6f 73 25 28 31 |(0,4)=28|:cmos%(1|
|00000770| 2c 34 29 3d 30 0d 02 f8 | 20 20 63 6d 6f 73 25 28 |,4)=0...| cmos%(|
|00000780| 30 2c 35 29 3d 31 38 38 | 3a 63 6d 6f 73 25 28 31 |0,5)=188|:cmos%(1|
|00000790| 2c 35 29 3d 32 0d 03 02 | 1f 20 63 6d 6f 73 25 28 |,5)=2...|. cmos%(|
|000007a0| 30 2c 36 29 3d 32 38 3a | 63 6d 6f 73 25 28 31 2c |0,6)=28:|cmos%(1,|
|000007b0| 36 29 3d 31 0d 03 0c 20 | 20 63 6d 6f 73 25 28 30 |6)=1... | cmos%(0|
|000007c0| 2c 37 29 3d 31 38 38 3a | 63 6d 6f 73 25 28 31 2c |,7)=188:|cmos%(1,|
|000007d0| 37 29 3d 37 0d 03 16 20 | 20 63 6d 6f 73 25 28 30 |7)=7... | cmos%(0|
|000007e0| 2c 38 29 3d 31 39 35 3a | 63 6d 6f 73 25 28 31 2c |,8)=195:|cmos%(1,|
|000007f0| 38 29 3d 33 0d 03 20 20 | 20 63 6d 6f 73 25 28 30 |8)=3.. | cmos%(0|
|00000800| 2c 39 29 3d 31 39 35 3a | 63 6d 6f 73 25 28 31 2c |,9)=195:|cmos%(1,|
|00000810| 39 29 3d 35 0d 03 34 2d | 20 de 20 62 25 20 31 35 |9)=5..4-| . b% 15|
|00000820| 30 30 2c 77 73 25 20 31 | 35 30 30 2c 6d 65 6e 73 |00,ws% 1|500,mens|
|00000830| 70 63 25 20 31 30 30 30 | 2c 69 62 61 72 25 20 31 |pc% 1000|,ibar% 1|
|00000840| 32 0d 03 3e 29 20 77 73 | 65 6e 64 25 3d 77 73 25 |2..>) ws|end%=ws%|
|00000850| 2b 31 35 30 30 3a 6d 65 | 6e 65 6e 64 25 3d 6d 65 |+1500:me|nend%=me|
|00000860| 6e 73 70 63 25 2b 31 30 | 30 30 0d 03 48 0c 20 71 |nspc%+10|00..H. q|
|00000870| 75 69 74 25 3d a3 0d 03 | 52 1e 20 6c 75 6d 70 73 |uit%=...|R. lumps|
|00000880| 25 3d a4 72 65 61 64 5f | 61 5f 62 69 74 28 31 34 |%=.read_|a_bit(14|
|00000890| 30 2c 30 29 0d 03 5c 10 | 20 c8 8e 20 6c 75 6d 70 |0,0)..\.| .. lump|
|000008a0| 73 25 20 ca 0d 03 66 31 | 20 c9 20 31 3a 73 70 72 |s% ...f1| . 1:spr|
|000008b0| 24 3d 22 3c 42 69 74 46 | 6c 69 70 24 44 69 72 3e |$="<BitF|lip$Dir>|
|000008c0| 2e 52 65 73 6f 75 72 63 | 65 73 2e 53 70 72 69 74 |.Resourc|es.Sprit|
|000008d0| 65 73 33 44 22 0d 03 70 | 2f 20 c9 20 30 3a 73 70 |es3D"..p|/ . 0:sp|
|000008e0| 72 24 3d 22 3c 42 69 74 | 46 6c 69 70 24 44 69 72 |r$="<Bit|Flip$Dir|
|000008f0| 3e 2e 52 65 73 6f 75 72 | 63 65 73 2e 53 70 72 69 |>.Resour|ces.Spri|
|00000900| 74 65 73 22 0d 03 7a 06 | 20 cb 0d 03 84 12 20 66 |tes"..z.| ..... f|
|00000910| 69 6c 65 25 3d 8e 28 73 | 70 72 24 29 0d 03 8e 1c |ile%=.(s|pr$)....|
|00000920| 20 73 69 7a 65 25 3d a2 | 23 66 69 6c 65 25 2b 34 | size%=.|#file%+4|
|00000930| 3a d9 23 66 69 6c 65 25 | 0d 03 98 14 20 de 20 73 |:.#file%|.... . s|
|00000940| 70 61 72 65 61 25 20 73 | 69 7a 65 25 0d 03 a2 20 |parea% s|ize%... |
|00000950| 20 21 73 70 61 72 65 61 | 25 3d 73 69 7a 65 25 3a | !sparea|%=size%:|
|00000960| 73 70 61 72 65 61 25 21 | 38 3d 31 36 0d 03 ac 27 |sparea%!|8=16...'|
|00000970| 20 c8 99 20 22 4f 53 5f | 53 70 72 69 74 65 4f 70 | .. "OS_|SpriteOp|
|00000980| 22 2c 26 31 30 41 2c 73 | 70 61 72 65 61 25 2c 73 |",&10A,s|parea%,s|
|00000990| 70 72 24 0d 03 b6 1c 20 | ee 20 85 20 e7 20 a4 65 |pr$.... |. . . .e|
|000009a0| 72 72 6f 72 20 8c 20 f2 | 63 6c 6f 73 65 3a e0 0d |rror . .|close:..|
|000009b0| 03 c0 14 20 f2 6c 6f 61 | 64 5f 74 65 6d 70 6c 61 |... .loa|d_templa|
|000009c0| 74 65 73 0d 03 ca 0f 20 | f2 6d 61 69 6e 5f 6d 65 |tes.... |.main_me|
|000009d0| 6e 75 0d 03 d4 1f 20 f2 | 61 74 74 61 63 68 28 6d |nu.... .|attach(m|
|000009e0| 61 69 6e 6d 65 6e 75 25 | 2c 30 2c 69 6e 66 6f 25 |ainmenu%|,0,info%|
|000009f0| 29 0d 03 de 06 20 e1 0d | 03 e8 06 20 3a 0d 03 f2 |).... ..|... :...|
|00000a00| 10 20 dd f2 6d 61 69 6e | 5f 6d 65 6e 75 0d 03 fc |. ..main|_menu...|
|00000a10| 2e 20 f4 20 63 72 65 61 | 74 73 20 69 63 6f 6e 20 |. . crea|ts icon |
|00000a20| 62 61 72 20 6d 65 6e 75 | 2c 20 75 73 69 6e 67 20 |bar menu|, using |
|00000a30| 46 4e 6d 61 6b 65 5f 6d | 65 6e 75 0d 04 06 09 20 |FNmake_m|enu.... |
|00000a40| f7 20 2b 31 0d 04 10 27 | 20 dc 20 42 69 74 46 6c |. +1...'| . BitFl|
|00000a50| 69 70 2c 49 6e 66 6f 2c | 43 6f 6e 66 69 67 75 72 |ip,Info,|Configur|
|00000a60| 65 2e 2e 2e 2c 51 75 69 | 74 2c 2a 0d 04 1a 19 20 |e...,Qui|t,*.... |
|00000a70| 6d 61 69 6e 6d 65 6e 75 | 25 3d a4 6d 61 6b 65 5f |mainmenu|%=.make_|
|00000a80| 6d 65 6e 75 0d 04 24 06 | 20 e1 0d 04 2e 06 20 3a |menu..$.| ..... :|
|00000a90| 0d 04 38 1f 20 dd f2 61 | 74 74 61 63 68 28 6d 65 |..8. ..a|ttach(me|
|00000aa0| 6e 75 25 2c 69 74 65 6d | 25 2c 73 75 62 25 29 0d |nu%,item|%,sub%).|
|00000ab0| 04 42 1f 20 f4 20 61 74 | 74 61 63 68 65 73 20 73 |.B. . at|taches s|
|00000ac0| 75 62 6d 65 6e 75 20 74 | 6f 20 6d 65 6e 75 0d 04 |ubmenu t|o menu..|
|00000ad0| 4c 20 20 21 28 6d 65 6e | 75 25 2b 32 38 2b 69 74 |L !(men|u%+28+it|
|00000ae0| 65 6d 25 2a 32 34 2b 34 | 29 3d 73 75 62 25 0d 04 |em%*24+4|)=sub%..|
|00000af0| 56 06 20 e1 0d 04 60 07 | 20 3a 20 0d 04 6a 11 20 |V. ...`.| : ..j. |
|00000b00| dd f2 6d 6f 75 73 65 63 | 6c 69 63 6b 0d 04 74 32 |..mousec|lick..t2|
|00000b10| 20 f4 20 63 61 6c 6c 65 | 64 20 77 68 65 6e 20 6d | . calle|d when m|
|00000b20| 6f 75 73 65 20 62 75 74 | 74 6f 6e 20 70 72 65 73 |ouse but|ton pres|
|00000b30| 73 65 64 20 6f 72 20 63 | 6c 69 63 6b 65 64 0d 04 |sed or c|licked..|
|00000b40| 7e 63 20 f4 20 62 25 21 | 30 3d 4d 6f 75 73 65 78 |~c . b%!|0=Mousex|
|00000b50| 2c 62 25 21 34 3d 4d 6f | 75 73 65 79 2c 62 25 21 |,b%!4=Mo|usey,b%!|
|00000b60| 38 3d 62 75 74 74 6f 6e | 73 3a 62 25 21 31 32 3d |8=button|s:b%!12=|
|00000b70| 77 69 6e 64 6f 77 20 68 | 61 6e 64 6c 65 20 28 2d |window h|andle (-|
|00000b80| 32 20 66 6f 72 20 69 63 | 6f 6e 20 62 61 72 29 3a |2 for ic|on bar):|
|00000b90| 62 25 21 31 36 3d 69 63 | 6f 6e 20 68 61 6e 64 6c |b%!16=ic|on handl|
|00000ba0| 65 0d 04 88 0f 20 c8 8e | 20 62 25 21 31 32 20 ca |e.... ..| b%!12 .|
|00000bb0| 0d 04 92 12 c9 20 2d 32 | 3a c8 8e 20 62 25 21 38 |..... -2|:.. b%!8|
|00000bc0| 20 ca 0d 04 9c 44 20 c9 | 20 32 3a f2 73 68 6f 77 | ....D .| 2:.show|
|00000bd0| 6d 65 6e 75 28 6d 61 69 | 6e 6d 65 6e 75 25 2c 21 |menu(mai|nmenu%,!|
|00000be0| 62 25 2d 36 34 2c 39 36 | 2b 33 2a 34 34 29 3a f4 |b%-64,96|+3*44):.|
|00000bf0| 20 63 68 61 6e 67 65 20 | 66 6f 72 20 6d 65 6e 75 | change |for menu|
|00000c00| 20 69 74 65 6d 73 0d 04 | a6 15 20 c9 20 34 3a f2 | items..|.. . 4:.|
|00000c10| 6f 70 65 6e 5f 63 6f 6e | 66 69 67 0d 04 b0 06 20 |open_con|fig.... |
|00000c20| cb 0d 04 ba 1b 20 c9 20 | 63 6f 6e 66 69 67 77 68 |..... . |configwh|
|00000c30| 25 3a c8 8e 20 62 25 21 | 31 36 20 ca 0d 04 c4 1a |%:.. b%!|16 .....|
|00000c40| 20 c9 20 31 32 3a f2 63 | 6c 69 63 6b 5f 6f 6e 5f | . 12:.c|lick_on_|
|00000c50| 63 6f 6e 66 69 67 0d 04 | ce 22 20 c9 20 31 31 3a |config..|." . 11:|
|00000c60| f2 63 6c 6f 73 65 5f 77 | 69 6e 64 6f 77 28 63 6f |.close_w|indow(co|
|00000c70| 6e 66 69 67 77 68 25 29 | 0d 04 d8 06 20 cb 0d 04 |nfigwh%)|.... ...|
|00000c80| e2 06 20 cb 0d 04 ec 06 | 20 e1 0d 04 f6 06 20 3a |.. .....| ..... :|
|00000c90| 0d 05 00 15 20 dd f2 6c | 6f 61 64 5f 74 65 6d 70 |.... ..l|oad_temp|
|00000ca0| 6c 61 74 65 73 0d 05 0a | 2a 20 f4 20 4c 6f 61 64 |lates...|* . Load|
|00000cb0| 73 20 74 65 6d 70 6c 61 | 74 65 73 20 61 6e 64 20 |s templa|tes and |
|00000cc0| 63 72 65 61 74 65 73 20 | 77 69 6e 64 6f 77 73 0d |creates |windows.|
|00000cd0| 05 14 10 20 c8 8e 20 6c | 75 6d 70 73 25 20 ca 0d |... .. l|umps% ..|
|00000ce0| 05 1e 44 20 c9 20 30 3a | c8 99 20 22 57 69 6d 70 |..D . 0:|.. "Wimp|
|00000cf0| 5f 4f 70 65 6e 54 65 6d | 70 6c 61 74 65 22 2c 2c |_OpenTem|plate",,|
|00000d00| 22 3c 42 69 74 46 6c 69 | 70 24 44 69 72 3e 2e 52 |"<BitFli|p$Dir>.R|
|00000d10| 65 73 6f 75 72 63 65 73 | 2e 54 65 6d 70 6c 61 74 |esources|.Templat|
|00000d20| 65 73 22 0d 05 28 45 20 | c9 20 31 3a c8 99 20 22 |es"..(E |. 1:.. "|
|00000d30| 57 69 6d 70 5f 4f 70 65 | 6e 54 65 6d 70 6c 61 74 |Wimp_Ope|nTemplat|
|00000d40| 65 22 2c 2c 22 3c 42 69 | 74 46 6c 69 70 24 44 69 |e",,"<Bi|tFlip$Di|
|00000d50| 72 3e 2e 52 65 73 6f 75 | 72 63 65 73 2e 54 65 6d |r>.Resou|rces.Tem|
|00000d60| 70 6c 61 74 65 33 44 22 | 0d 05 32 06 20 cb 0d 05 |plate3D"|..2. ...|
|00000d70| 3c 3e 20 c8 99 20 22 57 | 69 6d 70 5f 4c 6f 61 64 |<> .. "W|imp_Load|
|00000d80| 54 65 6d 70 6c 61 74 65 | 22 2c 2c 62 25 2c 77 73 |Template|",,b%,ws|
|00000d90| 25 2c 77 73 65 6e 64 25 | 2c 2d 31 2c 22 49 6e 66 |%,wsend%|,-1,"Inf|
|00000da0| 6f 22 2c 30 20 b8 20 2c | 2c 77 73 25 0d 05 46 12 |o",0 . ,|,ws%..F.|
|00000db0| 20 62 25 21 36 34 3d 73 | 70 61 72 65 61 25 0d 05 | b%!64=s|parea%..|
|00000dc0| 50 1e 20 24 62 25 21 28 | 38 38 2b 33 32 2a 33 2b |P. $b%!(|88+32*3+|
|00000dd0| 32 30 29 3d 76 65 72 73 | 69 6f 6e 24 0d 05 5a 27 |20)=vers|ion$..Z'|
|00000de0| 20 c8 99 20 22 57 69 6d | 70 5f 43 72 65 61 74 65 | .. "Wim|p_Create|
|00000df0| 57 69 6e 64 6f 77 22 2c | 2c 62 25 20 b8 20 69 6e |Window",|,b% . in|
|00000e00| 66 6f 25 0d 05 64 43 20 | c8 99 20 22 57 69 6d 70 |fo%..dC |.. "Wimp|
|00000e10| 5f 4c 6f 61 64 54 65 6d | 70 6c 61 74 65 22 2c 2c |_LoadTem|plate",,|
|00000e20| 62 25 2c 77 73 25 2c 77 | 73 65 6e 64 25 2c 2d 31 |b%,ws%,w|send%,-1|
|00000e30| 2c 22 43 6f 6e 66 69 67 | 75 72 65 22 2c 30 20 b8 |,"Config|ure",0 .|
|00000e40| 20 2c 2c 77 73 25 0d 05 | 6e 12 20 62 25 21 36 34 | ,,ws%..|n. b%!64|
|00000e50| 3d 73 70 61 72 65 61 25 | 0d 05 78 2b 20 c8 99 20 |=sparea%|..x+ .. |
|00000e60| 22 57 69 6d 70 5f 43 72 | 65 61 74 65 57 69 6e 64 |"Wimp_Cr|eateWind|
|00000e70| 6f 77 22 2c 2c 62 25 20 | b8 20 63 6f 6e 66 69 67 |ow",,b% |. config|
|00000e80| 77 68 25 0d 05 82 1c 20 | c8 99 20 22 57 69 6d 70 |wh%.... |.. "Wimp|
|00000e90| 5f 43 6c 6f 73 65 54 65 | 6d 70 6c 61 74 65 22 0d |_CloseTe|mplate".|
|00000ea0| 05 8c 06 20 e1 0d 05 96 | 06 20 3a 0d 05 a0 10 20 |... ....|. :.... |
|00000eb0| dd a4 6d 61 6b 65 5f 6d | 65 6e 75 0d 05 aa 3a 20 |..make_m|enu...: |
|00000ec0| f4 20 63 72 65 61 74 65 | 73 20 6d 65 6e 75 20 64 |. create|s menu d|
|00000ed0| 61 74 61 20 62 6c 6f 63 | 6b 20 66 72 6f 6d 20 69 |ata bloc|k from i|
|00000ee0| 6e 66 6f 20 69 6e 20 44 | 41 54 41 20 73 74 61 74 |nfo in D|ATA stat|
|00000ef0| 6d 65 6e 74 73 0d 05 b4 | 3d 20 e7 20 6d 65 6e 73 |ments...|= . mens|
|00000f00| 70 63 25 2b 32 38 3e 6d | 65 6e 65 6e 64 25 20 85 |pc%+28>m|enend% .|
|00000f10| 20 28 31 3c 3c 33 30 29 | 2b 32 2c 22 4e 6f 74 20 | (1<<30)|+2,"Not |
|00000f20| 65 6e 6f 75 67 68 20 6d | 65 6e 75 20 73 70 61 63 |enough m|enu spac|
|00000f30| 65 22 0d 05 be 13 20 73 | 74 61 72 74 25 3d 6d 65 |e".... s|tart%=me|
|00000f40| 6e 73 70 63 25 0d 05 c8 | 0d 20 f3 20 74 69 74 6c |nspc%...|. . titl|
|00000f50| 65 24 0d 05 d2 15 20 24 | 28 73 74 61 72 74 25 29 |e$.... $|(start%)|
|00000f60| 3d 74 69 74 6c 65 24 0d | 05 dc 10 20 73 74 61 72 |=title$.|... star|
|00000f70| 74 25 3f 31 32 3d 37 0d | 05 e6 10 20 73 74 61 72 |t%?12=7.|... star|
|00000f80| 74 25 3f 31 33 3d 32 0d | 05 f0 10 20 73 74 61 72 |t%?13=2.|... star|
|00000f90| 74 25 3f 31 34 3d 37 0d | 05 fa 10 20 73 74 61 72 |t%?14=7.|... star|
|00000fa0| 74 25 3f 31 35 3d 30 0d | 06 04 11 20 73 74 61 72 |t%?15=0.|... star|
|00000fb0| 74 25 21 32 30 3d 34 34 | 0d 06 0e 10 20 73 74 61 |t%!20=44|.... sta|
|00000fc0| 72 74 25 21 32 34 3d 30 | 0d 06 18 17 20 77 69 64 |rt%!24=0|.... wid|
|00000fd0| 74 68 25 3d a9 28 74 69 | 74 6c 65 24 29 2d 33 0d |th%=.(ti|tle$)-3.|
|00000fe0| 06 22 10 20 6d 65 6e 73 | 70 63 25 2b 3d 32 38 0d |.". mens|pc%+=28.|
|00000ff0| 06 2c 06 20 f5 0d 06 36 | 0c 20 f3 20 69 74 65 6d |.,. ...6|. . item|
|00001000| 24 0d 06 40 13 20 e7 20 | 69 74 65 6d 24 3c 3e 22 |$..@. . |item$<>"|
|00001010| 2a 22 20 8c 0d 06 4a 3d | 20 e7 20 6d 65 6e 73 70 |*" ...J=| . mensp|
|00001020| 63 25 2b 32 34 3e 6d 65 | 6e 65 6e 64 25 20 85 20 |c%+24>me|nend% . |
|00001030| 28 31 3c 3c 33 30 29 2b | 32 2c 22 4e 6f 74 20 65 |(1<<30)+|2,"Not e|
|00001040| 6e 6f 75 67 68 20 6d 65 | 6e 75 20 73 70 61 63 65 |nough me|nu space|
|00001050| 22 0d 06 54 0f 20 21 6d | 65 6e 73 70 63 25 3d 30 |"..T. !m|enspc%=0|
|00001060| 0d 06 5e 11 20 77 72 69 | 74 65 61 62 6c 65 25 3d |..^. wri|teable%=|
|00001070| a3 0d 06 68 14 20 75 6c | 25 3d a7 69 74 65 6d 24 |...h. ul|%=.item$|
|00001080| 2c 22 5f 22 29 0d 06 72 | 0c 20 e7 20 75 6c 25 20 |,"_")..r|. . ul% |
|00001090| 8c 0d 06 7c 1f 20 74 61 | 69 6c 24 3d c2 69 74 65 |...|. ta|il$=.ite|
|000010a0| 6d 24 2c a9 28 69 74 65 | 6d 24 29 2d 75 6c 25 29 |m$,.(ite|m$)-ul%)|
|000010b0| 0d 06 86 2f 20 e7 20 a7 | 74 61 69 6c 24 2c 22 54 |.../ . .|tail$,"T|
|000010c0| 22 29 20 21 6d 65 6e 73 | 70 63 25 3d 21 6d 65 6e |") !mens|pc%=!men|
|000010d0| 73 70 63 25 20 84 20 31 | 3a f4 20 74 69 63 6b 0d |spc% . 1|:. tick.|
|000010e0| 06 90 36 20 e7 20 a7 74 | 61 69 6c 24 2c 22 44 22 |..6 . .t|ail$,"D"|
|000010f0| 29 20 21 6d 65 6e 73 70 | 63 25 3d 21 6d 65 6e 73 |) !mensp|c%=!mens|
|00001100| 70 63 25 20 84 20 32 3a | f4 20 64 6f 74 74 65 64 |pc% . 2:|. dotted|
|00001110| 20 6c 69 6e 65 0d 06 9a | 5a 20 e7 20 a7 74 61 69 | line...|Z . .tai|
|00001120| 6c 24 2c 22 57 22 29 20 | 21 6d 65 6e 73 70 63 25 |l$,"W") |!menspc%|
|00001130| 3d 21 6d 65 6e 73 70 63 | 25 20 84 20 34 3a 77 72 |=!menspc|% . 4:wr|
|00001140| 69 74 65 61 62 6c 65 25 | 3d b9 3a f3 20 62 75 66 |iteable%|=.:. buf|
|00001150| 66 65 72 25 3a f3 20 62 | 75 66 6c 65 6e 25 3a f4 |fer%:. b|uflen%:.|
|00001160| 20 77 72 69 74 65 61 62 | 6c 65 20 69 63 6f 6e 0d | writeab|le icon.|
|00001170| 06 a4 3b 20 e7 20 a7 74 | 61 69 6c 24 2c 22 4d 22 |..; . .t|ail$,"M"|
|00001180| 29 20 21 6d 65 6e 73 70 | 63 25 3d 21 6d 65 6e 73 |) !mensp|c%=!mens|
|00001190| 70 63 25 20 84 20 38 3a | f4 20 67 65 6e 65 72 61 |pc% . 8:|. genera|
|000011a0| 74 65 20 6d 65 73 73 61 | 67 65 0d 06 ae 18 20 69 |te messa|ge.... i|
|000011b0| 74 65 6d 24 3d c0 69 74 | 65 6d 24 2c 75 6c 25 2d |tem$=.it|em$,ul%-|
|000011c0| 31 29 0d 06 b8 06 20 cd | 0d 06 c2 22 20 e7 20 a9 |1).... .|..." . .|
|000011d0| 69 74 65 6d 24 3e 77 69 | 64 74 68 25 20 77 69 64 |item$>wi|dth% wid|
|000011e0| 74 68 25 3d a9 69 74 65 | 6d 24 0d 06 cc 23 20 6d |th%=.ite|m$...# m|
|000011f0| 65 6e 73 70 63 25 21 34 | 3d 2d 31 3a f4 20 73 75 |enspc%!4|=-1:. su|
|00001200| 62 6d 65 6e 75 20 70 6f | 69 6e 74 65 72 0d 06 d6 |bmenu po|inter...|
|00001210| 13 20 e7 20 77 72 69 74 | 65 61 62 6c 65 25 20 8c |. . writ|eable% .|
|00001220| 0d 06 e0 5b 20 6d 65 6e | 73 70 63 25 21 38 3d 26 |...[ men|spc%!8=&|
|00001230| 30 37 30 30 46 31 32 31 | 3a 6d 65 6e 73 70 63 25 |0700F121|:menspc%|
|00001240| 21 31 32 3d 62 75 66 66 | 65 72 25 3a 6d 65 6e 73 |!12=buff|er%:mens|
|00001250| 70 63 25 21 31 36 3d 2d | 31 3a 6d 65 6e 73 70 63 |pc%!16=-|1:menspc|
|00001260| 25 21 32 30 3d 62 75 66 | 6c 65 6e 25 3a 24 62 75 |%!20=buf|len%:$bu|
|00001270| 66 66 65 72 25 3d 69 74 | 65 6d 24 0d 06 ea 06 20 |ffer%=it|em$.... |
|00001280| cc 0d 06 f4 12 20 e7 20 | a9 69 74 65 6d 24 3c 31 |..... . |.item$<1|
|00001290| 32 20 8c 0d 06 fe 2c 20 | 6d 65 6e 73 70 63 25 21 |2 ...., |menspc%!|
|000012a0| 38 3d 26 30 37 30 30 30 | 30 32 31 3a 24 28 6d 65 |8=&07000|021:$(me|
|000012b0| 6e 73 70 63 25 2b 31 32 | 29 3d 69 74 65 6d 24 0d |nspc%+12|)=item$.|
|000012c0| 07 08 06 20 cc 0d 07 12 | 49 20 6d 65 6e 73 70 63 |... ....|I menspc|
|000012d0| 25 21 38 3d 26 30 37 30 | 30 30 31 32 31 3a 6d 65 |%!8=&070|00121:me|
|000012e0| 6e 73 70 63 25 21 31 32 | 3d 77 73 25 3a 6d 65 6e |nspc%!12|=ws%:men|
|000012f0| 73 70 63 25 21 31 36 3d | 2d 31 3a 6d 65 6e 73 70 |spc%!16=|-1:mensp|
|00001300| 63 25 21 32 30 3d a9 69 | 74 65 6d 24 2b 31 0d 07 |c%!20=.i|tem$+1..|
|00001310| 1c 1d 20 24 77 73 25 3d | 69 74 65 6d 24 3a 77 73 |.. $ws%=|item$:ws|
|00001320| 25 2b 3d a9 69 74 65 6d | 24 2b 31 0d 07 26 06 20 |%+=.item|$+1..&. |
|00001330| cd 0d 07 30 06 20 cd 0d | 07 3a 10 20 6d 65 6e 73 |...0. ..|.:. mens|
|00001340| 70 63 25 2b 3d 32 34 0d | 07 44 06 20 cd 0d 07 4e |pc%+=24.|.D. ...N|
|00001350| 10 20 fd 20 69 74 65 6d | 24 3d 22 2a 22 0d 07 58 |. . item|$="*"..X|
|00001360| 1b 20 73 74 61 72 74 25 | 21 31 36 3d 77 69 64 74 |. start%|!16=widt|
|00001370| 68 25 2a 31 36 2b 33 32 | 0d 07 62 26 20 21 28 6d |h%*16+32|..b& !(m|
|00001380| 65 6e 73 70 63 25 2d 32 | 34 29 3d 21 28 6d 65 6e |enspc%-2|4)=!(men|
|00001390| 73 70 63 25 2d 32 34 29 | 20 84 20 26 38 30 0d 07 |spc%-24)| . &80..|
|000013a0| 6c 12 20 6d 70 74 72 25 | 3d 6d 65 6e 73 70 63 25 |l. mptr%|=menspc%|
|000013b0| 0d 07 76 0c 20 3d 73 74 | 61 72 74 25 0d 07 80 06 |..v. =st|art%....|
|000013c0| 20 3a 0d 07 8a 1c 20 dd | f2 73 68 6f 77 6d 65 6e | :.... .|.showmen|
|000013d0| 75 28 6d 65 6e 75 25 2c | 78 25 2c 79 25 29 0d 07 |u(menu%,|x%,y%)..|
|000013e0| 94 11 20 f4 20 4f 70 65 | 6e 73 20 6d 65 6e 75 0d |.. . Ope|ns menu.|
|000013f0| 07 9e 25 20 74 6f 70 6d | 65 6e 75 25 3d 6d 65 6e |..% topm|enu%=men|
|00001400| 75 25 3a 74 6f 70 78 25 | 3d 78 25 3a 74 6f 70 79 |u%:topx%|=x%:topy|
|00001410| 25 3d 79 25 0d 07 a8 26 | 20 c8 99 20 22 57 69 6d |%=y%...&| .. "Wim|
|00001420| 70 5f 43 72 65 61 74 65 | 4d 65 6e 75 22 2c 2c 6d |p_Create|Menu",,m|
|00001430| 65 6e 75 25 2c 78 25 2c | 79 25 0d 07 b2 06 20 e1 |enu%,x%,|y%.... .|
|00001440| 0d 07 bc 06 20 3a 0d 07 | c6 10 20 dd f2 6d 65 6e |.... :..|.. ..men|
|00001450| 75 63 6c 69 63 6b 0d 07 | d0 1d 20 f4 20 64 65 63 |uclick..|.. . dec|
|00001460| 6f 64 65 73 20 6d 65 6e | 75 20 73 65 6c 65 63 74 |odes men|u select|
|00001470| 69 6f 6e 0d 07 da 09 20 | ea 20 63 25 0d 07 e4 0e |ion.... |. c%....|
|00001480| 20 63 25 3d 62 25 2b 39 | 30 30 0d 07 ee 21 20 c8 | c%=b%+9|00...! .|
|00001490| 99 20 22 57 69 6d 70 5f | 47 65 74 50 6f 69 6e 74 |. "Wimp_|GetPoint|
|000014a0| 65 72 49 6e 66 6f 22 2c | 2c 63 25 0d 07 f8 14 20 |erInfo",|,c%.... |
|000014b0| 61 64 6a 25 3d 28 63 25 | 21 38 20 80 20 31 29 0d |adj%=(c%|!8 . 1).|
|000014c0| 08 02 29 20 c8 99 20 22 | 57 69 6d 70 5f 44 65 63 |..) .. "|Wimp_Dec|
|000014d0| 6f 64 65 4d 65 6e 75 22 | 2c 2c 74 6f 70 6d 65 6e |odeMenu"|,,topmen|
|000014e0| 75 25 2c 62 25 2c 63 25 | 0d 08 0c 0d 20 c8 8e 20 |u%,b%,c%|.... .. |
|000014f0| 24 63 25 20 ca 0d 08 16 | 15 20 c9 20 22 51 75 69 |$c% ....|. . "Qui|
|00001500| 74 22 3a 71 75 69 74 25 | 3d b9 0d 08 20 22 20 c9 |t":quit%|=... " .|
|00001510| 20 22 43 6f 6e 66 69 67 | 75 72 65 2e 2e 2e 22 3a | "Config|ure...":|
|00001520| f2 6f 70 65 6e 5f 63 6f | 6e 66 69 67 0d 08 2a 06 |.open_co|nfig..*.|
|00001530| 20 cb 0d 08 34 2b 20 e7 | 20 61 64 6a 25 20 f2 73 | ...4+ .| adj% .s|
|00001540| 68 6f 77 6d 65 6e 75 28 | 74 6f 70 6d 65 6e 75 25 |howmenu(|topmenu%|
|00001550| 2c 74 6f 70 78 25 2c 74 | 6f 70 79 25 29 0d 08 3e |,topx%,t|opy%)..>|
|00001560| 06 20 e1 0d 08 48 06 20 | 3a 0d 08 52 12 20 dd f2 |. ...H. |:..R. ..|
|00001570| 6f 70 65 6e 5f 63 6f 6e | 66 69 67 0d 08 5c 0e 20 |open_con|fig..\. |
|00001580| e3 20 78 3d 30 20 b8 20 | 39 0d 08 66 29 20 79 3d |. x=0 . |9..f) y=|
|00001590| a4 72 65 61 64 5f 61 5f | 62 69 74 28 63 6d 6f 73 |.read_a_|bit(cmos|
|000015a0| 25 28 30 2c 78 29 2c 63 | 6d 6f 73 25 28 31 2c 78 |%(0,x),c|mos%(1,x|
|000015b0| 29 29 0d 08 70 26 20 e7 | 20 79 3d 31 20 f2 73 65 |))..p& .| y=1 .se|
|000015c0| 6c 65 63 74 5f 69 63 6f | 6e 28 63 6f 6e 66 69 67 |lect_ico|n(config|
|000015d0| 77 68 25 2c 78 2b 31 29 | 0d 08 7a 28 20 e7 20 79 |wh%,x+1)|..z( . y|
|000015e0| 3d 30 20 f2 75 6e 73 65 | 6c 65 63 74 5f 69 63 6f |=0 .unse|lect_ico|
|000015f0| 6e 28 63 6f 6e 66 69 67 | 77 68 25 2c 78 2b 31 29 |n(config|wh%,x+1)|
|00001600| 0d 08 84 08 20 ed 20 78 | 0d 08 8e 48 20 21 62 25 |.... . x|...H !b%|
|00001610| 3d 63 6f 6e 66 69 67 77 | 68 25 3a c8 99 20 22 57 |=configw|h%:.. "W|
|00001620| 69 6d 70 5f 47 65 74 57 | 69 6e 64 6f 77 53 74 61 |imp_GetW|indowSta|
|00001630| 74 65 22 2c 2c 62 25 3a | c8 99 20 22 57 69 6d 70 |te",,b%:|.. "Wimp|
|00001640| 5f 4f 70 65 6e 57 69 6e | 64 6f 77 22 2c 2c 62 25 |_OpenWin|dow",,b%|
|00001650| 0d 08 98 06 20 e1 0d 08 | a2 06 20 3a 0d 08 ac 16 |.... ...|.. :....|
|00001660| 20 dd f2 63 6c 69 63 6b | 5f 6f 6e 5f 63 6f 6e 66 | ..click|_on_conf|
|00001670| 69 67 0d 08 b6 0f 20 e3 | 20 78 25 3d 30 20 b8 20 |ig.... .| x%=0 . |
|00001680| 39 0d 08 c0 26 20 e7 20 | a4 69 63 6f 6e 5f 73 74 |9...& . |.icon_st|
|00001690| 61 74 65 28 63 6f 6e 66 | 69 67 77 68 25 2c 78 25 |ate(conf|igwh%,x%|
|000016a0| 2b 31 29 3d b9 20 8c 0d | 08 ca 2a 20 f2 63 68 65 |+1)=. ..|..* .che|
|000016b0| 63 6b 5f 62 69 74 28 63 | 6d 6f 73 25 28 30 2c 78 |ck_bit(c|mos%(0,x|
|000016c0| 25 29 2c 63 6d 6f 73 25 | 28 31 2c 78 25 29 2c 31 |%),cmos%|(1,x%),1|
|000016d0| 29 0d 08 d4 06 20 cd 0d | 08 de 26 20 e7 20 a4 69 |).... ..|..& . .i|
|000016e0| 63 6f 6e 5f 73 74 61 74 | 65 28 63 6f 6e 66 69 67 |con_stat|e(config|
|000016f0| 77 68 25 2c 78 25 2b 31 | 29 3d a3 20 8c 0d 08 e8 |wh%,x%+1|)=. ....|
|00001700| 2a 20 f2 63 68 65 63 6b | 5f 62 69 74 28 63 6d 6f |* .check|_bit(cmo|
|00001710| 73 25 28 30 2c 78 25 29 | 2c 63 6d 6f 73 25 28 31 |s%(0,x%)|,cmos%(1|
|00001720| 2c 78 25 29 2c 30 29 0d | 08 f2 06 20 cd 0d 08 fc |,x%),0).|... ....|
|00001730| 09 20 ed 20 78 25 0d 09 | 06 0e 20 c8 8e 20 62 25 |. . x%..|.. .. b%|
|00001740| 21 38 20 ca 0d 09 10 21 | 20 c9 20 34 3a f2 63 6c |!8 ....!| . 4:.cl|
|00001750| 6f 73 65 5f 77 69 6e 64 | 6f 77 28 63 6f 6e 66 69 |ose_wind|ow(confi|
|00001760| 67 77 68 25 29 0d 09 1a | 15 20 c9 20 31 3a f2 6f |gwh%)...|. . 1:.o|
|00001770| 70 65 6e 5f 63 6f 6e 66 | 69 67 0d 09 24 06 20 cb |pen_conf|ig..$. .|
|00001780| 0d 09 2e 06 20 e1 0d 09 | 38 06 20 3a 0d 09 42 22 |.... ...|8. :..B"|
|00001790| dd f2 63 68 65 63 6b 5f | 62 69 74 28 62 79 74 65 |..check_|bit(byte|
|000017a0| 25 2c 62 69 74 25 2c 76 | 61 6c 75 65 25 29 0d 09 |%,bit%,v|alue%)..|
|000017b0| 4c 25 63 75 72 76 61 6c | 75 65 25 3d a4 72 65 61 |L%curval|ue%=.rea|
|000017c0| 64 5f 61 5f 62 69 74 28 | 62 79 74 65 25 2c 62 69 |d_a_bit(|byte%,bi|
|000017d0| 74 25 29 0d 09 56 19 c8 | 8e 20 63 75 72 76 61 6c |t%)..V..|. curval|
|000017e0| 75 65 25 2b 76 61 6c 75 | 65 25 20 ca 0d 09 60 20 |ue%+valu|e% ...` |
|000017f0| 20 c9 20 31 3a f2 74 6f | 67 67 6c 65 5f 62 69 74 | . 1:.to|ggle_bit|
|00001800| 28 62 79 74 65 25 2c 62 | 69 74 25 29 0d 09 6a 06 |(byte%,b|it%)..j.|
|00001810| 20 cb 0d 09 74 05 e1 0d | 09 7e 05 3a 0d 09 88 1c | ...t...|.~.:....|
|00001820| dd f2 74 6f 67 67 6c 65 | 5f 62 69 74 28 62 79 74 |..toggle|_bit(byt|
|00001830| 65 25 2c 62 69 74 25 29 | 0d 09 92 12 ea 20 63 25 |e%,bit%)|..... c%|
|00001840| 3a 63 25 3d 62 25 2b 38 | 39 30 0d 09 9c 23 c8 99 |:c%=b%+8|90...#..|
|00001850| 20 22 4f 53 5f 42 79 74 | 65 22 2c 31 36 31 2c 62 | "OS_Byt|e",161,b|
|00001860| 79 74 65 25 20 b8 20 2c | 2c 63 25 3f 30 0d 09 a6 |yte% . ,|,c%?0...|
|00001870| 10 63 25 3f 31 3d 31 3c | 3c 62 69 74 25 0d 09 b0 |.c%?1=1<|<bit%...|
|00001880| 14 63 25 3f 32 3d 63 25 | 3f 31 20 82 20 63 25 3f |.c%?2=c%|?1 . c%?|
|00001890| 30 0d 09 ba 1f c8 99 20 | 22 4f 53 5f 42 79 74 65 |0...... |"OS_Byte|
|000018a0| 22 2c 31 36 32 2c 62 79 | 74 65 25 2c 63 25 3f 32 |",162,by|te%,c%?2|
|000018b0| 0d 09 c4 05 e1 0d 09 ce | 05 3a 0d 09 d8 53 f4 20 |........|.:...S. |
|000018c0| 72 65 61 64 73 20 61 20 | 42 79 74 65 20 6f 66 20 |reads a |Byte of |
|000018d0| 43 4d 4f 53 52 41 4d 20 | 61 6e 64 20 73 68 69 66 |CMOSRAM |and shif|
|000018e0| 74 73 20 69 74 20 74 6f | 20 67 65 74 20 74 68 65 |ts it to| get the|
|000018f0| 20 62 69 74 20 69 6e 20 | 71 75 65 73 74 69 6f 6e | bit in |question|
|00001900| 20 28 30 2d 37 20 50 6c | 65 61 73 65 29 0d 09 e2 | (0-7 Pl|ease)...|
|00001910| 1a dd a4 72 65 61 64 5f | 61 5f 62 69 74 28 62 79 |...read_|a_bit(by|
|00001920| 74 65 2c 62 69 74 29 0d | 09 ec 12 ea 20 63 25 3a |te,bit).|.... c%:|
|00001930| 63 25 3d 62 25 2b 39 30 | 30 0d 09 f6 0d 62 69 74 |c%=b%+90|0....bit|
|00001940| 3d 62 69 74 2b 31 0d 0a | 00 22 c8 99 20 22 4f 53 |=bit+1..|.".. "OS|
|00001950| 5f 42 79 74 65 22 2c 31 | 36 31 2c 62 79 74 65 20 |_Byte",1|61,byte |
|00001960| b8 20 2c 2c 63 25 3f 30 | 0d 0a 0a 21 63 25 3f 30 |. ,,c%?0|...!c%?0|
|00001970| 3d 63 25 3f 30 3c 3c 38 | 2d 62 69 74 3a 63 25 3f |=c%?0<<8|-bit:c%?|
|00001980| 30 3d 63 25 3f 30 3e 3e | 37 0d 0a 14 09 3d 63 25 |0=c%?0>>|7....=c%|
|00001990| 3f 30 0d 0a 1e 05 3a 0d | 0a 28 20 20 dd a4 69 63 |?0....:.|.( ..ic|
|000019a0| 6f 6e 5f 73 74 61 74 65 | 28 77 69 6e 64 6f 77 25 |on_state|(window%|
|000019b0| 2c 69 63 6f 6e 25 29 0d | 0a 32 27 20 f4 20 72 65 |,icon%).|.2' . re|
|000019c0| 74 75 72 6e 73 20 74 72 | 75 65 20 69 66 20 69 63 |turns tr|ue if ic|
|000019d0| 6f 6e 20 69 73 20 73 65 | 6c 65 63 74 65 64 0d 0a |on is se|lected..|
|000019e0| 3c 09 20 ea 20 63 25 0d | 0a 46 0e 20 63 25 3d 62 |<. . c%.|.F. c%=b|
|000019f0| 25 2b 39 30 30 0d 0a 50 | 10 20 21 63 25 3d 77 69 |%+900..P|. !c%=wi|
|00001a00| 6e 64 6f 77 25 0d 0a 5a | 0f 20 63 25 21 34 3d 69 |ndow%..Z|. c%!4=i|
|00001a10| 63 6f 6e 25 0d 0a 64 1f | 20 c8 99 20 22 57 69 6d |con%..d.| .. "Wim|
|00001a20| 70 5f 47 65 74 49 63 6f | 6e 53 74 61 74 65 22 2c |p_GetIco|nState",|
|00001a30| 2c 63 25 0d 0a 6e 1c 20 | 3d 28 28 63 25 21 32 34 |,c%..n. |=((c%!24|
|00001a40| 29 20 80 20 28 31 3c 3c | 32 31 29 29 3c 3e 30 0d |) . (1<<|21))<>0.|
|00001a50| 0a 78 06 20 3a 0d 0a 82 | 17 dd f2 63 6c 6f 73 65 |.x. :...|...close|
|00001a60| 5f 77 69 6e 64 6f 77 28 | 77 68 25 29 0d 0a 8c 08 |_window(|wh%)....|
|00001a70| ea 20 63 25 0d 0a 96 0d | 63 25 3d 62 25 2b 39 30 |. c%....|c%=b%+90|
|00001a80| 30 0d 0a a0 0c 63 25 21 | 30 3d 77 68 25 0d 0a aa |0....c%!|0=wh%...|
|00001a90| 1d c8 99 20 22 57 69 6d | 70 5f 43 6c 6f 73 65 57 |... "Wim|p_CloseW|
|00001aa0| 69 6e 64 6f 77 22 2c 2c | 63 25 0d 0a b4 05 e1 0d |indow",,|c%......|
|00001ab0| 0a be 05 3a 0d 0a c8 1c | dd f2 73 65 6c 65 63 74 |...:....|..select|
|00001ac0| 5f 69 63 6f 6e 28 77 68 | 25 2c 69 63 6f 6e 25 29 |_icon(wh|%,icon%)|
|00001ad0| 0d 0a d2 12 ea 20 63 25 | 3a 63 25 3d 62 25 2b 39 |..... c%|:c%=b%+9|
|00001ae0| 30 30 0d 0a dc 16 21 63 | 25 3d 77 68 25 3a 63 25 |00....!c|%=wh%:c%|
|00001af0| 21 34 3d 69 63 6f 6e 25 | 0d 0a e6 1a 63 25 21 38 |!4=icon%|....c%!8|
|00001b00| 3d 31 3c 3c 32 31 3a 63 | 25 21 31 32 3d 31 3c 3c |=1<<21:c|%!12=1<<|
|00001b10| 32 31 0d 0a f0 1e c8 99 | 20 22 57 69 6d 70 5f 53 |21......| "Wimp_S|
|00001b20| 65 74 49 63 6f 6e 53 74 | 61 74 65 22 2c 2c 63 25 |etIconSt|ate",,c%|
|00001b30| 0d 0a fa 05 e1 0d 0b 04 | 05 3a 0d 0b 0e 1e dd f2 |........|.:......|
|00001b40| 75 6e 73 65 6c 65 63 74 | 5f 69 63 6f 6e 28 77 68 |unselect|_icon(wh|
|00001b50| 25 2c 69 63 6f 6e 25 29 | 0d 0b 18 12 ea 20 63 25 |%,icon%)|..... c%|
|00001b60| 3a 63 25 3d 62 25 2b 39 | 30 30 0d 0b 22 16 21 63 |:c%=b%+9|00..".!c|
|00001b70| 25 3d 77 68 25 3a 63 25 | 21 34 3d 69 63 6f 6e 25 |%=wh%:c%|!4=icon%|
|00001b80| 0d 0b 2c 16 63 25 21 38 | 3d 30 3a 63 25 21 31 32 |..,.c%!8|=0:c%!12|
|00001b90| 3d 31 3c 3c 32 31 0d 0b | 36 1e c8 99 20 22 57 69 |=1<<21..|6... "Wi|
|00001ba0| 6d 70 5f 53 65 74 49 63 | 6f 6e 53 74 61 74 65 22 |mp_SetIc|onState"|
|00001bb0| 2c 2c 63 25 0d 0b 40 05 | e1 0d 0b 4a 05 3a 0d 0b |,,c%..@.|...J.:..|
|00001bc0| 54 0f 20 dd f2 74 65 72 | 6d 28 61 25 29 0d 0b 5e |T. ..ter|m(a%)..^|
|00001bd0| 3e 20 f4 20 70 75 74 73 | 20 72 65 74 75 72 6e 20 |> . puts| return |
|00001be0| 63 68 61 72 61 63 74 65 | 72 20 28 41 53 43 49 49 |characte|r (ASCII|
|00001bf0| 20 31 33 29 20 6f 6e 20 | 65 6e 64 20 6f 66 20 73 | 13) on |end of s|
|00001c00| 74 72 69 6e 67 20 61 74 | 20 61 25 0d 0b 68 09 20 |tring at| a%..h. |
|00001c10| ea 20 6e 25 0d 0b 72 10 | 20 c8 95 20 61 25 3f 6e |. n%..r.| .. a%?n|
|00001c20| 25 3e 33 31 0d 0b 7c 0a | 20 6e 25 2b 3d 31 0d 0b |%>31..|.| n%+=1..|
|00001c30| 86 06 20 ce 0d 0b 90 0d | 20 61 25 3f 6e 25 3d 31 |.. .....| a%?n%=1|
|00001c40| 33 0d 0b 9a 06 20 e1 0d | 0b a4 06 20 3a 0d 0b ae |3.... ..|... :...|
|00001c50| 0f 20 dd a4 74 65 72 6d | 28 61 25 29 0d 0b b8 41 |. ..term|(a%)...A|
|00001c60| 20 f4 20 70 75 74 73 20 | 72 65 74 75 72 6e 20 63 | . puts |return c|
|00001c70| 68 61 72 61 63 74 65 72 | 20 28 41 53 43 49 49 20 |haracter| (ASCII |
|00001c80| 31 33 29 20 6f 6e 20 65 | 6e 64 20 6f 66 20 72 65 |13) on e|nd of re|
|00001c90| 74 75 72 6e 65 64 20 73 | 74 72 69 6e 67 0d 0b c2 |turned s|tring...|
|00001ca0| 11 20 ea 20 6e 25 2c 73 | 74 72 69 6e 67 24 0d 0b |. . n%,s|tring$..|
|00001cb0| cc 0f 20 73 74 72 69 6e | 67 24 3d 22 22 0d 0b d6 |.. strin|g$=""...|
|00001cc0| 1a 20 c8 95 20 61 25 3f | 6e 25 3e 33 31 20 84 20 |. .. a%?|n%>31 . |
|00001cd0| 61 25 3f 6e 25 3d 39 0d | 0b e0 18 20 73 74 72 69 |a%?n%=9.|... stri|
|00001ce0| 6e 67 24 2b 3d bd 3f 6e | 25 3a 6e 25 2b 3d 31 0d |ng$+=.?n|%:n%+=1.|
|00001cf0| 0b ea 06 20 ce 0d 0b f4 | 0d 20 61 25 3f 6e 25 3d |... ....|. a%?n%=|
|00001d00| 31 33 0d 0b fe 0d 20 3d | 73 74 72 69 6e 67 24 0d |13.... =|string$.|
|00001d10| 0c 08 06 20 3a 0d 0c 12 | 21 20 dd a4 73 74 72 69 |... :...|! ..stri|
|00001d20| 6e 67 5f 61 64 64 72 28 | 77 69 6e 64 6f 77 25 2c |ng_addr(|window%,|
|00001d30| 69 63 6f 6e 25 29 0d 0c | 1c 30 20 f4 20 72 65 74 |icon%)..|.0 . ret|
|00001d40| 75 72 6e 73 20 61 64 72 | 65 73 73 20 6f 66 20 69 |urns adr|ess of i|
|00001d50| 63 6f 6e 73 20 69 6e 64 | 65 72 65 63 74 65 64 20 |cons ind|erected |
|00001d60| 73 74 72 69 6e 67 0d 0c | 26 09 20 ea 20 63 25 0d |string..|&. . c%.|
|00001d70| 0c 30 0c 20 de 20 63 25 | 20 36 34 0d 0c 3a 10 20 |.0. . c%| 64..:. |
|00001d80| 21 63 25 3d 77 69 6e 64 | 6f 77 25 0d 0c 44 0f 20 |!c%=wind|ow%..D. |
|00001d90| 63 25 21 34 3d 69 63 6f | 6e 25 0d 0c 4e 1f 20 c8 |c%!4=ico|n%..N. .|
|00001da0| 99 20 22 57 69 6d 70 5f | 47 65 74 49 63 6f 6e 53 |. "Wimp_|GetIconS|
|00001db0| 74 61 74 65 22 2c 2c 63 | 25 0d 0c 58 0b 20 3d 63 |tate",,c|%..X. =c|
|00001dc0| 25 21 32 38 0d 0c 62 06 | 20 3a 0d 0c 6c 21 20 dd |%!28..b.| :..l! .|
|00001dd0| a4 69 63 6f 6e 5f 73 74 | 72 69 6e 67 28 77 69 6e |.icon_st|ring(win|
|00001de0| 64 6f 77 25 2c 69 63 6f | 6e 25 29 0d 0c 76 2b 20 |dow%,ico|n%)..v+ |
|00001df0| f4 20 72 65 74 75 72 6e | 73 20 69 63 6f 6e 73 20 |. return|s icons |
|00001e00| 69 6e 64 65 72 65 63 74 | 65 64 20 74 65 78 74 20 |inderect|ed text |
|00001e10| 73 74 72 69 6e 67 0d 0c | 80 26 20 f2 74 65 72 6d |string..|.& .term|
|00001e20| 28 a4 73 74 72 69 6e 67 | 61 64 64 72 28 77 69 6e |(.string|addr(win|
|00001e30| 64 6f 77 25 2c 69 63 6f | 6e 25 29 29 0d 0c 8a 22 |dow%,ico|n%))..."|
|00001e40| 20 3d 24 a4 73 74 72 69 | 6e 67 5f 61 64 64 72 28 | =$.stri|ng_addr(|
|00001e50| 77 69 6e 64 6f 77 25 2c | 69 63 6f 6e 25 29 0d 0c |window%,|icon%)..|
|00001e60| 94 06 20 3a 0d 0c 9e 28 | 20 dd f2 73 65 74 5f 69 |.. :...(| ..set_i|
|00001e70| 63 6f 6e 5f 73 74 72 69 | 6e 67 28 77 69 6e 64 6f |con_stri|ng(windo|
|00001e80| 77 25 2c 69 63 6f 6e 25 | 2c 61 24 29 0d 0c a8 29 |w%,icon%|,a$)...)|
|00001e90| 20 f4 20 73 65 74 73 20 | 69 63 6f 6e 27 73 20 69 | . sets |icon's i|
|00001ea0| 6e 64 65 72 65 63 74 65 | 64 20 74 65 78 74 20 73 |nderecte|d text s|
|00001eb0| 74 72 69 6e 67 0d 0c b2 | 24 20 24 a4 73 74 72 69 |tring...|$ $.stri|
|00001ec0| 6e 67 5f 61 64 64 72 28 | 77 69 6e 64 6f 77 25 2c |ng_addr(|window%,|
|00001ed0| 69 63 6f 6e 25 29 3d 61 | 24 0d 0c bc 06 20 e1 0d |icon%)=a|$.... ..|
|00001ee0| 0c c6 06 20 3a 0d 0c d0 | 0d 20 dd f2 72 65 64 72 |... :...|. ..redr|
|00001ef0| 61 77 0d 0c da 1e 20 f4 | 20 72 65 64 72 61 77 73 |aw.... .| redraws|
|00001f00| 20 77 69 6e 64 6f 77 20 | 63 6f 6e 74 65 6e 74 73 | window |contents|
|00001f10| 0d 0c e4 27 20 c8 99 20 | 22 57 69 6d 70 5f 52 65 |...' .. |"Wimp_Re|
|00001f20| 64 72 61 77 57 69 6e 64 | 6f 77 22 2c 2c 62 25 20 |drawWind|ow",,b% |
|00001f30| b8 20 6d 6f 72 65 25 0d | 0c ee 0d 20 c8 95 20 6d |. more%.|... .. m|
|00001f40| 6f 72 65 25 0d 0c f8 27 | 20 c8 99 20 22 57 69 6d |ore%...'| .. "Wim|
|00001f50| 70 5f 47 65 74 52 65 63 | 74 61 6e 67 6c 65 22 2c |p_GetRec|tangle",|
|00001f60| 2c 62 25 20 b8 20 6d 6f | 72 65 25 0d 0d 02 06 20 |,b% . mo|re%.... |
|00001f70| ce 0d 0d 0c 06 20 e1 0d | 0d 16 06 20 3a 0d 0d 20 |..... ..|... :.. |
|00001f80| 1c 20 dd f2 66 6f 72 63 | 65 5f 72 65 64 72 61 77 |. ..forc|e_redraw|
|00001f90| 28 77 69 6e 64 6f 77 25 | 29 0d 0d 2a 28 20 f4 20 |(window%|)..*( . |
|00001fa0| 72 65 64 72 61 77 73 20 | 76 69 73 69 62 6c 65 20 |redraws |visible |
|00001fb0| 70 6f 72 74 69 6f 6e 20 | 6f 66 20 77 69 6e 64 6f |portion |of windo|
|00001fc0| 77 0d 0d 34 09 20 ea 20 | 63 25 0d 0d 3e 0f 20 63 |w..4. . |c%..>. c|
|00001fd0| 25 3d 62 25 2b 31 30 30 | 30 0d 0d 48 10 20 21 63 |%=b%+100|0..H. !c|
|00001fe0| 25 3d 77 69 6e 64 6f 77 | 25 0d 0d 52 21 20 c8 99 |%=window|%..R! ..|
|00001ff0| 20 22 57 69 6d 70 5f 47 | 65 74 57 69 6e 64 6f 77 | "Wimp_G|etWindow|
|00002000| 53 74 61 74 65 22 2c 2c | 63 25 0d 0d 5c 33 20 c8 |State",,|c%..\3 .|
|00002010| 99 20 22 57 69 6d 70 5f | 46 6f 72 63 65 52 65 64 |. "Wimp_|ForceRed|
|00002020| 72 61 77 22 2c 2d 31 2c | 63 25 21 34 2c 63 25 21 |raw",-1,|c%!4,c%!|
|00002030| 38 2c 63 25 21 31 32 2c | 63 25 21 31 36 0d 0d 66 |8,c%!12,|c%!16..f|
|00002040| 06 20 e1 0d 0d 70 07 20 | 3a 20 0d 0d 7a 2c 20 dd |. ...p. |: ..z, .|
|00002050| f2 67 65 74 5f 6f 72 69 | 67 69 6e 28 68 61 6e 64 |.get_ori|gin(hand|
|00002060| 6c 65 25 2c f8 20 78 6f | 72 69 67 25 2c f8 20 79 |le%,. xo|rig%,. y|
|00002070| 6f 72 69 67 25 29 0d 0d | 84 35 20 f4 20 72 65 74 |orig%)..|.5 . ret|
|00002080| 75 72 6e 73 20 63 6f 6f | 72 64 69 6e 61 74 65 73 |urns coo|rdinates|
|00002090| 20 6f 66 20 77 69 6e 64 | 6f 77 20 77 6f 72 6b 20 | of wind|ow work |
|000020a0| 61 72 65 61 20 6f 72 69 | 67 69 6e 0d 0d 8e 09 20 |area ori|gin.... |
|000020b0| ea 20 63 25 0d 0d 98 0e | 20 63 25 3d 62 25 2b 38 |. c%....| c%=b%+8|
|000020c0| 30 30 0d 0d a2 10 20 21 | 63 25 3d 68 61 6e 64 6c |00.... !|c%=handl|
|000020d0| 65 25 0d 0d ac 21 20 c8 | 99 20 22 57 69 6d 70 5f |e%...! .|. "Wimp_|
|000020e0| 47 65 74 57 69 6e 64 6f | 77 53 74 61 74 65 22 2c |GetWindo|wState",|
|000020f0| 2c 63 25 0d 0d b6 29 20 | 78 6f 72 69 67 25 3d 63 |,c%...) |xorig%=c|
|00002100| 25 21 34 2d 63 25 21 32 | 30 3a 79 6f 72 69 67 25 |%!4-c%!2|0:yorig%|
|00002110| 3d 63 25 21 31 36 2d 63 | 25 21 32 34 0d 0d c0 06 |=c%!16-c|%!24....|
|00002120| 20 e1 0d 0d ca 06 20 3a | 0d 0d d4 2c 20 dd f2 75 | ..... :|..., ..u|
|00002130| 70 64 61 74 65 5f 73 74 | 72 69 6e 67 5f 69 63 6f |pdate_st|ring_ico|
|00002140| 6e 28 77 68 25 2c 69 63 | 6f 6e 25 2c 73 74 72 69 |n(wh%,ic|on%,stri|
|00002150| 6e 67 24 29 0d 0d de 13 | 20 ea 20 63 25 3a 63 25 |ng$)....| . c%:c%|
|00002160| 3d 62 25 2b 35 30 30 0d | 0d e8 0c 63 25 21 30 3d |=b%+500.|...c%!0=|
|00002170| 77 68 25 0d 0d f2 0e 63 | 25 21 34 3d 69 63 6f 6e |wh%....c|%!4=icon|
|00002180| 25 0d 0d fc 1d c8 99 22 | 57 69 6d 70 5f 47 65 74 |%......"|Wimp_Get|
|00002190| 49 63 6f 6e 53 74 61 74 | 65 22 2c 2c 63 25 0d 0e |IconStat|e",,c%..|
|000021a0| 06 0d 63 25 21 38 3d 31 | 3c 3c 30 0d 0e 10 0e 63 |..c%!8=1|<<0....c|
|000021b0| 25 21 31 32 3d 31 3c 3c | 30 0d 0e 1a 14 24 28 63 |%!12=1<<|0....$(c|
|000021c0| 25 21 32 38 29 3d 73 74 | 72 69 6e 67 24 0d 0e 24 |%!28)=st|ring$..$|
|000021d0| 14 63 25 21 33 36 3d a9 | 28 73 74 72 69 6e 67 24 |.c%!36=.|(string$|
|000021e0| 29 0d 0e 2e 1d c8 99 22 | 57 69 6d 70 5f 53 65 74 |)......"|Wimp_Set|
|000021f0| 49 63 6f 6e 53 74 61 74 | 65 22 2c 2c 63 25 0d 0e |IconStat|e",,c%..|
|00002200| 38 05 e1 0d 0e 42 05 3a | 0d 0e 4c 3d dd f2 72 65 |8....B.:|..L=..re|
|00002210| 64 72 61 77 5f 69 63 6f | 6e 28 77 68 25 2c 69 63 |draw_ico|n(wh%,ic|
|00002220| 6f 6e 25 2c 78 6d 69 6e | 66 25 2c 79 6d 69 6e 66 |on%,xmin|f%,yminf|
|00002230| 25 2c 78 6d 61 78 66 25 | 2c 79 6d 61 78 66 25 2c |%,xmaxf%|,ymaxf%,|
|00002240| 72 77 68 25 29 0d 0e 56 | 12 ea 20 63 25 3a 63 25 |rwh%)..V|.. c%:c%|
|00002250| 3d 62 25 2b 37 30 30 0d | 0e 60 0c 63 25 21 30 3d |=b%+700.|.`.c%!0=|
|00002260| 77 68 25 0d 0e 6a 0e 63 | 25 21 34 3d 69 63 6f 6e |wh%..j.c|%!4=icon|
|00002270| 25 0d 0e 74 1d c8 99 22 | 57 69 6d 70 5f 47 65 74 |%..t..."|Wimp_Get|
|00002280| 49 63 6f 6e 53 74 61 74 | 65 22 2c 2c 63 25 0d 0e |IconStat|e",,c%..|
|00002290| 7e 16 e7 20 72 77 68 25 | 3d 30 20 8c 20 72 77 68 |~.. rwh%|=0 . rwh|
|000022a0| 25 3d 2d 31 0d 0e 88 51 | c8 99 20 22 57 69 6d 70 |%=-1...Q|.. "Wimp|
|000022b0| 5f 46 6f 72 63 65 52 65 | 64 72 61 77 22 2c 72 77 |_ForceRe|draw",rw|
|000022c0| 68 25 2c 63 25 21 38 2b | 78 6d 69 6e 66 25 2c 63 |h%,c%!8+|xminf%,c|
|000022d0| 25 21 31 32 2b 79 6d 69 | 6e 66 25 2c 63 25 21 31 |%!12+ymi|nf%,c%!1|
|000022e0| 36 2d 78 6d 61 78 66 25 | 2c 63 25 21 32 30 2d 79 |6-xmaxf%|,c%!20-y|
|000022f0| 6d 61 78 66 25 0d 0e 92 | 05 e1 0d 0e 9c 05 3a 0d |maxf%...|......:.|
|00002300| ff | |. | |
+--------+-------------------------+-------------------------+--------+--------+