00000000  44 10 9f e5 3c 20 9f e5  34 30 9f e5 04 00 12 e4  |D...< ..40......|
00000010  04 00 03 e4 04 10 51 e2  fb ff ff 5a 00 00 8f e2  |......Q....Z....|
00000020  05 00 00 ef 42 41 53 49  43 20 2d 51 75 69 74 20  |....BASIC -Quit |
00000030  40 30 30 30 30 39 30 30  30 2c 30 30 30 30 39 41  |@00009000,00009A|
00000040  39 30 00 00 90 9a 00 00  e0 8a 00 00 90 0a 00 00  |90..............|
00000050  0d 00 0a 11 f4 20 3e 20  21 52 75 6e 49 6d 61 67  |..... > !RunImag|
00000060  65 0d 00 14 04 0d 00 1e  19 c8 99 20 22 4f 53 5f  |e.......... "OS_|
00000070  47 65 74 45 6e 76 22 20  b8 20 63 6f 6d 24 0d 00  |GetEnv" . com$..|
00000080  28 0e 70 61 72 61 6d 73  24 3d 22 22 0d 00 32 17  |(.params$=""..2.|
00000090  49 25 3d a7 63 6f 6d 24  2c 22 20 2d 71 75 69 74  |I%=.com$," -quit|
000000a0  20 22 29 0d 00 3c 34 e7  20 49 25 20 8c 20 70 61  | ")..<4. I% . pa|
000000b0  72 61 6d 73 24 3d c1 63  6f 6d 24 2c a7 63 6f 6d  |rams$=.com$,.com|
000000c0  24 2c 22 20 22 2c 49 25  2b a9 22 20 2d 71 75 69  |$," ",I%+." -qui|
000000d0  74 20 22 29 2b 31 29 0d  00 46 04 0d 00 50 1b de  |t ")+1)..F...P..|
000000e0  20 71 25 20 26 31 30 30  2c 20 65 72 72 62 6c 6b  | q% &100, errblk|
000000f0  25 20 26 31 30 30 0d 00  5a 13 de 20 74 20 34 3a  |% &100..Z.. t 4:|
00000100  24 74 3d 22 54 41 53 4b  22 0d 00 64 04 0d 00 6e  |$t="TASK"..d...n|
00000110  32 c8 99 20 22 57 69 6d  70 5f 49 6e 69 74 69 61  |2.. "Wimp_Initia|
00000120  6c 69 73 65 22 2c 32 30  30 2c 21 74 2c 22 41 75  |lise",200,!t,"Au|
00000130  64 69 6f 20 43 6f 6e 74  72 6f 6c 6c 65 72 22 0d  |dio Controller".|
00000140  00 78 1d de 20 69 63 6f  6e 73 20 35 31 31 2c 20  |.x.. icons 511, |
00000150  73 70 72 69 74 65 73 20  32 35 35 39 0d 00 82 36  |sprites 2559...6|
00000160  c8 99 20 22 4f 53 5f 46  69 6c 65 22 2c 31 35 2c  |.. "OS_File",15,|
00000170  22 3c 4f 62 65 79 24 44  69 72 3e 2e 54 65 6d 70  |"<Obey$Dir>.Temp|
00000180  6c 61 74 65 73 22 20 b8  20 74 65 6d 70 6c 61 74  |lates" . templat|
00000190  65 73 0d 00 8c c2 e7 20  74 65 6d 70 6c 61 74 65  |es..... template|
000001a0  73 3c 3e 30 20 c8 99 20  22 57 69 6d 70 5f 4f 70  |s<>0 .. "Wimp_Op|
000001b0  65 6e 54 65 6d 70 6c 61  74 65 22 2c 2c 22 3c 4f  |enTemplate",,"<O|
000001c0  62 65 79 24 44 69 72 3e  2e 54 65 6d 70 6c 61 74  |bey$Dir>.Templat|
000001d0  65 73 22 3a c8 99 20 22  57 69 6d 70 5f 4c 6f 61  |es":.. "Wimp_Loa|
000001e0  64 54 65 6d 70 6c 61 74  65 22 2c 2c 73 70 72 69  |dTemplate",,spri|
000001f0  74 65 73 2c 69 63 6f 6e  73 2c 69 63 6f 6e 73 2b  |tes,icons,icons+|
00000200  35 31 32 2c 2d 31 2c 22  49 6e 66 6f 22 2c 30 20  |512,-1,"Info",0 |
00000210  b8 20 2c 2c 69 3a c8 99  20 22 57 69 6d 70 5f 43  |. ,,i:.. "Wimp_C|
00000220  72 65 61 74 65 57 69 6e  64 6f 77 22 2c 2c 73 70  |reateWindow",,sp|
00000230  72 69 74 65 73 20 b8 20  69 6e 66 6f 3a c8 99 20  |rites . info:.. |
00000240  22 57 69 6d 70 5f 43 6c  6f 73 65 54 65 6d 70 6c  |"Wimp_CloseTempl|
00000250  61 74 65 22 0d 00 96 0a  f2 6d 65 6e 75 73 0d 00  |ate".....menus..|
00000260  a0 0c f2 69 6e 73 74 61  6c 6c 0d 00 aa 04 0d 00  |...install......|
00000270  b4 0e ee 20 85 20 e4 20  8d 64 6c 44 0d 00 be 04  |... . . .dlD....|
00000280  0d 00 c8 05 f5 0d 00 d2  21 c8 99 20 22 57 69 6d  |........!.. "Wim|
00000290  70 5f 50 6f 6c 6c 22 2c  30 2c 71 25 20 b8 20 61  |p_Poll",0,q% . a|
000002a0  63 74 69 6f 6e 25 0d 00  dc 10 c8 8e 20 61 63 74  |ction%...... act|
000002b0  69 6f 6e 25 20 ca 0d 00  e6 18 c9 20 20 36 20 20  |ion% ......  6  |
000002c0  20 20 3a 20 f2 6d 6f 75  73 65 28 71 25 29 0d 00  |  : .mouse(q%)..|
000002d0  f0 1d c9 20 20 39 20 20  20 20 3a 20 f2 64 65 63  |...  9    : .dec|
000002e0  6f 64 65 6d 65 6e 75 28  71 25 29 0d 00 fa 1a c9  |odemenu(q%).....|
000002f0  20 31 37 2c 31 38 20 3a  20 f2 6d 65 73 73 61 67  | 17,18 : .messag|
00000300  65 28 71 25 29 0d 01 04  05 cb 0d 01 0e 07 fd 20  |e(q%).......... |
00000310  a3 0d 01 18 04 0d 01 22  0f dd f2 6d 6f 75 73 65  |......."...mouse|
00000320  28 71 25 29 0d 01 2c 0c  6d 78 25 3d 71 25 21 30  |(q%)..,.mx%=q%!0|
00000330  0d 01 36 0c 6d 79 25 3d  71 25 21 34 0d 01 40 0c  |..6.my%=q%!4..@.|
00000340  6d 62 25 3d 71 25 21 38  0d 01 4a 13 e7 20 71 25  |mb%=q%!8..J.. q%|
00000350  21 31 32 3c 3e 2d 32 20  8c 20 e1 0d 01 54 0c c8  |!12<>-2 . ...T..|
00000360  8e 20 6d 62 25 20 ca 0d  01 5e 1b c9 20 26 30 32  |. mb% ...^.. &02|
00000370  20 3a 20 6d 65 6e 75 69  63 6f 6e 25 3d 71 25 21  | : menuicon%=q%!|
00000380  31 36 0d 01 68 48 20 20  20 20 20 20 20 20 20 20  |16..hH          |
00000390  20 c8 99 20 22 57 69 6d  70 5f 43 72 65 61 74 65  | .. "Wimp_Create|
000003a0  4d 65 6e 75 22 2c 2c 69  63 6f 6e 6d 65 6e 75 25  |Menu",,iconmenu%|
000003b0  2c 6d 78 25 2d 69 63 6f  6e 6d 65 6e 75 25 21 31  |,mx%-iconmenu%!1|
000003c0  36 2f 32 2d 32 34 2c 33  33 30 0d 01 72 05 cb 0d  |6/2-24,330..r...|
000003d0  01 7c 05 e1 0d 01 86 04  0d 01 90 14 dd f2 64 65  |.|............de|
000003e0  63 6f 64 65 6d 65 6e 75  28 71 25 29 0d 01 9a 0c  |codemenu(q%)....|
000003f0  c8 8e 20 21 71 25 20 ca  0d 01 a4 10 c9 20 30 20  |.. !q% ...... 0 |
00000400  3a f4 20 2a 53 43 41 4e  0d 01 ae 26 c9 20 31 20  |:. *SCAN...&. 1 |
00000410  3a 6e 25 3d 69 63 6f 6e  6d 65 6e 75 25 2b 35 32  |:n%=iconmenu%+52|
00000420  3a 6e 25 21 30 3d 6e 25  21 30 20 82 20 31 0d 01  |:n%!0=n%!0 . 1..|
00000430  b8 11 d4 20 31 2c 2d 31  35 2c 31 35 30 2c 31 0d  |... 1,-15,150,1.|
00000440  01 c2 1d 64 3d 6e 25 21  30 3a e7 20 64 3d 32 20  |...d=n%!0:. d=2 |
00000450  8c 20 2a 41 55 44 49 4f  20 4f 46 46 0d 01 cc 15  |. *AUDIO OFF....|
00000460  e7 20 64 3d 33 20 8c 20  2a 41 55 44 49 4f 20 4f  |. d=3 . *AUDIO O|
00000470  4e 0d 01 d6 07 c9 20 32  0d 01 e0 68 64 25 3d 69  |N..... 2...hd%=i|
00000480  63 6f 6e 6d 65 6e 75 25  2b 37 36 3a 64 3d 64 25  |conmenu%+76:d=d%|
00000490  21 30 3a e7 20 64 3d 30  20 8c 20 6e 25 3d 69 63  |!0:. d=0 . n%=ic|
000004a0  6f 6e 6d 65 6e 75 25 2b  37 36 3a 6e 25 21 30 3d  |onmenu%+76:n%!0=|
000004b0  6e 25 21 30 20 82 20 31  3a 6e 25 3d 69 63 6f 6e  |n%!0 . 1:n%=icon|
000004c0  6d 65 6e 75 25 2b 31 30  30 3a 6e 25 21 30 3d 6e  |menu%+100:n%!0=n|
000004d0  25 21 30 20 82 20 31 3a  2a 56 4f 4c 2e 31 32 37  |%!0 . 1:*VOL.127|
000004e0  0d 01 ea 09 c9 20 33 20  3a 0d 01 f4 68 64 25 3d  |..... 3 :...hd%=|
000004f0  69 63 6f 6e 6d 65 6e 75  25 2b 31 30 30 3a 64 3d  |iconmenu%+100:d=|
00000500  64 25 21 30 3a e7 20 64  3d 32 20 8c 20 6e 25 3d  |d%!0:. d=2 . n%=|
00000510  69 63 6f 6e 6d 65 6e 75  25 2b 37 36 3a 6e 25 21  |iconmenu%+76:n%!|
00000520  30 3d 6e 25 21 30 20 82  20 31 3a 6e 25 3d 69 63  |0=n%!0 . 1:n%=ic|
00000530  6f 6e 6d 65 6e 75 25 2b  31 30 30 3a 6e 25 21 30  |onmenu%+100:n%!0|
00000540  3d 6e 25 21 30 20 82 20  31 3a 2a 56 4f 4c 2e 38  |=n%!0 . 1:*VOL.8|
00000550  30 0d 01 fe 1b c9 20 34  20 3a c8 99 22 57 69 6d  |0..... 4 :.."Wim|
00000560  70 5f 43 6c 6f 73 65 44  6f 77 6e 22 0d 02 08 05  |p_CloseDown"....|
00000570  cb 0d 02 12 05 e1 0d 02  1c 04 0d 02 26 11 dd f2  |............&...|
00000580  6d 65 73 73 61 67 65 28  71 25 29 0d 02 30 0e c8  |message(q%)..0..|
00000590  8e 20 71 25 21 31 36 20  ca 0d 02 3a 1f c9 20 30  |. q%!16 ...:.. 0|
000005a0  20 3a 20 c8 99 20 22 57  69 6d 70 5f 43 6c 6f 73  | : .. "Wimp_Clos|
000005b0  65 44 6f 77 6e 22 3a e0  0d 02 44 05 cb 0d 02 4e  |eDown":...D....N|
000005c0  05 e1 0d 02 58 04 0d 02  62 04 0d 02 6c 0d dd f2  |....X...b...l...|
000005d0  69 6e 73 74 61 6c 6c 0d  02 76 19 ea 20 73 78 25  |install..v.. sx%|
000005e0  2c 73 79 25 2c 73 6d 25  2c 70 78 25 2c 70 79 25  |,sy%,sm%,px%,py%|
000005f0  0d 02 80 16 73 70 72 69  74 65 24 20 3d 20 22 21  |....sprite$ = "!|
00000600  41 75 64 69 6f 22 0d 02  8a 34 c8 99 20 22 57 69  |Audio"...4.. "Wi|
00000610  6d 70 5f 53 70 72 69 74  65 4f 70 22 2c 34 30 2c  |mp_SpriteOp",40,|
00000620  2c 73 70 72 69 74 65 24  20 b8 20 2c 2c 2c 73 78  |,sprite$ . ,,,sx|
00000630  25 2c 73 79 25 2c 2c 73  6d 25 0d 02 94 39 c8 99  |%,sy%,,sm%...9..|
00000640  20 22 4f 53 5f 52 65 61  64 4d 6f 64 65 56 61 72  | "OS_ReadModeVar|
00000650  69 61 62 6c 65 22 2c 73  6d 25 2c 34 20 b8 20 2c  |iable",sm%,4 . ,|
00000660  2c 70 78 25 20 3a 20 73  78 25 3d 73 78 25 3c 3c  |,px% : sx%=sx%<<|
00000670  70 78 25 0d 02 9e 39 c8  99 20 22 4f 53 5f 52 65  |px%...9.. "OS_Re|
00000680  61 64 4d 6f 64 65 56 61  72 69 61 62 6c 65 22 2c  |adModeVariable",|
00000690  73 6d 25 2c 35 20 b8 20  2c 2c 70 79 25 20 3a 20  |sm%,5 . ,,py% : |
000006a0  73 79 25 3d 73 79 25 3c  3c 70 79 25 0d 02 a8 2d  |sy%=sy%<<py%...-|
000006b0  e7 20 a9 28 73 70 72 69  74 65 24 29 2a 31 36 20  |. .(sprite$)*16 |
000006c0  3e 20 73 78 25 20 8c 20  73 78 25 3d a9 28 73 70  |> sx% . sx%=.(sp|
000006d0  72 69 74 65 24 29 2a 31  36 0d 02 b2 0a 21 71 25  |rite$)*16....!q%|
000006e0  3d 2d 31 0d 02 bc 23 71  25 21 34 3d 30 3a 71 25  |=-1...#q%!4=0:q%|
000006f0  21 38 3d 30 3a 71 25 21  31 32 3d 36 38 3a 71 25  |!8=0:q%!12=68:q%|
00000700  21 31 36 3d 36 38 0d 02  c6 0b 71 25 21 32 30 3d  |!16=68....q%!20=|
00000710  32 0d 02 d0 14 24 28 71  25 2b 32 34 29 3d 73 70  |2....$(q%+24)=sp|
00000720  72 69 74 65 24 0d 02 da  22 c8 99 20 22 57 69 6d  |rite$...".. "Wim|
00000730  70 5f 43 72 65 61 74 65  49 63 6f 6e 22 2c 2c 71  |p_CreateIcon",,q|
00000740  25 20 b8 20 21 71 25 0d  02 e4 05 e1 0d 02 ee 04  |% . !q%.........|
00000750  0d 02 f8 0b dd f2 6d 65  6e 75 73 0d 03 02 14 de  |......menus.....|
00000760  20 69 63 6f 6e 6d 65 6e  75 25 20 31 30 32 34 0d  | iconmenu% 1024.|
00000770  03 0c 10 f2 73 65 74 75  70 6d 65 6e 75 3a e1 0d  |....setupmenu:..|
00000780  03 16 04 0d 03 20 10 dd  a4 73 74 72 69 6e 67 28  |..... ...string(|
00000790  61 25 29 0d 03 2a 2d ea  20 62 24 3a 62 24 3d 22  |a%)..*-. b$:b$="|
000007a0  22 3a c8 95 20 3f 61 25  3c 3e 30 3a 62 24 2b 3d  |":.. ?a%<>0:b$+=|
000007b0  bd 3f 61 25 3a 61 25 2b  3d 31 3a ce 3a 3d 62 24  |.?a%:a%+=1:.:=b$|
000007c0  0d 03 34 04 0d 03 3e 1a  dd a4 65 72 72 62 6c 6b  |..4...>...errblk|
000007d0  28 65 72 72 25 2c 72 65  70 6f 72 74 24 29 0d 03  |(err%,report$)..|
000007e0  48 3e 21 65 72 72 62 6c  6b 25 3d 65 72 72 25 3a  |H>!errblk%=err%:|
000007f0  24 28 65 72 72 62 6c 6b  25 2b 34 29 3d 72 65 70  |$(errblk%+4)=rep|
00000800  6f 72 74 24 20 3a f4 20  2b 22 20 61 74 20 6c 69  |ort$ :. +" at li|
00000810  6e 65 20 22 2b 53 54 52  24 45 52 4c 0d 03 52 1f  |ne "+STR$ERL..R.|
00000820  65 72 72 62 6c 6b 25 3f  28 34 2b a9 24 28 65 72  |errblk%?(4+.$(er|
00000830  72 62 6c 6b 25 2b 34 29  29 3d 30 0d 03 5c 0c 3d  |rblk%+4))=0..\.=|
00000840  65 72 72 62 6c 6b 25 0d  03 66 17 c8 99 20 22 57  |errblk%..f... "W|
00000850  69 6d 70 5f 43 6c 6f 73  65 44 6f 77 6e 22 0d 03  |imp_CloseDown"..|
00000860  70 05 e0 0d 03 7a 0f dd  f2 73 65 74 75 70 6d 65  |p....z...setupme|
00000870  6e 75 0d 03 84 08 ea 20  6d 25 0d 03 8e 13 6d 65  |nu..... m%....me|
00000880  6e 75 25 3d 69 63 6f 6e  6d 65 6e 75 25 0d 03 98  |nu%=iconmenu%...|
00000890  12 24 6d 65 6e 75 25 3d  22 41 75 64 69 6f 22 0d  |.$menu%="Audio".|
000008a0  03 a2 0e 6d 65 6e 75 25  3f 31 32 3d 37 0d 03 ac  |...menu%?12=7...|
000008b0  0e 6d 65 6e 75 25 3f 31  33 3d 32 0d 03 b6 0e 6d  |.menu%?13=2....m|
000008c0  65 6e 75 25 3f 31 34 3d  36 0d 03 c0 0e 6d 65 6e  |enu%?14=6....men|
000008d0  75 25 3f 31 35 3d 30 0d  03 ca 10 6d 65 6e 75 25  |u%?15=0....menu%|
000008e0  21 31 36 3d 32 33 36 0d  03 d4 0f 6d 65 6e 75 25  |!16=236....menu%|
000008f0  21 32 30 3d 34 30 0d 03  de 0e 6d 65 6e 75 25 21  |!20=40....menu%!|
00000900  32 34 3d 30 0d 03 e8 0f  6d 25 3d 6d 65 6e 75 25  |24=0....m%=menu%|
00000910  2b 32 38 0d 03 f2 0a 6d  25 21 30 3d 32 0d 03 fc  |+28....m%!0=2...|
00000920  0d 6d 25 21 34 3d 69 6e  66 6f 0d 04 06 18 6d 25  |.m%!4=info....m%|
00000930  21 38 3d 28 37 3c 3c 32  34 29 84 20 25 31 31 30  |!8=(7<<24). %110|
00000940  30 31 0d 04 10 13 24 28  6d 25 2b 31 32 29 3d 22  |01....$(m%+12)="|
00000950  49 6e 66 6f 22 0d 04 1a  0c 6d 25 3d 6d 25 2b 32  |Info"....m%=m%+2|
00000960  34 0d 04 24 0a 6d 25 21  30 3d 33 0d 04 2e 0a 6d  |4..$.m%!0=3....m|
00000970  25 21 34 3d 30 0d 04 38  18 6d 25 21 38 3d 28 37  |%!4=0..8.m%!8=(7|
00000980  3c 3c 32 34 29 84 20 25  31 31 30 30 31 0d 04 42  |<<24). %11001..B|
00000990  14 24 28 6d 25 2b 31 32  29 3d 22 41 75 64 69 6f  |.$(m%+12)="Audio|
000009a0  22 0d 04 4c 0c 6d 25 3d  6d 25 2b 32 34 0d 04 56  |"..L.m%=m%+24..V|
000009b0  0a 6d 25 21 30 3d 31 0d  04 60 0a 6d 25 21 34 3d  |.m%!0=1..`.m%!4=|
000009c0  30 0d 04 6a 18 6d 25 21  38 3d 28 37 3c 3c 32 34  |0..j.m%!8=(7<<24|
000009d0  29 84 20 25 31 31 30 30  31 0d 04 74 1b 24 28 6d  |). %11001..t.$(m|
000009e0  25 2b 31 32 29 3d 22 56  6f 6c 75 6d 65 20 20 4c  |%+12)="Volume  L|
000009f0  6f 75 64 22 0d 04 7e 0c  6d 25 3d 6d 25 2b 32 34  |oud"..~.m%=m%+24|
00000a00  0d 04 88 0a 6d 25 21 30  3d 32 0d 04 92 0a 6d 25  |....m%!0=2....m%|
00000a10  21 34 3d 30 0d 04 9c 18  6d 25 21 38 3d 28 37 3c  |!4=0....m%!8=(7<|
00000a20  3c 32 34 29 84 20 25 31  31 30 30 31 0d 04 a6 1b  |<24). %11001....|
00000a30  24 28 6d 25 2b 31 32 29  3d 22 56 6f 6c 75 6d 65  |$(m%+12)="Volume|
00000a40  20 51 75 69 65 74 22 0d  04 b0 0c 6d 25 3d 6d 25  | Quiet"....m%=m%|
00000a50  2b 32 34 0d 04 ba 0c 6d  25 21 30 3d 26 38 30 0d  |+24....m%!0=&80.|
00000a60  04 c4 0a 6d 25 21 34 3d  30 0d 04 ce 19 6d 25 21  |...m%!4=0....m%!|
00000a70  38 3d 28 31 31 3c 3c 32  34 29 84 20 25 31 31 30  |8=(11<<24). %110|
00000a80  30 31 0d 04 d8 13 24 28  6d 25 2b 31 32 29 3d 22  |01....$(m%+12)="|
00000a90  51 75 69 74 22 0d 04 e2  05 e1 0d 04 ec 3c c8 99  |Quit"........<..|
00000aa0  20 22 57 69 6d 70 5f 52  65 70 6f 72 74 45 72 72  | "Wimp_ReportErr|
00000ab0  6f 72 22 2c a4 65 72 72  62 6c 6b 28 9f 2c f6 24  |or",.errblk(.,.$|
00000ac0  29 2c 31 2c 22 41 75 64  69 6f 20 43 6f 6e 74 72  |),1,"Audio Contr|
00000ad0  6f 6c 6c 65 72 22 0d 04  f6 05 f8 0d ff           |oller".......|
00000add