Home » Archimedes archive » Acorn Computing » 1993 06 Mega Disk.adf » 93_06 » KeyStroke/!KeysDemo/!RUNIMAGE
KeyStroke/!KeysDemo/!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 » Acorn Computing » 1993 06 Mega Disk.adf » 93_06 |
Filename: | KeyStroke/!KeysDemo/!RUNIMAGE |
Read OK: | ✔ |
File size: | 9124 bytes |
Load address: | 0000 |
Exec address: | 0000 |
File contents
1REM><Squish$Scrap> squished by MH's BASIC cruncher v1.20 14/5/89 On 08 Mar 1993 2:PROCO:REPEAT:PROCg(6146):UNTILaa%:SYS"Wimp_CloseDown":SYS"OS_Exit" 140DEFPROCg(ba%):SYS"Wimp_Poll",ba%,q%TOca%:CASEca%OF 170WHEN0:IFNOTda%THENea%=-1:PROCP 180WHEN2:PROCs 200WHEN3:PROCQ 210WHEN4:PROCR 220WHEN5:PROCS 230WHEN6:PROCT 240WHEN7:PROCU 250WHEN8:PROCV 260WHEN9:PROCW 270WHEN17,18:PROCX 280ENDCASE 280ENDPROC 290 330DEFPROCP:SYS"Wimp_GetCaretPosition",,b%:IF!b%=e%AND(b%!4)<>14THENfa%=TRUEELSEfa%=FALSE 370da%=TRUE:ga%=FALSE:IFINKEY(-4)ANDINKEY(-7)THEN 400PROCz 420ELSE:SYS"OS_Byte",121,9TO,`%:IF`%<>255THEN 440`%=c%(`%):IF`%<>-1THEN 460ha%=-INKEY(-1)-2*INKEY(-2)-4*INKEY(-3):IFfa%AND`%<94THEN 480$(a%+128)=FNc(e%,14):IFFNbTHENPROCh(a%,TRUE) 500B%=`%:r%=ha%:WHILEa%(B%,r%)=-1:r%=(r%+1)MOD8:ENDWHILE:PROCi:PROCc 580ELSE:IFa%(`%,ha%)<>-1THEN 590IF!a%(`%,ha%)<>0THEN 600c%=a%(`%,ha%)-4:s%=TRUE:REPEAT:c%=g%+c%!4:IFs%=TRUEOR((c%?3)AND32)=0THEN 650IF(c%?1AND16)=16THEN 660s%=TRUE 680ELSE:PROCA(c%):PROCg(6146) 710ENDIF 710ENDIF 720UNTILc%!4=-1:MOUSERECTANGLEia%,ja%,ka%-ia%,la%-ja%:IFNOTga%THEN 750REPEAT:SYS"OS_Byte",122TO,ma%:UNTILma%=255 790ENDIF 790ENDIF 800ENDIF 810ENDIF 820ENDIF 830ENDIF 840ENDIF 850$(S%+128)="Keystroke$Do*":h$=FNh:WHILEh$<>"":SYS"OS_SetVarVal",S%+128,"Clear",-1,0,0:PROCB(h$):$(S%+128)="Keystroke$Do*":h$=FNh:ENDWHILE:$(S%+128)="Keystroke$Load*":t$=FNh:WHILEt$<>"":SYS"OS_SetVarVal",S%+128,"Clear",-1,0,0:PROCC(t$):$(S%+128)="Keystroke$Load*" 990t$=FNh:ENDWHILE:IF(na%+oa%)<TIMETHENPROCB("Autoexec"):na%=TIME 1020da%=FALSE:ENDPROC 1040 1060DEFPROCs:LOCALpa%,qa%,ra%,sa%:SYS"Wimp_OpenWindow",,q%:pa%=q%!4:qa%=q%!8:ra%=!q%:ta%=q%!28:IF!q%=e%THEN 1120CASE((a%?2)MOD16)OF 1130WHEN0:PROCk(m%):PROCk(M%):PROCd(t%):PROCd(G%):PROCd(j%) 1200WHEN1,5:PROCk(m%):PROCk(G%):PROCd(M%):PROCd(t%):PROCd(j%) 1260WHEN2,3:PROCk(t%):PROCd(m%):PROCd(M%):PROCd(G%):PROCd(j%) 1320WHEN4:PROCk(m%):PROCk(j%):PROCd(t%):PROCd(M%):PROCd(G%) 1380OTHERWISE:PROCd(m%):PROCd(M%):PROCd(t%):PROCd(G%):PROCd(j%) 1440ENDCASE 1440ENDIF 1450ENDPROC 1460 1480DEFPROCQ:SYS"Wimp_CloseWindow",,q%:IF!q%=e%THEN 1510PROCd(m%):PROCd(M%):PROCd(t%):PROCd(G%):PROCd(j%) 1570ENDIF 1570ENDPROC 1580 1600DEFPROCS:IF!q%=e%THEN 1630SYS"Wimp_GetCaretPosition",,C%:IF((!C%)<>e%OR(C%!4)<>14)AND((!C%)<>t%OR(C%!4)<>1)THEN 1650SYS"Wimp_SetCaretPosition",e%,-1 1670ENDIF 1670ENDIF 1680ENDPROC 1690 1710DEFPROCR:SYS"Wimp_GetCaretPosition",,b%:IF!q%=e%ANDNOT((!b%)=e%AND(b%!4)=14)THEN 1750SYS"XWimp_SetCaretPosition",!C%,C%!4,C%!8,C%!12,C%!16,C%!20 1770ENDIF 1770ENDPROC 1780 1800DEFPROCT:CASEq%!8OF 1820WHEN2:PROCY 1840WHEN1,4:PROCZ((q%!8)=1) 1850ENDCASE 1850ENDPROC 1860 1880DEFPROCY:CASEq%!12OF 1900WHEN-2:PROCt(-2,(!q%)-64,384) 1920WHENe%,m%,M%,t%,G%,j%:PROCt(q%!12,(!q%)-64,(q%!4)+44) 1930ENDCASE 1930ENDPROC 1940 1960DEFPROCZ(ua%):CASEq%!12OF 1980WHEN-2:!q%=e%:SYS"Wimp_GetWindowState",,q%:q%!28=-1:PROCs 2040WHENe%:CASEq%!16OF 2050WHEN1:IFFNbTHENPROCh(a%,TRUE) 2070r%=r%EOR4:PROCi:PROCc 2090WHEN2:IFFNbTHENPROCh(a%,TRUE) 2100r%=r%EOR2:PROCi:PROCc 2120WHEN3:IFFNbTHENPROCh(a%,TRUE) 2130r%=r%EOR1:PROCi:PROCc 2150WHEN4:$(a%+128)=FNc(e%,14):IFFNbTHENPROCh(a%,TRUE) 2170IFua%THENB%=96ELSEB%=94 2180r%=-INKEY(-1)-2*INKEY(-2)-4*INKEY(-3):PROCi:PROCc 2220WHEN6,7,8,9,10,11:PROCD(B%,r%,(q%!16)-6):w%=TRUE:PROCc 2230WHEN12:IF(a%?3AND128)>0THEN 2240a%=T%:T%=a%!8 2270ELSE:a%=g%+a%!8:T%=a%!8 2300ENDIF 2300PROCc 2320WHEN13:IFa%!4=-1THEN 2330T%=a%:a%=FNf 2360ELSE:a%=g%+a%!4:T%=a%!8 2390ENDIF 2390PROCc 2410WHEN16:a%?3=(a%?3AND254)-FNd(e%,16,1<<21):w%=TRUE 2440WHEN17:a%?3=(a%?3AND253)-2*FNd(e%,17,1<<21):w%=TRUE 2470WHEN18:a%?3=(a%?3AND191)-64*FNd(e%,18,1<<21):w%=TRUE:SYS"Wimp_SetCaretPosition",e%,-1:PROCc 2520WHEN20:a%?3=(a%?3AND223)-32*FNd(e%,20,1<<21):w%=TRUE 2550WHEN21:a%?1=(a%?1AND247)-8*FNd(e%,21,1<<21):w%=TRUE 2580WHEN22:a%?1=(a%?1AND239)-16*FNd(e%,22,1<<21):w%=TRUE 2610ENDCASE 2610WHENm%:IFq%!16<>20THENw%=TRUE 2630CASEq%!16OF 2640WHEN2:a%?3=(a%?3)OR28:a%?2=(a%?2)AND15:PROCc 2660WHEN3:IF((a%?2)MOD16)=0THENh%=16ELSEh%=0 2670a%?2=((a%?2)AND15)+(1<<4):a%?3=(((a%?3)ANDNOT16)+h%):PROCc 2700WHEN4:a%?2=((a%?2)AND15)+(2<<4):a%?3=((a%?3)OR16):PROCc 2730WHEN5:a%?2=((a%?2)AND15)+(3<<4):a%?3=((a%?3)OR16):PROCc 2760WHEN6:a%?3=((a%?3)ANDNOT4)-4*FNd(m%,6,1<<21):IF(a%?3AND4)=4THEN 2780PROCb(m%,9,FNa(a%+76)) 2800ELSE:PROCb(m%,9,"Irrelevant") 2820ENDIF 2820WHEN7:a%?3=((a%?3)ANDNOT8)-8*FNd(m%,7,1<<21):IF((a%?2MOD16)=0ANDa%!20<0)OR(a%?2MOD16)=4THEN 2850IF(a%?3AND8)=8THEN 2860PROCb(m%,1,FNa(a%+56)) 2880ELSE:PROCb(m%,1,"Irrelevant") 2900ENDIF 2900ENDIF 2910WHEN20:va%=1:PROCE 2930ENDCASE 2930WHENM%:CASEq%!16OF 2950WHEN1:a%?24=4:PROCc 2970WHEN2:a%?24=1:PROCc 2980WHEN3:a%?25=-FNd(M%,3,1<<21) 2990ENDCASE 2990w%=TRUE 3010WHENG%:h%=(q%!16)-8:IFh%>-1ANDh%<7THEN 3030IFua%THEN 3040IFa%!((h%*4)+28)>-1THEN 3050!(a%+28+(h%*4))=!(a%+28+(h%*4))-1:PROCb(G%,h%+8,STR$((a%!((h%*4)+28))+1)):IFh%<6ANDa%!((h%*4)+28)=-1THEN 3080FORI%=h%+1TO6:PROCa(G%,I%+8,1<<22,TRUE):PROCb(G%,I%+8,"0"):!(a%+28+(I%*4))=-1:NEXTI% 3140ENDIF 3140ENDIF 3150ELSE:IFa%!((h%*4)+28)<998THEN 3170!(a%+28+(h%*4))=!(a%+28+(h%*4))+1:PROCb(G%,h%+8,STR$((a%!((h%*4)+28))+1)):IFh%<6THENPROCa(G%,h%+9,1<<22,FALSE) 3200ENDIF 3210ENDIF 3220ENDIF 3230w%=TRUE 3250WHENt%:CASEq%!16OF 3260WHEN2:PROCe("<Sys$Time>") 3280WHEN3:PROCe("<Sys$Date>") 3290WHEN4:PROCe("<Sys$Year>") 3300WHEN5:PROCe("|M") 3310WHEN6:PROCe("|U") 3320WHEN7:PROCe("<Filer$Dir>") 3330WHEN8:PROCe("Run ") 3340WHEN9:PROCe("Filer_OpenDir ") 3350WHEN10:PROCe("Load ") 3360WHEN11,12,13,14:PROCe(CHR$((q%!16)+125)) 3370WHEN15:PROCe("<Keystroke$Input>") 3380WHEN16:PROCe("<Keystroke%Var>") 3390ENDCASE 3390w%=TRUE 3410WHENj%:CASEq%!16OF 3420WHEN1:a%!28=a%!28ANDNOT1:PROCc 3440WHEN2:a%!28=a%!28OR1:PROCc 3450WHEN4:IFua%THEN 3460a%!32=a%!32-N%:IFa%!32<-9999THENa%!32=-10000+N% 3480ELSE:a%!32=a%!32+N%:IFa%!32>99999THENa%!32=100000-N% 3510ENDIF 3520PROCb(j%,4,STR$(a%!32)) 3540WHEN6:IFua%THEN 3550a%!36=a%!36-O%:IFa%!36<-9999THENa%!36=-10000+O% 3570ELSE:a%!36=a%!36+O%:IFa%!36>99999THENa%!36=100000-O% 3600ENDIF 3610PROCb(j%,6,STR$(a%!36)) 3630WHEN8:IFua%THEN 3640a%!40=a%!40-N%:IFa%!40<-9999THENa%!40=-10000+N% 3660ELSE:a%!40=a%!40+N%:IFa%!40>99999THENa%!40=100000-N% 3690ENDIF 3700PROCb(j%,8,STR$(a%!40)) 3720WHEN10:IFua%THEN 3730a%!44=a%!44-O%:IFa%!44<-9999THENa%!44=-10000+O% 3750ELSE:a%!44=a%!44+O%:IFa%!44>99999THENa%!44=100000-O% 3780ENDIF 3790PROCb(j%,10,STR$(a%!44)) 3810WHEN13:IFua%THEN 3820a%!48=a%!48-N%:IFa%!48<-999999THENa%!48=-&F4240+N% 3840ELSE:a%!48=a%!48+N%:IFa%!48>9999999THENa%!48=&989680-N% 3870ENDIF 3880PROCb(j%,13,STR$(a%!48)) 3900WHEN15:IFua%THEN 3910a%!52=a%!52-O%:IFa%!52<-999999THENa%!52=-&F4240+O% 3930ELSE:a%!52=a%!52+O%:IFa%!52>9999999THENa%!52=&989680-O% 3960ENDIF 3970PROCb(j%,15,STR$(a%!52)) 3990WHEN16:IFFNd(j%,16,1<<21)THEN 4000a%!28=(a%!28)OR2 4020ELSE:a%!28=(a%!28)ANDNOT2 4040ENDIF 4040PROCc 4060WHEN17:IFFNd(j%,17,1<<21)THEN 4070a%!28=(a%!28)OR4 4090ELSE:a%!28=(a%!28)ANDNOT4 4110ENDIF 4110PROCc 4130WHEN18:IFFNd(j%,18,1<<21)THEN 4140a%!28=(a%!28)OR8 4160ELSE:a%!28=(a%!28)ANDNOT8 4180ENDIF 4180PROCa(j%,4,1<<22,n%OR((a%!28)AND10)=0):PROCa(j%,6,1<<22,n%OR((a%!28)AND10)=0) 4210ENDCASE 4210WHENA%:CASEq%!16OF 4230WHEN0:va%=U%+1:PROCE 4270WHEN2:PROCm(FNc(A%,1)) 4280ENDCASE 4280ENDCASE 4290ENDPROC 4300 4320DEFPROCU:CASEva%OF 4340WHEN1:PROCz 4360WHEN2:PROCn(H%,4093) 4370WHEN3:PROCn(0,4095) 4380WHEN4:PROCn(256,4075) 4390WHEN5:PROCn(2048,8192) 4400ENDCASE 4400va%=-1:ENDPROC 4420 4440DEFPROCV:ea%=q%!24:IFea%=13THEN 4470CASE!q%OF 4480WHENt%:CASEq%!4OF 4500WHEN1:$(a%+12)=FNc(t%,1):w%=TRUE:PROCc 4550ENDCASE 4550WHENe%:IFq%!4=14THEN 4570$(a%+128)=FNc(e%,14):w%=TRUE:REPEATUNTILNOTINKEY(-74) 4610ENDIF 4610WHENA%:PROCm(FNc(A%,1)) 4640WHENwa%:n$=FNc(wa%,0):!b%=wa%:SYS"Wimp_CloseWindow",,b% 4680ENDCASE 4680SYS"Wimp_GetPointerInfo",,b%:IFb%!12=e%THENSYS"Wimp_SetCaretPosition",e%,-1ELSESYS"Wimp_SetCaretPosition",-1 4700ELSE:SYS"Wimp_ProcessKey",ea% 4730ENDIF 4730ENDPROC 4740 4760DEFPROCW:IFxa%=-2THENi$="Main.":ya%=u%ELSEi$="Edit.":ya%=i% 4780SYS"Wimp_DecodeMenu",,ya%,q%,b%:i$+=FNa(b%):CASEi$OF 4810WHEN"Main.Save.Keystrokes":U%=1:PROCm(l$) 4830WHEN"Main.Save.Default":PROCu("<KeysDemo$Dir>.Default") 4840WHEN"Main.Save.Executor":U%=4:PROCm(u$) 4850WHEN"Main.Save.List":U%=2:PROCm(o$) 4860WHEN"Edit.Copy":PROCF(a%):w%=TRUE 4870WHEN"Edit.Copy Group":PROCG(a%):w%=TRUE 4880WHEN"Edit.Insert":IF((a%?3)AND128)=128THEN 4890PROCH(a%):PROCc 4920ELSE:PROC_(a%):PROCc 4950ENDIF 4950w%=TRUE 4970WHEN"Edit.Paste":PROCH(a%):w%=TRUE:PROCc 5010WHEN"Edit.Cut":w%=TRUE:PROCF(a%):PROCh(a%,TRUE) 5050WHEN"Edit.Cut Group":w%=TRUE:PROCG(a%):PROC`(a%) 5090WHEN"Main.Clear All":IFw%THEN 5100za%=FNi("Keystrokes not saved. Are you sure?") 5120ELSE:za%=TRUE 5140ENDIF 5140IFza%THEN 5150PROCI:PROCi:PROCc:u%!252=&7409001:w%=FALSE 5210ENDIF 5210WHEN"Main.Quit":IFw%THEN 5230aa%=FNi("Keystrokes not saved. Are you sure?") 5250ELSE:aa%=TRUE 5270ENDIF 5270OTHERWISE:IFLEFT$(i$,20)="Main.Prefs.Autoexec."THEN 5290IFVAL(FNa(Aa%))=0THEN 5300PROCf(0,"The minimum time is one minute",1):$Aa%=STR$(oa%DIV6000) 5330ELSE:oa%=VAL(FNa(Aa%))*6000 5350ENDIF 5350ENDIF 5360IFLEFT$(i$,20)="Main.Prefs.Variable."THENOSCLI("SetEval Keystroke%Var "+FNa(Ba%)) 5370IFLEFT$(i$,21)="Main.Prefs.Increment."THENOSCLI("SetEval Keystroke%Inc "+FNa(Ca%)) 5380ENDCASE 5390SYS"Wimp_GetPointerInfo",,b%:IFb%!8=1THENPROCt(xa%,Da%,Ea%) 5410ENDPROC 5420 5440DEFPROCX:CASE(q%!16)OF 5460WHEN0:IFw%THEN 5480aa%=FNi("Keystrokes not saved. Are you sure?") 5500ELSE:aa%=TRUE 5520ENDIF 5520WHEN1:q%!12=q%!8:q%!16=2:!q%=256:$(q%+44)="<Wimp$Scrap>":SYS"Wimp_SendMessage",17,q%,q%!4 5590WHEN2:a$=FNa(q%+44):CASEU%OF 5610WHEN1:PROCu(a$):IFa$<>"<Wimp$Scrap>"THENl$=a$ 5620WHEN2:PROCJ(a$):IFa$<>"<Wimp$Scrap>"THENo$=a$ 5630WHEN3:PROCaa(a$) 5650WHEN4:IFa$<>"<Wimp$Scrap>"THENPROCK(a$) 5650ENDCASE 5660SYS"Wimp_CreateMenu",,-1:q%!12=q%!8:q%!16=3:!q%=256:SYS"Wimp_SendMessage",18,q%,q%!4 5720WHEN3:PROCba 5740WHEN262336:IFq%!36=0THENU%=1 5750IFq%!36=3THENU%=2 5760IFq%!32=6THENU%=3 5770IFq%!36=2THENU%=4 5780CASEU%OF 5790WHEN1:PROCb(A%,1,l$):PROCo(A%,0,"file_ffd"):PROCl(A%,1,15) 5840WHEN2:PROCb(A%,1,o$):PROCo(A%,0,"file_fff"):PROCl(A%,1,15) 5880WHEN3:PROCb(A%,1,"Action"):PROCo(A%,0,"file_feb"):PROCl(A%,1,15) 5920WHEN4:PROCb(A%,1,u$):PROCo(A%,0,"!executor"):PROCl(A%,1,0) 5960ENDCASE 5960SYS"Wimp_CreateSubMenu",,q%!20,q%!24,q%!28 5980WHEN262337:PROCL 6000WHEN262338:PROCca(q%!4,FNa(q%+28)) 6020WHEN262339:PROCda(q%!4) 6040WHEN262343:j$=FNa(q%+28) 6060ENDCASE 6060ENDPROC 6070 6110DEFPROCA(c%):IF(c%?1AND8)=8THEN 6120MOUSEFa%,Ga%,Ha%:MOUSERECTANGLEFa%,Ga%,0,0 6150ELSE:MOUSERECTANGLEia%,ja%,ka%-ia%,la%-ja% 6170ENDIF 6170IF(c%?3AND2)=0THEN 6190Ia%=1:PROCg(6146) 6220ELSE:!q%=0:$(q%+4)=FNa(c%+128)+"?":MOUSEFa%,Ga%,Ha%:SYS"Wimp_ReportError",q%,19,"Keystroke"TO,Ia%:MOUSETOFa%,Ga%:PROCg(6146) 6280ENDIF 6280IFIa%=1THEN 6290s%=FALSE:IF((((c%!104)AND1048576)<>0)OR(c%?2MOD16)=3)AND(c%?2MOD16)<>2THENJa%=TRUEELSEJa%=FALSE 6310CASE(c%?2MOD16)OF 6320WHEN0:IF(c%!12)<>-1OR(((c%?3)AND8)=0ANDc%!20<0)THENPROCp(c%,c%!24) 6330WHEN1:IF(c%!12)<>-1THENPROCp(c%,2) 6340WHEN2:m$=FNa(c%+12):IFINSTR(m$,"<Keystroke$Input>")>0THENPROCM 6370IFINSTR(m$,"<Filer$Dir>")>0THEN 6380q$=FNj:IFq$<>""THEN 6400OSCLI("Set Filer$Dir "+q$):OSCLI("WimpTask "+m$):s%=TRUE 6440ENDIF 6440ELSE:OSCLI("WimpTask "+m$):s%=TRUE 6480ENDIF 6480IFINSTR(m$,"<Keystroke%Var>")>0ANDs%THEN 6490OSCLI("SetEval Keystroke%Var Keystroke%Var"+FNm):SYS"OS_GSTrans","<Keystroke%Var>",q%,8192:PROCb(t%,19,FNa(q%)) 6530ENDIF 6530WHEN3:r$=FNa(c%+12):IFINSTR(r$,"<Keystroke$Input>")>0THENPROCM 6560IFINSTR(r$,"<Filer$Dir>")>0THEN 6570q$=FNj:IFq$<>""THENOSCLI("Set Filer$Dir "+FNj)ELSEOSCLI("Unset Filer$Dir") 6590ENDIF 6600SYS"OS_GSTrans",r$,q%,8192:o%=q%:SYS"OS_Byte",15:WHILE?o%<>0:IF?o%>135AND?o%<140THEN 6650PROCg(6146):SYS"Wimp_ProcessKey",(?o%)+260 6680ELSE:PROCg(6146):SYS"Wimp_ProcessKey",?o% 6710ENDIF 6710o%+=1:ENDWHILE:s%=TRUE:IFINSTR(r$,"<Keystroke%Var>")>0THEN 6750OSCLI("SetEval Keystroke%Var Keystroke%Var"+FNm):SYS"OS_GSTrans","<Keystroke%Var>",q%,8192:PROCb(t%,19,FNa(q%)) 6790ENDIF 6790WHEN4:IF(c%!12)<>-1THENPROCp(c%,-1) 6810WHEN5:IF(c%!12)<>-1THENPROCp(c%,2) 6830ENDCASE 6840IFs%=TRUEAND(c%?3AND1)=1THENSOUND1,-15,100,5 6850PROCg(6146) 6870ENDIF 6870ENDPROC 6880 6900DEFPROCc:n%=((a%?3)AND64)=64:PROCb(e%,4,a$(B%)):PROCa(e%,1,(1<<21),(r%AND4)<>0):PROCa(e%,2,(1<<21),(r%AND2)<>0):PROCa(e%,3,(1<<21),(r%AND1)<>0):IF(a%?3AND128)>0THEN 6970FORI%=6TO11:PROCa(e%,I%,(1<<21),FALSE):PROCa(e%,I%,(1<<22),FALSE):NEXTI%:PROCb(e%,14,"") 7030ELSE:FORI%=6TO11:PROCa(e%,I%,1<<21,(((a%?2)MOD16))=(I%-6)):PROCa(e%,I%,1<<22,n%):NEXTI%:PROCb(e%,14,FNa(a%+128)) 7090ENDIF 7090PROCa(e%,12,1<<22,T%=-1):PROCa(e%,13,1<<22,(((a%?3)AND128)>0)ORFNb):IFa%!4=-1THENPROCb(e%,13,"New �")ELSEPROCb(e%,13,"Next �") 7120IF(((a%?3)AND128)>0)ORFNbORn%THENKa%=0ELSEKa%=15 7130PROCl(e%,14,Ka%):PROCa(e%,16,1<<21,((a%?3)AND129)=1):PROCa(e%,16,1<<22,n%):PROCa(e%,17,1<<21,((a%?3)AND130)=2):PROCa(e%,17,1<<22,n%):PROCa(e%,18,1<<21,n%AND((a%?3)AND128)=0):PROCa(e%,18,1<<22,(((a%?3)AND128)>0)ORFNb) 7200PROCa(e%,20,1<<21,((a%?3)AND160)=32):PROCa(e%,20,1<<22,T%=-1ORn%ORFNb):PROCa(e%,21,1<<21,((a%?1)AND8)=8):PROCa(e%,21,1<<22,n%ORFNb):PROCa(e%,22,1<<21,((a%?1)AND16)=16):PROCa(e%,22,1<<22,n%ORFNb):F%=((a%?2)MOD16):CASEF%OF 7280WHEN0,1,4,5:IF(F%=0AND((a%?3)AND8)=0ANDa%!20<0)OR(F%=4AND((a%?3)AND8)=0)THEN 7300PROCb(m%,1,"Irrelevant") 7320ELSE:PROCb(m%,1,FNa(a%+56)) 7340ENDIF 7340FORI%=0TO3:PROCa(m%,I%+2,1<<21,((a%?2)DIV16)=I%):PROCa(m%,I%+2,1<<22,n%):NEXTI%:PROCa(m%,6,1<<21,((a%?3)AND4)=4):PROCa(m%,6,1<<22,((a%?2)DIV16)=0ORn%):PROCa(m%,7,1<<21,((a%?3)AND8)=8):PROCa(m%,7,1<<22,((a%?2)DIV16)=0ORn%):IF(a%?3AND4)=4THEN 7430PROCb(m%,9,FNa(a%+76)) 7450ELSE:PROCb(m%,9,"Irrelevant") 7470ENDIF 7470IFF%=4THEN 7480PROCb(m%,17,"Irrelevant") 7500ELSE:IF(a%?3AND16)=0THENPROCb(m%,17,"At pointer")ELSEPROCb(m%,17,FNa(a%+116)) 7510ENDIF 7520PROCa(M%,1,1<<21,(a%?24)=4):PROCa(M%,2,1<<21,(a%?24)=1):PROCa(M%,3,1<<21,(a%?25)=1):FORI%=1TO3:PROCa(M%,I%,1<<22,n%):NEXTI%:IFF%=4THEN 7590PROCa(j%,1,1<<21,((a%!28)AND1)=0):PROCa(j%,2,1<<21,((a%!28)AND1)=1):IF((a%!28)AND1)=0THEN 7620PROCb(j%,3,"Move to:"):PROCb(j%,12,"Scroll to:") 7650ELSE:PROCb(j%,3,"Move by:"):PROCb(j%,12,"Scroll by:") 7680ENDIF 7680PROCa(j%,16,1<<21,((a%!28)AND2)=2):PROCa(j%,17,1<<21,((a%!28)AND4)=4):PROCa(j%,18,1<<21,((a%!28)AND8)=8):PROCb(j%,4,STR$(a%!32)):PROCb(j%,6,STR$(a%!36)):PROCb(j%,8,STR$(a%!40)):PROCb(j%,10,STR$(a%!44)):PROCb(j%,13,STR$(a%!48)):PROCb(j%,15,STR$(a%!52)) 7770PROCa(j%,1,1<<22,n%):PROCa(j%,2,1<<22,n%):PROCa(j%,4,1<<22,n%OR((a%!28)AND10)=0):PROCa(j%,6,1<<22,n%OR((a%!28)AND10)=0):PROCa(j%,8,1<<22,n%OR((a%!28)AND2)=0):PROCa(j%,10,1<<22,n%OR((a%!28)AND2)=0):PROCa(j%,13,1<<22,n%OR((a%!28)AND4)=0) 7840PROCa(j%,15,1<<22,n%OR((a%!28)AND4)=0):IF((a%!28)AND2)=0THEN 7860PROCq(j%,7,17):PROCq(j%,11,17) 7890ELSE:PROCq(j%,7,23):PROCq(j%,11,23) 7920ENDIF 7920FORI%=16TO18:PROCa(j%,I%,1<<22,n%):NEXTI%:IF((a%!28)AND6)=0THEN 7960PROCb(m%,1,"Irrelevant"):PROCb(m%,9,"Irrelevant"):PROCb(m%,17,"Irrelevant"):FORI%=2TO7:PROCa(m%,I%,1<<22,TRUE):NEXTI% 8030ENDIF 8030ELSE:La%=FALSE:FORI%=0TO6:PROCa(G%,8+I%,1<<22,La%ORn%):PROCb(G%,8+I%,STR$((a%!((I%*4)+28))+1)):IFa%!((I%*4)+28)=-1THENLa%=TRUE 8090NEXTI% 8110ENDIF 8110PROCa(m%,20,1<<22,n%) 8130WHEN2,3:FORI%=2TO14:PROCa(t%,I%,(1<<22),n%):NEXTI%:FORI%=8TO10:PROCa(t%,I%,(1<<22),F%=3ORn%):NEXTI%:FORI%=11TO14:PROCa(t%,I%,(1<<22),F%=2ORn%):NEXTI%:FORI%=5TO6:PROCa(t%,I%,(1<<22),F%=2ORn%):NEXTI%:IFn%THENKa%=0ELSEKa%=15 8260PROCl(t%,1,Ka%):PROCb(t%,1,FNa(a%+12)) 8290ENDCASE 8290!q%=e%:SYS"Wimp_GetWindowState",,q%:IF((q%!32)AND65536)<>0THENPROCs 8320ENDPROC 8330 8350DEFPROCB(h$):FORMa%=0TO96:FORNa%=0TO7:IFa%(Ma%,Na%)<>-1THEN 8390IF!a%(Ma%,Na%)<>0THEN 8400Oa%=a%(Ma%,Na%)-4:Pa%=FALSE:s%=FALSE:REPEAT:Oa%=g%+Oa%!4:IFPa%THENQa%=((Oa%?3)AND32)=32ELSEQa%=FALSE 8450IFFNa(Oa%+128)=h$OR(h$="Autoexec"ANDLEFT$(FNa(Oa%+128),8)="Autoexec")ORQa%THEN 8460PROCA(Oa%):PROCg(6146):Pa%=s% 8500ENDIF 8500UNTILOa%!4=-1 8520ENDIF 8520ENDIF 8530NEXTNa%:NEXTMa%:MOUSERECTANGLEia%,ja%,ka%-ia%,la%-ja%:ENDPROC 8570 8590DEFPROCi:WHILEa%(B%,r%)=-1:r%=(r%+1)MOD8:ENDWHILE:a%=!a%(B%,r%):IFa%=0THEN 8640a%=FNf:T%=-1 8670ELSE:T%=!(g%+a%+8):a%+=g% 8700ENDIF 8700ENDPROC 8710 8730DEFFNf:Ra%=g%+2588:WHILE((Ra%?3)AND128)=0:Ra%+=k%:ENDWHILE:=Ra% 8800DEFPROCD(B%,r%,F%):w%=TRUE:LOCALv%:IF(a%?3AND128)>0THENv%=TRUE 8830IFv%ANDH%+g%+(2*k%)>g%+Sa%THEN 8840PROCf(0,"Sorry, I have no more memory",1):Ta%=FALSE 8870ELSE:IFv%THEN 8880a%?128=13:IFa%+k%=g%+H%THEN 8900H%+=k%:FORI%=a%+k%TOa%+(k%*2)-4:!I%=-1:NEXTI% 8950ENDIF 8950Ua%=-1 8970ELSE:Ua%=((a%?2)MOD16) 8990ENDIF 8990?a%=B%:a%?1=r%:a%?2=((a%?2)AND240)+F%:IFv%THEN 9030a%!4=-1:PROCea(B%,r%):IFVa%<>-1THEN 9060Va%!4=a%-g%:a%!8=Va%-g% 9090ELSE:!a%(B%,r%)=a%-g%:a%!8=-1 9120ENDIF 9120ENDIF 9130CASEF%OF 9140WHEN0,1,5:IFUa%=2ORUa%=3ORUa%=4ORv%THEN 9160IFF%=0THEN 9170a%?3=28:a%?2=F% 9200ELSE:a%?3=24:a%?2=F%+32 9230ENDIF 9230a%!12=-1:a%!16=-1:a%!20=-1:a%!24=4:FORI%=28TO52STEP4:a%!I%=-1:NEXTI%:$(a%+56)="-":$(a%+76)="-":a%!104=0:a%!108=0:a%!112=0:$(a%+116)="-" 9370ENDIF 9370WHEN2,3:IFUa%=0ORUa%=1ORUa%=4ORUa%=5ORv%THEN 9390FORI%=12TO124STEP4:a%!I%=0:NEXTI%:a%?3=0 9420ENDIF 9420WHEN4:IFUa%<>4ORv%THEN 9440a%?2=F%+16:a%?3=0:a%!12=0:a%!16=-1:a%!20=-1:a%!24=0:a%!28=3:FORI%=32TO52STEP4:a%!I%=0:NEXTI%:$(a%+56)="Irrelevant":$(a%+76)="-":a%!104=0:a%!108=0:a%!112=0:$(a%+116)="-" 9610ENDIF 9610ENDCASE 9620ENDIF 9630ENDPROC 9640 9660DEFPROCea(B%,r%):IF!a%(B%,r%)=0THEN 9670Va%=-1 9690ELSE:Va%=!a%(B%,r%)+g%:WHILEVa%!4<>-1:Va%=g%+Va%!4:ENDWHILE 9740ENDIF 9740ENDPROC 9750 9770DEFPROCz:IF((((a%?2)MOD16))AND2)=0THEN 9780SYS"Wimp_GetPointerInfo",,b%:IF((a%?2)AND15)=4AND((a%!28)AND14)=8THEN 9800a%!32=!b%:a%!36=b%!4:PROCc 9840ELSE:Wa%=b%!12:Xa%=b%!16:IF(Wa%<>m%ORXa%<>20)AND(F%<>4ORWa%>0)THEN 9860w%=TRUE:a%!16=Wa%:a%!20=Xa%:!b%=0:b%!16=0:SYS"Wimp_SendMessage",19,q%,Wa%,Xa%TO,,Ya%:a%!12=Ya%:$(a%+56)=FNn(Ya%):$(a%+76)=LEFT$(FNg(Ya%,Wa%,FALSE),27):$(a%+116)=LEFT$(FNo(Ya%,Wa%,Xa%),11):PROCfa(Wa%):a%!104=Za%:a%!108=_a%:a%!112=`a%:IF((a%?2)MOD16)<>0THEN 9990IFFNa(a%+76)="Icon bar"THEN 10000a%?2=(a%?2)AND15:a%?3=(a%?3)OR12 10030ELSE:IF(Za%AND(1<<20))=0THEN 10040a%?2=((a%?2)AND15)+(1<<4):a%?3=a%?3ANDNOT16 10070ELSE:a%?2=((a%?2)AND15)+(2<<4):a%?3=a%?3OR16 10100ENDIF 10100a%?3=((a%?3)AND243)+8 10120ENDIF 10120ELSE:IF(a%!20)<0THEN 10140a%?2=((a%?2)AND15)+(1<<4):a%?3=(a%?3)ANDNOT12 10170ENDIF 10170ENDIF 10180IF((a%?2)AND15)=4AND((a%!28)AND1)=0THEN 10190IF((a%!28)AND14)=8THEN 10200SYS"Wimp_GetPointerInfo",,b%:a%!32=!b%:a%!36=b%!4 10240ELSE:!b%=Wa%:SYS"Wimp_GetWindowState",,b%:a%!32=b%!4:a%!36=b%!8:a%!40=b%!12:a%!44=b%!16:a%!48=b%!20:a%!52=b%!24:a%!28=(a%!28)OR6 10340ENDIF 10340ENDIF 10350PROCc 10370ENDIF 10370ENDIF 10380ELSE:SYS"Wimp_GetPointerInfo",,b%:!q%=20:q%!16=0:q%!12=0:SYS"Wimp_SendMessage",19,q%,b%!12,b%!16TO,,l%:PROCe(FNg(l%,b%!12,TRUE)) 10440ENDIF 10440ENDPROC 10450 10470DEFPROCp(c%,V%):SYS"Wimp_GetPointerInfo",,b%:ab%=!b%:bb%=b%!4:cb%=b%!12:db%=b%!16:!q%=20:q%!12=0:SYS"Wimp_SendMessage",19,q%,cb%,db%TO,,eb%:!b%=ab%:b%!4=bb%:CASE((c%?2)DIV16)OF 10520WHEN0:IFFNg(c%!12,c%!16,TRUE)<>FNa(c%+76)THEN 10540PROCf(0,"The specified window has been deleted. Change the keystroke to 'Any window' or 'Window at pointer'. See the manual for more help.",1) 10560ELSE:IFNOTJa%THENSYS"Wimp_GetCaretPosition",,C%:SYS"Wimp_SetCaretPosition",-1 10570PROCv(c%!12,c%!16,c%!20,V%,ab%,bb%):IFV%=2THENPROCw(c%) 10590s%=TRUE 10610ENDIF 10610WHEN1:IFdb%>-2THEN 10630IFeb%=c%!12OR(V%<>2ANDc%!20<-1AND(c%?3AND8)=0)OR(V%=-1AND(c%?3AND8)=0)THEN 10640IFcb%>0THEN 10650!q%=cb%:SYS"Wimp_GetWindowInfo",,q%:fb%=TRUE:IF(((q%!32)ANDgb%)<>(c%!104)OR(q%!36)<>(c%!108)OR(q%!40)<>(c%!112))AND(c%?3AND8)=8THENfb%=FALSE 10690IF((q%!60)AND256)=0THEN 10700d$=FNa(q%+76) 10720ELSE:d$=FNe(eb%,q%!76) 10740ENDIF 10740IFLEFT$(d$,27)<>FNa(c%+76)AND(c%?3AND4)=4THENfb%=FALSE 10750IFfb%THEN 10760IFNOTJa%THENSYS"Wimp_GetCaretPosition",,C%:SYS"Wimp_SetCaretPosition",-1 10770IF(c%?3AND16)=16THENhb%=c%!20ELSEhb%=db% 10780PROCv(eb%,cb%,hb%,V%,ab%,bb%):IFV%=2THENPROCw(c%) 10800s%=TRUE 10820ENDIF 10820ENDIF 10830ENDIF 10840ENDIF 10850WHEN2,3:W%=FNk:FORib%=0TO252STEP4:S%!ib%=W%:IFW%<>-1THENW%=FNl(W%)ELSEjb%=ib% 10900NEXTib%:kb%=FALSE:ib%=jb%:WHILEib%>0AND(NOTkb%OR((c%?2)DIV16)=3):W%=S%!ib%:!q%=20:q%!12=0:SYS"XWimp_SendMessage",19,q%,W%,-1TO,,lb%:IFlb%<>0ANDlb%<>W%THEN 10970!q%=W%:SYS"Wimp_GetWindowInfo",,q%:fb%=TRUE:IF((q%!32ANDgb%)<>(c%!104)OR(q%!36)<>(c%!108)OR(q%!40)<>(c%!112))AND(c%?3AND8)=8THENfb%=FALSE 11010IFLEFT$(FNg(lb%,W%,FALSE),27)<>FNa(c%+76)AND((c%?3)AND4)=4THENfb%=FALSE 11020IFNOT(lb%=c%!12OR(V%<>2ANDc%!20<-1AND(c%?3AND8)=0)OR(V%=-1AND(c%?3AND8)=0))THENfb%=FALSE 11030IFfb%THEN 11040IFNOTJa%THENSYS"Wimp_GetCaretPosition",,C%:SYS"Wimp_SetCaretPosition",-1 11050PROCv(lb%,W%,c%!20,V%,ab%,bb%):IFV%=2THENPROCw(c%) 11070kb%=TRUE:s%=TRUE 11100ENDIF 11100ENDIF 11110ib%-=4:ENDWHILE 11140ENDCASE 11140ENDPROC 11150 11170DEFPROCw(c%):CASE(c%?2MOD16)OF 11180WHEN1:FORI%=0TO24STEP4:b%!I%=c%!(I%+28):NEXTI%:b%!28=-1:SYS"Wimp_SendMessage",9,b%,c%!12:s%=TRUE:PROCg(6146):SYS"Wimp_CreateMenu",,-1 11280WHEN5:SYS"Wimp_CreateMenu",,-1:PROCg(6146):!b%=64:b%!12=0:b%!16=262336:b%!20=1:b%!24=ab%-64:b%!28=bb%+44:FORI%=0TO24STEP4:b%!(I%+32)=c%!(I%+28):NEXTI%:b%!60=-1:SYS"Wimp_SendMessage",17,b%,c%!12:s%=TRUE 11390ENDCASE 11390ENDPROC 11400 11420DEFPROCv(l%,f%,h%,mb%,x%,y%):IFf%>0THEN 11430!q%=f%:SYS"Wimp_GetWindowState",,q%:IF((q%!32)AND(1<<31))<>0THENv%=TRUEELSEv%=FALSE 11460nb%=(v%AND(q%!32AND(1<<30))<>0)OR(NOTv%AND(q%!32AND(1<<3))<>0):ob%=(v%AND(q%!32AND(1<<28))<>0)OR(NOTv%AND(q%!32AND(1<<2))<>0) 11490ELSE:nb%=FALSE:ob%=FALSE 11510ENDIF 11510IFmb%=-1THEN 11520IF((c%!28)AND6)=0THEN 11530IF((c%!28)AND8)=8THEN 11540IF((c%!28)AND1)=0THEN 11550MOUSETOc%!32,c%!36 11570ELSE:MOUSEFa%,Ga%,Ha%:MOUSETOFa%+c%!32,Ga%+c%!36:ga%=TRUE 11610ENDIF 11610ENDIF 11620ELSE:IFf%>0ANDl%>0THEN 11640!q%=f%:SYS"Wimp_GetWindowState",,q%:IF((c%!28)AND1)=0THEN 11670IF((c%!28)AND2)=2THEN 11680IF((c%!28)AND8)=8THEN 11690MOUSEFa%,Ga%,Ha%:pb%=(c%!32)-(q%!4):qb%=(c%!36)-(q%!8):MOUSETOFa%+pb%,Ga%+qb% 11740ENDIF 11740q%!4=c%!32:q%!8=c%!36:q%!12=c%!40:q%!16=c%!44 11790ELSE:IF((c%!28)AND8)=8THENMOUSETOc%!32,c%!36 11800ENDIF 11810IF((c%!28)AND4)=4THEN 11820IFnb%THENq%!20=c%!48 11830IFob%THENq%!24=c%!52 11840ENDIF 11850ELSE:IF((c%!28)AND2)=2THEN 11870q%!4=q%!4+c%!32:q%!8=q%!8+c%!36:q%!12=q%!12+c%!40:q%!16=q%!16+c%!44 11920ENDIF 11920IF((c%!28)AND4)=4THEN 11930IFnb%THENq%!20=q%!20+c%!48 11940IFob%THENq%!24=q%!24+c%!52 11950ENDIF 11960IF((c%!28)AND8)=8THEN 11970MOUSEFa%,Ga%,Ha%:pb%=c%!32:qb%=c%!36:MOUSETOFa%+pb%,Ga%+qb% 12020ENDIF 12020ga%=TRUE 12040ENDIF 12040SYS"Wimp_SendMessage",2,q%,l% 12060ENDIF 12060ENDIF 12070s%=TRUE 12090ELSE:IFh%<-1THEN 12100CASEh%OF 12110WHEN-2:!q%=f%:SYS"Wimp_GetWindowState",,q%:IF(v%AND(q%!32AND(1<<24))<>0)OR(NOTv%AND(q%!32AND(1<<7))=0)THEN 12150q%!28=-2:SYS"Wimp_SendMessage",2,q%,l%:s%=TRUE 12190ENDIF 12190WHEN-3:!q%=f%:SYS"Wimp_GetWindowState",,q%:IF(v%AND(q%!32AND(1<<25))<>0)OR(NOTv%AND(q%!32AND(1<<7))=0)THEN 12230SYS"Wimp_SendMessage",3,q%,l%:s%=TRUE 12260ENDIF 12260WHEN-4,-9:IF(mb%AND255)=4THEN 12280!q%=f%:SYS"Wimp_GetWindowState",,q%:IF(v%AND(q%!32AND(1<<26))<>0)OR(NOTv%AND(q%!32AND1)<>0)THEN 12310q%!28=-1:SYS"Wimp_SendMessage",2,q%,l%:s%=TRUE 12350ENDIF 12350ENDIF 12360WHEN-5:!q%=f%:SYS"Wimp_GetWindowState",,q%:IF((q%!32)AND(1<<18))<>0THEN 12400q%!8=q%!16:q%!12=q%!4 12430ELSE:q%!8=-4096:q%!12=4096 12460ENDIF 12460IF(v%AND(q%!32AND(1<<27))<>0)OR(NOTv%AND(q%!32AND1)<>0)THEN 12470SYS"Wimp_SendMessage",2,q%,l%:s%=TRUE 12500ENDIF 12500WHEN-6:!q%=f%:SYS"Wimp_GetWindowState",,q%:IFob%THEN 12540q%!24=(q%!24)+32:SYS"Wimp_SendMessage",2,q%,l%:ga%=TRUE:s%=TRUE 12590ENDIF 12590WHEN-8:!q%=f%:SYS"Wimp_GetWindowState",,q%:IFob%THEN 12630q%!24=(q%!24)-32:SYS"Wimp_SendMessage",2,q%,l%:ga%=TRUE:s%=TRUE 12680ENDIF 12680WHEN-10:!q%=f%:SYS"Wimp_GetWindowState",,q%:IFnb%THEN 12720q%!20=(q%!20)-32:SYS"Wimp_SendMessage",2,q%,l%:ga%=TRUE:s%=TRUE 12770ENDIF 12770WHEN-12:!q%=f%:SYS"Wimp_GetWindowState",,q%:IFnb%THEN 12810q%!20=(q%!20)+32:SYS"Wimp_SendMessage",2,q%,l%:ga%=TRUE:s%=TRUE 12860ENDIF 12860ENDCASE 12870ELSE:rb%=-1:IFh%=-1THEN 12900!q%=f%:SYS"Wimp_GetWindowInfo",,q%:rb%=(q%!64)>>12:sb%=-1 12950ELSE:!b%=f%:b%!4=h%:b%!24=0:SYS"XWimp_GetIconState",,b%:IFb%!24<>0THENrb%=(b%!24>>12)AND15:sb%=(b%!24>>16)AND31 13000ENDIF 13010IFrb%=-1THEN 13020PROCf(0,"The specific window has been deleted. Change the keystroke to 'Any window' or 'Window at pointer'. See the manual for more help.",1) 13040ELSE:tb%=mb%AND255:ub%=mb%>255:!b%=x%:b%!4=y%:b%!12=f%:b%!16=h%:IFtb%=2THEN 13110b%!8=2:SYS"Wimp_SendMessage",6,b%,l% 13140ELSE:CASErb%OF 13150WHEN0,12,13 13170WHEN1,2,3,4,6,9:b%!8=tb%:SYS"Wimp_SendMessage",6,b%,l%:s%=TRUE:IFrb%=2THENga%=TRUE 13210WHEN5,8:IFub%THEN 13230b%!8=tb%:SYS"Wimp_SendMessage",6,b%,l%:s%=TRUE 13270ELSE:IFtb%=4ANDsb%<>0THEN 13280PROCa(f%,h%,1<<21,TRUE) 13300ELSE:Ha%=FNp(f%,h%,1<<21) 13320ENDIF 13320ENDIF 13330WHEN7,11:b%!8=tb%:SYS"Wimp_SendMessage",6,b%,l%:s%=TRUE:IFtb%=4ANDsb%<>0THEN 13380PROCa(f%,h%,1<<21,TRUE) 13400ELSE:Ha%=FNp(f%,h%,1<<21) 13420ENDIF 13420WHEN10:IFub%THEN 13440b%!8=tb% 13460ELSE:b%!8=tb%*256 13480ENDIF 13480SYS"Wimp_SendMessage",6,b%,l%:s%=TRUE 13510WHEN14:b%!8=tb%:SYS"Wimp_SendMessage",6,b%,l%:s%=TRUE:SYS"Wimp_SetCaretPosition",f%,h%,-1,-1,NOT(1<<25),-1 13560WHEN15:SYS"Wimp_SetCaretPosition",f%,h%,-1,-1,NOT(1<<25),-1:s%=TRUE 13590ENDCASE 13590ENDIF 13600ENDIF 13610ENDIF 13620ENDIF 13630ENDPROC 13640 13660DEFPROCh(d%,vb%):IF(d%?3AND128)=0THEN 13670wb%=-((d%!4)<>-1)-2*((d%!8)<>-1):CASEwb%OF 13690WHEN0:!a%(?d%,((d%?1)AND7))=0 13720WHEN1:!a%(?d%,((d%?1)AND7))=d%!4:!(8+g%+d%!4)=-1 13750WHEN2:!(4+g%+d%!8)=-1 13770WHEN3:!(8+g%+d%!4)=d%!8:!(4+g%+d%!8)=d%!4 13800ENDCASE 13800d%?3=d%?3OR128:IFd%!8=-1THEN 13820PROCi 13840ELSE:IFd%!4=-1THENa%=g%+d%!8ELSEa%=g%+d%!4 13850ENDIF 13860IF(a%?3AND128)=0THENT%=a%!8ELSET%=-1 13870FORI%=4TOk%-4STEP4:d%!I%=-1:NEXTI%:d%?2=255:WHILE(?(g%+H%-(2*k%)+3)AND128)=128:!(g%+H%-(2*k%))=-1:H%-=k%:ENDWHILE:IFa%!8=-1AND((a%?3)AND128)=0THENa%?3=a%?3ANDNOT32 13960IFvb%THENPROCc 13970ENDIF 13980ENDPROC 13990 14010DEFPROCca(xb%,k$):PROCx(xb%,k$):FORd%=g%+2588TOg%+H%-k%STEPk%:IF((d%?3)AND128)=0THEN 14040IFFNa(d%+56)=k$AND((d%?2)MOD16)<>2AND((d%?2)MOD16)<>3THEN 14050d%!12=xb%:IF((d%?2)DIV16)=0THENd%!16=FNq(FNa(d%+76)) 14070IFd%!16=-2THENd%!20=FNr(FNa(d%+116)) 14080ENDIF 14090ENDIF 14100NEXTd%:ENDPROC 14120 14140DEFPROCda(xb%):FORd%=g%+2588TOg%+H%-k%STEPk%:IF((d%?3)AND128)=0AND((d%?2)MOD16)<>2AND((d%?2)MOD16)<>3ANDd%!12=xb%THEN 14160d%!12=-1:IF((d%?2)DIV16)=0THENd%!16=-1 14180ENDIF 14190NEXTd%:FORI%=0TOyb%:IFb%(I%)=xb%THENb%(I%)=0:b$(I%)="" 14220NEXTI%:ENDPROC 14240 14260DEFFNb:zb%=FALSE:IF(a%?3AND128)=0THEN 14280IF(((a%?2)MOD16)AND2)=2THEN 14290IFFNa(a%+12)=""THENzb%=TRUE 14300ELSE:IF((a%?2)MOD16)=4THEN 14320IF((a%!28)AND14)=0THENzb%=TRUE 14330IF((a%!28)AND1)=1ANDa%!32=0ANDa%!36=0ANDa%!48=0ANDa%!52=0THENzb%=TRUE 14340ELSE:IFFNa(a%+56)="-"THENzb%=TRUE 14360ENDIF 14370ENDIF 14380ENDIF 14390=zb% 14420DEFPROCba:IFq%!20=t%THEN 14430a$=FNa(q%+44):IF((a%?2)MOD16)=2THEN 14450IFa$<>"<Wimp$Scrap>"THEN 14460CASEq%!24OF 14470WHEN8:$(a%+12)="Run "+a$:PROCb(t%,1,FNa(a%+12)) 14510WHEN9:CASEq%!40OF 14520WHEN4096,8192:$(a%+12)="Filer_OpenDir "+a$:PROCb(t%,1,FNa(a%+12)) 14560WHEN3548:$(a%+12)="Run "+a$:PROCb(t%,1,FNa(a%+12)) 14590OTHERWISE:o%=0:WHILEINSTR(a$,".",o%+1)<>0:o%=INSTR(a$,".",o%+1):ENDWHILE:$(a%+12)="Filer_OpenDir "+LEFT$(a$,o%-1):PROCb(t%,1,FNa(a%+12)) 14660ENDCASE 14660WHEN10:IFq%!40<>4096ANDq%!40<>8192THEN 14680$(a%+12)="Load "+a$:PROCb(t%,1,FNa(a%+12)) 14710ENDIF 14710OTHERWISE:PROCe(a$) 14730ENDCASE 14730PROCa(e%,13,(1<<22),(((a%?3)AND128)>0)ORFNb):PROCa(e%,18,1<<21,n%AND((a%?3)AND128)=0):PROCa(e%,18,1<<22,(((a%?3)AND128)>0)ORFNb):PROCa(e%,20,1<<21,((a%?3)AND160)=32):PROCa(e%,20,1<<22,T%=-1ORn%ORFNb):IF(((a%?3)AND128)>0)ORFNbORn%THENKa%=0ELSEKa%=15 14790PROCl(e%,14,Ka%) 14810ENDIF 14810ELSE:f$=FNc(t%,1):Ab%=115-LEN(f$):SYS"OS_File",5,a$TOBb%,,Cb%:Db%=(Cb%AND&FFF00)>>8:IFBb%=1AND(Db%=4095ORDb%=4094ORDb%=4075)THEN 14870SYS"OS_Find",64,a$TOEb%:IFEXT#Eb%<Ab%THENAb%=EXT#Eb% 14890o%=b%:WHILEAb%>0:SYS"OS_BGet",,Eb%TOFb%:IFFb%<32THEN 14930IFFb%=10THENFb%=13 14940?o%=ASC("|"):o%+=1:Ab%-=1:?o%=Fb%+64:o%+=1:Ab%-=1 14970ELSE:?o%=Fb%:o%+=1:Ab%-=1 15000ENDIF 15000ENDWHILE:SYS"OS_Find",0,Eb%:?o%=0:PROCe(FNa(b%)) 15050ELSE:PROCe(a$) 15070ENDIF 15070ENDIF 15080q%!12=q%!8:q%!16=4:!q%=256:SYS"Wimp_SendMessage",17,q%,q%!4 15130ELSE:IFq%!40=4093THEN 15140a$=FNa(q%+44):q%!12=q%!8:q%!16=4:!q%=256:SYS"Wimp_SendMessage",17,q%,q%!4:PROCC(a$):SOUND1,-15,100,5:IFa$="<Wimp$Scrap>"THEN 15220SYS"OS_File",6,"<Wimp$Scrap>" 15240ELSE:l$=a$ 15260ENDIF 15260ENDIF 15270ENDIF 15280ENDPROC 15290 15310DEFPROCn(Gb%,Hb%):SYS"Wimp_GetPointerInfo",,q%:IFq%!12<>A%THEN 15330q%!20=q%!12:q%!24=q%!16:q%!28=!q%:q%!32=q%!4:q%!36=Gb%:q%!40=Hb%:e$=FNc(A%,1):WHILEINSTR(e$,".")>0:e$=RIGHT$(e$,LEN(e$)-INSTR(e$,".")):ENDWHILE:IFLEN(e$)>0ANDLEN(e$)<11THEN 15440$(q%+44)=e$:q%!12=0:!q%=256:q%!16=1:SYS"Wimp_SendMessage",18,q%,q%!20,q%!24 15500ELSE:PROCf(0,"Please enter a filename of up to 10 letters",1) 15520ENDIF 15520ENDIF 15530ENDPROC 15540 15560DEFPROCJ(a$):SYS"OS_File",5,a$TO,,,,,Ib%:IF(Ib%AND8)=8THEN 15580PROCf(0,"The file '"+a$+"' is locked",1) 15600ELSE:SYS"OS_Find",128,a$TOJb%:PROCr("!KeysDemo V2.00, Demonstration version Beta",Jb%):PROCr("List of keystrokes",Jb%):SYS"OS_BPut",10,Jb%:FORKb%=0TO7:FORLb%=0TO96:IFa%(Lb%,Kb%)<>-1THEN 15670IF!a%(Lb%,Kb%)<>0THEN 15680X%=a%(Lb%,Kb%)-4:F$="":REPEAT:X%=g%+X%!4:c$="":IF(Kb%AND4)THENc$+="Alt+" 15740IF(Kb%AND2)THENc$+="Ctrl+" 15750IF(Kb%AND1)THENc$+="Shift+" 15760c$+=a$(Lb%)+": ":c$+=FNa(X%+128):IFNOT(((X%?2)MOD16)=0ANDX%!20<0AND(X%?3AND8)=0)THEN 15790IF((X%?2)AND2)=0THENc$+=" ("+FNa(X%+56)+")" 15800ENDIF 15810IF(X%?3AND32)=0THENPROCr(c$,Jb%) 15820UNTILX%!4=-1 15840ENDIF 15840ENDIF 15850NEXTLb%:NEXTKb%:SYS"OS_Find",0,Jb%:SYS"OS_File",18,a$,4095 15900ENDIF 15900ENDPROC 15910 15930DEFPROCu(a$):PROCf(0,"Saving is not possible on this demonstration version",1):ENDPROC 15950 15970DEFPROCC(a$):PROCf(0,"Loading is not possible on this demostration version",1):ENDPROC 15990 16010DEFPROCga:FORMb%=0TO63:q%!12=0:SYS"XWimp_SendMessage",19,q%,-2,Mb%TO,,l%:IFl%<>-2ANDl%<>0THENPROCx(l%,"") 16040NEXTMb%:Nb%=FNk:WHILENb%<>-1:q%!12=0:SYS"XWimp_SendMessage",19,q%,Nb%,-1TO,,l%:IFl%<>Nb%ANDl%<>0THENPROCx(l%,"") 16090Nb%=FNl(Nb%):ENDWHILE:ENDPROC 16120 16140DEFPROCx(xb%,k$):Ob%=-1:Pb%=-1:FORJ%=yb%TO0STEP-1:IFb%(J%)=0THENOb%=J% 16170IFb%(J%)=xb%THENPb%=J% 16180NEXTJ%:IFPb%=-1THEN 16200b%(Ob%)=xb%:IFk$=""THENk$=FNn(xb%) 16220b$(Ob%)=k$ 16240ENDIF 16240ENDPROC 16250 16270DEFPROCI:$g%="Keystrokes"+z$:FORQb%=12TO2584STEP4:g%!Qb%=0:NEXTQb%:FORI%=2588TO2588+k%-4STEP4:g%!I%=-1:NEXTI%:H%=2588+k%:ENDPROC 16360 16380DEFPROCG(Y%):Rb%=p%:FORI%=0TOk%-4STEP4:p%!I%=Y%!I%:NEXTI%:Y%=g%+Y%!4:Rb%+=k%:WHILEY%>g%AND(Y%?3AND32)<>0ANDRb%<p%+k%*10:FORI%=0TOk%-4STEP4:Rb%!I%=Y%!I%:NEXTI%:Y%=g%+Y%!4:Rb%+=k%:ENDWHILE:IFRb%<p%+k%*10THEN 16520FORI%=Rb%TOp%+k%*9STEPk%:!I%=0:NEXTI% 16560ENDIF 16560ENDPROC 16570 16590DEFPROCF(Y%):FORI%=0TOk%-4STEP4:p%!I%=Y%!I%:NEXTI%:p%!k%=0:p%?3=(p%?3)ANDNOT32:ENDPROC 16650 16670DEFPROC`(Sb%):Tb%=Sb%!4:Ub%=(?(g%+Tb%+3)AND32):PROCh(Sb%,FALSE):Sb%=g%+Tb%:Vb%=1:WHILETb%>0ANDVb%<10ANDUb%<>0:Tb%=Sb%!4:Ub%=(?(g%+Tb%+3)AND32):PROCh(Sb%,FALSE):Sb%=g%+Tb%:Vb%+=1:ENDWHILE:PROCc:ENDPROC 16810 16830DEFPROCN(d%):kb%=TRUE:IFd%<>-1THEN 16850IF(d%?3AND64)<>0AND(d%?3AND128)=0THENkb%=FALSE 16860ENDIF 16870IFkb%THEN 16880Wb%=a%:a%=d%:Ta%=TRUE:PROCD(B%,r%,p%?2):IFTa%THEN 16930a%=Wb%:d%?3=p%?3:d%?2=p%?2:FORI%=12TOk%-4STEP4:d%!I%=p%!I%:NEXTI% 17000ENDIF 17000ELSE:PROCf(0,"This keystroke is locked",1) 17030ENDIF 17030ENDPROC 17040 17060DEFPROCH(d%):Xb%=k%:WHILE!(Xb%+p%+4)<>-1ANDXb%<(k%*10):Xb%+=k%:ENDWHILE:IF(g%+H%+Xb%+k%)>g%+Sa%THEN 17110PROCf(0,"Sorry, I have no more memory",1) 17130ELSE:PROCN(d%):Yb%=d%:Zb%=p%:p%+=k%:IFd%!4=-1THEN_b%=FNfELSE_b%=g%+d%!4 17180WHILEp%<Zb%+k%*10AND(p%?3AND32)<>0:IF(_b%?3AND128)=0THENPROCy(_b%)ELSEPROCN(_b%):_b%=FNf 17200p%+=k%:ENDWHILE:p%=Zb%:a%=Yb%:IFa%!8=-1THENa%?3=a%?3ANDNOT32 17250ENDIF 17260ENDPROC 17270 17290DEFPROCm(g$):IFINSTR(g$,".")=0THEN 17300PROCf(0,"To save, drag the file to a directory display",1) 17320ELSE:CASEU%OF 17330WHEN1:PROCu(g$):l$=g$ 17350WHEN2:PROCJ(g$):o$=g$ 17360WHEN4:PROCK(g$):u$=g$ 17370ENDCASE 17370SYS"Wimp_CreateMenu",,-1 17390ENDIF 17390ENDPROC 17400 17420DEFPROCaa(a$):SYS"OS_Find",128,a$TO`b%:PROCr("Set Keystroke$Do0 "+FNa(a%+128),`b%):SYS"OS_Find",0,`b%:SYS"OS_File",18,a$,4075:ENDPROC 17470 17490DEFPROCy(ac%):IFH%+g%+k%>g%+Sa%THEN 17500PROCf(0,"Sorry, I have no more memory",1) 17520ELSE:Tb%=ac%-g%:bc%=ac%!8:d%=FNf:?d%=B%:d%?1=(d%?1AND248)+r%:d%?2=p%?2:d%?3=p%?3:d%!4=Tb%:d%!8=bc%:FORI%=12TOk%-4STEP4:d%!I%=p%!I%:NEXTI%:IFd%+k%=g%+H%THEN 17650H%+=k%:FORI%=d%+k%TOd%+(k%*2)-4:!I%=-1:NEXTI% 17700ENDIF 17700IFd%!4<>-1THEN!(8+g%+d%!4)=d%-g% 17710IFd%!8<>-1THEN 17720!(4+g%+d%!8)=d%-g% 17740ELSE:!a%(B%,r%)=d%-g% 17760ENDIF 17760a%=d% 17780ENDIF 17780ENDPROC 17790 17810DEFPROC_(d%):PROCy(d%):Yb%=d%:Zb%=p%:p%+=k%:d%=g%+d%!4:WHILEp%<Zb%+k%*10AND(p%?3AND32)<>0:PROCy(d%):p%+=k%:d%=g%+d%!4:ENDWHILE:a%=Yb%:p%=Zb%:ENDPROC 17940 17960DEFPROCK(a$):PROCf(0,"Saving is not possible on this demonstration version",1):ENDPROC 17980 18000DEFPROCt(cc%,dc%,ec%):SYS"OS_GSTrans","<Keystroke%Var>",Ba%,8:SYS"OS_GSTrans","<Keystroke%Inc>",Ca%,8:IFcc%=-2THEN 18030SYS"XOS_ReadVarVal","Executor$Dir",b%,-1,0TO,,fc%:IFfc%THENz%!84=&7009001ELSEz%!84=&7409001 18050IFH%>2588+k%THENu%!108=&7009001ELSEu%!108=&7409001 18060SYS"Wimp_CreateMenu",,u%,(!q%)-64,340:xa%=cc%:Da%=(!q%)-64:Ea%=340 18110ELSE:IFq%!12=e%ANDq%!16=4THEN 18120$(a%+128)=FNc(e%,14):IFFNbTHENPROCh(a%,TRUE) 18140B%=95:r%=-INKEY(-1)-2*INKEY(-2)-4*INKEY(-3):PROCi:PROCc 18190ELSE:IFFNa(a%+128)<>""THENi%!180=&7009001ELSEi%!180=&7409001 18200IF!p%=-1THENi%!132=&7409001:i%!156=&7409001ELSEi%!132=&7009001:i%!156=&7009001 18210IF(a%?3AND128)=0THENi%!36=&7009001:i%!60=&7009001:i%!84=&7009001:i%!108=&7009001ELSEi%!36=&7409001:i%!60=&7409001:i%!84=&7409001:i%!108=&7409001 18220SYS"Wimp_CreateMenu",,i%,(!q%)-64,(q%!4)+44:xa%=cc%:Da%=(!q%)-64:Ea%=(q%!4)+44 18270ENDIF 18270ENDIF 18280ENDPROC 18290 18310DEFPROCM:PROCb(wa%,0,""):!b%=wa%:SYS"Wimp_GetWindowState",,b%:SYS"Wimp_OpenWindow",,b%:SYS"Wimp_GetCaretPosition",,L%:SYS"Wimp_SetCaretPosition",wa%,0,-1,-1,NOT(1<<25),-1:n$="<None>":REPEAT:SYS"Wimp_Poll",6146,q%TOca% 18400IFca%=8AND!q%=wa%ANDq%!24=13THENn$=FNc(wa%,0) 18410IF(ca%=17ORca%=18)ANDq%!16=0THENSYS"OS_Exit" 18420UNTILn$<>"<None>":OSCLI("Set Keystroke$Input "+n$):SYS"Wimp_SetCaretPosition",!L%,L%!4,L%!8,L%!12,L%!16,L%!20:!b%=wa%:SYS"Wimp_CloseWindow",,b%:ENDPROC 18480 18500DEFFNm:LOCALL%:SYS"OS_GSTrans","<Keystroke%Inc>",q%,8192:L%=VAL(FNa(q%)):SYS"OS_GSTrans","<Keystroke%Var>",q%,8192:gc%=VAL(FNa(q%)):IFL%<0THEN 18560IFgc%+L%<-999THENs$=""ELSEs$=STR$L% 18570ELSE:IFgc%+L%>9999THENs$=""ELSEs$="+"+STR$L% 18590ENDIF 18600=s$ 18650DEFPROCf(hc%,A$,ic%):!b%=hc%:$(b%+4)=A$:SYS"Wimp_ReportError",b%,ic%,"Keystroke"TO,jc%:IFjc%=2THENSYS"Wimp_CloseDown":SYS"OS_Exit" 18680da%=FALSE:ENDPROC 18700 18720DEFFNi(B$):!b%=0:$(b%+4)=B$:SYS"Wimp_ReportError",b%,3,"Keystroke"TO,jc%:=(jc%=1) 18770DEFPROCb(f%,h%,c$):!b%=f%:b%!4=h%:SYS"Wimp_GetIconState",,b%:$(b%!28)=LEFT$(c$,(b%!32)-1):b%!8=0:b%!12=0:SYS"Wimp_SetIconState",,b%:ENDPROC 18850 18870DEFPROCa(f%,h%,kc%,lc%):!b%=f%:b%!4=h%:b%!12=kc%:b%!8=-lc%*kc%:SYS"Wimp_SetIconState",,b%:ENDPROC 18930 18950DEFPROCl(f%,h%,mc%):!b%=f%:b%!4=h%:b%!8=mc%<<12:b%!12=61440:SYS"Wimp_SetIconState",,b%:IFmc%<14THEN 19010IF!C%=f%ANDC%!4=h%THEN!C%=-1ANDC%!4=-1 19020ENDIF 19030ENDPROC 19040 19060DEFPROCq(f%,h%,nc%):!b%=f%:b%!4=h%:b%!8=nc%<<24:b%!12=-16777216:SYS"Wimp_SetIconState",,b%:ENDPROC 19120 19140DEFFNd(f%,h%,kc%):!b%=f%:b%!4=h%:SYS"Wimp_GetIconState",,b%:=(b%!24ANDkc%)>0 19200DEFFNa(o%):p$="":WHILE(?o%>31AND?o%<256)ANDLEN(p$)<255:p$=p$+CHR$?o%:o%=o%+1:ENDWHILE:=p$ 19280DEFFNe(l%,o%):SYS"Wimp_TransferBlock",l%,o%,oc%,b%,256:o%=b%:p$="":WHILE(?o%>31AND?o%<256)ANDLEN(p$)<255:p$=p$+CHR$?o%:o%=o%+1:ENDWHILE:=p$ 19380DEFPROCk(f%):!q%=f%:SYS"Wimp_GetWindowState",,q%:pc%=pa%-(q%!4):qc%=qa%-(q%!16)-1:q%!4=(q%!4)+pc%:q%!8=(q%!8)+qc%:q%!12=(q%!12)+pc%:q%!16=(q%!16)+qc%:q%!28=ta%:SYS"Wimp_OpenWindow",,q%:pa%=q%!4:qa%=q%!8:ra%=!q%:ENDPROC 19490 19510DEFPROCd(f%):!b%=f%:SYS"Wimp_CloseWindow",,b%:ENDPROC 19540 19560DEFFNn(l%):!q%=24:q%!12=0:q%!16=262342:q%!20=l%:SYS"Wimp_SendMessage",18,q%,0:j$="":REPEAT:PROCg(6147):UNTILj$<>"":=j$ 19650DEFFNg(l%,f%,rc%):CASEf%OF 19660WHEN-1:d$="Background" 19680WHEN-2:d$="Icon bar" 19690OTHERWISE:!q%=f%:IFrc%THEN 19710q%!32=0:SYS"XWimp_GetWindowInfo",,q%:IFq%!32=0THEN 19740d$="Nonexistent" 19760ELSE:v%=(((q%!32)AND(1<<31))<>0):IF(v%AND(q%!32AND(1<<26))<>0)OR(NOTv%AND(q%!32AND1)<>0)ORq%?36<>255THEN 19780IF((q%!60)AND256)=0THEN 19790d$=FNa(q%+76) 19810ELSE:d$=FNe(l%,q%!76) 19830ENDIF 19830ELSE:d$="No title" 19860ENDIF 19860ENDIF 19870ELSE:SYS"Wimp_GetWindowInfo",,q%:v%=(((q%!32)AND(1<<31))<>0):IF(v%AND(q%!32AND(1<<26))<>0)OR(NOTv%AND(q%!32AND1)<>0)ORq%?36<>255THEN 19910IF((q%!60)AND256)=0THEN 19920d$=FNa(q%+76) 19940ELSE:d$=FNe(l%,q%!76) 19960ENDIF 19960ELSE:d$="No title" 19990ENDIF 19990ENDIF 20000ENDCASE 20010=d$ 20040DEFFNo(l%,f%,h%):CASEh%OF 20050WHEN-1:b$="Background" 20070WHEN-2:b$="Back Icon" 20080WHEN-3:b$="Close Icon" 20090WHEN-4:b$="Title Bar" 20100WHEN-5:b$="Toggle Icon" 20110WHEN-6:b$="Scroll Up" 20120WHEN-7:b$="V Bar" 20130WHEN-8:b$="Scroll Down" 20140WHEN-9:b$="Adjust Size" 20150WHEN-10:b$="ScrollRight" 20160WHEN-11:b$="H Bar" 20170WHEN-12:b$="Scroll Left" 20180OTHERWISE:!q%=f%:q%!4=h%:SYS"Wimp_GetIconState",,q%:IF(((q%!24)AND61440)>>12)>13THEN 20220b$="Variable" 20240ELSE:IF((q%!24)AND256)=0THEN 20250b$=FNa(q%+28) 20270ELSE:IF((q%!24)AND1)=0THEN 20280b$=FNe(l%,q%!28) 20300ELSE:IF(q%!32)=-1THENv$=""ELSEv$=FNe(l%,q%!32) 20310b$=FNe(l%,q%!28):IFb$=""THENb$=MID$(v$,2,INSTR(v$,",")-2) 20330ENDIF 20340ENDIF 20350ENDIF 20360ENDCASE 20370=b$ 20400DEFPROCfa(f%):IFf%<0THEN 20410Za%=0:_a%=0:`a%=0 20450ELSE:!q%=f%:SYS"Wimp_GetWindowInfo",,q%:Za%=q%!32ANDgb%:_a%=q%!36:`a%=q%!40 20510ENDIF 20510ENDPROC 20520 20540DEFFNp(f%,h%,kc%):!b%=f%:b%!4=h%:b%!8=kc%:b%!12=0:SYS"Wimp_SetIconState",,b%:SYS"Wimp_GetIconState",,b%:=(b%!24ANDkc%)>0 20630DEFFNq(x$):CASEx$OF 20640WHEN"Background":sc%=-1 20660WHEN"Icon bar":sc%=-2 20670OTHERWISE:sc%=-1:K%=FNk:WHILEK%<>-1ANDsc%=-1:!q%=20:q%!12=0:SYS"XWimp_SendMessage",19,q%,K%,-1TO,,tc%:IFtc%<>0ANDtc%<>K%THEN 20720IFx$=LEFT$(FNg(tc%,K%,FALSE),27)THENsc%=K% 20730ENDIF 20740K%=FNl(K%):ENDWHILE 20770ENDCASE 20770=sc% 20800DEFFNr(C$):uc%=-1:vc%=0:WHILEvc%<256ANDuc%=-1:!q%=20:q%!12=0:SYS"XWimp_SendMessage",19,q%,-2,vc%TO,,wc%:IFwc%<>0ANDwc%<>-2THEN 20850IFC$=LEFT$(FNo(wc%,-2,vc%),11)THENuc%=vc% 20860ENDIF 20870vc%+=1:ENDWHILE:=uc% 20920DEFPROCE:SYS"Wimp_GetPointerInfo",,b%:q%!4=5:q%!8=(!b%)-34:q%!12=(b%!4)-34:q%!16=(!b%)+34:q%!20=(b%!4)+34:q%!24=ia%:q%!28=ja%:q%!32=ka%:q%!36=la%:SYS"Wimp_DragBox",,q%:ENDPROC 21040 21060DEFPROCL:!b%=128:b%!4=129:b%!8=130:b%!12=131:b%!16=4:b%!20=5:b%!24=-1:SYS"OS_ReadVduVariables",b%,b%+28:ia%=b%!28<<b%!44:ja%=b%!32<<b%!48:ka%=b%!36<<b%!44:la%=b%!40<<b%!48:N%=1<<b%!44:O%=1<<b%!48:ENDPROC 21210 21230DEFFNc(f%,h%):!b%=f%:b%!4=h%:SYS"Wimp_GetIconState",,b%:=FNa(b%!28) 21290DEFPROCe(c$):f$=FNc(t%,1):IFLEN(c$)+LEN(f$)<116THEN 21310SYS"Wimp_GetCaretPosition",,b%:IF!b%<>t%THENxc%=LEN(f$)ELSExc%=b%!20 21330y$=LEFT$(f$,xc%)+c$+RIGHT$(f$,LEN(f$)-xc%):PROCb(t%,1,y$):$(a%+12)=y$:SYS"Wimp_SetCaretPosition",t%,1,-1,-1,NOT(1<<25),xc%+LEN(c$) 21380ENDIF 21380ENDPROC 21390 21410DEFFNj:SYS"Wimp_GetPointerInfo",,b%:f%=b%!12:q%!12=0:SYS"Wimp_SendMessage",19,q%,f%,-1TO,,l%:!q%=24:q%!12=0:q%!16=262342:q%!20=l%:SYS"Wimp_SendMessage",18,q%,0:j$="":REPEAT:PROCg(6146):UNTILj$<>"":IFj$<>"Filer"THEN 21520w$="" 21540ELSE:!q%=f%:SYS"Wimp_GetWindowInfo",,q%:IF(q%!60AND256)=256THEN 21570w$=FNa(q%!76) 21590ELSE:w$=FNa(q%+76) 21610ENDIF 21610ENDIF 21620=w$ 21650DEFPROCr(c$,Eb%):FORI%=1TOLEN(c$):SYS"OS_BPut",ASC(MID$(c$,I%,1)),Eb%:NEXTI%:SYS"OS_BPut",10,Eb%:ENDPROC 21700 21720DEFPROCo(f%,h%,D$):!b%=f%:b%!4=h%:SYS"Wimp_GetIconState",,b%:$(b%!32)="s"+D$:b%!8=0:b%!12=0:SYS"Wimp_SetIconState",,b%:ENDPROC 21800 21820DEFFNk:LOCALI%:!q%=yc%:SYS"Wimp_GetWindowState",,q%:FORI%=4TO16STEP4:q%!I%=(q%!I%)-4096:NEXTI%:q%!28=-2:SYS"Wimp_OpenWindow",,q%:SYS"Wimp_GetWindowState",,q%:zc%=q%!28:SYS"Wimp_CloseWindow",,q%:=zc% 21960DEFFNl(f%):!q%=f%:SYS"Wimp_GetWindowState",,q%:=q%!28 22010DEFFNh:SYS"XOS_ReadVarVal",S%+128,S%,256,0TO,,Ac%:=LEFT$($S%,Ac%) 22050DEFPROCj:q%!64=1:Bc%=q%!8-!q%:Cc%=q%!12-q%!4:q%?68=Bc%MOD256:q%?69=Bc%DIV256:q%?70=Cc%MOD256:q%?71=Cc%DIV256:ENDPROC 22130 22170DEFPROCO:IFINKEY(-256)=161ORINKEY(-256)=160THENDc%=FALSEELSEDc%=TRUE 22180da%=TRUE:Z%=2000:k%=160:z$="1":yb%=127:Sa%=2588+(151*k%):DIMg% Sa%:DIMq% 8192,b% 256,_% Z%,u% 148,C% 24,S% 256,L% 24:DIMP% 52,Aa% 8,Ec% 8,Ba% 8,Fc% 8,Ca% 8:DIMz% 124,i% 196,D% 100,Q% 52,R% 52 22280DIMp% k%*10,c%(127),a$(96),a%(96,7),b%(yb%),b$(yb%):SYS"Wimp_Initialise",200,&4B534154,"KeysDemo"TOGc%,oc%:IFGc%<200THENPROCf(0,"This program will only work on RISC OS 2.00 or later",2) 22310aa%=FALSE:!q%=-1:q%!4=0:q%!8=0:q%!12=68:q%!16=68:q%!20=12290:$(q%+24)="!Keysdemo":SYS"Wimp_CreateIcon",,q%TOHc%:PROCL:SYS"Wimp_OpenTemplate",,"<KeysDemo$Dir>.Templates":E%=_%:SYS"Wimp_LoadTemplate",,q%,E%,_%+Z%,-1,"Info",0TO,,E% 22380PROCj:SYS"Wimp_CreateWindow",,q%TOyc%:SYS"Wimp_LoadTemplate",,q%,E%,_%+Z%,-1,"Type",0TO,,E%:PROCj:!q%=(ka%/2)-338:q%!8=(ka%/2)+338:SYS"Wimp_CreateWindow",,q%TOe%:SYS"Wimp_LoadTemplate",,q%,E%,_%+Z%,-1,"Text",0TO,,E% 22420PROCj:SYS"Wimp_CreateWindow",,q%TOt%:SYS"Wimp_LoadTemplate",,q%,E%,_%+Z%,-1,"Window/Icon",0TO,,E%:PROCj:SYS"Wimp_CreateWindow",,q%TOm%:SYS"Wimp_LoadTemplate",,q%,E%,_%+Z%,-1,"Click",0TO,,E%:PROCj:SYS"Wimp_CreateWindow",,q%TOM% 22470SYS"Wimp_LoadTemplate",,q%,E%,_%+Z%,-1,"Menus",0TO,,E%:PROCj:SYS"Wimp_CreateWindow",,q%TOG%:SYS"Wimp_LoadTemplate",,q%,E%,_%+Z%,-1,"Save",0TO,,E%:PROCj:SYS"Wimp_CreateWindow",,q%TOA% 22510SYS"Wimp_LoadTemplate",,q%,E%,_%+Z%,-1,"MoveWind",0TO,,E%:PROCj:SYS"Wimp_CreateWindow",,q%TOj%:SYS"Wimp_LoadTemplate",,q%,E%,_%+Z%,-1,"Enter",0TO,,E%:PROCj:SYS"Wimp_CreateWindow",,q%TOwa%:SYS"Wimp_CloseTemplate":$u%="KeysDemo":u%!12=459271 22570u%!16=152:u%!20=44:u%!24=0:u%!28=0:u%!32=yc%:u%!36=&7009001:$(u%+40)="Info":u%!52=0:u%!56=z%:u%!60=&7009001:$(u%+64)="Save":u%!76=2:u%!80=D%:u%!84=&7009001:$(u%+88)="Prefs" 22610u%!100=0:u%!104=-1:u%!108=&7009001:$(u%+112)="Clear All":u%!124=128:u%!128=-1:u%!132=&7009001:$(u%+136)="Quit":$z%="Save":z%!12=459271:z%!16=184:z%!20=44:z%!24=0 22650z%!28=8:z%!32=A%:z%!36=&7009001:$(z%+40)="Keystrokes":z%!52=0:z%!56=-1:z%!60=&7009001:$(z%+64)="Default":z%!76=8:z%!80=A%:z%!84=&7009001:$(z%+88)="Executor":z%!100=136:z%!104=A%:z%!108=&7009001:$(z%+112)="List" 22690$i%="Edit":i%!12=459271:i%!16=168:i%!20=44:i%!24=0:i%!28=0:i%!32=-1:i%!36=&7009001:$(i%+40)="Copy":i%!52=0:i%!56=-1:i%!60=&7009001:$(i%+64)="Copy Group":i%!76=0:i%!80=-1:i%!84=&7009001:$(i%+88)="Cut" 22740i%!100=0:i%!104=-1:i%!108=&7009001:$(i%+112)="Cut Group":i%!124=0:i%!128=-1:i%!132=&7009001:$(i%+136)="Paste":i%!148=0:i%!152=-1:i%!156=&7009001:$(i%+160)="Insert" 22770i%!172=136:i%!176=A%:i%!180=&7009001:$(i%+184)="Action":$D%="Prefs":D%!12=459271:D%!16=168:D%!20=44:D%!24=0:D%!28=0:D%!32=P%:D%!36=&7009001:$(D%+40)="Autoexec" 22810D%!52=0:D%!56=Q%:D%!60=&7009001:$(D%+64)="Variable":D%!76=128:D%!80=R%:D%!84=&7009001:$(D%+88)="Increment":$P%="Minutes":P%!12=459271:P%!16=96:P%!20=44:P%!24=0:P%!28=132:P%!32=-1:P%!36=&7009101 22860P%!40=Aa%:P%!44=Ec%:P%!48=3:$Aa%="15":$Ec%="a0-9":oa%=90000:na%=TIME:$Q%="Variable":Q%!12=459271:Q%!16=96:Q%!20=44:Q%!24=0:Q%!28=132:Q%!32=-1:Q%!36=&7009101:Q%!40=Ba%:Q%!44=Fc%:Q%!48=8:SYS"OS_GSTrans","<Keystroke%Var>",q%,8192 22930$Ba%=FNa(q%):$Fc%="a0-9\-":$R%="Increment":R%!12=459271:R%!16=96:R%!20=44:R%!24=0:R%!28=132:R%!32=-1:R%!36=&7009101:R%!40=Ca%:R%!44=Fc%:R%!48=8:SYS"OS_GSTrans","<Keystroke%Inc>",Ca%,8:H%=2588+k%:B%=13:r%=2:PROCI:w%=FALSE:FORma%=0TO127:READc%(ma%):NEXTma% 23060FORma%=0TO96:READa$(ma%):NEXTma%:Ic%=g%+12:FORI%=0TO96:READE$:FORJ%=0TO7:IFMID$(E$,J%+1,1)="1"THENa%(I%,J%)=Ic%:Ic%+=4ELSEa%(I%,J%)=-1 23140NEXTJ%:NEXTI%:va%=-1:U%=-1:l$="Keydefs":o$="List":u$="!Executor":!p%=-1:Jc%=255:gb%=-15196225:FORI%=0TOyb%:b$(I%)="":NEXTI%:PROCga:PROCi:PROCa(e%,10,1<<22,TRUE):PROCc:Kc%=FALSE:IFDc%THEN 23330SYS"OS_ReadSysInfo",2TO,,Kc%:Kc%=(Kc%=1) 23360ENDIF 23360IFKc%THEN 23370a$(55)="#":a$(62)="\":c%(94)=62:c%(46)=-1 23420ENDIF 23420da%=FALSE:ENDPROC 23440 23480DATA -1,-1,-1,-1,-1,-1,-1,-1,-1,94,95,96,-1,-1,-1,-1 23480DATA 29,42,43,44, 4,47, 7,50,45,75,83,84,11,12,10,-1 23490DATA 0,35,17,32,46,21,48,39,50,76,85,86,60,61,62,63 23500DATA 40,41,16,30,45,33,27,28,54,73,87,88,93,64,65,66 23510DATA -1,13,36,18,37,22,23,41,57,71,90,-1,89,-1,67,68 23520DATA -1,31,15,19,20,26,24,57,56,70,91,92,-1,51,-1,-1 23530DATA 59,38,69,34,14,25,49,52,53,72,77,78,80,-1,-1,-1 23540DATA 58, 1, 2, 3, 5, 6, 8, 9,55,74,81,82,79,-1,-1,-1 23550 23570DATA Print (F0),F1,F2,F3,F4,F5,F6,F7,F8,F9,F10,F11,F12,A,B,C 23570DATA D,E,F,G,H,I,J,K,L,M,N,O,P,Q,R,S 23580DATA T,U,V,W,X,Y,Z,0,1,2,3,4,5,6,7,8 23590DATA 9,",","-","=",".","/","[","\","]",";",Escape,Tab,Break,Back tick,"�",Back space 23600DATA Insert,Home,Page Up,Page Down,"'",Space bar,Delete,Return 23610DATA Copy,Up arrow,Right arrow,Left arrow,Down arrow,Keypad 0,Keypad 1,Keypad 2 23620DATA Keypad 3,Keypad 4,Keypad 5,Keypad 6,Keypad 7,Keypad 8,Keypad 9,Keypad + 23630DATA Keypad -,Keypad .,Keypad /,Keypad #,Keypad *,Keypad Enter,Select,Menu,Adjust 23640 23660DATA 11111111,11111111,11111111,11111111,11111111,11111111,11111111,11111111 23660DATA 11111111,11111111,11111111,11111111,11111111,00111111,00111111,00111111 23670DATA 00111111,00111111,00111111,00111111,00111111,00111111,00111111,00111111 23680DATA 00111111,00111111,00111111,00111111,00111111,00111111,00111111,00111111 23690DATA 00111111,00111111,00111111,00111111,00111111,00111111,00111111,00111111 23700DATA 00111111,00111111,00111111,00111111,00111111,00111111,00111111,00111111 23710DATA 00111111,00111111,00111111,00111111,00111111,00111111,00111111,00111111 23720DATA 00111111,00111111,11111111,11111111,10001000,00111111,00111111,00111111 23730DATA 11111111,11111111,11111111,11111111,00111111,00111111,00111111,00111111 23740DATA 00111111,11111111,11111111,11111111,11111111,01111111,01111111,01111111 23750DATA 01111111,01111111,01111111,01111111,01111111,01111111,01111111,01111111 23760DATA 01111111,01111111,01111111,01111111,01111111,01111111,01111111,01111111,01111111
Q�><Squish$Scrap> squished by MH's BASIC cruncher v1.20 14/5/89 On 08 Mar 1993 6:�O:�:�g(6146):�aa%:ș"Wimp_CloseDown":ș"OS_Exit" �,��g(ba%):ș"Wimp_Poll",ba%,q%�ca%:Ȏca%� ��0:�da%�ea%=-1:�P � �2:�s � �3:�Q � �4:�R � �5:�S � �6:�T � �7:�U � �8:�V �9:�W �17,18:�X � � " JD��P:ș"Wimp_GetCaretPosition",,b%:�!b%=e%�(b%!4)<>14�fa%=��fa%=� rda%=�:ga%=�:�(-4)��(-7)� ��z �%�:ș"OS_Byte",121,9�,`%:�`%<>255� �`%=c%(`%):�`%<>-1� �*ha%=-�(-1)-2*�(-2)-4*�(-3):�fa%�`%<94� �$$(a%+128)=�c(e%,14):�b��h(a%,�) �3B%=`%:r%=ha%:ȕa%(B%,r%)=-1:r%=(r%+1)�8:�:�i:�c D�:�a%(`%,ha%)<>-1� N�!a%(`%,ha%)<>0� X:c%=a%(`%,ha%)-4:s%=�:�:c%=g%+c%!4:�s%=��((c%?3)�32)=0� ��(c%?1�16)=16� �s%=� ��:�A(c%):�g(6146) �� �� �/�c%!4=-1:ȗȓia%,ja%,ka%-ia%,la%-ja%:�ga%� �#�:ș"OS_Byte",122�,ma%:�ma%=255 � � � *� 4� >� H� R�$(S%+128)="Keystroke$Do*":h$=�h:ȕh$<>"":ș"OS_SetVarVal",S%+128,"Clear",-1,0,0:�B(h$):$(S%+128)="Keystroke$Do*":h$=�h:�:$(S%+128)="Keystroke$Load*":t$=�h:ȕt$<>"":ș"OS_SetVarVal",S%+128,"Clear",-1,0,0:�C(t$):$(S%+128)="Keystroke$Load*" �-t$=�h:�:�(na%+oa%)<���B("Autoexec"):na%=� �da%=�:� $]��s:�pa%,qa%,ra%,sa%:ș"Wimp_OpenWindow",,q%:pa%=q%!4:qa%=q%!8:ra%=!q%:ta%=q%!28:�!q%=e%� `Ȏ((a%?2)�16)� j)�0:�k(m%):�k(M%):�d(t%):�d(G%):�d(j%) �+�1,5:�k(m%):�k(G%):�d(M%):�d(t%):�d(j%) �+�2,3:�k(t%):�d(m%):�d(M%):�d(G%):�d(j%) ()�4:�k(m%):�k(j%):�d(t%):�d(M%):�d(G%) d(:�d(m%):�d(M%):�d(t%):�d(G%):�d(j%) �� �� �� � �)��Q:ș"Wimp_CloseWindow",,q%:�!q%=e%� �&�d(m%):�d(M%):�d(t%):�d(G%):�d(j%) "� "� , @��S:�!q%=e%� ^Pș"Wimp_GetCaretPosition",,C%:�((!C%)<>e%�(C%!4)<>14)�((!C%)<>t%�(C%!4)<>1)� r#ș"Wimp_SetCaretPosition",e%,-1 �� �� �� � �D��R:ș"Wimp_GetCaretPosition",,b%:�!q%=e%��((!b%)=e%�(b%!4)=14)� �>ș"XWimp_SetCaretPosition",!C%,C%!4,C%!8,C%!12,C%!16,C%!20 �� �� � ��T:Ȏq%!8� �2:�Y 0�1,4:�Z((q%!8)=1) :� :� D X��Y:Ȏq%!12� l�-2:�t(-2,(!q%)-64,384) �3�e%,m%,M%,t%,G%,j%:�t(q%!12,(!q%)-64,(q%!4)+44) �� �� � ���Z(ua%):Ȏq%!12� �6�-2:!q%=e%:ș"Wimp_GetWindowState",,q%:q%!28=-1:�s ��e%:Ȏq%!16� �1:�b��h(a%,�) r%=r%�4:�i:�c *�2:�b��h(a%,�) 4r%=r%�2:�i:�c H�3:�b��h(a%,�) Rr%=r%�1:�i:�c f'�4:$(a%+128)=�c(e%,14):�b��h(a%,�) z�ua%�B%=96�B%=94 �#r%=-�(-1)-2*�(-2)-4*�(-3):�i:�c �.�6,7,8,9,10,11:�D(B%,r%,(q%!16)-6):w%=�:�c ��12:�(a%?3�128)>0� �a%=T%:T%=a%!8 ��:a%=g%+a%!8:T%=a%!8 �� ��c �13:�a%!4=-1� T%=a%:a%=�f 8�:a%=g%+a%!4:T%=a%!8 V� V�c j,�16:a%?3=(a%?3�254)-�d(e%,16,1<<21):w%=� �.�17:a%?3=(a%?3�253)-2*�d(e%,17,1<<21):w%=� �R�18:a%?3=(a%?3�191)-64*�d(e%,18,1<<21):w%=�:ș"Wimp_SetCaretPosition",e%,-1:�c �/�20:a%?3=(a%?3�223)-32*�d(e%,20,1<<21):w%=� �.�21:a%?1=(a%?1�247)-8*�d(e%,21,1<<21):w%=� /�22:a%?1=(a%?1�239)-16*�d(e%,22,1<<21):w%=� 2� 2�m%:�q%!16<>20�w%=� FȎq%!16� P'�2:a%?3=(a%?3)�28:a%?2=(a%?2)�15:�c d �3:�((a%?2)�16)=0�h%=16�h%=0 n5a%?2=((a%?2)�15)+(1<<4):a%?3=(((a%?3)��16)+h%):�c �2�4:a%?2=((a%?2)�15)+(2<<4):a%?3=((a%?3)�16):�c �2�5:a%?2=((a%?2)�15)+(3<<4):a%?3=((a%?3)�16):�c �5�6:a%?3=((a%?3)��4)-4*�d(m%,6,1<<21):�(a%?3�4)=4� ��b(m%,9,�a(a%+76)) ��:�b(m%,9,"Irrelevant") � L�7:a%?3=((a%?3)��8)-8*�d(m%,7,1<<21):�((a%?2�16)=0�a%!20<0)�(a%?2�16)=4� "�(a%?3�8)=8� ,�b(m%,1,�a(a%+56)) @�:�b(m%,1,"Irrelevant") T� T� ^�20:va%=1:�E r� r�M%:Ȏq%!16� ��1:a%?24=4:�c ��2:a%?24=1:�c ��3:a%?25=-�d(M%,3,1<<21) �� �w%=� �!�G%:h%=(q%!16)-8:�h%>-1�h%<7� � �ua%� ��a%!((h%*4)+28)>-1� �`!(a%+28+(h%*4))=!(a%+28+(h%*4))-1:�b(G%,h%+8,�((a%!((h%*4)+28))+1)):�h%<6�a%!((h%*4)+28)=-1� I�I%=h%+1�6:�a(G%,I%+8,1<<22,�):�b(G%,I%+8,"0"):!(a%+28+(I%*4))=-1:�I% D� D� N�:�a%!((h%*4)+28)<998� ba!(a%+28+(h%*4))=!(a%+28+(h%*4))+1:�b(G%,h%+8,�((a%!((h%*4)+28))+1)):�h%<6��a(G%,h%+9,1<<22,�) �� �� �� �w%=� ��t%:Ȏq%!16� ��2:�e("<Sys$Time>") ��3:�e("<Sys$Date>") ��4:�e("<Sys$Year>") ��5:�e("|M") ��6:�e("|U") ��7:�e("<Filer$Dir>") �8:�e("Run ") �9:�e("Filer_OpenDir ") �10:�e("Load ") #�11,12,13,14:�e(�((q%!16)+125)) *�15:�e("<Keystroke$Input>") 4�16:�e("<Keystroke%Var>") >� >w%=� R�j%:Ȏq%!16� \�1:a%!28=a%!28��1:�c p�2:a%!28=a%!28�1:�c z�4:�ua%� �/a%!32=a%!32-N%:�a%!32<-9999�a%!32=-10000+N% �1�:a%!32=a%!32+N%:�a%!32>99999�a%!32=100000-N% �� ��b(j%,4,�(a%!32)) ��6:�ua%� �/a%!36=a%!36-O%:�a%!36<-9999�a%!36=-10000+O% �1�:a%!36=a%!36+O%:�a%!36>99999�a%!36=100000-O% � �b(j%,6,�(a%!36)) .�8:�ua%� 8/a%!40=a%!40-N%:�a%!40<-9999�a%!40=-10000+N% L1�:a%!40=a%!40+N%:�a%!40>99999�a%!40=100000-N% j� t�b(j%,8,�(a%!40)) � �10:�ua%� �/a%!44=a%!44-O%:�a%!44<-9999�a%!44=-10000+O% �1�:a%!44=a%!44+O%:�a%!44>99999�a%!44=100000-O% �� ��b(j%,10,�(a%!44)) � �13:�ua%� �2a%!48=a%!48-N%:�a%!48<-999999�a%!48=-&F4240+N% 4�:a%!48=a%!48+N%:�a%!48>9999999�a%!48=&989680-N% � (�b(j%,13,�(a%!48)) < �15:�ua%� F2a%!52=a%!52-O%:�a%!52<-999999�a%!52=-&F4240+O% Z4�:a%!52=a%!52+O%:�a%!52>9999999�a%!52=&989680-O% x� ��b(j%,15,�(a%!52)) ��16:�d(j%,16,1<<21)� �a%!28=(a%!28)�2 ��:a%!28=(a%!28)��2 �� ��c ��17:�d(j%,17,1<<21)� �a%!28=(a%!28)�4 ��:a%!28=(a%!28)��4 � �c "�18:�d(j%,18,1<<21)� ,a%!28=(a%!28)�8 @�:a%!28=(a%!28)��8 T� TE�a(j%,4,1<<22,n%�((a%!28)�10)=0):�a(j%,6,1<<22,n%�((a%!28)�10)=0) r� r�A%:Ȏq%!16� ��0:va%=U%+1:�E ��2:�m(�c(A%,1)) �� �� �� � ���U:Ȏva%� � �1:�z �2:�n(H%,4093) �3:�n(0,4095) �4:�n(256,4075) &�5:�n(2048,8192) 0� 0va%=-1:� D X��V:ea%=q%!24:�ea%=13� v Ȏ!q%� ��t%:Ȏq%!4� � �1:$(a%+12)=�c(t%,1):w%=�:�c �� ��e%:�q%!4=14� �&$(a%+128)=�c(e%,14):w%=�:����(-74) � �A%:�m(�c(A%,1)) 6�wa%:n$=�c(wa%,0):!b%=wa%:ș"Wimp_CloseWindow",,b% H� Hfș"Wimp_GetPointerInfo",,b%:�b%!12=e%�ș"Wimp_SetCaretPosition",e%,-1�ș"Wimp_SetCaretPosition",-1 \�:ș"Wimp_ProcessKey",ea% z� z� � �3��W:�xa%=-2�i$="Main.":ya%=u%�i$="Edit.":ya%=i% �3ș"Wimp_DecodeMenu",,ya%,q%,b%:i$+=�a(b%):Ȏi$� �'�"Main.Save.Keystrokes":U%=1:�m(l$) �5�"Main.Save.Default":�u("<KeysDemo$Dir>.Default") �%�"Main.Save.Executor":U%=4:�m(u$) �!�"Main.Save.List":U%=2:�m(o$) ��"Edit.Copy":�F(a%):w%=� "�"Edit.Copy Group":�G(a%):w%=� %�"Edit.Insert":�((a%?3)�128)=128� �H(a%):�c 8�:�_(a%):�c V� Vw%=� j �"Edit.Paste":�H(a%):w%=�:�c �$�"Edit.Cut":w%=�:�F(a%):�h(a%,�) �(�"Edit.Cut Group":w%=�:�G(a%):�`(a%) ��"Main.Clear All":�w%� �1za%=�i("Keystrokes not saved. Are you sure?") �:za%=� � �za%� !�I:�i:�c:u%!252=&7409001:w%=� Z� Z�"Main.Quit":�w%� n1aa%=�i("Keystrokes not saved. Are you sure?") ��:aa%=� �� �&:�i$,20)="Main.Prefs.Autoexec."� ��(�a(Aa%))=0� �=�f(0,"The minimum time is one minute",1):$Aa%=�(oa%�6000) ��:oa%=�(�a(Aa%))*6000 �� �� �G�i$,20)="Main.Prefs.Variable."��("SetEval Keystroke%Var "+�a(Ba%)) �H�i$,21)="Main.Prefs.Increment."��("SetEval Keystroke%Inc "+�a(Ca%)) � 7ș"Wimp_GetPointerInfo",,b%:�b%!8=1��t(xa%,Da%,Ea%) "� , @��X:Ȏ(q%!16)� T�0:�w%� h1aa%=�i("Keystrokes not saved. Are you sure?") |�:aa%=� �� �Y�1:q%!12=q%!8:q%!16=2:!q%=256:$(q%+44)="<Wimp$Scrap>":ș"Wimp_SendMessage",17,q%,q%!4 ��2:a$=�a(q%+44):ȎU%� �'�1:�u(a$):�a$<>"<Wimp$Scrap>"�l$=a$ �'�2:�J(a$):�a$<>"<Wimp$Scrap>"�o$=a$ ��3:�aa(a$) !�4:�a$<>"<Wimp$Scrap>"��K(a$) � Vș"Wimp_CreateMenu",,-1:q%!12=q%!8:q%!16=3:!q%=256:ș"Wimp_SendMessage",18,q%,q%!4 X �3:�ba l�262336:�q%!36=0�U%=1 v�q%!36=3�U%=2 ��q%!32=6�U%=3 ��q%!36=2�U%=4 � ȎU%� �2�1:�b(A%,1,l$):�o(A%,0,"file_ffd"):�l(A%,1,15) �2�2:�b(A%,1,o$):�o(A%,0,"file_fff"):�l(A%,1,15) �8�3:�b(A%,1,"Action"):�o(A%,0,"file_feb"):�l(A%,1,15) 2�4:�b(A%,1,u$):�o(A%,0,"!executor"):�l(A%,1,0) H� H-ș"Wimp_CreateSubMenu",,q%!20,q%!24,q%!28 \�262337:�L p�262338:�ca(q%!4,�a(q%+28)) ��262339:�da(q%!4) ��262343:j$=�a(q%+28) �� �� � ���A(c%):�(c%?1�8)=8� �!ȗFa%,Ga%,Ha%:ȗȓFa%,Ga%,0,0 !�:ȗȓia%,ja%,ka%-ia%,la%-ja% � �(c%?3�2)=0� .Ia%=1:�g(6146) Lp�:!q%=0:$(q%+4)=�a(c%+128)+"?":ȗFa%,Ga%,Ha%:ș"Wimp_ReportError",q%,19,"Keystroke"�,Ia%:ȗ�Fa%,Ga%:�g(6146) �� ��Ia%=1� �Hs%=�:�((((c%!104)�1048576)<>0)�(c%?2�16)=3)�(c%?2�16)<>2�Ja%=��Ja%=� �Ȏ(c%?2�16)� �7�0:�(c%!12)<>-1�(((c%?3)�8)=0�c%!20<0)��p(c%,c%!24) ��1:�(c%!12)<>-1��p(c%,2) �2�2:m$=�a(c%+12):�m$,"<Keystroke$Input>")>0��M ��m$,"<Filer$Dir>")>0� �q$=�j:�q$<>""� 1�("Set Filer$Dir "+q$):�("WimpTask "+m$):s%=� (� (�:�("WimpTask "+m$):s%=� P� P!�m$,"<Keystroke%Var>")>0�s%� Zi�("SetEval Keystroke%Var Keystroke%Var"+�m):ș"OS_GSTrans","<Keystroke%Var>",q%,8192:�b(t%,19,�a(q%)) �� �2�3:r$=�a(c%+12):�r$,"<Keystroke$Input>")>0��M ��r$,"<Filer$Dir>")>0� �=q$=�j:�q$<>""��("Set Filer$Dir "+�j)��("Unset Filer$Dir") �� �Mș"OS_GSTrans",r$,q%,8192:o%=q%:ș"OS_Byte",15:ȕ?o%<>0:�?o%>135�?o%<140� �*�g(6146):ș"Wimp_ProcessKey",(?o%)+260 &�:�g(6146):ș"Wimp_ProcessKey",?o% 6� 6+o%+=1:�:s%=�:�r$,"<Keystroke%Var>")>0� ^i�("SetEval Keystroke%Var Keystroke%Var"+�m):ș"OS_GSTrans","<Keystroke%Var>",q%,8192:�b(t%,19,�a(q%)) �� ��4:�(c%!12)<>-1��p(c%,-1) ��5:�(c%!12)<>-1��p(c%,2) �� �!�s%=��(c%?3�1)=1��1,-15,100,5 ��g(6146) �� �� � ���c:n%=((a%?3)�64)=64:�b(e%,4,a$(B%)):�a(e%,1,(1<<21),(r%�4)<>0):�a(e%,2,(1<<21),(r%�2)<>0):�a(e%,3,(1<<21),(r%�1)<>0):�(a%?3�128)>0� :E�I%=6�11:�a(e%,I%,(1<<21),�):�a(e%,I%,(1<<22),�):�I%:�b(e%,14,"") v_�:�I%=6�11:�a(e%,I%,1<<21,(((a%?2)�16))=(I%-6)):�a(e%,I%,1<<22,n%):�I%:�b(e%,14,�a(a%+128)) �� �l�a(e%,12,1<<22,T%=-1):�a(e%,13,1<<22,(((a%?3)�128)>0)��b):�a%!4=-1��b(e%,13,"New �")��b(e%,13,"Next �") �(�(((a%?3)�128)>0)��b�n%�Ka%=0�Ka%=15 ڻ�l(e%,14,Ka%):�a(e%,16,1<<21,((a%?3)�129)=1):�a(e%,16,1<<22,n%):�a(e%,17,1<<21,((a%?3)�130)=2):�a(e%,17,1<<22,n%):�a(e%,18,1<<21,n%�((a%?3)�128)=0):�a(e%,18,1<<22,(((a%?3)�128)>0)��b) ��a(e%,20,1<<21,((a%?3)�160)=32):�a(e%,20,1<<22,T%=-1�n%��b):�a(e%,21,1<<21,((a%?1)�8)=8):�a(e%,21,1<<22,n%��b):�a(e%,22,1<<21,((a%?1)�16)=16):�a(e%,22,1<<22,n%��b):F%=((a%?2)�16):ȎF%� p>�0,1,4,5:�(F%=0�((a%?3)�8)=0�a%!20<0)�(F%=4�((a%?3)�8)=0)� ��b(m%,1,"Irrelevant") ��:�b(m%,1,�a(a%+56)) �� ���I%=0�3:�a(m%,I%+2,1<<21,((a%?2)�16)=I%):�a(m%,I%+2,1<<22,n%):�I%:�a(m%,6,1<<21,((a%?3)�4)=4):�a(m%,6,1<<22,((a%?2)�16)=0�n%):�a(m%,7,1<<21,((a%?3)�8)=8):�a(m%,7,1<<22,((a%?2)�16)=0�n%):�(a%?3�4)=4� �b(m%,9,�a(a%+76)) �:�b(m%,9,"Irrelevant") .� . �F%=4� 8�b(m%,17,"Irrelevant") L>�:�(a%?3�16)=0��b(m%,17,"At pointer")��b(m%,17,�a(a%+116)) V� `t�a(M%,1,1<<21,(a%?24)=4):�a(M%,2,1<<21,(a%?24)=1):�a(M%,3,1<<21,(a%?25)=1):�I%=1�3:�a(M%,I%,1<<22,n%):�I%:�F%=4� �M�a(j%,1,1<<21,((a%!28)�1)=0):�a(j%,2,1<<21,((a%!28)�1)=1):�((a%!28)�1)=0� �.�b(j%,3,"Move to:"):�b(j%,12,"Scroll to:") �0�:�b(j%,3,"Move by:"):�b(j%,12,"Scroll by:") � ��a(j%,16,1<<21,((a%!28)�2)=2):�a(j%,17,1<<21,((a%!28)�4)=4):�a(j%,18,1<<21,((a%!28)�8)=8):�b(j%,4,�(a%!32)):�b(j%,6,�(a%!36)):�b(j%,8,�(a%!40)):�b(j%,10,�(a%!44)):�b(j%,13,�(a%!48)):�b(j%,15,�(a%!52)) Z��a(j%,1,1<<22,n%):�a(j%,2,1<<22,n%):�a(j%,4,1<<22,n%�((a%!28)�10)=0):�a(j%,6,1<<22,n%�((a%!28)�10)=0):�a(j%,8,1<<22,n%�((a%!28)�2)=0):�a(j%,10,1<<22,n%�((a%!28)�2)=0):�a(j%,13,1<<22,n%�((a%!28)�4)=0) �4�a(j%,15,1<<22,n%�((a%!28)�4)=0):�((a%!28)�2)=0� ��q(j%,7,17):�q(j%,11,17) ��:�q(j%,7,23):�q(j%,11,23) �� �4�I%=16�18:�a(j%,I%,1<<22,n%):�I%:�((a%!28)�6)=0� d�b(m%,1,"Irrelevant"):�b(m%,9,"Irrelevant"):�b(m%,17,"Irrelevant"):�I%=2�7:�a(m%,I%,1<<22,�):�I% ^� ^g�:La%=�:�I%=0�6:�a(G%,8+I%,1<<22,La%�n%):�b(G%,8+I%,�((a%!((I%*4)+28))+1)):�a%!((I%*4)+28)=-1�La%=� ��I% �� ��a(m%,20,1<<22,n%) °�2,3:�I%=2�14:�a(t%,I%,(1<<22),n%):�I%:�I%=8�10:�a(t%,I%,(1<<22),F%=3�n%):�I%:�I%=11�14:�a(t%,I%,(1<<22),F%=2�n%):�I%:�I%=5�6:�a(t%,I%,(1<<22),F%=2�n%):�I%:�n%�Ka%=0�Ka%=15 D#�l(t%,1,Ka%):�b(t%,1,�a(a%+12)) b� b=!q%=e%:ș"Wimp_GetWindowState",,q%:�((q%!32)�65536)<>0��s �� � �0��B(h$):�Ma%=0�96:�Na%=0�7:�a%(Ma%,Na%)<>-1� ��!a%(Ma%,Na%)<>0� �NOa%=a%(Ma%,Na%)-4:Pa%=�:s%=�:�:Oa%=g%+Oa%!4:�Pa%�Qa%=((Oa%?3)�32)=32�Qa%=� !C�a(Oa%+128)=h$�(h$="Autoexec"���a(Oa%+128),8)="Autoexec")�Qa%� !�A(Oa%):�g(6146):Pa%=s% !4� !4 �Oa%!4=-1 !H� !H� !R+�Na%:�Ma%:ȗȓia%,ja%,ka%-ia%,la%-ja%:� !z !�9��i:ȕa%(B%,r%)=-1:r%=(r%+1)�8:�:a%=!a%(B%,r%):�a%=0� !�a%=�f:T%=-1 !��:T%=!(g%+a%+8):a%+=g% !�� !�� " "4ݤf:Ra%=g%+2588:ȕ((Ra%?3)�128)=0:Ra%+=k%:�:=Ra% "`-��D(B%,r%,F%):w%=�:�v%:�(a%?3�128)>0�v%=� "~�v%�H%+g%+(2*k%)>g%+Sa%� "�0�f(0,"Sorry, I have no more memory",1):Ta%=� "� �:�v%� "�a%?128=13:�a%+k%=g%+H%� "�+H%+=k%:�I%=a%+k%�a%+(k%*2)-4:!I%=-1:�I% "�� "� Ua%=-1 # �:Ua%=((a%?2)�16) #� #,?a%=B%:a%?1=r%:a%?2=((a%?2)�240)+F%:�v%� #F a%!4=-1:�ea(B%,r%):�Va%<>-1� #dVa%!4=a%-g%:a%!8=Va%-g% #��:!a%(B%,r%)=a%-g%:a%!8=-1 #�� #�� #� ȎF%� #�!�0,1,5:�Ua%=2�Ua%=3�Ua%=4�v%� #� �F%=0� #�a%?3=28:a%?2=F% #��:a%?3=24:a%?2=F%+32 $� $�a%!12=-1:a%!16=-1:a%!20=-1:a%!24=4:�I%=28�52�4:a%!I%=-1:�I%:$(a%+56)="-":$(a%+76)="-":a%!104=0:a%!108=0:a%!112=0:$(a%+116)="-" $�� $�%�2,3:�Ua%=0�Ua%=1�Ua%=4�Ua%=5�v%� $�#�I%=12�124�4:a%!I%=0:�I%:a%?3=0 $�� $��4:�Ua%<>4�v%� $�a%?2=F%+16:a%?3=0:a%!12=0:a%!16=-1:a%!20=-1:a%!24=0:a%!28=3:�I%=32�52�4:a%!I%=0:�I%:$(a%+56)="Irrelevant":$(a%+76)="-":a%!104=0:a%!108=0:a%!112=0:$(a%+116)="-" %�� %�� %�� %�� %� %���ea(B%,r%):�!a%(B%,r%)=0� %� Va%=-1 %�2�:Va%=!a%(B%,r%)+g%:ȕVa%!4<>-1:Va%=g%+Va%!4:� &� &� & &*��z:�((((a%?2)�16))�2)=0� &4>ș"Wimp_GetPointerInfo",,b%:�((a%?2)�15)=4�((a%!28)�14)=8� &Ha%!32=!b%:a%!36=b%!4:�c &p;�:Wa%=b%!12:Xa%=b%!16:�(Wa%<>m%�Xa%<>20)�(F%<>4�Wa%>0)� &��w%=�:a%!16=Wa%:a%!20=Xa%:!b%=0:b%!16=0:ș"Wimp_SendMessage",19,q%,Wa%,Xa%�,,Ya%:a%!12=Ya%:$(a%+56)=�n(Ya%):$(a%+76)=��g(Ya%,Wa%,�),27):$(a%+116)=��o(Ya%,Wa%,Xa%),11):�fa(Wa%):a%!104=Za%:a%!108=_a%:a%!112=`a%:�((a%?2)�16)<>0� '�a(a%+76)="Icon bar"� '!a%?2=(a%?2)�15:a%?3=(a%?3)�12 '.�:�(Za%�(1<<20))=0� '8)a%?2=((a%?2)�15)+(1<<4):a%?3=a%?3��16 'V*�:a%?2=((a%?2)�15)+(2<<4):a%?3=a%?3�16 't� 'ta%?3=((a%?3)�243)+8 '�� '��:�(a%!20)<0� '�+a%?2=((a%?2)�15)+(1<<4):a%?3=(a%?3)��12 '�� '�� '�!�((a%?2)�15)=4�((a%!28)�1)=0� '��((a%!28)�14)=8� '�4ș"Wimp_GetPointerInfo",,b%:a%!32=!b%:a%!36=b%!4 ( �:!b%=Wa%:ș"Wimp_GetWindowState",,b%:a%!32=b%!4:a%!36=b%!8:a%!40=b%!12:a%!44=b%!16:a%!48=b%!20:a%!52=b%!24:a%!28=(a%!28)�6 (d� (d� (n�c (�� (�� (�w�:ș"Wimp_GetPointerInfo",,b%:!q%=20:q%!16=0:q%!12=0:ș"Wimp_SendMessage",19,q%,b%!12,b%!16�,,l%:�e(�g(l%,b%!12,�)) (�� (�� (� (���p(c%,V%):ș"Wimp_GetPointerInfo",,b%:ab%=!b%:bb%=b%!4:cb%=b%!12:db%=b%!16:!q%=20:q%!12=0:ș"Wimp_SendMessage",19,q%,cb%,db%�,,eb%:!b%=ab%:b%!4=bb%:Ȏ((c%?2)�16)� )%�0:�g(c%!12,c%!16,�)<>�a(c%+76)� ),��f(0,"The specified window has been deleted. Change the keystroke to 'Any window' or 'Window at pointer'. See the manual for more help.",1) )@F�:�Ja%�ș"Wimp_GetCaretPosition",,C%:ș"Wimp_SetCaretPosition",-1 )J1�v(c%!12,c%!16,c%!20,V%,ab%,bb%):�V%=2��w(c%) )^s%=� )r� )r�1:�db%>-2� )�>�eb%=c%!12�(V%<>2�c%!20<-1�(c%?3�8)=0)�(V%=-1�(c%?3�8)=0)� )��cb%>0� )�|!q%=cb%:ș"Wimp_GetWindowInfo",,q%:fb%=�:�(((q%!32)�gb%)<>(c%!104)�(q%!36)<>(c%!108)�(q%!40)<>(c%!112))�(c%?3�8)=8�fb%=� )��((q%!60)�256)=0� )�d$=�a(q%+76) )��:d$=�e(eb%,q%!76) )�� )�(�d$,27)<>�a(c%+76)�(c%?3�4)=4�fb%=� )� �fb%� *D�Ja%�ș"Wimp_GetCaretPosition",,C%:ș"Wimp_SetCaretPosition",-1 *#�(c%?3�16)=16�hb%=c%!20�hb%=db% *+�v(eb%,cb%,hb%,V%,ab%,bb%):�V%=2��w(c%) *0s%=� *D� *D� *N� *X� *b?�2,3:W%=�k:�ib%=0�252�4:S%!ib%=W%:�W%<>-1�W%=�l(W%)�jb%=ib% *���ib%:kb%=�:ib%=jb%:ȕib%>0�(�kb%�((c%?2)�16)=3):W%=S%!ib%:!q%=20:q%!12=0:ș"XWimp_SendMessage",19,q%,W%,-1�,,lb%:�lb%<>0�lb%<>W%� *�y!q%=W%:ș"Wimp_GetWindowInfo",,q%:fb%=�:�((q%!32�gb%)<>(c%!104)�(q%!36)<>(c%!108)�(q%!40)<>(c%!112))�(c%?3�8)=8�fb%=� +4�g(lb%,W%,�),27)<>�a(c%+76)�((c%?3)�4)=4�fb%=� +F�(lb%=c%!12�(V%<>2�c%!20<-1�(c%?3�8)=0)�(V%=-1�(c%?3�8)=0))�fb%=� + �fb%� + D�Ja%�ș"Wimp_GetCaretPosition",,C%:ș"Wimp_SetCaretPosition",-1 +*,�v(lb%,W%,c%!20,V%,ab%,bb%):�V%=2��w(c%) +>kb%=�:s%=� +\� +\� +fib%-=4:� +�� +�� +� +���w(c%):Ȏ(c%?2�16)� +�u�1:�I%=0�24�4:b%!I%=c%!(I%+28):�I%:b%!28=-1:ș"Wimp_SendMessage",9,b%,c%!12:s%=�:�g(6146):ș"Wimp_CreateMenu",,-1 ,��5:ș"Wimp_CreateMenu",,-1:�g(6146):!b%=64:b%!12=0:b%!16=262336:b%!20=1:b%!24=ab%-64:b%!28=bb%+44:�I%=0�24�4:b%!(I%+32)=c%!(I%+28):�I%:b%!60=-1:ș"Wimp_SendMessage",17,b%,c%!12:s%=� ,~� ,~� ,� ,�"��v(l%,f%,h%,mb%,x%,y%):�f%>0� ,�F!q%=f%:ș"Wimp_GetWindowState",,q%:�((q%!32)�(1<<31))<>0�v%=��v%=� ,�knb%=(v%�(q%!32�(1<<30))<>0)�(�v%�(q%!32�(1<<3))<>0):ob%=(v%�(q%!32�(1<<28))<>0)�(�v%�(q%!32�(1<<2))<>0) ,��:nb%=�:ob%=� ,�� ,��mb%=-1� - �((c%!28)�6)=0� - �((c%!28)�8)=8� -�((c%!28)�1)=0� -ȗ�c%!32,c%!36 -20�:ȗFa%,Ga%,Ha%:ȗ�Fa%+c%!32,Ga%+c%!36:ga%=� -Z� -Z� -d�:�f%>0�l%>0� -x6!q%=f%:ș"Wimp_GetWindowState",,q%:�((c%!28)�1)=0� -��((c%!28)�2)=2� -��((c%!28)�8)=8� -�JȗFa%,Ga%,Ha%:pb%=(c%!32)-(q%!4):qb%=(c%!36)-(q%!8):ȗ�Fa%+pb%,Ga%+qb% -�� -�1q%!4=c%!32:q%!8=c%!36:q%!12=c%!40:q%!16=c%!44 .#�:�((c%!28)�8)=8�ȗ�c%!32,c%!36 .� ."�((c%!28)�4)=4� .,�nb%�q%!20=c%!48 .6�ob%�q%!24=c%!52 .@� .J�:�((c%!28)�2)=2� .^Gq%!4=q%!4+c%!32:q%!8=q%!8+c%!36:q%!12=q%!12+c%!40:q%!16=q%!16+c%!44 .�� .��((c%!28)�4)=4� .��nb%�q%!20=q%!20+c%!48 .��ob%�q%!24=q%!24+c%!52 .�� .��((c%!28)�8)=8� .�8ȗFa%,Ga%,Ha%:pb%=c%!32:qb%=c%!36:ȗ�Fa%+pb%,Ga%+qb% .�� .� ga%=� /� / ș"Wimp_SendMessage",2,q%,l% /� /� /&s%=� /: �:�h%<-1� /D Ȏh%� /N[�-2:!q%=f%:ș"Wimp_GetWindowState",,q%:�(v%�(q%!32�(1<<24))<>0)�(�v%�(q%!32�(1<<7))=0)� /v.q%!28=-2:ș"Wimp_SendMessage",2,q%,l%:s%=� /�� /�[�-3:!q%=f%:ș"Wimp_GetWindowState",,q%:�(v%�(q%!32�(1<<25))<>0)�(�v%�(q%!32�(1<<7))=0)� /�%ș"Wimp_SendMessage",3,q%,l%:s%=� /�� /��-4,-9:�(mb%�255)=4� /�S!q%=f%:ș"Wimp_GetWindowState",,q%:�(v%�(q%!32�(1<<26))<>0)�(�v%�(q%!32�1)<>0)� 0.q%!28=-1:ș"Wimp_SendMessage",2,q%,l%:s%=� 0>� 0>� 0HA�-5:!q%=f%:ș"Wimp_GetWindowState",,q%:�((q%!32)�(1<<18))<>0� 0pq%!8=q%!16:q%!12=q%!4 0��:q%!8=-4096:q%!12=4096 0�� 0�0�(v%�(q%!32�(1<<27))<>0)�(�v%�(q%!32�1)<>0)� 0�%ș"Wimp_SendMessage",2,q%,l%:s%=� 0�� 0�0�-6:!q%=f%:ș"Wimp_GetWindowState",,q%:�ob%� 0�<q%!24=(q%!24)+32:ș"Wimp_SendMessage",2,q%,l%:ga%=�:s%=� 1.� 1.0�-8:!q%=f%:ș"Wimp_GetWindowState",,q%:�ob%� 1V<q%!24=(q%!24)-32:ș"Wimp_SendMessage",2,q%,l%:ga%=�:s%=� 1�� 1�1�-10:!q%=f%:ș"Wimp_GetWindowState",,q%:�nb%� 1�<q%!20=(q%!20)-32:ș"Wimp_SendMessage",2,q%,l%:ga%=�:s%=� 1�� 1�1�-12:!q%=f%:ș"Wimp_GetWindowState",,q%:�nb%� 2 <q%!20=(q%!20)+32:ș"Wimp_SendMessage",2,q%,l%:ga%=�:s%=� 2<� 2<� 2F�:rb%=-1:�h%=-1� 2d<!q%=f%:ș"Wimp_GetWindowInfo",,q%:rb%=(q%!64)>>12:sb%=-1 2�g�:!b%=f%:b%!4=h%:b%!24=0:ș"XWimp_GetIconState",,b%:�b%!24<>0�rb%=(b%!24>>12)�15:sb%=(b%!24>>16)�31 2�� 2��rb%=-1� 2�f(0,"The specific window has been deleted. Change the keystroke to 'Any window' or 'Window at pointer'. See the manual for more help.",1) 2�F�:tb%=mb%�255:ub%=mb%>255:!b%=x%:b%!4=y%:b%!12=f%:b%!16=h%:�tb%=2� 36'b%!8=2:ș"Wimp_SendMessage",6,b%,l% 3T�:Ȏrb%� 3^�0,12,13 3rH�1,2,3,4,6,9:b%!8=tb%:ș"Wimp_SendMessage",6,b%,l%:s%=�:�rb%=2�ga%=� 3��5,8:�ub%� 3�.b%!8=tb%:ș"Wimp_SendMessage",6,b%,l%:s%=� 3��:�tb%=4�sb%<>0� 3��a(f%,h%,1<<21,�) 3��:Ha%=�p(f%,h%,1<<21) 4� 4� 4C�7,11:b%!8=tb%:ș"Wimp_SendMessage",6,b%,l%:s%=�:�tb%=4�sb%<>0� 4D�a(f%,h%,1<<21,�) 4X�:Ha%=�p(f%,h%,1<<21) 4l� 4l �10:�ub%� 4�b%!8=tb% 4��:b%!8=tb%*256 4�� 4�%ș"Wimp_SendMessage",6,b%,l%:s%=� 4�d�14:b%!8=tb%:ș"Wimp_SendMessage",6,b%,l%:s%=�:ș"Wimp_SetCaretPosition",f%,h%,-1,-1,�(1<<25),-1 4�>�15:ș"Wimp_SetCaretPosition",f%,h%,-1,-1,�(1<<25),-1:s%=� 5� 5� 5 � 5*� 54� 5>� 5H 5\��h(d%,vb%):�(d%?3�128)=0� 5f+wb%=-((d%!4)<>-1)-2*((d%!8)<>-1):Ȏwb%� 5z�0:!a%(?d%,((d%?1)�7))=0 5�/�1:!a%(?d%,((d%?1)�7))=d%!4:!(8+g%+d%!4)=-1 5��2:!(4+g%+d%!8)=-1 5�*�3:!(8+g%+d%!4)=d%!8:!(4+g%+d%!8)=d%!4 5�� 5�d%?3=d%?3�128:�d%!8=-1� 5��i 6$�:�d%!4=-1�a%=g%+d%!8�a%=g%+d%!4 6� 6$�(a%?3�128)=0�T%=a%!8�T%=-1 6.��I%=4�k%-4�4:d%!I%=-1:�I%:d%?2=255:ȕ(?(g%+H%-(2*k%)+3)�128)=128:!(g%+H%-(2*k%))=-1:H%-=k%:�:�a%!8=-1�((a%?3)�128)=0�a%?3=a%?3��32 6��vb%��c 6�� 6�� 6� 6�D��ca(xb%,k$):�x(xb%,k$):�d%=g%+2588�g%+H%-k%�k%:�((d%?3)�128)=0� 6�0�a(d%+56)=k$�((d%?2)�16)<>2�((d%?2)�16)<>3� 6�0d%!12=xb%:�((d%?2)�16)=0�d%!16=�q(�a(d%+76)) 6�"�d%!16=-2�d%!20=�r(�a(d%+116)) 7 � 7 � 7 �d%:� 7( 7<^��da(xb%):�d%=g%+2588�g%+H%-k%�k%:�((d%?3)�128)=0�((d%?2)�16)<>2�((d%?2)�16)<>3�d%!12=xb%� 7P$d%!12=-1:�((d%?2)�16)=0�d%!16=-1 7d� 7n0�d%:�I%=0�yb%:�b%(I%)=xb%�b%(I%)=0:b$(I%)="" 7� �I%:� 7� 7�ݤb:zb%=�:�(a%?3�128)=0� 7��(((a%?2)�16)�2)=2� 7��a(a%+12)=""�zb%=� 7��:�((a%?2)�16)=4� 7��((a%!28)�14)=0�zb%=� 7�8�((a%!28)�1)=1�a%!32=0�a%!36=0�a%!48=0�a%!52=0�zb%=� 8�:�a(a%+56)="-"�zb%=� 8� 8"� 8,� 86=zb% 8T��ba:�q%!20=t%� 8^ a$=�a(q%+44):�((a%?2)�16)=2� 8r�a$<>"<Wimp$Scrap>"� 8|Ȏq%!24� 8�,�8:$(a%+12)="Run "+a$:�b(t%,1,�a(a%+12)) 8��9:Ȏq%!40� 8�>�4096,8192:$(a%+12)="Filer_OpenDir "+a$:�b(t%,1,�a(a%+12)) 8�/�3548:$(a%+12)="Run "+a$:�b(t%,1,�a(a%+12)) 8�g:o%=0:ȕ�a$,".",o%+1)<>0:o%=�a$,".",o%+1):�:$(a%+12)="Filer_OpenDir "+�a$,o%-1):�b(t%,1,�a(a%+12)) 9D� 9D!�10:�q%!40<>4096�q%!40<>8192� 9X*$(a%+12)="Load "+a$:�b(t%,1,�a(a%+12)) 9v� 9v:�e(a$) 9�� 9���a(e%,13,(1<<22),(((a%?3)�128)>0)��b):�a(e%,18,1<<21,n%�((a%?3)�128)=0):�a(e%,18,1<<22,(((a%?3)�128)>0)��b):�a(e%,20,1<<21,((a%?3)�160)=32):�a(e%,20,1<<22,T%=-1�n%��b):�(((a%?3)�128)>0)��b�n%�Ka%=0�Ka%=15 9��l(e%,14,Ka%) 9�� 9�r�:f$=�c(t%,1):Ab%=115-�(f$):ș"OS_File",5,a$�Bb%,,Cb%:Db%=(Cb%�&FFF00)>>8:�Bb%=1�(Db%=4095�Db%=4094�Db%=4075)� :.ș"OS_Find",64,a$�Eb%:�#Eb%<Ab%�Ab%=�#Eb% :*/o%=b%:ȕAb%>0:ș"OS_BGet",,Eb%�Fb%:�Fb%<32� :R�Fb%=10�Fb%=13 :\3?o%=�("|"):o%+=1:Ab%-=1:?o%=Fb%+64:o%+=1:Ab%-=1 :z�:?o%=Fb%:o%+=1:Ab%-=1 :�� :�(�:ș"OS_Find",0,Eb%:?o%=0:�e(�a(b%)) :��:�e(a$) :�� :�� :�>q%!12=q%!8:q%!16=4:!q%=256:ș"Wimp_SendMessage",17,q%,q%!4 ;�:�q%!40=4093� ;$sa$=�a(q%+44):q%!12=q%!8:q%!16=4:!q%=256:ș"Wimp_SendMessage",17,q%,q%!4:�C(a$):�1,-15,100,5:�a$="<Wimp$Scrap>"� ;t ș"OS_File",6,"<Wimp$Scrap>" ;��:l$=a$ ;�� ;�� ;�� ;�� ;� ;�8��n(Gb%,Hb%):ș"Wimp_GetPointerInfo",,q%:�q%!12<>A%� ;�q%!20=q%!12:q%!24=q%!16:q%!28=!q%:q%!32=q%!4:q%!36=Gb%:q%!40=Hb%:e$=�c(A%,1):ȕ�e$,".")>0:e$=�e$,�(e$)-�e$,".")):�:�(e$)>0��(e$)<11� <PN$(q%+44)=e$:q%!12=0:!q%=256:q%!16=1:ș"Wimp_SendMessage",18,q%,q%!20,q%!24 <�;�:�f(0,"Please enter a filename of up to 10 letters",1) <�� <�� <�� <� <�1��J(a$):ș"OS_File",5,a$�,,,,,Ib%:�(Ib%�8)=8� <�)�f(0,"The file '"+a$+"' is locked",1) <��:ș"OS_Find",128,a$�Jb%:�r("!KeysDemo V2.00, Demonstration version Beta",Jb%):�r("List of keystrokes",Jb%):ș"OS_BPut",10,Jb%:�Kb%=0�7:�Lb%=0�96:�a%(Lb%,Kb%)<>-1� =6�!a%(Lb%,Kb%)<>0� =@AX%=a%(Lb%,Kb%)-4:F$="":�:X%=g%+X%!4:c$="":�(Kb%�4)�c$+="Alt+" =|�(Kb%�2)�c$+="Ctrl+" =��(Kb%�1)�c$+="Shift+" =�Ic$+=a$(Lb%)+": ":c$+=�a(X%+128):�(((X%?2)�16)=0�X%!20<0�(X%?3�8)=0)� =�(�((X%?2)�2)=0�c$+=" ("+�a(X%+56)+")" =�� =��(X%?3�32)=0��r(c$,Jb%) =��X%!4=-1 =�� =�� =�6�Lb%:�Kb%:ș"OS_Find",0,Jb%:ș"OS_File",18,a$,4095 >� >� >& >:L��u(a$):�f(0,"Saving is not possible on this demonstration version",1):� >N >bL��C(a$):�f(0,"Loading is not possible on this demostration version",1):� >v >�Z��ga:�Mb%=0�63:q%!12=0:ș"XWimp_SendMessage",19,q%,-2,Mb%�,,l%:�l%<>-2�l%<>0��x(l%,"") >�b�Mb%:Nb%=�k:ȕNb%<>-1:q%!12=0:ș"XWimp_SendMessage",19,q%,Nb%,-1�,,l%:�l%<>Nb%�l%<>0��x(l%,"") >�Nb%=�l(Nb%):�:� >� ?;��x(xb%,k$):Ob%=-1:Pb%=-1:�J%=yb%�0�-1:�b%(J%)=0�Ob%=J% ?*�b%(J%)=xb%�Pb%=J% ?4�J%:�Pb%=-1� ?H!b%(Ob%)=xb%:�k$=""�k$=�n(xb%) ?\b$(Ob%)=k$ ?p� ?p� ?z ?�g��I:$g%="Keystrokes"+z$:�Qb%=12�2584�4:g%!Qb%=0:�Qb%:�I%=2588�2588+k%-4�4:g%!I%=-1:�I%:H%=2588+k%:� ?� ?����G(Y%):Rb%=p%:�I%=0�k%-4�4:p%!I%=Y%!I%:�I%:Y%=g%+Y%!4:Rb%+=k%:ȕY%>g%�(Y%?3�32)<>0�Rb%<p%+k%*10:�I%=0�k%-4�4:Rb%!I%=Y%!I%:�I%:Y%=g%+Y%!4:Rb%+=k%:�:�Rb%<p%+k%*10� @� �I%=Rb%�p%+k%*9�k%:!I%=0:�I% @�� @�� @� @�B��F(Y%):�I%=0�k%-4�4:p%!I%=Y%!I%:�I%:p%!k%=0:p%?3=(p%?3)��32:� A A���`(Sb%):Tb%=Sb%!4:Ub%=(?(g%+Tb%+3)�32):�h(Sb%,�):Sb%=g%+Tb%:Vb%=1:ȕTb%>0�Vb%<10�Ub%<>0:Tb%=Sb%!4:Ub%=(?(g%+Tb%+3)�32):�h(Sb%,�):Sb%=g%+Tb%:Vb%+=1:�:�c:� A� A���N(d%):kb%=�:�d%<>-1� A�$�(d%?3�64)<>0�(d%?3�128)=0�kb%=� A�� A� �kb%� A�+Wb%=a%:a%=d%:Ta%=�:�D(B%,r%,p%?2):�Ta%� B"<a%=Wb%:d%?3=p%?3:d%?2=p%?2:�I%=12�k%-4�4:d%!I%=p%!I%:�I% Bh� Bh(�:�f(0,"This keystroke is locked",1) B�� B�� B� B�R��H(d%):Xb%=k%:ȕ!(Xb%+p%+4)<>-1�Xb%<(k%*10):Xb%+=k%:�:�(g%+H%+Xb%+k%)>g%+Sa%� B�*�f(0,"Sorry, I have no more memory",1) B�=�:�N(d%):Yb%=d%:Zb%=p%:p%+=k%:�d%!4=-1�_b%=�f�_b%=g%+d%!4 CEȕp%<Zb%+k%*10�(p%?3�32)<>0:�(_b%?3�128)=0��y(_b%)��N(_b%):_b%=�f C01p%+=k%:�:p%=Zb%:a%=Yb%:�a%!8=-1�a%?3=a%?3��32 Cb� Cl� Cv C���m(g$):�g$,".")=0� C�;�f(0,"To save, drag the file to a directory display",1) C��:ȎU%� C��1:�u(g$):l$=g$ C��2:�J(g$):o$=g$ C��4:�K(g$):u$=g$ C�� C�ș"Wimp_CreateMenu",,-1 C�� C�� C� Dv��aa(a$):ș"OS_Find",128,a$�`b%:�r("Set Keystroke$Do0 "+�a(a%+128),`b%):ș"OS_Find",0,`b%:ș"OS_File",18,a$,4075:� D> DR��y(ac%):�H%+g%+k%>g%+Sa%� D\*�f(0,"Sorry, I have no more memory",1) Dp��:Tb%=ac%-g%:bc%=ac%!8:d%=�f:?d%=B%:d%?1=(d%?1�248)+r%:d%?2=p%?2:d%?3=p%?3:d%!4=Tb%:d%!8=bc%:�I%=12�k%-4�4:d%!I%=p%!I%:�I%:�d%+k%=g%+H%� D�+H%+=k%:�I%=d%+k%�d%+(k%*2)-4:!I%=-1:�I% E$� E$ �d%!4<>-1�!(8+g%+d%!4)=d%-g% E.�d%!8<>-1� E8!(4+g%+d%!8)=d%-g% EL�:!a%(B%,r%)=d%-g% E`� E` a%=d% Et� Et� E~ E�y��_(d%):�y(d%):Yb%=d%:Zb%=p%:p%+=k%:d%=g%+d%!4:ȕp%<Zb%+k%*10�(p%?3�32)<>0:�y(d%):p%+=k%:d%=g%+d%!4:�:a%=Yb%:p%=Zb%:� F F(L��K(a$):�f(0,"Saving is not possible on this demonstration version",1):� F< FPk��t(cc%,dc%,ec%):ș"OS_GSTrans","<Keystroke%Var>",Ba%,8:ș"OS_GSTrans","<Keystroke%Inc>",Ca%,8:�cc%=-2� FnVș"XOS_ReadVarVal","Executor$Dir",b%,-1,0�,,fc%:�fc%�z%!84=&7009001�z%!84=&7409001 F�/�H%>2588+k%�u%!108=&7009001�u%!108=&7409001 F�Eș"Wimp_CreateMenu",,u%,(!q%)-64,340:xa%=cc%:Da%=(!q%)-64:Ea%=340 F��:�q%!12=e%�q%!16=4� F�$$(a%+128)=�c(e%,14):�b��h(a%,�) F�)B%=95:r%=-�(-1)-2*�(-2)-4*�(-3):�i:�c G5�:�a(a%+128)<>""�i%!180=&7009001�i%!180=&7409001 GK�!p%=-1�i%!132=&7409001:i%!156=&7409001�i%!132=&7009001:i%!156=&7009001 G"��(a%?3�128)=0�i%!36=&7009001:i%!60=&7009001:i%!84=&7009001:i%!108=&7009001�i%!36=&7409001:i%!60=&7409001:i%!84=&7409001:i%!108=&7409001 G,Qș"Wimp_CreateMenu",,i%,(!q%)-64,(q%!4)+44:xa%=cc%:Da%=(!q%)-64:Ea%=(q%!4)+44 G^� G^� Gh� Gr G����M:�b(wa%,0,""):!b%=wa%:ș"Wimp_GetWindowState",,b%:ș"Wimp_OpenWindow",,b%:ș"Wimp_GetCaretPosition",,L%:ș"Wimp_SetCaretPosition",wa%,0,-1,-1,�(1<<25),-1:n$="<None>":�:ș"Wimp_Poll",6146,q%�ca% G�(�ca%=8�!q%=wa%�q%!24=13�n$=�c(wa%,0) G�(�(ca%=17�ca%=18)�q%!16=0�ș"OS_Exit" G�n$<>"<None>":�("Set Keystroke$Input "+n$):ș"Wimp_SetCaretPosition",!L%,L%!4,L%!8,L%!12,L%!16,L%!20:!b%=wa%:ș"Wimp_CloseWindow",,b%:� H0 HDݤm:�L%:ș"OS_GSTrans","<Keystroke%Inc>",q%,8192:L%=�(�a(q%)):ș"OS_GSTrans","<Keystroke%Var>",q%,8192:gc%=�(�a(q%)):�L%<0� H��gc%+L%<-999�s$=""�s$=�L% H�#�:�gc%+L%>9999�s$=""�s$="+"+�L% H�� H�=s$ H�y��f(hc%,A$,ic%):!b%=hc%:$(b%+4)=A$:ș"Wimp_ReportError",b%,ic%,"Keystroke"�,jc%:�jc%=2�ș"Wimp_CloseDown":ș"OS_Exit" H�da%=�:� I I Pݤi(B$):!b%=0:$(b%+4)=B$:ș"Wimp_ReportError",b%,3,"Keystroke"�,jc%:=(jc%=1) IR}��b(f%,h%,c$):!b%=f%:b%!4=h%:ș"Wimp_GetIconState",,b%:$(b%!28)=�c$,(b%!32)-1):b%!8=0:b%!12=0:ș"Wimp_SetIconState",,b%:� I� I�Y��a(f%,h%,kc%,lc%):!b%=f%:b%!4=h%:b%!12=kc%:b%!8=-lc%*kc%:ș"Wimp_SetIconState",,b%:� I� J]��l(f%,h%,mc%):!b%=f%:b%!4=h%:b%!8=mc%<<12:b%!12=61440:ș"Wimp_SetIconState",,b%:�mc%<14� JB"�!C%=f%�C%!4=h%�!C%=-1�C%!4=-1 JL� JV� J` JtZ��q(f%,h%,nc%):!b%=f%:b%!4=h%:b%!8=nc%<<24:b%!12=-16777216:ș"Wimp_SetIconState",,b%:� J� J�Jݤd(f%,h%,kc%):!b%=f%:b%!4=h%:ș"Wimp_GetIconState",,b%:=(b%!24�kc%)>0 K Gݤa(o%):p$="":ȕ(?o%>31�?o%<256)��(p$)<255:p$=p$+�?o%:o%=o%+1:�:=p$ KPxݤe(l%,o%):ș"Wimp_TransferBlock",l%,o%,oc%,b%,256:o%=b%:p$="":ȕ(?o%>31�?o%<256)��(p$)<255:p$=p$+�?o%:o%=o%+1:�:=p$ K����k(f%):!q%=f%:ș"Wimp_GetWindowState",,q%:pc%=pa%-(q%!4):qc%=qa%-(q%!16)-1:q%!4=(q%!4)+pc%:q%!8=(q%!8)+qc%:q%!12=(q%!12)+pc%:q%!16=(q%!16)+qc%:q%!28=ta%:ș"Wimp_OpenWindow",,q%:pa%=q%!4:qa%=q%!8:ra%=!q%:� L" L6-��d(f%):!b%=f%:ș"Wimp_CloseWindow",,b%:� LT Lhjݤn(l%):!q%=24:q%!12=0:q%!16=262342:q%!20=l%:ș"Wimp_SendMessage",18,q%,0:j$="":�:�g(6147):�j$<>"":=j$ L�ݤg(l%,f%,rc%):Ȏf%� L��-1:d$="Background" L��-2:d$="Icon bar" L�:!q%=f%:�rc%� L�1q%!32=0:ș"XWimp_GetWindowInfo",,q%:�q%!32=0� Md$="Nonexistent" M0W�:v%=(((q%!32)�(1<<31))<>0):�(v%�(q%!32�(1<<26))<>0)�(�v%�(q%!32�1)<>0)�q%?36<>255� MD�((q%!60)�256)=0� MNd$=�a(q%+76) Mb�:d$=�e(l%,q%!76) Mv� Mv�:d$="No title" M�� M�� M�r�:ș"Wimp_GetWindowInfo",,q%:v%=(((q%!32)�(1<<31))<>0):�(v%�(q%!32�(1<<26))<>0)�(�v%�(q%!32�1)<>0)�q%?36<>255� M��((q%!60)�256)=0� M�d$=�a(q%+76) M��:d$=�e(l%,q%!76) M�� M��:d$="No title" N� N� N � N*=d$ NHݤo(l%,f%,h%):Ȏh%� NR�-1:b$="Background" Nf�-2:b$="Back Icon" Np�-3:b$="Close Icon" Nz�-4:b$="Title Bar" N��-5:b$="Toggle Icon" N��-6:b$="Scroll Up" N��-7:b$="V Bar" N��-8:b$="Scroll Down" N��-9:b$="Adjust Size" N��-10:b$="ScrollRight" N��-11:b$="H Bar" N��-12:b$="Scroll Left" N�I:!q%=f%:q%!4=h%:ș"Wimp_GetIconState",,q%:�(((q%!24)�61440)>>12)>13� N�b$="Variable" O�:�((q%!24)�256)=0� Ob$=�a(q%+28) O.�:�((q%!24)�1)=0� O8b$=�e(l%,q%!28) OL'�:�(q%!32)=-1�v$=""�v$=�e(l%,q%!32) OV/b$=�e(l%,q%!28):�b$=""�b$=�v$,2,�v$,",")-2) Oj� Ot� O~� O�� O�=b$ O���fa(f%):�f%<0� O�Za%=0:_a%=0:`a%=0 O�I�:!q%=f%:ș"Wimp_GetWindowInfo",,q%:Za%=q%!32�gb%:_a%=q%!36:`a%=q%!40 P� P� P( P<uݤp(f%,h%,kc%):!b%=f%:b%!4=h%:b%!8=kc%:b%!12=0:ș"Wimp_SetIconState",,b%:ș"Wimp_GetIconState",,b%:=(b%!24�kc%)>0 P�ݤq(x$):Ȏx$� P��"Background":sc%=-1 P��"Icon bar":sc%=-2 P�j:sc%=-1:K%=�k:ȕK%<>-1�sc%=-1:!q%=20:q%!12=0:ș"XWimp_SendMessage",19,q%,K%,-1�,,tc%:�tc%<>0�tc%<>K%� P� �x$=��g(tc%,K%,�),27)�sc%=K% P�� QK%=�l(K%):� Q"� Q"=sc% Q@rݤr(C$):uc%=-1:vc%=0:ȕvc%<256�uc%=-1:!q%=20:q%!12=0:ș"XWimp_SendMessage",19,q%,-2,vc%�,,wc%:�wc%<>0�wc%<>-2� Qr#�C$=��o(wc%,-2,vc%),11)�uc%=vc% Q|� Q�vc%+=1:�:=uc% Q����E:ș"Wimp_GetPointerInfo",,b%:q%!4=5:q%!8=(!b%)-34:q%!12=(b%!4)-34:q%!16=(!b%)+34:q%!20=(b%!4)+34:q%!24=ia%:q%!28=ja%:q%!32=ka%:q%!36=la%:ș"Wimp_DragBox",,q%:� R0 RD���L:!b%=128:b%!4=129:b%!8=130:b%!12=131:b%!16=4:b%!20=5:b%!24=-1:ș"OS_ReadVduVariables",b%,b%+28:ia%=b%!28<<b%!44:ja%=b%!32<<b%!48:ka%=b%!36<<b%!44:la%=b%!40<<b%!48:N%=1<<b%!44:O%=1<<b%!48:� R� R�Bݤc(f%,h%):!b%=f%:b%!4=h%:ș"Wimp_GetIconState",,b%:=�a(b%!28) S*)��e(c$):f$=�c(t%,1):�(c$)+�(f$)<116� S>>ș"Wimp_GetCaretPosition",,b%:�!b%<>t%�xc%=�(f$)�xc%=b%!20 SRqy$=�f$,xc%)+c$+�f$,�(f$)-xc%):�b(t%,1,y$):$(a%+12)=y$:ș"Wimp_SetCaretPosition",t%,1,-1,-1,�(1<<25),xc%+�(c$) S�� S�� S� S��ݤj:ș"Wimp_GetPointerInfo",,b%:f%=b%!12:q%!12=0:ș"Wimp_SendMessage",19,q%,f%,-1�,,l%:!q%=24:q%!12=0:q%!16=262342:q%!20=l%:ș"Wimp_SendMessage",18,q%,0:j$="":�:�g(6146):�j$<>"":�j$<>"Filer"� T w$="" T$9�:!q%=f%:ș"Wimp_GetWindowInfo",,q%:�(q%!60�256)=256� TBw$=�a(q%!76) TV�:w$=�a(q%+76) Tj� Tj� Tt=w$ T�Q��r(c$,Eb%):�I%=1��(c$):ș"OS_BPut",�(�c$,I%,1)),Eb%:�I%:ș"OS_BPut",10,Eb%:� T� T�u��o(f%,h%,D$):!b%=f%:b%!4=h%:ș"Wimp_GetIconState",,b%:$(b%!32)="s"+D$:b%!8=0:b%!12=0:ș"Wimp_SetIconState",,b%:� U( U<�ݤk:�I%:!q%=yc%:ș"Wimp_GetWindowState",,q%:�I%=4�16�4:q%!I%=(q%!I%)-4096:�I%:q%!28=-2:ș"Wimp_OpenWindow",,q%:ș"Wimp_GetWindowState",,q%:zc%=q%!28:ș"Wimp_CloseWindow",,q%:=zc% U�5ݤl(f%):!q%=f%:ș"Wimp_GetWindowState",,q%:=q%!28 U�;ݤh:ș"XOS_ReadVarVal",S%+128,S%,256,0�,,Ac%:=�$S%,Ac%) V"e��j:q%!64=1:Bc%=q%!8-!q%:Cc%=q%!12-q%!4:q%?68=Bc%�256:q%?69=Bc%�256:q%?70=Cc%�256:q%?71=Cc%�256:� Vr V�,��O:�(-256)=161��(-256)=160�Dc%=��Dc%=� V��da%=�:Z%=2000:k%=160:z$="1":yb%=127:Sa%=2588+(151*k%):�g% Sa%:�q% 8192,b% 256,_% Z%,u% 148,C% 24,S% 256,L% 24:�P% 52,Aa% 8,Ec% 8,Ba% 8,Fc% 8,Ca% 8:�z% 124,i% 196,D% 100,Q% 52,R% 52 W��p% k%*10,c%(127),a$(96),a%(96,7),b%(yb%),b$(yb%):ș"Wimp_Initialise",200,&4B534154,"KeysDemo"�Gc%,oc%:�Gc%<200��f(0,"This program will only work on RISC OS 2.00 or later",2) W&�aa%=�:!q%=-1:q%!4=0:q%!8=0:q%!12=68:q%!16=68:q%!20=12290:$(q%+24)="!Keysdemo":ș"Wimp_CreateIcon",,q%�Hc%:�L:ș"Wimp_OpenTemplate",,"<KeysDemo$Dir>.Templates":E%=_%:ș"Wimp_LoadTemplate",,q%,E%,_%+Z%,-1,"Info",0�,,E% Wl��j:ș"Wimp_CreateWindow",,q%�yc%:ș"Wimp_LoadTemplate",,q%,E%,_%+Z%,-1,"Type",0�,,E%:�j:!q%=(ka%/2)-338:q%!8=(ka%/2)+338:ș"Wimp_CreateWindow",,q%�e%:ș"Wimp_LoadTemplate",,q%,E%,_%+Z%,-1,"Text",0�,,E% W���j:ș"Wimp_CreateWindow",,q%�t%:ș"Wimp_LoadTemplate",,q%,E%,_%+Z%,-1,"Window/Icon",0�,,E%:�j:ș"Wimp_CreateWindow",,q%�m%:ș"Wimp_LoadTemplate",,q%,E%,_%+Z%,-1,"Click",0�,,E%:�j:ș"Wimp_CreateWindow",,q%�M% WƬș"Wimp_LoadTemplate",,q%,E%,_%+Z%,-1,"Menus",0�,,E%:�j:ș"Wimp_CreateWindow",,q%�G%:ș"Wimp_LoadTemplate",,q%,E%,_%+Z%,-1,"Save",0�,,E%:�j:ș"Wimp_CreateWindow",,q%�A% W��ș"Wimp_LoadTemplate",,q%,E%,_%+Z%,-1,"MoveWind",0�,,E%:�j:ș"Wimp_CreateWindow",,q%�j%:ș"Wimp_LoadTemplate",,q%,E%,_%+Z%,-1,"Enter",0�,,E%:�j:ș"Wimp_CreateWindow",,q%�wa%:ș"Wimp_CloseTemplate":$u%="KeysDemo":u%!12=459271 X*�u%!16=152:u%!20=44:u%!24=0:u%!28=0:u%!32=yc%:u%!36=&7009001:$(u%+40)="Info":u%!52=0:u%!56=z%:u%!60=&7009001:$(u%+64)="Save":u%!76=2:u%!80=D%:u%!84=&7009001:$(u%+88)="Prefs" XR�u%!100=0:u%!104=-1:u%!108=&7009001:$(u%+112)="Clear All":u%!124=128:u%!128=-1:u%!132=&7009001:$(u%+136)="Quit":$z%="Save":z%!12=459271:z%!16=184:z%!20=44:z%!24=0 Xz�z%!28=8:z%!32=A%:z%!36=&7009001:$(z%+40)="Keystrokes":z%!52=0:z%!56=-1:z%!60=&7009001:$(z%+64)="Default":z%!76=8:z%!80=A%:z%!84=&7009001:$(z%+88)="Executor":z%!100=136:z%!104=A%:z%!108=&7009001:$(z%+112)="List" X��$i%="Edit":i%!12=459271:i%!16=168:i%!20=44:i%!24=0:i%!28=0:i%!32=-1:i%!36=&7009001:$(i%+40)="Copy":i%!52=0:i%!56=-1:i%!60=&7009001:$(i%+64)="Copy Group":i%!76=0:i%!80=-1:i%!84=&7009001:$(i%+88)="Cut" Xԧi%!100=0:i%!104=-1:i%!108=&7009001:$(i%+112)="Cut Group":i%!124=0:i%!128=-1:i%!132=&7009001:$(i%+136)="Paste":i%!148=0:i%!152=-1:i%!156=&7009001:$(i%+160)="Insert" X�i%!172=136:i%!176=A%:i%!180=&7009001:$(i%+184)="Action":$D%="Prefs":D%!12=459271:D%!16=168:D%!20=44:D%!24=0:D%!28=0:D%!32=P%:D%!36=&7009001:$(D%+40)="Autoexec" Y�D%!52=0:D%!56=Q%:D%!60=&7009001:$(D%+64)="Variable":D%!76=128:D%!80=R%:D%!84=&7009001:$(D%+88)="Increment":$P%="Minutes":P%!12=459271:P%!16=96:P%!20=44:P%!24=0:P%!28=132:P%!32=-1:P%!36=&7009101 YL�P%!40=Aa%:P%!44=Ec%:P%!48=3:$Aa%="15":$Ec%="a0-9":oa%=90000:na%=�:$Q%="Variable":Q%!12=459271:Q%!16=96:Q%!20=44:Q%!24=0:Q%!28=132:Q%!32=-1:Q%!36=&7009101:Q%!40=Ba%:Q%!44=Fc%:Q%!48=8:ș"OS_GSTrans","<Keystroke%Var>",q%,8192 Y��$Ba%=�a(q%):$Fc%="a0-9\-":$R%="Increment":R%!12=459271:R%!16=96:R%!20=44:R%!24=0:R%!28=132:R%!32=-1:R%!36=&7009101:R%!40=Ca%:R%!44=Fc%:R%!48=8:ș"OS_GSTrans","<Keystroke%Inc>",Ca%,8:H%=2588+k%:B%=13:r%=2:�I:w%=�:�ma%=0�127:�c%(ma%):�ma% Zm�ma%=0�96:�a$(ma%):�ma%:Ic%=g%+12:�I%=0�96:�E$:�J%=0�7:�E$,J%+1,1)="1"�a%(I%,J%)=Ic%:Ic%+=4�a%(I%,J%)=-1 Zd��J%:�I%:va%=-1:U%=-1:l$="Keydefs":o$="List":u$="!Executor":!p%=-1:Jc%=255:gb%=-15196225:�I%=0�yb%:b$(I%)="":�I%:�ga:�i:�a(e%,10,1<<22,�):�c:Kc%=�:�Dc%� ["*ș"OS_ReadSysInfo",2�,,Kc%:Kc%=(Kc%=1) [@� [@ �Kc%� [J-a$(55)="#":a$(62)="\":c%(94)=62:c%(46)=-1 [|� [|da%=�:� [� [�5� -1,-1,-1,-1,-1,-1,-1,-1,-1,94,95,96,-1,-1,-1,-1 [�5� 29,42,43,44, 4,47, 7,50,45,75,83,84,11,12,10,-1 [�5� 0,35,17,32,46,21,48,39,50,76,85,86,60,61,62,63 [�5� 40,41,16,30,45,33,27,28,54,73,87,88,93,64,65,66 [�5� -1,13,36,18,37,22,23,41,57,71,90,-1,89,-1,67,68 [�5� -1,31,15,19,20,26,24,57,56,70,91,92,-1,51,-1,-1 [�5� 59,38,69,34,14,25,49,52,53,72,77,78,80,-1,-1,-1 [�5� 58, 1, 2, 3, 5, 6, 8, 9,55,74,81,82,79,-1,-1,-1 [� \=� Print (F0),F1,F2,F3,F4,F5,F6,F7,F8,F9,F10,F11,F12,A,B,C \%� D,E,F,G,H,I,J,K,L,M,N,O,P,Q,R,S \%� T,U,V,W,X,Y,Z,0,1,2,3,4,5,6,7,8 \&U� 9,",","-","=",".","/","[","\","]",";",Escape,Tab,Break,Back tick,"�",Back space \0?� Insert,Home,Page Up,Page Down,"'",Space bar,Delete,Return \:P� Copy,Up arrow,Right arrow,Left arrow,Down arrow,Keypad 0,Keypad 1,Keypad 2 \DM� Keypad 3,Keypad 4,Keypad 5,Keypad 6,Keypad 7,Keypad 8,Keypad 9,Keypad + \NR� Keypad -,Keypad .,Keypad /,Keypad #,Keypad *,Keypad Enter,Select,Menu,Adjust \X \lM� 11111111,11111111,11111111,11111111,11111111,11111111,11111111,11111111 \lM� 11111111,11111111,11111111,11111111,11111111,00111111,00111111,00111111 \vM� 00111111,00111111,00111111,00111111,00111111,00111111,00111111,00111111 \�M� 00111111,00111111,00111111,00111111,00111111,00111111,00111111,00111111 \�M� 00111111,00111111,00111111,00111111,00111111,00111111,00111111,00111111 \�M� 00111111,00111111,00111111,00111111,00111111,00111111,00111111,00111111 \�M� 00111111,00111111,00111111,00111111,00111111,00111111,00111111,00111111 \�M� 00111111,00111111,11111111,11111111,10001000,00111111,00111111,00111111 \�M� 11111111,11111111,11111111,11111111,00111111,00111111,00111111,00111111 \�M� 00111111,11111111,11111111,11111111,11111111,01111111,01111111,01111111 \�M� 01111111,01111111,01111111,01111111,01111111,01111111,01111111,01111111 \�V� 01111111,01111111,01111111,01111111,01111111,01111111,01111111,01111111,01111111 �
00000000 0d 00 01 51 f4 3e 3c 53 71 75 69 73 68 24 53 63 |...Q.><Squish$Sc| 00000010 72 61 70 3e 20 73 71 75 69 73 68 65 64 20 62 79 |rap> squished by| 00000020 20 4d 48 27 73 20 42 41 53 49 43 20 63 72 75 6e | MH's BASIC crun| 00000030 63 68 65 72 20 76 31 2e 32 30 20 31 34 2f 35 2f |cher v1.20 14/5/| 00000040 38 39 20 4f 6e 20 30 38 20 4d 61 72 20 31 39 39 |89 On 08 Mar 199| 00000050 33 0d 00 02 36 3a f2 4f 3a f5 3a f2 67 28 36 31 |3...6:.O:.:.g(61| 00000060 34 36 29 3a fd 61 61 25 3a c8 99 22 57 69 6d 70 |46):.aa%:.."Wimp| 00000070 5f 43 6c 6f 73 65 44 6f 77 6e 22 3a c8 99 22 4f |_CloseDown":.."O| 00000080 53 5f 45 78 69 74 22 0d 00 8c 2c dd f2 67 28 62 |S_Exit"...,..g(b| 00000090 61 25 29 3a c8 99 22 57 69 6d 70 5f 50 6f 6c 6c |a%):.."Wimp_Poll| 000000a0 22 2c 62 61 25 2c 71 25 b8 63 61 25 3a c8 8e 63 |",ba%,q%.ca%:..c| 000000b0 61 25 ca 0d 00 aa 16 c9 30 3a e7 ac 64 61 25 8c |a%......0:..da%.| 000000c0 65 61 25 3d 2d 31 3a f2 50 0d 00 b4 09 c9 32 3a |ea%=-1:.P.....2:| 000000d0 f2 73 0d 00 c8 09 c9 33 3a f2 51 0d 00 d2 09 c9 |.s.....3:.Q.....| 000000e0 34 3a f2 52 0d 00 dc 09 c9 35 3a f2 53 0d 00 e6 |4:.R.....5:.S...| 000000f0 09 c9 36 3a f2 54 0d 00 f0 09 c9 37 3a f2 55 0d |..6:.T.....7:.U.| 00000100 00 fa 09 c9 38 3a f2 56 0d 01 04 09 c9 39 3a f2 |....8:.V.....9:.| 00000110 57 0d 01 0e 0d c9 31 37 2c 31 38 3a f2 58 0d 01 |W.....17,18:.X..| 00000120 18 05 cb 0d 01 18 05 e1 0d 01 22 04 0d 01 4a 44 |.........."...JD| 00000130 dd f2 50 3a c8 99 22 57 69 6d 70 5f 47 65 74 43 |..P:.."Wimp_GetC| 00000140 61 72 65 74 50 6f 73 69 74 69 6f 6e 22 2c 2c 62 |aretPosition",,b| 00000150 25 3a e7 21 62 25 3d 65 25 80 28 62 25 21 34 29 |%:.!b%=e%.(b%!4)| 00000160 3c 3e 31 34 8c 66 61 25 3d b9 8b 66 61 25 3d a3 |<>14.fa%=..fa%=.| 00000170 0d 01 72 1d 64 61 25 3d b9 3a 67 61 25 3d a3 3a |..r.da%=.:ga%=.:| 00000180 e7 a6 28 2d 34 29 80 a6 28 2d 37 29 8c 0d 01 90 |..(-4)..(-7)....| 00000190 06 f2 7a 0d 01 a4 25 cc 3a c8 99 22 4f 53 5f 42 |..z...%.:.."OS_B| 000001a0 79 74 65 22 2c 31 32 31 2c 39 b8 2c 60 25 3a e7 |yte",121,9.,`%:.| 000001b0 60 25 3c 3e 32 35 35 8c 0d 01 b8 16 60 25 3d 63 |`%<>255.....`%=c| 000001c0 25 28 60 25 29 3a e7 60 25 3c 3e 2d 31 8c 0d 01 |%(`%):.`%<>-1...| 000001d0 cc 2a 68 61 25 3d 2d a6 28 2d 31 29 2d 32 2a a6 |.*ha%=-.(-1)-2*.| 000001e0 28 2d 32 29 2d 34 2a a6 28 2d 33 29 3a e7 66 61 |(-2)-4*.(-3):.fa| 000001f0 25 80 60 25 3c 39 34 8c 0d 01 e0 24 24 28 61 25 |%.`%<94....$$(a%| 00000200 2b 31 32 38 29 3d a4 63 28 65 25 2c 31 34 29 3a |+128)=.c(e%,14):| 00000210 e7 a4 62 8c f2 68 28 61 25 2c b9 29 0d 01 f4 33 |..b..h(a%,.)...3| 00000220 42 25 3d 60 25 3a 72 25 3d 68 61 25 3a c8 95 61 |B%=`%:r%=ha%:..a| 00000230 25 28 42 25 2c 72 25 29 3d 2d 31 3a 72 25 3d 28 |%(B%,r%)=-1:r%=(| 00000240 72 25 2b 31 29 83 38 3a ce 3a f2 69 3a f2 63 0d |r%+1).8:.:.i:.c.| 00000250 02 44 16 cc 3a e7 61 25 28 60 25 2c 68 61 25 29 |.D..:.a%(`%,ha%)| 00000260 3c 3e 2d 31 8c 0d 02 4e 14 e7 21 61 25 28 60 25 |<>-1...N..!a%(`%| 00000270 2c 68 61 25 29 3c 3e 30 8c 0d 02 58 3a 63 25 3d |,ha%)<>0...X:c%=| 00000280 61 25 28 60 25 2c 68 61 25 29 2d 34 3a 73 25 3d |a%(`%,ha%)-4:s%=| 00000290 b9 3a f5 3a 63 25 3d 67 25 2b 63 25 21 34 3a e7 |.:.:c%=g%+c%!4:.| 000002a0 73 25 3d b9 84 28 28 63 25 3f 33 29 80 33 32 29 |s%=..((c%?3).32)| 000002b0 3d 30 8c 0d 02 8a 12 e7 28 63 25 3f 31 80 31 36 |=0......(c%?1.16| 000002c0 29 3d 31 36 8c 0d 02 94 08 73 25 3d b9 0d 02 a8 |)=16.....s%=....| 000002d0 15 cc 3a f2 41 28 63 25 29 3a f2 67 28 36 31 34 |..:.A(c%):.g(614| 000002e0 36 29 0d 02 c6 05 cd 0d 02 c6 05 cd 0d 02 d0 2f |6)............./| 000002f0 fd 63 25 21 34 3d 2d 31 3a c8 97 c8 93 69 61 25 |.c%!4=-1:....ia%| 00000300 2c 6a 61 25 2c 6b 61 25 2d 69 61 25 2c 6c 61 25 |,ja%,ka%-ia%,la%| 00000310 2d 6a 61 25 3a e7 ac 67 61 25 8c 0d 02 ee 23 f5 |-ja%:..ga%....#.| 00000320 3a c8 99 22 4f 53 5f 42 79 74 65 22 2c 31 32 32 |:.."OS_Byte",122| 00000330 b8 2c 6d 61 25 3a fd 6d 61 25 3d 32 35 35 0d 03 |.,ma%:.ma%=255..| 00000340 16 05 cd 0d 03 16 05 cd 0d 03 20 05 cd 0d 03 2a |.......... ....*| 00000350 05 cd 0d 03 34 05 cd 0d 03 3e 05 cd 0d 03 48 05 |....4....>....H.| 00000360 cd 0d 03 52 f1 24 28 53 25 2b 31 32 38 29 3d 22 |...R.$(S%+128)="| 00000370 4b 65 79 73 74 72 6f 6b 65 24 44 6f 2a 22 3a 68 |Keystroke$Do*":h| 00000380 24 3d a4 68 3a c8 95 68 24 3c 3e 22 22 3a c8 99 |$=.h:..h$<>"":..| 00000390 22 4f 53 5f 53 65 74 56 61 72 56 61 6c 22 2c 53 |"OS_SetVarVal",S| 000003a0 25 2b 31 32 38 2c 22 43 6c 65 61 72 22 2c 2d 31 |%+128,"Clear",-1| 000003b0 2c 30 2c 30 3a f2 42 28 68 24 29 3a 24 28 53 25 |,0,0:.B(h$):$(S%| 000003c0 2b 31 32 38 29 3d 22 4b 65 79 73 74 72 6f 6b 65 |+128)="Keystroke| 000003d0 24 44 6f 2a 22 3a 68 24 3d a4 68 3a ce 3a 24 28 |$Do*":h$=.h:.:$(| 000003e0 53 25 2b 31 32 38 29 3d 22 4b 65 79 73 74 72 6f |S%+128)="Keystro| 000003f0 6b 65 24 4c 6f 61 64 2a 22 3a 74 24 3d a4 68 3a |ke$Load*":t$=.h:| 00000400 c8 95 74 24 3c 3e 22 22 3a c8 99 22 4f 53 5f 53 |..t$<>"":.."OS_S| 00000410 65 74 56 61 72 56 61 6c 22 2c 53 25 2b 31 32 38 |etVarVal",S%+128| 00000420 2c 22 43 6c 65 61 72 22 2c 2d 31 2c 30 2c 30 3a |,"Clear",-1,0,0:| 00000430 f2 43 28 74 24 29 3a 24 28 53 25 2b 31 32 38 29 |.C(t$):$(S%+128)| 00000440 3d 22 4b 65 79 73 74 72 6f 6b 65 24 4c 6f 61 64 |="Keystroke$Load| 00000450 2a 22 0d 03 de 2d 74 24 3d a4 68 3a ce 3a e7 28 |*"...-t$=.h:.:.(| 00000460 6e 61 25 2b 6f 61 25 29 3c 91 8c f2 42 28 22 41 |na%+oa%)<...B("A| 00000470 75 74 6f 65 78 65 63 22 29 3a 6e 61 25 3d 91 0d |utoexec"):na%=..| 00000480 03 fc 0b 64 61 25 3d a3 3a e1 0d 04 10 04 0d 04 |...da%=.:.......| 00000490 24 5d dd f2 73 3a ea 70 61 25 2c 71 61 25 2c 72 |$]..s:.pa%,qa%,r| 000004a0 61 25 2c 73 61 25 3a c8 99 22 57 69 6d 70 5f 4f |a%,sa%:.."Wimp_O| 000004b0 70 65 6e 57 69 6e 64 6f 77 22 2c 2c 71 25 3a 70 |penWindow",,q%:p| 000004c0 61 25 3d 71 25 21 34 3a 71 61 25 3d 71 25 21 38 |a%=q%!4:qa%=q%!8| 000004d0 3a 72 61 25 3d 21 71 25 3a 74 61 25 3d 71 25 21 |:ra%=!q%:ta%=q%!| 000004e0 32 38 3a e7 21 71 25 3d 65 25 8c 0d 04 60 12 c8 |28:.!q%=e%...`..| 000004f0 8e 28 28 61 25 3f 32 29 83 31 36 29 ca 0d 04 6a |.((a%?2).16)...j| 00000500 29 c9 30 3a f2 6b 28 6d 25 29 3a f2 6b 28 4d 25 |).0:.k(m%):.k(M%| 00000510 29 3a f2 64 28 74 25 29 3a f2 64 28 47 25 29 3a |):.d(t%):.d(G%):| 00000520 f2 64 28 6a 25 29 0d 04 b0 2b c9 31 2c 35 3a f2 |.d(j%)...+.1,5:.| 00000530 6b 28 6d 25 29 3a f2 6b 28 47 25 29 3a f2 64 28 |k(m%):.k(G%):.d(| 00000540 4d 25 29 3a f2 64 28 74 25 29 3a f2 64 28 6a 25 |M%):.d(t%):.d(j%| 00000550 29 0d 04 ec 2b c9 32 2c 33 3a f2 6b 28 74 25 29 |)...+.2,3:.k(t%)| 00000560 3a f2 64 28 6d 25 29 3a f2 64 28 4d 25 29 3a f2 |:.d(m%):.d(M%):.| 00000570 64 28 47 25 29 3a f2 64 28 6a 25 29 0d 05 28 29 |d(G%):.d(j%)..()| 00000580 c9 34 3a f2 6b 28 6d 25 29 3a f2 6b 28 6a 25 29 |.4:.k(m%):.k(j%)| 00000590 3a f2 64 28 74 25 29 3a f2 64 28 4d 25 29 3a f2 |:.d(t%):.d(M%):.| 000005a0 64 28 47 25 29 0d 05 64 28 7f 3a f2 64 28 6d 25 |d(G%)..d(.:.d(m%| 000005b0 29 3a f2 64 28 4d 25 29 3a f2 64 28 74 25 29 3a |):.d(M%):.d(t%):| 000005c0 f2 64 28 47 25 29 3a f2 64 28 6a 25 29 0d 05 a0 |.d(G%):.d(j%)...| 000005d0 05 cb 0d 05 a0 05 cd 0d 05 aa 05 e1 0d 05 b4 04 |................| 000005e0 0d 05 c8 29 dd f2 51 3a c8 99 22 57 69 6d 70 5f |...)..Q:.."Wimp_| 000005f0 43 6c 6f 73 65 57 69 6e 64 6f 77 22 2c 2c 71 25 |CloseWindow",,q%| 00000600 3a e7 21 71 25 3d 65 25 8c 0d 05 e6 26 f2 64 28 |:.!q%=e%....&.d(| 00000610 6d 25 29 3a f2 64 28 4d 25 29 3a f2 64 28 74 25 |m%):.d(M%):.d(t%| 00000620 29 3a f2 64 28 47 25 29 3a f2 64 28 6a 25 29 0d |):.d(G%):.d(j%).| 00000630 06 22 05 cd 0d 06 22 05 e1 0d 06 2c 04 0d 06 40 |."...."....,...@| 00000640 10 dd f2 53 3a e7 21 71 25 3d 65 25 8c 0d 06 5e |...S:.!q%=e%...^| 00000650 50 c8 99 22 57 69 6d 70 5f 47 65 74 43 61 72 65 |P.."Wimp_GetCare| 00000660 74 50 6f 73 69 74 69 6f 6e 22 2c 2c 43 25 3a e7 |tPosition",,C%:.| 00000670 28 28 21 43 25 29 3c 3e 65 25 84 28 43 25 21 34 |((!C%)<>e%.(C%!4| 00000680 29 3c 3e 31 34 29 80 28 28 21 43 25 29 3c 3e 74 |)<>14).((!C%)<>t| 00000690 25 84 28 43 25 21 34 29 3c 3e 31 29 8c 0d 06 72 |%.(C%!4)<>1)...r| 000006a0 23 c8 99 22 57 69 6d 70 5f 53 65 74 43 61 72 65 |#.."Wimp_SetCare| 000006b0 74 50 6f 73 69 74 69 6f 6e 22 2c 65 25 2c 2d 31 |tPosition",e%,-1| 000006c0 0d 06 86 05 cd 0d 06 86 05 cd 0d 06 90 05 e1 0d |................| 000006d0 06 9a 04 0d 06 ae 44 dd f2 52 3a c8 99 22 57 69 |......D..R:.."Wi| 000006e0 6d 70 5f 47 65 74 43 61 72 65 74 50 6f 73 69 74 |mp_GetCaretPosit| 000006f0 69 6f 6e 22 2c 2c 62 25 3a e7 21 71 25 3d 65 25 |ion",,b%:.!q%=e%| 00000700 80 ac 28 28 21 62 25 29 3d 65 25 80 28 62 25 21 |..((!b%)=e%.(b%!| 00000710 34 29 3d 31 34 29 8c 0d 06 d6 3e c8 99 22 58 57 |4)=14)....>.."XW| 00000720 69 6d 70 5f 53 65 74 43 61 72 65 74 50 6f 73 69 |imp_SetCaretPosi| 00000730 74 69 6f 6e 22 2c 21 43 25 2c 43 25 21 34 2c 43 |tion",!C%,C%!4,C| 00000740 25 21 38 2c 43 25 21 31 32 2c 43 25 21 31 36 2c |%!8,C%!12,C%!16,| 00000750 43 25 21 32 30 0d 06 ea 05 cd 0d 06 ea 05 e1 0d |C%!20...........| 00000760 06 f4 04 0d 07 08 0f dd f2 54 3a c8 8e 71 25 21 |.........T:..q%!| 00000770 38 ca 0d 07 1c 09 c9 32 3a f2 59 0d 07 30 15 c9 |8......2:.Y..0..| 00000780 31 2c 34 3a f2 5a 28 28 71 25 21 38 29 3d 31 29 |1,4:.Z((q%!8)=1)| 00000790 0d 07 3a 05 cb 0d 07 3a 05 e1 0d 07 44 04 0d 07 |..:....:....D...| 000007a0 58 10 dd f2 59 3a c8 8e 71 25 21 31 32 ca 0d 07 |X...Y:..q%!12...| 000007b0 6c 1b c9 2d 32 3a f2 74 28 2d 32 2c 28 21 71 25 |l..-2:.t(-2,(!q%| 000007c0 29 2d 36 34 2c 33 38 34 29 0d 07 80 33 c9 65 25 |)-64,384)...3.e%| 000007d0 2c 6d 25 2c 4d 25 2c 74 25 2c 47 25 2c 6a 25 3a |,m%,M%,t%,G%,j%:| 000007e0 f2 74 28 71 25 21 31 32 2c 28 21 71 25 29 2d 36 |.t(q%!12,(!q%)-6| 000007f0 34 2c 28 71 25 21 34 29 2b 34 34 29 0d 07 8a 05 |4,(q%!4)+44)....| 00000800 cb 0d 07 8a 05 e1 0d 07 94 04 0d 07 a8 15 dd f2 |................| 00000810 5a 28 75 61 25 29 3a c8 8e 71 25 21 31 32 ca 0d |Z(ua%):..q%!12..| 00000820 07 bc 36 c9 2d 32 3a 21 71 25 3d 65 25 3a c8 99 |..6.-2:!q%=e%:..| 00000830 22 57 69 6d 70 5f 47 65 74 57 69 6e 64 6f 77 53 |"Wimp_GetWindowS| 00000840 74 61 74 65 22 2c 2c 71 25 3a 71 25 21 32 38 3d |tate",,q%:q%!28=| 00000850 2d 31 3a f2 73 0d 07 f8 10 c9 65 25 3a c8 8e 71 |-1:.s.....e%:..q| 00000860 25 21 31 36 ca 0d 08 02 13 c9 31 3a e7 a4 62 8c |%!16......1:..b.| 00000870 f2 68 28 61 25 2c b9 29 0d 08 16 11 72 25 3d 72 |.h(a%,.)....r%=r| 00000880 25 82 34 3a f2 69 3a f2 63 0d 08 2a 13 c9 32 3a |%.4:.i:.c..*..2:| 00000890 e7 a4 62 8c f2 68 28 61 25 2c b9 29 0d 08 34 11 |..b..h(a%,.)..4.| 000008a0 72 25 3d 72 25 82 32 3a f2 69 3a f2 63 0d 08 48 |r%=r%.2:.i:.c..H| 000008b0 13 c9 33 3a e7 a4 62 8c f2 68 28 61 25 2c b9 29 |..3:..b..h(a%,.)| 000008c0 0d 08 52 11 72 25 3d 72 25 82 31 3a f2 69 3a f2 |..R.r%=r%.1:.i:.| 000008d0 63 0d 08 66 27 c9 34 3a 24 28 61 25 2b 31 32 38 |c..f'.4:$(a%+128| 000008e0 29 3d a4 63 28 65 25 2c 31 34 29 3a e7 a4 62 8c |)=.c(e%,14):..b.| 000008f0 f2 68 28 61 25 2c b9 29 0d 08 7a 14 e7 75 61 25 |.h(a%,.)..z..ua%| 00000900 8c 42 25 3d 39 36 8b 42 25 3d 39 34 0d 08 84 23 |.B%=96.B%=94...#| 00000910 72 25 3d 2d a6 28 2d 31 29 2d 32 2a a6 28 2d 32 |r%=-.(-1)-2*.(-2| 00000920 29 2d 34 2a a6 28 2d 33 29 3a f2 69 3a f2 63 0d |)-4*.(-3):.i:.c.| 00000930 08 ac 2e c9 36 2c 37 2c 38 2c 39 2c 31 30 2c 31 |....6,7,8,9,10,1| 00000940 31 3a f2 44 28 42 25 2c 72 25 2c 28 71 25 21 31 |1:.D(B%,r%,(q%!1| 00000950 36 29 2d 36 29 3a 77 25 3d b9 3a f2 63 0d 08 b6 |6)-6):w%=.:.c...| 00000960 16 c9 31 32 3a e7 28 61 25 3f 33 80 31 32 38 29 |..12:.(a%?3.128)| 00000970 3e 30 8c 0d 08 c0 11 61 25 3d 54 25 3a 54 25 3d |>0.....a%=T%:T%=| 00000980 61 25 21 38 0d 08 de 18 cc 3a 61 25 3d 67 25 2b |a%!8.....:a%=g%+| 00000990 61 25 21 38 3a 54 25 3d 61 25 21 38 0d 08 fc 05 |a%!8:T%=a%!8....| 000009a0 cd 0d 08 fc 06 f2 63 0d 09 10 11 c9 31 33 3a e7 |......c.....13:.| 000009b0 61 25 21 34 3d 2d 31 8c 0d 09 1a 0f 54 25 3d 61 |a%!4=-1.....T%=a| 000009c0 25 3a 61 25 3d a4 66 0d 09 38 18 cc 3a 61 25 3d |%:a%=.f..8..:a%=| 000009d0 67 25 2b 61 25 21 34 3a 54 25 3d 61 25 21 38 0d |g%+a%!4:T%=a%!8.| 000009e0 09 56 05 cd 0d 09 56 06 f2 63 0d 09 6a 2c c9 31 |.V....V..c..j,.1| 000009f0 36 3a 61 25 3f 33 3d 28 61 25 3f 33 80 32 35 34 |6:a%?3=(a%?3.254| 00000a00 29 2d a4 64 28 65 25 2c 31 36 2c 31 3c 3c 32 31 |)-.d(e%,16,1<<21| 00000a10 29 3a 77 25 3d b9 0d 09 88 2e c9 31 37 3a 61 25 |):w%=......17:a%| 00000a20 3f 33 3d 28 61 25 3f 33 80 32 35 33 29 2d 32 2a |?3=(a%?3.253)-2*| 00000a30 a4 64 28 65 25 2c 31 37 2c 31 3c 3c 32 31 29 3a |.d(e%,17,1<<21):| 00000a40 77 25 3d b9 0d 09 a6 52 c9 31 38 3a 61 25 3f 33 |w%=....R.18:a%?3| 00000a50 3d 28 61 25 3f 33 80 31 39 31 29 2d 36 34 2a a4 |=(a%?3.191)-64*.| 00000a60 64 28 65 25 2c 31 38 2c 31 3c 3c 32 31 29 3a 77 |d(e%,18,1<<21):w| 00000a70 25 3d b9 3a c8 99 22 57 69 6d 70 5f 53 65 74 43 |%=.:.."Wimp_SetC| 00000a80 61 72 65 74 50 6f 73 69 74 69 6f 6e 22 2c 65 25 |aretPosition",e%| 00000a90 2c 2d 31 3a f2 63 0d 09 d8 2f c9 32 30 3a 61 25 |,-1:.c.../.20:a%| 00000aa0 3f 33 3d 28 61 25 3f 33 80 32 32 33 29 2d 33 32 |?3=(a%?3.223)-32| 00000ab0 2a a4 64 28 65 25 2c 32 30 2c 31 3c 3c 32 31 29 |*.d(e%,20,1<<21)| 00000ac0 3a 77 25 3d b9 0d 09 f6 2e c9 32 31 3a 61 25 3f |:w%=......21:a%?| 00000ad0 31 3d 28 61 25 3f 31 80 32 34 37 29 2d 38 2a a4 |1=(a%?1.247)-8*.| 00000ae0 64 28 65 25 2c 32 31 2c 31 3c 3c 32 31 29 3a 77 |d(e%,21,1<<21):w| 00000af0 25 3d b9 0d 0a 14 2f c9 32 32 3a 61 25 3f 31 3d |%=..../.22:a%?1=| 00000b00 28 61 25 3f 31 80 32 33 39 29 2d 31 36 2a a4 64 |(a%?1.239)-16*.d| 00000b10 28 65 25 2c 32 32 2c 31 3c 3c 32 31 29 3a 77 25 |(e%,22,1<<21):w%| 00000b20 3d b9 0d 0a 32 05 cb 0d 0a 32 17 c9 6d 25 3a e7 |=...2....2..m%:.| 00000b30 71 25 21 31 36 3c 3e 32 30 8c 77 25 3d b9 0d 0a |q%!16<>20.w%=...| 00000b40 46 0c c8 8e 71 25 21 31 36 ca 0d 0a 50 27 c9 32 |F...q%!16...P'.2| 00000b50 3a 61 25 3f 33 3d 28 61 25 3f 33 29 84 32 38 3a |:a%?3=(a%?3).28:| 00000b60 61 25 3f 32 3d 28 61 25 3f 32 29 80 31 35 3a f2 |a%?2=(a%?2).15:.| 00000b70 63 0d 0a 64 20 c9 33 3a e7 28 28 61 25 3f 32 29 |c..d .3:.((a%?2)| 00000b80 83 31 36 29 3d 30 8c 68 25 3d 31 36 8b 68 25 3d |.16)=0.h%=16.h%=| 00000b90 30 0d 0a 6e 35 61 25 3f 32 3d 28 28 61 25 3f 32 |0..n5a%?2=((a%?2| 00000ba0 29 80 31 35 29 2b 28 31 3c 3c 34 29 3a 61 25 3f |).15)+(1<<4):a%?| 00000bb0 33 3d 28 28 28 61 25 3f 33 29 80 ac 31 36 29 2b |3=(((a%?3)..16)+| 00000bc0 68 25 29 3a f2 63 0d 0a 8c 32 c9 34 3a 61 25 3f |h%):.c...2.4:a%?| 00000bd0 32 3d 28 28 61 25 3f 32 29 80 31 35 29 2b 28 32 |2=((a%?2).15)+(2| 00000be0 3c 3c 34 29 3a 61 25 3f 33 3d 28 28 61 25 3f 33 |<<4):a%?3=((a%?3| 00000bf0 29 84 31 36 29 3a f2 63 0d 0a aa 32 c9 35 3a 61 |).16):.c...2.5:a| 00000c00 25 3f 32 3d 28 28 61 25 3f 32 29 80 31 35 29 2b |%?2=((a%?2).15)+| 00000c10 28 33 3c 3c 34 29 3a 61 25 3f 33 3d 28 28 61 25 |(3<<4):a%?3=((a%| 00000c20 3f 33 29 84 31 36 29 3a f2 63 0d 0a c8 35 c9 36 |?3).16):.c...5.6| 00000c30 3a 61 25 3f 33 3d 28 28 61 25 3f 33 29 80 ac 34 |:a%?3=((a%?3)..4| 00000c40 29 2d 34 2a a4 64 28 6d 25 2c 36 2c 31 3c 3c 32 |)-4*.d(m%,6,1<<2| 00000c50 31 29 3a e7 28 61 25 3f 33 80 34 29 3d 34 8c 0d |1):.(a%?3.4)=4..| 00000c60 0a dc 16 f2 62 28 6d 25 2c 39 2c a4 61 28 61 25 |....b(m%,9,.a(a%| 00000c70 2b 37 36 29 29 0d 0a f0 1b cc 3a f2 62 28 6d 25 |+76)).....:.b(m%| 00000c80 2c 39 2c 22 49 72 72 65 6c 65 76 61 6e 74 22 29 |,9,"Irrelevant")| 00000c90 0d 0b 04 05 cd 0d 0b 04 4c c9 37 3a 61 25 3f 33 |........L.7:a%?3| 00000ca0 3d 28 28 61 25 3f 33 29 80 ac 38 29 2d 38 2a a4 |=((a%?3)..8)-8*.| 00000cb0 64 28 6d 25 2c 37 2c 31 3c 3c 32 31 29 3a e7 28 |d(m%,7,1<<21):.(| 00000cc0 28 61 25 3f 32 83 31 36 29 3d 30 80 61 25 21 32 |(a%?2.16)=0.a%!2| 00000cd0 30 3c 30 29 84 28 61 25 3f 32 83 31 36 29 3d 34 |0<0).(a%?2.16)=4| 00000ce0 8c 0d 0b 22 10 e7 28 61 25 3f 33 80 38 29 3d 38 |..."..(a%?3.8)=8| 00000cf0 8c 0d 0b 2c 16 f2 62 28 6d 25 2c 31 2c a4 61 28 |...,..b(m%,1,.a(| 00000d00 61 25 2b 35 36 29 29 0d 0b 40 1b cc 3a f2 62 28 |a%+56))..@..:.b(| 00000d10 6d 25 2c 31 2c 22 49 72 72 65 6c 65 76 61 6e 74 |m%,1,"Irrelevant| 00000d20 22 29 0d 0b 54 05 cd 0d 0b 54 05 cd 0d 0b 5e 10 |")..T....T....^.| 00000d30 c9 32 30 3a 76 61 25 3d 31 3a f2 45 0d 0b 72 05 |.20:va%=1:.E..r.| 00000d40 cb 0d 0b 72 10 c9 4d 25 3a c8 8e 71 25 21 31 36 |...r..M%:..q%!16| 00000d50 ca 0d 0b 86 11 c9 31 3a 61 25 3f 32 34 3d 34 3a |......1:a%?24=4:| 00000d60 f2 63 0d 0b 9a 11 c9 32 3a 61 25 3f 32 34 3d 31 |.c.....2:a%?24=1| 00000d70 3a f2 63 0d 0b a4 1c c9 33 3a 61 25 3f 32 35 3d |:.c.....3:a%?25=| 00000d80 2d a4 64 28 4d 25 2c 33 2c 31 3c 3c 32 31 29 0d |-.d(M%,3,1<<21).| 00000d90 0b ae 05 cb 0d 0b ae 08 77 25 3d b9 0d 0b c2 21 |........w%=....!| 00000da0 c9 47 25 3a 68 25 3d 28 71 25 21 31 36 29 2d 38 |.G%:h%=(q%!16)-8| 00000db0 3a e7 68 25 3e 2d 31 80 68 25 3c 37 8c 0d 0b d6 |:.h%>-1.h%<7....| 00000dc0 09 e7 75 61 25 8c 0d 0b e0 17 e7 61 25 21 28 28 |..ua%......a%!((| 00000dd0 68 25 2a 34 29 2b 32 38 29 3e 2d 31 8c 0d 0b ea |h%*4)+28)>-1....| 00000de0 60 21 28 61 25 2b 32 38 2b 28 68 25 2a 34 29 29 |`!(a%+28+(h%*4))| 00000df0 3d 21 28 61 25 2b 32 38 2b 28 68 25 2a 34 29 29 |=!(a%+28+(h%*4))| 00000e00 2d 31 3a f2 62 28 47 25 2c 68 25 2b 38 2c c3 28 |-1:.b(G%,h%+8,.(| 00000e10 28 61 25 21 28 28 68 25 2a 34 29 2b 32 38 29 29 |(a%!((h%*4)+28))| 00000e20 2b 31 29 29 3a e7 68 25 3c 36 80 61 25 21 28 28 |+1)):.h%<6.a%!((| 00000e30 68 25 2a 34 29 2b 32 38 29 3d 2d 31 8c 0d 0c 08 |h%*4)+28)=-1....| 00000e40 49 e3 49 25 3d 68 25 2b 31 b8 36 3a f2 61 28 47 |I.I%=h%+1.6:.a(G| 00000e50 25 2c 49 25 2b 38 2c 31 3c 3c 32 32 2c b9 29 3a |%,I%+8,1<<22,.):| 00000e60 f2 62 28 47 25 2c 49 25 2b 38 2c 22 30 22 29 3a |.b(G%,I%+8,"0"):| 00000e70 21 28 61 25 2b 32 38 2b 28 49 25 2a 34 29 29 3d |!(a%+28+(I%*4))=| 00000e80 2d 31 3a ed 49 25 0d 0c 44 05 cd 0d 0c 44 05 cd |-1:.I%..D....D..| 00000e90 0d 0c 4e 1a cc 3a e7 61 25 21 28 28 68 25 2a 34 |..N..:.a%!((h%*4| 00000ea0 29 2b 32 38 29 3c 39 39 38 8c 0d 0c 62 61 21 28 |)+28)<998...ba!(| 00000eb0 61 25 2b 32 38 2b 28 68 25 2a 34 29 29 3d 21 28 |a%+28+(h%*4))=!(| 00000ec0 61 25 2b 32 38 2b 28 68 25 2a 34 29 29 2b 31 3a |a%+28+(h%*4))+1:| 00000ed0 f2 62 28 47 25 2c 68 25 2b 38 2c c3 28 28 61 25 |.b(G%,h%+8,.((a%| 00000ee0 21 28 28 68 25 2a 34 29 2b 32 38 29 29 2b 31 29 |!((h%*4)+28))+1)| 00000ef0 29 3a e7 68 25 3c 36 8c f2 61 28 47 25 2c 68 25 |):.h%<6..a(G%,h%| 00000f00 2b 39 2c 31 3c 3c 32 32 2c a3 29 0d 0c 80 05 cd |+9,1<<22,.).....| 00000f10 0d 0c 8a 05 cd 0d 0c 94 05 cd 0d 0c 9e 08 77 25 |..............w%| 00000f20 3d b9 0d 0c b2 10 c9 74 25 3a c8 8e 71 25 21 31 |=......t%:..q%!1| 00000f30 36 ca 0d 0c bc 17 c9 32 3a f2 65 28 22 3c 53 79 |6......2:.e("<Sy| 00000f40 73 24 54 69 6d 65 3e 22 29 0d 0c d0 17 c9 33 3a |s$Time>").....3:| 00000f50 f2 65 28 22 3c 53 79 73 24 44 61 74 65 3e 22 29 |.e("<Sys$Date>")| 00000f60 0d 0c da 17 c9 34 3a f2 65 28 22 3c 53 79 73 24 |.....4:.e("<Sys$| 00000f70 59 65 61 72 3e 22 29 0d 0c e4 0f c9 35 3a f2 65 |Year>").....5:.e| 00000f80 28 22 7c 4d 22 29 0d 0c ee 0f c9 36 3a f2 65 28 |("|M").....6:.e(| 00000f90 22 7c 55 22 29 0d 0c f8 18 c9 37 3a f2 65 28 22 |"|U").....7:.e("| 00000fa0 3c 46 69 6c 65 72 24 44 69 72 3e 22 29 0d 0d 02 |<Filer$Dir>")...| 00000fb0 11 c9 38 3a f2 65 28 22 52 75 6e 20 22 29 0d 0d |..8:.e("Run ")..| 00000fc0 0c 1b c9 39 3a f2 65 28 22 46 69 6c 65 72 5f 4f |...9:.e("Filer_O| 00000fd0 70 65 6e 44 69 72 20 22 29 0d 0d 16 13 c9 31 30 |penDir ").....10| 00000fe0 3a f2 65 28 22 4c 6f 61 64 20 22 29 0d 0d 20 23 |:.e("Load ").. #| 00000ff0 c9 31 31 2c 31 32 2c 31 33 2c 31 34 3a f2 65 28 |.11,12,13,14:.e(| 00001000 bd 28 28 71 25 21 31 36 29 2b 31 32 35 29 29 0d |.((q%!16)+125)).| 00001010 0d 2a 1f c9 31 35 3a f2 65 28 22 3c 4b 65 79 73 |.*..15:.e("<Keys| 00001020 74 72 6f 6b 65 24 49 6e 70 75 74 3e 22 29 0d 0d |troke$Input>")..| 00001030 34 1d c9 31 36 3a f2 65 28 22 3c 4b 65 79 73 74 |4..16:.e("<Keyst| 00001040 72 6f 6b 65 25 56 61 72 3e 22 29 0d 0d 3e 05 cb |roke%Var>")..>..| 00001050 0d 0d 3e 08 77 25 3d b9 0d 0d 52 10 c9 6a 25 3a |..>.w%=...R..j%:| 00001060 c8 8e 71 25 21 31 36 ca 0d 0d 5c 18 c9 31 3a 61 |..q%!16...\..1:a| 00001070 25 21 32 38 3d 61 25 21 32 38 80 ac 31 3a f2 63 |%!28=a%!28..1:.c| 00001080 0d 0d 70 17 c9 32 3a 61 25 21 32 38 3d 61 25 21 |..p..2:a%!28=a%!| 00001090 32 38 84 31 3a f2 63 0d 0d 7a 0c c9 34 3a e7 75 |28.1:.c..z..4:.u| 000010a0 61 25 8c 0d 0d 84 2f 61 25 21 33 32 3d 61 25 21 |a%..../a%!32=a%!| 000010b0 33 32 2d 4e 25 3a e7 61 25 21 33 32 3c 2d 39 39 |32-N%:.a%!32<-99| 000010c0 39 39 8c 61 25 21 33 32 3d 2d 31 30 30 30 30 2b |99.a%!32=-10000+| 000010d0 4e 25 0d 0d 98 31 cc 3a 61 25 21 33 32 3d 61 25 |N%...1.:a%!32=a%| 000010e0 21 33 32 2b 4e 25 3a e7 61 25 21 33 32 3e 39 39 |!32+N%:.a%!32>99| 000010f0 39 39 39 8c 61 25 21 33 32 3d 31 30 30 30 30 30 |999.a%!32=100000| 00001100 2d 4e 25 0d 0d b6 05 cd 0d 0d c0 15 f2 62 28 6a |-N%..........b(j| 00001110 25 2c 34 2c c3 28 61 25 21 33 32 29 29 0d 0d d4 |%,4,.(a%!32))...| 00001120 0c c9 36 3a e7 75 61 25 8c 0d 0d de 2f 61 25 21 |..6:.ua%..../a%!| 00001130 33 36 3d 61 25 21 33 36 2d 4f 25 3a e7 61 25 21 |36=a%!36-O%:.a%!| 00001140 33 36 3c 2d 39 39 39 39 8c 61 25 21 33 36 3d 2d |36<-9999.a%!36=-| 00001150 31 30 30 30 30 2b 4f 25 0d 0d f2 31 cc 3a 61 25 |10000+O%...1.:a%| 00001160 21 33 36 3d 61 25 21 33 36 2b 4f 25 3a e7 61 25 |!36=a%!36+O%:.a%| 00001170 21 33 36 3e 39 39 39 39 39 8c 61 25 21 33 36 3d |!36>99999.a%!36=| 00001180 31 30 30 30 30 30 2d 4f 25 0d 0e 10 05 cd 0d 0e |100000-O%.......| 00001190 1a 15 f2 62 28 6a 25 2c 36 2c c3 28 61 25 21 33 |...b(j%,6,.(a%!3| 000011a0 36 29 29 0d 0e 2e 0c c9 38 3a e7 75 61 25 8c 0d |6)).....8:.ua%..| 000011b0 0e 38 2f 61 25 21 34 30 3d 61 25 21 34 30 2d 4e |.8/a%!40=a%!40-N| 000011c0 25 3a e7 61 25 21 34 30 3c 2d 39 39 39 39 8c 61 |%:.a%!40<-9999.a| 000011d0 25 21 34 30 3d 2d 31 30 30 30 30 2b 4e 25 0d 0e |%!40=-10000+N%..| 000011e0 4c 31 cc 3a 61 25 21 34 30 3d 61 25 21 34 30 2b |L1.:a%!40=a%!40+| 000011f0 4e 25 3a e7 61 25 21 34 30 3e 39 39 39 39 39 8c |N%:.a%!40>99999.| 00001200 61 25 21 34 30 3d 31 30 30 30 30 30 2d 4e 25 0d |a%!40=100000-N%.| 00001210 0e 6a 05 cd 0d 0e 74 15 f2 62 28 6a 25 2c 38 2c |.j....t..b(j%,8,| 00001220 c3 28 61 25 21 34 30 29 29 0d 0e 88 0d c9 31 30 |.(a%!40)).....10| 00001230 3a e7 75 61 25 8c 0d 0e 92 2f 61 25 21 34 34 3d |:.ua%..../a%!44=| 00001240 61 25 21 34 34 2d 4f 25 3a e7 61 25 21 34 34 3c |a%!44-O%:.a%!44<| 00001250 2d 39 39 39 39 8c 61 25 21 34 34 3d 2d 31 30 30 |-9999.a%!44=-100| 00001260 30 30 2b 4f 25 0d 0e a6 31 cc 3a 61 25 21 34 34 |00+O%...1.:a%!44| 00001270 3d 61 25 21 34 34 2b 4f 25 3a e7 61 25 21 34 34 |=a%!44+O%:.a%!44| 00001280 3e 39 39 39 39 39 8c 61 25 21 34 34 3d 31 30 30 |>99999.a%!44=100| 00001290 30 30 30 2d 4f 25 0d 0e c4 05 cd 0d 0e ce 16 f2 |000-O%..........| 000012a0 62 28 6a 25 2c 31 30 2c c3 28 61 25 21 34 34 29 |b(j%,10,.(a%!44)| 000012b0 29 0d 0e e2 0d c9 31 33 3a e7 75 61 25 8c 0d 0e |).....13:.ua%...| 000012c0 ec 32 61 25 21 34 38 3d 61 25 21 34 38 2d 4e 25 |.2a%!48=a%!48-N%| 000012d0 3a e7 61 25 21 34 38 3c 2d 39 39 39 39 39 39 8c |:.a%!48<-999999.| 000012e0 61 25 21 34 38 3d 2d 26 46 34 32 34 30 2b 4e 25 |a%!48=-&F4240+N%| 000012f0 0d 0f 00 34 cc 3a 61 25 21 34 38 3d 61 25 21 34 |...4.:a%!48=a%!4| 00001300 38 2b 4e 25 3a e7 61 25 21 34 38 3e 39 39 39 39 |8+N%:.a%!48>9999| 00001310 39 39 39 8c 61 25 21 34 38 3d 26 39 38 39 36 38 |999.a%!48=&98968| 00001320 30 2d 4e 25 0d 0f 1e 05 cd 0d 0f 28 16 f2 62 28 |0-N%.......(..b(| 00001330 6a 25 2c 31 33 2c c3 28 61 25 21 34 38 29 29 0d |j%,13,.(a%!48)).| 00001340 0f 3c 0d c9 31 35 3a e7 75 61 25 8c 0d 0f 46 32 |.<..15:.ua%...F2| 00001350 61 25 21 35 32 3d 61 25 21 35 32 2d 4f 25 3a e7 |a%!52=a%!52-O%:.| 00001360 61 25 21 35 32 3c 2d 39 39 39 39 39 39 8c 61 25 |a%!52<-999999.a%| 00001370 21 35 32 3d 2d 26 46 34 32 34 30 2b 4f 25 0d 0f |!52=-&F4240+O%..| 00001380 5a 34 cc 3a 61 25 21 35 32 3d 61 25 21 35 32 2b |Z4.:a%!52=a%!52+| 00001390 4f 25 3a e7 61 25 21 35 32 3e 39 39 39 39 39 39 |O%:.a%!52>999999| 000013a0 39 8c 61 25 21 35 32 3d 26 39 38 39 36 38 30 2d |9.a%!52=&989680-| 000013b0 4f 25 0d 0f 78 05 cd 0d 0f 82 16 f2 62 28 6a 25 |O%..x.......b(j%| 000013c0 2c 31 35 2c c3 28 61 25 21 35 32 29 29 0d 0f 96 |,15,.(a%!52))...| 000013d0 19 c9 31 36 3a e7 a4 64 28 6a 25 2c 31 36 2c 31 |..16:..d(j%,16,1| 000013e0 3c 3c 32 31 29 8c 0d 0f a0 13 61 25 21 32 38 3d |<<21).....a%!28=| 000013f0 28 61 25 21 32 38 29 84 32 0d 0f b4 16 cc 3a 61 |(a%!28).2.....:a| 00001400 25 21 32 38 3d 28 61 25 21 32 38 29 80 ac 32 0d |%!28=(a%!28)..2.| 00001410 0f c8 05 cd 0d 0f c8 06 f2 63 0d 0f dc 19 c9 31 |.........c.....1| 00001420 37 3a e7 a4 64 28 6a 25 2c 31 37 2c 31 3c 3c 32 |7:..d(j%,17,1<<2| 00001430 31 29 8c 0d 0f e6 13 61 25 21 32 38 3d 28 61 25 |1).....a%!28=(a%| 00001440 21 32 38 29 84 34 0d 0f fa 16 cc 3a 61 25 21 32 |!28).4.....:a%!2| 00001450 38 3d 28 61 25 21 32 38 29 80 ac 34 0d 10 0e 05 |8=(a%!28)..4....| 00001460 cd 0d 10 0e 06 f2 63 0d 10 22 19 c9 31 38 3a e7 |......c.."..18:.| 00001470 a4 64 28 6a 25 2c 31 38 2c 31 3c 3c 32 31 29 8c |.d(j%,18,1<<21).| 00001480 0d 10 2c 13 61 25 21 32 38 3d 28 61 25 21 32 38 |..,.a%!28=(a%!28| 00001490 29 84 38 0d 10 40 16 cc 3a 61 25 21 32 38 3d 28 |).8..@..:a%!28=(| 000014a0 61 25 21 32 38 29 80 ac 38 0d 10 54 05 cd 0d 10 |a%!28)..8..T....| 000014b0 54 45 f2 61 28 6a 25 2c 34 2c 31 3c 3c 32 32 2c |TE.a(j%,4,1<<22,| 000014c0 6e 25 84 28 28 61 25 21 32 38 29 80 31 30 29 3d |n%.((a%!28).10)=| 000014d0 30 29 3a f2 61 28 6a 25 2c 36 2c 31 3c 3c 32 32 |0):.a(j%,6,1<<22| 000014e0 2c 6e 25 84 28 28 61 25 21 32 38 29 80 31 30 29 |,n%.((a%!28).10)| 000014f0 3d 30 29 0d 10 72 05 cb 0d 10 72 10 c9 41 25 3a |=0)..r....r..A%:| 00001500 c8 8e 71 25 21 31 36 ca 0d 10 86 12 c9 30 3a 76 |..q%!16......0:v| 00001510 61 25 3d 55 25 2b 31 3a f2 45 0d 10 ae 13 c9 32 |a%=U%+1:.E.....2| 00001520 3a f2 6d 28 a4 63 28 41 25 2c 31 29 29 0d 10 b8 |:.m(.c(A%,1))...| 00001530 05 cb 0d 10 b8 05 cb 0d 10 c2 05 e1 0d 10 cc 04 |................| 00001540 0d 10 e0 0e dd f2 55 3a c8 8e 76 61 25 ca 0d 10 |......U:..va%...| 00001550 f4 09 c9 31 3a f2 7a 0d 11 08 12 c9 32 3a f2 6e |...1:.z.....2:.n| 00001560 28 48 25 2c 34 30 39 33 29 0d 11 12 11 c9 33 3a |(H%,4093).....3:| 00001570 f2 6e 28 30 2c 34 30 39 35 29 0d 11 1c 13 c9 34 |.n(0,4095).....4| 00001580 3a f2 6e 28 32 35 36 2c 34 30 37 35 29 0d 11 26 |:.n(256,4075)..&| 00001590 14 c9 35 3a f2 6e 28 32 30 34 38 2c 38 31 39 32 |..5:.n(2048,8192| 000015a0 29 0d 11 30 05 cb 0d 11 30 0c 76 61 25 3d 2d 31 |)..0....0.va%=-1| 000015b0 3a e1 0d 11 44 04 0d 11 58 1a dd f2 56 3a 65 61 |:...D...X...V:ea| 000015c0 25 3d 71 25 21 32 34 3a e7 65 61 25 3d 31 33 8c |%=q%!24:.ea%=13.| 000015d0 0d 11 76 0a c8 8e 21 71 25 ca 0d 11 80 0f c9 74 |..v...!q%......t| 000015e0 25 3a c8 8e 71 25 21 34 ca 0d 11 94 20 c9 31 3a |%:..q%!4.... .1:| 000015f0 24 28 61 25 2b 31 32 29 3d a4 63 28 74 25 2c 31 |$(a%+12)=.c(t%,1| 00001600 29 3a 77 25 3d b9 3a f2 63 0d 11 c6 05 cb 0d 11 |):w%=.:.c.......| 00001610 c6 11 c9 65 25 3a e7 71 25 21 34 3d 31 34 8c 0d |...e%:.q%!4=14..| 00001620 11 da 26 24 28 61 25 2b 31 32 38 29 3d a4 63 28 |..&$(a%+128)=.c(| 00001630 65 25 2c 31 34 29 3a 77 25 3d b9 3a f5 fd ac a6 |e%,14):w%=.:....| 00001640 28 2d 37 34 29 0d 12 02 05 cd 0d 12 02 14 c9 41 |(-74)..........A| 00001650 25 3a f2 6d 28 a4 63 28 41 25 2c 31 29 29 0d 12 |%:.m(.c(A%,1))..| 00001660 20 36 c9 77 61 25 3a 6e 24 3d a4 63 28 77 61 25 | 6.wa%:n$=.c(wa%| 00001670 2c 30 29 3a 21 62 25 3d 77 61 25 3a c8 99 22 57 |,0):!b%=wa%:.."W| 00001680 69 6d 70 5f 43 6c 6f 73 65 57 69 6e 64 6f 77 22 |imp_CloseWindow"| 00001690 2c 2c 62 25 0d 12 48 05 cb 0d 12 48 66 c8 99 22 |,,b%..H....Hf.."| 000016a0 57 69 6d 70 5f 47 65 74 50 6f 69 6e 74 65 72 49 |Wimp_GetPointerI| 000016b0 6e 66 6f 22 2c 2c 62 25 3a e7 62 25 21 31 32 3d |nfo",,b%:.b%!12=| 000016c0 65 25 8c c8 99 22 57 69 6d 70 5f 53 65 74 43 61 |e%..."Wimp_SetCa| 000016d0 72 65 74 50 6f 73 69 74 69 6f 6e 22 2c 65 25 2c |retPosition",e%,| 000016e0 2d 31 8b c8 99 22 57 69 6d 70 5f 53 65 74 43 61 |-1..."Wimp_SetCa| 000016f0 72 65 74 50 6f 73 69 74 69 6f 6e 22 2c 2d 31 0d |retPosition",-1.| 00001700 12 5c 1d cc 3a c8 99 22 57 69 6d 70 5f 50 72 6f |.\..:.."Wimp_Pro| 00001710 63 65 73 73 4b 65 79 22 2c 65 61 25 0d 12 7a 05 |cessKey",ea%..z.| 00001720 cd 0d 12 7a 05 e1 0d 12 84 04 0d 12 98 33 dd f2 |...z.........3..| 00001730 57 3a e7 78 61 25 3d 2d 32 8c 69 24 3d 22 4d 61 |W:.xa%=-2.i$="Ma| 00001740 69 6e 2e 22 3a 79 61 25 3d 75 25 8b 69 24 3d 22 |in.":ya%=u%.i$="| 00001750 45 64 69 74 2e 22 3a 79 61 25 3d 69 25 0d 12 ac |Edit.":ya%=i%...| 00001760 33 c8 99 22 57 69 6d 70 5f 44 65 63 6f 64 65 4d |3.."Wimp_DecodeM| 00001770 65 6e 75 22 2c 2c 79 61 25 2c 71 25 2c 62 25 3a |enu",,ya%,q%,b%:| 00001780 69 24 2b 3d a4 61 28 62 25 29 3a c8 8e 69 24 ca |i$+=.a(b%):..i$.| 00001790 0d 12 ca 27 c9 22 4d 61 69 6e 2e 53 61 76 65 2e |...'."Main.Save.| 000017a0 4b 65 79 73 74 72 6f 6b 65 73 22 3a 55 25 3d 31 |Keystrokes":U%=1| 000017b0 3a f2 6d 28 6c 24 29 0d 12 de 35 c9 22 4d 61 69 |:.m(l$)...5."Mai| 000017c0 6e 2e 53 61 76 65 2e 44 65 66 61 75 6c 74 22 3a |n.Save.Default":| 000017d0 f2 75 28 22 3c 4b 65 79 73 44 65 6d 6f 24 44 69 |.u("<KeysDemo$Di| 000017e0 72 3e 2e 44 65 66 61 75 6c 74 22 29 0d 12 e8 25 |r>.Default")...%| 000017f0 c9 22 4d 61 69 6e 2e 53 61 76 65 2e 45 78 65 63 |."Main.Save.Exec| 00001800 75 74 6f 72 22 3a 55 25 3d 34 3a f2 6d 28 75 24 |utor":U%=4:.m(u$| 00001810 29 0d 12 f2 21 c9 22 4d 61 69 6e 2e 53 61 76 65 |)...!."Main.Save| 00001820 2e 4c 69 73 74 22 3a 55 25 3d 32 3a f2 6d 28 6f |.List":U%=2:.m(o| 00001830 24 29 0d 12 fc 1c c9 22 45 64 69 74 2e 43 6f 70 |$)....."Edit.Cop| 00001840 79 22 3a f2 46 28 61 25 29 3a 77 25 3d b9 0d 13 |y":.F(a%):w%=...| 00001850 06 22 c9 22 45 64 69 74 2e 43 6f 70 79 20 47 72 |."."Edit.Copy Gr| 00001860 6f 75 70 22 3a f2 47 28 61 25 29 3a 77 25 3d b9 |oup":.G(a%):w%=.| 00001870 0d 13 10 25 c9 22 45 64 69 74 2e 49 6e 73 65 72 |...%."Edit.Inser| 00001880 74 22 3a e7 28 28 61 25 3f 33 29 80 31 32 38 29 |t":.((a%?3).128)| 00001890 3d 31 32 38 8c 0d 13 1a 0d f2 48 28 61 25 29 3a |=128......H(a%):| 000018a0 f2 63 0d 13 38 0f cc 3a f2 5f 28 61 25 29 3a f2 |.c..8..:._(a%):.| 000018b0 63 0d 13 56 05 cd 0d 13 56 08 77 25 3d b9 0d 13 |c..V....V.w%=...| 000018c0 6a 20 c9 22 45 64 69 74 2e 50 61 73 74 65 22 3a |j ."Edit.Paste":| 000018d0 f2 48 28 61 25 29 3a 77 25 3d b9 3a f2 63 0d 13 |.H(a%):w%=.:.c..| 000018e0 92 24 c9 22 45 64 69 74 2e 43 75 74 22 3a 77 25 |.$."Edit.Cut":w%| 000018f0 3d b9 3a f2 46 28 61 25 29 3a f2 68 28 61 25 2c |=.:.F(a%):.h(a%,| 00001900 b9 29 0d 13 ba 28 c9 22 45 64 69 74 2e 43 75 74 |.)...(."Edit.Cut| 00001910 20 47 72 6f 75 70 22 3a 77 25 3d b9 3a f2 47 28 | Group":w%=.:.G(| 00001920 61 25 29 3a f2 60 28 61 25 29 0d 13 e2 1a c9 22 |a%):.`(a%)....."| 00001930 4d 61 69 6e 2e 43 6c 65 61 72 20 41 6c 6c 22 3a |Main.Clear All":| 00001940 e7 77 25 8c 0d 13 ec 31 7a 61 25 3d a4 69 28 22 |.w%....1za%=.i("| 00001950 4b 65 79 73 74 72 6f 6b 65 73 20 6e 6f 74 20 73 |Keystrokes not s| 00001960 61 76 65 64 2e 20 41 72 65 20 79 6f 75 20 73 75 |aved. Are you su| 00001970 72 65 3f 22 29 0d 14 00 0b cc 3a 7a 61 25 3d b9 |re?").....:za%=.| 00001980 0d 14 14 05 cd 0d 14 14 09 e7 7a 61 25 8c 0d 14 |..........za%...| 00001990 1e 21 f2 49 3a f2 69 3a f2 63 3a 75 25 21 32 35 |.!.I:.i:.c:u%!25| 000019a0 32 3d 26 37 34 30 39 30 30 31 3a 77 25 3d a3 0d |2=&7409001:w%=..| 000019b0 14 5a 05 cd 0d 14 5a 15 c9 22 4d 61 69 6e 2e 51 |.Z....Z.."Main.Q| 000019c0 75 69 74 22 3a e7 77 25 8c 0d 14 6e 31 61 61 25 |uit":.w%...n1aa%| 000019d0 3d a4 69 28 22 4b 65 79 73 74 72 6f 6b 65 73 20 |=.i("Keystrokes | 000019e0 6e 6f 74 20 73 61 76 65 64 2e 20 41 72 65 20 79 |not saved. Are y| 000019f0 6f 75 20 73 75 72 65 3f 22 29 0d 14 82 0b cc 3a |ou sure?").....:| 00001a00 61 61 25 3d b9 0d 14 96 05 cd 0d 14 96 26 7f 3a |aa%=.........&.:| 00001a10 e7 c0 69 24 2c 32 30 29 3d 22 4d 61 69 6e 2e 50 |..i$,20)="Main.P| 00001a20 72 65 66 73 2e 41 75 74 6f 65 78 65 63 2e 22 8c |refs.Autoexec.".| 00001a30 0d 14 aa 12 e7 bb 28 a4 61 28 41 61 25 29 29 3d |......(.a(Aa%))=| 00001a40 30 8c 0d 14 b4 3d f2 66 28 30 2c 22 54 68 65 20 |0....=.f(0,"The | 00001a50 6d 69 6e 69 6d 75 6d 20 74 69 6d 65 20 69 73 20 |minimum time is | 00001a60 6f 6e 65 20 6d 69 6e 75 74 65 22 2c 31 29 3a 24 |one minute",1):$| 00001a70 41 61 25 3d c3 28 6f 61 25 81 36 30 30 30 29 0d |Aa%=.(oa%.6000).| 00001a80 14 d2 19 cc 3a 6f 61 25 3d bb 28 a4 61 28 41 61 |....:oa%=.(.a(Aa| 00001a90 25 29 29 2a 36 30 30 30 0d 14 e6 05 cd 0d 14 e6 |%))*6000........| 00001aa0 05 cd 0d 14 f0 47 e7 c0 69 24 2c 32 30 29 3d 22 |.....G..i$,20)="| 00001ab0 4d 61 69 6e 2e 50 72 65 66 73 2e 56 61 72 69 61 |Main.Prefs.Varia| 00001ac0 62 6c 65 2e 22 8c ff 28 22 53 65 74 45 76 61 6c |ble."..("SetEval| 00001ad0 20 4b 65 79 73 74 72 6f 6b 65 25 56 61 72 20 22 | Keystroke%Var "| 00001ae0 2b a4 61 28 42 61 25 29 29 0d 14 fa 48 e7 c0 69 |+.a(Ba%))...H..i| 00001af0 24 2c 32 31 29 3d 22 4d 61 69 6e 2e 50 72 65 66 |$,21)="Main.Pref| 00001b00 73 2e 49 6e 63 72 65 6d 65 6e 74 2e 22 8c ff 28 |s.Increment."..(| 00001b10 22 53 65 74 45 76 61 6c 20 4b 65 79 73 74 72 6f |"SetEval Keystro| 00001b20 6b 65 25 49 6e 63 20 22 2b a4 61 28 43 61 25 29 |ke%Inc "+.a(Ca%)| 00001b30 29 0d 15 04 05 cb 0d 15 0e 37 c8 99 22 57 69 6d |)........7.."Wim| 00001b40 70 5f 47 65 74 50 6f 69 6e 74 65 72 49 6e 66 6f |p_GetPointerInfo| 00001b50 22 2c 2c 62 25 3a e7 62 25 21 38 3d 31 8c f2 74 |",,b%:.b%!8=1..t| 00001b60 28 78 61 25 2c 44 61 25 2c 45 61 25 29 0d 15 22 |(xa%,Da%,Ea%).."| 00001b70 05 e1 0d 15 2c 04 0d 15 40 12 dd f2 58 3a c8 8e |....,...@...X:..| 00001b80 28 71 25 21 31 36 29 ca 0d 15 54 0b c9 30 3a e7 |(q%!16)...T..0:.| 00001b90 77 25 8c 0d 15 68 31 61 61 25 3d a4 69 28 22 4b |w%...h1aa%=.i("K| 00001ba0 65 79 73 74 72 6f 6b 65 73 20 6e 6f 74 20 73 61 |eystrokes not sa| 00001bb0 76 65 64 2e 20 41 72 65 20 79 6f 75 20 73 75 72 |ved. Are you sur| 00001bc0 65 3f 22 29 0d 15 7c 0b cc 3a 61 61 25 3d b9 0d |e?")..|..:aa%=..| 00001bd0 15 90 05 cd 0d 15 90 59 c9 31 3a 71 25 21 31 32 |.......Y.1:q%!12| 00001be0 3d 71 25 21 38 3a 71 25 21 31 36 3d 32 3a 21 71 |=q%!8:q%!16=2:!q| 00001bf0 25 3d 32 35 36 3a 24 28 71 25 2b 34 34 29 3d 22 |%=256:$(q%+44)="| 00001c00 3c 57 69 6d 70 24 53 63 72 61 70 3e 22 3a c8 99 |<Wimp$Scrap>":..| 00001c10 22 57 69 6d 70 5f 53 65 6e 64 4d 65 73 73 61 67 |"Wimp_SendMessag| 00001c20 65 22 2c 31 37 2c 71 25 2c 71 25 21 34 0d 15 d6 |e",17,q%,q%!4...| 00001c30 19 c9 32 3a 61 24 3d a4 61 28 71 25 2b 34 34 29 |..2:a$=.a(q%+44)| 00001c40 3a c8 8e 55 25 ca 0d 15 ea 27 c9 31 3a f2 75 28 |:..U%....'.1:.u(| 00001c50 61 24 29 3a e7 61 24 3c 3e 22 3c 57 69 6d 70 24 |a$):.a$<>"<Wimp$| 00001c60 53 63 72 61 70 3e 22 8c 6c 24 3d 61 24 0d 15 f4 |Scrap>".l$=a$...| 00001c70 27 c9 32 3a f2 4a 28 61 24 29 3a e7 61 24 3c 3e |'.2:.J(a$):.a$<>| 00001c80 22 3c 57 69 6d 70 24 53 63 72 61 70 3e 22 8c 6f |"<Wimp$Scrap>".o| 00001c90 24 3d 61 24 0d 15 fe 0e c9 33 3a f2 61 61 28 61 |$=a$.....3:.aa(a| 00001ca0 24 29 0d 16 12 21 c9 34 3a e7 61 24 3c 3e 22 3c |$)...!.4:.a$<>"<| 00001cb0 57 69 6d 70 24 53 63 72 61 70 3e 22 8c f2 4b 28 |Wimp$Scrap>"..K(| 00001cc0 61 24 29 0d 16 12 05 cb 0d 16 1c 56 c8 99 22 57 |a$)........V.."W| 00001cd0 69 6d 70 5f 43 72 65 61 74 65 4d 65 6e 75 22 2c |imp_CreateMenu",| 00001ce0 2c 2d 31 3a 71 25 21 31 32 3d 71 25 21 38 3a 71 |,-1:q%!12=q%!8:q| 00001cf0 25 21 31 36 3d 33 3a 21 71 25 3d 32 35 36 3a c8 |%!16=3:!q%=256:.| 00001d00 99 22 57 69 6d 70 5f 53 65 6e 64 4d 65 73 73 61 |."Wimp_SendMessa| 00001d10 67 65 22 2c 31 38 2c 71 25 2c 71 25 21 34 0d 16 |ge",18,q%,q%!4..| 00001d20 58 0a c9 33 3a f2 62 61 0d 16 6c 19 c9 32 36 32 |X..3:.ba..l..262| 00001d30 33 33 36 3a e7 71 25 21 33 36 3d 30 8c 55 25 3d |336:.q%!36=0.U%=| 00001d40 31 0d 16 76 11 e7 71 25 21 33 36 3d 33 8c 55 25 |1..v..q%!36=3.U%| 00001d50 3d 32 0d 16 80 11 e7 71 25 21 33 32 3d 36 8c 55 |=2.....q%!32=6.U| 00001d60 25 3d 33 0d 16 8a 11 e7 71 25 21 33 36 3d 32 8c |%=3.....q%!36=2.| 00001d70 55 25 3d 34 0d 16 94 09 c8 8e 55 25 ca 0d 16 9e |U%=4......U%....| 00001d80 32 c9 31 3a f2 62 28 41 25 2c 31 2c 6c 24 29 3a |2.1:.b(A%,1,l$):| 00001d90 f2 6f 28 41 25 2c 30 2c 22 66 69 6c 65 5f 66 66 |.o(A%,0,"file_ff| 00001da0 64 22 29 3a f2 6c 28 41 25 2c 31 2c 31 35 29 0d |d"):.l(A%,1,15).| 00001db0 16 d0 32 c9 32 3a f2 62 28 41 25 2c 31 2c 6f 24 |..2.2:.b(A%,1,o$| 00001dc0 29 3a f2 6f 28 41 25 2c 30 2c 22 66 69 6c 65 5f |):.o(A%,0,"file_| 00001dd0 66 66 66 22 29 3a f2 6c 28 41 25 2c 31 2c 31 35 |fff"):.l(A%,1,15| 00001de0 29 0d 16 f8 38 c9 33 3a f2 62 28 41 25 2c 31 2c |)...8.3:.b(A%,1,| 00001df0 22 41 63 74 69 6f 6e 22 29 3a f2 6f 28 41 25 2c |"Action"):.o(A%,| 00001e00 30 2c 22 66 69 6c 65 5f 66 65 62 22 29 3a f2 6c |0,"file_feb"):.l| 00001e10 28 41 25 2c 31 2c 31 35 29 0d 17 20 32 c9 34 3a |(A%,1,15).. 2.4:| 00001e20 f2 62 28 41 25 2c 31 2c 75 24 29 3a f2 6f 28 41 |.b(A%,1,u$):.o(A| 00001e30 25 2c 30 2c 22 21 65 78 65 63 75 74 6f 72 22 29 |%,0,"!executor")| 00001e40 3a f2 6c 28 41 25 2c 31 2c 30 29 0d 17 48 05 cb |:.l(A%,1,0)..H..| 00001e50 0d 17 48 2d c8 99 22 57 69 6d 70 5f 43 72 65 61 |..H-.."Wimp_Crea| 00001e60 74 65 53 75 62 4d 65 6e 75 22 2c 2c 71 25 21 32 |teSubMenu",,q%!2| 00001e70 30 2c 71 25 21 32 34 2c 71 25 21 32 38 0d 17 5c |0,q%!24,q%!28..\| 00001e80 0e c9 32 36 32 33 33 37 3a f2 4c 0d 17 70 1f c9 |..262337:.L..p..| 00001e90 32 36 32 33 33 38 3a f2 63 61 28 71 25 21 34 2c |262338:.ca(q%!4,| 00001ea0 a4 61 28 71 25 2b 32 38 29 29 0d 17 84 15 c9 32 |.a(q%+28)).....2| 00001eb0 36 32 33 33 39 3a f2 64 61 28 71 25 21 34 29 0d |62339:.da(q%!4).| 00001ec0 17 98 18 c9 32 36 32 33 34 33 3a 6a 24 3d a4 61 |....262343:j$=.a| 00001ed0 28 71 25 2b 32 38 29 0d 17 ac 05 cb 0d 17 ac 05 |(q%+28).........| 00001ee0 e1 0d 17 b6 04 0d 17 de 18 dd f2 41 28 63 25 29 |...........A(c%)| 00001ef0 3a e7 28 63 25 3f 31 80 38 29 3d 38 8c 0d 17 e8 |:.(c%?1.8)=8....| 00001f00 21 c8 97 46 61 25 2c 47 61 25 2c 48 61 25 3a c8 |!..Fa%,Ga%,Ha%:.| 00001f10 97 c8 93 46 61 25 2c 47 61 25 2c 30 2c 30 0d 18 |...Fa%,Ga%,0,0..| 00001f20 06 21 cc 3a c8 97 c8 93 69 61 25 2c 6a 61 25 2c |.!.:....ia%,ja%,| 00001f30 6b 61 25 2d 69 61 25 2c 6c 61 25 2d 6a 61 25 0d |ka%-ia%,la%-ja%.| 00001f40 18 1a 05 cd 0d 18 1a 10 e7 28 63 25 3f 33 80 32 |.........(c%?3.2| 00001f50 29 3d 30 8c 0d 18 2e 12 49 61 25 3d 31 3a f2 67 |)=0.....Ia%=1:.g| 00001f60 28 36 31 34 36 29 0d 18 4c 70 cc 3a 21 71 25 3d |(6146)..Lp.:!q%=| 00001f70 30 3a 24 28 71 25 2b 34 29 3d a4 61 28 63 25 2b |0:$(q%+4)=.a(c%+| 00001f80 31 32 38 29 2b 22 3f 22 3a c8 97 46 61 25 2c 47 |128)+"?":..Fa%,G| 00001f90 61 25 2c 48 61 25 3a c8 99 22 57 69 6d 70 5f 52 |a%,Ha%:.."Wimp_R| 00001fa0 65 70 6f 72 74 45 72 72 6f 72 22 2c 71 25 2c 31 |eportError",q%,1| 00001fb0 39 2c 22 4b 65 79 73 74 72 6f 6b 65 22 b8 2c 49 |9,"Keystroke".,I| 00001fc0 61 25 3a c8 97 b8 46 61 25 2c 47 61 25 3a f2 67 |a%:...Fa%,Ga%:.g| 00001fd0 28 36 31 34 36 29 0d 18 88 05 cd 0d 18 88 0b e7 |(6146)..........| 00001fe0 49 61 25 3d 31 8c 0d 18 92 48 73 25 3d a3 3a e7 |Ia%=1....Hs%=.:.| 00001ff0 28 28 28 28 63 25 21 31 30 34 29 80 31 30 34 38 |((((c%!104).1048| 00002000 35 37 36 29 3c 3e 30 29 84 28 63 25 3f 32 83 31 |576)<>0).(c%?2.1| 00002010 36 29 3d 33 29 80 28 63 25 3f 32 83 31 36 29 3c |6)=3).(c%?2.16)<| 00002020 3e 32 8c 4a 61 25 3d b9 8b 4a 61 25 3d a3 0d 18 |>2.Ja%=..Ja%=...| 00002030 a6 10 c8 8e 28 63 25 3f 32 83 31 36 29 ca 0d 18 |....(c%?2.16)...| 00002040 b0 37 c9 30 3a e7 28 63 25 21 31 32 29 3c 3e 2d |.7.0:.(c%!12)<>-| 00002050 31 84 28 28 28 63 25 3f 33 29 80 38 29 3d 30 80 |1.(((c%?3).8)=0.| 00002060 63 25 21 32 30 3c 30 29 8c f2 70 28 63 25 2c 63 |c%!20<0)..p(c%,c| 00002070 25 21 32 34 29 0d 18 ba 1c c9 31 3a e7 28 63 25 |%!24).....1:.(c%| 00002080 21 31 32 29 3c 3e 2d 31 8c f2 70 28 63 25 2c 32 |!12)<>-1..p(c%,2| 00002090 29 0d 18 c4 32 c9 32 3a 6d 24 3d a4 61 28 63 25 |)...2.2:m$=.a(c%| 000020a0 2b 31 32 29 3a e7 a7 6d 24 2c 22 3c 4b 65 79 73 |+12):..m$,"<Keys| 000020b0 74 72 6f 6b 65 24 49 6e 70 75 74 3e 22 29 3e 30 |troke$Input>")>0| 000020c0 8c f2 4d 0d 18 e2 1a e7 a7 6d 24 2c 22 3c 46 69 |..M......m$,"<Fi| 000020d0 6c 65 72 24 44 69 72 3e 22 29 3e 30 8c 0d 18 ec |ler$Dir>")>0....| 000020e0 12 71 24 3d a4 6a 3a e7 71 24 3c 3e 22 22 8c 0d |.q$=.j:.q$<>""..| 000020f0 19 00 31 ff 28 22 53 65 74 20 46 69 6c 65 72 24 |..1.("Set Filer$| 00002100 44 69 72 20 22 2b 71 24 29 3a ff 28 22 57 69 6d |Dir "+q$):.("Wim| 00002110 70 54 61 73 6b 20 22 2b 6d 24 29 3a 73 25 3d b9 |pTask "+m$):s%=.| 00002120 0d 19 28 05 cd 0d 19 28 1c cc 3a ff 28 22 57 69 |..(....(..:.("Wi| 00002130 6d 70 54 61 73 6b 20 22 2b 6d 24 29 3a 73 25 3d |mpTask "+m$):s%=| 00002140 b9 0d 19 50 05 cd 0d 19 50 21 e7 a7 6d 24 2c 22 |...P....P!..m$,"| 00002150 3c 4b 65 79 73 74 72 6f 6b 65 25 56 61 72 3e 22 |<Keystroke%Var>"| 00002160 29 3e 30 80 73 25 8c 0d 19 5a 69 ff 28 22 53 65 |)>0.s%...Zi.("Se| 00002170 74 45 76 61 6c 20 4b 65 79 73 74 72 6f 6b 65 25 |tEval Keystroke%| 00002180 56 61 72 20 4b 65 79 73 74 72 6f 6b 65 25 56 61 |Var Keystroke%Va| 00002190 72 22 2b a4 6d 29 3a c8 99 22 4f 53 5f 47 53 54 |r"+.m):.."OS_GST| 000021a0 72 61 6e 73 22 2c 22 3c 4b 65 79 73 74 72 6f 6b |rans","<Keystrok| 000021b0 65 25 56 61 72 3e 22 2c 71 25 2c 38 31 39 32 3a |e%Var>",q%,8192:| 000021c0 f2 62 28 74 25 2c 31 39 2c a4 61 28 71 25 29 29 |.b(t%,19,.a(q%))| 000021d0 0d 19 82 05 cd 0d 19 82 32 c9 33 3a 72 24 3d a4 |........2.3:r$=.| 000021e0 61 28 63 25 2b 31 32 29 3a e7 a7 72 24 2c 22 3c |a(c%+12):..r$,"<| 000021f0 4b 65 79 73 74 72 6f 6b 65 24 49 6e 70 75 74 3e |Keystroke$Input>| 00002200 22 29 3e 30 8c f2 4d 0d 19 a0 1a e7 a7 72 24 2c |")>0..M......r$,| 00002210 22 3c 46 69 6c 65 72 24 44 69 72 3e 22 29 3e 30 |"<Filer$Dir>")>0| 00002220 8c 0d 19 aa 3d 71 24 3d a4 6a 3a e7 71 24 3c 3e |....=q$=.j:.q$<>| 00002230 22 22 8c ff 28 22 53 65 74 20 46 69 6c 65 72 24 |""..("Set Filer$| 00002240 44 69 72 20 22 2b a4 6a 29 8b ff 28 22 55 6e 73 |Dir "+.j)..("Uns| 00002250 65 74 20 46 69 6c 65 72 24 44 69 72 22 29 0d 19 |et Filer$Dir")..| 00002260 be 05 cd 0d 19 c8 4d c8 99 22 4f 53 5f 47 53 54 |......M.."OS_GST| 00002270 72 61 6e 73 22 2c 72 24 2c 71 25 2c 38 31 39 32 |rans",r$,q%,8192| 00002280 3a 6f 25 3d 71 25 3a c8 99 22 4f 53 5f 42 79 74 |:o%=q%:.."OS_Byt| 00002290 65 22 2c 31 35 3a c8 95 3f 6f 25 3c 3e 30 3a e7 |e",15:..?o%<>0:.| 000022a0 3f 6f 25 3e 31 33 35 80 3f 6f 25 3c 31 34 30 8c |?o%>135.?o%<140.| 000022b0 0d 19 fa 2a f2 67 28 36 31 34 36 29 3a c8 99 22 |...*.g(6146):.."| 000022c0 57 69 6d 70 5f 50 72 6f 63 65 73 73 4b 65 79 22 |Wimp_ProcessKey"| 000022d0 2c 28 3f 6f 25 29 2b 32 36 30 0d 1a 18 26 cc 3a |,(?o%)+260...&.:| 000022e0 f2 67 28 36 31 34 36 29 3a c8 99 22 57 69 6d 70 |.g(6146):.."Wimp| 000022f0 5f 50 72 6f 63 65 73 73 4b 65 79 22 2c 3f 6f 25 |_ProcessKey",?o%| 00002300 0d 1a 36 05 cd 0d 1a 36 2b 6f 25 2b 3d 31 3a ce |..6....6+o%+=1:.| 00002310 3a 73 25 3d b9 3a e7 a7 72 24 2c 22 3c 4b 65 79 |:s%=.:..r$,"<Key| 00002320 73 74 72 6f 6b 65 25 56 61 72 3e 22 29 3e 30 8c |stroke%Var>")>0.| 00002330 0d 1a 5e 69 ff 28 22 53 65 74 45 76 61 6c 20 4b |..^i.("SetEval K| 00002340 65 79 73 74 72 6f 6b 65 25 56 61 72 20 4b 65 79 |eystroke%Var Key| 00002350 73 74 72 6f 6b 65 25 56 61 72 22 2b a4 6d 29 3a |stroke%Var"+.m):| 00002360 c8 99 22 4f 53 5f 47 53 54 72 61 6e 73 22 2c 22 |.."OS_GSTrans","| 00002370 3c 4b 65 79 73 74 72 6f 6b 65 25 56 61 72 3e 22 |<Keystroke%Var>"| 00002380 2c 71 25 2c 38 31 39 32 3a f2 62 28 74 25 2c 31 |,q%,8192:.b(t%,1| 00002390 39 2c a4 61 28 71 25 29 29 0d 1a 86 05 cd 0d 1a |9,.a(q%)).......| 000023a0 86 1d c9 34 3a e7 28 63 25 21 31 32 29 3c 3e 2d |...4:.(c%!12)<>-| 000023b0 31 8c f2 70 28 63 25 2c 2d 31 29 0d 1a 9a 1c c9 |1..p(c%,-1).....| 000023c0 35 3a e7 28 63 25 21 31 32 29 3c 3e 2d 31 8c f2 |5:.(c%!12)<>-1..| 000023d0 70 28 63 25 2c 32 29 0d 1a ae 05 cb 0d 1a b8 21 |p(c%,2)........!| 000023e0 e7 73 25 3d b9 80 28 63 25 3f 33 80 31 29 3d 31 |.s%=..(c%?3.1)=1| 000023f0 8c d4 31 2c 2d 31 35 2c 31 30 30 2c 35 0d 1a c2 |..1,-15,100,5...| 00002400 0c f2 67 28 36 31 34 36 29 0d 1a d6 05 cd 0d 1a |..g(6146).......| 00002410 d6 05 e1 0d 1a e0 04 0d 1a f4 89 dd f2 63 3a 6e |.............c:n| 00002420 25 3d 28 28 61 25 3f 33 29 80 36 34 29 3d 36 34 |%=((a%?3).64)=64| 00002430 3a f2 62 28 65 25 2c 34 2c 61 24 28 42 25 29 29 |:.b(e%,4,a$(B%))| 00002440 3a f2 61 28 65 25 2c 31 2c 28 31 3c 3c 32 31 29 |:.a(e%,1,(1<<21)| 00002450 2c 28 72 25 80 34 29 3c 3e 30 29 3a f2 61 28 65 |,(r%.4)<>0):.a(e| 00002460 25 2c 32 2c 28 31 3c 3c 32 31 29 2c 28 72 25 80 |%,2,(1<<21),(r%.| 00002470 32 29 3c 3e 30 29 3a f2 61 28 65 25 2c 33 2c 28 |2)<>0):.a(e%,3,(| 00002480 31 3c 3c 32 31 29 2c 28 72 25 80 31 29 3c 3e 30 |1<<21),(r%.1)<>0| 00002490 29 3a e7 28 61 25 3f 33 80 31 32 38 29 3e 30 8c |):.(a%?3.128)>0.| 000024a0 0d 1b 3a 45 e3 49 25 3d 36 b8 31 31 3a f2 61 28 |..:E.I%=6.11:.a(| 000024b0 65 25 2c 49 25 2c 28 31 3c 3c 32 31 29 2c a3 29 |e%,I%,(1<<21),.)| 000024c0 3a f2 61 28 65 25 2c 49 25 2c 28 31 3c 3c 32 32 |:.a(e%,I%,(1<<22| 000024d0 29 2c a3 29 3a ed 49 25 3a f2 62 28 65 25 2c 31 |),.):.I%:.b(e%,1| 000024e0 34 2c 22 22 29 0d 1b 76 5f cc 3a e3 49 25 3d 36 |4,"")..v_.:.I%=6| 000024f0 b8 31 31 3a f2 61 28 65 25 2c 49 25 2c 31 3c 3c |.11:.a(e%,I%,1<<| 00002500 32 31 2c 28 28 28 61 25 3f 32 29 83 31 36 29 29 |21,(((a%?2).16))| 00002510 3d 28 49 25 2d 36 29 29 3a f2 61 28 65 25 2c 49 |=(I%-6)):.a(e%,I| 00002520 25 2c 31 3c 3c 32 32 2c 6e 25 29 3a ed 49 25 3a |%,1<<22,n%):.I%:| 00002530 f2 62 28 65 25 2c 31 34 2c a4 61 28 61 25 2b 31 |.b(e%,14,.a(a%+1| 00002540 32 38 29 29 0d 1b b2 05 cd 0d 1b b2 6c f2 61 28 |28))........l.a(| 00002550 65 25 2c 31 32 2c 31 3c 3c 32 32 2c 54 25 3d 2d |e%,12,1<<22,T%=-| 00002560 31 29 3a f2 61 28 65 25 2c 31 33 2c 31 3c 3c 32 |1):.a(e%,13,1<<2| 00002570 32 2c 28 28 28 61 25 3f 33 29 80 31 32 38 29 3e |2,(((a%?3).128)>| 00002580 30 29 84 a4 62 29 3a e7 61 25 21 34 3d 2d 31 8c |0)..b):.a%!4=-1.| 00002590 f2 62 28 65 25 2c 31 33 2c 22 4e 65 77 20 20 89 |.b(e%,13,"New .| 000025a0 22 29 8b f2 62 28 65 25 2c 31 33 2c 22 4e 65 78 |")..b(e%,13,"Nex| 000025b0 74 20 89 22 29 0d 1b d0 28 e7 28 28 28 61 25 3f |t .")...(.(((a%?| 000025c0 33 29 80 31 32 38 29 3e 30 29 84 a4 62 84 6e 25 |3).128)>0)..b.n%| 000025d0 8c 4b 61 25 3d 30 8b 4b 61 25 3d 31 35 0d 1b da |.Ka%=0.Ka%=15...| 000025e0 bb f2 6c 28 65 25 2c 31 34 2c 4b 61 25 29 3a f2 |..l(e%,14,Ka%):.| 000025f0 61 28 65 25 2c 31 36 2c 31 3c 3c 32 31 2c 28 28 |a(e%,16,1<<21,((| 00002600 61 25 3f 33 29 80 31 32 39 29 3d 31 29 3a f2 61 |a%?3).129)=1):.a| 00002610 28 65 25 2c 31 36 2c 31 3c 3c 32 32 2c 6e 25 29 |(e%,16,1<<22,n%)| 00002620 3a f2 61 28 65 25 2c 31 37 2c 31 3c 3c 32 31 2c |:.a(e%,17,1<<21,| 00002630 28 28 61 25 3f 33 29 80 31 33 30 29 3d 32 29 3a |((a%?3).130)=2):| 00002640 f2 61 28 65 25 2c 31 37 2c 31 3c 3c 32 32 2c 6e |.a(e%,17,1<<22,n| 00002650 25 29 3a f2 61 28 65 25 2c 31 38 2c 31 3c 3c 32 |%):.a(e%,18,1<<2| 00002660 31 2c 6e 25 80 28 28 61 25 3f 33 29 80 31 32 38 |1,n%.((a%?3).128| 00002670 29 3d 30 29 3a f2 61 28 65 25 2c 31 38 2c 31 3c |)=0):.a(e%,18,1<| 00002680 3c 32 32 2c 28 28 28 61 25 3f 33 29 80 31 32 38 |<22,(((a%?3).128| 00002690 29 3e 30 29 84 a4 62 29 0d 1c 20 bc f2 61 28 65 |)>0)..b).. ..a(e| 000026a0 25 2c 32 30 2c 31 3c 3c 32 31 2c 28 28 61 25 3f |%,20,1<<21,((a%?| 000026b0 33 29 80 31 36 30 29 3d 33 32 29 3a f2 61 28 65 |3).160)=32):.a(e| 000026c0 25 2c 32 30 2c 31 3c 3c 32 32 2c 54 25 3d 2d 31 |%,20,1<<22,T%=-1| 000026d0 84 6e 25 84 a4 62 29 3a f2 61 28 65 25 2c 32 31 |.n%..b):.a(e%,21| 000026e0 2c 31 3c 3c 32 31 2c 28 28 61 25 3f 31 29 80 38 |,1<<21,((a%?1).8| 000026f0 29 3d 38 29 3a f2 61 28 65 25 2c 32 31 2c 31 3c |)=8):.a(e%,21,1<| 00002700 3c 32 32 2c 6e 25 84 a4 62 29 3a f2 61 28 65 25 |<22,n%..b):.a(e%| 00002710 2c 32 32 2c 31 3c 3c 32 31 2c 28 28 61 25 3f 31 |,22,1<<21,((a%?1| 00002720 29 80 31 36 29 3d 31 36 29 3a f2 61 28 65 25 2c |).16)=16):.a(e%,| 00002730 32 32 2c 31 3c 3c 32 32 2c 6e 25 84 a4 62 29 3a |22,1<<22,n%..b):| 00002740 46 25 3d 28 28 61 25 3f 32 29 83 31 36 29 3a c8 |F%=((a%?2).16):.| 00002750 8e 46 25 ca 0d 1c 70 3e c9 30 2c 31 2c 34 2c 35 |.F%...p>.0,1,4,5| 00002760 3a e7 28 46 25 3d 30 80 28 28 61 25 3f 33 29 80 |:.(F%=0.((a%?3).| 00002770 38 29 3d 30 80 61 25 21 32 30 3c 30 29 84 28 46 |8)=0.a%!20<0).(F| 00002780 25 3d 34 80 28 28 61 25 3f 33 29 80 38 29 3d 30 |%=4.((a%?3).8)=0| 00002790 29 8c 0d 1c 84 19 f2 62 28 6d 25 2c 31 2c 22 49 |)......b(m%,1,"I| 000027a0 72 72 65 6c 65 76 61 6e 74 22 29 0d 1c 98 18 cc |rrelevant").....| 000027b0 3a f2 62 28 6d 25 2c 31 2c a4 61 28 61 25 2b 35 |:.b(m%,1,.a(a%+5| 000027c0 36 29 29 0d 1c ac 05 cd 0d 1c ac ca e3 49 25 3d |6))..........I%=| 000027d0 30 b8 33 3a f2 61 28 6d 25 2c 49 25 2b 32 2c 31 |0.3:.a(m%,I%+2,1| 000027e0 3c 3c 32 31 2c 28 28 61 25 3f 32 29 81 31 36 29 |<<21,((a%?2).16)| 000027f0 3d 49 25 29 3a f2 61 28 6d 25 2c 49 25 2b 32 2c |=I%):.a(m%,I%+2,| 00002800 31 3c 3c 32 32 2c 6e 25 29 3a ed 49 25 3a f2 61 |1<<22,n%):.I%:.a| 00002810 28 6d 25 2c 36 2c 31 3c 3c 32 31 2c 28 28 61 25 |(m%,6,1<<21,((a%| 00002820 3f 33 29 80 34 29 3d 34 29 3a f2 61 28 6d 25 2c |?3).4)=4):.a(m%,| 00002830 36 2c 31 3c 3c 32 32 2c 28 28 61 25 3f 32 29 81 |6,1<<22,((a%?2).| 00002840 31 36 29 3d 30 84 6e 25 29 3a f2 61 28 6d 25 2c |16)=0.n%):.a(m%,| 00002850 37 2c 31 3c 3c 32 31 2c 28 28 61 25 3f 33 29 80 |7,1<<21,((a%?3).| 00002860 38 29 3d 38 29 3a f2 61 28 6d 25 2c 37 2c 31 3c |8)=8):.a(m%,7,1<| 00002870 3c 32 32 2c 28 28 61 25 3f 32 29 81 31 36 29 3d |<22,((a%?2).16)=| 00002880 30 84 6e 25 29 3a e7 28 61 25 3f 33 80 34 29 3d |0.n%):.(a%?3.4)=| 00002890 34 8c 0d 1d 06 16 f2 62 28 6d 25 2c 39 2c a4 61 |4......b(m%,9,.a| 000028a0 28 61 25 2b 37 36 29 29 0d 1d 1a 1b cc 3a f2 62 |(a%+76)).....:.b| 000028b0 28 6d 25 2c 39 2c 22 49 72 72 65 6c 65 76 61 6e |(m%,9,"Irrelevan| 000028c0 74 22 29 0d 1d 2e 05 cd 0d 1d 2e 0a e7 46 25 3d |t")..........F%=| 000028d0 34 8c 0d 1d 38 1a f2 62 28 6d 25 2c 31 37 2c 22 |4...8..b(m%,17,"| 000028e0 49 72 72 65 6c 65 76 61 6e 74 22 29 0d 1d 4c 3e |Irrelevant")..L>| 000028f0 cc 3a e7 28 61 25 3f 33 80 31 36 29 3d 30 8c f2 |.:.(a%?3.16)=0..| 00002900 62 28 6d 25 2c 31 37 2c 22 41 74 20 70 6f 69 6e |b(m%,17,"At poin| 00002910 74 65 72 22 29 8b f2 62 28 6d 25 2c 31 37 2c a4 |ter")..b(m%,17,.| 00002920 61 28 61 25 2b 31 31 36 29 29 0d 1d 56 05 cd 0d |a(a%+116))..V...| 00002930 1d 60 74 f2 61 28 4d 25 2c 31 2c 31 3c 3c 32 31 |.`t.a(M%,1,1<<21| 00002940 2c 28 61 25 3f 32 34 29 3d 34 29 3a f2 61 28 4d |,(a%?24)=4):.a(M| 00002950 25 2c 32 2c 31 3c 3c 32 31 2c 28 61 25 3f 32 34 |%,2,1<<21,(a%?24| 00002960 29 3d 31 29 3a f2 61 28 4d 25 2c 33 2c 31 3c 3c |)=1):.a(M%,3,1<<| 00002970 32 31 2c 28 61 25 3f 32 35 29 3d 31 29 3a e3 49 |21,(a%?25)=1):.I| 00002980 25 3d 31 b8 33 3a f2 61 28 4d 25 2c 49 25 2c 31 |%=1.3:.a(M%,I%,1| 00002990 3c 3c 32 32 2c 6e 25 29 3a ed 49 25 3a e7 46 25 |<<22,n%):.I%:.F%| 000029a0 3d 34 8c 0d 1d a6 4d f2 61 28 6a 25 2c 31 2c 31 |=4....M.a(j%,1,1| 000029b0 3c 3c 32 31 2c 28 28 61 25 21 32 38 29 80 31 29 |<<21,((a%!28).1)| 000029c0 3d 30 29 3a f2 61 28 6a 25 2c 32 2c 31 3c 3c 32 |=0):.a(j%,2,1<<2| 000029d0 31 2c 28 28 61 25 21 32 38 29 80 31 29 3d 31 29 |1,((a%!28).1)=1)| 000029e0 3a e7 28 28 61 25 21 32 38 29 80 31 29 3d 30 8c |:.((a%!28).1)=0.| 000029f0 0d 1d c4 2e f2 62 28 6a 25 2c 33 2c 22 4d 6f 76 |.....b(j%,3,"Mov| 00002a00 65 20 74 6f 3a 22 29 3a f2 62 28 6a 25 2c 31 32 |e to:"):.b(j%,12| 00002a10 2c 22 53 63 72 6f 6c 6c 20 74 6f 3a 22 29 0d 1d |,"Scroll to:")..| 00002a20 e2 30 cc 3a f2 62 28 6a 25 2c 33 2c 22 4d 6f 76 |.0.:.b(j%,3,"Mov| 00002a30 65 20 62 79 3a 22 29 3a f2 62 28 6a 25 2c 31 32 |e by:"):.b(j%,12| 00002a40 2c 22 53 63 72 6f 6c 6c 20 62 79 3a 22 29 0d 1e |,"Scroll by:")..| 00002a50 00 05 cd 0d 1e 00 cc f2 61 28 6a 25 2c 31 36 2c |........a(j%,16,| 00002a60 31 3c 3c 32 31 2c 28 28 61 25 21 32 38 29 80 32 |1<<21,((a%!28).2| 00002a70 29 3d 32 29 3a f2 61 28 6a 25 2c 31 37 2c 31 3c |)=2):.a(j%,17,1<| 00002a80 3c 32 31 2c 28 28 61 25 21 32 38 29 80 34 29 3d |<21,((a%!28).4)=| 00002a90 34 29 3a f2 61 28 6a 25 2c 31 38 2c 31 3c 3c 32 |4):.a(j%,18,1<<2| 00002aa0 31 2c 28 28 61 25 21 32 38 29 80 38 29 3d 38 29 |1,((a%!28).8)=8)| 00002ab0 3a f2 62 28 6a 25 2c 34 2c c3 28 61 25 21 33 32 |:.b(j%,4,.(a%!32| 00002ac0 29 29 3a f2 62 28 6a 25 2c 36 2c c3 28 61 25 21 |)):.b(j%,6,.(a%!| 00002ad0 33 36 29 29 3a f2 62 28 6a 25 2c 38 2c c3 28 61 |36)):.b(j%,8,.(a| 00002ae0 25 21 34 30 29 29 3a f2 62 28 6a 25 2c 31 30 2c |%!40)):.b(j%,10,| 00002af0 c3 28 61 25 21 34 34 29 29 3a f2 62 28 6a 25 2c |.(a%!44)):.b(j%,| 00002b00 31 33 2c c3 28 61 25 21 34 38 29 29 3a f2 62 28 |13,.(a%!48)):.b(| 00002b10 6a 25 2c 31 35 2c c3 28 61 25 21 35 32 29 29 0d |j%,15,.(a%!52)).| 00002b20 1e 5a cb f2 61 28 6a 25 2c 31 2c 31 3c 3c 32 32 |.Z..a(j%,1,1<<22| 00002b30 2c 6e 25 29 3a f2 61 28 6a 25 2c 32 2c 31 3c 3c |,n%):.a(j%,2,1<<| 00002b40 32 32 2c 6e 25 29 3a f2 61 28 6a 25 2c 34 2c 31 |22,n%):.a(j%,4,1| 00002b50 3c 3c 32 32 2c 6e 25 84 28 28 61 25 21 32 38 29 |<<22,n%.((a%!28)| 00002b60 80 31 30 29 3d 30 29 3a f2 61 28 6a 25 2c 36 2c |.10)=0):.a(j%,6,| 00002b70 31 3c 3c 32 32 2c 6e 25 84 28 28 61 25 21 32 38 |1<<22,n%.((a%!28| 00002b80 29 80 31 30 29 3d 30 29 3a f2 61 28 6a 25 2c 38 |).10)=0):.a(j%,8| 00002b90 2c 31 3c 3c 32 32 2c 6e 25 84 28 28 61 25 21 32 |,1<<22,n%.((a%!2| 00002ba0 38 29 80 32 29 3d 30 29 3a f2 61 28 6a 25 2c 31 |8).2)=0):.a(j%,1| 00002bb0 30 2c 31 3c 3c 32 32 2c 6e 25 84 28 28 61 25 21 |0,1<<22,n%.((a%!| 00002bc0 32 38 29 80 32 29 3d 30 29 3a f2 61 28 6a 25 2c |28).2)=0):.a(j%,| 00002bd0 31 33 2c 31 3c 3c 32 32 2c 6e 25 84 28 28 61 25 |13,1<<22,n%.((a%| 00002be0 21 32 38 29 80 34 29 3d 30 29 0d 1e a0 34 f2 61 |!28).4)=0)...4.a| 00002bf0 28 6a 25 2c 31 35 2c 31 3c 3c 32 32 2c 6e 25 84 |(j%,15,1<<22,n%.| 00002c00 28 28 61 25 21 32 38 29 80 34 29 3d 30 29 3a e7 |((a%!28).4)=0):.| 00002c10 28 28 61 25 21 32 38 29 80 32 29 3d 30 8c 0d 1e |((a%!28).2)=0...| 00002c20 b4 1c f2 71 28 6a 25 2c 37 2c 31 37 29 3a f2 71 |...q(j%,7,17):.q| 00002c30 28 6a 25 2c 31 31 2c 31 37 29 0d 1e d2 1e cc 3a |(j%,11,17).....:| 00002c40 f2 71 28 6a 25 2c 37 2c 32 33 29 3a f2 71 28 6a |.q(j%,7,23):.q(j| 00002c50 25 2c 31 31 2c 32 33 29 0d 1e f0 05 cd 0d 1e f0 |%,11,23)........| 00002c60 34 e3 49 25 3d 31 36 b8 31 38 3a f2 61 28 6a 25 |4.I%=16.18:.a(j%| 00002c70 2c 49 25 2c 31 3c 3c 32 32 2c 6e 25 29 3a ed 49 |,I%,1<<22,n%):.I| 00002c80 25 3a e7 28 28 61 25 21 32 38 29 80 36 29 3d 30 |%:.((a%!28).6)=0| 00002c90 8c 0d 1f 18 64 f2 62 28 6d 25 2c 31 2c 22 49 72 |....d.b(m%,1,"Ir| 00002ca0 72 65 6c 65 76 61 6e 74 22 29 3a f2 62 28 6d 25 |relevant"):.b(m%| 00002cb0 2c 39 2c 22 49 72 72 65 6c 65 76 61 6e 74 22 29 |,9,"Irrelevant")| 00002cc0 3a f2 62 28 6d 25 2c 31 37 2c 22 49 72 72 65 6c |:.b(m%,17,"Irrel| 00002cd0 65 76 61 6e 74 22 29 3a e3 49 25 3d 32 b8 37 3a |evant"):.I%=2.7:| 00002ce0 f2 61 28 6d 25 2c 49 25 2c 31 3c 3c 32 32 2c b9 |.a(m%,I%,1<<22,.| 00002cf0 29 3a ed 49 25 0d 1f 5e 05 cd 0d 1f 5e 67 cc 3a |):.I%..^....^g.:| 00002d00 4c 61 25 3d a3 3a e3 49 25 3d 30 b8 36 3a f2 61 |La%=.:.I%=0.6:.a| 00002d10 28 47 25 2c 38 2b 49 25 2c 31 3c 3c 32 32 2c 4c |(G%,8+I%,1<<22,L| 00002d20 61 25 84 6e 25 29 3a f2 62 28 47 25 2c 38 2b 49 |a%.n%):.b(G%,8+I| 00002d30 25 2c c3 28 28 61 25 21 28 28 49 25 2a 34 29 2b |%,.((a%!((I%*4)+| 00002d40 32 38 29 29 2b 31 29 29 3a e7 61 25 21 28 28 49 |28))+1)):.a%!((I| 00002d50 25 2a 34 29 2b 32 38 29 3d 2d 31 8c 4c 61 25 3d |%*4)+28)=-1.La%=| 00002d60 b9 0d 1f 9a 07 ed 49 25 0d 1f ae 05 cd 0d 1f ae |......I%........| 00002d70 16 f2 61 28 6d 25 2c 32 30 2c 31 3c 3c 32 32 2c |..a(m%,20,1<<22,| 00002d80 6e 25 29 0d 1f c2 b0 c9 32 2c 33 3a e3 49 25 3d |n%).....2,3:.I%=| 00002d90 32 b8 31 34 3a f2 61 28 74 25 2c 49 25 2c 28 31 |2.14:.a(t%,I%,(1| 00002da0 3c 3c 32 32 29 2c 6e 25 29 3a ed 49 25 3a e3 49 |<<22),n%):.I%:.I| 00002db0 25 3d 38 b8 31 30 3a f2 61 28 74 25 2c 49 25 2c |%=8.10:.a(t%,I%,| 00002dc0 28 31 3c 3c 32 32 29 2c 46 25 3d 33 84 6e 25 29 |(1<<22),F%=3.n%)| 00002dd0 3a ed 49 25 3a e3 49 25 3d 31 31 b8 31 34 3a f2 |:.I%:.I%=11.14:.| 00002de0 61 28 74 25 2c 49 25 2c 28 31 3c 3c 32 32 29 2c |a(t%,I%,(1<<22),| 00002df0 46 25 3d 32 84 6e 25 29 3a ed 49 25 3a e3 49 25 |F%=2.n%):.I%:.I%| 00002e00 3d 35 b8 36 3a f2 61 28 74 25 2c 49 25 2c 28 31 |=5.6:.a(t%,I%,(1| 00002e10 3c 3c 32 32 29 2c 46 25 3d 32 84 6e 25 29 3a ed |<<22),F%=2.n%):.| 00002e20 49 25 3a e7 6e 25 8c 4b 61 25 3d 30 8b 4b 61 25 |I%:.n%.Ka%=0.Ka%| 00002e30 3d 31 35 0d 20 44 23 f2 6c 28 74 25 2c 31 2c 4b |=15. D#.l(t%,1,K| 00002e40 61 25 29 3a f2 62 28 74 25 2c 31 2c a4 61 28 61 |a%):.b(t%,1,.a(a| 00002e50 25 2b 31 32 29 29 0d 20 62 05 cb 0d 20 62 3d 21 |%+12)). b... b=!| 00002e60 71 25 3d 65 25 3a c8 99 22 57 69 6d 70 5f 47 65 |q%=e%:.."Wimp_Ge| 00002e70 74 57 69 6e 64 6f 77 53 74 61 74 65 22 2c 2c 71 |tWindowState",,q| 00002e80 25 3a e7 28 28 71 25 21 33 32 29 80 36 35 35 33 |%:.((q%!32).6553| 00002e90 36 29 3c 3e 30 8c f2 73 0d 20 80 05 e1 0d 20 8a |6)<>0..s. .... .| 00002ea0 04 0d 20 9e 30 dd f2 42 28 68 24 29 3a e3 4d 61 |.. .0..B(h$):.Ma| 00002eb0 25 3d 30 b8 39 36 3a e3 4e 61 25 3d 30 b8 37 3a |%=0.96:.Na%=0.7:| 00002ec0 e7 61 25 28 4d 61 25 2c 4e 61 25 29 3c 3e 2d 31 |.a%(Ma%,Na%)<>-1| 00002ed0 8c 0d 20 c6 15 e7 21 61 25 28 4d 61 25 2c 4e 61 |.. ...!a%(Ma%,Na| 00002ee0 25 29 3c 3e 30 8c 0d 20 d0 4e 4f 61 25 3d 61 25 |%)<>0.. .NOa%=a%| 00002ef0 28 4d 61 25 2c 4e 61 25 29 2d 34 3a 50 61 25 3d |(Ma%,Na%)-4:Pa%=| 00002f00 a3 3a 73 25 3d a3 3a f5 3a 4f 61 25 3d 67 25 2b |.:s%=.:.:Oa%=g%+| 00002f10 4f 61 25 21 34 3a e7 50 61 25 8c 51 61 25 3d 28 |Oa%!4:.Pa%.Qa%=(| 00002f20 28 4f 61 25 3f 33 29 80 33 32 29 3d 33 32 8b 51 |(Oa%?3).32)=32.Q| 00002f30 61 25 3d a3 0d 21 02 43 e7 a4 61 28 4f 61 25 2b |a%=..!.C..a(Oa%+| 00002f40 31 32 38 29 3d 68 24 84 28 68 24 3d 22 41 75 74 |128)=h$.(h$="Aut| 00002f50 6f 65 78 65 63 22 80 c0 a4 61 28 4f 61 25 2b 31 |oexec"...a(Oa%+1| 00002f60 32 38 29 2c 38 29 3d 22 41 75 74 6f 65 78 65 63 |28),8)="Autoexec| 00002f70 22 29 84 51 61 25 8c 0d 21 0c 1b f2 41 28 4f 61 |").Qa%..!...A(Oa| 00002f80 25 29 3a f2 67 28 36 31 34 36 29 3a 50 61 25 3d |%):.g(6146):Pa%=| 00002f90 73 25 0d 21 34 05 cd 0d 21 34 0d fd 4f 61 25 21 |s%.!4...!4..Oa%!| 00002fa0 34 3d 2d 31 0d 21 48 05 cd 0d 21 48 05 cd 0d 21 |4=-1.!H...!H...!| 00002fb0 52 2b ed 4e 61 25 3a ed 4d 61 25 3a c8 97 c8 93 |R+.Na%:.Ma%:....| 00002fc0 69 61 25 2c 6a 61 25 2c 6b 61 25 2d 69 61 25 2c |ia%,ja%,ka%-ia%,| 00002fd0 6c 61 25 2d 6a 61 25 3a e1 0d 21 7a 04 0d 21 8e |la%-ja%:..!z..!.| 00002fe0 39 dd f2 69 3a c8 95 61 25 28 42 25 2c 72 25 29 |9..i:..a%(B%,r%)| 00002ff0 3d 2d 31 3a 72 25 3d 28 72 25 2b 31 29 83 38 3a |=-1:r%=(r%+1).8:| 00003000 ce 3a 61 25 3d 21 61 25 28 42 25 2c 72 25 29 3a |.:a%=!a%(B%,r%):| 00003010 e7 61 25 3d 30 8c 0d 21 c0 0f 61 25 3d a4 66 3a |.a%=0..!..a%=.f:| 00003020 54 25 3d 2d 31 0d 21 de 1a cc 3a 54 25 3d 21 28 |T%=-1.!...:T%=!(| 00003030 67 25 2b 61 25 2b 38 29 3a 61 25 2b 3d 67 25 0d |g%+a%+8):a%+=g%.| 00003040 21 fc 05 cd 0d 21 fc 05 e1 0d 22 06 04 0d 22 1a |!....!...."...".| 00003050 34 dd a4 66 3a 52 61 25 3d 67 25 2b 32 35 38 38 |4..f:Ra%=g%+2588| 00003060 3a c8 95 28 28 52 61 25 3f 33 29 80 31 32 38 29 |:..((Ra%?3).128)| 00003070 3d 30 3a 52 61 25 2b 3d 6b 25 3a ce 3a 3d 52 61 |=0:Ra%+=k%:.:=Ra| 00003080 25 0d 22 60 2d dd f2 44 28 42 25 2c 72 25 2c 46 |%."`-..D(B%,r%,F| 00003090 25 29 3a 77 25 3d b9 3a ea 76 25 3a e7 28 61 25 |%):w%=.:.v%:.(a%| 000030a0 3f 33 80 31 32 38 29 3e 30 8c 76 25 3d b9 0d 22 |?3.128)>0.v%=.."| 000030b0 7e 1c e7 76 25 80 48 25 2b 67 25 2b 28 32 2a 6b |~..v%.H%+g%+(2*k| 000030c0 25 29 3e 67 25 2b 53 61 25 8c 0d 22 88 30 f2 66 |%)>g%+Sa%..".0.f| 000030d0 28 30 2c 22 53 6f 72 72 79 2c 20 49 20 68 61 76 |(0,"Sorry, I hav| 000030e0 65 20 6e 6f 20 6d 6f 72 65 20 6d 65 6d 6f 72 79 |e no more memory| 000030f0 22 2c 31 29 3a 54 61 25 3d a3 0d 22 a6 0a cc 3a |",1):Ta%=.."...:| 00003100 e7 76 25 8c 0d 22 b0 1b 61 25 3f 31 32 38 3d 31 |.v%.."..a%?128=1| 00003110 33 3a e7 61 25 2b 6b 25 3d 67 25 2b 48 25 8c 0d |3:.a%+k%=g%+H%..| 00003120 22 c4 2b 48 25 2b 3d 6b 25 3a e3 49 25 3d 61 25 |".+H%+=k%:.I%=a%| 00003130 2b 6b 25 b8 61 25 2b 28 6b 25 2a 32 29 2d 34 3a |+k%.a%+(k%*2)-4:| 00003140 21 49 25 3d 2d 31 3a ed 49 25 0d 22 f6 05 cd 0d |!I%=-1:.I%."....| 00003150 22 f6 0a 55 61 25 3d 2d 31 0d 23 0a 15 cc 3a 55 |"..Ua%=-1.#...:U| 00003160 61 25 3d 28 28 61 25 3f 32 29 83 31 36 29 0d 23 |a%=((a%?2).16).#| 00003170 1e 05 cd 0d 23 1e 2c 3f 61 25 3d 42 25 3a 61 25 |....#.,?a%=B%:a%| 00003180 3f 31 3d 72 25 3a 61 25 3f 32 3d 28 28 61 25 3f |?1=r%:a%?2=((a%?| 00003190 32 29 80 32 34 30 29 2b 46 25 3a e7 76 25 8c 0d |2).240)+F%:.v%..| 000031a0 23 46 20 61 25 21 34 3d 2d 31 3a f2 65 61 28 42 |#F a%!4=-1:.ea(B| 000031b0 25 2c 72 25 29 3a e7 56 61 25 3c 3e 2d 31 8c 0d |%,r%):.Va%<>-1..| 000031c0 23 64 1b 56 61 25 21 34 3d 61 25 2d 67 25 3a 61 |#d.Va%!4=a%-g%:a| 000031d0 25 21 38 3d 56 61 25 2d 67 25 0d 23 82 1e cc 3a |%!8=Va%-g%.#...:| 000031e0 21 61 25 28 42 25 2c 72 25 29 3d 61 25 2d 67 25 |!a%(B%,r%)=a%-g%| 000031f0 3a 61 25 21 38 3d 2d 31 0d 23 a0 05 cd 0d 23 a0 |:a%!8=-1.#....#.| 00003200 05 cd 0d 23 aa 09 c8 8e 46 25 ca 0d 23 b4 21 c9 |...#....F%..#.!.| 00003210 30 2c 31 2c 35 3a e7 55 61 25 3d 32 84 55 61 25 |0,1,5:.Ua%=2.Ua%| 00003220 3d 33 84 55 61 25 3d 34 84 76 25 8c 0d 23 c8 0a |=3.Ua%=4.v%..#..| 00003230 e7 46 25 3d 30 8c 0d 23 d2 13 61 25 3f 33 3d 32 |.F%=0..#..a%?3=2| 00003240 38 3a 61 25 3f 32 3d 46 25 0d 23 f0 18 cc 3a 61 |8:a%?2=F%.#...:a| 00003250 25 3f 33 3d 32 34 3a 61 25 3f 32 3d 46 25 2b 33 |%?3=24:a%?2=F%+3| 00003260 32 0d 24 0e 05 cd 0d 24 0e 82 61 25 21 31 32 3d |2.$....$..a%!12=| 00003270 2d 31 3a 61 25 21 31 36 3d 2d 31 3a 61 25 21 32 |-1:a%!16=-1:a%!2| 00003280 30 3d 2d 31 3a 61 25 21 32 34 3d 34 3a e3 49 25 |0=-1:a%!24=4:.I%| 00003290 3d 32 38 b8 35 32 88 34 3a 61 25 21 49 25 3d 2d |=28.52.4:a%!I%=-| 000032a0 31 3a ed 49 25 3a 24 28 61 25 2b 35 36 29 3d 22 |1:.I%:$(a%+56)="| 000032b0 2d 22 3a 24 28 61 25 2b 37 36 29 3d 22 2d 22 3a |-":$(a%+76)="-":| 000032c0 61 25 21 31 30 34 3d 30 3a 61 25 21 31 30 38 3d |a%!104=0:a%!108=| 000032d0 30 3a 61 25 21 31 31 32 3d 30 3a 24 28 61 25 2b |0:a%!112=0:$(a%+| 000032e0 31 31 36 29 3d 22 2d 22 0d 24 9a 05 cd 0d 24 9a |116)="-".$....$.| 000032f0 25 c9 32 2c 33 3a e7 55 61 25 3d 30 84 55 61 25 |%.2,3:.Ua%=0.Ua%| 00003300 3d 31 84 55 61 25 3d 34 84 55 61 25 3d 35 84 76 |=1.Ua%=4.Ua%=5.v| 00003310 25 8c 0d 24 ae 23 e3 49 25 3d 31 32 b8 31 32 34 |%..$.#.I%=12.124| 00003320 88 34 3a 61 25 21 49 25 3d 30 3a ed 49 25 3a 61 |.4:a%!I%=0:.I%:a| 00003330 25 3f 33 3d 30 0d 24 cc 05 cd 0d 24 cc 12 c9 34 |%?3=0.$....$...4| 00003340 3a e7 55 61 25 3c 3e 34 84 76 25 8c 0d 24 e0 a3 |:.Ua%<>4.v%..$..| 00003350 61 25 3f 32 3d 46 25 2b 31 36 3a 61 25 3f 33 3d |a%?2=F%+16:a%?3=| 00003360 30 3a 61 25 21 31 32 3d 30 3a 61 25 21 31 36 3d |0:a%!12=0:a%!16=| 00003370 2d 31 3a 61 25 21 32 30 3d 2d 31 3a 61 25 21 32 |-1:a%!20=-1:a%!2| 00003380 34 3d 30 3a 61 25 21 32 38 3d 33 3a e3 49 25 3d |4=0:a%!28=3:.I%=| 00003390 33 32 b8 35 32 88 34 3a 61 25 21 49 25 3d 30 3a |32.52.4:a%!I%=0:| 000033a0 ed 49 25 3a 24 28 61 25 2b 35 36 29 3d 22 49 72 |.I%:$(a%+56)="Ir| 000033b0 72 65 6c 65 76 61 6e 74 22 3a 24 28 61 25 2b 37 |relevant":$(a%+7| 000033c0 36 29 3d 22 2d 22 3a 61 25 21 31 30 34 3d 30 3a |6)="-":a%!104=0:| 000033d0 61 25 21 31 30 38 3d 30 3a 61 25 21 31 31 32 3d |a%!108=0:a%!112=| 000033e0 30 3a 24 28 61 25 2b 31 31 36 29 3d 22 2d 22 0d |0:$(a%+116)="-".| 000033f0 25 8a 05 cd 0d 25 8a 05 cb 0d 25 94 05 cd 0d 25 |%....%....%....%| 00003400 9e 05 e1 0d 25 a8 04 0d 25 bc 1e dd f2 65 61 28 |....%...%....ea(| 00003410 42 25 2c 72 25 29 3a e7 21 61 25 28 42 25 2c 72 |B%,r%):.!a%(B%,r| 00003420 25 29 3d 30 8c 0d 25 c6 0a 56 61 25 3d 2d 31 0d |%)=0..%..Va%=-1.| 00003430 25 da 32 cc 3a 56 61 25 3d 21 61 25 28 42 25 2c |%.2.:Va%=!a%(B%,| 00003440 72 25 29 2b 67 25 3a c8 95 56 61 25 21 34 3c 3e |r%)+g%:..Va%!4<>| 00003450 2d 31 3a 56 61 25 3d 67 25 2b 56 61 25 21 34 3a |-1:Va%=g%+Va%!4:| 00003460 ce 0d 26 0c 05 cd 0d 26 0c 05 e1 0d 26 16 04 0d |..&....&....&...| 00003470 26 2a 1d dd f2 7a 3a e7 28 28 28 28 61 25 3f 32 |&*...z:.((((a%?2| 00003480 29 83 31 36 29 29 80 32 29 3d 30 8c 0d 26 34 3e |).16)).2)=0..&4>| 00003490 c8 99 22 57 69 6d 70 5f 47 65 74 50 6f 69 6e 74 |.."Wimp_GetPoint| 000034a0 65 72 49 6e 66 6f 22 2c 2c 62 25 3a e7 28 28 61 |erInfo",,b%:.((a| 000034b0 25 3f 32 29 80 31 35 29 3d 34 80 28 28 61 25 21 |%?2).15)=4.((a%!| 000034c0 32 38 29 80 31 34 29 3d 38 8c 0d 26 48 1b 61 25 |28).14)=8..&H.a%| 000034d0 21 33 32 3d 21 62 25 3a 61 25 21 33 36 3d 62 25 |!32=!b%:a%!36=b%| 000034e0 21 34 3a f2 63 0d 26 70 3b cc 3a 57 61 25 3d 62 |!4:.c.&p;.:Wa%=b| 000034f0 25 21 31 32 3a 58 61 25 3d 62 25 21 31 36 3a e7 |%!12:Xa%=b%!16:.| 00003500 28 57 61 25 3c 3e 6d 25 84 58 61 25 3c 3e 32 30 |(Wa%<>m%.Xa%<>20| 00003510 29 80 28 46 25 3c 3e 34 84 57 61 25 3e 30 29 8c |).(F%<>4.Wa%>0).| 00003520 0d 26 84 e4 77 25 3d b9 3a 61 25 21 31 36 3d 57 |.&..w%=.:a%!16=W| 00003530 61 25 3a 61 25 21 32 30 3d 58 61 25 3a 21 62 25 |a%:a%!20=Xa%:!b%| 00003540 3d 30 3a 62 25 21 31 36 3d 30 3a c8 99 22 57 69 |=0:b%!16=0:.."Wi| 00003550 6d 70 5f 53 65 6e 64 4d 65 73 73 61 67 65 22 2c |mp_SendMessage",| 00003560 31 39 2c 71 25 2c 57 61 25 2c 58 61 25 b8 2c 2c |19,q%,Wa%,Xa%.,,| 00003570 59 61 25 3a 61 25 21 31 32 3d 59 61 25 3a 24 28 |Ya%:a%!12=Ya%:$(| 00003580 61 25 2b 35 36 29 3d a4 6e 28 59 61 25 29 3a 24 |a%+56)=.n(Ya%):$| 00003590 28 61 25 2b 37 36 29 3d c0 a4 67 28 59 61 25 2c |(a%+76)=..g(Ya%,| 000035a0 57 61 25 2c a3 29 2c 32 37 29 3a 24 28 61 25 2b |Wa%,.),27):$(a%+| 000035b0 31 31 36 29 3d c0 a4 6f 28 59 61 25 2c 57 61 25 |116)=..o(Ya%,Wa%| 000035c0 2c 58 61 25 29 2c 31 31 29 3a f2 66 61 28 57 61 |,Xa%),11):.fa(Wa| 000035d0 25 29 3a 61 25 21 31 30 34 3d 5a 61 25 3a 61 25 |%):a%!104=Za%:a%| 000035e0 21 31 30 38 3d 5f 61 25 3a 61 25 21 31 31 32 3d |!108=_a%:a%!112=| 000035f0 60 61 25 3a e7 28 28 61 25 3f 32 29 83 31 36 29 |`a%:.((a%?2).16)| 00003600 3c 3e 30 8c 0d 27 06 1a e7 a4 61 28 61 25 2b 37 |<>0..'....a(a%+7| 00003610 36 29 3d 22 49 63 6f 6e 20 62 61 72 22 8c 0d 27 |6)="Icon bar"..'| 00003620 10 21 61 25 3f 32 3d 28 61 25 3f 32 29 80 31 35 |.!a%?2=(a%?2).15| 00003630 3a 61 25 3f 33 3d 28 61 25 3f 33 29 84 31 32 0d |:a%?3=(a%?3).12.| 00003640 27 2e 17 cc 3a e7 28 5a 61 25 80 28 31 3c 3c 32 |'...:.(Za%.(1<<2| 00003650 30 29 29 3d 30 8c 0d 27 38 29 61 25 3f 32 3d 28 |0))=0..'8)a%?2=(| 00003660 28 61 25 3f 32 29 80 31 35 29 2b 28 31 3c 3c 34 |(a%?2).15)+(1<<4| 00003670 29 3a 61 25 3f 33 3d 61 25 3f 33 80 ac 31 36 0d |):a%?3=a%?3..16.| 00003680 27 56 2a cc 3a 61 25 3f 32 3d 28 28 61 25 3f 32 |'V*.:a%?2=((a%?2| 00003690 29 80 31 35 29 2b 28 32 3c 3c 34 29 3a 61 25 3f |).15)+(2<<4):a%?| 000036a0 33 3d 61 25 3f 33 84 31 36 0d 27 74 05 cd 0d 27 |3=a%?3.16.'t...'| 000036b0 74 17 61 25 3f 33 3d 28 28 61 25 3f 33 29 80 32 |t.a%?3=((a%?3).2| 000036c0 34 33 29 2b 38 0d 27 88 05 cd 0d 27 88 11 cc 3a |43)+8.'....'...:| 000036d0 e7 28 61 25 21 32 30 29 3c 30 8c 0d 27 9c 2b 61 |.(a%!20)<0..'.+a| 000036e0 25 3f 32 3d 28 28 61 25 3f 32 29 80 31 35 29 2b |%?2=((a%?2).15)+| 000036f0 28 31 3c 3c 34 29 3a 61 25 3f 33 3d 28 61 25 3f |(1<<4):a%?3=(a%?| 00003700 33 29 80 ac 31 32 0d 27 ba 05 cd 0d 27 ba 05 cd |3)..12.'....'...| 00003710 0d 27 c4 21 e7 28 28 61 25 3f 32 29 80 31 35 29 |.'.!.((a%?2).15)| 00003720 3d 34 80 28 28 61 25 21 32 38 29 80 31 29 3d 30 |=4.((a%!28).1)=0| 00003730 8c 0d 27 ce 14 e7 28 28 61 25 21 32 38 29 80 31 |..'...((a%!28).1| 00003740 34 29 3d 38 8c 0d 27 d8 34 c8 99 22 57 69 6d 70 |4)=8..'.4.."Wimp| 00003750 5f 47 65 74 50 6f 69 6e 74 65 72 49 6e 66 6f 22 |_GetPointerInfo"| 00003760 2c 2c 62 25 3a 61 25 21 33 32 3d 21 62 25 3a 61 |,,b%:a%!32=!b%:a| 00003770 25 21 33 36 3d 62 25 21 34 0d 28 00 7f cc 3a 21 |%!36=b%!4.(...:!| 00003780 62 25 3d 57 61 25 3a c8 99 22 57 69 6d 70 5f 47 |b%=Wa%:.."Wimp_G| 00003790 65 74 57 69 6e 64 6f 77 53 74 61 74 65 22 2c 2c |etWindowState",,| 000037a0 62 25 3a 61 25 21 33 32 3d 62 25 21 34 3a 61 25 |b%:a%!32=b%!4:a%| 000037b0 21 33 36 3d 62 25 21 38 3a 61 25 21 34 30 3d 62 |!36=b%!8:a%!40=b| 000037c0 25 21 31 32 3a 61 25 21 34 34 3d 62 25 21 31 36 |%!12:a%!44=b%!16| 000037d0 3a 61 25 21 34 38 3d 62 25 21 32 30 3a 61 25 21 |:a%!48=b%!20:a%!| 000037e0 35 32 3d 62 25 21 32 34 3a 61 25 21 32 38 3d 28 |52=b%!24:a%!28=(| 000037f0 61 25 21 32 38 29 84 36 0d 28 64 05 cd 0d 28 64 |a%!28).6.(d...(d| 00003800 05 cd 0d 28 6e 06 f2 63 0d 28 82 05 cd 0d 28 82 |...(n..c.(....(.| 00003810 05 cd 0d 28 8c 77 cc 3a c8 99 22 57 69 6d 70 5f |...(.w.:.."Wimp_| 00003820 47 65 74 50 6f 69 6e 74 65 72 49 6e 66 6f 22 2c |GetPointerInfo",| 00003830 2c 62 25 3a 21 71 25 3d 32 30 3a 71 25 21 31 36 |,b%:!q%=20:q%!16| 00003840 3d 30 3a 71 25 21 31 32 3d 30 3a c8 99 22 57 69 |=0:q%!12=0:.."Wi| 00003850 6d 70 5f 53 65 6e 64 4d 65 73 73 61 67 65 22 2c |mp_SendMessage",| 00003860 31 39 2c 71 25 2c 62 25 21 31 32 2c 62 25 21 31 |19,q%,b%!12,b%!1| 00003870 36 b8 2c 2c 6c 25 3a f2 65 28 a4 67 28 6c 25 2c |6.,,l%:.e(.g(l%,| 00003880 62 25 21 31 32 2c b9 29 29 0d 28 c8 05 cd 0d 28 |b%!12,.)).(....(| 00003890 c8 05 e1 0d 28 d2 04 0d 28 e6 a7 dd f2 70 28 63 |....(...(....p(c| 000038a0 25 2c 56 25 29 3a c8 99 22 57 69 6d 70 5f 47 65 |%,V%):.."Wimp_Ge| 000038b0 74 50 6f 69 6e 74 65 72 49 6e 66 6f 22 2c 2c 62 |tPointerInfo",,b| 000038c0 25 3a 61 62 25 3d 21 62 25 3a 62 62 25 3d 62 25 |%:ab%=!b%:bb%=b%| 000038d0 21 34 3a 63 62 25 3d 62 25 21 31 32 3a 64 62 25 |!4:cb%=b%!12:db%| 000038e0 3d 62 25 21 31 36 3a 21 71 25 3d 32 30 3a 71 25 |=b%!16:!q%=20:q%| 000038f0 21 31 32 3d 30 3a c8 99 22 57 69 6d 70 5f 53 65 |!12=0:.."Wimp_Se| 00003900 6e 64 4d 65 73 73 61 67 65 22 2c 31 39 2c 71 25 |ndMessage",19,q%| 00003910 2c 63 62 25 2c 64 62 25 b8 2c 2c 65 62 25 3a 21 |,cb%,db%.,,eb%:!| 00003920 62 25 3d 61 62 25 3a 62 25 21 34 3d 62 62 25 3a |b%=ab%:b%!4=bb%:| 00003930 c8 8e 28 28 63 25 3f 32 29 81 31 36 29 ca 0d 29 |..((c%?2).16)..)| 00003940 18 25 c9 30 3a e7 a4 67 28 63 25 21 31 32 2c 63 |.%.0:..g(c%!12,c| 00003950 25 21 31 36 2c b9 29 3c 3e a4 61 28 63 25 2b 37 |%!16,.)<>.a(c%+7| 00003960 36 29 8c 0d 29 2c 8f f2 66 28 30 2c 22 54 68 65 |6)..),..f(0,"The| 00003970 20 73 70 65 63 69 66 69 65 64 20 77 69 6e 64 6f | specified windo| 00003980 77 20 68 61 73 20 62 65 65 6e 20 64 65 6c 65 74 |w has been delet| 00003990 65 64 2e 20 43 68 61 6e 67 65 20 74 68 65 20 6b |ed. Change the k| 000039a0 65 79 73 74 72 6f 6b 65 20 74 6f 20 27 41 6e 79 |eystroke to 'Any| 000039b0 20 77 69 6e 64 6f 77 27 20 6f 72 20 27 57 69 6e | window' or 'Win| 000039c0 64 6f 77 20 61 74 20 70 6f 69 6e 74 65 72 27 2e |dow at pointer'.| 000039d0 20 53 65 65 20 74 68 65 20 6d 61 6e 75 61 6c 20 | See the manual | 000039e0 66 6f 72 20 6d 6f 72 65 20 68 65 6c 70 2e 22 2c |for more help.",| 000039f0 31 29 0d 29 40 46 cc 3a e7 ac 4a 61 25 8c c8 99 |1).)@F.:..Ja%...| 00003a00 22 57 69 6d 70 5f 47 65 74 43 61 72 65 74 50 6f |"Wimp_GetCaretPo| 00003a10 73 69 74 69 6f 6e 22 2c 2c 43 25 3a c8 99 22 57 |sition",,C%:.."W| 00003a20 69 6d 70 5f 53 65 74 43 61 72 65 74 50 6f 73 69 |imp_SetCaretPosi| 00003a30 74 69 6f 6e 22 2c 2d 31 0d 29 4a 31 f2 76 28 63 |tion",-1.)J1.v(c| 00003a40 25 21 31 32 2c 63 25 21 31 36 2c 63 25 21 32 30 |%!12,c%!16,c%!20| 00003a50 2c 56 25 2c 61 62 25 2c 62 62 25 29 3a e7 56 25 |,V%,ab%,bb%):.V%| 00003a60 3d 32 8c f2 77 28 63 25 29 0d 29 5e 08 73 25 3d |=2..w(c%).)^.s%=| 00003a70 b9 0d 29 72 05 cd 0d 29 72 0f c9 31 3a e7 64 62 |..)r...)r..1:.db| 00003a80 25 3e 2d 32 8c 0d 29 86 3e e7 65 62 25 3d 63 25 |%>-2..).>.eb%=c%| 00003a90 21 31 32 84 28 56 25 3c 3e 32 80 63 25 21 32 30 |!12.(V%<>2.c%!20| 00003aa0 3c 2d 31 80 28 63 25 3f 33 80 38 29 3d 30 29 84 |<-1.(c%?3.8)=0).| 00003ab0 28 56 25 3d 2d 31 80 28 63 25 3f 33 80 38 29 3d |(V%=-1.(c%?3.8)=| 00003ac0 30 29 8c 0d 29 90 0b e7 63 62 25 3e 30 8c 0d 29 |0)..)...cb%>0..)| 00003ad0 9a 7c 21 71 25 3d 63 62 25 3a c8 99 22 57 69 6d |.|!q%=cb%:.."Wim| 00003ae0 70 5f 47 65 74 57 69 6e 64 6f 77 49 6e 66 6f 22 |p_GetWindowInfo"| 00003af0 2c 2c 71 25 3a 66 62 25 3d b9 3a e7 28 28 28 71 |,,q%:fb%=.:.(((q| 00003b00 25 21 33 32 29 80 67 62 25 29 3c 3e 28 63 25 21 |%!32).gb%)<>(c%!| 00003b10 31 30 34 29 84 28 71 25 21 33 36 29 3c 3e 28 63 |104).(q%!36)<>(c| 00003b20 25 21 31 30 38 29 84 28 71 25 21 34 30 29 3c 3e |%!108).(q%!40)<>| 00003b30 28 63 25 21 31 31 32 29 29 80 28 63 25 3f 33 80 |(c%!112)).(c%?3.| 00003b40 38 29 3d 38 8c 66 62 25 3d a3 0d 29 c2 15 e7 28 |8)=8.fb%=..)...(| 00003b50 28 71 25 21 36 30 29 80 32 35 36 29 3d 30 8c 0d |(q%!60).256)=0..| 00003b60 29 cc 10 64 24 3d a4 61 28 71 25 2b 37 36 29 0d |)..d$=.a(q%+76).| 00003b70 29 e0 16 cc 3a 64 24 3d a4 65 28 65 62 25 2c 71 |)...:d$=.e(eb%,q| 00003b80 25 21 37 36 29 0d 29 f4 05 cd 0d 29 f4 28 e7 c0 |%!76).)....).(..| 00003b90 64 24 2c 32 37 29 3c 3e a4 61 28 63 25 2b 37 36 |d$,27)<>.a(c%+76| 00003ba0 29 80 28 63 25 3f 33 80 34 29 3d 34 8c 66 62 25 |).(c%?3.4)=4.fb%| 00003bb0 3d a3 0d 29 fe 09 e7 66 62 25 8c 0d 2a 08 44 e7 |=..)...fb%..*.D.| 00003bc0 ac 4a 61 25 8c c8 99 22 57 69 6d 70 5f 47 65 74 |.Ja%..."Wimp_Get| 00003bd0 43 61 72 65 74 50 6f 73 69 74 69 6f 6e 22 2c 2c |CaretPosition",,| 00003be0 43 25 3a c8 99 22 57 69 6d 70 5f 53 65 74 43 61 |C%:.."Wimp_SetCa| 00003bf0 72 65 74 50 6f 73 69 74 69 6f 6e 22 2c 2d 31 0d |retPosition",-1.| 00003c00 2a 12 23 e7 28 63 25 3f 33 80 31 36 29 3d 31 36 |*.#.(c%?3.16)=16| 00003c10 8c 68 62 25 3d 63 25 21 32 30 8b 68 62 25 3d 64 |.hb%=c%!20.hb%=d| 00003c20 62 25 0d 2a 1c 2b f2 76 28 65 62 25 2c 63 62 25 |b%.*.+.v(eb%,cb%| 00003c30 2c 68 62 25 2c 56 25 2c 61 62 25 2c 62 62 25 29 |,hb%,V%,ab%,bb%)| 00003c40 3a e7 56 25 3d 32 8c f2 77 28 63 25 29 0d 2a 30 |:.V%=2..w(c%).*0| 00003c50 08 73 25 3d b9 0d 2a 44 05 cd 0d 2a 44 05 cd 0d |.s%=..*D...*D...| 00003c60 2a 4e 05 cd 0d 2a 58 05 cd 0d 2a 62 3f c9 32 2c |*N...*X...*b?.2,| 00003c70 33 3a 57 25 3d a4 6b 3a e3 69 62 25 3d 30 b8 32 |3:W%=.k:.ib%=0.2| 00003c80 35 32 88 34 3a 53 25 21 69 62 25 3d 57 25 3a e7 |52.4:S%!ib%=W%:.| 00003c90 57 25 3c 3e 2d 31 8c 57 25 3d a4 6c 28 57 25 29 |W%<>-1.W%=.l(W%)| 00003ca0 8b 6a 62 25 3d 69 62 25 0d 2a 94 85 ed 69 62 25 |.jb%=ib%.*...ib%| 00003cb0 3a 6b 62 25 3d a3 3a 69 62 25 3d 6a 62 25 3a c8 |:kb%=.:ib%=jb%:.| 00003cc0 95 69 62 25 3e 30 80 28 ac 6b 62 25 84 28 28 63 |.ib%>0.(.kb%.((c| 00003cd0 25 3f 32 29 81 31 36 29 3d 33 29 3a 57 25 3d 53 |%?2).16)=3):W%=S| 00003ce0 25 21 69 62 25 3a 21 71 25 3d 32 30 3a 71 25 21 |%!ib%:!q%=20:q%!| 00003cf0 31 32 3d 30 3a c8 99 22 58 57 69 6d 70 5f 53 65 |12=0:.."XWimp_Se| 00003d00 6e 64 4d 65 73 73 61 67 65 22 2c 31 39 2c 71 25 |ndMessage",19,q%| 00003d10 2c 57 25 2c 2d 31 b8 2c 2c 6c 62 25 3a e7 6c 62 |,W%,-1.,,lb%:.lb| 00003d20 25 3c 3e 30 80 6c 62 25 3c 3e 57 25 8c 0d 2a da |%<>0.lb%<>W%..*.| 00003d30 79 21 71 25 3d 57 25 3a c8 99 22 57 69 6d 70 5f |y!q%=W%:.."Wimp_| 00003d40 47 65 74 57 69 6e 64 6f 77 49 6e 66 6f 22 2c 2c |GetWindowInfo",,| 00003d50 71 25 3a 66 62 25 3d b9 3a e7 28 28 71 25 21 33 |q%:fb%=.:.((q%!3| 00003d60 32 80 67 62 25 29 3c 3e 28 63 25 21 31 30 34 29 |2.gb%)<>(c%!104)| 00003d70 84 28 71 25 21 33 36 29 3c 3e 28 63 25 21 31 30 |.(q%!36)<>(c%!10| 00003d80 38 29 84 28 71 25 21 34 30 29 3c 3e 28 63 25 21 |8).(q%!40)<>(c%!| 00003d90 31 31 32 29 29 80 28 63 25 3f 33 80 38 29 3d 38 |112)).(c%?3.8)=8| 00003da0 8c 66 62 25 3d a3 0d 2b 02 34 e7 c0 a4 67 28 6c |.fb%=..+.4...g(l| 00003db0 62 25 2c 57 25 2c a3 29 2c 32 37 29 3c 3e a4 61 |b%,W%,.),27)<>.a| 00003dc0 28 63 25 2b 37 36 29 80 28 28 63 25 3f 33 29 80 |(c%+76).((c%?3).| 00003dd0 34 29 3d 34 8c 66 62 25 3d a3 0d 2b 0c 46 e7 ac |4)=4.fb%=..+.F..| 00003de0 28 6c 62 25 3d 63 25 21 31 32 84 28 56 25 3c 3e |(lb%=c%!12.(V%<>| 00003df0 32 80 63 25 21 32 30 3c 2d 31 80 28 63 25 3f 33 |2.c%!20<-1.(c%?3| 00003e00 80 38 29 3d 30 29 84 28 56 25 3d 2d 31 80 28 63 |.8)=0).(V%=-1.(c| 00003e10 25 3f 33 80 38 29 3d 30 29 29 8c 66 62 25 3d a3 |%?3.8)=0)).fb%=.| 00003e20 0d 2b 16 09 e7 66 62 25 8c 0d 2b 20 44 e7 ac 4a |.+...fb%..+ D..J| 00003e30 61 25 8c c8 99 22 57 69 6d 70 5f 47 65 74 43 61 |a%..."Wimp_GetCa| 00003e40 72 65 74 50 6f 73 69 74 69 6f 6e 22 2c 2c 43 25 |retPosition",,C%| 00003e50 3a c8 99 22 57 69 6d 70 5f 53 65 74 43 61 72 65 |:.."Wimp_SetCare| 00003e60 74 50 6f 73 69 74 69 6f 6e 22 2c 2d 31 0d 2b 2a |tPosition",-1.+*| 00003e70 2c f2 76 28 6c 62 25 2c 57 25 2c 63 25 21 32 30 |,.v(lb%,W%,c%!20| 00003e80 2c 56 25 2c 61 62 25 2c 62 62 25 29 3a e7 56 25 |,V%,ab%,bb%):.V%| 00003e90 3d 32 8c f2 77 28 63 25 29 0d 2b 3e 0e 6b 62 25 |=2..w(c%).+>.kb%| 00003ea0 3d b9 3a 73 25 3d b9 0d 2b 5c 05 cd 0d 2b 5c 05 |=.:s%=..+\...+\.| 00003eb0 cd 0d 2b 66 0c 69 62 25 2d 3d 34 3a ce 0d 2b 84 |..+f.ib%-=4:..+.| 00003ec0 05 cb 0d 2b 84 05 e1 0d 2b 8e 04 0d 2b a2 18 dd |...+....+...+...| 00003ed0 f2 77 28 63 25 29 3a c8 8e 28 63 25 3f 32 83 31 |.w(c%):..(c%?2.1| 00003ee0 36 29 ca 0d 2b ac 75 c9 31 3a e3 49 25 3d 30 b8 |6)..+.u.1:.I%=0.| 00003ef0 32 34 88 34 3a 62 25 21 49 25 3d 63 25 21 28 49 |24.4:b%!I%=c%!(I| 00003f00 25 2b 32 38 29 3a ed 49 25 3a 62 25 21 32 38 3d |%+28):.I%:b%!28=| 00003f10 2d 31 3a c8 99 22 57 69 6d 70 5f 53 65 6e 64 4d |-1:.."Wimp_SendM| 00003f20 65 73 73 61 67 65 22 2c 39 2c 62 25 2c 63 25 21 |essage",9,b%,c%!| 00003f30 31 32 3a 73 25 3d b9 3a f2 67 28 36 31 34 36 29 |12:s%=.:.g(6146)| 00003f40 3a c8 99 22 57 69 6d 70 5f 43 72 65 61 74 65 4d |:.."Wimp_CreateM| 00003f50 65 6e 75 22 2c 2c 2d 31 0d 2c 10 b9 c9 35 3a c8 |enu",,-1.,...5:.| 00003f60 99 22 57 69 6d 70 5f 43 72 65 61 74 65 4d 65 6e |."Wimp_CreateMen| 00003f70 75 22 2c 2c 2d 31 3a f2 67 28 36 31 34 36 29 3a |u",,-1:.g(6146):| 00003f80 21 62 25 3d 36 34 3a 62 25 21 31 32 3d 30 3a 62 |!b%=64:b%!12=0:b| 00003f90 25 21 31 36 3d 32 36 32 33 33 36 3a 62 25 21 32 |%!16=262336:b%!2| 00003fa0 30 3d 31 3a 62 25 21 32 34 3d 61 62 25 2d 36 34 |0=1:b%!24=ab%-64| 00003fb0 3a 62 25 21 32 38 3d 62 62 25 2b 34 34 3a e3 49 |:b%!28=bb%+44:.I| 00003fc0 25 3d 30 b8 32 34 88 34 3a 62 25 21 28 49 25 2b |%=0.24.4:b%!(I%+| 00003fd0 33 32 29 3d 63 25 21 28 49 25 2b 32 38 29 3a ed |32)=c%!(I%+28):.| 00003fe0 49 25 3a 62 25 21 36 30 3d 2d 31 3a c8 99 22 57 |I%:b%!60=-1:.."W| 00003ff0 69 6d 70 5f 53 65 6e 64 4d 65 73 73 61 67 65 22 |imp_SendMessage"| 00004000 2c 31 37 2c 62 25 2c 63 25 21 31 32 3a 73 25 3d |,17,b%,c%!12:s%=| 00004010 b9 0d 2c 7e 05 cb 0d 2c 7e 05 e1 0d 2c 88 04 0d |..,~...,~...,...| 00004020 2c 9c 22 dd f2 76 28 6c 25 2c 66 25 2c 68 25 2c |,."..v(l%,f%,h%,| 00004030 6d 62 25 2c 78 25 2c 79 25 29 3a e7 66 25 3e 30 |mb%,x%,y%):.f%>0| 00004040 8c 0d 2c a6 46 21 71 25 3d 66 25 3a c8 99 22 57 |..,.F!q%=f%:.."W| 00004050 69 6d 70 5f 47 65 74 57 69 6e 64 6f 77 53 74 61 |imp_GetWindowSta| 00004060 74 65 22 2c 2c 71 25 3a e7 28 28 71 25 21 33 32 |te",,q%:.((q%!32| 00004070 29 80 28 31 3c 3c 33 31 29 29 3c 3e 30 8c 76 25 |).(1<<31))<>0.v%| 00004080 3d b9 8b 76 25 3d a3 0d 2c c4 6b 6e 62 25 3d 28 |=..v%=..,.knb%=(| 00004090 76 25 80 28 71 25 21 33 32 80 28 31 3c 3c 33 30 |v%.(q%!32.(1<<30| 000040a0 29 29 3c 3e 30 29 84 28 ac 76 25 80 28 71 25 21 |))<>0).(.v%.(q%!| 000040b0 33 32 80 28 31 3c 3c 33 29 29 3c 3e 30 29 3a 6f |32.(1<<3))<>0):o| 000040c0 62 25 3d 28 76 25 80 28 71 25 21 33 32 80 28 31 |b%=(v%.(q%!32.(1| 000040d0 3c 3c 32 38 29 29 3c 3e 30 29 84 28 ac 76 25 80 |<<28))<>0).(.v%.| 000040e0 28 71 25 21 33 32 80 28 31 3c 3c 32 29 29 3c 3e |(q%!32.(1<<2))<>| 000040f0 30 29 0d 2c e2 11 cc 3a 6e 62 25 3d a3 3a 6f 62 |0).,...:nb%=.:ob| 00004100 25 3d a3 0d 2c f6 05 cd 0d 2c f6 0c e7 6d 62 25 |%=..,....,...mb%| 00004110 3d 2d 31 8c 0d 2d 00 13 e7 28 28 63 25 21 32 38 |=-1..-...((c%!28| 00004120 29 80 36 29 3d 30 8c 0d 2d 0a 13 e7 28 28 63 25 |).6)=0..-...((c%| 00004130 21 32 38 29 80 38 29 3d 38 8c 0d 2d 14 13 e7 28 |!28).8)=8..-...(| 00004140 28 63 25 21 32 38 29 80 31 29 3d 30 8c 0d 2d 1e |(c%!28).1)=0..-.| 00004150 12 c8 97 b8 63 25 21 33 32 2c 63 25 21 33 36 0d |....c%!32,c%!36.| 00004160 2d 32 30 cc 3a c8 97 46 61 25 2c 47 61 25 2c 48 |-20.:..Fa%,Ga%,H| 00004170 61 25 3a c8 97 b8 46 61 25 2b 63 25 21 33 32 2c |a%:...Fa%+c%!32,| 00004180 47 61 25 2b 63 25 21 33 36 3a 67 61 25 3d b9 0d |Ga%+c%!36:ga%=..| 00004190 2d 5a 05 cd 0d 2d 5a 05 cd 0d 2d 64 11 cc 3a e7 |-Z...-Z...-d..:.| 000041a0 66 25 3e 30 80 6c 25 3e 30 8c 0d 2d 78 36 21 71 |f%>0.l%>0..-x6!q| 000041b0 25 3d 66 25 3a c8 99 22 57 69 6d 70 5f 47 65 74 |%=f%:.."Wimp_Get| 000041c0 57 69 6e 64 6f 77 53 74 61 74 65 22 2c 2c 71 25 |WindowState",,q%| 000041d0 3a e7 28 28 63 25 21 32 38 29 80 31 29 3d 30 8c |:.((c%!28).1)=0.| 000041e0 0d 2d 96 13 e7 28 28 63 25 21 32 38 29 80 32 29 |.-...((c%!28).2)| 000041f0 3d 32 8c 0d 2d a0 13 e7 28 28 63 25 21 32 38 29 |=2..-...((c%!28)| 00004200 80 38 29 3d 38 8c 0d 2d aa 4a c8 97 46 61 25 2c |.8)=8..-.J..Fa%,| 00004210 47 61 25 2c 48 61 25 3a 70 62 25 3d 28 63 25 21 |Ga%,Ha%:pb%=(c%!| 00004220 33 32 29 2d 28 71 25 21 34 29 3a 71 62 25 3d 28 |32)-(q%!4):qb%=(| 00004230 63 25 21 33 36 29 2d 28 71 25 21 38 29 3a c8 97 |c%!36)-(q%!8):..| 00004240 b8 46 61 25 2b 70 62 25 2c 47 61 25 2b 71 62 25 |.Fa%+pb%,Ga%+qb%| 00004250 0d 2d dc 05 cd 0d 2d dc 31 71 25 21 34 3d 63 25 |.-....-.1q%!4=c%| 00004260 21 33 32 3a 71 25 21 38 3d 63 25 21 33 36 3a 71 |!32:q%!8=c%!36:q| 00004270 25 21 31 32 3d 63 25 21 34 30 3a 71 25 21 31 36 |%!12=c%!40:q%!16| 00004280 3d 63 25 21 34 34 0d 2e 0e 23 cc 3a e7 28 28 63 |=c%!44...#.:.((c| 00004290 25 21 32 38 29 80 38 29 3d 38 8c c8 97 b8 63 25 |%!28).8)=8....c%| 000042a0 21 33 32 2c 63 25 21 33 36 0d 2e 18 05 cd 0d 2e |!32,c%!36.......| 000042b0 22 13 e7 28 28 63 25 21 32 38 29 80 34 29 3d 34 |"..((c%!28).4)=4| 000042c0 8c 0d 2e 2c 14 e7 6e 62 25 8c 71 25 21 32 30 3d |...,..nb%.q%!20=| 000042d0 63 25 21 34 38 0d 2e 36 14 e7 6f 62 25 8c 71 25 |c%!48..6..ob%.q%| 000042e0 21 32 34 3d 63 25 21 35 32 0d 2e 40 05 cd 0d 2e |!24=c%!52..@....| 000042f0 4a 15 cc 3a e7 28 28 63 25 21 32 38 29 80 32 29 |J..:.((c%!28).2)| 00004300 3d 32 8c 0d 2e 5e 47 71 25 21 34 3d 71 25 21 34 |=2...^Gq%!4=q%!4| 00004310 2b 63 25 21 33 32 3a 71 25 21 38 3d 71 25 21 38 |+c%!32:q%!8=q%!8| 00004320 2b 63 25 21 33 36 3a 71 25 21 31 32 3d 71 25 21 |+c%!36:q%!12=q%!| 00004330 31 32 2b 63 25 21 34 30 3a 71 25 21 31 36 3d 71 |12+c%!40:q%!16=q| 00004340 25 21 31 36 2b 63 25 21 34 34 0d 2e 90 05 cd 0d |%!16+c%!44......| 00004350 2e 90 13 e7 28 28 63 25 21 32 38 29 80 34 29 3d |....((c%!28).4)=| 00004360 34 8c 0d 2e 9a 1a e7 6e 62 25 8c 71 25 21 32 30 |4......nb%.q%!20| 00004370 3d 71 25 21 32 30 2b 63 25 21 34 38 0d 2e a4 1a |=q%!20+c%!48....| 00004380 e7 6f 62 25 8c 71 25 21 32 34 3d 71 25 21 32 34 |.ob%.q%!24=q%!24| 00004390 2b 63 25 21 35 32 0d 2e ae 05 cd 0d 2e b8 13 e7 |+c%!52..........| 000043a0 28 28 63 25 21 32 38 29 80 38 29 3d 38 8c 0d 2e |((c%!28).8)=8...| 000043b0 c2 38 c8 97 46 61 25 2c 47 61 25 2c 48 61 25 3a |.8..Fa%,Ga%,Ha%:| 000043c0 70 62 25 3d 63 25 21 33 32 3a 71 62 25 3d 63 25 |pb%=c%!32:qb%=c%| 000043d0 21 33 36 3a c8 97 b8 46 61 25 2b 70 62 25 2c 47 |!36:...Fa%+pb%,G| 000043e0 61 25 2b 71 62 25 0d 2e f4 05 cd 0d 2e f4 09 67 |a%+qb%.........g| 000043f0 61 25 3d b9 0d 2f 08 05 cd 0d 2f 08 20 c8 99 22 |a%=../..../. .."| 00004400 57 69 6d 70 5f 53 65 6e 64 4d 65 73 73 61 67 65 |Wimp_SendMessage| 00004410 22 2c 32 2c 71 25 2c 6c 25 0d 2f 1c 05 cd 0d 2f |",2,q%,l%./..../| 00004420 1c 05 cd 0d 2f 26 08 73 25 3d b9 0d 2f 3a 0d cc |..../&.s%=../:..| 00004430 3a e7 68 25 3c 2d 31 8c 0d 2f 44 09 c8 8e 68 25 |:.h%<-1../D...h%| 00004440 ca 0d 2f 4e 5b c9 2d 32 3a 21 71 25 3d 66 25 3a |../N[.-2:!q%=f%:| 00004450 c8 99 22 57 69 6d 70 5f 47 65 74 57 69 6e 64 6f |.."Wimp_GetWindo| 00004460 77 53 74 61 74 65 22 2c 2c 71 25 3a e7 28 76 25 |wState",,q%:.(v%| 00004470 80 28 71 25 21 33 32 80 28 31 3c 3c 32 34 29 29 |.(q%!32.(1<<24))| 00004480 3c 3e 30 29 84 28 ac 76 25 80 28 71 25 21 33 32 |<>0).(.v%.(q%!32| 00004490 80 28 31 3c 3c 37 29 29 3d 30 29 8c 0d 2f 76 2e |.(1<<7))=0)../v.| 000044a0 71 25 21 32 38 3d 2d 32 3a c8 99 22 57 69 6d 70 |q%!28=-2:.."Wimp| 000044b0 5f 53 65 6e 64 4d 65 73 73 61 67 65 22 2c 32 2c |_SendMessage",2,| 000044c0 71 25 2c 6c 25 3a 73 25 3d b9 0d 2f 9e 05 cd 0d |q%,l%:s%=../....| 000044d0 2f 9e 5b c9 2d 33 3a 21 71 25 3d 66 25 3a c8 99 |/.[.-3:!q%=f%:..| 000044e0 22 57 69 6d 70 5f 47 65 74 57 69 6e 64 6f 77 53 |"Wimp_GetWindowS| 000044f0 74 61 74 65 22 2c 2c 71 25 3a e7 28 76 25 80 28 |tate",,q%:.(v%.(| 00004500 71 25 21 33 32 80 28 31 3c 3c 32 35 29 29 3c 3e |q%!32.(1<<25))<>| 00004510 30 29 84 28 ac 76 25 80 28 71 25 21 33 32 80 28 |0).(.v%.(q%!32.(| 00004520 31 3c 3c 37 29 29 3d 30 29 8c 0d 2f c6 25 c8 99 |1<<7))=0)../.%..| 00004530 22 57 69 6d 70 5f 53 65 6e 64 4d 65 73 73 61 67 |"Wimp_SendMessag| 00004540 65 22 2c 33 2c 71 25 2c 6c 25 3a 73 25 3d b9 0d |e",3,q%,l%:s%=..| 00004550 2f e4 05 cd 0d 2f e4 18 c9 2d 34 2c 2d 39 3a e7 |/..../...-4,-9:.| 00004560 28 6d 62 25 80 32 35 35 29 3d 34 8c 0d 2f f8 53 |(mb%.255)=4../.S| 00004570 21 71 25 3d 66 25 3a c8 99 22 57 69 6d 70 5f 47 |!q%=f%:.."Wimp_G| 00004580 65 74 57 69 6e 64 6f 77 53 74 61 74 65 22 2c 2c |etWindowState",,| 00004590 71 25 3a e7 28 76 25 80 28 71 25 21 33 32 80 28 |q%:.(v%.(q%!32.(| 000045a0 31 3c 3c 32 36 29 29 3c 3e 30 29 84 28 ac 76 25 |1<<26))<>0).(.v%| 000045b0 80 28 71 25 21 33 32 80 31 29 3c 3e 30 29 8c 0d |.(q%!32.1)<>0)..| 000045c0 30 16 2e 71 25 21 32 38 3d 2d 31 3a c8 99 22 57 |0..q%!28=-1:.."W| 000045d0 69 6d 70 5f 53 65 6e 64 4d 65 73 73 61 67 65 22 |imp_SendMessage"| 000045e0 2c 32 2c 71 25 2c 6c 25 3a 73 25 3d b9 0d 30 3e |,2,q%,l%:s%=..0>| 000045f0 05 cd 0d 30 3e 05 cd 0d 30 48 41 c9 2d 35 3a 21 |...0>...0HA.-5:!| 00004600 71 25 3d 66 25 3a c8 99 22 57 69 6d 70 5f 47 65 |q%=f%:.."Wimp_Ge| 00004610 74 57 69 6e 64 6f 77 53 74 61 74 65 22 2c 2c 71 |tWindowState",,q| 00004620 25 3a e7 28 28 71 25 21 33 32 29 80 28 31 3c 3c |%:.((q%!32).(1<<| 00004630 31 38 29 29 3c 3e 30 8c 0d 30 70 19 71 25 21 38 |18))<>0..0p.q%!8| 00004640 3d 71 25 21 31 36 3a 71 25 21 31 32 3d 71 25 21 |=q%!16:q%!12=q%!| 00004650 34 0d 30 8e 1b cc 3a 71 25 21 38 3d 2d 34 30 39 |4.0...:q%!8=-409| 00004660 36 3a 71 25 21 31 32 3d 34 30 39 36 0d 30 ac 05 |6:q%!12=4096.0..| 00004670 cd 0d 30 ac 30 e7 28 76 25 80 28 71 25 21 33 32 |..0.0.(v%.(q%!32| 00004680 80 28 31 3c 3c 32 37 29 29 3c 3e 30 29 84 28 ac |.(1<<27))<>0).(.| 00004690 76 25 80 28 71 25 21 33 32 80 31 29 3c 3e 30 29 |v%.(q%!32.1)<>0)| 000046a0 8c 0d 30 b6 25 c8 99 22 57 69 6d 70 5f 53 65 6e |..0.%.."Wimp_Sen| 000046b0 64 4d 65 73 73 61 67 65 22 2c 32 2c 71 25 2c 6c |dMessage",2,q%,l| 000046c0 25 3a 73 25 3d b9 0d 30 d4 05 cd 0d 30 d4 30 c9 |%:s%=..0....0.0.| 000046d0 2d 36 3a 21 71 25 3d 66 25 3a c8 99 22 57 69 6d |-6:!q%=f%:.."Wim| 000046e0 70 5f 47 65 74 57 69 6e 64 6f 77 53 74 61 74 65 |p_GetWindowState| 000046f0 22 2c 2c 71 25 3a e7 6f 62 25 8c 0d 30 fc 3c 71 |",,q%:.ob%..0.<q| 00004700 25 21 32 34 3d 28 71 25 21 32 34 29 2b 33 32 3a |%!24=(q%!24)+32:| 00004710 c8 99 22 57 69 6d 70 5f 53 65 6e 64 4d 65 73 73 |.."Wimp_SendMess| 00004720 61 67 65 22 2c 32 2c 71 25 2c 6c 25 3a 67 61 25 |age",2,q%,l%:ga%| 00004730 3d b9 3a 73 25 3d b9 0d 31 2e 05 cd 0d 31 2e 30 |=.:s%=..1....1.0| 00004740 c9 2d 38 3a 21 71 25 3d 66 25 3a c8 99 22 57 69 |.-8:!q%=f%:.."Wi| 00004750 6d 70 5f 47 65 74 57 69 6e 64 6f 77 53 74 61 74 |mp_GetWindowStat| 00004760 65 22 2c 2c 71 25 3a e7 6f 62 25 8c 0d 31 56 3c |e",,q%:.ob%..1V<| 00004770 71 25 21 32 34 3d 28 71 25 21 32 34 29 2d 33 32 |q%!24=(q%!24)-32| 00004780 3a c8 99 22 57 69 6d 70 5f 53 65 6e 64 4d 65 73 |:.."Wimp_SendMes| 00004790 73 61 67 65 22 2c 32 2c 71 25 2c 6c 25 3a 67 61 |sage",2,q%,l%:ga| 000047a0 25 3d b9 3a 73 25 3d b9 0d 31 88 05 cd 0d 31 88 |%=.:s%=..1....1.| 000047b0 31 c9 2d 31 30 3a 21 71 25 3d 66 25 3a c8 99 22 |1.-10:!q%=f%:.."| 000047c0 57 69 6d 70 5f 47 65 74 57 69 6e 64 6f 77 53 74 |Wimp_GetWindowSt| 000047d0 61 74 65 22 2c 2c 71 25 3a e7 6e 62 25 8c 0d 31 |ate",,q%:.nb%..1| 000047e0 b0 3c 71 25 21 32 30 3d 28 71 25 21 32 30 29 2d |.<q%!20=(q%!20)-| 000047f0 33 32 3a c8 99 22 57 69 6d 70 5f 53 65 6e 64 4d |32:.."Wimp_SendM| 00004800 65 73 73 61 67 65 22 2c 32 2c 71 25 2c 6c 25 3a |essage",2,q%,l%:| 00004810 67 61 25 3d b9 3a 73 25 3d b9 0d 31 e2 05 cd 0d |ga%=.:s%=..1....| 00004820 31 e2 31 c9 2d 31 32 3a 21 71 25 3d 66 25 3a c8 |1.1.-12:!q%=f%:.| 00004830 99 22 57 69 6d 70 5f 47 65 74 57 69 6e 64 6f 77 |."Wimp_GetWindow| 00004840 53 74 61 74 65 22 2c 2c 71 25 3a e7 6e 62 25 8c |State",,q%:.nb%.| 00004850 0d 32 0a 3c 71 25 21 32 30 3d 28 71 25 21 32 30 |.2.<q%!20=(q%!20| 00004860 29 2b 33 32 3a c8 99 22 57 69 6d 70 5f 53 65 6e |)+32:.."Wimp_Sen| 00004870 64 4d 65 73 73 61 67 65 22 2c 32 2c 71 25 2c 6c |dMessage",2,q%,l| 00004880 25 3a 67 61 25 3d b9 3a 73 25 3d b9 0d 32 3c 05 |%:ga%=.:s%=..2<.| 00004890 cd 0d 32 3c 05 cb 0d 32 46 14 cc 3a 72 62 25 3d |..2<...2F..:rb%=| 000048a0 2d 31 3a e7 68 25 3d 2d 31 8c 0d 32 64 3c 21 71 |-1:.h%=-1..2d<!q| 000048b0 25 3d 66 25 3a c8 99 22 57 69 6d 70 5f 47 65 74 |%=f%:.."Wimp_Get| 000048c0 57 69 6e 64 6f 77 49 6e 66 6f 22 2c 2c 71 25 3a |WindowInfo",,q%:| 000048d0 72 62 25 3d 28 71 25 21 36 34 29 3e 3e 31 32 3a |rb%=(q%!64)>>12:| 000048e0 73 62 25 3d 2d 31 0d 32 96 67 cc 3a 21 62 25 3d |sb%=-1.2.g.:!b%=| 000048f0 66 25 3a 62 25 21 34 3d 68 25 3a 62 25 21 32 34 |f%:b%!4=h%:b%!24| 00004900 3d 30 3a c8 99 22 58 57 69 6d 70 5f 47 65 74 49 |=0:.."XWimp_GetI| 00004910 63 6f 6e 53 74 61 74 65 22 2c 2c 62 25 3a e7 62 |conState",,b%:.b| 00004920 25 21 32 34 3c 3e 30 8c 72 62 25 3d 28 62 25 21 |%!24<>0.rb%=(b%!| 00004930 32 34 3e 3e 31 32 29 80 31 35 3a 73 62 25 3d 28 |24>>12).15:sb%=(| 00004940 62 25 21 32 34 3e 3e 31 36 29 80 33 31 0d 32 c8 |b%!24>>16).31.2.| 00004950 05 cd 0d 32 d2 0c e7 72 62 25 3d 2d 31 8c 0d 32 |...2...rb%=-1..2| 00004960 dc 8e f2 66 28 30 2c 22 54 68 65 20 73 70 65 63 |...f(0,"The spec| 00004970 69 66 69 63 20 77 69 6e 64 6f 77 20 68 61 73 20 |ific window has | 00004980 62 65 65 6e 20 64 65 6c 65 74 65 64 2e 20 43 68 |been deleted. Ch| 00004990 61 6e 67 65 20 74 68 65 20 6b 65 79 73 74 72 6f |ange the keystro| 000049a0 6b 65 20 74 6f 20 27 41 6e 79 20 77 69 6e 64 6f |ke to 'Any windo| 000049b0 77 27 20 6f 72 20 27 57 69 6e 64 6f 77 20 61 74 |w' or 'Window at| 000049c0 20 70 6f 69 6e 74 65 72 27 2e 20 53 65 65 20 74 | pointer'. See t| 000049d0 68 65 20 6d 61 6e 75 61 6c 20 66 6f 72 20 6d 6f |he manual for mo| 000049e0 72 65 20 68 65 6c 70 2e 22 2c 31 29 0d 32 f0 46 |re help.",1).2.F| 000049f0 cc 3a 74 62 25 3d 6d 62 25 80 32 35 35 3a 75 62 |.:tb%=mb%.255:ub| 00004a00 25 3d 6d 62 25 3e 32 35 35 3a 21 62 25 3d 78 25 |%=mb%>255:!b%=x%| 00004a10 3a 62 25 21 34 3d 79 25 3a 62 25 21 31 32 3d 66 |:b%!4=y%:b%!12=f| 00004a20 25 3a 62 25 21 31 36 3d 68 25 3a e7 74 62 25 3d |%:b%!16=h%:.tb%=| 00004a30 32 8c 0d 33 36 27 62 25 21 38 3d 32 3a c8 99 22 |2..36'b%!8=2:.."| 00004a40 57 69 6d 70 5f 53 65 6e 64 4d 65 73 73 61 67 65 |Wimp_SendMessage| 00004a50 22 2c 36 2c 62 25 2c 6c 25 0d 33 54 0c cc 3a c8 |",6,b%,l%.3T..:.| 00004a60 8e 72 62 25 ca 0d 33 5e 0c c9 30 2c 31 32 2c 31 |.rb%..3^..0,12,1| 00004a70 33 0d 33 72 48 c9 31 2c 32 2c 33 2c 34 2c 36 2c |3.3rH.1,2,3,4,6,| 00004a80 39 3a 62 25 21 38 3d 74 62 25 3a c8 99 22 57 69 |9:b%!8=tb%:.."Wi| 00004a90 6d 70 5f 53 65 6e 64 4d 65 73 73 61 67 65 22 2c |mp_SendMessage",| 00004aa0 36 2c 62 25 2c 6c 25 3a 73 25 3d b9 3a e7 72 62 |6,b%,l%:s%=.:.rb| 00004ab0 25 3d 32 8c 67 61 25 3d b9 0d 33 9a 0e c9 35 2c |%=2.ga%=..3...5,| 00004ac0 38 3a e7 75 62 25 8c 0d 33 ae 2e 62 25 21 38 3d |8:.ub%..3..b%!8=| 00004ad0 74 62 25 3a c8 99 22 57 69 6d 70 5f 53 65 6e 64 |tb%:.."Wimp_Send| 00004ae0 4d 65 73 73 61 67 65 22 2c 36 2c 62 25 2c 6c 25 |Message",6,b%,l%| 00004af0 3a 73 25 3d b9 0d 33 d6 14 cc 3a e7 74 62 25 3d |:s%=..3...:.tb%=| 00004b00 34 80 73 62 25 3c 3e 30 8c 0d 33 e0 15 f2 61 28 |4.sb%<>0..3...a(| 00004b10 66 25 2c 68 25 2c 31 3c 3c 32 31 2c b9 29 0d 33 |f%,h%,1<<21,.).3| 00004b20 f4 19 cc 3a 48 61 25 3d a4 70 28 66 25 2c 68 25 |...:Ha%=.p(f%,h%| 00004b30 2c 31 3c 3c 32 31 29 0d 34 08 05 cd 0d 34 08 05 |,1<<21).4....4..| 00004b40 cd 0d 34 12 43 c9 37 2c 31 31 3a 62 25 21 38 3d |..4.C.7,11:b%!8=| 00004b50 74 62 25 3a c8 99 22 57 69 6d 70 5f 53 65 6e 64 |tb%:.."Wimp_Send| 00004b60 4d 65 73 73 61 67 65 22 2c 36 2c 62 25 2c 6c 25 |Message",6,b%,l%| 00004b70 3a 73 25 3d b9 3a e7 74 62 25 3d 34 80 73 62 25 |:s%=.:.tb%=4.sb%| 00004b80 3c 3e 30 8c 0d 34 44 15 f2 61 28 66 25 2c 68 25 |<>0..4D..a(f%,h%| 00004b90 2c 31 3c 3c 32 31 2c b9 29 0d 34 58 19 cc 3a 48 |,1<<21,.).4X..:H| 00004ba0 61 25 3d a4 70 28 66 25 2c 68 25 2c 31 3c 3c 32 |a%=.p(f%,h%,1<<2| 00004bb0 31 29 0d 34 6c 05 cd 0d 34 6c 0d c9 31 30 3a e7 |1).4l...4l..10:.| 00004bc0 75 62 25 8c 0d 34 80 0c 62 25 21 38 3d 74 62 25 |ub%..4..b%!8=tb%| 00004bd0 0d 34 94 12 cc 3a 62 25 21 38 3d 74 62 25 2a 32 |.4...:b%!8=tb%*2| 00004be0 35 36 0d 34 a8 05 cd 0d 34 a8 25 c8 99 22 57 69 |56.4....4.%.."Wi| 00004bf0 6d 70 5f 53 65 6e 64 4d 65 73 73 61 67 65 22 2c |mp_SendMessage",| 00004c00 36 2c 62 25 2c 6c 25 3a 73 25 3d b9 0d 34 c6 64 |6,b%,l%:s%=..4.d| 00004c10 c9 31 34 3a 62 25 21 38 3d 74 62 25 3a c8 99 22 |.14:b%!8=tb%:.."| 00004c20 57 69 6d 70 5f 53 65 6e 64 4d 65 73 73 61 67 65 |Wimp_SendMessage| 00004c30 22 2c 36 2c 62 25 2c 6c 25 3a 73 25 3d b9 3a c8 |",6,b%,l%:s%=.:.| 00004c40 99 22 57 69 6d 70 5f 53 65 74 43 61 72 65 74 50 |."Wimp_SetCaretP| 00004c50 6f 73 69 74 69 6f 6e 22 2c 66 25 2c 68 25 2c 2d |osition",f%,h%,-| 00004c60 31 2c 2d 31 2c ac 28 31 3c 3c 32 35 29 2c 2d 31 |1,-1,.(1<<25),-1| 00004c70 0d 34 f8 3e c9 31 35 3a c8 99 22 57 69 6d 70 5f |.4.>.15:.."Wimp_| 00004c80 53 65 74 43 61 72 65 74 50 6f 73 69 74 69 6f 6e |SetCaretPosition| 00004c90 22 2c 66 25 2c 68 25 2c 2d 31 2c 2d 31 2c ac 28 |",f%,h%,-1,-1,.(| 00004ca0 31 3c 3c 32 35 29 2c 2d 31 3a 73 25 3d b9 0d 35 |1<<25),-1:s%=..5| 00004cb0 16 05 cb 0d 35 16 05 cd 0d 35 20 05 cd 0d 35 2a |....5....5 ...5*| 00004cc0 05 cd 0d 35 34 05 cd 0d 35 3e 05 e1 0d 35 48 04 |...54...5>...5H.| 00004cd0 0d 35 5c 1e dd f2 68 28 64 25 2c 76 62 25 29 3a |.5\...h(d%,vb%):| 00004ce0 e7 28 64 25 3f 33 80 31 32 38 29 3d 30 8c 0d 35 |.(d%?3.128)=0..5| 00004cf0 66 2b 77 62 25 3d 2d 28 28 64 25 21 34 29 3c 3e |f+wb%=-((d%!4)<>| 00004d00 2d 31 29 2d 32 2a 28 28 64 25 21 38 29 3c 3e 2d |-1)-2*((d%!8)<>-| 00004d10 31 29 3a c8 8e 77 62 25 ca 0d 35 7a 1c c9 30 3a |1):..wb%..5z..0:| 00004d20 21 61 25 28 3f 64 25 2c 28 28 64 25 3f 31 29 80 |!a%(?d%,((d%?1).| 00004d30 37 29 29 3d 30 0d 35 98 2f c9 31 3a 21 61 25 28 |7))=0.5./.1:!a%(| 00004d40 3f 64 25 2c 28 28 64 25 3f 31 29 80 37 29 29 3d |?d%,((d%?1).7))=| 00004d50 64 25 21 34 3a 21 28 38 2b 67 25 2b 64 25 21 34 |d%!4:!(8+g%+d%!4| 00004d60 29 3d 2d 31 0d 35 b6 16 c9 32 3a 21 28 34 2b 67 |)=-1.5...2:!(4+g| 00004d70 25 2b 64 25 21 38 29 3d 2d 31 0d 35 ca 2a c9 33 |%+d%!8)=-1.5.*.3| 00004d80 3a 21 28 38 2b 67 25 2b 64 25 21 34 29 3d 64 25 |:!(8+g%+d%!4)=d%| 00004d90 21 38 3a 21 28 34 2b 67 25 2b 64 25 21 38 29 3d |!8:!(4+g%+d%!8)=| 00004da0 64 25 21 34 0d 35 e8 05 cb 0d 35 e8 1b 64 25 3f |d%!4.5....5..d%?| 00004db0 33 3d 64 25 3f 33 84 31 32 38 3a e7 64 25 21 38 |3=d%?3.128:.d%!8| 00004dc0 3d 2d 31 8c 0d 35 fc 06 f2 69 0d 36 10 24 cc 3a |=-1..5...i.6.$.:| 00004dd0 e7 64 25 21 34 3d 2d 31 8c 61 25 3d 67 25 2b 64 |.d%!4=-1.a%=g%+d| 00004de0 25 21 38 8b 61 25 3d 67 25 2b 64 25 21 34 0d 36 |%!8.a%=g%+d%!4.6| 00004df0 1a 05 cd 0d 36 24 1f e7 28 61 25 3f 33 80 31 32 |....6$..(a%?3.12| 00004e00 38 29 3d 30 8c 54 25 3d 61 25 21 38 8b 54 25 3d |8)=0.T%=a%!8.T%=| 00004e10 2d 31 0d 36 2e 86 e3 49 25 3d 34 b8 6b 25 2d 34 |-1.6...I%=4.k%-4| 00004e20 88 34 3a 64 25 21 49 25 3d 2d 31 3a ed 49 25 3a |.4:d%!I%=-1:.I%:| 00004e30 64 25 3f 32 3d 32 35 35 3a c8 95 28 3f 28 67 25 |d%?2=255:..(?(g%| 00004e40 2b 48 25 2d 28 32 2a 6b 25 29 2b 33 29 80 31 32 |+H%-(2*k%)+3).12| 00004e50 38 29 3d 31 32 38 3a 21 28 67 25 2b 48 25 2d 28 |8)=128:!(g%+H%-(| 00004e60 32 2a 6b 25 29 29 3d 2d 31 3a 48 25 2d 3d 6b 25 |2*k%))=-1:H%-=k%| 00004e70 3a ce 3a e7 61 25 21 38 3d 2d 31 80 28 28 61 25 |:.:.a%!8=-1.((a%| 00004e80 3f 33 29 80 31 32 38 29 3d 30 8c 61 25 3f 33 3d |?3).128)=0.a%?3=| 00004e90 61 25 3f 33 80 ac 33 32 0d 36 88 0b e7 76 62 25 |a%?3..32.6...vb%| 00004ea0 8c f2 63 0d 36 92 05 cd 0d 36 9c 05 e1 0d 36 a6 |..c.6....6....6.| 00004eb0 04 0d 36 ba 44 dd f2 63 61 28 78 62 25 2c 6b 24 |..6.D..ca(xb%,k$| 00004ec0 29 3a f2 78 28 78 62 25 2c 6b 24 29 3a e3 64 25 |):.x(xb%,k$):.d%| 00004ed0 3d 67 25 2b 32 35 38 38 b8 67 25 2b 48 25 2d 6b |=g%+2588.g%+H%-k| 00004ee0 25 88 6b 25 3a e7 28 28 64 25 3f 33 29 80 31 32 |%.k%:.((d%?3).12| 00004ef0 38 29 3d 30 8c 0d 36 d8 30 e7 a4 61 28 64 25 2b |8)=0..6.0..a(d%+| 00004f00 35 36 29 3d 6b 24 80 28 28 64 25 3f 32 29 83 31 |56)=k$.((d%?2).1| 00004f10 36 29 3c 3e 32 80 28 28 64 25 3f 32 29 83 31 36 |6)<>2.((d%?2).16| 00004f20 29 3c 3e 33 8c 0d 36 e2 30 64 25 21 31 32 3d 78 |)<>3..6.0d%!12=x| 00004f30 62 25 3a e7 28 28 64 25 3f 32 29 81 31 36 29 3d |b%:.((d%?2).16)=| 00004f40 30 8c 64 25 21 31 36 3d a4 71 28 a4 61 28 64 25 |0.d%!16=.q(.a(d%| 00004f50 2b 37 36 29 29 0d 36 f6 22 e7 64 25 21 31 36 3d |+76)).6.".d%!16=| 00004f60 2d 32 8c 64 25 21 32 30 3d a4 72 28 a4 61 28 64 |-2.d%!20=.r(.a(d| 00004f70 25 2b 31 31 36 29 29 0d 37 00 05 cd 0d 37 0a 05 |%+116)).7....7..| 00004f80 cd 0d 37 14 09 ed 64 25 3a e1 0d 37 28 04 0d 37 |..7...d%:..7(..7| 00004f90 3c 5e dd f2 64 61 28 78 62 25 29 3a e3 64 25 3d |<^..da(xb%):.d%=| 00004fa0 67 25 2b 32 35 38 38 b8 67 25 2b 48 25 2d 6b 25 |g%+2588.g%+H%-k%| 00004fb0 88 6b 25 3a e7 28 28 64 25 3f 33 29 80 31 32 38 |.k%:.((d%?3).128| 00004fc0 29 3d 30 80 28 28 64 25 3f 32 29 83 31 36 29 3c |)=0.((d%?2).16)<| 00004fd0 3e 32 80 28 28 64 25 3f 32 29 83 31 36 29 3c 3e |>2.((d%?2).16)<>| 00004fe0 33 80 64 25 21 31 32 3d 78 62 25 8c 0d 37 50 24 |3.d%!12=xb%..7P$| 00004ff0 64 25 21 31 32 3d 2d 31 3a e7 28 28 64 25 3f 32 |d%!12=-1:.((d%?2| 00005000 29 81 31 36 29 3d 30 8c 64 25 21 31 36 3d 2d 31 |).16)=0.d%!16=-1| 00005010 0d 37 64 05 cd 0d 37 6e 30 ed 64 25 3a e3 49 25 |.7d...7n0.d%:.I%| 00005020 3d 30 b8 79 62 25 3a e7 62 25 28 49 25 29 3d 78 |=0.yb%:.b%(I%)=x| 00005030 62 25 8c 62 25 28 49 25 29 3d 30 3a 62 24 28 49 |b%.b%(I%)=0:b$(I| 00005040 25 29 3d 22 22 0d 37 8c 09 ed 49 25 3a e1 0d 37 |%)="".7...I%:..7| 00005050 a0 04 0d 37 b4 1c dd a4 62 3a 7a 62 25 3d a3 3a |...7....b:zb%=.:| 00005060 e7 28 61 25 3f 33 80 31 32 38 29 3d 30 8c 0d 37 |.(a%?3.128)=0..7| 00005070 c8 17 e7 28 28 28 61 25 3f 32 29 83 31 36 29 80 |...(((a%?2).16).| 00005080 32 29 3d 32 8c 0d 37 d2 17 e7 a4 61 28 61 25 2b |2)=2..7....a(a%+| 00005090 31 32 29 3d 22 22 8c 7a 62 25 3d b9 0d 37 dc 15 |12)="".zb%=..7..| 000050a0 cc 3a e7 28 28 61 25 3f 32 29 83 31 36 29 3d 34 |.:.((a%?2).16)=4| 000050b0 8c 0d 37 f0 19 e7 28 28 61 25 21 32 38 29 80 31 |..7...((a%!28).1| 000050c0 34 29 3d 30 8c 7a 62 25 3d b9 0d 37 fa 38 e7 28 |4)=0.zb%=..7.8.(| 000050d0 28 61 25 21 32 38 29 80 31 29 3d 31 80 61 25 21 |(a%!28).1)=1.a%!| 000050e0 33 32 3d 30 80 61 25 21 33 36 3d 30 80 61 25 21 |32=0.a%!36=0.a%!| 000050f0 34 38 3d 30 80 61 25 21 35 32 3d 30 8c 7a 62 25 |48=0.a%!52=0.zb%| 00005100 3d b9 0d 38 04 1a cc 3a e7 a4 61 28 61 25 2b 35 |=..8...:..a(a%+5| 00005110 36 29 3d 22 2d 22 8c 7a 62 25 3d b9 0d 38 18 05 |6)="-".zb%=..8..| 00005120 cd 0d 38 22 05 cd 0d 38 2c 05 cd 0d 38 36 08 3d |..8"...8,...86.=| 00005130 7a 62 25 0d 38 54 13 dd f2 62 61 3a e7 71 25 21 |zb%.8T...ba:.q%!| 00005140 32 30 3d 74 25 8c 0d 38 5e 20 61 24 3d a4 61 28 |20=t%..8^ a$=.a(| 00005150 71 25 2b 34 34 29 3a e7 28 28 61 25 3f 32 29 83 |q%+44):.((a%?2).| 00005160 31 36 29 3d 32 8c 0d 38 72 18 e7 61 24 3c 3e 22 |16)=2..8r..a$<>"| 00005170 3c 57 69 6d 70 24 53 63 72 61 70 3e 22 8c 0d 38 |<Wimp$Scrap>"..8| 00005180 7c 0c c8 8e 71 25 21 32 34 ca 0d 38 86 2c c9 38 ||...q%!24..8.,.8| 00005190 3a 24 28 61 25 2b 31 32 29 3d 22 52 75 6e 20 22 |:$(a%+12)="Run "| 000051a0 2b 61 24 3a f2 62 28 74 25 2c 31 2c a4 61 28 61 |+a$:.b(t%,1,.a(a| 000051b0 25 2b 31 32 29 29 0d 38 ae 0f c9 39 3a c8 8e 71 |%+12)).8...9:..q| 000051c0 25 21 34 30 ca 0d 38 b8 3e c9 34 30 39 36 2c 38 |%!40..8.>.4096,8| 000051d0 31 39 32 3a 24 28 61 25 2b 31 32 29 3d 22 46 69 |192:$(a%+12)="Fi| 000051e0 6c 65 72 5f 4f 70 65 6e 44 69 72 20 22 2b 61 24 |ler_OpenDir "+a$| 000051f0 3a f2 62 28 74 25 2c 31 2c a4 61 28 61 25 2b 31 |:.b(t%,1,.a(a%+1| 00005200 32 29 29 0d 38 e0 2f c9 33 35 34 38 3a 24 28 61 |2)).8./.3548:$(a| 00005210 25 2b 31 32 29 3d 22 52 75 6e 20 22 2b 61 24 3a |%+12)="Run "+a$:| 00005220 f2 62 28 74 25 2c 31 2c a4 61 28 61 25 2b 31 32 |.b(t%,1,.a(a%+12| 00005230 29 29 0d 38 fe 67 7f 3a 6f 25 3d 30 3a c8 95 a7 |)).8.g.:o%=0:...| 00005240 61 24 2c 22 2e 22 2c 6f 25 2b 31 29 3c 3e 30 3a |a$,".",o%+1)<>0:| 00005250 6f 25 3d a7 61 24 2c 22 2e 22 2c 6f 25 2b 31 29 |o%=.a$,".",o%+1)| 00005260 3a ce 3a 24 28 61 25 2b 31 32 29 3d 22 46 69 6c |:.:$(a%+12)="Fil| 00005270 65 72 5f 4f 70 65 6e 44 69 72 20 22 2b c0 61 24 |er_OpenDir "+.a$| 00005280 2c 6f 25 2d 31 29 3a f2 62 28 74 25 2c 31 2c a4 |,o%-1):.b(t%,1,.| 00005290 61 28 61 25 2b 31 32 29 29 0d 39 44 05 cb 0d 39 |a(a%+12)).9D...9| 000052a0 44 21 c9 31 30 3a e7 71 25 21 34 30 3c 3e 34 30 |D!.10:.q%!40<>40| 000052b0 39 36 80 71 25 21 34 30 3c 3e 38 31 39 32 8c 0d |96.q%!40<>8192..| 000052c0 39 58 2a 24 28 61 25 2b 31 32 29 3d 22 4c 6f 61 |9X*$(a%+12)="Loa| 000052d0 64 20 22 2b 61 24 3a f2 62 28 74 25 2c 31 2c a4 |d "+a$:.b(t%,1,.| 000052e0 61 28 61 25 2b 31 32 29 29 0d 39 76 05 cd 0d 39 |a(a%+12)).9v...9| 000052f0 76 0c 7f 3a f2 65 28 61 24 29 0d 39 8a 05 cb 0d |v..:.e(a$).9....| 00005300 39 8a d0 f2 61 28 65 25 2c 31 33 2c 28 31 3c 3c |9...a(e%,13,(1<<| 00005310 32 32 29 2c 28 28 28 61 25 3f 33 29 80 31 32 38 |22),(((a%?3).128| 00005320 29 3e 30 29 84 a4 62 29 3a f2 61 28 65 25 2c 31 |)>0)..b):.a(e%,1| 00005330 38 2c 31 3c 3c 32 31 2c 6e 25 80 28 28 61 25 3f |8,1<<21,n%.((a%?| 00005340 33 29 80 31 32 38 29 3d 30 29 3a f2 61 28 65 25 |3).128)=0):.a(e%| 00005350 2c 31 38 2c 31 3c 3c 32 32 2c 28 28 28 61 25 3f |,18,1<<22,(((a%?| 00005360 33 29 80 31 32 38 29 3e 30 29 84 a4 62 29 3a f2 |3).128)>0)..b):.| 00005370 61 28 65 25 2c 32 30 2c 31 3c 3c 32 31 2c 28 28 |a(e%,20,1<<21,((| 00005380 61 25 3f 33 29 80 31 36 30 29 3d 33 32 29 3a f2 |a%?3).160)=32):.| 00005390 61 28 65 25 2c 32 30 2c 31 3c 3c 32 32 2c 54 25 |a(e%,20,1<<22,T%| 000053a0 3d 2d 31 84 6e 25 84 a4 62 29 3a e7 28 28 28 61 |=-1.n%..b):.(((a| 000053b0 25 3f 33 29 80 31 32 38 29 3e 30 29 84 a4 62 84 |%?3).128)>0)..b.| 000053c0 6e 25 8c 4b 61 25 3d 30 8b 4b 61 25 3d 31 35 0d |n%.Ka%=0.Ka%=15.| 000053d0 39 c6 11 f2 6c 28 65 25 2c 31 34 2c 4b 61 25 29 |9...l(e%,14,Ka%)| 000053e0 0d 39 da 05 cd 0d 39 da 72 cc 3a 66 24 3d a4 63 |.9....9.r.:f$=.c| 000053f0 28 74 25 2c 31 29 3a 41 62 25 3d 31 31 35 2d a9 |(t%,1):Ab%=115-.| 00005400 28 66 24 29 3a c8 99 22 4f 53 5f 46 69 6c 65 22 |(f$):.."OS_File"| 00005410 2c 35 2c 61 24 b8 42 62 25 2c 2c 43 62 25 3a 44 |,5,a$.Bb%,,Cb%:D| 00005420 62 25 3d 28 43 62 25 80 26 46 46 46 30 30 29 3e |b%=(Cb%.&FFF00)>| 00005430 3e 38 3a e7 42 62 25 3d 31 80 28 44 62 25 3d 34 |>8:.Bb%=1.(Db%=4| 00005440 30 39 35 84 44 62 25 3d 34 30 39 34 84 44 62 25 |095.Db%=4094.Db%| 00005450 3d 34 30 37 35 29 8c 0d 3a 16 2e c8 99 22 4f 53 |=4075)..:...."OS| 00005460 5f 46 69 6e 64 22 2c 36 34 2c 61 24 b8 45 62 25 |_Find",64,a$.Eb%| 00005470 3a e7 a2 23 45 62 25 3c 41 62 25 8c 41 62 25 3d |:..#Eb%<Ab%.Ab%=| 00005480 a2 23 45 62 25 0d 3a 2a 2f 6f 25 3d 62 25 3a c8 |.#Eb%.:*/o%=b%:.| 00005490 95 41 62 25 3e 30 3a c8 99 22 4f 53 5f 42 47 65 |.Ab%>0:.."OS_BGe| 000054a0 74 22 2c 2c 45 62 25 b8 46 62 25 3a e7 46 62 25 |t",,Eb%.Fb%:.Fb%| 000054b0 3c 33 32 8c 0d 3a 52 12 e7 46 62 25 3d 31 30 8c |<32..:R..Fb%=10.| 000054c0 46 62 25 3d 31 33 0d 3a 5c 33 3f 6f 25 3d 97 28 |Fb%=13.:\3?o%=.(| 000054d0 22 7c 22 29 3a 6f 25 2b 3d 31 3a 41 62 25 2d 3d |"|"):o%+=1:Ab%-=| 000054e0 31 3a 3f 6f 25 3d 46 62 25 2b 36 34 3a 6f 25 2b |1:?o%=Fb%+64:o%+| 000054f0 3d 31 3a 41 62 25 2d 3d 31 0d 3a 7a 1a cc 3a 3f |=1:Ab%-=1.:z..:?| 00005500 6f 25 3d 46 62 25 3a 6f 25 2b 3d 31 3a 41 62 25 |o%=Fb%:o%+=1:Ab%| 00005510 2d 3d 31 0d 3a 98 05 cd 0d 3a 98 28 ce 3a c8 99 |-=1.:....:.(.:..| 00005520 22 4f 53 5f 46 69 6e 64 22 2c 30 2c 45 62 25 3a |"OS_Find",0,Eb%:| 00005530 3f 6f 25 3d 30 3a f2 65 28 a4 61 28 62 25 29 29 |?o%=0:.e(.a(b%))| 00005540 0d 3a ca 0c cc 3a f2 65 28 61 24 29 0d 3a de 05 |.:...:.e(a$).:..| 00005550 cd 0d 3a de 05 cd 0d 3a e8 3e 71 25 21 31 32 3d |..:....:.>q%!12=| 00005560 71 25 21 38 3a 71 25 21 31 36 3d 34 3a 21 71 25 |q%!8:q%!16=4:!q%| 00005570 3d 32 35 36 3a c8 99 22 57 69 6d 70 5f 53 65 6e |=256:.."Wimp_Sen| 00005580 64 4d 65 73 73 61 67 65 22 2c 31 37 2c 71 25 2c |dMessage",17,q%,| 00005590 71 25 21 34 0d 3b 1a 12 cc 3a e7 71 25 21 34 30 |q%!4.;...:.q%!40| 000055a0 3d 34 30 39 33 8c 0d 3b 24 73 61 24 3d a4 61 28 |=4093..;$sa$=.a(| 000055b0 71 25 2b 34 34 29 3a 71 25 21 31 32 3d 71 25 21 |q%+44):q%!12=q%!| 000055c0 38 3a 71 25 21 31 36 3d 34 3a 21 71 25 3d 32 35 |8:q%!16=4:!q%=25| 000055d0 36 3a c8 99 22 57 69 6d 70 5f 53 65 6e 64 4d 65 |6:.."Wimp_SendMe| 000055e0 73 73 61 67 65 22 2c 31 37 2c 71 25 2c 71 25 21 |ssage",17,q%,q%!| 000055f0 34 3a f2 43 28 61 24 29 3a d4 31 2c 2d 31 35 2c |4:.C(a$):.1,-15,| 00005600 31 30 30 2c 35 3a e7 61 24 3d 22 3c 57 69 6d 70 |100,5:.a$="<Wimp| 00005610 24 53 63 72 61 70 3e 22 8c 0d 3b 74 20 c8 99 22 |$Scrap>"..;t .."| 00005620 4f 53 5f 46 69 6c 65 22 2c 36 2c 22 3c 57 69 6d |OS_File",6,"<Wim| 00005630 70 24 53 63 72 61 70 3e 22 0d 3b 88 0b cc 3a 6c |p$Scrap>".;...:l| 00005640 24 3d 61 24 0d 3b 9c 05 cd 0d 3b 9c 05 cd 0d 3b |$=a$.;....;....;| 00005650 a6 05 cd 0d 3b b0 05 e1 0d 3b ba 04 0d 3b ce 38 |....;....;...;.8| 00005660 dd f2 6e 28 47 62 25 2c 48 62 25 29 3a c8 99 22 |..n(Gb%,Hb%):.."| 00005670 57 69 6d 70 5f 47 65 74 50 6f 69 6e 74 65 72 49 |Wimp_GetPointerI| 00005680 6e 66 6f 22 2c 2c 71 25 3a e7 71 25 21 31 32 3c |nfo",,q%:.q%!12<| 00005690 3e 41 25 8c 0d 3b e2 89 71 25 21 32 30 3d 71 25 |>A%..;..q%!20=q%| 000056a0 21 31 32 3a 71 25 21 32 34 3d 71 25 21 31 36 3a |!12:q%!24=q%!16:| 000056b0 71 25 21 32 38 3d 21 71 25 3a 71 25 21 33 32 3d |q%!28=!q%:q%!32=| 000056c0 71 25 21 34 3a 71 25 21 33 36 3d 47 62 25 3a 71 |q%!4:q%!36=Gb%:q| 000056d0 25 21 34 30 3d 48 62 25 3a 65 24 3d a4 63 28 41 |%!40=Hb%:e$=.c(A| 000056e0 25 2c 31 29 3a c8 95 a7 65 24 2c 22 2e 22 29 3e |%,1):...e$,".")>| 000056f0 30 3a 65 24 3d c2 65 24 2c a9 28 65 24 29 2d a7 |0:e$=.e$,.(e$)-.| 00005700 65 24 2c 22 2e 22 29 29 3a ce 3a e7 a9 28 65 24 |e$,".")):.:..(e$| 00005710 29 3e 30 80 a9 28 65 24 29 3c 31 31 8c 0d 3c 50 |)>0..(e$)<11..<P| 00005720 4e 24 28 71 25 2b 34 34 29 3d 65 24 3a 71 25 21 |N$(q%+44)=e$:q%!| 00005730 31 32 3d 30 3a 21 71 25 3d 32 35 36 3a 71 25 21 |12=0:!q%=256:q%!| 00005740 31 36 3d 31 3a c8 99 22 57 69 6d 70 5f 53 65 6e |16=1:.."Wimp_Sen| 00005750 64 4d 65 73 73 61 67 65 22 2c 31 38 2c 71 25 2c |dMessage",18,q%,| 00005760 71 25 21 32 30 2c 71 25 21 32 34 0d 3c 8c 3b cc |q%!20,q%!24.<.;.| 00005770 3a f2 66 28 30 2c 22 50 6c 65 61 73 65 20 65 6e |:.f(0,"Please en| 00005780 74 65 72 20 61 20 66 69 6c 65 6e 61 6d 65 20 6f |ter a filename o| 00005790 66 20 75 70 20 74 6f 20 31 30 20 6c 65 74 74 65 |f up to 10 lette| 000057a0 72 73 22 2c 31 29 0d 3c a0 05 cd 0d 3c a0 05 cd |rs",1).<....<...| 000057b0 0d 3c aa 05 e1 0d 3c b4 04 0d 3c c8 31 dd f2 4a |.<....<...<.1..J| 000057c0 28 61 24 29 3a c8 99 22 4f 53 5f 46 69 6c 65 22 |(a$):.."OS_File"| 000057d0 2c 35 2c 61 24 b8 2c 2c 2c 2c 2c 49 62 25 3a e7 |,5,a$.,,,,,Ib%:.| 000057e0 28 49 62 25 80 38 29 3d 38 8c 0d 3c dc 29 f2 66 |(Ib%.8)=8..<.).f| 000057f0 28 30 2c 22 54 68 65 20 66 69 6c 65 20 27 22 2b |(0,"The file '"+| 00005800 61 24 2b 22 27 20 69 73 20 6c 6f 63 6b 65 64 22 |a$+"' is locked"| 00005810 2c 31 29 0d 3c f0 a7 cc 3a c8 99 22 4f 53 5f 46 |,1).<...:.."OS_F| 00005820 69 6e 64 22 2c 31 32 38 2c 61 24 b8 4a 62 25 3a |ind",128,a$.Jb%:| 00005830 f2 72 28 22 21 4b 65 79 73 44 65 6d 6f 20 56 32 |.r("!KeysDemo V2| 00005840 2e 30 30 2c 20 44 65 6d 6f 6e 73 74 72 61 74 69 |.00, Demonstrati| 00005850 6f 6e 20 76 65 72 73 69 6f 6e 20 42 65 74 61 22 |on version Beta"| 00005860 2c 4a 62 25 29 3a f2 72 28 22 4c 69 73 74 20 6f |,Jb%):.r("List o| 00005870 66 20 6b 65 79 73 74 72 6f 6b 65 73 22 2c 4a 62 |f keystrokes",Jb| 00005880 25 29 3a c8 99 22 4f 53 5f 42 50 75 74 22 2c 31 |%):.."OS_BPut",1| 00005890 30 2c 4a 62 25 3a e3 4b 62 25 3d 30 b8 37 3a e3 |0,Jb%:.Kb%=0.7:.| 000058a0 4c 62 25 3d 30 b8 39 36 3a e7 61 25 28 4c 62 25 |Lb%=0.96:.a%(Lb%| 000058b0 2c 4b 62 25 29 3c 3e 2d 31 8c 0d 3d 36 15 e7 21 |,Kb%)<>-1..=6..!| 000058c0 61 25 28 4c 62 25 2c 4b 62 25 29 3c 3e 30 8c 0d |a%(Lb%,Kb%)<>0..| 000058d0 3d 40 41 58 25 3d 61 25 28 4c 62 25 2c 4b 62 25 |=@AX%=a%(Lb%,Kb%| 000058e0 29 2d 34 3a 46 24 3d 22 22 3a f5 3a 58 25 3d 67 |)-4:F$="":.:X%=g| 000058f0 25 2b 58 25 21 34 3a 63 24 3d 22 22 3a e7 28 4b |%+X%!4:c$="":.(K| 00005900 62 25 80 34 29 8c 63 24 2b 3d 22 41 6c 74 2b 22 |b%.4).c$+="Alt+"| 00005910 0d 3d 7c 18 e7 28 4b 62 25 80 32 29 8c 63 24 2b |.=|..(Kb%.2).c$+| 00005920 3d 22 43 74 72 6c 2b 22 0d 3d 86 19 e7 28 4b 62 |="Ctrl+".=...(Kb| 00005930 25 80 31 29 8c 63 24 2b 3d 22 53 68 69 66 74 2b |%.1).c$+="Shift+| 00005940 22 0d 3d 90 49 63 24 2b 3d 61 24 28 4c 62 25 29 |".=.Ic$+=a$(Lb%)| 00005950 2b 22 3a 20 22 3a 63 24 2b 3d a4 61 28 58 25 2b |+": ":c$+=.a(X%+| 00005960 31 32 38 29 3a e7 ac 28 28 28 58 25 3f 32 29 83 |128):..(((X%?2).| 00005970 31 36 29 3d 30 80 58 25 21 32 30 3c 30 80 28 58 |16)=0.X%!20<0.(X| 00005980 25 3f 33 80 38 29 3d 30 29 8c 0d 3d ae 28 e7 28 |%?3.8)=0)..=.(.(| 00005990 28 58 25 3f 32 29 80 32 29 3d 30 8c 63 24 2b 3d |(X%?2).2)=0.c$+=| 000059a0 22 20 28 22 2b a4 61 28 58 25 2b 35 36 29 2b 22 |" ("+.a(X%+56)+"| 000059b0 29 22 0d 3d b8 05 cd 0d 3d c2 1b e7 28 58 25 3f |)".=....=...(X%?| 000059c0 33 80 33 32 29 3d 30 8c f2 72 28 63 24 2c 4a 62 |3.32)=0..r(c$,Jb| 000059d0 25 29 0d 3d cc 0c fd 58 25 21 34 3d 2d 31 0d 3d |%).=...X%!4=-1.=| 000059e0 e0 05 cd 0d 3d e0 05 cd 0d 3d ea 36 ed 4c 62 25 |....=....=.6.Lb%| 000059f0 3a ed 4b 62 25 3a c8 99 22 4f 53 5f 46 69 6e 64 |:.Kb%:.."OS_Find| 00005a00 22 2c 30 2c 4a 62 25 3a c8 99 22 4f 53 5f 46 69 |",0,Jb%:.."OS_Fi| 00005a10 6c 65 22 2c 31 38 2c 61 24 2c 34 30 39 35 0d 3e |le",18,a$,4095.>| 00005a20 1c 05 cd 0d 3e 1c 05 e1 0d 3e 26 04 0d 3e 3a 4c |....>....>&..>:L| 00005a30 dd f2 75 28 61 24 29 3a f2 66 28 30 2c 22 53 61 |..u(a$):.f(0,"Sa| 00005a40 76 69 6e 67 20 69 73 20 6e 6f 74 20 70 6f 73 73 |ving is not poss| 00005a50 69 62 6c 65 20 6f 6e 20 74 68 69 73 20 64 65 6d |ible on this dem| 00005a60 6f 6e 73 74 72 61 74 69 6f 6e 20 76 65 72 73 69 |onstration versi| 00005a70 6f 6e 22 2c 31 29 3a e1 0d 3e 4e 04 0d 3e 62 4c |on",1):..>N..>bL| 00005a80 dd f2 43 28 61 24 29 3a f2 66 28 30 2c 22 4c 6f |..C(a$):.f(0,"Lo| 00005a90 61 64 69 6e 67 20 69 73 20 6e 6f 74 20 70 6f 73 |ading is not pos| 00005aa0 73 69 62 6c 65 20 6f 6e 20 74 68 69 73 20 64 65 |sible on this de| 00005ab0 6d 6f 73 74 72 61 74 69 6f 6e 20 76 65 72 73 69 |mostration versi| 00005ac0 6f 6e 22 2c 31 29 3a e1 0d 3e 76 04 0d 3e 8a 5a |on",1):..>v..>.Z| 00005ad0 dd f2 67 61 3a e3 4d 62 25 3d 30 b8 36 33 3a 71 |..ga:.Mb%=0.63:q| 00005ae0 25 21 31 32 3d 30 3a c8 99 22 58 57 69 6d 70 5f |%!12=0:.."XWimp_| 00005af0 53 65 6e 64 4d 65 73 73 61 67 65 22 2c 31 39 2c |SendMessage",19,| 00005b00 71 25 2c 2d 32 2c 4d 62 25 b8 2c 2c 6c 25 3a e7 |q%,-2,Mb%.,,l%:.| 00005b10 6c 25 3c 3e 2d 32 80 6c 25 3c 3e 30 8c f2 78 28 |l%<>-2.l%<>0..x(| 00005b20 6c 25 2c 22 22 29 0d 3e a8 62 ed 4d 62 25 3a 4e |l%,"").>.b.Mb%:N| 00005b30 62 25 3d a4 6b 3a c8 95 4e 62 25 3c 3e 2d 31 3a |b%=.k:..Nb%<>-1:| 00005b40 71 25 21 31 32 3d 30 3a c8 99 22 58 57 69 6d 70 |q%!12=0:.."XWimp| 00005b50 5f 53 65 6e 64 4d 65 73 73 61 67 65 22 2c 31 39 |_SendMessage",19| 00005b60 2c 71 25 2c 4e 62 25 2c 2d 31 b8 2c 2c 6c 25 3a |,q%,Nb%,-1.,,l%:| 00005b70 e7 6c 25 3c 3e 4e 62 25 80 6c 25 3c 3e 30 8c f2 |.l%<>Nb%.l%<>0..| 00005b80 78 28 6c 25 2c 22 22 29 0d 3e da 13 4e 62 25 3d |x(l%,"").>..Nb%=| 00005b90 a4 6c 28 4e 62 25 29 3a ce 3a e1 0d 3e f8 04 0d |.l(Nb%):.:..>...| 00005ba0 3f 0c 3b dd f2 78 28 78 62 25 2c 6b 24 29 3a 4f |?.;..x(xb%,k$):O| 00005bb0 62 25 3d 2d 31 3a 50 62 25 3d 2d 31 3a e3 4a 25 |b%=-1:Pb%=-1:.J%| 00005bc0 3d 79 62 25 b8 30 88 2d 31 3a e7 62 25 28 4a 25 |=yb%.0.-1:.b%(J%| 00005bd0 29 3d 30 8c 4f 62 25 3d 4a 25 0d 3f 2a 16 e7 62 |)=0.Ob%=J%.?*..b| 00005be0 25 28 4a 25 29 3d 78 62 25 8c 50 62 25 3d 4a 25 |%(J%)=xb%.Pb%=J%| 00005bf0 0d 3f 34 10 ed 4a 25 3a e7 50 62 25 3d 2d 31 8c |.?4..J%:.Pb%=-1.| 00005c00 0d 3f 48 21 62 25 28 4f 62 25 29 3d 78 62 25 3a |.?H!b%(Ob%)=xb%:| 00005c10 e7 6b 24 3d 22 22 8c 6b 24 3d a4 6e 28 78 62 25 |.k$="".k$=.n(xb%| 00005c20 29 0d 3f 5c 0e 62 24 28 4f 62 25 29 3d 6b 24 0d |).?\.b$(Ob%)=k$.| 00005c30 3f 70 05 cd 0d 3f 70 05 e1 0d 3f 7a 04 0d 3f 8e |?p...?p...?z..?.| 00005c40 67 dd f2 49 3a 24 67 25 3d 22 4b 65 79 73 74 72 |g..I:$g%="Keystr| 00005c50 6f 6b 65 73 22 2b 7a 24 3a e3 51 62 25 3d 31 32 |okes"+z$:.Qb%=12| 00005c60 b8 32 35 38 34 88 34 3a 67 25 21 51 62 25 3d 30 |.2584.4:g%!Qb%=0| 00005c70 3a ed 51 62 25 3a e3 49 25 3d 32 35 38 38 b8 32 |:.Qb%:.I%=2588.2| 00005c80 35 38 38 2b 6b 25 2d 34 88 34 3a 67 25 21 49 25 |588+k%-4.4:g%!I%| 00005c90 3d 2d 31 3a ed 49 25 3a 48 25 3d 32 35 38 38 2b |=-1:.I%:H%=2588+| 00005ca0 6b 25 3a e1 0d 3f e8 04 0d 3f fc a6 dd f2 47 28 |k%:..?...?....G(| 00005cb0 59 25 29 3a 52 62 25 3d 70 25 3a e3 49 25 3d 30 |Y%):Rb%=p%:.I%=0| 00005cc0 b8 6b 25 2d 34 88 34 3a 70 25 21 49 25 3d 59 25 |.k%-4.4:p%!I%=Y%| 00005cd0 21 49 25 3a ed 49 25 3a 59 25 3d 67 25 2b 59 25 |!I%:.I%:Y%=g%+Y%| 00005ce0 21 34 3a 52 62 25 2b 3d 6b 25 3a c8 95 59 25 3e |!4:Rb%+=k%:..Y%>| 00005cf0 67 25 80 28 59 25 3f 33 80 33 32 29 3c 3e 30 80 |g%.(Y%?3.32)<>0.| 00005d00 52 62 25 3c 70 25 2b 6b 25 2a 31 30 3a e3 49 25 |Rb%<p%+k%*10:.I%| 00005d10 3d 30 b8 6b 25 2d 34 88 34 3a 52 62 25 21 49 25 |=0.k%-4.4:Rb%!I%| 00005d20 3d 59 25 21 49 25 3a ed 49 25 3a 59 25 3d 67 25 |=Y%!I%:.I%:Y%=g%| 00005d30 2b 59 25 21 34 3a 52 62 25 2b 3d 6b 25 3a ce 3a |+Y%!4:Rb%+=k%:.:| 00005d40 e7 52 62 25 3c 70 25 2b 6b 25 2a 31 30 8c 0d 40 |.Rb%<p%+k%*10..@| 00005d50 88 20 e3 49 25 3d 52 62 25 b8 70 25 2b 6b 25 2a |. .I%=Rb%.p%+k%*| 00005d60 39 88 6b 25 3a 21 49 25 3d 30 3a ed 49 25 0d 40 |9.k%:!I%=0:.I%.@| 00005d70 b0 05 cd 0d 40 b0 05 e1 0d 40 ba 04 0d 40 ce 42 |....@....@...@.B| 00005d80 dd f2 46 28 59 25 29 3a e3 49 25 3d 30 b8 6b 25 |..F(Y%):.I%=0.k%| 00005d90 2d 34 88 34 3a 70 25 21 49 25 3d 59 25 21 49 25 |-4.4:p%!I%=Y%!I%| 00005da0 3a ed 49 25 3a 70 25 21 6b 25 3d 30 3a 70 25 3f |:.I%:p%!k%=0:p%?| 00005db0 33 3d 28 70 25 3f 33 29 80 ac 33 32 3a e1 0d 41 |3=(p%?3)..32:..A| 00005dc0 0a 04 0d 41 1e 9e dd f2 60 28 53 62 25 29 3a 54 |...A....`(Sb%):T| 00005dd0 62 25 3d 53 62 25 21 34 3a 55 62 25 3d 28 3f 28 |b%=Sb%!4:Ub%=(?(| 00005de0 67 25 2b 54 62 25 2b 33 29 80 33 32 29 3a f2 68 |g%+Tb%+3).32):.h| 00005df0 28 53 62 25 2c a3 29 3a 53 62 25 3d 67 25 2b 54 |(Sb%,.):Sb%=g%+T| 00005e00 62 25 3a 56 62 25 3d 31 3a c8 95 54 62 25 3e 30 |b%:Vb%=1:..Tb%>0| 00005e10 80 56 62 25 3c 31 30 80 55 62 25 3c 3e 30 3a 54 |.Vb%<10.Ub%<>0:T| 00005e20 62 25 3d 53 62 25 21 34 3a 55 62 25 3d 28 3f 28 |b%=Sb%!4:Ub%=(?(| 00005e30 67 25 2b 54 62 25 2b 33 29 80 33 32 29 3a f2 68 |g%+Tb%+3).32):.h| 00005e40 28 53 62 25 2c a3 29 3a 53 62 25 3d 67 25 2b 54 |(Sb%,.):Sb%=g%+T| 00005e50 62 25 3a 56 62 25 2b 3d 31 3a ce 3a f2 63 3a e1 |b%:Vb%+=1:.:.c:.| 00005e60 0d 41 aa 04 0d 41 be 1a dd f2 4e 28 64 25 29 3a |.A...A....N(d%):| 00005e70 6b 62 25 3d b9 3a e7 64 25 3c 3e 2d 31 8c 0d 41 |kb%=.:.d%<>-1..A| 00005e80 d2 24 e7 28 64 25 3f 33 80 36 34 29 3c 3e 30 80 |.$.(d%?3.64)<>0.| 00005e90 28 64 25 3f 33 80 31 32 38 29 3d 30 8c 6b 62 25 |(d%?3.128)=0.kb%| 00005ea0 3d a3 0d 41 dc 05 cd 0d 41 e6 09 e7 6b 62 25 8c |=..A....A...kb%.| 00005eb0 0d 41 f0 2b 57 62 25 3d 61 25 3a 61 25 3d 64 25 |.A.+Wb%=a%:a%=d%| 00005ec0 3a 54 61 25 3d b9 3a f2 44 28 42 25 2c 72 25 2c |:Ta%=.:.D(B%,r%,| 00005ed0 70 25 3f 32 29 3a e7 54 61 25 8c 0d 42 22 3c 61 |p%?2):.Ta%..B"<a| 00005ee0 25 3d 57 62 25 3a 64 25 3f 33 3d 70 25 3f 33 3a |%=Wb%:d%?3=p%?3:| 00005ef0 64 25 3f 32 3d 70 25 3f 32 3a e3 49 25 3d 31 32 |d%?2=p%?2:.I%=12| 00005f00 b8 6b 25 2d 34 88 34 3a 64 25 21 49 25 3d 70 25 |.k%-4.4:d%!I%=p%| 00005f10 21 49 25 3a ed 49 25 0d 42 68 05 cd 0d 42 68 28 |!I%:.I%.Bh...Bh(| 00005f20 cc 3a f2 66 28 30 2c 22 54 68 69 73 20 6b 65 79 |.:.f(0,"This key| 00005f30 73 74 72 6f 6b 65 20 69 73 20 6c 6f 63 6b 65 64 |stroke is locked| 00005f40 22 2c 31 29 0d 42 86 05 cd 0d 42 86 05 e1 0d 42 |",1).B....B....B| 00005f50 90 04 0d 42 a4 52 dd f2 48 28 64 25 29 3a 58 62 |...B.R..H(d%):Xb| 00005f60 25 3d 6b 25 3a c8 95 21 28 58 62 25 2b 70 25 2b |%=k%:..!(Xb%+p%+| 00005f70 34 29 3c 3e 2d 31 80 58 62 25 3c 28 6b 25 2a 31 |4)<>-1.Xb%<(k%*1| 00005f80 30 29 3a 58 62 25 2b 3d 6b 25 3a ce 3a e7 28 67 |0):Xb%+=k%:.:.(g| 00005f90 25 2b 48 25 2b 58 62 25 2b 6b 25 29 3e 67 25 2b |%+H%+Xb%+k%)>g%+| 00005fa0 53 61 25 8c 0d 42 d6 2a f2 66 28 30 2c 22 53 6f |Sa%..B.*.f(0,"So| 00005fb0 72 72 79 2c 20 49 20 68 61 76 65 20 6e 6f 20 6d |rry, I have no m| 00005fc0 6f 72 65 20 6d 65 6d 6f 72 79 22 2c 31 29 0d 42 |ore memory",1).B| 00005fd0 ea 3d cc 3a f2 4e 28 64 25 29 3a 59 62 25 3d 64 |.=.:.N(d%):Yb%=d| 00005fe0 25 3a 5a 62 25 3d 70 25 3a 70 25 2b 3d 6b 25 3a |%:Zb%=p%:p%+=k%:| 00005ff0 e7 64 25 21 34 3d 2d 31 8c 5f 62 25 3d a4 66 8b |.d%!4=-1._b%=.f.| 00006000 5f 62 25 3d 67 25 2b 64 25 21 34 0d 43 1c 45 c8 |_b%=g%+d%!4.C.E.| 00006010 95 70 25 3c 5a 62 25 2b 6b 25 2a 31 30 80 28 70 |.p%<Zb%+k%*10.(p| 00006020 25 3f 33 80 33 32 29 3c 3e 30 3a e7 28 5f 62 25 |%?3.32)<>0:.(_b%| 00006030 3f 33 80 31 32 38 29 3d 30 8c f2 79 28 5f 62 25 |?3.128)=0..y(_b%| 00006040 29 8b f2 4e 28 5f 62 25 29 3a 5f 62 25 3d a4 66 |)..N(_b%):_b%=.f| 00006050 0d 43 30 31 70 25 2b 3d 6b 25 3a ce 3a 70 25 3d |.C01p%+=k%:.:p%=| 00006060 5a 62 25 3a 61 25 3d 59 62 25 3a e7 61 25 21 38 |Zb%:a%=Yb%:.a%!8| 00006070 3d 2d 31 8c 61 25 3f 33 3d 61 25 3f 33 80 ac 33 |=-1.a%?3=a%?3..3| 00006080 32 0d 43 62 05 cd 0d 43 6c 05 e1 0d 43 76 04 0d |2.Cb...Cl...Cv..| 00006090 43 8a 18 dd f2 6d 28 67 24 29 3a e7 a7 67 24 2c |C....m(g$):..g$,| 000060a0 22 2e 22 29 3d 30 8c 0d 43 94 3b f2 66 28 30 2c |".")=0..C.;.f(0,| 000060b0 22 54 6f 20 73 61 76 65 2c 20 64 72 61 67 20 74 |"To save, drag t| 000060c0 68 65 20 66 69 6c 65 20 74 6f 20 61 20 64 69 72 |he file to a dir| 000060d0 65 63 74 6f 72 79 20 64 69 73 70 6c 61 79 22 2c |ectory display",| 000060e0 31 29 0d 43 a8 0b cc 3a c8 8e 55 25 ca 0d 43 b2 |1).C...:..U%..C.| 000060f0 13 c9 31 3a f2 75 28 67 24 29 3a 6c 24 3d 67 24 |..1:.u(g$):l$=g$| 00006100 0d 43 c6 13 c9 32 3a f2 4a 28 67 24 29 3a 6f 24 |.C...2:.J(g$):o$| 00006110 3d 67 24 0d 43 d0 13 c9 34 3a f2 4b 28 67 24 29 |=g$.C...4:.K(g$)| 00006120 3a 75 24 3d 67 24 0d 43 da 05 cb 0d 43 da 1b c8 |:u$=g$.C....C...| 00006130 99 22 57 69 6d 70 5f 43 72 65 61 74 65 4d 65 6e |."Wimp_CreateMen| 00006140 75 22 2c 2c 2d 31 0d 43 ee 05 cd 0d 43 ee 05 e1 |u",,-1.C....C...| 00006150 0d 43 f8 04 0d 44 0c 76 dd f2 61 61 28 61 24 29 |.C...D.v..aa(a$)| 00006160 3a c8 99 22 4f 53 5f 46 69 6e 64 22 2c 31 32 38 |:.."OS_Find",128| 00006170 2c 61 24 b8 60 62 25 3a f2 72 28 22 53 65 74 20 |,a$.`b%:.r("Set | 00006180 4b 65 79 73 74 72 6f 6b 65 24 44 6f 30 20 22 2b |Keystroke$Do0 "+| 00006190 a4 61 28 61 25 2b 31 32 38 29 2c 60 62 25 29 3a |.a(a%+128),`b%):| 000061a0 c8 99 22 4f 53 5f 46 69 6e 64 22 2c 30 2c 60 62 |.."OS_Find",0,`b| 000061b0 25 3a c8 99 22 4f 53 5f 46 69 6c 65 22 2c 31 38 |%:.."OS_File",18| 000061c0 2c 61 24 2c 34 30 37 35 3a e1 0d 44 3e 04 0d 44 |,a$,4075:..D>..D| 000061d0 52 1e dd f2 79 28 61 63 25 29 3a e7 48 25 2b 67 |R...y(ac%):.H%+g| 000061e0 25 2b 6b 25 3e 67 25 2b 53 61 25 8c 0d 44 5c 2a |%+k%>g%+Sa%..D\*| 000061f0 f2 66 28 30 2c 22 53 6f 72 72 79 2c 20 49 20 68 |.f(0,"Sorry, I h| 00006200 61 76 65 20 6e 6f 20 6d 6f 72 65 20 6d 65 6d 6f |ave no more memo| 00006210 72 79 22 2c 31 29 0d 44 70 8c cc 3a 54 62 25 3d |ry",1).Dp..:Tb%=| 00006220 61 63 25 2d 67 25 3a 62 63 25 3d 61 63 25 21 38 |ac%-g%:bc%=ac%!8| 00006230 3a 64 25 3d a4 66 3a 3f 64 25 3d 42 25 3a 64 25 |:d%=.f:?d%=B%:d%| 00006240 3f 31 3d 28 64 25 3f 31 80 32 34 38 29 2b 72 25 |?1=(d%?1.248)+r%| 00006250 3a 64 25 3f 32 3d 70 25 3f 32 3a 64 25 3f 33 3d |:d%?2=p%?2:d%?3=| 00006260 70 25 3f 33 3a 64 25 21 34 3d 54 62 25 3a 64 25 |p%?3:d%!4=Tb%:d%| 00006270 21 38 3d 62 63 25 3a e3 49 25 3d 31 32 b8 6b 25 |!8=bc%:.I%=12.k%| 00006280 2d 34 88 34 3a 64 25 21 49 25 3d 70 25 21 49 25 |-4.4:d%!I%=p%!I%| 00006290 3a ed 49 25 3a e7 64 25 2b 6b 25 3d 67 25 2b 48 |:.I%:.d%+k%=g%+H| 000062a0 25 8c 0d 44 f2 2b 48 25 2b 3d 6b 25 3a e3 49 25 |%..D.+H%+=k%:.I%| 000062b0 3d 64 25 2b 6b 25 b8 64 25 2b 28 6b 25 2a 32 29 |=d%+k%.d%+(k%*2)| 000062c0 2d 34 3a 21 49 25 3d 2d 31 3a ed 49 25 0d 45 24 |-4:!I%=-1:.I%.E$| 000062d0 05 cd 0d 45 24 20 e7 64 25 21 34 3c 3e 2d 31 8c |...E$ .d%!4<>-1.| 000062e0 21 28 38 2b 67 25 2b 64 25 21 34 29 3d 64 25 2d |!(8+g%+d%!4)=d%-| 000062f0 67 25 0d 45 2e 0e e7 64 25 21 38 3c 3e 2d 31 8c |g%.E...d%!8<>-1.| 00006300 0d 45 38 16 21 28 34 2b 67 25 2b 64 25 21 38 29 |.E8.!(4+g%+d%!8)| 00006310 3d 64 25 2d 67 25 0d 45 4c 16 cc 3a 21 61 25 28 |=d%-g%.EL..:!a%(| 00006320 42 25 2c 72 25 29 3d 64 25 2d 67 25 0d 45 60 05 |B%,r%)=d%-g%.E`.| 00006330 cd 0d 45 60 09 61 25 3d 64 25 0d 45 74 05 cd 0d |..E`.a%=d%.Et...| 00006340 45 74 05 e1 0d 45 7e 04 0d 45 92 79 dd f2 5f 28 |Et...E~..E.y.._(| 00006350 64 25 29 3a f2 79 28 64 25 29 3a 59 62 25 3d 64 |d%):.y(d%):Yb%=d| 00006360 25 3a 5a 62 25 3d 70 25 3a 70 25 2b 3d 6b 25 3a |%:Zb%=p%:p%+=k%:| 00006370 64 25 3d 67 25 2b 64 25 21 34 3a c8 95 70 25 3c |d%=g%+d%!4:..p%<| 00006380 5a 62 25 2b 6b 25 2a 31 30 80 28 70 25 3f 33 80 |Zb%+k%*10.(p%?3.| 00006390 33 32 29 3c 3e 30 3a f2 79 28 64 25 29 3a 70 25 |32)<>0:.y(d%):p%| 000063a0 2b 3d 6b 25 3a 64 25 3d 67 25 2b 64 25 21 34 3a |+=k%:d%=g%+d%!4:| 000063b0 ce 3a 61 25 3d 59 62 25 3a 70 25 3d 5a 62 25 3a |.:a%=Yb%:p%=Zb%:| 000063c0 e1 0d 46 14 04 0d 46 28 4c dd f2 4b 28 61 24 29 |..F...F(L..K(a$)| 000063d0 3a f2 66 28 30 2c 22 53 61 76 69 6e 67 20 69 73 |:.f(0,"Saving is| 000063e0 20 6e 6f 74 20 70 6f 73 73 69 62 6c 65 20 6f 6e | not possible on| 000063f0 20 74 68 69 73 20 64 65 6d 6f 6e 73 74 72 61 74 | this demonstrat| 00006400 69 6f 6e 20 76 65 72 73 69 6f 6e 22 2c 31 29 3a |ion version",1):| 00006410 e1 0d 46 3c 04 0d 46 50 6b dd f2 74 28 63 63 25 |..F<..FPk..t(cc%| 00006420 2c 64 63 25 2c 65 63 25 29 3a c8 99 22 4f 53 5f |,dc%,ec%):.."OS_| 00006430 47 53 54 72 61 6e 73 22 2c 22 3c 4b 65 79 73 74 |GSTrans","<Keyst| 00006440 72 6f 6b 65 25 56 61 72 3e 22 2c 42 61 25 2c 38 |roke%Var>",Ba%,8| 00006450 3a c8 99 22 4f 53 5f 47 53 54 72 61 6e 73 22 2c |:.."OS_GSTrans",| 00006460 22 3c 4b 65 79 73 74 72 6f 6b 65 25 49 6e 63 3e |"<Keystroke%Inc>| 00006470 22 2c 43 61 25 2c 38 3a e7 63 63 25 3d 2d 32 8c |",Ca%,8:.cc%=-2.| 00006480 0d 46 6e 56 c8 99 22 58 4f 53 5f 52 65 61 64 56 |.FnV.."XOS_ReadV| 00006490 61 72 56 61 6c 22 2c 22 45 78 65 63 75 74 6f 72 |arVal","Executor| 000064a0 24 44 69 72 22 2c 62 25 2c 2d 31 2c 30 b8 2c 2c |$Dir",b%,-1,0.,,| 000064b0 66 63 25 3a e7 66 63 25 8c 7a 25 21 38 34 3d 26 |fc%:.fc%.z%!84=&| 000064c0 37 30 30 39 30 30 31 8b 7a 25 21 38 34 3d 26 37 |7009001.z%!84=&7| 000064d0 34 30 39 30 30 31 0d 46 82 2f e7 48 25 3e 32 35 |409001.F./.H%>25| 000064e0 38 38 2b 6b 25 8c 75 25 21 31 30 38 3d 26 37 30 |88+k%.u%!108=&70| 000064f0 30 39 30 30 31 8b 75 25 21 31 30 38 3d 26 37 34 |09001.u%!108=&74| 00006500 30 39 30 30 31 0d 46 8c 45 c8 99 22 57 69 6d 70 |09001.F.E.."Wimp| 00006510 5f 43 72 65 61 74 65 4d 65 6e 75 22 2c 2c 75 25 |_CreateMenu",,u%| 00006520 2c 28 21 71 25 29 2d 36 34 2c 33 34 30 3a 78 61 |,(!q%)-64,340:xa| 00006530 25 3d 63 63 25 3a 44 61 25 3d 28 21 71 25 29 2d |%=cc%:Da%=(!q%)-| 00006540 36 34 3a 45 61 25 3d 33 34 30 0d 46 be 18 cc 3a |64:Ea%=340.F...:| 00006550 e7 71 25 21 31 32 3d 65 25 80 71 25 21 31 36 3d |.q%!12=e%.q%!16=| 00006560 34 8c 0d 46 c8 24 24 28 61 25 2b 31 32 38 29 3d |4..F.$$(a%+128)=| 00006570 a4 63 28 65 25 2c 31 34 29 3a e7 a4 62 8c f2 68 |.c(e%,14):..b..h| 00006580 28 61 25 2c b9 29 0d 46 dc 29 42 25 3d 39 35 3a |(a%,.).F.)B%=95:| 00006590 72 25 3d 2d a6 28 2d 31 29 2d 32 2a a6 28 2d 32 |r%=-.(-1)-2*.(-2| 000065a0 29 2d 34 2a a6 28 2d 33 29 3a f2 69 3a f2 63 0d |)-4*.(-3):.i:.c.| 000065b0 47 0e 35 cc 3a e7 a4 61 28 61 25 2b 31 32 38 29 |G.5.:..a(a%+128)| 000065c0 3c 3e 22 22 8c 69 25 21 31 38 30 3d 26 37 30 30 |<>"".i%!180=&700| 000065d0 39 30 30 31 8b 69 25 21 31 38 30 3d 26 37 34 30 |9001.i%!180=&740| 000065e0 39 30 30 31 0d 47 18 4b e7 21 70 25 3d 2d 31 8c |9001.G.K.!p%=-1.| 000065f0 69 25 21 31 33 32 3d 26 37 34 30 39 30 30 31 3a |i%!132=&7409001:| 00006600 69 25 21 31 35 36 3d 26 37 34 30 39 30 30 31 8b |i%!156=&7409001.| 00006610 69 25 21 31 33 32 3d 26 37 30 30 39 30 30 31 3a |i%!132=&7009001:| 00006620 69 25 21 31 35 36 3d 26 37 30 30 39 30 30 31 0d |i%!156=&7009001.| 00006630 47 22 8b e7 28 61 25 3f 33 80 31 32 38 29 3d 30 |G"..(a%?3.128)=0| 00006640 8c 69 25 21 33 36 3d 26 37 30 30 39 30 30 31 3a |.i%!36=&7009001:| 00006650 69 25 21 36 30 3d 26 37 30 30 39 30 30 31 3a 69 |i%!60=&7009001:i| 00006660 25 21 38 34 3d 26 37 30 30 39 30 30 31 3a 69 25 |%!84=&7009001:i%| 00006670 21 31 30 38 3d 26 37 30 30 39 30 30 31 8b 69 25 |!108=&7009001.i%| 00006680 21 33 36 3d 26 37 34 30 39 30 30 31 3a 69 25 21 |!36=&7409001:i%!| 00006690 36 30 3d 26 37 34 30 39 30 30 31 3a 69 25 21 38 |60=&7409001:i%!8| 000066a0 34 3d 26 37 34 30 39 30 30 31 3a 69 25 21 31 30 |4=&7409001:i%!10| 000066b0 38 3d 26 37 34 30 39 30 30 31 0d 47 2c 51 c8 99 |8=&7409001.G,Q..| 000066c0 22 57 69 6d 70 5f 43 72 65 61 74 65 4d 65 6e 75 |"Wimp_CreateMenu| 000066d0 22 2c 2c 69 25 2c 28 21 71 25 29 2d 36 34 2c 28 |",,i%,(!q%)-64,(| 000066e0 71 25 21 34 29 2b 34 34 3a 78 61 25 3d 63 63 25 |q%!4)+44:xa%=cc%| 000066f0 3a 44 61 25 3d 28 21 71 25 29 2d 36 34 3a 45 61 |:Da%=(!q%)-64:Ea| 00006700 25 3d 28 71 25 21 34 29 2b 34 34 0d 47 5e 05 cd |%=(q%!4)+44.G^..| 00006710 0d 47 5e 05 cd 0d 47 68 05 e1 0d 47 72 04 0d 47 |.G^...Gh...Gr..G| 00006720 86 c8 dd f2 4d 3a f2 62 28 77 61 25 2c 30 2c 22 |....M:.b(wa%,0,"| 00006730 22 29 3a 21 62 25 3d 77 61 25 3a c8 99 22 57 69 |"):!b%=wa%:.."Wi| 00006740 6d 70 5f 47 65 74 57 69 6e 64 6f 77 53 74 61 74 |mp_GetWindowStat| 00006750 65 22 2c 2c 62 25 3a c8 99 22 57 69 6d 70 5f 4f |e",,b%:.."Wimp_O| 00006760 70 65 6e 57 69 6e 64 6f 77 22 2c 2c 62 25 3a c8 |penWindow",,b%:.| 00006770 99 22 57 69 6d 70 5f 47 65 74 43 61 72 65 74 50 |."Wimp_GetCaretP| 00006780 6f 73 69 74 69 6f 6e 22 2c 2c 4c 25 3a c8 99 22 |osition",,L%:.."| 00006790 57 69 6d 70 5f 53 65 74 43 61 72 65 74 50 6f 73 |Wimp_SetCaretPos| 000067a0 69 74 69 6f 6e 22 2c 77 61 25 2c 30 2c 2d 31 2c |ition",wa%,0,-1,| 000067b0 2d 31 2c ac 28 31 3c 3c 32 35 29 2c 2d 31 3a 6e |-1,.(1<<25),-1:n| 000067c0 24 3d 22 3c 4e 6f 6e 65 3e 22 3a f5 3a c8 99 22 |$="<None>":.:.."| 000067d0 57 69 6d 70 5f 50 6f 6c 6c 22 2c 36 31 34 36 2c |Wimp_Poll",6146,| 000067e0 71 25 b8 63 61 25 0d 47 e0 28 e7 63 61 25 3d 38 |q%.ca%.G.(.ca%=8| 000067f0 80 21 71 25 3d 77 61 25 80 71 25 21 32 34 3d 31 |.!q%=wa%.q%!24=1| 00006800 33 8c 6e 24 3d a4 63 28 77 61 25 2c 30 29 0d 47 |3.n$=.c(wa%,0).G| 00006810 ea 28 e7 28 63 61 25 3d 31 37 84 63 61 25 3d 31 |.(.(ca%=17.ca%=1| 00006820 38 29 80 71 25 21 31 36 3d 30 8c c8 99 22 4f 53 |8).q%!16=0..."OS| 00006830 5f 45 78 69 74 22 0d 47 f4 8b fd 6e 24 3c 3e 22 |_Exit".G...n$<>"| 00006840 3c 4e 6f 6e 65 3e 22 3a ff 28 22 53 65 74 20 4b |<None>":.("Set K| 00006850 65 79 73 74 72 6f 6b 65 24 49 6e 70 75 74 20 22 |eystroke$Input "| 00006860 2b 6e 24 29 3a c8 99 22 57 69 6d 70 5f 53 65 74 |+n$):.."Wimp_Set| 00006870 43 61 72 65 74 50 6f 73 69 74 69 6f 6e 22 2c 21 |CaretPosition",!| 00006880 4c 25 2c 4c 25 21 34 2c 4c 25 21 38 2c 4c 25 21 |L%,L%!4,L%!8,L%!| 00006890 31 32 2c 4c 25 21 31 36 2c 4c 25 21 32 30 3a 21 |12,L%!16,L%!20:!| 000068a0 62 25 3d 77 61 25 3a c8 99 22 57 69 6d 70 5f 43 |b%=wa%:.."Wimp_C| 000068b0 6c 6f 73 65 57 69 6e 64 6f 77 22 2c 2c 62 25 3a |loseWindow",,b%:| 000068c0 e1 0d 48 30 04 0d 48 44 7f dd a4 6d 3a ea 4c 25 |..H0..HD...m:.L%| 000068d0 3a c8 99 22 4f 53 5f 47 53 54 72 61 6e 73 22 2c |:.."OS_GSTrans",| 000068e0 22 3c 4b 65 79 73 74 72 6f 6b 65 25 49 6e 63 3e |"<Keystroke%Inc>| 000068f0 22 2c 71 25 2c 38 31 39 32 3a 4c 25 3d bb 28 a4 |",q%,8192:L%=.(.| 00006900 61 28 71 25 29 29 3a c8 99 22 4f 53 5f 47 53 54 |a(q%)):.."OS_GST| 00006910 72 61 6e 73 22 2c 22 3c 4b 65 79 73 74 72 6f 6b |rans","<Keystrok| 00006920 65 25 56 61 72 3e 22 2c 71 25 2c 38 31 39 32 3a |e%Var>",q%,8192:| 00006930 67 63 25 3d bb 28 a4 61 28 71 25 29 29 3a e7 4c |gc%=.(.a(q%)):.L| 00006940 25 3c 30 8c 0d 48 80 1d e7 67 63 25 2b 4c 25 3c |%<0..H...gc%+L%<| 00006950 2d 39 39 39 8c 73 24 3d 22 22 8b 73 24 3d c3 4c |-999.s$="".s$=.L| 00006960 25 0d 48 8a 23 cc 3a e7 67 63 25 2b 4c 25 3e 39 |%.H.#.:.gc%+L%>9| 00006970 39 39 39 8c 73 24 3d 22 22 8b 73 24 3d 22 2b 22 |999.s$="".s$="+"| 00006980 2b c3 4c 25 0d 48 9e 05 cd 0d 48 a8 07 3d 73 24 |+.L%.H....H..=s$| 00006990 0d 48 da 79 dd f2 66 28 68 63 25 2c 41 24 2c 69 |.H.y..f(hc%,A$,i| 000069a0 63 25 29 3a 21 62 25 3d 68 63 25 3a 24 28 62 25 |c%):!b%=hc%:$(b%| 000069b0 2b 34 29 3d 41 24 3a c8 99 22 57 69 6d 70 5f 52 |+4)=A$:.."Wimp_R| 000069c0 65 70 6f 72 74 45 72 72 6f 72 22 2c 62 25 2c 69 |eportError",b%,i| 000069d0 63 25 2c 22 4b 65 79 73 74 72 6f 6b 65 22 b8 2c |c%,"Keystroke".,| 000069e0 6a 63 25 3a e7 6a 63 25 3d 32 8c c8 99 22 57 69 |jc%:.jc%=2..."Wi| 000069f0 6d 70 5f 43 6c 6f 73 65 44 6f 77 6e 22 3a c8 99 |mp_CloseDown":..| 00006a00 22 4f 53 5f 45 78 69 74 22 0d 48 f8 0b 64 61 25 |"OS_Exit".H..da%| 00006a10 3d a3 3a e1 0d 49 0c 04 0d 49 20 50 dd a4 69 28 |=.:..I...I P..i(| 00006a20 42 24 29 3a 21 62 25 3d 30 3a 24 28 62 25 2b 34 |B$):!b%=0:$(b%+4| 00006a30 29 3d 42 24 3a c8 99 22 57 69 6d 70 5f 52 65 70 |)=B$:.."Wimp_Rep| 00006a40 6f 72 74 45 72 72 6f 72 22 2c 62 25 2c 33 2c 22 |ortError",b%,3,"| 00006a50 4b 65 79 73 74 72 6f 6b 65 22 b8 2c 6a 63 25 3a |Keystroke".,jc%:| 00006a60 3d 28 6a 63 25 3d 31 29 0d 49 52 7d dd f2 62 28 |=(jc%=1).IR}..b(| 00006a70 66 25 2c 68 25 2c 63 24 29 3a 21 62 25 3d 66 25 |f%,h%,c$):!b%=f%| 00006a80 3a 62 25 21 34 3d 68 25 3a c8 99 22 57 69 6d 70 |:b%!4=h%:.."Wimp| 00006a90 5f 47 65 74 49 63 6f 6e 53 74 61 74 65 22 2c 2c |_GetIconState",,| 00006aa0 62 25 3a 24 28 62 25 21 32 38 29 3d c0 63 24 2c |b%:$(b%!28)=.c$,| 00006ab0 28 62 25 21 33 32 29 2d 31 29 3a 62 25 21 38 3d |(b%!32)-1):b%!8=| 00006ac0 30 3a 62 25 21 31 32 3d 30 3a c8 99 22 57 69 6d |0:b%!12=0:.."Wim| 00006ad0 70 5f 53 65 74 49 63 6f 6e 53 74 61 74 65 22 2c |p_SetIconState",| 00006ae0 2c 62 25 3a e1 0d 49 a2 04 0d 49 b6 59 dd f2 61 |,b%:..I...I.Y..a| 00006af0 28 66 25 2c 68 25 2c 6b 63 25 2c 6c 63 25 29 3a |(f%,h%,kc%,lc%):| 00006b00 21 62 25 3d 66 25 3a 62 25 21 34 3d 68 25 3a 62 |!b%=f%:b%!4=h%:b| 00006b10 25 21 31 32 3d 6b 63 25 3a 62 25 21 38 3d 2d 6c |%!12=kc%:b%!8=-l| 00006b20 63 25 2a 6b 63 25 3a c8 99 22 57 69 6d 70 5f 53 |c%*kc%:.."Wimp_S| 00006b30 65 74 49 63 6f 6e 53 74 61 74 65 22 2c 2c 62 25 |etIconState",,b%| 00006b40 3a e1 0d 49 f2 04 0d 4a 06 5d dd f2 6c 28 66 25 |:..I...J.]..l(f%| 00006b50 2c 68 25 2c 6d 63 25 29 3a 21 62 25 3d 66 25 3a |,h%,mc%):!b%=f%:| 00006b60 62 25 21 34 3d 68 25 3a 62 25 21 38 3d 6d 63 25 |b%!4=h%:b%!8=mc%| 00006b70 3c 3c 31 32 3a 62 25 21 31 32 3d 36 31 34 34 30 |<<12:b%!12=61440| 00006b80 3a c8 99 22 57 69 6d 70 5f 53 65 74 49 63 6f 6e |:.."Wimp_SetIcon| 00006b90 53 74 61 74 65 22 2c 2c 62 25 3a e7 6d 63 25 3c |State",,b%:.mc%<| 00006ba0 31 34 8c 0d 4a 42 22 e7 21 43 25 3d 66 25 80 43 |14..JB".!C%=f%.C| 00006bb0 25 21 34 3d 68 25 8c 21 43 25 3d 2d 31 80 43 25 |%!4=h%.!C%=-1.C%| 00006bc0 21 34 3d 2d 31 0d 4a 4c 05 cd 0d 4a 56 05 e1 0d |!4=-1.JL...JV...| 00006bd0 4a 60 04 0d 4a 74 5a dd f2 71 28 66 25 2c 68 25 |J`..JtZ..q(f%,h%| 00006be0 2c 6e 63 25 29 3a 21 62 25 3d 66 25 3a 62 25 21 |,nc%):!b%=f%:b%!| 00006bf0 34 3d 68 25 3a 62 25 21 38 3d 6e 63 25 3c 3c 32 |4=h%:b%!8=nc%<<2| 00006c00 34 3a 62 25 21 31 32 3d 2d 31 36 37 37 37 32 31 |4:b%!12=-1677721| 00006c10 36 3a c8 99 22 57 69 6d 70 5f 53 65 74 49 63 6f |6:.."Wimp_SetIco| 00006c20 6e 53 74 61 74 65 22 2c 2c 62 25 3a e1 0d 4a b0 |nState",,b%:..J.| 00006c30 04 0d 4a c4 4a dd a4 64 28 66 25 2c 68 25 2c 6b |..J.J..d(f%,h%,k| 00006c40 63 25 29 3a 21 62 25 3d 66 25 3a 62 25 21 34 3d |c%):!b%=f%:b%!4=| 00006c50 68 25 3a c8 99 22 57 69 6d 70 5f 47 65 74 49 63 |h%:.."Wimp_GetIc| 00006c60 6f 6e 53 74 61 74 65 22 2c 2c 62 25 3a 3d 28 62 |onState",,b%:=(b| 00006c70 25 21 32 34 80 6b 63 25 29 3e 30 0d 4b 00 47 dd |%!24.kc%)>0.K.G.| 00006c80 a4 61 28 6f 25 29 3a 70 24 3d 22 22 3a c8 95 28 |.a(o%):p$="":..(| 00006c90 3f 6f 25 3e 33 31 80 3f 6f 25 3c 32 35 36 29 80 |?o%>31.?o%<256).| 00006ca0 a9 28 70 24 29 3c 32 35 35 3a 70 24 3d 70 24 2b |.(p$)<255:p$=p$+| 00006cb0 bd 3f 6f 25 3a 6f 25 3d 6f 25 2b 31 3a ce 3a 3d |.?o%:o%=o%+1:.:=| 00006cc0 70 24 0d 4b 50 78 dd a4 65 28 6c 25 2c 6f 25 29 |p$.KPx..e(l%,o%)| 00006cd0 3a c8 99 22 57 69 6d 70 5f 54 72 61 6e 73 66 65 |:.."Wimp_Transfe| 00006ce0 72 42 6c 6f 63 6b 22 2c 6c 25 2c 6f 25 2c 6f 63 |rBlock",l%,o%,oc| 00006cf0 25 2c 62 25 2c 32 35 36 3a 6f 25 3d 62 25 3a 70 |%,b%,256:o%=b%:p| 00006d00 24 3d 22 22 3a c8 95 28 3f 6f 25 3e 33 31 80 3f |$="":..(?o%>31.?| 00006d10 6f 25 3c 32 35 36 29 80 a9 28 70 24 29 3c 32 35 |o%<256)..(p$)<25| 00006d20 35 3a 70 24 3d 70 24 2b bd 3f 6f 25 3a 6f 25 3d |5:p$=p$+.?o%:o%=| 00006d30 6f 25 2b 31 3a ce 3a 3d 70 24 0d 4b b4 d1 dd f2 |o%+1:.:=p$.K....| 00006d40 6b 28 66 25 29 3a 21 71 25 3d 66 25 3a c8 99 22 |k(f%):!q%=f%:.."| 00006d50 57 69 6d 70 5f 47 65 74 57 69 6e 64 6f 77 53 74 |Wimp_GetWindowSt| 00006d60 61 74 65 22 2c 2c 71 25 3a 70 63 25 3d 70 61 25 |ate",,q%:pc%=pa%| 00006d70 2d 28 71 25 21 34 29 3a 71 63 25 3d 71 61 25 2d |-(q%!4):qc%=qa%-| 00006d80 28 71 25 21 31 36 29 2d 31 3a 71 25 21 34 3d 28 |(q%!16)-1:q%!4=(| 00006d90 71 25 21 34 29 2b 70 63 25 3a 71 25 21 38 3d 28 |q%!4)+pc%:q%!8=(| 00006da0 71 25 21 38 29 2b 71 63 25 3a 71 25 21 31 32 3d |q%!8)+qc%:q%!12=| 00006db0 28 71 25 21 31 32 29 2b 70 63 25 3a 71 25 21 31 |(q%!12)+pc%:q%!1| 00006dc0 36 3d 28 71 25 21 31 36 29 2b 71 63 25 3a 71 25 |6=(q%!16)+qc%:q%| 00006dd0 21 32 38 3d 74 61 25 3a c8 99 22 57 69 6d 70 5f |!28=ta%:.."Wimp_| 00006de0 4f 70 65 6e 57 69 6e 64 6f 77 22 2c 2c 71 25 3a |OpenWindow",,q%:| 00006df0 70 61 25 3d 71 25 21 34 3a 71 61 25 3d 71 25 21 |pa%=q%!4:qa%=q%!| 00006e00 38 3a 72 61 25 3d 21 71 25 3a e1 0d 4c 22 04 0d |8:ra%=!q%:..L"..| 00006e10 4c 36 2d dd f2 64 28 66 25 29 3a 21 62 25 3d 66 |L6-..d(f%):!b%=f| 00006e20 25 3a c8 99 22 57 69 6d 70 5f 43 6c 6f 73 65 57 |%:.."Wimp_CloseW| 00006e30 69 6e 64 6f 77 22 2c 2c 62 25 3a e1 0d 4c 54 04 |indow",,b%:..LT.| 00006e40 0d 4c 68 6a dd a4 6e 28 6c 25 29 3a 21 71 25 3d |.Lhj..n(l%):!q%=| 00006e50 32 34 3a 71 25 21 31 32 3d 30 3a 71 25 21 31 36 |24:q%!12=0:q%!16| 00006e60 3d 32 36 32 33 34 32 3a 71 25 21 32 30 3d 6c 25 |=262342:q%!20=l%| 00006e70 3a c8 99 22 57 69 6d 70 5f 53 65 6e 64 4d 65 73 |:.."Wimp_SendMes| 00006e80 73 61 67 65 22 2c 31 38 2c 71 25 2c 30 3a 6a 24 |sage",18,q%,0:j$| 00006e90 3d 22 22 3a f5 3a f2 67 28 36 31 34 37 29 3a fd |="":.:.g(6147):.| 00006ea0 6a 24 3c 3e 22 22 3a 3d 6a 24 0d 4c c2 18 dd a4 |j$<>"":=j$.L....| 00006eb0 67 28 6c 25 2c 66 25 2c 72 63 25 29 3a c8 8e 66 |g(l%,f%,rc%):..f| 00006ec0 25 ca 0d 4c cc 17 c9 2d 31 3a 64 24 3d 22 42 61 |%..L...-1:d$="Ba| 00006ed0 63 6b 67 72 6f 75 6e 64 22 0d 4c e0 15 c9 2d 32 |ckground".L...-2| 00006ee0 3a 64 24 3d 22 49 63 6f 6e 20 62 61 72 22 0d 4c |:d$="Icon bar".L| 00006ef0 ea 12 7f 3a 21 71 25 3d 66 25 3a e7 72 63 25 8c |...:!q%=f%:.rc%.| 00006f00 0d 4c fe 31 71 25 21 33 32 3d 30 3a c8 99 22 58 |.L.1q%!32=0:.."X| 00006f10 57 69 6d 70 5f 47 65 74 57 69 6e 64 6f 77 49 6e |Wimp_GetWindowIn| 00006f20 66 6f 22 2c 2c 71 25 3a e7 71 25 21 33 32 3d 30 |fo",,q%:.q%!32=0| 00006f30 8c 0d 4d 1c 14 64 24 3d 22 4e 6f 6e 65 78 69 73 |..M..d$="Nonexis| 00006f40 74 65 6e 74 22 0d 4d 30 57 cc 3a 76 25 3d 28 28 |tent".M0W.:v%=((| 00006f50 28 71 25 21 33 32 29 80 28 31 3c 3c 33 31 29 29 |(q%!32).(1<<31))| 00006f60 3c 3e 30 29 3a e7 28 76 25 80 28 71 25 21 33 32 |<>0):.(v%.(q%!32| 00006f70 80 28 31 3c 3c 32 36 29 29 3c 3e 30 29 84 28 ac |.(1<<26))<>0).(.| 00006f80 76 25 80 28 71 25 21 33 32 80 31 29 3c 3e 30 29 |v%.(q%!32.1)<>0)| 00006f90 84 71 25 3f 33 36 3c 3e 32 35 35 8c 0d 4d 44 15 |.q%?36<>255..MD.| 00006fa0 e7 28 28 71 25 21 36 30 29 80 32 35 36 29 3d 30 |.((q%!60).256)=0| 00006fb0 8c 0d 4d 4e 10 64 24 3d a4 61 28 71 25 2b 37 36 |..MN.d$=.a(q%+76| 00006fc0 29 0d 4d 62 15 cc 3a 64 24 3d a4 65 28 6c 25 2c |).Mb..:d$=.e(l%,| 00006fd0 71 25 21 37 36 29 0d 4d 76 05 cd 0d 4d 76 13 cc |q%!76).Mv...Mv..| 00006fe0 3a 64 24 3d 22 4e 6f 20 74 69 74 6c 65 22 0d 4d |:d$="No title".M| 00006ff0 94 05 cd 0d 4d 94 05 cd 0d 4d 9e 72 cc 3a c8 99 |....M....M.r.:..| 00007000 22 57 69 6d 70 5f 47 65 74 57 69 6e 64 6f 77 49 |"Wimp_GetWindowI| 00007010 6e 66 6f 22 2c 2c 71 25 3a 76 25 3d 28 28 28 71 |nfo",,q%:v%=(((q| 00007020 25 21 33 32 29 80 28 31 3c 3c 33 31 29 29 3c 3e |%!32).(1<<31))<>| 00007030 30 29 3a e7 28 76 25 80 28 71 25 21 33 32 80 28 |0):.(v%.(q%!32.(| 00007040 31 3c 3c 32 36 29 29 3c 3e 30 29 84 28 ac 76 25 |1<<26))<>0).(.v%| 00007050 80 28 71 25 21 33 32 80 31 29 3c 3e 30 29 84 71 |.(q%!32.1)<>0).q| 00007060 25 3f 33 36 3c 3e 32 35 35 8c 0d 4d c6 15 e7 28 |%?36<>255..M...(| 00007070 28 71 25 21 36 30 29 80 32 35 36 29 3d 30 8c 0d |(q%!60).256)=0..| 00007080 4d d0 10 64 24 3d a4 61 28 71 25 2b 37 36 29 0d |M..d$=.a(q%+76).| 00007090 4d e4 15 cc 3a 64 24 3d a4 65 28 6c 25 2c 71 25 |M...:d$=.e(l%,q%| 000070a0 21 37 36 29 0d 4d f8 05 cd 0d 4d f8 13 cc 3a 64 |!76).M....M...:d| 000070b0 24 3d 22 4e 6f 20 74 69 74 6c 65 22 0d 4e 16 05 |$="No title".N..| 000070c0 cd 0d 4e 16 05 cd 0d 4e 20 05 cb 0d 4e 2a 07 3d |..N....N ...N*.=| 000070d0 64 24 0d 4e 48 17 dd a4 6f 28 6c 25 2c 66 25 2c |d$.NH...o(l%,f%,| 000070e0 68 25 29 3a c8 8e 68 25 ca 0d 4e 52 17 c9 2d 31 |h%):..h%..NR..-1| 000070f0 3a 62 24 3d 22 42 61 63 6b 67 72 6f 75 6e 64 22 |:b$="Background"| 00007100 0d 4e 66 16 c9 2d 32 3a 62 24 3d 22 42 61 63 6b |.Nf..-2:b$="Back| 00007110 20 49 63 6f 6e 22 0d 4e 70 17 c9 2d 33 3a 62 24 | Icon".Np..-3:b$| 00007120 3d 22 43 6c 6f 73 65 20 49 63 6f 6e 22 0d 4e 7a |="Close Icon".Nz| 00007130 16 c9 2d 34 3a 62 24 3d 22 54 69 74 6c 65 20 42 |..-4:b$="Title B| 00007140 61 72 22 0d 4e 84 18 c9 2d 35 3a 62 24 3d 22 54 |ar".N...-5:b$="T| 00007150 6f 67 67 6c 65 20 49 63 6f 6e 22 0d 4e 8e 16 c9 |oggle Icon".N...| 00007160 2d 36 3a 62 24 3d 22 53 63 72 6f 6c 6c 20 55 70 |-6:b$="Scroll Up| 00007170 22 0d 4e 98 12 c9 2d 37 3a 62 24 3d 22 56 20 42 |".N...-7:b$="V B| 00007180 61 72 22 0d 4e a2 18 c9 2d 38 3a 62 24 3d 22 53 |ar".N...-8:b$="S| 00007190 63 72 6f 6c 6c 20 44 6f 77 6e 22 0d 4e ac 18 c9 |croll Down".N...| 000071a0 2d 39 3a 62 24 3d 22 41 64 6a 75 73 74 20 53 69 |-9:b$="Adjust Si| 000071b0 7a 65 22 0d 4e b6 19 c9 2d 31 30 3a 62 24 3d 22 |ze".N...-10:b$="| 000071c0 53 63 72 6f 6c 6c 52 69 67 68 74 22 0d 4e c0 13 |ScrollRight".N..| 000071d0 c9 2d 31 31 3a 62 24 3d 22 48 20 42 61 72 22 0d |.-11:b$="H Bar".| 000071e0 4e ca 19 c9 2d 31 32 3a 62 24 3d 22 53 63 72 6f |N...-12:b$="Scro| 000071f0 6c 6c 20 4c 65 66 74 22 0d 4e d4 49 7f 3a 21 71 |ll Left".N.I.:!q| 00007200 25 3d 66 25 3a 71 25 21 34 3d 68 25 3a c8 99 22 |%=f%:q%!4=h%:.."| 00007210 57 69 6d 70 5f 47 65 74 49 63 6f 6e 53 74 61 74 |Wimp_GetIconStat| 00007220 65 22 2c 2c 71 25 3a e7 28 28 28 71 25 21 32 34 |e",,q%:.(((q%!24| 00007230 29 80 36 31 34 34 30 29 3e 3e 31 32 29 3e 31 33 |).61440)>>12)>13| 00007240 8c 0d 4e fc 11 62 24 3d 22 56 61 72 69 61 62 6c |..N..b$="Variabl| 00007250 65 22 0d 4f 10 17 cc 3a e7 28 28 71 25 21 32 34 |e".O...:.((q%!24| 00007260 29 80 32 35 36 29 3d 30 8c 0d 4f 1a 10 62 24 3d |).256)=0..O..b$=| 00007270 a4 61 28 71 25 2b 32 38 29 0d 4f 2e 15 cc 3a e7 |.a(q%+28).O...:.| 00007280 28 28 71 25 21 32 34 29 80 31 29 3d 30 8c 0d 4f |((q%!24).1)=0..O| 00007290 38 13 62 24 3d a4 65 28 6c 25 2c 71 25 21 32 38 |8.b$=.e(l%,q%!28| 000072a0 29 0d 4f 4c 27 cc 3a e7 28 71 25 21 33 32 29 3d |).OL'.:.(q%!32)=| 000072b0 2d 31 8c 76 24 3d 22 22 8b 76 24 3d a4 65 28 6c |-1.v$="".v$=.e(l| 000072c0 25 2c 71 25 21 33 32 29 0d 4f 56 2f 62 24 3d a4 |%,q%!32).OV/b$=.| 000072d0 65 28 6c 25 2c 71 25 21 32 38 29 3a e7 62 24 3d |e(l%,q%!28):.b$=| 000072e0 22 22 8c 62 24 3d c1 76 24 2c 32 2c a7 76 24 2c |"".b$=.v$,2,.v$,| 000072f0 22 2c 22 29 2d 32 29 0d 4f 6a 05 cd 0d 4f 74 05 |",")-2).Oj...Ot.| 00007300 cd 0d 4f 7e 05 cd 0d 4f 88 05 cb 0d 4f 92 07 3d |..O~...O....O..=| 00007310 62 24 0d 4f b0 13 dd f2 66 61 28 66 25 29 3a e7 |b$.O....fa(f%):.| 00007320 66 25 3c 30 8c 0d 4f ba 15 5a 61 25 3d 30 3a 5f |f%<0..O..Za%=0:_| 00007330 61 25 3d 30 3a 60 61 25 3d 30 0d 4f e2 49 cc 3a |a%=0:`a%=0.O.I.:| 00007340 21 71 25 3d 66 25 3a c8 99 22 57 69 6d 70 5f 47 |!q%=f%:.."Wimp_G| 00007350 65 74 57 69 6e 64 6f 77 49 6e 66 6f 22 2c 2c 71 |etWindowInfo",,q| 00007360 25 3a 5a 61 25 3d 71 25 21 33 32 80 67 62 25 3a |%:Za%=q%!32.gb%:| 00007370 5f 61 25 3d 71 25 21 33 36 3a 60 61 25 3d 71 25 |_a%=q%!36:`a%=q%| 00007380 21 34 30 0d 50 1e 05 cd 0d 50 1e 05 e1 0d 50 28 |!40.P....P....P(| 00007390 04 0d 50 3c 75 dd a4 70 28 66 25 2c 68 25 2c 6b |..P<u..p(f%,h%,k| 000073a0 63 25 29 3a 21 62 25 3d 66 25 3a 62 25 21 34 3d |c%):!b%=f%:b%!4=| 000073b0 68 25 3a 62 25 21 38 3d 6b 63 25 3a 62 25 21 31 |h%:b%!8=kc%:b%!1| 000073c0 32 3d 30 3a c8 99 22 57 69 6d 70 5f 53 65 74 49 |2=0:.."Wimp_SetI| 000073d0 63 6f 6e 53 74 61 74 65 22 2c 2c 62 25 3a c8 99 |conState",,b%:..| 000073e0 22 57 69 6d 70 5f 47 65 74 49 63 6f 6e 53 74 61 |"Wimp_GetIconSta| 000073f0 74 65 22 2c 2c 62 25 3a 3d 28 62 25 21 32 34 80 |te",,b%:=(b%!24.| 00007400 6b 63 25 29 3e 30 0d 50 96 11 dd a4 71 28 78 24 |kc%)>0.P....q(x$| 00007410 29 3a c8 8e 78 24 ca 0d 50 a0 18 c9 22 42 61 63 |):..x$..P..."Bac| 00007420 6b 67 72 6f 75 6e 64 22 3a 73 63 25 3d 2d 31 0d |kground":sc%=-1.| 00007430 50 b4 16 c9 22 49 63 6f 6e 20 62 61 72 22 3a 73 |P..."Icon bar":s| 00007440 63 25 3d 2d 32 0d 50 be 6a 7f 3a 73 63 25 3d 2d |c%=-2.P.j.:sc%=-| 00007450 31 3a 4b 25 3d a4 6b 3a c8 95 4b 25 3c 3e 2d 31 |1:K%=.k:..K%<>-1| 00007460 80 73 63 25 3d 2d 31 3a 21 71 25 3d 32 30 3a 71 |.sc%=-1:!q%=20:q| 00007470 25 21 31 32 3d 30 3a c8 99 22 58 57 69 6d 70 5f |%!12=0:.."XWimp_| 00007480 53 65 6e 64 4d 65 73 73 61 67 65 22 2c 31 39 2c |SendMessage",19,| 00007490 71 25 2c 4b 25 2c 2d 31 b8 2c 2c 74 63 25 3a e7 |q%,K%,-1.,,tc%:.| 000074a0 74 63 25 3c 3e 30 80 74 63 25 3c 3e 4b 25 8c 0d |tc%<>0.tc%<>K%..| 000074b0 50 f0 20 e7 78 24 3d c0 a4 67 28 74 63 25 2c 4b |P. .x$=..g(tc%,K| 000074c0 25 2c a3 29 2c 32 37 29 8c 73 63 25 3d 4b 25 0d |%,.),27).sc%=K%.| 000074d0 50 fa 05 cd 0d 51 04 0f 4b 25 3d a4 6c 28 4b 25 |P....Q..K%=.l(K%| 000074e0 29 3a ce 0d 51 22 05 cb 0d 51 22 08 3d 73 63 25 |):..Q"...Q".=sc%| 000074f0 0d 51 40 72 dd a4 72 28 43 24 29 3a 75 63 25 3d |.Q@r..r(C$):uc%=| 00007500 2d 31 3a 76 63 25 3d 30 3a c8 95 76 63 25 3c 32 |-1:vc%=0:..vc%<2| 00007510 35 36 80 75 63 25 3d 2d 31 3a 21 71 25 3d 32 30 |56.uc%=-1:!q%=20| 00007520 3a 71 25 21 31 32 3d 30 3a c8 99 22 58 57 69 6d |:q%!12=0:.."XWim| 00007530 70 5f 53 65 6e 64 4d 65 73 73 61 67 65 22 2c 31 |p_SendMessage",1| 00007540 39 2c 71 25 2c 2d 32 2c 76 63 25 b8 2c 2c 77 63 |9,q%,-2,vc%.,,wc| 00007550 25 3a e7 77 63 25 3c 3e 30 80 77 63 25 3c 3e 2d |%:.wc%<>0.wc%<>-| 00007560 32 8c 0d 51 72 23 e7 43 24 3d c0 a4 6f 28 77 63 |2..Qr#.C$=..o(wc| 00007570 25 2c 2d 32 2c 76 63 25 29 2c 31 31 29 8c 75 63 |%,-2,vc%),11).uc| 00007580 25 3d 76 63 25 0d 51 7c 05 cd 0d 51 86 11 76 63 |%=vc%.Q|...Q..vc| 00007590 25 2b 3d 31 3a ce 3a 3d 75 63 25 0d 51 b8 a6 dd |%+=1:.:=uc%.Q...| 000075a0 f2 45 3a c8 99 22 57 69 6d 70 5f 47 65 74 50 6f |.E:.."Wimp_GetPo| 000075b0 69 6e 74 65 72 49 6e 66 6f 22 2c 2c 62 25 3a 71 |interInfo",,b%:q| 000075c0 25 21 34 3d 35 3a 71 25 21 38 3d 28 21 62 25 29 |%!4=5:q%!8=(!b%)| 000075d0 2d 33 34 3a 71 25 21 31 32 3d 28 62 25 21 34 29 |-34:q%!12=(b%!4)| 000075e0 2d 33 34 3a 71 25 21 31 36 3d 28 21 62 25 29 2b |-34:q%!16=(!b%)+| 000075f0 33 34 3a 71 25 21 32 30 3d 28 62 25 21 34 29 2b |34:q%!20=(b%!4)+| 00007600 33 34 3a 71 25 21 32 34 3d 69 61 25 3a 71 25 21 |34:q%!24=ia%:q%!| 00007610 32 38 3d 6a 61 25 3a 71 25 21 33 32 3d 6b 61 25 |28=ja%:q%!32=ka%| 00007620 3a 71 25 21 33 36 3d 6c 61 25 3a c8 99 22 57 69 |:q%!36=la%:.."Wi| 00007630 6d 70 5f 44 72 61 67 42 6f 78 22 2c 2c 71 25 3a |mp_DragBox",,q%:| 00007640 e1 0d 52 30 04 0d 52 44 c3 dd f2 4c 3a 21 62 25 |..R0..RD...L:!b%| 00007650 3d 31 32 38 3a 62 25 21 34 3d 31 32 39 3a 62 25 |=128:b%!4=129:b%| 00007660 21 38 3d 31 33 30 3a 62 25 21 31 32 3d 31 33 31 |!8=130:b%!12=131| 00007670 3a 62 25 21 31 36 3d 34 3a 62 25 21 32 30 3d 35 |:b%!16=4:b%!20=5| 00007680 3a 62 25 21 32 34 3d 2d 31 3a c8 99 22 4f 53 5f |:b%!24=-1:.."OS_| 00007690 52 65 61 64 56 64 75 56 61 72 69 61 62 6c 65 73 |ReadVduVariables| 000076a0 22 2c 62 25 2c 62 25 2b 32 38 3a 69 61 25 3d 62 |",b%,b%+28:ia%=b| 000076b0 25 21 32 38 3c 3c 62 25 21 34 34 3a 6a 61 25 3d |%!28<<b%!44:ja%=| 000076c0 62 25 21 33 32 3c 3c 62 25 21 34 38 3a 6b 61 25 |b%!32<<b%!48:ka%| 000076d0 3d 62 25 21 33 36 3c 3c 62 25 21 34 34 3a 6c 61 |=b%!36<<b%!44:la| 000076e0 25 3d 62 25 21 34 30 3c 3c 62 25 21 34 38 3a 4e |%=b%!40<<b%!48:N| 000076f0 25 3d 31 3c 3c 62 25 21 34 34 3a 4f 25 3d 31 3c |%=1<<b%!44:O%=1<| 00007700 3c 62 25 21 34 38 3a e1 0d 52 da 04 0d 52 ee 42 |<b%!48:..R...R.B| 00007710 dd a4 63 28 66 25 2c 68 25 29 3a 21 62 25 3d 66 |..c(f%,h%):!b%=f| 00007720 25 3a 62 25 21 34 3d 68 25 3a c8 99 22 57 69 6d |%:b%!4=h%:.."Wim| 00007730 70 5f 47 65 74 49 63 6f 6e 53 74 61 74 65 22 2c |p_GetIconState",| 00007740 2c 62 25 3a 3d a4 61 28 62 25 21 32 38 29 0d 53 |,b%:=.a(b%!28).S| 00007750 2a 29 dd f2 65 28 63 24 29 3a 66 24 3d a4 63 28 |*)..e(c$):f$=.c(| 00007760 74 25 2c 31 29 3a e7 a9 28 63 24 29 2b a9 28 66 |t%,1):..(c$)+.(f| 00007770 24 29 3c 31 31 36 8c 0d 53 3e 3e c8 99 22 57 69 |$)<116..S>>.."Wi| 00007780 6d 70 5f 47 65 74 43 61 72 65 74 50 6f 73 69 74 |mp_GetCaretPosit| 00007790 69 6f 6e 22 2c 2c 62 25 3a e7 21 62 25 3c 3e 74 |ion",,b%:.!b%<>t| 000077a0 25 8c 78 63 25 3d a9 28 66 24 29 8b 78 63 25 3d |%.xc%=.(f$).xc%=| 000077b0 62 25 21 32 30 0d 53 52 71 79 24 3d c0 66 24 2c |b%!20.SRqy$=.f$,| 000077c0 78 63 25 29 2b 63 24 2b c2 66 24 2c a9 28 66 24 |xc%)+c$+.f$,.(f$| 000077d0 29 2d 78 63 25 29 3a f2 62 28 74 25 2c 31 2c 79 |)-xc%):.b(t%,1,y| 000077e0 24 29 3a 24 28 61 25 2b 31 32 29 3d 79 24 3a c8 |$):$(a%+12)=y$:.| 000077f0 99 22 57 69 6d 70 5f 53 65 74 43 61 72 65 74 50 |."Wimp_SetCaretP| 00007800 6f 73 69 74 69 6f 6e 22 2c 74 25 2c 31 2c 2d 31 |osition",t%,1,-1| 00007810 2c 2d 31 2c ac 28 31 3c 3c 32 35 29 2c 78 63 25 |,-1,.(1<<25),xc%| 00007820 2b a9 28 63 24 29 0d 53 84 05 cd 0d 53 84 05 e1 |+.(c$).S....S...| 00007830 0d 53 8e 04 0d 53 a2 c3 dd a4 6a 3a c8 99 22 57 |.S...S....j:.."W| 00007840 69 6d 70 5f 47 65 74 50 6f 69 6e 74 65 72 49 6e |imp_GetPointerIn| 00007850 66 6f 22 2c 2c 62 25 3a 66 25 3d 62 25 21 31 32 |fo",,b%:f%=b%!12| 00007860 3a 71 25 21 31 32 3d 30 3a c8 99 22 57 69 6d 70 |:q%!12=0:.."Wimp| 00007870 5f 53 65 6e 64 4d 65 73 73 61 67 65 22 2c 31 39 |_SendMessage",19| 00007880 2c 71 25 2c 66 25 2c 2d 31 b8 2c 2c 6c 25 3a 21 |,q%,f%,-1.,,l%:!| 00007890 71 25 3d 32 34 3a 71 25 21 31 32 3d 30 3a 71 25 |q%=24:q%!12=0:q%| 000078a0 21 31 36 3d 32 36 32 33 34 32 3a 71 25 21 32 30 |!16=262342:q%!20| 000078b0 3d 6c 25 3a c8 99 22 57 69 6d 70 5f 53 65 6e 64 |=l%:.."Wimp_Send| 000078c0 4d 65 73 73 61 67 65 22 2c 31 38 2c 71 25 2c 30 |Message",18,q%,0| 000078d0 3a 6a 24 3d 22 22 3a f5 3a f2 67 28 36 31 34 36 |:j$="":.:.g(6146| 000078e0 29 3a fd 6a 24 3c 3e 22 22 3a e7 6a 24 3c 3e 22 |):.j$<>"":.j$<>"| 000078f0 46 69 6c 65 72 22 8c 0d 54 10 09 77 24 3d 22 22 |Filer"..T..w$=""| 00007900 0d 54 24 39 cc 3a 21 71 25 3d 66 25 3a c8 99 22 |.T$9.:!q%=f%:.."| 00007910 57 69 6d 70 5f 47 65 74 57 69 6e 64 6f 77 49 6e |Wimp_GetWindowIn| 00007920 66 6f 22 2c 2c 71 25 3a e7 28 71 25 21 36 30 80 |fo",,q%:.(q%!60.| 00007930 32 35 36 29 3d 32 35 36 8c 0d 54 42 10 77 24 3d |256)=256..TB.w$=| 00007940 a4 61 28 71 25 21 37 36 29 0d 54 56 12 cc 3a 77 |.a(q%!76).TV..:w| 00007950 24 3d a4 61 28 71 25 2b 37 36 29 0d 54 6a 05 cd |$=.a(q%+76).Tj..| 00007960 0d 54 6a 05 cd 0d 54 74 07 3d 77 24 0d 54 92 51 |.Tj...Tt.=w$.T.Q| 00007970 dd f2 72 28 63 24 2c 45 62 25 29 3a e3 49 25 3d |..r(c$,Eb%):.I%=| 00007980 31 b8 a9 28 63 24 29 3a c8 99 22 4f 53 5f 42 50 |1..(c$):.."OS_BP| 00007990 75 74 22 2c 97 28 c1 63 24 2c 49 25 2c 31 29 29 |ut",.(.c$,I%,1))| 000079a0 2c 45 62 25 3a ed 49 25 3a c8 99 22 4f 53 5f 42 |,Eb%:.I%:.."OS_B| 000079b0 50 75 74 22 2c 31 30 2c 45 62 25 3a e1 0d 54 c4 |Put",10,Eb%:..T.| 000079c0 04 0d 54 d8 75 dd f2 6f 28 66 25 2c 68 25 2c 44 |..T.u..o(f%,h%,D| 000079d0 24 29 3a 21 62 25 3d 66 25 3a 62 25 21 34 3d 68 |$):!b%=f%:b%!4=h| 000079e0 25 3a c8 99 22 57 69 6d 70 5f 47 65 74 49 63 6f |%:.."Wimp_GetIco| 000079f0 6e 53 74 61 74 65 22 2c 2c 62 25 3a 24 28 62 25 |nState",,b%:$(b%| 00007a00 21 33 32 29 3d 22 73 22 2b 44 24 3a 62 25 21 38 |!32)="s"+D$:b%!8| 00007a10 3d 30 3a 62 25 21 31 32 3d 30 3a c8 99 22 57 69 |=0:b%!12=0:.."Wi| 00007a20 6d 70 5f 53 65 74 49 63 6f 6e 53 74 61 74 65 22 |mp_SetIconState"| 00007a30 2c 2c 62 25 3a e1 0d 55 28 04 0d 55 3c b6 dd a4 |,,b%:..U(..U<...| 00007a40 6b 3a ea 49 25 3a 21 71 25 3d 79 63 25 3a c8 99 |k:.I%:!q%=yc%:..| 00007a50 22 57 69 6d 70 5f 47 65 74 57 69 6e 64 6f 77 53 |"Wimp_GetWindowS| 00007a60 74 61 74 65 22 2c 2c 71 25 3a e3 49 25 3d 34 b8 |tate",,q%:.I%=4.| 00007a70 31 36 88 34 3a 71 25 21 49 25 3d 28 71 25 21 49 |16.4:q%!I%=(q%!I| 00007a80 25 29 2d 34 30 39 36 3a ed 49 25 3a 71 25 21 32 |%)-4096:.I%:q%!2| 00007a90 38 3d 2d 32 3a c8 99 22 57 69 6d 70 5f 4f 70 65 |8=-2:.."Wimp_Ope| 00007aa0 6e 57 69 6e 64 6f 77 22 2c 2c 71 25 3a c8 99 22 |nWindow",,q%:.."| 00007ab0 57 69 6d 70 5f 47 65 74 57 69 6e 64 6f 77 53 74 |Wimp_GetWindowSt| 00007ac0 61 74 65 22 2c 2c 71 25 3a 7a 63 25 3d 71 25 21 |ate",,q%:zc%=q%!| 00007ad0 32 38 3a c8 99 22 57 69 6d 70 5f 43 6c 6f 73 65 |28:.."Wimp_Close| 00007ae0 57 69 6e 64 6f 77 22 2c 2c 71 25 3a 3d 7a 63 25 |Window",,q%:=zc%| 00007af0 0d 55 c8 35 dd a4 6c 28 66 25 29 3a 21 71 25 3d |.U.5..l(f%):!q%=| 00007b00 66 25 3a c8 99 22 57 69 6d 70 5f 47 65 74 57 69 |f%:.."Wimp_GetWi| 00007b10 6e 64 6f 77 53 74 61 74 65 22 2c 2c 71 25 3a 3d |ndowState",,q%:=| 00007b20 71 25 21 32 38 0d 55 fa 3b dd a4 68 3a c8 99 22 |q%!28.U.;..h:.."| 00007b30 58 4f 53 5f 52 65 61 64 56 61 72 56 61 6c 22 2c |XOS_ReadVarVal",| 00007b40 53 25 2b 31 32 38 2c 53 25 2c 32 35 36 2c 30 b8 |S%+128,S%,256,0.| 00007b50 2c 2c 41 63 25 3a 3d c0 24 53 25 2c 41 63 25 29 |,,Ac%:=.$S%,Ac%)| 00007b60 0d 56 22 65 dd f2 6a 3a 71 25 21 36 34 3d 31 3a |.V"e..j:q%!64=1:| 00007b70 42 63 25 3d 71 25 21 38 2d 21 71 25 3a 43 63 25 |Bc%=q%!8-!q%:Cc%| 00007b80 3d 71 25 21 31 32 2d 71 25 21 34 3a 71 25 3f 36 |=q%!12-q%!4:q%?6| 00007b90 38 3d 42 63 25 83 32 35 36 3a 71 25 3f 36 39 3d |8=Bc%.256:q%?69=| 00007ba0 42 63 25 81 32 35 36 3a 71 25 3f 37 30 3d 43 63 |Bc%.256:q%?70=Cc| 00007bb0 25 83 32 35 36 3a 71 25 3f 37 31 3d 43 63 25 81 |%.256:q%?71=Cc%.| 00007bc0 32 35 36 3a e1 0d 56 72 04 0d 56 9a 2c dd f2 4f |256:..Vr..V.,..O| 00007bd0 3a e7 a6 28 2d 32 35 36 29 3d 31 36 31 84 a6 28 |:..(-256)=161..(| 00007be0 2d 32 35 36 29 3d 31 36 30 8c 44 63 25 3d a3 8b |-256)=160.Dc%=..| 00007bf0 44 63 25 3d b9 0d 56 a4 b8 64 61 25 3d b9 3a 5a |Dc%=..V..da%=.:Z| 00007c00 25 3d 32 30 30 30 3a 6b 25 3d 31 36 30 3a 7a 24 |%=2000:k%=160:z$| 00007c10 3d 22 31 22 3a 79 62 25 3d 31 32 37 3a 53 61 25 |="1":yb%=127:Sa%| 00007c20 3d 32 35 38 38 2b 28 31 35 31 2a 6b 25 29 3a de |=2588+(151*k%):.| 00007c30 67 25 20 53 61 25 3a de 71 25 20 38 31 39 32 2c |g% Sa%:.q% 8192,| 00007c40 62 25 20 32 35 36 2c 5f 25 20 5a 25 2c 75 25 20 |b% 256,_% Z%,u% | 00007c50 31 34 38 2c 43 25 20 32 34 2c 53 25 20 32 35 36 |148,C% 24,S% 256| 00007c60 2c 4c 25 20 32 34 3a de 50 25 20 35 32 2c 41 61 |,L% 24:.P% 52,Aa| 00007c70 25 20 38 2c 45 63 25 20 38 2c 42 61 25 20 38 2c |% 8,Ec% 8,Ba% 8,| 00007c80 46 63 25 20 38 2c 43 61 25 20 38 3a de 7a 25 20 |Fc% 8,Ca% 8:.z% | 00007c90 31 32 34 2c 69 25 20 31 39 36 2c 44 25 20 31 30 |124,i% 196,D% 10| 00007ca0 30 2c 51 25 20 35 32 2c 52 25 20 35 32 0d 57 08 |0,Q% 52,R% 52.W.| 00007cb0 b2 de 70 25 20 6b 25 2a 31 30 2c 63 25 28 31 32 |..p% k%*10,c%(12| 00007cc0 37 29 2c 61 24 28 39 36 29 2c 61 25 28 39 36 2c |7),a$(96),a%(96,| 00007cd0 37 29 2c 62 25 28 79 62 25 29 2c 62 24 28 79 62 |7),b%(yb%),b$(yb| 00007ce0 25 29 3a c8 99 22 57 69 6d 70 5f 49 6e 69 74 69 |%):.."Wimp_Initi| 00007cf0 61 6c 69 73 65 22 2c 32 30 30 2c 26 34 42 35 33 |alise",200,&4B53| 00007d00 34 31 35 34 2c 22 4b 65 79 73 44 65 6d 6f 22 b8 |4154,"KeysDemo".| 00007d10 47 63 25 2c 6f 63 25 3a e7 47 63 25 3c 32 30 30 |Gc%,oc%:.Gc%<200| 00007d20 8c f2 66 28 30 2c 22 54 68 69 73 20 70 72 6f 67 |..f(0,"This prog| 00007d30 72 61 6d 20 77 69 6c 6c 20 6f 6e 6c 79 20 77 6f |ram will only wo| 00007d40 72 6b 20 6f 6e 20 52 49 53 43 20 4f 53 20 32 2e |rk on RISC OS 2.| 00007d50 30 30 20 6f 72 20 6c 61 74 65 72 22 2c 32 29 0d |00 or later",2).| 00007d60 57 26 dc 61 61 25 3d a3 3a 21 71 25 3d 2d 31 3a |W&.aa%=.:!q%=-1:| 00007d70 71 25 21 34 3d 30 3a 71 25 21 38 3d 30 3a 71 25 |q%!4=0:q%!8=0:q%| 00007d80 21 31 32 3d 36 38 3a 71 25 21 31 36 3d 36 38 3a |!12=68:q%!16=68:| 00007d90 71 25 21 32 30 3d 31 32 32 39 30 3a 24 28 71 25 |q%!20=12290:$(q%| 00007da0 2b 32 34 29 3d 22 21 4b 65 79 73 64 65 6d 6f 22 |+24)="!Keysdemo"| 00007db0 3a c8 99 22 57 69 6d 70 5f 43 72 65 61 74 65 49 |:.."Wimp_CreateI| 00007dc0 63 6f 6e 22 2c 2c 71 25 b8 48 63 25 3a f2 4c 3a |con",,q%.Hc%:.L:| 00007dd0 c8 99 22 57 69 6d 70 5f 4f 70 65 6e 54 65 6d 70 |.."Wimp_OpenTemp| 00007de0 6c 61 74 65 22 2c 2c 22 3c 4b 65 79 73 44 65 6d |late",,"<KeysDem| 00007df0 6f 24 44 69 72 3e 2e 54 65 6d 70 6c 61 74 65 73 |o$Dir>.Templates| 00007e00 22 3a 45 25 3d 5f 25 3a c8 99 22 57 69 6d 70 5f |":E%=_%:.."Wimp_| 00007e10 4c 6f 61 64 54 65 6d 70 6c 61 74 65 22 2c 2c 71 |LoadTemplate",,q| 00007e20 25 2c 45 25 2c 5f 25 2b 5a 25 2c 2d 31 2c 22 49 |%,E%,_%+Z%,-1,"I| 00007e30 6e 66 6f 22 2c 30 b8 2c 2c 45 25 0d 57 6c cd f2 |nfo",0.,,E%.Wl..| 00007e40 6a 3a c8 99 22 57 69 6d 70 5f 43 72 65 61 74 65 |j:.."Wimp_Create| 00007e50 57 69 6e 64 6f 77 22 2c 2c 71 25 b8 79 63 25 3a |Window",,q%.yc%:| 00007e60 c8 99 22 57 69 6d 70 5f 4c 6f 61 64 54 65 6d 70 |.."Wimp_LoadTemp| 00007e70 6c 61 74 65 22 2c 2c 71 25 2c 45 25 2c 5f 25 2b |late",,q%,E%,_%+| 00007e80 5a 25 2c 2d 31 2c 22 54 79 70 65 22 2c 30 b8 2c |Z%,-1,"Type",0.,| 00007e90 2c 45 25 3a f2 6a 3a 21 71 25 3d 28 6b 61 25 2f |,E%:.j:!q%=(ka%/| 00007ea0 32 29 2d 33 33 38 3a 71 25 21 38 3d 28 6b 61 25 |2)-338:q%!8=(ka%| 00007eb0 2f 32 29 2b 33 33 38 3a c8 99 22 57 69 6d 70 5f |/2)+338:.."Wimp_| 00007ec0 43 72 65 61 74 65 57 69 6e 64 6f 77 22 2c 2c 71 |CreateWindow",,q| 00007ed0 25 b8 65 25 3a c8 99 22 57 69 6d 70 5f 4c 6f 61 |%.e%:.."Wimp_Loa| 00007ee0 64 54 65 6d 70 6c 61 74 65 22 2c 2c 71 25 2c 45 |dTemplate",,q%,E| 00007ef0 25 2c 5f 25 2b 5a 25 2c 2d 31 2c 22 54 65 78 74 |%,_%+Z%,-1,"Text| 00007f00 22 2c 30 b8 2c 2c 45 25 0d 57 94 d3 f2 6a 3a c8 |",0.,,E%.W...j:.| 00007f10 99 22 57 69 6d 70 5f 43 72 65 61 74 65 57 69 6e |."Wimp_CreateWin| 00007f20 64 6f 77 22 2c 2c 71 25 b8 74 25 3a c8 99 22 57 |dow",,q%.t%:.."W| 00007f30 69 6d 70 5f 4c 6f 61 64 54 65 6d 70 6c 61 74 65 |imp_LoadTemplate| 00007f40 22 2c 2c 71 25 2c 45 25 2c 5f 25 2b 5a 25 2c 2d |",,q%,E%,_%+Z%,-| 00007f50 31 2c 22 57 69 6e 64 6f 77 2f 49 63 6f 6e 22 2c |1,"Window/Icon",| 00007f60 30 b8 2c 2c 45 25 3a f2 6a 3a c8 99 22 57 69 6d |0.,,E%:.j:.."Wim| 00007f70 70 5f 43 72 65 61 74 65 57 69 6e 64 6f 77 22 2c |p_CreateWindow",| 00007f80 2c 71 25 b8 6d 25 3a c8 99 22 57 69 6d 70 5f 4c |,q%.m%:.."Wimp_L| 00007f90 6f 61 64 54 65 6d 70 6c 61 74 65 22 2c 2c 71 25 |oadTemplate",,q%| 00007fa0 2c 45 25 2c 5f 25 2b 5a 25 2c 2d 31 2c 22 43 6c |,E%,_%+Z%,-1,"Cl| 00007fb0 69 63 6b 22 2c 30 b8 2c 2c 45 25 3a f2 6a 3a c8 |ick",0.,,E%:.j:.| 00007fc0 99 22 57 69 6d 70 5f 43 72 65 61 74 65 57 69 6e |."Wimp_CreateWin| 00007fd0 64 6f 77 22 2c 2c 71 25 b8 4d 25 0d 57 c6 ac c8 |dow",,q%.M%.W...| 00007fe0 99 22 57 69 6d 70 5f 4c 6f 61 64 54 65 6d 70 6c |."Wimp_LoadTempl| 00007ff0 61 74 65 22 2c 2c 71 25 2c 45 25 2c 5f 25 2b 5a |ate",,q%,E%,_%+Z| 00008000 25 2c 2d 31 2c 22 4d 65 6e 75 73 22 2c 30 b8 2c |%,-1,"Menus",0.,| 00008010 2c 45 25 3a f2 6a 3a c8 99 22 57 69 6d 70 5f 43 |,E%:.j:.."Wimp_C| 00008020 72 65 61 74 65 57 69 6e 64 6f 77 22 2c 2c 71 25 |reateWindow",,q%| 00008030 b8 47 25 3a c8 99 22 57 69 6d 70 5f 4c 6f 61 64 |.G%:.."Wimp_Load| 00008040 54 65 6d 70 6c 61 74 65 22 2c 2c 71 25 2c 45 25 |Template",,q%,E%| 00008050 2c 5f 25 2b 5a 25 2c 2d 31 2c 22 53 61 76 65 22 |,_%+Z%,-1,"Save"| 00008060 2c 30 b8 2c 2c 45 25 3a f2 6a 3a c8 99 22 57 69 |,0.,,E%:.j:.."Wi| 00008070 6d 70 5f 43 72 65 61 74 65 57 69 6e 64 6f 77 22 |mp_CreateWindow"| 00008080 2c 2c 71 25 b8 41 25 0d 57 ee e4 c8 99 22 57 69 |,,q%.A%.W...."Wi| 00008090 6d 70 5f 4c 6f 61 64 54 65 6d 70 6c 61 74 65 22 |mp_LoadTemplate"| 000080a0 2c 2c 71 25 2c 45 25 2c 5f 25 2b 5a 25 2c 2d 31 |,,q%,E%,_%+Z%,-1| 000080b0 2c 22 4d 6f 76 65 57 69 6e 64 22 2c 30 b8 2c 2c |,"MoveWind",0.,,| 000080c0 45 25 3a f2 6a 3a c8 99 22 57 69 6d 70 5f 43 72 |E%:.j:.."Wimp_Cr| 000080d0 65 61 74 65 57 69 6e 64 6f 77 22 2c 2c 71 25 b8 |eateWindow",,q%.| 000080e0 6a 25 3a c8 99 22 57 69 6d 70 5f 4c 6f 61 64 54 |j%:.."Wimp_LoadT| 000080f0 65 6d 70 6c 61 74 65 22 2c 2c 71 25 2c 45 25 2c |emplate",,q%,E%,| 00008100 5f 25 2b 5a 25 2c 2d 31 2c 22 45 6e 74 65 72 22 |_%+Z%,-1,"Enter"| 00008110 2c 30 b8 2c 2c 45 25 3a f2 6a 3a c8 99 22 57 69 |,0.,,E%:.j:.."Wi| 00008120 6d 70 5f 43 72 65 61 74 65 57 69 6e 64 6f 77 22 |mp_CreateWindow"| 00008130 2c 2c 71 25 b8 77 61 25 3a c8 99 22 57 69 6d 70 |,,q%.wa%:.."Wimp| 00008140 5f 43 6c 6f 73 65 54 65 6d 70 6c 61 74 65 22 3a |_CloseTemplate":| 00008150 24 75 25 3d 22 4b 65 79 73 44 65 6d 6f 22 3a 75 |$u%="KeysDemo":u| 00008160 25 21 31 32 3d 34 35 39 32 37 31 0d 58 2a b0 75 |%!12=459271.X*.u| 00008170 25 21 31 36 3d 31 35 32 3a 75 25 21 32 30 3d 34 |%!16=152:u%!20=4| 00008180 34 3a 75 25 21 32 34 3d 30 3a 75 25 21 32 38 3d |4:u%!24=0:u%!28=| 00008190 30 3a 75 25 21 33 32 3d 79 63 25 3a 75 25 21 33 |0:u%!32=yc%:u%!3| 000081a0 36 3d 26 37 30 30 39 30 30 31 3a 24 28 75 25 2b |6=&7009001:$(u%+| 000081b0 34 30 29 3d 22 49 6e 66 6f 22 3a 75 25 21 35 32 |40)="Info":u%!52| 000081c0 3d 30 3a 75 25 21 35 36 3d 7a 25 3a 75 25 21 36 |=0:u%!56=z%:u%!6| 000081d0 30 3d 26 37 30 30 39 30 30 31 3a 24 28 75 25 2b |0=&7009001:$(u%+| 000081e0 36 34 29 3d 22 53 61 76 65 22 3a 75 25 21 37 36 |64)="Save":u%!76| 000081f0 3d 32 3a 75 25 21 38 30 3d 44 25 3a 75 25 21 38 |=2:u%!80=D%:u%!8| 00008200 34 3d 26 37 30 30 39 30 30 31 3a 24 28 75 25 2b |4=&7009001:$(u%+| 00008210 38 38 29 3d 22 50 72 65 66 73 22 0d 58 52 a5 75 |88)="Prefs".XR.u| 00008220 25 21 31 30 30 3d 30 3a 75 25 21 31 30 34 3d 2d |%!100=0:u%!104=-| 00008230 31 3a 75 25 21 31 30 38 3d 26 37 30 30 39 30 30 |1:u%!108=&700900| 00008240 31 3a 24 28 75 25 2b 31 31 32 29 3d 22 43 6c 65 |1:$(u%+112)="Cle| 00008250 61 72 20 41 6c 6c 22 3a 75 25 21 31 32 34 3d 31 |ar All":u%!124=1| 00008260 32 38 3a 75 25 21 31 32 38 3d 2d 31 3a 75 25 21 |28:u%!128=-1:u%!| 00008270 31 33 32 3d 26 37 30 30 39 30 30 31 3a 24 28 75 |132=&7009001:$(u| 00008280 25 2b 31 33 36 29 3d 22 51 75 69 74 22 3a 24 7a |%+136)="Quit":$z| 00008290 25 3d 22 53 61 76 65 22 3a 7a 25 21 31 32 3d 34 |%="Save":z%!12=4| 000082a0 35 39 32 37 31 3a 7a 25 21 31 36 3d 31 38 34 3a |59271:z%!16=184:| 000082b0 7a 25 21 32 30 3d 34 34 3a 7a 25 21 32 34 3d 30 |z%!20=44:z%!24=0| 000082c0 0d 58 7a d6 7a 25 21 32 38 3d 38 3a 7a 25 21 33 |.Xz.z%!28=8:z%!3| 000082d0 32 3d 41 25 3a 7a 25 21 33 36 3d 26 37 30 30 39 |2=A%:z%!36=&7009| 000082e0 30 30 31 3a 24 28 7a 25 2b 34 30 29 3d 22 4b 65 |001:$(z%+40)="Ke| 000082f0 79 73 74 72 6f 6b 65 73 22 3a 7a 25 21 35 32 3d |ystrokes":z%!52=| 00008300 30 3a 7a 25 21 35 36 3d 2d 31 3a 7a 25 21 36 30 |0:z%!56=-1:z%!60| 00008310 3d 26 37 30 30 39 30 30 31 3a 24 28 7a 25 2b 36 |=&7009001:$(z%+6| 00008320 34 29 3d 22 44 65 66 61 75 6c 74 22 3a 7a 25 21 |4)="Default":z%!| 00008330 37 36 3d 38 3a 7a 25 21 38 30 3d 41 25 3a 7a 25 |76=8:z%!80=A%:z%| 00008340 21 38 34 3d 26 37 30 30 39 30 30 31 3a 24 28 7a |!84=&7009001:$(z| 00008350 25 2b 38 38 29 3d 22 45 78 65 63 75 74 6f 72 22 |%+88)="Executor"| 00008360 3a 7a 25 21 31 30 30 3d 31 33 36 3a 7a 25 21 31 |:z%!100=136:z%!1| 00008370 30 34 3d 41 25 3a 7a 25 21 31 30 38 3d 26 37 30 |04=A%:z%!108=&70| 00008380 30 39 30 30 31 3a 24 28 7a 25 2b 31 31 32 29 3d |09001:$(z%+112)=| 00008390 22 4c 69 73 74 22 0d 58 a2 cb 24 69 25 3d 22 45 |"List".X..$i%="E| 000083a0 64 69 74 22 3a 69 25 21 31 32 3d 34 35 39 32 37 |dit":i%!12=45927| 000083b0 31 3a 69 25 21 31 36 3d 31 36 38 3a 69 25 21 32 |1:i%!16=168:i%!2| 000083c0 30 3d 34 34 3a 69 25 21 32 34 3d 30 3a 69 25 21 |0=44:i%!24=0:i%!| 000083d0 32 38 3d 30 3a 69 25 21 33 32 3d 2d 31 3a 69 25 |28=0:i%!32=-1:i%| 000083e0 21 33 36 3d 26 37 30 30 39 30 30 31 3a 24 28 69 |!36=&7009001:$(i| 000083f0 25 2b 34 30 29 3d 22 43 6f 70 79 22 3a 69 25 21 |%+40)="Copy":i%!| 00008400 35 32 3d 30 3a 69 25 21 35 36 3d 2d 31 3a 69 25 |52=0:i%!56=-1:i%| 00008410 21 36 30 3d 26 37 30 30 39 30 30 31 3a 24 28 69 |!60=&7009001:$(i| 00008420 25 2b 36 34 29 3d 22 43 6f 70 79 20 47 72 6f 75 |%+64)="Copy Grou| 00008430 70 22 3a 69 25 21 37 36 3d 30 3a 69 25 21 38 30 |p":i%!76=0:i%!80| 00008440 3d 2d 31 3a 69 25 21 38 34 3d 26 37 30 30 39 30 |=-1:i%!84=&70090| 00008450 30 31 3a 24 28 69 25 2b 38 38 29 3d 22 43 75 74 |01:$(i%+88)="Cut| 00008460 22 0d 58 d4 a7 69 25 21 31 30 30 3d 30 3a 69 25 |".X..i%!100=0:i%| 00008470 21 31 30 34 3d 2d 31 3a 69 25 21 31 30 38 3d 26 |!104=-1:i%!108=&| 00008480 37 30 30 39 30 30 31 3a 24 28 69 25 2b 31 31 32 |7009001:$(i%+112| 00008490 29 3d 22 43 75 74 20 47 72 6f 75 70 22 3a 69 25 |)="Cut Group":i%| 000084a0 21 31 32 34 3d 30 3a 69 25 21 31 32 38 3d 2d 31 |!124=0:i%!128=-1| 000084b0 3a 69 25 21 31 33 32 3d 26 37 30 30 39 30 30 31 |:i%!132=&7009001| 000084c0 3a 24 28 69 25 2b 31 33 36 29 3d 22 50 61 73 74 |:$(i%+136)="Past| 000084d0 65 22 3a 69 25 21 31 34 38 3d 30 3a 69 25 21 31 |e":i%!148=0:i%!1| 000084e0 35 32 3d 2d 31 3a 69 25 21 31 35 36 3d 26 37 30 |52=-1:i%!156=&70| 000084f0 30 39 30 30 31 3a 24 28 69 25 2b 31 36 30 29 3d |09001:$(i%+160)=| 00008500 22 49 6e 73 65 72 74 22 0d 58 f2 a3 69 25 21 31 |"Insert".X..i%!1| 00008510 37 32 3d 31 33 36 3a 69 25 21 31 37 36 3d 41 25 |72=136:i%!176=A%| 00008520 3a 69 25 21 31 38 30 3d 26 37 30 30 39 30 30 31 |:i%!180=&7009001| 00008530 3a 24 28 69 25 2b 31 38 34 29 3d 22 41 63 74 69 |:$(i%+184)="Acti| 00008540 6f 6e 22 3a 24 44 25 3d 22 50 72 65 66 73 22 3a |on":$D%="Prefs":| 00008550 44 25 21 31 32 3d 34 35 39 32 37 31 3a 44 25 21 |D%!12=459271:D%!| 00008560 31 36 3d 31 36 38 3a 44 25 21 32 30 3d 34 34 3a |16=168:D%!20=44:| 00008570 44 25 21 32 34 3d 30 3a 44 25 21 32 38 3d 30 3a |D%!24=0:D%!28=0:| 00008580 44 25 21 33 32 3d 50 25 3a 44 25 21 33 36 3d 26 |D%!32=P%:D%!36=&| 00008590 37 30 30 39 30 30 31 3a 24 28 44 25 2b 34 30 29 |7009001:$(D%+40)| 000085a0 3d 22 41 75 74 6f 65 78 65 63 22 0d 59 1a c5 44 |="Autoexec".Y..D| 000085b0 25 21 35 32 3d 30 3a 44 25 21 35 36 3d 51 25 3a |%!52=0:D%!56=Q%:| 000085c0 44 25 21 36 30 3d 26 37 30 30 39 30 30 31 3a 24 |D%!60=&7009001:$| 000085d0 28 44 25 2b 36 34 29 3d 22 56 61 72 69 61 62 6c |(D%+64)="Variabl| 000085e0 65 22 3a 44 25 21 37 36 3d 31 32 38 3a 44 25 21 |e":D%!76=128:D%!| 000085f0 38 30 3d 52 25 3a 44 25 21 38 34 3d 26 37 30 30 |80=R%:D%!84=&700| 00008600 39 30 30 31 3a 24 28 44 25 2b 38 38 29 3d 22 49 |9001:$(D%+88)="I| 00008610 6e 63 72 65 6d 65 6e 74 22 3a 24 50 25 3d 22 4d |ncrement":$P%="M| 00008620 69 6e 75 74 65 73 22 3a 50 25 21 31 32 3d 34 35 |inutes":P%!12=45| 00008630 39 32 37 31 3a 50 25 21 31 36 3d 39 36 3a 50 25 |9271:P%!16=96:P%| 00008640 21 32 30 3d 34 34 3a 50 25 21 32 34 3d 30 3a 50 |!20=44:P%!24=0:P| 00008650 25 21 32 38 3d 31 33 32 3a 50 25 21 33 32 3d 2d |%!28=132:P%!32=-| 00008660 31 3a 50 25 21 33 36 3d 26 37 30 30 39 31 30 31 |1:P%!36=&7009101| 00008670 0d 59 4c e2 50 25 21 34 30 3d 41 61 25 3a 50 25 |.YL.P%!40=Aa%:P%| 00008680 21 34 34 3d 45 63 25 3a 50 25 21 34 38 3d 33 3a |!44=Ec%:P%!48=3:| 00008690 24 41 61 25 3d 22 31 35 22 3a 24 45 63 25 3d 22 |$Aa%="15":$Ec%="| 000086a0 61 30 2d 39 22 3a 6f 61 25 3d 39 30 30 30 30 3a |a0-9":oa%=90000:| 000086b0 6e 61 25 3d 91 3a 24 51 25 3d 22 56 61 72 69 61 |na%=.:$Q%="Varia| 000086c0 62 6c 65 22 3a 51 25 21 31 32 3d 34 35 39 32 37 |ble":Q%!12=45927| 000086d0 31 3a 51 25 21 31 36 3d 39 36 3a 51 25 21 32 30 |1:Q%!16=96:Q%!20| 000086e0 3d 34 34 3a 51 25 21 32 34 3d 30 3a 51 25 21 32 |=44:Q%!24=0:Q%!2| 000086f0 38 3d 31 33 32 3a 51 25 21 33 32 3d 2d 31 3a 51 |8=132:Q%!32=-1:Q| 00008700 25 21 33 36 3d 26 37 30 30 39 31 30 31 3a 51 25 |%!36=&7009101:Q%| 00008710 21 34 30 3d 42 61 25 3a 51 25 21 34 34 3d 46 63 |!40=Ba%:Q%!44=Fc| 00008720 25 3a 51 25 21 34 38 3d 38 3a c8 99 22 4f 53 5f |%:Q%!48=8:.."OS_| 00008730 47 53 54 72 61 6e 73 22 2c 22 3c 4b 65 79 73 74 |GSTrans","<Keyst| 00008740 72 6f 6b 65 25 56 61 72 3e 22 2c 71 25 2c 38 31 |roke%Var>",q%,81| 00008750 39 32 0d 59 92 f0 24 42 61 25 3d a4 61 28 71 25 |92.Y..$Ba%=.a(q%| 00008760 29 3a 24 46 63 25 3d 22 61 30 2d 39 5c 2d 22 3a |):$Fc%="a0-9\-":| 00008770 24 52 25 3d 22 49 6e 63 72 65 6d 65 6e 74 22 3a |$R%="Increment":| 00008780 52 25 21 31 32 3d 34 35 39 32 37 31 3a 52 25 21 |R%!12=459271:R%!| 00008790 31 36 3d 39 36 3a 52 25 21 32 30 3d 34 34 3a 52 |16=96:R%!20=44:R| 000087a0 25 21 32 34 3d 30 3a 52 25 21 32 38 3d 31 33 32 |%!24=0:R%!28=132| 000087b0 3a 52 25 21 33 32 3d 2d 31 3a 52 25 21 33 36 3d |:R%!32=-1:R%!36=| 000087c0 26 37 30 30 39 31 30 31 3a 52 25 21 34 30 3d 43 |&7009101:R%!40=C| 000087d0 61 25 3a 52 25 21 34 34 3d 46 63 25 3a 52 25 21 |a%:R%!44=Fc%:R%!| 000087e0 34 38 3d 38 3a c8 99 22 4f 53 5f 47 53 54 72 61 |48=8:.."OS_GSTra| 000087f0 6e 73 22 2c 22 3c 4b 65 79 73 74 72 6f 6b 65 25 |ns","<Keystroke%| 00008800 49 6e 63 3e 22 2c 43 61 25 2c 38 3a 48 25 3d 32 |Inc>",Ca%,8:H%=2| 00008810 35 38 38 2b 6b 25 3a 42 25 3d 31 33 3a 72 25 3d |588+k%:B%=13:r%=| 00008820 32 3a f2 49 3a 77 25 3d a3 3a e3 6d 61 25 3d 30 |2:.I:w%=.:.ma%=0| 00008830 b8 31 32 37 3a f3 63 25 28 6d 61 25 29 3a ed 6d |.127:.c%(ma%):.m| 00008840 61 25 0d 5a 14 6d e3 6d 61 25 3d 30 b8 39 36 3a |a%.Z.m.ma%=0.96:| 00008850 f3 61 24 28 6d 61 25 29 3a ed 6d 61 25 3a 49 63 |.a$(ma%):.ma%:Ic| 00008860 25 3d 67 25 2b 31 32 3a e3 49 25 3d 30 b8 39 36 |%=g%+12:.I%=0.96| 00008870 3a f3 45 24 3a e3 4a 25 3d 30 b8 37 3a e7 c1 45 |:.E$:.J%=0.7:..E| 00008880 24 2c 4a 25 2b 31 2c 31 29 3d 22 31 22 8c 61 25 |$,J%+1,1)="1".a%| 00008890 28 49 25 2c 4a 25 29 3d 49 63 25 3a 49 63 25 2b |(I%,J%)=Ic%:Ic%+| 000088a0 3d 34 8b 61 25 28 49 25 2c 4a 25 29 3d 2d 31 0d |=4.a%(I%,J%)=-1.| 000088b0 5a 64 9b ed 4a 25 3a ed 49 25 3a 76 61 25 3d 2d |Zd..J%:.I%:va%=-| 000088c0 31 3a 55 25 3d 2d 31 3a 6c 24 3d 22 4b 65 79 64 |1:U%=-1:l$="Keyd| 000088d0 65 66 73 22 3a 6f 24 3d 22 4c 69 73 74 22 3a 75 |efs":o$="List":u| 000088e0 24 3d 22 21 45 78 65 63 75 74 6f 72 22 3a 21 70 |$="!Executor":!p| 000088f0 25 3d 2d 31 3a 4a 63 25 3d 32 35 35 3a 67 62 25 |%=-1:Jc%=255:gb%| 00008900 3d 2d 31 35 31 39 36 32 32 35 3a e3 49 25 3d 30 |=-15196225:.I%=0| 00008910 b8 79 62 25 3a 62 24 28 49 25 29 3d 22 22 3a ed |.yb%:b$(I%)="":.| 00008920 49 25 3a f2 67 61 3a f2 69 3a f2 61 28 65 25 2c |I%:.ga:.i:.a(e%,| 00008930 31 30 2c 31 3c 3c 32 32 2c b9 29 3a f2 63 3a 4b |10,1<<22,.):.c:K| 00008940 63 25 3d a3 3a e7 44 63 25 8c 0d 5b 22 2a c8 99 |c%=.:.Dc%..["*..| 00008950 22 4f 53 5f 52 65 61 64 53 79 73 49 6e 66 6f 22 |"OS_ReadSysInfo"| 00008960 2c 32 b8 2c 2c 4b 63 25 3a 4b 63 25 3d 28 4b 63 |,2.,,Kc%:Kc%=(Kc| 00008970 25 3d 31 29 0d 5b 40 05 cd 0d 5b 40 09 e7 4b 63 |%=1).[@...[@..Kc| 00008980 25 8c 0d 5b 4a 2d 61 24 28 35 35 29 3d 22 23 22 |%..[J-a$(55)="#"| 00008990 3a 61 24 28 36 32 29 3d 22 5c 22 3a 63 25 28 39 |:a$(62)="\":c%(9| 000089a0 34 29 3d 36 32 3a 63 25 28 34 36 29 3d 2d 31 0d |4)=62:c%(46)=-1.| 000089b0 5b 7c 05 cd 0d 5b 7c 0b 64 61 25 3d a3 3a e1 0d |[|...[|.da%=.:..| 000089c0 5b 90 04 0d 5b b8 35 dc 20 2d 31 2c 2d 31 2c 2d |[...[.5. -1,-1,-| 000089d0 31 2c 2d 31 2c 2d 31 2c 2d 31 2c 2d 31 2c 2d 31 |1,-1,-1,-1,-1,-1| 000089e0 2c 2d 31 2c 39 34 2c 39 35 2c 39 36 2c 2d 31 2c |,-1,94,95,96,-1,| 000089f0 2d 31 2c 2d 31 2c 2d 31 0d 5b b8 35 dc 20 32 39 |-1,-1,-1.[.5. 29| 00008a00 2c 34 32 2c 34 33 2c 34 34 2c 20 34 2c 34 37 2c |,42,43,44, 4,47,| 00008a10 20 37 2c 35 30 2c 34 35 2c 37 35 2c 38 33 2c 38 | 7,50,45,75,83,8| 00008a20 34 2c 31 31 2c 31 32 2c 31 30 2c 2d 31 0d 5b c2 |4,11,12,10,-1.[.| 00008a30 35 dc 20 20 30 2c 33 35 2c 31 37 2c 33 32 2c 34 |5. 0,35,17,32,4| 00008a40 36 2c 32 31 2c 34 38 2c 33 39 2c 35 30 2c 37 36 |6,21,48,39,50,76| 00008a50 2c 38 35 2c 38 36 2c 36 30 2c 36 31 2c 36 32 2c |,85,86,60,61,62,| 00008a60 36 33 0d 5b cc 35 dc 20 34 30 2c 34 31 2c 31 36 |63.[.5. 40,41,16| 00008a70 2c 33 30 2c 34 35 2c 33 33 2c 32 37 2c 32 38 2c |,30,45,33,27,28,| 00008a80 35 34 2c 37 33 2c 38 37 2c 38 38 2c 39 33 2c 36 |54,73,87,88,93,6| 00008a90 34 2c 36 35 2c 36 36 0d 5b d6 35 dc 20 2d 31 2c |4,65,66.[.5. -1,| 00008aa0 31 33 2c 33 36 2c 31 38 2c 33 37 2c 32 32 2c 32 |13,36,18,37,22,2| 00008ab0 33 2c 34 31 2c 35 37 2c 37 31 2c 39 30 2c 2d 31 |3,41,57,71,90,-1| 00008ac0 2c 38 39 2c 2d 31 2c 36 37 2c 36 38 0d 5b e0 35 |,89,-1,67,68.[.5| 00008ad0 dc 20 2d 31 2c 33 31 2c 31 35 2c 31 39 2c 32 30 |. -1,31,15,19,20| 00008ae0 2c 32 36 2c 32 34 2c 35 37 2c 35 36 2c 37 30 2c |,26,24,57,56,70,| 00008af0 39 31 2c 39 32 2c 2d 31 2c 35 31 2c 2d 31 2c 2d |91,92,-1,51,-1,-| 00008b00 31 0d 5b ea 35 dc 20 35 39 2c 33 38 2c 36 39 2c |1.[.5. 59,38,69,| 00008b10 33 34 2c 31 34 2c 32 35 2c 34 39 2c 35 32 2c 35 |34,14,25,49,52,5| 00008b20 33 2c 37 32 2c 37 37 2c 37 38 2c 38 30 2c 2d 31 |3,72,77,78,80,-1| 00008b30 2c 2d 31 2c 2d 31 0d 5b f4 35 dc 20 35 38 2c 20 |,-1,-1.[.5. 58, | 00008b40 31 2c 20 32 2c 20 33 2c 20 35 2c 20 36 2c 20 38 |1, 2, 3, 5, 6, 8| 00008b50 2c 20 39 2c 35 35 2c 37 34 2c 38 31 2c 38 32 2c |, 9,55,74,81,82,| 00008b60 37 39 2c 2d 31 2c 2d 31 2c 2d 31 0d 5b fe 04 0d |79,-1,-1,-1.[...| 00008b70 5c 12 3d dc 20 50 72 69 6e 74 20 28 46 30 29 2c |\.=. Print (F0),| 00008b80 46 31 2c 46 32 2c 46 33 2c 46 34 2c 46 35 2c 46 |F1,F2,F3,F4,F5,F| 00008b90 36 2c 46 37 2c 46 38 2c 46 39 2c 46 31 30 2c 46 |6,F7,F8,F9,F10,F| 00008ba0 31 31 2c 46 31 32 2c 41 2c 42 2c 43 0d 5c 12 25 |11,F12,A,B,C.\.%| 00008bb0 dc 20 44 2c 45 2c 46 2c 47 2c 48 2c 49 2c 4a 2c |. D,E,F,G,H,I,J,| 00008bc0 4b 2c 4c 2c 4d 2c 4e 2c 4f 2c 50 2c 51 2c 52 2c |K,L,M,N,O,P,Q,R,| 00008bd0 53 0d 5c 1c 25 dc 20 54 2c 55 2c 56 2c 57 2c 58 |S.\.%. T,U,V,W,X| 00008be0 2c 59 2c 5a 2c 30 2c 31 2c 32 2c 33 2c 34 2c 35 |,Y,Z,0,1,2,3,4,5| 00008bf0 2c 36 2c 37 2c 38 0d 5c 26 55 dc 20 39 2c 22 2c |,6,7,8.\&U. 9,",| 00008c00 22 2c 22 2d 22 2c 22 3d 22 2c 22 2e 22 2c 22 2f |","-","=",".","/| 00008c10 22 2c 22 5b 22 2c 22 5c 22 2c 22 5d 22 2c 22 3b |","[","\","]",";| 00008c20 22 2c 45 73 63 61 70 65 2c 54 61 62 2c 42 72 65 |",Escape,Tab,Bre| 00008c30 61 6b 2c 42 61 63 6b 20 74 69 63 6b 2c 22 a3 22 |ak,Back tick,"."| 00008c40 2c 42 61 63 6b 20 73 70 61 63 65 0d 5c 30 3f dc |,Back space.\0?.| 00008c50 20 49 6e 73 65 72 74 2c 48 6f 6d 65 2c 50 61 67 | Insert,Home,Pag| 00008c60 65 20 55 70 2c 50 61 67 65 20 44 6f 77 6e 2c 22 |e Up,Page Down,"| 00008c70 27 22 2c 53 70 61 63 65 20 62 61 72 2c 44 65 6c |'",Space bar,Del| 00008c80 65 74 65 2c 52 65 74 75 72 6e 0d 5c 3a 50 dc 20 |ete,Return.\:P. | 00008c90 43 6f 70 79 2c 55 70 20 61 72 72 6f 77 2c 52 69 |Copy,Up arrow,Ri| 00008ca0 67 68 74 20 61 72 72 6f 77 2c 4c 65 66 74 20 61 |ght arrow,Left a| 00008cb0 72 72 6f 77 2c 44 6f 77 6e 20 61 72 72 6f 77 2c |rrow,Down arrow,| 00008cc0 4b 65 79 70 61 64 20 30 2c 4b 65 79 70 61 64 20 |Keypad 0,Keypad | 00008cd0 31 2c 4b 65 79 70 61 64 20 32 0d 5c 44 4d dc 20 |1,Keypad 2.\DM. | 00008ce0 4b 65 79 70 61 64 20 33 2c 4b 65 79 70 61 64 20 |Keypad 3,Keypad | 00008cf0 34 2c 4b 65 79 70 61 64 20 35 2c 4b 65 79 70 61 |4,Keypad 5,Keypa| 00008d00 64 20 36 2c 4b 65 79 70 61 64 20 37 2c 4b 65 79 |d 6,Keypad 7,Key| 00008d10 70 61 64 20 38 2c 4b 65 79 70 61 64 20 39 2c 4b |pad 8,Keypad 9,K| 00008d20 65 79 70 61 64 20 2b 0d 5c 4e 52 dc 20 4b 65 79 |eypad +.\NR. Key| 00008d30 70 61 64 20 2d 2c 4b 65 79 70 61 64 20 2e 2c 4b |pad -,Keypad .,K| 00008d40 65 79 70 61 64 20 2f 2c 4b 65 79 70 61 64 20 23 |eypad /,Keypad #| 00008d50 2c 4b 65 79 70 61 64 20 2a 2c 4b 65 79 70 61 64 |,Keypad *,Keypad| 00008d60 20 45 6e 74 65 72 2c 53 65 6c 65 63 74 2c 4d 65 | Enter,Select,Me| 00008d70 6e 75 2c 41 64 6a 75 73 74 0d 5c 58 04 0d 5c 6c |nu,Adjust.\X..\l| 00008d80 4d dc 20 31 31 31 31 31 31 31 31 2c 31 31 31 31 |M. 11111111,1111| 00008d90 31 31 31 31 2c 31 31 31 31 31 31 31 31 2c 31 31 |1111,11111111,11| 00008da0 31 31 31 31 31 31 2c 31 31 31 31 31 31 31 31 2c |111111,11111111,| 00008db0 31 31 31 31 31 31 31 31 2c 31 31 31 31 31 31 31 |11111111,1111111| 00008dc0 31 2c 31 31 31 31 31 31 31 31 0d 5c 6c 4d dc 20 |1,11111111.\lM. | 00008dd0 31 31 31 31 31 31 31 31 2c 31 31 31 31 31 31 31 |11111111,1111111| 00008de0 31 2c 31 31 31 31 31 31 31 31 2c 31 31 31 31 31 |1,11111111,11111| 00008df0 31 31 31 2c 31 31 31 31 31 31 31 31 2c 30 30 31 |111,11111111,001| 00008e00 31 31 31 31 31 2c 30 30 31 31 31 31 31 31 2c 30 |11111,00111111,0| 00008e10 30 31 31 31 31 31 31 0d 5c 76 4d dc 20 30 30 31 |0111111.\vM. 001| 00008e20 31 31 31 31 31 2c 30 30 31 31 31 31 31 31 2c 30 |11111,00111111,0| 00008e30 30 31 31 31 31 31 31 2c 30 30 31 31 31 31 31 31 |0111111,00111111| 00008e40 2c 30 30 31 31 31 31 31 31 2c 30 30 31 31 31 31 |,00111111,001111| 00008e50 31 31 2c 30 30 31 31 31 31 31 31 2c 30 30 31 31 |11,00111111,0011| 00008e60 31 31 31 31 0d 5c 80 4d dc 20 30 30 31 31 31 31 |1111.\.M. 001111| 00008e70 31 31 2c 30 30 31 31 31 31 31 31 2c 30 30 31 31 |11,00111111,0011| 00008e80 31 31 31 31 2c 30 30 31 31 31 31 31 31 2c 30 30 |1111,00111111,00| 00008e90 31 31 31 31 31 31 2c 30 30 31 31 31 31 31 31 2c |111111,00111111,| 00008ea0 30 30 31 31 31 31 31 31 2c 30 30 31 31 31 31 31 |00111111,0011111| 00008eb0 31 0d 5c 8a 4d dc 20 30 30 31 31 31 31 31 31 2c |1.\.M. 00111111,| 00008ec0 30 30 31 31 31 31 31 31 2c 30 30 31 31 31 31 31 |00111111,0011111| 00008ed0 31 2c 30 30 31 31 31 31 31 31 2c 30 30 31 31 31 |1,00111111,00111| 00008ee0 31 31 31 2c 30 30 31 31 31 31 31 31 2c 30 30 31 |111,00111111,001| 00008ef0 31 31 31 31 31 2c 30 30 31 31 31 31 31 31 0d 5c |11111,00111111.\| 00008f00 94 4d dc 20 30 30 31 31 31 31 31 31 2c 30 30 31 |.M. 00111111,001| 00008f10 31 31 31 31 31 2c 30 30 31 31 31 31 31 31 2c 30 |11111,00111111,0| 00008f20 30 31 31 31 31 31 31 2c 30 30 31 31 31 31 31 31 |0111111,00111111| 00008f30 2c 30 30 31 31 31 31 31 31 2c 30 30 31 31 31 31 |,00111111,001111| 00008f40 31 31 2c 30 30 31 31 31 31 31 31 0d 5c 9e 4d dc |11,00111111.\.M.| 00008f50 20 30 30 31 31 31 31 31 31 2c 30 30 31 31 31 31 | 00111111,001111| 00008f60 31 31 2c 30 30 31 31 31 31 31 31 2c 30 30 31 31 |11,00111111,0011| 00008f70 31 31 31 31 2c 30 30 31 31 31 31 31 31 2c 30 30 |1111,00111111,00| 00008f80 31 31 31 31 31 31 2c 30 30 31 31 31 31 31 31 2c |111111,00111111,| 00008f90 30 30 31 31 31 31 31 31 0d 5c a8 4d dc 20 30 30 |00111111.\.M. 00| 00008fa0 31 31 31 31 31 31 2c 30 30 31 31 31 31 31 31 2c |111111,00111111,| 00008fb0 31 31 31 31 31 31 31 31 2c 31 31 31 31 31 31 31 |11111111,1111111| 00008fc0 31 2c 31 30 30 30 31 30 30 30 2c 30 30 31 31 31 |1,10001000,00111| 00008fd0 31 31 31 2c 30 30 31 31 31 31 31 31 2c 30 30 31 |111,00111111,001| 00008fe0 31 31 31 31 31 0d 5c b2 4d dc 20 31 31 31 31 31 |11111.\.M. 11111| 00008ff0 31 31 31 2c 31 31 31 31 31 31 31 31 2c 31 31 31 |111,11111111,111| 00009000 31 31 31 31 31 2c 31 31 31 31 31 31 31 31 2c 30 |11111,11111111,0| 00009010 30 31 31 31 31 31 31 2c 30 30 31 31 31 31 31 31 |0111111,00111111| 00009020 2c 30 30 31 31 31 31 31 31 2c 30 30 31 31 31 31 |,00111111,001111| 00009030 31 31 0d 5c bc 4d dc 20 30 30 31 31 31 31 31 31 |11.\.M. 00111111| 00009040 2c 31 31 31 31 31 31 31 31 2c 31 31 31 31 31 31 |,11111111,111111| 00009050 31 31 2c 31 31 31 31 31 31 31 31 2c 31 31 31 31 |11,11111111,1111| 00009060 31 31 31 31 2c 30 31 31 31 31 31 31 31 2c 30 31 |1111,01111111,01| 00009070 31 31 31 31 31 31 2c 30 31 31 31 31 31 31 31 0d |111111,01111111.| 00009080 5c c6 4d dc 20 30 31 31 31 31 31 31 31 2c 30 31 |\.M. 01111111,01| 00009090 31 31 31 31 31 31 2c 30 31 31 31 31 31 31 31 2c |111111,01111111,| 000090a0 30 31 31 31 31 31 31 31 2c 30 31 31 31 31 31 31 |01111111,0111111| 000090b0 31 2c 30 31 31 31 31 31 31 31 2c 30 31 31 31 31 |1,01111111,01111| 000090c0 31 31 31 2c 30 31 31 31 31 31 31 31 0d 5c d0 56 |111,01111111.\.V| 000090d0 dc 20 30 31 31 31 31 31 31 31 2c 30 31 31 31 31 |. 01111111,01111| 000090e0 31 31 31 2c 30 31 31 31 31 31 31 31 2c 30 31 31 |111,01111111,011| 000090f0 31 31 31 31 31 2c 30 31 31 31 31 31 31 31 2c 30 |11111,01111111,0| 00009100 31 31 31 31 31 31 31 2c 30 31 31 31 31 31 31 31 |1111111,01111111| 00009110 2c 30 31 31 31 31 31 31 31 2c 30 31 31 31 31 31 |,01111111,011111| 00009120 31 31 0d ff |11..| 00009124