/ The Datafile PD-CD 5 / DATAFILE_PDCD5.iso / utilities / t / tornado / TNdemo2 / !TornWin / !RunImage

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 10 f4 20 3e 21 | 52 75 6e 49 6d 61 67 65 |..... >!|RunImage|
|00000010| 0d 00 14 2c f4 20 47 69 | 76 65 73 20 61 20 6c 69 |...,. Gi|ves a li|
|00000020| 74 74 6c 65 20 64 65 6d | 6f 20 6f 66 20 74 6f 72 |ttle dem|o of tor|
|00000030| 6e 61 64 6f 20 77 69 6e | 64 6f 77 73 0d 00 1e 13 |nado win|dows....|
|00000040| f4 20 62 79 20 4e 2e 20 | 44 6f 75 67 6c 61 73 0d |. by N. |Douglas.|
|00000050| 00 28 1e f4 20 31 37 2d | 30 33 2d 31 39 39 36 20 |.(.. 17-|03-1996 |
|00000060| 76 65 72 73 69 6f 6e 20 | 30 2e 31 31 62 0d 00 32 |version |0.11b..2|
|00000070| 05 3a 0d 00 3c 3a f4 20 | 54 68 69 73 20 70 72 6f |.:..<:. |This pro|
|00000080| 67 72 61 6d 20 69 73 20 | 61 6e 20 61 6d 61 6c 67 |gram is |an amalg|
|00000090| 61 6c 6d 20 6f 66 20 74 | 77 6f 20 70 61 72 74 73 |alm of t|wo parts|
|000000a0| 20 6f 66 20 74 6f 72 6e | 61 64 6f 3a 0d 00 46 3e | of torn|ado:..F>|
|000000b0| f4 20 28 69 29 20 20 3a | 20 41 20 74 6f 72 6e 61 |. (i)  :| A torna|
|000000c0| 64 6f 20 72 65 6e 64 65 | 72 65 72 2c 20 77 68 69 |do rende|rer, whi|
|000000d0| 63 68 20 72 65 6e 64 65 | 72 73 20 74 6f 72 6e 61 |ch rende|rs torna|
|000000e0| 64 6f 20 77 69 6e 64 6f | 77 73 0d 00 50 43 f4 20 |do windo|ws..PC. |
|000000f0| 20 20 20 20 20 20 20 61 | 6e 64 20 70 72 6f 76 69 |       a|nd provi|
|00000100| 64 65 73 20 74 68 65 20 | 77 69 6e 64 6f 77 20 6f |des the |window o|
|00000110| 70 65 72 61 74 69 6f 6e | 73 20 74 68 72 6f 75 67 |peration|s throug|
|00000120| 68 20 69 74 73 20 6d 69 | 73 63 20 6f 70 0d 00 5a |h its mi|sc op..Z|
|00000130| 3c f4 20 20 20 20 20 20 | 20 20 66 75 6e 63 74 69 |<.      |  functi|
|00000140| 6f 6e 2e 20 54 68 69 73 | 20 77 69 6c 6c 20 62 65 |on. This| will be|
|00000150| 20 61 20 6d 6f 64 75 6c | 65 2c 20 61 6e 64 20 69 | a modul|e, and i|
|00000160| 73 20 74 6f 74 61 6c 6c | 79 0d 00 64 19 f4 20 20 |s totall|y..d..  |
|00000170| 20 20 20 20 20 20 72 65 | 70 6c 61 63 65 61 62 6c |      re|placeabl|
|00000180| 65 2e 0d 00 6e 3b f4 20 | 28 69 69 29 20 3a 20 41 |e...n;. |(ii) : A|
|00000190| 20 73 6d 61 6c 6c 20 73 | 65 63 74 69 6f 6e 20 6f | small s|ection o|
|000001a0| 66 20 74 68 65 20 74 6f | 72 6e 61 64 6f 20 73 68 |f the to|rnado sh|
|000001b0| 65 6c 6c 2c 20 77 68 69 | 63 68 20 69 6e 0d 00 78 |ell, whi|ch in..x|
|000001c0| 44 f4 20 20 20 20 20 20 | 20 20 63 6f 6e 6a 75 6e |D.      |  conjun|
|000001d0| 63 74 69 6f 6e 20 77 69 | 74 68 20 74 68 65 20 74 |ction wi|th the t|
|000001e0| 6f 72 6e 61 64 6f 20 6c | 69 62 72 61 72 79 20 61 |ornado l|ibrary a|
|000001f0| 6e 64 20 63 61 63 68 69 | 6e 67 20 6d 6f 64 75 6c |nd cachi|ng modul|
|00000200| 65 0d 00 82 3a f4 20 20 | 20 20 20 20 20 20 75 73 |e...:.  |      us|
|00000210| 65 73 20 28 69 29 20 61 | 62 6f 76 65 20 74 6f 20 |es (i) a|bove to |
|00000220| 69 6e 74 65 72 61 63 74 | 20 77 69 74 68 20 74 68 |interact| with th|
|00000230| 65 20 75 73 65 72 2e 20 | 54 68 65 0d 00 8c 40 f4 |e user. |The...@.|
|00000240| 20 20 20 20 20 20 20 20 | 70 61 72 74 69 63 75 6c |        |particul|
|00000250| 61 72 20 70 61 72 74 73 | 20 6f 66 20 74 68 65 20 |ar parts| of the |
|00000260| 73 68 65 6c 6c 20 69 6e | 20 74 68 69 73 20 70 72 |shell in| this pr|
|00000270| 6f 67 72 61 6d 20 77 6f | 75 6c 64 0d 00 96 41 f4 |ogram wo|uld...A.|
|00000280| 20 20 20 20 20 20 20 20 | 61 63 74 75 61 6c 6c 79 |        |actually|
|00000290| 20 72 75 6e 20 6f 6e 20 | 61 20 74 69 63 6b 65 72 | run on |a ticker|
|000002a0| 20 77 68 69 63 68 20 69 | 73 20 63 61 6c 6c 65 64 | which i|s called|
|000002b0| 20 61 66 74 65 72 20 65 | 76 65 72 79 0d 00 a0 44 | after e|very...D|
|000002c0| f4 20 20 20 20 20 20 20 | 20 63 6f 6e 74 72 6f 6c |.       | control|
|000002d0| 20 70 61 73 73 20 74 6f | 20 74 68 65 20 57 69 6d | pass to| the Wim|
|000002e0| 70 2c 20 6e 6f 74 20 6c | 69 6b 65 20 74 68 65 20 |p, not l|ike the |
|000002f0| 64 69 72 65 63 74 20 70 | 61 73 73 20 68 65 72 65 |direct p|ass here|
|00000300| 0d 00 aa 05 3a 0d 00 b4 | 31 f4 20 4e 6f 74 65 20 |....:...|1. Note |
|00000310| 74 68 61 74 20 61 75 74 | 6f 2d 65 78 74 65 6e 64 |that aut|o-extend|
|00000320| 20 68 65 61 70 73 20 61 | 72 65 20 76 65 72 79 20 | heaps a|re very |
|00000330| 62 75 67 67 79 21 0d 00 | be 04 0d 00 c8 39 f4 20 |buggy!..|.....9. |
|00000340| 50 55 54 20 43 48 45 43 | 4b 53 20 49 4e 20 46 4f |PUT CHEC|KS IN FO|
|00000350| 52 20 41 4c 4c 20 54 45 | 52 4d 49 4e 41 54 49 4f |R ALL TE|RMINATIO|
|00000360| 4e 53 20 57 49 54 48 20 | 41 53 43 49 49 20 30 21 |NS WITH |ASCII 0!|
|00000370| 21 21 21 0d 00 d2 05 3a | 0d 00 dc 0b 61 6e 69 6d |!!!....:|....anim|
|00000380| 25 3d b9 0d 00 e6 0a 6c | 6f 67 25 3d b9 0d 00 f0 |%=.....l|og%=....|
|00000390| 34 e7 20 6c 6f 67 25 20 | 6c 6f 67 68 25 3d ad 20 |4. log% |logh%=. |
|000003a0| 22 3c 54 44 65 6d 6f 24 | 44 69 72 3e 2e 4c 6f 67 |"<TDemo$|Dir>.Log|
|000003b0| 22 3a cf 23 6c 6f 67 68 | 25 3d a2 23 6c 6f 67 68 |":.#logh|%=.#logh|
|000003c0| 25 0d 00 fa 21 f2 6c 6f | 67 28 22 50 72 6f 67 72 |%...!.lo|g("Progr|
|000003d0| 61 6d 20 69 6d 61 67 65 | 20 73 74 61 72 74 65 64 |am image| started|
|000003e0| 22 29 0d 01 04 0c 72 68 | 65 61 70 25 3d 30 0d 01 |")....rh|eap%=0..|
|000003f0| 0e 7b ee 20 85 20 ee 20 | 85 20 87 3a f2 6c 6f 67 |.{. . . |. .:.log|
|00000400| 28 22 50 72 6f 67 72 61 | 6d 20 74 65 72 6d 69 6e |("Progra|m termin|
|00000410| 61 74 65 64 20 75 6e 6e | 61 74 75 72 61 6c 6c 79 |ated unn|aturally|
|00000420| 20 77 69 74 68 20 65 72 | 72 6f 72 20 22 22 22 2b | with er|ror """+|
|00000430| f6 24 2b 22 20 61 74 20 | 6c 69 6e 65 20 22 2b c3 |.$+" at |line "+.|
|00000440| 9e 2b 22 22 22 22 29 3a | f2 73 68 75 74 64 6f 77 |.+""""):|.shutdow|
|00000450| 6e 3a 85 20 9f 2c f6 24 | 2b 22 20 61 74 20 6c 69 |n:. .,.$|+" at li|
|00000460| 6e 65 20 22 2b c3 9e 3a | e0 0d 01 18 1d de 20 71 |ne "+..:|...... q|
|00000470| 25 20 32 35 36 2c 71 32 | 25 20 32 35 36 2c 77 6b |% 256,q2|% 256,wk|
|00000480| 25 20 34 30 39 36 0d 01 | 22 0e 24 71 25 3d 22 54 |% 4096..|".$q%="T|
|00000490| 41 53 4b 22 0d 01 2c 35 | c8 99 20 22 57 69 6d 70 |ASK"..,5|.. "Wimp|
|000004a0| 5f 49 6e 69 74 69 61 6c | 69 73 65 22 2c 32 30 30 |_Initial|ise",200|
|000004b0| 2c 21 71 25 2c 22 54 6f | 72 6e 61 64 6f 20 73 68 |,!q%,"To|rnado sh|
|000004c0| 65 6c 6c 20 74 65 73 74 | 22 0d 01 36 21 f2 6c 6f |ell test|"..6!.lo|
|000004d0| 67 28 22 44 65 63 6c 61 | 72 65 64 20 61 73 20 77 |g("Decla|red as w|
|000004e0| 69 6d 70 20 74 61 73 6b | 22 29 0d 01 40 29 2a 57 |imp task|")..@)*W|
|000004f0| 69 6d 70 54 61 73 6b 20 | 3c 54 44 65 6d 6f 24 44 |impTask |<TDemo$D|
|00000500| 69 72 3e 2e 4c 6f 61 64 | 52 65 61 64 65 72 2e 21 |ir>.Load|Reader.!|
|00000510| 52 75 6e 0d 01 4a 0a 21 | 71 25 3d 2d 31 0d 01 54 |Run..J.!|q%=-1..T|
|00000520| 0a 71 25 21 34 3d 30 0d | 01 5e 0a 71 25 21 38 3d |.q%!4=0.|.^.q%!8=|
|00000530| 30 0d 01 68 0c 71 25 21 | 31 32 3d 36 38 0d 01 72 |0..h.q%!|12=68..r|
|00000540| 0c 71 25 21 31 36 3d 36 | 38 0d 01 7c 13 71 25 21 |.q%!16=6|8..|.q%!|
|00000550| 32 30 3d 26 42 37 30 30 | 32 31 30 32 0d 01 86 0e |20=&B700|2102....|
|00000560| de 20 71 25 21 32 34 20 | 31 34 0d 01 90 17 24 28 |. q%!24 |14....$(|
|00000570| 71 25 21 32 34 29 3d 22 | 21 74 6f 72 6e 77 69 6e |q%!24)="|!tornwin|
|00000580| 22 0d 01 9a 0b 71 25 21 | 32 38 3d 31 0d 01 a4 0c |"....q%!|28=1....|
|00000590| 71 25 21 33 32 3d 31 32 | 0d 01 ae 26 c8 99 20 22 |q%!32=12|...&.. "|
|000005a0| 57 69 6d 70 5f 43 72 65 | 61 74 65 49 63 6f 6e 22 |Wimp_Cre|ateIcon"|
|000005b0| 2c 2c 71 25 20 b8 20 6d | 79 69 63 6f 6e 25 0d 01 |,,q% . m|yicon%..|
|000005c0| b8 08 f2 61 73 73 0d 01 | c2 05 3a 0d 01 cc 42 f4 |...ass..|..:...B.|
|000005d0| 20 53 65 74 20 75 70 20 | 61 20 68 65 61 70 20 74 | Set up |a heap t|
|000005e0| 6f 20 68 6f 6c 64 20 74 | 68 65 20 77 69 6e 64 6f |o hold t|he windo|
|000005f0| 77 73 2e 20 54 68 69 73 | 20 61 72 65 61 20 69 73 |ws. This| area is|
|00000600| 20 61 76 61 69 6c 61 62 | 6c 65 20 74 6f 0d 01 d6 | availab|le to...|
|00000610| 20 f4 20 74 68 65 20 74 | 61 73 6b 20 74 6f 20 61 | . the t|ask to a|
|00000620| 63 63 65 73 73 20 66 72 | 65 65 6c 79 2e 0d 01 e0 |ccess fr|eely....|
|00000630| 41 f4 20 57 6f 75 6c 64 | 20 6e 6f 72 6d 61 6c 6c |A. Would| normall|
|00000640| 79 20 62 65 20 63 72 65 | 61 74 65 64 20 66 6f 72 |y be cre|ated for|
|00000650| 20 65 61 63 68 20 74 61 | 73 6b 20 61 75 74 6f 6d | each ta|sk autom|
|00000660| 61 74 69 63 61 6c 6c 79 | 20 61 66 74 65 72 0d 01 |atically| after..|
|00000670| ea 2d f4 20 69 74 73 20 | 6d 65 6d 6f 72 79 20 64 |.-. its |memory d|
|00000680| 6f 6d 61 69 6e 2c 20 69 | 6e 20 69 74 73 20 70 6f |omain, i|n its po|
|00000690| 73 74 73 6c 6f 74 20 68 | 65 61 70 0d 01 f4 0b 68 |stslot h|eap....h|
|000006a0| 65 61 70 25 3d 93 0d 01 | fe 24 c8 99 20 22 57 69 |eap%=...|.$.. "Wi|
|000006b0| 6d 70 5f 53 6c 6f 74 53 | 69 7a 65 22 2c 2d 31 2c |mp_SlotS|ize",-1,|
|000006c0| 2d 31 20 b8 20 63 75 72 | 72 25 0d 02 08 2a c8 99 |-1 . cur|r%...*..|
|000006d0| 20 22 57 69 6d 70 5f 53 | 6c 6f 74 53 69 7a 65 22 | "Wimp_S|lotSize"|
|000006e0| 2c 63 75 72 72 25 2b 33 | 32 2a 31 30 32 34 2c 2d |,curr%+3|2*1024,-|
|000006f0| 31 2c 2d 31 0d 02 12 2d | c8 99 20 22 54 6f 72 6e |1,-1...-|.. "Torn|
|00000700| 61 64 6f 5f 49 6e 69 74 | 68 65 61 70 22 2c 25 30 |ado_Init|heap",%0|
|00000710| 30 31 2c 68 65 61 70 25 | 2c 2c 33 32 2a 31 30 32 |01,heap%|,,32*102|
|00000720| 34 0d 02 1c 35 f2 6c 6f | 67 28 22 43 72 65 61 74 |4...5.lo|g("Creat|
|00000730| 65 64 20 70 6f 73 74 73 | 6c 6f 74 20 68 65 61 70 |ed posts|lot heap|
|00000740| 2c 20 61 6e 64 20 69 6e | 69 74 69 61 6c 69 73 65 |, and in|itialise|
|00000750| 64 20 69 74 22 29 0d 02 | 26 05 3a 0d 02 30 2f f4 |d it")..|&.:..0/.|
|00000760| 20 53 65 74 20 75 70 20 | 61 20 74 65 6d 70 6c 61 | Set up |a templa|
|00000770| 74 65 20 6f 66 20 61 6e | 20 65 6d 70 74 79 20 57 |te of an| empty W|
|00000780| 69 6d 70 20 77 69 6e 64 | 6f 77 0d 02 3a 2e c8 99 |imp wind|ow..:...|
|00000790| 20 22 54 6f 72 6e 61 64 | 6f 5f 47 65 74 62 6c 6b | "Tornad|o_Getblk|
|000007a0| 22 2c 25 31 2c 30 2c 2c | 31 32 38 20 b8 20 2c 2c |",%1,0,,|128 . ,,|
|000007b0| 2c 77 74 65 6d 70 6c 25 | 0d 02 44 2e c8 99 20 22 |,wtempl%|..D... "|
|000007c0| 54 6f 72 6e 61 64 6f 5f | 47 65 74 61 64 64 72 22 |Tornado_|Getaddr"|
|000007d0| 2c 2c 30 2c 2c 77 74 65 | 6d 70 6c 25 20 b8 20 2c |,,0,,wte|mpl% . ,|
|000007e0| 2c 61 64 64 72 25 0d 02 | 4e 33 c8 99 20 22 57 69 |,addr%..|N3.. "Wi|
|000007f0| 6d 70 5f 4f 70 65 6e 54 | 65 6d 70 6c 61 74 65 22 |mp_OpenT|emplate"|
|00000800| 2c 2c 22 3c 54 44 65 6d | 6f 24 44 69 72 3e 2e 54 |,,"<TDem|o$Dir>.T|
|00000810| 65 6d 70 6c 61 74 65 73 | 22 0d 02 58 3c c8 99 20 |emplates|"..X<.. |
|00000820| 22 57 69 6d 70 5f 4c 6f | 61 64 54 65 6d 70 6c 61 |"Wimp_Lo|adTempla|
|00000830| 74 65 22 2c 2c 61 64 64 | 72 25 2c 71 25 2c 61 64 |te",,add|r%,q%,ad|
|00000840| 64 72 25 2b 31 32 38 2c | 2d 31 2c 22 73 61 6d 70 |dr%+128,|-1,"samp|
|00000850| 6c 65 22 2c 30 0d 02 62 | 1b c8 99 20 22 57 69 6d |le",0..b|... "Wim|
|00000860| 70 5f 43 6c 6f 73 65 54 | 65 6d 70 6c 61 74 65 22 |p_CloseT|emplate"|
|00000870| 0d 02 6c 33 f2 6c 6f 67 | 28 22 52 49 53 43 2d 4f |..l3.log|("RISC-O|
|00000880| 53 20 62 61 73 65 20 74 | 65 6d 70 6c 61 74 65 20 |S base t|emplate |
|00000890| 64 65 66 69 6e 69 74 69 | 6f 6e 20 6c 6f 61 64 65 |definiti|on loade|
|000008a0| 64 22 29 0d 02 76 05 3a | 0d 02 80 3b f4 20 53 65 |d")..v.:|...;. Se|
|000008b0| 74 20 75 70 20 61 20 6c | 69 73 74 20 6f 66 20 72 |t up a l|ist of r|
|000008c0| 65 64 72 61 77 20 74 68 | 72 65 61 64 73 20 72 75 |edraw th|reads ru|
|000008d0| 6e 6e 69 6e 67 20 66 6f | 72 20 74 68 69 73 20 74 |nning fo|r this t|
|000008e0| 61 73 6b 0d 02 8a 38 c8 | 99 20 22 54 6f 72 6e 61 |ask...8.|. "Torna|
|000008f0| 64 6f 5f 47 65 74 62 6c | 6b 22 2c 25 31 2c 68 65 |do_Getbl|k",%1,he|
|00000900| 61 70 25 2c 2c 32 35 36 | 20 b8 20 2c 2c 61 64 64 |ap%,,256| . ,,add|
|00000910| 72 25 2c 74 68 72 65 61 | 64 68 25 0d 02 94 29 f4 |r%,threa|dh%...).|
|00000920| 20 45 61 63 68 20 74 68 | 72 65 61 64 20 68 61 73 | Each th|read has|
|00000930| 20 74 68 65 20 66 6f 6c | 6c 6f 77 69 6e 67 20 64 | the fol|lowing d|
|00000940| 61 74 61 3a 0d 02 9e 37 | f4 20 2b 30 30 3a 20 48 |ata:...7|. +00: H|
|00000950| 61 6e 64 6c 65 20 6f 66 | 20 77 69 6e 64 6f 77 20 |andle of| window |
|00000960| 74 68 69 73 20 74 68 72 | 65 61 64 20 69 73 20 72 |this thr|ead is r|
|00000970| 65 64 72 61 77 69 6e 67 | 20 69 6e 0d 02 a8 22 f4 |edrawing| in...".|
|00000980| 20 20 20 20 20 20 28 3d | 30 20 69 66 20 74 68 69 |      (=|0 if thi|
|00000990| 73 20 73 6c 6f 74 20 65 | 6d 70 74 79 29 0d 02 b2 |s slot e|mpty)...|
|000009a0| 41 f4 20 2b 30 34 3a 20 | 50 43 20 72 65 6e 64 65 |A. +04: |PC rende|
|000009b0| 72 65 72 20 77 61 73 20 | 69 6e 74 65 72 72 75 70 |rer was |interrup|
|000009c0| 74 65 64 20 61 74 20 28 | 3d 30 20 69 66 20 6e 6f |ted at (|=0 if no|
|000009d0| 74 20 73 74 61 72 74 65 | 64 20 79 65 74 29 0d 02 |t starte|d yet)..|
|000009e0| bc 31 f4 20 2b 30 38 3a | 20 41 52 4d 20 66 6c 61 |.1. +08:| ARM fla|
|000009f0| 67 73 20 6f 66 20 72 65 | 6e 64 65 72 65 72 20 77 |gs of re|nderer w|
|00000a00| 68 65 6e 20 69 6e 74 65 | 72 72 75 70 74 65 64 0d |hen inte|rrupted.|
|00000a10| 02 c6 39 f4 20 2b 31 32 | 3a 20 31 34 20 72 65 67 |..9. +12|: 14 reg|
|00000a20| 69 73 74 65 72 20 64 75 | 6d 70 20 6f 66 20 72 65 |ister du|mp of re|
|00000a30| 67 69 73 74 65 72 73 20 | 77 68 65 6e 20 69 6e 74 |gisters |when int|
|00000a40| 65 72 72 75 70 74 65 64 | 0d 02 d0 2d f4 20 2b 36 |errupted|...-. +6|
|00000a50| 38 3a 20 68 61 6e 64 6c | 65 20 6f 66 20 72 65 6e |8: handl|e of ren|
|00000a60| 64 65 72 65 72 27 73 20 | 74 68 72 65 61 64 27 73 |derer's |thread's|
|00000a70| 20 68 65 61 70 0d 02 da | 30 f4 20 2b 37 34 3a 20 | heap...|0. +74: |
|00000a80| 68 61 6e 64 6c 65 20 6f | 66 20 66 69 6c 65 20 72 |handle o|f file r|
|00000a90| 65 6e 64 65 72 65 72 20 | 77 61 73 20 72 65 6e 64 |enderer |was rend|
|00000aa0| 65 72 69 6e 67 0d 02 e4 | 31 f4 20 2b 37 38 3a 20 |ering...|1. +78: |
|00000ab0| 36 34 20 62 79 74 65 20 | 68 65 61 70 20 70 61 73 |64 byte |heap pas|
|00000ac0| 73 65 64 20 74 6f 20 72 | 65 6e 64 65 72 65 72 20 |sed to r|enderer |
|00000ad0| 69 6e 20 52 31 33 0d 02 | ee 29 f4 20 2b 31 34 32 |in R13..|.). +142|
|00000ae0| 3a 78 31 2c 79 31 2c 78 | 32 2c 79 32 20 6f 66 20 |:x1,y1,x|2,y2 of |
|00000af0| 67 72 61 70 68 69 63 73 | 20 77 69 6e 64 6f 77 0d |graphics| window.|
|00000b00| 02 f8 35 f4 20 2b 31 35 | 38 20 74 6f 20 2b 32 35 |..5. +15|8 to +25|
|00000b10| 32 3a 20 61 73 20 64 65 | 70 65 6e 64 65 6e 74 20 |2: as de|pendent |
|00000b20| 6f 6e 20 72 65 6e 64 65 | 72 65 72 20 61 6e 64 20 |on rende|rer and |
|00000b30| 64 61 74 61 0d 03 02 2d | f4 20 46 6f 72 20 65 76 |data...-|. For ev|
|00000b40| 65 72 79 74 68 69 6e 67 | 3a 20 2b 31 35 38 20 76 |erything|: +158 v|
|00000b50| 65 72 73 69 6f 6e 20 6e | 6f 20 6f 66 20 64 61 74 |ersion n|o of dat|
|00000b60| 61 0d 03 0c 12 f4 20 46 | 6f 72 20 77 69 6e 64 6f |a..... F|or windo|
|00000b70| 77 73 3a 0d 03 16 36 f4 | 20 2b 31 36 32 3a 20 69 |ws:...6.| +162: i|
|00000b80| 63 6f 6e 20 6e 6f 20 74 | 6f 20 72 65 64 72 61 77 |con no t|o redraw|
|00000b90| 2c 20 6f 72 20 3d 30 20 | 69 66 20 67 65 6e 65 72 |, or =0 |if gener|
|00000ba0| 61 6c 20 72 65 64 72 61 | 77 0d 03 20 37 f4 20 2b |al redra|w.. 7. +|
|00000bb0| 31 36 36 3a 20 69 63 6f | 6e 20 6e 6f 20 77 69 74 |166: ico|n no wit|
|00000bc0| 68 20 61 6e 69 6d 61 74 | 69 6f 6e 20 63 75 72 72 |h animat|ion curr|
|00000bd0| 65 6e 74 6c 79 20 61 70 | 70 6c 69 65 64 20 74 6f |ently ap|plied to|
|00000be0| 0d 03 2a 0d 61 64 64 72 | 25 21 30 3d 30 0d 03 34 |..*.addr|%!0=0..4|
|00000bf0| 05 3a 0d 03 3e 3d f4 20 | 4e 6f 77 20 6c 6f 61 64 |.:..>=. |Now load|
|00000c00| 20 69 6e 20 74 68 65 20 | 72 65 6e 64 65 72 65 72 | in the |renderer|
|00000c10| 20 66 6f 72 20 74 6f 72 | 6e 61 64 6f 20 77 69 6e | for tor|nado win|
|00000c20| 64 6f 77 73 20 72 65 61 | 6c 6c 79 20 61 6e 64 0d |dows rea|lly and.|
|00000c30| 03 48 24 f4 20 63 61 6c | 6c 20 69 74 20 74 68 72 |.H$. cal|l it thr|
|00000c40| 6f 75 67 68 20 69 74 73 | 20 69 6e 69 74 20 65 6e |ough its| init en|
|00000c50| 74 72 79 0d 03 52 3d f4 | 20 4c 6f 61 64 20 69 6e |try..R=.| Load in|
|00000c60| 20 22 2e 2e 2e 2e 52 65 | 6e 64 65 72 65 72 73 2e | "....Re|nderers.|
|00000c70| 54 57 69 6e 64 6f 77 2e | 52 65 6e 64 65 72 22 2c |TWindow.|Render",|
|00000c80| 20 70 61 73 73 69 6e 67 | 20 70 61 74 68 20 61 73 | passing| path as|
|00000c90| 0d 03 5c 10 f4 20 70 61 | 72 61 6d 65 74 65 72 2e |..\.. pa|rameter.|
|00000ca0| 0d 03 66 36 f4 20 4d 6f | 64 75 6c 65 20 73 74 6f |..f6. Mo|dule sto|
|00000cb0| 72 65 73 20 70 61 74 68 | 2c 20 61 6e 64 20 64 65 |res path|, and de|
|00000cc0| 63 6c 61 72 65 73 20 69 | 74 73 65 6c 66 20 69 6e |clares i|tself in|
|00000cd0| 20 2e 69 6e 69 74 0d 03 | 70 1d 72 65 6e 64 65 72 | .init..|p.render|
|00000ce0| 70 61 74 68 24 3d 22 3c | 54 44 65 6d 6f 24 44 69 |path$="<|TDemo$Di|
|00000cf0| 72 3e 22 0d 03 7a 05 3a | 0d 03 84 3f f4 20 43 61 |r>"..z.:|...?. Ca|
|00000d00| 6c 6c 20 72 65 6e 64 65 | 72 65 72 27 73 20 69 6e |ll rende|rer's in|
|00000d10| 69 74 69 61 6c 69 73 65 | 20 65 6e 74 72 79 2c 20 |itialise| entry, |
|00000d20| 70 61 73 73 69 6e 67 20 | 69 74 20 69 74 73 20 6f |passing |it its o|
|00000d30| 77 6e 20 68 65 61 70 0d | 03 8e 33 c8 99 20 22 54 |wn heap.|..3.. "T|
|00000d40| 6f 72 6e 61 64 6f 5f 47 | 65 74 62 6c 6b 22 2c 25 |ornado_G|etblk",%|
|00000d50| 31 2c 30 2c 2c 31 30 32 | 34 20 b8 20 2c 2c 61 64 |1,0,,102|4 . ,,ad|
|00000d60| 64 72 25 2c 72 68 65 61 | 70 25 0d 03 98 32 c8 99 |dr%,rhea|p%...2..|
|00000d70| 20 22 54 6f 72 6e 61 64 | 6f 5f 49 6e 69 74 68 65 | "Tornad|o_Inithe|
|00000d80| 61 70 22 2c 25 31 30 30 | 2c 61 64 64 72 25 2c 30 |ap",%100|,addr%,0|
|00000d90| 2c 31 30 32 34 2c 72 68 | 65 61 70 25 0d 03 a2 17 |,1024,rh|eap%....|
|00000da0| f2 69 6e 69 74 72 65 6e | 64 65 72 28 72 68 65 61 |.initren|der(rhea|
|00000db0| 70 25 29 0d 03 ac 3a f2 | 6c 6f 67 28 22 52 65 6e |p%)...:.|log("Ren|
|00000dc0| 64 65 72 65 72 20 69 6e | 69 74 69 61 6c 69 73 65 |derer in|itialise|
|00000dd0| 64 20 61 6e 64 20 68 65 | 61 70 20 61 6c 6c 6f 63 |d and he|ap alloc|
|00000de0| 61 74 65 64 20 66 6f 72 | 20 69 74 22 29 0d 03 b6 |ated for| it")...|
|00000df0| 05 3a 0d 03 c0 31 f4 20 | 54 65 6c 6c 20 74 68 65 |.:...1. |Tell the|
|00000e00| 20 72 65 6e 64 65 72 65 | 72 20 77 68 61 74 20 66 | rendere|r what f|
|00000e10| 6f 6e 74 73 20 77 65 20 | 77 61 6e 74 20 74 6f 20 |onts we |want to |
|00000e20| 75 73 65 0d 03 ca b6 f2 | 72 6d 69 73 63 6f 70 36 |use.....|rmiscop6|
|00000e30| 34 28 72 68 65 61 70 25 | 2c 22 48 6f 6d 65 72 74 |4(rheap%|,"Homert|
|00000e40| 6f 6e 2e 4d 65 64 69 75 | 6d 22 2c 22 48 6f 6d 65 |on.Mediu|m","Home|
|00000e50| 72 74 6f 6e 2e 4d 65 64 | 69 75 6d 2e 4f 62 6c 69 |rton.Med|ium.Obli|
|00000e60| 71 75 65 22 2c 22 48 6f | 6d 65 72 74 6f 6e 2e 42 |que","Ho|merton.B|
|00000e70| 6f 6c 64 22 2c 22 48 6f | 6d 65 72 74 6f 6e 2e 42 |old","Ho|merton.B|
|00000e80| 6f 6c 64 2e 4f 62 6c 69 | 71 75 65 22 2c 22 43 6f |old.Obli|que","Co|
|00000e90| 72 70 75 73 2e 4d 65 64 | 69 75 6d 22 2c 22 43 6f |rpus.Med|ium","Co|
|00000ea0| 72 70 75 73 2e 4d 65 64 | 69 75 6d 2e 4f 62 6c 69 |rpus.Med|ium.Obli|
|00000eb0| 71 75 65 22 2c 22 43 6f | 72 70 75 73 2e 42 6f 6c |que","Co|rpus.Bol|
|00000ec0| 64 22 2c 22 43 6f 72 70 | 75 73 2e 42 6f 6c 64 2e |d","Corp|us.Bold.|
|00000ed0| 4f 62 6c 69 71 75 65 22 | 29 0d 03 d4 05 3a 0d 03 |Oblique"|)....:..|
|00000ee0| de 43 f4 20 43 72 65 61 | 74 65 20 61 20 63 61 63 |.C. Crea|te a cac|
|00000ef0| 68 65 20 28 77 6f 75 6c | 64 20 62 65 20 54 4c 69 |he (woul|d be TLi|
|00000f00| 62 20 72 65 61 6c 6c 79 | 29 20 74 6f 20 6b 65 65 |b really|) to kee|
|00000f10| 70 20 61 20 71 75 69 63 | 6b 20 74 6f 20 66 69 6e |p a quic|k to fin|
|00000f20| 64 0d 03 e8 35 f4 20 6c | 69 73 74 20 6f 66 20 77 |d...5. l|ist of w|
|00000f30| 69 6d 70 20 77 69 6e 64 | 6f 77 20 61 73 73 69 67 |imp wind|ow assig|
|00000f40| 6e 6d 65 6e 74 73 20 74 | 6f 20 74 6f 72 6e 61 64 |nments t|o tornad|
|00000f50| 6f 20 6f 6e 65 73 0d 03 | f2 1d 77 69 6e 63 61 63 |o ones..|..wincac|
|00000f60| 68 65 25 3d a4 63 72 65 | 61 74 65 6c 69 73 74 28 |he%=.cre|atelist(|
|00000f70| 31 32 29 0d 03 fc 20 f2 | 6c 6f 67 28 22 43 72 65 |12)... .|log("Cre|
|00000f80| 61 74 65 64 20 77 69 6e | 64 6f 77 20 63 61 63 68 |ated win|dow cach|
|00000f90| 65 22 29 0d 04 06 05 3a | 0d 04 10 24 f4 20 52 69 |e")....:|...$. Ri|
|00000fa0| 67 68 74 2c 20 6e 6f 77 | 20 77 65 20 63 72 65 61 |ght, now| we crea|
|00000fb0| 74 65 20 61 20 77 69 6e | 64 6f 77 21 0d 04 1a 0a |te a win|dow!....|
|00000fc0| 74 77 25 3d 71 25 0d 04 | 24 2e 74 77 25 21 30 3d |tw%=q%..|$.tw%!0=|
|00000fd0| 31 30 30 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |100     |        |
|00000fe0| 20 20 20 20 20 20 20 20 | 3a f4 20 76 69 73 20 6d |        |:. vis m|
|00000ff0| 69 6e 20 78 0d 04 2e 2e | 74 77 25 21 34 3d 31 30 |in x....|tw%!4=10|
|00001000| 30 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |0       |        |
|00001010| 20 20 20 20 20 20 3a f4 | 20 76 69 73 20 6d 69 6e |      :.| vis min|
|00001020| 20 79 0d 04 38 2e 74 77 | 25 21 38 3d 33 30 30 20 | y..8.tw|%!8=300 |
|00001030| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00001040| 20 20 20 20 3a f4 20 76 | 69 73 20 6d 61 78 20 78 |    :. v|is max x|
|00001050| 0d 04 42 2e 74 77 25 21 | 31 32 3d 39 30 30 20 20 |..B.tw%!|12=900  |
|00001060| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00001070| 20 20 3a f4 20 76 69 73 | 20 6d 61 78 20 79 0d 04 |  :. vis| max y..|
|00001080| 4c 2d 74 77 25 21 31 36 | 3d 33 30 30 20 20 20 20 |L-tw%!16|=300    |
|00001090| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000010a0| 3a f4 20 73 63 72 6f 6c | 6c 20 78 0d 04 56 2d 74 |:. scrol|l x..V-t|
|000010b0| 77 25 21 32 30 3d 30 20 | 20 20 20 20 20 20 20 20 |w%!20=0 |        |
|000010c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 3a f4 20 |        |     :. |
|000010d0| 73 63 72 6f 6c 6c 20 79 | 0d 04 60 2e 74 77 25 21 |scroll y|..`.tw%!|
|000010e0| 32 34 3d 30 20 20 20 20 | 20 20 20 20 20 20 20 20 |24=0    |        |
|000010f0| 20 20 20 20 20 20 20 20 | 20 20 3a f4 20 57 69 6e |        |  :. Win|
|00001100| 20 64 65 70 74 68 0d 04 | 6a 2f 74 77 25 21 32 38 | depth..|j/tw%!28|
|00001110| 3d 30 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |=0      |        |
|00001120| 20 20 20 20 20 20 20 20 | 3a f4 20 4d 69 73 63 20 |        |:. Misc |
|00001130| 66 6c 61 67 73 0d 04 74 | 1e f4 20 62 69 74 20 31 |flags..t|.. bit 1|
|00001140| 34 3a 20 63 61 6e 20 62 | 65 20 6f 66 66 73 63 72 |4: can b|e offscr|
|00001150| 65 65 6e 0d 04 7e 29 f4 | 20 62 69 74 20 31 35 3a |een..~).| bit 15:|
|00001160| 20 74 68 69 73 20 77 69 | 6e 64 6f 77 20 69 73 20 | this wi|ndow is |
|00001170| 61 74 20 66 75 6c 6c 20 | 73 69 7a 65 0d 04 88 32 |at full |size...2|
|00001180| f4 20 62 69 74 20 33 30 | 3a 20 64 6f 20 6e 6f 74 |. bit 30|: do not|
|00001190| 20 63 61 6c 6c 20 72 65 | 6e 64 65 72 65 72 20 66 | call re|nderer f|
|000011a0| 6f 72 20 74 68 69 73 20 | 77 69 6e 64 6f 77 0d 04 |or this |window..|
|000011b0| 92 28 f4 20 51 75 61 6c | 69 74 69 65 73 20 66 6f |.(. Qual|ities fo|
|000011c0| 72 20 77 69 6e 64 6f 77 | 20 6f 75 74 73 69 64 65 |r window| outside|
|000011d0| 20 28 2b 33 32 29 0d 04 | 9c 0c 74 77 25 21 33 32 | (+32)..|..tw%!32|
|000011e0| 3d 30 0d 04 a6 70 f2 71 | 75 61 6c 69 74 69 65 73 |=0...p.q|ualities|
|000011f0| 28 74 77 25 21 33 32 2c | 22 42 43 49 54 5b 62 43 |(tw%!32,|"BCIT[bC|
|00001200| 30 43 30 43 30 3b 78 22 | 22 41 22 2b bd 26 37 46 |0C0C0;x"|"A"+.&7F|
|00001210| 2b 22 2f 20 22 2b bd 26 | 37 46 2b 22 43 30 30 30 |+"/ "+.&|7F+"C000|
|00001220| 30 46 46 74 6f 72 6e 61 | 64 6f 22 2b bd 26 37 46 |0FFtorna|do"+.&7F|
|00001230| 2b 22 43 30 30 30 30 30 | 30 20 22 2b bd 26 37 46 |+"C00000|0 "+.&7F|
|00001240| 2b 22 2f 77 69 6e 64 6f | 77 22 22 5d 4f 59 58 41 |+"/windo|w""]OYXA|
|00001250| 22 29 0d 04 b0 1d f4 20 | 51 75 61 6c 69 74 69 65 |")..... |Qualitie|
|00001260| 73 20 66 6f 72 20 77 6f | 72 6b 20 61 72 65 61 0d |s for wo|rk area.|
|00001270| 04 ba 0c 74 77 25 21 33 | 36 3d 30 0d 04 c4 20 f2 |...tw%!3|6=0... .|
|00001280| 71 75 61 6c 69 74 69 65 | 73 28 74 77 25 21 33 36 |qualitie|s(tw%!36|
|00001290| 2c 22 62 45 30 45 30 45 | 30 22 29 0d 04 ce 40 74 |,"bE0E0E|0")...@t|
|000012a0| 77 25 21 34 30 3d 30 20 | 20 20 20 20 20 20 20 20 |w%!40=0 |        |
|000012b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 3a f4 20 |        |     :. |
|000012c0| 4e 6f 2e 20 6f 66 20 69 | 63 6f 6e 73 20 69 6e 20 |No. of i|cons in |
|000012d0| 74 68 69 73 20 77 69 6e | 64 6f 77 0d 04 d8 39 74 |this win|dow...9t|
|000012e0| 77 25 21 34 34 3d 30 20 | 20 20 20 20 20 20 20 20 |w%!44=0 |        |
|000012f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 3a f4 20 |        |     :. |
|00001300| 48 61 6e 64 6c 65 20 6f | 66 20 66 69 72 73 74 20 |Handle o|f first |
|00001310| 69 63 6f 6e 0d 04 e2 2f | 74 77 25 21 34 38 3d 38 |icon.../|tw%!48=8|
|00001320| 30 30 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |00      |        |
|00001330| 20 20 20 20 20 20 3a f4 | 20 61 72 65 61 20 77 69 |      :.| area wi|
|00001340| 64 74 68 0d 04 ec 30 74 | 77 25 21 35 32 3d 38 30 |dth...0t|w%!52=80|
|00001350| 30 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |0       |        |
|00001360| 20 20 20 20 20 3a f4 20 | 61 72 65 61 20 68 65 69 |     :. |area hei|
|00001370| 67 68 74 0d 04 f6 2d 74 | 77 25 21 35 36 3d 30 20 |ght...-t|w%!56=0 |
|00001380| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00001390| 20 20 20 20 20 3a f4 20 | 52 65 73 65 72 76 65 64 |     :. |Reserved|
|000013a0| 0d 05 00 2b 74 77 25 21 | 36 30 3d 30 20 20 20 20 |...+tw%!|60=0    |
|000013b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000013c0| 20 20 3a f4 20 55 6e 75 | 73 65 64 0d 05 0a 29 f4 |  :. Unu|sed...).|
|000013d0| 20 4e 6f 74 65 20 2b 36 | 30 20 2b 20 69 73 20 75 | Note +6|0 + is u|
|000013e0| 73 65 64 20 74 6f 20 68 | 6f 6c 64 20 61 20 63 61 |sed to h|old a ca|
|000013f0| 63 68 65 3a 0d 05 14 2d | f4 20 2b 36 30 3a 20 77 |che:...-|. +60: w|
|00001400| 69 6d 70 20 68 61 6e 64 | 6c 65 2c 20 6f 72 20 30 |imp hand|le, or 0|
|00001410| 20 66 6f 72 20 6e 6f 74 | 20 6f 70 65 6e 20 6e 6f | for not| open no|
|00001420| 77 0d 05 1e 05 3a 0d 05 | 28 42 f4 20 2b 33 32 20 |w....:..|(B. +32 |
|00001430| 69 73 20 73 70 65 63 69 | 61 6c 20 69 6e 20 74 68 |is speci|al in th|
|00001440| 61 74 20 69 74 20 63 61 | 6e 20 73 70 65 63 69 66 |at it ca|n specif|
|00001450| 79 20 71 75 61 6c 69 74 | 69 65 73 20 66 6f 72 20 |y qualit|ies for |
|00001460| 6d 75 6c 74 69 70 6c 65 | 0d 05 32 33 f4 20 6f 62 |multiple|..23. ob|
|00001470| 6a 65 63 74 73 20 2d 20 | 69 6e 64 65 65 64 20 74 |jects - |indeed t|
|00001480| 68 65 20 65 6e 74 69 72 | 65 20 77 69 6e 64 6f 77 |he entir|e window|
|00001490| 20 66 75 72 6e 69 74 75 | 72 65 2e 0d 05 3c 43 f4 | furnitu|re...<C.|
|000014a0| 20 54 68 65 20 71 75 61 | 6c 69 74 69 65 73 20 61 | The qua|lities a|
|000014b0| 72 65 20 61 73 73 69 67 | 6e 65 64 20 74 6f 20 65 |re assig|ned to e|
|000014c0| 61 63 68 20 70 61 72 74 | 20 6f 66 20 74 68 65 20 |ach part| of the |
|000014d0| 77 69 6e 64 6f 77 20 6f | 75 74 73 69 64 65 0d 05 |window o|utside..|
|000014e0| 46 42 f4 20 62 79 20 73 | 70 65 63 69 66 79 69 6e |FB. by s|pecifyin|
|000014f0| 67 20 74 68 65 20 70 61 | 72 74 20 61 6e 64 20 74 |g the pa|rt and t|
|00001500| 68 65 20 71 75 61 6c 69 | 74 69 65 73 20 61 73 73 |he quali|ties ass|
|00001510| 6f 63 69 61 74 65 64 20 | 77 69 74 68 20 69 74 2e |ociated |with it.|
|00001520| 0d 05 50 3a f4 20 54 68 | 69 73 20 69 73 20 64 6f |..P:. Th|is is do|
|00001530| 6e 65 20 62 79 20 75 73 | 69 6e 67 20 74 68 65 20 |ne by us|ing the |
|00001540| 66 6f 6c 6c 6f 77 69 6e | 67 20 70 61 72 74 20 64 |followin|g part d|
|00001550| 65 73 63 69 70 74 6f 72 | 73 3a 0d 05 5a 12 f4 20 |esciptor|s:..Z.. |
|00001560| 42 3a 20 42 61 63 6b 20 | 69 63 6f 6e 0d 05 64 13 |B: Back |icon..d.|
|00001570| f4 20 43 3a 20 43 6c 6f | 73 65 20 69 63 6f 6e 0d |. C: Clo|se icon.|
|00001580| 05 6e 15 f4 20 49 3a 20 | 49 63 6f 6e 69 73 65 20 |.n.. I: |Iconise |
|00001590| 69 63 6f 6e 0d 05 78 12 | f4 20 54 3a 20 54 69 74 |icon..x.|. T: Tit|
|000015a0| 6c 65 20 62 61 72 0d 05 | 82 20 f4 20 4f 3a 20 54 |le bar..|. . O: T|
|000015b0| 6f 67 67 6c 65 20 69 63 | 6f 6e 20 20 20 20 20 20 |oggle ic|on      |
|000015c0| 20 20 20 20 20 5f 0d 05 | 8c 21 f4 20 55 3a 20 55 |     _..|.!. U: U|
|000015d0| 70 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |p       |        |
|000015e0| 20 20 20 20 20 20 5c 0d | 05 96 42 f4 20 59 3a 20 |      \.|..B. Y: |
|000015f0| 56 65 72 74 69 63 61 6c | 20 77 65 6c 6c 20 20 20 |Vertical| well   |
|00001600| 20 20 20 20 20 20 20 20 | 7c 20 53 70 65 63 69 66 |        || Specif|
|00001610| 79 69 6e 67 20 59 20 61 | 73 73 75 6d 65 73 20 61 |ying Y a|ssumes a|
|00001620| 6c 6c 20 6f 74 68 65 72 | 73 0d 05 a0 2b f4 20 56 |ll other|s...+. V|
|00001630| 3a 20 56 65 72 74 69 63 | 61 6c 20 73 63 72 6f 6c |: Vertic|al scrol|
|00001640| 6c 20 62 61 72 20 20 20 | 20 20 7c 20 65 6e 63 6c |l bar   |  | encl|
|00001650| 6f 73 65 64 0d 05 aa 21 | f4 20 44 3a 20 44 6f 77 |osed...!|. D: Dow|
|00001660| 6e 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |n       |        |
|00001670| 20 20 20 5f 2f 0d 05 b4 | 21 f4 20 4c 3a 20 4c 65 |   _/...|!. L: Le|
|00001680| 66 74 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |ft      |        |
|00001690| 20 20 20 20 20 5c 0d 05 | be 42 f4 20 58 3a 20 48 |     \..|.B. X: H|
|000016a0| 6f 72 69 7a 6f 6e 74 61 | 6c 20 77 65 6c 6c 20 20 |orizonta|l well  |
|000016b0| 20 20 20 20 20 20 20 7c | 20 53 70 65 63 69 66 79 |       || Specify|
|000016c0| 69 6e 67 20 58 20 61 73 | 73 75 6d 65 73 20 61 6c |ing X as|sumes al|
|000016d0| 6c 20 6f 74 68 65 72 73 | 0d 05 c8 2b f4 20 48 3a |l others|...+. H:|
|000016e0| 20 48 6f 72 69 7a 6f 6e | 74 61 6c 20 73 63 72 6f | Horizon|tal scro|
|000016f0| 6c 6c 20 62 61 72 20 20 | 20 7c 20 65 6e 63 6c 6f |ll bar  | | enclo|
|00001700| 73 65 64 0d 05 d2 22 f4 | 20 52 3a 20 52 69 67 68 |sed...".| R: Righ|
|00001710| 74 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |t       |        |
|00001720| 20 20 5f 2f 20 0d 05 dc | 14 f4 20 41 3a 20 41 64 |  _/ ...|.. A: Ad|
|00001730| 6a 75 73 74 20 69 63 6f | 6e 0d 05 e6 43 f4 20 45 |just ico|n...C. E|
|00001740| 61 63 68 20 70 61 72 74 | 20 64 65 73 63 72 69 70 |ach part| descrip|
|00001750| 74 6f 72 20 68 61 73 20 | 71 75 61 6c 69 74 69 65 |tor has |qualitie|
|00001760| 73 20 61 73 73 69 67 6e | 65 64 20 74 6f 20 69 74 |s assign|ed to it|
|00001770| 20 69 6e 20 5b 2e 2e 5d | 20 65 67 3b 0d 05 f0 30 | in [..]| eg;...0|
|00001780| f4 20 54 5b 78 22 3c 26 | 37 46 3e 2d 48 65 6c 6c |. T[x"<&|7F>-Hell|
|00001790| 6f 20 3c 26 37 46 3e 43 | 30 30 30 30 46 46 3c 26 |o <&7F>C|0000FF<&|
|000017a0| 37 46 3e 2a 4e 69 61 6c | 6c 21 22 5d 0d 05 fa 42 |7F>*Nial|l!"]...B|
|000017b0| f4 20 77 6f 75 6c 64 20 | 73 68 6f 77 20 48 65 6c |. would |show Hel|
|000017c0| 6c 6f 20 2a 4e 69 61 6c | 6c 2a 20 77 69 74 68 20 |lo *Nial|l* with |
|000017d0| 74 68 65 20 4e 69 61 6c | 6c 20 72 65 64 20 26 20 |the Nial|l red & |
|000017e0| 63 65 6e 74 72 65 64 20 | 69 6e 20 74 68 65 0d 06 |centred |in the..|
|000017f0| 04 3f f4 20 74 69 74 6c | 65 20 62 61 72 2e 20 4a |.?. titl|e bar. J|
|00001800| 75 73 74 20 73 70 65 63 | 69 66 79 69 6e 67 20 74 |ust spec|ifying t|
|00001810| 68 65 20 70 61 72 74 20 | 77 69 74 68 6f 75 74 20 |he part |without |
|00001820| 61 6e 79 20 5b 2e 2e 5d | 20 77 69 6c 6c 0d 06 0e |any [..]| will...|
|00001830| 39 f4 20 6c 69 6e 6b 20 | 69 74 20 74 6f 20 74 68 |9. link |it to th|
|00001840| 65 20 73 74 61 6e 64 61 | 72 64 20 6f 70 65 72 61 |e standa|rd opera|
|00001850| 74 69 6e 67 20 73 79 73 | 74 65 6d 20 66 75 6e 63 |ting sys|tem func|
|00001860| 74 69 6f 6e 73 2e 0d 06 | 18 05 3a 0d 06 22 41 f4 |tions...|..:.."A.|
|00001870| 20 51 75 61 6c 69 74 69 | 65 73 20 61 72 65 20 61 | Qualiti|es are a|
|00001880| 20 73 74 72 69 6e 67 20 | 6f 66 20 71 75 61 6c 69 | string |of quali|
|00001890| 74 69 65 73 20 73 6f 6d | 65 74 68 69 6e 67 20 68 |ties som|ething h|
|000018a0| 61 73 2e 20 54 68 65 79 | 20 61 72 65 0d 06 2c 3a |as. They| are..,:|
|000018b0| f4 20 68 65 6c 64 20 69 | 6e 20 61 20 72 65 6c 6f |. held i|n a relo|
|000018c0| 63 20 62 6c 6f 63 6b 20 | 69 6e 20 61 20 74 61 73 |c block |in a tas|
|000018d0| 6b 27 73 20 68 65 61 70 | 2c 20 61 6e 64 20 61 72 |k's heap|, and ar|
|000018e0| 65 20 75 73 65 64 0d 06 | 36 20 f4 20 76 65 72 62 |e used..|6 . verb|
|000018f0| 61 74 69 6d 20 61 73 20 | 70 61 73 73 65 64 2e 20 |atim as |passed. |
|00001900| 44 65 66 6e 73 3a 0d 06 | 40 2d f4 20 62 42 42 47 |Defns:..|@-. bBBG|
|00001910| 47 52 52 3a 20 73 65 74 | 20 62 61 63 6b 67 72 6f |GRR: set| backgro|
|00001920| 75 6e 64 20 28 6e 6f 74 | 20 74 69 74 6c 65 20 62 |und (not| title b|
|00001930| 61 72 29 0d 06 4a 33 f4 | 20 74 58 58 3a 20 74 69 |ar)..J3.| tXX: ti|
|00001940| 6c 65 20 74 68 69 73 20 | 77 69 74 68 20 74 69 6c |le this |with til|
|00001950| 69 6e 67 20 26 58 58 20 | 2d 20 30 30 3d 6e 6f 20 |ing &XX |- 00=no |
|00001960| 74 69 6c 69 6e 67 0d 06 | 54 44 f4 20 66 30 3c 6e |tiling..|TD. f0<n|
|00001970| 61 6d 65 3e 3a 20 46 75 | 6e 63 74 69 6f 6e 20 74 |ame>: Fu|nction t|
|00001980| 6f 20 63 61 6c 6c 20 77 | 68 65 6e 20 77 69 6e 64 |o call w|hen wind|
|00001990| 6f 77 20 69 73 20 6f 70 | 65 6e 20 28 6f 6e 6c 79 |ow is op|en (only|
|000019a0| 20 77 6f 72 6b 73 20 66 | 6f 72 0d 06 5e 1a f4 20 | works f|or..^.. |
|000019b0| 20 20 20 20 20 20 20 20 | 20 20 77 6f 72 6b 20 61 |        |  work a|
|000019c0| 72 65 61 29 0d 06 68 33 | f4 20 66 31 3c 6e 61 6d |rea)..h3|. f1<nam|
|000019d0| 65 3e 3a 20 46 75 6e 63 | 74 69 6f 6e 20 74 6f 20 |e>: Func|tion to |
|000019e0| 63 61 6c 6c 20 77 68 65 | 6e 20 70 74 72 20 6f 76 |call whe|n ptr ov|
|000019f0| 65 72 20 74 68 69 73 0d | 06 72 38 f4 20 66 32 3c |er this.|.r8. f2<|
|00001a00| 6e 61 6d 65 3e 3a 20 46 | 75 6e 63 74 69 6f 6e 20 |name>: F|unction |
|00001a10| 74 6f 20 63 61 6c 6c 20 | 77 68 65 6e 20 70 74 72 |to call |when ptr|
|00001a20| 20 63 6c 69 63 6b 73 20 | 6f 6e 20 74 68 69 73 0d | clicks |on this.|
|00001a30| 06 7c 32 f4 20 66 38 3c | 6e 61 6d 65 3e 3a 20 46 |.|2. f8<|name>: F|
|00001a40| 75 6e 63 74 69 6f 6e 20 | 74 6f 20 63 61 6c 6c 20 |unction |to call |
|00001a50| 77 68 65 6e 20 74 68 69 | 73 20 61 6c 74 65 72 65 |when thi|s altere|
|00001a60| 64 0d 06 86 35 f4 20 66 | 39 3c 6e 61 6d 65 3e 3a |d...5. f|9<name>:|
|00001a70| 20 46 75 6e 63 74 69 6f | 6e 20 74 6f 20 63 61 6c | Functio|n to cal|
|00001a80| 6c 20 61 66 74 65 72 20 | 72 65 6e 64 65 72 69 6e |l after |renderin|
|00001a90| 67 20 74 68 69 73 0d 06 | 90 3b f4 20 6f 58 58 3a |g this..|.;. oXX:|
|00001aa0| 20 62 6f 72 64 65 72 20 | 74 68 69 73 20 77 69 74 | border |this wit|
|00001ab0| 68 20 62 6f 72 64 65 72 | 20 73 74 79 6c 65 20 26 |h border| style &|
|00001ac0| 58 58 20 2d 20 30 30 3d | 6e 6f 20 62 6f 72 64 65 |XX - 00=|no borde|
|00001ad0| 72 0d 06 9a 42 f4 20 78 | 3c 73 74 72 69 6e 67 20 |r...B. x|<string |
|00001ae0| 6f 72 20 3c 26 37 46 3e | 50 3c 68 61 6e 64 6c 65 |or <&7F>|P<handle|
|00001af0| 3e 3e 3a 20 44 69 73 70 | 6c 61 79 20 74 68 65 20 |>>: Disp|lay the |
|00001b00| 73 74 72 69 6e 67 20 6f | 72 20 74 65 78 74 20 68 |string o|r text h|
|00001b10| 65 6c 64 0d 06 a4 26 f4 | 20 69 6e 20 74 68 65 20 |eld...&.| in the |
|00001b20| 62 6c 6f 63 6b 20 73 74 | 6f 72 65 64 20 61 74 20 |block st|ored at |
|00001b30| 3c 68 61 6e 64 6c 65 3e | 3a 0d 06 ae 20 f4 20 20 |<handle>|:... .  |
|00001b40| 20 20 20 20 20 3c 26 37 | 46 3e 2a 20 3a 20 74 6f |     <&7|F>* : to|
|00001b50| 67 67 6c 65 20 62 6f 6c | 64 0d 06 b8 25 f4 20 20 |ggle bol|d...%.  |
|00001b60| 20 20 20 20 20 3c 26 37 | 46 3e 5f 20 3a 20 74 6f |     <&7|F>_ : to|
|00001b70| 67 67 6c 65 20 75 6e 64 | 65 72 6c 69 6e 65 0d 06 |ggle und|erline..|
|00001b80| c2 22 f4 20 20 20 20 20 | 20 20 3c 26 37 46 3e 2f |.".     |  <&7F>/|
|00001b90| 20 3a 20 74 6f 67 67 6c | 65 20 69 74 61 6c 69 63 | : toggl|e italic|
|00001ba0| 0d 06 cc 22 f4 20 20 20 | 20 20 20 20 3c 26 37 46 |...".   |    <&7F|
|00001bb0| 3e 3c 20 3a 20 41 6c 69 | 67 6e 20 74 6f 20 6c 65 |>< : Ali|gn to le|
|00001bc0| 66 74 0d 06 d6 23 f4 20 | 20 20 20 20 20 20 3c 26 |ft...#. |      <&|
|00001bd0| 37 46 3e 3e 20 3a 20 41 | 6c 69 67 6e 20 74 6f 20 |7F>> : A|lign to |
|00001be0| 72 69 67 68 74 0d 06 e0 | 20 f4 20 20 20 20 20 20 |right...| .      |
|00001bf0| 20 3c 26 37 46 3e 2d 20 | 3a 20 43 65 6e 74 72 65 | <&7F>- |: Centre|
|00001c00| 20 74 65 78 74 0d 06 ea | 2f f4 20 20 20 20 20 20 | text...|/.      |
|00001c10| 20 3c 26 37 46 3e 5c 20 | 3a 20 43 65 6e 74 72 65 | <&7F>\ |: Centre|
|00001c20| 20 74 65 78 74 20 6f 72 | 20 61 6c 69 67 6e 20 72 | text or| align r|
|00001c30| 69 67 68 74 0d 06 f4 23 | f4 20 20 20 20 20 20 20 |ight...#|.       |
|00001c40| 3c 26 37 46 3e 23 20 3a | 20 74 6f 67 67 6c 65 20 |<&7F># :| toggle |
|00001c50| 69 6e 76 65 72 73 65 0d | 06 fe 24 f4 20 20 20 20 |inverse.|..$.    |
|00001c60| 20 20 20 3c 26 37 46 3e | 4d 20 3a 20 74 6f 67 67 |   <&7F>|M : togg|
|00001c70| 6c 65 20 6d 6f 6e 6f 74 | 79 70 65 0d 07 08 35 f4 |le monot|ype...5.|
|00001c80| 20 20 20 20 20 20 20 3c | 26 37 46 3e 43 3c 42 42 |       <|&7F>C<BB|
|00001c90| 47 47 52 52 3e 20 3a 20 | 63 68 61 6e 67 65 20 63 |GGRR> : |change c|
|00001ca0| 6f 6c 6f 75 72 20 74 6f | 20 26 42 42 47 47 52 52 |olour to| &BBGGRR|
|00001cb0| 0d 07 12 21 f4 20 20 20 | 20 20 20 20 3c 26 37 46 |...!.   |    <&7F|
|00001cc0| 3e 22 20 3a 20 69 6e 73 | 65 72 74 20 61 20 27 22 |>" : ins|ert a '"|
|00001cd0| 27 0d 07 1c 10 f4 20 4d | 4f 52 45 20 48 45 52 45 |'..... M|ORE HERE|
|00001ce0| 21 0d 07 26 05 f4 0d 07 | 30 0f f4 20 57 6f 72 6b |!..&....|0.. Work|
|00001cf0| 20 61 72 65 61 0d 07 3a | 16 f4 20 74 77 25 21 37 | area..:|.. tw%!7|
|00001d00| 32 3d 26 45 30 45 30 45 | 30 30 30 0d 07 44 0f f4 |2=&E0E0E|000..D..|
|00001d10| 20 54 69 74 6c 65 20 62 | 61 72 0d 07 4e 17 f4 20 | Title b|ar..N.. |
|00001d20| 74 77 25 21 31 33 36 3d | 26 43 30 43 30 43 30 30 |tw%!136=|&C0C0C00|
|00001d30| 30 0d 07 58 18 f4 20 53 | 65 6c 65 63 74 65 64 3d |0..X.. S|elected=|
|00001d40| 26 42 39 45 30 45 30 30 | 30 0d 07 62 05 f4 0d 07 |&B9E0E00|0..b....|
|00001d50| 6c 19 77 68 61 6e 64 25 | 3d a4 63 72 65 61 74 65 |l.whand%|=.create|
|00001d60| 77 69 6e 28 71 25 29 0d | 07 76 35 f2 6c 6f 67 28 |win(q%).|.v5.log(|
|00001d70| 22 43 72 65 61 74 65 64 | 20 61 20 74 6f 72 6e 61 |"Created| a torna|
|00001d80| 64 6f 20 77 69 6e 64 6f | 77 2c 20 68 61 6e 64 6c |do windo|w, handl|
|00001d90| 65 20 22 2b c3 77 68 61 | 6e 64 25 29 0d 07 80 0f |e "+.wha|nd%)....|
|00001da0| f2 6d 6f 64 65 63 68 61 | 6e 67 65 0d 07 8a 05 3a |.modecha|nge....:|
|00001db0| 0d 07 94 14 f2 6f 70 65 | 6e 77 69 6e 28 77 68 61 |.....ope|nwin(wha|
|00001dc0| 6e 64 25 29 0d 07 9e 1b | 6d 78 25 3d 30 3a 6d 79 |nd%)....|mx%=0:my|
|00001dd0| 25 3d 30 3a 6d 62 25 3d | 30 3a 6d 77 25 3d 30 0d |%=0:mb%=|0:mw%=0.|
|00001de0| 07 a8 16 6e 6f 72 65 64 | 72 61 77 73 25 3d a3 3a |...nored|raws%=.:|
|00001df0| 6f 70 25 3d 30 0d 07 b2 | 0c e7 20 a4 6d 6f 75 73 |op%=0...|.. .mous|
|00001e00| 65 0d 07 bc 05 f5 0d 07 | c6 0e f2 64 6f 74 68 72 |e.......|...dothr|
|00001e10| 65 61 64 73 0d 07 d0 0e | e7 20 a4 70 6f 6c 6c 28 |eads....|. .poll(|
|00001e20| 30 29 0d 07 da 06 fd 30 | 0d 07 e4 05 e0 0d 07 ee |0).....0|........|
|00001e30| 05 3a 0d 07 f8 12 dd 20 | a4 70 6f 6c 6c 28 74 79 |.:..... |.poll(ty|
|00001e40| 70 65 25 29 0d 08 02 0f | ea 20 63 6c 65 61 72 25 |pe%)....|. clear%|
|00001e50| 2c 4e 25 0d 08 0c 0c 63 | 6c 65 61 72 25 3d a3 0d |,N%....c|lear%=..|
|00001e60| 08 16 1c c8 99 20 22 57 | 69 6d 70 5f 50 6f 6c 6c |..... "W|imp_Poll|
|00001e70| 22 2c 30 2c 71 25 20 b8 | 20 4e 25 0d 08 20 0b c8 |",0,q% .| N%.. ..|
|00001e80| 8e 20 4e 25 20 ca 0d 08 | 2a 0e c9 20 30 3a f4 20 |. N% ...|*.. 0:. |
|00001e90| 4e 75 6c 6c 0d 08 34 1e | e7 20 74 79 70 65 25 3d |Null..4.|. type%=|
|00001ea0| 30 20 f2 6e 75 6c 6c 20 | 8b 20 63 6c 65 61 72 25 |0 .null |. clear%|
|00001eb0| 3d b9 0d 08 3e 1d c9 20 | 31 3a f4 20 57 69 6d 70 |=...>.. |1:. Wimp|
|00001ec0| 20 77 61 6e 74 73 20 61 | 20 72 65 64 72 61 77 0d | wants a| redraw.|
|00001ed0| 08 48 26 c8 99 20 22 57 | 69 6d 70 5f 52 65 64 72 |.H&.. "W|imp_Redr|
|00001ee0| 61 77 57 69 6e 64 6f 77 | 22 2c 2c 71 25 20 b8 20 |awWindow|",,q% . |
|00001ef0| 6d 6f 72 65 25 0d 08 52 | 15 74 77 69 6e 25 3d a4 |more%..R|.twin%=.|
|00001f00| 74 77 69 6e 28 71 25 21 | 30 29 0d 08 5c 0c c8 95 |twin(q%!|0)..\...|
|00001f10| 20 6d 6f 72 65 25 0d 08 | 66 05 da 0d 08 70 42 f4 | more%..|f....pB.|
|00001f20| 20 43 72 65 61 74 65 20 | 61 6e 20 61 74 74 61 63 | Create |an attac|
|00001f30| 68 65 64 20 70 72 6f 63 | 65 73 73 20 66 6f 72 20 |hed proc|ess for |
|00001f40| 65 61 63 68 20 72 65 63 | 74 61 6e 67 6c 65 20 72 |each rec|tangle r|
|00001f50| 65 74 75 72 6e 65 64 20 | 68 65 72 65 2e 0d 08 7a |eturned |here...z|
|00001f60| 35 f4 20 49 74 27 73 20 | 62 6c 6f 6f 64 79 20 69 |5. It's |bloody i|
|00001f70| 6e 65 66 66 69 63 69 65 | 6e 74 20 61 6e 64 20 73 |nefficie|nt and s|
|00001f80| 6c 6f 77 2c 20 62 75 74 | 20 69 74 20 77 6f 72 6b |low, but| it work|
|00001f90| 73 21 0d 08 84 42 f4 20 | 42 54 57 20 61 74 74 61 |s!...B. |BTW atta|
|00001fa0| 63 68 65 64 20 70 72 6f | 63 65 73 73 65 73 20 61 |ched pro|cesses a|
|00001fb0| 72 65 20 63 61 6c 6c 65 | 64 20 6a 75 73 74 20 62 |re calle|d just b|
|00001fc0| 65 66 6f 72 65 20 67 69 | 76 69 6e 67 20 63 6f 6e |efore gi|ving con|
|00001fd0| 74 72 6f 6c 0d 08 8e 42 | f4 20 61 20 74 61 73 6b |trol...B|. a task|
|00001fe0| 2e 20 49 66 20 74 68 65 | 79 20 74 61 6b 65 20 73 |. If the|y take s|
|00001ff0| 6f 20 6d 75 63 68 20 74 | 69 6d 65 20 74 68 61 74 |o much t|ime that|
|00002000| 20 74 68 65 20 74 61 73 | 6b 20 67 65 74 73 20 73 | the tas|k gets s|
|00002010| 77 61 70 70 65 64 0d 08 | 98 3d f4 20 6f 75 74 20 |wapped..|.=. out |
|00002020| 62 65 66 6f 72 65 20 74 | 68 65 79 20 61 72 65 20 |before t|hey are |
|00002030| 66 69 6e 69 73 68 65 64 | 2c 20 74 68 65 6e 20 74 |finished|, then t|
|00002040| 68 65 20 74 61 73 6b 20 | 77 69 6c 6c 20 4e 4f 54 |he task |will NOT|
|00002050| 20 62 65 0d 08 a2 24 f4 | 20 67 69 76 65 6e 20 63 | be...$.| given c|
|00002060| 6f 6e 74 72 6f 6c 20 74 | 68 69 73 20 74 69 6d 65 |ontrol t|his time|
|00002070| 20 72 6f 75 6e 64 2e 0d | 08 ac 05 3a 0d 08 b6 0b | round..|...:....|
|00002080| 77 6b 25 21 30 3d 30 0d | 08 c0 48 e7 20 6e 6f 72 |wk%!0=0.|..H. nor|
|00002090| 65 64 72 61 77 73 25 3d | a3 20 f2 6e 65 77 72 74 |edraws%=|. .newrt|
|000020a0| 68 72 65 61 64 28 74 77 | 69 6e 25 2c 25 31 2c 71 |hread(tw|in%,%1,q|
|000020b0| 25 21 32 38 2c 71 25 21 | 33 32 2c 71 25 21 33 36 |%!28,q%!|32,q%!36|
|000020c0| 2d 32 2c 71 25 21 34 30 | 2d 34 2c 77 6b 25 29 0d |-2,q%!40|-4,wk%).|
|000020d0| 08 ca 26 c8 99 20 22 57 | 69 6d 70 5f 47 65 74 52 |..&.. "W|imp_GetR|
|000020e0| 65 63 74 61 6e 67 6c 65 | 22 2c 2c 71 25 20 b8 20 |ectangle|",,q% . |
|000020f0| 6d 6f 72 65 25 0d 08 d4 | 05 ce 0d 08 de 0e c9 20 |more%...|....... |
|00002100| 32 3a f4 20 4f 70 65 6e | 0d 08 e8 36 f4 20 2a 2a |2:. Open|...6. **|
|00002110| 20 52 65 73 65 74 20 74 | 68 65 20 76 61 6c 75 65 | Reset t|he value|
|00002120| 73 20 69 6e 20 6f 75 72 | 20 63 6f 70 79 20 6f 66 |s in our| copy of|
|00002130| 20 74 68 65 20 77 69 6e | 64 6f 77 20 2a 2a 0d 08 | the win|dow **..|
|00002140| f2 1c c8 99 20 22 57 69 | 6d 70 5f 4f 70 65 6e 57 |.... "Wi|mp_OpenW|
|00002150| 69 6e 64 6f 77 22 2c 2c | 71 25 0d 08 fc 15 c9 20 |indow",,|q%..... |
|00002160| 31 31 3a f4 20 4c 6f 73 | 65 20 63 61 72 65 74 0d |11:. Los|e caret.|
|00002170| 09 06 2f f4 20 52 65 6d | 6f 76 65 20 6b 65 79 62 |../. Rem|ove keyb|
|00002180| 6f 61 72 64 20 66 6f 63 | 75 73 20 66 72 6f 6d 20 |oard foc|us from |
|00002190| 74 68 65 20 66 6f 63 75 | 73 20 6c 69 73 74 0d 09 |the focu|s list..|
|000021a0| 10 16 f4 74 77 25 21 31 | 33 36 3d 26 43 30 43 30 |...tw%!1|36=&C0C0|
|000021b0| 43 30 30 30 0d 09 1a 1f | f2 61 6c 74 65 72 74 69 |C000....|.alterti|
|000021c0| 74 6c 65 62 67 28 71 25 | 21 30 2c 26 43 30 43 30 |tlebg(q%|!0,&C0C0|
|000021d0| 43 30 29 0d 09 24 15 c9 | 20 31 32 3a f4 20 47 61 |C0)..$..| 12:. Ga|
|000021e0| 69 6e 20 63 61 72 65 74 | 0d 09 2e 26 f4 20 41 64 |in caret|...&. Ad|
|000021f0| 64 20 6b 65 79 62 6f 61 | 72 64 20 66 6f 63 75 73 |d keyboa|rd focus|
|00002200| 20 74 6f 20 66 6f 63 75 | 73 20 6c 69 73 74 0d 09 | to focu|s list..|
|00002210| 38 16 f4 74 77 25 21 31 | 33 36 3d 26 42 39 45 30 |8..tw%!1|36=&B9E0|
|00002220| 45 30 30 30 0d 09 42 1f | f2 61 6c 74 65 72 74 69 |E000..B.|.alterti|
|00002230| 74 6c 65 62 67 28 71 25 | 21 30 2c 26 42 39 45 30 |tlebg(q%|!0,&B9E0|
|00002240| 45 30 29 0d 09 4c 0b c9 | 20 31 37 2c 31 38 0d 09 |E0)..L..| 17,18..|
|00002250| 56 0e c8 8e 20 71 25 21 | 31 36 20 ca 0d 09 60 0e |V... q%!|16 ...`.|
|00002260| c9 20 30 3a f4 20 51 75 | 69 74 0d 09 6a 30 f2 6c |. 0:. Qu|it..j0.l|
|00002270| 6f 67 28 22 53 68 75 74 | 74 69 6e 67 20 64 6f 77 |og("Shut|ting dow|
|00002280| 6e 20 62 79 20 72 65 71 | 75 65 73 74 20 6f 66 20 |n by req|uest of |
|00002290| 57 69 6d 70 20 2e 2e 2e | 22 29 0d 09 74 27 f2 6c |Wimp ...|")..t'.l|
|000022a0| 6f 67 28 22 50 72 6f 67 | 72 61 6d 20 74 65 72 6d |og("Prog|ram term|
|000022b0| 69 6e 61 74 65 64 20 6e | 6f 72 6d 61 6c 6c 79 22 |inated n|ormally"|
|000022c0| 29 0d 09 7e 0d f2 73 68 | 75 74 64 6f 77 6e 0d 09 |)..~..sh|utdown..|
|000022d0| 88 19 c8 99 20 22 57 69 | 6d 70 5f 43 6c 6f 73 65 |.... "Wi|mp_Close|
|000022e0| 44 6f 77 6e 22 3a e0 0d | 09 92 11 c9 20 38 3a f4 |Down":..|.... 8:.|
|000022f0| 20 50 72 65 71 75 69 74 | 0d 09 9c 3f f4 20 41 73 | Prequit|...?. As|
|00002300| 6b 20 74 68 65 20 75 73 | 65 72 20 69 66 20 74 68 |k the us|er if th|
|00002310| 65 79 20 72 65 61 6c 6c | 79 20 77 61 6e 74 20 74 |ey reall|y want t|
|00002320| 6f 20 73 68 75 74 20 64 | 6f 77 6e 20 61 6c 6c 20 |o shut d|own all |
|00002330| 74 6f 72 6e 61 64 6f 0d | 09 a6 31 f4 20 70 72 6f |tornado.|..1. pro|
|00002340| 63 65 73 73 65 73 20 61 | 6e 64 20 74 61 73 6b 73 |cesses a|nd tasks|
|00002350| 2c 20 61 6e 64 20 64 65 | 61 63 74 69 76 61 74 65 |, and de|activate|
|00002360| 20 74 6f 72 6e 61 64 6f | 0d 09 b0 30 f4 20 49 66 | tornado|...0. If|
|00002370| 20 79 65 73 2c 20 73 68 | 75 74 20 64 6f 77 6e 20 | yes, sh|ut down |
|00002380| 61 6c 6c 20 74 61 73 6b | 73 20 61 6e 64 20 74 68 |all task|s and th|
|00002390| 65 6e 20 71 75 69 74 2e | 0d 09 ba 1a c9 20 26 34 |en quit.|..... &4|
|000023a0| 30 30 43 31 3a f4 20 4d | 6f 64 65 20 63 68 61 6e |00C1:. M|ode chan|
|000023b0| 67 65 0d 09 c4 3a f4 20 | 52 65 72 65 61 64 20 61 |ge...:. |Reread a|
|000023c0| 6e 79 20 76 61 72 69 61 | 62 6c 65 73 2f 70 61 72 |ny varia|bles/par|
|000023d0| 61 6d 65 74 65 72 73 20 | 77 65 20 6e 65 65 64 20 |ameters |we need |
|000023e0| 74 6f 20 77 68 69 63 68 | 20 61 72 65 0d 09 ce 1f |to which| are....|
|000023f0| f4 20 64 65 70 65 6e 64 | 65 6e 74 20 6f 6e 20 73 |. depend|ent on s|
|00002400| 63 72 65 65 6e 20 6d 6f | 64 65 2e 0d 09 d8 0f f2 |creen mo|de......|
|00002410| 6d 6f 64 65 63 68 61 6e | 67 65 0d 09 e2 14 f4 50 |modechan|ge.....P|
|00002420| 52 4f 43 72 65 6c 6f 61 | 64 66 6f 6e 74 73 0d 09 |ROCreloa|dfonts..|
|00002430| ec 05 cb 0d 09 f6 05 cb | 0d 0a 00 0b 3d 63 6c 65 |........|....=cle|
|00002440| 61 72 25 0d 0a 0a 05 3a | 0d 0a 14 10 dd 20 f2 64 |ar%....:|..... .d|
|00002450| 6f 74 68 72 65 61 64 73 | 0d 0a 1e 24 ea 20 61 64 |othreads|...$. ad|
|00002460| 64 72 25 2c 6c 65 6e 25 | 2c 4e 25 2c 71 25 2c 77 |dr%,len%|,N%,q%,w|
|00002470| 68 61 6e 64 25 2c 61 64 | 64 72 32 25 0d 0a 28 13 |hand%,ad|dr2%..(.|
|00002480| ea 20 6d 6f 72 65 25 2c | 78 64 25 2c 79 64 25 0d |. more%,|xd%,yd%.|
|00002490| 0a 32 3b c8 99 20 22 54 | 6f 72 6e 61 64 6f 5f 47 |.2;.. "T|ornado_G|
|000024a0| 65 74 61 64 64 72 22 2c | 2c 68 65 61 70 25 2c 30 |etaddr",|,heap%,0|
|000024b0| 2c 74 68 72 65 61 64 68 | 25 20 b8 20 2c 2c 61 64 |,threadh|% . ,,ad|
|000024c0| 64 72 32 25 2c 2c 6c 65 | 6e 25 0d 0a 3c 19 e3 20 |dr2%,,le|n%..<.. |
|000024d0| 4e 25 3d 30 20 b8 20 6c | 65 6e 25 2d 31 20 88 20 |N%=0 . l|en%-1 . |
|000024e0| 32 35 36 0d 0a 46 13 61 | 64 64 72 25 3d 61 64 64 |256..F.a|ddr%=add|
|000024f0| 72 32 25 2b 4e 25 0d 0a | 50 11 77 68 61 6e 64 25 |r2%+N%..|P.whand%|
|00002500| 3d 21 61 64 64 72 25 0d | 0a 5a 11 e7 20 77 68 61 |=!addr%.|.Z.. wha|
|00002510| 6e 64 25 3c 3e 30 20 8c | 0d 0a 64 2f c8 99 20 22 |nd%<>0 .|..d/.. "|
|00002520| 54 6f 72 6e 61 64 6f 5f | 47 65 74 61 64 64 72 22 |Tornado_|Getaddr"|
|00002530| 2c 2c 68 65 61 70 25 2c | 30 2c 77 68 61 6e 64 25 |,,heap%,|0,whand%|
|00002540| 20 b8 20 2c 2c 71 25 0d | 0a 6e 33 f4 20 4d 61 6b | . ,,q%.|.n3. Mak|
|00002550| 65 20 63 6f 6f 72 64 73 | 20 72 65 6c 61 74 69 76 |e coords| relativ|
|00002560| 65 20 74 6f 20 77 6f 72 | 6b 20 61 72 65 61 20 62 |e to wor|k area b|
|00002570| 6f 74 74 6f 6d 20 6c 65 | 66 74 0d 0a 78 3f f2 6c |ottom le|ft..x?.l|
|00002580| 6f 67 28 22 54 68 72 65 | 61 64 20 6f 6e 20 77 69 |og("Thre|ad on wi|
|00002590| 6e 64 6f 77 20 22 2b c3 | 77 68 61 6e 64 25 2b 22 |ndow "+.|whand%+"|
|000025a0| 20 61 63 74 69 76 61 74 | 65 64 21 20 70 6f 73 20 | activat|ed! pos |
|000025b0| 61 74 20 22 2b c3 4e 25 | 29 0d 0a 82 1c f4 20 52 |at "+.N%|)..... R|
|000025c0| 65 71 75 65 73 74 20 77 | 69 6d 70 20 74 6f 20 75 |equest w|imp to u|
|000025d0| 70 64 61 74 65 0d 0a 8c | 0f 71 32 25 21 30 3d 71 |pdate...|.q2%!0=q|
|000025e0| 25 21 36 30 0d 0a 96 13 | 71 32 25 21 34 3d 61 64 |%!60....|q2%!4=ad|
|000025f0| 64 72 25 21 31 34 32 0d | 0a a0 13 71 32 25 21 38 |dr%!142.|...q2%!8|
|00002600| 3d 61 64 64 72 25 21 31 | 34 36 0d 0a aa 16 71 32 |=addr%!1|46....q2|
|00002610| 25 21 31 32 3d 61 64 64 | 72 25 21 31 35 30 2b 32 |%!12=add|r%!150+2|
|00002620| 0d 0a b4 16 71 32 25 21 | 31 36 3d 61 64 64 72 25 |....q2%!|16=addr%|
|00002630| 21 31 35 34 2b 32 0d 0a | be 4c f2 6c 6f 67 28 22 |!154+2..|.L.log("|
|00002640| 20 20 20 3d 77 6b 20 61 | 72 65 61 20 63 6f 6f 72 |   =wk a|rea coor|
|00002650| 64 73 20 6f 66 20 22 2b | c3 71 32 25 21 34 2b 22 |ds of "+|.q2%!4+"|
|00002660| 2c 22 2b c3 71 32 25 21 | 38 2b 22 2c 22 2b c3 71 |,"+.q2%!|8+","+.q|
|00002670| 32 25 21 31 32 2b 22 2c | 22 2b c3 71 32 25 21 31 |2%!12+",|"+.q2%!1|
|00002680| 36 29 0d 0a c8 27 c8 99 | 20 22 57 69 6d 70 5f 55 |6)...'..| "Wimp_U|
|00002690| 70 64 61 74 65 57 69 6e | 64 6f 77 22 2c 2c 71 32 |pdateWin|dow",,q2|
|000026a0| 25 20 b8 20 6d 6f 72 65 | 25 0d 0a d2 0c c8 95 20 |% . more|%...... |
|000026b0| 6d 6f 72 65 25 0d 0a dc | 42 f2 72 65 6e 64 65 72 |more%...|B.render|
|000026c0| 28 72 68 65 61 70 25 2c | 77 68 61 6e 64 25 2c 71 |(rheap%,|whand%,q|
|000026d0| 32 25 21 32 38 2c 71 32 | 25 21 33 32 2c 71 32 25 |2%!28,q2|%!32,q2%|
|000026e0| 21 33 36 2d 32 2c 71 32 | 25 21 34 30 2c 61 64 64 |!36-2,q2|%!40,add|
|000026f0| 72 25 21 31 36 32 29 0d | 0a e6 25 ef 20 32 34 2c |r%!162).|..%. 24,|
|00002700| 71 32 25 21 32 38 3b 71 | 32 25 21 33 32 3b 71 32 |q2%!28;q|2%!32;q2|
|00002710| 25 21 33 36 3b 71 32 25 | 21 34 30 3b 0d 0a f0 1a |%!36;q2%|!40;....|
|00002720| f2 61 6e 69 6d 28 25 31 | 30 30 2c 77 68 61 6e 64 |.anim(%1|00,whand|
|00002730| 25 2c 6f 70 25 29 0d 0a | fa 27 c8 99 20 22 57 69 |%,op%)..|.'.. "Wi|
|00002740| 6d 70 5f 47 65 74 52 65 | 63 74 61 6e 67 6c 65 22 |mp_GetRe|ctangle"|
|00002750| 2c 2c 71 32 25 20 b8 20 | 6d 6f 72 65 25 0d 0b 04 |,,q2% . |more%...|
|00002760| 05 ce 0d 0b 0e 1d 21 61 | 64 64 72 25 3d 30 3a f4 |......!a|ddr%=0:.|
|00002770| 20 54 68 72 65 61 64 20 | 27 65 6e 64 65 64 27 0d | Thread |'ended'.|
|00002780| 0b 18 14 f4 20 52 65 74 | 75 72 6e 20 74 6f 20 77 |.... Ret|urn to w|
|00002790| 69 6d 70 0d 0b 22 0c f4 | 45 4e 44 50 52 4f 43 0d |imp.."..|ENDPROC.|
|000027a0| 0b 2c 05 cd 0d 0b 36 05 | ed 0d 0b 40 05 e1 0d 0b |.,....6.|...@....|
|000027b0| 4a 05 3a 0d 0b 54 1f dd | 20 f2 61 6c 74 65 72 74 |J.:..T..| .altert|
|000027c0| 69 74 6c 65 62 67 28 77 | 69 6d 70 68 25 2c 62 67 |itlebg(w|imph%,bg|
|000027d0| 25 29 0d 0b 5e 16 ea 20 | 71 25 2c 6f 71 75 61 6c |%)..^.. |q%,oqual|
|000027e0| 25 2c 62 67 24 2c 61 25 | 0d 0b 68 18 77 68 61 6e |%,bg$,a%|..h.whan|
|000027f0| 64 25 3d a4 74 77 69 6e | 28 77 69 6d 70 68 25 29 |d%=.twin|(wimph%)|
|00002800| 0d 0b 72 3e f2 6c 6f 67 | 28 22 41 6c 74 65 72 69 |..r>.log|("Alteri|
|00002810| 6e 67 20 74 69 74 6c 65 | 20 62 67 20 74 6f 20 26 |ng title| bg to &|
|00002820| 22 2b c3 7e 62 67 25 2b | 22 20 6f 6e 20 77 69 6e |"+.~bg%+|" on win|
|00002830| 64 6f 77 20 22 2b c3 77 | 68 61 6e 64 25 29 0d 0b |dow "+.w|hand%)..|
|00002840| 7c 31 c8 99 20 22 54 6f | 72 6e 61 64 6f 5f 47 65 ||1.. "To|rnado_Ge|
|00002850| 74 61 64 64 72 22 2c 25 | 30 2c 68 65 61 70 25 2c |taddr",%|0,heap%,|
|00002860| 30 2c 77 68 61 6e 64 25 | 20 b8 20 2c 2c 71 25 0d |0,whand%| . ,,q%.|
|00002870| 0b 86 17 e7 20 28 71 25 | 21 32 38 20 80 20 31 3c |.... (q%|!28 . 1<|
|00002880| 3c 33 30 29 20 e1 0d 0b | 90 10 6f 71 75 61 6c 25 |<30) ...|..oqual%|
|00002890| 3d 71 25 21 33 32 0d 0b | 9a 35 c8 99 20 22 54 6f |=q%!32..|.5.. "To|
|000028a0| 72 6e 61 64 6f 5f 47 65 | 74 61 64 64 72 22 2c 25 |rnado_Ge|taddr",%|
|000028b0| 30 2c 68 65 61 70 25 2c | 30 2c 6f 71 75 61 6c 25 |0,heap%,|0,oqual%|
|000028c0| 20 b8 20 2c 2c 6f 71 75 | 61 6c 25 0d 0b a4 1a 61 | . ,,oqu|al%....a|
|000028d0| 25 3d a4 69 6e 73 74 72 | 64 28 6f 71 75 61 6c 25 |%=.instr|d(oqual%|
|000028e0| 2c 22 54 22 29 0d 0b ae | 1a e7 20 61 25 3c 3e 30 |,"T")...|.. a%<>0|
|000028f0| 20 80 20 61 25 3f 31 3d | 97 20 22 5b 22 20 8c 0d | . a%?1=|. "[" ..|
|00002900| 0b b8 18 61 25 3d a4 69 | 6e 73 74 72 71 28 61 25 |...a%=.i|nstrq(a%|
|00002910| 2b 32 2c 22 62 22 29 0d | 0b c2 0d e7 20 61 25 3c |+2,"b").|.... a%<|
|00002920| 3e 30 20 8c 0d 0b cc 0d | 62 67 24 3d c3 7e 62 67 |>0 .....|bg$=.~bg|
|00002930| 25 0d 0b d6 13 61 25 3f | 31 3d 97 c1 62 67 24 2c |%....a%?|1=..bg$,|
|00002940| 31 2c 31 29 0d 0b e0 13 | 61 25 3f 32 3d 97 c1 62 |1,1)....|a%?2=..b|
|00002950| 67 24 2c 32 2c 31 29 0d | 0b ea 13 61 25 3f 33 3d |g$,2,1).|...a%?3=|
|00002960| 97 c1 62 67 24 2c 33 2c | 31 29 0d 0b f4 13 61 25 |..bg$,3,|1)....a%|
|00002970| 3f 34 3d 97 c1 62 67 24 | 2c 34 2c 31 29 0d 0b fe |?4=..bg$|,4,1)...|
|00002980| 13 61 25 3f 35 3d 97 c1 | 62 67 24 2c 35 2c 31 29 |.a%?5=..|bg$,5,1)|
|00002990| 0d 0c 08 13 61 25 3f 36 | 3d 97 c1 62 67 24 2c 36 |....a%?6|=..bg$,6|
|000029a0| 2c 31 29 0d 0c 12 4a f2 | 6c 6f 67 28 22 52 65 77 |,1)...J.|log("Rew|
|000029b0| 72 69 74 74 65 6e 20 62 | 67 20 63 6f 6c 6f 75 72 |ritten b|g colour|
|000029c0| 20 69 6e 66 6f 2c 20 61 | 6e 64 20 61 62 6f 75 74 | info, a|nd about|
|000029d0| 20 74 6f 20 75 70 64 61 | 74 65 20 77 69 6e 64 6f | to upda|te windo|
|000029e0| 77 20 66 75 72 6e 69 74 | 75 72 65 22 29 0d 0c 1c |w furnit|ure")...|
|000029f0| 16 f2 75 70 64 69 63 6f | 6e 28 77 68 61 6e 64 25 |..updico|n(whand%|
|00002a00| 2c 32 29 0d 0c 26 16 f2 | 75 70 64 69 63 6f 6e 28 |,2)..&..|updicon(|
|00002a10| 77 68 61 6e 64 25 2c 33 | 29 0d 0c 30 16 f2 75 70 |whand%,3|)..0..up|
|00002a20| 64 69 63 6f 6e 28 77 68 | 61 6e 64 25 2c 34 29 0d |dicon(wh|and%,4).|
|00002a30| 0c 3a 16 f2 75 70 64 69 | 63 6f 6e 28 77 68 61 6e |.:..updi|con(whan|
|00002a40| 64 25 2c 35 29 0d 0c 44 | 16 f2 75 70 64 69 63 6f |d%,5)..D|..updico|
|00002a50| 6e 28 77 68 61 6e 64 25 | 2c 36 29 0d 0c 4e 16 f2 |n(whand%|,6)..N..|
|00002a60| 75 70 64 69 63 6f 6e 28 | 77 68 61 6e 64 25 2c 37 |updicon(|whand%,7|
|00002a70| 29 0d 0c 58 17 f2 75 70 | 64 69 63 6f 6e 28 77 68 |)..X..up|dicon(wh|
|00002a80| 61 6e 64 25 2c 31 30 29 | 0d 0c 62 17 f2 75 70 64 |and%,10)|..b..upd|
|00002a90| 69 63 6f 6e 28 77 68 61 | 6e 64 25 2c 31 31 29 0d |icon(wha|nd%,11).|
|00002aa0| 0c 6c 17 f2 75 70 64 69 | 63 6f 6e 28 77 68 61 6e |.l..updi|con(whan|
|00002ab0| 64 25 2c 31 32 29 0d 0c | 76 17 f2 75 70 64 69 63 |d%,12)..|v..updic|
|00002ac0| 6f 6e 28 77 68 61 6e 64 | 25 2c 31 35 29 0d 0c 80 |on(whand|%,15)...|
|00002ad0| 05 cd 0d 0c 8a 05 cd 0d | 0c 94 05 e1 0d 0c 9e 05 |........|........|
|00002ae0| 3a 0d 0c a8 11 dd 20 f2 | 6d 6f 64 65 63 68 61 6e |:..... .|modechan|
|00002af0| 67 65 0d 0c b2 39 c8 99 | 20 22 4f 53 5f 52 65 61 |ge...9..| "OS_Rea|
|00002b00| 64 4d 6f 64 65 56 61 72 | 69 61 62 6c 65 22 2c 2d |dModeVar|iable",-|
|00002b10| 31 2c 34 20 b8 20 2c 2c | 78 65 69 67 25 3a 78 65 |1,4 . ,,|xeig%:xe|
|00002b20| 69 67 25 3d 32 5e 78 65 | 69 67 25 0d 0c bc 39 c8 |ig%=2^xe|ig%...9.|
|00002b30| 99 20 22 4f 53 5f 52 65 | 61 64 4d 6f 64 65 56 61 |. "OS_Re|adModeVa|
|00002b40| 72 69 61 62 6c 65 22 2c | 2d 31 2c 35 20 b8 20 2c |riable",|-1,5 . ,|
|00002b50| 2c 79 65 69 67 25 3a 79 | 65 69 67 25 3d 32 5e 79 |,yeig%:y|eig%=2^y|
|00002b60| 65 69 67 25 0d 0c c6 2c | c8 99 20 22 4f 53 5f 52 |eig%...,|.. "OS_R|
|00002b70| 65 61 64 4d 6f 64 65 56 | 61 72 69 61 62 6c 65 22 |eadModeV|ariable"|
|00002b80| 2c 2d 31 2c 31 31 20 b8 | 20 2c 2c 78 77 69 64 25 |,-1,11 .| ,,xwid%|
|00002b90| 0d 0c d0 2c c8 99 20 22 | 4f 53 5f 52 65 61 64 4d |...,.. "|OS_ReadM|
|00002ba0| 6f 64 65 56 61 72 69 61 | 62 6c 65 22 2c 2d 31 2c |odeVaria|ble",-1,|
|00002bb0| 31 32 20 b8 20 2c 2c 79 | 77 69 64 25 0d 0c da 15 |12 . ,,y|wid%....|
|00002bc0| 78 77 69 64 25 3d 78 77 | 69 64 25 2a 78 65 69 67 |xwid%=xw|id%*xeig|
|00002bd0| 25 0d 0c e4 15 79 77 69 | 64 25 3d 79 77 69 64 25 |%....ywi|d%=ywid%|
|00002be0| 2a 79 65 69 67 25 0d 0c | ee 05 e1 0d 0c f8 05 3a |*yeig%..|.......:|
|00002bf0| 0d 0d 02 0b dd 20 f2 6e | 75 6c 6c 0d 0d 0c 1f ea |..... .n|ull.....|
|00002c00| 20 77 68 61 6e 64 25 2c | 74 77 25 2c 61 25 2c 62 | whand%,|tw%,a%,b|
|00002c10| 25 2c 63 25 2c 64 25 2c | 4e 25 0d 0d 16 11 77 68 |%,c%,d%,|N%....wh|
|00002c20| 61 6e 64 25 3d a4 6d 6f | 75 73 65 0d 0d 20 10 e7 |and%=.mo|use.. ..|
|00002c30| 20 77 68 61 6e 64 25 3d | 30 20 e1 0d 0d 2a 14 e7 | whand%=|0 ...*..|
|00002c40| 20 28 6d 62 25 20 80 20 | 25 31 30 31 29 20 8c 0d | (mb% . |%101) ..|
|00002c50| 0d 34 1e 4e 25 3d a4 69 | 63 6f 6e 28 77 68 61 6e |.4.N%=.i|con(whan|
|00002c60| 64 25 2c 6f 6d 78 25 2c | 6f 6d 79 25 29 0d 0d 3e |d%,omx%,|omy%)..>|
|00002c70| 23 f2 6c 6f 67 28 22 4d | 6f 75 73 65 20 63 6c 69 |#.log("M|ouse cli|
|00002c80| 63 6b 65 64 20 6f 76 65 | 72 20 22 2b c3 4e 25 29 |cked ove|r "+.N%)|
|00002c90| 0d 0d 48 0b c8 8e 20 4e | 25 20 ca 0d 0d 52 0f c9 |..H... N|% ...R..|
|00002ca0| 20 35 3a f4 20 54 69 74 | 6c 65 0d 0d 5c 27 e7 20 | 5:. Tit|le..\'. |
|00002cb0| 6f 6d 62 25 3d 30 20 6f | 70 25 3d 35 3a f2 61 6e |omb%=0 o|p%=5:.an|
|00002cc0| 69 6d 28 25 30 2c 77 68 | 61 6e 64 25 2c 6f 70 25 |im(%0,wh|and%,op%|
|00002cd0| 29 0d 0d 66 0d e7 20 6f | 70 25 3d 35 20 8c 0d 0d |)..f.. o|p%=5 ...|
|00002ce0| 70 30 c8 99 20 22 54 6f | 72 6e 61 64 6f 5f 47 65 |p0.. "To|rnado_Ge|
|00002cf0| 74 61 64 64 72 22 2c 2c | 68 65 61 70 25 2c 30 2c |taddr",,|heap%,0,|
|00002d00| 77 68 61 6e 64 25 20 b8 | 20 2c 2c 74 77 25 0d 0d |whand% .| ,,tw%..|
|00002d10| 7a 55 f2 6d 6f 75 73 65 | 72 65 63 74 28 6f 6d 78 |zU.mouse|rect(omx|
|00002d20| 25 2d 74 77 25 21 30 2c | 6f 6d 79 25 2d 74 77 25 |%-tw%!0,|omy%-tw%|
|00002d30| 21 34 2b 33 38 2c 78 77 | 69 64 25 2d 28 74 77 25 |!4+38,xw|id%-(tw%|
|00002d40| 21 38 2d 6f 6d 78 25 29 | 2d 33 38 2c 79 77 69 64 |!8-omx%)|-38,ywid|
|00002d50| 25 2d 28 74 77 25 21 31 | 32 2d 6f 6d 79 25 29 2d |%-(tw%!1|2-omy%)-|
|00002d60| 33 38 29 0d 0d 84 13 74 | 77 25 21 30 2b 3d 6d 78 |38)....t|w%!0+=mx|
|00002d70| 25 2d 6f 6d 78 25 0d 0d | 8e 13 74 77 25 21 34 2b |%-omx%..|..tw%!4+|
|00002d80| 3d 6d 79 25 2d 6f 6d 79 | 25 0d 0d 98 13 74 77 25 |=my%-omy|%....tw%|
|00002d90| 21 38 2b 3d 6d 78 25 2d | 6f 6d 78 25 0d 0d a2 14 |!8+=mx%-|omx%....|
|00002da0| 74 77 25 21 31 32 2b 3d | 6d 79 25 2d 6f 6d 79 25 |tw%!12+=|my%-omy%|
|00002db0| 0d 0d ac 31 f2 66 69 78 | 77 69 6e 28 25 30 30 30 |...1.fix|win(%000|
|00002dc0| 2d 28 28 6d 62 25 20 80 | 20 25 31 30 30 29 3d 25 |-((mb% .| %100)=%|
|00002dd0| 31 30 30 29 2c 6f 6d 77 | 25 2c 77 68 61 6e 64 25 |100),omw|%,whand%|
|00002de0| 29 0d 0d b6 0c 6d 77 25 | 3d 6f 6d 77 25 0d 0d c0 |)....mw%|=omw%...|
|00002df0| 05 cd 0d 0d ca 13 c9 20 | 31 3a f4 20 57 6f 72 6b |....... |1:. Work|
|00002e00| 20 61 72 65 61 0d 0d d4 | 2f e7 20 6f 6d 62 25 3d | area...|/. omb%=|
|00002e10| 30 20 c8 99 20 22 57 69 | 6d 70 5f 53 65 74 43 61 |0 .. "Wi|mp_SetCa|
|00002e20| 72 65 74 50 6f 73 69 74 | 69 6f 6e 22 2c 6f 6d 77 |retPosit|ion",omw|
|00002e30| 25 2c 2d 31 0d 0d de 0e | c9 20 32 3a f4 20 42 61 |%,-1....|. 2:. Ba|
|00002e40| 63 6b 0d 0d e8 27 e7 20 | 6f 6d 62 25 3d 30 20 6f |ck...'. |omb%=0 o|
|00002e50| 70 25 3d 32 3a f2 61 6e | 69 6d 28 25 30 2c 77 68 |p%=2:.an|im(%0,wh|
|00002e60| 61 6e 64 25 2c 6f 70 25 | 29 0d 0d f2 0d e7 20 6f |and%,op%|)..... o|
|00002e70| 70 25 3d 32 20 8c 0d 0d | fc 14 e7 20 28 6d 62 25 |p%=2 ...|... (mb%|
|00002e80| 20 80 20 25 30 30 31 29 | 20 8c 0d 0e 06 31 f4 20 | . %001)| ....1. |
|00002e90| 53 74 65 70 20 62 61 63 | 6b 6e 65 73 73 20 77 69 |Step bac|kness wi|
|00002ea0| 74 68 20 73 65 6c 65 63 | 74 20 77 68 69 6c 65 20 |th selec|t while |
|00002eb0| 61 64 6a 75 73 74 20 68 | 65 6c 64 0d 0e 10 05 cc |adjust h|eld.....|
|00002ec0| 0d 0e 1a 2c e7 20 28 6d | 62 25 20 80 20 25 31 30 |...,. (m|b% . %10|
|00002ed0| 30 29 20 f2 66 69 78 77 | 69 6e 28 25 30 31 30 2c |0) .fixw|in(%010,|
|00002ee0| 6f 6d 77 25 2c 77 68 61 | 6e 64 25 29 0d 0e 24 05 |omw%,wha|nd%)..$.|
|00002ef0| cd 0d 0e 2e 05 cd 0d 0e | 38 0f c9 20 33 3a f4 20 |........|8.. 3:. |
|00002f00| 43 6c 6f 73 65 0d 0e 42 | 27 e7 20 6f 6d 62 25 3d |Close..B|'. omb%=|
|00002f10| 30 20 6f 70 25 3d 33 3a | f2 61 6e 69 6d 28 25 30 |0 op%=3:|.anim(%0|
|00002f20| 2c 77 68 61 6e 64 25 2c | 6f 70 25 29 0d 0e 4c 0d |,whand%,|op%)..L.|
|00002f30| e7 20 6f 70 25 3d 33 20 | 8c 0d 0e 56 14 e7 20 28 |. op%=3 |...V.. (|
|00002f40| 6d 62 25 20 80 20 25 31 | 30 30 29 20 8c 0d 0e 60 |mb% . %1|00) ...`|
|00002f50| 30 f2 6c 6f 67 28 22 53 | 68 75 74 74 69 6e 67 20 |0.log("S|hutting |
|00002f60| 64 6f 77 6e 20 62 79 20 | 72 65 71 75 65 73 74 20 |down by |request |
|00002f70| 6f 66 20 75 73 65 72 20 | 2e 2e 2e 22 29 0d 0e 6a |of user |...")..j|
|00002f80| 27 f2 6c 6f 67 28 22 50 | 72 6f 67 72 61 6d 20 74 |'.log("P|rogram t|
|00002f90| 65 72 6d 69 6e 61 74 65 | 64 20 6e 6f 72 6d 61 6c |erminate|d normal|
|00002fa0| 6c 79 22 29 0d 0e 74 0d | f2 73 68 75 74 64 6f 77 |ly")..t.|.shutdow|
|00002fb0| 6e 0d 0e 7e 19 c8 99 20 | 22 57 69 6d 70 5f 43 6c |n..~... |"Wimp_Cl|
|00002fc0| 6f 73 65 44 6f 77 6e 22 | 3a e0 0d 0e 88 05 cd 0d |oseDown"|:.......|
|00002fd0| 0e 92 05 cd 0d 0e 9c 10 | c9 20 36 3a f4 20 54 6f |........|. 6:. To|
|00002fe0| 67 67 6c 65 0d 0e a6 27 | e7 20 6f 6d 62 25 3d 30 |ggle...'|. omb%=0|
|00002ff0| 20 6f 70 25 3d 36 3a f2 | 61 6e 69 6d 28 25 30 2c | op%=6:.|anim(%0,|
|00003000| 77 68 61 6e 64 25 2c 6f | 70 25 29 0d 0e b0 0d e7 |whand%,o|p%).....|
|00003010| 20 6f 70 25 3d 36 20 8c | 0d 0e ba 1a f2 67 65 74 | op%=6 .|.....get|
|00003020| 77 69 6e 69 6e 66 6f 28 | 77 68 61 6e 64 25 2c 71 |wininfo(|whand%,q|
|00003030| 25 29 0d 0e c4 0f 71 25 | 21 34 3d 2d 31 3c 3c 31 |%)....q%|!4=-1<<1|
|00003040| 36 0d 0e ce 0e 71 25 21 | 38 3d 31 3c 3c 31 36 0d |6....q%!|8=1<<16.|
|00003050| 0e d8 18 f2 74 6f 77 69 | 6e 28 25 30 2c 77 68 61 |....towi|n(%0,wha|
|00003060| 6e 64 25 2c 71 25 29 0d | 0e e2 05 cd 0d 0e ec 0c |nd%,q%).|........|
|00003070| c9 20 37 3a f4 20 55 70 | 0d 0e f6 40 f4 20 41 64 |. 7:. Up|...@. Ad|
|00003080| 6a 75 73 74 20 77 69 74 | 68 20 61 72 72 6f 77 73 |just wit|h arrows|
|00003090| 20 61 6c 6c 6f 77 73 20 | 73 63 72 6f 6c 6c 69 6e | allows |scrollin|
|000030a0| 67 20 62 79 20 6d 6f 76 | 69 6e 67 20 74 68 65 20 |g by mov|ing the |
|000030b0| 6d 6f 75 73 65 20 69 6e | 0d 0f 00 44 f4 20 69 6e |mouse in|...D. in|
|000030c0| 63 72 65 6d 65 6e 74 73 | 20 64 65 74 65 72 6d 69 |crements| determi|
|000030d0| 6e 65 64 20 74 68 72 6f | 75 67 68 20 64 69 73 74 |ned thro|ugh dist|
|000030e0| 61 6e 63 65 20 66 72 6f | 6d 20 74 68 65 20 70 74 |ance fro|m the pt|
|000030f0| 72 20 61 6e 64 20 6f 72 | 69 67 69 6e 0d 0f 0a 1c |r and or|igin....|
|00003100| f4 20 6f 66 20 6f 70 65 | 72 61 74 69 6f 6e 20 62 |. of ope|ration b|
|00003110| 65 67 69 6e 6e 69 6e 67 | 0d 0f 14 27 e7 20 6f 6d |eginning|...'. om|
|00003120| 62 25 3d 30 20 6f 70 25 | 3d 37 3a f2 61 6e 69 6d |b%=0 op%|=7:.anim|
|00003130| 28 25 30 2c 77 68 61 6e | 64 25 2c 6f 70 25 29 0d |(%0,whan|d%,op%).|
|00003140| 0f 1e 0d e7 20 6f 70 25 | 3d 37 20 8c 0d 0f 28 30 |.... op%|=7 ...(0|
|00003150| c8 99 20 22 54 6f 72 6e | 61 64 6f 5f 47 65 74 61 |.. "Torn|ado_Geta|
|00003160| 64 64 72 22 2c 2c 68 65 | 61 70 25 2c 30 2c 77 68 |ddr",,he|ap%,0,wh|
|00003170| 61 6e 64 25 20 b8 20 2c | 2c 74 77 25 0d 0f 32 33 |and% . ,|,tw%..23|
|00003180| f2 6d 6f 75 73 65 72 65 | 63 74 28 74 77 25 21 38 |.mousere|ct(tw%!8|
|00003190| 2c 74 77 25 21 31 32 2d | 33 38 2c 74 77 25 21 38 |,tw%!12-|38,tw%!8|
|000031a0| 2b 33 38 2d 32 2c 74 77 | 25 21 31 32 2d 32 29 0d |+38-2,tw|%!12-2).|
|000031b0| 0f 3c 1a f2 67 65 74 77 | 69 6e 69 6e 66 6f 28 77 |.<..getw|ininfo(w|
|000031c0| 68 61 6e 64 25 2c 71 25 | 29 0d 0f 46 0d 71 25 21 |hand%,q%|)..F.q%!|
|000031d0| 32 30 2b 3d 33 32 0d 0f | 50 18 f2 74 6f 77 69 6e |20+=32..|P..towin|
|000031e0| 28 25 30 2c 77 68 61 6e | 64 25 2c 71 25 29 0d 0f |(%0,whan|d%,q%)..|
|000031f0| 5a 05 cd 0d 0f 64 0f c9 | 20 31 30 3a f4 20 44 6f |Z....d..| 10:. Do|
|00003200| 77 6e 0d 0f 6e 28 e7 20 | 6f 6d 62 25 3d 30 20 6f |wn..n(. |omb%=0 o|
|00003210| 70 25 3d 31 30 3a f2 61 | 6e 69 6d 28 25 30 2c 77 |p%=10:.a|nim(%0,w|
|00003220| 68 61 6e 64 25 2c 6f 70 | 25 29 0d 0f 78 0e e7 20 |hand%,op|%)..x.. |
|00003230| 6f 70 25 3d 31 30 20 8c | 0d 0f 82 30 c8 99 20 22 |op%=10 .|...0.. "|
|00003240| 54 6f 72 6e 61 64 6f 5f | 47 65 74 61 64 64 72 22 |Tornado_|Getaddr"|
|00003250| 2c 2c 68 65 61 70 25 2c | 30 2c 77 68 61 6e 64 25 |,,heap%,|0,whand%|
|00003260| 20 b8 20 2c 2c 74 77 25 | 0d 0f 8c 31 f2 6d 6f 75 | . ,,tw%|...1.mou|
|00003270| 73 65 72 65 63 74 28 74 | 77 25 21 38 2c 74 77 25 |serect(t|w%!8,tw%|
|00003280| 21 34 2c 74 77 25 21 38 | 2b 33 38 2d 32 2c 74 77 |!4,tw%!8|+38-2,tw|
|00003290| 25 21 34 2b 33 38 2d 32 | 29 0d 0f 96 1a f2 67 65 |%!4+38-2|).....ge|
|000032a0| 74 77 69 6e 69 6e 66 6f | 28 77 68 61 6e 64 25 2c |twininfo|(whand%,|
|000032b0| 71 25 29 0d 0f a0 0d 71 | 25 21 32 30 2d 3d 33 32 |q%)....q|%!20-=32|
|000032c0| 0d 0f aa 18 f2 74 6f 77 | 69 6e 28 25 30 2c 77 68 |.....tow|in(%0,wh|
|000032d0| 61 6e 64 25 2c 71 25 29 | 0d 0f b4 05 cd 0d 0f be |and%,q%)|........|
|000032e0| 0e c9 20 38 3a f4 20 56 | 42 61 72 0d 0f c8 0e e7 |.. 8:. V|Bar.....|
|000032f0| 20 6f 6d 62 25 3d 30 20 | 8c 0d 0f d2 30 c8 99 20 | omb%=0 |....0.. |
|00003300| 22 54 6f 72 6e 61 64 6f | 5f 47 65 74 61 64 64 72 |"Tornado|_Getaddr|
|00003310| 22 2c 2c 68 65 61 70 25 | 2c 30 2c 77 68 61 6e 64 |",,heap%|,0,whand|
|00003320| 25 20 b8 20 2c 2c 74 77 | 25 0d 0f dc 19 72 65 74 |% . ,,tw|%....ret|
|00003330| 61 25 3d 6d 79 25 2d a4 | 76 62 61 72 73 28 74 77 |a%=my%-.|vbars(tw|
|00003340| 25 29 0d 0f e6 09 6f 70 | 25 3d 38 0d 0f f0 18 f2 |%)....op|%=8.....|
|00003350| 61 6e 69 6d 28 25 30 2c | 77 68 61 6e 64 25 2c 6f |anim(%0,|whand%,o|
|00003360| 70 25 29 0d 0f fa 05 cd | 0d 10 04 0d e7 20 6f 70 |p%).....|..... op|
|00003370| 25 3d 38 20 8c 0d 10 0e | 30 c8 99 20 22 54 6f 72 |%=8 ....|0.. "Tor|
|00003380| 6e 61 64 6f 5f 47 65 74 | 61 64 64 72 22 2c 2c 68 |nado_Get|addr",,h|
|00003390| 65 61 70 25 2c 30 2c 77 | 68 61 6e 64 25 20 b8 20 |eap%,0,w|hand% . |
|000033a0| 2c 2c 74 77 25 0d 10 18 | 0a c8 8e 20 b9 20 ca 0d |,,tw%...|... . ..|
|000033b0| 10 22 2f c9 20 28 6d 62 | 25 20 80 20 25 31 30 30 |."/. (mb|% . %100|
|000033c0| 29 3d 25 31 30 30 3a f4 | 20 53 63 72 6f 6c 6c 20 |)=%100:.| Scroll |
|000033d0| 77 69 74 68 20 6d 6f 75 | 73 65 20 70 74 72 0d 10 |with mou|se ptr..|
|000033e0| 2c 3b f2 6d 6f 75 73 65 | 72 65 63 74 28 74 77 25 |,;.mouse|rect(tw%|
|000033f0| 21 38 2b 38 2c 74 77 25 | 21 34 2b 33 38 2b 38 2c |!8+8,tw%|!4+38+8,|
|00003400| 74 77 25 21 38 2b 33 38 | 2d 32 2d 38 2c 74 77 25 |tw%!8+38|-2-8,tw%|
|00003410| 21 31 32 2d 33 38 2d 38 | 29 0d 10 36 11 78 63 25 |!12-38-8|)..6.xc%|
|00003420| 3d 6d 79 25 2d 72 65 74 | 61 25 0d 10 40 39 4e 25 |=my%-ret|a%..@9N%|
|00003430| 3d 28 28 78 63 25 2d 74 | 77 25 21 34 2d 33 38 2d |=((xc%-t|w%!4-38-|
|00003440| 38 29 2a 74 77 25 21 35 | 32 29 2f 28 74 77 25 21 |8)*tw%!5|2)/(tw%!|
|00003450| 31 32 2d 33 38 2d 38 2d | 74 77 25 21 34 2d 33 38 |12-38-8-|tw%!4-38|
|00003460| 2d 38 29 0d 10 4a 0e 4e | 25 2d 3d 74 77 25 21 32 |-8)..J.N|%-=tw%!2|
|00003470| 30 0d 10 54 5e e7 20 94 | 28 4e 25 29 3e 3d 79 65 |0..T^. .|(N%)>=ye|
|00003480| 69 67 25 20 f2 73 63 72 | 6f 6c 6c 28 77 68 61 6e |ig% .scr|oll(whan|
|00003490| 64 25 2c 74 77 25 2c 30 | 2c 4e 25 20 80 20 ac 20 |d%,tw%,0|,N% . . |
|000034a0| 28 79 65 69 67 25 2d 31 | 29 29 3a 6d 79 25 3d 6f |(yeig%-1|)):my%=o|
|000034b0| 6d 79 25 2d 28 4e 25 20 | 80 20 28 79 65 69 67 25 |my%-(N% |. (yeig%|
|000034c0| 2d 31 29 29 20 8b 20 6d | 79 25 3d 6f 6d 79 25 0d |-1)) . m|y%=omy%.|
|000034d0| 10 5e 3a c9 20 28 6d 62 | 25 20 80 20 25 30 30 31 |.^:. (mb|% . %001|
|000034e0| 29 3d 25 30 30 31 3a f4 | 20 53 63 72 6f 6c 6c 20 |)=%001:.| Scroll |
|000034f0| 62 6f 74 68 20 78 20 26 | 20 79 20 77 69 74 68 20 |both x &| y with |
|00003500| 6d 6f 75 73 65 20 70 74 | 72 0d 10 68 05 cb 0d 10 |mouse pt|r..h....|
|00003510| 72 05 cd 0d 10 7c 0f c9 | 20 39 3a f4 20 56 57 65 |r....|..| 9:. VWe|
|00003520| 6c 6c 0d 10 86 12 e7 20 | 6f 6d 62 25 3d 30 20 6f |ll..... |omb%=0 o|
|00003530| 70 25 3d 39 0d 10 90 0d | e7 20 6f 70 25 3d 39 20 |p%=9....|. op%=9 |
|00003540| 8c 0d 10 9a 30 c8 99 20 | 22 54 6f 72 6e 61 64 6f |....0.. |"Tornado|
|00003550| 5f 47 65 74 61 64 64 72 | 22 2c 2c 68 65 61 70 25 |_Getaddr|",,heap%|
|00003560| 2c 30 2c 77 68 61 6e 64 | 25 20 b8 20 2c 2c 74 77 |,0,whand|% . ,,tw|
|00003570| 25 0d 10 a4 33 f2 6d 6f | 75 73 65 72 65 63 74 28 |%...3.mo|userect(|
|00003580| 74 77 25 21 38 2c 74 77 | 25 21 34 2b 33 38 2c 74 |tw%!8,tw|%!4+38,t|
|00003590| 77 25 21 38 2b 33 38 2d | 32 2c 74 77 25 21 31 32 |w%!8+38-|2,tw%!12|
|000035a0| 2d 33 38 29 0d 10 ae 14 | e7 20 28 6d 62 25 20 80 |-38)....|. (mb% .|
|000035b0| 20 25 31 30 30 29 20 8c | 0d 10 b8 13 f4 20 53 63 | %100) .|..... Sc|
|000035c0| 72 6f 6c 6c 20 61 20 70 | 61 67 65 0d 10 c2 0a c8 |roll a p|age.....|
|000035d0| 8e 20 b9 20 ca 0d 10 cc | 38 c9 20 6d 79 25 3e a4 |. . ....|8. my%>.|
|000035e0| 76 62 61 72 65 28 74 77 | 25 29 3a f2 73 63 72 6f |vbare(tw|%):.scro|
|000035f0| 6c 6c 28 77 68 61 6e 64 | 25 2c 74 77 25 2c 30 2c |ll(whand|%,tw%,0,|
|00003600| 74 77 25 21 31 32 2d 74 | 77 25 21 34 29 0d 10 d6 |tw%!12-t|w%!4)...|
|00003610| 38 c9 20 6d 79 25 3c a4 | 76 62 61 72 73 28 74 77 |8. my%<.|vbars(tw|
|00003620| 25 29 3a f2 73 63 72 6f | 6c 6c 28 77 68 61 6e 64 |%):.scro|ll(whand|
|00003630| 25 2c 74 77 25 2c 30 2c | 74 77 25 21 34 2d 74 77 |%,tw%,0,|tw%!4-tw|
|00003640| 25 21 31 32 29 0d 10 e0 | 23 7f 3a f4 20 43 65 6e |%!12)...|#.:. Cen|
|00003650| 74 72 65 20 62 61 72 20 | 61 72 6f 75 6e 64 20 6d |tre bar |around m|
|00003660| 6f 75 73 65 20 70 74 72 | 0d 10 ea 05 cb 0d 10 f4 |ouse ptr|........|
|00003670| 30 f4 4e 25 3d 74 77 25 | 21 32 30 3a 4e 32 25 3d |0.N%=tw%|!20:N2%=|
|00003680| 46 4e 76 62 61 72 73 28 | 74 77 25 29 3a 4e 33 25 |FNvbars(|tw%):N3%|
|00003690| 3d 46 4e 76 62 61 72 65 | 28 74 77 25 29 0d 10 fe |=FNvbare|(tw%)...|
|000036a0| 24 f4 49 46 20 6d 79 25 | 3e 4e 33 25 20 74 77 25 |$.IF my%|>N3% tw%|
|000036b0| 21 32 30 2b 3d 74 77 25 | 21 31 32 2d 74 77 25 21 |!20+=tw%|!12-tw%!|
|000036c0| 34 0d 11 08 24 f4 49 46 | 20 6d 79 25 3c 4e 32 25 |4...$.IF| my%<N2%|
|000036d0| 20 74 77 25 21 32 30 2d | 3d 74 77 25 21 31 32 2d | tw%!20-|=tw%!12-|
|000036e0| 74 77 25 21 34 0d 11 12 | 41 f4 49 46 20 74 77 25 |tw%!4...|A.IF tw%|
|000036f0| 21 32 30 3e 74 77 25 21 | 35 32 2d 28 74 77 25 21 |!20>tw%!|52-(tw%!|
|00003700| 31 32 2d 74 77 25 21 34 | 29 20 74 77 25 21 32 30 |12-tw%!4|) tw%!20|
|00003710| 3d 74 77 25 21 35 32 2d | 28 74 77 25 21 31 32 2d |=tw%!52-|(tw%!12-|
|00003720| 74 77 25 21 34 29 0d 11 | 1c 19 f4 49 46 20 74 77 |tw%!4)..|...IF tw|
|00003730| 25 21 32 30 3c 30 20 74 | 77 25 21 32 30 3d 30 0d |%!20<0 t|w%!20=0.|
|00003740| 11 26 17 f4 49 46 20 4e | 25 3c 3e 74 77 25 21 32 |.&..IF N|%<>tw%!2|
|00003750| 30 20 54 48 45 4e 0d 11 | 30 78 f4 49 46 20 4e 32 |0 THEN..|0x.IF N2|
|00003760| 25 3c 46 4e 76 62 61 72 | 73 28 74 77 25 29 20 50 |%<FNvbar|s(tw%) P|
|00003770| 52 4f 43 75 70 64 61 74 | 65 28 74 77 25 21 38 2b |ROCupdat|e(tw%!8+|
|00003780| 38 2c 4e 32 25 2c 74 77 | 25 21 38 2b 33 38 2d 38 |8,N2%,tw|%!8+38-8|
|00003790| 2c 46 4e 76 62 61 72 65 | 28 74 77 25 29 29 3a 50 |,FNvbare|(tw%)):P|
|000037a0| 52 4f 43 75 70 64 61 74 | 65 28 74 77 25 21 30 2c |ROCupdat|e(tw%!0,|
|000037b0| 74 77 25 21 31 32 2d 74 | 77 25 21 32 30 2b 4e 25 |tw%!12-t|w%!20+N%|
|000037c0| 2c 74 77 25 21 38 2c 74 | 77 25 21 31 32 29 0d 11 |,tw%!8,t|w%!12)..|
|000037d0| 3a 76 f4 49 46 20 4e 33 | 25 3e 46 4e 76 62 61 72 |:v.IF N3|%>FNvbar|
|000037e0| 65 28 74 77 25 29 20 50 | 52 4f 43 75 70 64 61 74 |e(tw%) P|ROCupdat|
|000037f0| 65 28 74 77 25 21 38 2b | 38 2c 46 4e 76 62 61 72 |e(tw%!8+|8,FNvbar|
|00003800| 73 28 74 77 25 29 2c 74 | 77 25 21 38 2b 33 38 2d |s(tw%),t|w%!8+38-|
|00003810| 38 2c 4e 33 25 29 3a 50 | 52 4f 43 75 70 64 61 74 |8,N3%):P|ROCupdat|
|00003820| 65 28 74 77 25 21 30 2c | 74 77 25 21 34 2c 74 77 |e(tw%!0,|tw%!4,tw|
|00003830| 25 21 38 2c 74 77 25 21 | 34 2b 74 77 25 21 32 30 |%!8,tw%!|4+tw%!20|
|00003840| 2d 4e 25 29 0d 11 44 0a | f4 45 4e 44 49 46 0d 11 |-N%)..D.|.ENDIF..|
|00003850| 4e 05 cd 0d 11 58 14 e7 | 20 28 6d 62 25 20 80 20 |N....X..| (mb% . |
|00003860| 25 30 30 31 29 20 8c 0d | 11 62 18 f4 20 4a 75 6d |%001) ..|.b.. Jum|
|00003870| 70 20 64 69 72 65 63 74 | 6c 79 20 68 65 72 65 0d |p direct|ly here.|
|00003880| 11 6c 05 cd 0d 11 76 14 | e7 20 28 6d 62 25 20 80 |.l....v.|. (mb% .|
|00003890| 20 25 30 31 30 29 20 8c | 0d 11 80 10 f4 20 57 68 | %010) .|..... Wh|
|000038a0| 6f 20 6b 6e 6f 77 73 3f | 0d 11 8a 05 cd 0d 11 94 |o knows?|........|
|000038b0| 05 cd 0d 11 9e 11 c9 20 | 31 31 3a f4 20 41 64 6a |....... |11:. Adj|
|000038c0| 75 73 74 0d 11 a8 0e e7 | 20 6f 6d 62 25 3d 30 20 |ust.....| omb%=0 |
|000038d0| 8c 0d 11 b2 0a 6f 70 25 | 3d 31 31 0d 11 bc 18 f2 |.....op%|=11.....|
|000038e0| 61 6e 69 6d 28 25 30 2c | 77 68 61 6e 64 25 2c 6f |anim(%0,|whand%,o|
|000038f0| 70 25 29 0d 11 c6 30 c8 | 99 20 22 54 6f 72 6e 61 |p%)...0.|. "Torna|
|00003900| 64 6f 5f 47 65 74 61 64 | 64 72 22 2c 2c 68 65 61 |do_Getad|dr",,hea|
|00003910| 70 25 2c 30 2c 77 68 61 | 6e 64 25 20 b8 20 2c 2c |p%,0,wha|nd% . ,,|
|00003920| 74 77 25 0d 11 d0 14 72 | 65 74 61 25 3d 6f 6d 78 |tw%....r|eta%=omx|
|00003930| 25 2d 74 77 25 21 38 0d | 11 da 14 72 65 74 62 25 |%-tw%!8.|...retb%|
|00003940| 3d 74 77 25 21 34 2d 6f | 6d 79 25 0d 11 e4 05 cd |=tw%!4-o|my%.....|
|00003950| 0d 11 ee 0e e7 20 6f 70 | 25 3d 31 31 20 8c 0d 11 |..... op|%=11 ...|
|00003960| f8 0a c8 8e 20 b9 20 ca | 0d 12 02 15 c9 20 28 6d |.... . .|..... (m|
|00003970| 62 25 20 80 20 25 31 30 | 31 29 3e 30 3a 0d 12 0c |b% . %10|1)>0:...|
|00003980| 30 c8 99 20 22 54 6f 72 | 6e 61 64 6f 5f 47 65 74 |0.. "Tor|nado_Get|
|00003990| 61 64 64 72 22 2c 2c 68 | 65 61 70 25 2c 30 2c 77 |addr",,h|eap%,0,w|
|000039a0| 68 61 6e 64 25 20 b8 20 | 2c 2c 74 77 25 0d 12 16 |hand% . |,,tw%...|
|000039b0| 4f f2 6d 6f 75 73 65 72 | 65 63 74 28 74 77 25 21 |O.mouser|ect(tw%!|
|000039c0| 30 2b 72 65 74 61 25 2c | 74 77 25 21 31 32 2d 74 |0+reta%,|tw%!12-t|
|000039d0| 77 25 21 35 32 2d 72 65 | 74 62 25 2c 74 77 25 21 |w%!52-re|tb%,tw%!|
|000039e0| 30 2b 74 77 25 21 34 38 | 2b 72 65 74 61 25 2c 74 |0+tw%!48|+reta%,t|
|000039f0| 77 25 21 31 32 2d 72 65 | 74 62 25 29 0d 12 20 1a |w%!12-re|tb%).. .|
|00003a00| f2 67 65 74 77 69 6e 69 | 6e 66 6f 28 77 68 61 6e |.getwini|nfo(whan|
|00003a10| 64 25 2c 71 25 29 0d 12 | 2a 13 61 25 3d 71 25 21 |d%,q%)..|*.a%=q%!|
|00003a20| 34 3a 62 25 3d 71 25 21 | 38 0d 12 34 12 63 25 3d |4:b%=q%!|8..4.c%=|
|00003a30| a4 76 62 61 72 65 28 74 | 77 25 29 0d 12 3e 12 71 |.vbare(t|w%)..>.q|
|00003a40| 25 21 34 3d 6d 79 25 2b | 72 65 74 62 25 0d 12 48 |%!4=my%+|retb%..H|
|00003a50| 12 71 25 21 38 3d 6d 78 | 25 2d 72 65 74 61 25 0d |.q%!8=mx|%-reta%.|
|00003a60| 12 52 2f f4 20 41 64 6a | 75 73 74 20 76 73 63 72 |.R/. Adj|ust vscr|
|00003a70| 20 74 6f 20 6b 65 65 70 | 20 74 6f 70 20 6f 66 20 | to keep| top of |
|00003a80| 62 61 72 20 73 74 61 74 | 69 6f 6e 61 72 79 0d 12 |bar stat|ionary..|
|00003a90| 5c 19 71 25 21 32 30 3d | a4 5f 76 62 61 72 65 28 |\.q%!20=|._vbare(|
|00003aa0| 74 77 25 2c 63 25 29 0d | 12 66 1b e7 20 61 25 3c |tw%,c%).|.f.. a%<|
|00003ab0| 3e 71 25 21 34 20 84 20 | 62 25 3c 3e 71 25 21 38 |>q%!4 . |b%<>q%!8|
|00003ac0| 20 8c 0d 12 70 20 e7 20 | 28 6d 62 25 20 80 20 25 | ...p . |(mb% . %|
|00003ad0| 31 30 30 29 3d 25 31 30 | 30 20 71 25 21 32 34 3d |100)=%10|0 q%!24=|
|00003ae0| 2d 31 0d 12 7a 18 f2 74 | 6f 77 69 6e 28 25 30 2c |-1..z..t|owin(%0,|
|00003af0| 77 68 61 6e 64 25 2c 71 | 25 29 0d 12 84 1f f4 50 |whand%,q|%).....P|
|00003b00| 52 4f 43 66 69 78 77 69 | 6e 28 63 25 2c 6f 6d 77 |ROCfixwi|n(c%,omw|
|00003b10| 25 2c 77 68 61 6e 64 25 | 29 0d 12 8e 31 f4 49 46 |%,whand%|)...1.IF|
|00003b20| 20 62 25 3c 3e 74 77 25 | 21 38 20 50 52 4f 43 75 | b%<>tw%|!8 PROCu|
|00003b30| 70 64 69 63 6f 6e 28 77 | 68 61 6e 64 25 2c 35 29 |pdicon(w|hand%,5)|
|00003b40| 3a 52 45 4d 20 54 69 74 | 6c 65 0d 12 98 32 f4 49 |:REM Tit|le...2.I|
|00003b50| 46 20 62 25 3c 3e 74 77 | 25 21 38 20 50 52 4f 43 |F b%<>tw|%!8 PROC|
|00003b60| 75 70 64 69 63 6f 6e 28 | 77 68 61 6e 64 25 2c 36 |updicon(|whand%,6|
|00003b70| 29 3a 52 45 4d 20 54 6f | 67 67 6c 65 0d 12 a2 24 |):REM To|ggle...$|
|00003b80| f4 50 52 4f 43 75 70 64 | 69 63 6f 6e 28 77 68 61 |.PROCupd|icon(wha|
|00003b90| 6e 64 25 2c 39 29 3a 52 | 45 4d 20 56 57 65 6c 6c |nd%,9):R|EM VWell|
|00003ba0| 0d 12 ac 25 f4 50 52 4f | 43 75 70 64 69 63 6f 6e |...%.PRO|Cupdicon|
|00003bb0| 28 77 68 61 6e 64 25 2c | 31 34 29 3a 52 45 4d 20 |(whand%,|14):REM |
|00003bc0| 48 57 65 6c 6c 0d 12 b6 | 0b f4 21 77 6b 25 3d 30 |HWell...|..!wk%=0|
|00003bd0| 0d 12 c0 2d f4 50 52 4f | 43 61 64 6a 75 73 74 28 |...-.PRO|Cadjust(|
|00003be0| 77 68 61 6e 64 25 2c 74 | 77 25 2c 62 25 2c 61 25 |whand%,t|w%,b%,a%|
|00003bf0| 2c 74 77 25 21 38 2c 74 | 77 25 21 34 29 0d 12 ca |,tw%!8,t|w%!4)...|
|00003c00| 24 f4 49 46 20 74 77 25 | 21 38 3e 62 25 20 64 25 |$.IF tw%|!8>b% d%|
|00003c10| 3d 74 77 25 21 38 20 45 | 4c 53 45 20 64 25 3d 62 |=tw%!8 E|LSE d%=b|
|00003c20| 25 0d 12 d4 4d f4 49 46 | 20 74 77 25 21 34 3e 61 |%...M.IF| tw%!4>a|
|00003c30| 25 20 63 25 3d 74 77 25 | 21 34 3a 50 52 4f 43 6e |% c%=tw%|!4:PROCn|
|00003c40| 65 77 72 74 68 72 65 61 | 64 28 77 68 61 6e 64 25 |ewrthrea|d(whand%|
|00003c50| 2c 25 31 2c 61 25 2c 64 | 25 2c 74 77 25 21 38 2b |,%1,a%,d|%,tw%!8+|
|00003c60| 33 38 2c 74 77 25 21 31 | 32 2c 77 6b 25 29 0d 12 |38,tw%!1|2,wk%)..|
|00003c70| de 46 f4 49 46 20 74 77 | 25 21 38 3c 62 25 20 50 |.F.IF tw|%!8<b% P|
|00003c80| 52 4f 43 6e 65 77 72 74 | 68 72 65 61 64 28 77 68 |ROCnewrt|hread(wh|
|00003c90| 61 6e 64 25 2c 25 31 2c | 74 77 25 21 30 2c 74 77 |and%,%1,|tw%!0,tw|
|00003ca0| 25 21 38 2c 74 77 25 21 | 38 2b 33 38 2c 62 25 2c |%!8,tw%!|8+38,b%,|
|00003cb0| 77 6b 25 29 0d 12 e8 05 | cd 0d 12 f2 0c 6d 77 25 |wk%)....|.....mw%|
|00003cc0| 3d 6f 6d 77 25 0d 12 fc | 49 c9 20 28 6d 62 25 20 |=omw%...|I. (mb% |
|00003cd0| 80 20 25 30 31 30 29 3e | 30 3a f4 20 57 68 65 6e |. %010)>|0:. When|
|00003ce0| 20 4d 65 6e 75 20 70 72 | 65 73 73 65 64 20 61 64 | Menu pr|essed ad|
|00003cf0| 6a 75 73 74 20 6c 65 66 | 74 20 74 6f 70 20 6e 6f |just lef|t top no|
|00003d00| 74 20 62 6f 74 74 6f 6d | 20 72 69 67 68 74 0d 13 |t bottom| right..|
|00003d10| 06 36 f4 20 4d 65 6e 75 | 20 2b 20 53 65 6c 65 63 |.6. Menu| + Selec|
|00003d20| 74 20 3d 20 62 72 69 6e | 67 20 74 6f 20 66 72 6f |t = brin|g to fro|
|00003d30| 6e 74 20 26 20 61 64 6a | 75 73 74 20 74 6f 70 20 |nt & adj|ust top |
|00003d40| 6c 65 66 74 0d 13 10 2f | f4 20 4d 65 6e 75 20 2b |left.../|. Menu +|
|00003d50| 20 41 64 6a 75 73 74 20 | 3d 20 6c 65 61 76 65 20 | Adjust |= leave |
|00003d60| 61 6e 64 20 61 64 6a 75 | 73 74 20 74 6f 70 20 6c |and adju|st top l|
|00003d70| 65 66 74 0d 13 1a 05 cb | 0d 13 24 05 cd 0d 13 2e |eft.....|..$.....|
|00003d80| 10 c9 20 31 32 3a f4 20 | 52 69 67 68 74 0d 13 38 |.. 12:. |Right..8|
|00003d90| 28 e7 20 6f 6d 62 25 3d | 30 20 6f 70 25 3d 31 32 |(. omb%=|0 op%=12|
|00003da0| 3a f2 61 6e 69 6d 28 25 | 30 2c 77 68 61 6e 64 25 |:.anim(%|0,whand%|
|00003db0| 2c 6f 70 25 29 0d 13 42 | 0e e7 20 6f 70 25 3d 31 |,op%)..B|.. op%=1|
|00003dc0| 32 20 8c 0d 13 4c 30 c8 | 99 20 22 54 6f 72 6e 61 |2 ...L0.|. "Torna|
|00003dd0| 64 6f 5f 47 65 74 61 64 | 64 72 22 2c 2c 68 65 61 |do_Getad|dr",,hea|
|00003de0| 70 25 2c 30 2c 77 68 61 | 6e 64 25 20 b8 20 2c 2c |p%,0,wha|nd% . ,,|
|00003df0| 74 77 25 0d 13 56 31 f2 | 6d 6f 75 73 65 72 65 63 |tw%..V1.|mouserec|
|00003e00| 74 28 74 77 25 21 38 2d | 33 38 2c 74 77 25 21 34 |t(tw%!8-|38,tw%!4|
|00003e10| 2d 33 38 2c 74 77 25 21 | 38 2d 32 2c 74 77 25 21 |-38,tw%!|8-2,tw%!|
|00003e20| 34 2d 32 29 0d 13 60 1a | f2 67 65 74 77 69 6e 69 |4-2)..`.|.getwini|
|00003e30| 6e 66 6f 28 77 68 61 6e | 64 25 2c 71 25 29 0d 13 |nfo(whan|d%,q%)..|
|00003e40| 6a 0d 71 25 21 31 36 2b | 3d 33 32 0d 13 74 18 f2 |j.q%!16+|=32..t..|
|00003e50| 74 6f 77 69 6e 28 25 30 | 2c 77 68 61 6e 64 25 2c |towin(%0|,whand%,|
|00003e60| 71 25 29 0d 13 7e 05 cd | 0d 13 88 14 c9 20 31 33 |q%)..~..|..... 13|
|00003e70| 3a f4 20 48 6f 72 69 7a | 20 62 61 72 0d 13 92 0e |:. Horiz| bar....|
|00003e80| e7 20 6f 6d 62 25 3d 30 | 20 8c 0d 13 9c 30 c8 99 |. omb%=0| ....0..|
|00003e90| 20 22 54 6f 72 6e 61 64 | 6f 5f 47 65 74 61 64 64 | "Tornad|o_Getadd|
|00003ea0| 72 22 2c 2c 68 65 61 70 | 25 2c 30 2c 77 68 61 6e |r",,heap|%,0,whan|
|00003eb0| 64 25 20 b8 20 2c 2c 74 | 77 25 0d 13 a6 19 72 65 |d% . ,,t|w%....re|
|00003ec0| 74 61 25 3d 6d 78 25 2d | a4 68 62 61 72 73 28 74 |ta%=mx%-|.hbars(t|
|00003ed0| 77 25 29 0d 13 b0 0a 6f | 70 25 3d 31 33 0d 13 ba |w%)....o|p%=13...|
|00003ee0| 18 f2 61 6e 69 6d 28 25 | 30 2c 77 68 61 6e 64 25 |..anim(%|0,whand%|
|00003ef0| 2c 6f 70 25 29 0d 13 c4 | 05 cd 0d 13 ce 0e e7 20 |,op%)...|....... |
|00003f00| 6f 70 25 3d 31 33 20 8c | 0d 13 d8 30 c8 99 20 22 |op%=13 .|...0.. "|
|00003f10| 54 6f 72 6e 61 64 6f 5f | 47 65 74 61 64 64 72 22 |Tornado_|Getaddr"|
|00003f20| 2c 2c 68 65 61 70 25 2c | 30 2c 77 68 61 6e 64 25 |,,heap%,|0,whand%|
|00003f30| 20 b8 20 2c 2c 74 77 25 | 0d 13 e2 38 f2 6d 6f 75 | . ,,tw%|...8.mou|
|00003f40| 73 65 72 65 63 74 28 74 | 77 25 21 30 2b 33 38 2b |serect(t|w%!0+38+|
|00003f50| 38 2c 74 77 25 21 34 2d | 33 38 2b 38 2c 74 77 25 |8,tw%!4-|38+8,tw%|
|00003f60| 21 38 2d 33 38 2d 38 2c | 74 77 25 21 34 2d 38 29 |!8-38-8,|tw%!4-8)|
|00003f70| 0d 13 ec 11 78 63 25 3d | 6d 78 25 2d 72 65 74 61 |....xc%=|mx%-reta|
|00003f80| 25 0d 13 f6 38 4e 25 3d | 28 28 78 63 25 2d 74 77 |%...8N%=|((xc%-tw|
|00003f90| 25 21 30 2d 33 38 2d 38 | 29 2a 74 77 25 21 34 38 |%!0-38-8|)*tw%!48|
|00003fa0| 29 2f 28 74 77 25 21 38 | 2d 33 38 2d 38 2d 74 77 |)/(tw%!8|-38-8-tw|
|00003fb0| 25 21 30 2d 33 38 2d 38 | 29 0d 14 00 0e 4e 25 2d |%!0-38-8|)....N%-|
|00003fc0| 3d 74 77 25 21 31 36 0d | 14 0a 5e e7 20 94 28 4e |=tw%!16.|..^. .(N|
|00003fd0| 25 29 3e 3d 78 65 69 67 | 25 20 f2 73 63 72 6f 6c |%)>=xeig|% .scrol|
|00003fe0| 6c 28 77 68 61 6e 64 25 | 2c 74 77 25 2c 4e 25 20 |l(whand%|,tw%,N% |
|00003ff0| 80 20 ac 20 28 78 65 69 | 67 25 2d 31 29 2c 30 29 |. . (xei|g%-1),0)|
|00004000| 3a 6d 78 25 3d 6f 6d 78 | 25 2d 28 4e 25 20 80 20 |:mx%=omx|%-(N% . |
|00004010| 28 78 65 69 67 25 2d 31 | 29 29 20 8b 20 6d 78 25 |(xeig%-1|)) . mx%|
|00004020| 3d 6f 6d 78 25 0d 14 14 | 05 cd 0d 14 1e 10 c9 20 |=omx%...|....... |
|00004030| 31 34 3a f4 20 48 57 65 | 6c 6c 0d 14 28 13 e7 20 |14:. HWe|ll..(.. |
|00004040| 6f 6d 62 25 3d 30 20 6f | 70 25 3d 31 34 0d 14 32 |omb%=0 o|p%=14..2|
|00004050| 0e e7 20 6f 70 25 3d 31 | 34 20 8c 0d 14 3c 30 c8 |.. op%=1|4 ...<0.|
|00004060| 99 20 22 54 6f 72 6e 61 | 64 6f 5f 47 65 74 61 64 |. "Torna|do_Getad|
|00004070| 64 72 22 2c 2c 68 65 61 | 70 25 2c 30 2c 77 68 61 |dr",,hea|p%,0,wha|
|00004080| 6e 64 25 20 b8 20 2c 2c | 74 77 25 0d 14 46 34 f2 |nd% . ,,|tw%..F4.|
|00004090| 6d 6f 75 73 65 72 65 63 | 74 28 74 77 25 21 30 2b |mouserec|t(tw%!0+|
|000040a0| 33 38 2c 74 77 25 21 34 | 2d 33 38 2c 74 77 25 21 |38,tw%!4|-38,tw%!|
|000040b0| 38 2d 33 38 2d 32 2c 74 | 77 25 21 34 2d 32 29 0d |8-38-2,t|w%!4-2).|
|000040c0| 14 50 14 e7 20 28 6d 62 | 25 20 80 20 25 31 30 30 |.P.. (mb|% . %100|
|000040d0| 29 20 8c 0d 14 5a 13 f4 | 20 53 63 72 6f 6c 6c 20 |) ...Z..| Scroll |
|000040e0| 61 20 70 61 67 65 0d 14 | 64 0a c8 8e 20 b9 20 ca |a page..|d... . .|
|000040f0| 0d 14 6e 37 c9 20 6d 78 | 25 3e a4 68 62 61 72 65 |..n7. mx|%>.hbare|
|00004100| 28 74 77 25 29 3a f2 73 | 63 72 6f 6c 6c 28 77 68 |(tw%):.s|croll(wh|
|00004110| 61 6e 64 25 2c 74 77 25 | 2c 74 77 25 21 38 2d 74 |and%,tw%|,tw%!8-t|
|00004120| 77 25 21 30 2c 30 29 0d | 14 78 37 c9 20 6d 78 25 |w%!0,0).|.x7. mx%|
|00004130| 3c a4 68 62 61 72 73 28 | 74 77 25 29 3a f2 73 63 |<.hbars(|tw%):.sc|
|00004140| 72 6f 6c 6c 28 77 68 61 | 6e 64 25 2c 74 77 25 2c |roll(wha|nd%,tw%,|
|00004150| 74 77 25 21 30 2d 74 77 | 25 21 38 2c 30 29 0d 14 |tw%!0-tw|%!8,0)..|
|00004160| 82 23 7f 3a f4 20 43 65 | 6e 74 72 65 20 62 61 72 |.#.:. Ce|ntre bar|
|00004170| 20 61 72 6f 75 6e 64 20 | 6d 6f 75 73 65 20 70 74 | around |mouse pt|
|00004180| 72 0d 14 8c 05 cb 0d 14 | 96 05 cd 0d 14 a0 05 cd |r.......|........|
|00004190| 0d 14 aa 0f c9 20 31 35 | 3a f4 20 4c 65 66 74 0d |..... 15|:. Left.|
|000041a0| 14 b4 28 e7 20 6f 6d 62 | 25 3d 30 20 6f 70 25 3d |..(. omb|%=0 op%=|
|000041b0| 31 35 3a f2 61 6e 69 6d | 28 25 30 2c 77 68 61 6e |15:.anim|(%0,whan|
|000041c0| 64 25 2c 6f 70 25 29 0d | 14 be 0e e7 20 6f 70 25 |d%,op%).|.... op%|
|000041d0| 3d 31 35 20 8c 0d 14 c8 | 30 c8 99 20 22 54 6f 72 |=15 ....|0.. "Tor|
|000041e0| 6e 61 64 6f 5f 47 65 74 | 61 64 64 72 22 2c 2c 68 |nado_Get|addr",,h|
|000041f0| 65 61 70 25 2c 30 2c 77 | 68 61 6e 64 25 20 b8 20 |eap%,0,w|hand% . |
|00004200| 2c 2c 74 77 25 0d 14 d2 | 31 f2 6d 6f 75 73 65 72 |,,tw%...|1.mouser|
|00004210| 65 63 74 28 74 77 25 21 | 30 2c 74 77 25 21 34 2d |ect(tw%!|0,tw%!4-|
|00004220| 33 38 2c 74 77 25 21 30 | 2b 33 38 2d 32 2c 74 77 |38,tw%!0|+38-2,tw|
|00004230| 25 21 34 2d 32 29 0d 14 | dc 1a f2 67 65 74 77 69 |%!4-2)..|...getwi|
|00004240| 6e 69 6e 66 6f 28 77 68 | 61 6e 64 25 2c 71 25 29 |ninfo(wh|and%,q%)|
|00004250| 0d 14 e6 0d 71 25 21 31 | 36 2d 3d 33 32 0d 14 f0 |....q%!1|6-=32...|
|00004260| 18 f2 74 6f 77 69 6e 28 | 25 30 2c 77 68 61 6e 64 |..towin(|%0,whand|
|00004270| 25 2c 71 25 29 0d 14 fa | 05 cd 0d 15 04 05 cb 0d |%,q%)...|........|
|00004280| 15 0e 05 cc 0d 15 18 24 | f2 6d 6f 75 73 65 72 65 |.......$|.mousere|
|00004290| 63 74 28 30 2c 30 2c 30 | 2c 30 29 3a 6e 6f 72 65 |ct(0,0,0|,0):nore|
|000042a0| 64 72 61 77 73 25 3d a3 | 0d 15 22 21 e7 20 6f 70 |draws%=.|.."!. op|
|000042b0| 25 3c 3e 30 20 f2 61 6e | 69 6d 28 25 31 2c 77 68 |%<>0 .an|im(%1,wh|
|000042c0| 61 6e 64 25 2c 6f 70 25 | 29 0d 15 2c 09 6f 70 25 |and%,op%|)..,.op%|
|000042d0| 3d 30 0d 15 36 05 cd 0d | 15 40 05 e1 0d 15 4a 05 |=0..6...|.@....J.|
|000042e0| 3a 0d 15 54 19 dd 20 f2 | 69 6e 69 74 72 65 6e 64 |:..T.. .|initrend|
|000042f0| 65 72 28 72 68 65 61 70 | 25 29 0d 15 5e 1a ea 20 |er(rheap|%)..^.. |
|00004300| 65 78 69 73 74 25 2c 6c | 65 6e 25 2c 61 64 64 72 |exist%,l|en%,addr|
|00004310| 25 2c 4e 25 0d 15 68 19 | f4 20 49 6e 69 74 69 61 |%,N%..h.|. Initia|
|00004320| 6c 69 73 65 20 72 65 6e | 64 65 72 65 72 0d 15 72 |lise ren|derer..r|
|00004330| 3e f4 20 46 69 72 73 74 | 20 74 68 69 6e 67 20 69 |>. First| thing i|
|00004340| 73 20 74 6f 20 63 72 65 | 61 74 65 20 6f 75 72 20 |s to cre|ate our |
|00004350| 27 73 70 65 63 69 61 6c | 27 20 62 6c 6f 63 6b 2c |'special|' block,|
|00004360| 20 6e 61 6d 65 6c 79 20 | 3d 2d 31 0d 15 7c 41 f2 | namely |=-1..|A.|
|00004370| 6c 6f 67 28 22 49 6e 69 | 74 69 61 6c 69 73 69 6e |log("Ini|tialisin|
|00004380| 67 20 77 69 6e 64 6f 77 | 20 72 65 6e 64 65 72 65 |g window| rendere|
|00004390| 72 2c 20 70 61 73 73 65 | 64 20 68 65 61 70 20 69 |r, passe|d heap i|
|000043a0| 6e 20 22 2b c3 72 68 65 | 61 70 25 29 0d 15 86 2e |n "+.rhe|ap%)....|
|000043b0| c8 99 20 22 54 6f 72 6e | 61 64 6f 5f 47 65 74 61 |.. "Torn|ado_Geta|
|000043c0| 64 64 72 22 2c 2c 30 2c | 30 2c 72 68 65 61 70 25 |ddr",,0,|0,rheap%|
|000043d0| 20 b8 20 2c 2c 61 64 64 | 72 25 0d 15 90 26 f2 6c | . ,,add|r%...&.l|
|000043e0| 6f 67 28 22 52 65 6e 64 | 65 72 65 72 20 68 65 61 |og("Rend|erer hea|
|000043f0| 70 20 61 74 20 26 22 2b | c3 7e 61 64 64 72 25 29 |p at &"+|.~addr%)|
|00004400| 0d 15 9a 33 c8 99 20 22 | 54 6f 72 6e 61 64 6f 5f |...3.. "|Tornado_|
|00004410| 47 65 74 62 6c 6b 22 2c | 25 31 2c 61 64 64 72 25 |Getblk",|%1,addr%|
|00004420| 2c 2c 33 32 20 b8 20 2c | 2c 61 64 64 72 25 2c 72 |,,32 . ,|,addr%,r|
|00004430| 73 70 25 0d 15 a4 43 f2 | 6c 6f 67 28 22 43 6c 61 |sp%...C.|log("Cla|
|00004440| 69 6d 65 64 20 72 65 6e | 64 65 72 65 72 20 73 70 |imed ren|derer sp|
|00004450| 65 63 69 61 6c 20 62 6c | 6f 63 6b 20 61 73 20 22 |ecial bl|ock as "|
|00004460| 2b c3 7e 72 73 70 25 2b | 22 2c 20 26 22 2b c3 7e |+.~rsp%+|", &"+.~|
|00004470| 61 64 64 72 25 29 0d 15 | ae 18 61 64 64 72 25 21 |addr%)..|..addr%!|
|00004480| 30 3d 30 3a f4 20 52 65 | 73 65 72 76 65 64 0d 15 |0=0:. Re|served..|
|00004490| b8 2b c8 99 20 22 54 6f | 72 6e 61 64 6f 5f 47 65 |.+.. "To|rnado_Ge|
|000044a0| 74 61 64 64 72 22 2c 2c | 30 2c 30 2c 72 68 65 61 |taddr",,|0,0,rhea|
|000044b0| 70 25 20 b8 20 2c 2c 4e | 25 0d 15 c2 39 c8 99 20 |p% . ,,N|%...9.. |
|000044c0| 22 54 6f 72 6e 61 64 6f | 5f 47 65 74 62 6c 6b 22 |"Tornado|_Getblk"|
|000044d0| 2c 25 31 2c 4e 25 2c 2c | 32 36 34 20 b8 20 2c 2c |,%1,N%,,|264 . ,,|
|000044e0| 2c 61 64 64 72 25 21 34 | 3a f4 20 57 6b 73 70 61 |,addr%!4|:. Wkspa|
|000044f0| 63 65 0d 15 cc 1f 61 64 | 64 72 25 21 32 34 3d 30 |ce....ad|dr%!24=0|
|00004500| 3a f4 20 46 6f 6e 74 20 | 68 61 6e 64 6c 65 73 20 |:. Font |handles |
|00004510| 49 0d 15 d6 20 61 64 64 | 72 25 21 32 38 3d 30 3a |I... add|r%!28=0:|
|00004520| f4 20 46 6f 6e 74 20 68 | 61 6e 64 6c 65 73 20 49 |. Font h|andles I|
|00004530| 49 0d 15 e0 36 f2 6c 6f | 67 28 22 53 70 65 63 69 |I...6.lo|g("Speci|
|00004540| 61 6c 20 72 65 6e 64 65 | 72 65 72 20 77 6b 73 70 |al rende|rer wksp|
|00004550| 61 63 65 20 63 72 65 61 | 74 65 64 20 61 74 20 22 |ace crea|ted at "|
|00004560| 2b c3 72 73 70 25 29 0d | 15 ea 19 f4 20 4c 6f 61 |+.rsp%).|.... Loa|
|00004570| 64 20 69 6e 20 6f 75 72 | 20 73 70 72 69 74 65 73 |d in our| sprites|
|00004580| 0d 15 f4 3a c8 99 20 22 | 4f 53 5f 46 69 6c 65 22 |...:.. "|OS_File"|
|00004590| 2c 35 2c 72 65 6e 64 65 | 72 70 61 74 68 24 2b 22 |,5,rende|rpath$+"|
|000045a0| 2e 53 70 72 69 74 65 73 | 22 20 b8 20 65 78 69 73 |.Sprites|" . exis|
|000045b0| 74 25 2c 2c 2c 2c 6c 65 | 6e 25 0d 15 fe 2e e7 20 |t%,,,,le|n%..... |
|000045c0| 65 78 69 73 74 25 3c 3e | 31 20 85 20 31 2c 22 49 |exist%<>|1 . 1,"I|
|000045d0| 20 63 61 6e 27 74 20 66 | 69 6e 64 20 6d 79 20 73 | can't f|ind my s|
|000045e0| 70 72 69 74 65 73 21 22 | 0d 16 08 2e c8 99 20 22 |prites!"|...... "|
|000045f0| 54 6f 72 6e 61 64 6f 5f | 47 65 74 61 64 64 72 22 |Tornado_|Getaddr"|
|00004600| 2c 2c 30 2c 30 2c 72 68 | 65 61 70 25 20 b8 20 2c |,,0,0,rh|eap% . ,|
|00004610| 2c 61 64 64 72 25 0d 16 | 12 38 c8 99 20 22 54 6f |,addr%..|.8.. "To|
|00004620| 72 6e 61 64 6f 5f 47 65 | 74 62 6c 6b 22 2c 25 31 |rnado_Ge|tblk",%1|
|00004630| 2c 61 64 64 72 25 2c 2c | 6c 65 6e 25 2b 31 36 20 |,addr%,,|len%+16 |
|00004640| b8 20 2c 2c 61 64 64 72 | 25 2c 72 73 70 25 0d 16 |. ,,addr|%,rsp%..|
|00004650| 1c 33 f2 6c 6f 67 28 22 | 43 6c 61 69 6d 65 64 20 |.3.log("|Claimed |
|00004660| 6d 65 6d 6f 72 79 20 66 | 6f 72 20 73 70 72 69 74 |memory f|or sprit|
|00004670| 65 73 20 61 74 20 26 22 | 2b c3 7e 61 64 64 72 25 |es at &"|+.~addr%|
|00004680| 29 0d 16 26 13 61 64 64 | 72 25 21 30 3d 6c 65 6e |)..&.add|r%!0=len|
|00004690| 25 2b 31 36 0d 16 30 0e | 61 64 64 72 25 21 38 3d |%+16..0.|addr%!8=|
|000046a0| 31 36 0d 16 3a 16 c8 99 | 20 26 32 45 2c 32 35 36 |16..:...| &2E,256|
|000046b0| 2b 39 2c 61 64 64 72 25 | 0d 16 44 2e c8 99 20 26 |+9,addr%|..D... &|
|000046c0| 32 45 2c 32 35 36 2b 31 | 30 2c 61 64 64 72 25 2c |2E,256+1|0,addr%,|
|000046d0| 72 65 6e 64 65 72 70 61 | 74 68 24 2b 22 2e 53 70 |renderpa|th$+".Sp|
|000046e0| 72 69 74 65 73 22 0d 16 | 4e 46 f2 6c 6f 67 28 22 |rites"..|NF.log("|
|000046f0| 57 69 6e 64 6f 77 20 66 | 75 72 6e 69 74 75 72 65 |Window f|urniture|
|00004700| 20 73 70 72 69 74 65 73 | 20 6c 6f 61 64 65 64 20 | sprites| loaded |
|00004710| 69 6e 74 6f 20 70 72 69 | 76 61 74 65 20 68 65 61 |into pri|vate hea|
|00004720| 70 20 22 2b c3 72 68 65 | 61 70 25 29 0d 16 58 2b |p "+.rhe|ap%)..X+|
|00004730| f2 6c 6f 67 28 22 53 70 | 72 69 74 65 73 20 73 74 |.log("Sp|rites st|
|00004740| 6f 72 65 64 20 61 74 20 | 68 61 6e 64 6c 65 20 22 |ored at |handle "|
|00004750| 2b c3 72 73 70 25 29 0d | 16 62 05 e1 0d 16 6c 05 |+.rsp%).|.b....l.|
|00004760| 3a 0d 16 76 11 f4 20 4d | 69 73 63 4f 70 20 6e 6f |:..v.. M|iscOp no|
|00004770| 73 3a 0d 16 80 1e f4 20 | 31 36 3a 20 72 65 74 75 |s:..... |16: retu|
|00004780| 72 6e 20 73 74 61 72 74 | 20 6f 66 20 76 62 61 72 |rn start| of vbar|
|00004790| 0d 16 8a 1c f4 20 31 37 | 3a 20 72 65 74 75 72 6e |..... 17|: return|
|000047a0| 20 65 6e 64 20 6f 66 20 | 76 62 61 72 0d 16 94 1e | end of |vbar....|
|000047b0| f4 20 31 38 3a 20 72 65 | 74 75 72 6e 20 73 74 61 |. 18: re|turn sta|
|000047c0| 72 74 20 6f 66 20 68 62 | 61 72 0d 16 9e 1c f4 20 |rt of hb|ar..... |
|000047d0| 31 39 3a 20 72 65 74 75 | 72 6e 20 65 6e 64 20 6f |19: retu|rn end o|
|000047e0| 66 20 68 62 61 72 0d 16 | a8 21 f4 20 33 32 3a 20 |f hbar..|.!. 32: |
|000047f0| 6d 6f 64 65 20 63 68 61 | 6e 67 65 20 68 61 73 20 |mode cha|nge has |
|00004800| 6f 63 75 72 72 65 64 0d | 16 b2 18 f4 20 36 34 3a |ocurred.|.... 64:|
|00004810| 20 72 65 67 69 73 74 65 | 72 20 66 6f 6e 74 73 0d | registe|r fonts.|
|00004820| 16 bc 14 f4 20 4f 74 68 | 65 72 20 65 6e 74 72 69 |.... Oth|er entri|
|00004830| 65 73 3a 0d 16 c6 39 f4 | 20 2e 69 6e 69 74 69 61 |es:...9.| .initia|
|00004840| 6c 69 73 65 3a 20 69 6e | 69 74 69 61 6c 69 73 65 |lise: in|itialise|
|00004850| 20 72 65 6e 64 65 72 65 | 72 2c 20 63 6c 61 69 6d | rendere|r, claim|
|00004860| 20 77 6b 73 70 61 63 65 | 20 65 74 63 0d 16 d0 1c | wkspace| etc....|
|00004870| f4 20 2e 72 65 6e 64 65 | 72 3a 20 72 65 64 72 61 |. .rende|r: redra|
|00004880| 77 20 77 69 6e 64 6f 77 | 0d 16 da 05 3a 0d 16 e4 |w window|....:...|
|00004890| 35 dd 20 f2 72 6d 69 73 | 63 6f 70 36 34 28 72 68 |5. .rmis|cop64(rh|
|000048a0| 65 61 70 25 2c 6e 24 2c | 69 24 2c 62 24 2c 62 69 |eap%,n$,|i$,b$,bi|
|000048b0| 24 2c 6d 24 2c 6d 69 24 | 2c 6d 62 24 2c 6d 62 69 |$,m$,mi$|,mb$,mbi|
|000048c0| 24 29 0d 16 ee 11 ea 20 | 61 64 64 72 25 2c 68 25 |$)..... |addr%,h%|
|000048d0| 2c 4e 25 0d 16 f8 38 f4 | 20 41 74 74 65 6d 70 74 |,N%...8.| Attempt|
|000048e0| 73 20 74 6f 20 66 69 6e | 64 20 74 68 65 20 66 6f |s to fin|d the fo|
|000048f0| 6e 74 73 20 6e 6f 77 2c | 20 62 75 74 20 69 66 20 |nts now,| but if |
|00004900| 69 74 20 66 61 69 6c 73 | 20 69 74 0d 17 02 33 f4 |it fails| it...3.|
|00004910| 20 73 74 6f 72 65 73 20 | 61 64 64 72 73 20 6f 66 | stores |addrs of|
|00004920| 20 66 6f 6e 74 20 6e 61 | 6d 65 73 20 66 6f 72 20 | font na|mes for |
|00004930| 6c 61 74 65 72 20 72 65 | 74 72 79 69 6e 67 0d 17 |later re|trying..|
|00004940| 0c 26 f2 6c 6f 67 28 22 | 52 65 6e 64 65 72 65 72 |.&.log("|Renderer|
|00004950| 20 4d 69 73 63 4f 70 5f | 36 34 20 73 74 61 72 74 | MiscOp_|64 start|
|00004960| 65 64 22 29 0d 17 16 2f | f4 20 57 65 27 72 65 20 |ed").../|. We're |
|00004970| 6e 6f 74 20 62 6f 74 68 | 65 72 69 6e 67 20 77 69 |not both|ering wi|
|00004980| 74 68 20 72 65 74 72 79 | 69 6e 67 20 61 73 20 79 |th retry|ing as y|
|00004990| 65 74 21 0d 17 20 2e c8 | 99 20 22 54 6f 72 6e 61 |et!.. ..|. "Torna|
|000049a0| 64 6f 5f 47 65 74 61 64 | 64 72 22 2c 2c 30 2c 30 |do_Getad|dr",,0,0|
|000049b0| 2c 72 68 65 61 70 25 20 | b8 20 2c 2c 61 64 64 72 |,rheap% |. ,,addr|
|000049c0| 25 0d 17 2a 2d c8 99 20 | 22 54 6f 72 6e 61 64 6f |%..*-.. |"Tornado|
|000049d0| 5f 47 65 74 61 64 64 72 | 22 2c 2c 61 64 64 72 25 |_Getaddr|",,addr%|
|000049e0| 2c 2c 2d 31 20 b8 20 2c | 2c 61 64 64 72 25 0d 17 |,,-1 . ,|,addr%..|
|000049f0| 34 2a f2 6c 6f 67 28 22 | 47 65 74 61 64 64 72 20 |4*.log("|Getaddr |
|00004a00| 72 65 74 75 72 6e 73 20 | 77 69 74 68 20 26 22 2b |returns |with &"+|
|00004a10| c3 7e 61 64 64 72 25 29 | 0d 17 3e 31 c8 99 20 22 |.~addr%)|..>1.. "|
|00004a20| 46 6f 6e 74 5f 46 69 6e | 64 46 6f 6e 74 22 2c 2c |Font_Fin|dFont",,|
|00004a30| 6e 24 2c 31 31 2a 31 36 | 2c 31 31 2a 31 36 20 b8 |n$,11*16|,11*16 .|
|00004a40| 20 68 25 3a 4e 25 3d 68 | 25 0d 17 48 35 c8 99 20 | h%:N%=h|%..H5.. |
|00004a50| 22 46 6f 6e 74 5f 46 69 | 6e 64 46 6f 6e 74 22 2c |"Font_Fi|ndFont",|
|00004a60| 2c 69 24 2c 31 31 2a 31 | 36 2c 31 31 2a 31 36 20 |,i$,11*1|6,11*16 |
|00004a70| b8 20 68 25 3a 4e 25 2b | 3d 68 25 3c 3c 38 0d 17 |. h%:N%+|=h%<<8..|
|00004a80| 52 36 c8 99 20 22 46 6f | 6e 74 5f 46 69 6e 64 46 |R6.. "Fo|nt_FindF|
|00004a90| 6f 6e 74 22 2c 2c 62 24 | 2c 31 31 2a 31 36 2c 31 |ont",,b$|,11*16,1|
|00004aa0| 31 2a 31 36 20 b8 20 68 | 25 3a 4e 25 2b 3d 68 25 |1*16 . h|%:N%+=h%|
|00004ab0| 3c 3c 31 36 0d 17 5c 37 | c8 99 20 22 46 6f 6e 74 |<<16..\7|.. "Font|
|00004ac0| 5f 46 69 6e 64 46 6f 6e | 74 22 2c 2c 62 69 24 2c |_FindFon|t",,bi$,|
|00004ad0| 31 31 2a 31 36 2c 31 31 | 2a 31 36 20 b8 20 68 25 |11*16,11|*16 . h%|
|00004ae0| 3a 4e 25 2b 3d 68 25 3c | 3c 32 34 0d 17 66 23 f4 |:N%+=h%<|<24..f#.|
|00004af0| 20 46 6f 72 67 65 74 20 | 61 62 6f 75 74 20 6d 6f | Forget |about mo|
|00004b00| 6e 6f 74 79 70 65 20 66 | 6f 72 20 6e 6f 77 0d 17 |notype f|or now..|
|00004b10| 70 0f 61 64 64 72 25 21 | 32 34 3d 4e 25 0d 17 7a |p.addr%!|24=N%..z|
|00004b20| 36 f2 6c 6f 67 28 22 52 | 65 6e 64 65 72 65 72 20 |6.log("R|enderer |
|00004b30| 66 6f 6e 74 20 63 68 6f | 69 63 65 73 20 6f 70 65 |font cho|ices ope|
|00004b40| 6e 65 64 2c 20 64 61 74 | 61 3d 20 26 22 2b c3 7e |ned, dat|a= &"+.~|
|00004b50| 4e 25 29 0d 17 84 05 e1 | 0d 17 8e 05 3a 0d 17 98 |N%).....|....:...|
|00004b60| 15 dd 20 a4 63 72 65 61 | 74 65 77 69 6e 28 74 77 |.. .crea|tewin(tw|
|00004b70| 25 29 0d 17 a2 14 ea 20 | 68 61 6e 64 25 2c 61 64 |%)..... |hand%,ad|
|00004b80| 64 72 25 2c 4e 25 0d 17 | ac 34 c8 99 20 22 54 6f |dr%,N%..|.4.. "To|
|00004b90| 72 6e 61 64 6f 5f 47 65 | 74 62 6c 6b 22 2c 25 31 |rnado_Ge|tblk",%1|
|00004ba0| 2c 68 65 61 70 25 2c 2c | 36 34 20 b8 20 2c 2c 61 |,heap%,,|64 . ,,a|
|00004bb0| 64 64 72 25 2c 68 61 6e | 64 25 0d 17 b6 13 e3 20 |ddr%,han|d%..... |
|00004bc0| 4e 25 3d 30 20 b8 20 36 | 30 20 88 20 34 0d 17 c0 |N%=0 . 6|0 . 4...|
|00004bd0| 13 61 64 64 72 25 21 4e | 25 3d 74 77 25 21 4e 25 |.addr%!N|%=tw%!N%|
|00004be0| 0d 17 ca 05 ed 0d 17 d4 | 3e f2 6c 6f 67 28 22 43 |........|>.log("C|
|00004bf0| 72 65 61 74 65 64 20 61 | 20 77 69 6e 64 6f 77 20 |reated a| window |
|00004c00| 68 61 6e 64 6c 65 20 22 | 2b c3 68 61 6e 64 25 2b |handle "|+.hand%+|
|00004c10| 22 20 6f 6e 20 68 65 61 | 70 20 22 2b c3 68 65 61 |" on hea|p "+.hea|
|00004c20| 70 25 29 0d 17 de 0a 3d | 68 61 6e 64 25 0d 17 e8 |p%)....=|hand%...|
|00004c30| 05 3a 0d 17 f2 15 dd 20 | f2 6f 70 65 6e 77 69 6e |.:..... |.openwin|
|00004c40| 28 68 61 6e 64 25 29 0d | 17 fc 0e ea 20 61 64 64 |(hand%).|.... add|
|00004c50| 72 25 2c 4e 25 0d 18 06 | 2e c8 99 20 22 54 6f 72 |r%,N%...|... "Tor|
|00004c60| 6e 61 64 6f 5f 47 65 74 | 61 64 64 72 22 2c 2c 30 |nado_Get|addr",,0|
|00004c70| 2c 2c 77 74 65 6d 70 6c | 25 20 b8 20 2c 2c 61 64 |,,wtempl|% . ,,ad|
|00004c80| 64 72 25 0d 18 10 14 e3 | 20 4e 25 3d 32 38 20 b8 |dr%.....| N%=28 .|
|00004c90| 20 38 38 20 88 20 34 0d | 18 1a 13 77 6b 25 21 4e | 88 . 4.|...wk%!N|
|00004ca0| 25 3d 61 64 64 72 25 21 | 4e 25 0d 18 24 05 ed 0d |%=addr%!|N%..$...|
|00004cb0| 18 2e 30 c8 99 20 22 54 | 6f 72 6e 61 64 6f 5f 47 |..0.. "T|ornado_G|
|00004cc0| 65 74 61 64 64 72 22 2c | 2c 68 65 61 70 25 2c 2c |etaddr",|,heap%,,|
|00004cd0| 68 61 6e 64 25 20 b8 20 | 2c 2c 61 64 64 72 25 0d |hand% . |,,addr%.|
|00004ce0| 18 38 11 77 6b 25 21 30 | 3d 61 64 64 72 25 21 30 |.8.wk%!0|=addr%!0|
|00004cf0| 0d 18 42 14 77 6b 25 21 | 34 3d 61 64 64 72 25 21 |..B.wk%!|4=addr%!|
|00004d00| 34 2d 33 38 0d 18 4c 16 | 77 6b 25 21 38 3d 61 64 |4-38..L.|wk%!8=ad|
|00004d10| 64 72 25 21 38 2b 33 38 | 2b 32 0d 18 56 18 77 6b |dr%!8+38|+2..V.wk|
|00004d20| 25 21 31 32 3d 61 64 64 | 72 25 21 31 32 2b 33 38 |%!12=add|r%!12+38|
|00004d30| 2b 32 0d 18 60 0c 77 6b | 25 21 31 36 3d 30 0d 18 |+2..`.wk|%!16=0..|
|00004d40| 6a 17 77 6b 25 21 32 30 | 3d 61 64 64 72 25 21 35 |j.wk%!20|=addr%!5|
|00004d50| 32 2b 31 30 30 0d 18 74 | 13 77 6b 25 21 32 34 3d |2+100..t|.wk%!24=|
|00004d60| 61 64 64 72 25 21 32 34 | 0d 18 7e 0c 77 6b 25 21 |addr%!24|..~.wk%!|
|00004d70| 34 30 3d 30 0d 18 88 0e | 77 6b 25 21 34 34 3d 2d |40=0....|wk%!44=-|
|00004d80| 33 36 0d 18 92 18 77 6b | 25 21 34 38 3d 61 64 64 |36....wk|%!48=add|
|00004d90| 72 25 21 34 38 2b 33 38 | 2b 32 0d 18 9c 1b 77 6b |r%!48+38|+2....wk|
|00004da0| 25 21 35 32 3d 61 64 64 | 72 25 21 35 32 2b 33 38 |%!52=add|r%!52+38|
|00004db0| 2b 33 38 2b 34 0d 18 a6 | 24 c8 99 20 22 57 69 6d |+38+4...|$.. "Wim|
|00004dc0| 70 5f 43 72 65 61 74 65 | 57 69 6e 64 6f 77 22 2c |p_Create|Window",|
|00004dd0| 2c 77 6b 25 20 b8 20 68 | 25 0d 18 b0 5e f2 6c 6f |,wk% . h|%...^.lo|
|00004de0| 67 28 22 43 72 65 61 74 | 65 64 20 52 49 53 43 2d |g("Creat|ed RISC-|
|00004df0| 4f 53 20 64 75 6d 6d 79 | 20 77 69 6e 64 6f 77 2c |OS dummy| window,|
|00004e00| 20 64 69 6d 65 6e 73 69 | 6f 6e 73 20 22 2b c3 77 | dimensi|ons "+.w|
|00004e10| 6b 25 21 30 2b 22 2c 22 | 2b c3 77 6b 25 21 34 2b |k%!0+","|+.wk%!4+|
|00004e20| 22 2c 22 2b c3 77 6b 25 | 21 38 2b 22 2c 22 2b c3 |","+.wk%|!8+","+.|
|00004e30| 77 6b 25 21 31 32 29 0d | 18 ba 42 f2 6c 6f 67 28 |wk%!12).|..B.log(|
|00004e40| 22 53 63 72 6f 6c 6c 20 | 6f 66 66 73 65 74 73 20 |"Scroll |offsets |
|00004e50| 26 20 70 6f 73 3a 20 22 | 2b c3 77 6b 25 21 31 36 |& pos: "|+.wk%!16|
|00004e60| 2b 22 2c 22 2b c3 77 6b | 25 21 32 30 2b 22 2c 22 |+","+.wk|%!20+","|
|00004e70| 2b c3 77 6b 25 21 32 34 | 29 0d 18 c4 48 f2 6c 6f |+.wk%!24|)...H.lo|
|00004e80| 67 28 22 77 69 74 68 20 | 77 6f 72 6b 73 70 61 63 |g("with |workspac|
|00004e90| 65 3a 20 22 2b c3 77 6b | 25 21 34 30 2b 22 2c 22 |e: "+.wk|%!40+","|
|00004ea0| 2b c3 77 6b 25 21 34 34 | 2b 22 2c 22 2b c3 77 6b |+.wk%!44|+","+.wk|
|00004eb0| 25 21 34 38 2b 22 2c 22 | 2b c3 77 6b 25 21 35 32 |%!48+","|+.wk%!52|
|00004ec0| 29 0d 18 ce 0f 61 64 64 | 72 25 21 36 30 3d 68 25 |)....add|r%!60=h%|
|00004ed0| 0d 18 d8 0c 77 6b 25 21 | 30 3d 68 25 0d 18 e2 20 |....wk%!|0=h%... |
|00004ee0| 77 6b 25 21 34 3d 30 3a | f4 20 54 6f 72 6e 61 64 |wk%!4=0:|. Tornad|
|00004ef0| 6f 20 74 61 73 6b 20 6f | 77 6e 65 72 0d 18 ec 0f |o task o|wner....|
|00004f00| 77 6b 25 21 38 3d 68 61 | 6e 64 25 0d 18 f6 1c f2 |wk%!8=ha|nd%.....|
|00004f10| 61 64 64 65 6e 74 72 79 | 28 77 69 6e 63 61 63 68 |addentry|(wincach|
|00004f20| 65 25 2c 77 6b 25 29 0d | 19 00 34 f2 6c 6f 67 28 |e%,wk%).|..4.log(|
|00004f30| 22 43 61 63 68 65 64 20 | 52 49 53 43 2d 4f 53 20 |"Cached |RISC-OS |
|00004f40| 77 69 6e 64 6f 77 20 69 | 6e 20 63 6f 6e 76 65 72 |window i|n conver|
|00004f50| 73 69 6f 6e 20 6c 69 73 | 74 22 29 0d 19 0a 0c 77 |sion lis|t")....w|
|00004f60| 6b 25 21 30 3d 68 25 0d | 19 14 21 c8 99 20 22 57 |k%!0=h%.|..!.. "W|
|00004f70| 69 6d 70 5f 47 65 74 57 | 69 6e 64 6f 77 53 74 61 |imp_GetW|indowSta|
|00004f80| 74 65 22 2c 2c 77 6b 25 | 0d 19 1e 1d c8 99 20 22 |te",,wk%|...... "|
|00004f90| 57 69 6d 70 5f 4f 70 65 | 6e 57 69 6e 64 6f 77 22 |Wimp_Ope|nWindow"|
|00004fa0| 2c 2c 77 6b 25 0d 19 28 | 21 c8 99 20 22 57 69 6d |,,wk%..(|!.. "Wim|
|00004fb0| 70 5f 47 65 74 57 69 6e | 64 6f 77 53 74 61 74 65 |p_GetWin|dowState|
|00004fc0| 22 2c 2c 77 6b 25 0d 19 | 32 11 61 64 64 72 25 21 |",,wk%..|2.addr%!|
|00004fd0| 30 3d 77 6b 25 21 34 0d | 19 3c 14 61 64 64 72 25 |0=wk%!4.|.<.addr%|
|00004fe0| 21 34 3d 77 6b 25 21 38 | 2b 33 38 0d 19 46 17 61 |!4=wk%!8|+38..F.a|
|00004ff0| 64 64 72 25 21 38 3d 77 | 6b 25 21 31 32 2d 33 38 |ddr%!8=w|k%!12-38|
|00005000| 2d 32 0d 19 50 18 61 64 | 64 72 25 21 31 32 3d 77 |-2..P.ad|dr%!12=w|
|00005010| 6b 25 21 31 36 2d 33 38 | 2d 32 0d 19 5a 13 61 64 |k%!16-38|-2..Z.ad|
|00005020| 64 72 25 21 31 36 3d 77 | 6b 25 21 32 30 0d 19 64 |dr%!16=w|k%!20..d|
|00005030| 14 f4 61 64 64 72 25 21 | 32 30 3d 77 6b 25 21 32 |..addr%!|20=wk%!2|
|00005040| 34 0d 19 6e 14 f4 61 64 | 64 72 25 21 32 34 3d 77 |4..n..ad|dr%!24=w|
|00005050| 6b 25 21 32 38 0d 19 78 | 05 e1 0d 19 82 05 3a 0d |k%!28..x|......:.|
|00005060| 19 8c 13 dd 20 a4 74 77 | 69 6e 28 77 69 6d 70 68 |.... .tw|in(wimph|
|00005070| 25 29 0d 19 96 0b 77 6b | 25 21 38 3d 30 0d 19 a0 |%)....wk|%!8=0...|
|00005080| 24 f2 66 69 6e 64 65 6e | 74 72 79 28 77 69 6e 63 |$.finden|try(winc|
|00005090| 61 63 68 65 25 2c 77 69 | 6d 70 68 25 2c 77 6b 25 |ache%,wi|mph%,wk%|
|000050a0| 29 0d 19 aa 0a 3d 77 6b | 25 21 38 0d 19 b4 05 3a |)....=wk|%!8....:|
|000050b0| 0d 19 be 1f dd 20 f2 73 | 63 72 6f 6c 6c 28 77 68 |..... .s|croll(wh|
|000050c0| 61 6e 64 25 2c 74 77 25 | 2c 78 25 2c 79 25 29 0d |and%,tw%|,x%,y%).|
|000050d0| 19 c8 1c f4 20 53 63 72 | 6f 6c 6c 20 77 69 6e 64 |.... Scr|oll wind|
|000050e0| 6f 77 20 62 79 20 78 25 | 2c 79 25 0d 19 d2 1d ea |ow by x%|,y%.....|
|000050f0| 20 78 31 25 2c 79 31 25 | 2c 78 32 25 2c 79 32 25 | x1%,y1%|,x2%,y2%|
|00005100| 2c 78 64 25 2c 79 64 25 | 0d 19 dc 23 ea 20 69 78 |,xd%,yd%|...#. ix|
|00005110| 31 25 2c 69 78 32 25 2c | 69 79 31 25 2c 69 79 32 |1%,ix2%,|iy1%,iy2|
|00005120| 25 2c 62 79 31 25 2c 62 | 79 32 25 0d 19 e6 31 ea |%,by1%,b|y2%...1.|
|00005130| 20 76 62 61 72 6f 79 31 | 25 2c 76 62 61 72 6f 79 | vbaroy1|%,vbaroy|
|00005140| 32 25 2c 68 62 61 72 6f | 78 31 25 2c 68 62 61 72 |2%,hbaro|x1%,hbar|
|00005150| 6f 78 32 25 2c 66 78 25 | 2c 66 79 25 0d 19 f0 0d |ox2%,fx%|,fy%....|
|00005160| e7 20 79 25 3e 3d 30 20 | 8c 0d 19 fa 12 79 31 25 |. y%>=0 |.....y1%|
|00005170| 3d 74 77 25 21 34 2b 79 | 25 2b 32 0d 1a 04 0e 79 |=tw%!4+y|%+2....y|
|00005180| 32 25 3d 74 77 25 21 31 | 32 0d 1a 0e 12 69 79 31 |2%=tw%!1|2....iy1|
|00005190| 25 3d 74 77 25 21 31 32 | 2d 79 25 0d 1a 18 0f 69 |%=tw%!12|-y%....i|
|000051a0| 79 32 25 3d 74 77 25 21 | 31 32 0d 1a 22 0e 62 79 |y2%=tw%!|12..".by|
|000051b0| 31 25 3d 74 77 25 21 34 | 0d 1a 2c 12 62 79 32 25 |1%=tw%!4|..,.by2%|
|000051c0| 3d 74 77 25 21 31 32 2d | 79 25 0d 1a 36 05 cc 0d |=tw%!12-|y%..6...|
|000051d0| 1a 40 0f 79 31 25 3d 74 | 77 25 21 34 2b 32 0d 1a |.@.y1%=t|w%!4+2..|
|000051e0| 4a 11 79 32 25 3d 74 77 | 25 21 31 32 2b 79 25 0d |J.y2%=tw|%!12+y%.|
|000051f0| 1a 54 0e 69 79 31 25 3d | 74 77 25 21 34 0d 1a 5e |.T.iy1%=|tw%!4..^|
|00005200| 11 69 79 32 25 3d 74 77 | 25 21 34 2d 79 25 0d 1a |.iy2%=tw|%!4-y%..|
|00005210| 68 11 62 79 31 25 3d 74 | 77 25 21 34 2d 79 25 0d |h.by1%=t|w%!4-y%.|
|00005220| 1a 72 0f 62 79 32 25 3d | 74 77 25 21 31 32 0d 1a |.r.by2%=|tw%!12..|
|00005230| 7c 05 cd 0d 1a 86 0d e7 | 20 78 25 3e 3d 30 20 8c ||.......| x%>=0 .|
|00005240| 0d 1a 90 12 78 31 25 3d | 74 77 25 21 30 2b 78 25 |....x1%=|tw%!0+x%|
|00005250| 2b 32 0d 1a 9a 0d 78 32 | 25 3d 74 77 25 21 38 0d |+2....x2|%=tw%!8.|
|00005260| 1a a4 11 69 78 31 25 3d | 74 77 25 21 38 2d 78 25 |...ix1%=|tw%!8-x%|
|00005270| 0d 1a ae 0e 69 78 32 25 | 3d 74 77 25 21 38 0d 1a |....ix2%|=tw%!8..|
|00005280| b8 05 cc 0d 1a c2 0f 78 | 31 25 3d 74 77 25 21 30 |.......x|1%=tw%!0|
|00005290| 2b 32 0d 1a cc 10 78 32 | 25 3d 74 77 25 21 38 2b |+2....x2|%=tw%!8+|
|000052a0| 78 25 0d 1a d6 0e 69 78 | 31 25 3d 74 77 25 21 30 |x%....ix|1%=tw%!0|
|000052b0| 0d 1a e0 11 69 78 32 25 | 3d 74 77 25 21 30 2d 78 |....ix2%|=tw%!0-x|
|000052c0| 25 0d 1a ea 05 cd 0d 1a | f4 2d 68 62 61 72 6f 78 |%.......|.-hbarox|
|000052d0| 31 25 3d a4 68 62 61 72 | 73 28 74 77 25 29 3a 68 |1%=.hbar|s(tw%):h|
|000052e0| 62 61 72 6f 78 32 25 3d | a4 68 62 61 72 65 28 74 |barox2%=|.hbare(t|
|000052f0| 77 25 29 0d 1a fe 2d 76 | 62 61 72 6f 79 31 25 3d |w%)...-v|baroy1%=|
|00005300| a4 76 62 61 72 73 28 74 | 77 25 29 3a 76 62 61 72 |.vbars(t|w%):vbar|
|00005310| 6f 79 32 25 3d a4 76 62 | 61 72 65 28 74 77 25 29 |oy2%=.vb|are(tw%)|
|00005320| 0d 1b 08 54 f2 6c 6f 67 | 28 22 4d 6f 76 69 6e 67 |...T.log|("Moving|
|00005330| 20 62 6c 6f 63 6b 20 28 | 73 63 72 29 20 22 2b c3 | block (|scr) "+.|
|00005340| 78 31 25 2b 22 2c 22 2b | c3 79 31 25 2b 22 2c 22 |x1%+","+|.y1%+","|
|00005350| 2b c3 78 32 25 2b 22 2c | 22 2b c3 79 32 25 2b 22 |+.x2%+",|"+.y2%+"|
|00005360| 20 62 79 20 22 2b c3 2d | 78 25 2b 22 2c 22 2b c3 | by "+.-|x%+","+.|
|00005370| 2d 79 25 29 0d 1b 12 18 | f2 78 79 64 28 74 77 25 |-y%)....|.xyd(tw%|
|00005380| 21 36 30 2c 78 64 25 2c | 79 64 25 29 0d 1b 1c 0c |!60,xd%,|yd%)....|
|00005390| 78 31 25 2d 3d 78 64 25 | 0d 1b 26 0c 79 31 25 2d |x1%-=xd%|..&.y1%-|
|000053a0| 3d 79 64 25 0d 1b 30 0c | 78 32 25 2d 3d 78 64 25 |=yd%..0.|x2%-=xd%|
|000053b0| 0d 1b 3a 0c 79 32 25 2d | 3d 79 64 25 0d 1b 44 0e |..:.y2%-|=yd%..D.|
|000053c0| 78 64 25 3d 78 31 25 2d | 78 25 0d 1b 4e 0e 79 64 |xd%=x1%-|x%..N.yd|
|000053d0| 25 3d 79 31 25 2d 79 25 | 0d 1b 58 5f f2 6c 6f 67 |%=y1%-y%|..X_.log|
|000053e0| 28 22 20 20 20 20 6d 61 | 64 65 20 72 65 6c 61 74 |("    ma|de relat|
|000053f0| 69 76 65 20 74 6f 20 77 | 6b 61 72 65 61 20 3d 20 |ive to w|karea = |
|00005400| 22 2b c3 78 31 25 2b 22 | 2c 22 2b c3 79 31 25 2b |"+.x1%+"|,"+.y1%+|
|00005410| 22 2c 22 2b c3 78 32 25 | 2b 22 2c 22 2b c3 79 32 |","+.x2%|+","+.y2|
|00005420| 25 2b 22 20 74 6f 20 22 | 2b c3 78 64 25 2b 22 2c |%+" to "|+.xd%+",|
|00005430| 22 2b c3 79 64 25 29 0d | 1b 62 36 c8 99 20 22 57 |"+.yd%).|.b6.. "W|
|00005440| 69 6d 70 5f 42 6c 6f 63 | 6b 43 6f 70 79 22 2c 74 |imp_Bloc|kCopy",t|
|00005450| 77 25 21 36 30 2c 78 31 | 25 2c 79 31 25 2c 78 32 |w%!60,x1|%,y1%,x2|
|00005460| 25 2c 79 32 25 2c 78 64 | 25 2c 79 64 25 0d 1b 6c |%,y2%,xd|%,yd%..l|
|00005470| 38 f2 6c 6f 67 28 22 57 | 69 6e 64 6f 77 20 73 63 |8.log("W|indow sc|
|00005480| 72 6f 6c 6c 20 6f 66 66 | 73 65 74 73 20 3d 20 22 |roll off|sets = "|
|00005490| 2b c3 74 77 25 21 31 36 | 2b 22 2c 22 2b c3 74 77 |+.tw%!16|+","+.tw|
|000054a0| 25 21 32 30 29 0d 1b 76 | 0f 66 78 25 3d a3 3a 66 |%!20)..v|.fx%=.:f|
|000054b0| 79 25 3d a3 0d 1b 80 2c | f2 6c 6f 67 28 22 20 20 |y%=....,|.log("  |
|000054c0| 20 20 61 66 74 65 72 20 | 3d 20 22 2b c3 74 77 25 |  after |= "+.tw%|
|000054d0| 21 31 36 2b 22 2c 22 2b | c3 74 77 25 21 32 30 29 |!16+","+|.tw%!20)|
|000054e0| 0d 1b 8a 35 e7 20 a4 68 | 62 61 72 73 28 74 77 25 |...5. .h|bars(tw%|
|000054f0| 29 3c 68 62 61 72 6f 78 | 31 25 20 68 62 61 72 6f |)<hbarox|1% hbaro|
|00005500| 78 31 25 3d a4 68 62 61 | 72 73 28 74 77 25 29 3a |x1%=.hba|rs(tw%):|
|00005510| 66 78 25 3d b9 0d 1b 94 | 35 e7 20 a4 76 62 61 72 |fx%=....|5. .vbar|
|00005520| 73 28 74 77 25 29 3c 76 | 62 61 72 6f 79 31 25 20 |s(tw%)<v|baroy1% |
|00005530| 76 62 61 72 6f 79 31 25 | 3d a4 76 62 61 72 73 28 |vbaroy1%|=.vbars(|
|00005540| 74 77 25 29 3a 66 79 25 | 3d b9 0d 1b 9e 35 e7 20 |tw%):fy%|=....5. |
|00005550| a4 68 62 61 72 65 28 74 | 77 25 29 3e 68 62 61 72 |.hbare(t|w%)>hbar|
|00005560| 6f 78 32 25 20 68 62 61 | 72 6f 78 32 25 3d a4 68 |ox2% hba|rox2%=.h|
|00005570| 62 61 72 65 28 74 77 25 | 29 3a 66 78 25 3d b9 0d |bare(tw%|):fx%=..|
|00005580| 1b a8 35 e7 20 a4 76 62 | 61 72 65 28 74 77 25 29 |..5. .vb|are(tw%)|
|00005590| 3e 76 62 61 72 6f 79 32 | 25 20 76 62 61 72 6f 79 |>vbaroy2|% vbaroy|
|000055a0| 32 25 3d a4 76 62 61 72 | 65 28 74 77 25 29 3a 66 |2%=.vbar|e(tw%):f|
|000055b0| 79 25 3d b9 0d 1b b2 14 | e7 20 6e 6f 72 65 64 72 |y%=.....|. noredr|
|000055c0| 61 77 73 25 3d a3 20 8c | 0d 1b bc 55 e7 20 66 78 |aws%=. .|...U. fx|
|000055d0| 25 20 21 77 6b 25 3d 31 | 34 3a f2 6e 65 77 72 74 |% !wk%=1|4:.newrt|
|000055e0| 68 72 65 61 64 28 77 68 | 61 6e 64 25 2c 25 31 2c |hread(wh|and%,%1,|
|000055f0| 68 62 61 72 6f 78 31 25 | 2d 34 2c 74 77 25 21 34 |hbarox1%|-4,tw%!4|
|00005600| 2d 33 38 2b 38 2c 68 62 | 61 72 6f 78 32 25 2b 34 |-38+8,hb|arox2%+4|
|00005610| 2c 74 77 25 21 34 2d 38 | 2c 77 6b 25 29 0d 1b c6 |,tw%!4-8|,wk%)...|
|00005620| 54 e7 20 66 79 25 20 21 | 77 6b 25 3d 39 3a f2 6e |T. fy% !|wk%=9:.n|
|00005630| 65 77 72 74 68 72 65 61 | 64 28 77 68 61 6e 64 25 |ewrthrea|d(whand%|
|00005640| 2c 25 31 2c 74 77 25 21 | 38 2b 38 2c 76 62 61 72 |,%1,tw%!|8+8,vbar|
|00005650| 6f 79 31 25 2d 34 2c 74 | 77 25 21 38 2b 33 38 2d |oy1%-4,t|w%!8+38-|
|00005660| 38 2c 76 62 61 72 6f 79 | 32 25 2b 34 2c 77 6b 25 |8,vbaroy|2%+4,wk%|
|00005670| 29 0d 1b d0 31 21 77 6b | 25 3d 31 3a f4 20 54 68 |)...1!wk|%=1:. Th|
|00005680| 65 20 77 6f 72 6b 20 61 | 72 65 61 20 69 73 20 62 |e work a|rea is b|
|00005690| 65 69 6e 67 20 61 66 66 | 65 63 74 65 64 20 6f 6e |eing aff|ected on|
|000056a0| 6c 79 0d 1b da 3c f2 6e | 65 77 72 74 68 72 65 61 |ly...<.n|ewrthrea|
|000056b0| 64 28 77 68 61 6e 64 25 | 2c 25 31 2c 74 77 25 21 |d(whand%|,%1,tw%!|
|000056c0| 30 2c 69 79 31 25 2c 74 | 77 25 21 38 2c 69 79 32 |0,iy1%,t|w%!8,iy2|
|000056d0| 25 2c 77 6b 25 29 3a f4 | 20 68 6f 72 69 7a 0d 1b |%,wk%):.| horiz..|
|000056e0| e4 39 f2 6e 65 77 72 74 | 68 72 65 61 64 28 77 68 |.9.newrt|hread(wh|
|000056f0| 61 6e 64 25 2c 25 31 2c | 69 78 31 25 2c 62 79 31 |and%,%1,|ix1%,by1|
|00005700| 25 2c 69 78 32 25 2c 62 | 79 32 25 2c 77 6b 25 29 |%,ix2%,b|y2%,wk%)|
|00005710| 3a f4 20 76 65 72 74 0d | 1b ee 05 cd 0d 1b f8 1f |:. vert.|........|
|00005720| f2 66 69 78 77 69 6e 28 | 25 30 30 30 2c 74 77 25 |.fixwin(|%000,tw%|
|00005730| 21 36 30 2c 77 68 61 6e | 64 25 29 0d 1c 02 05 e1 |!60,whan|d%).....|
|00005740| 0d 1c 0c 05 3a 0d 1c 16 | 1c dd 20 f2 67 65 74 77 |....:...|.. .getw|
|00005750| 69 6e 69 6e 66 6f 28 77 | 68 61 6e 64 25 2c 71 25 |ininfo(w|hand%,q%|
|00005760| 29 0d 1c 20 0b ea 20 4e | 25 2c 73 25 0d 1c 2a 34 |).. .. N|%,s%..*4|
|00005770| c8 99 20 22 54 6f 72 6e | 61 64 6f 5f 47 65 74 61 |.. "Torn|ado_Geta|
|00005780| 64 64 72 22 2c 2c 68 65 | 61 70 25 2c 30 2c 77 68 |ddr",,he|ap%,0,wh|
|00005790| 61 6e 64 25 20 b8 20 2c | 2c 74 77 25 2c 2c 73 25 |and% . ,|,tw%,,s%|
|000057a0| 0d 1c 34 13 e3 20 4e 25 | 3d 30 20 b8 20 73 25 20 |..4.. N%|=0 . s% |
|000057b0| 88 20 34 0d 1c 3e 10 71 | 25 21 4e 25 3d 74 77 25 |. 4..>.q|%!N%=tw%|
|000057c0| 21 4e 25 0d 1c 48 05 ed | 0d 1c 52 05 e1 0d 1c 5c |!N%..H..|..R....\|
|000057d0| 05 3a 0d 1c 66 1e dd 20 | f2 74 6f 77 69 6e 28 66 |.:..f.. |.towin(f|
|000057e0| 6c 61 67 73 25 2c 77 68 | 61 6e 64 25 2c 71 25 29 |lags%,wh|and%,q%)|
|000057f0| 0d 1c 70 1d f4 20 43 68 | 61 6e 67 65 73 20 77 69 |..p.. Ch|anges wi|
|00005800| 6e 64 6f 77 73 20 61 74 | 74 72 69 62 73 0d 1c 7a |ndows at|tribs..z|
|00005810| 2b ea 20 74 77 25 2c 4e | 25 2c 66 31 25 2c 66 32 |+. tw%,N|%,f1%,f2|
|00005820| 25 2c 66 25 2c 62 78 62 | 25 2c 62 79 62 25 2c 62 |%,f%,bxb|%,byb%,b|
|00005830| 78 61 25 2c 62 79 61 25 | 0d 1c 84 1d f2 6c 6f 67 |xa%,bya%|.....log|
|00005840| 28 22 50 52 4f 43 74 6f | 77 69 6e 20 65 6e 74 65 |("PROCto|win ente|
|00005850| 72 65 64 22 29 0d 1c 8e | 08 66 25 3d 30 0d 1c 98 |red")...|.f%=0...|
|00005860| 32 c8 99 20 22 54 6f 72 | 6e 61 64 6f 5f 47 65 74 |2.. "Tor|nado_Get|
|00005870| 61 64 64 72 22 2c 2c 68 | 65 61 70 25 2c 30 2c 77 |addr",,h|eap%,0,w|
|00005880| 68 61 6e 64 25 20 b8 20 | 2c 2c 74 77 25 20 20 0d |hand% . |,,tw%  .|
|00005890| 1c a2 31 f4 20 44 6f 20 | 63 68 65 63 6b 73 20 6f |..1. Do |checks o|
|000058a0| 6e 20 71 25 2c 20 77 68 | 69 63 68 20 6d 75 73 74 |n q%, wh|ich must|
|000058b0| 20 62 65 20 6f 76 65 72 | 77 72 69 74 61 62 6c 65 | be over|writable|
|000058c0| 0d 1c ac 27 e7 20 71 25 | 21 38 2d 71 25 21 30 3e |...'. q%|!8-q%!0>|
|000058d0| 74 77 25 21 34 38 20 71 | 25 21 38 3d 71 25 21 30 |tw%!48 q|%!8=q%!0|
|000058e0| 2b 74 77 25 21 34 38 0d | 1c b6 29 e7 20 71 25 21 |+tw%!48.|..). q%!|
|000058f0| 31 32 2d 71 25 21 34 3e | 74 77 25 21 35 32 20 71 |12-q%!4>|tw%!52 q|
|00005900| 25 21 34 3d 71 25 21 31 | 32 2d 74 77 25 21 35 32 |%!4=q%!1|2-tw%!52|
|00005910| 0d 1c c0 15 e7 20 71 25 | 21 31 36 3c 30 20 71 25 |..... q%|!16<0 q%|
|00005920| 21 31 36 3d 30 0d 1c ca | 15 e7 20 71 25 21 32 30 |!16=0...|.. q%!20|
|00005930| 3c 30 20 71 25 21 32 30 | 3d 30 0d 1c d4 05 3a 0d |<0 q%!20|=0....:.|
|00005940| 1c de 19 e7 20 28 71 25 | 21 32 38 20 80 20 31 3c |.... (q%|!28 . 1<|
|00005950| 3c 31 34 29 3d 30 20 8c | 0d 1c e8 1c e7 20 71 25 |<14)=0 .|..... q%|
|00005960| 21 34 3c 33 38 20 71 25 | 21 31 32 2b 3d 33 38 2d |!4<38 q%|!12+=38-|
|00005970| 71 25 21 34 0d 1c f2 27 | e7 20 71 25 21 38 3e 78 |q%!4...'|. q%!8>x|
|00005980| 77 69 64 25 2d 33 38 20 | 71 25 21 30 2d 3d 71 25 |wid%-38 |q%!0-=q%|
|00005990| 21 38 2d 78 77 69 64 25 | 2b 33 38 0d 1c fc 05 cd |!8-xwid%|+38.....|
|000059a0| 0d 1d 06 15 e7 20 71 25 | 21 30 3c 33 38 20 71 25 |..... q%|!0<38 q%|
|000059b0| 21 30 3d 33 38 0d 1d 10 | 23 e7 20 71 25 21 31 32 |!0=38...|#. q%!12|
|000059c0| 3e 79 77 69 64 25 2d 33 | 38 20 71 25 21 31 32 3d |>ywid%-3|8 q%!12=|
|000059d0| 79 77 69 64 25 2d 33 38 | 0d 1d 1a 05 3a 0d 1d 24 |ywid%-38|....:..$|
|000059e0| 0f 66 31 25 3d a3 3a 66 | 32 25 3d a3 0d 1d 2e 7e |.f1%=.:f|2%=....~|
|000059f0| e7 20 71 25 21 31 36 3e | 3d 28 74 77 25 21 34 38 |. q%!16>|=(tw%!48|
|00005a00| 2d 28 74 77 25 21 38 2d | 74 77 25 21 30 29 29 20 |-(tw%!8-|tw%!0)) |
|00005a10| f2 6c 6f 67 28 22 20 20 | 71 25 21 31 36 20 77 61 |.log("  |q%!16 wa|
|00005a20| 73 20 22 2b c3 71 25 21 | 31 36 29 3a 71 25 21 31 |s "+.q%!|16):q%!1|
|00005a30| 36 3d 28 74 77 25 21 34 | 38 2d 28 74 77 25 21 38 |6=(tw%!4|8-(tw%!8|
|00005a40| 2d 74 77 25 21 30 29 29 | 3a 66 31 25 3d b9 3a f2 |-tw%!0))|:f1%=.:.|
|00005a50| 6c 6f 67 28 22 20 20 71 | 25 21 31 36 20 6e 6f 77 |log("  q|%!16 now|
|00005a60| 20 22 2b c3 71 25 21 31 | 36 29 0d 1d 38 48 e7 20 | "+.q%!1|6)..8H. |
|00005a70| 71 25 21 32 30 3e 3d 28 | 74 77 25 21 35 32 2d 28 |q%!20>=(|tw%!52-(|
|00005a80| 74 77 25 21 31 32 2d 74 | 77 25 21 34 29 29 20 71 |tw%!12-t|w%!4)) q|
|00005a90| 25 21 32 30 3d 28 74 77 | 25 21 35 32 2d 28 74 77 |%!20=(tw|%!52-(tw|
|00005aa0| 25 21 31 32 2d 74 77 25 | 21 34 29 29 3a 66 32 25 |%!12-tw%|!4)):f2%|
|00005ab0| 3d b9 0d 1d 42 3b e7 20 | 66 31 25 20 80 20 66 32 |=...B;. |f1% . f2|
|00005ac0| 25 20 71 25 21 32 38 3d | 71 25 21 32 38 20 84 20 |% q%!28=|q%!28 . |
|00005ad0| 31 3c 3c 31 35 20 8b 20 | 71 25 21 32 38 3d 71 25 |1<<15 . |q%!28=q%|
|00005ae0| 21 32 38 20 80 20 ac 20 | 31 3c 3c 31 35 0d 1d 4c |!28 . . |1<<15..L|
|00005af0| 15 e7 20 71 25 21 32 34 | 3d 2d 31 20 66 25 2b 3d |.. q%!24|=-1 f%+=|
|00005b00| 25 31 0d 1d 56 05 3a 0d | 1d 60 1a f4 20 55 70 64 |%1..V.:.|.`.. Upd|
|00005b10| 61 74 65 20 61 72 65 61 | 73 20 65 78 70 6f 73 65 |ate area|s expose|
|00005b20| 64 0d 1d 6a 1b f4 20 41 | 72 65 61 20 62 65 66 6f |d..j.. A|rea befo|
|00005b30| 72 65 20 69 73 20 69 6e | 20 74 77 25 0d 1d 74 17 |re is in| tw%..t.|
|00005b40| f4 20 41 72 65 61 20 6e | 6f 77 20 69 73 20 69 6e |. Area n|ow is in|
|00005b50| 20 71 25 0d 1d 7e 15 62 | 78 62 25 3d 74 77 25 21 | q%..~.b|xb%=tw%!|
|00005b60| 30 2d 74 77 25 21 31 36 | 0d 1d 88 15 62 79 62 25 |0-tw%!16|....byb%|
|00005b70| 3d 74 77 25 21 34 2d 74 | 77 25 21 32 30 0d 1d 92 |=tw%!4-t|w%!20...|
|00005b80| 13 62 78 61 25 3d 71 25 | 21 30 2d 71 25 21 31 36 |.bxa%=q%|!0-q%!16|
|00005b90| 0d 1d 9c 13 62 79 61 25 | 3d 71 25 21 34 2d 71 25 |....bya%|=q%!4-q%|
|00005ba0| 21 32 30 0d 1d a6 43 f4 | 20 4e 6f 77 2c 20 69 66 |!20...C.| Now, if|
|00005bb0| 20 62 79 62 25 3d 62 79 | 61 25 20 74 68 65 6e 20 | byb%=by|a% then |
|00005bc0| 6e 6f 20 73 63 72 6f 6c | 6c 69 6e 67 2c 20 6e 65 |no scrol|ling, ne|
|00005bd0| 77 20 73 74 75 66 66 20 | 63 6f 6d 69 6e 67 20 69 |w stuff |coming i|
|00005be0| 6e 20 66 72 6f 6d 0d 1d | b0 0c f4 20 62 6f 74 74 |n from..|... bott|
|00005bf0| 6f 6d 0d 1d ba 1b 21 77 | 6b 25 3d 30 3a f4 20 47 |om....!w|k%=0:. G|
|00005c00| 65 6e 65 72 61 6c 20 75 | 70 64 61 74 65 0d 1d c4 |eneral u|pdate...|
|00005c10| 11 e7 20 62 79 62 25 3d | 62 79 61 25 20 8c 0d 1d |.. byb%=|bya% ...|
|00005c20| ce 3b f2 6e 65 77 72 74 | 68 72 65 61 64 28 77 68 |.;.newrt|hread(wh|
|00005c30| 61 6e 64 25 2c 25 31 2c | 71 25 21 30 2c 71 25 21 |and%,%1,|q%!0,q%!|
|00005c40| 34 2d 33 38 2c 71 25 21 | 38 2b 33 38 2d 32 2c 74 |4-38,q%!|8+38-2,t|
|00005c50| 77 25 21 34 2c 77 6b 25 | 29 0d 1d d8 05 cd 0d 1d |w%!4,wk%|).......|
|00005c60| e2 44 f4 20 4f 54 4f 48 | 2c 20 69 66 20 62 79 62 |.D. OTOH|, if byb|
|00005c70| 25 3c 62 79 61 25 2c 20 | 74 68 65 6e 20 73 63 72 |%<bya%, |then scr|
|00005c80| 6f 6c 6c 20 64 6f 77 6e | 2c 20 6e 65 77 20 73 74 |oll down|, new st|
|00005c90| 75 66 66 20 63 6f 6d 69 | 6e 67 20 69 6e 20 66 72 |uff comi|ng in fr|
|00005ca0| 6f 6d 0d 1d ec 09 f4 20 | 74 6f 70 0d 1d f6 11 e7 |om..... |top.....|
|00005cb0| 20 62 79 62 25 3c 62 79 | 61 25 20 8c 0d 1e 00 46 | byb%<by|a% ....F|
|00005cc0| f2 6e 65 77 72 74 68 72 | 65 61 64 28 77 68 61 6e |.newrthr|ead(whan|
|00005cd0| 64 25 2c 25 31 2c 71 25 | 21 30 2c 71 25 21 31 32 |d%,%1,q%|!0,q%!12|
|00005ce0| 2d 28 74 77 25 21 34 2d | 71 25 21 34 29 2c 71 25 |-(tw%!4-|q%!4),q%|
|00005cf0| 21 38 2b 33 38 2d 32 2c | 71 25 21 31 32 2c 77 6b |!8+38-2,|q%!12,wk|
|00005d00| 25 29 0d 1e 0a 05 cd 0d | 1e 14 2b f4 20 49 66 20 |%)......|..+. If |
|00005d10| 62 78 62 25 3d 62 78 61 | 25 20 74 68 65 6e 20 6e |bxb%=bxa|% then n|
|00005d20| 6f 20 73 63 72 6f 6c 6c | 2c 20 61 74 20 72 69 67 |o scroll|, at rig|
|00005d30| 68 74 0d 1e 1e 11 e7 20 | 62 78 62 25 3d 62 78 61 |ht..... |bxb%=bxa|
|00005d40| 25 20 8c 0d 1e 28 79 f2 | 6c 6f 67 28 22 20 20 58 |% ...(y.|log("  X|
|00005d50| 3a 20 64 65 63 69 64 65 | 64 20 6e 6f 20 73 63 72 |: decide|d no scr|
|00005d60| 6f 6c 6c 20 28 22 2b c3 | 62 78 62 25 2b 22 2c 22 |oll ("+.|bxb%+","|
|00005d70| 2b c3 62 78 61 25 2b 22 | 29 2c 20 61 64 64 20 61 |+.bxa%+"|), add a|
|00005d80| 74 20 72 69 67 68 74 20 | 2d 20 22 2b c3 74 77 25 |t right |- "+.tw%|
|00005d90| 21 38 2b 22 2c 22 2b c3 | 28 71 25 21 34 2d 33 38 |!8+","+.|(q%!4-38|
|00005da0| 29 2b 22 2c 22 2b c3 28 | 71 25 21 38 2b 33 38 29 |)+","+.(|q%!8+38)|
|00005db0| 2b 22 2c 22 2b c3 71 25 | 21 31 32 29 0d 1e 32 3a |+","+.q%|!12)..2:|
|00005dc0| f2 6e 65 77 72 74 68 72 | 65 61 64 28 77 68 61 6e |.newrthr|ead(whan|
|00005dd0| 64 25 2c 25 31 2c 74 77 | 25 21 38 2c 71 25 21 34 |d%,%1,tw|%!8,q%!4|
|00005de0| 2d 33 38 2c 71 25 21 38 | 2b 33 38 2c 71 25 21 31 |-38,q%!8|+38,q%!1|
|00005df0| 32 2c 77 6b 25 29 0d 1e | 3c 05 cd 0d 1e 46 2c f4 |2,wk%)..|<....F,.|
|00005e00| 20 49 66 20 62 78 62 25 | 3c 62 78 61 25 20 74 68 | If bxb%|<bxa% th|
|00005e10| 65 6e 20 73 63 72 6f 6c | 6c 20 6c 65 66 74 2c 20 |en scrol|l left, |
|00005e20| 61 74 20 6c 65 66 74 0d | 1e 50 11 e7 20 62 78 62 |at left.|.P.. bxb|
|00005e30| 25 3c 62 78 61 25 20 8c | 0d 1e 5a 84 f2 6c 6f 67 |%<bxa% .|..Z..log|
|00005e40| 28 22 20 20 58 3a 20 64 | 65 63 69 64 65 64 20 74 |("  X: d|ecided t|
|00005e50| 6f 20 73 63 72 6f 6c 6c | 20 28 22 2b c3 62 78 62 |o scroll| ("+.bxb|
|00005e60| 25 2b 22 2c 22 2b c3 62 | 78 61 25 2b 22 29 2c 20 |%+","+.b|xa%+"), |
|00005e70| 61 64 64 20 61 74 20 6c | 65 66 74 20 2d 20 22 2b |add at l|eft - "+|
|00005e80| c3 71 25 21 30 2b 22 2c | 22 2b c3 28 71 25 21 34 |.q%!0+",|"+.(q%!4|
|00005e90| 2d 33 38 29 2b 22 2c 22 | 2b c3 28 71 25 21 30 2b |-38)+","|+.(q%!0+|
|00005ea0| 28 71 25 21 38 2d 74 77 | 25 21 38 29 2b 33 38 29 |(q%!8-tw|%!8)+38)|
|00005eb0| 2b 22 2c 22 2b c3 71 25 | 21 31 32 29 0d 1e 64 46 |+","+.q%|!12)..dF|
|00005ec0| f2 6e 65 77 72 74 68 72 | 65 61 64 28 77 68 61 6e |.newrthr|ead(whan|
|00005ed0| 64 25 2c 25 31 2c 71 25 | 21 30 2c 71 25 21 34 2d |d%,%1,q%|!0,q%!4-|
|00005ee0| 33 38 2c 71 25 21 30 2b | 28 71 25 21 38 2d 74 77 |38,q%!0+|(q%!8-tw|
|00005ef0| 25 21 38 29 2b 33 38 2c | 71 25 21 31 32 2c 77 6b |%!8)+38,|q%!12,wk|
|00005f00| 25 29 0d 1e 6e 05 cd 0d | 1e 78 05 3a 0d 1e 82 2a |%)..n...|.x.:...*|
|00005f10| e7 20 71 25 21 38 2d 71 | 25 21 30 3c 3e 74 77 25 |. q%!8-q|%!0<>tw%|
|00005f20| 21 38 2d 74 77 25 21 30 | 20 66 31 25 3d b9 20 8b |!8-tw%!0| f1%=. .|
|00005f30| 20 66 31 25 3d a3 0d 1e | 8c 2c f4 20 43 6f 70 79 | f1%=...|.,. Copy|
|00005f40| 20 65 76 65 72 79 74 68 | 69 6e 67 20 62 75 74 20 | everyth|ing but |
|00005f50| 74 68 65 20 73 63 72 6f | 6c 6c 20 6f 66 66 73 65 |the scro|ll offse|
|00005f60| 74 73 0d 1e 96 31 74 77 | 25 21 30 3d 71 25 21 30 |ts...1tw|%!0=q%!0|
|00005f70| 3a 74 77 25 21 34 3d 71 | 25 21 34 3a 74 77 25 21 |:tw%!4=q|%!4:tw%!|
|00005f80| 38 3d 71 25 21 38 3a 74 | 77 25 21 31 32 3d 71 25 |8=q%!8:t|w%!12=q%|
|00005f90| 21 31 32 0d 1e a0 1d 74 | 77 25 21 32 34 3d 71 25 |!12....t|w%!24=q%|
|00005fa0| 21 32 34 3a 74 77 25 21 | 32 38 3d 71 25 21 32 38 |!24:tw%!|28=q%!28|
|00005fb0| 0d 1e aa 22 6e 6f 72 65 | 64 72 61 77 73 25 3d b9 |..."nore|draws%=.|
|00005fc0| 3a f4 20 44 69 73 61 62 | 6c 65 20 72 65 64 72 61 |:. Disab|le redra|
|00005fd0| 77 73 0d 1e b4 79 e7 20 | 62 79 62 25 3c 62 79 61 |ws...y. |byb%<bya|
|00005fe0| 25 20 84 20 62 78 62 25 | 3c 62 78 61 25 20 f2 73 |% . bxb%|<bxa% .s|
|00005ff0| 63 72 6f 6c 6c 28 77 68 | 61 6e 64 25 2c 74 77 25 |croll(wh|and%,tw%|
|00006000| 2c 62 78 62 25 2d 62 78 | 61 25 2c 62 79 61 25 2d |,bxb%-bx|a%,bya%-|
|00006010| 62 79 62 25 29 3a f2 6c | 6f 67 28 22 20 20 53 63 |byb%):.l|og("  Sc|
|00006020| 72 6f 6c 6c 69 6e 67 20 | 62 79 20 22 2b c3 28 62 |rolling |by "+.(b|
|00006030| 78 62 25 2d 62 78 61 25 | 29 2b 22 2c 22 2b c3 28 |xb%-bxa%|)+","+.(|
|00006040| 62 79 61 25 2d 62 79 62 | 25 29 29 0d 1e be 1d f2 |bya%-byb|%)).....|
|00006050| 66 69 78 77 69 6e 28 66 | 25 2c 74 77 25 21 36 30 |fixwin(f|%,tw%!60|
|00006060| 2c 77 68 61 6e 64 25 29 | 0d 1e c8 10 6e 6f 72 65 |,whand%)|....nore|
|00006070| 64 72 61 77 73 25 3d a3 | 0d 1e d2 05 3a 0d 1e dc |draws%=.|....:...|
|00006080| 0b e7 20 66 31 25 20 8c | 0d 1e e6 21 f4 20 46 69 |.. f1% .|...!. Fi|
|00006090| 6e 61 6c 6c 79 20 64 6f | 20 74 69 74 6c 65 20 61 |nally do| title a|
|000060a0| 6e 64 20 74 6f 67 67 6c | 65 0d 1e f0 16 f2 75 70 |nd toggl|e.....up|
|000060b0| 64 69 63 6f 6e 28 77 68 | 61 6e 64 25 2c 35 29 0d |dicon(wh|and%,5).|
|000060c0| 1e fa 16 f2 75 70 64 69 | 63 6f 6e 28 77 68 61 6e |....updi|con(whan|
|000060d0| 64 25 2c 36 29 0d 1f 04 | 05 cd 0d 1f 0e 05 e1 0d |d%,6)...|........|
|000060e0| 1f 18 05 3a 0d 1f 22 29 | dd 20 f2 61 64 6a 75 73 |...:..")|. .adjus|
|000060f0| 74 28 77 68 61 6e 64 25 | 2c 74 77 25 2c 62 78 25 |t(whand%|,tw%,bx%|
|00006100| 2c 62 79 25 2c 61 78 25 | 2c 61 79 25 29 0d 1f 2c |,by%,ax%|,ay%)..,|
|00006110| 23 ea 20 78 31 25 2c 79 | 31 25 2c 78 32 25 2c 79 |#. x1%,y|1%,x2%,y|
|00006120| 32 25 2c 78 64 25 2c 79 | 64 25 2c 78 25 2c 79 25 |2%,xd%,y|d%,x%,y%|
|00006130| 0d 1f 36 4c f2 6c 6f 67 | 28 22 41 64 6a 75 73 74 |..6L.log|("Adjust|
|00006140| 20 72 65 70 6f 72 74 73 | 20 79 73 63 72 20 61 73 | reports| yscr as|
|00006150| 20 22 2b c3 74 77 25 21 | 32 30 2b 22 20 61 6e 64 | "+.tw%!|20+" and|
|00006160| 20 6f 79 31 2c 6e 79 31 | 20 61 73 20 22 2b c3 62 | oy1,ny1| as "+.b|
|00006170| 79 25 2b 22 2c 22 2b c3 | 61 79 25 29 0d 1f 40 1a |y%+","+.|ay%)..@.|
|00006180| e7 20 74 77 25 21 32 30 | 3d 30 20 80 20 61 79 25 |. tw%!20|=0 . ay%|
|00006190| 3c 62 79 25 20 8c 0d 1f | 4a 28 f4 20 57 65 20 6d |<by% ...|J(. We m|
|000061a0| 75 73 74 20 6d 6f 76 65 | 20 6f 6c 64 20 77 69 6e |ust move| old win|
|000061b0| 64 6f 77 20 62 6c 6f 63 | 6b 20 64 6f 77 6e 0d 1f |dow bloc|k down..|
|000061c0| 54 24 f4 20 4f 6c 64 20 | 62 6c 6b 20 3d 20 74 77 |T$. Old |blk = tw|
|000061d0| 25 21 30 2c 62 79 25 2c | 62 78 25 2c 74 77 25 21 |%!0,by%,|bx%,tw%!|
|000061e0| 31 32 0d 1f 5e 19 f4 20 | 4e 65 77 20 62 6c 6b 20 |12..^.. |New blk |
|000061f0| 3d 20 74 77 25 21 30 2c | 61 79 25 0d 1f 68 5c f2 |= tw%!0,|ay%..h\.|
|00006200| 6c 6f 67 28 22 41 64 6a | 75 73 74 20 6d 6f 76 69 |log("Adj|ust movi|
|00006210| 6e 67 20 62 6c 6f 63 6b | 20 22 2b c3 74 77 25 21 |ng block| "+.tw%!|
|00006220| 30 2b 22 2c 22 2b c3 62 | 79 25 2b 22 2c 22 2b c3 |0+","+.b|y%+","+.|
|00006230| 62 78 25 2b 22 2c 22 2b | c3 74 77 25 21 31 32 2b |bx%+","+|.tw%!12+|
|00006240| 22 20 74 6f 20 22 2b c3 | 74 77 25 21 30 2b 22 2c |" to "+.|tw%!0+",|
|00006250| 22 2b c3 61 79 25 29 0d | 1f 72 18 f2 78 79 64 28 |"+.ay%).|.r..xyd(|
|00006260| 74 77 25 21 36 30 2c 78 | 64 25 2c 79 64 25 29 0d |tw%!60,x|d%,yd%).|
|00006270| 1f 7c 11 78 31 25 3d 74 | 77 25 21 30 2d 78 64 25 |.|.x1%=t|w%!0-xd%|
|00006280| 0d 1f 86 0f 79 31 25 3d | 62 79 25 2d 79 64 25 0d |....y1%=|by%-yd%.|
|00006290| 1f 90 11 78 32 25 3d 62 | 78 25 2d 78 64 25 2d 32 |...x2%=b|x%-xd%-2|
|000062a0| 0d 1f 9a 14 79 32 25 3d | 74 77 25 21 31 32 2d 79 |....y2%=|tw%!12-y|
|000062b0| 64 25 2d 32 0d 1f a4 10 | 78 25 3d 74 77 25 21 30 |d%-2....|x%=tw%!0|
|000062c0| 2d 78 64 25 0d 1f ae 0e | 79 25 3d 61 79 25 2d 79 |-xd%....|y%=ay%-y|
|000062d0| 64 25 0d 1f b8 34 c8 99 | 20 22 57 69 6d 70 5f 42 |d%...4..| "Wimp_B|
|000062e0| 6c 6f 63 6b 43 6f 70 79 | 22 2c 74 77 25 21 36 30 |lockCopy|",tw%!60|
|000062f0| 2c 78 31 25 2c 79 31 25 | 2c 78 32 25 2c 79 32 25 |,x1%,y1%|,x2%,y2%|
|00006300| 2c 78 25 2c 79 25 0d 1f | c2 27 f4 20 4e 6f 77 20 |,x%,y%..|.'. Now |
|00006310| 75 70 64 61 74 65 20 74 | 68 65 20 6e 65 77 20 61 |update t|he new a|
|00006320| 72 65 61 20 75 6e 63 6f | 76 65 72 65 64 0d 1f cc |rea unco|vered...|
|00006330| 51 f2 6c 6f 67 28 22 20 | 20 20 72 65 64 72 61 77 |Q.log(" |  redraw|
|00006340| 69 6e 67 20 62 6c 6b 20 | 22 2b c3 74 77 25 21 30 |ing blk |"+.tw%!0|
|00006350| 2b 22 2c 22 2b c3 28 74 | 77 25 21 31 32 2d 28 62 |+","+.(t|w%!12-(b|
|00006360| 79 25 2d 61 79 25 29 29 | 2b 22 2c 22 2b c3 62 78 |y%-ay%))|+","+.bx|
|00006370| 25 2b 22 2c 22 2b c3 74 | 77 25 21 31 32 29 0d 1f |%+","+.t|w%!12)..|
|00006380| d6 0a 21 77 6b 25 3d 30 | 0d 1f e0 42 f2 6e 65 77 |..!wk%=0|...B.new|
|00006390| 72 74 68 72 65 61 64 28 | 77 68 61 6e 64 25 2c 25 |rthread(|whand%,%|
|000063a0| 31 2c 74 77 25 21 30 2c | 74 77 25 21 31 32 2d 28 |1,tw%!0,|tw%!12-(|
|000063b0| 62 79 25 2d 61 79 25 29 | 2d 32 2c 62 78 25 2c 74 |by%-ay%)|-2,bx%,t|
|000063c0| 77 25 21 31 32 2c 77 6b | 25 29 0d 1f ea 05 cd 0d |w%!12,wk|%)......|
|000063d0| 1f f4 05 e1 0d 1f fe 19 | f4 74 77 25 2c 78 31 25 |........|.tw%,x1%|
|000063e0| 2c 79 31 25 2c 78 32 25 | 2c 79 32 25 29 0d 20 08 |,y1%,x2%|,y2%). .|
|000063f0| 10 f4 20 41 62 73 20 63 | 6f 6f 72 64 73 0d 20 12 |.. Abs c|oords. .|
+--------+-------------------------+-------------------------+--------+--------+