home *** CD-ROM | disk | FTP | other *** search
Unknown | 1994-09-08 | 66.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.
Confidence | Program | Detection | Match Type | Support
|
---|
100%
| file
| data
| default
| |
100%
| xdgMime
| image/x-tga
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 10 f4 20 3e 21 | 52 75 6e 69 6d 61 67 65 |..... >!|Runimage|
|00000010| 0d 00 14 14 ee 85 20 f6 | 3a f1 22 20 61 74 20 22 |...... .|:." at "|
|00000020| 3b 9e 3a e0 0d 00 1e 09 | f2 69 6e 69 74 0d 00 28 |;.:.....|.init..(|
|00000030| 0d f2 6c 6f 61 64 63 6f | 64 65 0d 00 32 0b f2 67 |..loadco|de..2..g|
|00000040| 65 74 65 6e 76 0d 00 3c | 0d f2 69 6e 69 74 77 69 |etenv..<|..initwi|
|00000050| 6d 70 0d 00 46 11 ee 85 | f2 65 72 72 6f 72 62 6f |mp..F...|.errorbo|
|00000060| 78 3a e0 0d 00 50 0f f2 | 6c 6f 61 64 63 6f 6e 66 |x:...P..|loadconf|
|00000070| 69 67 0d 00 5a 27 c8 95 | a4 6c 6f 6d 65 6d 28 74 |ig..Z'..|.lomem(t|
|00000080| 78 74 78 25 81 32 2a 74 | 78 74 79 25 29 3a e0 3d |xtx%.2*t|xty%):.=|
|00000090| 93 2b 26 32 30 30 30 3a | ce 0d 00 64 0d f2 69 6e |.+&2000:|...d..in|
|000000a0| 69 74 5f 74 78 74 0d 00 | 6e 22 c8 99 22 58 4f 53 |it_txt..|n".."XOS|
|000000b0| 5f 46 69 6c 65 22 2c 31 | 37 2c 66 69 6c 65 24 b8 |_File",1|7,file$.|
|000000c0| 41 25 2c 2c 2c 2c 53 25 | 0d 00 78 1c c8 95 a4 6c |A%,,,,S%|..x....l|
|000000d0| 6f 6d 65 6d 28 53 25 29 | 3a e0 3d 93 2b 26 32 30 |omem(S%)|:.=.+&20|
|000000e0| 30 30 3a ce 0d 00 82 16 | f2 69 6e 69 74 73 63 72 |00:.....|.initscr|
|000000f0| 69 70 74 28 66 69 6c 65 | 24 29 0d 00 8c 14 41 25 |ipt(file|$)....A%|
|00000100| 3d a4 6d 6f 64 65 6d 64 | 72 76 28 22 22 29 0d 00 |=.modemd|rv("")..|
|00000110| 96 05 f5 0d 00 a0 0e 20 | 20 73 74 61 67 65 25 3d |....... | stage%=|
|00000120| 30 0d 00 aa 07 20 20 f5 | 0d 00 b4 3d 20 20 20 20 |0.... .|...= |
|00000130| e7 a4 6c 6f 6d 65 6d 28 | 30 29 20 f2 77 61 72 6e |..lomem(|0) .warn|
|00000140| 5f 74 78 74 28 22 49 6e | 63 72 65 61 73 69 6e 67 |_txt("In|creasing|
|00000150| 20 77 69 6d 70 73 6c 6f | 74 22 29 3a e0 3d 93 2b | wimpslo|t"):.=.+|
|00000160| 26 32 30 30 30 0d 00 be | 3d 20 20 20 20 e7 a4 74 |&2000...|= ..t|
|00000170| 65 73 74 65 76 65 6e 74 | 20 8c 41 24 3d a4 67 65 |estevent| .A$=.ge|
|00000180| 74 65 76 65 6e 74 20 8b | 41 24 3d a4 6c 69 6e 65 |tevent .|A$=.line|
|00000190| 28 73 74 61 67 65 25 29 | 3a 73 74 61 67 65 25 2b |(stage%)|:stage%+|
|000001a0| 3d 31 0d 00 c8 1c 20 20 | 20 20 72 65 74 75 72 6e |=1.... | return|
|000001b0| 25 3d a4 63 6f 6d 6d 61 | 6e 64 28 41 24 29 0d 00 |%=.comma|nd(A$)..|
|000001c0| d2 1d 20 20 fd 73 74 61 | 67 65 25 3e 3d 63 6f 75 |.. .sta|ge%>=cou|
|000001d0| 6e 74 25 20 84 72 75 6e | 25 3d a3 0d 00 dc 31 20 |nt% .run|%=....1 |
|000001e0| 20 72 75 6e 25 3d a3 3a | e7 73 74 61 67 65 25 3e | run%=.:|.stage%>|
|000001f0| 3d 63 6f 75 6e 74 25 20 | f2 70 72 69 6e 74 28 22 |=count% |.print("|
|00000200| 22 2c 22 49 64 6c 65 22 | 2c 22 22 29 0d 00 e6 0d |","Idle"|,"")....|
|00000210| 20 20 f2 70 61 75 73 65 | 64 0d 00 f0 07 fd 20 a3 | .pause|d..... .|
|00000220| 0d 00 fa 05 e0 0d 01 04 | 04 0d 01 0e 20 f4 20 73 |........|.... . s|
|00000230| 65 74 20 75 70 20 75 6e | 69 76 65 72 73 61 6c 20 |et up un|iversal |
|00000240| 76 61 72 69 61 62 6c 65 | 73 0d 01 18 0a dd f2 69 |variable|s......i|
|00000250| 6e 69 74 0d 01 22 1a de | 20 74 6d 70 25 20 32 35 |nit.."..| tmp% 25|
|00000260| 36 2c 64 72 69 76 65 72 | 20 34 30 39 36 0d 01 2c |6,driver| 4096..,|
|00000270| 10 73 70 72 73 7a 25 3d | 26 31 42 30 30 0d 01 36 |.sprsz%=|&1B00..6|
|00000280| 47 66 69 6c 65 6e 6f 25 | 3d 31 3a 74 6f 74 61 6c |Gfileno%|=1:total|
|00000290| 25 3d 30 3a 70 61 75 73 | 65 25 3d a3 3a 73 74 6f |%=0:paus|e%=.:sto|
|000002a0| 70 25 3d a3 3a 72 75 6e | 25 3d a3 3a 74 61 73 6b |p%=.:run|%=.:task|
|000002b0| 73 74 61 72 74 25 3d 30 | 3a 68 69 67 68 65 73 74 |start%=0|:highest|
|000002c0| 25 3d 2d 31 0d 01 40 4b | 64 65 76 69 63 65 25 3d |%=-1..@K|device%=|
|000002d0| a3 3a 6f 6c 64 6c 69 6e | 65 25 3d 30 3a 64 65 62 |.:oldlin|e%=0:deb|
|000002e0| 75 67 25 3d a3 3a 65 72 | 72 43 25 3d 30 3a 66 68 |ug%=.:er|rC%=0:fh|
|000002f0| 31 25 3d 30 3a 66 68 32 | 25 3d 30 3a 6f 6e 6c 69 |1%=0:fh2|%=0:onli|
|00000300| 6e 65 24 3d 22 22 3a 73 | 74 61 67 65 25 3d 30 0d |ne$="":s|tage%=0.|
|00000310| 01 4a 36 73 75 62 6d 61 | 78 25 3d 32 30 3a de 63 |.J6subma|x%=20:.c|
|00000320| 61 6c 6c 5f 72 65 74 25 | 28 73 75 62 6d 61 78 25 |all_ret%|(submax%|
|00000330| 29 2c 63 61 6c 6c 5f 6c | 6f 63 6b 25 28 73 75 62 |),call_l|ock%(sub|
|00000340| 6d 61 78 25 29 0d 01 54 | 44 63 61 73 6d 61 78 25 |max%)..T|Dcasmax%|
|00000350| 3d 31 30 3a de 63 61 73 | 65 24 28 63 61 73 6d 61 |=10:.cas|e$(casma|
|00000360| 78 25 29 2c 63 61 73 6d | 61 74 63 68 25 20 63 61 |x%),casm|atch% ca|
|00000370| 73 6d 61 78 25 2c 61 6c | 69 6e 65 24 28 33 29 2c |smax%,al|ine$(3),|
|00000380| 61 6c 69 6e 65 25 28 33 | 29 0d 01 5e 23 6d 65 6e |aline%(3|)..^#men|
|00000390| 75 6d 61 78 25 3d 32 30 | 3a de 75 6d 65 6e 75 24 |umax%=20|:.umenu$|
|000003a0| 28 6d 65 6e 75 6d 61 78 | 25 2c 31 29 0d 01 68 38 |(menumax|%,1)..h8|
|000003b0| 6a 74 6d 61 78 25 3d 35 | 30 3a de 6a 74 25 28 6a |jtmax%=5|0:.jt%(j|
|000003c0| 74 6d 61 78 25 29 2c 6a | 74 24 28 6a 74 6d 61 78 |tmax%),j|t$(jtmax|
|000003d0| 25 29 3a 6a 74 6c 25 3d | 30 3a 72 65 74 75 72 6e |%):jtl%=|0:return|
|000003e0| 24 3d 22 22 0d 01 72 3f | 76 6d 61 78 25 3d 35 30 |$=""..r?|vmax%=50|
|000003f0| 3a de 76 61 72 24 28 76 | 6d 61 78 25 2c 31 29 2c |:.var$(v|max%,1),|
|00000400| 73 34 24 28 33 29 2c 74 | 67 65 74 24 28 33 29 2c |s4$(3),t|get$(3),|
|00000410| 69 68 69 73 74 24 28 31 | 30 29 3a 69 68 69 73 74 |ihist$(1|0):ihist|
|00000420| 25 3d 30 0d 01 7c 43 61 | 6c 6d 61 78 25 3d 31 30 |%=0..|Ca|lmax%=10|
|00000430| 3a de 61 6c 61 72 6d 24 | 28 61 6c 6d 61 78 25 2c |:.alarm$|(almax%,|
|00000440| 31 29 2c 61 6c 61 72 6d | 74 69 6d 65 25 28 61 6c |1),alarm|time%(al|
|00000450| 6d 61 78 25 29 2c 61 6c | 61 72 6d 69 64 24 28 61 |max%),al|armid$(a|
|00000460| 6c 6d 61 78 25 29 0d 01 | 86 51 69 6d 61 78 25 3d |lmax%)..|.Qimax%=|
|00000470| 38 3a de 69 66 69 6c 65 | 24 28 69 6d 61 78 25 29 |8:.ifile|$(imax%)|
|00000480| 2c 69 62 61 72 24 28 69 | 6d 61 78 25 29 2c 69 6d |,ibar$(i|max%),im|
|00000490| 65 6e 75 24 28 69 6d 61 | 78 25 29 2c 69 62 61 72 |enu$(ima|x%),ibar|
|000004a0| 69 64 24 28 69 6d 61 78 | 25 29 2c 69 62 61 72 25 |id$(imax|%),ibar%|
|000004b0| 28 69 6d 61 78 25 29 0d | 01 90 43 74 61 73 6b 6d |(imax%).|..Ctaskm|
|000004c0| 61 78 25 3d 38 3a de 74 | 61 73 6b 65 78 24 28 74 |ax%=8:.t|askex$(t|
|000004d0| 61 73 6b 6d 61 78 25 29 | 2c 74 61 73 6b 6e 24 28 |askmax%)|,taskn$(|
|000004e0| 74 61 73 6b 6d 61 78 25 | 29 2c 74 61 73 6b 68 25 |taskmax%|),taskh%|
|000004f0| 28 74 61 73 6b 6d 61 78 | 25 29 0d 01 9a 56 74 77 |(taskmax|%)...Vtw|
|00000500| 6d 61 78 25 3d 38 3a de | 74 77 65 78 69 74 24 28 |max%=8:.|twexit$(|
|00000510| 74 77 6d 61 78 25 29 2c | 74 77 6e 61 6d 65 24 28 |twmax%),|twname$(|
|00000520| 74 77 6d 61 78 25 29 2c | 74 77 63 6f 6d 24 28 74 |twmax%),|twcom$(t|
|00000530| 77 6d 61 78 25 29 2c 74 | 77 68 25 28 74 77 6d 61 |wmax%),t|wh%(twma|
|00000540| 78 25 29 2c 74 77 66 25 | 28 74 77 6d 61 78 25 29 |x%),twf%|(twmax%)|
|00000550| 0d 01 a4 54 de 74 64 61 | 74 61 24 28 74 77 6d 61 |...T.tda|ta$(twma|
|00000560| 78 25 29 2c 74 77 77 25 | 28 74 77 6d 61 78 25 29 |x%),tww%|(twmax%)|
|00000570| 2c 74 77 79 25 28 74 77 | 6d 61 78 25 29 2c 74 77 |,twy%(tw|max%),tw|
|00000580| 6f 25 28 74 77 6d 61 78 | 25 29 2c 74 77 6b 25 28 |o%(twmax|%),twk%(|
|00000590| 74 77 6d 61 78 25 29 2c | 74 77 74 25 28 74 77 6d |twmax%),|twt%(twm|
|000005a0| 61 78 25 29 0d 01 ae 3b | 74 67 65 74 25 3d 2d 31 |ax%)...;|tget%=-1|
|000005b0| 3a 74 77 77 25 28 29 3d | 30 3a 74 77 6f 25 28 29 |:tww%()=|0:two%()|
|000005c0| 3d 30 3a 74 77 77 6d 61 | 78 25 3d 32 39 3a 74 78 |=0:twwma|x%=29:tx|
|000005d0| 74 78 25 3d 38 30 3a 74 | 78 74 79 25 3d 32 34 0d |tx%=80:t|xty%=24.|
|000005e0| 01 b8 47 6d 61 78 65 76 | 25 3d 31 30 3a de 65 76 |..Gmaxev|%=10:.ev|
|000005f0| 65 6e 74 24 28 6d 61 78 | 65 76 25 29 2c 65 76 65 |ent$(max|ev%),eve|
|00000600| 6e 74 25 28 6d 61 78 65 | 76 25 29 2c 65 76 74 79 |nt%(maxe|v%),evty|
|00000610| 70 65 25 28 6d 61 78 65 | 76 25 29 3a 65 76 65 6e |pe%(maxe|v%):even|
|00000620| 74 25 28 29 3d b9 0d 01 | c2 47 66 6d 61 78 25 3d |t%()=...|.Gfmax%=|
|00000630| 31 30 3a de 66 69 6c 65 | 68 25 28 66 6d 61 78 25 |10:.file|h%(fmax%|
|00000640| 29 2c 66 69 6c 65 69 64 | 24 28 66 6d 61 78 25 29 |),fileid|$(fmax%)|
|00000650| 2c 66 69 6c 65 77 72 25 | 28 66 6d 61 78 25 29 2c |,filewr%|(fmax%),|
|00000660| 66 69 6c 65 6e 24 28 66 | 6d 61 78 25 29 0d 01 cc |filen$(f|max%)...|
|00000670| 48 6d 73 67 6d 61 78 25 | 3d 32 35 3a 6d 73 67 5f |Hmsgmax%|=25:msg_|
|00000680| 63 73 24 3d 22 22 3a 6d | 73 67 5f 63 65 24 3d 22 |cs$="":m|sg_ce$="|
|00000690| 22 3a 6d 73 67 5f 63 6d | 25 3d 30 3a 6d 73 67 5f |":msg_cm|%=0:msg_|
|000006a0| 63 73 25 3d 30 3a 6d 73 | 67 63 25 3d b9 3a 6d 73 |cs%=0:ms|gc%=.:ms|
|000006b0| 67 74 25 3d 30 0d 01 d6 | 22 73 64 64 69 72 24 3d |gt%=0...|"sddir$=|
|000006c0| a4 76 61 72 76 61 6c 28 | 22 53 6c 69 70 64 69 61 |.varval(|"Slipdia|
|000006d0| 6c 24 64 69 72 22 29 0d | 01 e0 28 73 64 72 65 73 |l$dir").|..(sdres|
|000006e0| 24 3d a4 76 61 72 76 61 | 6c 28 22 53 6c 69 70 64 |$=.varva|l("Slipd|
|000006f0| 69 61 6c 24 72 65 73 6f | 75 72 63 65 73 22 29 0d |ial$reso|urces").|
|00000700| 01 ea 39 73 64 6c 61 6e | 67 24 3d 73 64 72 65 73 |..9sdlan|g$=sdres|
|00000710| 24 2b 22 2e 55 4b 22 3a | 63 68 24 3d 22 22 3a 61 |$+".UK":|ch$="":a|
|00000720| 75 74 6f 77 69 6e 70 6f | 73 25 3d 31 3a 6e 75 6d |utowinpo|s%=1:num|
|00000730| 24 3d 22 6e 6f 6e 65 22 | 0d 01 f4 05 e1 0d 01 fe |$="none"|........|
|00000740| 04 0d 02 08 27 f4 20 73 | 65 74 20 75 70 20 77 69 |....'. s|et up wi|
|00000750| 6d 70 20 61 6e 64 20 72 | 65 6c 61 74 65 64 20 76 |mp and r|elated v|
|00000760| 61 72 69 61 62 6c 65 73 | 0d 02 12 0e dd f2 69 6e |ariables|......in|
|00000770| 69 74 77 69 6d 70 0d 02 | 1c 33 de 20 73 70 72 69 |itwimp..|.3. spri|
|00000780| 74 65 73 25 20 73 70 72 | 73 7a 25 3a 21 73 70 72 |tes% spr|sz%:!spr|
|00000790| 69 74 65 73 25 3d 73 70 | 72 73 7a 25 3a 73 70 72 |ites%=sp|rsz%:spr|
|000007a0| 69 74 65 73 25 21 38 3d | 30 0d 02 26 22 c8 99 20 |ites%!8=|0..&".. |
|000007b0| 22 4f 53 5f 53 70 72 69 | 74 65 4f 70 22 2c 26 31 |"OS_Spri|teOp",&1|
|000007c0| 30 39 2c 73 70 72 69 74 | 65 73 25 0d 02 30 42 e7 |09,sprit|es%..0B.|
|000007d0| a4 6d 65 72 67 65 73 70 | 72 69 74 65 73 28 73 64 |.mergesp|rites(sd|
|000007e0| 72 65 73 24 2b 22 2e 53 | 70 72 69 74 65 73 22 29 |res$+".S|prites")|
|000007f0| 3d 30 20 85 30 2c 22 43 | 6f 75 6c 64 6e 27 74 20 |=0 .0,"C|ouldn't |
|00000800| 6c 6f 61 64 20 73 70 72 | 69 74 65 73 22 0d 02 3a |load spr|ites"..:|
|00000810| 2f de 20 74 61 73 6b 69 | 64 25 34 3a 24 74 61 73 |/. taski|d%4:$tas|
|00000820| 6b 69 64 25 3d 22 54 41 | 53 4b 22 3a 54 61 73 6b |kid%="TA|SK":Task|
|00000830| 24 3d 22 53 4c 49 50 64 | 69 61 6c 22 0d 02 44 1b |$="SLIPd|ial"..D.|
|00000840| de 20 6d 73 67 6c 69 73 | 74 25 34 3a 21 6d 73 67 |. msglis|t%4:!msg|
|00000850| 6c 69 73 74 25 3d 30 0d | 02 4e 45 c8 99 20 22 57 |list%=0.|.NE.. "W|
|00000860| 69 6d 70 5f 49 6e 69 74 | 69 61 6c 69 73 65 22 2c |imp_Init|ialise",|
|00000870| 33 31 30 2c 21 74 61 73 | 6b 69 64 25 2c 54 61 73 |310,!tas|kid%,Tas|
|00000880| 6b 24 2c 6d 73 67 6c 69 | 73 74 25 20 b8 20 76 65 |k$,msgli|st% . ve|
|00000890| 72 73 69 6f 6e 25 2c 74 | 61 73 6b 25 0d 02 58 2d |rsion%,t|ask%..X-|
|000008a0| e7 76 65 72 73 69 6f 6e | 25 3c 33 31 30 20 85 31 |.version|%<310 .1|
|000008b0| 2c 22 57 69 6e 64 6f 77 | 20 4d 61 6e 61 67 65 72 |,"Window| Manager|
|000008c0| 20 74 6f 6f 20 6f 6c 64 | 22 0d 02 62 13 73 74 77 | too old|"..b.stw|
|000008d0| 78 25 3d 30 3a 73 74 77 | 79 25 3d 30 0d 02 6c 24 |x%=0:stw|y%=0..l$|
|000008e0| 66 68 31 25 3d a4 6f 70 | 65 6e 69 6e 28 73 64 72 |fh1%=.op|enin(sdr|
|000008f0| 65 73 24 2b 22 2e 21 77 | 69 6e 64 6f 77 73 22 29 |es$+".!w|indows")|
|00000900| 0d 02 76 0c e7 66 68 31 | 25 3e 30 8c 0d 02 80 21 |..v..fh1|%>0....!|
|00000910| 20 20 73 74 77 78 25 3d | bb be 23 66 68 31 25 3a | stwx%=|..#fh1%:|
|00000920| 73 74 77 79 25 3d bb be | 23 66 68 31 25 0d 02 8a |stwy%=..|#fh1%...|
|00000930| 05 cd 0d 02 94 0d f2 63 | 66 28 66 68 31 25 29 0d |.......c|f(fh1%).|
|00000940| 02 9e 35 de 20 71 25 20 | 26 34 30 30 2c 6d 65 6e |..5. q% |&400,men|
|00000950| 75 64 61 74 61 25 20 26 | 32 30 30 2c 69 63 6f 6e |udata% &|200,icon|
|00000960| 73 25 20 26 31 30 30 2c | 62 75 66 66 65 72 25 20 |s% &100,|buffer% |
|00000970| 26 31 30 30 0d 02 a8 30 | c8 99 20 22 57 69 6d 70 |&100...0|.. "Wimp|
|00000980| 5f 4f 70 65 6e 54 65 6d | 70 6c 61 74 65 22 2c 2c |_OpenTem|plate",,|
|00000990| 73 64 6c 61 6e 67 24 2b | 22 2e 54 65 6d 70 6c 61 |sdlang$+|".Templa|
|000009a0| 74 65 73 22 0d 02 b2 22 | 73 69 7a 65 25 3d 31 34 |tes"..."|size%=14|
|000009b0| 35 30 3a de 73 70 25 20 | 73 69 7a 65 25 3a 69 6e |50:.sp% |size%:in|
|000009c0| 64 25 3d 73 70 25 0d 02 | bc 41 c8 99 20 22 57 69 |d%=sp%..|.A.. "Wi|
|000009d0| 6d 70 5f 4c 6f 61 64 54 | 65 6d 70 6c 61 74 65 22 |mp_LoadT|emplate"|
|000009e0| 2c 2c 71 25 2c 69 6e 64 | 25 2c 73 70 25 2b 73 69 |,,q%,ind|%,sp%+si|
|000009f0| 7a 65 25 2c 2d 31 2c 22 | 49 6e 66 6f 22 2c 30 20 |ze%,-1,"|Info",0 |
|00000a00| b8 2c 2c 69 6e 64 25 0d | 02 c6 26 c8 99 20 22 57 |.,,ind%.|..&.. "W|
|00000a10| 69 6d 70 5f 43 72 65 61 | 74 65 57 69 6e 64 6f 77 |imp_Crea|teWindow|
|00000a20| 22 2c 2c 71 25 20 b8 20 | 69 6e 66 6f 25 0d 02 d0 |",,q% . |info%...|
|00000a30| 43 c8 99 20 22 57 69 6d | 70 5f 4c 6f 61 64 54 65 |C.. "Wim|p_LoadTe|
|00000a40| 6d 70 6c 61 74 65 22 2c | 2c 71 25 2c 69 6e 64 25 |mplate",|,q%,ind%|
|00000a50| 2c 73 70 25 2b 73 69 7a | 65 25 2c 2d 31 2c 22 53 |,sp%+siz|e%,-1,"S|
|00000a60| 74 61 74 75 73 22 2c 30 | 20 b8 2c 2c 69 6e 64 25 |tatus",0| .,,ind%|
|00000a70| 0d 02 da 1c f2 73 65 74 | 77 70 6f 73 28 71 25 2c |.....set|wpos(q%,|
|00000a80| 73 74 77 78 25 2c 73 74 | 77 79 25 29 0d 02 e4 28 |stwx%,st|wy%)...(|
|00000a90| c8 99 20 22 57 69 6d 70 | 5f 43 72 65 61 74 65 57 |.. "Wimp|_CreateW|
|00000aa0| 69 6e 64 6f 77 22 2c 2c | 71 25 20 b8 20 73 74 61 |indow",,|q% . sta|
|00000ab0| 74 75 73 25 0d 02 ee 43 | c8 99 20 22 57 69 6d 70 |tus%...C|.. "Wimp|
|00000ac0| 5f 4c 6f 61 64 54 65 6d | 70 6c 61 74 65 22 2c 2c |_LoadTem|plate",,|
|00000ad0| 71 25 2c 69 6e 64 25 2c | 73 70 25 2b 73 69 7a 65 |q%,ind%,|sp%+size|
|00000ae0| 25 2c 2d 31 2c 22 74 78 | 74 77 69 6e 22 2c 30 20 |%,-1,"tx|twin",0 |
|00000af0| b8 2c 2c 69 6e 64 25 0d | 02 f8 25 c8 99 20 22 57 |.,,ind%.|..%.. "W|
|00000b00| 69 6d 70 5f 43 72 65 61 | 74 65 57 69 6e 64 6f 77 |imp_Crea|teWindow|
|00000b10| 22 2c 2c 71 25 20 b8 20 | 74 78 74 25 0d 03 02 43 |",,q% . |txt%...C|
|00000b20| c8 99 20 22 57 69 6d 70 | 5f 4c 6f 61 64 54 65 6d |.. "Wimp|_LoadTem|
|00000b30| 70 6c 61 74 65 22 2c 2c | 71 25 2c 69 6e 64 25 2c |plate",,|q%,ind%,|
|00000b40| 73 70 25 2b 73 69 7a 65 | 25 2c 2d 31 2c 22 63 6f |sp%+size|%,-1,"co|
|00000b50| 6e 66 69 67 22 2c 30 20 | b8 2c 2c 69 6e 64 25 0d |nfig",0 |.,,ind%.|
|00000b60| 03 0c 28 c8 99 20 22 57 | 69 6d 70 5f 43 72 65 61 |..(.. "W|imp_Crea|
|00000b70| 74 65 57 69 6e 64 6f 77 | 22 2c 2c 71 25 20 b8 20 |teWindow|",,q% . |
|00000b80| 63 6f 6e 66 69 67 25 0d | 03 16 44 c8 99 20 22 57 |config%.|..D.. "W|
|00000b90| 69 6d 70 5f 4c 6f 61 64 | 54 65 6d 70 6c 61 74 65 |imp_Load|Template|
|00000ba0| 22 2c 2c 71 25 2c 69 6e | 64 25 2c 73 70 25 2b 73 |",,q%,in|d%,sp%+s|
|00000bb0| 69 7a 65 25 2c 2d 31 2c | 22 6d 65 73 73 61 67 65 |ize%,-1,|"message|
|00000bc0| 22 2c 30 20 b8 2c 2c 69 | 6e 64 25 0d 03 20 11 6d |",0 .,,i|nd%.. .m|
|00000bd0| 73 67 74 74 6c 25 3d 71 | 25 21 37 32 0d 03 2a 26 |sgttl%=q|%!72..*&|
|00000be0| c8 99 20 22 57 69 6d 70 | 5f 43 72 65 61 74 65 57 |.. "Wimp|_CreateW|
|00000bf0| 69 6e 64 6f 77 22 2c 2c | 71 25 20 b8 20 6d 65 73 |indow",,|q% . mes|
|00000c00| 73 25 0d 03 34 42 c8 99 | 20 22 57 69 6d 70 5f 4c |s%..4B..| "Wimp_L|
|00000c10| 6f 61 64 54 65 6d 70 6c | 61 74 65 22 2c 2c 71 25 |oadTempl|ate",,q%|
|00000c20| 2c 69 6e 64 25 2c 73 70 | 25 2b 73 69 7a 65 25 2c |,ind%,sp|%+size%,|
|00000c30| 2d 31 2c 22 69 6e 70 75 | 74 22 2c 30 20 b8 2c 2c |-1,"inpu|t",0 .,,|
|00000c40| 69 6e 64 25 0d 03 3e 27 | c8 99 20 22 57 69 6d 70 |ind%..>'|.. "Wimp|
|00000c50| 5f 43 72 65 61 74 65 57 | 69 6e 64 6f 77 22 2c 2c |_CreateW|indow",,|
|00000c60| 71 25 20 b8 20 69 6e 70 | 75 74 25 0d 03 48 42 c8 |q% . inp|ut%..HB.|
|00000c70| 99 20 22 57 69 6d 70 5f | 4c 6f 61 64 54 65 6d 70 |. "Wimp_|LoadTemp|
|00000c80| 6c 61 74 65 22 2c 2c 71 | 25 2c 69 6e 64 25 2c 73 |late",,q|%,ind%,s|
|00000c90| 70 25 2b 73 69 7a 65 25 | 2c 2d 31 2c 22 79 65 73 |p%+size%|,-1,"yes|
|00000ca0| 6e 6f 22 2c 30 20 b8 2c | 2c 69 6e 64 25 0d 03 52 |no",0 .,|,ind%..R|
|00000cb0| 27 c8 99 20 22 57 69 6d | 70 5f 43 72 65 61 74 65 |'.. "Wim|p_Create|
|00000cc0| 57 69 6e 64 6f 77 22 2c | 2c 71 25 20 b8 20 79 65 |Window",|,q% . ye|
|00000cd0| 73 6e 6f 25 0d 03 5c 1b | c8 99 20 22 57 69 6d 70 |sno%..\.|.. "Wimp|
|00000ce0| 5f 43 6c 6f 73 65 54 65 | 6d 70 6c 61 74 65 22 0d |_CloseTe|mplate".|
|00000cf0| 03 66 43 f2 73 65 74 69 | 63 6f 6e 73 74 72 69 6e |.fC.seti|constrin|
|00000d00| 67 28 69 6e 66 6f 25 2c | 34 2c 22 30 2e 33 32 20 |g(info%,|4,"0.32 |
|00000d10| 28 30 34 2d 53 65 70 2d | 31 39 39 34 29 22 29 3a |(04-Sep-|1994)"):|
|00000d20| f2 73 65 74 76 28 22 24 | 76 65 72 22 2c 22 33 32 |.setv("$|ver","32|
|00000d30| 22 29 0d 03 70 4c 73 64 | 69 63 24 3d 22 73 6c 69 |")..pLsd|ic$="sli|
|00000d40| 70 64 69 61 6c 22 3a 69 | 63 6f 6e 30 25 3d a4 69 |pdial":i|con0%=.i|
|00000d50| 63 28 73 64 69 63 24 2c | 2d 31 29 3a e7 69 63 6f |c(sdic$,|-1):.ico|
|00000d60| 6e 30 25 3d 30 85 30 2c | 22 43 6f 75 6c 64 6e 27 |n0%=0.0,|"Couldn'|
|00000d70| 74 20 63 72 65 61 74 65 | 20 69 63 6f 6e 22 0d 03 |t create| icon"..|
|00000d80| 7a 27 4d 25 3d 25 31 30 | 30 30 30 30 30 31 31 30 |z'M%=%10|00000110|
|00000d90| 30 30 30 30 31 31 30 30 | 30 30 3a 73 6c 69 63 65 |00001100|00:slice|
|00000da0| 25 3d 2d 31 35 0d 03 84 | 36 c8 99 22 4f 53 5f 52 |%=-15...|6.."OS_R|
|00000db0| 65 61 64 4d 6f 6e 6f 74 | 6f 6e 69 63 54 69 6d 65 |eadMonot|onicTime|
|00000dc0| 22 b8 6c 61 73 74 70 6f | 6c 6c 25 3a 74 69 6d 65 |".lastpo|ll%:time|
|00000dd0| 25 3d 6c 61 73 74 70 6f | 6c 6c 25 0d 03 8e 31 63 |%=lastpo|ll%...1c|
|00000de0| 68 65 63 6b 61 6c 61 72 | 6d 25 3d 74 69 6d 65 25 |heckalar|m%=time%|
|00000df0| 3a 63 68 65 63 6b 6c 69 | 6e 65 25 3d 74 69 6d 65 |:checkli|ne%=time|
|00000e00| 25 3a f2 63 68 65 63 6b | 69 63 6f 6e 0d 03 98 05 |%:.check|icon....|
|00000e10| e1 0d 03 a2 04 0d 03 ac | 17 dd f2 73 65 74 77 70 |........|...setwp|
|00000e20| 6f 73 28 71 25 2c 78 25 | 2c 79 25 29 0d 03 b6 0a |os(q%,x%|,y%)....|
|00000e30| ea 77 25 2c 68 25 0d 03 | c0 0a e7 78 25 3e 30 8c |.w%,h%..|...x%>0.|
|00000e40| 0d 03 ca 1d 77 25 3d 71 | 25 21 38 2d 21 71 25 3a |....w%=q|%!8-!q%:|
|00000e50| 68 25 3d 71 25 21 31 32 | 2d 71 25 21 34 0d 03 d4 |h%=q%!12|-q%!4...|
|00000e60| 15 21 71 25 3d 78 25 3a | 71 25 21 38 3d 78 25 2b |.!q%=x%:|q%!8=x%+|
|00000e70| 77 25 0d 03 de 17 71 25 | 21 34 3d 79 25 3a 71 25 |w%....q%|!4=y%:q%|
|00000e80| 21 31 32 3d 79 25 2b 68 | 25 0d 03 e8 05 cd 0d 03 |!12=y%+h|%.......|
|00000e90| f2 05 e1 0d 03 fc 04 0d | 04 06 31 f4 20 6d 65 72 |........|..1. mer|
|00000ea0| 67 65 20 73 70 72 69 74 | 65 20 66 69 6c 65 20 69 |ge sprit|e file i|
|00000eb0| 6e 74 6f 20 73 6c 69 70 | 64 69 61 6c 20 73 70 72 |nto slip|dial spr|
|00000ec0| 69 74 65 20 61 72 65 61 | 0d 04 10 16 dd a4 6d 65 |ite area|......me|
|00000ed0| 72 67 65 73 70 72 69 74 | 65 73 28 41 24 29 0d 04 |rgesprit|es(A$)..|
|00000ee0| 1a 29 ea 73 25 2c 66 25 | 2c 6e 25 3a c8 99 22 58 |.).s%,f%|,n%:.."X|
|00000ef0| 4f 53 5f 46 69 6c 65 22 | 2c 31 37 2c 41 24 b8 41 |OS_File"|,17,A$.A|
|00000f00| 25 2c 2c 2c 2c 53 25 0d | 04 24 2e c8 99 22 58 4f |%,,,,S%.|.$..."XO|
|00000f10| 53 5f 53 70 72 69 74 65 | 4f 70 22 2c 26 31 30 38 |S_Sprite|Op",&108|
|00000f20| 2c 73 70 72 69 74 65 73 | 25 b8 2c 2c 73 25 2c 6e |,sprites|%.,,s%,n|
|00000f30| 25 2c 2c 66 25 0d 04 2e | 19 e7 41 25 3c 3e 31 84 |%,,f%...|..A%<>1.|
|00000f40| 53 25 3e 28 73 25 2d 66 | 25 29 20 8c 3d 30 0d 04 |S%>(s%-f|%) .=0..|
|00000f50| 38 30 c8 99 22 58 4f 53 | 5f 53 70 72 69 74 65 4f |80.."XOS|_SpriteO|
|00000f60| 70 22 2c 26 31 30 42 2b | 28 6e 25 3d 30 29 2c 73 |p",&10B+|(n%=0),s|
|00000f70| 70 72 69 74 65 73 25 2c | 41 24 b8 3b 46 25 0d 04 |prites%,|A$.;F%..|
|00000f80| 42 1e e7 28 46 25 80 31 | 29 3d 30 20 8c 3a 3d 73 |B..(F%.1|)=0 .:=s|
|00000f90| 25 2d 66 25 2d 53 25 20 | 8b 3a 3d 30 0d 04 4c 04 |%-f%-S% |.:=0..L.|
|00000fa0| 0d 04 56 0b dd a4 73 66 | 72 65 65 0d 04 60 33 ea |..V...sf|ree..`3.|
|00000fb0| 73 25 2c 66 25 3a c8 99 | 22 58 4f 53 5f 53 70 72 |s%,f%:..|"XOS_Spr|
|00000fc0| 69 74 65 4f 70 22 2c 26 | 31 30 38 2c 73 70 72 69 |iteOp",&|108,spri|
|00000fd0| 74 65 73 25 b8 2c 2c 73 | 25 2c 2c 2c 66 25 0d 04 |tes%.,,s|%,,,f%..|
|00000fe0| 6a 0a 3d 73 25 2d 66 25 | 0d 04 74 04 0d 04 7e 4d |j.=s%-f%|..t...~M|
|00000ff0| f4 20 70 6c 61 63 65 73 | 20 61 6e 20 69 63 6f 6e |. places| an icon|
|00001000| 20 6f 6e 20 74 68 65 20 | 69 63 6f 6e 62 61 72 20 | on the |iconbar |
|00001010| 6e 25 3c 2d 31 20 69 73 | 20 6d 61 69 6e 20 69 63 |n%<-1 is| main ic|
|00001020| 6f 6e 2c 20 6f 74 68 65 | 72 73 20 61 72 65 20 75 |on, othe|rs are u|
|00001030| 73 65 72 20 69 63 6f 6e | 73 0d 04 88 0f dd a4 69 |ser icon|s......i|
|00001040| 63 28 41 24 2c 6e 25 29 | 0d 04 92 0d ea 5a 25 2c |c(A$,n%)|.....Z%,|
|00001050| 6e 65 78 74 25 0d 04 9c | 41 c8 99 22 4f 53 5f 53 |next%...|A.."OS_S|
|00001060| 70 72 69 74 65 4f 70 22 | 2c 26 31 30 30 2b 34 30 |priteOp"|,&100+40|
|00001070| 2c 73 70 72 69 74 65 73 | 25 2c 41 24 b8 2c 2c 2c |,sprites|%,A$.,,,|
|00001080| 77 25 2c 68 25 3a e7 77 | 25 3e 32 30 30 84 68 25 |w%,h%:.w|%>200.h%|
|00001090| 3e 37 30 8c 3d 30 0d 04 | a6 0a e7 6e 25 3c 30 8c |>70.=0..|...n%<0.|
|000010a0| 0d 04 b0 18 20 20 21 69 | 63 6f 6e 73 25 3d 2d 31 |.... !i|cons%=-1|
|000010b0| 3a 6e 65 78 74 25 3d 30 | 0d 04 ba 05 cc 0d 04 c4 |:next%=0|........|
|000010c0| 12 20 20 6e 65 78 74 25 | 3d 69 63 6f 6e 30 25 0d |. next%|=icon0%.|
|000010d0| 04 ce 2c 20 20 e3 5a 25 | 3d 30 b8 6e 25 3a e7 69 |.., .Z%|=0.n%:.i|
|000010e0| 62 61 72 25 28 5a 25 29 | 3e 30 20 8c 6e 65 78 74 |bar%(Z%)|>0 .next|
|000010f0| 25 3d 69 62 61 72 25 28 | 5a 25 29 0d 04 d8 12 20 |%=ibar%(|Z%).... |
|00001100| 20 ed 3a 21 69 63 6f 6e | 73 25 3d 2d 33 0d 04 e2 | .:!icon|s%=-3...|
|00001110| 05 cd 0d 04 ec 45 69 63 | 6f 6e 73 25 21 34 3d 30 |.....Eic|ons%!4=0|
|00001120| 3a 69 63 6f 6e 73 25 21 | 38 3d 30 3a 69 63 6f 6e |:icons%!|8=0:icon|
|00001130| 73 25 21 31 32 3d 77 25 | 2a 32 3a 69 63 6f 6e 73 |s%!12=w%|*2:icons|
|00001140| 25 21 31 36 3d 36 38 3a | 69 63 6f 6e 73 25 21 32 |%!16=68:|icons%!2|
|00001150| 30 3d 26 33 31 30 32 0d | 04 f6 21 de 69 63 6f 6e |0=&3102.|..!.icon|
|00001160| 73 25 21 32 34 20 31 32 | 3a 24 28 69 63 6f 6e 73 |s%!24 12|:$(icons|
|00001170| 25 21 32 34 29 3d 41 24 | 0d 05 00 23 69 63 6f 6e |%!24)=A$|...#icon|
|00001180| 73 25 21 32 38 3d 73 70 | 72 69 74 65 73 25 3a 69 |s%!28=sp|rites%:i|
|00001190| 63 6f 6e 73 25 21 33 32 | 3d 31 31 0d 05 0a 29 c8 |cons%!32|=11...).|
|000011a0| 99 20 22 57 69 6d 70 5f | 43 72 65 61 74 65 49 63 |. "Wimp_|CreateIc|
|000011b0| 6f 6e 22 2c 6e 65 78 74 | 25 2c 69 63 6f 6e 73 25 |on",next|%,icons%|
|000011c0| b8 69 63 25 0d 05 14 08 | 3d 69 63 25 0d 05 1e 04 |.ic%....|=ic%....|
|000011d0| 0d 05 28 1a f4 20 75 70 | 64 61 74 65 20 74 68 65 |..(.. up|date the|
|000011e0| 20 6d 61 69 6e 20 69 63 | 6f 6e 0d 05 32 0f dd f2 | main ic|on..2...|
|000011f0| 63 68 65 63 6b 69 63 6f | 6e 0d 05 3c 10 e7 64 65 |checkico|n..<..de|
|00001200| 76 69 63 65 25 3d a3 20 | 8c 0d 05 46 13 20 20 6e |vice%=. |...F. n|
|00001210| 61 6d 65 24 3d 22 6e 6f | 64 65 76 22 0d 05 50 07 |ame$="no|dev"..P.|
|00001220| 20 20 cc 0d 05 5a 1f 20 | 20 e7 20 28 a4 64 28 39 | ...Z. | . (.d(9|
|00001230| 2c 70 6f 72 74 25 2c 30 | 2c 30 29 80 38 29 3d 30 |,port%,0|,0).8)=0|
|00001240| 20 8c 0d 05 64 13 20 20 | 20 20 6e 61 6d 65 24 3d | ...d. | name$=|
|00001250| 22 64 65 76 22 0d 05 6e | 09 20 20 20 20 cc 0d 05 |"dev"..n|. ...|
|00001260| 78 39 20 20 20 20 e7 73 | 64 69 63 24 3d 22 6f 6e |x9 .s|dic$="on|
|00001270| 6c 69 6e 65 31 22 20 8c | 6e 61 6d 65 24 3d 22 6f |line1" .|name$="o|
|00001280| 6e 6c 69 6e 65 32 22 8b | 6e 61 6d 65 24 3d 22 6f |nline2".|name$="o|
|00001290| 6e 6c 69 6e 65 31 22 0d | 05 82 07 20 20 cd 0d 05 |nline1".|... ...|
|000012a0| 8c 05 cd 0d 05 96 14 63 | 68 65 63 6b 6c 69 6e 65 |.......c|heckline|
|000012b0| 25 3d 74 69 6d 65 25 0d | 05 a0 13 e7 6e 61 6d 65 |%=time%.|....name|
|000012c0| 24 3c 3e 73 64 69 63 24 | 20 8c 0d 05 aa 1c 20 20 |$<>sdic$| ..... |
|000012d0| f2 63 61 6c 6c 5f 6c 6f | 67 28 73 64 69 63 24 2c |.call_lo|g(sdic$,|
|000012e0| 6e 61 6d 65 24 29 0d 05 | b4 11 20 20 73 64 69 63 |name$)..|.. sdic|
|000012f0| 24 3d 6e 61 6d 65 24 0d | 05 be 32 20 20 c8 99 20 |$=name$.|..2 .. |
|00001300| 22 4f 53 5f 53 70 72 69 | 74 65 4f 70 22 2c 26 31 |"OS_Spri|teOp",&1|
|00001310| 31 38 2c 73 70 72 69 74 | 65 73 25 2c 73 64 69 63 |18,sprit|es%,sdic|
|00001320| 24 20 b8 2c 2c 73 72 63 | 25 0d 05 c8 38 20 20 c8 |$ .,,src|%...8 .|
|00001330| 99 20 22 4f 53 5f 53 70 | 72 69 74 65 4f 70 22 2c |. "OS_Sp|riteOp",|
|00001340| 26 31 31 38 2c 73 70 72 | 69 74 65 73 25 2c 22 73 |&118,spr|ites%,"s|
|00001350| 6c 69 70 64 69 61 6c 22 | 20 b8 2c 2c 64 65 73 74 |lipdial"| .,,dest|
|00001360| 25 0d 05 d2 29 20 20 e3 | 7a 25 3d 34 34 b8 21 73 |%...) .|z%=44.!s|
|00001370| 72 63 25 2d 31 88 34 3a | 64 65 73 74 25 21 7a 25 |rc%-1.4:|dest%!z%|
|00001380| 3d 73 72 63 25 21 7a 25 | 3a ed 0d 05 dc 27 20 20 |=src%!z%|:....' |
|00001390| 21 71 25 3d 2d 31 3a 71 | 25 21 34 3d 69 63 6f 6e |!q%=-1:q|%!4=icon|
|000013a0| 30 25 3a 71 25 21 38 3d | 30 3a 71 25 21 31 32 3d |0%:q%!8=|0:q%!12=|
|000013b0| 30 0d 05 e6 20 20 20 c8 | 99 20 22 57 69 6d 70 5f |0... .|. "Wimp_|
|000013c0| 53 65 74 49 63 6f 6e 53 | 74 61 74 65 22 2c 2c 71 |SetIconS|tate",,q|
|000013d0| 25 0d 05 f0 05 cd 0d 05 | fa 05 e1 0d 06 04 04 0d |%.......|........|
|000013e0| 06 0e 33 f4 20 75 70 64 | 61 74 65 20 63 61 6c 6c |..3. upd|ate call|
|000013f0| 20 6c 6f 67 20 6f 6e 20 | 6f 6e 6c 69 6e 65 2d 6f | log on |online-o|
|00001400| 66 66 6c 69 6e 65 20 74 | 72 61 6e 73 69 74 69 6f |ffline t|ransitio|
|00001410| 6e 73 0d 06 18 15 dd f2 | 63 61 6c 6c 5f 6c 6f 67 |ns......|call_log|
|00001420| 28 41 24 2c 42 24 29 0d | 06 22 0a c8 8e 42 24 20 |(A$,B$).|."...B$ |
|00001430| ca 0d 06 2c 57 20 20 c9 | 22 6e 6f 64 65 76 22 3a |...,W .|"nodev":|
|00001440| e7 41 24 3d 22 6f 6e 6c | 69 6e 65 31 22 84 41 24 |.A$="onl|ine1".A$|
|00001450| 3d 22 6f 6e 6c 69 6e 65 | 32 22 84 41 24 3d 22 64 |="online|2".A$="d|
|00001460| 65 76 22 f2 77 63 6c 6f | 67 28 91 24 2b 22 3a 20 |ev".wclo|g(.$+": |
|00001470| 6f 66 66 6c 69 6e 65 20 | 61 66 74 65 72 20 22 2b |offline |after "+|
|00001480| 6f 6e 6c 69 6e 65 24 29 | 0d 06 36 56 20 20 c9 22 |online$)|..6V ."|
|00001490| 6f 6e 6c 69 6e 65 31 22 | 3a e7 41 24 3c 3e 22 6f |online1"|:.A$<>"o|
|000014a0| 6e 6c 69 6e 65 32 22 f2 | 77 63 6c 6f 67 28 91 24 |nline2".|wclog(.$|
|000014b0| 2b 22 3a 20 6f 6e 6c 69 | 6e 65 20 74 6f 20 22 2b |+": onli|ne to "+|
|000014c0| 6e 75 6d 24 29 3a 6f 6e | 74 69 6d 65 25 3d 74 69 |num$):on|time%=ti|
|000014d0| 6d 65 25 3a 8b f2 75 70 | 64 5f 74 69 6d 65 0d 06 |me%:..up|d_time..|
|000014e0| 40 1a 20 20 c9 22 6f 6e | 6c 69 6e 65 32 22 3a f2 |@. ."on|line2":.|
|000014f0| 75 70 64 5f 74 69 6d 65 | 0d 06 4a 05 cb 0d 06 54 |upd_time|..J....T|
|00001500| 05 e1 0d 06 5e 04 0d 06 | 68 28 f4 20 75 70 64 61 |....^...|h(. upda|
|00001510| 74 65 20 74 69 6d 65 72 | 20 69 63 6f 6e 20 69 6e |te timer| icon in|
|00001520| 20 73 74 61 74 75 73 20 | 77 69 6e 64 6f 77 0d 06 | status |window..|
|00001530| 72 0e dd f2 75 70 64 5f | 74 69 6d 65 0d 06 7c 07 |r...upd_|time..|.|
|00001540| ea 54 25 0d 06 86 1b 54 | 25 3d 94 28 74 69 6d 65 |.T%....T|%=.(time|
|00001550| 25 2d 6f 6e 74 69 6d 65 | 25 29 81 31 30 30 0d 06 |%-ontime|%).100..|
|00001560| 90 22 6f 6e 6c 69 6e 65 | 24 3d c2 22 30 22 2b c3 |."online|$=."0"+.|
|00001570| 28 54 25 81 33 36 30 30 | 29 2c 32 29 2b 22 3a 22 |(T%.3600|),2)+":"|
|00001580| 0d 06 9a 26 6f 6e 6c 69 | 6e 65 24 2b 3d c2 22 30 |...&onli|ne$+=."0|
|00001590| 22 2b c3 28 28 54 25 81 | 36 30 29 83 36 30 29 2c |"+.((T%.|60).60),|
|000015a0| 32 29 2b 22 3a 22 0d 06 | a4 1d 6f 6e 6c 69 6e 65 |2)+":"..|..online|
|000015b0| 24 2b 3d c2 22 30 22 2b | c3 28 54 25 83 36 30 29 |$+=."0"+|.(T%.60)|
|000015c0| 2c 32 29 0d 06 ae 21 f2 | 75 70 64 5f 69 63 6f 6e |,2)...!.|upd_icon|
|000015d0| 28 73 74 61 74 75 73 25 | 2c 31 31 2c 6f 6e 6c 69 |(status%|,11,onli|
|000015e0| 6e 65 24 29 0d 06 b8 05 | e1 0d 06 c2 04 0d 06 cc |ne$)....|........|
|000015f0| 21 f4 20 77 72 69 74 65 | 20 61 20 6c 69 6e 65 20 |!. write| a line |
|00001600| 74 6f 20 74 68 65 20 6c | 6f 67 66 69 6c 65 0d 06 |to the l|ogfile..|
|00001610| d6 0f dd f2 77 63 6c 6f | 67 28 41 24 29 0d 06 e0 |....wclo|g(A$)...|
|00001620| 23 66 68 31 25 3d a4 6f | 70 65 6e 75 70 28 73 64 |#fh1%=.o|penup(sd|
|00001630| 64 69 72 24 2b 22 2e 6c | 6f 67 66 69 6c 65 22 29 |dir$+".l|ogfile")|
|00001640| 0d 06 ea 2e e7 66 68 31 | 25 3c 3e 30 8c cf 23 66 |.....fh1|%<>0..#f|
|00001650| 68 31 25 3d a2 23 66 68 | 31 25 3a d5 23 66 68 31 |h1%=.#fh|1%:.#fh1|
|00001660| 25 2c 41 24 3a f2 63 66 | 28 66 68 31 25 29 0d 06 |%,A$:.cf|(fh1%)..|
|00001670| f4 05 e1 0d 06 fe 04 0d | 07 08 11 dd f2 70 6f 6c |........|.....pol|
|00001680| 6c 28 69 64 6c 65 25 29 | 0d 07 12 38 f4 20 69 64 |l(idle%)|...8. id|
|00001690| 6c 65 25 3d 70 6f 6c 6c | 69 64 6c 65 20 74 69 6d |le%=poll|idle tim|
|000016a0| 65 20 28 2b 29 20 6f 72 | 20 74 69 6d 65 20 62 65 |e (+) or| time be|
|000016b0| 66 6f 72 65 20 70 6f 6c | 6c 69 6e 67 20 28 2d 29 |fore pol|ling (-)|
|000016c0| 0d 07 1c 23 c8 99 22 4f | 53 5f 52 65 61 64 4d 6f |...#.."O|S_ReadMo|
|000016d0| 6e 6f 74 6f 6e 69 63 54 | 69 6d 65 22 20 b8 74 69 |notonicT|ime" .ti|
|000016e0| 6d 65 25 0d 07 26 27 e7 | 69 64 6c 65 25 3e 3d 30 |me%..&'.|idle%>=0|
|000016f0| 20 84 20 6c 61 73 74 70 | 6f 6c 6c 25 2d 74 69 6d | . lastp|oll%-tim|
|00001700| 65 25 3c 69 64 6c 65 25 | 20 8c 0d 07 30 15 20 20 |e%<idle%| ...0. |
|00001710| 6c 61 73 74 70 6f 6c 6c | 25 3d 74 69 6d 65 25 0d |lastpoll|%=time%.|
|00001720| 07 3a 07 20 20 f5 0d 07 | 44 31 20 20 20 20 c8 99 |.:. ...|D1 ..|
|00001730| 20 22 57 69 6d 70 5f 50 | 6f 6c 6c 49 64 6c 65 22 | "Wimp_P|ollIdle"|
|00001740| 2c 4d 25 2c 71 25 2c 74 | 69 6d 65 25 2b 69 64 6c |,M%,q%,t|ime%+idl|
|00001750| 65 25 20 b8 20 52 25 0d | 07 4e 48 20 20 20 20 e7 |e% . R%.|.NH .|
|00001760| 64 65 76 69 63 65 25 20 | 8c 20 4a 25 3d a4 64 28 |device% |. J%=.d(|
|00001770| 31 39 2c 70 6f 72 74 25 | 2c 30 2c 30 29 3a f4 20 |19,port%|,0,0):. |
|00001780| 6c 69 6e 65 20 74 6f 20 | 66 69 78 20 49 49 20 64 |line to |fix II d|
|00001790| 75 61 6c 20 73 65 72 69 | 61 6c 20 63 61 72 64 0d |ual seri|al card.|
|000017a0| 07 58 0f 20 20 20 20 c8 | 8e 20 52 25 20 ca 0d 07 |.X. .|. R% ...|
|000017b0| 62 1a 20 20 20 20 c9 20 | 31 20 3a f2 72 65 64 72 |b. . |1 :.redr|
|000017c0| 61 77 77 28 21 71 25 29 | 0d 07 6c 40 20 20 20 20 |aww(!q%)|..l@ |
|000017d0| c9 20 32 20 3a f2 6f 70 | 65 6e 77 28 21 71 25 2c |. 2 :.op|enw(!q%,|
|000017e0| 71 25 21 34 2c 71 25 21 | 38 2c 71 25 21 31 32 2c |q%!4,q%!|8,q%!12,|
|000017f0| 71 25 21 31 36 2c 71 25 | 21 32 30 2c 71 25 21 32 |q%!16,q%|!20,q%!2|
|00001800| 34 2c 71 25 21 32 38 29 | 0d 07 76 19 20 20 20 20 |4,q%!28)|..v. |
|00001810| c9 20 33 20 3a f2 63 6c | 6f 73 65 77 28 21 71 25 |. 3 :.cl|osew(!q%|
|00001820| 29 0d 07 80 2e 20 20 20 | 20 c9 20 36 20 3a f2 63 |).... | . 6 :.c|
|00001830| 6c 69 63 6b 28 21 71 25 | 2c 71 25 21 34 2c 71 25 |lick(!q%|,q%!4,q%|
|00001840| 21 38 2c 71 25 21 31 32 | 2c 71 25 21 31 36 29 0d |!8,q%!12|,q%!16).|
|00001850| 07 8a 26 20 20 20 20 c9 | 20 38 20 3a f2 6b 65 79 |..& .| 8 :.key|
|00001860| 70 72 65 73 73 28 21 71 | 25 2c 71 25 21 34 2c 71 |press(!q|%,q%!4,q|
|00001870| 25 21 32 34 29 0d 07 94 | 28 20 20 20 20 c9 20 39 |%!24)...|( . 9|
|00001880| 20 3a f2 67 65 74 70 6f | 69 6e 74 65 72 3a f2 6d | :.getpo|inter:.m|
|00001890| 65 6e 75 73 65 6c 65 63 | 74 28 71 25 29 0d 07 9e |enuselec|t(q%)...|
|000018a0| 1c 20 20 20 20 c9 20 31 | 37 2c 31 38 3a f2 72 65 |. . 1|7,18:.re|
|000018b0| 63 65 69 76 65 28 71 25 | 29 0d 07 a8 09 20 20 20 |ceive(q%|).... |
|000018c0| 20 cb 0d 07 b2 0b 20 20 | fd 52 25 3d 30 0d 07 bc | ..... |.R%=0...|
|000018d0| 3a 20 20 e7 74 69 6d 65 | 25 3e 63 68 65 63 6b 6c |: .time|%>checkl|
|000018e0| 69 6e 65 25 2b 31 30 30 | 20 f2 63 68 65 63 6b 69 |ine%+100| .checki|
|000018f0| 63 6f 6e 3a f2 6c 69 6e | 65 61 6c 61 72 6d 3a f2 |con:.lin|ealarm:.|
|00001900| 73 65 74 74 69 6d 65 0d | 07 c6 30 20 20 e7 74 69 |settime.|..0 .ti|
|00001910| 6d 65 25 3e 63 68 65 63 | 6b 61 6c 61 72 6d 25 2b |me%>chec|kalarm%+|
|00001920| 35 30 30 20 f2 74 69 6d | 65 61 6c 61 72 6d 3a f2 |500 .tim|ealarm:.|
|00001930| 73 65 74 64 61 74 65 0d | 07 d0 30 20 20 e7 6d 73 |setdate.|..0 .ms|
|00001940| 67 5f 63 73 25 3e 30 80 | 74 69 6d 65 25 3e 6d 73 |g_cs%>0.|time%>ms|
|00001950| 67 74 25 2b 35 30 30 20 | f2 61 64 64 6d 65 73 73 |gt%+500 |.addmess|
|00001960| 61 67 65 28 22 22 29 0d | 07 da 05 cd 0d 07 e4 05 |age("").|........|
|00001970| e1 0d 07 ee 04 0d 07 f8 | 18 dd f2 6b 65 79 70 72 |........|...keypr|
|00001980| 65 73 73 28 77 25 2c 69 | 25 2c 6b 25 29 0d 08 02 |ess(w%,i|%,k%)...|
|00001990| 1a ea 6c 25 3a e7 77 25 | 3d 74 78 74 25 80 69 25 |..l%:.w%|=txt%.i%|
|000019a0| 3d 69 6e 69 63 25 8c 0d | 08 0c 0b 20 20 c8 8e 6b |=inic%..|... ..k|
|000019b0| 25 ca 0d 08 16 31 20 20 | 20 20 c9 31 33 3a e3 6c |%....1 | .13:.l|
|000019c0| 25 3d 31 30 b8 31 88 2d | 31 3a 69 68 69 73 74 24 |%=10.1.-|1:ihist$|
|000019d0| 28 6c 25 29 3d 69 68 69 | 73 74 24 28 6c 25 2d 31 |(l%)=ihi|st$(l%-1|
|000019e0| 29 3a ed 0d 08 20 43 20 | 20 20 20 20 20 69 68 69 |):... C | ihi|
|000019f0| 73 74 24 28 30 29 3d a4 | 69 63 5f 73 74 72 28 77 |st$(0)=.|ic_str(w|
|00001a00| 25 2c 69 25 29 3a f2 61 | 64 64 65 76 65 6e 74 28 |%,i%):.a|ddevent(|
|00001a10| 69 68 69 73 74 24 28 30 | 29 2c 30 29 3a 69 68 69 |ihist$(0|),0):ihi|
|00001a20| 73 74 25 3d 2d 31 0d 08 | 2a 44 20 20 20 20 20 20 |st%=-1..|*D |
|00001a30| f2 75 70 64 5f 69 63 6f | 6e 28 77 25 2c 69 25 2c |.upd_ico|n(w%,i%,|
|00001a40| 22 22 29 3a c8 99 22 57 | 69 6d 70 5f 53 65 74 43 |""):.."W|imp_SetC|
|00001a50| 61 72 65 74 50 6f 73 69 | 74 69 6f 6e 22 2c 77 25 |aretPosi|tion",w%|
|00001a60| 2c 69 25 2c 2c 2c 2d 31 | 2c 30 0d 08 34 8b 20 20 |,i%,,,-1|,0..4. |
|00001a70| 20 20 c9 26 31 38 46 3a | e7 69 68 69 73 74 25 3c | .&18F:|.ihist%<|
|00001a80| 31 30 80 69 68 69 73 74 | 24 28 69 68 69 73 74 25 |10.ihist|$(ihist%|
|00001a90| 2b 31 29 3e 22 22 8c 69 | 68 69 73 74 25 2b 3d 31 |+1)>"".i|hist%+=1|
|00001aa0| 3a f2 75 70 64 5f 69 63 | 6f 6e 28 77 25 2c 69 25 |:.upd_ic|on(w%,i%|
|00001ab0| 2c 69 68 69 73 74 24 28 | 69 68 69 73 74 25 29 29 |,ihist$(|ihist%))|
|00001ac0| 3a c8 99 22 57 69 6d 70 | 5f 53 65 74 43 61 72 65 |:.."Wimp|_SetCare|
|00001ad0| 74 50 6f 73 69 74 69 6f | 6e 22 2c 77 25 2c 69 25 |tPositio|n",w%,i%|
|00001ae0| 2c 2c 2c 2d 31 2c a9 69 | 68 69 73 74 24 28 69 68 |,,,-1,.i|hist$(ih|
|00001af0| 69 73 74 25 29 0d 08 3e | bc 20 20 20 20 c9 26 31 |ist%)..>|. .&1|
|00001b00| 38 45 3a e7 69 68 69 73 | 74 25 3e 30 8c 69 68 69 |8E:.ihis|t%>0.ihi|
|00001b10| 73 74 25 2d 3d 31 3a f2 | 75 70 64 5f 69 63 6f 6e |st%-=1:.|upd_icon|
|00001b20| 28 77 25 2c 69 25 2c 69 | 68 69 73 74 24 28 69 68 |(w%,i%,i|hist$(ih|
|00001b30| 69 73 74 25 29 29 3a c8 | 99 22 57 69 6d 70 5f 53 |ist%)):.|."Wimp_S|
|00001b40| 65 74 43 61 72 65 74 50 | 6f 73 69 74 69 6f 6e 22 |etCaretP|osition"|
|00001b50| 2c 77 25 2c 69 25 2c 2c | 2c 2d 31 2c a9 69 68 69 |,w%,i%,,|,-1,.ihi|
|00001b60| 73 74 24 28 69 68 69 73 | 74 25 29 20 8b 69 68 69 |st$(ihis|t%) .ihi|
|00001b70| 73 74 25 3d 2d 31 3a f2 | 75 70 64 5f 69 63 6f 6e |st%=-1:.|upd_icon|
|00001b80| 28 77 25 2c 69 25 2c 22 | 22 29 3a c8 99 22 57 69 |(w%,i%,"|"):.."Wi|
|00001b90| 6d 70 5f 53 65 74 43 61 | 72 65 74 50 6f 73 69 74 |mp_SetCa|retPosit|
|00001ba0| 69 6f 6e 22 2c 77 25 2c | 69 25 2c 2c 2c 2d 31 2c |ion",w%,|i%,,,-1,|
|00001bb0| 30 0d 08 48 23 20 20 20 | 20 7f 3a c8 99 22 57 69 |0..H# | .:.."Wi|
|00001bc0| 6d 70 5f 50 72 6f 63 65 | 73 73 4b 65 79 22 2c 71 |mp_Proce|ssKey",q|
|00001bd0| 25 21 32 34 0d 08 52 07 | 20 20 cb 0d 08 5c 05 cc |%!24..R.| ...\..|
|00001be0| 0d 08 66 1a e7 77 25 3d | 69 6e 70 75 74 25 80 69 |..f..w%=|input%.i|
|00001bf0| 25 3d 31 80 6b 25 3d 31 | 33 8c 0d 08 70 2f 69 6e |%=1.k%=1|3...p/in|
|00001c00| 70 75 74 24 3d a4 69 63 | 5f 73 74 72 28 77 25 2c |put$=.ic|_str(w%,|
|00001c10| 69 25 29 3a e7 69 6e 70 | 75 74 24 3d 22 22 8c 69 |i%):.inp|ut$="".i|
|00001c20| 6e 70 75 74 24 3d 22 20 | 22 0d 08 7a 05 cc 0d 08 |nput$=" |"..z....|
|00001c30| 84 1d c8 99 22 57 69 6d | 70 5f 50 72 6f 63 65 73 |...."Wim|p_Proces|
|00001c40| 73 4b 65 79 22 2c 71 25 | 21 32 34 0d 08 8e 05 cd |sKey",q%|!24.....|
|00001c50| 0d 08 98 05 cd 0d 08 a2 | 05 e1 0d 08 ac 04 0d 08 |........|........|
|00001c60| b6 11 dd f2 72 65 63 65 | 69 76 65 28 71 25 29 0d |....rece|ive(q%).|
|00001c70| 08 c0 1a ea 5a 25 2c 68 | 25 2c 69 25 2c 74 25 2c |....Z%,h|%,i%,t%,|
|00001c80| 66 24 2c 74 77 25 2c 61 | 25 0d 08 ca 0e c8 8e 20 |f$,tw%,a|%...... |
|00001c90| 71 25 21 31 36 20 ca 0d | 08 d4 11 c9 20 30 3a f2 |q%!16 ..|.... 0:.|
|00001ca0| 66 69 6e 69 73 68 3a e0 | 0d 08 de 33 c9 20 31 3a |finish:.|...3. 1:|
|00001cb0| 71 25 21 31 36 3d 32 3a | 71 25 21 33 36 3d 2d 31 |q%!16=2:|q%!36=-1|
|00001cc0| 3a 24 28 71 25 2b 34 34 | 29 3d 22 3c 57 69 6d 70 |:$(q%+44|)="<Wimp|
|00001cd0| 24 53 63 72 61 70 3e 22 | 2b bd 30 0d 08 e8 30 20 |$Scrap>"|+.0...0 |
|00001ce0| 20 71 25 21 31 32 3d 71 | 25 21 38 3a c8 99 22 57 | q%!12=q|%!8:.."W|
|00001cf0| 69 6d 70 5f 53 65 6e 64 | 4d 65 73 73 61 67 65 22 |imp_Send|Message"|
|00001d00| 2c 31 37 2c 71 25 2c 71 | 25 21 34 0d 08 f2 32 c9 |,17,q%,q|%!4...2.|
|00001d10| 20 33 3a 69 25 3d 71 25 | 21 32 34 3a 68 25 3d 71 | 3:i%=q%|!24:h%=q|
|00001d20| 25 21 32 30 3a 74 25 3d | 71 25 21 34 30 3a 66 24 |%!20:t%=|q%!40:f$|
|00001d30| 3d a4 72 74 6f 7a 28 71 | 25 2b 34 34 29 0d 08 fc |=.rtoz(q|%+44)...|
|00001d40| 2d 20 20 71 25 21 31 36 | 3d 34 3a c8 99 22 57 69 |- q%!16|=4:.."Wi|
|00001d50| 6d 70 5f 53 65 6e 64 4d | 65 73 73 61 67 65 22 2c |mp_SendM|essage",|
|00001d60| 31 37 2c 71 25 2c 71 25 | 21 34 0d 09 06 0b 20 20 |17,q%,q%|!4.... |
|00001d70| c8 8e 68 25 ca 0d 09 10 | 1b 20 20 20 20 c9 63 6f |..h%....|. .co|
|00001d80| 6e 66 69 67 25 3a e7 74 | 25 3d 26 46 46 46 20 8c |nfig%:.t|%=&FFF .|
|00001d90| 0d 09 1a 28 20 20 20 20 | 20 20 20 20 e7 69 25 3d |...( | .i%=|
|00001da0| 34 f2 75 70 64 5f 69 63 | 6f 6e 28 63 6f 6e 66 69 |4.upd_ic|on(confi|
|00001db0| 67 25 2c 34 2c 66 24 29 | 0d 09 24 0d 20 20 20 20 |g%,4,f$)|..$. |
|00001dc0| 20 20 20 20 cc 0d 09 2e | 1b 20 20 20 20 20 20 20 | ....|. |
|00001dd0| 20 f2 69 6e 69 74 73 63 | 72 69 70 74 28 66 24 29 | .initsc|ript(f$)|
|00001de0| 0d 09 38 0b 20 20 20 20 | 20 20 cd 0d 09 42 29 20 |..8. | ...B) |
|00001df0| 20 20 20 c9 73 74 61 74 | 75 73 25 3a e7 74 25 3d | .stat|us%:.t%=|
|00001e00| 26 46 46 46 20 f2 69 6e | 69 74 73 63 72 69 70 74 |&FFF .in|itscript|
|00001e10| 28 66 24 29 0d 09 4c 24 | 20 20 20 20 c9 2d 31 2c |(f$)..L$| .-1,|
|00001e20| 2d 32 3a e7 74 25 3d 26 | 46 46 46 20 80 69 25 3d |-2:.t%=&|FFF .i%=|
|00001e30| 69 63 6f 6e 30 25 20 8c | 0d 09 56 19 20 20 20 20 |icon0% .|..V. |
|00001e40| 20 20 f2 69 6e 69 74 73 | 63 72 69 70 74 28 66 24 | .inits|cript(f$|
|00001e50| 29 0d 09 60 0b 20 20 20 | 20 20 20 cc 0d 09 6a 41 |)..`. | ...jA|
|00001e60| 20 20 20 20 20 20 e3 5a | 25 3d 30 b8 69 6d 61 78 | .Z|%=0.imax|
|00001e70| 25 3a e7 69 25 3d 69 62 | 61 72 25 28 5a 25 29 80 |%:.i%=ib|ar%(Z%).|
|00001e80| 69 66 69 6c 65 24 28 5a | 25 29 3e 22 22 f2 69 66 |ifile$(Z|%)>"".if|
|00001e90| 69 6c 65 28 5a 25 2c 66 | 24 2c 74 25 29 0d 09 74 |ile(Z%,f|$,t%)..t|
|00001ea0| 0b 20 20 20 20 20 20 ed | 0d 09 7e 0b 20 20 20 20 |. .|..~. |
|00001eb0| 20 20 cd 0d 09 88 07 20 | 20 cb 0d 09 92 1c 20 20 | ..... | ..... |
|00001ec0| ff 22 72 65 6d 6f 76 65 | 20 3c 57 69 6d 70 24 53 |."remove| <Wimp$S|
|00001ed0| 63 72 61 70 3e 22 0d 09 | 9c 2c c9 20 31 31 3a e7 |crap>"..|.,. 11:.|
|00001ee0| 64 65 76 69 63 65 25 20 | 80 71 25 21 34 3c 3e 74 |device% |.q%!4<>t|
|00001ef0| 61 73 6b 25 20 f2 72 65 | 66 75 73 65 64 65 76 69 |ask% .re|fusedevi|
|00001f00| 63 65 0d 09 a6 17 c9 20 | 31 32 3a e7 71 25 21 34 |ce..... |12:.q%!4|
|00001f10| 3c 3e 74 61 73 6b 25 20 | 8c 0d 09 b0 33 20 20 f2 |<>task% |....3 .|
|00001f20| 70 72 69 6e 74 28 22 44 | 65 76 69 63 65 20 63 6c |print("D|evice cl|
|00001f30| 61 69 6d 20 66 61 69 6c | 65 64 22 2c a4 72 74 6f |aim fail|ed",.rto|
|00001f40| 7a 28 71 25 2b 32 38 29 | 2c 22 22 29 0d 09 ba 1f |z(q%+28)|,"")....|
|00001f50| 20 20 f2 66 72 6f 6e 74 | 28 73 74 61 74 75 73 25 | .front|(status%|
|00001f60| 29 3a 64 65 76 69 63 65 | 25 3d a3 0d 09 c4 07 20 |):device|%=..... |
|00001f70| 20 cd 0d 09 ce 24 c9 20 | 26 35 30 32 3a 41 24 3d | ....$. |&502:A$=|
|00001f80| a4 73 65 6e 64 68 65 6c | 70 28 71 25 21 33 32 2c |.sendhel|p(q%!32,|
|00001f90| 71 25 21 33 36 29 0d 09 | d8 64 20 20 e7 41 24 3e |q%!36)..|.d .A$>|
|00001fa0| 22 22 8c 71 25 21 31 36 | 3d 26 35 30 33 3a 71 25 |"".q%!16|=&503:q%|
|00001fb0| 21 31 32 3d 71 25 21 38 | 3a 24 28 71 25 2b 32 30 |!12=q%!8|:$(q%+20|
|00001fc0| 29 3d 41 24 3a 71 25 3f | 28 32 30 2b a9 41 24 29 |)=A$:q%?|(20+.A$)|
|00001fd0| 3d 30 3a 21 71 25 3d 32 | 35 36 3a c8 99 22 57 69 |=0:!q%=2|56:.."Wi|
|00001fe0| 6d 70 5f 53 65 6e 64 4d | 65 73 73 61 67 65 22 2c |mp_SendM|essage",|
|00001ff0| 31 37 2c 71 25 2c 71 25 | 21 34 0d 09 e2 1e c9 20 |17,q%,q%|!4..... |
|00002000| 26 34 30 30 43 32 3a e7 | 20 74 61 73 6b 73 74 61 |&400C2:.| tasksta|
|00002010| 72 74 25 3c 3e 30 20 8c | 0d 09 ec 5e 20 20 e7 74 |rt%<>0 .|...^ .t|
|00002020| 61 73 6b 68 25 28 74 61 | 73 6b 73 74 61 72 74 25 |askh%(ta|skstart%|
|00002030| 29 3d 30 20 8c 74 61 73 | 6b 68 25 28 74 61 73 6b |)=0 .tas|kh%(task|
|00002040| 73 74 61 72 74 25 29 3d | 71 25 21 34 3a f2 6c 6f |start%)=|q%!4:.lo|
|00002050| 67 28 22 54 61 73 6b 20 | 73 74 61 72 74 65 64 3a |g("Task |started:|
|00002060| 20 22 2b 74 61 73 6b 6e | 24 28 74 61 73 6b 73 74 | "+taskn|$(taskst|
|00002070| 61 72 74 25 29 29 0d 09 | f6 12 20 20 74 61 73 6b |art%))..|.. task|
|00002080| 73 74 61 72 74 25 3d 30 | 0d 0a 00 07 20 20 cd 0d |start%=0|.... ..|
|00002090| 0a 0a 1c c9 20 26 34 30 | 30 43 33 3a f4 20 54 61 |.... &40|0C3:. Ta|
|000020a0| 73 6b 43 6c 6f 73 65 64 | 6f 77 6e 0d 0a 14 14 20 |skClosed|own.... |
|000020b0| 20 e3 6c 25 3d 30 b8 74 | 61 73 6b 6d 61 78 25 0d | .l%=0.t|askmax%.|
|000020c0| 0a 1e 4e 20 20 20 20 e7 | 74 61 73 6b 68 25 28 6c |..N .|taskh%(l|
|000020d0| 25 29 3d 71 25 21 34 20 | 8c 74 61 73 6b 68 25 28 |%)=q%!4 |.taskh%(|
|000020e0| 6c 25 29 3d 30 3a e7 74 | 61 73 6b 65 78 24 28 6c |l%)=0:.t|askex$(l|
|000020f0| 25 29 3e 22 22 f2 61 64 | 64 65 76 65 6e 74 28 74 |%)>"".ad|devent(t|
|00002100| 61 73 6b 65 78 24 28 6c | 25 29 2c 33 29 0d 0a 28 |askex$(l|%),3)..(|
|00002110| 12 20 20 ed 3a f2 73 6f | 72 74 74 61 73 6b 73 0d |. .:.so|rttasks.|
|00002120| 0a 32 20 c9 20 26 38 30 | 38 43 31 3a f4 20 54 61 |.2 . &80|8C1:. Ta|
|00002130| 73 6b 57 69 6e 64 6f 77 | 5f 4f 75 74 70 75 74 0d |skWindow|_Output.|
|00002140| 0a 3c 40 20 20 74 77 25 | 3d 30 3a 74 77 6c 65 6e |.<@ tw%|=0:twlen|
|00002150| 25 3d 71 25 21 32 30 2d | 31 3a c8 95 74 77 68 25 |%=q%!20-|1:..twh%|
|00002160| 28 74 77 25 29 3c 3e 71 | 25 21 34 80 74 77 25 3c |(tw%)<>q|%!4.tw%<|
|00002170| 74 77 6d 61 78 25 3a 74 | 77 25 2b 3d 31 3a ce 0d |twmax%:t|w%+=1:..|
|00002180| 0a 46 14 20 20 e7 74 77 | 66 25 28 74 77 25 29 3d |.F. .tw|f%(tw%)=|
|00002190| 30 20 8c 0d 0a 50 45 20 | 20 20 20 e3 5a 25 3d 30 |0 ...PE | .Z%=0|
|000021a0| b8 74 77 6c 65 6e 25 88 | 34 3a 74 6d 70 25 21 5a |.twlen%.|4:tmp%!Z|
|000021b0| 25 3d 71 25 21 28 32 34 | 2b 5a 25 29 3a ed 3a f2 |%=q%!(24|+Z%):.:.|
|000021c0| 74 77 5f 64 61 74 61 28 | 74 77 25 2c 74 6d 70 25 |tw_data(|tw%,tmp%|
|000021d0| 2c 74 77 6c 65 6e 25 29 | 0d 0a 5a 09 20 20 20 20 |,twlen%)|..Z. |
|000021e0| cc 0d 0a 64 2d 20 20 20 | 20 e3 5a 25 3d 30 b8 74 |...d- | .Z%=0.t|
|000021f0| 77 6c 65 6e 25 3a d5 23 | 74 77 66 25 28 74 77 25 |wlen%:.#|twf%(tw%|
|00002200| 29 2c 71 25 21 28 32 34 | 2b 5a 25 29 3a ed 0d 0a |),q%!(24|+Z%):...|
|00002210| 6e 07 20 20 cd 0d 0a 78 | 1d c9 20 26 38 30 38 43 |n. ...x|.. &808C|
|00002220| 32 3a f4 20 54 61 73 6b | 57 69 6e 64 6f 77 5f 45 |2:. Task|Window_E|
|00002230| 67 6f 0d 0a 82 6c 20 20 | e7 71 25 21 32 30 3e 3d |go...l |.q%!20>=|
|00002240| 74 61 73 6b 25 80 71 25 | 21 32 30 3c 3d 28 74 61 |task%.q%|!20<=(ta|
|00002250| 73 6b 25 2b 74 77 6d 61 | 78 25 29 8c 74 77 68 25 |sk%+twma|x%).twh%|
|00002260| 28 71 25 21 32 30 2d 74 | 61 73 6b 25 29 3d 71 25 |(q%!20-t|ask%)=q%|
|00002270| 21 34 3a f2 6c 6f 67 28 | 22 54 61 73 6b 20 73 74 |!4:.log(|"Task st|
|00002280| 61 72 74 65 64 3a 20 22 | 2b 74 77 6e 61 6d 65 24 |arted: "|+twname$|
|00002290| 28 71 25 21 32 30 2d 74 | 61 73 6b 25 29 29 0d 0a |(q%!20-t|ask%))..|
|000022a0| 8c 2e c9 20 26 38 30 38 | 43 33 3a f4 20 54 61 73 |... &808|C3:. Tas|
|000022b0| 6b 57 69 6e 64 6f 77 5f | 4d 6f 72 69 6f 2c 20 74 |kWindow_|Morio, t|
|000022c0| 61 73 6b 20 66 69 6e 69 | 73 68 65 64 0d 0a 96 31 |ask fini|shed...1|
|000022d0| 20 20 74 77 25 3d 30 3a | c8 95 71 25 21 34 3c 3e | tw%=0:|..q%!4<>|
|000022e0| 74 77 68 25 28 74 77 25 | 29 80 74 77 25 3c 74 77 |twh%(tw%|).tw%<tw|
|000022f0| 6d 61 78 25 3a 74 77 25 | 2b 3d 31 3a ce 0d 0a a0 |max%:tw%|+=1:....|
|00002300| 16 20 20 e7 71 25 21 34 | 3d 74 77 68 25 28 74 77 |. .q%!4|=twh%(tw|
|00002310| 25 29 8c 0d 0a aa 2c 20 | 20 20 20 f2 6c 6f 67 28 |%)...., | .log(|
|00002320| 22 54 61 73 6b 20 66 69 | 6e 69 73 68 65 64 3a 20 |"Task fi|nished: |
|00002330| 22 2b 74 77 6e 61 6d 65 | 24 28 74 77 25 29 29 0d |"+twname|$(tw%)).|
|00002340| 0a b4 16 20 20 20 20 e7 | 74 77 6b 25 28 74 77 25 |... .|twk%(tw%|
|00002350| 29 3d 30 20 8c 0d 0a be | 28 20 20 20 20 20 20 74 |)=0 ....|( t|
|00002360| 77 68 25 28 74 77 25 29 | 3d 30 3a f2 63 6c 6f 73 |wh%(tw%)|=0:.clos|
|00002370| 65 77 28 74 77 77 25 28 | 74 77 25 29 29 0d 0a c8 |ew(tww%(|tw%))...|
|00002380| 0b 20 20 20 20 20 20 cc | 0d 0a d2 50 20 20 20 20 |. .|...P |
|00002390| 20 20 74 77 68 25 28 74 | 77 25 29 3d 2d 31 3a 24 | twh%(t|w%)=-1:$|
|000023a0| 74 77 74 25 28 74 77 25 | 29 3d 74 77 6e 61 6d 65 |twt%(tw%|)=twname|
|000023b0| 24 28 74 77 25 29 2b 22 | 20 28 46 69 6e 69 73 68 |$(tw%)+"| (Finish|
|000023c0| 65 64 29 22 3a f2 64 6f | 74 69 74 6c 65 28 74 77 |ed)":.do|title(tw|
|000023d0| 77 25 28 74 77 25 29 29 | 0d 0a dc 09 20 20 20 20 |w%(tw%))|.... |
|000023e0| cd 0d 0a e6 32 20 20 20 | 20 74 77 6e 61 6d 65 24 |....2 | twname$|
|000023f0| 28 74 77 25 29 3d 22 22 | 3a f2 63 66 28 74 77 66 |(tw%)=""|:.cf(twf|
|00002400| 25 28 74 77 25 29 29 3a | 74 77 66 25 28 74 77 25 |%(tw%)):|twf%(tw%|
|00002410| 29 3d 30 0d 0a f0 31 20 | 20 20 20 e7 74 77 65 78 |)=0...1 | .twex|
|00002420| 69 74 24 28 74 77 25 29 | 3e 22 22 f2 61 64 64 65 |it$(tw%)|>"".adde|
|00002430| 76 65 6e 74 28 74 77 65 | 78 69 74 24 28 74 77 25 |vent(twe|xit$(tw%|
|00002440| 29 2c 34 29 0d 0a fa 07 | 20 20 cd 0d 0b 04 05 cb |),4)....| ......|
|00002450| 0d 0b 0e 05 e1 0d 0b 18 | 04 0d 0b 22 15 dd a4 73 |........|..."...s|
|00002460| 65 6e 64 68 65 6c 70 28 | 77 25 2c 69 25 29 0d 0b |endhelp(|w%,i%)..|
|00002470| 2c 29 ea 41 24 2c 6c 25 | 3a 41 24 3d 22 54 68 69 |,).A$,l%|:A$="Thi|
|00002480| 73 20 69 73 20 53 6c 69 | 70 64 69 61 6c 2e 7c 4d |s is Sli|pdial.|M|
|00002490| 22 3a c8 8e 77 25 ca 0d | 0b 36 9a 20 20 c9 74 78 |":..w%..|.6. .tx|
|000024a0| 74 25 3a 41 24 3d 22 54 | 68 69 73 20 69 73 20 74 |t%:A$="T|his is t|
|000024b0| 68 65 20 53 6c 69 70 64 | 69 61 6c 20 63 6f 6e 74 |he Slipd|ial cont|
|000024c0| 72 6f 6c 20 77 69 6e 64 | 6f 77 2e 7c 4d 49 74 20 |rol wind|ow.|MIt |
|000024d0| 64 69 73 70 6c 61 79 73 | 20 69 6e 66 6f 72 6d 61 |displays| informa|
|000024e0| 74 69 6f 6e 20 61 62 6f | 75 74 20 61 6e 64 20 66 |tion abo|ut and f|
|000024f0| 72 6f 6d 20 74 68 65 20 | 72 75 6e 6e 69 6e 67 20 |rom the |running |
|00002500| 73 63 72 69 70 74 2c 20 | 61 6e 64 20 61 6c 6c 6f |script, |and allo|
|00002510| 77 73 20 79 6f 75 20 74 | 6f 20 65 6e 74 65 72 20 |ws you t|o enter |
|00002520| 73 63 72 69 70 74 20 63 | 6f 6d 6d 61 6e 64 73 2e |script c|ommands.|
|00002530| 22 0d 0b 40 3f 20 20 c9 | 73 74 61 74 75 73 25 3a |"..@? .|status%:|
|00002540| 41 24 3d 22 54 68 69 73 | 20 69 73 20 74 68 65 20 |A$="This| is the |
|00002550| 53 6c 69 70 64 69 61 6c | 20 73 74 61 74 75 73 20 |Slipdial| status |
|00002560| 77 69 6e 64 6f 77 2e 7c | 4d 22 3a c8 8e 69 25 ca |window.||M":..i%.|
|00002570| 0d 0b 4a 3f 20 20 20 20 | c9 36 2c 39 3a 41 24 2b |..J? |.6,9:A$+|
|00002580| 3d 22 43 6c 69 63 6b 20 | 68 65 72 65 20 74 6f 20 |="Click |here to |
|00002590| 6f 62 74 61 69 6e 20 61 | 6e 79 20 75 73 65 72 2d |obtain a|ny user-|
|000025a0| 64 65 66 69 6e 65 64 20 | 6d 65 6e 75 73 2e 22 0d |defined |menus.".|
|000025b0| 0b 54 36 20 20 20 20 c9 | 31 3a 41 24 2b 3d 22 54 |.T6 .|1:A$+="T|
|000025c0| 68 69 73 20 73 68 6f 77 | 73 20 74 68 65 20 63 75 |his show|s the cu|
|000025d0| 72 72 65 6e 74 20 73 63 | 72 69 70 74 20 61 63 74 |rrent sc|ript act|
|000025e0| 69 6f 6e 2e 22 0d 0b 5e | 36 20 20 20 20 c9 32 3a |ion."..^|6 .2:|
|000025f0| 41 24 2b 3d 22 54 68 69 | 73 20 73 68 6f 77 73 20 |A$+="Thi|s shows |
|00002600| 74 68 65 20 63 75 72 72 | 65 6e 74 20 73 63 72 69 |the curr|ent scri|
|00002610| 70 74 20 73 74 61 74 75 | 73 2e 22 0d 0b 68 3a 20 |pt statu|s."..h: |
|00002620| 20 20 20 c9 31 31 3a 41 | 24 2b 3d 22 54 68 69 73 | .11:A|$+="This|
|00002630| 20 64 69 73 70 6c 61 79 | 73 20 65 6c 61 70 73 65 | display|s elapse|
|00002640| 64 20 74 69 6d 65 20 73 | 70 65 6e 74 20 6f 6e 6c |d time s|pent onl|
|00002650| 69 6e 65 2e 22 0d 0b 72 | 2f 20 20 20 20 c9 33 3a |ine."..r|/ .3:|
|00002660| 41 24 2b 3d 22 54 68 69 | 73 20 64 69 73 70 6c 61 |A$+="Thi|s displa|
|00002670| 79 73 20 79 6f 75 72 20 | 49 50 20 61 64 64 72 65 |ys your |IP addre|
|00002680| 73 73 2e 22 0d 0b 7c 6b | 20 20 20 20 c9 31 35 3a |ss."..|k| .15:|
|00002690| 41 24 2b 3d 22 54 68 69 | 73 20 73 68 6f 77 73 20 |A$+="Thi|s shows |
|000026a0| 79 6f 75 72 20 6d 6f 64 | 65 6d 20 73 74 61 74 75 |your mod|em statu|
|000026b0| 73 20 4c 45 44 73 20 28 | 66 72 6f 6d 20 6c 65 66 |s LEDs (|from lef|
|000026c0| 74 20 74 6f 20 72 69 67 | 68 74 29 3a 20 44 54 52 |t to rig|ht): DTR|
|000026d0| 2c 20 43 54 53 20 61 6e | 64 20 43 44 20 28 63 61 |, CTS an|d CD (ca|
|000026e0| 72 72 69 65 72 20 64 65 | 74 65 63 74 29 2e 22 0d |rrier de|tect).".|
|000026f0| 0b 86 40 20 20 20 20 c9 | 35 3a 41 24 2b 3d 22 43 |..@ .|5:A$+="C|
|00002700| 6c 69 63 6b 20 68 65 72 | 65 20 74 6f 20 70 61 75 |lick her|e to pau|
|00002710| 73 65 20 6f 72 20 72 65 | 73 75 6d 65 20 73 63 72 |se or re|sume scr|
|00002720| 69 70 74 20 65 78 65 63 | 75 74 69 6f 6e 2e 22 0d |ipt exec|ution.".|
|00002730| 0b 90 35 20 20 20 20 c9 | 34 3a 41 24 2b 3d 22 43 |..5 .|4:A$+="C|
|00002740| 6c 69 63 6b 20 68 65 72 | 65 20 74 6f 20 73 74 6f |lick her|e to sto|
|00002750| 70 20 73 63 72 69 70 74 | 20 65 78 65 63 75 74 69 |p script| executi|
|00002760| 6f 6e 2e 22 0d 0b 9a 07 | 20 20 cb 0d 0b a4 70 20 |on."....| ....p |
|00002770| 20 c9 6d 65 73 73 25 3a | 41 24 3d 22 54 68 69 73 | .mess%:|A$="This|
|00002780| 20 69 73 20 61 20 6d 65 | 73 73 61 67 65 20 66 72 | is a me|ssage fr|
|00002790| 6f 6d 20 73 6c 69 70 64 | 69 61 6c 2e 22 3a e7 70 |om slipd|ial.":.p|
|000027a0| 61 75 73 65 25 8c 41 24 | 2b 3d 22 7c 4d 43 6c 6f |ause%.A$|+="|MClo|
|000027b0| 73 65 20 74 68 69 73 20 | 77 69 6e 64 6f 77 20 74 |se this |window t|
|000027c0| 6f 20 72 65 73 75 6d 65 | 20 73 63 72 69 70 74 20 |o resume| script |
|000027d0| 65 78 65 63 75 74 69 6f | 6e 2e 22 0d 0b ae 39 20 |executio|n."...9 |
|000027e0| 20 c9 69 6e 70 75 74 25 | 3a 41 24 2b 3d 22 45 6e | .input%|:A$+="En|
|000027f0| 74 65 72 20 79 6f 75 72 | 20 72 65 73 70 6f 6e 73 |ter your| respons|
|00002800| 65 20 61 6e 64 20 70 72 | 65 73 73 20 72 65 74 75 |e and pr|ess retu|
|00002810| 72 6e 2e 22 0d 0b b8 33 | 20 20 c9 79 65 73 6e 6f |rn."...3| .yesno|
|00002820| 25 3a 41 24 2b 3d 22 43 | 6c 69 63 6b 20 6f 6e 20 |%:A$+="C|lick on |
|00002830| 59 65 73 20 6f 72 20 4e | 6f 20 74 6f 20 63 6f 6e |Yes or N|o to con|
|00002840| 74 69 6e 75 65 2e 22 0d | 0b c2 47 20 20 c9 69 6e |tinue.".|..G .in|
|00002850| 66 6f 25 3a 41 24 2b 3d | 22 54 68 69 73 20 73 68 |fo%:A$+=|"This sh|
|00002860| 6f 77 73 20 74 68 65 20 | 76 65 72 73 69 6f 6e 20 |ows the |version |
|00002870| 6e 75 6d 62 65 72 20 61 | 6e 64 20 6f 74 68 65 72 |number a|nd other|
|00002880| 20 69 6e 66 6f 72 6d 61 | 74 69 6f 6e 2e 22 0d 0b | informa|tion."..|
|00002890| cc 42 20 20 c9 63 6f 6e | 66 69 67 25 3a 41 24 2b |.B .con|fig%:A$+|
|000028a0| 3d 22 55 73 65 20 74 68 | 69 73 20 77 69 6e 64 6f |="Use th|is windo|
|000028b0| 77 20 74 6f 20 73 65 74 | 20 79 6f 75 72 20 73 74 |w to set| your st|
|000028c0| 61 72 74 75 70 20 64 65 | 66 61 75 6c 74 73 2e 22 |artup de|faults."|
|000028d0| 0d 0b d6 55 20 20 7f 3a | e3 6c 25 3d 30 b8 74 77 |...U .:|.l%=0.tw|
|000028e0| 6d 61 78 25 3a e7 77 25 | 3d 74 77 77 25 28 6c 25 |max%:.w%|=tww%(l%|
|000028f0| 29 8c 41 24 2b 3d 22 54 | 68 69 73 20 69 73 20 74 |).A$+="T|his is t|
|00002900| 68 65 20 6f 75 74 70 75 | 74 20 66 72 6f 6d 20 74 |he outpu|t from t|
|00002910| 68 65 20 74 61 73 6b 20 | 22 2b 74 77 6e 61 6d 65 |he task |"+twname|
|00002920| 24 28 6c 25 29 0d 0b e0 | 09 20 20 20 20 ed 0d 0b |$(l%)...|. ...|
|00002930| ea 05 cb 0d 0b f4 07 3d | 41 24 0d 0b fe 04 0d 0c |.......=|A$......|
|00002940| 08 0c dd f2 66 69 6e 69 | 73 68 0d 0c 12 10 e7 64 |....fini|sh.....d|
|00002950| 65 76 69 63 65 25 3c 3e | 30 8c 0d 0c 1c 18 20 20 |evice%<>|0..... |
|00002960| 4a 25 3d a4 64 28 38 2c | 70 6f 72 74 25 2c 30 2c |J%=.d(8,|port%,0,|
|00002970| 30 29 0d 0c 26 19 20 20 | 4a 25 3d a4 64 28 31 38 |0)..&. |J%=.d(18|
|00002980| 2c 70 6f 72 74 25 2c 30 | 2c 30 29 0d 0c 30 05 cd |,port%,0|,0)..0..|
|00002990| 0d 0c 3a 10 f2 6f 70 65 | 6e 6c 6f 67 28 22 22 29 |..:..ope|nlog("")|
|000029a0| 0d 0c 44 17 f2 63 66 28 | 66 68 31 25 29 3a f2 63 |..D..cf(|fh1%):.c|
|000029b0| 66 28 66 68 32 25 29 0d | 0c 4e 20 e3 4c 25 3d 30 |f(fh2%).|.N .L%=0|
|000029c0| b8 74 77 6d 61 78 25 3a | f2 63 66 28 74 77 66 25 |.twmax%:|.cf(twf%|
|000029d0| 28 4c 25 29 29 3a ed 0d | 0c 58 21 e3 4c 25 3d 30 |(L%)):..|.X!.L%=0|
|000029e0| b8 66 6d 61 78 25 3a f2 | 63 66 28 66 69 6c 65 68 |.fmax%:.|cf(fileh|
|000029f0| 25 28 4c 25 29 29 3a ed | 0d 0c 62 05 e1 0d 0c 6c |%(L%)):.|..b....l|
|00002a00| 04 0d 0c 76 0e dd f2 63 | 66 28 f8 20 43 25 29 0d |...v...c|f(. C%).|
|00002a10| 0c 80 14 e7 43 25 3c 3e | 30 20 d9 23 43 25 3a 43 |....C%<>|0 .#C%:C|
|00002a20| 25 3d 30 0d 0c 8a 05 e1 | 0d 0c 94 04 0d 0c 9e 11 |%=0.....|........|
|00002a30| dd 20 f2 67 65 74 70 6f | 69 6e 74 65 72 0d 0c a8 |. .getpo|inter...|
|00002a40| 25 c8 99 20 22 57 69 6d | 70 5f 47 65 74 50 6f 69 |%.. "Wim|p_GetPoi|
|00002a50| 6e 74 65 72 49 6e 66 6f | 22 2c 2c 62 75 66 66 65 |nterInfo|",,buffe|
|00002a60| 72 25 0d 0c b2 5e 6d 78 | 25 3d 21 62 75 66 66 65 |r%...^mx|%=!buffe|
|00002a70| 72 25 3a 6d 79 25 3d 62 | 75 66 66 65 72 25 21 34 |r%:my%=b|uffer%!4|
|00002a80| 3a 62 25 3d 62 75 66 66 | 65 72 25 21 38 3a 68 61 |:b%=buff|er%!8:ha|
|00002a90| 6e 64 6c 65 25 3d 62 75 | 66 66 65 72 25 21 31 32 |ndle%=bu|ffer%!12|
|00002aa0| 3a 69 63 6f 6e 25 3d 62 | 75 66 66 65 72 25 21 31 |:icon%=b|uffer%!1|
|00002ab0| 36 3a 6f 62 25 3d 62 75 | 66 66 65 72 25 21 32 30 |6:ob%=bu|ffer%!20|
|00002ac0| 0d 0c bc 05 e1 0d 0c c6 | 04 0d 0c d0 1d dd f2 63 |........|.......c|
|00002ad0| 6c 69 63 6b 28 6d 78 25 | 2c 6d 79 25 2c 62 25 2c |lick(mx%|,my%,b%,|
|00002ae0| 77 25 2c 69 25 29 0d 0c | da 0a c8 8e 62 25 20 ca |w%,i%)..|....b% .|
|00002af0| 0d 0c e4 07 c9 20 32 0d | 0c ee 0c 20 20 c8 8e 77 |..... 2.|... ..w|
|00002b00| 25 20 ca 0d 0c f8 18 20 | 20 20 20 c9 20 2d 32 3a |% ..... | . -2:|
|00002b10| e7 69 25 3d 69 63 6f 6e | 30 25 8c 0d 0d 02 17 20 |.i%=icon|0%..... |
|00002b20| 20 20 20 20 20 20 20 f2 | 64 65 66 6d 65 6e 75 28 | .|defmenu(|
|00002b30| b9 29 0d 0d 0c 0b 20 20 | 20 20 20 20 cc 0d 0d 16 |.).... | ....|
|00002b40| 64 20 20 20 20 20 20 20 | 20 e3 5a 25 3d 30 b8 69 |d | .Z%=0.i|
|00002b50| 6d 61 78 25 3a e7 69 25 | 3d 69 62 61 72 25 28 5a |max%:.i%|=ibar%(Z|
|00002b60| 25 29 80 69 6d 65 6e 75 | 24 28 5a 25 29 3e 22 22 |%).imenu|$(Z%)>""|
|00002b70| 20 f2 64 6f 6d 65 6e 75 | 28 31 30 32 2c a4 6d 61 | .domenu|(102,.ma|
|00002b80| 6b 65 6d 65 6e 75 28 69 | 6d 65 6e 75 24 28 5a 25 |kemenu(i|menu$(Z%|
|00002b90| 29 29 2c 69 62 61 72 69 | 64 24 28 5a 25 29 2c b9 |)),ibari|d$(Z%),.|
|00002ba0| 29 0d 0d 20 0d 20 20 20 | 20 20 20 20 20 ed 0d 0d |).. . | ...|
|00002bb0| 2a 0b 20 20 20 20 20 20 | cd 0d 0d 34 31 20 20 20 |*. |...41 |
|00002bc0| 20 c9 20 74 78 74 25 3a | c8 99 22 4f 53 5f 42 79 | . txt%:|.."OS_By|
|00002bd0| 74 65 22 2c 31 32 31 2c | 28 31 82 26 38 30 29 b8 |te",121,|(1.&80).|
|00002be0| 2c 41 25 3a e7 41 25 3d | 30 8c 0d 0d 3e 5e 20 20 |,A%:.A%=|0...>^ |
|00002bf0| 20 20 20 20 f2 64 6f 6d | 65 6e 75 28 31 30 31 2c | .dom|enu(101,|
|00002c00| 22 41 6c 61 72 6d 20 6c | 69 73 74 2c 4d 65 6e 75 |"Alarm l|ist,Menu|
|00002c10| 20 6c 69 73 74 2c 56 61 | 72 20 6c 69 73 74 2c 54 | list,Va|r list,T|
|00002c20| 61 73 6b 20 6c 69 73 74 | 2c 7c 53 63 72 69 70 74 |ask list|,|Script|
|00002c30| 20 6c 69 73 74 2c 51 75 | 69 74 22 2c 22 43 6f 6e | list,Qu|it","Con|
|00002c40| 74 72 6f 6c 22 2c 30 29 | 0d 0d 48 0b 20 20 20 20 |trol",0)|..H. |
|00002c50| 20 20 cc 0d 0d 52 46 20 | 20 20 20 20 20 f2 64 6f | ...RF | .do|
|00002c60| 6d 65 6e 75 28 31 30 31 | 2c 22 44 62 67 4c 65 76 |menu(101|,"DbgLev|
|00002c70| 20 30 2c 44 62 67 4c 65 | 76 20 31 2c 44 62 67 4c | 0,DbgLe|v 1,DbgL|
|00002c80| 65 76 20 32 2c 44 62 67 | 4c 65 76 20 33 22 2c 22 |ev 2,Dbg|Lev 3","|
|00002c90| 44 65 62 75 67 22 2c 30 | 29 0d 0d 5c 0b 20 20 20 |Debug",0|)..\. |
|00002ca0| 20 20 20 cd 0d 0d 66 11 | 20 20 20 20 c9 20 73 74 | ...f.| . st|
|00002cb0| 61 74 75 73 25 0d 0d 70 | 10 20 20 20 20 20 20 c8 |atus%..p|. .|
|00002cc0| 8e 69 25 20 ca 0d 0d 7a | 4e 20 20 20 20 20 20 20 |.i% ...z|N |
|00002cd0| 20 c9 36 2c 39 3a e7 75 | 73 65 72 6d 65 6e 75 24 | .6,9:.u|sermenu$|
|00002ce0| 3e 22 22 20 f2 64 6f 6d | 65 6e 75 28 31 30 32 2c |>"" .dom|enu(102,|
|00002cf0| a4 6d 61 6b 65 6d 65 6e | 75 28 75 73 65 72 6d 65 |.makemen|u(userme|
|00002d00| 6e 75 24 29 2c 22 55 73 | 65 72 20 6d 65 6e 75 22 |nu$),"Us|er menu"|
|00002d10| 2c a3 29 0d 0d 84 19 20 | 20 20 20 20 20 20 20 7f |,.).... | .|
|00002d20| 3a f2 64 65 66 6d 65 6e | 75 28 30 29 0d 0d 8e 0b |:.defmen|u(0)....|
|00002d30| 20 20 20 20 20 20 cb 0d | 0d 98 15 20 20 20 20 7f | ..|... .|
|00002d40| 3a f2 64 65 66 6d 65 6e | 75 28 30 29 0d 0d a2 07 |:.defmen|u(0)....|
|00002d50| 20 20 cb 0d 0d ac 08 c9 | 31 2c 34 0d 0d b6 0d 20 | ......|1,4.... |
|00002d60| 20 c8 8e 20 77 25 20 ca | 0d 0d c0 11 20 20 20 20 | .. w% .|.... |
|00002d70| c9 20 73 74 61 74 75 73 | 25 0d 0d ca 10 20 20 20 |. status|%.... |
|00002d80| 20 20 20 c8 8e 69 25 20 | ca 0d 0d d4 0e 20 20 20 | ..i% |..... |
|00002d90| 20 20 20 20 20 c9 35 0d | 0d de 16 20 20 20 20 20 | .5.|... |
|00002da0| 20 20 20 e7 ac 70 61 75 | 73 65 25 20 8c 0d 0d e8 | ..pau|se% ....|
|00002db0| 4c 20 20 20 20 20 20 20 | 20 20 20 70 61 75 73 65 |L | pause|
|00002dc0| 25 3d b9 3a f2 70 72 69 | 6e 74 28 22 22 2c 22 50 |%=.:.pri|nt("","P|
|00002dd0| 61 75 73 65 20 70 65 6e | 64 69 6e 67 2e 2e 2e 22 |ause pen|ding..."|
|00002de0| 2c 22 22 29 3a f2 61 64 | 64 65 76 65 6e 74 28 22 |,""):.ad|devent("|
|00002df0| 70 61 75 73 65 22 2c 30 | 29 0d 0d f2 0f 20 20 20 |pause",0|).... |
|00002e00| 20 20 20 20 20 20 20 cc | 0d 0d fc 16 20 20 20 20 | .|.... |
|00002e10| 20 20 20 20 20 20 f2 75 | 6e 70 61 75 73 65 0d 0e | .u|npause..|
|00002e20| 06 0d 20 20 20 20 20 20 | 20 20 cd 0d 0e 10 0e 20 |.. | ..... |
|00002e30| 20 20 20 20 20 20 20 c9 | 34 0d 0e 1a 3b 20 20 20 | .|4...; |
|00002e40| 20 20 20 20 20 20 20 73 | 74 6f 70 25 3d b9 3a f2 | s|top%=.:.|
|00002e50| 70 72 69 6e 74 28 22 22 | 2c 22 53 74 6f 70 20 70 |print(""|,"Stop p|
|00002e60| 65 6e 64 69 6e 67 2e 2e | 2e 22 2c 22 22 29 3a f2 |ending..|.",""):.|
|00002e70| 73 74 6f 70 0d 0e 24 4c | 20 20 20 20 20 20 20 20 |stop..$L| |
|00002e80| c9 36 3a e7 75 73 65 72 | 6d 65 6e 75 24 3e 22 22 |.6:.user|menu$>""|
|00002e90| 20 f2 64 6f 6d 65 6e 75 | 28 31 30 32 2c a4 6d 61 | .domenu|(102,.ma|
|00002ea0| 6b 65 6d 65 6e 75 28 75 | 73 65 72 6d 65 6e 75 24 |kemenu(u|sermenu$|
|00002eb0| 29 2c 22 55 73 65 72 20 | 6d 65 6e 75 22 2c a3 29 |),"User |menu",.)|
|00002ec0| 0d 0e 2e 0b 20 20 20 20 | 20 20 cb 0d 0e 38 11 20 |.... | ...8. |
|00002ed0| 20 20 20 c9 20 63 6f 6e | 66 69 67 25 0d 0e 42 2d | . con|fig%..B-|
|00002ee0| 20 20 20 20 20 20 e7 20 | 69 25 3d 36 20 f2 73 61 | . |i%=6 .sa|
|00002ef0| 76 65 63 6f 6e 66 69 67 | 3a f2 63 6c 6f 73 65 77 |veconfig|:.closew|
|00002f00| 28 63 6f 6e 66 69 67 25 | 29 0d 0e 4c 10 20 20 20 |(config%|)..L. |
|00002f10| 20 c9 20 79 65 73 6e 6f | 25 0d 0e 56 1b 20 20 20 | . yesno|%..V. |
|00002f20| 20 20 20 e7 69 25 3d 30 | 3a 79 65 73 6e 6f 61 6e | .i%=0|:yesnoan|
|00002f30| 73 25 3d 32 0d 0e 60 1b | 20 20 20 20 20 20 e7 69 |s%=2..`.| .i|
|00002f40| 25 3d 31 3a 79 65 73 6e | 6f 61 6e 73 25 3d 31 0d |%=1:yesn|oans%=1.|
|00002f50| 0e 6a 0f 20 20 20 20 c9 | 20 74 78 74 25 3a 0d 0e |.j. .| txt%:..|
|00002f60| 74 44 20 20 20 20 20 20 | c8 99 22 57 69 6d 70 5f |tD |.."Wimp_|
|00002f70| 53 65 74 43 61 72 65 74 | 50 6f 73 69 74 69 6f 6e |SetCaret|Position|
|00002f80| 22 2c 77 25 2c 69 6e 69 | 63 25 2c 2c 2c 2d 31 2c |",w%,ini|c%,,,-1,|
|00002f90| a9 a4 69 63 5f 73 74 72 | 28 77 25 2c 69 6e 69 63 |..ic_str|(w%,inic|
|00002fa0| 25 29 0d 0e 7e 0d 20 20 | 20 20 c9 20 2d 32 3a 0d |%)..~. | . -2:.|
|00002fb0| 0e 88 15 20 20 20 20 20 | 20 e7 69 25 3d 69 63 6f |... | .i%=ico|
|00002fc0| 6e 30 25 8c 0d 0e 92 2d | 20 20 20 20 20 20 20 20 |n0%....-| |
|00002fd0| e7 62 25 3d 34 f2 66 72 | 6f 6e 74 28 73 74 61 74 |.b%=4.fr|ont(stat|
|00002fe0| 75 73 25 29 8b f2 66 72 | 6f 6e 74 28 74 78 74 25 |us%)..fr|ont(txt%|
|00002ff0| 29 0d 0e 9c 0b 20 20 20 | 20 20 20 cc 0d 0e a6 48 |).... | ....H|
|00003000| 20 20 20 20 20 20 20 20 | e3 5a 25 3d 30 b8 69 6d | |.Z%=0.im|
|00003010| 61 78 25 3a e7 69 25 3d | 69 62 61 72 25 28 5a 25 |ax%:.i%=|ibar%(Z%|
|00003020| 29 80 69 62 61 72 24 28 | 5a 25 29 3e 22 22 f2 61 |).ibar$(|Z%)>"".a|
|00003030| 64 64 65 76 65 6e 74 28 | 69 62 61 72 24 28 5a 25 |ddevent(|ibar$(Z%|
|00003040| 29 2c 36 29 0d 0e b0 0d | 20 20 20 20 20 20 20 20 |),6)....| |
|00003050| ed 0d 0e ba 0b 20 20 20 | 20 20 20 cd 0d 0e c4 07 |..... | .....|
|00003060| 20 20 cb 0d 0e ce 05 cb | 0d 0e d8 05 e1 0d 0e e2 | ......|........|
|00003070| 04 0d 0e ec 11 dd f2 64 | 65 66 6d 65 6e 75 28 69 |.......d|efmenu(i|
|00003080| 25 29 0d 0e f6 42 f2 64 | 6f 6d 65 6e 75 28 31 30 |%)...B.d|omenu(10|
|00003090| 31 2c 22 3e 49 6e 66 6f | 2c 43 68 6f 69 63 65 73 |1,">Info|,Choices|
|000030a0| 2e 2e 2e 2c 7c 43 6f 6e | 74 72 6f 6c 2e 2e 2e 2c |...,|Con|trol...,|
|000030b0| 51 75 69 74 22 2c 22 53 | 4c 49 50 64 69 61 6c 22 |Quit","S|LIPdial"|
|000030c0| 2c 69 25 29 0d 0f 00 05 | e1 0d 0f 0a 04 0d 0f 14 |,i%)....|........|
|000030d0| 11 dd f2 68 61 6c 74 28 | 6d 65 73 73 24 29 0d 0f |...halt(|mess$)..|
|000030e0| 1e 35 63 61 6c 6c 5f 6c | 65 76 25 3d 30 3a 63 61 |.5call_l|ev%=0:ca|
|000030f0| 6c 6c 5f 6c 6f 63 6b 25 | 28 29 3d 30 3a 65 76 65 |ll_lock%|()=0:eve|
|00003100| 6e 74 24 28 29 3d 22 22 | 3a 65 76 65 6e 74 25 28 |nt$()=""|:event%(|
|00003110| 29 3d b9 0d 0f 28 2d e7 | 65 72 72 6f 72 24 3e 22 |)=...(-.|error$>"|
|00003120| 22 f2 61 64 64 65 76 65 | 6e 74 28 65 72 72 6f 72 |".addeve|nt(error|
|00003130| 24 2c 30 29 3a 65 72 72 | 6f 72 24 3d 22 22 3a e1 |$,0):err|or$="":.|
|00003140| 0d 0f 32 45 f2 6d 65 73 | 73 61 67 65 28 22 22 22 |..2E.mes|sage("""|
|00003150| 53 63 72 69 70 74 20 65 | 72 72 6f 72 20 28 6c 69 |Script e|rror (li|
|00003160| 6e 65 20 22 2b c3 73 74 | 61 67 65 25 2b 22 29 3a |ne "+.st|age%+"):|
|00003170| 22 22 20 22 22 22 2b 6d | 65 73 73 24 2b 22 22 22 |"" """+m|ess$+"""|
|00003180| 22 29 3a ef 37 0d 0f 3c | 2a f2 70 72 69 6e 74 28 |"):.7..<|*.print(|
|00003190| 22 22 2c 22 53 63 72 69 | 70 74 20 73 74 6f 70 70 |"","Scri|pt stopp|
|000031a0| 65 64 20 28 65 72 72 6f | 72 29 22 2c 22 22 29 0d |ed (erro|r)","").|
|000031b0| 0f 46 1b 73 74 61 67 65 | 25 3d 30 3a 72 75 6e 25 |.F.stage|%=0:run%|
|000031c0| 3d a3 3a f2 70 61 75 73 | 65 64 0d 0f 50 05 e1 0d |=.:.paus|ed..P...|
|000031d0| 0f 5a 04 0d 0f 64 0f dd | f2 69 6e 70 75 74 28 41 |.Z...d..|.input(A|
|000031e0| 24 29 0d 0f 6e 16 ea 76 | 24 2c 70 24 3a 70 24 3d |$)..n..v|$,p$:p$=|
|000031f0| 22 49 6e 70 75 74 3a 22 | 0d 0f 78 1c f5 42 24 3d |"Input:"|..x..B$=|
|00003200| a4 70 61 72 61 6d 28 41 | 24 29 3a 69 6e 70 75 74 |.param(A|$):input|
|00003210| 24 3d 22 22 0d 0f 82 10 | e7 c0 42 24 2c 31 29 3d |$=""....|..B$,1)=|
|00003220| 22 2f 22 8c 0d 0f 8c 1b | 43 24 3d a4 76 61 6c 75 |"/".....|C$=.valu|
|00003230| 65 28 42 24 29 3a c8 8e | c0 42 24 2c 32 29 ca 0d |e(B$):..|.B$,2)..|
|00003240| 0f 96 16 20 20 c9 22 70 | 72 22 3a 70 24 3d c0 43 |... ."p|r":p$=.C|
|00003250| 24 2c 34 30 29 0d 0f a0 | 07 20 20 cb 0d 0f aa 05 |$,40)...|. .....|
|00003260| cc 0d 0f b4 39 20 20 76 | 24 3d 42 24 3a f2 75 70 |....9 v|$=B$:.up|
|00003270| 64 5f 69 63 6f 6e 28 69 | 6e 70 75 74 25 2c 31 2c |d_icon(i|nput%,1,|
|00003280| 22 22 29 3a f2 75 70 64 | 5f 69 63 6f 6e 28 69 6e |""):.upd|_icon(in|
|00003290| 70 75 74 25 2c 30 2c 70 | 24 29 0d 0f be 3e 20 20 |put%,0,p|$)...> |
|000032a0| f2 66 72 6f 6e 74 28 69 | 6e 70 75 74 25 29 3a c8 |.front(i|nput%):.|
|000032b0| 99 22 57 69 6d 70 5f 53 | 65 74 43 61 72 65 74 50 |."Wimp_S|etCaretP|
|000032c0| 6f 73 69 74 69 6f 6e 22 | 2c 69 6e 70 75 74 25 2c |osition"|,input%,|
|000032d0| 31 2c 2c 2c 2d 31 2c 30 | 0d 0f c8 27 20 20 f5 f2 |1,,,-1,0|...' ..|
|000032e0| 70 6f 6c 6c 28 35 30 29 | 3a fd 69 6e 70 75 74 24 |poll(50)|:.input$|
|000032f0| 3e 22 22 3a 70 24 3d 22 | 49 6e 70 75 74 3a 22 0d |>"":p$="|Input:".|
|00003300| 0f d2 1b 20 20 e7 69 6e | 70 75 74 24 3d 22 20 22 |... .in|put$=" "|
|00003310| 8c 69 6e 70 75 74 24 3d | 22 22 0d 0f dc 16 20 20 |.input$=|"".... |
|00003320| f2 73 65 74 76 28 76 24 | 2c 69 6e 70 75 74 24 29 |.setv(v$|,input$)|
|00003330| 0d 0f e6 05 cd 0d 0f f0 | 0a fd 41 24 3d 22 22 0d |........|..A$="".|
|00003340| 0f fa 13 f2 63 6c 6f 73 | 65 77 28 69 6e 70 75 74 |....clos|ew(input|
|00003350| 25 29 0d 10 04 05 e1 0d | 10 0e 04 0d 10 18 11 dd |%)......|........|
|00003360| f2 6d 65 73 73 61 67 65 | 28 41 24 29 0d 10 22 30 |.message|(A$).."0|
|00003370| ea 77 25 2c 6e 25 2c 74 | 24 3a 74 24 3d 22 4d 65 |.w%,n%,t|$:t$="Me|
|00003380| 73 73 61 67 65 20 66 72 | 6f 6d 20 53 6c 69 70 64 |ssage fr|om Slipd|
|00003390| 69 61 6c 22 3a 6d 73 67 | 63 25 3d a3 0d 10 2c 0d |ial":msg|c%=...,.|
|000033a0| 77 25 3d 30 3a 6e 25 3d | 30 0d 10 36 12 f5 42 24 |w%=0:n%=|0..6..B$|
|000033b0| 3d a4 70 61 72 61 6d 28 | 41 24 29 0d 10 40 10 e7 |=.param(|A$)..@..|
|000033c0| c0 42 24 2c 31 29 3d 22 | 2f 22 8c 0d 10 4a 1b 43 |.B$,1)="|/"...J.C|
|000033d0| 24 3d a4 76 61 6c 75 65 | 28 42 24 29 3a c8 8e c0 |$=.value|(B$):...|
|000033e0| 42 24 2c 32 29 ca 0d 10 | 54 1a 20 20 c9 22 63 6c |B$,2)...|T. ."cl|
|000033f0| 22 3a f2 63 6c 6f 73 65 | 77 28 6d 65 73 73 25 29 |":.close|w(mess%)|
|00003400| 0d 10 5e 10 20 20 c9 22 | 77 61 22 3a 77 25 3d b9 |..^. ."|wa":w%=.|
|00003410| 0d 10 68 11 20 20 c9 22 | 74 69 22 3a 74 24 3d 43 |..h. ."|ti":t$=C|
|00003420| 24 0d 10 72 21 20 20 c9 | 22 63 61 22 3a 6d 73 67 |$..r! .|"ca":msg|
|00003430| 5f 63 73 24 3d 43 24 3a | 6d 73 67 5f 63 65 24 3d |_cs$=C$:|msg_ce$=|
|00003440| 22 22 0d 10 7c 41 20 20 | 20 20 20 20 20 20 6d 73 |""..|A | ms|
|00003450| 67 5f 63 6d 25 3d 6d 73 | 67 6d 61 78 25 3a 6d 73 |g_cm%=ms|gmax%:ms|
|00003460| 67 5f 63 73 25 3d 31 3a | 6d 73 67 74 25 3d 74 69 |g_cs%=1:|msgt%=ti|
|00003470| 6d 65 25 3a e7 6e 25 3d | 30 8c 6d 73 67 24 28 29 |me%:.n%=|0.msg$()|
|00003480| 3d 22 22 0d 10 86 13 20 | 20 c9 22 63 65 22 3a 6d |="".... | ."ce":m|
|00003490| 73 67 63 25 3d b9 0d 10 | 90 16 20 20 c9 22 65 6e |sgc%=...|.. ."en|
|000034a0| 22 3a 6d 73 67 5f 63 65 | 24 3d 43 24 0d 10 9a 17 |":msg_ce|$=C$....|
|000034b0| 20 20 c9 22 6d 61 22 3a | 6d 73 67 5f 63 6d 25 3d | ."ma":|msg_cm%=|
|000034c0| bb 43 24 0d 10 a4 11 20 | 20 c9 22 61 64 22 3a 6e |.C$.... | ."ad":n|
|000034d0| 25 2b 3d 31 0d 10 ae 11 | 20 20 c9 22 6e 61 22 2c |%+=1....| ."na",|
|000034e0| 22 69 64 22 3a 0d 10 b8 | 07 20 20 cb 0d 10 c2 05 |"id":...|. .....|
|000034f0| cc 0d 10 cc 1b 20 20 e7 | 42 24 3e 22 22 80 6e 25 |..... .|B$>"".n%|
|00003500| 3d 30 8c 6d 73 67 24 28 | 29 3d 22 22 0d 10 d6 21 |=0.msg$(|)=""...!|
|00003510| 20 20 e7 42 24 3e 22 22 | f2 61 64 64 6d 65 73 73 | .B$>""|.addmess|
|00003520| 61 67 65 28 42 24 29 3a | 6e 25 2b 3d 31 0d 10 e0 |age(B$):|n%+=1...|
|00003530| 05 cd 0d 10 ea 15 fd 42 | 24 3d 22 22 84 6e 25 3e |.......B|$="".n%>|
|00003540| 6d 73 67 6d 61 78 25 0d | 10 f4 1f 24 6d 73 67 74 |msgmax%.|...$msgt|
|00003550| 74 6c 25 3d 74 24 3a f2 | 64 6f 74 69 74 6c 65 28 |tl%=t$:.|dotitle(|
|00003560| 6d 65 73 73 25 29 0d 10 | fe 0a e7 6e 25 3e 30 8c |mess%)..|...n%>0.|
|00003570| 0d 11 08 13 f2 61 64 64 | 6d 65 73 73 61 67 65 28 |.....add|message(|
|00003580| 22 22 29 0d 11 12 05 cd | 0d 11 1c 1c e7 77 25 20 |"").....|.....w% |
|00003590| f2 61 64 64 65 76 65 6e | 74 28 22 70 61 75 73 65 |.addeven|t("pause|
|000035a0| 22 2c 30 29 0d 11 26 05 | e1 0d 11 30 04 0d 11 3a |",0)..&.|...0...:|
|000035b0| 14 dd f2 61 64 64 6d 65 | 73 73 61 67 65 28 41 24 |...addme|ssage(A$|
|000035c0| 29 0d 11 44 18 ea 6c 25 | 2c 77 25 2c 74 24 3a 6c |)..D..l%|,w%,t$:l|
|000035d0| 25 3d 2d 31 3a 77 25 3d | 30 0d 11 4e 25 f5 6c 25 |%=-1:w%=|0..N%.l%|
|000035e0| 2b 3d 31 3a 74 24 3d 6d | 73 67 24 28 6c 25 29 3a |+=1:t$=m|sg$(l%):|
|000035f0| e7 a9 74 24 3e 77 25 8c | 77 25 3d a9 74 24 0d 11 |..t$>w%.|w%=.t$..|
|00003600| 58 21 fd 74 24 3d 22 22 | 84 6c 25 3d 6d 73 67 6d |X!.t$=""|.l%=msgm|
|00003610| 61 78 25 3a 6d 73 67 74 | 25 3d 74 69 6d 65 25 0d |ax%:msgt|%=time%.|
|00003620| 11 62 0b e7 41 24 3e 22 | 22 8c 0d 11 6c 34 20 20 |.b..A$>"|"...l4 |
|00003630| e7 6c 25 3d 6d 73 67 6d | 61 78 25 e3 6c 25 3d 31 |.l%=msgm|ax%.l%=1|
|00003640| b8 6d 73 67 6d 61 78 25 | 3a 6d 73 67 24 28 6c 25 |.msgmax%|:msg$(l%|
|00003650| 2d 31 29 3d 6d 73 67 24 | 28 6c 25 29 3a ed 0d 11 |-1)=msg$|(l%):...|
|00003660| 76 11 20 20 6d 73 67 24 | 28 6c 25 29 3d 41 24 0d |v. msg$|(l%)=A$.|
|00003670| 11 80 07 20 20 cc 0d 11 | 8a 1b 20 20 e7 6c 25 3e |... ...|.. .l%>|
|00003680| 30 f2 6f 70 65 6e 6d 65 | 73 73 28 6c 25 2c 77 25 |0.openme|ss(l%,w%|
|00003690| 29 0d 11 94 05 cd 0d 11 | 9e 05 e1 0d 11 a8 04 0d |).......|........|
|000036a0| 11 b2 15 dd f2 6f 70 65 | 6e 6d 65 73 73 28 79 25 |.....ope|nmess(y%|
|000036b0| 2c 78 25 29 0d 11 bc 3a | ea 6f 25 3a 21 74 6d 70 |,x%)...:|.o%:!tmp|
|000036c0| 25 3d 30 3a 74 6d 70 25 | 21 34 3d 2d 79 25 2a 33 |%=0:tmp%|!4=-y%*3|
|000036d0| 32 2d 33 32 3a 74 6d 70 | 25 21 38 3d 78 25 2a 31 |2-32:tmp|%!8=x%*1|
|000036e0| 36 2b 31 30 3a 74 6d 70 | 25 21 31 32 3d 30 0d 11 |6+10:tmp|%!12=0..|
|000036f0| c6 21 c8 99 22 57 69 6d | 70 5f 53 65 74 45 78 74 |.!.."Wim|p_SetExt|
|00003700| 65 6e 74 22 2c 6d 65 73 | 73 25 2c 74 6d 70 25 0d |ent",mes|s%,tmp%.|
|00003710| 11 d0 3c 21 71 25 3d 6d | 65 73 73 25 3a c8 99 22 |..<!q%=m|ess%:.."|
|00003720| 57 69 6d 70 5f 47 65 74 | 57 69 6e 64 6f 77 53 74 |Wimp_Get|WindowSt|
|00003730| 61 74 65 22 2c 2c 71 25 | 3a 6f 25 3d 28 71 25 21 |ate",,q%|:o%=(q%!|
|00003740| 33 32 29 80 28 31 3c 3c | 31 36 29 0d 11 da 2b 71 |32).(1<<|16)...+q|
|00003750| 25 21 31 32 3d 71 25 21 | 34 2b 78 25 2a 31 36 2b |%!12=q%!|4+x%*16+|
|00003760| 31 30 3a 71 25 21 31 36 | 3d 71 25 21 38 2b 79 25 |10:q%!16|=q%!8+y%|
|00003770| 2a 33 32 2b 33 32 0d 11 | e4 34 71 25 21 32 30 3d |*32+32..|.4q%!20=|
|00003780| 30 3a 71 25 21 32 34 3d | 30 3a 71 25 21 32 38 3d |0:q%!24=|0:q%!28=|
|00003790| 2d 31 3a c8 99 22 57 69 | 6d 70 5f 4f 70 65 6e 57 |-1:.."Wi|mp_OpenW|
|000037a0| 69 6e 64 6f 77 22 2c 2c | 71 25 0d 11 ee 2c e7 6f |indow",,|q%...,.o|
|000037b0| 25 3d 30 f2 63 66 72 6f | 6e 74 28 6d 65 73 73 25 |%=0.cfro|nt(mess%|
|000037c0| 2c 30 2c 31 35 30 29 20 | 8b f2 66 72 6f 6e 74 28 |,0,150) |..front(|
|000037d0| 6d 65 73 73 25 29 0d 11 | f8 3a 21 71 25 3d 6d 65 |mess%)..|.:!q%=me|
|000037e0| 73 73 25 3a c8 99 22 57 | 69 6d 70 5f 47 65 74 57 |ss%:.."W|imp_GetW|
|000037f0| 69 6e 64 6f 77 53 74 61 | 74 65 22 2c 2c 71 25 3a |indowSta|te",,q%:|
|00003800| 6d 73 67 77 25 3d 71 25 | 21 31 32 2d 71 25 21 34 |msgw%=q%|!12-q%!4|
|00003810| 0d 12 02 24 f2 75 70 64 | 61 74 65 5f 6d 73 67 28 |...$.upd|ate_msg(|
|00003820| 30 2c 2d 79 25 2a 33 32 | 2d 33 32 2c 6d 73 67 77 |0,-y%*32|-32,msgw|
|00003830| 25 2c 30 29 0d 12 0c 05 | e1 0d 12 16 04 0d 12 20 |%,0)....|....... |
|00003840| 11 dd f2 6d 73 67 66 69 | 6c 74 28 41 24 29 0d 12 |...msgfi|lt(A$)..|
|00003850| 2a 29 e7 6d 73 67 5f 63 | 73 25 3d 31 20 80 a7 41 |*).msg_c|s%=1 ..A|
|00003860| 24 2c 6d 73 67 5f 63 73 | 24 29 3e 30 20 8c 6d 73 |$,msg_cs|$)>0 .ms|
|00003870| 67 5f 63 73 25 3d 32 0d | 12 34 10 e7 6d 73 67 5f |g_cs%=2.|.4..msg_|
|00003880| 63 73 25 3d 32 20 8c 0d | 12 3e 20 20 20 6d 73 67 |cs%=2 ..|.> msg|
|00003890| 5f 63 6d 25 2d 3d 31 3a | f2 61 64 64 6d 65 73 73 |_cm%-=1:|.addmess|
|000038a0| 61 67 65 28 41 24 29 0d | 12 48 47 20 20 e7 6d 73 |age(A$).|.HG .ms|
|000038b0| 67 5f 63 6d 25 3c 31 84 | 28 6d 73 67 5f 63 65 24 |g_cm%<1.|(msg_ce$|
|000038c0| 3e 22 22 80 a7 41 24 2c | 6d 73 67 5f 63 65 24 29 |>""..A$,|msg_ce$)|
|000038d0| 3e 30 29 20 8c 6d 73 67 | 5f 63 73 25 3d 30 3a f2 |>0) .msg|_cs%=0:.|
|000038e0| 61 64 64 6d 65 73 73 61 | 67 65 28 22 22 29 0d 12 |addmessa|ge("")..|
|000038f0| 52 05 cd 0d 12 5c 05 e1 | 0d 12 66 04 0d 12 70 0c |R....\..|..f...p.|
|00003900| dd f2 70 61 75 73 65 64 | 0d 12 7a 41 70 61 75 73 |..paused|..zApaus|
|00003910| 65 25 3d b9 3a f2 75 70 | 64 5f 69 63 6f 6e 28 73 |e%=.:.up|d_icon(s|
|00003920| 74 61 74 75 73 25 2c 35 | 2c 22 52 65 73 75 6d 65 |tatus%,5|,"Resume|
|00003930| 22 29 3a f2 70 72 69 6e | 74 28 22 22 2c 22 50 61 |"):.prin|t("","Pa|
|00003940| 75 73 65 64 22 2c 22 22 | 29 0d 12 84 18 f5 f2 70 |used",""|)......p|
|00003950| 6f 6c 6c 28 33 30 29 3a | fd 70 61 75 73 65 25 3d |oll(30):|.pause%=|
|00003960| a3 0d 12 8e 05 e1 0d 12 | 98 04 0d 12 a2 0d dd f2 |........|........|
|00003970| 75 6e 70 61 75 73 65 0d | 12 ac 38 70 61 75 73 65 |unpause.|..8pause|
|00003980| 25 3d a3 3a 73 74 6f 70 | 25 3d a3 3a 72 75 6e 25 |%=.:stop|%=.:run%|
|00003990| 3d b9 3a f2 75 70 64 5f | 69 63 6f 6e 28 73 74 61 |=.:.upd_|icon(sta|
|000039a0| 74 75 73 25 2c 35 2c 22 | 50 61 75 73 65 22 29 0d |tus%,5,"|Pause").|
|000039b0| 12 b6 15 f2 70 72 69 6e | 74 28 22 22 2c 22 20 22 |....prin|t(""," "|
|000039c0| 2c 22 22 29 0d 12 c0 05 | e1 0d 12 ca 04 0d 12 d4 |,"")....|........|
|000039d0| 0a dd f2 73 74 6f 70 0d | 12 de 35 63 61 6c 6c 5f |...stop.|..5call_|
|000039e0| 6c 65 76 25 3d 30 3a 63 | 61 6c 6c 5f 6c 6f 63 6b |lev%=0:c|all_lock|
|000039f0| 25 28 29 3d 30 3a 65 76 | 65 6e 74 24 28 29 3d 22 |%()=0:ev|ent$()="|
|00003a00| 22 3a 65 76 65 6e 74 25 | 28 29 3d b9 0d 12 e8 5b |":event%|()=....[|
|00003a10| e7 73 74 61 67 65 25 3e | 30 80 73 74 6f 70 24 3c |.stage%>|0.stop$<|
|00003a20| 3e 22 22 3a f2 61 64 64 | 65 76 65 6e 74 28 73 74 |>"":.add|event(st|
|00003a30| 6f 70 24 2c 30 29 3a 73 | 74 6f 70 24 3d 22 22 3a |op$,0):s|top$="":|
|00003a40| 8b f2 61 64 64 65 76 65 | 6e 74 28 22 70 61 75 73 |..addeve|nt("paus|
|00003a50| 65 22 2c 30 29 3a 73 74 | 61 67 65 25 3d 30 3a f2 |e",0):st|age%=0:.|
|00003a60| 72 65 6c 65 61 73 65 0d | 12 f2 05 e1 0d 12 fc 04 |release.|........|
|00003a70| 0d 13 06 29 dd f2 64 6f | 6d 65 6e 75 28 68 61 6e |...)..do|menu(han|
|00003a80| 64 6c 65 25 2c 6d 65 6e | 75 24 2c 6d 65 6e 75 74 |dle%,men|u$,menut|
|00003a90| 69 74 6c 65 24 2c 49 25 | 29 0d 13 10 0f e7 6d 65 |itle$,I%|).....me|
|00003aa0| 6e 75 24 3d 22 22 8c e1 | 0d 13 1a 12 6d 65 6e 75 |nu$=""..|....menu|
|00003ab0| 49 74 65 6d 73 25 20 3d | 20 30 0d 13 24 17 6d 65 |Items% =| 0..$.me|
|00003ac0| 6e 75 68 61 6e 64 6c 65 | 25 3d 68 61 6e 64 6c 65 |nuhandle|%=handle|
|00003ad0| 25 0d 13 2e 16 6d 65 6e | 75 70 74 72 25 3d 6d 65 |%....men|uptr%=me|
|00003ae0| 6e 75 64 61 74 61 25 0d | 13 38 08 69 25 3d 30 0d |nudata%.|.8.i%=0.|
|00003af0| 13 42 12 6d 65 6e 75 70 | 74 72 25 21 32 30 3d 34 |.B.menup|tr%!20=4|
|00003b00| 34 0d 13 4c 18 24 6d 65 | 6e 75 70 74 72 25 3d 6d |4..L.$me|nuptr%=m|
|00003b10| 65 6e 75 74 69 74 6c 65 | 24 0d 13 56 3c 6d 65 6e |enutitle|$..V<men|
|00003b20| 75 70 74 72 25 3f 31 32 | 3d 37 3a 6d 65 6e 75 70 |uptr%?12|=7:menup|
|00003b30| 74 72 25 3f 31 33 3d 32 | 3a 6d 65 6e 75 70 74 72 |tr%?13=2|:menuptr|
|00003b40| 25 3f 31 34 3d 26 37 3a | 6d 65 6e 75 70 74 72 25 |%?14=&7:|menuptr%|
|00003b50| 3f 31 35 3d 30 0d 13 60 | 24 6d 65 6e 75 70 74 72 |?15=0..`|$menuptr|
|00003b60| 25 21 31 36 3d 32 33 30 | 2d 32 34 3a 6d 65 6e 75 |%!16=230|-24:menu|
|00003b70| 70 74 72 25 21 32 34 3d | 30 0d 13 6a 10 6d 65 6e |ptr%!24=|0..j.men|
|00003b80| 75 70 74 72 25 2b 3d 32 | 38 0d 13 74 45 f5 20 69 |uptr%+=2|8..tE. i|
|00003b90| 74 65 6d 24 3d a4 70 61 | 72 28 6d 65 6e 75 24 2c |tem$=.pa|r(menu$,|
|00003ba0| 22 2c 22 29 3a f2 6d 65 | 6e 75 69 74 65 6d 28 69 |","):.me|nuitem(i|
|00003bb0| 74 65 6d 24 29 3a 6d 65 | 6e 75 49 74 65 6d 73 25 |tem$):me|nuItems%|
|00003bc0| 2b 3d 31 3a fd 20 69 74 | 65 6d 24 3d 22 22 0d 13 |+=1:. it|em$=""..|
|00003bd0| 7e 23 6d 65 6e 75 70 74 | 72 25 21 2d 32 34 3d 28 |~#menupt|r%!-24=(|
|00003be0| 6d 65 6e 75 70 74 72 25 | 21 2d 32 34 29 84 26 38 |menuptr%|!-24).&8|
|00003bf0| 30 0d 13 88 2c e7 49 25 | 3c 3e 30 20 8c 59 25 3d |0...,.I%|<>0 .Y%=|
|00003c00| 31 32 30 2b 28 6d 65 6e | 75 49 74 65 6d 73 25 2d |120+(men|uItems%-|
|00003c10| 31 29 2a 34 34 20 8b 59 | 25 3d 6d 79 25 0d 13 92 |1)*44 .Y|%=my%...|
|00003c20| 2d c8 99 20 22 57 69 6d | 70 5f 43 72 65 61 74 65 |-.. "Wim|p_Create|
|00003c30| 4d 65 6e 75 22 2c 2c 6d | 65 6e 75 64 61 74 61 25 |Menu",,m|enudata%|
|00003c40| 2c 6d 78 25 2d 36 34 2c | 59 25 0d 13 9c 05 e1 0d |,mx%-64,|Y%......|
|00003c50| 13 a6 04 0d 13 b0 15 dd | f2 6d 65 6e 75 69 74 65 |........|.menuite|
|00003c60| 6d 28 74 65 78 74 24 29 | 0d 13 ba 0b ea 20 6c 65 |m(text$)|..... le|
|00003c70| 66 74 24 0d 13 c4 10 e7 | 20 74 65 78 74 24 3d 22 |ft$.....| text$="|
|00003c80| 22 20 e1 0d 13 ce 0f 21 | 6d 65 6e 75 70 74 72 25 |" .....!|menuptr%|
|00003c90| 3d 30 0d 13 d8 2e e7 c0 | 74 65 78 74 24 2c 31 29 |=0......|text$,1)|
|00003ca0| 3d 22 7c 22 8c 74 65 78 | 74 24 3d c1 74 65 78 74 |="|".tex|t$=.text|
|00003cb0| 24 2c 32 29 3a 21 6d 65 | 6e 75 70 74 72 25 3d 32 |$,2):!me|nuptr%=2|
|00003cc0| 0d 13 e2 23 6c 65 66 74 | 24 20 3d 20 c0 74 65 78 |...#left|$ = .tex|
|00003cd0| 74 24 2c 31 29 3a 6d 65 | 6e 75 70 74 72 25 21 34 |t$,1):me|nuptr%!4|
|00003ce0| 3d 2d 31 0d 13 ec 21 e7 | 20 6c 65 66 74 24 3d 22 |=-1...!.| left$="|
|00003cf0| 3e 22 20 8c 6d 65 6e 75 | 70 74 72 25 21 34 3d 69 |>" .menu|ptr%!4=i|
|00003d00| 6e 66 6f 25 0d 13 f6 18 | 6d 65 6e 75 70 74 72 25 |nfo%....|menuptr%|
|00003d10| 21 38 3d 26 30 37 30 30 | 30 30 32 31 0d 14 00 4d |!8=&0700|0021...M|
|00003d20| e7 20 6c 65 66 74 24 3d | 22 3e 22 20 84 20 6c 65 |. left$=|">" . le|
|00003d30| 66 74 24 3d 22 3c 22 20 | 8c 20 24 28 6d 65 6e 75 |ft$="<" |. $(menu|
|00003d40| 70 74 72 25 2b 31 32 29 | 3d c1 74 65 78 74 24 2c |ptr%+12)|=.text$,|
|00003d50| 32 29 20 8b 20 24 28 6d | 65 6e 75 70 74 72 25 2b |2) . $(m|enuptr%+|
|00003d60| 31 32 29 3d 74 65 78 74 | 24 0d 14 0a 10 6d 65 6e |12)=text|$....men|
|00003d70| 75 70 74 72 25 2b 3d 32 | 34 0d 14 14 05 e1 0d 14 |uptr%+=2|4.......|
|00003d80| 1e 04 0d 14 28 15 dd a4 | 70 61 72 28 6d 65 6e 75 |....(...|par(menu|
|00003d90| 24 2c 73 65 70 24 29 0d | 14 32 25 69 31 25 3d 69 |$,sep$).|.2%i1%=i|
|00003da0| 25 2b 31 3a 69 25 3d a7 | 6d 65 6e 75 24 2b 73 65 |%+1:i%=.|menu$+se|
|00003db0| 70 24 2c 73 65 70 24 2c | 69 31 25 29 0d 14 3c 17 |p$,sep$,|i1%)..<.|
|00003dc0| 3d c1 6d 65 6e 75 24 2c | 69 31 25 2c 69 25 2d 69 |=.menu$,|i1%,i%-i|
|00003dd0| 31 25 29 0d 14 46 04 0d | 14 50 18 dd f2 6d 65 6e |1%)..F..|.P...men|
|00003de0| 75 73 65 6c 65 63 74 28 | 6d 65 6e 75 73 25 29 0d |uselect(|menus%).|
|00003df0| 14 5a 3c ea 6c 25 3a c8 | 99 22 57 69 6d 70 5f 44 |.Z<.l%:.|."Wimp_D|
|00003e00| 65 63 6f 64 65 4d 65 6e | 75 22 2c 2c 6d 65 6e 75 |ecodeMen|u",,menu|
|00003e10| 64 61 74 61 25 2c 6d 65 | 6e 75 73 25 2c c4 32 30 |data%,me|nus%,.20|
|00003e20| 2c 22 20 22 29 b8 2c 2c | 2c 41 24 0d 14 64 0b c8 |," ").,,|,A$..d..|
|00003e30| 8e 20 41 24 20 ca 0d 14 | 6e 23 20 20 c9 22 43 68 |. A$ ...|n# ."Ch|
|00003e40| 6f 69 63 65 73 2e 2e 2e | 22 3a f2 66 72 6f 6e 74 |oices...|":.front|
|00003e50| 28 63 6f 6e 66 69 67 25 | 29 0d 14 78 20 20 20 c9 |(config%|)..x .|
|00003e60| 22 43 6f 6e 74 72 6f 6c | 2e 2e 2e 22 3a f2 66 72 |"Control|...":.fr|
|00003e70| 6f 6e 74 28 74 78 74 25 | 29 0d 14 82 17 20 20 c9 |ont(txt%|).... .|
|00003e80| 22 51 75 69 74 22 3a f2 | 66 69 6e 69 73 68 3a e0 |"Quit":.|finish:.|
|00003e90| 0d 14 8c 1f 20 20 c9 22 | 41 6c 61 72 6d 20 6c 69 |.... ."|Alarm li|
|00003ea0| 73 74 22 3a f2 6c 69 73 | 74 61 6c 61 72 6d 73 0d |st":.lis|talarms.|
|00003eb0| 14 96 1c 20 20 c9 22 4d | 65 6e 75 20 6c 69 73 74 |... ."M|enu list|
|00003ec0| 22 3a f2 6c 69 73 74 6d | 65 6e 75 0d 14 a0 1d 20 |":.listm|enu.... |
|00003ed0| 20 c9 22 54 61 73 6b 20 | 6c 69 73 74 22 3a f2 6c | ."Task |list":.l|
|00003ee0| 69 73 74 74 61 73 6b 73 | 0d 14 aa 1b 20 20 c9 22 |isttasks|.... ."|
|00003ef0| 56 61 72 20 6c 69 73 74 | 22 3a f2 6c 69 73 74 76 |Var list|":.listv|
|00003f00| 61 72 73 0d 14 b4 24 20 | 20 c9 22 53 63 72 69 70 |ars...$ | ."Scrip|
|00003f10| 74 20 6c 69 73 74 22 3a | f2 6c 69 73 74 73 63 72 |t list":|.listscr|
|00003f20| 69 70 74 28 22 22 29 0d | 14 be 1a 20 20 c9 22 44 |ipt("").|... ."D|
|00003f30| 62 67 4c 65 76 20 30 22 | 3a 64 65 62 75 67 25 3d |bgLev 0"|:debug%=|
|00003f40| 30 0d 14 c8 1a 20 20 c9 | 22 44 62 67 4c 65 76 20 |0.... .|"DbgLev |
|00003f50| 31 22 3a 64 65 62 75 67 | 25 3d 31 0d 14 d2 1a 20 |1":debug|%=1.... |
|00003f60| 20 c9 22 44 62 67 4c 65 | 76 20 32 22 3a 64 65 62 | ."DbgLe|v 2":deb|
|00003f70| 75 67 25 3d 32 0d 14 dc | 1a 20 20 c9 22 44 62 67 |ug%=2...|. ."Dbg|
|00003f80| 4c 65 76 20 33 22 3a 64 | 65 62 75 67 25 3d 33 0d |Lev 3":d|ebug%=3.|
|00003f90| 14 e6 13 20 20 7f 3a e7 | 75 6d 65 6e 75 25 3e 30 |... .:.|umenu%>0|
|00003fa0| 20 8c 0d 14 f0 16 20 20 | 20 20 20 20 e3 6c 25 3d | ..... | .l%=|
|00003fb0| 31 b8 75 6d 65 6e 75 25 | 0d 14 fa 1e 20 20 20 20 |1.umenu%|.... |
|00003fc0| 20 20 20 20 e7 41 24 3d | 75 6d 65 6e 75 24 28 6c | .A$=|umenu$(l|
|00003fd0| 25 2c 30 29 20 8c 0d 15 | 04 2f 20 20 20 20 20 20 |%,0) ...|./ |
|00003fe0| 20 20 20 20 f2 75 70 64 | 5f 69 63 6f 6e 28 73 74 | .upd|_icon(st|
|00003ff0| 61 74 75 73 25 2c 39 2c | 75 6d 65 6e 75 24 28 6c |atus%,9,|umenu$(l|
|00004000| 25 2c 30 29 29 0d 15 0e | 27 20 20 20 20 20 20 20 |%,0))...|' |
|00004010| 20 20 20 f2 61 64 64 65 | 76 65 6e 74 28 75 6d 65 | .adde|vent(ume|
|00004020| 6e 75 24 28 6c 25 2c 31 | 29 2c 38 29 0d 15 18 0d |nu$(l%,1|),8)....|
|00004030| 20 20 20 20 20 20 20 20 | cd 0d 15 22 0b 20 20 20 | |...". |
|00004040| 20 20 20 ed 0d 15 2c 09 | 20 20 20 20 cd 0d 15 36 | ...,.| ...6|
|00004050| 05 cb 0d 15 40 05 e1 0d | 15 4a 04 0d 15 54 0e dd |....@...|.J...T..|
|00004060| f2 65 72 72 6f 72 62 6f | 78 0d 15 5e 3c 21 62 75 |.errorbo|x..^<!bu|
|00004070| 66 66 65 72 25 3d 9f 3a | 24 28 62 75 66 66 65 72 |ffer%=.:|$(buffer|
|00004080| 25 2b 34 29 3d f6 24 2b | 22 20 28 69 6e 74 65 72 |%+4)=.$+|" (inter|
|00004090| 6e 61 6c 20 63 6f 64 65 | 20 22 2b c3 9e 2b 22 29 |nal code| "+..+")|
|000040a0| 2e 22 2b bd 30 0d 15 68 | 31 c8 99 20 22 57 69 6d |."+.0..h|1.. "Wim|
|000040b0| 70 5f 52 65 70 6f 72 74 | 45 72 72 6f 72 22 2c 62 |p_Report|Error",b|
|000040c0| 75 66 66 65 72 25 2c 31 | 2c 54 61 73 6b 24 3a f2 |uffer%,1|,Task$:.|
|000040d0| 66 69 6e 69 73 68 0d 15 | 72 05 e1 0d 15 7c 04 0d |finish..|r....|..|
|000040e0| 15 86 0f dd f2 66 72 6f | 6e 74 28 68 25 29 0d 15 |.....fro|nt(h%)..|
|000040f0| 90 26 21 71 25 3d 68 25 | 3a c8 99 22 57 69 6d 70 |.&!q%=h%|:.."Wimp|
|00004100| 5f 47 65 74 57 69 6e 64 | 6f 77 53 74 61 74 65 22 |_GetWind|owState"|
|00004110| 2c 2c 71 25 0d 15 9a 24 | 71 25 21 32 38 3d 2d 31 |,,q%...$|q%!28=-1|
|00004120| 3a c8 99 22 57 69 6d 70 | 5f 4f 70 65 6e 57 69 6e |:.."Wimp|_OpenWin|
|00004130| 64 6f 77 22 2c 2c 71 25 | 0d 15 a4 47 e7 68 25 3d |dow",,q%|...G.h%=|
|00004140| 74 78 74 25 8c c8 99 22 | 57 69 6d 70 5f 53 65 74 |txt%..."|Wimp_Set|
|00004150| 43 61 72 65 74 50 6f 73 | 69 74 69 6f 6e 22 2c 68 |CaretPos|ition",h|
|00004160| 25 2c 69 6e 69 63 25 2c | 2c 2c 2d 31 2c a9 a4 69 |%,inic%,|,,-1,..i|
|00004170| 63 5f 73 74 72 28 68 25 | 2c 69 6e 69 63 25 29 0d |c_str(h%|,inic%).|
|00004180| 15 ae 05 e1 0d 15 b8 04 | 0d 15 c2 1c dd f2 63 66 |........|......cf|
|00004190| 72 6f 6e 74 28 68 25 2c | 78 6f 66 66 25 2c 79 6f |ront(h%,|xoff%,yo|
|000041a0| 66 66 25 29 0d 15 cc 2a | e7 61 75 74 6f 77 69 6e |ff%)...*|.autowin|
|000041b0| 70 6f 73 25 3d 30 80 68 | 25 3d 73 74 61 74 75 73 |pos%=0.h|%=status|
|000041c0| 25 20 f2 66 72 6f 6e 74 | 28 68 25 29 3a e1 0d 15 |% .front|(h%):...|
|000041d0| d6 1a ea 78 25 2c 79 25 | 2c 77 78 25 2c 77 79 25 |...x%,y%|,wx%,wy%|
|000041e0| 2c 78 65 25 2c 79 65 25 | 0d 15 e0 49 c8 99 22 4f |,xe%,ye%|...I.."O|
|000041f0| 53 5f 52 65 61 64 4d 6f | 64 65 56 61 72 69 61 62 |S_ReadMo|deVariab|
|00004200| 6c 65 22 2c 2d 31 2c 34 | b8 2c 2c 78 65 25 3a c8 |le",-1,4|.,,xe%:.|
|00004210| 99 22 4f 53 5f 52 65 61 | 64 4d 6f 64 65 56 61 72 |."OS_Rea|dModeVar|
|00004220| 69 61 62 6c 65 22 2c 2d | 31 2c 31 31 b8 2c 2c 78 |iable",-|1,11.,,x|
|00004230| 25 0d 15 ea 49 c8 99 22 | 4f 53 5f 52 65 61 64 4d |%...I.."|OS_ReadM|
|00004240| 6f 64 65 56 61 72 69 61 | 62 6c 65 22 2c 2d 31 2c |odeVaria|ble",-1,|
|00004250| 35 b8 2c 2c 79 65 25 3a | c8 99 22 4f 53 5f 52 65 |5.,,ye%:|.."OS_Re|
|00004260| 61 64 4d 6f 64 65 56 61 | 72 69 61 62 6c 65 22 2c |adModeVa|riable",|
|00004270| 2d 31 2c 31 32 b8 2c 2c | 79 25 0d 15 f4 26 21 71 |-1,12.,,|y%...&!q|
|00004280| 25 3d 68 25 3a c8 99 22 | 57 69 6d 70 5f 47 65 74 |%=h%:.."|Wimp_Get|
|00004290| 57 69 6e 64 6f 77 53 74 | 61 74 65 22 2c 2c 71 25 |WindowSt|ate",,q%|
|000042a0| 0d 15 fe 37 78 25 3d 78 | 25 3c 3c 78 65 25 3a 79 |...7x%=x|%<<xe%:y|
|000042b0| 25 3d 79 25 3c 3c 79 65 | 25 3a 77 78 25 3d 71 25 |%=y%<<ye|%:wx%=q%|
|000042c0| 21 31 32 2d 71 25 21 34 | 3a 77 79 25 3d 71 25 21 |!12-q%!4|:wy%=q%!|
|000042d0| 31 36 2d 71 25 21 38 0d | 16 08 4d 71 25 21 34 3d |16-q%!8.|..Mq%!4=|
|000042e0| 28 78 25 2d 77 78 25 29 | 81 32 2d 78 6f 66 66 25 |(x%-wx%)|.2-xoff%|
|000042f0| 3a 71 25 21 31 32 3d 71 | 25 21 34 2b 77 78 25 3a |:q%!12=q|%!4+wx%:|
|00004300| 71 25 21 38 3d 28 79 25 | 2d 77 79 25 29 81 32 2d |q%!8=(y%|-wy%).2-|
|00004310| 79 6f 66 66 25 3a 71 25 | 21 31 36 3d 71 25 21 38 |yoff%:q%|!16=q%!8|
|00004320| 2b 77 79 25 0d 16 12 34 | 71 25 21 32 30 3d 30 3a |+wy%...4|q%!20=0:|
|00004330| 71 25 21 32 34 3d 30 3a | 71 25 21 32 38 3d 2d 31 |q%!24=0:|q%!28=-1|
|00004340| 3a c8 99 22 57 69 6d 70 | 5f 4f 70 65 6e 57 69 6e |:.."Wimp|_OpenWin|
|00004350| 64 6f 77 22 2c 2c 71 25 | 0d 16 1c 05 e1 0d 16 26 |dow",,q%|.......&|
|00004360| 04 0d 16 30 11 dd f2 64 | 6f 74 69 74 6c 65 28 68 |...0...d|otitle(h|
|00004370| 25 29 0d 16 3a 28 21 71 | 25 3d 68 25 3a c8 99 22 |%)..:(!q|%=h%:.."|
|00004380| 57 69 6d 70 5f 47 65 74 | 57 69 6e 64 6f 77 4f 75 |Wimp_Get|WindowOu|
|00004390| 74 6c 69 6e 65 22 2c 2c | 71 25 0d 16 44 35 c8 99 |tline",,|q%..D5..|
|000043a0| 22 57 69 6d 70 5f 46 6f | 72 63 65 52 65 64 72 61 |"Wimp_Fo|rceRedra|
|000043b0| 77 22 2c 2d 31 2c 71 25 | 21 34 2c 71 25 21 31 36 |w",-1,q%|!4,q%!16|
|000043c0| 2d 34 34 2c 71 25 21 31 | 32 2c 71 25 21 31 36 0d |-44,q%!1|2,q%!16.|
|000043d0| 16 4e 05 e1 0d 16 58 04 | 0d 16 62 13 dd a4 69 63 |.N....X.|..b...ic|
|000043e0| 5f 73 74 72 28 48 25 2c | 49 25 29 0d 16 6c 2c 21 |_str(H%,|I%)..l,!|
|000043f0| 71 25 3d 48 25 3a 71 25 | 21 34 3d 49 25 3a c8 99 |q%=H%:q%|!4=I%:..|
|00004400| 22 57 69 6d 70 5f 47 65 | 74 49 63 6f 6e 53 74 61 |"Wimp_Ge|tIconSta|
|00004410| 74 65 22 2c 2c 71 25 0d | 16 76 11 3d a4 72 74 6f |te",,q%.|.v.=.rto|
|00004420| 7a 28 71 25 21 32 38 29 | 0d 16 80 04 0d 16 8a 1d |z(q%!28)|........|
|00004430| dd f2 73 65 74 69 63 6f | 6e 73 74 72 69 6e 67 28 |..setico|nstring(|
|00004440| 48 25 2c 49 25 2c 41 24 | 29 0d 16 94 31 21 71 25 |H%,I%,A$|)...1!q%|
|00004450| 3d 48 25 3a 71 25 21 34 | 3d 49 25 3a c8 99 22 58 |=H%:q%!4|=I%:.."X|
|00004460| 57 69 6d 70 5f 47 65 74 | 49 63 6f 6e 53 74 61 74 |Wimp_Get|IconStat|
|00004470| 65 22 2c 2c 71 25 b8 3b | 46 25 0d 16 9e 2a e7 a4 |e",,q%.;|F%...*..|
|00004480| 74 66 31 30 28 46 25 29 | 80 71 25 21 32 38 3e 26 |tf10(F%)|.q%!28>&|
|00004490| 38 38 30 30 20 8c 24 28 | 71 25 21 32 38 29 3d 41 |8800 .$(|q%!28)=A|
|000044a0| 24 2b bd 30 0d 16 a8 05 | e1 0d 16 b2 04 0d 16 bc |$+.0....|........|
|000044b0| 18 dd f2 75 70 64 5f 69 | 63 6f 6e 28 48 25 2c 49 |...upd_i|con(H%,I|
|000044c0| 25 2c 41 24 29 0d 16 c6 | 54 f2 73 65 74 69 63 6f |%,A$)...|T.setico|
|000044d0| 6e 73 74 72 69 6e 67 28 | 48 25 2c 49 25 2c 41 24 |nstring(|H%,I%,A$|
|000044e0| 29 3a 21 71 25 3d 48 25 | 3a 71 25 21 34 3d 49 25 |):!q%=H%|:q%!4=I%|
|000044f0| 3a 71 25 21 38 3d 30 3a | 71 25 21 31 32 3d 30 3a |:q%!8=0:|q%!12=0:|
|00004500| c8 99 22 57 69 6d 70 5f | 53 65 74 49 63 6f 6e 53 |.."Wimp_|SetIconS|
|00004510| 74 61 74 65 22 2c 2c 71 | 25 0d 16 d0 05 e1 0d 16 |tate",,q|%.......|
|00004520| da 04 0d 16 e4 16 dd f2 | 73 65 74 69 6e 76 28 48 |........|setinv(H|
|00004530| 25 2c 49 25 2c 53 25 29 | 0d 16 ee 3d 53 25 3d 94 |%,I%,S%)|...=S%=.|
|00004540| 28 53 25 3d 30 29 3a 21 | 71 25 3d 48 25 3a 71 25 |(S%=0):!|q%=H%:q%|
|00004550| 21 34 3d 49 25 3a 71 25 | 21 38 3d 28 28 31 29 3c |!4=I%:q%|!8=((1)<|
|00004560| 3c 32 31 29 2a 53 25 3a | 71 25 21 31 32 3d 28 31 |<21)*S%:|q%!12=(1|
|00004570| 3c 3c 32 31 29 0d 16 f8 | 1d c8 99 22 57 69 6d 70 |<<21)...|..."Wimp|
|00004580| 5f 53 65 74 49 63 6f 6e | 53 74 61 74 65 22 2c 2c |_SetIcon|State",,|
|00004590| 71 25 0d 17 02 05 e1 0d | 17 0c 04 0d 17 16 12 dd |q%......|........|
|000045a0| a4 72 64 69 6e 76 28 48 | 25 2c 49 25 29 0d 17 20 |.rdinv(H|%,I%).. |
|000045b0| 2c 21 71 25 3d 48 25 3a | 71 25 21 34 3d 49 25 3a |,!q%=H%:|q%!4=I%:|
|000045c0| c8 99 22 57 69 6d 70 5f | 47 65 74 49 63 6f 6e 53 |.."Wimp_|GetIconS|
|000045d0| 74 61 74 65 22 2c 2c 71 | 25 0d 17 2a 24 3d ac 28 |tate",,q|%..*$=.(|
|000045e0| 28 28 71 25 21 32 34 29 | 80 28 31 3c 3c 32 31 29 |((q%!24)|.(1<<21)|
|000045f0| 29 81 32 30 39 37 31 35 | 32 3c 3e 30 29 0d 17 34 |).209715|2<>0)..4|
|00004600| 04 0d 17 3e 15 dd f2 70 | 72 69 6e 74 28 61 24 2c |...>...p|rint(a$,|
|00004610| 62 24 2c 63 24 29 0d 17 | 48 42 e7 61 24 3e 22 22 |b$,c$)..|HB.a$>""|
|00004620| 20 f2 75 70 64 5f 69 63 | 6f 6e 28 73 74 61 74 75 | .upd_ic|on(statu|
|00004630| 73 25 2c 31 2c c2 61 24 | 2c 33 30 29 29 3a e7 a9 |s%,1,.a$|,30)):..|
|00004640| 61 24 3e 31 20 f2 6c 6f | 67 28 22 41 63 74 69 6f |a$>1 .lo|g("Actio|
|00004650| 6e 3a 20 22 2b 61 24 29 | 0d 17 52 42 e7 62 24 3e |n: "+a$)|..RB.b$>|
|00004660| 22 22 20 f2 75 70 64 5f | 69 63 6f 6e 28 73 74 61 |"" .upd_|icon(sta|
|00004670| 74 75 73 25 2c 32 2c c2 | 62 24 2c 33 30 29 29 3a |tus%,2,.|b$,30)):|
|00004680| e7 a9 62 24 3e 31 20 f2 | 6c 6f 67 28 22 53 74 61 |..b$>1 .|log("Sta|
|00004690| 74 75 73 3a 20 22 2b 62 | 24 29 0d 17 5c 42 e7 63 |tus: "+b|$)..\B.c|
|000046a0| 24 3e 22 22 20 f2 75 70 | 64 5f 69 63 6f 6e 28 73 |$>"" .up|d_icon(s|
|000046b0| 74 61 74 75 73 25 2c 33 | 2c c2 63 24 2c 33 30 29 |tatus%,3|,.c$,30)|
|000046c0| 29 3a e7 a9 63 24 3e 31 | 20 f2 6c 6f 67 28 22 49 |):..c$>1| .log("I|
|000046d0| 50 20 61 64 64 3a 20 22 | 2b 63 24 29 0d 17 66 05 |P add: "|+c$)..f.|
|000046e0| e1 0d 17 70 04 0d 17 7a | 37 dd f2 6f 70 65 6e 77 |...p...z|7..openw|
|000046f0| 28 68 61 6e 64 6c 65 25 | 2c 78 30 25 2c 79 30 25 |(handle%|,x0%,y0%|
|00004700| 2c 78 31 25 2c 79 31 25 | 2c 73 63 78 25 2c 73 63 |,x1%,y1%|,scx%,sc|
|00004710| 79 25 2c 62 68 61 6e 64 | 6c 65 25 29 0d 17 84 10 |y%,bhand|le%)....|
|00004720| e7 68 61 6e 64 6c 65 25 | 3e 2d 31 8c 0d 17 8e 1f |.handle%|>-1.....|
|00004730| 71 25 21 30 3d 68 61 6e | 64 6c 65 25 3a 71 25 21 |q%!0=han|dle%:q%!|
|00004740| 32 38 3d 62 68 61 6e 64 | 6c 65 25 0d 17 98 29 71 |28=bhand|le%...)q|
|00004750| 25 21 34 3d 78 30 25 3a | 71 25 21 38 3d 79 30 25 |%!4=x0%:|q%!8=y0%|
|00004760| 3a 71 25 21 31 32 3d 78 | 31 25 3a 71 25 21 31 36 |:q%!12=x|1%:q%!16|
|00004770| 3d 79 31 25 0d 17 a2 19 | 71 25 21 32 30 3d 73 63 |=y1%....|q%!20=sc|
|00004780| 78 25 3a 71 25 21 32 34 | 3d 73 63 79 25 0d 17 ac |x%:q%!24|=scy%...|
|00004790| 1c c8 99 20 22 57 69 6d | 70 5f 4f 70 65 6e 57 69 |... "Wim|p_OpenWi|
|000047a0| 6e 64 6f 77 22 2c 2c 71 | 25 0d 17 b6 05 cd 0d 17 |ndow",,q|%.......|
|000047b0| c0 05 e1 0d 17 ca 04 0d | 17 d4 10 dd f2 63 6c 6f |........|.....clo|
|000047c0| 73 65 77 28 68 25 29 0d | 17 de 0d ea 4c 25 3a c8 |sew(h%).|....L%:.|
|000047d0| 8e 68 25 ca 0d 17 e8 1b | c9 6d 65 73 73 25 3a e7 |.h%.....|.mess%:.|
|000047e0| 70 61 75 73 65 25 20 f2 | 75 6e 70 61 75 73 65 0d |pause% .|unpause.|
|000047f0| 17 f2 16 c9 69 6e 70 75 | 74 25 3a 69 6e 70 75 74 |....inpu|t%:input|
|00004800| 24 3d 22 20 22 0d 17 fc | 2b 7f 3a e3 4c 25 3d 30 |$=" "...|+.:.L%=0|
|00004810| b8 74 77 6d 61 78 25 3a | e7 68 25 3d 74 77 77 25 |.twmax%:|.h%=tww%|
|00004820| 28 4c 25 29 80 74 77 68 | 25 28 4c 25 29 3e 30 8c |(L%).twh|%(L%)>0.|
|00004830| 0d 18 06 38 20 20 ef 37 | 3a e7 a4 79 65 73 6e 6f |...8 .7|:..yesno|
|00004840| 28 22 54 68 69 73 20 74 | 61 73 6b 20 69 73 20 72 |("This t|ask is r|
|00004850| 75 6e 6e 69 6e 67 2c 20 | 6b 69 6c 6c 20 69 74 3f |unning, |kill it?|
|00004860| 22 2c 33 29 3d 32 20 8c | 0d 18 10 23 20 20 20 20 |",3)=2 .|...# |
|00004870| f2 6d 65 73 73 74 77 28 | 74 77 6e 61 6d 65 24 28 |.messtw(|twname$(|
|00004880| 4c 25 29 2c 26 38 30 38 | 43 34 29 0d 18 1a 09 20 |L%),&808|C4).... |
|00004890| 20 20 20 cc 0d 18 24 0c | 20 20 20 20 68 25 3d 30 | ...$.| h%=0|
|000048a0| 0d 18 2e 09 20 20 20 20 | cd 0d 18 38 11 20 20 20 |.... |...8. |
|000048b0| 20 4c 25 3d 74 77 6d 61 | 78 25 0d 18 42 07 20 20 | L%=twma|x%..B. |
|000048c0| cd 0d 18 4c 05 ed 0d 18 | 56 05 cb 0d 18 60 29 e7 |...L....|V....`).|
|000048d0| 68 25 3e 30 8c 21 71 25 | 3d 68 25 3a c8 99 22 57 |h%>0.!q%|=h%:.."W|
|000048e0| 69 6d 70 5f 43 6c 6f 73 | 65 57 69 6e 64 6f 77 22 |imp_Clos|eWindow"|
|000048f0| 2c 2c 71 25 0d 18 6a 05 | e1 0d 18 74 04 0d 18 7e |,,q%..j.|...t...~|
|00004900| 0d dd a4 61 73 6b 28 41 | 24 29 0d 18 88 30 ea 64 |...ask(A|$)...0.d|
|00004910| 25 2c 72 25 2c 64 65 66 | 25 3a 64 25 3d 36 30 3a |%,r%,def|%:d%=60:|
|00004920| 72 25 3d 30 3a 64 65 66 | 25 3d 31 3a f5 42 24 3d |r%=0:def|%=1:.B$=|
|00004930| a4 70 61 72 61 6d 28 41 | 24 29 0d 18 92 10 e7 c0 |.param(A|$)......|
|00004940| 42 24 2c 31 29 3d 22 2f | 22 8c 0d 18 9c 1d 20 20 |B$,1)="/|"..... |
|00004950| 43 24 3d a4 76 61 6c 75 | 65 28 42 24 29 3a c8 8e |C$=.valu|e(B$):..|
|00004960| c0 42 24 2c 33 29 ca 0d | 18 a6 20 20 20 20 20 c9 |.B$,3)..|.. .|
|00004970| 22 64 65 6c 22 3a 64 25 | 3d bb 43 24 3a e7 64 25 |"del":d%|=.C$:.d%|
|00004980| 3c 35 8c 64 25 3d 35 0d | 18 b0 2f 20 20 20 20 c9 |<5.d%=5.|../ .|
|00004990| 22 64 65 66 22 3a 43 24 | 3d a4 6c 6f 77 65 72 28 |"def":C$|=.lower(|
|000049a0| 43 24 29 3a e7 c0 43 24 | 2c 31 29 3d 22 79 22 8c |C$):..C$|,1)="y".|
|000049b0| 64 65 66 25 3d 32 0d 18 | ba 07 20 20 cb 0d 18 c4 |def%=2..|.. ....|
|000049c0| 07 20 20 cc 0d 18 ce 16 | 20 20 72 25 3d a4 79 65 |. .....| r%=.ye|
|000049d0| 73 6e 6f 28 42 24 2c 64 | 25 29 0d 18 d8 05 cd 0d |sno(B$,d|%)......|
|000049e0| 18 e2 0a fd 41 24 3d 22 | 22 0d 18 ec 11 e7 72 25 |....A$="|".....r%|
|000049f0| 3d 30 8c 72 25 3d 64 65 | 66 25 0d 18 f6 0c 3d 2d |=0.r%=de|f%....=-|
|00004a00| 28 72 25 3d 32 29 0d 19 | 00 04 0d 19 0a 15 dd a4 |(r%=2)..|........|
|00004a10| 79 65 73 6e 6f 28 41 24 | 2c 77 61 69 74 25 29 0d |yesno(A$|,wait%).|
|00004a20| 19 14 22 f4 20 72 65 74 | 75 72 6e 73 20 30 3d 74 |..". ret|urns 0=t|
|00004a30| 69 6d 65 6f 75 74 20 31 | 3d 6e 6f 20 32 3d 79 65 |imeout 1|=no 2=ye|
|00004a40| 73 0d 19 1e 39 ea 73 74 | 25 3a 73 74 25 3d 74 69 |s...9.st|%:st%=ti|
|00004a50| 6d 65 25 3a 77 61 69 74 | 25 3d 77 61 69 74 25 2a |me%:wait|%=wait%*|
|00004a60| 31 30 30 3a f2 75 70 64 | 5f 69 63 6f 6e 28 79 65 |100:.upd|_icon(ye|
|00004a70| 73 6e 6f 25 2c 32 2c 41 | 24 29 0d 19 28 2c f2 63 |sno%,2,A|$)..(,.c|
|00004a80| 66 72 6f 6e 74 28 79 65 | 73 6e 6f 25 2c 30 2c 30 |front(ye|sno%,0,0|
|00004a90| 29 3a e7 77 61 69 74 25 | 3d 30 8c 77 61 69 74 25 |):.wait%|=0.wait%|
|00004aa0| 3d 36 30 30 30 30 0d 19 | 32 38 79 65 73 6e 6f 61 |=60000..|28yesnoa|
|00004ab0| 6e 73 25 3d 30 3a f5 3a | f2 70 6f 6c 6c 28 35 30 |ns%=0:.:|.poll(50|
|00004ac0| 29 3a fd 79 65 73 6e 6f | 61 6e 73 25 3e 30 84 74 |):.yesno|ans%>0.t|
|00004ad0| 69 6d 65 25 2d 73 74 25 | 3e 77 61 69 74 25 0d 19 |ime%-st%|>wait%..|
|00004ae0| 3c 13 f2 63 6c 6f 73 65 | 77 28 79 65 73 6e 6f 25 |<..close|w(yesno%|
|00004af0| 29 0d 19 46 0e 3d 79 65 | 73 6e 6f 61 6e 73 25 0d |)..F.=ye|snoans%.|
|00004b00| 19 50 04 0d 19 5a 10 dd | a4 76 61 72 76 61 6c 28 |.P...Z..|.varval(|
|00004b10| 41 24 29 0d 19 64 0a ea | 4c 25 2c 46 25 0d 19 6e |A$)..d..|L%,F%..n|
|00004b20| 2f c8 99 22 58 4f 53 5f | 52 65 61 64 56 61 72 56 |/.."XOS_|ReadVarV|
|00004b30| 61 6c 22 2c 41 24 2c 74 | 6d 70 25 2c 32 35 36 2c |al",A$,t|mp%,256,|
|00004b40| 30 2c 33 20 b8 2c 2c 4c | 25 3b 46 25 0d 19 78 19 |0,3 .,,L|%;F%..x.|
|00004b50| e7 28 46 25 80 31 29 20 | 84 4c 25 3e 32 35 36 20 |.(F%.1) |.L%>256 |
|00004b60| 8c 3a 3d 22 22 0d 19 82 | 15 74 6d 70 25 3f 4c 25 |.:=""...|.tmp%?L%|
|00004b70| 3d 31 33 3a 3d 24 74 6d | 70 25 0d 19 8c 04 0d 19 |=13:=$tm|p%......|
|00004b80| 96 0e dd f2 69 6e 66 6f | 28 71 25 29 0d 19 a0 3d |....info|(q%)...=|
|00004b90| 78 30 25 3d 21 71 25 3a | 79 30 25 3d 71 25 21 34 |x0%=!q%:|y0%=q%!4|
|00004ba0| 3a 78 31 25 3d 71 25 21 | 38 3a 79 31 25 3d 71 25 |:x1%=q%!|8:y1%=q%|
|00004bb0| 21 31 32 3a 73 63 78 25 | 3d 71 25 21 31 36 3a 73 |!12:scx%|=q%!16:s|
|00004bc0| 63 79 25 3d 71 25 21 32 | 30 0d 19 aa 33 62 78 25 |cy%=q%!2|0...3bx%|
|00004bd0| 3d 78 30 25 2d 73 63 78 | 25 3a 62 79 25 3d 79 31 |=x0%-scx|%:by%=y1|
|00004be0| 25 2d 73 63 79 25 3a 67 | 79 30 25 3d 71 25 21 32 |%-scy%:g|y0%=q%!2|
|00004bf0| 38 3a 67 79 31 25 3d 71 | 25 21 33 36 0d 19 b4 05 |8:gy1%=q|%!36....|
|00004c00| e1 0d 19 be 04 0d 19 c8 | 11 dd f2 72 65 64 72 61 |........|...redra|
|00004c10| 77 77 28 68 25 29 0d 19 | d2 15 ea 74 77 25 3a 21 |ww(h%)..|...tw%:!|
|00004c20| 71 25 3d 68 25 3a c8 8e | 68 25 ca 0d 19 dc 0a c9 |q%=h%:..|h%......|
|00004c30| 74 78 74 25 3a 0d 19 e6 | 28 20 20 c8 99 20 22 57 |txt%:...|( .. "W|
|00004c40| 69 6d 70 5f 52 65 64 72 | 61 77 57 69 6e 64 6f 77 |imp_Redr|awWindow|
|00004c50| 22 2c 2c 71 25 20 b8 20 | 6d 6f 72 65 25 0d 19 f0 |",,q% . |more%...|
|00004c60| 16 20 20 f2 64 72 61 77 | 5f 74 78 74 28 6d 6f 72 |. .draw|_txt(mor|
|00004c70| 65 25 29 0d 19 fa 0b c9 | 6d 65 73 73 25 3a 0d 1a |e%).....|mess%:..|
|00004c80| 04 28 20 20 c8 99 20 22 | 57 69 6d 70 5f 52 65 64 |.( .. "|Wimp_Red|
|00004c90| 72 61 77 57 69 6e 64 6f | 77 22 2c 2c 71 25 20 b8 |rawWindo|w",,q% .|
|00004ca0| 20 6d 6f 72 65 25 0d 1a | 0e 16 20 20 f2 64 72 61 | more%..|.. .dra|
|00004cb0| 77 5f 6d 73 67 28 6d 6f | 72 65 25 29 0d 1a 18 06 |w_msg(mo|re%)....|
|00004cc0| 7f 3a 0d 1a 22 22 20 20 | e3 74 77 25 3d 30 b8 74 |.:.."" |.tw%=0.t|
|00004cd0| 77 6d 61 78 25 3a e7 68 | 25 3d 74 77 77 25 28 74 |wmax%:.h|%=tww%(t|
|00004ce0| 77 25 29 8c 0d 1a 2c 2a | 20 20 20 20 c8 99 20 22 |w%)...,*| .. "|
|00004cf0| 57 69 6d 70 5f 52 65 64 | 72 61 77 57 69 6e 64 6f |Wimp_Red|rawWindo|
|00004d00| 77 22 2c 2c 71 25 20 b8 | 20 6d 6f 72 65 25 0d 1a |w",,q% .| more%..|
|00004d10| 36 1b 20 20 20 20 f2 64 | 72 61 77 5f 74 77 28 74 |6. .d|raw_tw(t|
|00004d20| 77 25 2c 6d 6f 72 65 25 | 29 0d 1a 40 07 20 20 cd |w%,more%|)..@. .|
|00004d30| 0d 1a 4a 07 20 20 ed 0d | 1a 54 05 cb 0d 1a 5e 05 |..J. ..|.T....^.|
|00004d40| e1 0d 1a 68 04 0d 1a 72 | 0e dd f2 69 6e 69 74 5f |...h...r|...init_|
|00004d50| 74 78 74 0d 1a 7c 0b 74 | 78 74 6f 25 3d 30 0d 1a |txt..|.t|xto%=0..|
|00004d60| 86 3c 6c 6f 67 5f 79 25 | 3d 31 3a de 74 78 74 6c |.<log_y%|=1:.txtl|
|00004d70| 24 28 74 78 74 79 25 29 | 2c 74 78 74 63 25 20 74 |$(txty%)|,txtc% t|
|00004d80| 78 74 79 25 2c 6d 73 67 | 24 28 6d 73 67 6d 61 78 |xty%,msg|$(msgmax|
|00004d90| 25 29 3a 6d 73 67 77 25 | 3d 30 0d 1a 90 22 74 78 |%):msgw%|=0..."tx|
|00004da0| 74 6c 24 28 29 3d c4 74 | 78 74 78 25 81 32 2c 22 |tl$()=.t|xtx%.2,"|
|00004db0| 20 22 29 3a 69 6f 66 66 | 25 3d 34 30 0d 1a 9a 3e | "):ioff|%=40...>|
|00004dc0| 21 74 6d 70 25 3d 30 3a | 74 6d 70 25 21 34 3d 2d |!tmp%=0:|tmp%!4=-|
|00004dd0| 74 78 74 79 25 2a 33 32 | 2d 69 6f 66 66 25 2d 38 |txty%*32|-ioff%-8|
|00004de0| 3a 74 6d 70 25 21 38 3d | 74 78 74 78 25 2a 31 36 |:tmp%!8=|txtx%*16|
|00004df0| 3a 74 6d 70 25 21 31 32 | 3d 30 0d 1a a4 20 c8 99 |:tmp%!12|=0... ..|
|00004e00| 22 57 69 6d 70 5f 53 65 | 74 45 78 74 65 6e 74 22 |"Wimp_Se|tExtent"|
|00004e10| 2c 74 78 74 25 2c 74 6d | 70 25 0d 1a ae 3c e3 69 |,txt%,tm|p%...<.i|
|00004e20| 25 3d 30 b8 31 3a 21 74 | 6d 70 25 3d 74 78 74 25 |%=0.1:!t|mp%=txt%|
|00004e30| 3a 74 6d 70 25 21 34 3d | 69 25 3a c8 99 22 57 69 |:tmp%!4=|i%:.."Wi|
|00004e40| 6d 70 5f 47 65 74 49 63 | 6f 6e 53 74 61 74 65 22 |mp_GetIc|onState"|
|00004e50| 2c 2c 74 6d 70 25 0d 1a | b8 41 74 6d 70 25 21 31 |,,tmp%..|.Atmp%!1|
|00004e60| 32 3d 74 6d 70 25 21 31 | 32 2d 74 78 74 79 25 2a |2=tmp%!1|2-txty%*|
|00004e70| 33 32 3a 74 6d 70 25 21 | 32 30 3d 74 6d 70 25 21 |32:tmp%!|20=tmp%!|
|00004e80| 32 30 2d 74 78 74 79 25 | 2a 33 32 3a 74 6d 70 25 |20-txty%|*32:tmp%|
|00004e90| 21 34 3d 74 78 74 25 0d | 1a c2 2c 21 71 25 3d 74 |!4=txt%.|..,!q%=t|
|00004ea0| 78 74 25 3a 71 25 21 34 | 3d 69 25 3a c8 99 22 57 |xt%:q%!4|=i%:.."W|
|00004eb0| 69 6d 70 5f 44 65 6c 65 | 74 65 49 63 6f 6e 22 2c |imp_Dele|teIcon",|
|00004ec0| 2c 71 25 0d 1a cc 28 c8 | 99 22 57 69 6d 70 5f 43 |,q%...(.|."Wimp_C|
|00004ed0| 72 65 61 74 65 49 63 6f | 6e 22 2c 2c 74 6d 70 25 |reateIco|n",,tmp%|
|00004ee0| 2b 34 20 b8 69 6e 69 63 | 25 3a ed 0d 1a d6 23 70 |+4 .inic|%:....#p|
|00004ef0| 74 72 25 3d 30 3a 6c 74 | 25 3d 30 3a 64 61 74 61 |tr%=0:lt|%=0:data|
|00004f00| 24 3d 22 22 3a 74 64 61 | 74 61 24 3d 22 22 0d 1a |$="":tda|ta$=""..|
|00004f10| e0 2a f2 70 72 69 6e 74 | 28 22 53 74 61 72 74 69 |.*.print|("Starti|
|00004f20| 6e 67 20 53 4c 49 50 64 | 69 61 6c 22 2c 22 49 64 |ng SLIPd|ial","Id|
|00004f30| 6c 65 22 2c 22 20 22 29 | 0d 1a ea 2e e7 71 75 69 |le"," ")|.....qui|
|00004f40| 65 74 25 3d 30 80 a4 72 | 64 69 6e 76 28 63 6f 6e |et%=0..r|dinv(con|
|00004f50| 66 69 67 25 2c 32 29 3d | 30 20 f2 66 72 6f 6e 74 |fig%,2)=|0 .front|
|00004f60| 28 74 78 74 25 29 0d 1a | f4 05 e1 0d 1a fe 04 0d |(txt%)..|........|
|00004f70| 1b 08 1b dd f2 69 6e 69 | 74 5f 74 77 77 28 74 77 |.....ini|t_tww(tw|
|00004f80| 25 2c 6f 75 74 25 2c 54 | 24 29 0d 1b 12 19 ea 6f |%,out%,T|$).....o|
|00004f90| 66 66 25 3a 6f 66 66 25 | 3d 28 74 77 25 83 34 29 |ff%:off%|=(tw%.4)|
|00004fa0| 2a 34 30 0d 1b 1c 11 e7 | 74 77 77 25 28 74 77 25 |*40.....|tww%(tw%|
|00004fb0| 29 3d 30 8c 0d 1b 26 32 | 20 20 c8 99 20 22 57 69 |)=0...&2| .. "Wi|
|00004fc0| 6d 70 5f 4f 70 65 6e 54 | 65 6d 70 6c 61 74 65 22 |mp_OpenT|emplate"|
|00004fd0| 2c 2c 73 64 6c 61 6e 67 | 24 2b 22 2e 54 65 6d 70 |,,sdlang|$+".Temp|
|00004fe0| 6c 61 74 65 73 22 0d 1b | 30 43 20 20 c8 99 20 22 |lates"..|0C .. "|
|00004ff0| 57 69 6d 70 5f 4c 6f 61 | 64 54 65 6d 70 6c 61 74 |Wimp_Loa|dTemplat|
|00005000| 65 22 2c 2c 71 25 2c 69 | 6e 64 25 2c 73 70 25 2b |e",,q%,i|nd%,sp%+|
|00005010| 73 69 7a 65 25 2c 2d 31 | 2c 22 74 61 73 6b 22 2c |size%,-1|,"task",|
|00005020| 30 20 b8 2c 2c 69 6e 64 | 25 0d 1b 3a 27 20 20 74 |0 .,,ind|%..:' t|
|00005030| 77 74 25 28 74 77 25 29 | 3d 71 25 21 37 32 3a 71 |wt%(tw%)|=q%!72:q|
|00005040| 25 21 34 34 3d 2d 74 77 | 77 6d 61 78 25 2a 33 32 |%!44=-tw|wmax%*32|
|00005050| 0d 1b 44 41 20 20 21 71 | 25 3d 21 71 25 2b 6f 66 |..DA !q|%=!q%+of|
|00005060| 66 25 3a 71 25 21 38 3d | 71 25 21 38 2b 6f 66 66 |f%:q%!8=|q%!8+off|
|00005070| 25 3a 71 25 21 34 3d 71 | 25 21 34 2d 6f 66 66 25 |%:q%!4=q|%!4-off%|
|00005080| 3a 71 25 21 31 32 3d 71 | 25 21 31 32 2d 6f 66 66 |:q%!12=q|%!12-off|
|00005090| 25 0d 1b 4e 2c 20 20 c8 | 99 20 22 57 69 6d 70 5f |%..N, .|. "Wimp_|
|000050a0| 43 72 65 61 74 65 57 69 | 6e 64 6f 77 22 2c 2c 71 |CreateWi|ndow",,q|
|000050b0| 25 20 b8 20 74 77 77 25 | 28 74 77 25 29 0d 1b 58 |% . tww%|(tw%)..X|
|000050c0| 1d 20 20 c8 99 20 22 57 | 69 6d 70 5f 43 6c 6f 73 |. .. "W|imp_Clos|
|000050d0| 65 54 65 6d 70 6c 61 74 | 65 22 0d 1b 62 0c 20 20 |eTemplat|e"..b. |
|000050e0| c8 8e 74 77 25 ca 0d 1b | 6c 1c 20 20 20 20 c9 30 |..tw%...|l. .0|
|000050f0| 3a de 74 77 62 75 66 30 | 24 28 74 77 77 6d 61 78 |:.twbuf0|$(twwmax|
|00005100| 25 29 0d 1b 76 1c 20 20 | 20 20 c9 31 3a de 74 77 |%)..v. | .1:.tw|
|00005110| 62 75 66 31 24 28 74 77 | 77 6d 61 78 25 29 0d 1b |buf1$(tw|wmax%)..|
|00005120| 80 1c 20 20 20 20 c9 32 | 3a de 74 77 62 75 66 32 |.. .2|:.twbuf2|
|00005130| 24 28 74 77 77 6d 61 78 | 25 29 0d 1b 8a 1c 20 20 |$(twwmax|%).... |
|00005140| 20 20 c9 33 3a de 74 77 | 62 75 66 33 24 28 74 77 | .3:.tw|buf3$(tw|
|00005150| 77 6d 61 78 25 29 0d 1b | 94 1c 20 20 20 20 c9 34 |wmax%)..|.. .4|
|00005160| 3a de 74 77 62 75 66 34 | 24 28 74 77 77 6d 61 78 |:.twbuf4|$(twwmax|
|00005170| 25 29 0d 1b 9e 1c 20 20 | 20 20 c9 35 3a de 74 77 |%).... | .5:.tw|
|00005180| 62 75 66 35 24 28 74 77 | 77 6d 61 78 25 29 0d 1b |buf5$(tw|wmax%)..|
|00005190| a8 1c 20 20 20 20 c9 36 | 3a de 74 77 62 75 66 36 |.. .6|:.twbuf6|
|000051a0| 24 28 74 77 77 6d 61 78 | 25 29 0d 1b b2 3a 20 20 |$(twwmax|%)...: |
|000051b0| 20 20 7f 3a f2 68 61 6c | 74 28 22 43 61 6e 27 74 | .:.hal|t("Can't|
|000051c0| 20 6d 61 6b 65 20 61 6e | 6f 74 68 65 72 20 74 61 | make an|other ta|
|000051d0| 73 6b 77 69 6e 64 6f 77 | 20 62 75 66 66 65 72 21 |skwindow| buffer!|
|000051e0| 22 29 3a e1 0d 1b bc 07 | 20 20 cb 0d 1b c6 07 20 |"):.....| ..... |
|000051f0| 20 cc 0d 1b d0 0c 20 20 | c8 8e 74 77 25 ca 0d 1b | ..... |..tw%...|
|00005200| da 17 20 20 20 20 c9 30 | 3a 74 77 62 75 66 30 24 |.. .0|:twbuf0$|
|00005210| 28 29 3d 22 22 0d 1b e4 | 17 20 20 20 20 c9 31 3a |()=""...|. .1:|
|00005220| 74 77 62 75 66 31 24 28 | 29 3d 22 22 0d 1b ee 17 |twbuf1$(|)=""....|
|00005230| 20 20 20 20 c9 32 3a 74 | 77 62 75 66 32 24 28 29 | .2:t|wbuf2$()|
|00005240| 3d 22 22 0d 1b f8 17 20 | 20 20 20 c9 33 3a 74 77 |="".... | .3:tw|
|00005250| 62 75 66 33 24 28 29 3d | 22 22 0d 1c 02 17 20 20 |buf3$()=|"".... |
|00005260| 20 20 c9 34 3a 74 77 62 | 75 66 34 24 28 29 3d 22 | .4:twb|uf4$()="|
|00005270| 22 0d 1c 0c 17 20 20 20 | 20 c9 35 3a 74 77 62 75 |".... | .5:twbu|
|00005280| 66 35 24 28 29 3d 22 22 | 0d 1c 16 17 20 20 20 20 |f5$()=""|.... |
|00005290| c9 36 3a 74 77 62 75 66 | 36 24 28 29 3d 22 22 0d |.6:twbuf|6$()="".|
|000052a0| 1c 20 07 20 20 cb 0d 1c | 2a 05 cd 0d 1c 34 45 24 |. . ...|*....4E$|
|000052b0| 74 77 74 25 28 74 77 25 | 29 3d 54 24 2b 22 20 28 |twt%(tw%|)=T$+" (|
|000052c0| 52 75 6e 6e 69 6e 67 29 | 22 3a 74 64 61 74 61 24 |Running)|":tdata$|
|000052d0| 28 74 77 25 29 3d 22 22 | 3a 74 77 79 25 28 74 77 |(tw%)=""|:twy%(tw|
|000052e0| 25 29 3d 30 3a 74 77 6f | 25 28 74 77 25 29 3d 30 |%)=0:two|%(tw%)=0|
|000052f0| 0d 1c 3e 1a e7 6f 75 74 | 25 f2 66 72 6f 6e 74 28 |..>..out|%.front(|
|00005300| 74 77 77 25 28 74 77 25 | 29 29 0d 1c 48 05 e1 0d |tww%(tw%|))..H...|
|00005310| 1c 52 04 0d 1c 5c 25 dd | f2 75 70 64 61 74 65 5f |.R...\%.|.update_|
|00005320| 74 78 74 28 75 78 30 25 | 2c 75 79 30 25 2c 75 78 |txt(ux0%|,uy0%,ux|
|00005330| 31 25 2c 75 79 31 25 29 | 0d 1c 66 36 21 71 25 3d |1%,uy1%)|..f6!q%=|
|00005340| 74 78 74 25 3a 71 25 21 | 34 3d 75 78 30 25 3a 71 |txt%:q%!|4=ux0%:q|
|00005350| 25 21 38 3d 75 79 30 25 | 3a 71 25 21 31 32 3d 75 |%!8=uy0%|:q%!12=u|
|00005360| 78 31 25 3a 71 25 21 31 | 36 3d 75 79 31 25 0d 1c |x1%:q%!1|6=uy1%..|
|00005370| 70 25 c8 99 22 57 69 6d | 70 5f 55 70 64 61 74 65 |p%.."Wim|p_Update|
|00005380| 57 69 6e 64 6f 77 22 2c | 2c 71 25 20 b8 20 6d 6f |Window",|,q% . mo|
|00005390| 72 65 25 0d 1c 7a 14 f2 | 64 72 61 77 5f 74 78 74 |re%..z..|draw_txt|
|000053a0| 28 6d 6f 72 65 25 29 0d | 1c 84 05 e1 0d 1c 8e 04 |(more%).|........|
|000053b0| 0d 1c 98 25 dd f2 75 70 | 64 61 74 65 5f 6d 73 67 |...%..up|date_msg|
|000053c0| 28 75 78 30 25 2c 75 79 | 30 25 2c 75 78 31 25 2c |(ux0%,uy|0%,ux1%,|
|000053d0| 75 79 31 25 29 0d 1c a2 | 37 21 71 25 3d 6d 65 73 |uy1%)...|7!q%=mes|
|000053e0| 73 25 3a 71 25 21 34 3d | 75 78 30 25 3a 71 25 21 |s%:q%!4=|ux0%:q%!|
|000053f0| 38 3d 75 79 30 25 3a 71 | 25 21 31 32 3d 75 78 31 |8=uy0%:q|%!12=ux1|
|00005400| 25 3a 71 25 21 31 36 3d | 75 79 31 25 0d 1c ac 25 |%:q%!16=|uy1%...%|
|00005410| c8 99 22 57 69 6d 70 5f | 55 70 64 61 74 65 57 69 |.."Wimp_|UpdateWi|
|00005420| 6e 64 6f 77 22 2c 2c 71 | 25 20 b8 20 6d 6f 72 65 |ndow",,q|% . more|
|00005430| 25 0d 1c b6 14 f2 64 72 | 61 77 5f 6d 73 67 28 6d |%.....dr|aw_msg(m|
|00005440| 6f 72 65 25 29 0d 1c c0 | 05 e1 0d 1c ca 04 0d 1c |ore%)...|........|
|00005450| d4 28 dd f2 75 70 64 61 | 74 65 5f 74 77 28 74 77 |.(..upda|te_tw(tw|
|00005460| 25 2c 75 78 30 25 2c 75 | 79 30 25 2c 75 78 31 25 |%,ux0%,u|y0%,ux1%|
|00005470| 2c 75 79 31 25 29 0d 1c | de 3b 21 71 25 3d 74 77 |,uy1%)..|.;!q%=tw|
|00005480| 77 25 28 74 77 25 29 3a | 71 25 21 34 3d 75 78 30 |w%(tw%):|q%!4=ux0|
|00005490| 25 3a 71 25 21 38 3d 75 | 79 30 25 3a 71 25 21 31 |%:q%!8=u|y0%:q%!1|
|000054a0| 32 3d 75 78 31 25 3a 71 | 25 21 31 36 3d 75 79 31 |2=ux1%:q|%!16=uy1|
|000054b0| 25 0d 1c e8 25 c8 99 22 | 57 69 6d 70 5f 55 70 64 |%...%.."|Wimp_Upd|
|000054c0| 61 74 65 57 69 6e 64 6f | 77 22 2c 2c 71 25 20 b8 |ateWindo|w",,q% .|
|000054d0| 20 6d 6f 72 65 25 0d 1c | f2 17 f2 64 72 61 77 5f | more%..|...draw_|
|000054e0| 74 77 28 74 77 25 2c 6d | 6f 72 65 25 29 0d 1c fc |tw(tw%,m|ore%)...|
|000054f0| 05 e1 0d 1d 06 04 0d 1d | 10 15 dd f2 64 72 61 77 |........|....draw|
|00005500| 5f 6d 73 67 28 6d 6f 72 | 65 25 29 0d 1d 1a 0c c8 |_msg(mor|e%).....|
|00005510| 95 20 6d 6f 72 65 25 0d | 1d 24 13 20 20 f2 69 6e |. more%.|.$. .in|
|00005520| 66 6f 28 71 25 2b 34 29 | 3a da 0d 1d 2e 33 20 20 |fo(q%+4)|:....3 |
|00005530| 74 6f 70 25 3d 94 28 67 | 79 31 25 2d 62 79 25 2b |top%=.(g|y1%-by%+|
|00005540| 31 36 29 81 33 32 3a 62 | 6f 74 25 3d 94 28 67 79 |16).32:b|ot%=.(gy|
|00005550| 30 25 2d 62 79 25 2b 31 | 36 29 81 33 32 0d 1d 38 |0%-by%+1|6).32..8|
|00005560| 37 20 20 e7 62 6f 74 25 | 3e 6d 73 67 6d 61 78 25 |7 .bot%|>msgmax%|
|00005570| 20 8c 62 6f 74 25 3d 6d | 73 67 6d 61 78 25 3a e7 | .bot%=m|sgmax%:.|
|00005580| 74 6f 70 25 3e 62 6f 74 | 25 20 8c 74 6f 70 25 3d |top%>bot|% .top%=|
|00005590| 62 6f 74 25 0d 1d 42 28 | 20 20 c8 99 22 57 69 6d |bot%..B(| .."Wim|
|000055a0| 70 5f 53 65 74 43 6f 6c | 6f 75 72 22 2c 37 3a e3 |p_SetCol|our",7:.|
|000055b0| 4c 25 3d 74 6f 70 25 b8 | 62 6f 74 25 0d 1d 4c 35 |L%=top%.|bot%..L5|
|000055c0| 20 20 ec 62 78 25 2b 34 | 2d 6d 73 67 63 25 2a 28 | .bx%+4|-msgc%*(|
|000055d0| 6d 73 67 77 25 81 32 2d | a9 6d 73 67 24 28 4c 25 |msgw%.2-|.msg$(L%|
|000055e0| 29 2a 38 29 2c 62 79 25 | 2d 4c 25 2a 33 32 2d 31 |)*8),by%|-L%*32-1|
|000055f0| 36 0d 1d 56 11 20 20 f1 | 6d 73 67 24 28 4c 25 29 |6..V. .|msg$(L%)|
|00005600| 3a ed 0d 1d 60 25 20 20 | c8 99 22 57 69 6d 70 5f |:...`% |.."Wimp_|
|00005610| 47 65 74 52 65 63 74 61 | 6e 67 6c 65 22 2c 2c 71 |GetRecta|ngle",,q|
|00005620| 25 b8 6d 6f 72 65 25 0d | 1d 6a 05 ce 0d 1d 74 05 |%.more%.|.j....t.|
|00005630| e1 0d 1d 7e 04 0d 1d 88 | 18 dd f2 64 72 61 77 5f |...~....|...draw_|
|00005640| 74 77 28 74 77 25 2c 6d | 6f 72 65 25 29 0d 1d 92 |tw(tw%,m|ore%)...|
|00005650| 1d ea 4c 25 2c 79 25 2c | 74 6f 70 25 2c 62 6f 74 |..L%,y%,|top%,bot|
|00005660| 25 3a c8 95 20 6d 6f 72 | 65 25 0d 1d 9c 13 20 20 |%:.. mor|e%.... |
|00005670| f2 69 6e 66 6f 28 71 25 | 2b 34 29 3a da 0d 1d a6 |.info(q%|+4):....|
|00005680| 2d 20 20 74 6f 70 25 3d | 94 28 67 79 31 25 2d 62 |- top%=|.(gy1%-b|
|00005690| 79 25 29 81 33 32 3a 62 | 6f 74 25 3d 94 28 67 79 |y%).32:b|ot%=.(gy|
|000056a0| 30 25 2d 62 79 25 29 81 | 33 32 0d 1d b0 37 20 20 |0%-by%).|32...7 |
|000056b0| e7 62 6f 74 25 3e 74 77 | 77 6d 61 78 25 20 8c 62 |.bot%>tw|wmax% .b|
|000056c0| 6f 74 25 3d 74 77 77 6d | 61 78 25 3a e7 74 6f 70 |ot%=twwm|ax%:.top|
|000056d0| 25 3e 62 6f 74 25 20 8c | 74 6f 70 25 3d 62 6f 74 |%>bot% .|top%=bot|
|000056e0| 25 0d 1d ba 28 20 20 c8 | 99 22 57 69 6d 70 5f 53 |%...( .|."Wimp_S|
|000056f0| 65 74 43 6f 6c 6f 75 72 | 22 2c 37 3a e3 4c 25 3d |etColour|",7:.L%=|
|00005700| 74 6f 70 25 b8 62 6f 74 | 25 0d 1d c4 1f 20 20 79 |top%.bot|%.... y|
|00005710| 25 3d 28 4c 25 2b 74 77 | 6f 25 28 74 77 25 29 29 |%=(L%+tw|o%(tw%))|
|00005720| 83 74 77 77 6d 61 78 25 | 0d 1d ce 18 20 20 ec 62 |.twwmax%|.... .b|
|00005730| 78 25 2b 34 2c 62 79 25 | 2d 4c 25 2a 33 32 2d 34 |x%+4,by%|-L%*32-4|
|00005740| 0d 1d d8 0c 20 20 c8 8e | 74 77 25 ca 0d 1d e2 17 |.... ..|tw%.....|
|00005750| 20 20 20 20 c9 30 3a f1 | 74 77 62 75 66 30 24 28 | .0:.|twbuf0$(|
|00005760| 79 25 29 0d 1d ec 17 20 | 20 20 20 c9 31 3a f1 74 |y%).... | .1:.t|
|00005770| 77 62 75 66 31 24 28 79 | 25 29 0d 1d f6 17 20 20 |wbuf1$(y|%).... |
|00005780| 20 20 c9 32 3a f1 74 77 | 62 75 66 32 24 28 79 25 | .2:.tw|buf2$(y%|
|00005790| 29 0d 1e 00 17 20 20 20 | 20 c9 33 3a f1 74 77 62 |).... | .3:.twb|
|000057a0| 75 66 33 24 28 79 25 29 | 0d 1e 0a 17 20 20 20 20 |uf3$(y%)|.... |
|000057b0| c9 34 3a f1 74 77 62 75 | 66 34 24 28 79 25 29 0d |.4:.twbu|f4$(y%).|
|000057c0| 1e 14 17 20 20 20 20 c9 | 35 3a f1 74 77 62 75 66 |... .|5:.twbuf|
|000057d0| 35 24 28 79 25 29 0d 1e | 1e 17 20 20 20 20 c9 36 |5$(y%)..|.. .6|
|000057e0| 3a f1 74 77 62 75 66 36 | 24 28 79 25 29 0d 1e 28 |:.twbuf6|$(y%)..(|
|000057f0| 07 20 20 cb 0d 1e 32 07 | 20 20 ed 0d 1e 3c 25 20 |. ...2.| ...<% |
|00005800| 20 c8 99 22 57 69 6d 70 | 5f 47 65 74 52 65 63 74 | .."Wimp|_GetRect|
|00005810| 61 6e 67 6c 65 22 2c 2c | 71 25 b8 6d 6f 72 65 25 |angle",,|q%.more%|
|00005820| 0d 1e 46 05 ce 0d 1e 50 | 05 e1 0d 1e 5a 04 0d 1e |..F....P|....Z...|
|00005830| 64 15 dd f2 64 72 61 77 | 5f 74 78 74 28 6d 6f 72 |d...draw|_txt(mor|
|00005840| 65 25 29 0d 1e 6e 1d ea | 4c 25 2c 79 25 2c 74 6f |e%)..n..|L%,y%,to|
|00005850| 70 25 2c 62 6f 74 25 3a | c8 95 20 6d 6f 72 65 25 |p%,bot%:|.. more%|
|00005860| 0d 1e 78 13 20 20 f2 69 | 6e 66 6f 28 71 25 2b 34 |..x. .i|nfo(q%+4|
|00005870| 29 3a da 0d 1e 82 2d 20 | 20 74 6f 70 25 3d 94 28 |):....- | top%=.(|
|00005880| 67 79 31 25 2d 62 79 25 | 29 81 33 32 3a 62 6f 74 |gy1%-by%|).32:bot|
|00005890| 25 3d 94 28 67 79 30 25 | 2d 62 79 25 29 81 33 32 |%=.(gy0%|-by%).32|
|000058a0| 0d 1e 8c 33 20 20 e7 62 | 6f 74 25 3e 74 78 74 79 |...3 .b|ot%>txty|
|000058b0| 25 20 8c 62 6f 74 25 3d | 74 78 74 79 25 3a e7 74 |% .bot%=|txty%:.t|
|000058c0| 6f 70 25 3e 62 6f 74 25 | 20 8c 74 6f 70 25 3d 62 |op%>bot%| .top%=b|
|000058d0| 6f 74 25 0d 1e 96 27 20 | 20 e3 4c 25 3d 74 6f 70 |ot%...' | .L%=top|
|000058e0| 25 b8 62 6f 74 25 3a 79 | 25 3d 28 4c 25 2b 74 78 |%.bot%:y|%=(L%+tx|
|000058f0| 74 6f 25 29 83 74 78 74 | 79 25 0d 1e a0 3d 20 20 |to%).txt|y%...= |
|00005900| ec 62 78 25 2c 62 79 25 | 2d 4c 25 2a 33 32 3a c8 |.bx%,by%|-L%*32:.|
|00005910| 99 22 57 69 6d 70 5f 53 | 65 74 43 6f 6c 6f 75 72 |."Wimp_S|etColour|
|00005920| 22 2c 74 78 74 63 25 3f | 79 25 3a f1 74 78 74 6c |",txtc%?|y%:.txtl|
|00005930| 24 28 79 25 29 3a ed 0d | 1e aa 27 20 20 c8 99 22 |$(y%):..|..' .."|
|00005940| 57 69 6d 70 5f 47 65 74 | 52 65 63 74 61 6e 67 6c |Wimp_Get|Rectangl|
|00005950| 65 22 2c 2c 71 25 20 b8 | 20 6d 6f 72 65 25 0d 1e |e",,q% .| more%..|
|00005960| b4 05 ce 0d 1e be 05 e1 | 0d 1e c8 04 0d 1e d2 11 |........|........|
|00005970| dd f2 73 74 72 5f 74 78 | 74 28 41 24 29 0d 1e dc |..str_tx|t(A$)...|
|00005980| 13 e7 64 61 74 61 24 3e | 22 22 f2 66 6c 75 73 68 |..data$>|"".flush|
|00005990| 0d 1e e6 13 f2 6c 69 6e | 65 5f 74 78 74 28 41 24 |.....lin|e_txt(A$|
|000059a0| 2c 37 29 0d 1e f0 05 e1 | 0d 1e fa 04 0d 1f 04 12 |,7).....|........|
|000059b0| dd f2 77 61 72 6e 5f 74 | 78 74 28 41 24 29 0d 1f |..warn_t|xt(A$)..|
|000059c0| 0e 14 f2 6c 69 6e 65 5f | 74 78 74 28 41 24 2c 31 |...line_|txt(A$,1|
|000059d0| 31 29 0d 1f 18 05 e1 0d | 1f 22 04 0d 1f 2c 0b dd |1)......|."...,..|
|000059e0| f2 66 6c 75 73 68 0d 1f | 36 0e e7 64 61 74 61 24 |.flush..|6..data$|
|000059f0| 3e 22 22 8c 0d 1f 40 2b | 20 20 e7 28 64 65 62 75 |>""...@+| .(debu|
|00005a00| 67 25 80 32 29 3c 3e 30 | 80 65 72 72 43 25 3c 3e |g%.2)<>0|.errC%<>|
|00005a10| 30 20 d5 23 65 72 72 43 | 25 2c 64 61 74 61 24 0d |0 .#errC|%,data$.|
|00005a20| 1f 4a 1f 20 20 e7 6d 73 | 67 5f 63 73 25 3e 30 f2 |.J. .ms|g_cs%>0.|
|00005a30| 6d 73 67 66 69 6c 74 28 | 64 61 74 61 24 29 0d 1f |msgfilt(|data$)..|
|00005a40| 54 21 20 20 f2 6c 69 6e | 65 5f 74 78 74 28 64 61 |T! .lin|e_txt(da|
|00005a50| 74 61 24 2c 35 29 3a 64 | 61 74 61 24 3d 22 22 0d |ta$,5):d|ata$="".|
|00005a60| 1f 5e 05 cd 0d 1f 68 05 | e1 0d 1f 72 04 0d 1f 7c |.^....h.|...r...||
|00005a70| 18 dd a4 72 65 63 3a e7 | 64 65 76 69 63 65 25 3d |...rec:.|device%=|
|00005a80| 30 3a 3d 2d 31 0d 1f 86 | 16 5a 25 3d a4 64 28 31 |0:=-1...|.Z%=.d(1|
|00005a90| 2c 70 6f 72 74 25 2c 30 | 2c 30 29 0d 1f 90 22 e7 |,port%,0|,0)...".|
|00005aa0| 5a 25 3e 30 80 28 64 65 | 62 75 67 25 80 32 29 3e |Z%>0.(de|bug%.2)>|
|00005ab0| 30 84 6d 73 67 5f 63 73 | 25 3e 30 20 8c 0d 1f 9a |0.msg_cs|%>0 ....|
|00005ac0| 20 20 20 e7 5a 25 3e 33 | 31 20 80 5a 25 3c 31 32 | .Z%>3|1 .Z%<12|
|00005ad0| 38 20 8c 64 61 74 61 24 | 2b 3d bd 5a 25 0d 1f a4 |8 .data$|+=.Z%...|
|00005ae0| 27 20 20 e7 5a 25 3d 31 | 33 84 5a 25 3d 31 30 84 |' .Z%=1|3.Z%=10.|
|00005af0| a9 64 61 74 61 24 3e 3d | 74 78 74 78 25 20 f2 66 |.data$>=|txtx% .f|
|00005b00| 6c 75 73 68 0d 1f ae 05 | cd 0d 1f b8 07 3d 5a 25 |lush....|.....=Z%|
|00005b10| 0d 1f c2 04 0d 1f cc 1c | dd f2 74 77 5f 64 61 74 |........|..tw_dat|
|00005b20| 61 28 74 77 25 2c 62 75 | 66 25 2c 6c 65 6e 25 29 |a(tw%,bu|f%,len%)|
|00005b30| 0d 1f d6 07 ea 6c 25 0d | 1f e0 19 e3 6c 25 3d 30 |.....l%.|....l%=0|
|00005b40| b8 6c 65 6e 25 3a 43 25 | 3d 62 75 66 25 3f 6c 25 |.len%:C%|=buf%?l%|
|00005b50| 0d 1f ea 26 20 20 e7 43 | 25 3e 33 31 20 80 43 25 |...& .C|%>31 .C%|
|00005b60| 3c 31 32 38 20 8c 74 64 | 61 74 61 24 28 74 77 25 |<128 .td|ata$(tw%|
|00005b70| 29 2b 3d bd 43 25 0d 1f | f4 24 20 20 e7 43 25 3d |)+=.C%..|.$ .C%=|
|00005b80| 31 33 84 43 25 3d 31 30 | 84 a9 74 64 61 74 61 24 |13.C%=10|..tdata$|
|00005b90| 28 74 77 25 29 3e 37 38 | 20 8c 0d 1f fe 49 20 20 |(tw%)>78| ....I |
|00005ba0| 20 20 f2 74 77 5f 74 78 | 74 28 74 77 25 2c 74 64 | .tw_tx|t(tw%,td|
|00005bb0| 61 74 61 24 28 74 77 25 | 29 29 3a e7 74 67 65 74 |ata$(tw%|)):.tget|
|00005bc0| 25 3d 74 77 25 80 74 67 | 65 74 24 28 30 29 3e 22 |%=tw%.tg|et$(0)>"|
|00005bd0| 22 f2 74 67 65 74 28 74 | 64 61 74 61 24 28 74 77 |".tget(t|data$(tw|
|00005be0| 25 29 29 0d 20 08 16 20 | 20 20 20 74 64 61 74 61 |%)). .. | tdata|
|00005bf0| 24 28 74 77 25 29 3d 22 | 22 0d 20 12 07 20 20 cd |$(tw%)="|". .. .|
|00005c00| 0d 20 1c 05 ed 0d 20 26 | 2c e7 74 67 65 74 25 3d |. .... &|,.tget%=|
|00005c10| 74 77 25 80 74 67 65 74 | 24 28 30 29 3e 22 22 f2 |tw%.tget|$(0)>"".|
|00005c20| 74 67 65 74 28 74 64 61 | 74 61 24 28 74 77 25 29 |tget(tda|ta$(tw%)|
|00005c30| 29 0d 20 30 05 e1 0d 20 | 3a 04 0d 20 44 14 dd f2 |). 0... |:.. D...|
|00005c40| 74 77 5f 74 78 74 28 74 | 77 25 2c 41 24 29 0d 20 |tw_txt(t|w%,A$). |
|00005c50| 4e 0a ea 74 25 2c 42 24 | 0d 20 58 34 e7 28 64 65 |N..t%,B$|. X4.(de|
|00005c60| 62 75 67 25 80 34 29 3c | 3e 30 80 65 72 72 43 25 |bug%.4)<|>0.errC%|
|00005c70| 3c 3e 30 20 d5 23 65 72 | 72 43 25 2c 22 54 57 22 |<>0 .#er|rC%,"TW"|
|00005c80| 2b c3 74 77 25 2b 22 3e | 22 2b 41 24 0d 20 62 0b |+.tw%+">|"+A$. b.|
|00005c90| c8 95 41 24 3e 22 22 0d | 20 6c 26 20 20 74 25 3d |..A$>"".| l& t%=|
|00005ca0| 28 74 77 79 25 28 74 77 | 25 29 2b 74 77 6f 25 28 |(twy%(tw|%)+two%(|
|00005cb0| 74 77 25 29 29 83 74 77 | 77 6d 61 78 25 0d 20 76 |tw%)).tw|wmax%. v|
|00005cc0| 1b 20 20 42 24 3d c0 41 | 24 2c 37 39 29 3a 41 24 |. B$=.A|$,79):A$|
|00005cd0| 3d c1 41 24 2c 37 39 29 | 0d 20 80 0c 20 20 c8 8e |=.A$,79)|. .. ..|
|00005ce0| 74 77 25 ca 0d 20 8a 19 | 20 20 20 20 c9 30 3a 74 |tw%.. ..| .0:t|
|00005cf0| 77 62 75 66 30 24 28 74 | 25 29 3d 42 24 0d 20 94 |wbuf0$(t|%)=B$. .|
|00005d00| 19 20 20 20 20 c9 31 3a | 74 77 62 75 66 31 24 28 |. .1:|twbuf1$(|
|00005d10| 74 25 29 3d 42 24 0d 20 | 9e 19 20 20 20 20 c9 32 |t%)=B$. |.. .2|
|00005d20| 3a 74 77 62 75 66 32 24 | 28 74 25 29 3d 42 24 0d |:twbuf2$|(t%)=B$.|
|00005d30| 20 a8 19 20 20 20 20 c9 | 33 3a 74 77 62 75 66 33 | .. .|3:twbuf3|
|00005d40| 24 28 74 25 29 3d 42 24 | 0d 20 b2 19 20 20 20 20 |$(t%)=B$|. .. |
|00005d50| c9 34 3a 74 77 62 75 66 | 34 24 28 74 25 29 3d 42 |.4:twbuf|4$(t%)=B|
|00005d60| 24 0d 20 bc 19 20 20 20 | 20 c9 35 3a 74 77 62 75 |$. .. | .5:twbu|
|00005d70| 66 35 24 28 74 25 29 3d | 42 24 0d 20 c6 19 20 20 |f5$(t%)=|B$. .. |
|00005d80| 20 20 c9 36 3a 74 77 62 | 75 66 36 24 28 74 25 29 | .6:twb|uf6$(t%)|
|00005d90| 3d 42 24 0d 20 d0 07 20 | 20 cb 0d 20 da 1a 20 20 |=B$. .. | .. .. |
|00005da0| e7 74 77 79 25 28 74 77 | 25 29 3c 74 77 77 6d 61 |.twy%(tw|%)<twwma|
|00005db0| 78 25 20 8c 0d 20 e4 44 | 20 20 20 20 21 71 25 3d |x% .. .D| !q%=|
|00005dc0| 74 77 77 25 28 74 77 25 | 29 3a c8 99 22 57 69 6d |tww%(tw%|):.."Wim|
|00005dd0| 70 5f 47 65 74 57 69 6e | 64 6f 77 53 74 61 74 65 |p_GetWin|dowState|
|00005de0| 22 2c 2c 71 25 3a 66 25 | 3d 28 71 25 21 33 32 29 |",,q%:f%|=(q%!32)|
|00005df0| 80 28 31 3c 3c 31 36 29 | 0d 20 ee 64 20 20 20 20 |.(1<<16)|. .d |
|00005e00| e7 74 77 79 25 28 74 77 | 25 29 3e 3d 94 28 71 25 |.twy%(tw|%)>=.(q%|
|00005e10| 21 38 2d 71 25 21 31 36 | 29 81 33 32 20 8c 71 25 |!8-q%!16|).32 .q%|
|00005e20| 21 32 34 3d 2d 28 74 77 | 79 25 28 74 77 25 29 2a |!24=-(tw|y%(tw%)*|
|00005e30| 33 32 2d 94 28 71 25 21 | 38 2d 71 25 21 31 36 29 |32-.(q%!|8-q%!16)|
|00005e40| 29 2d 33 32 3a c8 99 22 | 57 69 6d 70 5f 4f 70 65 |)-32:.."|Wimp_Ope|
|00005e50| 6e 57 69 6e 64 6f 77 22 | 2c 2c 71 25 0d 20 f8 3f |nWindow"|,,q%. .?|
|00005e60| 20 20 20 20 f2 75 70 64 | 61 74 65 5f 74 77 28 74 | .upd|ate_tw(t|
|00005e70| 77 25 2c 30 2c 2d 74 77 | 79 25 28 74 77 25 29 2a |w%,0,-tw|y%(tw%)*|
|00005e80| 33 32 2d 33 32 2c 31 32 | 38 30 2c 2d 74 77 79 25 |32-32,12|80,-twy%|
|00005e90| 28 74 77 25 29 2a 33 32 | 2b 34 29 0d 21 02 14 20 |(tw%)*32|+4).!.. |
|00005ea0| 20 20 20 74 77 79 25 28 | 74 77 25 29 2b 3d 31 0d | twy%(|tw%)+=1.|
|00005eb0| 21 0c 07 20 20 cc 0d 21 | 16 27 20 20 20 20 74 77 |!.. ..!|.' tw|
|00005ec0| 6f 25 28 74 77 25 29 3d | 28 74 77 6f 25 28 74 77 |o%(tw%)=|(two%(tw|
|00005ed0| 25 29 2b 31 29 83 74 77 | 77 6d 61 78 25 0d 21 20 |%)+1).tw|wmax%.! |
|00005ee0| 4b 20 20 20 20 c8 99 22 | 57 69 6d 70 5f 42 6c 6f |K .."|Wimp_Blo|
|00005ef0| 63 6b 43 6f 70 79 22 2c | 74 77 77 25 28 74 77 25 |ckCopy",|tww%(tw%|
|00005f00| 29 2c 30 2c 2d 33 32 2a | 74 77 77 6d 61 78 25 2c |),0,-32*|twwmax%,|
|00005f10| 31 32 38 30 2c 30 2c 30 | 2c 2d 33 32 2a 28 74 77 |1280,0,0|,-32*(tw|
|00005f20| 77 6d 61 78 25 2d 31 29 | 0d 21 2a 3c 20 20 20 20 |wmax%-1)|.!*< |
|00005f30| f2 75 70 64 61 74 65 5f | 74 77 28 74 77 25 2c 30 |.update_|tw(tw%,0|
|00005f40| 2c 2d 33 32 2a 74 77 77 | 6d 61 78 25 2c 31 32 38 |,-32*tww|max%,128|
|00005f50| 30 2c 2d 33 32 2a 28 74 | 77 77 6d 61 78 25 2d 31 |0,-32*(t|wwmax%-1|
|00005f60| 29 2b 34 29 0d 21 34 07 | 20 20 cd 0d 21 3e 05 ce |)+4).!4.| ..!>..|
|00005f70| 0d 21 48 05 e1 0d 21 52 | 04 0d 21 5c 17 dd f2 6c |.!H...!R|..!\...l|
|00005f80| 69 6e 65 5f 74 78 74 28 | 41 24 2c 63 6f 6c 25 29 |ine_txt(|A$,col%)|
|00005f90| 0d 21 66 15 ea 74 25 3a | f2 70 6f 6c 6c 28 73 6c |.!f..t%:|.poll(sl|
|00005fa0| 69 63 65 25 29 0d 21 70 | 0b c8 95 41 24 3e 22 22 |ice%).!p|...A$>""|
|00005fb0| 0d 21 7a 1d 20 20 74 25 | 3d 28 6c 6f 67 5f 79 25 |.!z. t%|=(log_y%|
|00005fc0| 2b 74 78 74 6f 25 29 83 | 74 78 74 79 25 0d 21 84 |+txto%).|txty%.!.|
|00005fd0| 28 20 20 74 78 74 6c 24 | 28 74 25 29 3d c0 41 24 |( txtl$|(t%)=.A$|
|00005fe0| 2c 74 78 74 78 25 29 3a | 41 24 3d c1 41 24 2c 74 |,txtx%):|A$=.A$,t|
|00005ff0| 78 74 78 25 29 0d 21 8e | 23 20 20 74 78 74 63 25 |xtx%).!.|# txtc%|
|00006000| 3f 74 25 3d 63 6f 6c 25 | 3a e7 6c 6f 67 5f 79 25 |?t%=col%|:.log_y%|
|00006010| 3c 74 78 74 79 25 20 8c | 0d 21 98 3f 20 20 20 20 |<txty% .|.!.? |
|00006020| 21 71 25 3d 74 78 74 25 | 3a c8 99 22 57 69 6d 70 |!q%=txt%|:.."Wimp|
|00006030| 5f 47 65 74 57 69 6e 64 | 6f 77 53 74 61 74 65 22 |_GetWind|owState"|
|00006040| 2c 2c 71 25 3a 66 25 3d | 28 71 25 21 33 32 29 80 |,,q%:f%=|(q%!32).|
|00006050| 28 31 3c 3c 31 36 29 0d | 21 a2 64 20 20 20 20 e7 |(1<<16).|!.d .|
|00006060| 66 25 3c 3e 30 80 6c 6f | 67 5f 79 25 3e 3d 94 28 |f%<>0.lo|g_y%>=.(|
|00006070| 71 25 21 38 2d 71 25 21 | 31 36 29 81 33 32 20 8c |q%!8-q%!|16).32 .|
|00006080| 71 25 21 32 34 3d 2d 28 | 6c 6f 67 5f 79 25 2a 33 |q%!24=-(|log_y%*3|
|00006090| 32 2d 94 28 71 25 21 38 | 2d 71 25 21 31 36 29 29 |2-.(q%!8|-q%!16))|
|000060a0| 2d 33 32 3a c8 99 22 57 | 69 6d 70 5f 4f 70 65 6e |-32:.."W|imp_Open|
|000060b0| 57 69 6e 64 6f 77 22 2c | 2c 71 25 0d 21 ac 36 20 |Window",|,q%.!.6 |
|000060c0| 20 20 20 f2 75 70 64 61 | 74 65 5f 74 78 74 28 30 | .upda|te_txt(0|
|000060d0| 2c 2d 6c 6f 67 5f 79 25 | 2a 33 32 2d 33 32 2c 31 |,-log_y%|*32-32,1|
|000060e0| 32 38 30 2c 2d 6c 6f 67 | 5f 79 25 2a 33 32 2b 34 |280,-log|_y%*32+4|
|000060f0| 29 0d 21 b6 11 20 20 20 | 20 6c 6f 67 5f 79 25 2b |).!.. | log_y%+|
|00006100| 3d 31 0d 21 c0 07 20 20 | cc 0d 21 ca 1d 20 20 20 |=1.!.. |..!.. |
|00006110| 20 74 78 74 6f 25 3d 28 | 74 78 74 6f 25 2b 31 29 | txto%=(|txto%+1)|
|00006120| 83 74 78 74 79 25 0d 21 | d4 42 20 20 20 20 c8 99 |.txty%.!|.B ..|
|00006130| 22 57 69 6d 70 5f 42 6c | 6f 63 6b 43 6f 70 79 22 |"Wimp_Bl|ockCopy"|
|00006140| 2c 74 78 74 25 2c 30 2c | 2d 33 32 2a 74 78 74 79 |,txt%,0,|-32*txty|
|00006150| 25 2c 31 32 38 30 2c 30 | 2c 30 2c 2d 33 32 2a 28 |%,1280,0|,0,-32*(|
|00006160| 74 78 74 79 25 2d 31 29 | 0d 21 de 35 20 20 20 20 |txty%-1)|.!.5 |
|00006170| f2 75 70 64 61 74 65 5f | 74 78 74 28 30 2c 2d 33 |.update_|txt(0,-3|
|00006180| 32 2a 74 78 74 79 25 2c | 31 32 38 30 2c 2d 33 32 |2*txty%,|1280,-32|
|00006190| 2a 28 74 78 74 79 25 2d | 31 29 2b 34 29 0d 21 e8 |*(txty%-|1)+4).!.|
|000061a0| 07 20 20 cd 0d 21 f2 05 | ce 0d 21 fc 05 e1 0d 22 |. ..!..|..!...."|
|000061b0| 06 04 0d 22 10 0d dd f2 | 63 6c 72 5f 74 78 74 0d |..."....|clr_txt.|
|000061c0| 22 1a 28 74 78 74 6c 24 | 28 29 3d 22 22 3a 6c 6f |".(txtl$|()="":lo|
|000061d0| 67 5f 79 25 3d 30 3a 74 | 78 74 6f 25 3d 30 3a 64 |g_y%=0:t|xto%=0:d|
|000061e0| 61 74 61 24 3d 22 22 0d | 22 24 2f f2 75 70 64 61 |ata$="".|"$/.upda|
|000061f0| 74 65 5f 74 78 74 28 30 | 2c 2d 74 78 74 79 25 2a |te_txt(0|,-txty%*|
|00006200| 33 32 2d 69 6f 66 66 25 | 2d 38 2c 31 36 2a 74 78 |32-ioff%|-8,16*tx|
|00006210| 74 78 25 2c 30 29 0d 22 | 2e 05 e1 0d 22 38 04 0d |tx%,0)."|...."8..|
|00006220| 22 42 0d dd f2 6c 6f 67 | 28 6d 24 29 0d 22 4c 11 |"B...log|(m$)."L.|
|00006230| e7 28 64 65 62 75 67 25 | 80 31 29 20 8c 0d 22 56 |.(debug%|.1) .."V|
|00006240| 12 20 20 f2 73 74 72 5f | 74 78 74 28 6d 24 29 0d |. .str_|txt(m$).|
|00006250| 22 60 1a 20 20 e7 65 72 | 72 43 25 3c 3e 30 20 d5 |"`. .er|rC%<>0 .|
|00006260| 23 65 72 72 43 25 2c 6d | 24 0d 22 6a 05 cd 0d 22 |#errC%,m|$."j..."|
|00006270| 74 05 e1 0d 22 7e 04 0d | 22 88 11 dd f2 6f 70 65 |t..."~..|"....ope|
|00006280| 6e 6c 6f 67 28 41 24 29 | 0d 22 92 11 42 24 3d a4 |nlog(A$)|."..B$=.|
|00006290| 70 61 72 61 6d 28 41 24 | 29 0d 22 9c 0c e7 42 24 |param(A$|)."...B$|
|000062a0| 3d 22 22 20 8c 0d 22 a6 | 17 20 20 f2 66 6c 75 73 |="" ..".|. .flus|
|000062b0| 68 3a f2 63 66 28 65 72 | 72 43 25 29 0d 22 b0 05 |h:.cf(er|rC%)."..|
|000062c0| cc 0d 22 ba 13 20 20 42 | 24 3d a4 63 61 6e 6f 6e |..".. B|$=.canon|
|000062d0| 28 42 24 29 0d 22 c4 22 | 20 20 c8 99 22 58 4f 53 |(B$)."."| .."XOS|
|000062e0| 5f 46 69 6e 64 22 2c 26 | 43 46 2c 42 24 b8 65 72 |_Find",&|CF,B$.er|
|000062f0| 72 43 25 3b 46 25 0d 22 | ce 2a 20 20 e7 28 46 25 |rC%;F%."|.* .(F%|
|00006300| 80 31 29 8c c8 99 22 58 | 4f 53 5f 46 69 6e 64 22 |.1)..."X|OS_Find"|
|00006310| 2c 26 38 46 2c 42 24 b8 | 65 72 72 43 25 3b 46 25 |,&8F,B$.|errC%;F%|
|00006320| 0d 22 d8 3a 20 20 e7 28 | 46 25 80 31 29 8c 65 72 |.".: .(|F%.1).er|
|00006330| 72 43 25 3d 30 3a f2 68 | 61 6c 74 28 22 46 61 69 |rC%=0:.h|alt("Fai|
|00006340| 6c 65 64 20 74 6f 20 6f | 70 65 6e 20 74 72 61 63 |led to o|pen trac|
|00006350| 65 20 66 69 6c 65 22 29 | 3a e1 0d 22 e2 1d 20 20 |e file")|:..".. |
|00006360| c8 99 22 58 4f 53 5f 46 | 69 6c 65 22 2c 31 38 2c |.."XOS_F|ile",18,|
|00006370| 42 24 2c 26 46 46 46 0d | 22 ec 1f 20 20 e7 65 72 |B$,&FFF.|".. .er|
|00006380| 72 43 25 3c 3e 30 20 8f | 23 65 72 72 43 25 3d a2 |rC%<>0 .|#errC%=.|
|00006390| 23 65 72 72 43 25 0d 22 | f6 05 cd 0d 23 00 05 e1 |#errC%."|....#...|
|000063a0| 0d 23 0a 04 0d 23 14 11 | dd f2 63 6c 61 69 6d 64 |.#...#..|..claimd|
|000063b0| 65 76 69 63 65 0d 23 1e | 3a 21 71 25 3d 32 35 36 |evice.#.|:!q%=256|
|000063c0| 3a 71 25 21 31 32 3d 30 | 3a 71 25 21 31 36 3d 31 |:q%!12=0|:q%!16=1|
|000063d0| 31 3a 71 25 21 32 30 3d | 32 3a 71 25 21 32 34 3d |1:q%!20=|2:q%!24=|
|000063e0| 64 72 69 76 65 72 6e 6f | 25 2b 70 6f 72 74 25 0d |driverno|%+port%.|
|000063f0| 23 28 1a 24 28 71 25 2b | 32 38 29 3d 22 53 4c 49 |#(.$(q%+|28)="SLI|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.