�>!RunImage
� iSV Announce
� Aaron OCt 93
(:
2� �:�:�" at line ";�:�
<�init:time%=�+150
F�
Pș"Wimp_Poll",,b% � r%
Z
� �>time%
d+�close:�("RUN <XStitch$DIR>.!Runimage")
n�
x:
���close
�&ș"Wimp_CloseDown",task%,&4B534154
��
�:
�
��init
�'appname$="iSVAnnounce":space%=&FFF:
�7ș"Wimp_Initialise",200,&4B534154,appname$ � ,task%
�-� b% space%, ws% space%:wsend%=ws%+space%
�#�load_templates:�positionwindow
��
�:
���load_templates
�:ș "Wimp_OpenTemplate",,"<XStitch$Dir>.!RUN.Templates"

8main%=�load_template("main"):ș "Wimp_CloseTemplate"

�

:

"ݤload_template(a$)

,>� c%:ș "Wimp_LoadTemplate",,b%,ws%,wsend%,-1,a$,0 � ,,ws%

6'ș "Wimp_CreateWindow",,b% � c%:=c%

@:

J��positionwindow

T,ș"OS_ReadModeVariable",-1,11 � ,,width%

^-ș"OS_ReadModeVariable",-1,12 � ,,height%

h*ș"OS_ReadModeVariable",-1,5 �  ,,div%

r*!b%=main%:ș "Wimp_GetWindowState",,b%

|+b%!4=width%-312:b%!8=(height%*div%)-128

�-b%!12=width%+312:b%!16=(height%*div%)+128

�ș "Wimp_OpenWindow",,b%:�

�

�

�

�
�

00000000  0d 00 0a 0f f4 3e 21 52  75 6e 49 6d 61 67 65 0d  |.....>!RunImage.|
00000010  00 14 12 f4 20 69 53 56  20 41 6e 6e 6f 75 6e 63  |.... iSV Announc|
00000020  65 0d 00 1e 12 f4 20 41  61 72 6f 6e 20 4f 43 74  |e..... Aaron OCt|
00000030  20 39 33 0d 00 28 05 3a  0d 00 32 1a ee 20 85 3a  | 93..(.:..2.. .:|
00000040  f6 3a f1 22 20 61 74 20  6c 69 6e 65 20 22 3b 9e  |.:." at line ";.|
00000050  3a e0 0d 00 3c 15 f2 69  6e 69 74 3a 74 69 6d 65  |:...<..init:time|
00000060  25 3d 91 2b 31 35 30 0d  00 46 05 f5 0d 00 50 1a  |%=.+150..F....P.|
00000070  c8 99 22 57 69 6d 70 5f  50 6f 6c 6c 22 2c 2c 62  |.."Wimp_Poll",,b|
00000080  25 20 b8 20 72 25 0d 00  5a 0d fd 20 91 3e 74 69  |% . r%..Z.. .>ti|
00000090  6d 65 25 0d 00 64 2b f2  63 6c 6f 73 65 3a ff 28  |me%..d+.close:.(|
000000a0  22 52 55 4e 20 3c 58 53  74 69 74 63 68 24 44 49  |"RUN <XStitch$DI|
000000b0  52 3e 2e 21 52 75 6e 69  6d 61 67 65 22 29 0d 00  |R>.!Runimage")..|
000000c0  6e 05 e0 0d 00 78 05 3a  0d 00 82 0b dd f2 63 6c  |n....x.:......cl|
000000d0  6f 73 65 0d 00 8c 26 c8  99 22 57 69 6d 70 5f 43  |ose...&.."Wimp_C|
000000e0  6c 6f 73 65 44 6f 77 6e  22 2c 74 61 73 6b 25 2c  |loseDown",task%,|
000000f0  26 34 42 35 33 34 31 35  34 0d 00 96 05 e1 0d 00  |&4B534154.......|
00000100  a0 05 3a 0d 00 aa 0a dd  f2 69 6e 69 74 0d 00 b4  |..:......init...|
00000110  27 61 70 70 6e 61 6d 65  24 3d 22 69 53 56 41 6e  |'appname$="iSVAn|
00000120  6e 6f 75 6e 63 65 22 3a  73 70 61 63 65 25 3d 26  |nounce":space%=&|
00000130  46 46 46 3a 0d 00 be 37  c8 99 22 57 69 6d 70 5f  |FFF:...7.."Wimp_|
00000140  49 6e 69 74 69 61 6c 69  73 65 22 2c 32 30 30 2c  |Initialise",200,|
00000150  26 34 42 35 33 34 31 35  34 2c 61 70 70 6e 61 6d  |&4B534154,appnam|
00000160  65 24 20 b8 20 2c 74 61  73 6b 25 0d 00 c8 2d de  |e$ . ,task%...-.|
00000170  20 62 25 20 73 70 61 63  65 25 2c 20 77 73 25 20  | b% space%, ws% |
00000180  73 70 61 63 65 25 3a 77  73 65 6e 64 25 3d 77 73  |space%:wsend%=ws|
00000190  25 2b 73 70 61 63 65 25  0d 00 d2 23 f2 6c 6f 61  |%+space%...#.loa|
000001a0  64 5f 74 65 6d 70 6c 61  74 65 73 3a f2 70 6f 73  |d_templates:.pos|
000001b0  69 74 69 6f 6e 77 69 6e  64 6f 77 0d 00 dc 05 e1  |itionwindow.....|
000001c0  0d 00 e6 05 3a 0d 00 f0  14 dd f2 6c 6f 61 64 5f  |....:......load_|
000001d0  74 65 6d 70 6c 61 74 65  73 0d 00 fa 3a c8 99 20  |templates...:.. |
000001e0  22 57 69 6d 70 5f 4f 70  65 6e 54 65 6d 70 6c 61  |"Wimp_OpenTempla|
000001f0  74 65 22 2c 2c 22 3c 58  53 74 69 74 63 68 24 44  |te",,"<XStitch$D|
00000200  69 72 3e 2e 21 52 55 4e  2e 54 65 6d 70 6c 61 74  |ir>.!RUN.Templat|
00000210  65 73 22 0d 01 04 38 6d  61 69 6e 25 3d a4 6c 6f  |es"...8main%=.lo|
00000220  61 64 5f 74 65 6d 70 6c  61 74 65 28 22 6d 61 69  |ad_template("mai|
00000230  6e 22 29 3a c8 99 20 22  57 69 6d 70 5f 43 6c 6f  |n"):.. "Wimp_Clo|
00000240  73 65 54 65 6d 70 6c 61  74 65 22 0d 01 0e 05 e1  |seTemplate".....|
00000250  0d 01 18 05 3a 0d 01 22  17 dd a4 6c 6f 61 64 5f  |....:.."...load_|
00000260  74 65 6d 70 6c 61 74 65  28 61 24 29 0d 01 2c 3e  |template(a$)..,>|
00000270  ea 20 63 25 3a c8 99 20  22 57 69 6d 70 5f 4c 6f  |. c%:.. "Wimp_Lo|
00000280  61 64 54 65 6d 70 6c 61  74 65 22 2c 2c 62 25 2c  |adTemplate",,b%,|
00000290  77 73 25 2c 77 73 65 6e  64 25 2c 2d 31 2c 61 24  |ws%,wsend%,-1,a$|
000002a0  2c 30 20 b8 20 2c 2c 77  73 25 0d 01 36 27 c8 99  |,0 . ,,ws%..6'..|
000002b0  20 22 57 69 6d 70 5f 43  72 65 61 74 65 57 69 6e  | "Wimp_CreateWin|
000002c0  64 6f 77 22 2c 2c 62 25  20 b8 20 63 25 3a 3d 63  |dow",,b% . c%:=c|
000002d0  25 0d 01 40 05 3a 0d 01  4a 14 dd f2 70 6f 73 69  |%..@.:..J...posi|
000002e0  74 69 6f 6e 77 69 6e 64  6f 77 0d 01 54 2c c8 99  |tionwindow..T,..|
000002f0  22 4f 53 5f 52 65 61 64  4d 6f 64 65 56 61 72 69  |"OS_ReadModeVari|
00000300  61 62 6c 65 22 2c 2d 31  2c 31 31 20 b8 20 2c 2c  |able",-1,11 . ,,|
00000310  77 69 64 74 68 25 0d 01  5e 2d c8 99 22 4f 53 5f  |width%..^-.."OS_|
00000320  52 65 61 64 4d 6f 64 65  56 61 72 69 61 62 6c 65  |ReadModeVariable|
00000330  22 2c 2d 31 2c 31 32 20  b8 20 2c 2c 68 65 69 67  |",-1,12 . ,,heig|
00000340  68 74 25 0d 01 68 2a c8  99 22 4f 53 5f 52 65 61  |ht%..h*.."OS_Rea|
00000350  64 4d 6f 64 65 56 61 72  69 61 62 6c 65 22 2c 2d  |dModeVariable",-|
00000360  31 2c 35 20 b8 20 20 2c  2c 64 69 76 25 0d 01 72  |1,5 .  ,,div%..r|
00000370  2a 21 62 25 3d 6d 61 69  6e 25 3a c8 99 20 22 57  |*!b%=main%:.. "W|
00000380  69 6d 70 5f 47 65 74 57  69 6e 64 6f 77 53 74 61  |imp_GetWindowSta|
00000390  74 65 22 2c 2c 62 25 0d  01 7c 2b 62 25 21 34 3d  |te",,b%..|+b%!4=|
000003a0  77 69 64 74 68 25 2d 33  31 32 3a 62 25 21 38 3d  |width%-312:b%!8=|
000003b0  28 68 65 69 67 68 74 25  2a 64 69 76 25 29 2d 31  |(height%*div%)-1|
000003c0  32 38 0d 01 86 2d 62 25  21 31 32 3d 77 69 64 74  |28...-b%!12=widt|
000003d0  68 25 2b 33 31 32 3a 62  25 21 31 36 3d 28 68 65  |h%+312:b%!16=(he|
000003e0  69 67 68 74 25 2a 64 69  76 25 29 2b 31 32 38 0d  |ight%*div%)+128.|
000003f0  01 90 1e c8 99 20 22 57  69 6d 70 5f 4f 70 65 6e  |..... "Wimp_Open|
00000400  57 69 6e 64 6f 77 22 2c  2c 62 25 3a e1 0d 01 9a  |Window",,b%:....|
00000410  04 0d 01 a4 04 0d 01 ae  04 0d 01 b8 04 0d ff     |...............|
0000041f