Home » Archimedes archive » Archimedes World » AW-1992-08.adf » AWaug92 » !AWaug92/Goodies/CLI/!WimpCLI/!RunImage

!AWaug92/Goodies/CLI/!WimpCLI/!RunImage

This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.

Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.

Tape/disk: Home » Archimedes archive » Archimedes World » AW-1992-08.adf » AWaug92
Filename: !AWaug92/Goodies/CLI/!WimpCLI/!RunImage
Read OK:
File size: 3264 bytes
Load address: 0000
Exec address: 0000
File contents
   10REM><WimpCli$Dir>.!RunImage
   20REM version 1.01 (28-05-92)
   30REM LEN Mark Mahieu 1992
   40ONERRORPROCd(REPORT$+" (internal error code "+STR$ERL+")",TRUE)
   50DIMa(2,7,5):DIMa% 8192:DIMp% 512:DIMw% 512,z% 320:DIMC% 1728:DIMF% 0:DIMG% 100:DIMH% 20,I% 20:$H%="Left of Icon Bar":$I%="Right of Icon Bar":_=399:`=398:r=2:s=TRUE:k=TRUE:SYS"Wimp_Initialise",200,&4B534154,"WimpCLI"TO,J%:PROCv
   60SYS"Wimp_OpenTemplate",,"<WimpCli$dir>.Templates":SYS"Wimp_LoadTemplate",,a%,w%,w%+512,-1,"main",0:SYS"Wimp_CreateWindow",,a%TOj%:SYS"Wimp_LoadTemplate",,a%,z%,z%+320,-1,"info",0:a%!64=n%:SYS"Wimp_CreateWindow",,a%TOR%
   70SYS"Wimp_LoadTemplate",,a%,F%,F%+0,-1,"hotkeys",0:a%!0=-10000:a%!8=-10100:SYS"Wimp_CreateWindow",,a%TOr%:SYS"Wimp_LoadTemplate",,a%,G%,G%+100,-1,"savers",0:a%!64=n%:SYS"Wimp_CreateWindow",,a%TOf%:SYS"Wimp_CloseTemplate":PROCh
   80!a%=j%:a%!4=3:SYS"Wimp_GetIconState",,a%:C=a%!28:!a%=j%:a%!4=7:SYS"Wimp_GetIconState",,a%:D=a%!28:a%!16=20+aa:a%!12=f%:PROCe(a%!16):a%!0=r%:SYS"Wimp_GetWindowState",,a%:SYS"Wimp_OpenWindow",,a%:PROCw:T%=0:s%=FALSE:x=TIME:MOUSEX%,Y%,B%:H=6000:P=TRUE
   90ONERRORPROCd(REPORT$,FALSE)
  100REPEAT:PROCx:UNTILs%:PROCf
  110DEFPROCx:PROCy:SYS"Wimp_Poll",T%,a%TOU%:ba=TRUE:CASEU%OF
  120WHEN2:SYS"Wimp_OpenWindow",,a%
  130WHEN3:SYS"Wimp_CloseWindow",,a%
  140WHEN6:PROCe(a%!16)
  150WHEN8:PROCz(!a%,a%!24):ba=FALSE
  160WHEN9:PROCA
  170WHEN17,18:PROCB
  180ENDCASE
  190IFsANDbaTHENPROCC
  200ENDPROC
  210DEFPROCf:IFcaTHEN
  220SYS"OS_Release",20,da,1:SYS"OS_Module",7,,q%
  230ENDIF
  240$a%="TASK":SYS"Wimp_CloseDown",J%,&4B534154:END
  250
  260DEFPROCd(r$,V%):SYS"Wimp_DragBox",,0:!a%=ERL:$(a%+4)=r$:SYS"Wimp_ReportError",a%,1,"WimpCLI":IFV%THEN
  270SYS"Wimp_CloseDown",J%,&4B534154
  280ENDIF
  290ENDPROC
  300
  310DEFPROCv:SYS"OS_Module",6,,,16TO,,q%:IFq%<25165824THENPROCd("No room in RMA"):SYS"OS_Module",7,,q%:PROCf
  320FORW%=0TO2STEP2:P%=q%:[OPT W%:.da:CMP12,#1:STREQ0,E:MOV PC,14:.E:EQUD0: ]:NEXT:SYS"OS_Claim",20,da,1:t%=0:ca=TRUE:K=0:e=0:A%=OPENIN"<WimpCli$dir>.config":PROCi("{"):f$="":REPEAT:f$+=CHR$(BGET#A%):UNTILRIGHT$(f$)=",":IFLEFT$(f$,4)="LEFT"THENy=-2ELSEy=-1
  330j$="":REPEAT:j$+=CHR$(BGET#A%):UNTILRIGHT$(j$)=",":f$="":REPEAT:f$+=CHR$(BGET#A%):UNTILRIGHT$(f$)=",":d$="":REPEAT:d$+=CHR$(BGET#A%):UNTILRIGHT$(d$)=",":aa=EVAL(CHR$(BGET#A%)):d$=LEFT$(d$,LEN(d$)-1):f=EVAL(LEFT$(RIGHT$(d$,5),1)):h=EVAL(LEFT$(RIGHT$(d$,4),1)):d=EVAL(LEFT$(RIGHT$(d$,2),1)):i=EVAL(LEFT$(RIGHT$(d$,1),1)):CLOSE#A%:A%=OPENIN"<WimpCli$dir>.menus":ea=EXT#A%
  340z=0:FORJ=1TOea:IFBGET#A%=ASC"{"THENz+=1
  350NEXT:CLOSE#A%:PROCg:PROCD:ENDPROC
  360DEFPROCg:a%!0=y:a%!4=0:a%!8=0:a%!12=68:a%!16=68:a%!20=12290:$(a%+24)="!WimpCLI":SYS"Wimp_CreateIcon",,a%TOK%:ENDPROC
  370DEFPROCj(Z%):a%!0=Z%:SYS"Wimp_GetWindowState",,a%:SYS"Wimp_OpenWindow",,a%:ENDPROC
  380DEFPROCe(k%):IFk%<2THENK=k%
  390IFa%!8=2THENPROCk:ENDPROC
  400IFa%!12=j%ANDk%=15THENPROCE
  410IFa%!12=-2ANDa%!8=4THENPROCj(j%)
  420IFa%!12=-2ANDa%!8=1THENPROCl
  430IFa%!12=f%THEN
  440IFk%=4ANDf<9THENf+=1:PROCa(f%,0,"#"+STR$f,0,1)
  450IFk%=8ANDf>0THENf-=1:PROCa(f%,0,"#"+STR$f,0,1)
  460IFk%=5ANDh<9THENh+=1:PROCa(f%,1,"#"+STR$h,0,1)
  470IFk%=9ANDh>0THENh-=1:PROCa(f%,1,"#"+STR$h,0,1)
  480IFk%=6ANDd<5THENd+=1:PROCa(f%,2,"#"+STR$d,0,1)
  490IFk%=10ANDd>0THENd-=1:PROCa(f%,2,"#"+STR$d,0,1)
  500IFk%=7ANDi<9THENi+=1:PROCa(f%,3,"#"+STR$i,0,1)
  510IFk%=11ANDi>0THENi-=1:PROCa(f%,3,"#"+STR$i,0,1)
  520IFH<100ANDH<>-500THENd=3:PROCh
  530IFk%>20ANDk%<24THEN
  540PROCa(f%,20+r,"",385900857,1):r=k%-20:PROCa(f%,k%,"",&70006139,1)
  550ENDIF
  560ENDIF
  570ENDPROC
  580DEFPROCk:t%=a%!12:IFa%!12=j%SYS"Wimp_CreateMenu",,L%,a%!0-64,a%!4+16
  590IFa%!12=-2SYS"Wimp_CreateMenu",,_%,a%!0-64,272
  600ENDPROC
  610DEFPROCw:DIMc% 200,g% 100,d% 100:`%=g%:aa%=d%:_%=c%:$c%="WimpCLI":c%!12=459271:c%!16=224:c%!20=44:c%!24=0:c%+=28:c%!0=0:c%!4=`%:c%!8=&7000021:$(c%+12)="Misc":c%!24=1:c%!28=f%:c%!32=&7000021:$(c%+36)="Screen saver"
  620c%!48=1:c%!52=-1:c%!56=&7000021:$(c%+60)="F12 Replace":c%!72=128:c%!76=-1:c%!80=&7000021:$(c%+84)="Quit":$g%="Misc":g%!12=459271:g%!16=224:g%!20=44:g%!24=0:g%+=28:g%!0=0:g%!4=R%:g%!8=&7000021:$(g%+12)="Information"
  630g%!24=0:g%!28=aa%:g%!32=&7000021:$(g%+36)="Icon":g%!48=128:g%!52=-1:g%!56=&7000021:$(g%+60)="Save Options":$d%="Icon":d%!12=459271:d%!16=304:d%!20=44:d%!24=0:d%+=28:d%!0=0:d%!4=-1:d%!8=&7000121:d%!12=H%:d%!16=-1:d%!20=17
  640d%!24=128:d%!28=-1:d%!32=&7000121:d%!36=I%:d%!40=-1:d%!44=18:IFy=-2THENd%!0=1ELSEd%!24=129
  650IFLEFT$(f$,2)="ON"THENs=TRUE:c%!24=1ELSEs=FALSE:c%!24=0
  660IFLEFT$(j$,2)="ON"THENk=TRUE:c%!48=1ELSEk=FALSE:c%!48=0
  670PROCF:ENDPROC
  680DEFPROCA:a%!12=t%:IFa%!0=3ANDa%!12=-2THENs%=TRUE:PROCf
  690IFa%!0=2ANDa%!12=-2THEN
  700IFk=TRUETHENk=FALSE:c%!48=0ELSEk=TRUE:c%!48=1
  710ENDIF
  720IFa%!0=1ANDa%!12=-2THEN
  730IFs=TRUETHENs=FALSE:c%!24=0ELSEs=TRUE:c%!24=1:x=TIME
  740ENDIF
  750IFa%!12=-2ANDa%!0=0THEN
  760IFa%!4=2THENPROCG
  770IFa%!4=1ANDa%!8=0THENy=-2:d%!0=1:d%!24=128:!a%=-2:a%!4=K%:SYS"Wimp_DeleteIcon",,a%:PROCg:a%!12=-2
  780IFa%!4=1ANDa%!8=1THENy=-1:d%!0=0:d%!24=129:!a%=-2:a%!4=K%:SYS"Wimp_DeleteIcon",,a%:PROCg:a%!12=-2
  790ENDIF
  800IFa%!12<>-2THEN
  810SYS"Wimp_DecodeMenu",,L%,a%,p%:h$=$p%:Q=INSTR(h$,"."):IFQ>0THEN
  820k$=LEFT$(h$,Q-1):l$=RIGHT$(h$,LEN(h$)-Q)
  830ELSE:k$=h$:l$=""
  840ENDIF
  850PROCa(j%,3,"!"+k$,0,1):PROCa(j%,7,"!"+l$,0,1):SYS"Wimp_SetCaretPosition",j%,3,,,-1,LEN(k$)
  860ENDIF
  870SYS"Wimp_GetPointerInfo",,a%:IFa%!8=1THEN
  880a%!12=t%:PROCk
  890ENDIF
  900ENDPROC
  910DEFPROCB:IFa%!16=0THENs%=TRUE:ENDPROC
  920CASEa%!16OF
  930WHEN3:IFa%!12=0THENPROCH(FNb(a%+44))
  940WHEN1282:PROCI
  950ENDCASE
  960ENDPROC
  970DEFFNb(u%):o$="":REPEAT:o$+=CHR$(?u%):u%+=1:UNTIL?u%<32:=o$
  980DEFPROCz(M%,m%):x=TIME:IFM%=j%AND(m%=_ORm%=`)THEN
  990IFK=0THENe=1:K=1ELSEe=0:K=0
 1000IFe=0THENR=LEN($C)
 1010IFe=1THENR=LEN($D)
 1020IFe=1ANDm%=`THENSYS"Wimp_SetCaretPosition",j%,(4*e)+3,,,-1,R
 1030IFe=0ANDm%=_THENSYS"Wimp_SetCaretPosition",j%,(4*e)+3,,,-1,R
 1040ENDIF
 1050IFm%=460ANDk=TRUETHEN
 1060PROCj(j%):e=0:$C="":$D="":PROCa(j%,3,"",0,1):PROCa(j%,7,"",0,1):SYS"Wimp_SetCaretPosition",j%,3,,,-1,0:PROCe(3)
 1070ENDIF
 1080IFm%=460ANDk=TRUETHENENDPROC
 1090IFM%=j%ANDm%=13THEN
 1100PROCJ
 1110ELSESYS"Wimp_ProcessKey",m%
 1120ENDIF
 1130ENDPROC
 1140DEFPROCJ:e$=$C:i$=$D:IFFNaTHENENDPROC
 1150OSCLI("WimpTask "+e$+" "+i$):ENDPROC
 1160DEFPROCH(p$):e$=$C:i$=$D:IFFNaTHENENDPROC
 1170IF i$<>"" THEN OSCLI("WimpTask "+e$+" "+p$+" "+i$) ELSE OSCLI("WimpTask "+e$+" "+p$)
 1180ENDPROC
 1190DEFPROCE:e$=$C:i$=$D:OSCLI("WimpTask Help "+e$+"  (shift to scroll)"):ENDPROC
 1200DEFFNa:fa=FALSE:FORI=0TOLEN(e$):n$=LEFT$(e$,I):m$=RIGHT$(n$,1):IFm$<>" "ANDm$<>""THENfa=TRUE
 1210NEXT:IFfaTHEN:=0
 1220=1
 1230DEFPROCF:S=0:A%=OPENIN"<WimpCli$Dir>.menus":DIMi% (24*z)+48:DIMe% 3456:DIMb(12):DIMa%(z):L%=i%:$i%="WimpCLI":i%!12=459271:i%!16=128:i%!20=44:i%!24=0:i%+=28:L=0:FORI=1TOz:PROCi("{"):a$="":REPEAT:a$+=CHR$BGET#A%:UNTILRIGHT$(a$)="}"
 1240ga=0:q$=a$:FORha=LEN(q$)TO1STEP-1:IFLEFT$(RIGHT$(q$,ha),1)=","THENga+=1
 1250NEXT:M=ga:IFI=zTHENi%!((I-1)*24)=128
 1260IFI<>zTHENi%!((I-1)*24)=0
 1270IFM=0THENi%!(((I-1)*24)+4)=-1ELSEi%!(((I-1)*24)+4)=e%
 1280i%!(((I-1)*24)+8)=&7000021:c$="":ia=-1:REPEAT:ia+=1:F=ASC(LEFT$(RIGHT$(a$,LEN(a$)-ia),1)):IFF<>ASC","ANDF<>ASC"}"THENc$+=CHR$F
 1290UNTILF=ASC","ORF=ASC"}":IFRIGHT$(c$,1)="^"THENi%!((I-1)*24)+=2:c$=LEFT$(c$,(LEN(c$))-1)
 1300$(i%+(((I-1)*24)+12))=c$:IFL<LEN(c$)THENL=LEN(c$)
 1310IFM<>0THEN
 1320A=0:$(e%)=c$:e%!12=459271:e%!16=((LEN(c$)*16)+16):e%!20=44:e%!24=0:e%+=28:FORc=1TOM:IFc=MTHENe%!(0+((c-1)*24))=128ELSEe%!(0+((c-1)*24))=0
 1330e%!(4+((c-1)*24))=-1:e%!(8+((c-1)*24))=&7000021:b$="":u=INSTR(a$,","):a$=RIGHT$(a$,LEN(a$)-u):u=INSTR(a$,","):IFu<>0THENb$=LEFT$(a$,u-1)ELSEu=INSTR(a$,"}"):b$=LEFT$(a$,u-1)
 1340a$=RIGHT$(a$,LEN(a$)-(u-1)):ja=FALSE:IFRIGHT$(b$,1)="~"THEN
 1350ja=TRUE:e%!((c-1)*24)+=4:b$=LEFT$(b$,(LEN(b$))-1):$(C%+S)=b$:ka=C%+S:e%!(12+((c-1)*24))=ka:e%!(16+((c-1)*24))=-1:e%!(20+((c-1)*24))=24:e%!(8+((c-1)*24))=&7000121:IFA<LEN(b$)THENA=LEN(b$)
 1360S+=24
 1370ENDIF
 1380IFja<>TRUETHEN
 1390IFA<LEN(b$)THENA=LEN(b$)
 1400$(e%+(12+((c-1)*24)))=b$
 1410ENDIF
 1420b(I)=e%:NEXT:e%-=28:IF((A+1)*16)>e%!16THENe%!16=((A+1)*16)
 1430e%+=(24*12)
 1440ENDIF
 1450NEXT:i%-=28:IF((L+1)*16)>i%!16THENi%!16=((L+1)*16)
 1460i%+=28:CLOSE#A%:ENDPROC
 1470DEFPROCi(s$):REPEAT:la=BGET#A%:UNTILla=ASCs$:ENDPROC
 1480DEFPROCC:MOUSEx%,y%,b%:IFx%<>X%ORy%<>Y%ORb%<>B%THENx=TIME
 1490IF!E<>0THENx=TIME:!E=0
 1500MOUSEX%,Y%,B%:IFTIME-x>H-1THENPROCl
 1510ENDPROC
 1520DEFPROCl:ba%=MODE:MODE1:OFF:ma=X%:na=Y%:MOUSEON0:MOUSETOma,na
 1530IFr<>2THENt=TIME:REPEATUNTILTIME=t+100
 1540MOUSEX%,Y%,B%:IFr=1THENPROCK
 1550IFr=2THENPROCL
 1560IFr=3THENPROCM
 1570PROCN:ENDPROC
 1580DEFPROCK:REPEAT:PROCO:I=0:REPEAT:I+=1:PROCc:PROCm(I,oa,1):IFN=2THENPROCm(I,pa,2)
 1590UNTILI=30ORl%=TRUE:IFl%=FALSETHEN
 1600I=0:REPEAT:I+=1:PROCc:PROCn(I,oa,1):IFN=2THENPROCn(I,pa,2)
 1610UNTILI=15ORl%=TRUE
 1620ENDIF
 1630IFl%=FALSETHEN
 1640I=0:REPEAT:I+=1:PROCc:UNTILl%=TRUEORI=250
 1650ENDIF
 1660UNTILl%=TRUE:ENDPROC
 1670DEFPROCO:N=RND(2):qa=RND(20)+47.5:ra=RND(20)+47.5:U=RND(100)/100:U+=2:V=RND(100)/100:V+=2:oa=RND(7):pa=RND(7):W=RND(2):IFW=2THENW=-1
 1680Y=RND(2):IFY=2THENY=-1
 1690l=1:j=640+((RND(400)-200)):m=1:v=640+((RND(400)-200)):n=1:o=j:p=1:q=j:ENDPROC
 1700DEFPROCm(B,sa,a):GCOL0:IFa=1THEN
 1710MOVEo,n:DRAWj,l:CIRCLEFILLo,n,17:n=l:o=j:l+=qa:l-=(B*U):j+=((B*U)/3)*W
 1720ENDIF
 1730IFa=2THEN
 1740MOVEq,p:DRAWv,m:CIRCLEFILLq,p,17:p=m:q=v:m+=ra:m-=(B*V):v+=((B*V)/3)*Y
 1750ENDIF
 1760COLOURa,160,47,0:GCOL0,a:IFa=1THENMOVEo,n:DRAWj,l:GCOL7:POINTo,nELSEMOVEq,p:DRAWv,m:GCOL7:POINTq,p
 1770IFa=1THENPROCo(o,n)ELSEPROCo(q,p)
 1780IFB=30THEN
 1790FORO=0TO7:IFa=1THENa(a,O,0)=jELSEa(a,O,0)=v
 1800IFa=1THENa(a,O,1)=lELSEa(a,O,1)=m
 1810IFa=1THENa(a,O,2)=jELSEa(a,O,2)=v
 1820IFa=1THENa(a,O,3)=lELSEa(a,O,3)=m
 1830a(a,O,4)=RND((100)/100)+2:a(a,O,5)=RND(2):IFa(a,O,5)=2THENa(a,O,5)=-1
 1840NEXT
 1850ENDIF
 1860FORT=0TO700/N:NEXTT:IFB=30THEN
 1870GCOL0:IFa=1THENMOVEo,n:DRAWj,l:CIRCLEFILLo,n,17
 1880IFa=2THENMOVEq,p:DRAWv,m:CIRCLEFILLq,p,17
 1890ENDIF
 1900ENDPROC
 1910DEFPROCc:l%=FALSE:MOUSEx%,y%,b%:IFx%<>X%ORy%<>Y%ORb%<>B%THENl%=TRUE
 1920IF!E<>0THEN!E=0:l%=TRUE
 1930IFPTHENl%=FALSE:P=FALSE
 1940MOUSEX%,Y%,B%:ENDPROC
 1950DEFPROCn(b,sa,a):FORO=0TO7:GCOL0:MOVEa(a,O,0),a(a,O,1):DRAWa(a,O,2),a(a,O,3):a(a,O,0)=a(a,O,2):a(a,O,1)=a(a,O,3):IFa=1THENa(a,O,3)+=qaELSEa(a,O,3)+=ra
 1960a(a,O,3)-=((b+20)*a(a,O,4)):a(a,O,2)+=(((b+20)*a(a,O,4))/5)*a(a,O,5):CASEsaOF
 1970WHEN1:COLOURa,240-(16*(b-1)),240-(16*(b-1)),240-(16*(b-1))
 1980WHEN2:COLOURa,240-(16*(b-1)),64-(4*(b-1)),0
 1990WHEN3:COLOURa,32-(2*(b-1)),240-(16*(b-1)),0
 2000WHEN4:COLOURa,32-(2*(b-1)),0,240-(16*(b-1))
 2010WHEN5:COLOURa,0,240-(16*(b-1)),192-(12*(b-1))
 2020WHEN6:COLOURa,192-(12*(b-1)),240-(16*(b-1)),0
 2030WHEN7:COLOURa,240-(16*(b-1)),0,192-(12*(b-1))
 2040ENDCASE
 2050GCOLa:MOVEa(a,O,0),a(a,O,1):DRAWa(a,O,2),a(a,O,3):NEXT:IFN=1THENFORT=0TO1000:NEXTT
 2060IFb=15THENGCOL0:FORO=0TO7:MOVEa(a,O,0),a(a,O,1):DRAWa(a,O,2),a(a,O,3):NEXT
 2070ENDPROC
 2080DEFPROCN:P=TRUE:x=TIME:SYS"Wimp_SetMode",ba%:MOUSEON
 2090ENDPROC
 2100DEFPROCy:a%!0=r%:SYS"Wimp_GetWindowState",,a%:SYS"Wimp_CloseWindow",,a%:a%!0=r%:SYS"Wimp_GetWindowState",,a%:SYS"Wimp_OpenWindow",,a%:ENDPROC
 2110DEFPROCo(ta,ua):FORva=1TO8:wa=RND(14)-7:xa=RND(14)-7:POINTta+wa,ua+xa:NEXT:ENDPROC
 2120DEFPROCh:PROCa(f%,0,"#"+STR$f,0,1):PROCa(f%,1,"#"+STR$h,0,1):PROCa(f%,2,"#"+STR$d,0,1):PROCa(f%,3,"#"+STR$i,0,1):ENDPROC
 2130DEFPROCD:S%=OPENIN("<WimpCli$Dir>.Sprites"):ya=EXT#S%+16:CLOSE#S%:DIMn% ya:!n%=ya:n%!4=0:n%!8=16:n%!12=16:SYS"OS_SpriteOp",266,n%,"<WimpCli$Dir>.Sprites":ENDPROC
 2140DEFPROCa(o%,N%,g$,v%,za):IFo%=f%ANDN%<4THEN
 2150H=(i+(d*10)+(h*60)+(f*600))*100
 2160ENDIF
 2170a%!0=o%:a%!4=N%:SYS"Wimp_GetIconState",,a%:IFLEFT$(g$,1)="!"THEN
 2180$a%!28=RIGHT$(g$,LEN(g$)-1)
 2190ENDIF
 2200IFLEFT$(g$,1)="#"THEN
 2210$(a%+28)=RIGHT$(g$,LEN(g$)-1):IFv%=0THENSYS"Wimp_DeleteIcon",,a%:a%!4=o%:SYS"Wimp_CreateIcon",,a%+4
 2220ENDIF
 2230IFv%<>0THEN
 2240SYS"Wimp_DeleteIcon",,a%:a%!24=v%:a%!4=o%:SYS"Wimp_CreateIcon",,a%+4
 2250ENDIF
 2260IFza=0THENENDPROC
 2270SYS"Wimp_ForceRedraw",o%,a%!8,a%!12,a%!16,a%!20:ENDPROC
 2280DEFPROCL:COLOUR1,175,255,255:GCOL1:Aa=512:G=a%:FORI=0TOAa-1:G!(I*16)=RND(200)/10-10:G!((I*16)+4)=RND(500)/10:G!((I*16)+8)=RND(100)/10-6:G!((I*16)+12)=RND(200)/10+10:NEXT:E%=G:D%=Aa-1:PROCP:REPEAT:CLS:CALLp%:PROCc:UNTILl%:ENDPROC
 2290
 2300DEFPROCP:FORBa=0TO2STEP2:P%=p%:[OPT Ba:MOV10,#160:MOV10,10,LSL #2:MOV11,#0:MOV12,#0:.Ca:LDR5,[4,#0]:LDR6,[4,#4]:LDR7,[4,#8]:LDR8,[4,#12]:ADD5,5,7:ADD6,6,8,LSL #1:CMP6,#0:BLT Da:SUB8,8,#1:STR5,[4,#0]:STR6,[4,#4]:STR8,[4,#12]:ADD1,5,10:MOV2,6:MOV0,#69
 2310SWI "OS_Plot":B Ea:.Da:SUB5,12,#10:MOV6,#0:ADD8,12,#10:STR5,[4,#0]:STR6,[4,#4]:STR8,[4,#12]:.Ea:ADD4,4,#16:ADD12,12,#1:CMP12,#20:MOVGE12,#0:ADD11,11,#1:CMP11,3:BLT Ca:MOV15,14: ]:NEXTBa:ENDPROC
 2320DEFPROCG:A%=OPENOUT"<WimpCli$Dir>.config":IFy=-1THENBPUT#A%,"{RIGHT,";ELSEBPUT#A%,"{LEFT,";
 2330IFkTHENBPUT#A%,"ON,";ELSEBPUT#A%,"OFF,";
 2340IFsTHENBPUT#A%,"ON,";ELSEBPUT#A%,"OFF,";
 2350BPUT#A%,STR$f+STR$h+":"+STR$d+STR$i+",";:BPUT#A%,STR$r+"}":CLOSE#A%:ENDPROC
 2360DEFPROCI:O%=a%!32:Q%=a%!36:a%!12=a%!8:a%!16=1283:h%=a%+20:$h%="This is the WimpCLI Application.":IFO%=j%THEN
 2370$h%="Use this window for entering * commands.|MThe main menu holds several such commands for instant use.|M":CASEQ%OF
 2380WHEN3:$h%="Enter your * command in this icon, then press Return to execute it.|M"
 2390WHEN7:$h%="The suffix to the command should be entered in this icon.|M"
 2400WHEN15:$h%="Select this icon to obtain help on the command.|M"
 2410ENDCASE
 2420ENDIF
 2430IFO%=f%THEN
 2440$h%="This window contains options for controlling the screen saver.|M":CASEQ%OF
 2450WHEN24:$h%="This is the time before the screen saver is invoked.|M"
 2460WHEN4:$h%="This icon will increase the amount of time by 10 minutes.|M"
 2470WHEN5:$h%="This icon will increase the amount of time by 1 minute.|M"
 2480WHEN6:$h%="This icon will increase the amount of time by 10 seconds.|M"
 2490WHEN7:$h%="This icon will increase the amount of time by 1 second.|M"
 2500WHEN8:$h%="This icon will decrease the amount of time by 10 minutes.|M"
 2510WHEN9:$h%="This icon will decrease the amount of time by 1 minute.|M"
 2520WHEN10:$h%="This icon will decrease the amount of time by 10 seconds.|M"
 2530WHEN11:$h%="This icon will decrease the amount of time by 1 second.|M"
 2540WHEN21:$h%="Selecting this icon will cause the Firework display to be used as the screen saver.|M"
 2550WHEN22:$h%="Selecting this icon will cause the Water Fountain display to be used as the screen saver.|M"
 2560WHEN23:$h%="Selecting this icon will cause the Walker display to be used as the screen saver.|M"
 2570ENDCASE
 2580ENDIF
 2590!a%=(LEN$h%+25)ANDNOT3:SYS"Wimp_SendMessage",17,a%,a%!4:ENDPROC
 2600DEFPROCM:COLOUR2,170,170,170:Z=385:Fa=60:w=0:X=-200:REPEAT:X+=20:IFX>1280THENX=-200
 2610ORIGINX,200:w+=1:IFw>12THENw=1
 2620g=1:PROCp(w):FORGa=0TO2000:NEXT:g=0:PROCp(w):ORIGIN0,0:PROCc:UNTILl%:ENDPROC
 2630DEFPROCp(w):CASEwOF
 2640WHEN1:PROCQ
 2650WHEN2:PROCq
 2660WHEN3:PROCr
 2670WHEN4:PROCs
 2680WHEN5:PROCt
 2690WHEN6:PROCu
 2700WHEN7:PROCR
 2710WHEN8:PROCu
 2720WHEN9:PROCt
 2730WHEN10:PROCs
 2740WHEN11:PROCr
 2750WHEN12:PROCq
 2760ENDCASE
 2770ENDPROC
 2780DEFPROCQ:GCOL(2*g):MOVE100,175:DRAW55,87:DRAW0,10:DRAW40,0:MOVE100,300:DRAW175,150:GCOL(3*g):PROCb:MOVE100,325:DRAW100,175:DRAW165,90:DRAW200,0:DRAW240,10:MOVE100,300:DRAW25,150:ENDPROC
 2790DEFPROCq:GCOL(2*g):MOVE100,175:DRAW70,87:DRAW40,5:DRAW80,0:MOVE100,300:DRAW150,130:GCOL(3*g):PROCb:MOVE100,325:DRAW100,175:DRAW150,90:DRAW180,0:DRAW220,5:MOVE100,300:DRAW50,130:ENDPROC
 2800DEFPROCr:GCOL(2*g):MOVE100,175:DRAW85,82:DRAW65,2:DRAW105,0:MOVE100,300:DRAW125,120:GCOL(3*g):PROCb:MOVE100,325:DRAW100,175:DRAW125,85:DRAW150,0:DRAW190,2:MOVE100,300:DRAW75,120:ENDPROC
 2810DEFPROCs:GCOL(2*g):MOVE100,175:DRAW98,80:DRAW96,0:DRAW136,0:MOVE100,300:DRAW110,115:GCOL(3*g):PROCb:MOVE100,325:DRAW100,175:DRAW102,85:DRAW105,0:DRAW145,0:MOVE100,300:DRAW90,115:ENDPROC
 2820DEFPROCt:GCOL(2*g):MOVE100,175:DRAW125,85:DRAW150,0:DRAW190,2:MOVE100,300:DRAW75,120:GCOL(3*g):PROCb:MOVE100,325:DRAW100,175:DRAW85,82:DRAW65,2:DRAW105,0:MOVE100,300:DRAW125,120:ENDPROC
 2830DEFPROCu:GCOL(2*g):MOVE100,175:DRAW150,90:DRAW180,0:DRAW220,5:MOVE100,300:DRAW50,130:GCOL(3*g):PROCb:MOVE100,325:DRAW100,175:DRAW70,87:DRAW40,5:DRAW80,0:MOVE100,300:DRAW150,130:ENDPROC
 2840DEFPROCR:GCOL(2*g):MOVE100,175:DRAW165,90:DRAW200,0:DRAW240,10:MOVE100,300:DRAW25,150:GCOL(3*g):PROCb:MOVE100,325:DRAW100,175:DRAW55,87:DRAW0,10:DRAW40,0:MOVE100,300:DRAW175,150:ENDPROC
 2850DEFPROCb:CIRCLE100,Z,Fa:CIRCLE140,Z+20,10:GCOL1*g:CIRCLEFILL170,Z+5,13:GCOL3*g:ENDPROC

�><WimpCli$Dir>.!RunImage
� version 1.01 (28-05-92)
� � Mark Mahieu 1992
(.��d(�$+" (internal error code "+Þ+")",�)
2��a(2,7,5):�a% 8192:�p% 512:�w% 512,z% 320:�C% 1728:�F% 0:�G% 100:�H% 20,I% 20:$H%="Left of Icon Bar":$I%="Right of Icon Bar":_=399:`=398:r=2:s=�:k=�:ș"Wimp_Initialise",200,&4B534154,"WimpCLI"�,J%:�v
<�ș"Wimp_OpenTemplate",,"<WimpCli$dir>.Templates":ș"Wimp_LoadTemplate",,a%,w%,w%+512,-1,"main",0:ș"Wimp_CreateWindow",,a%�j%:ș"Wimp_LoadTemplate",,a%,z%,z%+320,-1,"info",0:a%!64=n%:ș"Wimp_CreateWindow",,a%�R%
F�ș"Wimp_LoadTemplate",,a%,F%,F%+0,-1,"hotkeys",0:a%!0=-10000:a%!8=-10100:ș"Wimp_CreateWindow",,a%�r%:ș"Wimp_LoadTemplate",,a%,G%,G%+100,-1,"savers",0:a%!64=n%:ș"Wimp_CreateWindow",,a%�f%:ș"Wimp_CloseTemplate":�h
P�!a%=j%:a%!4=3:ș"Wimp_GetIconState",,a%:C=a%!28:!a%=j%:a%!4=7:ș"Wimp_GetIconState",,a%:D=a%!28:a%!16=20+aa:a%!12=f%:�e(a%!16):a%!0=r%:ș"Wimp_GetWindowState",,a%:ș"Wimp_OpenWindow",,a%:�w:T%=0:s%=�:x=�:ȗX%,Y%,B%:H=6000:P=�
Z��d(�$,�)
d�:�x:�s%:�f
n,��x:�y:ș"Wimp_Poll",T%,a%�U%:ba=�:ȎU%�
x�2:ș"Wimp_OpenWindow",,a%
��3:ș"Wimp_CloseWindow",,a%
��6:�e(a%!16)
��8:�z(!a%,a%!24):ba=�
�	�9:�A
�
�17,18:�B
��
��s�ba��C
��
���f:�ca�
�.ș"OS_Release",20,da,1:ș"OS_Module",7,,q%
��
�0$a%="TASK":ș"Wimp_CloseDown",J%,&4B534154:�
�
\��d(r$,V%):ș"Wimp_DragBox",,0:!a%=�:$(a%+4)=r$:ș"Wimp_ReportError",a%,1,"WimpCLI":�V%�
#ș"Wimp_CloseDown",J%,&4B534154
�
"�
,
6Z��v:ș"OS_Module",6,,,16�,,q%:�q%<25165824��d("No room in RMA"):ș"OS_Module",7,,q%:�f
@��W%=0�2�2:P%=q%:[OPT W%:.da:CMP12,#1:STREQ0,E:MOV PC,14:.E:EQUD0: ]:�:ș"OS_Claim",20,da,1:t%=0:ca=�:K=0:e=0:A%=�"<WimpCli$dir>.config":�i("{"):f$="":�:f$+=�(�#A%):��f$)=",":�f$,4)="LEFT"�y=-2�y=-1
J�j$="":�:j$+=�(�#A%):��j$)=",":f$="":�:f$+=�(�#A%):��f$)=",":d$="":�:d$+=�(�#A%):��d$)=",":aa=�(�(�#A%)):d$=�d$,�(d$)-1):f=�(��d$,5),1)):h=�(��d$,4),1)):d=�(��d$,2),1)):i=�(��d$,1),1)):�#A%:A%=�"<WimpCli$dir>.menus":ea=�#A%
Tz=0:�J=1�ea:�#A%=�"{"�z+=1
^�:�#A%:�g:�D:�
hk��g:a%!0=y:a%!4=0:a%!8=0:a%!12=68:a%!16=68:a%!20=12290:$(a%+24)="!WimpCLI":ș"Wimp_CreateIcon",,a%�K%:�
rI��j(Z%):a%!0=Z%:ș"Wimp_GetWindowState",,a%:ș"Wimp_OpenWindow",,a%:�
|��e(k%):�k%<2�K=k%
��a%!8=2��k:�
��a%!12=j%�k%=15��E
��a%!12=-2�a%!8=4��j(j%)
��a%!12=-2�a%!8=1��l
��a%!12=f%�
�&�k%=4�f<9�f+=1:�a(f%,0,"#"+�f,0,1)
�&�k%=8�f>0�f-=1:�a(f%,0,"#"+�f,0,1)
�&�k%=5�h<9�h+=1:�a(f%,1,"#"+�h,0,1)
�&�k%=9�h>0�h-=1:�a(f%,1,"#"+�h,0,1)
�&�k%=6�d<5�d+=1:�a(f%,2,"#"+�d,0,1)
�'�k%=10�d>0�d-=1:�a(f%,2,"#"+�d,0,1)
�&�k%=7�i<9�i+=1:�a(f%,3,"#"+�i,0,1)
�'�k%=11�i>0�i-=1:�a(f%,3,"#"+�i,0,1)
�H<100�H<>-500�d=3:�h
�k%>20�k%<24�
?�a(f%,20+r,"",385900857,1):r=k%-20:�a(f%,k%,"",&70006139,1)
&�
0�
:�
DA��k:t%=a%!12:�a%!12=j%ș"Wimp_CreateMenu",,L%,a%!0-64,a%!4+16
N0�a%!12=-2ș"Wimp_CreateMenu",,_%,a%!0-64,272
X�
b���w:�c% 200,g% 100,d% 100:`%=g%:aa%=d%:_%=c%:$c%="WimpCLI":c%!12=459271:c%!16=224:c%!20=44:c%!24=0:c%+=28:c%!0=0:c%!4=`%:c%!8=&7000021:$(c%+12)="Misc":c%!24=1:c%!28=f%:c%!32=&7000021:$(c%+36)="Screen saver"
l�c%!48=1:c%!52=-1:c%!56=&7000021:$(c%+60)="F12 Replace":c%!72=128:c%!76=-1:c%!80=&7000021:$(c%+84)="Quit":$g%="Misc":g%!12=459271:g%!16=224:g%!20=44:g%!24=0:g%+=28:g%!0=0:g%!4=R%:g%!8=&7000021:$(g%+12)="Information"
v�g%!24=0:g%!28=aa%:g%!32=&7000021:$(g%+36)="Icon":g%!48=128:g%!52=-1:g%!56=&7000021:$(g%+60)="Save Options":$d%="Icon":d%!12=459271:d%!16=304:d%!20=44:d%!24=0:d%+=28:d%!0=0:d%!4=-1:d%!8=&7000121:d%!12=H%:d%!16=-1:d%!20=17
�Wd%!24=128:d%!28=-1:d%!32=&7000121:d%!36=I%:d%!40=-1:d%!44=18:�y=-2�d%!0=1�d%!24=129
�(�f$,2)="ON"�s=�:c%!24=1�s=�:c%!24=0
�(�j$,2)="ON"�k=�:c%!48=1�k=�:c%!48=0
��F:�
�)��A:a%!12=t%:�a%!0=3�a%!12=-2�s%=�:�f
��a%!0=2�a%!12=-2�
� �k=��k=�:c%!48=0�k=�:c%!48=1
��
��a%!0=1�a%!12=-2�
�$�s=��s=�:c%!24=0�s=�:c%!24=1:x=�
��
��a%!12=-2�a%!0=0�
��a%!4=2��G
[�a%!4=1�a%!8=0�y=-2:d%!0=1:d%!24=128:!a%=-2:a%!4=K%:ș"Wimp_DeleteIcon",,a%:�g:a%!12=-2
[�a%!4=1�a%!8=1�y=-1:d%!0=0:d%!24=129:!a%=-2:a%!4=K%:ș"Wimp_DeleteIcon",,a%:�g:a%!12=-2
�
 �a%!12<>-2�
*9ș"Wimp_DecodeMenu",,L%,a%,p%:h$=$p%:Q=�h$,"."):�Q>0�
4k$=�h$,Q-1):l$=�h$,�(h$)-Q)
>�:k$=h$:l$=""
H�
RU�a(j%,3,"!"+k$,0,1):�a(j%,7,"!"+l$,0,1):ș"Wimp_SetCaretPosition",j%,3,,,-1,�(k$)
\�
f(ș"Wimp_GetPointerInfo",,a%:�a%!8=1�
pa%!12=t%:�k
z�
��
���B:�a%!16=0�s%=�:�
�Ȏa%!16�
��3:�a%!12=0��H(�b(a%+44))
��1282:�I
��
��
�0ݤb(u%):o$="":�:o$+=�(?u%):u%+=1:�?u%<32:=o$
�&��z(M%,m%):x=�:�M%=j%�(m%=_�m%=`)�
��K=0�e=1:K=1�e=0:K=0
��e=0�R=�($C)
��e=1�R=�($D)
�9�e=1�m%=`�ș"Wimp_SetCaretPosition",j%,(4*e)+3,,,-1,R
9�e=0�m%=_�ș"Wimp_SetCaretPosition",j%,(4*e)+3,,,-1,R
�
�m%=460�k=��
$f�j(j%):e=0:$C="":$D="":�a(j%,3,"",0,1):�a(j%,7,"",0,1):ș"Wimp_SetCaretPosition",j%,3,,,-1,0:�e(3)
.�
8�m%=460�k=���
B�M%=j%�m%=13�
L�J
V�ș"Wimp_ProcessKey",m%
`�
j�
t��J:e$=$C:i$=$D:�a��
~�("WimpTask "+e$+" "+i$):�
���H(p$):e$=$C:i$=$D:�a��
�I� i$<>"" � �("WimpTask "+e$+" "+p$+" "+i$) � �("WimpTask "+e$+" "+p$)
��
�B��E:e$=$C:i$=$D:�("WimpTask Help "+e$+"  (shift to scroll)"):�
�@ݤa:fa=�:�I=0��(e$):n$=�e$,I):m$=�n$,1):�m$<>" "�m$<>""�fa=�
�
�:�fa�:=0
�=1
�F:S=0:A%=�"<WimpCli$Dir>.menus":�i% (24*z)+48:�e% 3456:�b(12):�a%(z):L%=i%:$i%="WimpCLI":i%!12=459271:i%!16=128:i%!20=44:i%!24=0:i%+=28:L=0:�I=1�z:�i("{"):a$="":�:a$+=��#A%:��a$)="}"
�4ga=0:q$=a$:�ha=�(q$)�1�-1:��q$,ha),1)=","�ga+=1
�!�:M=ga:�I=z�i%!((I-1)*24)=128
��I<>z�i%!((I-1)*24)=0
�2�M=0�i%!(((I-1)*24)+4)=-1�i%!(((I-1)*24)+4)=e%
ai%!(((I-1)*24)+8)=&7000021:c$="":ia=-1:�:ia+=1:F=�(��a$,�(a$)-ia),1)):�F<>�","�F<>�"}"�c$+=�F

A�F=�","�F=�"}":��c$,1)="^"�i%!((I-1)*24)+=2:c$=�c$,(�(c$))-1)
-$(i%+(((I-1)*24)+12))=c$:�L<�(c$)�L=�(c$)

�M<>0�
(�A=0:$(e%)=c$:e%!12=459271:e%!16=((�(c$)*16)+16):e%!20=44:e%!24=0:e%+=28:�c=1�M:�c=M�e%!(0+((c-1)*24))=128�e%!(0+((c-1)*24))=0
2�e%!(4+((c-1)*24))=-1:e%!(8+((c-1)*24))=&7000021:b$="":u=�a$,","):a$=�a$,�(a$)-u):u=�a$,","):�u<>0�b$=�a$,u-1)�u=�a$,"}"):b$=�a$,u-1)
<)a$=�a$,�(a$)-(u-1)):ja=�:��b$,1)="~"�
F�ja=�:e%!((c-1)*24)+=4:b$=�b$,(�(b$))-1):$(C%+S)=b$:ka=C%+S:e%!(12+((c-1)*24))=ka:e%!(16+((c-1)*24))=-1:e%!(20+((c-1)*24))=24:e%!(8+((c-1)*24))=&7000121:�A<�(b$)�A=�(b$)
P	S+=24
Z�
d�ja<>��
n�A<�(b$)�A=�(b$)
x$(e%+(12+((c-1)*24)))=b$
��
�7b(I)=e%:�:e%-=28:�((A+1)*16)>e%!16�e%!16=((A+1)*16)
�e%+=(24*12)
��
�/�:i%-=28:�((L+1)*16)>i%!16�i%!16=((L+1)*16)
�i%+=28:�#A%:�
���i(s$):�:la=�#A%:�la=�s$:�
�,��C:ȗx%,y%,b%:�x%<>X%�y%<>Y%�b%<>B%�x=�
��!E<>0�x=�:!E=0
�ȗX%,Y%,B%:�-x>H-1��l
��
�,��l:ba%=�:�1:�:ma=X%:na=Y%:ȗ�0:ȗ�ma,na
��r<>2�t=�:���=t+100
ȗX%,Y%,B%:�r=1��K
�r=2��L
�r=3��M
"�N:�
,5��K:�:�O:I=0:�:I+=1:�c:�m(I,oa,1):�N=2��m(I,pa,2)
6�I=30�l%=�:�l%=��
@,I=0:�:I+=1:�c:�n(I,oa,1):�N=2��n(I,pa,2)
J�I=15�l%=�
T�
^
�l%=��
hI=0:�:I+=1:�c:�l%=��I=250
r�
|�l%=�:�
�o��O:N=�(2):qa=�(20)+47.5:ra=�(20)+47.5:U=�(100)/100:U+=2:V=�(100)/100:V+=2:oa=�(7):pa=�(7):W=�(2):�W=2�W=-1
�Y=�(2):�Y=2�Y=-1
�Gl=1:j=640+((�(400)-200)):m=1:v=640+((�(400)-200)):n=1:o=j:p=1:q=j:�
���m(B,sa,a):�0:�a=1�
�>�o,n:�j,l:ȏȐo,n,17:n=l:o=j:l+=qa:l-=(B*U):j+=((B*U)/3)*W
��
�	�a=2�
�>�q,p:�v,m:ȏȐq,p,17:p=m:q=v:m+=ra:m-=(B*V):v+=((B*V)/3)*Y
��
�?�a,160,47,0:�0,a:�a=1��o,n:�j,l:�7:Ȓo,n��q,p:�v,m:�7:Ȓq,p
��a=1��o(o,n)��o(q,p)
�
�B=30�
�%�O=0�7:�a=1�a(a,O,0)=j�a(a,O,0)=v
�a=1�a(a,O,1)=l�a(a,O,1)=m
�a=1�a(a,O,2)=j�a(a,O,2)=v
�a=1�a(a,O,3)=l�a(a,O,3)=m
&Aa(a,O,4)=�((100)/100)+2:a(a,O,5)=�(2):�a(a,O,5)=2�a(a,O,5)=-1
0�
:�
D�T=0�700/N:�T:�B=30�
N �0:�a=1��o,n:�j,l:ȏȐo,n,17
X�a=2��q,p:�v,m:ȏȐq,p,17
b�
l�
v2��c:l%=�:ȗx%,y%,b%:�x%<>X%�y%<>Y%�b%<>B%�l%=�
��!E<>0�!E=0:l%=�
��P�l%=�:P=�
�ȗX%,Y%,B%:�
����n(b,sa,a):�O=0�7:�0:�a(a,O,0),a(a,O,1):�a(a,O,2),a(a,O,3):a(a,O,0)=a(a,O,2):a(a,O,1)=a(a,O,3):�a=1�a(a,O,3)+=qa�a(a,O,3)+=ra
�Na(a,O,3)-=((b+20)*a(a,O,4)):a(a,O,2)+=(((b+20)*a(a,O,4))/5)*a(a,O,5):Ȏsa�
�6�1:�a,240-(16*(b-1)),240-(16*(b-1)),240-(16*(b-1))
�'�2:�a,240-(16*(b-1)),64-(4*(b-1)),0
�'�3:�a,32-(2*(b-1)),240-(16*(b-1)),0
�'�4:�a,32-(2*(b-1)),0,240-(16*(b-1))
�)�5:�a,0,240-(16*(b-1)),192-(12*(b-1))
�)�6:�a,192-(12*(b-1)),240-(16*(b-1)),0
�)�7:�a,240-(16*(b-1)),0,192-(12*(b-1))
��
@�a:�a(a,O,0),a(a,O,1):�a(a,O,2),a(a,O,3):�:�N=1��T=0�1000:�T
;�b=15��0:�O=0�7:�a(a,O,0),a(a,O,1):�a(a,O,2),a(a,O,3):�
�
 (��N:P=�:x=�:ș"Wimp_SetMode",ba%:ȗ�
*�
4���y:a%!0=r%:ș"Wimp_GetWindowState",,a%:ș"Wimp_CloseWindow",,a%:a%!0=r%:ș"Wimp_GetWindowState",,a%:ș"Wimp_OpenWindow",,a%:�
>>��o(ta,ua):�va=1�8:wa=�(14)-7:xa=�(14)-7:Ȓta+wa,ua+xa:�:�
HY��h:�a(f%,0,"#"+�f,0,1):�a(f%,1,"#"+�h,0,1):�a(f%,2,"#"+�d,0,1):�a(f%,3,"#"+�i,0,1):�
R���D:S%=�("<WimpCli$Dir>.Sprites"):ya=�#S%+16:�#S%:�n% ya:!n%=ya:n%!4=0:n%!8=16:n%!12=16:ș"OS_SpriteOp",266,n%,"<WimpCli$Dir>.Sprites":�
\$��a(o%,N%,g$,v%,za):�o%=f%�N%<4�
f#H=(i+(d*10)+(h*60)+(f*600))*100
p�
z:a%!0=o%:a%!4=N%:ș"Wimp_GetIconState",,a%:�g$,1)="!"�
�$a%!28=�g$,�(g$)-1)
��
��g$,1)="#"�
�Y$(a%+28)=�g$,�(g$)-1):�v%=0�ș"Wimp_DeleteIcon",,a%:a%!4=o%:ș"Wimp_CreateIcon",,a%+4
��
��v%<>0�
�Fș"Wimp_DeleteIcon",,a%:a%!24=v%:a%!4=o%:ș"Wimp_CreateIcon",,a%+4
��
��za=0��
�4ș"Wimp_ForceRedraw",o%,a%!8,a%!12,a%!16,a%!20:�
���L:�1,175,255,255:�1:Aa=512:G=a%:�I=0�Aa-1:G!(I*16)=�(200)/10-10:G!((I*16)+4)=�(500)/10:G!((I*16)+8)=�(100)/10-6:G!((I*16)+12)=�(200)/10+10:�:E%=G:D%=Aa-1:�P:�:�:�p%:�c:�l%:�
�
����P:�Ba=0�2�2:P%=p%:[OPT Ba:MOV10,#160:MOV10,10,LSL #2:MOV11,#0:MOV12,#0:.Ca:LDR5,[4,#0]:LDR6,[4,#4]:LDR7,[4,#8]:LDR8,[4,#12]:ADD5,5,7:ADD6,6,8,LSL #1:CMP6,#0:BLT Da:SUB8,8,#1:STR5,[4,#0]:STR6,[4,#4]:STR8,[4,#12]:ADD1,5,10:MOV2,6:MOV0,#69
	�SWI "OS_Plot":B Ea:.Da:SUB5,12,#10:MOV6,#0:ADD8,12,#10:STR5,[4,#0]:STR6,[4,#4]:STR8,[4,#12]:.Ea:ADD4,4,#16:ADD12,12,#1:CMP12,#20:MOVGE12,#0:ADD11,11,#1:CMP11,3:BLT Ca:MOV15,14: ]:�Ba:�
	G��G:A%=�"<WimpCli$Dir>.config":�y=-1��#A%,"{RIGHT,";��#A%,"{LEFT,";
	�k��#A%,"ON,";��#A%,"OFF,";
	$�s��#A%,"ON,";��#A%,"OFF,";
	.0�#A%,�f+�h+":"+�d+�i+",";:�#A%,�r+"}":�#A%:�
	8g��I:O%=a%!32:Q%=a%!36:a%!12=a%!8:a%!16=1283:h%=a%+20:$h%="This is the WimpCLI Application.":�O%=j%�
	Bv$h%="Use this window for entering * commands.|MThe main menu holds several such commands for instant use.|M":ȎQ%�
	LR�3:$h%="Enter your * command in this icon, then press Return to execute it.|M"
	VH�7:$h%="The suffix to the command should be entered in this icon.|M"
	`?�15:$h%="Select this icon to obtain help on the command.|M"
	j�
	t�
	~�O%=f%�
	�P$h%="This window contains options for controlling the screen saver.|M":ȎQ%�
	�D�24:$h%="This is the time before the screen saver is invoked.|M"
	�H�4:$h%="This icon will increase the amount of time by 10 minutes.|M"
	�F�5:$h%="This icon will increase the amount of time by 1 minute.|M"
	�H�6:$h%="This icon will increase the amount of time by 10 seconds.|M"
	�F�7:$h%="This icon will increase the amount of time by 1 second.|M"
	�H�8:$h%="This icon will decrease the amount of time by 10 minutes.|M"
	�F�9:$h%="This icon will decrease the amount of time by 1 minute.|M"
	�I�10:$h%="This icon will decrease the amount of time by 10 seconds.|M"
	�G�11:$h%="This icon will decrease the amount of time by 1 second.|M"
	�c�21:$h%="Selecting this icon will cause the Firework display to be used as the screen saver.|M"
	�i�22:$h%="Selecting this icon will cause the Water Fountain display to be used as the screen saver.|M"
a�23:$h%="Selecting this icon will cause the Walker display to be used as the screen saver.|M"

�
�
6!a%=(�$h%+25)��3:ș"Wimp_SendMessage",17,a%,a%!4:�
(D��M:�2,170,170,170:Z=385:Fa=60:w=0:X=-200:�:X+=20:�X>1280�X=-200
2ȑX,200:w+=1:�w>12�w=1
<3g=1:�p(w):�Ga=0�2000:�:g=0:�p(w):ȑ0,0:�c:�l%:�
F��p(w):Ȏw�
P	�1:�Q
Z	�2:�q
d	�3:�r
n	�4:�s
x	�5:�t
�	�6:�u
�	�7:�R
�	�8:�u
�	�9:�t
�
�10:�s
�
�11:�r
�
�12:�q
��
��
܂��Q:�(2*g):�100,175:�55,87:�0,10:�40,0:�100,300:�175,150:�(3*g):�b:�100,325:�100,175:�165,90:�200,0:�240,10:�100,300:�25,150:�
���q:�(2*g):�100,175:�70,87:�40,5:�80,0:�100,300:�150,130:�(3*g):�b:�100,325:�100,175:�150,90:�180,0:�220,5:�100,300:�50,130:�
���r:�(2*g):�100,175:�85,82:�65,2:�105,0:�100,300:�125,120:�(3*g):�b:�100,325:�100,175:�125,85:�150,0:�190,2:�100,300:�75,120:�
����s:�(2*g):�100,175:�98,80:�96,0:�136,0:�100,300:�110,115:�(3*g):�b:�100,325:�100,175:�102,85:�105,0:�145,0:�100,300:�90,115:�
���t:�(2*g):�100,175:�125,85:�150,0:�190,2:�100,300:�75,120:�(3*g):�b:�100,325:�100,175:�85,82:�65,2:�105,0:�100,300:�125,120:�
���u:�(2*g):�100,175:�150,90:�180,0:�220,5:�100,300:�50,130:�(3*g):�b:�100,325:�100,175:�70,87:�40,5:�80,0:�100,300:�150,130:�
���R:�(2*g):�100,175:�165,90:�200,0:�240,10:�100,300:�25,150:�(3*g):�b:�100,325:�100,175:�55,87:�0,10:�40,0:�100,300:�175,150:�
";��b:ȏ100,Z,Fa:ȏ140,Z+20,10:�1*g:ȏȐ170,Z+5,13:�3*g:�
�
00000000  0d 00 0a 1d f4 3e 3c 57  69 6d 70 43 6c 69 24 44  |.....><WimpCli$D|
00000010  69 72 3e 2e 21 52 75 6e  49 6d 61 67 65 0d 00 14  |ir>.!RunImage...|
00000020  1d f4 20 76 65 72 73 69  6f 6e 20 31 2e 30 31 20  |.. version 1.01 |
00000030  28 32 38 2d 30 35 2d 39  32 29 0d 00 1e 18 f4 20  |(28-05-92)..... |
00000040  a9 20 4d 61 72 6b 20 4d  61 68 69 65 75 20 31 39  |. Mark Mahieu 19|
00000050  39 32 0d 00 28 2e ee 85  f2 64 28 f6 24 2b 22 20  |92..(....d(.$+" |
00000060  28 69 6e 74 65 72 6e 61  6c 20 65 72 72 6f 72 20  |(internal error |
00000070  63 6f 64 65 20 22 2b c3  9e 2b 22 29 22 2c b9 29  |code "+..+")",.)|
00000080  0d 00 32 cb de 61 28 32  2c 37 2c 35 29 3a de 61  |..2..a(2,7,5):.a|
00000090  25 20 38 31 39 32 3a de  70 25 20 35 31 32 3a de  |% 8192:.p% 512:.|
000000a0  77 25 20 35 31 32 2c 7a  25 20 33 32 30 3a de 43  |w% 512,z% 320:.C|
000000b0  25 20 31 37 32 38 3a de  46 25 20 30 3a de 47 25  |% 1728:.F% 0:.G%|
000000c0  20 31 30 30 3a de 48 25  20 32 30 2c 49 25 20 32  | 100:.H% 20,I% 2|
000000d0  30 3a 24 48 25 3d 22 4c  65 66 74 20 6f 66 20 49  |0:$H%="Left of I|
000000e0  63 6f 6e 20 42 61 72 22  3a 24 49 25 3d 22 52 69  |con Bar":$I%="Ri|
000000f0  67 68 74 20 6f 66 20 49  63 6f 6e 20 42 61 72 22  |ght of Icon Bar"|
00000100  3a 5f 3d 33 39 39 3a 60  3d 33 39 38 3a 72 3d 32  |:_=399:`=398:r=2|
00000110  3a 73 3d b9 3a 6b 3d b9  3a c8 99 22 57 69 6d 70  |:s=.:k=.:.."Wimp|
00000120  5f 49 6e 69 74 69 61 6c  69 73 65 22 2c 32 30 30  |_Initialise",200|
00000130  2c 26 34 42 35 33 34 31  35 34 2c 22 57 69 6d 70  |,&4B534154,"Wimp|
00000140  43 4c 49 22 b8 2c 4a 25  3a f2 76 0d 00 3c d7 c8  |CLI".,J%:.v..<..|
00000150  99 22 57 69 6d 70 5f 4f  70 65 6e 54 65 6d 70 6c  |."Wimp_OpenTempl|
00000160  61 74 65 22 2c 2c 22 3c  57 69 6d 70 43 6c 69 24  |ate",,"<WimpCli$|
00000170  64 69 72 3e 2e 54 65 6d  70 6c 61 74 65 73 22 3a  |dir>.Templates":|
00000180  c8 99 22 57 69 6d 70 5f  4c 6f 61 64 54 65 6d 70  |.."Wimp_LoadTemp|
00000190  6c 61 74 65 22 2c 2c 61  25 2c 77 25 2c 77 25 2b  |late",,a%,w%,w%+|
000001a0  35 31 32 2c 2d 31 2c 22  6d 61 69 6e 22 2c 30 3a  |512,-1,"main",0:|
000001b0  c8 99 22 57 69 6d 70 5f  43 72 65 61 74 65 57 69  |.."Wimp_CreateWi|
000001c0  6e 64 6f 77 22 2c 2c 61  25 b8 6a 25 3a c8 99 22  |ndow",,a%.j%:.."|
000001d0  57 69 6d 70 5f 4c 6f 61  64 54 65 6d 70 6c 61 74  |Wimp_LoadTemplat|
000001e0  65 22 2c 2c 61 25 2c 7a  25 2c 7a 25 2b 33 32 30  |e",,a%,z%,z%+320|
000001f0  2c 2d 31 2c 22 69 6e 66  6f 22 2c 30 3a 61 25 21  |,-1,"info",0:a%!|
00000200  36 34 3d 6e 25 3a c8 99  22 57 69 6d 70 5f 43 72  |64=n%:.."Wimp_Cr|
00000210  65 61 74 65 57 69 6e 64  6f 77 22 2c 2c 61 25 b8  |eateWindow",,a%.|
00000220  52 25 0d 00 46 db c8 99  22 57 69 6d 70 5f 4c 6f  |R%..F..."Wimp_Lo|
00000230  61 64 54 65 6d 70 6c 61  74 65 22 2c 2c 61 25 2c  |adTemplate",,a%,|
00000240  46 25 2c 46 25 2b 30 2c  2d 31 2c 22 68 6f 74 6b  |F%,F%+0,-1,"hotk|
00000250  65 79 73 22 2c 30 3a 61  25 21 30 3d 2d 31 30 30  |eys",0:a%!0=-100|
00000260  30 30 3a 61 25 21 38 3d  2d 31 30 31 30 30 3a c8  |00:a%!8=-10100:.|
00000270  99 22 57 69 6d 70 5f 43  72 65 61 74 65 57 69 6e  |."Wimp_CreateWin|
00000280  64 6f 77 22 2c 2c 61 25  b8 72 25 3a c8 99 22 57  |dow",,a%.r%:.."W|
00000290  69 6d 70 5f 4c 6f 61 64  54 65 6d 70 6c 61 74 65  |imp_LoadTemplate|
000002a0  22 2c 2c 61 25 2c 47 25  2c 47 25 2b 31 30 30 2c  |",,a%,G%,G%+100,|
000002b0  2d 31 2c 22 73 61 76 65  72 73 22 2c 30 3a 61 25  |-1,"savers",0:a%|
000002c0  21 36 34 3d 6e 25 3a c8  99 22 57 69 6d 70 5f 43  |!64=n%:.."Wimp_C|
000002d0  72 65 61 74 65 57 69 6e  64 6f 77 22 2c 2c 61 25  |reateWindow",,a%|
000002e0  b8 66 25 3a c8 99 22 57  69 6d 70 5f 43 6c 6f 73  |.f%:.."Wimp_Clos|
000002f0  65 54 65 6d 70 6c 61 74  65 22 3a f2 68 0d 00 50  |eTemplate":.h..P|
00000300  e5 21 61 25 3d 6a 25 3a  61 25 21 34 3d 33 3a c8  |.!a%=j%:a%!4=3:.|
00000310  99 22 57 69 6d 70 5f 47  65 74 49 63 6f 6e 53 74  |."Wimp_GetIconSt|
00000320  61 74 65 22 2c 2c 61 25  3a 43 3d 61 25 21 32 38  |ate",,a%:C=a%!28|
00000330  3a 21 61 25 3d 6a 25 3a  61 25 21 34 3d 37 3a c8  |:!a%=j%:a%!4=7:.|
00000340  99 22 57 69 6d 70 5f 47  65 74 49 63 6f 6e 53 74  |."Wimp_GetIconSt|
00000350  61 74 65 22 2c 2c 61 25  3a 44 3d 61 25 21 32 38  |ate",,a%:D=a%!28|
00000360  3a 61 25 21 31 36 3d 32  30 2b 61 61 3a 61 25 21  |:a%!16=20+aa:a%!|
00000370  31 32 3d 66 25 3a f2 65  28 61 25 21 31 36 29 3a  |12=f%:.e(a%!16):|
00000380  61 25 21 30 3d 72 25 3a  c8 99 22 57 69 6d 70 5f  |a%!0=r%:.."Wimp_|
00000390  47 65 74 57 69 6e 64 6f  77 53 74 61 74 65 22 2c  |GetWindowState",|
000003a0  2c 61 25 3a c8 99 22 57  69 6d 70 5f 4f 70 65 6e  |,a%:.."Wimp_Open|
000003b0  57 69 6e 64 6f 77 22 2c  2c 61 25 3a f2 77 3a 54  |Window",,a%:.w:T|
000003c0  25 3d 30 3a 73 25 3d a3  3a 78 3d 91 3a c8 97 58  |%=0:s%=.:x=.:..X|
000003d0  25 2c 59 25 2c 42 25 3a  48 3d 36 30 30 30 3a 50  |%,Y%,B%:H=6000:P|
000003e0  3d b9 0d 00 5a 0e ee 85  f2 64 28 f6 24 2c a3 29  |=...Z....d(.$,.)|
000003f0  0d 00 64 0f f5 3a f2 78  3a fd 73 25 3a f2 66 0d  |..d..:.x:.s%:.f.|
00000400  00 6e 2c dd f2 78 3a f2  79 3a c8 99 22 57 69 6d  |.n,..x:.y:.."Wim|
00000410  70 5f 50 6f 6c 6c 22 2c  54 25 2c 61 25 b8 55 25  |p_Poll",T%,a%.U%|
00000420  3a 62 61 3d b9 3a c8 8e  55 25 ca 0d 00 78 1e c9  |:ba=.:..U%...x..|
00000430  32 3a c8 99 22 57 69 6d  70 5f 4f 70 65 6e 57 69  |2:.."Wimp_OpenWi|
00000440  6e 64 6f 77 22 2c 2c 61  25 0d 00 82 1f c9 33 3a  |ndow",,a%.....3:|
00000450  c8 99 22 57 69 6d 70 5f  43 6c 6f 73 65 57 69 6e  |.."Wimp_CloseWin|
00000460  64 6f 77 22 2c 2c 61 25  0d 00 8c 10 c9 36 3a f2  |dow",,a%.....6:.|
00000470  65 28 61 25 21 31 36 29  0d 00 96 19 c9 38 3a f2  |e(a%!16).....8:.|
00000480  7a 28 21 61 25 2c 61 25  21 32 34 29 3a 62 61 3d  |z(!a%,a%!24):ba=|
00000490  a3 0d 00 a0 09 c9 39 3a  f2 41 0d 00 aa 0d c9 31  |......9:.A.....1|
000004a0  37 2c 31 38 3a f2 42 0d  00 b4 05 cb 0d 00 be 0c  |7,18:.B.........|
000004b0  e7 73 80 62 61 8c f2 43  0d 00 c8 05 e1 0d 00 d2  |.s.ba..C........|
000004c0  0c dd f2 66 3a e7 63 61  8c 0d 00 dc 2e c8 99 22  |...f:.ca......."|
000004d0  4f 53 5f 52 65 6c 65 61  73 65 22 2c 32 30 2c 64  |OS_Release",20,d|
000004e0  61 2c 31 3a c8 99 22 4f  53 5f 4d 6f 64 75 6c 65  |a,1:.."OS_Module|
000004f0  22 2c 37 2c 2c 71 25 0d  00 e6 05 cd 0d 00 f0 30  |",7,,q%........0|
00000500  24 61 25 3d 22 54 41 53  4b 22 3a c8 99 22 57 69  |$a%="TASK":.."Wi|
00000510  6d 70 5f 43 6c 6f 73 65  44 6f 77 6e 22 2c 4a 25  |mp_CloseDown",J%|
00000520  2c 26 34 42 35 33 34 31  35 34 3a e0 0d 00 fa 04  |,&4B534154:.....|
00000530  0d 01 04 5c dd f2 64 28  72 24 2c 56 25 29 3a c8  |...\..d(r$,V%):.|
00000540  99 22 57 69 6d 70 5f 44  72 61 67 42 6f 78 22 2c  |."Wimp_DragBox",|
00000550  2c 30 3a 21 61 25 3d 9e  3a 24 28 61 25 2b 34 29  |,0:!a%=.:$(a%+4)|
00000560  3d 72 24 3a c8 99 22 57  69 6d 70 5f 52 65 70 6f  |=r$:.."Wimp_Repo|
00000570  72 74 45 72 72 6f 72 22  2c 61 25 2c 31 2c 22 57  |rtError",a%,1,"W|
00000580  69 6d 70 43 4c 49 22 3a  e7 56 25 8c 0d 01 0e 23  |impCLI":.V%....#|
00000590  c8 99 22 57 69 6d 70 5f  43 6c 6f 73 65 44 6f 77  |.."Wimp_CloseDow|
000005a0  6e 22 2c 4a 25 2c 26 34  42 35 33 34 31 35 34 0d  |n",J%,&4B534154.|
000005b0  01 18 05 cd 0d 01 22 05  e1 0d 01 2c 04 0d 01 36  |......"....,...6|
000005c0  5a dd f2 76 3a c8 99 22  4f 53 5f 4d 6f 64 75 6c  |Z..v:.."OS_Modul|
000005d0  65 22 2c 36 2c 2c 2c 31  36 b8 2c 2c 71 25 3a e7  |e",6,,,16.,,q%:.|
000005e0  71 25 3c 32 35 31 36 35  38 32 34 8c f2 64 28 22  |q%<25165824..d("|
000005f0  4e 6f 20 72 6f 6f 6d 20  69 6e 20 52 4d 41 22 29  |No room in RMA")|
00000600  3a c8 99 22 4f 53 5f 4d  6f 64 75 6c 65 22 2c 37  |:.."OS_Module",7|
00000610  2c 2c 71 25 3a f2 66 0d  01 40 ca e3 57 25 3d 30  |,,q%:.f..@..W%=0|
00000620  b8 32 88 32 3a 50 25 3d  71 25 3a 5b 4f 50 54 20  |.2.2:P%=q%:[OPT |
00000630  57 25 3a 2e 64 61 3a 43  4d 50 31 32 2c 23 31 3a  |W%:.da:CMP12,#1:|
00000640  53 54 52 45 51 30 2c 45  3a 4d 4f 56 20 50 43 2c  |STREQ0,E:MOV PC,|
00000650  31 34 3a 2e 45 3a 45 51  55 44 30 3a 20 5d 3a ed  |14:.E:EQUD0: ]:.|
00000660  3a c8 99 22 4f 53 5f 43  6c 61 69 6d 22 2c 32 30  |:.."OS_Claim",20|
00000670  2c 64 61 2c 31 3a 74 25  3d 30 3a 63 61 3d b9 3a  |,da,1:t%=0:ca=.:|
00000680  4b 3d 30 3a 65 3d 30 3a  41 25 3d 8e 22 3c 57 69  |K=0:e=0:A%=."<Wi|
00000690  6d 70 43 6c 69 24 64 69  72 3e 2e 63 6f 6e 66 69  |mpCli$dir>.confi|
000006a0  67 22 3a f2 69 28 22 7b  22 29 3a 66 24 3d 22 22  |g":.i("{"):f$=""|
000006b0  3a f5 3a 66 24 2b 3d bd  28 9a 23 41 25 29 3a fd  |:.:f$+=.(.#A%):.|
000006c0  c2 66 24 29 3d 22 2c 22  3a e7 c0 66 24 2c 34 29  |.f$)=",":..f$,4)|
000006d0  3d 22 4c 45 46 54 22 8c  79 3d 2d 32 8b 79 3d 2d  |="LEFT".y=-2.y=-|
000006e0  31 0d 01 4a e2 6a 24 3d  22 22 3a f5 3a 6a 24 2b  |1..J.j$="":.:j$+|
000006f0  3d bd 28 9a 23 41 25 29  3a fd c2 6a 24 29 3d 22  |=.(.#A%):..j$)="|
00000700  2c 22 3a 66 24 3d 22 22  3a f5 3a 66 24 2b 3d bd  |,":f$="":.:f$+=.|
00000710  28 9a 23 41 25 29 3a fd  c2 66 24 29 3d 22 2c 22  |(.#A%):..f$)=","|
00000720  3a 64 24 3d 22 22 3a f5  3a 64 24 2b 3d bd 28 9a  |:d$="":.:d$+=.(.|
00000730  23 41 25 29 3a fd c2 64  24 29 3d 22 2c 22 3a 61  |#A%):..d$)=",":a|
00000740  61 3d a0 28 bd 28 9a 23  41 25 29 29 3a 64 24 3d  |a=.(.(.#A%)):d$=|
00000750  c0 64 24 2c a9 28 64 24  29 2d 31 29 3a 66 3d a0  |.d$,.(d$)-1):f=.|
00000760  28 c0 c2 64 24 2c 35 29  2c 31 29 29 3a 68 3d a0  |(..d$,5),1)):h=.|
00000770  28 c0 c2 64 24 2c 34 29  2c 31 29 29 3a 64 3d a0  |(..d$,4),1)):d=.|
00000780  28 c0 c2 64 24 2c 32 29  2c 31 29 29 3a 69 3d a0  |(..d$,2),1)):i=.|
00000790  28 c0 c2 64 24 2c 31 29  2c 31 29 29 3a d9 23 41  |(..d$,1),1)):.#A|
000007a0  25 3a 41 25 3d 8e 22 3c  57 69 6d 70 43 6c 69 24  |%:A%=."<WimpCli$|
000007b0  64 69 72 3e 2e 6d 65 6e  75 73 22 3a 65 61 3d a2  |dir>.menus":ea=.|
000007c0  23 41 25 0d 01 54 1f 7a  3d 30 3a e3 4a 3d 31 b8  |#A%..T.z=0:.J=1.|
000007d0  65 61 3a e7 9a 23 41 25  3d 97 22 7b 22 8c 7a 2b  |ea:..#A%=."{".z+|
000007e0  3d 31 0d 01 5e 12 ed 3a  d9 23 41 25 3a f2 67 3a  |=1..^..:.#A%:.g:|
000007f0  f2 44 3a e1 0d 01 68 6b  dd f2 67 3a 61 25 21 30  |.D:...hk..g:a%!0|
00000800  3d 79 3a 61 25 21 34 3d  30 3a 61 25 21 38 3d 30  |=y:a%!4=0:a%!8=0|
00000810  3a 61 25 21 31 32 3d 36  38 3a 61 25 21 31 36 3d  |:a%!12=68:a%!16=|
00000820  36 38 3a 61 25 21 32 30  3d 31 32 32 39 30 3a 24  |68:a%!20=12290:$|
00000830  28 61 25 2b 32 34 29 3d  22 21 57 69 6d 70 43 4c  |(a%+24)="!WimpCL|
00000840  49 22 3a c8 99 22 57 69  6d 70 5f 43 72 65 61 74  |I":.."Wimp_Creat|
00000850  65 49 63 6f 6e 22 2c 2c  61 25 b8 4b 25 3a e1 0d  |eIcon",,a%.K%:..|
00000860  01 72 49 dd f2 6a 28 5a  25 29 3a 61 25 21 30 3d  |.rI..j(Z%):a%!0=|
00000870  5a 25 3a c8 99 22 57 69  6d 70 5f 47 65 74 57 69  |Z%:.."Wimp_GetWi|
00000880  6e 64 6f 77 53 74 61 74  65 22 2c 2c 61 25 3a c8  |ndowState",,a%:.|
00000890  99 22 57 69 6d 70 5f 4f  70 65 6e 57 69 6e 64 6f  |."Wimp_OpenWindo|
000008a0  77 22 2c 2c 61 25 3a e1  0d 01 7c 16 dd f2 65 28  |w",,a%:...|...e(|
000008b0  6b 25 29 3a e7 6b 25 3c  32 8c 4b 3d 6b 25 0d 01  |k%):.k%<2.K=k%..|
000008c0  86 10 e7 61 25 21 38 3d  32 8c f2 6b 3a e1 0d 01  |...a%!8=2..k:...|
000008d0  90 16 e7 61 25 21 31 32  3d 6a 25 80 6b 25 3d 31  |...a%!12=j%.k%=1|
000008e0  35 8c f2 45 0d 01 9a 1b  e7 61 25 21 31 32 3d 2d  |5..E.....a%!12=-|
000008f0  32 80 61 25 21 38 3d 34  8c f2 6a 28 6a 25 29 0d  |2.a%!8=4..j(j%).|
00000900  01 a4 17 e7 61 25 21 31  32 3d 2d 32 80 61 25 21  |....a%!12=-2.a%!|
00000910  38 3d 31 8c f2 6c 0d 01  ae 0e e7 61 25 21 31 32  |8=1..l.....a%!12|
00000920  3d 66 25 8c 0d 01 b8 26  e7 6b 25 3d 34 80 66 3c  |=f%....&.k%=4.f<|
00000930  39 8c 66 2b 3d 31 3a f2  61 28 66 25 2c 30 2c 22  |9.f+=1:.a(f%,0,"|
00000940  23 22 2b c3 66 2c 30 2c  31 29 0d 01 c2 26 e7 6b  |#"+.f,0,1)...&.k|
00000950  25 3d 38 80 66 3e 30 8c  66 2d 3d 31 3a f2 61 28  |%=8.f>0.f-=1:.a(|
00000960  66 25 2c 30 2c 22 23 22  2b c3 66 2c 30 2c 31 29  |f%,0,"#"+.f,0,1)|
00000970  0d 01 cc 26 e7 6b 25 3d  35 80 68 3c 39 8c 68 2b  |...&.k%=5.h<9.h+|
00000980  3d 31 3a f2 61 28 66 25  2c 31 2c 22 23 22 2b c3  |=1:.a(f%,1,"#"+.|
00000990  68 2c 30 2c 31 29 0d 01  d6 26 e7 6b 25 3d 39 80  |h,0,1)...&.k%=9.|
000009a0  68 3e 30 8c 68 2d 3d 31  3a f2 61 28 66 25 2c 31  |h>0.h-=1:.a(f%,1|
000009b0  2c 22 23 22 2b c3 68 2c  30 2c 31 29 0d 01 e0 26  |,"#"+.h,0,1)...&|
000009c0  e7 6b 25 3d 36 80 64 3c  35 8c 64 2b 3d 31 3a f2  |.k%=6.d<5.d+=1:.|
000009d0  61 28 66 25 2c 32 2c 22  23 22 2b c3 64 2c 30 2c  |a(f%,2,"#"+.d,0,|
000009e0  31 29 0d 01 ea 27 e7 6b  25 3d 31 30 80 64 3e 30  |1)...'.k%=10.d>0|
000009f0  8c 64 2d 3d 31 3a f2 61  28 66 25 2c 32 2c 22 23  |.d-=1:.a(f%,2,"#|
00000a00  22 2b c3 64 2c 30 2c 31  29 0d 01 f4 26 e7 6b 25  |"+.d,0,1)...&.k%|
00000a10  3d 37 80 69 3c 39 8c 69  2b 3d 31 3a f2 61 28 66  |=7.i<9.i+=1:.a(f|
00000a20  25 2c 33 2c 22 23 22 2b  c3 69 2c 30 2c 31 29 0d  |%,3,"#"+.i,0,1).|
00000a30  01 fe 27 e7 6b 25 3d 31  31 80 69 3e 30 8c 69 2d  |..'.k%=11.i>0.i-|
00000a40  3d 31 3a f2 61 28 66 25  2c 33 2c 22 23 22 2b c3  |=1:.a(f%,3,"#"+.|
00000a50  69 2c 30 2c 31 29 0d 02  08 19 e7 48 3c 31 30 30  |i,0,1).....H<100|
00000a60  80 48 3c 3e 2d 35 30 30  8c 64 3d 33 3a f2 68 0d  |.H<>-500.d=3:.h.|
00000a70  02 12 11 e7 6b 25 3e 32  30 80 6b 25 3c 32 34 8c  |....k%>20.k%<24.|
00000a80  0d 02 1c 3f f2 61 28 66  25 2c 32 30 2b 72 2c 22  |...?.a(f%,20+r,"|
00000a90  22 2c 33 38 35 39 30 30  38 35 37 2c 31 29 3a 72  |",385900857,1):r|
00000aa0  3d 6b 25 2d 32 30 3a f2  61 28 66 25 2c 6b 25 2c  |=k%-20:.a(f%,k%,|
00000ab0  22 22 2c 26 37 30 30 30  36 31 33 39 2c 31 29 0d  |"",&70006139,1).|
00000ac0  02 26 05 cd 0d 02 30 05  cd 0d 02 3a 05 e1 0d 02  |.&....0....:....|
00000ad0  44 41 dd f2 6b 3a 74 25  3d 61 25 21 31 32 3a e7  |DA..k:t%=a%!12:.|
00000ae0  61 25 21 31 32 3d 6a 25  c8 99 22 57 69 6d 70 5f  |a%!12=j%.."Wimp_|
00000af0  43 72 65 61 74 65 4d 65  6e 75 22 2c 2c 4c 25 2c  |CreateMenu",,L%,|
00000b00  61 25 21 30 2d 36 34 2c  61 25 21 34 2b 31 36 0d  |a%!0-64,a%!4+16.|
00000b10  02 4e 30 e7 61 25 21 31  32 3d 2d 32 c8 99 22 57  |.N0.a%!12=-2.."W|
00000b20  69 6d 70 5f 43 72 65 61  74 65 4d 65 6e 75 22 2c  |imp_CreateMenu",|
00000b30  2c 5f 25 2c 61 25 21 30  2d 36 34 2c 32 37 32 0d  |,_%,a%!0-64,272.|
00000b40  02 58 05 e1 0d 02 62 d2  dd f2 77 3a de 63 25 20  |.X....b...w:.c% |
00000b50  32 30 30 2c 67 25 20 31  30 30 2c 64 25 20 31 30  |200,g% 100,d% 10|
00000b60  30 3a 60 25 3d 67 25 3a  61 61 25 3d 64 25 3a 5f  |0:`%=g%:aa%=d%:_|
00000b70  25 3d 63 25 3a 24 63 25  3d 22 57 69 6d 70 43 4c  |%=c%:$c%="WimpCL|
00000b80  49 22 3a 63 25 21 31 32  3d 34 35 39 32 37 31 3a  |I":c%!12=459271:|
00000b90  63 25 21 31 36 3d 32 32  34 3a 63 25 21 32 30 3d  |c%!16=224:c%!20=|
00000ba0  34 34 3a 63 25 21 32 34  3d 30 3a 63 25 2b 3d 32  |44:c%!24=0:c%+=2|
00000bb0  38 3a 63 25 21 30 3d 30  3a 63 25 21 34 3d 60 25  |8:c%!0=0:c%!4=`%|
00000bc0  3a 63 25 21 38 3d 26 37  30 30 30 30 32 31 3a 24  |:c%!8=&7000021:$|
00000bd0  28 63 25 2b 31 32 29 3d  22 4d 69 73 63 22 3a 63  |(c%+12)="Misc":c|
00000be0  25 21 32 34 3d 31 3a 63  25 21 32 38 3d 66 25 3a  |%!24=1:c%!28=f%:|
00000bf0  63 25 21 33 32 3d 26 37  30 30 30 30 32 31 3a 24  |c%!32=&7000021:$|
00000c00  28 63 25 2b 33 36 29 3d  22 53 63 72 65 65 6e 20  |(c%+36)="Screen |
00000c10  73 61 76 65 72 22 0d 02  6c da 63 25 21 34 38 3d  |saver"..l.c%!48=|
00000c20  31 3a 63 25 21 35 32 3d  2d 31 3a 63 25 21 35 36  |1:c%!52=-1:c%!56|
00000c30  3d 26 37 30 30 30 30 32  31 3a 24 28 63 25 2b 36  |=&7000021:$(c%+6|
00000c40  30 29 3d 22 46 31 32 20  52 65 70 6c 61 63 65 22  |0)="F12 Replace"|
00000c50  3a 63 25 21 37 32 3d 31  32 38 3a 63 25 21 37 36  |:c%!72=128:c%!76|
00000c60  3d 2d 31 3a 63 25 21 38  30 3d 26 37 30 30 30 30  |=-1:c%!80=&70000|
00000c70  32 31 3a 24 28 63 25 2b  38 34 29 3d 22 51 75 69  |21:$(c%+84)="Qui|
00000c80  74 22 3a 24 67 25 3d 22  4d 69 73 63 22 3a 67 25  |t":$g%="Misc":g%|
00000c90  21 31 32 3d 34 35 39 32  37 31 3a 67 25 21 31 36  |!12=459271:g%!16|
00000ca0  3d 32 32 34 3a 67 25 21  32 30 3d 34 34 3a 67 25  |=224:g%!20=44:g%|
00000cb0  21 32 34 3d 30 3a 67 25  2b 3d 32 38 3a 67 25 21  |!24=0:g%+=28:g%!|
00000cc0  30 3d 30 3a 67 25 21 34  3d 52 25 3a 67 25 21 38  |0=0:g%!4=R%:g%!8|
00000cd0  3d 26 37 30 30 30 30 32  31 3a 24 28 67 25 2b 31  |=&7000021:$(g%+1|
00000ce0  32 29 3d 22 49 6e 66 6f  72 6d 61 74 69 6f 6e 22  |2)="Information"|
00000cf0  0d 02 76 e0 67 25 21 32  34 3d 30 3a 67 25 21 32  |..v.g%!24=0:g%!2|
00000d00  38 3d 61 61 25 3a 67 25  21 33 32 3d 26 37 30 30  |8=aa%:g%!32=&700|
00000d10  30 30 32 31 3a 24 28 67  25 2b 33 36 29 3d 22 49  |0021:$(g%+36)="I|
00000d20  63 6f 6e 22 3a 67 25 21  34 38 3d 31 32 38 3a 67  |con":g%!48=128:g|
00000d30  25 21 35 32 3d 2d 31 3a  67 25 21 35 36 3d 26 37  |%!52=-1:g%!56=&7|
00000d40  30 30 30 30 32 31 3a 24  28 67 25 2b 36 30 29 3d  |000021:$(g%+60)=|
00000d50  22 53 61 76 65 20 4f 70  74 69 6f 6e 73 22 3a 24  |"Save Options":$|
00000d60  64 25 3d 22 49 63 6f 6e  22 3a 64 25 21 31 32 3d  |d%="Icon":d%!12=|
00000d70  34 35 39 32 37 31 3a 64  25 21 31 36 3d 33 30 34  |459271:d%!16=304|
00000d80  3a 64 25 21 32 30 3d 34  34 3a 64 25 21 32 34 3d  |:d%!20=44:d%!24=|
00000d90  30 3a 64 25 2b 3d 32 38  3a 64 25 21 30 3d 30 3a  |0:d%+=28:d%!0=0:|
00000da0  64 25 21 34 3d 2d 31 3a  64 25 21 38 3d 26 37 30  |d%!4=-1:d%!8=&70|
00000db0  30 30 31 32 31 3a 64 25  21 31 32 3d 48 25 3a 64  |00121:d%!12=H%:d|
00000dc0  25 21 31 36 3d 2d 31 3a  64 25 21 32 30 3d 31 37  |%!16=-1:d%!20=17|
00000dd0  0d 02 80 57 64 25 21 32  34 3d 31 32 38 3a 64 25  |...Wd%!24=128:d%|
00000de0  21 32 38 3d 2d 31 3a 64  25 21 33 32 3d 26 37 30  |!28=-1:d%!32=&70|
00000df0  30 30 31 32 31 3a 64 25  21 33 36 3d 49 25 3a 64  |00121:d%!36=I%:d|
00000e00  25 21 34 30 3d 2d 31 3a  64 25 21 34 34 3d 31 38  |%!40=-1:d%!44=18|
00000e10  3a e7 79 3d 2d 32 8c 64  25 21 30 3d 31 8b 64 25  |:.y=-2.d%!0=1.d%|
00000e20  21 32 34 3d 31 32 39 0d  02 8a 28 e7 c0 66 24 2c  |!24=129...(..f$,|
00000e30  32 29 3d 22 4f 4e 22 8c  73 3d b9 3a 63 25 21 32  |2)="ON".s=.:c%!2|
00000e40  34 3d 31 8b 73 3d a3 3a  63 25 21 32 34 3d 30 0d  |4=1.s=.:c%!24=0.|
00000e50  02 94 28 e7 c0 6a 24 2c  32 29 3d 22 4f 4e 22 8c  |..(..j$,2)="ON".|
00000e60  6b 3d b9 3a 63 25 21 34  38 3d 31 8b 6b 3d a3 3a  |k=.:c%!48=1.k=.:|
00000e70  63 25 21 34 38 3d 30 0d  02 9e 08 f2 46 3a e1 0d  |c%!48=0.....F:..|
00000e80  02 a8 29 dd f2 41 3a 61  25 21 31 32 3d 74 25 3a  |..)..A:a%!12=t%:|
00000e90  e7 61 25 21 30 3d 33 80  61 25 21 31 32 3d 2d 32  |.a%!0=3.a%!12=-2|
00000ea0  8c 73 25 3d b9 3a f2 66  0d 02 b2 15 e7 61 25 21  |.s%=.:.f.....a%!|
00000eb0  30 3d 32 80 61 25 21 31  32 3d 2d 32 8c 0d 02 bc  |0=2.a%!12=-2....|
00000ec0  20 e7 6b 3d b9 8c 6b 3d  a3 3a 63 25 21 34 38 3d  | .k=..k=.:c%!48=|
00000ed0  30 8b 6b 3d b9 3a 63 25  21 34 38 3d 31 0d 02 c6  |0.k=.:c%!48=1...|
00000ee0  05 cd 0d 02 d0 15 e7 61  25 21 30 3d 31 80 61 25  |.......a%!0=1.a%|
00000ef0  21 31 32 3d 2d 32 8c 0d  02 da 24 e7 73 3d b9 8c  |!12=-2....$.s=..|
00000f00  73 3d a3 3a 63 25 21 32  34 3d 30 8b 73 3d b9 3a  |s=.:c%!24=0.s=.:|
00000f10  63 25 21 32 34 3d 31 3a  78 3d 91 0d 02 e4 05 cd  |c%!24=1:x=......|
00000f20  0d 02 ee 15 e7 61 25 21  31 32 3d 2d 32 80 61 25  |.....a%!12=-2.a%|
00000f30  21 30 3d 30 8c 0d 02 f8  0e e7 61 25 21 34 3d 32  |!0=0......a%!4=2|
00000f40  8c f2 47 0d 03 02 5b e7  61 25 21 34 3d 31 80 61  |..G...[.a%!4=1.a|
00000f50  25 21 38 3d 30 8c 79 3d  2d 32 3a 64 25 21 30 3d  |%!8=0.y=-2:d%!0=|
00000f60  31 3a 64 25 21 32 34 3d  31 32 38 3a 21 61 25 3d  |1:d%!24=128:!a%=|
00000f70  2d 32 3a 61 25 21 34 3d  4b 25 3a c8 99 22 57 69  |-2:a%!4=K%:.."Wi|
00000f80  6d 70 5f 44 65 6c 65 74  65 49 63 6f 6e 22 2c 2c  |mp_DeleteIcon",,|
00000f90  61 25 3a f2 67 3a 61 25  21 31 32 3d 2d 32 0d 03  |a%:.g:a%!12=-2..|
00000fa0  0c 5b e7 61 25 21 34 3d  31 80 61 25 21 38 3d 31  |.[.a%!4=1.a%!8=1|
00000fb0  8c 79 3d 2d 31 3a 64 25  21 30 3d 30 3a 64 25 21  |.y=-1:d%!0=0:d%!|
00000fc0  32 34 3d 31 32 39 3a 21  61 25 3d 2d 32 3a 61 25  |24=129:!a%=-2:a%|
00000fd0  21 34 3d 4b 25 3a c8 99  22 57 69 6d 70 5f 44 65  |!4=K%:.."Wimp_De|
00000fe0  6c 65 74 65 49 63 6f 6e  22 2c 2c 61 25 3a f2 67  |leteIcon",,a%:.g|
00000ff0  3a 61 25 21 31 32 3d 2d  32 0d 03 16 05 cd 0d 03  |:a%!12=-2.......|
00001000  20 0f e7 61 25 21 31 32  3c 3e 2d 32 8c 0d 03 2a  | ..a%!12<>-2...*|
00001010  39 c8 99 22 57 69 6d 70  5f 44 65 63 6f 64 65 4d  |9.."Wimp_DecodeM|
00001020  65 6e 75 22 2c 2c 4c 25  2c 61 25 2c 70 25 3a 68  |enu",,L%,a%,p%:h|
00001030  24 3d 24 70 25 3a 51 3d  a7 68 24 2c 22 2e 22 29  |$=$p%:Q=.h$,".")|
00001040  3a e7 51 3e 30 8c 0d 03  34 1f 6b 24 3d c0 68 24  |:.Q>0...4.k$=.h$|
00001050  2c 51 2d 31 29 3a 6c 24  3d c2 68 24 2c a9 28 68  |,Q-1):l$=.h$,.(h|
00001060  24 29 2d 51 29 0d 03 3e  11 cc 3a 6b 24 3d 68 24  |$)-Q)..>..:k$=h$|
00001070  3a 6c 24 3d 22 22 0d 03  48 05 cd 0d 03 52 55 f2  |:l$=""..H....RU.|
00001080  61 28 6a 25 2c 33 2c 22  21 22 2b 6b 24 2c 30 2c  |a(j%,3,"!"+k$,0,|
00001090  31 29 3a f2 61 28 6a 25  2c 37 2c 22 21 22 2b 6c  |1):.a(j%,7,"!"+l|
000010a0  24 2c 30 2c 31 29 3a c8  99 22 57 69 6d 70 5f 53  |$,0,1):.."Wimp_S|
000010b0  65 74 43 61 72 65 74 50  6f 73 69 74 69 6f 6e 22  |etCaretPosition"|
000010c0  2c 6a 25 2c 33 2c 2c 2c  2d 31 2c a9 28 6b 24 29  |,j%,3,,,-1,.(k$)|
000010d0  0d 03 5c 05 cd 0d 03 66  28 c8 99 22 57 69 6d 70  |..\....f(.."Wimp|
000010e0  5f 47 65 74 50 6f 69 6e  74 65 72 49 6e 66 6f 22  |_GetPointerInfo"|
000010f0  2c 2c 61 25 3a e7 61 25  21 38 3d 31 8c 0d 03 70  |,,a%:.a%!8=1...p|
00001100  0f 61 25 21 31 32 3d 74  25 3a f2 6b 0d 03 7a 05  |.a%!12=t%:.k..z.|
00001110  cd 0d 03 84 05 e1 0d 03  8e 17 dd f2 42 3a e7 61  |............B:.a|
00001120  25 21 31 36 3d 30 8c 73  25 3d b9 3a e1 0d 03 98  |%!16=0.s%=.:....|
00001130  0c c8 8e 61 25 21 31 36  ca 0d 03 a2 1d c9 33 3a  |...a%!16......3:|
00001140  e7 61 25 21 31 32 3d 30  8c f2 48 28 a4 62 28 61  |.a%!12=0..H(.b(a|
00001150  25 2b 34 34 29 29 0d 03  ac 0c c9 31 32 38 32 3a  |%+44)).....1282:|
00001160  f2 49 0d 03 b6 05 cb 0d  03 c0 05 e1 0d 03 ca 30  |.I.............0|
00001170  dd a4 62 28 75 25 29 3a  6f 24 3d 22 22 3a f5 3a  |..b(u%):o$="":.:|
00001180  6f 24 2b 3d bd 28 3f 75  25 29 3a 75 25 2b 3d 31  |o$+=.(?u%):u%+=1|
00001190  3a fd 3f 75 25 3c 33 32  3a 3d 6f 24 0d 03 d4 26  |:.?u%<32:=o$...&|
000011a0  dd f2 7a 28 4d 25 2c 6d  25 29 3a 78 3d 91 3a e7  |..z(M%,m%):x=.:.|
000011b0  4d 25 3d 6a 25 80 28 6d  25 3d 5f 84 6d 25 3d 60  |M%=j%.(m%=_.m%=`|
000011c0  29 8c 0d 03 de 18 e7 4b  3d 30 8c 65 3d 31 3a 4b  |)......K=0.e=1:K|
000011d0  3d 31 8b 65 3d 30 3a 4b  3d 30 0d 03 e8 10 e7 65  |=1.e=0:K=0.....e|
000011e0  3d 30 8c 52 3d a9 28 24  43 29 0d 03 f2 10 e7 65  |=0.R=.($C).....e|
000011f0  3d 31 8c 52 3d a9 28 24  44 29 0d 03 fc 39 e7 65  |=1.R=.($D)...9.e|
00001200  3d 31 80 6d 25 3d 60 8c  c8 99 22 57 69 6d 70 5f  |=1.m%=`..."Wimp_|
00001210  53 65 74 43 61 72 65 74  50 6f 73 69 74 69 6f 6e  |SetCaretPosition|
00001220  22 2c 6a 25 2c 28 34 2a  65 29 2b 33 2c 2c 2c 2d  |",j%,(4*e)+3,,,-|
00001230  31 2c 52 0d 04 06 39 e7  65 3d 30 80 6d 25 3d 5f  |1,R...9.e=0.m%=_|
00001240  8c c8 99 22 57 69 6d 70  5f 53 65 74 43 61 72 65  |..."Wimp_SetCare|
00001250  74 50 6f 73 69 74 69 6f  6e 22 2c 6a 25 2c 28 34  |tPosition",j%,(4|
00001260  2a 65 29 2b 33 2c 2c 2c  2d 31 2c 52 0d 04 10 05  |*e)+3,,,-1,R....|
00001270  cd 0d 04 1a 10 e7 6d 25  3d 34 36 30 80 6b 3d b9  |......m%=460.k=.|
00001280  8c 0d 04 24 66 f2 6a 28  6a 25 29 3a 65 3d 30 3a  |...$f.j(j%):e=0:|
00001290  24 43 3d 22 22 3a 24 44  3d 22 22 3a f2 61 28 6a  |$C="":$D="":.a(j|
000012a0  25 2c 33 2c 22 22 2c 30  2c 31 29 3a f2 61 28 6a  |%,3,"",0,1):.a(j|
000012b0  25 2c 37 2c 22 22 2c 30  2c 31 29 3a c8 99 22 57  |%,7,"",0,1):.."W|
000012c0  69 6d 70 5f 53 65 74 43  61 72 65 74 50 6f 73 69  |imp_SetCaretPosi|
000012d0  74 69 6f 6e 22 2c 6a 25  2c 33 2c 2c 2c 2d 31 2c  |tion",j%,3,,,-1,|
000012e0  30 3a f2 65 28 33 29 0d  04 2e 05 cd 0d 04 38 11  |0:.e(3).......8.|
000012f0  e7 6d 25 3d 34 36 30 80  6b 3d b9 8c e1 0d 04 42  |.m%=460.k=.....B|
00001300  11 e7 4d 25 3d 6a 25 80  6d 25 3d 31 33 8c 0d 04  |..M%=j%.m%=13...|
00001310  4c 06 f2 4a 0d 04 56 1b  cc c8 99 22 57 69 6d 70  |L..J..V...."Wimp|
00001320  5f 50 72 6f 63 65 73 73  4b 65 79 22 2c 6d 25 0d  |_ProcessKey",m%.|
00001330  04 60 05 cd 0d 04 6a 05  e1 0d 04 74 19 dd f2 4a  |.`....j....t...J|
00001340  3a 65 24 3d 24 43 3a 69  24 3d 24 44 3a e7 a4 61  |:e$=$C:i$=$D:..a|
00001350  8c e1 0d 04 7e 1e ff 28  22 57 69 6d 70 54 61 73  |....~..("WimpTas|
00001360  6b 20 22 2b 65 24 2b 22  20 22 2b 69 24 29 3a e1  |k "+e$+" "+i$):.|
00001370  0d 04 88 1d dd f2 48 28  70 24 29 3a 65 24 3d 24  |......H(p$):e$=$|
00001380  43 3a 69 24 3d 24 44 3a  e7 a4 61 8c e1 0d 04 92  |C:i$=$D:..a.....|
00001390  49 e7 20 69 24 3c 3e 22  22 20 8c 20 ff 28 22 57  |I. i$<>"" . .("W|
000013a0  69 6d 70 54 61 73 6b 20  22 2b 65 24 2b 22 20 22  |impTask "+e$+" "|
000013b0  2b 70 24 2b 22 20 22 2b  69 24 29 20 8b 20 ff 28  |+p$+" "+i$) . .(|
000013c0  22 57 69 6d 70 54 61 73  6b 20 22 2b 65 24 2b 22  |"WimpTask "+e$+"|
000013d0  20 22 2b 70 24 29 0d 04  9c 05 e1 0d 04 a6 42 dd  | "+p$)........B.|
000013e0  f2 45 3a 65 24 3d 24 43  3a 69 24 3d 24 44 3a ff  |.E:e$=$C:i$=$D:.|
000013f0  28 22 57 69 6d 70 54 61  73 6b 20 48 65 6c 70 20  |("WimpTask Help |
00001400  22 2b 65 24 2b 22 20 20  28 73 68 69 66 74 20 74  |"+e$+"  (shift t|
00001410  6f 20 73 63 72 6f 6c 6c  29 22 29 3a e1 0d 04 b0  |o scroll)"):....|
00001420  40 dd a4 61 3a 66 61 3d  a3 3a e3 49 3d 30 b8 a9  |@..a:fa=.:.I=0..|
00001430  28 65 24 29 3a 6e 24 3d  c0 65 24 2c 49 29 3a 6d  |(e$):n$=.e$,I):m|
00001440  24 3d c2 6e 24 2c 31 29  3a e7 6d 24 3c 3e 22 20  |$=.n$,1):.m$<>" |
00001450  22 80 6d 24 3c 3e 22 22  8c 66 61 3d b9 0d 04 ba  |".m$<>"".fa=....|
00001460  0d ed 3a e7 66 61 8c 3a  3d 30 0d 04 c4 06 3d 31  |..:.fa.:=0....=1|
00001470  0d 04 ce bc dd f2 46 3a  53 3d 30 3a 41 25 3d 8e  |......F:S=0:A%=.|
00001480  22 3c 57 69 6d 70 43 6c  69 24 44 69 72 3e 2e 6d  |"<WimpCli$Dir>.m|
00001490  65 6e 75 73 22 3a de 69  25 20 28 32 34 2a 7a 29  |enus":.i% (24*z)|
000014a0  2b 34 38 3a de 65 25 20  33 34 35 36 3a de 62 28  |+48:.e% 3456:.b(|
000014b0  31 32 29 3a de 61 25 28  7a 29 3a 4c 25 3d 69 25  |12):.a%(z):L%=i%|
000014c0  3a 24 69 25 3d 22 57 69  6d 70 43 4c 49 22 3a 69  |:$i%="WimpCLI":i|
000014d0  25 21 31 32 3d 34 35 39  32 37 31 3a 69 25 21 31  |%!12=459271:i%!1|
000014e0  36 3d 31 32 38 3a 69 25  21 32 30 3d 34 34 3a 69  |6=128:i%!20=44:i|
000014f0  25 21 32 34 3d 30 3a 69  25 2b 3d 32 38 3a 4c 3d  |%!24=0:i%+=28:L=|
00001500  30 3a e3 49 3d 31 b8 7a  3a f2 69 28 22 7b 22 29  |0:.I=1.z:.i("{")|
00001510  3a 61 24 3d 22 22 3a f5  3a 61 24 2b 3d bd 9a 23  |:a$="":.:a$+=..#|
00001520  41 25 3a fd c2 61 24 29  3d 22 7d 22 0d 04 d8 34  |A%:..a$)="}"...4|
00001530  67 61 3d 30 3a 71 24 3d  61 24 3a e3 68 61 3d a9  |ga=0:q$=a$:.ha=.|
00001540  28 71 24 29 b8 31 88 2d  31 3a e7 c0 c2 71 24 2c  |(q$).1.-1:...q$,|
00001550  68 61 29 2c 31 29 3d 22  2c 22 8c 67 61 2b 3d 31  |ha),1)=",".ga+=1|
00001560  0d 04 e2 21 ed 3a 4d 3d  67 61 3a e7 49 3d 7a 8c  |...!.:M=ga:.I=z.|
00001570  69 25 21 28 28 49 2d 31  29 2a 32 34 29 3d 31 32  |i%!((I-1)*24)=12|
00001580  38 0d 04 ec 19 e7 49 3c  3e 7a 8c 69 25 21 28 28  |8.....I<>z.i%!((|
00001590  49 2d 31 29 2a 32 34 29  3d 30 0d 04 f6 32 e7 4d  |I-1)*24)=0...2.M|
000015a0  3d 30 8c 69 25 21 28 28  28 49 2d 31 29 2a 32 34  |=0.i%!(((I-1)*24|
000015b0  29 2b 34 29 3d 2d 31 8b  69 25 21 28 28 28 49 2d  |)+4)=-1.i%!(((I-|
000015c0  31 29 2a 32 34 29 2b 34  29 3d 65 25 0d 05 00 61  |1)*24)+4)=e%...a|
000015d0  69 25 21 28 28 28 49 2d  31 29 2a 32 34 29 2b 38  |i%!(((I-1)*24)+8|
000015e0  29 3d 26 37 30 30 30 30  32 31 3a 63 24 3d 22 22  |)=&7000021:c$=""|
000015f0  3a 69 61 3d 2d 31 3a f5  3a 69 61 2b 3d 31 3a 46  |:ia=-1:.:ia+=1:F|
00001600  3d 97 28 c0 c2 61 24 2c  a9 28 61 24 29 2d 69 61  |=.(..a$,.(a$)-ia|
00001610  29 2c 31 29 29 3a e7 46  3c 3e 97 22 2c 22 80 46  |),1)):.F<>.",".F|
00001620  3c 3e 97 22 7d 22 8c 63  24 2b 3d bd 46 0d 05 0a  |<>."}".c$+=.F...|
00001630  41 fd 46 3d 97 22 2c 22  84 46 3d 97 22 7d 22 3a  |A.F=.",".F=."}":|
00001640  e7 c2 63 24 2c 31 29 3d  22 5e 22 8c 69 25 21 28  |..c$,1)="^".i%!(|
00001650  28 49 2d 31 29 2a 32 34  29 2b 3d 32 3a 63 24 3d  |(I-1)*24)+=2:c$=|
00001660  c0 63 24 2c 28 a9 28 63  24 29 29 2d 31 29 0d 05  |.c$,(.(c$))-1)..|
00001670  14 2d 24 28 69 25 2b 28  28 28 49 2d 31 29 2a 32  |.-$(i%+(((I-1)*2|
00001680  34 29 2b 31 32 29 29 3d  63 24 3a e7 4c 3c a9 28  |4)+12))=c$:.L<.(|
00001690  63 24 29 8c 4c 3d a9 28  63 24 29 0d 05 1e 0a e7  |c$).L=.(c$).....|
000016a0  4d 3c 3e 30 8c 0d 05 28  81 41 3d 30 3a 24 28 65  |M<>0...(.A=0:$(e|
000016b0  25 29 3d 63 24 3a 65 25  21 31 32 3d 34 35 39 32  |%)=c$:e%!12=4592|
000016c0  37 31 3a 65 25 21 31 36  3d 28 28 a9 28 63 24 29  |71:e%!16=((.(c$)|
000016d0  2a 31 36 29 2b 31 36 29  3a 65 25 21 32 30 3d 34  |*16)+16):e%!20=4|
000016e0  34 3a 65 25 21 32 34 3d  30 3a 65 25 2b 3d 32 38  |4:e%!24=0:e%+=28|
000016f0  3a e3 63 3d 31 b8 4d 3a  e7 63 3d 4d 8c 65 25 21  |:.c=1.M:.c=M.e%!|
00001700  28 30 2b 28 28 63 2d 31  29 2a 32 34 29 29 3d 31  |(0+((c-1)*24))=1|
00001710  32 38 8b 65 25 21 28 30  2b 28 28 63 2d 31 29 2a  |28.e%!(0+((c-1)*|
00001720  32 34 29 29 3d 30 0d 05  32 88 65 25 21 28 34 2b  |24))=0..2.e%!(4+|
00001730  28 28 63 2d 31 29 2a 32  34 29 29 3d 2d 31 3a 65  |((c-1)*24))=-1:e|
00001740  25 21 28 38 2b 28 28 63  2d 31 29 2a 32 34 29 29  |%!(8+((c-1)*24))|
00001750  3d 26 37 30 30 30 30 32  31 3a 62 24 3d 22 22 3a  |=&7000021:b$="":|
00001760  75 3d a7 61 24 2c 22 2c  22 29 3a 61 24 3d c2 61  |u=.a$,","):a$=.a|
00001770  24 2c a9 28 61 24 29 2d  75 29 3a 75 3d a7 61 24  |$,.(a$)-u):u=.a$|
00001780  2c 22 2c 22 29 3a e7 75  3c 3e 30 8c 62 24 3d c0  |,","):.u<>0.b$=.|
00001790  61 24 2c 75 2d 31 29 8b  75 3d a7 61 24 2c 22 7d  |a$,u-1).u=.a$,"}|
000017a0  22 29 3a 62 24 3d c0 61  24 2c 75 2d 31 29 0d 05  |"):b$=.a$,u-1)..|
000017b0  3c 29 61 24 3d c2 61 24  2c a9 28 61 24 29 2d 28  |<)a$=.a$,.(a$)-(|
000017c0  75 2d 31 29 29 3a 6a 61  3d a3 3a e7 c2 62 24 2c  |u-1)):ja=.:..b$,|
000017d0  31 29 3d 22 7e 22 8c 0d  05 46 ac 6a 61 3d b9 3a  |1)="~"...F.ja=.:|
000017e0  65 25 21 28 28 63 2d 31  29 2a 32 34 29 2b 3d 34  |e%!((c-1)*24)+=4|
000017f0  3a 62 24 3d c0 62 24 2c  28 a9 28 62 24 29 29 2d  |:b$=.b$,(.(b$))-|
00001800  31 29 3a 24 28 43 25 2b  53 29 3d 62 24 3a 6b 61  |1):$(C%+S)=b$:ka|
00001810  3d 43 25 2b 53 3a 65 25  21 28 31 32 2b 28 28 63  |=C%+S:e%!(12+((c|
00001820  2d 31 29 2a 32 34 29 29  3d 6b 61 3a 65 25 21 28  |-1)*24))=ka:e%!(|
00001830  31 36 2b 28 28 63 2d 31  29 2a 32 34 29 29 3d 2d  |16+((c-1)*24))=-|
00001840  31 3a 65 25 21 28 32 30  2b 28 28 63 2d 31 29 2a  |1:e%!(20+((c-1)*|
00001850  32 34 29 29 3d 32 34 3a  65 25 21 28 38 2b 28 28  |24))=24:e%!(8+((|
00001860  63 2d 31 29 2a 32 34 29  29 3d 26 37 30 30 30 31  |c-1)*24))=&70001|
00001870  32 31 3a e7 41 3c a9 28  62 24 29 8c 41 3d a9 28  |21:.A<.(b$).A=.(|
00001880  62 24 29 0d 05 50 09 53  2b 3d 32 34 0d 05 5a 05  |b$)..P.S+=24..Z.|
00001890  cd 0d 05 64 0b e7 6a 61  3c 3e b9 8c 0d 05 6e 14  |...d..ja<>....n.|
000018a0  e7 41 3c a9 28 62 24 29  8c 41 3d a9 28 62 24 29  |.A<.(b$).A=.(b$)|
000018b0  0d 05 78 1c 24 28 65 25  2b 28 31 32 2b 28 28 63  |..x.$(e%+(12+((c|
000018c0  2d 31 29 2a 32 34 29 29  29 3d 62 24 0d 05 82 05  |-1)*24)))=b$....|
000018d0  cd 0d 05 8c 37 62 28 49  29 3d 65 25 3a ed 3a 65  |....7b(I)=e%:.:e|
000018e0  25 2d 3d 32 38 3a e7 28  28 41 2b 31 29 2a 31 36  |%-=28:.((A+1)*16|
000018f0  29 3e 65 25 21 31 36 8c  65 25 21 31 36 3d 28 28  |)>e%!16.e%!16=((|
00001900  41 2b 31 29 2a 31 36 29  0d 05 96 0f 65 25 2b 3d  |A+1)*16)....e%+=|
00001910  28 32 34 2a 31 32 29 0d  05 a0 05 cd 0d 05 aa 2f  |(24*12)......../|
00001920  ed 3a 69 25 2d 3d 32 38  3a e7 28 28 4c 2b 31 29  |.:i%-=28:.((L+1)|
00001930  2a 31 36 29 3e 69 25 21  31 36 8c 69 25 21 31 36  |*16)>i%!16.i%!16|
00001940  3d 28 28 4c 2b 31 29 2a  31 36 29 0d 05 b4 11 69  |=((L+1)*16)....i|
00001950  25 2b 3d 32 38 3a d9 23  41 25 3a e1 0d 05 be 1f  |%+=28:.#A%:.....|
00001960  dd f2 69 28 73 24 29 3a  f5 3a 6c 61 3d 9a 23 41  |..i(s$):.:la=.#A|
00001970  25 3a fd 6c 61 3d 97 73  24 3a e1 0d 05 c8 2c dd  |%:.la=.s$:....,.|
00001980  f2 43 3a c8 97 78 25 2c  79 25 2c 62 25 3a e7 78  |.C:..x%,y%,b%:.x|
00001990  25 3c 3e 58 25 84 79 25  3c 3e 59 25 84 62 25 3c  |%<>X%.y%<>Y%.b%<|
000019a0  3e 42 25 8c 78 3d 91 0d  05 d2 13 e7 21 45 3c 3e  |>B%.x=......!E<>|
000019b0  30 8c 78 3d 91 3a 21 45  3d 30 0d 05 dc 1a c8 97  |0.x=.:!E=0......|
000019c0  58 25 2c 59 25 2c 42 25  3a e7 91 2d 78 3e 48 2d  |X%,Y%,B%:..-x>H-|
000019d0  31 8c f2 6c 0d 05 e6 05  e1 0d 05 f0 2c dd f2 6c  |1..l........,..l|
000019e0  3a 62 61 25 3d eb 3a eb  31 3a 87 3a 6d 61 3d 58  |:ba%=.:.1:.:ma=X|
000019f0  25 3a 6e 61 3d 59 25 3a  c8 97 ee 30 3a c8 97 b8  |%:na=Y%:...0:...|
00001a00  6d 61 2c 6e 61 0d 05 fa  17 e7 72 3c 3e 32 8c 74  |ma,na.....r<>2.t|
00001a10  3d 91 3a f5 fd 91 3d 74  2b 31 30 30 0d 06 04 16  |=.:...=t+100....|
00001a20  c8 97 58 25 2c 59 25 2c  42 25 3a e7 72 3d 31 8c  |..X%,Y%,B%:.r=1.|
00001a30  f2 4b 0d 06 0e 0b e7 72  3d 32 8c f2 4c 0d 06 18  |.K.....r=2..L...|
00001a40  0b e7 72 3d 33 8c f2 4d  0d 06 22 08 f2 4e 3a e1  |..r=3..M.."..N:.|
00001a50  0d 06 2c 35 dd f2 4b 3a  f5 3a f2 4f 3a 49 3d 30  |..,5..K:.:.O:I=0|
00001a60  3a f5 3a 49 2b 3d 31 3a  f2 63 3a f2 6d 28 49 2c  |:.:I+=1:.c:.m(I,|
00001a70  6f 61 2c 31 29 3a e7 4e  3d 32 8c f2 6d 28 49 2c  |oa,1):.N=2..m(I,|
00001a80  70 61 2c 32 29 0d 06 36  15 fd 49 3d 33 30 84 6c  |pa,2)..6..I=30.l|
00001a90  25 3d b9 3a e7 6c 25 3d  a3 8c 0d 06 40 2c 49 3d  |%=.:.l%=....@,I=|
00001aa0  30 3a f5 3a 49 2b 3d 31  3a f2 63 3a f2 6e 28 49  |0:.:I+=1:.c:.n(I|
00001ab0  2c 6f 61 2c 31 29 3a e7  4e 3d 32 8c f2 6e 28 49  |,oa,1):.N=2..n(I|
00001ac0  2c 70 61 2c 32 29 0d 06  4a 0e fd 49 3d 31 35 84  |,pa,2)..J..I=15.|
00001ad0  6c 25 3d b9 0d 06 54 05  cd 0d 06 5e 0a e7 6c 25  |l%=...T....^..l%|
00001ae0  3d a3 8c 0d 06 68 1d 49  3d 30 3a f5 3a 49 2b 3d  |=....h.I=0:.:I+=|
00001af0  31 3a f2 63 3a fd 6c 25  3d b9 84 49 3d 32 35 30  |1:.c:.l%=..I=250|
00001b00  0d 06 72 05 cd 0d 06 7c  0b fd 6c 25 3d b9 3a e1  |..r....|..l%=.:.|
00001b10  0d 06 86 6f dd f2 4f 3a  4e 3d b3 28 32 29 3a 71  |...o..O:N=.(2):q|
00001b20  61 3d b3 28 32 30 29 2b  34 37 2e 35 3a 72 61 3d  |a=.(20)+47.5:ra=|
00001b30  b3 28 32 30 29 2b 34 37  2e 35 3a 55 3d b3 28 31  |.(20)+47.5:U=.(1|
00001b40  30 30 29 2f 31 30 30 3a  55 2b 3d 32 3a 56 3d b3  |00)/100:U+=2:V=.|
00001b50  28 31 30 30 29 2f 31 30  30 3a 56 2b 3d 32 3a 6f  |(100)/100:V+=2:o|
00001b60  61 3d b3 28 37 29 3a 70  61 3d b3 28 37 29 3a 57  |a=.(7):pa=.(7):W|
00001b70  3d b3 28 32 29 3a e7 57  3d 32 8c 57 3d 2d 31 0d  |=.(2):.W=2.W=-1.|
00001b80  06 90 14 59 3d b3 28 32  29 3a e7 59 3d 32 8c 59  |...Y=.(2):.Y=2.Y|
00001b90  3d 2d 31 0d 06 9a 47 6c  3d 31 3a 6a 3d 36 34 30  |=-1...Gl=1:j=640|
00001ba0  2b 28 28 b3 28 34 30 30  29 2d 32 30 30 29 29 3a  |+((.(400)-200)):|
00001bb0  6d 3d 31 3a 76 3d 36 34  30 2b 28 28 b3 28 34 30  |m=1:v=640+((.(40|
00001bc0  30 29 2d 32 30 30 29 29  3a 6e 3d 31 3a 6f 3d 6a  |0)-200)):n=1:o=j|
00001bd0  3a 70 3d 31 3a 71 3d 6a  3a e1 0d 06 a4 18 dd f2  |:p=1:q=j:.......|
00001be0  6d 28 42 2c 73 61 2c 61  29 3a e6 30 3a e7 61 3d  |m(B,sa,a):.0:.a=|
00001bf0  31 8c 0d 06 ae 3e ec 6f  2c 6e 3a df 6a 2c 6c 3a  |1....>.o,n:.j,l:|
00001c00  c8 8f c8 90 6f 2c 6e 2c  31 37 3a 6e 3d 6c 3a 6f  |....o,n,17:n=l:o|
00001c10  3d 6a 3a 6c 2b 3d 71 61  3a 6c 2d 3d 28 42 2a 55  |=j:l+=qa:l-=(B*U|
00001c20  29 3a 6a 2b 3d 28 28 42  2a 55 29 2f 33 29 2a 57  |):j+=((B*U)/3)*W|
00001c30  0d 06 b8 05 cd 0d 06 c2  09 e7 61 3d 32 8c 0d 06  |..........a=2...|
00001c40  cc 3e ec 71 2c 70 3a df  76 2c 6d 3a c8 8f c8 90  |.>.q,p:.v,m:....|
00001c50  71 2c 70 2c 31 37 3a 70  3d 6d 3a 71 3d 76 3a 6d  |q,p,17:p=m:q=v:m|
00001c60  2b 3d 72 61 3a 6d 2d 3d  28 42 2a 56 29 3a 76 2b  |+=ra:m-=(B*V):v+|
00001c70  3d 28 28 42 2a 56 29 2f  33 29 2a 59 0d 06 d6 05  |=((B*V)/3)*Y....|
00001c80  cd 0d 06 e0 3f fb 61 2c  31 36 30 2c 34 37 2c 30  |....?.a,160,47,0|
00001c90  3a e6 30 2c 61 3a e7 61  3d 31 8c ec 6f 2c 6e 3a  |:.0,a:.a=1..o,n:|
00001ca0  df 6a 2c 6c 3a e6 37 3a  c8 92 6f 2c 6e 8b ec 71  |.j,l:.7:..o,n..q|
00001cb0  2c 70 3a df 76 2c 6d 3a  e6 37 3a c8 92 71 2c 70  |,p:.v,m:.7:..q,p|
00001cc0  0d 06 ea 18 e7 61 3d 31  8c f2 6f 28 6f 2c 6e 29  |.....a=1..o(o,n)|
00001cd0  8b f2 6f 28 71 2c 70 29  0d 06 f4 0a e7 42 3d 33  |..o(q,p).....B=3|
00001ce0  30 8c 0d 06 fe 25 e3 4f  3d 30 b8 37 3a e7 61 3d  |0....%.O=0.7:.a=|
00001cf0  31 8c 61 28 61 2c 4f 2c  30 29 3d 6a 8b 61 28 61  |1.a(a,O,0)=j.a(a|
00001d00  2c 4f 2c 30 29 3d 76 0d  07 08 1e e7 61 3d 31 8c  |,O,0)=v.....a=1.|
00001d10  61 28 61 2c 4f 2c 31 29  3d 6c 8b 61 28 61 2c 4f  |a(a,O,1)=l.a(a,O|
00001d20  2c 31 29 3d 6d 0d 07 12  1e e7 61 3d 31 8c 61 28  |,1)=m.....a=1.a(|
00001d30  61 2c 4f 2c 32 29 3d 6a  8b 61 28 61 2c 4f 2c 32  |a,O,2)=j.a(a,O,2|
00001d40  29 3d 76 0d 07 1c 1e e7  61 3d 31 8c 61 28 61 2c  |)=v.....a=1.a(a,|
00001d50  4f 2c 33 29 3d 6c 8b 61  28 61 2c 4f 2c 33 29 3d  |O,3)=l.a(a,O,3)=|
00001d60  6d 0d 07 26 41 61 28 61  2c 4f 2c 34 29 3d b3 28  |m..&Aa(a,O,4)=.(|
00001d70  28 31 30 30 29 2f 31 30  30 29 2b 32 3a 61 28 61  |(100)/100)+2:a(a|
00001d80  2c 4f 2c 35 29 3d b3 28  32 29 3a e7 61 28 61 2c  |,O,5)=.(2):.a(a,|
00001d90  4f 2c 35 29 3d 32 8c 61  28 61 2c 4f 2c 35 29 3d  |O,5)=2.a(a,O,5)=|
00001da0  2d 31 0d 07 30 05 ed 0d  07 3a 05 cd 0d 07 44 18  |-1..0....:....D.|
00001db0  e3 54 3d 30 b8 37 30 30  2f 4e 3a ed 54 3a e7 42  |.T=0.700/N:.T:.B|
00001dc0  3d 33 30 8c 0d 07 4e 20  e6 30 3a e7 61 3d 31 8c  |=30...N .0:.a=1.|
00001dd0  ec 6f 2c 6e 3a df 6a 2c  6c 3a c8 8f c8 90 6f 2c  |.o,n:.j,l:....o,|
00001de0  6e 2c 31 37 0d 07 58 1d  e7 61 3d 32 8c ec 71 2c  |n,17..X..a=2..q,|
00001df0  70 3a df 76 2c 6d 3a c8  8f c8 90 71 2c 70 2c 31  |p:.v,m:....q,p,1|
00001e00  37 0d 07 62 05 cd 0d 07  6c 05 e1 0d 07 76 32 dd  |7..b....l....v2.|
00001e10  f2 63 3a 6c 25 3d a3 3a  c8 97 78 25 2c 79 25 2c  |.c:l%=.:..x%,y%,|
00001e20  62 25 3a e7 78 25 3c 3e  58 25 84 79 25 3c 3e 59  |b%:.x%<>X%.y%<>Y|
00001e30  25 84 62 25 3c 3e 42 25  8c 6c 25 3d b9 0d 07 80  |%.b%<>B%.l%=....|
00001e40  14 e7 21 45 3c 3e 30 8c  21 45 3d 30 3a 6c 25 3d  |..!E<>0.!E=0:l%=|
00001e50  b9 0d 07 8a 0f e7 50 8c  6c 25 3d a3 3a 50 3d a3  |......P.l%=.:P=.|
00001e60  0d 07 94 10 c8 97 58 25  2c 59 25 2c 42 25 3a e1  |......X%,Y%,B%:.|
00001e70  0d 07 9e 82 dd f2 6e 28  62 2c 73 61 2c 61 29 3a  |......n(b,sa,a):|
00001e80  e3 4f 3d 30 b8 37 3a e6  30 3a ec 61 28 61 2c 4f  |.O=0.7:.0:.a(a,O|
00001e90  2c 30 29 2c 61 28 61 2c  4f 2c 31 29 3a df 61 28  |,0),a(a,O,1):.a(|
00001ea0  61 2c 4f 2c 32 29 2c 61  28 61 2c 4f 2c 33 29 3a  |a,O,2),a(a,O,3):|
00001eb0  61 28 61 2c 4f 2c 30 29  3d 61 28 61 2c 4f 2c 32  |a(a,O,0)=a(a,O,2|
00001ec0  29 3a 61 28 61 2c 4f 2c  31 29 3d 61 28 61 2c 4f  |):a(a,O,1)=a(a,O|
00001ed0  2c 33 29 3a e7 61 3d 31  8c 61 28 61 2c 4f 2c 33  |,3):.a=1.a(a,O,3|
00001ee0  29 2b 3d 71 61 8b 61 28  61 2c 4f 2c 33 29 2b 3d  |)+=qa.a(a,O,3)+=|
00001ef0  72 61 0d 07 a8 4e 61 28  61 2c 4f 2c 33 29 2d 3d  |ra...Na(a,O,3)-=|
00001f00  28 28 62 2b 32 30 29 2a  61 28 61 2c 4f 2c 34 29  |((b+20)*a(a,O,4)|
00001f10  29 3a 61 28 61 2c 4f 2c  32 29 2b 3d 28 28 28 62  |):a(a,O,2)+=(((b|
00001f20  2b 32 30 29 2a 61 28 61  2c 4f 2c 34 29 29 2f 35  |+20)*a(a,O,4))/5|
00001f30  29 2a 61 28 61 2c 4f 2c  35 29 3a c8 8e 73 61 ca  |)*a(a,O,5):..sa.|
00001f40  0d 07 b2 36 c9 31 3a fb  61 2c 32 34 30 2d 28 31  |...6.1:.a,240-(1|
00001f50  36 2a 28 62 2d 31 29 29  2c 32 34 30 2d 28 31 36  |6*(b-1)),240-(16|
00001f60  2a 28 62 2d 31 29 29 2c  32 34 30 2d 28 31 36 2a  |*(b-1)),240-(16*|
00001f70  28 62 2d 31 29 29 0d 07  bc 27 c9 32 3a fb 61 2c  |(b-1))...'.2:.a,|
00001f80  32 34 30 2d 28 31 36 2a  28 62 2d 31 29 29 2c 36  |240-(16*(b-1)),6|
00001f90  34 2d 28 34 2a 28 62 2d  31 29 29 2c 30 0d 07 c6  |4-(4*(b-1)),0...|
00001fa0  27 c9 33 3a fb 61 2c 33  32 2d 28 32 2a 28 62 2d  |'.3:.a,32-(2*(b-|
00001fb0  31 29 29 2c 32 34 30 2d  28 31 36 2a 28 62 2d 31  |1)),240-(16*(b-1|
00001fc0  29 29 2c 30 0d 07 d0 27  c9 34 3a fb 61 2c 33 32  |)),0...'.4:.a,32|
00001fd0  2d 28 32 2a 28 62 2d 31  29 29 2c 30 2c 32 34 30  |-(2*(b-1)),0,240|
00001fe0  2d 28 31 36 2a 28 62 2d  31 29 29 0d 07 da 29 c9  |-(16*(b-1))...).|
00001ff0  35 3a fb 61 2c 30 2c 32  34 30 2d 28 31 36 2a 28  |5:.a,0,240-(16*(|
00002000  62 2d 31 29 29 2c 31 39  32 2d 28 31 32 2a 28 62  |b-1)),192-(12*(b|
00002010  2d 31 29 29 0d 07 e4 29  c9 36 3a fb 61 2c 31 39  |-1))...).6:.a,19|
00002020  32 2d 28 31 32 2a 28 62  2d 31 29 29 2c 32 34 30  |2-(12*(b-1)),240|
00002030  2d 28 31 36 2a 28 62 2d  31 29 29 2c 30 0d 07 ee  |-(16*(b-1)),0...|
00002040  29 c9 37 3a fb 61 2c 32  34 30 2d 28 31 36 2a 28  |).7:.a,240-(16*(|
00002050  62 2d 31 29 29 2c 30 2c  31 39 32 2d 28 31 32 2a  |b-1)),0,192-(12*|
00002060  28 62 2d 31 29 29 0d 07  f8 05 cb 0d 08 02 40 e6  |(b-1))........@.|
00002070  61 3a ec 61 28 61 2c 4f  2c 30 29 2c 61 28 61 2c  |a:.a(a,O,0),a(a,|
00002080  4f 2c 31 29 3a df 61 28  61 2c 4f 2c 32 29 2c 61  |O,1):.a(a,O,2),a|
00002090  28 61 2c 4f 2c 33 29 3a  ed 3a e7 4e 3d 31 8c e3  |(a,O,3):.:.N=1..|
000020a0  54 3d 30 b8 31 30 30 30  3a ed 54 0d 08 0c 3b e7  |T=0.1000:.T...;.|
000020b0  62 3d 31 35 8c e6 30 3a  e3 4f 3d 30 b8 37 3a ec  |b=15..0:.O=0.7:.|
000020c0  61 28 61 2c 4f 2c 30 29  2c 61 28 61 2c 4f 2c 31  |a(a,O,0),a(a,O,1|
000020d0  29 3a df 61 28 61 2c 4f  2c 32 29 2c 61 28 61 2c  |):.a(a,O,2),a(a,|
000020e0  4f 2c 33 29 3a ed 0d 08  16 05 e1 0d 08 20 28 dd  |O,3):........ (.|
000020f0  f2 4e 3a 50 3d b9 3a 78  3d 91 3a c8 99 22 57 69  |.N:P=.:x=.:.."Wi|
00002100  6d 70 5f 53 65 74 4d 6f  64 65 22 2c 62 61 25 3a  |mp_SetMode",ba%:|
00002110  c8 97 ee 0d 08 2a 05 e1  0d 08 34 82 dd f2 79 3a  |.....*....4...y:|
00002120  61 25 21 30 3d 72 25 3a  c8 99 22 57 69 6d 70 5f  |a%!0=r%:.."Wimp_|
00002130  47 65 74 57 69 6e 64 6f  77 53 74 61 74 65 22 2c  |GetWindowState",|
00002140  2c 61 25 3a c8 99 22 57  69 6d 70 5f 43 6c 6f 73  |,a%:.."Wimp_Clos|
00002150  65 57 69 6e 64 6f 77 22  2c 2c 61 25 3a 61 25 21  |eWindow",,a%:a%!|
00002160  30 3d 72 25 3a c8 99 22  57 69 6d 70 5f 47 65 74  |0=r%:.."Wimp_Get|
00002170  57 69 6e 64 6f 77 53 74  61 74 65 22 2c 2c 61 25  |WindowState",,a%|
00002180  3a c8 99 22 57 69 6d 70  5f 4f 70 65 6e 57 69 6e  |:.."Wimp_OpenWin|
00002190  64 6f 77 22 2c 2c 61 25  3a e1 0d 08 3e 3e dd f2  |dow",,a%:...>>..|
000021a0  6f 28 74 61 2c 75 61 29  3a e3 76 61 3d 31 b8 38  |o(ta,ua):.va=1.8|
000021b0  3a 77 61 3d b3 28 31 34  29 2d 37 3a 78 61 3d b3  |:wa=.(14)-7:xa=.|
000021c0  28 31 34 29 2d 37 3a c8  92 74 61 2b 77 61 2c 75  |(14)-7:..ta+wa,u|
000021d0  61 2b 78 61 3a ed 3a e1  0d 08 48 59 dd f2 68 3a  |a+xa:.:...HY..h:|
000021e0  f2 61 28 66 25 2c 30 2c  22 23 22 2b c3 66 2c 30  |.a(f%,0,"#"+.f,0|
000021f0  2c 31 29 3a f2 61 28 66  25 2c 31 2c 22 23 22 2b  |,1):.a(f%,1,"#"+|
00002200  c3 68 2c 30 2c 31 29 3a  f2 61 28 66 25 2c 32 2c  |.h,0,1):.a(f%,2,|
00002210  22 23 22 2b c3 64 2c 30  2c 31 29 3a f2 61 28 66  |"#"+.d,0,1):.a(f|
00002220  25 2c 33 2c 22 23 22 2b  c3 69 2c 30 2c 31 29 3a  |%,3,"#"+.i,0,1):|
00002230  e1 0d 08 52 8c dd f2 44  3a 53 25 3d 8e 28 22 3c  |...R...D:S%=.("<|
00002240  57 69 6d 70 43 6c 69 24  44 69 72 3e 2e 53 70 72  |WimpCli$Dir>.Spr|
00002250  69 74 65 73 22 29 3a 79  61 3d a2 23 53 25 2b 31  |ites"):ya=.#S%+1|
00002260  36 3a d9 23 53 25 3a de  6e 25 20 79 61 3a 21 6e  |6:.#S%:.n% ya:!n|
00002270  25 3d 79 61 3a 6e 25 21  34 3d 30 3a 6e 25 21 38  |%=ya:n%!4=0:n%!8|
00002280  3d 31 36 3a 6e 25 21 31  32 3d 31 36 3a c8 99 22  |=16:n%!12=16:.."|
00002290  4f 53 5f 53 70 72 69 74  65 4f 70 22 2c 32 36 36  |OS_SpriteOp",266|
000022a0  2c 6e 25 2c 22 3c 57 69  6d 70 43 6c 69 24 44 69  |,n%,"<WimpCli$Di|
000022b0  72 3e 2e 53 70 72 69 74  65 73 22 3a e1 0d 08 5c  |r>.Sprites":...\|
000022c0  24 dd f2 61 28 6f 25 2c  4e 25 2c 67 24 2c 76 25  |$..a(o%,N%,g$,v%|
000022d0  2c 7a 61 29 3a e7 6f 25  3d 66 25 80 4e 25 3c 34  |,za):.o%=f%.N%<4|
000022e0  8c 0d 08 66 23 48 3d 28  69 2b 28 64 2a 31 30 29  |...f#H=(i+(d*10)|
000022f0  2b 28 68 2a 36 30 29 2b  28 66 2a 36 30 30 29 29  |+(h*60)+(f*600))|
00002300  2a 31 30 30 0d 08 70 05  cd 0d 08 7a 3a 61 25 21  |*100..p....z:a%!|
00002310  30 3d 6f 25 3a 61 25 21  34 3d 4e 25 3a c8 99 22  |0=o%:a%!4=N%:.."|
00002320  57 69 6d 70 5f 47 65 74  49 63 6f 6e 53 74 61 74  |Wimp_GetIconStat|
00002330  65 22 2c 2c 61 25 3a e7  c0 67 24 2c 31 29 3d 22  |e",,a%:..g$,1)="|
00002340  21 22 8c 0d 08 84 17 24  61 25 21 32 38 3d c2 67  |!".....$a%!28=.g|
00002350  24 2c a9 28 67 24 29 2d  31 29 0d 08 8e 05 cd 0d  |$,.(g$)-1)......|
00002360  08 98 10 e7 c0 67 24 2c  31 29 3d 22 23 22 8c 0d  |.....g$,1)="#"..|
00002370  08 a2 59 24 28 61 25 2b  32 38 29 3d c2 67 24 2c  |..Y$(a%+28)=.g$,|
00002380  a9 28 67 24 29 2d 31 29  3a e7 76 25 3d 30 8c c8  |.(g$)-1):.v%=0..|
00002390  99 22 57 69 6d 70 5f 44  65 6c 65 74 65 49 63 6f  |."Wimp_DeleteIco|
000023a0  6e 22 2c 2c 61 25 3a 61  25 21 34 3d 6f 25 3a c8  |n",,a%:a%!4=o%:.|
000023b0  99 22 57 69 6d 70 5f 43  72 65 61 74 65 49 63 6f  |."Wimp_CreateIco|
000023c0  6e 22 2c 2c 61 25 2b 34  0d 08 ac 05 cd 0d 08 b6  |n",,a%+4........|
000023d0  0b e7 76 25 3c 3e 30 8c  0d 08 c0 46 c8 99 22 57  |..v%<>0....F.."W|
000023e0  69 6d 70 5f 44 65 6c 65  74 65 49 63 6f 6e 22 2c  |imp_DeleteIcon",|
000023f0  2c 61 25 3a 61 25 21 32  34 3d 76 25 3a 61 25 21  |,a%:a%!24=v%:a%!|
00002400  34 3d 6f 25 3a c8 99 22  57 69 6d 70 5f 43 72 65  |4=o%:.."Wimp_Cre|
00002410  61 74 65 49 63 6f 6e 22  2c 2c 61 25 2b 34 0d 08  |ateIcon",,a%+4..|
00002420  ca 05 cd 0d 08 d4 0b e7  7a 61 3d 30 8c e1 0d 08  |........za=0....|
00002430  de 34 c8 99 22 57 69 6d  70 5f 46 6f 72 63 65 52  |.4.."Wimp_ForceR|
00002440  65 64 72 61 77 22 2c 6f  25 2c 61 25 21 38 2c 61  |edraw",o%,a%!8,a|
00002450  25 21 31 32 2c 61 25 21  31 36 2c 61 25 21 32 30  |%!12,a%!16,a%!20|
00002460  3a e1 0d 08 e8 b3 dd f2  4c 3a fb 31 2c 31 37 35  |:.......L:.1,175|
00002470  2c 32 35 35 2c 32 35 35  3a e6 31 3a 41 61 3d 35  |,255,255:.1:Aa=5|
00002480  31 32 3a 47 3d 61 25 3a  e3 49 3d 30 b8 41 61 2d  |12:G=a%:.I=0.Aa-|
00002490  31 3a 47 21 28 49 2a 31  36 29 3d b3 28 32 30 30  |1:G!(I*16)=.(200|
000024a0  29 2f 31 30 2d 31 30 3a  47 21 28 28 49 2a 31 36  |)/10-10:G!((I*16|
000024b0  29 2b 34 29 3d b3 28 35  30 30 29 2f 31 30 3a 47  |)+4)=.(500)/10:G|
000024c0  21 28 28 49 2a 31 36 29  2b 38 29 3d b3 28 31 30  |!((I*16)+8)=.(10|
000024d0  30 29 2f 31 30 2d 36 3a  47 21 28 28 49 2a 31 36  |0)/10-6:G!((I*16|
000024e0  29 2b 31 32 29 3d b3 28  32 30 30 29 2f 31 30 2b  |)+12)=.(200)/10+|
000024f0  31 30 3a ed 3a 45 25 3d  47 3a 44 25 3d 41 61 2d  |10:.:E%=G:D%=Aa-|
00002500  31 3a f2 50 3a f5 3a db  3a d6 70 25 3a f2 63 3a  |1:.P:.:.:.p%:.c:|
00002510  fd 6c 25 3a e1 0d 08 f2  04 0d 08 fc f2 dd f2 50  |.l%:...........P|
00002520  3a e3 42 61 3d 30 b8 32  88 32 3a 50 25 3d 70 25  |:.Ba=0.2.2:P%=p%|
00002530  3a 5b 4f 50 54 20 42 61  3a 4d 4f 56 31 30 2c 23  |:[OPT Ba:MOV10,#|
00002540  31 36 30 3a 4d 4f 56 31  30 2c 31 30 2c 4c 53 4c  |160:MOV10,10,LSL|
00002550  20 23 32 3a 4d 4f 56 31  31 2c 23 30 3a 4d 4f 56  | #2:MOV11,#0:MOV|
00002560  31 32 2c 23 30 3a 2e 43  61 3a 4c 44 52 35 2c 5b  |12,#0:.Ca:LDR5,[|
00002570  34 2c 23 30 5d 3a 4c 44  52 36 2c 5b 34 2c 23 34  |4,#0]:LDR6,[4,#4|
00002580  5d 3a 4c 44 52 37 2c 5b  34 2c 23 38 5d 3a 4c 44  |]:LDR7,[4,#8]:LD|
00002590  52 38 2c 5b 34 2c 23 31  32 5d 3a 41 44 44 35 2c  |R8,[4,#12]:ADD5,|
000025a0  35 2c 37 3a 41 44 44 36  2c 36 2c 38 2c 4c 53 4c  |5,7:ADD6,6,8,LSL|
000025b0  20 23 31 3a 43 4d 50 36  2c 23 30 3a 42 4c 54 20  | #1:CMP6,#0:BLT |
000025c0  44 61 3a 53 55 42 38 2c  38 2c 23 31 3a 53 54 52  |Da:SUB8,8,#1:STR|
000025d0  35 2c 5b 34 2c 23 30 5d  3a 53 54 52 36 2c 5b 34  |5,[4,#0]:STR6,[4|
000025e0  2c 23 34 5d 3a 53 54 52  38 2c 5b 34 2c 23 31 32  |,#4]:STR8,[4,#12|
000025f0  5d 3a 41 44 44 31 2c 35  2c 31 30 3a 4d 4f 56 32  |]:ADD1,5,10:MOV2|
00002600  2c 36 3a 4d 4f 56 30 2c  23 36 39 0d 09 06 bc 53  |,6:MOV0,#69....S|
00002610  57 49 20 22 4f 53 5f 50  6c 6f 74 22 3a 42 20 45  |WI "OS_Plot":B E|
00002620  61 3a 2e 44 61 3a 53 55  42 35 2c 31 32 2c 23 31  |a:.Da:SUB5,12,#1|
00002630  30 3a 4d 4f 56 36 2c 23  30 3a 41 44 44 38 2c 31  |0:MOV6,#0:ADD8,1|
00002640  32 2c 23 31 30 3a 53 54  52 35 2c 5b 34 2c 23 30  |2,#10:STR5,[4,#0|
00002650  5d 3a 53 54 52 36 2c 5b  34 2c 23 34 5d 3a 53 54  |]:STR6,[4,#4]:ST|
00002660  52 38 2c 5b 34 2c 23 31  32 5d 3a 2e 45 61 3a 41  |R8,[4,#12]:.Ea:A|
00002670  44 44 34 2c 34 2c 23 31  36 3a 41 44 44 31 32 2c  |DD4,4,#16:ADD12,|
00002680  31 32 2c 23 31 3a 43 4d  50 31 32 2c 23 32 30 3a  |12,#1:CMP12,#20:|
00002690  4d 4f 56 47 45 31 32 2c  23 30 3a 41 44 44 31 31  |MOVGE12,#0:ADD11|
000026a0  2c 31 31 2c 23 31 3a 43  4d 50 31 31 2c 33 3a 42  |,11,#1:CMP11,3:B|
000026b0  4c 54 20 43 61 3a 4d 4f  56 31 35 2c 31 34 3a 20  |LT Ca:MOV15,14: |
000026c0  5d 3a ed 42 61 3a e1 0d  09 10 47 dd f2 47 3a 41  |]:.Ba:....G..G:A|
000026d0  25 3d ae 22 3c 57 69 6d  70 43 6c 69 24 44 69 72  |%=."<WimpCli$Dir|
000026e0  3e 2e 63 6f 6e 66 69 67  22 3a e7 79 3d 2d 31 8c  |>.config":.y=-1.|
000026f0  d5 23 41 25 2c 22 7b 52  49 47 48 54 2c 22 3b 8b  |.#A%,"{RIGHT,";.|
00002700  d5 23 41 25 2c 22 7b 4c  45 46 54 2c 22 3b 0d 09  |.#A%,"{LEFT,";..|
00002710  1a 1f e7 6b 8c d5 23 41  25 2c 22 4f 4e 2c 22 3b  |...k..#A%,"ON,";|
00002720  8b d5 23 41 25 2c 22 4f  46 46 2c 22 3b 0d 09 24  |..#A%,"OFF,";..$|
00002730  1f e7 73 8c d5 23 41 25  2c 22 4f 4e 2c 22 3b 8b  |..s..#A%,"ON,";.|
00002740  d5 23 41 25 2c 22 4f 46  46 2c 22 3b 0d 09 2e 30  |.#A%,"OFF,";...0|
00002750  d5 23 41 25 2c c3 66 2b  c3 68 2b 22 3a 22 2b c3  |.#A%,.f+.h+":"+.|
00002760  64 2b c3 69 2b 22 2c 22  3b 3a d5 23 41 25 2c c3  |d+.i+",";:.#A%,.|
00002770  72 2b 22 7d 22 3a d9 23  41 25 3a e1 0d 09 38 67  |r+"}":.#A%:...8g|
00002780  dd f2 49 3a 4f 25 3d 61  25 21 33 32 3a 51 25 3d  |..I:O%=a%!32:Q%=|
00002790  61 25 21 33 36 3a 61 25  21 31 32 3d 61 25 21 38  |a%!36:a%!12=a%!8|
000027a0  3a 61 25 21 31 36 3d 31  32 38 33 3a 68 25 3d 61  |:a%!16=1283:h%=a|
000027b0  25 2b 32 30 3a 24 68 25  3d 22 54 68 69 73 20 69  |%+20:$h%="This i|
000027c0  73 20 74 68 65 20 57 69  6d 70 43 4c 49 20 41 70  |s the WimpCLI Ap|
000027d0  70 6c 69 63 61 74 69 6f  6e 2e 22 3a e7 4f 25 3d  |plication.":.O%=|
000027e0  6a 25 8c 0d 09 42 76 24  68 25 3d 22 55 73 65 20  |j%...Bv$h%="Use |
000027f0  74 68 69 73 20 77 69 6e  64 6f 77 20 66 6f 72 20  |this window for |
00002800  65 6e 74 65 72 69 6e 67  20 2a 20 63 6f 6d 6d 61  |entering * comma|
00002810  6e 64 73 2e 7c 4d 54 68  65 20 6d 61 69 6e 20 6d  |nds.|MThe main m|
00002820  65 6e 75 20 68 6f 6c 64  73 20 73 65 76 65 72 61  |enu holds severa|
00002830  6c 20 73 75 63 68 20 63  6f 6d 6d 61 6e 64 73 20  |l such commands |
00002840  66 6f 72 20 69 6e 73 74  61 6e 74 20 75 73 65 2e  |for instant use.|
00002850  7c 4d 22 3a c8 8e 51 25  ca 0d 09 4c 52 c9 33 3a  ||M":..Q%...LR.3:|
00002860  24 68 25 3d 22 45 6e 74  65 72 20 79 6f 75 72 20  |$h%="Enter your |
00002870  2a 20 63 6f 6d 6d 61 6e  64 20 69 6e 20 74 68 69  |* command in thi|
00002880  73 20 69 63 6f 6e 2c 20  74 68 65 6e 20 70 72 65  |s icon, then pre|
00002890  73 73 20 52 65 74 75 72  6e 20 74 6f 20 65 78 65  |ss Return to exe|
000028a0  63 75 74 65 20 69 74 2e  7c 4d 22 0d 09 56 48 c9  |cute it.|M"..VH.|
000028b0  37 3a 24 68 25 3d 22 54  68 65 20 73 75 66 66 69  |7:$h%="The suffi|
000028c0  78 20 74 6f 20 74 68 65  20 63 6f 6d 6d 61 6e 64  |x to the command|
000028d0  20 73 68 6f 75 6c 64 20  62 65 20 65 6e 74 65 72  | should be enter|
000028e0  65 64 20 69 6e 20 74 68  69 73 20 69 63 6f 6e 2e  |ed in this icon.|
000028f0  7c 4d 22 0d 09 60 3f c9  31 35 3a 24 68 25 3d 22  ||M"..`?.15:$h%="|
00002900  53 65 6c 65 63 74 20 74  68 69 73 20 69 63 6f 6e  |Select this icon|
00002910  20 74 6f 20 6f 62 74 61  69 6e 20 68 65 6c 70 20  | to obtain help |
00002920  6f 6e 20 74 68 65 20 63  6f 6d 6d 61 6e 64 2e 7c  |on the command.||
00002930  4d 22 0d 09 6a 05 cb 0d  09 74 05 cd 0d 09 7e 0b  |M"..j....t....~.|
00002940  e7 4f 25 3d 66 25 8c 0d  09 88 50 24 68 25 3d 22  |.O%=f%....P$h%="|
00002950  54 68 69 73 20 77 69 6e  64 6f 77 20 63 6f 6e 74  |This window cont|
00002960  61 69 6e 73 20 6f 70 74  69 6f 6e 73 20 66 6f 72  |ains options for|
00002970  20 63 6f 6e 74 72 6f 6c  6c 69 6e 67 20 74 68 65  | controlling the|
00002980  20 73 63 72 65 65 6e 20  73 61 76 65 72 2e 7c 4d  | screen saver.|M|
00002990  22 3a c8 8e 51 25 ca 0d  09 92 44 c9 32 34 3a 24  |":..Q%....D.24:$|
000029a0  68 25 3d 22 54 68 69 73  20 69 73 20 74 68 65 20  |h%="This is the |
000029b0  74 69 6d 65 20 62 65 66  6f 72 65 20 74 68 65 20  |time before the |
000029c0  73 63 72 65 65 6e 20 73  61 76 65 72 20 69 73 20  |screen saver is |
000029d0  69 6e 76 6f 6b 65 64 2e  7c 4d 22 0d 09 9c 48 c9  |invoked.|M"...H.|
000029e0  34 3a 24 68 25 3d 22 54  68 69 73 20 69 63 6f 6e  |4:$h%="This icon|
000029f0  20 77 69 6c 6c 20 69 6e  63 72 65 61 73 65 20 74  | will increase t|
00002a00  68 65 20 61 6d 6f 75 6e  74 20 6f 66 20 74 69 6d  |he amount of tim|
00002a10  65 20 62 79 20 31 30 20  6d 69 6e 75 74 65 73 2e  |e by 10 minutes.|
00002a20  7c 4d 22 0d 09 a6 46 c9  35 3a 24 68 25 3d 22 54  ||M"...F.5:$h%="T|
00002a30  68 69 73 20 69 63 6f 6e  20 77 69 6c 6c 20 69 6e  |his icon will in|
00002a40  63 72 65 61 73 65 20 74  68 65 20 61 6d 6f 75 6e  |crease the amoun|
00002a50  74 20 6f 66 20 74 69 6d  65 20 62 79 20 31 20 6d  |t of time by 1 m|
00002a60  69 6e 75 74 65 2e 7c 4d  22 0d 09 b0 48 c9 36 3a  |inute.|M"...H.6:|
00002a70  24 68 25 3d 22 54 68 69  73 20 69 63 6f 6e 20 77  |$h%="This icon w|
00002a80  69 6c 6c 20 69 6e 63 72  65 61 73 65 20 74 68 65  |ill increase the|
00002a90  20 61 6d 6f 75 6e 74 20  6f 66 20 74 69 6d 65 20  | amount of time |
00002aa0  62 79 20 31 30 20 73 65  63 6f 6e 64 73 2e 7c 4d  |by 10 seconds.|M|
00002ab0  22 0d 09 ba 46 c9 37 3a  24 68 25 3d 22 54 68 69  |"...F.7:$h%="Thi|
00002ac0  73 20 69 63 6f 6e 20 77  69 6c 6c 20 69 6e 63 72  |s icon will incr|
00002ad0  65 61 73 65 20 74 68 65  20 61 6d 6f 75 6e 74 20  |ease the amount |
00002ae0  6f 66 20 74 69 6d 65 20  62 79 20 31 20 73 65 63  |of time by 1 sec|
00002af0  6f 6e 64 2e 7c 4d 22 0d  09 c4 48 c9 38 3a 24 68  |ond.|M"...H.8:$h|
00002b00  25 3d 22 54 68 69 73 20  69 63 6f 6e 20 77 69 6c  |%="This icon wil|
00002b10  6c 20 64 65 63 72 65 61  73 65 20 74 68 65 20 61  |l decrease the a|
00002b20  6d 6f 75 6e 74 20 6f 66  20 74 69 6d 65 20 62 79  |mount of time by|
00002b30  20 31 30 20 6d 69 6e 75  74 65 73 2e 7c 4d 22 0d  | 10 minutes.|M".|
00002b40  09 ce 46 c9 39 3a 24 68  25 3d 22 54 68 69 73 20  |..F.9:$h%="This |
00002b50  69 63 6f 6e 20 77 69 6c  6c 20 64 65 63 72 65 61  |icon will decrea|
00002b60  73 65 20 74 68 65 20 61  6d 6f 75 6e 74 20 6f 66  |se the amount of|
00002b70  20 74 69 6d 65 20 62 79  20 31 20 6d 69 6e 75 74  | time by 1 minut|
00002b80  65 2e 7c 4d 22 0d 09 d8  49 c9 31 30 3a 24 68 25  |e.|M"...I.10:$h%|
00002b90  3d 22 54 68 69 73 20 69  63 6f 6e 20 77 69 6c 6c  |="This icon will|
00002ba0  20 64 65 63 72 65 61 73  65 20 74 68 65 20 61 6d  | decrease the am|
00002bb0  6f 75 6e 74 20 6f 66 20  74 69 6d 65 20 62 79 20  |ount of time by |
00002bc0  31 30 20 73 65 63 6f 6e  64 73 2e 7c 4d 22 0d 09  |10 seconds.|M"..|
00002bd0  e2 47 c9 31 31 3a 24 68  25 3d 22 54 68 69 73 20  |.G.11:$h%="This |
00002be0  69 63 6f 6e 20 77 69 6c  6c 20 64 65 63 72 65 61  |icon will decrea|
00002bf0  73 65 20 74 68 65 20 61  6d 6f 75 6e 74 20 6f 66  |se the amount of|
00002c00  20 74 69 6d 65 20 62 79  20 31 20 73 65 63 6f 6e  | time by 1 secon|
00002c10  64 2e 7c 4d 22 0d 09 ec  63 c9 32 31 3a 24 68 25  |d.|M"...c.21:$h%|
00002c20  3d 22 53 65 6c 65 63 74  69 6e 67 20 74 68 69 73  |="Selecting this|
00002c30  20 69 63 6f 6e 20 77 69  6c 6c 20 63 61 75 73 65  | icon will cause|
00002c40  20 74 68 65 20 46 69 72  65 77 6f 72 6b 20 64 69  | the Firework di|
00002c50  73 70 6c 61 79 20 74 6f  20 62 65 20 75 73 65 64  |splay to be used|
00002c60  20 61 73 20 74 68 65 20  73 63 72 65 65 6e 20 73  | as the screen s|
00002c70  61 76 65 72 2e 7c 4d 22  0d 09 f6 69 c9 32 32 3a  |aver.|M"...i.22:|
00002c80  24 68 25 3d 22 53 65 6c  65 63 74 69 6e 67 20 74  |$h%="Selecting t|
00002c90  68 69 73 20 69 63 6f 6e  20 77 69 6c 6c 20 63 61  |his icon will ca|
00002ca0  75 73 65 20 74 68 65 20  57 61 74 65 72 20 46 6f  |use the Water Fo|
00002cb0  75 6e 74 61 69 6e 20 64  69 73 70 6c 61 79 20 74  |untain display t|
00002cc0  6f 20 62 65 20 75 73 65  64 20 61 73 20 74 68 65  |o be used as the|
00002cd0  20 73 63 72 65 65 6e 20  73 61 76 65 72 2e 7c 4d  | screen saver.|M|
00002ce0  22 0d 0a 00 61 c9 32 33  3a 24 68 25 3d 22 53 65  |"...a.23:$h%="Se|
00002cf0  6c 65 63 74 69 6e 67 20  74 68 69 73 20 69 63 6f  |lecting this ico|
00002d00  6e 20 77 69 6c 6c 20 63  61 75 73 65 20 74 68 65  |n will cause the|
00002d10  20 57 61 6c 6b 65 72 20  64 69 73 70 6c 61 79 20  | Walker display |
00002d20  74 6f 20 62 65 20 75 73  65 64 20 61 73 20 74 68  |to be used as th|
00002d30  65 20 73 63 72 65 65 6e  20 73 61 76 65 72 2e 7c  |e screen saver.||
00002d40  4d 22 0d 0a 0a 05 cb 0d  0a 14 05 cd 0d 0a 1e 36  |M".............6|
00002d50  21 61 25 3d 28 a9 24 68  25 2b 32 35 29 80 ac 33  |!a%=(.$h%+25)..3|
00002d60  3a c8 99 22 57 69 6d 70  5f 53 65 6e 64 4d 65 73  |:.."Wimp_SendMes|
00002d70  73 61 67 65 22 2c 31 37  2c 61 25 2c 61 25 21 34  |sage",17,a%,a%!4|
00002d80  3a e1 0d 0a 28 44 dd f2  4d 3a fb 32 2c 31 37 30  |:...(D..M:.2,170|
00002d90  2c 31 37 30 2c 31 37 30  3a 5a 3d 33 38 35 3a 46  |,170,170:Z=385:F|
00002da0  61 3d 36 30 3a 77 3d 30  3a 58 3d 2d 32 30 30 3a  |a=60:w=0:X=-200:|
00002db0  f5 3a 58 2b 3d 32 30 3a  e7 58 3e 31 32 38 30 8c  |.:X+=20:.X>1280.|
00002dc0  58 3d 2d 32 30 30 0d 0a  32 1a c8 91 58 2c 32 30  |X=-200..2...X,20|
00002dd0  30 3a 77 2b 3d 31 3a e7  77 3e 31 32 8c 77 3d 31  |0:w+=1:.w>12.w=1|
00002de0  0d 0a 3c 33 67 3d 31 3a  f2 70 28 77 29 3a e3 47  |..<3g=1:.p(w):.G|
00002df0  61 3d 30 b8 32 30 30 30  3a ed 3a 67 3d 30 3a f2  |a=0.2000:.:g=0:.|
00002e00  70 28 77 29 3a c8 91 30  2c 30 3a f2 63 3a fd 6c  |p(w):..0,0:.c:.l|
00002e10  25 3a e1 0d 0a 46 0f dd  f2 70 28 77 29 3a c8 8e  |%:...F...p(w):..|
00002e20  77 ca 0d 0a 50 09 c9 31  3a f2 51 0d 0a 5a 09 c9  |w...P..1:.Q..Z..|
00002e30  32 3a f2 71 0d 0a 64 09  c9 33 3a f2 72 0d 0a 6e  |2:.q..d..3:.r..n|
00002e40  09 c9 34 3a f2 73 0d 0a  78 09 c9 35 3a f2 74 0d  |..4:.s..x..5:.t.|
00002e50  0a 82 09 c9 36 3a f2 75  0d 0a 8c 09 c9 37 3a f2  |....6:.u.....7:.|
00002e60  52 0d 0a 96 09 c9 38 3a  f2 75 0d 0a a0 09 c9 39  |R.....8:.u.....9|
00002e70  3a f2 74 0d 0a aa 0a c9  31 30 3a f2 73 0d 0a b4  |:.t.....10:.s...|
00002e80  0a c9 31 31 3a f2 72 0d  0a be 0a c9 31 32 3a f2  |..11:.r.....12:.|
00002e90  71 0d 0a c8 05 cb 0d 0a  d2 05 e1 0d 0a dc 82 dd  |q...............|
00002ea0  f2 51 3a e6 28 32 2a 67  29 3a ec 31 30 30 2c 31  |.Q:.(2*g):.100,1|
00002eb0  37 35 3a df 35 35 2c 38  37 3a df 30 2c 31 30 3a  |75:.55,87:.0,10:|
00002ec0  df 34 30 2c 30 3a ec 31  30 30 2c 33 30 30 3a df  |.40,0:.100,300:.|
00002ed0  31 37 35 2c 31 35 30 3a  e6 28 33 2a 67 29 3a f2  |175,150:.(3*g):.|
00002ee0  62 3a ec 31 30 30 2c 33  32 35 3a df 31 30 30 2c  |b:.100,325:.100,|
00002ef0  31 37 35 3a df 31 36 35  2c 39 30 3a df 32 30 30  |175:.165,90:.200|
00002f00  2c 30 3a df 32 34 30 2c  31 30 3a ec 31 30 30 2c  |,0:.240,10:.100,|
00002f10  33 30 30 3a df 32 35 2c  31 35 30 3a e1 0d 0a e6  |300:.25,150:....|
00002f20  81 dd f2 71 3a e6 28 32  2a 67 29 3a ec 31 30 30  |...q:.(2*g):.100|
00002f30  2c 31 37 35 3a df 37 30  2c 38 37 3a df 34 30 2c  |,175:.70,87:.40,|
00002f40  35 3a df 38 30 2c 30 3a  ec 31 30 30 2c 33 30 30  |5:.80,0:.100,300|
00002f50  3a df 31 35 30 2c 31 33  30 3a e6 28 33 2a 67 29  |:.150,130:.(3*g)|
00002f60  3a f2 62 3a ec 31 30 30  2c 33 32 35 3a df 31 30  |:.b:.100,325:.10|
00002f70  30 2c 31 37 35 3a df 31  35 30 2c 39 30 3a df 31  |0,175:.150,90:.1|
00002f80  38 30 2c 30 3a df 32 32  30 2c 35 3a ec 31 30 30  |80,0:.220,5:.100|
00002f90  2c 33 30 30 3a df 35 30  2c 31 33 30 3a e1 0d 0a  |,300:.50,130:...|
00002fa0  f0 82 dd f2 72 3a e6 28  32 2a 67 29 3a ec 31 30  |....r:.(2*g):.10|
00002fb0  30 2c 31 37 35 3a df 38  35 2c 38 32 3a df 36 35  |0,175:.85,82:.65|
00002fc0  2c 32 3a df 31 30 35 2c  30 3a ec 31 30 30 2c 33  |,2:.105,0:.100,3|
00002fd0  30 30 3a df 31 32 35 2c  31 32 30 3a e6 28 33 2a  |00:.125,120:.(3*|
00002fe0  67 29 3a f2 62 3a ec 31  30 30 2c 33 32 35 3a df  |g):.b:.100,325:.|
00002ff0  31 30 30 2c 31 37 35 3a  df 31 32 35 2c 38 35 3a  |100,175:.125,85:|
00003000  df 31 35 30 2c 30 3a df  31 39 30 2c 32 3a ec 31  |.150,0:.190,2:.1|
00003010  30 30 2c 33 30 30 3a df  37 35 2c 31 32 30 3a e1  |00,300:.75,120:.|
00003020  0d 0a fa 82 dd f2 73 3a  e6 28 32 2a 67 29 3a ec  |......s:.(2*g):.|
00003030  31 30 30 2c 31 37 35 3a  df 39 38 2c 38 30 3a df  |100,175:.98,80:.|
00003040  39 36 2c 30 3a df 31 33  36 2c 30 3a ec 31 30 30  |96,0:.136,0:.100|
00003050  2c 33 30 30 3a df 31 31  30 2c 31 31 35 3a e6 28  |,300:.110,115:.(|
00003060  33 2a 67 29 3a f2 62 3a  ec 31 30 30 2c 33 32 35  |3*g):.b:.100,325|
00003070  3a df 31 30 30 2c 31 37  35 3a df 31 30 32 2c 38  |:.100,175:.102,8|
00003080  35 3a df 31 30 35 2c 30  3a df 31 34 35 2c 30 3a  |5:.105,0:.145,0:|
00003090  ec 31 30 30 2c 33 30 30  3a df 39 30 2c 31 31 35  |.100,300:.90,115|
000030a0  3a e1 0d 0b 04 82 dd f2  74 3a e6 28 32 2a 67 29  |:.......t:.(2*g)|
000030b0  3a ec 31 30 30 2c 31 37  35 3a df 31 32 35 2c 38  |:.100,175:.125,8|
000030c0  35 3a df 31 35 30 2c 30  3a df 31 39 30 2c 32 3a  |5:.150,0:.190,2:|
000030d0  ec 31 30 30 2c 33 30 30  3a df 37 35 2c 31 32 30  |.100,300:.75,120|
000030e0  3a e6 28 33 2a 67 29 3a  f2 62 3a ec 31 30 30 2c  |:.(3*g):.b:.100,|
000030f0  33 32 35 3a df 31 30 30  2c 31 37 35 3a df 38 35  |325:.100,175:.85|
00003100  2c 38 32 3a df 36 35 2c  32 3a df 31 30 35 2c 30  |,82:.65,2:.105,0|
00003110  3a ec 31 30 30 2c 33 30  30 3a df 31 32 35 2c 31  |:.100,300:.125,1|
00003120  32 30 3a e1 0d 0b 0e 81  dd f2 75 3a e6 28 32 2a  |20:.......u:.(2*|
00003130  67 29 3a ec 31 30 30 2c  31 37 35 3a df 31 35 30  |g):.100,175:.150|
00003140  2c 39 30 3a df 31 38 30  2c 30 3a df 32 32 30 2c  |,90:.180,0:.220,|
00003150  35 3a ec 31 30 30 2c 33  30 30 3a df 35 30 2c 31  |5:.100,300:.50,1|
00003160  33 30 3a e6 28 33 2a 67  29 3a f2 62 3a ec 31 30  |30:.(3*g):.b:.10|
00003170  30 2c 33 32 35 3a df 31  30 30 2c 31 37 35 3a df  |0,325:.100,175:.|
00003180  37 30 2c 38 37 3a df 34  30 2c 35 3a df 38 30 2c  |70,87:.40,5:.80,|
00003190  30 3a ec 31 30 30 2c 33  30 30 3a df 31 35 30 2c  |0:.100,300:.150,|
000031a0  31 33 30 3a e1 0d 0b 18  82 dd f2 52 3a e6 28 32  |130:.......R:.(2|
000031b0  2a 67 29 3a ec 31 30 30  2c 31 37 35 3a df 31 36  |*g):.100,175:.16|
000031c0  35 2c 39 30 3a df 32 30  30 2c 30 3a df 32 34 30  |5,90:.200,0:.240|
000031d0  2c 31 30 3a ec 31 30 30  2c 33 30 30 3a df 32 35  |,10:.100,300:.25|
000031e0  2c 31 35 30 3a e6 28 33  2a 67 29 3a f2 62 3a ec  |,150:.(3*g):.b:.|
000031f0  31 30 30 2c 33 32 35 3a  df 31 30 30 2c 31 37 35  |100,325:.100,175|
00003200  3a df 35 35 2c 38 37 3a  df 30 2c 31 30 3a df 34  |:.55,87:.0,10:.4|
00003210  30 2c 30 3a ec 31 30 30  2c 33 30 30 3a df 31 37  |0,0:.100,300:.17|
00003220  35 2c 31 35 30 3a e1 0d  0b 22 3b dd f2 62 3a c8  |5,150:...";..b:.|
00003230  8f 31 30 30 2c 5a 2c 46  61 3a c8 8f 31 34 30 2c  |.100,Z,Fa:..140,|
00003240  5a 2b 32 30 2c 31 30 3a  e6 31 2a 67 3a c8 8f c8  |Z+20,10:.1*g:...|
00003250  90 31 37 30 2c 5a 2b 35  2c 31 33 3a e6 33 2a 67  |.170,Z+5,13:.3*g|
00003260  3a e1 0d ff                                       |:...|
00003264