home *** CD-ROM | disk | FTP | other *** search
/ APDL Public Domain 1 / APDL_PD1A.iso / clock_time / timer / !Timer / !RunImage < prev    next >
Unknown  |  1990-02-11  |  4.9 KB

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text


This file was not able to be converted.
This format is not currently supported by dexvert.

ConfidenceProgramDetectionMatch TypeSupport
100% file data default
100% xdgMime image/x-tga default



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 1f f4 20 3e 24 | 2e 21 54 69 6d 65 72 2e |..... >$|.!Timer.|
|00000010| 21 52 75 6e 49 6d 61 67 | 65 20 76 31 2e 30 31 0d |!RunImag|e v1.01.|
|00000020| 00 14 24 f4 20 52 49 53 | 43 4f 53 20 44 65 73 6b |..$. RIS|COS Desk|
|00000030| 74 6f 70 20 73 74 6f 70 | 77 61 74 63 68 2f 54 69 |top stop|watch/Ti|
|00000040| 6d 65 72 0d 00 1e 39 f4 | 20 a9 20 43 6f 70 79 72 |mer...9.| . Copyr|
|00000050| 69 67 68 74 20 27 38 39 | 20 4a 61 73 6f 6e 20 57 |ight '89| Jason W|
|00000060| 69 6c 6c 69 61 6d 73 2e | 20 41 6c 6c 20 72 69 67 |illiams.| All rig|
|00000070| 68 74 73 20 72 65 73 65 | 72 76 65 64 0d 00 28 04 |hts rese|rved..(.|
|00000080| 0d 00 32 4b ee 85 20 f2 | 65 72 72 6f 72 28 f6 24 |..2K.. .|error(.$|
|00000090| 2b 22 28 69 6e 74 65 72 | 6e 61 6c 20 72 65 66 2e |+"(inter|nal ref.|
|000000a0| 20 22 2b c3 7e 9f 2b 22 | 2f 22 2b c3 9e 2b 22 29 | "+.~.+"|/"+..+")|
|000000b0| 22 2b bd 30 29 3a c8 99 | 20 22 57 69 6d 70 5f 43 |"+.0):..| "Wimp_C|
|000000c0| 6c 6f 73 65 44 6f 77 6e | 22 3a e0 0d 00 3c 04 0d |loseDown|":...<..|
|000000d0| 00 46 04 0d 00 50 35 f4 | 20 43 68 61 6e 67 65 20 |.F...P5.| Change |
|000000e0| 74 68 65 73 65 20 63 6f | 6e 73 74 61 6e 74 73 20 |these co|nstants |
|000000f0| 74 6f 20 63 68 61 6e 67 | 65 20 75 6e 69 74 73 2f |to chang|e units/|
|00000100| 63 6f 73 74 69 6e 67 3a | 0d 00 5a 04 0d 00 64 41 |costing:|..Z...dA|
|00000110| 75 6e 69 74 24 3d 22 a3 | 22 20 20 20 20 20 20 20 |unit$=".|" |
|00000120| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000130| 20 20 20 3a f4 20 4d 6f | 6e 65 74 61 72 79 20 75 | :. Mo|netary u|
|00000140| 6e 69 74 20 28 24 2f a3 | 20 65 74 63 29 0d 00 6e |nit ($/.| etc)..n|
|00000150| 48 63 6f 73 74 70 65 72 | 6d 69 6e 24 3d 22 34 70 |Hcostper|min$="4p|
|00000160| 22 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |" | |
|00000170| 20 20 20 20 3a f4 20 63 | 6f 73 74 2d 70 65 72 2d | :. c|ost-per-|
|00000180| 6d 69 6e 75 74 65 20 64 | 69 73 70 6c 61 79 20 73 |minute d|isplay s|
|00000190| 74 72 69 6e 67 0d 00 78 | 4a 63 6f 73 74 70 65 72 |tring..x|Jcostper|
|000001a0| 6d 69 6e 25 3d 34 20 20 | 20 20 20 20 20 20 20 20 |min%=4 | |
|000001b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 3a f4 20 63 | | :. c|
|000001c0| 6f 73 74 2d 70 65 72 2d | 6d 69 6e 75 74 65 20 28 |ost-per-|minute (|
|000001d0| 69 6e 20 a2 2f 70 65 6e | 63 65 20 65 74 63 29 0d |in ./pen|ce etc).|
|000001e0| 00 82 04 0d 00 8c 09 f2 | 69 6e 69 74 0d 00 96 05 |........|init....|
|000001f0| f5 0d 00 a0 26 20 c8 99 | 20 22 57 69 6d 70 5f 50 |....& ..| "Wimp_P|
|00000200| 6f 6c 6c 22 2c 30 2c 62 | 25 20 b8 20 72 65 74 75 |oll",0,b|% . retu|
|00000210| 72 6e 63 6f 64 65 25 0d | 00 aa 15 20 c8 8e 20 72 |rncode%.|... .. r|
|00000220| 65 74 75 72 6e 63 6f 64 | 65 25 20 ca 0d 00 b4 15 |eturncod|e% .....|
|00000230| 20 20 c9 20 30 20 3a 20 | f2 73 5f 75 70 64 61 74 | . 0 : |.s_updat|
|00000240| 65 0d 00 be 2e 20 20 c9 | 20 32 20 3a 20 c8 99 20 |e.... .| 2 : .. |
|00000250| 22 57 69 6d 70 5f 4f 70 | 65 6e 57 69 6e 64 6f 77 |"Wimp_Op|enWindow|
|00000260| 22 2c 2c 62 25 3a f2 73 | 5f 75 70 64 61 74 65 0d |",,b%:.s|_update.|
|00000270| 00 c8 13 20 20 c9 20 33 | 20 3a 20 71 75 69 74 25 |... . 3| : quit%|
|00000280| 3d b9 0d 00 d2 2d 20 20 | c9 20 36 20 3a 20 f2 6d |=....- |. 6 : .m|
|00000290| 65 6e 75 63 6c 69 63 6b | 28 62 25 21 31 32 2c 62 |enuclick|(b%!12,b|
|000002a0| 25 21 30 2d 31 36 2c 62 | 25 21 34 2d 31 32 29 0d |%!0-16,b|%!4-12).|
|000002b0| 00 dc 1c 20 20 c9 20 39 | 20 3a 20 f2 6d 65 6e 75 |... . 9| : .menu|
|000002c0| 73 65 6c 65 63 74 28 21 | 62 25 29 0d 00 e6 23 20 |select(!|b%)...# |
|000002d0| 20 c9 20 31 37 2c 31 38 | 20 3a 20 e7 20 62 25 21 | . 17,18| : . b%!|
|000002e0| 31 36 3d 30 20 8c 20 71 | 75 69 74 25 3d b9 0d 00 |16=0 . q|uit%=...|
|000002f0| f0 06 20 cb 0d 00 fa 0b | fd 20 71 75 69 74 25 0d |.. .....|. quit%.|
|00000300| 01 04 04 0d 01 0e 17 c8 | 99 20 22 57 69 6d 70 5f |........|. "Wimp_|
|00000310| 43 6c 6f 73 65 44 6f 77 | 6e 22 0d 01 18 05 e0 0d |CloseDow|n"......|
|00000320| 01 22 05 3a 0d 01 2c 1a | dd 20 f2 6d 65 6e 75 63 |.".:..,.|. .menuc|
|00000330| 6c 69 63 6b 28 57 25 2c | 58 25 2c 59 25 29 0d 01 |lick(W%,|X%,Y%)..|
|00000340| 36 14 e7 20 62 25 21 38 | 3d 32 20 8c 20 f2 6d 65 |6.. b%!8|=2 . .me|
|00000350| 6e 75 0d 01 40 05 e1 0d | 01 4a 05 3a 0d 01 54 26 |nu..@...|.J.:..T&|
|00000360| dd 20 f2 6d 65 6e 75 73 | 65 6c 65 63 74 28 6d 69 |. .menus|elect(mi|
|00000370| 74 65 6d 25 29 3a ea 20 | 73 74 61 79 25 2c 6e 75 |tem%):. |stay%,nu|
|00000380| 6d 25 0d 01 5e 20 c8 99 | 20 22 57 69 6d 70 5f 47 |m%..^ ..| "Wimp_G|
|00000390| 65 74 50 6f 69 6e 74 65 | 72 49 6e 66 6f 22 2c 2c |etPointe|rInfo",,|
|000003a0| 62 25 0d 01 68 12 73 74 | 61 79 25 3d 28 62 25 21 |b%..h.st|ay%=(b%!|
|000003b0| 38 3d 31 29 0d 01 72 0f | c8 8e 20 6d 74 79 70 65 |8=1)..r.|.. mtype|
|000003c0| 25 20 ca 0d 01 7c 0b 20 | 20 c9 20 2d 31 3a 0d 01 |% ...|. | . -1:..|
|000003d0| 86 13 20 20 20 20 c8 8e | 20 6d 69 74 65 6d 25 20 |.. ..| mitem% |
|000003e0| ca 0d 01 90 16 20 20 20 | 20 20 20 c9 20 31 3a 20 |..... | . 1: |
|000003f0| f2 73 5f 73 74 6f 70 0d | 01 9a 14 20 20 20 20 20 |.s_stop.|... |
|00000400| 20 c9 20 32 3a 20 f2 63 | 6f 73 74 0d 01 a4 16 20 | . 2: .c|ost.... |
|00000410| 20 20 20 20 20 c9 20 33 | 3a 20 71 75 69 74 25 3d | . 3|: quit%=|
|00000420| b9 0d 01 ae 09 20 20 20 | 20 cb 0d 01 b8 0b 20 20 |..... | ..... |
|00000430| c9 20 20 30 3a 0d 01 c2 | 13 20 20 20 20 c8 8e 20 |. 0:...|. .. |
|00000440| 6d 69 74 65 6d 25 20 ca | 0d 01 cc 17 20 20 20 20 |mitem% .|.... |
|00000450| 20 20 c9 20 31 3a 20 f2 | 73 5f 73 74 61 72 74 0d | . 1: .|s_start.|
|00000460| 01 d6 14 20 20 20 20 20 | 20 c9 20 32 3a 20 f2 63 |... | . 2: .c|
|00000470| 6f 73 74 0d 01 e0 16 20 | 20 20 20 20 20 c9 20 33 |ost.... | . 3|
|00000480| 3a 20 71 75 69 74 25 3d | b9 0d 01 ea 09 20 20 20 |: quit%=|..... |
|00000490| 20 cb 0d 01 f4 08 20 20 | 7f 3a 0d 01 fe 13 20 20 | ..... |.:.... |
|000004a0| 20 20 c8 8e 20 6d 69 74 | 65 6d 25 20 ca 0d 02 08 | .. mit|em% ....|
|000004b0| 17 20 20 20 20 20 20 c9 | 20 31 3a 20 f2 73 5f 72 |. .| 1: .s_r|
|000004c0| 65 73 65 74 0d 02 12 17 | 20 20 20 20 20 20 c9 20 |eset....| . |
|000004d0| 32 3a 20 f2 73 5f 73 74 | 61 72 74 0d 02 1c 14 20 |2: .s_st|art.... |
|000004e0| 20 20 20 20 20 c9 20 33 | 3a 20 f2 63 6f 73 74 0d | . 3|: .cost.|
|000004f0| 02 26 16 20 20 20 20 20 | 20 c9 20 34 3a 20 71 75 |.&. | . 4: qu|
|00000500| 69 74 25 3d b9 0d 02 30 | 09 20 20 20 20 cb 0d 02 |it%=...0|. ...|
|00000510| 3a 05 cb 0d 02 44 13 e7 | 20 73 74 61 79 25 20 8c |:....D..| stay% .|
|00000520| 20 f2 6d 65 6e 75 0d 02 | 4e 05 e1 0d 02 58 05 3a | .menu..|N....X.:|
|00000530| 0d 02 62 38 dd 20 f2 63 | 6f 73 74 20 20 20 20 20 |..b8. .c|ost |
|00000540| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000550| 20 20 3a f4 20 54 75 72 | 6e 20 63 6f 73 74 69 6e | :. Tur|n costin|
|00000560| 67 20 6f 6e 2f 6f 66 66 | 0d 02 6c 10 63 6f 73 74 |g on/off|..l.cost|
|00000570| 25 3d ac 63 6f 73 74 25 | 0d 02 76 19 f2 63 68 69 |%=.cost%|..v..chi|
|00000580| 63 6f 6e 28 31 2c 22 2d | 2d 2d 2d 2d 2d 2d 2d 22 |con(1,"-|-------"|
|00000590| 29 0d 02 80 05 e1 0d 02 | 8a 05 3a 0d 02 94 10 dd |).......|..:.....|
|000005a0| 20 f2 6d 65 6e 75 3a ea | 20 61 24 0d 02 9e 12 c8 | .menu:.| a$.....|
|000005b0| 8e 20 73 74 6f 70 74 69 | 6d 65 25 20 ca 0d 02 a8 |. stopti|me% ....|
|000005c0| 37 20 20 c9 20 2d 31 3a | 20 f2 63 72 65 61 74 65 |7 . -1:| .create|
|000005d0| 6d 65 6e 75 28 22 54 69 | 6d 65 72 22 2c 22 49 6e |menu("Ti|mer","In|
|000005e0| 66 6f 2c 53 74 6f 70 2c | 43 6f 73 74 2c 51 75 69 |fo,Stop,|Cost,Qui|
|000005f0| 74 2c 22 29 0d 02 b2 38 | 20 20 c9 20 20 30 3a 20 |t,")...8| . 0: |
|00000600| f2 63 72 65 61 74 65 6d | 65 6e 75 28 22 54 69 6d |.createm|enu("Tim|
|00000610| 65 72 22 2c 22 49 6e 66 | 6f 2c 53 74 61 72 74 2c |er","Inf|o,Start,|
|00000620| 43 6f 73 74 2c 51 75 69 | 74 2c 22 29 0d 02 bc 3d |Cost,Qui|t,")...=|
|00000630| 20 20 7f 3a 20 f2 63 72 | 65 61 74 65 6d 65 6e 75 | .: .cr|eatemenu|
|00000640| 28 22 54 69 6d 65 72 22 | 2c 22 49 6e 66 6f 2c 52 |("Timer"|,"Info,R|
|00000650| 65 73 65 74 2c 52 65 73 | 74 61 72 74 2c 43 6f 73 |eset,Res|tart,Cos|
|00000660| 74 2c 51 75 69 74 2c 22 | 29 0d 02 c6 05 cb 0d 02 |t,Quit,"|).......|
|00000670| d0 14 6d 74 79 70 65 25 | 3d 73 74 6f 70 74 69 6d |..mtype%|=stoptim|
|00000680| 65 25 0d 02 da 05 e1 0d | 02 e4 05 3a 0d 02 ee 31 |e%......|...:...1|
|00000690| dd 20 a4 69 63 6f 6e 28 | 21 62 25 2c 78 31 2c 79 |. .icon(|!b%,x1,y|
|000006a0| 31 2c 78 32 2c 79 32 2c | 66 6c 61 67 73 25 2c 69 |1,x2,y2,|flags%,i|
|000006b0| 31 2c 69 32 2c 69 33 29 | 3a ea 20 68 25 0d 02 f8 |1,i2,i3)|:. h%...|
|000006c0| 25 62 25 21 34 3d 78 31 | 3a 62 25 21 38 3d 79 31 |%b%!4=x1|:b%!8=y1|
|000006d0| 3a 62 25 21 31 32 3d 78 | 32 3a 62 25 21 31 36 3d |:b%!12=x|2:b%!16=|
|000006e0| 79 32 0d 03 02 22 62 25 | 21 32 30 3d 66 6c 61 67 |y2..."b%|!20=flag|
|000006f0| 73 25 3a 62 25 21 32 34 | 3d 69 31 3a 62 25 21 32 |s%:b%!24|=i1:b%!2|
|00000700| 38 3d 69 32 0d 03 0c 2a | 62 25 21 33 32 3d 69 33 |8=i2...*|b%!32=i3|
|00000710| 3a c8 99 20 22 57 69 6d | 70 5f 43 72 65 61 74 65 |:.. "Wim|p_Create|
|00000720| 49 63 6f 6e 22 2c 2c 62 | 25 20 b8 20 68 25 0d 03 |Icon",,b|% . h%..|
|00000730| 16 07 3d 68 25 0d 03 20 | 05 3a 0d 03 2a 1c dd 20 |..=h%.. |.:..*.. |
|00000740| f2 63 72 65 61 74 65 6d | 65 6e 75 28 74 69 74 6c |.createm|enu(titl|
|00000750| 65 24 2c 6d 24 29 0d 03 | 34 10 ea 20 49 25 2c 6d |e$,m$)..|4.. I%,m|
|00000760| 61 78 25 2c 4d 25 0d 03 | 3e 04 0d 03 48 0c 4d 25 |ax%,M%..|>...H.M%|
|00000770| 3d 6d 65 6e 75 25 0d 03 | 52 1b 24 4d 25 3d 74 69 |=menu%..|R.$M%=ti|
|00000780| 74 6c 65 24 3a 4d 25 21 | 31 32 3d 26 37 30 32 30 |tle$:M%!|12=&7020|
|00000790| 37 0d 03 5c 14 4d 25 21 | 32 30 3d 34 34 3a 4d 25 |7..\.M%!|20=44:M%|
|000007a0| 21 32 34 3d 30 0d 03 66 | 1d 49 25 3d 4d 25 2b 32 |!24=0..f|.I%=M%+2|
|000007b0| 38 3a 6d 61 78 25 3d a9 | 28 74 69 74 6c 65 24 29 |8:max%=.|(title$)|
|000007c0| 2d 32 0d 03 70 05 f5 0d | 03 7a 23 20 20 41 25 3d |-2..p...|.z# A%=|
|000007d0| a7 6d 24 2c 22 2c 22 29 | 3a e7 20 41 25 3e 6d 61 |.m$,",")|:. A%>ma|
|000007e0| 78 25 20 6d 61 78 25 3d | 41 25 0d 03 84 2d 20 20 |x% max%=|A%...- |
|000007f0| 49 25 21 30 3d 30 3a e7 | 20 63 6f 73 74 25 3a e7 |I%!0=0:.| cost%:.|
|00000800| 20 c0 6d 24 2c 34 29 3d | 22 43 6f 73 74 22 20 8c | .m$,4)=|"Cost" .|
|00000810| 20 49 25 21 30 3d 31 0d | 03 8e 30 20 20 49 25 21 | I%!0=1.|..0 I%!|
|00000820| 34 3d 2d 31 3a e7 20 c0 | 6d 24 2c 34 29 3d 22 49 |4=-1:. .|m$,4)="I|
|00000830| 6e 66 6f 22 20 8c 20 49 | 25 21 34 3d 69 6e 66 6f |nfo" . I|%!4=info|
|00000840| 68 61 6e 64 6c 65 25 0d | 03 98 13 20 20 49 25 21 |handle%.|... I%!|
|00000850| 38 3d 26 37 30 30 30 30 | 32 31 0d 03 a2 18 20 20 |8=&70000|21.... |
|00000860| 24 28 49 25 2b 31 32 29 | 3d c0 6d 24 2c 41 25 2d |$(I%+12)|=.m$,A%-|
|00000870| 31 29 0d 03 ac 19 20 20 | 6d 24 3d c1 6d 24 2c 41 |1).... |m$=.m$,A|
|00000880| 25 2b 31 29 3a 49 25 2b | 3d 32 34 0d 03 b6 0b fd |%+1):I%+|=24.....|
|00000890| 20 6d 24 3d 22 22 0d 03 | c0 27 49 25 21 2d 32 34 | m$=""..|.'I%!-24|
|000008a0| 3d 28 49 25 21 2d 32 34 | 29 20 84 20 26 38 30 3a |=(I%!-24|) . &80:|
|000008b0| 4d 25 21 31 36 3d 6d 61 | 78 25 2a 31 36 0d 03 ca |M%!16=ma|x%*16...|
|000008c0| 36 e7 20 57 25 3d 2d 32 | 20 8c 20 79 70 6f 73 25 |6. W%=-2| . ypos%|
|000008d0| 3d 39 36 2b 34 34 2a 28 | 28 49 25 2d 28 4d 25 2b |=96+44*(|(I%-(M%+|
|000008e0| 32 38 29 29 81 32 34 29 | 20 8b 20 79 70 6f 73 25 |28)).24)| . ypos%|
|000008f0| 3d 59 25 0d 03 d4 2d c8 | 99 20 22 57 69 6d 70 5f |=Y%...-.|. "Wimp_|
|00000900| 43 72 65 61 74 65 4d 65 | 6e 75 22 2c 2c 4d 25 2c |CreateMe|nu",,M%,|
|00000910| 58 25 2d 4d 25 21 31 36 | 2f 32 2c 79 70 6f 73 25 |X%-M%!16|/2,ypos%|
|00000920| 0d 03 de 05 e1 0d 03 e8 | 05 3a 0d 03 f2 12 dd 20 |........|.:..... |
|00000930| f2 69 6e 69 74 3a ea 20 | 70 74 72 25 0d 03 fc 33 |.init:. |ptr%...3|
|00000940| de 20 62 25 20 35 31 32 | 2c 6d 65 6e 75 25 20 32 |. b% 512|,menu% 2|
|00000950| 35 35 2c 64 61 74 61 25 | 20 35 31 32 3a 64 61 74 |55,data%| 512:dat|
|00000960| 61 65 6e 64 25 3d 64 61 | 74 61 25 2b 35 31 32 0d |aend%=da|ta%+512.|
|00000970| 04 06 04 0d 04 10 0b 71 | 75 69 74 25 3d a3 0d 04 |.......q|uit%=...|
|00000980| 1a 0e 24 62 25 3d 22 54 | 41 53 4b 22 0d 04 24 37 |..$b%="T|ASK"..$7|
|00000990| c8 99 20 22 57 69 6d 70 | 5f 49 6e 69 74 69 61 6c |.. "Wimp|_Initial|
|000009a0| 69 73 65 22 2c 32 30 30 | 2c 21 62 25 2c 22 54 69 |ise",200|,!b%,"Ti|
|000009b0| 6d 65 72 22 20 b8 20 2c | 74 61 73 6b 68 61 6e 64 |mer" . ,|taskhand|
|000009c0| 6c 65 25 0d 04 2e 04 0d | 04 38 22 de 20 73 70 72 |le%.....|.8". spr|
|000009d0| 69 74 65 25 20 32 30 3a | 24 73 70 72 69 74 65 25 |ite% 20:|$sprite%|
|000009e0| 3d 22 21 54 69 6d 65 72 | 22 0d 04 42 32 61 70 70 |="!Timer|"..B2app|
|000009f0| 69 63 6f 6e 25 3d a4 69 | 63 6f 6e 28 2d 31 2c 30 |icon%=.i|con(-1,0|
|00000a00| 2c 30 2c 36 38 2c 36 38 | 2c 26 33 31 30 32 2c 73 |,0,68,68|,&3102,s|
|00000a10| 70 72 69 74 65 25 2c 31 | 2c 38 29 0d 04 4c 04 0d |prite%,1|,8)..L..|
|00000a20| 04 56 32 c8 99 20 22 57 | 69 6d 70 5f 4f 70 65 6e |.V2.. "W|imp_Open|
|00000a30| 54 65 6d 70 6c 61 74 65 | 22 2c 2c 22 3c 4f 62 65 |Template|",,"<Obe|
|00000a40| 79 24 44 69 72 3e 2e 54 | 65 6d 70 6c 61 74 65 73 |y$Dir>.T|emplates|
|00000a50| 22 0d 04 60 46 c8 99 20 | 22 57 69 6d 70 5f 4c 6f |"..`F.. |"Wimp_Lo|
|00000a60| 61 64 54 65 6d 70 6c 61 | 74 65 22 2c 2c 62 25 2c |adTempla|te",,b%,|
|00000a70| 64 61 74 61 25 2c 64 61 | 74 61 65 6e 64 25 2c 2d |data%,da|taend%,-|
|00000a80| 31 2c 22 70 72 6f 67 49 | 6e 66 6f 22 2c 30 20 b8 |1,"progI|nfo",0 .|
|00000a90| 20 2c 2c 70 74 72 25 0d | 04 6a 35 62 25 21 32 34 | ,,ptr%.|.j5b%!24|
|00000aa0| 3d 2d 31 3a c8 99 20 22 | 57 69 6d 70 5f 43 72 65 |=-1:.. "|Wimp_Cre|
|00000ab0| 61 74 65 57 69 6e 64 6f | 77 22 2c 2c 62 25 20 b8 |ateWindo|w",,b% .|
|00000ac0| 20 69 6e 66 6f 68 61 6e | 64 6c 65 25 0d 04 74 04 | infohan|dle%..t.|
|00000ad0| 0d 04 7e 3a c8 99 20 22 | 57 69 6d 70 5f 4c 6f 61 |..~:.. "|Wimp_Loa|
|00000ae0| 64 54 65 6d 70 6c 61 74 | 65 22 2c 2c 62 25 2c 70 |dTemplat|e",,b%,p|
|00000af0| 74 72 25 2c 64 61 74 61 | 65 6e 64 25 2c 2d 31 2c |tr%,data|end%,-1,|
|00000b00| 22 54 69 6d 65 72 31 22 | 2c 30 0d 04 88 31 62 25 |"Timer1"|,0...1b%|
|00000b10| 21 32 34 3d 2d 31 3a c8 | 99 20 22 57 69 6d 70 5f |!24=-1:.|. "Wimp_|
|00000b20| 43 72 65 61 74 65 57 69 | 6e 64 6f 77 22 2c 2c 62 |CreateWi|ndow",,b|
|00000b30| 25 20 b8 20 68 61 6e 64 | 6c 65 25 0d 04 92 2c 62 |% . hand|le%...,b|
|00000b40| 25 21 30 3d 68 61 6e 64 | 6c 65 25 3a c8 99 20 22 |%!0=hand|le%:.. "|
|00000b50| 57 69 6d 70 5f 47 65 74 | 57 69 6e 64 6f 77 49 6e |Wimp_Get|WindowIn|
|00000b60| 66 6f 22 2c 2c 62 25 0d | 04 9c 1c c8 99 20 22 57 |fo",,b%.|..... "W|
|00000b70| 69 6d 70 5f 4f 70 65 6e | 57 69 6e 64 6f 77 22 2c |imp_Open|Window",|
|00000b80| 2c 62 25 0d 04 a6 04 0d | 04 b0 1b c8 99 20 22 57 |,b%.....|..... "W|
|00000b90| 69 6d 70 5f 43 6c 6f 73 | 65 54 65 6d 70 6c 61 74 |imp_Clos|eTemplat|
|00000ba0| 65 22 0d 04 ba 04 0d 04 | c4 38 63 6f 73 74 25 3d |e"......|.8cost%=|
|00000bb0| b9 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |. | |
|00000bc0| 20 20 20 20 20 20 20 20 | 20 20 3a f4 20 34 a2 2f | | :. 4./|
|00000bd0| 6d 69 6e 75 74 65 20 63 | 6f 73 74 69 6e 67 0d 04 |minute c|osting..|
|00000be0| ce 4c 73 74 6f 70 74 69 | 6d 65 25 3d 30 20 20 20 |.Lstopti|me%=0 |
|00000bf0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000c00| 20 20 20 20 20 3a f4 20 | 2d 31 3d 72 75 6e 6e 69 | :. |-1=runni|
|00000c10| 6e 67 2c 20 65 6c 73 65 | 20 54 49 4d 45 20 77 68 |ng, else| TIME wh|
|00000c20| 65 6e 20 73 74 6f 70 70 | 65 64 0d 04 d8 0c f2 74 |en stopp|ed.....t|
|00000c30| 69 6d 65 28 30 29 0d 04 | e2 36 f2 73 5f 72 65 73 |ime(0)..|.6.s_res|
|00000c40| 65 74 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |et | |
|00000c50| 20 20 20 20 20 20 20 20 | 20 20 3a f4 20 52 65 73 | | :. Res|
|00000c60| 65 74 20 74 69 6d 65 20 | 74 6f 20 30 0d 04 ec 05 |et time |to 0....|
|00000c70| e1 0d 04 f6 05 3a 0d 05 | 00 37 dd 20 f2 73 5f 75 |.....:..|.7. .s_u|
|00000c80| 70 64 61 74 65 20 20 20 | 20 20 20 20 20 20 20 20 |pdate | |
|00000c90| 20 20 20 20 20 20 20 20 | 3a f4 20 55 70 64 61 74 | |:. Updat|
|00000ca0| 65 20 74 69 6d 65 72 20 | 69 63 6f 6e 73 0d 05 0a |e timer |icons...|
|00000cb0| 16 ea 20 6e 6f 77 25 2c | 53 25 2c 4d 25 2c 48 25 |.. now%,|S%,M%,H%|
|00000cc0| 2c 42 24 0d 05 14 39 e7 | 20 73 74 6f 70 74 69 6d |,B$...9.| stoptim|
|00000cd0| 65 25 3e 2d 31 20 8c 20 | 6e 6f 77 25 3d 73 74 6f |e%>-1 . |now%=sto|
|00000ce0| 70 74 69 6d 65 25 81 31 | 30 30 20 8b 20 6e 6f 77 |ptime%.1|00 . now|
|00000cf0| 25 3d a4 74 69 6d 65 20 | 81 31 30 30 0d 05 1e 10 |%=.time |.100....|
|00000d00| 53 25 3d 6e 6f 77 25 20 | 83 20 36 30 0d 05 28 17 |S%=now% |. 60..(.|
|00000d10| 4d 25 3d 28 6e 6f 77 25 | 20 81 20 36 30 29 20 83 |M%=(now%| . 60) .|
|00000d20| 20 36 30 0d 05 32 19 48 | 25 3d 28 6e 6f 77 25 20 | 60..2.H|%=(now% |
|00000d30| 81 20 33 36 30 30 29 20 | 83 20 32 34 0d 05 3c 04 |. 3600) |. 24..<.|
|00000d40| 0d 05 46 3d f2 63 68 69 | 63 6f 6e 28 30 2c c2 22 |..F=.chi|con(0,."|
|00000d50| 30 30 22 2b c3 48 25 2c | 32 29 2b 22 3a 22 2b c2 |00"+.H%,|2)+":"+.|
|00000d60| 22 30 30 22 2b c3 4d 25 | 2c 32 29 2b 22 3a 22 2b |"00"+.M%|,2)+":"+|
|00000d70| c2 22 30 30 22 2b c3 53 | 25 2c 32 29 29 0d 05 50 |."00"+.S|%,2))..P|
|00000d80| 0d e7 20 63 6f 73 74 25 | 20 8c 0d 05 5a 0f 20 20 |.. cost%| ...Z. |
|00000d90| 42 24 3d 22 20 30 30 30 | 22 0d 05 64 2c 20 20 c2 |B$=" 000|"..d, .|
|00000da0| 42 24 2c 34 29 3d c2 c3 | 28 28 48 25 2a 36 30 2b |B$,4)=..|((H%*60+|
|00000db0| 4d 25 2b 31 29 2a 63 6f | 73 74 70 65 72 6d 69 6e |M%+1)*co|stpermin|
|00000dc0| 25 29 2c 34 29 0d 05 6e | 1a 20 20 42 24 3d c0 42 |%),4)..n|. B$=.B|
|00000dd0| 24 2c 32 29 2b 22 2e 22 | 2b c2 42 24 2c 32 29 0d |$,2)+"."|+.B$,2).|
|00000de0| 05 78 32 20 20 f2 63 68 | 69 63 6f 6e 28 31 2c 75 |.x2 .ch|icon(1,u|
|00000df0| 6e 69 74 24 2b 42 24 2b | 22 20 28 22 2b 63 6f 73 |nit$+B$+|" ("+cos|
|00000e00| 74 70 65 72 6d 69 6e 24 | 2b 22 2f 6d 69 6e 29 22 |tpermin$|+"/min)"|
|00000e10| 29 0d 05 82 05 cd 0d 05 | 8c 05 e1 0d 05 96 05 3a |).......|.......:|
|00000e20| 0d 05 a0 39 dd 20 f2 63 | 68 69 63 6f 6e 28 69 63 |...9. .c|hicon(ic|
|00000e30| 6f 6e 25 2c 74 24 29 20 | 20 20 20 20 20 20 20 20 |on%,t$) | |
|00000e40| 20 20 3a f4 20 43 68 61 | 6e 67 65 20 69 63 6f 6e | :. Cha|nge icon|
|00000e50| 20 63 6f 6e 74 65 6e 74 | 73 0d 05 aa 0b ea 20 74 | content|s..... t|
|00000e60| 65 78 74 25 0d 05 b4 08 | 72 25 3d a3 0d 05 be 1a |ext%....|r%=.....|
|00000e70| 21 62 25 3d 68 61 6e 64 | 6c 65 25 3a 62 25 21 34 |!b%=hand|le%:b%!4|
|00000e80| 3d 69 63 6f 6e 25 0d 05 | c8 1e c8 99 20 22 57 69 |=icon%..|.... "Wi|
|00000e90| 6d 70 5f 47 65 74 49 63 | 6f 6e 53 74 61 74 65 22 |mp_GetIc|onState"|
|00000ea0| 2c 2c 62 25 0d 05 d2 0f | 74 65 78 74 25 3d 62 25 |,,b%....|text%=b%|
|00000eb0| 21 32 38 0d 05 dc 18 e7 | 20 c0 24 74 65 78 74 25 |!28.....| .$text%|
|00000ec0| 2c a9 74 24 29 3c 3e 74 | 24 20 8c 0d 05 e6 12 20 |,.t$)<>t|$ ..... |
|00000ed0| 20 24 74 65 78 74 25 3d | 74 24 2b bd 30 0d 05 f0 | $text%=|t$+.0...|
|00000ee0| 2b 20 20 21 62 25 3d 68 | 61 6e 64 6c 65 25 3a 62 |+ !b%=h|andle%:b|
|00000ef0| 25 21 34 3d 69 63 6f 6e | 25 3a 62 25 21 38 3d 30 |%!4=icon|%:b%!8=0|
|00000f00| 3a 62 25 21 31 32 3d 30 | 0d 05 fa 3b 20 20 c8 99 |:b%!12=0|...; ..|
|00000f10| 20 22 57 69 6d 70 5f 53 | 65 74 49 63 6f 6e 53 74 | "Wimp_S|etIconSt|
|00000f20| 61 74 65 22 2c 2c 62 25 | 20 20 20 20 20 20 3a f4 |ate",,b%| :.|
|00000f30| 20 46 6f 72 63 65 20 49 | 63 6f 6e 20 72 65 2d 64 | Force I|con re-d|
|00000f40| 72 61 77 0d 06 04 05 cd | 0d 06 0e 05 e1 0d 06 18 |raw.....|........|
|00000f50| 05 3a 0d 06 22 35 dd 20 | f2 73 5f 73 74 61 72 74 |.:.."5. |.s_start|
|00000f60| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000f70| 20 20 20 20 3a f4 20 28 | 52 65 2d 29 53 74 61 72 | :. (|Re-)Star|
|00000f80| 74 20 74 69 6d 65 72 0d | 06 2c 19 e7 20 73 74 6f |t timer.|.,.. sto|
|00000f90| 70 74 69 6d 65 25 3d 2d | 31 20 8c 20 ef 37 3a e1 |ptime%=-|1 . .7:.|
|00000fa0| 0d 06 36 2b f2 74 69 6d | 65 28 73 74 6f 70 74 69 |..6+.tim|e(stopti|
|00000fb0| 6d 65 25 29 3a 73 74 6f | 70 74 69 6d 65 25 3d 2d |me%):sto|ptime%=-|
|00000fc0| 31 3a f2 73 5f 75 70 64 | 61 74 65 0d 06 40 05 e1 |1:.s_upd|ate..@..|
|00000fd0| 0d 06 4a 05 3a 0d 06 54 | 2f dd 20 f2 73 5f 73 74 |..J.:..T|/. .s_st|
|00000fe0| 6f 70 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |op | |
|00000ff0| 20 20 20 20 20 20 20 3a | f4 20 53 74 6f 70 20 74 | :|. Stop t|
|00001000| 69 6d 65 72 0d 06 5e 1a | e7 20 73 74 6f 70 74 69 |imer..^.|. stopti|
|00001010| 6d 65 25 3c 3e 2d 31 20 | 8c 20 ef 37 3a e1 0d 06 |me%<>-1 |. .7:...|
|00001020| 68 1d 73 74 6f 70 74 69 | 6d 65 25 3d a4 74 69 6d |h.stopti|me%=.tim|
|00001030| 65 3a f2 73 5f 75 70 64 | 61 74 65 0d 06 72 05 e1 |e:.s_upd|ate..r..|
|00001040| 0d 06 7c 05 3a 0d 06 86 | 35 dd 20 f2 73 5f 72 65 |..|.:...|5. .s_re|
|00001050| 73 65 74 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |set | |
|00001060| 20 20 20 20 20 20 20 3a | f4 20 52 65 73 65 74 20 | :|. Reset |
|00001070| 74 69 6d 65 72 20 74 6f | 20 30 0d 06 90 19 e7 20 |timer to| 0..... |
|00001080| 73 74 6f 70 74 69 6d 65 | 25 3d 2d 31 20 8c 20 ef |stoptime|%=-1 . .|
|00001090| 37 3a e1 0d 06 9a 19 73 | 74 6f 70 74 69 6d 65 25 |7:.....s|toptime%|
|000010a0| 3d 30 3a f2 73 5f 75 70 | 64 61 74 65 0d 06 a4 05 |=0:.s_up|date....|
|000010b0| e1 0d 06 ae 05 3a 0d 06 | b8 4c 3d 3d 3d 3d 3d 3d |.....:..|.L======|
|000010c0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000010d0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000010e0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000010f0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001100| 3d 3d 0d 06 c2 41 20 20 | 20 20 ac 45 3a 20 54 68 |==...A | .E: Th|
|00001110| 65 20 42 41 53 49 43 20 | 76 61 72 69 61 62 6c 65 |e BASIC |variable|
|00001120| 20 91 20 43 61 6e 27 74 | 20 62 65 20 75 73 65 64 | . Can't| be used|
|00001130| 20 68 65 72 65 2c 20 61 | 73 20 6e 6f 20 6d 61 74 | here, a|s no mat|
|00001140| 74 65 72 0d 06 cc 47 20 | 20 20 20 48 4f 57 20 6d |ter...G | HOW m|
|00001150| 61 6e 79 20 61 70 70 6c | 69 63 61 74 69 6f 6e 73 |any appl|ications|
|00001160| 20 61 72 65 20 72 75 6e | 6e 69 6e 67 2c 20 74 68 | are run|ning, th|
|00001170| 65 72 65 20 69 73 20 6f | 6e 6c 79 20 ee 45 20 91 |ere is o|nly .E .|
|00001180| 20 76 61 72 69 61 62 6c | 65 21 0d 06 d6 47 20 20 | variabl|e!...G |
|00001190| 20 20 54 68 75 73 20 69 | 66 20 61 6e 79 20 6f 74 | Thus i|f any ot|
|000011a0| 68 65 72 20 61 70 70 73 | 20 43 48 41 4e 47 45 20 |her apps| CHANGE |
|000011b0| 74 68 65 20 91 20 76 61 | 72 2c 20 74 68 65 6e 20 |the . va|r, then |
|000011c0| 77 65 20 67 65 74 20 63 | 6f 6d 70 6c 65 74 65 6c |we get c|ompletel|
|000011d0| 79 0d 06 e0 14 20 20 20 | 20 45 46 46 45 44 20 62 |y.... | EFFED b|
|000011e0| 79 20 69 74 21 0d 06 ea | 05 3a 0d 06 f4 36 dd 20 |y it!...|.:...6. |
|000011f0| f2 74 69 6d 65 28 74 69 | 6d 65 25 29 3a ea 20 74 |.time(ti|me%):. t|
|00001200| 25 20 20 20 20 20 20 20 | 3a f4 20 52 65 73 65 74 |% |:. Reset|
|00001210| 20 74 69 6d 65 20 74 6f | 20 3c 74 69 6d 65 25 3e | time to| <time%>|
|00001220| 0d 06 fe 22 c8 99 20 22 | 4f 53 5f 52 65 61 64 4d |...".. "|OS_ReadM|
|00001230| 6f 6e 6f 74 6f 6e 69 63 | 54 69 6d 65 22 20 b8 20 |onotonic|Time" . |
|00001240| 74 25 0d 07 08 16 62 61 | 73 65 74 69 6d 65 25 3d |t%....ba|setime%=|
|00001250| 74 25 2d 74 69 6d 65 25 | 0d 07 12 05 e1 0d 07 1c |t%-time%|........|
|00001260| 05 3a 0d 07 26 42 dd 20 | a4 74 69 6d 65 3a ea 20 |.:..&B. |.time:. |
|00001270| 74 25 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |t% | |
|00001280| 20 20 3a f4 20 52 65 74 | 75 72 6e 20 74 69 6d 65 | :. Ret|urn time|
|00001290| 20 73 69 6e 63 65 20 77 | 61 74 63 68 20 73 74 61 | since w|atch sta|
|000012a0| 72 74 65 64 0d 07 30 22 | c8 99 20 22 4f 53 5f 52 |rted..0"|.. "OS_R|
|000012b0| 65 61 64 4d 6f 6e 6f 74 | 6f 6e 69 63 54 69 6d 65 |eadMonot|onicTime|
|000012c0| 22 20 b8 20 74 25 0d 07 | 3a 11 3d 74 25 2d 62 61 |" . t%..|:.=t%-ba|
|000012d0| 73 65 74 69 6d 65 25 0d | 07 44 05 3a 0d 07 4e 4c |setime%.|.D.:..NL|
|000012e0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000012f0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001300| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001310| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001320| 3d 3d 3d 3d 3d 3d 3d 3d | 0d 07 58 05 3a 0d 07 62 |========|..X.:..b|
|00001330| 15 dd 20 f2 65 72 72 6f | 72 28 24 28 62 25 2b 34 |.. .erro|r($(b%+4|
|00001340| 29 29 0d 07 6c 26 c8 99 | 20 22 57 69 6d 70 5f 52 |))..l&..| "Wimp_R|
|00001350| 65 70 6f 72 74 45 72 72 | 6f 72 22 2c 62 25 2c 31 |eportErr|or",b%,1|
|00001360| 2c 22 54 69 6d 65 72 22 | 0d 07 76 05 e1 0d ff |,"Timer"|..v.... |
+--------+-------------------------+-------------------------+--------+--------+