home *** CD-ROM | disk | FTP | other *** search
open in: 
MacOS 8.1
|
Win98
|
DOS
browse contents |
view JSON data
|
view as text
This file was processed as: ArcFS Archive
(archive/arcFS).
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| dexvert
| ArcFS Archive (archive/arcFS)
| magic
| Supported |
| 100%
| file
| RISC OS archive (ArcFS format)
| default
| |
| 99%
| file
| data
| default
| |
| 100%
| TrID
| Acorn ArcFS Archive
| default
| |
| 100%
| gt2
| Kopftext: 'Archive'
| default (weak)
| |
| 100%
| detectItEasy
| Archive: ArcFS
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 41 72 63 68 69 76 65 00 | d4 01 00 00 34 02 00 00 |Archive.|....4...|
|00000010| 28 00 00 00 64 00 00 00 | 00 00 00 00 00 00 00 00 |(...d...|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000050| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000060| 82 21 50 72 65 64 69 63 | 74 00 00 00 ff ff ff ff |.!Predic|t.......|
|00000070| 46 fd ff ff 9d 8f 2b 74 | 00 00 00 00 ff ff ff ff |F.....+t|........|
|00000080| b0 01 00 80 82 21 42 6f | 6f 74 00 00 00 00 00 00 |.....!Bo|ot......|
|00000090| 82 00 00 00 44 eb ff ff | c2 d3 a6 95 03 00 f8 6e |....D...|.......n|
|000000a0| 82 00 00 00 24 00 00 00 | 82 21 52 75 6e 00 04 00 |....$...|.!Run...|
|000000b0| 00 00 00 00 9b 01 00 00 | 46 eb ff ff 5a b9 3d 5a |........|F...Z.=Z|
|000000c0| 03 00 e6 d5 9b 01 00 00 | ca 00 00 00 82 21 52 55 |........|.....!RU|
|000000d0| 4e 49 4d 41 47 45 42 00 | 7f 63 00 00 46 f8 ff ff |NIMAGEB.|.c..F...|
|000000e0| d4 7f 2b 74 03 00 69 a9 | 7f 63 00 00 89 02 00 00 |..+t..i.|.c......|
|000000f0| 82 21 53 70 72 69 74 65 | 73 00 00 00 08 06 00 00 |.!Sprite|s.......|
|00000100| 46 f9 ff ff 3a ea 75 73 | 03 00 98 2f 08 06 00 00 |F...:.us|.../....|
|00000110| 2c 66 00 00 82 69 63 6f | 6e 73 00 00 00 00 00 00 |,f...ico|ns......|
|00000120| 18 39 00 00 46 f9 ff ff | 31 e3 75 73 03 00 c3 90 |.9..F...|1.us....|
|00000130| 18 39 00 00 58 6c 00 00 | 82 69 63 6f 6e 73 32 32 |.9..Xl..|.icons22|
|00000140| 00 00 00 00 40 39 00 00 | 46 f9 ff ff 7e e6 75 73 |....@9..|F...~.us|
|00000150| 03 00 60 1d 40 39 00 00 | 94 a5 00 00 82 4d 65 73 |..`.@9..|.....Mes|
|00000160| 73 61 67 65 73 00 00 00 | 4e 02 00 00 45 ff ff ff |sages...|N...E...|
|00000170| d5 27 26 1d 03 00 82 eb | 4e 02 00 00 f8 de 00 00 |.'&.....|N.......|
|00000180| 82 50 61 6c 65 74 74 65 | 00 00 00 00 78 00 00 00 |.Palette|....x...|
|00000190| 44 ed ff ff 57 d6 ec 32 | 03 00 cf ba 78 00 00 00 |D...W..2|....x...|
|000001a0| 6a e1 00 00 82 52 65 61 | 64 4d 65 00 00 00 00 00 |j....Rea|dMe.....|
|000001b0| b9 1c 00 00 46 ff ff ff | 63 56 9d 65 03 00 8f db |....F...|cV.e....|
|000001c0| b9 1c 00 00 06 e2 00 00 | 82 54 65 6d 70 6c 61 74 |........|.Templat|
|000001d0| 65 73 00 00 63 0c 00 00 | 46 ec ff ff 15 9a 35 73 |es..c...|F.....5s|
|000001e0| 03 00 ce b9 63 0c 00 00 | e3 fe 00 00 00 00 00 00 |....c...|........|
|000001f0| c3 00 04 00 00 00 00 00 | 85 00 00 00 43 eb ff ff |........|....C...|
|00000200| 68 af 05 a1 03 0c 16 68 | 6c 00 00 00 44 01 00 00 |h......h|l...D...|
|00000210| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000220| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000230| 20 01 00 00 46 69 6c 65 | 44 61 74 61 82 21 42 6f | ...File|Data.!Bo|
|00000240| 6f 74 00 00 00 00 00 00 | 82 00 00 00 44 eb ff ff |ot......|....D...|
|00000250| c2 d3 a6 95 03 00 f8 6e | 53 65 74 20 21 50 72 65 |.......n|Set !Pre|
|00000260| 64 69 63 74 24 44 69 72 | 20 3c 4f 62 65 79 24 44 |dict$Dir| <Obey$D|
|00000270| 69 72 3e 0a 49 63 6f 6e | 53 70 72 69 74 65 73 20 |ir>.Icon|Sprites |
|00000280| 3c 4f 62 65 79 24 44 69 | 72 3e 2e 21 53 70 72 69 |<Obey$Di|r>.!Spri|
|00000290| 74 65 73 0a 53 65 74 20 | 21 50 72 65 64 69 63 74 |tes.Set |!Predict|
|000002a0| 24 50 61 74 68 20 3c 4f | 62 65 79 24 44 69 72 3e |$Path <O|bey$Dir>|
|000002b0| 0a 53 65 74 20 41 6c 69 | 61 73 24 52 75 6e 50 72 |.Set Ali|as$RunPr|
|000002c0| 65 64 69 63 74 20 52 75 | 6e 20 3c 4f 62 65 79 24 |edict Ru|n <Obey$|
|000002d0| 44 69 72 3e 20 25 2a 30 | 0a 0a 46 69 6c 65 44 61 |Dir> %*0|..FileDa|
|000002e0| 74 61 82 21 52 75 6e 00 | 04 00 00 00 00 00 9b 01 |ta.!Run.|........|
|000002f0| 00 00 46 eb ff ff 5a b9 | 3d 5a 03 00 e6 d5 53 65 |..F...Z.|=Z....Se|
|00000300| 74 20 21 50 72 65 64 69 | 63 74 24 44 69 72 20 3c |t !Predi|ct$Dir <|
|00000310| 4f 62 65 79 24 44 69 72 | 3e 0a 49 63 6f 6e 53 70 |Obey$Dir|>.IconSp|
|00000320| 72 69 74 65 73 20 3c 4f | 62 65 79 24 44 69 72 3e |rites <O|bey$Dir>|
|00000330| 2e 21 53 70 72 69 74 65 | 73 0a 57 69 6d 70 53 6c |.!Sprite|s.WimpSl|
|00000340| 6f 74 20 2d 6d 69 6e 20 | 37 32 4b 20 2d 6d 61 78 |ot -min |72K -max|
|00000350| 20 37 32 4b 0a 52 4d 45 | 6e 73 75 72 65 20 43 6f | 72K.RME|nsure Co|
|00000360| 6c 6f 75 72 54 72 61 6e | 73 20 30 2e 35 31 20 52 |lourTran|s 0.51 R|
|00000370| 4d 4c 6f 61 64 20 53 79 | 73 74 65 6d 3a 4d 6f 64 |MLoad Sy|stem:Mod|
|00000380| 75 6c 65 73 2e 43 6f 6c | 6f 75 72 73 0a 52 4d 45 |ules.Col|ours.RME|
|00000390| 6e 73 75 72 65 20 43 6f | 6c 6f 75 72 54 72 61 6e |nsure Co|lourTran|
|000003a0| 73 20 30 2e 35 31 20 45 | 72 72 6f 72 20 59 6f 75 |s 0.51 E|rror You|
|000003b0| 20 6e 65 65 64 20 43 6f | 6c 6f 75 72 54 72 61 6e | need Co|lourTran|
|000003c0| 73 20 30 2e 35 31 20 6f | 72 20 6c 61 74 65 72 0a |s 0.51 o|r later.|
|000003d0| 52 4d 45 6e 73 75 72 65 | 20 4d 65 73 73 61 67 65 |RMEnsure| Message|
|000003e0| 54 72 61 6e 73 20 30 2e | 30 33 20 52 4d 4c 6f 61 |Trans 0.|03 RMLoa|
|000003f0| 64 20 53 79 73 74 65 6d | 3a 4d 6f 64 75 6c 65 73 |d System|:Modules|
|00000400| 2e 4d 73 67 54 72 61 6e | 73 0a 52 4d 45 6e 73 75 |.MsgTran|s.RMEnsu|
|00000410| 72 65 20 4d 65 73 73 61 | 67 65 54 72 61 6e 73 20 |re Messa|geTrans |
|00000420| 30 2e 30 33 20 45 72 72 | 6f 72 20 50 6c 65 61 73 |0.03 Err|or Pleas|
|00000430| 65 20 75 70 64 61 74 65 | 20 79 6f 75 72 20 63 6f |e update| your co|
|00000440| 70 79 20 6f 66 20 21 53 | 79 73 74 65 6d 20 74 6f |py of !S|ystem to|
|00000450| 20 6f 6e 65 20 63 6f 6e | 74 61 69 6e 69 6e 67 20 | one con|taining |
|00000460| 4d 73 67 54 72 61 6e 73 | 20 30 2e 30 33 20 6f 72 |MsgTrans| 0.03 or|
|00000470| 20 6c 61 74 65 72 0a 52 | 55 4e 20 3c 21 50 72 65 | later.R|UN <!Pre|
|00000480| 64 69 63 74 24 44 69 72 | 3e 2e 21 52 55 4e 49 4d |dict$Dir|>.!RUNIM|
|00000490| 41 47 45 42 20 25 2a 30 | 0a 46 69 6c 65 44 61 74 |AGEB %*0|.FileDat|
|000004a0| 61 82 21 52 55 4e 49 4d | 41 47 45 42 00 7f 63 00 |a.!RUNIM|AGEB..c.|
|000004b0| 00 47 fd ff ff 3e 14 4d | 1e 03 00 69 a9 44 10 9f |.G...>.M|...i.D..|
|000004c0| e5 3c 20 9f e5 34 30 9f | e5 04 00 12 e4 04 00 03 |.< ..40.|........|
|000004d0| e4 04 10 51 e2 fb ff ff | 5a 00 00 8f e2 05 00 00 |...Q....|Z.......|
|000004e0| ef 42 41 53 49 43 20 2d | 51 75 69 74 20 40 30 30 |.BASIC -|Quit @00|
|000004f0| 30 30 39 30 30 30 2c 30 | 30 30 30 46 33 33 30 00 |009000,0|000F330.|
|00000500| 55 30 f3 00 00 80 e3 00 | 00 30 63 00 00 0d 00 0a |U0......|.0c.....|
|00000510| 1d 20 f4 20 3e 24 2e 21 | 50 72 65 64 69 63 74 2e |. . >$.!|Predict.|
|00000520| 21 52 55 4e 49 4d 41 47 | 45 42 0d 00 19 15 20 c8 |!RUNIMAG|EB.... .|
|00000530| 99 22 48 6f 75 72 67 6c | 61 73 73 5f 4f 6e 22 0d |."Hourgl|ass_On".|
|00000540| 00 46 25 20 f2 73 65 74 | 75 70 3a f2 73 65 74 75 |.F% .set|up:.setu|
|00000550| 70 32 3a f2 73 65 74 75 | 70 33 3a f2 72 65 61 64 |p2:.setu|p3:.read|
|00000560| 5f 76 65 72 0d 00 55 24 | 20 ee 20 85 20 e7 20 a4 |_ver..U$| . . . .|
|00000570| 77 69 6d 70 65 72 72 6f | 72 20 c8 98 20 8b 20 f2 |wimperro|r .. . .|
|00000580| 65 72 72 6f 72 3a c8 98 | 0d 00 64 18 20 c8 99 22 |error:..|..d. .."|
|00000590| 48 6f 75 72 67 6c 61 73 | 73 5f 53 6d 61 73 68 22 |Hourglas|s_Smash"|
|000005a0| 0d 00 82 0e 20 63 6c 6f | 73 65 64 25 3d b9 0d 00 |.... clo|sed%=...|
|000005b0| 91 1e 20 ee 20 85 20 e7 | 20 a4 77 69 6d 70 65 72 |.. . . .| .wimper|
|000005c0| 72 6f 72 20 8b 20 f2 65 | 72 72 6f 72 0d 00 a0 06 |ror . .e|rror....|
|000005d0| 20 f5 0d 00 af 31 20 e7 | 20 63 6c 6f 73 65 64 25 | ....1 .| closed%|
|000005e0| 20 f2 69 63 6f 6e 62 61 | 72 77 61 69 74 3a e7 20 | .iconba|rwait:. |
|000005f0| 71 75 69 74 25 3d b9 20 | f2 63 6c 6f 73 65 5f 64 |quit%=. |.close_d|
|00000600| 6f 77 6e 0d 00 be 0c 20 | f2 72 65 67 62 6f 78 0d |own.... |.regbox.|
|00000610| 00 cd 1b 20 f2 6f 70 65 | 6e 77 69 6e 64 6f 77 28 |... .ope|nwindow(|
|00000620| 77 68 61 6e 64 6c 65 31 | 25 29 0d 00 dc 2b 20 c8 |whandle1|%)...+ .|
|00000630| 99 22 57 69 6d 70 5f 53 | 65 74 43 61 72 65 74 50 |."Wimp_S|etCaretP|
|00000640| 6f 73 69 74 69 6f 6e 22 | 2c 77 68 61 6e 64 6c 65 |osition"|,whandle|
|00000650| 31 25 2c 2d 31 0d 00 eb | 1d 20 71 75 69 74 25 3d |1%,-1...|. quit%=|
|00000660| a3 3a 63 6c 6f 73 65 64 | 25 3d a3 3a 65 6e 64 25 |.:closed|%=.:end%|
|00000670| 3d a3 0d 00 fa 06 20 f5 | 0d 01 18 0b 20 20 f2 70 |=..... .|.... .p|
|00000680| 6f 6c 6c 0d 01 27 1d 20 | fd 20 71 75 69 74 25 20 |oll..'. |. quit% |
|00000690| 84 20 63 6c 6f 73 65 64 | 25 20 84 20 65 6e 64 25 |. closed|% . end%|
|000006a0| 0d 01 45 18 20 e7 20 71 | 75 69 74 25 20 f2 63 6c |..E. . q|uit% .cl|
|000006b0| 6f 73 65 5f 64 6f 77 6e | 0d 01 63 18 20 63 6c 6f |ose_down|..c. clo|
|000006c0| 73 65 64 25 3d b9 3a f2 | 63 6c 6f 73 65 61 6c 6c |sed%=.:.|closeall|
|000006d0| 0d 01 72 1c 20 c8 99 22 | 57 69 6d 70 5f 43 72 65 |..r. .."|Wimp_Cre|
|000006e0| 61 74 65 4d 65 6e 75 22 | 2c 2c 2d 31 0d 01 81 0e |ateMenu"|,,-1....|
|000006f0| 20 fd 20 71 75 69 74 25 | 3d b9 0d 01 90 10 20 f4 | . quit%|=..... .|
|00000700| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 01 9f 11 20 dd |--------|--.... .|
|00000710| f2 63 6c 6f 73 65 5f 64 | 6f 77 6e 0d 01 ae 36 20 |.close_d|own...6 |
|00000720| f2 63 6c 6f 73 65 61 6c | 6c 32 3a c8 99 22 4d 65 |.closeal|l2:.."Me|
|00000730| 73 73 61 67 65 54 72 61 | 6e 73 5f 43 6c 6f 73 65 |ssageTra|ns_Close|
|00000740| 46 69 6c 65 22 2c 6d 65 | 73 73 61 67 65 5f 70 74 |File",me|ssage_pt|
|00000750| 72 0d 01 bd 2b 20 c8 99 | 22 58 4f 53 5f 4d 6f 64 |r...+ ..|"XOS_Mod|
|00000760| 75 6c 65 22 2c 37 2c 2c | 6d 65 73 73 61 67 65 5f |ule",7,,|message_|
|00000770| 61 72 65 61 3a f2 72 65 | 67 62 6f 78 0d 01 cc 37 |area:.re|gbox...7|
|00000780| 20 24 62 6c 6f 63 6b 25 | 3d 22 54 41 53 4b 22 3a | $block%|="TASK":|
|00000790| c8 99 22 57 69 6d 70 5f | 43 6c 6f 73 65 44 6f 77 |.."Wimp_|CloseDow|
|000007a0| 6e 22 2c 74 61 73 6b 25 | 2c 21 62 6c 6f 63 6b 25 |n",task%|,!block%|
|000007b0| 3a c8 98 0d 01 db 06 20 | e1 0d 01 ea 10 20 f4 2d |:...... |..... .-|
|000007c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 01 f9 12 20 dd f2 |--------|-.... ..|
|000007d0| 69 63 6f 6e 62 61 72 77 | 61 69 74 0d 02 08 1d 20 |iconbarw|ait.... |
|000007e0| 65 6e 64 25 3d a3 3a 63 | 6c 6f 73 65 64 25 3d a3 |end%=.:c|losed%=.|
|000007f0| 3a 71 75 69 74 25 3d a3 | 0d 02 17 06 20 f5 0d 02 |:quit%=.|.... ...|
|00000800| 62 25 20 c8 99 20 22 57 | 69 6d 70 5f 50 6f 6c 6c |b% .. "W|imp_Poll|
|00000810| 22 2c 2c 62 6c 6f 63 6b | 25 20 b8 20 72 65 61 73 |",,block|% . reas|
|00000820| 6f 6e 25 0d 02 71 11 20 | c8 8e 20 72 65 61 73 6f |on%..q. |.. reaso|
|00000830| 6e 25 20 ca 0d 02 80 10 | 20 20 c9 20 36 3a f2 6d |n% .....| . 6:.m|
|00000840| 6f 75 73 65 0d 02 8f 27 | 20 20 c9 20 38 3a c8 99 |ouse...'| . 8:..|
|00000850| 22 57 69 6d 70 5f 50 72 | 6f 63 65 73 73 4b 65 79 |"Wimp_Pr|ocessKey|
|00000860| 22 2c 62 6c 6f 63 6b 25 | 21 32 34 0d 02 9e 19 20 |",block%|!24.... |
|00000870| 20 c9 20 39 3a f2 69 63 | 6f 6e 62 61 72 6f 70 74 | . 9:.ic|onbaropt|
|00000880| 69 6f 6e 73 0d 02 ad 1a | 20 20 c9 20 31 37 2c 31 |ions....| . 17,1|
|00000890| 38 3a f2 69 63 6f 6e 72 | 65 63 65 69 76 65 0d 02 |8:.iconr|eceive..|
|000008a0| bc 06 20 cb 0d 02 cb 13 | 20 fd 20 65 6e 64 25 20 |.. .....| . end% |
|000008b0| 84 20 71 75 69 74 25 0d | 02 da 06 20 e1 0d 02 e9 |. quit%.|... ....|
|000008c0| 11 20 f4 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 02 |. .-----|------..|
|000008d0| f8 15 20 dd f2 69 63 6f | 6e 62 61 72 6f 70 74 69 |.. ..ico|nbaropti|
|000008e0| 6f 6e 73 0d 03 07 14 20 | 63 68 6f 69 63 65 25 3d |ons.... |choice%=|
|000008f0| 21 62 6c 6f 63 6b 25 0d | 03 16 27 20 e7 20 63 68 |!block%.|..' . ch|
|00000900| 6f 69 63 65 25 3d 31 20 | f2 76 65 72 69 66 79 73 |oice%=1 |.verifys|
|00000910| 68 75 74 64 6f 77 6e 3a | 65 6e 64 25 3d b9 0d 03 |hutdown:|end%=...|
|00000920| 25 06 20 e1 0d 03 34 10 | 20 f4 2d 2d 2d 2d 2d 2d |%. ...4.| .------|
|00000930| 2d 2d 2d 2d 0d 03 43 12 | 20 dd f2 69 63 6f 6e 72 |----..C.| ..iconr|
|00000940| 65 63 65 69 76 65 0d 03 | 52 13 20 c8 8e 20 62 6c |eceive..|R. .. bl|
|00000950| 6f 63 6b 25 21 31 36 20 | ca 0d 03 61 13 20 20 c9 |ock%!16 |...a. .|
|00000960| 20 30 3a 71 75 69 74 25 | 3d b9 3a e1 0d 03 70 1d | 0:quit%|=.:...p.|
|00000970| 20 20 c9 20 26 34 30 30 | 43 31 3a f2 6d 6f 64 65 | . &400|C1:.mode|
|00000980| 5f 63 68 61 6e 67 65 64 | 32 0d 03 7f 06 20 cb 0d |_changed|2.... ..|
|00000990| 03 8e 06 20 e1 0d 03 9d | 10 20 f4 2d 2d 2d 2d 2d |... ....|. .-----|
|000009a0| 2d 2d 2d 2d 2d 0d 03 ac | 0f 20 dd f2 63 6c 6f 73 |-----...|. ..clos|
|000009b0| 65 61 6c 6c 0d 03 bb 34 | 20 62 6c 6f 63 6b 25 21 |eall...4| block%!|
|000009c0| 30 3d 77 68 61 6e 64 6c | 65 31 25 3a c8 99 22 57 |0=whandl|e1%:.."W|
|000009d0| 69 6d 70 5f 43 6c 6f 73 | 65 57 69 6e 64 6f 77 22 |imp_Clos|eWindow"|
|000009e0| 2c 2c 62 6c 6f 63 6b 25 | 0d 03 ca 0f 20 f2 63 6c |,,block%|.... .cl|
|000009f0| 6f 73 65 61 6c 6c 32 0d | 03 d9 06 20 e1 0d 03 e8 |oseall2.|... ....|
|00000a00| 10 20 f4 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 03 f7 |. .-----|-----...|
|00000a10| 10 20 dd f2 63 6c 6f 73 | 65 61 6c 6c 32 0d 04 06 |. ..clos|eall2...|
|00000a20| 06 20 e1 0d 04 15 10 20 | f4 2d 2d 2d 2d 2d 2d 2d |. ..... |.-------|
|00000a30| 2d 2d 2d 0d 04 24 13 20 | dd f2 6d 6f 64 65 5f 63 |---..$. |..mode_c|
|00000a40| 68 61 6e 67 65 64 0d 04 | 42 3e 20 69 6e 25 21 30 |hanged..|B> in%!0|
|00000a50| 3d 31 32 3a 69 6e 25 21 | 34 3d 35 3a 69 6e 25 21 |=12:in%!|4=5:in%!|
|00000a60| 38 3d 2d 31 3a c8 99 22 | 4f 53 5f 52 65 61 64 56 |8=-1:.."|OS_ReadV|
|00000a70| 64 75 56 61 72 69 61 62 | 6c 65 73 22 2c 69 6e 25 |duVariab|les",in%|
|00000a80| 2c 6f 75 25 0d 04 51 2a | 20 74 6f 70 5f 79 3d 28 |,ou%..Q*| top_y=(|
|00000a90| 6f 75 25 21 30 29 2b 31 | 3a 74 6f 70 5f 79 3d 28 |ou%!0)+1|:top_y=(|
|00000aa0| 32 5e 6f 75 25 21 34 29 | 2a 74 6f 70 5f 79 0d 04 |2^ou%!4)|*top_y..|
|00000ab0| 60 3e 20 69 6e 25 21 30 | 3d 31 31 3a 69 6e 25 21 |`> in%!0|=11:in%!|
|00000ac0| 34 3d 34 3a 69 6e 25 21 | 38 3d 2d 31 3a c8 99 22 |4=4:in%!|8=-1:.."|
|00000ad0| 4f 53 5f 52 65 61 64 56 | 64 75 56 61 72 69 61 62 |OS_ReadV|duVariab|
|00000ae0| 6c 65 73 22 2c 69 6e 25 | 2c 6f 75 25 0d 04 6f 2a |les",in%|,ou%..o*|
|00000af0| 20 74 6f 70 5f 78 3d 28 | 6f 75 25 21 30 29 2b 31 | top_x=(|ou%!0)+1|
|00000b00| 3a 74 6f 70 5f 78 3d 28 | 32 5e 6f 75 25 21 34 29 |:top_x=(|2^ou%!4)|
|00000b10| 2a 74 6f 70 5f 78 0d 04 | 8d 06 20 e1 0d 04 9c 10 |*top_x..|.. .....|
|00000b20| 20 f4 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 04 ab 14 | .------|----....|
|00000b30| 20 dd f2 6d 6f 64 65 5f | 63 68 61 6e 67 65 64 32 | ..mode_|changed2|
|00000b40| 0d 04 c9 3e 20 69 6e 25 | 21 30 3d 31 32 3a 69 6e |...> in%|!0=12:in|
|00000b50| 25 21 34 3d 35 3a 69 6e | 25 21 38 3d 2d 31 3a c8 |%!4=5:in|%!8=-1:.|
|00000b60| 99 22 4f 53 5f 52 65 61 | 64 56 64 75 56 61 72 69 |."OS_Rea|dVduVari|
|00000b70| 61 62 6c 65 73 22 2c 69 | 6e 25 2c 6f 75 25 0d 04 |ables",i|n%,ou%..|
|00000b80| d8 2a 20 74 6f 70 5f 79 | 3d 28 6f 75 25 21 30 29 |.* top_y|=(ou%!0)|
|00000b90| 2b 31 3a 74 6f 70 5f 79 | 3d 28 32 5e 6f 75 25 21 |+1:top_y|=(2^ou%!|
|00000ba0| 34 29 2a 74 6f 70 5f 79 | 0d 04 d9 3e 20 69 6e 25 |4)*top_y|...> in%|
|00000bb0| 21 30 3d 31 31 3a 69 6e | 25 21 34 3d 34 3a 69 6e |!0=11:in|%!4=4:in|
|00000bc0| 25 21 38 3d 2d 31 3a c8 | 99 22 4f 53 5f 52 65 61 |%!8=-1:.|."OS_Rea|
|00000bd0| 64 56 64 75 56 61 72 69 | 61 62 6c 65 73 22 2c 69 |dVduVari|ables",i|
|00000be0| 6e 25 2c 6f 75 25 0d 04 | da 2a 20 74 6f 70 5f 78 |n%,ou%..|.* top_x|
|00000bf0| 3d 28 6f 75 25 21 30 29 | 2b 31 3a 74 6f 70 5f 78 |=(ou%!0)|+1:top_x|
|00000c00| 3d 28 32 5e 6f 75 25 21 | 34 29 2a 74 6f 70 5f 78 |=(2^ou%!|4)*top_x|
|00000c10| 0d 04 e7 06 20 e1 0d 04 | f6 10 20 f4 2d 2d 2d 2d |.... ...|.. .----|
|00000c20| 2d 2d 2d 2d 2d 2d 0d 05 | 05 10 20 dd f2 6d 69 6e |------..|.. ..min|
|00000c30| 69 5f 70 6f 6c 6c 0d 05 | 14 08 20 54 3d 30 0d 05 |i_poll..|.. T=0..|
|00000c40| 23 06 20 f5 0d 05 32 28 | 20 20 c8 99 22 57 69 6d |#. ...2(| .."Wim|
|00000c50| 70 5f 50 6f 6c 6c 22 2c | 26 30 30 2c 62 6c 6f 63 |p_Poll",|&00,bloc|
|00000c60| 6b 25 20 b8 20 72 65 61 | 73 6f 6e 25 0d 05 41 12 |k% . rea|son%..A.|
|00000c70| 20 20 c8 8e 20 72 65 61 | 73 6f 6e 25 20 ca 0d 05 | .. rea|son% ...|
|00000c80| 50 13 20 20 20 c9 20 31 | 20 3a f2 72 65 64 72 61 |P. . 1| :.redra|
|00000c90| 77 0d 05 5f 27 20 20 20 | c9 20 32 20 3a c8 99 22 |w.._' |. 2 :.."|
|00000ca0| 57 69 6d 70 5f 4f 70 65 | 6e 57 69 6e 64 6f 77 22 |Wimp_Ope|nWindow"|
|00000cb0| 2c 2c 62 6c 6f 63 6b 25 | 0d 05 6e 07 20 20 cb 0d |,,block%|..n. ..|
|00000cc0| 05 7d 0a 20 20 54 2b 3d | 31 0d 05 8c 0a 20 fd 20 |.}. T+=|1.... . |
|00000cd0| 54 3e 33 0d 05 9b 06 20 | e1 0d 05 aa 10 20 f4 2d |T>3.... |..... .-|
|00000ce0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 05 b9 0b 20 dd f2 |--------|-.... ..|
|00000cf0| 70 6f 6c 6c 0d 05 c8 27 | 20 c8 99 22 57 69 6d 70 |poll...'| .."Wimp|
|00000d00| 5f 50 6f 6c 6c 22 2c 26 | 30 30 2c 62 6c 6f 63 6b |_Poll",&|00,block|
|00000d10| 25 20 b8 20 72 65 61 73 | 6f 6e 25 0d 05 d7 11 20 |% . reas|on%.... |
|00000d20| c8 8e 20 72 65 61 73 6f | 6e 25 20 ca 0d 05 e6 12 |.. reaso|n% .....|
|00000d30| 20 20 c9 20 31 20 3a f2 | 72 65 64 72 61 77 0d 05 | . 1 :.|redraw..|
|00000d40| f5 26 20 20 c9 20 32 20 | 3a c8 99 22 57 69 6d 70 |.& . 2 |:.."Wimp|
|00000d50| 5f 4f 70 65 6e 57 69 6e | 64 6f 77 22 2c 2c 62 6c |_OpenWin|dow",,bl|
|00000d60| 6f 63 6b 25 0d 06 04 17 | 20 20 c9 20 33 20 3a f2 |ock%....| . 3 :.|
|00000d70| 77 68 69 63 68 5f 63 6c | 6f 73 65 0d 06 13 15 20 |which_cl|ose.... |
|00000d80| 20 c9 20 36 20 3a f2 65 | 64 69 74 6d 6f 75 73 65 | . 6 :.e|ditmouse|
|00000d90| 0d 06 22 14 20 20 c9 20 | 37 20 3a f2 63 61 6c 6c |..". . |7 :.call|
|00000da0| 73 61 76 65 0d 06 31 14 | 20 20 c9 20 38 20 3a f2 |save..1.| . 8 :.|
|00000db0| 6b 65 79 70 72 65 73 73 | 0d 06 40 18 20 20 c9 20 |keypress|..@. . |
|00000dc0| 39 20 3a f2 6f 70 74 69 | 6f 6e 73 65 6c 65 63 74 |9 :.opti|onselect|
|00000dd0| 0d 06 4f 1a 20 20 c9 20 | 31 37 2c 31 38 3a f2 72 |..O. . |17,18:.r|
|00000de0| 65 63 65 69 76 65 64 61 | 74 61 0d 06 5e 06 20 cb |eceiveda|ta..^. .|
|00000df0| 0d 06 6d 06 20 e1 0d 06 | 7c 10 20 f4 2d 2d 2d 2d |..m. ...||. .----|
|00000e00| 2d 2d 2d 2d 2d 2d 0d 06 | 8b 12 20 dd f2 77 68 69 |------..|.. ..whi|
|00000e10| 63 68 5f 63 6c 6f 73 65 | 0d 06 9a 41 20 e7 20 62 |ch_close|...A . b|
|00000e20| 6c 6f 63 6b 25 21 30 3c | 3e 77 68 61 6e 64 6c 65 |lock%!0<|>whandle|
|00000e30| 31 25 20 c8 99 22 57 69 | 6d 70 5f 53 65 74 43 61 |1% .."Wi|mp_SetCa|
|00000e40| 72 65 74 50 6f 73 69 74 | 69 6f 6e 22 2c 77 68 61 |retPosit|ion",wha|
|00000e50| 6e 64 6c 65 31 25 2c 2d | 31 0d 06 a9 2d 20 e7 20 |ndle1%,-|1...- . |
|00000e60| 62 6c 6f 63 6b 25 21 30 | 3d 77 68 61 6e 64 6c 65 |block%!0|=whandle|
|00000e70| 31 25 20 f2 63 6c 6f 73 | 65 61 6c 6c 3a 63 6c 6f |1% .clos|eall:clo|
|00000e80| 73 65 64 25 3d b9 0d 06 | b8 06 20 e1 0d 06 c7 11 |sed%=...|.. .....|
|00000e90| 20 f4 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 06 d6 | .------|-----...|
|00000ea0| 12 20 dd f2 72 65 63 65 | 69 76 65 64 61 74 61 0d |. ..rece|ivedata.|
|00000eb0| 06 e5 13 20 c8 8e 20 62 | 6c 6f 63 6b 25 21 31 36 |... .. b|lock%!16|
|00000ec0| 20 ca 0d 06 f4 11 20 20 | c9 20 30 3a 71 75 69 74 | ..... |. 0:quit|
|00000ed0| 25 3d b9 0d 07 03 1c 20 | 20 c9 20 26 34 30 30 43 |%=..... | . &400C|
|00000ee0| 31 3a f2 6d 6f 64 65 5f | 63 68 61 6e 67 65 64 0d |1:.mode_|changed.|
|00000ef0| 07 12 06 20 cb 0d 07 21 | 06 20 e1 0d 07 30 10 20 |... ...!|. ...0. |
|00000f00| f4 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 07 3f 0c 20 |.-------|---..?. |
|00000f10| dd f2 6d 6f 75 73 65 0d | 07 4e 1b 20 78 25 3d 21 |..mouse.|.N. x%=!|
|00000f20| 62 6c 6f 63 6b 25 3a 79 | 25 3d 62 6c 6f 63 6b 25 |block%:y|%=block%|
|00000f30| 21 34 0d 07 5d 0b 20 c8 | 8e 20 b9 20 ca 0d 07 6c |!4..]. .|. . ...l|
|00000f40| 14 20 20 c9 20 62 6c 6f | 63 6b 25 21 31 32 3d 2d |. . blo|ck%!12=-|
|00000f50| 32 0d 07 7b 17 20 20 20 | e7 20 62 6c 6f 63 6b 25 |2..{. |. block%|
|00000f60| 21 38 20 80 20 32 20 8c | 0d 07 8a 31 20 20 20 f2 |!8 . 2 .|...1 .|
|00000f70| 72 6d 28 22 4d 55 49 31 | 22 29 3a f2 64 72 61 77 |rm("MUI1|"):.draw|
|00000f80| 6d 65 6e 75 28 6d 65 6e | 75 25 2c 74 65 78 74 24 |menu(men|u%,text$|
|00000f90| 2c 78 25 2c 79 25 2c b9 | 29 0d 07 99 1f 20 20 cc |,x%,y%,.|).... .|
|00000fa0| 20 e7 20 62 6c 6f 63 6b | 25 21 38 20 80 20 35 20 | . block|%!8 . 5 |
|00000fb0| 8c 20 65 6e 64 25 3d b9 | 0d 07 a8 07 20 20 cd 0d |. end%=.|.... ..|
|00000fc0| 07 b7 06 20 cb 0d 07 c6 | 06 20 e1 0d 07 d5 10 20 |... ....|. ..... |
|00000fd0| f4 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 07 e4 10 20 |.-------|---.... |
|00000fe0| dd f2 65 64 69 74 6d 6f | 75 73 65 0d 07 f3 48 20 |..editmo|use...H |
|00000ff0| 78 70 6f 73 3d 21 62 6c | 6f 63 6b 25 3a 79 70 6f |xpos=!bl|ock%:ypo|
|00001000| 73 3d 62 6c 6f 63 6b 25 | 21 34 3a 62 75 3d 62 6c |s=block%|!4:bu=bl|
|00001010| 6f 63 6b 25 21 38 3a 77 | 69 6e 64 25 3d 62 6c 6f |ock%!8:w|ind%=blo|
|00001020| 63 6b 25 21 31 32 3a 69 | 63 3d 62 6c 6f 63 6b 25 |ck%!12:i|c=block%|
|00001030| 21 31 36 0d 08 02 0b 20 | 4d 55 24 3d 22 22 0d 08 |!16.... |MU$=""..|
|00001040| 11 18 20 e7 20 77 69 6e | 64 25 3d 2d 32 20 80 20 |.. . win|d%=-2 . |
|00001050| 62 75 3d 32 20 8c 0d 08 | 20 11 20 20 f2 72 6d 28 |bu=2 ...| . .rm(|
|00001060| 22 4d 55 49 31 22 29 0d | 08 2f 35 20 20 f2 64 72 |"MUI1").|./5 .dr|
|00001070| 61 77 6d 65 6e 75 28 6d | 65 6e 75 25 2c 74 65 78 |awmenu(m|enu%,tex|
|00001080| 74 24 2c 78 70 6f 73 2c | 79 70 6f 73 2c b9 29 3a |t$,xpos,|ypos,.):|
|00001090| 4d 55 24 3d 22 69 63 6f | 6e 22 3a e1 0d 08 3e 06 |MU$="ico|n":...>.|
|000010a0| 20 cd 0d 08 4d 04 0d 08 | 5c 0f 20 c8 8e 20 77 69 | ...M...|\. .. wi|
|000010b0| 6e 64 25 20 ca 0d 08 89 | 10 20 c9 20 77 68 61 6e |nd% ....|. . whan|
|000010c0| 64 6c 65 31 25 0d 08 a7 | 22 20 e7 20 69 63 3d 36 |dle1%...|" . ic=6|
|000010d0| 20 84 20 69 63 3d 31 34 | 20 f2 63 6c 69 63 6b 5f | . ic=14| .click_|
|000010e0| 70 72 65 64 69 63 74 0d | 08 b6 16 20 e7 20 69 63 |predict.|... . ic|
|000010f0| 3d 31 33 20 f2 77 69 6e | 64 6d 65 6e 75 0d 08 c5 |=13 .win|dmenu...|
|00001100| 12 20 e7 20 69 63 3d 39 | 20 f2 70 6d 65 6e 75 0d |. . ic=9| .pmenu.|
|00001110| 08 c6 43 20 e7 20 69 63 | 3d 31 37 3a f2 73 65 74 |..C . ic|=17:.set|
|00001120| 5f 61 6c 6c 3a f2 69 73 | 65 74 28 31 37 2c 22 72 |_all:.is|et(17,"r|
|00001130| 61 64 5f 6f 6e 22 2c 77 | 68 61 6e 64 6c 65 31 25 |ad_on",w|handle1%|
|00001140| 29 3a 73 65 61 73 6f 6e | 24 3d 22 53 70 72 69 6e |):season|$="Sprin|
|00001150| 67 22 0d 08 c7 43 20 e7 | 20 69 63 3d 31 39 3a f2 |g"...C .| ic=19:.|
|00001160| 73 65 74 5f 61 6c 6c 3a | f2 69 73 65 74 28 31 39 |set_all:|.iset(19|
|00001170| 2c 22 72 61 64 5f 6f 6e | 22 2c 77 68 61 6e 64 6c |,"rad_on|",whandl|
|00001180| 65 31 25 29 3a 73 65 61 | 73 6f 6e 24 3d 22 53 75 |e1%):sea|son$="Su|
|00001190| 6d 6d 65 72 22 0d 08 c8 | 43 20 e7 20 69 63 3d 32 |mmer"...|C . ic=2|
|000011a0| 30 3a f2 73 65 74 5f 61 | 6c 6c 3a f2 69 73 65 74 |0:.set_a|ll:.iset|
|000011b0| 28 32 30 2c 22 72 61 64 | 5f 6f 6e 22 2c 77 68 61 |(20,"rad|_on",wha|
|000011c0| 6e 64 6c 65 31 25 29 3a | 73 65 61 73 6f 6e 24 3d |ndle1%):|season$=|
|000011d0| 22 41 75 74 75 6d 6e 22 | 0d 08 c9 43 20 e7 20 69 |"Autumn"|...C . i|
|000011e0| 63 3d 32 32 3a f2 73 65 | 74 5f 61 6c 6c 3a f2 69 |c=22:.se|t_all:.i|
|000011f0| 73 65 74 28 32 32 2c 22 | 72 61 64 5f 6f 6e 22 2c |set(22,"|rad_on",|
|00001200| 77 68 61 6e 64 6c 65 31 | 25 29 3a 73 65 61 73 6f |whandle1|%):seaso|
|00001210| 6e 24 3d 22 57 69 6e 74 | 65 72 22 0d 08 d4 06 20 |n$="Wint|er".... |
|00001220| cb 0d 08 e3 06 20 e1 0d | 0a 1e 10 20 f4 2d 2d 2d |..... ..|... .---|
|00001230| 2d 2d 2d 2d 2d 2d 2d 0d | 0a 2d 0e 20 dd f2 73 65 |-------.|.-. ..se|
|00001240| 74 5f 61 6c 6c 0d 0a 3c | 0b 20 f7 20 8d 44 4b 4a |t_all..<|. . .DKJ|
|00001250| 0d 0a 4b 12 20 dc 20 31 | 37 2c 31 39 2c 32 30 2c |..K. . 1|7,19,20,|
|00001260| 32 32 0d 0a 5a 06 20 f5 | 0d 0a 69 09 20 20 f3 20 |22..Z. .|..i. . |
|00001270| 41 0d 0a 78 19 20 20 f2 | 69 72 65 61 64 28 41 2c |A..x. .|iread(A,|
|00001280| 77 68 61 6e 64 6c 65 31 | 25 29 0d 0a 87 32 20 20 |whandle1|%)...2 |
|00001290| e7 20 61 24 3c 3e 22 72 | 61 64 5f 6f 66 66 22 20 |. a$<>"r|ad_off" |
|000012a0| f2 69 73 65 74 28 41 2c | 22 72 61 64 5f 6f 66 66 |.iset(A,|"rad_off|
|000012b0| 22 2c 77 68 61 6e 64 6c | 65 31 25 29 0d 0a 96 0b |",whandl|e1%)....|
|000012c0| 20 fd 20 41 3d 32 32 0d | 0a a5 06 20 e1 0d 0a b4 | . A=22.|... ....|
|000012d0| 10 20 f4 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 0a c3 |. .-----|-----...|
|000012e0| 14 20 dd f2 63 61 72 65 | 74 28 43 25 2c 77 68 25 |. ..care|t(C%,wh%|
|000012f0| 29 0d 0a d2 28 20 f2 69 | 72 65 61 64 28 43 25 2c |)...( .i|read(C%,|
|00001300| 77 68 25 29 3a e7 20 61 | 24 3d 22 22 20 6c 3d 2d |wh%):. a|$="" l=-|
|00001310| 31 20 8b 20 6c 3d a9 61 | 24 0d 0a e1 2d 20 c8 99 |1 . l=.a|$...- ..|
|00001320| 22 57 69 6d 70 5f 53 65 | 74 43 61 72 65 74 50 6f |"Wimp_Se|tCaretPo|
|00001330| 73 69 74 69 6f 6e 22 2c | 77 68 25 2c 43 25 2c 30 |sition",|wh%,C%,0|
|00001340| 2c 2c 2d 31 2c 6c 0d 0a | f0 06 20 e1 0d 0a ff 10 |,,-1,l..|.. .....|
|00001350| 20 f4 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 0b 0e 28 | .------|----...(|
|00001360| 20 dd f2 70 69 63 74 75 | 72 65 28 58 53 49 5a 45 | ..pictu|re(XSIZE|
|00001370| 2c 59 53 49 5a 45 2c 73 | 73 73 70 61 63 65 2c 73 |,YSIZE,s|sspace,s|
|00001380| 73 73 24 29 0d 0b 1d 08 | 20 ea 20 85 0d 0b 2c 23 |ss$)....| . ...,#|
|00001390| 20 ee 20 85 20 ea 3a f7 | 20 85 3a ef 32 36 3a db | . . .:.| .:.26:.|
|000013a0| 3a f1 f6 24 3a f1 c3 9e | 3a 5a 24 3d be 3a e1 0d |:..$:...|:Z$=.:..|
|000013b0| 0b 3b 13 20 24 73 70 72 | 6e 61 6d 65 25 3d 73 73 |.;. $spr|name%=ss|
|000013c0| 73 24 0d 0b 4a 10 20 e7 | 20 73 73 73 24 3d 22 22 |s$..J. .| sss$=""|
|000013d0| 20 8c 0d 0b 59 37 20 20 | c8 99 22 4f 53 5f 53 70 | ...Y7 |.."OS_Sp|
|000013e0| 72 69 74 65 4f 70 22 2c | 32 36 39 2c 73 73 73 70 |riteOp",|269,sssp|
|000013f0| 61 63 65 2c 73 70 72 6e | 61 6d 65 25 2c 31 33 2c |ace,sprn|ame%,13,|
|00001400| 31 20 b8 20 2c 2c 2c 52 | 33 0d 0b 68 17 20 20 3f |1 . ,,,R|3..h. ?|
|00001410| 28 73 70 72 6e 61 6d 65 | 25 2b 52 33 29 3d 31 33 |(sprname|%+R3)=13|
|00001420| 0d 0b 77 06 20 cd 0d 0b | 86 33 20 c8 99 22 4f 53 |..w. ...|.3 .."OS|
|00001430| 5f 53 70 72 69 74 65 4f | 70 22 2c 32 38 30 2c 73 |_SpriteO|p",280,s|
|00001440| 73 73 70 61 63 65 2c 24 | 73 70 72 6e 61 6d 65 25 |sspace,$|sprname%|
|00001450| 20 b8 20 2c 2c 61 64 64 | 25 0d 0b 95 3a 20 c8 99 | . ,,add|%...: ..|
|00001460| 22 4f 53 5f 53 70 72 69 | 74 65 4f 70 22 2c 35 35 |"OS_Spri|teOp",55|
|00001470| 32 2c 73 73 73 70 61 63 | 65 2c 61 64 64 25 20 b8 |2,ssspac|e,add% .|
|00001480| 20 2c 2c 2c 73 78 25 2c | 73 79 25 2c 2c 73 6d 6f | ,,,sx%,|sy%,,smo|
|00001490| 64 65 25 0d 0b a4 16 20 | 65 25 3d 28 61 64 64 25 |de%.... |e%=(add%|
|000014a0| 21 33 32 2d 34 34 29 2f | 38 0d 0b b3 12 20 70 61 |!32-44)/|8.... pa|
|000014b0| 6c 25 3d 70 61 6c 62 75 | 66 66 25 0d 0b c2 04 0d |l%=palbu|ff%.....|
|000014c0| 0b d1 0c 20 c8 8e 20 65 | 25 20 ca 0d 0b e0 09 20 |... .. e|% ..... |
|000014d0| 20 c9 20 30 0d 0b ef 2e | 20 20 c8 99 22 4f 53 5f | . 0....| .."OS_|
|000014e0| 52 65 61 64 4d 6f 64 65 | 56 61 72 69 61 62 6c 65 |ReadMode|Variable|
|000014f0| 22 2c 73 6d 6f 64 65 25 | 2c 39 20 b8 20 2c 2c 70 |",smode%|,9 . ,,p|
|00001500| 70 25 0d 0b fe 0e 20 20 | c8 8e 20 70 70 25 20 ca |p%.... |.. pp% .|
|00001510| 0d 0c 0d 13 20 20 20 c9 | 20 30 3a 70 61 6c 25 3d |.... .| 0:pal%=|
|00001520| 70 30 25 0d 0c 1c 13 20 | 20 20 c9 20 31 3a 70 61 |p0%.... | . 1:pa|
|00001530| 6c 25 3d 70 31 25 0d 0c | 2b 13 20 20 20 c9 20 32 |l%=p1%..|+. . 2|
|00001540| 3a 70 61 6c 25 3d 70 32 | 25 0d 0c 3a 13 20 20 20 |:pal%=p2|%..:. |
|00001550| c9 20 33 3a 70 61 6c 25 | 3d 70 33 25 0d 0c 49 06 |. 3:pal%|=p3%..I.|
|00001560| 20 cb 0d 0c 58 04 0d 0c | 67 0d 20 c9 20 32 2c 34 | ...X...|g. . 2,4|
|00001570| 2c 31 36 0d 0c 76 13 20 | 20 e3 20 69 25 3d 30 20 |,16..v. | . i%=0 |
|00001580| b8 20 65 25 2d 31 0d 0c | 85 20 20 20 70 61 6c 25 |. e%-1..|. pal%|
|00001590| 21 28 69 25 2a 34 29 3d | 61 64 64 25 21 28 34 34 |!(i%*4)=|add%!(44|
|000015a0| 2b 69 25 2a 38 29 0d 0c | 94 0a 20 20 ed 20 69 25 |+i%*8)..|.. . i%|
|000015b0| 0d 0c a3 09 20 c9 20 36 | 34 0d 0c b2 3e 20 20 e3 |.... . 6|4...> .|
|000015c0| 20 67 72 61 62 25 3d 30 | 20 b8 20 32 30 34 38 2d | grab%=0| . 2048-|
|000015d0| 38 20 88 20 38 3a 70 61 | 6c 25 21 28 67 72 61 62 |8 . 8:pa|l%!(grab|
|000015e0| 25 3e 3e 31 29 3d 61 64 | 64 25 21 28 67 72 61 62 |%>>1)=ad|d%!(grab|
|000015f0| 25 2b 34 34 29 3a ed 0d | 0c c1 06 20 cb 0d 0c d0 |%+44):..|... ....|
|00001600| 04 0d 0c df 12 20 e7 20 | 73 6d 6f 64 65 25 3d 2d |..... . |smode%=-|
|00001610| 31 20 e1 0d 0c ee 30 20 | e7 20 73 73 73 24 3d 22 |1 ....0 |. sss$="|
|00001620| 69 6d 31 46 48 47 46 22 | 20 4b 75 3d 32 38 3a 4b |im1FHGF"| Ku=28:K|
|00001630| 75 70 3d 30 20 8b 20 4b | 75 3d 2d 31 3a 4b 75 70 |up=0 . K|u=-1:Kup|
|00001640| 3d 2d 31 0d 0c fd 43 20 | e7 20 65 25 3c 36 34 20 |=-1...C |. e%<64 |
|00001650| c8 99 22 43 6f 6c 6f 75 | 72 54 72 61 6e 73 5f 53 |.."Colou|rTrans_S|
|00001660| 65 6c 65 63 74 54 61 62 | 6c 65 22 2c 73 6d 6f 64 |electTab|le",smod|
|00001670| 65 25 2c 70 61 6c 25 2c | 4b 75 2c 4b 75 70 2c 74 |e%,pal%,|Ku,Kup,t|
|00001680| 72 61 6e 73 32 25 0d 0d | 0c 04 0d 0d 1b 0e 20 e7 |rans2%..|...... .|
|00001690| 20 65 25 3e 36 33 20 8c | 0d 0d 2a 22 20 20 e3 20 | e%>63 .|..*" . |
|000016a0| 51 25 3d 30 20 b8 20 32 | 35 35 3a 74 72 61 6e 73 |Q%=0 . 2|55:trans|
|000016b0| 32 25 3f 51 25 3d 51 25 | 3a ed 0d 0d 39 12 20 20 |2%?Q%=Q%|:...9. |
|000016c0| e3 20 51 25 3d 30 20 b8 | 20 32 35 35 0d 0d 48 42 |. Q%=0 .| 255..HB|
|000016d0| 20 20 c8 99 22 43 6f 6c | 6f 75 72 54 72 61 6e 73 | .."Col|ourTrans|
|000016e0| 5f 52 65 74 75 72 6e 43 | 6f 6c 6f 75 72 4e 75 6d |_ReturnC|olourNum|
|000016f0| 62 65 72 22 2c 70 61 6c | 25 21 28 51 25 3c 3c 32 |ber",pal|%!(Q%<<2|
|00001700| 29 20 b8 20 74 72 61 6e | 73 32 25 3f 51 25 0d 0d |) . tran|s2%?Q%..|
|00001710| 57 07 20 20 ed 0d 0d 66 | 3c 20 20 c8 99 22 43 6f |W. ...f|< .."Co|
|00001720| 6c 6f 75 72 54 72 61 6e | 73 5f 53 65 6c 65 63 74 |lourTran|s_Select|
|00001730| 54 61 62 6c 65 22 2c 73 | 6d 6f 64 65 25 2c 70 61 |Table",s|mode%,pa|
|00001740| 6c 25 2c 4b 75 2c 4b 75 | 70 2c 74 72 61 6e 73 32 |l%,Ku,Ku|p,trans2|
|00001750| 25 0d 0d 75 06 20 cd 0d | 0d 84 04 0d 0d 93 2e 20 |%..u. ..|....... |
|00001760| c8 99 22 4f 53 5f 52 65 | 61 64 4d 6f 64 65 56 61 |.."OS_Re|adModeVa|
|00001770| 72 69 61 62 6c 65 22 2c | 73 6d 6f 64 65 25 2c 34 |riable",|smode%,4|
|00001780| 20 b8 20 2c 2c 78 6d 61 | 67 0d 0d a2 2e 20 c8 99 | . ,,xma|g.... ..|
|00001790| 22 4f 53 5f 52 65 61 64 | 4d 6f 64 65 56 61 72 69 |"OS_Read|ModeVari|
|000017a0| 61 62 6c 65 22 2c 73 6d | 6f 64 65 25 2c 35 20 b8 |able",sm|ode%,5 .|
|000017b0| 20 2c 2c 79 6d 61 67 0d | 0d b1 24 20 73 78 25 3d | ,,ymag.|..$ sx%=|
|000017c0| 28 73 78 25 3c 3c 78 6d | 61 67 29 3a 73 79 25 3d |(sx%<<xm|ag):sy%=|
|000017d0| 28 73 79 25 3c 3c 79 6d | 61 67 29 0d 0d c0 04 0d |(sy%<<ym|ag).....|
|000017e0| 0d cf 2b 20 c8 99 22 4f | 53 5f 52 65 61 64 4d 6f |..+ .."O|S_ReadMo|
|000017f0| 64 65 56 61 72 69 61 62 | 6c 65 22 2c 2d 31 2c 35 |deVariab|le",-1,5|
|00001800| 20 b8 20 2c 2c 79 6d 61 | 67 32 0d 0d de 2b 20 c8 | . ,,yma|g2...+ .|
|00001810| 99 22 4f 53 5f 52 65 61 | 64 4d 6f 64 65 56 61 72 |."OS_Rea|dModeVar|
|00001820| 69 61 62 6c 65 22 2c 2d | 31 2c 34 20 b8 20 2c 2c |iable",-|1,4 . ,,|
|00001830| 78 6d 61 67 32 0d 0d ed | 30 20 f4 49 46 20 70 72 |xmag2...|0 .IF pr|
|00001840| 6e 74 5f 73 74 61 74 75 | 73 3d 31 20 78 6d 61 67 |nt_statu|s=1 xmag|
|00001850| 32 3d 78 73 74 69 6e 74 | 3a 79 6d 61 67 32 3d 79 |2=xstint|:ymag2=y|
|00001860| 73 74 69 6e 74 0d 0d fc | 04 0d 0e 0b 31 20 66 61 |stint...|....1 fa|
|00001870| 3d 28 32 5e 79 6d 61 67 | 32 29 2f 28 32 5e 79 6d |=(2^ymag|2)/(2^ym|
|00001880| 61 67 29 3a 66 61 32 3d | 28 32 5e 78 6d 61 67 32 |ag):fa2=|(2^xmag2|
|00001890| 29 2f 28 32 5e 78 6d 61 | 67 29 0d 0e 1a 04 0d 0e |)/(2^xma|g)......|
|000018a0| 29 26 20 72 61 74 69 6f | 78 3d 58 53 49 5a 45 2f |)& ratio|x=XSIZE/|
|000018b0| 73 78 25 3a 72 61 74 69 | 6f 79 3d 59 53 49 5a 45 |sx%:rati|oy=YSIZE|
|000018c0| 2f 73 79 25 0d 0e 38 43 | 20 f4 49 46 20 72 61 74 |/sy%..8C| .IF rat|
|000018d0| 69 6f 78 3c 72 61 74 69 | 6f 79 20 73 66 6e 25 3d |iox<rati|oy sfn%=|
|000018e0| 58 53 49 5a 45 3a 73 66 | 64 25 3d 73 78 25 20 45 |XSIZE:sf|d%=sx% E|
|000018f0| 4c 53 45 20 73 66 6e 25 | 3d 59 53 49 5a 45 3a 73 |LSE sfn%|=YSIZE:s|
|00001900| 66 64 25 3d 73 79 25 0d | 0e 47 30 20 73 66 6e 31 |fd%=sy%.|.G0 sfn1|
|00001910| 25 3d 58 53 49 5a 45 3a | 73 66 64 31 25 3d 73 78 |%=XSIZE:|sfd1%=sx|
|00001920| 25 3a 73 66 6e 32 25 3d | 59 53 49 5a 45 3a 73 66 |%:sfn2%=|YSIZE:sf|
|00001930| 64 32 25 3d 73 79 25 0d | 0e 56 3f 20 21 6d 61 67 |d2%=sy%.|.V? !mag|
|00001940| 25 3d 73 66 6e 31 25 3a | 6d 61 67 25 21 34 3d 73 |%=sfn1%:|mag%!4=s|
|00001950| 66 6e 32 25 3a 6d 61 67 | 25 21 38 3d 73 66 64 31 |fn2%:mag|%!8=sfd1|
|00001960| 25 2a 66 61 32 3a 6d 61 | 67 25 21 31 32 3d 73 66 |%*fa2:ma|g%!12=sf|
|00001970| 64 32 25 2a 66 61 0d 0e | 65 30 20 73 78 25 3d 73 |d2%*fa..|e0 sx%=s|
|00001980| 78 25 2a 28 73 66 6e 31 | 25 2f 73 66 64 31 25 29 |x%*(sfn1|%/sfd1%)|
|00001990| 3a 73 79 25 3d 73 79 25 | 2a 28 73 66 6e 32 25 2f |:sy%=sy%|*(sfn2%/|
|000019a0| 73 66 64 32 25 29 0d 0e | 74 08 20 f7 20 85 0d 0e |sfd2%)..|t. . ...|
|000019b0| 83 06 20 e1 0d 0e 92 10 | 20 f4 2d 2d 2d 2d 2d 2d |.. .....| .------|
|000019c0| 2d 2d 2d 2d 0d 0e a1 15 | 20 dd f2 76 65 72 69 66 |----....| ..verif|
|000019d0| 79 73 68 75 74 64 6f 77 | 6e 0d 0e b0 3e 20 62 6c |yshutdow|n...> bl|
|000019e0| 6f 63 6b 25 21 30 3d 77 | 68 61 6e 64 6c 65 31 25 |ock%!0=w|handle1%|
|000019f0| 3a c8 99 22 57 69 6d 70 | 5f 43 6c 6f 73 65 57 69 |:.."Wimp|_CloseWi|
|00001a00| 6e 64 6f 77 22 2c 2c 62 | 6c 6f 63 6b 25 3a 71 75 |ndow",,b|lock%:qu|
|00001a10| 69 74 25 3d b9 3a e1 0d | 0e bf 06 20 e1 0d 0e ce |it%=.:..|... ....|
|00001a20| 10 20 f4 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 0e dd |. .-----|-----...|
|00001a30| 13 20 dd f2 6f 70 74 69 | 6f 6e 73 65 6c 65 63 74 |. ..opti|onselect|
|00001a40| 0d 0e ec 34 20 63 68 6f | 69 63 65 25 3d 21 62 6c |...4 cho|ice%=!bl|
|00001a50| 6f 63 6b 25 3a 63 68 6f | 69 63 65 32 25 3d 62 6c |ock%:cho|ice2%=bl|
|00001a60| 6f 63 6b 25 21 34 3a 63 | 72 65 61 74 65 5f 6d 65 |ock%!4:c|reate_me|
|00001a70| 6e 75 3d 30 0d 0e fb 24 | 20 c8 99 22 57 69 6d 70 |nu=0...$| .."Wimp|
|00001a80| 5f 47 65 74 50 6f 69 6e | 74 65 72 49 6e 66 6f 22 |_GetPoin|terInfo"|
|00001a90| 2c 2c 62 6c 6f 63 6b 25 | 0d 0f 0a 3a 20 78 70 6f |,,block%|...: xpo|
|00001aa0| 73 3d 21 62 6c 6f 63 6b | 25 3a 79 70 6f 73 3d 62 |s=!block|%:ypos=b|
|00001ab0| 6c 6f 63 6b 25 21 34 3a | e7 20 62 6c 6f 63 6b 25 |lock%!4:|. block%|
|00001ac0| 21 38 3d 31 20 63 72 65 | 61 74 65 5f 6d 65 6e 75 |!8=1 cre|ate_menu|
|00001ad0| 3d 31 0d 0f 28 28 20 e7 | 20 4d 55 24 3d 22 77 69 |=1..(( .| MU$="wi|
|00001ae0| 6e 64 6d 65 6e 75 22 20 | f2 6f 70 74 69 6f 6e 5f |ndmenu" |.option_|
|00001af0| 77 69 6e 64 6d 65 6e 75 | 3a e1 0d 0f 37 22 20 e7 |windmenu|:...7" .|
|00001b00| 20 4d 55 24 3d 22 70 6d | 65 6e 75 22 20 f2 6f 70 | MU$="pm|enu" .op|
|00001b10| 74 69 6f 6e 5f 70 6d 65 | 6e 75 3a e1 0d 0f 46 20 |tion_pme|nu:...F |
|00001b20| 20 e7 20 63 68 6f 69 63 | 65 25 3d 31 20 f2 76 65 | . choic|e%=1 .ve|
|00001b30| 72 69 66 79 73 68 75 74 | 64 6f 77 6e 0d 0f 55 06 |rifyshut|down..U.|
|00001b40| 20 e1 0d 0f 64 10 20 f4 | 2d 2d 2d 2d 2d 2d 2d 2d | ...d. .|--------|
|00001b50| 2d 2d 0d 0f 73 13 20 dd | f2 6f 70 74 69 6f 6e 5f |--..s. .|.option_|
|00001b60| 70 6d 65 6e 75 0d 0f 82 | 2d 20 e7 20 63 68 6f 69 |pmenu...|- . choi|
|00001b70| 63 65 25 3d 30 20 f2 69 | 73 65 74 28 38 2c 22 46 |ce%=0 .i|set(8,"F|
|00001b80| 61 6c 6c 69 6e 67 22 2c | 77 68 61 6e 64 6c 65 31 |alling",|whandle1|
|00001b90| 25 29 0d 0f 91 2c 20 e7 | 20 63 68 6f 69 63 65 25 |%)..., .| choice%|
|00001ba0| 3d 31 20 f2 69 73 65 74 | 28 38 2c 22 53 74 65 61 |=1 .iset|(8,"Stea|
|00001bb0| 64 79 22 2c 77 68 61 6e | 64 6c 65 31 25 29 0d 0f |dy",whan|dle1%)..|
|00001bc0| a0 2c 20 e7 20 63 68 6f | 69 63 65 25 3d 32 20 f2 |., . cho|ice%=2 .|
|00001bd0| 69 73 65 74 28 38 2c 22 | 52 69 73 69 6e 67 22 2c |iset(8,"|Rising",|
|00001be0| 77 68 61 6e 64 6c 65 31 | 25 29 0d 0f a1 24 20 e7 |whandle1|%)...$ .|
|00001bf0| 20 63 72 65 61 74 65 5f | 6d 65 6e 75 3d 31 20 78 | create_|menu=1 x|
|00001c00| 70 6f 73 2b 3d 35 31 3a | f2 70 6d 65 6e 75 0d 0f |pos+=51:|.pmenu..|
|00001c10| af 06 20 e1 0d 0f fa 10 | 20 f4 2d 2d 2d 2d 2d 2d |.. .....| .------|
|00001c20| 2d 2d 2d 2d 0d 10 09 16 | 20 dd f2 6f 70 74 69 6f |----....| ..optio|
|00001c30| 6e 5f 77 69 6e 64 6d 65 | 6e 75 0d 10 18 2c 20 e7 |n_windme|nu..., .|
|00001c40| 20 63 68 6f 69 63 65 25 | 3d 30 20 f2 69 73 65 74 | choice%|=0 .iset|
|00001c50| 28 31 32 2c 22 4e 6f 72 | 74 68 22 2c 77 68 61 6e |(12,"Nor|th",whan|
|00001c60| 64 6c 65 31 25 29 0d 10 | 27 31 20 e7 20 63 68 6f |dle1%)..|'1 . cho|
|00001c70| 69 63 65 25 3d 31 20 f2 | 69 73 65 74 28 31 32 2c |ice%=1 .|iset(12,|
|00001c80| 22 4e 6f 72 74 68 20 45 | 61 73 74 22 2c 77 68 61 |"North E|ast",wha|
|00001c90| 6e 64 6c 65 31 25 29 0d | 10 36 2b 20 e7 20 63 68 |ndle1%).|.6+ . ch|
|00001ca0| 6f 69 63 65 25 3d 32 20 | f2 69 73 65 74 28 31 32 |oice%=2 |.iset(12|
|00001cb0| 2c 22 45 61 73 74 22 2c | 77 68 61 6e 64 6c 65 31 |,"East",|whandle1|
|00001cc0| 25 29 0d 10 45 31 20 e7 | 20 63 68 6f 69 63 65 25 |%)..E1 .| choice%|
|00001cd0| 3d 33 20 f2 69 73 65 74 | 28 31 32 2c 22 53 6f 75 |=3 .iset|(12,"Sou|
|00001ce0| 74 68 20 45 61 73 74 22 | 2c 77 68 61 6e 64 6c 65 |th East"|,whandle|
|00001cf0| 31 25 29 0d 10 54 2c 20 | e7 20 63 68 6f 69 63 65 |1%)..T, |. choice|
|00001d00| 25 3d 34 20 f2 69 73 65 | 74 28 31 32 2c 22 53 6f |%=4 .ise|t(12,"So|
|00001d10| 75 74 68 22 2c 77 68 61 | 6e 64 6c 65 31 25 29 0d |uth",wha|ndle1%).|
|00001d20| 10 63 31 20 e7 20 63 68 | 6f 69 63 65 25 3d 35 20 |.c1 . ch|oice%=5 |
|00001d30| f2 69 73 65 74 28 31 32 | 2c 22 53 6f 75 74 68 20 |.iset(12|,"South |
|00001d40| 57 65 73 74 22 2c 77 68 | 61 6e 64 6c 65 31 25 29 |West",wh|andle1%)|
|00001d50| 0d 10 72 2b 20 e7 20 63 | 68 6f 69 63 65 25 3d 36 |..r+ . c|hoice%=6|
|00001d60| 20 f2 69 73 65 74 28 31 | 32 2c 22 57 65 73 74 22 | .iset(1|2,"West"|
|00001d70| 2c 77 68 61 6e 64 6c 65 | 31 25 29 0d 10 81 31 20 |,whandle|1%)...1 |
|00001d80| e7 20 63 68 6f 69 63 65 | 25 3d 37 20 f2 69 73 65 |. choice|%=7 .ise|
|00001d90| 74 28 31 32 2c 22 4e 6f | 72 74 68 20 57 65 73 74 |t(12,"No|rth West|
|00001da0| 22 2c 77 68 61 6e 64 6c | 65 31 25 29 0d 10 83 2b |",whandl|e1%)...+|
|00001db0| 20 e7 20 63 68 6f 69 63 | 65 25 3d 38 20 f2 69 73 | . choic|e%=8 .is|
|00001dc0| 65 74 28 31 32 2c 22 43 | 61 6c 6d 22 2c 77 68 61 |et(12,"C|alm",wha|
|00001dd0| 6e 64 6c 65 31 25 29 0d | 10 84 27 20 e7 20 63 72 |ndle1%).|..' . cr|
|00001de0| 65 61 74 65 5f 6d 65 6e | 75 3d 31 20 78 70 6f 73 |eate_men|u=1 xpos|
|00001df0| 2b 3d 35 31 3a f2 77 69 | 6e 64 6d 65 6e 75 0d 10 |+=51:.wi|ndmenu..|
|00001e00| 90 06 20 e1 0d 10 9f 10 | 20 f4 2d 2d 2d 2d 2d 2d |.. .....| .------|
|00001e10| 2d 2d 2d 2d 0d 10 ae 0f | 20 dd a4 54 65 6d 70 28 |----....| ..Temp(|
|00001e20| 54 24 29 0d 10 bd 24 20 | 24 77 69 6e 5f 69 64 65 |T$)...$ |$win_ide|
|00001e30| 6e 25 3d 54 24 3a ea 20 | 68 25 3a 77 64 61 25 3d |n%=T$:. |h%:wda%=|
|00001e40| 77 64 61 74 61 31 25 0d | 10 cc 4b 20 c8 99 22 57 |wdata1%.|..K .."W|
|00001e50| 69 6d 70 5f 4c 6f 61 64 | 54 65 6d 70 6c 61 74 65 |imp_Load|Template|
|00001e60| 22 2c 2c 62 6c 6f 63 6b | 25 2c 77 64 61 74 61 31 |",,block|%,wdata1|
|00001e70| 25 2c 77 64 31 65 6e 64 | 25 2c 2d 31 2c 77 69 6e |%,wd1end|%,-1,win|
|00001e80| 5f 69 64 65 6e 25 20 b8 | 20 2c 2c 77 64 61 74 61 |_iden% .| ,,wdata|
|00001e90| 31 25 0d 10 db 18 20 62 | 6c 6f 63 6b 25 21 36 34 |1%.... b|lock%!64|
|00001ea0| 3d 69 63 6f 6e 73 70 61 | 63 65 0d 10 ea 40 20 e7 |=iconspa|ce...@ .|
|00001eb0| 20 54 24 3d 22 4d 61 69 | 6e 22 20 6e 61 6d 65 25 | T$="Mai|n" name%|
|00001ec0| 3d 62 6c 6f 63 6b 25 21 | 37 32 3a f2 73 65 74 5f |=block%!|72:.set_|
|00001ed0| 6d 61 69 6e 5f 69 63 6f | 6e 73 3a 62 6c 6f 63 6b |main_ico|ns:block|
|00001ee0| 25 21 31 32 3d 74 6f 70 | 5f 79 0d 10 f9 6f 20 e7 |%!12=top|_y...o .|
|00001ef0| 20 54 24 3d 22 63 6c 6f | 73 65 64 6f 77 6e 22 20 | T$="clo|sedown" |
|00001f00| 62 6c 6f 63 6b 25 21 28 | 38 38 2b 34 2a 33 32 2b |block%!(|88+4*32+|
|00001f10| 32 34 29 3d 69 63 6f 6e | 73 70 61 63 65 3a 62 6c |24)=icon|space:bl|
|00001f20| 6f 63 6b 25 21 28 38 38 | 2b 35 2a 33 32 2b 32 34 |ock%!(88|+5*32+24|
|00001f30| 29 3d 69 63 6f 6e 73 70 | 61 63 65 3a 62 6c 6f 63 |)=iconsp|ace:bloc|
|00001f40| 6b 25 21 28 38 38 2b 38 | 2a 33 32 2b 32 34 29 3d |k%!(88+8|*32+24)=|
|00001f50| 69 63 6f 6e 73 70 61 63 | 65 0d 11 08 4f 20 e7 20 |iconspac|e...O . |
|00001f60| 54 24 3d 22 77 61 72 6e | 69 6e 67 22 20 62 6c 6f |T$="warn|ing" blo|
|00001f70| 63 6b 25 21 28 38 38 2b | 34 2a 33 32 2b 32 34 29 |ck%!(88+|4*32+24)|
|00001f80| 3d 69 63 6f 6e 73 70 61 | 63 65 3a 62 6c 6f 63 6b |=iconspa|ce:block|
|00001f90| 25 21 28 38 38 2b 35 2a | 33 32 2b 32 34 29 3d 69 |%!(88+5*|32+24)=i|
|00001fa0| 63 6f 6e 73 70 61 63 65 | 0d 11 0a 30 20 e7 20 54 |conspace|...0 . T|
|00001fb0| 24 3d 22 65 72 72 62 6f | 78 22 20 62 6c 6f 63 6b |$="errbo|x" block|
|00001fc0| 25 21 28 38 38 2b 34 2a | 33 32 2b 32 34 29 3d 69 |%!(88+4*|32+24)=i|
|00001fd0| 63 6f 6e 73 70 61 63 65 | 0d 11 0d 2d 20 e7 20 54 |conspace|...- . T|
|00001fe0| 24 3d 22 72 65 67 22 20 | 62 6c 6f 63 6b 25 21 28 |$="reg" |block%!(|
|00001ff0| 38 38 2b 34 2a 33 32 2b | 32 34 29 3d 69 63 6f 6e |88+4*32+|24)=icon|
|00002000| 73 70 61 63 65 0d 11 17 | 27 20 c8 99 22 57 69 6d |space...|' .."Wim|
|00002010| 70 5f 43 72 65 61 74 65 | 57 69 6e 64 6f 77 22 2c |p_Create|Window",|
|00002020| 2c 62 6c 6f 63 6b 25 20 | b8 20 68 25 0d 11 26 08 |,block% |. h%..&.|
|00002030| 20 3d 68 25 0d 11 35 10 | 20 f4 2d 2d 2d 2d 2d 2d | =h%..5.| .------|
|00002040| 2d 2d 2d 2d 0d 11 44 15 | 20 dd f2 73 65 74 5f 6d |----..D.| ..set_m|
|00002050| 61 69 6e 5f 69 63 6f 6e | 73 0d 11 53 14 20 f7 20 |ain_icon|s..S. . |
|00002060| 8d 74 40 51 3a f5 3a f3 | 20 69 63 5f 6e 0d 11 62 |.t@Q:.:.| ic_n..b|
|00002070| 30 20 e7 20 69 63 5f 6e | 3c 3e 2d 31 20 62 6c 6f |0 . ic_n|<>-1 blo|
|00002080| 63 6b 25 21 28 38 38 2b | 69 63 5f 6e 2a 33 32 2b |ck%!(88+|ic_n*32+|
|00002090| 32 34 29 3d 69 63 6f 6e | 73 70 61 63 65 0d 11 71 |24)=icon|space..q|
|000020a0| 10 20 fd 20 69 63 5f 6e | 3d 2d 31 3a e1 0d 11 80 |. . ic_n|=-1:....|
|000020b0| 1c 20 dc 20 36 2c 39 2c | 31 33 2c 31 37 2c 31 39 |. . 6,9,|13,17,19|
|000020c0| 2c 32 30 2c 32 32 2c 2d | 31 0d 11 8f 10 20 f4 2d |,20,22,-|1.... .-|
|000020d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 11 9e 0c 20 dd f2 |--------|-.... ..|
|000020e0| 65 72 72 6f 72 0d 11 ad | 0e 20 21 62 6c 6f 63 6b |error...|. !block|
|000020f0| 25 3d 9f 0d 11 bc 36 20 | 24 28 62 6c 6f 63 6b 25 |%=....6 |$(block%|
|00002100| 2b 34 29 3d f6 24 2b 22 | 20 28 69 6e 74 65 72 6e |+4)=.$+"| (intern|
|00002110| 61 6c 20 65 72 72 6f 72 | 20 63 6f 64 65 20 22 2b |al error| code "+|
|00002120| c3 9e 2b 22 29 22 2b bd | 30 0d 11 cb 34 20 f2 72 |..+")"+.|0...4 .r|
|00002130| 6d 28 22 45 52 4d 31 22 | 29 3a c8 99 22 57 69 6d |m("ERM1"|):.."Wim|
|00002140| 70 5f 52 65 70 6f 72 74 | 45 72 72 6f 72 22 2c 62 |p_Report|Error",b|
|00002150| 6c 6f 63 6b 25 2c 31 2c | 74 65 78 74 24 0d 11 da |lock%,1,|text$...|
|00002160| 06 20 e1 0d 11 e9 10 20 | f4 2d 2d 2d 2d 2d 2d 2d |. ..... |.-------|
|00002170| 2d 2d 2d 0d 11 f8 10 20 | dd a4 77 69 6d 70 65 72 |---.... |..wimper|
|00002180| 72 6f 72 0d 12 07 15 20 | 21 62 6c 6f 63 6b 25 3d |ror.... |!block%=|
|00002190| 9f 3a 65 72 24 3d 22 22 | 0d 12 16 2d 20 24 28 62 |.:er$=""|...- $(b|
|000021a0| 6c 6f 63 6b 25 2b 34 29 | 3d f6 24 2b 22 20 28 22 |lock%+4)|=.$+" ("|
|000021b0| 2b c3 9f 2b 22 29 22 2b | 65 72 24 2b 22 20 22 2b |+..+")"+|er$+" "+|
|000021c0| c3 9e 2b bd 30 0d 12 25 | 34 20 f2 72 6d 28 22 45 |..+.0..%|4 .rm("E|
|000021d0| 52 4d 31 22 29 3a c8 99 | 22 57 69 6d 70 5f 52 65 |RM1"):..|"Wimp_Re|
|000021e0| 70 6f 72 74 45 72 72 6f | 72 22 2c 62 6c 6f 63 6b |portErro|r",block|
|000021f0| 25 2c 31 2c 74 65 78 74 | 24 0d 12 34 07 20 3d b9 |%,1,text|$..4. =.|
|00002200| 0d 12 43 10 20 f4 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..C. .--|--------|
|00002210| 0d 12 52 40 20 dd a4 69 | 63 6f 6e 64 65 66 28 77 |..R@ ..i|condef(w|
|00002220| 68 61 6e 64 6c 65 25 2c | 69 78 25 2c 69 79 25 2c |handle%,|ix%,iy%,|
|00002230| 69 77 25 2c 69 68 25 2c | 66 6c 61 67 25 2c 74 65 |iw%,ih%,|flag%,te|
|00002240| 78 74 24 2c 64 31 25 2c | 64 32 25 2c 64 33 25 29 |xt$,d1%,|d2%,d3%)|
|00002250| 0d 12 61 30 20 62 6c 6f | 63 6b 25 21 30 3d 77 68 |..a0 blo|ck%!0=wh|
|00002260| 61 6e 64 6c 65 25 3a 62 | 6c 6f 63 6b 25 21 34 3d |andle%:b|lock%!4=|
|00002270| 69 78 25 3a 62 6c 6f 63 | 6b 25 21 38 3d 69 79 25 |ix%:bloc|k%!8=iy%|
|00002280| 0d 12 70 28 20 62 6c 6f | 63 6b 25 21 31 32 3d 69 |..p( blo|ck%!12=i|
|00002290| 78 25 2b 69 77 25 3a 62 | 6c 6f 63 6b 25 21 31 36 |x%+iw%:b|lock%!16|
|000022a0| 3d 69 79 25 2b 69 68 25 | 0d 12 7f 14 20 62 6c 6f |=iy%+ih%|.... blo|
|000022b0| 63 6b 25 21 32 30 3d 66 | 6c 61 67 25 0d 12 8e 0e |ck%!20=f|lag%....|
|000022c0| 20 e7 20 64 31 25 3d 30 | 20 8c 0d 12 9d 17 20 24 | . d1%=0| ..... $|
|000022d0| 28 62 6c 6f 63 6b 25 2b | 32 34 29 3d 74 65 78 74 |(block%+|24)=text|
|000022e0| 24 0d 12 ac 06 20 cc 0d | 12 bb 20 20 62 6c 6f 63 |$.... ..|.. bloc|
|000022f0| 6b 25 21 32 34 3d 64 31 | 25 3a 62 6c 6f 63 6b 25 |k%!24=d1|%:block%|
|00002300| 21 32 38 3d 64 32 25 0d | 12 ca 12 20 62 6c 6f 63 |!28=d2%.|... bloc|
|00002310| 6b 25 21 33 32 3d 64 33 | 25 0d 12 d9 06 20 cd 0d |k%!32=d3|%.... ..|
|00002320| 12 e8 2c 20 c8 99 20 22 | 57 69 6d 70 5f 43 72 65 |.., .. "|Wimp_Cre|
|00002330| 61 74 65 49 63 6f 6e 22 | 2c 2c 62 6c 6f 63 6b 25 |ateIcon"|,,block%|
|00002340| 20 b8 20 69 68 61 6e 64 | 6c 65 25 0d 12 f7 0e 20 | . ihand|le%.... |
|00002350| 3d 69 68 61 6e 64 6c 65 | 25 0d 13 06 10 20 f4 2d |=ihandle|%.... .-|
|00002360| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 13 15 15 20 dd f2 |--------|-.... ..|
|00002370| 6f 70 65 6e 77 69 6e 64 | 6f 77 28 47 25 29 0d 13 |openwind|ow(G%)..|
|00002380| 24 10 20 62 6c 6f 63 6b | 25 21 30 3d 47 25 0d 13 |$. block|%!0=G%..|
|00002390| 33 25 20 c8 99 20 22 57 | 69 6d 70 5f 47 65 74 57 |3% .. "W|imp_GetW|
|000023a0| 69 6e 64 6f 77 53 74 61 | 74 65 22 2c 2c 62 6c 6f |indowSta|te",,blo|
|000023b0| 63 6b 25 0d 13 42 20 20 | c8 99 22 57 69 6d 70 5f |ck%..B |.."Wimp_|
|000023c0| 4f 70 65 6e 57 69 6e 64 | 6f 77 22 2c 2c 62 6c 6f |OpenWind|ow",,blo|
|000023d0| 63 6b 25 0d 13 51 06 20 | e1 0d 13 60 10 20 f4 2d |ck%..Q. |...`. .-|
|000023e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 13 6f 2a 20 dd f2 |--------|-..o* ..|
|000023f0| 64 72 61 77 6d 65 6e 75 | 28 6d 25 2c 6d 65 6e 75 |drawmenu|(m%,menu|
|00002400| 24 2c 78 25 2c 79 25 2c | 6f 6e 69 63 6f 6e 62 61 |$,x%,y%,|oniconba|
|00002410| 72 25 29 0d 13 7e 4a 20 | 6d 25 3f 31 32 3d 37 3a |r%)..~J |m%?12=7:|
|00002420| 6d 25 3f 31 33 3d 32 3a | 6d 25 3f 31 34 3d 37 3a |m%?13=2:|m%?14=7:|
|00002430| 6d 25 3f 31 35 3d 30 3a | 6d 25 21 31 36 3d 32 30 |m%?15=0:|m%!16=20|
|00002440| 30 3a 6d 25 21 32 30 3d | 34 34 3a 6d 25 21 32 34 |0:m%!20=|44:m%!24|
|00002450| 3d 30 3a 70 74 72 25 3d | 6d 25 2b 32 38 0d 13 8d |=0:ptr%=|m%+28...|
|00002460| 1e 20 24 6d 25 3d c0 6d | 65 6e 75 24 2c a7 6d 65 |. $m%=.m|enu$,.me|
|00002470| 6e 75 24 2c 22 2c 22 29 | 2d 31 29 0d 13 9c 1a 20 |nu$,",")|-1).... |
|00002480| 6d 65 6e 75 24 2b 3d 22 | 2c 22 3a 65 6e 74 72 69 |menu$+="|,":entri|
|00002490| 65 73 25 3d 30 0d 13 ab | 11 20 c8 95 20 6d 65 6e |es%=0...|. .. men|
|000024a0| 75 24 3c 3e 22 22 0d 13 | ba 20 20 6d 65 6e 75 24 |u$<>""..|. menu$|
|000024b0| 3d c1 6d 65 6e 75 24 2c | a7 6d 65 6e 75 24 2c 22 |=.menu$,|.menu$,"|
|000024c0| 2c 22 29 2b 31 29 0d 13 | c9 12 20 e7 20 6d 65 6e |,")+1)..|.. . men|
|000024d0| 75 24 3c 3e 22 22 20 8c | 0d 13 d8 27 20 70 74 72 |u$<>"" .|...' ptr|
|000024e0| 25 21 30 3d 30 3a 70 74 | 72 25 21 34 3d 2d 31 3a |%!0=0:pt|r%!4=-1:|
|000024f0| 70 74 72 25 21 38 3d 26 | 37 30 30 30 30 32 31 0d |ptr%!8=&|7000021.|
|00002500| 13 e7 3a 20 24 28 70 74 | 72 25 2b 31 32 29 3d c0 |..: $(pt|r%+12)=.|
|00002510| 6d 65 6e 75 24 2c a7 6d | 65 6e 75 24 2c 22 2c 22 |menu$,.m|enu$,","|
|00002520| 29 2d 31 29 3a 70 74 72 | 25 2b 3d 32 34 3a 65 6e |)-1):ptr|%+=24:en|
|00002530| 74 72 69 65 73 25 2b 3d | 31 0d 13 f6 06 20 cd 0d |tries%+=|1.... ..|
|00002540| 14 05 06 20 ce 0d 14 14 | 1c 20 70 74 72 25 21 2d |... ....|. ptr%!-|
|00002550| 32 34 3d 70 74 72 25 21 | 2d 32 34 20 84 20 26 38 |24=ptr%!|-24 . &8|
|00002560| 30 0d 14 23 21 20 e7 20 | 6f 6e 69 63 6f 6e 62 61 |0..#! . |oniconba|
|00002570| 72 25 20 6d 25 21 33 32 | 3d 77 68 61 6e 64 6c 65 |r% m%!32|=whandle|
|00002580| 32 25 0d 14 32 36 20 e7 | 20 6f 6e 69 63 6f 6e 62 |2%..26 .| oniconb|
|00002590| 61 72 25 20 8c 20 79 70 | 6f 73 25 3d 39 36 2b 65 |ar% . yp|os%=96+e|
|000025a0| 6e 74 72 69 65 73 25 2a | 34 34 20 8b 20 79 70 6f |ntries%*|44 . ypo|
|000025b0| 73 25 3d 79 25 2b 32 30 | 0d 14 41 29 20 c8 99 20 |s%=y%+20|..A) .. |
|000025c0| 22 57 69 6d 70 5f 43 72 | 65 61 74 65 4d 65 6e 75 |"Wimp_Cr|eateMenu|
|000025d0| 22 2c 2c 6d 25 2c 78 25 | 2d 36 34 2c 79 70 6f 73 |",,m%,x%|-64,ypos|
|000025e0| 25 0d 14 50 06 20 e1 0d | 14 5f 10 20 f4 2d 2d 2d |%..P. ..|._. .---|
|000025f0| 2d 2d 2d 2d 2d 2d 2d 0d | 14 6e 24 20 dd f2 67 65 |-------.|.n$ ..ge|
|00002600| 74 6f 72 69 67 69 6e 28 | 62 6c 6f 63 6b 25 2c f8 |torigin(|block%,.|
|00002610| 20 78 30 25 2c f8 20 79 | 30 25 29 0d 14 7d 33 20 | x0%,. y|0%)..}3 |
|00002620| 78 30 25 3d 62 6c 6f 63 | 6b 25 21 34 2d 62 6c 6f |x0%=bloc|k%!4-blo|
|00002630| 63 6b 25 21 32 30 3a 79 | 30 25 3d 62 6c 6f 63 6b |ck%!20:y|0%=block|
|00002640| 25 21 31 36 2d 62 6c 6f | 63 6b 25 21 32 34 0d 14 |%!16-blo|ck%!24..|
|00002650| 8c 06 20 e1 0d 14 9b 10 | 20 f4 2d 2d 2d 2d 2d 2d |.. .....| .------|
|00002660| 2d 2d 2d 2d 0d 14 aa 15 | 20 dd f2 69 73 65 74 28 |----....| ..iset(|
|00002670| 78 25 2c 61 24 2c 57 48 | 29 0d 14 b9 3b 20 62 6c |x%,a$,WH|)...; bl|
|00002680| 6f 63 6b 25 21 30 3d 57 | 48 3a 62 6c 6f 63 6b 25 |ock%!0=W|H:block%|
|00002690| 21 34 3d 78 25 3a c8 99 | 20 22 57 69 6d 70 5f 47 |!4=x%:..| "Wimp_G|
|000026a0| 65 74 49 63 6f 6e 53 74 | 61 74 65 22 2c 2c 62 6c |etIconSt|ate",,bl|
|000026b0| 6f 63 6b 25 0d 14 c8 14 | 20 24 28 62 6c 6f 63 6b |ock%....| $(block|
|000026c0| 25 21 32 38 29 3d 61 24 | 0d 14 d7 3a 20 62 6c 6f |%!28)=a$|...: blo|
|000026d0| 63 6b 25 21 38 3d 30 3a | 62 6c 6f 63 6b 25 21 31 |ck%!8=0:|block%!1|
|000026e0| 32 3d 30 3a c8 99 20 22 | 57 69 6d 70 5f 53 65 74 |2=0:.. "|Wimp_Set|
|000026f0| 49 63 6f 6e 53 74 61 74 | 65 22 2c 2c 62 6c 6f 63 |IconStat|e",,bloc|
|00002700| 6b 25 0d 14 e6 06 20 e1 | 0d 14 f5 10 20 f4 2d 2d |k%.... .|.... .--|
|00002710| 2d 2d 2d 2d 2d 2d 2d 2d | 0d 15 04 13 20 dd f2 69 |--------|.... ..i|
|00002720| 72 65 61 64 28 78 25 2c | 57 48 29 0d 15 13 3b 20 |read(x%,|WH)...; |
|00002730| 62 6c 6f 63 6b 25 21 30 | 3d 57 48 3a 62 6c 6f 63 |block%!0|=WH:bloc|
|00002740| 6b 25 21 34 3d 78 25 3a | c8 99 20 22 57 69 6d 70 |k%!4=x%:|.. "Wimp|
|00002750| 5f 47 65 74 49 63 6f 6e | 53 74 61 74 65 22 2c 2c |_GetIcon|State",,|
|00002760| 62 6c 6f 63 6b 25 0d 15 | 22 14 20 61 24 3d 24 28 |block%..|". a$=$(|
|00002770| 62 6c 6f 63 6b 25 21 32 | 38 29 0d 15 31 06 20 e1 |block%!2|8)..1. .|
|00002780| 0d 16 a8 10 20 f4 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.... .--|--------|
|00002790| 0d 16 b7 0e 20 dd f2 70 | 61 6c 69 6e 69 74 0d 16 |.... ..p|alinit..|
|000027a0| c6 1c 20 70 30 25 21 30 | 3d 26 66 66 66 66 66 66 |.. p0%!0|=&ffffff|
|000027b0| 30 30 3a 70 30 25 21 34 | 3d 30 0d 16 d5 3d 20 70 |00:p0%!4|=0...= p|
|000027c0| 31 25 21 30 3d 26 66 66 | 66 66 66 66 30 30 3a 70 |1%!0=&ff|ffff00:p|
|000027d0| 31 25 21 34 3d 26 62 62 | 62 62 62 62 30 30 3a 70 |1%!4=&bb|bbbb00:p|
|000027e0| 31 25 21 38 3d 26 37 37 | 37 37 37 37 30 30 3a 70 |1%!8=&77|777700:p|
|000027f0| 31 25 21 31 32 3d 30 0d | 16 e4 45 20 70 32 25 21 |1%!12=0.|..E p2%!|
|00002800| 30 3d 26 66 66 66 66 66 | 66 30 30 3a 70 32 25 21 |0=&fffff|f00:p2%!|
|00002810| 34 3d 26 64 64 64 64 64 | 64 30 30 3a 70 32 25 21 |4=&ddddd|d00:p2%!|
|00002820| 38 3d 26 62 62 62 62 62 | 62 30 30 3a 70 32 25 21 |8=&bbbbb|b00:p2%!|
|00002830| 31 32 3d 26 39 39 39 39 | 39 39 30 30 0d 16 f3 40 |12=&9999|9900...@|
|00002840| 20 70 32 25 21 31 36 3d | 26 37 37 37 37 37 37 30 | p2%!16=|&7777770|
|00002850| 30 3a 70 32 25 21 32 30 | 3d 26 35 35 35 35 35 35 |0:p2%!20|=&555555|
|00002860| 30 30 3a 70 32 25 21 32 | 34 3d 26 33 33 33 33 33 |00:p2%!2|4=&33333|
|00002870| 33 30 30 3a 70 32 25 21 | 32 38 3d 30 0d 17 02 48 |300:p2%!|28=0...H|
|00002880| 20 70 32 25 21 33 32 3d | 26 39 39 34 34 30 30 30 | p2%!32=|&9944000|
|00002890| 30 3a 70 32 25 21 33 36 | 3d 26 30 30 65 65 65 65 |0:p2%!36|=&00eeee|
|000028a0| 30 30 3a 70 32 25 21 34 | 30 3d 26 30 30 63 63 30 |00:p2%!4|0=&00cc0|
|000028b0| 30 30 30 3a 70 32 25 21 | 34 34 3d 26 30 30 30 30 |000:p2%!|44=&0000|
|000028c0| 64 64 30 30 0d 17 11 48 | 20 70 32 25 21 34 38 3d |dd00...H| p2%!48=|
|000028d0| 26 62 62 65 65 65 65 30 | 30 3a 70 32 25 21 35 32 |&bbeeee0|0:p2%!52|
|000028e0| 3d 26 30 30 38 38 35 35 | 30 30 3a 70 32 25 21 35 |=&008855|00:p2%!5|
|000028f0| 36 3d 26 30 30 62 62 66 | 66 30 30 3a 70 32 25 21 |6=&00bbf|f00:p2%!|
|00002900| 36 30 3d 26 66 66 62 62 | 30 30 30 30 0d 17 20 45 |60=&ffbb|0000.. E|
|00002910| 20 70 33 25 21 30 3d 26 | 30 30 30 30 30 30 30 30 | p3%!0=&|00000000|
|00002920| 3a 70 33 25 21 34 3d 26 | 31 30 31 30 31 30 30 30 |:p3%!4=&|10101000|
|00002930| 3a 70 33 25 21 38 3d 26 | 32 30 32 30 32 30 30 30 |:p3%!8=&|20202000|
|00002940| 3a 70 33 25 21 31 32 3d | 26 33 30 33 30 33 30 30 |:p3%!12=|&3030300|
|00002950| 30 0d 17 2f 48 20 70 33 | 25 21 31 36 3d 26 30 30 |0../H p3|%!16=&00|
|00002960| 30 30 34 30 30 30 3a 70 | 33 25 21 32 30 3d 26 31 |004000:p|3%!20=&1|
|00002970| 30 31 30 35 30 30 30 3a | 70 33 25 21 32 34 3d 26 |0105000:|p3%!24=&|
|00002980| 32 30 32 30 36 30 30 30 | 3a 70 33 25 21 32 38 3d |20206000|:p3%!28=|
|00002990| 26 33 30 33 30 37 30 30 | 30 0d 17 3e 48 20 70 33 |&3030700|0..>H p3|
|000029a0| 25 21 33 32 3d 26 34 30 | 30 30 30 30 30 30 3a 70 |%!32=&40|000000:p|
|000029b0| 33 25 21 33 36 3d 26 35 | 30 31 30 31 30 30 30 3a |3%!36=&5|0101000:|
|000029c0| 70 33 25 21 34 30 3d 26 | 36 30 32 30 32 30 30 30 |p3%!40=&|60202000|
|000029d0| 3a 70 33 25 21 34 34 3d | 26 37 30 33 30 33 30 30 |:p3%!44=|&7030300|
|000029e0| 30 0d 17 4d 48 20 70 33 | 25 21 34 38 3d 26 34 30 |0..MH p3|%!48=&40|
|000029f0| 30 30 34 30 30 30 3a 70 | 33 25 21 35 32 3d 26 35 |004000:p|3%!52=&5|
|00002a00| 30 31 30 35 30 30 30 3a | 70 33 25 21 35 36 3d 26 |0105000:|p3%!56=&|
|00002a10| 36 30 32 30 36 30 30 30 | 3a 70 33 25 21 36 30 3d |60206000|:p3%!60=|
|00002a20| 26 37 30 33 30 37 30 30 | 30 0d 17 5c 06 20 e1 0d |&7030700|0..\. ..|
|00002a30| 17 6b 11 20 f4 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.k. .---|--------|
|00002a40| 0d 17 7a 0c 20 dd f2 73 | 65 74 75 70 0d 17 89 1b |..z. ..s|etup....|
|00002a50| 20 de 20 61 72 65 61 25 | 20 32 35 36 2c 70 6d 65 | . area%| 256,pme|
|00002a60| 6e 75 25 20 33 30 30 0d | 17 98 3e 20 c8 99 22 4f |nu% 300.|..> .."O|
|00002a70| 53 5f 52 65 61 64 56 61 | 72 56 61 6c 22 2c 22 21 |S_ReadVa|rVal","!|
|00002a80| 50 72 65 64 69 63 74 24 | 44 69 72 22 2c 61 72 65 |Predict$|Dir",are|
|00002a90| 61 25 2c 32 35 36 2c 30 | 2c 33 20 b8 20 2c 2c 6c |a%,256,0|,3 . ,,l|
|00002aa0| 65 6e 67 74 68 0d 17 a7 | 21 20 61 72 65 61 25 3f |ength...|! area%?|
|00002ab0| 6c 65 6e 67 74 68 3d 31 | 33 3a 70 61 74 68 24 3d |length=1|3:path$=|
|00002ac0| 24 61 72 65 61 25 0d 17 | b6 2d 20 59 24 3d 70 61 |$area%..|.- Y$=pa|
|00002ad0| 74 68 24 2b 22 2e 54 65 | 6d 70 6c 61 74 65 73 22 |th$+".Te|mplates"|
|00002ae0| 3a 59 31 24 3d 70 61 74 | 68 24 2b 22 2e 69 63 6f |:Y1$=pat|h$+".ico|
|00002af0| 6e 73 22 0d 17 c5 2b 20 | de 20 70 30 25 20 38 2c |ns"...+ |. p0% 8,|
|00002b00| 70 31 25 20 31 36 2c 70 | 32 25 20 36 34 2c 70 33 |p1% 16,p|2% 64,p3|
|00002b10| 25 20 36 34 3a 73 6d 6f | 64 65 25 3d 2d 31 0d 17 |% 64:smo|de%=-1..|
|00002b20| d4 21 20 de 20 70 61 6c | 62 75 66 66 25 20 32 30 |.! . pal|buff% 20|
|00002b30| 34 38 2c 74 72 61 6e 73 | 32 25 20 32 30 34 38 0d |48,trans|2% 2048.|
|00002b40| 17 e3 2e 20 de 20 74 72 | 61 6e 73 25 20 31 36 2c |... . tr|ans% 16,|
|00002b50| 72 65 63 74 25 20 31 36 | 2c 70 6c 6f 74 61 74 25 |rect% 16|,plotat%|
|00002b60| 20 38 2c 72 65 63 74 69 | 6e 25 20 31 36 0d 17 f2 | 8,recti|n% 16...|
|00002b70| 29 20 de 20 62 6c 6f 63 | 6b 25 20 33 30 30 30 2c |) . bloc|k% 3000,|
|00002b80| 62 6c 6f 63 6b 32 25 20 | 32 35 36 2c 77 6d 65 6e |block2% |256,wmen|
|00002b90| 75 25 20 37 30 30 0d 18 | 01 24 20 de 20 62 6c 6f |u% 700..|.$ . blo|
|00002ba0| 63 6b 32 25 20 32 35 36 | 2c 6d 65 6e 75 25 20 35 |ck2% 256|,menu% 5|
|00002bb0| 30 30 2c 6d 61 67 25 20 | 31 36 0d 18 10 31 20 63 |00,mag% |16...1 c|
|00002bc0| 72 65 61 74 65 5f 6d 65 | 6e 75 3d 30 3a 66 61 6c |reate_me|nu=0:fal|
|00002bd0| 6c 69 6e 67 25 3d b9 3a | 73 74 65 61 64 79 25 3d |ling%=.:|steady%=|
|00002be0| a3 3a 72 69 73 69 6e 67 | 25 3d a3 0d 18 1f 3d 20 |.:rising|%=....= |
|00002bf0| 77 69 6e 64 24 3d 22 53 | 6f 75 74 68 20 57 65 73 |wind$="S|outh Wes|
|00002c00| 74 22 3a 4d 55 24 3d 22 | 22 3a 73 65 61 73 6f 6e |t":MU$="|":season|
|00002c10| 24 3d 22 53 70 72 69 6e | 67 22 3a 63 72 65 61 74 |$="Sprin|g":creat|
|00002c20| 65 5f 6d 65 6e 75 3d 30 | 0d 18 2e 06 20 e1 0d 18 |e_menu=0|.... ...|
|00002c30| 3d 10 20 f4 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 18 |=. .----|------..|
|00002c40| 4c 0d 20 dd f2 73 65 74 | 75 70 32 0d 18 5b 37 20 |L. ..set|up2..[7 |
|00002c50| de 20 64 73 6b 25 20 31 | 32 30 2c 73 70 72 6e 61 |. dsk% 1|20,sprna|
|00002c60| 6d 65 25 20 31 33 2c 69 | 63 6f 6e 73 70 61 63 65 |me% 13,i|conspace|
|00002c70| 20 31 35 2a 31 30 32 34 | 2c 46 52 45 44 25 20 32 | 15*1024|,FRED% 2|
|00002c80| 35 36 0d 18 79 2c 20 de | 20 66 5f 61 6e 73 25 20 |56..y, .| f_ans% |
|00002c90| 31 30 30 2c 77 69 6e 5f | 69 64 65 6e 25 20 31 31 |100,win_|iden% 11|
|00002ca0| 2c 69 6e 25 20 31 32 2c | 6f 75 25 20 31 32 0d 18 |,in% 12,|ou% 12..|
|00002cb0| 88 28 20 de 20 77 64 61 | 74 61 31 25 20 33 30 30 |.( . wda|ta1% 300|
|00002cc0| 30 3a 77 64 31 65 6e 64 | 25 3d 77 64 61 74 61 31 |0:wd1end|%=wdata1|
|00002cd0| 25 2b 33 30 30 30 0d 18 | 97 3e 20 69 6e 25 21 30 |%+3000..|.> in%!0|
|00002ce0| 3d 31 32 3a 69 6e 25 21 | 34 3d 35 3a 69 6e 25 21 |=12:in%!|4=5:in%!|
|00002cf0| 38 3d 2d 31 3a c8 99 22 | 4f 53 5f 52 65 61 64 56 |8=-1:.."|OS_ReadV|
|00002d00| 64 75 56 61 72 69 61 62 | 6c 65 73 22 2c 69 6e 25 |duVariab|les",in%|
|00002d10| 2c 6f 75 25 0d 18 a6 2a | 20 74 6f 70 5f 79 3d 28 |,ou%...*| top_y=(|
|00002d20| 6f 75 25 21 30 29 2b 31 | 3a 74 6f 70 5f 79 3d 28 |ou%!0)+1|:top_y=(|
|00002d30| 32 5e 6f 75 25 21 34 29 | 2a 74 6f 70 5f 79 0d 18 |2^ou%!4)|*top_y..|
|00002d40| b5 3e 20 69 6e 25 21 30 | 3d 31 31 3a 69 6e 25 21 |.> in%!0|=11:in%!|
|00002d50| 34 3d 34 3a 69 6e 25 21 | 38 3d 2d 31 3a c8 99 22 |4=4:in%!|8=-1:.."|
|00002d60| 4f 53 5f 52 65 61 64 56 | 64 75 56 61 72 69 61 62 |OS_ReadV|duVariab|
|00002d70| 6c 65 73 22 2c 69 6e 25 | 2c 6f 75 25 0d 18 c4 2a |les",in%|,ou%...*|
|00002d80| 20 74 6f 70 5f 78 3d 28 | 6f 75 25 21 30 29 2b 31 | top_x=(|ou%!0)+1|
|00002d90| 3a 74 6f 70 5f 78 3d 28 | 32 5e 6f 75 25 21 34 29 |:top_x=(|2^ou%!4)|
|00002da0| 2a 74 6f 70 5f 78 0d 18 | d3 35 20 c8 99 22 4f 53 |*top_x..|.5 .."OS|
|00002db0| 5f 53 70 72 69 74 65 4f | 70 22 2c 32 36 35 2c 69 |_SpriteO|p",265,i|
|00002dc0| 63 6f 6e 73 70 61 63 65 | 3a 21 69 63 6f 6e 73 70 |conspace|:!iconsp|
|00002dd0| 61 63 65 3d 31 35 2a 31 | 30 32 34 0d 18 e2 21 20 |ace=15*1|024...! |
|00002de0| 69 63 6f 6e 73 70 61 63 | 65 21 34 3d 30 3a 69 63 |iconspac|e!4=0:ic|
|00002df0| 6f 6e 73 70 61 63 65 21 | 38 3d 31 36 0d 18 f1 13 |onspace!|8=16....|
|00002e00| 20 24 62 6c 6f 63 6b 25 | 3d 22 54 41 53 4b 22 0d | $block%|="TASK".|
|00002e10| 19 00 3f 20 c8 99 22 57 | 69 6d 70 5f 49 6e 69 74 |..? .."W|imp_Init|
|00002e20| 69 61 6c 69 73 65 22 2c | 32 30 30 2c 21 62 6c 6f |ialise",|200,!blo|
|00002e30| 63 6b 25 2c 22 50 72 65 | 64 69 63 74 22 20 b8 20 |ck%,"Pre|dict" . |
|00002e40| 76 65 72 73 69 6f 6e 25 | 2c 74 61 73 6b 25 0d 19 |version%|,task%..|
|00002e50| 0f 0c 20 71 75 69 74 25 | 3d a3 0d 19 1e 1e 20 c8 |.. quit%|=..... .|
|00002e60| 99 22 57 69 6d 70 5f 4f | 70 65 6e 54 65 6d 70 6c |."Wimp_O|penTempl|
|00002e70| 61 74 65 22 2c 2c 59 24 | 0d 19 2d 34 20 77 68 61 |ate",,Y$|..-4 wha|
|00002e80| 6e 64 6c 65 31 25 3d a4 | 54 65 6d 70 28 22 4d 61 |ndle1%=.|Temp("Ma|
|00002e90| 69 6e 22 29 3a 77 68 61 | 6e 64 6c 65 32 25 3d a4 |in"):wha|ndle2%=.|
|00002ea0| 54 65 6d 70 28 22 49 6e | 66 6f 22 29 0d 19 3c 3d |Temp("In|fo")..<=|
|00002eb0| 20 77 68 61 6e 64 6c 65 | 39 25 3d a4 54 65 6d 70 | whandle|9%=.Temp|
|00002ec0| 28 22 77 61 72 6e 69 6e | 67 22 29 3a 77 68 61 6e |("warnin|g"):whan|
|00002ed0| 64 6c 65 31 35 25 3d a4 | 54 65 6d 70 28 22 63 6c |dle15%=.|Temp("cl|
|00002ee0| 6f 73 65 64 6f 77 6e 22 | 29 0d 15 59 2e 20 65 72 |osedown"|)..Y. er|
|00002ef0| 72 62 6f 78 25 3d a4 54 | 65 6d 70 28 22 65 72 72 |rbox%=.T|emp("err|
|00002f00| 62 6f 78 22 29 3a 72 65 | 67 25 3d a4 54 65 6d 70 |box"):re|g%=.Temp|
|00002f10| 28 22 72 65 67 22 29 0d | 19 4b 1b 20 c8 99 22 57 |("reg").|.K. .."W|
|00002f20| 69 6d 70 5f 43 6c 6f 73 | 65 54 65 6d 70 6c 61 74 |imp_Clos|eTemplat|
|00002f30| 65 22 0d 19 4c 2b 20 c8 | 99 22 4f 53 5f 52 65 61 |e"..L+ .|."OS_Rea|
|00002f40| 64 4d 6f 64 65 56 61 72 | 69 61 62 6c 65 22 2c 2d |dModeVar|iable",-|
|00002f50| 31 2c 35 20 b8 20 2c 2c | 79 6d 61 67 32 0d 19 4d |1,5 . ,,|ymag2..M|
|00002f60| 2b 20 c8 99 22 4f 53 5f | 52 65 61 64 4d 6f 64 65 |+ .."OS_|ReadMode|
|00002f70| 56 61 72 69 61 62 6c 65 | 22 2c 2d 31 2c 34 20 b8 |Variable|",-1,4 .|
|00002f80| 20 2c 2c 78 6d 61 67 32 | 0d 19 4e 40 20 59 31 24 | ,,xmag2|..N@ Y1$|
|00002f90| 3d 70 61 74 68 24 2b 22 | 2e 69 63 6f 6e 73 32 32 |=path$+"|.icons22|
|00002fa0| 22 3a e7 20 78 6d 61 67 | 32 3e 31 20 84 20 79 6d |":. xmag|2>1 . ym|
|00002fb0| 61 67 32 3e 31 20 59 31 | 24 3d 70 61 74 68 24 2b |ag2>1 Y1|$=path$+|
|00002fc0| 22 2e 69 63 6f 6e 73 22 | 0d 19 5a 26 20 c8 99 22 |".icons"|..Z& .."|
|00002fd0| 4f 53 5f 53 70 72 69 74 | 65 4f 70 22 2c 32 36 36 |OS_Sprit|eOp",266|
|00002fe0| 2c 69 63 6f 6e 73 70 61 | 63 65 2c 59 31 24 0d 19 |,iconspa|ce,Y1$..|
|00002ff0| 69 0d 20 f2 70 61 6c 69 | 6e 69 74 0d 19 78 39 20 |i. .pali|nit..x9 |
|00003000| 69 62 61 72 31 25 3d a4 | 69 63 6f 6e 64 65 66 28 |ibar1%=.|icondef(|
|00003010| 2d 31 2c 30 2c 30 2c 36 | 38 2c 36 38 2c 26 33 30 |-1,0,0,6|8,68,&30|
|00003020| 30 32 2c 22 21 50 72 65 | 64 69 63 74 22 2c 30 2c |02,"!Pre|dict",0,|
|00003030| 30 2c 30 29 0d 19 87 06 | 20 e1 0d 19 96 10 20 f4 |0,0)....| ..... .|
|00003040| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 19 a5 0d 20 dd |--------|--.... .|
|00003050| f2 73 65 74 75 70 33 0d | 19 b4 2e 20 59 37 24 3d |.setup3.|... Y7$=|
|00003060| 70 61 74 68 24 2b 22 2e | 4d 65 73 73 61 67 65 73 |path$+".|Messages|
|00003070| 22 3a de 20 6d 65 73 73 | 61 67 65 5f 61 72 65 61 |":. mess|age_area|
|00003080| 20 33 30 30 30 0d 19 c3 | 28 20 de 20 6d 65 73 73 | 3000...|( . mess|
|00003090| 61 67 65 5f 70 74 72 20 | 31 35 2c 73 71 75 25 20 |age_ptr |15,squ% |
|000030a0| 31 36 2c 4d 62 75 66 66 | 25 20 32 35 36 0d 19 d2 |16,Mbuff|% 256...|
|000030b0| 3b 20 c8 99 22 4d 65 73 | 73 61 67 65 54 72 61 6e |; .."Mes|sageTran|
|000030c0| 73 5f 4f 70 65 6e 46 69 | 6c 65 22 2c 6d 65 73 73 |s_OpenFi|le",mess|
|000030d0| 61 67 65 5f 70 74 72 2c | 59 37 24 2c 6d 65 73 73 |age_ptr,|Y7$,mess|
|000030e0| 61 67 65 5f 61 72 65 61 | 0d 19 e1 06 20 e1 0d 19 |age_area|.... ...|
|000030f0| f0 10 20 f4 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 19 |.. .----|------..|
|00003100| ff 0e 20 dd f2 72 6d 28 | 72 6d 24 29 0d 1a 0e 40 |.. ..rm(|rm$)...@|
|00003110| 20 c8 99 22 4d 65 73 73 | 61 67 65 54 72 61 6e 73 | .."Mess|ageTrans|
|00003120| 5f 4c 6f 6f 6b 75 70 22 | 2c 6d 65 73 73 61 67 65 |_Lookup"|,message|
|00003130| 5f 70 74 72 2c 72 6d 24 | 2c 30 20 b8 20 2c 2c 6d |_ptr,rm$|,0 . ,,m|
|00003140| 5f 70 74 72 25 2c 6d 5f | 6c 65 6e 25 0d 1a 1d 3d |_ptr%,m_|len%...=|
|00003150| 20 74 65 78 74 24 3d 22 | 22 3a e3 20 6c 6f 6f 70 | text$="|":. loop|
|00003160| 31 34 3d 30 20 b8 20 6d | 5f 6c 65 6e 25 2d 31 3a |14=0 . m|_len%-1:|
|00003170| 74 65 78 74 24 2b 3d bd | 28 6d 5f 70 74 72 25 3f |text$+=.|(m_ptr%?|
|00003180| 6c 6f 6f 70 31 34 29 3a | ed 0d 1a 2c 06 20 e1 0d |loop14):|...,. ..|
|00003190| 1a 3b 10 20 f4 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |.;. .---|-------.|
|000031a0| 1a 4a 0d 20 dd a4 6d 73 | 28 41 24 29 0d 1a 59 09 |.J. ..ms|(A$)..Y.|
|000031b0| 20 ea 20 4c 25 0d 1a 68 | 43 20 c8 99 22 4d 65 73 | . L%..h|C .."Mes|
|000031c0| 73 61 67 65 54 72 61 6e | 73 5f 4c 6f 6f 6b 75 70 |sageTran|s_Lookup|
|000031d0| 22 2c 6d 65 73 73 61 67 | 65 5f 70 74 72 2c 41 24 |",messag|e_ptr,A$|
|000031e0| 2c 4d 62 75 66 66 25 2c | 32 35 36 2c 22 22 2c 22 |,Mbuff%,|256,"","|
|000031f0| 22 20 b8 2c 2c 2c 4c 25 | 0d 1a 77 1a 20 4d 62 75 |" .,,,L%|..w. Mbu|
|00003200| 66 66 25 3f 4c 25 3d 31 | 33 3a 3d 24 4d 62 75 66 |ff%?L%=1|3:=$Mbuf|
|00003210| 66 25 0d 1a 86 10 20 f4 | 2d 2d 2d 2d 2d 2d 2d 2d |f%.... .|--------|
|00003220| 2d 2d 0d 1a 95 25 20 dd | f2 64 65 6c 61 79 3a e3 |--...% .|.delay:.|
|00003230| 20 74 69 6d 65 5f 6c 6f | 6f 70 3d 31 20 b8 20 34 | time_lo|op=1 . 4|
|00003240| 30 30 30 3a ed 3a e1 0d | 1a a4 10 20 f4 2d 2d 2d |000:.:..|... .---|
|00003250| 2d 2d 2d 2d 2d 2d 2d 0d | 1a b3 0d 20 dd f2 63 61 |-------.|... ..ca|
|00003260| 72 64 5f 78 0d 1a c2 24 | 20 c8 99 22 57 69 6d 70 |rd_x...$| .."Wimp|
|00003270| 5f 50 6f 6c 6c 22 2c 2c | 62 6c 6f 63 6b 25 20 b8 |_Poll",,|block% .|
|00003280| 20 72 65 61 73 6f 6e 25 | 0d 1a d1 11 20 c8 8e 20 | reason%|.... .. |
|00003290| 72 65 61 73 6f 6e 25 20 | ca 0d 1a e0 12 20 20 c9 |reason% |..... .|
|000032a0| 20 31 20 3a f2 72 65 64 | 72 61 77 0d 1a ef 26 20 | 1 :.red|raw...& |
|000032b0| 20 c9 20 32 20 3a c8 99 | 22 57 69 6d 70 5f 4f 70 | . 2 :..|"Wimp_Op|
|000032c0| 65 6e 57 69 6e 64 6f 77 | 22 2c 2c 62 6c 6f 63 6b |enWindow|",,block|
|000032d0| 25 0d 1a fe 06 20 cb 0d | 1b 0d 06 20 e1 0d 1b 1c |%.... ..|... ....|
|000032e0| 10 20 f4 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 1b 2b |. .-----|-----..+|
|000032f0| 1d 20 dd f2 61 6c 65 72 | 74 28 6d 65 24 2c 62 75 |. ..aler|t(me$,bu|
|00003300| 74 31 24 2c 62 75 74 32 | 24 29 0d 1b 3a 1b 20 f2 |t1$,but2|$)..:. .|
|00003310| 69 73 65 74 28 32 2c 6d | 65 24 2c 77 68 61 6e 64 |iset(2,m|e$,whand|
|00003320| 6c 65 39 25 29 0d 1b 49 | 36 20 f2 69 73 65 74 28 |le9%)..I|6 .iset(|
|00003330| 36 2c 62 75 74 31 24 2c | 77 68 61 6e 64 6c 65 39 |6,but1$,|whandle9|
|00003340| 25 29 3a f2 69 73 65 74 | 28 37 2c 62 75 74 32 24 |%):.iset|(7,but2$|
|00003350| 2c 77 68 61 6e 64 6c 65 | 39 25 29 0d 1b 58 10 20 |,whandle|9%)..X. |
|00003360| 61 6c 65 72 74 3d 2d 31 | 3a ef 37 0d 1b 67 36 20 |alert=-1|:.7..g6 |
|00003370| 62 6c 6f 63 6b 25 21 30 | 3d 77 68 61 6e 64 6c 65 |block%!0|=whandle|
|00003380| 39 25 3a c8 99 22 57 69 | 6d 70 5f 47 65 74 57 69 |9%:.."Wi|mp_GetWi|
|00003390| 6e 64 6f 77 49 6e 66 6f | 22 2c 2c 62 6c 6f 63 6b |ndowInfo|",,block|
|000033a0| 25 0d 1b 76 32 20 62 6c | 6f 63 6b 25 21 34 3d 28 |%..v2 bl|ock%!4=(|
|000033b0| 74 6f 70 5f 78 2f 32 29 | 2d 33 39 37 3a 62 6c 6f |top_x/2)|-397:blo|
|000033c0| 63 6b 25 21 31 32 3d 62 | 6c 6f 63 6b 25 21 34 2b |ck%!12=b|lock%!4+|
|000033d0| 37 39 34 0d 1b 85 32 20 | 62 6c 6f 63 6b 25 21 38 |794...2 |block%!8|
|000033e0| 3d 28 74 6f 70 5f 79 2f | 32 29 2d 31 39 32 3a 62 |=(top_y/|2)-192:b|
|000033f0| 6c 6f 63 6b 25 21 31 36 | 3d 62 6c 6f 63 6b 25 21 |lock%!16|=block%!|
|00003400| 38 2b 33 38 34 0d 1b 94 | 4a 20 78 31 3d 62 6c 6f |8+384...|J x1=blo|
|00003410| 63 6b 25 21 34 3a 79 31 | 3d 62 6c 6f 63 6b 25 21 |ck%!4:y1|=block%!|
|00003420| 38 3a 77 69 64 3d 62 6c | 6f 63 6b 25 21 31 32 2d |8:wid=bl|ock%!12-|
|00003430| 62 6c 6f 63 6b 25 21 34 | 3a 68 67 74 3d 62 6c 6f |block%!4|:hgt=blo|
|00003440| 63 6b 25 21 31 36 2d 62 | 6c 6f 63 6b 25 21 38 0d |ck%!16-b|lock%!8.|
|00003450| 1b a3 20 20 c8 99 22 57 | 69 6d 70 5f 4f 70 65 6e |.. .."W|imp_Open|
|00003460| 57 69 6e 64 6f 77 22 2c | 2c 62 6c 6f 63 6b 25 0d |Window",|,block%.|
|00003470| 1b b2 18 20 c8 97 20 c8 | 93 20 78 31 2c 79 31 2c |... .. .|. x1,y1,|
|00003480| 77 69 64 2c 68 67 74 0d | 1b c1 06 20 f5 0d 1b d0 |wid,hgt.|... ....|
|00003490| 26 20 20 c8 99 20 22 57 | 69 6d 70 5f 50 6f 6c 6c |& .. "W|imp_Poll|
|000034a0| 22 2c 2c 62 6c 6f 63 6b | 25 20 b8 20 72 65 61 73 |",,block|% . reas|
|000034b0| 6f 6e 25 0d 1b df 12 20 | 20 c8 8e 20 72 65 61 73 |on%.... | .. reas|
|000034c0| 6f 6e 25 20 ca 0d 1b ee | 13 20 20 20 c9 20 31 20 |on% ....|. . 1 |
|000034d0| 3a f2 72 65 64 72 61 77 | 0d 1b fd 28 20 20 20 c9 |:.redraw|...( .|
|000034e0| 20 32 20 3a c8 99 20 22 | 57 69 6d 70 5f 4f 70 65 | 2 :.. "|Wimp_Ope|
|000034f0| 6e 57 69 6e 64 6f 77 22 | 2c 2c 62 6c 6f 63 6b 25 |nWindow"|,,block%|
|00003500| 0d 1c 0c 0b 20 20 20 c9 | 20 36 3a 0d 1c 1b 1d 20 |.... .| 6:.... |
|00003510| 20 20 20 e7 20 62 6c 6f | 63 6b 25 21 31 36 3d 38 | . blo|ck%!16=8|
|00003520| 20 61 6c 65 72 74 3d 32 | 0d 1c 2a 1d 20 20 20 20 | alert=2|..*. |
|00003530| e7 20 62 6c 6f 63 6b 25 | 21 31 36 3d 39 20 61 6c |. block%|!16=9 al|
|00003540| 65 72 74 3d 30 0d 1c 39 | 07 20 20 cb 0d 1c 48 10 |ert=0..9|. ...H.|
|00003550| 20 fd 20 61 6c 65 72 74 | 3c 3e 2d 31 0d 1c 57 1f | . alert|<>-1..W.|
|00003560| 20 f2 72 65 73 74 6f 72 | 65 66 75 6c 6c 6d 6f 75 | .restor|efullmou|
|00003570| 73 65 72 65 63 74 61 6e | 67 6c 65 0d 1c 66 34 20 |serectan|gle..f4 |
|00003580| 62 6c 6f 63 6b 25 21 30 | 3d 77 68 61 6e 64 6c 65 |block%!0|=whandle|
|00003590| 39 25 3a c8 99 22 57 69 | 6d 70 5f 43 6c 6f 73 65 |9%:.."Wi|mp_Close|
|000035a0| 57 69 6e 64 6f 77 22 2c | 2c 62 6c 6f 63 6b 25 0d |Window",|,block%.|
|000035b0| 1c 75 06 20 e1 0d 1c 84 | 10 20 f4 2d 2d 2d 2d 2d |.u. ....|. .-----|
|000035c0| 2d 2d 2d 2d 2d 0d 1c 93 | 12 20 dd f2 61 6c 65 72 |-----...|. ..aler|
|000035d0| 74 32 28 6d 65 24 29 0d | 1c a2 28 20 f2 69 73 65 |t2(me$).|..( .ise|
|000035e0| 74 28 32 2c 6d 65 24 2c | 77 68 61 6e 64 6c 65 31 |t(2,me$,|whandle1|
|000035f0| 35 25 29 3a 61 6c 65 72 | 74 3d 2d 31 3a ef 37 0d |5%):aler|t=-1:.7.|
|00003600| 1c b1 37 20 62 6c 6f 63 | 6b 25 21 30 3d 77 68 61 |..7 bloc|k%!0=wha|
|00003610| 6e 64 6c 65 31 35 25 3a | c8 99 22 57 69 6d 70 5f |ndle15%:|.."Wimp_|
|00003620| 47 65 74 57 69 6e 64 6f | 77 49 6e 66 6f 22 2c 2c |GetWindo|wInfo",,|
|00003630| 62 6c 6f 63 6b 25 0d 1c | c0 32 20 62 6c 6f 63 6b |block%..|.2 block|
|00003640| 25 21 34 3d 28 74 6f 70 | 5f 78 2f 32 29 2d 33 39 |%!4=(top|_x/2)-39|
|00003650| 37 3a 62 6c 6f 63 6b 25 | 21 31 32 3d 62 6c 6f 63 |7:block%|!12=bloc|
|00003660| 6b 25 21 34 2b 37 39 34 | 0d 1c cf 32 20 62 6c 6f |k%!4+794|...2 blo|
|00003670| 63 6b 25 21 38 3d 28 74 | 6f 70 5f 79 2f 32 29 2d |ck%!8=(t|op_y/2)-|
|00003680| 31 39 32 3a 62 6c 6f 63 | 6b 25 21 31 36 3d 62 6c |192:bloc|k%!16=bl|
|00003690| 6f 63 6b 25 21 38 2b 33 | 38 34 0d 1c de 4a 20 78 |ock%!8+3|84...J x|
|000036a0| 31 3d 62 6c 6f 63 6b 25 | 21 34 3a 79 31 3d 62 6c |1=block%|!4:y1=bl|
|000036b0| 6f 63 6b 25 21 38 3a 77 | 69 64 3d 62 6c 6f 63 6b |ock%!8:w|id=block|
|000036c0| 25 21 31 32 2d 62 6c 6f | 63 6b 25 21 34 3a 68 67 |%!12-blo|ck%!4:hg|
|000036d0| 74 3d 62 6c 6f 63 6b 25 | 21 31 36 2d 62 6c 6f 63 |t=block%|!16-bloc|
|000036e0| 6b 25 21 38 0d 1c ed 34 | 20 c8 99 22 57 69 6d 70 |k%!8...4| .."Wimp|
|000036f0| 5f 4f 70 65 6e 57 69 6e | 64 6f 77 22 2c 2c 62 6c |_OpenWin|dow",,bl|
|00003700| 6f 63 6b 25 3a c8 97 20 | c8 93 20 78 31 2c 79 31 |ock%:.. |.. x1,y1|
|00003710| 2c 77 69 64 2c 68 67 74 | 0d 1c fc 06 20 f5 0d 1d |,wid,hgt|.... ...|
|00003720| 0b 26 20 20 c8 99 20 22 | 57 69 6d 70 5f 50 6f 6c |.& .. "|Wimp_Pol|
|00003730| 6c 22 2c 2c 62 6c 6f 63 | 6b 25 20 b8 20 72 65 61 |l",,bloc|k% . rea|
|00003740| 73 6f 6e 25 0d 1d 1a 13 | 20 20 20 c8 8e 20 72 65 |son%....| .. re|
|00003750| 61 73 6f 6e 25 20 ca 0d | 1d 29 14 20 20 20 20 c9 |ason% ..|.). .|
|00003760| 20 31 20 3a f2 72 65 64 | 72 61 77 0d 1d 38 29 20 | 1 :.red|raw..8) |
|00003770| 20 20 20 c9 20 32 20 3a | c8 99 20 22 57 69 6d 70 | . 2 :|.. "Wimp|
|00003780| 5f 4f 70 65 6e 57 69 6e | 64 6f 77 22 2c 2c 62 6c |_OpenWin|dow",,bl|
|00003790| 6f 63 6b 25 0d 1d 47 0c | 20 20 20 20 c9 20 36 3a |ock%..G.| . 6:|
|000037a0| 0d 1d 56 1e 20 20 20 20 | 20 e7 20 62 6c 6f 63 6b |..V. | . block|
|000037b0| 25 21 31 36 3d 35 20 61 | 6c 65 72 74 3d 32 0d 1d |%!16=5 a|lert=2..|
|000037c0| 65 08 20 20 20 cb 0d 1d | 74 10 20 fd 20 61 6c 65 |e. ...|t. . ale|
|000037d0| 72 74 3c 3e 2d 31 0d 1d | 83 33 20 f2 69 73 65 74 |rt<>-1..|.3 .iset|
|000037e0| 28 34 2c 22 72 61 69 73 | 65 32 22 2c 77 68 61 6e |(4,"rais|e2",whan|
|000037f0| 64 6c 65 31 35 25 29 3a | f2 6d 69 6e 69 5f 70 6f |dle15%):|.mini_po|
|00003800| 6c 6c 3a f2 64 65 6c 61 | 79 0d 1d 92 21 20 f2 69 |ll:.dela|y...! .i|
|00003810| 73 65 74 28 34 2c 22 72 | 61 69 73 65 31 22 2c 77 |set(4,"r|aise1",w|
|00003820| 68 61 6e 64 6c 65 31 35 | 25 29 0d 1d a1 1f 20 f2 |handle15|%).... .|
|00003830| 72 65 73 74 6f 72 65 66 | 75 6c 6c 6d 6f 75 73 65 |restoref|ullmouse|
|00003840| 72 65 63 74 61 6e 67 6c | 65 0d 1d b0 35 20 62 6c |rectangl|e...5 bl|
|00003850| 6f 63 6b 25 21 30 3d 77 | 68 61 6e 64 6c 65 31 35 |ock%!0=w|handle15|
|00003860| 25 3a c8 99 22 57 69 6d | 70 5f 43 6c 6f 73 65 57 |%:.."Wim|p_CloseW|
|00003870| 69 6e 64 6f 77 22 2c 2c | 62 6c 6f 63 6b 25 0d 1d |indow",,|block%..|
|00003880| bf 06 20 e1 0d 1d ce 10 | 20 f4 2d 2d 2d 2d 2d 2d |.. .....| .------|
|00003890| 2d 2d 2d 2d 0d 1d dd 23 | 20 dd f2 66 72 61 6d 65 |----...#| ..frame|
|000038a0| 28 66 78 25 2c 66 79 25 | 2c 77 64 25 2c 68 74 25 |(fx%,fy%|,wd%,ht%|
|000038b0| 2c 68 65 61 64 24 29 0d | 1d ec 2c 20 6c 25 3d 28 |,head$).|.., l%=(|
|000038c0| 31 36 2a 28 31 2b a9 68 | 65 61 64 24 29 29 2b 38 |16*(1+.h|ead$))+8|
|000038d0| 3a 68 25 3d 35 34 3a e7 | 20 eb 3e 31 35 20 68 25 |:h%=54:.| .>15 h%|
|000038e0| 3d 35 32 0d 1d fb 19 20 | c8 99 22 57 69 6d 70 5f |=52.... |.."Wimp_|
|000038f0| 53 65 74 43 6f 6c 6f 75 | 72 22 2c 30 0d 1e 0a 21 |SetColou|r",0...!|
|00003900| 20 c8 93 20 66 78 25 2b | 31 36 2c 66 79 25 2b 68 | .. fx%+|16,fy%+h|
|00003910| 74 25 2d 32 34 2c 6c 25 | 2c 68 25 2d 32 0d 1e 19 |t%-24,l%|,h%-2...|
|00003920| 23 20 c8 93 20 66 78 25 | 2b 31 36 2b 32 2c 66 79 |# .. fx%|+16+2,fy|
|00003930| 25 2b 68 74 25 2d 32 34 | 2c 6c 25 2d 34 2c 68 25 |%+ht%-24|,l%-4,h%|
|00003940| 0d 1e 28 2d 20 c8 99 22 | 57 69 6d 70 5f 53 65 74 |..(- .."|Wimp_Set|
|00003950| 43 6f 6c 6f 75 72 22 2c | 34 3a ec 20 66 78 25 2b |Colour",|4:. fx%+|
|00003960| 31 38 2c 66 79 25 2b 68 | 74 25 2d 32 34 0d 1e 37 |18,fy%+h|t%-24..7|
|00003970| 1d 20 df 20 66 78 25 2b | 31 38 2b 6c 25 2d 34 2c |. . fx%+|18+l%-4,|
|00003980| 66 79 25 2b 68 74 25 2d | 32 34 0d 1e 46 31 20 ec |fy%+ht%-|24..F1 .|
|00003990| 20 66 78 25 2b 31 38 2c | 66 79 25 2b 68 74 25 2d | fx%+18,|fy%+ht%-|
|000039a0| 32 32 3a df 20 66 78 25 | 2b 31 38 2b 6c 25 2d 34 |22:. fx%|+18+l%-4|
|000039b0| 2c 66 79 25 2b 68 74 25 | 2d 32 32 0d 1e 55 37 20 |,fy%+ht%|-22..U7 |
|000039c0| ec 20 66 78 25 2b 31 36 | 2b 6c 25 2c 66 79 25 2b |. fx%+16|+l%,fy%+|
|000039d0| 68 74 25 2d 32 34 3a df | 20 66 78 25 2b 31 36 2b |ht%-24:.| fx%+16+|
|000039e0| 6c 25 2c 66 79 25 2b 68 | 74 25 2b 28 68 25 2d 32 |l%,fy%+h|t%+(h%-2|
|000039f0| 34 29 0d 1e 64 37 20 ec | 20 66 78 25 2b 31 34 2b |4)..d7 .| fx%+14+|
|00003a00| 6c 25 2c 66 79 25 2b 68 | 74 25 2d 32 34 3a df 20 |l%,fy%+h|t%-24:. |
|00003a10| 66 78 25 2b 31 34 2b 6c | 25 2c 66 79 25 2b 68 74 |fx%+14+l|%,fy%+ht|
|00003a20| 25 2b 28 68 25 2d 32 34 | 29 0d 1e 73 04 0d 1e 82 |%+(h%-24|)..s....|
|00003a30| 2c 20 c8 99 22 57 69 6d | 70 5f 53 65 74 43 6f 6c |, .."Wim|p_SetCol|
|00003a40| 6f 75 72 22 2c 30 3a c8 | 93 20 66 78 25 2c 66 79 |our",0:.|. fx%,fy|
|00003a50| 25 2c 77 64 25 2c 68 74 | 25 0d 1e 91 36 20 c8 93 |%,wd%,ht|%...6 ..|
|00003a60| 20 66 78 25 2b 32 2c 66 | 79 25 2c 77 64 25 2d 34 | fx%+2,f|y%,wd%-4|
|00003a70| 2c 68 74 25 3a c8 93 20 | 66 78 25 2b 34 2c 66 79 |,ht%:.. |fx%+4,fy|
|00003a80| 25 2b 34 2c 77 64 25 2d | 38 2c 68 74 25 2d 36 0d |%+4,wd%-|8,ht%-6.|
|00003a90| 1e a0 20 20 c8 93 20 66 | 78 25 2b 36 2c 66 79 25 |.. .. f|x%+6,fy%|
|00003aa0| 2b 34 2c 77 64 25 2d 31 | 32 2c 68 74 25 2d 32 0d |+4,wd%-1|2,ht%-2.|
|00003ab0| 1e af 20 20 ec 20 66 78 | 25 2c 66 79 25 2b 32 3a |.. . fx|%,fy%+2:|
|00003ac0| df 20 66 78 25 2b 77 64 | 25 2c 66 79 25 2b 32 0d |. fx%+wd|%,fy%+2.|
|00003ad0| 1e be 27 20 ec 20 66 78 | 25 2c 66 79 25 2b 68 74 |..' . fx|%,fy%+ht|
|00003ae0| 25 2b 32 3a df 20 66 78 | 25 2b 31 30 2c 66 79 25 |%+2:. fx|%+10,fy%|
|00003af0| 2b 68 74 25 2b 32 0d 1e | cd 35 20 c8 99 22 57 69 |+ht%+2..|.5 .."Wi|
|00003b00| 6d 70 5f 53 65 74 43 6f | 6c 6f 75 72 22 2c 34 3a |mp_SetCo|lour",4:|
|00003b10| ec 20 66 78 25 2b 32 2c | 66 79 25 3a df 20 66 78 |. fx%+2,|fy%:. fx|
|00003b20| 25 2b 77 64 25 2d 32 2c | 66 79 25 0d 1e dc 48 20 |%+wd%-2,|fy%...H |
|00003b30| ec 20 66 78 25 2b 77 64 | 25 2c 66 79 25 3a df 20 |. fx%+wd|%,fy%:. |
|00003b40| 66 78 25 2b 77 64 25 2c | 66 79 25 2b 68 74 25 3a |fx%+wd%,|fy%+ht%:|
|00003b50| ec 20 66 78 25 2b 77 64 | 25 2d 32 2c 66 79 25 3a |. fx%+wd|%-2,fy%:|
|00003b60| df 20 66 78 25 2b 77 64 | 25 2d 32 2c 66 79 25 2b |. fx%+wd|%-2,fy%+|
|00003b70| 68 74 25 0d 1e eb 22 20 | ec 20 66 78 25 2b 34 2c |ht%..." |. fx%+4,|
|00003b80| 66 79 25 3a df 20 66 78 | 25 2b 34 2c 66 79 25 2b |fy%:. fx|%+4,fy%+|
|00003b90| 68 74 25 2d 32 0d 1e fa | 24 20 ec 20 66 78 25 2b |ht%-2...|$ . fx%+|
|00003ba0| 36 2c 66 79 25 2b 34 3a | df 20 66 78 25 2b 36 2c |6,fy%+4:|. fx%+6,|
|00003bb0| 66 79 25 2b 68 74 25 2d | 32 0d 1f 09 2c 20 ec 20 |fy%+ht%-|2..., . |
|00003bc0| 66 78 25 2b 34 2c 66 79 | 25 2b 68 74 25 2d 32 3a |fx%+4,fy|%+ht%-2:|
|00003bd0| df 20 66 78 25 2b 77 64 | 25 2d 36 2c 66 79 25 2b |. fx%+wd|%-6,fy%+|
|00003be0| 68 74 25 2d 32 0d 1f 18 | 04 0d 1f 27 3d 20 c8 99 |ht%-2...|...'= ..|
|00003bf0| 22 57 69 6d 70 5f 53 65 | 74 43 6f 6c 6f 75 72 22 |"Wimp_Se|tColour"|
|00003c00| 2c 31 3a c8 93 20 c8 90 | 20 66 78 25 2b 32 32 2c |,1:.. ..| fx%+22,|
|00003c10| 66 79 25 2b 68 74 25 2d | 31 38 2c 6c 25 2d 31 30 |fy%+ht%-|18,l%-10|
|00003c20| 2c 34 38 2d 31 30 0d 1f | 36 37 20 c8 99 22 57 69 |,48-10..|67 .."Wi|
|00003c30| 6d 70 5f 53 65 74 43 6f | 6c 6f 75 72 22 2c 37 3a |mp_SetCo|lour",7:|
|00003c40| ec 20 66 78 25 2b 31 36 | 2b 31 32 2c 66 79 25 2b |. fx%+16|+12,fy%+|
|00003c50| 68 74 25 2b 31 36 3a f1 | 68 65 61 64 24 0d 1f 45 |ht%+16:.|head$..E|
|00003c60| 06 20 e1 0d 1f 54 10 20 | f4 2d 2d 2d 2d 2d 2d 2d |. ...T. |.-------|
|00003c70| 2d 2d 2d 0d 1f 63 0f 20 | dd f2 6f 70 65 6e 6d 61 |---..c. |..openma|
|00003c80| 69 6e 0d 1f 72 37 20 62 | 6c 6f 63 6b 25 21 30 3d |in..r7 b|lock%!0=|
|00003c90| 77 68 61 6e 64 6c 65 31 | 25 3a c8 99 22 57 69 6d |whandle1|%:.."Wim|
|00003ca0| 70 5f 47 65 74 57 69 6e | 64 6f 77 53 74 61 74 65 |p_GetWin|dowState|
|00003cb0| 22 2c 2c 62 6c 6f 63 6b | 25 0d 1f 81 38 20 62 6c |",,block|%...8 bl|
|00003cc0| 6f 63 6b 25 21 32 30 3d | 30 3a 62 6c 6f 63 6b 25 |ock%!20=|0:block%|
|00003cd0| 21 32 34 3d 30 3a c8 99 | 22 57 69 6d 70 5f 4f 70 |!24=0:..|"Wimp_Op|
|00003ce0| 65 6e 57 69 6e 64 6f 77 | 22 2c 2c 62 6c 6f 63 6b |enWindow|",,block|
|00003cf0| 25 0d 1f 90 06 20 e1 0d | 1f 9f 10 20 f4 2d 2d 2d |%.... ..|... .---|
|00003d00| 2d 2d 2d 2d 2d 2d 2d 0d | 1f ae 0f 20 dd f2 72 65 |-------.|... ..re|
|00003d10| 61 64 5f 76 65 72 0d 1f | bd 14 20 2a 53 65 74 20 |ad_ver..|.. *Set |
|00003d20| 52 69 73 63 24 56 65 72 | 20 33 0d 1f cc 34 20 ff |Risc$Ver| 3...4 .|
|00003d30| 28 22 52 4d 45 6e 73 75 | 72 65 20 55 74 69 6c 69 |("RMEnsu|re Utili|
|00003d40| 74 79 4d 6f 64 75 6c 65 | 20 33 2e 30 30 20 53 65 |tyModule| 3.00 Se|
|00003d50| 74 20 52 69 73 63 24 56 | 65 72 20 32 22 29 0d 1f |t Risc$V|er 2")..|
|00003d60| db 39 20 c8 99 22 58 4f | 53 5f 52 65 61 64 56 61 |.9 .."XO|S_ReadVa|
|00003d70| 72 56 61 6c 22 2c 22 52 | 69 73 63 24 56 65 72 22 |rVal","R|isc$Ver"|
|00003d80| 2c 62 6c 6f 63 6b 25 2c | 32 35 36 2c 30 2c 30 20 |,block%,|256,0,0 |
|00003d90| b8 20 2c 2c 6c 65 6e 0d | 1f ea 20 20 62 6c 6f 63 |. ,,len.|.. bloc|
|00003da0| 6b 25 3f 6c 65 6e 3d 31 | 33 3a 72 69 73 63 24 3d |k%?len=1|3:risc$=|
|00003db0| 24 62 6c 6f 63 6b 25 0d | 1f f9 14 20 2a 55 6e 53 |$block%.|... *UnS|
|00003dc0| 65 74 20 52 69 73 63 24 | 56 65 72 0d 20 08 06 20 |et Risc$|Ver. .. |
|00003dd0| e1 0d 20 17 10 20 f4 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.. .. .-|--------|
|00003de0| 2d 0d 20 26 20 20 dd f2 | 72 65 73 74 6f 72 65 66 |-. & ..|restoref|
|00003df0| 75 6c 6c 6d 6f 75 73 65 | 72 65 63 74 61 6e 67 6c |ullmouse|rectangl|
|00003e00| 65 0d 20 35 36 20 ea 20 | 62 25 2c 58 45 69 67 25 |e. 56 . |b%,XEig%|
|00003e10| 2c 59 45 69 67 25 2c 58 | 70 69 78 25 2c 59 70 69 |,YEig%,X|pix%,Ypi|
|00003e20| 78 25 2c 58 4f 53 55 75 | 6e 69 74 73 25 2c 59 4f |x%,XOSUu|nits%,YO|
|00003e30| 53 75 6e 69 74 73 25 0d | 20 44 34 20 de 20 62 25 |Sunits%.| D4 . b%|
|00003e40| 20 36 34 3a 62 25 21 30 | 3d 34 3a 62 25 21 34 3d | 64:b%!0|=4:b%!4=|
|00003e50| 35 3a 62 25 21 38 3d 31 | 31 3a 62 25 21 31 32 3d |5:b%!8=1|1:b%!12=|
|00003e60| 31 32 3a 62 25 21 31 36 | 3d 2d 31 0d 20 53 23 20 |12:b%!16|=-1. S# |
|00003e70| c8 99 20 22 4f 53 5f 52 | 65 61 64 56 64 75 56 61 |.. "OS_R|eadVduVa|
|00003e80| 72 69 61 62 6c 65 73 22 | 2c 62 25 2c 62 25 0d 20 |riables"|,b%,b%. |
|00003e90| 62 30 20 58 45 69 67 25 | 3d 21 62 25 3a 59 45 69 |b0 XEig%|=!b%:YEi|
|00003ea0| 67 25 3d 62 25 21 34 3a | 58 70 69 78 25 3d 62 25 |g%=b%!4:|Xpix%=b%|
|00003eb0| 21 38 3a 59 70 69 78 25 | 3d 62 25 21 31 32 0d 20 |!8:Ypix%|=b%!12. |
|00003ec0| 71 3c 20 58 4f 53 55 6e | 69 74 73 25 3d 28 58 70 |q< XOSUn|its%=(Xp|
|00003ed0| 69 78 25 2b 31 29 2a 32 | 5e 58 45 69 67 25 3a 59 |ix%+1)*2|^XEig%:Y|
|00003ee0| 4f 53 55 6e 69 74 73 25 | 3d 28 59 70 69 78 25 2b |OSUnits%|=(Ypix%+|
|00003ef0| 31 29 2a 32 5e 59 45 69 | 67 25 0d 20 80 22 20 c8 |1)*2^YEi|g%. ." .|
|00003f00| 97 20 c8 93 20 30 2c 30 | 2c 58 4f 53 55 6e 69 74 |. .. 0,0|,XOSUnit|
|00003f10| 73 25 2c 59 4f 53 55 6e | 69 74 73 25 0d 20 8f 06 |s%,YOSUn|its%. ..|
|00003f20| 20 e1 0d 20 9e 10 20 f4 | 2d 2d 2d 2d 2d 2d 2d 2d | .. .. .|--------|
|00003f30| 2d 2d 0d 20 ad 0f 20 dd | f2 6b 65 79 70 72 65 73 |--. .. .|.keypres|
|00003f40| 73 0d 20 bc 1d 20 49 25 | 3d 62 6c 6f 63 6b 25 21 |s. .. I%|=block%!|
|00003f50| 34 3a 4b 25 3d 62 6c 6f | 63 6b 25 21 32 34 0d 20 |4:K%=blo|ck%!24. |
|00003f60| cb 12 20 c8 8e 20 62 6c | 6f 63 6b 25 21 30 20 ca |.. .. bl|ock%!0 .|
|00003f70| 0d 20 da 11 20 20 c9 20 | 77 68 61 6e 64 6c 65 31 |. .. . |whandle1|
|00003f80| 25 0d 20 e9 18 20 20 20 | e7 20 4b 25 3e 36 34 20 |%. .. |. K%>64 |
|00003f90| 80 20 4b 25 3c 39 31 20 | 8c 0d 20 f8 20 20 20 20 |. K%<91 |.. . |
|00003fa0| 20 78 3d 4b 25 2d 36 35 | 3a f2 63 68 6f 73 65 6e | x=K%-65|:.chosen|
|00003fb0| 5f 61 5f 6c 65 74 74 65 | 72 0d 21 07 08 20 20 20 |_a_lette|r.!.. |
|00003fc0| cc 0d 21 16 1e 20 20 20 | 20 c8 99 22 57 69 6d 70 |..!.. | .."Wimp|
|00003fd0| 5f 50 72 6f 63 65 73 73 | 4b 65 79 22 2c 4b 25 0d |_Process|Key",K%.|
|00003fe0| 21 25 08 20 20 20 cd 0d | 21 34 06 20 cb 0d 21 43 |!%. ..|!4. ..!C|
|00003ff0| 06 20 e1 0d 2b 48 10 20 | f4 2d 2d 2d 2d 2d 2d 2d |. ..+H. |.-------|
|00004000| 2d 2d 2d 0d 2b 57 0d 20 | dd f2 72 65 64 72 61 77 |---.+W. |..redraw|
|00004010| 0d 2b 66 15 20 c8 99 22 | 48 6f 75 72 67 6c 61 73 |.+f. .."|Hourglas|
|00004020| 73 5f 4f 6e 22 0d 2b 75 | 15 20 77 69 6e 64 6f 77 |s_On".+u|. window|
|00004030| 25 3d 62 6c 6f 63 6b 25 | 21 30 0d 2b 84 2a 20 c8 |%=block%|!0.+.* .|
|00004040| 99 22 57 69 6d 70 5f 52 | 65 64 72 61 77 57 69 6e |."Wimp_R|edrawWin|
|00004050| 64 6f 77 22 2c 2c 62 6c | 6f 63 6b 25 20 b8 20 6d |dow",,bl|ock% . m|
|00004060| 6f 72 65 25 0d 2b 93 0d | 20 c8 95 20 6d 6f 72 65 |ore%.+..| .. more|
|00004070| 25 0d 2b a2 1f 20 f2 67 | 65 74 6f 72 69 67 69 6e |%.+.. .g|etorigin|
|00004080| 28 62 6c 6f 63 6b 25 2c | 78 30 25 2c 79 30 25 29 |(block%,|x0%,y0%)|
|00004090| 0d 2b b1 40 20 67 78 30 | 25 3d 62 6c 6f 63 6b 25 |.+.@ gx0|%=block%|
|000040a0| 21 32 38 3a 67 79 30 25 | 3d 62 6c 6f 63 6b 25 21 |!28:gy0%|=block%!|
|000040b0| 33 32 3a 67 78 31 25 3d | 62 6c 6f 63 6b 25 21 33 |32:gx1%=|block%!3|
|000040c0| 36 3a 67 79 31 25 3d 62 | 6c 6f 63 6b 25 21 34 30 |6:gy1%=b|lock%!40|
|000040d0| 0d 2b c0 38 20 67 78 30 | 25 3d 28 67 78 30 25 2d |.+.8 gx0|%=(gx0%-|
|000040e0| 78 30 25 29 81 33 32 2a | 33 32 2b 78 30 25 3a 67 |x0%).32*|32+x0%:g|
|000040f0| 79 31 25 3d 28 67 79 31 | 25 2d 79 30 25 29 81 33 |y1%=(gy1|%-y0%).3|
|00004100| 32 2a 33 32 2b 79 30 25 | 0d 2b cf 04 0d 2b de 11 |2*32+y0%|.+...+..|
|00004110| 20 c8 8e 20 77 69 6e 64 | 6f 77 25 20 ca 0d 2b ed | .. wind|ow% ..+.|
|00004120| 10 20 c9 20 77 68 61 6e | 64 6c 65 31 25 0d 2b fc |. . whan|dle1%.+.|
|00004130| 25 20 f2 74 65 78 74 62 | 6f 78 28 78 30 25 2b 32 |% .textb|ox(x0%+2|
|00004140| 38 2c 79 30 25 2d 37 33 | 36 2c 37 34 34 2c 31 31 |8,y0%-73|6,744,11|
|00004150| 38 29 0d 2c 0b 04 0d 2c | 1a 11 20 c9 20 77 68 61 |8).,...,|.. . wha|
|00004160| 6e 64 6c 65 31 35 25 0d | 2c 29 35 20 f2 72 6d 28 |ndle15%.|,)5 .rm(|
|00004170| 22 46 52 41 31 22 29 3a | f2 66 72 61 6d 65 28 78 |"FRA1"):|.frame(x|
|00004180| 30 25 2b 32 34 2c 79 30 | 25 2d 33 36 30 2c 35 32 |0%+24,y0|%-360,52|
|00004190| 36 2c 33 30 34 2c 74 65 | 78 74 24 29 0d 2c 38 04 |6,304,te|xt$).,8.|
|000041a0| 0d 2c 3a 0e 20 c9 20 65 | 72 72 62 6f 78 25 0d 2c |.,:. . e|rrbox%.,|
|000041b0| 3b 35 20 f2 72 6d 28 22 | 46 52 41 31 22 29 3a f2 |;5 .rm("|FRA1"):.|
|000041c0| 66 72 61 6d 65 28 78 30 | 25 2b 32 34 2c 79 30 25 |frame(x0|%+24,y0%|
|000041d0| 2d 33 36 30 2c 35 32 36 | 2c 33 30 34 2c 74 65 78 |-360,526|,304,tex|
|000041e0| 74 24 29 0d 2c 47 06 20 | cb 0d 2c 56 2a 20 c8 99 |t$).,G. |..,V* ..|
|000041f0| 22 57 69 6d 70 5f 47 65 | 74 52 65 63 74 61 6e 67 |"Wimp_Ge|tRectang|
|00004200| 6c 65 22 2c 2c 62 6c 6f | 63 6b 25 20 b8 20 6d 6f |le",,blo|ck% . mo|
|00004210| 72 65 25 0d 2c 65 06 20 | ce 0d 2c 74 04 0d 2c 83 |re%.,e. |..,t..,.|
|00004220| 18 20 c8 99 22 48 6f 75 | 72 67 6c 61 73 73 5f 53 |. .."Hou|rglass_S|
|00004230| 6d 61 73 68 22 0d 2c 92 | 06 20 e1 0d 2c a1 10 20 |mash".,.|. ..,.. |
|00004240| f4 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 2c b0 21 20 |.-------|---.,.! |
|00004250| dd a4 69 6e 74 65 72 73 | 65 63 74 28 78 30 25 2c |..inters|ect(x0%,|
|00004260| 79 30 25 2c 78 31 25 2c | 79 31 25 29 0d 2c bf 1f |y0%,x1%,|y1%).,..|
|00004270| 20 e7 20 78 31 25 3c 67 | 78 30 25 20 84 20 78 30 | . x1%<g|x0% . x0|
|00004280| 25 3e 67 78 31 25 20 8c | 20 3d a3 0d 2c ce 1f 20 |%>gx1% .| =..,.. |
|00004290| e7 20 79 31 25 3c 67 79 | 30 25 20 84 20 79 30 25 |. y1%<gy|0% . y0%|
|000042a0| 3e 67 79 31 25 20 8c 20 | 3d a3 0d 2c dd 07 20 3d |>gy1% . |=..,.. =|
|000042b0| b9 0d 2c ec 10 20 f4 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..,.. .-|--------|
|000042c0| 2d 0d 2c fb 20 20 dd f2 | 72 65 63 74 66 69 6c 6c |-.,. ..|rectfill|
|000042d0| 28 78 30 25 2c 79 30 25 | 2c 78 31 25 2c 79 31 25 |(x0%,y0%|,x1%,y1%|
|000042e0| 29 0d 2d 0a 17 20 ea 20 | 78 78 25 2c 79 79 25 2c |).-.. . |xx%,yy%,|
|000042f0| 68 74 25 2c 77 69 64 25 | 0d 2d 19 1e 20 e7 20 78 |ht%,wid%|.-.. . x|
|00004300| 31 25 3c 67 78 30 25 20 | 84 20 78 30 25 3e 67 78 |1%<gx0% |. x0%>gx|
|00004310| 31 25 20 8c 20 e1 0d 2d | 28 1e 20 e7 20 79 31 25 |1% . ..-|(. . y1%|
|00004320| 3c 67 79 30 25 20 84 20 | 79 30 25 3e 67 79 31 25 |<gy0% . |y0%>gy1%|
|00004330| 20 8c 20 e1 0d 2d 37 22 | 20 e7 20 78 30 25 3e 67 | . ..-7"| . x0%>g|
|00004340| 78 30 25 20 78 78 25 3d | 78 30 25 20 8b 20 78 78 |x0% xx%=|x0% . xx|
|00004350| 25 3d 67 78 30 25 0d 2d | 46 22 20 e7 20 79 30 25 |%=gx0%.-|F" . y0%|
|00004360| 3e 67 79 30 25 20 79 79 | 25 3d 79 30 25 20 8b 20 |>gy0% yy|%=y0% . |
|00004370| 79 79 25 3d 67 79 30 25 | 0d 2d 55 2c 20 e7 20 78 |yy%=gy0%|.-U, . x|
|00004380| 31 25 3c 67 78 31 25 20 | 77 69 64 25 3d 78 31 25 |1%<gx1% |wid%=x1%|
|00004390| 2d 78 78 25 20 8b 20 77 | 69 64 25 3d 67 78 31 25 |-xx% . w|id%=gx1%|
|000043a0| 2d 78 78 25 0d 2d 64 2a | 20 e7 20 79 31 25 3c 67 |-xx%.-d*| . y1%<g|
|000043b0| 79 31 25 20 68 74 25 3d | 79 31 25 2d 79 79 25 20 |y1% ht%=|y1%-yy% |
|000043c0| 8b 20 68 74 25 3d 67 79 | 31 25 2d 79 79 25 0d 2d |. ht%=gy|1%-yy%.-|
|000043d0| 73 1b 20 c8 93 20 c8 90 | 20 78 78 25 2c 79 79 25 |s. .. ..| xx%,yy%|
|000043e0| 2c 77 69 64 25 2c 68 74 | 25 0d 2d 82 06 20 e1 0d |,wid%,ht|%.-.. ..|
|000043f0| 2d 91 10 20 f4 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |-.. .---|-------.|
|00004400| 2d a0 13 20 dd f2 73 61 | 76 65 64 65 66 61 75 6c |-.. ..sa|vedefaul|
|00004410| 74 73 0d 2d af 08 20 ea | 20 85 0d 2d be 54 20 ee |ts.-.. .| ..-.T .|
|00004420| 20 85 20 ea 3a f7 20 85 | 3a 20 41 41 41 41 3d a4 | . .:. .|: AAAA=.|
|00004430| 77 69 6d 70 65 72 72 6f | 72 3a c8 99 20 22 58 4f |wimperro|r:.. "XO|
|00004440| 53 5f 43 4c 49 22 2c 22 | 57 69 70 65 20 3c 21 50 |S_CLI","|Wipe <!P|
|00004450| 72 65 64 69 63 74 24 44 | 69 72 3e 2e 21 44 65 66 |redict$D|ir>.!Def|
|00004460| 61 75 6c 74 20 7e 43 7e | 56 52 46 22 3a e1 0d 2d |ault ~C~|VRF":..-|
|00004470| cd 25 20 f2 73 61 76 65 | 28 22 3c 21 50 72 65 64 |.% .save|("<!Pred|
|00004480| 69 63 74 24 44 69 72 3e | 2e 21 44 65 66 61 75 6c |ict$Dir>|.!Defaul|
|00004490| 74 22 29 0d 2d dc 25 20 | 62 6c 6f 67 67 73 25 3d |t").-.% |bloggs%=|
|000044a0| ad 28 22 3c 21 50 72 65 | 64 69 63 74 24 44 69 72 |.("<!Pre|dict$Dir|
|000044b0| 3e 2e 21 52 75 6e 22 29 | 0d 2d eb 34 20 d5 23 62 |>.!Run")|.-.4 .#b|
|000044c0| 6c 6f 67 67 73 25 2c 22 | 53 45 54 20 50 72 65 64 |loggs%,"|SET Pred|
|000044d0| 69 63 74 24 50 69 63 74 | 75 72 65 73 20 22 2b 70 |ict$Pict|ures "+p|
|000044e0| 69 63 74 75 72 65 5f 70 | 61 74 68 24 0d 2d fa 17 |icture_p|ath$.-..|
|000044f0| 20 c8 95 20 8f 23 62 6c | 6f 67 67 73 25 20 3c 20 | .. .#bl|oggs% < |
|00004500| 35 31 32 0d 2e 09 38 20 | 20 e7 20 8f 23 62 6c 6f |512...8 | . .#blo|
|00004510| 67 67 73 25 20 83 20 31 | 32 38 20 3d 30 20 d5 23 |ggs% . 1|28 =0 .#|
|00004520| 62 6c 6f 67 67 73 25 2c | 31 30 20 8b 20 d5 23 62 |bloggs%,|10 . .#b|
|00004530| 6c 6f 67 67 73 25 2c 97 | 22 7c 22 0d 2e 18 06 20 |loggs%,.|"|".... |
|00004540| ce 0d 2e 27 0e 20 d9 23 | 62 6c 6f 67 67 73 25 0d |...'. .#|bloggs%.|
|00004550| 2e 36 08 20 f7 20 85 0d | 2e 45 06 20 e1 0d 2e 54 |.6. . ..|.E. ...T|
|00004560| 10 20 f4 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 2e 63 |. .-----|-----..c|
|00004570| 1f 20 dd f2 74 65 78 74 | 62 6f 78 28 62 78 25 2c |. ..text|box(bx%,|
|00004580| 62 79 25 2c 77 64 25 2c | 68 74 25 29 0d 2e 72 2f |by%,wd%,|ht%)..r/|
|00004590| 20 c8 99 22 57 69 6d 70 | 5f 53 65 74 43 6f 6c 6f | .."Wimp|_SetColo|
|000045a0| 75 72 22 2c 30 3a c8 93 | 20 c8 90 20 62 78 25 2c |ur",0:..| .. bx%,|
|000045b0| 62 79 25 2c 77 64 25 2c | 68 74 25 0d 2e 81 37 20 |by%,wd%,|ht%...7 |
|000045c0| c8 99 22 57 69 6d 70 5f | 53 65 74 43 6f 6c 6f 75 |.."Wimp_|SetColou|
|000045d0| 72 22 2c 31 3a c8 93 20 | c8 90 20 62 78 25 2b 34 |r",1:.. |.. bx%+4|
|000045e0| 2c 62 79 25 2b 34 2c 77 | 64 25 2d 38 2c 68 74 25 |,by%+4,w|d%-8,ht%|
|000045f0| 2d 38 0d 2e 90 19 20 c8 | 99 22 57 69 6d 70 5f 53 |-8.... .|."Wimp_S|
|00004600| 65 74 43 6f 6c 6f 75 72 | 22 2c 34 0d 2e 9f 1c 20 |etColour|",4.... |
|00004610| c8 93 20 c8 90 20 62 78 | 25 2c 62 79 25 2b 32 2c |.. .. bx|%,by%+2,|
|00004620| 32 2c 68 74 25 2d 32 0d | 2e ae 20 20 c8 93 20 c8 |2,ht%-2.|.. .. .|
|00004630| 90 20 62 78 25 2c 62 79 | 25 2b 68 74 25 2d 32 2c |. bx%,by|%+ht%-2,|
|00004640| 77 64 25 2d 32 2c 32 0d | 2e bd 2b 20 ec 20 62 78 |wd%-2,2.|..+ . bx|
|00004650| 25 2c 62 79 25 3a ec 20 | 62 78 25 2c 62 79 25 2b |%,by%:. |bx%,by%+|
|00004660| 32 3a f0 20 38 35 2c 62 | 78 25 2b 32 2c 62 79 25 |2:. 85,b|x%+2,by%|
|00004670| 2b 32 0d 2e cc 43 20 ec | 20 62 78 25 2b 77 64 25 |+2...C .| bx%+wd%|
|00004680| 2c 62 79 25 2b 68 74 25 | 3a ec 20 62 78 25 2b 77 |,by%+ht%|:. bx%+w|
|00004690| 64 25 2d 32 2c 62 79 25 | 2b 68 74 25 3a f0 20 38 |d%-2,by%|+ht%:. 8|
|000046a0| 35 2c 62 78 25 2b 77 64 | 25 2d 32 2c 62 79 25 2b |5,bx%+wd|%-2,by%+|
|000046b0| 68 74 25 2d 32 0d 2e db | 06 20 e1 0d 2e ea 10 20 |ht%-2...|. ..... |
|000046c0| f4 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 2e f9 21 20 |.-------|---...! |
|000046d0| dd f2 62 6f 72 5f 66 72 | 61 6d 65 28 66 78 25 2c |..bor_fr|ame(fx%,|
|000046e0| 66 79 25 2c 77 64 25 2c | 68 74 25 29 0d 2f 08 2c |fy%,wd%,|ht%)./.,|
|000046f0| 20 c8 99 22 57 69 6d 70 | 5f 53 65 74 43 6f 6c 6f | .."Wimp|_SetColo|
|00004700| 75 72 22 2c 30 3a c8 93 | 20 66 78 25 2c 66 79 25 |ur",0:..| fx%,fy%|
|00004710| 2c 77 64 25 2c 68 74 25 | 0d 2f 17 36 20 c8 93 20 |,wd%,ht%|./.6 .. |
|00004720| 66 78 25 2b 32 2c 66 79 | 25 2c 77 64 25 2d 34 2c |fx%+2,fy|%,wd%-4,|
|00004730| 68 74 25 3a c8 93 20 66 | 78 25 2b 34 2c 66 79 25 |ht%:.. f|x%+4,fy%|
|00004740| 2b 34 2c 77 64 25 2d 38 | 2c 68 74 25 2d 36 0d 2f |+4,wd%-8|,ht%-6./|
|00004750| 26 20 20 c8 93 20 66 78 | 25 2b 36 2c 66 79 25 2b |& .. fx|%+6,fy%+|
|00004760| 34 2c 77 64 25 2d 31 32 | 2c 68 74 25 2d 32 0d 2f |4,wd%-12|,ht%-2./|
|00004770| 35 27 20 ec 20 66 78 25 | 2c 66 79 25 2b 68 74 25 |5' . fx%|,fy%+ht%|
|00004780| 2b 32 3a df 20 66 78 25 | 2b 31 30 2c 66 79 25 2b |+2:. fx%|+10,fy%+|
|00004790| 68 74 25 2b 32 0d 2f 44 | 20 20 ec 20 66 78 25 2c |ht%+2./D| . fx%,|
|000047a0| 66 79 25 2b 32 3a df 20 | 66 78 25 2b 77 64 25 2c |fy%+2:. |fx%+wd%,|
|000047b0| 66 79 25 2b 32 0d 2f 53 | 35 20 c8 99 22 57 69 6d |fy%+2./S|5 .."Wim|
|000047c0| 70 5f 53 65 74 43 6f 6c | 6f 75 72 22 2c 34 3a ec |p_SetCol|our",4:.|
|000047d0| 20 66 78 25 2b 32 2c 66 | 79 25 3a df 20 66 78 25 | fx%+2,f|y%:. fx%|
|000047e0| 2b 77 64 25 2d 32 2c 66 | 79 25 0d 2f 62 48 20 ec |+wd%-2,f|y%./bH .|
|000047f0| 20 66 78 25 2b 77 64 25 | 2c 66 79 25 3a df 20 66 | fx%+wd%|,fy%:. f|
|00004800| 78 25 2b 77 64 25 2c 66 | 79 25 2b 68 74 25 3a ec |x%+wd%,f|y%+ht%:.|
|00004810| 20 66 78 25 2b 77 64 25 | 2d 32 2c 66 79 25 3a df | fx%+wd%|-2,fy%:.|
|00004820| 20 66 78 25 2b 77 64 25 | 2d 32 2c 66 79 25 2b 68 | fx%+wd%|-2,fy%+h|
|00004830| 74 25 0d 2f 71 24 20 ec | 20 66 78 25 2b 34 2c 66 |t%./q$ .| fx%+4,f|
|00004840| 79 25 2b 34 3a df 20 66 | 78 25 2b 34 2c 66 79 25 |y%+4:. f|x%+4,fy%|
|00004850| 2b 68 74 25 2d 32 0d 2f | 80 24 20 ec 20 66 78 25 |+ht%-2./|.$ . fx%|
|00004860| 2b 36 2c 66 79 25 2b 36 | 3a df 20 66 78 25 2b 36 |+6,fy%+6|:. fx%+6|
|00004870| 2c 66 79 25 2b 68 74 25 | 2d 32 0d 2f 8f 2c 20 ec |,fy%+ht%|-2./., .|
|00004880| 20 66 78 25 2b 34 2c 66 | 79 25 2b 68 74 25 2d 32 | fx%+4,f|y%+ht%-2|
|00004890| 3a df 20 66 78 25 2b 77 | 64 25 2d 36 2c 66 79 25 |:. fx%+w|d%-6,fy%|
|000048a0| 2b 68 74 25 2d 32 0d 2f | 9e 06 20 e1 0d 2f ad 10 |+ht%-2./|.. ../..|
|000048b0| 20 f4 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 2f bc 13 | .------|----./..|
|000048c0| 20 dd f2 7a 31 28 69 63 | 63 2c 77 68 68 25 29 0d | ..z1(ic|c,whh%).|
|000048d0| 2f cb 1d 20 f2 69 73 65 | 74 28 69 63 63 2c 22 72 |/.. .ise|t(icc,"r|
|000048e0| 61 69 73 65 32 22 2c 77 | 68 68 25 29 0d 2f da 24 |aise2",w|hh%)./.$|
|000048f0| 20 c8 99 22 57 69 6d 70 | 5f 50 6f 6c 6c 22 2c 2c | .."Wimp|_Poll",,|
|00004900| 62 6c 6f 63 6b 25 20 b8 | 20 72 65 61 73 6f 6e 25 |block% .| reason%|
|00004910| 0d 2f e9 11 20 c8 8e 20 | 72 65 61 73 6f 6e 25 20 |./.. .. |reason% |
|00004920| ca 0d 2f f8 12 20 20 c9 | 20 31 20 3a f2 72 65 64 |../.. .| 1 :.red|
|00004930| 72 61 77 0d 30 07 26 20 | 20 c9 20 32 20 3a c8 99 |raw.0.& | . 2 :..|
|00004940| 22 57 69 6d 70 5f 4f 70 | 65 6e 57 69 6e 64 6f 77 |"Wimp_Op|enWindow|
|00004950| 22 2c 2c 62 6c 6f 63 6b | 25 0d 30 16 06 20 cb 0d |",,block|%.0.. ..|
|00004960| 30 25 24 20 f2 64 65 6c | 61 79 3a f2 69 73 65 74 |0%$ .del|ay:.iset|
|00004970| 28 69 63 63 2c 22 72 61 | 69 73 65 31 22 2c 77 68 |(icc,"ra|ise1",wh|
|00004980| 68 25 29 0d 30 34 06 20 | e1 0d 30 43 10 20 f4 2d |h%).04. |..0C. .-|
|00004990| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 30 52 14 20 dd f2 |--------|-.0R. ..|
|000049a0| 63 6c 69 63 6b 5f 70 72 | 65 64 69 63 74 0d 30 61 |click_pr|edict.0a|
|000049b0| 22 20 f2 69 73 65 74 28 | 36 2c 22 6c 6f 6e 67 62 |" .iset(|6,"longb|
|000049c0| 75 74 32 22 2c 77 68 61 | 6e 64 6c 65 31 25 29 0d |ut2",wha|ndle1%).|
|000049d0| 30 70 16 20 f2 6d 69 6e | 69 5f 70 6f 6c 6c 3a f2 |0p. .min|i_poll:.|
|000049e0| 64 65 6c 61 79 0d 30 7f | 21 20 f2 69 73 65 74 28 |delay.0.|! .iset(|
|000049f0| 36 2c 22 6c 6f 6e 67 62 | 75 74 22 2c 77 68 61 6e |6,"longb|ut",whan|
|00004a00| 64 6c 65 31 25 29 0d 30 | 8e 12 20 f2 67 65 6e 5f |dle1%).0|.. .gen_|
|00004a10| 66 6f 72 65 63 61 73 74 | 0d 30 9d 06 20 e1 0d 30 |forecast|.0.. ..0|
|00004a20| ac 10 20 f4 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 30 |.. .----|------.0|
|00004a30| bb 1f 20 dd f2 70 6c 69 | 6e 62 6f 78 28 62 78 25 |.. ..pli|nbox(bx%|
|00004a40| 2c 62 79 25 2c 77 64 25 | 2c 68 74 25 29 0d 30 ca |,by%,wd%|,ht%).0.|
|00004a50| 2f 20 c8 99 22 57 69 6d | 70 5f 53 65 74 43 6f 6c |/ .."Wim|p_SetCol|
|00004a60| 6f 75 72 22 2c 34 3a c8 | 93 20 c8 90 20 62 78 25 |our",4:.|. .. bx%|
|00004a70| 2c 62 79 25 2c 77 64 25 | 2c 68 74 25 0d 30 d9 37 |,by%,wd%|,ht%.0.7|
|00004a80| 20 c8 99 22 57 69 6d 70 | 5f 53 65 74 43 6f 6c 6f | .."Wimp|_SetColo|
|00004a90| 75 72 22 2c 31 3a c8 93 | 20 c8 90 20 62 78 25 2b |ur",1:..| .. bx%+|
|00004aa0| 34 2c 62 79 25 2b 34 2c | 77 64 25 2d 38 2c 68 74 |4,by%+4,|wd%-8,ht|
|00004ab0| 25 2d 38 0d 30 e8 19 20 | c8 99 22 57 69 6d 70 5f |%-8.0.. |.."Wimp_|
|00004ac0| 53 65 74 43 6f 6c 6f 75 | 72 22 2c 30 0d 30 f7 1c |SetColou|r",0.0..|
|00004ad0| 20 c8 93 20 c8 90 20 62 | 78 25 2c 62 79 25 2b 32 | .. .. b|x%,by%+2|
|00004ae0| 2c 32 2c 68 74 25 2d 32 | 0d 31 06 20 20 c8 93 20 |,2,ht%-2|.1. .. |
|00004af0| c8 90 20 62 78 25 2c 62 | 79 25 2b 68 74 25 2d 32 |.. bx%,b|y%+ht%-2|
|00004b00| 2c 77 64 25 2d 32 2c 32 | 0d 31 15 2b 20 ec 20 62 |,wd%-2,2|.1.+ . b|
|00004b10| 78 25 2c 62 79 25 3a ec | 20 62 78 25 2c 62 79 25 |x%,by%:.| bx%,by%|
|00004b20| 2b 32 3a f0 20 38 35 2c | 62 78 25 2b 32 2c 62 79 |+2:. 85,|bx%+2,by|
|00004b30| 25 2b 32 0d 31 24 43 20 | ec 20 62 78 25 2b 77 64 |%+2.1$C |. bx%+wd|
|00004b40| 25 2c 62 79 25 2b 68 74 | 25 3a ec 20 62 78 25 2b |%,by%+ht|%:. bx%+|
|00004b50| 77 64 25 2d 32 2c 62 79 | 25 2b 68 74 25 3a f0 20 |wd%-2,by|%+ht%:. |
|00004b60| 38 35 2c 62 78 25 2b 77 | 64 25 2d 32 2c 62 79 25 |85,bx%+w|d%-2,by%|
|00004b70| 2b 68 74 25 2d 32 0d 31 | 33 06 20 e1 0d 31 42 10 |+ht%-2.1|3. ..1B.|
|00004b80| 20 f4 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 31 51 13 | .------|----.1Q.|
|00004b90| 20 dd f2 67 65 6e 5f 66 | 6f 72 65 63 61 73 74 0d | ..gen_f|orecast.|
|00004ba0| 31 52 08 20 ea 20 85 0d | 31 53 2b 20 ee 20 85 20 |1R. . ..|1S+ . . |
|00004bb0| ea 3a f7 20 85 3a f2 72 | 6d 28 22 41 4c 54 36 22 |.:. .:.r|m("ALT6"|
|00004bc0| 29 3a f2 65 72 72 62 6f | 78 28 74 65 78 74 24 29 |):.errbo|x(text$)|
|00004bd0| 3a e1 0d 31 60 26 20 f2 | 69 72 65 61 64 28 32 34 |:..1`& .|iread(24|
|00004be0| 2c 77 68 61 6e 64 6c 65 | 31 25 29 3a 70 72 65 73 |,whandle|1%):pres|
|00004bf0| 73 75 72 65 3d a0 61 24 | 0d 31 65 08 20 f7 20 85 |sure=.a$|.1e. . .|
|00004c00| 0d 31 6f 57 20 e7 20 70 | 72 65 73 73 75 72 65 3c |.1oW . p|ressure<|
|00004c10| 39 35 30 20 70 72 65 73 | 73 75 72 65 3d 39 35 30 |950 pres|sure=950|
|00004c20| 3a f2 69 73 65 74 28 32 | 34 2c 22 39 35 30 22 2c |:.iset(2|4,"950",|
|00004c30| 77 68 61 6e 64 6c 65 31 | 25 29 3a f2 72 6d 28 22 |whandle1|%):.rm("|
|00004c40| 41 4c 54 31 22 29 3a f2 | 65 72 72 62 6f 78 28 74 |ALT1"):.|errbox(t|
|00004c50| 65 78 74 24 29 3a e1 0d | 31 70 5a 20 e7 20 70 72 |ext$):..|1pZ . pr|
|00004c60| 65 73 73 75 72 65 3e 31 | 30 35 30 20 70 72 65 73 |essure>1|050 pres|
|00004c70| 73 75 72 65 3d 31 30 35 | 30 3a f2 69 73 65 74 28 |sure=105|0:.iset(|
|00004c80| 32 34 2c 22 31 30 35 30 | 22 2c 77 68 61 6e 64 6c |24,"1050|",whandl|
|00004c90| 65 31 25 29 3a f2 72 6d | 28 22 41 4c 54 31 22 29 |e1%):.rm|("ALT1")|
|00004ca0| 3a f2 65 72 72 62 6f 78 | 28 74 65 78 74 24 29 3a |:.errbox|(text$):|
|00004cb0| e1 0d 31 7e 22 20 f2 69 | 72 65 61 64 28 31 32 2c |..1~" .i|read(12,|
|00004cc0| 77 68 61 6e 64 6c 65 31 | 25 29 3a 77 69 6e 64 24 |whandle1|%):wind$|
|00004cd0| 3d 61 24 0d 31 8d 18 20 | f2 69 72 65 61 64 28 38 |=a$.1.. |.iread(8|
|00004ce0| 2c 77 68 61 6e 64 6c 65 | 31 25 29 0d 31 9c 32 20 |,whandle|1%).1.2 |
|00004cf0| e7 20 61 24 3d 22 46 61 | 6c 6c 69 6e 67 22 20 46 |. a$="Fa|lling" F|
|00004d00| 61 6c 6c 69 6e 67 25 3d | b9 3a 52 69 73 69 6e 67 |alling%=|.:Rising|
|00004d10| 25 3d a3 3a 53 74 65 61 | 64 79 25 3d a3 0d 31 ab |%=.:Stea|dy%=..1.|
|00004d20| 31 20 e7 20 61 24 3d 22 | 53 74 65 61 64 79 22 20 |1 . a$="|Steady" |
|00004d30| 46 61 6c 6c 69 6e 67 25 | 3d a3 3a 52 69 73 69 6e |Falling%|=.:Risin|
|00004d40| 67 25 3d a3 3a 53 74 65 | 61 64 79 25 3d b9 0d 31 |g%=.:Ste|ady%=..1|
|00004d50| ba 31 20 e7 20 61 24 3d | 22 52 69 73 69 6e 67 22 |.1 . a$=|"Rising"|
|00004d60| 20 46 61 6c 6c 69 6e 67 | 25 3d a3 3a 52 69 73 69 | Falling|%=.:Risi|
|00004d70| 6e 67 25 3d b9 3a 53 74 | 65 61 64 79 25 3d a3 0d |ng%=.:St|eady%=..|
|00004d80| 31 c9 1f 20 e7 20 77 69 | 6e 64 24 3d 22 45 61 73 |1.. . wi|nd$="Eas|
|00004d90| 74 22 20 70 72 65 73 73 | 75 72 65 2d 3d 32 0d 31 |t" press|ure-=2.1|
|00004da0| d8 1f 20 e7 20 77 69 6e | 64 24 3d 22 57 65 73 74 |.. . win|d$="West|
|00004db0| 22 20 70 72 65 73 73 75 | 72 65 2d 3d 33 0d 31 e7 |" pressu|re-=3.1.|
|00004dc0| 20 20 e7 20 77 69 6e 64 | 24 3d 22 4e 6f 72 74 68 | . wind|$="North|
|00004dd0| 22 20 70 72 65 73 73 75 | 72 65 2b 3d 36 0d 31 f6 |" pressu|re+=6.1.|
|00004de0| 21 20 e7 20 77 69 6e 64 | 24 3d 22 53 6f 75 74 68 |! . wind|$="South|
|00004df0| 22 20 70 72 65 73 73 75 | 72 65 2d 3d 31 33 0d 32 |" pressu|re-=13.2|
|00004e00| 05 25 20 e7 20 77 69 6e | 64 24 3d 22 53 6f 75 74 |.% . win|d$="Sout|
|00004e10| 68 20 45 61 73 74 22 20 | 70 72 65 73 73 75 72 65 |h East" |pressure|
|00004e20| 2d 3d 36 0d 32 14 25 20 | e7 20 77 69 6e 64 24 3d |-=6.2.% |. wind$=|
|00004e30| 22 4e 6f 72 74 68 20 45 | 61 73 74 22 20 70 72 65 |"North E|ast" pre|
|00004e40| 73 73 75 72 65 2b 3d 33 | 0d 32 23 25 20 e7 20 77 |ssure+=3|.2#% . w|
|00004e50| 69 6e 64 24 3d 22 53 6f | 75 74 68 20 45 61 73 74 |ind$="So|uth East|
|00004e60| 22 20 70 72 65 73 73 75 | 72 65 2d 3d 36 0d 32 32 |" pressu|re-=6.22|
|00004e70| 25 20 e7 20 77 69 6e 64 | 24 3d 22 53 6f 75 74 68 |% . wind|$="South|
|00004e80| 20 57 65 73 74 22 20 70 | 72 65 73 73 75 72 65 2d | West" p|ressure-|
|00004e90| 3d 38 0d 32 42 2c 20 e7 | 20 73 65 61 73 6f 6e 24 |=8.2B, .| season$|
|00004ea0| 3d 22 53 70 72 69 6e 67 | 22 20 84 20 73 65 61 73 |="Spring|" . seas|
|00004eb0| 6f 6e 24 3d 22 53 75 6d | 6d 65 72 22 20 8c 0d 32 |on$="Sum|mer" ..2|
|00004ec0| 43 1e 20 20 e7 20 46 61 | 6c 6c 69 6e 67 25 3d b9 |C. . Fa|lling%=.|
|00004ed0| 20 70 72 65 73 73 75 72 | 65 2d 3d 35 0d 32 44 1d | pressur|e-=5.2D.|
|00004ee0| 20 20 e7 20 52 69 73 69 | 6e 67 25 3d b9 20 70 72 | . Risi|ng%=. pr|
|00004ef0| 65 73 73 75 72 65 2b 3d | 35 0d 32 45 06 20 cc 0d |essure+=|5.2E. ..|
|00004f00| 32 46 1e 20 20 e7 20 46 | 61 6c 6c 69 6e 67 25 3d |2F. . F|alling%=|
|00004f10| b9 20 70 72 65 73 73 75 | 72 65 2b 3d 35 0d 32 47 |. pressu|re+=5.2G|
|00004f20| 1d 20 20 e7 20 52 69 73 | 69 6e 67 25 3d b9 20 70 |. . Ris|ing%=. p|
|00004f30| 72 65 73 73 75 72 65 2d | 3d 35 0d 32 48 06 20 cd |ressure-|=5.2H. .|
|00004f40| 0d 32 5d 48 20 63 6f 64 | 65 3d 70 72 65 73 73 75 |.2]H cod|e=pressu|
|00004f50| 72 65 2d 39 35 30 3a 63 | 6f 64 65 3d 31 2b a8 28 |re-950:c|ode=1+.(|
|00004f60| 30 2e 35 2b 28 63 6f 64 | 65 2f 34 2e 35 34 35 34 |0.5+(cod|e/4.5454|
|00004f70| 35 34 35 34 29 29 3a e7 | 20 63 6f 64 65 3e 32 32 |5454)):.| code>22|
|00004f80| 20 63 6f 64 65 3d 32 32 | 0d 32 5e 15 20 e7 20 63 | code=22|.2^. . c|
|00004f90| 6f 64 65 3c 3d 30 20 63 | 6f 64 65 3d 31 0d 32 5e |ode<=0 c|ode=1.2^|
|00004fa0| 13 20 e7 20 66 61 6c 6c | 69 6e 67 25 3d b9 20 8c |. . fall|ing%=. .|
|00004fb0| 0d 32 5f 17 20 e7 20 63 | 6f 64 65 3d 31 20 63 6f |.2_. . c|ode=1 co|
|00004fc0| 64 65 24 3d 22 5a 22 0d | 32 6e 17 20 e7 20 63 6f |de$="Z".|2n. . co|
|00004fd0| 64 65 3d 32 20 63 6f 64 | 65 24 3d 22 5a 22 0d 32 |de=2 cod|e$="Z".2|
|00004fe0| 7d 17 20 e7 20 63 6f 64 | 65 3d 33 20 63 6f 64 65 |}. . cod|e=3 code|
|00004ff0| 24 3d 22 5a 22 0d 32 8c | 17 20 e7 20 63 6f 64 65 |$="Z".2.|. . code|
|00005000| 3d 34 20 63 6f 64 65 24 | 3d 22 5a 22 0d 32 9b 17 |=4 code$|="Z".2..|
|00005010| 20 e7 20 63 6f 64 65 3d | 35 20 63 6f 64 65 24 3d | . code=|5 code$=|
|00005020| 22 5a 22 0d 32 aa 17 20 | e7 20 63 6f 64 65 3d 36 |"Z".2.. |. code=6|
|00005030| 20 63 6f 64 65 24 3d 22 | 58 22 0d 32 b9 17 20 e7 | code$="|X".2.. .|
|00005040| 20 63 6f 64 65 3d 37 20 | 63 6f 64 65 24 3d 22 58 | code=7 |code$="X|
|00005050| 22 0d 32 c8 17 20 e7 20 | 63 6f 64 65 3d 38 20 63 |".2.. . |code=8 c|
|00005060| 6f 64 65 24 3d 22 58 22 | 0d 32 d7 17 20 e7 20 63 |ode$="X"|.2.. . c|
|00005070| 6f 64 65 3d 39 20 63 6f | 64 65 24 3d 22 58 22 0d |ode=9 co|de$="X".|
|00005080| 32 e6 18 20 e7 20 63 6f | 64 65 3d 31 30 20 63 6f |2.. . co|de=10 co|
|00005090| 64 65 24 3d 22 56 22 0d | 32 f5 18 20 e7 20 63 6f |de$="V".|2.. . co|
|000050a0| 64 65 3d 31 31 20 63 6f | 64 65 24 3d 22 56 22 0d |de=11 co|de$="V".|
|000050b0| 33 04 18 20 e7 20 63 6f | 64 65 3d 31 32 20 63 6f |3.. . co|de=12 co|
|000050c0| 64 65 24 3d 22 55 22 0d | 33 13 18 20 e7 20 63 6f |de$="U".|3.. . co|
|000050d0| 64 65 3d 31 33 20 63 6f | 64 65 24 3d 22 52 22 0d |de=13 co|de$="R".|
|000050e0| 33 22 18 20 e7 20 63 6f | 64 65 3d 31 34 20 63 6f |3". . co|de=14 co|
|000050f0| 64 65 24 3d 22 4f 22 0d | 33 31 18 20 e7 20 63 6f |de$="O".|31. . co|
|00005100| 64 65 3d 31 35 20 63 6f | 64 65 24 3d 22 48 22 0d |de=15 co|de$="H".|
|00005110| 33 40 18 20 e7 20 63 6f | 64 65 3d 31 36 20 63 6f |3@. . co|de=16 co|
|00005120| 64 65 24 3d 22 44 22 0d | 33 4f 18 20 e7 20 63 6f |de$="D".|3O. . co|
|00005130| 64 65 3d 31 37 20 63 6f | 64 65 24 3d 22 42 22 0d |de=17 co|de$="B".|
|00005140| 33 5e 18 20 e7 20 63 6f | 64 65 3d 31 38 20 63 6f |3^. . co|de=18 co|
|00005150| 64 65 24 3d 22 42 22 0d | 33 6d 18 20 e7 20 63 6f |de$="B".|3m. . co|
|00005160| 64 65 3d 31 39 20 63 6f | 64 65 24 3d 22 42 22 0d |de=19 co|de$="B".|
|00005170| 33 7c 18 20 e7 20 63 6f | 64 65 3d 32 30 20 63 6f |3|. . co|de=20 co|
|00005180| 64 65 24 3d 22 41 22 0d | 33 8b 18 20 e7 20 63 6f |de$="A".|3.. . co|
|00005190| 64 65 3d 32 31 20 63 6f | 64 65 24 3d 22 41 22 0d |de=21 co|de$="A".|
|000051a0| 33 9a 18 20 e7 20 63 6f | 64 65 3d 32 32 20 63 6f |3.. . co|de=22 co|
|000051b0| 64 65 24 3d 22 41 22 0d | 33 a9 06 20 cd 0d 33 b8 |de$="A".|3.. ..3.|
|000051c0| 12 20 e7 20 73 74 65 61 | 64 79 25 3d b9 20 8c 0d |. . stea|dy%=. ..|
|000051d0| 33 c7 17 20 e7 20 63 6f | 64 65 3d 31 20 63 6f 64 |3.. . co|de=1 cod|
|000051e0| 65 24 3d 22 5a 22 0d 33 | d6 17 20 e7 20 63 6f 64 |e$="Z".3|.. . cod|
|000051f0| 65 3d 32 20 63 6f 64 65 | 24 3d 22 5a 22 0d 33 e5 |e=2 code|$="Z".3.|
|00005200| 17 20 e7 20 63 6f 64 65 | 3d 33 20 63 6f 64 65 24 |. . code|=3 code$|
|00005210| 3d 22 5a 22 0d 33 f4 17 | 20 e7 20 63 6f 64 65 3d |="Z".3..| . code=|
|00005220| 34 20 63 6f 64 65 24 3d | 22 5a 22 0d 34 03 17 20 |4 code$=|"Z".4.. |
|00005230| e7 20 63 6f 64 65 3d 35 | 20 63 6f 64 65 24 3d 22 |. code=5| code$="|
|00005240| 5a 22 0d 34 12 17 20 e7 | 20 63 6f 64 65 3d 36 20 |Z".4.. .| code=6 |
|00005250| 63 6f 64 65 24 3d 22 5a | 22 0d 34 21 17 20 e7 20 |code$="Z|".4!. . |
|00005260| 63 6f 64 65 3d 37 20 63 | 6f 64 65 24 3d 22 58 22 |code=7 c|ode$="X"|
|00005270| 0d 34 30 17 20 e7 20 63 | 6f 64 65 3d 38 20 63 6f |.40. . c|ode=8 co|
|00005280| 64 65 24 3d 22 58 22 0d | 34 3f 17 20 e7 20 63 6f |de$="X".|4?. . co|
|00005290| 64 65 3d 39 20 63 6f 64 | 65 24 3d 22 57 22 0d 34 |de=9 cod|e$="W".4|
|000052a0| 4e 18 20 e7 20 63 6f 64 | 65 3d 31 30 20 63 6f 64 |N. . cod|e=10 cod|
|000052b0| 65 24 3d 22 53 22 0d 34 | 5d 18 20 e7 20 63 6f 64 |e$="S".4|]. . cod|
|000052c0| 65 3d 31 31 20 63 6f 64 | 65 24 3d 22 50 22 0d 34 |e=11 cod|e$="P".4|
|000052d0| 6c 18 20 e7 20 63 6f 64 | 65 3d 31 32 20 63 6f 64 |l. . cod|e=12 cod|
|000052e0| 65 24 3d 22 4e 22 0d 34 | 7b 18 20 e7 20 63 6f 64 |e$="N".4|{. . cod|
|000052f0| 65 3d 31 33 20 63 6f 64 | 65 24 3d 22 4b 22 0d 34 |e=13 cod|e$="K".4|
|00005300| 8a 18 20 e7 20 63 6f 64 | 65 3d 31 34 20 63 6f 64 |.. . cod|e=14 cod|
|00005310| 65 24 3d 22 45 22 0d 34 | 99 18 20 e7 20 63 6f 64 |e$="E".4|.. . cod|
|00005320| 65 3d 31 35 20 63 6f 64 | 65 24 3d 22 42 22 0d 34 |e=15 cod|e$="B".4|
|00005330| a8 18 20 e7 20 63 6f 64 | 65 3d 31 36 20 63 6f 64 |.. . cod|e=16 cod|
|00005340| 65 24 3d 22 42 22 0d 34 | b7 18 20 e7 20 63 6f 64 |e$="B".4|.. . cod|
|00005350| 65 3d 31 37 20 63 6f 64 | 65 24 3d 22 41 22 0d 34 |e=17 cod|e$="A".4|
|00005360| c6 18 20 e7 20 63 6f 64 | 65 3d 31 38 20 63 6f 64 |.. . cod|e=18 cod|
|00005370| 65 24 3d 22 41 22 0d 34 | d5 18 20 e7 20 63 6f 64 |e$="A".4|.. . cod|
|00005380| 65 3d 31 39 20 63 6f 64 | 65 24 3d 22 41 22 0d 34 |e=19 cod|e$="A".4|
|00005390| e4 18 20 e7 20 63 6f 64 | 65 3d 32 30 20 63 6f 64 |.. . cod|e=20 cod|
|000053a0| 65 24 3d 22 41 22 0d 34 | f3 18 20 e7 20 63 6f 64 |e$="A".4|.. . cod|
|000053b0| 65 3d 32 31 20 63 6f 64 | 65 24 3d 22 41 22 0d 35 |e=21 cod|e$="A".5|
|000053c0| 02 18 20 e7 20 63 6f 64 | 65 3d 32 32 20 63 6f 64 |.. . cod|e=22 cod|
|000053d0| 65 24 3d 22 41 22 0d 35 | 11 06 20 cd 0d 35 20 12 |e$="A".5|.. ..5 .|
|000053e0| 20 e7 20 72 69 73 69 6e | 67 25 3d b9 20 8c 0d 35 | . risin|g%=. ..5|
|000053f0| 2f 17 20 e7 20 63 6f 64 | 65 3d 31 20 63 6f 64 65 |/. . cod|e=1 code|
|00005400| 24 3d 22 5a 22 0d 35 3e | 17 20 e7 20 63 6f 64 65 |$="Z".5>|. . code|
|00005410| 3d 32 20 63 6f 64 65 24 | 3d 22 5a 22 0d 35 4d 17 |=2 code$|="Z".5M.|
|00005420| 20 e7 20 63 6f 64 65 3d | 33 20 63 6f 64 65 24 3d | . code=|3 code$=|
|00005430| 22 5a 22 0d 35 5c 17 20 | e7 20 63 6f 64 65 3d 34 |"Z".5\. |. code=4|
|00005440| 20 63 6f 64 65 24 3d 22 | 59 22 0d 35 6b 17 20 e7 | code$="|Y".5k. .|
|00005450| 20 63 6f 64 65 3d 35 20 | 63 6f 64 65 24 3d 22 59 | code=5 |code$="Y|
|00005460| 22 0d 35 7a 17 20 e7 20 | 63 6f 64 65 3d 36 20 63 |".5z. . |code=6 c|
|00005470| 6f 64 65 24 3d 22 54 22 | 0d 35 89 17 20 e7 20 63 |ode$="T"|.5.. . c|
|00005480| 6f 64 65 3d 37 20 63 6f | 64 65 24 3d 22 51 22 0d |ode=7 co|de$="Q".|
|00005490| 35 98 17 20 e7 20 63 6f | 64 65 3d 38 20 63 6f 64 |5.. . co|de=8 cod|
|000054a0| 65 24 3d 22 4d 22 0d 35 | a7 17 20 e7 20 63 6f 64 |e$="M".5|.. . cod|
|000054b0| 65 3d 39 20 63 6f 64 65 | 24 3d 22 4c 22 0d 35 b6 |e=9 code|$="L".5.|
|000054c0| 18 20 e7 20 63 6f 64 65 | 3d 31 30 20 63 6f 64 65 |. . code|=10 code|
|000054d0| 24 3d 22 4a 22 0d 35 c5 | 18 20 e7 20 63 6f 64 65 |$="J".5.|. . code|
|000054e0| 3d 31 31 20 63 6f 64 65 | 24 3d 22 49 22 0d 35 d4 |=11 code|$="I".5.|
|000054f0| 18 20 e7 20 63 6f 64 65 | 3d 31 32 20 63 6f 64 65 |. . code|=12 code|
|00005500| 24 3d 22 47 22 0d 35 e3 | 18 20 e7 20 63 6f 64 65 |$="G".5.|. . code|
|00005510| 3d 31 33 20 63 6f 64 65 | 24 3d 22 46 22 0d 35 f2 |=13 code|$="F".5.|
|00005520| 18 20 e7 20 63 6f 64 65 | 3d 31 34 20 63 6f 64 65 |. . code|=14 code|
|00005530| 24 3d 22 43 22 0d 36 01 | 18 20 e7 20 63 6f 64 65 |$="C".6.|. . code|
|00005540| 3d 31 35 20 63 6f 64 65 | 24 3d 22 42 22 0d 36 10 |=15 code|$="B".6.|
|00005550| 18 20 e7 20 63 6f 64 65 | 3d 31 36 20 63 6f 64 65 |. . code|=16 code|
|00005560| 24 3d 22 42 22 0d 36 1f | 18 20 e7 20 63 6f 64 65 |$="B".6.|. . code|
|00005570| 3d 31 37 20 63 6f 64 65 | 24 3d 22 41 22 0d 36 2e |=17 code|$="A".6.|
|00005580| 18 20 e7 20 63 6f 64 65 | 3d 31 38 20 63 6f 64 65 |. . code|=18 code|
|00005590| 24 3d 22 41 22 0d 36 3d | 18 20 e7 20 63 6f 64 65 |$="A".6=|. . code|
|000055a0| 3d 31 39 20 63 6f 64 65 | 24 3d 22 41 22 0d 36 4c |=19 code|$="A".6L|
|000055b0| 18 20 e7 20 63 6f 64 65 | 3d 32 30 20 63 6f 64 65 |. . code|=20 code|
|000055c0| 24 3d 22 41 22 0d 36 5b | 18 20 e7 20 63 6f 64 65 |$="A".6[|. . code|
|000055d0| 3d 32 31 20 63 6f 64 65 | 24 3d 22 41 22 0d 36 6a |=21 code|$="A".6j|
|000055e0| 18 20 e7 20 63 6f 64 65 | 3d 32 32 20 63 6f 64 65 |. . code|=22 code|
|000055f0| 24 3d 22 41 22 0d 36 79 | 06 20 cd 0d 36 88 2a 20 |$="A".6y|. ..6.* |
|00005600| 70 64 24 3d 22 22 3a f2 | 63 6f 64 65 73 3a f2 69 |pd$="":.|codes:.i|
|00005610| 73 65 74 28 31 30 2c 70 | 64 24 2c 77 68 61 6e 64 |set(10,p|d$,whand|
|00005620| 6c 65 31 25 29 0d 36 97 | 06 20 e1 0d 36 a6 10 20 |le1%).6.|. ..6.. |
|00005630| f4 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 36 b5 0f 20 |.-------|---.6.. |
|00005640| dd f2 77 69 6e 64 6d 65 | 6e 75 0d 36 b6 16 20 e7 |..windme|nu.6.. .|
|00005650| 20 63 72 65 61 74 65 5f | 6d 65 6e 75 3d 30 20 8c | create_|menu=0 .|
|00005660| 0d 36 c4 36 20 20 f2 69 | 73 65 74 28 31 33 2c 22 |.6.6 .i|set(13,"|
|00005670| 6d 65 6e 6c 69 73 74 32 | 22 2c 77 68 61 6e 64 6c |menlist2|",whandl|
|00005680| 65 31 25 29 3a f2 64 65 | 6c 61 79 3a f2 6d 69 6e |e1%):.de|lay:.min|
|00005690| 69 5f 70 6f 6c 6c 0d 36 | d3 2e 20 20 f2 69 73 65 |i_poll.6|.. .ise|
|000056a0| 74 28 31 33 2c 22 6d 65 | 6e 6c 69 73 74 22 2c 77 |t(13,"me|nlist",w|
|000056b0| 68 61 6e 64 6c 65 31 25 | 29 3a f2 6d 69 6e 69 5f |handle1%|):.mini_|
|000056c0| 70 6f 6c 6c 0d 36 d5 06 | 20 cd 0d 36 e2 49 20 6d |poll.6..| ..6.I m|
|000056d0| 25 3d 77 6d 65 6e 75 25 | 3a 6d 25 3f 31 32 3d 37 |%=wmenu%|:m%?12=7|
|000056e0| 3a 6d 25 3f 31 33 3d 32 | 3a 6d 25 3f 31 34 3d 37 |:m%?13=2|:m%?14=7|
|000056f0| 3a 6d 25 3f 31 35 3d 30 | 3a 6d 25 21 31 36 3d 31 |:m%?15=0|:m%!16=1|
|00005700| 38 30 3a 6d 25 21 32 30 | 3d 34 34 3a 6d 25 21 32 |80:m%!20|=44:m%!2|
|00005710| 34 3d 30 0d 36 f1 32 20 | 70 74 72 25 3d 6d 25 2b |4=0.6.2 |ptr%=m%+|
|00005720| 32 38 3a 69 6e 64 69 72 | 25 3d 6d 25 2b 33 35 36 |28:indir|%=m%+356|
|00005730| 3a f2 69 72 65 61 64 28 | 31 32 2c 77 68 61 6e 64 |:.iread(|12,whand|
|00005740| 6c 65 31 25 29 0d 37 00 | 2b 20 f2 72 6d 28 22 4d |le1%).7.|+ .rm("M|
|00005750| 55 41 32 22 29 3a 6d 6d | 6c 3d a7 74 65 78 74 24 |UA2"):mm|l=.text$|
|00005760| 2c 22 2c 22 29 3a 65 6e | 74 72 69 65 73 25 3d 30 |,","):en|tries%=0|
|00005770| 0d 37 0f 31 20 24 6d 25 | 3d c0 74 65 78 74 24 2c |.7.1 $m%|=.text$,|
|00005780| 6d 6d 6c 2d 31 29 3a 74 | 65 78 74 24 3d c2 74 65 |mml-1):t|ext$=.te|
|00005790| 78 74 24 2c a9 28 74 65 | 78 74 24 29 2d 6d 6d 6c |xt$,.(te|xt$)-mml|
|000057a0| 29 0d 37 1e 06 20 f5 0d | 37 2d 15 20 20 6d 6d 6c |).7.. ..|7-. mml|
|000057b0| 3d a7 74 65 78 74 24 2c | 22 2c 22 29 0d 37 3c 19 |=.text$,|",").7<.|
|000057c0| 20 20 6d 65 6e 75 24 3d | c0 74 65 78 74 24 2c 6d | menu$=|.text$,m|
|000057d0| 6d 6c 2d 31 29 0d 37 4b | 15 20 20 20 e7 20 6d 65 |ml-1).7K|. . me|
|000057e0| 6e 75 24 3c 3e 22 2a 22 | 20 8c 0d 37 5a 22 20 20 |nu$<>"*"| ..7Z" |
|000057f0| 20 20 74 65 78 74 24 3d | c2 74 65 78 74 24 2c a9 | text$=|.text$,.|
|00005800| 28 74 65 78 74 24 29 2d | 6d 6d 6c 29 0d 37 69 24 |(text$)-|mml).7i$|
|00005810| 20 20 20 20 70 74 72 25 | 21 30 3d 30 3a e7 20 6d | ptr%|!0=0:. m|
|00005820| 65 6e 75 24 3d 61 24 20 | 70 74 72 25 21 30 3d 31 |enu$=a$ |ptr%!0=1|
|00005830| 0d 37 78 21 20 20 20 20 | 70 74 72 25 21 34 3d 2d |.7x! |ptr%!4=-|
|00005840| 31 3a 70 74 72 25 21 38 | 3d 26 37 30 30 30 30 32 |1:ptr%!8|=&700002|
|00005850| 31 0d 37 87 b3 20 20 20 | 20 e7 20 a9 6d 65 6e 75 |1.7.. | . .menu|
|00005860| 24 3c 3d 31 32 20 24 28 | 70 74 72 25 2b 31 32 29 |$<=12 $(|ptr%+12)|
|00005870| 3d 6d 65 6e 75 24 3a 70 | 74 72 25 2b 3d 32 34 3a |=menu$:p|tr%+=24:|
|00005880| 65 6e 74 72 69 65 73 25 | 2b 3d 31 20 8b 20 70 74 |entries%|+=1 . pt|
|00005890| 72 25 21 31 32 3d 69 6e | 64 69 72 25 3a 70 74 72 |r%!12=in|dir%:ptr|
|000058a0| 25 21 31 36 3d 30 3a 70 | 74 72 25 21 32 30 3d a9 |%!16=0:p|tr%!20=.|
|000058b0| 6d 65 6e 75 24 2b 31 3a | 24 69 6e 64 69 72 25 3d |menu$+1:|$indir%=|
|000058c0| 6d 65 6e 75 24 3a 70 74 | 72 25 21 38 3d 28 70 74 |menu$:pt|r%!8=(pt|
|000058d0| 72 25 21 38 20 84 20 26 | 31 30 30 29 3a 70 74 72 |r%!8 . &|100):ptr|
|000058e0| 25 2b 3d 32 34 3a 65 6e | 74 72 69 65 73 25 2b 3d |%+=24:en|tries%+=|
|000058f0| 31 3a 69 6e 64 69 72 25 | 2b 3d 28 a9 6d 65 6e 75 |1:indir%|+=(.menu|
|00005900| 24 2b 31 29 0d 37 96 32 | 20 20 20 e7 20 36 34 2b |$+1).7.2| . 64+|
|00005910| 28 a9 6d 65 6e 75 24 2a | 31 34 29 3e 6d 25 21 31 |(.menu$*|14)>m%!1|
|00005920| 36 20 6d 25 21 31 36 3d | 36 34 2b 28 a9 6d 65 6e |6 m%!16=|64+(.men|
|00005930| 75 24 2a 31 34 29 0d 37 | a5 07 20 20 cd 0d 37 b4 |u$*14).7|.. ..7.|
|00005940| 56 20 20 e7 20 70 74 72 | 25 3e 6d 25 2b 32 35 36 |V . ptr|%>m%+256|
|00005950| 20 85 20 31 2c 22 4e 4f | 20 52 4f 4f 4d 20 46 4f | . 1,"NO| ROOM FO|
|00005960| 52 20 4d 45 4e 55 53 22 | 20 8b 20 e7 20 69 6e 64 |R MENUS"| . . ind|
|00005970| 69 72 25 3e 6d 25 2b 36 | 35 30 20 85 20 32 2c 22 |ir%>m%+6|50 . 2,"|
|00005980| 4d 45 4e 55 20 49 54 45 | 4d 53 20 54 4f 4f 20 42 |MENU ITE|MS TOO B|
|00005990| 49 47 22 0d 37 c3 10 20 | fd 20 6d 65 6e 75 24 3d |IG".7.. |. menu$=|
|000059a0| 22 2a 22 0d 37 d2 1c 20 | 70 74 72 25 21 2d 32 34 |"*".7.. |ptr%!-24|
|000059b0| 3d 70 74 72 25 21 2d 32 | 34 20 84 20 26 38 30 0d |=ptr%!-2|4 . &80.|
|000059c0| 37 e1 67 20 e7 20 63 72 | 65 61 74 65 5f 6d 65 6e |7.g . cr|eate_men|
|000059d0| 75 3d 30 20 c8 99 22 57 | 69 6d 70 5f 43 72 65 61 |u=0 .."W|imp_Crea|
|000059e0| 74 65 4d 65 6e 75 22 2c | 2c 77 6d 65 6e 75 25 2c |teMenu",|,wmenu%,|
|000059f0| 78 70 6f 73 2d 35 31 2c | 79 70 6f 73 3a 4d 55 24 |xpos-51,|ypos:MU$|
|00005a00| 3d 22 77 69 6e 64 6d 65 | 6e 75 22 3a 6f 78 70 6f |="windme|nu":oxpo|
|00005a10| 73 3d 78 70 6f 73 2d 35 | 31 3a 6f 79 70 6f 73 3d |s=xpos-5|1:oypos=|
|00005a20| 79 70 6f 73 3a e1 0d 37 | e2 3b 20 c8 99 22 57 69 |ypos:..7|.; .."Wi|
|00005a30| 6d 70 5f 43 72 65 61 74 | 65 4d 65 6e 75 22 2c 2c |mp_Creat|eMenu",,|
|00005a40| 77 6d 65 6e 75 25 2c 6f | 78 70 6f 73 2c 6f 79 70 |wmenu%,o|xpos,oyp|
|00005a50| 6f 73 3a 4d 55 24 3d 22 | 77 69 6e 64 6d 65 6e 75 |os:MU$="|windmenu|
|00005a60| 22 0d 37 f0 06 20 e1 0d | 37 ff 10 20 f4 2d 2d 2d |".7.. ..|7.. .---|
|00005a70| 2d 2d 2d 2d 2d 2d 2d 0d | 38 0e 0c 20 dd f2 63 6f |-------.|8.. ..co|
|00005a80| 64 65 73 0d 38 13 0b 20 | 70 64 24 3d 22 22 0d 38 |des.8.. |pd$="".8|
|00005a90| 1d 25 20 e7 20 63 6f 64 | 65 24 3d 22 41 22 20 70 |.% . cod|e$="A" p|
|00005aa0| 64 24 3d 22 53 65 74 74 | 6c 65 64 20 26 20 46 69 |d$="Sett|led & Fi|
|00005ab0| 6e 65 22 0d 38 1e 53 20 | e7 20 63 6f 64 65 24 3d |ne".8.S |. code$=|
|00005ac0| 22 41 22 20 80 20 73 65 | 61 73 6f 6e 24 3d 22 57 |"A" . se|ason$="W|
|00005ad0| 69 6e 74 65 72 22 20 70 | 64 24 3d 22 46 69 6e 65 |inter" p|d$="Fine|
|00005ae0| 20 77 65 61 74 68 65 72 | 20 61 6e 64 20 70 6f 73 | weather| and pos|
|00005af0| 73 69 62 6c 65 20 6f 76 | 65 72 6e 69 67 68 74 20 |sible ov|ernight |
|00005b00| 66 72 6f 73 74 22 0d 38 | 2c 23 20 e7 20 63 6f 64 |frost".8|,# . cod|
|00005b10| 65 24 3d 22 42 22 20 70 | 64 24 3d 22 46 69 6e 65 |e$="B" p|d$="Fine|
|00005b20| 20 77 65 61 74 68 65 72 | 22 0d 38 2d 53 20 e7 20 | weather|".8-S . |
|00005b30| 63 6f 64 65 24 3d 22 42 | 22 20 80 20 73 65 61 73 |code$="B|" . seas|
|00005b40| 6f 6e 24 3d 22 57 69 6e | 74 65 72 22 20 70 64 24 |on$="Win|ter" pd$|
|00005b50| 3d 22 46 69 6e 65 20 77 | 65 61 74 68 65 72 20 61 |="Fine w|eather a|
|00005b60| 6e 64 20 70 6f 73 73 69 | 62 6c 65 20 6f 76 65 72 |nd possi|ble over|
|00005b70| 6e 69 67 68 74 20 66 72 | 6f 73 74 22 0d 38 3b 24 |night fr|ost".8;$|
|00005b80| 20 e7 20 63 6f 64 65 24 | 3d 22 43 22 20 70 64 24 | . code$|="C" pd$|
|00005b90| 3d 22 42 65 63 6f 6d 69 | 6e 67 20 66 69 6e 65 22 |="Becomi|ng fine"|
|00005ba0| 0d 38 4a 32 20 e7 20 63 | 6f 64 65 24 3d 22 44 22 |.8J2 . c|ode$="D"|
|00005bb0| 20 70 64 24 3d 22 46 69 | 6e 65 2c 20 62 65 63 6f | pd$="Fi|ne, beco|
|00005bc0| 6d 69 6e 67 20 6c 65 73 | 73 20 73 65 74 74 6c 65 |ming les|s settle|
|00005bd0| 64 22 0d 38 59 33 20 e7 | 20 63 6f 64 65 24 3d 22 |d".8Y3 .| code$="|
|00005be0| 45 22 20 70 64 24 3d 22 | 46 69 6e 65 2c 20 70 6f |E" pd$="|Fine, po|
|00005bf0| 73 73 69 62 69 6c 69 74 | 79 20 6f 66 20 73 68 6f |ssibilit|y of sho|
|00005c00| 77 65 72 73 22 0d 38 68 | 2d 20 e7 20 63 6f 64 65 |wers".8h|- . code|
|00005c10| 24 3d 22 46 22 20 70 64 | 24 3d 22 46 61 69 72 6c |$="F" pd|$="Fairl|
|00005c20| 79 20 66 69 6e 65 2c 20 | 69 6d 70 72 6f 76 69 6e |y fine, |improvin|
|00005c30| 67 22 0d 38 77 44 20 e7 | 20 63 6f 64 65 24 3d 22 |g".8wD .| code$="|
|00005c40| 47 22 20 70 64 24 3d 22 | 46 61 69 72 6c 79 20 66 |G" pd$="|Fairly f|
|00005c50| 69 6e 65 2c 20 70 6f 73 | 73 69 62 6c 69 74 79 20 |ine, pos|siblity |
|00005c60| 6f 66 20 73 68 6f 77 65 | 72 73 20 69 6e 20 6d 6f |of showe|rs in mo|
|00005c70| 72 6e 69 6e 67 22 0d 38 | 86 31 20 e7 20 63 6f 64 |rning".8|.1 . cod|
|00005c80| 65 24 3d 22 48 22 20 70 | 64 24 3d 22 46 61 69 72 |e$="H" p|d$="Fair|
|00005c90| 6c 79 20 66 69 6e 65 2c | 20 73 68 6f 77 65 72 79 |ly fine,| showery|
|00005ca0| 20 6c 61 74 65 72 22 0d | 38 95 2f 20 e7 20 63 6f | later".|8./ . co|
|00005cb0| 64 65 24 3d 22 49 22 20 | 70 64 24 3d 22 53 68 6f |de$="I" |pd$="Sho|
|00005cc0| 77 65 72 79 20 65 61 72 | 6c 79 2c 20 69 6d 70 72 |wery ear|ly, impr|
|00005cd0| 6f 76 69 6e 67 22 0d 38 | a4 20 20 e7 20 63 6f 64 |oving".8|. . cod|
|00005ce0| 65 24 3d 22 4a 22 20 70 | 64 24 3d 22 43 68 61 6e |e$="J" p|d$="Chan|
|00005cf0| 67 61 62 6c 65 22 0d 38 | b3 32 20 e7 20 63 6f 64 |gable".8|.2 . cod|
|00005d00| 65 24 3d 22 4b 22 20 70 | 64 24 3d 22 46 61 69 72 |e$="K" p|d$="Fair|
|00005d10| 6c 79 20 66 69 6e 65 2c | 20 73 68 6f 77 65 72 73 |ly fine,| showers|
|00005d20| 20 6c 69 6b 65 6c 79 22 | 0d 38 c2 37 20 e7 20 63 | likely"|.8.7 . c|
|00005d30| 6f 64 65 24 3d 22 4c 22 | 20 70 64 24 3d 22 52 61 |ode$="L"| pd$="Ra|
|00005d40| 74 68 65 72 20 75 6e 73 | 65 74 74 6c 65 64 2c 20 |ther uns|ettled, |
|00005d50| 63 6c 65 61 72 69 6e 67 | 20 6c 61 74 65 72 22 0d |clearing| later".|
|00005d60| 38 d1 34 20 e7 20 63 6f | 64 65 24 3d 22 4d 22 20 |8.4 . co|de$="M" |
|00005d70| 70 64 24 3d 22 55 6e 73 | 65 74 74 6c 65 64 2c 20 |pd$="Uns|ettled, |
|00005d80| 70 72 6f 62 61 62 6c 79 | 20 69 6d 70 72 6f 76 69 |probably| improvi|
|00005d90| 6e 67 22 0d 38 e0 34 20 | e7 20 63 6f 64 65 24 3d |ng".8.4 |. code$=|
|00005da0| 22 4e 22 20 70 64 24 3d | 22 53 68 6f 77 65 72 79 |"N" pd$=|"Showery|
|00005db0| 20 77 69 74 68 20 62 72 | 69 67 68 74 20 69 6e 74 | with br|ight int|
|00005dc0| 65 72 76 61 6c 73 22 0d | 38 ef 35 20 e7 20 63 6f |ervals".|8.5 . co|
|00005dd0| 64 65 24 3d 22 4f 22 20 | 70 64 24 3d 22 53 68 6f |de$="O" |pd$="Sho|
|00005de0| 77 65 72 79 2c 20 62 65 | 63 6f 6d 69 6e 67 20 6c |wery, be|coming l|
|00005df0| 65 73 73 20 73 65 74 74 | 6c 65 64 22 0d 38 fe 2b |ess sett|led".8.+|
|00005e00| 20 e7 20 63 6f 64 65 24 | 3d 22 50 22 20 70 64 24 | . code$|="P" pd$|
|00005e10| 3d 22 43 68 61 6e 67 61 | 62 6c 65 2c 20 73 6f 6d |="Changa|ble, som|
|00005e20| 65 20 72 61 69 6e 22 0d | 39 0d 36 20 e7 20 63 6f |e rain".|9.6 . co|
|00005e30| 64 65 24 3d 22 51 22 20 | 70 64 24 3d 22 55 6e 73 |de$="Q" |pd$="Uns|
|00005e40| 65 74 74 6c 65 64 2c 20 | 73 68 6f 72 74 20 66 69 |ettled, |short fi|
|00005e50| 6e 65 20 69 6e 74 65 72 | 76 61 6c 73 22 0d 39 1c |ne inter|vals".9.|
|00005e60| 2c 20 e7 20 63 6f 64 65 | 24 3d 22 52 22 20 70 64 |, . code|$="R" pd|
|00005e70| 24 3d 22 55 6e 73 65 74 | 74 6c 65 64 2c 20 72 61 |$="Unset|tled, ra|
|00005e80| 69 6e 20 6c 61 74 65 72 | 22 0d 39 2b 2b 20 e7 20 |in later|".9++ . |
|00005e90| 63 6f 64 65 24 3d 22 53 | 22 20 70 64 24 3d 22 55 |code$="S|" pd$="U|
|00005ea0| 6e 73 65 74 74 6c 65 64 | 2c 20 73 6f 6d 65 20 72 |nsettled|, some r|
|00005eb0| 61 69 6e 22 0d 39 3a 2c | 20 e7 20 63 6f 64 65 24 |ain".9:,| . code$|
|00005ec0| 3d 22 54 22 20 70 64 24 | 3d 22 4d 6f 73 74 6c 79 |="T" pd$|="Mostly|
|00005ed0| 20 76 65 72 79 20 75 6e | 73 65 74 74 6c 65 64 22 | very un|settled"|
|00005ee0| 0d 39 49 31 20 e7 20 63 | 6f 64 65 24 3d 22 55 22 |.9I1 . c|ode$="U"|
|00005ef0| 20 70 64 24 3d 22 4f 63 | 63 61 73 69 6f 6e 61 6c | pd$="Oc|casional|
|00005f00| 20 72 61 69 6e 2c 20 77 | 6f 72 73 65 6e 69 6e 67 | rain, w|orsening|
|00005f10| 22 0d 39 58 34 20 e7 20 | 63 6f 64 65 24 3d 22 56 |".9X4 . |code$="V|
|00005f20| 22 20 70 64 24 3d 22 52 | 61 69 6e 20 61 74 20 74 |" pd$="R|ain at t|
|00005f30| 69 6d 65 73 2c 20 76 65 | 72 79 20 75 6e 73 65 74 |imes, ve|ry unset|
|00005f40| 74 6c 65 64 22 0d 39 67 | 31 20 e7 20 63 6f 64 65 |tled".9g|1 . code|
|00005f50| 24 3d 22 57 22 20 70 64 | 24 3d 22 52 61 69 6e 20 |$="W" pd|$="Rain |
|00005f60| 61 74 20 66 72 65 71 75 | 65 6e 74 20 69 6e 74 65 |at frequ|ent inte|
|00005f70| 72 76 61 6c 73 22 0d 39 | 76 2b 20 e7 20 63 6f 64 |rvals".9|v+ . cod|
|00005f80| 65 24 3d 22 58 22 20 70 | 64 24 3d 22 52 61 69 6e |e$="X" p|d$="Rain|
|00005f90| 2c 20 76 65 72 79 20 75 | 6e 73 65 74 74 6c 65 64 |, very u|nsettled|
|00005fa0| 22 0d 39 85 2a 20 e7 20 | 63 6f 64 65 24 3d 22 59 |".9.* . |code$="Y|
|00005fb0| 22 20 70 64 24 3d 22 53 | 74 6f 72 6d 79 2c 20 6d |" pd$="S|tormy, m|
|00005fc0| 61 79 20 69 6d 70 72 6f | 76 65 22 0d 39 94 28 20 |ay impro|ve".9.( |
|00005fd0| e7 20 63 6f 64 65 24 3d | 22 5a 22 20 70 64 24 3d |. code$=|"Z" pd$=|
|00005fe0| 22 53 74 6f 72 6d 79 2c | 20 6d 75 63 68 20 72 61 |"Stormy,| much ra|
|00005ff0| 69 6e 22 0d 39 a3 06 20 | e1 0d 39 b2 10 20 f4 2d |in".9.. |..9.. .-|
|00006000| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 39 c1 0c 20 dd f2 |--------|-.9.. ..|
|00006010| 70 6d 65 6e 75 0d 39 c2 | 16 20 e7 20 63 72 65 61 |pmenu.9.|. . crea|
|00006020| 74 65 5f 6d 65 6e 75 3d | 30 20 8c 0d 39 d0 35 20 |te_menu=|0 ..9.5 |
|00006030| 20 f2 69 73 65 74 28 39 | 2c 22 6d 65 6e 6c 69 73 | .iset(9|,"menlis|
|00006040| 74 32 22 2c 77 68 61 6e | 64 6c 65 31 25 29 3a f2 |t2",whan|dle1%):.|
|00006050| 64 65 6c 61 79 3a f2 6d | 69 6e 69 5f 70 6f 6c 6c |delay:.m|ini_poll|
|00006060| 0d 39 df 2d 20 20 f2 69 | 73 65 74 28 39 2c 22 6d |.9.- .i|set(9,"m|
|00006070| 65 6e 6c 69 73 74 22 2c | 77 68 61 6e 64 6c 65 31 |enlist",|whandle1|
|00006080| 25 29 3a f2 6d 69 6e 69 | 5f 70 6f 6c 6c 0d 39 e0 |%):.mini|_poll.9.|
|00006090| 06 20 cd 0d 39 ee 0e 20 | 6d 25 3d 70 6d 65 6e 75 |. ..9.. |m%=pmenu|
|000060a0| 25 0d 39 fd 4a 20 6d 25 | 3f 31 32 3d 37 3a 6d 25 |%.9.J m%|?12=7:m%|
|000060b0| 3f 31 33 3d 32 3a 6d 25 | 3f 31 34 3d 37 3a 6d 25 |?13=2:m%|?14=7:m%|
|000060c0| 3f 31 35 3d 30 3a 6d 25 | 21 31 36 3d 31 33 34 3a |?15=0:m%|!16=134:|
|000060d0| 6d 25 21 32 30 3d 34 34 | 3a 6d 25 21 32 34 3d 30 |m%!20=44|:m%!24=0|
|000060e0| 3a 70 74 72 25 3d 6d 25 | 2b 32 38 0d 3a 0c 2b 20 |:ptr%=m%|+28.:.+ |
|000060f0| f2 72 6d 28 22 4d 55 41 | 33 22 29 3a 6d 6d 6c 3d |.rm("MUA|3"):mml=|
|00006100| a7 74 65 78 74 24 2c 22 | 2c 22 29 3a 65 6e 74 72 |.text$,"|,"):entr|
|00006110| 69 65 73 25 3d 30 0d 3a | 1b 18 20 f2 69 72 65 61 |ies%=0.:|.. .irea|
|00006120| 64 28 38 2c 77 68 61 6e | 64 6c 65 31 25 29 0d 3a |d(8,whan|dle1%).:|
|00006130| 2a 31 20 24 6d 25 3d c0 | 74 65 78 74 24 2c 6d 6d |*1 $m%=.|text$,mm|
|00006140| 6c 2d 31 29 3a 74 65 78 | 74 24 3d c2 74 65 78 74 |l-1):tex|t$=.text|
|00006150| 24 2c a9 28 74 65 78 74 | 24 29 2d 6d 6d 6c 29 0d |$,.(text|$)-mml).|
|00006160| 3a 39 06 20 f5 0d 3a 48 | 15 20 20 6d 6d 6c 3d a7 |:9. ..:H|. mml=.|
|00006170| 74 65 78 74 24 2c 22 2c | 22 29 0d 3a 57 19 20 20 |text$,",|").:W. |
|00006180| 6d 65 6e 75 24 3d c0 74 | 65 78 74 24 2c 6d 6d 6c |menu$=.t|ext$,mml|
|00006190| 2d 31 29 0d 3a 66 15 20 | 20 20 e7 20 6d 65 6e 75 |-1).:f. | . menu|
|000061a0| 24 3c 3e 22 2a 22 20 8c | 0d 3a 75 22 20 20 20 20 |$<>"*" .|.:u" |
|000061b0| 74 65 78 74 24 3d c2 74 | 65 78 74 24 2c a9 28 74 |text$=.t|ext$,.(t|
|000061c0| 65 78 74 24 29 2d 6d 6d | 6c 29 0d 3a 84 24 20 20 |ext$)-mm|l).:.$ |
|000061d0| 20 20 70 74 72 25 21 30 | 3d 30 3a e7 20 6d 65 6e | ptr%!0|=0:. men|
|000061e0| 75 24 3d 61 24 20 70 74 | 72 25 21 30 3d 31 0d 3a |u$=a$ pt|r%!0=1.:|
|000061f0| 93 21 20 20 20 20 70 74 | 72 25 21 34 3d 2d 31 3a |.! pt|r%!4=-1:|
|00006200| 70 74 72 25 21 38 3d 26 | 37 30 30 30 30 32 31 0d |ptr%!8=&|7000021.|
|00006210| 3a a2 2d 20 20 20 20 24 | 28 70 74 72 25 2b 31 32 |:.- $|(ptr%+12|
|00006220| 29 3d 6d 65 6e 75 24 3a | 70 74 72 25 2b 3d 32 34 |)=menu$:|ptr%+=24|
|00006230| 3a 65 6e 74 72 69 65 73 | 25 2b 3d 31 0d 3a b1 32 |:entries|%+=1.:.2|
|00006240| 20 20 20 e7 20 36 34 2b | 28 a9 6d 65 6e 75 24 2a | . 64+|(.menu$*|
|00006250| 31 34 29 3e 6d 25 21 31 | 36 20 6d 25 21 31 36 3d |14)>m%!1|6 m%!16=|
|00006260| 36 34 2b 28 a9 6d 65 6e | 75 24 2a 31 34 29 0d 3a |64+(.men|u$*14).:|
|00006270| c0 07 20 20 cd 0d 3a cf | 10 20 fd 20 6d 65 6e 75 |.. ..:.|. . menu|
|00006280| 24 3d 22 2a 22 0d 3a de | 1c 20 70 74 72 25 21 2d |$="*".:.|. ptr%!-|
|00006290| 32 34 3d 70 74 72 25 21 | 2d 32 34 20 84 20 26 38 |24=ptr%!|-24 . &8|
|000062a0| 30 0d 3a ed 61 20 e7 20 | 63 72 65 61 74 65 5f 6d |0.:.a . |create_m|
|000062b0| 65 6e 75 3d 30 20 c8 99 | 22 57 69 6d 70 5f 43 72 |enu=0 ..|"Wimp_Cr|
|000062c0| 65 61 74 65 4d 65 6e 75 | 22 2c 2c 70 6d 65 6e 75 |eateMenu|",,pmenu|
|000062d0| 25 2c 78 70 6f 73 2d 35 | 31 2c 79 70 6f 73 3a 4d |%,xpos-5|1,ypos:M|
|000062e0| 55 24 3d 22 70 6d 65 6e | 75 22 3a 6f 78 70 6f 73 |U$="pmen|u":oxpos|
|000062f0| 3d 78 70 6f 73 3a 6f 79 | 70 6f 73 3d 79 70 6f 73 |=xpos:oy|pos=ypos|
|00006300| 3a e1 0d 3a ee 38 20 c8 | 99 22 57 69 6d 70 5f 43 |:..:.8 .|."Wimp_C|
|00006310| 72 65 61 74 65 4d 65 6e | 75 22 2c 2c 70 6d 65 6e |reateMen|u",,pmen|
|00006320| 75 25 2c 6f 78 70 6f 73 | 2c 6f 79 70 6f 73 3a 4d |u%,oxpos|,oypos:M|
|00006330| 55 24 3d 22 70 6d 65 6e | 75 22 0d 3a fc 06 20 e1 |U$="pmen|u".:.. .|
|00006340| 0d 3b 0b 10 20 f4 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.;.. .--|--------|
|00006350| 0d 3e 80 12 20 dd f2 65 | 72 72 62 6f 78 28 6d 65 |.>.. ..e|rrbox(me|
|00006360| 24 29 0d 5d fc 0f 20 f2 | 6d 69 6e 69 5f 70 6f 6c |$).].. .|mini_pol|
|00006370| 6c 0d 5e 06 25 20 f2 69 | 73 65 74 28 32 2c 6d 65 |l.^.% .i|set(2,me|
|00006380| 24 2c 65 72 72 62 6f 78 | 25 29 3a f2 72 6d 28 22 |$,errbox|%):.rm("|
|00006390| 42 55 54 35 22 29 0d 5e | 10 27 20 f2 69 73 65 74 |BUT5").^|.' .iset|
|000063a0| 28 35 2c 74 65 78 74 24 | 2c 65 72 72 62 6f 78 25 |(5,text$|,errbox%|
|000063b0| 29 3a 61 6c 65 72 74 3d | 2d 31 3a ef 37 0d 5e 1a |):alert=|-1:.7.^.|
|000063c0| 34 20 62 6c 6f 63 6b 25 | 21 30 3d 65 72 72 62 6f |4 block%|!0=errbo|
|000063d0| 78 25 3a c8 99 22 57 69 | 6d 70 5f 47 65 74 57 69 |x%:.."Wi|mp_GetWi|
|000063e0| 6e 64 6f 77 49 6e 66 6f | 22 2c 2c 62 6c 6f 63 6b |ndowInfo|",,block|
|000063f0| 25 0d 5e 24 32 20 62 6c | 6f 63 6b 25 21 34 3d 28 |%.^$2 bl|ock%!4=(|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.
