/ ARM Club 1 / ARM_CLUB_CD.iso / contents / apps / files / a / fileutil / !FileUtil / !RunImage

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 1d f4 20 3e 24 | 2e 21 46 69 6c 65 55 74 |..... >$|.!FileUt|
|00000010| 69 6c 73 2e 21 52 75 6e | 49 6d 61 67 65 0d 00 14 |ils.!Run|Image...|
|00000020| 2b f4 20 4d 61 69 6e 20 | 70 72 6f 67 72 61 6d 20 |+. Main |program |
|00000030| 63 6f 64 65 20 66 6f 72 | 20 52 49 53 43 4f 53 20 |code for| RISCOS |
|00000040| 57 61 73 74 65 62 69 6e | 0d 00 1e 26 f4 20 56 65 |Wastebin|...&. Ve|
|00000050| 72 73 69 6f 6e 20 31 2e | 30 31 20 4c 61 73 74 20 |rsion 1.|01 Last |
|00000060| 55 70 64 61 74 65 20 32 | 39 2f 38 2f 39 30 0d 00 |Update 2|9/8/90..|
|00000070| 28 1c f4 20 a9 20 41 6e | 64 72 65 77 20 46 6c 69 |(.. . An|drew Fli|
|00000080| 6e 74 68 61 6d 20 31 39 | 39 30 0d 00 32 05 3a 0d |ntham 19|90..2.:.|
|00000090| 00 3c 33 de 20 62 6c 6f | 63 6b 20 31 30 32 34 2c |.<3. blo|ck 1024,|
|000000a0| 20 6d 65 6e 75 25 20 31 | 30 32 34 2c 63 75 72 62 | menu% 1|024,curb|
|000000b0| 75 66 25 20 32 30 34 38 | 2c 69 63 6f 6e 64 20 32 |uf% 2048|,icond 2|
|000000c0| 35 36 0d 00 46 19 65 6e | 64 62 75 66 25 3d 63 75 |56..F.en|dbuf%=cu|
|000000d0| 72 62 75 66 25 2b 32 30 | 34 38 30 0d 00 50 36 c8 |rbuf%+20|480..P6.|
|000000e0| 99 20 22 57 69 6d 70 5f | 49 6e 69 74 69 61 6c 69 |. "Wimp_|Initiali|
|000000f0| 73 65 22 2c 32 30 30 2c | 26 34 42 35 33 34 31 35 |se",200,|&4B53415|
|00000100| 34 2c 22 46 69 6c 65 20 | 55 74 69 6c 69 74 79 73 |4,"File |Utilitys|
|00000110| 22 0d 00 5a 0d f2 74 65 | 6d 70 6c 61 74 65 0d 00 |"..Z..te|mplate..|
|00000120| 64 3a 69 3d a4 69 63 6f | 6e 62 61 72 28 25 31 31 |d:i=.ico|nbar(%11|
|00000130| 30 31 30 2c 2d 31 2c 37 | 2c 30 2c 22 21 46 69 6c |010,-1,7|,0,"!Fil|
|00000140| 65 55 74 69 6c 73 22 2b | bd 31 33 2c 30 2c 30 2c |eUtils"+|.13,0,0,|
|00000150| 33 2c 36 38 2c 36 38 29 | 0d 00 6e 23 65 6e 64 25 |3,68,68)|..n#end%|
|00000160| 3d a3 3a 64 72 61 67 25 | 3d 30 3a 73 61 76 69 6e |=.:drag%|=0:savin|
|00000170| 67 25 3d 30 3a 61 63 6b | 25 3d a3 0d 00 78 13 74 |g%=0:ack|%=...x.t|
|00000180| 61 73 6b 3d 30 3a 61 63 | 74 69 6f 6e 3d 31 0d 00 |ask=0:ac|tion=1..|
|00000190| 82 20 24 76 65 72 73 69 | 6f 6e 25 3d 22 31 2e 30 |. $versi|on%="1.0|
|000001a0| 31 20 28 32 39 2d 41 75 | 67 2d 39 30 29 22 0d 00 |1 (29-Au|g-90)"..|
|000001b0| 8c 05 f5 0d 00 96 26 c8 | 99 20 22 57 69 6d 70 5f |......&.|. "Wimp_|
|000001c0| 50 6f 6c 6c 22 2c 31 2c | 62 6c 6f 63 6b 20 b8 20 |Poll",1,|block . |
|000001d0| 65 76 65 6e 74 63 6f 64 | 65 0d 00 a0 12 c8 8e 20 |eventcod|e...... |
|000001e0| 65 76 65 6e 74 63 6f 64 | 65 20 ca 0d 00 aa 25 c9 |eventcod|e ....%.|
|000001f0| 20 31 3a c8 99 20 22 57 | 69 6d 70 5f 52 65 64 72 | 1:.. "W|imp_Redr|
|00000200| 61 77 57 69 6e 64 6f 77 | 22 2c 2c 62 6c 6f 63 6b |awWindow|",,block|
|00000210| 0d 00 b4 23 c9 20 32 3a | c8 99 20 22 57 69 6d 70 |...#. 2:|.. "Wimp|
|00000220| 5f 4f 70 65 6e 57 69 6e | 64 6f 77 22 2c 2c 62 6c |_OpenWin|dow",,bl|
|00000230| 6f 63 6b 0d 00 be 24 c9 | 20 33 3a c8 99 20 22 57 |ock...$.| 3:.. "W|
|00000240| 69 6d 70 5f 43 6c 6f 73 | 65 57 69 6e 64 6f 77 22 |imp_Clos|eWindow"|
|00000250| 2c 2c 62 6c 6f 63 6b 0d | 00 c8 17 c9 20 36 3a f2 |,,block.|.... 6:.|
|00000260| 62 75 74 74 6f 6e 73 28 | 62 6c 6f 63 6b 29 0d 00 |buttons(|block)..|
|00000270| d2 13 c9 20 38 3a f2 6b | 65 79 70 72 65 73 73 65 |... 8:.k|eypresse|
|00000280| 64 0d 00 dc 0f c9 20 39 | 3a f2 64 65 63 6f 64 65 |d..... 9|:.decode|
|00000290| 0d 00 e6 11 c9 20 31 37 | 2c 31 38 3a f2 6d 65 73 |..... 17|,18:.mes|
|000002a0| 73 0d 00 f0 05 cb 0d 00 | fa 0a fd 20 65 6e 64 25 |s.......|... end%|
|000002b0| 0d 01 04 05 e0 0d 01 0e | 34 dd f2 6f 70 65 6e 28 |........|4..open(|
|000002c0| 68 61 6e 64 6c 65 2c 76 | 6d 69 6e 78 2c 76 6d 69 |handle,v|minx,vmi|
|000002d0| 6e 79 2c 76 6d 61 78 78 | 2c 76 6d 61 78 79 2c 78 |ny,vmaxx|,vmaxy,x|
|000002e0| 6f 66 66 2c 79 6f 66 66 | 29 0d 01 18 3c 21 62 6c |off,yoff|)...<!bl|
|000002f0| 6f 63 6b 3d 68 61 6e 64 | 6c 65 3a 62 6c 6f 63 6b |ock=hand|le:block|
|00000300| 21 34 3d 76 6d 69 6e 78 | 3a 62 6c 6f 63 6b 21 38 |!4=vminx|:block!8|
|00000310| 3d 76 6d 69 6e 79 3a 62 | 6c 6f 63 6b 21 31 32 3d |=vminy:b|lock!12=|
|00000320| 76 6d 61 78 78 0d 01 22 | 3a 62 6c 6f 63 6b 21 31 |vmaxx.."|:block!1|
|00000330| 36 3d 76 6d 61 78 79 3a | 62 6c 6f 63 6b 21 32 30 |6=vmaxy:|block!20|
|00000340| 3d 78 6f 66 66 3a 62 6c | 6f 63 6b 21 32 34 3d 79 |=xoff:bl|ock!24=y|
|00000350| 6f 66 66 3a 62 6c 6f 63 | 6b 21 32 38 3d 2d 32 0d |off:bloc|k!28=-2.|
|00000360| 01 2c 1f c8 99 20 22 57 | 69 6d 70 5f 4f 70 65 6e |.,... "W|imp_Open|
|00000370| 57 69 6e 64 6f 77 22 2c | 2c 62 6c 6f 63 6b 0d 01 |Window",|,block..|
|00000380| 36 05 e1 0d 01 40 14 dd | f2 62 75 74 74 6f 6e 73 |6....@..|.buttons|
|00000390| 28 62 6c 6f 63 6b 29 0d | 01 4a 24 e7 20 62 6c 6f |(block).|.J$. blo|
|000003a0| 63 6b 21 31 32 3d 2d 32 | 20 80 20 62 6c 6f 63 6b |ck!12=-2| . block|
|000003b0| 21 38 3d 32 20 f2 6d 65 | 6e 75 73 0d 01 54 05 e1 |!8=2 .me|nus..T..|
|000003c0| 0d 01 5e 3e dd a4 69 63 | 6f 6e 62 61 72 28 66 6c |..^>..ic|onbar(fl|
|000003d0| 61 67 73 2c 70 61 72 74 | 2c 66 6f 72 2c 62 61 63 |ags,part|,for,bac|
|000003e0| 2c 64 61 74 61 24 2c 61 | 64 64 2c 6c 65 6e 67 74 |,data$,a|dd,lengt|
|000003f0| 68 2c 6d 6f 75 73 65 2c | 78 73 2c 79 73 29 0d 01 |h,mouse,|xs,ys)..|
|00000400| 68 0f 21 62 6c 6f 63 6b | 3d 70 61 72 74 0d 01 72 |h.!block|=part..r|
|00000410| 0d 62 6c 6f 63 6b 21 34 | 3d 30 0d 01 7c 25 62 6c |.block!4|=0..|%bl|
|00000420| 6f 63 6b 21 38 3d 30 3a | 62 6c 6f 63 6b 21 31 32 |ock!8=0:|block!12|
|00000430| 3d 78 73 3a 62 6c 6f 63 | 6b 21 31 36 3d 79 73 0d |=xs:bloc|k!16=ys.|
|00000440| 01 86 35 62 6c 6f 63 6b | 21 32 30 3d 66 6c 61 67 |..5block|!20=flag|
|00000450| 73 2b 28 28 32 5e 31 32 | 29 2a 6d 6f 75 73 65 29 |s+((2^12|)*mouse)|
|00000460| 3a 62 6c 6f 63 6b 3f 32 | 33 3d 66 6f 72 2b 62 61 |:block?2|3=for+ba|
|00000470| 63 2a 31 36 0d 01 90 4d | e7 20 64 61 74 61 24 3c |c*16...M|. data$<|
|00000480| 3e 22 22 20 8c 20 24 28 | 62 6c 6f 63 6b 2b 32 34 |>"" . $(|block+24|
|00000490| 29 3d 64 61 74 61 24 20 | 8b 20 62 6c 6f 63 6b 21 |)=data$ |. block!|
|000004a0| 32 34 3d 61 64 64 3a 62 | 6c 6f 63 6b 21 32 38 3d |24=add:b|lock!28=|
|000004b0| 30 3a 62 6c 6f 63 6b 21 | 33 32 3d 6c 65 6e 67 74 |0:block!|32=lengt|
|000004c0| 68 0d 01 9a 26 c8 99 20 | 22 57 69 6d 70 5f 43 72 |h...&.. |"Wimp_Cr|
|000004d0| 65 61 74 65 49 63 6f 6e | 22 2c 2c 62 6c 6f 63 6b |eateIcon|",,block|
|000004e0| 20 b8 20 69 63 6f 6e 0d | 01 a4 09 3d 69 63 6f 6e | . icon.|...=icon|
|000004f0| 0d 01 ae 2b dd f2 6d 65 | 6e 75 28 74 69 74 6c 65 |...+..me|nu(title|
|00000500| 24 2c 77 69 64 74 68 2c | 78 2c 79 2c 69 74 24 2c |$,width,|x,y,it$,|
|00000510| 64 65 70 74 68 2c 61 64 | 64 72 29 0d 01 b8 1f ea |depth,ad|dr).....|
|00000520| 20 63 6f 64 24 2c 73 65 | 70 24 2c 63 6f 64 32 24 | cod$,se|p$,cod2$|
|00000530| 2c 63 2c 73 65 70 2c 63 | 6f 64 0d 01 c2 15 24 28 |,c,sep,c|od....$(|
|00000540| 61 64 64 72 29 3d 74 69 | 74 6c 65 24 2b bd 30 0d |addr)=ti|tle$+.0.|
|00000550| 01 cc 2b 61 64 64 72 3f | 31 32 3d 37 3a 61 64 64 |..+addr?|12=7:add|
|00000560| 72 3f 31 33 3d 32 3a 61 | 64 64 72 3f 31 34 3d 37 |r?13=2:a|ddr?14=7|
|00000570| 3a 61 64 64 72 3f 31 35 | 3d 30 0d 01 d6 1c 61 64 |:addr?15|=0....ad|
|00000580| 64 72 21 31 36 3d 77 69 | 64 74 68 3a 61 64 64 72 |dr!16=wi|dth:addr|
|00000590| 21 32 30 3d 34 38 0d 01 | e0 17 61 64 64 72 21 32 |!20=48..|..addr!2|
|000005a0| 34 3d 30 3a 63 3d 61 64 | 64 72 2b 32 38 0d 01 ea |4=0:c=ad|dr+28...|
|000005b0| 05 f5 0d 01 f4 24 73 65 | 70 24 3d c0 69 74 24 2c |.....$se|p$=.it$,|
|000005c0| a7 69 74 24 2c 22 2c 22 | 29 29 3a 73 65 70 3d a9 |.it$,","|)):sep=.|
|000005d0| 28 73 65 70 24 29 0d 01 | fe 16 e7 20 73 65 70 24 |(sep$)..|... sep$|
|000005e0| 3d 22 2a 2c 22 20 e5 20 | 8d 54 7a 42 0d 02 08 0a |="*," . |.TzB....|
|000005f0| 63 21 34 3d 2d 31 0d 02 | 12 3b 21 63 3d 30 3a e7 |c!4=-1..|.;!c=0:.|
|00000600| 20 97 28 73 65 70 24 29 | 3d 97 28 22 5b 22 29 20 | .(sep$)|=.("[") |
|00000610| 8c 20 21 63 3d a4 64 65 | 6d 3a 73 65 70 24 3d c2 |. !c=.de|m:sep$=.|
|00000620| 73 65 70 24 2c a9 28 73 | 65 70 24 29 2d 63 6f 64 |sep$,.(s|ep$)-cod|
|00000630| 29 0d 02 1c 28 63 21 38 | 3d 26 30 37 30 31 30 30 |)...(c!8|=&070100|
|00000640| 32 31 3a 24 28 63 2b 31 | 32 29 3d c0 73 65 70 24 |21:$(c+1|2)=.sep$|
|00000650| 2c a9 73 65 70 24 2d 31 | 29 0d 02 26 09 63 2b 3d |,.sep$-1|)..&.c+=|
|00000660| 32 34 0d 02 30 18 69 74 | 24 3d c2 69 74 24 2c a9 |24..0.it|$=.it$,.|
|00000670| 28 69 74 24 29 2d 73 65 | 70 29 0d 02 3a 0f fd 20 |(it$)-se|p)..:.. |
|00000680| 73 65 70 24 3d 22 2a 2c | 22 0d 02 44 18 63 3d 63 |sep$="*,|"..D.c=c|
|00000690| 2d 32 34 3a 21 63 3d 28 | 21 63 29 20 84 20 32 5e |-24:!c=(|!c) . 2^|
|000006a0| 37 0d 02 4e 2f e7 20 64 | 65 70 74 68 3d 30 20 8c |7..N/. d|epth=0 .|
|000006b0| 20 c8 99 20 22 57 69 6d | 70 5f 43 72 65 61 74 65 | .. "Wim|p_Create|
|000006c0| 4d 65 6e 75 22 2c 2c 6d | 65 6e 75 25 2c 78 2c 79 |Menu",,m|enu%,x,y|
|000006d0| 0d 02 58 05 e1 0d 02 62 | 09 dd a4 64 65 6d 0d 02 |..X....b|...dem..|
|000006e0| 6c 19 ea 20 63 6f 64 24 | 2c 74 69 24 2c 77 69 24 |l.. cod$|,ti$,wi$|
|000006f0| 2c 6d 65 6e 75 32 24 0d | 02 76 25 63 6f 64 24 3d |,menu2$.|.v%cod$=|
|00000700| c0 73 65 70 24 2c a7 69 | 74 24 2c 22 5d 22 29 29 |.sep$,.i|t$,"]"))|
|00000710| 3a 63 6f 64 3d a9 28 63 | 6f 64 24 29 0d 02 80 14 |:cod=.(c|od$)....|
|00000720| e7 20 a7 63 6f 64 24 2c | 22 5c 22 29 3e 31 20 8c |. .cod$,|"\")>1 .|
|00000730| 0d 02 8a 49 63 6f 64 32 | 24 3d c2 63 6f 64 24 2c |...Icod2|$=.cod$,|
|00000740| a9 28 63 6f 64 24 29 2d | a7 63 6f 64 24 2c 22 5c |.(cod$)-|.cod$,"\|
|00000750| 22 29 29 3a 63 6f 64 32 | 24 3d c0 63 6f 64 32 24 |")):cod2|$=.cod2$|
|00000760| 2c a9 28 63 6f 64 32 24 | 29 2d 31 29 3a 63 21 34 |,.(cod2$|)-1):c!4|
|00000770| 3d a0 28 63 6f 64 32 24 | 29 0d 02 94 05 cd 0d 02 |=.(cod2$|).......|
|00000780| 9e 27 63 6f 64 24 3d c0 | 63 6f 64 24 2c 63 6f 64 |.'cod$=.|cod$,cod|
|00000790| 2d 31 29 3a 63 6f 64 24 | 3d c2 63 6f 64 24 2c 63 |-1):cod$|=.cod$,c|
|000007a0| 6f 64 2d 32 29 0d 02 a8 | 0c 3d bb 28 63 6f 64 24 |od-2)...|.=.(cod$|
|000007b0| 29 0d 02 b2 0b dd f2 6d | 65 6e 75 73 0d 02 bc 10 |)......m|enus....|
|000007c0| 6d 65 6e 75 24 3d 22 4d | 61 69 6e 22 0d 02 c6 0c |menu$="M|ain"....|
|000007d0| c8 97 20 78 2c 79 2c 62 | 0d 02 d0 0a 61 63 24 3d |.. x,y,b|....ac$=|
|000007e0| 22 22 0d 02 da 2f e7 20 | 61 63 74 69 6f 6e 3d 31 |"".../. |action=1|
|000007f0| 20 8c 20 61 63 24 2b 3d | 22 5b 31 5d 44 75 6d 70 | . ac$+=|"[1]Dump|
|00000800| 2c 22 20 8b 20 61 63 24 | 2b 3d 22 44 75 6d 70 2c |," . ac$|+="Dump,|
|00000810| 22 0d 02 e4 2f e7 20 61 | 63 74 69 6f 6e 3d 32 20 |".../. a|ction=2 |
|00000820| 8c 20 61 63 24 2b 3d 22 | 5b 31 5d 54 79 70 65 2c |. ac$+="|[1]Type,|
|00000830| 22 20 8b 20 61 63 24 2b | 3d 22 54 79 70 65 2c 22 |" . ac$+|="Type,"|
|00000840| 0d 02 ee 2f e7 20 61 63 | 74 69 6f 6e 3d 33 20 8c |.../. ac|tion=3 .|
|00000850| 20 61 63 24 2b 3d 22 5b | 31 5d 4c 69 73 74 2c 22 | ac$+="[|1]List,"|
|00000860| 20 8b 20 61 63 24 2b 3d | 22 4c 69 73 74 2c 22 0d | . ac$+=|"List,".|
|00000870| 02 f8 35 e7 20 61 63 74 | 69 6f 6e 3d 34 20 8c 20 |..5. act|ion=4 . |
|00000880| 61 63 24 2b 3d 22 5b 31 | 5d 45 78 65 63 75 74 65 |ac$+="[1|]Execute|
|00000890| 2c 22 20 8b 20 61 63 24 | 2b 3d 22 45 78 65 63 75 |," . ac$|+="Execu|
|000008a0| 74 65 2c 22 0d 03 02 33 | e7 20 61 63 74 69 6f 6e |te,"...3|. action|
|000008b0| 3d 35 20 8c 20 61 63 24 | 2b 3d 22 5b 31 5d 53 63 |=5 . ac$|+="[1]Sc|
|000008c0| 72 65 65 6e 2c 22 20 8b | 20 61 63 24 2b 3d 22 53 |reen," .| ac$+="S|
|000008d0| 63 72 65 65 6e 2c 22 0d | 03 0c 31 e7 20 61 63 74 |creen,".|..1. act|
|000008e0| 69 6f 6e 3d 36 20 8c 20 | 61 63 24 2b 3d 22 5b 31 |ion=6 . |ac$+="[1|
|000008f0| 5d 53 74 61 6d 70 2c 22 | 20 8b 20 61 63 24 2b 3d |]Stamp,"| . ac$+=|
|00000900| 22 53 74 61 6d 70 2c 22 | 0d 03 16 0d 61 63 24 2b |"Stamp,"|....ac$+|
|00000910| 3d 22 2a 2c 22 0d 03 20 | 2b f2 6d 65 6e 75 28 22 |="*,".. |+.menu("|
|00000920| 41 63 74 69 6f 6e 22 2c | 31 33 30 2c 30 2c 30 2c |Action",|130,0,0,|
|00000930| 61 63 24 2c 31 2c 6d 65 | 6e 75 25 2b 35 31 32 29 |ac$,1,me|nu%+512)|
|00000940| 0d 03 2a 58 f2 6d 65 6e | 75 28 22 46 69 6c 65 20 |..*X.men|u("File |
|00000950| 55 74 69 6c 73 22 2c 31 | 35 30 2c 78 2d 37 35 2c |Utils",1|50,x-75,|
|00000960| 32 34 30 2c 22 5b 30 5c | 69 6e 66 6f 25 5d 49 6e |240,"[0\|info%]In|
|00000970| 66 6f 2c 5b 30 5c 6d 65 | 6e 75 25 2b 35 31 32 5d |fo,[0\me|nu%+512]|
|00000980| 41 63 74 69 6f 6e 2c 51 | 75 69 74 2c 2a 2c 22 2c |Action,Q|uit,*,",|
|00000990| 30 2c 6d 65 6e 75 25 29 | 0d 03 34 05 e1 0d 03 70 |0,menu%)|..4....p|
|000009a0| 0c dd f2 64 65 63 6f 64 | 65 0d 03 7a 2b c8 99 20 |...decod|e..z+.. |
|000009b0| 22 57 69 6d 70 5f 44 65 | 63 6f 64 65 4d 65 6e 75 |"Wimp_De|codeMenu|
|000009c0| 22 2c 2c 6d 65 6e 75 25 | 2c 62 6c 6f 63 6b 2c 69 |",,menu%|,block,i|
|000009d0| 63 6f 6e 64 0d 03 84 1f | e7 20 24 69 63 6f 6e 64 |cond....|. $icond|
|000009e0| 3d 22 51 75 69 74 22 20 | 8c 20 65 6e 64 25 3d b9 |="Quit" |. end%=.|
|000009f0| 3a ef 34 0d 03 98 25 e7 | 20 24 69 63 6f 6e 64 3d |:.4...%.| $icond=|
|00000a00| 22 41 63 74 69 6f 6e 2e | 44 75 6d 70 22 20 8c 20 |"Action.|Dump" . |
|00000a10| 61 63 74 69 6f 6e 3d 31 | 0d 03 a2 25 e7 20 24 69 |action=1|...%. $i|
|00000a20| 63 6f 6e 64 3d 22 41 63 | 74 69 6f 6e 2e 54 79 70 |cond="Ac|tion.Typ|
|00000a30| 65 22 20 8c 20 61 63 74 | 69 6f 6e 3d 32 0d 03 ac |e" . act|ion=2...|
|00000a40| 25 e7 20 24 69 63 6f 6e | 64 3d 22 41 63 74 69 6f |%. $icon|d="Actio|
|00000a50| 6e 2e 4c 69 73 74 22 20 | 8c 20 61 63 74 69 6f 6e |n.List" |. action|
|00000a60| 3d 33 0d 03 b6 28 e7 20 | 24 69 63 6f 6e 64 3d 22 |=3...(. |$icond="|
|00000a70| 41 63 74 69 6f 6e 2e 45 | 78 65 63 75 74 65 22 20 |Action.E|xecute" |
|00000a80| 8c 20 61 63 74 69 6f 6e | 3d 34 0d 03 c0 27 e7 20 |. action|=4...'. |
|00000a90| 24 69 63 6f 6e 64 3d 22 | 41 63 74 69 6f 6e 2e 53 |$icond="|Action.S|
|00000aa0| 63 72 65 65 6e 22 20 8c | 20 61 63 74 69 6f 6e 3d |creen" .| action=|
|00000ab0| 35 0d 03 ca 26 e7 20 24 | 69 63 6f 6e 64 3d 22 41 |5...&. $|icond="A|
|00000ac0| 63 74 69 6f 6e 2e 53 74 | 61 6d 70 22 20 8c 20 61 |ction.St|amp" . a|
|00000ad0| 63 74 69 6f 6e 3d 36 0d | 03 d4 23 c8 99 20 22 57 |ction=6.|..#.. "W|
|00000ae0| 69 6d 70 5f 47 65 74 50 | 6f 69 6e 74 65 72 49 6e |imp_GetP|ointerIn|
|00000af0| 66 6f 22 2c 2c 62 6c 6f | 63 6b 0d 03 de 33 e7 20 |fo",,blo|ck...3. |
|00000b00| 62 6c 6f 63 6b 21 38 3d | 31 20 8c 20 f2 6d 65 6e |block!8=|1 . .men|
|00000b10| 75 73 20 8b 20 c8 99 20 | 22 57 69 6d 70 5f 43 72 |us . .. |"Wimp_Cr|
|00000b20| 65 61 74 65 4d 65 6e 75 | 22 2c 2c 2d 31 0d 03 e8 |eateMenu|",,-1...|
|00000b30| 05 e1 0d 03 f2 0e dd f2 | 74 65 6d 70 6c 61 74 65 |........|template|
|00000b40| 0d 03 fc 36 c8 99 20 22 | 57 69 6d 70 5f 4f 70 65 |...6.. "|Wimp_Ope|
|00000b50| 6e 54 65 6d 70 6c 61 74 | 65 22 2c 2c 22 3c 46 69 |nTemplat|e",,"<Fi|
|00000b60| 6c 65 55 74 69 6c 24 44 | 69 72 3e 2e 54 65 6d 70 |leUtil$D|ir>.Temp|
|00000b70| 6c 61 74 65 73 22 0d 04 | 06 11 69 6e 64 69 72 3d |lates"..|..indir=|
|00000b80| 63 75 72 62 75 66 25 0d | 04 10 1f 69 6e 66 6f 25 |curbuf%.|...info%|
|00000b90| 3d a4 74 65 6d 70 6c 61 | 74 65 28 22 50 72 6f 67 |=.templa|te("Prog|
|00000ba0| 49 6e 66 6f 22 29 0d 04 | 1a 1a 76 65 72 73 69 6f |Info")..|..versio|
|00000bb0| 6e 25 3d a4 74 61 64 28 | 69 6e 66 6f 25 2c 34 29 |n%=.tad(|info%,4)|
|00000bc0| 0d 04 24 1b c8 99 20 22 | 57 69 6d 70 5f 43 6c 6f |..$... "|Wimp_Clo|
|00000bd0| 73 65 54 65 6d 70 6c 61 | 74 65 22 0d 04 2e 05 e1 |seTempla|te".....|
|00000be0| 0d 04 38 12 dd a4 74 65 | 6d 70 6c 61 74 65 28 61 |..8...te|mplate(a|
|00000bf0| 24 29 0d 04 42 47 c8 99 | 20 22 57 69 6d 70 5f 4c |$)..BG..| "Wimp_L|
|00000c00| 6f 61 64 54 65 6d 70 6c | 61 74 65 22 2c 2c 62 6c |oadTempl|ate",,bl|
|00000c10| 6f 63 6b 2c 69 6e 64 69 | 72 2c 65 6e 64 62 75 66 |ock,indi|r,endbuf|
|00000c20| 25 2c 2d 31 2c 61 24 2c | 30 20 b8 20 2c 2c 69 6e |%,-1,a$,|0 . ,,in|
|00000c30| 64 69 72 2c 2c 2c 2c 63 | 25 0d 04 4c 2f e7 20 63 |dir,,,,c|%..L/. c|
|00000c40| 25 3d 30 20 8c 20 ef 37 | 3a f1 22 54 65 6d 70 6c |%=0 . .7|:."Templ|
|00000c50| 61 74 65 20 22 3b 61 24 | 3b 22 20 6e 6f 74 20 66 |ate ";a$|;" not f|
|00000c60| 6f 75 6e 64 2e 22 3a e0 | 0d 04 56 0e 62 6c 6f 63 |ound.":.|..V.bloc|
|00000c70| 6b 21 36 34 3d 31 0d 04 | 60 2a c8 99 20 22 57 69 |k!64=1..|`*.. "Wi|
|00000c80| 6d 70 5f 43 72 65 61 74 | 65 57 69 6e 64 6f 77 22 |mp_Creat|eWindow"|
|00000c90| 2c 2c 62 6c 6f 63 6b 20 | b8 20 68 61 6e 64 6c 65 |,,block |. handle|
|00000ca0| 0d 04 6a 0b 3d 68 61 6e | 64 6c 65 0d 04 74 0a dd |..j.=han|dle..t..|
|00000cb0| f2 6d 65 73 73 0d 04 7e | 1c 74 61 73 6b 3d 62 6c |.mess..~|.task=bl|
|00000cc0| 6f 63 6b 21 34 3a 72 65 | 66 3d 62 6c 6f 63 6b 21 |ock!4:re|f=block!|
|00000cd0| 38 0d 04 88 11 c8 8e 20 | 62 6c 6f 63 6b 21 31 36 |8...... |block!16|
|00000ce0| 20 ca 0d 04 92 0e c9 20 | 30 3a 65 6e 64 25 3d b9 | ...... |0:end%=.|
|00000cf0| 0d 04 9c 0e c9 20 34 3a | 61 63 6b 25 3d a3 0d 04 |..... 4:|ack%=...|
|00000d00| a6 08 c9 20 33 3a 0d 04 | b0 18 66 69 6c 65 24 3d |... 3:..|..file$=|
|00000d10| a4 73 74 72 28 62 6c 6f | 63 6b 2b 34 34 29 0d 04 |.str(blo|ck+44)..|
|00000d20| ba 0e 62 6c 6f 63 6b 21 | 31 36 3d 34 0d 04 c4 32 |..block!|16=4...2|
|00000d30| c8 99 20 22 57 69 6d 70 | 5f 53 65 6e 64 4d 65 73 |.. "Wimp|_SendMes|
|00000d40| 73 61 67 65 22 2c 65 76 | 65 6e 74 63 6f 64 65 2c |sage",ev|entcode,|
|00000d50| 62 6c 6f 63 6b 2c 62 6c | 6f 63 6b 21 31 32 0d 04 |block,bl|ock!12..|
|00000d60| ce 07 f2 67 6f 0d 04 d8 | 05 cb 0d 04 e2 05 e1 0d |...go...|........|
|00000d70| 04 ec 0d dd a4 73 74 72 | 28 61 25 29 0d 04 f6 08 |.....str|(a%)....|
|00000d80| ea 20 62 24 0d 05 00 0e | c8 95 20 3f 61 25 3e 3d |. b$....|.. ?a%>=|
|00000d90| 33 32 0d 05 0a 0e 62 24 | 2b 3d bd 28 3f 61 25 29 |32....b$|+=.(?a%)|
|00000da0| 0d 05 14 09 61 25 2b 3d | 31 0d 05 1e 05 ce 0d 05 |....a%+=|1.......|
|00000db0| 28 07 3d 62 24 0d 05 32 | 16 dd a4 74 61 64 28 68 |(.=b$..2|...tad(h|
|00000dc0| 61 6e 64 6c 65 2c 69 63 | 6f 6e 29 0d 05 3c 15 f2 |andle,ic|on)..<..|
|00000dd0| 67 69 69 28 68 61 6e 64 | 6c 65 2c 69 63 6f 6e 29 |gii(hand|le,icon)|
|00000de0| 0d 05 46 0d 3d 69 63 6f | 6e 64 21 32 38 0d 05 50 |..F.=ico|nd!28..P|
|00000df0| 16 dd f2 67 69 69 28 68 | 61 6e 64 6c 65 2c 69 63 |...gii(h|andle,ic|
|00000e00| 6f 6e 29 0d 05 5a 1e 21 | 69 63 6f 6e 64 3d 68 61 |on)..Z.!|icond=ha|
|00000e10| 6e 64 6c 65 3a 69 63 6f | 6e 64 21 34 3d 69 63 6f |ndle:ico|nd!4=ico|
|00000e20| 6e 0d 05 64 21 c8 99 20 | 22 57 69 6d 70 5f 47 65 |n..d!.. |"Wimp_Ge|
|00000e30| 74 49 63 6f 6e 53 74 61 | 74 65 22 2c 2c 69 63 6f |tIconSta|te",,ico|
|00000e40| 6e 64 0d 05 6e 05 e1 0d | 05 78 1b dd f2 61 6c 74 |nd..n...|.x...alt|
|00000e50| 65 72 28 69 63 6f 6e 2c | 65 6f 72 2c 63 6c 65 61 |er(icon,|eor,clea|
|00000e60| 72 29 0d 05 82 1e 21 69 | 63 6f 6e 64 3d 63 6f 64 |r)....!i|cond=cod|
|00000e70| 65 72 25 3a 69 63 6f 6e | 64 21 34 3d 69 63 6f 6e |er%:icon|d!4=icon|
|00000e80| 0d 05 8c 1e 69 63 6f 6e | 64 21 38 3d 65 6f 72 3a |....icon|d!8=eor:|
|00000e90| 69 63 6f 6e 64 21 31 32 | 3d 63 6c 65 61 72 0d 05 |icond!12|=clear..|
|00000ea0| 96 21 c8 99 20 22 57 69 | 6d 70 5f 53 65 74 49 63 |.!.. "Wi|mp_SetIc|
|00000eb0| 6f 6e 53 74 61 74 65 22 | 2c 2c 69 63 6f 6e 64 0d |onState"|,,icond.|
|00000ec0| 05 a0 05 e1 0d 05 aa 12 | dd f2 73 74 61 74 65 28 |........|..state(|
|00000ed0| 77 69 2c 69 63 29 0d 05 | b4 18 21 62 6c 6f 63 6b |wi,ic)..|..!block|
|00000ee0| 3d 77 69 3a 62 6c 6f 63 | 6b 21 34 3d 69 63 0d 05 |=wi:bloc|k!4=ic..|
|00000ef0| be 21 c8 99 20 22 57 69 | 6d 70 5f 47 65 74 49 63 |.!.. "Wi|mp_GetIc|
|00000f00| 6f 6e 53 74 61 74 65 22 | 2c 2c 62 6c 6f 63 6b 0d |onState"|,,block.|
|00000f10| 05 c8 05 e1 0d 05 d2 13 | dd a4 73 65 6c 65 63 74 |........|..select|
|00000f20| 28 77 69 2c 69 63 29 0d | 05 dc 11 f2 73 74 61 74 |(wi,ic).|....stat|
|00000f30| 65 28 77 69 2c 69 63 29 | 0d 05 e6 22 e7 20 28 28 |e(wi,ic)|...". ((|
|00000f40| 62 6c 6f 63 6b 21 32 34 | 29 20 80 20 31 3c 3c 32 |block!24|) . 1<<2|
|00000f50| 31 29 3e 30 20 8c 20 3d | 2d 31 0d 05 f0 06 3d 30 |1)>0 . =|-1....=0|
|00000f60| 0d 06 0e 08 dd f2 67 6f | 0d 06 18 07 ea 20 85 0d |......go|..... ..|
|00000f70| 06 22 10 ee 20 85 20 ea | 20 e5 20 8d 64 4c 46 0d |.".. . .| . .dLF.|
|00000f80| 06 2c 29 e7 20 61 63 74 | 69 6f 6e 3d 36 20 8c 20 |.,). act|ion=6 . |
|00000f90| ff 28 22 53 54 41 4d 50 | 20 22 2b 66 69 6c 65 24 |.("STAMP| "+file$|
|00000fa0| 29 3a e5 20 8d 74 78 46 | 0d 06 36 0c ef 34 2c 32 |):. .txF|..6..4,2|
|00000fb0| 36 2c 31 32 0d 06 40 2b | e7 20 61 63 74 69 6f 6e |6,12..@+|. action|
|00000fc0| 3d 31 20 63 24 3d 22 44 | 55 4d 50 20 22 2b 66 69 |=1 c$="D|UMP "+fi|
|00000fd0| 6c 65 24 3a 61 24 3d 22 | 2a 44 55 4d 50 20 22 0d |le$:a$="|*DUMP ".|
|00000fe0| 06 4a 2b e7 20 61 63 74 | 69 6f 6e 3d 32 20 63 24 |.J+. act|ion=2 c$|
|00000ff0| 3d 22 54 59 50 45 20 22 | 2b 66 69 6c 65 24 3a 61 |="TYPE "|+file$:a|
|00001000| 24 3d 22 2a 54 59 50 45 | 20 22 0d 06 54 2b e7 20 |$="*TYPE| "..T+. |
|00001010| 61 63 74 69 6f 6e 3d 33 | 20 63 24 3d 22 4c 49 53 |action=3| c$="LIS|
|00001020| 54 20 22 2b 66 69 6c 65 | 24 3a 61 24 3d 22 2a 4c |T "+file|$:a$="*L|
|00001030| 49 53 54 20 22 0d 06 5e | 2b e7 20 61 63 74 69 6f |IST "..^|+. actio|
|00001040| 6e 3d 34 20 63 24 3d 22 | 45 58 45 43 20 22 2b 66 |n=4 c$="|EXEC "+f|
|00001050| 69 6c 65 24 3a 61 24 3d | 22 2a 45 58 45 43 20 22 |ile$:a$=|"*EXEC "|
|00001060| 0d 06 68 2d e7 20 61 63 | 74 69 6f 6e 3d 35 20 63 |..h-. ac|tion=5 c|
|00001070| 24 3d 22 50 52 49 4e 54 | 20 22 2b 66 69 6c 65 24 |$="PRINT| "+file$|
|00001080| 3a 61 24 3d 22 2a 50 52 | 49 4e 54 20 22 0d 06 72 |:a$="*PR|INT "..r|
|00001090| 35 c8 99 20 22 4f 53 5f | 50 72 65 74 74 79 50 72 |5.. "OS_|PrettyPr|
|000010a0| 69 6e 74 22 2c 22 41 74 | 74 65 6d 70 74 69 6e 67 |int","At|tempting|
|000010b0| 20 74 6f 20 22 2b 61 24 | 2b 22 20 22 2b 66 69 6c | to "+a$|+" "+fil|
|000010c0| 65 24 0d 06 7c 05 f1 0d | 06 86 09 ff 28 63 24 29 |e$..|...|....(c$)|
|000010d0| 0d 06 90 2e f1 27 22 50 | 72 65 73 73 20 53 50 41 |.....'"P|ress SPA|
|000010e0| 43 45 20 6f 72 20 63 6c | 69 63 6b 20 6d 6f 75 73 |CE or cl|ick mous|
|000010f0| 65 20 74 6f 20 63 6f 6e | 74 69 6e 75 65 22 0d 06 |e to con|tinue"..|
|00001100| 9a 22 f5 3a c8 97 20 78 | 2c 79 2c 62 3a 41 3d a6 |.".:.. x|,y,b:A=.|
|00001110| 28 30 29 3a fd 20 62 3d | 30 20 80 20 41 3d 2d 31 |(0):. b=|0 . A=-1|
|00001120| 0d 06 a4 24 f5 3a c8 97 | 20 78 2c 79 2c 62 3a 41 |...$.:..| x,y,b:A|
|00001130| 3d a6 28 30 29 3a fd 20 | 62 3c 3e 30 20 84 20 41 |=.(0):. |b<>0 . A|
|00001140| 3c 3e 2d 31 0d 06 ae 2c | c8 99 20 22 57 69 6d 70 |<>-1...,|.. "Wimp|
|00001150| 5f 46 6f 72 63 65 52 65 | 64 72 61 77 22 2c 2d 31 |_ForceRe|draw",-1|
|00001160| 2c 30 2c 30 2c 31 32 38 | 30 30 2c 31 30 32 34 30 |,0,0,128|00,10240|
|00001170| 0d 06 b8 07 f7 20 85 0d | 06 c2 05 e1 0d 06 cc 05 |..... ..|........|
|00001180| f1 0d 06 d6 08 f1 20 f6 | 24 0d 06 e0 05 f1 0d 06 |...... .|$.......|
|00001190| ea 0a e5 20 8d 74 50 46 | 0d ff                   |... .tPF|..      |
+--------+-------------------------+-------------------------+--------+--------+