/ ARM Club 3 / TheARMClub_PDCD3.iso / programs / acorn / riscos2 / apps2 / !Clock / !RunImage

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 11 f4 20 3e 20 | 21 52 75 6e 49 6d 61 67 |..... > |!RunImag|
|00000010| 65 0d 00 14 05 f4 0d 00 | 1e 30 f4 20 42 79 20 4d |e.......|.0. By M|
|00000020| 65 72 6c 79 6e 20 4b 6c | 69 6e 65 20 32 39 2f 35 |erlyn Kl|ine 29/5|
|00000030| 2f 38 38 20 28 4d 69 6e | 65 72 76 61 20 53 6f 66 |/88 (Min|erva Sof|
|00000040| 74 77 61 72 65 29 0d 00 | 28 35 f4 20 4d 6f 64 69 |tware)..|(5. Modi|
|00000050| 66 69 65 64 20 62 79 20 | 50 68 69 6c 69 70 20 43 |fied by |Philip C|
|00000060| 6f 6c 6d 65 72 20 28 41 | 63 6f 72 6e 20 43 6f 6d |olmer (A|corn Com|
|00000070| 70 75 74 65 72 73 20 4c | 74 64 29 0d 00 32 05 f4 |puters L|td)..2..|
|00000080| 0d 00 3c 2a f4 20 54 68 | 69 73 20 70 72 6f 67 72 |..<*. Th|is progr|
|00000090| 61 6d 20 69 73 20 69 6e | 20 74 68 65 20 70 75 62 |am is in| the pub|
|000000a0| 6c 69 63 20 64 6f 6d 61 | 69 6e 0d 00 46 05 f4 0d |lic doma|in..F...|
|000000b0| 00 50 0e f2 69 6e 69 74 | 63 6c 6f 63 6b 0d 00 5a |.P..init|clock..Z|
|000000c0| 1e ee 85 3a f2 65 72 72 | 6f 72 62 6f 78 3a c8 99 |...:.err|orbox:..|
|000000d0| 20 43 72 4d 65 6e 75 2c | 2c 2d 31 0d 00 64 2a c8 | CrMenu,|,-1..d*.|
|000000e0| 99 20 44 72 61 67 2c 2c | 2d 31 3a f2 67 65 74 70 |. Drag,,|-1:.getp|
|000000f0| 6f 69 6e 74 65 72 3a f2 | 70 6f 70 75 70 28 63 6c |ointer:.|popup(cl|
|00000100| 6f 63 6b 25 29 0d 00 6e | 21 c8 99 20 54 69 6d 65 |ock%)..n|!.. Time|
|00000110| 25 20 b8 20 74 69 6d 65 | 78 25 3a 74 69 6d 65 78 |% . time|x%:timex|
|00000120| 25 2b 3d 31 30 30 0d 00 | 78 05 f5 0d 00 82 2b c8 |%+=100..|x.....+.|
|00000130| 99 20 50 6f 6c 6c 25 2c | 30 2c 71 25 2c 74 69 6d |. Poll%,|0,q%,tim|
|00000140| 65 78 25 20 b8 20 41 25 | 3b 46 25 3a e7 46 25 80 |ex% . A%|;F%:.F%.|
|00000150| 31 20 f2 64 69 65 0d 00 | 8c 0b c8 8e 20 41 25 20 |1 .die..|.... A% |
|00000160| ca 0d 00 96 0f c9 20 30 | 20 3a f2 6e 75 64 67 65 |...... 0| :.nudge|
|00000170| 0d 00 a0 1c c9 20 31 20 | 3a f2 72 65 64 72 61 77 |..... 1 |:.redraw|
|00000180| 5f 77 69 6e 64 6f 77 28 | 21 71 25 29 0d 00 aa 42 |_window(|!q%)...B|
|00000190| c9 20 32 20 3a f2 6f 70 | 65 6e 5f 77 69 6e 64 6f |. 2 :.op|en_windo|
|000001a0| 77 28 21 71 25 2c 71 25 | 21 34 2c 71 25 21 38 2c |w(!q%,q%|!4,q%!8,|
|000001b0| 71 25 21 31 32 2c 71 25 | 21 31 36 2c 71 25 21 32 |q%!12,q%|!16,q%!2|
|000001c0| 30 2c 71 25 21 32 34 2c | 71 25 21 32 38 29 0d 00 |0,q%!24,|q%!28)..|
|000001d0| b4 1b c9 20 33 20 3a f2 | 63 6c 6f 73 65 61 77 69 |... 3 :.|closeawi|
|000001e0| 6e 64 6f 77 28 21 71 25 | 29 0d 00 be 18 c9 20 31 |ndow(!q%|)..... 1|
|000001f0| 37 2c 31 38 3a f2 72 65 | 63 65 69 76 65 28 71 25 |7,18:.re|ceive(q%|
|00000200| 29 0d 00 c8 05 cb 0d 00 | d2 07 fd 20 a3 0d 00 dc |).......|... ....|
|00000210| 11 dd f2 72 65 63 65 69 | 76 65 28 71 25 29 0d 00 |...recei|ve(q%)..|
|00000220| e6 0e c8 8e 20 71 25 21 | 31 36 20 ca 0d 00 f0 11 |.... q%!|16 .....|
|00000230| c9 20 30 3a f2 66 69 6e | 69 73 68 3a e0 0d 00 fa |. 0:.fin|ish:....|
|00000240| 1d c9 20 39 2c 26 34 30 | 30 43 31 3a f2 72 65 73 |.. 9,&40|0C1:.res|
|00000250| 65 74 5f 70 61 6c 65 74 | 74 65 0d 01 04 05 cb 0d |et_palet|te......|
|00000260| 01 0e 05 e1 0d 01 18 0d | dd a4 63 77 69 6e 64 6f |........|..cwindo|
|00000270| 77 0d 01 22 3f f3 20 41 | 24 2c 66 25 2c 66 63 25 |w.."?. A|$,f%,fc%|
|00000280| 2c 62 63 25 2c 78 30 25 | 2c 79 30 25 2c 78 31 25 |,bc%,x0%|,y0%,x1%|
|00000290| 2c 79 31 25 2c 63 78 30 | 25 2c 63 79 30 25 2c 63 |,y1%,cx0|%,cy0%,c|
|000002a0| 78 31 25 2c 63 79 31 25 | 2c 6e 69 63 6f 6e 73 25 |x1%,cy1%|,nicons%|
|000002b0| 0d 01 2c 56 3d a4 63 72 | 65 61 74 65 5f 77 69 6e |..,V=.cr|eate_win|
|000002c0| 64 6f 77 28 63 78 30 25 | 2c 63 79 30 25 2c 63 78 |dow(cx0%|,cy0%,cx|
|000002d0| 31 25 2c 63 79 31 25 2c | 30 2c 30 2c 66 25 2c 66 |1%,cy1%,|0,0,f%,f|
|000002e0| 63 25 2c 62 63 25 2c 78 | 30 25 2c 79 30 25 2c 78 |c%,bc%,x|0%,y0%,x|
|000002f0| 31 25 2c 79 31 25 2c 26 | 32 44 2c 41 24 2c 6e 69 |1%,y1%,&|2D,A$,ni|
|00000300| 63 6f 6e 73 25 29 0d 01 | 36 1b dd f2 63 6c 6f 73 |cons%)..|6...clos|
|00000310| 65 61 77 69 6e 64 6f 77 | 28 68 61 6e 64 6c 65 25 |eawindow|(handle%|
|00000320| 29 0d 01 40 1a f2 63 6c | 6f 73 65 5f 77 69 6e 64 |)..@..cl|ose_wind|
|00000330| 6f 77 28 68 61 6e 64 6c | 65 25 29 0d 01 4a 0d f2 |ow(handl|e%)..J..|
|00000340| 66 69 6e 69 73 68 3a e0 | 0d 01 54 05 e1 0d 01 5e |finish:.|..T....^|
|00000350| 0c dd f2 66 69 6e 69 73 | 68 0d 01 68 17 c8 99 20 |...finis|h..h... |
|00000360| 22 57 69 6d 70 5f 43 6c | 6f 73 65 44 6f 77 6e 22 |"Wimp_Cl|oseDown"|
|00000370| 0d 01 72 05 e1 0d 01 7c | 6c dd a4 63 72 65 61 74 |..r....||l..creat|
|00000380| 65 5f 77 69 6e 64 6f 77 | 28 63 78 30 25 2c 63 79 |e_window|(cx0%,cy|
|00000390| 30 25 2c 63 78 31 25 2c | 63 79 31 25 2c 73 63 78 |0%,cx1%,|cy1%,scx|
|000003a0| 25 2c 73 63 79 25 2c 66 | 6c 61 67 73 25 2c 66 63 |%,scy%,f|lags%,fc|
|000003b0| 25 2c 62 63 25 2c 73 78 | 30 25 2c 73 79 30 25 2c |%,bc%,sx|0%,sy0%,|
|000003c0| 73 78 31 25 2c 73 79 31 | 25 2c 74 69 74 6c 65 66 |sx1%,sy1|%,titlef|
|000003d0| 25 2c 74 69 74 6c 65 24 | 2c 6e 69 63 6f 6e 73 25 |%,title$|,nicons%|
|000003e0| 29 0d 01 86 41 21 71 25 | 3d 63 78 30 25 3a 71 25 |)...A!q%|=cx0%:q%|
|000003f0| 21 34 3d 63 79 30 25 3a | 71 25 21 38 3d 63 78 31 |!4=cy0%:|q%!8=cx1|
|00000400| 25 3a 71 25 21 31 32 3d | 63 79 31 25 3a 71 25 21 |%:q%!12=|cy1%:q%!|
|00000410| 31 36 3d 73 63 78 25 3a | 71 25 21 32 30 3d 73 63 |16=scx%:|q%!20=sc|
|00000420| 79 25 0d 01 90 19 71 25 | 21 32 34 3d 2d 31 3a 71 |y%....q%|!24=-1:q|
|00000430| 25 21 32 38 3d 66 6c 61 | 67 73 25 0d 01 9a 13 e7 |%!28=fla|gs%.....|
|00000440| 66 63 25 3d 31 35 80 62 | 63 25 3d 31 35 8c 0d 01 |fc%=15.b|c%=15...|
|00000450| a4 29 71 25 3f 33 32 3d | 31 35 3a 71 25 3f 33 33 |.)q%?32=|15:q%?33|
|00000460| 3d 31 35 3a 71 25 3f 33 | 34 3d 66 63 25 3a 71 25 |=15:q%?3|4=fc%:q%|
|00000470| 3f 33 35 3d 62 63 25 0d | 01 ae 29 cc 20 71 25 3f |?35=bc%.|..). q%?|
|00000480| 33 32 3d 37 3a 71 25 3f | 33 33 3d 32 3a 71 25 3f |32=7:q%?|33=2:q%?|
|00000490| 33 34 3d 66 63 25 3a 71 | 25 3f 33 35 3d 62 63 25 |34=fc%:q|%?35=bc%|
|000004a0| 0d 01 b8 05 cd 0d 01 c2 | 24 71 25 3f 33 36 3d 33 |........|$q%?36=3|
|000004b0| 3a 71 25 3f 33 37 3d 31 | 3a 71 25 3f 33 38 3d 31 |:q%?37=1|:q%?38=1|
|000004c0| 32 3a 71 25 3f 33 39 3d | 30 0d 01 cc 2f 71 25 21 |2:q%?39=|0.../q%!|
|000004d0| 34 30 3d 73 78 30 25 3a | 71 25 21 34 34 3d 73 79 |40=sx0%:|q%!44=sy|
|000004e0| 30 25 3a 71 25 21 34 38 | 3d 73 78 31 25 3a 71 25 |0%:q%!48|=sx1%:q%|
|000004f0| 21 35 32 3d 73 79 31 25 | 0d 01 d6 11 71 25 21 35 |!52=sy1%|....q%!5|
|00000500| 36 3d 74 69 74 6c 65 66 | 25 0d 01 e0 28 71 25 21 |6=titlef|%...(q%!|
|00000510| 36 30 3d 26 33 30 30 30 | 20 20 20 20 20 20 3a 20 |60=&3000|      : |
|00000520| f4 20 77 6f 72 6b 20 61 | 72 65 61 20 66 6c 61 67 |. work a|rea flag|
|00000530| 73 0d 01 ea 21 71 25 21 | 36 34 3d 30 3a 71 25 21 |s...!q%!|64=0:q%!|
|00000540| 36 38 3d 30 20 20 3a 20 | f4 20 72 65 73 65 72 76 |68=0  : |. reserv|
|00000550| 65 64 0d 01 f4 18 24 28 | 71 25 2b 37 32 29 3d c0 |ed....$(|q%+72)=.|
|00000560| 74 69 74 6c 65 24 2c 31 | 31 29 0d 01 fe 11 71 25 |title$,1|1)....q%|
|00000570| 21 38 34 3d 6e 69 63 6f | 6e 73 25 0d 02 08 29 ea |!84=nico|ns%...).|
|00000580| 49 25 2c 78 30 25 2c 79 | 30 25 2c 78 31 25 2c 79 |I%,x0%,y|0%,x1%,y|
|00000590| 31 25 2c 66 25 2c 64 61 | 74 61 24 3a 49 25 3d 71 |1%,f%,da|ta$:I%=q|
|000005a0| 25 2b 38 38 0d 02 12 10 | c8 95 20 6e 69 63 6f 6e |%+88....|.. nicon|
|000005b0| 73 25 3e 30 0d 02 1c 26 | f3 20 78 30 25 2c 79 30 |s%>0...&|. x0%,y0|
|000005c0| 25 2c 78 31 25 2c 79 31 | 25 2c 66 25 2c 66 63 25 |%,x1%,y1|%,f%,fc%|
|000005d0| 2c 62 63 25 2c 64 61 74 | 61 24 0d 02 26 28 49 25 |,bc%,dat|a$..&(I%|
|000005e0| 21 30 3d 78 30 25 3a 49 | 25 21 34 3d 79 30 25 3a |!0=x0%:I|%!4=y0%:|
|000005f0| 49 25 21 38 3d 78 31 25 | 3a 49 25 21 31 32 3d 79 |I%!8=x1%|:I%!12=y|
|00000600| 31 25 0d 02 30 23 e7 20 | 28 66 25 80 26 34 30 29 |1%..0#. |(f%.&40)|
|00000610| 3d 30 20 8c 20 62 63 25 | 3d 66 63 25 2b 28 62 63 |=0 . bc%|=fc%+(bc|
|00000620| 25 3c 3c 34 29 0d 02 3a | 16 49 25 21 31 36 3d 66 |%<<4)..:|.I%!16=f|
|00000630| 25 2b 28 62 63 25 3c 3c | 32 34 29 0d 02 44 0f e7 |%+(bc%<<|24)..D..|
|00000640| 28 66 25 80 26 31 30 30 | 29 8c 0d 02 4e 3c f3 20 |(f%.&100|)...N<. |
|00000650| 4c 25 3a 42 25 3d a4 62 | 75 66 66 65 72 28 4c 25 |L%:B%=.b|uffer(L%|
|00000660| 29 3a 49 25 21 32 30 3d | 42 25 3a 24 42 25 3d 64 |):I%!20=|B%:$B%=d|
|00000670| 61 74 61 24 3a 49 25 21 | 32 34 3d 2d 31 3a 49 25 |ata$:I%!|24=-1:I%|
|00000680| 21 32 38 3d 4c 25 0d 02 | 58 05 cc 0d 02 62 12 24 |!28=L%..|X....b.$|
|00000690| 28 49 25 2b 32 30 29 3d | 64 61 74 61 24 0d 02 6c |(I%+20)=|data$..l|
|000006a0| 05 cd 0d 02 76 1e 49 25 | 3d 49 25 2b 33 32 3a 6e |....v.I%|=I%+32:n|
|000006b0| 69 63 6f 6e 73 25 3d 6e | 69 63 6f 6e 73 25 2d 31 |icons%=n|icons%-1|
|000006c0| 0d 02 80 05 ce 0d 02 8a | 1c c8 99 20 43 72 65 61 |........|... Crea|
|000006d0| 74 65 57 2c 2c 71 25 20 | b8 20 68 61 6e 64 6c 65 |teW,,q% |. handle|
|000006e0| 25 0d 02 94 0c 3d 68 61 | 6e 64 6c 65 25 0d 02 9e |%....=ha|ndle%...|
|000006f0| 14 dd f2 66 72 6f 6e 74 | 28 68 61 6e 64 6c 65 25 |...front|(handle%|
|00000700| 29 0d 02 a8 11 e7 68 61 | 6e 64 6c 65 25 3d 2d 31 |).....ha|ndle%=-1|
|00000710| 8c e1 0d 02 b2 12 f2 67 | 65 74 77 28 68 61 6e 64 |.......g|etw(hand|
|00000720| 6c 65 25 29 0d 02 bc 36 | f2 6f 70 65 6e 5f 77 69 |le%)...6|.open_wi|
|00000730| 6e 64 6f 77 28 68 61 6e | 64 6c 65 25 2c 78 30 25 |ndow(han|dle%,x0%|
|00000740| 2c 79 30 25 2c 78 31 25 | 2c 79 31 25 2c 73 63 78 |,y0%,x1%|,y1%,scx|
|00000750| 25 2c 73 63 79 25 2c 2d | 31 29 0d 02 c6 05 e1 0d |%,scy%,-|1)......|
|00000760| 02 d0 14 dd f2 70 6f 70 | 75 70 28 68 61 6e 64 6c |.....pop|up(handl|
|00000770| 65 25 29 0d 02 da 12 f2 | 67 65 74 77 28 68 61 6e |e%).....|getw(han|
|00000780| 64 6c 65 25 29 0d 02 e4 | 30 78 6f 25 3d 6d 6f 75 |dle%)...|0xo%=mou|
|00000790| 73 65 78 25 2d 28 78 30 | 25 2b 78 31 25 29 2f 32 |sex%-(x0|%+x1%)/2|
|000007a0| 3a 79 6f 25 3d 6d 6f 75 | 73 65 79 25 2d 28 79 31 |:yo%=mou|sey%-(y1|
|000007b0| 25 2b 36 34 29 0d 02 ee | 46 f2 6f 70 65 6e 5f 77 |%+64)...|F.open_w|
|000007c0| 69 6e 64 6f 77 28 68 61 | 6e 64 6c 65 25 2c 78 30 |indow(ha|ndle%,x0|
|000007d0| 25 2b 78 6f 25 2c 79 30 | 25 2b 79 6f 25 2c 78 31 |%+xo%,y0|%+yo%,x1|
|000007e0| 25 2b 78 6f 25 2c 79 31 | 25 2b 79 6f 25 2c 73 63 |%+xo%,y1|%+yo%,sc|
|000007f0| 78 25 2c 73 63 79 25 2c | 2d 31 29 0d 02 f8 05 e1 |x%,scy%,|-1).....|
|00000800| 0d 03 02 3d dd f2 6f 70 | 65 6e 5f 77 69 6e 64 6f |...=..op|en_windo|
|00000810| 77 28 68 61 6e 64 6c 65 | 25 2c 78 30 25 2c 79 30 |w(handle|%,x0%,y0|
|00000820| 25 2c 78 31 25 2c 79 31 | 25 2c 73 63 78 25 2c 73 |%,x1%,y1|%,scx%,s|
|00000830| 63 79 25 2c 62 68 61 6e | 64 6c 65 25 29 0d 03 0c |cy%,bhan|dle%)...|
|00000840| 11 e7 68 61 6e 64 6c 65 | 25 3d 2d 31 8c e1 0d 03 |..handle|%=-1....|
|00000850| 16 21 e7 68 61 6e 64 6c | 65 25 3d 63 6c 6f 63 6b |.!.handl|e%=clock|
|00000860| 25 3a 73 63 78 25 3d 30 | 3a 73 63 79 25 3d 30 0d |%:scx%=0|:scy%=0.|
|00000870| 03 20 1f 71 25 21 30 3d | 68 61 6e 64 6c 65 25 3a |. .q%!0=|handle%:|
|00000880| 71 25 21 32 38 3d 62 68 | 61 6e 64 6c 65 25 0d 03 |q%!28=bh|andle%..|
|00000890| 2a 29 71 25 21 34 3d 78 | 30 25 3a 71 25 21 38 3d |*)q%!4=x|0%:q%!8=|
|000008a0| 79 30 25 3a 71 25 21 31 | 32 3d 78 31 25 3a 71 25 |y0%:q%!1|2=x1%:q%|
|000008b0| 21 31 36 3d 79 31 25 0d | 03 34 19 71 25 21 32 30 |!16=y1%.|.4.q%!20|
|000008c0| 3d 73 63 78 25 3a 71 25 | 21 32 34 3d 73 63 79 25 |=scx%:q%|!24=scy%|
|000008d0| 0d 03 3e 10 c8 99 20 4f | 70 65 6e 57 2c 2c 71 25 |..>... O|penW,,q%|
|000008e0| 0d 03 48 61 e7 68 61 6e | 64 6c 65 25 3d 63 6c 6f |..Ha.han|dle%=clo|
|000008f0| 63 6b 25 3a f2 63 61 6c | 63 72 78 79 3a e7 72 25 |ck%:.cal|crxy:.r%|
|00000900| 3c 3e 6c 72 25 84 78 25 | 3c 3e 6c 78 25 84 79 25 |<>lr%.x%|<>lx%.y%|
|00000910| 3c 3e 6c 79 25 3a c8 99 | 20 22 57 69 6d 70 5f 46 |<>ly%:..| "Wimp_F|
|00000920| 6f 72 63 65 52 65 64 72 | 61 77 22 2c 63 6c 6f 63 |orceRedr|aw",cloc|
|00000930| 6b 25 2c 30 2c 2d 31 30 | 32 34 2c 31 32 38 30 2c |k%,0,-10|24,1280,|
|00000940| 30 0d 03 52 05 e1 0d 03 | 5c 13 dd f2 67 65 74 77 |0..R....|\...getw|
|00000950| 28 68 61 6e 64 6c 65 25 | 29 0d 03 66 1b 21 71 25 |(handle%|)..f.!q%|
|00000960| 3d 68 61 6e 64 6c 65 25 | 3a c8 99 20 47 65 74 57 |=handle%|:.. GetW|
|00000970| 2c 2c 71 25 0d 03 70 2b | f2 69 6e 66 6f 28 71 25 |,,q%..p+|.info(q%|
|00000980| 2b 34 29 3a 62 68 61 6e | 64 6c 65 25 3d 71 25 21 |+4):bhan|dle%=q%!|
|00000990| 32 38 3a 66 6c 61 67 73 | 25 3d 71 25 21 33 32 0d |28:flags|%=q%!32.|
|000009a0| 03 7a 05 e1 0d 03 84 0e | dd f2 69 6e 66 6f 28 71 |.z......|..info(q|
|000009b0| 25 29 0d 03 8e 3d 78 30 | 25 3d 21 71 25 3a 79 30 |%)...=x0|%=!q%:y0|
|000009c0| 25 3d 71 25 21 34 3a 78 | 31 25 3d 71 25 21 38 3a |%=q%!4:x|1%=q%!8:|
|000009d0| 79 31 25 3d 71 25 21 31 | 32 3a 73 63 78 25 3d 71 |y1%=q%!1|2:scx%=q|
|000009e0| 25 21 31 36 3a 73 63 79 | 25 3d 71 25 21 32 30 0d |%!16:scy|%=q%!20.|
|000009f0| 03 98 1d 62 78 25 3d 78 | 30 25 2d 73 63 78 25 3a |...bx%=x|0%-scx%:|
|00000a00| 62 79 25 3d 79 31 25 2d | 73 63 79 25 0d 03 a2 05 |by%=y1%-|scy%....|
|00000a10| e1 0d 03 ac 29 dd f2 75 | 70 64 61 74 65 28 68 61 |....)..u|pdate(ha|
|00000a20| 6e 64 6c 65 25 2c 75 78 | 30 25 2c 75 79 30 25 2c |ndle%,ux|0%,uy0%,|
|00000a30| 75 78 31 25 2c 75 79 31 | 25 29 0d 03 b6 39 21 71 |ux1%,uy1|%)...9!q|
|00000a40| 25 3d 68 61 6e 64 6c 65 | 25 3a 71 25 21 34 3d 75 |%=handle|%:q%!4=u|
|00000a50| 78 30 25 3a 71 25 21 38 | 3d 75 79 30 25 3a 71 25 |x0%:q%!8|=uy0%:q%|
|00000a60| 21 31 32 3d 75 78 31 25 | 3a 71 25 21 31 36 3d 75 |!12=ux1%|:q%!16=u|
|00000a70| 79 31 25 0d 03 c0 26 c8 | 99 20 55 70 64 61 74 65 |y1%...&.|. Update|
|00000a80| 57 2c 2c 71 25 20 b8 20 | 6d 6f 72 65 25 3a f2 69 |W,,q% . |more%:.i|
|00000a90| 6e 66 6f 28 71 25 2b 34 | 29 0d 03 ca 05 e1 0d 03 |nfo(q%+4|).......|
|00000aa0| d4 1c dd f2 72 65 64 72 | 61 77 5f 77 69 6e 64 6f |....redr|aw_windo|
|00000ab0| 77 28 68 61 6e 64 6c 65 | 25 29 0d 03 de 16 e7 20 |w(handle|%)..... |
|00000ac0| 68 61 6e 64 6c 65 25 3d | 63 6c 6f 63 6b 25 20 8c |handle%=|clock% .|
|00000ad0| 0d 03 e8 0f 21 71 25 3d | 68 61 6e 64 6c 65 25 0d |....!q%=|handle%.|
|00000ae0| 03 f2 1a c8 99 20 52 65 | 64 72 61 77 57 2c 2c 71 |..... Re|drawW,,q|
|00000af0| 25 20 b8 20 6d 6f 72 65 | 25 0d 03 fc 0f f2 69 6e |% . more|%.....in|
|00000b00| 66 6f 28 71 25 2b 34 29 | 0d 04 06 0c c8 95 20 6d |fo(q%+4)|...... m|
|00000b10| 6f 72 65 25 0d 04 10 10 | f2 72 65 64 72 61 77 63 |ore%....|.redrawc|
|00000b20| 6c 6f 63 6b 0d 04 1a 19 | c8 99 20 47 65 74 52 25 |lock....|.. GetR%|
|00000b30| 2c 30 2c 71 25 20 b8 20 | 6d 6f 72 65 25 0d 04 24 |,0,q% . |more%..$|
|00000b40| 05 ce 0d 04 2e 18 6c 72 | 25 3d 72 25 3a 6c 78 25 |......lr|%=r%:lx%|
|00000b50| 3d 78 25 3a 6c 79 25 3d | 79 25 0d 04 38 05 cd 0d |=x%:ly%=|y%..8...|
|00000b60| 04 42 05 e1 0d 04 4c 0b | dd f2 6e 75 64 67 65 0d |.B....L.|..nudge.|
|00000b70| 04 56 1a ea 20 71 25 3a | f2 74 69 63 6b 3a 71 25 |.V.. q%:|.tick:q%|
|00000b80| 3d 62 75 66 66 65 72 73 | 25 0d 04 60 22 f2 75 70 |=buffers|%..`".up|
|00000b90| 64 61 74 65 28 63 6c 6f | 63 6b 25 2c 30 2c 2d 31 |date(clo|ck%,0,-1|
|00000ba0| 30 32 34 2c 31 32 38 30 | 2c 30 29 0d 04 6a 0c c8 |024,1280|,0)..j..|
|00000bb0| 95 20 6d 6f 72 65 25 0d | 04 74 2e f2 75 70 64 61 |. more%.|.t..upda|
|00000bc0| 74 65 63 6c 6f 63 6b 28 | 68 25 2c 6d 25 2c 73 25 |teclock(|h%,m%,s%|
|00000bd0| 2c 6c 72 25 2c 6c 78 25 | 2b 62 78 25 2c 6c 79 25 |,lr%,lx%|+bx%,ly%|
|00000be0| 2b 62 79 25 29 0d 04 7e | 19 c8 99 20 47 65 74 52 |+by%)..~|... GetR|
|00000bf0| 25 2c 30 2c 71 25 20 b8 | 20 6d 6f 72 65 25 0d 04 |%,0,q% .| more%..|
|00000c00| 88 05 ce 0d 04 92 18 6c | 68 25 3d 68 25 3a 6c 6d |.......l|h%=h%:lm|
|00000c10| 25 3d 6d 25 3a 6c 73 25 | 3d 73 25 0d 04 9c 05 e1 |%=m%:ls%|=s%.....|
|00000c20| 0d 04 a6 0a dd f2 74 69 | 63 6b 0d 04 b0 18 c8 99 |......ti|ck......|
|00000c30| 20 54 69 6d 65 25 20 b8 | 20 74 69 6d 65 73 6c 69 | Time% .| timesli|
|00000c40| 70 25 0d 04 ba 2f c8 95 | 74 69 6d 65 73 6c 69 70 |p%.../..|timeslip|
|00000c50| 25 3e 3d 74 69 6d 65 78 | 25 3a 74 69 6d 65 78 25 |%>=timex|%:timex%|
|00000c60| 2b 3d 31 30 30 3a ce 3a | f2 72 65 61 64 74 69 6d |+=100:.:|.readtim|
|00000c70| 65 0d 04 c4 05 e1 0d 04 | ce 1b dd f2 63 6c 6f 73 |e.......|....clos|
|00000c80| 65 5f 77 69 6e 64 6f 77 | 28 68 61 6e 64 6c 65 25 |e_window|(handle%|
|00000c90| 29 0d 04 d8 1d 21 71 25 | 3d 68 61 6e 64 6c 65 25 |)....!q%|=handle%|
|00000ca0| 3a c8 99 20 43 6c 6f 73 | 65 57 2c 2c 71 25 0d 04 |:.. Clos|eW,,q%..|
|00000cb0| e2 05 e1 0d 04 ec 0a dd | f2 76 61 72 73 0d 04 f6 |........|.vars...|
|00000cc0| 1e 57 69 6d 70 20 20 20 | 20 3d 20 28 31 3c 3c 31 |.Wimp   | = (1<<1|
|00000cd0| 38 29 20 2b 20 28 33 3c | 3c 36 29 0d 05 00 14 43 |8) + (3<|<6)....C|
|00000ce0| 72 65 61 74 65 57 20 3d | 20 57 69 6d 70 2b 31 0d |reateW =| Wimp+1.|
|00000cf0| 05 0a 14 4f 70 65 6e 57 | 20 20 20 3d 20 57 69 6d |...OpenW|   = Wim|
|00000d00| 70 2b 35 0d 05 14 14 43 | 6c 6f 73 65 57 20 20 3d |p+5....C|loseW  =|
|00000d10| 20 57 69 6d 70 2b 36 0d | 05 1e 14 52 65 64 72 61 | Wimp+6.|...Redra|
|00000d20| 77 57 20 3d 20 57 69 6d | 70 2b 38 0d 05 28 14 55 |wW = Wim|p+8..(.U|
|00000d30| 70 64 61 74 65 57 20 3d | 20 57 69 6d 70 2b 39 0d |pdateW =| Wimp+9.|
|00000d40| 05 32 15 47 65 74 52 25 | 20 20 20 3d 20 57 69 6d |.2.GetR%|   = Wim|
|00000d50| 70 2b 31 30 0d 05 3c 15 | 47 65 74 57 20 20 20 20 |p+10..<.|GetW    |
|00000d60| 3d 20 57 69 6d 70 2b 31 | 31 0d 05 46 15 47 65 74 |= Wimp+1|1..F.Get|
|00000d70| 50 20 20 20 20 3d 20 57 | 69 6d 70 2b 31 35 0d 05 |P    = W|imp+15..|
|00000d80| 50 15 44 72 61 67 20 20 | 20 20 3d 20 57 69 6d 70 |P.Drag  |  = Wimp|
|00000d90| 2b 31 36 0d 05 5a 15 43 | 72 4d 65 6e 75 20 20 3d |+16..Z.C|rMenu  =|
|00000da0| 20 57 69 6d 70 2b 32 30 | 0d 05 64 15 44 63 4d 65 | Wimp+20|..d.DcMe|
|00000db0| 6e 75 20 20 3d 20 57 69 | 6d 70 2b 32 31 0d 05 6e |nu  = Wi|mp+21..n|
|00000dc0| 39 c8 99 20 22 4f 53 5f | 53 57 49 4e 75 6d 62 65 |9.. "OS_|SWINumbe|
|00000dd0| 72 46 72 6f 6d 53 74 72 | 69 6e 67 22 2c 2c 22 58 |rFromStr|ing",,"X|
|00000de0| 57 69 6d 70 5f 50 6f 6c | 6c 49 64 6c 65 22 20 b8 |Wimp_Pol|lIdle" .|
|00000df0| 20 50 6f 6c 6c 25 0d 05 | 78 3f c8 99 20 22 4f 53 | Poll%..|x?.. "OS|
|00000e00| 5f 53 57 49 4e 75 6d 62 | 65 72 46 72 6f 6d 53 74 |_SWINumb|erFromSt|
|00000e10| 72 69 6e 67 22 2c 2c 22 | 4f 53 5f 52 65 61 64 4d |ring",,"|OS_ReadM|
|00000e20| 6f 6e 6f 74 6f 6e 69 63 | 54 69 6d 65 22 20 b8 20 |onotonic|Time" . |
|00000e30| 54 69 6d 65 25 0d 05 82 | 05 e1 0d 05 8c 10 dd f2 |Time%...|........|
|00000e40| 67 65 74 70 6f 69 6e 74 | 65 72 0d 05 96 0f c8 99 |getpoint|er......|
|00000e50| 20 47 65 74 50 2c 2c 71 | 25 0d 05 a0 48 6d 6f 75 | GetP,,q|%...Hmou|
|00000e60| 73 65 78 25 3d 21 71 25 | 3a 6d 6f 75 73 65 79 25 |sex%=!q%|:mousey%|
|00000e70| 3d 71 25 21 34 3a 62 25 | 3d 71 25 21 38 3a 68 61 |=q%!4:b%|=q%!8:ha|
|00000e80| 6e 64 6c 65 25 3d 71 25 | 21 31 32 3a 69 63 6f 6e |ndle%=q%|!12:icon|
|00000e90| 25 3d 71 25 21 31 36 3a | 6f 62 25 3d 71 25 21 32 |%=q%!16:|ob%=q%!2|
|00000ea0| 30 0d 05 aa 05 e1 0d 05 | b4 0e dd f2 65 72 72 6f |0.......|....erro|
|00000eb0| 72 62 6f 78 0d 05 be 0f | c8 99 20 44 72 61 67 2c |rbox....|.. Drag,|
|00000ec0| 2c 2d 31 0d 05 c8 23 21 | 62 75 66 66 65 72 73 25 |,-1...#!|buffers%|
|00000ed0| 3d 9f 3a 24 28 62 75 66 | 66 65 72 73 25 2b 34 29 |=.:$(buf|fers%+4)|
|00000ee0| 3d f6 24 2b bd 30 0d 05 | d2 2c c8 99 20 22 57 69 |=.$+.0..|.,.. "Wi|
|00000ef0| 6d 70 5f 52 65 70 6f 72 | 74 45 72 72 6f 72 22 2c |mp_Repor|tError",|
|00000f00| 62 75 66 66 65 72 73 25 | 2c 31 2c 22 63 6c 6f 63 |buffers%|,1,"cloc|
|00000f10| 6b 22 0d 05 dc 0d f2 66 | 69 6e 69 73 68 3a e0 0d |k".....f|inish:..|
|00000f20| 05 e6 05 e1 0d 05 f0 0f | dd f2 69 6e 69 74 63 6c |........|..initcl|
|00000f30| 6f 63 6b 0d 05 fa 10 ee | 85 3a f2 66 69 6e 69 73 |ock.....|.:.finis|
|00000f40| 68 3a e0 0d 06 04 09 f2 | 76 61 72 73 0d 06 0e 0d |h:......|vars....|
|00000f50| de 20 74 62 6c 25 20 32 | 30 0d 06 18 1e de 20 74 |. tbl% 2|0..... t|
|00000f60| 61 73 6b 69 64 25 34 3a | 24 74 61 73 6b 69 64 25 |askid%4:|$taskid%|
|00000f70| 3d 22 54 41 53 4b 22 0d | 06 22 38 c8 99 20 22 57 |="TASK".|."8.. "W|
|00000f80| 69 6d 70 5f 49 6e 69 74 | 69 61 6c 69 73 65 22 2c |imp_Init|ialise",|
|00000f90| 32 30 30 2c 21 74 61 73 | 6b 69 64 25 2c 22 43 6c |200,!tas|kid%,"Cl|
|00000fa0| 6f 63 6b 22 20 b8 20 76 | 65 72 73 69 6f 6e 25 0d |ock" . v|ersion%.|
|00000fb0| 06 2c 25 de 20 71 25 20 | 32 35 36 2c 62 75 66 66 |.,%. q% |256,buff|
|00000fc0| 65 72 73 25 20 35 31 32 | 2c 70 61 6c 65 74 74 65 |ers% 512|,palette|
|00000fd0| 25 20 38 30 0d 06 36 17 | f7 2b 31 3a 63 6c 6f 63 |% 80..6.|.+1:cloc|
|00000fe0| 6b 25 3d a4 63 77 69 6e | 64 6f 77 0d 06 40 36 dc |k%=.cwin|dow..@6.|
|00000ff0| 20 43 6c 6f 63 6b 2c 26 | 42 46 30 30 30 30 30 33 | Clock,&|BF000003|
|00001000| 2c 37 2c 30 2c 30 2c 2d | 39 38 30 2c 31 32 38 30 |,7,0,0,-|980,1280|
|00001010| 2c 30 2c 30 2c 2d 34 30 | 30 2c 34 30 30 2c 30 2c |,0,0,-40|0,400,0,|
|00001020| 30 0d 06 4a 1f f4 20 77 | 61 73 20 2d 31 30 32 34 |0..J.. w|as -1024|
|00001030| 20 69 6e 73 74 65 61 64 | 20 6f 66 20 2d 39 38 30 | instead| of -980|
|00001040| 0d 06 54 14 de 73 69 6e | 28 35 39 29 2c 63 6f 73 |..T..sin|(59),cos|
|00001050| 28 35 39 29 0d 06 5e 0c | e3 49 25 3d 30 b8 35 39 |(59)..^.|.I%=0.59|
|00001060| 0d 06 68 14 73 69 6e 28 | 49 25 29 3d b5 b2 28 49 |..h.sin(|I%)=..(I|
|00001070| 25 2a 36 29 0d 06 72 14 | 63 6f 73 28 49 25 29 3d |%*6)..r.|cos(I%)=|
|00001080| 9b b2 28 49 25 2a 36 29 | 0d 06 7c 05 ed 0d 06 86 |..(I%*6)|..|.....|
|00001090| 22 f2 72 65 61 64 74 69 | 6d 65 3a 6c 68 25 3d 68 |".readti|me:lh%=h|
|000010a0| 25 3a 6c 6d 25 3d 6d 25 | 3a 6c 73 25 3d 73 25 0d |%:lm%=m%|:ls%=s%.|
|000010b0| 06 90 21 f2 63 61 6c 63 | 72 78 79 3a 6c 72 25 3d |..!.calc|rxy:lr%=|
|000010c0| 72 25 3a 6c 78 25 3d 78 | 25 3a 6c 79 25 3d 79 25 |r%:lx%=x|%:ly%=y%|
|000010d0| 0d 06 9a 12 f2 72 65 73 | 65 74 5f 70 61 6c 65 74 |.....res|et_palet|
|000010e0| 74 65 0d 06 a4 05 e1 0d | 06 ae 13 dd f2 72 65 73 |te......|.....res|
|000010f0| 65 74 5f 70 61 6c 65 74 | 74 65 0d 06 b8 28 c8 99 |et_palet|te...(..|
|00001100| 22 4f 53 5f 52 65 61 64 | 4d 6f 64 65 56 61 72 69 |"OS_Read|ModeVari|
|00001110| 61 62 6c 65 22 2c eb 2c | 39 20 b8 20 2c 2c 62 70 |able",.,|9 . ,,bp|
|00001120| 70 25 0d 06 c2 22 c8 99 | 22 57 69 6d 70 5f 52 65 |p%..."..|"Wimp_Re|
|00001130| 61 64 50 61 6c 65 74 74 | 65 22 2c 2c 70 61 6c 65 |adPalett|e",,pale|
|00001140| 74 74 65 25 0d 06 cc 15 | 63 30 25 3d 3f 70 61 6c |tte%....|c0%=?pal|
|00001150| 65 74 74 65 25 20 3e 3e | 32 0d 06 d6 15 74 30 25 |ette% >>|2....t0%|
|00001160| 3d 3f 70 61 6c 65 74 74 | 65 25 20 80 20 33 0d 06 |=?palett|e% . 3..|
|00001170| e0 05 e1 0d 06 ea 1e dd | f2 63 6c 6f 63 6b 28 48 |........|.clock(H|
|00001180| 25 2c 4d 25 2c 53 25 2c | 52 25 2c 58 25 2c 59 25 |%,M%,S%,|R%,X%,Y%|
|00001190| 29 0d 06 f4 07 ea 54 25 | 0d 06 fe 0e f2 67 63 6f |).....T%|.....gco|
|000011a0| 6c 28 30 2c 37 29 0d 07 | 08 0c e7 52 25 3e 31 35 |l(0,7)..|...R%>15|
|000011b0| 30 8c 0d 07 12 13 54 25 | 3d 52 25 2d 28 52 25 3e |0.....T%|=R%-(R%>|
|000011c0| 3e 35 29 2d 38 0d 07 1c | 0c e3 49 25 3d 30 b8 35 |>5)-8...|..I%=0.5|
|000011d0| 39 0d 07 26 21 c8 92 58 | 25 2b 54 25 2a 73 69 6e |9..&!..X|%+T%*sin|
|000011e0| 28 49 25 29 2c 59 25 2b | 54 25 2a 63 6f 73 28 49 |(I%),Y%+|T%*cos(I|
|000011f0| 25 29 0d 07 30 05 ed 0d | 07 3a 05 cd 0d 07 44 0b |%)..0...|.:....D.|
|00001200| e7 52 25 3e 35 30 8c 0d | 07 4e 0e f2 67 63 6f 6c |.R%>50..|.N..gcol|
|00001210| 28 30 2c 38 29 0d 07 58 | 11 54 25 3d 52 25 2d 28 |(0,8)..X|.T%=R%-(|
|00001220| 52 25 3e 3e 34 29 0d 07 | 62 0e e3 49 25 3d 30 b8 |R%>>4)..|b..I%=0.|
|00001230| 35 39 88 35 0d 07 6c 11 | 54 25 3d 52 25 2d 28 52 |59.5..l.|T%=R%-(R|
|00001240| 25 3e 3e 34 29 0d 07 76 | 39 c8 93 c8 90 58 25 2b |%>>4)..v|9....X%+|
|00001250| 54 25 2a 73 69 6e 28 49 | 25 29 2d 28 52 25 3e 3e |T%*sin(I|%)-(R%>>|
|00001260| 35 29 2c 59 25 2b 54 25 | 2a 63 6f 73 28 49 25 29 |5),Y%+T%|*cos(I%)|
|00001270| 2d 28 52 25 3e 3e 35 29 | 2c 52 25 3e 3e 34 0d 07 |-(R%>>5)|,R%>>4..|
|00001280| 80 05 ed 0d 07 8a 05 cd | 0d 07 94 0e f2 67 63 6f |........|.....gco|
|00001290| 6c 28 30 2c 37 29 0d 07 | 9e 0e c8 8f 58 25 2c 59 |l(0,7)..|....X%,Y|
|000012a0| 25 2c 52 25 0d 07 a8 1d | f2 68 61 6e 64 73 28 48 |%,R%....|.hands(H|
|000012b0| 25 2c 4d 25 2c 53 25 2c | 52 25 2c 58 25 2c 59 25 |%,M%,S%,|R%,X%,Y%|
|000012c0| 29 0d 07 b2 05 e1 0d 07 | bc 1e dd f2 68 61 6e 64 |).......|....hand|
|000012d0| 73 28 48 25 2c 4d 25 2c | 53 25 2c 52 25 2c 58 25 |s(H%,M%,|S%,R%,X%|
|000012e0| 2c 59 25 29 0d 07 c6 0e | f2 67 63 6f 6c 28 33 2c |,Y%)....|.gcol(3,|
|000012f0| 33 29 0d 07 d0 26 f2 68 | 61 6e 64 28 48 25 2a 35 |3)...&.h|and(H%*5|
|00001300| 2b 4d 25 81 31 32 2c 58 | 25 2c 59 25 2c 52 25 2d |+M%.12,X|%,Y%,R%-|
|00001310| 28 52 25 3e 3e 31 29 29 | 0d 07 da 1e f2 68 61 6e |(R%>>1))|.....han|
|00001320| 64 28 4d 25 2c 58 25 2c | 59 25 2c 52 25 2d 28 52 |d(M%,X%,|Y%,R%-(R|
|00001330| 25 3e 3e 32 29 29 0d 07 | e4 0f f2 67 63 6f 6c 28 |%>>2))..|...gcol(|
|00001340| 33 2c 31 31 29 0d 07 ee | 0a ec 58 25 2c 59 25 0d |3,11)...|..X%,Y%.|
|00001350| 07 f8 2c ec 42 59 28 52 | 25 3e 3e 34 29 2a 73 69 |..,.BY(R|%>>4)*si|
|00001360| 6e 28 53 25 83 36 30 29 | 2c 28 52 25 3e 3e 34 29 |n(S%.60)|,(R%>>4)|
|00001370| 2a 63 6f 73 28 53 25 83 | 36 30 29 0d 08 02 36 df |*cos(S%.|60)...6.|
|00001380| 42 59 28 52 25 2d 28 52 | 25 3e 3e 34 29 29 2a 73 |BY(R%-(R|%>>4))*s|
|00001390| 69 6e 28 53 25 83 36 30 | 29 2c 28 52 25 2d 28 52 |in(S%.60|),(R%-(R|
|000013a0| 25 3e 3e 34 29 29 2a 63 | 6f 73 28 53 25 83 36 30 |%>>4))*c|os(S%.60|
|000013b0| 29 0d 08 0c 0f f2 67 63 | 6f 6c 28 30 2c 31 31 29 |).....gc|ol(0,11)|
|000013c0| 0d 08 16 13 c8 8f c8 90 | 58 25 2c 59 25 2c 52 25 |........|X%,Y%,R%|
|000013d0| 3e 3e 34 0d 08 20 05 e1 | 0d 08 2a 17 dd f2 68 61 |>>4.. ..|..*...ha|
|000013e0| 6e 64 28 41 25 2c 58 25 | 2c 59 25 2c 52 25 29 0d |nd(A%,X%|,Y%,R%).|
|000013f0| 08 34 07 ea 54 25 0d 08 | 3e 15 54 25 3d 28 52 25 |.4..T%..|>.T%=(R%|
|00001400| 3e 3e 31 29 2f 63 6f 73 | 28 31 29 0d 08 48 2e ec |>>1)/cos|(1)..H..|
|00001410| 58 25 2b 73 69 6e 28 28 | 41 25 2b 31 29 83 36 30 |X%+sin((|A%+1).60|
|00001420| 29 2a 54 25 2c 59 25 2b | 63 6f 73 28 28 41 25 2b |)*T%,Y%+|cos((A%+|
|00001430| 31 29 83 36 30 29 2a 54 | 25 0d 08 52 0a ec 58 25 |1).60)*T|%..R..X%|
|00001440| 2c 59 25 0d 08 5c 38 f0 | 31 31 37 2c 58 25 2b 73 |,Y%..\8.|117,X%+s|
|00001450| 69 6e 28 28 41 25 2b 36 | 30 2d 31 29 83 36 30 29 |in((A%+6|0-1).60)|
|00001460| 2a 54 25 2c 59 25 2b 63 | 6f 73 28 28 41 25 2b 36 |*T%,Y%+c|os((A%+6|
|00001470| 30 2d 31 29 83 36 30 29 | 2a 54 25 0d 08 66 05 e1 |0-1).60)|*T%..f..|
|00001480| 0d 08 70 24 dd f2 75 70 | 64 61 74 65 63 6c 6f 63 |..p$..up|datecloc|
|00001490| 6b 28 48 25 2c 4d 25 2c | 53 25 2c 52 25 2c 58 25 |k(H%,M%,|S%,R%,X%|
|000014a0| 2c 59 25 29 0d 08 7a 0d | e7 52 25 3c 3e 6c 72 25 |,Y%)..z.|.R%<>lr%|
|000014b0| 8c 0d 08 84 1e 20 f2 63 | 6c 6f 63 6b 28 48 25 2c |..... .c|lock(H%,|
|000014c0| 4d 25 2c 53 25 2c 52 25 | 2c 58 25 2c 59 25 29 0d |M%,S%,R%|,X%,Y%).|
|000014d0| 08 8e 05 cc 0d 08 98 0f | 20 f2 67 63 6f 6c 28 33 |........| .gcol(3|
|000014e0| 2c 33 29 0d 08 a2 2b 20 | e7 28 48 25 3c 3e 6c 68 |,3)...+ |.(H%<>lh|
|000014f0| 25 29 84 28 28 48 25 3d | 6c 68 25 29 80 28 6c 6d |%).((H%=|lh%).(lm|
|00001500| 25 81 31 32 3c 3e 4d 25 | 81 31 32 29 29 8c 0d 08 |%.12<>M%|.12))...|
|00001510| ac 2a 20 20 f2 68 61 6e | 64 28 6c 68 25 2a 35 2b |.*  .han|d(lh%*5+|
|00001520| 6c 6d 25 81 31 32 2c 58 | 25 2c 59 25 2c 52 25 2d |lm%.12,X|%,Y%,R%-|
|00001530| 28 52 25 3e 3e 31 29 29 | 0d 08 b6 06 20 cd 0d 08 |(R%>>1))|.... ...|
|00001540| c0 29 20 e7 4d 25 3c 3e | 6c 6d 25 3a f2 68 61 6e |.) .M%<>|lm%:.han|
|00001550| 64 28 6c 6d 25 2c 58 25 | 2c 59 25 2c 52 25 2d 28 |d(lm%,X%|,Y%,R%-(|
|00001560| 52 25 3e 3e 32 29 29 0d | 08 ca 10 20 f2 67 63 6f |R%>>2)).|... .gco|
|00001570| 6c 28 33 2c 31 31 29 0d | 08 d4 0f 20 e7 53 25 3c |l(3,11).|... .S%<|
|00001580| 3e 6c 73 25 20 8c 0d 08 | de 0c 20 20 ec 58 25 2c |>ls% ...|..  .X%,|
|00001590| 59 25 0d 08 e8 30 20 20 | ec 42 59 28 52 25 3e 3e |Y%...0  |.BY(R%>>|
|000015a0| 34 29 2a 73 69 6e 28 6c | 73 25 83 36 30 29 2c 28 |4)*sin(l|s%.60),(|
|000015b0| 52 25 3e 3e 34 29 2a 63 | 6f 73 28 6c 73 25 83 36 |R%>>4)*c|os(ls%.6|
|000015c0| 30 29 0d 08 f2 3a 20 20 | df 42 59 28 52 25 2d 28 |0)...:  |.BY(R%-(|
|000015d0| 52 25 3e 3e 34 29 29 2a | 73 69 6e 28 6c 73 25 83 |R%>>4))*|sin(ls%.|
|000015e0| 36 30 29 2c 28 52 25 2d | 28 52 25 3e 3e 34 29 29 |60),(R%-|(R%>>4))|
|000015f0| 2a 63 6f 73 28 6c 73 25 | 83 36 30 29 0d 08 fc 06 |*cos(ls%|.60)....|
|00001600| 20 cd 0d 09 06 0f 20 f2 | 67 63 6f 6c 28 33 2c 33 | ..... .|gcol(3,3|
|00001610| 29 0d 09 10 2b 20 e7 28 | 48 25 3c 3e 6c 68 25 29 |)...+ .(|H%<>lh%)|
|00001620| 84 28 28 48 25 3d 6c 68 | 25 29 80 28 6c 6d 25 81 |.((H%=lh|%).(lm%.|
|00001630| 31 32 3c 3e 4d 25 81 31 | 32 29 29 8c 0d 09 1a 28 |12<>M%.1|2))....(|
|00001640| 20 20 f2 68 61 6e 64 28 | 48 25 2a 35 2b 4d 25 81 |  .hand(|H%*5+M%.|
|00001650| 31 32 2c 58 25 2c 59 25 | 2c 52 25 2d 28 52 25 3e |12,X%,Y%|,R%-(R%>|
|00001660| 3e 31 29 29 0d 09 24 06 | 20 cd 0d 09 2e 28 20 e7 |>1))..$.| ....( .|
|00001670| 4d 25 3c 3e 6c 6d 25 3a | f2 68 61 6e 64 28 4d 25 |M%<>lm%:|.hand(M%|
|00001680| 2c 58 25 2c 59 25 2c 52 | 25 2d 28 52 25 3e 3e 32 |,X%,Y%,R|%-(R%>>2|
|00001690| 29 29 0d 09 38 10 20 f2 | 67 63 6f 6c 28 33 2c 31 |))..8. .|gcol(3,1|
|000016a0| 31 29 0d 09 42 0f 20 e7 | 53 25 3c 3e 6c 73 25 20 |1)..B. .|S%<>ls% |
|000016b0| 8c 0d 09 4c 0c 20 20 ec | 58 25 2c 59 25 0d 09 56 |...L.  .|X%,Y%..V|
|000016c0| 2e 20 20 ec 42 59 28 52 | 25 3e 3e 34 29 2a 73 69 |.  .BY(R|%>>4)*si|
|000016d0| 6e 28 53 25 83 36 30 29 | 2c 28 52 25 3e 3e 34 29 |n(S%.60)|,(R%>>4)|
|000016e0| 2a 63 6f 73 28 53 25 83 | 36 30 29 0d 09 60 38 20 |*cos(S%.|60)..`8 |
|000016f0| 20 df 42 59 28 52 25 2d | 28 52 25 3e 3e 34 29 29 | .BY(R%-|(R%>>4))|
|00001700| 2a 73 69 6e 28 53 25 83 | 36 30 29 2c 28 52 25 2d |*sin(S%.|60),(R%-|
|00001710| 28 52 25 3e 3e 34 29 29 | 2a 63 6f 73 28 53 25 83 |(R%>>4))|*cos(S%.|
|00001720| 36 30 29 0d 09 6a 06 20 | cd 0d 09 74 20 20 f2 67 |60)..j. |...t  .g|
|00001730| 63 6f 6c 28 30 2c 31 31 | 29 3a c8 8f c8 90 58 25 |col(0,11|):....X%|
|00001740| 2c 59 25 2c 52 25 3e 3e | 34 0d 09 7e 05 cd 0d 09 |,Y%,R%>>|4..~....|
|00001750| 88 05 e1 0d 09 92 11 dd | f2 72 65 64 72 61 77 63 |........|.redrawc|
|00001760| 6c 6f 63 6b 0d 09 9c 28 | f2 63 6c 6f 63 6b 28 6c |lock...(|.clock(l|
|00001770| 68 25 2c 6c 6d 25 2c 6c | 73 25 2c 72 25 2c 78 25 |h%,lm%,l|s%,r%,x%|
|00001780| 2b 62 78 25 2c 79 25 2b | 62 79 25 29 0d 09 a6 05 |+bx%,y%+|by%)....|
|00001790| e1 0d 09 b0 11 dd f2 67 | 63 6f 6c 28 4d 25 2c 43 |.......g|col(M%,C|
|000017a0| 25 29 0d 09 ba 0d ea 20 | 74 31 25 2c 63 31 25 0d |%)..... |t1%,c1%.|
|000017b0| 09 c4 0c e7 20 4d 25 3d | 33 20 8c 0d 09 ce 0e 20 |.... M%=|3 ..... |
|000017c0| e7 62 70 70 25 3d 33 20 | 8c 0d 09 d8 1c 20 20 63 |.bpp%=3 |.....  c|
|000017d0| 31 25 3d 70 61 6c 65 74 | 74 65 25 3f 28 43 25 2a |1%=palet|te%?(C%*|
|000017e0| 34 29 3e 3e 32 0d 09 e2 | 1d 20 20 74 31 25 3d 70 |4)>>2...|.  t1%=p|
|000017f0| 61 6c 65 74 74 65 25 3f | 28 43 25 2a 34 29 20 80 |alette%?|(C%*4) .|
|00001800| 20 33 0d 09 ec 20 20 20 | e6 20 33 2c 63 31 25 20 | 3...   |. 3,c1% |
|00001810| 82 20 63 30 25 20 c8 9c | 20 74 31 25 20 82 20 74 |. c0% ..| t1% . t|
|00001820| 30 25 0d 09 f6 06 20 cc | 0d 0a 00 2d 20 20 c8 99 |0%.... .|...-  ..|
|00001830| 20 22 57 69 6d 70 5f 53 | 65 74 43 6f 6c 6f 75 72 | "Wimp_S|etColour|
|00001840| 22 2c 28 43 25 80 31 35 | 29 84 28 28 4d 25 80 37 |",(C%.15|).((M%.7|
|00001850| 29 3c 3c 34 29 0d 0a 0a | 06 20 cd 0d 0a 14 05 cc |)<<4)...|. ......|
|00001860| 0d 0a 1e 2c 20 c8 99 20 | 22 57 69 6d 70 5f 53 65 |..., .. |"Wimp_Se|
|00001870| 74 43 6f 6c 6f 75 72 22 | 2c 28 43 25 80 31 35 29 |tColour"|,(C%.15)|
|00001880| 84 28 28 4d 25 80 37 29 | 3c 3c 34 29 0d 0a 28 05 |.((M%.7)|<<4)..(.|
|00001890| cd 0d 0a 32 05 e1 0d 0a | 3c 0e dd f2 72 65 61 64 |...2....|<...read|
|000018a0| 74 69 6d 65 0d 0a 46 20 | 3f 74 62 6c 25 3d 33 3a |time..F |?tbl%=3:|
|000018b0| c8 99 20 22 4f 53 5f 57 | 6f 72 64 22 2c 31 34 2c |.. "OS_W|ord",14,|
|000018c0| 74 62 6c 25 0d 0a 50 40 | c8 99 22 4f 53 5f 43 6f |tbl%..P@|.."OS_Co|
|000018d0| 6e 76 65 72 74 44 61 74 | 65 41 6e 64 54 69 6d 65 |nvertDat|eAndTime|
|000018e0| 22 2c 74 62 6c 25 2c 62 | 75 66 66 65 72 73 25 2c |",tbl%,b|uffers%,|
|000018f0| 35 31 32 2c 22 25 31 32 | 20 25 4d 49 20 25 53 45 |512,"%12| %MI %SE|
|00001900| 22 2b bd 30 0d 0a 5a 15 | 68 25 3d bb c0 24 62 75 |"+.0..Z.|h%=..$bu|
|00001910| 66 66 65 72 73 25 2c 32 | 29 0d 0a 64 17 6d 25 3d |ffers%,2|)..d.m%=|
|00001920| bb c1 24 62 75 66 66 65 | 72 73 25 2c 34 2c 32 29 |..$buffe|rs%,4,2)|
|00001930| 0d 0a 6e 17 73 25 3d bb | c1 24 62 75 66 66 65 72 |..n.s%=.|.$buffer|
|00001940| 73 25 2c 37 2c 32 29 0d | 0a 78 05 e1 0d 0a 82 0d |s%,7,2).|.x......|
|00001950| dd f2 63 61 6c 63 72 78 | 79 0d 0a 8c 11 f2 67 65 |..calcrx|y.....ge|
|00001960| 74 77 28 63 6c 6f 63 6b | 25 29 0d 0a 96 25 72 25 |tw(clock|%)...%r%|
|00001970| 3d 78 31 25 2d 78 30 25 | 3a e7 72 25 3e 79 31 25 |=x1%-x0%|:.r%>y1%|
|00001980| 2d 79 30 25 3a 72 25 3d | 79 31 25 2d 79 30 25 0d |-y0%:r%=|y1%-y0%.|
|00001990| 0a a0 18 72 25 3d 72 25 | 3e 3e 31 3a 72 25 2d 3d |...r%=r%|>>1:r%-=|
|000019a0| 28 72 25 3e 3e 34 29 0d | 0a aa 22 78 25 3d 28 78 |(r%>>4).|.."x%=(x|
|000019b0| 31 25 2d 78 30 25 29 81 | 32 3a 79 25 3d 2d 28 79 |1%-x0%).|2:y%=-(y|
|000019c0| 31 25 2d 79 30 25 29 81 | 32 0d 0a b4 05 e1 0d 0a |1%-y0%).|2.......|
|000019d0| be 05 3a 0d 0a c8 09 dd | f2 64 69 65 0d 0a d2 0f |..:.....|.die....|
|000019e0| 21 62 75 66 66 65 72 73 | 25 3d 30 0d 0a dc 51 24 |!buffers|%=0...Q$|
|000019f0| 28 62 75 66 66 65 72 73 | 25 2b 34 29 3d 22 43 6c |(buffers|%+4)="Cl|
|00001a00| 6f 63 6b 20 68 61 73 20 | 73 75 66 66 65 72 65 64 |ock has |suffered|
|00001a10| 20 61 20 66 61 74 61 6c | 20 65 72 72 6f 72 20 61 | a fatal| error a|
|00001a20| 6e 64 20 6d 75 73 74 20 | 65 78 69 74 20 69 6d 6d |nd must |exit imm|
|00001a30| 65 64 69 61 74 65 6c 79 | 22 2b bd 30 0d 0a e6 2c |ediately|"+.0...,|
|00001a40| c8 99 20 22 57 69 6d 70 | 5f 52 65 70 6f 72 74 45 |.. "Wimp|_ReportE|
|00001a50| 72 72 6f 72 22 2c 62 75 | 66 66 65 72 73 25 2c 31 |rror",bu|ffers%,1|
|00001a60| 2c 22 43 6c 6f 63 6b 22 | 0d 0a f0 0b f2 66 69 6e |,"Clock"|.....fin|
|00001a70| 69 73 68 0d 0a fa 05 e0 | 0d 0b 04 05 e1 0d ff    |ish.....|....... |
+--------+-------------------------+-------------------------+--------+--------+