Home » Archimedes archive » Archimedes World » AW-1994-11-Disc2.adf » Disk2Nov94 » !AWNov94/Goodies/UNCFS/!UnCFS/!RunImage
!AWNov94/Goodies/UNCFS/!UnCFS/!RunImage
This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.
Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.
Tape/disk: | Home » Archimedes archive » Archimedes World » AW-1994-11-Disc2.adf » Disk2Nov94 |
Filename: | !AWNov94/Goodies/UNCFS/!UnCFS/!RunImage |
Read OK: | ✔ |
File size: | 8552 bytes |
Load address: | 0000 |
Exec address: | 0000 |
File contents
1REM>!RunImage 2REMProduced by BasCompress v1.31 (18 Jan 1993) 3DIMM$(3):M$()="|","iconsprites","stripcfs","forcecfs":y$="uncfs":PROCd_("UnCFS",FALSE):END 4DEFPROCR_(M%)ENDPROC 5DEFPROCPyLOCALQ%:!a=TRUE:!w=FALSE:!_=TRUE:!O=TRUE:SYS&2001e,18,"CFSUtil"+CHR$(0)TO;Q%:IFFNF(Q%)THEN 6IFFNG(2,FNS(15)) 7ENDIF:ENDPROC 8DEFFNDy(E%,E$,N%)LOCALG%,l_%:PROCD(E$):G%=FALSE:l_%=TRUE:CASETRUEOF 9WHENFNN(E$,Z$(N%)):l_%=FALSE 10WHENFNW<>Jy 11WHENFNN("CFS#"+E$,Z$(N%)) 12WHENFNW<>E%(N%) 13OTHERWISEG%=TRUE 14ENDCASE:IFl_%THEN 15PROCn(E%) 16ENDIF:=G% 17DEFPROCv(E%,E$,C$,N$)LOCALX%,D%,J%,g%,Wy%,Ay%,M$,Q%:PROCD(E$):E$+="."+C$:PROCU(E%,E$):M$="CFS#"+E$:SYS8,5,M$TO,,g%,Wy%,D%,Ay%:IF(Ay%AND1)=0THEN 18PROCz(E%,8,M$) 19ELSEIFFNP(X%,D%+1)THEN 20PROCO(E%,FALSE) 21ELSELOCALERROR:ONERRORLOCALRESTOREERROR:PROCZ(X%):PROCH 22LOCALERROR:ONERRORLOCALRESTOREERROR:PROCl(E%,X%,M$):ENDPROC 23PROCf(M$,X%):RESTOREERROR:IFFNj(X%,D%,N$)THEN 24N$="" 25ENDIF:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCu(E%,X%,M$):ENDPROC 26SYS13,139,E$TOJ%:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCRy(J%,M$,g%,Wy%,X%,D%,Ay%) 27IFN$<>""THEN 28SYS12,2,J%,N$,LEN(N$) 29ENDIF:SYS12,2,J%,X%,D%:RESTOREERROR:CLOSE#J%:SYS8,1,E$,g%,Wy%,,Ay%:RESTOREERROR:PROCO(E%,TRUE):RESTOREERROR:PROCZ(X%) 30ENDIF 31ENDIF:ENDPROC 32DEFFNj(ly%,D%,RETURNN$)LOCALG%:IFN$=""THEN 33G%=FALSE 34ELSEG%=D%>=LEN(N$):N%=1:WHILEN%<=LEN(N$)ANDG%:G%=(ASC(MID$(N$,N%,1))=ly%?(N%-1)):N%+=1:ENDWHILE 35ENDIF:=G% 36DEFPROCjy(E%,E$)E%!W=-2:PROCD(E$):E$="CFS#"+E$:CASETRUEOF 37WHENFNN(E$,"!Boot") 38WHENFNW<>f 39OTHERWISEPROCn(E%):PROCq_(E%,E$) 40ENDCASE:ENDPROC 41DEFPROCq_(E%,c$)LOCALX%,D%,J%,g%,Wy%,Ay%,Q%,M$:PROCD(c$):E$=c$+".!Boot":PROCU(E%,E$):M$="CFS#"+E$:SYS8,5,M$TO,,g%,Wy%,D%,Ay%:IF(Ay%AND1)=0THEN 42PROCz(E%,8,E$) 43ELSEIFFNP(X%,D%+1)THEN 44PROCO(E%,FALSE) 45ELSELOCALERROR:ONERRORLOCALRESTOREERROR:PROCZ(X%):PROCH 46LOCALERROR:ONERRORLOCALRESTOREERROR:PROCl(E%,X%,M$):ENDPROC 47PROCf(M$,X%):RESTOREERROR:IFFNHy(X%,D%)THEN 48IFNOTFNo(E%,c$)THEN 49LOCALERROR:ONERRORLOCALRESTOREERROR:PROCu(E%,X%,E$):ENDPROC 50SYS8,6,E$:RESTOREERROR:PROCO(E%,TRUE) 51ENDIF 52ENDIF:RESTOREERROR:PROCZ(X%) 53ENDIF 54ENDIF:PROCU(E%,""):ENDPROC 55DEFFNHy(ly%,D%)LOCALf%,G%,Q$,N%:f%=0:G%=f%<D%:WHILEG%ANDFNt(ly%,D%,f%,Q$):N%=DIM(M$(),1):WHILEG%ANDN%>=0:G%=(INSTR(Q$,M$(N%))<>1):N%-=1:ENDWHILE:G%=NOTG%:ENDWHILE:=G% 56DEFFNt(ly%,D%,RETURNf%,RETURNQ$)REPEATQ$="":WHILEf%<D%ANDFNXy(ly%?f%):f%+=1:ENDWHILE:WHILEf%<D%AND(NOTFNd(ly%?f%)):Q$+=FNFy(ly%?f%):f%+=1:ENDWHILE:UNTIL(Q$="")OR(ASC(Q$)<>ASC("|")):=Q$<>"" 57DEFFNXy(Q%)LOCALG%:G%=TRUE:CASEQ%OF 58WHENASC"*" 59WHENASC" " 60WHEN9 61OTHERWISEG%=FNd(Q%) 62ENDCASE:=G% 63DEFFNd(Q%)=((Q%=10)OR(Q%=13)) 64DEFFNFy(Q%)IFQ%>=ASC("A")ANDQ%<=ASC("Z")THEN 65Q%+=ASC("a")-ASC("A") 66ENDIF:=CHR$(Q%) 67DEFPROCI_LOCALF%,N%,F_%:F_%=0:FORN%=0TODIM(A$(),1):SYS46,280,e%,A$(N%):IFF_%<LEN(A$(N%))THENF_%=LEN(A$(N%)) 68NEXTN%:DIMf_%F_%+2:p=0:F%=FNA(512):F%!0=-1:F%!4=0:F%!8=0:F%!12=68:F%!16=68:F%!20=12674:F%!24=f_%:$f_%=A$(p)+CHR$(0):F%!28=e%:F%!32=F_%+1:SYS&400c2,,F%TOV_%:PROCC(F%,512):ENDPROC 69DEFFNo(E%,E$)LOCALG%,M$,g%,Wy%,D%,Ay%:M$="CFS#"+E$:CASETRUEOF 70WHENFNN(M$,"!Run") 71WHENFNW=f:G%=FNEy(E%,M$+".!Run") 72ENDCASE:=G% 73DEFFNEy(E%,M$)LOCALG%,D%,Ay%,X%:LOCALf%,Q$,N%:SYS8,5,M$TO,,,,D%,Ay%:IFAy%AND1THEN 74IFFNP(X%,D%+1)=0THEN 75LOCALERROR:ONERRORLOCALRESTOREERROR:PROCZ(X%):PROCH 76PROCf(M$,X%):f%=0:G%=f%<D%:WHILEG%ANDFNt(X%,D%,f%,Q$):G%=G%AND(INSTR(Q$,"!boot")=0):ENDWHILE:G%=NOTG%:RESTOREERROR:PROCZ(X%) 77ENDIF 78ENDIF:=G% 79DEFPROCAyCASEW%!16OF 80WHEN1282:PROCN_ 81WHEN&400c0:PROCS_ 82WHEN3:PROCf_ 83WHEN&400c1:PROCSy 84WHEN8:PROCIy 85WHEN&400cc:PROCmy 86WHEN10:PROCO_ 87WHEN0:PROCS 88ENDCASE:ENDPROC 89DEFPROCw_SYS&400c5,,W%:ENDPROC 90DEFPROCiySYS&400c6,,W%:ENDPROC 91DEFPROCb_IF!W%=V%THEN 92PROCM_(W%!4,W%!24) 93ELSESYS&400dc,W%!24 94ENDIF:ENDPROC 95DEFPROCtyLOCALQJ%,IJ%:IJ%=TRUE:REPEATSYS&400c7,Oy%,W%TOQJ%:CASEQJ%OF 96WHEN0:PROCt_ 97WHEN2:PROCw_ 98WHEN3:PROCiy 99WHEN6:PROCD_ 100WHEN8:PROCb_ 101WHEN9:PROCr_ 102WHEN17:PROCAy 103WHEN18:PROCH_ 104ENDCASE:UNTILNOT(IJ%):ENDPROC 105DEFPROC_yLOCALa%,SJ%,Z$:LOCALDATA:RESTORE+0:IFZ_%THEN 106a%=!(FNC("ProgInfo")+F+88+(By<<5)+20) 107ELSEa%=FNl(s%,By) 108ENDIF:READZ$:SJ%=ASC(Z$):Z$=MID$(Z$,2):WHILEZ$<>"":?a%=ASC(Z$)EORSJ%:Z$=MID$(Z$,2):a%+=1:ENDWHILE:?a%=0 109DATA"�����������",,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,, 110ENDPROC 111DEFPROCU_SYS&465c6,Y%,j%:SYS&dcb8d,ty,!j%,-1:ENDPROC 112DEFPROCx_DIMj%4:!j%=0:PROCT("ShareWare",+1,""):IFFN_("ShareWare",j%,VJ%) 113ENDPROC 114DEFPROCd_(f$,Qy%)ONERRORPROCx 115PROCTy(20,12):Vy%=-2:sy%=FALSE:Uy%=FALSE:Uy%=FALSE:sy%=TRUE:Vy%=-3:PROCA("<BasicV$Lib>.CAsm",1):PROCA("<BasicV$Lib>.Template",21):O_%=sy%:i%=+1 116AJ%=TRUE:ky%=0:`y%=0:PROCT_("stdio, stdlib, string, message, wimp"):PROCky(2000,FALSE,FALSE):PROCA("<BasicV$Lib>.ModeInfo",1):PROCA("<BasicV$Lib>.Wimp",28) 117PROCA("<BasicV$Lib>.FileType",2):PROCA("<BasicV$Lib>.file_io",9):PROCA("<BasicV$Lib>.string",6):m%=FNg("<UnCFS$Dir>",-1,D_%):IFD_%>0THEN 118ERROR!m%,"UnCFS can't load its' message file: "+FNU(m%+4) 119ENDIF:IFQy%THENQy%=2ELSEQy%=1 120PROC_("Patching",Qy%):PROC_("patching",Qy%):PROC_("patched",Qy%):PROC_("patch",Qy%):b$="ForceCFS"+CHR$(10):NJ%=0:XJ%=1:dJ%=2:FJ%=0:j_%=0:v_%=1:t_%=2:z_%=3:x_%=4:UJ%=6:BJ%=7:JJ%=8:oJ%=9:Xy=60-1:u=2:v=4:X=5:U=7:H=9:V=11:Y=13:P=14 121Oy=17:Q=18:Zy%=0:DIMZ$(5):Z$()="!Boot","!Run","!Sprites22","!Sprites23","!Sprites33","!Sprites32":DIME%(DIM(Z$(),1)):E%()=f,f,b,b,b,b:DIMA$(1):A$()="!uncfs","busy":Wu%=FALSE:Z_%=TRUE:n%=TRUE:U$="&502,&400c0,3,&400c1,8,&400cc,10":PROCYy(f$,1,20,23,7,1994):Uy%=sy%:PROCDy:PROCU_ 122ONERRORPROCx 123PROCvy:REPEATPROCty:UNTILFALSE:END:ENDPROC 124DEFPROCrLOCALuy,y:t=0<<2:T=1<<2:J=2<<2:E=3<<2:q=4<<2:s=5<<2:R=6<<2:K=7<<2:S=8<<2:n=9<<2:G=10<<2:W=12<<2:Fy=13<<2:Sy=14<<2:Ly=15<<2:Vy=16<<2:M=17<<2:r=18<<2:Zy=19<<2:Uy=0<<2:Hy=1<<2:o=2<<2:L=3<<2:D=0:I=1:B=2:x=3:d=4:C=5:[OPTU%:ALIGN 125.uy EQUS"[0,w>,>,>":DCB0:.Ky EQUS"[100,<t>":DCB0:ALIGN:.y DCD0:.a DCD0:.w DCD0:._ DCD0:.O DCD0:ALIGN:.gy:FNJ:STMFD(A)!,{4-9,Z}:MOV1,#0:ADR0,uy:BL Wy:STRvc0,y 126ADRvc0,y:LDMFD(A)!,{4-9,pc}:.Ty:FNJ:STMFD(A)!,{4-9,Z}:LDR0,[0,#M]:STMFD(A)!,{0}:MOV1,#0:ADR0,Ky:BL Wy:ADD A,A,#1<<2:STRvc0,y:ADRvc0,y:LDMFD(A)!,{4-9,pc}:]:PROCL_:ENDPROC 127DEFPROCjENDPROC 128DEFPROCa_:ty%=-12314:PROCT("FConvert",+1,"StatusW"):PROCT("Choices",+1,"ChoicesW"):V%=0:vu%=0:PROCx_:PROC_y:ENDPROC 129DEFFNStatusW(M%)PROCR_(M%):OJ%=M%!16:qJ%=M%!20:bJ%=M%!8-M%!0:MJ%=M%!12-M%!4:o_%=M%!48-M%!40:Y_%=M%!52-M%!44:PROCP(M%,X,FNE("None")) 130PROCP(M%,X+1,FNE("FScan0")):PROCP(M%,U,FNE("None")):PROCP(M%,U+1,FNE("FConv0")):PROCP(M%,H,FNE("None")):PROCP(M%,H+1,FNE("AScan0")):PROCP(M%,V,FNE("None")) 131PROCP(M%,V+1,FNE("AConv0")):PROCP(M%,v,""):PROCP(M%,u,""):PROCP(M%,Y,FNE("Abrt")):PROCP(M%,v-1,FNE("Patching")):PROCs(M%!72,LEFT$(FNE("Title"),M%!80-1)):=0 132DEFFNChoicesW(M%)PROCs(M%!72,LEFT$(FNE("Choices"),M%!80-1)):=0 133DEFPROCP(M%,N%,Y$)N%=M%+88+(N%*32):PROCs(N%!20,LEFT$(Y$,N%!28-1)):ENDPROC 134DEFPROCB_(c%,b%,_%,T%)c%=FNG(1,FNS(2)):ENDPROC 135DEFFNf(M%,RETURNE%)LOCALjy%:CASEM%OF 136WHEN-2 137WHENs% 138WHEN!j% 139WHENV% 140OTHERWISEE%=Zy%:jy%=FALSE:WHILEE%ANDNOTjy%:jy%=(M%=E%!E):IFNOTjy%THENE%=E%!T 141ENDWHILE:IFjy%THEN 142M%=ty% 143ENDIF 144ENDCASE:=M% 145DEFPROCN_LOCALA$,q%,T%,A%,N%,X%,E%:A$="":T%=W%!36:CASEFNf(W%!32,E%)OF 146WHEN-2:IFT%=V_%THEN 147A$="IconBar" 148ENDIF 149WHENs%:A$="ProgInfo" 150WHEN!j%:A$="ShareWare" 151WHENV%:A$="Choices":IFT%>=0THEN 152A$+=","+STR$(T%) 153ENDIF 154WHENty%:A$="Status":IFT%THEN 155A$+=","+STR$(T%) 156ENDIF:CASEE%!SOF 157WHENB,D,I:A$+=",P" 158WHENC:A$+=",S" 159WHENx:A$+=",C" 160WHENd:A$+=",D" 161ENDCASE 162OTHERWISEIF(U_%>218)AND(W%!36<>-1)THEN 163A$=FNCy 164ENDIF 165ENDCASE:IFA$<>""THEN 166PROCo("H"+A$,W%+20):IFW%?20THEN 167W%!16=1283:W%!12=W%!8:A%=W%+20:WHILE?A%:A%+=1:ENDWHILE:IFA%>=(W%+256)THENA%=W%+255:?A%=0 168W%!0=(A%-W%+4)AND-4:SYS&400e7,17,W%,W%!4 169ENDIF 170ENDIF:ENDPROC 171DEFFNCyLOCALA$,M%:M%=W%+40:SYS&400f4,1,M%,W%!32,W%!36:CASESy%OF 172WHENxy%:A$="I" 173WHENpy%:A$="D" 174ENDCASE:IFA$<>""THEN 175A$="M"+A$+STR$(!M%):WHILEM%!4<>-1:M%+=4:A$+="_,"+STR$(!M%):ENDWHILE 176ENDIF:=A$ 177DEFPROCSyPROCqy(-1):SYS&465c2,Y%:PROCsy:ENDPROC 178DEFPROCSONERROR:ONERROROFF:ERROREXT1,"Error in error handler: "+REPORT$ 179PROCHy:PROCQ_:CALLi:SYS&400dd:END:ENDPROC 180DEFPROCv_IFFNwTHEN 181PROCS 182ENDIF:ENDPROC 183DEFFNwLOCALqy%,E%:qy%=TRUE:E%=Zy%:WHILEE%ANDqy%:qy%=(E%!S=d):E%=E%!T:ENDWHILE:IFNOTqy%THEN 184qy%=(FNG(3,FNS(5))=1) 185ENDIF:=qy% 186DEFPROCIyIFFNwTHEN 187PROCS 188ELSEW%!12=W%!8:Iu%=W%!4:SYS&400e7,19,W%,W%!4 189ENDIF:ENDPROC 190DEFPROCD_LOCALc%,b%,_%,M%,T%,F_%,X%,E%:c%=W%!0:b%=W%!4:_%=W%!8:M%=FNf(W%!12,E%):T%=W%!16:CASE_%OF 191WHEN2:CASEM%OF 192WHEN-2:PROCp:b%=96+(44*HJ%)+(24*kJ%):SYS&400d4,,Iy%,c%-64,b% 193WHEN!j%:PROCQy 194WHENty%:PROCk(E%):SYS&400d4,,Iy%,c%-64,b% 195ENDCASE 196WHEN1*16,4*16:CASEM%OF 197WHENs%:PROCNy(c%,b%,_%,T%) 198ENDCASE 199OTHERWISECASEM%OF 200WHEN-2:PROCB_(c%,b%,_%,T%) 201WHENw_%:PROCry(c%,b%,_%,T%) 202WHENs%:PROCNy(c%,b%,_%,T%) 203WHEN!j%:PROCQy 204WHENty%:PROCK_(E%,T%,_%) 205WHENV%:PROCby(_%,T%) 206ENDCASE 207ENDCASE:ENDPROC 208DEFPROCQySYS&465c4,Y%,j%:PROCZ(VJ%):!j%=0:ENDPROC 209DEFPROCKy:Sy%=FALSE:xy%=&1040a31+0:py%=&1040a31+1:ENDPROC 210DEFPROCpLOCALA%:HJ%=3:kJ%=0:IFky%THENSYS&465c8,Y%,ky%,FALSE 211A%=USR(gy):Iy%=!A%:ky%=Iy%:SYS&465c7,Y%,ky%:Sy%=xy%:ENDPROC 212DEFPROCk(E%)LOCALA%:IFE%THEN 213K_%=E% 214ENDIF:IF`y%THENSYS&465c8,Y%,`y%,FALSE 215A%=K_%:A%=USR(Ty):Iy%=!A%:`y%=Iy%:SYS&465c7,Y%,`y%:Sy%=py%:ENDPROC 216DEFPROCS_LOCALc%,b%,M_%:c%=W%!24:b%=W%!28:M_%=W%!32:CASESy%OF 217WHENxy%:CASEM_%OF 218WHENNJ%:PROCFy:IFs%>0THEN 219PROCE(s%,0,FNE("App")):PROCE(s%,1,FNE("Purpose")):SYS&400e8,,s%,c%,b% 220ENDIF 221ENDCASE 222ENDCASE:ENDPROC 223DEFPROCr_LOCALM_%,F%,_J%,zJ%,iJ%,A%:F%=FNA(512):SYS&400cf,,F%:_J%=F%!0:zJ%=F%!4:iJ%=F%!8:PROCC(F%,512):M_%=!W%:CASESy%OF 224WHENxy%:CASEM_%OF 225WHENXJ%:PROC`y 226WHENdJ%:PROCv_ 227ENDCASE 228WHENpy%:CASEM_%OF 229WHENFJ%:PROCw(K_%) 230ENDCASE 231ENDCASE:IFiJ%=1THEN 232CASESy%OF 233WHENxy%:PROCp 234WHENpy%:PROCk(0) 235ENDCASE:SYS&400d4,,Iy%,_J%,zJ% 236ELSEPROCh 237ENDIF:ENDPROC 238DEFPROChSYS&400d4,,-1:Sy%=FALSE:ENDPROC 239DEFPROCHERRORERR,FNq:PROCS:ENDPROC 240DEFFNqLOCALw$:IFsy%THEN 241w$=REPORT$+" ["+STR$(ERL)+"]" 242ELSEw$=REPORT$ 243ENDIF:=w$ 244DEFPROCDyLOCALJ%:PROCPy:J%=OPENIN(FNM(Ky%)+".Choices"):IFJ%<>0THEN 245LOCALERROR:ONERRORLOCALRESTOREERROR:CLOSE#J%:ENDPROC 246INPUT#J%,!a:INPUT#J%,!w:INPUT#J%,!_:INPUT#J%,!O:RESTOREERROR:CLOSE#J% 247ENDIF:ENDPROC 248DEFPROCGyLOCALJ%:J%=OPENOUT(FNM(Ky%)+".Choices"):LOCALERROR:ONERRORLOCALRESTOREERROR:CLOSE#J%:ENDPROC 249PRINT#J%,!a:PRINT#J%,!w:PRINT#J%,!_:PRINT#J%,!O:RESTOREERROR:CLOSE#J%:ENDPROC 250DEFPROCByPROCPy:ENDPROC 251DEFPROCf_IF((W%!20=-2)AND(W%!24=V_%))THEN 252CASEW%!40OF 253WHENxy:PROCMy(FNM(W%+44),TRUE):W%!12=W%!8:W%!16=4:SYS&400e7,17,W%,W%!4 254WHENny:PROCMy(FNM(W%+44),FALSE):W%!12=W%!8:W%!16=4:SYS&400e7,17,W%,W%!4 255OTHERWISEIFFNG(1,FNS(3)) 256ENDCASE 257ENDIF:ENDPROC 258DEFPROCMy(E$,R_%)LOCALE%:PROCD(E$):IFFNP(E%,Zy+LEN(E$)+1)THEN 259ELSE$(E%+Zy)=E$:E%!J=0:E%!Fy=!a:E%!M=!w:E%!Sy=!_:E%!Ly=!O:E%!E=0:E%!r=FALSE:IFFNIy(E%)THEN 260PROCZ(E%) 261ELSEIFZy%=0THENPROCY(1) 262PROCc_(E%,Zy%):IFFNs(E%,E$,R_%)THEN 263PROCb(E%) 264ELSEPROCe(E%) 265ENDIF 266ENDIF 267ENDIF:ENDPROC 268DEFFN_Null_Reason_uncfs(E%)LOCALG%:SYS&606c0:SYS&20006,229,0,0:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCE_(E%):=TRUE 269G%=FALSE:REPEATCASEE%!SOF 270WHENB:PROCZ_(E%) 271WHEND:PROCfy(E%) 272WHENI:PROCY_(E%) 273WHENx,d,C:G%=TRUE 274ENDCASE:UNTILG%ORE%!Fy:RESTOREERROR:SYS&20006,229,255,0:SYS&606c1:=G% 275DEFPROCE_(E%)SYS&606c1:SYS&20006,229,255,0:IFERR=17THEN 276PROCJ(E%,x) 277ELSEPROCb(E%):PROCV(ERR,FNq) 278ENDIF:ENDPROC 279DEFPROCZ_(E%)LOCALG%,I%,E$:G%=FALSE:I%=E%!J:IFI%THEN 280E$=$(I%+L):IFFNO(E$,"*",I%!Uy)THEN 281IFFNWyTHEN 282IFFNs(E%,E$+"."+FNQ,ASC(FNQ)=ASC("!"))THEN 283G%=FNV(E%) 284ENDIF 285ENDIF 286ELSEG%=FNV(E%) 287ENDIF 288ELSEG%=TRUE 289ENDIF:IFG%THEN 290IFE%!S<>CTHEN 291PROCJ(E%,d) 292ENDIF 293ENDIF:ENDPROC 294DEFPROCfy(E%)LOCALG%,I%,E$:G%=TRUE:I%=E%!J:E$=$(I%+L):WHILEE%!G<DIM(Z$(),1)ANDG%AND(E%!S<>C):IFFNDy(E%,E$,E%!G)THEN 295IFE%(E%!G)=fTHEN 296PROCv(E%,E$,Z$(E%!G),b$) 297ELSEPROCv(E%,E$,Z$(E%!G),"") 298ENDIF:G%=FALSE 299ENDIF:E%!G+=1:ENDWHILE:IFG%THEN 300IFE%!S=DTHEN 301IFE%!SyTHEN 302PROCJ(E%,I):E%!W=0 303ELSEPROCJ(E%,B) 304ENDIF 305ENDIF 306ENDIF:ENDPROC 307DEFPROCY_(E%)LOCALG%,I%,E$:G%=TRUE:I%=E%!J:E$=$(I%+L):WHILEE%!W<>-1ANDG%ANDE%!S<>C:IFFNPy(E$,E%!W)THEN 308PROCv(E%,E$,FNQ,""):G%=FALSE 309ENDIF:ENDWHILE:IF(E%!Ly<>0)ANDG%AND(E%!W=-1)THEN 310IFI%!oTHEN 311PROCjy(E%,E$) 312ENDIF 313ENDIF:IFG%THEN 314IFE%!S=ITHEN 315PROCJ(E%,B) 316ENDIF 317ENDIF:ENDPROC 318DEFFNPy(E$,RETURNx%)LOCALG%:PROCD(E$):G%=FALSE:IFFNO(E$,"*",x%)THEN 319PROCn(E%):IFFNW=JyTHEN 320G%=(FNk>=FNMy("CFS#"+E$+"."+FNQ)) 321ENDIF 322ELSEx%=-1 323ENDIF:=G% 324DEFPROCD(RETURNx$)IFFNb(LEFT$(x$,4),"CFS#")=0THEN 325x$=MID$(x$,5) 326ENDIF:ENDPROC 327DEFPROCz(E%,qu%,E$)PROCJ(E%,C):IFE%!MTHENPROCw(E%) 328PROCU(E%,E$):PROCX_(E%,FNS(qu%)):ENDPROC 329DEFPROCl(E%,X%,E$)PROCZ(X%):PROCF("Sys",REPORT$):PROCz(E%,6,E$):ENDPROC 330DEFPROCu(E%,X%,E$)PROCZ(X%):PROCF("Sys",REPORT$):PROCz(E%,7,E$):ENDPROC 331DEFPROCRy(J%,E$,g%,Wy%,X%,D%,Ay%)IFJ%THENCLOSE#J% 332SYS&20008,0,E$,g%,Wy%,X%,X%+D%:SYS&20008,4,E$,,,,Ay%:PROCH:ENDPROC 333DEFFNs(E%,E$,R_%)LOCALI%:PROCD(E$):IFFNP(I%,L+LEN(E$)+1)THEN 334I%=0 335ELSEPROCt(E%,E$):I%!Hy=E%!J:I%!Uy=0:I%!o=R_%:$(I%+L)=E$:E%!J=I%:IFR_%THEN 336PROCJ(E%,D):E%!G=0 337ENDIF 338ENDIF:=(I%=0) 339DEFFNV(E%)LOCALx%,I%:I%=E%!J:IFI%THEN 340IFI%!oTHEN 341PROCoy(E%):IFE%!rTHEN 342PROCUy(E%) 343ENDIF 344ENDIF:x%=I%!Hy:PROCZ(I%):E%!J=x%:I%=x%:E%!r=FALSE 345ENDIF:IFI%THEN 346PROCt(E%,$(I%+L)) 347ENDIF:=(I%=0) 348DEFPROCb(E%)REPEATUNTILFNV(E%):PROCVy(E%):PROCA_(E%,Zy%):PROCZ(E%):IFZy%=0THENPROCY(0) 349ENDPROC 350DEFPROCc_(Gy%,RETURNry%)Gy%!T=ry%:Gy%!t=0:IFry%THENry%!t=Gy% 351ry%=Gy%:ENDPROC 352DEFPROCA_(Gy%,RETURNry%)LOCALT_%,my%:T_%=Gy%!t:my%=Gy%!T:IFmy%THENmy%!t=T_% 353IFT_%THENT_%!T=my% 354IFGy%=ry%THENry%=my% 355ENDPROC 356DEFFNP(RETURNXu%,w%)LOCAL__%:__%=FNY(Xu%,w%):IF__%THEN 357PROCV(yy%,FNS(4)) 358ENDIF:=__% 359DEFPROCdyLOCALE%,J_%:J_%=FALSE:E%=Zy%:WHILEE%AND(NOTJ_%):CASEE%!SOF 360WHENB,D,I:J_%=TRUE 361ENDCASE:E%=E%!T:ENDWHILE:IFJ_%THEN 362PROCY(1) 363ELSEPROCY(0) 364ENDIF:ENDPROC 365DEFPROCY(N%)IFN%<>pTHEN 366$f_%=A$(N%)+CHR$(0):PROChy(-1,V_%,0,0,0):p=N% 367ENDIF:ENDPROC 368DEFFNIy(E%)PROCny("FConvert",E%+E,256,128,E%!Vy):IFE%!ETHEN 369E%!q=0:E%!s=0:E%!R=0:E%!K=0:E%!r=FALSE:PROCJ(E%,B):IFE%!MTHENPROCEy 370PROCwy(E%!E,-1) 371ENDIF:=(E%!E=0) 372DEFPROCVy(E%)IFE%!ETHEN 373SYS&465c4,Y%,E%+E:PROCZ(E%!Vy) 374ENDIF:ENDPROC 375DEFPROCK_(E%,T%,_%)LOCALE$:CASET%OF 376WHENu,v:E$=FNr(E%):IF(_%AND1)=0THEN 377E$="CFS#"+E$ 378ENDIF:SYS&20005,"Filer_OpenDir "+E$ 379WHENP:CASEE%!SOF 380WHENB,D,I:PROCJ(E%,x):PROCWy("uncfs",E%) 381WHENx:PROCJ(E%,E%!n):PROCe(E%) 382WHENC:PROCi(E%):PROCJ(E%,E%!n):PROCe(E%) 383ENDCASE 384WHENQ:IFE%!S=CTHEN 385PROCi(E%):PROCJ(E%,E%!n):E%!G-=1:IFE%!W<-1THEN 386E%!W+=1 387ELSEE%!W-=1 388ENDIF:PROCe(E%) 389ELSEPROCm(E%) 390ENDIF 391WHENY:PROCm(E%) 392ENDCASE:ENDPROC 393DEFPROCe(E%)PROCY(1):PROCO(E%,FALSE):PROCOy("uncfs",E%):ENDPROC 394DEFPROCm(E%)PROCWy("uncfs",E%):PROCb(E%):ENDPROC 395DEFPROCJ(E%,mJ%)E%!n=E%!S:E%!S=mJ%:CASEmJ%OF 396WHEND,I,B:PROCq(E%!E,Q):PROCQ(E%!E,Y):PROCQ(E%!E,P):PROCE(E%!E,P,FNE("Paus")) 397WHENx:PROCq(E%!E,Q):PROCQ(E%!E,Y):PROCQ(E%!E,P):PROCE(E%!E,P,FNE("Cont")) 398WHENd:PROCQ(E%!E,Q):PROCq(E%!E,Y):PROCq(E%!E,P):PROCE(E%!E,Q,FNE("Ok")):IFE%!MTHENPROCw(E%) 399WHENC:PROCQ(E%!E,Q):PROCQ(E%!E,Y):PROCQ(E%!E,P):PROCE(E%!E,P,FNE("Skip")):PROCE(E%!E,Q,FNE("Rtry")) 400ENDCASE:PROCdy:ENDPROC 401DEFPROCq(M%,N%)LOCALZ%:Z%=FNA(64):!Z%=M%:Z%!4=N%:SYS&400ce,,Z%:IF((Z%!24)AND(1<<23))=0THEN 402SYS&400d1,M%,Z%!8,Z%!12,Z%!16,Z%!20:Z%!8=1<<23:Z%!12=1<<23:SYS&400cd,,Z% 403ENDIF:PROCC(Z%,64):ENDPROC 404DEFPROCQ(M%,N%)LOCALZ%:Z%=FNA(64):!Z%=M%:Z%!4=N%:SYS&400ce,,Z%:IF(Z%!24)AND(1<<23)THEN 405SYS&400d1,M%,Z%!8,Z%!12,Z%!16,Z%!20:Z%!8=0<<23:Z%!12=1<<23:SYS&400cd,,Z% 406ENDIF:PROCC(Z%,64):ENDPROC 407DEFPROCn(E%)E%!q+=1:IFE%!M=0THENPROCN(E%!E,X,E%!q) 408IFE%!q=1THENPROCE(E%!E,X+1,FNE("FScan1")) 409IFE%!q=2THENPROCE(E%!E,X+1,FNE("FScanN")) 410ENDPROC 411DEFPROCO(E%,gu%)IFgu%THEN 412E%!r=TRUE:E%!s+=1:IFE%!M=0THENPROCN(E%!E,U,E%!s) 413IFE%!s=1THENPROCE(E%!E,U+1,FNE("FConv1")) 414IFE%!s=2THENPROCE(E%!E,U+1,FNE("FConvN")) 415ENDIF:PROCU(E%,""):ENDPROC 416DEFPROCoy(E%)E%!R+=1:IFE%!M=0THENPROCN(E%!E,H,E%!R) 417IFE%!R=1THENPROCE(E%!E,H+1,FNE("AScan1")) 418IFE%!R=2THENPROCE(E%!E,H+1,FNE("AScanN")) 419ENDPROC 420DEFPROCUy(E%)E%!K+=1:PROCN(E%!E,V,E%!K):IFE%!K=1THENPROCE(E%!E,V+1,FNE("AConv1")) 421IFE%!K=2THENPROCE(E%!E,V+1,FNE("AConvN")) 422ENDPROC 423DEFPROCt(E%,E$)IFE%!M=0THEN 424PROCE(E%!E,u,FNc(E$)) 425ENDIF:ENDPROC 426DEFPROCU(E%,E$)IFE%!M=0THEN 427PROCE(E%!E,v,FNc(E$)) 428ENDIF:ENDPROC 429DEFFNc(E$)IFLEN(E$)>XyTHEN 430E$="..."+RIGHT$(E$,Xy-3) 431ENDIF:=E$ 432DEFFNr(E%)LOCALE$,I%:I%=E%!J:IFI%THEN 433E$=$(I%+L) 434ELSEE$=$(E%+Zy) 435ENDIF:=E$ 436DEFPROCw(E%)E%!M=(E%!M=0):IFE%!MTHEN 437PROCEy 438ELSEPROCt(E%,FNr(E%)):PROCU(E%,""):PROCN(E%!E,U,E%!s):PROCN(E%!E,X,E%!q):PROCN(E%!E,V,E%!K):PROCN(E%!E,H,E%!R) 439ENDIF:ENDPROC 440DEFPROCEyPROCE(E%!E,u,"-"):PROCE(E%!E,v,"-"):PROCE(E%!E,U,"-"):PROCE(E%!E,X,"-"):PROCE(E%!E,V,"-"):PROCE(E%!E,H,"-"):ENDPROC 441DEFPROCX_(E%,o$)LOCALZ%,eJ%,fJ%,cJ%,g_%:IFE%!MTHENPROCw(E%) 442PROCE(E%!E,Oy,o$):Z%=FNA(64):!Z%=E%!E:cJ%=H_%+1:g_%=P_%+1:eJ%=NOT((1<<C_%)-1):fJ%=NOT((1<<Dy%)-1):Z%!4=((cJ%-o_%)/2)ANDeJ%:Z%!16=g_%-((((g_%-68)-Y_%)/2)ANDfJ%):Z%!12=Z%!4+o_%:Z%!8=Z%!16-Y_%:Z%!20=0:Z%!24=0:Z%!28=-1:SYS&400c5,,Z%:VDU7:PROCC(Z%,64):ENDPROC 443DEFPROCi(E%)LOCALZ%:Z%=FNA(64):!Z%=E%!E:SYS&400cb,,Z%:Z%!12=Z%!4+bJ%:Z%!16=Z%!8+MJ%:Z%!20=OJ%:Z%!24=qJ%:Z%!28=-1:SYS&400c5,,Z%:PROCC(Z%,64):PROCU(E%,""):ENDPROC 444DEFPROC`yIFV%=0THEN 445DIMEJ%4:!EJ%=0:IFFNa("Choices",EJ%) 446V%=!EJ% 447ENDIF:IFV%THEN 448PROCd:PROCpy(V%):PROC`(V%,-1) 449ENDIF:ENDPROC 450DEFPROCdIFV%THEN 451SYS&465c6,Y%,V%:PROCI(V%,j_%,!a):PROCI(V%,v_%,!w):PROCI(V%,t_%,!_):PROCI(V%,z_%,!O):PROCI(V%,x_%,FNx) 452ENDIF:ENDPROC 453DEFPROCby(_%,T%)LOCALby%:PROC`(V%,-1):CASET%OF 454WHENUJ%:PROCR:by%=TRUE 455WHENBJ%:PROCd:by%=TRUE 456WHENJJ%:PROCR:PROCGy:by%=TRUE 457WHENoJ%:PROCBy:PROCd:by%=TRUE 458ENDCASE:IFby%THEN 459IF_%AND1092THENPROCX(V%) 460ENDIF:ENDPROC 461DEFPROCRLOCALu_%,I$,R$,B$:!a=FNB(V%,j_%):!w=FNB(V%,v_%):!_=FNB(V%,t_%):!O=FNB(V%,z_%):u_%=FNx:IFu_%<>FNB(V%,x_%)THEN 462I$="TFont":R$="TSystem":IFNOTu_%THENSWAPI$,R$ 463B$=FNM(Ky%)+".":I$=B$+I$+CHR$0:R$=B$+R$+CHR$0:B$=B$+"Templates"+CHR$0:SYS41,25,B$,I$:SYS41,25,R$,B$ 464ENDIF:ENDPROC 465DEFPROCM_(T%,tJ%)CASEtJ%OF 466WHEN13:PROCR:PROCX(V%) 467WHEN27:PROCX(V%) 468WHEN386:PROCR:PROCX(V%) 469WHEN387:PROCX(V%) 470WHEN388:PROCR:PROCGy:PROCX(V%) 471WHEN389:PROCBy:PROCX(V%) 472OTHERWISESYS&400dc,tJ% 473ENDCASE:ENDPROC 474DEFFNxLOCALG%,F%,Ly%,R%:F%=FNA(128):Ly%=0:REPEATSYS12,9,Ky%,F%,1,Ly%,128,"TSystem"+CHR$0TO,,,R%,Ly%:G%=(R%=1):UNTIL(Ly%=-1)ORG%:PROCC(F%,128):=G% 475DEFPROCmyLOCALA$:CASEW%!20OF 476WHENV%:A$="WinChoices" 477ENDCASE:IFA$<>""THEN 478A$=FNE(A$):W%!16=&400cc:W%!12=W%!8:$(W%+28)=y$+CHR$0:$(W%+36)=A$+CHR$0:W%!0=(36+LEN(A$)+4)AND-4:SYS&400e7,17,W%,W%!4 479ENDIF:ENDPROC 480DEFFNH=19 481DEFPROCTy(DJ%,cu%)IFFNH<cu%THEN 482ERROR1,"EIL1" 483ENDIF:IFDJ%<1THEN 484ERROR1,"EIL2" 485ENDIF:I_%=DJ%:DIMS$(I_%-1):DIMA%(I_%-1):i_%=0:DIMYy%256:Q_%=40:z%=0:Vy%=12:aJ%=FALSE:DIME$(Q_%-1):dy%=FALSE:Uy%=FALSE:O_%=TRUE:ENDPROC 486DEFPROCA(J$,yJ%)PROCXy(J$,yJ%):ENDPROC 487DEFPROCXy(J$,yJ%)LOCALg%,N%,C$,d$:N%=0:g%=TRUE:C$=MID$(J$,1+INSTR(J$,".")):WHILEN%<i_%ANDg%:g%=(C$<>S$(N%)):IFg%THEN 488N%+=1 489ENDIF:ENDWHILE:IFg%THEN 490IFN%=I_%THEN 491ERROR1,"EIL3" 492ENDIF:S$(N%)=C$:d$="'"+J$+"' does not have a FN_":LOCALERROR:ONERRORLOCALRESTOREERROR:PROCM(d$+C$+"_version") 493A%(N%)=EVAL("FN_"+C$+"_version"):RESTOREERROR:i_%+=1:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCM(d$+"_hard_initialise_"+C$) 494IFEVAL("FN_hard_initialise_"+C$)THEN 495ERROR1,"EIL5 "+J$ 496ENDIF:RESTOREERROR 497ENDIF:IFyJ%>A%(N%)THEN 498ERROR1,"EIL4 "+J$ 499ENDIF:ENDPROC 500DEFFNZ(g$)LOCALERROR:ONERRORLOCALRESTOREERROR:PROCey 501=EVAL(g$) 502DEFPROCeyIFO_%THEN 503ERRORERR,REPORT$+" (evaluating `"+g$+"' ["+STR$(ERL)+"])" 504ELSEERRORERR,REPORT$ 505ENDIF:ENDPROC 506DEFFNU(A%)LOCALS$:WHILE?A%:S$+=CHR$(?A%):A%+=1:ENDWHILE:=S$ 507DEFFNGy(A%,B%)LOCALS$:WHILEB%>=1AND?A%:S$+=CHR$(?A%):A%+=1:B%-=1:ENDWHILE:=S$ 508DEFFNM(A%)LOCALS$:WHILE?A%>31:S$+=CHR$(?A%):A%+=1:ENDWHILE:=S$ 509DEFPROCs(A%,S$)$A%=S$:A%?LEN(S$)=0:ENDPROC 510DEFPROCZy(A%,S$,B%)IFLEN(S$)<=B%THEN 511$A%=LEFT$(S$,B%-1):A%?(B%-1)=ASC(MID$(S$,B%,1)) 512ELSE$A%=S$:A%?LEN(S$)=0 513ENDIF:ENDPROC 514DEFPROCM(W$)IFdy%THEN 515IFUy%THEN 516ERRORERR,REPORT$+" ["+STR$ERL+"]." 517ELSEERRORERR,REPORT$ 518ENDIF 519ELSEIFNOTaJ%THEN 520IFz%=Q_%THEN 521E(Q_%-1)="Errors too deep!!!!!":PROCx 522ENDIF:IFRIGHT$(W$,2)=": "THEN 523W$=LEFT$(W$,LEN(W$)-2) 524ENDIF:IFUy%THEN 525E$(z%)=REPORT$ 526ELSEIFz%=0THEN 527E$(z%)="Error `"+REPORT$+"' (line ":E$(z%)+=STR$(ERL)+") in ":E$(z%)+="`"+W$+"'" 528ELSEE$(z%)="`"+W$+"'" 529ENDIF 530ENDIF:z%+=1:ERRORERR,"" 531ENDIF 532ENDIF:ENDPROC 533DEFPROCxLOCALo%,l$:IFdy%THEN 534IFUy%THEN 535PROCV(ERR,REPORT$+" ["+STR$(ERL)+"]."):PROCS:END 536ELSEPROCV(ERR,REPORT$):IFERR=N_%THEN 537PROCS:END 538ENDIF 539ENDIF 540ELSEIFVy%=-2THEN 541IFz%>0THEN 542ERROREXTERR,E$(0) 543ELSEERROREXTERR,REPORT$ 544ENDIF:END 545ENDIF:IFVy%=-3THEN 546$Yy%="TASK":SYS&400c0,200,!Yy%,"LibHandler"+CHR$(0):IFz%THEN 547FORo%=0TOz%-1:IFo%<(z%-1)THEN 548PROCg(E$(o%)+" in") 549ELSEPROCg(E$(o%)) 550ENDIF:NEXTo% 551ELSEPROCg(REPORT$+" (line "+STR$(ERL)+")") 552ENDIF:SYS&600dd:END 553ENDIF:IFVy%>=0THEN 554MODEVy% 555ENDIF:PRINT"An error has occured...":PRINT:IFz%THEN 556FORo%=0TOz%-1:COLOUR((7-(o%<<1))AND6)+1:PRINTE$(o%);:IFo%<(z%-1)THEN 557PRINT" in "; 558ENDIF:NEXTo% 559ELSEPRINTREPORT$;" (line ";STR$(ERL);")" 560ENDIF:PRINT:COLOUR7:END 561ENDIF:ENDPROC 562DEFPROCg(q$)LOCALZJ%:ZJ%=20+(LEN(q$)+5)AND-4:!Yy%=ZJ%:Yy%!16=&804c0:$(Yy%+20)=q$+CHR$(10)+CHR$(0):SYS&600e7,17,Yy%,0:ENDPROC 563DEFFN_CAsm_version=14 564DEFFN_hard_initialise_CAsmPROCA("<BasicV_Assembler$Lib>.Misc",27):SYS5,"RMEnsure CAssembler 0.08 RMLoad System:Modules.CAssembler":SYS5,"If ""<CAsm$Dir>""="""" Then Set CAsm$Dir <d>.Library.CAsm":CAsmLibrary_stdlib=1:CAsmLibrary_stdio=2 565CAsmLibrary_string=3:bi=4:li=5:ru=6:Ei=7:CAsmLibrary_wimp=8:V_=9:CAsmLibrary_message=10:cl=11:lu=12:Il=13:ti=14:gu=15:Zi=16:Q_=17:Uu=18:Rl=19:YJ=20:SJ=21:u_=22:Hl=23:ml=24 566o_=25:za=26:k=26:GJ=0:HJ=1:Wu=2:AJ=3:M_=4:J_=5:H_=6:Ri=7:Ua=8:py=9:h=10:z=11:l=12:A=13:Z=14:JJ=15:ay=&6d734143:p%=0:Py%=13:j=0:N=0:`=10*1024:fy=`+(1*1024):ry=FALSE:=0 567DEFPROCT_(X$)LOCALZ%,k%,Ty%,L%,O%,P%,U%,J$:LOCALERROR:ONERRORLOCALRESTOREERROR:SYS&400ec,cy%,-1:PROCH 568cy%=HIMEM-32768:SYS&400ec,cy%+32768,-1TOL%:L%+=32768:O%=cy%+32768:P%=0:U%=14:IFO%=L%THEN 569ERROR1,"Not enough memory to start application" 570ENDIF:IFp%<>0THEN 571ERROR1,"EIC1" 572ENDIF:DIMq_%k*8:DIMF$(k):IFFNh_DEFAULT 573WHILEX$<>"":J$=LEFT$(X$,INSTR(X$,",")-1):LOCALERROR:ONERRORLOCALRESTOREERROR:PROCM("EIC2") 574k%=EVAL("CAsmLibrary_"+J$):RESTOREERROR:Ty%=q_%:Z%=Ty%+(p%*8):WHILEZ%>Ty%:IF!Ty%=k%THEN 575Ty%=Z%+1 576ELSETy%+=8 577ENDIF:ENDWHILE:IFTy%=Z%THEN 578IFp%>=kTHEN 579ERROR1,"EIC3" 580ENDIF:!Z%=k%:F$(k%)=J$:p%+=1:O%=cy%+32768:P%=0:IFFNZ("FNh_"+J$) 581ENDIF:X$=MID$(X$,LEN(J$)+2):WHILEASC(X$)=ASC(" "):X$=MID$(X$,2):ENDWHILE:ENDWHILE:SYS&400ec,cy%,-1:RESTOREERROR:ENDPROC 582DEFPROCJyLOCALR%,Z%,N%,Ey%:IFp%=0THEN 583IFFNh_DEFAULT 584ENDIF:Ey%=q_%:N%=p%:IF(U%AND2)=0THEN 585DIMZ%p%*4:SYS79,p%,Z%+&c0000000,3,,Ey%,8 586ENDIF:[OPTU%:.Qy DCDay:DCDRy:]:WHILEN%>0:[OPTU%:DCD!Ey%:DCDEy%!4:]:Ey%+=8:N%-=1:ENDWHILE:[OPTU%:DCD0:]:[OPTU%:ALIGN:.Ay:]:Z%=P%:IFFNjumpblock_DEFAULT 587Ry=(P%-Z%)>>2:N%=p%:Ey%=q_%:WHILEN%>0:Z%=P%:IFFNZ("FNjumpblock_"+F$(!Ey%)) 588Ey%!4=(P%-Z%)>>2:Ey%+=8:N%-=1:ENDWHILE:ENDPROC 589DEFPROC__LOCALEy:[OPTU%:ALIGN:.My:STMFD(A)!,{4-5,Z}:BL P%+(13<<2):.Ey DCDQy-Ey:DCDAy-Ey:DCDj-Ey:DCDN:DCD`:.e:DCD0:DCD0:DCD0:DCD0:LDR A,e 590LDMFD(A)!,{h,z,l,Z}:MOVpc,Z:BIC 5,Z,#&fc000003:LDMIA5,{0-4}:ADD0,0,5:ADD1,1,5:ADD2,2,5:MOV5,#0:SWI &fcb80:STRvc0,e+(1<<2):STRvc1,e+(3<<2):LDMFD(A)!,{4-5,pc}:.i:FNJ:MOV2,Z:MOV1,A:MOV0,h 591SWI &fcb81:MOVvc1,#0:STRvc1,e+(3<<2):MOVpc,2:MOV13,12:]:j=P%:PROCW:PROCj:N=(N+3)AND-4:P%+=N-1:O%+=N-1:[OPTU%:DCB0:]:ENDPROC 592DEFPROCh_IFP%<>32768THENERROR1,"EIC4" 593[OPTU%:ADR4,m:MOV5,#cy:SWI &fcb80:FNR("vc",2,tu):Bvc qy:SWI 43:.m:DCDQy-m:DCDAy-m:DCDj-m:DCDN:DCD`:DCDfy:]:ENDPROC 594DEFFNJ[OPTU%:STMFD(A)!,{h,z,l,Z}:MOV z,pc:FNR("",Z,e):STR A,[Z],#4:LDMIA(Z)!,{h,l,A}:AND z,z,#&fc000003:ORR Z,Z,z:]:=0 595DEFPROCky(vy%,By%,LJ%)PROCA("<BasicV$Lib>.Heap",8):PROCA("<BasicV$Lib>.Message",1):IFFNm(vy%,By%,LJ%,0) 596CALLMy:ONERRORCALLi:PROCx 597ENDPROC 598DEFFNm(vy%,By%,LJ%,zy%)LOCALL%,O%,P%,U%,uu%,H%:LOCALDJ:LOCALdJ,vJ,qJ,i_,eJ,aJ:LOCALey,Iy,ei:IFzy%=0THEN 599PROCA("<BasicV$Lib>.Heap",8):PROCA("<BasicV$Lib>.Message",1) 600ENDIF:DIMy%vy%:DJ=A:dJ=1<<31:vJ=1<<30:qJ=1<<29:i_=1<<28:eJ=1<<27:aJ=1<<26:ey=1<<17:Iy=256:ei=Iy+ey:SYS&606c0:LOCALERROR:ONERRORLOCALRESTOREERROR:SYS&606c1:PROCH 601H%=vy%:L%=y%+vy%:IFBy%<>0THENBy%=4 602FORU%=8+By%TO10+By%STEP2:IF(U%AND4)<>0THEN 603O%=y%:IFzy%=1THEN 604P%=32768 605ELSEP%=0 606ENDIF 607ELSEO%=0:P%=y% 608ENDIF:CASEzy%OF 609WHEN1:PROCW:PROCh_:PROCW:PROCr:PROCW:PROCJy:j=P%:PROCW:PROCj:N=(N+3)AND-4 610WHEN0:PROCW:PROCr:PROCW:PROCJ_:PROCW:PROCxy:PROCW:PROCJy:PROCW:PROC__ 611WHEN2:PROCW:PROCr 612ENDCASE:IFU%AND4THENL%=O%ELSEL%=P% 613IF(U%AND2)=0THEN 614SYS&dcb93,0,y%,L%-y% 615ENDIF:H%=L%-y%:NEXTU%:SYS&606c1:IFBy%THEN 616IFzy%=0THEN 617My+=y%:i+=y% 618ENDIF 619ENDIF:IFryANDzy%<>2THEN 620IFBy%THEN 621H%=Ay:IFzy%THENH%-=32768 622ELSEERROR1,"EIC9" 623ENDIF 624ENDIF:IFLJ%THEN 625PRINT"Assembled to &";~H%;" = ";((H%*10+512)DIV1024)/10;"K":PRINT"Could assemble with ";vy%-H%;" less" 626ENDIF:=H% 627DEFFN_Template_version=21 628DEFFN_hard_initialise_Template:Z_%=FALSE:n%=FALSE:i%=FALSE:oy%=FALSE:AJ%=FALSE:Zu%=-1:xu%=1:vy=7:By=16:dy=14:sy=15:=0 629DEFPROCHyLOCALN%:IFn%<>-1THEN 630IFi%THEN 631SYS&665c1,Y%,TRUE,FALSE 632ELSEFORN%=0TO255:WHILEn%?N%:SYS&60082,N%:n%?N%-=1:ENDWHILE:NEXTN% 633ENDIF 634ENDIF:ENDPROC 635DEFPROCLyLOCALD%,d%,Q%,F%,P$,tu%,Hy%,gy%,x%,R%:IFn%THEN 636IFi%THEN 637oy%=(i%=+1):IFoy%THEN 638Q%=+1 639ELSEQ%=0 640ENDIF:Hy%=140+(1<<21):IFAJ%THEN 641O$=FNE("MenuFont"):IFO$<>""THEN 642Hy%+=(1<<18)+(1<<19):PROCG(gy%,8+LEN(O$)+1):$(gy%+8)=O$:gy%!0=16*VAL(FNE("MenuFontWidth")):gy%!4=16*VAL(FNE("MenuFontHeight")):IFFNE("MenuFontLowRez")="NO"THEN 643Hy%+=(1<<17) 644ELSEHy%+=(1<<16) 645ENDIF 646ENDIF 647ENDIF:SYS&465c0,Y%,0,0,Q%,Q%,0,0,Hy%,gy%TOn% 648ELSEPROCG(n%,256):SYS&dcb93,0,n%,256 649ENDIF 650ELSEn%=-1 651ENDIF:P$=FNK("<"+G$+"$Dir>.Sprites"):D%=FNI(P$):IFD%>0THEN 652F%=FNA(128):x%=0:REPEATSYS12,12,"<"++G$+"$Dir>",F%,1,x%,128,"Sprites*"TO,,,R%,x%:IFR%=1ANDF%!20=4089ANDD%<F%!8THEND%=F%!8 653UNTILx%<0:PROCC(F%,128):PROCG(e%,D%+16):e%!0=D%+16:e%!4=0:e%!8=16:e%!12=16:SYS&2002e,522,e%,P$TOd%;Q%:s$=P$:IFFNF(Q%)THEN 654PROCF("Reason","Sprites"):PROCy(d%):PROCL(4):PROCS 655ENDIF 656ELSEe%=0 657ENDIF:PROCP_("Templates"):IFe%>0THEN 658PROCT("ProgInfo",e%,"ProgInfo") 659ELSEPROCT("ProgInfo",+1,"ProgInfo") 660ENDIF:s%=0:IFZ_%=0THEN 661PROCFy 662ENDIF:w_%=FNBy("Query",tu%,+1):PROCa_:ENDPROC 663DEFPROCsy:P$=FNK("<"+G$+"$Dir>.Sprites"):IFP$<>s$THEN 664e%!4=0:e%!8=16:e%!12=16:SYS46,522,e%,P$:s$=P$ 665ENDIF:ENDPROC 666DEFFNProgInfo(M%)PROCs(M%!(88+(vy<<5)+20),D$):=0 667DEFPROCNy(c%,b%,_%,T%)CASET%OF 668WHENdy,sy:c%=FNG(1,FNS(0)):IF_%<>1THEN 669PROCh 670ENDIF 671OTHERWISEIF_%AND240THEN 672W%!0=s%:W%!4=1:SYS&400d0,,W% 673ENDIF 674ENDCASE:ENDPROC 675DEFPROCFyIFs%=0THEN 676IFoy%THEN 677DIML_%4:!L_%=0:IFFNa("ProgInfo",L_%) 678s%=!L_% 679ELSEIFFNh("ProgInfo",s%) 680ENDIF 681ELSEIFi%THEN 682IFoy%THEN 683SYS&465c6,Y%,L_% 684ELSESYS&465c6,Y%,s% 685ENDIF 686ENDIF 687ENDIF:ENDPROC 688DEFPROCP_(t$)LOCALGJ%,k%,D%,d%,Q%,S%:LOCALlJ%,P$,Xy%,hy%:P$="<"+G$+"$Dir>."+t$:D%=FNI(P$):IFD%<=0THEN 689PROCF("Reason",t$):PROCF("Sys","Not found"):PROCL(4):PROCS 690ENDIF:PROCG(k%,D%):PROCG(Xy%,D%+F):hy%=Xy%+Py:lJ%=Xy%+F:SYS&600d9,,P$TOd%;Q%:IFFNF(Q%)THEN 691PROCF("Reason","Templates"):PROCy(d%):PROCL(4):SYS&600da:PROCS 692ENDIF:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCn_ 693x%=0:REPEAThy%!0=ASC("*"):SYS&600db,,lJ%,k%,k%+D%,n%,hy%,x%TOd%,,GJ%,,,,x%;Q%:IFFNF(Q%)THEN 694PROCK(d%):SYS&600da:PROCS 695ENDIF:IFx%THEN 696FORQ%=0TO11:IFhy%?Q%=13THENhy%?Q%=0:Q%=12 697NEXTQ%:Xy%!by=GJ%-k%:Xy%!g=k%:S%=FNv(Xy%):IFS%=0THEN 698PROCL(16):SYS&600da:PROCS 699ENDIF:S%!c=!uy%:!uy%=S% 700ENDIF:UNTILx%=0:RESTOREERROR:SYS&400da:PROCZ(Xy%):PROCZ(k%):ENDPROC 701DEFPROCn_SYS&600da:PROCM("Template"):ENDPROC 702DEFFNBy(F$,_u%,k_%)=FNJy(F$,_u%,k_%,"") 703DEFFNJy(F$,_u%,k_%,W$)LOCALS%,jJ%,J%:S%=FNC(F$):IFS%=0THEN 704PROCS 705ENDIF:jJ%=S%+F:jJ%!64=k_%:IFW$<>""THEN 706J%=FNZ("FN"+W$) 707ENDIF:IFFNz(S%,J%)THEN 708PROCS 709ENDIF:PROCa(S%):=J% 710DEFPROCT(F$,k_%,W$)LOCALS%,M%:S%=FNC(F$):IFS%=0THEN 711PROCS 712ENDIF:M%=S%+F:M%!64=k_%:IFW$<>""THEN 713M%=FNZ("FN"+W$+"("+STR$(M%)+")") 714ENDIF:ENDPROC 715DEFFNh(F$,RETURNJy%)LOCALN%:=FNQy(F$,Jy%,N%) 716DEFFNQy(F$,RETURNJy%,RETURNiy%)LOCALS%,K%:K%=FALSE:IFJy%<=0THEN 717S%=FNC(F$):IFS%THEN 718K%=FNz(S%,Jy%):IFK%=FALSETHEN 719iy%=S%!g:PROCa(S%) 720ENDIF 721ELSEK%=TRUE 722ENDIF 723ELSEIFi%THEN 724SYS&465c6,Y%,Jy% 725ENDIF 726ENDIF:=K% 727DEFFN`(F$)LOCALS%,t$,B_%:S%=!uy%:B_%=FALSE:WHILES%AND(NOTB_%):B_%=(FNGy(S%+Py,12)=F$):IFNOTB_%THEN 728S%=S%!c 729ENDIF:ENDWHILE:=S% 730DEFFNC(F$)LOCALS%:S%=FN`(F$):IFS%=0THEN 731PROCF("Reason",F$):PROCL(3) 732ENDIF:=S% 733DEFFNz(S%,RETURNJy%)IFi%THEN 734SYS&665c3,Y%,S%+F,0TOJy%;S% 735ELSESYS&600c1,,S%+FTOJy%;S% 736ENDIF:S%=FNF(S%):IFS%THEN 737PROCK(Jy%):Jy%=0 738ENDIF:=S% 739DEFPROCC_(M%,Q%,My%)LOCALJ%,X%:X%=A_%<<C_%:J%=M%!8-M%!0:IFX%<=J%THEN 740M%!0=0 741ELSEX%=X%-J%:IFMy%<0THEN 742My%=X%+(My%MODX%) 743ENDIF:M%!0=(M%!0+My%*Q%)MODX% 744ENDIF:M%!8=M%!0+J%:ENDPROC 745DEFPROCF_(M%,Q%,My%)LOCALJ%,X%:X%=(Fy%<<Dy%)-96:J%=M%!8-M%!0+48:IFX%<=J%THEN 746M%!8=(Fy%<<Dy%)-J% 747ELSEX%=X%-J%:IFMy%<0THEN 748My%=X%+(My%MODX%) 749ENDIF:M%!8=(Fy%<<Dy%)-M%!8:M%!8=(Fy%<<Dy%)-((M%!8+My%*Q%)MODX%) 750ENDIF:M%!0=M%!8-(J%-48):ENDPROC 751DEFPROCa(S%)LOCALZ%:Z%=uy%:WHILE!Z%<>0AND!Z%<>S%:Z%=!Z%+c:ENDWHILE:IF!Z%=S%THEN 752!Z%=S%!c:S%!c=0:PROCZ(S%) 753ENDIF:ENDPROC 754DEFFNi(A%)=USR(yy) 755DEFFNv(A%)A%=FNi(A%):IFA%=0THEN 756PROCL(16) 757ENDIF:=A% 758DEFPROCL_IF(U%AND2)=0THENPROCW_("Template") 759[OPTU%:ALIGN:.yy:FNJ:B oy:]:ENDPROC 760DEFFN_Declare_Local_Variables_TemplateDIMuy%4:!uy%=0:P%=0:[OPTU%:.c DCD0:.Ny DCD0:.g DCD0:.by DCD0:.Py DCD0:DCD0:DCD0:.F:]:=0 761DEFPROCny(F$,r%,r_%,b_%,RETURNiy%)PROCe_(F$,r%,r_%,b_%,iy%,"X"):ENDPROC 762DEFPROCe_(F$,r%,r_%,b_%,RETURNiy%,H$)LOCALS%:S%=FNC(F$):IFS%THEN 763PROCy_(S%,r%,r_%,b_%,iy%,H$) 764ELSE!r%=S% 765ENDIF:ENDPROC 766DEFFNa(F$,r%)LOCALN%:=FN_(F$,r%,N%) 767DEFFN_(F$,r%,RETURNiy%)LOCALS%,K%:K%=FALSE:IF!r%<=0THEN 768S%=FNC(F$):IFS%THEN 769K%=FNe(S%,r%):IFK%=FALSETHEN 770iy%=S%!g:PROCa(S%) 771ENDIF 772ELSEK%=TRUE 773ENDIF 774ELSEIFi%THEN 775SYS&465c6,Y%,r% 776ENDIF 777ENDIF:=K% 778DEFPROCg_(S%,r%)S%=FNe(S%,r%):ENDPROC 779DEFFNe(S%,r%)LOCALd%:IFi%THEN 780SYS&665c3,Y%,S%+F,r%TOd%;S% 781ELSESYS&600c1,,S%+FTOd%;S% 782ENDIF:!r%=d%:S%=FNF(S%):IFS%THEN 783PROCK(d%):!r%=0 784ENDIF:=S% 785DEFPROCy_(S%,r%,r_%,b_%,RETURNiy%,H$)LOCALM%,Q%:!r%=0:Q%=S%!Ny:S%!Ny+=1:S%=FNv(S%):IFS%THEN 786M%=S%+F:PROCC_(M%,Q%,r_%):PROCF_(M%+4,Q%,b_%):IFH$<>"X"THEN 787IFM%!56AND(1<<8)THEN 788PROCZy(M%!72,H$,M%!80) 789ELSEPROCZy(M%+72,H$,12) 790ENDIF 791ENDIF:PROCg_(S%,r%):iy%=S%!g:PROCa(S%) 792ENDIF:ENDPROC 793DEFFNh_DEFAULTLOCALERROR:ONERRORLOCALRESTOREERROR:PROCM("@.h.DEFAULT") 794Ji=16:dl=1<<30:IJ=1<<29:`u=0:xl=1:La=2:Ea=3:Ca=4:Y_=5:Qa=6:BJ=7:ci=8:r_=9:Da=10:sl=1<<0:cy=1<<1:qi=1<<2:=0 795DEFFNjumpblock_DEFAULTLOCALERROR:ONERRORLOCALRESTOREERROR:PROCM("@.h.DEFAULT") 796[OPTU%ANDPy%:.ui DCDx_:.Oi DCDhu:.`_ DCDR_:.__ DCDHi:.Bu DCDB_:.UJ DCDul:.hJ DCDMi:.MJ DCDpu:.qy DCDCi:]:=0 797DEFFNh_stdioLOCALERROR:ONERRORLOCALRESTOREERROR:PROCM("@.h.stdio") 798k_=0:Ii=17:Wi=34:=0 799DEFFNjumpblock_stdioLOCALERROR:ONERRORLOCALRESTOREERROR:PROCM("@.h.stdio") 800[OPTU%ANDPy%:.Kl DCDdi:.Fu DCDrl:.D_ DCD`l:.gi DCDXi:.C_ DCDzJ:.Ru%DCDVu%:.su%DCDzu%:.wu%DCDKu%:.nl DCDRu:.Ql DCDNu:.zi DCDwi:.uJ DCDii:.ou DCDKi:]:=0 801DEFFNh_stdlibLOCALERROR:ONERRORLOCALRESTOREERROR:PROCM("@.h.stdlib") 802=0 803DEFFNjumpblock_stdlibLOCALERROR:ONERRORLOCALRESTOREERROR:PROCM("@.h.stdlib") 804[OPTU%ANDPy%:._y DCDbu:.my DCDSl:.Ta DCDSi:.iy DCDGi:.PJ DCD`J:.L_ DCDXa:.Tl DCDXl:.Yu DCDaa:.q_ DCDEl:.Xu DCD_a:.S_ DCDyJ:.Qu DCDm_:.au DCDI_:.ju DCDAu:.ol DCDNl:.fl DCDfJ:]:=0 805DEFFNh_stringLOCALERROR:ONERRORLOCALRESTOREERROR:PROCM("@.h.string") 806P%=0:[OPTU%:.Du DCB0:.e_ DCB0:.Bi DCB0:.CJ DCB0:.zu DCB0:.Ll DCB0:.ql DCB0:]:=0 807DEFFNjumpblock_stringLOCALERROR:ONERRORLOCALRESTOREERROR:PROCM("@.h.string") 808[OPTU%ANDPy%:.ZJ DCDTJ:.lJ DCDvl:.KJ DCDs_:.eu DCDNa:.zl DCDpi:.yi DCDel:.Va DCDMa:.p_ DCDqu:.O_ DCDLi:.fi DCDw_:.mi DCDIu:.ri DCDEu:.Zu DCDwu:.W_ DCDXJ:.`y DCDGu:.cJ DCD_i:.vi DCDMu:.n_ DCDQJ:.ji DCDHu 809.Za DCDy_:.xu DCDT_:._u DCDYi:.uu DCDGl:.Vi DCDf_:.Cl DCDWJ:.Di DCDb_:.Ai DCDOJ:.il DCDjJ:.wl DCDNJ:.Fi DCDqa:.Jl DCDPu:.gl DCDRa:.Ol DCDg_:.pJ DCDiu:.cu DCDd_:.Cu DCDc_:.P_ DCDgJ:.Lu DCDFJ:.t_ DCDz_:.Fl DCDIa:.mJ DCDbl:.G_ DCD_l:]:=0 810DEFFNh_messageLOCALERROR:ONERRORLOCALRESTOREERROR:PROCM("@.h.message") 811=0 812DEFFNjumpblock_messageLOCALERROR:ONERRORLOCALRESTOREERROR:PROCM("@.h.message") 813[OPTU%ANDPy%:.ky DCDa_:.A_ DCDl_:.Ga DCDmu:.`i DCDnu:.U_ DCDyu:]:=0 814DEFFNh_wimpLOCALERROR:ONERRORLOCALRESTOREERROR:PROCM("@.h.wimp") 815Vu=12:X_=0:P%=0:[OPTU%:.Dy DCB0:.Zl DCB0:.hy DCB0:.wy DCB0:.hi DCB0:.v_ DCB0:.Oa DCB0:.jy DCB0:.zy DCB0:.iJ DCB0:.Z_ DCB0:.Su DCB0:.Ya DCB0:.Ul DCB0:.j_ DCB0:.bJ DCB0:.sJ DCB0:]:P%=0:[OPTU%:.Cy DCB0 816.hl DCB0:.ty DCB0:.Yy DCB0:.Ku DCB0:.VJ DCB0:.LJ DCB0:.si DCB0:.wa DCB0:.al DCB0:.tl DCB0:.vu DCB0:]:P%=0:[OPTU%:.Ml DCB0:.Ju DCB0:.Wa DCB0:.kJ DCB0:.N_ DCB0:]:=0 817DEFFNjumpblock_wimpLOCALERROR:ONERRORLOCALRESTOREERROR:PROCM("@.h.wimp") 818[OPTU%ANDPy%:.Ka DCDWl:.oJ DCDku:.wJ DCDfu:.jl DCDUi:.Wy DCDtJ:.rJ DCDpl:.E_ DCDRJ:.Bl DCDni:.oy DCDh_:.Ja DCDsu:.Fa DCDYl:._J DCDBa:.Tu DCDAl:.Sa DCDDl:.Pi DCDF_:.Pa DCDTi:.Aa DCDxJ:.oi DCDHa:]:=0 819DEFFN_ModeInfo_version=6 820DEFFN_hard_initialise_ModeInfo=0 821DEFPROCqy(l%)SYS53,l%,1TO,,`_%:`_%+=1:SYS53,l%,2TO,,d_%:d_%+=1:SYS53,l%,3TO,,nJ%:nJ%+=1:SYS53,l%,4TO,,C_%:SYS53,l%,5TO,,Dy%:SYS53,l%,6TO,,Cu%:SYS53,l%,7TO,,Du%:SYS53,l%,9TO,,PJ%:YJ%=1<<PJ%:SYS53,l%,11TO,,A_%:A_%+=1:SYS53,l%,12TO,,Fy%:Fy%+=1:Pu%=A_%DIV`_% 822Ju%=Fy%DIVd_%:H_%=(A_%<<C_%)-1:P_%=(Fy%<<Dy%)-1:Yu%=32DIVYJ%:ENDPROC 823DEFFN_Wimp_version=50 824DEFFN_hard_initialise_WimpLOCALd%:IFFNH<12THENERROR1,"EIW1" 825SYS&400f2,0TOd%:IFd%=0THENERROR1,"Application needs to be run from the desktop" 826PROCA("<BasicV$Lib>.Heap",8):PROCA("<BasicV$Lib>.IntMath",5):PROCA("<BasicV$Lib>.Message",3):PROCA("<BasicV$Lib>.Template",7):PROCA("<BasicV$Lib>.NullReason",1):dy%=FALSE:ay%=3*1024 827PROCG(fy%,ay%):ay%+=fy%:Ny%=fy%:PROCG(W%,512):n$="":u$="":Ou%=0:G$="Application":D$="0.00 (01-Jan-1900)":Y%=-1:N_%=2400:yy%=2401:Fu%=16*1024:U$="":Gu%=TRUE:Mu%=0:=0 828DEFFNK(e$)LOCALa%,C%,Z$,c%,b%,RJ%:SYS&600f2,2TOa%;C%:IF(C%AND1)=0THEN 829SYS53,-1,4TO,,c%:SYS53,-1,5TO,,b%:SYS53,-1,10TO,,RJ%:IFc%<2ANDb%<2ANDRJ%=0THEN 830Z$="23" 831ELSEZ$=FNM(a%) 832ENDIF:a%=OPENIN(e$+Z$):IFa%THEN 833CLOSE#a%:e$+=Z$ 834ENDIF 835ENDIF:=e$ 836DEFFNF(Hy%)=(Hy%AND1)<>0 837DEFPROC`(q%,T%)IFT%=-1THEN 838SYS&600d2,q%,-1,0,0,1<<25,-1 839ELSESYS&600d2,q%,T%,,,-1,LEN(FNZy(q%,T%)):SYS&dcb8d,8,q% 840ENDIF:ENDPROC 841DEFPROCwy(q%,eu%)SYS&dcb8d,Cy,q%,eu%:ENDPROC 842DEFPROCX(q%)IFq%>0THENSYS&dcb8d,Yy,q% 843ENDPROC 844DEFPROCpy(q%)SYS&dcb8d,Cy,q%,-1:ENDPROC 845DEFPROChy(q%,T%,hJ%,yu%,`J%)LOCALF%:F%=FNA(16):F%!0=q%:F%!4=T%:F%!8=yu%<<hJ%:F%!12=`J%<<hJ%:SYS&400cd,,F%:PROCC(F%,16):ENDPROC 846DEFFNB(q%,T%)SYS&dcb8c,zy,q%,T%TOT%:=T% 847DEFPROCI(q%,T%,Tu%)SYS&dcb8c,jy,q%,T%,Tu%:ENDPROC 848DEFPROCV(wJ%,A$)LOCALF%:F%=FNA(300):F%!0=wJ%:$(F%+4)=A$+CHR$(0):PROCK(F%):PROCC(F%,300):ENDPROC 849DEFPROCB(A$)ERRORN_%,A$:ENDPROC 850DEFPROCL(wJ%)LOCALF%:F%=FNA(300):F%!0=yy%:PROCo("LE"+STR$(wJ%),F%+4):PROCK(F%):PROCC(F%,300):ENDPROC 851DEFPROCK(Hu%)SYS&400df,Hu%,1,G$:ENDPROC 852DEFFNG(Hy%,A$)LOCALF%,K%:PROCh:F%=FNA(260):!F%=0:$(F%+4)=A$+CHR$(0):SYS&400df,F%,(16ORHy%),FNL(0)TO,K%:PROCC(F%,260):=K% 853DEFPROCgyLOCALF%:F%=FNA(256):F%?0=1:F%?1=0:F%?2=0:F%?3=0:F%?4=0:F%?5=H_%MOD256:F%?6=H_%DIV256:F%?7=P_%MOD256:F%?8=P_%DIV256:SYS7,21,F%:!F%=w_%:SYS&400c6,,F%:PROCC(F%,256):ENDPROC 854DEFPROCry(c%,b%,_%,T%)PROCgy:c%=FNZ("FN_Stop_Action_"+j$+"("+STR$(T%=0)+")"):ENDPROC 855DEFFNLy(V$)WHILEINSTR(V$,"."):V$=MID$(V$,INSTR(V$,".")+1):ENDWHILE:=V$ 856DEFPROCE(q%,T%,Y$)SYS&dcb8c,hy,q%,T%,Y$:ENDPROC 857DEFPROCN(q%,N%,R%)SYS&dcb8c,wy,q%,N%,R%:ENDPROC 858DEFFNZy(q%,N%)SYS&dcb8c,Dy,q%,N%TOq%:=FNM(q%) 859DEFFNl(q%,N%)SYS&dcb8c,Dy,q%,N%TOq%:=q% 860DEFFNI(K$)LOCALd%,D%,Q%:SYS&20008,17,K$TOd%,,,,D%;Q%:IFFNF(Q%)THEN 861PROCF("Reason",FNLy(K$)):PROCy(d%):PROCB(FNL(4)) 862ENDIF:IFd%<>1THEN 863D%=-1 864ENDIF:=D% 865DEFFNA(w%)LOCALK%:IF(Ny%+w%)<ay%THEN 866K%=Ny%:Ny%+=w% 867ELSEPROCB("Wimp Stack full") 868ENDIF:=K% 869DEFPROCvy:Ny%=fy%:ENDPROC 870DEFPROCC(X_%,w%)IF(X_%<fy%)OR(X_%>ay%)THEN 871PROCB("Release_Stack: Invalid stack chunk") 872ELSEIF(w%<0)OR((X_%+w%)>ay%)THEN 873PROCB("Release_Stack: Invalid chunk size") 874ELSENy%-=w%:IFNy%<>X_%THEN 875PROCB("Release_Stack: Bad pop") 876ENDIF 877ENDIF 878ENDIF:ENDPROC 879DEFPROCYy(r$,t%,gJ%,n_%,WJ%,CJ%)PROCs_(r$,r$,t%,gJ%,n_%,WJ%,CJ%):ENDPROC 880DEFPROCs_(r$,H$,t%,gJ%,n_%,WJ%,CJ%)D$=STR$(t%)+"."+RIGHT$("0"+STR$(gJ%),2):D$+=" ("+RIGHT$("0"+STR$(n_%),2)+"-":D$+=MID$("CBJanFebMarAprMayJunJulAugSepOctNovDec",WJ%*3,3):D$+="-"+RIGHT$("19"+STR$(CJ%),4)+")":G$=r$:PROCF("App",G$):PROCyy(Ky%,G$+"$Dir"):IFKy%=0THENERROR1,"EIW5" 881IFU$<>""THEN 882n_%=FALSE:S_%=W%:t%=INSTR(U$,","):WHILEt%<>0:S_%!0=FNZ(LEFT$(U$,t%-1)):S_%+=4:U$=MID$(U$,t%+1):t%=INSTR(U$,","):ENDWHILE:S_%!0=FNZ(U$):S_%!4=0:SYS&400c0,300,&4b534154,H$,W%TOU_%,Y% 883ELSESYS&400c0,200,&4b534154,H$TOU_%,Y% 884ENDIF:ONERRORPROCcy 885SYS&606c0:IFU_%<200THEN 886ERRORN_%,FNL(5) 887ENDIF:dy%=TRUE:PROCLy:PROCKy:dy%=-2:PROCI_:PROCay:IFZ_%=0THEN 888PROCE(s%,7,D$) 889ENDIF:bu%=-1:hu%=-1:Uu%=-1:nu%=-1:pJ%=FALSE:fu%=-1:Su%=-1:h$="":m$="":PROCSy:SYS&606c1:ENDPROC 890DEFPROCcySYS&606c1:IFsy%THEN 891PROCV(yy%,REPORT$+" ["+STR$ERL+"]") 892ELSEPROCV(yy%,REPORT$) 893ENDIF:PROCS:END:ENDPROC 894DEFPROCyy(RETURNW_%,v$)LOCALw%,Ry%:SYS&20023,v$,0,-1,0,1TO,,w%,,Ry%:IFw%=0THEN 895W_%=0 896ELSEIFRy%=1THENERROR1,"EIW4" 897w%=-w%:PROCG(W_%,w%):SYS35,v$,W_%,w%,0,1:W_%?(w%-1)=0 898ENDIF:ENDPROC 899DEFFN_FileType_version=10 900DEFFN_hard_initialise_FileType:ki=-1:xy=8192:ny=4096:Ou=4095:EJ=4093:K_=4091:b=4089:yl=4086:Vl=4076:f=4075:Jy=3478:nJ=3388:ll=3269:Pl=3254:kl=3253:xi=2815:du=2779:Ni=1793:Qi=1296:=0 901DEFFN_file_io_version=10 902DEFFN_hard_initialise_file_ioPROCA("<BasicV$Lib>.CheckVars",2):PROCA("<BasicV$Lib>.string",6):p_%=256+20:DIMh%p_%:DIMEu%9:Eu%?8=13:=0 903DEFFNMy(K$)LOCALw%,Ry%:SYS8,5,K$TORy%,,,,w%:IFRy%=0THENERROR1,"EIF1 "+K$ 904=w% 905DEFPROCf(K$,Nu%)SYS8,255,K$,Nu%:ENDPROC 906DEFFNO(B$,C$,RETURNx%)LOCALsJ%:SYS&2000c,10,B$,h%,1,x%,p_%,C$TO,,,sJ%,x%:=sJ% 907DEFFNN(B$,C$)LOCALRy%,g%,Wy%,D%,xJ%:SYS&20008,5,B$+"."+C$TORy%,,g%,Wy%,D%,xJ%:h%!0=g%:h%!4=Wy%:h%!8=D%:h%!12=xJ%:h%!16=Ry%:PROCV_((B$+"."+C$),(h%+20)):=(Ry%=0) 908DEFFNVy=!h% 909DEFFNk=h%!8 910DEFFNQ=FNU(h%+20) 911DEFFNWy=((h%!16)=2) 912DEFFNWLOCALK%:K%=FNVy:IF(K%AND-1048576)=-1048576THEN 913K%=(K%AND&fff00)>>8 914ELSEK%=-1 915ENDIF:=K% 916DEFFN_string_version=7 917DEFFN_hard_initialise_stringPROCA("<BasicV$Lib>.ctype",1):=0 918DEFFNb(Z$,a$)LOCALQ%,a%,_%:a%=LEN(Z$):_%=LEN(a$):Q%=0:WHILEa%>0AND_%>0ANDQ%=0:Q%=SGN(FNT(ASC(Z$))-FNT(ASC(a$))):IFQ%=0THEN 919a%-=1:_%-=1:Z$=RIGHT$(Z$,a%):a$=RIGHT$(a$,_%) 920ENDIF:ENDWHILE:IFQ%=0THEN 921Q%=SGN(a%-_%) 922ENDIF:=Q% 923DEFPROCV_(Y$,X%)$X%=Y$:X%?LEN(Y$)=0:ENDPROC 924DEFFN_Misc_version=46 925DEFFN_hard_initialise_MiscLOCALN%,F_%,R%:IFFNH<12THENERROR1,"EIA1" 926k$="":Au%=100:DIMju%16:=0 927DEFFNR(z$,_y%,ru%)LOCALE_%,m_%,y_%,a_%,e_%:v%=FNNy(z$):IFU%AND2=0THEN 928[OPTU%:DCD0:DCD0:] 929ELSEE_%=ru%-P%-8:IFABS(E_%)>65535THENERROR1,"EIA2" 930y_%=ABS(E_%)AND255:m_%=ABS(E_%)AND65280:IFE_%>=0THEN 931a_%=v%OR(&28f0000+(_y%<<12)+y_%):e_%=v%OR(&2800c00+(_y%<<16)+(_y%<<12)+(m_%>>8)) 932ELSEa_%=v%OR(&24f0000+(_y%<<12)+y_%):e_%=v%OR(&2400c00+(_y%<<16)+(_y%<<12)+(m_%>>8)) 933ENDIF:[OPTU%:DCDa_%:DCDe_%:] 934ENDIF:=0 935DEFPROCW_(V$)LOCALTJ%,rJ%,vJ%:TJ%=P%:rJ%=O%:vJ%=U%:IF(U%AND4)=0THEN 936O%=P% 937ENDIF:P%=0:U%=U%OR6:P%=FNZ("FN_Declare_Local_Variables_"+V$):P%=TJ%:O%=rJ%:U%=vJ%:ENDPROC 938DEFFNNy(z$)LOCALv%:CASEz$OF 939WHEN""," ":v%=14 940WHEN"lo":v%=3 941WHEN"hs":v%=2 942OTHERWISEv%=INSTR("eqnecsccmiplvsvchilsgeltgtlealnv",z$):IF(v%MOD2)=0THENERROR1,"EIA13" 943v%=(v%-1)>>1 944ENDCASE:=v%<<28 945DEFFNy(a%)IF(U%AND4)THENa%+=y% 946=a% 947DEFPROCWLOCALLy%:IFU%AND2THENLy%=50ELSELy%=0 948SYS&606c4,((FNy(P%)-y%)/(L%-y%)*50)+Ly%:ENDPROC 949DEFFN_Heap_version=9 950DEFFN_hard_initialise_Heap=0 951DEFFNY(RETURNey%,A%)ey%=USR(uJ%):IF!Cy%THENey%=0 952=!Cy% 953DEFPROCG(RETURNey%,w%)IFFNY(ey%,w%)THEN 954ey%=!Cy%:ERROR!ey%,FNU(ey%+4) 955ENDIF:ENDPROC 956DEFPROCZ(RETURNA%)IFFNn(A%)THEN 957A%=!Cy%:ERROR!A%,FNU(A%+4) 958ENDIF:ENDPROC 959DEFFNn(RETURNA%)CALLKJ%:A%=0:=!Cy% 960DEFPROCJ_[OPTU%:FNX(uJ%,_y):FNX(KJ%,my):FNX(au%,iy):ALIGN:.Cy%DCD0:]:ENDPROC 961DEFFNX(RETURNQu%,du%)[OPTU%:ALIGN:.Qu%:FNJ:STMFD(A)!,{Z}:MOV Z,#0:STR Z,Cy%:BL du%:STRvs0,Cy%:LDMFD(A)!,{pc}^:]:=0 962DEFFN_Message_version=6 963DEFFN_hard_initialise_Message:ai=31:SYS5,"RMEnsure CAssembler 0.08 RMLoad System:Modules.CAssembler":DIMly 256:=0 964DEFFNg(f$,Lu%,RETURND_%)LOCALA%:SYS&fcb83,f$+".Messages.",Lu%,0TOA%,D_%:IFD_%=0THENCALLGy 965=A% 966DEFFNAy(J%,T$,h_%)SYS&fcb85,T$,h_%,J%TOh_%;J%:=h_%AND((J%AND2)=2) 967DEFFNu(J%,T$,q$)LOCALt%:SYS&fcb85,T$,q$,J%TOt%;J%:=t%AND((J%AND2)=2) 968DEFFNp(J%)LOCALt%:SYS&fcb86,J%TOt%;J%:=t%AND((J%AND2)=2) 969DEFFND(J%,T$)LOCALt%:SYS&fcb84,T$,ly,256,J%,0TOt%,J%:?J%=13:=$ly 970DEFPROCzy(J%,T$,Bu%)J%=FNAy(J%,T$,Bu%):ENDPROC 971DEFPROCuy(J%,T$,q$)J%=FNu(J%,T$,q$):ENDPROC 972DEFPROCz_(J%)J%=FNp(J%):ENDPROC 973DEFFNS(R%)=FND(m%,"E"+STR$(R%)) 974DEFFNE(_$)=FND(m%,_$) 975DEFPROC_(_$,R%)PROCzy(m%,_$,R%):ENDPROC 976DEFPROCF(_$,i$)PROCuy(m%,_$,i$):ENDPROC 977DEFPROCo(_$,B%)SYS&dcb84,_$,B%,256,m%,0:ENDPROC 978DEFPROCQ_PROCz_(m%):ENDPROC 979DEFPROCy(_%)IF_%<=0THEN 980PROCF("Sys",""):PROCF("SysN","") 981ELSEPROCF("Sys",FNM(_%+4)):PROCF("SysN",STR$~(!_%)) 982ENDIF:ENDPROC 983DEFFNL(R%)=FND(m%,"LE"+STR$(R%)) 984DEFPROCxy[OPTU%:ALIGN:.Gy:FNJ:B ky:]:IFU%AND4THENGy+=y% 985ENDPROC 986DEFFN_IntMath_version=6 987DEFFN_hard_initialise_IntMath=0 988DEFFN_NullReason_version=5 989DEFFN_hard_initialise_NullReason=0 990DEFPROCayDIM`%4:!`%=0:wy%=0:G_%=FALSE:Oy%=6193:ENDPROC 991DEFPROCOy(L$,ny%)PROCG_(L$,ny%,TRUE):ENDPROC 992DEFPROCG_(L$,ny%,c_%)LOCALR%:PROCG(R%,12+LEN(L$)+1):$(R%+12)=L$:R%!8=ny%:R%!4=c_%:!R%=!`%:!`%=R%:PROCCy:ENDPROC 993DEFPROCWy(L$,ny%)PROCly(L$,ny%,TRUE):ENDPROC 994DEFPROCly(L$,ny%,c_%)LOCALR%,Z%:IFL$=""THEN 995PROCB("EIN3"):WHILE!`%:PROCc(`%):ENDWHILE 996ELSEZ%=`%:WHILE!Z%:R%=!Z%:IF($(R%+12)=L$)AND(R%!4=c_%)AND(((ny%=0)ANDc_%)OR(R%!8=ny%))THEN 997PROCc(Z%) 998ELSEZ%=R% 999ENDIF:ENDWHILE 1000ENDIF:ENDPROC 1001DEFPROCc(Z%)LOCALR%:IFZ%=0THENPROCB("EIN6") 1002R%=!Z%:IFR%=0THENPROCB("EIN5") 1003IFR%=wy%THEN 1004wy%=!R%:G_%=TRUE 1005ENDIF:!Z%=!R%:PROCZ(R%):PROCCy:ENDPROC 1006DEFPROCCyIF!`%THEN 1007Oy%=Oy%AND(NOT1) 1008ELSEOy%=Oy%OR1 1009ENDIF:ENDPROC 1010DEFPROCt_LOCALu%,Z%,s_%,A%:u%=!`%:WHILEu%:wy%=u%:G_%=FALSE:IFu%!4THEN 1011s_%=FNZ("FN_Null_Reason_"+$(u%+12)+"("+STR$(u%!8)+")") 1012ELSEs_%=FNZ("FN_Null_Reason_"+$(u%+12)) 1013ENDIF:IFG_%THEN 1014u%=wy% 1015ELSEwy%=0:A%=!u%:IFs_%THEN 1016Z%=`%:WHILE!Z%<>u%:Z%=!Z%:IFZ%=0THENPROCB("EIN2") 1017ENDWHILE:PROCc(Z%) 1018ENDIF:u%=A% 1019ENDIF:ENDWHILE:ENDPROC 1020DEFFN_Null_Reason_PROCB("EIN1"):=0 1021DEFFN_CheckVars_version=3 1022DEFFN_hard_initialise_CheckVars=0 1023DEFFN_ctype_version=1 1024DEFFN_hard_initialise_ctype=0 1025DEFFNUy(Q%)=Q%-ASC("A")+ASC("a") 1026DEFFNSy(Q%)=Q%>=ASC("A")ANDQ%<=ASC("Z") 1027DEFFNT(Q%)LOCALK%:IFFNSy(Q%)THEN 1028K%=FNUy(Q%) 1029ELSEK%=Q% 1030ENDIF:=K% 1304: 1305: 1306: 1307DEFPROCH_PROCAy:ENDPROC 1308DEFPROCO_BPUT#W%!20,"Run "+FNM(Ky%):ENDPROC 1309: 1310:
�>!RunImage 0�Produced by BasCompress v1.31 (18 Jan 1993) S�M$(3):M$()="|","iconsprites","stripcfs","forcecfs":y$="uncfs":�d_("UnCFS",�):� ��R_(M%)� G��Py�Q%:!a=�:!w=�:!_=�:!O=�:ș&2001e,18,"CFSUtil"+�(0)�;Q%:�F(Q%)� �G(2,�S(15)) �:� 0ݤDy(E%,E$,N%)�G%,l_%:�D(E$):G%=�:l_%=�:Ȏ�� ɤN(E$,Z$(N%)):l_%=� ɤW<>Jy ɤN("CFS#"+E$,Z$(N%)) ɤW<>E%(N%) G%=� �:�l_%� �n(E%) �:=G% |��v(E%,E$,C$,N$)�X%,D%,J%,g%,Wy%,Ay%,M$,Q%:�D(E$):E$+="."+C$:�U(E%,E$):M$="CFS#"+E$:ș8,5,M$�,,g%,Wy%,D%,Ay%:�(Ay%�1)=0� �z(E%,8,M$) ��P(X%,D%+1)� �O(E%,�) ��:��:�Z(X%):�H �:��:�l(E%,X%,M$):� �f(M$,X%):��:�j(X%,D%,N$)� N$="" �:�:��:�u(E%,X%,M$):� 7ș13,139,E$�J%:�:��:�Ry(J%,M$,g%,Wy%,X%,D%,Ay%) �N$<>""� ș12,2,J%,N$,�(N$) H�:ș12,2,J%,X%,D%:��:�#J%:ș8,1,E$,g%,Wy%,,Ay%:��:�O(E%,�):��:�Z(X%) � �:� ݤj(ly%,D%,�N$)�G%:�N$=""� !G%=� "J�G%=D%>=�(N$):N%=1:ȕN%<=�(N$)�G%:G%=(�(�N$,N%,1))=ly%?(N%-1)):N%+=1:� # �:=G% $/��jy(E%,E$)E%!W=-2:�D(E$):E$="CFS#"+E$:Ȏ�� %ɤN(E$,"!Boot") & ɤW<>f '�n(E%):�q_(E%,E$) (�:� ){��q_(E%,c$)�X%,D%,J%,g%,Wy%,Ay%,Q%,M$:�D(c$):E$=c$+".!Boot":�U(E%,E$):M$="CFS#"+E$:ș8,5,M$�,,g%,Wy%,D%,Ay%:�(Ay%�1)=0� *�z(E%,8,E$) +��P(X%,D%+1)� ,�O(E%,�) -��:��:�Z(X%):�H .�:��:�l(E%,X%,M$):� /�f(M$,X%):��:�Hy(X%,D%)� 0笤o(E%,c$)� 1�:��:�u(E%,X%,E$):� 2ș8,6,E$:��:�O(E%,�) 3� 4�:��:�Z(X%) 5� 6�:�U(E%,""):� 7�ݤHy(ly%,D%)�f%,G%,Q$,N%:f%=0:G%=f%<D%:ȕG%��t(ly%,D%,f%,Q$):N%=�(M$(),1):ȕG%�N%>=0:G%=(�Q$,M$(N%))<>1):N%-=1:�:G%=�G%:�:=G% 8�ݤt(ly%,D%,�f%,�Q$)�Q$="":ȕf%<D%��Xy(ly%?f%):f%+=1:�:ȕf%<D%�(��d(ly%?f%)):Q$+=�Fy(ly%?f%):f%+=1:�:�(Q$="")�(�(Q$)<>�("|")):=Q$<>"" 9ݤXy(Q%)�G%:G%=�:ȎQ%� : ɗ"*" ; ɗ" " <�9 =G%=�d(Q%) > �:=G% ?ݤd(Q%)=((Q%=10)�(Q%=13)) @#ݤFy(Q%)�Q%>=�("A")�Q%<=�("Z")� AQ%+=�("a")-�("A") B�:=�(Q%) CX��I_�F%,N%,F_%:F_%=0:�N%=0��(A$(),1):ș46,280,e%,A$(N%):�F_%<�(A$(N%))�F_%=�(A$(N%)) D��N%:�f_%F_%+2:p=0:F%=�A(512):F%!0=-1:F%!4=0:F%!8=0:F%!12=68:F%!16=68:F%!20=12674:F%!24=f_%:$f_%=A$(p)+�(0):F%!28=e%:F%!32=F_%+1:ș&400c2,,F%�V_%:�C(F%,512):� E4ݤo(E%,E$)�G%,M$,g%,Wy%,D%,Ay%:M$="CFS#"+E$:Ȏ�� FɤN(M$,"!Run") GɤW=f:G%=�Ey(E%,M$+".!Run") H �:=G% IBݤEy(E%,M$)�G%,D%,Ay%,X%:�f%,Q$,N%:ș8,5,M$�,,,,D%,Ay%:�Ay%�1� J�P(X%,D%+1)=0� K�:��:�Z(X%):�H LZ�f(M$,X%):f%=0:G%=f%<D%:ȕG%��t(X%,D%,f%,Q$):G%=G%�(�Q$,"!boot")=0):�:G%=�G%:��:�Z(X%) M� N �:=G% O��AyȎW%!16� P �1282:�N_ Q�&400c0:�S_ R �3:�f_ S�&400c1:�Sy T �8:�Iy U�&400cc:�my V�10:�O_ W �0:�S X�:� Y��w_ș&400c5,,W%:� Z��iyș&400c6,,W%:� [��b_�!W%=V%� \�M_(W%!4,W%!24) ]�ș&400dc,W%!24 ^�:� _2��ty�QJ%,IJ%:IJ%=�:�ș&400c7,Oy%,W%�QJ%:ȎQJ%� ` �0:�t_ a �2:�w_ b �3:�iy c �6:�D_ d �8:�b_ e �9:�r_ f�17:�Ay g�18:�H_ h�:��(IJ%):� i��_y�a%,SJ%,Z$:��:�+0:�Z_%� j(a%=!(�C("ProgInfo")+F+88+(By<<5)+20) k�a%=�l(s%,By) lL�:�Z$:SJ%=�(Z$):Z$=�Z$,2):ȕZ$<>"":?a%=�(Z$)�SJ%:Z$=�Z$,2):a%+=1:�:?a%=0 m8�"Λ�����������",,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,, n� o+��U_ș&465c6,Y%,j%:ș&dcb8d,ty,!j%,-1:� p@��x_�j%4:!j%=0:�T("ShareWare",+1,""):�_("ShareWare",j%,VJ%) q� r��d_(f$,Qy%)��x s{�Ty(20,12):Vy%=-2:sy%=�:Uy%=�:Uy%=�:sy%=�:Vy%=-3:�A("<BasicV$Lib>.CAsm",1):�A("<BasicV$Lib>.Template",21):O_%=sy%:i%=+1 t�AJ%=�:ky%=0:`y%=0:�T_("stdio, stdlib, string, message, wimp"):�ky(2000,�,�):�A("<BasicV$Lib>.ModeInfo",1):�A("<BasicV$Lib>.Wimp",28) u~�A("<BasicV$Lib>.FileType",2):�A("<BasicV$Lib>.file_io",9):�A("<BasicV$Lib>.string",6):m%=�g("<UnCFS$Dir>",-1,D_%):�D_%>0� v8�!m%,"UnCFS can't load its' message file: "+�U(m%+4) w�:�Qy%�Qy%=2�Qy%=1 x��_("Patching",Qy%):�_("patching",Qy%):�_("patched",Qy%):�_("patch",Qy%):b$="ForceCFS"+�(10):NJ%=0:XJ%=1:dJ%=2:FJ%=0:j_%=0:v_%=1:t_%=2:z_%=3:x_%=4:UJ%=6:BJ%=7:JJ%=8:oJ%=9:Xy=60-1:u=2:v=4:X=5:U=7:H=9:V=11:Y=13:P=14 y�Oy=17:Q=18:Zy%=0:�Z$(5):Z$()="!Boot","!Run","!Sprites22","!Sprites23","!Sprites33","!Sprites32":�E%(�(Z$(),1)):E%()=f,f,b,b,b,b:�A$(1):A$()="!uncfs","busy":Wu%=�:Z_%=�:n%=�:U$="&502,&400c0,3,&400c1,8,&400cc,10":�Yy(f$,1,20,23,7,1994):Uy%=sy%:�Dy:�U_ z��x {�vy:��ty:��:�:� |���r�uy,y:t=0<<2:T=1<<2:J=2<<2:E=3<<2:q=4<<2:s=5<<2:R=6<<2:K=7<<2:S=8<<2:n=9<<2:G=10<<2:W=12<<2:Fy=13<<2:Sy=14<<2:Ly=15<<2:Vy=16<<2:M=17<<2:r=18<<2:Zy=19<<2:Uy=0<<2:Hy=1<<2:o=2<<2:L=3<<2:D=0:I=1:B=2:x=3:d=4:C=5:[OPTU%:ALIGN }�.uy EQUS"[0,w>,>,>":DCB0:.Ky EQUS"[100,<t>":DCB0:ALIGN:.y DCD0:.a DCD0:.w DCD0:._ DCD0:.O DCD0:ALIGN:.gy:�J:STMFD(A)!,{4-9,Z}:MOV1,#0:ADR0,uy:BL Wy:STRvc0,y ~�ADRvc0,y:LDMFD(A)!,{4-9,pc}:.Ty:�J:STMFD(A)!,{4-9,Z}:LDR0,[0,#M]:STMFD(A)!,{0}:MOV1,#0:ADR0,Ky:BL Wy:ADD A,A,#1<<2:STRvc0,y:ADRvc0,y:LDMFD(A)!,{4-9,pc}:]:�L_:� ��j� �`��a_:ty%=-12314:�T("FConvert",+1,"StatusW"):�T("Choices",+1,"ChoicesW"):V%=0:vu%=0:�x_:�_y:� �}ݤStatusW(M%)�R_(M%):OJ%=M%!16:qJ%=M%!20:bJ%=M%!8-M%!0:MJ%=M%!12-M%!4:o_%=M%!48-M%!40:Y_%=M%!52-M%!44:�P(M%,X,�E("None")) ���P(M%,X+1,�E("FScan0")):�P(M%,U,�E("None")):�P(M%,U+1,�E("FConv0")):�P(M%,H,�E("None")):�P(M%,H+1,�E("AScan0")):�P(M%,V,�E("None")) ���P(M%,V+1,�E("AConv0")):�P(M%,v,""):�P(M%,u,""):�P(M%,Y,�E("Abrt")):�P(M%,v-1,�E("Patching")):�s(M%!72,��E("Title"),M%!80-1)):=0 �6ݤChoicesW(M%)�s(M%!72,��E("Choices"),M%!80-1)):=0 �:��P(M%,N%,Y$)N%=M%+88+(N%*32):�s(N%!20,�Y$,N%!28-1)):� �%��B_(c%,b%,_%,T%)c%=�G(1,�S(2)):� �ݤf(M%,�E%)�jy%:ȎM%� ��-2 ��s% ��!j% ��V% �7E%=Zy%:jy%=�:ȕE%��jy%:jy%=(M%=E%!E):�jy%�E%=E%!T ��:�jy%� � M%=ty% �� � �:=M% �<��N_�A$,q%,T%,A%,N%,X%,E%:A$="":T%=W%!36:Ȏ�f(W%!32,E%)� ��-2:�T%=V_%� �A$="IconBar" �� ��s%:A$="ProgInfo" ��!j%:A$="ShareWare" ��V%:A$="Choices":�T%>=0� �A$+=","+�(T%) �� ��ty%:A$="Status":�T%� �A$+=","+�(T%) � �:ȎE%!S� ��B,D,I:A$+=",P" ��C:A$+=",S" ��x:A$+=",C" ��d:A$+=",D" �� ��(U_%>218)�(W%!36<>-1)� � A$=�Cy �� ��:�A$<>""� ��o("H"+A$,W%+20):�W%?20� �NW%!16=1283:W%!12=W%!8:A%=W%+20:ȕ?A%:A%+=1:�:�A%>=(W%+256)�A%=W%+255:?A%=0 �)W%!0=(A%-W%+4)�-4:ș&400e7,17,W%,W%!4 �� ��:� �8ݤCy�A$,M%:M%=W%+40:ș&400f4,1,M%,W%!32,W%!36:ȎSy%� ��xy%:A$="I" ��py%:A$="D" ��:�A$<>""� �7A$="M"+A$+�(!M%):ȕM%!4<>-1:M%+=4:A$+="_,"+�(!M%):� � �:=A$ �!��Sy�qy(-1):ș&465c2,Y%:�sy:� �/��S�::��1,"Error in error handler: "+�$ ��Hy:�Q_:�i:ș&400dd:�:� ���v_�w� ��S ��:� �Bݤw�qy%,E%:qy%=�:E%=Zy%:ȕE%�qy%:qy%=(E%!S=d):E%=E%!T:�:�qy%� �qy%=(�G(3,�S(5))=1) � �:=qy% ���Iy�w� ��S �,�W%!12=W%!8:Iu%=W%!4:ș&400e7,19,W%,W%!4 ��:� �X��D_�c%,b%,_%,M%,T%,F_%,X%,E%:c%=W%!0:b%=W%!4:_%=W%!8:M%=�f(W%!12,E%):T%=W%!16:Ȏ_%� ��2:ȎM%� �9�-2:�p:b%=96+(44*HJ%)+(24*kJ%):ș&400d4,,Iy%,c%-64,b% ��!j%:�Qy �&�ty%:�k(E%):ș&400d4,,Iy%,c%-64,b% �� ��1*16,4*16:ȎM%� ��s%:�Ny(c%,b%,_%,T%) �� � ȎM%� ��-2:�B_(c%,b%,_%,T%) ��w_%:�ry(c%,b%,_%,T%) ��s%:�Ny(c%,b%,_%,T%) ��!j%:�Qy ��ty%:�K_(E%,T%,_%) ��V%:�by(_%,T%) �� ��:� �&��Qyș&465c4,Y%,j%:�Z(VJ%):!j%=0:� �.��Ky:Sy%=�:xy%=&1040a31+0:py%=&1040a31+1:� �-��p�A%:HJ%=3:kJ%=0:�ky%�ș&465c8,Y%,ky%,� �6A%=�(gy):Iy%=!A%:ky%=Iy%:ș&465c7,Y%,ky%:Sy%=xy%:� ���k(E%)�A%:�E%� � K_%=E% ��:�`y%�ș&465c8,Y%,`y%,� �=A%=K_%:A%=�(Ty):Iy%=!A%:`y%=Iy%:ș&465c7,Y%,`y%:Sy%=py%:� �5��S_�c%,b%,M_%:c%=W%!24:b%=W%!28:M_%=W%!32:ȎSy%� ��xy%:ȎM_%� ��NJ%:�Fy:�s%>0� �@�E(s%,0,�E("App")):�E(s%,1,�E("Purpose")):ș&400e8,,s%,c%,b% �� �� ��:� �k��r_�M_%,F%,_J%,zJ%,iJ%,A%:F%=�A(512):ș&400cf,,F%:_J%=F%!0:zJ%=F%!4:iJ%=F%!8:�C(F%,512):M_%=!W%:ȎSy%� ��xy%:ȎM_%� ��XJ%:�`y ��dJ%:�v_ �� ��py%:ȎM_%� ��FJ%:�w(K_%) �� � �:�iJ%=1� � ȎSy%� ��xy%:�p ��py%:�k(0) ��:ș&400d4,,Iy%,_J%,zJ% ���h ��:� ���hș&400d4,,-1:Sy%=�:� ���H��,�q:�S:� �ݤq�w$:�sy%� �w$=�$+" ["+�(�)+"]" � �w$=�$ � �:=w$ �0��Dy�J%:�Py:J%=�(�M(Ky%)+".Choices"):�J%<>0� ��:��:�#J%:� �+�#J%,!a:�#J%,!w:�#J%,!_:�#J%,!O:��:�#J% ��:� �4��Gy�J%:J%=�(�M(Ky%)+".Choices"):�:��:�#J%:� �-�#J%,!a:�#J%,!w:�#J%,!_:�#J%,!O:��:�#J%:� � ��By�Py:� �"��f_�((W%!20=-2)�(W%!24=V_%))� �ȎW%!40� �?�xy:�My(�M(W%+44),�):W%!12=W%!8:W%!16=4:ș&400e7,17,W%,W%!4 �?�ny:�My(�M(W%+44),�):W%!12=W%!8:W%!16=4:ș&400e7,17,W%,W%!4 ��G(1,�S(3)) � �:� .��My(E$,R_%)�E%:�D(E$):�P(E%,Zy+�(E$)+1)� R�$(E%+Zy)=E$:E%!J=0:E%!Fy=!a:E%!M=!w:E%!Sy=!_:E%!Ly=!O:E%!E=0:E%!r=�:�Iy(E%)� �Z(E%) ��Zy%=0��Y(1) �c_(E%,Zy%):�s(E%,E$,R_%)� �b(E%) ��e(E%) � � �:� Mݤ_Null_Reason_uncfs(E%)�G%:ș&606c0:ș&20006,229,0,0:�:��:�E_(E%):=� G%=�:�ȎE%!S� �B:�Z_(E%) �D:�fy(E%) �I:�Y_(E%) �x,d,C:G%=� 2�:�G%�E%!Fy:��:ș&20006,229,255,0:ș&606c1:=G% .��E_(E%)ș&606c1:ș&20006,229,255,0:�=17� �J(E%,x) ��b(E%):�V(�,�q) �:� '��Z_(E%)�G%,I%,E$:G%=�:I%=E%!J:�I%� !E$=$(I%+L):�O(E$,"*",I%!Uy)� �Wy� #�s(E%,E$+"."+�Q,�(�Q)=�("!"))� G%=�V(E%) � � �G%=�V(E%) � �G%=� ! �:�G%� " �E%!S<>C� #�J(E%,d) $� %�:� &]��fy(E%)�G%,I%,E$:G%=�:I%=E%!J:E$=$(I%+L):ȕE%!G<�(Z$(),1)�G%�(E%!S<>C):�Dy(E%,E$,E%!G)� '�E%(E%!G)=f� (�v(E%,E$,Z$(E%!G),b$) )��v(E%,E$,Z$(E%!G),"") * �:G%=� +�:E%!G+=1:�:�G%� ,�E%!S=D� -�E%!Sy� .�J(E%,I):E%!W=0 / ��J(E%,B) 0� 1� 2�:� 3R��Y_(E%)�G%,I%,E$:G%=�:I%=E%!J:E$=$(I%+L):ȕE%!W<>-1�G%�E%!S<>C:�Py(E$,E%!W)� 4�v(E%,E$,�Q,""):G%=� 5!�:�:�(E%!Ly<>0)�G%�(E%!W=-1)� 6 �I%!o� 7�jy(E%,E$) 8� 9 �:�G%� :�E%!S=I� ;�J(E%,B) <� =�:� >/ݤPy(E$,�x%)�G%:�D(E$):G%=�:�O(E$,"*",x%)� ?�n(E%):�W=Jy� @"G%=(�k>=�My("CFS#"+E$+"."+�Q)) A� B �x%=-1 C �:=G% D!��D(�x$)�b(�x$,4),"CFS#")=0� E x$=�x$,5) F�:� G'��z(E%,qu%,E$)�J(E%,C):�E%!M��w(E%) H�U(E%,E$):�X_(E%,�S(qu%)):� I2��l(E%,X%,E$)�Z(X%):�F("Sys",�$):�z(E%,6,E$):� J2��u(E%,X%,E$)�Z(X%):�F("Sys",�$):�z(E%,7,E$):� K(��Ry(J%,E$,g%,Wy%,X%,D%,Ay%)�J%��#J% L;ș&20008,0,E$,g%,Wy%,X%,X%+D%:ș&20008,4,E$,,,,Ay%:�H:� M/ݤs(E%,E$,R_%)�I%:�D(E$):�P(I%,L+�(E$)+1)� NI%=0 OC��t(E%,E$):I%!Hy=E%!J:I%!Uy=0:I%!o=R_%:$(I%+L)=E$:E%!J=I%:�R_%� P�J(E%,D):E%!G=0 Q� R �:=(I%=0) SݤV(E%)�x%,I%:I%=E%!J:�I%� T �I%!o� U�oy(E%):�E%!r� V�Uy(E%) W� X*�:x%=I%!Hy:�Z(I%):E%!J=x%:I%=x%:E%!r=� Y �:�I%� Z�t(E%,$(I%+L)) [ �:=(I%=0) \;��b(E%)���V(E%):�Vy(E%):�A_(E%,Zy%):�Z(E%):�Zy%=0��Y(0) ]� ^2��c_(Gy%,�ry%)Gy%!T=ry%:Gy%!t=0:�ry%�ry%!t=Gy% _ ry%=Gy%:� `=��A_(Gy%,�ry%)�T_%,my%:T_%=Gy%!t:my%=Gy%!T:�my%�my%!t=T_% a�T_%�T_%!T=my% b�Gy%=ry%�ry%=my% c� d)ݤP(�Xu%,w%)�__%:__%=�Y(Xu%,w%):�__%� e�V(yy%,�S(4)) f �:=__% g0��dy�E%,J_%:J_%=�:E%=Zy%:ȕE%�(�J_%):ȎE%!S� h�B,D,I:J_%=� i�:E%=E%!T:�:�J_%� j �Y(1) k ��Y(0) l�:� m��Y(N%)�N%<>p� n+$f_%=A$(N%)+�(0):�hy(-1,V_%,0,0,0):p=N% o�:� p5ݤIy(E%)�ny("FConvert",E%+E,256,128,E%!Vy):�E%!E� q9E%!q=0:E%!s=0:E%!R=0:E%!K=0:E%!r=�:�J(E%,B):�E%!M��Ey r�wy(E%!E,-1) s�:=(E%!E=0) t��Vy(E%)�E%!E� uș&465c4,Y%,E%+E:�Z(E%!Vy) v�:� w��K_(E%,T%,_%)�E$:ȎT%� x�u,v:E$=�r(E%):�(_%�1)=0� yE$="CFS#"+E$ z"�:ș&20005,"Filer_OpenDir "+E$ {�P:ȎE%!S� |#�B,D,I:�J(E%,x):�Wy("uncfs",E%) }�x:�J(E%,E%!n):�e(E%) ~ �C:�i(E%):�J(E%,E%!n):�e(E%) � ��Q:�E%!S=C� �(�i(E%):�J(E%,E%!n):E%!G-=1:�E%!W<-1� �E%!W+=1 ��E%!W-=1 ��:�e(E%) ���m(E%) �� � �Y:�m(E%) ��:� �+��e(E%)�Y(1):�O(E%,�):�Oy("uncfs",E%):� �#��m(E%)�Wy("uncfs",E%):�b(E%):� �(��J(E%,mJ%)E%!n=E%!S:E%!S=mJ%:ȎmJ%� �A�D,I,B:�q(E%!E,Q):�Q(E%!E,Y):�Q(E%!E,P):�E(E%!E,P,�E("Paus")) �=�x:�q(E%!E,Q):�Q(E%!E,Y):�Q(E%!E,P):�E(E%!E,P,�E("Cont")) �H�d:�Q(E%!E,Q):�q(E%!E,Y):�q(E%!E,P):�E(E%!E,Q,�E("Ok")):�E%!M��w(E%) �S�C:�Q(E%!E,Q):�Q(E%!E,Y):�Q(E%!E,P):�E(E%!E,P,�E("Skip")):�E(E%!E,Q,�E("Rtry")) ��:�dy:� �M��q(M%,N%)�Z%:Z%=�A(64):!Z%=M%:Z%!4=N%:ș&400ce,,Z%:�((Z%!24)�(1<<23))=0� �Jș&400d1,M%,Z%!8,Z%!12,Z%!16,Z%!20:Z%!8=1<<23:Z%!12=1<<23:ș&400cd,,Z% ��:�C(Z%,64):� �I��Q(M%,N%)�Z%:Z%=�A(64):!Z%=M%:Z%!4=N%:ș&400ce,,Z%:�(Z%!24)�(1<<23)� �Jș&400d1,M%,Z%!8,Z%!12,Z%!16,Z%!20:Z%!8=0<<23:Z%!12=1<<23:ș&400cd,,Z% ��:�C(Z%,64):� �*��n(E%)E%!q+=1:�E%!M=0��N(E%!E,X,E%!q) �%�E%!q=1��E(E%!E,X+1,�E("FScan1")) �%�E%!q=2��E(E%!E,X+1,�E("FScanN")) �� ���O(E%,gu%)�gu%� �*E%!r=�:E%!s+=1:�E%!M=0��N(E%!E,U,E%!s) �%�E%!s=1��E(E%!E,U+1,�E("FConv1")) �%�E%!s=2��E(E%!E,U+1,�E("FConvN")) ��:�U(E%,""):� �+��oy(E%)E%!R+=1:�E%!M=0��N(E%!E,H,E%!R) �%�E%!R=1��E(E%!E,H+1,�E("AScan1")) �%�E%!R=2��E(E%!E,H+1,�E("AScanN")) �� �E��Uy(E%)E%!K+=1:�N(E%!E,V,E%!K):�E%!K=1��E(E%!E,V+1,�E("AConv1")) �%�E%!K=2��E(E%!E,V+1,�E("AConvN")) �� ���t(E%,E$)�E%!M=0� ��E(E%!E,u,�c(E$)) ��:� ���U(E%,E$)�E%!M=0� ��E(E%!E,v,�c(E$)) ��:� �ݤc(E$)�(E$)>Xy� �E$="..."+�E$,Xy-3) � �:=E$ �ݤr(E%)�E$,I%:I%=E%!J:�I%� �E$=$(I%+L) ��E$=$(E%+Zy) � �:=E$ ���w(E%)E%!M=(E%!M=0):�E%!M� ��Ey �\��t(E%,�r(E%)):�U(E%,""):�N(E%!E,U,E%!s):�N(E%!E,X,E%!q):�N(E%!E,V,E%!K):�N(E%!E,H,E%!R) ��:� �c��Ey�E(E%!E,u,"-"):�E(E%!E,v,"-"):�E(E%!E,U,"-"):�E(E%!E,X,"-"):�E(E%!E,V,"-"):�E(E%!E,H,"-"):� �/��X_(E%,o$)�Z%,eJ%,fJ%,cJ%,g_%:�E%!M��w(E%) ���E(E%!E,Oy,o$):Z%=�A(64):!Z%=E%!E:cJ%=H_%+1:g_%=P_%+1:eJ%=�((1<<C_%)-1):fJ%=�((1<<Dy%)-1):Z%!4=((cJ%-o_%)/2)�eJ%:Z%!16=g_%-((((g_%-68)-Y_%)/2)�fJ%):Z%!12=Z%!4+o_%:Z%!8=Z%!16-Y_%:Z%!20=0:Z%!24=0:Z%!28=-1:ș&400c5,,Z%:�7:�C(Z%,64):� ����i(E%)�Z%:Z%=�A(64):!Z%=E%!E:ș&400cb,,Z%:Z%!12=Z%!4+bJ%:Z%!16=Z%!8+MJ%:Z%!20=OJ%:Z%!24=qJ%:Z%!28=-1:ș&400c5,,Z%:�C(Z%,64):�U(E%,""):� ���`y�V%=0� �#�EJ%4:!EJ%=0:�a("Choices",EJ%) �V%=!EJ% � �:�V%� ��d:�py(V%):�`(V%,-1) ��:� ���d�V%� �Xș&465c6,Y%,V%:�I(V%,j_%,!a):�I(V%,v_%,!w):�I(V%,t_%,!_):�I(V%,z_%,!O):�I(V%,x_%,�x) ��:� �#��by(_%,T%)�by%:�`(V%,-1):ȎT%� ��UJ%:�R:by%=� ��BJ%:�d:by%=� ��JJ%:�R:�Gy:by%=� ��oJ%:�By:�d:by%=� ��:�by%� ��_%�1092��X(V%) ��:� �e��R�u_%,I$,R$,B$:!a=�B(V%,j_%):!w=�B(V%,v_%):!_=�B(V%,t_%):!O=�B(V%,z_%):u_%=�x:�u_%<>�B(V%,x_%)� �)I$="TFont":R$="TSystem":�u_%�ȔI$,R$ �[B$=�M(Ky%)+".":I$=B$+I$+�0:R$=B$+R$+�0:B$=B$+"Templates"+�0:ș41,25,B$,I$:ș41,25,R$,B$ ��:� ���M_(T%,tJ%)ȎtJ%� ��13:�R:�X(V%) ��27:�X(V%) ��386:�R:�X(V%) ��387:�X(V%) ��388:�R:�Gy:�X(V%) ��389:�By:�X(V%) �ș&400dc,tJ% ��:� �{ݤx�G%,F%,Ly%,R%:F%=�A(128):Ly%=0:�ș12,9,Ky%,F%,1,Ly%,128,"TSystem"+�0�,,,R%,Ly%:G%=(R%=1):�(Ly%=-1)�G%:�C(F%,128):=G% ���my�A$:ȎW%!20� ��V%:A$="WinChoices" ��:�A$<>""� �lA$=�E(A$):W%!16=&400cc:W%!12=W%!8:$(W%+28)=y$+�0:$(W%+36)=A$+�0:W%!0=(36+�(A$)+4)�-4:ș&400e7,17,W%,W%!4 ��:� � ݤH=19 ���Ty(DJ%,cu%)�H<cu%� � �1,"EIL1" � �:�DJ%<1� � �1,"EIL2" �i�:I_%=DJ%:�S$(I_%-1):�A%(I_%-1):i_%=0:�Yy%256:Q_%=40:z%=0:Vy%=12:aJ%=�:�E$(Q_%-1):dy%=�:Uy%=�:O_%=�:� ���A(J$,yJ%)�Xy(J$,yJ%):� �Z��Xy(J$,yJ%)�g%,N%,C$,d$:N%=0:g%=�:C$=�J$,1+�J$,".")):ȕN%<i_%�g%:g%=(C$<>S$(N%)):�g%� � N%+=1 ��:�:�g%� ��N%=I_%� � �1,"EIL3" �O�:S$(N%)=C$:d$="'"+J$+"' does not have a FN_":�:��:�M(d$+C$+"_version") �RA%(N%)=�("FN_"+C$+"_version"):��:i_%+=1:�:��:�M(d$+"_hard_initialise_"+C$) �!�("FN_hard_initialise_"+C$)� ��1,"EIL5 "+J$ ��:�� ��:�yJ%>A%(N%)� ��1,"EIL4 "+J$ ��:� �ݤZ(g$)�:��:�ey � =�(g$) � ��ey�O_%� �-��,�$+" (evaluating `"+g$+"' ["+�(�)+"])" � ̅�,�$ ��:� �+ݤU(A%)�S$:ȕ?A%:S$+=�(?A%):A%+=1:�:=S$ �;ݤGy(A%,B%)�S$:ȕB%>=1�?A%:S$+=�(?A%):A%+=1:B%-=1:�:=S$ �.ݤM(A%)�S$:ȕ?A%>31:S$+=�(?A%):A%+=1:�:=S$ �!��s(A%,S$)$A%=S$:A%?�(S$)=0:� ���Zy(A%,S$,B%)�(S$)<=B%� �($A%=�S$,B%-1):A%?(B%-1)=�(�S$,B%,1)) �$A%=S$:A%?�(S$)=0 �:� ��M(W$)�dy%� �Uy%� ��,�$+" ["+Þ+"]." ̅�,�$ � ��aJ%� �z%=Q_%� &E(Q_%-1)="Errors too deep!!!!!":�x �:��W$,2)=": "� W$=�W$,�(W$)-2) �:�Uy%� E$(z%)=�$ ��z%=0� JE$(z%)="Error `"+�$+"' (line ":E$(z%)+=�(�)+") in ":E$(z%)+="`"+W$+"'" �E$(z%)="`"+W$+"'" � �:z%+=1:��,"" � �:� ��x�o%,l$:�dy%� �Uy%� �V(�,�$+" ["+�(�)+"]."):�S:� ��V(�,�$):�=N_%� �S:� � � ��Vy%=-2� �z%>0� ���,E$(0) ̅��,�$ �:� !�:�Vy%=-3� "8$Yy%="TASK":ș&400c0,200,!Yy%,"LibHandler"+�(0):�z%� #�o%=0�z%-1:�o%<(z%-1)� $�g(E$(o%)+" in") %��g(E$(o%)) & �:�o% '��g(�$+" (line "+�(�)+")") (�:ș&600dd:� )�:�Vy%>=0� *�Vy% +'�:�"An error has occured...":�:�z%� ,6�o%=0�z%-1:�((7-(o%<<1))�6)+1:�E$(o%);:�o%<(z%-1)� -�" in "; . �:�o% /��$;" (line ";�(�);")" 0�:�:�7:� 1�:� 2f��g(q$)�ZJ%:ZJ%=20+(�(q$)+5)�-4:!Yy%=ZJ%:Yy%!16=&804c0:$(Yy%+20)=q$+�(10)+�(0):ș&600e7,17,Yy%,0:� 3ݤ_CAsm_version=14 4�ݤ_hard_initialise_CAsm�A("<BasicV_Assembler$Lib>.Misc",27):ș5,"RMEnsure CAssembler 0.08 RMLoad System:Modules.CAssembler":ș5,"If ""<CAsm$Dir>""="""" Then Set CAsm$Dir <d>.Library.CAsm":CAsmLibrary_stdlib=1:CAsmLibrary_stdio=2 5�CAsmLibrary_string=3:bi=4:li=5:ru=6:Ei=7:CAsmLibrary_wimp=8:V_=9:CAsmLibrary_message=10:cl=11:lu=12:Il=13:ti=14:gu=15:Zi=16:Q_=17:Uu=18:Rl=19:YJ=20:SJ=21:u_=22:Hl=23:ml=24 6�o_=25:za=26:k=26:GJ=0:HJ=1:Wu=2:AJ=3:M_=4:J_=5:H_=6:Ri=7:Ua=8:py=9:h=10:z=11:l=12:A=13:Z=14:JJ=15:ay=&6d734143:p%=0:Py%=13:j=0:N=0:`=10*1024:fy=`+(1*1024):ry=�:=0 7A��T_(X$)�Z%,k%,Ty%,L%,O%,P%,U%,J$:�:��:ș&400ec,cy%,-1:�H 8Rcy%=�-32768:ș&400ec,cy%+32768,-1�L%:L%+=32768:O%=cy%+32768:P%=0:U%=14:�O%=L%� 9/�1,"Not enough memory to start application" : �:�p%<>0� ; �1,"EIC1" < �:�q_%k*8:�F$(k):�h_DEFAULT =3ȕX$<>"":J$=�X$,�X$,",")-1):�:��:�M("EIC2") >Gk%=�("CAsmLibrary_"+J$):��:Ty%=q_%:Z%=Ty%+(p%*8):ȕZ%>Ty%:�!Ty%=k%� ?Ty%=Z%+1 @�Ty%+=8 A�:�:�Ty%=Z%� B�p%>=k� C �1,"EIC3" D=�:!Z%=k%:F$(k%)=J$:p%+=1:O%=cy%+32768:P%=0:�Z("FNh_"+J$) EG�:X$=�X$,�(J$)+2):ȕ�(X$)=�(" "):X$=�X$,2):�:�:ș&400ec,cy%,-1:��:� F��Jy�R%,Z%,N%,Ey%:�p%=0� G�h_DEFAULT H�:Ey%=q_%:N%=p%:�(U%�2)=0� I)�Z%p%*4:ș79,p%,Z%+&c0000000,3,,Ey%,8 J��:[OPTU%:.Qy DCDay:DCDRy:]:ȕN%>0:[OPTU%:DCD!Ey%:DCDEy%!4:]:Ey%+=8:N%-=1:�:[OPTU%:DCD0:]:[OPTU%:ALIGN:.Ay:]:Z%=P%:�jumpblock_DEFAULT KIRy=(P%-Z%)>>2:N%=p%:Ey%=q_%:ȕN%>0:Z%=P%:�Z("FNjumpblock_"+F$(!Ey%)) L%Ey%!4=(P%-Z%)>>2:Ey%+=8:N%-=1:�:� M���__�Ey:[OPTU%:ALIGN:.My:STMFD(A)!,{4-5,Z}:BL P%+(13<<2):.Ey DCDQy-Ey:DCDAy-Ey:DCDj-Ey:DCDN:DCD`:.e:DCD0:DCD0:DCD0:DCD0:LDR A,e N�LDMFD(A)!,{h,z,l,Z}:MOVpc,Z:BIC 5,Z,#&fc000003:LDMIA5,{0-4}:ADD0,0,5:ADD1,1,5:ADD2,2,5:MOV5,#0:SWI &fcb80:STRvc0,e+(1<<2):STRvc1,e+(3<<2):LDMFD(A)!,{4-5,pc}:.i:�J:MOV2,Z:MOV1,A:MOV0,h OqSWI &fcb81:MOVvc1,#0:STRvc1,e+(3<<2):MOVpc,2:MOV13,12:]:j=P%:�W:�j:N=(N+3)�-4:P%+=N-1:O%+=N-1:[OPTU%:DCB0:]:� P��h_�P%<>32768��1,"EIC4" Qo[OPTU%:ADR4,m:MOV5,#cy:SWI &fcb80:�R("vc",2,tu):Bvc qy:SWI 43:.m:DCDQy-m:DCDAy-m:DCDj-m:DCDN:DCD`:DCDfy:]:� RsݤJ[OPTU%:STMFD(A)!,{h,z,l,Z}:MOV z,pc:�R("",Z,e):STR A,[Z],#4:LDMIA(Z)!,{h,l,A}:� z,z,#&fc000003:�R Z,Z,z:]:=0 S^��ky(vy%,By%,LJ%)�A("<BasicV$Lib>.Heap",8):�A("<BasicV$Lib>.Message",1):�m(vy%,By%,LJ%,0) T�My:��i:�x U� VTݤm(vy%,By%,LJ%,zy%)�L%,O%,P%,U%,uu%,H%:�DJ:�dJ,vJ,qJ,i_,eJ,aJ:�ey,Iy,ei:�zy%=0� W:�A("<BasicV$Lib>.Heap",8):�A("<BasicV$Lib>.Message",1) X~�:�y%vy%:DJ=A:dJ=1<<31:vJ=1<<30:qJ=1<<29:i_=1<<28:eJ=1<<27:aJ=1<<26:ey=1<<17:Iy=256:ei=Iy+ey:ș&606c0:�:��:ș&606c1:�H Y"H%=vy%:L%=y%+vy%:�By%<>0�By%=4 Z"�U%=8+By%�10+By%�2:�(U%�4)<>0� [O%=y%:�zy%=1� \P%=32768 ] �P%=0 ^� _�O%=0:P%=y% `�:Ȏzy%� a0�1:�W:�h_:�W:�r:�W:�Jy:j=P%:�W:�j:N=(N+3)�-4 b(�0:�W:�r:�W:�J_:�W:�xy:�W:�Jy:�W:�__ c�2:�W:�r d�:�U%�4�L%=O%�L%=P% e�(U%�2)=0� fș&dcb93,0,y%,L%-y% g!�:H%=L%-y%:�U%:ș&606c1:�By%� h�zy%=0� iMy+=y%:i+=y% j� k�:�ry�zy%<>2� l �By%� mH%=Ay:�zy%�H%-=32768 n̅1,"EIC9" o� p�:�LJ%� q`�"Assembled to &";~H%;" = ";((H%*10+512)�1024)/10;"K":�"Could assemble with ";vy%-H%;" less" r �:=H% sݤ_Template_version=21 tbݤ_hard_initialise_Template:Z_%=�:n%=�:i%=�:oy%=�:AJ%=�:Zu%=-1:xu%=1:vy=7:By=16:dy=14:sy=15:=0 u��Hy�N%:�n%<>-1� v�i%� wș&665c1,Y%,�,� x1��N%=0�255:ȕn%?N%:ș&60082,N%:n%?N%-=1:�:�N% y� z�:� {.��Ly�D%,d%,Q%,F%,P$,tu%,Hy%,gy%,x%,R%:�n%� |�i%� }oy%=(i%=+1):�oy%� ~ Q%=+1 �Q%=0 ��:Hy%=140+(1<<21):�AJ%� �O$=�E("MenuFont"):�O$<>""� ��Hy%+=(1<<18)+(1<<19):�G(gy%,8+�(O$)+1):$(gy%+8)=O$:gy%!0=16*�(�E("MenuFontWidth")):gy%!4=16*�(�E("MenuFontHeight")):�E("MenuFontLowRez")="NO"� �Hy%+=(1<<17) ��Hy%+=(1<<16) �� �� �*�:ș&465c0,Y%,0,0,Q%,Q%,0,0,Hy%,gy%�n% �!��G(n%,256):ș&dcb93,0,n%,256 �� � �n%=-1 �4�:P$=�K("<"+G$+"$Dir>.Sprites"):D%=�I(P$):�D%>0� �mF%=�A(128):x%=0:�ș12,12,"<"++G$+"$Dir>",F%,1,x%,128,"Sprites*"�,,,R%,x%:�R%=1�F%!20=4089�D%<F%!8�D%=F%!8 �l�x%<0:�C(F%,128):�G(e%,D%+16):e%!0=D%+16:e%!4=0:e%!8=16:e%!12=16:ș&2002e,522,e%,P$�d%;Q%:s$=P$:�F(Q%)� �*�F("Reason","Sprites"):�y(d%):�L(4):�S �� � �e%=0 ��:�P_("Templates"):�e%>0� � �T("ProgInfo",e%,"ProgInfo") �!��T("ProgInfo",+1,"ProgInfo") ��:s%=0:�Z_%=0� ��Fy �#�:w_%=�By("Query",tu%,+1):�a_:� �/��sy:P$=�K("<"+G$+"$Dir>.Sprites"):�P$<>s$� �0e%!4=0:e%!8=16:e%!12=16:ș46,522,e%,P$:s$=P$ ��:� �.ݤProgInfo(M%)�s(M%!(88+(vy<<5)+20),D$):=0 ���Ny(c%,b%,_%,T%)ȎT%� �!�dy,sy:c%=�G(1,�S(0)):�_%<>1� ��h �� � �_%�240� �W%!0=s%:W%!4=1:ș&400d0,,W% �� ��:� ���Fy�s%=0� � �oy%� �$�L_%4:!L_%=0:�a("ProgInfo",L_%) �s%=!L_% ���h("ProgInfo",s%) �� � ��i%� � �oy%� �ș&465c6,Y%,L_% ��ș&465c6,Y%,s% �� �� ��:� �W��P_(t$)�GJ%,k%,D%,d%,Q%,S%:�lJ%,P$,Xy%,hy%:P$="<"+G$+"$Dir>."+t$:D%=�I(P$):�D%<=0� �2�F("Reason",t$):�F("Sys","Not found"):�L(4):�S �M�:�G(k%,D%):�G(Xy%,D%+F):hy%=Xy%+Py:lJ%=Xy%+F:ș&600d9,,P$�d%;Q%:�F(Q%)� �5�F("Reason","Templates"):�y(d%):�L(4):ș&600da:�S ��:�:��:�n_ �Qx%=0:�hy%!0=�("*"):ș&600db,,lJ%,k%,k%+D%,n%,hy%,x%�d%,,GJ%,,,,x%;Q%:�F(Q%)� ��K(d%):ș&600da:�S � �:�x%� �&�Q%=0�11:�hy%?Q%=13�hy%?Q%=0:Q%=12 �0�Q%:Xy%!by=GJ%-k%:Xy%!g=k%:S%=�v(Xy%):�S%=0� ��L(16):ș&600da:�S ��:S%!c=!uy%:!uy%=S% �(�:�x%=0:��:ș&400da:�Z(Xy%):�Z(k%):� �!��n_ș&600da:�M("Template"):� �'ݤBy(F$,_u%,k_%)=�Jy(F$,_u%,k_%,"") �2ݤJy(F$,_u%,k_%,W$)�S%,jJ%,J%:S%=�C(F$):�S%=0� ��S �"�:jJ%=S%+F:jJ%!64=k_%:�W$<>""� �J%=�Z("FN"+W$) ��:�z(S%,J%)� ��S ��:�a(S%):=J% �)��T(F$,k_%,W$)�S%,M%:S%=�C(F$):�S%=0� ��S � �:M%=S%+F:M%!64=k_%:�W$<>""� � M%=�Z("FN"+W$+"("+�(M%)+")") ��:� �#ݤh(F$,�Jy%)�N%:=�Qy(F$,Jy%,N%) �*ݤQy(F$,�Jy%,�iy%)�S%,K%:K%=�:�Jy%<=0� �S%=�C(F$):�S%� �K%=�z(S%,Jy%):�K%=�� �iy%=S%!g:�a(S%) �� � �K%=� �� � ��i%� �ș&465c6,Y%,Jy% �� � �:=K% �Mݤ`(F$)�S%,t$,B_%:S%=!uy%:B_%=�:ȕS%�(�B_%):B_%=(�Gy(S%+Py,12)=F$):�B_%� �S%=S%!c ��:�:=S% �ݤC(F$)�S%:S%=�`(F$):�S%=0� ��F("Reason",F$):�L(3) � �:=S% �ݤz(S%,�Jy%)�i%� �ș&665c3,Y%,S%+F,0�Jy%;S% ��ș&600c1,,S%+F�Jy%;S% ��:S%=�F(S%):�S%� ��K(Jy%):Jy%=0 � �:=S% �;��C_(M%,Q%,My%)�J%,X%:X%=A_%<<C_%:J%=M%!8-M%!0:�X%<=J%� � M%!0=0 ��X%=X%-J%:�My%<0� �My%=X%+(My%�X%) ��:M%!0=(M%!0+My%*Q%)�X% ��:M%!8=M%!0+J%:� �C��F_(M%,Q%,My%)�J%,X%:X%=(Fy%<<Dy%)-96:J%=M%!8-M%!0+48:�X%<=J%� �M%!8=(Fy%<<Dy%)-J% ��X%=X%-J%:�My%<0� �My%=X%+(My%�X%) �=�:M%!8=(Fy%<<Dy%)-M%!8:M%!8=(Fy%<<Dy%)-((M%!8+My%*Q%)�X%) ��:M%!0=M%!8-(J%-48):� �:��a(S%)�Z%:Z%=uy%:ȕ!Z%<>0�!Z%<>S%:Z%=!Z%+c:�:�!Z%=S%� �!Z%=S%!c:S%!c=0:�Z(S%) ��:� �ݤi(A%)=�(yy) �ݤv(A%)A%=�i(A%):�A%=0� � �L(16) � �:=A% �!��L_�(U%�2)=0��W_("Template") � [OPTU%:ALIGN:.yy:�J:B oy:]:� �|ݤ_Declare_Local_Variables_Template�uy%4:!uy%=0:P%=0:[OPTU%:.c DCD0:.Ny DCD0:.g DCD0:.by DCD0:.Py DCD0:DCD0:DCD0:.F:]:=0 �8��ny(F$,r%,r_%,b_%,�iy%)�e_(F$,r%,r_%,b_%,iy%,"X"):� �1��e_(F$,r%,r_%,b_%,�iy%,H$)�S%:S%=�C(F$):�S%� ��y_(S%,r%,r_%,b_%,iy%,H$) ��!r%=S% ��:� �ݤa(F$,r%)�N%:=�_(F$,r%,N%) �'ݤ_(F$,r%,�iy%)�S%,K%:K%=�:�!r%<=0� S%=�C(F$):�S%� K%=�e(S%,r%):�K%=�� iy%=S%!g:�a(S%) � �K%=� � ��i%� ș&465c6,Y%,r% � �:=K% ��g_(S%,r%)S%=�e(S%,r%):� ݤe(S%,r%)�d%:�i%� ș&665c3,Y%,S%+F,r%�d%;S% �ș&600c1,,S%+F�d%;S% �:!r%=d%:S%=�F(S%):�S%� �K(d%):!r%=0 �:=S% L��y_(S%,r%,r_%,b_%,�iy%,H$)�M%,Q%:!r%=0:Q%=S%!Ny:S%!Ny+=1:S%=�v(S%):�S%� 5M%=S%+F:�C_(M%,Q%,r_%):�F_(M%+4,Q%,b_%):�H$<>"X"� �M%!56�(1<<8)� �Zy(M%!72,H$,M%!80) ��Zy(M%+72,H$,12) � �:�g_(S%,r%):iy%=S%!g:�a(S%) �:� )ݤh_DEFAULT�:��:�M("@.h.DEFAULT") nJi=16:dl=1<<30:IJ=1<<29:`u=0:xl=1:La=2:Ea=3:Ca=4:Y_=5:Qa=6:BJ=7:ci=8:r_=9:Da=10:sl=1<<0:cy=1<<1:qi=1<<2:=0 1ݤjumpblock_DEFAULT�:��:�M("@.h.DEFAULT") m[OPTU%�Py%:.ui DCDx_:.Oi DCDhu:.`_ DCDR_:.__ DCDHi:.Bu DCDB_:.UJ DCDul:.hJ DCDMi:.MJ DCDpu:.qy DCDCi:]:=0 %ݤh_stdio�:��:�M("@.h.stdio") k_=0:Ii=17:Wi=34:=0 -ݤjumpblock_stdio�:��:�M("@.h.stdio") �[OPTU%�Py%:.Kl DCDdi:.Fu DCDrl:.D_ DCD`l:.gi DCDXi:.C_ DCDzJ:.Ru%DCDVu%:.su%DCDzu%:.wu%DCDKu%:.nl DCDRu:.Ql DCDNu:.zi DCDwi:.uJ DCDii:.ou DCDKi:]:=0 !'ݤh_stdlib�:��:�M("@.h.stdlib") "=0 #/ݤjumpblock_stdlib�:��:�M("@.h.stdlib") $�[OPTU%�Py%:._y DCDbu:.my DCDSl:.Ta DCDSi:.iy DCDGi:.PJ DCD`J:.L_ DCDXa:.Tl DCDXl:.Yu DCDaa:.q_ DCDEl:.Xu DCD_a:.S_ DCDyJ:.Qu DCDm_:.au DCDI_:.ju DCDAu:.ol DCDNl:.fl DCDfJ:]:=0 %'ݤh_string�:��:�M("@.h.string") &SP%=0:[OPTU%:.Du DCB0:.e_ DCB0:.Bi DCB0:.CJ DCB0:.zu DCB0:.Ll DCB0:.ql DCB0:]:=0 '/ݤjumpblock_string�:��:�M("@.h.string") (�[OPTU%�Py%:.ZJ DCDTJ:.lJ DCDvl:.KJ DCDs_:.eu DCDNa:.zl DCDpi:.yi DCDel:.Va DCDMa:.p_ DCDqu:.O_ DCDLi:.fi DCDw_:.mi DCDIu:.ri DCDEu:.Zu DCDwu:.W_ DCDXJ:.`y DCDGu:.cJ DCD_i:.vi DCDMu:.n_ DCDQJ:.ji DCDHu )�.Za DCDy_:.xu DCDT_:._u DCDYi:.uu DCDGl:.Vi DCDf_:.Cl DCDWJ:.Di DCDb_:.Ai DCDOJ:.il DCDjJ:.wl DCDNJ:.Fi DCDqa:.Jl DCDPu:.gl DCDRa:.Ol DCDg_:.pJ DCDiu:.cu DCDd_:.Cu DCDc_:.P_ DCDgJ:.Lu DCDFJ:.t_ DCDz_:.Fl DCDIa:.mJ DCDbl:.G_ DCD_l:]:=0 *)ݤh_message�:��:�M("@.h.message") +=0 ,1ݤjumpblock_message�:��:�M("@.h.message") -E[OPTU%�Py%:.ky DCDa_:.A_ DCDl_:.Ga DCDmu:.`i DCDnu:.U_ DCDyu:]:=0 .#ݤh_wimp�:��:�M("@.h.wimp") /�Vu=12:X_=0:P%=0:[OPTU%:.Dy DCB0:.Zl DCB0:.hy DCB0:.wy DCB0:.hi DCB0:.v_ DCB0:.Oa DCB0:.jy DCB0:.zy DCB0:.iJ DCB0:.Z_ DCB0:.Su DCB0:.Ya DCB0:.Ul DCB0:.j_ DCB0:.bJ DCB0:.sJ DCB0:]:P%=0:[OPTU%:.Cy DCB0 0�.hl DCB0:.ty DCB0:.Yy DCB0:.Ku DCB0:.VJ DCB0:.LJ DCB0:.si DCB0:.wa DCB0:.al DCB0:.tl DCB0:.vu DCB0:]:P%=0:[OPTU%:.Ml DCB0:.Ju DCB0:.Wa DCB0:.kJ DCB0:.N_ DCB0:]:=0 1+ݤjumpblock_wimp�:��:�M("@.h.wimp") 2�[OPTU%�Py%:.Ka DCDWl:.oJ DCDku:.wJ DCDfu:.jl DCDUi:.Wy DCDtJ:.rJ DCDpl:.E_ DCDRJ:.Bl DCDni:.oy DCDh_:.Ja DCDsu:.Fa DCDYl:._J DCDBa:.Tu DCDAl:.Sa DCDDl:.Pi DCDF_:.Pa DCDTi:.Aa DCDxJ:.oi DCDHa:]:=0 3ݤ_ModeInfo_version=6 4!ݤ_hard_initialise_ModeInfo=0 5���qy(l%)ș53,l%,1�,,`_%:`_%+=1:ș53,l%,2�,,d_%:d_%+=1:ș53,l%,3�,,nJ%:nJ%+=1:ș53,l%,4�,,C_%:ș53,l%,5�,,Dy%:ș53,l%,6�,,Cu%:ș53,l%,7�,,Du%:ș53,l%,9�,,PJ%:YJ%=1<<PJ%:ș53,l%,11�,,A_%:A_%+=1:ș53,l%,12�,,Fy%:Fy%+=1:Pu%=A_%�`_% 6>Ju%=Fy%�d_%:H_%=(A_%<<C_%)-1:P_%=(Fy%<<Dy%)-1:Yu%=32�YJ%:� 7ݤ_Wimp_version=50 8/ݤ_hard_initialise_Wimp�d%:�H<12��1,"EIW1" 9Iș&400f2,0�d%:�d%=0��1,"Application needs to be run from the desktop" :��A("<BasicV$Lib>.Heap",8):�A("<BasicV$Lib>.IntMath",5):�A("<BasicV$Lib>.Message",3):�A("<BasicV$Lib>.Template",7):�A("<BasicV$Lib>.NullReason",1):dy%=�:ay%=3*1024 ;��G(fy%,ay%):ay%+=fy%:Ny%=fy%:�G(W%,512):n$="":u$="":Ou%=0:G$="Application":D$="0.00 (01-Jan-1900)":Y%=-1:N_%=2400:yy%=2401:Fu%=16*1024:U$="":Gu%=�:Mu%=0:=0 <:ݤK(e$)�a%,C%,Z$,c%,b%,RJ%:ș&600f2,2�a%;C%:�(C%�1)=0� =Dș53,-1,4�,,c%:ș53,-1,5�,,b%:ș53,-1,10�,,RJ%:�c%<2�b%<2�RJ%=0� >Z$="23" ?�Z$=�M(a%) @�:a%=�(e$+Z$):�a%� A�#a%:e$+=Z$ B� C �:=e$ DݤF(Hy%)=(Hy%�1)<>0 E��`(q%,T%)�T%=-1� Fș&600d2,q%,-1,0,0,1<<25,-1 G4�ș&600d2,q%,T%,,,-1,�(�Zy(q%,T%)):ș&dcb8d,8,q% H�:� I$��wy(q%,eu%)ș&dcb8d,Cy,q%,eu%:� J��X(q%)�q%>0�ș&dcb8d,Yy,q% K� L��py(q%)ș&dcb8d,Cy,q%,-1:� Mn��hy(q%,T%,hJ%,yu%,`J%)�F%:F%=�A(16):F%!0=q%:F%!4=T%:F%!8=yu%<<hJ%:F%!12=`J%<<hJ%:ș&400cd,,F%:�C(F%,16):� N&ݤB(q%,T%)ș&dcb8c,zy,q%,T%�T%:=T% O)��I(q%,T%,Tu%)ș&dcb8c,jy,q%,T%,Tu%:� PJ��V(wJ%,A$)�F%:F%=�A(300):F%!0=wJ%:$(F%+4)=A$+�(0):�K(F%):�C(F%,300):� Q��B(A$)�N_%,A$:� RL��L(wJ%)�F%:F%=�A(300):F%!0=yy%:�o("LE"+�(wJ%),F%+4):�K(F%):�C(F%,300):� S��K(Hu%)ș&400df,Hu%,1,G$:� TgݤG(Hy%,A$)�F%,K%:�h:F%=�A(260):!F%=0:$(F%+4)=A$+�(0):ș&400df,F%,(16�Hy%),�L(0)�,K%:�C(F%,260):=K% U���gy�F%:F%=�A(256):F%?0=1:F%?1=0:F%?2=0:F%?3=0:F%?4=0:F%?5=H_%�256:F%?6=H_%�256:F%?7=P_%�256:F%?8=P_%�256:ș7,21,F%:!F%=w_%:ș&400c6,,F%:�C(F%,256):� VF��ry(c%,b%,_%,T%)�gy:c%=�Z("FN_Stop_Action_"+j$+"("+�(T%=0)+")"):� W/ݤLy(V$)ȕ�V$,"."):V$=�V$,�V$,".")+1):�:=V$ X'��E(q%,T%,Y$)ș&dcb8c,hy,q%,T%,Y$:� Y'��N(q%,N%,R%)ș&dcb8c,wy,q%,N%,R%:� Z+ݤZy(q%,N%)ș&dcb8c,Dy,q%,N%�q%:=�M(q%) [&ݤl(q%,N%)ș&dcb8c,Dy,q%,N%�q%:=q% \8ݤI(K$)�d%,D%,Q%:ș&20008,17,K$�d%,,,,D%;Q%:�F(Q%)� ])�F("Reason",�Ly(K$)):�y(d%):�B(�L(4)) ^ �:�d%<>1� _ D%=-1 ` �:=D% aݤA(w%)�K%:�(Ny%+w%)<ay%� bK%=Ny%:Ny%+=w% c��B("Wimp Stack full") d �:=K% e��vy:Ny%=fy%:� f$��C(X_%,w%)�(X_%<fy%)�(X_%>ay%)� g,�B("Release_Stack: Invalid stack chunk") h��(w%<0)�((X_%+w%)>ay%)� i+�B("Release_Stack: Invalid chunk size") j�Ny%-=w%:�Ny%<>X_%� k �B("Release_Stack: Bad pop") l� m� n�:� o>��Yy(r$,t%,gJ%,n_%,WJ%,CJ%)�s_(r$,r$,t%,gJ%,n_%,WJ%,CJ%):� p���s_(r$,H$,t%,gJ%,n_%,WJ%,CJ%)D$=�(t%)+"."+�"0"+�(gJ%),2):D$+=" ("+�"0"+�(n_%),2)+"-":D$+=�"CBJanFebMarAprMayJunJulAugSepOctNovDec",WJ%*3,3):D$+="-"+�"19"+�(CJ%),4)+")":G$=r$:�F("App",G$):�yy(Ky%,G$+"$Dir"):�Ky%=0��1,"EIW5" q�U$<>""� r�n_%=�:S_%=W%:t%=�U$,","):ȕt%<>0:S_%!0=�Z(�U$,t%-1)):S_%+=4:U$=�U$,t%+1):t%=�U$,","):�:S_%!0=�Z(U$):S_%!4=0:ș&400c0,300,&4b534154,H$,W%�U_%,Y% s%�ș&400c0,200,&4b534154,H$�U_%,Y% t�:��cy uș&606c0:�U_%<200� v�N_%,�L(5) w*�:dy%=�:�Ly:�Ky:dy%=-2:�I_:�ay:�Z_%=0� x�E(s%,7,D$) yP�:bu%=-1:hu%=-1:Uu%=-1:nu%=-1:pJ%=�:fu%=-1:Su%=-1:h$="":m$="":�Sy:ș&606c1:� z��cyș&606c1:�sy%� {�V(yy%,�$+" ["+Þ+"]") |��V(yy%,�$) }�:�S:�:� ~>��yy(�W_%,v$)�w%,Ry%:ș&20023,v$,0,-1,0,1�,,w%,,Ry%:�w%=0� W_%=0 ���Ry%=1��1,"EIW4" �5w%=-w%:�G(W_%,w%):ș35,v$,W_%,w%,0,1:W_%?(w%-1)=0 ��:� �ݤ_FileType_version=10 ��ݤ_hard_initialise_FileType:ki=-1:xy=8192:ny=4096:Ou=4095:EJ=4093:K_=4091:b=4089:yl=4086:Vl=4076:f=4075:Jy=3478:nJ=3388:ll=3269:Pl=3254:kl=3253:xi=2815:du=2779:Ni=1793:Qi=1296:=0 �ݤ_file_io_version=10 �|ݤ_hard_initialise_file_io�A("<BasicV$Lib>.CheckVars",2):�A("<BasicV$Lib>.string",6):p_%=256+20:�h%p_%:�Eu%9:Eu%?8=13:=0 �;ݤMy(K$)�w%,Ry%:ș8,5,K$�Ry%,,,,w%:�Ry%=0��1,"EIF1 "+K$ �=w% ���f(K$,Nu%)ș8,255,K$,Nu%:� �CݤO(B$,C$,�x%)�sJ%:ș&2000c,10,B$,h%,1,x%,p_%,C$�,,,sJ%,x%:=sJ% ��ݤN(B$,C$)�Ry%,g%,Wy%,D%,xJ%:ș&20008,5,B$+"."+C$�Ry%,,g%,Wy%,D%,xJ%:h%!0=g%:h%!4=Wy%:h%!8=D%:h%!12=xJ%:h%!16=Ry%:�V_((B$+"."+C$),(h%+20)):=(Ry%=0) �ݤVy=!h% �ݤk=h%!8 �ݤQ=�U(h%+20) �ݤWy=((h%!16)=2) �*ݤW�K%:K%=�Vy:�(K%�-1048576)=-1048576� �K%=(K%�&fff00)>>8 � �K%=-1 � �:=K% �ݤ_string_version=7 �:ݤ_hard_initialise_string�A("<BasicV$Lib>.ctype",1):=0 �`ݤb(Z$,a$)�Q%,a%,_%:a%=�(Z$):_%=�(a$):Q%=0:ȕa%>0�_%>0�Q%=0:Q%=�(�T(�(Z$))-�T(�(a$))):�Q%=0� �%a%-=1:_%-=1:Z$=�Z$,a%):a$=�a$,_%) ��:�:�Q%=0� �Q%=�(a%-_%) � �:=Q% �"��V_(Y$,X%)$X%=Y$:X%?�(Y$)=0:� �ݤ_Misc_version=46 �6ݤ_hard_initialise_Misc�N%,F_%,R%:�H<12��1,"EIA1" �k$="":Au%=100:�ju%16:=0 �;ݤR(z$,_y%,ru%)�E_%,m_%,y_%,a_%,e_%:v%=�Ny(z$):�U%�2=0� �[OPTU%:DCD0:DCD0:] �)�E_%=ru%-P%-8:�(E_%)>65535��1,"EIA2" �,y_%=�(E_%)�255:m_%=�(E_%)�65280:�E_%>=0� �Ra_%=v%�(&28f0000+(_y%<<12)+y_%):e_%=v%�(&2800c00+(_y%<<16)+(_y%<<12)+(m_%>>8)) �S�a_%=v%�(&24f0000+(_y%<<12)+y_%):e_%=v%�(&2400c00+(_y%<<16)+(_y%<<12)+(m_%>>8)) ��:[OPTU%:DCDa_%:DCDe_%:] ��:=0 �8��W_(V$)�TJ%,rJ%,vJ%:TJ%=P%:rJ%=O%:vJ%=U%:�(U%�4)=0� � O%=P% �Q�:P%=0:U%=U%�6:P%=�Z("FN_Declare_Local_Variables_"+V$):P%=TJ%:O%=rJ%:U%=vJ%:� �ݤNy(z$)�v%:Ȏz$� ��""," ":v%=14 ��"lo":v%=3 ��"hs":v%=2 �Dv%=�"eqnecsccmiplvsvchilsgeltgtlealnv",z$):�(v%�2)=0��1,"EIA13" �v%=(v%-1)>>1 � �:=v%<<28 �ݤy(a%)�(U%�4)�a%+=y% �=a% ���W�Ly%:�U%�2�Ly%=50�Ly%=0 �+ș&606c4,((�y(P%)-y%)/(L%-y%)*50)+Ly%:� �ݤ_Heap_version=9 �ݤ_hard_initialise_Heap=0 �&ݤY(�ey%,A%)ey%=�(uJ%):�!Cy%�ey%=0 � =!Cy% ���G(�ey%,w%)�Y(ey%,w%)� �ey%=!Cy%:�!ey%,�U(ey%+4) ��:� ���Z(�A%)�n(A%)� �A%=!Cy%:�!A%,�U(A%+4) ��:� �ݤn(�A%)�KJ%:A%=0:=!Cy% �B��J_[OPTU%:�X(uJ%,_y):�X(KJ%,my):�X(au%,iy):ALIGN:.Cy%DCD0:]:� �mݤX(�Qu%,du%)[OPTU%:ALIGN:.Qu%:�J:STMFD(A)!,{Z}:MOV Z,#0:STR Z,Cy%:BL du%:STRvs0,Cy%:LDMFD(A)!,{pc}^:]:=0 �ݤ_Message_version=6 �oݤ_hard_initialise_Message:ai=31:ș5,"RMEnsure CAssembler 0.08 RMLoad System:Modules.CAssembler":�ly 256:=0 �Hݤg(f$,Lu%,�D_%)�A%:ș&fcb83,f$+".Messages.",Lu%,0�A%,D_%:�D_%=0��Gy �=A% �<ݤAy(J%,T$,h_%)ș&fcb85,T$,h_%,J%�h_%;J%:=h_%�((J%�2)=2) �;ݤu(J%,T$,q$)�t%:ș&fcb85,T$,q$,J%�t%;J%:=t%�((J%�2)=2) �/ݤp(J%)�t%:ș&fcb86,J%�t%;J%:=t%�((J%�2)=2) �;ݤD(J%,T$)�t%:ș&fcb84,T$,ly,256,J%,0�t%,J%:?J%=13:=$ly �&��zy(J%,T$,Bu%)J%=�Ay(J%,T$,Bu%):� �#��uy(J%,T$,q$)J%=�u(J%,T$,q$):� ���z_(J%)J%=�p(J%):� �ݤS(R%)=�D(m%,"E"+�(R%)) �ݤE(_$)=�D(m%,_$) ���_(_$,R%)�zy(m%,_$,R%):� ���F(_$,i$)�uy(m%,_$,i$):� �'��o(_$,B%)ș&dcb84,_$,B%,256,m%,0:� ���Q_�z_(m%):� ���y(_%)�_%<=0� ��F("Sys",""):�F("SysN","") �*��F("Sys",�M(_%+4)):�F("SysN",�~(!_%)) ��:� �ݤL(R%)=�D(m%,"LE"+�(R%)) �/��xy[OPTU%:ALIGN:.Gy:�J:B ky:]:�U%�4�Gy+=y% �� �ݤ_IntMath_version=6 � ݤ_hard_initialise_IntMath=0 �ݤ_NullReason_version=5 �#ݤ_hard_initialise_NullReason=0 �)��ay�`%4:!`%=0:wy%=0:G_%=�:Oy%=6193:� ���Oy(L$,ny%)�G_(L$,ny%,�):� �\��G_(L$,ny%,c_%)�R%:�G(R%,12+�(L$)+1):$(R%+12)=L$:R%!8=ny%:R%!4=c_%:!R%=!`%:!`%=R%:�Cy:� ���Wy(L$,ny%)�ly(L$,ny%,�):� �"��ly(L$,ny%,c_%)�R%,Z%:�L$=""� ��B("EIN3"):ȕ!`%:�c(`%):� �M�Z%=`%:ȕ!Z%:R%=!Z%:�($(R%+12)=L$)�(R%!4=c_%)�(((ny%=0)�c_%)�(R%!8=ny%))� � �c(Z%) � �Z%=R% ��:� ��:� ���c(Z%)�R%:�Z%=0��B("EIN6") �R%=!Z%:�R%=0��B("EIN5") ��R%=wy%� �wy%=!R%:G_%=� ��:!Z%=!R%:�Z(R%):�Cy:� � ��Cy�!`%� �Oy%=Oy%�(�1) ��Oy%=Oy%�1 ��:� �5��t_�u%,Z%,s_%,A%:u%=!`%:ȕu%:wy%=u%:G_%=�:�u%!4� �6s_%=�Z("FN_Null_Reason_"+$(u%+12)+"("+�(u%!8)+")") �'�s_%=�Z("FN_Null_Reason_"+$(u%+12)) ��:�G_%� � u%=wy% ��wy%=0:A%=!u%:�s_%� �+Z%=`%:ȕ!Z%<>u%:Z%=!Z%:�Z%=0��B("EIN2") ��:�c(Z%) ��:u%=A% � �:�:� � ݤ_Null_Reason_�B("EIN1"):=0 �ݤ_CheckVars_version=3 �"ݤ_hard_initialise_CheckVars=0 �ݤ_ctype_version=1 ݤ_hard_initialise_ctype=0 ݤUy(Q%)=Q%-�("A")+�("a") "ݤSy(Q%)=Q%>=�("A")�Q%<=�("Z") ݤT(Q%)�K%:�Sy(Q%)� K%=�Uy(Q%) �K%=Q% �:=K% : : : ��H_�Ay:� ��O_�#W%!20,"Run "+�M(Ky%):� : : �
00000000 0d 00 01 0f f4 3e 21 52 75 6e 49 6d 61 67 65 0d |.....>!RunImage.| 00000010 00 02 30 f4 50 72 6f 64 75 63 65 64 20 62 79 20 |..0.Produced by | 00000020 42 61 73 43 6f 6d 70 72 65 73 73 20 76 31 2e 33 |BasCompress v1.3| 00000030 31 20 28 31 38 20 4a 61 6e 20 31 39 39 33 29 0d |1 (18 Jan 1993).| 00000040 00 03 53 de 4d 24 28 33 29 3a 4d 24 28 29 3d 22 |..S.M$(3):M$()="| 00000050 7c 22 2c 22 69 63 6f 6e 73 70 72 69 74 65 73 22 ||","iconsprites"| 00000060 2c 22 73 74 72 69 70 63 66 73 22 2c 22 66 6f 72 |,"stripcfs","for| 00000070 63 65 63 66 73 22 3a 79 24 3d 22 75 6e 63 66 73 |cecfs":y$="uncfs| 00000080 22 3a f2 64 5f 28 22 55 6e 43 46 53 22 2c a3 29 |":.d_("UnCFS",.)| 00000090 3a e0 0d 00 04 0d dd f2 52 5f 28 4d 25 29 e1 0d |:.......R_(M%)..| 000000a0 00 05 47 dd f2 50 79 ea 51 25 3a 21 61 3d b9 3a |..G..Py.Q%:!a=.:| 000000b0 21 77 3d a3 3a 21 5f 3d b9 3a 21 4f 3d b9 3a c8 |!w=.:!_=.:!O=.:.| 000000c0 99 26 32 30 30 31 65 2c 31 38 2c 22 43 46 53 55 |.&2001e,18,"CFSU| 000000d0 74 69 6c 22 2b bd 28 30 29 b8 3b 51 25 3a e7 a4 |til"+.(0).;Q%:..| 000000e0 46 28 51 25 29 8c 0d 00 06 11 e7 a4 47 28 32 2c |F(Q%).......G(2,| 000000f0 a4 53 28 31 35 29 29 0d 00 07 07 cd 3a e1 0d 00 |.S(15)).....:...| 00000100 08 30 dd a4 44 79 28 45 25 2c 45 24 2c 4e 25 29 |.0..Dy(E%,E$,N%)| 00000110 ea 47 25 2c 6c 5f 25 3a f2 44 28 45 24 29 3a 47 |.G%,l_%:.D(E$):G| 00000120 25 3d a3 3a 6c 5f 25 3d b9 3a c8 8e b9 ca 0d 00 |%=.:l_%=.:......| 00000130 09 18 c9 a4 4e 28 45 24 2c 5a 24 28 4e 25 29 29 |....N(E$,Z$(N%))| 00000140 3a 6c 5f 25 3d a3 0d 00 0a 0b c9 a4 57 3c 3e 4a |:l_%=.......W<>J| 00000150 79 0d 00 0b 19 c9 a4 4e 28 22 43 46 53 23 22 2b |y......N("CFS#"+| 00000160 45 24 2c 5a 24 28 4e 25 29 29 0d 00 0c 0f c9 a4 |E$,Z$(N%))......| 00000170 57 3c 3e 45 25 28 4e 25 29 0d 00 0d 09 7f 47 25 |W<>E%(N%).....G%| 00000180 3d b9 0d 00 0e 0b cb 3a e7 6c 5f 25 8c 0d 00 0f |=......:.l_%....| 00000190 0a f2 6e 28 45 25 29 0d 00 10 09 cd 3a 3d 47 25 |..n(E%).....:=G%| 000001a0 0d 00 11 7c dd f2 76 28 45 25 2c 45 24 2c 43 24 |...|..v(E%,E$,C$| 000001b0 2c 4e 24 29 ea 58 25 2c 44 25 2c 4a 25 2c 67 25 |,N$).X%,D%,J%,g%| 000001c0 2c 57 79 25 2c 41 79 25 2c 4d 24 2c 51 25 3a f2 |,Wy%,Ay%,M$,Q%:.| 000001d0 44 28 45 24 29 3a 45 24 2b 3d 22 2e 22 2b 43 24 |D(E$):E$+="."+C$| 000001e0 3a f2 55 28 45 25 2c 45 24 29 3a 4d 24 3d 22 43 |:.U(E%,E$):M$="C| 000001f0 46 53 23 22 2b 45 24 3a c8 99 38 2c 35 2c 4d 24 |FS#"+E$:..8,5,M$| 00000200 b8 2c 2c 67 25 2c 57 79 25 2c 44 25 2c 41 79 25 |.,,g%,Wy%,D%,Ay%| 00000210 3a e7 28 41 79 25 80 31 29 3d 30 8c 0d 00 12 0f |:.(Ay%.1)=0.....| 00000220 f2 7a 28 45 25 2c 38 2c 4d 24 29 0d 00 13 12 cc |.z(E%,8,M$).....| 00000230 e7 a4 50 28 58 25 2c 44 25 2b 31 29 8c 0d 00 14 |..P(X%,D%+1)....| 00000240 0c f2 4f 28 45 25 2c a3 29 0d 00 15 17 cc ea 85 |..O(E%,.).......| 00000250 3a ee 85 ea f7 85 3a f2 5a 28 58 25 29 3a f2 48 |:.....:.Z(X%):.H| 00000260 0d 00 16 1b ea 85 3a ee 85 ea f7 85 3a f2 6c 28 |......:.....:.l(| 00000270 45 25 2c 58 25 2c 4d 24 29 3a e1 0d 00 17 1f f2 |E%,X%,M$):......| 00000280 66 28 4d 24 2c 58 25 29 3a f7 85 3a e7 a4 6a 28 |f(M$,X%):..:..j(| 00000290 58 25 2c 44 25 2c 4e 24 29 8c 0d 00 18 09 4e 24 |X%,D%,N$).....N$| 000002a0 3d 22 22 0d 00 19 1d cd 3a ea 85 3a ee 85 ea f7 |="".....:..:....| 000002b0 85 3a f2 75 28 45 25 2c 58 25 2c 4d 24 29 3a e1 |.:.u(E%,X%,M$):.| 000002c0 0d 00 1a 37 c8 99 31 33 2c 31 33 39 2c 45 24 b8 |...7..13,139,E$.| 000002d0 4a 25 3a ea 85 3a ee 85 ea f7 85 3a f2 52 79 28 |J%:..:.....:.Ry(| 000002e0 4a 25 2c 4d 24 2c 67 25 2c 57 79 25 2c 58 25 2c |J%,M$,g%,Wy%,X%,| 000002f0 44 25 2c 41 79 25 29 0d 00 1b 0c e7 4e 24 3c 3e |D%,Ay%).....N$<>| 00000300 22 22 8c 0d 00 1c 16 c8 99 31 32 2c 32 2c 4a 25 |"".......12,2,J%| 00000310 2c 4e 24 2c a9 28 4e 24 29 0d 00 1d 48 cd 3a c8 |,N$,.(N$)...H.:.| 00000320 99 31 32 2c 32 2c 4a 25 2c 58 25 2c 44 25 3a f7 |.12,2,J%,X%,D%:.| 00000330 85 3a d9 23 4a 25 3a c8 99 38 2c 31 2c 45 24 2c |.:.#J%:..8,1,E$,| 00000340 67 25 2c 57 79 25 2c 2c 41 79 25 3a f7 85 3a f2 |g%,Wy%,,Ay%:..:.| 00000350 4f 28 45 25 2c b9 29 3a f7 85 3a f2 5a 28 58 25 |O(E%,.):..:.Z(X%| 00000360 29 0d 00 1e 05 cd 0d 00 1f 07 cd 3a e1 0d 00 20 |)..........:... | 00000370 1e dd a4 6a 28 6c 79 25 2c 44 25 2c f8 4e 24 29 |...j(ly%,D%,.N$)| 00000380 ea 47 25 3a e7 4e 24 3d 22 22 8c 0d 00 21 08 47 |.G%:.N$=""...!.G| 00000390 25 3d a3 0d 00 22 4a cc 47 25 3d 44 25 3e 3d a9 |%=..."J.G%=D%>=.| 000003a0 28 4e 24 29 3a 4e 25 3d 31 3a c8 95 4e 25 3c 3d |(N$):N%=1:..N%<=| 000003b0 a9 28 4e 24 29 80 47 25 3a 47 25 3d 28 97 28 c1 |.(N$).G%:G%=(.(.| 000003c0 4e 24 2c 4e 25 2c 31 29 29 3d 6c 79 25 3f 28 4e |N$,N%,1))=ly%?(N| 000003d0 25 2d 31 29 29 3a 4e 25 2b 3d 31 3a ce 0d 00 23 |%-1)):N%+=1:...#| 000003e0 09 cd 3a 3d 47 25 0d 00 24 2f dd f2 6a 79 28 45 |..:=G%..$/..jy(E| 000003f0 25 2c 45 24 29 45 25 21 57 3d 2d 32 3a f2 44 28 |%,E$)E%!W=-2:.D(| 00000400 45 24 29 3a 45 24 3d 22 43 46 53 23 22 2b 45 24 |E$):E$="CFS#"+E$| 00000410 3a c8 8e b9 ca 0d 00 25 13 c9 a4 4e 28 45 24 2c |:......%...N(E$,| 00000420 22 21 42 6f 6f 74 22 29 0d 00 26 0a c9 a4 57 3c |"!Boot")..&...W<| 00000430 3e 66 0d 00 27 16 7f f2 6e 28 45 25 29 3a f2 71 |>f..'...n(E%):.q| 00000440 5f 28 45 25 2c 45 24 29 0d 00 28 07 cb 3a e1 0d |_(E%,E$)..(..:..| 00000450 00 29 7b dd f2 71 5f 28 45 25 2c 63 24 29 ea 58 |.){..q_(E%,c$).X| 00000460 25 2c 44 25 2c 4a 25 2c 67 25 2c 57 79 25 2c 41 |%,D%,J%,g%,Wy%,A| 00000470 79 25 2c 51 25 2c 4d 24 3a f2 44 28 63 24 29 3a |y%,Q%,M$:.D(c$):| 00000480 45 24 3d 63 24 2b 22 2e 21 42 6f 6f 74 22 3a f2 |E$=c$+".!Boot":.| 00000490 55 28 45 25 2c 45 24 29 3a 4d 24 3d 22 43 46 53 |U(E%,E$):M$="CFS| 000004a0 23 22 2b 45 24 3a c8 99 38 2c 35 2c 4d 24 b8 2c |#"+E$:..8,5,M$.,| 000004b0 2c 67 25 2c 57 79 25 2c 44 25 2c 41 79 25 3a e7 |,g%,Wy%,D%,Ay%:.| 000004c0 28 41 79 25 80 31 29 3d 30 8c 0d 00 2a 0f f2 7a |(Ay%.1)=0...*..z| 000004d0 28 45 25 2c 38 2c 45 24 29 0d 00 2b 12 cc e7 a4 |(E%,8,E$)..+....| 000004e0 50 28 58 25 2c 44 25 2b 31 29 8c 0d 00 2c 0c f2 |P(X%,D%+1)...,..| 000004f0 4f 28 45 25 2c a3 29 0d 00 2d 17 cc ea 85 3a ee |O(E%,.)..-....:.| 00000500 85 ea f7 85 3a f2 5a 28 58 25 29 3a f2 48 0d 00 |....:.Z(X%):.H..| 00000510 2e 1b ea 85 3a ee 85 ea f7 85 3a f2 6c 28 45 25 |....:.....:.l(E%| 00000520 2c 58 25 2c 4d 24 29 3a e1 0d 00 2f 1d f2 66 28 |,X%,M$):.../..f(| 00000530 4d 24 2c 58 25 29 3a f7 85 3a e7 a4 48 79 28 58 |M$,X%):..:..Hy(X| 00000540 25 2c 44 25 29 8c 0d 00 30 10 e7 ac a4 6f 28 45 |%,D%)...0....o(E| 00000550 25 2c 63 24 29 8c 0d 00 31 1b ea 85 3a ee 85 ea |%,c$)...1...:...| 00000560 f7 85 3a f2 75 28 45 25 2c 58 25 2c 45 24 29 3a |..:.u(E%,X%,E$):| 00000570 e1 0d 00 32 18 c8 99 38 2c 36 2c 45 24 3a f7 85 |...2...8,6,E$:..| 00000580 3a f2 4f 28 45 25 2c b9 29 0d 00 33 05 cd 0d 00 |:.O(E%,.)..3....| 00000590 34 0f cd 3a f7 85 3a f2 5a 28 58 25 29 0d 00 35 |4..:..:.Z(X%)..5| 000005a0 05 cd 0d 00 36 11 cd 3a f2 55 28 45 25 2c 22 22 |....6..:.U(E%,""| 000005b0 29 3a e1 0d 00 37 81 dd a4 48 79 28 6c 79 25 2c |):...7...Hy(ly%,| 000005c0 44 25 29 ea 66 25 2c 47 25 2c 51 24 2c 4e 25 3a |D%).f%,G%,Q$,N%:| 000005d0 66 25 3d 30 3a 47 25 3d 66 25 3c 44 25 3a c8 95 |f%=0:G%=f%<D%:..| 000005e0 47 25 80 a4 74 28 6c 79 25 2c 44 25 2c 66 25 2c |G%..t(ly%,D%,f%,| 000005f0 51 24 29 3a 4e 25 3d de 28 4d 24 28 29 2c 31 29 |Q$):N%=.(M$(),1)| 00000600 3a c8 95 47 25 80 4e 25 3e 3d 30 3a 47 25 3d 28 |:..G%.N%>=0:G%=(| 00000610 a7 51 24 2c 4d 24 28 4e 25 29 29 3c 3e 31 29 3a |.Q$,M$(N%))<>1):| 00000620 4e 25 2d 3d 31 3a ce 3a 47 25 3d ac 47 25 3a ce |N%-=1:.:G%=.G%:.| 00000630 3a 3d 47 25 0d 00 38 88 dd a4 74 28 6c 79 25 2c |:=G%..8...t(ly%,| 00000640 44 25 2c f8 66 25 2c f8 51 24 29 f5 51 24 3d 22 |D%,.f%,.Q$).Q$="| 00000650 22 3a c8 95 66 25 3c 44 25 80 a4 58 79 28 6c 79 |":..f%<D%..Xy(ly| 00000660 25 3f 66 25 29 3a 66 25 2b 3d 31 3a ce 3a c8 95 |%?f%):f%+=1:.:..| 00000670 66 25 3c 44 25 80 28 ac a4 64 28 6c 79 25 3f 66 |f%<D%.(..d(ly%?f| 00000680 25 29 29 3a 51 24 2b 3d a4 46 79 28 6c 79 25 3f |%)):Q$+=.Fy(ly%?| 00000690 66 25 29 3a 66 25 2b 3d 31 3a ce 3a fd 28 51 24 |f%):f%+=1:.:.(Q$| 000006a0 3d 22 22 29 84 28 97 28 51 24 29 3c 3e 97 28 22 |="").(.(Q$)<>.("| 000006b0 7c 22 29 29 3a 3d 51 24 3c 3e 22 22 0d 00 39 1a ||")):=Q$<>""..9.| 000006c0 dd a4 58 79 28 51 25 29 ea 47 25 3a 47 25 3d b9 |..Xy(Q%).G%:G%=.| 000006d0 3a c8 8e 51 25 ca 0d 00 3a 09 c9 97 22 2a 22 0d |:..Q%...:..."*".| 000006e0 00 3b 09 c9 97 22 20 22 0d 00 3c 06 c9 39 0d 00 |.;..." "..<..9..| 000006f0 3d 0e 7f 47 25 3d a4 64 28 51 25 29 0d 00 3e 09 |=..G%=.d(Q%)..>.| 00000700 cb 3a 3d 47 25 0d 00 3f 1d dd a4 64 28 51 25 29 |.:=G%..?...d(Q%)| 00000710 3d 28 28 51 25 3d 31 30 29 84 28 51 25 3d 31 33 |=((Q%=10).(Q%=13| 00000720 29 29 0d 00 40 23 dd a4 46 79 28 51 25 29 e7 51 |))..@#..Fy(Q%).Q| 00000730 25 3e 3d 97 28 22 41 22 29 80 51 25 3c 3d 97 28 |%>=.("A").Q%<=.(| 00000740 22 5a 22 29 8c 0d 00 41 15 51 25 2b 3d 97 28 22 |"Z")...A.Q%+=.("| 00000750 61 22 29 2d 97 28 22 41 22 29 0d 00 42 0c cd 3a |a")-.("A")..B..:| 00000760 3d bd 28 51 25 29 0d 00 43 58 dd f2 49 5f ea 46 |=.(Q%)..CX..I_.F| 00000770 25 2c 4e 25 2c 46 5f 25 3a 46 5f 25 3d 30 3a e3 |%,N%,F_%:F_%=0:.| 00000780 4e 25 3d 30 b8 de 28 41 24 28 29 2c 31 29 3a c8 |N%=0..(A$(),1):.| 00000790 99 34 36 2c 32 38 30 2c 65 25 2c 41 24 28 4e 25 |.46,280,e%,A$(N%| 000007a0 29 3a e7 46 5f 25 3c a9 28 41 24 28 4e 25 29 29 |):.F_%<.(A$(N%))| 000007b0 8c 46 5f 25 3d a9 28 41 24 28 4e 25 29 29 0d 00 |.F_%=.(A$(N%))..| 000007c0 44 a1 ed 4e 25 3a de 66 5f 25 46 5f 25 2b 32 3a |D..N%:.f_%F_%+2:| 000007d0 70 3d 30 3a 46 25 3d a4 41 28 35 31 32 29 3a 46 |p=0:F%=.A(512):F| 000007e0 25 21 30 3d 2d 31 3a 46 25 21 34 3d 30 3a 46 25 |%!0=-1:F%!4=0:F%| 000007f0 21 38 3d 30 3a 46 25 21 31 32 3d 36 38 3a 46 25 |!8=0:F%!12=68:F%| 00000800 21 31 36 3d 36 38 3a 46 25 21 32 30 3d 31 32 36 |!16=68:F%!20=126| 00000810 37 34 3a 46 25 21 32 34 3d 66 5f 25 3a 24 66 5f |74:F%!24=f_%:$f_| 00000820 25 3d 41 24 28 70 29 2b bd 28 30 29 3a 46 25 21 |%=A$(p)+.(0):F%!| 00000830 32 38 3d 65 25 3a 46 25 21 33 32 3d 46 5f 25 2b |28=e%:F%!32=F_%+| 00000840 31 3a c8 99 26 34 30 30 63 32 2c 2c 46 25 b8 56 |1:..&400c2,,F%.V| 00000850 5f 25 3a f2 43 28 46 25 2c 35 31 32 29 3a e1 0d |_%:.C(F%,512):..| 00000860 00 45 34 dd a4 6f 28 45 25 2c 45 24 29 ea 47 25 |.E4..o(E%,E$).G%| 00000870 2c 4d 24 2c 67 25 2c 57 79 25 2c 44 25 2c 41 79 |,M$,g%,Wy%,D%,Ay| 00000880 25 3a 4d 24 3d 22 43 46 53 23 22 2b 45 24 3a c8 |%:M$="CFS#"+E$:.| 00000890 8e b9 ca 0d 00 46 12 c9 a4 4e 28 4d 24 2c 22 21 |.....F...N(M$,"!| 000008a0 52 75 6e 22 29 0d 00 47 1f c9 a4 57 3d 66 3a 47 |Run")..G...W=f:G| 000008b0 25 3d a4 45 79 28 45 25 2c 4d 24 2b 22 2e 21 52 |%=.Ey(E%,M$+".!R| 000008c0 75 6e 22 29 0d 00 48 09 cb 3a 3d 47 25 0d 00 49 |un")..H..:=G%..I| 000008d0 42 dd a4 45 79 28 45 25 2c 4d 24 29 ea 47 25 2c |B..Ey(E%,M$).G%,| 000008e0 44 25 2c 41 79 25 2c 58 25 3a ea 66 25 2c 51 24 |D%,Ay%,X%:.f%,Q$| 000008f0 2c 4e 25 3a c8 99 38 2c 35 2c 4d 24 b8 2c 2c 2c |,N%:..8,5,M$.,,,| 00000900 2c 44 25 2c 41 79 25 3a e7 41 79 25 80 31 8c 0d |,D%,Ay%:.Ay%.1..| 00000910 00 4a 13 e7 a4 50 28 58 25 2c 44 25 2b 31 29 3d |.J...P(X%,D%+1)=| 00000920 30 8c 0d 00 4b 16 ea 85 3a ee 85 ea f7 85 3a f2 |0...K...:.....:.| 00000930 5a 28 58 25 29 3a f2 48 0d 00 4c 5a f2 66 28 4d |Z(X%):.H..LZ.f(M| 00000940 24 2c 58 25 29 3a 66 25 3d 30 3a 47 25 3d 66 25 |$,X%):f%=0:G%=f%| 00000950 3c 44 25 3a c8 95 47 25 80 a4 74 28 58 25 2c 44 |<D%:..G%..t(X%,D| 00000960 25 2c 66 25 2c 51 24 29 3a 47 25 3d 47 25 80 28 |%,f%,Q$):G%=G%.(| 00000970 a7 51 24 2c 22 21 62 6f 6f 74 22 29 3d 30 29 3a |.Q$,"!boot")=0):| 00000980 ce 3a 47 25 3d ac 47 25 3a f7 85 3a f2 5a 28 58 |.:G%=.G%:..:.Z(X| 00000990 25 29 0d 00 4d 05 cd 0d 00 4e 09 cd 3a 3d 47 25 |%)..M....N..:=G%| 000009a0 0d 00 4f 10 dd f2 41 79 c8 8e 57 25 21 31 36 ca |..O...Ay..W%!16.| 000009b0 0d 00 50 0d c9 31 32 38 32 3a f2 4e 5f 0d 00 51 |..P..1282:.N_..Q| 000009c0 0f c9 26 34 30 30 63 30 3a f2 53 5f 0d 00 52 0a |..&400c0:.S_..R.| 000009d0 c9 33 3a f2 66 5f 0d 00 53 0f c9 26 34 30 30 63 |.3:.f_..S..&400c| 000009e0 31 3a f2 53 79 0d 00 54 0a c9 38 3a f2 49 79 0d |1:.Sy..T..8:.Iy.| 000009f0 00 55 0f c9 26 34 30 30 63 63 3a f2 6d 79 0d 00 |.U..&400cc:.my..| 00000a00 56 0b c9 31 30 3a f2 4f 5f 0d 00 57 09 c9 30 3a |V..10:.O_..W..0:| 00000a10 f2 53 0d 00 58 07 cb 3a e1 0d 00 59 16 dd f2 77 |.S..X..:...Y...w| 00000a20 5f c8 99 26 34 30 30 63 35 2c 2c 57 25 3a e1 0d |_..&400c5,,W%:..| 00000a30 00 5a 16 dd f2 69 79 c8 99 26 34 30 30 63 36 2c |.Z...iy..&400c6,| 00000a40 2c 57 25 3a e1 0d 00 5b 10 dd f2 62 5f e7 21 57 |,W%:...[...b_.!W| 00000a50 25 3d 56 25 8c 0d 00 5c 13 f2 4d 5f 28 57 25 21 |%=V%...\..M_(W%!| 00000a60 34 2c 57 25 21 32 34 29 0d 00 5d 13 cc c8 99 26 |4,W%!24)..]....&| 00000a70 34 30 30 64 63 2c 57 25 21 32 34 0d 00 5e 07 cd |400dc,W%!24..^..| 00000a80 3a e1 0d 00 5f 32 dd f2 74 79 ea 51 4a 25 2c 49 |:..._2..ty.QJ%,I| 00000a90 4a 25 3a 49 4a 25 3d b9 3a f5 c8 99 26 34 30 30 |J%:IJ%=.:...&400| 00000aa0 63 37 2c 4f 79 25 2c 57 25 b8 51 4a 25 3a c8 8e |c7,Oy%,W%.QJ%:..| 00000ab0 51 4a 25 ca 0d 00 60 0a c9 30 3a f2 74 5f 0d 00 |QJ%...`..0:.t_..| 00000ac0 61 0a c9 32 3a f2 77 5f 0d 00 62 0a c9 33 3a f2 |a..2:.w_..b..3:.| 00000ad0 69 79 0d 00 63 0a c9 36 3a f2 44 5f 0d 00 64 0a |iy..c..6:.D_..d.| 00000ae0 c9 38 3a f2 62 5f 0d 00 65 0a c9 39 3a f2 72 5f |.8:.b_..e..9:.r_| 00000af0 0d 00 66 0b c9 31 37 3a f2 41 79 0d 00 67 0b c9 |..f..17:.Ay..g..| 00000b00 31 38 3a f2 48 5f 0d 00 68 0f cb 3a fd ac 28 49 |18:.H_..h..:..(I| 00000b10 4a 25 29 3a e1 0d 00 69 1f dd f2 5f 79 ea 61 25 |J%):...i..._y.a%| 00000b20 2c 53 4a 25 2c 5a 24 3a ea dc 3a f7 2b 30 3a e7 |,SJ%,Z$:..:.+0:.| 00000b30 5a 5f 25 8c 0d 00 6a 28 61 25 3d 21 28 a4 43 28 |Z_%...j(a%=!(.C(| 00000b40 22 50 72 6f 67 49 6e 66 6f 22 29 2b 46 2b 38 38 |"ProgInfo")+F+88| 00000b50 2b 28 42 79 3c 3c 35 29 2b 32 30 29 0d 00 6b 11 |+(By<<5)+20)..k.| 00000b60 cc 61 25 3d a4 6c 28 73 25 2c 42 79 29 0d 00 6c |.a%=.l(s%,By)..l| 00000b70 4c cd 3a f3 5a 24 3a 53 4a 25 3d 97 28 5a 24 29 |L.:.Z$:SJ%=.(Z$)| 00000b80 3a 5a 24 3d c1 5a 24 2c 32 29 3a c8 95 5a 24 3c |:Z$=.Z$,2):..Z$<| 00000b90 3e 22 22 3a 3f 61 25 3d 97 28 5a 24 29 82 53 4a |>"":?a%=.(Z$).SJ| 00000ba0 25 3a 5a 24 3d c1 5a 24 2c 32 29 3a 61 25 2b 3d |%:Z$=.Z$,2):a%+=| 00000bb0 31 3a ce 3a 3f 61 25 3d 30 0d 00 6d 38 dc 22 ce |1:.:?a%=0..m8.".| 00000bc0 9b a0 bc ab a9 a7 bd ba ab bc ab aa 22 2c 2c 2c |............",,,| 00000bd0 2c 2c 2c 2c 2c 2c 2c 2c 2c 2c 2c 2c 2c 2c 2c 2c |,,,,,,,,,,,,,,,,| * 00000bf0 2c 0d 00 6e 05 e1 0d 00 6f 2b dd f2 55 5f c8 99 |,..n....o+..U_..| 00000c00 26 34 36 35 63 36 2c 59 25 2c 6a 25 3a c8 99 26 |&465c6,Y%,j%:..&| 00000c10 64 63 62 38 64 2c 74 79 2c 21 6a 25 2c 2d 31 3a |dcb8d,ty,!j%,-1:| 00000c20 e1 0d 00 70 40 dd f2 78 5f de 6a 25 34 3a 21 6a |...p@..x_.j%4:!j| 00000c30 25 3d 30 3a f2 54 28 22 53 68 61 72 65 57 61 72 |%=0:.T("ShareWar| 00000c40 65 22 2c 2b 31 2c 22 22 29 3a e7 a4 5f 28 22 53 |e",+1,""):.._("S| 00000c50 68 61 72 65 57 61 72 65 22 2c 6a 25 2c 56 4a 25 |hareWare",j%,VJ%| 00000c60 29 0d 00 71 05 e1 0d 00 72 14 dd f2 64 5f 28 66 |)..q....r...d_(f| 00000c70 24 2c 51 79 25 29 ee 85 f2 78 0d 00 73 7b f2 54 |$,Qy%)...x..s{.T| 00000c80 79 28 32 30 2c 31 32 29 3a 56 79 25 3d 2d 32 3a |y(20,12):Vy%=-2:| 00000c90 73 79 25 3d a3 3a 55 79 25 3d a3 3a 55 79 25 3d |sy%=.:Uy%=.:Uy%=| 00000ca0 a3 3a 73 79 25 3d b9 3a 56 79 25 3d 2d 33 3a f2 |.:sy%=.:Vy%=-3:.| 00000cb0 41 28 22 3c 42 61 73 69 63 56 24 4c 69 62 3e 2e |A("<BasicV$Lib>.| 00000cc0 43 41 73 6d 22 2c 31 29 3a f2 41 28 22 3c 42 61 |CAsm",1):.A("<Ba| 00000cd0 73 69 63 56 24 4c 69 62 3e 2e 54 65 6d 70 6c 61 |sicV$Lib>.Templa| 00000ce0 74 65 22 2c 32 31 29 3a 4f 5f 25 3d 73 79 25 3a |te",21):O_%=sy%:| 00000cf0 69 25 3d 2b 31 0d 00 74 88 41 4a 25 3d b9 3a 6b |i%=+1..t.AJ%=.:k| 00000d00 79 25 3d 30 3a 60 79 25 3d 30 3a f2 54 5f 28 22 |y%=0:`y%=0:.T_("| 00000d10 73 74 64 69 6f 2c 20 73 74 64 6c 69 62 2c 20 73 |stdio, stdlib, s| 00000d20 74 72 69 6e 67 2c 20 6d 65 73 73 61 67 65 2c 20 |tring, message, | 00000d30 77 69 6d 70 22 29 3a f2 6b 79 28 32 30 30 30 2c |wimp"):.ky(2000,| 00000d40 a3 2c a3 29 3a f2 41 28 22 3c 42 61 73 69 63 56 |.,.):.A("<BasicV| 00000d50 24 4c 69 62 3e 2e 4d 6f 64 65 49 6e 66 6f 22 2c |$Lib>.ModeInfo",| 00000d60 31 29 3a f2 41 28 22 3c 42 61 73 69 63 56 24 4c |1):.A("<BasicV$L| 00000d70 69 62 3e 2e 57 69 6d 70 22 2c 32 38 29 0d 00 75 |ib>.Wimp",28)..u| 00000d80 7e f2 41 28 22 3c 42 61 73 69 63 56 24 4c 69 62 |~.A("<BasicV$Lib| 00000d90 3e 2e 46 69 6c 65 54 79 70 65 22 2c 32 29 3a f2 |>.FileType",2):.| 00000da0 41 28 22 3c 42 61 73 69 63 56 24 4c 69 62 3e 2e |A("<BasicV$Lib>.| 00000db0 66 69 6c 65 5f 69 6f 22 2c 39 29 3a f2 41 28 22 |file_io",9):.A("| 00000dc0 3c 42 61 73 69 63 56 24 4c 69 62 3e 2e 73 74 72 |<BasicV$Lib>.str| 00000dd0 69 6e 67 22 2c 36 29 3a 6d 25 3d a4 67 28 22 3c |ing",6):m%=.g("<| 00000de0 55 6e 43 46 53 24 44 69 72 3e 22 2c 2d 31 2c 44 |UnCFS$Dir>",-1,D| 00000df0 5f 25 29 3a e7 44 5f 25 3e 30 8c 0d 00 76 38 85 |_%):.D_%>0...v8.| 00000e00 21 6d 25 2c 22 55 6e 43 46 53 20 63 61 6e 27 74 |!m%,"UnCFS can't| 00000e10 20 6c 6f 61 64 20 69 74 73 27 20 6d 65 73 73 61 | load its' messa| 00000e20 67 65 20 66 69 6c 65 3a 20 22 2b a4 55 28 6d 25 |ge file: "+.U(m%| 00000e30 2b 34 29 0d 00 77 16 cd 3a e7 51 79 25 8c 51 79 |+4)..w..:.Qy%.Qy| 00000e40 25 3d 32 8b 51 79 25 3d 31 0d 00 78 d8 f2 5f 28 |%=2.Qy%=1..x.._(| 00000e50 22 50 61 74 63 68 69 6e 67 22 2c 51 79 25 29 3a |"Patching",Qy%):| 00000e60 f2 5f 28 22 70 61 74 63 68 69 6e 67 22 2c 51 79 |._("patching",Qy| 00000e70 25 29 3a f2 5f 28 22 70 61 74 63 68 65 64 22 2c |%):._("patched",| 00000e80 51 79 25 29 3a f2 5f 28 22 70 61 74 63 68 22 2c |Qy%):._("patch",| 00000e90 51 79 25 29 3a 62 24 3d 22 46 6f 72 63 65 43 46 |Qy%):b$="ForceCF| 00000ea0 53 22 2b bd 28 31 30 29 3a 4e 4a 25 3d 30 3a 58 |S"+.(10):NJ%=0:X| 00000eb0 4a 25 3d 31 3a 64 4a 25 3d 32 3a 46 4a 25 3d 30 |J%=1:dJ%=2:FJ%=0| 00000ec0 3a 6a 5f 25 3d 30 3a 76 5f 25 3d 31 3a 74 5f 25 |:j_%=0:v_%=1:t_%| 00000ed0 3d 32 3a 7a 5f 25 3d 33 3a 78 5f 25 3d 34 3a 55 |=2:z_%=3:x_%=4:U| 00000ee0 4a 25 3d 36 3a 42 4a 25 3d 37 3a 4a 4a 25 3d 38 |J%=6:BJ%=7:JJ%=8| 00000ef0 3a 6f 4a 25 3d 39 3a 58 79 3d 36 30 2d 31 3a 75 |:oJ%=9:Xy=60-1:u| 00000f00 3d 32 3a 76 3d 34 3a 58 3d 35 3a 55 3d 37 3a 48 |=2:v=4:X=5:U=7:H| 00000f10 3d 39 3a 56 3d 31 31 3a 59 3d 31 33 3a 50 3d 31 |=9:V=11:Y=13:P=1| 00000f20 34 0d 00 79 fd 4f 79 3d 31 37 3a 51 3d 31 38 3a |4..y.Oy=17:Q=18:| 00000f30 5a 79 25 3d 30 3a de 5a 24 28 35 29 3a 5a 24 28 |Zy%=0:.Z$(5):Z$(| 00000f40 29 3d 22 21 42 6f 6f 74 22 2c 22 21 52 75 6e 22 |)="!Boot","!Run"| 00000f50 2c 22 21 53 70 72 69 74 65 73 32 32 22 2c 22 21 |,"!Sprites22","!| 00000f60 53 70 72 69 74 65 73 32 33 22 2c 22 21 53 70 72 |Sprites23","!Spr| 00000f70 69 74 65 73 33 33 22 2c 22 21 53 70 72 69 74 65 |ites33","!Sprite| 00000f80 73 33 32 22 3a de 45 25 28 de 28 5a 24 28 29 2c |s32":.E%(.(Z$(),| 00000f90 31 29 29 3a 45 25 28 29 3d 66 2c 66 2c 62 2c 62 |1)):E%()=f,f,b,b| 00000fa0 2c 62 2c 62 3a de 41 24 28 31 29 3a 41 24 28 29 |,b,b:.A$(1):A$()| 00000fb0 3d 22 21 75 6e 63 66 73 22 2c 22 62 75 73 79 22 |="!uncfs","busy"| 00000fc0 3a 57 75 25 3d a3 3a 5a 5f 25 3d b9 3a 6e 25 3d |:Wu%=.:Z_%=.:n%=| 00000fd0 b9 3a 55 24 3d 22 26 35 30 32 2c 26 34 30 30 63 |.:U$="&502,&400c| 00000fe0 30 2c 33 2c 26 34 30 30 63 31 2c 38 2c 26 34 30 |0,3,&400c1,8,&40| 00000ff0 30 63 63 2c 31 30 22 3a f2 59 79 28 66 24 2c 31 |0cc,10":.Yy(f$,1| 00001000 2c 32 30 2c 32 33 2c 37 2c 31 39 39 34 29 3a 55 |,20,23,7,1994):U| 00001010 79 25 3d 73 79 25 3a f2 44 79 3a f2 55 5f 0d 00 |y%=sy%:.Dy:.U_..| 00001020 7a 08 ee 85 f2 78 0d 00 7b 13 f2 76 79 3a f5 f2 |z....x..{..vy:..| 00001030 74 79 3a fd a3 3a e0 3a e1 0d 00 7c e2 dd f2 72 |ty:..:.:...|...r| 00001040 ea 75 79 2c 79 3a 74 3d 30 3c 3c 32 3a 54 3d 31 |.uy,y:t=0<<2:T=1| 00001050 3c 3c 32 3a 4a 3d 32 3c 3c 32 3a 45 3d 33 3c 3c |<<2:J=2<<2:E=3<<| 00001060 32 3a 71 3d 34 3c 3c 32 3a 73 3d 35 3c 3c 32 3a |2:q=4<<2:s=5<<2:| 00001070 52 3d 36 3c 3c 32 3a 4b 3d 37 3c 3c 32 3a 53 3d |R=6<<2:K=7<<2:S=| 00001080 38 3c 3c 32 3a 6e 3d 39 3c 3c 32 3a 47 3d 31 30 |8<<2:n=9<<2:G=10| 00001090 3c 3c 32 3a 57 3d 31 32 3c 3c 32 3a 46 79 3d 31 |<<2:W=12<<2:Fy=1| 000010a0 33 3c 3c 32 3a 53 79 3d 31 34 3c 3c 32 3a 4c 79 |3<<2:Sy=14<<2:Ly| 000010b0 3d 31 35 3c 3c 32 3a 56 79 3d 31 36 3c 3c 32 3a |=15<<2:Vy=16<<2:| 000010c0 4d 3d 31 37 3c 3c 32 3a 72 3d 31 38 3c 3c 32 3a |M=17<<2:r=18<<2:| 000010d0 5a 79 3d 31 39 3c 3c 32 3a 55 79 3d 30 3c 3c 32 |Zy=19<<2:Uy=0<<2| 000010e0 3a 48 79 3d 31 3c 3c 32 3a 6f 3d 32 3c 3c 32 3a |:Hy=1<<2:o=2<<2:| 000010f0 4c 3d 33 3c 3c 32 3a 44 3d 30 3a 49 3d 31 3a 42 |L=3<<2:D=0:I=1:B| 00001100 3d 32 3a 78 3d 33 3a 64 3d 34 3a 43 3d 35 3a 5b |=2:x=3:d=4:C=5:[| 00001110 4f 50 54 55 25 3a 41 4c 49 47 4e 0d 00 7d a0 2e |OPTU%:ALIGN..}..| 00001120 75 79 20 45 51 55 53 22 5b 30 2c 77 3e 2c 3e 2c |uy EQUS"[0,w>,>,| 00001130 3e 22 3a 44 43 42 30 3a 2e 4b 79 20 45 51 55 53 |>":DCB0:.Ky EQUS| 00001140 22 5b 31 30 30 2c 3c 74 3e 22 3a 44 43 42 30 3a |"[100,<t>":DCB0:| 00001150 41 4c 49 47 4e 3a 2e 79 20 44 43 44 30 3a 2e 61 |ALIGN:.y DCD0:.a| 00001160 20 44 43 44 30 3a 2e 77 20 44 43 44 30 3a 2e 5f | DCD0:.w DCD0:._| 00001170 20 44 43 44 30 3a 2e 4f 20 44 43 44 30 3a 41 4c | DCD0:.O DCD0:AL| 00001180 49 47 4e 3a 2e 67 79 3a a4 4a 3a 53 54 4d 46 44 |IGN:.gy:.J:STMFD| 00001190 28 41 29 21 2c 7b 34 2d 39 2c 5a 7d 3a 4d 4f 56 |(A)!,{4-9,Z}:MOV| 000011a0 31 2c 23 30 3a 41 44 52 30 2c 75 79 3a 42 4c 20 |1,#0:ADR0,uy:BL | 000011b0 57 79 3a 53 54 52 76 63 30 2c 79 0d 00 7e a3 41 |Wy:STRvc0,y..~.A| 000011c0 44 52 76 63 30 2c 79 3a 4c 44 4d 46 44 28 41 29 |DRvc0,y:LDMFD(A)| 000011d0 21 2c 7b 34 2d 39 2c 70 63 7d 3a 2e 54 79 3a a4 |!,{4-9,pc}:.Ty:.| 000011e0 4a 3a 53 54 4d 46 44 28 41 29 21 2c 7b 34 2d 39 |J:STMFD(A)!,{4-9| 000011f0 2c 5a 7d 3a 4c 44 52 30 2c 5b 30 2c 23 4d 5d 3a |,Z}:LDR0,[0,#M]:| 00001200 53 54 4d 46 44 28 41 29 21 2c 7b 30 7d 3a 4d 4f |STMFD(A)!,{0}:MO| 00001210 56 31 2c 23 30 3a 41 44 52 30 2c 4b 79 3a 42 4c |V1,#0:ADR0,Ky:BL| 00001220 20 57 79 3a 41 44 44 20 41 2c 41 2c 23 31 3c 3c | Wy:ADD A,A,#1<<| 00001230 32 3a 53 54 52 76 63 30 2c 79 3a 41 44 52 76 63 |2:STRvc0,y:ADRvc| 00001240 30 2c 79 3a 4c 44 4d 46 44 28 41 29 21 2c 7b 34 |0,y:LDMFD(A)!,{4| 00001250 2d 39 2c 70 63 7d 3a 5d 3a f2 4c 5f 3a e1 0d 00 |-9,pc}:]:.L_:...| 00001260 7f 08 dd f2 6a e1 0d 00 80 60 dd f2 61 5f 3a 74 |....j....`..a_:t| 00001270 79 25 3d 2d 31 32 33 31 34 3a f2 54 28 22 46 43 |y%=-12314:.T("FC| 00001280 6f 6e 76 65 72 74 22 2c 2b 31 2c 22 53 74 61 74 |onvert",+1,"Stat| 00001290 75 73 57 22 29 3a f2 54 28 22 43 68 6f 69 63 65 |usW"):.T("Choice| 000012a0 73 22 2c 2b 31 2c 22 43 68 6f 69 63 65 73 57 22 |s",+1,"ChoicesW"| 000012b0 29 3a 56 25 3d 30 3a 76 75 25 3d 30 3a f2 78 5f |):V%=0:vu%=0:.x_| 000012c0 3a f2 5f 79 3a e1 0d 00 81 7d dd a4 53 74 61 74 |:._y:....}..Stat| 000012d0 75 73 57 28 4d 25 29 f2 52 5f 28 4d 25 29 3a 4f |usW(M%).R_(M%):O| 000012e0 4a 25 3d 4d 25 21 31 36 3a 71 4a 25 3d 4d 25 21 |J%=M%!16:qJ%=M%!| 000012f0 32 30 3a 62 4a 25 3d 4d 25 21 38 2d 4d 25 21 30 |20:bJ%=M%!8-M%!0| 00001300 3a 4d 4a 25 3d 4d 25 21 31 32 2d 4d 25 21 34 3a |:MJ%=M%!12-M%!4:| 00001310 6f 5f 25 3d 4d 25 21 34 38 2d 4d 25 21 34 30 3a |o_%=M%!48-M%!40:| 00001320 59 5f 25 3d 4d 25 21 35 32 2d 4d 25 21 34 34 3a |Y_%=M%!52-M%!44:| 00001330 f2 50 28 4d 25 2c 58 2c a4 45 28 22 4e 6f 6e 65 |.P(M%,X,.E("None| 00001340 22 29 29 0d 00 82 87 f2 50 28 4d 25 2c 58 2b 31 |")).....P(M%,X+1| 00001350 2c a4 45 28 22 46 53 63 61 6e 30 22 29 29 3a f2 |,.E("FScan0")):.| 00001360 50 28 4d 25 2c 55 2c a4 45 28 22 4e 6f 6e 65 22 |P(M%,U,.E("None"| 00001370 29 29 3a f2 50 28 4d 25 2c 55 2b 31 2c a4 45 28 |)):.P(M%,U+1,.E(| 00001380 22 46 43 6f 6e 76 30 22 29 29 3a f2 50 28 4d 25 |"FConv0")):.P(M%| 00001390 2c 48 2c a4 45 28 22 4e 6f 6e 65 22 29 29 3a f2 |,H,.E("None")):.| 000013a0 50 28 4d 25 2c 48 2b 31 2c a4 45 28 22 41 53 63 |P(M%,H+1,.E("ASc| 000013b0 61 6e 30 22 29 29 3a f2 50 28 4d 25 2c 56 2c a4 |an0")):.P(M%,V,.| 000013c0 45 28 22 4e 6f 6e 65 22 29 29 0d 00 83 84 f2 50 |E("None")).....P| 000013d0 28 4d 25 2c 56 2b 31 2c a4 45 28 22 41 43 6f 6e |(M%,V+1,.E("ACon| 000013e0 76 30 22 29 29 3a f2 50 28 4d 25 2c 76 2c 22 22 |v0")):.P(M%,v,""| 000013f0 29 3a f2 50 28 4d 25 2c 75 2c 22 22 29 3a f2 50 |):.P(M%,u,""):.P| 00001400 28 4d 25 2c 59 2c a4 45 28 22 41 62 72 74 22 29 |(M%,Y,.E("Abrt")| 00001410 29 3a f2 50 28 4d 25 2c 76 2d 31 2c a4 45 28 22 |):.P(M%,v-1,.E("| 00001420 50 61 74 63 68 69 6e 67 22 29 29 3a f2 73 28 4d |Patching")):.s(M| 00001430 25 21 37 32 2c c0 a4 45 28 22 54 69 74 6c 65 22 |%!72,..E("Title"| 00001440 29 2c 4d 25 21 38 30 2d 31 29 29 3a 3d 30 0d 00 |),M%!80-1)):=0..| 00001450 84 36 dd a4 43 68 6f 69 63 65 73 57 28 4d 25 29 |.6..ChoicesW(M%)| 00001460 f2 73 28 4d 25 21 37 32 2c c0 a4 45 28 22 43 68 |.s(M%!72,..E("Ch| 00001470 6f 69 63 65 73 22 29 2c 4d 25 21 38 30 2d 31 29 |oices"),M%!80-1)| 00001480 29 3a 3d 30 0d 00 85 3a dd f2 50 28 4d 25 2c 4e |):=0...:..P(M%,N| 00001490 25 2c 59 24 29 4e 25 3d 4d 25 2b 38 38 2b 28 4e |%,Y$)N%=M%+88+(N| 000014a0 25 2a 33 32 29 3a f2 73 28 4e 25 21 32 30 2c c0 |%*32):.s(N%!20,.| 000014b0 59 24 2c 4e 25 21 32 38 2d 31 29 29 3a e1 0d 00 |Y$,N%!28-1)):...| 000014c0 86 25 dd f2 42 5f 28 63 25 2c 62 25 2c 5f 25 2c |.%..B_(c%,b%,_%,| 000014d0 54 25 29 63 25 3d a4 47 28 31 2c a4 53 28 32 29 |T%)c%=.G(1,.S(2)| 000014e0 29 3a e1 0d 00 87 19 dd a4 66 28 4d 25 2c f8 45 |):.......f(M%,.E| 000014f0 25 29 ea 6a 79 25 3a c8 8e 4d 25 ca 0d 00 88 07 |%).jy%:..M%.....| 00001500 c9 2d 32 0d 00 89 07 c9 73 25 0d 00 8a 08 c9 21 |.-2.....s%.....!| 00001510 6a 25 0d 00 8b 07 c9 56 25 0d 00 8c 37 7f 45 25 |j%.....V%...7.E%| 00001520 3d 5a 79 25 3a 6a 79 25 3d a3 3a c8 95 45 25 80 |=Zy%:jy%=.:..E%.| 00001530 ac 6a 79 25 3a 6a 79 25 3d 28 4d 25 3d 45 25 21 |.jy%:jy%=(M%=E%!| 00001540 45 29 3a e7 ac 6a 79 25 8c 45 25 3d 45 25 21 54 |E):..jy%.E%=E%!T| 00001550 0d 00 8d 0b ce 3a e7 6a 79 25 8c 0d 00 8e 0a 4d |.....:.jy%.....M| 00001560 25 3d 74 79 25 0d 00 8f 05 cd 0d 00 90 09 cb 3a |%=ty%..........:| 00001570 3d 4d 25 0d 00 91 3c dd f2 4e 5f ea 41 24 2c 71 |=M%...<..N_.A$,q| 00001580 25 2c 54 25 2c 41 25 2c 4e 25 2c 58 25 2c 45 25 |%,T%,A%,N%,X%,E%| 00001590 3a 41 24 3d 22 22 3a 54 25 3d 57 25 21 33 36 3a |:A$="":T%=W%!36:| 000015a0 c8 8e a4 66 28 57 25 21 33 32 2c 45 25 29 ca 0d |...f(W%!32,E%)..| 000015b0 00 92 10 c9 2d 32 3a e7 54 25 3d 56 5f 25 8c 0d |....-2:.T%=V_%..| 000015c0 00 93 10 41 24 3d 22 49 63 6f 6e 42 61 72 22 0d |...A$="IconBar".| 000015d0 00 94 05 cd 0d 00 95 15 c9 73 25 3a 41 24 3d 22 |.........s%:A$="| 000015e0 50 72 6f 67 49 6e 66 6f 22 0d 00 96 17 c9 21 6a |ProgInfo".....!j| 000015f0 25 3a 41 24 3d 22 53 68 61 72 65 57 61 72 65 22 |%:A$="ShareWare"| 00001600 0d 00 97 1c c9 56 25 3a 41 24 3d 22 43 68 6f 69 |.....V%:A$="Choi| 00001610 63 65 73 22 3a e7 54 25 3e 3d 30 8c 0d 00 98 11 |ces":.T%>=0.....| 00001620 41 24 2b 3d 22 2c 22 2b c3 28 54 25 29 0d 00 99 |A$+=","+.(T%)...| 00001630 05 cd 0d 00 9a 19 c9 74 79 25 3a 41 24 3d 22 53 |.......ty%:A$="S| 00001640 74 61 74 75 73 22 3a e7 54 25 8c 0d 00 9b 11 41 |tatus":.T%.....A| 00001650 24 2b 3d 22 2c 22 2b c3 28 54 25 29 0d 00 9c 0d |$+=","+.(T%)....| 00001660 cd 3a c8 8e 45 25 21 53 ca 0d 00 9d 13 c9 42 2c |.:..E%!S......B,| 00001670 44 2c 49 3a 41 24 2b 3d 22 2c 50 22 0d 00 9e 0f |D,I:A$+=",P"....| 00001680 c9 43 3a 41 24 2b 3d 22 2c 53 22 0d 00 9f 0f c9 |.C:A$+=",S".....| 00001690 78 3a 41 24 2b 3d 22 2c 43 22 0d 00 a0 0f c9 64 |x:A$+=",C".....d| 000016a0 3a 41 24 2b 3d 22 2c 44 22 0d 00 a1 05 cb 0d 00 |:A$+=",D".......| 000016b0 a2 1c 7f e7 28 55 5f 25 3e 32 31 38 29 80 28 57 |....(U_%>218).(W| 000016c0 25 21 33 36 3c 3e 2d 31 29 8c 0d 00 a3 0a 41 24 |%!36<>-1).....A$| 000016d0 3d a4 43 79 0d 00 a4 05 cd 0d 00 a5 0e cb 3a e7 |=.Cy..........:.| 000016e0 41 24 3c 3e 22 22 8c 0d 00 a6 1c f2 6f 28 22 48 |A$<>""......o("H| 000016f0 22 2b 41 24 2c 57 25 2b 32 30 29 3a e7 57 25 3f |"+A$,W%+20):.W%?| 00001700 32 30 8c 0d 00 a7 4e 57 25 21 31 36 3d 31 32 38 |20....NW%!16=128| 00001710 33 3a 57 25 21 31 32 3d 57 25 21 38 3a 41 25 3d |3:W%!12=W%!8:A%=| 00001720 57 25 2b 32 30 3a c8 95 3f 41 25 3a 41 25 2b 3d |W%+20:..?A%:A%+=| 00001730 31 3a ce 3a e7 41 25 3e 3d 28 57 25 2b 32 35 36 |1:.:.A%>=(W%+256| 00001740 29 8c 41 25 3d 57 25 2b 32 35 35 3a 3f 41 25 3d |).A%=W%+255:?A%=| 00001750 30 0d 00 a8 29 57 25 21 30 3d 28 41 25 2d 57 25 |0...)W%!0=(A%-W%| 00001760 2b 34 29 80 2d 34 3a c8 99 26 34 30 30 65 37 2c |+4).-4:..&400e7,| 00001770 31 37 2c 57 25 2c 57 25 21 34 0d 00 a9 05 cd 0d |17,W%,W%!4......| 00001780 00 aa 07 cd 3a e1 0d 00 ab 38 dd a4 43 79 ea 41 |....:....8..Cy.A| 00001790 24 2c 4d 25 3a 4d 25 3d 57 25 2b 34 30 3a c8 99 |$,M%:M%=W%+40:..| 000017a0 26 34 30 30 66 34 2c 31 2c 4d 25 2c 57 25 21 33 |&400f4,1,M%,W%!3| 000017b0 32 2c 57 25 21 33 36 3a c8 8e 53 79 25 ca 0d 00 |2,W%!36:..Sy%...| 000017c0 ac 0f c9 78 79 25 3a 41 24 3d 22 49 22 0d 00 ad |...xy%:A$="I"...| 000017d0 0f c9 70 79 25 3a 41 24 3d 22 44 22 0d 00 ae 0e |..py%:A$="D"....| 000017e0 cb 3a e7 41 24 3c 3e 22 22 8c 0d 00 af 37 41 24 |.:.A$<>""....7A$| 000017f0 3d 22 4d 22 2b 41 24 2b c3 28 21 4d 25 29 3a c8 |="M"+A$+.(!M%):.| 00001800 95 4d 25 21 34 3c 3e 2d 31 3a 4d 25 2b 3d 34 3a |.M%!4<>-1:M%+=4:| 00001810 41 24 2b 3d 22 5f 2c 22 2b c3 28 21 4d 25 29 3a |A$+="_,"+.(!M%):| 00001820 ce 0d 00 b0 09 cd 3a 3d 41 24 0d 00 b1 21 dd f2 |......:=A$...!..| 00001830 53 79 f2 71 79 28 2d 31 29 3a c8 99 26 34 36 35 |Sy.qy(-1):..&465| 00001840 63 32 2c 59 25 3a f2 73 79 3a e1 0d 00 b2 2f dd |c2,Y%:.sy:..../.| 00001850 f2 53 ee 85 3a ee 85 87 3a 85 a2 31 2c 22 45 72 |.S..:...:..1,"Er| 00001860 72 6f 72 20 69 6e 20 65 72 72 6f 72 20 68 61 6e |ror in error han| 00001870 64 6c 65 72 3a 20 22 2b f6 24 0d 00 b3 1b f2 48 |dler: "+.$.....H| 00001880 79 3a f2 51 5f 3a d6 69 3a c8 99 26 34 30 30 64 |y:.Q_:.i:..&400d| 00001890 64 3a e0 3a e1 0d 00 b4 0c dd f2 76 5f e7 a4 77 |d:.:.......v_..w| 000018a0 8c 0d 00 b5 06 f2 53 0d 00 b6 07 cd 3a e1 0d 00 |......S.....:...| 000018b0 b7 42 dd a4 77 ea 71 79 25 2c 45 25 3a 71 79 25 |.B..w.qy%,E%:qy%| 000018c0 3d b9 3a 45 25 3d 5a 79 25 3a c8 95 45 25 80 71 |=.:E%=Zy%:..E%.q| 000018d0 79 25 3a 71 79 25 3d 28 45 25 21 53 3d 64 29 3a |y%:qy%=(E%!S=d):| 000018e0 45 25 3d 45 25 21 54 3a ce 3a e7 ac 71 79 25 8c |E%=E%!T:.:..qy%.| 000018f0 0d 00 b8 17 71 79 25 3d 28 a4 47 28 33 2c a4 53 |....qy%=(.G(3,.S| 00001900 28 35 29 29 3d 31 29 0d 00 b9 0a cd 3a 3d 71 79 |(5))=1).....:=qy| 00001910 25 0d 00 ba 0c dd f2 49 79 e7 a4 77 8c 0d 00 bb |%......Iy..w....| 00001920 06 f2 53 0d 00 bc 2c cc 57 25 21 31 32 3d 57 25 |..S...,.W%!12=W%| 00001930 21 38 3a 49 75 25 3d 57 25 21 34 3a c8 99 26 34 |!8:Iu%=W%!4:..&4| 00001940 30 30 65 37 2c 31 39 2c 57 25 2c 57 25 21 34 0d |00e7,19,W%,W%!4.| 00001950 00 bd 07 cd 3a e1 0d 00 be 58 dd f2 44 5f ea 63 |....:....X..D_.c| 00001960 25 2c 62 25 2c 5f 25 2c 4d 25 2c 54 25 2c 46 5f |%,b%,_%,M%,T%,F_| 00001970 25 2c 58 25 2c 45 25 3a 63 25 3d 57 25 21 30 3a |%,X%,E%:c%=W%!0:| 00001980 62 25 3d 57 25 21 34 3a 5f 25 3d 57 25 21 38 3a |b%=W%!4:_%=W%!8:| 00001990 4d 25 3d a4 66 28 57 25 21 31 32 2c 45 25 29 3a |M%=.f(W%!12,E%):| 000019a0 54 25 3d 57 25 21 31 36 3a c8 8e 5f 25 ca 0d 00 |T%=W%!16:.._%...| 000019b0 bf 0c c9 32 3a c8 8e 4d 25 ca 0d 00 c0 39 c9 2d |...2:..M%....9.-| 000019c0 32 3a f2 70 3a 62 25 3d 39 36 2b 28 34 34 2a 48 |2:.p:b%=96+(44*H| 000019d0 4a 25 29 2b 28 32 34 2a 6b 4a 25 29 3a c8 99 26 |J%)+(24*kJ%):..&| 000019e0 34 30 30 64 34 2c 2c 49 79 25 2c 63 25 2d 36 34 |400d4,,Iy%,c%-64| 000019f0 2c 62 25 0d 00 c1 0c c9 21 6a 25 3a f2 51 79 0d |,b%.....!j%:.Qy.| 00001a00 00 c2 26 c9 74 79 25 3a f2 6b 28 45 25 29 3a c8 |..&.ty%:.k(E%):.| 00001a10 99 26 34 30 30 64 34 2c 2c 49 79 25 2c 63 25 2d |.&400d4,,Iy%,c%-| 00001a20 36 34 2c 62 25 0d 00 c3 05 cb 0d 00 c4 14 c9 31 |64,b%..........1| 00001a30 2a 31 36 2c 34 2a 31 36 3a c8 8e 4d 25 ca 0d 00 |*16,4*16:..M%...| 00001a40 c5 18 c9 73 25 3a f2 4e 79 28 63 25 2c 62 25 2c |...s%:.Ny(c%,b%,| 00001a50 5f 25 2c 54 25 29 0d 00 c6 05 cb 0d 00 c7 0a 7f |_%,T%)..........| 00001a60 c8 8e 4d 25 ca 0d 00 c8 18 c9 2d 32 3a f2 42 5f |..M%......-2:.B_| 00001a70 28 63 25 2c 62 25 2c 5f 25 2c 54 25 29 0d 00 c9 |(c%,b%,_%,T%)...| 00001a80 19 c9 77 5f 25 3a f2 72 79 28 63 25 2c 62 25 2c |..w_%:.ry(c%,b%,| 00001a90 5f 25 2c 54 25 29 0d 00 ca 18 c9 73 25 3a f2 4e |_%,T%).....s%:.N| 00001aa0 79 28 63 25 2c 62 25 2c 5f 25 2c 54 25 29 0d 00 |y(c%,b%,_%,T%)..| 00001ab0 cb 0c c9 21 6a 25 3a f2 51 79 0d 00 cc 16 c9 74 |...!j%:.Qy.....t| 00001ac0 79 25 3a f2 4b 5f 28 45 25 2c 54 25 2c 5f 25 29 |y%:.K_(E%,T%,_%)| 00001ad0 0d 00 cd 12 c9 56 25 3a f2 62 79 28 5f 25 2c 54 |.....V%:.by(_%,T| 00001ae0 25 29 0d 00 ce 05 cb 0d 00 cf 07 cb 3a e1 0d 00 |%)..........:...| 00001af0 d0 26 dd f2 51 79 c8 99 26 34 36 35 63 34 2c 59 |.&..Qy..&465c4,Y| 00001b00 25 2c 6a 25 3a f2 5a 28 56 4a 25 29 3a 21 6a 25 |%,j%:.Z(VJ%):!j%| 00001b10 3d 30 3a e1 0d 00 d1 2e dd f2 4b 79 3a 53 79 25 |=0:.......Ky:Sy%| 00001b20 3d a3 3a 78 79 25 3d 26 31 30 34 30 61 33 31 2b |=.:xy%=&1040a31+| 00001b30 30 3a 70 79 25 3d 26 31 30 34 30 61 33 31 2b 31 |0:py%=&1040a31+1| 00001b40 3a e1 0d 00 d2 2d dd f2 70 ea 41 25 3a 48 4a 25 |:....-..p.A%:HJ%| 00001b50 3d 33 3a 6b 4a 25 3d 30 3a e7 6b 79 25 8c c8 99 |=3:kJ%=0:.ky%...| 00001b60 26 34 36 35 63 38 2c 59 25 2c 6b 79 25 2c a3 0d |&465c8,Y%,ky%,..| 00001b70 00 d3 36 41 25 3d ba 28 67 79 29 3a 49 79 25 3d |..6A%=.(gy):Iy%=| 00001b80 21 41 25 3a 6b 79 25 3d 49 79 25 3a c8 99 26 34 |!A%:ky%=Iy%:..&4| 00001b90 36 35 63 37 2c 59 25 2c 6b 79 25 3a 53 79 25 3d |65c7,Y%,ky%:Sy%=| 00001ba0 78 79 25 3a e1 0d 00 d4 13 dd f2 6b 28 45 25 29 |xy%:.......k(E%)| 00001bb0 ea 41 25 3a e7 45 25 8c 0d 00 d5 0a 4b 5f 25 3d |.A%:.E%.....K_%=| 00001bc0 45 25 0d 00 d6 1c cd 3a e7 60 79 25 8c c8 99 26 |E%.....:.`y%...&| 00001bd0 34 36 35 63 38 2c 59 25 2c 60 79 25 2c a3 0d 00 |465c8,Y%,`y%,...| 00001be0 d7 3d 41 25 3d 4b 5f 25 3a 41 25 3d ba 28 54 79 |.=A%=K_%:A%=.(Ty| 00001bf0 29 3a 49 79 25 3d 21 41 25 3a 60 79 25 3d 49 79 |):Iy%=!A%:`y%=Iy| 00001c00 25 3a c8 99 26 34 36 35 63 37 2c 59 25 2c 60 79 |%:..&465c7,Y%,`y| 00001c10 25 3a 53 79 25 3d 70 79 25 3a e1 0d 00 d8 35 dd |%:Sy%=py%:....5.| 00001c20 f2 53 5f ea 63 25 2c 62 25 2c 4d 5f 25 3a 63 25 |.S_.c%,b%,M_%:c%| 00001c30 3d 57 25 21 32 34 3a 62 25 3d 57 25 21 32 38 3a |=W%!24:b%=W%!28:| 00001c40 4d 5f 25 3d 57 25 21 33 32 3a c8 8e 53 79 25 ca |M_%=W%!32:..Sy%.| 00001c50 0d 00 d9 0f c9 78 79 25 3a c8 8e 4d 5f 25 ca 0d |.....xy%:..M_%..| 00001c60 00 da 13 c9 4e 4a 25 3a f2 46 79 3a e7 73 25 3e |....NJ%:.Fy:.s%>| 00001c70 30 8c 0d 00 db 40 f2 45 28 73 25 2c 30 2c a4 45 |0....@.E(s%,0,.E| 00001c80 28 22 41 70 70 22 29 29 3a f2 45 28 73 25 2c 31 |("App")):.E(s%,1| 00001c90 2c a4 45 28 22 50 75 72 70 6f 73 65 22 29 29 3a |,.E("Purpose")):| 00001ca0 c8 99 26 34 30 30 65 38 2c 2c 73 25 2c 63 25 2c |..&400e8,,s%,c%,| 00001cb0 62 25 0d 00 dc 05 cd 0d 00 dd 05 cb 0d 00 de 07 |b%..............| 00001cc0 cb 3a e1 0d 00 df 6b dd f2 72 5f ea 4d 5f 25 2c |.:....k..r_.M_%,| 00001cd0 46 25 2c 5f 4a 25 2c 7a 4a 25 2c 69 4a 25 2c 41 |F%,_J%,zJ%,iJ%,A| 00001ce0 25 3a 46 25 3d a4 41 28 35 31 32 29 3a c8 99 26 |%:F%=.A(512):..&| 00001cf0 34 30 30 63 66 2c 2c 46 25 3a 5f 4a 25 3d 46 25 |400cf,,F%:_J%=F%| 00001d00 21 30 3a 7a 4a 25 3d 46 25 21 34 3a 69 4a 25 3d |!0:zJ%=F%!4:iJ%=| 00001d10 46 25 21 38 3a f2 43 28 46 25 2c 35 31 32 29 3a |F%!8:.C(F%,512):| 00001d20 4d 5f 25 3d 21 57 25 3a c8 8e 53 79 25 ca 0d 00 |M_%=!W%:..Sy%...| 00001d30 e0 0f c9 78 79 25 3a c8 8e 4d 5f 25 ca 0d 00 e1 |...xy%:..M_%....| 00001d40 0c c9 58 4a 25 3a f2 60 79 0d 00 e2 0c c9 64 4a |..XJ%:.`y.....dJ| 00001d50 25 3a f2 76 5f 0d 00 e3 05 cb 0d 00 e4 0f c9 70 |%:.v_..........p| 00001d60 79 25 3a c8 8e 4d 5f 25 ca 0d 00 e5 10 c9 46 4a |y%:..M_%......FJ| 00001d70 25 3a f2 77 28 4b 5f 25 29 0d 00 e6 05 cb 0d 00 |%:.w(K_%).......| 00001d80 e7 0d cb 3a e7 69 4a 25 3d 31 8c 0d 00 e8 0a c8 |...:.iJ%=1......| 00001d90 8e 53 79 25 ca 0d 00 e9 0b c9 78 79 25 3a f2 70 |.Sy%......xy%:.p| 00001da0 0d 00 ea 0e c9 70 79 25 3a f2 6b 28 30 29 0d 00 |.....py%:.k(0)..| 00001db0 eb 1b cb 3a c8 99 26 34 30 30 64 34 2c 2c 49 79 |...:..&400d4,,Iy| 00001dc0 25 2c 5f 4a 25 2c 7a 4a 25 0d 00 ec 07 cc f2 68 |%,_J%,zJ%......h| 00001dd0 0d 00 ed 07 cd 3a e1 0d 00 ee 1b dd f2 68 c8 99 |.....:.......h..| 00001de0 26 34 30 30 64 34 2c 2c 2d 31 3a 53 79 25 3d a3 |&400d4,,-1:Sy%=.| 00001df0 3a e1 0d 00 ef 11 dd f2 48 85 9f 2c a4 71 3a f2 |:.......H..,.q:.| 00001e00 53 3a e1 0d 00 f0 10 dd a4 71 ea 77 24 3a e7 73 |S:.......q.w$:.s| 00001e10 79 25 8c 0d 00 f1 17 77 24 3d f6 24 2b 22 20 5b |y%.....w$=.$+" [| 00001e20 22 2b c3 28 9e 29 2b 22 5d 22 0d 00 f2 0a cc 77 |"+.(.)+"]".....w| 00001e30 24 3d f6 24 0d 00 f3 09 cd 3a 3d 77 24 0d 00 f4 |$=.$.....:=w$...| 00001e40 30 dd f2 44 79 ea 4a 25 3a f2 50 79 3a 4a 25 3d |0..Dy.J%:.Py:J%=| 00001e50 8e 28 a4 4d 28 4b 79 25 29 2b 22 2e 43 68 6f 69 |.(.M(Ky%)+".Choi| 00001e60 63 65 73 22 29 3a e7 4a 25 3c 3e 30 8c 0d 00 f5 |ces"):.J%<>0....| 00001e70 13 ea 85 3a ee 85 ea f7 85 3a d9 23 4a 25 3a e1 |...:.....:.#J%:.| 00001e80 0d 00 f6 2b e8 23 4a 25 2c 21 61 3a e8 23 4a 25 |...+.#J%,!a:.#J%| 00001e90 2c 21 77 3a e8 23 4a 25 2c 21 5f 3a e8 23 4a 25 |,!w:.#J%,!_:.#J%| 00001ea0 2c 21 4f 3a f7 85 3a d9 23 4a 25 0d 00 f7 07 cd |,!O:..:.#J%.....| 00001eb0 3a e1 0d 00 f8 34 dd f2 47 79 ea 4a 25 3a 4a 25 |:....4..Gy.J%:J%| 00001ec0 3d ae 28 a4 4d 28 4b 79 25 29 2b 22 2e 43 68 6f |=.(.M(Ky%)+".Cho| 00001ed0 69 63 65 73 22 29 3a ea 85 3a ee 85 ea f7 85 3a |ices"):..:.....:| 00001ee0 d9 23 4a 25 3a e1 0d 00 f9 2d f1 23 4a 25 2c 21 |.#J%:....-.#J%,!| 00001ef0 61 3a f1 23 4a 25 2c 21 77 3a f1 23 4a 25 2c 21 |a:.#J%,!w:.#J%,!| 00001f00 5f 3a f1 23 4a 25 2c 21 4f 3a f7 85 3a d9 23 4a |_:.#J%,!O:..:.#J| 00001f10 25 3a e1 0d 00 fa 0d dd f2 42 79 f2 50 79 3a e1 |%:.......By.Py:.| 00001f20 0d 00 fb 22 dd f2 66 5f e7 28 28 57 25 21 32 30 |..."..f_.((W%!20| 00001f30 3d 2d 32 29 80 28 57 25 21 32 34 3d 56 5f 25 29 |=-2).(W%!24=V_%)| 00001f40 29 8c 0d 00 fc 0c c8 8e 57 25 21 34 30 ca 0d 00 |).......W%!40...| 00001f50 fd 3f c9 78 79 3a f2 4d 79 28 a4 4d 28 57 25 2b |.?.xy:.My(.M(W%+| 00001f60 34 34 29 2c b9 29 3a 57 25 21 31 32 3d 57 25 21 |44),.):W%!12=W%!| 00001f70 38 3a 57 25 21 31 36 3d 34 3a c8 99 26 34 30 30 |8:W%!16=4:..&400| 00001f80 65 37 2c 31 37 2c 57 25 2c 57 25 21 34 0d 00 fe |e7,17,W%,W%!4...| 00001f90 3f c9 6e 79 3a f2 4d 79 28 a4 4d 28 57 25 2b 34 |?.ny:.My(.M(W%+4| 00001fa0 34 29 2c a3 29 3a 57 25 21 31 32 3d 57 25 21 38 |4),.):W%!12=W%!8| 00001fb0 3a 57 25 21 31 36 3d 34 3a c8 99 26 34 30 30 65 |:W%!16=4:..&400e| 00001fc0 37 2c 31 37 2c 57 25 2c 57 25 21 34 0d 00 ff 11 |7,17,W%,W%!4....| 00001fd0 7f e7 a4 47 28 31 2c a4 53 28 33 29 29 0d 01 00 |...G(1,.S(3))...| 00001fe0 05 cb 0d 01 01 07 cd 3a e1 0d 01 02 2e dd f2 4d |.......:.......M| 00001ff0 79 28 45 24 2c 52 5f 25 29 ea 45 25 3a f2 44 28 |y(E$,R_%).E%:.D(| 00002000 45 24 29 3a e7 a4 50 28 45 25 2c 5a 79 2b a9 28 |E$):..P(E%,Zy+.(| 00002010 45 24 29 2b 31 29 8c 0d 01 03 52 cc 24 28 45 25 |E$)+1)....R.$(E%| 00002020 2b 5a 79 29 3d 45 24 3a 45 25 21 4a 3d 30 3a 45 |+Zy)=E$:E%!J=0:E| 00002030 25 21 46 79 3d 21 61 3a 45 25 21 4d 3d 21 77 3a |%!Fy=!a:E%!M=!w:| 00002040 45 25 21 53 79 3d 21 5f 3a 45 25 21 4c 79 3d 21 |E%!Sy=!_:E%!Ly=!| 00002050 4f 3a 45 25 21 45 3d 30 3a 45 25 21 72 3d a3 3a |O:E%!E=0:E%!r=.:| 00002060 e7 a4 49 79 28 45 25 29 8c 0d 01 04 0a f2 5a 28 |..Iy(E%)......Z(| 00002070 45 25 29 0d 01 05 11 cc e7 5a 79 25 3d 30 8c f2 |E%)......Zy%=0..| 00002080 59 28 31 29 0d 01 06 1f f2 63 5f 28 45 25 2c 5a |Y(1).....c_(E%,Z| 00002090 79 25 29 3a e7 a4 73 28 45 25 2c 45 24 2c 52 5f |y%):..s(E%,E$,R_| 000020a0 25 29 8c 0d 01 07 0a f2 62 28 45 25 29 0d 01 08 |%)......b(E%)...| 000020b0 0b cc f2 65 28 45 25 29 0d 01 09 05 cd 0d 01 0a |...e(E%)........| 000020c0 05 cd 0d 01 0b 07 cd 3a e1 0d 01 0c 4d dd a4 5f |.......:....M.._| 000020d0 4e 75 6c 6c 5f 52 65 61 73 6f 6e 5f 75 6e 63 66 |Null_Reason_uncf| 000020e0 73 28 45 25 29 ea 47 25 3a c8 99 26 36 30 36 63 |s(E%).G%:..&606c| 000020f0 30 3a c8 99 26 32 30 30 30 36 2c 32 32 39 2c 30 |0:..&20006,229,0| 00002100 2c 30 3a ea 85 3a ee 85 ea f7 85 3a f2 45 5f 28 |,0:..:.....:.E_(| 00002110 45 25 29 3a 3d b9 0d 01 0d 11 47 25 3d a3 3a f5 |E%):=.....G%=.:.| 00002120 c8 8e 45 25 21 53 ca 0d 01 0e 0e c9 42 3a f2 5a |..E%!S......B:.Z| 00002130 5f 28 45 25 29 0d 01 0f 0e c9 44 3a f2 66 79 28 |_(E%).....D:.fy(| 00002140 45 25 29 0d 01 10 0e c9 49 3a f2 59 5f 28 45 25 |E%).....I:.Y_(E%| 00002150 29 0d 01 11 0f c9 78 2c 64 2c 43 3a 47 25 3d b9 |).....x,d,C:G%=.| 00002160 0d 01 12 32 cb 3a fd 47 25 84 45 25 21 46 79 3a |...2.:.G%.E%!Fy:| 00002170 f7 85 3a c8 99 26 32 30 30 30 36 2c 32 32 39 2c |..:..&20006,229,| 00002180 32 35 35 2c 30 3a c8 99 26 36 30 36 63 31 3a 3d |255,0:..&606c1:=| 00002190 47 25 0d 01 13 2e dd f2 45 5f 28 45 25 29 c8 99 |G%......E_(E%)..| 000021a0 26 36 30 36 63 31 3a c8 99 26 32 30 30 30 36 2c |&606c1:..&20006,| 000021b0 32 32 39 2c 32 35 35 2c 30 3a e7 9f 3d 31 37 8c |229,255,0:..=17.| 000021c0 0d 01 14 0c f2 4a 28 45 25 2c 78 29 0d 01 15 14 |.....J(E%,x)....| 000021d0 cc f2 62 28 45 25 29 3a f2 56 28 9f 2c a4 71 29 |..b(E%):.V(.,.q)| 000021e0 0d 01 16 07 cd 3a e1 0d 01 17 27 dd f2 5a 5f 28 |.....:....'..Z_(| 000021f0 45 25 29 ea 47 25 2c 49 25 2c 45 24 3a 47 25 3d |E%).G%,I%,E$:G%=| 00002200 a3 3a 49 25 3d 45 25 21 4a 3a e7 49 25 8c 0d 01 |.:I%=E%!J:.I%...| 00002210 18 21 45 24 3d 24 28 49 25 2b 4c 29 3a e7 a4 4f |.!E$=$(I%+L):..O| 00002220 28 45 24 2c 22 2a 22 2c 49 25 21 55 79 29 8c 0d |(E$,"*",I%!Uy)..| 00002230 01 19 09 e7 a4 57 79 8c 0d 01 1a 23 e7 a4 73 28 |.....Wy....#..s(| 00002240 45 25 2c 45 24 2b 22 2e 22 2b a4 51 2c 97 28 a4 |E%,E$+"."+.Q,.(.| 00002250 51 29 3d 97 28 22 21 22 29 29 8c 0d 01 1b 0d 47 |Q)=.("!")).....G| 00002260 25 3d a4 56 28 45 25 29 0d 01 1c 05 cd 0d 01 1d |%=.V(E%)........| 00002270 05 cd 0d 01 1e 0e cc 47 25 3d a4 56 28 45 25 29 |.......G%=.V(E%)| 00002280 0d 01 1f 05 cd 0d 01 20 09 cc 47 25 3d b9 0d 01 |....... ..G%=...| 00002290 21 0a cd 3a e7 47 25 8c 0d 01 22 0d e7 45 25 21 |!..:.G%..."..E%!| 000022a0 53 3c 3e 43 8c 0d 01 23 0c f2 4a 28 45 25 2c 64 |S<>C...#..J(E%,d| 000022b0 29 0d 01 24 05 cd 0d 01 25 07 cd 3a e1 0d 01 26 |)..$....%..:...&| 000022c0 5d dd f2 66 79 28 45 25 29 ea 47 25 2c 49 25 2c |]..fy(E%).G%,I%,| 000022d0 45 24 3a 47 25 3d b9 3a 49 25 3d 45 25 21 4a 3a |E$:G%=.:I%=E%!J:| 000022e0 45 24 3d 24 28 49 25 2b 4c 29 3a c8 95 45 25 21 |E$=$(I%+L):..E%!| 000022f0 47 3c de 28 5a 24 28 29 2c 31 29 80 47 25 80 28 |G<.(Z$(),1).G%.(| 00002300 45 25 21 53 3c 3e 43 29 3a e7 a4 44 79 28 45 25 |E%!S<>C):..Dy(E%| 00002310 2c 45 24 2c 45 25 21 47 29 8c 0d 01 27 10 e7 45 |,E$,E%!G)...'..E| 00002320 25 28 45 25 21 47 29 3d 66 8c 0d 01 28 19 f2 76 |%(E%!G)=f...(..v| 00002330 28 45 25 2c 45 24 2c 5a 24 28 45 25 21 47 29 2c |(E%,E$,Z$(E%!G),| 00002340 62 24 29 0d 01 29 1a cc f2 76 28 45 25 2c 45 24 |b$)..)...v(E%,E$| 00002350 2c 5a 24 28 45 25 21 47 29 2c 22 22 29 0d 01 2a |,Z$(E%!G),"")..*| 00002360 0a cd 3a 47 25 3d a3 0d 01 2b 14 cd 3a 45 25 21 |..:G%=...+..:E%!| 00002370 47 2b 3d 31 3a ce 3a e7 47 25 8c 0d 01 2c 0c e7 |G+=1:.:.G%...,..| 00002380 45 25 21 53 3d 44 8c 0d 01 2d 0b e7 45 25 21 53 |E%!S=D...-..E%!S| 00002390 79 8c 0d 01 2e 13 f2 4a 28 45 25 2c 49 29 3a 45 |y......J(E%,I):E| 000023a0 25 21 57 3d 30 0d 01 2f 0d cc f2 4a 28 45 25 2c |%!W=0../...J(E%,| 000023b0 42 29 0d 01 30 05 cd 0d 01 31 05 cd 0d 01 32 07 |B)..0....1....2.| 000023c0 cd 3a e1 0d 01 33 52 dd f2 59 5f 28 45 25 29 ea |.:...3R..Y_(E%).| 000023d0 47 25 2c 49 25 2c 45 24 3a 47 25 3d b9 3a 49 25 |G%,I%,E$:G%=.:I%| 000023e0 3d 45 25 21 4a 3a 45 24 3d 24 28 49 25 2b 4c 29 |=E%!J:E$=$(I%+L)| 000023f0 3a c8 95 45 25 21 57 3c 3e 2d 31 80 47 25 80 45 |:..E%!W<>-1.G%.E| 00002400 25 21 53 3c 3e 43 3a e7 a4 50 79 28 45 24 2c 45 |%!S<>C:..Py(E$,E| 00002410 25 21 57 29 8c 0d 01 34 18 f2 76 28 45 25 2c 45 |%!W)...4..v(E%,E| 00002420 24 2c a4 51 2c 22 22 29 3a 47 25 3d a3 0d 01 35 |$,.Q,""):G%=...5| 00002430 21 cd 3a ce 3a e7 28 45 25 21 4c 79 3c 3e 30 29 |!.:.:.(E%!Ly<>0)| 00002440 80 47 25 80 28 45 25 21 57 3d 2d 31 29 8c 0d 01 |.G%.(E%!W=-1)...| 00002450 36 0a e7 49 25 21 6f 8c 0d 01 37 0e f2 6a 79 28 |6..I%!o...7..jy(| 00002460 45 25 2c 45 24 29 0d 01 38 05 cd 0d 01 39 0a cd |E%,E$)..8....9..| 00002470 3a e7 47 25 8c 0d 01 3a 0c e7 45 25 21 53 3d 49 |:.G%...:..E%!S=I| 00002480 8c 0d 01 3b 0c f2 4a 28 45 25 2c 42 29 0d 01 3c |...;..J(E%,B)..<| 00002490 05 cd 0d 01 3d 07 cd 3a e1 0d 01 3e 2f dd a4 50 |....=..:...>/..P| 000024a0 79 28 45 24 2c f8 78 25 29 ea 47 25 3a f2 44 28 |y(E$,.x%).G%:.D(| 000024b0 45 24 29 3a 47 25 3d a3 3a e7 a4 4f 28 45 24 2c |E$):G%=.:..O(E$,| 000024c0 22 2a 22 2c 78 25 29 8c 0d 01 3f 12 f2 6e 28 45 |"*",x%)...?..n(E| 000024d0 25 29 3a e7 a4 57 3d 4a 79 8c 0d 01 40 22 47 25 |%):..W=Jy...@"G%| 000024e0 3d 28 a4 6b 3e 3d a4 4d 79 28 22 43 46 53 23 22 |=(.k>=.My("CFS#"| 000024f0 2b 45 24 2b 22 2e 22 2b a4 51 29 29 0d 01 41 05 |+E$+"."+.Q))..A.| 00002500 cd 0d 01 42 0a cc 78 25 3d 2d 31 0d 01 43 09 cd |...B..x%=-1..C..| 00002510 3a 3d 47 25 0d 01 44 21 dd f2 44 28 f8 78 24 29 |:=G%..D!..D(.x$)| 00002520 e7 a4 62 28 c0 78 24 2c 34 29 2c 22 43 46 53 23 |..b(.x$,4),"CFS#| 00002530 22 29 3d 30 8c 0d 01 45 0d 78 24 3d c1 78 24 2c |")=0...E.x$=.x$,| 00002540 35 29 0d 01 46 07 cd 3a e1 0d 01 47 27 dd f2 7a |5)..F..:...G'..z| 00002550 28 45 25 2c 71 75 25 2c 45 24 29 f2 4a 28 45 25 |(E%,qu%,E$).J(E%| 00002560 2c 43 29 3a e7 45 25 21 4d 8c f2 77 28 45 25 29 |,C):.E%!M..w(E%)| 00002570 0d 01 48 1f f2 55 28 45 25 2c 45 24 29 3a f2 58 |..H..U(E%,E$):.X| 00002580 5f 28 45 25 2c a4 53 28 71 75 25 29 29 3a e1 0d |_(E%,.S(qu%)):..| 00002590 01 49 32 dd f2 6c 28 45 25 2c 58 25 2c 45 24 29 |.I2..l(E%,X%,E$)| 000025a0 f2 5a 28 58 25 29 3a f2 46 28 22 53 79 73 22 2c |.Z(X%):.F("Sys",| 000025b0 f6 24 29 3a f2 7a 28 45 25 2c 36 2c 45 24 29 3a |.$):.z(E%,6,E$):| 000025c0 e1 0d 01 4a 32 dd f2 75 28 45 25 2c 58 25 2c 45 |...J2..u(E%,X%,E| 000025d0 24 29 f2 5a 28 58 25 29 3a f2 46 28 22 53 79 73 |$).Z(X%):.F("Sys| 000025e0 22 2c f6 24 29 3a f2 7a 28 45 25 2c 37 2c 45 24 |",.$):.z(E%,7,E$| 000025f0 29 3a e1 0d 01 4b 28 dd f2 52 79 28 4a 25 2c 45 |):...K(..Ry(J%,E| 00002600 24 2c 67 25 2c 57 79 25 2c 58 25 2c 44 25 2c 41 |$,g%,Wy%,X%,D%,A| 00002610 79 25 29 e7 4a 25 8c d9 23 4a 25 0d 01 4c 3b c8 |y%).J%..#J%..L;.| 00002620 99 26 32 30 30 30 38 2c 30 2c 45 24 2c 67 25 2c |.&20008,0,E$,g%,| 00002630 57 79 25 2c 58 25 2c 58 25 2b 44 25 3a c8 99 26 |Wy%,X%,X%+D%:..&| 00002640 32 30 30 30 38 2c 34 2c 45 24 2c 2c 2c 2c 41 79 |20008,4,E$,,,,Ay| 00002650 25 3a f2 48 3a e1 0d 01 4d 2f dd a4 73 28 45 25 |%:.H:...M/..s(E%| 00002660 2c 45 24 2c 52 5f 25 29 ea 49 25 3a f2 44 28 45 |,E$,R_%).I%:.D(E| 00002670 24 29 3a e7 a4 50 28 49 25 2c 4c 2b a9 28 45 24 |$):..P(I%,L+.(E$| 00002680 29 2b 31 29 8c 0d 01 4e 08 49 25 3d 30 0d 01 4f |)+1)...N.I%=0..O| 00002690 43 cc f2 74 28 45 25 2c 45 24 29 3a 49 25 21 48 |C..t(E%,E$):I%!H| 000026a0 79 3d 45 25 21 4a 3a 49 25 21 55 79 3d 30 3a 49 |y=E%!J:I%!Uy=0:I| 000026b0 25 21 6f 3d 52 5f 25 3a 24 28 49 25 2b 4c 29 3d |%!o=R_%:$(I%+L)=| 000026c0 45 24 3a 45 25 21 4a 3d 49 25 3a e7 52 5f 25 8c |E$:E%!J=I%:.R_%.| 000026d0 0d 01 50 13 f2 4a 28 45 25 2c 44 29 3a 45 25 21 |..P..J(E%,D):E%!| 000026e0 47 3d 30 0d 01 51 05 cd 0d 01 52 0d cd 3a 3d 28 |G=0..Q....R..:=(| 000026f0 49 25 3d 30 29 0d 01 53 1e dd a4 56 28 45 25 29 |I%=0)..S...V(E%)| 00002700 ea 78 25 2c 49 25 3a 49 25 3d 45 25 21 4a 3a e7 |.x%,I%:I%=E%!J:.| 00002710 49 25 8c 0d 01 54 0a e7 49 25 21 6f 8c 0d 01 55 |I%...T..I%!o...U| 00002720 12 f2 6f 79 28 45 25 29 3a e7 45 25 21 72 8c 0d |..oy(E%):.E%!r..| 00002730 01 56 0b f2 55 79 28 45 25 29 0d 01 57 05 cd 0d |.V..Uy(E%)..W...| 00002740 01 58 2a cd 3a 78 25 3d 49 25 21 48 79 3a f2 5a |.X*.:x%=I%!Hy:.Z| 00002750 28 49 25 29 3a 45 25 21 4a 3d 78 25 3a 49 25 3d |(I%):E%!J=x%:I%=| 00002760 78 25 3a 45 25 21 72 3d a3 0d 01 59 0a cd 3a e7 |x%:E%!r=...Y..:.| 00002770 49 25 8c 0d 01 5a 12 f2 74 28 45 25 2c 24 28 49 |I%...Z..t(E%,$(I| 00002780 25 2b 4c 29 29 0d 01 5b 0d cd 3a 3d 28 49 25 3d |%+L))..[..:=(I%=| 00002790 30 29 0d 01 5c 3b dd f2 62 28 45 25 29 f5 fd a4 |0)..\;..b(E%)...| 000027a0 56 28 45 25 29 3a f2 56 79 28 45 25 29 3a f2 41 |V(E%):.Vy(E%):.A| 000027b0 5f 28 45 25 2c 5a 79 25 29 3a f2 5a 28 45 25 29 |_(E%,Zy%):.Z(E%)| 000027c0 3a e7 5a 79 25 3d 30 8c f2 59 28 30 29 0d 01 5d |:.Zy%=0..Y(0)..]| 000027d0 05 e1 0d 01 5e 32 dd f2 63 5f 28 47 79 25 2c f8 |....^2..c_(Gy%,.| 000027e0 72 79 25 29 47 79 25 21 54 3d 72 79 25 3a 47 79 |ry%)Gy%!T=ry%:Gy| 000027f0 25 21 74 3d 30 3a e7 72 79 25 8c 72 79 25 21 74 |%!t=0:.ry%.ry%!t| 00002800 3d 47 79 25 0d 01 5f 0d 72 79 25 3d 47 79 25 3a |=Gy%.._.ry%=Gy%:| 00002810 e1 0d 01 60 3d dd f2 41 5f 28 47 79 25 2c f8 72 |...`=..A_(Gy%,.r| 00002820 79 25 29 ea 54 5f 25 2c 6d 79 25 3a 54 5f 25 3d |y%).T_%,my%:T_%=| 00002830 47 79 25 21 74 3a 6d 79 25 3d 47 79 25 21 54 3a |Gy%!t:my%=Gy%!T:| 00002840 e7 6d 79 25 8c 6d 79 25 21 74 3d 54 5f 25 0d 01 |.my%.my%!t=T_%..| 00002850 61 12 e7 54 5f 25 8c 54 5f 25 21 54 3d 6d 79 25 |a..T_%.T_%!T=my%| 00002860 0d 01 62 14 e7 47 79 25 3d 72 79 25 8c 72 79 25 |..b..Gy%=ry%.ry%| 00002870 3d 6d 79 25 0d 01 63 05 e1 0d 01 64 29 dd a4 50 |=my%..c....d)..P| 00002880 28 f8 58 75 25 2c 77 25 29 ea 5f 5f 25 3a 5f 5f |(.Xu%,w%).__%:__| 00002890 25 3d a4 59 28 58 75 25 2c 77 25 29 3a e7 5f 5f |%=.Y(Xu%,w%):.__| 000028a0 25 8c 0d 01 65 11 f2 56 28 79 79 25 2c a4 53 28 |%...e..V(yy%,.S(| 000028b0 34 29 29 0d 01 66 0a cd 3a 3d 5f 5f 25 0d 01 67 |4))..f..:=__%..g| 000028c0 30 dd f2 64 79 ea 45 25 2c 4a 5f 25 3a 4a 5f 25 |0..dy.E%,J_%:J_%| 000028d0 3d a3 3a 45 25 3d 5a 79 25 3a c8 95 45 25 80 28 |=.:E%=Zy%:..E%.(| 000028e0 ac 4a 5f 25 29 3a c8 8e 45 25 21 53 ca 0d 01 68 |.J_%):..E%!S...h| 000028f0 10 c9 42 2c 44 2c 49 3a 4a 5f 25 3d b9 0d 01 69 |..B,D,I:J_%=...i| 00002900 15 cb 3a 45 25 3d 45 25 21 54 3a ce 3a e7 4a 5f |..:E%=E%!T:.:.J_| 00002910 25 8c 0d 01 6a 09 f2 59 28 31 29 0d 01 6b 0a cc |%...j..Y(1)..k..| 00002920 f2 59 28 30 29 0d 01 6c 07 cd 3a e1 0d 01 6d 12 |.Y(0)..l..:...m.| 00002930 dd f2 59 28 4e 25 29 e7 4e 25 3c 3e 70 8c 0d 01 |..Y(N%).N%<>p...| 00002940 6e 2b 24 66 5f 25 3d 41 24 28 4e 25 29 2b bd 28 |n+$f_%=A$(N%)+.(| 00002950 30 29 3a f2 68 79 28 2d 31 2c 56 5f 25 2c 30 2c |0):.hy(-1,V_%,0,| 00002960 30 2c 30 29 3a 70 3d 4e 25 0d 01 6f 07 cd 3a e1 |0,0):p=N%..o..:.| 00002970 0d 01 70 35 dd a4 49 79 28 45 25 29 f2 6e 79 28 |..p5..Iy(E%).ny(| 00002980 22 46 43 6f 6e 76 65 72 74 22 2c 45 25 2b 45 2c |"FConvert",E%+E,| 00002990 32 35 36 2c 31 32 38 2c 45 25 21 56 79 29 3a e7 |256,128,E%!Vy):.| 000029a0 45 25 21 45 8c 0d 01 71 39 45 25 21 71 3d 30 3a |E%!E...q9E%!q=0:| 000029b0 45 25 21 73 3d 30 3a 45 25 21 52 3d 30 3a 45 25 |E%!s=0:E%!R=0:E%| 000029c0 21 4b 3d 30 3a 45 25 21 72 3d a3 3a f2 4a 28 45 |!K=0:E%!r=.:.J(E| 000029d0 25 2c 42 29 3a e7 45 25 21 4d 8c f2 45 79 0d 01 |%,B):.E%!M..Ey..| 000029e0 72 10 f2 77 79 28 45 25 21 45 2c 2d 31 29 0d 01 |r..wy(E%!E,-1)..| 000029f0 73 0f cd 3a 3d 28 45 25 21 45 3d 30 29 0d 01 74 |s..:=(E%!E=0)..t| 00002a00 12 dd f2 56 79 28 45 25 29 e7 45 25 21 45 8c 0d |...Vy(E%).E%!E..| 00002a10 01 75 1e c8 99 26 34 36 35 63 34 2c 59 25 2c 45 |.u...&465c4,Y%,E| 00002a20 25 2b 45 3a f2 5a 28 45 25 21 56 79 29 0d 01 76 |%+E:.Z(E%!Vy)..v| 00002a30 07 cd 3a e1 0d 01 77 1b dd f2 4b 5f 28 45 25 2c |..:...w...K_(E%,| 00002a40 54 25 2c 5f 25 29 ea 45 24 3a c8 8e 54 25 ca 0d |T%,_%).E$:..T%..| 00002a50 01 78 1d c9 75 2c 76 3a 45 24 3d a4 72 28 45 25 |.x..u,v:E$=.r(E%| 00002a60 29 3a e7 28 5f 25 80 31 29 3d 30 8c 0d 01 79 10 |):.(_%.1)=0...y.| 00002a70 45 24 3d 22 43 46 53 23 22 2b 45 24 0d 01 7a 22 |E$="CFS#"+E$..z"| 00002a80 cd 3a c8 99 26 32 30 30 30 35 2c 22 46 69 6c 65 |.:..&20005,"File| 00002a90 72 5f 4f 70 65 6e 44 69 72 20 22 2b 45 24 0d 01 |r_OpenDir "+E$..| 00002aa0 7b 0e c9 50 3a c8 8e 45 25 21 53 ca 0d 01 7c 23 |{..P:..E%!S...|#| 00002ab0 c9 42 2c 44 2c 49 3a f2 4a 28 45 25 2c 78 29 3a |.B,D,I:.J(E%,x):| 00002ac0 f2 57 79 28 22 75 6e 63 66 73 22 2c 45 25 29 0d |.Wy("uncfs",E%).| 00002ad0 01 7d 19 c9 78 3a f2 4a 28 45 25 2c 45 25 21 6e |.}..x:.J(E%,E%!n| 00002ae0 29 3a f2 65 28 45 25 29 0d 01 7e 20 c9 43 3a f2 |):.e(E%)..~ .C:.| 00002af0 69 28 45 25 29 3a f2 4a 28 45 25 2c 45 25 21 6e |i(E%):.J(E%,E%!n| 00002b00 29 3a f2 65 28 45 25 29 0d 01 7f 05 cb 0d 01 80 |):.e(E%)........| 00002b10 0f c9 51 3a e7 45 25 21 53 3d 43 8c 0d 01 81 28 |..Q:.E%!S=C....(| 00002b20 f2 69 28 45 25 29 3a f2 4a 28 45 25 2c 45 25 21 |.i(E%):.J(E%,E%!| 00002b30 6e 29 3a 45 25 21 47 2d 3d 31 3a e7 45 25 21 57 |n):E%!G-=1:.E%!W| 00002b40 3c 2d 31 8c 0d 01 82 0b 45 25 21 57 2b 3d 31 0d |<-1.....E%!W+=1.| 00002b50 01 83 0c cc 45 25 21 57 2d 3d 31 0d 01 84 0c cd |....E%!W-=1.....| 00002b60 3a f2 65 28 45 25 29 0d 01 85 0b cc f2 6d 28 45 |:.e(E%)......m(E| 00002b70 25 29 0d 01 86 05 cd 0d 01 87 0d c9 59 3a f2 6d |%)..........Y:.m| 00002b80 28 45 25 29 0d 01 88 07 cb 3a e1 0d 01 89 2b dd |(E%).....:....+.| 00002b90 f2 65 28 45 25 29 f2 59 28 31 29 3a f2 4f 28 45 |.e(E%).Y(1):.O(E| 00002ba0 25 2c a3 29 3a f2 4f 79 28 22 75 6e 63 66 73 22 |%,.):.Oy("uncfs"| 00002bb0 2c 45 25 29 3a e1 0d 01 8a 23 dd f2 6d 28 45 25 |,E%):....#..m(E%| 00002bc0 29 f2 57 79 28 22 75 6e 63 66 73 22 2c 45 25 29 |).Wy("uncfs",E%)| 00002bd0 3a f2 62 28 45 25 29 3a e1 0d 01 8b 28 dd f2 4a |:.b(E%):....(..J| 00002be0 28 45 25 2c 6d 4a 25 29 45 25 21 6e 3d 45 25 21 |(E%,mJ%)E%!n=E%!| 00002bf0 53 3a 45 25 21 53 3d 6d 4a 25 3a c8 8e 6d 4a 25 |S:E%!S=mJ%:..mJ%| 00002c00 ca 0d 01 8c 41 c9 44 2c 49 2c 42 3a f2 71 28 45 |....A.D,I,B:.q(E| 00002c10 25 21 45 2c 51 29 3a f2 51 28 45 25 21 45 2c 59 |%!E,Q):.Q(E%!E,Y| 00002c20 29 3a f2 51 28 45 25 21 45 2c 50 29 3a f2 45 28 |):.Q(E%!E,P):.E(| 00002c30 45 25 21 45 2c 50 2c a4 45 28 22 50 61 75 73 22 |E%!E,P,.E("Paus"| 00002c40 29 29 0d 01 8d 3d c9 78 3a f2 71 28 45 25 21 45 |))...=.x:.q(E%!E| 00002c50 2c 51 29 3a f2 51 28 45 25 21 45 2c 59 29 3a f2 |,Q):.Q(E%!E,Y):.| 00002c60 51 28 45 25 21 45 2c 50 29 3a f2 45 28 45 25 21 |Q(E%!E,P):.E(E%!| 00002c70 45 2c 50 2c a4 45 28 22 43 6f 6e 74 22 29 29 0d |E,P,.E("Cont")).| 00002c80 01 8e 48 c9 64 3a f2 51 28 45 25 21 45 2c 51 29 |..H.d:.Q(E%!E,Q)| 00002c90 3a f2 71 28 45 25 21 45 2c 59 29 3a f2 71 28 45 |:.q(E%!E,Y):.q(E| 00002ca0 25 21 45 2c 50 29 3a f2 45 28 45 25 21 45 2c 51 |%!E,P):.E(E%!E,Q| 00002cb0 2c a4 45 28 22 4f 6b 22 29 29 3a e7 45 25 21 4d |,.E("Ok")):.E%!M| 00002cc0 8c f2 77 28 45 25 29 0d 01 8f 53 c9 43 3a f2 51 |..w(E%)...S.C:.Q| 00002cd0 28 45 25 21 45 2c 51 29 3a f2 51 28 45 25 21 45 |(E%!E,Q):.Q(E%!E| 00002ce0 2c 59 29 3a f2 51 28 45 25 21 45 2c 50 29 3a f2 |,Y):.Q(E%!E,P):.| 00002cf0 45 28 45 25 21 45 2c 50 2c a4 45 28 22 53 6b 69 |E(E%!E,P,.E("Ski| 00002d00 70 22 29 29 3a f2 45 28 45 25 21 45 2c 51 2c a4 |p")):.E(E%!E,Q,.| 00002d10 45 28 22 52 74 72 79 22 29 29 0d 01 90 0b cb 3a |E("Rtry")).....:| 00002d20 f2 64 79 3a e1 0d 01 91 4d dd f2 71 28 4d 25 2c |.dy:....M..q(M%,| 00002d30 4e 25 29 ea 5a 25 3a 5a 25 3d a4 41 28 36 34 29 |N%).Z%:Z%=.A(64)| 00002d40 3a 21 5a 25 3d 4d 25 3a 5a 25 21 34 3d 4e 25 3a |:!Z%=M%:Z%!4=N%:| 00002d50 c8 99 26 34 30 30 63 65 2c 2c 5a 25 3a e7 28 28 |..&400ce,,Z%:.((| 00002d60 5a 25 21 32 34 29 80 28 31 3c 3c 32 33 29 29 3d |Z%!24).(1<<23))=| 00002d70 30 8c 0d 01 92 4a c8 99 26 34 30 30 64 31 2c 4d |0....J..&400d1,M| 00002d80 25 2c 5a 25 21 38 2c 5a 25 21 31 32 2c 5a 25 21 |%,Z%!8,Z%!12,Z%!| 00002d90 31 36 2c 5a 25 21 32 30 3a 5a 25 21 38 3d 31 3c |16,Z%!20:Z%!8=1<| 00002da0 3c 32 33 3a 5a 25 21 31 32 3d 31 3c 3c 32 33 3a |<23:Z%!12=1<<23:| 00002db0 c8 99 26 34 30 30 63 64 2c 2c 5a 25 0d 01 93 11 |..&400cd,,Z%....| 00002dc0 cd 3a f2 43 28 5a 25 2c 36 34 29 3a e1 0d 01 94 |.:.C(Z%,64):....| 00002dd0 49 dd f2 51 28 4d 25 2c 4e 25 29 ea 5a 25 3a 5a |I..Q(M%,N%).Z%:Z| 00002de0 25 3d a4 41 28 36 34 29 3a 21 5a 25 3d 4d 25 3a |%=.A(64):!Z%=M%:| 00002df0 5a 25 21 34 3d 4e 25 3a c8 99 26 34 30 30 63 65 |Z%!4=N%:..&400ce| 00002e00 2c 2c 5a 25 3a e7 28 5a 25 21 32 34 29 80 28 31 |,,Z%:.(Z%!24).(1| 00002e10 3c 3c 32 33 29 8c 0d 01 95 4a c8 99 26 34 30 30 |<<23)....J..&400| 00002e20 64 31 2c 4d 25 2c 5a 25 21 38 2c 5a 25 21 31 32 |d1,M%,Z%!8,Z%!12| 00002e30 2c 5a 25 21 31 36 2c 5a 25 21 32 30 3a 5a 25 21 |,Z%!16,Z%!20:Z%!| 00002e40 38 3d 30 3c 3c 32 33 3a 5a 25 21 31 32 3d 31 3c |8=0<<23:Z%!12=1<| 00002e50 3c 32 33 3a c8 99 26 34 30 30 63 64 2c 2c 5a 25 |<23:..&400cd,,Z%| 00002e60 0d 01 96 11 cd 3a f2 43 28 5a 25 2c 36 34 29 3a |.....:.C(Z%,64):| 00002e70 e1 0d 01 97 2a dd f2 6e 28 45 25 29 45 25 21 71 |....*..n(E%)E%!q| 00002e80 2b 3d 31 3a e7 45 25 21 4d 3d 30 8c f2 4e 28 45 |+=1:.E%!M=0..N(E| 00002e90 25 21 45 2c 58 2c 45 25 21 71 29 0d 01 98 25 e7 |%!E,X,E%!q)...%.| 00002ea0 45 25 21 71 3d 31 8c f2 45 28 45 25 21 45 2c 58 |E%!q=1..E(E%!E,X| 00002eb0 2b 31 2c a4 45 28 22 46 53 63 61 6e 31 22 29 29 |+1,.E("FScan1"))| 00002ec0 0d 01 99 25 e7 45 25 21 71 3d 32 8c f2 45 28 45 |...%.E%!q=2..E(E| 00002ed0 25 21 45 2c 58 2b 31 2c a4 45 28 22 46 53 63 61 |%!E,X+1,.E("FSca| 00002ee0 6e 4e 22 29 29 0d 01 9a 05 e1 0d 01 9b 14 dd f2 |nN"))...........| 00002ef0 4f 28 45 25 2c 67 75 25 29 e7 67 75 25 8c 0d 01 |O(E%,gu%).gu%...| 00002f00 9c 2a 45 25 21 72 3d b9 3a 45 25 21 73 2b 3d 31 |.*E%!r=.:E%!s+=1| 00002f10 3a e7 45 25 21 4d 3d 30 8c f2 4e 28 45 25 21 45 |:.E%!M=0..N(E%!E| 00002f20 2c 55 2c 45 25 21 73 29 0d 01 9d 25 e7 45 25 21 |,U,E%!s)...%.E%!| 00002f30 73 3d 31 8c f2 45 28 45 25 21 45 2c 55 2b 31 2c |s=1..E(E%!E,U+1,| 00002f40 a4 45 28 22 46 43 6f 6e 76 31 22 29 29 0d 01 9e |.E("FConv1"))...| 00002f50 25 e7 45 25 21 73 3d 32 8c f2 45 28 45 25 21 45 |%.E%!s=2..E(E%!E| 00002f60 2c 55 2b 31 2c a4 45 28 22 46 43 6f 6e 76 4e 22 |,U+1,.E("FConvN"| 00002f70 29 29 0d 01 9f 11 cd 3a f2 55 28 45 25 2c 22 22 |)).....:.U(E%,""| 00002f80 29 3a e1 0d 01 a0 2b dd f2 6f 79 28 45 25 29 45 |):....+..oy(E%)E| 00002f90 25 21 52 2b 3d 31 3a e7 45 25 21 4d 3d 30 8c f2 |%!R+=1:.E%!M=0..| 00002fa0 4e 28 45 25 21 45 2c 48 2c 45 25 21 52 29 0d 01 |N(E%!E,H,E%!R)..| 00002fb0 a1 25 e7 45 25 21 52 3d 31 8c f2 45 28 45 25 21 |.%.E%!R=1..E(E%!| 00002fc0 45 2c 48 2b 31 2c a4 45 28 22 41 53 63 61 6e 31 |E,H+1,.E("AScan1| 00002fd0 22 29 29 0d 01 a2 25 e7 45 25 21 52 3d 32 8c f2 |"))...%.E%!R=2..| 00002fe0 45 28 45 25 21 45 2c 48 2b 31 2c a4 45 28 22 41 |E(E%!E,H+1,.E("A| 00002ff0 53 63 61 6e 4e 22 29 29 0d 01 a3 05 e1 0d 01 a4 |ScanN"))........| 00003000 45 dd f2 55 79 28 45 25 29 45 25 21 4b 2b 3d 31 |E..Uy(E%)E%!K+=1| 00003010 3a f2 4e 28 45 25 21 45 2c 56 2c 45 25 21 4b 29 |:.N(E%!E,V,E%!K)| 00003020 3a e7 45 25 21 4b 3d 31 8c f2 45 28 45 25 21 45 |:.E%!K=1..E(E%!E| 00003030 2c 56 2b 31 2c a4 45 28 22 41 43 6f 6e 76 31 22 |,V+1,.E("AConv1"| 00003040 29 29 0d 01 a5 25 e7 45 25 21 4b 3d 32 8c f2 45 |))...%.E%!K=2..E| 00003050 28 45 25 21 45 2c 56 2b 31 2c a4 45 28 22 41 43 |(E%!E,V+1,.E("AC| 00003060 6f 6e 76 4e 22 29 29 0d 01 a6 05 e1 0d 01 a7 16 |onvN")).........| 00003070 dd f2 74 28 45 25 2c 45 24 29 e7 45 25 21 4d 3d |..t(E%,E$).E%!M=| 00003080 30 8c 0d 01 a8 15 f2 45 28 45 25 21 45 2c 75 2c |0......E(E%!E,u,| 00003090 a4 63 28 45 24 29 29 0d 01 a9 07 cd 3a e1 0d 01 |.c(E$)).....:...| 000030a0 aa 16 dd f2 55 28 45 25 2c 45 24 29 e7 45 25 21 |....U(E%,E$).E%!| 000030b0 4d 3d 30 8c 0d 01 ab 15 f2 45 28 45 25 21 45 2c |M=0......E(E%!E,| 000030c0 76 2c a4 63 28 45 24 29 29 0d 01 ac 07 cd 3a e1 |v,.c(E$)).....:.| 000030d0 0d 01 ad 15 dd a4 63 28 45 24 29 e7 a9 28 45 24 |......c(E$)..(E$| 000030e0 29 3e 58 79 8c 0d 01 ae 16 45 24 3d 22 2e 2e 2e |)>Xy.....E$="...| 000030f0 22 2b c2 45 24 2c 58 79 2d 33 29 0d 01 af 09 cd |"+.E$,Xy-3).....| 00003100 3a 3d 45 24 0d 01 b0 1e dd a4 72 28 45 25 29 ea |:=E$......r(E%).| 00003110 45 24 2c 49 25 3a 49 25 3d 45 25 21 4a 3a e7 49 |E$,I%:I%=E%!J:.I| 00003120 25 8c 0d 01 b1 0e 45 24 3d 24 28 49 25 2b 4c 29 |%.....E$=$(I%+L)| 00003130 0d 01 b2 10 cc 45 24 3d 24 28 45 25 2b 5a 79 29 |.....E$=$(E%+Zy)| 00003140 0d 01 b3 09 cd 3a 3d 45 24 0d 01 b4 1f dd f2 77 |.....:=E$......w| 00003150 28 45 25 29 45 25 21 4d 3d 28 45 25 21 4d 3d 30 |(E%)E%!M=(E%!M=0| 00003160 29 3a e7 45 25 21 4d 8c 0d 01 b5 07 f2 45 79 0d |):.E%!M......Ey.| 00003170 01 b6 5c cc f2 74 28 45 25 2c a4 72 28 45 25 29 |..\..t(E%,.r(E%)| 00003180 29 3a f2 55 28 45 25 2c 22 22 29 3a f2 4e 28 45 |):.U(E%,""):.N(E| 00003190 25 21 45 2c 55 2c 45 25 21 73 29 3a f2 4e 28 45 |%!E,U,E%!s):.N(E| 000031a0 25 21 45 2c 58 2c 45 25 21 71 29 3a f2 4e 28 45 |%!E,X,E%!q):.N(E| 000031b0 25 21 45 2c 56 2c 45 25 21 4b 29 3a f2 4e 28 45 |%!E,V,E%!K):.N(E| 000031c0 25 21 45 2c 48 2c 45 25 21 52 29 0d 01 b7 07 cd |%!E,H,E%!R).....| 000031d0 3a e1 0d 01 b8 63 dd f2 45 79 f2 45 28 45 25 21 |:....c..Ey.E(E%!| 000031e0 45 2c 75 2c 22 2d 22 29 3a f2 45 28 45 25 21 45 |E,u,"-"):.E(E%!E| 000031f0 2c 76 2c 22 2d 22 29 3a f2 45 28 45 25 21 45 2c |,v,"-"):.E(E%!E,| 00003200 55 2c 22 2d 22 29 3a f2 45 28 45 25 21 45 2c 58 |U,"-"):.E(E%!E,X| 00003210 2c 22 2d 22 29 3a f2 45 28 45 25 21 45 2c 56 2c |,"-"):.E(E%!E,V,| 00003220 22 2d 22 29 3a f2 45 28 45 25 21 45 2c 48 2c 22 |"-"):.E(E%!E,H,"| 00003230 2d 22 29 3a e1 0d 01 b9 2f dd f2 58 5f 28 45 25 |-"):..../..X_(E%| 00003240 2c 6f 24 29 ea 5a 25 2c 65 4a 25 2c 66 4a 25 2c |,o$).Z%,eJ%,fJ%,| 00003250 63 4a 25 2c 67 5f 25 3a e7 45 25 21 4d 8c f2 77 |cJ%,g_%:.E%!M..w| 00003260 28 45 25 29 0d 01 ba ea f2 45 28 45 25 21 45 2c |(E%).....E(E%!E,| 00003270 4f 79 2c 6f 24 29 3a 5a 25 3d a4 41 28 36 34 29 |Oy,o$):Z%=.A(64)| 00003280 3a 21 5a 25 3d 45 25 21 45 3a 63 4a 25 3d 48 5f |:!Z%=E%!E:cJ%=H_| 00003290 25 2b 31 3a 67 5f 25 3d 50 5f 25 2b 31 3a 65 4a |%+1:g_%=P_%+1:eJ| 000032a0 25 3d ac 28 28 31 3c 3c 43 5f 25 29 2d 31 29 3a |%=.((1<<C_%)-1):| 000032b0 66 4a 25 3d ac 28 28 31 3c 3c 44 79 25 29 2d 31 |fJ%=.((1<<Dy%)-1| 000032c0 29 3a 5a 25 21 34 3d 28 28 63 4a 25 2d 6f 5f 25 |):Z%!4=((cJ%-o_%| 000032d0 29 2f 32 29 80 65 4a 25 3a 5a 25 21 31 36 3d 67 |)/2).eJ%:Z%!16=g| 000032e0 5f 25 2d 28 28 28 28 67 5f 25 2d 36 38 29 2d 59 |_%-((((g_%-68)-Y| 000032f0 5f 25 29 2f 32 29 80 66 4a 25 29 3a 5a 25 21 31 |_%)/2).fJ%):Z%!1| 00003300 32 3d 5a 25 21 34 2b 6f 5f 25 3a 5a 25 21 38 3d |2=Z%!4+o_%:Z%!8=| 00003310 5a 25 21 31 36 2d 59 5f 25 3a 5a 25 21 32 30 3d |Z%!16-Y_%:Z%!20=| 00003320 30 3a 5a 25 21 32 34 3d 30 3a 5a 25 21 32 38 3d |0:Z%!24=0:Z%!28=| 00003330 2d 31 3a c8 99 26 34 30 30 63 35 2c 2c 5a 25 3a |-1:..&400c5,,Z%:| 00003340 ef 37 3a f2 43 28 5a 25 2c 36 34 29 3a e1 0d 01 |.7:.C(Z%,64):...| 00003350 bb 8c dd f2 69 28 45 25 29 ea 5a 25 3a 5a 25 3d |....i(E%).Z%:Z%=| 00003360 a4 41 28 36 34 29 3a 21 5a 25 3d 45 25 21 45 3a |.A(64):!Z%=E%!E:| 00003370 c8 99 26 34 30 30 63 62 2c 2c 5a 25 3a 5a 25 21 |..&400cb,,Z%:Z%!| 00003380 31 32 3d 5a 25 21 34 2b 62 4a 25 3a 5a 25 21 31 |12=Z%!4+bJ%:Z%!1| 00003390 36 3d 5a 25 21 38 2b 4d 4a 25 3a 5a 25 21 32 30 |6=Z%!8+MJ%:Z%!20| 000033a0 3d 4f 4a 25 3a 5a 25 21 32 34 3d 71 4a 25 3a 5a |=OJ%:Z%!24=qJ%:Z| 000033b0 25 21 32 38 3d 2d 31 3a c8 99 26 34 30 30 63 35 |%!28=-1:..&400c5| 000033c0 2c 2c 5a 25 3a f2 43 28 5a 25 2c 36 34 29 3a f2 |,,Z%:.C(Z%,64):.| 000033d0 55 28 45 25 2c 22 22 29 3a e1 0d 01 bc 0e dd f2 |U(E%,""):.......| 000033e0 60 79 e7 56 25 3d 30 8c 0d 01 bd 23 de 45 4a 25 |`y.V%=0....#.EJ%| 000033f0 34 3a 21 45 4a 25 3d 30 3a e7 a4 61 28 22 43 68 |4:!EJ%=0:..a("Ch| 00003400 6f 69 63 65 73 22 2c 45 4a 25 29 0d 01 be 0b 56 |oices",EJ%)....V| 00003410 25 3d 21 45 4a 25 0d 01 bf 0a cd 3a e7 56 25 8c |%=!EJ%.....:.V%.| 00003420 0d 01 c0 18 f2 64 3a f2 70 79 28 56 25 29 3a f2 |.....d:.py(V%):.| 00003430 60 28 56 25 2c 2d 31 29 0d 01 c1 07 cd 3a e1 0d |`(V%,-1).....:..| 00003440 01 c2 0b dd f2 64 e7 56 25 8c 0d 01 c3 58 c8 99 |.....d.V%....X..| 00003450 26 34 36 35 63 36 2c 59 25 2c 56 25 3a f2 49 28 |&465c6,Y%,V%:.I(| 00003460 56 25 2c 6a 5f 25 2c 21 61 29 3a f2 49 28 56 25 |V%,j_%,!a):.I(V%| 00003470 2c 76 5f 25 2c 21 77 29 3a f2 49 28 56 25 2c 74 |,v_%,!w):.I(V%,t| 00003480 5f 25 2c 21 5f 29 3a f2 49 28 56 25 2c 7a 5f 25 |_%,!_):.I(V%,z_%| 00003490 2c 21 4f 29 3a f2 49 28 56 25 2c 78 5f 25 2c a4 |,!O):.I(V%,x_%,.| 000034a0 78 29 0d 01 c4 07 cd 3a e1 0d 01 c5 23 dd f2 62 |x).....:....#..b| 000034b0 79 28 5f 25 2c 54 25 29 ea 62 79 25 3a f2 60 28 |y(_%,T%).by%:.`(| 000034c0 56 25 2c 2d 31 29 3a c8 8e 54 25 ca 0d 01 c6 11 |V%,-1):..T%.....| 000034d0 c9 55 4a 25 3a f2 52 3a 62 79 25 3d b9 0d 01 c7 |.UJ%:.R:by%=....| 000034e0 11 c9 42 4a 25 3a f2 64 3a 62 79 25 3d b9 0d 01 |..BJ%:.d:by%=...| 000034f0 c8 15 c9 4a 4a 25 3a f2 52 3a f2 47 79 3a 62 79 |...JJ%:.R:.Gy:by| 00003500 25 3d b9 0d 01 c9 15 c9 6f 4a 25 3a f2 42 79 3a |%=......oJ%:.By:| 00003510 f2 64 3a 62 79 25 3d b9 0d 01 ca 0b cb 3a e7 62 |.d:by%=......:.b| 00003520 79 25 8c 0d 01 cb 13 e7 5f 25 80 31 30 39 32 8c |y%......_%.1092.| 00003530 f2 58 28 56 25 29 0d 01 cc 07 cd 3a e1 0d 01 cd |.X(V%).....:....| 00003540 65 dd f2 52 ea 75 5f 25 2c 49 24 2c 52 24 2c 42 |e..R.u_%,I$,R$,B| 00003550 24 3a 21 61 3d a4 42 28 56 25 2c 6a 5f 25 29 3a |$:!a=.B(V%,j_%):| 00003560 21 77 3d a4 42 28 56 25 2c 76 5f 25 29 3a 21 5f |!w=.B(V%,v_%):!_| 00003570 3d a4 42 28 56 25 2c 74 5f 25 29 3a 21 4f 3d a4 |=.B(V%,t_%):!O=.| 00003580 42 28 56 25 2c 7a 5f 25 29 3a 75 5f 25 3d a4 78 |B(V%,z_%):u_%=.x| 00003590 3a e7 75 5f 25 3c 3e a4 42 28 56 25 2c 78 5f 25 |:.u_%<>.B(V%,x_%| 000035a0 29 8c 0d 01 ce 29 49 24 3d 22 54 46 6f 6e 74 22 |)....)I$="TFont"| 000035b0 3a 52 24 3d 22 54 53 79 73 74 65 6d 22 3a e7 ac |:R$="TSystem":..| 000035c0 75 5f 25 8c c8 94 49 24 2c 52 24 0d 01 cf 5b 42 |u_%...I$,R$...[B| 000035d0 24 3d a4 4d 28 4b 79 25 29 2b 22 2e 22 3a 49 24 |$=.M(Ky%)+".":I$| 000035e0 3d 42 24 2b 49 24 2b bd 30 3a 52 24 3d 42 24 2b |=B$+I$+.0:R$=B$+| 000035f0 52 24 2b bd 30 3a 42 24 3d 42 24 2b 22 54 65 6d |R$+.0:B$=B$+"Tem| 00003600 70 6c 61 74 65 73 22 2b bd 30 3a c8 99 34 31 2c |plates"+.0:..41,| 00003610 32 35 2c 42 24 2c 49 24 3a c8 99 34 31 2c 32 35 |25,B$,I$:..41,25| 00003620 2c 52 24 2c 42 24 0d 01 d0 07 cd 3a e1 0d 01 d1 |,R$,B$.....:....| 00003630 16 dd f2 4d 5f 28 54 25 2c 74 4a 25 29 c8 8e 74 |...M_(T%,tJ%)..t| 00003640 4a 25 ca 0d 01 d2 11 c9 31 33 3a f2 52 3a f2 58 |J%......13:.R:.X| 00003650 28 56 25 29 0d 01 d3 0e c9 32 37 3a f2 58 28 56 |(V%).....27:.X(V| 00003660 25 29 0d 01 d4 12 c9 33 38 36 3a f2 52 3a f2 58 |%).....386:.R:.X| 00003670 28 56 25 29 0d 01 d5 0f c9 33 38 37 3a f2 58 28 |(V%).....387:.X(| 00003680 56 25 29 0d 01 d6 16 c9 33 38 38 3a f2 52 3a f2 |V%).....388:.R:.| 00003690 47 79 3a f2 58 28 56 25 29 0d 01 d7 13 c9 33 38 |Gy:.X(V%).....38| 000036a0 39 3a f2 42 79 3a f2 58 28 56 25 29 0d 01 d8 11 |9:.By:.X(V%)....| 000036b0 7f c8 99 26 34 30 30 64 63 2c 74 4a 25 0d 01 d9 |...&400dc,tJ%...| 000036c0 07 cb 3a e1 0d 01 da 7b dd a4 78 ea 47 25 2c 46 |..:....{..x.G%,F| 000036d0 25 2c 4c 79 25 2c 52 25 3a 46 25 3d a4 41 28 31 |%,Ly%,R%:F%=.A(1| 000036e0 32 38 29 3a 4c 79 25 3d 30 3a f5 c8 99 31 32 2c |28):Ly%=0:...12,| 000036f0 39 2c 4b 79 25 2c 46 25 2c 31 2c 4c 79 25 2c 31 |9,Ky%,F%,1,Ly%,1| 00003700 32 38 2c 22 54 53 79 73 74 65 6d 22 2b bd 30 b8 |28,"TSystem"+.0.| 00003710 2c 2c 2c 52 25 2c 4c 79 25 3a 47 25 3d 28 52 25 |,,,R%,Ly%:G%=(R%| 00003720 3d 31 29 3a fd 28 4c 79 25 3d 2d 31 29 84 47 25 |=1):.(Ly%=-1).G%| 00003730 3a f2 43 28 46 25 2c 31 32 38 29 3a 3d 47 25 0d |:.C(F%,128):=G%.| 00003740 01 db 14 dd f2 6d 79 ea 41 24 3a c8 8e 57 25 21 |.....my.A$:..W%!| 00003750 32 30 ca 0d 01 dc 17 c9 56 25 3a 41 24 3d 22 57 |20......V%:A$="W| 00003760 69 6e 43 68 6f 69 63 65 73 22 0d 01 dd 0e cb 3a |inChoices".....:| 00003770 e7 41 24 3c 3e 22 22 8c 0d 01 de 6c 41 24 3d a4 |.A$<>""....lA$=.| 00003780 45 28 41 24 29 3a 57 25 21 31 36 3d 26 34 30 30 |E(A$):W%!16=&400| 00003790 63 63 3a 57 25 21 31 32 3d 57 25 21 38 3a 24 28 |cc:W%!12=W%!8:$(| 000037a0 57 25 2b 32 38 29 3d 79 24 2b bd 30 3a 24 28 57 |W%+28)=y$+.0:$(W| 000037b0 25 2b 33 36 29 3d 41 24 2b bd 30 3a 57 25 21 30 |%+36)=A$+.0:W%!0| 000037c0 3d 28 33 36 2b a9 28 41 24 29 2b 34 29 80 2d 34 |=(36+.(A$)+4).-4| 000037d0 3a c8 99 26 34 30 30 65 37 2c 31 37 2c 57 25 2c |:..&400e7,17,W%,| 000037e0 57 25 21 34 0d 01 df 07 cd 3a e1 0d 01 e0 0a dd |W%!4.....:......| 000037f0 a4 48 3d 31 39 0d 01 e1 19 dd f2 54 79 28 44 4a |.H=19......Ty(DJ| 00003800 25 2c 63 75 25 29 e7 a4 48 3c 63 75 25 8c 0d 01 |%,cu%)..H<cu%...| 00003810 e2 0d 85 31 2c 22 45 49 4c 31 22 0d 01 e3 0d cd |...1,"EIL1".....| 00003820 3a e7 44 4a 25 3c 31 8c 0d 01 e4 0d 85 31 2c 22 |:.DJ%<1......1,"| 00003830 45 49 4c 32 22 0d 01 e5 69 cd 3a 49 5f 25 3d 44 |EIL2"...i.:I_%=D| 00003840 4a 25 3a de 53 24 28 49 5f 25 2d 31 29 3a de 41 |J%:.S$(I_%-1):.A| 00003850 25 28 49 5f 25 2d 31 29 3a 69 5f 25 3d 30 3a de |%(I_%-1):i_%=0:.| 00003860 59 79 25 32 35 36 3a 51 5f 25 3d 34 30 3a 7a 25 |Yy%256:Q_%=40:z%| 00003870 3d 30 3a 56 79 25 3d 31 32 3a 61 4a 25 3d a3 3a |=0:Vy%=12:aJ%=.:| 00003880 de 45 24 28 51 5f 25 2d 31 29 3a 64 79 25 3d a3 |.E$(Q_%-1):dy%=.| 00003890 3a 55 79 25 3d a3 3a 4f 5f 25 3d b9 3a e1 0d 01 |:Uy%=.:O_%=.:...| 000038a0 e6 1c dd f2 41 28 4a 24 2c 79 4a 25 29 f2 58 79 |....A(J$,yJ%).Xy| 000038b0 28 4a 24 2c 79 4a 25 29 3a e1 0d 01 e7 5a dd f2 |(J$,yJ%):....Z..| 000038c0 58 79 28 4a 24 2c 79 4a 25 29 ea 67 25 2c 4e 25 |Xy(J$,yJ%).g%,N%| 000038d0 2c 43 24 2c 64 24 3a 4e 25 3d 30 3a 67 25 3d b9 |,C$,d$:N%=0:g%=.| 000038e0 3a 43 24 3d c1 4a 24 2c 31 2b a7 4a 24 2c 22 2e |:C$=.J$,1+.J$,".| 000038f0 22 29 29 3a c8 95 4e 25 3c 69 5f 25 80 67 25 3a |")):..N%<i_%.g%:| 00003900 67 25 3d 28 43 24 3c 3e 53 24 28 4e 25 29 29 3a |g%=(C$<>S$(N%)):| 00003910 e7 67 25 8c 0d 01 e8 09 4e 25 2b 3d 31 0d 01 e9 |.g%.....N%+=1...| 00003920 0c cd 3a ce 3a e7 67 25 8c 0d 01 ea 0c e7 4e 25 |..:.:.g%......N%| 00003930 3d 49 5f 25 8c 0d 01 eb 0d 85 31 2c 22 45 49 4c |=I_%......1,"EIL| 00003940 33 22 0d 01 ec 4f cd 3a 53 24 28 4e 25 29 3d 43 |3"...O.:S$(N%)=C| 00003950 24 3a 64 24 3d 22 27 22 2b 4a 24 2b 22 27 20 64 |$:d$="'"+J$+"' d| 00003960 6f 65 73 20 6e 6f 74 20 68 61 76 65 20 61 20 46 |oes not have a F| 00003970 4e 5f 22 3a ea 85 3a ee 85 ea f7 85 3a f2 4d 28 |N_":..:.....:.M(| 00003980 64 24 2b 43 24 2b 22 5f 76 65 72 73 69 6f 6e 22 |d$+C$+"_version"| 00003990 29 0d 01 ed 52 41 25 28 4e 25 29 3d a0 28 22 46 |)...RA%(N%)=.("F| 000039a0 4e 5f 22 2b 43 24 2b 22 5f 76 65 72 73 69 6f 6e |N_"+C$+"_version| 000039b0 22 29 3a f7 85 3a 69 5f 25 2b 3d 31 3a ea 85 3a |"):..:i_%+=1:..:| 000039c0 ee 85 ea f7 85 3a f2 4d 28 64 24 2b 22 5f 68 61 |.....:.M(d$+"_ha| 000039d0 72 64 5f 69 6e 69 74 69 61 6c 69 73 65 5f 22 2b |rd_initialise_"+| 000039e0 43 24 29 0d 01 ee 21 e7 a0 28 22 46 4e 5f 68 61 |C$)...!..("FN_ha| 000039f0 72 64 5f 69 6e 69 74 69 61 6c 69 73 65 5f 22 2b |rd_initialise_"+| 00003a00 43 24 29 8c 0d 01 ef 11 85 31 2c 22 45 49 4c 35 |C$)......1,"EIL5| 00003a10 20 22 2b 4a 24 0d 01 f0 08 cd 3a f7 85 0d 01 f1 | "+J$.....:.....| 00003a20 12 cd 3a e7 79 4a 25 3e 41 25 28 4e 25 29 8c 0d |..:.yJ%>A%(N%)..| 00003a30 01 f2 11 85 31 2c 22 45 49 4c 34 20 22 2b 4a 24 |....1,"EIL4 "+J$| 00003a40 0d 01 f3 07 cd 3a e1 0d 01 f4 17 dd a4 5a 28 67 |.....:.......Z(g| 00003a50 24 29 ea 85 3a ee 85 ea f7 85 3a f2 65 79 0d 01 |$)..:.....:.ey..| 00003a60 f5 0a 3d a0 28 67 24 29 0d 01 f6 0d dd f2 65 79 |..=.(g$)......ey| 00003a70 e7 4f 5f 25 8c 0d 01 f7 2d 85 9f 2c f6 24 2b 22 |.O_%....-..,.$+"| 00003a80 20 28 65 76 61 6c 75 61 74 69 6e 67 20 60 22 2b | (evaluating `"+| 00003a90 67 24 2b 22 27 20 5b 22 2b c3 28 9e 29 2b 22 5d |g$+"' ["+.(.)+"]| 00003aa0 29 22 0d 01 f8 0a cc 85 9f 2c f6 24 0d 01 f9 07 |)".......,.$....| 00003ab0 cd 3a e1 0d 01 fa 2b dd a4 55 28 41 25 29 ea 53 |.:....+..U(A%).S| 00003ac0 24 3a c8 95 3f 41 25 3a 53 24 2b 3d bd 28 3f 41 |$:..?A%:S$+=.(?A| 00003ad0 25 29 3a 41 25 2b 3d 31 3a ce 3a 3d 53 24 0d 01 |%):A%+=1:.:=S$..| 00003ae0 fb 3b dd a4 47 79 28 41 25 2c 42 25 29 ea 53 24 |.;..Gy(A%,B%).S$| 00003af0 3a c8 95 42 25 3e 3d 31 80 3f 41 25 3a 53 24 2b |:..B%>=1.?A%:S$+| 00003b00 3d bd 28 3f 41 25 29 3a 41 25 2b 3d 31 3a 42 25 |=.(?A%):A%+=1:B%| 00003b10 2d 3d 31 3a ce 3a 3d 53 24 0d 01 fc 2e dd a4 4d |-=1:.:=S$......M| 00003b20 28 41 25 29 ea 53 24 3a c8 95 3f 41 25 3e 33 31 |(A%).S$:..?A%>31| 00003b30 3a 53 24 2b 3d bd 28 3f 41 25 29 3a 41 25 2b 3d |:S$+=.(?A%):A%+=| 00003b40 31 3a ce 3a 3d 53 24 0d 01 fd 21 dd f2 73 28 41 |1:.:=S$...!..s(A| 00003b50 25 2c 53 24 29 24 41 25 3d 53 24 3a 41 25 3f a9 |%,S$)$A%=S$:A%?.| 00003b60 28 53 24 29 3d 30 3a e1 0d 01 fe 1d dd f2 5a 79 |(S$)=0:.......Zy| 00003b70 28 41 25 2c 53 24 2c 42 25 29 e7 a9 28 53 24 29 |(A%,S$,B%)..(S$)| 00003b80 3c 3d 42 25 8c 0d 01 ff 28 24 41 25 3d c0 53 24 |<=B%....($A%=.S$| 00003b90 2c 42 25 2d 31 29 3a 41 25 3f 28 42 25 2d 31 29 |,B%-1):A%?(B%-1)| 00003ba0 3d 97 28 c1 53 24 2c 42 25 2c 31 29 29 0d 02 00 |=.(.S$,B%,1))...| 00003bb0 16 cc 24 41 25 3d 53 24 3a 41 25 3f a9 28 53 24 |..$A%=S$:A%?.(S$| 00003bc0 29 3d 30 0d 02 01 07 cd 3a e1 0d 02 02 10 dd f2 |)=0.....:.......| 00003bd0 4d 28 57 24 29 e7 64 79 25 8c 0d 02 03 09 e7 55 |M(W$).dy%......U| 00003be0 79 25 8c 0d 02 04 16 85 9f 2c f6 24 2b 22 20 5b |y%.......,.$+" [| 00003bf0 22 2b c3 9e 2b 22 5d 2e 22 0d 02 05 0a cc 85 9f |"+..+"].".......| 00003c00 2c f6 24 0d 02 06 05 cd 0d 02 07 0b cc e7 ac 61 |,.$............a| 00003c10 4a 25 8c 0d 02 08 0c e7 7a 25 3d 51 5f 25 8c 0d |J%......z%=Q_%..| 00003c20 02 09 26 45 28 51 5f 25 2d 31 29 3d 22 45 72 72 |..&E(Q_%-1)="Err| 00003c30 6f 72 73 20 74 6f 6f 20 64 65 65 70 21 21 21 21 |ors too deep!!!!| 00003c40 21 22 3a f2 78 0d 02 0a 13 cd 3a e7 c2 57 24 2c |!":.x.....:..W$,| 00003c50 32 29 3d 22 3a 20 22 8c 0d 02 0b 13 57 24 3d c0 |2)=": ".....W$=.| 00003c60 57 24 2c a9 28 57 24 29 2d 32 29 0d 02 0c 0b cd |W$,.(W$)-2).....| 00003c70 3a e7 55 79 25 8c 0d 02 0d 0d 45 24 28 7a 25 29 |:.Uy%.....E$(z%)| 00003c80 3d f6 24 0d 02 0e 0b cc e7 7a 25 3d 30 8c 0d 02 |=.$......z%=0...| 00003c90 0f 4a 45 24 28 7a 25 29 3d 22 45 72 72 6f 72 20 |.JE$(z%)="Error | 00003ca0 60 22 2b f6 24 2b 22 27 20 28 6c 69 6e 65 20 22 |`"+.$+"' (line "| 00003cb0 3a 45 24 28 7a 25 29 2b 3d c3 28 9e 29 2b 22 29 |:E$(z%)+=.(.)+")| 00003cc0 20 69 6e 20 22 3a 45 24 28 7a 25 29 2b 3d 22 60 | in ":E$(z%)+="`| 00003cd0 22 2b 57 24 2b 22 27 22 0d 02 10 16 cc 45 24 28 |"+W$+"'".....E$(| 00003ce0 7a 25 29 3d 22 60 22 2b 57 24 2b 22 27 22 0d 02 |z%)="`"+W$+"'"..| 00003cf0 11 05 cd 0d 02 12 11 cd 3a 7a 25 2b 3d 31 3a 85 |........:z%+=1:.| 00003d00 9f 2c 22 22 0d 02 13 05 cd 0d 02 14 07 cd 3a e1 |.,""..........:.| 00003d10 0d 02 15 13 dd f2 78 ea 6f 25 2c 6c 24 3a e7 64 |......x.o%,l$:.d| 00003d20 79 25 8c 0d 02 16 09 e7 55 79 25 8c 0d 02 17 20 |y%......Uy%.... | 00003d30 f2 56 28 9f 2c f6 24 2b 22 20 5b 22 2b c3 28 9e |.V(.,.$+" ["+.(.| 00003d40 29 2b 22 5d 2e 22 29 3a f2 53 3a e0 0d 02 18 15 |)+"]."):.S:.....| 00003d50 cc f2 56 28 9f 2c f6 24 29 3a e7 9f 3d 4e 5f 25 |..V(.,.$):..=N_%| 00003d60 8c 0d 02 19 08 f2 53 3a e0 0d 02 1a 05 cd 0d 02 |......S:........| 00003d70 1b 05 cd 0d 02 1c 0d cc e7 56 79 25 3d 2d 32 8c |.........Vy%=-2.| 00003d80 0d 02 1d 0a e7 7a 25 3e 30 8c 0d 02 1e 0d 85 a2 |.....z%>0.......| 00003d90 9f 2c 45 24 28 30 29 0d 02 1f 0b cc 85 a2 9f 2c |.,E$(0)........,| 00003da0 f6 24 0d 02 20 07 cd 3a e0 0d 02 21 0e cd 3a e7 |.$.. ..:...!..:.| 00003db0 56 79 25 3d 2d 33 8c 0d 02 22 38 24 59 79 25 3d |Vy%=-3..."8$Yy%=| 00003dc0 22 54 41 53 4b 22 3a c8 99 26 34 30 30 63 30 2c |"TASK":..&400c0,| 00003dd0 32 30 30 2c 21 59 79 25 2c 22 4c 69 62 48 61 6e |200,!Yy%,"LibHan| 00003de0 64 6c 65 72 22 2b bd 28 30 29 3a e7 7a 25 8c 0d |dler"+.(0):.z%..| 00003df0 02 23 1a e3 6f 25 3d 30 b8 7a 25 2d 31 3a e7 6f |.#..o%=0.z%-1:.o| 00003e00 25 3c 28 7a 25 2d 31 29 8c 0d 02 24 14 f2 67 28 |%<(z%-1)...$..g(| 00003e10 45 24 28 6f 25 29 2b 22 20 69 6e 22 29 0d 02 25 |E$(o%)+" in")..%| 00003e20 0f cc f2 67 28 45 24 28 6f 25 29 29 0d 02 26 09 |...g(E$(o%))..&.| 00003e30 cd 3a ed 6f 25 0d 02 27 1e cc f2 67 28 f6 24 2b |.:.o%..'...g(.$+| 00003e40 22 20 28 6c 69 6e 65 20 22 2b c3 28 9e 29 2b 22 |" (line "+.(.)+"| 00003e50 29 22 29 0d 02 28 10 cd 3a c8 99 26 36 30 30 64 |)")..(..:..&600d| 00003e60 64 3a e0 0d 02 29 0e cd 3a e7 56 79 25 3e 3d 30 |d:...)..:.Vy%>=0| 00003e70 8c 0d 02 2a 08 eb 56 79 25 0d 02 2b 27 cd 3a f1 |...*..Vy%..+'.:.| 00003e80 22 41 6e 20 65 72 72 6f 72 20 68 61 73 20 6f 63 |"An error has oc| 00003e90 63 75 72 65 64 2e 2e 2e 22 3a f1 3a e7 7a 25 8c |cured...":.:.z%.| 00003ea0 0d 02 2c 36 e3 6f 25 3d 30 b8 7a 25 2d 31 3a fb |..,6.o%=0.z%-1:.| 00003eb0 28 28 37 2d 28 6f 25 3c 3c 31 29 29 80 36 29 2b |((7-(o%<<1)).6)+| 00003ec0 31 3a f1 45 24 28 6f 25 29 3b 3a e7 6f 25 3c 28 |1:.E$(o%);:.o%<(| 00003ed0 7a 25 2d 31 29 8c 0d 02 2d 0c f1 22 20 69 6e 20 |z%-1)...-.." in | 00003ee0 22 3b 0d 02 2e 09 cd 3a ed 6f 25 0d 02 2f 1b cc |";.....:.o%../..| 00003ef0 f1 f6 24 3b 22 20 28 6c 69 6e 65 20 22 3b c3 28 |..$;" (line ";.(| 00003f00 9e 29 3b 22 29 22 0d 02 30 0c cd 3a f1 3a fb 37 |.);")"..0..:.:.7| 00003f10 3a e0 0d 02 31 07 cd 3a e1 0d 02 32 66 dd f2 67 |:...1..:...2f..g| 00003f20 28 71 24 29 ea 5a 4a 25 3a 5a 4a 25 3d 32 30 2b |(q$).ZJ%:ZJ%=20+| 00003f30 28 a9 28 71 24 29 2b 35 29 80 2d 34 3a 21 59 79 |(.(q$)+5).-4:!Yy| 00003f40 25 3d 5a 4a 25 3a 59 79 25 21 31 36 3d 26 38 30 |%=ZJ%:Yy%!16=&80| 00003f50 34 63 30 3a 24 28 59 79 25 2b 32 30 29 3d 71 24 |4c0:$(Yy%+20)=q$| 00003f60 2b bd 28 31 30 29 2b bd 28 30 29 3a c8 99 26 36 |+.(10)+.(0):..&6| 00003f70 30 30 65 37 2c 31 37 2c 59 79 25 2c 30 3a e1 0d |00e7,17,Yy%,0:..| 00003f80 02 33 16 dd a4 5f 43 41 73 6d 5f 76 65 72 73 69 |.3..._CAsm_versi| 00003f90 6f 6e 3d 31 34 0d 02 34 e8 dd a4 5f 68 61 72 64 |on=14..4..._hard| 00003fa0 5f 69 6e 69 74 69 61 6c 69 73 65 5f 43 41 73 6d |_initialise_CAsm| 00003fb0 f2 41 28 22 3c 42 61 73 69 63 56 5f 41 73 73 65 |.A("<BasicV_Asse| 00003fc0 6d 62 6c 65 72 24 4c 69 62 3e 2e 4d 69 73 63 22 |mbler$Lib>.Misc"| 00003fd0 2c 32 37 29 3a c8 99 35 2c 22 52 4d 45 6e 73 75 |,27):..5,"RMEnsu| 00003fe0 72 65 20 43 41 73 73 65 6d 62 6c 65 72 20 30 2e |re CAssembler 0.| 00003ff0 30 38 20 52 4d 4c 6f 61 64 20 53 79 73 74 65 6d |08 RMLoad System| 00004000 3a 4d 6f 64 75 6c 65 73 2e 43 41 73 73 65 6d 62 |:Modules.CAssemb| 00004010 6c 65 72 22 3a c8 99 35 2c 22 49 66 20 22 22 3c |ler":..5,"If ""<| 00004020 43 41 73 6d 24 44 69 72 3e 22 22 3d 22 22 22 22 |CAsm$Dir>""=""""| 00004030 20 54 68 65 6e 20 53 65 74 20 43 41 73 6d 24 44 | Then Set CAsm$D| 00004040 69 72 20 3c 64 3e 2e 4c 69 62 72 61 72 79 2e 43 |ir <d>.Library.C| 00004050 41 73 6d 22 3a 43 41 73 6d 4c 69 62 72 61 72 79 |Asm":CAsmLibrary| 00004060 5f 73 74 64 6c 69 62 3d 31 3a 43 41 73 6d 4c 69 |_stdlib=1:CAsmLi| 00004070 62 72 61 72 79 5f 73 74 64 69 6f 3d 32 0d 02 35 |brary_stdio=2..5| 00004080 af 43 41 73 6d 4c 69 62 72 61 72 79 5f 73 74 72 |.CAsmLibrary_str| 00004090 69 6e 67 3d 33 3a 62 69 3d 34 3a 6c 69 3d 35 3a |ing=3:bi=4:li=5:| 000040a0 72 75 3d 36 3a 45 69 3d 37 3a 43 41 73 6d 4c 69 |ru=6:Ei=7:CAsmLi| 000040b0 62 72 61 72 79 5f 77 69 6d 70 3d 38 3a 56 5f 3d |brary_wimp=8:V_=| 000040c0 39 3a 43 41 73 6d 4c 69 62 72 61 72 79 5f 6d 65 |9:CAsmLibrary_me| 000040d0 73 73 61 67 65 3d 31 30 3a 63 6c 3d 31 31 3a 6c |ssage=10:cl=11:l| 000040e0 75 3d 31 32 3a 49 6c 3d 31 33 3a 74 69 3d 31 34 |u=12:Il=13:ti=14| 000040f0 3a 67 75 3d 31 35 3a 5a 69 3d 31 36 3a 51 5f 3d |:gu=15:Zi=16:Q_=| 00004100 31 37 3a 55 75 3d 31 38 3a 52 6c 3d 31 39 3a 59 |17:Uu=18:Rl=19:Y| 00004110 4a 3d 32 30 3a 53 4a 3d 32 31 3a 75 5f 3d 32 32 |J=20:SJ=21:u_=22| 00004120 3a 48 6c 3d 32 33 3a 6d 6c 3d 32 34 0d 02 36 a6 |:Hl=23:ml=24..6.| 00004130 6f 5f 3d 32 35 3a 7a 61 3d 32 36 3a 6b 3d 32 36 |o_=25:za=26:k=26| 00004140 3a 47 4a 3d 30 3a 48 4a 3d 31 3a 57 75 3d 32 3a |:GJ=0:HJ=1:Wu=2:| 00004150 41 4a 3d 33 3a 4d 5f 3d 34 3a 4a 5f 3d 35 3a 48 |AJ=3:M_=4:J_=5:H| 00004160 5f 3d 36 3a 52 69 3d 37 3a 55 61 3d 38 3a 70 79 |_=6:Ri=7:Ua=8:py| 00004170 3d 39 3a 68 3d 31 30 3a 7a 3d 31 31 3a 6c 3d 31 |=9:h=10:z=11:l=1| 00004180 32 3a 41 3d 31 33 3a 5a 3d 31 34 3a 4a 4a 3d 31 |2:A=13:Z=14:JJ=1| 00004190 35 3a 61 79 3d 26 36 64 37 33 34 31 34 33 3a 70 |5:ay=&6d734143:p| 000041a0 25 3d 30 3a 50 79 25 3d 31 33 3a 6a 3d 30 3a 4e |%=0:Py%=13:j=0:N| 000041b0 3d 30 3a 60 3d 31 30 2a 31 30 32 34 3a 66 79 3d |=0:`=10*1024:fy=| 000041c0 60 2b 28 31 2a 31 30 32 34 29 3a 72 79 3d a3 3a |`+(1*1024):ry=.:| 000041d0 3d 30 0d 02 37 41 dd f2 54 5f 28 58 24 29 ea 5a |=0..7A..T_(X$).Z| 000041e0 25 2c 6b 25 2c 54 79 25 2c 4c 25 2c 4f 25 2c 50 |%,k%,Ty%,L%,O%,P| 000041f0 25 2c 55 25 2c 4a 24 3a ea 85 3a ee 85 ea f7 85 |%,U%,J$:..:.....| 00004200 3a c8 99 26 34 30 30 65 63 2c 63 79 25 2c 2d 31 |:..&400ec,cy%,-1| 00004210 3a f2 48 0d 02 38 52 63 79 25 3d 93 2d 33 32 37 |:.H..8Rcy%=.-327| 00004220 36 38 3a c8 99 26 34 30 30 65 63 2c 63 79 25 2b |68:..&400ec,cy%+| 00004230 33 32 37 36 38 2c 2d 31 b8 4c 25 3a 4c 25 2b 3d |32768,-1.L%:L%+=| 00004240 33 32 37 36 38 3a 4f 25 3d 63 79 25 2b 33 32 37 |32768:O%=cy%+327| 00004250 36 38 3a 50 25 3d 30 3a 55 25 3d 31 34 3a e7 4f |68:P%=0:U%=14:.O| 00004260 25 3d 4c 25 8c 0d 02 39 2f 85 31 2c 22 4e 6f 74 |%=L%...9/.1,"Not| 00004270 20 65 6e 6f 75 67 68 20 6d 65 6d 6f 72 79 20 74 | enough memory t| 00004280 6f 20 73 74 61 72 74 20 61 70 70 6c 69 63 61 74 |o start applicat| 00004290 69 6f 6e 22 0d 02 3a 0d cd 3a e7 70 25 3c 3e 30 |ion"..:..:.p%<>0| 000042a0 8c 0d 02 3b 0d 85 31 2c 22 45 49 43 31 22 0d 02 |...;..1,"EIC1"..| 000042b0 3c 20 cd 3a de 71 5f 25 6b 2a 38 3a de 46 24 28 |< .:.q_%k*8:.F$(| 000042c0 6b 29 3a e7 a4 68 5f 44 45 46 41 55 4c 54 0d 02 |k):..h_DEFAULT..| 000042d0 3d 33 c8 95 58 24 3c 3e 22 22 3a 4a 24 3d c0 58 |=3..X$<>"":J$=.X| 000042e0 24 2c a7 58 24 2c 22 2c 22 29 2d 31 29 3a ea 85 |$,.X$,",")-1):..| 000042f0 3a ee 85 ea f7 85 3a f2 4d 28 22 45 49 43 32 22 |:.....:.M("EIC2"| 00004300 29 0d 02 3e 47 6b 25 3d a0 28 22 43 41 73 6d 4c |)..>Gk%=.("CAsmL| 00004310 69 62 72 61 72 79 5f 22 2b 4a 24 29 3a f7 85 3a |ibrary_"+J$):..:| 00004320 54 79 25 3d 71 5f 25 3a 5a 25 3d 54 79 25 2b 28 |Ty%=q_%:Z%=Ty%+(| 00004330 70 25 2a 38 29 3a c8 95 5a 25 3e 54 79 25 3a e7 |p%*8):..Z%>Ty%:.| 00004340 21 54 79 25 3d 6b 25 8c 0d 02 3f 0c 54 79 25 3d |!Ty%=k%...?.Ty%=| 00004350 5a 25 2b 31 0d 02 40 0b cc 54 79 25 2b 3d 38 0d |Z%+1..@..Ty%+=8.| 00004360 02 41 10 cd 3a ce 3a e7 54 79 25 3d 5a 25 8c 0d |.A..:.:.Ty%=Z%..| 00004370 02 42 0b e7 70 25 3e 3d 6b 8c 0d 02 43 0d 85 31 |.B..p%>=k...C..1| 00004380 2c 22 45 49 43 33 22 0d 02 44 3d cd 3a 21 5a 25 |,"EIC3"..D=.:!Z%| 00004390 3d 6b 25 3a 46 24 28 6b 25 29 3d 4a 24 3a 70 25 |=k%:F$(k%)=J$:p%| 000043a0 2b 3d 31 3a 4f 25 3d 63 79 25 2b 33 32 37 36 38 |+=1:O%=cy%+32768| 000043b0 3a 50 25 3d 30 3a e7 a4 5a 28 22 46 4e 68 5f 22 |:P%=0:..Z("FNh_"| 000043c0 2b 4a 24 29 0d 02 45 47 cd 3a 58 24 3d c1 58 24 |+J$)..EG.:X$=.X$| 000043d0 2c a9 28 4a 24 29 2b 32 29 3a c8 95 97 28 58 24 |,.(J$)+2):...(X$| 000043e0 29 3d 97 28 22 20 22 29 3a 58 24 3d c1 58 24 2c |)=.(" "):X$=.X$,| 000043f0 32 29 3a ce 3a ce 3a c8 99 26 34 30 30 65 63 2c |2):.:.:..&400ec,| 00004400 63 79 25 2c 2d 31 3a f7 85 3a e1 0d 02 46 1c dd |cy%,-1:..:...F..| 00004410 f2 4a 79 ea 52 25 2c 5a 25 2c 4e 25 2c 45 79 25 |.Jy.R%,Z%,N%,Ey%| 00004420 3a e7 70 25 3d 30 8c 0d 02 47 0f e7 a4 68 5f 44 |:.p%=0...G...h_D| 00004430 45 46 41 55 4c 54 0d 02 48 1e cd 3a 45 79 25 3d |EFAULT..H..:Ey%=| 00004440 71 5f 25 3a 4e 25 3d 70 25 3a e7 28 55 25 80 32 |q_%:N%=p%:.(U%.2| 00004450 29 3d 30 8c 0d 02 49 29 de 5a 25 70 25 2a 34 3a |)=0...I).Z%p%*4:| 00004460 c8 99 37 39 2c 70 25 2c 5a 25 2b 26 63 30 30 30 |..79,p%,Z%+&c000| 00004470 30 30 30 30 2c 33 2c 2c 45 79 25 2c 38 0d 02 4a |0000,3,,Ey%,8..J| 00004480 89 cd 3a 5b 4f 50 54 55 25 3a 2e 51 79 20 44 43 |..:[OPTU%:.Qy DC| 00004490 44 61 79 3a 44 43 44 52 79 3a 5d 3a c8 95 4e 25 |Day:DCDRy:]:..N%| 000044a0 3e 30 3a 5b 4f 50 54 55 25 3a 44 43 44 21 45 79 |>0:[OPTU%:DCD!Ey| 000044b0 25 3a 44 43 44 45 79 25 21 34 3a 5d 3a 45 79 25 |%:DCDEy%!4:]:Ey%| 000044c0 2b 3d 38 3a 4e 25 2d 3d 31 3a ce 3a 5b 4f 50 54 |+=8:N%-=1:.:[OPT| 000044d0 55 25 3a 44 43 44 30 3a 5d 3a 5b 4f 50 54 55 25 |U%:DCD0:]:[OPTU%| 000044e0 3a 41 4c 49 47 4e 3a 2e 41 79 3a 5d 3a 5a 25 3d |:ALIGN:.Ay:]:Z%=| 000044f0 50 25 3a e7 a4 6a 75 6d 70 62 6c 6f 63 6b 5f 44 |P%:..jumpblock_D| 00004500 45 46 41 55 4c 54 0d 02 4b 49 52 79 3d 28 50 25 |EFAULT..KIRy=(P%| 00004510 2d 5a 25 29 3e 3e 32 3a 4e 25 3d 70 25 3a 45 79 |-Z%)>>2:N%=p%:Ey| 00004520 25 3d 71 5f 25 3a c8 95 4e 25 3e 30 3a 5a 25 3d |%=q_%:..N%>0:Z%=| 00004530 50 25 3a e7 a4 5a 28 22 46 4e 6a 75 6d 70 62 6c |P%:..Z("FNjumpbl| 00004540 6f 63 6b 5f 22 2b 46 24 28 21 45 79 25 29 29 0d |ock_"+F$(!Ey%)).| 00004550 02 4c 25 45 79 25 21 34 3d 28 50 25 2d 5a 25 29 |.L%Ey%!4=(P%-Z%)| 00004560 3e 3e 32 3a 45 79 25 2b 3d 38 3a 4e 25 2d 3d 31 |>>2:Ey%+=8:N%-=1| 00004570 3a ce 3a e1 0d 02 4d 83 dd f2 5f 5f ea 45 79 3a |:.:...M...__.Ey:| 00004580 5b 4f 50 54 55 25 3a 41 4c 49 47 4e 3a 2e 4d 79 |[OPTU%:ALIGN:.My| 00004590 3a 53 54 4d 46 44 28 41 29 21 2c 7b 34 2d 35 2c |:STMFD(A)!,{4-5,| 000045a0 5a 7d 3a 42 4c 20 50 25 2b 28 31 33 3c 3c 32 29 |Z}:BL P%+(13<<2)| 000045b0 3a 2e 45 79 20 44 43 44 51 79 2d 45 79 3a 44 43 |:.Ey DCDQy-Ey:DC| 000045c0 44 41 79 2d 45 79 3a 44 43 44 6a 2d 45 79 3a 44 |DAy-Ey:DCDj-Ey:D| 000045d0 43 44 4e 3a 44 43 44 60 3a 2e 65 3a 44 43 44 30 |CDN:DCD`:.e:DCD0| 000045e0 3a 44 43 44 30 3a 44 43 44 30 3a 44 43 44 30 3a |:DCD0:DCD0:DCD0:| 000045f0 4c 44 52 20 41 2c 65 0d 02 4e bb 4c 44 4d 46 44 |LDR A,e..N.LDMFD| 00004600 28 41 29 21 2c 7b 68 2c 7a 2c 6c 2c 5a 7d 3a 4d |(A)!,{h,z,l,Z}:M| 00004610 4f 56 70 63 2c 5a 3a 42 49 43 20 35 2c 5a 2c 23 |OVpc,Z:BIC 5,Z,#| 00004620 26 66 63 30 30 30 30 30 33 3a 4c 44 4d 49 41 35 |&fc000003:LDMIA5| 00004630 2c 7b 30 2d 34 7d 3a 41 44 44 30 2c 30 2c 35 3a |,{0-4}:ADD0,0,5:| 00004640 41 44 44 31 2c 31 2c 35 3a 41 44 44 32 2c 32 2c |ADD1,1,5:ADD2,2,| 00004650 35 3a 4d 4f 56 35 2c 23 30 3a 53 57 49 20 26 66 |5:MOV5,#0:SWI &f| 00004660 63 62 38 30 3a 53 54 52 76 63 30 2c 65 2b 28 31 |cb80:STRvc0,e+(1| 00004670 3c 3c 32 29 3a 53 54 52 76 63 31 2c 65 2b 28 33 |<<2):STRvc1,e+(3| 00004680 3c 3c 32 29 3a 4c 44 4d 46 44 28 41 29 21 2c 7b |<<2):LDMFD(A)!,{| 00004690 34 2d 35 2c 70 63 7d 3a 2e 69 3a a4 4a 3a 4d 4f |4-5,pc}:.i:.J:MO| 000046a0 56 32 2c 5a 3a 4d 4f 56 31 2c 41 3a 4d 4f 56 30 |V2,Z:MOV1,A:MOV0| 000046b0 2c 68 0d 02 4f 71 53 57 49 20 26 66 63 62 38 31 |,h..OqSWI &fcb81| 000046c0 3a 4d 4f 56 76 63 31 2c 23 30 3a 53 54 52 76 63 |:MOVvc1,#0:STRvc| 000046d0 31 2c 65 2b 28 33 3c 3c 32 29 3a 4d 4f 56 70 63 |1,e+(3<<2):MOVpc| 000046e0 2c 32 3a 4d 4f 56 31 33 2c 31 32 3a 5d 3a 6a 3d |,2:MOV13,12:]:j=| 000046f0 50 25 3a f2 57 3a f2 6a 3a 4e 3d 28 4e 2b 33 29 |P%:.W:.j:N=(N+3)| 00004700 80 2d 34 3a 50 25 2b 3d 4e 2d 31 3a 4f 25 2b 3d |.-4:P%+=N-1:O%+=| 00004710 4e 2d 31 3a 5b 4f 50 54 55 25 3a 44 43 42 30 3a |N-1:[OPTU%:DCB0:| 00004720 5d 3a e1 0d 02 50 1c dd f2 68 5f e7 50 25 3c 3e |]:...P...h_.P%<>| 00004730 33 32 37 36 38 8c 85 31 2c 22 45 49 43 34 22 0d |32768..1,"EIC4".| 00004740 02 51 6f 5b 4f 50 54 55 25 3a 41 44 52 34 2c 6d |.Qo[OPTU%:ADR4,m| 00004750 3a 4d 4f 56 35 2c 23 63 79 3a 53 57 49 20 26 66 |:MOV5,#cy:SWI &f| 00004760 63 62 38 30 3a a4 52 28 22 76 63 22 2c 32 2c 74 |cb80:.R("vc",2,t| 00004770 75 29 3a 42 76 63 20 71 79 3a 53 57 49 20 34 33 |u):Bvc qy:SWI 43| 00004780 3a 2e 6d 3a 44 43 44 51 79 2d 6d 3a 44 43 44 41 |:.m:DCDQy-m:DCDA| 00004790 79 2d 6d 3a 44 43 44 6a 2d 6d 3a 44 43 44 4e 3a |y-m:DCDj-m:DCDN:| 000047a0 44 43 44 60 3a 44 43 44 66 79 3a 5d 3a e1 0d 02 |DCD`:DCDfy:]:...| 000047b0 52 73 dd a4 4a 5b 4f 50 54 55 25 3a 53 54 4d 46 |Rs..J[OPTU%:STMF| 000047c0 44 28 41 29 21 2c 7b 68 2c 7a 2c 6c 2c 5a 7d 3a |D(A)!,{h,z,l,Z}:| 000047d0 4d 4f 56 20 7a 2c 70 63 3a a4 52 28 22 22 2c 5a |MOV z,pc:.R("",Z| 000047e0 2c 65 29 3a 53 54 52 20 41 2c 5b 5a 5d 2c 23 34 |,e):STR A,[Z],#4| 000047f0 3a 4c 44 4d 49 41 28 5a 29 21 2c 7b 68 2c 6c 2c |:LDMIA(Z)!,{h,l,| 00004800 41 7d 3a 80 20 7a 2c 7a 2c 23 26 66 63 30 30 30 |A}:. z,z,#&fc000| 00004810 30 30 33 3a 84 52 20 5a 2c 5a 2c 7a 3a 5d 3a 3d |003:.R Z,Z,z:]:=| 00004820 30 0d 02 53 5e dd f2 6b 79 28 76 79 25 2c 42 79 |0..S^..ky(vy%,By| 00004830 25 2c 4c 4a 25 29 f2 41 28 22 3c 42 61 73 69 63 |%,LJ%).A("<Basic| 00004840 56 24 4c 69 62 3e 2e 48 65 61 70 22 2c 38 29 3a |V$Lib>.Heap",8):| 00004850 f2 41 28 22 3c 42 61 73 69 63 56 24 4c 69 62 3e |.A("<BasicV$Lib>| 00004860 2e 4d 65 73 73 61 67 65 22 2c 31 29 3a e7 a4 6d |.Message",1):..m| 00004870 28 76 79 25 2c 42 79 25 2c 4c 4a 25 2c 30 29 0d |(vy%,By%,LJ%,0).| 00004880 02 54 0f d6 4d 79 3a ee 85 d6 69 3a f2 78 0d 02 |.T..My:...i:.x..| 00004890 55 05 e1 0d 02 56 54 dd a4 6d 28 76 79 25 2c 42 |U....VT..m(vy%,B| 000048a0 79 25 2c 4c 4a 25 2c 7a 79 25 29 ea 4c 25 2c 4f |y%,LJ%,zy%).L%,O| 000048b0 25 2c 50 25 2c 55 25 2c 75 75 25 2c 48 25 3a ea |%,P%,U%,uu%,H%:.| 000048c0 44 4a 3a ea 64 4a 2c 76 4a 2c 71 4a 2c 69 5f 2c |DJ:.dJ,vJ,qJ,i_,| 000048d0 65 4a 2c 61 4a 3a ea 65 79 2c 49 79 2c 65 69 3a |eJ,aJ:.ey,Iy,ei:| 000048e0 e7 7a 79 25 3d 30 8c 0d 02 57 3a f2 41 28 22 3c |.zy%=0...W:.A("<| 000048f0 42 61 73 69 63 56 24 4c 69 62 3e 2e 48 65 61 70 |BasicV$Lib>.Heap| 00004900 22 2c 38 29 3a f2 41 28 22 3c 42 61 73 69 63 56 |",8):.A("<BasicV| 00004910 24 4c 69 62 3e 2e 4d 65 73 73 61 67 65 22 2c 31 |$Lib>.Message",1| 00004920 29 0d 02 58 7e cd 3a de 79 25 76 79 25 3a 44 4a |)..X~.:.y%vy%:DJ| 00004930 3d 41 3a 64 4a 3d 31 3c 3c 33 31 3a 76 4a 3d 31 |=A:dJ=1<<31:vJ=1| 00004940 3c 3c 33 30 3a 71 4a 3d 31 3c 3c 32 39 3a 69 5f |<<30:qJ=1<<29:i_| 00004950 3d 31 3c 3c 32 38 3a 65 4a 3d 31 3c 3c 32 37 3a |=1<<28:eJ=1<<27:| 00004960 61 4a 3d 31 3c 3c 32 36 3a 65 79 3d 31 3c 3c 31 |aJ=1<<26:ey=1<<1| 00004970 37 3a 49 79 3d 32 35 36 3a 65 69 3d 49 79 2b 65 |7:Iy=256:ei=Iy+e| 00004980 79 3a c8 99 26 36 30 36 63 30 3a ea 85 3a ee 85 |y:..&606c0:..:..| 00004990 ea f7 85 3a c8 99 26 36 30 36 63 31 3a f2 48 0d |...:..&606c1:.H.| 000049a0 02 59 22 48 25 3d 76 79 25 3a 4c 25 3d 79 25 2b |.Y"H%=vy%:L%=y%+| 000049b0 76 79 25 3a e7 42 79 25 3c 3e 30 8c 42 79 25 3d |vy%:.By%<>0.By%=| 000049c0 34 0d 02 5a 22 e3 55 25 3d 38 2b 42 79 25 b8 31 |4..Z".U%=8+By%.1| 000049d0 30 2b 42 79 25 88 32 3a e7 28 55 25 80 34 29 3c |0+By%.2:.(U%.4)<| 000049e0 3e 30 8c 0d 02 5b 11 4f 25 3d 79 25 3a e7 7a 79 |>0...[.O%=y%:.zy| 000049f0 25 3d 31 8c 0d 02 5c 0c 50 25 3d 33 32 37 36 38 |%=1...\.P%=32768| 00004a00 0d 02 5d 09 cc 50 25 3d 30 0d 02 5e 05 cd 0d 02 |..]..P%=0..^....| 00004a10 5f 0f cc 4f 25 3d 30 3a 50 25 3d 79 25 0d 02 60 |_..O%=0:P%=y%..`| 00004a20 0c cd 3a c8 8e 7a 79 25 ca 0d 02 61 30 c9 31 3a |..:..zy%...a0.1:| 00004a30 f2 57 3a f2 68 5f 3a f2 57 3a f2 72 3a f2 57 3a |.W:.h_:.W:.r:.W:| 00004a40 f2 4a 79 3a 6a 3d 50 25 3a f2 57 3a f2 6a 3a 4e |.Jy:j=P%:.W:.j:N| 00004a50 3d 28 4e 2b 33 29 80 2d 34 0d 02 62 28 c9 30 3a |=(N+3).-4..b(.0:| 00004a60 f2 57 3a f2 72 3a f2 57 3a f2 4a 5f 3a f2 57 3a |.W:.r:.W:.J_:.W:| 00004a70 f2 78 79 3a f2 57 3a f2 4a 79 3a f2 57 3a f2 5f |.xy:.W:.Jy:.W:._| 00004a80 5f 0d 02 63 0c c9 32 3a f2 57 3a f2 72 0d 02 64 |_..c..2:.W:.r..d| 00004a90 17 cb 3a e7 55 25 80 34 8c 4c 25 3d 4f 25 8b 4c |..:.U%.4.L%=O%.L| 00004aa0 25 3d 50 25 0d 02 65 0e e7 28 55 25 80 32 29 3d |%=P%..e..(U%.2)=| 00004ab0 30 8c 0d 02 66 17 c8 99 26 64 63 62 39 33 2c 30 |0...f...&dcb93,0| 00004ac0 2c 79 25 2c 4c 25 2d 79 25 0d 02 67 21 cd 3a 48 |,y%,L%-y%..g!.:H| 00004ad0 25 3d 4c 25 2d 79 25 3a ed 55 25 3a c8 99 26 36 |%=L%-y%:.U%:..&6| 00004ae0 30 36 63 31 3a e7 42 79 25 8c 0d 02 68 0b e7 7a |06c1:.By%...h..z| 00004af0 79 25 3d 30 8c 0d 02 69 10 4d 79 2b 3d 79 25 3a |y%=0...i.My+=y%:| 00004b00 69 2b 3d 79 25 0d 02 6a 05 cd 0d 02 6b 11 cd 3a |i+=y%..j....k..:| 00004b10 e7 72 79 80 7a 79 25 3c 3e 32 8c 0d 02 6c 09 e7 |.ry.zy%<>2...l..| 00004b20 42 79 25 8c 0d 02 6d 18 48 25 3d 41 79 3a e7 7a |By%...m.H%=Ay:.z| 00004b30 79 25 8c 48 25 2d 3d 33 32 37 36 38 0d 02 6e 0e |y%.H%-=32768..n.| 00004b40 cc 85 31 2c 22 45 49 43 39 22 0d 02 6f 05 cd 0d |..1,"EIC9"..o...| 00004b50 02 70 0b cd 3a e7 4c 4a 25 8c 0d 02 71 60 f1 22 |.p..:.LJ%...q`."| 00004b60 41 73 73 65 6d 62 6c 65 64 20 74 6f 20 26 22 3b |Assembled to &";| 00004b70 7e 48 25 3b 22 20 3d 20 22 3b 28 28 48 25 2a 31 |~H%;" = ";((H%*1| 00004b80 30 2b 35 31 32 29 81 31 30 32 34 29 2f 31 30 3b |0+512).1024)/10;| 00004b90 22 4b 22 3a f1 22 43 6f 75 6c 64 20 61 73 73 65 |"K":."Could asse| 00004ba0 6d 62 6c 65 20 77 69 74 68 20 22 3b 76 79 25 2d |mble with ";vy%-| 00004bb0 48 25 3b 22 20 6c 65 73 73 22 0d 02 72 09 cd 3a |H%;" less"..r..:| 00004bc0 3d 48 25 0d 02 73 1a dd a4 5f 54 65 6d 70 6c 61 |=H%..s..._Templa| 00004bd0 74 65 5f 76 65 72 73 69 6f 6e 3d 32 31 0d 02 74 |te_version=21..t| 00004be0 62 dd a4 5f 68 61 72 64 5f 69 6e 69 74 69 61 6c |b.._hard_initial| 00004bf0 69 73 65 5f 54 65 6d 70 6c 61 74 65 3a 5a 5f 25 |ise_Template:Z_%| 00004c00 3d a3 3a 6e 25 3d a3 3a 69 25 3d a3 3a 6f 79 25 |=.:n%=.:i%=.:oy%| 00004c10 3d a3 3a 41 4a 25 3d a3 3a 5a 75 25 3d 2d 31 3a |=.:AJ%=.:Zu%=-1:| 00004c20 78 75 25 3d 31 3a 76 79 3d 37 3a 42 79 3d 31 36 |xu%=1:vy=7:By=16| 00004c30 3a 64 79 3d 31 34 3a 73 79 3d 31 35 3a 3d 30 0d |:dy=14:sy=15:=0.| 00004c40 02 75 14 dd f2 48 79 ea 4e 25 3a e7 6e 25 3c 3e |.u...Hy.N%:.n%<>| 00004c50 2d 31 8c 0d 02 76 08 e7 69 25 8c 0d 02 77 13 c8 |-1...v..i%...w..| 00004c60 99 26 36 36 35 63 31 2c 59 25 2c b9 2c a3 0d 02 |.&665c1,Y%,.,...| 00004c70 78 31 cc e3 4e 25 3d 30 b8 32 35 35 3a c8 95 6e |x1..N%=0.255:..n| 00004c80 25 3f 4e 25 3a c8 99 26 36 30 30 38 32 2c 4e 25 |%?N%:..&60082,N%| 00004c90 3a 6e 25 3f 4e 25 2d 3d 31 3a ce 3a ed 4e 25 0d |:n%?N%-=1:.:.N%.| 00004ca0 02 79 05 cd 0d 02 7a 07 cd 3a e1 0d 02 7b 2e dd |.y....z..:...{..| 00004cb0 f2 4c 79 ea 44 25 2c 64 25 2c 51 25 2c 46 25 2c |.Ly.D%,d%,Q%,F%,| 00004cc0 50 24 2c 74 75 25 2c 48 79 25 2c 67 79 25 2c 78 |P$,tu%,Hy%,gy%,x| 00004cd0 25 2c 52 25 3a e7 6e 25 8c 0d 02 7c 08 e7 69 25 |%,R%:.n%...|..i%| 00004ce0 8c 0d 02 7d 15 6f 79 25 3d 28 69 25 3d 2b 31 29 |...}.oy%=(i%=+1)| 00004cf0 3a e7 6f 79 25 8c 0d 02 7e 09 51 25 3d 2b 31 0d |:.oy%...~.Q%=+1.| 00004d00 02 7f 09 cc 51 25 3d 30 0d 02 80 1b cd 3a 48 79 |....Q%=0.....:Hy| 00004d10 25 3d 31 34 30 2b 28 31 3c 3c 32 31 29 3a e7 41 |%=140+(1<<21):.A| 00004d20 4a 25 8c 0d 02 81 1e 4f 24 3d a4 45 28 22 4d 65 |J%.....O$=.E("Me| 00004d30 6e 75 46 6f 6e 74 22 29 3a e7 4f 24 3c 3e 22 22 |nuFont"):.O$<>""| 00004d40 8c 0d 02 82 93 48 79 25 2b 3d 28 31 3c 3c 31 38 |.....Hy%+=(1<<18| 00004d50 29 2b 28 31 3c 3c 31 39 29 3a f2 47 28 67 79 25 |)+(1<<19):.G(gy%| 00004d60 2c 38 2b a9 28 4f 24 29 2b 31 29 3a 24 28 67 79 |,8+.(O$)+1):$(gy| 00004d70 25 2b 38 29 3d 4f 24 3a 67 79 25 21 30 3d 31 36 |%+8)=O$:gy%!0=16| 00004d80 2a bb 28 a4 45 28 22 4d 65 6e 75 46 6f 6e 74 57 |*.(.E("MenuFontW| 00004d90 69 64 74 68 22 29 29 3a 67 79 25 21 34 3d 31 36 |idth")):gy%!4=16| 00004da0 2a bb 28 a4 45 28 22 4d 65 6e 75 46 6f 6e 74 48 |*.(.E("MenuFontH| 00004db0 65 69 67 68 74 22 29 29 3a e7 a4 45 28 22 4d 65 |eight")):..E("Me| 00004dc0 6e 75 46 6f 6e 74 4c 6f 77 52 65 7a 22 29 3d 22 |nuFontLowRez")="| 00004dd0 4e 4f 22 8c 0d 02 83 10 48 79 25 2b 3d 28 31 3c |NO".....Hy%+=(1<| 00004de0 3c 31 37 29 0d 02 84 11 cc 48 79 25 2b 3d 28 31 |<17).....Hy%+=(1| 00004df0 3c 3c 31 36 29 0d 02 85 05 cd 0d 02 86 05 cd 0d |<<16)...........| 00004e00 02 87 2a cd 3a c8 99 26 34 36 35 63 30 2c 59 25 |..*.:..&465c0,Y%| 00004e10 2c 30 2c 30 2c 51 25 2c 51 25 2c 30 2c 30 2c 48 |,0,0,Q%,Q%,0,0,H| 00004e20 79 25 2c 67 79 25 b8 6e 25 0d 02 88 21 cc f2 47 |y%,gy%.n%...!..G| 00004e30 28 6e 25 2c 32 35 36 29 3a c8 99 26 64 63 62 39 |(n%,256):..&dcb9| 00004e40 33 2c 30 2c 6e 25 2c 32 35 36 0d 02 89 05 cd 0d |3,0,n%,256......| 00004e50 02 8a 0a cc 6e 25 3d 2d 31 0d 02 8b 34 cd 3a 50 |....n%=-1...4.:P| 00004e60 24 3d a4 4b 28 22 3c 22 2b 47 24 2b 22 24 44 69 |$=.K("<"+G$+"$Di| 00004e70 72 3e 2e 53 70 72 69 74 65 73 22 29 3a 44 25 3d |r>.Sprites"):D%=| 00004e80 a4 49 28 50 24 29 3a e7 44 25 3e 30 8c 0d 02 8c |.I(P$):.D%>0....| 00004e90 6d 46 25 3d a4 41 28 31 32 38 29 3a 78 25 3d 30 |mF%=.A(128):x%=0| 00004ea0 3a f5 c8 99 31 32 2c 31 32 2c 22 3c 22 2b 2b 47 |:...12,12,"<"++G| 00004eb0 24 2b 22 24 44 69 72 3e 22 2c 46 25 2c 31 2c 78 |$+"$Dir>",F%,1,x| 00004ec0 25 2c 31 32 38 2c 22 53 70 72 69 74 65 73 2a 22 |%,128,"Sprites*"| 00004ed0 b8 2c 2c 2c 52 25 2c 78 25 3a e7 52 25 3d 31 80 |.,,,R%,x%:.R%=1.| 00004ee0 46 25 21 32 30 3d 34 30 38 39 80 44 25 3c 46 25 |F%!20=4089.D%<F%| 00004ef0 21 38 8c 44 25 3d 46 25 21 38 0d 02 8d 6c fd 78 |!8.D%=F%!8...l.x| 00004f00 25 3c 30 3a f2 43 28 46 25 2c 31 32 38 29 3a f2 |%<0:.C(F%,128):.| 00004f10 47 28 65 25 2c 44 25 2b 31 36 29 3a 65 25 21 30 |G(e%,D%+16):e%!0| 00004f20 3d 44 25 2b 31 36 3a 65 25 21 34 3d 30 3a 65 25 |=D%+16:e%!4=0:e%| 00004f30 21 38 3d 31 36 3a 65 25 21 31 32 3d 31 36 3a c8 |!8=16:e%!12=16:.| 00004f40 99 26 32 30 30 32 65 2c 35 32 32 2c 65 25 2c 50 |.&2002e,522,e%,P| 00004f50 24 b8 64 25 3b 51 25 3a 73 24 3d 50 24 3a e7 a4 |$.d%;Q%:s$=P$:..| 00004f60 46 28 51 25 29 8c 0d 02 8e 2a f2 46 28 22 52 65 |F(Q%)....*.F("Re| 00004f70 61 73 6f 6e 22 2c 22 53 70 72 69 74 65 73 22 29 |ason","Sprites")| 00004f80 3a f2 79 28 64 25 29 3a f2 4c 28 34 29 3a f2 53 |:.y(d%):.L(4):.S| 00004f90 0d 02 8f 05 cd 0d 02 90 09 cc 65 25 3d 30 0d 02 |..........e%=0..| 00004fa0 91 1d cd 3a f2 50 5f 28 22 54 65 6d 70 6c 61 74 |...:.P_("Templat| 00004fb0 65 73 22 29 3a e7 65 25 3e 30 8c 0d 02 92 20 f2 |es"):.e%>0.... .| 00004fc0 54 28 22 50 72 6f 67 49 6e 66 6f 22 2c 65 25 2c |T("ProgInfo",e%,| 00004fd0 22 50 72 6f 67 49 6e 66 6f 22 29 0d 02 93 21 cc |"ProgInfo")...!.| 00004fe0 f2 54 28 22 50 72 6f 67 49 6e 66 6f 22 2c 2b 31 |.T("ProgInfo",+1| 00004ff0 2c 22 50 72 6f 67 49 6e 66 6f 22 29 0d 02 94 12 |,"ProgInfo")....| 00005000 cd 3a 73 25 3d 30 3a e7 5a 5f 25 3d 30 8c 0d 02 |.:s%=0:.Z_%=0...| 00005010 95 07 f2 46 79 0d 02 96 23 cd 3a 77 5f 25 3d a4 |...Fy...#.:w_%=.| 00005020 42 79 28 22 51 75 65 72 79 22 2c 74 75 25 2c 2b |By("Query",tu%,+| 00005030 31 29 3a f2 61 5f 3a e1 0d 02 97 2f dd f2 73 79 |1):.a_:..../..sy| 00005040 3a 50 24 3d a4 4b 28 22 3c 22 2b 47 24 2b 22 24 |:P$=.K("<"+G$+"$| 00005050 44 69 72 3e 2e 53 70 72 69 74 65 73 22 29 3a e7 |Dir>.Sprites"):.| 00005060 50 24 3c 3e 73 24 8c 0d 02 98 30 65 25 21 34 3d |P$<>s$....0e%!4=| 00005070 30 3a 65 25 21 38 3d 31 36 3a 65 25 21 31 32 3d |0:e%!8=16:e%!12=| 00005080 31 36 3a c8 99 34 36 2c 35 32 32 2c 65 25 2c 50 |16:..46,522,e%,P| 00005090 24 3a 73 24 3d 50 24 0d 02 99 07 cd 3a e1 0d 02 |$:s$=P$.....:...| 000050a0 9a 2e dd a4 50 72 6f 67 49 6e 66 6f 28 4d 25 29 |....ProgInfo(M%)| 000050b0 f2 73 28 4d 25 21 28 38 38 2b 28 76 79 3c 3c 35 |.s(M%!(88+(vy<<5| 000050c0 29 2b 32 30 29 2c 44 24 29 3a 3d 30 0d 02 9b 1a |)+20),D$):=0....| 000050d0 dd f2 4e 79 28 63 25 2c 62 25 2c 5f 25 2c 54 25 |..Ny(c%,b%,_%,T%| 000050e0 29 c8 8e 54 25 ca 0d 02 9c 21 c9 64 79 2c 73 79 |)..T%....!.dy,sy| 000050f0 3a 63 25 3d a4 47 28 31 2c a4 53 28 30 29 29 3a |:c%=.G(1,.S(0)):| 00005100 e7 5f 25 3c 3e 31 8c 0d 02 9d 06 f2 68 0d 02 9e |._%<>1......h...| 00005110 05 cd 0d 02 9f 0d 7f e7 5f 25 80 32 34 30 8c 0d |........_%.240..| 00005120 02 a0 1f 57 25 21 30 3d 73 25 3a 57 25 21 34 3d |...W%!0=s%:W%!4=| 00005130 31 3a c8 99 26 34 30 30 64 30 2c 2c 57 25 0d 02 |1:..&400d0,,W%..| 00005140 a1 05 cd 0d 02 a2 07 cb 3a e1 0d 02 a3 0e dd f2 |........:.......| 00005150 46 79 e7 73 25 3d 30 8c 0d 02 a4 09 e7 6f 79 25 |Fy.s%=0......oy%| 00005160 8c 0d 02 a5 24 de 4c 5f 25 34 3a 21 4c 5f 25 3d |....$.L_%4:!L_%=| 00005170 30 3a e7 a4 61 28 22 50 72 6f 67 49 6e 66 6f 22 |0:..a("ProgInfo"| 00005180 2c 4c 5f 25 29 0d 02 a6 0b 73 25 3d 21 4c 5f 25 |,L_%)....s%=!L_%| 00005190 0d 02 a7 17 cc e7 a4 68 28 22 50 72 6f 67 49 6e |.......h("ProgIn| 000051a0 66 6f 22 2c 73 25 29 0d 02 a8 05 cd 0d 02 a9 09 |fo",s%).........| 000051b0 cc e7 69 25 8c 0d 02 aa 09 e7 6f 79 25 8c 0d 02 |..i%......oy%...| 000051c0 ab 13 c8 99 26 34 36 35 63 36 2c 59 25 2c 4c 5f |....&465c6,Y%,L_| 000051d0 25 0d 02 ac 13 cc c8 99 26 34 36 35 63 36 2c 59 |%.......&465c6,Y| 000051e0 25 2c 73 25 0d 02 ad 05 cd 0d 02 ae 05 cd 0d 02 |%,s%............| 000051f0 af 07 cd 3a e1 0d 02 b0 57 dd f2 50 5f 28 74 24 |...:....W..P_(t$| 00005200 29 ea 47 4a 25 2c 6b 25 2c 44 25 2c 64 25 2c 51 |).GJ%,k%,D%,d%,Q| 00005210 25 2c 53 25 3a ea 6c 4a 25 2c 50 24 2c 58 79 25 |%,S%:.lJ%,P$,Xy%| 00005220 2c 68 79 25 3a 50 24 3d 22 3c 22 2b 47 24 2b 22 |,hy%:P$="<"+G$+"| 00005230 24 44 69 72 3e 2e 22 2b 74 24 3a 44 25 3d a4 49 |$Dir>."+t$:D%=.I| 00005240 28 50 24 29 3a e7 44 25 3c 3d 30 8c 0d 02 b1 32 |(P$):.D%<=0....2| 00005250 f2 46 28 22 52 65 61 73 6f 6e 22 2c 74 24 29 3a |.F("Reason",t$):| 00005260 f2 46 28 22 53 79 73 22 2c 22 4e 6f 74 20 66 6f |.F("Sys","Not fo| 00005270 75 6e 64 22 29 3a f2 4c 28 34 29 3a f2 53 0d 02 |und"):.L(4):.S..| 00005280 b2 4d cd 3a f2 47 28 6b 25 2c 44 25 29 3a f2 47 |.M.:.G(k%,D%):.G| 00005290 28 58 79 25 2c 44 25 2b 46 29 3a 68 79 25 3d 58 |(Xy%,D%+F):hy%=X| 000052a0 79 25 2b 50 79 3a 6c 4a 25 3d 58 79 25 2b 46 3a |y%+Py:lJ%=Xy%+F:| 000052b0 c8 99 26 36 30 30 64 39 2c 2c 50 24 b8 64 25 3b |..&600d9,,P$.d%;| 000052c0 51 25 3a e7 a4 46 28 51 25 29 8c 0d 02 b3 35 f2 |Q%:..F(Q%)....5.| 000052d0 46 28 22 52 65 61 73 6f 6e 22 2c 22 54 65 6d 70 |F("Reason","Temp| 000052e0 6c 61 74 65 73 22 29 3a f2 79 28 64 25 29 3a f2 |lates"):.y(d%):.| 000052f0 4c 28 34 29 3a c8 99 26 36 30 30 64 61 3a f2 53 |L(4):..&600da:.S| 00005300 0d 02 b4 12 cd 3a ea 85 3a ee 85 ea f7 85 3a f2 |.....:..:.....:.| 00005310 6e 5f 0d 02 b5 51 78 25 3d 30 3a f5 68 79 25 21 |n_...Qx%=0:.hy%!| 00005320 30 3d 97 28 22 2a 22 29 3a c8 99 26 36 30 30 64 |0=.("*"):..&600d| 00005330 62 2c 2c 6c 4a 25 2c 6b 25 2c 6b 25 2b 44 25 2c |b,,lJ%,k%,k%+D%,| 00005340 6e 25 2c 68 79 25 2c 78 25 b8 64 25 2c 2c 47 4a |n%,hy%,x%.d%,,GJ| 00005350 25 2c 2c 2c 2c 78 25 3b 51 25 3a e7 a4 46 28 51 |%,,,,x%;Q%:..F(Q| 00005360 25 29 8c 0d 02 b6 16 f2 4b 28 64 25 29 3a c8 99 |%)......K(d%):..| 00005370 26 36 30 30 64 61 3a f2 53 0d 02 b7 0a cd 3a e7 |&600da:.S.....:.| 00005380 78 25 8c 0d 02 b8 26 e3 51 25 3d 30 b8 31 31 3a |x%....&.Q%=0.11:| 00005390 e7 68 79 25 3f 51 25 3d 31 33 8c 68 79 25 3f 51 |.hy%?Q%=13.hy%?Q| 000053a0 25 3d 30 3a 51 25 3d 31 32 0d 02 b9 30 ed 51 25 |%=0:Q%=12...0.Q%| 000053b0 3a 58 79 25 21 62 79 3d 47 4a 25 2d 6b 25 3a 58 |:Xy%!by=GJ%-k%:X| 000053c0 79 25 21 67 3d 6b 25 3a 53 25 3d a4 76 28 58 79 |y%!g=k%:S%=.v(Xy| 000053d0 25 29 3a e7 53 25 3d 30 8c 0d 02 ba 16 f2 4c 28 |%):.S%=0......L(| 000053e0 31 36 29 3a c8 99 26 36 30 30 64 61 3a f2 53 0d |16):..&600da:.S.| 000053f0 02 bb 17 cd 3a 53 25 21 63 3d 21 75 79 25 3a 21 |....:S%!c=!uy%:!| 00005400 75 79 25 3d 53 25 0d 02 bc 28 cd 3a fd 78 25 3d |uy%=S%...(.:.x%=| 00005410 30 3a f7 85 3a c8 99 26 34 30 30 64 61 3a f2 5a |0:..:..&400da:.Z| 00005420 28 58 79 25 29 3a f2 5a 28 6b 25 29 3a e1 0d 02 |(Xy%):.Z(k%):...| 00005430 bd 21 dd f2 6e 5f c8 99 26 36 30 30 64 61 3a f2 |.!..n_..&600da:.| 00005440 4d 28 22 54 65 6d 70 6c 61 74 65 22 29 3a e1 0d |M("Template"):..| 00005450 02 be 27 dd a4 42 79 28 46 24 2c 5f 75 25 2c 6b |..'..By(F$,_u%,k| 00005460 5f 25 29 3d a4 4a 79 28 46 24 2c 5f 75 25 2c 6b |_%)=.Jy(F$,_u%,k| 00005470 5f 25 2c 22 22 29 0d 02 bf 32 dd a4 4a 79 28 46 |_%,"")...2..Jy(F| 00005480 24 2c 5f 75 25 2c 6b 5f 25 2c 57 24 29 ea 53 25 |$,_u%,k_%,W$).S%| 00005490 2c 6a 4a 25 2c 4a 25 3a 53 25 3d a4 43 28 46 24 |,jJ%,J%:S%=.C(F$| 000054a0 29 3a e7 53 25 3d 30 8c 0d 02 c0 06 f2 53 0d 02 |):.S%=0......S..| 000054b0 c1 22 cd 3a 6a 4a 25 3d 53 25 2b 46 3a 6a 4a 25 |.".:jJ%=S%+F:jJ%| 000054c0 21 36 34 3d 6b 5f 25 3a e7 57 24 3c 3e 22 22 8c |!64=k_%:.W$<>"".| 000054d0 0d 02 c2 12 4a 25 3d a4 5a 28 22 46 4e 22 2b 57 |....J%=.Z("FN"+W| 000054e0 24 29 0d 02 c3 11 cd 3a e7 a4 7a 28 53 25 2c 4a |$).....:..z(S%,J| 000054f0 25 29 8c 0d 02 c4 06 f2 53 0d 02 c5 10 cd 3a f2 |%)......S.....:.| 00005500 61 28 53 25 29 3a 3d 4a 25 0d 02 c6 29 dd f2 54 |a(S%):=J%...)..T| 00005510 28 46 24 2c 6b 5f 25 2c 57 24 29 ea 53 25 2c 4d |(F$,k_%,W$).S%,M| 00005520 25 3a 53 25 3d a4 43 28 46 24 29 3a e7 53 25 3d |%:S%=.C(F$):.S%=| 00005530 30 8c 0d 02 c7 06 f2 53 0d 02 c8 20 cd 3a 4d 25 |0......S... .:M%| 00005540 3d 53 25 2b 46 3a 4d 25 21 36 34 3d 6b 5f 25 3a |=S%+F:M%!64=k_%:| 00005550 e7 57 24 3c 3e 22 22 8c 0d 02 c9 20 4d 25 3d a4 |.W$<>"".... M%=.| 00005560 5a 28 22 46 4e 22 2b 57 24 2b 22 28 22 2b c3 28 |Z("FN"+W$+"("+.(| 00005570 4d 25 29 2b 22 29 22 29 0d 02 ca 07 cd 3a e1 0d |M%)+")").....:..| 00005580 02 cb 23 dd a4 68 28 46 24 2c f8 4a 79 25 29 ea |..#..h(F$,.Jy%).| 00005590 4e 25 3a 3d a4 51 79 28 46 24 2c 4a 79 25 2c 4e |N%:=.Qy(F$,Jy%,N| 000055a0 25 29 0d 02 cc 2a dd a4 51 79 28 46 24 2c f8 4a |%)...*..Qy(F$,.J| 000055b0 79 25 2c f8 69 79 25 29 ea 53 25 2c 4b 25 3a 4b |y%,.iy%).S%,K%:K| 000055c0 25 3d a3 3a e7 4a 79 25 3c 3d 30 8c 0d 02 cd 12 |%=.:.Jy%<=0.....| 000055d0 53 25 3d a4 43 28 46 24 29 3a e7 53 25 8c 0d 02 |S%=.C(F$):.S%...| 000055e0 ce 18 4b 25 3d a4 7a 28 53 25 2c 4a 79 25 29 3a |..K%=.z(S%,Jy%):| 000055f0 e7 4b 25 3d a3 8c 0d 02 cf 13 69 79 25 3d 53 25 |.K%=......iy%=S%| 00005600 21 67 3a f2 61 28 53 25 29 0d 02 d0 05 cd 0d 02 |!g:.a(S%).......| 00005610 d1 09 cc 4b 25 3d b9 0d 02 d2 05 cd 0d 02 d3 09 |...K%=..........| 00005620 cc e7 69 25 8c 0d 02 d4 13 c8 99 26 34 36 35 63 |..i%.......&465c| 00005630 36 2c 59 25 2c 4a 79 25 0d 02 d5 05 cd 0d 02 d6 |6,Y%,Jy%........| 00005640 09 cd 3a 3d 4b 25 0d 02 d7 4d dd a4 60 28 46 24 |..:=K%...M..`(F$| 00005650 29 ea 53 25 2c 74 24 2c 42 5f 25 3a 53 25 3d 21 |).S%,t$,B_%:S%=!| 00005660 75 79 25 3a 42 5f 25 3d a3 3a c8 95 53 25 80 28 |uy%:B_%=.:..S%.(| 00005670 ac 42 5f 25 29 3a 42 5f 25 3d 28 a4 47 79 28 53 |.B_%):B_%=(.Gy(S| 00005680 25 2b 50 79 2c 31 32 29 3d 46 24 29 3a e7 ac 42 |%+Py,12)=F$):..B| 00005690 5f 25 8c 0d 02 d8 0b 53 25 3d 53 25 21 63 0d 02 |_%.....S%=S%!c..| 000056a0 d9 0b cd 3a ce 3a 3d 53 25 0d 02 da 1f dd a4 43 |...:.:=S%......C| 000056b0 28 46 24 29 ea 53 25 3a 53 25 3d a4 60 28 46 24 |(F$).S%:S%=.`(F$| 000056c0 29 3a e7 53 25 3d 30 8c 0d 02 db 19 f2 46 28 22 |):.S%=0......F("| 000056d0 52 65 61 73 6f 6e 22 2c 46 24 29 3a f2 4c 28 33 |Reason",F$):.L(3| 000056e0 29 0d 02 dc 09 cd 3a 3d 53 25 0d 02 dd 14 dd a4 |).....:=S%......| 000056f0 7a 28 53 25 2c f8 4a 79 25 29 e7 69 25 8c 0d 02 |z(S%,.Jy%).i%...| 00005700 de 1d c8 99 26 36 36 35 63 33 2c 59 25 2c 53 25 |....&665c3,Y%,S%| 00005710 2b 46 2c 30 b8 4a 79 25 3b 53 25 0d 02 df 1a cc |+F,0.Jy%;S%.....| 00005720 c8 99 26 36 30 30 63 31 2c 2c 53 25 2b 46 b8 4a |..&600c1,,S%+F.J| 00005730 79 25 3b 53 25 0d 02 e0 14 cd 3a 53 25 3d a4 46 |y%;S%.....:S%=.F| 00005740 28 53 25 29 3a e7 53 25 8c 0d 02 e1 11 f2 4b 28 |(S%):.S%......K(| 00005750 4a 79 25 29 3a 4a 79 25 3d 30 0d 02 e2 09 cd 3a |Jy%):Jy%=0.....:| 00005760 3d 53 25 0d 02 e3 3b dd f2 43 5f 28 4d 25 2c 51 |=S%...;..C_(M%,Q| 00005770 25 2c 4d 79 25 29 ea 4a 25 2c 58 25 3a 58 25 3d |%,My%).J%,X%:X%=| 00005780 41 5f 25 3c 3c 43 5f 25 3a 4a 25 3d 4d 25 21 38 |A_%<<C_%:J%=M%!8| 00005790 2d 4d 25 21 30 3a e7 58 25 3c 3d 4a 25 8c 0d 02 |-M%!0:.X%<=J%...| 000057a0 e4 0a 4d 25 21 30 3d 30 0d 02 e5 15 cc 58 25 3d |..M%!0=0.....X%=| 000057b0 58 25 2d 4a 25 3a e7 4d 79 25 3c 30 8c 0d 02 e6 |X%-J%:.My%<0....| 000057c0 13 4d 79 25 3d 58 25 2b 28 4d 79 25 83 58 25 29 |.My%=X%+(My%.X%)| 000057d0 0d 02 e7 1b cd 3a 4d 25 21 30 3d 28 4d 25 21 30 |.....:M%!0=(M%!0| 000057e0 2b 4d 79 25 2a 51 25 29 83 58 25 0d 02 e8 14 cd |+My%*Q%).X%.....| 000057f0 3a 4d 25 21 38 3d 4d 25 21 30 2b 4a 25 3a e1 0d |:M%!8=M%!0+J%:..| 00005800 02 e9 43 dd f2 46 5f 28 4d 25 2c 51 25 2c 4d 79 |..C..F_(M%,Q%,My| 00005810 25 29 ea 4a 25 2c 58 25 3a 58 25 3d 28 46 79 25 |%).J%,X%:X%=(Fy%| 00005820 3c 3c 44 79 25 29 2d 39 36 3a 4a 25 3d 4d 25 21 |<<Dy%)-96:J%=M%!| 00005830 38 2d 4d 25 21 30 2b 34 38 3a e7 58 25 3c 3d 4a |8-M%!0+48:.X%<=J| 00005840 25 8c 0d 02 ea 16 4d 25 21 38 3d 28 46 79 25 3c |%.....M%!8=(Fy%<| 00005850 3c 44 79 25 29 2d 4a 25 0d 02 eb 15 cc 58 25 3d |<Dy%)-J%.....X%=| 00005860 58 25 2d 4a 25 3a e7 4d 79 25 3c 30 8c 0d 02 ec |X%-J%:.My%<0....| 00005870 13 4d 79 25 3d 58 25 2b 28 4d 79 25 83 58 25 29 |.My%=X%+(My%.X%)| 00005880 0d 02 ed 3d cd 3a 4d 25 21 38 3d 28 46 79 25 3c |...=.:M%!8=(Fy%<| 00005890 3c 44 79 25 29 2d 4d 25 21 38 3a 4d 25 21 38 3d |<Dy%)-M%!8:M%!8=| 000058a0 28 46 79 25 3c 3c 44 79 25 29 2d 28 28 4d 25 21 |(Fy%<<Dy%)-((M%!| 000058b0 38 2b 4d 79 25 2a 51 25 29 83 58 25 29 0d 02 ee |8+My%*Q%).X%)...| 000058c0 19 cd 3a 4d 25 21 30 3d 4d 25 21 38 2d 28 4a 25 |..:M%!0=M%!8-(J%| 000058d0 2d 34 38 29 3a e1 0d 02 ef 3a dd f2 61 28 53 25 |-48):....:..a(S%| 000058e0 29 ea 5a 25 3a 5a 25 3d 75 79 25 3a c8 95 21 5a |).Z%:Z%=uy%:..!Z| 000058f0 25 3c 3e 30 80 21 5a 25 3c 3e 53 25 3a 5a 25 3d |%<>0.!Z%<>S%:Z%=| 00005900 21 5a 25 2b 63 3a ce 3a e7 21 5a 25 3d 53 25 8c |!Z%+c:.:.!Z%=S%.| 00005910 0d 02 f0 1a 21 5a 25 3d 53 25 21 63 3a 53 25 21 |....!Z%=S%!c:S%!| 00005920 63 3d 30 3a f2 5a 28 53 25 29 0d 02 f1 07 cd 3a |c=0:.Z(S%).....:| 00005930 e1 0d 02 f2 11 dd a4 69 28 41 25 29 3d ba 28 79 |.......i(A%)=.(y| 00005940 79 29 0d 02 f3 1b dd a4 76 28 41 25 29 41 25 3d |y)......v(A%)A%=| 00005950 a4 69 28 41 25 29 3a e7 41 25 3d 30 8c 0d 02 f4 |.i(A%):.A%=0....| 00005960 0a f2 4c 28 31 36 29 0d 02 f5 09 cd 3a 3d 41 25 |..L(16).....:=A%| 00005970 0d 02 f6 21 dd f2 4c 5f e7 28 55 25 80 32 29 3d |...!..L_.(U%.2)=| 00005980 30 8c f2 57 5f 28 22 54 65 6d 70 6c 61 74 65 22 |0..W_("Template"| 00005990 29 0d 02 f7 20 5b 4f 50 54 55 25 3a 41 4c 49 47 |)... [OPTU%:ALIG| 000059a0 4e 3a 2e 79 79 3a a4 4a 3a 42 20 6f 79 3a 5d 3a |N:.yy:.J:B oy:]:| 000059b0 e1 0d 02 f8 7c dd a4 5f 44 65 63 6c 61 72 65 5f |....|.._Declare_| 000059c0 4c 6f 63 61 6c 5f 56 61 72 69 61 62 6c 65 73 5f |Local_Variables_| 000059d0 54 65 6d 70 6c 61 74 65 de 75 79 25 34 3a 21 75 |Template.uy%4:!u| 000059e0 79 25 3d 30 3a 50 25 3d 30 3a 5b 4f 50 54 55 25 |y%=0:P%=0:[OPTU%| 000059f0 3a 2e 63 20 44 43 44 30 3a 2e 4e 79 20 44 43 44 |:.c DCD0:.Ny DCD| 00005a00 30 3a 2e 67 20 44 43 44 30 3a 2e 62 79 20 44 43 |0:.g DCD0:.by DC| 00005a10 44 30 3a 2e 50 79 20 44 43 44 30 3a 44 43 44 30 |D0:.Py DCD0:DCD0| 00005a20 3a 44 43 44 30 3a 2e 46 3a 5d 3a 3d 30 0d 02 f9 |:DCD0:.F:]:=0...| 00005a30 38 dd f2 6e 79 28 46 24 2c 72 25 2c 72 5f 25 2c |8..ny(F$,r%,r_%,| 00005a40 62 5f 25 2c f8 69 79 25 29 f2 65 5f 28 46 24 2c |b_%,.iy%).e_(F$,| 00005a50 72 25 2c 72 5f 25 2c 62 5f 25 2c 69 79 25 2c 22 |r%,r_%,b_%,iy%,"| 00005a60 58 22 29 3a e1 0d 02 fa 31 dd f2 65 5f 28 46 24 |X"):....1..e_(F$| 00005a70 2c 72 25 2c 72 5f 25 2c 62 5f 25 2c f8 69 79 25 |,r%,r_%,b_%,.iy%| 00005a80 2c 48 24 29 ea 53 25 3a 53 25 3d a4 43 28 46 24 |,H$).S%:S%=.C(F$| 00005a90 29 3a e7 53 25 8c 0d 02 fb 1d f2 79 5f 28 53 25 |):.S%......y_(S%| 00005aa0 2c 72 25 2c 72 5f 25 2c 62 5f 25 2c 69 79 25 2c |,r%,r_%,b_%,iy%,| 00005ab0 48 24 29 0d 02 fc 0b cc 21 72 25 3d 53 25 0d 02 |H$).....!r%=S%..| 00005ac0 fd 07 cd 3a e1 0d 02 fe 1f dd a4 61 28 46 24 2c |...:.......a(F$,| 00005ad0 72 25 29 ea 4e 25 3a 3d a4 5f 28 46 24 2c 72 25 |r%).N%:=._(F$,r%| 00005ae0 2c 4e 25 29 0d 02 ff 27 dd a4 5f 28 46 24 2c 72 |,N%)...'.._(F$,r| 00005af0 25 2c f8 69 79 25 29 ea 53 25 2c 4b 25 3a 4b 25 |%,.iy%).S%,K%:K%| 00005b00 3d a3 3a e7 21 72 25 3c 3d 30 8c 0d 03 00 12 53 |=.:.!r%<=0.....S| 00005b10 25 3d a4 43 28 46 24 29 3a e7 53 25 8c 0d 03 01 |%=.C(F$):.S%....| 00005b20 17 4b 25 3d a4 65 28 53 25 2c 72 25 29 3a e7 4b |.K%=.e(S%,r%):.K| 00005b30 25 3d a3 8c 0d 03 02 13 69 79 25 3d 53 25 21 67 |%=......iy%=S%!g| 00005b40 3a f2 61 28 53 25 29 0d 03 03 05 cd 0d 03 04 09 |:.a(S%).........| 00005b50 cc 4b 25 3d b9 0d 03 05 05 cd 0d 03 06 09 cc e7 |.K%=............| 00005b60 69 25 8c 0d 03 07 12 c8 99 26 34 36 35 63 36 2c |i%.......&465c6,| 00005b70 59 25 2c 72 25 0d 03 08 05 cd 0d 03 09 09 cd 3a |Y%,r%..........:| 00005b80 3d 4b 25 0d 03 0a 1d dd f2 67 5f 28 53 25 2c 72 |=K%......g_(S%,r| 00005b90 25 29 53 25 3d a4 65 28 53 25 2c 72 25 29 3a e1 |%)S%=.e(S%,r%):.| 00005ba0 0d 03 0b 16 dd a4 65 28 53 25 2c 72 25 29 ea 64 |......e(S%,r%).d| 00005bb0 25 3a e7 69 25 8c 0d 03 0c 1d c8 99 26 36 36 35 |%:.i%.......&665| 00005bc0 63 33 2c 59 25 2c 53 25 2b 46 2c 72 25 b8 64 25 |c3,Y%,S%+F,r%.d%| 00005bd0 3b 53 25 0d 03 0d 19 cc c8 99 26 36 30 30 63 31 |;S%.......&600c1| 00005be0 2c 2c 53 25 2b 46 b8 64 25 3b 53 25 0d 03 0e 1b |,,S%+F.d%;S%....| 00005bf0 cd 3a 21 72 25 3d 64 25 3a 53 25 3d a4 46 28 53 |.:!r%=d%:S%=.F(S| 00005c00 25 29 3a e7 53 25 8c 0d 03 0f 10 f2 4b 28 64 25 |%):.S%......K(d%| 00005c10 29 3a 21 72 25 3d 30 0d 03 10 09 cd 3a 3d 53 25 |):!r%=0.....:=S%| 00005c20 0d 03 11 4c dd f2 79 5f 28 53 25 2c 72 25 2c 72 |...L..y_(S%,r%,r| 00005c30 5f 25 2c 62 5f 25 2c f8 69 79 25 2c 48 24 29 ea |_%,b_%,.iy%,H$).| 00005c40 4d 25 2c 51 25 3a 21 72 25 3d 30 3a 51 25 3d 53 |M%,Q%:!r%=0:Q%=S| 00005c50 25 21 4e 79 3a 53 25 21 4e 79 2b 3d 31 3a 53 25 |%!Ny:S%!Ny+=1:S%| 00005c60 3d a4 76 28 53 25 29 3a e7 53 25 8c 0d 03 12 35 |=.v(S%):.S%....5| 00005c70 4d 25 3d 53 25 2b 46 3a f2 43 5f 28 4d 25 2c 51 |M%=S%+F:.C_(M%,Q| 00005c80 25 2c 72 5f 25 29 3a f2 46 5f 28 4d 25 2b 34 2c |%,r_%):.F_(M%+4,| 00005c90 51 25 2c 62 5f 25 29 3a e7 48 24 3c 3e 22 58 22 |Q%,b_%):.H$<>"X"| 00005ca0 8c 0d 03 13 12 e7 4d 25 21 35 36 80 28 31 3c 3c |......M%!56.(1<<| 00005cb0 38 29 8c 0d 03 14 17 f2 5a 79 28 4d 25 21 37 32 |8)......Zy(M%!72| 00005cc0 2c 48 24 2c 4d 25 21 38 30 29 0d 03 15 15 cc f2 |,H$,M%!80)......| 00005cd0 5a 79 28 4d 25 2b 37 32 2c 48 24 2c 31 32 29 0d |Zy(M%+72,H$,12).| 00005ce0 03 16 05 cd 0d 03 17 20 cd 3a f2 67 5f 28 53 25 |....... .:.g_(S%| 00005cf0 2c 72 25 29 3a 69 79 25 3d 53 25 21 67 3a f2 61 |,r%):iy%=S%!g:.a| 00005d00 28 53 25 29 0d 03 18 07 cd 3a e1 0d 03 19 29 dd |(S%).....:....).| 00005d10 a4 68 5f 44 45 46 41 55 4c 54 ea 85 3a ee 85 ea |.h_DEFAULT..:...| 00005d20 f7 85 3a f2 4d 28 22 40 2e 68 2e 44 45 46 41 55 |..:.M("@.h.DEFAU| 00005d30 4c 54 22 29 0d 03 1a 6e 4a 69 3d 31 36 3a 64 6c |LT")...nJi=16:dl| 00005d40 3d 31 3c 3c 33 30 3a 49 4a 3d 31 3c 3c 32 39 3a |=1<<30:IJ=1<<29:| 00005d50 60 75 3d 30 3a 78 6c 3d 31 3a 4c 61 3d 32 3a 45 |`u=0:xl=1:La=2:E| 00005d60 61 3d 33 3a 43 61 3d 34 3a 59 5f 3d 35 3a 51 61 |a=3:Ca=4:Y_=5:Qa| 00005d70 3d 36 3a 42 4a 3d 37 3a 63 69 3d 38 3a 72 5f 3d |=6:BJ=7:ci=8:r_=| 00005d80 39 3a 44 61 3d 31 30 3a 73 6c 3d 31 3c 3c 30 3a |9:Da=10:sl=1<<0:| 00005d90 63 79 3d 31 3c 3c 31 3a 71 69 3d 31 3c 3c 32 3a |cy=1<<1:qi=1<<2:| 00005da0 3d 30 0d 03 1b 31 dd a4 6a 75 6d 70 62 6c 6f 63 |=0...1..jumpbloc| 00005db0 6b 5f 44 45 46 41 55 4c 54 ea 85 3a ee 85 ea f7 |k_DEFAULT..:....| 00005dc0 85 3a f2 4d 28 22 40 2e 68 2e 44 45 46 41 55 4c |.:.M("@.h.DEFAUL| 00005dd0 54 22 29 0d 03 1c 6d 5b 4f 50 54 55 25 80 50 79 |T")...m[OPTU%.Py| 00005de0 25 3a 2e 75 69 20 44 43 44 78 5f 3a 2e 4f 69 20 |%:.ui DCDx_:.Oi | 00005df0 44 43 44 68 75 3a 2e 60 5f 20 44 43 44 52 5f 3a |DCDhu:.`_ DCDR_:| 00005e00 2e 5f 5f 20 44 43 44 48 69 3a 2e 42 75 20 44 43 |.__ DCDHi:.Bu DC| 00005e10 44 42 5f 3a 2e 55 4a 20 44 43 44 75 6c 3a 2e 68 |DB_:.UJ DCDul:.h| 00005e20 4a 20 44 43 44 4d 69 3a 2e 4d 4a 20 44 43 44 70 |J DCDMi:.MJ DCDp| 00005e30 75 3a 2e 71 79 20 44 43 44 43 69 3a 5d 3a 3d 30 |u:.qy DCDCi:]:=0| 00005e40 0d 03 1d 25 dd a4 68 5f 73 74 64 69 6f ea 85 3a |...%..h_stdio..:| 00005e50 ee 85 ea f7 85 3a f2 4d 28 22 40 2e 68 2e 73 74 |.....:.M("@.h.st| 00005e60 64 69 6f 22 29 0d 03 1e 17 6b 5f 3d 30 3a 49 69 |dio")....k_=0:Ii| 00005e70 3d 31 37 3a 57 69 3d 33 34 3a 3d 30 0d 03 1f 2d |=17:Wi=34:=0...-| 00005e80 dd a4 6a 75 6d 70 62 6c 6f 63 6b 5f 73 74 64 69 |..jumpblock_stdi| 00005e90 6f ea 85 3a ee 85 ea f7 85 3a f2 4d 28 22 40 2e |o..:.....:.M("@.| 00005ea0 68 2e 73 74 64 69 6f 22 29 0d 03 20 98 5b 4f 50 |h.stdio").. .[OP| 00005eb0 54 55 25 80 50 79 25 3a 2e 4b 6c 20 44 43 44 64 |TU%.Py%:.Kl DCDd| 00005ec0 69 3a 2e 46 75 20 44 43 44 72 6c 3a 2e 44 5f 20 |i:.Fu DCDrl:.D_ | 00005ed0 44 43 44 60 6c 3a 2e 67 69 20 44 43 44 58 69 3a |DCD`l:.gi DCDXi:| 00005ee0 2e 43 5f 20 44 43 44 7a 4a 3a 2e 52 75 25 44 43 |.C_ DCDzJ:.Ru%DC| 00005ef0 44 56 75 25 3a 2e 73 75 25 44 43 44 7a 75 25 3a |DVu%:.su%DCDzu%:| 00005f00 2e 77 75 25 44 43 44 4b 75 25 3a 2e 6e 6c 20 44 |.wu%DCDKu%:.nl D| 00005f10 43 44 52 75 3a 2e 51 6c 20 44 43 44 4e 75 3a 2e |CDRu:.Ql DCDNu:.| 00005f20 7a 69 20 44 43 44 77 69 3a 2e 75 4a 20 44 43 44 |zi DCDwi:.uJ DCD| 00005f30 69 69 3a 2e 6f 75 20 44 43 44 4b 69 3a 5d 3a 3d |ii:.ou DCDKi:]:=| 00005f40 30 0d 03 21 27 dd a4 68 5f 73 74 64 6c 69 62 ea |0..!'..h_stdlib.| 00005f50 85 3a ee 85 ea f7 85 3a f2 4d 28 22 40 2e 68 2e |.:.....:.M("@.h.| 00005f60 73 74 64 6c 69 62 22 29 0d 03 22 06 3d 30 0d 03 |stdlib")..".=0..| 00005f70 23 2f dd a4 6a 75 6d 70 62 6c 6f 63 6b 5f 73 74 |#/..jumpblock_st| 00005f80 64 6c 69 62 ea 85 3a ee 85 ea f7 85 3a f2 4d 28 |dlib..:.....:.M(| 00005f90 22 40 2e 68 2e 73 74 64 6c 69 62 22 29 0d 03 24 |"@.h.stdlib")..$| 00005fa0 b3 5b 4f 50 54 55 25 80 50 79 25 3a 2e 5f 79 20 |.[OPTU%.Py%:._y | 00005fb0 44 43 44 62 75 3a 2e 6d 79 20 44 43 44 53 6c 3a |DCDbu:.my DCDSl:| 00005fc0 2e 54 61 20 44 43 44 53 69 3a 2e 69 79 20 44 43 |.Ta DCDSi:.iy DC| 00005fd0 44 47 69 3a 2e 50 4a 20 44 43 44 60 4a 3a 2e 4c |DGi:.PJ DCD`J:.L| 00005fe0 5f 20 44 43 44 58 61 3a 2e 54 6c 20 44 43 44 58 |_ DCDXa:.Tl DCDX| 00005ff0 6c 3a 2e 59 75 20 44 43 44 61 61 3a 2e 71 5f 20 |l:.Yu DCDaa:.q_ | 00006000 44 43 44 45 6c 3a 2e 58 75 20 44 43 44 5f 61 3a |DCDEl:.Xu DCD_a:| 00006010 2e 53 5f 20 44 43 44 79 4a 3a 2e 51 75 20 44 43 |.S_ DCDyJ:.Qu DC| 00006020 44 6d 5f 3a 2e 61 75 20 44 43 44 49 5f 3a 2e 6a |Dm_:.au DCDI_:.j| 00006030 75 20 44 43 44 41 75 3a 2e 6f 6c 20 44 43 44 4e |u DCDAu:.ol DCDN| 00006040 6c 3a 2e 66 6c 20 44 43 44 66 4a 3a 5d 3a 3d 30 |l:.fl DCDfJ:]:=0| 00006050 0d 03 25 27 dd a4 68 5f 73 74 72 69 6e 67 ea 85 |..%'..h_string..| 00006060 3a ee 85 ea f7 85 3a f2 4d 28 22 40 2e 68 2e 73 |:.....:.M("@.h.s| 00006070 74 72 69 6e 67 22 29 0d 03 26 53 50 25 3d 30 3a |tring")..&SP%=0:| 00006080 5b 4f 50 54 55 25 3a 2e 44 75 20 44 43 42 30 3a |[OPTU%:.Du DCB0:| 00006090 2e 65 5f 20 44 43 42 30 3a 2e 42 69 20 44 43 42 |.e_ DCB0:.Bi DCB| 000060a0 30 3a 2e 43 4a 20 44 43 42 30 3a 2e 7a 75 20 44 |0:.CJ DCB0:.zu D| 000060b0 43 42 30 3a 2e 4c 6c 20 44 43 42 30 3a 2e 71 6c |CB0:.Ll DCB0:.ql| 000060c0 20 44 43 42 30 3a 5d 3a 3d 30 0d 03 27 2f dd a4 | DCB0:]:=0..'/..| 000060d0 6a 75 6d 70 62 6c 6f 63 6b 5f 73 74 72 69 6e 67 |jumpblock_string| 000060e0 ea 85 3a ee 85 ea f7 85 3a f2 4d 28 22 40 2e 68 |..:.....:.M("@.h| 000060f0 2e 73 74 72 69 6e 67 22 29 0d 03 28 cc 5b 4f 50 |.string")..(.[OP| 00006100 54 55 25 80 50 79 25 3a 2e 5a 4a 20 44 43 44 54 |TU%.Py%:.ZJ DCDT| 00006110 4a 3a 2e 6c 4a 20 44 43 44 76 6c 3a 2e 4b 4a 20 |J:.lJ DCDvl:.KJ | 00006120 44 43 44 73 5f 3a 2e 65 75 20 44 43 44 4e 61 3a |DCDs_:.eu DCDNa:| 00006130 2e 7a 6c 20 44 43 44 70 69 3a 2e 79 69 20 44 43 |.zl DCDpi:.yi DC| 00006140 44 65 6c 3a 2e 56 61 20 44 43 44 4d 61 3a 2e 70 |Del:.Va DCDMa:.p| 00006150 5f 20 44 43 44 71 75 3a 2e 4f 5f 20 44 43 44 4c |_ DCDqu:.O_ DCDL| 00006160 69 3a 2e 66 69 20 44 43 44 77 5f 3a 2e 6d 69 20 |i:.fi DCDw_:.mi | 00006170 44 43 44 49 75 3a 2e 72 69 20 44 43 44 45 75 3a |DCDIu:.ri DCDEu:| 00006180 2e 5a 75 20 44 43 44 77 75 3a 2e 57 5f 20 44 43 |.Zu DCDwu:.W_ DC| 00006190 44 58 4a 3a 2e 60 79 20 44 43 44 47 75 3a 2e 63 |DXJ:.`y DCDGu:.c| 000061a0 4a 20 44 43 44 5f 69 3a 2e 76 69 20 44 43 44 4d |J DCD_i:.vi DCDM| 000061b0 75 3a 2e 6e 5f 20 44 43 44 51 4a 3a 2e 6a 69 20 |u:.n_ DCDQJ:.ji | 000061c0 44 43 44 48 75 0d 03 29 ee 2e 5a 61 20 44 43 44 |DCDHu..)..Za DCD| 000061d0 79 5f 3a 2e 78 75 20 44 43 44 54 5f 3a 2e 5f 75 |y_:.xu DCDT_:._u| 000061e0 20 44 43 44 59 69 3a 2e 75 75 20 44 43 44 47 6c | DCDYi:.uu DCDGl| 000061f0 3a 2e 56 69 20 44 43 44 66 5f 3a 2e 43 6c 20 44 |:.Vi DCDf_:.Cl D| 00006200 43 44 57 4a 3a 2e 44 69 20 44 43 44 62 5f 3a 2e |CDWJ:.Di DCDb_:.| 00006210 41 69 20 44 43 44 4f 4a 3a 2e 69 6c 20 44 43 44 |Ai DCDOJ:.il DCD| 00006220 6a 4a 3a 2e 77 6c 20 44 43 44 4e 4a 3a 2e 46 69 |jJ:.wl DCDNJ:.Fi| 00006230 20 44 43 44 71 61 3a 2e 4a 6c 20 44 43 44 50 75 | DCDqa:.Jl DCDPu| 00006240 3a 2e 67 6c 20 44 43 44 52 61 3a 2e 4f 6c 20 44 |:.gl DCDRa:.Ol D| 00006250 43 44 67 5f 3a 2e 70 4a 20 44 43 44 69 75 3a 2e |CDg_:.pJ DCDiu:.| 00006260 63 75 20 44 43 44 64 5f 3a 2e 43 75 20 44 43 44 |cu DCDd_:.Cu DCD| 00006270 63 5f 3a 2e 50 5f 20 44 43 44 67 4a 3a 2e 4c 75 |c_:.P_ DCDgJ:.Lu| 00006280 20 44 43 44 46 4a 3a 2e 74 5f 20 44 43 44 7a 5f | DCDFJ:.t_ DCDz_| 00006290 3a 2e 46 6c 20 44 43 44 49 61 3a 2e 6d 4a 20 44 |:.Fl DCDIa:.mJ D| 000062a0 43 44 62 6c 3a 2e 47 5f 20 44 43 44 5f 6c 3a 5d |CDbl:.G_ DCD_l:]| 000062b0 3a 3d 30 0d 03 2a 29 dd a4 68 5f 6d 65 73 73 61 |:=0..*)..h_messa| 000062c0 67 65 ea 85 3a ee 85 ea f7 85 3a f2 4d 28 22 40 |ge..:.....:.M("@| 000062d0 2e 68 2e 6d 65 73 73 61 67 65 22 29 0d 03 2b 06 |.h.message")..+.| 000062e0 3d 30 0d 03 2c 31 dd a4 6a 75 6d 70 62 6c 6f 63 |=0..,1..jumpbloc| 000062f0 6b 5f 6d 65 73 73 61 67 65 ea 85 3a ee 85 ea f7 |k_message..:....| 00006300 85 3a f2 4d 28 22 40 2e 68 2e 6d 65 73 73 61 67 |.:.M("@.h.messag| 00006310 65 22 29 0d 03 2d 45 5b 4f 50 54 55 25 80 50 79 |e")..-E[OPTU%.Py| 00006320 25 3a 2e 6b 79 20 44 43 44 61 5f 3a 2e 41 5f 20 |%:.ky DCDa_:.A_ | 00006330 44 43 44 6c 5f 3a 2e 47 61 20 44 43 44 6d 75 3a |DCDl_:.Ga DCDmu:| 00006340 2e 60 69 20 44 43 44 6e 75 3a 2e 55 5f 20 44 43 |.`i DCDnu:.U_ DC| 00006350 44 79 75 3a 5d 3a 3d 30 0d 03 2e 23 dd a4 68 5f |Dyu:]:=0...#..h_| 00006360 77 69 6d 70 ea 85 3a ee 85 ea f7 85 3a f2 4d 28 |wimp..:.....:.M(| 00006370 22 40 2e 68 2e 77 69 6d 70 22 29 0d 03 2f ca 56 |"@.h.wimp")../.V| 00006380 75 3d 31 32 3a 58 5f 3d 30 3a 50 25 3d 30 3a 5b |u=12:X_=0:P%=0:[| 00006390 4f 50 54 55 25 3a 2e 44 79 20 44 43 42 30 3a 2e |OPTU%:.Dy DCB0:.| 000063a0 5a 6c 20 44 43 42 30 3a 2e 68 79 20 44 43 42 30 |Zl DCB0:.hy DCB0| 000063b0 3a 2e 77 79 20 44 43 42 30 3a 2e 68 69 20 44 43 |:.wy DCB0:.hi DC| 000063c0 42 30 3a 2e 76 5f 20 44 43 42 30 3a 2e 4f 61 20 |B0:.v_ DCB0:.Oa | 000063d0 44 43 42 30 3a 2e 6a 79 20 44 43 42 30 3a 2e 7a |DCB0:.jy DCB0:.z| 000063e0 79 20 44 43 42 30 3a 2e 69 4a 20 44 43 42 30 3a |y DCB0:.iJ DCB0:| 000063f0 2e 5a 5f 20 44 43 42 30 3a 2e 53 75 20 44 43 42 |.Z_ DCB0:.Su DCB| 00006400 30 3a 2e 59 61 20 44 43 42 30 3a 2e 55 6c 20 44 |0:.Ya DCB0:.Ul D| 00006410 43 42 30 3a 2e 6a 5f 20 44 43 42 30 3a 2e 62 4a |CB0:.j_ DCB0:.bJ| 00006420 20 44 43 42 30 3a 2e 73 4a 20 44 43 42 30 3a 5d | DCB0:.sJ DCB0:]| 00006430 3a 50 25 3d 30 3a 5b 4f 50 54 55 25 3a 2e 43 79 |:P%=0:[OPTU%:.Cy| 00006440 20 44 43 42 30 0d 03 30 a6 2e 68 6c 20 44 43 42 | DCB0..0..hl DCB| 00006450 30 3a 2e 74 79 20 44 43 42 30 3a 2e 59 79 20 44 |0:.ty DCB0:.Yy D| 00006460 43 42 30 3a 2e 4b 75 20 44 43 42 30 3a 2e 56 4a |CB0:.Ku DCB0:.VJ| 00006470 20 44 43 42 30 3a 2e 4c 4a 20 44 43 42 30 3a 2e | DCB0:.LJ DCB0:.| 00006480 73 69 20 44 43 42 30 3a 2e 77 61 20 44 43 42 30 |si DCB0:.wa DCB0| 00006490 3a 2e 61 6c 20 44 43 42 30 3a 2e 74 6c 20 44 43 |:.al DCB0:.tl DC| 000064a0 42 30 3a 2e 76 75 20 44 43 42 30 3a 5d 3a 50 25 |B0:.vu DCB0:]:P%| 000064b0 3d 30 3a 5b 4f 50 54 55 25 3a 2e 4d 6c 20 44 43 |=0:[OPTU%:.Ml DC| 000064c0 42 30 3a 2e 4a 75 20 44 43 42 30 3a 2e 57 61 20 |B0:.Ju DCB0:.Wa | 000064d0 44 43 42 30 3a 2e 6b 4a 20 44 43 42 30 3a 2e 4e |DCB0:.kJ DCB0:.N| 000064e0 5f 20 44 43 42 30 3a 5d 3a 3d 30 0d 03 31 2b dd |_ DCB0:]:=0..1+.| 000064f0 a4 6a 75 6d 70 62 6c 6f 63 6b 5f 77 69 6d 70 ea |.jumpblock_wimp.| 00006500 85 3a ee 85 ea f7 85 3a f2 4d 28 22 40 2e 68 2e |.:.....:.M("@.h.| 00006510 77 69 6d 70 22 29 0d 03 32 c7 5b 4f 50 54 55 25 |wimp")..2.[OPTU%| 00006520 80 50 79 25 3a 2e 4b 61 20 44 43 44 57 6c 3a 2e |.Py%:.Ka DCDWl:.| 00006530 6f 4a 20 44 43 44 6b 75 3a 2e 77 4a 20 44 43 44 |oJ DCDku:.wJ DCD| 00006540 66 75 3a 2e 6a 6c 20 44 43 44 55 69 3a 2e 57 79 |fu:.jl DCDUi:.Wy| 00006550 20 44 43 44 74 4a 3a 2e 72 4a 20 44 43 44 70 6c | DCDtJ:.rJ DCDpl| 00006560 3a 2e 45 5f 20 44 43 44 52 4a 3a 2e 42 6c 20 44 |:.E_ DCDRJ:.Bl D| 00006570 43 44 6e 69 3a 2e 6f 79 20 44 43 44 68 5f 3a 2e |CDni:.oy DCDh_:.| 00006580 4a 61 20 44 43 44 73 75 3a 2e 46 61 20 44 43 44 |Ja DCDsu:.Fa DCD| 00006590 59 6c 3a 2e 5f 4a 20 44 43 44 42 61 3a 2e 54 75 |Yl:._J DCDBa:.Tu| 000065a0 20 44 43 44 41 6c 3a 2e 53 61 20 44 43 44 44 6c | DCDAl:.Sa DCDDl| 000065b0 3a 2e 50 69 20 44 43 44 46 5f 3a 2e 50 61 20 44 |:.Pi DCDF_:.Pa D| 000065c0 43 44 54 69 3a 2e 41 61 20 44 43 44 78 4a 3a 2e |CDTi:.Aa DCDxJ:.| 000065d0 6f 69 20 44 43 44 48 61 3a 5d 3a 3d 30 0d 03 33 |oi DCDHa:]:=0..3| 000065e0 19 dd a4 5f 4d 6f 64 65 49 6e 66 6f 5f 76 65 72 |..._ModeInfo_ver| 000065f0 73 69 6f 6e 3d 36 0d 03 34 21 dd a4 5f 68 61 72 |sion=6..4!.._har| 00006600 64 5f 69 6e 69 74 69 61 6c 69 73 65 5f 4d 6f 64 |d_initialise_Mod| 00006610 65 49 6e 66 6f 3d 30 0d 03 35 e7 dd f2 71 79 28 |eInfo=0..5...qy(| 00006620 6c 25 29 c8 99 35 33 2c 6c 25 2c 31 b8 2c 2c 60 |l%)..53,l%,1.,,`| 00006630 5f 25 3a 60 5f 25 2b 3d 31 3a c8 99 35 33 2c 6c |_%:`_%+=1:..53,l| 00006640 25 2c 32 b8 2c 2c 64 5f 25 3a 64 5f 25 2b 3d 31 |%,2.,,d_%:d_%+=1| 00006650 3a c8 99 35 33 2c 6c 25 2c 33 b8 2c 2c 6e 4a 25 |:..53,l%,3.,,nJ%| 00006660 3a 6e 4a 25 2b 3d 31 3a c8 99 35 33 2c 6c 25 2c |:nJ%+=1:..53,l%,| 00006670 34 b8 2c 2c 43 5f 25 3a c8 99 35 33 2c 6c 25 2c |4.,,C_%:..53,l%,| 00006680 35 b8 2c 2c 44 79 25 3a c8 99 35 33 2c 6c 25 2c |5.,,Dy%:..53,l%,| 00006690 36 b8 2c 2c 43 75 25 3a c8 99 35 33 2c 6c 25 2c |6.,,Cu%:..53,l%,| 000066a0 37 b8 2c 2c 44 75 25 3a c8 99 35 33 2c 6c 25 2c |7.,,Du%:..53,l%,| 000066b0 39 b8 2c 2c 50 4a 25 3a 59 4a 25 3d 31 3c 3c 50 |9.,,PJ%:YJ%=1<<P| 000066c0 4a 25 3a c8 99 35 33 2c 6c 25 2c 31 31 b8 2c 2c |J%:..53,l%,11.,,| 000066d0 41 5f 25 3a 41 5f 25 2b 3d 31 3a c8 99 35 33 2c |A_%:A_%+=1:..53,| 000066e0 6c 25 2c 31 32 b8 2c 2c 46 79 25 3a 46 79 25 2b |l%,12.,,Fy%:Fy%+| 000066f0 3d 31 3a 50 75 25 3d 41 5f 25 81 60 5f 25 0d 03 |=1:Pu%=A_%.`_%..| 00006700 36 3e 4a 75 25 3d 46 79 25 81 64 5f 25 3a 48 5f |6>Ju%=Fy%.d_%:H_| 00006710 25 3d 28 41 5f 25 3c 3c 43 5f 25 29 2d 31 3a 50 |%=(A_%<<C_%)-1:P| 00006720 5f 25 3d 28 46 79 25 3c 3c 44 79 25 29 2d 31 3a |_%=(Fy%<<Dy%)-1:| 00006730 59 75 25 3d 33 32 81 59 4a 25 3a e1 0d 03 37 16 |Yu%=32.YJ%:...7.| 00006740 dd a4 5f 57 69 6d 70 5f 76 65 72 73 69 6f 6e 3d |.._Wimp_version=| 00006750 35 30 0d 03 38 2f dd a4 5f 68 61 72 64 5f 69 6e |50..8/.._hard_in| 00006760 69 74 69 61 6c 69 73 65 5f 57 69 6d 70 ea 64 25 |itialise_Wimp.d%| 00006770 3a e7 a4 48 3c 31 32 8c 85 31 2c 22 45 49 57 31 |:..H<12..1,"EIW1| 00006780 22 0d 03 39 49 c8 99 26 34 30 30 66 32 2c 30 b8 |"..9I..&400f2,0.| 00006790 64 25 3a e7 64 25 3d 30 8c 85 31 2c 22 41 70 70 |d%:.d%=0..1,"App| 000067a0 6c 69 63 61 74 69 6f 6e 20 6e 65 65 64 73 20 74 |lication needs t| 000067b0 6f 20 62 65 20 72 75 6e 20 66 72 6f 6d 20 74 68 |o be run from th| 000067c0 65 20 64 65 73 6b 74 6f 70 22 0d 03 3a a6 f2 41 |e desktop"..:..A| 000067d0 28 22 3c 42 61 73 69 63 56 24 4c 69 62 3e 2e 48 |("<BasicV$Lib>.H| 000067e0 65 61 70 22 2c 38 29 3a f2 41 28 22 3c 42 61 73 |eap",8):.A("<Bas| 000067f0 69 63 56 24 4c 69 62 3e 2e 49 6e 74 4d 61 74 68 |icV$Lib>.IntMath| 00006800 22 2c 35 29 3a f2 41 28 22 3c 42 61 73 69 63 56 |",5):.A("<BasicV| 00006810 24 4c 69 62 3e 2e 4d 65 73 73 61 67 65 22 2c 33 |$Lib>.Message",3| 00006820 29 3a f2 41 28 22 3c 42 61 73 69 63 56 24 4c 69 |):.A("<BasicV$Li| 00006830 62 3e 2e 54 65 6d 70 6c 61 74 65 22 2c 37 29 3a |b>.Template",7):| 00006840 f2 41 28 22 3c 42 61 73 69 63 56 24 4c 69 62 3e |.A("<BasicV$Lib>| 00006850 2e 4e 75 6c 6c 52 65 61 73 6f 6e 22 2c 31 29 3a |.NullReason",1):| 00006860 64 79 25 3d a3 3a 61 79 25 3d 33 2a 31 30 32 34 |dy%=.:ay%=3*1024| 00006870 0d 03 3b 9f f2 47 28 66 79 25 2c 61 79 25 29 3a |..;..G(fy%,ay%):| 00006880 61 79 25 2b 3d 66 79 25 3a 4e 79 25 3d 66 79 25 |ay%+=fy%:Ny%=fy%| 00006890 3a f2 47 28 57 25 2c 35 31 32 29 3a 6e 24 3d 22 |:.G(W%,512):n$="| 000068a0 22 3a 75 24 3d 22 22 3a 4f 75 25 3d 30 3a 47 24 |":u$="":Ou%=0:G$| 000068b0 3d 22 41 70 70 6c 69 63 61 74 69 6f 6e 22 3a 44 |="Application":D| 000068c0 24 3d 22 30 2e 30 30 20 28 30 31 2d 4a 61 6e 2d |$="0.00 (01-Jan-| 000068d0 31 39 30 30 29 22 3a 59 25 3d 2d 31 3a 4e 5f 25 |1900)":Y%=-1:N_%| 000068e0 3d 32 34 30 30 3a 79 79 25 3d 32 34 30 31 3a 46 |=2400:yy%=2401:F| 000068f0 75 25 3d 31 36 2a 31 30 32 34 3a 55 24 3d 22 22 |u%=16*1024:U$=""| 00006900 3a 47 75 25 3d b9 3a 4d 75 25 3d 30 3a 3d 30 0d |:Gu%=.:Mu%=0:=0.| 00006910 03 3c 3a dd a4 4b 28 65 24 29 ea 61 25 2c 43 25 |.<:..K(e$).a%,C%| 00006920 2c 5a 24 2c 63 25 2c 62 25 2c 52 4a 25 3a c8 99 |,Z$,c%,b%,RJ%:..| 00006930 26 36 30 30 66 32 2c 32 b8 61 25 3b 43 25 3a e7 |&600f2,2.a%;C%:.| 00006940 28 43 25 80 31 29 3d 30 8c 0d 03 3d 44 c8 99 35 |(C%.1)=0...=D..5| 00006950 33 2c 2d 31 2c 34 b8 2c 2c 63 25 3a c8 99 35 33 |3,-1,4.,,c%:..53| 00006960 2c 2d 31 2c 35 b8 2c 2c 62 25 3a c8 99 35 33 2c |,-1,5.,,b%:..53,| 00006970 2d 31 2c 31 30 b8 2c 2c 52 4a 25 3a e7 63 25 3c |-1,10.,,RJ%:.c%<| 00006980 32 80 62 25 3c 32 80 52 4a 25 3d 30 8c 0d 03 3e |2.b%<2.RJ%=0...>| 00006990 0b 5a 24 3d 22 32 33 22 0d 03 3f 0e cc 5a 24 3d |.Z$="23"..?..Z$=| 000069a0 a4 4d 28 61 25 29 0d 03 40 16 cd 3a 61 25 3d 8e |.M(a%)..@..:a%=.| 000069b0 28 65 24 2b 5a 24 29 3a e7 61 25 8c 0d 03 41 0f |(e$+Z$):.a%...A.| 000069c0 d9 23 61 25 3a 65 24 2b 3d 5a 24 0d 03 42 05 cd |.#a%:e$+=Z$..B..| 000069d0 0d 03 43 09 cd 3a 3d 65 24 0d 03 44 17 dd a4 46 |..C..:=e$..D...F| 000069e0 28 48 79 25 29 3d 28 48 79 25 80 31 29 3c 3e 30 |(Hy%)=(Hy%.1)<>0| 000069f0 0d 03 45 15 dd f2 60 28 71 25 2c 54 25 29 e7 54 |..E...`(q%,T%).T| 00006a00 25 3d 2d 31 8c 0d 03 46 1f c8 99 26 36 30 30 64 |%=-1...F...&600d| 00006a10 32 2c 71 25 2c 2d 31 2c 30 2c 30 2c 31 3c 3c 32 |2,q%,-1,0,0,1<<2| 00006a20 35 2c 2d 31 0d 03 47 34 cc c8 99 26 36 30 30 64 |5,-1..G4...&600d| 00006a30 32 2c 71 25 2c 54 25 2c 2c 2c 2d 31 2c a9 28 a4 |2,q%,T%,,,-1,.(.| 00006a40 5a 79 28 71 25 2c 54 25 29 29 3a c8 99 26 64 63 |Zy(q%,T%)):..&dc| 00006a50 62 38 64 2c 38 2c 71 25 0d 03 48 07 cd 3a e1 0d |b8d,8,q%..H..:..| 00006a60 03 49 24 dd f2 77 79 28 71 25 2c 65 75 25 29 c8 |.I$..wy(q%,eu%).| 00006a70 99 26 64 63 62 38 64 2c 43 79 2c 71 25 2c 65 75 |.&dcb8d,Cy,q%,eu| 00006a80 25 3a e1 0d 03 4a 1f dd f2 58 28 71 25 29 e7 71 |%:...J...X(q%).q| 00006a90 25 3e 30 8c c8 99 26 64 63 62 38 64 2c 59 79 2c |%>0...&dcb8d,Yy,| 00006aa0 71 25 0d 03 4b 05 e1 0d 03 4c 1f dd f2 70 79 28 |q%..K....L...py(| 00006ab0 71 25 29 c8 99 26 64 63 62 38 64 2c 43 79 2c 71 |q%)..&dcb8d,Cy,q| 00006ac0 25 2c 2d 31 3a e1 0d 03 4d 6e dd f2 68 79 28 71 |%,-1:...Mn..hy(q| 00006ad0 25 2c 54 25 2c 68 4a 25 2c 79 75 25 2c 60 4a 25 |%,T%,hJ%,yu%,`J%| 00006ae0 29 ea 46 25 3a 46 25 3d a4 41 28 31 36 29 3a 46 |).F%:F%=.A(16):F| 00006af0 25 21 30 3d 71 25 3a 46 25 21 34 3d 54 25 3a 46 |%!0=q%:F%!4=T%:F| 00006b00 25 21 38 3d 79 75 25 3c 3c 68 4a 25 3a 46 25 21 |%!8=yu%<<hJ%:F%!| 00006b10 31 32 3d 60 4a 25 3c 3c 68 4a 25 3a c8 99 26 34 |12=`J%<<hJ%:..&4| 00006b20 30 30 63 64 2c 2c 46 25 3a f2 43 28 46 25 2c 31 |00cd,,F%:.C(F%,1| 00006b30 36 29 3a e1 0d 03 4e 26 dd a4 42 28 71 25 2c 54 |6):...N&..B(q%,T| 00006b40 25 29 c8 99 26 64 63 62 38 63 2c 7a 79 2c 71 25 |%)..&dcb8c,zy,q%| 00006b50 2c 54 25 b8 54 25 3a 3d 54 25 0d 03 4f 29 dd f2 |,T%.T%:=T%..O)..| 00006b60 49 28 71 25 2c 54 25 2c 54 75 25 29 c8 99 26 64 |I(q%,T%,Tu%)..&d| 00006b70 63 62 38 63 2c 6a 79 2c 71 25 2c 54 25 2c 54 75 |cb8c,jy,q%,T%,Tu| 00006b80 25 3a e1 0d 03 50 4a dd f2 56 28 77 4a 25 2c 41 |%:...PJ..V(wJ%,A| 00006b90 24 29 ea 46 25 3a 46 25 3d a4 41 28 33 30 30 29 |$).F%:F%=.A(300)| 00006ba0 3a 46 25 21 30 3d 77 4a 25 3a 24 28 46 25 2b 34 |:F%!0=wJ%:$(F%+4| 00006bb0 29 3d 41 24 2b bd 28 30 29 3a f2 4b 28 46 25 29 |)=A$+.(0):.K(F%)| 00006bc0 3a f2 43 28 46 25 2c 33 30 30 29 3a e1 0d 03 51 |:.C(F%,300):...Q| 00006bd0 14 dd f2 42 28 41 24 29 85 4e 5f 25 2c 41 24 3a |...B(A$).N_%,A$:| 00006be0 e1 0d 03 52 4c dd f2 4c 28 77 4a 25 29 ea 46 25 |...RL..L(wJ%).F%| 00006bf0 3a 46 25 3d a4 41 28 33 30 30 29 3a 46 25 21 30 |:F%=.A(300):F%!0| 00006c00 3d 79 79 25 3a f2 6f 28 22 4c 45 22 2b c3 28 77 |=yy%:.o("LE"+.(w| 00006c10 4a 25 29 2c 46 25 2b 34 29 3a f2 4b 28 46 25 29 |J%),F%+4):.K(F%)| 00006c20 3a f2 43 28 46 25 2c 33 30 30 29 3a e1 0d 03 53 |:.C(F%,300):...S| 00006c30 1f dd f2 4b 28 48 75 25 29 c8 99 26 34 30 30 64 |...K(Hu%)..&400d| 00006c40 66 2c 48 75 25 2c 31 2c 47 24 3a e1 0d 03 54 67 |f,Hu%,1,G$:...Tg| 00006c50 dd a4 47 28 48 79 25 2c 41 24 29 ea 46 25 2c 4b |..G(Hy%,A$).F%,K| 00006c60 25 3a f2 68 3a 46 25 3d a4 41 28 32 36 30 29 3a |%:.h:F%=.A(260):| 00006c70 21 46 25 3d 30 3a 24 28 46 25 2b 34 29 3d 41 24 |!F%=0:$(F%+4)=A$| 00006c80 2b bd 28 30 29 3a c8 99 26 34 30 30 64 66 2c 46 |+.(0):..&400df,F| 00006c90 25 2c 28 31 36 84 48 79 25 29 2c a4 4c 28 30 29 |%,(16.Hy%),.L(0)| 00006ca0 b8 2c 4b 25 3a f2 43 28 46 25 2c 32 36 30 29 3a |.,K%:.C(F%,260):| 00006cb0 3d 4b 25 0d 03 55 99 dd f2 67 79 ea 46 25 3a 46 |=K%..U...gy.F%:F| 00006cc0 25 3d a4 41 28 32 35 36 29 3a 46 25 3f 30 3d 31 |%=.A(256):F%?0=1| 00006cd0 3a 46 25 3f 31 3d 30 3a 46 25 3f 32 3d 30 3a 46 |:F%?1=0:F%?2=0:F| 00006ce0 25 3f 33 3d 30 3a 46 25 3f 34 3d 30 3a 46 25 3f |%?3=0:F%?4=0:F%?| 00006cf0 35 3d 48 5f 25 83 32 35 36 3a 46 25 3f 36 3d 48 |5=H_%.256:F%?6=H| 00006d00 5f 25 81 32 35 36 3a 46 25 3f 37 3d 50 5f 25 83 |_%.256:F%?7=P_%.| 00006d10 32 35 36 3a 46 25 3f 38 3d 50 5f 25 81 32 35 36 |256:F%?8=P_%.256| 00006d20 3a c8 99 37 2c 32 31 2c 46 25 3a 21 46 25 3d 77 |:..7,21,F%:!F%=w| 00006d30 5f 25 3a c8 99 26 34 30 30 63 36 2c 2c 46 25 3a |_%:..&400c6,,F%:| 00006d40 f2 43 28 46 25 2c 32 35 36 29 3a e1 0d 03 56 46 |.C(F%,256):...VF| 00006d50 dd f2 72 79 28 63 25 2c 62 25 2c 5f 25 2c 54 25 |..ry(c%,b%,_%,T%| 00006d60 29 f2 67 79 3a 63 25 3d a4 5a 28 22 46 4e 5f 53 |).gy:c%=.Z("FN_S| 00006d70 74 6f 70 5f 41 63 74 69 6f 6e 5f 22 2b 6a 24 2b |top_Action_"+j$+| 00006d80 22 28 22 2b c3 28 54 25 3d 30 29 2b 22 29 22 29 |"("+.(T%=0)+")")| 00006d90 3a e1 0d 03 57 2f dd a4 4c 79 28 56 24 29 c8 95 |:...W/..Ly(V$)..| 00006da0 a7 56 24 2c 22 2e 22 29 3a 56 24 3d c1 56 24 2c |.V$,"."):V$=.V$,| 00006db0 a7 56 24 2c 22 2e 22 29 2b 31 29 3a ce 3a 3d 56 |.V$,".")+1):.:=V| 00006dc0 24 0d 03 58 27 dd f2 45 28 71 25 2c 54 25 2c 59 |$..X'..E(q%,T%,Y| 00006dd0 24 29 c8 99 26 64 63 62 38 63 2c 68 79 2c 71 25 |$)..&dcb8c,hy,q%| 00006de0 2c 54 25 2c 59 24 3a e1 0d 03 59 27 dd f2 4e 28 |,T%,Y$:...Y'..N(| 00006df0 71 25 2c 4e 25 2c 52 25 29 c8 99 26 64 63 62 38 |q%,N%,R%)..&dcb8| 00006e00 63 2c 77 79 2c 71 25 2c 4e 25 2c 52 25 3a e1 0d |c,wy,q%,N%,R%:..| 00006e10 03 5a 2b dd a4 5a 79 28 71 25 2c 4e 25 29 c8 99 |.Z+..Zy(q%,N%)..| 00006e20 26 64 63 62 38 63 2c 44 79 2c 71 25 2c 4e 25 b8 |&dcb8c,Dy,q%,N%.| 00006e30 71 25 3a 3d a4 4d 28 71 25 29 0d 03 5b 26 dd a4 |q%:=.M(q%)..[&..| 00006e40 6c 28 71 25 2c 4e 25 29 c8 99 26 64 63 62 38 63 |l(q%,N%)..&dcb8c| 00006e50 2c 44 79 2c 71 25 2c 4e 25 b8 71 25 3a 3d 71 25 |,Dy,q%,N%.q%:=q%| 00006e60 0d 03 5c 38 dd a4 49 28 4b 24 29 ea 64 25 2c 44 |..\8..I(K$).d%,D| 00006e70 25 2c 51 25 3a c8 99 26 32 30 30 30 38 2c 31 37 |%,Q%:..&20008,17| 00006e80 2c 4b 24 b8 64 25 2c 2c 2c 2c 44 25 3b 51 25 3a |,K$.d%,,,,D%;Q%:| 00006e90 e7 a4 46 28 51 25 29 8c 0d 03 5d 29 f2 46 28 22 |..F(Q%)...]).F("| 00006ea0 52 65 61 73 6f 6e 22 2c a4 4c 79 28 4b 24 29 29 |Reason",.Ly(K$))| 00006eb0 3a f2 79 28 64 25 29 3a f2 42 28 a4 4c 28 34 29 |:.y(d%):.B(.L(4)| 00006ec0 29 0d 03 5e 0d cd 3a e7 64 25 3c 3e 31 8c 0d 03 |)..^..:.d%<>1...| 00006ed0 5f 09 44 25 3d 2d 31 0d 03 60 09 cd 3a 3d 44 25 |_.D%=-1..`..:=D%| 00006ee0 0d 03 61 1d dd a4 41 28 77 25 29 ea 4b 25 3a e7 |..a...A(w%).K%:.| 00006ef0 28 4e 79 25 2b 77 25 29 3c 61 79 25 8c 0d 03 62 |(Ny%+w%)<ay%...b| 00006f00 12 4b 25 3d 4e 79 25 3a 4e 79 25 2b 3d 77 25 0d |.K%=Ny%:Ny%+=w%.| 00006f10 03 63 1a cc f2 42 28 22 57 69 6d 70 20 53 74 61 |.c...B("Wimp Sta| 00006f20 63 6b 20 66 75 6c 6c 22 29 0d 03 64 09 cd 3a 3d |ck full")..d..:=| 00006f30 4b 25 0d 03 65 12 dd f2 76 79 3a 4e 79 25 3d 66 |K%..e...vy:Ny%=f| 00006f40 79 25 3a e1 0d 03 66 24 dd f2 43 28 58 5f 25 2c |y%:...f$..C(X_%,| 00006f50 77 25 29 e7 28 58 5f 25 3c 66 79 25 29 84 28 58 |w%).(X_%<fy%).(X| 00006f60 5f 25 3e 61 79 25 29 8c 0d 03 67 2c f2 42 28 22 |_%>ay%)...g,.B("| 00006f70 52 65 6c 65 61 73 65 5f 53 74 61 63 6b 3a 20 49 |Release_Stack: I| 00006f80 6e 76 61 6c 69 64 20 73 74 61 63 6b 20 63 68 75 |nvalid stack chu| 00006f90 6e 6b 22 29 0d 03 68 1c cc e7 28 77 25 3c 30 29 |nk")..h...(w%<0)| 00006fa0 84 28 28 58 5f 25 2b 77 25 29 3e 61 79 25 29 8c |.((X_%+w%)>ay%).| 00006fb0 0d 03 69 2b f2 42 28 22 52 65 6c 65 61 73 65 5f |..i+.B("Release_| 00006fc0 53 74 61 63 6b 3a 20 49 6e 76 61 6c 69 64 20 63 |Stack: Invalid c| 00006fd0 68 75 6e 6b 20 73 69 7a 65 22 29 0d 03 6a 17 cc |hunk size")..j..| 00006fe0 4e 79 25 2d 3d 77 25 3a e7 4e 79 25 3c 3e 58 5f |Ny%-=w%:.Ny%<>X_| 00006ff0 25 8c 0d 03 6b 20 f2 42 28 22 52 65 6c 65 61 73 |%...k .B("Releas| 00007000 65 5f 53 74 61 63 6b 3a 20 42 61 64 20 70 6f 70 |e_Stack: Bad pop| 00007010 22 29 0d 03 6c 05 cd 0d 03 6d 05 cd 0d 03 6e 07 |")..l....m....n.| 00007020 cd 3a e1 0d 03 6f 3e dd f2 59 79 28 72 24 2c 74 |.:...o>..Yy(r$,t| 00007030 25 2c 67 4a 25 2c 6e 5f 25 2c 57 4a 25 2c 43 4a |%,gJ%,n_%,WJ%,CJ| 00007040 25 29 f2 73 5f 28 72 24 2c 72 24 2c 74 25 2c 67 |%).s_(r$,r$,t%,g| 00007050 4a 25 2c 6e 5f 25 2c 57 4a 25 2c 43 4a 25 29 3a |J%,n_%,WJ%,CJ%):| 00007060 e1 0d 03 70 e3 dd f2 73 5f 28 72 24 2c 48 24 2c |...p...s_(r$,H$,| 00007070 74 25 2c 67 4a 25 2c 6e 5f 25 2c 57 4a 25 2c 43 |t%,gJ%,n_%,WJ%,C| 00007080 4a 25 29 44 24 3d c3 28 74 25 29 2b 22 2e 22 2b |J%)D$=.(t%)+"."+| 00007090 c2 22 30 22 2b c3 28 67 4a 25 29 2c 32 29 3a 44 |."0"+.(gJ%),2):D| 000070a0 24 2b 3d 22 20 28 22 2b c2 22 30 22 2b c3 28 6e |$+=" ("+."0"+.(n| 000070b0 5f 25 29 2c 32 29 2b 22 2d 22 3a 44 24 2b 3d c1 |_%),2)+"-":D$+=.| 000070c0 22 43 42 4a 61 6e 46 65 62 4d 61 72 41 70 72 4d |"CBJanFebMarAprM| 000070d0 61 79 4a 75 6e 4a 75 6c 41 75 67 53 65 70 4f 63 |ayJunJulAugSepOc| 000070e0 74 4e 6f 76 44 65 63 22 2c 57 4a 25 2a 33 2c 33 |tNovDec",WJ%*3,3| 000070f0 29 3a 44 24 2b 3d 22 2d 22 2b c2 22 31 39 22 2b |):D$+="-"+."19"+| 00007100 c3 28 43 4a 25 29 2c 34 29 2b 22 29 22 3a 47 24 |.(CJ%),4)+")":G$| 00007110 3d 72 24 3a f2 46 28 22 41 70 70 22 2c 47 24 29 |=r$:.F("App",G$)| 00007120 3a f2 79 79 28 4b 79 25 2c 47 24 2b 22 24 44 69 |:.yy(Ky%,G$+"$Di| 00007130 72 22 29 3a e7 4b 79 25 3d 30 8c 85 31 2c 22 45 |r"):.Ky%=0..1,"E| 00007140 49 57 35 22 0d 03 71 0c e7 55 24 3c 3e 22 22 8c |IW5"..q..U$<>"".| 00007150 0d 03 72 93 6e 5f 25 3d a3 3a 53 5f 25 3d 57 25 |..r.n_%=.:S_%=W%| 00007160 3a 74 25 3d a7 55 24 2c 22 2c 22 29 3a c8 95 74 |:t%=.U$,","):..t| 00007170 25 3c 3e 30 3a 53 5f 25 21 30 3d a4 5a 28 c0 55 |%<>0:S_%!0=.Z(.U| 00007180 24 2c 74 25 2d 31 29 29 3a 53 5f 25 2b 3d 34 3a |$,t%-1)):S_%+=4:| 00007190 55 24 3d c1 55 24 2c 74 25 2b 31 29 3a 74 25 3d |U$=.U$,t%+1):t%=| 000071a0 a7 55 24 2c 22 2c 22 29 3a ce 3a 53 5f 25 21 30 |.U$,","):.:S_%!0| 000071b0 3d a4 5a 28 55 24 29 3a 53 5f 25 21 34 3d 30 3a |=.Z(U$):S_%!4=0:| 000071c0 c8 99 26 34 30 30 63 30 2c 33 30 30 2c 26 34 62 |..&400c0,300,&4b| 000071d0 35 33 34 31 35 34 2c 48 24 2c 57 25 b8 55 5f 25 |534154,H$,W%.U_%| 000071e0 2c 59 25 0d 03 73 25 cc c8 99 26 34 30 30 63 30 |,Y%..s%...&400c0| 000071f0 2c 32 30 30 2c 26 34 62 35 33 34 31 35 34 2c 48 |,200,&4b534154,H| 00007200 24 b8 55 5f 25 2c 59 25 0d 03 74 0b cd 3a ee 85 |$.U_%,Y%..t..:..| 00007210 f2 63 79 0d 03 75 16 c8 99 26 36 30 36 63 30 3a |.cy..u...&606c0:| 00007220 e7 55 5f 25 3c 32 30 30 8c 0d 03 76 0e 85 4e 5f |.U_%<200...v..N_| 00007230 25 2c a4 4c 28 35 29 0d 03 77 2a cd 3a 64 79 25 |%,.L(5)..w*.:dy%| 00007240 3d b9 3a f2 4c 79 3a f2 4b 79 3a 64 79 25 3d 2d |=.:.Ly:.Ky:dy%=-| 00007250 32 3a f2 49 5f 3a f2 61 79 3a e7 5a 5f 25 3d 30 |2:.I_:.ay:.Z_%=0| 00007260 8c 0d 03 78 0f f2 45 28 73 25 2c 37 2c 44 24 29 |...x..E(s%,7,D$)| 00007270 0d 03 79 50 cd 3a 62 75 25 3d 2d 31 3a 68 75 25 |..yP.:bu%=-1:hu%| 00007280 3d 2d 31 3a 55 75 25 3d 2d 31 3a 6e 75 25 3d 2d |=-1:Uu%=-1:nu%=-| 00007290 31 3a 70 4a 25 3d a3 3a 66 75 25 3d 2d 31 3a 53 |1:pJ%=.:fu%=-1:S| 000072a0 75 25 3d 2d 31 3a 68 24 3d 22 22 3a 6d 24 3d 22 |u%=-1:h$="":m$="| 000072b0 22 3a f2 53 79 3a c8 99 26 36 30 36 63 31 3a e1 |":.Sy:..&606c1:.| 000072c0 0d 03 7a 16 dd f2 63 79 c8 99 26 36 30 36 63 31 |..z...cy..&606c1| 000072d0 3a e7 73 79 25 8c 0d 03 7b 1a f2 56 28 79 79 25 |:.sy%...{..V(yy%| 000072e0 2c f6 24 2b 22 20 5b 22 2b c3 9e 2b 22 5d 22 29 |,.$+" ["+..+"]")| 000072f0 0d 03 7c 0f cc f2 56 28 79 79 25 2c f6 24 29 0d |..|...V(yy%,.$).| 00007300 03 7d 0c cd 3a f2 53 3a e0 3a e1 0d 03 7e 3e dd |.}..:.S:.:...~>.| 00007310 f2 79 79 28 f8 57 5f 25 2c 76 24 29 ea 77 25 2c |.yy(.W_%,v$).w%,| 00007320 52 79 25 3a c8 99 26 32 30 30 32 33 2c 76 24 2c |Ry%:..&20023,v$,| 00007330 30 2c 2d 31 2c 30 2c 31 b8 2c 2c 77 25 2c 2c 52 |0,-1,0,1.,,w%,,R| 00007340 79 25 3a e7 77 25 3d 30 8c 0d 03 7f 09 57 5f 25 |y%:.w%=0.....W_%| 00007350 3d 30 0d 03 80 15 cc e7 52 79 25 3d 31 8c 85 31 |=0......Ry%=1..1| 00007360 2c 22 45 49 57 34 22 0d 03 81 35 77 25 3d 2d 77 |,"EIW4"...5w%=-w| 00007370 25 3a f2 47 28 57 5f 25 2c 77 25 29 3a c8 99 33 |%:.G(W_%,w%):..3| 00007380 35 2c 76 24 2c 57 5f 25 2c 77 25 2c 30 2c 31 3a |5,v$,W_%,w%,0,1:| 00007390 57 5f 25 3f 28 77 25 2d 31 29 3d 30 0d 03 82 07 |W_%?(w%-1)=0....| 000073a0 cd 3a e1 0d 03 83 1a dd a4 5f 46 69 6c 65 54 79 |.:......._FileTy| 000073b0 70 65 5f 76 65 72 73 69 6f 6e 3d 31 30 0d 03 84 |pe_version=10...| 000073c0 b6 dd a4 5f 68 61 72 64 5f 69 6e 69 74 69 61 6c |..._hard_initial| 000073d0 69 73 65 5f 46 69 6c 65 54 79 70 65 3a 6b 69 3d |ise_FileType:ki=| 000073e0 2d 31 3a 78 79 3d 38 31 39 32 3a 6e 79 3d 34 30 |-1:xy=8192:ny=40| 000073f0 39 36 3a 4f 75 3d 34 30 39 35 3a 45 4a 3d 34 30 |96:Ou=4095:EJ=40| 00007400 39 33 3a 4b 5f 3d 34 30 39 31 3a 62 3d 34 30 38 |93:K_=4091:b=408| 00007410 39 3a 79 6c 3d 34 30 38 36 3a 56 6c 3d 34 30 37 |9:yl=4086:Vl=407| 00007420 36 3a 66 3d 34 30 37 35 3a 4a 79 3d 33 34 37 38 |6:f=4075:Jy=3478| 00007430 3a 6e 4a 3d 33 33 38 38 3a 6c 6c 3d 33 32 36 39 |:nJ=3388:ll=3269| 00007440 3a 50 6c 3d 33 32 35 34 3a 6b 6c 3d 33 32 35 33 |:Pl=3254:kl=3253| 00007450 3a 78 69 3d 32 38 31 35 3a 64 75 3d 32 37 37 39 |:xi=2815:du=2779| 00007460 3a 4e 69 3d 31 37 39 33 3a 51 69 3d 31 32 39 36 |:Ni=1793:Qi=1296| 00007470 3a 3d 30 0d 03 85 19 dd a4 5f 66 69 6c 65 5f 69 |:=0......_file_i| 00007480 6f 5f 76 65 72 73 69 6f 6e 3d 31 30 0d 03 86 7c |o_version=10...|| 00007490 dd a4 5f 68 61 72 64 5f 69 6e 69 74 69 61 6c 69 |.._hard_initiali| 000074a0 73 65 5f 66 69 6c 65 5f 69 6f f2 41 28 22 3c 42 |se_file_io.A("<B| 000074b0 61 73 69 63 56 24 4c 69 62 3e 2e 43 68 65 63 6b |asicV$Lib>.Check| 000074c0 56 61 72 73 22 2c 32 29 3a f2 41 28 22 3c 42 61 |Vars",2):.A("<Ba| 000074d0 73 69 63 56 24 4c 69 62 3e 2e 73 74 72 69 6e 67 |sicV$Lib>.string| 000074e0 22 2c 36 29 3a 70 5f 25 3d 32 35 36 2b 32 30 3a |",6):p_%=256+20:| 000074f0 de 68 25 70 5f 25 3a de 45 75 25 39 3a 45 75 25 |.h%p_%:.Eu%9:Eu%| 00007500 3f 38 3d 31 33 3a 3d 30 0d 03 87 3b dd a4 4d 79 |?8=13:=0...;..My| 00007510 28 4b 24 29 ea 77 25 2c 52 79 25 3a c8 99 38 2c |(K$).w%,Ry%:..8,| 00007520 35 2c 4b 24 b8 52 79 25 2c 2c 2c 2c 77 25 3a e7 |5,K$.Ry%,,,,w%:.| 00007530 52 79 25 3d 30 8c 85 31 2c 22 45 49 46 31 20 22 |Ry%=0..1,"EIF1 "| 00007540 2b 4b 24 0d 03 88 07 3d 77 25 0d 03 89 1f dd f2 |+K$....=w%......| 00007550 66 28 4b 24 2c 4e 75 25 29 c8 99 38 2c 32 35 35 |f(K$,Nu%)..8,255| 00007560 2c 4b 24 2c 4e 75 25 3a e1 0d 03 8a 43 dd a4 4f |,K$,Nu%:....C..O| 00007570 28 42 24 2c 43 24 2c f8 78 25 29 ea 73 4a 25 3a |(B$,C$,.x%).sJ%:| 00007580 c8 99 26 32 30 30 30 63 2c 31 30 2c 42 24 2c 68 |..&2000c,10,B$,h| 00007590 25 2c 31 2c 78 25 2c 70 5f 25 2c 43 24 b8 2c 2c |%,1,x%,p_%,C$.,,| 000075a0 2c 73 4a 25 2c 78 25 3a 3d 73 4a 25 0d 03 8b 97 |,sJ%,x%:=sJ%....| 000075b0 dd a4 4e 28 42 24 2c 43 24 29 ea 52 79 25 2c 67 |..N(B$,C$).Ry%,g| 000075c0 25 2c 57 79 25 2c 44 25 2c 78 4a 25 3a c8 99 26 |%,Wy%,D%,xJ%:..&| 000075d0 32 30 30 30 38 2c 35 2c 42 24 2b 22 2e 22 2b 43 |20008,5,B$+"."+C| 000075e0 24 b8 52 79 25 2c 2c 67 25 2c 57 79 25 2c 44 25 |$.Ry%,,g%,Wy%,D%| 000075f0 2c 78 4a 25 3a 68 25 21 30 3d 67 25 3a 68 25 21 |,xJ%:h%!0=g%:h%!| 00007600 34 3d 57 79 25 3a 68 25 21 38 3d 44 25 3a 68 25 |4=Wy%:h%!8=D%:h%| 00007610 21 31 32 3d 78 4a 25 3a 68 25 21 31 36 3d 52 79 |!12=xJ%:h%!16=Ry| 00007620 25 3a f2 56 5f 28 28 42 24 2b 22 2e 22 2b 43 24 |%:.V_((B$+"."+C$| 00007630 29 2c 28 68 25 2b 32 30 29 29 3a 3d 28 52 79 25 |),(h%+20)):=(Ry%| 00007640 3d 30 29 0d 03 8c 0c dd a4 56 79 3d 21 68 25 0d |=0)......Vy=!h%.| 00007650 03 8d 0c dd a4 6b 3d 68 25 21 38 0d 03 8e 11 dd |.....k=h%!8.....| 00007660 a4 51 3d a4 55 28 68 25 2b 32 30 29 0d 03 8f 14 |.Q=.U(h%+20)....| 00007670 dd a4 57 79 3d 28 28 68 25 21 31 36 29 3d 32 29 |..Wy=((h%!16)=2)| 00007680 0d 03 90 2a dd a4 57 ea 4b 25 3a 4b 25 3d a4 56 |...*..W.K%:K%=.V| 00007690 79 3a e7 28 4b 25 80 2d 31 30 34 38 35 37 36 29 |y:.(K%.-1048576)| 000076a0 3d 2d 31 30 34 38 35 37 36 8c 0d 03 91 15 4b 25 |=-1048576.....K%| 000076b0 3d 28 4b 25 80 26 66 66 66 30 30 29 3e 3e 38 0d |=(K%.&fff00)>>8.| 000076c0 03 92 0a cc 4b 25 3d 2d 31 0d 03 93 09 cd 3a 3d |....K%=-1.....:=| 000076d0 4b 25 0d 03 94 17 dd a4 5f 73 74 72 69 6e 67 5f |K%......_string_| 000076e0 76 65 72 73 69 6f 6e 3d 37 0d 03 95 3a dd a4 5f |version=7...:.._| 000076f0 68 61 72 64 5f 69 6e 69 74 69 61 6c 69 73 65 5f |hard_initialise_| 00007700 73 74 72 69 6e 67 f2 41 28 22 3c 42 61 73 69 63 |string.A("<Basic| 00007710 56 24 4c 69 62 3e 2e 63 74 79 70 65 22 2c 31 29 |V$Lib>.ctype",1)| 00007720 3a 3d 30 0d 03 96 60 dd a4 62 28 5a 24 2c 61 24 |:=0...`..b(Z$,a$| 00007730 29 ea 51 25 2c 61 25 2c 5f 25 3a 61 25 3d a9 28 |).Q%,a%,_%:a%=.(| 00007740 5a 24 29 3a 5f 25 3d a9 28 61 24 29 3a 51 25 3d |Z$):_%=.(a$):Q%=| 00007750 30 3a c8 95 61 25 3e 30 80 5f 25 3e 30 80 51 25 |0:..a%>0._%>0.Q%| 00007760 3d 30 3a 51 25 3d b4 28 a4 54 28 97 28 5a 24 29 |=0:Q%=.(.T(.(Z$)| 00007770 29 2d a4 54 28 97 28 61 24 29 29 29 3a e7 51 25 |)-.T(.(a$))):.Q%| 00007780 3d 30 8c 0d 03 97 25 61 25 2d 3d 31 3a 5f 25 2d |=0....%a%-=1:_%-| 00007790 3d 31 3a 5a 24 3d c2 5a 24 2c 61 25 29 3a 61 24 |=1:Z$=.Z$,a%):a$| 000077a0 3d c2 61 24 2c 5f 25 29 0d 03 98 0e cd 3a ce 3a |=.a$,_%).....:.:| 000077b0 e7 51 25 3d 30 8c 0d 03 99 0f 51 25 3d b4 28 61 |.Q%=0.....Q%=.(a| 000077c0 25 2d 5f 25 29 0d 03 9a 09 cd 3a 3d 51 25 0d 03 |%-_%).....:=Q%..| 000077d0 9b 22 dd f2 56 5f 28 59 24 2c 58 25 29 24 58 25 |."..V_(Y$,X%)$X%| 000077e0 3d 59 24 3a 58 25 3f a9 28 59 24 29 3d 30 3a e1 |=Y$:X%?.(Y$)=0:.| 000077f0 0d 03 9c 16 dd a4 5f 4d 69 73 63 5f 76 65 72 73 |......_Misc_vers| 00007800 69 6f 6e 3d 34 36 0d 03 9d 36 dd a4 5f 68 61 72 |ion=46...6.._har| 00007810 64 5f 69 6e 69 74 69 61 6c 69 73 65 5f 4d 69 73 |d_initialise_Mis| 00007820 63 ea 4e 25 2c 46 5f 25 2c 52 25 3a e7 a4 48 3c |c.N%,F_%,R%:..H<| 00007830 31 32 8c 85 31 2c 22 45 49 41 31 22 0d 03 9e 1b |12..1,"EIA1"....| 00007840 6b 24 3d 22 22 3a 41 75 25 3d 31 30 30 3a de 6a |k$="":Au%=100:.j| 00007850 75 25 31 36 3a 3d 30 0d 03 9f 3b dd a4 52 28 7a |u%16:=0...;..R(z| 00007860 24 2c 5f 79 25 2c 72 75 25 29 ea 45 5f 25 2c 6d |$,_y%,ru%).E_%,m| 00007870 5f 25 2c 79 5f 25 2c 61 5f 25 2c 65 5f 25 3a 76 |_%,y_%,a_%,e_%:v| 00007880 25 3d a4 4e 79 28 7a 24 29 3a e7 55 25 80 32 3d |%=.Ny(z$):.U%.2=| 00007890 30 8c 0d 03 a0 16 5b 4f 50 54 55 25 3a 44 43 44 |0.....[OPTU%:DCD| 000078a0 30 3a 44 43 44 30 3a 5d 0d 03 a1 29 cc 45 5f 25 |0:DCD0:]...).E_%| 000078b0 3d 72 75 25 2d 50 25 2d 38 3a e7 94 28 45 5f 25 |=ru%-P%-8:..(E_%| 000078c0 29 3e 36 35 35 33 35 8c 85 31 2c 22 45 49 41 32 |)>65535..1,"EIA2| 000078d0 22 0d 03 a2 2c 79 5f 25 3d 94 28 45 5f 25 29 80 |"...,y_%=.(E_%).| 000078e0 32 35 35 3a 6d 5f 25 3d 94 28 45 5f 25 29 80 36 |255:m_%=.(E_%).6| 000078f0 35 32 38 30 3a e7 45 5f 25 3e 3d 30 8c 0d 03 a3 |5280:.E_%>=0....| 00007900 52 61 5f 25 3d 76 25 84 28 26 32 38 66 30 30 30 |Ra_%=v%.(&28f000| 00007910 30 2b 28 5f 79 25 3c 3c 31 32 29 2b 79 5f 25 29 |0+(_y%<<12)+y_%)| 00007920 3a 65 5f 25 3d 76 25 84 28 26 32 38 30 30 63 30 |:e_%=v%.(&2800c0| 00007930 30 2b 28 5f 79 25 3c 3c 31 36 29 2b 28 5f 79 25 |0+(_y%<<16)+(_y%| 00007940 3c 3c 31 32 29 2b 28 6d 5f 25 3e 3e 38 29 29 0d |<<12)+(m_%>>8)).| 00007950 03 a4 53 cc 61 5f 25 3d 76 25 84 28 26 32 34 66 |..S.a_%=v%.(&24f| 00007960 30 30 30 30 2b 28 5f 79 25 3c 3c 31 32 29 2b 79 |0000+(_y%<<12)+y| 00007970 5f 25 29 3a 65 5f 25 3d 76 25 84 28 26 32 34 30 |_%):e_%=v%.(&240| 00007980 30 63 30 30 2b 28 5f 79 25 3c 3c 31 36 29 2b 28 |0c00+(_y%<<16)+(| 00007990 5f 79 25 3c 3c 31 32 29 2b 28 6d 5f 25 3e 3e 38 |_y%<<12)+(m_%>>8| 000079a0 29 29 0d 03 a5 1c cd 3a 5b 4f 50 54 55 25 3a 44 |)).....:[OPTU%:D| 000079b0 43 44 61 5f 25 3a 44 43 44 65 5f 25 3a 5d 0d 03 |CDa_%:DCDe_%:]..| 000079c0 a6 08 cd 3a 3d 30 0d 03 a7 38 dd f2 57 5f 28 56 |...:=0...8..W_(V| 000079d0 24 29 ea 54 4a 25 2c 72 4a 25 2c 76 4a 25 3a 54 |$).TJ%,rJ%,vJ%:T| 000079e0 4a 25 3d 50 25 3a 72 4a 25 3d 4f 25 3a 76 4a 25 |J%=P%:rJ%=O%:vJ%| 000079f0 3d 55 25 3a e7 28 55 25 80 34 29 3d 30 8c 0d 03 |=U%:.(U%.4)=0...| 00007a00 a8 09 4f 25 3d 50 25 0d 03 a9 51 cd 3a 50 25 3d |..O%=P%...Q.:P%=| 00007a10 30 3a 55 25 3d 55 25 84 36 3a 50 25 3d a4 5a 28 |0:U%=U%.6:P%=.Z(| 00007a20 22 46 4e 5f 44 65 63 6c 61 72 65 5f 4c 6f 63 61 |"FN_Declare_Loca| 00007a30 6c 5f 56 61 72 69 61 62 6c 65 73 5f 22 2b 56 24 |l_Variables_"+V$| 00007a40 29 3a 50 25 3d 54 4a 25 3a 4f 25 3d 72 4a 25 3a |):P%=TJ%:O%=rJ%:| 00007a50 55 25 3d 76 4a 25 3a e1 0d 03 aa 15 dd a4 4e 79 |U%=vJ%:.......Ny| 00007a60 28 7a 24 29 ea 76 25 3a c8 8e 7a 24 ca 0d 03 ab |(z$).v%:..z$....| 00007a70 12 c9 22 22 2c 22 20 20 22 3a 76 25 3d 31 34 0d |..""," ":v%=14.| 00007a80 03 ac 0e c9 22 6c 6f 22 3a 76 25 3d 33 0d 03 ad |...."lo":v%=3...| 00007a90 0e c9 22 68 73 22 3a 76 25 3d 32 0d 03 ae 44 7f |.."hs":v%=2...D.| 00007aa0 76 25 3d a7 22 65 71 6e 65 63 73 63 63 6d 69 70 |v%=."eqnecsccmip| 00007ab0 6c 76 73 76 63 68 69 6c 73 67 65 6c 74 67 74 6c |lvsvchilsgeltgtl| 00007ac0 65 61 6c 6e 76 22 2c 7a 24 29 3a e7 28 76 25 83 |ealnv",z$):.(v%.| 00007ad0 32 29 3d 30 8c 85 31 2c 22 45 49 41 31 33 22 0d |2)=0..1,"EIA13".| 00007ae0 03 af 10 76 25 3d 28 76 25 2d 31 29 3e 3e 31 0d |...v%=(v%-1)>>1.| 00007af0 03 b0 0d cb 3a 3d 76 25 3c 3c 32 38 0d 03 b1 19 |....:=v%<<28....| 00007b00 dd a4 79 28 61 25 29 e7 28 55 25 80 34 29 8c 61 |..y(a%).(U%.4).a| 00007b10 25 2b 3d 79 25 0d 03 b2 07 3d 61 25 0d 03 b3 1e |%+=y%....=a%....| 00007b20 dd f2 57 ea 4c 79 25 3a e7 55 25 80 32 8c 4c 79 |..W.Ly%:.U%.2.Ly| 00007b30 25 3d 35 30 8b 4c 79 25 3d 30 0d 03 b4 2b c8 99 |%=50.Ly%=0...+..| 00007b40 26 36 30 36 63 34 2c 28 28 a4 79 28 50 25 29 2d |&606c4,((.y(P%)-| 00007b50 79 25 29 2f 28 4c 25 2d 79 25 29 2a 35 30 29 2b |y%)/(L%-y%)*50)+| 00007b60 4c 79 25 3a e1 0d 03 b5 15 dd a4 5f 48 65 61 70 |Ly%:......._Heap| 00007b70 5f 76 65 72 73 69 6f 6e 3d 39 0d 03 b6 1d dd a4 |_version=9......| 00007b80 5f 68 61 72 64 5f 69 6e 69 74 69 61 6c 69 73 65 |_hard_initialise| 00007b90 5f 48 65 61 70 3d 30 0d 03 b7 26 dd a4 59 28 f8 |_Heap=0...&..Y(.| 00007ba0 65 79 25 2c 41 25 29 65 79 25 3d ba 28 75 4a 25 |ey%,A%)ey%=.(uJ%| 00007bb0 29 3a e7 21 43 79 25 8c 65 79 25 3d 30 0d 03 b8 |):.!Cy%.ey%=0...| 00007bc0 09 3d 21 43 79 25 0d 03 b9 1c dd f2 47 28 f8 65 |.=!Cy%......G(.e| 00007bd0 79 25 2c 77 25 29 e7 a4 59 28 65 79 25 2c 77 25 |y%,w%)..Y(ey%,w%| 00007be0 29 8c 0d 03 ba 1c 65 79 25 3d 21 43 79 25 3a 85 |).....ey%=!Cy%:.| 00007bf0 21 65 79 25 2c a4 55 28 65 79 25 2b 34 29 0d 03 |!ey%,.U(ey%+4)..| 00007c00 bb 07 cd 3a e1 0d 03 bc 14 dd f2 5a 28 f8 41 25 |...:.......Z(.A%| 00007c10 29 e7 a4 6e 28 41 25 29 8c 0d 03 bd 19 41 25 3d |)..n(A%).....A%=| 00007c20 21 43 79 25 3a 85 21 41 25 2c a4 55 28 41 25 2b |!Cy%:.!A%,.U(A%+| 00007c30 34 29 0d 03 be 07 cd 3a e1 0d 03 bf 1b dd a4 6e |4).....:.......n| 00007c40 28 f8 41 25 29 d6 4b 4a 25 3a 41 25 3d 30 3a 3d |(.A%).KJ%:A%=0:=| 00007c50 21 43 79 25 0d 03 c0 42 dd f2 4a 5f 5b 4f 50 54 |!Cy%...B..J_[OPT| 00007c60 55 25 3a a4 58 28 75 4a 25 2c 5f 79 29 3a a4 58 |U%:.X(uJ%,_y):.X| 00007c70 28 4b 4a 25 2c 6d 79 29 3a a4 58 28 61 75 25 2c |(KJ%,my):.X(au%,| 00007c80 69 79 29 3a 41 4c 49 47 4e 3a 2e 43 79 25 44 43 |iy):ALIGN:.Cy%DC| 00007c90 44 30 3a 5d 3a e1 0d 03 c1 6d dd a4 58 28 f8 51 |D0:]:....m..X(.Q| 00007ca0 75 25 2c 64 75 25 29 5b 4f 50 54 55 25 3a 41 4c |u%,du%)[OPTU%:AL| 00007cb0 49 47 4e 3a 2e 51 75 25 3a a4 4a 3a 53 54 4d 46 |IGN:.Qu%:.J:STMF| 00007cc0 44 28 41 29 21 2c 7b 5a 7d 3a 4d 4f 56 20 5a 2c |D(A)!,{Z}:MOV Z,| 00007cd0 23 30 3a 53 54 52 20 5a 2c 43 79 25 3a 42 4c 20 |#0:STR Z,Cy%:BL | 00007ce0 64 75 25 3a 53 54 52 76 73 30 2c 43 79 25 3a 4c |du%:STRvs0,Cy%:L| 00007cf0 44 4d 46 44 28 41 29 21 2c 7b 70 63 7d 5e 3a 5d |DMFD(A)!,{pc}^:]| 00007d00 3a 3d 30 0d 03 c2 18 dd a4 5f 4d 65 73 73 61 67 |:=0......_Messag| 00007d10 65 5f 76 65 72 73 69 6f 6e 3d 36 0d 03 c3 6f dd |e_version=6...o.| 00007d20 a4 5f 68 61 72 64 5f 69 6e 69 74 69 61 6c 69 73 |._hard_initialis| 00007d30 65 5f 4d 65 73 73 61 67 65 3a 61 69 3d 33 31 3a |e_Message:ai=31:| 00007d40 c8 99 35 2c 22 52 4d 45 6e 73 75 72 65 20 43 41 |..5,"RMEnsure CA| 00007d50 73 73 65 6d 62 6c 65 72 20 30 2e 30 38 20 52 4d |ssembler 0.08 RM| 00007d60 4c 6f 61 64 20 53 79 73 74 65 6d 3a 4d 6f 64 75 |Load System:Modu| 00007d70 6c 65 73 2e 43 41 73 73 65 6d 62 6c 65 72 22 3a |les.CAssembler":| 00007d80 de 6c 79 20 32 35 36 3a 3d 30 0d 03 c4 48 dd a4 |.ly 256:=0...H..| 00007d90 67 28 66 24 2c 4c 75 25 2c f8 44 5f 25 29 ea 41 |g(f$,Lu%,.D_%).A| 00007da0 25 3a c8 99 26 66 63 62 38 33 2c 66 24 2b 22 2e |%:..&fcb83,f$+".| 00007db0 4d 65 73 73 61 67 65 73 2e 22 2c 4c 75 25 2c 30 |Messages.",Lu%,0| 00007dc0 b8 41 25 2c 44 5f 25 3a e7 44 5f 25 3d 30 8c d6 |.A%,D_%:.D_%=0..| 00007dd0 47 79 0d 03 c5 07 3d 41 25 0d 03 c6 3c dd a4 41 |Gy....=A%...<..A| 00007de0 79 28 4a 25 2c 54 24 2c 68 5f 25 29 c8 99 26 66 |y(J%,T$,h_%)..&f| 00007df0 63 62 38 35 2c 54 24 2c 68 5f 25 2c 4a 25 b8 68 |cb85,T$,h_%,J%.h| 00007e00 5f 25 3b 4a 25 3a 3d 68 5f 25 80 28 28 4a 25 80 |_%;J%:=h_%.((J%.| 00007e10 32 29 3d 32 29 0d 03 c7 3b dd a4 75 28 4a 25 2c |2)=2)...;..u(J%,| 00007e20 54 24 2c 71 24 29 ea 74 25 3a c8 99 26 66 63 62 |T$,q$).t%:..&fcb| 00007e30 38 35 2c 54 24 2c 71 24 2c 4a 25 b8 74 25 3b 4a |85,T$,q$,J%.t%;J| 00007e40 25 3a 3d 74 25 80 28 28 4a 25 80 32 29 3d 32 29 |%:=t%.((J%.2)=2)| 00007e50 0d 03 c8 2f dd a4 70 28 4a 25 29 ea 74 25 3a c8 |.../..p(J%).t%:.| 00007e60 99 26 66 63 62 38 36 2c 4a 25 b8 74 25 3b 4a 25 |.&fcb86,J%.t%;J%| 00007e70 3a 3d 74 25 80 28 28 4a 25 80 32 29 3d 32 29 0d |:=t%.((J%.2)=2).| 00007e80 03 c9 3b dd a4 44 28 4a 25 2c 54 24 29 ea 74 25 |..;..D(J%,T$).t%| 00007e90 3a c8 99 26 66 63 62 38 34 2c 54 24 2c 6c 79 2c |:..&fcb84,T$,ly,| 00007ea0 32 35 36 2c 4a 25 2c 30 b8 74 25 2c 4a 25 3a 3f |256,J%,0.t%,J%:?| 00007eb0 4a 25 3d 31 33 3a 3d 24 6c 79 0d 03 ca 26 dd f2 |J%=13:=$ly...&..| 00007ec0 7a 79 28 4a 25 2c 54 24 2c 42 75 25 29 4a 25 3d |zy(J%,T$,Bu%)J%=| 00007ed0 a4 41 79 28 4a 25 2c 54 24 2c 42 75 25 29 3a e1 |.Ay(J%,T$,Bu%):.| 00007ee0 0d 03 cb 23 dd f2 75 79 28 4a 25 2c 54 24 2c 71 |...#..uy(J%,T$,q| 00007ef0 24 29 4a 25 3d a4 75 28 4a 25 2c 54 24 2c 71 24 |$)J%=.u(J%,T$,q$| 00007f00 29 3a e1 0d 03 cc 17 dd f2 7a 5f 28 4a 25 29 4a |):.......z_(J%)J| 00007f10 25 3d a4 70 28 4a 25 29 3a e1 0d 03 cd 1c dd a4 |%=.p(J%):.......| 00007f20 53 28 52 25 29 3d a4 44 28 6d 25 2c 22 45 22 2b |S(R%)=.D(m%,"E"+| 00007f30 c3 28 52 25 29 29 0d 03 ce 15 dd a4 45 28 5f 24 |.(R%))......E(_$| 00007f40 29 3d a4 44 28 6d 25 2c 5f 24 29 0d 03 cf 1d dd |)=.D(m%,_$).....| 00007f50 f2 5f 28 5f 24 2c 52 25 29 f2 7a 79 28 6d 25 2c |._(_$,R%).zy(m%,| 00007f60 5f 24 2c 52 25 29 3a e1 0d 03 d0 1d dd f2 46 28 |_$,R%):.......F(| 00007f70 5f 24 2c 69 24 29 f2 75 79 28 6d 25 2c 5f 24 2c |_$,i$).uy(m%,_$,| 00007f80 69 24 29 3a e1 0d 03 d1 27 dd f2 6f 28 5f 24 2c |i$):....'..o(_$,| 00007f90 42 25 29 c8 99 26 64 63 62 38 34 2c 5f 24 2c 42 |B%)..&dcb84,_$,B| 00007fa0 25 2c 32 35 36 2c 6d 25 2c 30 3a e1 0d 03 d2 11 |%,256,m%,0:.....| 00007fb0 dd f2 51 5f f2 7a 5f 28 6d 25 29 3a e1 0d 03 d3 |..Q_.z_(m%):....| 00007fc0 12 dd f2 79 28 5f 25 29 e7 5f 25 3c 3d 30 8c 0d |...y(_%)._%<=0..| 00007fd0 03 d4 1e f2 46 28 22 53 79 73 22 2c 22 22 29 3a |....F("Sys",""):| 00007fe0 f2 46 28 22 53 79 73 4e 22 2c 22 22 29 0d 03 d5 |.F("SysN","")...| 00007ff0 2a cc f2 46 28 22 53 79 73 22 2c a4 4d 28 5f 25 |*..F("Sys",.M(_%| 00008000 2b 34 29 29 3a f2 46 28 22 53 79 73 4e 22 2c c3 |+4)):.F("SysN",.| 00008010 7e 28 21 5f 25 29 29 0d 03 d6 07 cd 3a e1 0d 03 |~(!_%)).....:...| 00008020 d7 1d dd a4 4c 28 52 25 29 3d a4 44 28 6d 25 2c |....L(R%)=.D(m%,| 00008030 22 4c 45 22 2b c3 28 52 25 29 29 0d 03 d8 2f dd |"LE"+.(R%)).../.| 00008040 f2 78 79 5b 4f 50 54 55 25 3a 41 4c 49 47 4e 3a |.xy[OPTU%:ALIGN:| 00008050 2e 47 79 3a a4 4a 3a 42 20 6b 79 3a 5d 3a e7 55 |.Gy:.J:B ky:]:.U| 00008060 25 80 34 8c 47 79 2b 3d 79 25 0d 03 d9 05 e1 0d |%.4.Gy+=y%......| 00008070 03 da 18 dd a4 5f 49 6e 74 4d 61 74 68 5f 76 65 |....._IntMath_ve| 00008080 72 73 69 6f 6e 3d 36 0d 03 db 20 dd a4 5f 68 61 |rsion=6... .._ha| 00008090 72 64 5f 69 6e 69 74 69 61 6c 69 73 65 5f 49 6e |rd_initialise_In| 000080a0 74 4d 61 74 68 3d 30 0d 03 dc 1b dd a4 5f 4e 75 |tMath=0......_Nu| 000080b0 6c 6c 52 65 61 73 6f 6e 5f 76 65 72 73 69 6f 6e |llReason_version| 000080c0 3d 35 0d 03 dd 23 dd a4 5f 68 61 72 64 5f 69 6e |=5...#.._hard_in| 000080d0 69 74 69 61 6c 69 73 65 5f 4e 75 6c 6c 52 65 61 |itialise_NullRea| 000080e0 73 6f 6e 3d 30 0d 03 de 29 dd f2 61 79 de 60 25 |son=0...)..ay.`%| 000080f0 34 3a 21 60 25 3d 30 3a 77 79 25 3d 30 3a 47 5f |4:!`%=0:wy%=0:G_| 00008100 25 3d a3 3a 4f 79 25 3d 36 31 39 33 3a e1 0d 03 |%=.:Oy%=6193:...| 00008110 df 1f dd f2 4f 79 28 4c 24 2c 6e 79 25 29 f2 47 |....Oy(L$,ny%).G| 00008120 5f 28 4c 24 2c 6e 79 25 2c b9 29 3a e1 0d 03 e0 |_(L$,ny%,.):....| 00008130 5c dd f2 47 5f 28 4c 24 2c 6e 79 25 2c 63 5f 25 |\..G_(L$,ny%,c_%| 00008140 29 ea 52 25 3a f2 47 28 52 25 2c 31 32 2b a9 28 |).R%:.G(R%,12+.(| 00008150 4c 24 29 2b 31 29 3a 24 28 52 25 2b 31 32 29 3d |L$)+1):$(R%+12)=| 00008160 4c 24 3a 52 25 21 38 3d 6e 79 25 3a 52 25 21 34 |L$:R%!8=ny%:R%!4| 00008170 3d 63 5f 25 3a 21 52 25 3d 21 60 25 3a 21 60 25 |=c_%:!R%=!`%:!`%| 00008180 3d 52 25 3a f2 43 79 3a e1 0d 03 e1 1f dd f2 57 |=R%:.Cy:.......W| 00008190 79 28 4c 24 2c 6e 79 25 29 f2 6c 79 28 4c 24 2c |y(L$,ny%).ly(L$,| 000081a0 6e 79 25 2c b9 29 3a e1 0d 03 e2 22 dd f2 6c 79 |ny%,.):...."..ly| 000081b0 28 4c 24 2c 6e 79 25 2c 63 5f 25 29 ea 52 25 2c |(L$,ny%,c_%).R%,| 000081c0 5a 25 3a e7 4c 24 3d 22 22 8c 0d 03 e3 1d f2 42 |Z%:.L$=""......B| 000081d0 28 22 45 49 4e 33 22 29 3a c8 95 21 60 25 3a f2 |("EIN3"):..!`%:.| 000081e0 63 28 60 25 29 3a ce 0d 03 e4 4d cc 5a 25 3d 60 |c(`%):....M.Z%=`| 000081f0 25 3a c8 95 21 5a 25 3a 52 25 3d 21 5a 25 3a e7 |%:..!Z%:R%=!Z%:.| 00008200 28 24 28 52 25 2b 31 32 29 3d 4c 24 29 80 28 52 |($(R%+12)=L$).(R| 00008210 25 21 34 3d 63 5f 25 29 80 28 28 28 6e 79 25 3d |%!4=c_%).(((ny%=| 00008220 30 29 80 63 5f 25 29 84 28 52 25 21 38 3d 6e 79 |0).c_%).(R%!8=ny| 00008230 25 29 29 8c 0d 03 e5 0a f2 63 28 5a 25 29 0d 03 |%))......c(Z%)..| 00008240 e6 0a cc 5a 25 3d 52 25 0d 03 e7 07 cd 3a ce 0d |...Z%=R%.....:..| 00008250 03 e8 07 cd 3a e1 0d 03 e9 1f dd f2 63 28 5a 25 |....:.......c(Z%| 00008260 29 ea 52 25 3a e7 5a 25 3d 30 8c f2 42 28 22 45 |).R%:.Z%=0..B("E| 00008270 49 4e 36 22 29 0d 03 ea 1b 52 25 3d 21 5a 25 3a |IN6")....R%=!Z%:| 00008280 e7 52 25 3d 30 8c f2 42 28 22 45 49 4e 35 22 29 |.R%=0..B("EIN5")| 00008290 0d 03 eb 0c e7 52 25 3d 77 79 25 8c 0d 03 ec 11 |.....R%=wy%.....| 000082a0 77 79 25 3d 21 52 25 3a 47 5f 25 3d b9 0d 03 ed |wy%=!R%:G_%=....| 000082b0 1a cd 3a 21 5a 25 3d 21 52 25 3a f2 5a 28 52 25 |..:!Z%=!R%:.Z(R%| 000082c0 29 3a f2 43 79 3a e1 0d 03 ee 0d dd f2 43 79 e7 |):.Cy:.......Cy.| 000082d0 21 60 25 8c 0d 03 ef 10 4f 79 25 3d 4f 79 25 80 |!`%.....Oy%=Oy%.| 000082e0 28 ac 31 29 0d 03 f0 0e cc 4f 79 25 3d 4f 79 25 |(.1).....Oy%=Oy%| 000082f0 84 31 0d 03 f1 07 cd 3a e1 0d 03 f2 35 dd f2 74 |.1.....:....5..t| 00008300 5f ea 75 25 2c 5a 25 2c 73 5f 25 2c 41 25 3a 75 |_.u%,Z%,s_%,A%:u| 00008310 25 3d 21 60 25 3a c8 95 75 25 3a 77 79 25 3d 75 |%=!`%:..u%:wy%=u| 00008320 25 3a 47 5f 25 3d a3 3a e7 75 25 21 34 8c 0d 03 |%:G_%=.:.u%!4...| 00008330 f3 36 73 5f 25 3d a4 5a 28 22 46 4e 5f 4e 75 6c |.6s_%=.Z("FN_Nul| 00008340 6c 5f 52 65 61 73 6f 6e 5f 22 2b 24 28 75 25 2b |l_Reason_"+$(u%+| 00008350 31 32 29 2b 22 28 22 2b c3 28 75 25 21 38 29 2b |12)+"("+.(u%!8)+| 00008360 22 29 22 29 0d 03 f4 27 cc 73 5f 25 3d a4 5a 28 |")")...'.s_%=.Z(| 00008370 22 46 4e 5f 4e 75 6c 6c 5f 52 65 61 73 6f 6e 5f |"FN_Null_Reason_| 00008380 22 2b 24 28 75 25 2b 31 32 29 29 0d 03 f5 0b cd |"+$(u%+12)).....| 00008390 3a e7 47 5f 25 8c 0d 03 f6 0a 75 25 3d 77 79 25 |:.G_%.....u%=wy%| 000083a0 0d 03 f7 17 cc 77 79 25 3d 30 3a 41 25 3d 21 75 |.....wy%=0:A%=!u| 000083b0 25 3a e7 73 5f 25 8c 0d 03 f8 2b 5a 25 3d 60 25 |%:.s_%....+Z%=`%| 000083c0 3a c8 95 21 5a 25 3c 3e 75 25 3a 5a 25 3d 21 5a |:..!Z%<>u%:Z%=!Z| 000083d0 25 3a e7 5a 25 3d 30 8c f2 42 28 22 45 49 4e 32 |%:.Z%=0..B("EIN2| 000083e0 22 29 0d 03 f9 0c ce 3a f2 63 28 5a 25 29 0d 03 |").....:.c(Z%)..| 000083f0 fa 0b cd 3a 75 25 3d 41 25 0d 03 fb 09 cd 3a ce |...:u%=A%.....:.| 00008400 3a e1 0d 03 fc 20 dd a4 5f 4e 75 6c 6c 5f 52 65 |:.... .._Null_Re| 00008410 61 73 6f 6e 5f f2 42 28 22 45 49 4e 31 22 29 3a |ason_.B("EIN1"):| 00008420 3d 30 0d 03 fd 1a dd a4 5f 43 68 65 63 6b 56 61 |=0......_CheckVa| 00008430 72 73 5f 76 65 72 73 69 6f 6e 3d 33 0d 03 fe 22 |rs_version=3..."| 00008440 dd a4 5f 68 61 72 64 5f 69 6e 69 74 69 61 6c 69 |.._hard_initiali| 00008450 73 65 5f 43 68 65 63 6b 56 61 72 73 3d 30 0d 03 |se_CheckVars=0..| 00008460 ff 16 dd a4 5f 63 74 79 70 65 5f 76 65 72 73 69 |...._ctype_versi| 00008470 6f 6e 3d 31 0d 04 00 1e dd a4 5f 68 61 72 64 5f |on=1......_hard_| 00008480 69 6e 69 74 69 61 6c 69 73 65 5f 63 74 79 70 65 |initialise_ctype| 00008490 3d 30 0d 04 01 1d dd a4 55 79 28 51 25 29 3d 51 |=0......Uy(Q%)=Q| 000084a0 25 2d 97 28 22 41 22 29 2b 97 28 22 61 22 29 0d |%-.("A")+.("a").| 000084b0 04 02 22 dd a4 53 79 28 51 25 29 3d 51 25 3e 3d |.."..Sy(Q%)=Q%>=| 000084c0 97 28 22 41 22 29 80 51 25 3c 3d 97 28 22 5a 22 |.("A").Q%<=.("Z"| 000084d0 29 0d 04 03 18 dd a4 54 28 51 25 29 ea 4b 25 3a |)......T(Q%).K%:| 000084e0 e7 a4 53 79 28 51 25 29 8c 0d 04 04 0e 4b 25 3d |..Sy(Q%).....K%=| 000084f0 a4 55 79 28 51 25 29 0d 04 05 0a cc 4b 25 3d 51 |.Uy(Q%).....K%=Q| 00008500 25 0d 04 06 09 cd 3a 3d 4b 25 0d 05 18 05 3a 0d |%.....:=K%....:.| 00008510 05 19 05 3a 0d 05 1a 05 3a 0d 05 1b 0d dd f2 48 |...:....:......H| 00008520 5f f2 41 79 3a e1 0d 05 1c 20 dd f2 4f 5f d5 23 |_.Ay:.... ..O_.#| 00008530 57 25 21 32 30 2c 22 52 75 6e 20 22 2b a4 4d 28 |W%!20,"Run "+.M(| 00008540 4b 79 25 29 3a e1 0d 05 1d 05 3a 0d 05 1e 05 3a |Ky%):.....:....:| 00008550 0d ff |..| 00008552