Home » Recent acquisitions » Acorn ADFS disks » adfs_AcornUser_199804.adf » Features » Organiser/!Upgrade/!Organiser/!RunImage

Organiser/!Upgrade/!Organiser/!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 » Recent acquisitions » Acorn ADFS disks » adfs_AcornUser_199804.adf » Features
Filename: Organiser/!Upgrade/!Organiser/!RunImage
Read OK:
File size: 1519C bytes
Load address: 0000
Exec address: 0000
File contents
    1REM>!RunImage
    2REMProduced by BasCompress v1.71 (19 Sep 1996)
    3PROCYJ:w%=0:pl%=FALSE:ti%=-1:ONERRORPROCNy:ERROREXTERL,REPORT$+" at line "+STR$ERL
    4gu%=-1:Wu%=0:w$="!Organiser":DIMK%512:J%=K%+256:PROCY_:w%=OPENIN"<Organiser$Dir>.Resources.!Language":B$=GET$#w%:CLOSE#w%:w%=0::X=1.26:w%=OPENIN("<Organiser$Dir>.Resources."+B$+".Messages"):IFw%<>0THENX=VALMID$(GET$#w%,2):CLOSE#w%:w%=0ELSEX=0
    5IFX<1.26THEN_$=B$:B$="English"ELSE_$=""
    6v$="<Organiser$Dir>.Resources."+B$:PROCJJ(v$+".Messages"):PROCHJ(FNA("Title"),"<Organiser$Dir>",STR$1.26+" (16 Nov 97)",TRUE):SYS66TOWu%:gu%=Wu%+500:WHILENOTVu%:PROCw(1):ENDWHILE:PROCNy:END
    7DEFPROCNy:IFpl%=TRUETHENSYS&406C2:ERROREXTERL,REPORT$+" at line "+STR$ERL:END
    8pl%=TRUE:h$=REPORT$+" at line "+STR$ERL:Fa%=ERR:ONERRORERROREXTFa%,h$
    9IFw%<>0THENCLOSE#w%:w%=0
   10PROCbJ:PROCi:SYS&400DD:ENDPROC
   11DEFPROCw(Nl%):LOCALA$,Vi%,Ul%,J_%,mJ%:mJ%=FALSE:IFvy%ANDZu%THENPROCPy
   12IFRu%ANDvy%<>Ii%THENIi%=vy%:PROCf(i%,ki%,FNA("Title")+STRING$(-(vy%=TRUE)," *"),TRUE)
   13IFNl%AND1THENUl%=&64
   14IFG$<>""THENUl%=0
   15IF(XJ%<>-1)ANDIy%THENUl%=0
   16Nl%=(Nl%OR(1<<5))ANDNOT(1+(3<<17)):IFUl%>0THEN
   17SYS66TOMa%:WHILEMa%>Wu%:Wu%+=&64:ENDWHILE:SYS&400E1,Nl%,K%,Wu%TOVi%
   18ELSESYS&400C7,Nl%,K%TOVi%
   19ENDIF:CASEVi%OF
   20WHEN0:CASETRUEOF
   21WHENXJ%<>-1ANDIy%:PROCKu
   22WHENWu%>gu%ANDgu%<>-1:PROCU_
   23WHEN(Ul%<>0ORG$<>"")ANDti%<>FNGy:PROCm:PROCa_
   24WHENG$<>"":PROCou
   25ENDCASE
   26WHEN1:PROCIJ
   27WHEN2:IF!K%=T_%THEN
   28PROCPJ
   29ELSE:IF!K%=i%ANDJJ%THENK%!20=0
   30IFNOTFNhyTHENPROCF_
   31SYS&400C5,,K%:IF!K%=i%ANDJJ%THENPROCAu
   32ENDIF
   33WHEN3:CASE!K%OF
   34WHENf%:PROCn
   35WHENT_%:PROCb
   36WHENRy%:PROCYy
   37WHEN_y%:PROCt
   38WHENGJ%:PROCX_
   39WHENGy%:PROCi
   40OTHERWISEPROCX(!K%)
   41ENDCASE
   42WHEN4:IF0<>0THENSYS&400E9,36,,"ptr_default",1
   43WHEN5
   44WHEN6:IFRu%THENPROCe(K%!&C,K%!16,K%!8,!K%,K%!4)
   45WHEN7
   46WHEN8:PROCMu(!K%,K%!4,K%!24)
   47WHEN9:PROCyJ
   48WHEN&B,&C:wJ%=FNz
   49WHEN17,18:PROCyu
   50WHEN19:IFK%!4=vu%ANDK%!16=&4AF80THEN
   51A$=FNN(K%+20):IFuJ%=1ANDFNb("Alias$URLOpen_HTTP")THEN
   52SYS&400DE,"URLOpen_HTTP "+A$
   53ENDIF:IFuJ%=2ANDFNb("Alias$URLOpen_MailTo")THEN
   54SYS&400DE,"URLOpen_MailTo "+A$
   55ENDIF
   56ENDIF
   57ENDCASE:IFVu%THENPROCNy:END
   58ENDPROC
   59DEFFNhy=(Uy%<>K%!16-K%!8ORay%<>K%!&C-K%!4)
   60DEFPROCmLOCALA%,S%,M%,H%,R%,M$,ni%,ji%,oi%,pi%,tl%,I$:IF(Oy%AND4)=4ANDMJ%=0THEN
   61M$=FNZy("%12%mi%se"):H%=VALLEFT$(M$,2):M%=VALMID$(M$,3,2):S%=VALMID$(M$,5,2):M%=M%*6:S%=S%*6:H%=H%*30+M%/&C:tl%=TRUE:SYS46,316,h%,"clock",0TOni%,ji%,oi%,pi%:GCOL1:RECTANGLEFILL0,0,I_%,Pu%:R%=56:ORIGINI_%/2,Pu%/2:GCOLP%(0):CIRCLEFILL0,0,R%:GCOLP%(3)
   62FORA%=0TO330STEP30:LINER%*SINRADA%,R%*COSRADA%,(R%-&A)*SINRADA%,(R%-&A)*COSRADA%:NEXT:GCOLP%(1)+(P%(1)-P%(2))*(x_%ANDNOTRu%):CIRCLE0,0,R%:GCOLP%(5):MOVE0,0:MOVE(R%*0.35)*SINRAD(M%-9),(R%*0.35)*COSRAD(M%-9):PLOT85,(R%*0.35)*SINRAD(M%+9),(R%*0.35)*COSRAD(M%+9):MOVE(R%*0.35)*SINRAD(M%-9),(R%*0.35)*COSRAD(M%-9)
   63PLOT85,(R%*0.7)*SINRADM%,(R%*0.7)*COSRADM%:GCOLP%(4):MOVE0,0:MOVE(R%*0.25)*SINRAD(H%-9),(R%*0.25)*COSRAD(H%-9):PLOT85,(R%*0.25)*SINRAD(H%+9),(R%*0.25)*COSRAD(H%+9):MOVE(R%*0.25)*SINRAD(H%-9),(R%*0.25)*COSRAD(H%-9):PLOT85,(R%*0.5)*SINRADH%,(R%*0.5)*COSRADH%:GCOLP%(6):CIRCLEFILL0,0,2
   64IFOy%AND2THENLINE0,0,(R%*0.9)*SINRADS%,(R%*0.9)*COSRADS%
   65SYS46,ni%,ji%,oi%,pi%
   66ELSE:IF(Oy%AND9)<>0THEN
   67IF(Oy%AND8)=8ORMJ%>0THEN
   68M$=FNUy:IF$DJ%<>M$THEN$DJ%=M$:tl%=TRUE
   69ELSE:IF(Oy%AND16)=0THEN
   70M$=":%mi":IF(Oy%AND2)=2THENM$+=".%se"
   71IFf_%THENM$="%z24"+M$ELSEM$="%z12"+M$+" %am"
   72ELSEM$=N$
   73ENDIF:M$=FNZy(M$):IFM$<>$DJ%THEN$DJ%=M$:tl%=TRUE
   74ENDIF
   75ENDIF
   76ENDIF:IFtl%THEN!K%=-1-7*ABS(b_%):K%!4=j_%:K%!8=0:K%!&C=0:SYS&400CD,,K%:WAIT
   77ENDPROC
   78DEFFNUy:LOCALH%,A$:SYS&400EC,-1,-1TO,,H%:H%=H%DIV&400:A$="k":IFH%>&400ANDGu%THENH%=H%DIV&400:A$="M"
   79=STR$H%+A$
   80DEFPROCa_:IFDy%<>FNTORfy%<>FNIORMy%<>FNRTHEN
   81_J%=FNS(0,0,Dy%,fy%,My%):My%=FNR:fy%=FNI:Dy%=FNT:IFxJ%THENPROCAy
   82IFIy%THENJ_%=0:PROCK
   83Bu%=TRUE:K_%=t%:w_%=v%:PROCxy:PROCx
   84ENDIF:IFxJ%ANDlJ%<>0THENIFFNB(lJ%,FNY)<>1THENPROCmJ
   85IFvJ%<>-1THENIFFNB(vJ%!&C,FNY)<>1THENPROCuu
   86IFW_%>0ANDFNoyTHENVDU7:W_%-=1:IFW_%=0THENW_%=-&A
   87IFW_%<0THENW_%+=1:IFW_%=0THENW_%=&A
   88IFMJ%>0THENMJ%-=1:IFMJ%=0THENPROCh:PROCm
   89ti%=FNGy:ENDPROC
   90DEFFNZy(A$):?J%=3:SYS7,&E,J%:SYS&C1,J%,J%,&80,A$:=FNN(J%)
   91DEFFNe:?J%=3:SYS7,&E,J%:SYS&43049,,J%,J%:=J%
   92DEFFNGy=!(FNe+4)
   93DEFFNi=!(FNe+8)
   94DEFFNc=!(FNe+&C)
   95DEFFNT=!(FNe+16)
   96DEFFNI=!(FNe+20)
   97DEFFNR=!(FNe+24)
   98DEFFNS(qy%,n%,c%,r%,Q%)=qy%OR(n%<<6)OR(c%<<&B)OR(r%<<16)OR(Q%<<20)
   99DEFPROCG(x%,RETURNqy%,RETURNn%,RETURNc%,RETURNr%,RETURNQ%):qy%=x%AND63:n%=(x%>>6)AND31:c%=(x%>>&B)AND31:r%=(x%>>16)AND&F:Q%=(x%>>20)AND&FFF:ENDPROC
  100DEFFNx(x%)=x%ANDNOT&7FF
  101DEFFNty(x%)=x%AND63
  102DEFFNS_(x%)=(x%>>6)AND31
  103DEFFNY=FNS(FNi,FNc,FNT,FNI,FNR)
  104DEFFNB(A%,B%):LOCALXi%,hi%,qi%,vi%,zi%,q_%:LOCALUi%,Ni%,Hi%,ci%,di%:IFA%<>B%THEN
  105PROCG(A%,zi%,vi%,qi%,hi%,Xi%):PROCG(B%,di%,ci%,Hi%,Ni%,Ui%):CASETRUEOF
  106WHENXi%>Ui%:q_%=1
  107WHENXi%<Ui%:q_%=-1
  108WHENhi%>Ni%:q_%=1
  109WHENhi%<Ni%:q_%=-1
  110WHENqi%>Hi%:q_%=1
  111WHENqi%<Hi%:q_%=-1
  112WHENvi%>ci%:q_%=1
  113WHENvi%<ci%:q_%=-1
  114WHENzi%>di%:q_%=1
  115WHENzi%<di%:q_%=-1
  116ENDCASE
  117ELSEq_%=0
  118ENDIF:=q_%
  119DEFPROCcu(a%,Q%,py%):SYS&400ED,256,h%,"tab",,,,J%,J%+&80:PROCXy(J%+&80,py%):SYS46,52+256,h%,"cover",a%,Q%,0,J%,J%+&80:SYS46,52+256,h%,"cover",a%,FNf(Q%+zy%-2*20),0,J%,J%+&80:SYS46,52+256,h%,"tab",a%,Q%,8,J%,J%+&80:SYS46,33+256,h%,"tab"
  120SYS46,52+256,h%,"tab",a%,Q%+zy%-2*20,8,J%,J%+&80:SYS46,33+256,h%,"tab":SYS&400E6,py%:RECTANGLEFILLa%+40,Q%+2*20,-2*20,zy%-4*20:SYS&400E6,6:MOVEa%+40,Q%+2*20:DRAWBY0,zy%-4*20:ENDPROC
  121DEFPROCxu(a%,Q%,py%)a%-=40:SYS&400ED,256,h%,"tab",,,,J%,J%+&80:PROCXy(J%+&80,py%):SYS46,52+256,h%,"cover",a%,Q%,0,J%,J%+&80:SYS46,52+256,h%,"cover",a%,FNf(Q%+zy%-2*20),0,J%,J%+&80:SYS46,47+256,h%,"tab":SYS46,52+256,h%,"tab",a%,Q%,8,J%,J%+&80:SYS46,33+256,h%,"tab"
  122SYS46,52+256,h%,"tab",a%,Q%+zy%-2*20,8,J%,J%+&80:SYS46,33+256,h%,"tab":SYS46,47+256,h%,"tab":SYS&400E6,py%:RECTANGLEFILLa%,Q%+2*20,2*20,zy%-4*20:SYS&400E6,6:MOVEa%,Q%+2*20:DRAWBY0,zy%-4*20:ENDPROC
  123DEFPROCs_(q%,_%,U%):IFq%=i%THENPROCCu(q%,_%,U%)ELSEPROCQu(q%,_%,U%)
  124ENDPROC
  125DEFPROCXy(ty%,Wy%):LOCALby%,l%,py%:by%=ty%?yu%:l%=ty%?ru%:IFWy%<>-1THEN?ty%=ty%?Wy%
  126ty%?&B=by%:ty%?5=l%:ENDPROC
  127DEFPROCCu(q%,_%,U%):T%=TIME:LOCALA%,a%,Q%,Y%,ol%,Ca%,Ja%:SYS46,40+256,h%,"ring"TO,,,Ca%,Ja%:SYS&400E6,1:PROCd(_%,U%,5,-Uy%):PROCd(_%+sJ%+40+40,U%,5+5,-Uy%-5):PROCd(_%,U%,ay%,-5):PROCd(_%,U%-Uy%-5,ay%,5+5):SYS&400ED,256,h%,"cover",,,,J%,J%+&80:PROCXy(J%+&80,-1)
  128SYS46,52+256,h%,"cover_tl",_%+5,U%-5-40,0,J%,J%+&80:SYS46,52+256,h%,"cover_tr",_%+ay%-5-40,U%-5-40,0,J%,J%+&80:SYS46,52+256,h%,"cover_bl",_%+5,U%-Uy%+5,0,J%,J%+&80:SYS46,52+256,h%,"cover_br",_%+ay%-5-40,U%-Uy%+5,0,J%,J%+&80:FORA%=U%-5-40-40TOU%-Uy%/2STEP-40
  129SYS46,52+256,h%,"cover_l",_%+5,A%,0,J%,J%+&80:SYS46,52+256,h%,"cover_r",_%+ay%-5-40,A%,0,J%,J%+&80:NEXT:FORA%=U%-Uy%+5+40TOU%-Uy%/2+40STEP40:SYS46,52+256,h%,"cover_l",_%+5,A%,0,J%,J%+&80:SYS46,52+256,h%,"cover_r",_%+ay%-5-40,A%,0,J%,J%+&80:NEXT
  130FORA%=_%+5+40TO_%+ay%/2STEP40:SYS46,52+256,h%,"cover_t",A%,U%-5-40,0,J%,J%+&80:SYS46,52+256,h%,"cover_b",A%,U%-Uy%+5,0,J%,J%+&80:NEXT:FORA%=_%+ay%-5-2*40TO_%+ay%/2-40STEP-40:SYS46,52+256,h%,"cover_t",A%,U%-5-40,0,J%,J%+&80
  131SYS46,52+256,h%,"cover_b",A%,U%-Uy%+5,0,J%,J%+&80:NEXT:FORA%=U%-Uy%+40TOU%-m%-t%*zy%STEP40:SYS46,52+256,h%,"cover",_%+k_%,A%,0,J%,J%+&80:NEXT:FORA%=U%-5-40-40TOU%-5-40-zy%*t%-40STEP-40:SYS46,52+256,h%,"cover",_%+ay%-5-80,A%,0,J%,J%+&80:NEXT
  132IFFNF(_%+`y%,U%-m%,&64,-k%)THENSYS&400E6,2:RECTANGLEFILL_%+`y%+32,U%-m%-40,&64-2*32-2,-k%+80
  133SYS46,52+256,h%,"cover",_%+ay%-5-80,U%-Uy%+40,0,J%,J%+&80:SYS46,52+256,h%,"cover",_%+`y%+32,U%-m%-40,0,J%,J%+&80:SYS46,52+256,h%,"cover",_%+`y%+32,U%-Uy%+40,0,J%,J%+&80:SYS46,52+256,h%,"fold",_%+`y%-&64/4,U%-m%-k%-40,0,J%,J%+&80
  134SYS46,52+256,h%,"fold",_%+`y%+5*&64/4-6,U%-m%-k%-40,0,J%,J%+&80:SYS46,33+256,h%,"fold":SYS46,52+256,h%,"fold",_%+`y%-0.3*&64,U%-m%,0,J%,J%+&80:SYS46,52+256,h%,"fold",_%+`y%+1.3*&64-6,U%-m%,0,J%,J%+&80:SYS46,33+256,h%,"fold"
  135SYS&400ED,256,h%,"cover",,,,J%,J%+&80:SYS46,52+256,h%,"mid_b",_%+`y%+&64/2-17,U%-Uy%+76,8,J%,J%+&80:SYS46,52+256,h%,"mid_t",_%+`y%+&64/2-17,U%-m%-40,8,J%,J%+&80:SYS&40081,,"Homerton.Medium",&96,&96TOol%:FORA%=1TOB_%:IFt%<A%THEN
  136IFFNF(_%+sJ%,U%-m%-(zy%*A%),40,zy%)THEN
  137PROCcu(_%+sJ%,U%-m%-(zy%*A%),D%(A%)):PROCV(D%(A%),I%(A%)):PROCjy(ol%,M$(A%),0,0,_%+sJ%+40/2,U%-m%-(zy%*(A%-0.5)),1)
  138ENDIF
  139ELSE:IFFNF(_%+k_%,U%-m%-(zy%*A%),40,zy%)THEN
  140PROCxu(_%+k_%+40,U%-m%-(zy%*A%),D%(A%)):PROCV(D%(A%),I%(A%)):PROCjy(ol%,M$(A%),0,0,_%+k_%+40/2,U%-m%-(zy%*(A%-0.5)),-1)
  141ENDIF
  142ENDIF:NEXT:SYS&400E6,0:PROCd(_%+wy%-32,U%-m%,u%+32,-k%):PROCd(_%+my%,U%-m%,u%+32,-k%):SYS&400E6,6:RECTANGLE_%+wy%-32,U%-m%,u%+32,-k%:RECTANGLE_%+my%,U%-m%,u%+32,-k%:a%=_%+`y%+&64/2:Y%=U%-m%-k%/(OJ%+1):FORA%=1TOOJ%:IFFNF(a%-40-8,Y%-&C,2*(40+8),40+&C)AND(qu%AND1<<(A%-1))>0THEN
  143SYS&400ED,256,h%,"ring",,,,J%,J%+&80:SYS46,52+256,h%,"ring",a%-Ca%,Y%-Ja%/2,8,J%,J%+&80
  144ENDIF:Y%-=FNf(k%/(OJ%+1)):NEXT:IFt%>0ANDFNF(_%+my%,U%-m%,u%+32,-k%)ANDNOTAu%THENPROCoy(0,_%+my%,U%-m%)
  145IFFNF(_%+wy%-32,U%-m%,u%+32,-k%)ANDNOTAu%THENPROCoy(1,_%+wy%,U%-m%)
  146SYS&40082,ol%:ENDPROC
  147DEFPROCI(y%,_%,U%):SYS&400ED,256,h%,"corner",,,,J%,J%+&80:IFy%THEN_%+=1
  148IFy%=1ANDFNF(_%+u%,U%-k%,-32,32)THEN
  149SYS46,47+256,h%,"corner":SYS46,52+256,h%,"corner",_%+u%-16*2,U%-k%+2,8,J%,J%+&80:SYS46,47+256,h%,"corner":PROCB_(_%+u%-32,U%,N%(1))
  150ENDIF:IFy%=0THEN
  151IFFNF(_%,U%-k%,32,32)THEN
  152SYS46,52+256,h%,"corner",_%+2,U%-k%+2,8,J%,J%+&80:PROCB_(_%,U%,N%(0))
  153ENDIF
  154ENDIF:ENDPROC
  155DEFPROCB_(_%,U%,RETURNgy%):!J%=i%:IFgy%>=0THENJ%!4=gy%:SYS&400C4,,J%
  156SYS&400CB,,J%:J%!4=_%-J%!4:J%!8=U%-J%!16-k%:J%!&C=J%!4+32:J%!16=J%!8+32:J%!20=&7003119:J%!24=sl%:J%!32=0:IFy%THENJ%!28=Ki%ELSEJ%!28=Yi%
  157SYS&400C2,,J%TOgy%:ENDPROC
  158DEFPROCZu:!J%=i%:IFN%(0)>=0THENJ%!4=N%(0):SYS&400C4,,J%
  159IFN%(1)>=0THENJ%!4=N%(1):SYS&400C4,,J%
  160N%()=-1:ENDPROC
  161DEFPROCQu(q%,_%,U%):LOCALR%,A%,ty%:!J%=q%:J%!4=8:SYS&400CE,,J%:_%+=(J%!8+J%!16)/2:U%+=(J%!&C+J%!20)/2:R%=56:SYS&400E6,1:RECTANGLEFILL0,0,&BB8:SYS&400E6,X%(0):CIRCLEFILL_%,U%,R%:SYS&400E6,X%(3):FORA%=0TO330STEP30:LINE_%+R%*SINRADA%,U%+R%*COSRADA%,_%+(R%-&A)*SINRADA%,U%+(R%-&A)*COSRADA%:NEXT
  162SYS&400E6,X%(1):CIRCLE_%,U%,R%:SYS&400E6,X%(5):A%=60:MOVE_%,U%:MOVE_%+(R%*0.35)*SINRAD(A%-9),U%+(R%*0.35)*COSRAD(A%-9):PLOT85,_%+(R%*0.35)*SINRAD(A%+9),U%+(R%*0.35)*COSRAD(A%+9):MOVE_%+(R%*0.35)*SINRAD(A%-9),U%+(R%*0.35)*COSRAD(A%-9):PLOT85,_%+(R%*0.7)*SINRADA%,U%+(R%*0.7)*COSRADA%
  163SYS&400E6,X%(4):A%=300:MOVE_%,U%:MOVE_%+(R%*0.25)*SINRAD(A%-9),U%+(R%*0.25)*COSRAD(A%-9):PLOT85,_%+(R%*0.25)*SINRAD(A%+9),U%+(R%*0.25)*COSRAD(A%+9):MOVE_%+(R%*0.25)*SINRAD(A%-9),U%+(R%*0.25)*COSRAD(A%-9):PLOT85,_%+(R%*0.5)*SINRADA%,U%+(R%*0.5)*COSRADA%
  164SYS&400E6,X%(6):MOVE_%,U%:DRAWBY0,-(R%*0.9):CIRCLEFILL_%,U%,2:_%-=(J%!8+J%!16)/2:U%-=(J%!&C+J%!20)/2:R%=56:!J%=q%:J%!4=24:SYS&400CE,,J%:_%+=(J%!8+J%!16)/2-20:U%+=(J%!&C+J%!20)/2-20:R%=56:SYS&400ED,256,h%,"cover",,,,J%,J%+&80:ty%=J%+&80
  165A%=ty%?ku%:ty%?5=ty%?hu%:ty%?&B=A%:SYS46,52+256,h%,"cover_tl",_%-40,U%+40,0,J%,J%+&80:SYS46,52+256,h%,"cover_tr",_%+40,U%+40,0,J%,J%+&80:SYS46,52+256,h%,"cover_bl",_%-40,U%-40,0,J%,J%+&80:SYS46,52+256,h%,"cover_br",_%+40,U%-40,0,J%,J%+&80
  166SYS46,52+256,h%,"cover_t",_%,U%+40,0,J%,J%+&80:SYS46,52+256,h%,"cover_b",_%,U%-40,0,J%,J%+&80:SYS46,52+256,h%,"cover_l",_%-40,U%,0,J%,J%+&80:SYS46,52+256,h%,"cover_r",_%+40,U%,0,J%,J%+&80:SYS46,52+256,h%,"cover",_%,U%,0,J%,J%+&80:ENDPROC
  167DEFFNt(j%,TJ%):=LEFT$(FNA("Day"+STR$(((j%-1)MOD7)+1)),TJ%)
  168DEFFNU_(j%,TJ%):LOCALA$,a$:A$=",Monday,Tuesday,Wednesday,Thursday,Friday,Saturday,Sunday,":j%=((j%-1)MOD7)+1:REPEATA$=MID$(A$,INSTR(A$,",")+1):j%-=1:UNTILj%=0:a$=LEFT$(A$,INSTR(A$,",")-1):IFTJ%>0THENa$=LEFT$(a$,TJ%)
  169=a$
  170DEFFNYy(Vl%,TJ%):LOCALA$,s$:A$=",January,February,March,April,May,June,July,August,September,October,November,December,":Vl%=((Vl%-1)MOD&C)+1:REPEATA$=MID$(A$,INSTR(A$,",")+1):Vl%-=1:UNTILVl%<=0:s$=LEFT$(A$,INSTR(A$,",")-1):IFTJ%>0THENs$=LEFT$(s$,TJ%)
  171=s$
  172DEFFNwy(d%):=STR$d%+FNLy(d%)
  173DEFFNLy(d%):LOCALA$,Z$,F$,A%,xy%:A$=FNA("th"):Z$=LEFT$(A$,INSTR(A$,",")-1):WHILEINSTR(A$,",")ANDNOTxy%:A$=MID$(A$,INSTR(A$,",")+1):F$=LEFT$(A$,INSTR(A$,",")-1):IFINSTR(F$,"#")THEN
  174IFRIGHT$(STR$d%,LENF$-1)=MID$(F$,2)THENxy%=TRUE
  175ELSEIFVALF$=d%THENxy%=TRUE
  176ENDIF:ENDWHILE:IFxy%THEN
  177WHILEVALA$>0ORASC(A$)=35:A$=MID$(A$,INSTR(A$,",")+1):ENDWHILE:Z$=LEFT$(A$,INSTR(A$,",")-1)
  178ENDIF:=Z$
  179DEFFNX(Vl%,TJ%):=LEFT$(FNA("Mon"+STR$(((Vl%-1)MOD&C)+1)),TJ%)
  180DEFFNpy(n%,r%,Lu%,f_%):LOCALA$,Z$:IFNOTf_%THEN
  181IFn%>&BTHENZ$=" "+FNA("pm")ELSEZ$=" "+FNA("am")
  182ENDIF:IFn%>&CANDNOTf_%THENn%-=&C
  183IFf_%THENA$=STRING$(-(n%<&A),"0")ELSEIFn%=0THENn%=&C
  184A$+=STR$n%+":"+STRING$(-(r%<&A),"0")+STR$r%:IFLu%<>-1THENA$+=":"+STRING$(-(Lu%<&A),"0")+STR$Lu%
  185=A$+Z$
  186DEFPROCHJ(p$,Zy$,Fy$,ha%):H$=p$:T$=Fy$:`u%=0:Vu%=FALSE:P$=Zy$:v_%=0:r_%=0:Tu%=FALSE:Iy%=FALSE:SYS&400C0,&C8,&4B534154,H$TOba%,vu%:PROCFJ:IFha%THENPROCtu(ta%,v$+".Templates")
  187PROCn_:PROCYu:ENDPROC
  188DEFPROCyu:LOCALS%:CASEK%!16OF
  189WHEN0:Vu%=TRUE
  190WHEN1:PROC_J(K%!40,FNN(K%+44))
  191WHEN3:PROCo_(K%!40,FNN(K%+44))
  192WHEN8:PROCZJ
  193WHEN&400C0:PROCVu(K%!20,K%!24,K%!28)
  194WHEN&400C1:PROCP_
  195WHEN&400C2:IFFNN(K%+28)=H$ANDK%!4<>vu%THEN
  196PROCB(FNA("ErrRun")):PROCgJ(K%!4)
  197ENDIF
  198WHEN&400CC:CASEK%!20OF
  199WHENi%:$(K%+36)=FNA("Title")
  200WHENf%,Ry%:$(K%+36)=FNA("Alarm")
  201WHENsy%:$(K%+36)=FNA("Date")
  202WHENT_%:$(K%+36)=FNA("Settings")
  203WHEN_y%,GJ%:$(K%+36)=FNA("AnnTab")
  204WHENJy%:$(K%+36)=FNA("Setclock")
  205ENDCASE:!K%=56:$(K%+28)="org":S%=K%!4:K%!4=vu%:SWAPK%!8,K%!&C:SYS&400E7,17,K%,S%
  206ENDCASE:ENDPROC
  207DEFFNQy(Bl%,S$):SYS&400CF,,J%:=((Bl%=&FFF)OR(Bl%=&DFE))ORJ%!&C=f%
  208DEFPROCo_(Bl%,S$):LOCALw%:IFFNQy(Bl%,S$)THEN
  209SWAPK%!8,K%!&C:K%!16=4:SYS&400E7,17,K%,K%!4:IFJ%!&C<>f%THEN
  210IFGy%<>-1THENPROCi
  211OSCLI"Copy "+S$+" "+P$+".Import ~c ~v f":IFS$="<Wimp$Scrap>"THENOSCLI"Remove <Wimp$Scrap>"
  212PROCRJ(P$+".Import")
  213ELSEPROCu_(S$)
  214ENDIF
  215ENDIF:ENDPROC
  216DEFFNly(ya%,hy%):LOCALZy%,A%:Zy%=-1:IFky%=A%(6)ANDU_%>1ANDU_%<6THEN
  217IF!ya%=0THENA%=FN_(ky%,U_%)ELSEA%=FNu(ky%,U_%)
  218PROCW(Ay%,0,-1):Zy%=Ay%:PROCS(Ay%,A%,1)
  219ENDIF:=Zy%
  220DEFFNCy:LOCALhy%,R%,A$,Z$:IFvy%THEN
  221A$=FNA("QButtons"):Z$=FNA("ErrSave"):!J%=0:$(J%+4)=Z$:SYS&400DF,J%,280,"Message from "+H$,w$,-1,A$TO,R%:IFR%=3THENPROCPy
  222ENDIF:=R%<>4
  223DEFPROCP_LOCALza%,aa%,M%:IF(Oy%AND4)>0THEN
  224IFFNHy(MODE)THENM%=20ELSEM%=&C
  225SYS&2002E,281,h%,"clock":SYS53,M%,4TO,,za%:SYS53,M%,5TO,,aa%:SYS46,8+512,h%TO,,,,,F%:SYS46,271,h%,"clock",0,&74/(1<<za%),&78/(1<<aa%),M%:PROCm
  226ENDIF:ENDPROC
  227DEFPROCe(q%,s%,g%,Yy%,ry%)LOCALA%,B%,A$,H_%:K_%=t%:w_%=v%:H_%=1+2*(g%=1):CASEq%OF
  228WHENi%:!K%=i%:SYS&400CB,,K%:_%=K%!4-K%!20:U%=K%!16-K%!24:PROCm_(s%,g%,Yy%-_%,ry%-U%,_%,U%)
  229WHEN-2:CASEg%OF
  230WHEN1:PROCs(Dy%,fy%,My%)
  231WHEN2:LJ%=-1:PROCF(kJ%,Yy%,FNVy(kJ%),q%,s%)
  232WHEN4:CASETRUEOF
  233WHENINKEY-1:IFTy%=0THENPROCUyELSEPROCIy
  234WHENINKEY-3:MJ%=5:PROCh
  235OTHERWISEPROCr(i%,-1,-1)
  236ENDCASE
  237ENDCASE
  238WHENsy%:CASEs%OF
  239WHEN0:PROCW(z_%,0,-1):PROCS(z_%,PJ%-1,TRUE):PROCF(z_%,Yy%,ry%,q%,s%)
  240WHEN2,3:PROCDy(-1,-1,(1+2*(s%=2))*H_%*(1-49*(INKEY-1)))
  241WHEN35:PROCny:IFg%<>1THENPROCX(sy%)
  242WHEN36:PROCX(sy%)
  243OTHERWISE:IFg%=2THEN
  244PROCW(z_%,0,-1):PROCS(z_%,PJ%-1,TRUE):PROCF(z_%,Yy%,ry%,q%,s%)
  245ELSEPROCDy(s%-3,-1,0):IFg%<256THENPROCny
  246ENDIF
  247ENDCASE
  248WHENJy%:IFg%<>2THEN
  249CASEs%OF
  250WHEN1:PROCe(Jy%,9+FNZ(Jy%,1),4,0,0)
  251WHEN2:PROC`(X_%,V_%,L_%,Jy%,s%)
  252WHEN3:IFFNXy(VALFNM(Jy%,4),VALFNM(Jy%,5))THEN
  253IFFNj<>FNZ(Jy%,1)THENPROCMy(-1)
  254A%=VALFNM(Jy%,4):A$=STR$A%:A$=STRING$(2-LENA$,"0")+A$:$J%=CHR$24+FNU_(FNH(X_%,V_%,L_%),3)+","+STRING$(-(X_%<&A),"0")+STR$X_%+" "+FNYy(V_%,3)+" "+STR$L_%+"."+A$+":"+FNM(Jy%,5)+":00":SYS&20007,&F,J%TO;B%:IFg%=4THENPROCX(Jy%)
  255ENDIF
  256WHEN8:A%=VALFNM(Jy%,4)+H_%:IFA%=24THENA%=0:PROCP(X_%,V_%,L_%,1,0,0):PROCA(Jy%,2,FNU(X_%,V_%,L_%,TRUE))
  257IFA%=-1THENA%=23:PROCP(X_%,V_%,L_%,-1,0,0):PROCA(Jy%,2,FNU(X_%,V_%,L_%,TRUE))
  258PROCA(Jy%,4,STR$A%)
  259WHEN9:A%=VALFNM(Jy%,4)-H_%:IFA%=-1THENA%=23:PROCP(X_%,V_%,L_%,-1,0,0):PROCA(Jy%,2,FNU(X_%,V_%,L_%,TRUE))
  260IFA%=24THENA%=0:PROCP(X_%,V_%,L_%,1,0,0):PROCA(Jy%,2,FNU(X_%,V_%,L_%,TRUE))
  261PROCA(Jy%,4,STR$A%)
  262WHEN&A,&C:A%=VALFNM(Jy%,5)+(1-9*(s%=&A))*H_%:IFA%>59THENA%-=60:PROCe(Jy%,8,4,0,0)
  263IFA%<0THENA%+=60:PROCe(Jy%,9,4,0,0)
  264PROCA(Jy%,5,STRING$(2-LENSTR$A%,"0")+STR$A%)
  265WHEN&B,&D:A%=VALFNM(Jy%,5)-(1-9*(s%=&B))*H_%:IFA%>59THENA%-=60:PROCe(Jy%,8,4,0,0)
  266IFA%<0THENA%+=60:PROCe(Jy%,9,4,0,0)
  267PROCA(Jy%,5,STRING$(2-LENSTR$A%,"0")+STR$A%)
  268ENDCASE
  269ENDIF
  270WHENf%:PROCpu(Yy%,ry%,q%,s%,H_%)
  271WHENRy%:PROC`J(Yy%,ry%,q%,s%)
  272WHENMu%:PROCU_
  273WHEN_y%:PROCrJ(s%,Yy%,ry%)
  274WHENT_%,Ty%:PROCHu(q%,s%,g%,Yy%,ry%)
  275WHENGJ%:PROCX_
  276WHENGy%:PROCi_(q%,s%,g%,Yy%,ry%)
  277OTHERWISEPROCXJ(q%,s%,g%,Yy%,ry%)
  278ENDCASE:PROCBy:ENDPROC
  279DEFPROCm_(s%,g%,a%,Q%,i_%,qJ%):LOCALoa%,ia%,A%,VJ%:A%=g%-3-(g%=1):IFg%<>2THEN
  280IFs%>=0ANDg%<>2THEN
  281CASEs%OF
  282WHENN%(0):PROCK_(-A%)
  283WHENN%(1):PROCK_(A%)
  284OTHERWISEPROCp_(s%)
  285ENDCASE
  286ELSE:FORA%=1TOB_%:IFt%<A%THENX%=sJ%ELSEX%=k_%
  287IFFNm(a%,Q%,X%,-m%-A%*zy%,40,zy%)THEN
  288IFg%<>2THENt%=A%:v%=S%(t%)
  289ENDIF:NEXT
  290ENDIF
  291ENDIF:IF(s%=-1ORg%=2)ANDFNm(a%,Q%,my%,-m%,u%,-k%)THENPROCiy(g%,FALSE,a%-my%,Q%+m%,i_%,qJ%)
  292IF(s%=-1ORg%=2)ANDFNm(a%,Q%,wy%,-m%,u%,-k%)THENPROCiy(g%,TRUE,a%-wy%,Q%+m%,i_%,qJ%)
  293IFg%=2THEN
  294IFT%(t%)<>-1THENPROCF(T%(t%),Yy%,ry%,q%,s%)
  295ELSEIFNOTVJ%THENPROCC(i%,-1)
  296ENDIF:ENDPROC
  297DEFPROCBy:IFK_%=t%THEN
  298IFv%<>w_%ANDJ_%=0THENJ_%=1+2*(v%<w_%)
  299ELSEPROCQ_(K_%):PROCC(i%,-1):J_%=1+2*(t%<K_%)
  300ENDIF:IF(mJ%ORJ_%<>0)ANDIy%THENPROCK
  301S%(K_%)=w_%:S%(t%)=v%:IFK_%<>t%THENPROCmy(t%):PROCIu
  302ENDPROC
  303DEFPROCK:PROCZu:PROCRu(J_%):PROCN(i%,my%,-m%,my%+u%,-m%-k%):PROCN(i%,wy%,-m%,wy%+u%,-m%-k%):ENDPROC
  304DEFPROCIu:PROCN(i%,k_%,-m%,k_%+40,-m%-k%):PROCN(i%,sJ%,-m%,sJ%+40,-m%-k%):PROCN(i%,`y%,-m%,`y%+32,-m%-k%):ENDPROC
  305DEFPROCr(q%,dJ%,al%):LOCALA%:A%=Iy%:IFq%=i%THEN
  306IFeJ%<>-1THEN
  307!J%=i%:SYS&400CB,,J%:J%!4=eu%:J%!8=su%-Uy%:J%!&C=eu%+ay%:J%!16=su%:J%!28=dJ%:SYS&400C5,,J%:PROCz(i%,dJ%,0)
  308ELSEPROCz(q%,dJ%,al%)
  309ENDIF:IFNOTA%THENPROCC(i%,-1)
  310ELSEPROCz(q%,dJ%,al%)
  311ENDIF:ENDPROC
  312DEFPROCRu(A%):IFSu%ANDA%<>0THEN
  313LOCALdu%,a%,_%,U%,py%,`%,R%,C%:!J%=i%:SYS&400CB,,J%:_%=J%!4-J%!20:U%=J%!16-J%!24:py%=_%+wy%-(&64)DIV2:`%=(&64/2-32):R%=u%+&64/2:SYS&40742,0TOC%:C%+=3<<4:FORa%=0TO&B4STEP&F:PROCky(a%,A%):T%=TIME:REPEATUNTILTIME>T%+1:PROCky(a%,A%):NEXT
  314ENDIF:ENDPROC
  315DEFPROCky(a%,A%):!J%=i%:J%!4=0:J%!8=-Uy%:J%!&C=ay%:J%!16=0:IFA%=-1THENa%=&B4-a%
  316SYS&400C9,,J%TOdu%:WHILEdu%:SYS&400E6,C%:MOVEpy%+`%*COSRADa%,U%-m%+0.2*`%*SINRADa%:DRAWpy%+R%*COSRADa%,U%-m%+0.2*R%*SINRADa%:DRAWBY0,-k%:DRAWpy%+`%*COSRADa%,U%-m%-k%:DRAWpy%+`%*COSRADa%,U%-m%+0.2*`%*SINRADa%:SYS&400CA,,J%TOdu%:ENDWHILE:ENDPROC
  317DEFPROCyJLOCALA%,C%,_i%,K_%,w_%,oa%:_i%=FNDy:K_%=t%:w_%=v%:CASEbJ%OF
  318WHENkJ%:CASE!K%OF
  319WHEN0
  320WHEN1:PROCs(Dy%,fy%,My%)
  321WHEN2:!K%=-1:K%!4=j_%:SYS&400CE,,K%:!J%=Jy%:SYS&400CB,,J%:J%!4=K%!16-(J%!&C-J%!4):J%!&C=K%!16:J%!16=&88+(J%!16-J%!8):J%!28=-1:SYS&400C5,,J%:PROCA(Jy%,2,FNU(Dy%,fy%,My%,-1)):X_%=Dy%:V_%=fy%:L_%=My%:PROCA(Jy%,4,STR$FNc):A%=FNi:PROCA(Jy%,5,STRING$(2-LENSTR$A%,"0")+STR$A%)
  322SYS6,&A1,&DCTO,,A%:PROCZ(Jy%,1,ABS((A%AND&80)=&80))
  323WHEN3:IFK%!4>-1THEN
  324PROCW(Wl%,0,-1):PROCS(Wl%,K%!4,1):wu%=K%!4:PROCqy
  325ELSEPROCqy
  326ENDIF
  327WHEN4:IFTy%=0THENPROCUyELSEPROCIy
  328WHEN5:PROCPy
  329WHEN6:Vu%=FNCy
  330ENDCASE
  331WHENT%(t%):PROChu(K%,t%)
  332WHENz_%:PROCDy(-1,!K%,0)
  333WHENXl%:CASEky%OF
  334WHENf%:nJ%=!K%:IF!K%>0THENC%=!K%ELSEC%=n_%
  335FORA%=16TO18:PROCD(f%,A%,C%):NEXT
  336WHEN_y%:Zi%=!K%:IF!K%=0THENA%=SJ%ELSEA%=!K%
  337PROCD(_y%,4,A%)
  338ENDCASE
  339WHENZl%:PROCWJ(U_%,!K%)
  340WHENiJ%:U%(0)=!K%:PROCFy(A%(6),18,U%()):PROCW(iJ%,0,-1):PROCS(iJ%,U%(0),-1)
  341OTHERWISE:CASEky%OF
  342WHENA%(6):CASEU_%OF
  343WHEN2,3,4,5:IFK%!4<>-1THEN
  344IF!K%=0THENPROCD(ky%,U_%,K%!4)ELSEPROCg(ky%,U_%,K%!4)
  345PROCW(Ay%,0,-1):PROCS(Ay%,K%!4,-1)
  346ENDIF
  347WHEN9,&A,&B,&C,&D,&E,&F:X%(U_%-9)=!K%:PROCW(Ay%,0,-1):PROCS(Ay%,!K%,-1):!J%=ky%:J%!4=8:SYS&400CE,,J%:PROCN(ky%,J%!8,J%!20,J%!16,J%!&C)
  348WHEN20,21:U%(U_%-19)=!K%:PROCW(Ay%,0,-1):PROCS(Ay%,!K%,-1):PROCFy(A%(6),18,U%())
  349WHEN25:A$=FNA("Cov"+STR$(!K%+1)):A$=MID$(A$,INSTR(A$,",")+1):ku%=VALA$:A$=MID$(A$,INSTR(A$,",")+1):hu%=VALA$:!J%=ky%:J%!4=24:SYS&400CE,,J%:PROCN(ky%,J%!8,J%!20,J%!16,J%!&C)
  350WHEN26:PROCW(Ay%,0,-1):ku%=!K%:PROCS(Ay%,!K%,1):!J%=ky%:J%!4=24:SYS&400CE,,J%:PROCN(ky%,J%!8,J%!20,J%!16,J%!&C)
  351WHEN27:PROCW(Ay%,0,-1):hu%=!K%:PROCS(Ay%,!K%,1):!J%=ky%:J%!4=24:SYS&400CE,,J%:PROCN(ky%,J%!8,J%!20,J%!16,J%!&C)
  352ENDCASE
  353WHENTy%:PROCvJ(K%)
  354WHENf%,Ry%:PROCA_(bJ%,K%)
  355OTHERWISEPROCdJ(bJ%,K%)
  356ENDCASE
  357ENDCASE:IF_i%THENPROCF(bJ%,-1,-1,ky%,U_%)
  358PROCBy:ENDPROC
  359DEFPROCqy:LOCALA$,A%:CASEwu%OF
  360WHEN1:OSCLI"Filer_Run "+P$+".!HTMLHelp"
  361WHEN2:SYS&2001E,18,"StrongHelp"TO;A%:IFA%AND1THEN
  362IFFNb("StrongHelp$Dir")THEN
  363SYS&400DE,"<StrongHelp$Dir>.!Run":OSCLI"StrongHelp <Organiser$Dir>.Organiser !Root"
  364ELSEPROCB(FNA("ErrStrong"))
  365ENDIF
  366ELSEOSCLI"StrongHelp <Organiser$Dir>.Organiser !Root"
  367ENDIF
  368OTHERWISEOSCLI"Filer_Run "+P$+".!Help"
  369ENDCASE:ENDPROC
  370DEFPROCF(Zy%,a%,Q%,x%,Fy%)LOCALA%:IF(Zy%=kJ%ORZy%=T%(t%))ANDZy%<>-1THEN
  371PROCS(Ql%,0,cy%=1):PROCS(Ql%,1,cy%=2):FORA%=0TO2:PROCT(wi%,A%,-(LJ%<=0)):NEXT
  372ENDIF:SYS&400D4,,Zy%,a%-64,Q%:bJ%=Zy%:ky%=x%:U_%=Fy%:ENDPROC
  373DEFPROCMu(q%,s%,By%)LOCALw_%,oa%,A%,B%,A$,Z$:K_%=t%:w_%=v%:o%=FALSE:CASEq%OF
  374WHENi%:o%=FNny(s%,By%)
  375WHEN-1
  376WHENT_%,Ty%:o%=FNM_(q%,s%,By%)
  377WHENJy%
  378OTHERWISEo%=FNcy(q%,s%,By%)
  379ENDCASE:IFo%=FALSETHEN
  380o%=TRUE:CASEBy%OF
  381WHEN27:IFTy%<>0THENPROCb
  382WHEN385:PROCqy
  383WHEN386:IFTy%=0THENPROCUyELSEPROCIy
  384WHEN387:PROCPy
  385WHEN81-65+1:Vu%=FNCy
  386WHEN83-65+1:o%=FALSE:IFs%<>-1ANDIu%THEN
  387SYS&400D3,,K%:A%=K%!20:Z$=FNM(q%,s%):IFA%>0THENA$=MID$(Z$,A%,1)ELSEA$=""
  388IF(A$>="A"ANDA$<="Z")OR(A$>="a"ANDA$<="z")THEN
  389Z$=LEFT$(Z$,A%-1)+CHR$((ASCA$)EOR32)+MID$(Z$,A%+1):o%=TRUE:PROCA(q%,s%,Z$)
  390ENDIF
  391ENDIF
  392OTHERWISEo%=FALSE
  393ENDCASE:IFBy%>=401ANDBy%<=400+B_%THENt%=By%-400:v%=S%(t%):o%=TRUE
  394ENDIF:PROCBy:IFNOTo%THENSYS&400DC,By%
  395wJ%=FNz:ENDPROC
  396DEFPROCC(q%,s%):!J%=q%:J%!4=s%:SYS&400CE,,J%:SYS&400D2,q%,s%,,,-1,LENFNN(J%!28):wJ%=FNz:ENDPROC
  397DEFFNz:SYS&400D3,,J%:=(!J%<<16)OR(J%!4AND&FF)OR((J%!20AND&FF)<<8)
  398DEFPROCq(A$):WHILELEFT$(A$,1)=" ":A$=MID$(A$,2):ENDWHILE:IFA$<>""THENG$+=A$+CHR$&D
  399ENDPROC
  400DEFPROCou:SYS&400D3,,K%:IF!K%<>i%AND!K%<>Cy%ANDZ%(t%)=2AND!K%<>-1THENSYS&400DC,ASCLEFT$(G$,1):G$=MID$(G$,2)
  401ENDPROC
  402DEFPROCU_:!J%=Mu%:SYS&400C3,,J%:gu%=-1:ENDPROC
  403DEFPROCOy:Au%=TRUE:PROCwy(0,0,0,0,0,FALSE,FALSE):PROCw(0):Au%=FALSE:XJ%=-1:ENDPROC
  404DEFPROCR_(ei%,q%,a%,Q%,wl%,Ji%,Pi%):IFSu%ANDIy%THEN
  405XJ%=q%:r_%=ei%:Gl%=a%:zl%=Q%:Tu%=wl%:ul%=Ji%:ml%=Pi%:!J%=20:J%!&C=0:SYS&400E7,0,J%,vu%:Au%=TRUE
  406ELSEPROCwy(ei%,q%,a%,Q%,wl%,Ji%,Pi%):XJ%=-1
  407ENDIF:ENDPROC
  408DEFPROCKu:PROCwy(r_%,XJ%,Gl%,zl%,Tu%,ul%,ml%):IFXJ%=Cy%
  409XJ%=-1:Au%=FALSE:ENDPROC
  410DEFPROCUy:LOCALA%,x%,n%,A$:A%=A%(1):PROCZ(A%,1,-x_%):PROCZ(A%,2,-iu%):PROCZ(A%,3,-bu%):PROCZ(A%,4,-Su%):PROCZ(A%,7,-((Oy%AND9)=0)):PROCZ(A%,8,-((Oy%AND4)>0)):PROCZ(A%,9,-((Oy%AND5)=1)):PROCZ(A%,22,-((Oy%AND8)=8)):PROCZ(A%,23,-(xJ%=-1)):PROCZ(A%,&A,-((Oy%AND2)>0)):PROCZ(A%,&B,-f_%)
  411PROCZ(A%,24,-((Oy%AND16)=16)):PROCA(A%,25,N$):PROCZ(A%,&F,-Ju%):PROCZ(A%,16,-Zu%):PROCZ(A%,&E,-(eJ%=-1)):PROCZ(A%,19,-(eJ%<>-1)):PROCZ(A%,20,-(b_%=-1)):PROCZ(A%,21,-NOT(JJ%)):PROCM(A%,&B,ABSNOT(FNZ(A%,9)ANDNOTFNZ(A%,24))):PROCM(A%,&A,ABSNOT(FNZ(A%,8)OR(FNZ(A%,9)ANDNOTFNZ(A%,24)))):PROCM(A%,24,ABSNOTFNZ(A%,9))
  412PROCM(A%,25,ABSNOT(FNZ(A%,9)ANDFNZ(A%,24))):FORx%=OJ%-1TO0STEP-1:A$+=STR$((qu%>>x%)AND1):NEXT:PROCA(A%,18,A$):PROCZ(A%,28,-Iu%):PROCZ(A%,29,-Gu%):PROCM(A%,29,-NOTFNZ(A%,22)):PROCA(A%,27,B$):PROCZ(A%,32,-(Ky%?3=1)):FORx%=33TO34:PROCM(A%,x%,-(Ky%?3=0)):NEXT:PROCZ(A%,33,-(Ky%?2=0)):PROCZ(A%,34,-(Ky%?2=1))
  413PROCA(A%,36,STRING$(2-LENSTR$Ky%?1,"0")+STR$Ky%?1+"00"):PROCA(A%,39,STRING$(2-LENSTR$Ky%?0,"0")+STR$Ky%?0+"00"):ku%=yu%:hu%=ru%:FORx%=35TO42:PROCM(A%,x%,-((Ky%?3=0)OR(Ky%?2=0))):NEXT:PROCA(A%,&D,D$):PROCXu:!J%=T_%:SYS&400CB,,J%:x%=J%!&C-J%!4:n%=J%!16-J%!8:J%!4=(FNg-x%)/2:J%!16=FNd-(FNd-n%)/2
  414J%!28=-1:SYS&400C5,,J%:PROCey(1):X%()=P%():U%()=H%():PROCFy(A%(6),18,H%()):FORA%=2TO5:PROCg(A%(6),A%,D%(A%-1)):PROCD(A%(6),A%,I%(A%-1)):NEXT:ENDPROC
  415DEFPROCIy:!J%=Ty%:SYS&400CB,,J%:J%!28=-1:SYS&400C5,,J%:!J%=T_%:SYS&400CB,,J%:J%!28=Ty%:SYS&400C5,,J%:ENDPROC
  416DEFPROCly:LOCALA%,C%,A$:A%=A%(1):B%=Oy%:x_%=FNZ(A%,1):iu%=FNZ(A%,2):bu%=FNZ(A%,3):Su%=FNZ(A%,4):D$=FNM(A%,&D):f_%=FNZ(A%,&B):Oy%=-FNZ(A%,9)-5*FNZ(A%,8)-8*FNZ(A%,22)-2*FNZ(A%,&A)-16*FNZ(A%,24):Ju%=FNZ(A%,&F):Zu%=FNZ(A%,16):PROCzJ(NOTFNZ(A%,21))
  417eJ%=FNZ(A%,&E):xJ%=FNZ(A%,23):N$=FNM(A%,25):Iu%=FNZ(A%,28):Gu%=FNZ(A%,29):!Ky%=((VALFNM(A%,36)DIV&64)<<8)+(VALFNM(A%,39)DIV&64):!Ky%+=(((-FNZ(A%,32))<<24)+((-FNZ(A%,34))<<16)):IFNOTeJ%THEN
  418!J%=i%:SYS&400CB,,J%:eu%=J%!4:nl%=J%!8:gl%=J%!&C:su%=J%!16
  419ENDIF:C%=FNZ(A%,20):IFC%<>b_%THENb_%=C%ELSEb_%=C%
  420A$=FNM(A%,18):IFA$=""THENA$="1"
  421OJ%=LENA$:qu%=EVAL("%"+A$):P%()=X%():H%()=U%():A$=FNM(A%,27):IFA$<>B$THENPROCLu(A$)
  422FORA%=2TO5:D%(A%-1)=FNu(A%(6),A%):I%(A%-1)=FN_(A%(6),A%):NEXT:yu%=ku%:ru%=hu%:PROCau:IFIy%THENSYS&400D1,i%,0,-&BB8,&BB8,0
  423MJ%=0:PROCh:PROCm:PROCh:ENDPROC
  424DEFPROCLu(A$):w%=OPENOUT"<Organiser$Dir>.Resources.!Language":BPUT#w%,A$:CLOSE#w%:w%=0:PROCB(FNA("ErrReload")):ENDPROC
  425DEFPROCey(I%):IFTy%<>0THEN!J%=Ty%:SYS&400C6,,J%
  426!J%=T_%:SYS&400CB,,J%:Ty%=A%(I%):!J%=Ty%:J%!4+=22:J%!16-=70:J%!8=J%!16-272:SYS&400C5,,J%:!J%=T_%:J%!4=&B:J%!8=1<<23:J%!&C=1<<23:SYS&400CD,,J%:J%!4=J%!88-1:SYS&400C4,,J%:J%!4=I%:SYS&400CE,,J%:J%!4=J%!8+4:J%!8=J%!&C-8:J%!&C=J%!16-4:J%!16=J%!8+&C
  427J%!20=&17000021:J%?24=0:SYS&400C2,,J%TOI%:J%!4=I%:J%!8=0:J%!&C=0:SYS&400CD,,J%:ENDPROC
  428DEFPROCPJ:!J%=Ty%:SYS&400CB,,J%:J%!4=K%!4+22:J%!16=K%!16-70:J%!8=J%!16-272:J%!28=K%!28:SYS&400C5,,J%:K%!28=Ty%:SYS&400C5,,K%:ENDPROC
  429DEFPROCHu(q%,s%,g%,a%,Q%):LOCALA%:CASEq%OF
  430WHENT_%:CASEs%OF
  431WHEN1,2,3,4,5,6:PROCey(s%)
  432WHEN8:PROCb
  433WHEN9:PROCly:vy%=-1:IFg%<>1THENPROCb
  434WHEN&A:PROCly:PROCW_:IFg%<>1THENPROCb
  435ENDCASE
  436WHENA%(1):CASEs%OF
  437WHEN&F:IFg%<&AANDg%<>2THENPROCB(FNA("ErrReload"))
  438WHEN7,8,9,22,&E,19:IFg%<>2THEN
  439PROCZ(q%,s%,1):PROCM(q%,&B,ABSNOT(FNZ(q%,9)ANDNOTFNZ(q%,24))):PROCM(q%,&A,ABSNOT(FNZ(q%,8)OR(FNZ(q%,9)ANDNOTFNZ(q%,24)))):PROCM(q%,24,ABSNOTFNZ(q%,9)):PROCM(q%,25,ABSNOT(FNZ(q%,9)ANDFNZ(q%,24))):PROCM(q%,29,-NOTFNZ(q%,22))
  440ENDIF
  441WHEN24:PROCM(q%,25,ABSNOTFNZ(q%,24)):PROCM(q%,&A,ABSFNZ(q%,24)):PROCM(q%,&B,ABSFNZ(q%,24))
  442WHEN27:PROCw_(A%(1),27)
  443WHEN32:FORA%=33TO34:PROCM(q%,A%,-NOTFNZ(q%,32)):NEXT:FORA%=35TO42:PROCM(q%,A%,-((NOTFNZ(q%,32))OR(FNZ(q%,33)))):NEXT
  444WHEN33,34:PROCZ(q%,s%,1):FORA%=35TO42:PROCM(q%,A%,-FNZ(q%,33)):NEXT
  445WHEN35,38:A%=VALFNM(q%,s%+1)-&64:IFA%=-&64THENA%=&8FC
  446PROCA(q%,s%+1,STRING$(4-LENSTR$A%,"0")+STR$A%)
  447WHEN37,40:A%=VALFNM(q%,s%-1)+&64:IFA%=&960THENA%=0
  448PROCA(q%,s%-1,STRING$(4-LENSTR$A%,"0")+STR$A%)
  449ENDCASE
  450WHENA%(6):CASEs%OF
  451WHEN2,3,4,5:!oJ%=FNqy(A%(6),s%):PROCF(oJ%,a%,Q%,q%,s%)
  452WHEN9,&A,&B,&C,&D,&E,&F:PROCW(Ay%,0,-1):PROCS(Ay%,X%(s%-9),-1):PROCF(Ay%,a%,Q%,q%,s%)
  453WHEN19:PROCW(iJ%,0,-1):PROCS(iJ%,U%(s%-19),-1):PROCF(iJ%,a%,Q%,q%,s%)
  454WHEN20,21:PROCW(Ay%,0,-1):PROCS(Ay%,U%(s%-19),-1):PROCF(Ay%,a%,Q%,q%,s%)
  455WHEN25:PROCF(Ya%,a%,Q%,q%,s%)
  456WHEN26:PROCW(Ay%,0,-1):PROCS(Ay%,ku%,-1):PROCF(Ay%,a%,Q%,q%,s%)
  457WHEN27:PROCW(Ay%,0,-1):PROCS(Ay%,hu%,-1):PROCF(Ay%,a%,Q%,q%,s%)
  458ENDCASE
  459OTHERWISEPROCaJ(q%,s%,g%,a%,Q%)
  460ENDCASE:ENDPROC
  461DEFFNM_(q%,s%,g%):CASEq%OF
  462WHENT_%,A%(1):o%=FALSE
  463OTHERWISEo%=FNdy(q%,s%,g%)
  464ENDCASE:=o%
  465DEFPROCb:PROCX(Ty%):Ty%=0:PROCX(T_%):IFIy%THENPROCC(i%,-1)
  466ENDPROC
  467DEFPROCw_(x%,Fy%):LOCALql%,m$,Wy%,K$,q$,t$,`%:ql%=1:m$=FNM(x%,Fy%):REPEAT:SYS&C,9,"<Organiser$Dir>.Resources",K%,1,ql%,256,0TO,,,`%,ql%:IF`%=1THEN
  468q$=FNN(K%):IFt$=""THENt$=q$
  469IFWy%=TRUETHENK$=q$
  470IFq$=m$THENWy%=TRUE
  471ENDIF:UNTILql%=-1ORK$<>"":IFK$=""THENK$=t$
  472PROCA(x%,Fy%,K$):ENDPROC
  473DEFPROC`(c%,r%,Q%,x%,Fy%):LOCALM%,A%:_i%=FALSE:PROCA(sy%,0,FNJy(c%,r%,Q%,-1)):M%=FND(r%,Q%):FORA%=29TO31:PROCR(sy%,A%+3,-(A%>M%)):NEXT:FORA%=1TOM%:PROCu(A%,A%=c%):NEXT:PJ%=r%:PROCA(sy%,1,STR$Q%):PROCr(sy%,-1,1):Ga%=x%:xa%=Fy%:ENDPROC
  474DEFPROCny:LOCALd%,z%,e%,A$:PROCX(sy%):CASEGa%OF
  475WHENf%:PROCA(f%,1,FNo(Q_%,N_%,AJ%)):PROCO(0,0)
  476WHENe_%:A$=FNo(d%,z%,e%):K_%=t%:w_%=v%:PROCH(d%,z%,e%)
  477WHENJy%:PROCA(Jy%,2,FNo(X_%,V_%,L_%))
  478ENDCASE:ENDPROC
  479DEFPROCu(c%,F%):!J%=sy%:J%!4=c%+3:SYS&400CE,,J%:$J%!32="R"+STR$(1-F%)+";F"+STR$(1-F%)+"7":IFF%THENau%=c%
  480IFIa%THENJ%!8=0:J%!&C=0ELSEJ%!8=(1+ABS(F%))<<28:J%!&C=&F<<28
  481SYS&400CD,,J%:ENDPROC
  482DEFPROCDy(c%,r%,Qy%):LOCALA%,M%,Q%,A$:IFc%<>-1THENPROCu(au%,FALSE):PROCu(c%,TRUE)
  483IFr%<>-1THENPROCS(z_%,PJ%-1,FALSE):PJ%=!K%+1:PROCS(z_%,PJ%-1,TRUE)
  484IFQy%<>0THENQ%=VALFNM(sy%,1)+Qy%:IFQ%>=&77dANDQ%<=&fffTHENPROCA(sy%,1,STR$Q%)ELSEQ%=VALFNM(sy%,1)
  485M%=FND(PJ%,Q%):FORA%=29TO31:PROCR(sy%,A%+3,-(A%>M%)):NEXT:IFau%>M%THENPROCu(au%,FALSE):PROCu(M%,TRUE)
  486PROCA(sy%,0,FNJy(au%,PJ%,Q%,-1)):ENDPROC
  487DEFFNo(RETURNc%,RETURNr%,RETURNQ%):c%=au%:r%=PJ%:Q%=VALFNM(sy%,1):=FNU(c%,r%,Q%,-1)
  488DEFFNJy(c%,r%,Q%,py%):LOCALA$:A$=FNU(c%,r%,Q%,py%):=LEFT$(A$,LENA$-5)
  489DEFPROCAy:LOCALUu%,Hl%,UJ%,KJ%,Na%,p%,n%:lJ%=0:IFxJ%THEN
  490p%=FNY:n%=FNc:Hl%=J%(0,1):Uu%=J%(0,3):Uu%+=J%(0,2)-FNH(Uu%,Hl%,My%):KJ%=J%(1,1):UJ%=J%(1,3):UJ%+=J%(1,2)-FNH(UJ%,KJ%,My%):hl%=FNS(0,1,Uu%,Hl%,My%):kl%=FNS(0,2,UJ%,KJ%,My%):Na%=(FNB(hl%,p%)<1ANDFNB(p%,kl%)<1):IFFNL(Uu%,Hl%,My%)=FNL(Dy%,fy%,My%)ANDNOTFNjTHENlJ%=hl%
  491IFFNL(UJ%,KJ%,My%)=FNL(Dy%,fy%,My%)ANDFNjTHENlJ%=kl%
  492IFNa%<>FNjANDFNL(Uu%,Hl%,My%)<>FNL(Dy%,fy%,My%)ANDFNL(UJ%,KJ%,My%)<>FNL(Dy%,fy%,My%)THENPROCMy(-1)
  493ENDIF:ENDPROC
  494DEFPROCmJ:IFlJ%=kl%THENPROCMy(0)
  495IFlJ%=hl%THENPROCMy(1)
  496PROCAy:ENDPROC
  497DEFPROCFJ:IF_$<>""THENPROCB("The "+_$+" resources are out of date, using English.")
  498P$=FNC_("Organiser$Dir"):w%=0:Ru%=0:G$="":vy%=FALSE:Ii%=FALSE:XJ%=-1:Au%=FALSE:Y$=P$+".Data.":wJ%=0:h%=FNZ_("<Organiser$Dir>.Sprites",&7AC+&C8):DIMXa%3,DJ%32,N%(1),Yi%16,Ki%17,sl%1:$Xa%="R2":N%()=-1
  499$Yi%="Pptr_turnl,0,10"+CHR$0:$Ki%="Pptr_turnr,23,10"+CHR$0:?sl%=0:$DJ%="":DIMD%(5),I%(5),B%(5),W%(5),S%(5),Z%(5),M$(5):DIMP%(7),X%(7),H%(2),U%(2),Ky%4:A$=FNfy:Fu%=FALSE:IFINSTR(A$,"-delete_all_data")THEN
  500IFFN_y(FNA("ErrSure"),TRUE)THEN
  501PROCB(FNA("ErrChange")):Fu%=TRUE:vy%=TRUE
  502ENDIF
  503ENDIF:PROC`y:PROCTJ:PROCvu:PROCM_:j_%=-1:PROCh:s_%=FNl(1*&400):PROCc_(s_%,`u%):IFx_%THEN
  504IFOy%=1THENPROCM(-1,j_%,1)
  505PROCw(NOT1)
  506ELSESYS&406C0
  507ENDIF:ENDPROC
  508DEFPROCYu:PROCxJ:v%=S%(t%):PROCr(i%,-1,-1):IFNOTiu%THENPROCX(i%)
  509IFBu%THENPROCxy:PROCAy
  510Ru%=TRUE:PROCmy(t%):IFOy%>1THENPROCm
  511IFOy%AND1THENPROCM(-1,j_%,0)
  512IFbu%THENPROCr(Mu%,-1,-1)ELSEgu%=-1
  513IFNOTx_%THENSYS&406C1
  514PROCx:PROCAy:ENDPROC
  515DEFFNG(Lu%):LOCALA%:A%=B_%+1:REPEATA%-=1:UNTILZ%(A%)=Lu%ORA%=0:=A%
  516DEFPROCn_:LOCALA$,S%,F%,L%:DIMT%(B_%):Ay%=FNPy(FNA("Cols")):z_%=FNC("Mon","Mon",1,&C):PROCgy(z_%,0,-1):FORS%=1TOB_%:T%(S%)=FNL_(S%):NEXT:kJ%=FNC("Title","Menu",1,7):PROCY(kJ%,0,Al%):oJ%=FNC("TabM","TabM",1,2):Wl%=FNC("Helpm","Helpm",1,3):PROCY(kJ%,3,Wl%):PROCS(Wl%,wu%,1)
  517PROCY(oJ%,0,Ay%):PROCY(oJ%,1,Ay%):PROCG_(oJ%,0):PROCG_(oJ%,1):iJ%=FNC("BordM","BordM",1,5):A$=FNA("Cov"):S%=1:F%=0:WHILE(F%AND1)=0:SYS&61502,C_%,"Cov"+STR$S%,J%,256TO,,,L%;F%:S%+=1:IF(F%AND1)=0THENJ%?L%=&D:A$+="\"+LEFT$($J%,INSTR($J%,",")-1)
  518ENDWHILE:Ya%=FNAy(A$):ENDPROC
  519DEFPROCM_:LOCALA%,ma%,aa%:My%=FNR:fy%=FNI:Dy%=FNT:zy%=FNr(k%/B_%):ay%=&64+2*(40+u%+5+40):Uy%=k%+2*(5+40):k_%=5+40:sJ%=k_%+40+&64+2*u%:my%=k_%+40:wy%=my%+&64+u%:m%=5+40:`y%=wy%-&64:Y_%=k%/27::cJ%=u%-40-2*&c:ENDPROC
  520DEFPROCAu:LOCALB%:IF(Uy%<>K%!16-K%!8ORay%<>K%!&C-K%!4)THEN
  521IFK%!16-K%!8>300THENUy%=FNr(K%!16-K%!8)-2
  522IFK%!&C-K%!4>400THENay%=FNr(K%!&C-K%!4)-2
  523k%=Uy%-2*(5+40):u%=((ay%-&64)-2*(40+5+40))/2:PROCM_:SYS30,6,,,li%TO,,B%:!B%=Cy%:SYS&400CC,,B%:SYS&400C3,,B%:PROCty(B%!88,B%+4):SYS&400C1,,B%+4TOCy%:SYS30,7,,B%:IFZ%(t%)=2ANDv%=0THENPROCOy:PROCC_
  524SYS&400D1,i%,0,-Uy%-&A,ay%+&A,0
  525ENDIF:ENDPROC
  526DEFPROCvu:LOCALA%,`$:LOCALERROR:ONERRORLOCALRESTOREERROR:CLOSE#w%:w%=0:PROCB(REPORT$+" at line "+STR$ERL+", using default settings."):PROC`y:vy%=TRUE:ENDPROC
  527w%=OPENIN(P$+".Data.Settings"):l$=GET$#w%:`$=GET$#w%:D$=GET$#w%:x_%=FNQ:iu%=FNQ:Oy%=FNV:f_%=FNQ:Zu%=FNQ:B_%=FNV:t%=FNV:bu%=FNQ:Su%=FNQ:xJ%=FNQ:Ju%=FNQ:Ia%=Ju%:OJ%=FNV:INPUT#w%,qu%,_J%:INPUT#w%,eJ%,eu%,gl%,su%,nl%:b_%=FNQ:JJ%=FNQ:INPUT#w%,u%,k%:FORA%=0TO6:P%(A%)=FNV:NEXT:FORA%=0TO2:H%(A%)=FNV:NEXT
  528FORA%=1TOB_%:Z%(A%)=FNV:D%(A%)=FNV:I%(A%)=FNV:NEXT:N$=GET$#w%:Iu%=FNQ:Gu%=FNQ:INPUT#w%,!Ky%:yu%=FNV:ru%=FNV:wu%=FNV:REPEATPROCGJ(GET$#w%,w%):UNTILEOF#w%:CLOSE#w%:w%=0:RESTOREERROR:Bu%=(FNx(_J%)<>FNx(FNY)):IFFu%THEND$=FNA("Yourname")
  529u%=FNf(u%):k%=FNf(k%):ENDPROC
  530DEFPROCW_:LOCALA%:w%=OPENOUT(P$+".Data.Settings"):BPUT#w%,T$:BPUT#w%,P$:BPUT#w%,D$:PROCJ(x_%):PROCJ(iu%):PROCJ(Oy%):PROCJ(f_%):PROCJ(Zu%):PROCJ(B_%):PROCJ(t%):PROCJ(bu%):PROCJ(Su%):PROCJ(xJ%):PROCJ(Ju%):PROCJ(OJ%):PRINT#w%,qu%,FNY:PRINT#w%,eJ%,eu%,gl%,su%,nl%:PROCJ(b_%):PROCJ(JJ%):PRINT#w%,u%,k%:FORA%=0TO6:PROCJ(P%(A%)):NEXT
  531FORA%=0TO2:PROCJ(H%(A%)):NEXT:FORA%=1TOB_%:PROCJ(Z%(A%)):PROCJ(D%(A%)):PROCJ(I%(A%)):NEXT:BPUT#w%,N$:PROCJ(Iu%):PROCJ(Gu%):PRINT#w%,!Ky%:PROCJ(yu%):PROCJ(ru%):PROCJ(wu%):PROCqu(w%):CLOSE#w%:w%=0:ENDPROC
  532DEFPROCPy:PROCW_:PROCsu:vy%=FALSE:ENDPROC
  533DEFPROC`y:::W_%=FALSE:Bu%=0:Oy%=1+2+4:N$="%z12:%mi:%se %am":H%()=2,2,7:x_%=FALSE:f_%=FALSE:Su%=TRUE:Zu%=TRUE:MJ%=0::::::Ju%=FALSE:b_%=TRUE:B_%=4:I%()=7:D%()=0,&B,&A,&F,9,&E:P%()=0,&F,8,&B,4,4,&B:iu%=FALSE:eJ%=-1:eu%=0:su%=0:gl%=0:nl%=0:JJ%=FALSE:t%=2:Z%()=0,1,3,5,2
  534bu%=TRUE:D$="Chris Morison":xJ%=FALSE:Zu%=FALSE:J_%=FALSE::::::u%=500:k%=920:wu%=0:::::::OJ%=8:qu%=&E7:yu%=&B:ru%=5::::Bu%=FALSE:_J%=0::Gu%=FALSE:Iu%=TRUE:!Ky%=71431:ENDPROC
  535DEFFNoy:LOCALDl%,x,NJ%:Dl%=FNc:Di%=Ky%?1:NJ%=?Ky%:IFNJ%<Di%THEN
  536IFDl%<=NJ%THENDl%+=24
  537NJ%+=24
  538ENDIF:=(((Ky%?2=1)AND((Dl%<Di%)OR(Dl%>=NJ%)))OR(Ky%?3=0))ANDNOT(Ky%?3=1ANDKy%?2=0)
  539DEFFNQ=(BGET#w%=&FF)
  540DEFPROCJ(A%)BPUT#w%,A%:ENDPROC
  541DEFFNV=BGET#w%
  542DEFPROCh:LOCALB%,H%,xi%,s%:xi%=j_%:I_%=0:IFMJ%>0THENB%=8ELSEB%=Oy%
  543CASEB%ANDNOT(2+16)OF
  544WHEN1,8:CASETRUEOF
  545WHENB%=1:I_%=6-3*NOTf_%
  546WHENB%=3:I_%=9-3*NOTf_%
  547WHEN(B%AND8)>0:I_%=9:$DJ%=FNUy
  548WHEN(B%AND16)>0:I_%=LENFNZy(N$)+3
  549ENDCASE:I_%=I_%*16:Pu%=68:J%!8=0:J%!&C=I_%:J%!16=Pu%:J%!20=&2700313D:J%!24=DJ%:J%!28=Xa%:J%!32=32
  550WHEN1+4:I_%=&74:Pu%=&78:J%!8=-16:J%!&C=I_%:J%!16=Pu%:$DJ%="clock":J%!20=&3102:J%!24=DJ%:J%!28=h%:J%!32=32
  551OTHERWISE:I_%=68:Pu%=68:J%!8=0:J%!&C=68:J%!16=68:J%!20=&3002:$(J%+24)="!Organiser"
  552ENDCASE:IFj_%<>-1ANDNOTb_%THEN!J%=-3:s%=j_%ELSE!J%=-1-ABS(7*b_%)
  553J%!4=0:SYS&400C2,s%,J%TOj_%:IFxi%<>-1THEN!J%=-1:J%!4=xi%:SYS&400C4,,J%
  554IF(B%AND4)=4THENPROCP_
  555PROCFy(-1,j_%,H%()):ENDPROC
  556DEFPROCFy(q%,gy%,K%()):LOCALg_%,A%:g_%=FNA_(q%,gy%):IFg_%<>-1THEN
  557A%=INSTR(FNN(g_%),"R"):g_%?A%=ASCSTR$K%(0):PROCD(q%,gy%,K%(2)):PROCg(q%,gy%,K%(1)):!J%=q%:J%!4=gy%:J%!8=0:J%!&C=0:SYS&400CD,,J%
  558ENDIF:ENDPROC
  559DEFPROCju:LOCALA%,Hy%:DIMA%(6):Ty%=0:PROCjJ:Al%=FNW("Info",Hy%):i%=FNW("Main",Hy%):ki%=Hy%:Cy%=FNW("Addresses",Hy%):__%=FNW("Important",Hy%):Mu%=FNW("Banner",Hy%):sy%=FNW("GetDate",Hy%):T_%=FNW("Setup",Hy%):f%=FNW("AlarmSet",Hy%):Kl%=Hy%:Ry%=FNW("AlarmWarn",Hy%)
  560_y%=FNW("Anni",Hy%):_a%=Hy%:GJ%=FNW("AnniNotify",Hy%):A%(1)=FNW("SetGen",Hy%):A%(2)=FNW("SetAdd",Hy%):A%(3)=FNW("SetAnn",Hy%):A%(4)=FNW("SetCal",Hy%):A%(5)=FNW("SetDia",Hy%):A%(6)=FNW("SetColours",Hy%):Jy%=FNW("SetClock",Hy%)
  561PROCA(Al%,3,T$):PROCA(Al%,0,FNA("Title")):PROCA(Al%,1,FNA("Purp")):PROCA(Mu%,3,FNA("Vers")+" "+T$):PROCA(Mu%,6,"� Chris Morison 19"+MID$(T$,INSTR(T$,")")-2,2)):PROCA(Mu%,4,D$):FORA%=1TO31:PROCA(sy%,A%+3,STR$A%):NEXT:ENDPROC
  562DEFFNW(L$,RETURNHy%):LOCALH%,S%,I%,P%,hy%,g_%:SYS&400DB,,,0,0,0,L$,0TO,S%,I%:IFS%>512THEN
  563SYS&2001E,6,,,S%TO,,P%;hy%:IFhy%AND1THENERROR2,FNA("ErrWin")
  564ELSEP%=K%
  565ENDIF:DIMg_%I%:SYS&400DB,,P%,g_%,g_%+I%,vl%,L$,0TO,,g_%:IFL$="Main"THEN
  566P%!68=&64+(&64<<16):P%!0=0:P%!4=0:P%!8=ay%:P%!&C=Uy%:IFJJ%THEN
  567P%!48=FNg:P%!44=-FNd:P%!28=P%!28OR(3<<29)
  568ELSEP%!48=ay%:P%!44=-Uy%:P%!28=P%!28ANDNOT(3<<29)
  569ENDIF
  570ELSE:IFL$="Setup"THENva%=S%
  571IFL$="Addresses"THENli%=S%
  572ENDIF:IFNOTJu%ANDL$<>"Banner"THENPROCwu(P%)
  573IFL$="Addresses"THENPROCty(P%!84,P%)
  574P%!64=h%:SYS&400C1,,P%TOgy%:Hy%=P%!72:IFS%>512THENSYS30,7,,P%
  575=gy%
  576DEFPROCzJ(hy%):LOCALty%,B%:IFhy%<>JJ%THEN
  577SYS30,6,,,4+88+32*22TO,,ty%:!ty%=i%:SYS&400CC,,ty%:B%=ty%+4:SYS&400C3,,ty%:IFhy%THEN
  578B%!48=FNg:B%!44=-FNd:B%!28=B%!28OR(3<<29)
  579ELSEB%!48=ay%:B%!44=-Uy%:B%!28=B%!28ANDNOT(3<<29)
  580ENDIF:B%=i%:JJ%=hy%:SYS&400C1,,ty%+4TOi%:IFr_%=B%THENr_%=i%
  581IFIy%THEN!ty%=i%:SYS&400C5,,ty%
  582SYS30,7,,ty%
  583ENDIF:ENDPROC
14341DEFPROC_J(Bl%,S$):IFFNQy(Bl%,S$)THEN
14342SWAPK%!8,K%!&C:!K%=256:$(K%+44)="<Wimp$Scrap>"+CHR$0:K%!36=-1:K%!16=2:SYS&400E7,17,K%,K%!4
14343ENDIF:ENDPROC
14344DEFPROCVu(F%,X%,Y%):F%=FNly(K%+32,F%):IFF%<>0ANDF%<>-1THENSYS&400E8,,F%,X%,Y%
14345ENDPROC
14346DEFPROCZJ:IFFNCy<>-1THENK%!&C=K%!8:K%!8=0:SYS&400E7,19,K%,K%!4
14347ENDPROC
14348DEFPROCIJ:LOCALdu%,_%,U%:SYS&400C8,,K%TOdu%:_%=K%!4-K%!20:U%=K%!16-K%!24:WHILEdu%:PROCs_(!K%,_%,U%):SYS&400CA,,K%TOdu%:ENDWHILE:ENDPROC
14349DEFFNZ_(S$,E%):LOCALF%,A%,S%:F%=OPENINS$:A%=EXT#F%+4:CLOSE#F%:A%+=E%:DIMS%A%:!S%=A%:S%!8=16:SYS46,266,S%,S$:=S%
14350DEFPROCk(q%,s%,c%,qy%,qa%):!J%=q%:REPEAT:s%+=c%:IFs%<qy%THENs%=qa%ELSEIFs%>qa%THENs%=qy%
14351J%!4=s%:SYS&400CE,,J%:UNTIL(J%!(8+16)>>&C)AND&F=&F:IFc%=1THENc%=0ELSEc%=LENFNM(q%,s%)
14352SYS&400D2,q%,s%,,,-1,c%:ENDPROC
14353DEFFNu(q%,s%):LOCALo_%,`_%:IFFNy(q%,s%)THEN
14354PROCby(q%,s%,`_%,o_%)
14355ELSE!J%=q%:J%!4=s%:SYS&400CE,,J%:o_%=(J%!24>>28)AND&F
14356ENDIF:=o_%
14357DEFPROCg(q%,s%,o_%):IFFNy(q%,s%)THEN
14358PROCsy(q%,s%,-1,o_%)
14359ELSE!J%=q%:J%!4=s%:J%!&C=&F<<28:J%!8=o_%<<28:SYS&400CD,,J%
14360ENDIF:ENDPROC
14361DEFFNy(q%,s%):!J%=q%:J%!4=s%:SYS&400CE,,J%:=((J%!24)AND(1<<6))>0
14362DEFPROCsy(q%,s%,`_%,o_%):LOCALP%,A%:!J%=q%:J%!4=s%:SYS&400CE,,J%:P%=J%!32:A%=INSTR($P%,"F"):IFA%>0THEN
14363IF`_%<>-1THEN?(P%+A%+1)=ASCSTR$~`_%
14364IFo_%<>-1THEN?(P%+A%)=ASCSTR$~o_%
14365J%!8=0:J%!&C=0:SYS&400CD,,J%
14366ENDIF:ENDPROC
14367DEFPROCby(q%,s%,RETURN`_%,RETURNo_%):LOCALP%,A%:!J%=q%:J%!4=s%:SYS&400CE,,J%:P%=J%!32:A%=INSTR($P%,"F"):`_%=-1:o_%=-1:IFA%>0THEN`_%=EVAL("&"+CHR$?(P%+A%+1)):o_%=EVAL("&"+CHR$?(P%+A%))
14368ENDPROC
14369DEFFN_(q%,s%):LOCALo_%,`_%:IFFNy(q%,s%)THEN
14370PROCby(q%,s%,`_%,o_%)
14371ELSE!J%=q%:J%!4=s%:SYS&400CE,,J%:`_%=(J%!24>>24)AND&F
14372ENDIF:=`_%
14373DEFPROCD(q%,s%,`_%):IFFNy(q%,s%)THEN
14374PROCsy(q%,s%,`_%,-1)
14375ELSE!J%=q%:J%!4=s%:J%!&C=&F<<24:J%!8=`_%<<24:SYS&400CD,,J%
14376ENDIF:ENDPROC
14377DEFPROCR(q%,s%,hy%):LOCALl%:l%=J%+64:IFhy%=1THEN!J%=q%:J%!4=s%:SYS&400CE,,J%
14378!l%=q%:l%!4=s%:l%!8=(ABShy%)<<23:l%!&C=1<<23:SYS&400CD,,l%:IFhy%=1THENSYS&400D1,q%,J%!8,J%!&C,J%!16,J%!20
14379ENDPROC
14380DEFFNA_(q%,s%):LOCALA%:!J%=q%:J%!4=s%:SYS&400CE,,J%:IF(J%!24AND256)>0THENA%=J%!32ELSEA%=-1
14381=A%
14382DEFPROCZ(q%,s%,hy%):LOCALA%:!J%=q%:J%!4=s%:A%=1:IFhy%=-1THENhy%=1:A%=0
14383J%!8=hy%<<21:J%!&C=A%<<21:SYS&400CD,,J%:ENDPROC
14384DEFFNZ(q%,s%):!J%=q%:J%!4=s%:SYS&400CE,,J%:=-((J%!24>>21)AND1)
14385DEFPROCM(q%,s%,hy%):LOCALA%:A%=1:!J%=q%:J%!4=s%:IFhy%=-1THENhy%=1:A%=0
14386J%!8=hy%*(1<<22):J%!&C=A%<<22:SYS&400CD,,J%:ENDPROC
14387DEFPROCA(q%,s%,W$):LOCALP%,L%:!J%=q%:J%!4=s%:SYS&400CE,,J%:IFJ%!24AND(1<<8)THENP%=J%!28:L%=(J%!36)-1:ELSEP%=J%+28:L%=&B
14388$P%=LEFT$(W$,L%):J%!8=0:J%!&C=0:SYS&400CD,,J%:ENDPROC
14389DEFFNM(q%,s%):LOCALA$:!J%=q%:J%!4=s%:SYS&400CE,,J%:IF(J%!24AND256)>0THENA$=FNN(J%!28)ELSEA$=FNN(J%+28)
14390=A$
14391DEFFNqy(q%,s%):LOCALA%:!J%=q%:J%!4=s%:SYS&400CE,,J%:IF(J%!24AND256)>0THENA%=J%!28ELSEA%=-1
14392=A%
14393DEFPROCG_(Zy%,I%):Zy%!(28+24*I%)=Zy%!(28+24*I%)OR8:ENDPROC
14394DEFPROCgy(Zy%,L%,H%):Zy%+=4+24*L%:REPEATZy%+=24:Zy%!8=Zy%!8OR8:L%+=1:UNTIL((L%>H%)AND(H%<>-1))OR((!Zy%AND&80)>0):ENDPROC
14395DEFPROCW(Zy%,L%,H%):Zy%+=4+24*L%:REPEATZy%+=24:!Zy%=!Zy%ANDNOT1:L%+=1:UNTIL((L%>H%)AND(H%<>-1))OR((!Zy%AND&80)>0):ENDPROC
14396DEFFNPy(c$):LOCALZy%,zu%,Fy%:Zy%=FNAy(c$+"\0\1\2\3\4\5\6\7\8\9\10\11\12\13\14\15"):FORFy%=0TO&F:CASETRUEOF
14397WHENFy%<4,Fy%=9,Fy%=&C,Fy%=&E,Fy%=&F:zu%=7
14398OTHERWISEzu%=0
14399ENDCASE:Zy%?(39+Fy%*24)=Fy%*16+zu%:NEXT:PROCgy(Zy%,0,-1):=Zy%
14400DEFFNAy(A$):LOCALA%,B%,L%,Z$,I%:A$+="\":DIMA%4*FNgy (A$)*24:B%=A%+4:Z$=LEFT$(A$,INSTR(A$,"\")-1):$A%=Z$:A%!&C=&70207:A%!20=44:A%!24=0:L%=LENZ$:A$=MID$(A$,INSTR(A$,"\")+1):WHILEINSTR(A$,"\"):Z$=LEFT$(A$,INSTR(A$,"\")-1):B%+=24:!B%=FNOy(Z$):B%!4=0:B%!8=&7000021
14401IFINSTR(Z$,">")THENB%!4=VALMID$(Z$,INSTR(Z$,">")+1):Z$=LEFT$(Z$,INSTR(Z$,">")-1)
14402IFLENZ$>&BTHENDIMI%LENZ$+1:$I%=Z$:B%!8=B%!8OR256:B%!&C=I%:B%!16=0:B%!20=I%+1ELSE$(B%+&C)=Z$
14403IFLENZ$>L%THENL%=LENZ$
14404A$=MID$(A$,INSTR(A$,"\")+1):ENDWHILE:!B%=!B%OR&80:A%!16=L%*16+16:=A%
14405DEFFNC(c$,i$,L%,H%):LOCALM%,A%,C%,D%,Rl%,A$:DIMM%28+24* (H%-L%+1):!M%=FNh(c$):M%!4=0:M%!8=0:Rl%=LENFNA(c$):M%!&C=&70207:M%!20=44:M%!24=0:A%=M%+4:FORC%=L%TOH%:A%+=24:!A%=0:A%!4=0:A%!8=&7000121:A%!&C=FNh(i$+STR$C%):A%!16=0:A%!20=0:D%=LENFNA(i$+STR$C%):IFD%>Rl%THENRl%=D%
14406NEXT:!A%+=&80:M%!28+=256:M%!16=Rl%*16+16:=M%
14407DEFPROCY(M%,I%,S%):M%!(28+24*I%+4)=S%:ENDPROC
14408DEFFNOy(RETURNZ$):LOCALA%,F%:REPEAT:CASECHR$ASCZ$OF
14409WHEN"�":A%+=1:Z$=MID$(Z$,2)
14410WHEN"_":A%+=2:Z$=MID$(Z$,2)
14411WHEN"*":A%+=8:Z$=MID$(Z$,2)
14412OTHERWISEF%=-1
14413ENDCASE:UNTILF%:=A%
14414DEFFNgy(A$):LOCALA%:WHILEINSTR(A$,"\"):A%+=1:A$=MID$(A$,INSTR(A$,"\")+1):ENDWHILE:=A%
14415DEFFNVy(A%):LOCALH%:A%+=4:REPEATA%+=24:H%+=44:IF(!A%AND2)>0THENH%+=24
14416UNTIL(!A%AND&80)>0:=H%+96
14417DEFFNzy(Zy%,ca%,W$,Za%,n$):LOCALSi%,g_%:DIMSi%Za%+1,g_%LEN (n$)+1:$Si%=W$:$g_%=n$:Zy%+=28+24*ca%:!Zy%=!Zy%OR4:Zy%!8=Zy%!8OR256:Zy%!&C=Si%:Zy%!16=g_%:Zy%!20=Za%:=Si%
14418DEFFNMy(Zy%,u$):LOCALA%,B%:B%=Zy%+28:WHILE(u$<>FNJ(Zy%,A%))AND(!B%AND&80)=0:A%+=1:B%+=24:ENDWHILE:IFu$<>FNJ(Zy%,A%)THENA%=-1
14419=A%
14420DEFPROCT(M%,I%,F%):IFF%<>0THEN
14421M%!(36+24*I%)=M%!(36+24*I%)OR(1<<22)
14422ELSEM%!(36+24*I%)=M%!(36+24*I%)ANDNOT(1<<22)
14423ENDIF:ENDPROC
14424DEFFNJ(M%,I%):M%+=28+24*I%:IF(M%!8AND256)>0THENM%=M%!&CELSEM%=M%+&C
14425=FNN(M%)
14426DEFPROCS(M%,I%,F%):IFF%<>0THENM%!(28+24*I%)=M%!(28+24*I%)OR1ELSEM%!(28+24*I%)=M%!(28+24*I%)ANDNOT(1)
14427ENDPROC
14428DEFFN`y(M%):IFM%!28>&80THENM%=!M%
14429=FNN(M%)
14430DEFPROCg_(M%,I%,F%):IFF%<>0THENM%!(28+24*I%)=M%!(28+24*I%)OR2ELSEM%!(28+24*I%)=M%!(28+24*I%)ANDNOT(2)
14431ENDPROC
14432DEFFNr(A%)=A%-A%MOD4
14433DEFFNf(A%)=A%-A%MOD2
14434DEFFNDy:SYS&400CF,,J%:=(((J%!8)AND1)=1)
14435DEFFNj:LOCALA%:SYS6,&A1,&DCTO,,A%:=(A%AND&80)=&80
14436DEFPROCMy(F%):LOCALA%:SYS6,&A1,&DCTO,,A%:CASEF%OF
14437WHEN0:A%=A%ANDNOT&80
14438WHEN1:A%=A%OR&80
14439WHEN-1:A%=A%EOR&80
14440ENDCASE:SYS6,&A2,&DC,A%:ENDPROC
14441DEFFNd:LOCALA%,B%:SYS53,-1,&CTO,,A%:SYS53,-1,5TO,,B%:=(A%<<B%)
14442DEFFNHy(M%):LOCALA%:SYS53,M%,5TO,,A%:=(A%=1)
14443DEFFNw(H%,S%,F%):LOCALP%,E%,V%,L%,T%:SYS&2001D,2,H%,,S%TOE%,,P%;V%:IF(V%AND1)=1THEN
14444IFF%THEN
14445P%=FNWy:PROCp(H%,(S%DIVP%)*P%-P%*((S%MODP%)>0),TRUE):P%=FNw(H%,S%,FALSE)
14446ELSESYS43,E%
14447ENDIF
14448ENDIF:=P%
14449DEFPROCfu(H%,RETURNB%,S%,F%):LOCALL%,E%,V%,T%,P%:SYS&2001D,4,H%,B%,S%TOE%,,B%;V%:V%=((V%AND1)=1):CASETRUEOF
14450WHENV%ANDNOTF%:SYS43,E%
14451WHENV%ANDF%AND(S%>0):PROCp(H%,S%,TRUE):PROCfu(H%,B%,S%,TRUE)
14452WHENV%ANDF%AND(S%<0)
14453WHENNOTV%ANDF%AND(S%<0):PROCp(H%,-1,TRUE)
14454ENDCASE:ENDPROC
14455DEFPROCLy(H%,B%,F%):LOCALA%,hy%:SYS29,3,H%,B%TOA%;hy%:IFF%THENPROCp(H%,-1,TRUE)
14456ENDPROC
14457DEFPROCp(H%,S%,F%):LOCALP%:IFF%THEN
14458IFS%<0THEN
14459SYS&2001D,5,H%,,-32*&400*&400:S%=H%!&C+H%-&8000:P%=FNWy:SYS&400EC,-1,-1TOF%:F%=FNl(((S%DIVP%)*P%-P%*((S%MODP%)>0))-F%):SYS29,5,H%,,((S%DIVP%)*P%-P%*((S%MODP%)>0))-S%
14460ELSE:E%=`u%:F%=FNl(S%):SYS29,5,H%,,`u%-E%
14461ENDIF
14462ELSESYS29,5,H%,,S%
14463ENDIF:ENDPROC
14464DEFPROCc_(H%,S%):IFS%=-1THENS%=`u%
14465SYS29,0,H%,,S%:ENDPROC
14466DEFPROCbJ:SYS&61504,C_%:SYS&2001E,7,,C_%:ENDPROC
14467DEFPROCJJ(k$):LOCALF%:SYS&2001E,6,,,17+LENk$TO,,C_%;F%:IFF%AND1THENERROR2,"Not enough memory for messages."
14468$(C_%+16)=k$:SYS&41501,C_%,C_%+16,0:ENDPROC
14469DEFFNA(Q$):LOCALF%,L%:SYS&61502,C_%,Q$,J%,256TO,,,L%;F%:IFF%AND1ERROR2,"Can't get message '"+Q$+"' from Messages file"
14470J%?L%=&D:=$J%
14471DEFFNh(Q$):LOCALF%,P%:SYS&61502,C_%,Q$,0TO,,P%;F%:IFF%AND1ERROR2,"Can't get message '"+Q$+"' from Messages file"
14472=P%
14473DEFFNO(Q$,A$,Z$,F$,Ay$):LOCALF%,L%:SYS&61502,C_%,Q$,J%,256,A$,Z$,F$,Ay$TO,,,L%;F%:IFF%AND1ERROR2,"Can't get message '"+Q$+"' from Messages file"
14474J%?L%=&D:=$J%
14475DEFFNay(Q$,L%,H%,Z$,A$):LOCALM$,A%:FORA%=L%TOH%:M$+=Z$+FNA(Q$+STR$A%)+A$:NEXT:=M$
14476DEFFNm(a%,Q%,gi%,yi%,x%,n%):IFx%<0THENgi%+=x%:x%=-x%
14477IFn%<0THENyi%+=n%:n%=-n%
14478=((a%>=gi%)AND(a%<=(gi%+x%))AND(Q%>=yi%)AND(Q%<=(yi%+n%)))
14479DEFFNWy:LOCALP%:SYS81TOP%:=P%
14480DEFFNfy:LOCALI$,I%:SYS16TOI$:I%=INSTR(I$," -quit "):IFI%THENI$=MID$(I$,INSTR(I$," ",I%+LEN" -quit ")+1)
14481=I$
14482DEFFNC_(A$):LOCALL%:SYS35,A$,J%,&FF,0,3TO,,L%:J%?L%=0:=FNN(J%)
14483DEFFNb(A$):LOCALL%,F%:SYS&20023,A$,J%,&FF,0,3TO,,L%;F%:IF(F%AND1)=0THENJ%?L%=0:IFFNN(J%)<>""THENF%=TRUEELSEF%=FALSE
14484=F%
14485DEFFNl(M%):LOCALS%:SYS&400EC,-1,-1TOS%:SYS&400EC,S%+M%,-1TOS%:`u%=S%-(HIMEM-&8000):=HIMEM
14486DEFFNN(P%):LOCALA$:WHILE?P%<>0AND?P%<>&DAND?P%<>&A:A$+=CHR$(?P%):P%+=1:ENDWHILE:=A$
14487DEFPROCgJ(gy%):!J%=256:J%!&C=0:J%!16=0:SYS&400E7,17,J%,gy%:ENDPROC
14488DEFFNv(A$):LOCALA%,C%:FORA%=1TOLENA$:C%=ASCMID$(A$,A%,1):IFC%>=97ANDC%<=&7ATHENC%=C%ANDNOT32
14489MID$(A$,A%)=CHR$(C%):NEXT:=A$
14490DEFFNg:LOCALA%,B%:SYS53,-1,&BTO,,A%:SYS53,-1,4TO,,B%:=(A%<<B%)
14491DEFPROCB(My$):!J%=&FF:$(J%+4)=My$+CHR$0:SYS&400DF,J%,17+(1<<8)+(1<<9),"Message from "+H$,w$:ENDPROC
14492DEFFN_y(A$,R%):!J%=0:$(J%+4)=A$:SYS&400DF,J%,23-4*ABSR%+(1<<8),"Message from "+H$,w$TO,R%:=R%-2
14493DEFFNey(c%,r%,Q%):=(FNL(c%,r%,Q%)+1)MOD2
14494DEFFNL(c%,r%,Q%):LOCALXu%:Qy%=Q%-&77D:Xu%=Qy%*365:Xu%+=Qy%DIV4-(Q%-&76C-1)DIV&64+(Q%-&640-1)DIV400:WHILE(r%-1)>0:r%-=1:CASEr%OF
14495WHEN1,3,5,7,8,&A,&C:Xu%+=31
14496WHEN4,6,9,&B:Xu%+=30
14497WHEN2:Xu%+=28-FNBy(Q%)
14498ENDCASE:ENDWHILE:=Xu%+c%
14499DEFFNH(c%,r%,Q%):=FN`(FNL(c%,r%,Q%))
14500DEFFND(r%,Q%):LOCALc%:CASEr%OF
14501WHEN1,3,5,7,8,&A,&C:c%=31
14502WHEN4,6,9,&B:c%=30
14503WHEN2:c%=28-FNBy(Q%)
14504ENDCASE:=c%
14505DEFFNBy(Q%)=((Q%MOD4=0)ANDNOT(Q%MOD&64=0))OR(Q%MOD400=0)
14506DEFPROCP(RETURNd%,RETURNz%,RETURNe%,uy%,Hu%,Qy%):LOCALii%,wa%,U%:ii%=d%:wa%=z%:U%=e%:d%+=uy%:z%+=Hu%:e%+=Qy%:WHILEz%<1:z%+=&C:e%-=1:ENDWHILE:WHILEz%>&C:z%-=&C:e%+=1:ENDWHILE:WHILEd%<1:z%-=1:IFz%<1THENz%=&C:e%-=1
14507d%+=FND(z%,e%):ENDWHILE:WHILEd%>FND(z%,e%):d%-=FND(z%,e%):z%+=1:IFz%>&CTHENz%=1:e%+=1
14508ENDWHILE:IFe%<&77dORe%>&fffTHENd%=ii%:z%=wa%:e%=U%
14509ENDPROC
14510DEFFN`(j%):=((j%-1)MOD7)+1
14511DEFFNU(c%,r%,Q%,TJ%):=FNt(FNL(c%,r%,Q%),TJ%)+", "+FNwy(c%)+" "+FNX(r%,TJ%)+" "+STR$Q%
14512DEFPROCY_:LOCALC%,P%,C,F,w,Z,M,B,W,Q,a,J,U:DIMC%&90:C=&D:F=&E:w=&F:Z=2:M=3:B=4:W=5:Q=0:a=1:J=6:U=7:FORS%=0TO2STEP2:P%=C%:[OPTS%:.T CMP W,#0:RSBLT W,W,#0:SUBLT M,M,W:CMP B,#0:RSBLT B,B,#0:SUBLT Z,Z,B:ADD U,Z,B:LDR J,[Q,#28]:CMP U,J:BLT N:LDR J,[Q,#36]:CMP Z,J:BGT N
14513LDR J,[Q,#32]:ADD U,M,W:CMP U,J:BLT N:LDR J,[Q,#40]:CMP M,J:BGT N:CMP a,#0:MVNEQ0,#1:MOVEQpc,F:B q:.N MOV0,#0:MOVpc,F:.q MOV1,Z:MOV2,M:MOV0,#4:SWI 69:MOV1,B:MOV2,W:MOV0,#96+1:SWI 69:MVN0,#1:MOVpc,F:]NEXT:ENDPROC
14514DEFFNF(C%,D%,E%,F%):LOCALA%,B%:A%=K%:B%=0:=USRT
14515DEFPROCd(C%,D%,E%,F%):LOCALA%,B%:A%=K%:B%=1:CALLT:ENDPROC
14516DEFPROCX(q%):!J%=q%:SYS&400C6,,J%:IFq%=r_%THENTu%=FALSE:!J%=v_%:SYS&600C6,,J%
14517IFq%=i%THENIy%=FALSE
14518ENDPROC
14519DEFPROCwu(B%):LOCALN%,A$,Wy%,l%:N%=B%!84:B%+=88:WHILEN%:IF((B%!16)AND64)>0THEN
14520A$=$(B%!24):l%=EVAL("&"+MID$(A$,INSTR(A$,"F")+1,1)):Wy%=EVAL("&"+MID$(A$,INSTR(A$,"F")+2,1)):B%!16=B%!16ANDNOT(64+(&FF<<24)):B%!16=B%!16OR(Wy%<<24)OR(l%<<28)
14521ENDIF:B%+=32:N%-=1:ENDWHILE:ENDPROC
14522DEFPROCN(q%,a_%,M_%,G_%,oy%):SYS&400D1,q%,a_%,oy%,G_%+2,M_%+4:ENDPROC
14523DEFPROCz(q%,dJ%,al%):LOCALW%,H%,X%,Y%,Z%:!J%=q%:SYS&400CB,,J%:X%=36*((J%!32>>28)AND1):Y%=36*((J%!32>>26)AND1)-36*((J%!32>>30)AND1):W%=J%!&C-J%!4+X%:H%=J%!16-J%!8+Y%:IFal%=-1THEN
14524J%!4=FNg/2-W%/2:J%!&C=J%!4+W%:J%!16=FNd-((FNd-&84)-H%)/2-Y%:J%!8=J%!16-H%
14525ELSE:IFal%=1THEN
14526MOUSEX%,Y%,Z%:J%!4=X%-64:J%!&C=J%!4+W%:J%!8=Y%-H%:J%!16=Y%
14527ENDIF
14528ENDIF:IFdJ%<>0THENJ%!28=dJ%
14529SYS&400C5,,J%:IFq%=i%THENIy%=TRUE
14530IFq%=r_%THENTu%=TRUE:!K%=r_%:SYS&400CB,,K%:K%!28=J%!28:PROCF_
14531ENDPROC
14532DEFPROCwy(ei%,q%,a%,Q%,wl%,Ji%,Pi%):IFv_%<>0ANDv_%<>q%THEN!J%=v_%:SYS&600C6,,J%
14533v_%=q%:r_%=ei%:Gl%=a%:zl%=Q%:Tu%=wl%:ul%=Ji%:ml%=Pi%:IFv_%<>0THEN
14534!J%=v_%:SYS&400CB,,J%:Da%=J%!&C-J%!4:La%=J%!16-J%!8:!J%=r_%:SYS&400CB,,J%:J%!4+=a%:J%!16+=Q%:IFwl%THEN!J%=q%:SYS&400C5,,J%
14535ENDIF:ENDPROC
14536DEFPROCF_:IFv_%<>0AND!K%=r_%THEN
14537!J%=v_%:J%!4=K%!4+Gl%:J%!16=K%!16+zl%:J%!&C=J%!4+Da%:J%!8=J%!16-La%:J%!20=0:J%!24=0:J%!28=K%!28:IFul%THEN
14538J%!4-=K%!20:J%!&C-=K%!20:IFJ%!4<K%!4THENJ%!20=K%!20-Gl%:J%!4=K%!4
14539IFJ%!&C>K%!&CTHENJ%!&C=K%!&C
14540ENDIF:IFml%THEN
14541J%!16-=K%!24:J%!8-=K%!24:IFJ%!16>K%!16THENJ%!24=K%!16-J%!16:J%!16=K%!16
14542IFJ%!8<K%!8THENJ%!8=K%!8
14543ENDIF:SYS&400C5,,J%:K%!28=v_%
14544ENDIF:ENDPROC
14545DEFPROCjJ:LOCALA%:DIMvl%256:FORA%=0TO256STEP4:vl%!A%=0:NEXT:ENDPROC
14546DEFPROCtu(ta%,b$):vl%=-1:SYS&400D9,,b$:PROCju:SYS&400DA:ENDPROC
14547DEFPROCf(W%,Hy%,A$,mJ%):$Hy%=A$:IFmJ%THEN
14548!K%=W%:SYS&400CB,,K%:SYS&400D1,-1,K%!4,K%!16,K%!&C,K%!16+44
14549ENDIF:ENDPROC
14550DEFPROCV(B%,F%):SYS&400F3,,B%,F%:ENDPROC
14551DEFFNP(b$,W%,H%):LOCALF%:SYS&40081,,b$,16*W%,16*H%,0,0TOF%:=F%
14552DEFPROCU(H%):SYS&40082,H%:ENDPROC
14553DEFPROCfy(RETURNX%,RETURNY%):SYS&40088,,X%,Y%TO,X%,Y%:ENDPROC
14554DEFPROCL(gy%,W$,zu%,a%,Q%):LOCALa_%,oy%,G_%,M_%,ZJ%:SYS&4008A,gy%:SYS&40097,,W$TO,a_%,oy%,G_%,M_%:SYS&40088,,a_%,oy%TO,a_%,oy%:SYS&40088,,G_%,M_%TO,G_%,M_%:ZJ%=G_%+a_%:IFzu%=0THENa%-=ZJ%/2ELSEIFzu%>0THENa%-=ZJ%
14555IFFNF(a%,Q%-M_%+oy%,ZJ%,M_%-oy%)THENSYS&40086,gy%,W$,1<<4,a%,Q%-M_%
14556ENDPROC
14557DEFPROCjy(gy%,W$,Ta%,ri%,a%,Q%,`%):LOCALa_%,oy%,G_%,M_%,ZJ%:!J%=0:J%!4=-`%<<16:J%!8=`%<<16:J%!&C=0:J%!16=0:J%!20=0:SYS&4008A,gy%:SYS&40097,,W$TO,a_%,oy%,G_%,M_%:SYS&40088,,a_%,oy%TO,oy%,a_%:SYS&40088,,G_%,M_%TO,M_%,G_%:IFTa%=0THENa%-=`%*G_%/2ELSEIFTa%=`%THENa%-=`%*G_%
14558IFri%=0THENQ%+=`%*M_%/2ELSEIFri%=-`%THENQ%-=ri%*M_%
14559SYS&40086,gy%,W$,(1<<4)+(1<<6),a%,Q%,0,J%:ENDPROC
14560DEFPROCc(Pl%,W$,_%,U%,x%,n%):IFFNF(_%,U%,x%,n%)THEN
14561LOCALA%,gy%,a_%,oy%,G_%,M_%,ZJ%,mi%,Ol%,_l%:SYS&4008A,Pl%:gy%=Pl%:SYS&40097,Pl%,W$TO,a_%,oy%,G_%,M_%:SYS&40088,,G_%+a_%,M_%+oy%TO,ZJ%,mi%:IFZJ%>x%THEN
14562SYS&40083,Pl%,J%TO,,Ol%,_l%:WHILEZJ%>x%:Ol%=Ol%*0.95:_l%=_l%*0.95:SYS&40081,,J%,Ol%,_l%:SYS&40097,,W$TOgy%,a_%,oy%,G_%,M_%:SYS&40088,,G_%+a_%,M_%+oy%TO,ZJ%,mi%:IFZJ%>x%THENSYS&40082,gy%
14563ENDWHILE
14564ENDIF:SYS&40086,,W$,1<<4,_%,U%:IFgy%<>Pl%THENSYS&40082,gy%
14565ENDIF:ENDPROC
14566DEFPROCCy(a%,Q%,x%,n%,`%):MOVEa%+`%,Q%:DRAWBYx%-2*`%,0:MOVEBY`%,-`%:DRAWBY0,-n%+2*`%:MOVEBY-`%,-`%:DRAWBY-x%+2*`%,0:MOVEBY-`%,`%:DRAWBY0,n%-2*`%:MOVEa%+`%,Q%-`%:MOVEBY0,`%:PLOT&A1,-`%,-`%:MOVEa%+x%-`%,Q%-`%:MOVEBY`%,0:PLOT&A1,-`%,`%:MOVEa%+x%-`%,Q%-n%+`%:MOVEBY0,-`%
14567PLOT&A1,`%,`%:MOVEa%+`%,Q%-n%+`%:MOVEBY-`%,0:PLOT&A1,`%,-`%:ENDPROC
14568DEFPROCYJ:ENDPROC
14569DEFPROCuu:CASEBi%OF
14570WHEN3:PROCr_(vJ%)
14571ENDCASE:ENDPROC
14572DEFPROCx:vJ%=-1:Bi%=-1:IFNOTBu%THEN
14573vJ%=FNiy(_J%):IFvJ%<>-1THENBi%=3
14574ELSEPROCsJ
14575ENDIF:ENDPROC
14576DEFPROCQ_(Lu%):CASEZ%(Lu%)OF
14577WHEN2:PROCeu
14578WHEN3:PROCku
14579ENDCASE:ENDPROC
14580DEFPROCoy(y%,_%,U%):SYS&400E6,0:CASEZ%(t%)OF
14581WHEN2:PROC`_(v%,y%,_%,U%)
14582WHEN5:PROCoJ(v%,y%,_%,U%)
14583WHEN1:PROCCJ(v%,y%,_%,U%)
14584WHEN3:PROCh_(v%,y%,_%,U%)
14585ENDCASE:ENDPROC
14586DEFFNny(s%,By%):CASEZ%(t%)OF
14587WHEN2:o%=FNsy(s%,By%)
14588WHEN5:o%=FNmy(s%,By%)
14589WHEN1:o%=FNby(s%,By%)
14590WHEN3:o%=FNG_(s%,By%)
14591ENDCASE:=o%
14592DEFPROChu(l%,A%):CASEZ%(A%)OF
14593WHEN2:PROCf_(l%,A%)
14594WHEN5:PROCQJ(l%,A%)
14595WHEN1:PROCk_(l%,A%)
14596WHEN3:PROC_u(l%,A%)
14597ENDCASE:ENDPROC
14598DEFFNL_(S%):LOCALCl%:CASEZ%(S%)OF
14599WHEN2:Cl%=FNyy
14600WHEN5:Cl%=FNRy
14601WHEN1:Cl%=FNX_
14602WHEN3:Cl%=FNJ_
14603ENDCASE:=Cl%
14604DEFPROCmy(Lu%):CASEZ%(Lu%)OF
14605WHEN2:PROCC_
14606WHEN3:PROCkJ
14607ENDCASE:ENDPROC
14608DEFPROCiy(g%,y%,a%,Q%,i_%,qJ%):CASEZ%(t%)OF
14609WHEN2:PROCq_(g%,y%,a%,Q%,i_%,qJ%)
14610WHEN5:PROCy_(g%,y%,a%,Q%,i_%,qJ%)
14611WHEN1:PROCUu(g%,y%,a%,Q%,i_%,qJ%)
14612WHEN3:PROCzu(g%,y%,a%,Q%,i_%,qJ%)
14613ENDCASE:ENDPROC
14614DEFPROCK_(p%):CASEZ%(t%)OF
14615WHEN2:PROCj(p%)
14616WHEN5:PROCVy(p%)
14617WHEN1:PROCRy(p%)
14618WHEN3:PROCQy(p%)
14619ENDCASE:ENDPROC
14620DEFPROCXJ(q%,s%,g%,Yy%,ry%):CASEZ%(t%)OF
14621WHEN2:PROCSl(q%,s%,g%,Yy%,ry%)
14622ENDCASE:ENDPROC
14623DEFFNcy(q%,s%,By%):LOCALA%:FORA%=1TOB_%:IFNOTo%THEN
14624CASEZ%(A%)OF
14625WHEN2:o%=FNxy(q%,s%,By%)
14626WHEN5:o%=FNB_(q%,s%,By%)
14627WHEN1:o%=FNry(q%,s%,By%)
14628WHEN3:o%=FNP_(q%,s%,By%)
14629ENDCASE
14630ENDIF:NEXT:=o%
14631DEFPROCTJ:PROCTu:PROCSu:PROCru:PROCnJ:ENDPROC
14632DEFPROCxJ:LOCALA%:FORA%=1TOB_%:CASEZ%(A%)OF
14633WHEN2:PROCAJ(A%)
14634WHEN5:PROCDu(A%)
14635WHEN1:PROCBJ(A%)
14636WHEN3:PROCd_(A%)
14637ENDCASE:NEXT:ENDPROC
14638DEFPROCsu:PROCDJ:PROCO_:PROCpJ:ENDPROC
14639DEFPROCqu(w%):BPUT#w%,"Address book":PROCiu(w%):BPUT#w%,"Anniversary":PROCwJ(w%):BPUT#w%,"Calendar":PROCv_(w%):BPUT#w%,"Diary":PROCBu(w%):ENDPROC
14640DEFPROCGJ(Sy$,w%):CASESy$OF
14641WHEN"Address book":PROCgu(w%)
14642WHEN"Anniversary":PROCJu(w%)
14643WHEN"Calendar":PROCeJ(w%)
14644WHEN"Diary":PROCfJ(w%)
14645ENDCASE:ENDPROC
14646DEFPROCaJ(q%,s%,g%,a%,Q%):CASEq%OF
14647WHENA%(2):PROCZl(q%,s%,g%,a%,Q%)
14648WHENA%(3):PROCqJ(q%,s%,g%,a%,Q%)
14649WHENA%(4):PROCdu(q%,s%,g%,a%,Q%)
14650WHENA%(5):PROCGu(q%,s%,g%,a%,Q%)
14651ENDCASE:ENDPROC
14652DEFFNdy(q%,s%,By%):CASEq%OF
14653WHENA%(2):o%=FNIy(q%,s%,By%)
14654ENDCASE:=FALSE
14655DEFPROCvJ(l%):CASETy%OF
14656WHENA%(2):PROCj_(l%,Ty%)
14657WHENA%(3):PROCSJ(l%,Ty%)
14658WHENA%(4):PROCNJ(l%,Ty%)
14659WHENA%(5):PROCiJ(l%,Ty%)
14660ENDCASE:ENDPROC
14661DEFPROCXu:PROCe_(A%(2)):PROCtJ(A%(3)):PROCOu(A%(4)):PROCmu(A%(5)):ENDPROC
14662DEFPROCau:PROCl_(A%(2)):PROCWu(A%(3)):PROCKJ(A%(4)):PROCnu(A%(5)):ENDPROC
14663DEFPROCdJ(Zy%,l%):CASEZ%(t%)OF
14664WHEN3:PROCA_(Zy%,l%)
14665ENDCASE:ENDPROC
14666DEFPROCTu:zJ%=FNC("Paste","Paste",1,&A):Gy%=-1:J$="":X$="mailto:":U$="http://":V$="Important numbers":uJ%=-1:Zl%=FNC("Import","Import",1,5):l_%=FNC("ABM","ABM",1,6):PROCY(l_%,3,zJ%):C$="":dy%=-1:YJ%=0:c_%=-1:O$="":Fl%=-1:Jl%=0:`J%=0:P_%=16
14667Xy%=3::::d_%=2:h_%=-1:DIMM%(26),F%(26),A$(&A,&E),Z$(P_%-1,1),L%(&A,1),Ai%16,G%(&E):G%()=7:G%(0)=5:L%()=-1:$Ai%="Pptr_hyper,12,0"+CHR$0:M%(0)=1:iy%=0:x$=Y$+"Addresses":f$=Y$+"Important":ENDPROC
14668DEFFNyy=l_%
14669DEFPROCAJ(A%):B%(A%)=0:W%(A%)=26:S%(A%)=0:M$(A%)=FNA("AddTab"):PROCt_:PROCa:ENDPROC
14670DEFPROCC_:IFv%=0THENPROCR_(i%,Cy%,wy%,-m%-Y_%,Iy%,TRUE,TRUE)
14671ENDPROC
14672DEFPROCeu:PROCdy:IFw_%=0THENPROCOy
14673ENDPROC
14674DEFPROC`_(v%,y%,_%,U%):LOCALLl%,A%,A$,G%,Sy%,F%,Q%,a%,B%,C%,b%,yJ%,D%,E%,_u%,Li%,RJ%,WJ%:WJ%=FNr((k%-(Xy%+2)*24)/Xy%):Ll%=FNP("Homerton.Medium",&A,&A):Sy%=Y_%:SYS&400E6,7:SYS&400F3,,0,7:IF(y%=0)ANDv%>0THENPROCI(0,_%,U%)
14675a%=_%+y%*(u%-40):IFy%=0THEN
14676A%=0:WHILEA%<v%:SYS&400E6,7:LINEa%,U%-Sy%*(A%+1),a%+40,U%-Sy%*(A%+1):IFM%(A%)=0THENpy%=2ELSEpy%=5
14677SYS&400F3,,0,py%:IFA%=0THENA$="+"ELSEA$=CHR$(64+A%)
14678SYS&40086,Ll%,A$,1<<4,a%+&C,U%-Sy%*A%-Sy%+&A:A%+=1:ENDWHILE:IFv%>0THENSYS&400E6,7:LINEa%+40,U%,a%+40,U%-Sy%*(v%)
14679ELSE:A%=v%:IFA%=0THENA$="+"ELSEA$=CHR$(64+A%)
14680SYS&400E6,7:MOVEa%+40,U%-Sy%*(A%+1):DRAWBY-40,0:DRAWa%,U%-k%:SYS&40086,Ll%,A$,1<<4,a%+&C,U%-Sy%*A%-Sy%+&A:A%+=1:WHILEA%<27:SYS&400E6,7:LINEa%,U%-Sy%*(A%+1),a%+40,U%-Sy%*(A%+1):IFM%(A%)=0THENpy%=2ELSEpy%=5
14681SYS&400F3,,0,py%:IFA%=0THENA$="+"ELSEA$=CHR$(64+A%)
14682SYS&40086,Ll%,A$,1<<4,a%+&C,U%-Sy%*A%-Sy%+&A:IFM%(A%)>0ANDA%>v%THENF%=-1
14683A%+=1:ENDWHILE
14684ENDIF:IFy%=1AND(F%ORM%(v%)-iy%>2*Xy%)THENPROCI(1,a%-u%,U%)
14685IFv%<>0THEN
14686IFy%=0OR(y%=1ANDiy%+Xy%<=M%(v%))THEN
14687_u%=FNP("Trinity.Bold",&E,&E):A%=iy%+y%*Xy%:a%=_%-(40*(y%=0))+&c:WHILEA%<M%(v%)ANDB%<Xy%:Q%=U%-24*(B%+1)-WJ%*B%:IFFNF(a%,Q%,cJ%,-WJ%)THEN
14688SYS&400E6,4:PROCCy(a%,Q%,cJ%,WJ%,&c):b%=A%MOD(Xy%*2):A$="":IFA$(b%,1)<>""THENA$=A$(b%,1)+" "
14689A$+=A$(b%,0):PROCV(0,G%(1)):PROCc(_u%,A$,a%+&C,Q%-40,cJ%-&C,40):D%=0:FORC%=2TO&E:D%-=(A$(b%,C%)<>""):NEXT:IFD%<5THEND%=5
14690Sy%=FNr((WJ%-48)/D%):C%=Sy%/3:IFSy%>30THENSy%=30:C%=&C
14691Li%=FNP("Homerton.Medium.Oblique",C%-2,C%-2):RJ%=FNP("Trinity.Medium",C%,C%):G%=1:FORC%=2TO8:IFA$(b%,C%)<>""THENG%+=1:PROCV(0,G%(C%)):PROCc(RJ%,A$(b%,C%),a%+48,Q%-42-Sy%*(G%-1),cJ%-48,Sy%)
14692NEXT:Q%-=WJ%-&E:FORC%=&ETO9STEP-1:IFA$(b%,C%)<>""THEN
14693A$=FNA("Fld"+STR$(C%-8))+":":SYS&400F3,,0,G%(0):SYS&4008A,Li%:SYS&40097,,A$TO,D%,,F%:SYS&40088,,F%-D%TO,D%:SYS&40086,,A$,1<<4,a%+92-D%,Q%-4:SYS&400F3,,0,G%(C%):PROCc(RJ%,A$(b%,C%),a%+&64,Q%-4,cJ%-&64,Sy%+4):Q%+=Sy%:IFC%>=&DTHENPROCb_(b%,C%,a%+&64,Q%-4,cJ%-&64,Sy%+4)
14694ENDIF:NEXT:PROCU(RJ%):PROCU(Li%)
14695ENDIF:A%+=1:B%+=1:ENDWHILE:PROCU(_u%)
14696ENDIF
14697ELSE:IFy%=0THEN
14698_u%=FNP("Trinity.Bold",16,16):SYS&400E6,4:PROCV(0,7):b%=u%-2*&c:PROCCy(a%+&c,U%-24,b%,k%-2*24,2*&c):PROCL(_u%,V$,0,_%+u%/2,U%-24-&C):PROCU(_u%):yJ%=&E:RJ%=FNP("Trinity.Medium",yJ%,yJ%):Sy%=(k%-2*24-68-2*&c)/P_%:Q%=U%-24-68:a%=_%+&c:SYS&400E6,1
14699LINEa%+48,Q%-Sy%*P_%,a%+b%-48,Q%-Sy%*P_%:FORA%=0TOP_%-1:SYS&4008A,RJ%:SYS&400E6,1:LINEa%+48,Q%-Sy%*A%,a%+b%-48,Q%-Sy%*A%:IFFNF(a%,Q%-Sy%*A%,b%,-Sy%)ANDZ$(A%,0)+Z$(A%,1)<>""THEN
14700SYS&40097,,Z$(A%,0)+"  "TO,B%,C%,D%,E%:B%=D%-B%:PROCfy(B%,E%):SYS&40097,,Z$(A%,1)TO,C%,F%,D%:C%=D%-C%:PROCfy(C%,F%):IFB%+C%>b%-24ORE%-F%>Sy%THEN
14701IFSy%/(E%-F%)<(b%-24)/(B%+C%)THENF%=yJ%*Sy%/(E%-F%)ELSEF%=yJ%*(b%-24)/(B%+C%)
14702C%=C%*F%/yJ%:E%=E%*F%/yJ%:F%=FNP("Trinity.Medium",F%,F%)
14703ELSEF%=RJ%
14704ENDIF:IFE%=0ORF%=0THENE%=E%+F%
14705SYS&40086,,Z$(A%,0),1<<4,a%+&C,Q%-Sy%*(A%+0.5)-E%/2:SYS&40086,,Z$(A%,1),1<<4,a%+b%-C%-&C,Q%-Sy%*(A%+0.5)-E%/2:IFF%<>RJ%THENPROCU(F%)
14706ENDIF:NEXT
14707ENDIF
14708ENDIF:PROCU(Ll%):ENDPROC
14709DEFPROCf_(l%,cl%):LOCALA%,B%:B%=dy%:CASE!l%OF
14710WHEN0:FORA%=9TO23:PROCA(Cy%,A%,A$(B%,A%-9)):NEXT:PROCR(Cy%,25,0):PROCQ(0,0)
14711WHEN1:FORA%=9TO23:PROCA(Cy%,A%,A$(B%,A%-9)):NEXT:C$="":dy%=-1:PROCQ(0,0):PROCR(Cy%,25,1)
14712WHEN2:PROC_y:IFM%(v%)>0THEN
14713IFM%(v%)<=iy%THENiy%-=2*Xy%
14714PROCQ(v%,iy%):mJ%=TRUE
14715ELSEPROCQ(0,0)
14716ENDIF
14717WHEN3:IFl%!4>=0THENd_%=l%!4
14718IFv%=0THEN
14719FORA%=0TO&E:A$(B%,A%)=FNM(Cy%,A%+9):NEXT
14720ENDIF:CASEd_%OF
14721WHEN0:PROCq(A$(B%,1)+" "+A$(B%,0))
14722WHEN1:FORA%=2TO8:PROCq(A$(B%,A%)):NEXT
14723WHEN2:PROCq(A$(B%,1)+" "+A$(B%,0)):FORA%=2TO8:PROCq(A$(B%,A%)):NEXT
14724WHEN9:PROCq(A$(B%,1)+" "+A$(B%,0)):FORA%=2TO&E:PROCq(A$(B%,A%)):NEXT
14725OTHERWISEPROCq(A$(B%,d_%+6))
14726ENDCASE
14727WHEN4:PROCGy(U$+A$(dy%,&E)):uJ%=1
14728WHEN5:PROCGy(X$+A$(dy%,&D)):uJ%=2
14729ENDCASE:ENDPROC
14730DEFPROCpy:LOCALA%:A%=(dy%<0):FORB%=0TO3:PROCT(l_%,B%,A%):NEXT:FORA%=0TO9:PROCS(zJ%,A%,d_%=A%):NEXT:FORB%=4TO5:PROCT(l_%,B%,1):NEXT:IFdy%<>-1THEN
14731IFFNb("Alias$URLOpen_HTTP")THEN
14732PROCT(l_%,4,A$(dy%,&E)="")
14733ENDIF:IFFNb("Alias$URLOpen_MailTo")THEN
14734PROCT(l_%,5,A$(dy%,&D)="")
14735ENDIF
14736ELSEPROCT(l_%,4,1):PROCT(l_%,5,1)
14737ENDIF:ENDPROC
14738DEFPROCj(p%)LOCALA%:A%=v%:IFp%=1THEN
14739IFM%(v%)<=iy%+Xy%*2THEN
14740REPEATA%+=1:UNTILA%>26ORM%(A%MOD27)>0:IFA%<27THENPROCQ(A%,0)
14741ELSEPROCQ(v%,iy%+Xy%*2)
14742ENDIF
14743ELSE:IFiy%=0ANDv%>0THEN
14744REPEATA%-=1:UNTILM%(A%)>0:PROCQ(A%,M%(A%)-1-(M%(A%)-1)MOD(Xy%*2))
14745ELSEIFv%>0THENPROCQ(v%,iy%-Xy%*2)
14746ENDIF:IFv%=0THENPROCQ(0,0)
14747ENDIF:ENDPROC
14748DEFPROCq_(g%,y%,a%,Q%,i_%,qJ%):LOCALb%,A%,B%,X%,Y%,WJ%:WJ%=FNr((k%-(Xy%+2)*24)/Xy%):IFy%<>0THEN
14749X%=&c:IFa%>u%-40ANDg%<>2THEN
14750b%=-Q%DIVY_%:IFb%<27ANDb%>v%THEN
14751IFv%=0THENO$=C$:Fl%=dy%:Jl%=YJ%
14752IFM%(b%)>0THENPROCQ(b%,0)
14753ENDIF
14754ENDIF
14755ELSE:X%=&c+40:IFa%<40ANDg%<>2THEN
14756b%=-Q%DIVY_%:IFb%<v%THEN
14757IFb%=0THENC$=O$:dy%=Fl%:YJ%=Jl%
14758IFM%(b%)>0THENPROCQ(b%,0)
14759ENDIF
14760ENDIF
14761ENDIF:IFv%>0THEN
14762A%=0:B%=-1:Y%=-24:y%=ABS(y%):C$="":dy%=-1:WHILEA%<Xy%ANDA%+iy%+Xy%*y%<M%(v%):IFFNm(a%,Q%,X%,Y%,cJ%,-WJ%)THENB%=A%+Xy%*y%
14763Y%-=WJ%+24:A%+=1:ENDWHILE:IFB%>=0THEN
14764C$=FNs(A$(B%,0)+" "+A$(B%,1)):dy%=B%:YJ%=B%+iy%:IFg%<>2THEN
14765FORA%=9TO23:PROCA(Cy%,A%,A$(B%,A%-9)):NEXT:PROCR(Cy%,25,0):PROCQ(0,0)
14766ENDIF
14767ENDIF
14768ELSEIFy%=0ANDg%<>2THEN
14769Sy%=(k%-2*24-68-2*&c)/P_%:Y%=-(Q%+24+68-Sy%)/Sy%:IFY%>0ANDY%<=P_%THEN
14770`J%=Y%:PROCA(__%,3,Z$(Y%-1,0)):PROCA(__%,4,Z$(Y%-1,1)):MOUSEX%,Y%,A%:SYS&400D4,,__%,i_%+`y%,Y%:PROCC(__%,3):VJ%=TRUE
14771ENDIF
14772ENDIF
14773ENDIF:IFg%=2THENPROCpy
14774ENDPROC
14775DEFPROCSl(q%,s%,g%,a%,Q%):CASEq%OF
14776WHENCy%:IFg%<>2THEN
14777CASEs%OF
14778WHEN24:PROCy(g%=4):PROCa
14779WHEN25:PROC_y:PROCa:PROCC(Cy%,9)
14780WHEN26:PROCa:PROCC(Cy%,9)
14781WHEN-1,0,1,2,3,4,5,6,7,8:PROCC(i%,-1)
14782ENDCASE
14783ELSEPROCpy:PROCF(l_%,Yy%-64,ry%,q%,s%)
14784ENDIF
14785WHEN__%:CASEs%OF
14786WHEN5:PROCyy
14787WHEN6:SYS&400D4,,-1:`J%=0
14788WHEN7:PROCA(__%,3,""):PROCA(__%,4,""):PROCC(__%,3)
14789ENDCASE
14790ENDCASE:ENDPROC
14791DEFFNsy(s%,By%):o%=TRUE:CASEBy%OF
14792WHEN414:PROCj(-c_%)
14793WHEN415:PROCj(c_%)
14794WHEN43,461:IFv%>0THENC$=O$:dy%=Fl%:YJ%=Jl%:PROCQ(0,0)
14795OTHERWISE:IFBy%>=97ANDBy%<=&7ATHENL%=By%-32-64ELSEL%=By%-64
14796IFL%>0ANDL%<28THEN
14797IFv%=0THENO$=C$:Fl%=dy%:Jl%=YJ%
14798IFM%(L%)>0THENPROCQ(L%,0)
14799ELSEo%=FALSE
14800ENDIF
14801ENDCASE:=o%
14802DEFFNxy(q%,s%,By%):o%=TRUE:CASEq%OF
14803WHENCy%:CASEBy%OF
14804WHEN396:IFwJ%=FNzTHENPROCk(q%,s%,-1,9,23)
14805WHEN397:IFwJ%=FNzTHENPROCk(q%,s%,1,9,23)
14806WHEN398,&D,394:IFs%=23ANDBy%=&DTHENPROCy(TRUE):PROCa
14807WHEN414:PROCj(-c_%)
14808WHEN415:PROCj(c_%)
14809WHEN461:PROCy(TRUE):PROCa
14810WHEN83-64:PROCC(Cy%,9)
14811WHEN70-64:PROCC(Cy%,&A)
14812WHEN65-64:PROCC(Cy%,&B)
14813WHEN84-64:PROCC(Cy%,18)
14814WHEN88-64:IFdy%<>-1THENPROC_y:PROCa:PROCC(Cy%,9)
14815WHEN69-64:PROCC(Cy%,22)
14816WHEN87-64:PROCC(Cy%,23)
14817OTHERWISEo%=FALSE
14818ENDCASE
14819WHEN__%:IFBy%=&DANDs%=4THENPROCyyELSEo%=FALSE
14820WHENGy%:IFGy%<>-1ANDs%=70THENPROC_(J$,VALFNM(Gy%,59))
14821OTHERWISEo%=FALSE
14822ENDCASE:=o%
14823DEFPROCiu(w%):LOCALA%:BPUT#w%,V$:BPUT#w%,Xy%:BPUT#w%,d_%:BPUT#w%,c_%+5:BPUT#w%,X$:BPUT#w%,U$:FORA%=0TO&E:BPUT#w%,G%(A%):NEXT:ENDPROC
14824DEFPROCgu(w%):LOCALA%:V$=GET$#w%:Xy%=BGET#w%:d_%=BGET#w%:c_%=BGET#w%-5:X$=GET$#w%:U$=GET$#w%:FORA%=0TO&E:G%(A%)=BGET#w%:NEXT:ENDPROC
14825DEFPROCZl(x%,Fy%,l%,a%,Q%):LOCALA%:CASETRUEOF
14826WHEN(Fy%>=3ANDFy%<=7)ORFy%=&CORFy%=&D:IFg%<>2THENPROCZ(x%,Fy%,1)
14827WHENFy%=9:FORA%=0TO9:PROCS(zJ%,A%,d_%=A%):NEXT:PROCF(zJ%,a%,Q%,x%,Fy%)
14828WHENFy%>=22ANDFy%<=36:FORA%=0TO&E:PROCS(Ay%,A%,FN_(x%,Fy%)=A%):NEXT:PROCF(Ay%,a%,Q%,x%,Fy%)
14829ENDCASE:ENDPROC
14830DEFFNIy(x%,Fy%,ga%):LOCALja%,c%:o%=FALSE:IFga%=&DTHENPROCC(x%,1):o%=TRUE
14831=TRUE
14832DEFPROCj_(l%,x%):LOCALA%:CASEU_%OF
14833WHEN9:d_%=!l%:FORA%=0TO9:PROCS(zJ%,A%,d_%=A%):NEXT:PROCA(x%,8,FNJ(zJ%,!l%))
14834OTHERWISEFORA%=0TO&F:PROCS(Ay%,A%,!l%=A%):NEXT:PROCD(x%,U_%,!l%)
14835ENDCASE:ENDPROC
14836DEFPROCe_(x%):LOCALA%:PROCA(x%,1,V$):FORA%=1TO5:PROCZ(x%,A%+2,-(Xy%=A%)):NEXT:PROCA(x%,8,FNJ(zJ%,d_%)):PROCA(x%,17,U$):PROCA(x%,18,X$):PROCZ(x%,&C,-(c_%=-1)):PROCZ(x%,&D,-(c_%=1)):FORA%=0TO&E:PROCD(x%,A%+22,G%(A%)):NEXT:ENDPROC
14837DEFPROCl_(x%):LOCALA%,B%:V$=FNM(x%,1):U$=FNM(x%,17):X$=FNM(x%,18):B%=Xy%:FORA%=1TO5:IFFNZ(x%,A%+2)THENXy%=A%
14838NEXT:IFA%<>B%ANDt%=FNG(2)THENPROCQ(v%,0)
14839IFFNZ(x%,&C)THENc_%=-1ELSEc_%=1
14840FORA%=0TO&E:G%(A%)=FN_(x%,A%+22):NEXT:ENDPROC
14841DEFPROCQ(b%,Sl%):IFv%=0ANDb%<>0THENPROCC(i%,-1):PROCOy
14842IFb%=0THENPROCR_(i%,Cy%,wy%,-m%-Y_%,Iy%,TRUE,TRUE)
14843J_%=0:IFb%<v%J_%=-1
14844IFb%>v%J_%=1
14845IFJ_%=0THEN
14846mJ%=Sl%<>iy%:IFSl%<iy%THENJ_%=-1
14847IFSl%>iy%THENJ_%=1
14848ENDIF:v%=b%:iy%=Sl%:PROCdy:IFb%<>0THENPROCVJ(b%,Sl%)
14849ENDPROC
14850DEFPROCyyLOCALSy%,Y%:Z$(`J%-1,0)=FNM(__%,3):Z$(`J%-1,1)=FNM(__%,4):Sy%=(k%-2*24-68-2*&c)/P_%:Y%=m%+24+68+Sy%*(`J%-1):PROCN(i%,my%+&C,-Y%,`y%-&C,-Y%-Sy%):vy%=TRUE:IFNOTFNDyTHENSYS&400D4,,-1:`J%=0
14851ENDPROC
14852DEFPROCaLOCALA%:FORA%=9TO23:PROCA(Cy%,A%,""):NEXT:C$="":dy%=-1:PROCR(Cy%,25,1):ENDPROC
14853DEFPROC_y:LOCALey%:PROCJ_:ey%=FNq(C$)-64:M%(ey%)-=1:C$="":dy%=-1:IFM%(ey%)=0THENF%(ey%)=-1
14854PROCN(i%,wy%+u%-40,-m%-Y_%*ey%,wy%+u%,-m%-Y_%*(ey%+1)):PROCN(i%,my%,-m%-Y_%*ey%,my%+40,-m%-Y_%*(ey%+1)):vy%=TRUE:ENDPROC
14855DEFPROCJ_:LOCALB%,L%,A%:B%=h_%:L%=FNq(C$)-64:B%=F%(L%):A%=YJ%:WHILEA%>0:B%=B%!4:A%-=1:ENDWHILE:IFYJ%=0THENF%(L%)=B%!4
14856IFB%!4<>-1THEN!(B%!4)=!B%
14857IF!B%=-1THENh_%=B%!4ELSE!(!B%+4)=B%!4
14858PROCLy(s_%,B%,TRUE):ENDPROC
14859DEFPROCy(ea%):LOCALO%,L%,R$:FORL%=9TO23:IFFNM(Cy%,L%)<>""THENO%=TRUE
14860NEXT:IFO%THEN
14861R$=FNs(FNM(Cy%,9)+" "+FNM(Cy%,&A)):L%=FNq(R$)-64:M%(L%)+=1:IFC$=""THENO%=L%ELSEO%=FNq(C$)-64:M%(O%)-=1
14862IFdy%<0THENPROCL_ELSEPROCJ_:PROCL_
14863C$="":dy%=-1:IFNOTea%THEN
14864IFM%(L%)=1THENPROCN(i%,wy%+u%-40,-m%-Y_%*L%,wy%+u%,-m%-Y_%*(L%+1))
14865ELSEPROCPu(R$)
14866ENDIF:vy%=TRUE
14867ENDIF:ENDPROC
14868DEFPROCPu(A$):LOCALB%,A%,P%:P%=FNq(A$)-64:B%=F%(P%):WHILEFNs(FNK(B%,0)+" "+FNK(B%,1))<>R$:B%=B%!4:A%+=1:ENDWHILE:PROCQ(P%,A%-A%MOD(2*Xy%)):ENDPROC
14869DEFPROCL_:LOCALA%,B%,C%,S%:S%=&C:FORA%=9TO23:S%+=LENFNM(Cy%,A%)+1:NEXT:C%=FNw(s_%,S%,TRUE):B%=h_%:C%!8=S%:S%=C%+&C:FORA%=9TO23:$(S%)=FNM(Cy%,A%)+CHR$&A:S%+=LEN($S%):NEXT:A%=FNq(FNs(FNM(Cy%,9)+" "+FNM(Cy%,&A)))-64:IFF%(A%)=-1THENF%(A%)=C%:A%-=1
14870IFB%<>-1THEN
14871WHILEF%(A%)=-1ANDA%>1:A%-=1:ENDWHILE:IFF%(A%)<>-1THENB%=F%(A%)
14872WHILEFNs(FNK(B%,0)+" "+FNK(B%,1))<R$ANDB%!4<>-1:B%=B%!4:ENDWHILE:IFFNs(FNK(B%,0)+" "+FNK(B%,1))>=R$THEN
14873IFF%(A%)=B%THENF%(A%)=C%
14874!C%=!B%:C%!4=B%:!B%=C%:IF!C%<>-1THEN!(!C%+4)=C%ELSEh_%=C%
14875ELSE:B%!4=C%:!C%=B%:C%!4=-1
14876ENDIF
14877ELSEh_%=C%:!C%=-1:C%!4=-1:F%(A%)=C%
14878ENDIF:ENDPROC
14879DEFFNq(A$):LOCALB%:B%=ASC(FNs(A$)):IFB%<65THENB%=65
14880=B%
14881DEFFNs(A$):LOCALB%:A$=FNv(A$):B%=ASCLEFT$(A$,1):WHILENOT(B%>47ANDB%<58)ANDNOT(B%>64ANDB%<91)ANDA$<>"":A$=MID$(A$,2):B%=ASCLEFT$(A$,1):ENDWHILE:=A$
14882DEFPROCty(p%,b%):LOCALA%:ey%=u%-40:b%!8=!b%+ey%:b%!48=b%!40+ey%:b%+=88+8:FORA%=&BTO17:b%!(A%*32)=ey%-16:NEXT:FORA%=8TO23:A%-=7*(A%=&B):b%!(A%*32)=ey%:NEXT:b%!(24*32-8)=(ey%-384)/4:b%!(24*32)=b%!(24*32-8)+&80
14883b%!(25*32-8)=b%!(24*32)+(ey%-384)/4:b%!(25*32)=b%!(25*32-8)+&80:b%!(26*32-8)=b%!(25*32)+(ey%-384)/4:b%!(26*32)=b%!(26*32-8)+&80:ENDPROC
14884DEFPROCt_:LOCALA%,B%,C%,S%,w%,L%:FORA%=0TO26:M%(A%)=0:F%(A%)=-1:NEXT:M%(0)=1:C%=-1:h_%=-1:P_%=16:w%=OPENIN(x$):IFNOTFu%ANDw%<>0THEN
14885WHILENOTEOF#w%:S%=VALGET$#w%:B%=FNw(s_%,S%,TRUE):IFC%<>-1THENC%!4=B%ELSEh_%=B%
14886!B%=C%:B%!8=S%:SYS&C,4,w%,B%+&C,S%-&C:L%=FNq(FNK(B%,0)+" "+FNK(B%,1))-64:M%(L%)+=1:IFF%(L%)=-1THENF%(L%)=B%
14887C%=B%:IFx_%THENPROCw(NOT1)
14888ENDWHILE:IFh_%<>-1THENB%!4=-1
14889ENDIF:CLOSE#w%:w%=OPENINf$:IFNOTFu%ANDw%<>0THEN
14890P_%=VALGET$#w%:FORB%=0TOP_%-1:Z$(B%,0)=GET$#w%:Z$(B%,1)=GET$#w%:NEXT
14891ENDIF:CLOSE#w%:w%=0:ENDPROC
14892DEFPROCDJ:LOCALw%,B%,S%,A%:w%=OPENOUTx$:B%=h_%:WHILEB%<>-1:BPUT#w%,STR$B%!8:SYS&C,2,w%,B%+&C,B%!8 -&C:B%=B%!4:ENDWHILE:CLOSE#w%:w%=OPENOUTf$:BPUT#w%,STR$P_%:FORA%=0TOP_%-1:BPUT#w%,Z$(A%,0)+CHR$&A+Z$(A%,1):NEXT:CLOSE#w%:w%=0:ENDPROC
14893DEFPROCVJ(ey%,Pa%):IFey%>0THEN
14894LOCALA%,B%,C%,F%:B%=F%(ey%):WHILEPa%>0:B%=B%!4:Pa%-=1:ENDWHILE:REPEATFORC%=0TO&E:A$(A%,C%)=FNK(B%,C%):NEXT:A%+=1:F%=(A%>Xy%*2-1)ORB%!4=-1:B%=B%!4:IFNOTF%THENF%=(FNq(FNK(B%,0)+" "+FNK(B%,1))-64<>ey%)
14895UNTILF%
14896ENDIF:ENDPROC
14897DEFFNK(B%,L%):LOCALA$:B%+=&C:WHILEL%>0:WHILE?B%<>&A:B%+=1:ENDWHILE:B%+=1:L%-=1:ENDWHILE:WHILE?B%<>&A:A$+=CHR$?B%:B%+=1:ENDWHILE:=A$
14898DEFPROCRJ(S$):LOCALe$,A%,B%,S%,I%,na%,ua%,Ka%,`l%:Cu%=0:jJ%=0:w%=OPENINS$:WHILENOTEOF#w%:e$=GET$#w%:IFe$<>""THENA%=FNuy(e$):Cu%+=1:IFA%>jJ%THENjJ%=A%
14899ENDWHILE:CLOSE#w%:w%=0:IFjJ%>0THEN
14900SYS&400D9,,P$+".Resources."+B$+".Templates":SYS&400DB,,,0,0,0,"Import"TO,Ka%,`l%:SYS30,6,,,Ka%TO,,dl%;na%:SYS30,6,,,`l%TO,,jl%;ua%:SYS&400DB,,dl%,jl%,jl%+`l%,vl%,"Import",0:SYS&400C1,,dl%TOGy%:SYS&400DA:J$=S$
14901B%=1:FORA%=&ATO52STEP3:PROCA(Gy%,A%,STR$B%):IFB%>0THENB%+=1:IFB%>jJ%THENB%=0
14902NEXT:PROCA(Gy%,54,FNA("Import1")):PROCA(Gy%,55,FNA("Import1")):PROCM(Gy%,70,1):PROCZ(Gy%,69,0):PROC_(S$,1)
14903ELSEJ$="":PROCB(FNA("ErrCSV"))
14904ENDIF:ENDPROC
14905DEFPROCi:Cu%=0:jJ%=0:IFJ$<>""THENOSCLI"Remove "+J$:J$=""
14906IFGy%<>-1THEN
14907!K%=Gy%:Gy%=-1:SYS&400C3,,K%:SYS30,7,,dl%:SYS30,7,,jl%
14908ENDIF:ENDPROC
14909DEFPROC_(S$,xl%):LOCALA%,B%,C%,S%,g$,u_%:g$=FNN_(S$,xl%):C$="":dy%=-1:PROCR(Cy%,25,1):FORA%=9TO23:B%=&A+(A%-9)*3:u_%=VALFNM(Gy%,B%):S%=0:IFB%<&ETHENS%=FNMy(Zl%,FNM(Gy%,55+(B%=&A)))
14910IFB%>&FANDB%<35ANDFNM(Gy%,B%)=FNM(Gy%,16)ANDFNZ(Gy%,69)THEN
14911S%=256:C%=16:WHILEC%<B%:IFFNM(Gy%,C%)=FNM(Gy%,16)THENS%+=1
14912C%+=3:ENDWHILE
14913ENDIF:IFu_%>0THEN
14914PROCA(Cy%,A%,FNF_(g$,u_%,S%))
14915ELSEPROCA(Cy%,A%,"")
14916ENDIF:NEXT:PROCA(Gy%,59,STR$xl%):IFNOTIy%THENPROCz(i%,-1,-1)
14917K_%=t%:w_%=v%:t%=FNG(2):PROCQ(0,0):IFK_%<>t%ORw_%<>v%THENJ_%=0:PROCK
14918PROCz(Gy%,-1,0):ENDPROC
14919DEFFNN_(S$,xl%):LOCALA$:w%=OPENINS$:WHILExl%>0:A$=GET$#w%:IFA$<>""THENxl%-=1
14920ENDWHILE:CLOSE#w%:w%=0:=A$
14921DEFFNF_(A$,u_%,Ua%):LOCALCJ%,B%,Z$,NJ%:WHILEu_%>1ANDA$<>"":IFASCA$=34THENCJ%=NOTCJ%
14922IFASCA$=44ANDNOTCJ%THENu_%-=1
14923A$=MID$(A$,2):ENDWHILE:IFASCA$=34THENCJ%=TRUE:A$=MID$(A$,2)
14924WHILENOTNJ%:IFASCA$=34ORA$=""THENCJ%=FALSE:NJ%=TRUE
14925IFASCA$=44ANDNOTCJ%THENNJ%=TRUE
14926IFNOTNJ%THENZ$+=LEFT$(A$,1):A$=MID$(A$,2)
14927ENDWHILE:CASEUa%OF
14928WHEN0
14929WHEN1:Z$=LEFT$(Z$,INSTR(Z$," ")-1)
14930WHEN2:Z$=MID$(Z$,INSTR(Z$," ")+1)
14931WHEN3:IFINSTR(Z$," ")>0THEN
14932B%=LENZ$:REPEATB%-=1:UNTILMID$(Z$,B%,1)=" ":Z$=LEFT$(Z$,B%-1)
14933ELSEZ$=""
14934ENDIF
14935WHEN4:WHILEINSTR(Z$," "):Z$=MID$(Z$,INSTR(Z$," ")+1):ENDWHILE
14936OTHERWISE:B%=Ua%ANDNOT256:A$=FNM(Gy%,70):WHILEB%>0:IFINSTR(Z$,A$)THENZ$=MID$(Z$,INSTR(Z$,A$)+LENA$)ELSEZ$=""
14937B%-=1:ENDWHILE:IFINSTR(Z$,A$)THENZ$=LEFT$(Z$,INSTR(Z$,A$)-1)
14938ENDCASE:=Z$
14939DEFFNuy(A$):LOCALGi%,CJ%:WHILEA$<>"":IFASCA$=34THENCJ%=NOTCJ%
14940IFASCA$=44ANDNOTCJ%THENGi%+=1
14941A$=MID$(A$,2):ENDWHILE:=Gi%-(Gi%>0)
14942DEFPROCi_(q%,s%,g%,Yy%,ry%):LOCALA%,B%:CASETRUEOF
14943WHENs%=58ORs%=60:A%=VALFNM(q%,59)-(s%-59)*(1+2*(g%=1)):IFA%>0ANDA%<=Cu%THENPROCA(q%,59,STR$A%):PROC_(J$,A%)
14944WHENs%>=9ANDs%<=53:B%=&A+3*((s%-9)DIV3):A%=VALFNM(q%,B%)+(s%-B%)*(1+2*(g%=1)):IFA%>=0ANDA%<=jJ%THEN
14945PROCA(q%,B%,STR$A%):PROC_(J$,VALFNM(q%,59))
14946ENDIF
14947WHENs%=54ORs%=55:PROCF(Zl%,Yy%,ry%,q%,s%)
14948WHENs%=66:PROCy(FALSE):A%=VALFNM(Gy%,59)+1:IFA%>0ANDA%<=Cu%THENPROCA(Gy%,59,STR$A%):PROC_(J$,A%)
14949WHENs%=67:REPEAT:PROCy(FALSE):A%=VALFNM(Gy%,59)+1:IFA%>0ANDA%<=Cu%THENPROCA(Gy%,59,STR$A%):PROC_(J$,A%)
14950UNTILA%>Cu%
14951WHENs%=68:PROCi
14952WHENs%=69:PROCM(q%,70,ABSNOTFNZ(q%,69)):PROC_(J$,VALFNM(Gy%,59))
14953ENDCASE:ENDPROC
14954DEFPROCWJ(s%,I%):PROCA(Gy%,s%,FNJ(Zl%,I%)):PROC_(J$,VALFNM(Gy%,59)):ENDPROC
14955DEFPROCb_(b%,Mi%,a%,Q%,x%,n%):!J%=i%:IFL%(b%,Mi%-&D)<>-1THENJ%!4=L%(b%,Mi%-&D):SYS&400C4,,J%
14956SYS&400CB,,J%:Q%-=8:n%-=8:J%!4=a%-J%!4:J%!8=Q%-J%!16-n%:J%!&C=J%!4+x%:J%!16=J%!8+n%:J%!20=&7003119:J%!24=sl%:J%!28=Ai%:J%!32=0:SYS&400C2,,J%TOL%(b%,Mi%-&D):ENDPROC
14957DEFPROCdy:LOCALb%,Wy%:!J%=i%:FORb%=0TO&A:FORWy%=0TO1:IFL%(b%,Wy%)<>-1THENJ%!4=L%(b%,Wy%):SYS&400C4,,J%
14958NEXT,:L%()=-1:ENDPROC
14959DEFPROCp_(s%):LOCALb%,Wy%,Oa%,Ti%,A$:FORb%=0TO&A:FORWy%=0TO1:IFL%(b%,Wy%)=s%THENOa%=b%:Ti%=Wy%
14960NEXT,:IFTi%=0THENA$=X$:uJ%=2ELSEA$=U$:uJ%=1
14961PROCGy(A$+A$(Oa%,Ti%+&D)):ENDPROC
14962DEFPROCGy(o$):!J%=256:J%!4=vu%:J%!16=&4AF80:$(J%+20)=o$+CHR$0:SYS&400E7,18,J%,0:ENDPROC
14963DEFPROCSu:DIMC%(&C),Q%(&C):Ly%=3:SJ%=&B:t_%=-1:C%()=-1:d$=Y$+"Anni":Fi%=0:BJ%=-1:HJ%=-1:uu%=TRUE:ll%=FNC("ANM","ANM",1,4):ENDPROC
14964DEFFNRy=ll%
14965DEFPROCDu(A%):B%(A%)=1:W%(A%)=&C:S%(A%)=1:M$(A%)=FNA("AnnTab"):PROC__:ENDPROC
14966DEFPROCoJ(v%,y%,_%,U%):LOCALPy%,Q%,r%:Py%=(k%-Ly%*20-20)/Ly%:Q%=0:FORr%=v%+Ly%*ABSy%TOv%+Ly%*ABSy%+Ly%-1:Q%+=20+Py%:PROCFu(r%,_%+20,U%-Q%+Py%,u%-40,Py%):NEXT:IFy%=0ANDv%>1THENPROCI(y%,_%,U%)
14967IFy%ANDr%<&CTHENPROCI(y%,_%,U%)
14968ENDPROC
14969DEFPROCQJ(l%,cl%):CASE!l%OF
14970WHEN0:IFHJ%<>-1THENPROCo(HJ%,-1)
14971WHEN1:IFHJ%<>-1THENPROCo(HJ%,0)
14972WHEN2:IFHJ%<>-1THENPROCHy(HJ%)
14973WHEN3:PROCKy("X�s %n%t birthday",Dy%,Ra%,My%,0,0)
14974ENDCASE:ENDPROC
14975DEFPROCVy(p%):v%+=p%*2*Ly%:IFv%+2*Ly%>&DTHENv%-=2*Ly%
14976IFv%<1THENv%=1
14977ENDPROC
14978DEFPROCy_(g%,y%,a%,Q%,i_%,qJ%):LOCALPy%,r%:Py%=(k%-20)/Ly%:r%=-Q%DIVPy%+1:Q%+=(r%-1)*Py%+20:IFQ%>0ORr%>Ly%ORa%<20ORa%>u%-40THENr%=0
14979IFy%THENi_%=wy%+20ELSEi_%=my%+20
14980qJ%=-m%-20-Py%*(r%-1):IFr%<>0THENPROC`u(r%+Ly%*ABSy%+v%-1,g%,a%-20,Q%,i_%,qJ%,u%-40,-Py%+20)
14981ENDPROC
14982DEFFNmy(s%,By%):o%=TRUE:CASEBy%OF
14983WHEN414:PROCVy(1)
14984WHEN415:PROCVy(-1)
14985OTHERWISEo%=FALSE
14986ENDCASE:=o%
14987DEFFNB_(q%,s%,By%):o%=FALSE:IFq%=_y%THEN
14988o%=TRUE:CASEBy%OF
14989WHEN394,398,399:PROCC(_y%,6-s%)
14990WHEN4,24:IFt_%<>-1THENPROCHy(t_%)
14991WHEN27:PROCt
14992WHEN&D:IFs%=2THEN
14993IFFNNy(FNM(_y%,2),d%,z%,e%)THENPROCC(_y%,4)
14994ELSEPROCZ_
14995ENDIF
14996OTHERWISEo%=FALSE
14997ENDCASE
14998ENDIF:=o%
14999DEFPROCO_:LOCALB%:w%=OPENOUTd$:B%=BJ%:WHILEB%<>-1:BPUT#w%,STR$B%!8:SYS&C,2,w%,B%+&C,B%!8 -&C:B%=B%!4:ENDWHILE:CLOSE#w%:w%=0:ENDPROC
15000DEFPROCwJ(w%):BPUT#w%,SJ%:BPUT#w%,Ly%:PROCJ(uu%):ENDPROC
15001DEFPROCJu(w%):SJ%=BGET#w%:Ly%=BGET#w%:uu%=FNQ:ENDPROC
15002DEFPROCqJ(x%,Fy%,l%,a%,Q%):CASEFy%OF
15003WHEN1:PROCW(Ay%,0,-1):PROCS(Ay%,FN_(x%,Fy%),1):PROCF(Ay%,a%,Q%,x%,Fy%)
15004WHEN2,3,4,5:IFg%<>2THENPROCZ(x%,Fy%,1)
15005ENDCASE:ENDPROC
15006DEFPROCSJ(Zy%,fa%):PROCD(fa%,1,!Zy%):PROCW(Ay%,0,-1):PROCS(Ay%,!Zy%,1):ENDPROC
15007DEFPROCtJ(x%):LOCALA%:PROCD(x%,1,SJ%):FORA%=2TO5:PROCZ(x%,A%,0):NEXT:IFLy%<5THENPROCZ(x%,Ly%+1,1)ELSEPROCZ(x%,5,1)
15008PROCZ(x%,6,-uu%):ENDPROC
15009DEFPROCWu(x%):LOCALA%,B%:B%=Ly%:SJ%=FN_(x%,1):A%=2:WHILEA%<5ANDNOTFNZ(x%,A%):A%+=1:ENDWHILE:IFA%<5THENLy%=A%-1ELSELy%=6
15010IFB%<>Ly%THENQ%()=0
15011IFS%(FNG(5))+2*Ly%>&DTHEN
15012IFZ%(t%)=5THENv%=&D-2*Ly%ELSES%(FNG(5))=&D-2*Ly%
15013ENDIF:uu%=FNZ(x%,6):ENDPROC
15014DEFPROCFu(r%,_%,U%,x%,n%):LOCALrJ%,B%,Qy%,A%,Q%:B%=C%(r%):Qy%=28:IFFNF(_%,U%,x%,-n%)THEN
15015rJ%=FNP("Homerton.Bold",&C,&C):p_%=FNP("Homerton.Medium",&A,&A):PROCV(0,7):IFr%=fy%THENSYS&400E6,!FJ%ELSESYS&400E6,5
15016PROCCy(_%,U%,x%,n%,20):PROCL(rJ%,FNX(r%,-1),0,_%+x%/2,U%-&A):Q%=40:A%=Q%(r%):WHILEA%>0:B%=B%!4:A%-=1:ENDWHILE:WHILEB%<>-1ANDQ%+Qy%-5<=n%:IFFNF(_%+20,U%-Q%-25,x%-50,Qy%)THEN
15017PROCc(p_%,FNSy(B%,My%-(r%<fy%OR(r%=fy%ANDB%?&C<Dy%))),_%+70,U%-Q%-20,x%-70,Qy%):PROCL(p_%,STR$(B%?&C),1,_%+60,U%-Q%-4)
15018ENDIF:Q%+=Qy%:B%=FNp(B%,r%):ENDWHILE:IFB%<>-1THENMOVE_%+8,U%-n%+20:MOVEBY18,0:PLOT81,-9,-18
15019IFQ%(r%)<>0THENMOVE_%+8,U%-60:MOVEBY18,0:PLOT81,-9,18
15020PROCU(rJ%):PROCU(p_%)
15021ENDIF:ENDPROC
15022DEFPROC`u(r%,g%,a%,Q%,_%,U%,x%,n%):LOCALL%,A%,B%,C%,N%,Qy%,A$:Qy%=28:C%=(-Q%-70+2*Qy%)DIVQy%+Q%(r%):N%=-((n%+40)DIVQy%):A%=0:B%=C%(r%):WHILEB%<>-1:A%+=1:B%=FNp(B%,r%):ENDWHILE:FORL%=0TO2:PROCT(ll%,L%,1):NEXT:HJ%=-1:Ra%=r%:CASETRUEOF
15023WHENa%>35ANDQ%<-40ANDa%<x%ANDC%>0ANDC%<=A%:B%=C%(r%):WHILEC%>1:C%-=1:B%=FNp(B%,r%):ENDWHILE:IFg%=2THEN
15024FORL%=0TO2:PROCT(ll%,L%,0):NEXT:HJ%=B%
15025ELSEPROCo(B%,g%=4)
15026ENDIF
15027WHENg%=2
15028WHENa%>0ANDa%<30ANDQ%-20<n%:IFQ%(r%)<A%-N%THENQ%(r%)+=1:PROCN(i%,_%,U%,_%+x%,U%+n%)
15029WHENa%>0ANDa%<30ANDQ%>-60ANDQ%<=-42:IFQ%(r%)>0THENQ%(r%)-=1:PROCN(i%,_%,U%,_%+x%,U%+n%)
15030OTHERWISEIFg%<>2THENPROCKy("X�s %n%t birthday",Dy%,r%,My%,0,0)
15031ENDCASE:ENDPROC
15032DEFPROCx_(d%,z%,N%,g%):LOCALB%:B%=-1:WHILEN%>0:B%=FNk(d%,z%,B%):N%-=1:ENDWHILE:PROCo(B%,g%=4):ENDPROC
15033DEFPROCo(B%,hy%):LOCALA%,A$:IFhy%THENt_%=B%ELSEt_%=-1
15034A%=B%+16:WHILE?A%<>&B:A$+=CHR$?A%:A%+=1:ENDWHILE:PROCKy(A$,B%?&C,(B%!&C>>8)AND&F,(B%!&C>>&C)AND&FFF,B%?&F,hy%):ENDPROC
15035DEFPROCKy(W$,c%,r%,Q%,u_%,hy%):PROCA(_y%,4,W$):PROCA(_y%,2,STR$c%+"/"+STR$r%+"/"+STR$Q%):Zi%=u_%:IFu_%=0THENu_%=SJ%
15036PROCD(_y%,4,u_%):PROCR(_y%,&D,(hy%=0)):IFhy%=0THENA$=FNA("anset")ELSEA$=FNA("anedit")
15037PROCX(_y%):PROCr(_y%,TRUE,TRUE):PROCC(_y%,2):VJ%=TRUE:PROCf(_y%,_a%,A$,0):ENDPROC
15038DEFFNp(B%,z%):LOCALA%,C%,c%,r%,Q%:B%=B%!4:IF((B%!&C>>8)AND&F)<>z%THENB%=-1
15039=B%
15040DEFFNSy(B%,My%):LOCALA%,C%,c%,Q%,A$:Q%=(B%!&C>>&C)AND&FFF:IFQ%<=My%THEN
15041C%=B%?&F:C%-=SJ%*(C%=0):PROCV(0,C%):A%=B%+16:WHILE?A%<>&B:IF?A%=37THENA%+=1:A$+=FNW_(?A%,Q%,My%)ELSEA$+=CHR$?A%
15042A%+=1:ENDWHILE
15043ENDIF:=A$
15044DEFPROCrJ(s%,Yy%,ry%):LOCALc%,r%,Q%:CASEs%OF
15045WHEN5:PROCF(Xl%,Yy%,ry%,q%,s%)
15046WHEN&B:PROCZ_
15047WHEN&C:PROCt
15048WHEN&D:PROCHy(t_%)
15049ENDCASE:ENDPROC
15050DEFPROCZ_:LOCALA$,d%,z%,e%:A$=FNM(_y%,4):IFA$<>""THEN
15051IFFNNy(FNM(_y%,2),d%,z%,e%)THEN
15052IFt_%<>-1THENPROCuy(t_%)
15053PROCLJ(A$,d%,z%,e%,Zi%):Q%()=0:PROCt:vy%=TRUE:IFIy%AND(Z%(t%)=5ORZ%(t%)=3)THENPROCK
15054ELSEPROCC(_y%,2)
15055ENDIF
15056ELSEPROCB(FNA("ErrMes"))
15057ENDIF:ENDPROC
15058DEFPROCt:t_%=-1:PROCX(_y%):PROCX(sy%):IFIy%THENPROCC(i%,-1)
15059ENDPROC
15060DEFFNNy(A$,RETURNc%,RETURNr%,RETURNQ%):LOCALA%:c%=VALA$:A$=MID$(A$,INSTR(A$,"/")+1):r%=VALA$:A$=MID$(A$,INSTR(A$,"/")+1):Q%=VALA$:A%=FALSE:CASETRUEOF
15061WHENr%<1ORr%>&C:PROCB(FNA("ErrMonth"))
15062WHENQ%<1ORQ%>&FFF:PROCB(FNO("ErrYear","1","4095","",""))
15063WHENc%<1:PROCB(FNA("ErrDateZ"))
15064WHENc%>FND(r%,Q%):PROCB(FNO("ErrDate",STR$FND(r%,Q%),FNX(r%,-1)+STRING$(-(r%=2)," "+STR$Q%),"",""))
15065OTHERWISEA%=TRUE
15066ENDCASE:=A%
15067DEFPROCLJ(y$,d%,z%,e%,u_%):LOCALny%,Ny%,S%,B%,xy%,T%,F_%:F_%=d%+(z%<<8)+(e%<<&C)+(u_%<<24):xy%=FALSE:S%=LENy$+1+16:Ny%=BJ%:ny%=-1:WHILENy%<>-1ANDNOTxy%:IFFNKy(d%,z%,Ny%!&C)THENxy%=TRUEELSEny%=Ny%:Ny%=Ny%!4
15068ENDWHILE:B%=FNw(s_%,S%,TRUE):!B%=ny%:B%!4=Ny%:B%!8=S%:B%!&C=F_%:$(B%+16)=y$+CHR$&B:IFny%=-1THENBJ%=B%ELSEny%!4=B%
15069IFNy%<>-1THEN!Ny%=B%
15070IFC%(z%)=Ny%ORC%(z%)=-1THENC%(z%)=B%
15071ENDPROC
15072DEFPROCHy(B%):PROCuy(B%):PROCt:vy%=TRUE:IFB%=t_%THENt_%=-1
15073IFIy%AND(Z%(t%)=5ORZ%(t%)=3)THENPROCK
15074ENDPROC
15075DEFPROCuy(B%):LOCALny%,Ny%,r%,Qi%:Qi%=-1:ny%=!B%:Ny%=B%!4:r%=(B%!&C>>8)AND&F:Q%(r%)=0:IFny%<>-1THENny%!4=Ny%
15076IFNy%<>-1THEN!Ny%=ny%:IF((Ny%!&C>>8)AND&F)=r%THENQi%=Ny%
15077IFBJ%=B%THENBJ%=Ny%
15078IFC%(r%)=B%THENC%(r%)=Qi%
15079PROCLy(s_%,B%,TRUE):ENDPROC
15080DEFFNKy(c%,r%,T%):LOCAL`%,Tl%,xu%:Tl%=T%AND&FF:xu%=(T%>>8)AND&F:IFr%>=xu%THEN
15081IFc%<Tl%ANDxu%=r%THEN`%=TRUEELSE`%=FALSE
15082ELSE`%=TRUE
15083ENDIF:=`%
15084DEFPROCsJ:LOCALB%,xy%,tJ%,c%,r%,Ml%,fJ%,oy%,d%,z%,e%:PROCG(_J%,c%,r%,Ml%,fJ%,oy%):B%=C%(fJ%):d%=FNT:z%=FNI:e%=FNR:WHILEB%<>-1ANDNOTxy%ANDNOTtJ%:c%=B%?&C:r%=(B%!&C>>8)AND&F:IFr%>z%OR(r%=z%ANDc%>d%)THENtJ%=TRUE:PROCZy
15085IF(r%>fJ%OR(r%=fJ%ANDc%>Ml%))ANDNOTtJ%THENxy%=TRUE:PROChy(B%)ELSEB%=B%!4
15086ENDWHILE:IFNOTxy%THENPROCZy
15087ENDPROC
15088DEFPROCX_:LOCALB%,c%,r%,d%,z%,e%:d%=FNT:z%=FNI:e%=FNR:B%=Fi%!4:W_%=0:IFB%<>-1THEN
15089c%=B%?&C:r%=(B%!&C>>8)AND&F:IFr%>z%OR(r%=z%ANDc%>d%)THENPROCZyELSEPROChy(B%)
15090ELSEPROCZy
15091ENDIF:ENDPROC
15092DEFPROCZy:Bu%=FALSE:_J%=FNx(FNY):PROCX(GJ%):PROCx:ENDPROC
15093DEFPROChy(B%):LOCALc%:PROCA(GJ%,1,FNO("its",FNU(d%,z%,e%,-1),"","","")):PROCA(GJ%,2,FNSy(B%,e%)):c%=B%?&F:c%-=SJ%*(c%=0):PROCD(GJ%,2,c%):PROCz(GJ%,TRUE,TRUE):vy%=-1:Fi%=B%:IFuu%THENW_%=&A
15094ENDPROC
15095DEFFNn(c%,r%):LOCALB%,C%,Tl%,xu%:B%=C%(r%):IFB%<>-1THEN
15096REPEAT:IFB%?&C=c%THENC%+=1
15097B%=B%!4:IFB%<>-1THENTl%=B%?&C:xu%=(B%!&C>>8)AND&FELSExu%=&D
15098UNTILTl%>c%ORxu%>r%
15099ENDIF:=C%
15100DEFFNk(c%,r%,B%):IFB%=-1THEN
15101B%=C%(r%):WHILEB%?&C<>c%:B%=B%!4:ENDWHILE
15102ELSEB%=B%!4
15103ENDIF:IFB%<>-1THENIFB%?&C>c%OR((B%!&C>>8)AND&F)>r%THENB%=-1
15104=B%
15105DEFPROC__:LOCALS%,C%,B%,r%:C%=-1:BJ%=-1:w%=OPENINd$:IFNOTFu%ANDw%<>0THEN
15106WHILENOTEOF#w%:S%=VALGET$#w%:B%=FNw(s_%,S%,TRUE):IFC%<>-1THENC%!4=B%ELSEBJ%=B%
15107!B%=C%:B%!8=S%:SYS&C,4,w%,B%+&C,S%-&C:r%=((B%!&C)>>8)AND&F:IFC%(r%)=-1THENC%(r%)=B%
15108C%=B%:IFx_%THENPROCw(NOT1)
15109ENDWHILE:IFBJ%<>-1THENB%!4=-1
15110ENDIF:CLOSE#w%:w%=0:ENDPROC
15111DEFFNW_(T%,Q%,My%):LOCALA$,d,c%,F%,L%:Yl%=(T%AND32)=0:c%=My%-Q%:CASECHR$T%OF
15112WHEN"y","Y":A$=FNA("year"+STRING$(-(c%>1),"s")):IFYl%THENA$=FNv(A$)
15113WHEN"n":A$=STR$c%
15114WHEN"t","T":A$=FNLy(c%):IFYl%THENA$=FNv(A$)
15115WHEN"c","C":SYS&61502,C_%,"Ann"+STR$c%,J%,256TO,,,L%;F%:IF(F%AND1)=0THENJ%?L%=&D:A$=" ("+$J%+")"
15116IFYl%THENA$=FNv(A$)
15117ENDCASE:=A$
15118DEFPROCnJ:S_%=2:n_%=&F:Ou%=FALSE:Wa%=FNC("FAM","FAM",1,4):wi%=FNC("DIM4","ANM",1,3):e_%=FNC("DIM","DIM",1,6):PROCY(e_%,3,wi%):PROCY(e_%,5,Wa%):PROCg_(e_%,2,-1):aJ%=FNC("E","E",1,6):yl%=FNC("OT","OT",1,6):bl%=FNC("Day","Day",1,7):rl%=FNC("OE","OE",1,&C)
15119Xl%=FNPy(FNA("Col")):$(Xl%+28+&C)=FNA("Def"):r$=Y$+"Diary":DIMV%(&E):O_%=-1:LJ%=-1:pJ%=0:z$="":pu%=FNC("EN","EN",1,3):Yu%=FNC("EA","E",3,6):D_%=0:Du%=0:ly%=0:Z_%=-1:R_%=6:PROCMl:ENDPROC
15120DEFFNJ_=e_%
15121DEFPROCd_(A%):PROCz_:PROCOJ:PROCH(FNT,FNI,FNR):PROCS(e_%,S_%-1,TRUE):B%(A%)=FNS(0,0,1,1,&77d):W%(A%)=FNS(0,0,31-6,&C,&fff):M$(A%)=FNA("DiaTab"):ENDPROC
15122DEFPROCkJ:ENDPROC
15123DEFPROCku:LJ%=-1:ENDPROC
15124DEFPROCh_(v%,y%,_%,U%):LOCALd%,z%,e%,rJ%,il%,p_%,y_%,QJ%,bi%:PROCG(v%,y_%,QJ%,d%,z%,e%):rJ%=FNP("Homerton.Bold",&E,&E):SYS&400E6,7:il%=FNP("Trinity.Bold",&C,&C):p_%=FNP("Homerton.Medium",&A,&A):SYS&40081,,"Trinity.Medium",9*16,9*16TObi%:CASES_%OF
15125WHEN1:PROClu(v%,y%,_%,U%)
15126WHEN2:PROCMJ(v%,y%,_%,U%)
15127WHEN3:PROCAl(v%,y%,_%,U%)
15128ENDCASE:PROCV(0,7):IFy%THEN
15129A$=FNX(z%,-1)+" "+STR$e%:CASETRUEOF
15130WHENQJ%<>e%:A$=FNX(y_%,3)+" "+STR$QJ%+" - "+FNX(z%,3)+" "+STR$e%
15131WHENy_%<>z%:A$=FNX(y_%,-1)+" - "+A$
15132ENDCASE:IFFNB(FNS(0,0,d%,z%,e%),W%(t%))=-1THENPROCI(y%,_%,U%)
15133PROCL(rJ%,A$,1,_%+u%-&A,U%-&A)
15134ELSE:A$=STR$QJ%+" "+FNX(y_%,-1):CASETRUEOF
15135WHENQJ%<>e%:A$=STR$QJ%+" "+FNX(y_%,3)+" - "+STR$e%+" "+FNX(z%,3)
15136WHENy_%<>z%:A$+=" - "+FNX(z%,-1)
15137ENDCASE:PROCL(rJ%,A$,-1,_%+&A,U%-&A):IFFNB(v%,B%(t%))=1THENPROCI(y%,_%,U%)
15138ENDIF:PROCU(rJ%):PROCU(il%):PROCU(p_%):ENDPROC
15139DEFPROC_u(l%,cl%):CASE!l%OF
15140WHEN0,1,2:IFS_%<>!l%+1THEN
15141PROCS(e_%,S_%-1,FALSE):S_%=!l%+1:PROCS(e_%,!l%,TRUE):PROCG(S%(FNG(3)),A%,B%,d%,z%,e%):PROCH(d%,z%,e%):IFZ%(t%)=3THENv%=S%(t%):mJ%=TRUE
15142ENDIF
15143WHEN3:CASEl%!4OF
15144WHEN0:PROCWy(LJ%)
15145WHEN1:PROCI_(LJ%)
15146WHEN2:PROCv(LJ%)
15147ENDCASE
15148WHEN4:PROC`(FNT,FNI,FNR,e_%,0)
15149WHEN5:CASEl%!4OF
15150WHEN0:PROCD_
15151WHEN1:PROCS_
15152WHEN2:PROCN_
15153WHEN3:PROCH_
15154ENDCASE
15155ENDCASE:ENDPROC
15156DEFPROCA_(Zy%,l%):CASEZy%OF
15157WHENaJ%:A$=FNJ(Zy%,!l%):IFFN`y(Zy%)=FNA("E")THENPROCA(f%,30,A$):nu%=!l%+1ELSEPROCA(Ry%,&D,A$)
15158WHENyl%:PROCA(f%,33,FNJ(Zy%,!l%)):cu%=!l%+1
15159WHENbl%:PROCA(f%,34,FNJ(Zy%,!l%)):ju%=!l%+1
15160WHENrl%:PROCA(f%,35,FNJ(Zy%,!l%)):mu%=!l%+1
15161ENDCASE:ENDPROC
15162DEFPROCQy(p%):LOCALd%,z%,e%,A%,B%:PROCG(v%,A%,B%,d%,z%,e%):CASES_%OF
15163WHEN1:PROCP(d%,z%,e%,p%*&E,0,0)
15164WHEN2:PROCP(d%,z%,e%,p%*7,0,0)
15165WHEN3:PROCP(d%,z%,e%,p%*2,0,0)
15166ENDCASE:J_%=-FNB(v%,FNS(0,0,d%,z%,e%)):PROCH(d%,z%,e%):IFFNB(v%,B%(t%))=-1THENv%=B%(t%)
15167IFFNB(v%,W%(t%))=1THENv%=W%(t%)
15168ENDPROC
15169DEFPROCzu(g%,y%,a%,Q%,i_%,qJ%):LOCALR%:CASES_%OF
15170WHEN1:R%=FNvy(g%,y%,a%,Q%)
15171WHEN2:R%=FNky(g%,y%,a%,Q%)
15172WHEN3:R%=FNQ_(g%,y%,a%,Q%)
15173ENDCASE:IFg%=2ANDR%>1THENLJ%=R%ELSELJ%=-1
15174ENDPROC
15175DEFFNG_(s%,By%):o%=TRUE:CASEBy%OF
15176WHEN389:PROCD_
15177WHEN390:PROCS_
15178WHEN391:PROCN_
15179WHEN392:PROCH_
15180WHEN414:PROCQy(1)
15181WHEN415:PROCQy(-1)
15182WHEN30:PROCH(FNT,FNI,FNR)
15183WHEN388:PROC`(FNT,FNI,FNR,e_%,0)
15184WHEN27:PROCX(sy%)
15185OTHERWISEo%=FALSE
15186ENDCASE:=o%
15187DEFFNP_(q%,s%,By%):LOCALA%,B%:o%=TRUE:IFq%=f%THEN
15188A%=0:IFBy%=&DORBy%=398ORBy%=394THENA%=1ELSEIFBy%=399THENA%=-1
15189CASEBy%OF
15190WHEN396:IFwJ%=FNzTHENPROCk(q%,s%,-1,16,18)
15191WHEN397:IFwJ%=FNzTHENPROCk(q%,s%,1,16,18)
15192WHEN&D:IFs%=18THENPROCV_:o%=TRUE
15193WHEN27:PROCn
15194WHEN4,24:IFO_%<>-1THENPROCv(O_%)
15195OTHERWISEo%=FALSE
15196ENDCASE
15197ELSEo%=FALSE
15198ENDIF:=o%
15199DEFPROCpJ:LOCALw%,B%:w%=OPENOUTr$:B%=Z_%:WHILEB%<>-1:BPUT#w%,STR$B%!8:SYS&C,2,w%,B%+&C,B%!8 -&C:B%=B%!4:ENDWHILE:CLOSE#w%:w%=0:ENDPROC
15200DEFPROCBu(w%):BPUT#w%,S_%:BPUT#w%,n_%:BPUT#w%,Ou%+5:BPUT#w%,D_%:BPUT#w%,ly%:BPUT#w%,R_%:BPUT#w%,Du%:ENDPROC
15201DEFPROCfJ(w%):S_%=BGET#w%:n_%=BGET#w%:Ou%=(BGET#w%)-5:D_%=BGET#w%:ly%=BGET#w%:R_%=BGET#w%:Du%=FNQ:ENDPROC
15202DEFPROCGu(x%,Fy%,l%,a%,Q%):LOCALA%,B%:CASEs%OF
15203WHEN1,2,3:IFg%<>2PROCZ(x%,Fy%,1)
15204WHEN&D:PROCW(Ay%,0,-1):PROCS(Ay%,FN_(x%,Fy%),1):PROCF(Ay%,a%,Q%,x%,Fy%)
15205WHEN6:B%=NOTFNZ(x%,Fy%):FORA%=7TO&A:PROCM(x%,A%,B%):NEXT
15206WHEN8,9:A%=VALFNM(x%,7):A%+=1+2*(Fy%=8):IFA%>0ANDA%<&DTHENPROCA(x%,7,STR$A%)
15207WHEN&A:PROCF(Yu%,a%,Q%,x%,Fy%)
15208WHEN&B:PROCM(x%,&C,NOTFNZ(x%,Fy%)):PROCM(x%,18,NOTFNZ(x%,Fy%))
15209WHEN&C:PROCF(pu%,a%,Q%,x%,Fy%)
15210ENDCASE:ENDPROC
15211DEFPROCiJ(l%,x%):CASEbJ%OF
15212WHENAy%:PROCD(x%,&D,!l%):PROCW(Ay%,0,-1):PROCS(Ay%,!l%,1)
15213WHENYu%:PROCA(x%,&A,FNJ(Yu%,!l%))
15214WHENpu%:PROCA(x%,&C,FNJ(pu%,!l%)):PROCM(x%,18,-(!l%<>0))
15215ENDCASE:ENDPROC
15216DEFPROCmu(x%):LOCALA%:FORA%=1TO3:PROCZ(x%,A%,ABS(S_%=A%)):NEXT:PROCD(x%,&D,n_%):PROCZ(x%,5,-Ou%):PROCZ(x%,&B,-(D_%<>0)):PROCM(x%,&C,-(D_%=0)):PROCM(x%,18,-(D_%<>1)):PROCZ(x%,18,-Du%):PROCZ(x%,6,-(ly%<>0)):FORA%=7TO&A:PROCM(x%,A%,-(ly%=0)):NEXT:PROCZ(x%,&F,ABS((R_%AND4)>0)):PROCZ(x%,16,ABS((R_%AND2)>0))
15217PROCZ(x%,17,ABS((R_%AND1)>0)):PROCM(x%,&F,ABS((R_%AND1)>0)):IFly%<>0THEN
15218PROCA(x%,7,STR$(ly%AND&F)):PROCA(x%,&A,FNJ(Yu%,ly%>>4))
15219ELSEPROCA(x%,7,"1"):PROCA(x%,&A,FNA("E3"))
15220ENDIF:IFD_%=0THENPROCA(x%,&C,FNA("EN1"))ELSEPROCA(x%,&C,FNJ(pu%,D_%-1))
15221ENDPROC
15222DEFPROCnu(x%):LOCALA%,B%,d%,z%,e%:A%=0:REPEATA%+=1:UNTILFNZ(x%,A%)ORA%=3:S_%=A%:PROCG(S%(FNG(3)),A%,B%,d%,z%,e%):PROCH(d%,z%,e%):n_%=FN_(x%,&D):Ou%=FNZ(x%,5):ly%=0:D_%=0:IFFNZ(x%,6)THENly%=((FNMy(Yu%,FNM(x%,&A)))<<4)+VALFNM(x%,7)
15223IFFNZ(x%,&B)THEND_%=FNMy(pu%,FNM(x%,&C))+1
15224Du%=FNZ(x%,18):R_%=ABS(FNZ(x%,17)+2*FNZ(x%,16)+4*FNZ(x%,&F)):ENDPROC
15225DEFPROCH(d%,z%,e%):LOCALj%,B%,xy%,T%,b%:j%=FNH(d%,z%,e%):IFS_%=3THEN
15226PROCP(d%,z%,e%,FNey(d%,z%,e%)-1,0,0)
15227ELSEPROCP(d%,z%,e%,-j%+1,0,0)
15228ENDIF:b%=FNS(0,0,d%,z%,e%):S%(FNG(3))=b%:IFZ%(t%)=3THENv%=S%(t%)
15229PROCl:ENDPROC
15230DEFPROCl:LOCALB%,T%,xy%:B%=Z_%:gJ%=-1:b%=S%(FNG(3)):V%()=0:WHILEB%<>-1ANDNOTxy%:T%=B%!&C:IFFNB(b%,T%)<>1THENxy%=TRUE:gJ%=B%ELSEB%=B%!4
15231ENDWHILE:ENDPROC
15232DEFFNiy(T%):LOCALB%,F%:B%=Z_%:F%=-1:WHILEB%<>-1ANDF%=-1:IF((B%!16)AND(1<<20))=0OR((B%!16)AND4)=4THENF%=B%ELSEB%=B%!4
15233ENDWHILE:=F%
15234DEFPROCr_(B%):IF(B%!16AND(3<<20))=0THEN
15235LOCALqy%,Vy%,d%,z%,e%,Il%,A$,A%,R%,C%:PROCG(B%!&C,qy%,Vy%,d%,z%,e%):pJ%=B%:IFVy%>&CTHENVy%-=&C:Il%=TRUEELSEIFVy%=0THENVy%=&C
15236A$=STR$Vy%+":"+STRING$(2-LENSTR$qy%,"0")+STR$qy%:IFIl%THENA$+=" pm,"ELSEA$+=" am,"
15237PROCA(Ry%,1,FNO("WasSet",A$,"","","")):PROCA(Ry%,2,FNU(d%,z%,e%,-1)):IF((B%!16)AND4)=4THEN
15238R%=TRUE:IF((B%!16)AND8)=8THEN
15239PROCry(qy%,Vy%,d%,z%,e%,((B%!16)>>8)AND&FF,(((B%!16)>>16)AND&F)-1):IFVy%>&CTHENVy%-=&C:Il%=TRUEELSEIFVy%=0THENVy%=&C
15240A$=STR$Vy%+":"+STRING$(2-LENSTR$qy%,"0")+STR$qy%:IFIl%THENA$+=" pm,"ELSEA$+=" am,"
15241PROCA(Ry%,&F,FNO("WilRpt",A$,"","","")):PROCA(Ry%,16,FNU(d%,z%,e%,-1))
15242ELSE:PROCvy(d%,z%,e%,B%!16):A$=STR$Vy%+":"+STRING$(2-LENSTR$qy%,"0")+STR$qy%:IFIl%THENA$+=" pm,"ELSEA$+=" am,"
15243PROCA(Ry%,&F,FNO("WilRpt",A$,"","","")):PROCA(Ry%,16,FNU(d%,z%,e%,-1))
15244ENDIF
15245ENDIF:IF((B%!16)AND1)=1THENW_%=&A
15246C%=(B%!16>>4)AND&F:C%-=n_%*(C%=0):FORA%=4TO6:PROCD(Ry%,A%,C%):NEXT:B%+=20:FORA%=4TO6:A$="":WHILE?B%<>&B:A$+=CHR$?B%:B%+=1:ENDWHILE:B%+=1:PROCA(Ry%,A%,A$):NEXT:PROCZ(Ry%,9,0):FORA%=&ATO&D:PROCM(Ry%,A%,1):NEXT:PROCA(Ry%,&A,"1"):PROCA(Ry%,&D,FNA("E1")):PROChJ(NOTR%,TRUE):vJ%=-1
15247ELSE:IF(B%!16AND(1<<21))<>0THENPROCbu(B%)
15248PROCYy(B%,0)
15249ENDIF:ENDPROC
15250DEFPROCbu(B%):LOCALA$,A%,Z$,fi%,Bl%:B%+=20:FORA%=1TO3:WHILE?B%<>&B:A$+=CHR$?B%:B%+=1:ENDWHILE:B%+=1:NEXT:IFLEFT$(A$,1)="="THENA$=MID$(A$,INSTR(A$,"*")+1)
15251Z$=FNv(LEFT$(A$,INSTR(A$," "))):IFZ$<>"FILER_RUN"ANDZ$<>"RUN"THEN
15252SYS8,5,A$TOfi%,Bl%:IFfi%=2THENA$="Run "+A$ELSEIFfi%<>0THENA$="Filer_Run "+A$
15253ENDIF:SYS&400DE,A$:ENDPROC
15254DEFPROCN_:LOCALb%,B%,xy%,A%,C%,d%,z%,e%:b%=S%(FNG(3)):B%=gJ%:PROCG(b%,A%,C%,d%,z%,e%):A%=-&E*(S_%=1)-7*(S_%=2)-2*(S_%=3):PROCP(d%,z%,e%,A%,0,0):b%=FNS(0,0,d%,z%,e%):WHILEB%<>-1ANDNOTxy%:T%=B%!&C:IFFNB(b%,T%)=-1THENxy%=TRUEELSEB%=B%!4
15255ENDWHILE:IFxy%THEN
15256t%=FNG(3):PROCG(B%!&C,A%,C%,d%,z%,e%):PROCH(d%,z%,e%)
15257ELSEPROCB(FNA("ErrNoMore"))
15258ENDIF:ENDPROC
15259DEFPROCS_:LOCALb%,B%,xy%,A%,C%,d%,z%,e%:b%=S%(FNG(3)):B%=gJ%:WHILEB%<>-1ANDNOTxy%:T%=B%!&C:IFFNB(b%,T%)=1THENxy%=TRUEELSEB%=!B%
15260ENDWHILE:IFxy%THEN
15261t%=FNG(3):PROCG(B%!&C,A%,C%,d%,z%,e%):PROCH(d%,z%,e%)
15262ELSEPROCB(FNA("ErrNoB4"))
15263ENDIF:ENDPROC
15264DEFPROCD_:IFZ_%<>-1THEN
15265t%=FNG(3):PROCG(Z_%!&C,A%,C%,d%,z%,e%):PROCH(d%,z%,e%)
15266ELSEPROCB(FNA("ErrNoEnt"))
15267ENDIF:ENDPROC
15268DEFPROCH_:LOCALB%:B%=Z_%:IFB%<>-1THEN
15269WHILEB%!4<>-1:B%=B%!4:ENDWHILE:t%=FNG(3):PROCG(B%!&C,A%,C%,d%,z%,e%):PROCH(d%,z%,e%)
15270ELSEPROCB(FNA("ErrNoEnt"))
15271ENDIF:ENDPROC
15272DEFPROClu(v%,y%,_%,U%):LOCALNu%,Py%,j%:IFy%THENPROCP(d%,z%,e%,7,0,0)
15273Nu%=U%-40:Py%=-(k%-60)/7:QJ%=e%:y_%=z%:FORj%=1TO7:PROCzy(j%+7*ABSy%,d%,j%,z%,e%,y%,_%+&A,Nu%,u%-20,Py%):IFj%<>7THENPROCP(d%,z%,e%,1,0,0):Nu%+=Py%
15274NEXT:ENDPROC
15275DEFFNvy(g%,y%,a%,Q%):LOCALPy%,p%,_%,R%:Py%=(k%-60)/7:Q%=-Q%-40+Py%:p%=((Q%DIVPy%)MOD8):IFp%<>0THENp%+=7*ABSy%:IFa%<&AORa%>u%-20THENp%=0
15276IFy%THEN_%=wy%ELSE_%=my%
15277IFp%<>0THENR%=FNFy(p%,a%-&A,Q%MODPy%,g%,Py%,_%+&A,-m%-40-(p%+7*(p%>7))*Py%+Py%)
15278=R%
15279DEFPROCMJ(v%,y%,_%,U%):LOCALNu%,Py%,tJ%,j%:IFy%THENPROCP(d%,z%,e%,3,0,0):j%=4:tJ%=7ELSEj%=1:tJ%=3
15280Nu%=U%-40:Py%=-(k%-60)/3:QJ%=e%:y_%=z%:FORj%=j%TOtJ%:IFj%=6THENPy%=Py%/2
15281PROCzy(j%,d%,j%,z%,e%,y%,_%+&A,Nu%,u%-20,Py%):IFj%<>tJ%THENPROCP(d%,z%,e%,1,0,0):Nu%+=Py%
15282NEXT:ENDPROC
15283DEFFNky(g%,y%,a%,Q%):LOCALPy%,p%,_%,U%,R%:Py%=(k%-60)/3:Q%=-Q%-40+Py%:p%=((Q%DIVPy%)MOD4):Q%=Q%MODPy%:U%=-m%-40-p%*Py%+Py%:IFp%<>0THENp%+=3*ABSy%:IFa%<&AORa%>u%-20THENp%=0
15284IFp%>=6THENPy%=Py%/2
15285IFp%=6ANDQ%>=Py%THENQ%-=Py%:p%=7:U%-=Py%
15286IFy%THEN_%=wy%ELSE_%=my%
15287IFp%<>0THENR%=FNFy(p%,a%-&A,Q%,g%,Py%,_%+&A,U%)
15288=R%
15289DEFPROCAl(v%,y%,_%,U%):IFy%THENPROCP(d%,z%,e%,1,0,0)
15290QJ%=e%:y_%=z%:PROCzy(ABSNOTy%,d%,FNH(d%,z%,e%),z%,e%,y%,_%+&A,U%-40,u%-20,-k%+60):ENDPROC
15291DEFFNQ_(g%,y%,a%,Q%):LOCALp%,_%,R%:Q%=-Q%-40:p%=1:IFy%THEN_%=wy%ELSE_%=my%
15292IFa%<&AORa%>u%-20ORQ%>k%-60ORQ%<0THENp%=0ELSEp%+=ABSy%
15293IFp%<>0THENR%=FNFy(p%,a%-&A,Q%,g%,k%,_%+&A,-m%-40)
15294=R%
15295DEFPROCzy(p%,d%,j%,z%,e%,y%,_%,U%,x%,n%):LOCALB%,C%,T%,Q%,Qy%,A%,F_%:Qy%=28:F_%=FNS(0,0,d%,z%,e%):IFFNF(_%,U%,x%,n%)THEN
15296PROCV(0,7):IFF_%=FNS(0,0,FNT,FNI,FNR)THEN
15297SYS&400E6,!FJ%:PROCCy(_%-4,U%-4,x%+8,-n%-8,&C):SYS&400E6,7
15298ENDIF:MOVE_%,U%:DRAWBYx%,0:MOVEBY0,n%:DRAWBY-x%,0:IFy%THEN
15299PROCL(il%,STR$d%,-1,_%+x%-30,U%-6):PROCL(p_%,FNt(j%,-1),1,_%+x%-40,U%-6):IFFNF(_%,U%-6,x%-&DC,-24)THENPROCcy(j%,d%,z%,e%,-1,_%,U%-6)
15300ELSE:PROCL(il%,STR$d%,1,_%+30,U%-6):PROCL(p_%,FNt(j%,-1),-1,_%+40,U%-6):IFFNF(_%+&DC,U%-6,x%-&DC,-24)THENPROCcy(j%,d%,z%,e%,1,_%+x%,U%-6)
15301ENDIF:Q%=40:T%=FNn(d%,z%):B%=-1:A%=V%(p%):C%=A%-T%:WHILEA%>0ANDT%>0:B%=FNk(d%,z%,B%):T%-=1:A%-=1:ENDWHILE:WHILET%<>0ANDQ%+Qy%-5<=-n%:B%=FNk(d%,z%,B%):T%-=1:PROCc(p_%,FNSy(B%,e%),_%+30,U%-Q%-20,u%-50,Qy%):Q%+=Qy%:ENDWHILE:B%=gJ%:T%=FNS(0,0,d%,z%,e%):A%=C%
15302WHILEA%>0:B%=FNa(B%,T%):B%=B%!4:A%-=1:ENDWHILE:IFQ%+Qy%-5<=-n%THEN
15303REPEAT:B%=FNa(B%,T%):IFB%<>-1THENPROCc(p_%,FND_(B%),_%+30,U%-Q%-20,u%-50,Qy%):Q%+=Qy%:B%=B%!4
15304UNTILB%=-1ORQ%+Qy%-5>-n%
15305ENDIF:IFFNa(B%,T%)<>-1ANDQ%+Qy%-5>-n%THENMOVE_%,U%+n%+24:MOVEBY20,0:PLOT81,-&A,-20
15306IFV%(p%)>0THENMOVE_%,U%-60:MOVEBY20,0:PLOT81,-&A,20
15307ENDIF:ENDPROC
15308DEFPROCOJ:LOCALA%,F%,P%,B%,A$,C%,L%:A%=1:REPEATSYS&61502,C_%,"Spec"+STR$A%,0TO,,P%;F%:A%+=1:UNTILF%AND1:Ri%=A%-3:DIMJ%(A%-3,4):B%=0:WHILEB%<=Ri%:SYS&41502,C_%,"Spec"+STR$(B%+1),0TO,,P%,L%;F%:P%?L%=&D:FORC%=1TO4:J%(B%,C%)=VAL($P%):WHILE?P%<>44:P%+=1:ENDWHILE:P%+=1:NEXT:J%(B%,0)=P%:B%+=1:ENDWHILE
15309A%=1:REPEATSYS&61502,C_%,"Easter"+STR$A%,0TO,,P%;F%:A%+=1:UNTILF%AND1:Qa%=A%-3:DIMR%(A%-3,1):B%=0:WHILEB%<=A%-3:SYS&41502,C_%,"Easter"+STR$(B%+1),0TO,,P%,L%;F%:P%?L%=&D:R%(B%,1)=VAL($P%):WHILE?P%<>44:P%+=1:ENDWHILE:P%+=1:R%(B%,0)=P%:B%+=1:ENDWHILE:ENDPROC
15310DEFPROCcy(ra%,c%,r%,e%,zu%,a%,Q%):LOCALA$,UJ%,KJ%,Wy%,A%:FORA%=0TORi%:IFJ%(A%,1)=r%THEN
15311IF(J%(A%,2)=-1ORJ%(A%,2)=ra%)ANDc%>=J%(A%,3)ANDc%<=J%(A%,4)THENA$+=$J%(A%,0)+"/"
15312ENDIF:NEXT:PROCcJ(UJ%,KJ%,e%):A%=0:Wy%=0:WHILEA%<=Qa%:PROCP(UJ%,KJ%,e%,R%(A%,1)-Wy%,0,0):Wy%=R%(A%,1):IFUJ%=c%ANDKJ%=r%THENA$+=$R%(A%,0)+"/"
15313A%+=1:ENDWHILE:IFINSTR(LEFT$(A$),"/")THENSYS&40081,,"Trinity.Medium",7*16,7*16TOWy%ELSEWy%=bi%
15314IFA$<>""THENPROCL(Wy%,LEFT$(A$),zu%,a%,Q%)
15315IFWy%<>bi%THENSYS&40082,Wy%
15316ENDPROC
15317DEFFNFy(p%,a%,Q%,g%,n%,_%,U%):LOCALby%,Qy%,A%,B%,d%,z%,e%,T%,F%,R%:Qy%=28:CASETRUEOF
15318WHENa%>=30ANDa%<=u%-20ANDQ%>=40:PROCG(v%,A%,B%,d%,z%,e%):PROCP(d%,z%,e%,p%-1,0,0):by%=(((Q%-40+Qy%)DIVQy%)):IFby%>0THENby%+=V%(p%)
15319IFby%>0ANDby%<=FNn(d%,z%)ANDg%<>2THENPROCx_(d%,z%,by%,g%):by%=-1
15320IFby%>0THENby%-=FNn(d%,z%)
15321IFby%>0THEN
15322T%=FNS(0,0,d%,z%,e%):B%=gJ%:B%=FNa(B%,T%):WHILEby%>1ANDB%<>-1:B%=B%!4:B%=FNa(B%,T%):by%-=1:ENDWHILE:IFB%=-1THEN
15323IFg%<>2THENPROCs(d%,z%,e%):VJ%=TRUE
15324ELSE:CASEg%OF
15325WHEN4:PROCWy(B%):VJ%=TRUE
15326WHEN2:R%=B%
15327WHEN1:PROCI_(B%):VJ%=TRUE
15328ENDCASE
15329ENDIF
15330ELSE:IFg%<>2ANDby%=0THEN
15331PROCG(v%,A%,B%,d%,z%,e%):PROCP(d%,z%,e%,p%-1,0,0):PROCs(d%,z%,e%):VJ%=TRUE
15332ENDIF
15333ENDIF
15334WHENg%=2
15335WHENa%<=20ANDQ%>=n%-20:PROCG(v%,A%,B%,d%,z%,e%):PROCP(d%,z%,e%,p%-1,0,0):T%=FNS(0,0,d%,z%,e%):by%=-((n%-40)DIVQy%):B%=FNa(gJ%,T%):WHILEB%<>-1:B%=B%!4:B%=FNa(B%,T%):by%+=1:ENDWHILE:by%+=FNn(d%,z%):IFV%(p%)<by%THENV%(p%)+=1:PROCN(i%,_%,U%-40,_%+u%-&A,U%-n%+4)
15336WHENa%<=20ANDQ%<=60ANDQ%>=40ANDV%(p%)<>0:V%(p%)-=1:PROCN(i%,_%,U%-40,_%+u%-&A,U%-n%+4)
15337WHENa%<=20ANDQ%<=60ANDQ%>=40
15338OTHERWISE:PROCG(v%,A%,B%,d%,z%,e%):PROCP(d%,z%,e%,p%-1,0,0):PROCs(d%,z%,e%):VJ%=TRUE
15339ENDCASE:=R%
15340DEFFNa(B%,T%):LOCALA%:A%=-1:WHILEB%<>-1ANDA%=-1:A%=FNB(FNx(B%!&C),T%):IFA%=-1THENB%=B%!4
15341ENDWHILE:IFA%=0THENA%=B%ELSEA%=-1
15342=A%
15343DEFFND_(B%):LOCALA$,A%,C%,Z$,T%:C%=(B%!16>>4)AND&F:T%=B%!16AND(1<<21):C%-=n_%*(C%=0):PROCV(0,C%):IF((B%!16>>1)AND1)=1THENZ$=FNpy(FNS_(B%!&C),FNty(B%!&C),-1,Ou%)+"  "
15344B%+=20:FORA%=1TO3:WHILE?B%<>&B:A$+=CHR$?B%:B%+=1:ENDWHILE:IFA%<>3THENA$+=" ":B%+=1
15345NEXT:IFT%>0ANDLEFT$(A$,1)="="THENA$=MID$(A$,2,INSTR(A$,"*")-2)
15346=Z$+A$
15347DEFPROCu_(S$):LOCALA$,Ba%,e:PROCZ(f%,39,1):A$=FNM(f%,16):Ba%=LENA$:PROCA(f%,16,A$+S$):fl%=LENFNM(f%,16):S$=MID$(S$,fl%-Ba%+1):PROCA(f%,17,S$):fl%=LENFNM(f%,16):S$=MID$(S$,fl%+1):PROCA(f%,18,S$):ENDPROC
15348DEFPROCs(c%,r%,Q%):LOCALA%,n%,Il%:FORA%=16TO18:PROCA(f%,A%,""):PROCD(f%,A%,n_%):NEXT:PROCZ(f%,24,0):nJ%=0:z$="":PROCZ(f%,21,ABS((R_%AND4)>0)):PROCZ(f%,23,ABS((R_%AND2)>0)):PROCZ(f%,38,ABS((R_%AND1)>0)):PROCM(f%,21,ABS((R_%AND1)>0)):PROCZ(f%,39,0):PROCM(f%,38,0):PROCJy(26):PROCA(f%,27,"1"):PROCA(f%,30,FNA("E1"))
15349nu%=1:cu%=1:ju%=1:mu%=1:PROCM(f%,37,1):PROCA(f%,33,FNA("OT1")):PROCA(f%,34,FNA("Day1")):PROCA(f%,35,FNA("OE1")):PROCA(f%,1,FNU(c%,r%,Q%,-1)):Q_%=c%:N_%=r%:AJ%=Q%:n%=FNc:r%=FNi:PROCf(f%,Kl%,FNA("alset"),-1):PROCA(f%,3,STR$n%):PROCA(f%,5,"00"):PROCO(0,0):PROCTy(TRUE,TRUE):PROCC(f%,3):ENDPROC
15350DEFPROCI_(B%):PROCWy(B%):O_%=-1:PROCM(f%,37,1):PROCf(f%,Kl%,FNA("alset"),0):ENDPROC
15351DEFPROCWy(B%):LOCALd%,z%,e%,n%,r%,A$,ui%,R%:PROCG(B%!&C,r%,n%,d%,z%,e%):O_%=B%:PROCZ(f%,38,((B%!16>>20)AND1)):A$=STR$r%:IFr%<&ATHENA$="0"+A$
15352PROCM(f%,21,ABS((((B%!16>>20)AND1)>0)OR((B%!16AND(1<<21))>1))):PROCM(f%,38,ABS((B%!16AND(1<<21))>1)):PROCA(f%,5,A$):nJ%=((B%!16)>>4)AND&F:IFnJ%=0THENnJ%=n_%
15353FORA%=16TO18:PROCD(f%,A%,nJ%):NEXT:PROCM(f%,37,0):PROCA(f%,3,STR$n%):PROCf(f%,Kl%,FNA("aledit"),-1):PROCA(f%,1,FNU(d%,z%,e%,-1)):Q_%=d%:N_%=z%:AJ%=e%:PROCZ(f%,21,ABS(((B%!16)AND1)=1)):PROCZ(f%,23,ABS(((B%!16)AND2)=2)):PROCZ(f%,39,ABS((B%!16AND(1<<21))>1)):PROCA(f%,27,"1"):PROCA(f%,30,FNA("E1"))
15354nu%=1:cu%=1:ju%=1:mu%=1:PROCJy(26):PROCA(f%,33,FNA("OT1")):PROCA(f%,34,FNA("Day1")):PROCA(f%,35,FNA("OE1")):IF((B%!16)AND4)=4THEN
15355ui%=TRUE:PROCZ(f%,24,1):IF((B%!16)AND8)=8THEN
15356R%=((B%!16)>>8)AND&FF:PROCA(f%,27,STR$R%):nu%=((B%!16)>>16)AND&F:PROCA(f%,30,FNJ(aJ%,nu%-1))
15357ELSE:PROCJy(31):cu%=((B%!16)>>8)AND&F:PROCA(f%,33,FNJ(yl%,cu%-1)):ju%=((B%!16)>>&C)AND&F:PROCA(f%,34,FNJ(bl%,ju%-1)):mu%=((B%!16)>>16)AND&F:PROCA(f%,35,FNJ(rl%,mu%-1))
15358ENDIF
15359ELSEPROCZ(f%,24,0)
15360ENDIF:z$="":B%+=20:FORA%=16TO18:A$="":WHILE?B%<>&B:A$+=CHR$?B%:B%+=1:ENDWHILE:B%+=1:PROCA(f%,A%,A$):z$+=A$:NEXT:PROCTy(NOTui%,TRUE):PROCC(f%,3):ENDPROC
15361DEFPROCTy(sa%,dJ%):!J%=f%:SYS&400CB,,J%:IFdJ%THENJ%!28=-1:J%!4=FNg-&64-(J%!&C-J%!4):J%!&C=J%!4+&3E8:J%!16=900
15362J%!8=J%!16 -&7D0*ABSNOTsa%:SYS&400C5,,J%:ENDPROC
15363DEFPROChJ(sa%,dJ%):!J%=Ry%:SYS&400CB,,J%:IFdJ%THENJ%!28=-1:J%!4=&64:J%!&C=J%!4+&3E8:J%!16=900
15364J%!8=J%!16 -&7D0*ABSNOTsa%:SYS&400C5,,J%:ENDPROC
15365DEFPROCJy(s%):LOCALA%:PROCZ(f%,s%,1):PROCZ(f%,57-s%,0):FORA%=27TO30:PROCM(f%,A%,-(s%=31)):NEXT:FORA%=33TO35:PROCM(f%,A%,-(s%=26)):NEXT:ENDPROC
15366DEFFNTy:LOCALT%,B%,F%:T%=FNx(FNY):B%=Z_%:WHILEB%<>-1ANDNOTF%:IFFNx(B%!&C)=T%THENF%=TRUE
15367B%=B%!4:ENDWHILE:=F%
15368DEFPROCxy:LOCALF%,c%,r%,Q%,uy%,Hu%,Qy%,B%,Ml%,fJ%,oy%:PROCG(_J%,F%,B%,Ml%,fJ%,oy%):CASETRUEOF
15369WHEND_%=1:IFDu%THENF%=FNTyELSEF%=TRUE
15370WHEND_%=2AND(FNL(Dy%,fy%,My%)>FNL(Ml%,fJ%,oy%)-FNH(Ml%,fJ%,oy%)+7):F%=TRUE
15371WHEND_%=3ANDDy%=1:F%=TRUE
15372OTHERWISEF%=FALSE
15373ENDCASE:IFF%ANDNOTIy%THEN
15374IFt%<>FNG(3)ANDRu%THENPROCQ_(t%)
15375t%=FNG(3):PROCH(Dy%,fy%,My%):PROCr(i%,-1,-1)
15376ENDIF:uy%=0:Hu%=0:Qy%=0:IFly%<>0THEN
15377CASEly%>>4OF
15378WHEN0:uy%=ly%AND&F
15379WHEN1:uy%=7*(ly%AND&F)
15380WHEN2:Hu%=ly%AND&F
15381WHEN3:Qy%=ly%AND&F
15382ENDCASE:c%=Dy%:r%=fy%:Q%=My%:PROCP(c%,r%,Q%,-uy%,-Hu%,-Qy%):F%=FNS(0,0,c%,r%,Q%):B%=Z_%:c%=TRUE:WHILEB%<>-1ANDc%:IFFNB(B%!&C,F%)=-1THENPROCv(B%):B%=B%!4ELSEc%=FALSE
15383ENDWHILE
15384ENDIF:ENDPROC
15385DEFFNXy(n%,r%):LOCALA%:A%=TRUE:IFn%<0ORn%>23ORr%<0ORr%>59THENA%=FALSE:PROCB(FNA("ErrTime"))
15386=A%
15387DEFPROCV_:LOCALF_%,n%,r%,Il%,A$,Z$,F$,Wy%:A$=FNM(f%,16):Z$=FNM(f%,17):F$=FNM(f%,18):n%=VALFNM(f%,3):r%=VALFNM(f%,5):IFA$+Z$+F$<>""ANDFNXy(n%,r%)THEN
15388Wy%=Wy%OR(-FNZ(f%,21))OR((-FNZ(f%,23))<<1)OR(nJ%<<4):Wy%=Wy%OR((-FNZ(f%,38))<<20)OR((-FNZ(f%,39))<<21):IFFNZ(f%,24)THEN
15389IFFNZ(f%,26)THEN
15390Wy%=Wy%OR&COR((VALFNM(f%,27))<<8)OR(nu%<<16)
15391ELSEWy%=Wy%OR4OR(cu%<<8)OR(ju%<<&C)OR(mu%<<16)
15392ENDIF
15393ENDIF:F_%=FNS(r%,n%,Q_%,N_%,AJ%):PROCay(F_%,Wy%,A$,Z$,F$):PROCl:PROCx:PROCn:vy%=TRUE:IFIy%ANDZ%(t%)=3THENPROCK
15394ELSEIFA$+Z$+F$=""THENPROCB(FNA("ErrMes"))
15395ENDIF:ENDPROC
15396DEFPROCay(F_%,Wy%,A$,Z$,F$):LOCALS%,B%,xy%,T%,ny%,Ny%:IFO_%<>-1THENPROCSy(O_%)
15397xy%=FALSE:S%=LEN(A$+Z$+F$)+3+20:Ny%=Z_%:ny%=-1:WHILENy%<>-1ANDNOTxy%:T%=Ny%!&C:IFFNB(F_%,T%)=-1THENxy%=TRUEELSEny%=Ny%:Ny%=Ny%!4
15398ENDWHILE:B%=FNw(s_%,S%+1,TRUE):!B%=ny%:B%!4=Ny%:B%!8=S%:B%!&C=F_%:B%!16=Wy%:IFny%=-1THENZ_%=B%ELSEny%!4=B%
15399IFNy%<>-1THEN!Ny%=B%
15400$(B%+20)=A$+CHR$&B+Z$+CHR$&B+F$+CHR$&B:ENDPROC
15401DEFPROCv(B%):PROCSy(B%):PROCl:PROCx:vy%=TRUE:IFIy%ANDZ%(t%)=3THENPROCK
15402IFB%=O_%THENPROCn
15403IFB%=pJ%THENpJ%=-1:PROCX(Ry%)
15404ENDPROC
15405DEFPROCSy(B%):LOCALny%,Ny%:ny%=!B%:Ny%=B%!4:IFny%<>-1THENny%!4=Ny%
15406IFNy%<>-1THEN!Ny%=ny%
15407IFZ_%=B%THENZ_%=Ny%
15408PROCLy(s_%,B%,TRUE):ENDPROC
15409DEFPROCn:PROCX(f%):PROCX(sy%):IFIy%THENPROCC(i%,-1)
15410O_%=-1:ENDPROC
15411DEFPROCpu(Yy%,ry%,q%,s%,H_%):LOCALA%:CASEs%OF
15412WHEN1:PROC`(Q_%,N_%,AJ%,q%,s%)
15413WHEN6:PROCO(H_%,0)
15414WHEN7:PROCO(-H_%,0)
15415WHEN8:PROCO(0,&A*H_%)
15416WHEN9:PROCO(0,-&A*H_%)
15417WHEN&A:PROCO(0,H_%)
15418WHEN&B:PROCO(0,-H_%)
15419WHEN19:PROCV_
15420WHEN20:PROCn
15421WHEN22:PROCF(Xl%,Yy%,ry%,q%,s%)
15422WHEN24:PROCTy(NOTFNZ(q%,24),FALSE)
15423WHEN26,31:PROCJy(s%)
15424WHEN28,29:IFg%=1THENs%=57-s%
15425A%=VALFNM(q%,27):A%+=(s%-27)*2-3:IFA%=0THENA%=&FFELSEIFA%=256THENA%=1
15426PROCA(q%,27,STR$A%)
15427WHEN30:!aJ%=FNh("E"):PROCF(aJ%,Yy%,ry%,q%,s%)
15428WHEN33:PROCF(yl%,Yy%,ry%,q%,s%)
15429WHEN34:PROCF(bl%,Yy%,ry%,q%,s%)
15430WHEN35:PROCF(rl%,Yy%,ry%,q%,s%)
15431WHEN37:PROCv(O_%)
15432WHEN38:PROCM(f%,21,ABSFNZ(f%,38))
15433WHEN39:PROCM(f%,21,ABS(FNZ(f%,39)ORFNZ(f%,38))):PROCM(f%,38,ABSFNZ(f%,39))
15434ENDCASE:ENDPROC
15435DEFPROC`J(Yy%,ry%,q%,s%):LOCALA%:W_%=0:CASEs%OF
15436WHEN7:PROCYy(pJ%,FNZ(Ry%,9)):pJ%=-1
15437WHEN8:PROCv(pJ%)
15438WHEN9:FORA%=&ATO&D:PROCM(q%,A%,ABSNOTFNZ(q%,s%)):NEXT
15439WHEN&B,&C:IFg%=1THENs%=23-s%
15440A%=VALFNM(q%,&A):A%+=(s%-&A)*2-3:IFA%=0THENA%=&FFELSEIFA%=256THENA%=1
15441PROCA(q%,&A,STR$A%)
15442WHEN&D:!J%=q%:SYS&400CB,,J%:Yy%=J%!4+686+64:ry%=J%!16-312:!aJ%=FNh("ED"):PROCF(aJ%,Yy%,ry%,q%,s%)
15443ENDCASE:ENDPROC
15444DEFPROCYy(B%,`i%):IFB%<>O_%THENLOCALO_%:O_%=-1
15445IFNOT`i%THEN
15446IF(B%!16AND4)=4THEN
15447IF(B%!16AND8)=8THEN
15448PROCT_(B%,FALSE)
15449ELSEPROClJ(B%)
15450ENDIF
15451ELSEB%!16=(B%!16)OR(1<<20):vy%=-1
15452ENDIF
15453ELSEPROCT_(B%,TRUE)
15454ENDIF:PROCl:PROCx:vy%=TRUE:IFIy%ANDZ%(t%)=3THENPROCK
15455W_%=0:PROCX(Ry%):ENDPROC
15456DEFPROCT_(B%,`i%):LOCALc%,T%,A$,qy%,Vy%,d%,z%,e%,F_%,Wy%,Z$,F$,:IF`i%THEN
15457F_%=FNY:c%=VALFNM(q%,&A):A$=FNM(Ry%,&D):T%=0:WHILEA$<>FNJ(aJ%,T%):T%+=1:ENDWHILE
15458ELSEF_%=B%!&C:c%=((B%!16)>>8)AND&FF:T%=(((B%!16)>>16)AND&F)-1
15459ENDIF:PROCG(F_%,qy%,Vy%,d%,z%,e%):PROCry(qy%,Vy%,d%,z%,e%,c%,T%):F_%=FNS(qy%,Vy%,d%,z%,e%):Wy%=B%!16:c%=B%+20:A$="":WHILE?c%<>&B:A$+=CHR$?c%:c%+=1:ENDWHILE:c%+=1:WHILE?c%<>&B:Z$+=CHR$?c%:c%+=1:ENDWHILE:c%+=1:WHILE?c%<>&B:F$+=CHR$?c%:c%+=1:ENDWHILE:PROCSy(B%):PROCay(F_%,Wy%,A$,Z$,F$):ENDPROC
15460DEFPROCry(RETURNqy%,RETURNVy%,RETURNd%,RETURNz%,RETURNe%,c%,T%):LOCALuy%,Sa%,Ha%:Sa%=c%:Ha%=T%:REPEAT:c%=Sa%:T%=Ha%:IFT%=0THENqy%+=c%:c%=qy%DIV60:qy%=qy%MOD60:IFc%>0THENT%=1
15461IFT%=1THENVy%+=c%:c%=Vy%DIV24:Vy%=Vy%MOD24:IFc%>0THENT%=2
15462uy%=0:IFT%=2THENuy%=c%ELSEIFT%=3THENuy%=7*c%
15463WHILEuy%>0:PROCP(d%,z%,e%,1,0,0):uy%-=1:ENDWHILE:IFT%=4THEN
15464WHILEc%>0:PROCP(d%,z%,e%,0,1,0):c%-=1:ENDWHILE
15465ENDIF:IFT%=5THEN
15466WHILEc%>0:PROCP(d%,z%,e%,0,0,1):c%-=1:ENDWHILE
15467ENDIF:UNTILFNB(FNY,FNS(qy%,Vy%,d%,z%,e%))=-1:ENDPROC
15468DEFPROClJ(B%):LOCALF_%,qy%,Vy%,d%,z%,e%,A$,Z$,C%,Wy%,c%:Wy%=B%!16:c%=B%+20:PROCG(B%!&C,qy%,Vy%,d%,z%,e%):PROCvy(d%,z%,e%,Wy%):F_%=FNS(qy%,Vy%,d%,z%,e%):WHILE?c%<>&B:A$+=CHR$?c%:c%+=1:ENDWHILE:c%+=1:WHILE?c%<>&B:Z$+=CHR$?c%:c%+=1:ENDWHILE:c%+=1:WHILE?c%<>&B:F$+=CHR$?c%:c%+=1:ENDWHILE
15469PROCSy(B%):PROCay(F_%,Wy%,A$,Z$,F$):ENDPROC
15470DEFPROCvy(RETURNd%,RETURNz%,RETURNe%,F%):LOCALp%,c%,r%:REPEAT:p%=(F%>>8)AND&F:c%=(F%>>&C)AND&F:r%=(F%>>16)AND&F:WHILEr%>0:PROCP(d%,z%,e%,-d%+1,1,0):r%-=1:ENDWHILE:CASEp%OF
15471WHEN1,2,3:j%=FNH(d%,z%,e%):WHILEj%<>c%:d%+=1:j%=FN`(j%+1):ENDWHILE:d%+=(p%-1)*7
15472WHEN4,5,6:d%=FND(z%,e%):j%=FNH(d%,z%,e%):WHILEj%<>c%:d%-=1:j%=FN`(j%+6):ENDWHILE:d%-=(p%-4)*7
15473ENDCASE:UNTILFNB(FNY,FNS(FNi,FNc,d%,z%,e%))=-1:ENDPROC
15474DEFPROCO(Ku%,r%):LOCALIl%,M%,Hu%,uy%,la%,A$:Hu%=r%<>0:uy%=FALSE:r%+=VALFNM(f%,5):n%=VALFNM(f%,3):M%=FND(N_%,AJ%):n%+=Ku%:Ku%=Ku%<>0:IFr%<0THENn%-=1:r%+=60:Ku%=TRUE
15475IFr%>59THENn%+=1:r%-=60:Ku%=TRUE
15476IFn%<0THENQ_%-=1:n%+=24:uy%=TRUE
15477IFn%>23THENQ_%+=1:n%-=24:uy%=TRUE
15478IFQ_%<1THENN_%-=1:uy%=TRUE
15479IFQ_%>M%THENN_%+=1:Q_%=1:uy%=TRUE
15480IFN_%<1THENAJ%-=1:N_%=&C:uy%=TRUE
15481IFN_%>&CTHENAJ%+=1:N_%=1:uy%=TRUE
15482M%=FND(N_%,AJ%):IFQ_%=0ORQ_%>M%THENQ_%=M%
15483IFuy%THENPROCA(f%,1,FNU(Q_%,N_%,AJ%,-1))
15484IFKu%THENPROCA(f%,3,STR$n%)
15485A$=STR$r%:IFr%<&ATHENA$="0"+A$:IFr%=0THENA$="00"
15486IFHu%THENPROCA(f%,5,A$)
15487ENDPROC
15488DEFPROCz_:LOCALS%,C%,B%:C%=-1:Z_%=-1:w%=OPENINr$:IFNOTFu%ANDw%<>0THEN
15489WHILENOTEOF#w%:S%=VALGET$#w%:B%=FNw(s_%,S%+1,TRUE):IFC%<>-1THENC%!4=B%ELSEZ_%=B%
15490!B%=C%:B%!8=S%:SYS&C,4,w%,B%+&C,S%-&C:C%=B%:IFx_%THENPROCw(NOT1)
15491ENDWHILE:IFZ_%<>-1THENB%!4=-1
15492ENDIF:CLOSE#w%:w%=0:ENDPROC
15493DEFPROCcJ(RETURNc%,RETURNr%,Q%):LOCALel%,ey%:el%=(Q%+1)MOD19:IFel%=0THENel%=19
15494ey%=(ABS(1.25*Q%)+6)MOD7:c%=Y%(el%-1,ey%):IFc%>31THENc%-=31:r%=4ELSEr%=3
15495ENDPROC
15496DEFPROCMl:LOCALsi%,Ci%,d%,j%,c%:DIMY%(18,6):FORsi%=1TO19:FORCi%=0TO6:CASEsi%OF
15497WHEN&E:j%=1
15498WHEN3:j%=2
15499WHEN&B:j%=4
15500WHEN19:j%=6
15501WHEN8:j%=7
15502WHEN16:j%=9
15503WHEN5:j%=&A
15504WHEN&D:j%=&C
15505WHEN2:j%=&D
15506WHEN&A:j%=&F
15507WHEN18:j%=17
15508WHEN7:j%=18
15509WHEN&F:j%=20
15510WHEN4:j%=21
15511WHEN&C:j%=23
15512WHEN1:j%=24
15513WHEN9:j%=26
15514WHEN17:j%=27
15515WHEN6:j%=28
15516ENDCASE:d%=21+j%:j$=FNA("Mon3")+" ":REPEATd%+=1:c%=5-(d%MOD7):IFc%=-1THENc%=6
15517UNTILc%=Ci%:Y%(si%-1,Ci%)=d%:IFd%>31THENd%-=31:j$=FNA("Mon4")+" "
15518NEXT:NEXT:ENDPROC
15519DEFPROCru:cy%=2:ai%=&B:IJ%=TRUE:hJ%=1:Wi%=FNAy(FNA("GYM")+FNay("GYM",1,3,"\","")+"\"):Aa%=FNzy(Wi%,3,"",5,"A0-9"):Ql%=FNC("CAM","CAM",1,3):PROCY(Ql%,2,Wi%):ENDPROC
15520DEFFNX_=Ql%
15521DEFPROCBJ(A%):B%(A%)=&77d:W%(A%)=&fff:S%(A%)=My%:M$(A%)=FNA("CalTab"):PROCUJ:ENDPROC
15522DEFPROCCJ(e%,y%,_%,U%):IFcy%=1THENPROCuJ(e%,y%,_%,U%)
15523IFcy%=2THENPROCNu(e%,y%,_%,U%)
15524ENDPROC
15525DEFPROCk_(l%,cl%):LOCALA%:CASE!l%OF
15526WHEN0,1:A%=cy%:cy%=!l%+1:mJ%=cy%<>A%
15527WHEN2:CASEl%!4OF
15528WHEN0:IFv%<>My%+(cy%=1)THENv%=My%:t%=cl%
15529WHEN1:IFv%<>My%+1+(cy%=1)THENv%=My%+1:t%=cl%
15530WHEN2:IFv%<>My%-1+(cy%=1)THENv%=My%-1:t%=cl%
15531WHEN3:A%=VAL$Aa%:CASETRUEOF
15532WHENA%<&77d:PROCB(FNO("ErrMin",STR$&77d,"","",""))
15533WHENA%>&fff:PROCB(FNO("ErrMax",STR$&fff,"","",""))
15534OTHERWISEIFv%<>A%+(cy%=1)THENv%=A%:t%=cl%
15535ENDCASE
15536ENDCASE
15537ENDCASE:ENDPROC
15538DEFPROCRy(p%):v%+=(3-cy%)*p%:IFv%<B%(t%)THENv%=B%(t%)
15539IFv%>W%(t%)THENv%=W%(t%)
15540ENDPROC
15541DEFPROCUu(g%,y%,a%,Q%,i_%,qJ%):LOCALVa%,d%,z%,e%:IFg%<>2THEN
15542Va%=FNjy(y%,a%,Q%,d%,z%,e%):IFVa%THEN
15543CASEhJ%+g%OF
15544WHEN5,3:PROCH(d%,z%,e%):t%=FNG(3):v%=S%(t%)
15545WHEN6,2:PROCs(d%,z%,e%):VJ%=TRUE
15546ENDCASE
15547ENDIF
15548ENDIF:ENDPROC
15549DEFFNby(s%,By%):o%=TRUE:CASEBy%OF
15550WHEN414:PROCRy(1)
15551WHEN415:PROCRy(-1)
15552WHEN30:IFv%<>My%+(cy%=1)THENv%=My%
15553OTHERWISEo%=FALSE
15554ENDCASE:=o%
15555DEFPROCNJ(l%,x%):IFbJ%=Ay%THENPROCg(x%,6,!l%):PROCW(Ay%,0,-1):PROCS(Ay%,!l%,1)
15556ENDPROC
15557DEFFNry(q%,s%,By%):=FALSE
15558DEFPROCv_(w%):BPUT#w%,cy%:BPUT#w%,IJ%+5:BPUT#w%,!FJ%:BPUT#w%,hJ%:ENDPROC
15559DEFPROCeJ(w%):cy%=BGET#w%:IJ%=BGET#w%-5:ai%=BGET#w%:hJ%=BGET#w%:ENDPROC
15560DEFPROCdu(x%,Fy%,l%,a%,Q%):CASEFy%OF
15561WHEN7,1,4,5:IFg%<>2PROCZ(x%,Fy%,1)
15562WHEN6:PROCW(Ay%,0,-1):PROCS(Ay%,FNu(x%,6),1):PROCF(Ay%,a%,Q%,x%,Fy%)
15563WHEN9:IFFNM(x%,9)=FNA("SetAlarm")+"/"+FNA("GotoDiary")THENPROCA(x%,9,FNA("GotoDiary")+"/"+FNA("SetAlarm"))ELSEPROCA(x%,9,FNA("SetAlarm")+"/"+FNA("GotoDiary"))
15564ENDCASE:ENDPROC
15565DEFPROCOu(x%):PROCZ(x%,7,-(cy%=1)):PROCZ(x%,1,-(cy%=2)):PROCg(x%,6,!FJ%):PROCZ(x%,4,-NOTIJ%):PROCZ(x%,5,-IJ%):IFhJ%=1THENPROCA(x%,9,FNA("GotoDiary")+"/"+FNA("SetAlarm"))ELSEPROCA(x%,9,FNA("SetAlarm")+"/"+FNA("GotoDiary"))
15566ENDPROC
15567DEFPROCKJ(x%):IFFNZ(x%,7)THENcy%=1ELSEcy%=2
15568IJ%=FNZ(x%,5):!FJ%=FNu(x%,6):IFFNM(x%,9)=FNA("GotoDiary")+"/"+FNA("SetAlarm")THENhJ%=1ELSEhJ%=2
15569ENDPROC
15570DEFFNjy(y%,a%,Q%,RETURNd%,RETURNz%,RETURNe%):LOCALm_%,A_%,jy%,yy%,fu%,tu%:IFcy%=1THEN
15571m_%=(u%-32)/2:A_%=(k%-50)/6:jy%=m_%/7:yy%=(A_%-&A)/8:e%=v%+ABSy%:z%=2*((-Q%-50)DIVA_%)+((a%-20)DIV((u%-8)/2)):a%-=20+(z%MOD2)*((u%-8)/2):Q%=-Q%-50-((z%DIV2)*A_%):z%+=1:fu%=(a%+jy%*(1-0.12)+20*ABSy%)DIVjy%:tu%=((Q%-&A-yy%)DIVyy%)-1
15572IFfu%>0ANDfu%<8THENd%=1+fu%+7*tu%-FNH(1,z%,e%)
15573ELSE:m_%=(u%-40)/2:A_%=(k%-50)/3:jy%=m_%/7:yy%=(A_%-&A)/8:e%=v%:z%=2*((-Q%-50)DIVA_%)+((a%-20)DIV((u%-8)/2)):a%-=20+(z%MOD2)*((u%-8)/2):Q%=-Q%-50-((z%DIV2)*A_%):z%+=1+6*ABSy%:fu%=(a%-jy%*0.25+20*ABSy%)DIVjy%-1:tu%=Q%DIVyy%:IFtu%>0ANDtu%<8THENd%=1+tu%+7*fu%-FNH(1,z%,e%)
15574ENDIF:IFe%<>-1THEN
15575IFd%<=0ORd%>FND(z%,e%)ORe%>&fffTHENe%=-1:d%=-1:z%=-1
15576ENDIF:=(e%>0)
15577DEFPROCNu(e%,y%,_%,U%):LOCALz%,j%,c%,jy%,yy%,pa%,A$,r%,A%,B%,C%,D%,E%,F%,G%,H%:m_%=(u%-40)/2:A_%=(k%-50)/3:yy%=(A_%-&A)/8:jy%=m_%/7:IFy%THEN
15578IFe%<W%(t%)THENPROCI(1,_%,U%)
15579ELSEIFe%>B%(t%)THENPROCI(0,_%,U%)
15580ENDIF:Qu%=FNP("Homerton.Medium",20,20):lu%=FNP("Homerton.Medium",&D,&D):ou%=FNP("Homerton.Medium",9,9):PROCV(0,7):PROCL(Qu%,STR$e%,0,_%+u%/2,U%-8):FORr%=1TO6:z%=r%+6*y%:a%=(r%-1)MOD2*(u%-8)/2+20-20*y%:Q%=50+(r%-1)DIV2*A_%:IFFNF(_%+a%,U%-Q%,m_%,-A_%)THEN
15581PROCL(lu%,FNX(z%,-1),-1,_%+a%,U%-Q%):j%=FNH(1,z%,e%)-1:SYS&4008A,ou%:Q%+=yy%-6:FORc%=1TO7:SYS&40086,,FNt(c%,2),1<<4,_%+a%,U%-Q%-yy%*c%:NEXT:a%+=jy%:A%=U%-Q%:D%=_%+a%:F%=FND(z%,e%):G%=j%:H%=jy%:B%=-yy%:IFe%=My%ANDz%=fy%THENC%=Dy%ELSEC%=0
15582IFIJ%ANDC%<>0THENC%=0:SYS&400E6,!FJ%:RECTANGLE_%+a%+((j%-1+Dy%)DIV7+0.25)*jy%,U%-Q%-((j%-1+Dy%)MOD7+0.25)*yy%,jy%,-yy%
15583CALLz
15584ENDIF:NEXT:PROCU(Qu%):PROCU(lu%):PROCU(ou%):ENDPROC
15585DEFPROCuJ(v%,y%,_%,U%):LOCALz%,j%,c%,jy%,ka%,A_%,A$,A%,B%,C%,D%,E%,F%,G%,H%:m_%=(u%-32)/2:A_%=(k%-50)/6:jy%=m_%/7:yy%=(A_%-&A)/8:e%=v%+y%:IFy%THEN
15586IFv%+1<W%(t%)THENPROCI(1,_%,U%)
15587ELSEIFv%>B%(t%)THENPROCI(0,_%,U%)
15588ENDIF:IFe%<=&fffTHEN
15589Qu%=FNP("Homerton.Medium",20,20):lu%=FNP("Homerton.Medium",&A,&A):ou%=FNP("Homerton.Medium",7,7):PROCV(0,7):PROCL(Qu%,STR$e%,0,_%+u%/2,U%-8):FORz%=1TO&C:a%=(z%-1)MOD2*(u%-8)/2+20-20*y%:Q%=50+(z%-1)DIV2*A_%:IFFNF(_%+a%,U%-Q%,m_%,-A_%)THEN
15590PROCL(lu%,FNX(z%,-1),-1,_%+a%,U%-Q%):j%=FNH(1,z%,e%)-1:SYS&4008A,ou%:Q%+=yy%+4:FORc%=1TO7:SYS&40086,,"  "+FNt(c%,2),1<<4,_%+a%+jy%*c%-jy%,U%-Q%-yy%:NEXT:Q%+=yy%:A%=_%+a%-jy%:E%=U%-Q%-yy%:F%=FND(z%,e%):G%=j%:H%=jy%:B%=yy%:IFe%=My%ANDz%=fy%THENC%=Dy%ELSEC%=0
15591IFIJ%ANDC%<>0THENC%=0:SYS&400E6,!FJ%:RECTANGLE_%+a%+((j%-1+Dy%)MOD7+0.12)*jy%,U%-Q%-((j%-1+Dy%)DIV7+0.18)*yy%,jy%*0.76,-yy%
15592CALLR
15593ENDIF:NEXT
15594ENDIF:PROCU(Qu%):PROCU(lu%):PROCU(ou%):ENDPROC
15595DEFPROCUJ:LOCALP%,A%,Oi%,da%,C,F,w,H,S,Y,Z,_,M,I,G,P,A:DIMda%456:C=&D:F=&E:w=&F:H=5:S=6:Y=0:Z=3:_=0:M=4:I=7:G=8:P=9:A=&A:FOROi%=0TO2STEP2:P%=da%:[OPTOi%:.R:STMFD(C)!,{F}:MOV G,1:MOV P,2:MOV A,#0:MOV2,#1<<4:ADR1,D:.O:ADD S,S,#1:ADD A,A,#1:CMP P,A:BLEQ L:MUL Z,I,S
15596ADD Z,Z,Y:SWI &40086:CMP P,A:BLEQ V:CMP S,#7:SUBEQ M,M,G:MOVEQ S,#0:ADD1,1,#8:CMP A,H:BNE O:LDMFD(C)!,{pc}:.z:STMFD(C)!,{F}:MOV G,1:MOV P,2:MOV A,#0:MOV2,#1<<4:ADR1,D:.s:ADD S,S,#1:ADD A,A,#1:CMP P,A:BLEQ L:MUL M,G,S
15597ADD M,M,_:SWI &40086:CMP P,A:BLEQ V:CMP S,#7:ADDEQ Z,Z,I:MOVEQ S,#0:ADD1,1,#8:CMP A,H:BNE s:LDMFD(C)!,{pc}:.L:STMFD(C)!,{F,1-2}:LDR2,FJ%:B K:.V:STMFD(C)!,{F,1-2}:MOV2,#7:.K:MOV1,#0:SWI &400F3:LDMFD(C)!,{pc,1-2}:.FJ%&ai%:.D
15598]FORA%=1TO31:[OPTOi%:=STRING$(2-2*(A%<&A)," ")+STR$A%+CHR$0:ALIGN:]NEXT:NEXT:ENDPROC
�>!RunImage
0�Produced by BasCompress v1.71 (19 Sep 1996)
5�YJ:w%=0:pl%=�:ti%=-1:��Ny:���,�$+" at line "+Þ
�gu%=-1:Wu%=0:w$="!Organiser":�K%512:J%=K%+256:�Y_:w%=�"<Organiser$Dir>.Resources.!Language":B$=�#w%:�#w%:w%=0::X=1.26:w%=�("<Organiser$Dir>.Resources."+B$+".Messages"):�w%<>0�X=���#w%,2):�#w%:w%=0�X=0
$�X<1.26�_$=B$:B$="English"�_$=""
�v$="<Organiser$Dir>.Resources."+B$:�JJ(v$+".Messages"):�HJ(�A("Title"),"<Organiser$Dir>",�1.26+" (16 Nov 97)",�):ș66�Wu%:gu%=Wu%+500:ȕ�Vu%:�w(1):�:�Ny:�
0��Ny:�pl%=��ș&406C2:���,�$+" at line "+Þ:�
/pl%=�:h$=�$+" at line "+Þ:Fa%=�:�Fa%,h$
	�w%<>0��#w%:w%=0

�bJ:�i:ș&400DD:�
3��w(Nl%):�A$,Vi%,Ul%,J_%,mJ%:mJ%=�:�vy%�Zu%��Py
B�Ru%�vy%<>Ii%�Ii%=vy%:�f(i%,ki%,�A("Title")+�-(vy%=�)," *"),�)

�Nl%�1�Ul%=&64
�G$<>""�Ul%=0
�(XJ%<>-1)�Iy%�Ul%=0
)Nl%=(Nl%�(1<<5))��(1+(3<<17)):�Ul%>0�
9ș66�Ma%:ȕMa%>Wu%:Wu%+=&64:�:ș&400E1,Nl%,K%,Wu%�Vi%
�ș&400C7,Nl%,K%�Vi%
�:ȎVi%�
�0:Ȏ��
�XJ%<>-1�Iy%:�Ku
�Wu%>gu%�gu%<>-1:�U_
$�(Ul%<>0�G$<>"")�ti%<>�Gy:�m:�a_
�G$<>"":�ou
�

�1:�IJ
�2:�!K%=T_%�
�PJ
�:�!K%=i%�JJ%�K%!20=0

笤hy��F_
 ș&400C5,,K%:�!K%=i%�JJ%��Au
 �
!
�3:Ȏ!K%�
"
�f%:�n
#�T_%:�b
$�Ry%:�Yy
%�_y%:�t
&�GJ%:�X_
'�Gy%:�i
(�X(!K%)
)�
*)�4:�0<>0�ș&400E9,36,,"ptr_default",1
+�5
,)�6:�Ru%��e(K%!&C,K%!16,K%!8,!K%,K%!4)
-�7
.�8:�Mu(!K%,K%!4,K%!24)
/
�9:�yJ
0�&B,&C:wJ%=�z
1�17,18:�yu
2�19:�K%!4=vu%�K%!16=&4AF80�
31A$=�N(K%+20):�uJ%=1��b("Alias$URLOpen_HTTP")�
4ș&400DE,"URLOpen_HTTP "+A$
5(�:�uJ%=2��b("Alias$URLOpen_MailTo")�
6!ș&400DE,"URLOpen_MailTo "+A$
7�
8�
9�:�Vu%��Ny:�
:�
;*ݤhy=(Uy%<>K%!16-K%!8�ay%<>K%!&C-K%!4)
<B��m�A%,S%,M%,H%,R%,M$,ni%,ji%,oi%,pi%,tl%,I$:�(Oy%�4)=4�MJ%=0�
=�M$=�Zy("%12%mi%se"):H%=��M$,2):M%=��M$,3,2):S%=��M$,5,2):M%=M%*6:S%=S%*6:H%=H%*30+M%/&C:tl%=�:ș46,316,h%,"clock",0�ni%,ji%,oi%,pi%:�1:ȓȐ0,0,I_%,Pu%:R%=56:ȑI_%/2,Pu%/2:�P%(0):ȏȐ0,0,R%:�P%(3)
>��A%=0�330�30:�R%*��A%,R%*��A%,(R%-&A)*��A%,(R%-&A)*��A%:�:�P%(1)+(P%(1)-P%(2))*(x_%��Ru%):ȏ0,0,R%:�P%(5):�0,0:�(R%*0.35)*��(M%-9),(R%*0.35)*��(M%-9):�85,(R%*0.35)*��(M%+9),(R%*0.35)*��(M%+9):�(R%*0.35)*��(M%-9),(R%*0.35)*��(M%-9)
?��85,(R%*0.7)*��M%,(R%*0.7)*��M%:�P%(4):�0,0:�(R%*0.25)*��(H%-9),(R%*0.25)*��(H%-9):�85,(R%*0.25)*��(H%+9),(R%*0.25)*��(H%+9):�(R%*0.25)*��(H%-9),(R%*0.25)*��(H%-9):�85,(R%*0.5)*��H%,(R%*0.5)*��H%:�P%(6):ȏȐ0,0,2
@+�Oy%�2��0,0,(R%*0.9)*��S%,(R%*0.9)*��S%
Aș46,ni%,ji%,oi%,pi%
B�:�(Oy%�9)<>0�
C�(Oy%�8)=8�MJ%>0�
D"M$=�Uy:�$DJ%<>M$�$DJ%=M$:tl%=�
E�:�(Oy%�16)=0�
F#M$=":%mi":�(Oy%�2)=2�M$+=".%se"
G)�f_%�M$="%z24"+M$�M$="%z12"+M$+" %am"
H
�M$=N$
I(�:M$=�Zy(M$):�M$<>$DJ%�$DJ%=M$:tl%=�
J�
K�
LB�:�tl%�!K%=-1-7*�(b_%):K%!4=j_%:K%!8=0:K%!&C=0:ș&400CD,,K%:Ȗ
M�
NTݤUy:�H%,A$:ș&400EC,-1,-1�,,H%:H%=H%�&400:A$="k":�H%>&400�Gu%�H%=H%�&400:A$="M"
O=�H%+A$
P"��a_:�Dy%<>�T�fy%<>�I�My%<>�R�
Q9_J%=�S(0,0,Dy%,fy%,My%):My%=�R:fy%=�I:Dy%=�T:�xJ%��Ay
R�Iy%�J_%=0:�K
SBu%=�:K_%=t%:w_%=v%:�xy:�x
T$�:�xJ%�lJ%<>0��B(lJ%,�Y)<>1��mJ
U"�vJ%<>-1��B(vJ%!&C,�Y)<>1��uu
V'�W_%>0��oy��7:W_%-=1:�W_%=0�W_%=-&A
W�W_%<0�W_%+=1:�W_%=0�W_%=&A
X�MJ%>0�MJ%-=1:�MJ%=0��h:�m
Y
ti%=�Gy:�
Z7ݤZy(A$):?J%=3:ș7,&E,J%:ș&C1,J%,J%,&80,A$:=�N(J%)
[+ݤe:?J%=3:ș7,&E,J%:ș&43049,,J%,J%:=J%
\ݤGy=!(�e+4)
]ݤi=!(�e+8)
^ݤc=!(�e+&C)
_ݤT=!(�e+16)
`ݤI=!(�e+20)
aݤR=!(�e+24)
b?ݤS(qy%,n%,c%,r%,Q%)=qy%�(n%<<6)�(c%<<&B)�(r%<<16)�(Q%<<20)
ci��G(x%,�qy%,�n%,�c%,�r%,�Q%):qy%=x%�63:n%=(x%>>6)�31:c%=(x%>>&B)�31:r%=(x%>>16)�&F:Q%=(x%>>20)�&FFF:�
dݤx(x%)=x%��&7FF
eݤty(x%)=x%�63
fݤS_(x%)=(x%>>6)�31
gݤY=�S(�i,�c,�T,�I,�R)
hEݤB(A%,B%):�Xi%,hi%,qi%,vi%,zi%,q_%:�Ui%,Ni%,Hi%,ci%,di%:�A%<>B%�
i>�G(A%,zi%,vi%,qi%,hi%,Xi%):�G(B%,di%,ci%,Hi%,Ni%,Ui%):Ȏ��
j�Xi%>Ui%:q_%=1
k�Xi%<Ui%:q_%=-1
l�hi%>Ni%:q_%=1
m�hi%<Ni%:q_%=-1
n�qi%>Hi%:q_%=1
o�qi%<Hi%:q_%=-1
p�vi%>ci%:q_%=1
q�vi%<ci%:q_%=-1
r�zi%>di%:q_%=1
s�zi%<di%:q_%=-1
t�
u
�q_%=0
v
�:=q_%
w���cu(a%,Q%,py%):ș&400ED,256,h%,"tab",,,,J%,J%+&80:�Xy(J%+&80,py%):ș46,52+256,h%,"cover",a%,Q%,0,J%,J%+&80:ș46,52+256,h%,"cover",a%,�f(Q%+zy%-2*20),0,J%,J%+&80:ș46,52+256,h%,"tab",a%,Q%,8,J%,J%+&80:ș46,33+256,h%,"tab"
x�ș46,52+256,h%,"tab",a%,Q%+zy%-2*20,8,J%,J%+&80:ș46,33+256,h%,"tab":ș&400E6,py%:ȓȐa%+40,Q%+2*20,-2*20,zy%-4*20:ș&400E6,6:�a%+40,Q%+2*20:�BY0,zy%-4*20:�
y���xu(a%,Q%,py%)a%-=40:ș&400ED,256,h%,"tab",,,,J%,J%+&80:�Xy(J%+&80,py%):ș46,52+256,h%,"cover",a%,Q%,0,J%,J%+&80:ș46,52+256,h%,"cover",a%,�f(Q%+zy%-2*20),0,J%,J%+&80:ș46,47+256,h%,"tab":ș46,52+256,h%,"tab",a%,Q%,8,J%,J%+&80:ș46,33+256,h%,"tab"
z�ș46,52+256,h%,"tab",a%,Q%+zy%-2*20,8,J%,J%+&80:ș46,33+256,h%,"tab":ș46,47+256,h%,"tab":ș&400E6,py%:ȓȐa%,Q%+2*20,2*20,zy%-4*20:ș&400E6,6:�a%,Q%+2*20:�BY0,zy%-4*20:�
{5��s_(q%,_%,U%):�q%=i%��Cu(q%,_%,U%)��Qu(q%,_%,U%)
|�
}J��Xy(ty%,Wy%):�by%,l%,py%:by%=ty%?yu%:l%=ty%?ru%:�Wy%<>-1�?ty%=ty%?Wy%
~ty%?&B=by%:ty%?5=l%:�
���Cu(q%,_%,U%):T%=�:�A%,a%,Q%,Y%,ol%,Ca%,Ja%:ș46,40+256,h%,"ring"�,,,Ca%,Ja%:ș&400E6,1:�d(_%,U%,5,-Uy%):�d(_%+sJ%+40+40,U%,5+5,-Uy%-5):�d(_%,U%,ay%,-5):�d(_%,U%-Uy%-5,ay%,5+5):ș&400ED,256,h%,"cover",,,,J%,J%+&80:�Xy(J%+&80,-1)
��ș46,52+256,h%,"cover_tl",_%+5,U%-5-40,0,J%,J%+&80:ș46,52+256,h%,"cover_tr",_%+ay%-5-40,U%-5-40,0,J%,J%+&80:ș46,52+256,h%,"cover_bl",_%+5,U%-Uy%+5,0,J%,J%+&80:ș46,52+256,h%,"cover_br",_%+ay%-5-40,U%-Uy%+5,0,J%,J%+&80:�A%=U%-5-40-40�U%-Uy%/2�-40
��ș46,52+256,h%,"cover_l",_%+5,A%,0,J%,J%+&80:ș46,52+256,h%,"cover_r",_%+ay%-5-40,A%,0,J%,J%+&80:�:�A%=U%-Uy%+5+40�U%-Uy%/2+40�40:ș46,52+256,h%,"cover_l",_%+5,A%,0,J%,J%+&80:ș46,52+256,h%,"cover_r",_%+ay%-5-40,A%,0,J%,J%+&80:�
���A%=_%+5+40�_%+ay%/2�40:ș46,52+256,h%,"cover_t",A%,U%-5-40,0,J%,J%+&80:ș46,52+256,h%,"cover_b",A%,U%-Uy%+5,0,J%,J%+&80:�:�A%=_%+ay%-5-2*40�_%+ay%/2-40�-40:ș46,52+256,h%,"cover_t",A%,U%-5-40,0,J%,J%+&80
��ș46,52+256,h%,"cover_b",A%,U%-Uy%+5,0,J%,J%+&80:�:�A%=U%-Uy%+40�U%-m%-t%*zy%�40:ș46,52+256,h%,"cover",_%+k_%,A%,0,J%,J%+&80:�:�A%=U%-5-40-40�U%-5-40-zy%*t%-40�-40:ș46,52+256,h%,"cover",_%+ay%-5-80,A%,0,J%,J%+&80:�
�Q�F(_%+`y%,U%-m%,&64,-k%)�ș&400E6,2:ȓȐ_%+`y%+32,U%-m%-40,&64-2*32-2,-k%+80
��ș46,52+256,h%,"cover",_%+ay%-5-80,U%-Uy%+40,0,J%,J%+&80:ș46,52+256,h%,"cover",_%+`y%+32,U%-m%-40,0,J%,J%+&80:ș46,52+256,h%,"cover",_%+`y%+32,U%-Uy%+40,0,J%,J%+&80:ș46,52+256,h%,"fold",_%+`y%-&64/4,U%-m%-k%-40,0,J%,J%+&80
��ș46,52+256,h%,"fold",_%+`y%+5*&64/4-6,U%-m%-k%-40,0,J%,J%+&80:ș46,33+256,h%,"fold":ș46,52+256,h%,"fold",_%+`y%-0.3*&64,U%-m%,0,J%,J%+&80:ș46,52+256,h%,"fold",_%+`y%+1.3*&64-6,U%-m%,0,J%,J%+&80:ș46,33+256,h%,"fold"
��ș&400ED,256,h%,"cover",,,,J%,J%+&80:ș46,52+256,h%,"mid_b",_%+`y%+&64/2-17,U%-Uy%+76,8,J%,J%+&80:ș46,52+256,h%,"mid_t",_%+`y%+&64/2-17,U%-m%-40,8,J%,J%+&80:ș&40081,,"Homerton.Medium",&96,&96�ol%:�A%=1�B_%:�t%<A%�
�&�F(_%+sJ%,U%-m%-(zy%*A%),40,zy%)�
�n�cu(_%+sJ%,U%-m%-(zy%*A%),D%(A%)):�V(D%(A%),I%(A%)):�jy(ol%,M$(A%),0,0,_%+sJ%+40/2,U%-m%-(zy%*(A%-0.5)),1)
��
�(�:�F(_%+k_%,U%-m%-(zy%*A%),40,zy%)�
�r�xu(_%+k_%+40,U%-m%-(zy%*A%),D%(A%)):�V(D%(A%),I%(A%)):�jy(ol%,M$(A%),0,0,_%+k_%+40/2,U%-m%-(zy%*(A%-0.5)),-1)
��
���:�:ș&400E6,0:�d(_%+wy%-32,U%-m%,u%+32,-k%):�d(_%+my%,U%-m%,u%+32,-k%):ș&400E6,6:ȓ_%+wy%-32,U%-m%,u%+32,-k%:ȓ_%+my%,U%-m%,u%+32,-k%:a%=_%+`y%+&64/2:Y%=U%-m%-k%/(OJ%+1):�A%=1�OJ%:�F(a%-40-8,Y%-&C,2*(40+8),40+&C)�(qu%�1<<(A%-1))>0�
�Yș&400ED,256,h%,"ring",,,,J%,J%+&80:ș46,52+256,h%,"ring",a%-Ca%,Y%-Ja%/2,8,J%,J%+&80
�T�:Y%-=�f(k%/(OJ%+1)):�:�t%>0��F(_%+my%,U%-m%,u%+32,-k%)��Au%��oy(0,_%+my%,U%-m%)
�;�F(_%+wy%-32,U%-m%,u%+32,-k%)��Au%��oy(1,_%+wy%,U%-m%)
�ș&40082,ol%:�
�A��I(y%,_%,U%):ș&400ED,256,h%,"corner",,,,J%,J%+&80:�y%�_%+=1
�!�y%=1��F(_%+u%,U%-k%,-32,32)�
��ș46,47+256,h%,"corner":ș46,52+256,h%,"corner",_%+u%-16*2,U%-k%+2,8,J%,J%+&80:ș46,47+256,h%,"corner":�B_(_%+u%-32,U%,N%(1))
��:�y%=0�
��F(_%,U%-k%,32,32)�
�Eș46,52+256,h%,"corner",_%+2,U%-k%+2,8,J%,J%+&80:�B_(_%,U%,N%(0))
��
��:�
�9��B_(_%,U%,�gy%):!J%=i%:�gy%>=0�J%!4=gy%:ș&400C4,,J%
��ș&400CB,,J%:J%!4=_%-J%!4:J%!8=U%-J%!16-k%:J%!&C=J%!4+32:J%!16=J%!8+32:J%!20=&7003119:J%!24=sl%:J%!32=0:�y%�J%!28=Ki%�J%!28=Yi%
�ș&400C2,,J%�gy%:�
�1��Zu:!J%=i%:�N%(0)>=0�J%!4=N%(0):ș&400C4,,J%
�%�N%(1)>=0�J%!4=N%(1):ș&400C4,,J%
�
N%()=-1:�
����Qu(q%,_%,U%):�R%,A%,ty%:!J%=q%:J%!4=8:ș&400CE,,J%:_%+=(J%!8+J%!16)/2:U%+=(J%!&C+J%!20)/2:R%=56:ș&400E6,1:ȓȐ0,0,&BB8:ș&400E6,X%(0):ȏȐ_%,U%,R%:ș&400E6,X%(3):�A%=0�330�30:�_%+R%*��A%,U%+R%*��A%,_%+(R%-&A)*��A%,U%+(R%-&A)*��A%:�
��ș&400E6,X%(1):ȏ_%,U%,R%:ș&400E6,X%(5):A%=60:�_%,U%:�_%+(R%*0.35)*��(A%-9),U%+(R%*0.35)*��(A%-9):�85,_%+(R%*0.35)*��(A%+9),U%+(R%*0.35)*��(A%+9):�_%+(R%*0.35)*��(A%-9),U%+(R%*0.35)*��(A%-9):�85,_%+(R%*0.7)*��A%,U%+(R%*0.7)*��A%
��ș&400E6,X%(4):A%=300:�_%,U%:�_%+(R%*0.25)*��(A%-9),U%+(R%*0.25)*��(A%-9):�85,_%+(R%*0.25)*��(A%+9),U%+(R%*0.25)*��(A%+9):�_%+(R%*0.25)*��(A%-9),U%+(R%*0.25)*��(A%-9):�85,_%+(R%*0.5)*��A%,U%+(R%*0.5)*��A%
��ș&400E6,X%(6):�_%,U%:�BY0,-(R%*0.9):ȏȐ_%,U%,2:_%-=(J%!8+J%!16)/2:U%-=(J%!&C+J%!20)/2:R%=56:!J%=q%:J%!4=24:ș&400CE,,J%:_%+=(J%!8+J%!16)/2-20:U%+=(J%!&C+J%!20)/2-20:R%=56:ș&400ED,256,h%,"cover",,,,J%,J%+&80:ty%=J%+&80
��A%=ty%?ku%:ty%?5=ty%?hu%:ty%?&B=A%:ș46,52+256,h%,"cover_tl",_%-40,U%+40,0,J%,J%+&80:ș46,52+256,h%,"cover_tr",_%+40,U%+40,0,J%,J%+&80:ș46,52+256,h%,"cover_bl",_%-40,U%-40,0,J%,J%+&80:ș46,52+256,h%,"cover_br",_%+40,U%-40,0,J%,J%+&80
��ș46,52+256,h%,"cover_t",_%,U%+40,0,J%,J%+&80:ș46,52+256,h%,"cover_b",_%,U%-40,0,J%,J%+&80:ș46,52+256,h%,"cover_l",_%-40,U%,0,J%,J%+&80:ș46,52+256,h%,"cover_r",_%+40,U%,0,J%,J%+&80:ș46,52+256,h%,"cover",_%,U%,0,J%,J%+&80:�
�0ݤt(j%,TJ%):=��A("Day"+�(((j%-1)�7)+1)),TJ%)
��ݤU_(j%,TJ%):�A$,a$:A$=",Monday,Tuesday,Wednesday,Thursday,Friday,Saturday,Sunday,":j%=((j%-1)�7)+1:�A$=�A$,�A$,",")+1):j%-=1:�j%=0:a$=�A$,�A$,",")-1):�TJ%>0�a$=�a$,TJ%)
�=a$
��ݤYy(Vl%,TJ%):�A$,s$:A$=",January,February,March,April,May,June,July,August,September,October,November,December,":Vl%=((Vl%-1)�&C)+1:�A$=�A$,�A$,",")+1):Vl%-=1:�Vl%<=0:s$=�A$,�A$,",")-1):�TJ%>0�s$=�s$,TJ%)
�=s$
�ݤwy(d%):=�d%+�Ly(d%)
�}ݤLy(d%):�A$,Z$,F$,A%,xy%:A$=�A("th"):Z$=�A$,�A$,",")-1):ȕ�A$,",")��xy%:A$=�A$,�A$,",")+1):F$=�A$,�A$,",")-1):�F$,"#")�
����d%,�F$-1)=�F$,2)�xy%=�
���F$=d%�xy%=�
�
�:�:�xy%�
�<ȕ�A$>0��(A$)=35:A$=�A$,�A$,",")+1):�:Z$=�A$,�A$,",")-1)
�	�:=Z$
�3ݤX(Vl%,TJ%):=��A("Mon"+�(((Vl%-1)�&C)+1)),TJ%)
�%ݤpy(n%,r%,Lu%,f_%):�A$,Z$:�f_%�
�*�n%>&B�Z$=" "+�A("pm")�Z$=" "+�A("am")
��:�n%>&C��f_%�n%-=&C
�&�f_%�A$=�-(n%<&A),"0")��n%=0�n%=&C
�HA$+=�n%+":"+�-(r%<&A),"0")+�r%:�Lu%<>-1�A$+=":"+�-(Lu%<&A),"0")+�Lu%
�
=A$+Z$
����HJ(p$,Zy$,Fy$,ha%):H$=p$:T$=Fy$:`u%=0:Vu%=�:P$=Zy$:v_%=0:r_%=0:Tu%=�:Iy%=�:ș&400C0,&C8,&4B534154,H$�ba%,vu%:�FJ:�ha%��tu(ta%,v$+".Templates")
�
�n_:�Yu:�
���yu:�S%:ȎK%!16�
��0:Vu%=�
��1:�_J(K%!40,�N(K%+44))
��3:�o_(K%!40,�N(K%+44))
�
�8:�ZJ
�"�&400C0:�Vu(K%!20,K%!24,K%!28)
��&400C1:�P_
�$�&400C2:�N(K%+28)=H$�K%!4<>vu%�
��B(�A("ErrRun")):�gJ(K%!4)
��
��&400CC:ȎK%!20�
��i%:$(K%+36)=�A("Title")
� �f%,Ry%:$(K%+36)=�A("Alarm")
��sy%:$(K%+36)=�A("Date")
� �T_%:$(K%+36)=�A("Settings")
�"�_y%,GJ%:$(K%+36)=�A("AnnTab")
� �Jy%:$(K%+36)=�A("Setclock")
�K�:!K%=56:$(K%+28)="org":S%=K%!4:K%!4=vu%:ȔK%!8,K%!&C:ș&400E7,17,K%,S%
��:�
�?ݤQy(Bl%,S$):ș&400CF,,J%:=((Bl%=&FFF)�(Bl%=&DFE))�J%!&C=f%
�"��o_(Bl%,S$):�w%:�Qy(Bl%,S$)�
�8ȔK%!8,K%!&C:K%!16=4:ș&400E7,17,K%,K%!4:�J%!&C<>f%�
��Gy%<>-1��i
�R�"Copy "+S$+" "+P$+".Import ~c ~v f":�S$="<Wimp$Scrap>"��"Remove <Wimp$Scrap>"
��RJ(P$+".Import")
���u_(S$)
��
��:�
�8ݤly(ya%,hy%):�Zy%,A%:Zy%=-1:�ky%=A%(6)�U_%>1�U_%<6�
�)�!ya%=0�A%=�_(ky%,U_%)�A%=�u(ky%,U_%)
�%�W(Ay%,0,-1):Zy%=Ay%:�S(Ay%,A%,1)
�
�:=Zy%
�ݤCy:�hy%,R%,A$,Z$:�vy%�
�qA$=�A("QButtons"):Z$=�A("ErrSave"):!J%=0:$(J%+4)=Z$:ș&400DF,J%,280,"Message from "+H$,w$,-1,A$�,R%:�R%=3��Py
��:=R%<>4
���P_�za%,aa%,M%:�(Oy%�4)>0�
��Hy(�)�M%=20�M%=&C
�ș&2002E,281,h%,"clock":ș53,M%,4�,,za%:ș53,M%,5�,,aa%:ș46,8+512,h%�,,,,,F%:ș46,271,h%,"clock",0,&74/(1<<za%),&78/(1<<aa%),M%:�m
��:�
�I��e(q%,s%,g%,Yy%,ry%)�A%,B%,A$,H_%:K_%=t%:w_%=v%:H_%=1+2*(g%=1):Ȏq%�
�W�i%:!K%=i%:ș&400CB,,K%:_%=K%!4-K%!20:U%=K%!16-K%!24:�m_(s%,g%,Yy%-_%,ry%-U%,_%,U%)
�
�-2:Ȏg%�
��1:�s(Dy%,fy%,My%)
�(�2:LJ%=-1:�F(kJ%,Yy%,�Vy(kJ%),q%,s%)
��4:Ȏ��
�ɦ-1:�Ty%=0��Uy��Iy
�ɦ-3:MJ%=5:�h
��r(i%,-1,-1)
��
��
��sy%:Ȏs%�
�9�0:�W(z_%,0,-1):�S(z_%,PJ%-1,�):�F(z_%,Yy%,ry%,q%,s%)
�1�2,3:�Dy(-1,-1,(1+2*(s%=2))*H_%*(1-49*(�-1)))
��35:�ny:�g%<>1��X(sy%)
��36:�X(sy%)
�:�g%=2�
�6�W(z_%,0,-1):�S(z_%,PJ%-1,�):�F(z_%,Yy%,ry%,q%,s%)
���Dy(s%-3,-1,0):�g%<256��ny
��
��
��Jy%:�g%<>2�
�	Ȏs%�
� �1:�e(Jy%,9+�Z(Jy%,1),4,0,0)
��2:�`(X_%,V_%,L_%,Jy%,s%)
�#�3:�Xy(��M(Jy%,4),��M(Jy%,5))�
��j<>�Z(Jy%,1)��My(-1)
��A%=��M(Jy%,4):A$=�A%:A$=�2-�A$,"0")+A$:$J%=�24+�U_(�H(X_%,V_%,L_%),3)+","+�-(X_%<&A),"0")+�X_%+" "+�Yy(V_%,3)+" "+�L_%+"."+A$+":"+�M(Jy%,5)+":00":ș&20007,&F,J%�;B%:�g%=4��X(Jy%)
��
V�8:A%=��M(Jy%,4)+H_%:�A%=24�A%=0:�P(X_%,V_%,L_%,1,0,0):�A(Jy%,2,�U(X_%,V_%,L_%,�))
C�A%=-1�A%=23:�P(X_%,V_%,L_%,-1,0,0):�A(Jy%,2,�U(X_%,V_%,L_%,�))
�A(Jy%,4,�A%)
X�9:A%=��M(Jy%,4)-H_%:�A%=-1�A%=23:�P(X_%,V_%,L_%,-1,0,0):�A(Jy%,2,�U(X_%,V_%,L_%,�))
A�A%=24�A%=0:�P(X_%,V_%,L_%,1,0,0):�A(Jy%,2,�U(X_%,V_%,L_%,�))
�A(Jy%,4,�A%)
H�&A,&C:A%=��M(Jy%,5)+(1-9*(s%=&A))*H_%:�A%>59�A%-=60:�e(Jy%,8,4,0,0)
 �A%<0�A%+=60:�e(Jy%,9,4,0,0)
�A(Jy%,5,�2-��A%,"0")+�A%)
	H�&B,&D:A%=��M(Jy%,5)-(1-9*(s%=&B))*H_%:�A%>59�A%-=60:�e(Jy%,8,4,0,0)

 �A%<0�A%+=60:�e(Jy%,9,4,0,0)
�A(Jy%,5,�2-��A%,"0")+�A%)
�

�
�f%:�pu(Yy%,ry%,q%,s%,H_%)
�Ry%:�`J(Yy%,ry%,q%,s%)
�Mu%:�U_
�_y%:�rJ(s%,Yy%,ry%)
"�T_%,Ty%:�Hu(q%,s%,g%,Yy%,ry%)
�GJ%:�X_
�Gy%:�i_(q%,s%,g%,Yy%,ry%)
�XJ(q%,s%,g%,Yy%,ry%)
�:�By:�
D��m_(s%,g%,a%,Q%,i_%,qJ%):�oa%,ia%,A%,VJ%:A%=g%-3-(g%=1):�g%<>2�
�s%>=0�g%<>2�
	Ȏs%�
�N%(0):�K_(-A%)
�N%(1):�K_(A%)
�p_(s%)
�
$�:�A%=1�B_%:�t%<A%�X%=sJ%�X%=k_%
$�m(a%,Q%,X%,-m%-A%*zy%,40,zy%)�
 �g%<>2�t%=A%:v%=S%(t%)
!�:�
"�
#K�:�(s%=-1�g%=2)��m(a%,Q%,my%,-m%,u%,-k%)��iy(g%,�,a%-my%,Q%+m%,i_%,qJ%)
$I�(s%=-1�g%=2)��m(a%,Q%,wy%,-m%,u%,-k%)��iy(g%,�,a%-wy%,Q%+m%,i_%,qJ%)
%
�g%=2�
&(�T%(t%)<>-1��F(T%(t%),Yy%,ry%,q%,s%)
'��VJ%��C(i%,-1)
(�:�
)��By:�K_%=t%�
*#�v%<>w_%�J_%=0�J_%=1+2*(v%<w_%)
+(��Q_(K_%):�C(i%,-1):J_%=1+2*(t%<K_%)
,�:�(mJ%�J_%<>0)�Iy%��K
-.S%(K_%)=w_%:S%(t%)=v%:�K_%<>t%��my(t%):�Iu
.�
/P��K:�Zu:�Ru(J_%):�N(i%,my%,-m%,my%+u%,-m%-k%):�N(i%,wy%,-m%,wy%+u%,-m%-k%):�
0a��Iu:�N(i%,k_%,-m%,k_%+40,-m%-k%):�N(i%,sJ%,-m%,sJ%+40,-m%-k%):�N(i%,`y%,-m%,`y%+32,-m%-k%):�
1&��r(q%,dJ%,al%):�A%:A%=Iy%:�q%=i%�
2
�eJ%<>-1�
3i!J%=i%:ș&400CB,,J%:J%!4=eu%:J%!8=su%-Uy%:J%!&C=eu%+ay%:J%!16=su%:J%!28=dJ%:ș&400C5,,J%:�z(i%,dJ%,0)
4��z(q%,dJ%,al%)
5�:�A%��C(i%,-1)
6��z(q%,dJ%,al%)
7�:�
8��Ru(A%):�Su%�A%<>0�
9��du%,a%,_%,U%,py%,`%,R%,C%:!J%=i%:ș&400CB,,J%:_%=J%!4-J%!20:U%=J%!16-J%!24:py%=_%+wy%-(&64)�2:`%=(&64/2-32):R%=u%+&64/2:ș&40742,0�C%:C%+=3<<4:�a%=0�&B4�&F:�ky(a%,A%):T%=�:���>T%+1:�ky(a%,A%):�
:�:�
;J��ky(a%,A%):!J%=i%:J%!4=0:J%!8=-Uy%:J%!&C=ay%:J%!16=0:�A%=-1�a%=&B4-a%
<�ș&400C9,,J%�du%:ȕdu%:ș&400E6,C%:�py%+`%*��a%,U%-m%+0.2*`%*��a%:�py%+R%*��a%,U%-m%+0.2*R%*��a%:�BY0,-k%:�py%+`%*��a%,U%-m%-k%:�py%+`%*��a%,U%-m%+0.2*`%*��a%:ș&400CA,,J%�du%:�:�
=;��yJ�A%,C%,_i%,K_%,w_%,oa%:_i%=�Dy:K_%=t%:w_%=v%:ȎbJ%�
>�kJ%:Ȏ!K%�
?�0
@�1:�s(Dy%,fy%,My%)
A��2:!K%=-1:K%!4=j_%:ș&400CE,,K%:!J%=Jy%:ș&400CB,,J%:J%!4=K%!16-(J%!&C-J%!4):J%!&C=K%!16:J%!16=&88+(J%!16-J%!8):J%!28=-1:ș&400C5,,J%:�A(Jy%,2,�U(Dy%,fy%,My%,-1)):X_%=Dy%:V_%=fy%:L_%=My%:�A(Jy%,4,äc):A%=�i:�A(Jy%,5,�2-��A%,"0")+�A%)
B.ș6,&A1,&DC�,,A%:�Z(Jy%,1,�((A%�&80)=&80))
C�3:�K%!4>-1�
D,�W(Wl%,0,-1):�S(Wl%,K%!4,1):wu%=K%!4:�qy
E��qy
F�
G�4:�Ty%=0��Uy��Iy
H
�5:�Py
I�6:Vu%=�Cy
J�
K�T%(t%):�hu(K%,t%)
L�z_%:�Dy(-1,!K%,0)
M�Xl%:Ȏky%�
N$�f%:nJ%=!K%:�!K%>0�C%=!K%�C%=n_%
O�A%=16�18:�D(f%,A%,C%):�
P%�_y%:Zi%=!K%:�!K%=0�A%=SJ%�A%=!K%
Q�D(_y%,4,A%)
R�
S�Zl%:�WJ(U_%,!K%)
TC�iJ%:U%(0)=!K%:�Fy(A%(6),18,U%()):�W(iJ%,0,-1):�S(iJ%,U%(0),-1)
U:Ȏky%�
V�A%(6):ȎU_%�
W�2,3,4,5:�K%!4<>-1�
X,�!K%=0��D(ky%,U_%,K%!4)��g(ky%,U_%,K%!4)
Y �W(Ay%,0,-1):�S(Ay%,K%!4,-1)
Z�
[}�9,&A,&B,&C,&D,&E,&F:X%(U_%-9)=!K%:�W(Ay%,0,-1):�S(Ay%,!K%,-1):!J%=ky%:J%!4=8:ș&400CE,,J%:�N(ky%,J%!8,J%!20,J%!16,J%!&C)
\H�20,21:U%(U_%-19)=!K%:�W(Ay%,0,-1):�S(Ay%,!K%,-1):�Fy(A%(6),18,U%())
]��25:A$=�A("Cov"+�(!K%+1)):A$=�A$,�A$,",")+1):ku%=�A$:A$=�A$,�A$,",")+1):hu%=�A$:!J%=ky%:J%!4=24:ș&400CE,,J%:�N(ky%,J%!8,J%!20,J%!16,J%!&C)
^f�26:�W(Ay%,0,-1):ku%=!K%:�S(Ay%,!K%,1):!J%=ky%:J%!4=24:ș&400CE,,J%:�N(ky%,J%!8,J%!20,J%!16,J%!&C)
_f�27:�W(Ay%,0,-1):hu%=!K%:�S(Ay%,!K%,1):!J%=ky%:J%!4=24:ș&400CE,,J%:�N(ky%,J%!8,J%!20,J%!16,J%!&C)
`�
a�Ty%:�vJ(K%)
b�f%,Ry%:�A_(bJ%,K%)
c�dJ(bJ%,K%)
d�
e �:�_i%��F(bJ%,-1,-1,ky%,U_%)
f	�By:�
g��qy:�A$,A%:Ȏwu%�
h$�1:�"Filer_Run "+P$+".!HTMLHelp"
i*�2:ș&2001E,18,"StrongHelp"�;A%:�A%�1�
j�b("StrongHelp$Dir")�
kRș&400DE,"<StrongHelp$Dir>.!Run":�"StrongHelp <Organiser$Dir>.Organiser !Root"
l��B(�A("ErrStrong"))
m�
n2�"StrongHelp <Organiser$Dir>.Organiser !Root"
o�
p�"Filer_Run "+P$+".!Help"
q�:�
r;��F(Zy%,a%,Q%,x%,Fy%)�A%:�(Zy%=kJ%�Zy%=T%(t%))�Zy%<>-1�
sB�S(Ql%,0,cy%=1):�S(Ql%,1,cy%=2):�A%=0�2:�T(wi%,A%,-(LJ%<=0)):�
t5�:ș&400D4,,Zy%,a%-64,Q%:bJ%=Zy%:ky%=x%:U_%=Fy%:�
u@��Mu(q%,s%,By%)�w_%,oa%,A%,B%,A$,Z$:K_%=t%:w_%=v%:o%=�:Ȏq%�
v�i%:o%=�ny(s%,By%)
w�-1
x�T_%,Ty%:o%=�M_(q%,s%,By%)
y�Jy%
zo%=�cy(q%,s%,By%)
{�:�o%=��
|o%=�:ȎBy%�
}�27:�Ty%<>0��b
~�385:�qy
�386:�Ty%=0��Uy��Iy
��387:�Py
��81-65+1:Vu%=�Cy
��83-65+1:o%=�:�s%<>-1�Iu%�
�?ș&400D3,,K%:A%=K%!20:Z$=�M(q%,s%):�A%>0�A$=�Z$,A%,1)�A$=""
�)�(A$>="A"�A$<="Z")�(A$>="a"�A$<="z")�
�8Z$=�Z$,A%-1)+�((�A$)�32)+�Z$,A%+1):o%=�:�A(q%,s%,Z$)
��
��
�	o%=�
�6�:�By%>=401�By%<=400+B_%�t%=By%-400:v%=S%(t%):o%=�
��:�By:�o%�ș&400DC,By%
�wJ%=�z:�
�R��C(q%,s%):!J%=q%:J%!4=s%:ș&400CE,,J%:ș&400D2,q%,s%,,,-1,��N(J%!28):wJ%=�z:�
�;ݤz:ș&400D3,,J%:=(!J%<<16)�(J%!4�&FF)�((J%!20�&FF)<<8)
�7��q(A$):ȕ�A$,1)=" ":A$=�A$,2):�:�A$<>""�G$+=A$+�&D
��
�S��ou:ș&400D3,,K%:�!K%<>i%�!K%<>Cy%�Z%(t%)=2�!K%<>-1�ș&400DC,��G$,1):G$=�G$,2)
��
�&��U_:!J%=Mu%:ș&400C3,,J%:gu%=-1:�
�6��Oy:Au%=�:�wy(0,0,0,0,0,�,�):�w(0):Au%=�:XJ%=-1:�
�,��R_(ei%,q%,a%,Q%,wl%,Ji%,Pi%):�Su%�Iy%�
�_XJ%=q%:r_%=ei%:Gl%=a%:zl%=Q%:Tu%=wl%:ul%=Ji%:ml%=Pi%:!J%=20:J%!&C=0:ș&400E7,0,J%,vu%:Au%=�
�)��wy(ei%,q%,a%,Q%,wl%,Ji%,Pi%):XJ%=-1
��:�
�2��Ku:�wy(r_%,XJ%,Gl%,zl%,Tu%,ul%,ml%):�XJ%=Cy%
�XJ%=-1:Au%=�:�
����Uy:�A%,x%,n%,A$:A%=A%(1):�Z(A%,1,-x_%):�Z(A%,2,-iu%):�Z(A%,3,-bu%):�Z(A%,4,-Su%):�Z(A%,7,-((Oy%�9)=0)):�Z(A%,8,-((Oy%�4)>0)):�Z(A%,9,-((Oy%�5)=1)):�Z(A%,22,-((Oy%�8)=8)):�Z(A%,23,-(xJ%=-1)):�Z(A%,&A,-((Oy%�2)>0)):�Z(A%,&B,-f_%)
���Z(A%,24,-((Oy%�16)=16)):�A(A%,25,N$):�Z(A%,&F,-Ju%):�Z(A%,16,-Zu%):�Z(A%,&E,-(eJ%=-1)):�Z(A%,19,-(eJ%<>-1)):�Z(A%,20,-(b_%=-1)):�Z(A%,21,-�(JJ%)):�M(A%,&B,��(�Z(A%,9)���Z(A%,24))):�M(A%,&A,��(�Z(A%,8)�(�Z(A%,9)���Z(A%,24)))):�M(A%,24,���Z(A%,9))
���M(A%,25,��(�Z(A%,9)��Z(A%,24))):�x%=OJ%-1�0�-1:A$+=�((qu%>>x%)�1):�:�A(A%,18,A$):�Z(A%,28,-Iu%):�Z(A%,29,-Gu%):�M(A%,29,-��Z(A%,22)):�A(A%,27,B$):�Z(A%,32,-(Ky%?3=1)):�x%=33�34:�M(A%,x%,-(Ky%?3=0)):�:�Z(A%,33,-(Ky%?2=0)):�Z(A%,34,-(Ky%?2=1))
���A(A%,36,�2-��Ky%?1,"0")+�Ky%?1+"00"):�A(A%,39,�2-��Ky%?0,"0")+�Ky%?0+"00"):ku%=yu%:hu%=ru%:�x%=35�42:�M(A%,x%,-((Ky%?3=0)�(Ky%?2=0))):�:�A(A%,&D,D$):�Xu:!J%=T_%:ș&400CB,,J%:x%=J%!&C-J%!4:n%=J%!16-J%!8:J%!4=(�g-x%)/2:J%!16=�d-(�d-n%)/2
�J%!28=-1:ș&400C5,,J%:�ey(1):X%()=P%():U%()=H%():�Fy(A%(6),18,H%()):�A%=2�5:�g(A%(6),A%,D%(A%-1)):�D(A%(6),A%,I%(A%-1)):�:�
�a��Iy:!J%=Ty%:ș&400CB,,J%:J%!28=-1:ș&400C5,,J%:!J%=T_%:ș&400CB,,J%:J%!28=Ty%:ș&400C5,,J%:�
����ly:�A%,C%,A$:A%=A%(1):B%=Oy%:x_%=�Z(A%,1):iu%=�Z(A%,2):bu%=�Z(A%,3):Su%=�Z(A%,4):D$=�M(A%,&D):f_%=�Z(A%,&B):Oy%=-�Z(A%,9)-5*�Z(A%,8)-8*�Z(A%,22)-2*�Z(A%,&A)-16*�Z(A%,24):Ju%=�Z(A%,&F):Zu%=�Z(A%,16):�zJ(��Z(A%,21))
��eJ%=�Z(A%,&E):xJ%=�Z(A%,23):N$=�M(A%,25):Iu%=�Z(A%,28):Gu%=�Z(A%,29):!Ky%=((��M(A%,36)�&64)<<8)+(��M(A%,39)�&64):!Ky%+=(((-�Z(A%,32))<<24)+((-�Z(A%,34))<<16)):�eJ%�
�=!J%=i%:ș&400CB,,J%:eu%=J%!4:nl%=J%!8:gl%=J%!&C:su%=J%!16
�)�:C%=�Z(A%,20):�C%<>b_%�b_%=C%�b_%=C%
�A$=�M(A%,18):�A$=""�A$="1"
�JOJ%=�A$:qu%=�("%"+A$):P%()=X%():H%()=U%():A$=�M(A%,27):�A$<>B$��Lu(A$)
�m�A%=2�5:D%(A%-1)=�u(A%(6),A%):I%(A%-1)=�_(A%(6),A%):�:yu%=ku%:ru%=hu%:�au:�Iy%�ș&400D1,i%,0,-&BB8,&BB8,0
�MJ%=0:�h:�m:�h:�
�^��Lu(A$):w%=�"<Organiser$Dir>.Resources.!Language":�#w%,A$:�#w%:w%=0:�B(�A("ErrReload")):�
�)��ey(I%):�Ty%<>0�!J%=Ty%:ș&400C6,,J%
��!J%=T_%:ș&400CB,,J%:Ty%=A%(I%):!J%=Ty%:J%!4+=22:J%!16-=70:J%!8=J%!16-272:ș&400C5,,J%:!J%=T_%:J%!4=&B:J%!8=1<<23:J%!&C=1<<23:ș&400CD,,J%:J%!4=J%!88-1:ș&400C4,,J%:J%!4=I%:ș&400CE,,J%:J%!4=J%!8+4:J%!8=J%!&C-8:J%!&C=J%!16-4:J%!16=J%!8+&C
�QJ%!20=&17000021:J%?24=0:ș&400C2,,J%�I%:J%!4=I%:J%!8=0:J%!&C=0:ș&400CD,,J%:�
�z��PJ:!J%=Ty%:ș&400CB,,J%:J%!4=K%!4+22:J%!16=K%!16-70:J%!8=J%!16-272:J%!28=K%!28:ș&400C5,,J%:K%!28=Ty%:ș&400C5,,K%:�
�"��Hu(q%,s%,g%,a%,Q%):�A%:Ȏq%�
��T_%:Ȏs%�
��1,2,3,4,5,6:�ey(s%)
�	�8:�b
��9:�ly:vy%=-1:�g%<>1��b
��&A:�ly:�W_:�g%<>1��b
��
��A%(1):Ȏs%�
�(�&F:�g%<&A�g%<>2��B(�A("ErrReload"))
��7,8,9,22,&E,19:�g%<>2�
���Z(q%,s%,1):�M(q%,&B,��(�Z(q%,9)���Z(q%,24))):�M(q%,&A,��(�Z(q%,8)�(�Z(q%,9)���Z(q%,24)))):�M(q%,24,���Z(q%,9)):�M(q%,25,��(�Z(q%,9)��Z(q%,24))):�M(q%,29,-��Z(q%,22))
��
�G�24:�M(q%,25,���Z(q%,24)):�M(q%,&A,��Z(q%,24)):�M(q%,&B,��Z(q%,24))
��27:�w_(A%(1),27)
�[�32:�A%=33�34:�M(q%,A%,-��Z(q%,32)):�:�A%=35�42:�M(q%,A%,-((��Z(q%,32))�(�Z(q%,33)))):�
�7�33,34:�Z(q%,s%,1):�A%=35�42:�M(q%,A%,-�Z(q%,33)):�
�/�35,38:A%=��M(q%,s%+1)-&64:�A%=-&64�A%=&8FC
� �A(q%,s%+1,�4-��A%,"0")+�A%)
�,�37,40:A%=��M(q%,s%-1)+&64:�A%=&960�A%=0
� �A(q%,s%-1,�4-��A%,"0")+�A%)
��
��A%(6):Ȏs%�
�3�2,3,4,5:!oJ%=�qy(A%(6),s%):�F(oJ%,a%,Q%,q%,s%)
�M�9,&A,&B,&C,&D,&E,&F:�W(Ay%,0,-1):�S(Ay%,X%(s%-9),-1):�F(Ay%,a%,Q%,q%,s%)
�=�19:�W(iJ%,0,-1):�S(iJ%,U%(s%-19),-1):�F(iJ%,a%,Q%,q%,s%)
�@�20,21:�W(Ay%,0,-1):�S(Ay%,U%(s%-19),-1):�F(Ay%,a%,Q%,q%,s%)
��25:�F(Ya%,a%,Q%,q%,s%)
�7�26:�W(Ay%,0,-1):�S(Ay%,ku%,-1):�F(Ay%,a%,Q%,q%,s%)
�7�27:�W(Ay%,0,-1):�S(Ay%,hu%,-1):�F(Ay%,a%,Q%,q%,s%)
��
��aJ(q%,s%,g%,a%,Q%)
��:�
�ݤM_(q%,s%,g%):Ȏq%�
��T_%,A%(1):o%=�
�o%=�dy(q%,s%,g%)
�	�:=o%
�,��b:�X(Ty%):Ty%=0:�X(T_%):�Iy%��C(i%,-1)
��
Ӂ��w_(x%,Fy%):�ql%,m$,Wy%,K$,q$,t$,`%:ql%=1:m$=�M(x%,Fy%):�:ș&C,9,"<Organiser$Dir>.Resources",K%,1,ql%,256,0�,,,`%,ql%:�`%=1�
�q$=�N(K%):�t$=""�t$=q$
��Wy%=��K$=q$
��q$=m$�Wy%=�
�!�:�ql%=-1�K$<>"":�K$=""�K$=t$
��A(x%,Fy%,K$):�
ٺ��`(c%,r%,Q%,x%,Fy%):�M%,A%:_i%=�:�A(sy%,0,�Jy(c%,r%,Q%,-1)):M%=�D(r%,Q%):�A%=29�31:�R(sy%,A%+3,-(A%>M%)):�:�A%=1�M%:�u(A%,A%=c%):�:PJ%=r%:�A(sy%,1,�Q%):�r(sy%,-1,1):Ga%=x%:xa%=Fy%:�
�$��ny:�d%,z%,e%,A$:�X(sy%):ȎGa%�
�(�f%:�A(f%,1,�o(Q_%,N_%,AJ%)):�O(0,0)
�3�e_%:A$=�o(d%,z%,e%):K_%=t%:w_%=v%:�H(d%,z%,e%)
�"�Jy%:�A(Jy%,2,�o(X_%,V_%,L_%))
��:�
�\��u(c%,F%):!J%=sy%:J%!4=c%+3:ș&400CE,,J%:$J%!32="R"+�(1-F%)+";F"+�(1-F%)+"7":�F%�au%=c%
�7�Ia%�J%!8=0:J%!&C=0�J%!8=(1+�(F%))<<28:J%!&C=&F<<28
�ș&400CD,,J%:�
�;��Dy(c%,r%,Qy%):�A%,M%,Q%,A$:�c%<>-1��u(au%,�):�u(c%,�)
�5�r%<>-1��S(z_%,PJ%-1,�):PJ%=!K%+1:�S(z_%,PJ%-1,�)
�L�Qy%<>0�Q%=��M(sy%,1)+Qy%:�Q%>=&77d�Q%<=&fff��A(sy%,1,�Q%)�Q%=��M(sy%,1)
�NM%=�D(PJ%,Q%):�A%=29�31:�R(sy%,A%+3,-(A%>M%)):�:�au%>M%��u(au%,�):�u(M%,�)
�"�A(sy%,0,�Jy(au%,PJ%,Q%,-1)):�
�Aݤo(�c%,�r%,�Q%):c%=au%:r%=PJ%:Q%=��M(sy%,1):=�U(c%,r%,Q%,-1)
�:ݤJy(c%,r%,Q%,py%):�A$:A$=�U(c%,r%,Q%,py%):=�A$,�A$-5)
�/��Ay:�Uu%,Hl%,UJ%,KJ%,Na%,p%,n%:lJ%=0:�xJ%�
�p%=�Y:n%=�c:Hl%=J%(0,1):Uu%=J%(0,3):Uu%+=J%(0,2)-�H(Uu%,Hl%,My%):KJ%=J%(1,1):UJ%=J%(1,3):UJ%+=J%(1,2)-�H(UJ%,KJ%,My%):hl%=�S(0,1,Uu%,Hl%,My%):kl%=�S(0,2,UJ%,KJ%,My%):Na%=(�B(hl%,p%)<1��B(p%,kl%)<1):�L(Uu%,Hl%,My%)=�L(Dy%,fy%,My%)���j�lJ%=hl%
�/�L(UJ%,KJ%,My%)=�L(Dy%,fy%,My%)��j�lJ%=kl%
�V�Na%<>�j��L(Uu%,Hl%,My%)<>�L(Dy%,fy%,My%)��L(UJ%,KJ%,My%)<>�L(Dy%,fy%,My%)��My(-1)
��:�
���mJ:�lJ%=kl%��My(0)
��lJ%=hl%��My(1)
�	�Ay:�
�K��FJ:�_$<>""��B("The "+_$+" resources are out of date, using English.")
�P$=�C_("Organiser$Dir"):w%=0:Ru%=0:G$="":vy%=�:Ii%=�:XJ%=-1:Au%=�:Y$=P$+".Data.":wJ%=0:h%=�Z_("<Organiser$Dir>.Sprites",&7AC+&C8):�Xa%3,DJ%32,N%(1),Yi%16,Ki%17,sl%1:$Xa%="R2":N%()=-1
�$Yi%="Pptr_turnl,0,10"+�0:$Ki%="Pptr_turnr,23,10"+�0:?sl%=0:$DJ%="":�D%(5),I%(5),B%(5),W%(5),S%(5),Z%(5),M$(5):�P%(7),X%(7),H%(2),U%(2),Ky%4:A$=�fy:Fu%=�:�A$,"-delete_all_data")�
��_y(�A("ErrSure"),�)�
�#�B(�A("ErrChange")):Fu%=�:vy%=�
��
�A�:�`y:�TJ:�vu:�M_:j_%=-1:�h:s_%=�l(1*&400):�c_(s_%,`u%):�x_%�
��Oy%=1��M(-1,j_%,1)
�
�w(�1)
�
�ș&406C0
��:�
�0��Yu:�xJ:v%=S%(t%):�r(i%,-1,-1):�iu%��X(i%)
��Bu%��xy:�Ay
�Ru%=�:�my(t%):�Oy%>1��m
��Oy%�1��M(-1,j_%,0)
�bu%��r(Mu%,-1,-1)�gu%=-1
�x_%�ș&406C1
�x:�Ay:�
5ݤG(Lu%):�A%:A%=B_%+1:�A%-=1:�Z%(A%)=Lu%�A%=0:=A%
���n_:�A$,S%,F%,L%:�T%(B_%):Ay%=�Py(�A("Cols")):z_%=�C("Mon","Mon",1,&C):�gy(z_%,0,-1):�S%=1�B_%:T%(S%)=�L_(S%):�:kJ%=�C("Title","Menu",1,7):�Y(kJ%,0,Al%):oJ%=�C("TabM","TabM",1,2):Wl%=�C("Helpm","Helpm",1,3):�Y(kJ%,3,Wl%):�S(Wl%,wu%,1)
��Y(oJ%,0,Ay%):�Y(oJ%,1,Ay%):�G_(oJ%,0):�G_(oJ%,1):iJ%=�C("BordM","BordM",1,5):A$=�A("Cov"):S%=1:F%=0:ȕ(F%�1)=0:ș&61502,C_%,"Cov"+�S%,J%,256�,,,L%;F%:S%+=1:�(F%�1)=0�J%?L%=&D:A$+="\"+�$J%,�$J%,",")-1)
�:Ya%=�Ay(A$):�
���M_:�A%,ma%,aa%:My%=�R:fy%=�I:Dy%=�T:zy%=�r(k%/B_%):ay%=&64+2*(40+u%+5+40):Uy%=k%+2*(5+40):k_%=5+40:sJ%=k_%+40+&64+2*u%:my%=k_%+40:wy%=my%+&64+u%:m%=5+40:`y%=wy%-&64:Y_%=k%/27::cJ%=u%-40-2*&c:�
0��Au:�B%:�(Uy%<>K%!16-K%!8�ay%<>K%!&C-K%!4)�
	(�K%!16-K%!8>300�Uy%=�r(K%!16-K%!8)-2

(�K%!&C-K%!4>400�ay%=�r(K%!&C-K%!4)-2
�k%=Uy%-2*(5+40):u%=((ay%-&64)-2*(40+5+40))/2:�M_:ș30,6,,,li%�,,B%:!B%=Cy%:ș&400CC,,B%:ș&400C3,,B%:�ty(B%!88,B%+4):ș&400C1,,B%+4�Cy%:ș30,7,,B%:�Z%(t%)=2�v%=0��Oy:�C_
"ș&400D1,i%,0,-Uy%-&A,ay%+&A,0

�:�
`��vu:�A%,`$:�:��:�#w%:w%=0:�B(�$+" at line "+Þ+", using default settings."):�`y:vy%=�:�
�w%=�(P$+".Data.Settings"):l$=�#w%:`$=�#w%:D$=�#w%:x_%=�Q:iu%=�Q:Oy%=�V:f_%=�Q:Zu%=�Q:B_%=�V:t%=�V:bu%=�Q:Su%=�Q:xJ%=�Q:Ju%=�Q:Ia%=Ju%:OJ%=�V:�#w%,qu%,_J%:�#w%,eJ%,eu%,gl%,su%,nl%:b_%=�Q:JJ%=�Q:�#w%,u%,k%:�A%=0�6:P%(A%)=�V:�:�A%=0�2:H%(A%)=�V:�
��A%=1�B_%:Z%(A%)=�V:D%(A%)=�V:I%(A%)=�V:�:N$=�#w%:Iu%=�Q:Gu%=�Q:�#w%,!Ky%:yu%=�V:ru%=�V:wu%=�V:��GJ(�#w%,w%):��#w%:�#w%:w%=0:��:Bu%=(�x(_J%)<>�x(�Y)):�Fu%�D$=�A("Yourname")
u%=�f(u%):k%=�f(k%):�
���W_:�A%:w%=�(P$+".Data.Settings"):�#w%,T$:�#w%,P$:�#w%,D$:�J(x_%):�J(iu%):�J(Oy%):�J(f_%):�J(Zu%):�J(B_%):�J(t%):�J(bu%):�J(Su%):�J(xJ%):�J(Ju%):�J(OJ%):�#w%,qu%,�Y:�#w%,eJ%,eu%,gl%,su%,nl%:�J(b_%):�J(JJ%):�#w%,u%,k%:�A%=0�6:�J(P%(A%)):�
��A%=0�2:�J(H%(A%)):�:�A%=1�B_%:�J(Z%(A%)):�J(D%(A%)):�J(I%(A%)):�:�#w%,N$:�J(Iu%):�J(Gu%):�#w%,!Ky%:�J(yu%):�J(ru%):�J(wu%):�qu(w%):�#w%:w%=0:�
��Py:�W_:�su:vy%=�:�
���`y:::W_%=�:Bu%=0:Oy%=1+2+4:N$="%z12:%mi:%se %am":H%()=2,2,7:x_%=�:f_%=�:Su%=�:Zu%=�:MJ%=0::::::Ju%=�:b_%=�:B_%=4:I%()=7:D%()=0,&B,&A,&F,9,&E:P%()=0,&F,8,&B,4,4,&B:iu%=�:eJ%=-1:eu%=0:su%=0:gl%=0:nl%=0:JJ%=�:t%=2:Z%()=0,1,3,5,2
�bu%=�:D$="Chris Morison":xJ%=�:Zu%=�:J_%=�::::::u%=500:k%=920:wu%=0:::::::OJ%=8:qu%=&E7:yu%=&B:ru%=5::::Bu%=�:_J%=0::Gu%=�:Iu%=�:!Ky%=71431:�
7ݤoy:�Dl%,x,NJ%:Dl%=�c:Di%=Ky%?1:NJ%=?Ky%:�NJ%<Di%�
�Dl%<=NJ%�Dl%+=24
NJ%+=24
H�:=(((Ky%?2=1)�((Dl%<Di%)�(Dl%>=NJ%)))�(Ky%?3=0))��(Ky%?3=1�Ky%?2=0)
ݤQ=(�#w%=&FF)
��J(A%)�#w%,A%:�
ݤV=�#w%
6��h:�B%,H%,xi%,s%:xi%=j_%:I_%=0:�MJ%>0�B%=8�B%=Oy%
ȎB%��(2+16)�
 
�1,8:Ȏ��
!�B%=1:I_%=6-3*�f_%
"�B%=3:I_%=9-3*�f_%
#�(B%�8)>0:I_%=9:$DJ%=�Uy
$�(B%�16)>0:I_%=��Zy(N$)+3
%_�:I_%=I_%*16:Pu%=68:J%!8=0:J%!&C=I_%:J%!16=Pu%:J%!20=&2700313D:J%!24=DJ%:J%!28=Xa%:J%!32=32
&j�1+4:I_%=&74:Pu%=&78:J%!8=-16:J%!&C=I_%:J%!16=Pu%:$DJ%="clock":J%!20=&3102:J%!24=DJ%:J%!28=h%:J%!32=32
'N:I_%=68:Pu%=68:J%!8=0:J%!&C=68:J%!16=68:J%!20=&3002:$(J%+24)="!Organiser"
(1�:�j_%<>-1��b_%�!J%=-3:s%=j_%�!J%=-1-�(7*b_%)
)CJ%!4=0:ș&400C2,s%,J%�j_%:�xi%<>-1�!J%=-1:J%!4=xi%:ș&400C4,,J%
*�(B%�4)=4��P_
+�Fy(-1,j_%,H%()):�
,7��Fy(q%,gy%,K%()):�g_%,A%:g_%=�A_(q%,gy%):�g_%<>-1�
-qA%=��N(g_%),"R"):g_%?A%=��K%(0):�D(q%,gy%,K%(2)):�g(q%,gy%,K%(1)):!J%=q%:J%!4=gy%:J%!8=0:J%!&C=0:ș&400CD,,J%
.�:�
/���ju:�A%,Hy%:�A%(6):Ty%=0:�jJ:Al%=�W("Info",Hy%):i%=�W("Main",Hy%):ki%=Hy%:Cy%=�W("Addresses",Hy%):__%=�W("Important",Hy%):Mu%=�W("Banner",Hy%):sy%=�W("GetDate",Hy%):T_%=�W("Setup",Hy%):f%=�W("AlarmSet",Hy%):Kl%=Hy%:Ry%=�W("AlarmWarn",Hy%)
0�_y%=�W("Anni",Hy%):_a%=Hy%:GJ%=�W("AnniNotify",Hy%):A%(1)=�W("SetGen",Hy%):A%(2)=�W("SetAdd",Hy%):A%(3)=�W("SetAnn",Hy%):A%(4)=�W("SetCal",Hy%):A%(5)=�W("SetDia",Hy%):A%(6)=�W("SetColours",Hy%):Jy%=�W("SetClock",Hy%)
1��A(Al%,3,T$):�A(Al%,0,�A("Title")):�A(Al%,1,�A("Purp")):�A(Mu%,3,�A("Vers")+" "+T$):�A(Mu%,6,"� Chris Morison 19"+�T$,�T$,")")-2,2)):�A(Mu%,4,D$):�A%=1�31:�A(sy%,A%+3,�A%):�:�
2KݤW(L$,�Hy%):�H%,S%,I%,P%,hy%,g_%:ș&400DB,,,0,0,0,L$,0�,S%,I%:�S%>512�
33ș&2001E,6,,,S%�,,P%;hy%:�hy%�1��2,�A("ErrWin")
4
�P%=K%
5?�:�g_%I%:ș&400DB,,P%,g_%,g_%+I%,vl%,L$,0�,,g_%:�L$="Main"�
6>P%!68=&64+(&64<<16):P%!0=0:P%!4=0:P%!8=ay%:P%!&C=Uy%:�JJ%�
7*P%!48=�g:P%!44=-�d:P%!28=P%!28�(3<<29)
8.�P%!48=ay%:P%!44=-Uy%:P%!28=P%!28��(3<<29)
9�
:�:�L$="Setup"�va%=S%
;�L$="Addresses"�li%=S%
< �:�Ju%�L$<>"Banner"��wu(P%)
=!�L$="Addresses"��ty(P%!84,P%)
>:P%!64=h%:ș&400C1,,P%�gy%:Hy%=P%!72:�S%>512�ș30,7,,P%
?=gy%
@ ��zJ(hy%):�ty%,B%:�hy%<>JJ%�
APș30,6,,,4+88+32*22�,,ty%:!ty%=i%:ș&400CC,,ty%:B%=ty%+4:ș&400C3,,ty%:�hy%�
B*B%!48=�g:B%!44=-�d:B%!28=B%!28�(3<<29)
C.�B%!48=ay%:B%!44=-Uy%:B%!28=B%!28��(3<<29)
D5�:B%=i%:JJ%=hy%:ș&400C1,,ty%+4�i%:�r_%=B%�r_%=i%
E�Iy%�!ty%=i%:ș&400C5,,ty%
Fș30,7,,ty%
G�:�
8��_J(Bl%,S$):�Qy(Bl%,S$)�
8XȔK%!8,K%!&C:!K%=256:$(K%+44)="<Wimp$Scrap>"+�0:K%!36=-1:K%!16=2:ș&400E7,17,K%,K%!4
8�:�
8D��Vu(F%,X%,Y%):F%=�ly(K%+32,F%):�F%<>0�F%<>-1�ș&400E8,,F%,X%,Y%
8	�
8
7��ZJ:�Cy<>-1�K%!&C=K%!8:K%!8=0:ș&400E7,19,K%,K%!4
8�
8k��IJ:�du%,_%,U%:ș&400C8,,K%�du%:_%=K%!4-K%!20:U%=K%!16-K%!24:ȕdu%:�s_(!K%,_%,U%):ș&400CA,,K%�du%:�:�
8
^ݤZ_(S$,E%):�F%,A%,S%:F%=�S$:A%=�#F%+4:�#F%:A%+=E%:�S%A%:!S%=A%:S%!8=16:ș46,266,S%,S$:=S%
8G��k(q%,s%,c%,qy%,qa%):!J%=q%:�:s%+=c%:�s%<qy%�s%=qa%��s%>qa%�s%=qy%
8HJ%!4=s%:ș&400CE,,J%:�(J%!(8+16)>>&C)�&F=&F:�c%=1�c%=0�c%=��M(q%,s%)
8ș&400D2,q%,s%,,,-1,c%:�
8#ݤu(q%,s%):�o_%,`_%:�y(q%,s%)�
8�by(q%,s%,`_%,o_%)
83�!J%=q%:J%!4=s%:ș&400CE,,J%:o_%=(J%!24>>28)�&F
8
�:=o_%
8��g(q%,s%,o_%):�y(q%,s%)�
8�sy(q%,s%,-1,o_%)
8:�!J%=q%:J%!4=s%:J%!&C=&F<<28:J%!8=o_%<<28:ș&400CD,,J%
8�:�
8>ݤy(q%,s%):!J%=q%:J%!4=s%:ș&400CE,,J%:=((J%!24)�(1<<6))>0
8W��sy(q%,s%,`_%,o_%):�P%,A%:!J%=q%:J%!4=s%:ș&400CE,,J%:P%=J%!32:A%=�$P%,"F"):�A%>0�
8�`_%<>-1�?(P%+A%+1)=��~`_%
8�o_%<>-1�?(P%+A%)=��~o_%
8J%!8=0:J%!&C=0:ș&400CD,,J%
8�:�
8���by(q%,s%,�`_%,�o_%):�P%,A%:!J%=q%:J%!4=s%:ș&400CE,,J%:P%=J%!32:A%=�$P%,"F"):`_%=-1:o_%=-1:�A%>0�`_%=�("&"+�?(P%+A%+1)):o_%=�("&"+�?(P%+A%))
8 �
8!#ݤ_(q%,s%):�o_%,`_%:�y(q%,s%)�
8"�by(q%,s%,`_%,o_%)
8#3�!J%=q%:J%!4=s%:ș&400CE,,J%:`_%=(J%!24>>24)�&F
8$
�:=`_%
8%��D(q%,s%,`_%):�y(q%,s%)�
8&�sy(q%,s%,`_%,-1)
8':�!J%=q%:J%!4=s%:J%!&C=&F<<24:J%!8=`_%<<24:ș&400CD,,J%
8(�:�
8)B��R(q%,s%,hy%):�l%:l%=J%+64:�hy%=1�!J%=q%:J%!4=s%:ș&400CE,,J%
8*e!l%=q%:l%!4=s%:l%!8=(�hy%)<<23:l%!&C=1<<23:ș&400CD,,l%:�hy%=1�ș&400D1,q%,J%!8,J%!&C,J%!16,J%!20
8+�
8,MݤA_(q%,s%):�A%:!J%=q%:J%!4=s%:ș&400CE,,J%:�(J%!24�256)>0�A%=J%!32�A%=-1
8-=A%
8.=��Z(q%,s%,hy%):�A%:!J%=q%:J%!4=s%:A%=1:�hy%=-1�hy%=1:A%=0
8/,J%!8=hy%<<21:J%!&C=A%<<21:ș&400CD,,J%:�
80<ݤZ(q%,s%):!J%=q%:J%!4=s%:ș&400CE,,J%:=-((J%!24>>21)�1)
81=��M(q%,s%,hy%):�A%:A%=1:!J%=q%:J%!4=s%:�hy%=-1�hy%=1:A%=0
820J%!8=hy%*(1<<22):J%!&C=A%<<22:ș&400CD,,J%:�
83h��A(q%,s%,W$):�P%,L%:!J%=q%:J%!4=s%:ș&400CE,,J%:�J%!24�(1<<8)�P%=J%!28:L%=(J%!36)-1:�P%=J%+28:L%=&B
84-$P%=�W$,L%):J%!8=0:J%!&C=0:ș&400CD,,J%:�
85WݤM(q%,s%):�A$:!J%=q%:J%!4=s%:ș&400CE,,J%:�(J%!24�256)>0�A$=�N(J%!28)�A$=�N(J%+28)
86=A$
87Mݤqy(q%,s%):�A%:!J%=q%:J%!4=s%:ș&400CE,,J%:�(J%!24�256)>0�A%=J%!28�A%=-1
88=A%
892��G_(Zy%,I%):Zy%!(28+24*I%)=Zy%!(28+24*I%)�8:�
8:b��gy(Zy%,L%,H%):Zy%+=4+24*L%:�Zy%+=24:Zy%!8=Zy%!8�8:L%+=1:�((L%>H%)�(H%<>-1))�((!Zy%�&80)>0):�
8;`��W(Zy%,L%,H%):Zy%+=4+24*L%:�Zy%+=24:!Zy%=!Zy%��1:L%+=1:�((L%>H%)�(H%<>-1))�((!Zy%�&80)>0):�
8<]ݤPy(c$):�Zy%,zu%,Fy%:Zy%=�Ay(c$+"\0\1\2\3\4\5\6\7\8\9\10\11\12\13\14\15"):�Fy%=0�&F:Ȏ��
8=+�Fy%<4,Fy%=9,Fy%=&C,Fy%=&E,Fy%=&F:zu%=7
8>
zu%=0
8?5�:Zy%?(39+Fy%*24)=Fy%*16+zu%:�:�gy(Zy%,0,-1):=Zy%
8@�ݤAy(A$):�A%,B%,L%,Z$,I%:A$+="\":�A%4*�gy (A$)*24:B%=A%+4:Z$=�A$,�A$,"\")-1):$A%=Z$:A%!&C=&70207:A%!20=44:A%!24=0:L%=�Z$:A$=�A$,�A$,"\")+1):ȕ�A$,"\"):Z$=�A$,�A$,"\")-1):B%+=24:!B%=�Oy(Z$):B%!4=0:B%!8=&7000021
8A6�Z$,">")�B%!4=��Z$,�Z$,">")+1):Z$=�Z$,�Z$,">")-1)
8BQ�Z$>&B��I%�Z$+1:$I%=Z$:B%!8=B%!8�256:B%!&C=I%:B%!16=0:B%!20=I%+1�$(B%+&C)=Z$
8C�Z$>L%�L%=�Z$
8D7A$=�A$,�A$,"\")+1):�:!B%=!B%�&80:A%!16=L%*16+16:=A%
8E�ݤC(c$,i$,L%,H%):�M%,A%,C%,D%,Rl%,A$:�M%28+24* (H%-L%+1):!M%=�h(c$):M%!4=0:M%!8=0:Rl%=��A(c$):M%!&C=&70207:M%!20=44:M%!24=0:A%=M%+4:�C%=L%�H%:A%+=24:!A%=0:A%!4=0:A%!8=&7000121:A%!&C=�h(i$+�C%):A%!16=0:A%!20=0:D%=��A(i$+�C%):�D%>Rl%�Rl%=D%
8F-�:!A%+=&80:M%!28+=256:M%!16=Rl%*16+16:=M%
8G&��Y(M%,I%,S%):M%!(28+24*I%+4)=S%:�
8HݤOy(�Z$):�A%,F%:�:Ȏ��Z$�
8I�"�":A%+=1:Z$=�Z$,2)
8J�"_":A%+=2:Z$=�Z$,2)
8K�"*":A%+=8:Z$=�Z$,2)
8L
F%=-1
8M
�:�F%:=A%
8N:ݤgy(A$):�A%:ȕ�A$,"\"):A%+=1:A$=�A$,�A$,"\")+1):�:=A%
8O7ݤVy(A%):�H%:A%+=4:�A%+=24:H%+=44:�(!A%�2)>0�H%+=24
8P�(!A%�&80)>0:=H%+96
8Q�ݤzy(Zy%,ca%,W$,Za%,n$):�Si%,g_%:�Si%Za%+1,g_%� (n$)+1:$Si%=W$:$g_%=n$:Zy%+=28+24*ca%:!Zy%=!Zy%�4:Zy%!8=Zy%!8�256:Zy%!&C=Si%:Zy%!16=g_%:Zy%!20=Za%:=Si%
8ReݤMy(Zy%,u$):�A%,B%:B%=Zy%+28:ȕ(u$<>�J(Zy%,A%))�(!B%�&80)=0:A%+=1:B%+=24:�:�u$<>�J(Zy%,A%)�A%=-1
8S=A%
8T��T(M%,I%,F%):�F%<>0�
8U'M%!(36+24*I%)=M%!(36+24*I%)�(1<<22)
8V)�M%!(36+24*I%)=M%!(36+24*I%)��(1<<22)
8W�:�
8X;ݤJ(M%,I%):M%+=28+24*I%:�(M%!8�256)>0�M%=M%!&C�M%=M%+&C
8Y=�N(M%)
8ZW��S(M%,I%,F%):�F%<>0�M%!(28+24*I%)=M%!(28+24*I%)�1�M%!(28+24*I%)=M%!(28+24*I%)��(1)
8[�
8\ݤ`y(M%):�M%!28>&80�M%=!M%
8]=�N(M%)
8^X��g_(M%,I%,F%):�F%<>0�M%!(28+24*I%)=M%!(28+24*I%)�2�M%!(28+24*I%)=M%!(28+24*I%)��(2)
8_�
8`ݤr(A%)=A%-A%�4
8aݤf(A%)=A%-A%�2
8b%ݤDy:ș&400CF,,J%:=(((J%!8)�1)=1)
8c*ݤj:�A%:ș6,&A1,&DC�,,A%:=(A%�&80)=&80
8d'��My(F%):�A%:ș6,&A1,&DC�,,A%:ȎF%�
8e�0:A%=A%��&80
8f�1:A%=A%�&80
8g�-1:A%=A%�&80
8h�:ș6,&A2,&DC,A%:�
8i7ݤd:�A%,B%:ș53,-1,&C�,,A%:ș53,-1,5�,,B%:=(A%<<B%)
8j'ݤHy(M%):�A%:ș53,M%,5�,,A%:=(A%=1)
8kHݤw(H%,S%,F%):�P%,E%,V%,L%,T%:ș&2001D,2,H%,,S%�E%,,P%;V%:�(V%�1)=1�
8l�F%�
8m<P%=�Wy:�p(H%,(S%�P%)*P%-P%*((S%�P%)>0),�):P%=�w(H%,S%,�)
8n�ș43,E%
8o�
8p	�:=P%
8qW��fu(H%,�B%,S%,F%):�L%,E%,V%,T%,P%:ș&2001D,4,H%,B%,S%�E%,,B%;V%:V%=((V%�1)=1):Ȏ��
8r�V%��F%:ș43,E%
8s-�V%�F%�(S%>0):�p(H%,S%,�):�fu(H%,B%,S%,�)
8t�V%�F%�(S%<0)
8uɬV%�F%�(S%<0):�p(H%,-1,�)
8v�:�
8w>��Ly(H%,B%,F%):�A%,hy%:ș29,3,H%,B%�A%;hy%:�F%��p(H%,-1,�)
8x�
8y��p(H%,S%,F%):�P%:�F%�
8z
�S%<0�
8{�ș&2001D,5,H%,,-32*&400*&400:S%=H%!&C+H%-&8000:P%=�Wy:ș&400EC,-1,-1�F%:F%=�l(((S%�P%)*P%-P%*((S%�P%)>0))-F%):ș29,5,H%,,((S%�P%)*P%-P%*((S%�P%)>0))-S%
8|(�:E%=`u%:F%=�l(S%):ș29,5,H%,,`u%-E%
8}�
8~�ș29,5,H%,,S%
8�:�
8���c_(H%,S%):�S%=-1�S%=`u%
8�ș29,0,H%,,S%:�
8�'��bJ:ș&61504,C_%:ș&2001E,7,,C_%:�
8�X��JJ(k$):�F%:ș&2001E,6,,,17+�k$�,,C_%;F%:�F%�1��2,"Not enough memory for messages."
8�($(C_%+16)=k$:ș&41501,C_%,C_%+16,0:�
8�jݤA(Q$):�F%,L%:ș&61502,C_%,Q$,J%,256�,,,L%;F%:�F%�1�2,"Can't get message '"+Q$+"' from Messages file"
8�J%?L%=&D:=$J%
8�dݤh(Q$):�F%,P%:ș&61502,C_%,Q$,0�,,P%;F%:�F%�1�2,"Can't get message '"+Q$+"' from Messages file"
8�=P%
8��ݤO(Q$,A$,Z$,F$,Ay$):�F%,L%:ș&61502,C_%,Q$,J%,256,A$,Z$,F$,Ay$�,,,L%;F%:�F%�1�2,"Can't get message '"+Q$+"' from Messages file"
8�J%?L%=&D:=$J%
8�Dݤay(Q$,L%,H%,Z$,A$):�M$,A%:�A%=L%�H%:M$+=Z$+�A(Q$+�A%)+A$:�:=M$
8�1ݤm(a%,Q%,gi%,yi%,x%,n%):�x%<0�gi%+=x%:x%=-x%
8��n%<0�yi%+=n%:n%=-n%
8�8=((a%>=gi%)�(a%<=(gi%+x%))�(Q%>=yi%)�(Q%<=(yi%+n%)))
8�ݤWy:�P%:ș81�P%:=P%
8�Nݤfy:�I$,I%:ș16�I$:I%=�I$," -quit "):�I%�I$=�I$,�I$," ",I%+�" -quit ")+1)
8�=I$
8�8ݤC_(A$):�L%:ș35,A$,J%,&FF,0,3�,,L%:J%?L%=0:=�N(J%)
8�Yݤb(A$):�L%,F%:ș&20023,A$,J%,&FF,0,3�,,L%;F%:�(F%�1)=0�J%?L%=0:�N(J%)<>""�F%=��F%=�
8�=F%
8�Jݤl(M%):�S%:ș&400EC,-1,-1�S%:ș&400EC,S%+M%,-1�S%:`u%=S%-(�-&8000):=�
8�?ݤN(P%):�A$:ȕ?P%<>0�?P%<>&D�?P%<>&A:A$+=�(?P%):P%+=1:�:=A$
8�:��gJ(gy%):!J%=256:J%!&C=0:J%!16=0:ș&400E7,17,J%,gy%:�
8�Dݤv(A$):�A%,C%:�A%=1��A$:C%=��A$,A%,1):�C%>=97�C%<=&7A�C%=C%��32
8��A$,A%)=�(C%):�:=A$
8�7ݤg:�A%,B%:ș53,-1,&B�,,A%:ș53,-1,4�,,B%:=(A%<<B%)
8�X��B(My$):!J%=&FF:$(J%+4)=My$+�0:ș&400DF,J%,17+(1<<8)+(1<<9),"Message from "+H$,w$:�
8�\ݤ_y(A$,R%):!J%=0:$(J%+4)=A$:ș&400DF,J%,23-4*�R%+(1<<8),"Message from "+H$,w$�,R%:=R%-2
8�&ݤey(c%,r%,Q%):=(�L(c%,r%,Q%)+1)�2
8�pݤL(c%,r%,Q%):�Xu%:Qy%=Q%-&77D:Xu%=Qy%*365:Xu%+=Qy%�4-(Q%-&76C-1)�&64+(Q%-&640-1)�400:ȕ(r%-1)>0:r%-=1:Ȏr%�
8��1,3,5,7,8,&A,&C:Xu%+=31
8��4,6,9,&B:Xu%+=30
8��2:Xu%+=28-�By(Q%)
8��:�:=Xu%+c%
8�#ݤH(c%,r%,Q%):=�`(�L(c%,r%,Q%))
8�ݤD(r%,Q%):�c%:Ȏr%�
8��1,3,5,7,8,&A,&C:c%=31
8��4,6,9,&B:c%=30
8��2:c%=28-�By(Q%)
8�	�:=c%
8�.ݤBy(Q%)=((Q%�4=0)��(Q%�&64=0))�(Q%�400=0)
8����P(�d%,�z%,�e%,uy%,Hu%,Qy%):�ii%,wa%,U%:ii%=d%:wa%=z%:U%=e%:d%+=uy%:z%+=Hu%:e%+=Qy%:ȕz%<1:z%+=&C:e%-=1:�:ȕz%>&C:z%-=&C:e%+=1:�:ȕd%<1:z%-=1:�z%<1�z%=&C:e%-=1
8�Hd%+=�D(z%,e%):�:ȕd%>�D(z%,e%):d%-=�D(z%,e%):z%+=1:�z%>&C�z%=1:e%+=1
8�*�:�e%<&77d�e%>&fff�d%=ii%:z%=wa%:e%=U%
8��
8�ݤ`(j%):=((j%-1)�7)+1
8�OݤU(c%,r%,Q%,TJ%):=�t(�L(c%,r%,Q%),TJ%)+", "+�wy(c%)+" "+�X(r%,TJ%)+" "+�Q%
8����Y_:�C%,P%,C,F,w,Z,M,B,W,Q,a,J,U:�C%&90:C=&D:F=&E:w=&F:Z=2:M=3:B=4:W=5:Q=0:a=1:J=6:U=7:�S%=0�2�2:P%=C%:[OPTS%:.T CMP W,#0:RSBLT W,W,#0:SUBLT M,M,W:CMP B,#0:RSBLT B,B,#0:SUBLT Z,Z,B:ADD U,Z,B:LDR J,[Q,#28]:CMP U,J:BLT N:LDR J,[Q,#36]:CMP Z,J:BGT N
8��LDR J,[Q,#32]:ADD U,M,W:CMP U,J:BLT N:LDR J,[Q,#40]:CMP M,J:BGT N:CMP a,#0:MVNEQ0,#1:�Qpc,F:B q:.N MOV0,#0:MOVpc,F:.q MOV1,Z:MOV2,M:MOV0,#4:SWI 69:MOV1,B:MOV2,W:MOV0,#96+1:SWI 69:MVN0,#1:MOVpc,F:]�:�
8�*ݤF(C%,D%,E%,F%):�A%,B%:A%=K%:B%=0:=�T
8�+��d(C%,D%,E%,F%):�A%,B%:A%=K%:B%=1:�T:�
8�B��X(q%):!J%=q%:ș&400C6,,J%:�q%=r_%�Tu%=�:!J%=v_%:ș&600C6,,J%
8��q%=i%�Iy%=�
8��
8�@��wu(B%):�N%,A$,Wy%,l%:N%=B%!84:B%+=88:ȕN%:�((B%!16)�64)>0�
8��A$=$(B%!24):l%=�("&"+�A$,�A$,"F")+1,1)):Wy%=�("&"+�A$,�A$,"F")+2,1)):B%!16=B%!16��(64+(&FF<<24)):B%!16=B%!16�(Wy%<<24)�(l%<<28)
8��:B%+=32:N%-=1:�:�
8�=��N(q%,a_%,M_%,G_%,oy%):ș&400D1,q%,a_%,oy%,G_%+2,M_%+4:�
8����z(q%,dJ%,al%):�W%,H%,X%,Y%,Z%:!J%=q%:ș&400CB,,J%:X%=36*((J%!32>>28)�1):Y%=36*((J%!32>>26)�1)-36*((J%!32>>30)�1):W%=J%!&C-J%!4+X%:H%=J%!16-J%!8+Y%:�al%=-1�
8�JJ%!4=�g/2-W%/2:J%!&C=J%!4+W%:J%!16=�d-((�d-&84)-H%)/2-Y%:J%!8=J%!16-H%
8�
�:�al%=1�
8�;ȗX%,Y%,Z%:J%!4=X%-64:J%!&C=J%!4+W%:J%!8=Y%-H%:J%!16=Y%
8��
8��:�dJ%<>0�J%!28=dJ%
8�ș&400C5,,J%:�q%=i%�Iy%=�
8�6�q%=r_%�Tu%=�:!K%=r_%:ș&400CB,,K%:K%!28=J%!28:�F_
8��
8�G��wy(ei%,q%,a%,Q%,wl%,Ji%,Pi%):�v_%<>0�v_%<>q%�!J%=v_%:ș&600C6,,J%
8�Av_%=q%:r_%=ei%:Gl%=a%:zl%=Q%:Tu%=wl%:ul%=Ji%:ml%=Pi%:�v_%<>0�
8�w!J%=v_%:ș&400CB,,J%:Da%=J%!&C-J%!4:La%=J%!16-J%!8:!J%=r_%:ș&400CB,,J%:J%!4+=a%:J%!16+=Q%:�wl%�!J%=q%:ș&400C5,,J%
8��:�
8���F_:�v_%<>0�!K%=r_%�
8�i!J%=v_%:J%!4=K%!4+Gl%:J%!16=K%!16+zl%:J%!&C=J%!4+Da%:J%!8=J%!16-La%:J%!20=0:J%!24=0:J%!28=K%!28:�ul%�
8�AJ%!4-=K%!20:J%!&C-=K%!20:�J%!4<K%!4�J%!20=K%!20-Gl%:J%!4=K%!4
8��J%!&C>K%!&C�J%!&C=K%!&C
8��:�ml%�
8�GJ%!16-=K%!24:J%!8-=K%!24:�J%!16>K%!16�J%!24=K%!16-J%!16:J%!16=K%!16
8��J%!8<K%!8�J%!8=K%!8
8��:ș&400C5,,J%:K%!28=v_%
8��:�
8�-��jJ:�A%:�vl%256:�A%=0�256�4:vl%!A%=0:�:�
8�3��tu(ta%,b$):vl%=-1:ș&400D9,,b$:�ju:ș&400DA:�
8�$��f(W%,Hy%,A$,mJ%):$Hy%=A$:�mJ%�
8�=!K%=W%:ș&400CB,,K%:ș&400D1,-1,K%!4,K%!16,K%!&C,K%!16+44
8��:�
8� ��V(B%,F%):ș&400F3,,B%,F%:�
8�9ݤP(b$,W%,H%):�F%:ș&40081,,b$,16*W%,16*H%,0,0�F%:=F%
8���U(H%):ș&40082,H%:�
8�*��fy(�X%,�Y%):ș&40088,,X%,Y%�,X%,Y%:�
8ڻ��L(gy%,W$,zu%,a%,Q%):�a_%,oy%,G_%,M_%,ZJ%:ș&4008A,gy%:ș&40097,,W$�,a_%,oy%,G_%,M_%:ș&40088,,a_%,oy%�,a_%,oy%:ș&40088,,G_%,M_%�,G_%,M_%:ZJ%=G_%+a_%:�zu%=0�a%-=ZJ%/2��zu%>0�a%-=ZJ%
8�A�F(a%,Q%-M_%+oy%,ZJ%,M_%-oy%)�ș&40086,gy%,W$,1<<4,a%,Q%-M_%
8��
8���jy(gy%,W$,Ta%,ri%,a%,Q%,`%):�a_%,oy%,G_%,M_%,ZJ%:!J%=0:J%!4=-`%<<16:J%!8=`%<<16:J%!&C=0:J%!16=0:J%!20=0:ș&4008A,gy%:ș&40097,,W$�,a_%,oy%,G_%,M_%:ș&40088,,a_%,oy%�,oy%,a_%:ș&40088,,G_%,M_%�,M_%,G_%:�Ta%=0�a%-=`%*G_%/2��Ta%=`%�a%-=`%*G_%
8�,�ri%=0�Q%+=`%*M_%/2��ri%=-`%�Q%-=ri%*M_%
8�.ș&40086,gy%,W$,(1<<4)+(1<<6),a%,Q%,0,J%:�
8�-��c(Pl%,W$,_%,U%,x%,n%):�F(_%,U%,x%,n%)�
8��A%,gy%,a_%,oy%,G_%,M_%,ZJ%,mi%,Ol%,_l%:ș&4008A,Pl%:gy%=Pl%:ș&40097,Pl%,W$�,a_%,oy%,G_%,M_%:ș&40088,,G_%+a_%,M_%+oy%�,ZJ%,mi%:�ZJ%>x%�
8�ș&40083,Pl%,J%�,,Ol%,_l%:ȕZJ%>x%:Ol%=Ol%*0.95:_l%=_l%*0.95:ș&40081,,J%,Ol%,_l%:ș&40097,,W$�gy%,a_%,oy%,G_%,M_%:ș&40088,,G_%+a_%,M_%+oy%�,ZJ%,mi%:�ZJ%>x%�ș&40082,gy%
8��
8�4�:ș&40086,,W$,1<<4,_%,U%:�gy%<>Pl%�ș&40082,gy%
8��:�
8����Cy(a%,Q%,x%,n%,`%):�a%+`%,Q%:�BYx%-2*`%,0:�BY`%,-`%:�BY0,-n%+2*`%:�BY-`%,-`%:�BY-x%+2*`%,0:�BY-`%,`%:�BY0,n%-2*`%:�a%+`%,Q%-`%:�BY0,`%:�&A1,-`%,-`%:�a%+x%-`%,Q%-`%:�BY`%,0:�&A1,-`%,`%:�a%+x%-`%,Q%-n%+`%:�BY0,-`%
8�5�&A1,`%,`%:�a%+`%,Q%-n%+`%:�BY-`%,0:�&A1,`%,-`%:�
8�
��YJ:�
8���uu:ȎBi%�
8��3:�r_(vJ%)
8��:�
8���x:vJ%=-1:Bi%=-1:�Bu%�
8�vJ%=�iy(_J%):�vJ%<>-1�Bi%=3
8���sJ
8��:�
8���Q_(Lu%):ȎZ%(Lu%)�
8�
�2:�eu
8�
�3:�ku
8��:�
8�'��oy(y%,_%,U%):ș&400E6,0:ȎZ%(t%)�
8��2:�`_(v%,y%,_%,U%)
8��5:�oJ(v%,y%,_%,U%)
8��1:�CJ(v%,y%,_%,U%)
8��3:�h_(v%,y%,_%,U%)
8��:�
8�ݤny(s%,By%):ȎZ%(t%)�
8��2:o%=�sy(s%,By%)
8��5:o%=�my(s%,By%)
8��1:o%=�by(s%,By%)
8��3:o%=�G_(s%,By%)
8�	�:=o%
9��hu(l%,A%):ȎZ%(A%)�
9�2:�f_(l%,A%)
9�5:�QJ(l%,A%)
9�1:�k_(l%,A%)
9�3:�_u(l%,A%)
9�:�
9ݤL_(S%):�Cl%:ȎZ%(S%)�
9�2:Cl%=�yy
9�5:Cl%=�Ry
9	�1:Cl%=�X_
9
�3:Cl%=�J_
9
�:=Cl%
9��my(Lu%):ȎZ%(Lu%)�
9
�2:�C_
9
�3:�kJ
9�:�
9'��iy(g%,y%,a%,Q%,i_%,qJ%):ȎZ%(t%)�
9�2:�q_(g%,y%,a%,Q%,i_%,qJ%)
9�5:�y_(g%,y%,a%,Q%,i_%,qJ%)
9�1:�Uu(g%,y%,a%,Q%,i_%,qJ%)
9�3:�zu(g%,y%,a%,Q%,i_%,qJ%)
9�:�
9��K_(p%):ȎZ%(t%)�
9
�2:�j(p%)
9�5:�Vy(p%)
9�1:�Ry(p%)
9�3:�Qy(p%)
9�:�
9$��XJ(q%,s%,g%,Yy%,ry%):ȎZ%(t%)�
9�2:�Sl(q%,s%,g%,Yy%,ry%)
9�:�
9'ݤcy(q%,s%,By%):�A%:�A%=1�B_%:�o%�
9 
ȎZ%(A%)�
9!�2:o%=�xy(q%,s%,By%)
9"�5:o%=�B_(q%,s%,By%)
9#�1:o%=�ry(q%,s%,By%)
9$�3:o%=�P_(q%,s%,By%)
9%�
9&�:�:=o%
9'��TJ:�Tu:�Su:�ru:�nJ:�
9( ��xJ:�A%:�A%=1�B_%:ȎZ%(A%)�
9)�2:�AJ(A%)
9*�5:�Du(A%)
9+�1:�BJ(A%)
9,�3:�d_(A%)
9-	�:�:�
9.��su:�DJ:�O_:�pJ:�
9/r��qu(w%):�#w%,"Address book":�iu(w%):�#w%,"Anniversary":�wJ(w%):�#w%,"Calendar":�v_(w%):�#w%,"Diary":�Bu(w%):�
90��GJ(Sy$,w%):ȎSy$�
91�"Address book":�gu(w%)
92�"Anniversary":�Ju(w%)
93�"Calendar":�eJ(w%)
94�"Diary":�fJ(w%)
95�:�
96��aJ(q%,s%,g%,a%,Q%):Ȏq%�
97�A%(2):�Zl(q%,s%,g%,a%,Q%)
98�A%(3):�qJ(q%,s%,g%,a%,Q%)
99�A%(4):�du(q%,s%,g%,a%,Q%)
9:�A%(5):�Gu(q%,s%,g%,a%,Q%)
9;�:�
9<ݤdy(q%,s%,By%):Ȏq%�
9=�A%(2):o%=�Iy(q%,s%,By%)
9>�:=�
9?��vJ(l%):ȎTy%�
9@�A%(2):�j_(l%,Ty%)
9A�A%(3):�SJ(l%,Ty%)
9B�A%(4):�NJ(l%,Ty%)
9C�A%(5):�iJ(l%,Ty%)
9D�:�
9E6��Xu:�e_(A%(2)):�tJ(A%(3)):�Ou(A%(4)):�mu(A%(5)):�
9F6��au:�l_(A%(2)):�Wu(A%(3)):�KJ(A%(4)):�nu(A%(5)):�
9G��dJ(Zy%,l%):ȎZ%(t%)�
9H�3:�A_(Zy%,l%)
9I�:�
9J���Tu:zJ%=�C("Paste","Paste",1,&A):Gy%=-1:J$="":X$="mailto:":U$="http://":V$="Important numbers":uJ%=-1:Zl%=�C("Import","Import",1,5):l_%=�C("ABM","ABM",1,6):�Y(l_%,3,zJ%):C$="":dy%=-1:YJ%=0:c_%=-1:O$="":Fl%=-1:Jl%=0:`J%=0:P_%=16
9K�Xy%=3::::d_%=2:h_%=-1:�M%(26),F%(26),A$(&A,&E),Z$(P_%-1,1),L%(&A,1),Ai%16,G%(&E):G%()=7:G%(0)=5:L%()=-1:$Ai%="Pptr_hyper,12,0"+�0:M%(0)=1:iy%=0:x$=Y$+"Addresses":f$=Y$+"Important":�
9Lݤyy=l_%
9ME��AJ(A%):B%(A%)=0:W%(A%)=26:S%(A%)=0:M$(A%)=�A("AddTab"):�t_:�a:�
9N.��C_:�v%=0��R_(i%,Cy%,wy%,-m%-Y_%,Iy%,�,�)
9O�
9P��eu:�dy:�w_%=0��Oy
9Q�
9R���`_(v%,y%,_%,U%):�Ll%,A%,A$,G%,Sy%,F%,Q%,a%,B%,C%,b%,yJ%,D%,E%,_u%,Li%,RJ%,WJ%:WJ%=�r((k%-(Xy%+2)*24)/Xy%):Ll%=�P("Homerton.Medium",&A,&A):Sy%=Y_%:ș&400E6,7:ș&400F3,,0,7:�(y%=0)�v%>0��I(0,_%,U%)
9Sa%=_%+y%*(u%-40):�y%=0�
9TWA%=0:ȕA%<v%:ș&400E6,7:�a%,U%-Sy%*(A%+1),a%+40,U%-Sy%*(A%+1):�M%(A%)=0�py%=2�py%=5
9U,ș&400F3,,0,py%:�A%=0�A$="+"�A$=�(64+A%)
9Vdș&40086,Ll%,A$,1<<4,a%+&C,U%-Sy%*A%-Sy%+&A:A%+=1:�:�v%>0�ș&400E6,7:�a%+40,U%,a%+40,U%-Sy%*(v%)
9W$�:A%=v%:�A%=0�A$="+"�A$=�(64+A%)
9X�ș&400E6,7:�a%+40,U%-Sy%*(A%+1):�BY-40,0:�a%,U%-k%:ș&40086,Ll%,A$,1<<4,a%+&C,U%-Sy%*A%-Sy%+&A:A%+=1:ȕA%<27:ș&400E6,7:�a%,U%-Sy%*(A%+1),a%+40,U%-Sy%*(A%+1):�M%(A%)=0�py%=2�py%=5
9Y,ș&400F3,,0,py%:�A%=0�A$="+"�A$=�(64+A%)
9ZEș&40086,Ll%,A$,1<<4,a%+&C,U%-Sy%*A%-Sy%+&A:�M%(A%)>0�A%>v%�F%=-1
9[A%+=1:�
9\0�:�y%=1�(F%�M%(v%)-iy%>2*Xy%)��I(1,a%-u%,U%)
9]�v%<>0�
9^!�y%=0�(y%=1�iy%+Xy%<=M%(v%))�
9_�_u%=�P("Trinity.Bold",&E,&E):A%=iy%+y%*Xy%:a%=_%-(40*(y%=0))+&c:ȕA%<M%(v%)�B%<Xy%:Q%=U%-24*(B%+1)-WJ%*B%:�F(a%,Q%,cJ%,-WJ%)�
9`Vș&400E6,4:�Cy(a%,Q%,cJ%,WJ%,&c):b%=A%�(Xy%*2):A$="":�A$(b%,1)<>""�A$=A$(b%,1)+" "
9alA$+=A$(b%,0):�V(0,G%(1)):�c(_u%,A$,a%+&C,Q%-40,cJ%-&C,40):D%=0:�C%=2�&E:D%-=(A$(b%,C%)<>""):�:�D%<5�D%=5
9b5Sy%=�r((WJ%-48)/D%):C%=Sy%/3:�Sy%>30�Sy%=30:C%=&C
9c�Li%=�P("Homerton.Medium.Oblique",C%-2,C%-2):RJ%=�P("Trinity.Medium",C%,C%):G%=1:�C%=2�8:�A$(b%,C%)<>""�G%+=1:�V(0,G%(C%)):�c(RJ%,A$(b%,C%),a%+48,Q%-42-Sy%*(G%-1),cJ%-48,Sy%)
9d,�:Q%-=WJ%-&E:�C%=&E�9�-1:�A$(b%,C%)<>""�
9e�A$=�A("Fld"+�(C%-8))+":":ș&400F3,,0,G%(0):ș&4008A,Li%:ș&40097,,A$�,D%,,F%:ș&40088,,F%-D%�,D%:ș&40086,,A$,1<<4,a%+92-D%,Q%-4:ș&400F3,,0,G%(C%):�c(RJ%,A$(b%,C%),a%+&64,Q%-4,cJ%-&64,Sy%+4):Q%+=Sy%:�C%>=&D��b_(b%,C%,a%+&64,Q%-4,cJ%-&64,Sy%+4)
9f�:�:�U(RJ%):�U(Li%)
9g�:A%+=1:B%+=1:�:�U(_u%)
9h�
9i�:�y%=0�
9j�_u%=�P("Trinity.Bold",16,16):ș&400E6,4:�V(0,7):b%=u%-2*&c:�Cy(a%+&c,U%-24,b%,k%-2*24,2*&c):�L(_u%,V$,0,_%+u%/2,U%-24-&C):�U(_u%):yJ%=&E:RJ%=�P("Trinity.Medium",yJ%,yJ%):Sy%=(k%-2*24-68-2*&c)/P_%:Q%=U%-24-68:a%=_%+&c:ș&400E6,1
9k��a%+48,Q%-Sy%*P_%,a%+b%-48,Q%-Sy%*P_%:�A%=0�P_%-1:ș&4008A,RJ%:ș&400E6,1:�a%+48,Q%-Sy%*A%,a%+b%-48,Q%-Sy%*A%:�F(a%,Q%-Sy%*A%,b%,-Sy%)�Z$(A%,0)+Z$(A%,1)<>""�
9l�ș&40097,,Z$(A%,0)+"  "�,B%,C%,D%,E%:B%=D%-B%:�fy(B%,E%):ș&40097,,Z$(A%,1)�,C%,F%,D%:C%=D%-C%:�fy(C%,F%):�B%+C%>b%-24�E%-F%>Sy%�
9mJ�Sy%/(E%-F%)<(b%-24)/(B%+C%)�F%=yJ%*Sy%/(E%-F%)�F%=yJ%*(b%-24)/(B%+C%)
9n;C%=C%*F%/yJ%:E%=E%*F%/yJ%:F%=�P("Trinity.Medium",F%,F%)
9o�F%=RJ%
9p�:�E%=0�F%=0�E%=E%+F%
9qș&40086,,Z$(A%,0),1<<4,a%+&C,Q%-Sy%*(A%+0.5)-E%/2:ș&40086,,Z$(A%,1),1<<4,a%+b%-C%-&C,Q%-Sy%*(A%+0.5)-E%/2:�F%<>RJ%��U(F%)
9r�:�
9s�
9t�:�U(Ll%):�
9u%��f_(l%,cl%):�A%,B%:B%=dy%:Ȏ!l%�
9v=�0:�A%=9�23:�A(Cy%,A%,A$(B%,A%-9)):�:�R(Cy%,25,0):�Q(0,0)
9wJ�1:�A%=9�23:�A(Cy%,A%,A$(B%,A%-9)):�:C$="":dy%=-1:�Q(0,0):�R(Cy%,25,1)
9x�2:�_y:�M%(v%)>0�
9y�M%(v%)<=iy%�iy%-=2*Xy%
9z�Q(v%,iy%):mJ%=�
9{��Q(0,0)
9|�
9}�3:�l%!4>=0�d_%=l%!4
9~
�v%=0�
9%�A%=0�&E:A$(B%,A%)=�M(Cy%,A%+9):�
9��:Ȏd_%�
9� �0:�q(A$(B%,1)+" "+A$(B%,0))
9��1:�A%=2�8:�q(A$(B%,A%)):�
9�8�2:�q(A$(B%,1)+" "+A$(B%,0)):�A%=2�8:�q(A$(B%,A%)):�
9�9�9:�q(A$(B%,1)+" "+A$(B%,0)):�A%=2�&E:�q(A$(B%,A%)):�
9��q(A$(B%,d_%+6))
9��
9��4:�Gy(U$+A$(dy%,&E)):uJ%=1
9��5:�Gy(X$+A$(dy%,&D)):uJ%=2
9��:�
9�l��py:�A%:A%=(dy%<0):�B%=0�3:�T(l_%,B%,A%):�:�A%=0�9:�S(zJ%,A%,d_%=A%):�:�B%=4�5:�T(l_%,B%,1):�:�dy%<>-1�
9��b("Alias$URLOpen_HTTP")�
9��T(l_%,4,A$(dy%,&E)="")
9�"�:�b("Alias$URLOpen_MailTo")�
9��T(l_%,5,A$(dy%,&D)="")
9��
9���T(l_%,4,1):�T(l_%,5,1)
9��:�
9���j(p%)�A%:A%=v%:�p%=1�
9��M%(v%)<=iy%+Xy%*2�
9�-�A%+=1:�A%>26�M%(A%�27)>0:�A%<27��Q(A%,0)
9���Q(v%,iy%+Xy%*2)
9��
9��:�iy%=0�v%>0�
9�7�A%-=1:�M%(A%)>0:�Q(A%,M%(A%)-1-(M%(A%)-1)�(Xy%*2))
9���v%>0��Q(v%,iy%-Xy%*2)
9��:�v%=0��Q(0,0)
9��:�
9�U��q_(g%,y%,a%,Q%,i_%,qJ%):�b%,A%,B%,X%,Y%,WJ%:WJ%=�r((k%-(Xy%+2)*24)/Xy%):�y%<>0�
9�X%=&c:�a%>u%-40�g%<>2�
9�b%=-Q%�Y_%:�b%<27�b%>v%�
9��v%=0�O$=C$:Fl%=dy%:Jl%=YJ%
9��M%(b%)>0��Q(b%,0)
9��
9��
9��:X%=&c+40:�a%<40�g%<>2�
9�b%=-Q%�Y_%:�b%<v%�
9��b%=0�C$=O$:dy%=Fl%:YJ%=Jl%
9��M%(b%)>0��Q(b%,0)
9��
9��
9��:�v%>0�
9�pA%=0:B%=-1:Y%=-24:y%=�(y%):C$="":dy%=-1:ȕA%<Xy%�A%+iy%+Xy%*y%<M%(v%):�m(a%,Q%,X%,Y%,cJ%,-WJ%)�B%=A%+Xy%*y%
9�Y%-=WJ%+24:A%+=1:�:�B%>=0�
9�:C$=�s(A$(B%,0)+" "+A$(B%,1)):dy%=B%:YJ%=B%+iy%:�g%<>2�
9�:�A%=9�23:�A(Cy%,A%,A$(B%,A%-9)):�:�R(Cy%,25,0):�Q(0,0)
9��
9��
9���y%=0�g%<>2�
9�CSy%=(k%-2*24-68-2*&c)/P_%:Y%=-(Q%+24+68-Sy%)/Sy%:�Y%>0�Y%<=P_%�
9�h`J%=Y%:�A(__%,3,Z$(Y%-1,0)):�A(__%,4,Z$(Y%-1,1)):ȗX%,Y%,A%:ș&400D4,,__%,i_%+`y%,Y%:�C(__%,3):VJ%=�
9��
9��
9��:�g%=2��py
9��
9���Sl(q%,s%,g%,a%,Q%):Ȏq%�
9��Cy%:�g%<>2�
9�	Ȏs%�
9��24:�y(g%=4):�a
9��25:�_y:�a:�C(Cy%,9)
9��26:�a:�C(Cy%,9)
9�#�-1,0,1,2,3,4,5,6,7,8:�C(i%,-1)
9��
9�!��py:�F(l_%,Yy%-64,ry%,q%,s%)
9��
9��__%:Ȏs%�
9�
�5:�yy
9��6:ș&400D4,,-1:`J%=0
9�*�7:�A(__%,3,""):�A(__%,4,""):�C(__%,3)
9��
9��:�
9�ݤsy(s%,By%):o%=�:ȎBy%�
9��414:�j(-c_%)
9��415:�j(c_%)
9�/�43,461:�v%>0�C$=O$:dy%=Fl%:YJ%=Jl%:�Q(0,0)
9�.:�By%>=97�By%<=&7A�L%=By%-32-64�L%=By%-64
9��L%>0�L%<28�
9��v%=0�O$=C$:Fl%=dy%:Jl%=YJ%
9��M%(L%)>0��Q(L%,0)
9�	�o%=�
9��
9�	�:=o%
9�ݤxy(q%,s%,By%):o%=�:Ȏq%�
9��Cy%:ȎBy%�
9�"�396:�wJ%=�z��k(q%,s%,-1,9,23)
9�!�397:�wJ%=�z��k(q%,s%,1,9,23)
9�&�398,&D,394:�s%=23�By%=&D��y(�):�a
9��414:�j(-c_%)
9��415:�j(c_%)
9��461:�y(�):�a
9��83-64:�C(Cy%,9)
9��70-64:�C(Cy%,&A)
9��65-64:�C(Cy%,&B)
9��84-64:�C(Cy%,18)
9�$�88-64:�dy%<>-1��_y:�a:�C(Cy%,9)
9��69-64:�C(Cy%,22)
9��87-64:�C(Cy%,23)
9�	o%=�
9��
9��__%:�By%=&D�s%=4��yy�o%=�
9�*�Gy%:�Gy%<>-1�s%=70��_(J$,��M(Gy%,59))
9�	o%=�
9�	�:=o%
9�^��iu(w%):�A%:�#w%,V$:�#w%,Xy%:�#w%,d_%:�#w%,c_%+5:�#w%,X$:�#w%,U$:�A%=0�&E:�#w%,G%(A%):�:�
9�^��gu(w%):�A%:V$=�#w%:Xy%=�#w%:d_%=�#w%:c_%=�#w%-5:X$=�#w%:U$=�#w%:�A%=0�&E:G%(A%)=�#w%:�:�
9�"��Zl(x%,Fy%,l%,a%,Q%):�A%:Ȏ��
9�6�(Fy%>=3�Fy%<=7)�Fy%=&C�Fy%=&D:�g%<>2��Z(x%,Fy%,1)
9�;�Fy%=9:�A%=0�9:�S(zJ%,A%,d_%=A%):�:�F(zJ%,a%,Q%,x%,Fy%)
9�M�Fy%>=22�Fy%<=36:�A%=0�&E:�S(Ay%,A%,�_(x%,Fy%)=A%):�:�F(Ay%,a%,Q%,x%,Fy%)
9��:�
9�7ݤIy(x%,Fy%,ga%):�ja%,c%:o%=�:�ga%=&D��C(x%,1):o%=�
9�=�
9���j_(l%,x%):�A%:ȎU_%�
9�?�9:d_%=!l%:�A%=0�9:�S(zJ%,A%,d_%=A%):�:�A(x%,8,�J(zJ%,!l%))
9�0�A%=0�&F:�S(Ay%,A%,!l%=A%):�:�D(x%,U_%,!l%)
9��:�
9���e_(x%):�A%:�A(x%,1,V$):�A%=1�5:�Z(x%,A%+2,-(Xy%=A%)):�:�A(x%,8,�J(zJ%,d_%)):�A(x%,17,U$):�A(x%,18,X$):�Z(x%,&C,-(c_%=-1)):�Z(x%,&D,-(c_%=1)):�A%=0�&E:�D(x%,A%+22,G%(A%)):�:�
9�\��l_(x%):�A%,B%:V$=�M(x%,1):U$=�M(x%,17):X$=�M(x%,18):B%=Xy%:�A%=1�5:�Z(x%,A%+2)�Xy%=A%
9��:�A%<>B%�t%=�G(2)��Q(v%,0)
9��Z(x%,&C)�c_%=-1�c_%=1
9�$�A%=0�&E:G%(A%)=�_(x%,A%+22):�:�
9�)��Q(b%,Sl%):�v%=0�b%<>0��C(i%,-1):�Oy
9�)�b%=0��R_(i%,Cy%,wy%,-m%-Y_%,Iy%,�,�)
9�J_%=0:�b%<v%J_%=-1
9��b%>v%J_%=1
9��J_%=0�
9� mJ%=Sl%<>iy%:�Sl%<iy%�J_%=-1
9��Sl%>iy%�J_%=1
:*�:v%=b%:iy%=Sl%:�dy:�b%<>0��VJ(b%,Sl%)
:�
:���yy�Sy%,Y%:Z$(`J%-1,0)=�M(__%,3):Z$(`J%-1,1)=�M(__%,4):Sy%=(k%-2*24-68-2*&c)/P_%:Y%=m%+24+68+Sy%*(`J%-1):�N(i%,my%+&C,-Y%,`y%-&C,-Y%-Sy%):vy%=�:笤Dy�ș&400D4,,-1:`J%=0
:�
:?��a�A%:�A%=9�23:�A(Cy%,A%,""):�:C$="":dy%=-1:�R(Cy%,25,1):�
:M��_y:�ey%:�J_:ey%=�q(C$)-64:M%(ey%)-=1:C$="":dy%=-1:�M%(ey%)=0�F%(ey%)=-1
:m�N(i%,wy%+u%-40,-m%-Y_%*ey%,wy%+u%,-m%-Y_%*(ey%+1)):�N(i%,my%,-m%-Y_%*ey%,my%+40,-m%-Y_%*(ey%+1)):vy%=�:�
:a��J_:�B%,L%,A%:B%=h_%:L%=�q(C$)-64:B%=F%(L%):A%=YJ%:ȕA%>0:B%=B%!4:A%-=1:�:�YJ%=0�F%(L%)=B%!4
:�B%!4<>-1�!(B%!4)=!B%
:	"�!B%=-1�h_%=B%!4�!(!B%+4)=B%!4
:
�Ly(s_%,B%,�):�
:4��y(ea%):�O%,L%,R$:�L%=9�23:�M(Cy%,L%)<>""�O%=�
:
�:�O%�
:
^R$=�s(�M(Cy%,9)+" "+�M(Cy%,&A)):L%=�q(R$)-64:M%(L%)+=1:�C$=""�O%=L%�O%=�q(C$)-64:M%(O%)-=1
:�dy%<0��L_��J_:�L_
:C$="":dy%=-1:�ea%�
:?�M%(L%)=1��N(i%,wy%+u%-40,-m%-Y_%*L%,wy%+u%,-m%-Y_%*(L%+1))
:��Pu(R$)
:�:vy%=�
:�:�
:t��Pu(A$):�B%,A%,P%:P%=�q(A$)-64:B%=F%(P%):ȕ�s(�K(B%,0)+" "+�K(B%,1))<>R$:B%=B%!4:A%+=1:�:�Q(P%,A%-A%�(2*Xy%)):�
:���L_:�A%,B%,C%,S%:S%=&C:�A%=9�23:S%+=��M(Cy%,A%)+1:�:C%=�w(s_%,S%,�):B%=h_%:C%!8=S%:S%=C%+&C:�A%=9�23:$(S%)=�M(Cy%,A%)+�&A:S%+=�($S%):�:A%=�q(�s(�M(Cy%,9)+" "+�M(Cy%,&A)))-64:�F%(A%)=-1�F%(A%)=C%:A%-=1
:�B%<>-1�
:2ȕF%(A%)=-1�A%>1:A%-=1:�:�F%(A%)<>-1�B%=F%(A%)
:Uȕ�s(�K(B%,0)+" "+�K(B%,1))<R$�B%!4<>-1:B%=B%!4:�:�s(�K(B%,0)+" "+�K(B%,1))>=R$�
:�F%(A%)=B%�F%(A%)=C%
:6!C%=!B%:C%!4=B%:!B%=C%:�!C%<>-1�!(!C%+4)=C%�h_%=C%
:�:B%!4=C%:!C%=B%:C%!4=-1
:�
:$�h_%=C%:!C%=-1:C%!4=-1:F%(A%)=C%
:�:�
:)ݤq(A$):�B%:B%=�(�s(A$)):�B%<65�B%=65
: =B%
:!fݤs(A$):�B%:A$=�v(A$):B%=��A$,1):ȕ�(B%>47�B%<58)��(B%>64�B%<91)�A$<>"":A$=�A$,2):B%=��A$,1):�:=A$
:"���ty(p%,b%):�A%:ey%=u%-40:b%!8=!b%+ey%:b%!48=b%!40+ey%:b%+=88+8:�A%=&B�17:b%!(A%*32)=ey%-16:�:�A%=8�23:A%-=7*(A%=&B):b%!(A%*32)=ey%:�:b%!(24*32-8)=(ey%-384)/4:b%!(24*32)=b%!(24*32-8)+&80
:#�b%!(25*32-8)=b%!(24*32)+(ey%-384)/4:b%!(25*32)=b%!(25*32-8)+&80:b%!(26*32-8)=b%!(25*32)+(ey%-384)/4:b%!(26*32)=b%!(26*32-8)+&80:�
:$k��t_:�A%,B%,C%,S%,w%,L%:�A%=0�26:M%(A%)=0:F%(A%)=-1:�:M%(0)=1:C%=-1:h_%=-1:P_%=16:w%=�(x$):�Fu%�w%<>0�
:%;ȕ��#w%:S%=��#w%:B%=�w(s_%,S%,�):�C%<>-1�C%!4=B%�h_%=B%
:&g!B%=C%:B%!8=S%:ș&C,4,w%,B%+&C,S%-&C:L%=�q(�K(B%,0)+" "+�K(B%,1))-64:M%(L%)+=1:�F%(L%)=-1�F%(L%)=B%
:'C%=B%:�x_%��w(�1)
:(�:�h_%<>-1�B%!4=-1
:)�:�#w%:w%=�f$:�Fu%�w%<>0�
:*7P_%=��#w%:�B%=0�P_%-1:Z$(B%,0)=�#w%:Z$(B%,1)=�#w%:�
:+�:�#w%:w%=0:�
:,���DJ:�w%,B%,S%,A%:w%=�x$:B%=h_%:ȕB%<>-1:�#w%,�B%!8:ș&C,2,w%,B%+&C,B%!8 -&C:B%=B%!4:�:�#w%:w%=�f$:�#w%,�P_%:�A%=0�P_%-1:�#w%,Z$(A%,0)+�&A+Z$(A%,1):�:�#w%:w%=0:�
:-��VJ(ey%,Pa%):�ey%>0�
:.��A%,B%,C%,F%:B%=F%(ey%):ȕPa%>0:B%=B%!4:Pa%-=1:�:��C%=0�&E:A$(A%,C%)=�K(B%,C%):�:A%+=1:F%=(A%>Xy%*2-1)�B%!4=-1:B%=B%!4:�F%�F%=(�q(�K(B%,0)+" "+�K(B%,1))-64<>ey%)
:/�F%
:0�:�
:1_ݤK(B%,L%):�A$:B%+=&C:ȕL%>0:ȕ?B%<>&A:B%+=1:�:B%+=1:L%-=1:�:ȕ?B%<>&A:A$+=�?B%:B%+=1:�:=A$
:2x��RJ(S$):�e$,A%,B%,S%,I%,na%,ua%,Ka%,`l%:Cu%=0:jJ%=0:w%=�S$:ȕ��#w%:e$=�#w%:�e$<>""�A%=�uy(e$):Cu%+=1:�A%>jJ%�jJ%=A%
:3�:�#w%:w%=0:�jJ%>0�
:4�ș&400D9,,P$+".Resources."+B$+".Templates":ș&400DB,,,0,0,0,"Import"�,Ka%,`l%:ș30,6,,,Ka%�,,dl%;na%:ș30,6,,,`l%�,,jl%;ua%:ș&400DB,,dl%,jl%,jl%+`l%,vl%,"Import",0:ș&400C1,,dl%�Gy%:ș&400DA:J$=S$
:5<B%=1:�A%=&A�52�3:�A(Gy%,A%,�B%):�B%>0�B%+=1:�B%>jJ%�B%=0
:6Z�:�A(Gy%,54,�A("Import1")):�A(Gy%,55,�A("Import1")):�M(Gy%,70,1):�Z(Gy%,69,0):�_(S$,1)
:7�J$="":�B(�A("ErrCSV"))
:8�:�
:9/��i:Cu%=0:jJ%=0:�J$<>""��"Remove "+J$:J$=""
::
�Gy%<>-1�
:;7!K%=Gy%:Gy%=-1:ș&400C3,,K%:ș30,7,,dl%:ș30,7,,jl%
:<�:�
:=���_(S$,xl%):�A%,B%,C%,S%,g$,u_%:g$=�N_(S$,xl%):C$="":dy%=-1:�R(Cy%,25,1):�A%=9�23:B%=&A+(A%-9)*3:u_%=��M(Gy%,B%):S%=0:�B%<&E�S%=�My(Zl%,�M(Gy%,55+(B%=&A)))
:>2�B%>&F�B%<35��M(Gy%,B%)=�M(Gy%,16)��Z(Gy%,69)�
:?5S%=256:C%=16:ȕC%<B%:�M(Gy%,C%)=�M(Gy%,16)�S%+=1
:@C%+=3:�
:A
�:�u_%>0�
:B�A(Cy%,A%,�F_(g$,u_%,S%))
:C��A(Cy%,A%,"")
:D*�:�:�A(Gy%,59,�xl%):�Iy%��z(i%,-1,-1)
:E<K_%=t%:w_%=v%:t%=�G(2):�Q(0,0):�K_%<>t%�w_%<>v%�J_%=0:�K
:F�z(Gy%,-1,0):�
:G:ݤN_(S$,xl%):�A$:w%=�S$:ȕxl%>0:A$=�#w%:�A$<>""�xl%-=1
:H�:�#w%:w%=0:=A$
:ICݤF_(A$,u_%,Ua%):�CJ%,B%,Z$,NJ%:ȕu_%>1�A$<>"":�A$=34�CJ%=�CJ%
:J�A$=44��CJ%�u_%-=1
:K'A$=�A$,2):�:�A$=34�CJ%=�:A$=�A$,2)
:L$ȕ�NJ%:�A$=34�A$=""�CJ%=�:NJ%=�
:M�A$=44��CJ%�NJ%=�
:N�NJ%�Z$+=�A$,1):A$=�A$,2)
:O�:ȎUa%�
:P�0
:Q�1:Z$=�Z$,�Z$," ")-1)
:R�2:Z$=�Z$,�Z$," ")+1)
:S�3:�Z$," ")>0�
:T-B%=�Z$:�B%-=1:��Z$,B%,1)=" ":Z$=�Z$,B%-1)
:U
�Z$=""
:V�
:W&�4:ȕ�Z$," "):Z$=�Z$,�Z$," ")+1):�
:XI:B%=Ua%��256:A$=�M(Gy%,70):ȕB%>0:�Z$,A$)�Z$=�Z$,�Z$,A$)+�A$)�Z$=""
:Y&B%-=1:�:�Z$,A$)�Z$=�Z$,�Z$,A$)-1)
:Z	�:=Z$
:[/ݤuy(A$):�Gi%,CJ%:ȕA$<>"":�A$=34�CJ%=�CJ%
:\�A$=44��CJ%�Gi%+=1
:]A$=�A$,2):�:=Gi%-(Gi%>0)
:^&��i_(q%,s%,g%,Yy%,ry%):�A%,B%:Ȏ��
:_Y�s%=58�s%=60:A%=��M(q%,59)-(s%-59)*(1+2*(g%=1)):�A%>0�A%<=Cu%��A(q%,59,�A%):�_(J$,A%)
:`W�s%>=9�s%<=53:B%=&A+3*((s%-9)�3):A%=��M(q%,B%)+(s%-B%)*(1+2*(g%=1)):�A%>=0�A%<=jJ%�
:a#�A(q%,B%,�A%):�_(J$,��M(q%,59))
:b�
:c&�s%=54�s%=55:�F(Zl%,Yy%,ry%,q%,s%)
:dH�s%=66:�y(�):A%=��M(Gy%,59)+1:�A%>0�A%<=Cu%��A(Gy%,59,�A%):�_(J$,A%)
:eJ�s%=67:�:�y(�):A%=��M(Gy%,59)+1:�A%>0�A%<=Cu%��A(Gy%,59,�A%):�_(J$,A%)
:f�A%>Cu%
:g
�s%=68:�i
:h3�s%=69:�M(q%,70,���Z(q%,69)):�_(J$,��M(Gy%,59))
:i�:�
:j:��WJ(s%,I%):�A(Gy%,s%,�J(Zl%,I%)):�_(J$,��M(Gy%,59)):�
:kV��b_(b%,Mi%,a%,Q%,x%,n%):!J%=i%:�L%(b%,Mi%-&D)<>-1�J%!4=L%(b%,Mi%-&D):ș&400C4,,J%
:l�ș&400CB,,J%:Q%-=8:n%-=8:J%!4=a%-J%!4:J%!8=Q%-J%!16-n%:J%!&C=J%!4+x%:J%!16=J%!8+n%:J%!20=&7003119:J%!24=sl%:J%!28=Ai%:J%!32=0:ș&400C2,,J%�L%(b%,Mi%-&D):�
:mV��dy:�b%,Wy%:!J%=i%:�b%=0�&A:�Wy%=0�1:�L%(b%,Wy%)<>-1�J%!4=L%(b%,Wy%):ș&400C4,,J%
:n�,:L%()=-1:�
:oO��p_(s%):�b%,Wy%,Oa%,Ti%,A$:�b%=0�&A:�Wy%=0�1:�L%(b%,Wy%)=s%�Oa%=b%:Ti%=Wy%
:p%�,:�Ti%=0�A$=X$:uJ%=2�A$=U$:uJ%=1
:q�Gy(A$+A$(Oa%,Ti%+&D)):�
:rL��Gy(o$):!J%=256:J%!4=vu%:J%!16=&4AF80:$(J%+20)=o$+�0:ș&400E7,18,J%,0:�
:st��Su:�C%(&C),Q%(&C):Ly%=3:SJ%=&B:t_%=-1:C%()=-1:d$=Y$+"Anni":Fi%=0:BJ%=-1:HJ%=-1:uu%=�:ll%=�C("ANM","ANM",1,4):�
:tݤRy=ll%
:uB��Du(A%):B%(A%)=1:W%(A%)=&C:S%(A%)=1:M$(A%)=�A("AnnTab"):�__:�
:v���oJ(v%,y%,_%,U%):�Py%,Q%,r%:Py%=(k%-Ly%*20-20)/Ly%:Q%=0:�r%=v%+Ly%*�y%�v%+Ly%*�y%+Ly%-1:Q%+=20+Py%:�Fu(r%,_%+20,U%-Q%+Py%,u%-40,Py%):�:�y%=0�v%>1��I(y%,_%,U%)
:w�y%�r%<&C��I(y%,_%,U%)
:x�
:y��QJ(l%,cl%):Ȏ!l%�
:z�0:�HJ%<>-1��o(HJ%,-1)
:{�1:�HJ%<>-1��o(HJ%,0)
:|�2:�HJ%<>-1��Hy(HJ%)
:}/�3:�Ky("X�s %n%t birthday",Dy%,Ra%,My%,0,0)
:~�:�
:0��Vy(p%):v%+=p%*2*Ly%:�v%+2*Ly%>&D�v%-=2*Ly%
:��v%<1�v%=1
:��
:�u��y_(g%,y%,a%,Q%,i_%,qJ%):�Py%,r%:Py%=(k%-20)/Ly%:r%=-Q%�Py%+1:Q%+=(r%-1)*Py%+20:�Q%>0�r%>Ly%�a%<20�a%>u%-40�r%=0
:��y%�i_%=wy%+20�i_%=my%+20
:�WqJ%=-m%-20-Py%*(r%-1):�r%<>0��`u(r%+Ly%*�y%+v%-1,g%,a%-20,Q%,i_%,qJ%,u%-40,-Py%+20)
:��
:�ݤmy(s%,By%):o%=�:ȎBy%�
:��414:�Vy(1)
:��415:�Vy(-1)
:�	o%=�
:�	�:=o%
:�!ݤB_(q%,s%,By%):o%=�:�q%=_y%�
:�o%=�:ȎBy%�
:��394,398,399:�C(_y%,6-s%)
:��4,24:�t_%<>-1��Hy(t_%)
:�
�27:�t
:��&D:�s%=2�
:�&�Ny(�M(_y%,2),d%,z%,e%)��C(_y%,4)
:���Z_
:��
:�	o%=�
:��
:�	�:=o%
:�]��O_:�B%:w%=�d$:B%=BJ%:ȕB%<>-1:�#w%,�B%!8:ș&C,2,w%,B%+&C,B%!8 -&C:B%=B%!4:�:�#w%:w%=0:�
:�(��wJ(w%):�#w%,SJ%:�#w%,Ly%:�J(uu%):�
:�'��Ju(w%):SJ%=�#w%:Ly%=�#w%:uu%=�Q:�
:� ��qJ(x%,Fy%,l%,a%,Q%):ȎFy%�
:�=�1:�W(Ay%,0,-1):�S(Ay%,�_(x%,Fy%),1):�F(Ay%,a%,Q%,x%,Fy%)
:� �2,3,4,5:�g%<>2��Z(x%,Fy%,1)
:��:�
:�>��SJ(Zy%,fa%):�D(fa%,1,!Zy%):�W(Ay%,0,-1):�S(Ay%,!Zy%,1):�
:�T��tJ(x%):�A%:�D(x%,1,SJ%):�A%=2�5:�Z(x%,A%,0):�:�Ly%<5��Z(x%,Ly%+1,1)��Z(x%,5,1)
:��Z(x%,6,-uu%):�
:�[��Wu(x%):�A%,B%:B%=Ly%:SJ%=�_(x%,1):A%=2:ȕA%<5���Z(x%,A%):A%+=1:�:�A%<5�Ly%=A%-1�Ly%=6
:��B%<>Ly%�Q%()=0
:��S%(�G(5))+2*Ly%>&D�
:�,�Z%(t%)=5�v%=&D-2*Ly%�S%(�G(5))=&D-2*Ly%
:��:uu%=�Z(x%,6):�
:�N��Fu(r%,_%,U%,x%,n%):�rJ%,B%,Qy%,A%,Q%:B%=C%(r%):Qy%=28:�F(_%,U%,x%,-n%)�
:�jrJ%=�P("Homerton.Bold",&C,&C):p_%=�P("Homerton.Medium",&A,&A):�V(0,7):�r%=fy%�ș&400E6,!FJ%�ș&400E6,5
:���Cy(_%,U%,x%,n%,20):�L(rJ%,�X(r%,-1),0,_%+x%/2,U%-&A):Q%=40:A%=Q%(r%):ȕA%>0:B%=B%!4:A%-=1:�:ȕB%<>-1�Q%+Qy%-5<=n%:�F(_%+20,U%-Q%-25,x%-50,Qy%)�
:�m�c(p_%,�Sy(B%,My%-(r%<fy%�(r%=fy%�B%?&C<Dy%))),_%+70,U%-Q%-20,x%-70,Qy%):�L(p_%,�(B%?&C),1,_%+60,U%-Q%-4)
:�F�:Q%+=Qy%:B%=�p(B%,r%):�:�B%<>-1��_%+8,U%-n%+20:�BY18,0:�81,-9,-18
:�,�Q%(r%)<>0��_%+8,U%-60:�BY18,0:�81,-9,18
:��U(rJ%):�U(p_%)
:��:�
:����`u(r%,g%,a%,Q%,_%,U%,x%,n%):�L%,A%,B%,C%,N%,Qy%,A$:Qy%=28:C%=(-Q%-70+2*Qy%)�Qy%+Q%(r%):N%=-((n%+40)�Qy%):A%=0:B%=C%(r%):ȕB%<>-1:A%+=1:B%=�p(B%,r%):�:�L%=0�2:�T(ll%,L%,1):�:HJ%=-1:Ra%=r%:Ȏ��
:�P�a%>35�Q%<-40�a%<x%�C%>0�C%<=A%:B%=C%(r%):ȕC%>1:C%-=1:B%=�p(B%,r%):�:�g%=2�
:�!�L%=0�2:�T(ll%,L%,0):�:HJ%=B%
:���o(B%,g%=4)
:��
:�	�g%=2
:�I�a%>0�a%<30�Q%-20<n%:�Q%(r%)<A%-N%�Q%(r%)+=1:�N(i%,_%,U%,_%+x%,U%+n%)
:�K�a%>0�a%<30�Q%>-60�Q%<=-42:�Q%(r%)>0�Q%(r%)-=1:�N(i%,_%,U%,_%+x%,U%+n%)
:�3�g%<>2��Ky("X�s %n%t birthday",Dy%,r%,My%,0,0)
:��:�
:�L��x_(d%,z%,N%,g%):�B%:B%=-1:ȕN%>0:B%=�k(d%,z%,B%):N%-=1:�:�o(B%,g%=4):�
:�)��o(B%,hy%):�A%,A$:�hy%�t_%=B%�t_%=-1
:�`A%=B%+16:ȕ?A%<>&B:A$+=�?A%:A%+=1:�:�Ky(A$,B%?&C,(B%!&C>>8)�&F,(B%!&C>>&C)�&FFF,B%?&F,hy%):�
:�_��Ky(W$,c%,r%,Q%,u_%,hy%):�A(_y%,4,W$):�A(_y%,2,�c%+"/"+�r%+"/"+�Q%):Zi%=u_%:�u_%=0�u_%=SJ%
:�J�D(_y%,4,u_%):�R(_y%,&D,(hy%=0)):�hy%=0�A$=�A("anset")�A$=�A("anedit")
:�:�X(_y%):�r(_y%,�,�):�C(_y%,2):VJ%=�:�f(_y%,_a%,A$,0):�
:�Aݤp(B%,z%):�A%,C%,c%,r%,Q%:B%=B%!4:�((B%!&C>>8)�&F)<>z%�B%=-1
:�=B%
:�>ݤSy(B%,My%):�A%,C%,c%,Q%,A$:Q%=(B%!&C>>&C)�&FFF:�Q%<=My%�
:�bC%=B%?&F:C%-=SJ%*(C%=0):�V(0,C%):A%=B%+16:ȕ?A%<>&B:�?A%=37�A%+=1:A$+=�W_(?A%,Q%,My%)�A$+=�?A%
:�A%+=1:�
:�	�:=A$
:�$��rJ(s%,Yy%,ry%):�c%,r%,Q%:Ȏs%�
:��5:�F(Xl%,Yy%,ry%,q%,s%)
:��&B:�Z_
:�
�&C:�t
:��&D:�Hy(t_%)
:��:�
:�+��Z_:�A$,d%,z%,e%:A$=�M(_y%,4):�A$<>""�
:��Ny(�M(_y%,2),d%,z%,e%)�
:��t_%<>-1��uy(t_%)
:�D�LJ(A$,d%,z%,e%,Zi%):Q%()=0:�t:vy%=�:�Iy%�(Z%(t%)=5�Z%(t%)=3)��K
:���C(_y%,2)
:��
:���B(�A("ErrMes"))
:��:�
:�-��t:t_%=-1:�X(_y%):�X(sy%):�Iy%��C(i%,-1)
:��
:�aݤNy(A$,�c%,�r%,�Q%):�A%:c%=�A$:A$=�A$,�A$,"/")+1):r%=�A$:A$=�A$,�A$,"/")+1):Q%=�A$:A%=�:Ȏ��
:�"�r%<1�r%>&C:�B(�A("ErrMonth"))
:�4�Q%<1�Q%>&FFF:�B(�O("ErrYear","1","4095","",""))
:��c%<1:�B(�A("ErrDateZ"))
:�P�c%>�D(r%,Q%):�B(�O("ErrDate",äD(r%,Q%),�X(r%,-1)+�-(r%=2)," "+�Q%),"",""))
:�	A%=�
:�	�:=A%
:۰��LJ(y$,d%,z%,e%,u_%):�ny%,Ny%,S%,B%,xy%,T%,F_%:F_%=d%+(z%<<8)+(e%<<&C)+(u_%<<24):xy%=�:S%=�y$+1+16:Ny%=BJ%:ny%=-1:ȕNy%<>-1��xy%:�Ky(d%,z%,Ny%!&C)�xy%=��ny%=Ny%:Ny%=Ny%!4
:�`�:B%=�w(s_%,S%,�):!B%=ny%:B%!4=Ny%:B%!8=S%:B%!&C=F_%:$(B%+16)=y$+�&B:�ny%=-1�BJ%=B%�ny%!4=B%
:��Ny%<>-1�!Ny%=B%
:�#�C%(z%)=Ny%�C%(z%)=-1�C%(z%)=B%
:��
:�,��Hy(B%):�uy(B%):�t:vy%=�:�B%=t_%�t_%=-1
:��Iy%�(Z%(t%)=5�Z%(t%)=3)��K
:��
:�a��uy(B%):�ny%,Ny%,r%,Qi%:Qi%=-1:ny%=!B%:Ny%=B%!4:r%=(B%!&C>>8)�&F:Q%(r%)=0:�ny%<>-1�ny%!4=Ny%
:�2�Ny%<>-1�!Ny%=ny%:�((Ny%!&C>>8)�&F)=r%�Qi%=Ny%
:��BJ%=B%�BJ%=Ny%
:��C%(r%)=B%�C%(r%)=Qi%
:��Ly(s_%,B%,�):�
:�BݤKy(c%,r%,T%):�`%,Tl%,xu%:Tl%=T%�&FF:xu%=(T%>>8)�&F:�r%>=xu%�
:��c%<Tl%�xu%=r%�`%=��`%=�
:�	�`%=�
:�	�:=`%
:���sJ:�B%,xy%,tJ%,c%,r%,Ml%,fJ%,oy%,d%,z%,e%:�G(_J%,c%,r%,Ml%,fJ%,oy%):B%=C%(fJ%):d%=�T:z%=�I:e%=�R:ȕB%<>-1��xy%��tJ%:c%=B%?&C:r%=(B%!&C>>8)�&F:�r%>z%�(r%=z%�c%>d%)�tJ%=�:�Zy
:�8�(r%>fJ%�(r%=fJ%�c%>Ml%))��tJ%�xy%=�:�hy(B%)�B%=B%!4
:��:�xy%��Zy
:��
:�E��X_:�B%,c%,r%,d%,z%,e%:d%=�T:z%=�I:e%=�R:B%=Fi%!4:W_%=0:�B%<>-1�
:�>c%=B%?&C:r%=(B%!&C>>8)�&F:�r%>z%�(r%=z%�c%>d%)��Zy��hy(B%)
:���Zy
:��:�
:�&��Zy:Bu%=�:_J%=�x(�Y):�X(GJ%):�x:�
:����hy(B%):�c%:�A(GJ%,1,�O("its",�U(d%,z%,e%,-1),"","","")):�A(GJ%,2,�Sy(B%,e%)):c%=B%?&F:c%-=SJ%*(c%=0):�D(GJ%,2,c%):�z(GJ%,�,�):vy%=-1:Fi%=B%:�uu%�W_%=&A
:��
:�0ݤn(c%,r%):�B%,C%,Tl%,xu%:B%=C%(r%):�B%<>-1�
:��:�B%?&C=c%�C%+=1
:�6B%=B%!4:�B%<>-1�Tl%=B%?&C:xu%=(B%!&C>>8)�&F�xu%=&D
:��Tl%>c%�xu%>r%
:�	�:=C%
:�ݤk(c%,r%,B%):�B%=-1�
:�#B%=C%(r%):ȕB%?&C<>c%:B%=B%!4:�
:��B%=B%!4
:�0�:�B%<>-1��B%?&C>c%�((B%!&C>>8)�&F)>r%�B%=-1
;=B%
;6��__:�S%,C%,B%,r%:C%=-1:BJ%=-1:w%=�d$:�Fu%�w%<>0�
;;ȕ��#w%:S%=��#w%:B%=�w(s_%,S%,�):�C%<>-1�C%!4=B%�BJ%=B%
;P!B%=C%:B%!8=S%:ș&C,4,w%,B%+&C,S%-&C:r%=((B%!&C)>>8)�&F:�C%(r%)=-1�C%(r%)=B%
;C%=B%:�x_%��w(�1)
;�:�BJ%<>-1�B%!4=-1
;�:�#w%:w%=0:�
;AݤW_(T%,Q%,My%):�A$,d,c%,F%,L%:Yl%=(T%�32)=0:c%=My%-Q%:Ȏ�T%�
;7�"y","Y":A$=�A("year"+�-(c%>1),"s")):�Yl%�A$=�v(A$)
;	�"n":A$=�c%
;
&�"t","T":A$=�Ly(c%):�Yl%�A$=�v(A$)
;V�"c","C":ș&61502,C_%,"Ann"+�c%,J%,256�,,,L%;F%:�(F%�1)=0�J%?L%=&D:A$=" ("+$J%+")"
;�Yl%�A$=�v(A$)
;
	�:=A$
;���nJ:S_%=2:n_%=&F:Ou%=�:Wa%=�C("FAM","FAM",1,4):wi%=�C("DIM4","ANM",1,3):e_%=�C("DIM","DIM",1,6):�Y(e_%,3,wi%):�Y(e_%,5,Wa%):�g_(e_%,2,-1):aJ%=�C("E","E",1,6):yl%=�C("OT","OT",1,6):bl%=�C("Day","Day",1,7):rl%=�C("OE","OE",1,&C)
;�Xl%=�Py(�A("Col")):$(Xl%+28+&C)=�A("Def"):r$=Y$+"Diary":�V%(&E):O_%=-1:LJ%=-1:pJ%=0:z$="":pu%=�C("EN","EN",1,3):Yu%=�C("EA","E",3,6):D_%=0:Du%=0:ly%=0:Z_%=-1:R_%=6:�Ml:�
;ݤJ_=e_%
;{��d_(A%):�z_:�OJ:�H(�T,�I,�R):�S(e_%,S_%-1,�):B%(A%)=�S(0,0,1,1,&77d):W%(A%)=�S(0,0,31-6,&C,&fff):M$(A%)=�A("DiaTab"):�
;
��kJ:�
;��ku:LJ%=-1:�
;���h_(v%,y%,_%,U%):�d%,z%,e%,rJ%,il%,p_%,y_%,QJ%,bi%:�G(v%,y_%,QJ%,d%,z%,e%):rJ%=�P("Homerton.Bold",&E,&E):ș&400E6,7:il%=�P("Trinity.Bold",&C,&C):p_%=�P("Homerton.Medium",&A,&A):ș&40081,,"Trinity.Medium",9*16,9*16�bi%:ȎS_%�
;�1:�lu(v%,y%,_%,U%)
;�2:�MJ(v%,y%,_%,U%)
;�3:�Al(v%,y%,_%,U%)
;�:�V(0,7):�y%�
;A$=�X(z%,-1)+" "+�e%:Ȏ��
;9�QJ%<>e%:A$=�X(y_%,3)+" "+�QJ%+" - "+�X(z%,3)+" "+�e%
;#�y_%<>z%:A$=�X(y_%,-1)+" - "+A$
;2�:�B(�S(0,0,d%,z%,e%),W%(t%))=-1��I(y%,_%,U%)
;�L(rJ%,A$,1,_%+u%-&A,U%-&A)
;!�:A$=�QJ%+" "+�X(y_%,-1):Ȏ��
;9�QJ%<>e%:A$=�QJ%+" "+�X(y_%,3)+" - "+�e%+" "+�X(z%,3)
;  �y_%<>z%:A$+=" - "+�X(z%,-1)
;!=�:�L(rJ%,A$,-1,_%+&A,U%-&A):�B(v%,B%(t%))=1��I(y%,_%,U%)
;"�:�U(rJ%):�U(il%):�U(p_%):�
;#��_u(l%,cl%):Ȏ!l%�
;$�0,1,2:�S_%<>!l%+1�
;%o�S(e_%,S_%-1,�):S_%=!l%+1:�S(e_%,!l%,�):�G(S%(�G(3)),A%,B%,d%,z%,e%):�H(d%,z%,e%):�Z%(t%)=3�v%=S%(t%):mJ%=�
;&�
;'�3:Ȏl%!4�
;(�0:�Wy(LJ%)
;)�1:�I_(LJ%)
;*�2:�v(LJ%)
;+�
;,�4:�`(�T,�I,�R,e_%,0)
;-�5:Ȏl%!4�
;.
�0:�D_
;/
�1:�S_
;0
�2:�N_
;1
�3:�H_
;2�
;3�:�
;4��A_(Zy%,l%):ȎZy%�
;5N�aJ%:A$=�J(Zy%,!l%):�`y(Zy%)=�A("E")��A(f%,30,A$):nu%=!l%+1��A(Ry%,&D,A$)
;6(�yl%:�A(f%,33,�J(Zy%,!l%)):cu%=!l%+1
;7(�bl%:�A(f%,34,�J(Zy%,!l%)):ju%=!l%+1
;8(�rl%:�A(f%,35,�J(Zy%,!l%)):mu%=!l%+1
;9�:�
;:9��Qy(p%):�d%,z%,e%,A%,B%:�G(v%,A%,B%,d%,z%,e%):ȎS_%�
;;�1:�P(d%,z%,e%,p%*&E,0,0)
;<�2:�P(d%,z%,e%,p%*7,0,0)
;=�3:�P(d%,z%,e%,p%*2,0,0)
;>K�:J_%=-�B(v%,�S(0,0,d%,z%,e%)):�H(d%,z%,e%):�B(v%,B%(t%))=-1�v%=B%(t%)
;?�B(v%,W%(t%))=1�v%=W%(t%)
;@�
;A(��zu(g%,y%,a%,Q%,i_%,qJ%):�R%:ȎS_%�
;B�1:R%=�vy(g%,y%,a%,Q%)
;C�2:R%=�ky(g%,y%,a%,Q%)
;D�3:R%=�Q_(g%,y%,a%,Q%)
;E�:�g%=2�R%>1�LJ%=R%�LJ%=-1
;F�
;GݤG_(s%,By%):o%=�:ȎBy%�
;H�389:�D_
;I�390:�S_
;J�391:�N_
;K�392:�H_
;L�414:�Qy(1)
;M�415:�Qy(-1)
;N�30:�H(�T,�I,�R)
;O�388:�`(�T,�I,�R,e_%,0)
;P�27:�X(sy%)
;Q	o%=�
;R	�:=o%
;S'ݤP_(q%,s%,By%):�A%,B%:o%=�:�q%=f%�
;T4A%=0:�By%=&D�By%=398�By%=394�A%=1��By%=399�A%=-1
;U
ȎBy%�
;V#�396:�wJ%=�z��k(q%,s%,-1,16,18)
;W"�397:�wJ%=�z��k(q%,s%,1,16,18)
;X�&D:�s%=18��V_:o%=�
;Y
�27:�n
;Z�4,24:�O_%<>-1��v(O_%)
;[	o%=�
;\�
;]	�o%=�
;^	�:=o%
;_`��pJ:�w%,B%:w%=�r$:B%=Z_%:ȕB%<>-1:�#w%,�B%!8:ș&C,2,w%,B%+&C,B%!8 -&C:B%=B%!4:�:�#w%:w%=0:�
;`O��Bu(w%):�#w%,S_%:�#w%,n_%:�#w%,Ou%+5:�#w%,D_%:�#w%,ly%:�#w%,R_%:�#w%,Du%:�
;aO��fJ(w%):S_%=�#w%:n_%=�#w%:Ou%=(�#w%)-5:D_%=�#w%:ly%=�#w%:R_%=�#w%:Du%=�Q:�
;b&��Gu(x%,Fy%,l%,a%,Q%):�A%,B%:Ȏs%�
;c�1,2,3:�g%<>2�Z(x%,Fy%,1)
;d>�&D:�W(Ay%,0,-1):�S(Ay%,�_(x%,Fy%),1):�F(Ay%,a%,Q%,x%,Fy%)
;e-�6:B%=��Z(x%,Fy%):�A%=7�&A:�M(x%,A%,B%):�
;f>�8,9:A%=��M(x%,7):A%+=1+2*(Fy%=8):�A%>0�A%<&D��A(x%,7,�A%)
;g�&A:�F(Yu%,a%,Q%,x%,Fy%)
;h3�&B:�M(x%,&C,��Z(x%,Fy%)):�M(x%,18,��Z(x%,Fy%))
;i�&C:�F(pu%,a%,Q%,x%,Fy%)
;j�:�
;k��iJ(l%,x%):ȎbJ%�
;l1�Ay%:�D(x%,&D,!l%):�W(Ay%,0,-1):�S(Ay%,!l%,1)
;m�Yu%:�A(x%,&A,�J(Yu%,!l%))
;n2�pu%:�A(x%,&C,�J(pu%,!l%)):�M(x%,18,-(!l%<>0))
;o�:�
;p���mu(x%):�A%:�A%=1�3:�Z(x%,A%,�(S_%=A%)):�:�D(x%,&D,n_%):�Z(x%,5,-Ou%):�Z(x%,&B,-(D_%<>0)):�M(x%,&C,-(D_%=0)):�M(x%,18,-(D_%<>1)):�Z(x%,18,-Du%):�Z(x%,6,-(ly%<>0)):�A%=7�&A:�M(x%,A%,-(ly%=0)):�:�Z(x%,&F,�((R_%�4)>0)):�Z(x%,16,�((R_%�2)>0))
;q:�Z(x%,17,�((R_%�1)>0)):�M(x%,&F,�((R_%�1)>0)):�ly%<>0�
;r/�A(x%,7,�(ly%�&F)):�A(x%,&A,�J(Yu%,ly%>>4))
;s$��A(x%,7,"1"):�A(x%,&A,�A("E3"))
;t8�:�D_%=0��A(x%,&C,�A("EN1"))��A(x%,&C,�J(pu%,D_%-1))
;u�
;v���nu(x%):�A%,B%,d%,z%,e%:A%=0:�A%+=1:��Z(x%,A%)�A%=3:S_%=A%:�G(S%(�G(3)),A%,B%,d%,z%,e%):�H(d%,z%,e%):n_%=�_(x%,&D):Ou%=�Z(x%,5):ly%=0:D_%=0:�Z(x%,6)�ly%=((�My(Yu%,�M(x%,&A)))<<4)+��M(x%,7)
;w'�Z(x%,&B)�D_%=�My(pu%,�M(x%,&C))+1
;x<Du%=�Z(x%,18):R_%=�(�Z(x%,17)+2*�Z(x%,16)+4*�Z(x%,&F)):�
;y:��H(d%,z%,e%):�j%,B%,xy%,T%,b%:j%=�H(d%,z%,e%):�S_%=3�
;z$�P(d%,z%,e%,�ey(d%,z%,e%)-1,0,0)
;{��P(d%,z%,e%,-j%+1,0,0)
;|:�:b%=�S(0,0,d%,z%,e%):S%(�G(3))=b%:�Z%(t%)=3�v%=S%(t%)
;}�l:�
;~n��l:�B%,T%,xy%:B%=Z_%:gJ%=-1:b%=S%(�G(3)):V%()=0:ȕB%<>-1��xy%:T%=B%!&C:�B(b%,T%)<>1�xy%=�:gJ%=B%�B%=B%!4
;�:�
;�`ݤiy(T%):�B%,F%:B%=Z_%:F%=-1:ȕB%<>-1�F%=-1:�((B%!16)�(1<<20))=0�((B%!16)�4)=4�F%=B%�B%=B%!4
;�	�:=F%
;� ��r_(B%):�(B%!16�(3<<20))=0�
;�k�qy%,Vy%,d%,z%,e%,Il%,A$,A%,R%,C%:�G(B%!&C,qy%,Vy%,d%,z%,e%):pJ%=B%:�Vy%>&C�Vy%-=&C:Il%=���Vy%=0�Vy%=&C
;�=A$=�Vy%+":"+�2-��qy%,"0")+�qy%:�Il%�A$+=" pm,"�A$+=" am,"
;�P�A(Ry%,1,�O("WasSet",A$,"","","")):�A(Ry%,2,�U(d%,z%,e%,-1)):�((B%!16)�4)=4�
;�R%=�:�((B%!16)�8)=8�
;�c�ry(qy%,Vy%,d%,z%,e%,((B%!16)>>8)�&FF,(((B%!16)>>16)�&F)-1):�Vy%>&C�Vy%-=&C:Il%=���Vy%=0�Vy%=&C
;�=A$=�Vy%+":"+�2-��qy%,"0")+�qy%:�Il%�A$+=" pm,"�A$+=" am,"
;�B�A(Ry%,&F,�O("WilRpt",A$,"","","")):�A(Ry%,16,�U(d%,z%,e%,-1))
;�S�:�vy(d%,z%,e%,B%!16):A$=�Vy%+":"+�2-��qy%,"0")+�qy%:�Il%�A$+=" pm,"�A$+=" am,"
;�B�A(Ry%,&F,�O("WilRpt",A$,"","","")):�A(Ry%,16,�U(d%,z%,e%,-1))
;��
;��:�((B%!16)�1)=1�W_%=&A
;��C%=(B%!16>>4)�&F:C%-=n_%*(C%=0):�A%=4�6:�D(Ry%,A%,C%):�:B%+=20:�A%=4�6:A$="":ȕ?B%<>&B:A$+=�?B%:B%+=1:�:B%+=1:�A(Ry%,A%,A$):�:�Z(Ry%,9,0):�A%=&A�&D:�M(Ry%,A%,1):�:�A(Ry%,&A,"1"):�A(Ry%,&D,�A("E1")):�hJ(�R%,�):vJ%=-1
;�!�:�(B%!16�(1<<21))<>0��bu(B%)
;�
�Yy(B%,0)
;��:�
;�o��bu(B%):�A$,A%,Z$,fi%,Bl%:B%+=20:�A%=1�3:ȕ?B%<>&B:A$+=�?B%:B%+=1:�:B%+=1:�:�A$,1)="="�A$=�A$,�A$,"*")+1)
;�4Z$=�v(�A$,�A$," "))):�Z$<>"FILER_RUN"�Z$<>"RUN"�
;�Cș8,5,A$�fi%,Bl%:�fi%=2�A$="Run "+A$��fi%<>0�A$="Filer_Run "+A$
;��:ș&400DE,A$:�
;����N_:�b%,B%,xy%,A%,C%,d%,z%,e%:b%=S%(�G(3)):B%=gJ%:�G(b%,A%,C%,d%,z%,e%):A%=-&E*(S_%=1)-7*(S_%=2)-2*(S_%=3):�P(d%,z%,e%,A%,0,0):b%=�S(0,0,d%,z%,e%):ȕB%<>-1��xy%:T%=B%!&C:�B(b%,T%)=-1�xy%=��B%=B%!4
;��:�xy%�
;�2t%=�G(3):�G(B%!&C,A%,C%,d%,z%,e%):�H(d%,z%,e%)
;���B(�A("ErrNoMore"))
;��:�
;�g��S_:�b%,B%,xy%,A%,C%,d%,z%,e%:b%=S%(�G(3)):B%=gJ%:ȕB%<>-1��xy%:T%=B%!&C:�B(b%,T%)=1�xy%=��B%=!B%
;��:�xy%�
;�2t%=�G(3):�G(B%!&C,A%,C%,d%,z%,e%):�H(d%,z%,e%)
;���B(�A("ErrNoB4"))
;��:�
;���D_:�Z_%<>-1�
;�3t%=�G(3):�G(Z_%!&C,A%,C%,d%,z%,e%):�H(d%,z%,e%)
;���B(�A("ErrNoEnt"))
;��:�
;���H_:�B%:B%=Z_%:�B%<>-1�
;�GȕB%!4<>-1:B%=B%!4:�:t%=�G(3):�G(B%!&C,A%,C%,d%,z%,e%):�H(d%,z%,e%)
;���B(�A("ErrNoEnt"))
;��:�
;�8��lu(v%,y%,_%,U%):�Nu%,Py%,j%:�y%��P(d%,z%,e%,7,0,0)
;��Nu%=U%-40:Py%=-(k%-60)/7:QJ%=e%:y_%=z%:�j%=1�7:�zy(j%+7*�y%,d%,j%,z%,e%,y%,_%+&A,Nu%,u%-20,Py%):�j%<>7��P(d%,z%,e%,1,0,0):Nu%+=Py%
;��:�
;�uݤvy(g%,y%,a%,Q%):�Py%,p%,_%,R%:Py%=(k%-60)/7:Q%=-Q%-40+Py%:p%=((Q%�Py%)�8):�p%<>0�p%+=7*�y%:�a%<&A�a%>u%-20�p%=0
;��y%�_%=wy%�_%=my%
;�L�p%<>0�R%=�Fy(p%,a%-&A,Q%�Py%,g%,Py%,_%+&A,-m%-40-(p%+7*(p%>7))*Py%+Py%)
;�=R%
;�R��MJ(v%,y%,_%,U%):�Nu%,Py%,tJ%,j%:�y%��P(d%,z%,e%,3,0,0):j%=4:tJ%=7�j%=1:tJ%=3
;�ENu%=U%-40:Py%=-(k%-60)/3:QJ%=e%:y_%=z%:�j%=j%�tJ%:�j%=6�Py%=Py%/2
;�S�zy(j%,d%,j%,z%,e%,y%,_%+&A,Nu%,u%-20,Py%):�j%<>tJ%��P(d%,z%,e%,1,0,0):Nu%+=Py%
;��:�
;��ݤky(g%,y%,a%,Q%):�Py%,p%,_%,U%,R%:Py%=(k%-60)/3:Q%=-Q%-40+Py%:p%=((Q%�Py%)�4):Q%=Q%�Py%:U%=-m%-40-p%*Py%+Py%:�p%<>0�p%+=3*�y%:�a%<&A�a%>u%-20�p%=0
;��p%>=6�Py%=Py%/2
;�&�p%=6�Q%>=Py%�Q%-=Py%:p%=7:U%-=Py%
;��y%�_%=wy%�_%=my%
;�.�p%<>0�R%=�Fy(p%,a%-&A,Q%,g%,Py%,_%+&A,U%)
;�=R%
;�,��Al(v%,y%,_%,U%):�y%��P(d%,z%,e%,1,0,0)
;�OQJ%=e%:y_%=z%:�zy(��y%,d%,�H(d%,z%,e%),z%,e%,y%,_%+&A,U%-40,u%-20,-k%+60):�
;�@ݤQ_(g%,y%,a%,Q%):�p%,_%,R%:Q%=-Q%-40:p%=1:�y%�_%=wy%�_%=my%
;�.�a%<&A�a%>u%-20�Q%>k%-60�Q%<0�p%=0�p%+=�y%
;�1�p%<>0�R%=�Fy(p%,a%-&A,Q%,g%,k%,_%+&A,-m%-40)
;�=R%
;�m��zy(p%,d%,j%,z%,e%,y%,_%,U%,x%,n%):�B%,C%,T%,Q%,Qy%,A%,F_%:Qy%=28:F_%=�S(0,0,d%,z%,e%):�F(_%,U%,x%,n%)�
;�"�V(0,7):�F_%=�S(0,0,�T,�I,�R)�
;�9ș&400E6,!FJ%:�Cy(_%-4,U%-4,x%+8,-n%-8,&C):ș&400E6,7
;�*�:�_%,U%:�BYx%,0:�BY0,n%:�BY-x%,0:�y%�
;�v�L(il%,�d%,-1,_%+x%-30,U%-6):�L(p_%,�t(j%,-1),1,_%+x%-40,U%-6):�F(_%,U%-6,x%-&DC,-24)��cy(j%,d%,z%,e%,-1,_%,U%-6)
;�x�:�L(il%,�d%,1,_%+30,U%-6):�L(p_%,�t(j%,-1),-1,_%+40,U%-6):�F(_%+&DC,U%-6,x%-&DC,-24)��cy(j%,d%,z%,e%,1,_%+x%,U%-6)
;���:Q%=40:T%=�n(d%,z%):B%=-1:A%=V%(p%):C%=A%-T%:ȕA%>0�T%>0:B%=�k(d%,z%,B%):T%-=1:A%-=1:�:ȕT%<>0�Q%+Qy%-5<=-n%:B%=�k(d%,z%,B%):T%-=1:�c(p_%,�Sy(B%,e%),_%+30,U%-Q%-20,u%-50,Qy%):Q%+=Qy%:�:B%=gJ%:T%=�S(0,0,d%,z%,e%):A%=C%
;�7ȕA%>0:B%=�a(B%,T%):B%=B%!4:A%-=1:�:�Q%+Qy%-5<=-n%�
;�S�:B%=�a(B%,T%):�B%<>-1��c(p_%,�D_(B%),_%+30,U%-Q%-20,u%-50,Qy%):Q%+=Qy%:B%=B%!4
;��B%=-1�Q%+Qy%-5>-n%
;�B�:�a(B%,T%)<>-1�Q%+Qy%-5>-n%��_%,U%+n%+24:�BY20,0:�81,-&A,-20
;�*�V%(p%)>0��_%,U%-60:�BY20,0:�81,-&A,20
;��:�
;����OJ:�A%,F%,P%,B%,A$,C%,L%:A%=1:�ș&61502,C_%,"Spec"+�A%,0�,,P%;F%:A%+=1:�F%�1:Ri%=A%-3:�J%(A%-3,4):B%=0:ȕB%<=Ri%:ș&41502,C_%,"Spec"+�(B%+1),0�,,P%,L%;F%:P%?L%=&D:�C%=1�4:J%(B%,C%)=�($P%):ȕ?P%<>44:P%+=1:�:P%+=1:�:J%(B%,0)=P%:B%+=1:�
;��A%=1:�ș&61502,C_%,"Easter"+�A%,0�,,P%;F%:A%+=1:�F%�1:Qa%=A%-3:�R%(A%-3,1):B%=0:ȕB%<=A%-3:ș&41502,C_%,"Easter"+�(B%+1),0�,,P%,L%;F%:P%?L%=&D:R%(B%,1)=�($P%):ȕ?P%<>44:P%+=1:�:P%+=1:R%(B%,0)=P%:B%+=1:�:�
;�K��cy(ra%,c%,r%,e%,zu%,a%,Q%):�A$,UJ%,KJ%,Wy%,A%:�A%=0�Ri%:�J%(A%,1)=r%�
;�K�(J%(A%,2)=-1�J%(A%,2)=ra%)�c%>=J%(A%,3)�c%<=J%(A%,4)�A$+=$J%(A%,0)+"/"
;�z�:�:�cJ(UJ%,KJ%,e%):A%=0:Wy%=0:ȕA%<=Qa%:�P(UJ%,KJ%,e%,R%(A%,1)-Wy%,0,0):Wy%=R%(A%,1):�UJ%=c%�KJ%=r%�A$+=$R%(A%,0)+"/"
;�HA%+=1:�:�A$),"/")�ș&40081,,"Trinity.Medium",7*16,7*16�Wy%�Wy%=bi%
;�"�A$<>""��L(Wy%,�A$),zu%,a%,Q%)
;��Wy%<>bi%�ș&40082,Wy%
;��
;�KݤFy(p%,a%,Q%,g%,n%,_%,U%):�by%,Qy%,A%,B%,d%,z%,e%,T%,F%,R%:Qy%=28:Ȏ��
;�s�a%>=30�a%<=u%-20�Q%>=40:�G(v%,A%,B%,d%,z%,e%):�P(d%,z%,e%,p%-1,0,0):by%=(((Q%-40+Qy%)�Qy%)):�by%>0�by%+=V%(p%)
;�8�by%>0�by%<=�n(d%,z%)�g%<>2��x_(d%,z%,by%,g%):by%=-1
;��by%>0�by%-=�n(d%,z%)
;��by%>0�
;�`T%=�S(0,0,d%,z%,e%):B%=gJ%:B%=�a(B%,T%):ȕby%>1�B%<>-1:B%=B%!4:B%=�a(B%,T%):by%-=1:�:�B%=-1�
;��g%<>2��s(d%,z%,e%):VJ%=�
;��:Ȏg%�
;��4:�Wy(B%):VJ%=�
;��2:R%=B%
;��1:�I_(B%):VJ%=�
;��
;��
;��:�g%<>2�by%=0�
;�B�G(v%,A%,B%,d%,z%,e%):�P(d%,z%,e%,p%-1,0,0):�s(d%,z%,e%):VJ%=�
;��
;��
;�	�g%=2
;���a%<=20�Q%>=n%-20:�G(v%,A%,B%,d%,z%,e%):�P(d%,z%,e%,p%-1,0,0):T%=�S(0,0,d%,z%,e%):by%=-((n%-40)�Qy%):B%=�a(gJ%,T%):ȕB%<>-1:B%=B%!4:B%=�a(B%,T%):by%+=1:�:by%+=�n(d%,z%):�V%(p%)<by%�V%(p%)+=1:�N(i%,_%,U%-40,_%+u%-&A,U%-n%+4)
;�N�a%<=20�Q%<=60�Q%>=40�V%(p%)<>0:V%(p%)-=1:�N(i%,_%,U%-40,_%+u%-&A,U%-n%+4)
;��a%<=20�Q%<=60�Q%>=40
;�D:�G(v%,A%,B%,d%,z%,e%):�P(d%,z%,e%,p%-1,0,0):�s(d%,z%,e%):VJ%=�
;�	�:=R%
;�Jݤa(B%,T%):�A%:A%=-1:ȕB%<>-1�A%=-1:A%=�B(�x(B%!&C),T%):�A%=-1�B%=B%!4
;��:�A%=0�A%=B%�A%=-1
;�=A%
;�ݤD_(B%):�A$,A%,C%,Z$,T%:C%=(B%!16>>4)�&F:T%=B%!16�(1<<21):C%-=n_%*(C%=0):�V(0,C%):�((B%!16>>1)�1)=1�Z$=�py(�S_(B%!&C),�ty(B%!&C),-1,Ou%)+"  "
;�BB%+=20:�A%=1�3:ȕ?B%<>&B:A$+=�?B%:B%+=1:�:�A%<>3�A$+=" ":B%+=1
;�+�:�T%>0��A$,1)="="�A$=�A$,2,�A$,"*")-2)
;�
=Z$+A$
;���u_(S$):�A$,Ba%,e:�Z(f%,39,1):A$=�M(f%,16):Ba%=�A$:�A(f%,16,A$+S$):fl%=��M(f%,16):S$=�S$,fl%-Ba%+1):�A(f%,17,S$):fl%=��M(f%,16):S$=�S$,fl%+1):�A(f%,18,S$):�
;���s(c%,r%,Q%):�A%,n%,Il%:�A%=16�18:�A(f%,A%,""):�D(f%,A%,n_%):�:�Z(f%,24,0):nJ%=0:z$="":�Z(f%,21,�((R_%�4)>0)):�Z(f%,23,�((R_%�2)>0)):�Z(f%,38,�((R_%�1)>0)):�M(f%,21,�((R_%�1)>0)):�Z(f%,39,0):�M(f%,38,0):�Jy(26):�A(f%,27,"1"):�A(f%,30,�A("E1"))
;��nu%=1:cu%=1:ju%=1:mu%=1:�M(f%,37,1):�A(f%,33,�A("OT1")):�A(f%,34,�A("Day1")):�A(f%,35,�A("OE1")):�A(f%,1,�U(c%,r%,Q%,-1)):Q_%=c%:N_%=r%:AJ%=Q%:n%=�c:r%=�i:�f(f%,Kl%,�A("alset"),-1):�A(f%,3,�n%):�A(f%,5,"00"):�O(0,0):�Ty(�,�):�C(f%,3):�
;�B��I_(B%):�Wy(B%):O_%=-1:�M(f%,37,1):�f(f%,Kl%,�A("alset"),0):�
;�x��Wy(B%):�d%,z%,e%,n%,r%,A$,ui%,R%:�G(B%!&C,r%,n%,d%,z%,e%):O_%=B%:�Z(f%,38,((B%!16>>20)�1)):A$=�r%:�r%<&A�A$="0"+A$
;���M(f%,21,�((((B%!16>>20)�1)>0)�((B%!16�(1<<21))>1))):�M(f%,38,�((B%!16�(1<<21))>1)):�A(f%,5,A$):nJ%=((B%!16)>>4)�&F:�nJ%=0�nJ%=n_%
;���A%=16�18:�D(f%,A%,nJ%):�:�M(f%,37,0):�A(f%,3,�n%):�f(f%,Kl%,�A("aledit"),-1):�A(f%,1,�U(d%,z%,e%,-1)):Q_%=d%:N_%=z%:AJ%=e%:�Z(f%,21,�(((B%!16)�1)=1)):�Z(f%,23,�(((B%!16)�2)=2)):�Z(f%,39,�((B%!16�(1<<21))>1)):�A(f%,27,"1"):�A(f%,30,�A("E1"))
;�pnu%=1:cu%=1:ju%=1:mu%=1:�Jy(26):�A(f%,33,�A("OT1")):�A(f%,34,�A("Day1")):�A(f%,35,�A("OE1")):�((B%!16)�4)=4�
;�%ui%=�:�Z(f%,24,1):�((B%!16)�8)=8�
;�RR%=((B%!16)>>8)�&FF:�A(f%,27,�R%):nu%=((B%!16)>>16)�&F:�A(f%,30,�J(aJ%,nu%-1))
;���:�Jy(31):cu%=((B%!16)>>8)�&F:�A(f%,33,�J(yl%,cu%-1)):ju%=((B%!16)>>&C)�&F:�A(f%,34,�J(bl%,ju%-1)):mu%=((B%!16)>>16)�&F:�A(f%,35,�J(rl%,mu%-1))
;��
;���Z(f%,24,0)
<p�:z$="":B%+=20:�A%=16�18:A$="":ȕ?B%<>&B:A$+=�?B%:B%+=1:�:B%+=1:�A(f%,A%,A$):z$+=A$:�:�Ty(�ui%,�):�C(f%,3):�
<f��Ty(sa%,dJ%):!J%=f%:ș&400CB,,J%:�dJ%�J%!28=-1:J%!4=�g-&64-(J%!&C-J%!4):J%!&C=J%!4+&3E8:J%!16=900
<)J%!8=J%!16 -&7D0*��sa%:ș&400C5,,J%:�
<W��hJ(sa%,dJ%):!J%=Ry%:ș&400CB,,J%:�dJ%�J%!28=-1:J%!4=&64:J%!&C=J%!4+&3E8:J%!16=900
<)J%!8=J%!16 -&7D0*��sa%:ș&400C5,,J%:�
<k��Jy(s%):�A%:�Z(f%,s%,1):�Z(f%,57-s%,0):�A%=27�30:�M(f%,A%,-(s%=31)):�:�A%=33�35:�M(f%,A%,-(s%=26)):�:�
<CݤTy:�T%,B%,F%:T%=�x(�Y):B%=Z_%:ȕB%<>-1��F%:�x(B%!&C)=T%�F%=�
<B%=B%!4:�:=F%
<O��xy:�F%,c%,r%,Q%,uy%,Hu%,Qy%,B%,Ml%,fJ%,oy%:�G(_J%,F%,B%,Ml%,fJ%,oy%):Ȏ��
<	�D_%=1:�Du%�F%=�Ty�F%=�
<
C�D_%=2�(�L(Dy%,fy%,My%)>�L(Ml%,fJ%,oy%)-�H(Ml%,fJ%,oy%)+7):F%=�
<�D_%=3�Dy%=1:F%=�
<	F%=�
<
�:�F%��Iy%�
<�t%<>�G(3)�Ru%��Q_(t%)
<)t%=�G(3):�H(Dy%,fy%,My%):�r(i%,-1,-1)
< �:uy%=0:Hu%=0:Qy%=0:�ly%<>0�
<
Ȏly%>>4�
<�0:uy%=ly%�&F
<�1:uy%=7*(ly%�&F)
<�2:Hu%=ly%�&F
<�3:Qy%=ly%�&F
<��:c%=Dy%:r%=fy%:Q%=My%:�P(c%,r%,Q%,-uy%,-Hu%,-Qy%):F%=�S(0,0,c%,r%,Q%):B%=Z_%:c%=�:ȕB%<>-1�c%:�B(B%!&C,F%)=-1��v(B%):B%=B%!4�c%=�
<�
<�:�
<FݤXy(n%,r%):�A%:A%=�:�n%<0�n%>23�r%<0�r%>59�A%=�:�B(�A("ErrTime"))
<=A%
<��V_:�F_%,n%,r%,Il%,A$,Z$,F$,Wy%:A$=�M(f%,16):Z$=�M(f%,17):F$=�M(f%,18):n%=��M(f%,3):r%=��M(f%,5):�A$+Z$+F$<>""��Xy(n%,r%)�
<mWy%=Wy%�(-�Z(f%,21))�((-�Z(f%,23))<<1)�(nJ%<<4):Wy%=Wy%�((-�Z(f%,38))<<20)�((-�Z(f%,39))<<21):�Z(f%,24)�
<�Z(f%,26)�
<*Wy%=Wy%�&C�((��M(f%,27))<<8)�(nu%<<16)
<+�Wy%=Wy%�4�(cu%<<8)�(ju%<<&C)�(mu%<<16)
< �
<!U�:F_%=�S(r%,n%,Q_%,N_%,AJ%):�ay(F_%,Wy%,A$,Z$,F$):�l:�x:�n:vy%=�:�Iy%�Z%(t%)=3��K
<""��A$+Z$+F$=""��B(�A("ErrMes"))
<#�:�
<$B��ay(F_%,Wy%,A$,Z$,F$):�S%,B%,xy%,T%,ny%,Ny%:�O_%<>-1��Sy(O_%)
<%lxy%=�:S%=�(A$+Z$+F$)+3+20:Ny%=Z_%:ny%=-1:ȕNy%<>-1��xy%:T%=Ny%!&C:�B(F_%,T%)=-1�xy%=��ny%=Ny%:Ny%=Ny%!4
<&\�:B%=�w(s_%,S%+1,�):!B%=ny%:B%!4=Ny%:B%!8=S%:B%!&C=F_%:B%!16=Wy%:�ny%=-1�Z_%=B%�ny%!4=B%
<'�Ny%<>-1�!Ny%=B%
<(#$(B%+20)=A$+�&B+Z$+�&B+F$+�&B:�
<)0��v(B%):�Sy(B%):�l:�x:vy%=�:�Iy%�Z%(t%)=3��K
<*�B%=O_%��n
<+�B%=pJ%�pJ%=-1:�X(Ry%)
<,�
<-9��Sy(B%):�ny%,Ny%:ny%=!B%:Ny%=B%!4:�ny%<>-1�ny%!4=Ny%
<.�Ny%<>-1�!Ny%=ny%
</�Z_%=B%�Z_%=Ny%
<0�Ly(s_%,B%,�):�
<1%��n:�X(f%):�X(sy%):�Iy%��C(i%,-1)
<2O_%=-1:�
<3%��pu(Yy%,ry%,q%,s%,H_%):�A%:Ȏs%�
<4�1:�`(Q_%,N_%,AJ%,q%,s%)
<5�6:�O(H_%,0)
<6�7:�O(-H_%,0)
<7�8:�O(0,&A*H_%)
<8�9:�O(0,-&A*H_%)
<9�&A:�O(0,H_%)
<:�&B:�O(0,-H_%)
<;�19:�V_
<<
�20:�n
<=�22:�F(Xl%,Yy%,ry%,q%,s%)
<>�24:�Ty(��Z(q%,24),�)
<?�26,31:�Jy(s%)
<@�28,29:�g%=1�s%=57-s%
<A;A%=��M(q%,27):A%+=(s%-27)*2-3:�A%=0�A%=&FF��A%=256�A%=1
<B�A(q%,27,�A%)
<C*�30:!aJ%=�h("E"):�F(aJ%,Yy%,ry%,q%,s%)
<D�33:�F(yl%,Yy%,ry%,q%,s%)
<E�34:�F(bl%,Yy%,ry%,q%,s%)
<F�35:�F(rl%,Yy%,ry%,q%,s%)
<G�37:�v(O_%)
<H�38:�M(f%,21,��Z(f%,38))
<I=�39:�M(f%,21,�(�Z(f%,39)��Z(f%,38))):�M(f%,38,��Z(f%,39))
<J�:�
<K'��`J(Yy%,ry%,q%,s%):�A%:W_%=0:Ȏs%�
<L �7:�Yy(pJ%,�Z(Ry%,9)):pJ%=-1
<M�8:�v(pJ%)
<N(�9:�A%=&A�&D:�M(q%,A%,���Z(q%,s%)):�
<O�&B,&C:�g%=1�s%=23-s%
<P;A%=��M(q%,&A):A%+=(s%-&A)*2-3:�A%=0�A%=&FF��A%=256�A%=1
<Q�A(q%,&A,�A%)
<R]�&D:!J%=q%:ș&400CB,,J%:Yy%=J%!4+686+64:ry%=J%!16-312:!aJ%=�h("ED"):�F(aJ%,Yy%,ry%,q%,s%)
<S�:�
<T%��Yy(B%,`i%):�B%<>O_%��O_%:O_%=-1
<U
�`i%�
<V�(B%!16�4)=4�
<W�(B%!16�8)=8�
<X
�T_(B%,�)
<Y��lJ(B%)
<Z�
<[!�B%!16=(B%!16)�(1<<20):vy%=-1
<\�
<]��T_(B%,�)
<^"�:�l:�x:vy%=�:�Iy%�Z%(t%)=3��K
<_W_%=0:�X(Ry%):�
<`@��T_(B%,`i%):�c%,T%,A$,qy%,Vy%,d%,z%,e%,F_%,Wy%,Z$,F$,:�`i%�
<aDF_%=�Y:c%=��M(q%,&A):A$=�M(Ry%,&D):T%=0:ȕA$<>�J(aJ%,T%):T%+=1:�
<b:�F_%=B%!&C:c%=((B%!16)>>8)�&FF:T%=(((B%!16)>>16)�&F)-1
<c��:�G(F_%,qy%,Vy%,d%,z%,e%):�ry(qy%,Vy%,d%,z%,e%,c%,T%):F_%=�S(qy%,Vy%,d%,z%,e%):Wy%=B%!16:c%=B%+20:A$="":ȕ?c%<>&B:A$+=�?c%:c%+=1:�:c%+=1:ȕ?c%<>&B:Z$+=�?c%:c%+=1:�:c%+=1:ȕ?c%<>&B:F$+=�?c%:c%+=1:�:�Sy(B%):�ay(F_%,Wy%,A$,Z$,F$):�
<d~��ry(�qy%,�Vy%,�d%,�z%,�e%,c%,T%):�uy%,Sa%,Ha%:Sa%=c%:Ha%=T%:�:c%=Sa%:T%=Ha%:�T%=0�qy%+=c%:c%=qy%�60:qy%=qy%�60:�c%>0�T%=1
<e1�T%=1�Vy%+=c%:c%=Vy%�24:Vy%=Vy%�24:�c%>0�T%=2
<f%uy%=0:�T%=2�uy%=c%��T%=3�uy%=7*c%
<g.ȕuy%>0:�P(d%,z%,e%,1,0,0):uy%-=1:�:�T%=4�
<h%ȕc%>0:�P(d%,z%,e%,0,1,0):c%-=1:�
<i�:�T%=5�
<j%ȕc%>0:�P(d%,z%,e%,0,0,1):c%-=1:�
<k'�:��B(�Y,�S(qy%,Vy%,d%,z%,e%))=-1:�
<l���lJ(B%):�F_%,qy%,Vy%,d%,z%,e%,A$,Z$,C%,Wy%,c%:Wy%=B%!16:c%=B%+20:�G(B%!&C,qy%,Vy%,d%,z%,e%):�vy(d%,z%,e%,Wy%):F_%=�S(qy%,Vy%,d%,z%,e%):ȕ?c%<>&B:A$+=�?c%:c%+=1:�:c%+=1:ȕ?c%<>&B:Z$+=�?c%:c%+=1:�:c%+=1:ȕ?c%<>&B:F$+=�?c%:c%+=1:�
<m#�Sy(B%):�ay(F_%,Wy%,A$,Z$,F$):�
<n|��vy(�d%,�z%,�e%,F%):�p%,c%,r%:�:p%=(F%>>8)�&F:c%=(F%>>&C)�&F:r%=(F%>>16)�&F:ȕr%>0:�P(d%,z%,e%,-d%+1,1,0):r%-=1:�:Ȏp%�
<oD�1,2,3:j%=�H(d%,z%,e%):ȕj%<>c%:d%+=1:j%=�`(j%+1):�:d%+=(p%-1)*7
<pQ�4,5,6:d%=�D(z%,e%):j%=�H(d%,z%,e%):ȕj%<>c%:d%-=1:j%=�`(j%+6):�:d%-=(p%-4)*7
<q%�:��B(�Y,�S(�i,�c,d%,z%,e%))=-1:�
<r���O(Ku%,r%):�Il%,M%,Hu%,uy%,la%,A$:Hu%=r%<>0:uy%=�:r%+=��M(f%,5):n%=��M(f%,3):M%=�D(N_%,AJ%):n%+=Ku%:Ku%=Ku%<>0:�r%<0�n%-=1:r%+=60:Ku%=�
<s�r%>59�n%+=1:r%-=60:Ku%=�
<t�n%<0�Q_%-=1:n%+=24:uy%=�
<u�n%>23�Q_%+=1:n%-=24:uy%=�
<v�Q_%<1�N_%-=1:uy%=�
<w�Q_%>M%�N_%+=1:Q_%=1:uy%=�
<x�N_%<1�AJ%-=1:N_%=&C:uy%=�
<y�N_%>&C�AJ%+=1:N_%=1:uy%=�
<z'M%=�D(N_%,AJ%):�Q_%=0�Q_%>M%�Q_%=M%
<{$�uy%��A(f%,1,�U(Q_%,N_%,AJ%,-1))
<|�Ku%��A(f%,3,�n%)
<})A$=�r%:�r%<&A�A$="0"+A$:�r%=0�A$="00"
<~�Hu%��A(f%,5,A$)
<�
<�3��z_:�S%,C%,B%:C%=-1:Z_%=-1:w%=�r$:�Fu%�w%<>0�
<�=ȕ��#w%:S%=��#w%:B%=�w(s_%,S%+1,�):�C%<>-1�C%!4=B%�Z_%=B%
<�:!B%=C%:B%!8=S%:ș&C,4,w%,B%+&C,S%-&C:C%=B%:�x_%��w(�1)
<��:�Z_%<>-1�B%!4=-1
<��:�#w%:w%=0:�
<�9��cJ(�c%,�r%,Q%):�el%,ey%:el%=(Q%+1)�19:�el%=0�el%=19
<�Aey%=(�(1.25*Q%)+6)�7:c%=Y%(el%-1,ey%):�c%>31�c%-=31:r%=4�r%=3
<��
<�>��Ml:�si%,Ci%,d%,j%,c%:�Y%(18,6):�si%=1�19:�Ci%=0�6:Ȏsi%�
<��&E:j%=1
<��3:j%=2
<��&B:j%=4
<��19:j%=6
<��8:j%=7
<��16:j%=9
<��5:j%=&A
<�
�&D:j%=&C
<��2:j%=&D
<�
�&A:j%=&F
<�
�18:j%=17
<��7:j%=18
<�
�&F:j%=20
<��4:j%=21
<�
�&C:j%=23
<��1:j%=24
<��9:j%=26
<�
�17:j%=27
<��6:j%=28
<�?�:d%=21+j%:j$=�A("Mon3")+" ":�d%+=1:c%=5-(d%�7):�c%=-1�c%=6
<�<�c%=Ci%:Y%(si%-1,Ci%)=d%:�d%>31�d%-=31:j$=�A("Mon4")+" "
<�	�:�:�
<����ru:cy%=2:ai%=&B:IJ%=�:hJ%=1:Wi%=�Ay(�A("GYM")+�ay("GYM",1,3,"\","")+"\"):Aa%=�zy(Wi%,3,"",5,"A0-9"):Ql%=�C("CAM","CAM",1,3):�Y(Ql%,2,Wi%):�
<�ݤX_=Ql%
<�I��BJ(A%):B%(A%)=&77d:W%(A%)=&fff:S%(A%)=My%:M$(A%)=�A("CalTab"):�UJ:�
<�-��CJ(e%,y%,_%,U%):�cy%=1��uJ(e%,y%,_%,U%)
<��cy%=2��Nu(e%,y%,_%,U%)
<��
<���k_(l%,cl%):�A%:Ȏ!l%�
<�%�0,1:A%=cy%:cy%=!l%+1:mJ%=cy%<>A%
<��2:Ȏl%!4�
<�%�0:�v%<>My%+(cy%=1)�v%=My%:t%=cl%
<�)�1:�v%<>My%+1+(cy%=1)�v%=My%+1:t%=cl%
<�)�2:�v%<>My%-1+(cy%=1)�v%=My%-1:t%=cl%
<��3:A%=�$Aa%:Ȏ��
<�,�A%<&77d:�B(�O("ErrMin",�&77d,"","",""))
<�,�A%>&fff:�B(�O("ErrMax",�&fff,"","",""))
<�!�v%<>A%+(cy%=1)�v%=A%:t%=cl%
<��
<��
<��:�
<�0��Ry(p%):v%+=(3-cy%)*p%:�v%<B%(t%)�v%=B%(t%)
<��v%>W%(t%)�v%=W%(t%)
<��
<�3��Uu(g%,y%,a%,Q%,i_%,qJ%):�Va%,d%,z%,e%:�g%<>2�
<�$Va%=�jy(y%,a%,Q%,d%,z%,e%):�Va%�
<�
ȎhJ%+g%�
<�(�5,3:�H(d%,z%,e%):t%=�G(3):v%=S%(t%)
<��6,2:�s(d%,z%,e%):VJ%=�
<��
<��
<��:�
<�ݤby(s%,By%):o%=�:ȎBy%�
<��414:�Ry(1)
<��415:�Ry(-1)
<��30:�v%<>My%+(cy%=1)�v%=My%
<�	o%=�
<�	�:=o%
<�@��NJ(l%,x%):�bJ%=Ay%��g(x%,6,!l%):�W(Ay%,0,-1):�S(Ay%,!l%,1)
<��
<�ݤry(q%,s%,By%):=�
<�5��v_(w%):�#w%,cy%:�#w%,IJ%+5:�#w%,!FJ%:�#w%,hJ%:�
<�4��eJ(w%):cy%=�#w%:IJ%=�#w%-5:ai%=�#w%:hJ%=�#w%:�
<� ��du(x%,Fy%,l%,a%,Q%):ȎFy%�
<��7,1,4,5:�g%<>2�Z(x%,Fy%,1)
<�;�6:�W(Ay%,0,-1):�S(Ay%,�u(x%,6),1):�F(Ay%,a%,Q%,x%,Fy%)
<ˋ�9:�M(x%,9)=�A("SetAlarm")+"/"+�A("GotoDiary")��A(x%,9,�A("GotoDiary")+"/"+�A("SetAlarm"))��A(x%,9,�A("SetAlarm")+"/"+�A("GotoDiary"))
<��:�
<ͺ��Ou(x%):�Z(x%,7,-(cy%=1)):�Z(x%,1,-(cy%=2)):�g(x%,6,!FJ%):�Z(x%,4,-�IJ%):�Z(x%,5,-IJ%):�hJ%=1��A(x%,9,�A("GotoDiary")+"/"+�A("SetAlarm"))��A(x%,9,�A("SetAlarm")+"/"+�A("GotoDiary"))
<��
<�"��KJ(x%):�Z(x%,7)�cy%=1�cy%=2
<�WIJ%=�Z(x%,5):!FJ%=�u(x%,6):�M(x%,9)=�A("GotoDiary")+"/"+�A("SetAlarm")�hJ%=1�hJ%=2
<��
<�?ݤjy(y%,a%,Q%,�d%,�z%,�e%):�m_%,A_%,jy%,yy%,fu%,tu%:�cy%=1�
<��m_%=(u%-32)/2:A_%=(k%-50)/6:jy%=m_%/7:yy%=(A_%-&A)/8:e%=v%+�y%:z%=2*((-Q%-50)�A_%)+((a%-20)�((u%-8)/2)):a%-=20+(z%�2)*((u%-8)/2):Q%=-Q%-50-((z%�2)*A_%):z%+=1:fu%=(a%+jy%*(1-0.12)+20*�y%)�jy%:tu%=((Q%-&A-yy%)�yy%)-1
<�+�fu%>0�fu%<8�d%=1+fu%+7*tu%-�H(1,z%,e%)
<��:m_%=(u%-40)/2:A_%=(k%-50)/3:jy%=m_%/7:yy%=(A_%-&A)/8:e%=v%:z%=2*((-Q%-50)�A_%)+((a%-20)�((u%-8)/2)):a%-=20+(z%�2)*((u%-8)/2):Q%=-Q%-50-((z%�2)*A_%):z%+=1+6*�y%:fu%=(a%-jy%*0.25+20*�y%)�jy%-1:tu%=Q%�yy%:�tu%>0�tu%<8�d%=1+tu%+7*fu%-�H(1,z%,e%)
<��:�e%<>-1�
<�1�d%<=0�d%>�D(z%,e%)�e%>&fff�e%=-1:d%=-1:z%=-1
<�
�:=(e%>0)
<ك��Nu(e%,y%,_%,U%):�z%,j%,c%,jy%,yy%,pa%,A$,r%,A%,B%,C%,D%,E%,F%,G%,H%:m_%=(u%-40)/2:A_%=(k%-50)/3:yy%=(A_%-&A)/8:jy%=m_%/7:�y%�
<��e%<W%(t%)��I(1,_%,U%)
<���e%>B%(t%)��I(0,_%,U%)
<���:Qu%=�P("Homerton.Medium",20,20):lu%=�P("Homerton.Medium",&D,&D):ou%=�P("Homerton.Medium",9,9):�V(0,7):�L(Qu%,�e%,0,_%+u%/2,U%-8):�r%=1�6:z%=r%+6*y%:a%=(r%-1)�2*(u%-8)/2+20-20*y%:Q%=50+(r%-1)�2*A_%:�F(_%+a%,U%-Q%,m_%,-A_%)�
<���L(lu%,�X(z%,-1),-1,_%+a%,U%-Q%):j%=�H(1,z%,e%)-1:ș&4008A,ou%:Q%+=yy%-6:�c%=1�7:ș&40086,,�t(c%,2),1<<4,_%+a%,U%-Q%-yy%*c%:�:a%+=jy%:A%=U%-Q%:D%=_%+a%:F%=�D(z%,e%):G%=j%:H%=jy%:B%=-yy%:�e%=My%�z%=fy%�C%=Dy%�C%=0
<�h�IJ%�C%<>0�C%=0:ș&400E6,!FJ%:ȓ_%+a%+((j%-1+Dy%)�7+0.25)*jy%,U%-Q%-((j%-1+Dy%)�7+0.25)*yy%,jy%,-yy%
<��z
<�!�:�:�U(Qu%):�U(lu%):�U(ou%):�
<���uJ(v%,y%,_%,U%):�z%,j%,c%,jy%,ka%,A_%,A$,A%,B%,C%,D%,E%,F%,G%,H%:m_%=(u%-32)/2:A_%=(k%-50)/6:jy%=m_%/7:yy%=(A_%-&A)/8:e%=v%+y%:�y%�
<��v%+1<W%(t%)��I(1,_%,U%)
<���v%>B%(t%)��I(0,_%,U%)
<��:�e%<=&fff�
<��Qu%=�P("Homerton.Medium",20,20):lu%=�P("Homerton.Medium",&A,&A):ou%=�P("Homerton.Medium",7,7):�V(0,7):�L(Qu%,�e%,0,_%+u%/2,U%-8):�z%=1�&C:a%=(z%-1)�2*(u%-8)/2+20-20*y%:Q%=50+(z%-1)�2*A_%:�F(_%+a%,U%-Q%,m_%,-A_%)�
<���L(lu%,�X(z%,-1),-1,_%+a%,U%-Q%):j%=�H(1,z%,e%)-1:ș&4008A,ou%:Q%+=yy%+4:�c%=1�7:ș&40086,,"  "+�t(c%,2),1<<4,_%+a%+jy%*c%-jy%,U%-Q%-yy%:�:Q%+=yy%:A%=_%+a%-jy%:E%=U%-Q%-yy%:F%=�D(z%,e%):G%=j%:H%=jy%:B%=yy%:�e%=My%�z%=fy%�C%=Dy%�C%=0
<�m�IJ%�C%<>0�C%=0:ș&400E6,!FJ%:ȓ_%+a%+((j%-1+Dy%)�7+0.12)*jy%,U%-Q%-((j%-1+Dy%)�7+0.18)*yy%,jy%*0.76,-yy%
<��R
<��:�
<��:�U(Qu%):�U(lu%):�U(ou%):�
<���UJ:�P%,A%,Oi%,da%,C,F,w,H,S,Y,Z,_,M,I,G,P,A:�da%456:C=&D:F=&E:w=&F:H=5:S=6:Y=0:Z=3:_=0:M=4:I=7:G=8:P=9:A=&A:�Oi%=0�2�2:P%=da%:[OPTOi%:.R:STMFD(C)!,{F}:MOV G,1:MOV P,2:MOV A,#0:MOV2,#1<<4:ADR1,D:.O:ADD S,S,#1:ADD A,A,#1:CMP P,A:BLEQ L:MUL Z,I,S
<��ADD Z,Z,Y:SWI &40086:CMP P,A:BLEQ V:CMP S,#7:SUBEQ M,M,G:�Q S,#0:ADD1,1,#8:CMP A,H:BNE O:LDMFD(C)!,{pc}:.z:STMFD(C)!,{F}:MOV G,1:MOV P,2:MOV A,#0:MOV2,#1<<4:ADR1,D:.s:ADD S,S,#1:ADD A,A,#1:CMP P,A:BLEQ L:MUL M,G,S
<��ADD M,M,_:SWI &40086:CMP P,A:BLEQ V:CMP S,#7:ADDEQ Z,Z,I:�Q S,#0:ADD1,1,#8:CMP A,H:BNE s:LDMFD(C)!,{pc}:.L:STMFD(C)!,{F,1-2}:LDR2,FJ%:B K:.V:STMFD(C)!,{F,1-2}:MOV2,#7:.K:MOV1,#0:SWI &400F3:LDMFD(C)!,{pc,1-2}:.FJ%&ai%:.D
<�<]�A%=1�31:[OPTOi%:=�2-2*(A%<&A)," ")+�A%+�0:ALIGN:]�:�:�
�
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 37  |BasCompress v1.7|
00000030  31 20 28 31 39 20 53 65  70 20 31 39 39 36 29 0d  |1 (19 Sep 1996).|
00000040  00 03 35 f2 59 4a 3a 77  25 3d 30 3a 70 6c 25 3d  |..5.YJ:w%=0:pl%=|
00000050  a3 3a 74 69 25 3d 2d 31  3a ee 85 f2 4e 79 3a 85  |.:ti%=-1:...Ny:.|
00000060  a2 9e 2c f6 24 2b 22 20  61 74 20 6c 69 6e 65 20  |..,.$+" at line |
00000070  22 2b c3 9e 0d 00 04 cc  67 75 25 3d 2d 31 3a 57  |"+......gu%=-1:W|
00000080  75 25 3d 30 3a 77 24 3d  22 21 4f 72 67 61 6e 69  |u%=0:w$="!Organi|
00000090  73 65 72 22 3a de 4b 25  35 31 32 3a 4a 25 3d 4b  |ser":.K%512:J%=K|
000000a0  25 2b 32 35 36 3a f2 59  5f 3a 77 25 3d 8e 22 3c  |%+256:.Y_:w%=."<|
000000b0  4f 72 67 61 6e 69 73 65  72 24 44 69 72 3e 2e 52  |Organiser$Dir>.R|
000000c0  65 73 6f 75 72 63 65 73  2e 21 4c 61 6e 67 75 61  |esources.!Langua|
000000d0  67 65 22 3a 42 24 3d be  23 77 25 3a d9 23 77 25  |ge":B$=.#w%:.#w%|
000000e0  3a 77 25 3d 30 3a 3a 58  3d 31 2e 32 36 3a 77 25  |:w%=0::X=1.26:w%|
000000f0  3d 8e 28 22 3c 4f 72 67  61 6e 69 73 65 72 24 44  |=.("<Organiser$D|
00000100  69 72 3e 2e 52 65 73 6f  75 72 63 65 73 2e 22 2b  |ir>.Resources."+|
00000110  42 24 2b 22 2e 4d 65 73  73 61 67 65 73 22 29 3a  |B$+".Messages"):|
00000120  e7 77 25 3c 3e 30 8c 58  3d bb c1 be 23 77 25 2c  |.w%<>0.X=...#w%,|
00000130  32 29 3a d9 23 77 25 3a  77 25 3d 30 8b 58 3d 30  |2):.#w%:w%=0.X=0|
00000140  0d 00 05 24 e7 58 3c 31  2e 32 36 8c 5f 24 3d 42  |...$.X<1.26._$=B|
00000150  24 3a 42 24 3d 22 45 6e  67 6c 69 73 68 22 8b 5f  |$:B$="English"._|
00000160  24 3d 22 22 0d 00 06 9e  76 24 3d 22 3c 4f 72 67  |$=""....v$="<Org|
00000170  61 6e 69 73 65 72 24 44  69 72 3e 2e 52 65 73 6f  |aniser$Dir>.Reso|
00000180  75 72 63 65 73 2e 22 2b  42 24 3a f2 4a 4a 28 76  |urces."+B$:.JJ(v|
00000190  24 2b 22 2e 4d 65 73 73  61 67 65 73 22 29 3a f2  |$+".Messages"):.|
000001a0  48 4a 28 a4 41 28 22 54  69 74 6c 65 22 29 2c 22  |HJ(.A("Title"),"|
000001b0  3c 4f 72 67 61 6e 69 73  65 72 24 44 69 72 3e 22  |<Organiser$Dir>"|
000001c0  2c c3 31 2e 32 36 2b 22  20 28 31 36 20 4e 6f 76  |,.1.26+" (16 Nov|
000001d0  20 39 37 29 22 2c b9 29  3a c8 99 36 36 b8 57 75  | 97)",.):..66.Wu|
000001e0  25 3a 67 75 25 3d 57 75  25 2b 35 30 30 3a c8 95  |%:gu%=Wu%+500:..|
000001f0  ac 56 75 25 3a f2 77 28  31 29 3a ce 3a f2 4e 79  |.Vu%:.w(1):.:.Ny|
00000200  3a e0 0d 00 07 30 dd f2  4e 79 3a e7 70 6c 25 3d  |:....0..Ny:.pl%=|
00000210  b9 8c c8 99 26 34 30 36  43 32 3a 85 a2 9e 2c f6  |....&406C2:...,.|
00000220  24 2b 22 20 61 74 20 6c  69 6e 65 20 22 2b c3 9e  |$+" at line "+..|
00000230  3a e0 0d 00 08 2f 70 6c  25 3d b9 3a 68 24 3d f6  |:..../pl%=.:h$=.|
00000240  24 2b 22 20 61 74 20 6c  69 6e 65 20 22 2b c3 9e  |$+" at line "+..|
00000250  3a 46 61 25 3d 9f 3a ee  85 85 a2 46 61 25 2c 68  |:Fa%=.:....Fa%,h|
00000260  24 0d 00 09 14 e7 77 25  3c 3e 30 8c d9 23 77 25  |$.....w%<>0..#w%|
00000270  3a 77 25 3d 30 0d 00 0a  15 f2 62 4a 3a f2 69 3a  |:w%=0.....bJ:.i:|
00000280  c8 99 26 34 30 30 44 44  3a e1 0d 00 0b 33 dd f2  |..&400DD:....3..|
00000290  77 28 4e 6c 25 29 3a ea  41 24 2c 56 69 25 2c 55  |w(Nl%):.A$,Vi%,U|
000002a0  6c 25 2c 4a 5f 25 2c 6d  4a 25 3a 6d 4a 25 3d a3  |l%,J_%,mJ%:mJ%=.|
000002b0  3a e7 76 79 25 80 5a 75  25 8c f2 50 79 0d 00 0c  |:.vy%.Zu%..Py...|
000002c0  42 e7 52 75 25 80 76 79  25 3c 3e 49 69 25 8c 49  |B.Ru%.vy%<>Ii%.I|
000002d0  69 25 3d 76 79 25 3a f2  66 28 69 25 2c 6b 69 25  |i%=vy%:.f(i%,ki%|
000002e0  2c a4 41 28 22 54 69 74  6c 65 22 29 2b c4 2d 28  |,.A("Title")+.-(|
000002f0  76 79 25 3d b9 29 2c 22  20 2a 22 29 2c b9 29 0d  |vy%=.)," *"),.).|
00000300  00 0d 12 e7 4e 6c 25 80  31 8c 55 6c 25 3d 26 36  |....Nl%.1.Ul%=&6|
00000310  34 0d 00 0e 11 e7 47 24  3c 3e 22 22 8c 55 6c 25  |4.....G$<>"".Ul%|
00000320  3d 30 0d 00 0f 18 e7 28  58 4a 25 3c 3e 2d 31 29  |=0.....(XJ%<>-1)|
00000330  80 49 79 25 8c 55 6c 25  3d 30 0d 00 10 29 4e 6c  |.Iy%.Ul%=0...)Nl|
00000340  25 3d 28 4e 6c 25 84 28  31 3c 3c 35 29 29 80 ac  |%=(Nl%.(1<<5))..|
00000350  28 31 2b 28 33 3c 3c 31  37 29 29 3a e7 55 6c 25  |(1+(3<<17)):.Ul%|
00000360  3e 30 8c 0d 00 11 39 c8  99 36 36 b8 4d 61 25 3a  |>0....9..66.Ma%:|
00000370  c8 95 4d 61 25 3e 57 75  25 3a 57 75 25 2b 3d 26  |..Ma%>Wu%:Wu%+=&|
00000380  36 34 3a ce 3a c8 99 26  34 30 30 45 31 2c 4e 6c  |64:.:..&400E1,Nl|
00000390  25 2c 4b 25 2c 57 75 25  b8 56 69 25 0d 00 12 18  |%,K%,Wu%.Vi%....|
000003a0  cc c8 99 26 34 30 30 43  37 2c 4e 6c 25 2c 4b 25  |...&400C7,Nl%,K%|
000003b0  b8 56 69 25 0d 00 13 0c  cd 3a c8 8e 56 69 25 ca  |.Vi%.....:..Vi%.|
000003c0  0d 00 14 0b c9 30 3a c8  8e b9 ca 0d 00 15 14 c9  |.....0:.........|
000003d0  58 4a 25 3c 3e 2d 31 80  49 79 25 3a f2 4b 75 0d  |XJ%<>-1.Iy%:.Ku.|
000003e0  00 16 18 c9 57 75 25 3e  67 75 25 80 67 75 25 3c  |....Wu%>gu%.gu%<|
000003f0  3e 2d 31 3a f2 55 5f 0d  00 17 24 c9 28 55 6c 25  |>-1:.U_...$.(Ul%|
00000400  3c 3e 30 84 47 24 3c 3e  22 22 29 80 74 69 25 3c  |<>0.G$<>"").ti%<|
00000410  3e a4 47 79 3a f2 6d 3a  f2 61 5f 0d 00 18 0f c9  |>.Gy:.m:.a_.....|
00000420  47 24 3c 3e 22 22 3a f2  6f 75 0d 00 19 05 cb 0d  |G$<>"":.ou......|
00000430  00 1a 0a c9 31 3a f2 49  4a 0d 00 1b 10 c9 32 3a  |....1:.IJ.....2:|
00000440  e7 21 4b 25 3d 54 5f 25  8c 0d 00 1c 07 f2 50 4a  |.!K%=T_%......PJ|
00000450  0d 00 1d 19 cc 3a e7 21  4b 25 3d 69 25 80 4a 4a  |.....:.!K%=i%.JJ|
00000460  25 8c 4b 25 21 32 30 3d  30 0d 00 1e 0d e7 ac a4  |%.K%!20=0.......|
00000470  68 79 8c f2 46 5f 0d 00  1f 20 c8 99 26 34 30 30  |hy..F_... ..&400|
00000480  43 35 2c 2c 4b 25 3a e7  21 4b 25 3d 69 25 80 4a  |C5,,K%:.!K%=i%.J|
00000490  4a 25 8c f2 41 75 0d 00  20 05 cd 0d 00 21 0d c9  |J%..Au.. ....!..|
000004a0  33 3a c8 8e 21 4b 25 ca  0d 00 22 0a c9 66 25 3a  |3:..!K%..."..f%:|
000004b0  f2 6e 0d 00 23 0b c9 54  5f 25 3a f2 62 0d 00 24  |.n..#..T_%:.b..$|
000004c0  0c c9 52 79 25 3a f2 59  79 0d 00 25 0b c9 5f 79  |..Ry%:.Yy..%.._y|
000004d0  25 3a f2 74 0d 00 26 0c  c9 47 4a 25 3a f2 58 5f  |%:.t..&..GJ%:.X_|
000004e0  0d 00 27 0b c9 47 79 25  3a f2 69 0d 00 28 0c 7f  |..'..Gy%:.i..(..|
000004f0  f2 58 28 21 4b 25 29 0d  00 29 05 cb 0d 00 2a 29  |.X(!K%)..)....*)|
00000500  c9 34 3a e7 30 3c 3e 30  8c c8 99 26 34 30 30 45  |.4:.0<>0...&400E|
00000510  39 2c 33 36 2c 2c 22 70  74 72 5f 64 65 66 61 75  |9,36,,"ptr_defau|
00000520  6c 74 22 2c 31 0d 00 2b  06 c9 35 0d 00 2c 29 c9  |lt",1..+..5..,).|
00000530  36 3a e7 52 75 25 8c f2  65 28 4b 25 21 26 43 2c  |6:.Ru%..e(K%!&C,|
00000540  4b 25 21 31 36 2c 4b 25  21 38 2c 21 4b 25 2c 4b  |K%!16,K%!8,!K%,K|
00000550  25 21 34 29 0d 00 2d 06  c9 37 0d 00 2e 1a c9 38  |%!4)..-..7.....8|
00000560  3a f2 4d 75 28 21 4b 25  2c 4b 25 21 34 2c 4b 25  |:.Mu(!K%,K%!4,K%|
00000570  21 32 34 29 0d 00 2f 0a  c9 39 3a f2 79 4a 0d 00  |!24)../..9:.yJ..|
00000580  30 11 c9 26 42 2c 26 43  3a 77 4a 25 3d a4 7a 0d  |0..&B,&C:wJ%=.z.|
00000590  00 31 0e c9 31 37 2c 31  38 3a f2 79 75 0d 00 32  |.1..17,18:.yu..2|
000005a0  1f c9 31 39 3a e7 4b 25  21 34 3d 76 75 25 80 4b  |..19:.K%!4=vu%.K|
000005b0  25 21 31 36 3d 26 34 41  46 38 30 8c 0d 00 33 31  |%!16=&4AF80...31|
000005c0  41 24 3d a4 4e 28 4b 25  2b 32 30 29 3a e7 75 4a  |A$=.N(K%+20):.uJ|
000005d0  25 3d 31 80 a4 62 28 22  41 6c 69 61 73 24 55 52  |%=1..b("Alias$UR|
000005e0  4c 4f 70 65 6e 5f 48 54  54 50 22 29 8c 0d 00 34  |LOpen_HTTP")...4|
000005f0  1f c8 99 26 34 30 30 44  45 2c 22 55 52 4c 4f 70  |...&400DE,"URLOp|
00000600  65 6e 5f 48 54 54 50 20  22 2b 41 24 0d 00 35 28  |en_HTTP "+A$..5(|
00000610  cd 3a e7 75 4a 25 3d 32  80 a4 62 28 22 41 6c 69  |.:.uJ%=2..b("Ali|
00000620  61 73 24 55 52 4c 4f 70  65 6e 5f 4d 61 69 6c 54  |as$URLOpen_MailT|
00000630  6f 22 29 8c 0d 00 36 21  c8 99 26 34 30 30 44 45  |o")...6!..&400DE|
00000640  2c 22 55 52 4c 4f 70 65  6e 5f 4d 61 69 6c 54 6f  |,"URLOpen_MailTo|
00000650  20 22 2b 41 24 0d 00 37  05 cd 0d 00 38 05 cd 0d  | "+A$..7....8...|
00000660  00 39 10 cb 3a e7 56 75  25 8c f2 4e 79 3a e0 0d  |.9..:.Vu%..Ny:..|
00000670  00 3a 05 e1 0d 00 3b 2a  dd a4 68 79 3d 28 55 79  |.:....;*..hy=(Uy|
00000680  25 3c 3e 4b 25 21 31 36  2d 4b 25 21 38 84 61 79  |%<>K%!16-K%!8.ay|
00000690  25 3c 3e 4b 25 21 26 43  2d 4b 25 21 34 29 0d 00  |%<>K%!&C-K%!4)..|
000006a0  3c 42 dd f2 6d ea 41 25  2c 53 25 2c 4d 25 2c 48  |<B..m.A%,S%,M%,H|
000006b0  25 2c 52 25 2c 4d 24 2c  6e 69 25 2c 6a 69 25 2c  |%,R%,M$,ni%,ji%,|
000006c0  6f 69 25 2c 70 69 25 2c  74 6c 25 2c 49 24 3a e7  |oi%,pi%,tl%,I$:.|
000006d0  28 4f 79 25 80 34 29 3d  34 80 4d 4a 25 3d 30 8c  |(Oy%.4)=4.MJ%=0.|
000006e0  0d 00 3d c7 4d 24 3d a4  5a 79 28 22 25 31 32 25  |..=.M$=.Zy("%12%|
000006f0  6d 69 25 73 65 22 29 3a  48 25 3d bb c0 4d 24 2c  |mi%se"):H%=..M$,|
00000700  32 29 3a 4d 25 3d bb c1  4d 24 2c 33 2c 32 29 3a  |2):M%=..M$,3,2):|
00000710  53 25 3d bb c1 4d 24 2c  35 2c 32 29 3a 4d 25 3d  |S%=..M$,5,2):M%=|
00000720  4d 25 2a 36 3a 53 25 3d  53 25 2a 36 3a 48 25 3d  |M%*6:S%=S%*6:H%=|
00000730  48 25 2a 33 30 2b 4d 25  2f 26 43 3a 74 6c 25 3d  |H%*30+M%/&C:tl%=|
00000740  b9 3a c8 99 34 36 2c 33  31 36 2c 68 25 2c 22 63  |.:..46,316,h%,"c|
00000750  6c 6f 63 6b 22 2c 30 b8  6e 69 25 2c 6a 69 25 2c  |lock",0.ni%,ji%,|
00000760  6f 69 25 2c 70 69 25 3a  e6 31 3a c8 93 c8 90 30  |oi%,pi%:.1:....0|
00000770  2c 30 2c 49 5f 25 2c 50  75 25 3a 52 25 3d 35 36  |,0,I_%,Pu%:R%=56|
00000780  3a c8 91 49 5f 25 2f 32  2c 50 75 25 2f 32 3a e6  |:..I_%/2,Pu%/2:.|
00000790  50 25 28 30 29 3a c8 8f  c8 90 30 2c 30 2c 52 25  |P%(0):....0,0,R%|
000007a0  3a e6 50 25 28 33 29 0d  00 3e ea e3 41 25 3d 30  |:.P%(3)..>..A%=0|
000007b0  b8 33 33 30 88 33 30 3a  86 52 25 2a b5 b2 41 25  |.330.30:.R%*..A%|
000007c0  2c 52 25 2a 9b b2 41 25  2c 28 52 25 2d 26 41 29  |,R%*..A%,(R%-&A)|
000007d0  2a b5 b2 41 25 2c 28 52  25 2d 26 41 29 2a 9b b2  |*..A%,(R%-&A)*..|
000007e0  41 25 3a ed 3a e6 50 25  28 31 29 2b 28 50 25 28  |A%:.:.P%(1)+(P%(|
000007f0  31 29 2d 50 25 28 32 29  29 2a 28 78 5f 25 80 ac  |1)-P%(2))*(x_%..|
00000800  52 75 25 29 3a c8 8f 30  2c 30 2c 52 25 3a e6 50  |Ru%):..0,0,R%:.P|
00000810  25 28 35 29 3a ec 30 2c  30 3a ec 28 52 25 2a 30  |%(5):.0,0:.(R%*0|
00000820  2e 33 35 29 2a b5 b2 28  4d 25 2d 39 29 2c 28 52  |.35)*..(M%-9),(R|
00000830  25 2a 30 2e 33 35 29 2a  9b b2 28 4d 25 2d 39 29  |%*0.35)*..(M%-9)|
00000840  3a f0 38 35 2c 28 52 25  2a 30 2e 33 35 29 2a b5  |:.85,(R%*0.35)*.|
00000850  b2 28 4d 25 2b 39 29 2c  28 52 25 2a 30 2e 33 35  |.(M%+9),(R%*0.35|
00000860  29 2a 9b b2 28 4d 25 2b  39 29 3a ec 28 52 25 2a  |)*..(M%+9):.(R%*|
00000870  30 2e 33 35 29 2a b5 b2  28 4d 25 2d 39 29 2c 28  |0.35)*..(M%-9),(|
00000880  52 25 2a 30 2e 33 35 29  2a 9b b2 28 4d 25 2d 39  |R%*0.35)*..(M%-9|
00000890  29 0d 00 3f d8 f0 38 35  2c 28 52 25 2a 30 2e 37  |)..?..85,(R%*0.7|
000008a0  29 2a b5 b2 4d 25 2c 28  52 25 2a 30 2e 37 29 2a  |)*..M%,(R%*0.7)*|
000008b0  9b b2 4d 25 3a e6 50 25  28 34 29 3a ec 30 2c 30  |..M%:.P%(4):.0,0|
000008c0  3a ec 28 52 25 2a 30 2e  32 35 29 2a b5 b2 28 48  |:.(R%*0.25)*..(H|
000008d0  25 2d 39 29 2c 28 52 25  2a 30 2e 32 35 29 2a 9b  |%-9),(R%*0.25)*.|
000008e0  b2 28 48 25 2d 39 29 3a  f0 38 35 2c 28 52 25 2a  |.(H%-9):.85,(R%*|
000008f0  30 2e 32 35 29 2a b5 b2  28 48 25 2b 39 29 2c 28  |0.25)*..(H%+9),(|
00000900  52 25 2a 30 2e 32 35 29  2a 9b b2 28 48 25 2b 39  |R%*0.25)*..(H%+9|
00000910  29 3a ec 28 52 25 2a 30  2e 32 35 29 2a b5 b2 28  |):.(R%*0.25)*..(|
00000920  48 25 2d 39 29 2c 28 52  25 2a 30 2e 32 35 29 2a  |H%-9),(R%*0.25)*|
00000930  9b b2 28 48 25 2d 39 29  3a f0 38 35 2c 28 52 25  |..(H%-9):.85,(R%|
00000940  2a 30 2e 35 29 2a b5 b2  48 25 2c 28 52 25 2a 30  |*0.5)*..H%,(R%*0|
00000950  2e 35 29 2a 9b b2 48 25  3a e6 50 25 28 36 29 3a  |.5)*..H%:.P%(6):|
00000960  c8 8f c8 90 30 2c 30 2c  32 0d 00 40 2b e7 4f 79  |....0,0,2..@+.Oy|
00000970  25 80 32 8c 86 30 2c 30  2c 28 52 25 2a 30 2e 39  |%.2..0,0,(R%*0.9|
00000980  29 2a b5 b2 53 25 2c 28  52 25 2a 30 2e 39 29 2a  |)*..S%,(R%*0.9)*|
00000990  9b b2 53 25 0d 00 41 18  c8 99 34 36 2c 6e 69 25  |..S%..A...46,ni%|
000009a0  2c 6a 69 25 2c 6f 69 25  2c 70 69 25 0d 00 42 12  |,ji%,oi%,pi%..B.|
000009b0  cc 3a e7 28 4f 79 25 80  39 29 3c 3e 30 8c 0d 00  |.:.(Oy%.9)<>0...|
000009c0  43 15 e7 28 4f 79 25 80  38 29 3d 38 84 4d 4a 25  |C..(Oy%.8)=8.MJ%|
000009d0  3e 30 8c 0d 00 44 22 4d  24 3d a4 55 79 3a e7 24  |>0...D"M$=.Uy:.$|
000009e0  44 4a 25 3c 3e 4d 24 8c  24 44 4a 25 3d 4d 24 3a  |DJ%<>M$.$DJ%=M$:|
000009f0  74 6c 25 3d b9 0d 00 45  12 cc 3a e7 28 4f 79 25  |tl%=...E..:.(Oy%|
00000a00  80 31 36 29 3d 30 8c 0d  00 46 23 4d 24 3d 22 3a  |.16)=0...F#M$=":|
00000a10  25 6d 69 22 3a e7 28 4f  79 25 80 32 29 3d 32 8c  |%mi":.(Oy%.2)=2.|
00000a20  4d 24 2b 3d 22 2e 25 73  65 22 0d 00 47 29 e7 66  |M$+=".%se"..G).f|
00000a30  5f 25 8c 4d 24 3d 22 25  7a 32 34 22 2b 4d 24 8b  |_%.M$="%z24"+M$.|
00000a40  4d 24 3d 22 25 7a 31 32  22 2b 4d 24 2b 22 20 25  |M$="%z12"+M$+" %|
00000a50  61 6d 22 0d 00 48 0a cc  4d 24 3d 4e 24 0d 00 49  |am"..H..M$=N$..I|
00000a60  28 cd 3a 4d 24 3d a4 5a  79 28 4d 24 29 3a e7 4d  |(.:M$=.Zy(M$):.M|
00000a70  24 3c 3e 24 44 4a 25 8c  24 44 4a 25 3d 4d 24 3a  |$<>$DJ%.$DJ%=M$:|
00000a80  74 6c 25 3d b9 0d 00 4a  05 cd 0d 00 4b 05 cd 0d  |tl%=...J....K...|
00000a90  00 4c 42 cd 3a e7 74 6c  25 8c 21 4b 25 3d 2d 31  |.LB.:.tl%.!K%=-1|
00000aa0  2d 37 2a 94 28 62 5f 25  29 3a 4b 25 21 34 3d 6a  |-7*.(b_%):K%!4=j|
00000ab0  5f 25 3a 4b 25 21 38 3d  30 3a 4b 25 21 26 43 3d  |_%:K%!8=0:K%!&C=|
00000ac0  30 3a c8 99 26 34 30 30  43 44 2c 2c 4b 25 3a c8  |0:..&400CD,,K%:.|
00000ad0  96 0d 00 4d 05 e1 0d 00  4e 54 dd a4 55 79 3a ea  |...M....NT..Uy:.|
00000ae0  48 25 2c 41 24 3a c8 99  26 34 30 30 45 43 2c 2d  |H%,A$:..&400EC,-|
00000af0  31 2c 2d 31 b8 2c 2c 48  25 3a 48 25 3d 48 25 81  |1,-1.,,H%:H%=H%.|
00000b00  26 34 30 30 3a 41 24 3d  22 6b 22 3a e7 48 25 3e  |&400:A$="k":.H%>|
00000b10  26 34 30 30 80 47 75 25  8c 48 25 3d 48 25 81 26  |&400.Gu%.H%=H%.&|
00000b20  34 30 30 3a 41 24 3d 22  4d 22 0d 00 4f 0b 3d c3  |400:A$="M"..O.=.|
00000b30  48 25 2b 41 24 0d 00 50  22 dd f2 61 5f 3a e7 44  |H%+A$..P"..a_:.D|
00000b40  79 25 3c 3e a4 54 84 66  79 25 3c 3e a4 49 84 4d  |y%<>.T.fy%<>.I.M|
00000b50  79 25 3c 3e a4 52 8c 0d  00 51 39 5f 4a 25 3d a4  |y%<>.R...Q9_J%=.|
00000b60  53 28 30 2c 30 2c 44 79  25 2c 66 79 25 2c 4d 79  |S(0,0,Dy%,fy%,My|
00000b70  25 29 3a 4d 79 25 3d a4  52 3a 66 79 25 3d a4 49  |%):My%=.R:fy%=.I|
00000b80  3a 44 79 25 3d a4 54 3a  e7 78 4a 25 8c f2 41 79  |:Dy%=.T:.xJ%..Ay|
00000b90  0d 00 52 11 e7 49 79 25  8c 4a 5f 25 3d 30 3a f2  |..R..Iy%.J_%=0:.|
00000ba0  4b 0d 00 53 1e 42 75 25  3d b9 3a 4b 5f 25 3d 74  |K..S.Bu%=.:K_%=t|
00000bb0  25 3a 77 5f 25 3d 76 25  3a f2 78 79 3a f2 78 0d  |%:w_%=v%:.xy:.x.|
00000bc0  00 54 24 cd 3a e7 78 4a  25 80 6c 4a 25 3c 3e 30  |.T$.:.xJ%.lJ%<>0|
00000bd0  8c e7 a4 42 28 6c 4a 25  2c a4 59 29 3c 3e 31 8c  |...B(lJ%,.Y)<>1.|
00000be0  f2 6d 4a 0d 00 55 22 e7  76 4a 25 3c 3e 2d 31 8c  |.mJ..U".vJ%<>-1.|
00000bf0  e7 a4 42 28 76 4a 25 21  26 43 2c a4 59 29 3c 3e  |..B(vJ%!&C,.Y)<>|
00000c00  31 8c f2 75 75 0d 00 56  27 e7 57 5f 25 3e 30 80  |1..uu..V'.W_%>0.|
00000c10  a4 6f 79 8c ef 37 3a 57  5f 25 2d 3d 31 3a e7 57  |.oy..7:W_%-=1:.W|
00000c20  5f 25 3d 30 8c 57 5f 25  3d 2d 26 41 0d 00 57 1f  |_%=0.W_%=-&A..W.|
00000c30  e7 57 5f 25 3c 30 8c 57  5f 25 2b 3d 31 3a e7 57  |.W_%<0.W_%+=1:.W|
00000c40  5f 25 3d 30 8c 57 5f 25  3d 26 41 0d 00 58 1e e7  |_%=0.W_%=&A..X..|
00000c50  4d 4a 25 3e 30 8c 4d 4a  25 2d 3d 31 3a e7 4d 4a  |MJ%>0.MJ%-=1:.MJ|
00000c60  25 3d 30 8c f2 68 3a f2  6d 0d 00 59 0d 74 69 25  |%=0..h:.m..Y.ti%|
00000c70  3d a4 47 79 3a e1 0d 00  5a 37 dd a4 5a 79 28 41  |=.Gy:...Z7..Zy(A|
00000c80  24 29 3a 3f 4a 25 3d 33  3a c8 99 37 2c 26 45 2c  |$):?J%=3:..7,&E,|
00000c90  4a 25 3a c8 99 26 43 31  2c 4a 25 2c 4a 25 2c 26  |J%:..&C1,J%,J%,&|
00000ca0  38 30 2c 41 24 3a 3d a4  4e 28 4a 25 29 0d 00 5b  |80,A$:=.N(J%)..[|
00000cb0  2b dd a4 65 3a 3f 4a 25  3d 33 3a c8 99 37 2c 26  |+..e:?J%=3:..7,&|
00000cc0  45 2c 4a 25 3a c8 99 26  34 33 30 34 39 2c 2c 4a  |E,J%:..&43049,,J|
00000cd0  25 2c 4a 25 3a 3d 4a 25  0d 00 5c 10 dd a4 47 79  |%,J%:=J%..\...Gy|
00000ce0  3d 21 28 a4 65 2b 34 29  0d 00 5d 0f dd a4 69 3d  |=!(.e+4)..]...i=|
00000cf0  21 28 a4 65 2b 38 29 0d  00 5e 10 dd a4 63 3d 21  |!(.e+8)..^...c=!|
00000d00  28 a4 65 2b 26 43 29 0d  00 5f 10 dd a4 54 3d 21  |(.e+&C).._...T=!|
00000d10  28 a4 65 2b 31 36 29 0d  00 60 10 dd a4 49 3d 21  |(.e+16)..`...I=!|
00000d20  28 a4 65 2b 32 30 29 0d  00 61 10 dd a4 52 3d 21  |(.e+20)..a...R=!|
00000d30  28 a4 65 2b 32 34 29 0d  00 62 3f dd a4 53 28 71  |(.e+24)..b?..S(q|
00000d40  79 25 2c 6e 25 2c 63 25  2c 72 25 2c 51 25 29 3d  |y%,n%,c%,r%,Q%)=|
00000d50  71 79 25 84 28 6e 25 3c  3c 36 29 84 28 63 25 3c  |qy%.(n%<<6).(c%<|
00000d60  3c 26 42 29 84 28 72 25  3c 3c 31 36 29 84 28 51  |<&B).(r%<<16).(Q|
00000d70  25 3c 3c 32 30 29 0d 00  63 69 dd f2 47 28 78 25  |%<<20)..ci..G(x%|
00000d80  2c f8 71 79 25 2c f8 6e  25 2c f8 63 25 2c f8 72  |,.qy%,.n%,.c%,.r|
00000d90  25 2c f8 51 25 29 3a 71  79 25 3d 78 25 80 36 33  |%,.Q%):qy%=x%.63|
00000da0  3a 6e 25 3d 28 78 25 3e  3e 36 29 80 33 31 3a 63  |:n%=(x%>>6).31:c|
00000db0  25 3d 28 78 25 3e 3e 26  42 29 80 33 31 3a 72 25  |%=(x%>>&B).31:r%|
00000dc0  3d 28 78 25 3e 3e 31 36  29 80 26 46 3a 51 25 3d  |=(x%>>16).&F:Q%=|
00000dd0  28 78 25 3e 3e 32 30 29  80 26 46 46 46 3a e1 0d  |(x%>>20).&FFF:..|
00000de0  00 64 14 dd a4 78 28 78  25 29 3d 78 25 80 ac 26  |.d...x(x%)=x%..&|
00000df0  37 46 46 0d 00 65 12 dd  a4 74 79 28 78 25 29 3d  |7FF..e...ty(x%)=|
00000e00  78 25 80 36 33 0d 00 66  17 dd a4 53 5f 28 78 25  |x%.63..f...S_(x%|
00000e10  29 3d 28 78 25 3e 3e 36  29 80 33 31 0d 00 67 1a  |)=(x%>>6).31..g.|
00000e20  dd a4 59 3d a4 53 28 a4  69 2c a4 63 2c a4 54 2c  |..Y=.S(.i,.c,.T,|
00000e30  a4 49 2c a4 52 29 0d 00  68 45 dd a4 42 28 41 25  |.I,.R)..hE..B(A%|
00000e40  2c 42 25 29 3a ea 58 69  25 2c 68 69 25 2c 71 69  |,B%):.Xi%,hi%,qi|
00000e50  25 2c 76 69 25 2c 7a 69  25 2c 71 5f 25 3a ea 55  |%,vi%,zi%,q_%:.U|
00000e60  69 25 2c 4e 69 25 2c 48  69 25 2c 63 69 25 2c 64  |i%,Ni%,Hi%,ci%,d|
00000e70  69 25 3a e7 41 25 3c 3e  42 25 8c 0d 00 69 3e f2  |i%:.A%<>B%...i>.|
00000e80  47 28 41 25 2c 7a 69 25  2c 76 69 25 2c 71 69 25  |G(A%,zi%,vi%,qi%|
00000e90  2c 68 69 25 2c 58 69 25  29 3a f2 47 28 42 25 2c  |,hi%,Xi%):.G(B%,|
00000ea0  64 69 25 2c 63 69 25 2c  48 69 25 2c 4e 69 25 2c  |di%,ci%,Hi%,Ni%,|
00000eb0  55 69 25 29 3a c8 8e b9  ca 0d 00 6a 12 c9 58 69  |Ui%):......j..Xi|
00000ec0  25 3e 55 69 25 3a 71 5f  25 3d 31 0d 00 6b 13 c9  |%>Ui%:q_%=1..k..|
00000ed0  58 69 25 3c 55 69 25 3a  71 5f 25 3d 2d 31 0d 00  |Xi%<Ui%:q_%=-1..|
00000ee0  6c 12 c9 68 69 25 3e 4e  69 25 3a 71 5f 25 3d 31  |l..hi%>Ni%:q_%=1|
00000ef0  0d 00 6d 13 c9 68 69 25  3c 4e 69 25 3a 71 5f 25  |..m..hi%<Ni%:q_%|
00000f00  3d 2d 31 0d 00 6e 12 c9  71 69 25 3e 48 69 25 3a  |=-1..n..qi%>Hi%:|
00000f10  71 5f 25 3d 31 0d 00 6f  13 c9 71 69 25 3c 48 69  |q_%=1..o..qi%<Hi|
00000f20  25 3a 71 5f 25 3d 2d 31  0d 00 70 12 c9 76 69 25  |%:q_%=-1..p..vi%|
00000f30  3e 63 69 25 3a 71 5f 25  3d 31 0d 00 71 13 c9 76  |>ci%:q_%=1..q..v|
00000f40  69 25 3c 63 69 25 3a 71  5f 25 3d 2d 31 0d 00 72  |i%<ci%:q_%=-1..r|
00000f50  12 c9 7a 69 25 3e 64 69  25 3a 71 5f 25 3d 31 0d  |..zi%>di%:q_%=1.|
00000f60  00 73 13 c9 7a 69 25 3c  64 69 25 3a 71 5f 25 3d  |.s..zi%<di%:q_%=|
00000f70  2d 31 0d 00 74 05 cb 0d  00 75 0a cc 71 5f 25 3d  |-1..t....u..q_%=|
00000f80  30 0d 00 76 0a cd 3a 3d  71 5f 25 0d 00 77 e1 dd  |0..v..:=q_%..w..|
00000f90  f2 63 75 28 61 25 2c 51  25 2c 70 79 25 29 3a c8  |.cu(a%,Q%,py%):.|
00000fa0  99 26 34 30 30 45 44 2c  32 35 36 2c 68 25 2c 22  |.&400ED,256,h%,"|
00000fb0  74 61 62 22 2c 2c 2c 2c  4a 25 2c 4a 25 2b 26 38  |tab",,,,J%,J%+&8|
00000fc0  30 3a f2 58 79 28 4a 25  2b 26 38 30 2c 70 79 25  |0:.Xy(J%+&80,py%|
00000fd0  29 3a c8 99 34 36 2c 35  32 2b 32 35 36 2c 68 25  |):..46,52+256,h%|
00000fe0  2c 22 63 6f 76 65 72 22  2c 61 25 2c 51 25 2c 30  |,"cover",a%,Q%,0|
00000ff0  2c 4a 25 2c 4a 25 2b 26  38 30 3a c8 99 34 36 2c  |,J%,J%+&80:..46,|
00001000  35 32 2b 32 35 36 2c 68  25 2c 22 63 6f 76 65 72  |52+256,h%,"cover|
00001010  22 2c 61 25 2c a4 66 28  51 25 2b 7a 79 25 2d 32  |",a%,.f(Q%+zy%-2|
00001020  2a 32 30 29 2c 30 2c 4a  25 2c 4a 25 2b 26 38 30  |*20),0,J%,J%+&80|
00001030  3a c8 99 34 36 2c 35 32  2b 32 35 36 2c 68 25 2c  |:..46,52+256,h%,|
00001040  22 74 61 62 22 2c 61 25  2c 51 25 2c 38 2c 4a 25  |"tab",a%,Q%,8,J%|
00001050  2c 4a 25 2b 26 38 30 3a  c8 99 34 36 2c 33 33 2b  |,J%+&80:..46,33+|
00001060  32 35 36 2c 68 25 2c 22  74 61 62 22 0d 00 78 a0  |256,h%,"tab"..x.|
00001070  c8 99 34 36 2c 35 32 2b  32 35 36 2c 68 25 2c 22  |..46,52+256,h%,"|
00001080  74 61 62 22 2c 61 25 2c  51 25 2b 7a 79 25 2d 32  |tab",a%,Q%+zy%-2|
00001090  2a 32 30 2c 38 2c 4a 25  2c 4a 25 2b 26 38 30 3a  |*20,8,J%,J%+&80:|
000010a0  c8 99 34 36 2c 33 33 2b  32 35 36 2c 68 25 2c 22  |..46,33+256,h%,"|
000010b0  74 61 62 22 3a c8 99 26  34 30 30 45 36 2c 70 79  |tab":..&400E6,py|
000010c0  25 3a c8 93 c8 90 61 25  2b 34 30 2c 51 25 2b 32  |%:....a%+40,Q%+2|
000010d0  2a 32 30 2c 2d 32 2a 32  30 2c 7a 79 25 2d 34 2a  |*20,-2*20,zy%-4*|
000010e0  32 30 3a c8 99 26 34 30  30 45 36 2c 36 3a ec 61  |20:..&400E6,6:.a|
000010f0  25 2b 34 30 2c 51 25 2b  32 2a 32 30 3a df 42 59  |%+40,Q%+2*20:.BY|
00001100  30 2c 7a 79 25 2d 34 2a  32 30 3a e1 0d 00 79 fc  |0,zy%-4*20:...y.|
00001110  dd f2 78 75 28 61 25 2c  51 25 2c 70 79 25 29 61  |..xu(a%,Q%,py%)a|
00001120  25 2d 3d 34 30 3a c8 99  26 34 30 30 45 44 2c 32  |%-=40:..&400ED,2|
00001130  35 36 2c 68 25 2c 22 74  61 62 22 2c 2c 2c 2c 4a  |56,h%,"tab",,,,J|
00001140  25 2c 4a 25 2b 26 38 30  3a f2 58 79 28 4a 25 2b  |%,J%+&80:.Xy(J%+|
00001150  26 38 30 2c 70 79 25 29  3a c8 99 34 36 2c 35 32  |&80,py%):..46,52|
00001160  2b 32 35 36 2c 68 25 2c  22 63 6f 76 65 72 22 2c  |+256,h%,"cover",|
00001170  61 25 2c 51 25 2c 30 2c  4a 25 2c 4a 25 2b 26 38  |a%,Q%,0,J%,J%+&8|
00001180  30 3a c8 99 34 36 2c 35  32 2b 32 35 36 2c 68 25  |0:..46,52+256,h%|
00001190  2c 22 63 6f 76 65 72 22  2c 61 25 2c a4 66 28 51  |,"cover",a%,.f(Q|
000011a0  25 2b 7a 79 25 2d 32 2a  32 30 29 2c 30 2c 4a 25  |%+zy%-2*20),0,J%|
000011b0  2c 4a 25 2b 26 38 30 3a  c8 99 34 36 2c 34 37 2b  |,J%+&80:..46,47+|
000011c0  32 35 36 2c 68 25 2c 22  74 61 62 22 3a c8 99 34  |256,h%,"tab":..4|
000011d0  36 2c 35 32 2b 32 35 36  2c 68 25 2c 22 74 61 62  |6,52+256,h%,"tab|
000011e0  22 2c 61 25 2c 51 25 2c  38 2c 4a 25 2c 4a 25 2b  |",a%,Q%,8,J%,J%+|
000011f0  26 38 30 3a c8 99 34 36  2c 33 33 2b 32 35 36 2c  |&80:..46,33+256,|
00001200  68 25 2c 22 74 61 62 22  0d 00 7a ae c8 99 34 36  |h%,"tab"..z...46|
00001210  2c 35 32 2b 32 35 36 2c  68 25 2c 22 74 61 62 22  |,52+256,h%,"tab"|
00001220  2c 61 25 2c 51 25 2b 7a  79 25 2d 32 2a 32 30 2c  |,a%,Q%+zy%-2*20,|
00001230  38 2c 4a 25 2c 4a 25 2b  26 38 30 3a c8 99 34 36  |8,J%,J%+&80:..46|
00001240  2c 33 33 2b 32 35 36 2c  68 25 2c 22 74 61 62 22  |,33+256,h%,"tab"|
00001250  3a c8 99 34 36 2c 34 37  2b 32 35 36 2c 68 25 2c  |:..46,47+256,h%,|
00001260  22 74 61 62 22 3a c8 99  26 34 30 30 45 36 2c 70  |"tab":..&400E6,p|
00001270  79 25 3a c8 93 c8 90 61  25 2c 51 25 2b 32 2a 32  |y%:....a%,Q%+2*2|
00001280  30 2c 32 2a 32 30 2c 7a  79 25 2d 34 2a 32 30 3a  |0,2*20,zy%-4*20:|
00001290  c8 99 26 34 30 30 45 36  2c 36 3a ec 61 25 2c 51  |..&400E6,6:.a%,Q|
000012a0  25 2b 32 2a 32 30 3a df  42 59 30 2c 7a 79 25 2d  |%+2*20:.BY0,zy%-|
000012b0  34 2a 32 30 3a e1 0d 00  7b 35 dd f2 73 5f 28 71  |4*20:...{5..s_(q|
000012c0  25 2c 5f 25 2c 55 25 29  3a e7 71 25 3d 69 25 8c  |%,_%,U%):.q%=i%.|
000012d0  f2 43 75 28 71 25 2c 5f  25 2c 55 25 29 8b f2 51  |.Cu(q%,_%,U%)..Q|
000012e0  75 28 71 25 2c 5f 25 2c  55 25 29 0d 00 7c 05 e1  |u(q%,_%,U%)..|..|
000012f0  0d 00 7d 4a dd f2 58 79  28 74 79 25 2c 57 79 25  |..}J..Xy(ty%,Wy%|
00001300  29 3a ea 62 79 25 2c 6c  25 2c 70 79 25 3a 62 79  |):.by%,l%,py%:by|
00001310  25 3d 74 79 25 3f 79 75  25 3a 6c 25 3d 74 79 25  |%=ty%?yu%:l%=ty%|
00001320  3f 72 75 25 3a e7 57 79  25 3c 3e 2d 31 8c 3f 74  |?ru%:.Wy%<>-1.?t|
00001330  79 25 3d 74 79 25 3f 57  79 25 0d 00 7e 19 74 79  |y%=ty%?Wy%..~.ty|
00001340  25 3f 26 42 3d 62 79 25  3a 74 79 25 3f 35 3d 6c  |%?&B=by%:ty%?5=l|
00001350  25 3a e1 0d 00 7f e9 dd  f2 43 75 28 71 25 2c 5f  |%:.......Cu(q%,_|
00001360  25 2c 55 25 29 3a 54 25  3d 91 3a ea 41 25 2c 61  |%,U%):T%=.:.A%,a|
00001370  25 2c 51 25 2c 59 25 2c  6f 6c 25 2c 43 61 25 2c  |%,Q%,Y%,ol%,Ca%,|
00001380  4a 61 25 3a c8 99 34 36  2c 34 30 2b 32 35 36 2c  |Ja%:..46,40+256,|
00001390  68 25 2c 22 72 69 6e 67  22 b8 2c 2c 2c 43 61 25  |h%,"ring".,,,Ca%|
000013a0  2c 4a 61 25 3a c8 99 26  34 30 30 45 36 2c 31 3a  |,Ja%:..&400E6,1:|
000013b0  f2 64 28 5f 25 2c 55 25  2c 35 2c 2d 55 79 25 29  |.d(_%,U%,5,-Uy%)|
000013c0  3a f2 64 28 5f 25 2b 73  4a 25 2b 34 30 2b 34 30  |:.d(_%+sJ%+40+40|
000013d0  2c 55 25 2c 35 2b 35 2c  2d 55 79 25 2d 35 29 3a  |,U%,5+5,-Uy%-5):|
000013e0  f2 64 28 5f 25 2c 55 25  2c 61 79 25 2c 2d 35 29  |.d(_%,U%,ay%,-5)|
000013f0  3a f2 64 28 5f 25 2c 55  25 2d 55 79 25 2d 35 2c  |:.d(_%,U%-Uy%-5,|
00001400  61 79 25 2c 35 2b 35 29  3a c8 99 26 34 30 30 45  |ay%,5+5):..&400E|
00001410  44 2c 32 35 36 2c 68 25  2c 22 63 6f 76 65 72 22  |D,256,h%,"cover"|
00001420  2c 2c 2c 2c 4a 25 2c 4a  25 2b 26 38 30 3a f2 58  |,,,,J%,J%+&80:.X|
00001430  79 28 4a 25 2b 26 38 30  2c 2d 31 29 0d 00 80 fb  |y(J%+&80,-1)....|
00001440  c8 99 34 36 2c 35 32 2b  32 35 36 2c 68 25 2c 22  |..46,52+256,h%,"|
00001450  63 6f 76 65 72 5f 74 6c  22 2c 5f 25 2b 35 2c 55  |cover_tl",_%+5,U|
00001460  25 2d 35 2d 34 30 2c 30  2c 4a 25 2c 4a 25 2b 26  |%-5-40,0,J%,J%+&|
00001470  38 30 3a c8 99 34 36 2c  35 32 2b 32 35 36 2c 68  |80:..46,52+256,h|
00001480  25 2c 22 63 6f 76 65 72  5f 74 72 22 2c 5f 25 2b  |%,"cover_tr",_%+|
00001490  61 79 25 2d 35 2d 34 30  2c 55 25 2d 35 2d 34 30  |ay%-5-40,U%-5-40|
000014a0  2c 30 2c 4a 25 2c 4a 25  2b 26 38 30 3a c8 99 34  |,0,J%,J%+&80:..4|
000014b0  36 2c 35 32 2b 32 35 36  2c 68 25 2c 22 63 6f 76  |6,52+256,h%,"cov|
000014c0  65 72 5f 62 6c 22 2c 5f  25 2b 35 2c 55 25 2d 55  |er_bl",_%+5,U%-U|
000014d0  79 25 2b 35 2c 30 2c 4a  25 2c 4a 25 2b 26 38 30  |y%+5,0,J%,J%+&80|
000014e0  3a c8 99 34 36 2c 35 32  2b 32 35 36 2c 68 25 2c  |:..46,52+256,h%,|
000014f0  22 63 6f 76 65 72 5f 62  72 22 2c 5f 25 2b 61 79  |"cover_br",_%+ay|
00001500  25 2d 35 2d 34 30 2c 55  25 2d 55 79 25 2b 35 2c  |%-5-40,U%-Uy%+5,|
00001510  30 2c 4a 25 2c 4a 25 2b  26 38 30 3a e3 41 25 3d  |0,J%,J%+&80:.A%=|
00001520  55 25 2d 35 2d 34 30 2d  34 30 b8 55 25 2d 55 79  |U%-5-40-40.U%-Uy|
00001530  25 2f 32 88 2d 34 30 0d  00 81 e8 c8 99 34 36 2c  |%/2.-40......46,|
00001540  35 32 2b 32 35 36 2c 68  25 2c 22 63 6f 76 65 72  |52+256,h%,"cover|
00001550  5f 6c 22 2c 5f 25 2b 35  2c 41 25 2c 30 2c 4a 25  |_l",_%+5,A%,0,J%|
00001560  2c 4a 25 2b 26 38 30 3a  c8 99 34 36 2c 35 32 2b  |,J%+&80:..46,52+|
00001570  32 35 36 2c 68 25 2c 22  63 6f 76 65 72 5f 72 22  |256,h%,"cover_r"|
00001580  2c 5f 25 2b 61 79 25 2d  35 2d 34 30 2c 41 25 2c  |,_%+ay%-5-40,A%,|
00001590  30 2c 4a 25 2c 4a 25 2b  26 38 30 3a ed 3a e3 41  |0,J%,J%+&80:.:.A|
000015a0  25 3d 55 25 2d 55 79 25  2b 35 2b 34 30 b8 55 25  |%=U%-Uy%+5+40.U%|
000015b0  2d 55 79 25 2f 32 2b 34  30 88 34 30 3a c8 99 34  |-Uy%/2+40.40:..4|
000015c0  36 2c 35 32 2b 32 35 36  2c 68 25 2c 22 63 6f 76  |6,52+256,h%,"cov|
000015d0  65 72 5f 6c 22 2c 5f 25  2b 35 2c 41 25 2c 30 2c  |er_l",_%+5,A%,0,|
000015e0  4a 25 2c 4a 25 2b 26 38  30 3a c8 99 34 36 2c 35  |J%,J%+&80:..46,5|
000015f0  32 2b 32 35 36 2c 68 25  2c 22 63 6f 76 65 72 5f  |2+256,h%,"cover_|
00001600  72 22 2c 5f 25 2b 61 79  25 2d 35 2d 34 30 2c 41  |r",_%+ay%-5-40,A|
00001610  25 2c 30 2c 4a 25 2c 4a  25 2b 26 38 30 3a ed 0d  |%,0,J%,J%+&80:..|
00001620  00 82 d0 e3 41 25 3d 5f  25 2b 35 2b 34 30 b8 5f  |....A%=_%+5+40._|
00001630  25 2b 61 79 25 2f 32 88  34 30 3a c8 99 34 36 2c  |%+ay%/2.40:..46,|
00001640  35 32 2b 32 35 36 2c 68  25 2c 22 63 6f 76 65 72  |52+256,h%,"cover|
00001650  5f 74 22 2c 41 25 2c 55  25 2d 35 2d 34 30 2c 30  |_t",A%,U%-5-40,0|
00001660  2c 4a 25 2c 4a 25 2b 26  38 30 3a c8 99 34 36 2c  |,J%,J%+&80:..46,|
00001670  35 32 2b 32 35 36 2c 68  25 2c 22 63 6f 76 65 72  |52+256,h%,"cover|
00001680  5f 62 22 2c 41 25 2c 55  25 2d 55 79 25 2b 35 2c  |_b",A%,U%-Uy%+5,|
00001690  30 2c 4a 25 2c 4a 25 2b  26 38 30 3a ed 3a e3 41  |0,J%,J%+&80:.:.A|
000016a0  25 3d 5f 25 2b 61 79 25  2d 35 2d 32 2a 34 30 b8  |%=_%+ay%-5-2*40.|
000016b0  5f 25 2b 61 79 25 2f 32  2d 34 30 88 2d 34 30 3a  |_%+ay%/2-40.-40:|
000016c0  c8 99 34 36 2c 35 32 2b  32 35 36 2c 68 25 2c 22  |..46,52+256,h%,"|
000016d0  63 6f 76 65 72 5f 74 22  2c 41 25 2c 55 25 2d 35  |cover_t",A%,U%-5|
000016e0  2d 34 30 2c 30 2c 4a 25  2c 4a 25 2b 26 38 30 0d  |-40,0,J%,J%+&80.|
000016f0  00 83 dc c8 99 34 36 2c  35 32 2b 32 35 36 2c 68  |.....46,52+256,h|
00001700  25 2c 22 63 6f 76 65 72  5f 62 22 2c 41 25 2c 55  |%,"cover_b",A%,U|
00001710  25 2d 55 79 25 2b 35 2c  30 2c 4a 25 2c 4a 25 2b  |%-Uy%+5,0,J%,J%+|
00001720  26 38 30 3a ed 3a e3 41  25 3d 55 25 2d 55 79 25  |&80:.:.A%=U%-Uy%|
00001730  2b 34 30 b8 55 25 2d 6d  25 2d 74 25 2a 7a 79 25  |+40.U%-m%-t%*zy%|
00001740  88 34 30 3a c8 99 34 36  2c 35 32 2b 32 35 36 2c  |.40:..46,52+256,|
00001750  68 25 2c 22 63 6f 76 65  72 22 2c 5f 25 2b 6b 5f  |h%,"cover",_%+k_|
00001760  25 2c 41 25 2c 30 2c 4a  25 2c 4a 25 2b 26 38 30  |%,A%,0,J%,J%+&80|
00001770  3a ed 3a e3 41 25 3d 55  25 2d 35 2d 34 30 2d 34  |:.:.A%=U%-5-40-4|
00001780  30 b8 55 25 2d 35 2d 34  30 2d 7a 79 25 2a 74 25  |0.U%-5-40-zy%*t%|
00001790  2d 34 30 88 2d 34 30 3a  c8 99 34 36 2c 35 32 2b  |-40.-40:..46,52+|
000017a0  32 35 36 2c 68 25 2c 22  63 6f 76 65 72 22 2c 5f  |256,h%,"cover",_|
000017b0  25 2b 61 79 25 2d 35 2d  38 30 2c 41 25 2c 30 2c  |%+ay%-5-80,A%,0,|
000017c0  4a 25 2c 4a 25 2b 26 38  30 3a ed 0d 00 84 51 e7  |J%,J%+&80:....Q.|
000017d0  a4 46 28 5f 25 2b 60 79  25 2c 55 25 2d 6d 25 2c  |.F(_%+`y%,U%-m%,|
000017e0  26 36 34 2c 2d 6b 25 29  8c c8 99 26 34 30 30 45  |&64,-k%)...&400E|
000017f0  36 2c 32 3a c8 93 c8 90  5f 25 2b 60 79 25 2b 33  |6,2:...._%+`y%+3|
00001800  32 2c 55 25 2d 6d 25 2d  34 30 2c 26 36 34 2d 32  |2,U%-m%-40,&64-2|
00001810  2a 33 32 2d 32 2c 2d 6b  25 2b 38 30 0d 00 85 e4  |*32-2,-k%+80....|
00001820  c8 99 34 36 2c 35 32 2b  32 35 36 2c 68 25 2c 22  |..46,52+256,h%,"|
00001830  63 6f 76 65 72 22 2c 5f  25 2b 61 79 25 2d 35 2d  |cover",_%+ay%-5-|
00001840  38 30 2c 55 25 2d 55 79  25 2b 34 30 2c 30 2c 4a  |80,U%-Uy%+40,0,J|
00001850  25 2c 4a 25 2b 26 38 30  3a c8 99 34 36 2c 35 32  |%,J%+&80:..46,52|
00001860  2b 32 35 36 2c 68 25 2c  22 63 6f 76 65 72 22 2c  |+256,h%,"cover",|
00001870  5f 25 2b 60 79 25 2b 33  32 2c 55 25 2d 6d 25 2d  |_%+`y%+32,U%-m%-|
00001880  34 30 2c 30 2c 4a 25 2c  4a 25 2b 26 38 30 3a c8  |40,0,J%,J%+&80:.|
00001890  99 34 36 2c 35 32 2b 32  35 36 2c 68 25 2c 22 63  |.46,52+256,h%,"c|
000018a0  6f 76 65 72 22 2c 5f 25  2b 60 79 25 2b 33 32 2c  |over",_%+`y%+32,|
000018b0  55 25 2d 55 79 25 2b 34  30 2c 30 2c 4a 25 2c 4a  |U%-Uy%+40,0,J%,J|
000018c0  25 2b 26 38 30 3a c8 99  34 36 2c 35 32 2b 32 35  |%+&80:..46,52+25|
000018d0  36 2c 68 25 2c 22 66 6f  6c 64 22 2c 5f 25 2b 60  |6,h%,"fold",_%+`|
000018e0  79 25 2d 26 36 34 2f 34  2c 55 25 2d 6d 25 2d 6b  |y%-&64/4,U%-m%-k|
000018f0  25 2d 34 30 2c 30 2c 4a  25 2c 4a 25 2b 26 38 30  |%-40,0,J%,J%+&80|
00001900  0d 00 86 de c8 99 34 36  2c 35 32 2b 32 35 36 2c  |......46,52+256,|
00001910  68 25 2c 22 66 6f 6c 64  22 2c 5f 25 2b 60 79 25  |h%,"fold",_%+`y%|
00001920  2b 35 2a 26 36 34 2f 34  2d 36 2c 55 25 2d 6d 25  |+5*&64/4-6,U%-m%|
00001930  2d 6b 25 2d 34 30 2c 30  2c 4a 25 2c 4a 25 2b 26  |-k%-40,0,J%,J%+&|
00001940  38 30 3a c8 99 34 36 2c  33 33 2b 32 35 36 2c 68  |80:..46,33+256,h|
00001950  25 2c 22 66 6f 6c 64 22  3a c8 99 34 36 2c 35 32  |%,"fold":..46,52|
00001960  2b 32 35 36 2c 68 25 2c  22 66 6f 6c 64 22 2c 5f  |+256,h%,"fold",_|
00001970  25 2b 60 79 25 2d 30 2e  33 2a 26 36 34 2c 55 25  |%+`y%-0.3*&64,U%|
00001980  2d 6d 25 2c 30 2c 4a 25  2c 4a 25 2b 26 38 30 3a  |-m%,0,J%,J%+&80:|
00001990  c8 99 34 36 2c 35 32 2b  32 35 36 2c 68 25 2c 22  |..46,52+256,h%,"|
000019a0  66 6f 6c 64 22 2c 5f 25  2b 60 79 25 2b 31 2e 33  |fold",_%+`y%+1.3|
000019b0  2a 26 36 34 2d 36 2c 55  25 2d 6d 25 2c 30 2c 4a  |*&64-6,U%-m%,0,J|
000019c0  25 2c 4a 25 2b 26 38 30  3a c8 99 34 36 2c 33 33  |%,J%+&80:..46,33|
000019d0  2b 32 35 36 2c 68 25 2c  22 66 6f 6c 64 22 0d 00  |+256,h%,"fold"..|
000019e0  87 db c8 99 26 34 30 30  45 44 2c 32 35 36 2c 68  |....&400ED,256,h|
000019f0  25 2c 22 63 6f 76 65 72  22 2c 2c 2c 2c 4a 25 2c  |%,"cover",,,,J%,|
00001a00  4a 25 2b 26 38 30 3a c8  99 34 36 2c 35 32 2b 32  |J%+&80:..46,52+2|
00001a10  35 36 2c 68 25 2c 22 6d  69 64 5f 62 22 2c 5f 25  |56,h%,"mid_b",_%|
00001a20  2b 60 79 25 2b 26 36 34  2f 32 2d 31 37 2c 55 25  |+`y%+&64/2-17,U%|
00001a30  2d 55 79 25 2b 37 36 2c  38 2c 4a 25 2c 4a 25 2b  |-Uy%+76,8,J%,J%+|
00001a40  26 38 30 3a c8 99 34 36  2c 35 32 2b 32 35 36 2c  |&80:..46,52+256,|
00001a50  68 25 2c 22 6d 69 64 5f  74 22 2c 5f 25 2b 60 79  |h%,"mid_t",_%+`y|
00001a60  25 2b 26 36 34 2f 32 2d  31 37 2c 55 25 2d 6d 25  |%+&64/2-17,U%-m%|
00001a70  2d 34 30 2c 38 2c 4a 25  2c 4a 25 2b 26 38 30 3a  |-40,8,J%,J%+&80:|
00001a80  c8 99 26 34 30 30 38 31  2c 2c 22 48 6f 6d 65 72  |..&40081,,"Homer|
00001a90  74 6f 6e 2e 4d 65 64 69  75 6d 22 2c 26 39 36 2c  |ton.Medium",&96,|
00001aa0  26 39 36 b8 6f 6c 25 3a  e3 41 25 3d 31 b8 42 5f  |&96.ol%:.A%=1.B_|
00001ab0  25 3a e7 74 25 3c 41 25  8c 0d 00 88 26 e7 a4 46  |%:.t%<A%....&..F|
00001ac0  28 5f 25 2b 73 4a 25 2c  55 25 2d 6d 25 2d 28 7a  |(_%+sJ%,U%-m%-(z|
00001ad0  79 25 2a 41 25 29 2c 34  30 2c 7a 79 25 29 8c 0d  |y%*A%),40,zy%)..|
00001ae0  00 89 6e f2 63 75 28 5f  25 2b 73 4a 25 2c 55 25  |..n.cu(_%+sJ%,U%|
00001af0  2d 6d 25 2d 28 7a 79 25  2a 41 25 29 2c 44 25 28  |-m%-(zy%*A%),D%(|
00001b00  41 25 29 29 3a f2 56 28  44 25 28 41 25 29 2c 49  |A%)):.V(D%(A%),I|
00001b10  25 28 41 25 29 29 3a f2  6a 79 28 6f 6c 25 2c 4d  |%(A%)):.jy(ol%,M|
00001b20  24 28 41 25 29 2c 30 2c  30 2c 5f 25 2b 73 4a 25  |$(A%),0,0,_%+sJ%|
00001b30  2b 34 30 2f 32 2c 55 25  2d 6d 25 2d 28 7a 79 25  |+40/2,U%-m%-(zy%|
00001b40  2a 28 41 25 2d 30 2e 35  29 29 2c 31 29 0d 00 8a  |*(A%-0.5)),1)...|
00001b50  05 cd 0d 00 8b 28 cc 3a  e7 a4 46 28 5f 25 2b 6b  |.....(.:..F(_%+k|
00001b60  5f 25 2c 55 25 2d 6d 25  2d 28 7a 79 25 2a 41 25  |_%,U%-m%-(zy%*A%|
00001b70  29 2c 34 30 2c 7a 79 25  29 8c 0d 00 8c 72 f2 78  |),40,zy%)....r.x|
00001b80  75 28 5f 25 2b 6b 5f 25  2b 34 30 2c 55 25 2d 6d  |u(_%+k_%+40,U%-m|
00001b90  25 2d 28 7a 79 25 2a 41  25 29 2c 44 25 28 41 25  |%-(zy%*A%),D%(A%|
00001ba0  29 29 3a f2 56 28 44 25  28 41 25 29 2c 49 25 28  |)):.V(D%(A%),I%(|
00001bb0  41 25 29 29 3a f2 6a 79  28 6f 6c 25 2c 4d 24 28  |A%)):.jy(ol%,M$(|
00001bc0  41 25 29 2c 30 2c 30 2c  5f 25 2b 6b 5f 25 2b 34  |A%),0,0,_%+k_%+4|
00001bd0  30 2f 32 2c 55 25 2d 6d  25 2d 28 7a 79 25 2a 28  |0/2,U%-m%-(zy%*(|
00001be0  41 25 2d 30 2e 35 29 29  2c 2d 31 29 0d 00 8d 05  |A%-0.5)),-1)....|
00001bf0  cd 0d 00 8e ee cd 3a ed  3a c8 99 26 34 30 30 45  |......:.:..&400E|
00001c00  36 2c 30 3a f2 64 28 5f  25 2b 77 79 25 2d 33 32  |6,0:.d(_%+wy%-32|
00001c10  2c 55 25 2d 6d 25 2c 75  25 2b 33 32 2c 2d 6b 25  |,U%-m%,u%+32,-k%|
00001c20  29 3a f2 64 28 5f 25 2b  6d 79 25 2c 55 25 2d 6d  |):.d(_%+my%,U%-m|
00001c30  25 2c 75 25 2b 33 32 2c  2d 6b 25 29 3a c8 99 26  |%,u%+32,-k%):..&|
00001c40  34 30 30 45 36 2c 36 3a  c8 93 5f 25 2b 77 79 25  |400E6,6:.._%+wy%|
00001c50  2d 33 32 2c 55 25 2d 6d  25 2c 75 25 2b 33 32 2c  |-32,U%-m%,u%+32,|
00001c60  2d 6b 25 3a c8 93 5f 25  2b 6d 79 25 2c 55 25 2d  |-k%:.._%+my%,U%-|
00001c70  6d 25 2c 75 25 2b 33 32  2c 2d 6b 25 3a 61 25 3d  |m%,u%+32,-k%:a%=|
00001c80  5f 25 2b 60 79 25 2b 26  36 34 2f 32 3a 59 25 3d  |_%+`y%+&64/2:Y%=|
00001c90  55 25 2d 6d 25 2d 6b 25  2f 28 4f 4a 25 2b 31 29  |U%-m%-k%/(OJ%+1)|
00001ca0  3a e3 41 25 3d 31 b8 4f  4a 25 3a e7 a4 46 28 61  |:.A%=1.OJ%:..F(a|
00001cb0  25 2d 34 30 2d 38 2c 59  25 2d 26 43 2c 32 2a 28  |%-40-8,Y%-&C,2*(|
00001cc0  34 30 2b 38 29 2c 34 30  2b 26 43 29 80 28 71 75  |40+8),40+&C).(qu|
00001cd0  25 80 31 3c 3c 28 41 25  2d 31 29 29 3e 30 8c 0d  |%.1<<(A%-1))>0..|
00001ce0  00 8f 59 c8 99 26 34 30  30 45 44 2c 32 35 36 2c  |..Y..&400ED,256,|
00001cf0  68 25 2c 22 72 69 6e 67  22 2c 2c 2c 2c 4a 25 2c  |h%,"ring",,,,J%,|
00001d00  4a 25 2b 26 38 30 3a c8  99 34 36 2c 35 32 2b 32  |J%+&80:..46,52+2|
00001d10  35 36 2c 68 25 2c 22 72  69 6e 67 22 2c 61 25 2d  |56,h%,"ring",a%-|
00001d20  43 61 25 2c 59 25 2d 4a  61 25 2f 32 2c 38 2c 4a  |Ca%,Y%-Ja%/2,8,J|
00001d30  25 2c 4a 25 2b 26 38 30  0d 00 90 54 cd 3a 59 25  |%,J%+&80...T.:Y%|
00001d40  2d 3d a4 66 28 6b 25 2f  28 4f 4a 25 2b 31 29 29  |-=.f(k%/(OJ%+1))|
00001d50  3a ed 3a e7 74 25 3e 30  80 a4 46 28 5f 25 2b 6d  |:.:.t%>0..F(_%+m|
00001d60  79 25 2c 55 25 2d 6d 25  2c 75 25 2b 33 32 2c 2d  |y%,U%-m%,u%+32,-|
00001d70  6b 25 29 80 ac 41 75 25  8c f2 6f 79 28 30 2c 5f  |k%)..Au%..oy(0,_|
00001d80  25 2b 6d 79 25 2c 55 25  2d 6d 25 29 0d 00 91 3b  |%+my%,U%-m%)...;|
00001d90  e7 a4 46 28 5f 25 2b 77  79 25 2d 33 32 2c 55 25  |..F(_%+wy%-32,U%|
00001da0  2d 6d 25 2c 75 25 2b 33  32 2c 2d 6b 25 29 80 ac  |-m%,u%+32,-k%)..|
00001db0  41 75 25 8c f2 6f 79 28  31 2c 5f 25 2b 77 79 25  |Au%..oy(1,_%+wy%|
00001dc0  2c 55 25 2d 6d 25 29 0d  00 92 12 c8 99 26 34 30  |,U%-m%)......&40|
00001dd0  30 38 32 2c 6f 6c 25 3a  e1 0d 00 93 41 dd f2 49  |082,ol%:....A..I|
00001de0  28 79 25 2c 5f 25 2c 55  25 29 3a c8 99 26 34 30  |(y%,_%,U%):..&40|
00001df0  30 45 44 2c 32 35 36 2c  68 25 2c 22 63 6f 72 6e  |0ED,256,h%,"corn|
00001e00  65 72 22 2c 2c 2c 2c 4a  25 2c 4a 25 2b 26 38 30  |er",,,,J%,J%+&80|
00001e10  3a e7 79 25 8c 5f 25 2b  3d 31 0d 00 94 21 e7 79  |:.y%._%+=1...!.y|
00001e20  25 3d 31 80 a4 46 28 5f  25 2b 75 25 2c 55 25 2d  |%=1..F(_%+u%,U%-|
00001e30  6b 25 2c 2d 33 32 2c 33  32 29 8c 0d 00 95 81 c8  |k%,-32,32)......|
00001e40  99 34 36 2c 34 37 2b 32  35 36 2c 68 25 2c 22 63  |.46,47+256,h%,"c|
00001e50  6f 72 6e 65 72 22 3a c8  99 34 36 2c 35 32 2b 32  |orner":..46,52+2|
00001e60  35 36 2c 68 25 2c 22 63  6f 72 6e 65 72 22 2c 5f  |56,h%,"corner",_|
00001e70  25 2b 75 25 2d 31 36 2a  32 2c 55 25 2d 6b 25 2b  |%+u%-16*2,U%-k%+|
00001e80  32 2c 38 2c 4a 25 2c 4a  25 2b 26 38 30 3a c8 99  |2,8,J%,J%+&80:..|
00001e90  34 36 2c 34 37 2b 32 35  36 2c 68 25 2c 22 63 6f  |46,47+256,h%,"co|
00001ea0  72 6e 65 72 22 3a f2 42  5f 28 5f 25 2b 75 25 2d  |rner":.B_(_%+u%-|
00001eb0  33 32 2c 55 25 2c 4e 25  28 31 29 29 0d 00 96 0c  |32,U%,N%(1))....|
00001ec0  cd 3a e7 79 25 3d 30 8c  0d 00 97 18 e7 a4 46 28  |.:.y%=0.......F(|
00001ed0  5f 25 2c 55 25 2d 6b 25  2c 33 32 2c 33 32 29 8c  |_%,U%-k%,32,32).|
00001ee0  0d 00 98 45 c8 99 34 36  2c 35 32 2b 32 35 36 2c  |...E..46,52+256,|
00001ef0  68 25 2c 22 63 6f 72 6e  65 72 22 2c 5f 25 2b 32  |h%,"corner",_%+2|
00001f00  2c 55 25 2d 6b 25 2b 32  2c 38 2c 4a 25 2c 4a 25  |,U%-k%+2,8,J%,J%|
00001f10  2b 26 38 30 3a f2 42 5f  28 5f 25 2c 55 25 2c 4e  |+&80:.B_(_%,U%,N|
00001f20  25 28 30 29 29 0d 00 99  05 cd 0d 00 9a 07 cd 3a  |%(0))..........:|
00001f30  e1 0d 00 9b 39 dd f2 42  5f 28 5f 25 2c 55 25 2c  |....9..B_(_%,U%,|
00001f40  f8 67 79 25 29 3a 21 4a  25 3d 69 25 3a e7 67 79  |.gy%):!J%=i%:.gy|
00001f50  25 3e 3d 30 8c 4a 25 21  34 3d 67 79 25 3a c8 99  |%>=0.J%!4=gy%:..|
00001f60  26 34 30 30 43 34 2c 2c  4a 25 0d 00 9c 83 c8 99  |&400C4,,J%......|
00001f70  26 34 30 30 43 42 2c 2c  4a 25 3a 4a 25 21 34 3d  |&400CB,,J%:J%!4=|
00001f80  5f 25 2d 4a 25 21 34 3a  4a 25 21 38 3d 55 25 2d  |_%-J%!4:J%!8=U%-|
00001f90  4a 25 21 31 36 2d 6b 25  3a 4a 25 21 26 43 3d 4a  |J%!16-k%:J%!&C=J|
00001fa0  25 21 34 2b 33 32 3a 4a  25 21 31 36 3d 4a 25 21  |%!4+32:J%!16=J%!|
00001fb0  38 2b 33 32 3a 4a 25 21  32 30 3d 26 37 30 30 33  |8+32:J%!20=&7003|
00001fc0  31 31 39 3a 4a 25 21 32  34 3d 73 6c 25 3a 4a 25  |119:J%!24=sl%:J%|
00001fd0  21 33 32 3d 30 3a e7 79  25 8c 4a 25 21 32 38 3d  |!32=0:.y%.J%!28=|
00001fe0  4b 69 25 8b 4a 25 21 32  38 3d 59 69 25 0d 00 9d  |Ki%.J%!28=Yi%...|
00001ff0  16 c8 99 26 34 30 30 43  32 2c 2c 4a 25 b8 67 79  |...&400C2,,J%.gy|
00002000  25 3a e1 0d 00 9e 31 dd  f2 5a 75 3a 21 4a 25 3d  |%:....1..Zu:!J%=|
00002010  69 25 3a e7 4e 25 28 30  29 3e 3d 30 8c 4a 25 21  |i%:.N%(0)>=0.J%!|
00002020  34 3d 4e 25 28 30 29 3a  c8 99 26 34 30 30 43 34  |4=N%(0):..&400C4|
00002030  2c 2c 4a 25 0d 00 9f 25  e7 4e 25 28 31 29 3e 3d  |,,J%...%.N%(1)>=|
00002040  30 8c 4a 25 21 34 3d 4e  25 28 31 29 3a c8 99 26  |0.J%!4=N%(1):..&|
00002050  34 30 30 43 34 2c 2c 4a  25 0d 00 a0 0d 4e 25 28  |400C4,,J%....N%(|
00002060  29 3d 2d 31 3a e1 0d 00  a1 ee dd f2 51 75 28 71  |)=-1:.......Qu(q|
00002070  25 2c 5f 25 2c 55 25 29  3a ea 52 25 2c 41 25 2c  |%,_%,U%):.R%,A%,|
00002080  74 79 25 3a 21 4a 25 3d  71 25 3a 4a 25 21 34 3d  |ty%:!J%=q%:J%!4=|
00002090  38 3a c8 99 26 34 30 30  43 45 2c 2c 4a 25 3a 5f  |8:..&400CE,,J%:_|
000020a0  25 2b 3d 28 4a 25 21 38  2b 4a 25 21 31 36 29 2f  |%+=(J%!8+J%!16)/|
000020b0  32 3a 55 25 2b 3d 28 4a  25 21 26 43 2b 4a 25 21  |2:U%+=(J%!&C+J%!|
000020c0  32 30 29 2f 32 3a 52 25  3d 35 36 3a c8 99 26 34  |20)/2:R%=56:..&4|
000020d0  30 30 45 36 2c 31 3a c8  93 c8 90 30 2c 30 2c 26  |00E6,1:....0,0,&|
000020e0  42 42 38 3a c8 99 26 34  30 30 45 36 2c 58 25 28  |BB8:..&400E6,X%(|
000020f0  30 29 3a c8 8f c8 90 5f  25 2c 55 25 2c 52 25 3a  |0):...._%,U%,R%:|
00002100  c8 99 26 34 30 30 45 36  2c 58 25 28 33 29 3a e3  |..&400E6,X%(3):.|
00002110  41 25 3d 30 b8 33 33 30  88 33 30 3a 86 5f 25 2b  |A%=0.330.30:._%+|
00002120  52 25 2a b5 b2 41 25 2c  55 25 2b 52 25 2a 9b b2  |R%*..A%,U%+R%*..|
00002130  41 25 2c 5f 25 2b 28 52  25 2d 26 41 29 2a b5 b2  |A%,_%+(R%-&A)*..|
00002140  41 25 2c 55 25 2b 28 52  25 2d 26 41 29 2a 9b b2  |A%,U%+(R%-&A)*..|
00002150  41 25 3a ed 0d 00 a2 e9  c8 99 26 34 30 30 45 36  |A%:.......&400E6|
00002160  2c 58 25 28 31 29 3a c8  8f 5f 25 2c 55 25 2c 52  |,X%(1):.._%,U%,R|
00002170  25 3a c8 99 26 34 30 30  45 36 2c 58 25 28 35 29  |%:..&400E6,X%(5)|
00002180  3a 41 25 3d 36 30 3a ec  5f 25 2c 55 25 3a ec 5f  |:A%=60:._%,U%:._|
00002190  25 2b 28 52 25 2a 30 2e  33 35 29 2a b5 b2 28 41  |%+(R%*0.35)*..(A|
000021a0  25 2d 39 29 2c 55 25 2b  28 52 25 2a 30 2e 33 35  |%-9),U%+(R%*0.35|
000021b0  29 2a 9b b2 28 41 25 2d  39 29 3a f0 38 35 2c 5f  |)*..(A%-9):.85,_|
000021c0  25 2b 28 52 25 2a 30 2e  33 35 29 2a b5 b2 28 41  |%+(R%*0.35)*..(A|
000021d0  25 2b 39 29 2c 55 25 2b  28 52 25 2a 30 2e 33 35  |%+9),U%+(R%*0.35|
000021e0  29 2a 9b b2 28 41 25 2b  39 29 3a ec 5f 25 2b 28  |)*..(A%+9):._%+(|
000021f0  52 25 2a 30 2e 33 35 29  2a b5 b2 28 41 25 2d 39  |R%*0.35)*..(A%-9|
00002200  29 2c 55 25 2b 28 52 25  2a 30 2e 33 35 29 2a 9b  |),U%+(R%*0.35)*.|
00002210  b2 28 41 25 2d 39 29 3a  f0 38 35 2c 5f 25 2b 28  |.(A%-9):.85,_%+(|
00002220  52 25 2a 30 2e 37 29 2a  b5 b2 41 25 2c 55 25 2b  |R%*0.7)*..A%,U%+|
00002230  28 52 25 2a 30 2e 37 29  2a 9b b2 41 25 0d 00 a3  |(R%*0.7)*..A%...|
00002240  d0 c8 99 26 34 30 30 45  36 2c 58 25 28 34 29 3a  |...&400E6,X%(4):|
00002250  41 25 3d 33 30 30 3a ec  5f 25 2c 55 25 3a ec 5f  |A%=300:._%,U%:._|
00002260  25 2b 28 52 25 2a 30 2e  32 35 29 2a b5 b2 28 41  |%+(R%*0.25)*..(A|
00002270  25 2d 39 29 2c 55 25 2b  28 52 25 2a 30 2e 32 35  |%-9),U%+(R%*0.25|
00002280  29 2a 9b b2 28 41 25 2d  39 29 3a f0 38 35 2c 5f  |)*..(A%-9):.85,_|
00002290  25 2b 28 52 25 2a 30 2e  32 35 29 2a b5 b2 28 41  |%+(R%*0.25)*..(A|
000022a0  25 2b 39 29 2c 55 25 2b  28 52 25 2a 30 2e 32 35  |%+9),U%+(R%*0.25|
000022b0  29 2a 9b b2 28 41 25 2b  39 29 3a ec 5f 25 2b 28  |)*..(A%+9):._%+(|
000022c0  52 25 2a 30 2e 32 35 29  2a b5 b2 28 41 25 2d 39  |R%*0.25)*..(A%-9|
000022d0  29 2c 55 25 2b 28 52 25  2a 30 2e 32 35 29 2a 9b  |),U%+(R%*0.25)*.|
000022e0  b2 28 41 25 2d 39 29 3a  f0 38 35 2c 5f 25 2b 28  |.(A%-9):.85,_%+(|
000022f0  52 25 2a 30 2e 35 29 2a  b5 b2 41 25 2c 55 25 2b  |R%*0.5)*..A%,U%+|
00002300  28 52 25 2a 30 2e 35 29  2a 9b b2 41 25 0d 00 a4  |(R%*0.5)*..A%...|
00002310  e0 c8 99 26 34 30 30 45  36 2c 58 25 28 36 29 3a  |...&400E6,X%(6):|
00002320  ec 5f 25 2c 55 25 3a df  42 59 30 2c 2d 28 52 25  |._%,U%:.BY0,-(R%|
00002330  2a 30 2e 39 29 3a c8 8f  c8 90 5f 25 2c 55 25 2c  |*0.9):...._%,U%,|
00002340  32 3a 5f 25 2d 3d 28 4a  25 21 38 2b 4a 25 21 31  |2:_%-=(J%!8+J%!1|
00002350  36 29 2f 32 3a 55 25 2d  3d 28 4a 25 21 26 43 2b  |6)/2:U%-=(J%!&C+|
00002360  4a 25 21 32 30 29 2f 32  3a 52 25 3d 35 36 3a 21  |J%!20)/2:R%=56:!|
00002370  4a 25 3d 71 25 3a 4a 25  21 34 3d 32 34 3a c8 99  |J%=q%:J%!4=24:..|
00002380  26 34 30 30 43 45 2c 2c  4a 25 3a 5f 25 2b 3d 28  |&400CE,,J%:_%+=(|
00002390  4a 25 21 38 2b 4a 25 21  31 36 29 2f 32 2d 32 30  |J%!8+J%!16)/2-20|
000023a0  3a 55 25 2b 3d 28 4a 25  21 26 43 2b 4a 25 21 32  |:U%+=(J%!&C+J%!2|
000023b0  30 29 2f 32 2d 32 30 3a  52 25 3d 35 36 3a c8 99  |0)/2-20:R%=56:..|
000023c0  26 34 30 30 45 44 2c 32  35 36 2c 68 25 2c 22 63  |&400ED,256,h%,"c|
000023d0  6f 76 65 72 22 2c 2c 2c  2c 4a 25 2c 4a 25 2b 26  |over",,,,J%,J%+&|
000023e0  38 30 3a 74 79 25 3d 4a  25 2b 26 38 30 0d 00 a5  |80:ty%=J%+&80...|
000023f0  ee 41 25 3d 74 79 25 3f  6b 75 25 3a 74 79 25 3f  |.A%=ty%?ku%:ty%?|
00002400  35 3d 74 79 25 3f 68 75  25 3a 74 79 25 3f 26 42  |5=ty%?hu%:ty%?&B|
00002410  3d 41 25 3a c8 99 34 36  2c 35 32 2b 32 35 36 2c  |=A%:..46,52+256,|
00002420  68 25 2c 22 63 6f 76 65  72 5f 74 6c 22 2c 5f 25  |h%,"cover_tl",_%|
00002430  2d 34 30 2c 55 25 2b 34  30 2c 30 2c 4a 25 2c 4a  |-40,U%+40,0,J%,J|
00002440  25 2b 26 38 30 3a c8 99  34 36 2c 35 32 2b 32 35  |%+&80:..46,52+25|
00002450  36 2c 68 25 2c 22 63 6f  76 65 72 5f 74 72 22 2c  |6,h%,"cover_tr",|
00002460  5f 25 2b 34 30 2c 55 25  2b 34 30 2c 30 2c 4a 25  |_%+40,U%+40,0,J%|
00002470  2c 4a 25 2b 26 38 30 3a  c8 99 34 36 2c 35 32 2b  |,J%+&80:..46,52+|
00002480  32 35 36 2c 68 25 2c 22  63 6f 76 65 72 5f 62 6c  |256,h%,"cover_bl|
00002490  22 2c 5f 25 2d 34 30 2c  55 25 2d 34 30 2c 30 2c  |",_%-40,U%-40,0,|
000024a0  4a 25 2c 4a 25 2b 26 38  30 3a c8 99 34 36 2c 35  |J%,J%+&80:..46,5|
000024b0  32 2b 32 35 36 2c 68 25  2c 22 63 6f 76 65 72 5f  |2+256,h%,"cover_|
000024c0  62 72 22 2c 5f 25 2b 34  30 2c 55 25 2d 34 30 2c  |br",_%+40,U%-40,|
000024d0  30 2c 4a 25 2c 4a 25 2b  26 38 30 0d 00 a6 e6 c8  |0,J%,J%+&80.....|
000024e0  99 34 36 2c 35 32 2b 32  35 36 2c 68 25 2c 22 63  |.46,52+256,h%,"c|
000024f0  6f 76 65 72 5f 74 22 2c  5f 25 2c 55 25 2b 34 30  |over_t",_%,U%+40|
00002500  2c 30 2c 4a 25 2c 4a 25  2b 26 38 30 3a c8 99 34  |,0,J%,J%+&80:..4|
00002510  36 2c 35 32 2b 32 35 36  2c 68 25 2c 22 63 6f 76  |6,52+256,h%,"cov|
00002520  65 72 5f 62 22 2c 5f 25  2c 55 25 2d 34 30 2c 30  |er_b",_%,U%-40,0|
00002530  2c 4a 25 2c 4a 25 2b 26  38 30 3a c8 99 34 36 2c  |,J%,J%+&80:..46,|
00002540  35 32 2b 32 35 36 2c 68  25 2c 22 63 6f 76 65 72  |52+256,h%,"cover|
00002550  5f 6c 22 2c 5f 25 2d 34  30 2c 55 25 2c 30 2c 4a  |_l",_%-40,U%,0,J|
00002560  25 2c 4a 25 2b 26 38 30  3a c8 99 34 36 2c 35 32  |%,J%+&80:..46,52|
00002570  2b 32 35 36 2c 68 25 2c  22 63 6f 76 65 72 5f 72  |+256,h%,"cover_r|
00002580  22 2c 5f 25 2b 34 30 2c  55 25 2c 30 2c 4a 25 2c  |",_%+40,U%,0,J%,|
00002590  4a 25 2b 26 38 30 3a c8  99 34 36 2c 35 32 2b 32  |J%+&80:..46,52+2|
000025a0  35 36 2c 68 25 2c 22 63  6f 76 65 72 22 2c 5f 25  |56,h%,"cover",_%|
000025b0  2c 55 25 2c 30 2c 4a 25  2c 4a 25 2b 26 38 30 3a  |,U%,0,J%,J%+&80:|
000025c0  e1 0d 00 a7 30 dd a4 74  28 6a 25 2c 54 4a 25 29  |....0..t(j%,TJ%)|
000025d0  3a 3d c0 a4 41 28 22 44  61 79 22 2b c3 28 28 28  |:=..A("Day"+.(((|
000025e0  6a 25 2d 31 29 83 37 29  2b 31 29 29 2c 54 4a 25  |j%-1).7)+1)),TJ%|
000025f0  29 0d 00 a8 ad dd a4 55  5f 28 6a 25 2c 54 4a 25  |)......U_(j%,TJ%|
00002600  29 3a ea 41 24 2c 61 24  3a 41 24 3d 22 2c 4d 6f  |):.A$,a$:A$=",Mo|
00002610  6e 64 61 79 2c 54 75 65  73 64 61 79 2c 57 65 64  |nday,Tuesday,Wed|
00002620  6e 65 73 64 61 79 2c 54  68 75 72 73 64 61 79 2c  |nesday,Thursday,|
00002630  46 72 69 64 61 79 2c 53  61 74 75 72 64 61 79 2c  |Friday,Saturday,|
00002640  53 75 6e 64 61 79 2c 22  3a 6a 25 3d 28 28 6a 25  |Sunday,":j%=((j%|
00002650  2d 31 29 83 37 29 2b 31  3a f5 41 24 3d c1 41 24  |-1).7)+1:.A$=.A$|
00002660  2c a7 41 24 2c 22 2c 22  29 2b 31 29 3a 6a 25 2d  |,.A$,",")+1):j%-|
00002670  3d 31 3a fd 6a 25 3d 30  3a 61 24 3d c0 41 24 2c  |=1:.j%=0:a$=.A$,|
00002680  a7 41 24 2c 22 2c 22 29  2d 31 29 3a e7 54 4a 25  |.A$,",")-1):.TJ%|
00002690  3e 30 8c 61 24 3d c0 61  24 2c 54 4a 25 29 0d 00  |>0.a$=.a$,TJ%)..|
000026a0  a9 07 3d 61 24 0d 00 aa  d1 dd a4 59 79 28 56 6c  |..=a$......Yy(Vl|
000026b0  25 2c 54 4a 25 29 3a ea  41 24 2c 73 24 3a 41 24  |%,TJ%):.A$,s$:A$|
000026c0  3d 22 2c 4a 61 6e 75 61  72 79 2c 46 65 62 72 75  |=",January,Febru|
000026d0  61 72 79 2c 4d 61 72 63  68 2c 41 70 72 69 6c 2c  |ary,March,April,|
000026e0  4d 61 79 2c 4a 75 6e 65  2c 4a 75 6c 79 2c 41 75  |May,June,July,Au|
000026f0  67 75 73 74 2c 53 65 70  74 65 6d 62 65 72 2c 4f  |gust,September,O|
00002700  63 74 6f 62 65 72 2c 4e  6f 76 65 6d 62 65 72 2c  |ctober,November,|
00002710  44 65 63 65 6d 62 65 72  2c 22 3a 56 6c 25 3d 28  |December,":Vl%=(|
00002720  28 56 6c 25 2d 31 29 83  26 43 29 2b 31 3a f5 41  |(Vl%-1).&C)+1:.A|
00002730  24 3d c1 41 24 2c a7 41  24 2c 22 2c 22 29 2b 31  |$=.A$,.A$,",")+1|
00002740  29 3a 56 6c 25 2d 3d 31  3a fd 56 6c 25 3c 3d 30  |):Vl%-=1:.Vl%<=0|
00002750  3a 73 24 3d c0 41 24 2c  a7 41 24 2c 22 2c 22 29  |:s$=.A$,.A$,",")|
00002760  2d 31 29 3a e7 54 4a 25  3e 30 8c 73 24 3d c0 73  |-1):.TJ%>0.s$=.s|
00002770  24 2c 54 4a 25 29 0d 00  ab 07 3d 73 24 0d 00 ac  |$,TJ%)....=s$...|
00002780  19 dd a4 77 79 28 64 25  29 3a 3d c3 64 25 2b a4  |...wy(d%):=.d%+.|
00002790  4c 79 28 64 25 29 0d 00  ad 7d dd a4 4c 79 28 64  |Ly(d%)...}..Ly(d|
000027a0  25 29 3a ea 41 24 2c 5a  24 2c 46 24 2c 41 25 2c  |%):.A$,Z$,F$,A%,|
000027b0  78 79 25 3a 41 24 3d a4  41 28 22 74 68 22 29 3a  |xy%:A$=.A("th"):|
000027c0  5a 24 3d c0 41 24 2c a7  41 24 2c 22 2c 22 29 2d  |Z$=.A$,.A$,",")-|
000027d0  31 29 3a c8 95 a7 41 24  2c 22 2c 22 29 80 ac 78  |1):...A$,",")..x|
000027e0  79 25 3a 41 24 3d c1 41  24 2c a7 41 24 2c 22 2c  |y%:A$=.A$,.A$,",|
000027f0  22 29 2b 31 29 3a 46 24  3d c0 41 24 2c a7 41 24  |")+1):F$=.A$,.A$|
00002800  2c 22 2c 22 29 2d 31 29  3a e7 a7 46 24 2c 22 23  |,",")-1):..F$,"#|
00002810  22 29 8c 0d 00 ae 1d e7  c2 c3 64 25 2c a9 46 24  |")........d%,.F$|
00002820  2d 31 29 3d c1 46 24 2c  32 29 8c 78 79 25 3d b9  |-1)=.F$,2).xy%=.|
00002830  0d 00 af 12 cc e7 bb 46  24 3d 64 25 8c 78 79 25  |.......F$=d%.xy%|
00002840  3d b9 0d 00 b0 0d cd 3a  ce 3a e7 78 79 25 8c 0d  |=......:.:.xy%..|
00002850  00 b1 3c c8 95 bb 41 24  3e 30 84 97 28 41 24 29  |..<...A$>0..(A$)|
00002860  3d 33 35 3a 41 24 3d c1  41 24 2c a7 41 24 2c 22  |=35:A$=.A$,.A$,"|
00002870  2c 22 29 2b 31 29 3a ce  3a 5a 24 3d c0 41 24 2c  |,")+1):.:Z$=.A$,|
00002880  a7 41 24 2c 22 2c 22 29  2d 31 29 0d 00 b2 09 cd  |.A$,",")-1).....|
00002890  3a 3d 5a 24 0d 00 b3 33  dd a4 58 28 56 6c 25 2c  |:=Z$...3..X(Vl%,|
000028a0  54 4a 25 29 3a 3d c0 a4  41 28 22 4d 6f 6e 22 2b  |TJ%):=..A("Mon"+|
000028b0  c3 28 28 28 56 6c 25 2d  31 29 83 26 43 29 2b 31  |.(((Vl%-1).&C)+1|
000028c0  29 29 2c 54 4a 25 29 0d  00 b4 25 dd a4 70 79 28  |)),TJ%)...%..py(|
000028d0  6e 25 2c 72 25 2c 4c 75  25 2c 66 5f 25 29 3a ea  |n%,r%,Lu%,f_%):.|
000028e0  41 24 2c 5a 24 3a e7 ac  66 5f 25 8c 0d 00 b5 2a  |A$,Z$:..f_%....*|
000028f0  e7 6e 25 3e 26 42 8c 5a  24 3d 22 20 22 2b a4 41  |.n%>&B.Z$=" "+.A|
00002900  28 22 70 6d 22 29 8b 5a  24 3d 22 20 22 2b a4 41  |("pm").Z$=" "+.A|
00002910  28 22 61 6d 22 29 0d 00  b6 18 cd 3a e7 6e 25 3e  |("am").....:.n%>|
00002920  26 43 80 ac 66 5f 25 8c  6e 25 2d 3d 26 43 0d 00  |&C..f_%.n%-=&C..|
00002930  b7 26 e7 66 5f 25 8c 41  24 3d c4 2d 28 6e 25 3c  |.&.f_%.A$=.-(n%<|
00002940  26 41 29 2c 22 30 22 29  8b e7 6e 25 3d 30 8c 6e  |&A),"0")..n%=0.n|
00002950  25 3d 26 43 0d 00 b8 48  41 24 2b 3d c3 6e 25 2b  |%=&C...HA$+=.n%+|
00002960  22 3a 22 2b c4 2d 28 72  25 3c 26 41 29 2c 22 30  |":"+.-(r%<&A),"0|
00002970  22 29 2b c3 72 25 3a e7  4c 75 25 3c 3e 2d 31 8c  |")+.r%:.Lu%<>-1.|
00002980  41 24 2b 3d 22 3a 22 2b  c4 2d 28 4c 75 25 3c 26  |A$+=":"+.-(Lu%<&|
00002990  41 29 2c 22 30 22 29 2b  c3 4c 75 25 0d 00 b9 0a  |A),"0")+.Lu%....|
000029a0  3d 41 24 2b 5a 24 0d 00  ba 94 dd f2 48 4a 28 70  |=A$+Z$......HJ(p|
000029b0  24 2c 5a 79 24 2c 46 79  24 2c 68 61 25 29 3a 48  |$,Zy$,Fy$,ha%):H|
000029c0  24 3d 70 24 3a 54 24 3d  46 79 24 3a 60 75 25 3d  |$=p$:T$=Fy$:`u%=|
000029d0  30 3a 56 75 25 3d a3 3a  50 24 3d 5a 79 24 3a 76  |0:Vu%=.:P$=Zy$:v|
000029e0  5f 25 3d 30 3a 72 5f 25  3d 30 3a 54 75 25 3d a3  |_%=0:r_%=0:Tu%=.|
000029f0  3a 49 79 25 3d a3 3a c8  99 26 34 30 30 43 30 2c  |:Iy%=.:..&400C0,|
00002a00  26 43 38 2c 26 34 42 35  33 34 31 35 34 2c 48 24  |&C8,&4B534154,H$|
00002a10  b8 62 61 25 2c 76 75 25  3a f2 46 4a 3a e7 68 61  |.ba%,vu%:.FJ:.ha|
00002a20  25 8c f2 74 75 28 74 61  25 2c 76 24 2b 22 2e 54  |%..tu(ta%,v$+".T|
00002a30  65 6d 70 6c 61 74 65 73  22 29 0d 00 bb 0d f2 6e  |emplates").....n|
00002a40  5f 3a f2 59 75 3a e1 0d  00 bc 15 dd f2 79 75 3a  |_:.Yu:.......yu:|
00002a50  ea 53 25 3a c8 8e 4b 25  21 31 36 ca 0d 00 bd 0c  |.S%:..K%!16.....|
00002a60  c9 30 3a 56 75 25 3d b9  0d 00 be 1b c9 31 3a f2  |.0:Vu%=......1:.|
00002a70  5f 4a 28 4b 25 21 34 30  2c a4 4e 28 4b 25 2b 34  |_J(K%!40,.N(K%+4|
00002a80  34 29 29 0d 00 bf 1b c9  33 3a f2 6f 5f 28 4b 25  |4)).....3:.o_(K%|
00002a90  21 34 30 2c a4 4e 28 4b  25 2b 34 34 29 29 0d 00  |!40,.N(K%+44))..|
00002aa0  c0 0a c9 38 3a f2 5a 4a  0d 00 c1 22 c9 26 34 30  |...8:.ZJ...".&40|
00002ab0  30 43 30 3a f2 56 75 28  4b 25 21 32 30 2c 4b 25  |0C0:.Vu(K%!20,K%|
00002ac0  21 32 34 2c 4b 25 21 32  38 29 0d 00 c2 0f c9 26  |!24,K%!28).....&|
00002ad0  34 30 30 43 31 3a f2 50  5f 0d 00 c3 24 c9 26 34  |400C1:.P_...$.&4|
00002ae0  30 30 43 32 3a e7 a4 4e  28 4b 25 2b 32 38 29 3d  |00C2:..N(K%+28)=|
00002af0  48 24 80 4b 25 21 34 3c  3e 76 75 25 8c 0d 00 c4  |H$.K%!4<>vu%....|
00002b00  1e f2 42 28 a4 41 28 22  45 72 72 52 75 6e 22 29  |..B(.A("ErrRun")|
00002b10  29 3a f2 67 4a 28 4b 25  21 34 29 0d 00 c5 05 cd  |):.gJ(K%!4).....|
00002b20  0d 00 c6 14 c9 26 34 30  30 43 43 3a c8 8e 4b 25  |.....&400CC:..K%|
00002b30  21 32 30 ca 0d 00 c7 1c  c9 69 25 3a 24 28 4b 25  |!20......i%:$(K%|
00002b40  2b 33 36 29 3d a4 41 28  22 54 69 74 6c 65 22 29  |+36)=.A("Title")|
00002b50  0d 00 c8 20 c9 66 25 2c  52 79 25 3a 24 28 4b 25  |... .f%,Ry%:$(K%|
00002b60  2b 33 36 29 3d a4 41 28  22 41 6c 61 72 6d 22 29  |+36)=.A("Alarm")|
00002b70  0d 00 c9 1c c9 73 79 25  3a 24 28 4b 25 2b 33 36  |.....sy%:$(K%+36|
00002b80  29 3d a4 41 28 22 44 61  74 65 22 29 0d 00 ca 20  |)=.A("Date")... |
00002b90  c9 54 5f 25 3a 24 28 4b  25 2b 33 36 29 3d a4 41  |.T_%:$(K%+36)=.A|
00002ba0  28 22 53 65 74 74 69 6e  67 73 22 29 0d 00 cb 22  |("Settings")..."|
00002bb0  c9 5f 79 25 2c 47 4a 25  3a 24 28 4b 25 2b 33 36  |._y%,GJ%:$(K%+36|
00002bc0  29 3d a4 41 28 22 41 6e  6e 54 61 62 22 29 0d 00  |)=.A("AnnTab")..|
00002bd0  cc 20 c9 4a 79 25 3a 24  28 4b 25 2b 33 36 29 3d  |. .Jy%:$(K%+36)=|
00002be0  a4 41 28 22 53 65 74 63  6c 6f 63 6b 22 29 0d 00  |.A("Setclock")..|
00002bf0  cd 4b cb 3a 21 4b 25 3d  35 36 3a 24 28 4b 25 2b  |.K.:!K%=56:$(K%+|
00002c00  32 38 29 3d 22 6f 72 67  22 3a 53 25 3d 4b 25 21  |28)="org":S%=K%!|
00002c10  34 3a 4b 25 21 34 3d 76  75 25 3a c8 94 4b 25 21  |4:K%!4=vu%:..K%!|
00002c20  38 2c 4b 25 21 26 43 3a  c8 99 26 34 30 30 45 37  |8,K%!&C:..&400E7|
00002c30  2c 31 37 2c 4b 25 2c 53  25 0d 00 ce 07 cb 3a e1  |,17,K%,S%.....:.|
00002c40  0d 00 cf 3f dd a4 51 79  28 42 6c 25 2c 53 24 29  |...?..Qy(Bl%,S$)|
00002c50  3a c8 99 26 34 30 30 43  46 2c 2c 4a 25 3a 3d 28  |:..&400CF,,J%:=(|
00002c60  28 42 6c 25 3d 26 46 46  46 29 84 28 42 6c 25 3d  |(Bl%=&FFF).(Bl%=|
00002c70  26 44 46 45 29 29 84 4a  25 21 26 43 3d 66 25 0d  |&DFE)).J%!&C=f%.|
00002c80  00 d0 22 dd f2 6f 5f 28  42 6c 25 2c 53 24 29 3a  |.."..o_(Bl%,S$):|
00002c90  ea 77 25 3a e7 a4 51 79  28 42 6c 25 2c 53 24 29  |.w%:..Qy(Bl%,S$)|
00002ca0  8c 0d 00 d1 38 c8 94 4b  25 21 38 2c 4b 25 21 26  |....8..K%!8,K%!&|
00002cb0  43 3a 4b 25 21 31 36 3d  34 3a c8 99 26 34 30 30  |C:K%!16=4:..&400|
00002cc0  45 37 2c 31 37 2c 4b 25  2c 4b 25 21 34 3a e7 4a  |E7,17,K%,K%!4:.J|
00002cd0  25 21 26 43 3c 3e 66 25  8c 0d 00 d2 0f e7 47 79  |%!&C<>f%......Gy|
00002ce0  25 3c 3e 2d 31 8c f2 69  0d 00 d3 52 ff 22 43 6f  |%<>-1..i...R."Co|
00002cf0  70 79 20 22 2b 53 24 2b  22 20 22 2b 50 24 2b 22  |py "+S$+" "+P$+"|
00002d00  2e 49 6d 70 6f 72 74 20  7e 63 20 7e 76 20 66 22  |.Import ~c ~v f"|
00002d10  3a e7 53 24 3d 22 3c 57  69 6d 70 24 53 63 72 61  |:.S$="<Wimp$Scra|
00002d20  70 3e 22 8c ff 22 52 65  6d 6f 76 65 20 3c 57 69  |p>".."Remove <Wi|
00002d30  6d 70 24 53 63 72 61 70  3e 22 0d 00 d4 15 f2 52  |mp$Scrap>".....R|
00002d40  4a 28 50 24 2b 22 2e 49  6d 70 6f 72 74 22 29 0d  |J(P$+".Import").|
00002d50  00 d5 0c cc f2 75 5f 28  53 24 29 0d 00 d6 05 cd  |.....u_(S$).....|
00002d60  0d 00 d7 07 cd 3a e1 0d  00 d8 38 dd a4 6c 79 28  |.....:....8..ly(|
00002d70  79 61 25 2c 68 79 25 29  3a ea 5a 79 25 2c 41 25  |ya%,hy%):.Zy%,A%|
00002d80  3a 5a 79 25 3d 2d 31 3a  e7 6b 79 25 3d 41 25 28  |:Zy%=-1:.ky%=A%(|
00002d90  36 29 80 55 5f 25 3e 31  80 55 5f 25 3c 36 8c 0d  |6).U_%>1.U_%<6..|
00002da0  00 d9 29 e7 21 79 61 25  3d 30 8c 41 25 3d a4 5f  |..).!ya%=0.A%=._|
00002db0  28 6b 79 25 2c 55 5f 25  29 8b 41 25 3d a4 75 28  |(ky%,U_%).A%=.u(|
00002dc0  6b 79 25 2c 55 5f 25 29  0d 00 da 25 f2 57 28 41  |ky%,U_%)...%.W(A|
00002dd0  79 25 2c 30 2c 2d 31 29  3a 5a 79 25 3d 41 79 25  |y%,0,-1):Zy%=Ay%|
00002de0  3a f2 53 28 41 79 25 2c  41 25 2c 31 29 0d 00 db  |:.S(Ay%,A%,1)...|
00002df0  0a cd 3a 3d 5a 79 25 0d  00 dc 1c dd a4 43 79 3a  |..:=Zy%......Cy:|
00002e00  ea 68 79 25 2c 52 25 2c  41 24 2c 5a 24 3a e7 76  |.hy%,R%,A$,Z$:.v|
00002e10  79 25 8c 0d 00 dd 71 41  24 3d a4 41 28 22 51 42  |y%....qA$=.A("QB|
00002e20  75 74 74 6f 6e 73 22 29  3a 5a 24 3d a4 41 28 22  |uttons"):Z$=.A("|
00002e30  45 72 72 53 61 76 65 22  29 3a 21 4a 25 3d 30 3a  |ErrSave"):!J%=0:|
00002e40  24 28 4a 25 2b 34 29 3d  5a 24 3a c8 99 26 34 30  |$(J%+4)=Z$:..&40|
00002e50  30 44 46 2c 4a 25 2c 32  38 30 2c 22 4d 65 73 73  |0DF,J%,280,"Mess|
00002e60  61 67 65 20 66 72 6f 6d  20 22 2b 48 24 2c 77 24  |age from "+H$,w$|
00002e70  2c 2d 31 2c 41 24 b8 2c  52 25 3a e7 52 25 3d 33  |,-1,A$.,R%:.R%=3|
00002e80  8c f2 50 79 0d 00 de 0c  cd 3a 3d 52 25 3c 3e 34  |..Py.....:=R%<>4|
00002e90  0d 00 df 1f dd f2 50 5f  ea 7a 61 25 2c 61 61 25  |......P_.za%,aa%|
00002ea0  2c 4d 25 3a e7 28 4f 79  25 80 34 29 3e 30 8c 0d  |,M%:.(Oy%.4)>0..|
00002eb0  00 e0 17 e7 a4 48 79 28  eb 29 8c 4d 25 3d 32 30  |.....Hy(.).M%=20|
00002ec0  8b 4d 25 3d 26 43 0d 00  e1 87 c8 99 26 32 30 30  |.M%=&C......&200|
00002ed0  32 45 2c 32 38 31 2c 68  25 2c 22 63 6c 6f 63 6b  |2E,281,h%,"clock|
00002ee0  22 3a c8 99 35 33 2c 4d  25 2c 34 b8 2c 2c 7a 61  |":..53,M%,4.,,za|
00002ef0  25 3a c8 99 35 33 2c 4d  25 2c 35 b8 2c 2c 61 61  |%:..53,M%,5.,,aa|
00002f00  25 3a c8 99 34 36 2c 38  2b 35 31 32 2c 68 25 b8  |%:..46,8+512,h%.|
00002f10  2c 2c 2c 2c 2c 46 25 3a  c8 99 34 36 2c 32 37 31  |,,,,,F%:..46,271|
00002f20  2c 68 25 2c 22 63 6c 6f  63 6b 22 2c 30 2c 26 37  |,h%,"clock",0,&7|
00002f30  34 2f 28 31 3c 3c 7a 61  25 29 2c 26 37 38 2f 28  |4/(1<<za%),&78/(|
00002f40  31 3c 3c 61 61 25 29 2c  4d 25 3a f2 6d 0d 00 e2  |1<<aa%),M%:.m...|
00002f50  07 cd 3a e1 0d 00 e3 49  dd f2 65 28 71 25 2c 73  |..:....I..e(q%,s|
00002f60  25 2c 67 25 2c 59 79 25  2c 72 79 25 29 ea 41 25  |%,g%,Yy%,ry%).A%|
00002f70  2c 42 25 2c 41 24 2c 48  5f 25 3a 4b 5f 25 3d 74  |,B%,A$,H_%:K_%=t|
00002f80  25 3a 77 5f 25 3d 76 25  3a 48 5f 25 3d 31 2b 32  |%:w_%=v%:H_%=1+2|
00002f90  2a 28 67 25 3d 31 29 3a  c8 8e 71 25 ca 0d 00 e4  |*(g%=1):..q%....|
00002fa0  57 c9 69 25 3a 21 4b 25  3d 69 25 3a c8 99 26 34  |W.i%:!K%=i%:..&4|
00002fb0  30 30 43 42 2c 2c 4b 25  3a 5f 25 3d 4b 25 21 34  |00CB,,K%:_%=K%!4|
00002fc0  2d 4b 25 21 32 30 3a 55  25 3d 4b 25 21 31 36 2d  |-K%!20:U%=K%!16-|
00002fd0  4b 25 21 32 34 3a f2 6d  5f 28 73 25 2c 67 25 2c  |K%!24:.m_(s%,g%,|
00002fe0  59 79 25 2d 5f 25 2c 72  79 25 2d 55 25 2c 5f 25  |Yy%-_%,ry%-U%,_%|
00002ff0  2c 55 25 29 0d 00 e5 0d  c9 2d 32 3a c8 8e 67 25  |,U%).....-2:..g%|
00003000  ca 0d 00 e6 16 c9 31 3a  f2 73 28 44 79 25 2c 66  |......1:.s(Dy%,f|
00003010  79 25 2c 4d 79 25 29 0d  00 e7 28 c9 32 3a 4c 4a  |y%,My%)...(.2:LJ|
00003020  25 3d 2d 31 3a f2 46 28  6b 4a 25 2c 59 79 25 2c  |%=-1:.F(kJ%,Yy%,|
00003030  a4 56 79 28 6b 4a 25 29  2c 71 25 2c 73 25 29 0d  |.Vy(kJ%),q%,s%).|
00003040  00 e8 0b c9 34 3a c8 8e  b9 ca 0d 00 e9 17 c9 a6  |....4:..........|
00003050  2d 31 3a e7 54 79 25 3d  30 8c f2 55 79 8b f2 49  |-1:.Ty%=0..Uy..I|
00003060  79 0d 00 ea 11 c9 a6 2d  33 3a 4d 4a 25 3d 35 3a  |y......-3:MJ%=5:|
00003070  f2 68 0d 00 eb 11 7f f2  72 28 69 25 2c 2d 31 2c  |.h......r(i%,-1,|
00003080  2d 31 29 0d 00 ec 05 cb  0d 00 ed 05 cb 0d 00 ee  |-1).............|
00003090  0e c9 73 79 25 3a c8 8e  73 25 ca 0d 00 ef 39 c9  |..sy%:..s%....9.|
000030a0  30 3a f2 57 28 7a 5f 25  2c 30 2c 2d 31 29 3a f2  |0:.W(z_%,0,-1):.|
000030b0  53 28 7a 5f 25 2c 50 4a  25 2d 31 2c b9 29 3a f2  |S(z_%,PJ%-1,.):.|
000030c0  46 28 7a 5f 25 2c 59 79  25 2c 72 79 25 2c 71 25  |F(z_%,Yy%,ry%,q%|
000030d0  2c 73 25 29 0d 00 f0 31  c9 32 2c 33 3a f2 44 79  |,s%)...1.2,3:.Dy|
000030e0  28 2d 31 2c 2d 31 2c 28  31 2b 32 2a 28 73 25 3d  |(-1,-1,(1+2*(s%=|
000030f0  32 29 29 2a 48 5f 25 2a  28 31 2d 34 39 2a 28 a6  |2))*H_%*(1-49*(.|
00003100  2d 31 29 29 29 0d 00 f1  1a c9 33 35 3a f2 6e 79  |-1))).....35:.ny|
00003110  3a e7 67 25 3c 3e 31 8c  f2 58 28 73 79 25 29 0d  |:.g%<>1..X(sy%).|
00003120  00 f2 0f c9 33 36 3a f2  58 28 73 79 25 29 0d 00  |....36:.X(sy%)..|
00003130  f3 0c 7f 3a e7 67 25 3d  32 8c 0d 00 f4 36 f2 57  |...:.g%=2....6.W|
00003140  28 7a 5f 25 2c 30 2c 2d  31 29 3a f2 53 28 7a 5f  |(z_%,0,-1):.S(z_|
00003150  25 2c 50 4a 25 2d 31 2c  b9 29 3a f2 46 28 7a 5f  |%,PJ%-1,.):.F(z_|
00003160  25 2c 59 79 25 2c 72 79  25 2c 71 25 2c 73 25 29  |%,Yy%,ry%,q%,s%)|
00003170  0d 00 f5 1f cc f2 44 79  28 73 25 2d 33 2c 2d 31  |......Dy(s%-3,-1|
00003180  2c 30 29 3a e7 67 25 3c  32 35 36 8c f2 6e 79 0d  |,0):.g%<256..ny.|
00003190  00 f6 05 cd 0d 00 f7 05  cb 0d 00 f8 10 c9 4a 79  |..............Jy|
000031a0  25 3a e7 67 25 3c 3e 32  8c 0d 00 f9 09 c8 8e 73  |%:.g%<>2.......s|
000031b0  25 ca 0d 00 fa 20 c9 31  3a f2 65 28 4a 79 25 2c  |%.... .1:.e(Jy%,|
000031c0  39 2b a4 5a 28 4a 79 25  2c 31 29 2c 34 2c 30 2c  |9+.Z(Jy%,1),4,0,|
000031d0  30 29 0d 00 fb 1d c9 32  3a f2 60 28 58 5f 25 2c  |0).....2:.`(X_%,|
000031e0  56 5f 25 2c 4c 5f 25 2c  4a 79 25 2c 73 25 29 0d  |V_%,L_%,Jy%,s%).|
000031f0  00 fc 23 c9 33 3a e7 a4  58 79 28 bb a4 4d 28 4a  |..#.3:..Xy(..M(J|
00003200  79 25 2c 34 29 2c bb a4  4d 28 4a 79 25 2c 35 29  |y%,4),..M(Jy%,5)|
00003210  29 8c 0d 00 fd 1a e7 a4  6a 3c 3e a4 5a 28 4a 79  |).......j<>.Z(Jy|
00003220  25 2c 31 29 8c f2 4d 79  28 2d 31 29 0d 00 fe b6  |%,1)..My(-1)....|
00003230  41 25 3d bb a4 4d 28 4a  79 25 2c 34 29 3a 41 24  |A%=..M(Jy%,4):A$|
00003240  3d c3 41 25 3a 41 24 3d  c4 32 2d a9 41 24 2c 22  |=.A%:A$=.2-.A$,"|
00003250  30 22 29 2b 41 24 3a 24  4a 25 3d bd 32 34 2b a4  |0")+A$:$J%=.24+.|
00003260  55 5f 28 a4 48 28 58 5f  25 2c 56 5f 25 2c 4c 5f  |U_(.H(X_%,V_%,L_|
00003270  25 29 2c 33 29 2b 22 2c  22 2b c4 2d 28 58 5f 25  |%),3)+","+.-(X_%|
00003280  3c 26 41 29 2c 22 30 22  29 2b c3 58 5f 25 2b 22  |<&A),"0")+.X_%+"|
00003290  20 22 2b a4 59 79 28 56  5f 25 2c 33 29 2b 22 20  | "+.Yy(V_%,3)+" |
000032a0  22 2b c3 4c 5f 25 2b 22  2e 22 2b 41 24 2b 22 3a  |"+.L_%+"."+A$+":|
000032b0  22 2b a4 4d 28 4a 79 25  2c 35 29 2b 22 3a 30 30  |"+.M(Jy%,5)+":00|
000032c0  22 3a c8 99 26 32 30 30  30 37 2c 26 46 2c 4a 25  |":..&20007,&F,J%|
000032d0  b8 3b 42 25 3a e7 67 25  3d 34 8c f2 58 28 4a 79  |.;B%:.g%=4..X(Jy|
000032e0  25 29 0d 00 ff 05 cd 0d  01 00 56 c9 38 3a 41 25  |%)........V.8:A%|
000032f0  3d bb a4 4d 28 4a 79 25  2c 34 29 2b 48 5f 25 3a  |=..M(Jy%,4)+H_%:|
00003300  e7 41 25 3d 32 34 8c 41  25 3d 30 3a f2 50 28 58  |.A%=24.A%=0:.P(X|
00003310  5f 25 2c 56 5f 25 2c 4c  5f 25 2c 31 2c 30 2c 30  |_%,V_%,L_%,1,0,0|
00003320  29 3a f2 41 28 4a 79 25  2c 32 2c a4 55 28 58 5f  |):.A(Jy%,2,.U(X_|
00003330  25 2c 56 5f 25 2c 4c 5f  25 2c b9 29 29 0d 01 01  |%,V_%,L_%,.))...|
00003340  43 e7 41 25 3d 2d 31 8c  41 25 3d 32 33 3a f2 50  |C.A%=-1.A%=23:.P|
00003350  28 58 5f 25 2c 56 5f 25  2c 4c 5f 25 2c 2d 31 2c  |(X_%,V_%,L_%,-1,|
00003360  30 2c 30 29 3a f2 41 28  4a 79 25 2c 32 2c a4 55  |0,0):.A(Jy%,2,.U|
00003370  28 58 5f 25 2c 56 5f 25  2c 4c 5f 25 2c b9 29 29  |(X_%,V_%,L_%,.))|
00003380  0d 01 02 11 f2 41 28 4a  79 25 2c 34 2c c3 41 25  |.....A(Jy%,4,.A%|
00003390  29 0d 01 03 58 c9 39 3a  41 25 3d bb a4 4d 28 4a  |)...X.9:A%=..M(J|
000033a0  79 25 2c 34 29 2d 48 5f  25 3a e7 41 25 3d 2d 31  |y%,4)-H_%:.A%=-1|
000033b0  8c 41 25 3d 32 33 3a f2  50 28 58 5f 25 2c 56 5f  |.A%=23:.P(X_%,V_|
000033c0  25 2c 4c 5f 25 2c 2d 31  2c 30 2c 30 29 3a f2 41  |%,L_%,-1,0,0):.A|
000033d0  28 4a 79 25 2c 32 2c a4  55 28 58 5f 25 2c 56 5f  |(Jy%,2,.U(X_%,V_|
000033e0  25 2c 4c 5f 25 2c b9 29  29 0d 01 04 41 e7 41 25  |%,L_%,.))...A.A%|
000033f0  3d 32 34 8c 41 25 3d 30  3a f2 50 28 58 5f 25 2c  |=24.A%=0:.P(X_%,|
00003400  56 5f 25 2c 4c 5f 25 2c  31 2c 30 2c 30 29 3a f2  |V_%,L_%,1,0,0):.|
00003410  41 28 4a 79 25 2c 32 2c  a4 55 28 58 5f 25 2c 56  |A(Jy%,2,.U(X_%,V|
00003420  5f 25 2c 4c 5f 25 2c b9  29 29 0d 01 05 11 f2 41  |_%,L_%,.)).....A|
00003430  28 4a 79 25 2c 34 2c c3  41 25 29 0d 01 06 48 c9  |(Jy%,4,.A%)...H.|
00003440  26 41 2c 26 43 3a 41 25  3d bb a4 4d 28 4a 79 25  |&A,&C:A%=..M(Jy%|
00003450  2c 35 29 2b 28 31 2d 39  2a 28 73 25 3d 26 41 29  |,5)+(1-9*(s%=&A)|
00003460  29 2a 48 5f 25 3a e7 41  25 3e 35 39 8c 41 25 2d  |)*H_%:.A%>59.A%-|
00003470  3d 36 30 3a f2 65 28 4a  79 25 2c 38 2c 34 2c 30  |=60:.e(Jy%,8,4,0|
00003480  2c 30 29 0d 01 07 20 e7  41 25 3c 30 8c 41 25 2b  |,0)... .A%<0.A%+|
00003490  3d 36 30 3a f2 65 28 4a  79 25 2c 39 2c 34 2c 30  |=60:.e(Jy%,9,4,0|
000034a0  2c 30 29 0d 01 08 1e f2  41 28 4a 79 25 2c 35 2c  |,0).....A(Jy%,5,|
000034b0  c4 32 2d a9 c3 41 25 2c  22 30 22 29 2b c3 41 25  |.2-..A%,"0")+.A%|
000034c0  29 0d 01 09 48 c9 26 42  2c 26 44 3a 41 25 3d bb  |)...H.&B,&D:A%=.|
000034d0  a4 4d 28 4a 79 25 2c 35  29 2d 28 31 2d 39 2a 28  |.M(Jy%,5)-(1-9*(|
000034e0  73 25 3d 26 42 29 29 2a  48 5f 25 3a e7 41 25 3e  |s%=&B))*H_%:.A%>|
000034f0  35 39 8c 41 25 2d 3d 36  30 3a f2 65 28 4a 79 25  |59.A%-=60:.e(Jy%|
00003500  2c 38 2c 34 2c 30 2c 30  29 0d 01 0a 20 e7 41 25  |,8,4,0,0)... .A%|
00003510  3c 30 8c 41 25 2b 3d 36  30 3a f2 65 28 4a 79 25  |<0.A%+=60:.e(Jy%|
00003520  2c 39 2c 34 2c 30 2c 30  29 0d 01 0b 1e f2 41 28  |,9,4,0,0).....A(|
00003530  4a 79 25 2c 35 2c c4 32  2d a9 c3 41 25 2c 22 30  |Jy%,5,.2-..A%,"0|
00003540  22 29 2b c3 41 25 29 0d  01 0c 05 cb 0d 01 0d 05  |")+.A%).........|
00003550  cd 0d 01 0e 1e c9 66 25  3a f2 70 75 28 59 79 25  |......f%:.pu(Yy%|
00003560  2c 72 79 25 2c 71 25 2c  73 25 2c 48 5f 25 29 0d  |,ry%,q%,s%,H_%).|
00003570  01 0f 1b c9 52 79 25 3a  f2 60 4a 28 59 79 25 2c  |....Ry%:.`J(Yy%,|
00003580  72 79 25 2c 71 25 2c 73  25 29 0d 01 10 0c c9 4d  |ry%,q%,s%).....M|
00003590  75 25 3a f2 55 5f 0d 01  11 18 c9 5f 79 25 3a f2  |u%:.U_....._y%:.|
000035a0  72 4a 28 73 25 2c 59 79  25 2c 72 79 25 29 0d 01  |rJ(s%,Yy%,ry%)..|
000035b0  12 22 c9 54 5f 25 2c 54  79 25 3a f2 48 75 28 71  |.".T_%,Ty%:.Hu(q|
000035c0  25 2c 73 25 2c 67 25 2c  59 79 25 2c 72 79 25 29  |%,s%,g%,Yy%,ry%)|
000035d0  0d 01 13 0c c9 47 4a 25  3a f2 58 5f 0d 01 14 1e  |.....GJ%:.X_....|
000035e0  c9 47 79 25 3a f2 69 5f  28 71 25 2c 73 25 2c 67  |.Gy%:.i_(q%,s%,g|
000035f0  25 2c 59 79 25 2c 72 79  25 29 0d 01 15 1a 7f f2  |%,Yy%,ry%)......|
00003600  58 4a 28 71 25 2c 73 25  2c 67 25 2c 59 79 25 2c  |XJ(q%,s%,g%,Yy%,|
00003610  72 79 25 29 0d 01 16 0b  cb 3a f2 42 79 3a e1 0d  |ry%).....:.By:..|
00003620  01 17 44 dd f2 6d 5f 28  73 25 2c 67 25 2c 61 25  |..D..m_(s%,g%,a%|
00003630  2c 51 25 2c 69 5f 25 2c  71 4a 25 29 3a ea 6f 61  |,Q%,i_%,qJ%):.oa|
00003640  25 2c 69 61 25 2c 41 25  2c 56 4a 25 3a 41 25 3d  |%,ia%,A%,VJ%:A%=|
00003650  67 25 2d 33 2d 28 67 25  3d 31 29 3a e7 67 25 3c  |g%-3-(g%=1):.g%<|
00003660  3e 32 8c 0d 01 18 11 e7  73 25 3e 3d 30 80 67 25  |>2......s%>=0.g%|
00003670  3c 3e 32 8c 0d 01 19 09  c8 8e 73 25 ca 0d 01 1a  |<>2.......s%....|
00003680  13 c9 4e 25 28 30 29 3a  f2 4b 5f 28 2d 41 25 29  |..N%(0):.K_(-A%)|
00003690  0d 01 1b 12 c9 4e 25 28  31 29 3a f2 4b 5f 28 41  |.....N%(1):.K_(A|
000036a0  25 29 0d 01 1c 0c 7f f2  70 5f 28 73 25 29 0d 01  |%)......p_(s%)..|
000036b0  1d 05 cb 0d 01 1e 24 cc  3a e3 41 25 3d 31 b8 42  |......$.:.A%=1.B|
000036c0  5f 25 3a e7 74 25 3c 41  25 8c 58 25 3d 73 4a 25  |_%:.t%<A%.X%=sJ%|
000036d0  8b 58 25 3d 6b 5f 25 0d  01 1f 24 e7 a4 6d 28 61  |.X%=k_%...$..m(a|
000036e0  25 2c 51 25 2c 58 25 2c  2d 6d 25 2d 41 25 2a 7a  |%,Q%,X%,-m%-A%*z|
000036f0  79 25 2c 34 30 2c 7a 79  25 29 8c 0d 01 20 1a e7  |y%,40,zy%)... ..|
00003700  67 25 3c 3e 32 8c 74 25  3d 41 25 3a 76 25 3d 53  |g%<>2.t%=A%:v%=S|
00003710  25 28 74 25 29 0d 01 21  07 cd 3a ed 0d 01 22 05  |%(t%)..!..:...".|
00003720  cd 0d 01 23 4b cd 3a e7  28 73 25 3d 2d 31 84 67  |...#K.:.(s%=-1.g|
00003730  25 3d 32 29 80 a4 6d 28  61 25 2c 51 25 2c 6d 79  |%=2)..m(a%,Q%,my|
00003740  25 2c 2d 6d 25 2c 75 25  2c 2d 6b 25 29 8c f2 69  |%,-m%,u%,-k%)..i|
00003750  79 28 67 25 2c a3 2c 61  25 2d 6d 79 25 2c 51 25  |y(g%,.,a%-my%,Q%|
00003760  2b 6d 25 2c 69 5f 25 2c  71 4a 25 29 0d 01 24 49  |+m%,i_%,qJ%)..$I|
00003770  e7 28 73 25 3d 2d 31 84  67 25 3d 32 29 80 a4 6d  |.(s%=-1.g%=2)..m|
00003780  28 61 25 2c 51 25 2c 77  79 25 2c 2d 6d 25 2c 75  |(a%,Q%,wy%,-m%,u|
00003790  25 2c 2d 6b 25 29 8c f2  69 79 28 67 25 2c b9 2c  |%,-k%)..iy(g%,.,|
000037a0  61 25 2d 77 79 25 2c 51  25 2b 6d 25 2c 69 5f 25  |a%-wy%,Q%+m%,i_%|
000037b0  2c 71 4a 25 29 0d 01 25  0a e7 67 25 3d 32 8c 0d  |,qJ%)..%..g%=2..|
000037c0  01 26 28 e7 54 25 28 74  25 29 3c 3e 2d 31 8c f2  |.&(.T%(t%)<>-1..|
000037d0  46 28 54 25 28 74 25 29  2c 59 79 25 2c 72 79 25  |F(T%(t%),Yy%,ry%|
000037e0  2c 71 25 2c 73 25 29 0d  01 27 14 cc e7 ac 56 4a  |,q%,s%)..'....VJ|
000037f0  25 8c f2 43 28 69 25 2c  2d 31 29 0d 01 28 07 cd  |%..C(i%,-1)..(..|
00003800  3a e1 0d 01 29 11 dd f2  42 79 3a e7 4b 5f 25 3d  |:...)...By:.K_%=|
00003810  74 25 8c 0d 01 2a 23 e7  76 25 3c 3e 77 5f 25 80  |t%...*#.v%<>w_%.|
00003820  4a 5f 25 3d 30 8c 4a 5f  25 3d 31 2b 32 2a 28 76  |J_%=0.J_%=1+2*(v|
00003830  25 3c 77 5f 25 29 0d 01  2b 28 cc f2 51 5f 28 4b  |%<w_%)..+(..Q_(K|
00003840  5f 25 29 3a f2 43 28 69  25 2c 2d 31 29 3a 4a 5f  |_%):.C(i%,-1):J_|
00003850  25 3d 31 2b 32 2a 28 74  25 3c 4b 5f 25 29 0d 01  |%=1+2*(t%<K_%)..|
00003860  2c 1a cd 3a e7 28 6d 4a  25 84 4a 5f 25 3c 3e 30  |,..:.(mJ%.J_%<>0|
00003870  29 80 49 79 25 8c f2 4b  0d 01 2d 2e 53 25 28 4b  |).Iy%..K..-.S%(K|
00003880  5f 25 29 3d 77 5f 25 3a  53 25 28 74 25 29 3d 76  |_%)=w_%:S%(t%)=v|
00003890  25 3a e7 4b 5f 25 3c 3e  74 25 8c f2 6d 79 28 74  |%:.K_%<>t%..my(t|
000038a0  25 29 3a f2 49 75 0d 01  2e 05 e1 0d 01 2f 50 dd  |%):.Iu......./P.|
000038b0  f2 4b 3a f2 5a 75 3a f2  52 75 28 4a 5f 25 29 3a  |.K:.Zu:.Ru(J_%):|
000038c0  f2 4e 28 69 25 2c 6d 79  25 2c 2d 6d 25 2c 6d 79  |.N(i%,my%,-m%,my|
000038d0  25 2b 75 25 2c 2d 6d 25  2d 6b 25 29 3a f2 4e 28  |%+u%,-m%-k%):.N(|
000038e0  69 25 2c 77 79 25 2c 2d  6d 25 2c 77 79 25 2b 75  |i%,wy%,-m%,wy%+u|
000038f0  25 2c 2d 6d 25 2d 6b 25  29 3a e1 0d 01 30 61 dd  |%,-m%-k%):...0a.|
00003900  f2 49 75 3a f2 4e 28 69  25 2c 6b 5f 25 2c 2d 6d  |.Iu:.N(i%,k_%,-m|
00003910  25 2c 6b 5f 25 2b 34 30  2c 2d 6d 25 2d 6b 25 29  |%,k_%+40,-m%-k%)|
00003920  3a f2 4e 28 69 25 2c 73  4a 25 2c 2d 6d 25 2c 73  |:.N(i%,sJ%,-m%,s|
00003930  4a 25 2b 34 30 2c 2d 6d  25 2d 6b 25 29 3a f2 4e  |J%+40,-m%-k%):.N|
00003940  28 69 25 2c 60 79 25 2c  2d 6d 25 2c 60 79 25 2b  |(i%,`y%,-m%,`y%+|
00003950  33 32 2c 2d 6d 25 2d 6b  25 29 3a e1 0d 01 31 26  |32,-m%-k%):...1&|
00003960  dd f2 72 28 71 25 2c 64  4a 25 2c 61 6c 25 29 3a  |..r(q%,dJ%,al%):|
00003970  ea 41 25 3a 41 25 3d 49  79 25 3a e7 71 25 3d 69  |.A%:A%=Iy%:.q%=i|
00003980  25 8c 0d 01 32 0d e7 65  4a 25 3c 3e 2d 31 8c 0d  |%...2..eJ%<>-1..|
00003990  01 33 69 21 4a 25 3d 69  25 3a c8 99 26 34 30 30  |.3i!J%=i%:..&400|
000039a0  43 42 2c 2c 4a 25 3a 4a  25 21 34 3d 65 75 25 3a  |CB,,J%:J%!4=eu%:|
000039b0  4a 25 21 38 3d 73 75 25  2d 55 79 25 3a 4a 25 21  |J%!8=su%-Uy%:J%!|
000039c0  26 43 3d 65 75 25 2b 61  79 25 3a 4a 25 21 31 36  |&C=eu%+ay%:J%!16|
000039d0  3d 73 75 25 3a 4a 25 21  32 38 3d 64 4a 25 3a c8  |=su%:J%!28=dJ%:.|
000039e0  99 26 34 30 30 43 35 2c  2c 4a 25 3a f2 7a 28 69  |.&400C5,,J%:.z(i|
000039f0  25 2c 64 4a 25 2c 30 29  0d 01 34 13 cc f2 7a 28  |%,dJ%,0)..4...z(|
00003a00  71 25 2c 64 4a 25 2c 61  6c 25 29 0d 01 35 14 cd  |q%,dJ%,al%)..5..|
00003a10  3a e7 ac 41 25 8c f2 43  28 69 25 2c 2d 31 29 0d  |:..A%..C(i%,-1).|
00003a20  01 36 13 cc f2 7a 28 71  25 2c 64 4a 25 2c 61 6c  |.6...z(q%,dJ%,al|
00003a30  25 29 0d 01 37 07 cd 3a  e1 0d 01 38 18 dd f2 52  |%)..7..:...8...R|
00003a40  75 28 41 25 29 3a e7 53  75 25 80 41 25 3c 3e 30  |u(A%):.Su%.A%<>0|
00003a50  8c 0d 01 39 c6 ea 64 75  25 2c 61 25 2c 5f 25 2c  |...9..du%,a%,_%,|
00003a60  55 25 2c 70 79 25 2c 60  25 2c 52 25 2c 43 25 3a  |U%,py%,`%,R%,C%:|
00003a70  21 4a 25 3d 69 25 3a c8  99 26 34 30 30 43 42 2c  |!J%=i%:..&400CB,|
00003a80  2c 4a 25 3a 5f 25 3d 4a  25 21 34 2d 4a 25 21 32  |,J%:_%=J%!4-J%!2|
00003a90  30 3a 55 25 3d 4a 25 21  31 36 2d 4a 25 21 32 34  |0:U%=J%!16-J%!24|
00003aa0  3a 70 79 25 3d 5f 25 2b  77 79 25 2d 28 26 36 34  |:py%=_%+wy%-(&64|
00003ab0  29 81 32 3a 60 25 3d 28  26 36 34 2f 32 2d 33 32  |).2:`%=(&64/2-32|
00003ac0  29 3a 52 25 3d 75 25 2b  26 36 34 2f 32 3a c8 99  |):R%=u%+&64/2:..|
00003ad0  26 34 30 37 34 32 2c 30  b8 43 25 3a 43 25 2b 3d  |&40742,0.C%:C%+=|
00003ae0  33 3c 3c 34 3a e3 61 25  3d 30 b8 26 42 34 88 26  |3<<4:.a%=0.&B4.&|
00003af0  46 3a f2 6b 79 28 61 25  2c 41 25 29 3a 54 25 3d  |F:.ky(a%,A%):T%=|
00003b00  91 3a f5 fd 91 3e 54 25  2b 31 3a f2 6b 79 28 61  |.:...>T%+1:.ky(a|
00003b10  25 2c 41 25 29 3a ed 0d  01 3a 07 cd 3a e1 0d 01  |%,A%):...:..:...|
00003b20  3b 4a dd f2 6b 79 28 61  25 2c 41 25 29 3a 21 4a  |;J..ky(a%,A%):!J|
00003b30  25 3d 69 25 3a 4a 25 21  34 3d 30 3a 4a 25 21 38  |%=i%:J%!4=0:J%!8|
00003b40  3d 2d 55 79 25 3a 4a 25  21 26 43 3d 61 79 25 3a  |=-Uy%:J%!&C=ay%:|
00003b50  4a 25 21 31 36 3d 30 3a  e7 41 25 3d 2d 31 8c 61  |J%!16=0:.A%=-1.a|
00003b60  25 3d 26 42 34 2d 61 25  0d 01 3c b7 c8 99 26 34  |%=&B4-a%..<...&4|
00003b70  30 30 43 39 2c 2c 4a 25  b8 64 75 25 3a c8 95 64  |00C9,,J%.du%:..d|
00003b80  75 25 3a c8 99 26 34 30  30 45 36 2c 43 25 3a ec  |u%:..&400E6,C%:.|
00003b90  70 79 25 2b 60 25 2a 9b  b2 61 25 2c 55 25 2d 6d  |py%+`%*..a%,U%-m|
00003ba0  25 2b 30 2e 32 2a 60 25  2a b5 b2 61 25 3a df 70  |%+0.2*`%*..a%:.p|
00003bb0  79 25 2b 52 25 2a 9b b2  61 25 2c 55 25 2d 6d 25  |y%+R%*..a%,U%-m%|
00003bc0  2b 30 2e 32 2a 52 25 2a  b5 b2 61 25 3a df 42 59  |+0.2*R%*..a%:.BY|
00003bd0  30 2c 2d 6b 25 3a df 70  79 25 2b 60 25 2a 9b b2  |0,-k%:.py%+`%*..|
00003be0  61 25 2c 55 25 2d 6d 25  2d 6b 25 3a df 70 79 25  |a%,U%-m%-k%:.py%|
00003bf0  2b 60 25 2a 9b b2 61 25  2c 55 25 2d 6d 25 2b 30  |+`%*..a%,U%-m%+0|
00003c00  2e 32 2a 60 25 2a b5 b2  61 25 3a c8 99 26 34 30  |.2*`%*..a%:..&40|
00003c10  30 43 41 2c 2c 4a 25 b8  64 75 25 3a ce 3a e1 0d  |0CA,,J%.du%:.:..|
00003c20  01 3d 3b dd f2 79 4a ea  41 25 2c 43 25 2c 5f 69  |.=;..yJ.A%,C%,_i|
00003c30  25 2c 4b 5f 25 2c 77 5f  25 2c 6f 61 25 3a 5f 69  |%,K_%,w_%,oa%:_i|
00003c40  25 3d a4 44 79 3a 4b 5f  25 3d 74 25 3a 77 5f 25  |%=.Dy:K_%=t%:w_%|
00003c50  3d 76 25 3a c8 8e 62 4a  25 ca 0d 01 3e 0f c9 6b  |=v%:..bJ%...>..k|
00003c60  4a 25 3a c8 8e 21 4b 25  ca 0d 01 3f 06 c9 30 0d  |J%:..!K%...?..0.|
00003c70  01 40 16 c9 31 3a f2 73  28 44 79 25 2c 66 79 25  |.@..1:.s(Dy%,fy%|
00003c80  2c 4d 79 25 29 0d 01 41  ed c9 32 3a 21 4b 25 3d  |,My%)..A..2:!K%=|
00003c90  2d 31 3a 4b 25 21 34 3d  6a 5f 25 3a c8 99 26 34  |-1:K%!4=j_%:..&4|
00003ca0  30 30 43 45 2c 2c 4b 25  3a 21 4a 25 3d 4a 79 25  |00CE,,K%:!J%=Jy%|
00003cb0  3a c8 99 26 34 30 30 43  42 2c 2c 4a 25 3a 4a 25  |:..&400CB,,J%:J%|
00003cc0  21 34 3d 4b 25 21 31 36  2d 28 4a 25 21 26 43 2d  |!4=K%!16-(J%!&C-|
00003cd0  4a 25 21 34 29 3a 4a 25  21 26 43 3d 4b 25 21 31  |J%!4):J%!&C=K%!1|
00003ce0  36 3a 4a 25 21 31 36 3d  26 38 38 2b 28 4a 25 21  |6:J%!16=&88+(J%!|
00003cf0  31 36 2d 4a 25 21 38 29  3a 4a 25 21 32 38 3d 2d  |16-J%!8):J%!28=-|
00003d00  31 3a c8 99 26 34 30 30  43 35 2c 2c 4a 25 3a f2  |1:..&400C5,,J%:.|
00003d10  41 28 4a 79 25 2c 32 2c  a4 55 28 44 79 25 2c 66  |A(Jy%,2,.U(Dy%,f|
00003d20  79 25 2c 4d 79 25 2c 2d  31 29 29 3a 58 5f 25 3d  |y%,My%,-1)):X_%=|
00003d30  44 79 25 3a 56 5f 25 3d  66 79 25 3a 4c 5f 25 3d  |Dy%:V_%=fy%:L_%=|
00003d40  4d 79 25 3a f2 41 28 4a  79 25 2c 34 2c c3 a4 63  |My%:.A(Jy%,4,..c|
00003d50  29 3a 41 25 3d a4 69 3a  f2 41 28 4a 79 25 2c 35  |):A%=.i:.A(Jy%,5|
00003d60  2c c4 32 2d a9 c3 41 25  2c 22 30 22 29 2b c3 41  |,.2-..A%,"0")+.A|
00003d70  25 29 0d 01 42 2e c8 99  36 2c 26 41 31 2c 26 44  |%)..B...6,&A1,&D|
00003d80  43 b8 2c 2c 41 25 3a f2  5a 28 4a 79 25 2c 31 2c  |C.,,A%:.Z(Jy%,1,|
00003d90  94 28 28 41 25 80 26 38  30 29 3d 26 38 30 29 29  |.((A%.&80)=&80))|
00003da0  0d 01 43 10 c9 33 3a e7  4b 25 21 34 3e 2d 31 8c  |..C..3:.K%!4>-1.|
00003db0  0d 01 44 2c f2 57 28 57  6c 25 2c 30 2c 2d 31 29  |..D,.W(Wl%,0,-1)|
00003dc0  3a f2 53 28 57 6c 25 2c  4b 25 21 34 2c 31 29 3a  |:.S(Wl%,K%!4,1):|
00003dd0  77 75 25 3d 4b 25 21 34  3a f2 71 79 0d 01 45 08  |wu%=K%!4:.qy..E.|
00003de0  cc f2 71 79 0d 01 46 05  cd 0d 01 47 15 c9 34 3a  |..qy..F....G..4:|
00003df0  e7 54 79 25 3d 30 8c f2  55 79 8b f2 49 79 0d 01  |.Ty%=0..Uy..Iy..|
00003e00  48 0a c9 35 3a f2 50 79  0d 01 49 0e c9 36 3a 56  |H..5:.Py..I..6:V|
00003e10  75 25 3d a4 43 79 0d 01  4a 05 cb 0d 01 4b 16 c9  |u%=.Cy..J....K..|
00003e20  54 25 28 74 25 29 3a f2  68 75 28 4b 25 2c 74 25  |T%(t%):.hu(K%,t%|
00003e30  29 0d 01 4c 16 c9 7a 5f  25 3a f2 44 79 28 2d 31  |)..L..z_%:.Dy(-1|
00003e40  2c 21 4b 25 2c 30 29 0d  01 4d 0f c9 58 6c 25 3a  |,!K%,0)..M..Xl%:|
00003e50  c8 8e 6b 79 25 ca 0d 01  4e 24 c9 66 25 3a 6e 4a  |..ky%...N$.f%:nJ|
00003e60  25 3d 21 4b 25 3a e7 21  4b 25 3e 30 8c 43 25 3d  |%=!K%:.!K%>0.C%=|
00003e70  21 4b 25 8b 43 25 3d 6e  5f 25 0d 01 4f 1c e3 41  |!K%.C%=n_%..O..A|
00003e80  25 3d 31 36 b8 31 38 3a  f2 44 28 66 25 2c 41 25  |%=16.18:.D(f%,A%|
00003e90  2c 43 25 29 3a ed 0d 01  50 25 c9 5f 79 25 3a 5a  |,C%):...P%._y%:Z|
00003ea0  69 25 3d 21 4b 25 3a e7  21 4b 25 3d 30 8c 41 25  |i%=!K%:.!K%=0.A%|
00003eb0  3d 53 4a 25 8b 41 25 3d  21 4b 25 0d 01 51 10 f2  |=SJ%.A%=!K%..Q..|
00003ec0  44 28 5f 79 25 2c 34 2c  41 25 29 0d 01 52 05 cb  |D(_y%,4,A%)..R..|
00003ed0  0d 01 53 15 c9 5a 6c 25  3a f2 57 4a 28 55 5f 25  |..S..Zl%:.WJ(U_%|
00003ee0  2c 21 4b 25 29 0d 01 54  43 c9 69 4a 25 3a 55 25  |,!K%)..TC.iJ%:U%|
00003ef0  28 30 29 3d 21 4b 25 3a  f2 46 79 28 41 25 28 36  |(0)=!K%:.Fy(A%(6|
00003f00  29 2c 31 38 2c 55 25 28  29 29 3a f2 57 28 69 4a  |),18,U%()):.W(iJ|
00003f10  25 2c 30 2c 2d 31 29 3a  f2 53 28 69 4a 25 2c 55  |%,0,-1):.S(iJ%,U|
00003f20  25 28 30 29 2c 2d 31 29  0d 01 55 0c 7f 3a c8 8e  |%(0),-1)..U..:..|
00003f30  6b 79 25 ca 0d 01 56 11  c9 41 25 28 36 29 3a c8  |ky%...V..A%(6):.|
00003f40  8e 55 5f 25 ca 0d 01 57  17 c9 32 2c 33 2c 34 2c  |.U_%...W..2,3,4,|
00003f50  35 3a e7 4b 25 21 34 3c  3e 2d 31 8c 0d 01 58 2c  |5:.K%!4<>-1...X,|
00003f60  e7 21 4b 25 3d 30 8c f2  44 28 6b 79 25 2c 55 5f  |.!K%=0..D(ky%,U_|
00003f70  25 2c 4b 25 21 34 29 8b  f2 67 28 6b 79 25 2c 55  |%,K%!4)..g(ky%,U|
00003f80  5f 25 2c 4b 25 21 34 29  0d 01 59 20 f2 57 28 41  |_%,K%!4)..Y .W(A|
00003f90  79 25 2c 30 2c 2d 31 29  3a f2 53 28 41 79 25 2c  |y%,0,-1):.S(Ay%,|
00003fa0  4b 25 21 34 2c 2d 31 29  0d 01 5a 05 cd 0d 01 5b  |K%!4,-1)..Z....[|
00003fb0  7d c9 39 2c 26 41 2c 26  42 2c 26 43 2c 26 44 2c  |}.9,&A,&B,&C,&D,|
00003fc0  26 45 2c 26 46 3a 58 25  28 55 5f 25 2d 39 29 3d  |&E,&F:X%(U_%-9)=|
00003fd0  21 4b 25 3a f2 57 28 41  79 25 2c 30 2c 2d 31 29  |!K%:.W(Ay%,0,-1)|
00003fe0  3a f2 53 28 41 79 25 2c  21 4b 25 2c 2d 31 29 3a  |:.S(Ay%,!K%,-1):|
00003ff0  21 4a 25 3d 6b 79 25 3a  4a 25 21 34 3d 38 3a c8  |!J%=ky%:J%!4=8:.|
00004000  99 26 34 30 30 43 45 2c  2c 4a 25 3a f2 4e 28 6b  |.&400CE,,J%:.N(k|
00004010  79 25 2c 4a 25 21 38 2c  4a 25 21 32 30 2c 4a 25  |y%,J%!8,J%!20,J%|
00004020  21 31 36 2c 4a 25 21 26  43 29 0d 01 5c 48 c9 32  |!16,J%!&C)..\H.2|
00004030  30 2c 32 31 3a 55 25 28  55 5f 25 2d 31 39 29 3d  |0,21:U%(U_%-19)=|
00004040  21 4b 25 3a f2 57 28 41  79 25 2c 30 2c 2d 31 29  |!K%:.W(Ay%,0,-1)|
00004050  3a f2 53 28 41 79 25 2c  21 4b 25 2c 2d 31 29 3a  |:.S(Ay%,!K%,-1):|
00004060  f2 46 79 28 41 25 28 36  29 2c 31 38 2c 55 25 28  |.Fy(A%(6),18,U%(|
00004070  29 29 0d 01 5d 8f c9 32  35 3a 41 24 3d a4 41 28  |))..]..25:A$=.A(|
00004080  22 43 6f 76 22 2b c3 28  21 4b 25 2b 31 29 29 3a  |"Cov"+.(!K%+1)):|
00004090  41 24 3d c1 41 24 2c a7  41 24 2c 22 2c 22 29 2b  |A$=.A$,.A$,",")+|
000040a0  31 29 3a 6b 75 25 3d bb  41 24 3a 41 24 3d c1 41  |1):ku%=.A$:A$=.A|
000040b0  24 2c a7 41 24 2c 22 2c  22 29 2b 31 29 3a 68 75  |$,.A$,",")+1):hu|
000040c0  25 3d bb 41 24 3a 21 4a  25 3d 6b 79 25 3a 4a 25  |%=.A$:!J%=ky%:J%|
000040d0  21 34 3d 32 34 3a c8 99  26 34 30 30 43 45 2c 2c  |!4=24:..&400CE,,|
000040e0  4a 25 3a f2 4e 28 6b 79  25 2c 4a 25 21 38 2c 4a  |J%:.N(ky%,J%!8,J|
000040f0  25 21 32 30 2c 4a 25 21  31 36 2c 4a 25 21 26 43  |%!20,J%!16,J%!&C|
00004100  29 0d 01 5e 66 c9 32 36  3a f2 57 28 41 79 25 2c  |)..^f.26:.W(Ay%,|
00004110  30 2c 2d 31 29 3a 6b 75  25 3d 21 4b 25 3a f2 53  |0,-1):ku%=!K%:.S|
00004120  28 41 79 25 2c 21 4b 25  2c 31 29 3a 21 4a 25 3d  |(Ay%,!K%,1):!J%=|
00004130  6b 79 25 3a 4a 25 21 34  3d 32 34 3a c8 99 26 34  |ky%:J%!4=24:..&4|
00004140  30 30 43 45 2c 2c 4a 25  3a f2 4e 28 6b 79 25 2c  |00CE,,J%:.N(ky%,|
00004150  4a 25 21 38 2c 4a 25 21  32 30 2c 4a 25 21 31 36  |J%!8,J%!20,J%!16|
00004160  2c 4a 25 21 26 43 29 0d  01 5f 66 c9 32 37 3a f2  |,J%!&C).._f.27:.|
00004170  57 28 41 79 25 2c 30 2c  2d 31 29 3a 68 75 25 3d  |W(Ay%,0,-1):hu%=|
00004180  21 4b 25 3a f2 53 28 41  79 25 2c 21 4b 25 2c 31  |!K%:.S(Ay%,!K%,1|
00004190  29 3a 21 4a 25 3d 6b 79  25 3a 4a 25 21 34 3d 32  |):!J%=ky%:J%!4=2|
000041a0  34 3a c8 99 26 34 30 30  43 45 2c 2c 4a 25 3a f2  |4:..&400CE,,J%:.|
000041b0  4e 28 6b 79 25 2c 4a 25  21 38 2c 4a 25 21 32 30  |N(ky%,J%!8,J%!20|
000041c0  2c 4a 25 21 31 36 2c 4a  25 21 26 43 29 0d 01 60  |,J%!16,J%!&C)..`|
000041d0  05 cb 0d 01 61 10 c9 54  79 25 3a f2 76 4a 28 4b  |....a..Ty%:.vJ(K|
000041e0  25 29 0d 01 62 17 c9 66  25 2c 52 79 25 3a f2 41  |%)..b..f%,Ry%:.A|
000041f0  5f 28 62 4a 25 2c 4b 25  29 0d 01 63 10 7f f2 64  |_(bJ%,K%)..c...d|
00004200  4a 28 62 4a 25 2c 4b 25  29 0d 01 64 05 cb 0d 01  |J(bJ%,K%)..d....|
00004210  65 20 cb 3a e7 5f 69 25  8c f2 46 28 62 4a 25 2c  |e .:._i%..F(bJ%,|
00004220  2d 31 2c 2d 31 2c 6b 79  25 2c 55 5f 25 29 0d 01  |-1,-1,ky%,U_%)..|
00004230  66 09 f2 42 79 3a e1 0d  01 67 16 dd f2 71 79 3a  |f..By:...g...qy:|
00004240  ea 41 24 2c 41 25 3a c8  8e 77 75 25 ca 0d 01 68  |.A$,A%:..wu%...h|
00004250  24 c9 31 3a ff 22 46 69  6c 65 72 5f 52 75 6e 20  |$.1:."Filer_Run |
00004260  22 2b 50 24 2b 22 2e 21  48 54 4d 4c 48 65 6c 70  |"+P$+".!HTMLHelp|
00004270  22 0d 01 69 2a c9 32 3a  c8 99 26 32 30 30 31 45  |"..i*.2:..&2001E|
00004280  2c 31 38 2c 22 53 74 72  6f 6e 67 48 65 6c 70 22  |,18,"StrongHelp"|
00004290  b8 3b 41 25 3a e7 41 25  80 31 8c 0d 01 6a 1a e7  |.;A%:.A%.1...j..|
000042a0  a4 62 28 22 53 74 72 6f  6e 67 48 65 6c 70 24 44  |.b("StrongHelp$D|
000042b0  69 72 22 29 8c 0d 01 6b  52 c8 99 26 34 30 30 44  |ir")...kR..&400D|
000042c0  45 2c 22 3c 53 74 72 6f  6e 67 48 65 6c 70 24 44  |E,"<StrongHelp$D|
000042d0  69 72 3e 2e 21 52 75 6e  22 3a ff 22 53 74 72 6f  |ir>.!Run":."Stro|
000042e0  6e 67 48 65 6c 70 20 3c  4f 72 67 61 6e 69 73 65  |ngHelp <Organise|
000042f0  72 24 44 69 72 3e 2e 4f  72 67 61 6e 69 73 65 72  |r$Dir>.Organiser|
00004300  20 21 52 6f 6f 74 22 0d  01 6c 18 cc f2 42 28 a4  | !Root"..l...B(.|
00004310  41 28 22 45 72 72 53 74  72 6f 6e 67 22 29 29 0d  |A("ErrStrong")).|
00004320  01 6d 05 cd 0d 01 6e 32  cc ff 22 53 74 72 6f 6e  |.m....n2.."Stron|
00004330  67 48 65 6c 70 20 3c 4f  72 67 61 6e 69 73 65 72  |gHelp <Organiser|
00004340  24 44 69 72 3e 2e 4f 72  67 61 6e 69 73 65 72 20  |$Dir>.Organiser |
00004350  21 52 6f 6f 74 22 0d 01  6f 05 cd 0d 01 70 1e 7f  |!Root"..o....p..|
00004360  ff 22 46 69 6c 65 72 5f  52 75 6e 20 22 2b 50 24  |."Filer_Run "+P$|
00004370  2b 22 2e 21 48 65 6c 70  22 0d 01 71 07 cb 3a e1  |+".!Help"..q..:.|
00004380  0d 01 72 3b dd f2 46 28  5a 79 25 2c 61 25 2c 51  |..r;..F(Zy%,a%,Q|
00004390  25 2c 78 25 2c 46 79 25  29 ea 41 25 3a e7 28 5a  |%,x%,Fy%).A%:.(Z|
000043a0  79 25 3d 6b 4a 25 84 5a  79 25 3d 54 25 28 74 25  |y%=kJ%.Zy%=T%(t%|
000043b0  29 29 80 5a 79 25 3c 3e  2d 31 8c 0d 01 73 42 f2  |)).Zy%<>-1...sB.|
000043c0  53 28 51 6c 25 2c 30 2c  63 79 25 3d 31 29 3a f2  |S(Ql%,0,cy%=1):.|
000043d0  53 28 51 6c 25 2c 31 2c  63 79 25 3d 32 29 3a e3  |S(Ql%,1,cy%=2):.|
000043e0  41 25 3d 30 b8 32 3a f2  54 28 77 69 25 2c 41 25  |A%=0.2:.T(wi%,A%|
000043f0  2c 2d 28 4c 4a 25 3c 3d  30 29 29 3a ed 0d 01 74  |,-(LJ%<=0)):...t|
00004400  35 cd 3a c8 99 26 34 30  30 44 34 2c 2c 5a 79 25  |5.:..&400D4,,Zy%|
00004410  2c 61 25 2d 36 34 2c 51  25 3a 62 4a 25 3d 5a 79  |,a%-64,Q%:bJ%=Zy|
00004420  25 3a 6b 79 25 3d 78 25  3a 55 5f 25 3d 46 79 25  |%:ky%=x%:U_%=Fy%|
00004430  3a e1 0d 01 75 40 dd f2  4d 75 28 71 25 2c 73 25  |:...u@..Mu(q%,s%|
00004440  2c 42 79 25 29 ea 77 5f  25 2c 6f 61 25 2c 41 25  |,By%).w_%,oa%,A%|
00004450  2c 42 25 2c 41 24 2c 5a  24 3a 4b 5f 25 3d 74 25  |,B%,A$,Z$:K_%=t%|
00004460  3a 77 5f 25 3d 76 25 3a  6f 25 3d a3 3a c8 8e 71  |:w_%=v%:o%=.:..q|
00004470  25 ca 0d 01 76 16 c9 69  25 3a 6f 25 3d a4 6e 79  |%...v..i%:o%=.ny|
00004480  28 73 25 2c 42 79 25 29  0d 01 77 07 c9 2d 31 0d  |(s%,By%)..w..-1.|
00004490  01 78 1e c9 54 5f 25 2c  54 79 25 3a 6f 25 3d a4  |.x..T_%,Ty%:o%=.|
000044a0  4d 5f 28 71 25 2c 73 25  2c 42 79 25 29 0d 01 79  |M_(q%,s%,By%)..y|
000044b0  08 c9 4a 79 25 0d 01 7a  16 7f 6f 25 3d a4 63 79  |..Jy%..z..o%=.cy|
000044c0  28 71 25 2c 73 25 2c 42  79 25 29 0d 01 7b 0c cb  |(q%,s%,By%)..{..|
000044d0  3a e7 6f 25 3d a3 8c 0d  01 7c 0f 6f 25 3d b9 3a  |:.o%=....|.o%=.:|
000044e0  c8 8e 42 79 25 ca 0d 01  7d 12 c9 32 37 3a e7 54  |..By%...}..27:.T|
000044f0  79 25 3c 3e 30 8c f2 62  0d 01 7e 0c c9 33 38 35  |y%<>0..b..~..385|
00004500  3a f2 71 79 0d 01 7f 17  c9 33 38 36 3a e7 54 79  |:.qy.....386:.Ty|
00004510  25 3d 30 8c f2 55 79 8b  f2 49 79 0d 01 80 0c c9  |%=0..Uy..Iy.....|
00004520  33 38 37 3a f2 50 79 0d  01 81 14 c9 38 31 2d 36  |387:.Py.....81-6|
00004530  35 2b 31 3a 56 75 25 3d  a4 43 79 0d 01 82 1e c9  |5+1:Vu%=.Cy.....|
00004540  38 33 2d 36 35 2b 31 3a  6f 25 3d a3 3a e7 73 25  |83-65+1:o%=.:.s%|
00004550  3c 3e 2d 31 80 49 75 25  8c 0d 01 83 3f c8 99 26  |<>-1.Iu%....?..&|
00004560  34 30 30 44 33 2c 2c 4b  25 3a 41 25 3d 4b 25 21  |400D3,,K%:A%=K%!|
00004570  32 30 3a 5a 24 3d a4 4d  28 71 25 2c 73 25 29 3a  |20:Z$=.M(q%,s%):|
00004580  e7 41 25 3e 30 8c 41 24  3d c1 5a 24 2c 41 25 2c  |.A%>0.A$=.Z$,A%,|
00004590  31 29 8b 41 24 3d 22 22  0d 01 84 29 e7 28 41 24  |1).A$=""...).(A$|
000045a0  3e 3d 22 41 22 80 41 24  3c 3d 22 5a 22 29 84 28  |>="A".A$<="Z").(|
000045b0  41 24 3e 3d 22 61 22 80  41 24 3c 3d 22 7a 22 29  |A$>="a".A$<="z")|
000045c0  8c 0d 01 85 38 5a 24 3d  c0 5a 24 2c 41 25 2d 31  |....8Z$=.Z$,A%-1|
000045d0  29 2b bd 28 28 97 41 24  29 82 33 32 29 2b c1 5a  |)+.((.A$).32)+.Z|
000045e0  24 2c 41 25 2b 31 29 3a  6f 25 3d b9 3a f2 41 28  |$,A%+1):o%=.:.A(|
000045f0  71 25 2c 73 25 2c 5a 24  29 0d 01 86 05 cd 0d 01  |q%,s%,Z$).......|
00004600  87 05 cd 0d 01 88 09 7f  6f 25 3d a3 0d 01 89 36  |........o%=....6|
00004610  cb 3a e7 42 79 25 3e 3d  34 30 31 80 42 79 25 3c  |.:.By%>=401.By%<|
00004620  3d 34 30 30 2b 42 5f 25  8c 74 25 3d 42 79 25 2d  |=400+B_%.t%=By%-|
00004630  34 30 30 3a 76 25 3d 53  25 28 74 25 29 3a 6f 25  |400:v%=S%(t%):o%|
00004640  3d b9 0d 01 8a 1b cd 3a  f2 42 79 3a e7 ac 6f 25  |=......:.By:..o%|
00004650  8c c8 99 26 34 30 30 44  43 2c 42 79 25 0d 01 8b  |...&400DC,By%...|
00004660  0c 77 4a 25 3d a4 7a 3a  e1 0d 01 8c 52 dd f2 43  |.wJ%=.z:....R..C|
00004670  28 71 25 2c 73 25 29 3a  21 4a 25 3d 71 25 3a 4a  |(q%,s%):!J%=q%:J|
00004680  25 21 34 3d 73 25 3a c8  99 26 34 30 30 43 45 2c  |%!4=s%:..&400CE,|
00004690  2c 4a 25 3a c8 99 26 34  30 30 44 32 2c 71 25 2c  |,J%:..&400D2,q%,|
000046a0  73 25 2c 2c 2c 2d 31 2c  a9 a4 4e 28 4a 25 21 32  |s%,,,-1,..N(J%!2|
000046b0  38 29 3a 77 4a 25 3d a4  7a 3a e1 0d 01 8d 3b dd  |8):wJ%=.z:....;.|
000046c0  a4 7a 3a c8 99 26 34 30  30 44 33 2c 2c 4a 25 3a  |.z:..&400D3,,J%:|
000046d0  3d 28 21 4a 25 3c 3c 31  36 29 84 28 4a 25 21 34  |=(!J%<<16).(J%!4|
000046e0  80 26 46 46 29 84 28 28  4a 25 21 32 30 80 26 46  |.&FF).((J%!20.&F|
000046f0  46 29 3c 3c 38 29 0d 01  8e 37 dd f2 71 28 41 24  |F)<<8)...7..q(A$|
00004700  29 3a c8 95 c0 41 24 2c  31 29 3d 22 20 22 3a 41  |):...A$,1)=" ":A|
00004710  24 3d c1 41 24 2c 32 29  3a ce 3a e7 41 24 3c 3e  |$=.A$,2):.:.A$<>|
00004720  22 22 8c 47 24 2b 3d 41  24 2b bd 26 44 0d 01 8f  |"".G$+=A$+.&D...|
00004730  05 e1 0d 01 90 53 dd f2  6f 75 3a c8 99 26 34 30  |.....S..ou:..&40|
00004740  30 44 33 2c 2c 4b 25 3a  e7 21 4b 25 3c 3e 69 25  |0D3,,K%:.!K%<>i%|
00004750  80 21 4b 25 3c 3e 43 79  25 80 5a 25 28 74 25 29  |.!K%<>Cy%.Z%(t%)|
00004760  3d 32 80 21 4b 25 3c 3e  2d 31 8c c8 99 26 34 30  |=2.!K%<>-1...&40|
00004770  30 44 43 2c 97 c0 47 24  2c 31 29 3a 47 24 3d c1  |0DC,..G$,1):G$=.|
00004780  47 24 2c 32 29 0d 01 91  05 e1 0d 01 92 26 dd f2  |G$,2)........&..|
00004790  55 5f 3a 21 4a 25 3d 4d  75 25 3a c8 99 26 34 30  |U_:!J%=Mu%:..&40|
000047a0  30 43 33 2c 2c 4a 25 3a  67 75 25 3d 2d 31 3a e1  |0C3,,J%:gu%=-1:.|
000047b0  0d 01 93 36 dd f2 4f 79  3a 41 75 25 3d b9 3a f2  |...6..Oy:Au%=.:.|
000047c0  77 79 28 30 2c 30 2c 30  2c 30 2c 30 2c a3 2c a3  |wy(0,0,0,0,0,.,.|
000047d0  29 3a f2 77 28 30 29 3a  41 75 25 3d a3 3a 58 4a  |):.w(0):Au%=.:XJ|
000047e0  25 3d 2d 31 3a e1 0d 01  94 2c dd f2 52 5f 28 65  |%=-1:....,..R_(e|
000047f0  69 25 2c 71 25 2c 61 25  2c 51 25 2c 77 6c 25 2c  |i%,q%,a%,Q%,wl%,|
00004800  4a 69 25 2c 50 69 25 29  3a e7 53 75 25 80 49 79  |Ji%,Pi%):.Su%.Iy|
00004810  25 8c 0d 01 95 5f 58 4a  25 3d 71 25 3a 72 5f 25  |%...._XJ%=q%:r_%|
00004820  3d 65 69 25 3a 47 6c 25  3d 61 25 3a 7a 6c 25 3d  |=ei%:Gl%=a%:zl%=|
00004830  51 25 3a 54 75 25 3d 77  6c 25 3a 75 6c 25 3d 4a  |Q%:Tu%=wl%:ul%=J|
00004840  69 25 3a 6d 6c 25 3d 50  69 25 3a 21 4a 25 3d 32  |i%:ml%=Pi%:!J%=2|
00004850  30 3a 4a 25 21 26 43 3d  30 3a c8 99 26 34 30 30  |0:J%!&C=0:..&400|
00004860  45 37 2c 30 2c 4a 25 2c  76 75 25 3a 41 75 25 3d  |E7,0,J%,vu%:Au%=|
00004870  b9 0d 01 96 29 cc f2 77  79 28 65 69 25 2c 71 25  |....)..wy(ei%,q%|
00004880  2c 61 25 2c 51 25 2c 77  6c 25 2c 4a 69 25 2c 50  |,a%,Q%,wl%,Ji%,P|
00004890  69 25 29 3a 58 4a 25 3d  2d 31 0d 01 97 07 cd 3a  |i%):XJ%=-1.....:|
000048a0  e1 0d 01 98 32 dd f2 4b  75 3a f2 77 79 28 72 5f  |....2..Ku:.wy(r_|
000048b0  25 2c 58 4a 25 2c 47 6c  25 2c 7a 6c 25 2c 54 75  |%,XJ%,Gl%,zl%,Tu|
000048c0  25 2c 75 6c 25 2c 6d 6c  25 29 3a e7 58 4a 25 3d  |%,ul%,ml%):.XJ%=|
000048d0  43 79 25 0d 01 99 12 58  4a 25 3d 2d 31 3a 41 75  |Cy%....XJ%=-1:Au|
000048e0  25 3d a3 3a e1 0d 01 9a  e9 dd f2 55 79 3a ea 41  |%=.:.......Uy:.A|
000048f0  25 2c 78 25 2c 6e 25 2c  41 24 3a 41 25 3d 41 25  |%,x%,n%,A$:A%=A%|
00004900  28 31 29 3a f2 5a 28 41  25 2c 31 2c 2d 78 5f 25  |(1):.Z(A%,1,-x_%|
00004910  29 3a f2 5a 28 41 25 2c  32 2c 2d 69 75 25 29 3a  |):.Z(A%,2,-iu%):|
00004920  f2 5a 28 41 25 2c 33 2c  2d 62 75 25 29 3a f2 5a  |.Z(A%,3,-bu%):.Z|
00004930  28 41 25 2c 34 2c 2d 53  75 25 29 3a f2 5a 28 41  |(A%,4,-Su%):.Z(A|
00004940  25 2c 37 2c 2d 28 28 4f  79 25 80 39 29 3d 30 29  |%,7,-((Oy%.9)=0)|
00004950  29 3a f2 5a 28 41 25 2c  38 2c 2d 28 28 4f 79 25  |):.Z(A%,8,-((Oy%|
00004960  80 34 29 3e 30 29 29 3a  f2 5a 28 41 25 2c 39 2c  |.4)>0)):.Z(A%,9,|
00004970  2d 28 28 4f 79 25 80 35  29 3d 31 29 29 3a f2 5a  |-((Oy%.5)=1)):.Z|
00004980  28 41 25 2c 32 32 2c 2d  28 28 4f 79 25 80 38 29  |(A%,22,-((Oy%.8)|
00004990  3d 38 29 29 3a f2 5a 28  41 25 2c 32 33 2c 2d 28  |=8)):.Z(A%,23,-(|
000049a0  78 4a 25 3d 2d 31 29 29  3a f2 5a 28 41 25 2c 26  |xJ%=-1)):.Z(A%,&|
000049b0  41 2c 2d 28 28 4f 79 25  80 32 29 3e 30 29 29 3a  |A,-((Oy%.2)>0)):|
000049c0  f2 5a 28 41 25 2c 26 42  2c 2d 66 5f 25 29 0d 01  |.Z(A%,&B,-f_%)..|
000049d0  9b fa f2 5a 28 41 25 2c  32 34 2c 2d 28 28 4f 79  |...Z(A%,24,-((Oy|
000049e0  25 80 31 36 29 3d 31 36  29 29 3a f2 41 28 41 25  |%.16)=16)):.A(A%|
000049f0  2c 32 35 2c 4e 24 29 3a  f2 5a 28 41 25 2c 26 46  |,25,N$):.Z(A%,&F|
00004a00  2c 2d 4a 75 25 29 3a f2  5a 28 41 25 2c 31 36 2c  |,-Ju%):.Z(A%,16,|
00004a10  2d 5a 75 25 29 3a f2 5a  28 41 25 2c 26 45 2c 2d  |-Zu%):.Z(A%,&E,-|
00004a20  28 65 4a 25 3d 2d 31 29  29 3a f2 5a 28 41 25 2c  |(eJ%=-1)):.Z(A%,|
00004a30  31 39 2c 2d 28 65 4a 25  3c 3e 2d 31 29 29 3a f2  |19,-(eJ%<>-1)):.|
00004a40  5a 28 41 25 2c 32 30 2c  2d 28 62 5f 25 3d 2d 31  |Z(A%,20,-(b_%=-1|
00004a50  29 29 3a f2 5a 28 41 25  2c 32 31 2c 2d ac 28 4a  |)):.Z(A%,21,-.(J|
00004a60  4a 25 29 29 3a f2 4d 28  41 25 2c 26 42 2c 94 ac  |J%)):.M(A%,&B,..|
00004a70  28 a4 5a 28 41 25 2c 39  29 80 ac a4 5a 28 41 25  |(.Z(A%,9)...Z(A%|
00004a80  2c 32 34 29 29 29 3a f2  4d 28 41 25 2c 26 41 2c  |,24))):.M(A%,&A,|
00004a90  94 ac 28 a4 5a 28 41 25  2c 38 29 84 28 a4 5a 28  |..(.Z(A%,8).(.Z(|
00004aa0  41 25 2c 39 29 80 ac a4  5a 28 41 25 2c 32 34 29  |A%,9)...Z(A%,24)|
00004ab0  29 29 29 3a f2 4d 28 41  25 2c 32 34 2c 94 ac a4  |))):.M(A%,24,...|
00004ac0  5a 28 41 25 2c 39 29 29  0d 01 9c f6 f2 4d 28 41  |Z(A%,9)).....M(A|
00004ad0  25 2c 32 35 2c 94 ac 28  a4 5a 28 41 25 2c 39 29  |%,25,..(.Z(A%,9)|
00004ae0  80 a4 5a 28 41 25 2c 32  34 29 29 29 3a e3 78 25  |..Z(A%,24))):.x%|
00004af0  3d 4f 4a 25 2d 31 b8 30  88 2d 31 3a 41 24 2b 3d  |=OJ%-1.0.-1:A$+=|
00004b00  c3 28 28 71 75 25 3e 3e  78 25 29 80 31 29 3a ed  |.((qu%>>x%).1):.|
00004b10  3a f2 41 28 41 25 2c 31  38 2c 41 24 29 3a f2 5a  |:.A(A%,18,A$):.Z|
00004b20  28 41 25 2c 32 38 2c 2d  49 75 25 29 3a f2 5a 28  |(A%,28,-Iu%):.Z(|
00004b30  41 25 2c 32 39 2c 2d 47  75 25 29 3a f2 4d 28 41  |A%,29,-Gu%):.M(A|
00004b40  25 2c 32 39 2c 2d ac a4  5a 28 41 25 2c 32 32 29  |%,29,-..Z(A%,22)|
00004b50  29 3a f2 41 28 41 25 2c  32 37 2c 42 24 29 3a f2  |):.A(A%,27,B$):.|
00004b60  5a 28 41 25 2c 33 32 2c  2d 28 4b 79 25 3f 33 3d  |Z(A%,32,-(Ky%?3=|
00004b70  31 29 29 3a e3 78 25 3d  33 33 b8 33 34 3a f2 4d  |1)):.x%=33.34:.M|
00004b80  28 41 25 2c 78 25 2c 2d  28 4b 79 25 3f 33 3d 30  |(A%,x%,-(Ky%?3=0|
00004b90  29 29 3a ed 3a f2 5a 28  41 25 2c 33 33 2c 2d 28  |)):.:.Z(A%,33,-(|
00004ba0  4b 79 25 3f 32 3d 30 29  29 3a f2 5a 28 41 25 2c  |Ky%?2=0)):.Z(A%,|
00004bb0  33 34 2c 2d 28 4b 79 25  3f 32 3d 31 29 29 0d 01  |34,-(Ky%?2=1))..|
00004bc0  9d f0 f2 41 28 41 25 2c  33 36 2c c4 32 2d a9 c3  |...A(A%,36,.2-..|
00004bd0  4b 79 25 3f 31 2c 22 30  22 29 2b c3 4b 79 25 3f  |Ky%?1,"0")+.Ky%?|
00004be0  31 2b 22 30 30 22 29 3a  f2 41 28 41 25 2c 33 39  |1+"00"):.A(A%,39|
00004bf0  2c c4 32 2d a9 c3 4b 79  25 3f 30 2c 22 30 22 29  |,.2-..Ky%?0,"0")|
00004c00  2b c3 4b 79 25 3f 30 2b  22 30 30 22 29 3a 6b 75  |+.Ky%?0+"00"):ku|
00004c10  25 3d 79 75 25 3a 68 75  25 3d 72 75 25 3a e3 78  |%=yu%:hu%=ru%:.x|
00004c20  25 3d 33 35 b8 34 32 3a  f2 4d 28 41 25 2c 78 25  |%=35.42:.M(A%,x%|
00004c30  2c 2d 28 28 4b 79 25 3f  33 3d 30 29 84 28 4b 79  |,-((Ky%?3=0).(Ky|
00004c40  25 3f 32 3d 30 29 29 29  3a ed 3a f2 41 28 41 25  |%?2=0))):.:.A(A%|
00004c50  2c 26 44 2c 44 24 29 3a  f2 58 75 3a 21 4a 25 3d  |,&D,D$):.Xu:!J%=|
00004c60  54 5f 25 3a c8 99 26 34  30 30 43 42 2c 2c 4a 25  |T_%:..&400CB,,J%|
00004c70  3a 78 25 3d 4a 25 21 26  43 2d 4a 25 21 34 3a 6e  |:x%=J%!&C-J%!4:n|
00004c80  25 3d 4a 25 21 31 36 2d  4a 25 21 38 3a 4a 25 21  |%=J%!16-J%!8:J%!|
00004c90  34 3d 28 a4 67 2d 78 25  29 2f 32 3a 4a 25 21 31  |4=(.g-x%)/2:J%!1|
00004ca0  36 3d a4 64 2d 28 a4 64  2d 6e 25 29 2f 32 0d 01  |6=.d-(.d-n%)/2..|
00004cb0  9e 7f 4a 25 21 32 38 3d  2d 31 3a c8 99 26 34 30  |..J%!28=-1:..&40|
00004cc0  30 43 35 2c 2c 4a 25 3a  f2 65 79 28 31 29 3a 58  |0C5,,J%:.ey(1):X|
00004cd0  25 28 29 3d 50 25 28 29  3a 55 25 28 29 3d 48 25  |%()=P%():U%()=H%|
00004ce0  28 29 3a f2 46 79 28 41  25 28 36 29 2c 31 38 2c  |():.Fy(A%(6),18,|
00004cf0  48 25 28 29 29 3a e3 41  25 3d 32 b8 35 3a f2 67  |H%()):.A%=2.5:.g|
00004d00  28 41 25 28 36 29 2c 41  25 2c 44 25 28 41 25 2d  |(A%(6),A%,D%(A%-|
00004d10  31 29 29 3a f2 44 28 41  25 28 36 29 2c 41 25 2c  |1)):.D(A%(6),A%,|
00004d20  49 25 28 41 25 2d 31 29  29 3a ed 3a e1 0d 01 9f  |I%(A%-1)):.:....|
00004d30  61 dd f2 49 79 3a 21 4a  25 3d 54 79 25 3a c8 99  |a..Iy:!J%=Ty%:..|
00004d40  26 34 30 30 43 42 2c 2c  4a 25 3a 4a 25 21 32 38  |&400CB,,J%:J%!28|
00004d50  3d 2d 31 3a c8 99 26 34  30 30 43 35 2c 2c 4a 25  |=-1:..&400C5,,J%|
00004d60  3a 21 4a 25 3d 54 5f 25  3a c8 99 26 34 30 30 43  |:!J%=T_%:..&400C|
00004d70  42 2c 2c 4a 25 3a 4a 25  21 32 38 3d 54 79 25 3a  |B,,J%:J%!28=Ty%:|
00004d80  c8 99 26 34 30 30 43 35  2c 2c 4a 25 3a e1 0d 01  |..&400C5,,J%:...|
00004d90  a0 db dd f2 6c 79 3a ea  41 25 2c 43 25 2c 41 24  |....ly:.A%,C%,A$|
00004da0  3a 41 25 3d 41 25 28 31  29 3a 42 25 3d 4f 79 25  |:A%=A%(1):B%=Oy%|
00004db0  3a 78 5f 25 3d a4 5a 28  41 25 2c 31 29 3a 69 75  |:x_%=.Z(A%,1):iu|
00004dc0  25 3d a4 5a 28 41 25 2c  32 29 3a 62 75 25 3d a4  |%=.Z(A%,2):bu%=.|
00004dd0  5a 28 41 25 2c 33 29 3a  53 75 25 3d a4 5a 28 41  |Z(A%,3):Su%=.Z(A|
00004de0  25 2c 34 29 3a 44 24 3d  a4 4d 28 41 25 2c 26 44  |%,4):D$=.M(A%,&D|
00004df0  29 3a 66 5f 25 3d a4 5a  28 41 25 2c 26 42 29 3a  |):f_%=.Z(A%,&B):|
00004e00  4f 79 25 3d 2d a4 5a 28  41 25 2c 39 29 2d 35 2a  |Oy%=-.Z(A%,9)-5*|
00004e10  a4 5a 28 41 25 2c 38 29  2d 38 2a a4 5a 28 41 25  |.Z(A%,8)-8*.Z(A%|
00004e20  2c 32 32 29 2d 32 2a a4  5a 28 41 25 2c 26 41 29  |,22)-2*.Z(A%,&A)|
00004e30  2d 31 36 2a a4 5a 28 41  25 2c 32 34 29 3a 4a 75  |-16*.Z(A%,24):Ju|
00004e40  25 3d a4 5a 28 41 25 2c  26 46 29 3a 5a 75 25 3d  |%=.Z(A%,&F):Zu%=|
00004e50  a4 5a 28 41 25 2c 31 36  29 3a f2 7a 4a 28 ac a4  |.Z(A%,16):.zJ(..|
00004e60  5a 28 41 25 2c 32 31 29  29 0d 01 a1 a9 65 4a 25  |Z(A%,21))....eJ%|
00004e70  3d a4 5a 28 41 25 2c 26  45 29 3a 78 4a 25 3d a4  |=.Z(A%,&E):xJ%=.|
00004e80  5a 28 41 25 2c 32 33 29  3a 4e 24 3d a4 4d 28 41  |Z(A%,23):N$=.M(A|
00004e90  25 2c 32 35 29 3a 49 75  25 3d a4 5a 28 41 25 2c  |%,25):Iu%=.Z(A%,|
00004ea0  32 38 29 3a 47 75 25 3d  a4 5a 28 41 25 2c 32 39  |28):Gu%=.Z(A%,29|
00004eb0  29 3a 21 4b 79 25 3d 28  28 bb a4 4d 28 41 25 2c  |):!Ky%=((..M(A%,|
00004ec0  33 36 29 81 26 36 34 29  3c 3c 38 29 2b 28 bb a4  |36).&64)<<8)+(..|
00004ed0  4d 28 41 25 2c 33 39 29  81 26 36 34 29 3a 21 4b  |M(A%,39).&64):!K|
00004ee0  79 25 2b 3d 28 28 28 2d  a4 5a 28 41 25 2c 33 32  |y%+=(((-.Z(A%,32|
00004ef0  29 29 3c 3c 32 34 29 2b  28 28 2d a4 5a 28 41 25  |))<<24)+((-.Z(A%|
00004f00  2c 33 34 29 29 3c 3c 31  36 29 29 3a e7 ac 65 4a  |,34))<<16)):..eJ|
00004f10  25 8c 0d 01 a2 3d 21 4a  25 3d 69 25 3a c8 99 26  |%....=!J%=i%:..&|
00004f20  34 30 30 43 42 2c 2c 4a  25 3a 65 75 25 3d 4a 25  |400CB,,J%:eu%=J%|
00004f30  21 34 3a 6e 6c 25 3d 4a  25 21 38 3a 67 6c 25 3d  |!4:nl%=J%!8:gl%=|
00004f40  4a 25 21 26 43 3a 73 75  25 3d 4a 25 21 31 36 0d  |J%!&C:su%=J%!16.|
00004f50  01 a3 29 cd 3a 43 25 3d  a4 5a 28 41 25 2c 32 30  |..).:C%=.Z(A%,20|
00004f60  29 3a e7 43 25 3c 3e 62  5f 25 8c 62 5f 25 3d 43  |):.C%<>b_%.b_%=C|
00004f70  25 8b 62 5f 25 3d 43 25  0d 01 a4 1e 41 24 3d a4  |%.b_%=C%....A$=.|
00004f80  4d 28 41 25 2c 31 38 29  3a e7 41 24 3d 22 22 8c  |M(A%,18):.A$="".|
00004f90  41 24 3d 22 31 22 0d 01  a5 4a 4f 4a 25 3d a9 41  |A$="1"...JOJ%=.A|
00004fa0  24 3a 71 75 25 3d a0 28  22 25 22 2b 41 24 29 3a  |$:qu%=.("%"+A$):|
00004fb0  50 25 28 29 3d 58 25 28  29 3a 48 25 28 29 3d 55  |P%()=X%():H%()=U|
00004fc0  25 28 29 3a 41 24 3d a4  4d 28 41 25 2c 32 37 29  |%():A$=.M(A%,27)|
00004fd0  3a e7 41 24 3c 3e 42 24  8c f2 4c 75 28 41 24 29  |:.A$<>B$..Lu(A$)|
00004fe0  0d 01 a6 6d e3 41 25 3d  32 b8 35 3a 44 25 28 41  |...m.A%=2.5:D%(A|
00004ff0  25 2d 31 29 3d a4 75 28  41 25 28 36 29 2c 41 25  |%-1)=.u(A%(6),A%|
00005000  29 3a 49 25 28 41 25 2d  31 29 3d a4 5f 28 41 25  |):I%(A%-1)=._(A%|
00005010  28 36 29 2c 41 25 29 3a  ed 3a 79 75 25 3d 6b 75  |(6),A%):.:yu%=ku|
00005020  25 3a 72 75 25 3d 68 75  25 3a f2 61 75 3a e7 49  |%:ru%=hu%:.au:.I|
00005030  79 25 8c c8 99 26 34 30  30 44 31 2c 69 25 2c 30  |y%...&400D1,i%,0|
00005040  2c 2d 26 42 42 38 2c 26  42 42 38 2c 30 0d 01 a7  |,-&BB8,&BB8,0...|
00005050  14 4d 4a 25 3d 30 3a f2  68 3a f2 6d 3a f2 68 3a  |.MJ%=0:.h:.m:.h:|
00005060  e1 0d 01 a8 5e dd f2 4c  75 28 41 24 29 3a 77 25  |....^..Lu(A$):w%|
00005070  3d ae 22 3c 4f 72 67 61  6e 69 73 65 72 24 44 69  |=."<Organiser$Di|
00005080  72 3e 2e 52 65 73 6f 75  72 63 65 73 2e 21 4c 61  |r>.Resources.!La|
00005090  6e 67 75 61 67 65 22 3a  d5 23 77 25 2c 41 24 3a  |nguage":.#w%,A$:|
000050a0  d9 23 77 25 3a 77 25 3d  30 3a f2 42 28 a4 41 28  |.#w%:w%=0:.B(.A(|
000050b0  22 45 72 72 52 65 6c 6f  61 64 22 29 29 3a e1 0d  |"ErrReload")):..|
000050c0  01 a9 29 dd f2 65 79 28  49 25 29 3a e7 54 79 25  |..)..ey(I%):.Ty%|
000050d0  3c 3e 30 8c 21 4a 25 3d  54 79 25 3a c8 99 26 34  |<>0.!J%=Ty%:..&4|
000050e0  30 30 43 36 2c 2c 4a 25  0d 01 aa f2 21 4a 25 3d  |00C6,,J%....!J%=|
000050f0  54 5f 25 3a c8 99 26 34  30 30 43 42 2c 2c 4a 25  |T_%:..&400CB,,J%|
00005100  3a 54 79 25 3d 41 25 28  49 25 29 3a 21 4a 25 3d  |:Ty%=A%(I%):!J%=|
00005110  54 79 25 3a 4a 25 21 34  2b 3d 32 32 3a 4a 25 21  |Ty%:J%!4+=22:J%!|
00005120  31 36 2d 3d 37 30 3a 4a  25 21 38 3d 4a 25 21 31  |16-=70:J%!8=J%!1|
00005130  36 2d 32 37 32 3a c8 99  26 34 30 30 43 35 2c 2c  |6-272:..&400C5,,|
00005140  4a 25 3a 21 4a 25 3d 54  5f 25 3a 4a 25 21 34 3d  |J%:!J%=T_%:J%!4=|
00005150  26 42 3a 4a 25 21 38 3d  31 3c 3c 32 33 3a 4a 25  |&B:J%!8=1<<23:J%|
00005160  21 26 43 3d 31 3c 3c 32  33 3a c8 99 26 34 30 30  |!&C=1<<23:..&400|
00005170  43 44 2c 2c 4a 25 3a 4a  25 21 34 3d 4a 25 21 38  |CD,,J%:J%!4=J%!8|
00005180  38 2d 31 3a c8 99 26 34  30 30 43 34 2c 2c 4a 25  |8-1:..&400C4,,J%|
00005190  3a 4a 25 21 34 3d 49 25  3a c8 99 26 34 30 30 43  |:J%!4=I%:..&400C|
000051a0  45 2c 2c 4a 25 3a 4a 25  21 34 3d 4a 25 21 38 2b  |E,,J%:J%!4=J%!8+|
000051b0  34 3a 4a 25 21 38 3d 4a  25 21 26 43 2d 38 3a 4a  |4:J%!8=J%!&C-8:J|
000051c0  25 21 26 43 3d 4a 25 21  31 36 2d 34 3a 4a 25 21  |%!&C=J%!16-4:J%!|
000051d0  31 36 3d 4a 25 21 38 2b  26 43 0d 01 ab 51 4a 25  |16=J%!8+&C...QJ%|
000051e0  21 32 30 3d 26 31 37 30  30 30 30 32 31 3a 4a 25  |!20=&17000021:J%|
000051f0  3f 32 34 3d 30 3a c8 99  26 34 30 30 43 32 2c 2c  |?24=0:..&400C2,,|
00005200  4a 25 b8 49 25 3a 4a 25  21 34 3d 49 25 3a 4a 25  |J%.I%:J%!4=I%:J%|
00005210  21 38 3d 30 3a 4a 25 21  26 43 3d 30 3a c8 99 26  |!8=0:J%!&C=0:..&|
00005220  34 30 30 43 44 2c 2c 4a  25 3a e1 0d 01 ac 7a dd  |400CD,,J%:....z.|
00005230  f2 50 4a 3a 21 4a 25 3d  54 79 25 3a c8 99 26 34  |.PJ:!J%=Ty%:..&4|
00005240  30 30 43 42 2c 2c 4a 25  3a 4a 25 21 34 3d 4b 25  |00CB,,J%:J%!4=K%|
00005250  21 34 2b 32 32 3a 4a 25  21 31 36 3d 4b 25 21 31  |!4+22:J%!16=K%!1|
00005260  36 2d 37 30 3a 4a 25 21  38 3d 4a 25 21 31 36 2d  |6-70:J%!8=J%!16-|
00005270  32 37 32 3a 4a 25 21 32  38 3d 4b 25 21 32 38 3a  |272:J%!28=K%!28:|
00005280  c8 99 26 34 30 30 43 35  2c 2c 4a 25 3a 4b 25 21  |..&400C5,,J%:K%!|
00005290  32 38 3d 54 79 25 3a c8  99 26 34 30 30 43 35 2c  |28=Ty%:..&400C5,|
000052a0  2c 4b 25 3a e1 0d 01 ad  22 dd f2 48 75 28 71 25  |,K%:...."..Hu(q%|
000052b0  2c 73 25 2c 67 25 2c 61  25 2c 51 25 29 3a ea 41  |,s%,g%,a%,Q%):.A|
000052c0  25 3a c8 8e 71 25 ca 0d  01 ae 0e c9 54 5f 25 3a  |%:..q%......T_%:|
000052d0  c8 8e 73 25 ca 0d 01 af  18 c9 31 2c 32 2c 33 2c  |..s%......1,2,3,|
000052e0  34 2c 35 2c 36 3a f2 65  79 28 73 25 29 0d 01 b0  |4,5,6:.ey(s%)...|
000052f0  09 c9 38 3a f2 62 0d 01  b1 1b c9 39 3a f2 6c 79  |..8:.b.....9:.ly|
00005300  3a 76 79 25 3d 2d 31 3a  e7 67 25 3c 3e 31 8c f2  |:vy%=-1:.g%<>1..|
00005310  62 0d 01 b2 19 c9 26 41  3a f2 6c 79 3a f2 57 5f  |b.....&A:.ly:.W_|
00005320  3a e7 67 25 3c 3e 31 8c  f2 62 0d 01 b3 05 cb 0d  |:.g%<>1..b......|
00005330  01 b4 10 c9 41 25 28 31  29 3a c8 8e 73 25 ca 0d  |....A%(1):..s%..|
00005340  01 b5 28 c9 26 46 3a e7  67 25 3c 26 41 80 67 25  |..(.&F:.g%<&A.g%|
00005350  3c 3e 32 8c f2 42 28 a4  41 28 22 45 72 72 52 65  |<>2..B(.A("ErrRe|
00005360  6c 6f 61 64 22 29 29 0d  01 b6 1b c9 37 2c 38 2c  |load")).....7,8,|
00005370  39 2c 32 32 2c 26 45 2c  31 39 3a e7 67 25 3c 3e  |9,22,&E,19:.g%<>|
00005380  32 8c 0d 01 b7 aa f2 5a  28 71 25 2c 73 25 2c 31  |2......Z(q%,s%,1|
00005390  29 3a f2 4d 28 71 25 2c  26 42 2c 94 ac 28 a4 5a  |):.M(q%,&B,..(.Z|
000053a0  28 71 25 2c 39 29 80 ac  a4 5a 28 71 25 2c 32 34  |(q%,9)...Z(q%,24|
000053b0  29 29 29 3a f2 4d 28 71  25 2c 26 41 2c 94 ac 28  |))):.M(q%,&A,..(|
000053c0  a4 5a 28 71 25 2c 38 29  84 28 a4 5a 28 71 25 2c  |.Z(q%,8).(.Z(q%,|
000053d0  39 29 80 ac a4 5a 28 71  25 2c 32 34 29 29 29 29  |9)...Z(q%,24))))|
000053e0  3a f2 4d 28 71 25 2c 32  34 2c 94 ac a4 5a 28 71  |:.M(q%,24,...Z(q|
000053f0  25 2c 39 29 29 3a f2 4d  28 71 25 2c 32 35 2c 94  |%,9)):.M(q%,25,.|
00005400  ac 28 a4 5a 28 71 25 2c  39 29 80 a4 5a 28 71 25  |.(.Z(q%,9)..Z(q%|
00005410  2c 32 34 29 29 29 3a f2  4d 28 71 25 2c 32 39 2c  |,24))):.M(q%,29,|
00005420  2d ac a4 5a 28 71 25 2c  32 32 29 29 0d 01 b8 05  |-..Z(q%,22))....|
00005430  cd 0d 01 b9 47 c9 32 34  3a f2 4d 28 71 25 2c 32  |....G.24:.M(q%,2|
00005440  35 2c 94 ac a4 5a 28 71  25 2c 32 34 29 29 3a f2  |5,...Z(q%,24)):.|
00005450  4d 28 71 25 2c 26 41 2c  94 a4 5a 28 71 25 2c 32  |M(q%,&A,..Z(q%,2|
00005460  34 29 29 3a f2 4d 28 71  25 2c 26 42 2c 94 a4 5a  |4)):.M(q%,&B,..Z|
00005470  28 71 25 2c 32 34 29 29  0d 01 ba 15 c9 32 37 3a  |(q%,24)).....27:|
00005480  f2 77 5f 28 41 25 28 31  29 2c 32 37 29 0d 01 bb  |.w_(A%(1),27)...|
00005490  5b c9 33 32 3a e3 41 25  3d 33 33 b8 33 34 3a f2  |[.32:.A%=33.34:.|
000054a0  4d 28 71 25 2c 41 25 2c  2d ac a4 5a 28 71 25 2c  |M(q%,A%,-..Z(q%,|
000054b0  33 32 29 29 3a ed 3a e3  41 25 3d 33 35 b8 34 32  |32)):.:.A%=35.42|
000054c0  3a f2 4d 28 71 25 2c 41  25 2c 2d 28 28 ac a4 5a  |:.M(q%,A%,-((..Z|
000054d0  28 71 25 2c 33 32 29 29  84 28 a4 5a 28 71 25 2c  |(q%,32)).(.Z(q%,|
000054e0  33 33 29 29 29 29 3a ed  0d 01 bc 37 c9 33 33 2c  |33)))):....7.33,|
000054f0  33 34 3a f2 5a 28 71 25  2c 73 25 2c 31 29 3a e3  |34:.Z(q%,s%,1):.|
00005500  41 25 3d 33 35 b8 34 32  3a f2 4d 28 71 25 2c 41  |A%=35.42:.M(q%,A|
00005510  25 2c 2d a4 5a 28 71 25  2c 33 33 29 29 3a ed 0d  |%,-.Z(q%,33)):..|
00005520  01 bd 2f c9 33 35 2c 33  38 3a 41 25 3d bb a4 4d  |../.35,38:A%=..M|
00005530  28 71 25 2c 73 25 2b 31  29 2d 26 36 34 3a e7 41  |(q%,s%+1)-&64:.A|
00005540  25 3d 2d 26 36 34 8c 41  25 3d 26 38 46 43 0d 01  |%=-&64.A%=&8FC..|
00005550  be 20 f2 41 28 71 25 2c  73 25 2b 31 2c c4 34 2d  |. .A(q%,s%+1,.4-|
00005560  a9 c3 41 25 2c 22 30 22  29 2b c3 41 25 29 0d 01  |..A%,"0")+.A%)..|
00005570  bf 2c c9 33 37 2c 34 30  3a 41 25 3d bb a4 4d 28  |.,.37,40:A%=..M(|
00005580  71 25 2c 73 25 2d 31 29  2b 26 36 34 3a e7 41 25  |q%,s%-1)+&64:.A%|
00005590  3d 26 39 36 30 8c 41 25  3d 30 0d 01 c0 20 f2 41  |=&960.A%=0... .A|
000055a0  28 71 25 2c 73 25 2d 31  2c c4 34 2d a9 c3 41 25  |(q%,s%-1,.4-..A%|
000055b0  2c 22 30 22 29 2b c3 41  25 29 0d 01 c1 05 cb 0d  |,"0")+.A%)......|
000055c0  01 c2 10 c9 41 25 28 36  29 3a c8 8e 73 25 ca 0d  |....A%(6):..s%..|
000055d0  01 c3 33 c9 32 2c 33 2c  34 2c 35 3a 21 6f 4a 25  |..3.2,3,4,5:!oJ%|
000055e0  3d a4 71 79 28 41 25 28  36 29 2c 73 25 29 3a f2  |=.qy(A%(6),s%):.|
000055f0  46 28 6f 4a 25 2c 61 25  2c 51 25 2c 71 25 2c 73  |F(oJ%,a%,Q%,q%,s|
00005600  25 29 0d 01 c4 4d c9 39  2c 26 41 2c 26 42 2c 26  |%)...M.9,&A,&B,&|
00005610  43 2c 26 44 2c 26 45 2c  26 46 3a f2 57 28 41 79  |C,&D,&E,&F:.W(Ay|
00005620  25 2c 30 2c 2d 31 29 3a  f2 53 28 41 79 25 2c 58  |%,0,-1):.S(Ay%,X|
00005630  25 28 73 25 2d 39 29 2c  2d 31 29 3a f2 46 28 41  |%(s%-9),-1):.F(A|
00005640  79 25 2c 61 25 2c 51 25  2c 71 25 2c 73 25 29 0d  |y%,a%,Q%,q%,s%).|
00005650  01 c5 3d c9 31 39 3a f2  57 28 69 4a 25 2c 30 2c  |..=.19:.W(iJ%,0,|
00005660  2d 31 29 3a f2 53 28 69  4a 25 2c 55 25 28 73 25  |-1):.S(iJ%,U%(s%|
00005670  2d 31 39 29 2c 2d 31 29  3a f2 46 28 69 4a 25 2c  |-19),-1):.F(iJ%,|
00005680  61 25 2c 51 25 2c 71 25  2c 73 25 29 0d 01 c6 40  |a%,Q%,q%,s%)...@|
00005690  c9 32 30 2c 32 31 3a f2  57 28 41 79 25 2c 30 2c  |.20,21:.W(Ay%,0,|
000056a0  2d 31 29 3a f2 53 28 41  79 25 2c 55 25 28 73 25  |-1):.S(Ay%,U%(s%|
000056b0  2d 31 39 29 2c 2d 31 29  3a f2 46 28 41 79 25 2c  |-19),-1):.F(Ay%,|
000056c0  61 25 2c 51 25 2c 71 25  2c 73 25 29 0d 01 c7 1b  |a%,Q%,q%,s%)....|
000056d0  c9 32 35 3a f2 46 28 59  61 25 2c 61 25 2c 51 25  |.25:.F(Ya%,a%,Q%|
000056e0  2c 71 25 2c 73 25 29 0d  01 c8 37 c9 32 36 3a f2  |,q%,s%)...7.26:.|
000056f0  57 28 41 79 25 2c 30 2c  2d 31 29 3a f2 53 28 41  |W(Ay%,0,-1):.S(A|
00005700  79 25 2c 6b 75 25 2c 2d  31 29 3a f2 46 28 41 79  |y%,ku%,-1):.F(Ay|
00005710  25 2c 61 25 2c 51 25 2c  71 25 2c 73 25 29 0d 01  |%,a%,Q%,q%,s%)..|
00005720  c9 37 c9 32 37 3a f2 57  28 41 79 25 2c 30 2c 2d  |.7.27:.W(Ay%,0,-|
00005730  31 29 3a f2 53 28 41 79  25 2c 68 75 25 2c 2d 31  |1):.S(Ay%,hu%,-1|
00005740  29 3a f2 46 28 41 79 25  2c 61 25 2c 51 25 2c 71  |):.F(Ay%,a%,Q%,q|
00005750  25 2c 73 25 29 0d 01 ca  05 cb 0d 01 cb 18 7f f2  |%,s%)...........|
00005760  61 4a 28 71 25 2c 73 25  2c 67 25 2c 61 25 2c 51  |aJ(q%,s%,g%,a%,Q|
00005770  25 29 0d 01 cc 07 cb 3a  e1 0d 01 cd 18 dd a4 4d  |%).....:.......M|
00005780  5f 28 71 25 2c 73 25 2c  67 25 29 3a c8 8e 71 25  |_(q%,s%,g%):..q%|
00005790  ca 0d 01 ce 13 c9 54 5f  25 2c 41 25 28 31 29 3a  |......T_%,A%(1):|
000057a0  6f 25 3d a3 0d 01 cf 15  7f 6f 25 3d a4 64 79 28  |o%=......o%=.dy(|
000057b0  71 25 2c 73 25 2c 67 25  29 0d 01 d0 09 cb 3a 3d  |q%,s%,g%).....:=|
000057c0  6f 25 0d 01 d1 2c dd f2  62 3a f2 58 28 54 79 25  |o%...,..b:.X(Ty%|
000057d0  29 3a 54 79 25 3d 30 3a  f2 58 28 54 5f 25 29 3a  |):Ty%=0:.X(T_%):|
000057e0  e7 49 79 25 8c f2 43 28  69 25 2c 2d 31 29 0d 01  |.Iy%..C(i%,-1)..|
000057f0  d2 05 e1 0d 01 d3 81 dd  f2 77 5f 28 78 25 2c 46  |.........w_(x%,F|
00005800  79 25 29 3a ea 71 6c 25  2c 6d 24 2c 57 79 25 2c  |y%):.ql%,m$,Wy%,|
00005810  4b 24 2c 71 24 2c 74 24  2c 60 25 3a 71 6c 25 3d  |K$,q$,t$,`%:ql%=|
00005820  31 3a 6d 24 3d a4 4d 28  78 25 2c 46 79 25 29 3a  |1:m$=.M(x%,Fy%):|
00005830  f5 3a c8 99 26 43 2c 39  2c 22 3c 4f 72 67 61 6e  |.:..&C,9,"<Organ|
00005840  69 73 65 72 24 44 69 72  3e 2e 52 65 73 6f 75 72  |iser$Dir>.Resour|
00005850  63 65 73 22 2c 4b 25 2c  31 2c 71 6c 25 2c 32 35  |ces",K%,1,ql%,25|
00005860  36 2c 30 b8 2c 2c 2c 60  25 2c 71 6c 25 3a e7 60  |6,0.,,,`%,ql%:.`|
00005870  25 3d 31 8c 0d 01 d4 1a  71 24 3d a4 4e 28 4b 25  |%=1.....q$=.N(K%|
00005880  29 3a e7 74 24 3d 22 22  8c 74 24 3d 71 24 0d 01  |):.t$="".t$=q$..|
00005890  d5 10 e7 57 79 25 3d b9  8c 4b 24 3d 71 24 0d 01  |...Wy%=..K$=q$..|
000058a0  d6 10 e7 71 24 3d 6d 24  8c 57 79 25 3d b9 0d 01  |...q$=m$.Wy%=...|
000058b0  d7 21 cd 3a fd 71 6c 25  3d 2d 31 84 4b 24 3c 3e  |.!.:.ql%=-1.K$<>|
000058c0  22 22 3a e7 4b 24 3d 22  22 8c 4b 24 3d 74 24 0d  |"":.K$="".K$=t$.|
000058d0  01 d8 13 f2 41 28 78 25  2c 46 79 25 2c 4b 24 29  |....A(x%,Fy%,K$)|
000058e0  3a e1 0d 01 d9 ba dd f2  60 28 63 25 2c 72 25 2c  |:.......`(c%,r%,|
000058f0  51 25 2c 78 25 2c 46 79  25 29 3a ea 4d 25 2c 41  |Q%,x%,Fy%):.M%,A|
00005900  25 3a 5f 69 25 3d a3 3a  f2 41 28 73 79 25 2c 30  |%:_i%=.:.A(sy%,0|
00005910  2c a4 4a 79 28 63 25 2c  72 25 2c 51 25 2c 2d 31  |,.Jy(c%,r%,Q%,-1|
00005920  29 29 3a 4d 25 3d a4 44  28 72 25 2c 51 25 29 3a  |)):M%=.D(r%,Q%):|
00005930  e3 41 25 3d 32 39 b8 33  31 3a f2 52 28 73 79 25  |.A%=29.31:.R(sy%|
00005940  2c 41 25 2b 33 2c 2d 28  41 25 3e 4d 25 29 29 3a  |,A%+3,-(A%>M%)):|
00005950  ed 3a e3 41 25 3d 31 b8  4d 25 3a f2 75 28 41 25  |.:.A%=1.M%:.u(A%|
00005960  2c 41 25 3d 63 25 29 3a  ed 3a 50 4a 25 3d 72 25  |,A%=c%):.:PJ%=r%|
00005970  3a f2 41 28 73 79 25 2c  31 2c c3 51 25 29 3a f2  |:.A(sy%,1,.Q%):.|
00005980  72 28 73 79 25 2c 2d 31  2c 31 29 3a 47 61 25 3d  |r(sy%,-1,1):Ga%=|
00005990  78 25 3a 78 61 25 3d 46  79 25 3a e1 0d 01 da 24  |x%:xa%=Fy%:....$|
000059a0  dd f2 6e 79 3a ea 64 25  2c 7a 25 2c 65 25 2c 41  |..ny:.d%,z%,e%,A|
000059b0  24 3a f2 58 28 73 79 25  29 3a c8 8e 47 61 25 ca  |$:.X(sy%):..Ga%.|
000059c0  0d 01 db 28 c9 66 25 3a  f2 41 28 66 25 2c 31 2c  |...(.f%:.A(f%,1,|
000059d0  a4 6f 28 51 5f 25 2c 4e  5f 25 2c 41 4a 25 29 29  |.o(Q_%,N_%,AJ%))|
000059e0  3a f2 4f 28 30 2c 30 29  0d 01 dc 33 c9 65 5f 25  |:.O(0,0)...3.e_%|
000059f0  3a 41 24 3d a4 6f 28 64  25 2c 7a 25 2c 65 25 29  |:A$=.o(d%,z%,e%)|
00005a00  3a 4b 5f 25 3d 74 25 3a  77 5f 25 3d 76 25 3a f2  |:K_%=t%:w_%=v%:.|
00005a10  48 28 64 25 2c 7a 25 2c  65 25 29 0d 01 dd 22 c9  |H(d%,z%,e%)...".|
00005a20  4a 79 25 3a f2 41 28 4a  79 25 2c 32 2c a4 6f 28  |Jy%:.A(Jy%,2,.o(|
00005a30  58 5f 25 2c 56 5f 25 2c  4c 5f 25 29 29 0d 01 de  |X_%,V_%,L_%))...|
00005a40  07 cb 3a e1 0d 01 df 5c  dd f2 75 28 63 25 2c 46  |..:....\..u(c%,F|
00005a50  25 29 3a 21 4a 25 3d 73  79 25 3a 4a 25 21 34 3d  |%):!J%=sy%:J%!4=|
00005a60  63 25 2b 33 3a c8 99 26  34 30 30 43 45 2c 2c 4a  |c%+3:..&400CE,,J|
00005a70  25 3a 24 4a 25 21 33 32  3d 22 52 22 2b c3 28 31  |%:$J%!32="R"+.(1|
00005a80  2d 46 25 29 2b 22 3b 46  22 2b c3 28 31 2d 46 25  |-F%)+";F"+.(1-F%|
00005a90  29 2b 22 37 22 3a e7 46  25 8c 61 75 25 3d 63 25  |)+"7":.F%.au%=c%|
00005aa0  0d 01 e0 37 e7 49 61 25  8c 4a 25 21 38 3d 30 3a  |...7.Ia%.J%!8=0:|
00005ab0  4a 25 21 26 43 3d 30 8b  4a 25 21 38 3d 28 31 2b  |J%!&C=0.J%!8=(1+|
00005ac0  94 28 46 25 29 29 3c 3c  32 38 3a 4a 25 21 26 43  |.(F%))<<28:J%!&C|
00005ad0  3d 26 46 3c 3c 32 38 0d  01 e1 12 c8 99 26 34 30  |=&F<<28......&40|
00005ae0  30 43 44 2c 2c 4a 25 3a  e1 0d 01 e2 3b dd f2 44  |0CD,,J%:....;..D|
00005af0  79 28 63 25 2c 72 25 2c  51 79 25 29 3a ea 41 25  |y(c%,r%,Qy%):.A%|
00005b00  2c 4d 25 2c 51 25 2c 41  24 3a e7 63 25 3c 3e 2d  |,M%,Q%,A$:.c%<>-|
00005b10  31 8c f2 75 28 61 75 25  2c a3 29 3a f2 75 28 63  |1..u(au%,.):.u(c|
00005b20  25 2c b9 29 0d 01 e3 35  e7 72 25 3c 3e 2d 31 8c  |%,.)...5.r%<>-1.|
00005b30  f2 53 28 7a 5f 25 2c 50  4a 25 2d 31 2c a3 29 3a  |.S(z_%,PJ%-1,.):|
00005b40  50 4a 25 3d 21 4b 25 2b  31 3a f2 53 28 7a 5f 25  |PJ%=!K%+1:.S(z_%|
00005b50  2c 50 4a 25 2d 31 2c b9  29 0d 01 e4 4c e7 51 79  |,PJ%-1,.)...L.Qy|
00005b60  25 3c 3e 30 8c 51 25 3d  bb a4 4d 28 73 79 25 2c  |%<>0.Q%=..M(sy%,|
00005b70  31 29 2b 51 79 25 3a e7  51 25 3e 3d 26 37 37 64  |1)+Qy%:.Q%>=&77d|
00005b80  80 51 25 3c 3d 26 66 66  66 8c f2 41 28 73 79 25  |.Q%<=&fff..A(sy%|
00005b90  2c 31 2c c3 51 25 29 8b  51 25 3d bb a4 4d 28 73  |,1,.Q%).Q%=..M(s|
00005ba0  79 25 2c 31 29 0d 01 e5  4e 4d 25 3d a4 44 28 50  |y%,1)...NM%=.D(P|
00005bb0  4a 25 2c 51 25 29 3a e3  41 25 3d 32 39 b8 33 31  |J%,Q%):.A%=29.31|
00005bc0  3a f2 52 28 73 79 25 2c  41 25 2b 33 2c 2d 28 41  |:.R(sy%,A%+3,-(A|
00005bd0  25 3e 4d 25 29 29 3a ed  3a e7 61 75 25 3e 4d 25  |%>M%)):.:.au%>M%|
00005be0  8c f2 75 28 61 75 25 2c  a3 29 3a f2 75 28 4d 25  |..u(au%,.):.u(M%|
00005bf0  2c b9 29 0d 01 e6 22 f2  41 28 73 79 25 2c 30 2c  |,.)...".A(sy%,0,|
00005c00  a4 4a 79 28 61 75 25 2c  50 4a 25 2c 51 25 2c 2d  |.Jy(au%,PJ%,Q%,-|
00005c10  31 29 29 3a e1 0d 01 e7  41 dd a4 6f 28 f8 63 25  |1)):....A..o(.c%|
00005c20  2c f8 72 25 2c f8 51 25  29 3a 63 25 3d 61 75 25  |,.r%,.Q%):c%=au%|
00005c30  3a 72 25 3d 50 4a 25 3a  51 25 3d bb a4 4d 28 73  |:r%=PJ%:Q%=..M(s|
00005c40  79 25 2c 31 29 3a 3d a4  55 28 63 25 2c 72 25 2c  |y%,1):=.U(c%,r%,|
00005c50  51 25 2c 2d 31 29 0d 01  e8 3a dd a4 4a 79 28 63  |Q%,-1)...:..Jy(c|
00005c60  25 2c 72 25 2c 51 25 2c  70 79 25 29 3a ea 41 24  |%,r%,Q%,py%):.A$|
00005c70  3a 41 24 3d a4 55 28 63  25 2c 72 25 2c 51 25 2c  |:A$=.U(c%,r%,Q%,|
00005c80  70 79 25 29 3a 3d c0 41  24 2c a9 41 24 2d 35 29  |py%):=.A$,.A$-5)|
00005c90  0d 01 e9 2f dd f2 41 79  3a ea 55 75 25 2c 48 6c  |.../..Ay:.Uu%,Hl|
00005ca0  25 2c 55 4a 25 2c 4b 4a  25 2c 4e 61 25 2c 70 25  |%,UJ%,KJ%,Na%,p%|
00005cb0  2c 6e 25 3a 6c 4a 25 3d  30 3a e7 78 4a 25 8c 0d  |,n%:lJ%=0:.xJ%..|
00005cc0  01 ea f6 70 25 3d a4 59  3a 6e 25 3d a4 63 3a 48  |...p%=.Y:n%=.c:H|
00005cd0  6c 25 3d 4a 25 28 30 2c  31 29 3a 55 75 25 3d 4a  |l%=J%(0,1):Uu%=J|
00005ce0  25 28 30 2c 33 29 3a 55  75 25 2b 3d 4a 25 28 30  |%(0,3):Uu%+=J%(0|
00005cf0  2c 32 29 2d a4 48 28 55  75 25 2c 48 6c 25 2c 4d  |,2)-.H(Uu%,Hl%,M|
00005d00  79 25 29 3a 4b 4a 25 3d  4a 25 28 31 2c 31 29 3a  |y%):KJ%=J%(1,1):|
00005d10  55 4a 25 3d 4a 25 28 31  2c 33 29 3a 55 4a 25 2b  |UJ%=J%(1,3):UJ%+|
00005d20  3d 4a 25 28 31 2c 32 29  2d a4 48 28 55 4a 25 2c  |=J%(1,2)-.H(UJ%,|
00005d30  4b 4a 25 2c 4d 79 25 29  3a 68 6c 25 3d a4 53 28  |KJ%,My%):hl%=.S(|
00005d40  30 2c 31 2c 55 75 25 2c  48 6c 25 2c 4d 79 25 29  |0,1,Uu%,Hl%,My%)|
00005d50  3a 6b 6c 25 3d a4 53 28  30 2c 32 2c 55 4a 25 2c  |:kl%=.S(0,2,UJ%,|
00005d60  4b 4a 25 2c 4d 79 25 29  3a 4e 61 25 3d 28 a4 42  |KJ%,My%):Na%=(.B|
00005d70  28 68 6c 25 2c 70 25 29  3c 31 80 a4 42 28 70 25  |(hl%,p%)<1..B(p%|
00005d80  2c 6b 6c 25 29 3c 31 29  3a e7 a4 4c 28 55 75 25  |,kl%)<1):..L(Uu%|
00005d90  2c 48 6c 25 2c 4d 79 25  29 3d a4 4c 28 44 79 25  |,Hl%,My%)=.L(Dy%|
00005da0  2c 66 79 25 2c 4d 79 25  29 80 ac a4 6a 8c 6c 4a  |,fy%,My%)...j.lJ|
00005db0  25 3d 68 6c 25 0d 01 eb  2f e7 a4 4c 28 55 4a 25  |%=hl%.../..L(UJ%|
00005dc0  2c 4b 4a 25 2c 4d 79 25  29 3d a4 4c 28 44 79 25  |,KJ%,My%)=.L(Dy%|
00005dd0  2c 66 79 25 2c 4d 79 25  29 80 a4 6a 8c 6c 4a 25  |,fy%,My%)..j.lJ%|
00005de0  3d 6b 6c 25 0d 01 ec 56  e7 4e 61 25 3c 3e a4 6a  |=kl%...V.Na%<>.j|
00005df0  80 a4 4c 28 55 75 25 2c  48 6c 25 2c 4d 79 25 29  |..L(Uu%,Hl%,My%)|
00005e00  3c 3e a4 4c 28 44 79 25  2c 66 79 25 2c 4d 79 25  |<>.L(Dy%,fy%,My%|
00005e10  29 80 a4 4c 28 55 4a 25  2c 4b 4a 25 2c 4d 79 25  |)..L(UJ%,KJ%,My%|
00005e20  29 3c 3e a4 4c 28 44 79  25 2c 66 79 25 2c 4d 79  |)<>.L(Dy%,fy%,My|
00005e30  25 29 8c f2 4d 79 28 2d  31 29 0d 01 ed 07 cd 3a  |%)..My(-1).....:|
00005e40  e1 0d 01 ee 18 dd f2 6d  4a 3a e7 6c 4a 25 3d 6b  |.......mJ:.lJ%=k|
00005e50  6c 25 8c f2 4d 79 28 30  29 0d 01 ef 13 e7 6c 4a  |l%..My(0).....lJ|
00005e60  25 3d 68 6c 25 8c f2 4d  79 28 31 29 0d 01 f0 09  |%=hl%..My(1)....|
00005e70  f2 41 79 3a e1 0d 01 f1  4b dd f2 46 4a 3a e7 5f  |.Ay:....K..FJ:._|
00005e80  24 3c 3e 22 22 8c f2 42  28 22 54 68 65 20 22 2b  |$<>""..B("The "+|
00005e90  5f 24 2b 22 20 72 65 73  6f 75 72 63 65 73 20 61  |_$+" resources a|
00005ea0  72 65 20 6f 75 74 20 6f  66 20 64 61 74 65 2c 20  |re out of date, |
00005eb0  75 73 69 6e 67 20 45 6e  67 6c 69 73 68 2e 22 29  |using English.")|
00005ec0  0d 01 f2 ba 50 24 3d a4  43 5f 28 22 4f 72 67 61  |....P$=.C_("Orga|
00005ed0  6e 69 73 65 72 24 44 69  72 22 29 3a 77 25 3d 30  |niser$Dir"):w%=0|
00005ee0  3a 52 75 25 3d 30 3a 47  24 3d 22 22 3a 76 79 25  |:Ru%=0:G$="":vy%|
00005ef0  3d a3 3a 49 69 25 3d a3  3a 58 4a 25 3d 2d 31 3a  |=.:Ii%=.:XJ%=-1:|
00005f00  41 75 25 3d a3 3a 59 24  3d 50 24 2b 22 2e 44 61  |Au%=.:Y$=P$+".Da|
00005f10  74 61 2e 22 3a 77 4a 25  3d 30 3a 68 25 3d a4 5a  |ta.":wJ%=0:h%=.Z|
00005f20  5f 28 22 3c 4f 72 67 61  6e 69 73 65 72 24 44 69  |_("<Organiser$Di|
00005f30  72 3e 2e 53 70 72 69 74  65 73 22 2c 26 37 41 43  |r>.Sprites",&7AC|
00005f40  2b 26 43 38 29 3a de 58  61 25 33 2c 44 4a 25 33  |+&C8):.Xa%3,DJ%3|
00005f50  32 2c 4e 25 28 31 29 2c  59 69 25 31 36 2c 4b 69  |2,N%(1),Yi%16,Ki|
00005f60  25 31 37 2c 73 6c 25 31  3a 24 58 61 25 3d 22 52  |%17,sl%1:$Xa%="R|
00005f70  32 22 3a 4e 25 28 29 3d  2d 31 0d 01 f3 b7 24 59  |2":N%()=-1....$Y|
00005f80  69 25 3d 22 50 70 74 72  5f 74 75 72 6e 6c 2c 30  |i%="Pptr_turnl,0|
00005f90  2c 31 30 22 2b bd 30 3a  24 4b 69 25 3d 22 50 70  |,10"+.0:$Ki%="Pp|
00005fa0  74 72 5f 74 75 72 6e 72  2c 32 33 2c 31 30 22 2b  |tr_turnr,23,10"+|
00005fb0  bd 30 3a 3f 73 6c 25 3d  30 3a 24 44 4a 25 3d 22  |.0:?sl%=0:$DJ%="|
00005fc0  22 3a de 44 25 28 35 29  2c 49 25 28 35 29 2c 42  |":.D%(5),I%(5),B|
00005fd0  25 28 35 29 2c 57 25 28  35 29 2c 53 25 28 35 29  |%(5),W%(5),S%(5)|
00005fe0  2c 5a 25 28 35 29 2c 4d  24 28 35 29 3a de 50 25  |,Z%(5),M$(5):.P%|
00005ff0  28 37 29 2c 58 25 28 37  29 2c 48 25 28 32 29 2c  |(7),X%(7),H%(2),|
00006000  55 25 28 32 29 2c 4b 79  25 34 3a 41 24 3d a4 66  |U%(2),Ky%4:A$=.f|
00006010  79 3a 46 75 25 3d a3 3a  e7 a7 41 24 2c 22 2d 64  |y:Fu%=.:..A$,"-d|
00006020  65 6c 65 74 65 5f 61 6c  6c 5f 64 61 74 61 22 29  |elete_all_data")|
00006030  8c 0d 01 f4 1a e7 a4 5f  79 28 a4 41 28 22 45 72  |......._y(.A("Er|
00006040  72 53 75 72 65 22 29 2c  b9 29 8c 0d 01 f5 23 f2  |rSure"),.)....#.|
00006050  42 28 a4 41 28 22 45 72  72 43 68 61 6e 67 65 22  |B(.A("ErrChange"|
00006060  29 29 3a 46 75 25 3d b9  3a 76 79 25 3d b9 0d 01  |)):Fu%=.:vy%=...|
00006070  f6 05 cd 0d 01 f7 41 cd  3a f2 60 79 3a f2 54 4a  |......A.:.`y:.TJ|
00006080  3a f2 76 75 3a f2 4d 5f  3a 6a 5f 25 3d 2d 31 3a  |:.vu:.M_:j_%=-1:|
00006090  f2 68 3a 73 5f 25 3d a4  6c 28 31 2a 26 34 30 30  |.h:s_%=.l(1*&400|
000060a0  29 3a f2 63 5f 28 73 5f  25 2c 60 75 25 29 3a e7  |):.c_(s_%,`u%):.|
000060b0  78 5f 25 8c 0d 01 f8 17  e7 4f 79 25 3d 31 8c f2  |x_%......Oy%=1..|
000060c0  4d 28 2d 31 2c 6a 5f 25  2c 31 29 0d 01 f9 0a f2  |M(-1,j_%,1).....|
000060d0  77 28 ac 31 29 0d 01 fa  0d cc c8 99 26 34 30 36  |w(.1).......&406|
000060e0  43 30 0d 01 fb 07 cd 3a  e1 0d 01 fc 30 dd f2 59  |C0.....:....0..Y|
000060f0  75 3a f2 78 4a 3a 76 25  3d 53 25 28 74 25 29 3a  |u:.xJ:v%=S%(t%):|
00006100  f2 72 28 69 25 2c 2d 31  2c 2d 31 29 3a e7 ac 69  |.r(i%,-1,-1):..i|
00006110  75 25 8c f2 58 28 69 25  29 0d 01 fd 10 e7 42 75  |u%..X(i%).....Bu|
00006120  25 8c f2 78 79 3a f2 41  79 0d 01 fe 1b 52 75 25  |%..xy:.Ay....Ru%|
00006130  3d b9 3a f2 6d 79 28 74  25 29 3a e7 4f 79 25 3e  |=.:.my(t%):.Oy%>|
00006140  31 8c f2 6d 0d 01 ff 17  e7 4f 79 25 80 31 8c f2  |1..m.....Oy%.1..|
00006150  4d 28 2d 31 2c 6a 5f 25  2c 30 29 0d 02 00 1d e7  |M(-1,j_%,0).....|
00006160  62 75 25 8c f2 72 28 4d  75 25 2c 2d 31 2c 2d 31  |bu%..r(Mu%,-1,-1|
00006170  29 8b 67 75 25 3d 2d 31  0d 02 01 12 e7 ac 78 5f  |).gu%=-1......x_|
00006180  25 8c c8 99 26 34 30 36  43 31 0d 02 02 0c f2 78  |%...&406C1.....x|
00006190  3a f2 41 79 3a e1 0d 02  03 35 dd a4 47 28 4c 75  |:.Ay:....5..G(Lu|
000061a0  25 29 3a ea 41 25 3a 41  25 3d 42 5f 25 2b 31 3a  |%):.A%:A%=B_%+1:|
000061b0  f5 41 25 2d 3d 31 3a fd  5a 25 28 41 25 29 3d 4c  |.A%-=1:.Z%(A%)=L|
000061c0  75 25 84 41 25 3d 30 3a  3d 41 25 0d 02 04 ef dd  |u%.A%=0:=A%.....|
000061d0  f2 6e 5f 3a ea 41 24 2c  53 25 2c 46 25 2c 4c 25  |.n_:.A$,S%,F%,L%|
000061e0  3a de 54 25 28 42 5f 25  29 3a 41 79 25 3d a4 50  |:.T%(B_%):Ay%=.P|
000061f0  79 28 a4 41 28 22 43 6f  6c 73 22 29 29 3a 7a 5f  |y(.A("Cols")):z_|
00006200  25 3d a4 43 28 22 4d 6f  6e 22 2c 22 4d 6f 6e 22  |%=.C("Mon","Mon"|
00006210  2c 31 2c 26 43 29 3a f2  67 79 28 7a 5f 25 2c 30  |,1,&C):.gy(z_%,0|
00006220  2c 2d 31 29 3a e3 53 25  3d 31 b8 42 5f 25 3a 54  |,-1):.S%=1.B_%:T|
00006230  25 28 53 25 29 3d a4 4c  5f 28 53 25 29 3a ed 3a  |%(S%)=.L_(S%):.:|
00006240  6b 4a 25 3d a4 43 28 22  54 69 74 6c 65 22 2c 22  |kJ%=.C("Title","|
00006250  4d 65 6e 75 22 2c 31 2c  37 29 3a f2 59 28 6b 4a  |Menu",1,7):.Y(kJ|
00006260  25 2c 30 2c 41 6c 25 29  3a 6f 4a 25 3d a4 43 28  |%,0,Al%):oJ%=.C(|
00006270  22 54 61 62 4d 22 2c 22  54 61 62 4d 22 2c 31 2c  |"TabM","TabM",1,|
00006280  32 29 3a 57 6c 25 3d a4  43 28 22 48 65 6c 70 6d  |2):Wl%=.C("Helpm|
00006290  22 2c 22 48 65 6c 70 6d  22 2c 31 2c 33 29 3a f2  |","Helpm",1,3):.|
000062a0  59 28 6b 4a 25 2c 33 2c  57 6c 25 29 3a f2 53 28  |Y(kJ%,3,Wl%):.S(|
000062b0  57 6c 25 2c 77 75 25 2c  31 29 0d 02 05 cd f2 59  |Wl%,wu%,1).....Y|
000062c0  28 6f 4a 25 2c 30 2c 41  79 25 29 3a f2 59 28 6f  |(oJ%,0,Ay%):.Y(o|
000062d0  4a 25 2c 31 2c 41 79 25  29 3a f2 47 5f 28 6f 4a  |J%,1,Ay%):.G_(oJ|
000062e0  25 2c 30 29 3a f2 47 5f  28 6f 4a 25 2c 31 29 3a  |%,0):.G_(oJ%,1):|
000062f0  69 4a 25 3d a4 43 28 22  42 6f 72 64 4d 22 2c 22  |iJ%=.C("BordM","|
00006300  42 6f 72 64 4d 22 2c 31  2c 35 29 3a 41 24 3d a4  |BordM",1,5):A$=.|
00006310  41 28 22 43 6f 76 22 29  3a 53 25 3d 31 3a 46 25  |A("Cov"):S%=1:F%|
00006320  3d 30 3a c8 95 28 46 25  80 31 29 3d 30 3a c8 99  |=0:..(F%.1)=0:..|
00006330  26 36 31 35 30 32 2c 43  5f 25 2c 22 43 6f 76 22  |&61502,C_%,"Cov"|
00006340  2b c3 53 25 2c 4a 25 2c  32 35 36 b8 2c 2c 2c 4c  |+.S%,J%,256.,,,L|
00006350  25 3b 46 25 3a 53 25 2b  3d 31 3a e7 28 46 25 80  |%;F%:S%+=1:.(F%.|
00006360  31 29 3d 30 8c 4a 25 3f  4c 25 3d 26 44 3a 41 24  |1)=0.J%?L%=&D:A$|
00006370  2b 3d 22 5c 22 2b c0 24  4a 25 2c a7 24 4a 25 2c  |+="\"+.$J%,.$J%,|
00006380  22 2c 22 29 2d 31 29 0d  02 06 13 ce 3a 59 61 25  |",")-1).....:Ya%|
00006390  3d a4 41 79 28 41 24 29  3a e1 0d 02 07 c6 dd f2  |=.Ay(A$):.......|
000063a0  4d 5f 3a ea 41 25 2c 6d  61 25 2c 61 61 25 3a 4d  |M_:.A%,ma%,aa%:M|
000063b0  79 25 3d a4 52 3a 66 79  25 3d a4 49 3a 44 79 25  |y%=.R:fy%=.I:Dy%|
000063c0  3d a4 54 3a 7a 79 25 3d  a4 72 28 6b 25 2f 42 5f  |=.T:zy%=.r(k%/B_|
000063d0  25 29 3a 61 79 25 3d 26  36 34 2b 32 2a 28 34 30  |%):ay%=&64+2*(40|
000063e0  2b 75 25 2b 35 2b 34 30  29 3a 55 79 25 3d 6b 25  |+u%+5+40):Uy%=k%|
000063f0  2b 32 2a 28 35 2b 34 30  29 3a 6b 5f 25 3d 35 2b  |+2*(5+40):k_%=5+|
00006400  34 30 3a 73 4a 25 3d 6b  5f 25 2b 34 30 2b 26 36  |40:sJ%=k_%+40+&6|
00006410  34 2b 32 2a 75 25 3a 6d  79 25 3d 6b 5f 25 2b 34  |4+2*u%:my%=k_%+4|
00006420  30 3a 77 79 25 3d 6d 79  25 2b 26 36 34 2b 75 25  |0:wy%=my%+&64+u%|
00006430  3a 6d 25 3d 35 2b 34 30  3a 60 79 25 3d 77 79 25  |:m%=5+40:`y%=wy%|
00006440  2d 26 36 34 3a 59 5f 25  3d 6b 25 2f 32 37 3a 3a  |-&64:Y_%=k%/27::|
00006450  63 4a 25 3d 75 25 2d 34  30 2d 32 2a 26 63 3a e1  |cJ%=u%-40-2*&c:.|
00006460  0d 02 08 30 dd f2 41 75  3a ea 42 25 3a e7 28 55  |...0..Au:.B%:.(U|
00006470  79 25 3c 3e 4b 25 21 31  36 2d 4b 25 21 38 84 61  |y%<>K%!16-K%!8.a|
00006480  79 25 3c 3e 4b 25 21 26  43 2d 4b 25 21 34 29 8c  |y%<>K%!&C-K%!4).|
00006490  0d 02 09 28 e7 4b 25 21  31 36 2d 4b 25 21 38 3e  |...(.K%!16-K%!8>|
000064a0  33 30 30 8c 55 79 25 3d  a4 72 28 4b 25 21 31 36  |300.Uy%=.r(K%!16|
000064b0  2d 4b 25 21 38 29 2d 32  0d 02 0a 28 e7 4b 25 21  |-K%!8)-2...(.K%!|
000064c0  26 43 2d 4b 25 21 34 3e  34 30 30 8c 61 79 25 3d  |&C-K%!4>400.ay%=|
000064d0  a4 72 28 4b 25 21 26 43  2d 4b 25 21 34 29 2d 32  |.r(K%!&C-K%!4)-2|
000064e0  0d 02 0b ad 6b 25 3d 55  79 25 2d 32 2a 28 35 2b  |....k%=Uy%-2*(5+|
000064f0  34 30 29 3a 75 25 3d 28  28 61 79 25 2d 26 36 34  |40):u%=((ay%-&64|
00006500  29 2d 32 2a 28 34 30 2b  35 2b 34 30 29 29 2f 32  |)-2*(40+5+40))/2|
00006510  3a f2 4d 5f 3a c8 99 33  30 2c 36 2c 2c 2c 6c 69  |:.M_:..30,6,,,li|
00006520  25 b8 2c 2c 42 25 3a 21  42 25 3d 43 79 25 3a c8  |%.,,B%:!B%=Cy%:.|
00006530  99 26 34 30 30 43 43 2c  2c 42 25 3a c8 99 26 34  |.&400CC,,B%:..&4|
00006540  30 30 43 33 2c 2c 42 25  3a f2 74 79 28 42 25 21  |00C3,,B%:.ty(B%!|
00006550  38 38 2c 42 25 2b 34 29  3a c8 99 26 34 30 30 43  |88,B%+4):..&400C|
00006560  31 2c 2c 42 25 2b 34 b8  43 79 25 3a c8 99 33 30  |1,,B%+4.Cy%:..30|
00006570  2c 37 2c 2c 42 25 3a e7  5a 25 28 74 25 29 3d 32  |,7,,B%:.Z%(t%)=2|
00006580  80 76 25 3d 30 8c f2 4f  79 3a f2 43 5f 0d 02 0c  |.v%=0..Oy:.C_...|
00006590  22 c8 99 26 34 30 30 44  31 2c 69 25 2c 30 2c 2d  |"..&400D1,i%,0,-|
000065a0  55 79 25 2d 26 41 2c 61  79 25 2b 26 41 2c 30 0d  |Uy%-&A,ay%+&A,0.|
000065b0  02 0d 07 cd 3a e1 0d 02  0e 60 dd f2 76 75 3a ea  |....:....`..vu:.|
000065c0  41 25 2c 60 24 3a ea 85  3a ee 85 ea f7 85 3a d9  |A%,`$:..:.....:.|
000065d0  23 77 25 3a 77 25 3d 30  3a f2 42 28 f6 24 2b 22  |#w%:w%=0:.B(.$+"|
000065e0  20 61 74 20 6c 69 6e 65  20 22 2b c3 9e 2b 22 2c  | at line "+..+",|
000065f0  20 75 73 69 6e 67 20 64  65 66 61 75 6c 74 20 73  | using default s|
00006600  65 74 74 69 6e 67 73 2e  22 29 3a f2 60 79 3a 76  |ettings."):.`y:v|
00006610  79 25 3d b9 3a e1 0d 02  0f f7 77 25 3d 8e 28 50  |y%=.:.....w%=.(P|
00006620  24 2b 22 2e 44 61 74 61  2e 53 65 74 74 69 6e 67  |$+".Data.Setting|
00006630  73 22 29 3a 6c 24 3d be  23 77 25 3a 60 24 3d be  |s"):l$=.#w%:`$=.|
00006640  23 77 25 3a 44 24 3d be  23 77 25 3a 78 5f 25 3d  |#w%:D$=.#w%:x_%=|
00006650  a4 51 3a 69 75 25 3d a4  51 3a 4f 79 25 3d a4 56  |.Q:iu%=.Q:Oy%=.V|
00006660  3a 66 5f 25 3d a4 51 3a  5a 75 25 3d a4 51 3a 42  |:f_%=.Q:Zu%=.Q:B|
00006670  5f 25 3d a4 56 3a 74 25  3d a4 56 3a 62 75 25 3d  |_%=.V:t%=.V:bu%=|
00006680  a4 51 3a 53 75 25 3d a4  51 3a 78 4a 25 3d a4 51  |.Q:Su%=.Q:xJ%=.Q|
00006690  3a 4a 75 25 3d a4 51 3a  49 61 25 3d 4a 75 25 3a  |:Ju%=.Q:Ia%=Ju%:|
000066a0  4f 4a 25 3d a4 56 3a e8  23 77 25 2c 71 75 25 2c  |OJ%=.V:.#w%,qu%,|
000066b0  5f 4a 25 3a e8 23 77 25  2c 65 4a 25 2c 65 75 25  |_J%:.#w%,eJ%,eu%|
000066c0  2c 67 6c 25 2c 73 75 25  2c 6e 6c 25 3a 62 5f 25  |,gl%,su%,nl%:b_%|
000066d0  3d a4 51 3a 4a 4a 25 3d  a4 51 3a e8 23 77 25 2c  |=.Q:JJ%=.Q:.#w%,|
000066e0  75 25 2c 6b 25 3a e3 41  25 3d 30 b8 36 3a 50 25  |u%,k%:.A%=0.6:P%|
000066f0  28 41 25 29 3d a4 56 3a  ed 3a e3 41 25 3d 30 b8  |(A%)=.V:.:.A%=0.|
00006700  32 3a 48 25 28 41 25 29  3d a4 56 3a ed 0d 02 10  |2:H%(A%)=.V:....|
00006710  b0 e3 41 25 3d 31 b8 42  5f 25 3a 5a 25 28 41 25  |..A%=1.B_%:Z%(A%|
00006720  29 3d a4 56 3a 44 25 28  41 25 29 3d a4 56 3a 49  |)=.V:D%(A%)=.V:I|
00006730  25 28 41 25 29 3d a4 56  3a ed 3a 4e 24 3d be 23  |%(A%)=.V:.:N$=.#|
00006740  77 25 3a 49 75 25 3d a4  51 3a 47 75 25 3d a4 51  |w%:Iu%=.Q:Gu%=.Q|
00006750  3a e8 23 77 25 2c 21 4b  79 25 3a 79 75 25 3d a4  |:.#w%,!Ky%:yu%=.|
00006760  56 3a 72 75 25 3d a4 56  3a 77 75 25 3d a4 56 3a  |V:ru%=.V:wu%=.V:|
00006770  f5 f2 47 4a 28 be 23 77  25 2c 77 25 29 3a fd c5  |..GJ(.#w%,w%):..|
00006780  23 77 25 3a d9 23 77 25  3a 77 25 3d 30 3a f7 85  |#w%:.#w%:w%=0:..|
00006790  3a 42 75 25 3d 28 a4 78  28 5f 4a 25 29 3c 3e a4  |:Bu%=(.x(_J%)<>.|
000067a0  78 28 a4 59 29 29 3a e7  46 75 25 8c 44 24 3d a4  |x(.Y)):.Fu%.D$=.|
000067b0  41 28 22 59 6f 75 72 6e  61 6d 65 22 29 0d 02 11  |A("Yourname")...|
000067c0  19 75 25 3d a4 66 28 75  25 29 3a 6b 25 3d a4 66  |.u%=.f(u%):k%=.f|
000067d0  28 6b 25 29 3a e1 0d 02  12 f2 dd f2 57 5f 3a ea  |(k%):.......W_:.|
000067e0  41 25 3a 77 25 3d ae 28  50 24 2b 22 2e 44 61 74  |A%:w%=.(P$+".Dat|
000067f0  61 2e 53 65 74 74 69 6e  67 73 22 29 3a d5 23 77  |a.Settings"):.#w|
00006800  25 2c 54 24 3a d5 23 77  25 2c 50 24 3a d5 23 77  |%,T$:.#w%,P$:.#w|
00006810  25 2c 44 24 3a f2 4a 28  78 5f 25 29 3a f2 4a 28  |%,D$:.J(x_%):.J(|
00006820  69 75 25 29 3a f2 4a 28  4f 79 25 29 3a f2 4a 28  |iu%):.J(Oy%):.J(|
00006830  66 5f 25 29 3a f2 4a 28  5a 75 25 29 3a f2 4a 28  |f_%):.J(Zu%):.J(|
00006840  42 5f 25 29 3a f2 4a 28  74 25 29 3a f2 4a 28 62  |B_%):.J(t%):.J(b|
00006850  75 25 29 3a f2 4a 28 53  75 25 29 3a f2 4a 28 78  |u%):.J(Su%):.J(x|
00006860  4a 25 29 3a f2 4a 28 4a  75 25 29 3a f2 4a 28 4f  |J%):.J(Ju%):.J(O|
00006870  4a 25 29 3a f1 23 77 25  2c 71 75 25 2c a4 59 3a  |J%):.#w%,qu%,.Y:|
00006880  f1 23 77 25 2c 65 4a 25  2c 65 75 25 2c 67 6c 25  |.#w%,eJ%,eu%,gl%|
00006890  2c 73 75 25 2c 6e 6c 25  3a f2 4a 28 62 5f 25 29  |,su%,nl%:.J(b_%)|
000068a0  3a f2 4a 28 4a 4a 25 29  3a f1 23 77 25 2c 75 25  |:.J(JJ%):.#w%,u%|
000068b0  2c 6b 25 3a e3 41 25 3d  30 b8 36 3a f2 4a 28 50  |,k%:.A%=0.6:.J(P|
000068c0  25 28 41 25 29 29 3a ed  0d 02 13 93 e3 41 25 3d  |%(A%)):......A%=|
000068d0  30 b8 32 3a f2 4a 28 48  25 28 41 25 29 29 3a ed  |0.2:.J(H%(A%)):.|
000068e0  3a e3 41 25 3d 31 b8 42  5f 25 3a f2 4a 28 5a 25  |:.A%=1.B_%:.J(Z%|
000068f0  28 41 25 29 29 3a f2 4a  28 44 25 28 41 25 29 29  |(A%)):.J(D%(A%))|
00006900  3a f2 4a 28 49 25 28 41  25 29 29 3a ed 3a d5 23  |:.J(I%(A%)):.:.#|
00006910  77 25 2c 4e 24 3a f2 4a  28 49 75 25 29 3a f2 4a  |w%,N$:.J(Iu%):.J|
00006920  28 47 75 25 29 3a f1 23  77 25 2c 21 4b 79 25 3a  |(Gu%):.#w%,!Ky%:|
00006930  f2 4a 28 79 75 25 29 3a  f2 4a 28 72 75 25 29 3a  |.J(yu%):.J(ru%):|
00006940  f2 4a 28 77 75 25 29 3a  f2 71 75 28 77 25 29 3a  |.J(wu%):.qu(w%):|
00006950  d9 23 77 25 3a 77 25 3d  30 3a e1 0d 02 14 18 dd  |.#w%:w%=0:......|
00006960  f2 50 79 3a f2 57 5f 3a  f2 73 75 3a 76 79 25 3d  |.Py:.W_:.su:vy%=|
00006970  a3 3a e1 0d 02 15 e7 dd  f2 60 79 3a 3a 3a 57 5f  |.:.......`y:::W_|
00006980  25 3d a3 3a 42 75 25 3d  30 3a 4f 79 25 3d 31 2b  |%=.:Bu%=0:Oy%=1+|
00006990  32 2b 34 3a 4e 24 3d 22  25 7a 31 32 3a 25 6d 69  |2+4:N$="%z12:%mi|
000069a0  3a 25 73 65 20 25 61 6d  22 3a 48 25 28 29 3d 32  |:%se %am":H%()=2|
000069b0  2c 32 2c 37 3a 78 5f 25  3d a3 3a 66 5f 25 3d a3  |,2,7:x_%=.:f_%=.|
000069c0  3a 53 75 25 3d b9 3a 5a  75 25 3d b9 3a 4d 4a 25  |:Su%=.:Zu%=.:MJ%|
000069d0  3d 30 3a 3a 3a 3a 3a 3a  4a 75 25 3d a3 3a 62 5f  |=0::::::Ju%=.:b_|
000069e0  25 3d b9 3a 42 5f 25 3d  34 3a 49 25 28 29 3d 37  |%=.:B_%=4:I%()=7|
000069f0  3a 44 25 28 29 3d 30 2c  26 42 2c 26 41 2c 26 46  |:D%()=0,&B,&A,&F|
00006a00  2c 39 2c 26 45 3a 50 25  28 29 3d 30 2c 26 46 2c  |,9,&E:P%()=0,&F,|
00006a10  38 2c 26 42 2c 34 2c 34  2c 26 42 3a 69 75 25 3d  |8,&B,4,4,&B:iu%=|
00006a20  a3 3a 65 4a 25 3d 2d 31  3a 65 75 25 3d 30 3a 73  |.:eJ%=-1:eu%=0:s|
00006a30  75 25 3d 30 3a 67 6c 25  3d 30 3a 6e 6c 25 3d 30  |u%=0:gl%=0:nl%=0|
00006a40  3a 4a 4a 25 3d a3 3a 74  25 3d 32 3a 5a 25 28 29  |:JJ%=.:t%=2:Z%()|
00006a50  3d 30 2c 31 2c 33 2c 35  2c 32 0d 02 16 91 62 75  |=0,1,3,5,2....bu|
00006a60  25 3d b9 3a 44 24 3d 22  43 68 72 69 73 20 4d 6f  |%=.:D$="Chris Mo|
00006a70  72 69 73 6f 6e 22 3a 78  4a 25 3d a3 3a 5a 75 25  |rison":xJ%=.:Zu%|
00006a80  3d a3 3a 4a 5f 25 3d a3  3a 3a 3a 3a 3a 3a 75 25  |=.:J_%=.::::::u%|
00006a90  3d 35 30 30 3a 6b 25 3d  39 32 30 3a 77 75 25 3d  |=500:k%=920:wu%=|
00006aa0  30 3a 3a 3a 3a 3a 3a 3a  4f 4a 25 3d 38 3a 71 75  |0:::::::OJ%=8:qu|
00006ab0  25 3d 26 45 37 3a 79 75  25 3d 26 42 3a 72 75 25  |%=&E7:yu%=&B:ru%|
00006ac0  3d 35 3a 3a 3a 3a 42 75  25 3d a3 3a 5f 4a 25 3d  |=5::::Bu%=.:_J%=|
00006ad0  30 3a 3a 47 75 25 3d a3  3a 49 75 25 3d b9 3a 21  |0::Gu%=.:Iu%=.:!|
00006ae0  4b 79 25 3d 37 31 34 33  31 3a e1 0d 02 17 37 dd  |Ky%=71431:....7.|
00006af0  a4 6f 79 3a ea 44 6c 25  2c 78 2c 4e 4a 25 3a 44  |.oy:.Dl%,x,NJ%:D|
00006b00  6c 25 3d a4 63 3a 44 69  25 3d 4b 79 25 3f 31 3a  |l%=.c:Di%=Ky%?1:|
00006b10  4e 4a 25 3d 3f 4b 79 25  3a e7 4e 4a 25 3c 44 69  |NJ%=?Ky%:.NJ%<Di|
00006b20  25 8c 0d 02 18 15 e7 44  6c 25 3c 3d 4e 4a 25 8c  |%......Dl%<=NJ%.|
00006b30  44 6c 25 2b 3d 32 34 0d  02 19 0b 4e 4a 25 2b 3d  |Dl%+=24....NJ%+=|
00006b40  32 34 0d 02 1a 48 cd 3a  3d 28 28 28 4b 79 25 3f  |24...H.:=(((Ky%?|
00006b50  32 3d 31 29 80 28 28 44  6c 25 3c 44 69 25 29 84  |2=1).((Dl%<Di%).|
00006b60  28 44 6c 25 3e 3d 4e 4a  25 29 29 29 84 28 4b 79  |(Dl%>=NJ%))).(Ky|
00006b70  25 3f 33 3d 30 29 29 80  ac 28 4b 79 25 3f 33 3d  |%?3=0))..(Ky%?3=|
00006b80  31 80 4b 79 25 3f 32 3d  30 29 0d 02 1b 12 dd a4  |1.Ky%?2=0)......|
00006b90  51 3d 28 9a 23 77 25 3d  26 46 46 29 0d 02 1c 14  |Q=(.#w%=&FF)....|
00006ba0  dd f2 4a 28 41 25 29 d5  23 77 25 2c 41 25 3a e1  |..J(A%).#w%,A%:.|
00006bb0  0d 02 1d 0c dd a4 56 3d  9a 23 77 25 0d 02 1e 36  |......V=.#w%...6|
00006bc0  dd f2 68 3a ea 42 25 2c  48 25 2c 78 69 25 2c 73  |..h:.B%,H%,xi%,s|
00006bd0  25 3a 78 69 25 3d 6a 5f  25 3a 49 5f 25 3d 30 3a  |%:xi%=j_%:I_%=0:|
00006be0  e7 4d 4a 25 3e 30 8c 42  25 3d 38 8b 42 25 3d 4f  |.MJ%>0.B%=8.B%=O|
00006bf0  79 25 0d 02 1f 11 c8 8e  42 25 80 ac 28 32 2b 31  |y%......B%..(2+1|
00006c00  36 29 ca 0d 02 20 0d c9  31 2c 38 3a c8 8e b9 ca  |6)... ..1,8:....|
00006c10  0d 02 21 16 c9 42 25 3d  31 3a 49 5f 25 3d 36 2d  |..!..B%=1:I_%=6-|
00006c20  33 2a ac 66 5f 25 0d 02  22 16 c9 42 25 3d 33 3a  |3*.f_%.."..B%=3:|
00006c30  49 5f 25 3d 39 2d 33 2a  ac 66 5f 25 0d 02 23 1c  |I_%=9-3*.f_%..#.|
00006c40  c9 28 42 25 80 38 29 3e  30 3a 49 5f 25 3d 39 3a  |.(B%.8)>0:I_%=9:|
00006c50  24 44 4a 25 3d a4 55 79  0d 02 24 1d c9 28 42 25  |$DJ%=.Uy..$..(B%|
00006c60  80 31 36 29 3e 30 3a 49  5f 25 3d a9 a4 5a 79 28  |.16)>0:I_%=..Zy(|
00006c70  4e 24 29 2b 33 0d 02 25  5f cb 3a 49 5f 25 3d 49  |N$)+3..%_.:I_%=I|
00006c80  5f 25 2a 31 36 3a 50 75  25 3d 36 38 3a 4a 25 21  |_%*16:Pu%=68:J%!|
00006c90  38 3d 30 3a 4a 25 21 26  43 3d 49 5f 25 3a 4a 25  |8=0:J%!&C=I_%:J%|
00006ca0  21 31 36 3d 50 75 25 3a  4a 25 21 32 30 3d 26 32  |!16=Pu%:J%!20=&2|
00006cb0  37 30 30 33 31 33 44 3a  4a 25 21 32 34 3d 44 4a  |700313D:J%!24=DJ|
00006cc0  25 3a 4a 25 21 32 38 3d  58 61 25 3a 4a 25 21 33  |%:J%!28=Xa%:J%!3|
00006cd0  32 3d 33 32 0d 02 26 6a  c9 31 2b 34 3a 49 5f 25  |2=32..&j.1+4:I_%|
00006ce0  3d 26 37 34 3a 50 75 25  3d 26 37 38 3a 4a 25 21  |=&74:Pu%=&78:J%!|
00006cf0  38 3d 2d 31 36 3a 4a 25  21 26 43 3d 49 5f 25 3a  |8=-16:J%!&C=I_%:|
00006d00  4a 25 21 31 36 3d 50 75  25 3a 24 44 4a 25 3d 22  |J%!16=Pu%:$DJ%="|
00006d10  63 6c 6f 63 6b 22 3a 4a  25 21 32 30 3d 26 33 31  |clock":J%!20=&31|
00006d20  30 32 3a 4a 25 21 32 34  3d 44 4a 25 3a 4a 25 21  |02:J%!24=DJ%:J%!|
00006d30  32 38 3d 68 25 3a 4a 25  21 33 32 3d 33 32 0d 02  |28=h%:J%!32=32..|
00006d40  27 4e 7f 3a 49 5f 25 3d  36 38 3a 50 75 25 3d 36  |'N.:I_%=68:Pu%=6|
00006d50  38 3a 4a 25 21 38 3d 30  3a 4a 25 21 26 43 3d 36  |8:J%!8=0:J%!&C=6|
00006d60  38 3a 4a 25 21 31 36 3d  36 38 3a 4a 25 21 32 30  |8:J%!16=68:J%!20|
00006d70  3d 26 33 30 30 32 3a 24  28 4a 25 2b 32 34 29 3d  |=&3002:$(J%+24)=|
00006d80  22 21 4f 72 67 61 6e 69  73 65 72 22 0d 02 28 31  |"!Organiser"..(1|
00006d90  cb 3a e7 6a 5f 25 3c 3e  2d 31 80 ac 62 5f 25 8c  |.:.j_%<>-1..b_%.|
00006da0  21 4a 25 3d 2d 33 3a 73  25 3d 6a 5f 25 8b 21 4a  |!J%=-3:s%=j_%.!J|
00006db0  25 3d 2d 31 2d 94 28 37  2a 62 5f 25 29 0d 02 29  |%=-1-.(7*b_%)..)|
00006dc0  43 4a 25 21 34 3d 30 3a  c8 99 26 34 30 30 43 32  |CJ%!4=0:..&400C2|
00006dd0  2c 73 25 2c 4a 25 b8 6a  5f 25 3a e7 78 69 25 3c  |,s%,J%.j_%:.xi%<|
00006de0  3e 2d 31 8c 21 4a 25 3d  2d 31 3a 4a 25 21 34 3d  |>-1.!J%=-1:J%!4=|
00006df0  78 69 25 3a c8 99 26 34  30 30 43 34 2c 2c 4a 25  |xi%:..&400C4,,J%|
00006e00  0d 02 2a 11 e7 28 42 25  80 34 29 3d 34 8c f2 50  |..*..(B%.4)=4..P|
00006e10  5f 0d 02 2b 16 f2 46 79  28 2d 31 2c 6a 5f 25 2c  |_..+..Fy(-1,j_%,|
00006e20  48 25 28 29 29 3a e1 0d  02 2c 37 dd f2 46 79 28  |H%()):...,7..Fy(|
00006e30  71 25 2c 67 79 25 2c 4b  25 28 29 29 3a ea 67 5f  |q%,gy%,K%()):.g_|
00006e40  25 2c 41 25 3a 67 5f 25  3d a4 41 5f 28 71 25 2c  |%,A%:g_%=.A_(q%,|
00006e50  67 79 25 29 3a e7 67 5f  25 3c 3e 2d 31 8c 0d 02  |gy%):.g_%<>-1...|
00006e60  2d 71 41 25 3d a7 a4 4e  28 67 5f 25 29 2c 22 52  |-qA%=..N(g_%),"R|
00006e70  22 29 3a 67 5f 25 3f 41  25 3d 97 c3 4b 25 28 30  |"):g_%?A%=..K%(0|
00006e80  29 3a f2 44 28 71 25 2c  67 79 25 2c 4b 25 28 32  |):.D(q%,gy%,K%(2|
00006e90  29 29 3a f2 67 28 71 25  2c 67 79 25 2c 4b 25 28  |)):.g(q%,gy%,K%(|
00006ea0  31 29 29 3a 21 4a 25 3d  71 25 3a 4a 25 21 34 3d  |1)):!J%=q%:J%!4=|
00006eb0  67 79 25 3a 4a 25 21 38  3d 30 3a 4a 25 21 26 43  |gy%:J%!8=0:J%!&C|
00006ec0  3d 30 3a c8 99 26 34 30  30 43 44 2c 2c 4a 25 0d  |=0:..&400CD,,J%.|
00006ed0  02 2e 07 cd 3a e1 0d 02  2f f3 dd f2 6a 75 3a ea  |....:.../...ju:.|
00006ee0  41 25 2c 48 79 25 3a de  41 25 28 36 29 3a 54 79  |A%,Hy%:.A%(6):Ty|
00006ef0  25 3d 30 3a f2 6a 4a 3a  41 6c 25 3d a4 57 28 22  |%=0:.jJ:Al%=.W("|
00006f00  49 6e 66 6f 22 2c 48 79  25 29 3a 69 25 3d a4 57  |Info",Hy%):i%=.W|
00006f10  28 22 4d 61 69 6e 22 2c  48 79 25 29 3a 6b 69 25  |("Main",Hy%):ki%|
00006f20  3d 48 79 25 3a 43 79 25  3d a4 57 28 22 41 64 64  |=Hy%:Cy%=.W("Add|
00006f30  72 65 73 73 65 73 22 2c  48 79 25 29 3a 5f 5f 25  |resses",Hy%):__%|
00006f40  3d a4 57 28 22 49 6d 70  6f 72 74 61 6e 74 22 2c  |=.W("Important",|
00006f50  48 79 25 29 3a 4d 75 25  3d a4 57 28 22 42 61 6e  |Hy%):Mu%=.W("Ban|
00006f60  6e 65 72 22 2c 48 79 25  29 3a 73 79 25 3d a4 57  |ner",Hy%):sy%=.W|
00006f70  28 22 47 65 74 44 61 74  65 22 2c 48 79 25 29 3a  |("GetDate",Hy%):|
00006f80  54 5f 25 3d a4 57 28 22  53 65 74 75 70 22 2c 48  |T_%=.W("Setup",H|
00006f90  79 25 29 3a 66 25 3d a4  57 28 22 41 6c 61 72 6d  |y%):f%=.W("Alarm|
00006fa0  53 65 74 22 2c 48 79 25  29 3a 4b 6c 25 3d 48 79  |Set",Hy%):Kl%=Hy|
00006fb0  25 3a 52 79 25 3d a4 57  28 22 41 6c 61 72 6d 57  |%:Ry%=.W("AlarmW|
00006fc0  61 72 6e 22 2c 48 79 25  29 0d 02 30 dc 5f 79 25  |arn",Hy%)..0._y%|
00006fd0  3d a4 57 28 22 41 6e 6e  69 22 2c 48 79 25 29 3a  |=.W("Anni",Hy%):|
00006fe0  5f 61 25 3d 48 79 25 3a  47 4a 25 3d a4 57 28 22  |_a%=Hy%:GJ%=.W("|
00006ff0  41 6e 6e 69 4e 6f 74 69  66 79 22 2c 48 79 25 29  |AnniNotify",Hy%)|
00007000  3a 41 25 28 31 29 3d a4  57 28 22 53 65 74 47 65  |:A%(1)=.W("SetGe|
00007010  6e 22 2c 48 79 25 29 3a  41 25 28 32 29 3d a4 57  |n",Hy%):A%(2)=.W|
00007020  28 22 53 65 74 41 64 64  22 2c 48 79 25 29 3a 41  |("SetAdd",Hy%):A|
00007030  25 28 33 29 3d a4 57 28  22 53 65 74 41 6e 6e 22  |%(3)=.W("SetAnn"|
00007040  2c 48 79 25 29 3a 41 25  28 34 29 3d a4 57 28 22  |,Hy%):A%(4)=.W("|
00007050  53 65 74 43 61 6c 22 2c  48 79 25 29 3a 41 25 28  |SetCal",Hy%):A%(|
00007060  35 29 3d a4 57 28 22 53  65 74 44 69 61 22 2c 48  |5)=.W("SetDia",H|
00007070  79 25 29 3a 41 25 28 36  29 3d a4 57 28 22 53 65  |y%):A%(6)=.W("Se|
00007080  74 43 6f 6c 6f 75 72 73  22 2c 48 79 25 29 3a 4a  |tColours",Hy%):J|
00007090  79 25 3d a4 57 28 22 53  65 74 43 6c 6f 63 6b 22  |y%=.W("SetClock"|
000070a0  2c 48 79 25 29 0d 02 31  b3 f2 41 28 41 6c 25 2c  |,Hy%)..1..A(Al%,|
000070b0  33 2c 54 24 29 3a f2 41  28 41 6c 25 2c 30 2c a4  |3,T$):.A(Al%,0,.|
000070c0  41 28 22 54 69 74 6c 65  22 29 29 3a f2 41 28 41  |A("Title")):.A(A|
000070d0  6c 25 2c 31 2c a4 41 28  22 50 75 72 70 22 29 29  |l%,1,.A("Purp"))|
000070e0  3a f2 41 28 4d 75 25 2c  33 2c a4 41 28 22 56 65  |:.A(Mu%,3,.A("Ve|
000070f0  72 73 22 29 2b 22 20 22  2b 54 24 29 3a f2 41 28  |rs")+" "+T$):.A(|
00007100  4d 75 25 2c 36 2c 22 a9  20 43 68 72 69 73 20 4d  |Mu%,6,". Chris M|
00007110  6f 72 69 73 6f 6e 20 31  39 22 2b c1 54 24 2c a7  |orison 19"+.T$,.|
00007120  54 24 2c 22 29 22 29 2d  32 2c 32 29 29 3a f2 41  |T$,")")-2,2)):.A|
00007130  28 4d 75 25 2c 34 2c 44  24 29 3a e3 41 25 3d 31  |(Mu%,4,D$):.A%=1|
00007140  b8 33 31 3a f2 41 28 73  79 25 2c 41 25 2b 33 2c  |.31:.A(sy%,A%+3,|
00007150  c3 41 25 29 3a ed 3a e1  0d 02 32 4b dd a4 57 28  |.A%):.:...2K..W(|
00007160  4c 24 2c f8 48 79 25 29  3a ea 48 25 2c 53 25 2c  |L$,.Hy%):.H%,S%,|
00007170  49 25 2c 50 25 2c 68 79  25 2c 67 5f 25 3a c8 99  |I%,P%,hy%,g_%:..|
00007180  26 34 30 30 44 42 2c 2c  2c 30 2c 30 2c 30 2c 4c  |&400DB,,,0,0,0,L|
00007190  24 2c 30 b8 2c 53 25 2c  49 25 3a e7 53 25 3e 35  |$,0.,S%,I%:.S%>5|
000071a0  31 32 8c 0d 02 33 33 c8  99 26 32 30 30 31 45 2c  |12...33..&2001E,|
000071b0  36 2c 2c 2c 53 25 b8 2c  2c 50 25 3b 68 79 25 3a  |6,,,S%.,,P%;hy%:|
000071c0  e7 68 79 25 80 31 8c 85  32 2c a4 41 28 22 45 72  |.hy%.1..2,.A("Er|
000071d0  72 57 69 6e 22 29 0d 02  34 0a cc 50 25 3d 4b 25  |rWin")..4..P%=K%|
000071e0  0d 02 35 3f cd 3a de 67  5f 25 49 25 3a c8 99 26  |..5?.:.g_%I%:..&|
000071f0  34 30 30 44 42 2c 2c 50  25 2c 67 5f 25 2c 67 5f  |400DB,,P%,g_%,g_|
00007200  25 2b 49 25 2c 76 6c 25  2c 4c 24 2c 30 b8 2c 2c  |%+I%,vl%,L$,0.,,|
00007210  67 5f 25 3a e7 4c 24 3d  22 4d 61 69 6e 22 8c 0d  |g_%:.L$="Main"..|
00007220  02 36 3e 50 25 21 36 38  3d 26 36 34 2b 28 26 36  |.6>P%!68=&64+(&6|
00007230  34 3c 3c 31 36 29 3a 50  25 21 30 3d 30 3a 50 25  |4<<16):P%!0=0:P%|
00007240  21 34 3d 30 3a 50 25 21  38 3d 61 79 25 3a 50 25  |!4=0:P%!8=ay%:P%|
00007250  21 26 43 3d 55 79 25 3a  e7 4a 4a 25 8c 0d 02 37  |!&C=Uy%:.JJ%...7|
00007260  2a 50 25 21 34 38 3d a4  67 3a 50 25 21 34 34 3d  |*P%!48=.g:P%!44=|
00007270  2d a4 64 3a 50 25 21 32  38 3d 50 25 21 32 38 84  |-.d:P%!28=P%!28.|
00007280  28 33 3c 3c 32 39 29 0d  02 38 2e cc 50 25 21 34  |(3<<29)..8..P%!4|
00007290  38 3d 61 79 25 3a 50 25  21 34 34 3d 2d 55 79 25  |8=ay%:P%!44=-Uy%|
000072a0  3a 50 25 21 32 38 3d 50  25 21 32 38 80 ac 28 33  |:P%!28=P%!28..(3|
000072b0  3c 3c 32 39 29 0d 02 39  05 cd 0d 02 3a 18 cc 3a  |<<29)..9....:..:|
000072c0  e7 4c 24 3d 22 53 65 74  75 70 22 8c 76 61 25 3d  |.L$="Setup".va%=|
000072d0  53 25 0d 02 3b 1a e7 4c  24 3d 22 41 64 64 72 65  |S%..;..L$="Addre|
000072e0  73 73 65 73 22 8c 6c 69  25 3d 53 25 0d 02 3c 20  |sses".li%=S%..< |
000072f0  cd 3a e7 ac 4a 75 25 80  4c 24 3c 3e 22 42 61 6e  |.:..Ju%.L$<>"Ban|
00007300  6e 65 72 22 8c f2 77 75  28 50 25 29 0d 02 3d 21  |ner"..wu(P%)..=!|
00007310  e7 4c 24 3d 22 41 64 64  72 65 73 73 65 73 22 8c  |.L$="Addresses".|
00007320  f2 74 79 28 50 25 21 38  34 2c 50 25 29 0d 02 3e  |.ty(P%!84,P%)..>|
00007330  3a 50 25 21 36 34 3d 68  25 3a c8 99 26 34 30 30  |:P%!64=h%:..&400|
00007340  43 31 2c 2c 50 25 b8 67  79 25 3a 48 79 25 3d 50  |C1,,P%.gy%:Hy%=P|
00007350  25 21 37 32 3a e7 53 25  3e 35 31 32 8c c8 99 33  |%!72:.S%>512...3|
00007360  30 2c 37 2c 2c 50 25 0d  02 3f 08 3d 67 79 25 0d  |0,7,,P%..?.=gy%.|
00007370  02 40 20 dd f2 7a 4a 28  68 79 25 29 3a ea 74 79  |.@ ..zJ(hy%):.ty|
00007380  25 2c 42 25 3a e7 68 79  25 3c 3e 4a 4a 25 8c 0d  |%,B%:.hy%<>JJ%..|
00007390  02 41 50 c8 99 33 30 2c  36 2c 2c 2c 34 2b 38 38  |.AP..30,6,,,4+88|
000073a0  2b 33 32 2a 32 32 b8 2c  2c 74 79 25 3a 21 74 79  |+32*22.,,ty%:!ty|
000073b0  25 3d 69 25 3a c8 99 26  34 30 30 43 43 2c 2c 74  |%=i%:..&400CC,,t|
000073c0  79 25 3a 42 25 3d 74 79  25 2b 34 3a c8 99 26 34  |y%:B%=ty%+4:..&4|
000073d0  30 30 43 33 2c 2c 74 79  25 3a e7 68 79 25 8c 0d  |00C3,,ty%:.hy%..|
000073e0  02 42 2a 42 25 21 34 38  3d a4 67 3a 42 25 21 34  |.B*B%!48=.g:B%!4|
000073f0  34 3d 2d a4 64 3a 42 25  21 32 38 3d 42 25 21 32  |4=-.d:B%!28=B%!2|
00007400  38 84 28 33 3c 3c 32 39  29 0d 02 43 2e cc 42 25  |8.(3<<29)..C..B%|
00007410  21 34 38 3d 61 79 25 3a  42 25 21 34 34 3d 2d 55  |!48=ay%:B%!44=-U|
00007420  79 25 3a 42 25 21 32 38  3d 42 25 21 32 38 80 ac  |y%:B%!28=B%!28..|
00007430  28 33 3c 3c 32 39 29 0d  02 44 35 cd 3a 42 25 3d  |(3<<29)..D5.:B%=|
00007440  69 25 3a 4a 4a 25 3d 68  79 25 3a c8 99 26 34 30  |i%:JJ%=hy%:..&40|
00007450  30 43 31 2c 2c 74 79 25  2b 34 b8 69 25 3a e7 72  |0C1,,ty%+4.i%:.r|
00007460  5f 25 3d 42 25 8c 72 5f  25 3d 69 25 0d 02 45 1e  |_%=B%.r_%=i%..E.|
00007470  e7 49 79 25 8c 21 74 79  25 3d 69 25 3a c8 99 26  |.Iy%.!ty%=i%:..&|
00007480  34 30 30 43 35 2c 2c 74  79 25 0d 02 46 0f c8 99  |400C5,,ty%..F...|
00007490  33 30 2c 37 2c 2c 74 79  25 0d 02 47 07 cd 3a e1  |30,7,,ty%..G..:.|
000074a0  0d 38 05 1e dd f2 5f 4a  28 42 6c 25 2c 53 24 29  |.8...._J(Bl%,S$)|
000074b0  3a e7 a4 51 79 28 42 6c  25 2c 53 24 29 8c 0d 38  |:..Qy(Bl%,S$)..8|
000074c0  06 58 c8 94 4b 25 21 38  2c 4b 25 21 26 43 3a 21  |.X..K%!8,K%!&C:!|
000074d0  4b 25 3d 32 35 36 3a 24  28 4b 25 2b 34 34 29 3d  |K%=256:$(K%+44)=|
000074e0  22 3c 57 69 6d 70 24 53  63 72 61 70 3e 22 2b bd  |"<Wimp$Scrap>"+.|
000074f0  30 3a 4b 25 21 33 36 3d  2d 31 3a 4b 25 21 31 36  |0:K%!36=-1:K%!16|
00007500  3d 32 3a c8 99 26 34 30  30 45 37 2c 31 37 2c 4b  |=2:..&400E7,17,K|
00007510  25 2c 4b 25 21 34 0d 38  07 07 cd 3a e1 0d 38 08  |%,K%!4.8...:..8.|
00007520  44 dd f2 56 75 28 46 25  2c 58 25 2c 59 25 29 3a  |D..Vu(F%,X%,Y%):|
00007530  46 25 3d a4 6c 79 28 4b  25 2b 33 32 2c 46 25 29  |F%=.ly(K%+32,F%)|
00007540  3a e7 46 25 3c 3e 30 80  46 25 3c 3e 2d 31 8c c8  |:.F%<>0.F%<>-1..|
00007550  99 26 34 30 30 45 38 2c  2c 46 25 2c 58 25 2c 59  |.&400E8,,F%,X%,Y|
00007560  25 0d 38 09 05 e1 0d 38  0a 37 dd f2 5a 4a 3a e7  |%.8....8.7..ZJ:.|
00007570  a4 43 79 3c 3e 2d 31 8c  4b 25 21 26 43 3d 4b 25  |.Cy<>-1.K%!&C=K%|
00007580  21 38 3a 4b 25 21 38 3d  30 3a c8 99 26 34 30 30  |!8:K%!8=0:..&400|
00007590  45 37 2c 31 39 2c 4b 25  2c 4b 25 21 34 0d 38 0b  |E7,19,K%,K%!4.8.|
000075a0  05 e1 0d 38 0c 6b dd f2  49 4a 3a ea 64 75 25 2c  |...8.k..IJ:.du%,|
000075b0  5f 25 2c 55 25 3a c8 99  26 34 30 30 43 38 2c 2c  |_%,U%:..&400C8,,|
000075c0  4b 25 b8 64 75 25 3a 5f  25 3d 4b 25 21 34 2d 4b  |K%.du%:_%=K%!4-K|
000075d0  25 21 32 30 3a 55 25 3d  4b 25 21 31 36 2d 4b 25  |%!20:U%=K%!16-K%|
000075e0  21 32 34 3a c8 95 64 75  25 3a f2 73 5f 28 21 4b  |!24:..du%:.s_(!K|
000075f0  25 2c 5f 25 2c 55 25 29  3a c8 99 26 34 30 30 43  |%,_%,U%):..&400C|
00007600  41 2c 2c 4b 25 b8 64 75  25 3a ce 3a e1 0d 38 0d  |A,,K%.du%:.:..8.|
00007610  5e dd a4 5a 5f 28 53 24  2c 45 25 29 3a ea 46 25  |^..Z_(S$,E%):.F%|
00007620  2c 41 25 2c 53 25 3a 46  25 3d 8e 53 24 3a 41 25  |,A%,S%:F%=.S$:A%|
00007630  3d a2 23 46 25 2b 34 3a  d9 23 46 25 3a 41 25 2b  |=.#F%+4:.#F%:A%+|
00007640  3d 45 25 3a de 53 25 41  25 3a 21 53 25 3d 41 25  |=E%:.S%A%:!S%=A%|
00007650  3a 53 25 21 38 3d 31 36  3a c8 99 34 36 2c 32 36  |:S%!8=16:..46,26|
00007660  36 2c 53 25 2c 53 24 3a  3d 53 25 0d 38 0e 47 dd  |6,S%,S$:=S%.8.G.|
00007670  f2 6b 28 71 25 2c 73 25  2c 63 25 2c 71 79 25 2c  |.k(q%,s%,c%,qy%,|
00007680  71 61 25 29 3a 21 4a 25  3d 71 25 3a f5 3a 73 25  |qa%):!J%=q%:.:s%|
00007690  2b 3d 63 25 3a e7 73 25  3c 71 79 25 8c 73 25 3d  |+=c%:.s%<qy%.s%=|
000076a0  71 61 25 8b e7 73 25 3e  71 61 25 8c 73 25 3d 71  |qa%..s%>qa%.s%=q|
000076b0  79 25 0d 38 0f 48 4a 25  21 34 3d 73 25 3a c8 99  |y%.8.HJ%!4=s%:..|
000076c0  26 34 30 30 43 45 2c 2c  4a 25 3a fd 28 4a 25 21  |&400CE,,J%:.(J%!|
000076d0  28 38 2b 31 36 29 3e 3e  26 43 29 80 26 46 3d 26  |(8+16)>>&C).&F=&|
000076e0  46 3a e7 63 25 3d 31 8c  63 25 3d 30 8b 63 25 3d  |F:.c%=1.c%=0.c%=|
000076f0  a9 a4 4d 28 71 25 2c 73  25 29 0d 38 10 1c c8 99  |..M(q%,s%).8....|
00007700  26 34 30 30 44 32 2c 71  25 2c 73 25 2c 2c 2c 2d  |&400D2,q%,s%,,,-|
00007710  31 2c 63 25 3a e1 0d 38  11 23 dd a4 75 28 71 25  |1,c%:..8.#..u(q%|
00007720  2c 73 25 29 3a ea 6f 5f  25 2c 60 5f 25 3a e7 a4  |,s%):.o_%,`_%:..|
00007730  79 28 71 25 2c 73 25 29  8c 0d 38 12 16 f2 62 79  |y(q%,s%)..8...by|
00007740  28 71 25 2c 73 25 2c 60  5f 25 2c 6f 5f 25 29 0d  |(q%,s%,`_%,o_%).|
00007750  38 13 33 cc 21 4a 25 3d  71 25 3a 4a 25 21 34 3d  |8.3.!J%=q%:J%!4=|
00007760  73 25 3a c8 99 26 34 30  30 43 45 2c 2c 4a 25 3a  |s%:..&400CE,,J%:|
00007770  6f 5f 25 3d 28 4a 25 21  32 34 3e 3e 32 38 29 80  |o_%=(J%!24>>28).|
00007780  26 46 0d 38 14 0a cd 3a  3d 6f 5f 25 0d 38 15 1e  |&F.8...:=o_%.8..|
00007790  dd f2 67 28 71 25 2c 73  25 2c 6f 5f 25 29 3a e7  |..g(q%,s%,o_%):.|
000077a0  a4 79 28 71 25 2c 73 25  29 8c 0d 38 16 15 f2 73  |.y(q%,s%)..8...s|
000077b0  79 28 71 25 2c 73 25 2c  2d 31 2c 6f 5f 25 29 0d  |y(q%,s%,-1,o_%).|
000077c0  38 17 3a cc 21 4a 25 3d  71 25 3a 4a 25 21 34 3d  |8.:.!J%=q%:J%!4=|
000077d0  73 25 3a 4a 25 21 26 43  3d 26 46 3c 3c 32 38 3a  |s%:J%!&C=&F<<28:|
000077e0  4a 25 21 38 3d 6f 5f 25  3c 3c 32 38 3a c8 99 26  |J%!8=o_%<<28:..&|
000077f0  34 30 30 43 44 2c 2c 4a  25 0d 38 18 07 cd 3a e1  |400CD,,J%.8...:.|
00007800  0d 38 19 3e dd a4 79 28  71 25 2c 73 25 29 3a 21  |.8.>..y(q%,s%):!|
00007810  4a 25 3d 71 25 3a 4a 25  21 34 3d 73 25 3a c8 99  |J%=q%:J%!4=s%:..|
00007820  26 34 30 30 43 45 2c 2c  4a 25 3a 3d 28 28 4a 25  |&400CE,,J%:=((J%|
00007830  21 32 34 29 80 28 31 3c  3c 36 29 29 3e 30 0d 38  |!24).(1<<6))>0.8|
00007840  1a 57 dd f2 73 79 28 71  25 2c 73 25 2c 60 5f 25  |.W..sy(q%,s%,`_%|
00007850  2c 6f 5f 25 29 3a ea 50  25 2c 41 25 3a 21 4a 25  |,o_%):.P%,A%:!J%|
00007860  3d 71 25 3a 4a 25 21 34  3d 73 25 3a c8 99 26 34  |=q%:J%!4=s%:..&4|
00007870  30 30 43 45 2c 2c 4a 25  3a 50 25 3d 4a 25 21 33  |00CE,,J%:P%=J%!3|
00007880  32 3a 41 25 3d a7 24 50  25 2c 22 46 22 29 3a e7  |2:A%=.$P%,"F"):.|
00007890  41 25 3e 30 8c 0d 38 1b  1e e7 60 5f 25 3c 3e 2d  |A%>0..8...`_%<>-|
000078a0  31 8c 3f 28 50 25 2b 41  25 2b 31 29 3d 97 c3 7e  |1.?(P%+A%+1)=..~|
000078b0  60 5f 25 0d 38 1c 1c e7  6f 5f 25 3c 3e 2d 31 8c  |`_%.8...o_%<>-1.|
000078c0  3f 28 50 25 2b 41 25 29  3d 97 c3 7e 6f 5f 25 0d  |?(P%+A%)=..~o_%.|
000078d0  38 1d 1f 4a 25 21 38 3d  30 3a 4a 25 21 26 43 3d  |8..J%!8=0:J%!&C=|
000078e0  30 3a c8 99 26 34 30 30  43 44 2c 2c 4a 25 0d 38  |0:..&400CD,,J%.8|
000078f0  1e 07 cd 3a e1 0d 38 1f  92 dd f2 62 79 28 71 25  |...:..8....by(q%|
00007900  2c 73 25 2c f8 60 5f 25  2c f8 6f 5f 25 29 3a ea  |,s%,.`_%,.o_%):.|
00007910  50 25 2c 41 25 3a 21 4a  25 3d 71 25 3a 4a 25 21  |P%,A%:!J%=q%:J%!|
00007920  34 3d 73 25 3a c8 99 26  34 30 30 43 45 2c 2c 4a  |4=s%:..&400CE,,J|
00007930  25 3a 50 25 3d 4a 25 21  33 32 3a 41 25 3d a7 24  |%:P%=J%!32:A%=.$|
00007940  50 25 2c 22 46 22 29 3a  60 5f 25 3d 2d 31 3a 6f  |P%,"F"):`_%=-1:o|
00007950  5f 25 3d 2d 31 3a e7 41  25 3e 30 8c 60 5f 25 3d  |_%=-1:.A%>0.`_%=|
00007960  a0 28 22 26 22 2b bd 3f  28 50 25 2b 41 25 2b 31  |.("&"+.?(P%+A%+1|
00007970  29 29 3a 6f 5f 25 3d a0  28 22 26 22 2b bd 3f 28  |)):o_%=.("&"+.?(|
00007980  50 25 2b 41 25 29 29 0d  38 20 05 e1 0d 38 21 23  |P%+A%)).8 ...8!#|
00007990  dd a4 5f 28 71 25 2c 73  25 29 3a ea 6f 5f 25 2c  |.._(q%,s%):.o_%,|
000079a0  60 5f 25 3a e7 a4 79 28  71 25 2c 73 25 29 8c 0d  |`_%:..y(q%,s%)..|
000079b0  38 22 16 f2 62 79 28 71  25 2c 73 25 2c 60 5f 25  |8"..by(q%,s%,`_%|
000079c0  2c 6f 5f 25 29 0d 38 23  33 cc 21 4a 25 3d 71 25  |,o_%).8#3.!J%=q%|
000079d0  3a 4a 25 21 34 3d 73 25  3a c8 99 26 34 30 30 43  |:J%!4=s%:..&400C|
000079e0  45 2c 2c 4a 25 3a 60 5f  25 3d 28 4a 25 21 32 34  |E,,J%:`_%=(J%!24|
000079f0  3e 3e 32 34 29 80 26 46  0d 38 24 0a cd 3a 3d 60  |>>24).&F.8$..:=`|
00007a00  5f 25 0d 38 25 1e dd f2  44 28 71 25 2c 73 25 2c  |_%.8%...D(q%,s%,|
00007a10  60 5f 25 29 3a e7 a4 79  28 71 25 2c 73 25 29 8c  |`_%):..y(q%,s%).|
00007a20  0d 38 26 15 f2 73 79 28  71 25 2c 73 25 2c 60 5f  |.8&..sy(q%,s%,`_|
00007a30  25 2c 2d 31 29 0d 38 27  3a cc 21 4a 25 3d 71 25  |%,-1).8':.!J%=q%|
00007a40  3a 4a 25 21 34 3d 73 25  3a 4a 25 21 26 43 3d 26  |:J%!4=s%:J%!&C=&|
00007a50  46 3c 3c 32 34 3a 4a 25  21 38 3d 60 5f 25 3c 3c  |F<<24:J%!8=`_%<<|
00007a60  32 34 3a c8 99 26 34 30  30 43 44 2c 2c 4a 25 0d  |24:..&400CD,,J%.|
00007a70  38 28 07 cd 3a e1 0d 38  29 42 dd f2 52 28 71 25  |8(..:..8)B..R(q%|
00007a80  2c 73 25 2c 68 79 25 29  3a ea 6c 25 3a 6c 25 3d  |,s%,hy%):.l%:l%=|
00007a90  4a 25 2b 36 34 3a e7 68  79 25 3d 31 8c 21 4a 25  |J%+64:.hy%=1.!J%|
00007aa0  3d 71 25 3a 4a 25 21 34  3d 73 25 3a c8 99 26 34  |=q%:J%!4=s%:..&4|
00007ab0  30 30 43 45 2c 2c 4a 25  0d 38 2a 65 21 6c 25 3d  |00CE,,J%.8*e!l%=|
00007ac0  71 25 3a 6c 25 21 34 3d  73 25 3a 6c 25 21 38 3d  |q%:l%!4=s%:l%!8=|
00007ad0  28 94 68 79 25 29 3c 3c  32 33 3a 6c 25 21 26 43  |(.hy%)<<23:l%!&C|
00007ae0  3d 31 3c 3c 32 33 3a c8  99 26 34 30 30 43 44 2c  |=1<<23:..&400CD,|
00007af0  2c 6c 25 3a e7 68 79 25  3d 31 8c c8 99 26 34 30  |,l%:.hy%=1...&40|
00007b00  30 44 31 2c 71 25 2c 4a  25 21 38 2c 4a 25 21 26  |0D1,q%,J%!8,J%!&|
00007b10  43 2c 4a 25 21 31 36 2c  4a 25 21 32 30 0d 38 2b  |C,J%!16,J%!20.8+|
00007b20  05 e1 0d 38 2c 4d dd a4  41 5f 28 71 25 2c 73 25  |...8,M..A_(q%,s%|
00007b30  29 3a ea 41 25 3a 21 4a  25 3d 71 25 3a 4a 25 21  |):.A%:!J%=q%:J%!|
00007b40  34 3d 73 25 3a c8 99 26  34 30 30 43 45 2c 2c 4a  |4=s%:..&400CE,,J|
00007b50  25 3a e7 28 4a 25 21 32  34 80 32 35 36 29 3e 30  |%:.(J%!24.256)>0|
00007b60  8c 41 25 3d 4a 25 21 33  32 8b 41 25 3d 2d 31 0d  |.A%=J%!32.A%=-1.|
00007b70  38 2d 07 3d 41 25 0d 38  2e 3d dd f2 5a 28 71 25  |8-.=A%.8.=..Z(q%|
00007b80  2c 73 25 2c 68 79 25 29  3a ea 41 25 3a 21 4a 25  |,s%,hy%):.A%:!J%|
00007b90  3d 71 25 3a 4a 25 21 34  3d 73 25 3a 41 25 3d 31  |=q%:J%!4=s%:A%=1|
00007ba0  3a e7 68 79 25 3d 2d 31  8c 68 79 25 3d 31 3a 41  |:.hy%=-1.hy%=1:A|
00007bb0  25 3d 30 0d 38 2f 2c 4a  25 21 38 3d 68 79 25 3c  |%=0.8/,J%!8=hy%<|
00007bc0  3c 32 31 3a 4a 25 21 26  43 3d 41 25 3c 3c 32 31  |<21:J%!&C=A%<<21|
00007bd0  3a c8 99 26 34 30 30 43  44 2c 2c 4a 25 3a e1 0d  |:..&400CD,,J%:..|
00007be0  38 30 3c dd a4 5a 28 71  25 2c 73 25 29 3a 21 4a  |80<..Z(q%,s%):!J|
00007bf0  25 3d 71 25 3a 4a 25 21  34 3d 73 25 3a c8 99 26  |%=q%:J%!4=s%:..&|
00007c00  34 30 30 43 45 2c 2c 4a  25 3a 3d 2d 28 28 4a 25  |400CE,,J%:=-((J%|
00007c10  21 32 34 3e 3e 32 31 29  80 31 29 0d 38 31 3d dd  |!24>>21).1).81=.|
00007c20  f2 4d 28 71 25 2c 73 25  2c 68 79 25 29 3a ea 41  |.M(q%,s%,hy%):.A|
00007c30  25 3a 41 25 3d 31 3a 21  4a 25 3d 71 25 3a 4a 25  |%:A%=1:!J%=q%:J%|
00007c40  21 34 3d 73 25 3a e7 68  79 25 3d 2d 31 8c 68 79  |!4=s%:.hy%=-1.hy|
00007c50  25 3d 31 3a 41 25 3d 30  0d 38 32 30 4a 25 21 38  |%=1:A%=0.820J%!8|
00007c60  3d 68 79 25 2a 28 31 3c  3c 32 32 29 3a 4a 25 21  |=hy%*(1<<22):J%!|
00007c70  26 43 3d 41 25 3c 3c 32  32 3a c8 99 26 34 30 30  |&C=A%<<22:..&400|
00007c80  43 44 2c 2c 4a 25 3a e1  0d 38 33 68 dd f2 41 28  |CD,,J%:..83h..A(|
00007c90  71 25 2c 73 25 2c 57 24  29 3a ea 50 25 2c 4c 25  |q%,s%,W$):.P%,L%|
00007ca0  3a 21 4a 25 3d 71 25 3a  4a 25 21 34 3d 73 25 3a  |:!J%=q%:J%!4=s%:|
00007cb0  c8 99 26 34 30 30 43 45  2c 2c 4a 25 3a e7 4a 25  |..&400CE,,J%:.J%|
00007cc0  21 32 34 80 28 31 3c 3c  38 29 8c 50 25 3d 4a 25  |!24.(1<<8).P%=J%|
00007cd0  21 32 38 3a 4c 25 3d 28  4a 25 21 33 36 29 2d 31  |!28:L%=(J%!36)-1|
00007ce0  3a 8b 50 25 3d 4a 25 2b  32 38 3a 4c 25 3d 26 42  |:.P%=J%+28:L%=&B|
00007cf0  0d 38 34 2d 24 50 25 3d  c0 57 24 2c 4c 25 29 3a  |.84-$P%=.W$,L%):|
00007d00  4a 25 21 38 3d 30 3a 4a  25 21 26 43 3d 30 3a c8  |J%!8=0:J%!&C=0:.|
00007d10  99 26 34 30 30 43 44 2c  2c 4a 25 3a e1 0d 38 35  |.&400CD,,J%:..85|
00007d20  57 dd a4 4d 28 71 25 2c  73 25 29 3a ea 41 24 3a  |W..M(q%,s%):.A$:|
00007d30  21 4a 25 3d 71 25 3a 4a  25 21 34 3d 73 25 3a c8  |!J%=q%:J%!4=s%:.|
00007d40  99 26 34 30 30 43 45 2c  2c 4a 25 3a e7 28 4a 25  |.&400CE,,J%:.(J%|
00007d50  21 32 34 80 32 35 36 29  3e 30 8c 41 24 3d a4 4e  |!24.256)>0.A$=.N|
00007d60  28 4a 25 21 32 38 29 8b  41 24 3d a4 4e 28 4a 25  |(J%!28).A$=.N(J%|
00007d70  2b 32 38 29 0d 38 36 07  3d 41 24 0d 38 37 4d dd  |+28).86.=A$.87M.|
00007d80  a4 71 79 28 71 25 2c 73  25 29 3a ea 41 25 3a 21  |.qy(q%,s%):.A%:!|
00007d90  4a 25 3d 71 25 3a 4a 25  21 34 3d 73 25 3a c8 99  |J%=q%:J%!4=s%:..|
00007da0  26 34 30 30 43 45 2c 2c  4a 25 3a e7 28 4a 25 21  |&400CE,,J%:.(J%!|
00007db0  32 34 80 32 35 36 29 3e  30 8c 41 25 3d 4a 25 21  |24.256)>0.A%=J%!|
00007dc0  32 38 8b 41 25 3d 2d 31  0d 38 38 07 3d 41 25 0d  |28.A%=-1.88.=A%.|
00007dd0  38 39 32 dd f2 47 5f 28  5a 79 25 2c 49 25 29 3a  |892..G_(Zy%,I%):|
00007de0  5a 79 25 21 28 32 38 2b  32 34 2a 49 25 29 3d 5a  |Zy%!(28+24*I%)=Z|
00007df0  79 25 21 28 32 38 2b 32  34 2a 49 25 29 84 38 3a  |y%!(28+24*I%).8:|
00007e00  e1 0d 38 3a 62 dd f2 67  79 28 5a 79 25 2c 4c 25  |..8:b..gy(Zy%,L%|
00007e10  2c 48 25 29 3a 5a 79 25  2b 3d 34 2b 32 34 2a 4c  |,H%):Zy%+=4+24*L|
00007e20  25 3a f5 5a 79 25 2b 3d  32 34 3a 5a 79 25 21 38  |%:.Zy%+=24:Zy%!8|
00007e30  3d 5a 79 25 21 38 84 38  3a 4c 25 2b 3d 31 3a fd  |=Zy%!8.8:L%+=1:.|
00007e40  28 28 4c 25 3e 48 25 29  80 28 48 25 3c 3e 2d 31  |((L%>H%).(H%<>-1|
00007e50  29 29 84 28 28 21 5a 79  25 80 26 38 30 29 3e 30  |)).((!Zy%.&80)>0|
00007e60  29 3a e1 0d 38 3b 60 dd  f2 57 28 5a 79 25 2c 4c  |):..8;`..W(Zy%,L|
00007e70  25 2c 48 25 29 3a 5a 79  25 2b 3d 34 2b 32 34 2a  |%,H%):Zy%+=4+24*|
00007e80  4c 25 3a f5 5a 79 25 2b  3d 32 34 3a 21 5a 79 25  |L%:.Zy%+=24:!Zy%|
00007e90  3d 21 5a 79 25 80 ac 31  3a 4c 25 2b 3d 31 3a fd  |=!Zy%..1:L%+=1:.|
00007ea0  28 28 4c 25 3e 48 25 29  80 28 48 25 3c 3e 2d 31  |((L%>H%).(H%<>-1|
00007eb0  29 29 84 28 28 21 5a 79  25 80 26 38 30 29 3e 30  |)).((!Zy%.&80)>0|
00007ec0  29 3a e1 0d 38 3c 5d dd  a4 50 79 28 63 24 29 3a  |):..8<]..Py(c$):|
00007ed0  ea 5a 79 25 2c 7a 75 25  2c 46 79 25 3a 5a 79 25  |.Zy%,zu%,Fy%:Zy%|
00007ee0  3d a4 41 79 28 63 24 2b  22 5c 30 5c 31 5c 32 5c  |=.Ay(c$+"\0\1\2\|
00007ef0  33 5c 34 5c 35 5c 36 5c  37 5c 38 5c 39 5c 31 30  |3\4\5\6\7\8\9\10|
00007f00  5c 31 31 5c 31 32 5c 31  33 5c 31 34 5c 31 35 22  |\11\12\13\14\15"|
00007f10  29 3a e3 46 79 25 3d 30  b8 26 46 3a c8 8e b9 ca  |):.Fy%=0.&F:....|
00007f20  0d 38 3d 2b c9 46 79 25  3c 34 2c 46 79 25 3d 39  |.8=+.Fy%<4,Fy%=9|
00007f30  2c 46 79 25 3d 26 43 2c  46 79 25 3d 26 45 2c 46  |,Fy%=&C,Fy%=&E,F|
00007f40  79 25 3d 26 46 3a 7a 75  25 3d 37 0d 38 3e 0a 7f  |y%=&F:zu%=7.8>..|
00007f50  7a 75 25 3d 30 0d 38 3f  35 cb 3a 5a 79 25 3f 28  |zu%=0.8?5.:Zy%?(|
00007f60  33 39 2b 46 79 25 2a 32  34 29 3d 46 79 25 2a 31  |39+Fy%*24)=Fy%*1|
00007f70  36 2b 7a 75 25 3a ed 3a  f2 67 79 28 5a 79 25 2c  |6+zu%:.:.gy(Zy%,|
00007f80  30 2c 2d 31 29 3a 3d 5a  79 25 0d 38 40 d5 dd a4  |0,-1):=Zy%.8@...|
00007f90  41 79 28 41 24 29 3a ea  41 25 2c 42 25 2c 4c 25  |Ay(A$):.A%,B%,L%|
00007fa0  2c 5a 24 2c 49 25 3a 41  24 2b 3d 22 5c 22 3a de  |,Z$,I%:A$+="\":.|
00007fb0  41 25 34 2a a4 67 79 20  28 41 24 29 2a 32 34 3a  |A%4*.gy (A$)*24:|
00007fc0  42 25 3d 41 25 2b 34 3a  5a 24 3d c0 41 24 2c a7  |B%=A%+4:Z$=.A$,.|
00007fd0  41 24 2c 22 5c 22 29 2d  31 29 3a 24 41 25 3d 5a  |A$,"\")-1):$A%=Z|
00007fe0  24 3a 41 25 21 26 43 3d  26 37 30 32 30 37 3a 41  |$:A%!&C=&70207:A|
00007ff0  25 21 32 30 3d 34 34 3a  41 25 21 32 34 3d 30 3a  |%!20=44:A%!24=0:|
00008000  4c 25 3d a9 5a 24 3a 41  24 3d c1 41 24 2c a7 41  |L%=.Z$:A$=.A$,.A|
00008010  24 2c 22 5c 22 29 2b 31  29 3a c8 95 a7 41 24 2c  |$,"\")+1):...A$,|
00008020  22 5c 22 29 3a 5a 24 3d  c0 41 24 2c a7 41 24 2c  |"\"):Z$=.A$,.A$,|
00008030  22 5c 22 29 2d 31 29 3a  42 25 2b 3d 32 34 3a 21  |"\")-1):B%+=24:!|
00008040  42 25 3d a4 4f 79 28 5a  24 29 3a 42 25 21 34 3d  |B%=.Oy(Z$):B%!4=|
00008050  30 3a 42 25 21 38 3d 26  37 30 30 30 30 32 31 0d  |0:B%!8=&7000021.|
00008060  38 41 36 e7 a7 5a 24 2c  22 3e 22 29 8c 42 25 21  |8A6..Z$,">").B%!|
00008070  34 3d bb c1 5a 24 2c a7  5a 24 2c 22 3e 22 29 2b  |4=..Z$,.Z$,">")+|
00008080  31 29 3a 5a 24 3d c0 5a  24 2c a7 5a 24 2c 22 3e  |1):Z$=.Z$,.Z$,">|
00008090  22 29 2d 31 29 0d 38 42  51 e7 a9 5a 24 3e 26 42  |")-1).8BQ..Z$>&B|
000080a0  8c de 49 25 a9 5a 24 2b  31 3a 24 49 25 3d 5a 24  |..I%.Z$+1:$I%=Z$|
000080b0  3a 42 25 21 38 3d 42 25  21 38 84 32 35 36 3a 42  |:B%!8=B%!8.256:B|
000080c0  25 21 26 43 3d 49 25 3a  42 25 21 31 36 3d 30 3a  |%!&C=I%:B%!16=0:|
000080d0  42 25 21 32 30 3d 49 25  2b 31 8b 24 28 42 25 2b  |B%!20=I%+1.$(B%+|
000080e0  26 43 29 3d 5a 24 0d 38  43 12 e7 a9 5a 24 3e 4c  |&C)=Z$.8C...Z$>L|
000080f0  25 8c 4c 25 3d a9 5a 24  0d 38 44 37 41 24 3d c1  |%.L%=.Z$.8D7A$=.|
00008100  41 24 2c a7 41 24 2c 22  5c 22 29 2b 31 29 3a ce  |A$,.A$,"\")+1):.|
00008110  3a 21 42 25 3d 21 42 25  84 26 38 30 3a 41 25 21  |:!B%=!B%.&80:A%!|
00008120  31 36 3d 4c 25 2a 31 36  2b 31 36 3a 3d 41 25 0d  |16=L%*16+16:=A%.|
00008130  38 45 f2 dd a4 43 28 63  24 2c 69 24 2c 4c 25 2c  |8E...C(c$,i$,L%,|
00008140  48 25 29 3a ea 4d 25 2c  41 25 2c 43 25 2c 44 25  |H%):.M%,A%,C%,D%|
00008150  2c 52 6c 25 2c 41 24 3a  de 4d 25 32 38 2b 32 34  |,Rl%,A$:.M%28+24|
00008160  2a 20 28 48 25 2d 4c 25  2b 31 29 3a 21 4d 25 3d  |* (H%-L%+1):!M%=|
00008170  a4 68 28 63 24 29 3a 4d  25 21 34 3d 30 3a 4d 25  |.h(c$):M%!4=0:M%|
00008180  21 38 3d 30 3a 52 6c 25  3d a9 a4 41 28 63 24 29  |!8=0:Rl%=..A(c$)|
00008190  3a 4d 25 21 26 43 3d 26  37 30 32 30 37 3a 4d 25  |:M%!&C=&70207:M%|
000081a0  21 32 30 3d 34 34 3a 4d  25 21 32 34 3d 30 3a 41  |!20=44:M%!24=0:A|
000081b0  25 3d 4d 25 2b 34 3a e3  43 25 3d 4c 25 b8 48 25  |%=M%+4:.C%=L%.H%|
000081c0  3a 41 25 2b 3d 32 34 3a  21 41 25 3d 30 3a 41 25  |:A%+=24:!A%=0:A%|
000081d0  21 34 3d 30 3a 41 25 21  38 3d 26 37 30 30 30 31  |!4=0:A%!8=&70001|
000081e0  32 31 3a 41 25 21 26 43  3d a4 68 28 69 24 2b c3  |21:A%!&C=.h(i$+.|
000081f0  43 25 29 3a 41 25 21 31  36 3d 30 3a 41 25 21 32  |C%):A%!16=0:A%!2|
00008200  30 3d 30 3a 44 25 3d a9  a4 41 28 69 24 2b c3 43  |0=0:D%=..A(i$+.C|
00008210  25 29 3a e7 44 25 3e 52  6c 25 8c 52 6c 25 3d 44  |%):.D%>Rl%.Rl%=D|
00008220  25 0d 38 46 2d ed 3a 21  41 25 2b 3d 26 38 30 3a  |%.8F-.:!A%+=&80:|
00008230  4d 25 21 32 38 2b 3d 32  35 36 3a 4d 25 21 31 36  |M%!28+=256:M%!16|
00008240  3d 52 6c 25 2a 31 36 2b  31 36 3a 3d 4d 25 0d 38  |=Rl%*16+16:=M%.8|
00008250  47 26 dd f2 59 28 4d 25  2c 49 25 2c 53 25 29 3a  |G&..Y(M%,I%,S%):|
00008260  4d 25 21 28 32 38 2b 32  34 2a 49 25 2b 34 29 3d  |M%!(28+24*I%+4)=|
00008270  53 25 3a e1 0d 38 48 1e  dd a4 4f 79 28 f8 5a 24  |S%:..8H...Oy(.Z$|
00008280  29 3a ea 41 25 2c 46 25  3a f5 3a c8 8e bd 97 5a  |):.A%,F%:.:....Z|
00008290  24 ca 0d 38 49 18 c9 22  80 22 3a 41 25 2b 3d 31  |$..8I..".":A%+=1|
000082a0  3a 5a 24 3d c1 5a 24 2c  32 29 0d 38 4a 18 c9 22  |:Z$=.Z$,2).8J.."|
000082b0  5f 22 3a 41 25 2b 3d 32  3a 5a 24 3d c1 5a 24 2c  |_":A%+=2:Z$=.Z$,|
000082c0  32 29 0d 38 4b 18 c9 22  2a 22 3a 41 25 2b 3d 38  |2).8K.."*":A%+=8|
000082d0  3a 5a 24 3d c1 5a 24 2c  32 29 0d 38 4c 0a 7f 46  |:Z$=.Z$,2).8L..F|
000082e0  25 3d 2d 31 0d 38 4d 0d  cb 3a fd 46 25 3a 3d 41  |%=-1.8M..:.F%:=A|
000082f0  25 0d 38 4e 3a dd a4 67  79 28 41 24 29 3a ea 41  |%.8N:..gy(A$):.A|
00008300  25 3a c8 95 a7 41 24 2c  22 5c 22 29 3a 41 25 2b  |%:...A$,"\"):A%+|
00008310  3d 31 3a 41 24 3d c1 41  24 2c a7 41 24 2c 22 5c  |=1:A$=.A$,.A$,"\|
00008320  22 29 2b 31 29 3a ce 3a  3d 41 25 0d 38 4f 37 dd  |")+1):.:=A%.8O7.|
00008330  a4 56 79 28 41 25 29 3a  ea 48 25 3a 41 25 2b 3d  |.Vy(A%):.H%:A%+=|
00008340  34 3a f5 41 25 2b 3d 32  34 3a 48 25 2b 3d 34 34  |4:.A%+=24:H%+=44|
00008350  3a e7 28 21 41 25 80 32  29 3e 30 8c 48 25 2b 3d  |:.(!A%.2)>0.H%+=|
00008360  32 34 0d 38 50 17 fd 28  21 41 25 80 26 38 30 29  |24.8P..(!A%.&80)|
00008370  3e 30 3a 3d 48 25 2b 39  36 0d 38 51 9b dd a4 7a  |>0:=H%+96.8Q...z|
00008380  79 28 5a 79 25 2c 63 61  25 2c 57 24 2c 5a 61 25  |y(Zy%,ca%,W$,Za%|
00008390  2c 6e 24 29 3a ea 53 69  25 2c 67 5f 25 3a de 53  |,n$):.Si%,g_%:.S|
000083a0  69 25 5a 61 25 2b 31 2c  67 5f 25 a9 20 28 6e 24  |i%Za%+1,g_%. (n$|
000083b0  29 2b 31 3a 24 53 69 25  3d 57 24 3a 24 67 5f 25  |)+1:$Si%=W$:$g_%|
000083c0  3d 6e 24 3a 5a 79 25 2b  3d 32 38 2b 32 34 2a 63  |=n$:Zy%+=28+24*c|
000083d0  61 25 3a 21 5a 79 25 3d  21 5a 79 25 84 34 3a 5a  |a%:!Zy%=!Zy%.4:Z|
000083e0  79 25 21 38 3d 5a 79 25  21 38 84 32 35 36 3a 5a  |y%!8=Zy%!8.256:Z|
000083f0  79 25 21 26 43 3d 53 69  25 3a 5a 79 25 21 31 36  |y%!&C=Si%:Zy%!16|
00008400  3d 67 5f 25 3a 5a 79 25  21 32 30 3d 5a 61 25 3a  |=g_%:Zy%!20=Za%:|
00008410  3d 53 69 25 0d 38 52 65  dd a4 4d 79 28 5a 79 25  |=Si%.8Re..My(Zy%|
00008420  2c 75 24 29 3a ea 41 25  2c 42 25 3a 42 25 3d 5a  |,u$):.A%,B%:B%=Z|
00008430  79 25 2b 32 38 3a c8 95  28 75 24 3c 3e a4 4a 28  |y%+28:..(u$<>.J(|
00008440  5a 79 25 2c 41 25 29 29  80 28 21 42 25 80 26 38  |Zy%,A%)).(!B%.&8|
00008450  30 29 3d 30 3a 41 25 2b  3d 31 3a 42 25 2b 3d 32  |0)=0:A%+=1:B%+=2|
00008460  34 3a ce 3a e7 75 24 3c  3e a4 4a 28 5a 79 25 2c  |4:.:.u$<>.J(Zy%,|
00008470  41 25 29 8c 41 25 3d 2d  31 0d 38 53 07 3d 41 25  |A%).A%=-1.8S.=A%|
00008480  0d 38 54 19 dd f2 54 28  4d 25 2c 49 25 2c 46 25  |.8T...T(M%,I%,F%|
00008490  29 3a e7 46 25 3c 3e 30  8c 0d 38 55 27 4d 25 21  |):.F%<>0..8U'M%!|
000084a0  28 33 36 2b 32 34 2a 49  25 29 3d 4d 25 21 28 33  |(36+24*I%)=M%!(3|
000084b0  36 2b 32 34 2a 49 25 29  84 28 31 3c 3c 32 32 29  |6+24*I%).(1<<22)|
000084c0  0d 38 56 29 cc 4d 25 21  28 33 36 2b 32 34 2a 49  |.8V).M%!(36+24*I|
000084d0  25 29 3d 4d 25 21 28 33  36 2b 32 34 2a 49 25 29  |%)=M%!(36+24*I%)|
000084e0  80 ac 28 31 3c 3c 32 32  29 0d 38 57 07 cd 3a e1  |..(1<<22).8W..:.|
000084f0  0d 38 58 3b dd a4 4a 28  4d 25 2c 49 25 29 3a 4d  |.8X;..J(M%,I%):M|
00008500  25 2b 3d 32 38 2b 32 34  2a 49 25 3a e7 28 4d 25  |%+=28+24*I%:.(M%|
00008510  21 38 80 32 35 36 29 3e  30 8c 4d 25 3d 4d 25 21  |!8.256)>0.M%=M%!|
00008520  26 43 8b 4d 25 3d 4d 25  2b 26 43 0d 38 59 0b 3d  |&C.M%=M%+&C.8Y.=|
00008530  a4 4e 28 4d 25 29 0d 38  5a 57 dd f2 53 28 4d 25  |.N(M%).8ZW..S(M%|
00008540  2c 49 25 2c 46 25 29 3a  e7 46 25 3c 3e 30 8c 4d  |,I%,F%):.F%<>0.M|
00008550  25 21 28 32 38 2b 32 34  2a 49 25 29 3d 4d 25 21  |%!(28+24*I%)=M%!|
00008560  28 32 38 2b 32 34 2a 49  25 29 84 31 8b 4d 25 21  |(28+24*I%).1.M%!|
00008570  28 32 38 2b 32 34 2a 49  25 29 3d 4d 25 21 28 32  |(28+24*I%)=M%!(2|
00008580  38 2b 32 34 2a 49 25 29  80 ac 28 31 29 0d 38 5b  |8+24*I%)..(1).8[|
00008590  05 e1 0d 38 5c 1e dd a4  60 79 28 4d 25 29 3a e7  |...8\...`y(M%):.|
000085a0  4d 25 21 32 38 3e 26 38  30 8c 4d 25 3d 21 4d 25  |M%!28>&80.M%=!M%|
000085b0  0d 38 5d 0b 3d a4 4e 28  4d 25 29 0d 38 5e 58 dd  |.8].=.N(M%).8^X.|
000085c0  f2 67 5f 28 4d 25 2c 49  25 2c 46 25 29 3a e7 46  |.g_(M%,I%,F%):.F|
000085d0  25 3c 3e 30 8c 4d 25 21  28 32 38 2b 32 34 2a 49  |%<>0.M%!(28+24*I|
000085e0  25 29 3d 4d 25 21 28 32  38 2b 32 34 2a 49 25 29  |%)=M%!(28+24*I%)|
000085f0  84 32 8b 4d 25 21 28 32  38 2b 32 34 2a 49 25 29  |.2.M%!(28+24*I%)|
00008600  3d 4d 25 21 28 32 38 2b  32 34 2a 49 25 29 80 ac  |=M%!(28+24*I%)..|
00008610  28 32 29 0d 38 5f 05 e1  0d 38 60 13 dd a4 72 28  |(2).8_...8`...r(|
00008620  41 25 29 3d 41 25 2d 41  25 83 34 0d 38 61 13 dd  |A%)=A%-A%.4.8a..|
00008630  a4 66 28 41 25 29 3d 41  25 2d 41 25 83 32 0d 38  |.f(A%)=A%-A%.2.8|
00008640  62 25 dd a4 44 79 3a c8  99 26 34 30 30 43 46 2c  |b%..Dy:..&400CF,|
00008650  2c 4a 25 3a 3d 28 28 28  4a 25 21 38 29 80 31 29  |,J%:=(((J%!8).1)|
00008660  3d 31 29 0d 38 63 2a dd  a4 6a 3a ea 41 25 3a c8  |=1).8c*..j:.A%:.|
00008670  99 36 2c 26 41 31 2c 26  44 43 b8 2c 2c 41 25 3a  |.6,&A1,&DC.,,A%:|
00008680  3d 28 41 25 80 26 38 30  29 3d 26 38 30 0d 38 64  |=(A%.&80)=&80.8d|
00008690  27 dd f2 4d 79 28 46 25  29 3a ea 41 25 3a c8 99  |'..My(F%):.A%:..|
000086a0  36 2c 26 41 31 2c 26 44  43 b8 2c 2c 41 25 3a c8  |6,&A1,&DC.,,A%:.|
000086b0  8e 46 25 ca 0d 38 65 11  c9 30 3a 41 25 3d 41 25  |.F%..8e..0:A%=A%|
000086c0  80 ac 26 38 30 0d 38 66  10 c9 31 3a 41 25 3d 41  |..&80.8f..1:A%=A|
000086d0  25 84 26 38 30 0d 38 67  11 c9 2d 31 3a 41 25 3d  |%.&80.8g..-1:A%=|
000086e0  41 25 82 26 38 30 0d 38  68 16 cb 3a c8 99 36 2c  |A%.&80.8h..:..6,|
000086f0  26 41 32 2c 26 44 43 2c  41 25 3a e1 0d 38 69 37  |&A2,&DC,A%:..8i7|
00008700  dd a4 64 3a ea 41 25 2c  42 25 3a c8 99 35 33 2c  |..d:.A%,B%:..53,|
00008710  2d 31 2c 26 43 b8 2c 2c  41 25 3a c8 99 35 33 2c  |-1,&C.,,A%:..53,|
00008720  2d 31 2c 35 b8 2c 2c 42  25 3a 3d 28 41 25 3c 3c  |-1,5.,,B%:=(A%<<|
00008730  42 25 29 0d 38 6a 27 dd  a4 48 79 28 4d 25 29 3a  |B%).8j'..Hy(M%):|
00008740  ea 41 25 3a c8 99 35 33  2c 4d 25 2c 35 b8 2c 2c  |.A%:..53,M%,5.,,|
00008750  41 25 3a 3d 28 41 25 3d  31 29 0d 38 6b 48 dd a4  |A%:=(A%=1).8kH..|
00008760  77 28 48 25 2c 53 25 2c  46 25 29 3a ea 50 25 2c  |w(H%,S%,F%):.P%,|
00008770  45 25 2c 56 25 2c 4c 25  2c 54 25 3a c8 99 26 32  |E%,V%,L%,T%:..&2|
00008780  30 30 31 44 2c 32 2c 48  25 2c 2c 53 25 b8 45 25  |001D,2,H%,,S%.E%|
00008790  2c 2c 50 25 3b 56 25 3a  e7 28 56 25 80 31 29 3d  |,,P%;V%:.(V%.1)=|
000087a0  31 8c 0d 38 6c 08 e7 46  25 8c 0d 38 6d 3c 50 25  |1..8l..F%..8m<P%|
000087b0  3d a4 57 79 3a f2 70 28  48 25 2c 28 53 25 81 50  |=.Wy:.p(H%,(S%.P|
000087c0  25 29 2a 50 25 2d 50 25  2a 28 28 53 25 83 50 25  |%)*P%-P%*((S%.P%|
000087d0  29 3e 30 29 2c b9 29 3a  50 25 3d a4 77 28 48 25  |)>0),.):P%=.w(H%|
000087e0  2c 53 25 2c a3 29 0d 38  6e 0c cc c8 99 34 33 2c  |,S%,.).8n....43,|
000087f0  45 25 0d 38 6f 05 cd 0d  38 70 09 cd 3a 3d 50 25  |E%.8o...8p..:=P%|
00008800  0d 38 71 57 dd f2 66 75  28 48 25 2c f8 42 25 2c  |.8qW..fu(H%,.B%,|
00008810  53 25 2c 46 25 29 3a ea  4c 25 2c 45 25 2c 56 25  |S%,F%):.L%,E%,V%|
00008820  2c 54 25 2c 50 25 3a c8  99 26 32 30 30 31 44 2c  |,T%,P%:..&2001D,|
00008830  34 2c 48 25 2c 42 25 2c  53 25 b8 45 25 2c 2c 42  |4,H%,B%,S%.E%,,B|
00008840  25 3b 56 25 3a 56 25 3d  28 28 56 25 80 31 29 3d  |%;V%:V%=((V%.1)=|
00008850  31 29 3a c8 8e b9 ca 0d  38 72 13 c9 56 25 80 ac  |1):.....8r..V%..|
00008860  46 25 3a c8 99 34 33 2c  45 25 0d 38 73 2d c9 56  |F%:..43,E%.8s-.V|
00008870  25 80 46 25 80 28 53 25  3e 30 29 3a f2 70 28 48  |%.F%.(S%>0):.p(H|
00008880  25 2c 53 25 2c b9 29 3a  f2 66 75 28 48 25 2c 42  |%,S%,.):.fu(H%,B|
00008890  25 2c 53 25 2c b9 29 0d  38 74 11 c9 56 25 80 46  |%,S%,.).8t..V%.F|
000088a0  25 80 28 53 25 3c 30 29  0d 38 75 1e c9 ac 56 25  |%.(S%<0).8u...V%|
000088b0  80 46 25 80 28 53 25 3c  30 29 3a f2 70 28 48 25  |.F%.(S%<0):.p(H%|
000088c0  2c 2d 31 2c b9 29 0d 38  76 07 cb 3a e1 0d 38 77  |,-1,.).8v..:..8w|
000088d0  3e dd f2 4c 79 28 48 25  2c 42 25 2c 46 25 29 3a  |>..Ly(H%,B%,F%):|
000088e0  ea 41 25 2c 68 79 25 3a  c8 99 32 39 2c 33 2c 48  |.A%,hy%:..29,3,H|
000088f0  25 2c 42 25 b8 41 25 3b  68 79 25 3a e7 46 25 8c  |%,B%.A%;hy%:.F%.|
00008900  f2 70 28 48 25 2c 2d 31  2c b9 29 0d 38 78 05 e1  |.p(H%,-1,.).8x..|
00008910  0d 38 79 1a dd f2 70 28  48 25 2c 53 25 2c 46 25  |.8y...p(H%,S%,F%|
00008920  29 3a ea 50 25 3a e7 46  25 8c 0d 38 7a 0a e7 53  |):.P%:.F%..8z..S|
00008930  25 3c 30 8c 0d 38 7b 9b  c8 99 26 32 30 30 31 44  |%<0..8{...&2001D|
00008940  2c 35 2c 48 25 2c 2c 2d  33 32 2a 26 34 30 30 2a  |,5,H%,,-32*&400*|
00008950  26 34 30 30 3a 53 25 3d  48 25 21 26 43 2b 48 25  |&400:S%=H%!&C+H%|
00008960  2d 26 38 30 30 30 3a 50  25 3d a4 57 79 3a c8 99  |-&8000:P%=.Wy:..|
00008970  26 34 30 30 45 43 2c 2d  31 2c 2d 31 b8 46 25 3a  |&400EC,-1,-1.F%:|
00008980  46 25 3d a4 6c 28 28 28  53 25 81 50 25 29 2a 50  |F%=.l(((S%.P%)*P|
00008990  25 2d 50 25 2a 28 28 53  25 83 50 25 29 3e 30 29  |%-P%*((S%.P%)>0)|
000089a0  29 2d 46 25 29 3a c8 99  32 39 2c 35 2c 48 25 2c  |)-F%):..29,5,H%,|
000089b0  2c 28 28 53 25 81 50 25  29 2a 50 25 2d 50 25 2a  |,((S%.P%)*P%-P%*|
000089c0  28 28 53 25 83 50 25 29  3e 30 29 29 2d 53 25 0d  |((S%.P%)>0))-S%.|
000089d0  38 7c 28 cc 3a 45 25 3d  60 75 25 3a 46 25 3d a4  |8|(.:E%=`u%:F%=.|
000089e0  6c 28 53 25 29 3a c8 99  32 39 2c 35 2c 48 25 2c  |l(S%):..29,5,H%,|
000089f0  2c 60 75 25 2d 45 25 0d  38 7d 05 cd 0d 38 7e 12  |,`u%-E%.8}...8~.|
00008a00  cc c8 99 32 39 2c 35 2c  48 25 2c 2c 53 25 0d 38  |...29,5,H%,,S%.8|
00008a10  7f 07 cd 3a e1 0d 38 80  1d dd f2 63 5f 28 48 25  |...:..8....c_(H%|
00008a20  2c 53 25 29 3a e7 53 25  3d 2d 31 8c 53 25 3d 60  |,S%):.S%=-1.S%=`|
00008a30  75 25 0d 38 81 13 c8 99  32 39 2c 30 2c 48 25 2c  |u%.8....29,0,H%,|
00008a40  2c 53 25 3a e1 0d 38 82  27 dd f2 62 4a 3a c8 99  |,S%:..8.'..bJ:..|
00008a50  26 36 31 35 30 34 2c 43  5f 25 3a c8 99 26 32 30  |&61504,C_%:..&20|
00008a60  30 31 45 2c 37 2c 2c 43  5f 25 3a e1 0d 38 83 58  |01E,7,,C_%:..8.X|
00008a70  dd f2 4a 4a 28 6b 24 29  3a ea 46 25 3a c8 99 26  |..JJ(k$):.F%:..&|
00008a80  32 30 30 31 45 2c 36 2c  2c 2c 31 37 2b a9 6b 24  |2001E,6,,,17+.k$|
00008a90  b8 2c 2c 43 5f 25 3b 46  25 3a e7 46 25 80 31 8c  |.,,C_%;F%:.F%.1.|
00008aa0  85 32 2c 22 4e 6f 74 20  65 6e 6f 75 67 68 20 6d  |.2,"Not enough m|
00008ab0  65 6d 6f 72 79 20 66 6f  72 20 6d 65 73 73 61 67  |emory for messag|
00008ac0  65 73 2e 22 0d 38 84 28  24 28 43 5f 25 2b 31 36  |es.".8.($(C_%+16|
00008ad0  29 3d 6b 24 3a c8 99 26  34 31 35 30 31 2c 43 5f  |)=k$:..&41501,C_|
00008ae0  25 2c 43 5f 25 2b 31 36  2c 30 3a e1 0d 38 85 6a  |%,C_%+16,0:..8.j|
00008af0  dd a4 41 28 51 24 29 3a  ea 46 25 2c 4c 25 3a c8  |..A(Q$):.F%,L%:.|
00008b00  99 26 36 31 35 30 32 2c  43 5f 25 2c 51 24 2c 4a  |.&61502,C_%,Q$,J|
00008b10  25 2c 32 35 36 b8 2c 2c  2c 4c 25 3b 46 25 3a e7  |%,256.,,,L%;F%:.|
00008b20  46 25 80 31 85 32 2c 22  43 61 6e 27 74 20 67 65  |F%.1.2,"Can't ge|
00008b30  74 20 6d 65 73 73 61 67  65 20 27 22 2b 51 24 2b  |t message '"+Q$+|
00008b40  22 27 20 66 72 6f 6d 20  4d 65 73 73 61 67 65 73  |"' from Messages|
00008b50  20 66 69 6c 65 22 0d 38  86 11 4a 25 3f 4c 25 3d  | file".8..J%?L%=|
00008b60  26 44 3a 3d 24 4a 25 0d  38 87 64 dd a4 68 28 51  |&D:=$J%.8.d..h(Q|
00008b70  24 29 3a ea 46 25 2c 50  25 3a c8 99 26 36 31 35  |$):.F%,P%:..&615|
00008b80  30 32 2c 43 5f 25 2c 51  24 2c 30 b8 2c 2c 50 25  |02,C_%,Q$,0.,,P%|
00008b90  3b 46 25 3a e7 46 25 80  31 85 32 2c 22 43 61 6e  |;F%:.F%.1.2,"Can|
00008ba0  27 74 20 67 65 74 20 6d  65 73 73 61 67 65 20 27  |'t get message '|
00008bb0  22 2b 51 24 2b 22 27 20  66 72 6f 6d 20 4d 65 73  |"+Q$+"' from Mes|
00008bc0  73 61 67 65 73 20 66 69  6c 65 22 0d 38 88 07 3d  |sages file".8..=|
00008bd0  50 25 0d 38 89 84 dd a4  4f 28 51 24 2c 41 24 2c  |P%.8....O(Q$,A$,|
00008be0  5a 24 2c 46 24 2c 41 79  24 29 3a ea 46 25 2c 4c  |Z$,F$,Ay$):.F%,L|
00008bf0  25 3a c8 99 26 36 31 35  30 32 2c 43 5f 25 2c 51  |%:..&61502,C_%,Q|
00008c00  24 2c 4a 25 2c 32 35 36  2c 41 24 2c 5a 24 2c 46  |$,J%,256,A$,Z$,F|
00008c10  24 2c 41 79 24 b8 2c 2c  2c 4c 25 3b 46 25 3a e7  |$,Ay$.,,,L%;F%:.|
00008c20  46 25 80 31 85 32 2c 22  43 61 6e 27 74 20 67 65  |F%.1.2,"Can't ge|
00008c30  74 20 6d 65 73 73 61 67  65 20 27 22 2b 51 24 2b  |t message '"+Q$+|
00008c40  22 27 20 66 72 6f 6d 20  4d 65 73 73 61 67 65 73  |"' from Messages|
00008c50  20 66 69 6c 65 22 0d 38  8a 11 4a 25 3f 4c 25 3d  | file".8..J%?L%=|
00008c60  26 44 3a 3d 24 4a 25 0d  38 8b 44 dd a4 61 79 28  |&D:=$J%.8.D..ay(|
00008c70  51 24 2c 4c 25 2c 48 25  2c 5a 24 2c 41 24 29 3a  |Q$,L%,H%,Z$,A$):|
00008c80  ea 4d 24 2c 41 25 3a e3  41 25 3d 4c 25 b8 48 25  |.M$,A%:.A%=L%.H%|
00008c90  3a 4d 24 2b 3d 5a 24 2b  a4 41 28 51 24 2b c3 41  |:M$+=Z$+.A(Q$+.A|
00008ca0  25 29 2b 41 24 3a ed 3a  3d 4d 24 0d 38 8c 31 dd  |%)+A$:.:=M$.8.1.|
00008cb0  a4 6d 28 61 25 2c 51 25  2c 67 69 25 2c 79 69 25  |.m(a%,Q%,gi%,yi%|
00008cc0  2c 78 25 2c 6e 25 29 3a  e7 78 25 3c 30 8c 67 69  |,x%,n%):.x%<0.gi|
00008cd0  25 2b 3d 78 25 3a 78 25  3d 2d 78 25 0d 38 8d 18  |%+=x%:x%=-x%.8..|
00008ce0  e7 6e 25 3c 30 8c 79 69  25 2b 3d 6e 25 3a 6e 25  |.n%<0.yi%+=n%:n%|
00008cf0  3d 2d 6e 25 0d 38 8e 38  3d 28 28 61 25 3e 3d 67  |=-n%.8.8=((a%>=g|
00008d00  69 25 29 80 28 61 25 3c  3d 28 67 69 25 2b 78 25  |i%).(a%<=(gi%+x%|
00008d10  29 29 80 28 51 25 3e 3d  79 69 25 29 80 28 51 25  |)).(Q%>=yi%).(Q%|
00008d20  3c 3d 28 79 69 25 2b 6e  25 29 29 29 0d 38 8f 18  |<=(yi%+n%))).8..|
00008d30  dd a4 57 79 3a ea 50 25  3a c8 99 38 31 b8 50 25  |..Wy:.P%:..81.P%|
00008d40  3a 3d 50 25 0d 38 90 4e  dd a4 66 79 3a ea 49 24  |:=P%.8.N..fy:.I$|
00008d50  2c 49 25 3a c8 99 31 36  b8 49 24 3a 49 25 3d a7  |,I%:..16.I$:I%=.|
00008d60  49 24 2c 22 20 2d 71 75  69 74 20 22 29 3a e7 49  |I$," -quit "):.I|
00008d70  25 8c 49 24 3d c1 49 24  2c a7 49 24 2c 22 20 22  |%.I$=.I$,.I$," "|
00008d80  2c 49 25 2b a9 22 20 2d  71 75 69 74 20 22 29 2b  |,I%+." -quit ")+|
00008d90  31 29 0d 38 91 07 3d 49  24 0d 38 92 38 dd a4 43  |1).8..=I$.8.8..C|
00008da0  5f 28 41 24 29 3a ea 4c  25 3a c8 99 33 35 2c 41  |_(A$):.L%:..35,A|
00008db0  24 2c 4a 25 2c 26 46 46  2c 30 2c 33 b8 2c 2c 4c  |$,J%,&FF,0,3.,,L|
00008dc0  25 3a 4a 25 3f 4c 25 3d  30 3a 3d a4 4e 28 4a 25  |%:J%?L%=0:=.N(J%|
00008dd0  29 0d 38 93 59 dd a4 62  28 41 24 29 3a ea 4c 25  |).8.Y..b(A$):.L%|
00008de0  2c 46 25 3a c8 99 26 32  30 30 32 33 2c 41 24 2c  |,F%:..&20023,A$,|
00008df0  4a 25 2c 26 46 46 2c 30  2c 33 b8 2c 2c 4c 25 3b  |J%,&FF,0,3.,,L%;|
00008e00  46 25 3a e7 28 46 25 80  31 29 3d 30 8c 4a 25 3f  |F%:.(F%.1)=0.J%?|
00008e10  4c 25 3d 30 3a e7 a4 4e  28 4a 25 29 3c 3e 22 22  |L%=0:..N(J%)<>""|
00008e20  8c 46 25 3d b9 8b 46 25  3d a3 0d 38 94 07 3d 46  |.F%=..F%=..8..=F|
00008e30  25 0d 38 95 4a dd a4 6c  28 4d 25 29 3a ea 53 25  |%.8.J..l(M%):.S%|
00008e40  3a c8 99 26 34 30 30 45  43 2c 2d 31 2c 2d 31 b8  |:..&400EC,-1,-1.|
00008e50  53 25 3a c8 99 26 34 30  30 45 43 2c 53 25 2b 4d  |S%:..&400EC,S%+M|
00008e60  25 2c 2d 31 b8 53 25 3a  60 75 25 3d 53 25 2d 28  |%,-1.S%:`u%=S%-(|
00008e70  93 2d 26 38 30 30 30 29  3a 3d 93 0d 38 96 3f dd  |.-&8000):=..8.?.|
00008e80  a4 4e 28 50 25 29 3a ea  41 24 3a c8 95 3f 50 25  |.N(P%):.A$:..?P%|
00008e90  3c 3e 30 80 3f 50 25 3c  3e 26 44 80 3f 50 25 3c  |<>0.?P%<>&D.?P%<|
00008ea0  3e 26 41 3a 41 24 2b 3d  bd 28 3f 50 25 29 3a 50  |>&A:A$+=.(?P%):P|
00008eb0  25 2b 3d 31 3a ce 3a 3d  41 24 0d 38 97 3a dd f2  |%+=1:.:=A$.8.:..|
00008ec0  67 4a 28 67 79 25 29 3a  21 4a 25 3d 32 35 36 3a  |gJ(gy%):!J%=256:|
00008ed0  4a 25 21 26 43 3d 30 3a  4a 25 21 31 36 3d 30 3a  |J%!&C=0:J%!16=0:|
00008ee0  c8 99 26 34 30 30 45 37  2c 31 37 2c 4a 25 2c 67  |..&400E7,17,J%,g|
00008ef0  79 25 3a e1 0d 38 98 44  dd a4 76 28 41 24 29 3a  |y%:..8.D..v(A$):|
00008f00  ea 41 25 2c 43 25 3a e3  41 25 3d 31 b8 a9 41 24  |.A%,C%:.A%=1..A$|
00008f10  3a 43 25 3d 97 c1 41 24  2c 41 25 2c 31 29 3a e7  |:C%=..A$,A%,1):.|
00008f20  43 25 3e 3d 39 37 80 43  25 3c 3d 26 37 41 8c 43  |C%>=97.C%<=&7A.C|
00008f30  25 3d 43 25 80 ac 33 32  0d 38 99 17 c1 41 24 2c  |%=C%..32.8...A$,|
00008f40  41 25 29 3d bd 28 43 25  29 3a ed 3a 3d 41 24 0d  |A%)=.(C%):.:=A$.|
00008f50  38 9a 37 dd a4 67 3a ea  41 25 2c 42 25 3a c8 99  |8.7..g:.A%,B%:..|
00008f60  35 33 2c 2d 31 2c 26 42  b8 2c 2c 41 25 3a c8 99  |53,-1,&B.,,A%:..|
00008f70  35 33 2c 2d 31 2c 34 b8  2c 2c 42 25 3a 3d 28 41  |53,-1,4.,,B%:=(A|
00008f80  25 3c 3c 42 25 29 0d 38  9b 58 dd f2 42 28 4d 79  |%<<B%).8.X..B(My|
00008f90  24 29 3a 21 4a 25 3d 26  46 46 3a 24 28 4a 25 2b  |$):!J%=&FF:$(J%+|
00008fa0  34 29 3d 4d 79 24 2b bd  30 3a c8 99 26 34 30 30  |4)=My$+.0:..&400|
00008fb0  44 46 2c 4a 25 2c 31 37  2b 28 31 3c 3c 38 29 2b  |DF,J%,17+(1<<8)+|
00008fc0  28 31 3c 3c 39 29 2c 22  4d 65 73 73 61 67 65 20  |(1<<9),"Message |
00008fd0  66 72 6f 6d 20 22 2b 48  24 2c 77 24 3a e1 0d 38  |from "+H$,w$:..8|
00008fe0  9c 5c dd a4 5f 79 28 41  24 2c 52 25 29 3a 21 4a  |.\.._y(A$,R%):!J|
00008ff0  25 3d 30 3a 24 28 4a 25  2b 34 29 3d 41 24 3a c8  |%=0:$(J%+4)=A$:.|
00009000  99 26 34 30 30 44 46 2c  4a 25 2c 32 33 2d 34 2a  |.&400DF,J%,23-4*|
00009010  94 52 25 2b 28 31 3c 3c  38 29 2c 22 4d 65 73 73  |.R%+(1<<8),"Mess|
00009020  61 67 65 20 66 72 6f 6d  20 22 2b 48 24 2c 77 24  |age from "+H$,w$|
00009030  b8 2c 52 25 3a 3d 52 25  2d 32 0d 38 9d 26 dd a4  |.,R%:=R%-2.8.&..|
00009040  65 79 28 63 25 2c 72 25  2c 51 25 29 3a 3d 28 a4  |ey(c%,r%,Q%):=(.|
00009050  4c 28 63 25 2c 72 25 2c  51 25 29 2b 31 29 83 32  |L(c%,r%,Q%)+1).2|
00009060  0d 38 9e 70 dd a4 4c 28  63 25 2c 72 25 2c 51 25  |.8.p..L(c%,r%,Q%|
00009070  29 3a ea 58 75 25 3a 51  79 25 3d 51 25 2d 26 37  |):.Xu%:Qy%=Q%-&7|
00009080  37 44 3a 58 75 25 3d 51  79 25 2a 33 36 35 3a 58  |7D:Xu%=Qy%*365:X|
00009090  75 25 2b 3d 51 79 25 81  34 2d 28 51 25 2d 26 37  |u%+=Qy%.4-(Q%-&7|
000090a0  36 43 2d 31 29 81 26 36  34 2b 28 51 25 2d 26 36  |6C-1).&64+(Q%-&6|
000090b0  34 30 2d 31 29 81 34 30  30 3a c8 95 28 72 25 2d  |40-1).400:..(r%-|
000090c0  31 29 3e 30 3a 72 25 2d  3d 31 3a c8 8e 72 25 ca  |1)>0:r%-=1:..r%.|
000090d0  0d 38 9f 1c c9 31 2c 33  2c 35 2c 37 2c 38 2c 26  |.8...1,3,5,7,8,&|
000090e0  41 2c 26 43 3a 58 75 25  2b 3d 33 31 0d 38 a0 15  |A,&C:Xu%+=31.8..|
000090f0  c9 34 2c 36 2c 39 2c 26  42 3a 58 75 25 2b 3d 33  |.4,6,9,&B:Xu%+=3|
00009100  30 0d 38 a1 16 c9 32 3a  58 75 25 2b 3d 32 38 2d  |0.8...2:Xu%+=28-|
00009110  a4 42 79 28 51 25 29 0d  38 a2 0f cb 3a ce 3a 3d  |.By(Q%).8...:.:=|
00009120  58 75 25 2b 63 25 0d 38  a3 23 dd a4 48 28 63 25  |Xu%+c%.8.#..H(c%|
00009130  2c 72 25 2c 51 25 29 3a  3d a4 60 28 a4 4c 28 63  |,r%,Q%):=.`(.L(c|
00009140  25 2c 72 25 2c 51 25 29  29 0d 38 a4 18 dd a4 44  |%,r%,Q%)).8....D|
00009150  28 72 25 2c 51 25 29 3a  ea 63 25 3a c8 8e 72 25  |(r%,Q%):.c%:..r%|
00009160  ca 0d 38 a5 1a c9 31 2c  33 2c 35 2c 37 2c 38 2c  |..8...1,3,5,7,8,|
00009170  26 41 2c 26 43 3a 63 25  3d 33 31 0d 38 a6 13 c9  |&A,&C:c%=31.8...|
00009180  34 2c 36 2c 39 2c 26 42  3a 63 25 3d 33 30 0d 38  |4,6,9,&B:c%=30.8|
00009190  a7 14 c9 32 3a 63 25 3d  32 38 2d a4 42 79 28 51  |...2:c%=28-.By(Q|
000091a0  25 29 0d 38 a8 09 cb 3a  3d 63 25 0d 38 a9 2e dd  |%).8...:=c%.8...|
000091b0  a4 42 79 28 51 25 29 3d  28 28 51 25 83 34 3d 30  |.By(Q%)=((Q%.4=0|
000091c0  29 80 ac 28 51 25 83 26  36 34 3d 30 29 29 84 28  |)..(Q%.&64=0)).(|
000091d0  51 25 83 34 30 30 3d 30  29 0d 38 aa a4 dd f2 50  |Q%.400=0).8....P|
000091e0  28 f8 64 25 2c f8 7a 25  2c f8 65 25 2c 75 79 25  |(.d%,.z%,.e%,uy%|
000091f0  2c 48 75 25 2c 51 79 25  29 3a ea 69 69 25 2c 77  |,Hu%,Qy%):.ii%,w|
00009200  61 25 2c 55 25 3a 69 69  25 3d 64 25 3a 77 61 25  |a%,U%:ii%=d%:wa%|
00009210  3d 7a 25 3a 55 25 3d 65  25 3a 64 25 2b 3d 75 79  |=z%:U%=e%:d%+=uy|
00009220  25 3a 7a 25 2b 3d 48 75  25 3a 65 25 2b 3d 51 79  |%:z%+=Hu%:e%+=Qy|
00009230  25 3a c8 95 7a 25 3c 31  3a 7a 25 2b 3d 26 43 3a  |%:..z%<1:z%+=&C:|
00009240  65 25 2d 3d 31 3a ce 3a  c8 95 7a 25 3e 26 43 3a  |e%-=1:.:..z%>&C:|
00009250  7a 25 2d 3d 26 43 3a 65  25 2b 3d 31 3a ce 3a c8  |z%-=&C:e%+=1:.:.|
00009260  95 64 25 3c 31 3a 7a 25  2d 3d 31 3a e7 7a 25 3c  |.d%<1:z%-=1:.z%<|
00009270  31 8c 7a 25 3d 26 43 3a  65 25 2d 3d 31 0d 38 ab  |1.z%=&C:e%-=1.8.|
00009280  48 64 25 2b 3d a4 44 28  7a 25 2c 65 25 29 3a ce  |Hd%+=.D(z%,e%):.|
00009290  3a c8 95 64 25 3e a4 44  28 7a 25 2c 65 25 29 3a  |:..d%>.D(z%,e%):|
000092a0  64 25 2d 3d a4 44 28 7a  25 2c 65 25 29 3a 7a 25  |d%-=.D(z%,e%):z%|
000092b0  2b 3d 31 3a e7 7a 25 3e  26 43 8c 7a 25 3d 31 3a  |+=1:.z%>&C.z%=1:|
000092c0  65 25 2b 3d 31 0d 38 ac  2a ce 3a e7 65 25 3c 26  |e%+=1.8.*.:.e%<&|
000092d0  37 37 64 84 65 25 3e 26  66 66 66 8c 64 25 3d 69  |77d.e%>&fff.d%=i|
000092e0  69 25 3a 7a 25 3d 77 61  25 3a 65 25 3d 55 25 0d  |i%:z%=wa%:e%=U%.|
000092f0  38 ad 05 e1 0d 38 ae 19  dd a4 60 28 6a 25 29 3a  |8....8....`(j%):|
00009300  3d 28 28 6a 25 2d 31 29  83 37 29 2b 31 0d 38 af  |=((j%-1).7)+1.8.|
00009310  4f dd a4 55 28 63 25 2c  72 25 2c 51 25 2c 54 4a  |O..U(c%,r%,Q%,TJ|
00009320  25 29 3a 3d a4 74 28 a4  4c 28 63 25 2c 72 25 2c  |%):=.t(.L(c%,r%,|
00009330  51 25 29 2c 54 4a 25 29  2b 22 2c 20 22 2b a4 77  |Q%),TJ%)+", "+.w|
00009340  79 28 63 25 29 2b 22 20  22 2b a4 58 28 72 25 2c  |y(c%)+" "+.X(r%,|
00009350  54 4a 25 29 2b 22 20 22  2b c3 51 25 0d 38 b0 fb  |TJ%)+" "+.Q%.8..|
00009360  dd f2 59 5f 3a ea 43 25  2c 50 25 2c 43 2c 46 2c  |..Y_:.C%,P%,C,F,|
00009370  77 2c 5a 2c 4d 2c 42 2c  57 2c 51 2c 61 2c 4a 2c  |w,Z,M,B,W,Q,a,J,|
00009380  55 3a de 43 25 26 39 30  3a 43 3d 26 44 3a 46 3d  |U:.C%&90:C=&D:F=|
00009390  26 45 3a 77 3d 26 46 3a  5a 3d 32 3a 4d 3d 33 3a  |&E:w=&F:Z=2:M=3:|
000093a0  42 3d 34 3a 57 3d 35 3a  51 3d 30 3a 61 3d 31 3a  |B=4:W=5:Q=0:a=1:|
000093b0  4a 3d 36 3a 55 3d 37 3a  e3 53 25 3d 30 b8 32 88  |J=6:U=7:.S%=0.2.|
000093c0  32 3a 50 25 3d 43 25 3a  5b 4f 50 54 53 25 3a 2e  |2:P%=C%:[OPTS%:.|
000093d0  54 20 43 4d 50 20 57 2c  23 30 3a 52 53 42 4c 54  |T CMP W,#0:RSBLT|
000093e0  20 57 2c 57 2c 23 30 3a  53 55 42 4c 54 20 4d 2c  | W,W,#0:SUBLT M,|
000093f0  4d 2c 57 3a 43 4d 50 20  42 2c 23 30 3a 52 53 42  |M,W:CMP B,#0:RSB|
00009400  4c 54 20 42 2c 42 2c 23  30 3a 53 55 42 4c 54 20  |LT B,B,#0:SUBLT |
00009410  5a 2c 5a 2c 42 3a 41 44  44 20 55 2c 5a 2c 42 3a  |Z,Z,B:ADD U,Z,B:|
00009420  4c 44 52 20 4a 2c 5b 51  2c 23 32 38 5d 3a 43 4d  |LDR J,[Q,#28]:CM|
00009430  50 20 55 2c 4a 3a 42 4c  54 20 4e 3a 4c 44 52 20  |P U,J:BLT N:LDR |
00009440  4a 2c 5b 51 2c 23 33 36  5d 3a 43 4d 50 20 5a 2c  |J,[Q,#36]:CMP Z,|
00009450  4a 3a 42 47 54 20 4e 0d  38 b1 cb 4c 44 52 20 4a  |J:BGT N.8..LDR J|
00009460  2c 5b 51 2c 23 33 32 5d  3a 41 44 44 20 55 2c 4d  |,[Q,#32]:ADD U,M|
00009470  2c 57 3a 43 4d 50 20 55  2c 4a 3a 42 4c 54 20 4e  |,W:CMP U,J:BLT N|
00009480  3a 4c 44 52 20 4a 2c 5b  51 2c 23 34 30 5d 3a 43  |:LDR J,[Q,#40]:C|
00009490  4d 50 20 4d 2c 4a 3a 42  47 54 20 4e 3a 43 4d 50  |MP M,J:BGT N:CMP|
000094a0  20 61 2c 23 30 3a 4d 56  4e 45 51 30 2c 23 31 3a  | a,#0:MVNEQ0,#1:|
000094b0  ec 51 70 63 2c 46 3a 42  20 71 3a 2e 4e 20 4d 4f  |.Qpc,F:B q:.N MO|
000094c0  56 30 2c 23 30 3a 4d 4f  56 70 63 2c 46 3a 2e 71  |V0,#0:MOVpc,F:.q|
000094d0  20 4d 4f 56 31 2c 5a 3a  4d 4f 56 32 2c 4d 3a 4d  | MOV1,Z:MOV2,M:M|
000094e0  4f 56 30 2c 23 34 3a 53  57 49 20 36 39 3a 4d 4f  |OV0,#4:SWI 69:MO|
000094f0  56 31 2c 42 3a 4d 4f 56  32 2c 57 3a 4d 4f 56 30  |V1,B:MOV2,W:MOV0|
00009500  2c 23 39 36 2b 31 3a 53  57 49 20 36 39 3a 4d 56  |,#96+1:SWI 69:MV|
00009510  4e 30 2c 23 31 3a 4d 4f  56 70 63 2c 46 3a 5d ed  |N0,#1:MOVpc,F:].|
00009520  3a e1 0d 38 b2 2a dd a4  46 28 43 25 2c 44 25 2c  |:..8.*..F(C%,D%,|
00009530  45 25 2c 46 25 29 3a ea  41 25 2c 42 25 3a 41 25  |E%,F%):.A%,B%:A%|
00009540  3d 4b 25 3a 42 25 3d 30  3a 3d ba 54 0d 38 b3 2b  |=K%:B%=0:=.T.8.+|
00009550  dd f2 64 28 43 25 2c 44  25 2c 45 25 2c 46 25 29  |..d(C%,D%,E%,F%)|
00009560  3a ea 41 25 2c 42 25 3a  41 25 3d 4b 25 3a 42 25  |:.A%,B%:A%=K%:B%|
00009570  3d 31 3a d6 54 3a e1 0d  38 b4 42 dd f2 58 28 71  |=1:.T:..8.B..X(q|
00009580  25 29 3a 21 4a 25 3d 71  25 3a c8 99 26 34 30 30  |%):!J%=q%:..&400|
00009590  43 36 2c 2c 4a 25 3a e7  71 25 3d 72 5f 25 8c 54  |C6,,J%:.q%=r_%.T|
000095a0  75 25 3d a3 3a 21 4a 25  3d 76 5f 25 3a c8 99 26  |u%=.:!J%=v_%:..&|
000095b0  36 30 30 43 36 2c 2c 4a  25 0d 38 b5 10 e7 71 25  |600C6,,J%.8...q%|
000095c0  3d 69 25 8c 49 79 25 3d  a3 0d 38 b6 05 e1 0d 38  |=i%.Iy%=..8....8|
000095d0  b7 40 dd f2 77 75 28 42  25 29 3a ea 4e 25 2c 41  |.@..wu(B%):.N%,A|
000095e0  24 2c 57 79 25 2c 6c 25  3a 4e 25 3d 42 25 21 38  |$,Wy%,l%:N%=B%!8|
000095f0  34 3a 42 25 2b 3d 38 38  3a c8 95 4e 25 3a e7 28  |4:B%+=88:..N%:.(|
00009600  28 42 25 21 31 36 29 80  36 34 29 3e 30 8c 0d 38  |(B%!16).64)>0..8|
00009610  b8 83 41 24 3d 24 28 42  25 21 32 34 29 3a 6c 25  |..A$=$(B%!24):l%|
00009620  3d a0 28 22 26 22 2b c1  41 24 2c a7 41 24 2c 22  |=.("&"+.A$,.A$,"|
00009630  46 22 29 2b 31 2c 31 29  29 3a 57 79 25 3d a0 28  |F")+1,1)):Wy%=.(|
00009640  22 26 22 2b c1 41 24 2c  a7 41 24 2c 22 46 22 29  |"&"+.A$,.A$,"F")|
00009650  2b 32 2c 31 29 29 3a 42  25 21 31 36 3d 42 25 21  |+2,1)):B%!16=B%!|
00009660  31 36 80 ac 28 36 34 2b  28 26 46 46 3c 3c 32 34  |16..(64+(&FF<<24|
00009670  29 29 3a 42 25 21 31 36  3d 42 25 21 31 36 84 28  |)):B%!16=B%!16.(|
00009680  57 79 25 3c 3c 32 34 29  84 28 6c 25 3c 3c 32 38  |Wy%<<24).(l%<<28|
00009690  29 0d 38 b9 16 cd 3a 42  25 2b 3d 33 32 3a 4e 25  |).8...:B%+=32:N%|
000096a0  2d 3d 31 3a ce 3a e1 0d  38 ba 3d dd f2 4e 28 71  |-=1:.:..8.=..N(q|
000096b0  25 2c 61 5f 25 2c 4d 5f  25 2c 47 5f 25 2c 6f 79  |%,a_%,M_%,G_%,oy|
000096c0  25 29 3a c8 99 26 34 30  30 44 31 2c 71 25 2c 61  |%):..&400D1,q%,a|
000096d0  5f 25 2c 6f 79 25 2c 47  5f 25 2b 32 2c 4d 5f 25  |_%,oy%,G_%+2,M_%|
000096e0  2b 34 3a e1 0d 38 bb a1  dd f2 7a 28 71 25 2c 64  |+4:..8....z(q%,d|
000096f0  4a 25 2c 61 6c 25 29 3a  ea 57 25 2c 48 25 2c 58  |J%,al%):.W%,H%,X|
00009700  25 2c 59 25 2c 5a 25 3a  21 4a 25 3d 71 25 3a c8  |%,Y%,Z%:!J%=q%:.|
00009710  99 26 34 30 30 43 42 2c  2c 4a 25 3a 58 25 3d 33  |.&400CB,,J%:X%=3|
00009720  36 2a 28 28 4a 25 21 33  32 3e 3e 32 38 29 80 31  |6*((J%!32>>28).1|
00009730  29 3a 59 25 3d 33 36 2a  28 28 4a 25 21 33 32 3e  |):Y%=36*((J%!32>|
00009740  3e 32 36 29 80 31 29 2d  33 36 2a 28 28 4a 25 21  |>26).1)-36*((J%!|
00009750  33 32 3e 3e 33 30 29 80  31 29 3a 57 25 3d 4a 25  |32>>30).1):W%=J%|
00009760  21 26 43 2d 4a 25 21 34  2b 58 25 3a 48 25 3d 4a  |!&C-J%!4+X%:H%=J|
00009770  25 21 31 36 2d 4a 25 21  38 2b 59 25 3a e7 61 6c  |%!16-J%!8+Y%:.al|
00009780  25 3d 2d 31 8c 0d 38 bc  4a 4a 25 21 34 3d a4 67  |%=-1..8.JJ%!4=.g|
00009790  2f 32 2d 57 25 2f 32 3a  4a 25 21 26 43 3d 4a 25  |/2-W%/2:J%!&C=J%|
000097a0  21 34 2b 57 25 3a 4a 25  21 31 36 3d a4 64 2d 28  |!4+W%:J%!16=.d-(|
000097b0  28 a4 64 2d 26 38 34 29  2d 48 25 29 2f 32 2d 59  |(.d-&84)-H%)/2-Y|
000097c0  25 3a 4a 25 21 38 3d 4a  25 21 31 36 2d 48 25 0d  |%:J%!8=J%!16-H%.|
000097d0  38 bd 0d cc 3a e7 61 6c  25 3d 31 8c 0d 38 be 3b  |8...:.al%=1..8.;|
000097e0  c8 97 58 25 2c 59 25 2c  5a 25 3a 4a 25 21 34 3d  |..X%,Y%,Z%:J%!4=|
000097f0  58 25 2d 36 34 3a 4a 25  21 26 43 3d 4a 25 21 34  |X%-64:J%!&C=J%!4|
00009800  2b 57 25 3a 4a 25 21 38  3d 59 25 2d 48 25 3a 4a  |+W%:J%!8=Y%-H%:J|
00009810  25 21 31 36 3d 59 25 0d  38 bf 05 cd 0d 38 c0 17  |%!16=Y%.8....8..|
00009820  cd 3a e7 64 4a 25 3c 3e  30 8c 4a 25 21 32 38 3d  |.:.dJ%<>0.J%!28=|
00009830  64 4a 25 0d 38 c1 1d c8  99 26 34 30 30 43 35 2c  |dJ%.8....&400C5,|
00009840  2c 4a 25 3a e7 71 25 3d  69 25 8c 49 79 25 3d b9  |,J%:.q%=i%.Iy%=.|
00009850  0d 38 c2 36 e7 71 25 3d  72 5f 25 8c 54 75 25 3d  |.8.6.q%=r_%.Tu%=|
00009860  b9 3a 21 4b 25 3d 72 5f  25 3a c8 99 26 34 30 30  |.:!K%=r_%:..&400|
00009870  43 42 2c 2c 4b 25 3a 4b  25 21 32 38 3d 4a 25 21  |CB,,K%:K%!28=J%!|
00009880  32 38 3a f2 46 5f 0d 38  c3 05 e1 0d 38 c4 47 dd  |28:.F_.8....8.G.|
00009890  f2 77 79 28 65 69 25 2c  71 25 2c 61 25 2c 51 25  |.wy(ei%,q%,a%,Q%|
000098a0  2c 77 6c 25 2c 4a 69 25  2c 50 69 25 29 3a e7 76  |,wl%,Ji%,Pi%):.v|
000098b0  5f 25 3c 3e 30 80 76 5f  25 3c 3e 71 25 8c 21 4a  |_%<>0.v_%<>q%.!J|
000098c0  25 3d 76 5f 25 3a c8 99  26 36 30 30 43 36 2c 2c  |%=v_%:..&600C6,,|
000098d0  4a 25 0d 38 c5 41 76 5f  25 3d 71 25 3a 72 5f 25  |J%.8.Av_%=q%:r_%|
000098e0  3d 65 69 25 3a 47 6c 25  3d 61 25 3a 7a 6c 25 3d  |=ei%:Gl%=a%:zl%=|
000098f0  51 25 3a 54 75 25 3d 77  6c 25 3a 75 6c 25 3d 4a  |Q%:Tu%=wl%:ul%=J|
00009900  69 25 3a 6d 6c 25 3d 50  69 25 3a e7 76 5f 25 3c  |i%:ml%=Pi%:.v_%<|
00009910  3e 30 8c 0d 38 c6 77 21  4a 25 3d 76 5f 25 3a c8  |>0..8.w!J%=v_%:.|
00009920  99 26 34 30 30 43 42 2c  2c 4a 25 3a 44 61 25 3d  |.&400CB,,J%:Da%=|
00009930  4a 25 21 26 43 2d 4a 25  21 34 3a 4c 61 25 3d 4a  |J%!&C-J%!4:La%=J|
00009940  25 21 31 36 2d 4a 25 21  38 3a 21 4a 25 3d 72 5f  |%!16-J%!8:!J%=r_|
00009950  25 3a c8 99 26 34 30 30  43 42 2c 2c 4a 25 3a 4a  |%:..&400CB,,J%:J|
00009960  25 21 34 2b 3d 61 25 3a  4a 25 21 31 36 2b 3d 51  |%!4+=a%:J%!16+=Q|
00009970  25 3a e7 77 6c 25 8c 21  4a 25 3d 71 25 3a c8 99  |%:.wl%.!J%=q%:..|
00009980  26 34 30 30 43 35 2c 2c  4a 25 0d 38 c7 07 cd 3a  |&400C5,,J%.8...:|
00009990  e1 0d 38 c8 19 dd f2 46  5f 3a e7 76 5f 25 3c 3e  |..8....F_:.v_%<>|
000099a0  30 80 21 4b 25 3d 72 5f  25 8c 0d 38 c9 69 21 4a  |0.!K%=r_%..8.i!J|
000099b0  25 3d 76 5f 25 3a 4a 25  21 34 3d 4b 25 21 34 2b  |%=v_%:J%!4=K%!4+|
000099c0  47 6c 25 3a 4a 25 21 31  36 3d 4b 25 21 31 36 2b  |Gl%:J%!16=K%!16+|
000099d0  7a 6c 25 3a 4a 25 21 26  43 3d 4a 25 21 34 2b 44  |zl%:J%!&C=J%!4+D|
000099e0  61 25 3a 4a 25 21 38 3d  4a 25 21 31 36 2d 4c 61  |a%:J%!8=J%!16-La|
000099f0  25 3a 4a 25 21 32 30 3d  30 3a 4a 25 21 32 34 3d  |%:J%!20=0:J%!24=|
00009a00  30 3a 4a 25 21 32 38 3d  4b 25 21 32 38 3a e7 75  |0:J%!28=K%!28:.u|
00009a10  6c 25 8c 0d 38 ca 41 4a  25 21 34 2d 3d 4b 25 21  |l%..8.AJ%!4-=K%!|
00009a20  32 30 3a 4a 25 21 26 43  2d 3d 4b 25 21 32 30 3a  |20:J%!&C-=K%!20:|
00009a30  e7 4a 25 21 34 3c 4b 25  21 34 8c 4a 25 21 32 30  |.J%!4<K%!4.J%!20|
00009a40  3d 4b 25 21 32 30 2d 47  6c 25 3a 4a 25 21 34 3d  |=K%!20-Gl%:J%!4=|
00009a50  4b 25 21 34 0d 38 cb 1c  e7 4a 25 21 26 43 3e 4b  |K%!4.8...J%!&C>K|
00009a60  25 21 26 43 8c 4a 25 21  26 43 3d 4b 25 21 26 43  |%!&C.J%!&C=K%!&C|
00009a70  0d 38 cc 0b cd 3a e7 6d  6c 25 8c 0d 38 cd 47 4a  |.8...:.ml%..8.GJ|
00009a80  25 21 31 36 2d 3d 4b 25  21 32 34 3a 4a 25 21 38  |%!16-=K%!24:J%!8|
00009a90  2d 3d 4b 25 21 32 34 3a  e7 4a 25 21 31 36 3e 4b  |-=K%!24:.J%!16>K|
00009aa0  25 21 31 36 8c 4a 25 21  32 34 3d 4b 25 21 31 36  |%!16.J%!24=K%!16|
00009ab0  2d 4a 25 21 31 36 3a 4a  25 21 31 36 3d 4b 25 21  |-J%!16:J%!16=K%!|
00009ac0  31 36 0d 38 ce 18 e7 4a  25 21 38 3c 4b 25 21 38  |16.8...J%!8<K%!8|
00009ad0  8c 4a 25 21 38 3d 4b 25  21 38 0d 38 cf 1c cd 3a  |.J%!8=K%!8.8...:|
00009ae0  c8 99 26 34 30 30 43 35  2c 2c 4a 25 3a 4b 25 21  |..&400C5,,J%:K%!|
00009af0  32 38 3d 76 5f 25 0d 38  d0 07 cd 3a e1 0d 38 d1  |28=v_%.8...:..8.|
00009b00  2d dd f2 6a 4a 3a ea 41  25 3a de 76 6c 25 32 35  |-..jJ:.A%:.vl%25|
00009b10  36 3a e3 41 25 3d 30 b8  32 35 36 88 34 3a 76 6c  |6:.A%=0.256.4:vl|
00009b20  25 21 41 25 3d 30 3a ed  3a e1 0d 38 d2 33 dd f2  |%!A%=0:.:..8.3..|
00009b30  74 75 28 74 61 25 2c 62  24 29 3a 76 6c 25 3d 2d  |tu(ta%,b$):vl%=-|
00009b40  31 3a c8 99 26 34 30 30  44 39 2c 2c 62 24 3a f2  |1:..&400D9,,b$:.|
00009b50  6a 75 3a c8 99 26 34 30  30 44 41 3a e1 0d 38 d3  |ju:..&400DA:..8.|
00009b60  24 dd f2 66 28 57 25 2c  48 79 25 2c 41 24 2c 6d  |$..f(W%,Hy%,A$,m|
00009b70  4a 25 29 3a 24 48 79 25  3d 41 24 3a e7 6d 4a 25  |J%):$Hy%=A$:.mJ%|
00009b80  8c 0d 38 d4 3d 21 4b 25  3d 57 25 3a c8 99 26 34  |..8.=!K%=W%:..&4|
00009b90  30 30 43 42 2c 2c 4b 25  3a c8 99 26 34 30 30 44  |00CB,,K%:..&400D|
00009ba0  31 2c 2d 31 2c 4b 25 21  34 2c 4b 25 21 31 36 2c  |1,-1,K%!4,K%!16,|
00009bb0  4b 25 21 26 43 2c 4b 25  21 31 36 2b 34 34 0d 38  |K%!&C,K%!16+44.8|
00009bc0  d5 07 cd 3a e1 0d 38 d6  20 dd f2 56 28 42 25 2c  |...:..8. ..V(B%,|
00009bd0  46 25 29 3a c8 99 26 34  30 30 46 33 2c 2c 42 25  |F%):..&400F3,,B%|
00009be0  2c 46 25 3a e1 0d 38 d7  39 dd a4 50 28 62 24 2c  |,F%:..8.9..P(b$,|
00009bf0  57 25 2c 48 25 29 3a ea  46 25 3a c8 99 26 34 30  |W%,H%):.F%:..&40|
00009c00  30 38 31 2c 2c 62 24 2c  31 36 2a 57 25 2c 31 36  |081,,b$,16*W%,16|
00009c10  2a 48 25 2c 30 2c 30 b8  46 25 3a 3d 46 25 0d 38  |*H%,0,0.F%:=F%.8|
00009c20  d8 19 dd f2 55 28 48 25  29 3a c8 99 26 34 30 30  |....U(H%):..&400|
00009c30  38 32 2c 48 25 3a e1 0d  38 d9 2a dd f2 66 79 28  |82,H%:..8.*..fy(|
00009c40  f8 58 25 2c f8 59 25 29  3a c8 99 26 34 30 30 38  |.X%,.Y%):..&4008|
00009c50  38 2c 2c 58 25 2c 59 25  b8 2c 58 25 2c 59 25 3a  |8,,X%,Y%.,X%,Y%:|
00009c60  e1 0d 38 da bb dd f2 4c  28 67 79 25 2c 57 24 2c  |..8....L(gy%,W$,|
00009c70  7a 75 25 2c 61 25 2c 51  25 29 3a ea 61 5f 25 2c  |zu%,a%,Q%):.a_%,|
00009c80  6f 79 25 2c 47 5f 25 2c  4d 5f 25 2c 5a 4a 25 3a  |oy%,G_%,M_%,ZJ%:|
00009c90  c8 99 26 34 30 30 38 41  2c 67 79 25 3a c8 99 26  |..&4008A,gy%:..&|
00009ca0  34 30 30 39 37 2c 2c 57  24 b8 2c 61 5f 25 2c 6f  |40097,,W$.,a_%,o|
00009cb0  79 25 2c 47 5f 25 2c 4d  5f 25 3a c8 99 26 34 30  |y%,G_%,M_%:..&40|
00009cc0  30 38 38 2c 2c 61 5f 25  2c 6f 79 25 b8 2c 61 5f  |088,,a_%,oy%.,a_|
00009cd0  25 2c 6f 79 25 3a c8 99  26 34 30 30 38 38 2c 2c  |%,oy%:..&40088,,|
00009ce0  47 5f 25 2c 4d 5f 25 b8  2c 47 5f 25 2c 4d 5f 25  |G_%,M_%.,G_%,M_%|
00009cf0  3a 5a 4a 25 3d 47 5f 25  2b 61 5f 25 3a e7 7a 75  |:ZJ%=G_%+a_%:.zu|
00009d00  25 3d 30 8c 61 25 2d 3d  5a 4a 25 2f 32 8b e7 7a  |%=0.a%-=ZJ%/2..z|
00009d10  75 25 3e 30 8c 61 25 2d  3d 5a 4a 25 0d 38 db 41  |u%>0.a%-=ZJ%.8.A|
00009d20  e7 a4 46 28 61 25 2c 51  25 2d 4d 5f 25 2b 6f 79  |..F(a%,Q%-M_%+oy|
00009d30  25 2c 5a 4a 25 2c 4d 5f  25 2d 6f 79 25 29 8c c8  |%,ZJ%,M_%-oy%)..|
00009d40  99 26 34 30 30 38 36 2c  67 79 25 2c 57 24 2c 31  |.&40086,gy%,W$,1|
00009d50  3c 3c 34 2c 61 25 2c 51  25 2d 4d 5f 25 0d 38 dc  |<<4,a%,Q%-M_%.8.|
00009d60  05 e1 0d 38 dd f5 dd f2  6a 79 28 67 79 25 2c 57  |...8....jy(gy%,W|
00009d70  24 2c 54 61 25 2c 72 69  25 2c 61 25 2c 51 25 2c  |$,Ta%,ri%,a%,Q%,|
00009d80  60 25 29 3a ea 61 5f 25  2c 6f 79 25 2c 47 5f 25  |`%):.a_%,oy%,G_%|
00009d90  2c 4d 5f 25 2c 5a 4a 25  3a 21 4a 25 3d 30 3a 4a  |,M_%,ZJ%:!J%=0:J|
00009da0  25 21 34 3d 2d 60 25 3c  3c 31 36 3a 4a 25 21 38  |%!4=-`%<<16:J%!8|
00009db0  3d 60 25 3c 3c 31 36 3a  4a 25 21 26 43 3d 30 3a  |=`%<<16:J%!&C=0:|
00009dc0  4a 25 21 31 36 3d 30 3a  4a 25 21 32 30 3d 30 3a  |J%!16=0:J%!20=0:|
00009dd0  c8 99 26 34 30 30 38 41  2c 67 79 25 3a c8 99 26  |..&4008A,gy%:..&|
00009de0  34 30 30 39 37 2c 2c 57  24 b8 2c 61 5f 25 2c 6f  |40097,,W$.,a_%,o|
00009df0  79 25 2c 47 5f 25 2c 4d  5f 25 3a c8 99 26 34 30  |y%,G_%,M_%:..&40|
00009e00  30 38 38 2c 2c 61 5f 25  2c 6f 79 25 b8 2c 6f 79  |088,,a_%,oy%.,oy|
00009e10  25 2c 61 5f 25 3a c8 99  26 34 30 30 38 38 2c 2c  |%,a_%:..&40088,,|
00009e20  47 5f 25 2c 4d 5f 25 b8  2c 4d 5f 25 2c 47 5f 25  |G_%,M_%.,M_%,G_%|
00009e30  3a e7 54 61 25 3d 30 8c  61 25 2d 3d 60 25 2a 47  |:.Ta%=0.a%-=`%*G|
00009e40  5f 25 2f 32 8b e7 54 61  25 3d 60 25 8c 61 25 2d  |_%/2..Ta%=`%.a%-|
00009e50  3d 60 25 2a 47 5f 25 0d  38 de 2c e7 72 69 25 3d  |=`%*G_%.8.,.ri%=|
00009e60  30 8c 51 25 2b 3d 60 25  2a 4d 5f 25 2f 32 8b e7  |0.Q%+=`%*M_%/2..|
00009e70  72 69 25 3d 2d 60 25 8c  51 25 2d 3d 72 69 25 2a  |ri%=-`%.Q%-=ri%*|
00009e80  4d 5f 25 0d 38 df 2e c8  99 26 34 30 30 38 36 2c  |M_%.8....&40086,|
00009e90  67 79 25 2c 57 24 2c 28  31 3c 3c 34 29 2b 28 31  |gy%,W$,(1<<4)+(1|
00009ea0  3c 3c 36 29 2c 61 25 2c  51 25 2c 30 2c 4a 25 3a  |<<6),a%,Q%,0,J%:|
00009eb0  e1 0d 38 e0 2d dd f2 63  28 50 6c 25 2c 57 24 2c  |..8.-..c(Pl%,W$,|
00009ec0  5f 25 2c 55 25 2c 78 25  2c 6e 25 29 3a e7 a4 46  |_%,U%,x%,n%):..F|
00009ed0  28 5f 25 2c 55 25 2c 78  25 2c 6e 25 29 8c 0d 38  |(_%,U%,x%,n%)..8|
00009ee0  e1 8d ea 41 25 2c 67 79  25 2c 61 5f 25 2c 6f 79  |...A%,gy%,a_%,oy|
00009ef0  25 2c 47 5f 25 2c 4d 5f  25 2c 5a 4a 25 2c 6d 69  |%,G_%,M_%,ZJ%,mi|
00009f00  25 2c 4f 6c 25 2c 5f 6c  25 3a c8 99 26 34 30 30  |%,Ol%,_l%:..&400|
00009f10  38 41 2c 50 6c 25 3a 67  79 25 3d 50 6c 25 3a c8  |8A,Pl%:gy%=Pl%:.|
00009f20  99 26 34 30 30 39 37 2c  50 6c 25 2c 57 24 b8 2c  |.&40097,Pl%,W$.,|
00009f30  61 5f 25 2c 6f 79 25 2c  47 5f 25 2c 4d 5f 25 3a  |a_%,oy%,G_%,M_%:|
00009f40  c8 99 26 34 30 30 38 38  2c 2c 47 5f 25 2b 61 5f  |..&40088,,G_%+a_|
00009f50  25 2c 4d 5f 25 2b 6f 79  25 b8 2c 5a 4a 25 2c 6d  |%,M_%+oy%.,ZJ%,m|
00009f60  69 25 3a e7 5a 4a 25 3e  78 25 8c 0d 38 e2 ae c8  |i%:.ZJ%>x%..8...|
00009f70  99 26 34 30 30 38 33 2c  50 6c 25 2c 4a 25 b8 2c  |.&40083,Pl%,J%.,|
00009f80  2c 4f 6c 25 2c 5f 6c 25  3a c8 95 5a 4a 25 3e 78  |,Ol%,_l%:..ZJ%>x|
00009f90  25 3a 4f 6c 25 3d 4f 6c  25 2a 30 2e 39 35 3a 5f  |%:Ol%=Ol%*0.95:_|
00009fa0  6c 25 3d 5f 6c 25 2a 30  2e 39 35 3a c8 99 26 34  |l%=_l%*0.95:..&4|
00009fb0  30 30 38 31 2c 2c 4a 25  2c 4f 6c 25 2c 5f 6c 25  |0081,,J%,Ol%,_l%|
00009fc0  3a c8 99 26 34 30 30 39  37 2c 2c 57 24 b8 67 79  |:..&40097,,W$.gy|
00009fd0  25 2c 61 5f 25 2c 6f 79  25 2c 47 5f 25 2c 4d 5f  |%,a_%,oy%,G_%,M_|
00009fe0  25 3a c8 99 26 34 30 30  38 38 2c 2c 47 5f 25 2b  |%:..&40088,,G_%+|
00009ff0  61 5f 25 2c 4d 5f 25 2b  6f 79 25 b8 2c 5a 4a 25  |a_%,M_%+oy%.,ZJ%|
0000a000  2c 6d 69 25 3a e7 5a 4a  25 3e 78 25 8c c8 99 26  |,mi%:.ZJ%>x%...&|
0000a010  34 30 30 38 32 2c 67 79  25 0d 38 e3 05 ce 0d 38  |40082,gy%.8....8|
0000a020  e4 34 cd 3a c8 99 26 34  30 30 38 36 2c 2c 57 24  |.4.:..&40086,,W$|
0000a030  2c 31 3c 3c 34 2c 5f 25  2c 55 25 3a e7 67 79 25  |,1<<4,_%,U%:.gy%|
0000a040  3c 3e 50 6c 25 8c c8 99  26 34 30 30 38 32 2c 67  |<>Pl%...&40082,g|
0000a050  79 25 0d 38 e5 07 cd 3a  e1 0d 38 e6 d9 dd f2 43  |y%.8...:..8....C|
0000a060  79 28 61 25 2c 51 25 2c  78 25 2c 6e 25 2c 60 25  |y(a%,Q%,x%,n%,`%|
0000a070  29 3a ec 61 25 2b 60 25  2c 51 25 3a df 42 59 78  |):.a%+`%,Q%:.BYx|
0000a080  25 2d 32 2a 60 25 2c 30  3a ec 42 59 60 25 2c 2d  |%-2*`%,0:.BY`%,-|
0000a090  60 25 3a df 42 59 30 2c  2d 6e 25 2b 32 2a 60 25  |`%:.BY0,-n%+2*`%|
0000a0a0  3a ec 42 59 2d 60 25 2c  2d 60 25 3a df 42 59 2d  |:.BY-`%,-`%:.BY-|
0000a0b0  78 25 2b 32 2a 60 25 2c  30 3a ec 42 59 2d 60 25  |x%+2*`%,0:.BY-`%|
0000a0c0  2c 60 25 3a df 42 59 30  2c 6e 25 2d 32 2a 60 25  |,`%:.BY0,n%-2*`%|
0000a0d0  3a ec 61 25 2b 60 25 2c  51 25 2d 60 25 3a ec 42  |:.a%+`%,Q%-`%:.B|
0000a0e0  59 30 2c 60 25 3a f0 26  41 31 2c 2d 60 25 2c 2d  |Y0,`%:.&A1,-`%,-|
0000a0f0  60 25 3a ec 61 25 2b 78  25 2d 60 25 2c 51 25 2d  |`%:.a%+x%-`%,Q%-|
0000a100  60 25 3a ec 42 59 60 25  2c 30 3a f0 26 41 31 2c  |`%:.BY`%,0:.&A1,|
0000a110  2d 60 25 2c 60 25 3a ec  61 25 2b 78 25 2d 60 25  |-`%,`%:.a%+x%-`%|
0000a120  2c 51 25 2d 6e 25 2b 60  25 3a ec 42 59 30 2c 2d  |,Q%-n%+`%:.BY0,-|
0000a130  60 25 0d 38 e7 35 f0 26  41 31 2c 60 25 2c 60 25  |`%.8.5.&A1,`%,`%|
0000a140  3a ec 61 25 2b 60 25 2c  51 25 2d 6e 25 2b 60 25  |:.a%+`%,Q%-n%+`%|
0000a150  3a ec 42 59 2d 60 25 2c  30 3a f0 26 41 31 2c 60  |:.BY-`%,0:.&A1,`|
0000a160  25 2c 2d 60 25 3a e1 0d  38 e8 0a dd f2 59 4a 3a  |%,-`%:..8....YJ:|
0000a170  e1 0d 38 e9 0f dd f2 75  75 3a c8 8e 42 69 25 ca  |..8....uu:..Bi%.|
0000a180  0d 38 ea 0f c9 33 3a f2  72 5f 28 76 4a 25 29 0d  |.8...3:.r_(vJ%).|
0000a190  38 eb 07 cb 3a e1 0d 38  ec 1c dd f2 78 3a 76 4a  |8...:..8....x:vJ|
0000a1a0  25 3d 2d 31 3a 42 69 25  3d 2d 31 3a e7 ac 42 75  |%=-1:Bi%=-1:..Bu|
0000a1b0  25 8c 0d 38 ed 1f 76 4a  25 3d a4 69 79 28 5f 4a  |%..8..vJ%=.iy(_J|
0000a1c0  25 29 3a e7 76 4a 25 3c  3e 2d 31 8c 42 69 25 3d  |%):.vJ%<>-1.Bi%=|
0000a1d0  33 0d 38 ee 08 cc f2 73  4a 0d 38 ef 07 cd 3a e1  |3.8....sJ.8...:.|
0000a1e0  0d 38 f0 18 dd f2 51 5f  28 4c 75 25 29 3a c8 8e  |.8....Q_(Lu%):..|
0000a1f0  5a 25 28 4c 75 25 29 ca  0d 38 f1 0a c9 32 3a f2  |Z%(Lu%)..8...2:.|
0000a200  65 75 0d 38 f2 0a c9 33  3a f2 6b 75 0d 38 f3 07  |eu.8...3:.ku.8..|
0000a210  cb 3a e1 0d 38 f4 27 dd  f2 6f 79 28 79 25 2c 5f  |.:..8.'..oy(y%,_|
0000a220  25 2c 55 25 29 3a c8 99  26 34 30 30 45 36 2c 30  |%,U%):..&400E6,0|
0000a230  3a c8 8e 5a 25 28 74 25  29 ca 0d 38 f5 17 c9 32  |:..Z%(t%)..8...2|
0000a240  3a f2 60 5f 28 76 25 2c  79 25 2c 5f 25 2c 55 25  |:.`_(v%,y%,_%,U%|
0000a250  29 0d 38 f6 17 c9 35 3a  f2 6f 4a 28 76 25 2c 79  |).8...5:.oJ(v%,y|
0000a260  25 2c 5f 25 2c 55 25 29  0d 38 f7 17 c9 31 3a f2  |%,_%,U%).8...1:.|
0000a270  43 4a 28 76 25 2c 79 25  2c 5f 25 2c 55 25 29 0d  |CJ(v%,y%,_%,U%).|
0000a280  38 f8 17 c9 33 3a f2 68  5f 28 76 25 2c 79 25 2c  |8...3:.h_(v%,y%,|
0000a290  5f 25 2c 55 25 29 0d 38  f9 07 cb 3a e1 0d 38 fa  |_%,U%).8...:..8.|
0000a2a0  1a dd a4 6e 79 28 73 25  2c 42 79 25 29 3a c8 8e  |...ny(s%,By%):..|
0000a2b0  5a 25 28 74 25 29 ca 0d  38 fb 15 c9 32 3a 6f 25  |Z%(t%)..8...2:o%|
0000a2c0  3d a4 73 79 28 73 25 2c  42 79 25 29 0d 38 fc 15  |=.sy(s%,By%).8..|
0000a2d0  c9 35 3a 6f 25 3d a4 6d  79 28 73 25 2c 42 79 25  |.5:o%=.my(s%,By%|
0000a2e0  29 0d 38 fd 15 c9 31 3a  6f 25 3d a4 62 79 28 73  |).8...1:o%=.by(s|
0000a2f0  25 2c 42 79 25 29 0d 38  fe 15 c9 33 3a 6f 25 3d  |%,By%).8...3:o%=|
0000a300  a4 47 5f 28 73 25 2c 42  79 25 29 0d 38 ff 09 cb  |.G_(s%,By%).8...|
0000a310  3a 3d 6f 25 0d 39 00 19  dd f2 68 75 28 6c 25 2c  |:=o%.9....hu(l%,|
0000a320  41 25 29 3a c8 8e 5a 25  28 41 25 29 ca 0d 39 01  |A%):..Z%(A%)..9.|
0000a330  11 c9 32 3a f2 66 5f 28  6c 25 2c 41 25 29 0d 39  |..2:.f_(l%,A%).9|
0000a340  02 11 c9 35 3a f2 51 4a  28 6c 25 2c 41 25 29 0d  |...5:.QJ(l%,A%).|
0000a350  39 03 11 c9 31 3a f2 6b  5f 28 6c 25 2c 41 25 29  |9...1:.k_(l%,A%)|
0000a360  0d 39 04 11 c9 33 3a f2  5f 75 28 6c 25 2c 41 25  |.9...3:._u(l%,A%|
0000a370  29 0d 39 05 07 cb 3a e1  0d 39 06 1b dd a4 4c 5f  |).9...:..9....L_|
0000a380  28 53 25 29 3a ea 43 6c  25 3a c8 8e 5a 25 28 53  |(S%):.Cl%:..Z%(S|
0000a390  25 29 ca 0d 39 07 0e c9  32 3a 43 6c 25 3d a4 79  |%)..9...2:Cl%=.y|
0000a3a0  79 0d 39 08 0e c9 35 3a  43 6c 25 3d a4 52 79 0d  |y.9...5:Cl%=.Ry.|
0000a3b0  39 09 0e c9 31 3a 43 6c  25 3d a4 58 5f 0d 39 0a  |9...1:Cl%=.X_.9.|
0000a3c0  0e c9 33 3a 43 6c 25 3d  a4 4a 5f 0d 39 0b 0a cb  |..3:Cl%=.J_.9...|
0000a3d0  3a 3d 43 6c 25 0d 39 0c  18 dd f2 6d 79 28 4c 75  |:=Cl%.9....my(Lu|
0000a3e0  25 29 3a c8 8e 5a 25 28  4c 75 25 29 ca 0d 39 0d  |%):..Z%(Lu%)..9.|
0000a3f0  0a c9 32 3a f2 43 5f 0d  39 0e 0a c9 33 3a f2 6b  |..2:.C_.9...3:.k|
0000a400  4a 0d 39 0f 07 cb 3a e1  0d 39 10 27 dd f2 69 79  |J.9...:..9.'..iy|
0000a410  28 67 25 2c 79 25 2c 61  25 2c 51 25 2c 69 5f 25  |(g%,y%,a%,Q%,i_%|
0000a420  2c 71 4a 25 29 3a c8 8e  5a 25 28 74 25 29 ca 0d  |,qJ%):..Z%(t%)..|
0000a430  39 11 1f c9 32 3a f2 71  5f 28 67 25 2c 79 25 2c  |9...2:.q_(g%,y%,|
0000a440  61 25 2c 51 25 2c 69 5f  25 2c 71 4a 25 29 0d 39  |a%,Q%,i_%,qJ%).9|
0000a450  12 1f c9 35 3a f2 79 5f  28 67 25 2c 79 25 2c 61  |...5:.y_(g%,y%,a|
0000a460  25 2c 51 25 2c 69 5f 25  2c 71 4a 25 29 0d 39 13  |%,Q%,i_%,qJ%).9.|
0000a470  1f c9 31 3a f2 55 75 28  67 25 2c 79 25 2c 61 25  |..1:.Uu(g%,y%,a%|
0000a480  2c 51 25 2c 69 5f 25 2c  71 4a 25 29 0d 39 14 1f  |,Q%,i_%,qJ%).9..|
0000a490  c9 33 3a f2 7a 75 28 67  25 2c 79 25 2c 61 25 2c  |.3:.zu(g%,y%,a%,|
0000a4a0  51 25 2c 69 5f 25 2c 71  4a 25 29 0d 39 15 07 cb  |Q%,i_%,qJ%).9...|
0000a4b0  3a e1 0d 39 16 16 dd f2  4b 5f 28 70 25 29 3a c8  |:..9....K_(p%):.|
0000a4c0  8e 5a 25 28 74 25 29 ca  0d 39 17 0d c9 32 3a f2  |.Z%(t%)..9...2:.|
0000a4d0  6a 28 70 25 29 0d 39 18  0e c9 35 3a f2 56 79 28  |j(p%).9...5:.Vy(|
0000a4e0  70 25 29 0d 39 19 0e c9  31 3a f2 52 79 28 70 25  |p%).9...1:.Ry(p%|
0000a4f0  29 0d 39 1a 0e c9 33 3a  f2 51 79 28 70 25 29 0d  |).9...3:.Qy(p%).|
0000a500  39 1b 07 cb 3a e1 0d 39  1c 24 dd f2 58 4a 28 71  |9...:..9.$..XJ(q|
0000a510  25 2c 73 25 2c 67 25 2c  59 79 25 2c 72 79 25 29  |%,s%,g%,Yy%,ry%)|
0000a520  3a c8 8e 5a 25 28 74 25  29 ca 0d 39 1d 1c c9 32  |:..Z%(t%)..9...2|
0000a530  3a f2 53 6c 28 71 25 2c  73 25 2c 67 25 2c 59 79  |:.Sl(q%,s%,g%,Yy|
0000a540  25 2c 72 79 25 29 0d 39  1e 07 cb 3a e1 0d 39 1f  |%,ry%).9...:..9.|
0000a550  27 dd a4 63 79 28 71 25  2c 73 25 2c 42 79 25 29  |'..cy(q%,s%,By%)|
0000a560  3a ea 41 25 3a e3 41 25  3d 31 b8 42 5f 25 3a e7  |:.A%:.A%=1.B_%:.|
0000a570  ac 6f 25 8c 0d 39 20 0d  c8 8e 5a 25 28 41 25 29  |.o%..9 ...Z%(A%)|
0000a580  ca 0d 39 21 18 c9 32 3a  6f 25 3d a4 78 79 28 71  |..9!..2:o%=.xy(q|
0000a590  25 2c 73 25 2c 42 79 25  29 0d 39 22 18 c9 35 3a  |%,s%,By%).9"..5:|
0000a5a0  6f 25 3d a4 42 5f 28 71  25 2c 73 25 2c 42 79 25  |o%=.B_(q%,s%,By%|
0000a5b0  29 0d 39 23 18 c9 31 3a  6f 25 3d a4 72 79 28 71  |).9#..1:o%=.ry(q|
0000a5c0  25 2c 73 25 2c 42 79 25  29 0d 39 24 18 c9 33 3a  |%,s%,By%).9$..3:|
0000a5d0  6f 25 3d a4 50 5f 28 71  25 2c 73 25 2c 42 79 25  |o%=.P_(q%,s%,By%|
0000a5e0  29 0d 39 25 05 cb 0d 39  26 0b cd 3a ed 3a 3d 6f  |).9%...9&..:.:=o|
0000a5f0  25 0d 39 27 1a dd f2 54  4a 3a f2 54 75 3a f2 53  |%.9'...TJ:.Tu:.S|
0000a600  75 3a f2 72 75 3a f2 6e  4a 3a e1 0d 39 28 20 dd  |u:.ru:.nJ:..9( .|
0000a610  f2 78 4a 3a ea 41 25 3a  e3 41 25 3d 31 b8 42 5f  |.xJ:.A%:.A%=1.B_|
0000a620  25 3a c8 8e 5a 25 28 41  25 29 ca 0d 39 29 0e c9  |%:..Z%(A%)..9)..|
0000a630  32 3a f2 41 4a 28 41 25  29 0d 39 2a 0e c9 35 3a  |2:.AJ(A%).9*..5:|
0000a640  f2 44 75 28 41 25 29 0d  39 2b 0e c9 31 3a f2 42  |.Du(A%).9+..1:.B|
0000a650  4a 28 41 25 29 0d 39 2c  0e c9 33 3a f2 64 5f 28  |J(A%).9,..3:.d_(|
0000a660  41 25 29 0d 39 2d 09 cb  3a ed 3a e1 0d 39 2e 16  |A%).9-..:.:..9..|
0000a670  dd f2 73 75 3a f2 44 4a  3a f2 4f 5f 3a f2 70 4a  |..su:.DJ:.O_:.pJ|
0000a680  3a e1 0d 39 2f 72 dd f2  71 75 28 77 25 29 3a d5  |:..9/r..qu(w%):.|
0000a690  23 77 25 2c 22 41 64 64  72 65 73 73 20 62 6f 6f  |#w%,"Address boo|
0000a6a0  6b 22 3a f2 69 75 28 77  25 29 3a d5 23 77 25 2c  |k":.iu(w%):.#w%,|
0000a6b0  22 41 6e 6e 69 76 65 72  73 61 72 79 22 3a f2 77  |"Anniversary":.w|
0000a6c0  4a 28 77 25 29 3a d5 23  77 25 2c 22 43 61 6c 65  |J(w%):.#w%,"Cale|
0000a6d0  6e 64 61 72 22 3a f2 76  5f 28 77 25 29 3a d5 23  |ndar":.v_(w%):.#|
0000a6e0  77 25 2c 22 44 69 61 72  79 22 3a f2 42 75 28 77  |w%,"Diary":.Bu(w|
0000a6f0  25 29 3a e1 0d 39 30 17  dd f2 47 4a 28 53 79 24  |%):..90...GJ(Sy$|
0000a700  2c 77 25 29 3a c8 8e 53  79 24 ca 0d 39 31 1b c9  |,w%):..Sy$..91..|
0000a710  22 41 64 64 72 65 73 73  20 62 6f 6f 6b 22 3a f2  |"Address book":.|
0000a720  67 75 28 77 25 29 0d 39  32 1a c9 22 41 6e 6e 69  |gu(w%).92.."Anni|
0000a730  76 65 72 73 61 72 79 22  3a f2 4a 75 28 77 25 29  |versary":.Ju(w%)|
0000a740  0d 39 33 17 c9 22 43 61  6c 65 6e 64 61 72 22 3a  |.93.."Calendar":|
0000a750  f2 65 4a 28 77 25 29 0d  39 34 14 c9 22 44 69 61  |.eJ(w%).94.."Dia|
0000a760  72 79 22 3a f2 66 4a 28  77 25 29 0d 39 35 07 cb  |ry":.fJ(w%).95..|
0000a770  3a e1 0d 39 36 1e dd f2  61 4a 28 71 25 2c 73 25  |:..96...aJ(q%,s%|
0000a780  2c 67 25 2c 61 25 2c 51  25 29 3a c8 8e 71 25 ca  |,g%,a%,Q%):..q%.|
0000a790  0d 39 37 1e c9 41 25 28  32 29 3a f2 5a 6c 28 71  |.97..A%(2):.Zl(q|
0000a7a0  25 2c 73 25 2c 67 25 2c  61 25 2c 51 25 29 0d 39  |%,s%,g%,a%,Q%).9|
0000a7b0  38 1e c9 41 25 28 33 29  3a f2 71 4a 28 71 25 2c  |8..A%(3):.qJ(q%,|
0000a7c0  73 25 2c 67 25 2c 61 25  2c 51 25 29 0d 39 39 1e  |s%,g%,a%,Q%).99.|
0000a7d0  c9 41 25 28 34 29 3a f2  64 75 28 71 25 2c 73 25  |.A%(4):.du(q%,s%|
0000a7e0  2c 67 25 2c 61 25 2c 51  25 29 0d 39 3a 1e c9 41  |,g%,a%,Q%).9:..A|
0000a7f0  25 28 35 29 3a f2 47 75  28 71 25 2c 73 25 2c 67  |%(5):.Gu(q%,s%,g|
0000a800  25 2c 61 25 2c 51 25 29  0d 39 3b 07 cb 3a e1 0d  |%,a%,Q%).9;..:..|
0000a810  39 3c 19 dd a4 64 79 28  71 25 2c 73 25 2c 42 79  |9<...dy(q%,s%,By|
0000a820  25 29 3a c8 8e 71 25 ca  0d 39 3d 1c c9 41 25 28  |%):..q%..9=..A%(|
0000a830  32 29 3a 6f 25 3d a4 49  79 28 71 25 2c 73 25 2c  |2):o%=.Iy(q%,s%,|
0000a840  42 79 25 29 0d 39 3e 08  cb 3a 3d a3 0d 39 3f 13  |By%).9>..:=..9?.|
0000a850  dd f2 76 4a 28 6c 25 29  3a c8 8e 54 79 25 ca 0d  |..vJ(l%):..Ty%..|
0000a860  39 40 16 c9 41 25 28 32  29 3a f2 6a 5f 28 6c 25  |9@..A%(2):.j_(l%|
0000a870  2c 54 79 25 29 0d 39 41  16 c9 41 25 28 33 29 3a  |,Ty%).9A..A%(3):|
0000a880  f2 53 4a 28 6c 25 2c 54  79 25 29 0d 39 42 16 c9  |.SJ(l%,Ty%).9B..|
0000a890  41 25 28 34 29 3a f2 4e  4a 28 6c 25 2c 54 79 25  |A%(4):.NJ(l%,Ty%|
0000a8a0  29 0d 39 43 16 c9 41 25  28 35 29 3a f2 69 4a 28  |).9C..A%(5):.iJ(|
0000a8b0  6c 25 2c 54 79 25 29 0d  39 44 07 cb 3a e1 0d 39  |l%,Ty%).9D..:..9|
0000a8c0  45 36 dd f2 58 75 3a f2  65 5f 28 41 25 28 32 29  |E6..Xu:.e_(A%(2)|
0000a8d0  29 3a f2 74 4a 28 41 25  28 33 29 29 3a f2 4f 75  |):.tJ(A%(3)):.Ou|
0000a8e0  28 41 25 28 34 29 29 3a  f2 6d 75 28 41 25 28 35  |(A%(4)):.mu(A%(5|
0000a8f0  29 29 3a e1 0d 39 46 36  dd f2 61 75 3a f2 6c 5f  |)):..9F6..au:.l_|
0000a900  28 41 25 28 32 29 29 3a  f2 57 75 28 41 25 28 33  |(A%(2)):.Wu(A%(3|
0000a910  29 29 3a f2 4b 4a 28 41  25 28 34 29 29 3a f2 6e  |)):.KJ(A%(4)):.n|
0000a920  75 28 41 25 28 35 29 29  3a e1 0d 39 47 1a dd f2  |u(A%(5)):..9G...|
0000a930  64 4a 28 5a 79 25 2c 6c  25 29 3a c8 8e 5a 25 28  |dJ(Zy%,l%):..Z%(|
0000a940  74 25 29 ca 0d 39 48 12  c9 33 3a f2 41 5f 28 5a  |t%)..9H..3:.A_(Z|
0000a950  79 25 2c 6c 25 29 0d 39  49 07 cb 3a e1 0d 39 4a  |y%,l%).9I..:..9J|
0000a960  e8 dd f2 54 75 3a 7a 4a  25 3d a4 43 28 22 50 61  |...Tu:zJ%=.C("Pa|
0000a970  73 74 65 22 2c 22 50 61  73 74 65 22 2c 31 2c 26  |ste","Paste",1,&|
0000a980  41 29 3a 47 79 25 3d 2d  31 3a 4a 24 3d 22 22 3a  |A):Gy%=-1:J$="":|
0000a990  58 24 3d 22 6d 61 69 6c  74 6f 3a 22 3a 55 24 3d  |X$="mailto:":U$=|
0000a9a0  22 68 74 74 70 3a 2f 2f  22 3a 56 24 3d 22 49 6d  |"http://":V$="Im|
0000a9b0  70 6f 72 74 61 6e 74 20  6e 75 6d 62 65 72 73 22  |portant numbers"|
0000a9c0  3a 75 4a 25 3d 2d 31 3a  5a 6c 25 3d a4 43 28 22  |:uJ%=-1:Zl%=.C("|
0000a9d0  49 6d 70 6f 72 74 22 2c  22 49 6d 70 6f 72 74 22  |Import","Import"|
0000a9e0  2c 31 2c 35 29 3a 6c 5f  25 3d a4 43 28 22 41 42  |,1,5):l_%=.C("AB|
0000a9f0  4d 22 2c 22 41 42 4d 22  2c 31 2c 36 29 3a f2 59  |M","ABM",1,6):.Y|
0000aa00  28 6c 5f 25 2c 33 2c 7a  4a 25 29 3a 43 24 3d 22  |(l_%,3,zJ%):C$="|
0000aa10  22 3a 64 79 25 3d 2d 31  3a 59 4a 25 3d 30 3a 63  |":dy%=-1:YJ%=0:c|
0000aa20  5f 25 3d 2d 31 3a 4f 24  3d 22 22 3a 46 6c 25 3d  |_%=-1:O$="":Fl%=|
0000aa30  2d 31 3a 4a 6c 25 3d 30  3a 60 4a 25 3d 30 3a 50  |-1:Jl%=0:`J%=0:P|
0000aa40  5f 25 3d 31 36 0d 39 4b  b9 58 79 25 3d 33 3a 3a  |_%=16.9K.Xy%=3::|
0000aa50  3a 3a 64 5f 25 3d 32 3a  68 5f 25 3d 2d 31 3a de  |::d_%=2:h_%=-1:.|
0000aa60  4d 25 28 32 36 29 2c 46  25 28 32 36 29 2c 41 24  |M%(26),F%(26),A$|
0000aa70  28 26 41 2c 26 45 29 2c  5a 24 28 50 5f 25 2d 31  |(&A,&E),Z$(P_%-1|
0000aa80  2c 31 29 2c 4c 25 28 26  41 2c 31 29 2c 41 69 25  |,1),L%(&A,1),Ai%|
0000aa90  31 36 2c 47 25 28 26 45  29 3a 47 25 28 29 3d 37  |16,G%(&E):G%()=7|
0000aaa0  3a 47 25 28 30 29 3d 35  3a 4c 25 28 29 3d 2d 31  |:G%(0)=5:L%()=-1|
0000aab0  3a 24 41 69 25 3d 22 50  70 74 72 5f 68 79 70 65  |:$Ai%="Pptr_hype|
0000aac0  72 2c 31 32 2c 30 22 2b  bd 30 3a 4d 25 28 30 29  |r,12,0"+.0:M%(0)|
0000aad0  3d 31 3a 69 79 25 3d 30  3a 78 24 3d 59 24 2b 22  |=1:iy%=0:x$=Y$+"|
0000aae0  41 64 64 72 65 73 73 65  73 22 3a 66 24 3d 59 24  |Addresses":f$=Y$|
0000aaf0  2b 22 49 6d 70 6f 72 74  61 6e 74 22 3a e1 0d 39  |+"Important":..9|
0000ab00  4c 0c dd a4 79 79 3d 6c  5f 25 0d 39 4d 45 dd f2  |L...yy=l_%.9ME..|
0000ab10  41 4a 28 41 25 29 3a 42  25 28 41 25 29 3d 30 3a  |AJ(A%):B%(A%)=0:|
0000ab20  57 25 28 41 25 29 3d 32  36 3a 53 25 28 41 25 29  |W%(A%)=26:S%(A%)|
0000ab30  3d 30 3a 4d 24 28 41 25  29 3d a4 41 28 22 41 64  |=0:M$(A%)=.A("Ad|
0000ab40  64 54 61 62 22 29 3a f2  74 5f 3a f2 61 3a e1 0d  |dTab"):.t_:.a:..|
0000ab50  39 4e 2e dd f2 43 5f 3a  e7 76 25 3d 30 8c f2 52  |9N...C_:.v%=0..R|
0000ab60  5f 28 69 25 2c 43 79 25  2c 77 79 25 2c 2d 6d 25  |_(i%,Cy%,wy%,-m%|
0000ab70  2d 59 5f 25 2c 49 79 25  2c b9 2c b9 29 0d 39 4f  |-Y_%,Iy%,.,.).9O|
0000ab80  05 e1 0d 39 50 17 dd f2  65 75 3a f2 64 79 3a e7  |...9P...eu:.dy:.|
0000ab90  77 5f 25 3d 30 8c f2 4f  79 0d 39 51 05 e1 0d 39  |w_%=0..Oy.9Q...9|
0000aba0  52 c9 dd f2 60 5f 28 76  25 2c 79 25 2c 5f 25 2c  |R...`_(v%,y%,_%,|
0000abb0  55 25 29 3a ea 4c 6c 25  2c 41 25 2c 41 24 2c 47  |U%):.Ll%,A%,A$,G|
0000abc0  25 2c 53 79 25 2c 46 25  2c 51 25 2c 61 25 2c 42  |%,Sy%,F%,Q%,a%,B|
0000abd0  25 2c 43 25 2c 62 25 2c  79 4a 25 2c 44 25 2c 45  |%,C%,b%,yJ%,D%,E|
0000abe0  25 2c 5f 75 25 2c 4c 69  25 2c 52 4a 25 2c 57 4a  |%,_u%,Li%,RJ%,WJ|
0000abf0  25 3a 57 4a 25 3d a4 72  28 28 6b 25 2d 28 58 79  |%:WJ%=.r((k%-(Xy|
0000ac00  25 2b 32 29 2a 32 34 29  2f 58 79 25 29 3a 4c 6c  |%+2)*24)/Xy%):Ll|
0000ac10  25 3d a4 50 28 22 48 6f  6d 65 72 74 6f 6e 2e 4d  |%=.P("Homerton.M|
0000ac20  65 64 69 75 6d 22 2c 26  41 2c 26 41 29 3a 53 79  |edium",&A,&A):Sy|
0000ac30  25 3d 59 5f 25 3a c8 99  26 34 30 30 45 36 2c 37  |%=Y_%:..&400E6,7|
0000ac40  3a c8 99 26 34 30 30 46  33 2c 2c 30 2c 37 3a e7  |:..&400F3,,0,7:.|
0000ac50  28 79 25 3d 30 29 80 76  25 3e 30 8c f2 49 28 30  |(y%=0).v%>0..I(0|
0000ac60  2c 5f 25 2c 55 25 29 0d  39 53 1b 61 25 3d 5f 25  |,_%,U%).9S.a%=_%|
0000ac70  2b 79 25 2a 28 75 25 2d  34 30 29 3a e7 79 25 3d  |+y%*(u%-40):.y%=|
0000ac80  30 8c 0d 39 54 57 41 25  3d 30 3a c8 95 41 25 3c  |0..9TWA%=0:..A%<|
0000ac90  76 25 3a c8 99 26 34 30  30 45 36 2c 37 3a 86 61  |v%:..&400E6,7:.a|
0000aca0  25 2c 55 25 2d 53 79 25  2a 28 41 25 2b 31 29 2c  |%,U%-Sy%*(A%+1),|
0000acb0  61 25 2b 34 30 2c 55 25  2d 53 79 25 2a 28 41 25  |a%+40,U%-Sy%*(A%|
0000acc0  2b 31 29 3a e7 4d 25 28  41 25 29 3d 30 8c 70 79  |+1):.M%(A%)=0.py|
0000acd0  25 3d 32 8b 70 79 25 3d  35 0d 39 55 2c c8 99 26  |%=2.py%=5.9U,..&|
0000ace0  34 30 30 46 33 2c 2c 30  2c 70 79 25 3a e7 41 25  |400F3,,0,py%:.A%|
0000acf0  3d 30 8c 41 24 3d 22 2b  22 8b 41 24 3d bd 28 36  |=0.A$="+".A$=.(6|
0000ad00  34 2b 41 25 29 0d 39 56  64 c8 99 26 34 30 30 38  |4+A%).9Vd..&4008|
0000ad10  36 2c 4c 6c 25 2c 41 24  2c 31 3c 3c 34 2c 61 25  |6,Ll%,A$,1<<4,a%|
0000ad20  2b 26 43 2c 55 25 2d 53  79 25 2a 41 25 2d 53 79  |+&C,U%-Sy%*A%-Sy|
0000ad30  25 2b 26 41 3a 41 25 2b  3d 31 3a ce 3a e7 76 25  |%+&A:A%+=1:.:.v%|
0000ad40  3e 30 8c c8 99 26 34 30  30 45 36 2c 37 3a 86 61  |>0...&400E6,7:.a|
0000ad50  25 2b 34 30 2c 55 25 2c  61 25 2b 34 30 2c 55 25  |%+40,U%,a%+40,U%|
0000ad60  2d 53 79 25 2a 28 76 25  29 0d 39 57 24 cc 3a 41  |-Sy%*(v%).9W$.:A|
0000ad70  25 3d 76 25 3a e7 41 25  3d 30 8c 41 24 3d 22 2b  |%=v%:.A%=0.A$="+|
0000ad80  22 8b 41 24 3d bd 28 36  34 2b 41 25 29 0d 39 58  |".A$=.(64+A%).9X|
0000ad90  b7 c8 99 26 34 30 30 45  36 2c 37 3a ec 61 25 2b  |...&400E6,7:.a%+|
0000ada0  34 30 2c 55 25 2d 53 79  25 2a 28 41 25 2b 31 29  |40,U%-Sy%*(A%+1)|
0000adb0  3a df 42 59 2d 34 30 2c  30 3a df 61 25 2c 55 25  |:.BY-40,0:.a%,U%|
0000adc0  2d 6b 25 3a c8 99 26 34  30 30 38 36 2c 4c 6c 25  |-k%:..&40086,Ll%|
0000add0  2c 41 24 2c 31 3c 3c 34  2c 61 25 2b 26 43 2c 55  |,A$,1<<4,a%+&C,U|
0000ade0  25 2d 53 79 25 2a 41 25  2d 53 79 25 2b 26 41 3a  |%-Sy%*A%-Sy%+&A:|
0000adf0  41 25 2b 3d 31 3a c8 95  41 25 3c 32 37 3a c8 99  |A%+=1:..A%<27:..|
0000ae00  26 34 30 30 45 36 2c 37  3a 86 61 25 2c 55 25 2d  |&400E6,7:.a%,U%-|
0000ae10  53 79 25 2a 28 41 25 2b  31 29 2c 61 25 2b 34 30  |Sy%*(A%+1),a%+40|
0000ae20  2c 55 25 2d 53 79 25 2a  28 41 25 2b 31 29 3a e7  |,U%-Sy%*(A%+1):.|
0000ae30  4d 25 28 41 25 29 3d 30  8c 70 79 25 3d 32 8b 70  |M%(A%)=0.py%=2.p|
0000ae40  79 25 3d 35 0d 39 59 2c  c8 99 26 34 30 30 46 33  |y%=5.9Y,..&400F3|
0000ae50  2c 2c 30 2c 70 79 25 3a  e7 41 25 3d 30 8c 41 24  |,,0,py%:.A%=0.A$|
0000ae60  3d 22 2b 22 8b 41 24 3d  bd 28 36 34 2b 41 25 29  |="+".A$=.(64+A%)|
0000ae70  0d 39 5a 45 c8 99 26 34  30 30 38 36 2c 4c 6c 25  |.9ZE..&40086,Ll%|
0000ae80  2c 41 24 2c 31 3c 3c 34  2c 61 25 2b 26 43 2c 55  |,A$,1<<4,a%+&C,U|
0000ae90  25 2d 53 79 25 2a 41 25  2d 53 79 25 2b 26 41 3a  |%-Sy%*A%-Sy%+&A:|
0000aea0  e7 4d 25 28 41 25 29 3e  30 80 41 25 3e 76 25 8c  |.M%(A%)>0.A%>v%.|
0000aeb0  46 25 3d 2d 31 0d 39 5b  0b 41 25 2b 3d 31 3a ce  |F%=-1.9[.A%+=1:.|
0000aec0  0d 39 5c 30 cd 3a e7 79  25 3d 31 80 28 46 25 84  |.9\0.:.y%=1.(F%.|
0000aed0  4d 25 28 76 25 29 2d 69  79 25 3e 32 2a 58 79 25  |M%(v%)-iy%>2*Xy%|
0000aee0  29 8c f2 49 28 31 2c 61  25 2d 75 25 2c 55 25 29  |)..I(1,a%-u%,U%)|
0000aef0  0d 39 5d 0b e7 76 25 3c  3e 30 8c 0d 39 5e 21 e7  |.9]..v%<>0..9^!.|
0000af00  79 25 3d 30 84 28 79 25  3d 31 80 69 79 25 2b 58  |y%=0.(y%=1.iy%+X|
0000af10  79 25 3c 3d 4d 25 28 76  25 29 29 8c 0d 39 5f 82  |y%<=M%(v%))..9_.|
0000af20  5f 75 25 3d a4 50 28 22  54 72 69 6e 69 74 79 2e  |_u%=.P("Trinity.|
0000af30  42 6f 6c 64 22 2c 26 45  2c 26 45 29 3a 41 25 3d  |Bold",&E,&E):A%=|
0000af40  69 79 25 2b 79 25 2a 58  79 25 3a 61 25 3d 5f 25  |iy%+y%*Xy%:a%=_%|
0000af50  2d 28 34 30 2a 28 79 25  3d 30 29 29 2b 26 63 3a  |-(40*(y%=0))+&c:|
0000af60  c8 95 41 25 3c 4d 25 28  76 25 29 80 42 25 3c 58  |..A%<M%(v%).B%<X|
0000af70  79 25 3a 51 25 3d 55 25  2d 32 34 2a 28 42 25 2b  |y%:Q%=U%-24*(B%+|
0000af80  31 29 2d 57 4a 25 2a 42  25 3a e7 a4 46 28 61 25  |1)-WJ%*B%:..F(a%|
0000af90  2c 51 25 2c 63 4a 25 2c  2d 57 4a 25 29 8c 0d 39  |,Q%,cJ%,-WJ%)..9|
0000afa0  60 56 c8 99 26 34 30 30  45 36 2c 34 3a f2 43 79  |`V..&400E6,4:.Cy|
0000afb0  28 61 25 2c 51 25 2c 63  4a 25 2c 57 4a 25 2c 26  |(a%,Q%,cJ%,WJ%,&|
0000afc0  63 29 3a 62 25 3d 41 25  83 28 58 79 25 2a 32 29  |c):b%=A%.(Xy%*2)|
0000afd0  3a 41 24 3d 22 22 3a e7  41 24 28 62 25 2c 31 29  |:A$="":.A$(b%,1)|
0000afe0  3c 3e 22 22 8c 41 24 3d  41 24 28 62 25 2c 31 29  |<>"".A$=A$(b%,1)|
0000aff0  2b 22 20 22 0d 39 61 6c  41 24 2b 3d 41 24 28 62  |+" ".9alA$+=A$(b|
0000b000  25 2c 30 29 3a f2 56 28  30 2c 47 25 28 31 29 29  |%,0):.V(0,G%(1))|
0000b010  3a f2 63 28 5f 75 25 2c  41 24 2c 61 25 2b 26 43  |:.c(_u%,A$,a%+&C|
0000b020  2c 51 25 2d 34 30 2c 63  4a 25 2d 26 43 2c 34 30  |,Q%-40,cJ%-&C,40|
0000b030  29 3a 44 25 3d 30 3a e3  43 25 3d 32 b8 26 45 3a  |):D%=0:.C%=2.&E:|
0000b040  44 25 2d 3d 28 41 24 28  62 25 2c 43 25 29 3c 3e  |D%-=(A$(b%,C%)<>|
0000b050  22 22 29 3a ed 3a e7 44  25 3c 35 8c 44 25 3d 35  |""):.:.D%<5.D%=5|
0000b060  0d 39 62 35 53 79 25 3d  a4 72 28 28 57 4a 25 2d  |.9b5Sy%=.r((WJ%-|
0000b070  34 38 29 2f 44 25 29 3a  43 25 3d 53 79 25 2f 33  |48)/D%):C%=Sy%/3|
0000b080  3a e7 53 79 25 3e 33 30  8c 53 79 25 3d 33 30 3a  |:.Sy%>30.Sy%=30:|
0000b090  43 25 3d 26 43 0d 39 63  b1 4c 69 25 3d a4 50 28  |C%=&C.9c.Li%=.P(|
0000b0a0  22 48 6f 6d 65 72 74 6f  6e 2e 4d 65 64 69 75 6d  |"Homerton.Medium|
0000b0b0  2e 4f 62 6c 69 71 75 65  22 2c 43 25 2d 32 2c 43  |.Oblique",C%-2,C|
0000b0c0  25 2d 32 29 3a 52 4a 25  3d a4 50 28 22 54 72 69  |%-2):RJ%=.P("Tri|
0000b0d0  6e 69 74 79 2e 4d 65 64  69 75 6d 22 2c 43 25 2c  |nity.Medium",C%,|
0000b0e0  43 25 29 3a 47 25 3d 31  3a e3 43 25 3d 32 b8 38  |C%):G%=1:.C%=2.8|
0000b0f0  3a e7 41 24 28 62 25 2c  43 25 29 3c 3e 22 22 8c  |:.A$(b%,C%)<>"".|
0000b100  47 25 2b 3d 31 3a f2 56  28 30 2c 47 25 28 43 25  |G%+=1:.V(0,G%(C%|
0000b110  29 29 3a f2 63 28 52 4a  25 2c 41 24 28 62 25 2c  |)):.c(RJ%,A$(b%,|
0000b120  43 25 29 2c 61 25 2b 34  38 2c 51 25 2d 34 32 2d  |C%),a%+48,Q%-42-|
0000b130  53 79 25 2a 28 47 25 2d  31 29 2c 63 4a 25 2d 34  |Sy%*(G%-1),cJ%-4|
0000b140  38 2c 53 79 25 29 0d 39  64 2c ed 3a 51 25 2d 3d  |8,Sy%).9d,.:Q%-=|
0000b150  57 4a 25 2d 26 45 3a e3  43 25 3d 26 45 b8 39 88  |WJ%-&E:.C%=&E.9.|
0000b160  2d 31 3a e7 41 24 28 62  25 2c 43 25 29 3c 3e 22  |-1:.A$(b%,C%)<>"|
0000b170  22 8c 0d 39 65 f8 41 24  3d a4 41 28 22 46 6c 64  |"..9e.A$=.A("Fld|
0000b180  22 2b c3 28 43 25 2d 38  29 29 2b 22 3a 22 3a c8  |"+.(C%-8))+":":.|
0000b190  99 26 34 30 30 46 33 2c  2c 30 2c 47 25 28 30 29  |.&400F3,,0,G%(0)|
0000b1a0  3a c8 99 26 34 30 30 38  41 2c 4c 69 25 3a c8 99  |:..&4008A,Li%:..|
0000b1b0  26 34 30 30 39 37 2c 2c  41 24 b8 2c 44 25 2c 2c  |&40097,,A$.,D%,,|
0000b1c0  46 25 3a c8 99 26 34 30  30 38 38 2c 2c 46 25 2d  |F%:..&40088,,F%-|
0000b1d0  44 25 b8 2c 44 25 3a c8  99 26 34 30 30 38 36 2c  |D%.,D%:..&40086,|
0000b1e0  2c 41 24 2c 31 3c 3c 34  2c 61 25 2b 39 32 2d 44  |,A$,1<<4,a%+92-D|
0000b1f0  25 2c 51 25 2d 34 3a c8  99 26 34 30 30 46 33 2c  |%,Q%-4:..&400F3,|
0000b200  2c 30 2c 47 25 28 43 25  29 3a f2 63 28 52 4a 25  |,0,G%(C%):.c(RJ%|
0000b210  2c 41 24 28 62 25 2c 43  25 29 2c 61 25 2b 26 36  |,A$(b%,C%),a%+&6|
0000b220  34 2c 51 25 2d 34 2c 63  4a 25 2d 26 36 34 2c 53  |4,Q%-4,cJ%-&64,S|
0000b230  79 25 2b 34 29 3a 51 25  2b 3d 53 79 25 3a e7 43  |y%+4):Q%+=Sy%:.C|
0000b240  25 3e 3d 26 44 8c f2 62  5f 28 62 25 2c 43 25 2c  |%>=&D..b_(b%,C%,|
0000b250  61 25 2b 26 36 34 2c 51  25 2d 34 2c 63 4a 25 2d  |a%+&64,Q%-4,cJ%-|
0000b260  26 36 34 2c 53 79 25 2b  34 29 0d 39 66 17 cd 3a  |&64,Sy%+4).9f..:|
0000b270  ed 3a f2 55 28 52 4a 25  29 3a f2 55 28 4c 69 25  |.:.U(RJ%):.U(Li%|
0000b280  29 0d 39 67 1b cd 3a 41  25 2b 3d 31 3a 42 25 2b  |).9g..:A%+=1:B%+|
0000b290  3d 31 3a ce 3a f2 55 28  5f 75 25 29 0d 39 68 05  |=1:.:.U(_u%).9h.|
0000b2a0  cd 0d 39 69 0c cc 3a e7  79 25 3d 30 8c 0d 39 6a  |..9i..:.y%=0..9j|
0000b2b0  e7 5f 75 25 3d a4 50 28  22 54 72 69 6e 69 74 79  |._u%=.P("Trinity|
0000b2c0  2e 42 6f 6c 64 22 2c 31  36 2c 31 36 29 3a c8 99  |.Bold",16,16):..|
0000b2d0  26 34 30 30 45 36 2c 34  3a f2 56 28 30 2c 37 29  |&400E6,4:.V(0,7)|
0000b2e0  3a 62 25 3d 75 25 2d 32  2a 26 63 3a f2 43 79 28  |:b%=u%-2*&c:.Cy(|
0000b2f0  61 25 2b 26 63 2c 55 25  2d 32 34 2c 62 25 2c 6b  |a%+&c,U%-24,b%,k|
0000b300  25 2d 32 2a 32 34 2c 32  2a 26 63 29 3a f2 4c 28  |%-2*24,2*&c):.L(|
0000b310  5f 75 25 2c 56 24 2c 30  2c 5f 25 2b 75 25 2f 32  |_u%,V$,0,_%+u%/2|
0000b320  2c 55 25 2d 32 34 2d 26  43 29 3a f2 55 28 5f 75  |,U%-24-&C):.U(_u|
0000b330  25 29 3a 79 4a 25 3d 26  45 3a 52 4a 25 3d a4 50  |%):yJ%=&E:RJ%=.P|
0000b340  28 22 54 72 69 6e 69 74  79 2e 4d 65 64 69 75 6d  |("Trinity.Medium|
0000b350  22 2c 79 4a 25 2c 79 4a  25 29 3a 53 79 25 3d 28  |",yJ%,yJ%):Sy%=(|
0000b360  6b 25 2d 32 2a 32 34 2d  36 38 2d 32 2a 26 63 29  |k%-2*24-68-2*&c)|
0000b370  2f 50 5f 25 3a 51 25 3d  55 25 2d 32 34 2d 36 38  |/P_%:Q%=U%-24-68|
0000b380  3a 61 25 3d 5f 25 2b 26  63 3a c8 99 26 34 30 30  |:a%=_%+&c:..&400|
0000b390  45 36 2c 31 0d 39 6b a2  86 61 25 2b 34 38 2c 51  |E6,1.9k..a%+48,Q|
0000b3a0  25 2d 53 79 25 2a 50 5f  25 2c 61 25 2b 62 25 2d  |%-Sy%*P_%,a%+b%-|
0000b3b0  34 38 2c 51 25 2d 53 79  25 2a 50 5f 25 3a e3 41  |48,Q%-Sy%*P_%:.A|
0000b3c0  25 3d 30 b8 50 5f 25 2d  31 3a c8 99 26 34 30 30  |%=0.P_%-1:..&400|
0000b3d0  38 41 2c 52 4a 25 3a c8  99 26 34 30 30 45 36 2c  |8A,RJ%:..&400E6,|
0000b3e0  31 3a 86 61 25 2b 34 38  2c 51 25 2d 53 79 25 2a  |1:.a%+48,Q%-Sy%*|
0000b3f0  41 25 2c 61 25 2b 62 25  2d 34 38 2c 51 25 2d 53  |A%,a%+b%-48,Q%-S|
0000b400  79 25 2a 41 25 3a e7 a4  46 28 61 25 2c 51 25 2d  |y%*A%:..F(a%,Q%-|
0000b410  53 79 25 2a 41 25 2c 62  25 2c 2d 53 79 25 29 80  |Sy%*A%,b%,-Sy%).|
0000b420  5a 24 28 41 25 2c 30 29  2b 5a 24 28 41 25 2c 31  |Z$(A%,0)+Z$(A%,1|
0000b430  29 3c 3e 22 22 8c 0d 39  6c 85 c8 99 26 34 30 30  |)<>""..9l...&400|
0000b440  39 37 2c 2c 5a 24 28 41  25 2c 30 29 2b 22 20 20  |97,,Z$(A%,0)+"  |
0000b450  22 b8 2c 42 25 2c 43 25  2c 44 25 2c 45 25 3a 42  |".,B%,C%,D%,E%:B|
0000b460  25 3d 44 25 2d 42 25 3a  f2 66 79 28 42 25 2c 45  |%=D%-B%:.fy(B%,E|
0000b470  25 29 3a c8 99 26 34 30  30 39 37 2c 2c 5a 24 28  |%):..&40097,,Z$(|
0000b480  41 25 2c 31 29 b8 2c 43  25 2c 46 25 2c 44 25 3a  |A%,1).,C%,F%,D%:|
0000b490  43 25 3d 44 25 2d 43 25  3a f2 66 79 28 43 25 2c  |C%=D%-C%:.fy(C%,|
0000b4a0  46 25 29 3a e7 42 25 2b  43 25 3e 62 25 2d 32 34  |F%):.B%+C%>b%-24|
0000b4b0  84 45 25 2d 46 25 3e 53  79 25 8c 0d 39 6d 4a e7  |.E%-F%>Sy%..9mJ.|
0000b4c0  53 79 25 2f 28 45 25 2d  46 25 29 3c 28 62 25 2d  |Sy%/(E%-F%)<(b%-|
0000b4d0  32 34 29 2f 28 42 25 2b  43 25 29 8c 46 25 3d 79  |24)/(B%+C%).F%=y|
0000b4e0  4a 25 2a 53 79 25 2f 28  45 25 2d 46 25 29 8b 46  |J%*Sy%/(E%-F%).F|
0000b4f0  25 3d 79 4a 25 2a 28 62  25 2d 32 34 29 2f 28 42  |%=yJ%*(b%-24)/(B|
0000b500  25 2b 43 25 29 0d 39 6e  3b 43 25 3d 43 25 2a 46  |%+C%).9n;C%=C%*F|
0000b510  25 2f 79 4a 25 3a 45 25  3d 45 25 2a 46 25 2f 79  |%/yJ%:E%=E%*F%/y|
0000b520  4a 25 3a 46 25 3d a4 50  28 22 54 72 69 6e 69 74  |J%:F%=.P("Trinit|
0000b530  79 2e 4d 65 64 69 75 6d  22 2c 46 25 2c 46 25 29  |y.Medium",F%,F%)|
0000b540  0d 39 6f 0b cc 46 25 3d  52 4a 25 0d 39 70 19 cd  |.9o..F%=RJ%.9p..|
0000b550  3a e7 45 25 3d 30 84 46  25 3d 30 8c 45 25 3d 45  |:.E%=0.F%=0.E%=E|
0000b560  25 2b 46 25 0d 39 71 7f  c8 99 26 34 30 30 38 36  |%+F%.9q...&40086|
0000b570  2c 2c 5a 24 28 41 25 2c  30 29 2c 31 3c 3c 34 2c  |,,Z$(A%,0),1<<4,|
0000b580  61 25 2b 26 43 2c 51 25  2d 53 79 25 2a 28 41 25  |a%+&C,Q%-Sy%*(A%|
0000b590  2b 30 2e 35 29 2d 45 25  2f 32 3a c8 99 26 34 30  |+0.5)-E%/2:..&40|
0000b5a0  30 38 36 2c 2c 5a 24 28  41 25 2c 31 29 2c 31 3c  |086,,Z$(A%,1),1<|
0000b5b0  3c 34 2c 61 25 2b 62 25  2d 43 25 2d 26 43 2c 51  |<4,a%+b%-C%-&C,Q|
0000b5c0  25 2d 53 79 25 2a 28 41  25 2b 30 2e 35 29 2d 45  |%-Sy%*(A%+0.5)-E|
0000b5d0  25 2f 32 3a e7 46 25 3c  3e 52 4a 25 8c f2 55 28  |%/2:.F%<>RJ%..U(|
0000b5e0  46 25 29 0d 39 72 07 cd  3a ed 0d 39 73 05 cd 0d  |F%).9r..:..9s...|
0000b5f0  39 74 0f cd 3a f2 55 28  4c 6c 25 29 3a e1 0d 39  |9t..:.U(Ll%):..9|
0000b600  75 25 dd f2 66 5f 28 6c  25 2c 63 6c 25 29 3a ea  |u%..f_(l%,cl%):.|
0000b610  41 25 2c 42 25 3a 42 25  3d 64 79 25 3a c8 8e 21  |A%,B%:B%=dy%:..!|
0000b620  6c 25 ca 0d 39 76 3d c9  30 3a e3 41 25 3d 39 b8  |l%..9v=.0:.A%=9.|
0000b630  32 33 3a f2 41 28 43 79  25 2c 41 25 2c 41 24 28  |23:.A(Cy%,A%,A$(|
0000b640  42 25 2c 41 25 2d 39 29  29 3a ed 3a f2 52 28 43  |B%,A%-9)):.:.R(C|
0000b650  79 25 2c 32 35 2c 30 29  3a f2 51 28 30 2c 30 29  |y%,25,0):.Q(0,0)|
0000b660  0d 39 77 4a c9 31 3a e3  41 25 3d 39 b8 32 33 3a  |.9wJ.1:.A%=9.23:|
0000b670  f2 41 28 43 79 25 2c 41  25 2c 41 24 28 42 25 2c  |.A(Cy%,A%,A$(B%,|
0000b680  41 25 2d 39 29 29 3a ed  3a 43 24 3d 22 22 3a 64  |A%-9)):.:C$="":d|
0000b690  79 25 3d 2d 31 3a f2 51  28 30 2c 30 29 3a f2 52  |y%=-1:.Q(0,0):.R|
0000b6a0  28 43 79 25 2c 32 35 2c  31 29 0d 39 78 15 c9 32  |(Cy%,25,1).9x..2|
0000b6b0  3a f2 5f 79 3a e7 4d 25  28 76 25 29 3e 30 8c 0d  |:._y:.M%(v%)>0..|
0000b6c0  39 79 1b e7 4d 25 28 76  25 29 3c 3d 69 79 25 8c  |9y..M%(v%)<=iy%.|
0000b6d0  69 79 25 2d 3d 32 2a 58  79 25 0d 39 7a 14 f2 51  |iy%-=2*Xy%.9z..Q|
0000b6e0  28 76 25 2c 69 79 25 29  3a 6d 4a 25 3d b9 0d 39  |(v%,iy%):mJ%=..9|
0000b6f0  7b 0c cc f2 51 28 30 2c  30 29 0d 39 7c 05 cd 0d  |{...Q(0,0).9|...|
0000b700  39 7d 18 c9 33 3a e7 6c  25 21 34 3e 3d 30 8c 64  |9}..3:.l%!4>=0.d|
0000b710  5f 25 3d 6c 25 21 34 0d  39 7e 0a e7 76 25 3d 30  |_%=l%!4.9~..v%=0|
0000b720  8c 0d 39 7f 25 e3 41 25  3d 30 b8 26 45 3a 41 24  |..9.%.A%=0.&E:A$|
0000b730  28 42 25 2c 41 25 29 3d  a4 4d 28 43 79 25 2c 41  |(B%,A%)=.M(Cy%,A|
0000b740  25 2b 39 29 3a ed 0d 39  80 0c cd 3a c8 8e 64 5f  |%+9):..9...:..d_|
0000b750  25 ca 0d 39 81 20 c9 30  3a f2 71 28 41 24 28 42  |%..9. .0:.q(A$(B|
0000b760  25 2c 31 29 2b 22 20 22  2b 41 24 28 42 25 2c 30  |%,1)+" "+A$(B%,0|
0000b770  29 29 0d 39 82 1e c9 31  3a e3 41 25 3d 32 b8 38  |)).9...1:.A%=2.8|
0000b780  3a f2 71 28 41 24 28 42  25 2c 41 25 29 29 3a ed  |:.q(A$(B%,A%)):.|
0000b790  0d 39 83 38 c9 32 3a f2  71 28 41 24 28 42 25 2c  |.9.8.2:.q(A$(B%,|
0000b7a0  31 29 2b 22 20 22 2b 41  24 28 42 25 2c 30 29 29  |1)+" "+A$(B%,0))|
0000b7b0  3a e3 41 25 3d 32 b8 38  3a f2 71 28 41 24 28 42  |:.A%=2.8:.q(A$(B|
0000b7c0  25 2c 41 25 29 29 3a ed  0d 39 84 39 c9 39 3a f2  |%,A%)):..9.9.9:.|
0000b7d0  71 28 41 24 28 42 25 2c  31 29 2b 22 20 22 2b 41  |q(A$(B%,1)+" "+A|
0000b7e0  24 28 42 25 2c 30 29 29  3a e3 41 25 3d 32 b8 26  |$(B%,0)):.A%=2.&|
0000b7f0  45 3a f2 71 28 41 24 28  42 25 2c 41 25 29 29 3a  |E:.q(A$(B%,A%)):|
0000b800  ed 0d 39 85 15 7f f2 71  28 41 24 28 42 25 2c 64  |..9....q(A$(B%,d|
0000b810  5f 25 2b 36 29 29 0d 39  86 05 cb 0d 39 87 1f c9  |_%+6)).9....9...|
0000b820  34 3a f2 47 79 28 55 24  2b 41 24 28 64 79 25 2c  |4:.Gy(U$+A$(dy%,|
0000b830  26 45 29 29 3a 75 4a 25  3d 31 0d 39 88 1f c9 35  |&E)):uJ%=1.9...5|
0000b840  3a f2 47 79 28 58 24 2b  41 24 28 64 79 25 2c 26  |:.Gy(X$+A$(dy%,&|
0000b850  44 29 29 3a 75 4a 25 3d  32 0d 39 89 07 cb 3a e1  |D)):uJ%=2.9...:.|
0000b860  0d 39 8a 6c dd f2 70 79  3a ea 41 25 3a 41 25 3d  |.9.l..py:.A%:A%=|
0000b870  28 64 79 25 3c 30 29 3a  e3 42 25 3d 30 b8 33 3a  |(dy%<0):.B%=0.3:|
0000b880  f2 54 28 6c 5f 25 2c 42  25 2c 41 25 29 3a ed 3a  |.T(l_%,B%,A%):.:|
0000b890  e3 41 25 3d 30 b8 39 3a  f2 53 28 7a 4a 25 2c 41  |.A%=0.9:.S(zJ%,A|
0000b8a0  25 2c 64 5f 25 3d 41 25  29 3a ed 3a e3 42 25 3d  |%,d_%=A%):.:.B%=|
0000b8b0  34 b8 35 3a f2 54 28 6c  5f 25 2c 42 25 2c 31 29  |4.5:.T(l_%,B%,1)|
0000b8c0  3a ed 3a e7 64 79 25 3c  3e 2d 31 8c 0d 39 8b 1e  |:.:.dy%<>-1..9..|
0000b8d0  e7 a4 62 28 22 41 6c 69  61 73 24 55 52 4c 4f 70  |..b("Alias$URLOp|
0000b8e0  65 6e 5f 48 54 54 50 22  29 8c 0d 39 8c 1b f2 54  |en_HTTP")..9...T|
0000b8f0  28 6c 5f 25 2c 34 2c 41  24 28 64 79 25 2c 26 45  |(l_%,4,A$(dy%,&E|
0000b900  29 3d 22 22 29 0d 39 8d  22 cd 3a e7 a4 62 28 22  |)="").9.".:..b("|
0000b910  41 6c 69 61 73 24 55 52  4c 4f 70 65 6e 5f 4d 61  |Alias$URLOpen_Ma|
0000b920  69 6c 54 6f 22 29 8c 0d  39 8e 1b f2 54 28 6c 5f  |ilTo")..9...T(l_|
0000b930  25 2c 35 2c 41 24 28 64  79 25 2c 26 44 29 3d 22  |%,5,A$(dy%,&D)="|
0000b940  22 29 0d 39 8f 05 cd 0d  39 90 1c cc f2 54 28 6c  |").9....9....T(l|
0000b950  5f 25 2c 34 2c 31 29 3a  f2 54 28 6c 5f 25 2c 35  |_%,4,1):.T(l_%,5|
0000b960  2c 31 29 0d 39 91 07 cd  3a e1 0d 39 92 1b dd f2  |,1).9...:..9....|
0000b970  6a 28 70 25 29 ea 41 25  3a 41 25 3d 76 25 3a e7  |j(p%).A%:A%=v%:.|
0000b980  70 25 3d 31 8c 0d 39 93  17 e7 4d 25 28 76 25 29  |p%=1..9...M%(v%)|
0000b990  3c 3d 69 79 25 2b 58 79  25 2a 32 8c 0d 39 94 2d  |<=iy%+Xy%*2..9.-|
0000b9a0  f5 41 25 2b 3d 31 3a fd  41 25 3e 32 36 84 4d 25  |.A%+=1:.A%>26.M%|
0000b9b0  28 41 25 83 32 37 29 3e  30 3a e7 41 25 3c 32 37  |(A%.27)>0:.A%<27|
0000b9c0  8c f2 51 28 41 25 2c 30  29 0d 39 95 15 cc f2 51  |..Q(A%,0).9....Q|
0000b9d0  28 76 25 2c 69 79 25 2b  58 79 25 2a 32 29 0d 39  |(v%,iy%+Xy%*2).9|
0000b9e0  96 05 cd 0d 39 97 12 cc  3a e7 69 79 25 3d 30 80  |....9...:.iy%=0.|
0000b9f0  76 25 3e 30 8c 0d 39 98  37 f5 41 25 2d 3d 31 3a  |v%>0..9.7.A%-=1:|
0000ba00  fd 4d 25 28 41 25 29 3e  30 3a f2 51 28 41 25 2c  |.M%(A%)>0:.Q(A%,|
0000ba10  4d 25 28 41 25 29 2d 31  2d 28 4d 25 28 41 25 29  |M%(A%)-1-(M%(A%)|
0000ba20  2d 31 29 83 28 58 79 25  2a 32 29 29 0d 39 99 1b  |-1).(Xy%*2)).9..|
0000ba30  cc e7 76 25 3e 30 8c f2  51 28 76 25 2c 69 79 25  |..v%>0..Q(v%,iy%|
0000ba40  2d 58 79 25 2a 32 29 0d  39 9a 13 cd 3a e7 76 25  |-Xy%*2).9...:.v%|
0000ba50  3d 30 8c f2 51 28 30 2c  30 29 0d 39 9b 07 cd 3a  |=0..Q(0,0).9...:|
0000ba60  e1 0d 39 9c 55 dd f2 71  5f 28 67 25 2c 79 25 2c  |..9.U..q_(g%,y%,|
0000ba70  61 25 2c 51 25 2c 69 5f  25 2c 71 4a 25 29 3a ea  |a%,Q%,i_%,qJ%):.|
0000ba80  62 25 2c 41 25 2c 42 25  2c 58 25 2c 59 25 2c 57  |b%,A%,B%,X%,Y%,W|
0000ba90  4a 25 3a 57 4a 25 3d a4  72 28 28 6b 25 2d 28 58  |J%:WJ%=.r((k%-(X|
0000baa0  79 25 2b 32 29 2a 32 34  29 2f 58 79 25 29 3a e7  |y%+2)*24)/Xy%):.|
0000bab0  79 25 3c 3e 30 8c 0d 39  9d 1a 58 25 3d 26 63 3a  |y%<>0..9..X%=&c:|
0000bac0  e7 61 25 3e 75 25 2d 34  30 80 67 25 3c 3e 32 8c  |.a%>u%-40.g%<>2.|
0000bad0  0d 39 9e 1c 62 25 3d 2d  51 25 81 59 5f 25 3a e7  |.9..b%=-Q%.Y_%:.|
0000bae0  62 25 3c 32 37 80 62 25  3e 76 25 8c 0d 39 9f 1f  |b%<27.b%>v%..9..|
0000baf0  e7 76 25 3d 30 8c 4f 24  3d 43 24 3a 46 6c 25 3d  |.v%=0.O$=C$:Fl%=|
0000bb00  64 79 25 3a 4a 6c 25 3d  59 4a 25 0d 39 a0 16 e7  |dy%:Jl%=YJ%.9...|
0000bb10  4d 25 28 62 25 29 3e 30  8c f2 51 28 62 25 2c 30  |M%(b%)>0..Q(b%,0|
0000bb20  29 0d 39 a1 05 cd 0d 39  a2 05 cd 0d 39 a3 1c cc  |).9....9....9...|
0000bb30  3a 58 25 3d 26 63 2b 34  30 3a e7 61 25 3c 34 30  |:X%=&c+40:.a%<40|
0000bb40  80 67 25 3c 3e 32 8c 0d  39 a4 16 62 25 3d 2d 51  |.g%<>2..9..b%=-Q|
0000bb50  25 81 59 5f 25 3a e7 62  25 3c 76 25 8c 0d 39 a5  |%.Y_%:.b%<v%..9.|
0000bb60  1f e7 62 25 3d 30 8c 43  24 3d 4f 24 3a 64 79 25  |..b%=0.C$=O$:dy%|
0000bb70  3d 46 6c 25 3a 59 4a 25  3d 4a 6c 25 0d 39 a6 16  |=Fl%:YJ%=Jl%.9..|
0000bb80  e7 4d 25 28 62 25 29 3e  30 8c f2 51 28 62 25 2c  |.M%(b%)>0..Q(b%,|
0000bb90  30 29 0d 39 a7 05 cd 0d  39 a8 05 cd 0d 39 a9 0c  |0).9....9....9..|
0000bba0  cd 3a e7 76 25 3e 30 8c  0d 39 aa 70 41 25 3d 30  |.:.v%>0..9.pA%=0|
0000bbb0  3a 42 25 3d 2d 31 3a 59  25 3d 2d 32 34 3a 79 25  |:B%=-1:Y%=-24:y%|
0000bbc0  3d 94 28 79 25 29 3a 43  24 3d 22 22 3a 64 79 25  |=.(y%):C$="":dy%|
0000bbd0  3d 2d 31 3a c8 95 41 25  3c 58 79 25 80 41 25 2b  |=-1:..A%<Xy%.A%+|
0000bbe0  69 79 25 2b 58 79 25 2a  79 25 3c 4d 25 28 76 25  |iy%+Xy%*y%<M%(v%|
0000bbf0  29 3a e7 a4 6d 28 61 25  2c 51 25 2c 58 25 2c 59  |):..m(a%,Q%,X%,Y|
0000bc00  25 2c 63 4a 25 2c 2d 57  4a 25 29 8c 42 25 3d 41  |%,cJ%,-WJ%).B%=A|
0000bc10  25 2b 58 79 25 2a 79 25  0d 39 ab 1e 59 25 2d 3d  |%+Xy%*y%.9..Y%-=|
0000bc20  57 4a 25 2b 32 34 3a 41  25 2b 3d 31 3a ce 3a e7  |WJ%+24:A%+=1:.:.|
0000bc30  42 25 3e 3d 30 8c 0d 39  ac 3a 43 24 3d a4 73 28  |B%>=0..9.:C$=.s(|
0000bc40  41 24 28 42 25 2c 30 29  2b 22 20 22 2b 41 24 28  |A$(B%,0)+" "+A$(|
0000bc50  42 25 2c 31 29 29 3a 64  79 25 3d 42 25 3a 59 4a  |B%,1)):dy%=B%:YJ|
0000bc60  25 3d 42 25 2b 69 79 25  3a e7 67 25 3c 3e 32 8c  |%=B%+iy%:.g%<>2.|
0000bc70  0d 39 ad 3a e3 41 25 3d  39 b8 32 33 3a f2 41 28  |.9.:.A%=9.23:.A(|
0000bc80  43 79 25 2c 41 25 2c 41  24 28 42 25 2c 41 25 2d  |Cy%,A%,A$(B%,A%-|
0000bc90  39 29 29 3a ed 3a f2 52  28 43 79 25 2c 32 35 2c  |9)):.:.R(Cy%,25,|
0000bca0  30 29 3a f2 51 28 30 2c  30 29 0d 39 ae 05 cd 0d  |0):.Q(0,0).9....|
0000bcb0  39 af 05 cd 0d 39 b0 11  cc e7 79 25 3d 30 80 67  |9....9....y%=0.g|
0000bcc0  25 3c 3e 32 8c 0d 39 b1  43 53 79 25 3d 28 6b 25  |%<>2..9.CSy%=(k%|
0000bcd0  2d 32 2a 32 34 2d 36 38  2d 32 2a 26 63 29 2f 50  |-2*24-68-2*&c)/P|
0000bce0  5f 25 3a 59 25 3d 2d 28  51 25 2b 32 34 2b 36 38  |_%:Y%=-(Q%+24+68|
0000bcf0  2d 53 79 25 29 2f 53 79  25 3a e7 59 25 3e 30 80  |-Sy%)/Sy%:.Y%>0.|
0000bd00  59 25 3c 3d 50 5f 25 8c  0d 39 b2 68 60 4a 25 3d  |Y%<=P_%..9.h`J%=|
0000bd10  59 25 3a f2 41 28 5f 5f  25 2c 33 2c 5a 24 28 59  |Y%:.A(__%,3,Z$(Y|
0000bd20  25 2d 31 2c 30 29 29 3a  f2 41 28 5f 5f 25 2c 34  |%-1,0)):.A(__%,4|
0000bd30  2c 5a 24 28 59 25 2d 31  2c 31 29 29 3a c8 97 58  |,Z$(Y%-1,1)):..X|
0000bd40  25 2c 59 25 2c 41 25 3a  c8 99 26 34 30 30 44 34  |%,Y%,A%:..&400D4|
0000bd50  2c 2c 5f 5f 25 2c 69 5f  25 2b 60 79 25 2c 59 25  |,,__%,i_%+`y%,Y%|
0000bd60  3a f2 43 28 5f 5f 25 2c  33 29 3a 56 4a 25 3d b9  |:.C(__%,3):VJ%=.|
0000bd70  0d 39 b3 05 cd 0d 39 b4  05 cd 0d 39 b5 0f cd 3a  |.9....9....9...:|
0000bd80  e7 67 25 3d 32 8c f2 70  79 0d 39 b6 05 e1 0d 39  |.g%=2..py.9....9|
0000bd90  b7 1e dd f2 53 6c 28 71  25 2c 73 25 2c 67 25 2c  |....Sl(q%,s%,g%,|
0000bda0  61 25 2c 51 25 29 3a c8  8e 71 25 ca 0d 39 b8 10  |a%,Q%):..q%..9..|
0000bdb0  c9 43 79 25 3a e7 67 25  3c 3e 32 8c 0d 39 b9 09  |.Cy%:.g%<>2..9..|
0000bdc0  c8 8e 73 25 ca 0d 39 ba  13 c9 32 34 3a f2 79 28  |..s%..9...24:.y(|
0000bdd0  67 25 3d 34 29 3a f2 61  0d 39 bb 18 c9 32 35 3a  |g%=4):.a.9...25:|
0000bde0  f2 5f 79 3a f2 61 3a f2  43 28 43 79 25 2c 39 29  |._y:.a:.C(Cy%,9)|
0000bdf0  0d 39 bc 14 c9 32 36 3a  f2 61 3a f2 43 28 43 79  |.9...26:.a:.C(Cy|
0000be00  25 2c 39 29 0d 39 bd 23  c9 2d 31 2c 30 2c 31 2c  |%,9).9.#.-1,0,1,|
0000be10  32 2c 33 2c 34 2c 35 2c  36 2c 37 2c 38 3a f2 43  |2,3,4,5,6,7,8:.C|
0000be20  28 69 25 2c 2d 31 29 0d  39 be 05 cb 0d 39 bf 21  |(i%,-1).9....9.!|
0000be30  cc f2 70 79 3a f2 46 28  6c 5f 25 2c 59 79 25 2d  |..py:.F(l_%,Yy%-|
0000be40  36 34 2c 72 79 25 2c 71  25 2c 73 25 29 0d 39 c0  |64,ry%,q%,s%).9.|
0000be50  05 cd 0d 39 c1 0e c9 5f  5f 25 3a c8 8e 73 25 ca  |...9...__%:..s%.|
0000be60  0d 39 c2 0a c9 35 3a f2  79 79 0d 39 c3 19 c9 36  |.9...5:.yy.9...6|
0000be70  3a c8 99 26 34 30 30 44  34 2c 2c 2d 31 3a 60 4a  |:..&400D4,,-1:`J|
0000be80  25 3d 30 0d 39 c4 2a c9  37 3a f2 41 28 5f 5f 25  |%=0.9.*.7:.A(__%|
0000be90  2c 33 2c 22 22 29 3a f2  41 28 5f 5f 25 2c 34 2c  |,3,""):.A(__%,4,|
0000bea0  22 22 29 3a f2 43 28 5f  5f 25 2c 33 29 0d 39 c5  |""):.C(__%,3).9.|
0000beb0  05 cb 0d 39 c6 07 cb 3a  e1 0d 39 c7 1c dd a4 73  |...9...:..9....s|
0000bec0  79 28 73 25 2c 42 79 25  29 3a 6f 25 3d b9 3a c8  |y(s%,By%):o%=.:.|
0000bed0  8e 42 79 25 ca 0d 39 c8  11 c9 34 31 34 3a f2 6a  |.By%..9...414:.j|
0000bee0  28 2d 63 5f 25 29 0d 39  c9 10 c9 34 31 35 3a f2  |(-c_%).9...415:.|
0000bef0  6a 28 63 5f 25 29 0d 39  ca 2f c9 34 33 2c 34 36  |j(c_%).9./.43,46|
0000bf00  31 3a e7 76 25 3e 30 8c  43 24 3d 4f 24 3a 64 79  |1:.v%>0.C$=O$:dy|
0000bf10  25 3d 46 6c 25 3a 59 4a  25 3d 4a 6c 25 3a f2 51  |%=Fl%:YJ%=Jl%:.Q|
0000bf20  28 30 2c 30 29 0d 39 cb  2e 7f 3a e7 42 79 25 3e  |(0,0).9...:.By%>|
0000bf30  3d 39 37 80 42 79 25 3c  3d 26 37 41 8c 4c 25 3d  |=97.By%<=&7A.L%=|
0000bf40  42 79 25 2d 33 32 2d 36  34 8b 4c 25 3d 42 79 25  |By%-32-64.L%=By%|
0000bf50  2d 36 34 0d 39 cc 10 e7  4c 25 3e 30 80 4c 25 3c  |-64.9...L%>0.L%<|
0000bf60  32 38 8c 0d 39 cd 1f e7  76 25 3d 30 8c 4f 24 3d  |28..9...v%=0.O$=|
0000bf70  43 24 3a 46 6c 25 3d 64  79 25 3a 4a 6c 25 3d 59  |C$:Fl%=dy%:Jl%=Y|
0000bf80  4a 25 0d 39 ce 16 e7 4d  25 28 4c 25 29 3e 30 8c  |J%.9...M%(L%)>0.|
0000bf90  f2 51 28 4c 25 2c 30 29  0d 39 cf 09 cc 6f 25 3d  |.Q(L%,0).9...o%=|
0000bfa0  a3 0d 39 d0 05 cd 0d 39  d1 09 cb 3a 3d 6f 25 0d  |..9....9...:=o%.|
0000bfb0  39 d2 1e dd a4 78 79 28  71 25 2c 73 25 2c 42 79  |9....xy(q%,s%,By|
0000bfc0  25 29 3a 6f 25 3d b9 3a  c8 8e 71 25 ca 0d 39 d3  |%):o%=.:..q%..9.|
0000bfd0  0f c9 43 79 25 3a c8 8e  42 79 25 ca 0d 39 d4 22  |..Cy%:..By%..9."|
0000bfe0  c9 33 39 36 3a e7 77 4a  25 3d a4 7a 8c f2 6b 28  |.396:.wJ%=.z..k(|
0000bff0  71 25 2c 73 25 2c 2d 31  2c 39 2c 32 33 29 0d 39  |q%,s%,-1,9,23).9|
0000c000  d5 21 c9 33 39 37 3a e7  77 4a 25 3d a4 7a 8c f2  |.!.397:.wJ%=.z..|
0000c010  6b 28 71 25 2c 73 25 2c  31 2c 39 2c 32 33 29 0d  |k(q%,s%,1,9,23).|
0000c020  39 d6 26 c9 33 39 38 2c  26 44 2c 33 39 34 3a e7  |9.&.398,&D,394:.|
0000c030  73 25 3d 32 33 80 42 79  25 3d 26 44 8c f2 79 28  |s%=23.By%=&D..y(|
0000c040  b9 29 3a f2 61 0d 39 d7  11 c9 34 31 34 3a f2 6a  |.):.a.9...414:.j|
0000c050  28 2d 63 5f 25 29 0d 39  d8 10 c9 34 31 35 3a f2  |(-c_%).9...415:.|
0000c060  6a 28 63 5f 25 29 0d 39  d9 11 c9 34 36 31 3a f2  |j(c_%).9...461:.|
0000c070  79 28 b9 29 3a f2 61 0d  39 da 14 c9 38 33 2d 36  |y(.):.a.9...83-6|
0000c080  34 3a f2 43 28 43 79 25  2c 39 29 0d 39 db 15 c9  |4:.C(Cy%,9).9...|
0000c090  37 30 2d 36 34 3a f2 43  28 43 79 25 2c 26 41 29  |70-64:.C(Cy%,&A)|
0000c0a0  0d 39 dc 15 c9 36 35 2d  36 34 3a f2 43 28 43 79  |.9...65-64:.C(Cy|
0000c0b0  25 2c 26 42 29 0d 39 dd  15 c9 38 34 2d 36 34 3a  |%,&B).9...84-64:|
0000c0c0  f2 43 28 43 79 25 2c 31  38 29 0d 39 de 24 c9 38  |.C(Cy%,18).9.$.8|
0000c0d0  38 2d 36 34 3a e7 64 79  25 3c 3e 2d 31 8c f2 5f  |8-64:.dy%<>-1.._|
0000c0e0  79 3a f2 61 3a f2 43 28  43 79 25 2c 39 29 0d 39  |y:.a:.C(Cy%,9).9|
0000c0f0  df 15 c9 36 39 2d 36 34  3a f2 43 28 43 79 25 2c  |...69-64:.C(Cy%,|
0000c100  32 32 29 0d 39 e0 15 c9  38 37 2d 36 34 3a f2 43  |22).9...87-64:.C|
0000c110  28 43 79 25 2c 32 33 29  0d 39 e1 09 7f 6f 25 3d  |(Cy%,23).9...o%=|
0000c120  a3 0d 39 e2 05 cb 0d 39  e3 1e c9 5f 5f 25 3a e7  |..9....9...__%:.|
0000c130  42 79 25 3d 26 44 80 73  25 3d 34 8c f2 79 79 8b  |By%=&D.s%=4..yy.|
0000c140  6f 25 3d a3 0d 39 e4 2a  c9 47 79 25 3a e7 47 79  |o%=..9.*.Gy%:.Gy|
0000c150  25 3c 3e 2d 31 80 73 25  3d 37 30 8c f2 5f 28 4a  |%<>-1.s%=70.._(J|
0000c160  24 2c bb a4 4d 28 47 79  25 2c 35 39 29 29 0d 39  |$,..M(Gy%,59)).9|
0000c170  e5 09 7f 6f 25 3d a3 0d  39 e6 09 cb 3a 3d 6f 25  |...o%=..9...:=o%|
0000c180  0d 39 e7 5e dd f2 69 75  28 77 25 29 3a ea 41 25  |.9.^..iu(w%):.A%|
0000c190  3a d5 23 77 25 2c 56 24  3a d5 23 77 25 2c 58 79  |:.#w%,V$:.#w%,Xy|
0000c1a0  25 3a d5 23 77 25 2c 64  5f 25 3a d5 23 77 25 2c  |%:.#w%,d_%:.#w%,|
0000c1b0  63 5f 25 2b 35 3a d5 23  77 25 2c 58 24 3a d5 23  |c_%+5:.#w%,X$:.#|
0000c1c0  77 25 2c 55 24 3a e3 41  25 3d 30 b8 26 45 3a d5  |w%,U$:.A%=0.&E:.|
0000c1d0  23 77 25 2c 47 25 28 41  25 29 3a ed 3a e1 0d 39  |#w%,G%(A%):.:..9|
0000c1e0  e8 5e dd f2 67 75 28 77  25 29 3a ea 41 25 3a 56  |.^..gu(w%):.A%:V|
0000c1f0  24 3d be 23 77 25 3a 58  79 25 3d 9a 23 77 25 3a  |$=.#w%:Xy%=.#w%:|
0000c200  64 5f 25 3d 9a 23 77 25  3a 63 5f 25 3d 9a 23 77  |d_%=.#w%:c_%=.#w|
0000c210  25 2d 35 3a 58 24 3d be  23 77 25 3a 55 24 3d be  |%-5:X$=.#w%:U$=.|
0000c220  23 77 25 3a e3 41 25 3d  30 b8 26 45 3a 47 25 28  |#w%:.A%=0.&E:G%(|
0000c230  41 25 29 3d 9a 23 77 25  3a ed 3a e1 0d 39 e9 22  |A%)=.#w%:.:..9."|
0000c240  dd f2 5a 6c 28 78 25 2c  46 79 25 2c 6c 25 2c 61  |..Zl(x%,Fy%,l%,a|
0000c250  25 2c 51 25 29 3a ea 41  25 3a c8 8e b9 ca 0d 39  |%,Q%):.A%:.....9|
0000c260  ea 36 c9 28 46 79 25 3e  3d 33 80 46 79 25 3c 3d  |.6.(Fy%>=3.Fy%<=|
0000c270  37 29 84 46 79 25 3d 26  43 84 46 79 25 3d 26 44  |7).Fy%=&C.Fy%=&D|
0000c280  3a e7 67 25 3c 3e 32 8c  f2 5a 28 78 25 2c 46 79  |:.g%<>2..Z(x%,Fy|
0000c290  25 2c 31 29 0d 39 eb 3b  c9 46 79 25 3d 39 3a e3  |%,1).9.;.Fy%=9:.|
0000c2a0  41 25 3d 30 b8 39 3a f2  53 28 7a 4a 25 2c 41 25  |A%=0.9:.S(zJ%,A%|
0000c2b0  2c 64 5f 25 3d 41 25 29  3a ed 3a f2 46 28 7a 4a  |,d_%=A%):.:.F(zJ|
0000c2c0  25 2c 61 25 2c 51 25 2c  78 25 2c 46 79 25 29 0d  |%,a%,Q%,x%,Fy%).|
0000c2d0  39 ec 4d c9 46 79 25 3e  3d 32 32 80 46 79 25 3c  |9.M.Fy%>=22.Fy%<|
0000c2e0  3d 33 36 3a e3 41 25 3d  30 b8 26 45 3a f2 53 28  |=36:.A%=0.&E:.S(|
0000c2f0  41 79 25 2c 41 25 2c a4  5f 28 78 25 2c 46 79 25  |Ay%,A%,._(x%,Fy%|
0000c300  29 3d 41 25 29 3a ed 3a  f2 46 28 41 79 25 2c 61  |)=A%):.:.F(Ay%,a|
0000c310  25 2c 51 25 2c 78 25 2c  46 79 25 29 0d 39 ed 07  |%,Q%,x%,Fy%).9..|
0000c320  cb 3a e1 0d 39 ee 37 dd  a4 49 79 28 78 25 2c 46  |.:..9.7..Iy(x%,F|
0000c330  79 25 2c 67 61 25 29 3a  ea 6a 61 25 2c 63 25 3a  |y%,ga%):.ja%,c%:|
0000c340  6f 25 3d a3 3a e7 67 61  25 3d 26 44 8c f2 43 28  |o%=.:.ga%=&D..C(|
0000c350  78 25 2c 31 29 3a 6f 25  3d b9 0d 39 ef 06 3d b9  |x%,1):o%=..9..=.|
0000c360  0d 39 f0 1a dd f2 6a 5f  28 6c 25 2c 78 25 29 3a  |.9....j_(l%,x%):|
0000c370  ea 41 25 3a c8 8e 55 5f  25 ca 0d 39 f1 3f c9 39  |.A%:..U_%..9.?.9|
0000c380  3a 64 5f 25 3d 21 6c 25  3a e3 41 25 3d 30 b8 39  |:d_%=!l%:.A%=0.9|
0000c390  3a f2 53 28 7a 4a 25 2c  41 25 2c 64 5f 25 3d 41  |:.S(zJ%,A%,d_%=A|
0000c3a0  25 29 3a ed 3a f2 41 28  78 25 2c 38 2c a4 4a 28  |%):.:.A(x%,8,.J(|
0000c3b0  7a 4a 25 2c 21 6c 25 29  29 0d 39 f2 30 7f e3 41  |zJ%,!l%)).9.0..A|
0000c3c0  25 3d 30 b8 26 46 3a f2  53 28 41 79 25 2c 41 25  |%=0.&F:.S(Ay%,A%|
0000c3d0  2c 21 6c 25 3d 41 25 29  3a ed 3a f2 44 28 78 25  |,!l%=A%):.:.D(x%|
0000c3e0  2c 55 5f 25 2c 21 6c 25  29 0d 39 f3 07 cb 3a e1  |,U_%,!l%).9...:.|
0000c3f0  0d 39 f4 b3 dd f2 65 5f  28 78 25 29 3a ea 41 25  |.9....e_(x%):.A%|
0000c400  3a f2 41 28 78 25 2c 31  2c 56 24 29 3a e3 41 25  |:.A(x%,1,V$):.A%|
0000c410  3d 31 b8 35 3a f2 5a 28  78 25 2c 41 25 2b 32 2c  |=1.5:.Z(x%,A%+2,|
0000c420  2d 28 58 79 25 3d 41 25  29 29 3a ed 3a f2 41 28  |-(Xy%=A%)):.:.A(|
0000c430  78 25 2c 38 2c a4 4a 28  7a 4a 25 2c 64 5f 25 29  |x%,8,.J(zJ%,d_%)|
0000c440  29 3a f2 41 28 78 25 2c  31 37 2c 55 24 29 3a f2  |):.A(x%,17,U$):.|
0000c450  41 28 78 25 2c 31 38 2c  58 24 29 3a f2 5a 28 78  |A(x%,18,X$):.Z(x|
0000c460  25 2c 26 43 2c 2d 28 63  5f 25 3d 2d 31 29 29 3a  |%,&C,-(c_%=-1)):|
0000c470  f2 5a 28 78 25 2c 26 44  2c 2d 28 63 5f 25 3d 31  |.Z(x%,&D,-(c_%=1|
0000c480  29 29 3a e3 41 25 3d 30  b8 26 45 3a f2 44 28 78  |)):.A%=0.&E:.D(x|
0000c490  25 2c 41 25 2b 32 32 2c  47 25 28 41 25 29 29 3a  |%,A%+22,G%(A%)):|
0000c4a0  ed 3a e1 0d 39 f5 5c dd  f2 6c 5f 28 78 25 29 3a  |.:..9.\..l_(x%):|
0000c4b0  ea 41 25 2c 42 25 3a 56  24 3d a4 4d 28 78 25 2c  |.A%,B%:V$=.M(x%,|
0000c4c0  31 29 3a 55 24 3d a4 4d  28 78 25 2c 31 37 29 3a  |1):U$=.M(x%,17):|
0000c4d0  58 24 3d a4 4d 28 78 25  2c 31 38 29 3a 42 25 3d  |X$=.M(x%,18):B%=|
0000c4e0  58 79 25 3a e3 41 25 3d  31 b8 35 3a e7 a4 5a 28  |Xy%:.A%=1.5:..Z(|
0000c4f0  78 25 2c 41 25 2b 32 29  8c 58 79 25 3d 41 25 0d  |x%,A%+2).Xy%=A%.|
0000c500  39 f6 1f ed 3a e7 41 25  3c 3e 42 25 80 74 25 3d  |9...:.A%<>B%.t%=|
0000c510  a4 47 28 32 29 8c f2 51  28 76 25 2c 30 29 0d 39  |.G(2)..Q(v%,0).9|
0000c520  f7 1b e7 a4 5a 28 78 25  2c 26 43 29 8c 63 5f 25  |....Z(x%,&C).c_%|
0000c530  3d 2d 31 8b 63 5f 25 3d  31 0d 39 f8 24 e3 41 25  |=-1.c_%=1.9.$.A%|
0000c540  3d 30 b8 26 45 3a 47 25  28 41 25 29 3d a4 5f 28  |=0.&E:G%(A%)=._(|
0000c550  78 25 2c 41 25 2b 32 32  29 3a ed 3a e1 0d 39 f9  |x%,A%+22):.:..9.|
0000c560  29 dd f2 51 28 62 25 2c  53 6c 25 29 3a e7 76 25  |)..Q(b%,Sl%):.v%|
0000c570  3d 30 80 62 25 3c 3e 30  8c f2 43 28 69 25 2c 2d  |=0.b%<>0..C(i%,-|
0000c580  31 29 3a f2 4f 79 0d 39  fa 29 e7 62 25 3d 30 8c  |1):.Oy.9.).b%=0.|
0000c590  f2 52 5f 28 69 25 2c 43  79 25 2c 77 79 25 2c 2d  |.R_(i%,Cy%,wy%,-|
0000c5a0  6d 25 2d 59 5f 25 2c 49  79 25 2c b9 2c b9 29 0d  |m%-Y_%,Iy%,.,.).|
0000c5b0  39 fb 16 4a 5f 25 3d 30  3a e7 62 25 3c 76 25 4a  |9..J_%=0:.b%<v%J|
0000c5c0  5f 25 3d 2d 31 0d 39 fc  0f e7 62 25 3e 76 25 4a  |_%=-1.9...b%>v%J|
0000c5d0  5f 25 3d 31 0d 39 fd 0b  e7 4a 5f 25 3d 30 8c 0d  |_%=1.9...J_%=0..|
0000c5e0  39 fe 20 6d 4a 25 3d 53  6c 25 3c 3e 69 79 25 3a  |9. mJ%=Sl%<>iy%:|
0000c5f0  e7 53 6c 25 3c 69 79 25  8c 4a 5f 25 3d 2d 31 0d  |.Sl%<iy%.J_%=-1.|
0000c600  39 ff 12 e7 53 6c 25 3e  69 79 25 8c 4a 5f 25 3d  |9...Sl%>iy%.J_%=|
0000c610  31 0d 3a 00 2a cd 3a 76  25 3d 62 25 3a 69 79 25  |1.:.*.:v%=b%:iy%|
0000c620  3d 53 6c 25 3a f2 64 79  3a e7 62 25 3c 3e 30 8c  |=Sl%:.dy:.b%<>0.|
0000c630  f2 56 4a 28 62 25 2c 53  6c 25 29 0d 3a 01 05 e1  |.VJ(b%,Sl%).:...|
0000c640  0d 3a 02 ad dd f2 79 79  ea 53 79 25 2c 59 25 3a  |.:....yy.Sy%,Y%:|
0000c650  5a 24 28 60 4a 25 2d 31  2c 30 29 3d a4 4d 28 5f  |Z$(`J%-1,0)=.M(_|
0000c660  5f 25 2c 33 29 3a 5a 24  28 60 4a 25 2d 31 2c 31  |_%,3):Z$(`J%-1,1|
0000c670  29 3d a4 4d 28 5f 5f 25  2c 34 29 3a 53 79 25 3d  |)=.M(__%,4):Sy%=|
0000c680  28 6b 25 2d 32 2a 32 34  2d 36 38 2d 32 2a 26 63  |(k%-2*24-68-2*&c|
0000c690  29 2f 50 5f 25 3a 59 25  3d 6d 25 2b 32 34 2b 36  |)/P_%:Y%=m%+24+6|
0000c6a0  38 2b 53 79 25 2a 28 60  4a 25 2d 31 29 3a f2 4e  |8+Sy%*(`J%-1):.N|
0000c6b0  28 69 25 2c 6d 79 25 2b  26 43 2c 2d 59 25 2c 60  |(i%,my%+&C,-Y%,`|
0000c6c0  79 25 2d 26 43 2c 2d 59  25 2d 53 79 25 29 3a 76  |y%-&C,-Y%-Sy%):v|
0000c6d0  79 25 3d b9 3a e7 ac a4  44 79 8c c8 99 26 34 30  |y%=.:...Dy...&40|
0000c6e0  30 44 34 2c 2c 2d 31 3a  60 4a 25 3d 30 0d 3a 03  |0D4,,-1:`J%=0.:.|
0000c6f0  05 e1 0d 3a 04 3f dd f2  61 ea 41 25 3a e3 41 25  |...:.?..a.A%:.A%|
0000c700  3d 39 b8 32 33 3a f2 41  28 43 79 25 2c 41 25 2c  |=9.23:.A(Cy%,A%,|
0000c710  22 22 29 3a ed 3a 43 24  3d 22 22 3a 64 79 25 3d  |""):.:C$="":dy%=|
0000c720  2d 31 3a f2 52 28 43 79  25 2c 32 35 2c 31 29 3a  |-1:.R(Cy%,25,1):|
0000c730  e1 0d 3a 05 4d dd f2 5f  79 3a ea 65 79 25 3a f2  |..:.M.._y:.ey%:.|
0000c740  4a 5f 3a 65 79 25 3d a4  71 28 43 24 29 2d 36 34  |J_:ey%=.q(C$)-64|
0000c750  3a 4d 25 28 65 79 25 29  2d 3d 31 3a 43 24 3d 22  |:M%(ey%)-=1:C$="|
0000c760  22 3a 64 79 25 3d 2d 31  3a e7 4d 25 28 65 79 25  |":dy%=-1:.M%(ey%|
0000c770  29 3d 30 8c 46 25 28 65  79 25 29 3d 2d 31 0d 3a  |)=0.F%(ey%)=-1.:|
0000c780  06 6d f2 4e 28 69 25 2c  77 79 25 2b 75 25 2d 34  |.m.N(i%,wy%+u%-4|
0000c790  30 2c 2d 6d 25 2d 59 5f  25 2a 65 79 25 2c 77 79  |0,-m%-Y_%*ey%,wy|
0000c7a0  25 2b 75 25 2c 2d 6d 25  2d 59 5f 25 2a 28 65 79  |%+u%,-m%-Y_%*(ey|
0000c7b0  25 2b 31 29 29 3a f2 4e  28 69 25 2c 6d 79 25 2c  |%+1)):.N(i%,my%,|
0000c7c0  2d 6d 25 2d 59 5f 25 2a  65 79 25 2c 6d 79 25 2b  |-m%-Y_%*ey%,my%+|
0000c7d0  34 30 2c 2d 6d 25 2d 59  5f 25 2a 28 65 79 25 2b  |40,-m%-Y_%*(ey%+|
0000c7e0  31 29 29 3a 76 79 25 3d  b9 3a e1 0d 3a 07 61 dd  |1)):vy%=.:..:.a.|
0000c7f0  f2 4a 5f 3a ea 42 25 2c  4c 25 2c 41 25 3a 42 25  |.J_:.B%,L%,A%:B%|
0000c800  3d 68 5f 25 3a 4c 25 3d  a4 71 28 43 24 29 2d 36  |=h_%:L%=.q(C$)-6|
0000c810  34 3a 42 25 3d 46 25 28  4c 25 29 3a 41 25 3d 59  |4:B%=F%(L%):A%=Y|
0000c820  4a 25 3a c8 95 41 25 3e  30 3a 42 25 3d 42 25 21  |J%:..A%>0:B%=B%!|
0000c830  34 3a 41 25 2d 3d 31 3a  ce 3a e7 59 4a 25 3d 30  |4:A%-=1:.:.YJ%=0|
0000c840  8c 46 25 28 4c 25 29 3d  42 25 21 34 0d 3a 08 19  |.F%(L%)=B%!4.:..|
0000c850  e7 42 25 21 34 3c 3e 2d  31 8c 21 28 42 25 21 34  |.B%!4<>-1.!(B%!4|
0000c860  29 3d 21 42 25 0d 3a 09  22 e7 21 42 25 3d 2d 31  |)=!B%.:.".!B%=-1|
0000c870  8c 68 5f 25 3d 42 25 21  34 8b 21 28 21 42 25 2b  |.h_%=B%!4.!(!B%+|
0000c880  34 29 3d 42 25 21 34 0d  3a 0a 13 f2 4c 79 28 73  |4)=B%!4.:...Ly(s|
0000c890  5f 25 2c 42 25 2c b9 29  3a e1 0d 3a 0b 34 dd f2  |_%,B%,.):..:.4..|
0000c8a0  79 28 65 61 25 29 3a ea  4f 25 2c 4c 25 2c 52 24  |y(ea%):.O%,L%,R$|
0000c8b0  3a e3 4c 25 3d 39 b8 32  33 3a e7 a4 4d 28 43 79  |:.L%=9.23:..M(Cy|
0000c8c0  25 2c 4c 25 29 3c 3e 22  22 8c 4f 25 3d b9 0d 3a  |%,L%)<>"".O%=..:|
0000c8d0  0c 0a ed 3a e7 4f 25 8c  0d 3a 0d 5e 52 24 3d a4  |...:.O%..:.^R$=.|
0000c8e0  73 28 a4 4d 28 43 79 25  2c 39 29 2b 22 20 22 2b  |s(.M(Cy%,9)+" "+|
0000c8f0  a4 4d 28 43 79 25 2c 26  41 29 29 3a 4c 25 3d a4  |.M(Cy%,&A)):L%=.|
0000c900  71 28 52 24 29 2d 36 34  3a 4d 25 28 4c 25 29 2b  |q(R$)-64:M%(L%)+|
0000c910  3d 31 3a e7 43 24 3d 22  22 8c 4f 25 3d 4c 25 8b  |=1:.C$="".O%=L%.|
0000c920  4f 25 3d a4 71 28 43 24  29 2d 36 34 3a 4d 25 28  |O%=.q(C$)-64:M%(|
0000c930  4f 25 29 2d 3d 31 0d 3a  0e 16 e7 64 79 25 3c 30  |O%)-=1.:...dy%<0|
0000c940  8c f2 4c 5f 8b f2 4a 5f  3a f2 4c 5f 0d 3a 0f 17  |..L_..J_:.L_.:..|
0000c950  43 24 3d 22 22 3a 64 79  25 3d 2d 31 3a e7 ac 65  |C$="":dy%=-1:..e|
0000c960  61 25 8c 0d 3a 10 3f e7  4d 25 28 4c 25 29 3d 31  |a%..:.?.M%(L%)=1|
0000c970  8c f2 4e 28 69 25 2c 77  79 25 2b 75 25 2d 34 30  |..N(i%,wy%+u%-40|
0000c980  2c 2d 6d 25 2d 59 5f 25  2a 4c 25 2c 77 79 25 2b  |,-m%-Y_%*L%,wy%+|
0000c990  75 25 2c 2d 6d 25 2d 59  5f 25 2a 28 4c 25 2b 31  |u%,-m%-Y_%*(L%+1|
0000c9a0  29 29 0d 3a 11 0c cc f2  50 75 28 52 24 29 0d 3a  |)).:....Pu(R$).:|
0000c9b0  12 0b cd 3a 76 79 25 3d  b9 0d 3a 13 07 cd 3a e1  |...:vy%=..:...:.|
0000c9c0  0d 3a 14 74 dd f2 50 75  28 41 24 29 3a ea 42 25  |.:.t..Pu(A$):.B%|
0000c9d0  2c 41 25 2c 50 25 3a 50  25 3d a4 71 28 41 24 29  |,A%,P%:P%=.q(A$)|
0000c9e0  2d 36 34 3a 42 25 3d 46  25 28 50 25 29 3a c8 95  |-64:B%=F%(P%):..|
0000c9f0  a4 73 28 a4 4b 28 42 25  2c 30 29 2b 22 20 22 2b  |.s(.K(B%,0)+" "+|
0000ca00  a4 4b 28 42 25 2c 31 29  29 3c 3e 52 24 3a 42 25  |.K(B%,1))<>R$:B%|
0000ca10  3d 42 25 21 34 3a 41 25  2b 3d 31 3a ce 3a f2 51  |=B%!4:A%+=1:.:.Q|
0000ca20  28 50 25 2c 41 25 2d 41  25 83 28 32 2a 58 79 25  |(P%,A%-A%.(2*Xy%|
0000ca30  29 29 3a e1 0d 3a 15 cd  dd f2 4c 5f 3a ea 41 25  |)):..:....L_:.A%|
0000ca40  2c 42 25 2c 43 25 2c 53  25 3a 53 25 3d 26 43 3a  |,B%,C%,S%:S%=&C:|
0000ca50  e3 41 25 3d 39 b8 32 33  3a 53 25 2b 3d a9 a4 4d  |.A%=9.23:S%+=..M|
0000ca60  28 43 79 25 2c 41 25 29  2b 31 3a ed 3a 43 25 3d  |(Cy%,A%)+1:.:C%=|
0000ca70  a4 77 28 73 5f 25 2c 53  25 2c b9 29 3a 42 25 3d  |.w(s_%,S%,.):B%=|
0000ca80  68 5f 25 3a 43 25 21 38  3d 53 25 3a 53 25 3d 43  |h_%:C%!8=S%:S%=C|
0000ca90  25 2b 26 43 3a e3 41 25  3d 39 b8 32 33 3a 24 28  |%+&C:.A%=9.23:$(|
0000caa0  53 25 29 3d a4 4d 28 43  79 25 2c 41 25 29 2b bd  |S%)=.M(Cy%,A%)+.|
0000cab0  26 41 3a 53 25 2b 3d a9  28 24 53 25 29 3a ed 3a  |&A:S%+=.($S%):.:|
0000cac0  41 25 3d a4 71 28 a4 73  28 a4 4d 28 43 79 25 2c  |A%=.q(.s(.M(Cy%,|
0000cad0  39 29 2b 22 20 22 2b a4  4d 28 43 79 25 2c 26 41  |9)+" "+.M(Cy%,&A|
0000cae0  29 29 29 2d 36 34 3a e7  46 25 28 41 25 29 3d 2d  |)))-64:.F%(A%)=-|
0000caf0  31 8c 46 25 28 41 25 29  3d 43 25 3a 41 25 2d 3d  |1.F%(A%)=C%:A%-=|
0000cb00  31 0d 3a 16 0c e7 42 25  3c 3e 2d 31 8c 0d 3a 17  |1.:...B%<>-1..:.|
0000cb10  32 c8 95 46 25 28 41 25  29 3d 2d 31 80 41 25 3e  |2..F%(A%)=-1.A%>|
0000cb20  31 3a 41 25 2d 3d 31 3a  ce 3a e7 46 25 28 41 25  |1:A%-=1:.:.F%(A%|
0000cb30  29 3c 3e 2d 31 8c 42 25  3d 46 25 28 41 25 29 0d  |)<>-1.B%=F%(A%).|
0000cb40  3a 18 55 c8 95 a4 73 28  a4 4b 28 42 25 2c 30 29  |:.U...s(.K(B%,0)|
0000cb50  2b 22 20 22 2b a4 4b 28  42 25 2c 31 29 29 3c 52  |+" "+.K(B%,1))<R|
0000cb60  24 80 42 25 21 34 3c 3e  2d 31 3a 42 25 3d 42 25  |$.B%!4<>-1:B%=B%|
0000cb70  21 34 3a ce 3a e7 a4 73  28 a4 4b 28 42 25 2c 30  |!4:.:..s(.K(B%,0|
0000cb80  29 2b 22 20 22 2b a4 4b  28 42 25 2c 31 29 29 3e  |)+" "+.K(B%,1))>|
0000cb90  3d 52 24 8c 0d 3a 19 18  e7 46 25 28 41 25 29 3d  |=R$..:...F%(A%)=|
0000cba0  42 25 8c 46 25 28 41 25  29 3d 43 25 0d 3a 1a 36  |B%.F%(A%)=C%.:.6|
0000cbb0  21 43 25 3d 21 42 25 3a  43 25 21 34 3d 42 25 3a  |!C%=!B%:C%!4=B%:|
0000cbc0  21 42 25 3d 43 25 3a e7  21 43 25 3c 3e 2d 31 8c  |!B%=C%:.!C%<>-1.|
0000cbd0  21 28 21 43 25 2b 34 29  3d 43 25 8b 68 5f 25 3d  |!(!C%+4)=C%.h_%=|
0000cbe0  43 25 0d 3a 1b 1c cc 3a  42 25 21 34 3d 43 25 3a  |C%.:...:B%!4=C%:|
0000cbf0  21 43 25 3d 42 25 3a 43  25 21 34 3d 2d 31 0d 3a  |!C%=B%:C%!4=-1.:|
0000cc00  1c 05 cd 0d 3a 1d 24 cc  68 5f 25 3d 43 25 3a 21  |....:.$.h_%=C%:!|
0000cc10  43 25 3d 2d 31 3a 43 25  21 34 3d 2d 31 3a 46 25  |C%=-1:C%!4=-1:F%|
0000cc20  28 41 25 29 3d 43 25 0d  3a 1e 07 cd 3a e1 0d 3a  |(A%)=C%.:...:..:|
0000cc30  1f 29 dd a4 71 28 41 24  29 3a ea 42 25 3a 42 25  |.)..q(A$):.B%:B%|
0000cc40  3d 97 28 a4 73 28 41 24  29 29 3a e7 42 25 3c 36  |=.(.s(A$)):.B%<6|
0000cc50  35 8c 42 25 3d 36 35 0d  3a 20 07 3d 42 25 0d 3a  |5.B%=65.: .=B%.:|
0000cc60  21 66 dd a4 73 28 41 24  29 3a ea 42 25 3a 41 24  |!f..s(A$):.B%:A$|
0000cc70  3d a4 76 28 41 24 29 3a  42 25 3d 97 c0 41 24 2c  |=.v(A$):B%=..A$,|
0000cc80  31 29 3a c8 95 ac 28 42  25 3e 34 37 80 42 25 3c  |1):...(B%>47.B%<|
0000cc90  35 38 29 80 ac 28 42 25  3e 36 34 80 42 25 3c 39  |58)..(B%>64.B%<9|
0000cca0  31 29 80 41 24 3c 3e 22  22 3a 41 24 3d c1 41 24  |1).A$<>"":A$=.A$|
0000ccb0  2c 32 29 3a 42 25 3d 97  c0 41 24 2c 31 29 3a ce  |,2):B%=..A$,1):.|
0000ccc0  3a 3d 41 24 0d 3a 22 be  dd f2 74 79 28 70 25 2c  |:=A$.:"...ty(p%,|
0000ccd0  62 25 29 3a ea 41 25 3a  65 79 25 3d 75 25 2d 34  |b%):.A%:ey%=u%-4|
0000cce0  30 3a 62 25 21 38 3d 21  62 25 2b 65 79 25 3a 62  |0:b%!8=!b%+ey%:b|
0000ccf0  25 21 34 38 3d 62 25 21  34 30 2b 65 79 25 3a 62  |%!48=b%!40+ey%:b|
0000cd00  25 2b 3d 38 38 2b 38 3a  e3 41 25 3d 26 42 b8 31  |%+=88+8:.A%=&B.1|
0000cd10  37 3a 62 25 21 28 41 25  2a 33 32 29 3d 65 79 25  |7:b%!(A%*32)=ey%|
0000cd20  2d 31 36 3a ed 3a e3 41  25 3d 38 b8 32 33 3a 41  |-16:.:.A%=8.23:A|
0000cd30  25 2d 3d 37 2a 28 41 25  3d 26 42 29 3a 62 25 21  |%-=7*(A%=&B):b%!|
0000cd40  28 41 25 2a 33 32 29 3d  65 79 25 3a ed 3a 62 25  |(A%*32)=ey%:.:b%|
0000cd50  21 28 32 34 2a 33 32 2d  38 29 3d 28 65 79 25 2d  |!(24*32-8)=(ey%-|
0000cd60  33 38 34 29 2f 34 3a 62  25 21 28 32 34 2a 33 32  |384)/4:b%!(24*32|
0000cd70  29 3d 62 25 21 28 32 34  2a 33 32 2d 38 29 2b 26  |)=b%!(24*32-8)+&|
0000cd80  38 30 0d 3a 23 85 62 25  21 28 32 35 2a 33 32 2d  |80.:#.b%!(25*32-|
0000cd90  38 29 3d 62 25 21 28 32  34 2a 33 32 29 2b 28 65  |8)=b%!(24*32)+(e|
0000cda0  79 25 2d 33 38 34 29 2f  34 3a 62 25 21 28 32 35  |y%-384)/4:b%!(25|
0000cdb0  2a 33 32 29 3d 62 25 21  28 32 35 2a 33 32 2d 38  |*32)=b%!(25*32-8|
0000cdc0  29 2b 26 38 30 3a 62 25  21 28 32 36 2a 33 32 2d  |)+&80:b%!(26*32-|
0000cdd0  38 29 3d 62 25 21 28 32  35 2a 33 32 29 2b 28 65  |8)=b%!(25*32)+(e|
0000cde0  79 25 2d 33 38 34 29 2f  34 3a 62 25 21 28 32 36  |y%-384)/4:b%!(26|
0000cdf0  2a 33 32 29 3d 62 25 21  28 32 36 2a 33 32 2d 38  |*32)=b%!(26*32-8|
0000ce00  29 2b 26 38 30 3a e1 0d  3a 24 6b dd f2 74 5f 3a  |)+&80:..:$k..t_:|
0000ce10  ea 41 25 2c 42 25 2c 43  25 2c 53 25 2c 77 25 2c  |.A%,B%,C%,S%,w%,|
0000ce20  4c 25 3a e3 41 25 3d 30  b8 32 36 3a 4d 25 28 41  |L%:.A%=0.26:M%(A|
0000ce30  25 29 3d 30 3a 46 25 28  41 25 29 3d 2d 31 3a ed  |%)=0:F%(A%)=-1:.|
0000ce40  3a 4d 25 28 30 29 3d 31  3a 43 25 3d 2d 31 3a 68  |:M%(0)=1:C%=-1:h|
0000ce50  5f 25 3d 2d 31 3a 50 5f  25 3d 31 36 3a 77 25 3d  |_%=-1:P_%=16:w%=|
0000ce60  8e 28 78 24 29 3a e7 ac  46 75 25 80 77 25 3c 3e  |.(x$):..Fu%.w%<>|
0000ce70  30 8c 0d 3a 25 3b c8 95  ac c5 23 77 25 3a 53 25  |0..:%;....#w%:S%|
0000ce80  3d bb be 23 77 25 3a 42  25 3d a4 77 28 73 5f 25  |=..#w%:B%=.w(s_%|
0000ce90  2c 53 25 2c b9 29 3a e7  43 25 3c 3e 2d 31 8c 43  |,S%,.):.C%<>-1.C|
0000cea0  25 21 34 3d 42 25 8b 68  5f 25 3d 42 25 0d 3a 26  |%!4=B%.h_%=B%.:&|
0000ceb0  67 21 42 25 3d 43 25 3a  42 25 21 38 3d 53 25 3a  |g!B%=C%:B%!8=S%:|
0000cec0  c8 99 26 43 2c 34 2c 77  25 2c 42 25 2b 26 43 2c  |..&C,4,w%,B%+&C,|
0000ced0  53 25 2d 26 43 3a 4c 25  3d a4 71 28 a4 4b 28 42  |S%-&C:L%=.q(.K(B|
0000cee0  25 2c 30 29 2b 22 20 22  2b a4 4b 28 42 25 2c 31  |%,0)+" "+.K(B%,1|
0000cef0  29 29 2d 36 34 3a 4d 25  28 4c 25 29 2b 3d 31 3a  |))-64:M%(L%)+=1:|
0000cf00  e7 46 25 28 4c 25 29 3d  2d 31 8c 46 25 28 4c 25  |.F%(L%)=-1.F%(L%|
0000cf10  29 3d 42 25 0d 3a 27 15  43 25 3d 42 25 3a e7 78  |)=B%.:'.C%=B%:.x|
0000cf20  5f 25 8c f2 77 28 ac 31  29 0d 3a 28 16 ce 3a e7  |_%..w(.1).:(..:.|
0000cf30  68 5f 25 3c 3e 2d 31 8c  42 25 21 34 3d 2d 31 0d  |h_%<>-1.B%!4=-1.|
0000cf40  3a 29 1e cd 3a d9 23 77  25 3a 77 25 3d 8e 66 24  |:)..:.#w%:w%=.f$|
0000cf50  3a e7 ac 46 75 25 80 77  25 3c 3e 30 8c 0d 3a 2a  |:..Fu%.w%<>0..:*|
0000cf60  37 50 5f 25 3d bb be 23  77 25 3a e3 42 25 3d 30  |7P_%=..#w%:.B%=0|
0000cf70  b8 50 5f 25 2d 31 3a 5a  24 28 42 25 2c 30 29 3d  |.P_%-1:Z$(B%,0)=|
0000cf80  be 23 77 25 3a 5a 24 28  42 25 2c 31 29 3d be 23  |.#w%:Z$(B%,1)=.#|
0000cf90  77 25 3a ed 0d 3a 2b 11  cd 3a d9 23 77 25 3a 77  |w%:..:+..:.#w%:w|
0000cfa0  25 3d 30 3a e1 0d 3a 2c  a5 dd f2 44 4a 3a ea 77  |%=0:..:,...DJ:.w|
0000cfb0  25 2c 42 25 2c 53 25 2c  41 25 3a 77 25 3d ae 78  |%,B%,S%,A%:w%=.x|
0000cfc0  24 3a 42 25 3d 68 5f 25  3a c8 95 42 25 3c 3e 2d  |$:B%=h_%:..B%<>-|
0000cfd0  31 3a d5 23 77 25 2c c3  42 25 21 38 3a c8 99 26  |1:.#w%,.B%!8:..&|
0000cfe0  43 2c 32 2c 77 25 2c 42  25 2b 26 43 2c 42 25 21  |C,2,w%,B%+&C,B%!|
0000cff0  38 20 2d 26 43 3a 42 25  3d 42 25 21 34 3a ce 3a  |8 -&C:B%=B%!4:.:|
0000d000  d9 23 77 25 3a 77 25 3d  ae 66 24 3a d5 23 77 25  |.#w%:w%=.f$:.#w%|
0000d010  2c c3 50 5f 25 3a e3 41  25 3d 30 b8 50 5f 25 2d  |,.P_%:.A%=0.P_%-|
0000d020  31 3a d5 23 77 25 2c 5a  24 28 41 25 2c 30 29 2b  |1:.#w%,Z$(A%,0)+|
0000d030  bd 26 41 2b 5a 24 28 41  25 2c 31 29 3a ed 3a d9  |.&A+Z$(A%,1):.:.|
0000d040  23 77 25 3a 77 25 3d 30  3a e1 0d 3a 2d 19 dd f2  |#w%:w%=0:..:-...|
0000d050  56 4a 28 65 79 25 2c 50  61 25 29 3a e7 65 79 25  |VJ(ey%,Pa%):.ey%|
0000d060  3e 30 8c 0d 3a 2e a6 ea  41 25 2c 42 25 2c 43 25  |>0..:...A%,B%,C%|
0000d070  2c 46 25 3a 42 25 3d 46  25 28 65 79 25 29 3a c8  |,F%:B%=F%(ey%):.|
0000d080  95 50 61 25 3e 30 3a 42  25 3d 42 25 21 34 3a 50  |.Pa%>0:B%=B%!4:P|
0000d090  61 25 2d 3d 31 3a ce 3a  f5 e3 43 25 3d 30 b8 26  |a%-=1:.:..C%=0.&|
0000d0a0  45 3a 41 24 28 41 25 2c  43 25 29 3d a4 4b 28 42  |E:A$(A%,C%)=.K(B|
0000d0b0  25 2c 43 25 29 3a ed 3a  41 25 2b 3d 31 3a 46 25  |%,C%):.:A%+=1:F%|
0000d0c0  3d 28 41 25 3e 58 79 25  2a 32 2d 31 29 84 42 25  |=(A%>Xy%*2-1).B%|
0000d0d0  21 34 3d 2d 31 3a 42 25  3d 42 25 21 34 3a e7 ac  |!4=-1:B%=B%!4:..|
0000d0e0  46 25 8c 46 25 3d 28 a4  71 28 a4 4b 28 42 25 2c  |F%.F%=(.q(.K(B%,|
0000d0f0  30 29 2b 22 20 22 2b a4  4b 28 42 25 2c 31 29 29  |0)+" "+.K(B%,1))|
0000d100  2d 36 34 3c 3e 65 79 25  29 0d 3a 2f 07 fd 46 25  |-64<>ey%).:/..F%|
0000d110  0d 3a 30 07 cd 3a e1 0d  3a 31 5f dd a4 4b 28 42  |.:0..:..:1_..K(B|
0000d120  25 2c 4c 25 29 3a ea 41  24 3a 42 25 2b 3d 26 43  |%,L%):.A$:B%+=&C|
0000d130  3a c8 95 4c 25 3e 30 3a  c8 95 3f 42 25 3c 3e 26  |:..L%>0:..?B%<>&|
0000d140  41 3a 42 25 2b 3d 31 3a  ce 3a 42 25 2b 3d 31 3a  |A:B%+=1:.:B%+=1:|
0000d150  4c 25 2d 3d 31 3a ce 3a  c8 95 3f 42 25 3c 3e 26  |L%-=1:.:..?B%<>&|
0000d160  41 3a 41 24 2b 3d bd 3f  42 25 3a 42 25 2b 3d 31  |A:A$+=.?B%:B%+=1|
0000d170  3a ce 3a 3d 41 24 0d 3a  32 78 dd f2 52 4a 28 53  |:.:=A$.:2x..RJ(S|
0000d180  24 29 3a ea 65 24 2c 41  25 2c 42 25 2c 53 25 2c  |$):.e$,A%,B%,S%,|
0000d190  49 25 2c 6e 61 25 2c 75  61 25 2c 4b 61 25 2c 60  |I%,na%,ua%,Ka%,`|
0000d1a0  6c 25 3a 43 75 25 3d 30  3a 6a 4a 25 3d 30 3a 77  |l%:Cu%=0:jJ%=0:w|
0000d1b0  25 3d 8e 53 24 3a c8 95  ac c5 23 77 25 3a 65 24  |%=.S$:....#w%:e$|
0000d1c0  3d be 23 77 25 3a e7 65  24 3c 3e 22 22 8c 41 25  |=.#w%:.e$<>"".A%|
0000d1d0  3d a4 75 79 28 65 24 29  3a 43 75 25 2b 3d 31 3a  |=.uy(e$):Cu%+=1:|
0000d1e0  e7 41 25 3e 6a 4a 25 8c  6a 4a 25 3d 41 25 0d 3a  |.A%>jJ%.jJ%=A%.:|
0000d1f0  33 17 ce 3a d9 23 77 25  3a 77 25 3d 30 3a e7 6a  |3..:.#w%:w%=0:.j|
0000d200  4a 25 3e 30 8c 0d 3a 34  c9 c8 99 26 34 30 30 44  |J%>0..:4...&400D|
0000d210  39 2c 2c 50 24 2b 22 2e  52 65 73 6f 75 72 63 65  |9,,P$+".Resource|
0000d220  73 2e 22 2b 42 24 2b 22  2e 54 65 6d 70 6c 61 74  |s."+B$+".Templat|
0000d230  65 73 22 3a c8 99 26 34  30 30 44 42 2c 2c 2c 30  |es":..&400DB,,,0|
0000d240  2c 30 2c 30 2c 22 49 6d  70 6f 72 74 22 b8 2c 4b  |,0,0,"Import".,K|
0000d250  61 25 2c 60 6c 25 3a c8  99 33 30 2c 36 2c 2c 2c  |a%,`l%:..30,6,,,|
0000d260  4b 61 25 b8 2c 2c 64 6c  25 3b 6e 61 25 3a c8 99  |Ka%.,,dl%;na%:..|
0000d270  33 30 2c 36 2c 2c 2c 60  6c 25 b8 2c 2c 6a 6c 25  |30,6,,,`l%.,,jl%|
0000d280  3b 75 61 25 3a c8 99 26  34 30 30 44 42 2c 2c 64  |;ua%:..&400DB,,d|
0000d290  6c 25 2c 6a 6c 25 2c 6a  6c 25 2b 60 6c 25 2c 76  |l%,jl%,jl%+`l%,v|
0000d2a0  6c 25 2c 22 49 6d 70 6f  72 74 22 2c 30 3a c8 99  |l%,"Import",0:..|
0000d2b0  26 34 30 30 43 31 2c 2c  64 6c 25 b8 47 79 25 3a  |&400C1,,dl%.Gy%:|
0000d2c0  c8 99 26 34 30 30 44 41  3a 4a 24 3d 53 24 0d 3a  |..&400DA:J$=S$.:|
0000d2d0  35 3c 42 25 3d 31 3a e3  41 25 3d 26 41 b8 35 32  |5<B%=1:.A%=&A.52|
0000d2e0  88 33 3a f2 41 28 47 79  25 2c 41 25 2c c3 42 25  |.3:.A(Gy%,A%,.B%|
0000d2f0  29 3a e7 42 25 3e 30 8c  42 25 2b 3d 31 3a e7 42  |):.B%>0.B%+=1:.B|
0000d300  25 3e 6a 4a 25 8c 42 25  3d 30 0d 3a 36 5a ed 3a  |%>jJ%.B%=0.:6Z.:|
0000d310  f2 41 28 47 79 25 2c 35  34 2c a4 41 28 22 49 6d  |.A(Gy%,54,.A("Im|
0000d320  70 6f 72 74 31 22 29 29  3a f2 41 28 47 79 25 2c  |port1")):.A(Gy%,|
0000d330  35 35 2c a4 41 28 22 49  6d 70 6f 72 74 31 22 29  |55,.A("Import1")|
0000d340  29 3a f2 4d 28 47 79 25  2c 37 30 2c 31 29 3a f2  |):.M(Gy%,70,1):.|
0000d350  5a 28 47 79 25 2c 36 39  2c 30 29 3a f2 5f 28 53  |Z(Gy%,69,0):._(S|
0000d360  24 2c 31 29 0d 3a 37 1b  cc 4a 24 3d 22 22 3a f2  |$,1).:7..J$="":.|
0000d370  42 28 a4 41 28 22 45 72  72 43 53 56 22 29 29 0d  |B(.A("ErrCSV")).|
0000d380  3a 38 07 cd 3a e1 0d 3a  39 2f dd f2 69 3a 43 75  |:8..:..:9/..i:Cu|
0000d390  25 3d 30 3a 6a 4a 25 3d  30 3a e7 4a 24 3c 3e 22  |%=0:jJ%=0:.J$<>"|
0000d3a0  22 8c ff 22 52 65 6d 6f  76 65 20 22 2b 4a 24 3a  |".."Remove "+J$:|
0000d3b0  4a 24 3d 22 22 0d 3a 3a  0d e7 47 79 25 3c 3e 2d  |J$="".::..Gy%<>-|
0000d3c0  31 8c 0d 3a 3b 37 21 4b  25 3d 47 79 25 3a 47 79  |1..:;7!K%=Gy%:Gy|
0000d3d0  25 3d 2d 31 3a c8 99 26  34 30 30 43 33 2c 2c 4b  |%=-1:..&400C3,,K|
0000d3e0  25 3a c8 99 33 30 2c 37  2c 2c 64 6c 25 3a c8 99  |%:..30,7,,dl%:..|
0000d3f0  33 30 2c 37 2c 2c 6a 6c  25 0d 3a 3c 07 cd 3a e1  |30,7,,jl%.:<..:.|
0000d400  0d 3a 3d 9f dd f2 5f 28  53 24 2c 78 6c 25 29 3a  |.:=..._(S$,xl%):|
0000d410  ea 41 25 2c 42 25 2c 43  25 2c 53 25 2c 67 24 2c  |.A%,B%,C%,S%,g$,|
0000d420  75 5f 25 3a 67 24 3d a4  4e 5f 28 53 24 2c 78 6c  |u_%:g$=.N_(S$,xl|
0000d430  25 29 3a 43 24 3d 22 22  3a 64 79 25 3d 2d 31 3a  |%):C$="":dy%=-1:|
0000d440  f2 52 28 43 79 25 2c 32  35 2c 31 29 3a e3 41 25  |.R(Cy%,25,1):.A%|
0000d450  3d 39 b8 32 33 3a 42 25  3d 26 41 2b 28 41 25 2d  |=9.23:B%=&A+(A%-|
0000d460  39 29 2a 33 3a 75 5f 25  3d bb a4 4d 28 47 79 25  |9)*3:u_%=..M(Gy%|
0000d470  2c 42 25 29 3a 53 25 3d  30 3a e7 42 25 3c 26 45  |,B%):S%=0:.B%<&E|
0000d480  8c 53 25 3d a4 4d 79 28  5a 6c 25 2c a4 4d 28 47  |.S%=.My(Zl%,.M(G|
0000d490  79 25 2c 35 35 2b 28 42  25 3d 26 41 29 29 29 0d  |y%,55+(B%=&A))).|
0000d4a0  3a 3e 32 e7 42 25 3e 26  46 80 42 25 3c 33 35 80  |:>2.B%>&F.B%<35.|
0000d4b0  a4 4d 28 47 79 25 2c 42  25 29 3d a4 4d 28 47 79  |.M(Gy%,B%)=.M(Gy|
0000d4c0  25 2c 31 36 29 80 a4 5a  28 47 79 25 2c 36 39 29  |%,16)..Z(Gy%,69)|
0000d4d0  8c 0d 3a 3f 35 53 25 3d  32 35 36 3a 43 25 3d 31  |..:?5S%=256:C%=1|
0000d4e0  36 3a c8 95 43 25 3c 42  25 3a e7 a4 4d 28 47 79  |6:..C%<B%:..M(Gy|
0000d4f0  25 2c 43 25 29 3d a4 4d  28 47 79 25 2c 31 36 29  |%,C%)=.M(Gy%,16)|
0000d500  8c 53 25 2b 3d 31 0d 3a  40 0b 43 25 2b 3d 33 3a  |.S%+=1.:@.C%+=3:|
0000d510  ce 0d 3a 41 0d cd 3a e7  75 5f 25 3e 30 8c 0d 3a  |..:A..:.u_%>0..:|
0000d520  42 1d f2 41 28 43 79 25  2c 41 25 2c a4 46 5f 28  |B..A(Cy%,A%,.F_(|
0000d530  67 24 2c 75 5f 25 2c 53  25 29 29 0d 3a 43 12 cc  |g$,u_%,S%)).:C..|
0000d540  f2 41 28 43 79 25 2c 41  25 2c 22 22 29 0d 3a 44  |.A(Cy%,A%,"").:D|
0000d550  2a cd 3a ed 3a f2 41 28  47 79 25 2c 35 39 2c c3  |*.:.:.A(Gy%,59,.|
0000d560  78 6c 25 29 3a e7 ac 49  79 25 8c f2 7a 28 69 25  |xl%):..Iy%..z(i%|
0000d570  2c 2d 31 2c 2d 31 29 0d  3a 45 3c 4b 5f 25 3d 74  |,-1,-1).:E<K_%=t|
0000d580  25 3a 77 5f 25 3d 76 25  3a 74 25 3d a4 47 28 32  |%:w_%=v%:t%=.G(2|
0000d590  29 3a f2 51 28 30 2c 30  29 3a e7 4b 5f 25 3c 3e  |):.Q(0,0):.K_%<>|
0000d5a0  74 25 84 77 5f 25 3c 3e  76 25 8c 4a 5f 25 3d 30  |t%.w_%<>v%.J_%=0|
0000d5b0  3a f2 4b 0d 3a 46 12 f2  7a 28 47 79 25 2c 2d 31  |:.K.:F..z(Gy%,-1|
0000d5c0  2c 30 29 3a e1 0d 3a 47  3a dd a4 4e 5f 28 53 24  |,0):..:G:..N_(S$|
0000d5d0  2c 78 6c 25 29 3a ea 41  24 3a 77 25 3d 8e 53 24  |,xl%):.A$:w%=.S$|
0000d5e0  3a c8 95 78 6c 25 3e 30  3a 41 24 3d be 23 77 25  |:..xl%>0:A$=.#w%|
0000d5f0  3a e7 41 24 3c 3e 22 22  8c 78 6c 25 2d 3d 31 0d  |:.A$<>"".xl%-=1.|
0000d600  3a 48 13 ce 3a d9 23 77  25 3a 77 25 3d 30 3a 3d  |:H..:.#w%:w%=0:=|
0000d610  41 24 0d 3a 49 43 dd a4  46 5f 28 41 24 2c 75 5f  |A$.:IC..F_(A$,u_|
0000d620  25 2c 55 61 25 29 3a ea  43 4a 25 2c 42 25 2c 5a  |%,Ua%):.CJ%,B%,Z|
0000d630  24 2c 4e 4a 25 3a c8 95  75 5f 25 3e 31 80 41 24  |$,NJ%:..u_%>1.A$|
0000d640  3c 3e 22 22 3a e7 97 41  24 3d 33 34 8c 43 4a 25  |<>"":..A$=34.CJ%|
0000d650  3d ac 43 4a 25 0d 3a 4a  17 e7 97 41 24 3d 34 34  |=.CJ%.:J...A$=44|
0000d660  80 ac 43 4a 25 8c 75 5f  25 2d 3d 31 0d 3a 4b 27  |..CJ%.u_%-=1.:K'|
0000d670  41 24 3d c1 41 24 2c 32  29 3a ce 3a e7 97 41 24  |A$=.A$,2):.:..A$|
0000d680  3d 33 34 8c 43 4a 25 3d  b9 3a 41 24 3d c1 41 24  |=34.CJ%=.:A$=.A$|
0000d690  2c 32 29 0d 3a 4c 24 c8  95 ac 4e 4a 25 3a e7 97  |,2).:L$...NJ%:..|
0000d6a0  41 24 3d 33 34 84 41 24  3d 22 22 8c 43 4a 25 3d  |A$=34.A$="".CJ%=|
0000d6b0  a3 3a 4e 4a 25 3d b9 0d  3a 4d 16 e7 97 41 24 3d  |.:NJ%=..:M...A$=|
0000d6c0  34 34 80 ac 43 4a 25 8c  4e 4a 25 3d b9 0d 3a 4e  |44..CJ%.NJ%=..:N|
0000d6d0  1e e7 ac 4e 4a 25 8c 5a  24 2b 3d c0 41 24 2c 31  |...NJ%.Z$+=.A$,1|
0000d6e0  29 3a 41 24 3d c1 41 24  2c 32 29 0d 3a 4f 0c ce  |):A$=.A$,2).:O..|
0000d6f0  3a c8 8e 55 61 25 ca 0d  3a 50 06 c9 30 0d 3a 51  |:..Ua%..:P..0.:Q|
0000d700  19 c9 31 3a 5a 24 3d c0  5a 24 2c a7 5a 24 2c 22  |..1:Z$=.Z$,.Z$,"|
0000d710  20 22 29 2d 31 29 0d 3a  52 19 c9 32 3a 5a 24 3d  | ")-1).:R..2:Z$=|
0000d720  c1 5a 24 2c a7 5a 24 2c  22 20 22 29 2b 31 29 0d  |.Z$,.Z$," ")+1).|
0000d730  3a 53 13 c9 33 3a e7 a7  5a 24 2c 22 20 22 29 3e  |:S..3:..Z$," ")>|
0000d740  30 8c 0d 3a 54 2d 42 25  3d a9 5a 24 3a f5 42 25  |0..:T-B%=.Z$:.B%|
0000d750  2d 3d 31 3a fd c1 5a 24  2c 42 25 2c 31 29 3d 22  |-=1:..Z$,B%,1)="|
0000d760  20 22 3a 5a 24 3d c0 5a  24 2c 42 25 2d 31 29 0d  | ":Z$=.Z$,B%-1).|
0000d770  3a 55 0a cc 5a 24 3d 22  22 0d 3a 56 05 cd 0d 3a  |:U..Z$="".:V...:|
0000d780  57 26 c9 34 3a c8 95 a7  5a 24 2c 22 20 22 29 3a  |W&.4:...Z$," "):|
0000d790  5a 24 3d c1 5a 24 2c a7  5a 24 2c 22 20 22 29 2b  |Z$=.Z$,.Z$," ")+|
0000d7a0  31 29 3a ce 0d 3a 58 49  7f 3a 42 25 3d 55 61 25  |1):..:XI.:B%=Ua%|
0000d7b0  80 ac 32 35 36 3a 41 24  3d a4 4d 28 47 79 25 2c  |..256:A$=.M(Gy%,|
0000d7c0  37 30 29 3a c8 95 42 25  3e 30 3a e7 a7 5a 24 2c  |70):..B%>0:..Z$,|
0000d7d0  41 24 29 8c 5a 24 3d c1  5a 24 2c a7 5a 24 2c 41  |A$).Z$=.Z$,.Z$,A|
0000d7e0  24 29 2b a9 41 24 29 8b  5a 24 3d 22 22 0d 3a 59  |$)+.A$).Z$="".:Y|
0000d7f0  26 42 25 2d 3d 31 3a ce  3a e7 a7 5a 24 2c 41 24  |&B%-=1:.:..Z$,A$|
0000d800  29 8c 5a 24 3d c0 5a 24  2c a7 5a 24 2c 41 24 29  |).Z$=.Z$,.Z$,A$)|
0000d810  2d 31 29 0d 3a 5a 09 cb  3a 3d 5a 24 0d 3a 5b 2f  |-1).:Z..:=Z$.:[/|
0000d820  dd a4 75 79 28 41 24 29  3a ea 47 69 25 2c 43 4a  |..uy(A$):.Gi%,CJ|
0000d830  25 3a c8 95 41 24 3c 3e  22 22 3a e7 97 41 24 3d  |%:..A$<>"":..A$=|
0000d840  33 34 8c 43 4a 25 3d ac  43 4a 25 0d 3a 5c 17 e7  |34.CJ%=.CJ%.:\..|
0000d850  97 41 24 3d 34 34 80 ac  43 4a 25 8c 47 69 25 2b  |.A$=44..CJ%.Gi%+|
0000d860  3d 31 0d 3a 5d 1c 41 24  3d c1 41 24 2c 32 29 3a  |=1.:].A$=.A$,2):|
0000d870  ce 3a 3d 47 69 25 2d 28  47 69 25 3e 30 29 0d 3a  |.:=Gi%-(Gi%>0).:|
0000d880  5e 26 dd f2 69 5f 28 71  25 2c 73 25 2c 67 25 2c  |^&..i_(q%,s%,g%,|
0000d890  59 79 25 2c 72 79 25 29  3a ea 41 25 2c 42 25 3a  |Yy%,ry%):.A%,B%:|
0000d8a0  c8 8e b9 ca 0d 3a 5f 59  c9 73 25 3d 35 38 84 73  |.....:_Y.s%=58.s|
0000d8b0  25 3d 36 30 3a 41 25 3d  bb a4 4d 28 71 25 2c 35  |%=60:A%=..M(q%,5|
0000d8c0  39 29 2d 28 73 25 2d 35  39 29 2a 28 31 2b 32 2a  |9)-(s%-59)*(1+2*|
0000d8d0  28 67 25 3d 31 29 29 3a  e7 41 25 3e 30 80 41 25  |(g%=1)):.A%>0.A%|
0000d8e0  3c 3d 43 75 25 8c f2 41  28 71 25 2c 35 39 2c c3  |<=Cu%..A(q%,59,.|
0000d8f0  41 25 29 3a f2 5f 28 4a  24 2c 41 25 29 0d 3a 60  |A%):._(J$,A%).:`|
0000d900  57 c9 73 25 3e 3d 39 80  73 25 3c 3d 35 33 3a 42  |W.s%>=9.s%<=53:B|
0000d910  25 3d 26 41 2b 33 2a 28  28 73 25 2d 39 29 81 33  |%=&A+3*((s%-9).3|
0000d920  29 3a 41 25 3d bb a4 4d  28 71 25 2c 42 25 29 2b  |):A%=..M(q%,B%)+|
0000d930  28 73 25 2d 42 25 29 2a  28 31 2b 32 2a 28 67 25  |(s%-B%)*(1+2*(g%|
0000d940  3d 31 29 29 3a e7 41 25  3e 3d 30 80 41 25 3c 3d  |=1)):.A%>=0.A%<=|
0000d950  6a 4a 25 8c 0d 3a 61 23  f2 41 28 71 25 2c 42 25  |jJ%..:a#.A(q%,B%|
0000d960  2c c3 41 25 29 3a f2 5f  28 4a 24 2c bb a4 4d 28  |,.A%):._(J$,..M(|
0000d970  71 25 2c 35 39 29 29 0d  3a 62 05 cd 0d 3a 63 26  |q%,59)).:b...:c&|
0000d980  c9 73 25 3d 35 34 84 73  25 3d 35 35 3a f2 46 28  |.s%=54.s%=55:.F(|
0000d990  5a 6c 25 2c 59 79 25 2c  72 79 25 2c 71 25 2c 73  |Zl%,Yy%,ry%,q%,s|
0000d9a0  25 29 0d 3a 64 48 c9 73  25 3d 36 36 3a f2 79 28  |%).:dH.s%=66:.y(|
0000d9b0  a3 29 3a 41 25 3d bb a4  4d 28 47 79 25 2c 35 39  |.):A%=..M(Gy%,59|
0000d9c0  29 2b 31 3a e7 41 25 3e  30 80 41 25 3c 3d 43 75  |)+1:.A%>0.A%<=Cu|
0000d9d0  25 8c f2 41 28 47 79 25  2c 35 39 2c c3 41 25 29  |%..A(Gy%,59,.A%)|
0000d9e0  3a f2 5f 28 4a 24 2c 41  25 29 0d 3a 65 4a c9 73  |:._(J$,A%).:eJ.s|
0000d9f0  25 3d 36 37 3a f5 3a f2  79 28 a3 29 3a 41 25 3d  |%=67:.:.y(.):A%=|
0000da00  bb a4 4d 28 47 79 25 2c  35 39 29 2b 31 3a e7 41  |..M(Gy%,59)+1:.A|
0000da10  25 3e 30 80 41 25 3c 3d  43 75 25 8c f2 41 28 47  |%>0.A%<=Cu%..A(G|
0000da20  79 25 2c 35 39 2c c3 41  25 29 3a f2 5f 28 4a 24  |y%,59,.A%):._(J$|
0000da30  2c 41 25 29 0d 3a 66 0b  fd 41 25 3e 43 75 25 0d  |,A%).:f..A%>Cu%.|
0000da40  3a 67 0d c9 73 25 3d 36  38 3a f2 69 0d 3a 68 33  |:g..s%=68:.i.:h3|
0000da50  c9 73 25 3d 36 39 3a f2  4d 28 71 25 2c 37 30 2c  |.s%=69:.M(q%,70,|
0000da60  94 ac a4 5a 28 71 25 2c  36 39 29 29 3a f2 5f 28  |...Z(q%,69)):._(|
0000da70  4a 24 2c bb a4 4d 28 47  79 25 2c 35 39 29 29 0d  |J$,..M(Gy%,59)).|
0000da80  3a 69 07 cb 3a e1 0d 3a  6a 3a dd f2 57 4a 28 73  |:i..:..:j:..WJ(s|
0000da90  25 2c 49 25 29 3a f2 41  28 47 79 25 2c 73 25 2c  |%,I%):.A(Gy%,s%,|
0000daa0  a4 4a 28 5a 6c 25 2c 49  25 29 29 3a f2 5f 28 4a  |.J(Zl%,I%)):._(J|
0000dab0  24 2c bb a4 4d 28 47 79  25 2c 35 39 29 29 3a e1  |$,..M(Gy%,59)):.|
0000dac0  0d 3a 6b 56 dd f2 62 5f  28 62 25 2c 4d 69 25 2c  |.:kV..b_(b%,Mi%,|
0000dad0  61 25 2c 51 25 2c 78 25  2c 6e 25 29 3a 21 4a 25  |a%,Q%,x%,n%):!J%|
0000dae0  3d 69 25 3a e7 4c 25 28  62 25 2c 4d 69 25 2d 26  |=i%:.L%(b%,Mi%-&|
0000daf0  44 29 3c 3e 2d 31 8c 4a  25 21 34 3d 4c 25 28 62  |D)<>-1.J%!4=L%(b|
0000db00  25 2c 4d 69 25 2d 26 44  29 3a c8 99 26 34 30 30  |%,Mi%-&D):..&400|
0000db10  43 34 2c 2c 4a 25 0d 3a  6c 9e c8 99 26 34 30 30  |C4,,J%.:l...&400|
0000db20  43 42 2c 2c 4a 25 3a 51  25 2d 3d 38 3a 6e 25 2d  |CB,,J%:Q%-=8:n%-|
0000db30  3d 38 3a 4a 25 21 34 3d  61 25 2d 4a 25 21 34 3a  |=8:J%!4=a%-J%!4:|
0000db40  4a 25 21 38 3d 51 25 2d  4a 25 21 31 36 2d 6e 25  |J%!8=Q%-J%!16-n%|
0000db50  3a 4a 25 21 26 43 3d 4a  25 21 34 2b 78 25 3a 4a  |:J%!&C=J%!4+x%:J|
0000db60  25 21 31 36 3d 4a 25 21  38 2b 6e 25 3a 4a 25 21  |%!16=J%!8+n%:J%!|
0000db70  32 30 3d 26 37 30 30 33  31 31 39 3a 4a 25 21 32  |20=&7003119:J%!2|
0000db80  34 3d 73 6c 25 3a 4a 25  21 32 38 3d 41 69 25 3a  |4=sl%:J%!28=Ai%:|
0000db90  4a 25 21 33 32 3d 30 3a  c8 99 26 34 30 30 43 32  |J%!32=0:..&400C2|
0000dba0  2c 2c 4a 25 b8 4c 25 28  62 25 2c 4d 69 25 2d 26  |,,J%.L%(b%,Mi%-&|
0000dbb0  44 29 3a e1 0d 3a 6d 56  dd f2 64 79 3a ea 62 25  |D):..:mV..dy:.b%|
0000dbc0  2c 57 79 25 3a 21 4a 25  3d 69 25 3a e3 62 25 3d  |,Wy%:!J%=i%:.b%=|
0000dbd0  30 b8 26 41 3a e3 57 79  25 3d 30 b8 31 3a e7 4c  |0.&A:.Wy%=0.1:.L|
0000dbe0  25 28 62 25 2c 57 79 25  29 3c 3e 2d 31 8c 4a 25  |%(b%,Wy%)<>-1.J%|
0000dbf0  21 34 3d 4c 25 28 62 25  2c 57 79 25 29 3a c8 99  |!4=L%(b%,Wy%):..|
0000dc00  26 34 30 30 43 34 2c 2c  4a 25 0d 3a 6e 10 ed 2c  |&400C4,,J%.:n..,|
0000dc10  3a 4c 25 28 29 3d 2d 31  3a e1 0d 3a 6f 4f dd f2  |:L%()=-1:..:oO..|
0000dc20  70 5f 28 73 25 29 3a ea  62 25 2c 57 79 25 2c 4f  |p_(s%):.b%,Wy%,O|
0000dc30  61 25 2c 54 69 25 2c 41  24 3a e3 62 25 3d 30 b8  |a%,Ti%,A$:.b%=0.|
0000dc40  26 41 3a e3 57 79 25 3d  30 b8 31 3a e7 4c 25 28  |&A:.Wy%=0.1:.L%(|
0000dc50  62 25 2c 57 79 25 29 3d  73 25 8c 4f 61 25 3d 62  |b%,Wy%)=s%.Oa%=b|
0000dc60  25 3a 54 69 25 3d 57 79  25 0d 3a 70 25 ed 2c 3a  |%:Ti%=Wy%.:p%.,:|
0000dc70  e7 54 69 25 3d 30 8c 41  24 3d 58 24 3a 75 4a 25  |.Ti%=0.A$=X$:uJ%|
0000dc80  3d 32 8b 41 24 3d 55 24  3a 75 4a 25 3d 31 0d 3a  |=2.A$=U$:uJ%=1.:|
0000dc90  71 1c f2 47 79 28 41 24  2b 41 24 28 4f 61 25 2c  |q..Gy(A$+A$(Oa%,|
0000dca0  54 69 25 2b 26 44 29 29  3a e1 0d 3a 72 4c dd f2  |Ti%+&D)):..:rL..|
0000dcb0  47 79 28 6f 24 29 3a 21  4a 25 3d 32 35 36 3a 4a  |Gy(o$):!J%=256:J|
0000dcc0  25 21 34 3d 76 75 25 3a  4a 25 21 31 36 3d 26 34  |%!4=vu%:J%!16=&4|
0000dcd0  41 46 38 30 3a 24 28 4a  25 2b 32 30 29 3d 6f 24  |AF80:$(J%+20)=o$|
0000dce0  2b bd 30 3a c8 99 26 34  30 30 45 37 2c 31 38 2c  |+.0:..&400E7,18,|
0000dcf0  4a 25 2c 30 3a e1 0d 3a  73 74 dd f2 53 75 3a de  |J%,0:..:st..Su:.|
0000dd00  43 25 28 26 43 29 2c 51  25 28 26 43 29 3a 4c 79  |C%(&C),Q%(&C):Ly|
0000dd10  25 3d 33 3a 53 4a 25 3d  26 42 3a 74 5f 25 3d 2d  |%=3:SJ%=&B:t_%=-|
0000dd20  31 3a 43 25 28 29 3d 2d  31 3a 64 24 3d 59 24 2b  |1:C%()=-1:d$=Y$+|
0000dd30  22 41 6e 6e 69 22 3a 46  69 25 3d 30 3a 42 4a 25  |"Anni":Fi%=0:BJ%|
0000dd40  3d 2d 31 3a 48 4a 25 3d  2d 31 3a 75 75 25 3d b9  |=-1:HJ%=-1:uu%=.|
0000dd50  3a 6c 6c 25 3d a4 43 28  22 41 4e 4d 22 2c 22 41  |:ll%=.C("ANM","A|
0000dd60  4e 4d 22 2c 31 2c 34 29  3a e1 0d 3a 74 0c dd a4  |NM",1,4):..:t...|
0000dd70  52 79 3d 6c 6c 25 0d 3a  75 42 dd f2 44 75 28 41  |Ry=ll%.:uB..Du(A|
0000dd80  25 29 3a 42 25 28 41 25  29 3d 31 3a 57 25 28 41  |%):B%(A%)=1:W%(A|
0000dd90  25 29 3d 26 43 3a 53 25  28 41 25 29 3d 31 3a 4d  |%)=&C:S%(A%)=1:M|
0000dda0  24 28 41 25 29 3d a4 41  28 22 41 6e 6e 54 61 62  |$(A%)=.A("AnnTab|
0000ddb0  22 29 3a f2 5f 5f 3a e1  0d 3a 76 a3 dd f2 6f 4a  |"):.__:..:v...oJ|
0000ddc0  28 76 25 2c 79 25 2c 5f  25 2c 55 25 29 3a ea 50  |(v%,y%,_%,U%):.P|
0000ddd0  79 25 2c 51 25 2c 72 25  3a 50 79 25 3d 28 6b 25  |y%,Q%,r%:Py%=(k%|
0000dde0  2d 4c 79 25 2a 32 30 2d  32 30 29 2f 4c 79 25 3a  |-Ly%*20-20)/Ly%:|
0000ddf0  51 25 3d 30 3a e3 72 25  3d 76 25 2b 4c 79 25 2a  |Q%=0:.r%=v%+Ly%*|
0000de00  94 79 25 b8 76 25 2b 4c  79 25 2a 94 79 25 2b 4c  |.y%.v%+Ly%*.y%+L|
0000de10  79 25 2d 31 3a 51 25 2b  3d 32 30 2b 50 79 25 3a  |y%-1:Q%+=20+Py%:|
0000de20  f2 46 75 28 72 25 2c 5f  25 2b 32 30 2c 55 25 2d  |.Fu(r%,_%+20,U%-|
0000de30  51 25 2b 50 79 25 2c 75  25 2d 34 30 2c 50 79 25  |Q%+Py%,u%-40,Py%|
0000de40  29 3a ed 3a e7 79 25 3d  30 80 76 25 3e 31 8c f2  |):.:.y%=0.v%>1..|
0000de50  49 28 79 25 2c 5f 25 2c  55 25 29 0d 3a 77 1a e7  |I(y%,_%,U%).:w..|
0000de60  79 25 80 72 25 3c 26 43  8c f2 49 28 79 25 2c 5f  |y%.r%<&C..I(y%,_|
0000de70  25 2c 55 25 29 0d 3a 78  05 e1 0d 3a 79 17 dd f2  |%,U%).:x...:y...|
0000de80  51 4a 28 6c 25 2c 63 6c  25 29 3a c8 8e 21 6c 25  |QJ(l%,cl%):..!l%|
0000de90  ca 0d 3a 7a 1a c9 30 3a  e7 48 4a 25 3c 3e 2d 31  |..:z..0:.HJ%<>-1|
0000dea0  8c f2 6f 28 48 4a 25 2c  2d 31 29 0d 3a 7b 19 c9  |..o(HJ%,-1).:{..|
0000deb0  31 3a e7 48 4a 25 3c 3e  2d 31 8c f2 6f 28 48 4a  |1:.HJ%<>-1..o(HJ|
0000dec0  25 2c 30 29 0d 3a 7c 18  c9 32 3a e7 48 4a 25 3c  |%,0).:|..2:.HJ%<|
0000ded0  3e 2d 31 8c f2 48 79 28  48 4a 25 29 0d 3a 7d 2f  |>-1..Hy(HJ%).:}/|
0000dee0  c9 33 3a f2 4b 79 28 22  58 91 73 20 25 6e 25 74  |.3:.Ky("X.s %n%t|
0000def0  20 62 69 72 74 68 64 61  79 22 2c 44 79 25 2c 52  | birthday",Dy%,R|
0000df00  61 25 2c 4d 79 25 2c 30  2c 30 29 0d 3a 7e 07 cb  |a%,My%,0,0).:~..|
0000df10  3a e1 0d 3a 7f 30 dd f2  56 79 28 70 25 29 3a 76  |:..:.0..Vy(p%):v|
0000df20  25 2b 3d 70 25 2a 32 2a  4c 79 25 3a e7 76 25 2b  |%+=p%*2*Ly%:.v%+|
0000df30  32 2a 4c 79 25 3e 26 44  8c 76 25 2d 3d 32 2a 4c  |2*Ly%>&D.v%-=2*L|
0000df40  79 25 0d 3a 80 0e e7 76  25 3c 31 8c 76 25 3d 31  |y%.:...v%<1.v%=1|
0000df50  0d 3a 81 05 e1 0d 3a 82  75 dd f2 79 5f 28 67 25  |.:....:.u..y_(g%|
0000df60  2c 79 25 2c 61 25 2c 51  25 2c 69 5f 25 2c 71 4a  |,y%,a%,Q%,i_%,qJ|
0000df70  25 29 3a ea 50 79 25 2c  72 25 3a 50 79 25 3d 28  |%):.Py%,r%:Py%=(|
0000df80  6b 25 2d 32 30 29 2f 4c  79 25 3a 72 25 3d 2d 51  |k%-20)/Ly%:r%=-Q|
0000df90  25 81 50 79 25 2b 31 3a  51 25 2b 3d 28 72 25 2d  |%.Py%+1:Q%+=(r%-|
0000dfa0  31 29 2a 50 79 25 2b 32  30 3a e7 51 25 3e 30 84  |1)*Py%+20:.Q%>0.|
0000dfb0  72 25 3e 4c 79 25 84 61  25 3c 32 30 84 61 25 3e  |r%>Ly%.a%<20.a%>|
0000dfc0  75 25 2d 34 30 8c 72 25  3d 30 0d 3a 83 1d e7 79  |u%-40.r%=0.:...y|
0000dfd0  25 8c 69 5f 25 3d 77 79  25 2b 32 30 8b 69 5f 25  |%.i_%=wy%+20.i_%|
0000dfe0  3d 6d 79 25 2b 32 30 0d  3a 84 57 71 4a 25 3d 2d  |=my%+20.:.WqJ%=-|
0000dff0  6d 25 2d 32 30 2d 50 79  25 2a 28 72 25 2d 31 29  |m%-20-Py%*(r%-1)|
0000e000  3a e7 72 25 3c 3e 30 8c  f2 60 75 28 72 25 2b 4c  |:.r%<>0..`u(r%+L|
0000e010  79 25 2a 94 79 25 2b 76  25 2d 31 2c 67 25 2c 61  |y%*.y%+v%-1,g%,a|
0000e020  25 2d 32 30 2c 51 25 2c  69 5f 25 2c 71 4a 25 2c  |%-20,Q%,i_%,qJ%,|
0000e030  75 25 2d 34 30 2c 2d 50  79 25 2b 32 30 29 0d 3a  |u%-40,-Py%+20).:|
0000e040  85 05 e1 0d 3a 86 1c dd  a4 6d 79 28 73 25 2c 42  |....:....my(s%,B|
0000e050  79 25 29 3a 6f 25 3d b9  3a c8 8e 42 79 25 ca 0d  |y%):o%=.:..By%..|
0000e060  3a 87 0f c9 34 31 34 3a  f2 56 79 28 31 29 0d 3a  |:...414:.Vy(1).:|
0000e070  88 10 c9 34 31 35 3a f2  56 79 28 2d 31 29 0d 3a  |...415:.Vy(-1).:|
0000e080  89 09 7f 6f 25 3d a3 0d  3a 8a 09 cb 3a 3d 6f 25  |...o%=..:...:=o%|
0000e090  0d 3a 8b 21 dd a4 42 5f  28 71 25 2c 73 25 2c 42  |.:.!..B_(q%,s%,B|
0000e0a0  79 25 29 3a 6f 25 3d a3  3a e7 71 25 3d 5f 79 25  |y%):o%=.:.q%=_y%|
0000e0b0  8c 0d 3a 8c 0f 6f 25 3d  b9 3a c8 8e 42 79 25 ca  |..:..o%=.:..By%.|
0000e0c0  0d 3a 8d 1d c9 33 39 34  2c 33 39 38 2c 33 39 39  |.:...394,398,399|
0000e0d0  3a f2 43 28 5f 79 25 2c  36 2d 73 25 29 0d 3a 8e  |:.C(_y%,6-s%).:.|
0000e0e0  1b c9 34 2c 32 34 3a e7  74 5f 25 3c 3e 2d 31 8c  |..4,24:.t_%<>-1.|
0000e0f0  f2 48 79 28 74 5f 25 29  0d 3a 8f 0a c9 32 37 3a  |.Hy(t_%).:...27:|
0000e100  f2 74 0d 3a 90 0e c9 26  44 3a e7 73 25 3d 32 8c  |.t.:...&D:.s%=2.|
0000e110  0d 3a 91 26 e7 a4 4e 79  28 a4 4d 28 5f 79 25 2c  |.:.&..Ny(.M(_y%,|
0000e120  32 29 2c 64 25 2c 7a 25  2c 65 25 29 8c f2 43 28  |2),d%,z%,e%)..C(|
0000e130  5f 79 25 2c 34 29 0d 3a  92 08 cc f2 5a 5f 0d 3a  |_y%,4).:....Z_.:|
0000e140  93 05 cd 0d 3a 94 09 7f  6f 25 3d a3 0d 3a 95 05  |....:...o%=..:..|
0000e150  cb 0d 3a 96 09 cd 3a 3d  6f 25 0d 3a 97 5d dd f2  |..:...:=o%.:.]..|
0000e160  4f 5f 3a ea 42 25 3a 77  25 3d ae 64 24 3a 42 25  |O_:.B%:w%=.d$:B%|
0000e170  3d 42 4a 25 3a c8 95 42  25 3c 3e 2d 31 3a d5 23  |=BJ%:..B%<>-1:.#|
0000e180  77 25 2c c3 42 25 21 38  3a c8 99 26 43 2c 32 2c  |w%,.B%!8:..&C,2,|
0000e190  77 25 2c 42 25 2b 26 43  2c 42 25 21 38 20 2d 26  |w%,B%+&C,B%!8 -&|
0000e1a0  43 3a 42 25 3d 42 25 21  34 3a ce 3a d9 23 77 25  |C:B%=B%!4:.:.#w%|
0000e1b0  3a 77 25 3d 30 3a e1 0d  3a 98 28 dd f2 77 4a 28  |:w%=0:..:.(..wJ(|
0000e1c0  77 25 29 3a d5 23 77 25  2c 53 4a 25 3a d5 23 77  |w%):.#w%,SJ%:.#w|
0000e1d0  25 2c 4c 79 25 3a f2 4a  28 75 75 25 29 3a e1 0d  |%,Ly%:.J(uu%):..|
0000e1e0  3a 99 27 dd f2 4a 75 28  77 25 29 3a 53 4a 25 3d  |:.'..Ju(w%):SJ%=|
0000e1f0  9a 23 77 25 3a 4c 79 25  3d 9a 23 77 25 3a 75 75  |.#w%:Ly%=.#w%:uu|
0000e200  25 3d a4 51 3a e1 0d 3a  9a 20 dd f2 71 4a 28 78  |%=.Q:..:. ..qJ(x|
0000e210  25 2c 46 79 25 2c 6c 25  2c 61 25 2c 51 25 29 3a  |%,Fy%,l%,a%,Q%):|
0000e220  c8 8e 46 79 25 ca 0d 3a  9b 3d c9 31 3a f2 57 28  |..Fy%..:.=.1:.W(|
0000e230  41 79 25 2c 30 2c 2d 31  29 3a f2 53 28 41 79 25  |Ay%,0,-1):.S(Ay%|
0000e240  2c a4 5f 28 78 25 2c 46  79 25 29 2c 31 29 3a f2  |,._(x%,Fy%),1):.|
0000e250  46 28 41 79 25 2c 61 25  2c 51 25 2c 78 25 2c 46  |F(Ay%,a%,Q%,x%,F|
0000e260  79 25 29 0d 3a 9c 20 c9  32 2c 33 2c 34 2c 35 3a  |y%).:. .2,3,4,5:|
0000e270  e7 67 25 3c 3e 32 8c f2  5a 28 78 25 2c 46 79 25  |.g%<>2..Z(x%,Fy%|
0000e280  2c 31 29 0d 3a 9d 07 cb  3a e1 0d 3a 9e 3e dd f2  |,1).:...:..:.>..|
0000e290  53 4a 28 5a 79 25 2c 66  61 25 29 3a f2 44 28 66  |SJ(Zy%,fa%):.D(f|
0000e2a0  61 25 2c 31 2c 21 5a 79  25 29 3a f2 57 28 41 79  |a%,1,!Zy%):.W(Ay|
0000e2b0  25 2c 30 2c 2d 31 29 3a  f2 53 28 41 79 25 2c 21  |%,0,-1):.S(Ay%,!|
0000e2c0  5a 79 25 2c 31 29 3a e1  0d 3a 9f 54 dd f2 74 4a  |Zy%,1):..:.T..tJ|
0000e2d0  28 78 25 29 3a ea 41 25  3a f2 44 28 78 25 2c 31  |(x%):.A%:.D(x%,1|
0000e2e0  2c 53 4a 25 29 3a e3 41  25 3d 32 b8 35 3a f2 5a  |,SJ%):.A%=2.5:.Z|
0000e2f0  28 78 25 2c 41 25 2c 30  29 3a ed 3a e7 4c 79 25  |(x%,A%,0):.:.Ly%|
0000e300  3c 35 8c f2 5a 28 78 25  2c 4c 79 25 2b 31 2c 31  |<5..Z(x%,Ly%+1,1|
0000e310  29 8b f2 5a 28 78 25 2c  35 2c 31 29 0d 3a a0 13  |)..Z(x%,5,1).:..|
0000e320  f2 5a 28 78 25 2c 36 2c  2d 75 75 25 29 3a e1 0d  |.Z(x%,6,-uu%):..|
0000e330  3a a1 5b dd f2 57 75 28  78 25 29 3a ea 41 25 2c  |:.[..Wu(x%):.A%,|
0000e340  42 25 3a 42 25 3d 4c 79  25 3a 53 4a 25 3d a4 5f  |B%:B%=Ly%:SJ%=._|
0000e350  28 78 25 2c 31 29 3a 41  25 3d 32 3a c8 95 41 25  |(x%,1):A%=2:..A%|
0000e360  3c 35 80 ac a4 5a 28 78  25 2c 41 25 29 3a 41 25  |<5...Z(x%,A%):A%|
0000e370  2b 3d 31 3a ce 3a e7 41  25 3c 35 8c 4c 79 25 3d  |+=1:.:.A%<5.Ly%=|
0000e380  41 25 2d 31 8b 4c 79 25  3d 36 0d 3a a2 13 e7 42  |A%-1.Ly%=6.:...B|
0000e390  25 3c 3e 4c 79 25 8c 51  25 28 29 3d 30 0d 3a a3  |%<>Ly%.Q%()=0.:.|
0000e3a0  18 e7 53 25 28 a4 47 28  35 29 29 2b 32 2a 4c 79  |..S%(.G(5))+2*Ly|
0000e3b0  25 3e 26 44 8c 0d 3a a4  2c e7 5a 25 28 74 25 29  |%>&D..:.,.Z%(t%)|
0000e3c0  3d 35 8c 76 25 3d 26 44  2d 32 2a 4c 79 25 8b 53  |=5.v%=&D-2*Ly%.S|
0000e3d0  25 28 a4 47 28 35 29 29  3d 26 44 2d 32 2a 4c 79  |%(.G(5))=&D-2*Ly|
0000e3e0  25 0d 3a a5 14 cd 3a 75  75 25 3d a4 5a 28 78 25  |%.:...:uu%=.Z(x%|
0000e3f0  2c 36 29 3a e1 0d 3a a6  4e dd f2 46 75 28 72 25  |,6):..:.N..Fu(r%|
0000e400  2c 5f 25 2c 55 25 2c 78  25 2c 6e 25 29 3a ea 72  |,_%,U%,x%,n%):.r|
0000e410  4a 25 2c 42 25 2c 51 79  25 2c 41 25 2c 51 25 3a  |J%,B%,Qy%,A%,Q%:|
0000e420  42 25 3d 43 25 28 72 25  29 3a 51 79 25 3d 32 38  |B%=C%(r%):Qy%=28|
0000e430  3a e7 a4 46 28 5f 25 2c  55 25 2c 78 25 2c 2d 6e  |:..F(_%,U%,x%,-n|
0000e440  25 29 8c 0d 3a a7 6a 72  4a 25 3d a4 50 28 22 48  |%)..:.jrJ%=.P("H|
0000e450  6f 6d 65 72 74 6f 6e 2e  42 6f 6c 64 22 2c 26 43  |omerton.Bold",&C|
0000e460  2c 26 43 29 3a 70 5f 25  3d a4 50 28 22 48 6f 6d  |,&C):p_%=.P("Hom|
0000e470  65 72 74 6f 6e 2e 4d 65  64 69 75 6d 22 2c 26 41  |erton.Medium",&A|
0000e480  2c 26 41 29 3a f2 56 28  30 2c 37 29 3a e7 72 25  |,&A):.V(0,7):.r%|
0000e490  3d 66 79 25 8c c8 99 26  34 30 30 45 36 2c 21 46  |=fy%...&400E6,!F|
0000e4a0  4a 25 8b c8 99 26 34 30  30 45 36 2c 35 0d 3a a8  |J%...&400E6,5.:.|
0000e4b0  95 f2 43 79 28 5f 25 2c  55 25 2c 78 25 2c 6e 25  |..Cy(_%,U%,x%,n%|
0000e4c0  2c 32 30 29 3a f2 4c 28  72 4a 25 2c a4 58 28 72  |,20):.L(rJ%,.X(r|
0000e4d0  25 2c 2d 31 29 2c 30 2c  5f 25 2b 78 25 2f 32 2c  |%,-1),0,_%+x%/2,|
0000e4e0  55 25 2d 26 41 29 3a 51  25 3d 34 30 3a 41 25 3d  |U%-&A):Q%=40:A%=|
0000e4f0  51 25 28 72 25 29 3a c8  95 41 25 3e 30 3a 42 25  |Q%(r%):..A%>0:B%|
0000e500  3d 42 25 21 34 3a 41 25  2d 3d 31 3a ce 3a c8 95  |=B%!4:A%-=1:.:..|
0000e510  42 25 3c 3e 2d 31 80 51  25 2b 51 79 25 2d 35 3c  |B%<>-1.Q%+Qy%-5<|
0000e520  3d 6e 25 3a e7 a4 46 28  5f 25 2b 32 30 2c 55 25  |=n%:..F(_%+20,U%|
0000e530  2d 51 25 2d 32 35 2c 78  25 2d 35 30 2c 51 79 25  |-Q%-25,x%-50,Qy%|
0000e540  29 8c 0d 3a a9 6d f2 63  28 70 5f 25 2c a4 53 79  |)..:.m.c(p_%,.Sy|
0000e550  28 42 25 2c 4d 79 25 2d  28 72 25 3c 66 79 25 84  |(B%,My%-(r%<fy%.|
0000e560  28 72 25 3d 66 79 25 80  42 25 3f 26 43 3c 44 79  |(r%=fy%.B%?&C<Dy|
0000e570  25 29 29 29 2c 5f 25 2b  37 30 2c 55 25 2d 51 25  |%))),_%+70,U%-Q%|
0000e580  2d 32 30 2c 78 25 2d 37  30 2c 51 79 25 29 3a f2  |-20,x%-70,Qy%):.|
0000e590  4c 28 70 5f 25 2c c3 28  42 25 3f 26 43 29 2c 31  |L(p_%,.(B%?&C),1|
0000e5a0  2c 5f 25 2b 36 30 2c 55  25 2d 51 25 2d 34 29 0d  |,_%+60,U%-Q%-4).|
0000e5b0  3a aa 46 cd 3a 51 25 2b  3d 51 79 25 3a 42 25 3d  |:.F.:Q%+=Qy%:B%=|
0000e5c0  a4 70 28 42 25 2c 72 25  29 3a ce 3a e7 42 25 3c  |.p(B%,r%):.:.B%<|
0000e5d0  3e 2d 31 8c ec 5f 25 2b  38 2c 55 25 2d 6e 25 2b  |>-1.._%+8,U%-n%+|
0000e5e0  32 30 3a ec 42 59 31 38  2c 30 3a f0 38 31 2c 2d  |20:.BY18,0:.81,-|
0000e5f0  39 2c 2d 31 38 0d 3a ab  2c e7 51 25 28 72 25 29  |9,-18.:.,.Q%(r%)|
0000e600  3c 3e 30 8c ec 5f 25 2b  38 2c 55 25 2d 36 30 3a  |<>0.._%+8,U%-60:|
0000e610  ec 42 59 31 38 2c 30 3a  f0 38 31 2c 2d 39 2c 31  |.BY18,0:.81,-9,1|
0000e620  38 0d 3a ac 13 f2 55 28  72 4a 25 29 3a f2 55 28  |8.:...U(rJ%):.U(|
0000e630  70 5f 25 29 0d 3a ad 07  cd 3a e1 0d 3a ae c5 dd  |p_%).:...:..:...|
0000e640  f2 60 75 28 72 25 2c 67  25 2c 61 25 2c 51 25 2c  |.`u(r%,g%,a%,Q%,|
0000e650  5f 25 2c 55 25 2c 78 25  2c 6e 25 29 3a ea 4c 25  |_%,U%,x%,n%):.L%|
0000e660  2c 41 25 2c 42 25 2c 43  25 2c 4e 25 2c 51 79 25  |,A%,B%,C%,N%,Qy%|
0000e670  2c 41 24 3a 51 79 25 3d  32 38 3a 43 25 3d 28 2d  |,A$:Qy%=28:C%=(-|
0000e680  51 25 2d 37 30 2b 32 2a  51 79 25 29 81 51 79 25  |Q%-70+2*Qy%).Qy%|
0000e690  2b 51 25 28 72 25 29 3a  4e 25 3d 2d 28 28 6e 25  |+Q%(r%):N%=-((n%|
0000e6a0  2b 34 30 29 81 51 79 25  29 3a 41 25 3d 30 3a 42  |+40).Qy%):A%=0:B|
0000e6b0  25 3d 43 25 28 72 25 29  3a c8 95 42 25 3c 3e 2d  |%=C%(r%):..B%<>-|
0000e6c0  31 3a 41 25 2b 3d 31 3a  42 25 3d a4 70 28 42 25  |1:A%+=1:B%=.p(B%|
0000e6d0  2c 72 25 29 3a ce 3a e3  4c 25 3d 30 b8 32 3a f2  |,r%):.:.L%=0.2:.|
0000e6e0  54 28 6c 6c 25 2c 4c 25  2c 31 29 3a ed 3a 48 4a  |T(ll%,L%,1):.:HJ|
0000e6f0  25 3d 2d 31 3a 52 61 25  3d 72 25 3a c8 8e b9 ca  |%=-1:Ra%=r%:....|
0000e700  0d 3a af 50 c9 61 25 3e  33 35 80 51 25 3c 2d 34  |.:.P.a%>35.Q%<-4|
0000e710  30 80 61 25 3c 78 25 80  43 25 3e 30 80 43 25 3c  |0.a%<x%.C%>0.C%<|
0000e720  3d 41 25 3a 42 25 3d 43  25 28 72 25 29 3a c8 95  |=A%:B%=C%(r%):..|
0000e730  43 25 3e 31 3a 43 25 2d  3d 31 3a 42 25 3d a4 70  |C%>1:C%-=1:B%=.p|
0000e740  28 42 25 2c 72 25 29 3a  ce 3a e7 67 25 3d 32 8c  |(B%,r%):.:.g%=2.|
0000e750  0d 3a b0 21 e3 4c 25 3d  30 b8 32 3a f2 54 28 6c  |.:.!.L%=0.2:.T(l|
0000e760  6c 25 2c 4c 25 2c 30 29  3a ed 3a 48 4a 25 3d 42  |l%,L%,0):.:HJ%=B|
0000e770  25 0d 3a b1 10 cc f2 6f  28 42 25 2c 67 25 3d 34  |%.:....o(B%,g%=4|
0000e780  29 0d 3a b2 05 cd 0d 3a  b3 09 c9 67 25 3d 32 0d  |).:....:...g%=2.|
0000e790  3a b4 49 c9 61 25 3e 30  80 61 25 3c 33 30 80 51  |:.I.a%>0.a%<30.Q|
0000e7a0  25 2d 32 30 3c 6e 25 3a  e7 51 25 28 72 25 29 3c  |%-20<n%:.Q%(r%)<|
0000e7b0  41 25 2d 4e 25 8c 51 25  28 72 25 29 2b 3d 31 3a  |A%-N%.Q%(r%)+=1:|
0000e7c0  f2 4e 28 69 25 2c 5f 25  2c 55 25 2c 5f 25 2b 78  |.N(i%,_%,U%,_%+x|
0000e7d0  25 2c 55 25 2b 6e 25 29  0d 3a b5 4b c9 61 25 3e  |%,U%+n%).:.K.a%>|
0000e7e0  30 80 61 25 3c 33 30 80  51 25 3e 2d 36 30 80 51  |0.a%<30.Q%>-60.Q|
0000e7f0  25 3c 3d 2d 34 32 3a e7  51 25 28 72 25 29 3e 30  |%<=-42:.Q%(r%)>0|
0000e800  8c 51 25 28 72 25 29 2d  3d 31 3a f2 4e 28 69 25  |.Q%(r%)-=1:.N(i%|
0000e810  2c 5f 25 2c 55 25 2c 5f  25 2b 78 25 2c 55 25 2b  |,_%,U%,_%+x%,U%+|
0000e820  6e 25 29 0d 3a b6 33 7f  e7 67 25 3c 3e 32 8c f2  |n%).:.3..g%<>2..|
0000e830  4b 79 28 22 58 91 73 20  25 6e 25 74 20 62 69 72  |Ky("X.s %n%t bir|
0000e840  74 68 64 61 79 22 2c 44  79 25 2c 72 25 2c 4d 79  |thday",Dy%,r%,My|
0000e850  25 2c 30 2c 30 29 0d 3a  b7 07 cb 3a e1 0d 3a b8  |%,0,0).:...:..:.|
0000e860  4c dd f2 78 5f 28 64 25  2c 7a 25 2c 4e 25 2c 67  |L..x_(d%,z%,N%,g|
0000e870  25 29 3a ea 42 25 3a 42  25 3d 2d 31 3a c8 95 4e  |%):.B%:B%=-1:..N|
0000e880  25 3e 30 3a 42 25 3d a4  6b 28 64 25 2c 7a 25 2c  |%>0:B%=.k(d%,z%,|
0000e890  42 25 29 3a 4e 25 2d 3d  31 3a ce 3a f2 6f 28 42  |B%):N%-=1:.:.o(B|
0000e8a0  25 2c 67 25 3d 34 29 3a  e1 0d 3a b9 29 dd f2 6f  |%,g%=4):..:.)..o|
0000e8b0  28 42 25 2c 68 79 25 29  3a ea 41 25 2c 41 24 3a  |(B%,hy%):.A%,A$:|
0000e8c0  e7 68 79 25 8c 74 5f 25  3d 42 25 8b 74 5f 25 3d  |.hy%.t_%=B%.t_%=|
0000e8d0  2d 31 0d 3a ba 60 41 25  3d 42 25 2b 31 36 3a c8  |-1.:.`A%=B%+16:.|
0000e8e0  95 3f 41 25 3c 3e 26 42  3a 41 24 2b 3d bd 3f 41  |.?A%<>&B:A$+=.?A|
0000e8f0  25 3a 41 25 2b 3d 31 3a  ce 3a f2 4b 79 28 41 24  |%:A%+=1:.:.Ky(A$|
0000e900  2c 42 25 3f 26 43 2c 28  42 25 21 26 43 3e 3e 38  |,B%?&C,(B%!&C>>8|
0000e910  29 80 26 46 2c 28 42 25  21 26 43 3e 3e 26 43 29  |).&F,(B%!&C>>&C)|
0000e920  80 26 46 46 46 2c 42 25  3f 26 46 2c 68 79 25 29  |.&FFF,B%?&F,hy%)|
0000e930  3a e1 0d 3a bb 5f dd f2  4b 79 28 57 24 2c 63 25  |:..:._..Ky(W$,c%|
0000e940  2c 72 25 2c 51 25 2c 75  5f 25 2c 68 79 25 29 3a  |,r%,Q%,u_%,hy%):|
0000e950  f2 41 28 5f 79 25 2c 34  2c 57 24 29 3a f2 41 28  |.A(_y%,4,W$):.A(|
0000e960  5f 79 25 2c 32 2c c3 63  25 2b 22 2f 22 2b c3 72  |_y%,2,.c%+"/"+.r|
0000e970  25 2b 22 2f 22 2b c3 51  25 29 3a 5a 69 25 3d 75  |%+"/"+.Q%):Zi%=u|
0000e980  5f 25 3a e7 75 5f 25 3d  30 8c 75 5f 25 3d 53 4a  |_%:.u_%=0.u_%=SJ|
0000e990  25 0d 3a bc 4a f2 44 28  5f 79 25 2c 34 2c 75 5f  |%.:.J.D(_y%,4,u_|
0000e9a0  25 29 3a f2 52 28 5f 79  25 2c 26 44 2c 28 68 79  |%):.R(_y%,&D,(hy|
0000e9b0  25 3d 30 29 29 3a e7 68  79 25 3d 30 8c 41 24 3d  |%=0)):.hy%=0.A$=|
0000e9c0  a4 41 28 22 61 6e 73 65  74 22 29 8b 41 24 3d a4  |.A("anset").A$=.|
0000e9d0  41 28 22 61 6e 65 64 69  74 22 29 0d 3a bd 3a f2  |A("anedit").:.:.|
0000e9e0  58 28 5f 79 25 29 3a f2  72 28 5f 79 25 2c b9 2c  |X(_y%):.r(_y%,.,|
0000e9f0  b9 29 3a f2 43 28 5f 79  25 2c 32 29 3a 56 4a 25  |.):.C(_y%,2):VJ%|
0000ea00  3d b9 3a f2 66 28 5f 79  25 2c 5f 61 25 2c 41 24  |=.:.f(_y%,_a%,A$|
0000ea10  2c 30 29 3a e1 0d 3a be  41 dd a4 70 28 42 25 2c  |,0):..:.A..p(B%,|
0000ea20  7a 25 29 3a ea 41 25 2c  43 25 2c 63 25 2c 72 25  |z%):.A%,C%,c%,r%|
0000ea30  2c 51 25 3a 42 25 3d 42  25 21 34 3a e7 28 28 42  |,Q%:B%=B%!4:.((B|
0000ea40  25 21 26 43 3e 3e 38 29  80 26 46 29 3c 3e 7a 25  |%!&C>>8).&F)<>z%|
0000ea50  8c 42 25 3d 2d 31 0d 3a  bf 07 3d 42 25 0d 3a c0  |.B%=-1.:..=B%.:.|
0000ea60  3e dd a4 53 79 28 42 25  2c 4d 79 25 29 3a ea 41  |>..Sy(B%,My%):.A|
0000ea70  25 2c 43 25 2c 63 25 2c  51 25 2c 41 24 3a 51 25  |%,C%,c%,Q%,A$:Q%|
0000ea80  3d 28 42 25 21 26 43 3e  3e 26 43 29 80 26 46 46  |=(B%!&C>>&C).&FF|
0000ea90  46 3a e7 51 25 3c 3d 4d  79 25 8c 0d 3a c1 62 43  |F:.Q%<=My%..:.bC|
0000eaa0  25 3d 42 25 3f 26 46 3a  43 25 2d 3d 53 4a 25 2a  |%=B%?&F:C%-=SJ%*|
0000eab0  28 43 25 3d 30 29 3a f2  56 28 30 2c 43 25 29 3a  |(C%=0):.V(0,C%):|
0000eac0  41 25 3d 42 25 2b 31 36  3a c8 95 3f 41 25 3c 3e  |A%=B%+16:..?A%<>|
0000ead0  26 42 3a e7 3f 41 25 3d  33 37 8c 41 25 2b 3d 31  |&B:.?A%=37.A%+=1|
0000eae0  3a 41 24 2b 3d a4 57 5f  28 3f 41 25 2c 51 25 2c  |:A$+=.W_(?A%,Q%,|
0000eaf0  4d 79 25 29 8b 41 24 2b  3d bd 3f 41 25 0d 3a c2  |My%).A$+=.?A%.:.|
0000eb00  0b 41 25 2b 3d 31 3a ce  0d 3a c3 09 cd 3a 3d 41  |.A%+=1:..:...:=A|
0000eb10  24 0d 3a c4 24 dd f2 72  4a 28 73 25 2c 59 79 25  |$.:.$..rJ(s%,Yy%|
0000eb20  2c 72 79 25 29 3a ea 63  25 2c 72 25 2c 51 25 3a  |,ry%):.c%,r%,Q%:|
0000eb30  c8 8e 73 25 ca 0d 3a c5  1c c9 35 3a f2 46 28 58  |..s%..:...5:.F(X|
0000eb40  6c 25 2c 59 79 25 2c 72  79 25 2c 71 25 2c 73 25  |l%,Yy%,ry%,q%,s%|
0000eb50  29 0d 3a c6 0b c9 26 42  3a f2 5a 5f 0d 3a c7 0a  |).:...&B:.Z_.:..|
0000eb60  c9 26 43 3a f2 74 0d 3a  c8 10 c9 26 44 3a f2 48  |.&C:.t.:...&D:.H|
0000eb70  79 28 74 5f 25 29 0d 3a  c9 07 cb 3a e1 0d 3a ca  |y(t_%).:...:..:.|
0000eb80  2b dd f2 5a 5f 3a ea 41  24 2c 64 25 2c 7a 25 2c  |+..Z_:.A$,d%,z%,|
0000eb90  65 25 3a 41 24 3d a4 4d  28 5f 79 25 2c 34 29 3a  |e%:A$=.M(_y%,4):|
0000eba0  e7 41 24 3c 3e 22 22 8c  0d 3a cb 1d e7 a4 4e 79  |.A$<>""..:....Ny|
0000ebb0  28 a4 4d 28 5f 79 25 2c  32 29 2c 64 25 2c 7a 25  |(.M(_y%,2),d%,z%|
0000ebc0  2c 65 25 29 8c 0d 3a cc  15 e7 74 5f 25 3c 3e 2d  |,e%)..:...t_%<>-|
0000ebd0  31 8c f2 75 79 28 74 5f  25 29 0d 3a cd 44 f2 4c  |1..uy(t_%).:.D.L|
0000ebe0  4a 28 41 24 2c 64 25 2c  7a 25 2c 65 25 2c 5a 69  |J(A$,d%,z%,e%,Zi|
0000ebf0  25 29 3a 51 25 28 29 3d  30 3a f2 74 3a 76 79 25  |%):Q%()=0:.t:vy%|
0000ec00  3d b9 3a e7 49 79 25 80  28 5a 25 28 74 25 29 3d  |=.:.Iy%.(Z%(t%)=|
0000ec10  35 84 5a 25 28 74 25 29  3d 33 29 8c f2 4b 0d 3a  |5.Z%(t%)=3)..K.:|
0000ec20  ce 0e cc f2 43 28 5f 79  25 2c 32 29 0d 3a cf 05  |....C(_y%,2).:..|
0000ec30  cd 0d 3a d0 15 cc f2 42  28 a4 41 28 22 45 72 72  |..:....B(.A("Err|
0000ec40  4d 65 73 22 29 29 0d 3a  d1 07 cd 3a e1 0d 3a d2  |Mes")).:...:..:.|
0000ec50  2d dd f2 74 3a 74 5f 25  3d 2d 31 3a f2 58 28 5f  |-..t:t_%=-1:.X(_|
0000ec60  79 25 29 3a f2 58 28 73  79 25 29 3a e7 49 79 25  |y%):.X(sy%):.Iy%|
0000ec70  8c f2 43 28 69 25 2c 2d  31 29 0d 3a d3 05 e1 0d  |..C(i%,-1).:....|
0000ec80  3a d4 61 dd a4 4e 79 28  41 24 2c f8 63 25 2c f8  |:.a..Ny(A$,.c%,.|
0000ec90  72 25 2c f8 51 25 29 3a  ea 41 25 3a 63 25 3d bb  |r%,.Q%):.A%:c%=.|
0000eca0  41 24 3a 41 24 3d c1 41  24 2c a7 41 24 2c 22 2f  |A$:A$=.A$,.A$,"/|
0000ecb0  22 29 2b 31 29 3a 72 25  3d bb 41 24 3a 41 24 3d  |")+1):r%=.A$:A$=|
0000ecc0  c1 41 24 2c a7 41 24 2c  22 2f 22 29 2b 31 29 3a  |.A$,.A$,"/")+1):|
0000ecd0  51 25 3d bb 41 24 3a 41  25 3d a3 3a c8 8e b9 ca  |Q%=.A$:A%=.:....|
0000ece0  0d 3a d5 22 c9 72 25 3c  31 84 72 25 3e 26 43 3a  |.:.".r%<1.r%>&C:|
0000ecf0  f2 42 28 a4 41 28 22 45  72 72 4d 6f 6e 74 68 22  |.B(.A("ErrMonth"|
0000ed00  29 29 0d 3a d6 34 c9 51  25 3c 31 84 51 25 3e 26  |)).:.4.Q%<1.Q%>&|
0000ed10  46 46 46 3a f2 42 28 a4  4f 28 22 45 72 72 59 65  |FFF:.B(.O("ErrYe|
0000ed20  61 72 22 2c 22 31 22 2c  22 34 30 39 35 22 2c 22  |ar","1","4095","|
0000ed30  22 2c 22 22 29 29 0d 3a  d7 1c c9 63 25 3c 31 3a  |","")).:...c%<1:|
0000ed40  f2 42 28 a4 41 28 22 45  72 72 44 61 74 65 5a 22  |.B(.A("ErrDateZ"|
0000ed50  29 29 0d 3a d8 50 c9 63  25 3e a4 44 28 72 25 2c  |)).:.P.c%>.D(r%,|
0000ed60  51 25 29 3a f2 42 28 a4  4f 28 22 45 72 72 44 61  |Q%):.B(.O("ErrDa|
0000ed70  74 65 22 2c c3 a4 44 28  72 25 2c 51 25 29 2c a4  |te",..D(r%,Q%),.|
0000ed80  58 28 72 25 2c 2d 31 29  2b c4 2d 28 72 25 3d 32  |X(r%,-1)+.-(r%=2|
0000ed90  29 2c 22 20 22 2b c3 51  25 29 2c 22 22 2c 22 22  |)," "+.Q%),"",""|
0000eda0  29 29 0d 3a d9 09 7f 41  25 3d b9 0d 3a da 09 cb  |)).:...A%=..:...|
0000edb0  3a 3d 41 25 0d 3a db b0  dd f2 4c 4a 28 79 24 2c  |:=A%.:....LJ(y$,|
0000edc0  64 25 2c 7a 25 2c 65 25  2c 75 5f 25 29 3a ea 6e  |d%,z%,e%,u_%):.n|
0000edd0  79 25 2c 4e 79 25 2c 53  25 2c 42 25 2c 78 79 25  |y%,Ny%,S%,B%,xy%|
0000ede0  2c 54 25 2c 46 5f 25 3a  46 5f 25 3d 64 25 2b 28  |,T%,F_%:F_%=d%+(|
0000edf0  7a 25 3c 3c 38 29 2b 28  65 25 3c 3c 26 43 29 2b  |z%<<8)+(e%<<&C)+|
0000ee00  28 75 5f 25 3c 3c 32 34  29 3a 78 79 25 3d a3 3a  |(u_%<<24):xy%=.:|
0000ee10  53 25 3d a9 79 24 2b 31  2b 31 36 3a 4e 79 25 3d  |S%=.y$+1+16:Ny%=|
0000ee20  42 4a 25 3a 6e 79 25 3d  2d 31 3a c8 95 4e 79 25  |BJ%:ny%=-1:..Ny%|
0000ee30  3c 3e 2d 31 80 ac 78 79  25 3a e7 a4 4b 79 28 64  |<>-1..xy%:..Ky(d|
0000ee40  25 2c 7a 25 2c 4e 79 25  21 26 43 29 8c 78 79 25  |%,z%,Ny%!&C).xy%|
0000ee50  3d b9 8b 6e 79 25 3d 4e  79 25 3a 4e 79 25 3d 4e  |=..ny%=Ny%:Ny%=N|
0000ee60  79 25 21 34 0d 3a dc 60  ce 3a 42 25 3d a4 77 28  |y%!4.:.`.:B%=.w(|
0000ee70  73 5f 25 2c 53 25 2c b9  29 3a 21 42 25 3d 6e 79  |s_%,S%,.):!B%=ny|
0000ee80  25 3a 42 25 21 34 3d 4e  79 25 3a 42 25 21 38 3d  |%:B%!4=Ny%:B%!8=|
0000ee90  53 25 3a 42 25 21 26 43  3d 46 5f 25 3a 24 28 42  |S%:B%!&C=F_%:$(B|
0000eea0  25 2b 31 36 29 3d 79 24  2b bd 26 42 3a e7 6e 79  |%+16)=y$+.&B:.ny|
0000eeb0  25 3d 2d 31 8c 42 4a 25  3d 42 25 8b 6e 79 25 21  |%=-1.BJ%=B%.ny%!|
0000eec0  34 3d 42 25 0d 3a dd 14  e7 4e 79 25 3c 3e 2d 31  |4=B%.:...Ny%<>-1|
0000eed0  8c 21 4e 79 25 3d 42 25  0d 3a de 23 e7 43 25 28  |.!Ny%=B%.:.#.C%(|
0000eee0  7a 25 29 3d 4e 79 25 84  43 25 28 7a 25 29 3d 2d  |z%)=Ny%.C%(z%)=-|
0000eef0  31 8c 43 25 28 7a 25 29  3d 42 25 0d 3a df 05 e1  |1.C%(z%)=B%.:...|
0000ef00  0d 3a e0 2c dd f2 48 79  28 42 25 29 3a f2 75 79  |.:.,..Hy(B%):.uy|
0000ef10  28 42 25 29 3a f2 74 3a  76 79 25 3d b9 3a e7 42  |(B%):.t:vy%=.:.B|
0000ef20  25 3d 74 5f 25 8c 74 5f  25 3d 2d 31 0d 3a e1 1f  |%=t_%.t_%=-1.:..|
0000ef30  e7 49 79 25 80 28 5a 25  28 74 25 29 3d 35 84 5a  |.Iy%.(Z%(t%)=5.Z|
0000ef40  25 28 74 25 29 3d 33 29  8c f2 4b 0d 3a e2 05 e1  |%(t%)=3)..K.:...|
0000ef50  0d 3a e3 61 dd f2 75 79  28 42 25 29 3a ea 6e 79  |.:.a..uy(B%):.ny|
0000ef60  25 2c 4e 79 25 2c 72 25  2c 51 69 25 3a 51 69 25  |%,Ny%,r%,Qi%:Qi%|
0000ef70  3d 2d 31 3a 6e 79 25 3d  21 42 25 3a 4e 79 25 3d  |=-1:ny%=!B%:Ny%=|
0000ef80  42 25 21 34 3a 72 25 3d  28 42 25 21 26 43 3e 3e  |B%!4:r%=(B%!&C>>|
0000ef90  38 29 80 26 46 3a 51 25  28 72 25 29 3d 30 3a e7  |8).&F:Q%(r%)=0:.|
0000efa0  6e 79 25 3c 3e 2d 31 8c  6e 79 25 21 34 3d 4e 79  |ny%<>-1.ny%!4=Ny|
0000efb0  25 0d 3a e4 32 e7 4e 79  25 3c 3e 2d 31 8c 21 4e  |%.:.2.Ny%<>-1.!N|
0000efc0  79 25 3d 6e 79 25 3a e7  28 28 4e 79 25 21 26 43  |y%=ny%:.((Ny%!&C|
0000efd0  3e 3e 38 29 80 26 46 29  3d 72 25 8c 51 69 25 3d  |>>8).&F)=r%.Qi%=|
0000efe0  4e 79 25 0d 3a e5 13 e7  42 4a 25 3d 42 25 8c 42  |Ny%.:...BJ%=B%.B|
0000eff0  4a 25 3d 4e 79 25 0d 3a  e6 19 e7 43 25 28 72 25  |J%=Ny%.:...C%(r%|
0000f000  29 3d 42 25 8c 43 25 28  72 25 29 3d 51 69 25 0d  |)=B%.C%(r%)=Qi%.|
0000f010  3a e7 13 f2 4c 79 28 73  5f 25 2c 42 25 2c b9 29  |:...Ly(s_%,B%,.)|
0000f020  3a e1 0d 3a e8 42 dd a4  4b 79 28 63 25 2c 72 25  |:..:.B..Ky(c%,r%|
0000f030  2c 54 25 29 3a ea 60 25  2c 54 6c 25 2c 78 75 25  |,T%):.`%,Tl%,xu%|
0000f040  3a 54 6c 25 3d 54 25 80  26 46 46 3a 78 75 25 3d  |:Tl%=T%.&FF:xu%=|
0000f050  28 54 25 3e 3e 38 29 80  26 46 3a e7 72 25 3e 3d  |(T%>>8).&F:.r%>=|
0000f060  78 75 25 8c 0d 3a e9 1c  e7 63 25 3c 54 6c 25 80  |xu%..:...c%<Tl%.|
0000f070  78 75 25 3d 72 25 8c 60  25 3d b9 8b 60 25 3d a3  |xu%=r%.`%=..`%=.|
0000f080  0d 3a ea 09 cc 60 25 3d  b9 0d 3a eb 09 cd 3a 3d  |.:...`%=..:...:=|
0000f090  60 25 0d 3a ec b2 dd f2  73 4a 3a ea 42 25 2c 78  |`%.:....sJ:.B%,x|
0000f0a0  79 25 2c 74 4a 25 2c 63  25 2c 72 25 2c 4d 6c 25  |y%,tJ%,c%,r%,Ml%|
0000f0b0  2c 66 4a 25 2c 6f 79 25  2c 64 25 2c 7a 25 2c 65  |,fJ%,oy%,d%,z%,e|
0000f0c0  25 3a f2 47 28 5f 4a 25  2c 63 25 2c 72 25 2c 4d  |%:.G(_J%,c%,r%,M|
0000f0d0  6c 25 2c 66 4a 25 2c 6f  79 25 29 3a 42 25 3d 43  |l%,fJ%,oy%):B%=C|
0000f0e0  25 28 66 4a 25 29 3a 64  25 3d a4 54 3a 7a 25 3d  |%(fJ%):d%=.T:z%=|
0000f0f0  a4 49 3a 65 25 3d a4 52  3a c8 95 42 25 3c 3e 2d  |.I:e%=.R:..B%<>-|
0000f100  31 80 ac 78 79 25 80 ac  74 4a 25 3a 63 25 3d 42  |1..xy%..tJ%:c%=B|
0000f110  25 3f 26 43 3a 72 25 3d  28 42 25 21 26 43 3e 3e  |%?&C:r%=(B%!&C>>|
0000f120  38 29 80 26 46 3a e7 72  25 3e 7a 25 84 28 72 25  |8).&F:.r%>z%.(r%|
0000f130  3d 7a 25 80 63 25 3e 64  25 29 8c 74 4a 25 3d b9  |=z%.c%>d%).tJ%=.|
0000f140  3a f2 5a 79 0d 3a ed 38  e7 28 72 25 3e 66 4a 25  |:.Zy.:.8.(r%>fJ%|
0000f150  84 28 72 25 3d 66 4a 25  80 63 25 3e 4d 6c 25 29  |.(r%=fJ%.c%>Ml%)|
0000f160  29 80 ac 74 4a 25 8c 78  79 25 3d b9 3a f2 68 79  |)..tJ%.xy%=.:.hy|
0000f170  28 42 25 29 8b 42 25 3d  42 25 21 34 0d 3a ee 0f  |(B%).B%=B%!4.:..|
0000f180  ce 3a e7 ac 78 79 25 8c  f2 5a 79 0d 3a ef 05 e1  |.:..xy%..Zy.:...|
0000f190  0d 3a f0 45 dd f2 58 5f  3a ea 42 25 2c 63 25 2c  |.:.E..X_:.B%,c%,|
0000f1a0  72 25 2c 64 25 2c 7a 25  2c 65 25 3a 64 25 3d a4  |r%,d%,z%,e%:d%=.|
0000f1b0  54 3a 7a 25 3d a4 49 3a  65 25 3d a4 52 3a 42 25  |T:z%=.I:e%=.R:B%|
0000f1c0  3d 46 69 25 21 34 3a 57  5f 25 3d 30 3a e7 42 25  |=Fi%!4:W_%=0:.B%|
0000f1d0  3c 3e 2d 31 8c 0d 3a f1  3e 63 25 3d 42 25 3f 26  |<>-1..:.>c%=B%?&|
0000f1e0  43 3a 72 25 3d 28 42 25  21 26 43 3e 3e 38 29 80  |C:r%=(B%!&C>>8).|
0000f1f0  26 46 3a e7 72 25 3e 7a  25 84 28 72 25 3d 7a 25  |&F:.r%>z%.(r%=z%|
0000f200  80 63 25 3e 64 25 29 8c  f2 5a 79 8b f2 68 79 28  |.c%>d%)..Zy..hy(|
0000f210  42 25 29 0d 3a f2 08 cc  f2 5a 79 0d 3a f3 07 cd  |B%).:....Zy.:...|
0000f220  3a e1 0d 3a f4 26 dd f2  5a 79 3a 42 75 25 3d a3  |:..:.&..Zy:Bu%=.|
0000f230  3a 5f 4a 25 3d a4 78 28  a4 59 29 3a f2 58 28 47  |:_J%=.x(.Y):.X(G|
0000f240  4a 25 29 3a f2 78 3a e1  0d 3a f5 9d dd f2 68 79  |J%):.x:..:....hy|
0000f250  28 42 25 29 3a ea 63 25  3a f2 41 28 47 4a 25 2c  |(B%):.c%:.A(GJ%,|
0000f260  31 2c a4 4f 28 22 69 74  73 22 2c a4 55 28 64 25  |1,.O("its",.U(d%|
0000f270  2c 7a 25 2c 65 25 2c 2d  31 29 2c 22 22 2c 22 22  |,z%,e%,-1),"",""|
0000f280  2c 22 22 29 29 3a f2 41  28 47 4a 25 2c 32 2c a4  |,"")):.A(GJ%,2,.|
0000f290  53 79 28 42 25 2c 65 25  29 29 3a 63 25 3d 42 25  |Sy(B%,e%)):c%=B%|
0000f2a0  3f 26 46 3a 63 25 2d 3d  53 4a 25 2a 28 63 25 3d  |?&F:c%-=SJ%*(c%=|
0000f2b0  30 29 3a f2 44 28 47 4a  25 2c 32 2c 63 25 29 3a  |0):.D(GJ%,2,c%):|
0000f2c0  f2 7a 28 47 4a 25 2c b9  2c b9 29 3a 76 79 25 3d  |.z(GJ%,.,.):vy%=|
0000f2d0  2d 31 3a 46 69 25 3d 42  25 3a e7 75 75 25 8c 57  |-1:Fi%=B%:.uu%.W|
0000f2e0  5f 25 3d 26 41 0d 3a f6  05 e1 0d 3a f7 30 dd a4  |_%=&A.:....:.0..|
0000f2f0  6e 28 63 25 2c 72 25 29  3a ea 42 25 2c 43 25 2c  |n(c%,r%):.B%,C%,|
0000f300  54 6c 25 2c 78 75 25 3a  42 25 3d 43 25 28 72 25  |Tl%,xu%:B%=C%(r%|
0000f310  29 3a e7 42 25 3c 3e 2d  31 8c 0d 3a f8 15 f5 3a  |):.B%<>-1..:...:|
0000f320  e7 42 25 3f 26 43 3d 63  25 8c 43 25 2b 3d 31 0d  |.B%?&C=c%.C%+=1.|
0000f330  3a f9 36 42 25 3d 42 25  21 34 3a e7 42 25 3c 3e  |:.6B%=B%!4:.B%<>|
0000f340  2d 31 8c 54 6c 25 3d 42  25 3f 26 43 3a 78 75 25  |-1.Tl%=B%?&C:xu%|
0000f350  3d 28 42 25 21 26 43 3e  3e 38 29 80 26 46 8b 78  |=(B%!&C>>8).&F.x|
0000f360  75 25 3d 26 44 0d 3a fa  12 fd 54 6c 25 3e 63 25  |u%=&D.:...Tl%>c%|
0000f370  84 78 75 25 3e 72 25 0d  3a fb 09 cd 3a 3d 43 25  |.xu%>r%.:...:=C%|
0000f380  0d 3a fc 19 dd a4 6b 28  63 25 2c 72 25 2c 42 25  |.:....k(c%,r%,B%|
0000f390  29 3a e7 42 25 3d 2d 31  8c 0d 3a fd 23 42 25 3d  |):.B%=-1..:.#B%=|
0000f3a0  43 25 28 72 25 29 3a c8  95 42 25 3f 26 43 3c 3e  |C%(r%):..B%?&C<>|
0000f3b0  63 25 3a 42 25 3d 42 25  21 34 3a ce 0d 3a fe 0c  |c%:B%=B%!4:..:..|
0000f3c0  cc 42 25 3d 42 25 21 34  0d 3a ff 30 cd 3a e7 42  |.B%=B%!4.:.0.:.B|
0000f3d0  25 3c 3e 2d 31 8c e7 42  25 3f 26 43 3e 63 25 84  |%<>-1..B%?&C>c%.|
0000f3e0  28 28 42 25 21 26 43 3e  3e 38 29 80 26 46 29 3e  |((B%!&C>>8).&F)>|
0000f3f0  72 25 8c 42 25 3d 2d 31  0d 3b 00 07 3d 42 25 0d  |r%.B%=-1.;..=B%.|
0000f400  3b 01 36 dd f2 5f 5f 3a  ea 53 25 2c 43 25 2c 42  |;.6..__:.S%,C%,B|
0000f410  25 2c 72 25 3a 43 25 3d  2d 31 3a 42 4a 25 3d 2d  |%,r%:C%=-1:BJ%=-|
0000f420  31 3a 77 25 3d 8e 64 24  3a e7 ac 46 75 25 80 77  |1:w%=.d$:..Fu%.w|
0000f430  25 3c 3e 30 8c 0d 3b 02  3b c8 95 ac c5 23 77 25  |%<>0..;.;....#w%|
0000f440  3a 53 25 3d bb be 23 77  25 3a 42 25 3d a4 77 28  |:S%=..#w%:B%=.w(|
0000f450  73 5f 25 2c 53 25 2c b9  29 3a e7 43 25 3c 3e 2d  |s_%,S%,.):.C%<>-|
0000f460  31 8c 43 25 21 34 3d 42  25 8b 42 4a 25 3d 42 25  |1.C%!4=B%.BJ%=B%|
0000f470  0d 3b 03 50 21 42 25 3d  43 25 3a 42 25 21 38 3d  |.;.P!B%=C%:B%!8=|
0000f480  53 25 3a c8 99 26 43 2c  34 2c 77 25 2c 42 25 2b  |S%:..&C,4,w%,B%+|
0000f490  26 43 2c 53 25 2d 26 43  3a 72 25 3d 28 28 42 25  |&C,S%-&C:r%=((B%|
0000f4a0  21 26 43 29 3e 3e 38 29  80 26 46 3a e7 43 25 28  |!&C)>>8).&F:.C%(|
0000f4b0  72 25 29 3d 2d 31 8c 43  25 28 72 25 29 3d 42 25  |r%)=-1.C%(r%)=B%|
0000f4c0  0d 3b 04 15 43 25 3d 42  25 3a e7 78 5f 25 8c f2  |.;..C%=B%:.x_%..|
0000f4d0  77 28 ac 31 29 0d 3b 05  16 ce 3a e7 42 4a 25 3c  |w(.1).;...:.BJ%<|
0000f4e0  3e 2d 31 8c 42 25 21 34  3d 2d 31 0d 3b 06 11 cd  |>-1.B%!4=-1.;...|
0000f4f0  3a d9 23 77 25 3a 77 25  3d 30 3a e1 0d 3b 07 41  |:.#w%:w%=0:..;.A|
0000f500  dd a4 57 5f 28 54 25 2c  51 25 2c 4d 79 25 29 3a  |..W_(T%,Q%,My%):|
0000f510  ea 41 24 2c 64 2c 63 25  2c 46 25 2c 4c 25 3a 59  |.A$,d,c%,F%,L%:Y|
0000f520  6c 25 3d 28 54 25 80 33  32 29 3d 30 3a 63 25 3d  |l%=(T%.32)=0:c%=|
0000f530  4d 79 25 2d 51 25 3a c8  8e bd 54 25 ca 0d 3b 08  |My%-Q%:...T%..;.|
0000f540  37 c9 22 79 22 2c 22 59  22 3a 41 24 3d a4 41 28  |7."y","Y":A$=.A(|
0000f550  22 79 65 61 72 22 2b c4  2d 28 63 25 3e 31 29 2c  |"year"+.-(c%>1),|
0000f560  22 73 22 29 29 3a e7 59  6c 25 8c 41 24 3d a4 76  |"s")):.Yl%.A$=.v|
0000f570  28 41 24 29 0d 3b 09 0f  c9 22 6e 22 3a 41 24 3d  |(A$).;..."n":A$=|
0000f580  c3 63 25 0d 3b 0a 26 c9  22 74 22 2c 22 54 22 3a  |.c%.;.&."t","T":|
0000f590  41 24 3d a4 4c 79 28 63  25 29 3a e7 59 6c 25 8c  |A$=.Ly(c%):.Yl%.|
0000f5a0  41 24 3d a4 76 28 41 24  29 0d 3b 0b 56 c9 22 63  |A$=.v(A$).;.V."c|
0000f5b0  22 2c 22 43 22 3a c8 99  26 36 31 35 30 32 2c 43  |","C":..&61502,C|
0000f5c0  5f 25 2c 22 41 6e 6e 22  2b c3 63 25 2c 4a 25 2c  |_%,"Ann"+.c%,J%,|
0000f5d0  32 35 36 b8 2c 2c 2c 4c  25 3b 46 25 3a e7 28 46  |256.,,,L%;F%:.(F|
0000f5e0  25 80 31 29 3d 30 8c 4a  25 3f 4c 25 3d 26 44 3a  |%.1)=0.J%?L%=&D:|
0000f5f0  41 24 3d 22 20 28 22 2b  24 4a 25 2b 22 29 22 0d  |A$=" ("+$J%+")".|
0000f600  3b 0c 12 e7 59 6c 25 8c  41 24 3d a4 76 28 41 24  |;...Yl%.A$=.v(A$|
0000f610  29 0d 3b 0d 09 cb 3a 3d  41 24 0d 3b 0e e7 dd f2  |).;...:=A$.;....|
0000f620  6e 4a 3a 53 5f 25 3d 32  3a 6e 5f 25 3d 26 46 3a  |nJ:S_%=2:n_%=&F:|
0000f630  4f 75 25 3d a3 3a 57 61  25 3d a4 43 28 22 46 41  |Ou%=.:Wa%=.C("FA|
0000f640  4d 22 2c 22 46 41 4d 22  2c 31 2c 34 29 3a 77 69  |M","FAM",1,4):wi|
0000f650  25 3d a4 43 28 22 44 49  4d 34 22 2c 22 41 4e 4d  |%=.C("DIM4","ANM|
0000f660  22 2c 31 2c 33 29 3a 65  5f 25 3d a4 43 28 22 44  |",1,3):e_%=.C("D|
0000f670  49 4d 22 2c 22 44 49 4d  22 2c 31 2c 36 29 3a f2  |IM","DIM",1,6):.|
0000f680  59 28 65 5f 25 2c 33 2c  77 69 25 29 3a f2 59 28  |Y(e_%,3,wi%):.Y(|
0000f690  65 5f 25 2c 35 2c 57 61  25 29 3a f2 67 5f 28 65  |e_%,5,Wa%):.g_(e|
0000f6a0  5f 25 2c 32 2c 2d 31 29  3a 61 4a 25 3d a4 43 28  |_%,2,-1):aJ%=.C(|
0000f6b0  22 45 22 2c 22 45 22 2c  31 2c 36 29 3a 79 6c 25  |"E","E",1,6):yl%|
0000f6c0  3d a4 43 28 22 4f 54 22  2c 22 4f 54 22 2c 31 2c  |=.C("OT","OT",1,|
0000f6d0  36 29 3a 62 6c 25 3d a4  43 28 22 44 61 79 22 2c  |6):bl%=.C("Day",|
0000f6e0  22 44 61 79 22 2c 31 2c  37 29 3a 72 6c 25 3d a4  |"Day",1,7):rl%=.|
0000f6f0  43 28 22 4f 45 22 2c 22  4f 45 22 2c 31 2c 26 43  |C("OE","OE",1,&C|
0000f700  29 0d 3b 0f ad 58 6c 25  3d a4 50 79 28 a4 41 28  |).;..Xl%=.Py(.A(|
0000f710  22 43 6f 6c 22 29 29 3a  24 28 58 6c 25 2b 32 38  |"Col")):$(Xl%+28|
0000f720  2b 26 43 29 3d a4 41 28  22 44 65 66 22 29 3a 72  |+&C)=.A("Def"):r|
0000f730  24 3d 59 24 2b 22 44 69  61 72 79 22 3a de 56 25  |$=Y$+"Diary":.V%|
0000f740  28 26 45 29 3a 4f 5f 25  3d 2d 31 3a 4c 4a 25 3d  |(&E):O_%=-1:LJ%=|
0000f750  2d 31 3a 70 4a 25 3d 30  3a 7a 24 3d 22 22 3a 70  |-1:pJ%=0:z$="":p|
0000f760  75 25 3d a4 43 28 22 45  4e 22 2c 22 45 4e 22 2c  |u%=.C("EN","EN",|
0000f770  31 2c 33 29 3a 59 75 25  3d a4 43 28 22 45 41 22  |1,3):Yu%=.C("EA"|
0000f780  2c 22 45 22 2c 33 2c 36  29 3a 44 5f 25 3d 30 3a  |,"E",3,6):D_%=0:|
0000f790  44 75 25 3d 30 3a 6c 79  25 3d 30 3a 5a 5f 25 3d  |Du%=0:ly%=0:Z_%=|
0000f7a0  2d 31 3a 52 5f 25 3d 36  3a f2 4d 6c 3a e1 0d 3b  |-1:R_%=6:.Ml:..;|
0000f7b0  10 0c dd a4 4a 5f 3d 65  5f 25 0d 3b 11 7b dd f2  |....J_=e_%.;.{..|
0000f7c0  64 5f 28 41 25 29 3a f2  7a 5f 3a f2 4f 4a 3a f2  |d_(A%):.z_:.OJ:.|
0000f7d0  48 28 a4 54 2c a4 49 2c  a4 52 29 3a f2 53 28 65  |H(.T,.I,.R):.S(e|
0000f7e0  5f 25 2c 53 5f 25 2d 31  2c b9 29 3a 42 25 28 41  |_%,S_%-1,.):B%(A|
0000f7f0  25 29 3d a4 53 28 30 2c  30 2c 31 2c 31 2c 26 37  |%)=.S(0,0,1,1,&7|
0000f800  37 64 29 3a 57 25 28 41  25 29 3d a4 53 28 30 2c  |7d):W%(A%)=.S(0,|
0000f810  30 2c 33 31 2d 36 2c 26  43 2c 26 66 66 66 29 3a  |0,31-6,&C,&fff):|
0000f820  4d 24 28 41 25 29 3d a4  41 28 22 44 69 61 54 61  |M$(A%)=.A("DiaTa|
0000f830  62 22 29 3a e1 0d 3b 12  0a dd f2 6b 4a 3a e1 0d  |b"):..;....kJ:..|
0000f840  3b 13 11 dd f2 6b 75 3a  4c 4a 25 3d 2d 31 3a e1  |;....ku:LJ%=-1:.|
0000f850  0d 3b 14 e5 dd f2 68 5f  28 76 25 2c 79 25 2c 5f  |.;....h_(v%,y%,_|
0000f860  25 2c 55 25 29 3a ea 64  25 2c 7a 25 2c 65 25 2c  |%,U%):.d%,z%,e%,|
0000f870  72 4a 25 2c 69 6c 25 2c  70 5f 25 2c 79 5f 25 2c  |rJ%,il%,p_%,y_%,|
0000f880  51 4a 25 2c 62 69 25 3a  f2 47 28 76 25 2c 79 5f  |QJ%,bi%:.G(v%,y_|
0000f890  25 2c 51 4a 25 2c 64 25  2c 7a 25 2c 65 25 29 3a  |%,QJ%,d%,z%,e%):|
0000f8a0  72 4a 25 3d a4 50 28 22  48 6f 6d 65 72 74 6f 6e  |rJ%=.P("Homerton|
0000f8b0  2e 42 6f 6c 64 22 2c 26  45 2c 26 45 29 3a c8 99  |.Bold",&E,&E):..|
0000f8c0  26 34 30 30 45 36 2c 37  3a 69 6c 25 3d a4 50 28  |&400E6,7:il%=.P(|
0000f8d0  22 54 72 69 6e 69 74 79  2e 42 6f 6c 64 22 2c 26  |"Trinity.Bold",&|
0000f8e0  43 2c 26 43 29 3a 70 5f  25 3d a4 50 28 22 48 6f  |C,&C):p_%=.P("Ho|
0000f8f0  6d 65 72 74 6f 6e 2e 4d  65 64 69 75 6d 22 2c 26  |merton.Medium",&|
0000f900  41 2c 26 41 29 3a c8 99  26 34 30 30 38 31 2c 2c  |A,&A):..&40081,,|
0000f910  22 54 72 69 6e 69 74 79  2e 4d 65 64 69 75 6d 22  |"Trinity.Medium"|
0000f920  2c 39 2a 31 36 2c 39 2a  31 36 b8 62 69 25 3a c8  |,9*16,9*16.bi%:.|
0000f930  8e 53 5f 25 ca 0d 3b 15  17 c9 31 3a f2 6c 75 28  |.S_%..;...1:.lu(|
0000f940  76 25 2c 79 25 2c 5f 25  2c 55 25 29 0d 3b 16 17  |v%,y%,_%,U%).;..|
0000f950  c9 32 3a f2 4d 4a 28 76  25 2c 79 25 2c 5f 25 2c  |.2:.MJ(v%,y%,_%,|
0000f960  55 25 29 0d 3b 17 17 c9  33 3a f2 41 6c 28 76 25  |U%).;...3:.Al(v%|
0000f970  2c 79 25 2c 5f 25 2c 55  25 29 0d 3b 18 12 cb 3a  |,y%,_%,U%).;...:|
0000f980  f2 56 28 30 2c 37 29 3a  e7 79 25 8c 0d 3b 19 1d  |.V(0,7):.y%..;..|
0000f990  41 24 3d a4 58 28 7a 25  2c 2d 31 29 2b 22 20 22  |A$=.X(z%,-1)+" "|
0000f9a0  2b c3 65 25 3a c8 8e b9  ca 0d 3b 1a 39 c9 51 4a  |+.e%:.....;.9.QJ|
0000f9b0  25 3c 3e 65 25 3a 41 24  3d a4 58 28 79 5f 25 2c  |%<>e%:A$=.X(y_%,|
0000f9c0  33 29 2b 22 20 22 2b c3  51 4a 25 2b 22 20 2d 20  |3)+" "+.QJ%+" - |
0000f9d0  22 2b a4 58 28 7a 25 2c  33 29 2b 22 20 22 2b c3  |"+.X(z%,3)+" "+.|
0000f9e0  65 25 0d 3b 1b 23 c9 79  5f 25 3c 3e 7a 25 3a 41  |e%.;.#.y_%<>z%:A|
0000f9f0  24 3d a4 58 28 79 5f 25  2c 2d 31 29 2b 22 20 2d  |$=.X(y_%,-1)+" -|
0000fa00  20 22 2b 41 24 0d 3b 1c  32 cb 3a e7 a4 42 28 a4  | "+A$.;.2.:..B(.|
0000fa10  53 28 30 2c 30 2c 64 25  2c 7a 25 2c 65 25 29 2c  |S(0,0,d%,z%,e%),|
0000fa20  57 25 28 74 25 29 29 3d  2d 31 8c f2 49 28 79 25  |W%(t%))=-1..I(y%|
0000fa30  2c 5f 25 2c 55 25 29 0d  3b 1d 1f f2 4c 28 72 4a  |,_%,U%).;...L(rJ|
0000fa40  25 2c 41 24 2c 31 2c 5f  25 2b 75 25 2d 26 41 2c  |%,A$,1,_%+u%-&A,|
0000fa50  55 25 2d 26 41 29 0d 3b  1e 21 cc 3a 41 24 3d c3  |U%-&A).;.!.:A$=.|
0000fa60  51 4a 25 2b 22 20 22 2b  a4 58 28 79 5f 25 2c 2d  |QJ%+" "+.X(y_%,-|
0000fa70  31 29 3a c8 8e b9 ca 0d  3b 1f 39 c9 51 4a 25 3c  |1):.....;.9.QJ%<|
0000fa80  3e 65 25 3a 41 24 3d c3  51 4a 25 2b 22 20 22 2b  |>e%:A$=.QJ%+" "+|
0000fa90  a4 58 28 79 5f 25 2c 33  29 2b 22 20 2d 20 22 2b  |.X(y_%,3)+" - "+|
0000faa0  c3 65 25 2b 22 20 22 2b  a4 58 28 7a 25 2c 33 29  |.e%+" "+.X(z%,3)|
0000fab0  0d 3b 20 20 c9 79 5f 25  3c 3e 7a 25 3a 41 24 2b  |.;  .y_%<>z%:A$+|
0000fac0  3d 22 20 2d 20 22 2b a4  58 28 7a 25 2c 2d 31 29  |=" - "+.X(z%,-1)|
0000fad0  0d 3b 21 3d cb 3a f2 4c  28 72 4a 25 2c 41 24 2c  |.;!=.:.L(rJ%,A$,|
0000fae0  2d 31 2c 5f 25 2b 26 41  2c 55 25 2d 26 41 29 3a  |-1,_%+&A,U%-&A):|
0000faf0  e7 a4 42 28 76 25 2c 42  25 28 74 25 29 29 3d 31  |..B(v%,B%(t%))=1|
0000fb00  8c f2 49 28 79 25 2c 5f  25 2c 55 25 29 0d 3b 22  |..I(y%,_%,U%).;"|
0000fb10  1f cd 3a f2 55 28 72 4a  25 29 3a f2 55 28 69 6c  |..:.U(rJ%):.U(il|
0000fb20  25 29 3a f2 55 28 70 5f  25 29 3a e1 0d 3b 23 17  |%):.U(p_%):..;#.|
0000fb30  dd f2 5f 75 28 6c 25 2c  63 6c 25 29 3a c8 8e 21  |.._u(l%,cl%):..!|
0000fb40  6c 25 ca 0d 3b 24 17 c9  30 2c 31 2c 32 3a e7 53  |l%..;$..0,1,2:.S|
0000fb50  5f 25 3c 3e 21 6c 25 2b  31 8c 0d 3b 25 6f f2 53  |_%<>!l%+1..;%o.S|
0000fb60  28 65 5f 25 2c 53 5f 25  2d 31 2c a3 29 3a 53 5f  |(e_%,S_%-1,.):S_|
0000fb70  25 3d 21 6c 25 2b 31 3a  f2 53 28 65 5f 25 2c 21  |%=!l%+1:.S(e_%,!|
0000fb80  6c 25 2c b9 29 3a f2 47  28 53 25 28 a4 47 28 33  |l%,.):.G(S%(.G(3|
0000fb90  29 29 2c 41 25 2c 42 25  2c 64 25 2c 7a 25 2c 65  |)),A%,B%,d%,z%,e|
0000fba0  25 29 3a f2 48 28 64 25  2c 7a 25 2c 65 25 29 3a  |%):.H(d%,z%,e%):|
0000fbb0  e7 5a 25 28 74 25 29 3d  33 8c 76 25 3d 53 25 28  |.Z%(t%)=3.v%=S%(|
0000fbc0  74 25 29 3a 6d 4a 25 3d  b9 0d 3b 26 05 cd 0d 3b  |t%):mJ%=..;&...;|
0000fbd0  27 0e c9 33 3a c8 8e 6c  25 21 34 ca 0d 3b 28 0f  |'..3:..l%!4..;(.|
0000fbe0  c9 30 3a f2 57 79 28 4c  4a 25 29 0d 3b 29 0f c9  |.0:.Wy(LJ%).;)..|
0000fbf0  31 3a f2 49 5f 28 4c 4a  25 29 0d 3b 2a 0e c9 32  |1:.I_(LJ%).;*..2|
0000fc00  3a f2 76 28 4c 4a 25 29  0d 3b 2b 05 cb 0d 3b 2c  |:.v(LJ%).;+...;,|
0000fc10  19 c9 34 3a f2 60 28 a4  54 2c a4 49 2c a4 52 2c  |..4:.`(.T,.I,.R,|
0000fc20  65 5f 25 2c 30 29 0d 3b  2d 0e c9 35 3a c8 8e 6c  |e_%,0).;-..5:..l|
0000fc30  25 21 34 ca 0d 3b 2e 0a  c9 30 3a f2 44 5f 0d 3b  |%!4..;...0:.D_.;|
0000fc40  2f 0a c9 31 3a f2 53 5f  0d 3b 30 0a c9 32 3a f2  |/..1:.S_.;0..2:.|
0000fc50  4e 5f 0d 3b 31 0a c9 33  3a f2 48 5f 0d 3b 32 05  |N_.;1..3:.H_.;2.|
0000fc60  cb 0d 3b 33 07 cb 3a e1  0d 3b 34 17 dd f2 41 5f  |..;3..:..;4...A_|
0000fc70  28 5a 79 25 2c 6c 25 29  3a c8 8e 5a 79 25 ca 0d  |(Zy%,l%):..Zy%..|
0000fc80  3b 35 4e c9 61 4a 25 3a  41 24 3d a4 4a 28 5a 79  |;5N.aJ%:A$=.J(Zy|
0000fc90  25 2c 21 6c 25 29 3a e7  a4 60 79 28 5a 79 25 29  |%,!l%):..`y(Zy%)|
0000fca0  3d a4 41 28 22 45 22 29  8c f2 41 28 66 25 2c 33  |=.A("E")..A(f%,3|
0000fcb0  30 2c 41 24 29 3a 6e 75  25 3d 21 6c 25 2b 31 8b  |0,A$):nu%=!l%+1.|
0000fcc0  f2 41 28 52 79 25 2c 26  44 2c 41 24 29 0d 3b 36  |.A(Ry%,&D,A$).;6|
0000fcd0  28 c9 79 6c 25 3a f2 41  28 66 25 2c 33 33 2c a4  |(.yl%:.A(f%,33,.|
0000fce0  4a 28 5a 79 25 2c 21 6c  25 29 29 3a 63 75 25 3d  |J(Zy%,!l%)):cu%=|
0000fcf0  21 6c 25 2b 31 0d 3b 37  28 c9 62 6c 25 3a f2 41  |!l%+1.;7(.bl%:.A|
0000fd00  28 66 25 2c 33 34 2c a4  4a 28 5a 79 25 2c 21 6c  |(f%,34,.J(Zy%,!l|
0000fd10  25 29 29 3a 6a 75 25 3d  21 6c 25 2b 31 0d 3b 38  |%)):ju%=!l%+1.;8|
0000fd20  28 c9 72 6c 25 3a f2 41  28 66 25 2c 33 35 2c a4  |(.rl%:.A(f%,35,.|
0000fd30  4a 28 5a 79 25 2c 21 6c  25 29 29 3a 6d 75 25 3d  |J(Zy%,!l%)):mu%=|
0000fd40  21 6c 25 2b 31 0d 3b 39  07 cb 3a e1 0d 3b 3a 39  |!l%+1.;9..:..;:9|
0000fd50  dd f2 51 79 28 70 25 29  3a ea 64 25 2c 7a 25 2c  |..Qy(p%):.d%,z%,|
0000fd60  65 25 2c 41 25 2c 42 25  3a f2 47 28 76 25 2c 41  |e%,A%,B%:.G(v%,A|
0000fd70  25 2c 42 25 2c 64 25 2c  7a 25 2c 65 25 29 3a c8  |%,B%,d%,z%,e%):.|
0000fd80  8e 53 5f 25 ca 0d 3b 3b  1d c9 31 3a f2 50 28 64  |.S_%..;;..1:.P(d|
0000fd90  25 2c 7a 25 2c 65 25 2c  70 25 2a 26 45 2c 30 2c  |%,z%,e%,p%*&E,0,|
0000fda0  30 29 0d 3b 3c 1c c9 32  3a f2 50 28 64 25 2c 7a  |0).;<..2:.P(d%,z|
0000fdb0  25 2c 65 25 2c 70 25 2a  37 2c 30 2c 30 29 0d 3b  |%,e%,p%*7,0,0).;|
0000fdc0  3d 1c c9 33 3a f2 50 28  64 25 2c 7a 25 2c 65 25  |=..3:.P(d%,z%,e%|
0000fdd0  2c 70 25 2a 32 2c 30 2c  30 29 0d 3b 3e 4b cb 3a  |,p%*2,0,0).;>K.:|
0000fde0  4a 5f 25 3d 2d a4 42 28  76 25 2c a4 53 28 30 2c  |J_%=-.B(v%,.S(0,|
0000fdf0  30 2c 64 25 2c 7a 25 2c  65 25 29 29 3a f2 48 28  |0,d%,z%,e%)):.H(|
0000fe00  64 25 2c 7a 25 2c 65 25  29 3a e7 a4 42 28 76 25  |d%,z%,e%):..B(v%|
0000fe10  2c 42 25 28 74 25 29 29  3d 2d 31 8c 76 25 3d 42  |,B%(t%))=-1.v%=B|
0000fe20  25 28 74 25 29 0d 3b 3f  1e e7 a4 42 28 76 25 2c  |%(t%).;?...B(v%,|
0000fe30  57 25 28 74 25 29 29 3d  31 8c 76 25 3d 57 25 28  |W%(t%))=1.v%=W%(|
0000fe40  74 25 29 0d 3b 40 05 e1  0d 3b 41 28 dd f2 7a 75  |t%).;@...;A(..zu|
0000fe50  28 67 25 2c 79 25 2c 61  25 2c 51 25 2c 69 5f 25  |(g%,y%,a%,Q%,i_%|
0000fe60  2c 71 4a 25 29 3a ea 52  25 3a c8 8e 53 5f 25 ca  |,qJ%):.R%:..S_%.|
0000fe70  0d 3b 42 1a c9 31 3a 52  25 3d a4 76 79 28 67 25  |.;B..1:R%=.vy(g%|
0000fe80  2c 79 25 2c 61 25 2c 51  25 29 0d 3b 43 1a c9 32  |,y%,a%,Q%).;C..2|
0000fe90  3a 52 25 3d a4 6b 79 28  67 25 2c 79 25 2c 61 25  |:R%=.ky(g%,y%,a%|
0000fea0  2c 51 25 29 0d 3b 44 1a  c9 33 3a 52 25 3d a4 51  |,Q%).;D..3:R%=.Q|
0000feb0  5f 28 67 25 2c 79 25 2c  61 25 2c 51 25 29 0d 3b  |_(g%,y%,a%,Q%).;|
0000fec0  45 1e cb 3a e7 67 25 3d  32 80 52 25 3e 31 8c 4c  |E..:.g%=2.R%>1.L|
0000fed0  4a 25 3d 52 25 8b 4c 4a  25 3d 2d 31 0d 3b 46 05  |J%=R%.LJ%=-1.;F.|
0000fee0  e1 0d 3b 47 1c dd a4 47  5f 28 73 25 2c 42 79 25  |..;G...G_(s%,By%|
0000fef0  29 3a 6f 25 3d b9 3a c8  8e 42 79 25 ca 0d 3b 48  |):o%=.:..By%..;H|
0000ff00  0c c9 33 38 39 3a f2 44  5f 0d 3b 49 0c c9 33 39  |..389:.D_.;I..39|
0000ff10  30 3a f2 53 5f 0d 3b 4a  0c c9 33 39 31 3a f2 4e  |0:.S_.;J..391:.N|
0000ff20  5f 0d 3b 4b 0c c9 33 39  32 3a f2 48 5f 0d 3b 4c  |_.;K..392:.H_.;L|
0000ff30  0f c9 34 31 34 3a f2 51  79 28 31 29 0d 3b 4d 10  |..414:.Qy(1).;M.|
0000ff40  c9 34 31 35 3a f2 51 79  28 2d 31 29 0d 3b 4e 14  |.415:.Qy(-1).;N.|
0000ff50  c9 33 30 3a f2 48 28 a4  54 2c a4 49 2c a4 52 29  |.30:.H(.T,.I,.R)|
0000ff60  0d 3b 4f 1b c9 33 38 38  3a f2 60 28 a4 54 2c a4  |.;O..388:.`(.T,.|
0000ff70  49 2c a4 52 2c 65 5f 25  2c 30 29 0d 3b 50 0f c9  |I,.R,e_%,0).;P..|
0000ff80  32 37 3a f2 58 28 73 79  25 29 0d 3b 51 09 7f 6f  |27:.X(sy%).;Q..o|
0000ff90  25 3d a3 0d 3b 52 09 cb  3a 3d 6f 25 0d 3b 53 27  |%=..;R..:=o%.;S'|
0000ffa0  dd a4 50 5f 28 71 25 2c  73 25 2c 42 79 25 29 3a  |..P_(q%,s%,By%):|
0000ffb0  ea 41 25 2c 42 25 3a 6f  25 3d b9 3a e7 71 25 3d  |.A%,B%:o%=.:.q%=|
0000ffc0  66 25 8c 0d 3b 54 34 41  25 3d 30 3a e7 42 79 25  |f%..;T4A%=0:.By%|
0000ffd0  3d 26 44 84 42 79 25 3d  33 39 38 84 42 79 25 3d  |=&D.By%=398.By%=|
0000ffe0  33 39 34 8c 41 25 3d 31  8b e7 42 79 25 3d 33 39  |394.A%=1..By%=39|
0000fff0  39 8c 41 25 3d 2d 31 0d  3b 55 0a c8 8e 42 79 25  |9.A%=-1.;U...By%|
00010000  ca 0d 3b 56 23 c9 33 39  36 3a e7 77 4a 25 3d a4  |..;V#.396:.wJ%=.|
00010010  7a 8c f2 6b 28 71 25 2c  73 25 2c 2d 31 2c 31 36  |z..k(q%,s%,-1,16|
00010020  2c 31 38 29 0d 3b 57 22  c9 33 39 37 3a e7 77 4a  |,18).;W".397:.wJ|
00010030  25 3d a4 7a 8c f2 6b 28  71 25 2c 73 25 2c 31 2c  |%=.z..k(q%,s%,1,|
00010040  31 36 2c 31 38 29 0d 3b  58 17 c9 26 44 3a e7 73  |16,18).;X..&D:.s|
00010050  25 3d 31 38 8c f2 56 5f  3a 6f 25 3d b9 0d 3b 59  |%=18..V_:o%=..;Y|
00010060  0a c9 32 37 3a f2 6e 0d  3b 5a 1a c9 34 2c 32 34  |..27:.n.;Z..4,24|
00010070  3a e7 4f 5f 25 3c 3e 2d  31 8c f2 76 28 4f 5f 25  |:.O_%<>-1..v(O_%|
00010080  29 0d 3b 5b 09 7f 6f 25  3d a3 0d 3b 5c 05 cb 0d  |).;[..o%=..;\...|
00010090  3b 5d 09 cc 6f 25 3d a3  0d 3b 5e 09 cd 3a 3d 6f  |;]..o%=..;^..:=o|
000100a0  25 0d 3b 5f 60 dd f2 70  4a 3a ea 77 25 2c 42 25  |%.;_`..pJ:.w%,B%|
000100b0  3a 77 25 3d ae 72 24 3a  42 25 3d 5a 5f 25 3a c8  |:w%=.r$:B%=Z_%:.|
000100c0  95 42 25 3c 3e 2d 31 3a  d5 23 77 25 2c c3 42 25  |.B%<>-1:.#w%,.B%|
000100d0  21 38 3a c8 99 26 43 2c  32 2c 77 25 2c 42 25 2b  |!8:..&C,2,w%,B%+|
000100e0  26 43 2c 42 25 21 38 20  2d 26 43 3a 42 25 3d 42  |&C,B%!8 -&C:B%=B|
000100f0  25 21 34 3a ce 3a d9 23  77 25 3a 77 25 3d 30 3a  |%!4:.:.#w%:w%=0:|
00010100  e1 0d 3b 60 4f dd f2 42  75 28 77 25 29 3a d5 23  |..;`O..Bu(w%):.#|
00010110  77 25 2c 53 5f 25 3a d5  23 77 25 2c 6e 5f 25 3a  |w%,S_%:.#w%,n_%:|
00010120  d5 23 77 25 2c 4f 75 25  2b 35 3a d5 23 77 25 2c  |.#w%,Ou%+5:.#w%,|
00010130  44 5f 25 3a d5 23 77 25  2c 6c 79 25 3a d5 23 77  |D_%:.#w%,ly%:.#w|
00010140  25 2c 52 5f 25 3a d5 23  77 25 2c 44 75 25 3a e1  |%,R_%:.#w%,Du%:.|
00010150  0d 3b 61 4f dd f2 66 4a  28 77 25 29 3a 53 5f 25  |.;aO..fJ(w%):S_%|
00010160  3d 9a 23 77 25 3a 6e 5f  25 3d 9a 23 77 25 3a 4f  |=.#w%:n_%=.#w%:O|
00010170  75 25 3d 28 9a 23 77 25  29 2d 35 3a 44 5f 25 3d  |u%=(.#w%)-5:D_%=|
00010180  9a 23 77 25 3a 6c 79 25  3d 9a 23 77 25 3a 52 5f  |.#w%:ly%=.#w%:R_|
00010190  25 3d 9a 23 77 25 3a 44  75 25 3d a4 51 3a e1 0d  |%=.#w%:Du%=.Q:..|
000101a0  3b 62 26 dd f2 47 75 28  78 25 2c 46 79 25 2c 6c  |;b&..Gu(x%,Fy%,l|
000101b0  25 2c 61 25 2c 51 25 29  3a ea 41 25 2c 42 25 3a  |%,a%,Q%):.A%,B%:|
000101c0  c8 8e 73 25 ca 0d 3b 63  1d c9 31 2c 32 2c 33 3a  |..s%..;c..1,2,3:|
000101d0  e7 67 25 3c 3e 32 f2 5a  28 78 25 2c 46 79 25 2c  |.g%<>2.Z(x%,Fy%,|
000101e0  31 29 0d 3b 64 3e c9 26  44 3a f2 57 28 41 79 25  |1).;d>.&D:.W(Ay%|
000101f0  2c 30 2c 2d 31 29 3a f2  53 28 41 79 25 2c a4 5f  |,0,-1):.S(Ay%,._|
00010200  28 78 25 2c 46 79 25 29  2c 31 29 3a f2 46 28 41  |(x%,Fy%),1):.F(A|
00010210  79 25 2c 61 25 2c 51 25  2c 78 25 2c 46 79 25 29  |y%,a%,Q%,x%,Fy%)|
00010220  0d 3b 65 2d c9 36 3a 42  25 3d ac a4 5a 28 78 25  |.;e-.6:B%=..Z(x%|
00010230  2c 46 79 25 29 3a e3 41  25 3d 37 b8 26 41 3a f2  |,Fy%):.A%=7.&A:.|
00010240  4d 28 78 25 2c 41 25 2c  42 25 29 3a ed 0d 3b 66  |M(x%,A%,B%):..;f|
00010250  3e c9 38 2c 39 3a 41 25  3d bb a4 4d 28 78 25 2c  |>.8,9:A%=..M(x%,|
00010260  37 29 3a 41 25 2b 3d 31  2b 32 2a 28 46 79 25 3d  |7):A%+=1+2*(Fy%=|
00010270  38 29 3a e7 41 25 3e 30  80 41 25 3c 26 44 8c f2  |8):.A%>0.A%<&D..|
00010280  41 28 78 25 2c 37 2c c3  41 25 29 0d 3b 67 1c c9  |A(x%,7,.A%).;g..|
00010290  26 41 3a f2 46 28 59 75  25 2c 61 25 2c 51 25 2c  |&A:.F(Yu%,a%,Q%,|
000102a0  78 25 2c 46 79 25 29 0d  3b 68 33 c9 26 42 3a f2  |x%,Fy%).;h3.&B:.|
000102b0  4d 28 78 25 2c 26 43 2c  ac a4 5a 28 78 25 2c 46  |M(x%,&C,..Z(x%,F|
000102c0  79 25 29 29 3a f2 4d 28  78 25 2c 31 38 2c ac a4  |y%)):.M(x%,18,..|
000102d0  5a 28 78 25 2c 46 79 25  29 29 0d 3b 69 1c c9 26  |Z(x%,Fy%)).;i..&|
000102e0  43 3a f2 46 28 70 75 25  2c 61 25 2c 51 25 2c 78  |C:.F(pu%,a%,Q%,x|
000102f0  25 2c 46 79 25 29 0d 3b  6a 07 cb 3a e1 0d 3b 6b  |%,Fy%).;j..:..;k|
00010300  16 dd f2 69 4a 28 6c 25  2c 78 25 29 3a c8 8e 62  |...iJ(l%,x%):..b|
00010310  4a 25 ca 0d 3b 6c 31 c9  41 79 25 3a f2 44 28 78  |J%..;l1.Ay%:.D(x|
00010320  25 2c 26 44 2c 21 6c 25  29 3a f2 57 28 41 79 25  |%,&D,!l%):.W(Ay%|
00010330  2c 30 2c 2d 31 29 3a f2  53 28 41 79 25 2c 21 6c  |,0,-1):.S(Ay%,!l|
00010340  25 2c 31 29 0d 3b 6d 1e  c9 59 75 25 3a f2 41 28  |%,1).;m..Yu%:.A(|
00010350  78 25 2c 26 41 2c a4 4a  28 59 75 25 2c 21 6c 25  |x%,&A,.J(Yu%,!l%|
00010360  29 29 0d 3b 6e 32 c9 70  75 25 3a f2 41 28 78 25  |)).;n2.pu%:.A(x%|
00010370  2c 26 43 2c a4 4a 28 70  75 25 2c 21 6c 25 29 29  |,&C,.J(pu%,!l%))|
00010380  3a f2 4d 28 78 25 2c 31  38 2c 2d 28 21 6c 25 3c  |:.M(x%,18,-(!l%<|
00010390  3e 30 29 29 0d 3b 6f 07  cb 3a e1 0d 3b 70 f3 dd  |>0)).;o..:..;p..|
000103a0  f2 6d 75 28 78 25 29 3a  ea 41 25 3a e3 41 25 3d  |.mu(x%):.A%:.A%=|
000103b0  31 b8 33 3a f2 5a 28 78  25 2c 41 25 2c 94 28 53  |1.3:.Z(x%,A%,.(S|
000103c0  5f 25 3d 41 25 29 29 3a  ed 3a f2 44 28 78 25 2c  |_%=A%)):.:.D(x%,|
000103d0  26 44 2c 6e 5f 25 29 3a  f2 5a 28 78 25 2c 35 2c  |&D,n_%):.Z(x%,5,|
000103e0  2d 4f 75 25 29 3a f2 5a  28 78 25 2c 26 42 2c 2d  |-Ou%):.Z(x%,&B,-|
000103f0  28 44 5f 25 3c 3e 30 29  29 3a f2 4d 28 78 25 2c  |(D_%<>0)):.M(x%,|
00010400  26 43 2c 2d 28 44 5f 25  3d 30 29 29 3a f2 4d 28  |&C,-(D_%=0)):.M(|
00010410  78 25 2c 31 38 2c 2d 28  44 5f 25 3c 3e 31 29 29  |x%,18,-(D_%<>1))|
00010420  3a f2 5a 28 78 25 2c 31  38 2c 2d 44 75 25 29 3a  |:.Z(x%,18,-Du%):|
00010430  f2 5a 28 78 25 2c 36 2c  2d 28 6c 79 25 3c 3e 30  |.Z(x%,6,-(ly%<>0|
00010440  29 29 3a e3 41 25 3d 37  b8 26 41 3a f2 4d 28 78  |)):.A%=7.&A:.M(x|
00010450  25 2c 41 25 2c 2d 28 6c  79 25 3d 30 29 29 3a ed  |%,A%,-(ly%=0)):.|
00010460  3a f2 5a 28 78 25 2c 26  46 2c 94 28 28 52 5f 25  |:.Z(x%,&F,.((R_%|
00010470  80 34 29 3e 30 29 29 3a  f2 5a 28 78 25 2c 31 36  |.4)>0)):.Z(x%,16|
00010480  2c 94 28 28 52 5f 25 80  32 29 3e 30 29 29 0d 3b  |,.((R_%.2)>0)).;|
00010490  71 3a f2 5a 28 78 25 2c  31 37 2c 94 28 28 52 5f  |q:.Z(x%,17,.((R_|
000104a0  25 80 31 29 3e 30 29 29  3a f2 4d 28 78 25 2c 26  |%.1)>0)):.M(x%,&|
000104b0  46 2c 94 28 28 52 5f 25  80 31 29 3e 30 29 29 3a  |F,.((R_%.1)>0)):|
000104c0  e7 6c 79 25 3c 3e 30 8c  0d 3b 72 2f f2 41 28 78  |.ly%<>0..;r/.A(x|
000104d0  25 2c 37 2c c3 28 6c 79  25 80 26 46 29 29 3a f2  |%,7,.(ly%.&F)):.|
000104e0  41 28 78 25 2c 26 41 2c  a4 4a 28 59 75 25 2c 6c  |A(x%,&A,.J(Yu%,l|
000104f0  79 25 3e 3e 34 29 29 0d  3b 73 24 cc f2 41 28 78  |y%>>4)).;s$..A(x|
00010500  25 2c 37 2c 22 31 22 29  3a f2 41 28 78 25 2c 26  |%,7,"1"):.A(x%,&|
00010510  41 2c a4 41 28 22 45 33  22 29 29 0d 3b 74 38 cd  |A,.A("E3")).;t8.|
00010520  3a e7 44 5f 25 3d 30 8c  f2 41 28 78 25 2c 26 43  |:.D_%=0..A(x%,&C|
00010530  2c a4 41 28 22 45 4e 31  22 29 29 8b f2 41 28 78  |,.A("EN1"))..A(x|
00010540  25 2c 26 43 2c a4 4a 28  70 75 25 2c 44 5f 25 2d  |%,&C,.J(pu%,D_%-|
00010550  31 29 29 0d 3b 75 05 e1  0d 3b 76 c2 dd f2 6e 75  |1)).;u...;v...nu|
00010560  28 78 25 29 3a ea 41 25  2c 42 25 2c 64 25 2c 7a  |(x%):.A%,B%,d%,z|
00010570  25 2c 65 25 3a 41 25 3d  30 3a f5 41 25 2b 3d 31  |%,e%:A%=0:.A%+=1|
00010580  3a fd a4 5a 28 78 25 2c  41 25 29 84 41 25 3d 33  |:..Z(x%,A%).A%=3|
00010590  3a 53 5f 25 3d 41 25 3a  f2 47 28 53 25 28 a4 47  |:S_%=A%:.G(S%(.G|
000105a0  28 33 29 29 2c 41 25 2c  42 25 2c 64 25 2c 7a 25  |(3)),A%,B%,d%,z%|
000105b0  2c 65 25 29 3a f2 48 28  64 25 2c 7a 25 2c 65 25  |,e%):.H(d%,z%,e%|
000105c0  29 3a 6e 5f 25 3d a4 5f  28 78 25 2c 26 44 29 3a  |):n_%=._(x%,&D):|
000105d0  4f 75 25 3d a4 5a 28 78  25 2c 35 29 3a 6c 79 25  |Ou%=.Z(x%,5):ly%|
000105e0  3d 30 3a 44 5f 25 3d 30  3a e7 a4 5a 28 78 25 2c  |=0:D_%=0:..Z(x%,|
000105f0  36 29 8c 6c 79 25 3d 28  28 a4 4d 79 28 59 75 25  |6).ly%=((.My(Yu%|
00010600  2c a4 4d 28 78 25 2c 26  41 29 29 29 3c 3c 34 29  |,.M(x%,&A)))<<4)|
00010610  2b bb a4 4d 28 78 25 2c  37 29 0d 3b 77 27 e7 a4  |+..M(x%,7).;w'..|
00010620  5a 28 78 25 2c 26 42 29  8c 44 5f 25 3d a4 4d 79  |Z(x%,&B).D_%=.My|
00010630  28 70 75 25 2c a4 4d 28  78 25 2c 26 43 29 29 2b  |(pu%,.M(x%,&C))+|
00010640  31 0d 3b 78 3c 44 75 25  3d a4 5a 28 78 25 2c 31  |1.;x<Du%=.Z(x%,1|
00010650  38 29 3a 52 5f 25 3d 94  28 a4 5a 28 78 25 2c 31  |8):R_%=.(.Z(x%,1|
00010660  37 29 2b 32 2a a4 5a 28  78 25 2c 31 36 29 2b 34  |7)+2*.Z(x%,16)+4|
00010670  2a a4 5a 28 78 25 2c 26  46 29 29 3a e1 0d 3b 79  |*.Z(x%,&F)):..;y|
00010680  3a dd f2 48 28 64 25 2c  7a 25 2c 65 25 29 3a ea  |:..H(d%,z%,e%):.|
00010690  6a 25 2c 42 25 2c 78 79  25 2c 54 25 2c 62 25 3a  |j%,B%,xy%,T%,b%:|
000106a0  6a 25 3d a4 48 28 64 25  2c 7a 25 2c 65 25 29 3a  |j%=.H(d%,z%,e%):|
000106b0  e7 53 5f 25 3d 33 8c 0d  3b 7a 24 f2 50 28 64 25  |.S_%=3..;z$.P(d%|
000106c0  2c 7a 25 2c 65 25 2c a4  65 79 28 64 25 2c 7a 25  |,z%,e%,.ey(d%,z%|
000106d0  2c 65 25 29 2d 31 2c 30  2c 30 29 0d 3b 7b 1b cc  |,e%)-1,0,0).;{..|
000106e0  f2 50 28 64 25 2c 7a 25  2c 65 25 2c 2d 6a 25 2b  |.P(d%,z%,e%,-j%+|
000106f0  31 2c 30 2c 30 29 0d 3b  7c 3a cd 3a 62 25 3d a4  |1,0,0).;|:.:b%=.|
00010700  53 28 30 2c 30 2c 64 25  2c 7a 25 2c 65 25 29 3a  |S(0,0,d%,z%,e%):|
00010710  53 25 28 a4 47 28 33 29  29 3d 62 25 3a e7 5a 25  |S%(.G(3))=b%:.Z%|
00010720  28 74 25 29 3d 33 8c 76  25 3d 53 25 28 74 25 29  |(t%)=3.v%=S%(t%)|
00010730  0d 3b 7d 08 f2 6c 3a e1  0d 3b 7e 6e dd f2 6c 3a  |.;}..l:..;~n..l:|
00010740  ea 42 25 2c 54 25 2c 78  79 25 3a 42 25 3d 5a 5f  |.B%,T%,xy%:B%=Z_|
00010750  25 3a 67 4a 25 3d 2d 31  3a 62 25 3d 53 25 28 a4  |%:gJ%=-1:b%=S%(.|
00010760  47 28 33 29 29 3a 56 25  28 29 3d 30 3a c8 95 42  |G(3)):V%()=0:..B|
00010770  25 3c 3e 2d 31 80 ac 78  79 25 3a 54 25 3d 42 25  |%<>-1..xy%:T%=B%|
00010780  21 26 43 3a e7 a4 42 28  62 25 2c 54 25 29 3c 3e  |!&C:..B(b%,T%)<>|
00010790  31 8c 78 79 25 3d b9 3a  67 4a 25 3d 42 25 8b 42  |1.xy%=.:gJ%=B%.B|
000107a0  25 3d 42 25 21 34 0d 3b  7f 07 ce 3a e1 0d 3b 80  |%=B%!4.;...:..;.|
000107b0  60 dd a4 69 79 28 54 25  29 3a ea 42 25 2c 46 25  |`..iy(T%):.B%,F%|
000107c0  3a 42 25 3d 5a 5f 25 3a  46 25 3d 2d 31 3a c8 95  |:B%=Z_%:F%=-1:..|
000107d0  42 25 3c 3e 2d 31 80 46  25 3d 2d 31 3a e7 28 28  |B%<>-1.F%=-1:.((|
000107e0  42 25 21 31 36 29 80 28  31 3c 3c 32 30 29 29 3d  |B%!16).(1<<20))=|
000107f0  30 84 28 28 42 25 21 31  36 29 80 34 29 3d 34 8c  |0.((B%!16).4)=4.|
00010800  46 25 3d 42 25 8b 42 25  3d 42 25 21 34 0d 3b 81  |F%=B%.B%=B%!4.;.|
00010810  09 ce 3a 3d 46 25 0d 3b  82 20 dd f2 72 5f 28 42  |..:=F%.;. ..r_(B|
00010820  25 29 3a e7 28 42 25 21  31 36 80 28 33 3c 3c 32  |%):.(B%!16.(3<<2|
00010830  30 29 29 3d 30 8c 0d 3b  83 6b ea 71 79 25 2c 56  |0))=0..;.k.qy%,V|
00010840  79 25 2c 64 25 2c 7a 25  2c 65 25 2c 49 6c 25 2c  |y%,d%,z%,e%,Il%,|
00010850  41 24 2c 41 25 2c 52 25  2c 43 25 3a f2 47 28 42  |A$,A%,R%,C%:.G(B|
00010860  25 21 26 43 2c 71 79 25  2c 56 79 25 2c 64 25 2c  |%!&C,qy%,Vy%,d%,|
00010870  7a 25 2c 65 25 29 3a 70  4a 25 3d 42 25 3a e7 56  |z%,e%):pJ%=B%:.V|
00010880  79 25 3e 26 43 8c 56 79  25 2d 3d 26 43 3a 49 6c  |y%>&C.Vy%-=&C:Il|
00010890  25 3d b9 8b e7 56 79 25  3d 30 8c 56 79 25 3d 26  |%=...Vy%=0.Vy%=&|
000108a0  43 0d 3b 84 3d 41 24 3d  c3 56 79 25 2b 22 3a 22  |C.;.=A$=.Vy%+":"|
000108b0  2b c4 32 2d a9 c3 71 79  25 2c 22 30 22 29 2b c3  |+.2-..qy%,"0")+.|
000108c0  71 79 25 3a e7 49 6c 25  8c 41 24 2b 3d 22 20 70  |qy%:.Il%.A$+=" p|
000108d0  6d 2c 22 8b 41 24 2b 3d  22 20 61 6d 2c 22 0d 3b  |m,".A$+=" am,".;|
000108e0  85 50 f2 41 28 52 79 25  2c 31 2c a4 4f 28 22 57  |.P.A(Ry%,1,.O("W|
000108f0  61 73 53 65 74 22 2c 41  24 2c 22 22 2c 22 22 2c  |asSet",A$,"","",|
00010900  22 22 29 29 3a f2 41 28  52 79 25 2c 32 2c a4 55  |"")):.A(Ry%,2,.U|
00010910  28 64 25 2c 7a 25 2c 65  25 2c 2d 31 29 29 3a e7  |(d%,z%,e%,-1)):.|
00010920  28 28 42 25 21 31 36 29  80 34 29 3d 34 8c 0d 3b  |((B%!16).4)=4..;|
00010930  86 18 52 25 3d b9 3a e7  28 28 42 25 21 31 36 29  |..R%=.:.((B%!16)|
00010940  80 38 29 3d 38 8c 0d 3b  87 63 f2 72 79 28 71 79  |.8)=8..;.c.ry(qy|
00010950  25 2c 56 79 25 2c 64 25  2c 7a 25 2c 65 25 2c 28  |%,Vy%,d%,z%,e%,(|
00010960  28 42 25 21 31 36 29 3e  3e 38 29 80 26 46 46 2c  |(B%!16)>>8).&FF,|
00010970  28 28 28 42 25 21 31 36  29 3e 3e 31 36 29 80 26  |(((B%!16)>>16).&|
00010980  46 29 2d 31 29 3a e7 56  79 25 3e 26 43 8c 56 79  |F)-1):.Vy%>&C.Vy|
00010990  25 2d 3d 26 43 3a 49 6c  25 3d b9 8b e7 56 79 25  |%-=&C:Il%=...Vy%|
000109a0  3d 30 8c 56 79 25 3d 26  43 0d 3b 88 3d 41 24 3d  |=0.Vy%=&C.;.=A$=|
000109b0  c3 56 79 25 2b 22 3a 22  2b c4 32 2d a9 c3 71 79  |.Vy%+":"+.2-..qy|
000109c0  25 2c 22 30 22 29 2b c3  71 79 25 3a e7 49 6c 25  |%,"0")+.qy%:.Il%|
000109d0  8c 41 24 2b 3d 22 20 70  6d 2c 22 8b 41 24 2b 3d  |.A$+=" pm,".A$+=|
000109e0  22 20 61 6d 2c 22 0d 3b  89 42 f2 41 28 52 79 25  |" am,".;.B.A(Ry%|
000109f0  2c 26 46 2c a4 4f 28 22  57 69 6c 52 70 74 22 2c  |,&F,.O("WilRpt",|
00010a00  41 24 2c 22 22 2c 22 22  2c 22 22 29 29 3a f2 41  |A$,"","","")):.A|
00010a10  28 52 79 25 2c 31 36 2c  a4 55 28 64 25 2c 7a 25  |(Ry%,16,.U(d%,z%|
00010a20  2c 65 25 2c 2d 31 29 29  0d 3b 8a 53 cc 3a f2 76  |,e%,-1)).;.S.:.v|
00010a30  79 28 64 25 2c 7a 25 2c  65 25 2c 42 25 21 31 36  |y(d%,z%,e%,B%!16|
00010a40  29 3a 41 24 3d c3 56 79  25 2b 22 3a 22 2b c4 32  |):A$=.Vy%+":"+.2|
00010a50  2d a9 c3 71 79 25 2c 22  30 22 29 2b c3 71 79 25  |-..qy%,"0")+.qy%|
00010a60  3a e7 49 6c 25 8c 41 24  2b 3d 22 20 70 6d 2c 22  |:.Il%.A$+=" pm,"|
00010a70  8b 41 24 2b 3d 22 20 61  6d 2c 22 0d 3b 8b 42 f2  |.A$+=" am,".;.B.|
00010a80  41 28 52 79 25 2c 26 46  2c a4 4f 28 22 57 69 6c  |A(Ry%,&F,.O("Wil|
00010a90  52 70 74 22 2c 41 24 2c  22 22 2c 22 22 2c 22 22  |Rpt",A$,"","",""|
00010aa0  29 29 3a f2 41 28 52 79  25 2c 31 36 2c a4 55 28  |)):.A(Ry%,16,.U(|
00010ab0  64 25 2c 7a 25 2c 65 25  2c 2d 31 29 29 0d 3b 8c  |d%,z%,e%,-1)).;.|
00010ac0  05 cd 0d 3b 8d 1b cd 3a  e7 28 28 42 25 21 31 36  |...;...:.((B%!16|
00010ad0  29 80 31 29 3d 31 8c 57  5f 25 3d 26 41 0d 3b 8e  |).1)=1.W_%=&A.;.|
00010ae0  db 43 25 3d 28 42 25 21  31 36 3e 3e 34 29 80 26  |.C%=(B%!16>>4).&|
00010af0  46 3a 43 25 2d 3d 6e 5f  25 2a 28 43 25 3d 30 29  |F:C%-=n_%*(C%=0)|
00010b00  3a e3 41 25 3d 34 b8 36  3a f2 44 28 52 79 25 2c  |:.A%=4.6:.D(Ry%,|
00010b10  41 25 2c 43 25 29 3a ed  3a 42 25 2b 3d 32 30 3a  |A%,C%):.:B%+=20:|
00010b20  e3 41 25 3d 34 b8 36 3a  41 24 3d 22 22 3a c8 95  |.A%=4.6:A$="":..|
00010b30  3f 42 25 3c 3e 26 42 3a  41 24 2b 3d bd 3f 42 25  |?B%<>&B:A$+=.?B%|
00010b40  3a 42 25 2b 3d 31 3a ce  3a 42 25 2b 3d 31 3a f2  |:B%+=1:.:B%+=1:.|
00010b50  41 28 52 79 25 2c 41 25  2c 41 24 29 3a ed 3a f2  |A(Ry%,A%,A$):.:.|
00010b60  5a 28 52 79 25 2c 39 2c  30 29 3a e3 41 25 3d 26  |Z(Ry%,9,0):.A%=&|
00010b70  41 b8 26 44 3a f2 4d 28  52 79 25 2c 41 25 2c 31  |A.&D:.M(Ry%,A%,1|
00010b80  29 3a ed 3a f2 41 28 52  79 25 2c 26 41 2c 22 31  |):.:.A(Ry%,&A,"1|
00010b90  22 29 3a f2 41 28 52 79  25 2c 26 44 2c a4 41 28  |"):.A(Ry%,&D,.A(|
00010ba0  22 45 31 22 29 29 3a f2  68 4a 28 ac 52 25 2c b9  |"E1")):.hJ(.R%,.|
00010bb0  29 3a 76 4a 25 3d 2d 31  0d 3b 8f 21 cc 3a e7 28  |):vJ%=-1.;.!.:.(|
00010bc0  42 25 21 31 36 80 28 31  3c 3c 32 31 29 29 3c 3e  |B%!16.(1<<21))<>|
00010bd0  30 8c f2 62 75 28 42 25  29 0d 3b 90 0d f2 59 79  |0..bu(B%).;...Yy|
00010be0  28 42 25 2c 30 29 0d 3b  91 07 cd 3a e1 0d 3b 92  |(B%,0).;...:..;.|
00010bf0  6f dd f2 62 75 28 42 25  29 3a ea 41 24 2c 41 25  |o..bu(B%):.A$,A%|
00010c00  2c 5a 24 2c 66 69 25 2c  42 6c 25 3a 42 25 2b 3d  |,Z$,fi%,Bl%:B%+=|
00010c10  32 30 3a e3 41 25 3d 31  b8 33 3a c8 95 3f 42 25  |20:.A%=1.3:..?B%|
00010c20  3c 3e 26 42 3a 41 24 2b  3d bd 3f 42 25 3a 42 25  |<>&B:A$+=.?B%:B%|
00010c30  2b 3d 31 3a ce 3a 42 25  2b 3d 31 3a ed 3a e7 c0  |+=1:.:B%+=1:.:..|
00010c40  41 24 2c 31 29 3d 22 3d  22 8c 41 24 3d c1 41 24  |A$,1)="=".A$=.A$|
00010c50  2c a7 41 24 2c 22 2a 22  29 2b 31 29 0d 3b 93 34  |,.A$,"*")+1).;.4|
00010c60  5a 24 3d a4 76 28 c0 41  24 2c a7 41 24 2c 22 20  |Z$=.v(.A$,.A$," |
00010c70  22 29 29 29 3a e7 5a 24  3c 3e 22 46 49 4c 45 52  |"))):.Z$<>"FILER|
00010c80  5f 52 55 4e 22 80 5a 24  3c 3e 22 52 55 4e 22 8c  |_RUN".Z$<>"RUN".|
00010c90  0d 3b 94 43 c8 99 38 2c  35 2c 41 24 b8 66 69 25  |.;.C..8,5,A$.fi%|
00010ca0  2c 42 6c 25 3a e7 66 69  25 3d 32 8c 41 24 3d 22  |,Bl%:.fi%=2.A$="|
00010cb0  52 75 6e 20 22 2b 41 24  8b e7 66 69 25 3c 3e 30  |Run "+A$..fi%<>0|
00010cc0  8c 41 24 3d 22 46 69 6c  65 72 5f 52 75 6e 20 22  |.A$="Filer_Run "|
00010cd0  2b 41 24 0d 3b 95 13 cd  3a c8 99 26 34 30 30 44  |+A$.;...:..&400D|
00010ce0  45 2c 41 24 3a e1 0d 3b  96 ca dd f2 4e 5f 3a ea  |E,A$:..;....N_:.|
00010cf0  62 25 2c 42 25 2c 78 79  25 2c 41 25 2c 43 25 2c  |b%,B%,xy%,A%,C%,|
00010d00  64 25 2c 7a 25 2c 65 25  3a 62 25 3d 53 25 28 a4  |d%,z%,e%:b%=S%(.|
00010d10  47 28 33 29 29 3a 42 25  3d 67 4a 25 3a f2 47 28  |G(3)):B%=gJ%:.G(|
00010d20  62 25 2c 41 25 2c 43 25  2c 64 25 2c 7a 25 2c 65  |b%,A%,C%,d%,z%,e|
00010d30  25 29 3a 41 25 3d 2d 26  45 2a 28 53 5f 25 3d 31  |%):A%=-&E*(S_%=1|
00010d40  29 2d 37 2a 28 53 5f 25  3d 32 29 2d 32 2a 28 53  |)-7*(S_%=2)-2*(S|
00010d50  5f 25 3d 33 29 3a f2 50  28 64 25 2c 7a 25 2c 65  |_%=3):.P(d%,z%,e|
00010d60  25 2c 41 25 2c 30 2c 30  29 3a 62 25 3d a4 53 28  |%,A%,0,0):b%=.S(|
00010d70  30 2c 30 2c 64 25 2c 7a  25 2c 65 25 29 3a c8 95  |0,0,d%,z%,e%):..|
00010d80  42 25 3c 3e 2d 31 80 ac  78 79 25 3a 54 25 3d 42  |B%<>-1..xy%:T%=B|
00010d90  25 21 26 43 3a e7 a4 42  28 62 25 2c 54 25 29 3d  |%!&C:..B(b%,T%)=|
00010da0  2d 31 8c 78 79 25 3d b9  8b 42 25 3d 42 25 21 34  |-1.xy%=..B%=B%!4|
00010db0  0d 3b 97 0b ce 3a e7 78  79 25 8c 0d 3b 98 32 74  |.;...:.xy%..;.2t|
00010dc0  25 3d a4 47 28 33 29 3a  f2 47 28 42 25 21 26 43  |%=.G(3):.G(B%!&C|
00010dd0  2c 41 25 2c 43 25 2c 64  25 2c 7a 25 2c 65 25 29  |,A%,C%,d%,z%,e%)|
00010de0  3a f2 48 28 64 25 2c 7a  25 2c 65 25 29 0d 3b 99  |:.H(d%,z%,e%).;.|
00010df0  18 cc f2 42 28 a4 41 28  22 45 72 72 4e 6f 4d 6f  |...B(.A("ErrNoMo|
00010e00  72 65 22 29 29 0d 3b 9a  07 cd 3a e1 0d 3b 9b 67  |re")).;...:..;.g|
00010e10  dd f2 53 5f 3a ea 62 25  2c 42 25 2c 78 79 25 2c  |..S_:.b%,B%,xy%,|
00010e20  41 25 2c 43 25 2c 64 25  2c 7a 25 2c 65 25 3a 62  |A%,C%,d%,z%,e%:b|
00010e30  25 3d 53 25 28 a4 47 28  33 29 29 3a 42 25 3d 67  |%=S%(.G(3)):B%=g|
00010e40  4a 25 3a c8 95 42 25 3c  3e 2d 31 80 ac 78 79 25  |J%:..B%<>-1..xy%|
00010e50  3a 54 25 3d 42 25 21 26  43 3a e7 a4 42 28 62 25  |:T%=B%!&C:..B(b%|
00010e60  2c 54 25 29 3d 31 8c 78  79 25 3d b9 8b 42 25 3d  |,T%)=1.xy%=..B%=|
00010e70  21 42 25 0d 3b 9c 0b ce  3a e7 78 79 25 8c 0d 3b  |!B%.;...:.xy%..;|
00010e80  9d 32 74 25 3d a4 47 28  33 29 3a f2 47 28 42 25  |.2t%=.G(3):.G(B%|
00010e90  21 26 43 2c 41 25 2c 43  25 2c 64 25 2c 7a 25 2c  |!&C,A%,C%,d%,z%,|
00010ea0  65 25 29 3a f2 48 28 64  25 2c 7a 25 2c 65 25 29  |e%):.H(d%,z%,e%)|
00010eb0  0d 3b 9e 16 cc f2 42 28  a4 41 28 22 45 72 72 4e  |.;....B(.A("ErrN|
00010ec0  6f 42 34 22 29 29 0d 3b  9f 07 cd 3a e1 0d 3b a0  |oB4")).;...:..;.|
00010ed0  12 dd f2 44 5f 3a e7 5a  5f 25 3c 3e 2d 31 8c 0d  |...D_:.Z_%<>-1..|
00010ee0  3b a1 33 74 25 3d a4 47  28 33 29 3a f2 47 28 5a  |;.3t%=.G(3):.G(Z|
00010ef0  5f 25 21 26 43 2c 41 25  2c 43 25 2c 64 25 2c 7a  |_%!&C,A%,C%,d%,z|
00010f00  25 2c 65 25 29 3a f2 48  28 64 25 2c 7a 25 2c 65  |%,e%):.H(d%,z%,e|
00010f10  25 29 0d 3b a2 17 cc f2  42 28 a4 41 28 22 45 72  |%).;....B(.A("Er|
00010f20  72 4e 6f 45 6e 74 22 29  29 0d 3b a3 07 cd 3a e1  |rNoEnt")).;...:.|
00010f30  0d 3b a4 1c dd f2 48 5f  3a ea 42 25 3a 42 25 3d  |.;....H_:.B%:B%=|
00010f40  5a 5f 25 3a e7 42 25 3c  3e 2d 31 8c 0d 3b a5 47  |Z_%:.B%<>-1..;.G|
00010f50  c8 95 42 25 21 34 3c 3e  2d 31 3a 42 25 3d 42 25  |..B%!4<>-1:B%=B%|
00010f60  21 34 3a ce 3a 74 25 3d  a4 47 28 33 29 3a f2 47  |!4:.:t%=.G(3):.G|
00010f70  28 42 25 21 26 43 2c 41  25 2c 43 25 2c 64 25 2c  |(B%!&C,A%,C%,d%,|
00010f80  7a 25 2c 65 25 29 3a f2  48 28 64 25 2c 7a 25 2c  |z%,e%):.H(d%,z%,|
00010f90  65 25 29 0d 3b a6 17 cc  f2 42 28 a4 41 28 22 45  |e%).;....B(.A("E|
00010fa0  72 72 4e 6f 45 6e 74 22  29 29 0d 3b a7 07 cd 3a  |rrNoEnt")).;...:|
00010fb0  e1 0d 3b a8 38 dd f2 6c  75 28 76 25 2c 79 25 2c  |..;.8..lu(v%,y%,|
00010fc0  5f 25 2c 55 25 29 3a ea  4e 75 25 2c 50 79 25 2c  |_%,U%):.Nu%,Py%,|
00010fd0  6a 25 3a e7 79 25 8c f2  50 28 64 25 2c 7a 25 2c  |j%:.y%..P(d%,z%,|
00010fe0  65 25 2c 37 2c 30 2c 30  29 0d 3b a9 86 4e 75 25  |e%,7,0,0).;..Nu%|
00010ff0  3d 55 25 2d 34 30 3a 50  79 25 3d 2d 28 6b 25 2d  |=U%-40:Py%=-(k%-|
00011000  36 30 29 2f 37 3a 51 4a  25 3d 65 25 3a 79 5f 25  |60)/7:QJ%=e%:y_%|
00011010  3d 7a 25 3a e3 6a 25 3d  31 b8 37 3a f2 7a 79 28  |=z%:.j%=1.7:.zy(|
00011020  6a 25 2b 37 2a 94 79 25  2c 64 25 2c 6a 25 2c 7a  |j%+7*.y%,d%,j%,z|
00011030  25 2c 65 25 2c 79 25 2c  5f 25 2b 26 41 2c 4e 75  |%,e%,y%,_%+&A,Nu|
00011040  25 2c 75 25 2d 32 30 2c  50 79 25 29 3a e7 6a 25  |%,u%-20,Py%):.j%|
00011050  3c 3e 37 8c f2 50 28 64  25 2c 7a 25 2c 65 25 2c  |<>7..P(d%,z%,e%,|
00011060  31 2c 30 2c 30 29 3a 4e  75 25 2b 3d 50 79 25 0d  |1,0,0):Nu%+=Py%.|
00011070  3b aa 07 ed 3a e1 0d 3b  ab 75 dd a4 76 79 28 67  |;...:..;.u..vy(g|
00011080  25 2c 79 25 2c 61 25 2c  51 25 29 3a ea 50 79 25  |%,y%,a%,Q%):.Py%|
00011090  2c 70 25 2c 5f 25 2c 52  25 3a 50 79 25 3d 28 6b  |,p%,_%,R%:Py%=(k|
000110a0  25 2d 36 30 29 2f 37 3a  51 25 3d 2d 51 25 2d 34  |%-60)/7:Q%=-Q%-4|
000110b0  30 2b 50 79 25 3a 70 25  3d 28 28 51 25 81 50 79  |0+Py%:p%=((Q%.Py|
000110c0  25 29 83 38 29 3a e7 70  25 3c 3e 30 8c 70 25 2b  |%).8):.p%<>0.p%+|
000110d0  3d 37 2a 94 79 25 3a e7  61 25 3c 26 41 84 61 25  |=7*.y%:.a%<&A.a%|
000110e0  3e 75 25 2d 32 30 8c 70  25 3d 30 0d 3b ac 15 e7  |>u%-20.p%=0.;...|
000110f0  79 25 8c 5f 25 3d 77 79  25 8b 5f 25 3d 6d 79 25  |y%._%=wy%._%=my%|
00011100  0d 3b ad 4c e7 70 25 3c  3e 30 8c 52 25 3d a4 46  |.;.L.p%<>0.R%=.F|
00011110  79 28 70 25 2c 61 25 2d  26 41 2c 51 25 83 50 79  |y(p%,a%-&A,Q%.Py|
00011120  25 2c 67 25 2c 50 79 25  2c 5f 25 2b 26 41 2c 2d  |%,g%,Py%,_%+&A,-|
00011130  6d 25 2d 34 30 2d 28 70  25 2b 37 2a 28 70 25 3e  |m%-40-(p%+7*(p%>|
00011140  37 29 29 2a 50 79 25 2b  50 79 25 29 0d 3b ae 07  |7))*Py%+Py%).;..|
00011150  3d 52 25 0d 3b af 52 dd  f2 4d 4a 28 76 25 2c 79  |=R%.;.R..MJ(v%,y|
00011160  25 2c 5f 25 2c 55 25 29  3a ea 4e 75 25 2c 50 79  |%,_%,U%):.Nu%,Py|
00011170  25 2c 74 4a 25 2c 6a 25  3a e7 79 25 8c f2 50 28  |%,tJ%,j%:.y%..P(|
00011180  64 25 2c 7a 25 2c 65 25  2c 33 2c 30 2c 30 29 3a  |d%,z%,e%,3,0,0):|
00011190  6a 25 3d 34 3a 74 4a 25  3d 37 8b 6a 25 3d 31 3a  |j%=4:tJ%=7.j%=1:|
000111a0  74 4a 25 3d 33 0d 3b b0  45 4e 75 25 3d 55 25 2d  |tJ%=3.;.ENu%=U%-|
000111b0  34 30 3a 50 79 25 3d 2d  28 6b 25 2d 36 30 29 2f  |40:Py%=-(k%-60)/|
000111c0  33 3a 51 4a 25 3d 65 25  3a 79 5f 25 3d 7a 25 3a  |3:QJ%=e%:y_%=z%:|
000111d0  e3 6a 25 3d 6a 25 b8 74  4a 25 3a e7 6a 25 3d 36  |.j%=j%.tJ%:.j%=6|
000111e0  8c 50 79 25 3d 50 79 25  2f 32 0d 3b b1 53 f2 7a  |.Py%=Py%/2.;.S.z|
000111f0  79 28 6a 25 2c 64 25 2c  6a 25 2c 7a 25 2c 65 25  |y(j%,d%,j%,z%,e%|
00011200  2c 79 25 2c 5f 25 2b 26  41 2c 4e 75 25 2c 75 25  |,y%,_%+&A,Nu%,u%|
00011210  2d 32 30 2c 50 79 25 29  3a e7 6a 25 3c 3e 74 4a  |-20,Py%):.j%<>tJ|
00011220  25 8c f2 50 28 64 25 2c  7a 25 2c 65 25 2c 31 2c  |%..P(d%,z%,e%,1,|
00011230  30 2c 30 29 3a 4e 75 25  2b 3d 50 79 25 0d 3b b2  |0,0):Nu%+=Py%.;.|
00011240  07 ed 3a e1 0d 3b b3 97  dd a4 6b 79 28 67 25 2c  |..:..;....ky(g%,|
00011250  79 25 2c 61 25 2c 51 25  29 3a ea 50 79 25 2c 70  |y%,a%,Q%):.Py%,p|
00011260  25 2c 5f 25 2c 55 25 2c  52 25 3a 50 79 25 3d 28  |%,_%,U%,R%:Py%=(|
00011270  6b 25 2d 36 30 29 2f 33  3a 51 25 3d 2d 51 25 2d  |k%-60)/3:Q%=-Q%-|
00011280  34 30 2b 50 79 25 3a 70  25 3d 28 28 51 25 81 50  |40+Py%:p%=((Q%.P|
00011290  79 25 29 83 34 29 3a 51  25 3d 51 25 83 50 79 25  |y%).4):Q%=Q%.Py%|
000112a0  3a 55 25 3d 2d 6d 25 2d  34 30 2d 70 25 2a 50 79  |:U%=-m%-40-p%*Py|
000112b0  25 2b 50 79 25 3a e7 70  25 3c 3e 30 8c 70 25 2b  |%+Py%:.p%<>0.p%+|
000112c0  3d 33 2a 94 79 25 3a e7  61 25 3c 26 41 84 61 25  |=3*.y%:.a%<&A.a%|
000112d0  3e 75 25 2d 32 30 8c 70  25 3d 30 0d 3b b4 14 e7  |>u%-20.p%=0.;...|
000112e0  70 25 3e 3d 36 8c 50 79  25 3d 50 79 25 2f 32 0d  |p%>=6.Py%=Py%/2.|
000112f0  3b b5 26 e7 70 25 3d 36  80 51 25 3e 3d 50 79 25  |;.&.p%=6.Q%>=Py%|
00011300  8c 51 25 2d 3d 50 79 25  3a 70 25 3d 37 3a 55 25  |.Q%-=Py%:p%=7:U%|
00011310  2d 3d 50 79 25 0d 3b b6  15 e7 79 25 8c 5f 25 3d  |-=Py%.;...y%._%=|
00011320  77 79 25 8b 5f 25 3d 6d  79 25 0d 3b b7 2e e7 70  |wy%._%=my%.;...p|
00011330  25 3c 3e 30 8c 52 25 3d  a4 46 79 28 70 25 2c 61  |%<>0.R%=.Fy(p%,a|
00011340  25 2d 26 41 2c 51 25 2c  67 25 2c 50 79 25 2c 5f  |%-&A,Q%,g%,Py%,_|
00011350  25 2b 26 41 2c 55 25 29  0d 3b b8 07 3d 52 25 0d  |%+&A,U%).;..=R%.|
00011360  3b b9 2c dd f2 41 6c 28  76 25 2c 79 25 2c 5f 25  |;.,..Al(v%,y%,_%|
00011370  2c 55 25 29 3a e7 79 25  8c f2 50 28 64 25 2c 7a  |,U%):.y%..P(d%,z|
00011380  25 2c 65 25 2c 31 2c 30  2c 30 29 0d 3b ba 4f 51  |%,e%,1,0,0).;.OQ|
00011390  4a 25 3d 65 25 3a 79 5f  25 3d 7a 25 3a f2 7a 79  |J%=e%:y_%=z%:.zy|
000113a0  28 94 ac 79 25 2c 64 25  2c a4 48 28 64 25 2c 7a  |(..y%,d%,.H(d%,z|
000113b0  25 2c 65 25 29 2c 7a 25  2c 65 25 2c 79 25 2c 5f  |%,e%),z%,e%,y%,_|
000113c0  25 2b 26 41 2c 55 25 2d  34 30 2c 75 25 2d 32 30  |%+&A,U%-40,u%-20|
000113d0  2c 2d 6b 25 2b 36 30 29  3a e1 0d 3b bb 40 dd a4  |,-k%+60):..;.@..|
000113e0  51 5f 28 67 25 2c 79 25  2c 61 25 2c 51 25 29 3a  |Q_(g%,y%,a%,Q%):|
000113f0  ea 70 25 2c 5f 25 2c 52  25 3a 51 25 3d 2d 51 25  |.p%,_%,R%:Q%=-Q%|
00011400  2d 34 30 3a 70 25 3d 31  3a e7 79 25 8c 5f 25 3d  |-40:p%=1:.y%._%=|
00011410  77 79 25 8b 5f 25 3d 6d  79 25 0d 3b bc 2e e7 61  |wy%._%=my%.;...a|
00011420  25 3c 26 41 84 61 25 3e  75 25 2d 32 30 84 51 25  |%<&A.a%>u%-20.Q%|
00011430  3e 6b 25 2d 36 30 84 51  25 3c 30 8c 70 25 3d 30  |>k%-60.Q%<0.p%=0|
00011440  8b 70 25 2b 3d 94 79 25  0d 3b bd 31 e7 70 25 3c  |.p%+=.y%.;.1.p%<|
00011450  3e 30 8c 52 25 3d a4 46  79 28 70 25 2c 61 25 2d  |>0.R%=.Fy(p%,a%-|
00011460  26 41 2c 51 25 2c 67 25  2c 6b 25 2c 5f 25 2b 26  |&A,Q%,g%,k%,_%+&|
00011470  41 2c 2d 6d 25 2d 34 30  29 0d 3b be 07 3d 52 25  |A,-m%-40).;..=R%|
00011480  0d 3b bf 6d dd f2 7a 79  28 70 25 2c 64 25 2c 6a  |.;.m..zy(p%,d%,j|
00011490  25 2c 7a 25 2c 65 25 2c  79 25 2c 5f 25 2c 55 25  |%,z%,e%,y%,_%,U%|
000114a0  2c 78 25 2c 6e 25 29 3a  ea 42 25 2c 43 25 2c 54  |,x%,n%):.B%,C%,T|
000114b0  25 2c 51 25 2c 51 79 25  2c 41 25 2c 46 5f 25 3a  |%,Q%,Qy%,A%,F_%:|
000114c0  51 79 25 3d 32 38 3a 46  5f 25 3d a4 53 28 30 2c  |Qy%=28:F_%=.S(0,|
000114d0  30 2c 64 25 2c 7a 25 2c  65 25 29 3a e7 a4 46 28  |0,d%,z%,e%):..F(|
000114e0  5f 25 2c 55 25 2c 78 25  2c 6e 25 29 8c 0d 3b c0  |_%,U%,x%,n%)..;.|
000114f0  22 f2 56 28 30 2c 37 29  3a e7 46 5f 25 3d a4 53  |".V(0,7):.F_%=.S|
00011500  28 30 2c 30 2c a4 54 2c  a4 49 2c a4 52 29 8c 0d  |(0,0,.T,.I,.R)..|
00011510  3b c1 39 c8 99 26 34 30  30 45 36 2c 21 46 4a 25  |;.9..&400E6,!FJ%|
00011520  3a f2 43 79 28 5f 25 2d  34 2c 55 25 2d 34 2c 78  |:.Cy(_%-4,U%-4,x|
00011530  25 2b 38 2c 2d 6e 25 2d  38 2c 26 43 29 3a c8 99  |%+8,-n%-8,&C):..|
00011540  26 34 30 30 45 36 2c 37  0d 3b c2 2a cd 3a ec 5f  |&400E6,7.;.*.:._|
00011550  25 2c 55 25 3a df 42 59  78 25 2c 30 3a ec 42 59  |%,U%:.BYx%,0:.BY|
00011560  30 2c 6e 25 3a df 42 59  2d 78 25 2c 30 3a e7 79  |0,n%:.BY-x%,0:.y|
00011570  25 8c 0d 3b c3 76 f2 4c  28 69 6c 25 2c c3 64 25  |%..;.v.L(il%,.d%|
00011580  2c 2d 31 2c 5f 25 2b 78  25 2d 33 30 2c 55 25 2d  |,-1,_%+x%-30,U%-|
00011590  36 29 3a f2 4c 28 70 5f  25 2c a4 74 28 6a 25 2c  |6):.L(p_%,.t(j%,|
000115a0  2d 31 29 2c 31 2c 5f 25  2b 78 25 2d 34 30 2c 55  |-1),1,_%+x%-40,U|
000115b0  25 2d 36 29 3a e7 a4 46  28 5f 25 2c 55 25 2d 36  |%-6):..F(_%,U%-6|
000115c0  2c 78 25 2d 26 44 43 2c  2d 32 34 29 8c f2 63 79  |,x%-&DC,-24)..cy|
000115d0  28 6a 25 2c 64 25 2c 7a  25 2c 65 25 2c 2d 31 2c  |(j%,d%,z%,e%,-1,|
000115e0  5f 25 2c 55 25 2d 36 29  0d 3b c4 78 cc 3a f2 4c  |_%,U%-6).;.x.:.L|
000115f0  28 69 6c 25 2c c3 64 25  2c 31 2c 5f 25 2b 33 30  |(il%,.d%,1,_%+30|
00011600  2c 55 25 2d 36 29 3a f2  4c 28 70 5f 25 2c a4 74  |,U%-6):.L(p_%,.t|
00011610  28 6a 25 2c 2d 31 29 2c  2d 31 2c 5f 25 2b 34 30  |(j%,-1),-1,_%+40|
00011620  2c 55 25 2d 36 29 3a e7  a4 46 28 5f 25 2b 26 44  |,U%-6):..F(_%+&D|
00011630  43 2c 55 25 2d 36 2c 78  25 2d 26 44 43 2c 2d 32  |C,U%-6,x%-&DC,-2|
00011640  34 29 8c f2 63 79 28 6a  25 2c 64 25 2c 7a 25 2c  |4)..cy(j%,d%,z%,|
00011650  65 25 2c 31 2c 5f 25 2b  78 25 2c 55 25 2d 36 29  |e%,1,_%+x%,U%-6)|
00011660  0d 3b c5 de cd 3a 51 25  3d 34 30 3a 54 25 3d a4  |.;...:Q%=40:T%=.|
00011670  6e 28 64 25 2c 7a 25 29  3a 42 25 3d 2d 31 3a 41  |n(d%,z%):B%=-1:A|
00011680  25 3d 56 25 28 70 25 29  3a 43 25 3d 41 25 2d 54  |%=V%(p%):C%=A%-T|
00011690  25 3a c8 95 41 25 3e 30  80 54 25 3e 30 3a 42 25  |%:..A%>0.T%>0:B%|
000116a0  3d a4 6b 28 64 25 2c 7a  25 2c 42 25 29 3a 54 25  |=.k(d%,z%,B%):T%|
000116b0  2d 3d 31 3a 41 25 2d 3d  31 3a ce 3a c8 95 54 25  |-=1:A%-=1:.:..T%|
000116c0  3c 3e 30 80 51 25 2b 51  79 25 2d 35 3c 3d 2d 6e  |<>0.Q%+Qy%-5<=-n|
000116d0  25 3a 42 25 3d a4 6b 28  64 25 2c 7a 25 2c 42 25  |%:B%=.k(d%,z%,B%|
000116e0  29 3a 54 25 2d 3d 31 3a  f2 63 28 70 5f 25 2c a4  |):T%-=1:.c(p_%,.|
000116f0  53 79 28 42 25 2c 65 25  29 2c 5f 25 2b 33 30 2c  |Sy(B%,e%),_%+30,|
00011700  55 25 2d 51 25 2d 32 30  2c 75 25 2d 35 30 2c 51  |U%-Q%-20,u%-50,Q|
00011710  79 25 29 3a 51 25 2b 3d  51 79 25 3a ce 3a 42 25  |y%):Q%+=Qy%:.:B%|
00011720  3d 67 4a 25 3a 54 25 3d  a4 53 28 30 2c 30 2c 64  |=gJ%:T%=.S(0,0,d|
00011730  25 2c 7a 25 2c 65 25 29  3a 41 25 3d 43 25 0d 3b  |%,z%,e%):A%=C%.;|
00011740  c6 37 c8 95 41 25 3e 30  3a 42 25 3d a4 61 28 42  |.7..A%>0:B%=.a(B|
00011750  25 2c 54 25 29 3a 42 25  3d 42 25 21 34 3a 41 25  |%,T%):B%=B%!4:A%|
00011760  2d 3d 31 3a ce 3a e7 51  25 2b 51 79 25 2d 35 3c  |-=1:.:.Q%+Qy%-5<|
00011770  3d 2d 6e 25 8c 0d 3b c7  53 f5 3a 42 25 3d a4 61  |=-n%..;.S.:B%=.a|
00011780  28 42 25 2c 54 25 29 3a  e7 42 25 3c 3e 2d 31 8c  |(B%,T%):.B%<>-1.|
00011790  f2 63 28 70 5f 25 2c a4  44 5f 28 42 25 29 2c 5f  |.c(p_%,.D_(B%),_|
000117a0  25 2b 33 30 2c 55 25 2d  51 25 2d 32 30 2c 75 25  |%+30,U%-Q%-20,u%|
000117b0  2d 35 30 2c 51 79 25 29  3a 51 25 2b 3d 51 79 25  |-50,Qy%):Q%+=Qy%|
000117c0  3a 42 25 3d 42 25 21 34  0d 3b c8 17 fd 42 25 3d  |:B%=B%!4.;...B%=|
000117d0  2d 31 84 51 25 2b 51 79  25 2d 35 3e 2d 6e 25 0d  |-1.Q%+Qy%-5>-n%.|
000117e0  3b c9 42 cd 3a e7 a4 61  28 42 25 2c 54 25 29 3c  |;.B.:..a(B%,T%)<|
000117f0  3e 2d 31 80 51 25 2b 51  79 25 2d 35 3e 2d 6e 25  |>-1.Q%+Qy%-5>-n%|
00011800  8c ec 5f 25 2c 55 25 2b  6e 25 2b 32 34 3a ec 42  |.._%,U%+n%+24:.B|
00011810  59 32 30 2c 30 3a f0 38  31 2c 2d 26 41 2c 2d 32  |Y20,0:.81,-&A,-2|
00011820  30 0d 3b ca 2a e7 56 25  28 70 25 29 3e 30 8c ec  |0.;.*.V%(p%)>0..|
00011830  5f 25 2c 55 25 2d 36 30  3a ec 42 59 32 30 2c 30  |_%,U%-60:.BY20,0|
00011840  3a f0 38 31 2c 2d 26 41  2c 32 30 0d 3b cb 07 cd  |:.81,-&A,20.;...|
00011850  3a e1 0d 3b cc ef dd f2  4f 4a 3a ea 41 25 2c 46  |:..;....OJ:.A%,F|
00011860  25 2c 50 25 2c 42 25 2c  41 24 2c 43 25 2c 4c 25  |%,P%,B%,A$,C%,L%|
00011870  3a 41 25 3d 31 3a f5 c8  99 26 36 31 35 30 32 2c  |:A%=1:...&61502,|
00011880  43 5f 25 2c 22 53 70 65  63 22 2b c3 41 25 2c 30  |C_%,"Spec"+.A%,0|
00011890  b8 2c 2c 50 25 3b 46 25  3a 41 25 2b 3d 31 3a fd  |.,,P%;F%:A%+=1:.|
000118a0  46 25 80 31 3a 52 69 25  3d 41 25 2d 33 3a de 4a  |F%.1:Ri%=A%-3:.J|
000118b0  25 28 41 25 2d 33 2c 34  29 3a 42 25 3d 30 3a c8  |%(A%-3,4):B%=0:.|
000118c0  95 42 25 3c 3d 52 69 25  3a c8 99 26 34 31 35 30  |.B%<=Ri%:..&4150|
000118d0  32 2c 43 5f 25 2c 22 53  70 65 63 22 2b c3 28 42  |2,C_%,"Spec"+.(B|
000118e0  25 2b 31 29 2c 30 b8 2c  2c 50 25 2c 4c 25 3b 46  |%+1),0.,,P%,L%;F|
000118f0  25 3a 50 25 3f 4c 25 3d  26 44 3a e3 43 25 3d 31  |%:P%?L%=&D:.C%=1|
00011900  b8 34 3a 4a 25 28 42 25  2c 43 25 29 3d bb 28 24  |.4:J%(B%,C%)=.($|
00011910  50 25 29 3a c8 95 3f 50  25 3c 3e 34 34 3a 50 25  |P%):..?P%<>44:P%|
00011920  2b 3d 31 3a ce 3a 50 25  2b 3d 31 3a ed 3a 4a 25  |+=1:.:P%+=1:.:J%|
00011930  28 42 25 2c 30 29 3d 50  25 3a 42 25 2b 3d 31 3a  |(B%,0)=P%:B%+=1:|
00011940  ce 0d 3b cd d0 41 25 3d  31 3a f5 c8 99 26 36 31  |..;..A%=1:...&61|
00011950  35 30 32 2c 43 5f 25 2c  22 45 61 73 74 65 72 22  |502,C_%,"Easter"|
00011960  2b c3 41 25 2c 30 b8 2c  2c 50 25 3b 46 25 3a 41  |+.A%,0.,,P%;F%:A|
00011970  25 2b 3d 31 3a fd 46 25  80 31 3a 51 61 25 3d 41  |%+=1:.F%.1:Qa%=A|
00011980  25 2d 33 3a de 52 25 28  41 25 2d 33 2c 31 29 3a  |%-3:.R%(A%-3,1):|
00011990  42 25 3d 30 3a c8 95 42  25 3c 3d 41 25 2d 33 3a  |B%=0:..B%<=A%-3:|
000119a0  c8 99 26 34 31 35 30 32  2c 43 5f 25 2c 22 45 61  |..&41502,C_%,"Ea|
000119b0  73 74 65 72 22 2b c3 28  42 25 2b 31 29 2c 30 b8  |ster"+.(B%+1),0.|
000119c0  2c 2c 50 25 2c 4c 25 3b  46 25 3a 50 25 3f 4c 25  |,,P%,L%;F%:P%?L%|
000119d0  3d 26 44 3a 52 25 28 42  25 2c 31 29 3d bb 28 24  |=&D:R%(B%,1)=.($|
000119e0  50 25 29 3a c8 95 3f 50  25 3c 3e 34 34 3a 50 25  |P%):..?P%<>44:P%|
000119f0  2b 3d 31 3a ce 3a 50 25  2b 3d 31 3a 52 25 28 42  |+=1:.:P%+=1:R%(B|
00011a00  25 2c 30 29 3d 50 25 3a  42 25 2b 3d 31 3a ce 3a  |%,0)=P%:B%+=1:.:|
00011a10  e1 0d 3b ce 4b dd f2 63  79 28 72 61 25 2c 63 25  |..;.K..cy(ra%,c%|
00011a20  2c 72 25 2c 65 25 2c 7a  75 25 2c 61 25 2c 51 25  |,r%,e%,zu%,a%,Q%|
00011a30  29 3a ea 41 24 2c 55 4a  25 2c 4b 4a 25 2c 57 79  |):.A$,UJ%,KJ%,Wy|
00011a40  25 2c 41 25 3a e3 41 25  3d 30 b8 52 69 25 3a e7  |%,A%:.A%=0.Ri%:.|
00011a50  4a 25 28 41 25 2c 31 29  3d 72 25 8c 0d 3b cf 4b  |J%(A%,1)=r%..;.K|
00011a60  e7 28 4a 25 28 41 25 2c  32 29 3d 2d 31 84 4a 25  |.(J%(A%,2)=-1.J%|
00011a70  28 41 25 2c 32 29 3d 72  61 25 29 80 63 25 3e 3d  |(A%,2)=ra%).c%>=|
00011a80  4a 25 28 41 25 2c 33 29  80 63 25 3c 3d 4a 25 28  |J%(A%,3).c%<=J%(|
00011a90  41 25 2c 34 29 8c 41 24  2b 3d 24 4a 25 28 41 25  |A%,4).A$+=$J%(A%|
00011aa0  2c 30 29 2b 22 2f 22 0d  3b d0 7a cd 3a ed 3a f2  |,0)+"/".;.z.:.:.|
00011ab0  63 4a 28 55 4a 25 2c 4b  4a 25 2c 65 25 29 3a 41  |cJ(UJ%,KJ%,e%):A|
00011ac0  25 3d 30 3a 57 79 25 3d  30 3a c8 95 41 25 3c 3d  |%=0:Wy%=0:..A%<=|
00011ad0  51 61 25 3a f2 50 28 55  4a 25 2c 4b 4a 25 2c 65  |Qa%:.P(UJ%,KJ%,e|
00011ae0  25 2c 52 25 28 41 25 2c  31 29 2d 57 79 25 2c 30  |%,R%(A%,1)-Wy%,0|
00011af0  2c 30 29 3a 57 79 25 3d  52 25 28 41 25 2c 31 29  |,0):Wy%=R%(A%,1)|
00011b00  3a e7 55 4a 25 3d 63 25  80 4b 4a 25 3d 72 25 8c  |:.UJ%=c%.KJ%=r%.|
00011b10  41 24 2b 3d 24 52 25 28  41 25 2c 30 29 2b 22 2f  |A$+=$R%(A%,0)+"/|
00011b20  22 0d 3b d1 48 41 25 2b  3d 31 3a ce 3a e7 a7 c0  |".;.HA%+=1:.:...|
00011b30  41 24 29 2c 22 2f 22 29  8c c8 99 26 34 30 30 38  |A$),"/")...&4008|
00011b40  31 2c 2c 22 54 72 69 6e  69 74 79 2e 4d 65 64 69  |1,,"Trinity.Medi|
00011b50  75 6d 22 2c 37 2a 31 36  2c 37 2a 31 36 b8 57 79  |um",7*16,7*16.Wy|
00011b60  25 8b 57 79 25 3d 62 69  25 0d 3b d2 22 e7 41 24  |%.Wy%=bi%.;.".A$|
00011b70  3c 3e 22 22 8c f2 4c 28  57 79 25 2c c0 41 24 29  |<>""..L(Wy%,.A$)|
00011b80  2c 7a 75 25 2c 61 25 2c  51 25 29 0d 3b d3 1a e7  |,zu%,a%,Q%).;...|
00011b90  57 79 25 3c 3e 62 69 25  8c c8 99 26 34 30 30 38  |Wy%<>bi%...&4008|
00011ba0  32 2c 57 79 25 0d 3b d4  05 e1 0d 3b d5 4b dd a4  |2,Wy%.;....;.K..|
00011bb0  46 79 28 70 25 2c 61 25  2c 51 25 2c 67 25 2c 6e  |Fy(p%,a%,Q%,g%,n|
00011bc0  25 2c 5f 25 2c 55 25 29  3a ea 62 79 25 2c 51 79  |%,_%,U%):.by%,Qy|
00011bd0  25 2c 41 25 2c 42 25 2c  64 25 2c 7a 25 2c 65 25  |%,A%,B%,d%,z%,e%|
00011be0  2c 54 25 2c 46 25 2c 52  25 3a 51 79 25 3d 32 38  |,T%,F%,R%:Qy%=28|
00011bf0  3a c8 8e b9 ca 0d 3b d6  73 c9 61 25 3e 3d 33 30  |:.....;.s.a%>=30|
00011c00  80 61 25 3c 3d 75 25 2d  32 30 80 51 25 3e 3d 34  |.a%<=u%-20.Q%>=4|
00011c10  30 3a f2 47 28 76 25 2c  41 25 2c 42 25 2c 64 25  |0:.G(v%,A%,B%,d%|
00011c20  2c 7a 25 2c 65 25 29 3a  f2 50 28 64 25 2c 7a 25  |,z%,e%):.P(d%,z%|
00011c30  2c 65 25 2c 70 25 2d 31  2c 30 2c 30 29 3a 62 79  |,e%,p%-1,0,0):by|
00011c40  25 3d 28 28 28 51 25 2d  34 30 2b 51 79 25 29 81  |%=(((Q%-40+Qy%).|
00011c50  51 79 25 29 29 3a e7 62  79 25 3e 30 8c 62 79 25  |Qy%)):.by%>0.by%|
00011c60  2b 3d 56 25 28 70 25 29  0d 3b d7 38 e7 62 79 25  |+=V%(p%).;.8.by%|
00011c70  3e 30 80 62 79 25 3c 3d  a4 6e 28 64 25 2c 7a 25  |>0.by%<=.n(d%,z%|
00011c80  29 80 67 25 3c 3e 32 8c  f2 78 5f 28 64 25 2c 7a  |).g%<>2..x_(d%,z|
00011c90  25 2c 62 79 25 2c 67 25  29 3a 62 79 25 3d 2d 31  |%,by%,g%):by%=-1|
00011ca0  0d 3b d8 19 e7 62 79 25  3e 30 8c 62 79 25 2d 3d  |.;...by%>0.by%-=|
00011cb0  a4 6e 28 64 25 2c 7a 25  29 0d 3b d9 0b e7 62 79  |.n(d%,z%).;...by|
00011cc0  25 3e 30 8c 0d 3b da 60  54 25 3d a4 53 28 30 2c  |%>0..;.`T%=.S(0,|
00011cd0  30 2c 64 25 2c 7a 25 2c  65 25 29 3a 42 25 3d 67  |0,d%,z%,e%):B%=g|
00011ce0  4a 25 3a 42 25 3d a4 61  28 42 25 2c 54 25 29 3a  |J%:B%=.a(B%,T%):|
00011cf0  c8 95 62 79 25 3e 31 80  42 25 3c 3e 2d 31 3a 42  |..by%>1.B%<>-1:B|
00011d00  25 3d 42 25 21 34 3a 42  25 3d a4 61 28 42 25 2c  |%=B%!4:B%=.a(B%,|
00011d10  54 25 29 3a 62 79 25 2d  3d 31 3a ce 3a e7 42 25  |T%):by%-=1:.:.B%|
00011d20  3d 2d 31 8c 0d 3b db 1d  e7 67 25 3c 3e 32 8c f2  |=-1..;...g%<>2..|
00011d30  73 28 64 25 2c 7a 25 2c  65 25 29 3a 56 4a 25 3d  |s(d%,z%,e%):VJ%=|
00011d40  b9 0d 3b dc 0b cc 3a c8  8e 67 25 ca 0d 3b dd 14  |..;...:..g%..;..|
00011d50  c9 34 3a f2 57 79 28 42  25 29 3a 56 4a 25 3d b9  |.4:.Wy(B%):VJ%=.|
00011d60  0d 3b de 0c c9 32 3a 52  25 3d 42 25 0d 3b df 14  |.;...2:R%=B%.;..|
00011d70  c9 31 3a f2 49 5f 28 42  25 29 3a 56 4a 25 3d b9  |.1:.I_(B%):VJ%=.|
00011d80  0d 3b e0 05 cb 0d 3b e1  05 cd 0d 3b e2 13 cc 3a  |.;....;....;...:|
00011d90  e7 67 25 3c 3e 32 80 62  79 25 3d 30 8c 0d 3b e3  |.g%<>2.by%=0..;.|
00011da0  42 f2 47 28 76 25 2c 41  25 2c 42 25 2c 64 25 2c  |B.G(v%,A%,B%,d%,|
00011db0  7a 25 2c 65 25 29 3a f2  50 28 64 25 2c 7a 25 2c  |z%,e%):.P(d%,z%,|
00011dc0  65 25 2c 70 25 2d 31 2c  30 2c 30 29 3a f2 73 28  |e%,p%-1,0,0):.s(|
00011dd0  64 25 2c 7a 25 2c 65 25  29 3a 56 4a 25 3d b9 0d  |d%,z%,e%):VJ%=..|
00011de0  3b e4 05 cd 0d 3b e5 05  cd 0d 3b e6 09 c9 67 25  |;....;....;...g%|
00011df0  3d 32 0d 3b e7 e3 c9 61  25 3c 3d 32 30 80 51 25  |=2.;...a%<=20.Q%|
00011e00  3e 3d 6e 25 2d 32 30 3a  f2 47 28 76 25 2c 41 25  |>=n%-20:.G(v%,A%|
00011e10  2c 42 25 2c 64 25 2c 7a  25 2c 65 25 29 3a f2 50  |,B%,d%,z%,e%):.P|
00011e20  28 64 25 2c 7a 25 2c 65  25 2c 70 25 2d 31 2c 30  |(d%,z%,e%,p%-1,0|
00011e30  2c 30 29 3a 54 25 3d a4  53 28 30 2c 30 2c 64 25  |,0):T%=.S(0,0,d%|
00011e40  2c 7a 25 2c 65 25 29 3a  62 79 25 3d 2d 28 28 6e  |,z%,e%):by%=-((n|
00011e50  25 2d 34 30 29 81 51 79  25 29 3a 42 25 3d a4 61  |%-40).Qy%):B%=.a|
00011e60  28 67 4a 25 2c 54 25 29  3a c8 95 42 25 3c 3e 2d  |(gJ%,T%):..B%<>-|
00011e70  31 3a 42 25 3d 42 25 21  34 3a 42 25 3d a4 61 28  |1:B%=B%!4:B%=.a(|
00011e80  42 25 2c 54 25 29 3a 62  79 25 2b 3d 31 3a ce 3a  |B%,T%):by%+=1:.:|
00011e90  62 79 25 2b 3d a4 6e 28  64 25 2c 7a 25 29 3a e7  |by%+=.n(d%,z%):.|
00011ea0  56 25 28 70 25 29 3c 62  79 25 8c 56 25 28 70 25  |V%(p%)<by%.V%(p%|
00011eb0  29 2b 3d 31 3a f2 4e 28  69 25 2c 5f 25 2c 55 25  |)+=1:.N(i%,_%,U%|
00011ec0  2d 34 30 2c 5f 25 2b 75  25 2d 26 41 2c 55 25 2d  |-40,_%+u%-&A,U%-|
00011ed0  6e 25 2b 34 29 0d 3b e8  4e c9 61 25 3c 3d 32 30  |n%+4).;.N.a%<=20|
00011ee0  80 51 25 3c 3d 36 30 80  51 25 3e 3d 34 30 80 56  |.Q%<=60.Q%>=40.V|
00011ef0  25 28 70 25 29 3c 3e 30  3a 56 25 28 70 25 29 2d  |%(p%)<>0:V%(p%)-|
00011f00  3d 31 3a f2 4e 28 69 25  2c 5f 25 2c 55 25 2d 34  |=1:.N(i%,_%,U%-4|
00011f10  30 2c 5f 25 2b 75 25 2d  26 41 2c 55 25 2d 6e 25  |0,_%+u%-&A,U%-n%|
00011f20  2b 34 29 0d 3b e9 19 c9  61 25 3c 3d 32 30 80 51  |+4).;...a%<=20.Q|
00011f30  25 3c 3d 36 30 80 51 25  3e 3d 34 30 0d 3b ea 44  |%<=60.Q%>=40.;.D|
00011f40  7f 3a f2 47 28 76 25 2c  41 25 2c 42 25 2c 64 25  |.:.G(v%,A%,B%,d%|
00011f50  2c 7a 25 2c 65 25 29 3a  f2 50 28 64 25 2c 7a 25  |,z%,e%):.P(d%,z%|
00011f60  2c 65 25 2c 70 25 2d 31  2c 30 2c 30 29 3a f2 73  |,e%,p%-1,0,0):.s|
00011f70  28 64 25 2c 7a 25 2c 65  25 29 3a 56 4a 25 3d b9  |(d%,z%,e%):VJ%=.|
00011f80  0d 3b eb 09 cb 3a 3d 52  25 0d 3b ec 4a dd a4 61  |.;...:=R%.;.J..a|
00011f90  28 42 25 2c 54 25 29 3a  ea 41 25 3a 41 25 3d 2d  |(B%,T%):.A%:A%=-|
00011fa0  31 3a c8 95 42 25 3c 3e  2d 31 80 41 25 3d 2d 31  |1:..B%<>-1.A%=-1|
00011fb0  3a 41 25 3d a4 42 28 a4  78 28 42 25 21 26 43 29  |:A%=.B(.x(B%!&C)|
00011fc0  2c 54 25 29 3a e7 41 25  3d 2d 31 8c 42 25 3d 42  |,T%):.A%=-1.B%=B|
00011fd0  25 21 34 0d 3b ed 17 ce  3a e7 41 25 3d 30 8c 41  |%!4.;...:.A%=0.A|
00011fe0  25 3d 42 25 8b 41 25 3d  2d 31 0d 3b ee 07 3d 41  |%=B%.A%=-1.;..=A|
00011ff0  25 0d 3b ef 92 dd a4 44  5f 28 42 25 29 3a ea 41  |%.;....D_(B%):.A|
00012000  24 2c 41 25 2c 43 25 2c  5a 24 2c 54 25 3a 43 25  |$,A%,C%,Z$,T%:C%|
00012010  3d 28 42 25 21 31 36 3e  3e 34 29 80 26 46 3a 54  |=(B%!16>>4).&F:T|
00012020  25 3d 42 25 21 31 36 80  28 31 3c 3c 32 31 29 3a  |%=B%!16.(1<<21):|
00012030  43 25 2d 3d 6e 5f 25 2a  28 43 25 3d 30 29 3a f2  |C%-=n_%*(C%=0):.|
00012040  56 28 30 2c 43 25 29 3a  e7 28 28 42 25 21 31 36  |V(0,C%):.((B%!16|
00012050  3e 3e 31 29 80 31 29 3d  31 8c 5a 24 3d a4 70 79  |>>1).1)=1.Z$=.py|
00012060  28 a4 53 5f 28 42 25 21  26 43 29 2c a4 74 79 28  |(.S_(B%!&C),.ty(|
00012070  42 25 21 26 43 29 2c 2d  31 2c 4f 75 25 29 2b 22  |B%!&C),-1,Ou%)+"|
00012080  20 20 22 0d 3b f0 42 42  25 2b 3d 32 30 3a e3 41  |  ".;.BB%+=20:.A|
00012090  25 3d 31 b8 33 3a c8 95  3f 42 25 3c 3e 26 42 3a  |%=1.3:..?B%<>&B:|
000120a0  41 24 2b 3d bd 3f 42 25  3a 42 25 2b 3d 31 3a ce  |A$+=.?B%:B%+=1:.|
000120b0  3a e7 41 25 3c 3e 33 8c  41 24 2b 3d 22 20 22 3a  |:.A%<>3.A$+=" ":|
000120c0  42 25 2b 3d 31 0d 3b f1  2b ed 3a e7 54 25 3e 30  |B%+=1.;.+.:.T%>0|
000120d0  80 c0 41 24 2c 31 29 3d  22 3d 22 8c 41 24 3d c1  |..A$,1)="=".A$=.|
000120e0  41 24 2c 32 2c a7 41 24  2c 22 2a 22 29 2d 32 29  |A$,2,.A$,"*")-2)|
000120f0  0d 3b f2 0a 3d 5a 24 2b  41 24 0d 3b f3 a1 dd f2  |.;..=Z$+A$.;....|
00012100  75 5f 28 53 24 29 3a ea  41 24 2c 42 61 25 2c 65  |u_(S$):.A$,Ba%,e|
00012110  3a f2 5a 28 66 25 2c 33  39 2c 31 29 3a 41 24 3d  |:.Z(f%,39,1):A$=|
00012120  a4 4d 28 66 25 2c 31 36  29 3a 42 61 25 3d a9 41  |.M(f%,16):Ba%=.A|
00012130  24 3a f2 41 28 66 25 2c  31 36 2c 41 24 2b 53 24  |$:.A(f%,16,A$+S$|
00012140  29 3a 66 6c 25 3d a9 a4  4d 28 66 25 2c 31 36 29  |):fl%=..M(f%,16)|
00012150  3a 53 24 3d c1 53 24 2c  66 6c 25 2d 42 61 25 2b  |:S$=.S$,fl%-Ba%+|
00012160  31 29 3a f2 41 28 66 25  2c 31 37 2c 53 24 29 3a  |1):.A(f%,17,S$):|
00012170  66 6c 25 3d a9 a4 4d 28  66 25 2c 31 36 29 3a 53  |fl%=..M(f%,16):S|
00012180  24 3d c1 53 24 2c 66 6c  25 2b 31 29 3a f2 41 28  |$=.S$,fl%+1):.A(|
00012190  66 25 2c 31 38 2c 53 24  29 3a e1 0d 3b f4 f8 dd  |f%,18,S$):..;...|
000121a0  f2 73 28 63 25 2c 72 25  2c 51 25 29 3a ea 41 25  |.s(c%,r%,Q%):.A%|
000121b0  2c 6e 25 2c 49 6c 25 3a  e3 41 25 3d 31 36 b8 31  |,n%,Il%:.A%=16.1|
000121c0  38 3a f2 41 28 66 25 2c  41 25 2c 22 22 29 3a f2  |8:.A(f%,A%,""):.|
000121d0  44 28 66 25 2c 41 25 2c  6e 5f 25 29 3a ed 3a f2  |D(f%,A%,n_%):.:.|
000121e0  5a 28 66 25 2c 32 34 2c  30 29 3a 6e 4a 25 3d 30  |Z(f%,24,0):nJ%=0|
000121f0  3a 7a 24 3d 22 22 3a f2  5a 28 66 25 2c 32 31 2c  |:z$="":.Z(f%,21,|
00012200  94 28 28 52 5f 25 80 34  29 3e 30 29 29 3a f2 5a  |.((R_%.4)>0)):.Z|
00012210  28 66 25 2c 32 33 2c 94  28 28 52 5f 25 80 32 29  |(f%,23,.((R_%.2)|
00012220  3e 30 29 29 3a f2 5a 28  66 25 2c 33 38 2c 94 28  |>0)):.Z(f%,38,.(|
00012230  28 52 5f 25 80 31 29 3e  30 29 29 3a f2 4d 28 66  |(R_%.1)>0)):.M(f|
00012240  25 2c 32 31 2c 94 28 28  52 5f 25 80 31 29 3e 30  |%,21,.((R_%.1)>0|
00012250  29 29 3a f2 5a 28 66 25  2c 33 39 2c 30 29 3a f2  |)):.Z(f%,39,0):.|
00012260  4d 28 66 25 2c 33 38 2c  30 29 3a f2 4a 79 28 32  |M(f%,38,0):.Jy(2|
00012270  36 29 3a f2 41 28 66 25  2c 32 37 2c 22 31 22 29  |6):.A(f%,27,"1")|
00012280  3a f2 41 28 66 25 2c 33  30 2c a4 41 28 22 45 31  |:.A(f%,30,.A("E1|
00012290  22 29 29 0d 3b f5 ef 6e  75 25 3d 31 3a 63 75 25  |")).;..nu%=1:cu%|
000122a0  3d 31 3a 6a 75 25 3d 31  3a 6d 75 25 3d 31 3a f2  |=1:ju%=1:mu%=1:.|
000122b0  4d 28 66 25 2c 33 37 2c  31 29 3a f2 41 28 66 25  |M(f%,37,1):.A(f%|
000122c0  2c 33 33 2c a4 41 28 22  4f 54 31 22 29 29 3a f2  |,33,.A("OT1")):.|
000122d0  41 28 66 25 2c 33 34 2c  a4 41 28 22 44 61 79 31  |A(f%,34,.A("Day1|
000122e0  22 29 29 3a f2 41 28 66  25 2c 33 35 2c a4 41 28  |")):.A(f%,35,.A(|
000122f0  22 4f 45 31 22 29 29 3a  f2 41 28 66 25 2c 31 2c  |"OE1")):.A(f%,1,|
00012300  a4 55 28 63 25 2c 72 25  2c 51 25 2c 2d 31 29 29  |.U(c%,r%,Q%,-1))|
00012310  3a 51 5f 25 3d 63 25 3a  4e 5f 25 3d 72 25 3a 41  |:Q_%=c%:N_%=r%:A|
00012320  4a 25 3d 51 25 3a 6e 25  3d a4 63 3a 72 25 3d a4  |J%=Q%:n%=.c:r%=.|
00012330  69 3a f2 66 28 66 25 2c  4b 6c 25 2c a4 41 28 22  |i:.f(f%,Kl%,.A("|
00012340  61 6c 73 65 74 22 29 2c  2d 31 29 3a f2 41 28 66  |alset"),-1):.A(f|
00012350  25 2c 33 2c c3 6e 25 29  3a f2 41 28 66 25 2c 35  |%,3,.n%):.A(f%,5|
00012360  2c 22 30 30 22 29 3a f2  4f 28 30 2c 30 29 3a f2  |,"00"):.O(0,0):.|
00012370  54 79 28 b9 2c b9 29 3a  f2 43 28 66 25 2c 33 29  |Ty(.,.):.C(f%,3)|
00012380  3a e1 0d 3b f6 42 dd f2  49 5f 28 42 25 29 3a f2  |:..;.B..I_(B%):.|
00012390  57 79 28 42 25 29 3a 4f  5f 25 3d 2d 31 3a f2 4d  |Wy(B%):O_%=-1:.M|
000123a0  28 66 25 2c 33 37 2c 31  29 3a f2 66 28 66 25 2c  |(f%,37,1):.f(f%,|
000123b0  4b 6c 25 2c a4 41 28 22  61 6c 73 65 74 22 29 2c  |Kl%,.A("alset"),|
000123c0  30 29 3a e1 0d 3b f7 78  dd f2 57 79 28 42 25 29  |0):..;.x..Wy(B%)|
000123d0  3a ea 64 25 2c 7a 25 2c  65 25 2c 6e 25 2c 72 25  |:.d%,z%,e%,n%,r%|
000123e0  2c 41 24 2c 75 69 25 2c  52 25 3a f2 47 28 42 25  |,A$,ui%,R%:.G(B%|
000123f0  21 26 43 2c 72 25 2c 6e  25 2c 64 25 2c 7a 25 2c  |!&C,r%,n%,d%,z%,|
00012400  65 25 29 3a 4f 5f 25 3d  42 25 3a f2 5a 28 66 25  |e%):O_%=B%:.Z(f%|
00012410  2c 33 38 2c 28 28 42 25  21 31 36 3e 3e 32 30 29  |,38,((B%!16>>20)|
00012420  80 31 29 29 3a 41 24 3d  c3 72 25 3a e7 72 25 3c  |.1)):A$=.r%:.r%<|
00012430  26 41 8c 41 24 3d 22 30  22 2b 41 24 0d 3b f8 86  |&A.A$="0"+A$.;..|
00012440  f2 4d 28 66 25 2c 32 31  2c 94 28 28 28 28 42 25  |.M(f%,21,.((((B%|
00012450  21 31 36 3e 3e 32 30 29  80 31 29 3e 30 29 84 28  |!16>>20).1)>0).(|
00012460  28 42 25 21 31 36 80 28  31 3c 3c 32 31 29 29 3e  |(B%!16.(1<<21))>|
00012470  31 29 29 29 3a f2 4d 28  66 25 2c 33 38 2c 94 28  |1))):.M(f%,38,.(|
00012480  28 42 25 21 31 36 80 28  31 3c 3c 32 31 29 29 3e  |(B%!16.(1<<21))>|
00012490  31 29 29 3a f2 41 28 66  25 2c 35 2c 41 24 29 3a  |1)):.A(f%,5,A$):|
000124a0  6e 4a 25 3d 28 28 42 25  21 31 36 29 3e 3e 34 29  |nJ%=((B%!16)>>4)|
000124b0  80 26 46 3a e7 6e 4a 25  3d 30 8c 6e 4a 25 3d 6e  |.&F:.nJ%=0.nJ%=n|
000124c0  5f 25 0d 3b f9 f5 e3 41  25 3d 31 36 b8 31 38 3a  |_%.;...A%=16.18:|
000124d0  f2 44 28 66 25 2c 41 25  2c 6e 4a 25 29 3a ed 3a  |.D(f%,A%,nJ%):.:|
000124e0  f2 4d 28 66 25 2c 33 37  2c 30 29 3a f2 41 28 66  |.M(f%,37,0):.A(f|
000124f0  25 2c 33 2c c3 6e 25 29  3a f2 66 28 66 25 2c 4b  |%,3,.n%):.f(f%,K|
00012500  6c 25 2c a4 41 28 22 61  6c 65 64 69 74 22 29 2c  |l%,.A("aledit"),|
00012510  2d 31 29 3a f2 41 28 66  25 2c 31 2c a4 55 28 64  |-1):.A(f%,1,.U(d|
00012520  25 2c 7a 25 2c 65 25 2c  2d 31 29 29 3a 51 5f 25  |%,z%,e%,-1)):Q_%|
00012530  3d 64 25 3a 4e 5f 25 3d  7a 25 3a 41 4a 25 3d 65  |=d%:N_%=z%:AJ%=e|
00012540  25 3a f2 5a 28 66 25 2c  32 31 2c 94 28 28 28 42  |%:.Z(f%,21,.(((B|
00012550  25 21 31 36 29 80 31 29  3d 31 29 29 3a f2 5a 28  |%!16).1)=1)):.Z(|
00012560  66 25 2c 32 33 2c 94 28  28 28 42 25 21 31 36 29  |f%,23,.(((B%!16)|
00012570  80 32 29 3d 32 29 29 3a  f2 5a 28 66 25 2c 33 39  |.2)=2)):.Z(f%,39|
00012580  2c 94 28 28 42 25 21 31  36 80 28 31 3c 3c 32 31  |,.((B%!16.(1<<21|
00012590  29 29 3e 31 29 29 3a f2  41 28 66 25 2c 32 37 2c  |))>1)):.A(f%,27,|
000125a0  22 31 22 29 3a f2 41 28  66 25 2c 33 30 2c a4 41  |"1"):.A(f%,30,.A|
000125b0  28 22 45 31 22 29 29 0d  3b fa 70 6e 75 25 3d 31  |("E1")).;.pnu%=1|
000125c0  3a 63 75 25 3d 31 3a 6a  75 25 3d 31 3a 6d 75 25  |:cu%=1:ju%=1:mu%|
000125d0  3d 31 3a f2 4a 79 28 32  36 29 3a f2 41 28 66 25  |=1:.Jy(26):.A(f%|
000125e0  2c 33 33 2c a4 41 28 22  4f 54 31 22 29 29 3a f2  |,33,.A("OT1")):.|
000125f0  41 28 66 25 2c 33 34 2c  a4 41 28 22 44 61 79 31  |A(f%,34,.A("Day1|
00012600  22 29 29 3a f2 41 28 66  25 2c 33 35 2c a4 41 28  |")):.A(f%,35,.A(|
00012610  22 4f 45 31 22 29 29 3a  e7 28 28 42 25 21 31 36  |"OE1")):.((B%!16|
00012620  29 80 34 29 3d 34 8c 0d  3b fb 25 75 69 25 3d b9  |).4)=4..;.%ui%=.|
00012630  3a f2 5a 28 66 25 2c 32  34 2c 31 29 3a e7 28 28  |:.Z(f%,24,1):.((|
00012640  42 25 21 31 36 29 80 38  29 3d 38 8c 0d 3b fc 52  |B%!16).8)=8..;.R|
00012650  52 25 3d 28 28 42 25 21  31 36 29 3e 3e 38 29 80  |R%=((B%!16)>>8).|
00012660  26 46 46 3a f2 41 28 66  25 2c 32 37 2c c3 52 25  |&FF:.A(f%,27,.R%|
00012670  29 3a 6e 75 25 3d 28 28  42 25 21 31 36 29 3e 3e  |):nu%=((B%!16)>>|
00012680  31 36 29 80 26 46 3a f2  41 28 66 25 2c 33 30 2c  |16).&F:.A(f%,30,|
00012690  a4 4a 28 61 4a 25 2c 6e  75 25 2d 31 29 29 0d 3b  |.J(aJ%,nu%-1)).;|
000126a0  fd 93 cc 3a f2 4a 79 28  33 31 29 3a 63 75 25 3d  |...:.Jy(31):cu%=|
000126b0  28 28 42 25 21 31 36 29  3e 3e 38 29 80 26 46 3a  |((B%!16)>>8).&F:|
000126c0  f2 41 28 66 25 2c 33 33  2c a4 4a 28 79 6c 25 2c  |.A(f%,33,.J(yl%,|
000126d0  63 75 25 2d 31 29 29 3a  6a 75 25 3d 28 28 42 25  |cu%-1)):ju%=((B%|
000126e0  21 31 36 29 3e 3e 26 43  29 80 26 46 3a f2 41 28  |!16)>>&C).&F:.A(|
000126f0  66 25 2c 33 34 2c a4 4a  28 62 6c 25 2c 6a 75 25  |f%,34,.J(bl%,ju%|
00012700  2d 31 29 29 3a 6d 75 25  3d 28 28 42 25 21 31 36  |-1)):mu%=((B%!16|
00012710  29 3e 3e 31 36 29 80 26  46 3a f2 41 28 66 25 2c  |)>>16).&F:.A(f%,|
00012720  33 35 2c a4 4a 28 72 6c  25 2c 6d 75 25 2d 31 29  |35,.J(rl%,mu%-1)|
00012730  29 0d 3b fe 05 cd 0d 3b  ff 10 cc f2 5a 28 66 25  |).;....;....Z(f%|
00012740  2c 32 34 2c 30 29 0d 3c  00 70 cd 3a 7a 24 3d 22  |,24,0).<.p.:z$="|
00012750  22 3a 42 25 2b 3d 32 30  3a e3 41 25 3d 31 36 b8  |":B%+=20:.A%=16.|
00012760  31 38 3a 41 24 3d 22 22  3a c8 95 3f 42 25 3c 3e  |18:A$="":..?B%<>|
00012770  26 42 3a 41 24 2b 3d bd  3f 42 25 3a 42 25 2b 3d  |&B:A$+=.?B%:B%+=|
00012780  31 3a ce 3a 42 25 2b 3d  31 3a f2 41 28 66 25 2c  |1:.:B%+=1:.A(f%,|
00012790  41 25 2c 41 24 29 3a 7a  24 2b 3d 41 24 3a ed 3a  |A%,A$):z$+=A$:.:|
000127a0  f2 54 79 28 ac 75 69 25  2c b9 29 3a f2 43 28 66  |.Ty(.ui%,.):.C(f|
000127b0  25 2c 33 29 3a e1 0d 3c  01 66 dd f2 54 79 28 73  |%,3):..<.f..Ty(s|
000127c0  61 25 2c 64 4a 25 29 3a  21 4a 25 3d 66 25 3a c8  |a%,dJ%):!J%=f%:.|
000127d0  99 26 34 30 30 43 42 2c  2c 4a 25 3a e7 64 4a 25  |.&400CB,,J%:.dJ%|
000127e0  8c 4a 25 21 32 38 3d 2d  31 3a 4a 25 21 34 3d a4  |.J%!28=-1:J%!4=.|
000127f0  67 2d 26 36 34 2d 28 4a  25 21 26 43 2d 4a 25 21  |g-&64-(J%!&C-J%!|
00012800  34 29 3a 4a 25 21 26 43  3d 4a 25 21 34 2b 26 33  |4):J%!&C=J%!4+&3|
00012810  45 38 3a 4a 25 21 31 36  3d 39 30 30 0d 3c 02 29  |E8:J%!16=900.<.)|
00012820  4a 25 21 38 3d 4a 25 21  31 36 20 2d 26 37 44 30  |J%!8=J%!16 -&7D0|
00012830  2a 94 ac 73 61 25 3a c8  99 26 34 30 30 43 35 2c  |*..sa%:..&400C5,|
00012840  2c 4a 25 3a e1 0d 3c 03  57 dd f2 68 4a 28 73 61  |,J%:..<.W..hJ(sa|
00012850  25 2c 64 4a 25 29 3a 21  4a 25 3d 52 79 25 3a c8  |%,dJ%):!J%=Ry%:.|
00012860  99 26 34 30 30 43 42 2c  2c 4a 25 3a e7 64 4a 25  |.&400CB,,J%:.dJ%|
00012870  8c 4a 25 21 32 38 3d 2d  31 3a 4a 25 21 34 3d 26  |.J%!28=-1:J%!4=&|
00012880  36 34 3a 4a 25 21 26 43  3d 4a 25 21 34 2b 26 33  |64:J%!&C=J%!4+&3|
00012890  45 38 3a 4a 25 21 31 36  3d 39 30 30 0d 3c 04 29  |E8:J%!16=900.<.)|
000128a0  4a 25 21 38 3d 4a 25 21  31 36 20 2d 26 37 44 30  |J%!8=J%!16 -&7D0|
000128b0  2a 94 ac 73 61 25 3a c8  99 26 34 30 30 43 35 2c  |*..sa%:..&400C5,|
000128c0  2c 4a 25 3a e1 0d 3c 05  6b dd f2 4a 79 28 73 25  |,J%:..<.k..Jy(s%|
000128d0  29 3a ea 41 25 3a f2 5a  28 66 25 2c 73 25 2c 31  |):.A%:.Z(f%,s%,1|
000128e0  29 3a f2 5a 28 66 25 2c  35 37 2d 73 25 2c 30 29  |):.Z(f%,57-s%,0)|
000128f0  3a e3 41 25 3d 32 37 b8  33 30 3a f2 4d 28 66 25  |:.A%=27.30:.M(f%|
00012900  2c 41 25 2c 2d 28 73 25  3d 33 31 29 29 3a ed 3a  |,A%,-(s%=31)):.:|
00012910  e3 41 25 3d 33 33 b8 33  35 3a f2 4d 28 66 25 2c  |.A%=33.35:.M(f%,|
00012920  41 25 2c 2d 28 73 25 3d  32 36 29 29 3a ed 3a e1  |A%,-(s%=26)):.:.|
00012930  0d 3c 06 43 dd a4 54 79  3a ea 54 25 2c 42 25 2c  |.<.C..Ty:.T%,B%,|
00012940  46 25 3a 54 25 3d a4 78  28 a4 59 29 3a 42 25 3d  |F%:T%=.x(.Y):B%=|
00012950  5a 5f 25 3a c8 95 42 25  3c 3e 2d 31 80 ac 46 25  |Z_%:..B%<>-1..F%|
00012960  3a e7 a4 78 28 42 25 21  26 43 29 3d 54 25 8c 46  |:..x(B%!&C)=T%.F|
00012970  25 3d b9 0d 3c 07 11 42  25 3d 42 25 21 34 3a ce  |%=..<..B%=B%!4:.|
00012980  3a 3d 46 25 0d 3c 08 4f  dd f2 78 79 3a ea 46 25  |:=F%.<.O..xy:.F%|
00012990  2c 63 25 2c 72 25 2c 51  25 2c 75 79 25 2c 48 75  |,c%,r%,Q%,uy%,Hu|
000129a0  25 2c 51 79 25 2c 42 25  2c 4d 6c 25 2c 66 4a 25  |%,Qy%,B%,Ml%,fJ%|
000129b0  2c 6f 79 25 3a f2 47 28  5f 4a 25 2c 46 25 2c 42  |,oy%:.G(_J%,F%,B|
000129c0  25 2c 4d 6c 25 2c 66 4a  25 2c 6f 79 25 29 3a c8  |%,Ml%,fJ%,oy%):.|
000129d0  8e b9 ca 0d 3c 09 1b c9  44 5f 25 3d 31 3a e7 44  |....<...D_%=1:.D|
000129e0  75 25 8c 46 25 3d a4 54  79 8b 46 25 3d b9 0d 3c  |u%.F%=.Ty.F%=..<|
000129f0  0a 43 c9 44 5f 25 3d 32  80 28 a4 4c 28 44 79 25  |.C.D_%=2.(.L(Dy%|
00012a00  2c 66 79 25 2c 4d 79 25  29 3e a4 4c 28 4d 6c 25  |,fy%,My%)>.L(Ml%|
00012a10  2c 66 4a 25 2c 6f 79 25  29 2d a4 48 28 4d 6c 25  |,fJ%,oy%)-.H(Ml%|
00012a20  2c 66 4a 25 2c 6f 79 25  29 2b 37 29 3a 46 25 3d  |,fJ%,oy%)+7):F%=|
00012a30  b9 0d 3c 0b 15 c9 44 5f  25 3d 33 80 44 79 25 3d  |..<...D_%=3.Dy%=|
00012a40  31 3a 46 25 3d b9 0d 3c  0c 09 7f 46 25 3d a3 0d  |1:F%=..<...F%=..|
00012a50  3c 0d 0f cb 3a e7 46 25  80 ac 49 79 25 8c 0d 3c  |<...:.F%..Iy%..<|
00012a60  0e 1a e7 74 25 3c 3e a4  47 28 33 29 80 52 75 25  |...t%<>.G(3).Ru%|
00012a70  8c f2 51 5f 28 74 25 29  0d 3c 0f 29 74 25 3d a4  |..Q_(t%).<.)t%=.|
00012a80  47 28 33 29 3a f2 48 28  44 79 25 2c 66 79 25 2c  |G(3):.H(Dy%,fy%,|
00012a90  4d 79 25 29 3a f2 72 28  69 25 2c 2d 31 2c 2d 31  |My%):.r(i%,-1,-1|
00012aa0  29 0d 3c 10 20 cd 3a 75  79 25 3d 30 3a 48 75 25  |).<. .:uy%=0:Hu%|
00012ab0  3d 30 3a 51 79 25 3d 30  3a e7 6c 79 25 3c 3e 30  |=0:Qy%=0:.ly%<>0|
00012ac0  8c 0d 3c 11 0d c8 8e 6c  79 25 3e 3e 34 ca 0d 3c  |..<....ly%>>4..<|
00012ad0  12 11 c9 30 3a 75 79 25  3d 6c 79 25 80 26 46 0d  |...0:uy%=ly%.&F.|
00012ae0  3c 13 15 c9 31 3a 75 79  25 3d 37 2a 28 6c 79 25  |<...1:uy%=7*(ly%|
00012af0  80 26 46 29 0d 3c 14 11  c9 32 3a 48 75 25 3d 6c  |.&F).<...2:Hu%=l|
00012b00  79 25 80 26 46 0d 3c 15  11 c9 33 3a 51 79 25 3d  |y%.&F.<...3:Qy%=|
00012b10  6c 79 25 80 26 46 0d 3c  16 87 cb 3a 63 25 3d 44  |ly%.&F.<...:c%=D|
00012b20  79 25 3a 72 25 3d 66 79  25 3a 51 25 3d 4d 79 25  |y%:r%=fy%:Q%=My%|
00012b30  3a f2 50 28 63 25 2c 72  25 2c 51 25 2c 2d 75 79  |:.P(c%,r%,Q%,-uy|
00012b40  25 2c 2d 48 75 25 2c 2d  51 79 25 29 3a 46 25 3d  |%,-Hu%,-Qy%):F%=|
00012b50  a4 53 28 30 2c 30 2c 63  25 2c 72 25 2c 51 25 29  |.S(0,0,c%,r%,Q%)|
00012b60  3a 42 25 3d 5a 5f 25 3a  63 25 3d b9 3a c8 95 42  |:B%=Z_%:c%=.:..B|
00012b70  25 3c 3e 2d 31 80 63 25  3a e7 a4 42 28 42 25 21  |%<>-1.c%:..B(B%!|
00012b80  26 43 2c 46 25 29 3d 2d  31 8c f2 76 28 42 25 29  |&C,F%)=-1..v(B%)|
00012b90  3a 42 25 3d 42 25 21 34  8b 63 25 3d a3 0d 3c 17  |:B%=B%!4.c%=..<.|
00012ba0  05 ce 0d 3c 18 07 cd 3a  e1 0d 3c 19 46 dd a4 58  |...<...:..<.F..X|
00012bb0  79 28 6e 25 2c 72 25 29  3a ea 41 25 3a 41 25 3d  |y(n%,r%):.A%:A%=|
00012bc0  b9 3a e7 6e 25 3c 30 84  6e 25 3e 32 33 84 72 25  |.:.n%<0.n%>23.r%|
00012bd0  3c 30 84 72 25 3e 35 39  8c 41 25 3d a3 3a f2 42  |<0.r%>59.A%=.:.B|
00012be0  28 a4 41 28 22 45 72 72  54 69 6d 65 22 29 29 0d  |(.A("ErrTime")).|
00012bf0  3c 1a 07 3d 41 25 0d 3c  1b 7f dd f2 56 5f 3a ea  |<..=A%.<....V_:.|
00012c00  46 5f 25 2c 6e 25 2c 72  25 2c 49 6c 25 2c 41 24  |F_%,n%,r%,Il%,A$|
00012c10  2c 5a 24 2c 46 24 2c 57  79 25 3a 41 24 3d a4 4d  |,Z$,F$,Wy%:A$=.M|
00012c20  28 66 25 2c 31 36 29 3a  5a 24 3d a4 4d 28 66 25  |(f%,16):Z$=.M(f%|
00012c30  2c 31 37 29 3a 46 24 3d  a4 4d 28 66 25 2c 31 38  |,17):F$=.M(f%,18|
00012c40  29 3a 6e 25 3d bb a4 4d  28 66 25 2c 33 29 3a 72  |):n%=..M(f%,3):r|
00012c50  25 3d bb a4 4d 28 66 25  2c 35 29 3a e7 41 24 2b  |%=..M(f%,5):.A$+|
00012c60  5a 24 2b 46 24 3c 3e 22  22 80 a4 58 79 28 6e 25  |Z$+F$<>""..Xy(n%|
00012c70  2c 72 25 29 8c 0d 3c 1c  6d 57 79 25 3d 57 79 25  |,r%)..<.mWy%=Wy%|
00012c80  84 28 2d a4 5a 28 66 25  2c 32 31 29 29 84 28 28  |.(-.Z(f%,21)).((|
00012c90  2d a4 5a 28 66 25 2c 32  33 29 29 3c 3c 31 29 84  |-.Z(f%,23))<<1).|
00012ca0  28 6e 4a 25 3c 3c 34 29  3a 57 79 25 3d 57 79 25  |(nJ%<<4):Wy%=Wy%|
00012cb0  84 28 28 2d a4 5a 28 66  25 2c 33 38 29 29 3c 3c  |.((-.Z(f%,38))<<|
00012cc0  32 30 29 84 28 28 2d a4  5a 28 66 25 2c 33 39 29  |20).((-.Z(f%,39)|
00012cd0  29 3c 3c 32 31 29 3a e7  a4 5a 28 66 25 2c 32 34  |)<<21):..Z(f%,24|
00012ce0  29 8c 0d 3c 1d 0f e7 a4  5a 28 66 25 2c 32 36 29  |)..<....Z(f%,26)|
00012cf0  8c 0d 3c 1e 2a 57 79 25  3d 57 79 25 84 26 43 84  |..<.*Wy%=Wy%.&C.|
00012d00  28 28 bb a4 4d 28 66 25  2c 32 37 29 29 3c 3c 38  |((..M(f%,27))<<8|
00012d10  29 84 28 6e 75 25 3c 3c  31 36 29 0d 3c 1f 2b cc  |).(nu%<<16).<.+.|
00012d20  57 79 25 3d 57 79 25 84  34 84 28 63 75 25 3c 3c  |Wy%=Wy%.4.(cu%<<|
00012d30  38 29 84 28 6a 75 25 3c  3c 26 43 29 84 28 6d 75  |8).(ju%<<&C).(mu|
00012d40  25 3c 3c 31 36 29 0d 3c  20 05 cd 0d 3c 21 55 cd  |%<<16).< ...<!U.|
00012d50  3a 46 5f 25 3d a4 53 28  72 25 2c 6e 25 2c 51 5f  |:F_%=.S(r%,n%,Q_|
00012d60  25 2c 4e 5f 25 2c 41 4a  25 29 3a f2 61 79 28 46  |%,N_%,AJ%):.ay(F|
00012d70  5f 25 2c 57 79 25 2c 41  24 2c 5a 24 2c 46 24 29  |_%,Wy%,A$,Z$,F$)|
00012d80  3a f2 6c 3a f2 78 3a f2  6e 3a 76 79 25 3d b9 3a  |:.l:.x:.n:vy%=.:|
00012d90  e7 49 79 25 80 5a 25 28  74 25 29 3d 33 8c f2 4b  |.Iy%.Z%(t%)=3..K|
00012da0  0d 3c 22 22 cc e7 41 24  2b 5a 24 2b 46 24 3d 22  |.<""..A$+Z$+F$="|
00012db0  22 8c f2 42 28 a4 41 28  22 45 72 72 4d 65 73 22  |"..B(.A("ErrMes"|
00012dc0  29 29 0d 3c 23 07 cd 3a  e1 0d 3c 24 42 dd f2 61  |)).<#..:..<$B..a|
00012dd0  79 28 46 5f 25 2c 57 79  25 2c 41 24 2c 5a 24 2c  |y(F_%,Wy%,A$,Z$,|
00012de0  46 24 29 3a ea 53 25 2c  42 25 2c 78 79 25 2c 54  |F$):.S%,B%,xy%,T|
00012df0  25 2c 6e 79 25 2c 4e 79  25 3a e7 4f 5f 25 3c 3e  |%,ny%,Ny%:.O_%<>|
00012e00  2d 31 8c f2 53 79 28 4f  5f 25 29 0d 3c 25 6c 78  |-1..Sy(O_%).<%lx|
00012e10  79 25 3d a3 3a 53 25 3d  a9 28 41 24 2b 5a 24 2b  |y%=.:S%=.(A$+Z$+|
00012e20  46 24 29 2b 33 2b 32 30  3a 4e 79 25 3d 5a 5f 25  |F$)+3+20:Ny%=Z_%|
00012e30  3a 6e 79 25 3d 2d 31 3a  c8 95 4e 79 25 3c 3e 2d  |:ny%=-1:..Ny%<>-|
00012e40  31 80 ac 78 79 25 3a 54  25 3d 4e 79 25 21 26 43  |1..xy%:T%=Ny%!&C|
00012e50  3a e7 a4 42 28 46 5f 25  2c 54 25 29 3d 2d 31 8c  |:..B(F_%,T%)=-1.|
00012e60  78 79 25 3d b9 8b 6e 79  25 3d 4e 79 25 3a 4e 79  |xy%=..ny%=Ny%:Ny|
00012e70  25 3d 4e 79 25 21 34 0d  3c 26 5c ce 3a 42 25 3d  |%=Ny%!4.<&\.:B%=|
00012e80  a4 77 28 73 5f 25 2c 53  25 2b 31 2c b9 29 3a 21  |.w(s_%,S%+1,.):!|
00012e90  42 25 3d 6e 79 25 3a 42  25 21 34 3d 4e 79 25 3a  |B%=ny%:B%!4=Ny%:|
00012ea0  42 25 21 38 3d 53 25 3a  42 25 21 26 43 3d 46 5f  |B%!8=S%:B%!&C=F_|
00012eb0  25 3a 42 25 21 31 36 3d  57 79 25 3a e7 6e 79 25  |%:B%!16=Wy%:.ny%|
00012ec0  3d 2d 31 8c 5a 5f 25 3d  42 25 8b 6e 79 25 21 34  |=-1.Z_%=B%.ny%!4|
00012ed0  3d 42 25 0d 3c 27 14 e7  4e 79 25 3c 3e 2d 31 8c  |=B%.<'..Ny%<>-1.|
00012ee0  21 4e 79 25 3d 42 25 0d  3c 28 23 24 28 42 25 2b  |!Ny%=B%.<(#$(B%+|
00012ef0  32 30 29 3d 41 24 2b bd  26 42 2b 5a 24 2b bd 26  |20)=A$+.&B+Z$+.&|
00012f00  42 2b 46 24 2b bd 26 42  3a e1 0d 3c 29 30 dd f2  |B+F$+.&B:..<)0..|
00012f10  76 28 42 25 29 3a f2 53  79 28 42 25 29 3a f2 6c  |v(B%):.Sy(B%):.l|
00012f20  3a f2 78 3a 76 79 25 3d  b9 3a e7 49 79 25 80 5a  |:.x:vy%=.:.Iy%.Z|
00012f30  25 28 74 25 29 3d 33 8c  f2 4b 0d 3c 2a 0e e7 42  |%(t%)=3..K.<*..B|
00012f40  25 3d 4f 5f 25 8c f2 6e  0d 3c 2b 1a e7 42 25 3d  |%=O_%..n.<+..B%=|
00012f50  70 4a 25 8c 70 4a 25 3d  2d 31 3a f2 58 28 52 79  |pJ%.pJ%=-1:.X(Ry|
00012f60  25 29 0d 3c 2c 05 e1 0d  3c 2d 39 dd f2 53 79 28  |%).<,...<-9..Sy(|
00012f70  42 25 29 3a ea 6e 79 25  2c 4e 79 25 3a 6e 79 25  |B%):.ny%,Ny%:ny%|
00012f80  3d 21 42 25 3a 4e 79 25  3d 42 25 21 34 3a e7 6e  |=!B%:Ny%=B%!4:.n|
00012f90  79 25 3c 3e 2d 31 8c 6e  79 25 21 34 3d 4e 79 25  |y%<>-1.ny%!4=Ny%|
00012fa0  0d 3c 2e 15 e7 4e 79 25  3c 3e 2d 31 8c 21 4e 79  |.<...Ny%<>-1.!Ny|
00012fb0  25 3d 6e 79 25 0d 3c 2f  13 e7 5a 5f 25 3d 42 25  |%=ny%.</..Z_%=B%|
00012fc0  8c 5a 5f 25 3d 4e 79 25  0d 3c 30 13 f2 4c 79 28  |.Z_%=Ny%.<0..Ly(|
00012fd0  73 5f 25 2c 42 25 2c b9  29 3a e1 0d 3c 31 25 dd  |s_%,B%,.):..<1%.|
00012fe0  f2 6e 3a f2 58 28 66 25  29 3a f2 58 28 73 79 25  |.n:.X(f%):.X(sy%|
00012ff0  29 3a e7 49 79 25 8c f2  43 28 69 25 2c 2d 31 29  |):.Iy%..C(i%,-1)|
00013000  0d 3c 32 0c 4f 5f 25 3d  2d 31 3a e1 0d 3c 33 25  |.<2.O_%=-1:..<3%|
00013010  dd f2 70 75 28 59 79 25  2c 72 79 25 2c 71 25 2c  |..pu(Yy%,ry%,q%,|
00013020  73 25 2c 48 5f 25 29 3a  ea 41 25 3a c8 8e 73 25  |s%,H_%):.A%:..s%|
00013030  ca 0d 3c 34 1c c9 31 3a  f2 60 28 51 5f 25 2c 4e  |..<4..1:.`(Q_%,N|
00013040  5f 25 2c 41 4a 25 2c 71  25 2c 73 25 29 0d 3c 35  |_%,AJ%,q%,s%).<5|
00013050  10 c9 36 3a f2 4f 28 48  5f 25 2c 30 29 0d 3c 36  |..6:.O(H_%,0).<6|
00013060  11 c9 37 3a f2 4f 28 2d  48 5f 25 2c 30 29 0d 3c  |..7:.O(-H_%,0).<|
00013070  37 13 c9 38 3a f2 4f 28  30 2c 26 41 2a 48 5f 25  |7..8:.O(0,&A*H_%|
00013080  29 0d 3c 38 14 c9 39 3a  f2 4f 28 30 2c 2d 26 41  |).<8..9:.O(0,-&A|
00013090  2a 48 5f 25 29 0d 3c 39  11 c9 26 41 3a f2 4f 28  |*H_%).<9..&A:.O(|
000130a0  30 2c 48 5f 25 29 0d 3c  3a 12 c9 26 42 3a f2 4f  |0,H_%).<:..&B:.O|
000130b0  28 30 2c 2d 48 5f 25 29  0d 3c 3b 0b c9 31 39 3a  |(0,-H_%).<;..19:|
000130c0  f2 56 5f 0d 3c 3c 0a c9  32 30 3a f2 6e 0d 3c 3d  |.V_.<<..20:.n.<=|
000130d0  1d c9 32 32 3a f2 46 28  58 6c 25 2c 59 79 25 2c  |..22:.F(Xl%,Yy%,|
000130e0  72 79 25 2c 71 25 2c 73  25 29 0d 3c 3e 19 c9 32  |ry%,q%,s%).<>..2|
000130f0  34 3a f2 54 79 28 ac a4  5a 28 71 25 2c 32 34 29  |4:.Ty(..Z(q%,24)|
00013100  2c a3 29 0d 3c 3f 12 c9  32 36 2c 33 31 3a f2 4a  |,.).<?..26,31:.J|
00013110  79 28 73 25 29 0d 3c 40  19 c9 32 38 2c 32 39 3a  |y(s%).<@..28,29:|
00013120  e7 67 25 3d 31 8c 73 25  3d 35 37 2d 73 25 0d 3c  |.g%=1.s%=57-s%.<|
00013130  41 3b 41 25 3d bb a4 4d  28 71 25 2c 32 37 29 3a  |A;A%=..M(q%,27):|
00013140  41 25 2b 3d 28 73 25 2d  32 37 29 2a 32 2d 33 3a  |A%+=(s%-27)*2-3:|
00013150  e7 41 25 3d 30 8c 41 25  3d 26 46 46 8b e7 41 25  |.A%=0.A%=&FF..A%|
00013160  3d 32 35 36 8c 41 25 3d  31 0d 3c 42 11 f2 41 28  |=256.A%=1.<B..A(|
00013170  71 25 2c 32 37 2c c3 41  25 29 0d 3c 43 2a c9 33  |q%,27,.A%).<C*.3|
00013180  30 3a 21 61 4a 25 3d a4  68 28 22 45 22 29 3a f2  |0:!aJ%=.h("E"):.|
00013190  46 28 61 4a 25 2c 59 79  25 2c 72 79 25 2c 71 25  |F(aJ%,Yy%,ry%,q%|
000131a0  2c 73 25 29 0d 3c 44 1d  c9 33 33 3a f2 46 28 79  |,s%).<D..33:.F(y|
000131b0  6c 25 2c 59 79 25 2c 72  79 25 2c 71 25 2c 73 25  |l%,Yy%,ry%,q%,s%|
000131c0  29 0d 3c 45 1d c9 33 34  3a f2 46 28 62 6c 25 2c  |).<E..34:.F(bl%,|
000131d0  59 79 25 2c 72 79 25 2c  71 25 2c 73 25 29 0d 3c  |Yy%,ry%,q%,s%).<|
000131e0  46 1d c9 33 35 3a f2 46  28 72 6c 25 2c 59 79 25  |F..35:.F(rl%,Yy%|
000131f0  2c 72 79 25 2c 71 25 2c  73 25 29 0d 3c 47 0f c9  |,ry%,q%,s%).<G..|
00013200  33 37 3a f2 76 28 4f 5f  25 29 0d 3c 48 1c c9 33  |37:.v(O_%).<H..3|
00013210  38 3a f2 4d 28 66 25 2c  32 31 2c 94 a4 5a 28 66  |8:.M(f%,21,..Z(f|
00013220  25 2c 33 38 29 29 0d 3c  49 3d c9 33 39 3a f2 4d  |%,38)).<I=.39:.M|
00013230  28 66 25 2c 32 31 2c 94  28 a4 5a 28 66 25 2c 33  |(f%,21,.(.Z(f%,3|
00013240  39 29 84 a4 5a 28 66 25  2c 33 38 29 29 29 3a f2  |9)..Z(f%,38))):.|
00013250  4d 28 66 25 2c 33 38 2c  94 a4 5a 28 66 25 2c 33  |M(f%,38,..Z(f%,3|
00013260  39 29 29 0d 3c 4a 07 cb  3a e1 0d 3c 4b 27 dd f2  |9)).<J..:..<K'..|
00013270  60 4a 28 59 79 25 2c 72  79 25 2c 71 25 2c 73 25  |`J(Yy%,ry%,q%,s%|
00013280  29 3a ea 41 25 3a 57 5f  25 3d 30 3a c8 8e 73 25  |):.A%:W_%=0:..s%|
00013290  ca 0d 3c 4c 20 c9 37 3a  f2 59 79 28 70 4a 25 2c  |..<L .7:.Yy(pJ%,|
000132a0  a4 5a 28 52 79 25 2c 39  29 29 3a 70 4a 25 3d 2d  |.Z(Ry%,9)):pJ%=-|
000132b0  31 0d 3c 4d 0e c9 38 3a  f2 76 28 70 4a 25 29 0d  |1.<M..8:.v(pJ%).|
000132c0  3c 4e 28 c9 39 3a e3 41  25 3d 26 41 b8 26 44 3a  |<N(.9:.A%=&A.&D:|
000132d0  f2 4d 28 71 25 2c 41 25  2c 94 ac a4 5a 28 71 25  |.M(q%,A%,...Z(q%|
000132e0  2c 73 25 29 29 3a ed 0d  3c 4f 19 c9 26 42 2c 26  |,s%)):..<O..&B,&|
000132f0  43 3a e7 67 25 3d 31 8c  73 25 3d 32 33 2d 73 25  |C:.g%=1.s%=23-s%|
00013300  0d 3c 50 3b 41 25 3d bb  a4 4d 28 71 25 2c 26 41  |.<P;A%=..M(q%,&A|
00013310  29 3a 41 25 2b 3d 28 73  25 2d 26 41 29 2a 32 2d  |):A%+=(s%-&A)*2-|
00013320  33 3a e7 41 25 3d 30 8c  41 25 3d 26 46 46 8b e7  |3:.A%=0.A%=&FF..|
00013330  41 25 3d 32 35 36 8c 41  25 3d 31 0d 3c 51 11 f2  |A%=256.A%=1.<Q..|
00013340  41 28 71 25 2c 26 41 2c  c3 41 25 29 0d 3c 52 5d  |A(q%,&A,.A%).<R]|
00013350  c9 26 44 3a 21 4a 25 3d  71 25 3a c8 99 26 34 30  |.&D:!J%=q%:..&40|
00013360  30 43 42 2c 2c 4a 25 3a  59 79 25 3d 4a 25 21 34  |0CB,,J%:Yy%=J%!4|
00013370  2b 36 38 36 2b 36 34 3a  72 79 25 3d 4a 25 21 31  |+686+64:ry%=J%!1|
00013380  36 2d 33 31 32 3a 21 61  4a 25 3d a4 68 28 22 45  |6-312:!aJ%=.h("E|
00013390  44 22 29 3a f2 46 28 61  4a 25 2c 59 79 25 2c 72  |D"):.F(aJ%,Yy%,r|
000133a0  79 25 2c 71 25 2c 73 25  29 0d 3c 53 07 cb 3a e1  |y%,q%,s%).<S..:.|
000133b0  0d 3c 54 25 dd f2 59 79  28 42 25 2c 60 69 25 29  |.<T%..Yy(B%,`i%)|
000133c0  3a e7 42 25 3c 3e 4f 5f  25 8c ea 4f 5f 25 3a 4f  |:.B%<>O_%..O_%:O|
000133d0  5f 25 3d 2d 31 0d 3c 55  0a e7 ac 60 69 25 8c 0d  |_%=-1.<U...`i%..|
000133e0  3c 56 11 e7 28 42 25 21  31 36 80 34 29 3d 34 8c  |<V..(B%!16.4)=4.|
000133f0  0d 3c 57 11 e7 28 42 25  21 31 36 80 38 29 3d 38  |.<W..(B%!16.8)=8|
00013400  8c 0d 3c 58 0d f2 54 5f  28 42 25 2c a3 29 0d 3c  |..<X..T_(B%,.).<|
00013410  59 0c cc f2 6c 4a 28 42  25 29 0d 3c 5a 05 cd 0d  |Y...lJ(B%).<Z...|
00013420  3c 5b 21 cc 42 25 21 31  36 3d 28 42 25 21 31 36  |<[!.B%!16=(B%!16|
00013430  29 84 28 31 3c 3c 32 30  29 3a 76 79 25 3d 2d 31  |).(1<<20):vy%=-1|
00013440  0d 3c 5c 05 cd 0d 3c 5d  0e cc f2 54 5f 28 42 25  |.<\...<]...T_(B%|
00013450  2c b9 29 0d 3c 5e 22 cd  3a f2 6c 3a f2 78 3a 76  |,.).<^".:.l:.x:v|
00013460  79 25 3d b9 3a e7 49 79  25 80 5a 25 28 74 25 29  |y%=.:.Iy%.Z%(t%)|
00013470  3d 33 8c f2 4b 0d 3c 5f  13 57 5f 25 3d 30 3a f2  |=3..K.<_.W_%=0:.|
00013480  58 28 52 79 25 29 3a e1  0d 3c 60 40 dd f2 54 5f  |X(Ry%):..<`@..T_|
00013490  28 42 25 2c 60 69 25 29  3a ea 63 25 2c 54 25 2c  |(B%,`i%):.c%,T%,|
000134a0  41 24 2c 71 79 25 2c 56  79 25 2c 64 25 2c 7a 25  |A$,qy%,Vy%,d%,z%|
000134b0  2c 65 25 2c 46 5f 25 2c  57 79 25 2c 5a 24 2c 46  |,e%,F_%,Wy%,Z$,F|
000134c0  24 2c 3a e7 60 69 25 8c  0d 3c 61 44 46 5f 25 3d  |$,:.`i%..<aDF_%=|
000134d0  a4 59 3a 63 25 3d bb a4  4d 28 71 25 2c 26 41 29  |.Y:c%=..M(q%,&A)|
000134e0  3a 41 24 3d a4 4d 28 52  79 25 2c 26 44 29 3a 54  |:A$=.M(Ry%,&D):T|
000134f0  25 3d 30 3a c8 95 41 24  3c 3e a4 4a 28 61 4a 25  |%=0:..A$<>.J(aJ%|
00013500  2c 54 25 29 3a 54 25 2b  3d 31 3a ce 0d 3c 62 3a  |,T%):T%+=1:..<b:|
00013510  cc 46 5f 25 3d 42 25 21  26 43 3a 63 25 3d 28 28  |.F_%=B%!&C:c%=((|
00013520  42 25 21 31 36 29 3e 3e  38 29 80 26 46 46 3a 54  |B%!16)>>8).&FF:T|
00013530  25 3d 28 28 28 42 25 21  31 36 29 3e 3e 31 36 29  |%=(((B%!16)>>16)|
00013540  80 26 46 29 2d 31 0d 3c  63 e9 cd 3a f2 47 28 46  |.&F)-1.<c..:.G(F|
00013550  5f 25 2c 71 79 25 2c 56  79 25 2c 64 25 2c 7a 25  |_%,qy%,Vy%,d%,z%|
00013560  2c 65 25 29 3a f2 72 79  28 71 79 25 2c 56 79 25  |,e%):.ry(qy%,Vy%|
00013570  2c 64 25 2c 7a 25 2c 65  25 2c 63 25 2c 54 25 29  |,d%,z%,e%,c%,T%)|
00013580  3a 46 5f 25 3d a4 53 28  71 79 25 2c 56 79 25 2c  |:F_%=.S(qy%,Vy%,|
00013590  64 25 2c 7a 25 2c 65 25  29 3a 57 79 25 3d 42 25  |d%,z%,e%):Wy%=B%|
000135a0  21 31 36 3a 63 25 3d 42  25 2b 32 30 3a 41 24 3d  |!16:c%=B%+20:A$=|
000135b0  22 22 3a c8 95 3f 63 25  3c 3e 26 42 3a 41 24 2b  |"":..?c%<>&B:A$+|
000135c0  3d bd 3f 63 25 3a 63 25  2b 3d 31 3a ce 3a 63 25  |=.?c%:c%+=1:.:c%|
000135d0  2b 3d 31 3a c8 95 3f 63  25 3c 3e 26 42 3a 5a 24  |+=1:..?c%<>&B:Z$|
000135e0  2b 3d bd 3f 63 25 3a 63  25 2b 3d 31 3a ce 3a 63  |+=.?c%:c%+=1:.:c|
000135f0  25 2b 3d 31 3a c8 95 3f  63 25 3c 3e 26 42 3a 46  |%+=1:..?c%<>&B:F|
00013600  24 2b 3d bd 3f 63 25 3a  63 25 2b 3d 31 3a ce 3a  |$+=.?c%:c%+=1:.:|
00013610  f2 53 79 28 42 25 29 3a  f2 61 79 28 46 5f 25 2c  |.Sy(B%):.ay(F_%,|
00013620  57 79 25 2c 41 24 2c 5a  24 2c 46 24 29 3a e1 0d  |Wy%,A$,Z$,F$):..|
00013630  3c 64 7e dd f2 72 79 28  f8 71 79 25 2c f8 56 79  |<d~..ry(.qy%,.Vy|
00013640  25 2c f8 64 25 2c f8 7a  25 2c f8 65 25 2c 63 25  |%,.d%,.z%,.e%,c%|
00013650  2c 54 25 29 3a ea 75 79  25 2c 53 61 25 2c 48 61  |,T%):.uy%,Sa%,Ha|
00013660  25 3a 53 61 25 3d 63 25  3a 48 61 25 3d 54 25 3a  |%:Sa%=c%:Ha%=T%:|
00013670  f5 3a 63 25 3d 53 61 25  3a 54 25 3d 48 61 25 3a  |.:c%=Sa%:T%=Ha%:|
00013680  e7 54 25 3d 30 8c 71 79  25 2b 3d 63 25 3a 63 25  |.T%=0.qy%+=c%:c%|
00013690  3d 71 79 25 81 36 30 3a  71 79 25 3d 71 79 25 83  |=qy%.60:qy%=qy%.|
000136a0  36 30 3a e7 63 25 3e 30  8c 54 25 3d 31 0d 3c 65  |60:.c%>0.T%=1.<e|
000136b0  31 e7 54 25 3d 31 8c 56  79 25 2b 3d 63 25 3a 63  |1.T%=1.Vy%+=c%:c|
000136c0  25 3d 56 79 25 81 32 34  3a 56 79 25 3d 56 79 25  |%=Vy%.24:Vy%=Vy%|
000136d0  83 32 34 3a e7 63 25 3e  30 8c 54 25 3d 32 0d 3c  |.24:.c%>0.T%=2.<|
000136e0  66 25 75 79 25 3d 30 3a  e7 54 25 3d 32 8c 75 79  |f%uy%=0:.T%=2.uy|
000136f0  25 3d 63 25 8b e7 54 25  3d 33 8c 75 79 25 3d 37  |%=c%..T%=3.uy%=7|
00013700  2a 63 25 0d 3c 67 2e c8  95 75 79 25 3e 30 3a f2  |*c%.<g...uy%>0:.|
00013710  50 28 64 25 2c 7a 25 2c  65 25 2c 31 2c 30 2c 30  |P(d%,z%,e%,1,0,0|
00013720  29 3a 75 79 25 2d 3d 31  3a ce 3a e7 54 25 3d 34  |):uy%-=1:.:.T%=4|
00013730  8c 0d 3c 68 25 c8 95 63  25 3e 30 3a f2 50 28 64  |..<h%..c%>0:.P(d|
00013740  25 2c 7a 25 2c 65 25 2c  30 2c 31 2c 30 29 3a 63  |%,z%,e%,0,1,0):c|
00013750  25 2d 3d 31 3a ce 0d 3c  69 0c cd 3a e7 54 25 3d  |%-=1:..<i..:.T%=|
00013760  35 8c 0d 3c 6a 25 c8 95  63 25 3e 30 3a f2 50 28  |5..<j%..c%>0:.P(|
00013770  64 25 2c 7a 25 2c 65 25  2c 30 2c 30 2c 31 29 3a  |d%,z%,e%,0,0,1):|
00013780  63 25 2d 3d 31 3a ce 0d  3c 6b 27 cd 3a fd a4 42  |c%-=1:..<k'.:..B|
00013790  28 a4 59 2c a4 53 28 71  79 25 2c 56 79 25 2c 64  |(.Y,.S(qy%,Vy%,d|
000137a0  25 2c 7a 25 2c 65 25 29  29 3d 2d 31 3a e1 0d 3c  |%,z%,e%))=-1:..<|
000137b0  6c e8 dd f2 6c 4a 28 42  25 29 3a ea 46 5f 25 2c  |l...lJ(B%):.F_%,|
000137c0  71 79 25 2c 56 79 25 2c  64 25 2c 7a 25 2c 65 25  |qy%,Vy%,d%,z%,e%|
000137d0  2c 41 24 2c 5a 24 2c 43  25 2c 57 79 25 2c 63 25  |,A$,Z$,C%,Wy%,c%|
000137e0  3a 57 79 25 3d 42 25 21  31 36 3a 63 25 3d 42 25  |:Wy%=B%!16:c%=B%|
000137f0  2b 32 30 3a f2 47 28 42  25 21 26 43 2c 71 79 25  |+20:.G(B%!&C,qy%|
00013800  2c 56 79 25 2c 64 25 2c  7a 25 2c 65 25 29 3a f2  |,Vy%,d%,z%,e%):.|
00013810  76 79 28 64 25 2c 7a 25  2c 65 25 2c 57 79 25 29  |vy(d%,z%,e%,Wy%)|
00013820  3a 46 5f 25 3d a4 53 28  71 79 25 2c 56 79 25 2c  |:F_%=.S(qy%,Vy%,|
00013830  64 25 2c 7a 25 2c 65 25  29 3a c8 95 3f 63 25 3c  |d%,z%,e%):..?c%<|
00013840  3e 26 42 3a 41 24 2b 3d  bd 3f 63 25 3a 63 25 2b  |>&B:A$+=.?c%:c%+|
00013850  3d 31 3a ce 3a 63 25 2b  3d 31 3a c8 95 3f 63 25  |=1:.:c%+=1:..?c%|
00013860  3c 3e 26 42 3a 5a 24 2b  3d bd 3f 63 25 3a 63 25  |<>&B:Z$+=.?c%:c%|
00013870  2b 3d 31 3a ce 3a 63 25  2b 3d 31 3a c8 95 3f 63  |+=1:.:c%+=1:..?c|
00013880  25 3c 3e 26 42 3a 46 24  2b 3d bd 3f 63 25 3a 63  |%<>&B:F$+=.?c%:c|
00013890  25 2b 3d 31 3a ce 0d 3c  6d 23 f2 53 79 28 42 25  |%+=1:..<m#.Sy(B%|
000138a0  29 3a f2 61 79 28 46 5f  25 2c 57 79 25 2c 41 24  |):.ay(F_%,Wy%,A$|
000138b0  2c 5a 24 2c 46 24 29 3a  e1 0d 3c 6e 7c dd f2 76  |,Z$,F$):..<n|..v|
000138c0  79 28 f8 64 25 2c f8 7a  25 2c f8 65 25 2c 46 25  |y(.d%,.z%,.e%,F%|
000138d0  29 3a ea 70 25 2c 63 25  2c 72 25 3a f5 3a 70 25  |):.p%,c%,r%:.:p%|
000138e0  3d 28 46 25 3e 3e 38 29  80 26 46 3a 63 25 3d 28  |=(F%>>8).&F:c%=(|
000138f0  46 25 3e 3e 26 43 29 80  26 46 3a 72 25 3d 28 46  |F%>>&C).&F:r%=(F|
00013900  25 3e 3e 31 36 29 80 26  46 3a c8 95 72 25 3e 30  |%>>16).&F:..r%>0|
00013910  3a f2 50 28 64 25 2c 7a  25 2c 65 25 2c 2d 64 25  |:.P(d%,z%,e%,-d%|
00013920  2b 31 2c 31 2c 30 29 3a  72 25 2d 3d 31 3a ce 3a  |+1,1,0):r%-=1:.:|
00013930  c8 8e 70 25 ca 0d 3c 6f  44 c9 31 2c 32 2c 33 3a  |..p%..<oD.1,2,3:|
00013940  6a 25 3d a4 48 28 64 25  2c 7a 25 2c 65 25 29 3a  |j%=.H(d%,z%,e%):|
00013950  c8 95 6a 25 3c 3e 63 25  3a 64 25 2b 3d 31 3a 6a  |..j%<>c%:d%+=1:j|
00013960  25 3d a4 60 28 6a 25 2b  31 29 3a ce 3a 64 25 2b  |%=.`(j%+1):.:d%+|
00013970  3d 28 70 25 2d 31 29 2a  37 0d 3c 70 51 c9 34 2c  |=(p%-1)*7.<pQ.4,|
00013980  35 2c 36 3a 64 25 3d a4  44 28 7a 25 2c 65 25 29  |5,6:d%=.D(z%,e%)|
00013990  3a 6a 25 3d a4 48 28 64  25 2c 7a 25 2c 65 25 29  |:j%=.H(d%,z%,e%)|
000139a0  3a c8 95 6a 25 3c 3e 63  25 3a 64 25 2d 3d 31 3a  |:..j%<>c%:d%-=1:|
000139b0  6a 25 3d a4 60 28 6a 25  2b 36 29 3a ce 3a 64 25  |j%=.`(j%+6):.:d%|
000139c0  2d 3d 28 70 25 2d 34 29  2a 37 0d 3c 71 25 cb 3a  |-=(p%-4)*7.<q%.:|
000139d0  fd a4 42 28 a4 59 2c a4  53 28 a4 69 2c a4 63 2c  |..B(.Y,.S(.i,.c,|
000139e0  64 25 2c 7a 25 2c 65 25  29 29 3d 2d 31 3a e1 0d  |d%,z%,e%))=-1:..|
000139f0  3c 72 8c dd f2 4f 28 4b  75 25 2c 72 25 29 3a ea  |<r...O(Ku%,r%):.|
00013a00  49 6c 25 2c 4d 25 2c 48  75 25 2c 75 79 25 2c 6c  |Il%,M%,Hu%,uy%,l|
00013a10  61 25 2c 41 24 3a 48 75  25 3d 72 25 3c 3e 30 3a  |a%,A$:Hu%=r%<>0:|
00013a20  75 79 25 3d a3 3a 72 25  2b 3d bb a4 4d 28 66 25  |uy%=.:r%+=..M(f%|
00013a30  2c 35 29 3a 6e 25 3d bb  a4 4d 28 66 25 2c 33 29  |,5):n%=..M(f%,3)|
00013a40  3a 4d 25 3d a4 44 28 4e  5f 25 2c 41 4a 25 29 3a  |:M%=.D(N_%,AJ%):|
00013a50  6e 25 2b 3d 4b 75 25 3a  4b 75 25 3d 4b 75 25 3c  |n%+=Ku%:Ku%=Ku%<|
00013a60  3e 30 3a e7 72 25 3c 30  8c 6e 25 2d 3d 31 3a 72  |>0:.r%<0.n%-=1:r|
00013a70  25 2b 3d 36 30 3a 4b 75  25 3d b9 0d 3c 73 1d e7  |%+=60:Ku%=..<s..|
00013a80  72 25 3e 35 39 8c 6e 25  2b 3d 31 3a 72 25 2d 3d  |r%>59.n%+=1:r%-=|
00013a90  36 30 3a 4b 75 25 3d b9  0d 3c 74 1d e7 6e 25 3c  |60:Ku%=..<t..n%<|
00013aa0  30 8c 51 5f 25 2d 3d 31  3a 6e 25 2b 3d 32 34 3a  |0.Q_%-=1:n%+=24:|
00013ab0  75 79 25 3d b9 0d 3c 75  1e e7 6e 25 3e 32 33 8c  |uy%=..<u..n%>23.|
00013ac0  51 5f 25 2b 3d 31 3a 6e  25 2d 3d 32 34 3a 75 79  |Q_%+=1:n%-=24:uy|
00013ad0  25 3d b9 0d 3c 76 17 e7  51 5f 25 3c 31 8c 4e 5f  |%=..<v..Q_%<1.N_|
00013ae0  25 2d 3d 31 3a 75 79 25  3d b9 0d 3c 77 1e e7 51  |%-=1:uy%=..<w..Q|
00013af0  5f 25 3e 4d 25 8c 4e 5f  25 2b 3d 31 3a 51 5f 25  |_%>M%.N_%+=1:Q_%|
00013b00  3d 31 3a 75 79 25 3d b9  0d 3c 78 1e e7 4e 5f 25  |=1:uy%=..<x..N_%|
00013b10  3c 31 8c 41 4a 25 2d 3d  31 3a 4e 5f 25 3d 26 43  |<1.AJ%-=1:N_%=&C|
00013b20  3a 75 79 25 3d b9 0d 3c  79 1e e7 4e 5f 25 3e 26  |:uy%=..<y..N_%>&|
00013b30  43 8c 41 4a 25 2b 3d 31  3a 4e 5f 25 3d 31 3a 75  |C.AJ%+=1:N_%=1:u|
00013b40  79 25 3d b9 0d 3c 7a 27  4d 25 3d a4 44 28 4e 5f  |y%=..<z'M%=.D(N_|
00013b50  25 2c 41 4a 25 29 3a e7  51 5f 25 3d 30 84 51 5f  |%,AJ%):.Q_%=0.Q_|
00013b60  25 3e 4d 25 8c 51 5f 25  3d 4d 25 0d 3c 7b 24 e7  |%>M%.Q_%=M%.<{$.|
00013b70  75 79 25 8c f2 41 28 66  25 2c 31 2c a4 55 28 51  |uy%..A(f%,1,.U(Q|
00013b80  5f 25 2c 4e 5f 25 2c 41  4a 25 2c 2d 31 29 29 0d  |_%,N_%,AJ%,-1)).|
00013b90  3c 7c 15 e7 4b 75 25 8c  f2 41 28 66 25 2c 33 2c  |<|..Ku%..A(f%,3,|
00013ba0  c3 6e 25 29 0d 3c 7d 29  41 24 3d c3 72 25 3a e7  |.n%).<})A$=.r%:.|
00013bb0  72 25 3c 26 41 8c 41 24  3d 22 30 22 2b 41 24 3a  |r%<&A.A$="0"+A$:|
00013bc0  e7 72 25 3d 30 8c 41 24  3d 22 30 30 22 0d 3c 7e  |.r%=0.A$="00".<~|
00013bd0  14 e7 48 75 25 8c f2 41  28 66 25 2c 35 2c 41 24  |..Hu%..A(f%,5,A$|
00013be0  29 0d 3c 7f 05 e1 0d 3c  80 33 dd f2 7a 5f 3a ea  |).<....<.3..z_:.|
00013bf0  53 25 2c 43 25 2c 42 25  3a 43 25 3d 2d 31 3a 5a  |S%,C%,B%:C%=-1:Z|
00013c00  5f 25 3d 2d 31 3a 77 25  3d 8e 72 24 3a e7 ac 46  |_%=-1:w%=.r$:..F|
00013c10  75 25 80 77 25 3c 3e 30  8c 0d 3c 81 3d c8 95 ac  |u%.w%<>0..<.=...|
00013c20  c5 23 77 25 3a 53 25 3d  bb be 23 77 25 3a 42 25  |.#w%:S%=..#w%:B%|
00013c30  3d a4 77 28 73 5f 25 2c  53 25 2b 31 2c b9 29 3a  |=.w(s_%,S%+1,.):|
00013c40  e7 43 25 3c 3e 2d 31 8c  43 25 21 34 3d 42 25 8b  |.C%<>-1.C%!4=B%.|
00013c50  5a 5f 25 3d 42 25 0d 3c  82 3a 21 42 25 3d 43 25  |Z_%=B%.<.:!B%=C%|
00013c60  3a 42 25 21 38 3d 53 25  3a c8 99 26 43 2c 34 2c  |:B%!8=S%:..&C,4,|
00013c70  77 25 2c 42 25 2b 26 43  2c 53 25 2d 26 43 3a 43  |w%,B%+&C,S%-&C:C|
00013c80  25 3d 42 25 3a e7 78 5f  25 8c f2 77 28 ac 31 29  |%=B%:.x_%..w(.1)|
00013c90  0d 3c 83 16 ce 3a e7 5a  5f 25 3c 3e 2d 31 8c 42  |.<...:.Z_%<>-1.B|
00013ca0  25 21 34 3d 2d 31 0d 3c  84 11 cd 3a d9 23 77 25  |%!4=-1.<...:.#w%|
00013cb0  3a 77 25 3d 30 3a e1 0d  3c 85 39 dd f2 63 4a 28  |:w%=0:..<.9..cJ(|
00013cc0  f8 63 25 2c f8 72 25 2c  51 25 29 3a ea 65 6c 25  |.c%,.r%,Q%):.el%|
00013cd0  2c 65 79 25 3a 65 6c 25  3d 28 51 25 2b 31 29 83  |,ey%:el%=(Q%+1).|
00013ce0  31 39 3a e7 65 6c 25 3d  30 8c 65 6c 25 3d 31 39  |19:.el%=0.el%=19|
00013cf0  0d 3c 86 41 65 79 25 3d  28 94 28 31 2e 32 35 2a  |.<.Aey%=(.(1.25*|
00013d00  51 25 29 2b 36 29 83 37  3a 63 25 3d 59 25 28 65  |Q%)+6).7:c%=Y%(e|
00013d10  6c 25 2d 31 2c 65 79 25  29 3a e7 63 25 3e 33 31  |l%-1,ey%):.c%>31|
00013d20  8c 63 25 2d 3d 33 31 3a  72 25 3d 34 8b 72 25 3d  |.c%-=31:r%=4.r%=|
00013d30  33 0d 3c 87 05 e1 0d 3c  88 3e dd f2 4d 6c 3a ea  |3.<....<.>..Ml:.|
00013d40  73 69 25 2c 43 69 25 2c  64 25 2c 6a 25 2c 63 25  |si%,Ci%,d%,j%,c%|
00013d50  3a de 59 25 28 31 38 2c  36 29 3a e3 73 69 25 3d  |:.Y%(18,6):.si%=|
00013d60  31 b8 31 39 3a e3 43 69  25 3d 30 b8 36 3a c8 8e  |1.19:.Ci%=0.6:..|
00013d70  73 69 25 ca 0d 3c 89 0c  c9 26 45 3a 6a 25 3d 31  |si%..<...&E:j%=1|
00013d80  0d 3c 8a 0b c9 33 3a 6a  25 3d 32 0d 3c 8b 0c c9  |.<...3:j%=2.<...|
00013d90  26 42 3a 6a 25 3d 34 0d  3c 8c 0c c9 31 39 3a 6a  |&B:j%=4.<...19:j|
00013da0  25 3d 36 0d 3c 8d 0b c9  38 3a 6a 25 3d 37 0d 3c  |%=6.<...8:j%=7.<|
00013db0  8e 0c c9 31 36 3a 6a 25  3d 39 0d 3c 8f 0c c9 35  |...16:j%=9.<...5|
00013dc0  3a 6a 25 3d 26 41 0d 3c  90 0d c9 26 44 3a 6a 25  |:j%=&A.<...&D:j%|
00013dd0  3d 26 43 0d 3c 91 0c c9  32 3a 6a 25 3d 26 44 0d  |=&C.<...2:j%=&D.|
00013de0  3c 92 0d c9 26 41 3a 6a  25 3d 26 46 0d 3c 93 0d  |<...&A:j%=&F.<..|
00013df0  c9 31 38 3a 6a 25 3d 31  37 0d 3c 94 0c c9 37 3a  |.18:j%=17.<...7:|
00013e00  6a 25 3d 31 38 0d 3c 95  0d c9 26 46 3a 6a 25 3d  |j%=18.<...&F:j%=|
00013e10  32 30 0d 3c 96 0c c9 34  3a 6a 25 3d 32 31 0d 3c  |20.<...4:j%=21.<|
00013e20  97 0d c9 26 43 3a 6a 25  3d 32 33 0d 3c 98 0c c9  |...&C:j%=23.<...|
00013e30  31 3a 6a 25 3d 32 34 0d  3c 99 0c c9 39 3a 6a 25  |1:j%=24.<...9:j%|
00013e40  3d 32 36 0d 3c 9a 0d c9  31 37 3a 6a 25 3d 32 37  |=26.<...17:j%=27|
00013e50  0d 3c 9b 0c c9 36 3a 6a  25 3d 32 38 0d 3c 9c 3f  |.<...6:j%=28.<.?|
00013e60  cb 3a 64 25 3d 32 31 2b  6a 25 3a 6a 24 3d a4 41  |.:d%=21+j%:j$=.A|
00013e70  28 22 4d 6f 6e 33 22 29  2b 22 20 22 3a f5 64 25  |("Mon3")+" ":.d%|
00013e80  2b 3d 31 3a 63 25 3d 35  2d 28 64 25 83 37 29 3a  |+=1:c%=5-(d%.7):|
00013e90  e7 63 25 3d 2d 31 8c 63  25 3d 36 0d 3c 9d 3c fd  |.c%=-1.c%=6.<.<.|
00013ea0  63 25 3d 43 69 25 3a 59  25 28 73 69 25 2d 31 2c  |c%=Ci%:Y%(si%-1,|
00013eb0  43 69 25 29 3d 64 25 3a  e7 64 25 3e 33 31 8c 64  |Ci%)=d%:.d%>31.d|
00013ec0  25 2d 3d 33 31 3a 6a 24  3d a4 41 28 22 4d 6f 6e  |%-=31:j$=.A("Mon|
00013ed0  34 22 29 2b 22 20 22 0d  3c 9e 09 ed 3a ed 3a e1  |4")+" ".<...:.:.|
00013ee0  0d 3c 9f 91 dd f2 72 75  3a 63 79 25 3d 32 3a 61  |.<....ru:cy%=2:a|
00013ef0  69 25 3d 26 42 3a 49 4a  25 3d b9 3a 68 4a 25 3d  |i%=&B:IJ%=.:hJ%=|
00013f00  31 3a 57 69 25 3d a4 41  79 28 a4 41 28 22 47 59  |1:Wi%=.Ay(.A("GY|
00013f10  4d 22 29 2b a4 61 79 28  22 47 59 4d 22 2c 31 2c  |M")+.ay("GYM",1,|
00013f20  33 2c 22 5c 22 2c 22 22  29 2b 22 5c 22 29 3a 41  |3,"\","")+"\"):A|
00013f30  61 25 3d a4 7a 79 28 57  69 25 2c 33 2c 22 22 2c  |a%=.zy(Wi%,3,"",|
00013f40  35 2c 22 41 30 2d 39 22  29 3a 51 6c 25 3d a4 43  |5,"A0-9"):Ql%=.C|
00013f50  28 22 43 41 4d 22 2c 22  43 41 4d 22 2c 31 2c 33  |("CAM","CAM",1,3|
00013f60  29 3a f2 59 28 51 6c 25  2c 32 2c 57 69 25 29 3a  |):.Y(Ql%,2,Wi%):|
00013f70  e1 0d 3c a0 0c dd a4 58  5f 3d 51 6c 25 0d 3c a1  |..<....X_=Ql%.<.|
00013f80  49 dd f2 42 4a 28 41 25  29 3a 42 25 28 41 25 29  |I..BJ(A%):B%(A%)|
00013f90  3d 26 37 37 64 3a 57 25  28 41 25 29 3d 26 66 66  |=&77d:W%(A%)=&ff|
00013fa0  66 3a 53 25 28 41 25 29  3d 4d 79 25 3a 4d 24 28  |f:S%(A%)=My%:M$(|
00013fb0  41 25 29 3d a4 41 28 22  43 61 6c 54 61 62 22 29  |A%)=.A("CalTab")|
00013fc0  3a f2 55 4a 3a e1 0d 3c  a2 2d dd f2 43 4a 28 65  |:.UJ:..<.-..CJ(e|
00013fd0  25 2c 79 25 2c 5f 25 2c  55 25 29 3a e7 63 79 25  |%,y%,_%,U%):.cy%|
00013fe0  3d 31 8c f2 75 4a 28 65  25 2c 79 25 2c 5f 25 2c  |=1..uJ(e%,y%,_%,|
00013ff0  55 25 29 0d 3c a3 1b e7  63 79 25 3d 32 8c f2 4e  |U%).<...cy%=2..N|
00014000  75 28 65 25 2c 79 25 2c  5f 25 2c 55 25 29 0d 3c  |u(e%,y%,_%,U%).<|
00014010  a4 05 e1 0d 3c a5 1b dd  f2 6b 5f 28 6c 25 2c 63  |....<....k_(l%,c|
00014020  6c 25 29 3a ea 41 25 3a  c8 8e 21 6c 25 ca 0d 3c  |l%):.A%:..!l%..<|
00014030  a6 25 c9 30 2c 31 3a 41  25 3d 63 79 25 3a 63 79  |.%.0,1:A%=cy%:cy|
00014040  25 3d 21 6c 25 2b 31 3a  6d 4a 25 3d 63 79 25 3c  |%=!l%+1:mJ%=cy%<|
00014050  3e 41 25 0d 3c a7 0e c9  32 3a c8 8e 6c 25 21 34  |>A%.<...2:..l%!4|
00014060  ca 0d 3c a8 25 c9 30 3a  e7 76 25 3c 3e 4d 79 25  |..<.%.0:.v%<>My%|
00014070  2b 28 63 79 25 3d 31 29  8c 76 25 3d 4d 79 25 3a  |+(cy%=1).v%=My%:|
00014080  74 25 3d 63 6c 25 0d 3c  a9 29 c9 31 3a e7 76 25  |t%=cl%.<.).1:.v%|
00014090  3c 3e 4d 79 25 2b 31 2b  28 63 79 25 3d 31 29 8c  |<>My%+1+(cy%=1).|
000140a0  76 25 3d 4d 79 25 2b 31  3a 74 25 3d 63 6c 25 0d  |v%=My%+1:t%=cl%.|
000140b0  3c aa 29 c9 32 3a e7 76  25 3c 3e 4d 79 25 2d 31  |<.).2:.v%<>My%-1|
000140c0  2b 28 63 79 25 3d 31 29  8c 76 25 3d 4d 79 25 2d  |+(cy%=1).v%=My%-|
000140d0  31 3a 74 25 3d 63 6c 25  0d 3c ab 14 c9 33 3a 41  |1:t%=cl%.<...3:A|
000140e0  25 3d bb 24 41 61 25 3a  c8 8e b9 ca 0d 3c ac 2c  |%=.$Aa%:.....<.,|
000140f0  c9 41 25 3c 26 37 37 64  3a f2 42 28 a4 4f 28 22  |.A%<&77d:.B(.O("|
00014100  45 72 72 4d 69 6e 22 2c  c3 26 37 37 64 2c 22 22  |ErrMin",.&77d,""|
00014110  2c 22 22 2c 22 22 29 29  0d 3c ad 2c c9 41 25 3e  |,"","")).<.,.A%>|
00014120  26 66 66 66 3a f2 42 28  a4 4f 28 22 45 72 72 4d  |&fff:.B(.O("ErrM|
00014130  61 78 22 2c c3 26 66 66  66 2c 22 22 2c 22 22 2c  |ax",.&fff,"","",|
00014140  22 22 29 29 0d 3c ae 21  7f e7 76 25 3c 3e 41 25  |"")).<.!..v%<>A%|
00014150  2b 28 63 79 25 3d 31 29  8c 76 25 3d 41 25 3a 74  |+(cy%=1).v%=A%:t|
00014160  25 3d 63 6c 25 0d 3c af  05 cb 0d 3c b0 05 cb 0d  |%=cl%.<....<....|
00014170  3c b1 07 cb 3a e1 0d 3c  b2 30 dd f2 52 79 28 70  |<...:..<.0..Ry(p|
00014180  25 29 3a 76 25 2b 3d 28  33 2d 63 79 25 29 2a 70  |%):v%+=(3-cy%)*p|
00014190  25 3a e7 76 25 3c 42 25  28 74 25 29 8c 76 25 3d  |%:.v%<B%(t%).v%=|
000141a0  42 25 28 74 25 29 0d 3c  b3 18 e7 76 25 3e 57 25  |B%(t%).<...v%>W%|
000141b0  28 74 25 29 8c 76 25 3d  57 25 28 74 25 29 0d 3c  |(t%).v%=W%(t%).<|
000141c0  b4 05 e1 0d 3c b5 33 dd  f2 55 75 28 67 25 2c 79  |....<.3..Uu(g%,y|
000141d0  25 2c 61 25 2c 51 25 2c  69 5f 25 2c 71 4a 25 29  |%,a%,Q%,i_%,qJ%)|
000141e0  3a ea 56 61 25 2c 64 25  2c 7a 25 2c 65 25 3a e7  |:.Va%,d%,z%,e%:.|
000141f0  67 25 3c 3e 32 8c 0d 3c  b6 24 56 61 25 3d a4 6a  |g%<>2..<.$Va%=.j|
00014200  79 28 79 25 2c 61 25 2c  51 25 2c 64 25 2c 7a 25  |y(y%,a%,Q%,d%,z%|
00014210  2c 65 25 29 3a e7 56 61  25 8c 0d 3c b7 0d c8 8e  |,e%):.Va%..<....|
00014220  68 4a 25 2b 67 25 ca 0d  3c b8 28 c9 35 2c 33 3a  |hJ%+g%..<.(.5,3:|
00014230  f2 48 28 64 25 2c 7a 25  2c 65 25 29 3a 74 25 3d  |.H(d%,z%,e%):t%=|
00014240  a4 47 28 33 29 3a 76 25  3d 53 25 28 74 25 29 0d  |.G(3):v%=S%(t%).|
00014250  3c b9 1b c9 36 2c 32 3a  f2 73 28 64 25 2c 7a 25  |<...6,2:.s(d%,z%|
00014260  2c 65 25 29 3a 56 4a 25  3d b9 0d 3c ba 05 cb 0d  |,e%):VJ%=..<....|
00014270  3c bb 05 cd 0d 3c bc 07  cd 3a e1 0d 3c bd 1c dd  |<....<...:..<...|
00014280  a4 62 79 28 73 25 2c 42  79 25 29 3a 6f 25 3d b9  |.by(s%,By%):o%=.|
00014290  3a c8 8e 42 79 25 ca 0d  3c be 0f c9 34 31 34 3a  |:..By%..<...414:|
000142a0  f2 52 79 28 31 29 0d 3c  bf 10 c9 34 31 35 3a f2  |.Ry(1).<...415:.|
000142b0  52 79 28 2d 31 29 0d 3c  c0 1f c9 33 30 3a e7 76  |Ry(-1).<...30:.v|
000142c0  25 3c 3e 4d 79 25 2b 28  63 79 25 3d 31 29 8c 76  |%<>My%+(cy%=1).v|
000142d0  25 3d 4d 79 25 0d 3c c1  09 7f 6f 25 3d a3 0d 3c  |%=My%.<...o%=..<|
000142e0  c2 09 cb 3a 3d 6f 25 0d  3c c3 40 dd f2 4e 4a 28  |...:=o%.<.@..NJ(|
000142f0  6c 25 2c 78 25 29 3a e7  62 4a 25 3d 41 79 25 8c  |l%,x%):.bJ%=Ay%.|
00014300  f2 67 28 78 25 2c 36 2c  21 6c 25 29 3a f2 57 28  |.g(x%,6,!l%):.W(|
00014310  41 79 25 2c 30 2c 2d 31  29 3a f2 53 28 41 79 25  |Ay%,0,-1):.S(Ay%|
00014320  2c 21 6c 25 2c 31 29 0d  3c c4 05 e1 0d 3c c5 16  |,!l%,1).<....<..|
00014330  dd a4 72 79 28 71 25 2c  73 25 2c 42 79 25 29 3a  |..ry(q%,s%,By%):|
00014340  3d a3 0d 3c c6 35 dd f2  76 5f 28 77 25 29 3a d5  |=..<.5..v_(w%):.|
00014350  23 77 25 2c 63 79 25 3a  d5 23 77 25 2c 49 4a 25  |#w%,cy%:.#w%,IJ%|
00014360  2b 35 3a d5 23 77 25 2c  21 46 4a 25 3a d5 23 77  |+5:.#w%,!FJ%:.#w|
00014370  25 2c 68 4a 25 3a e1 0d  3c c7 34 dd f2 65 4a 28  |%,hJ%:..<.4..eJ(|
00014380  77 25 29 3a 63 79 25 3d  9a 23 77 25 3a 49 4a 25  |w%):cy%=.#w%:IJ%|
00014390  3d 9a 23 77 25 2d 35 3a  61 69 25 3d 9a 23 77 25  |=.#w%-5:ai%=.#w%|
000143a0  3a 68 4a 25 3d 9a 23 77  25 3a e1 0d 3c c8 20 dd  |:hJ%=.#w%:..<. .|
000143b0  f2 64 75 28 78 25 2c 46  79 25 2c 6c 25 2c 61 25  |.du(x%,Fy%,l%,a%|
000143c0  2c 51 25 29 3a c8 8e 46  79 25 ca 0d 3c c9 1f c9  |,Q%):..Fy%..<...|
000143d0  37 2c 31 2c 34 2c 35 3a  e7 67 25 3c 3e 32 f2 5a  |7,1,4,5:.g%<>2.Z|
000143e0  28 78 25 2c 46 79 25 2c  31 29 0d 3c ca 3b c9 36  |(x%,Fy%,1).<.;.6|
000143f0  3a f2 57 28 41 79 25 2c  30 2c 2d 31 29 3a f2 53  |:.W(Ay%,0,-1):.S|
00014400  28 41 79 25 2c a4 75 28  78 25 2c 36 29 2c 31 29  |(Ay%,.u(x%,6),1)|
00014410  3a f2 46 28 41 79 25 2c  61 25 2c 51 25 2c 78 25  |:.F(Ay%,a%,Q%,x%|
00014420  2c 46 79 25 29 0d 3c cb  8b c9 39 3a e7 a4 4d 28  |,Fy%).<...9:..M(|
00014430  78 25 2c 39 29 3d a4 41  28 22 53 65 74 41 6c 61  |x%,9)=.A("SetAla|
00014440  72 6d 22 29 2b 22 2f 22  2b a4 41 28 22 47 6f 74  |rm")+"/"+.A("Got|
00014450  6f 44 69 61 72 79 22 29  8c f2 41 28 78 25 2c 39  |oDiary")..A(x%,9|
00014460  2c a4 41 28 22 47 6f 74  6f 44 69 61 72 79 22 29  |,.A("GotoDiary")|
00014470  2b 22 2f 22 2b a4 41 28  22 53 65 74 41 6c 61 72  |+"/"+.A("SetAlar|
00014480  6d 22 29 29 8b f2 41 28  78 25 2c 39 2c a4 41 28  |m"))..A(x%,9,.A(|
00014490  22 53 65 74 41 6c 61 72  6d 22 29 2b 22 2f 22 2b  |"SetAlarm")+"/"+|
000144a0  a4 41 28 22 47 6f 74 6f  44 69 61 72 79 22 29 29  |.A("GotoDiary"))|
000144b0  0d 3c cc 07 cb 3a e1 0d  3c cd ba dd f2 4f 75 28  |.<...:..<....Ou(|
000144c0  78 25 29 3a f2 5a 28 78  25 2c 37 2c 2d 28 63 79  |x%):.Z(x%,7,-(cy|
000144d0  25 3d 31 29 29 3a f2 5a  28 78 25 2c 31 2c 2d 28  |%=1)):.Z(x%,1,-(|
000144e0  63 79 25 3d 32 29 29 3a  f2 67 28 78 25 2c 36 2c  |cy%=2)):.g(x%,6,|
000144f0  21 46 4a 25 29 3a f2 5a  28 78 25 2c 34 2c 2d ac  |!FJ%):.Z(x%,4,-.|
00014500  49 4a 25 29 3a f2 5a 28  78 25 2c 35 2c 2d 49 4a  |IJ%):.Z(x%,5,-IJ|
00014510  25 29 3a e7 68 4a 25 3d  31 8c f2 41 28 78 25 2c  |%):.hJ%=1..A(x%,|
00014520  39 2c a4 41 28 22 47 6f  74 6f 44 69 61 72 79 22  |9,.A("GotoDiary"|
00014530  29 2b 22 2f 22 2b a4 41  28 22 53 65 74 41 6c 61  |)+"/"+.A("SetAla|
00014540  72 6d 22 29 29 8b f2 41  28 78 25 2c 39 2c a4 41  |rm"))..A(x%,9,.A|
00014550  28 22 53 65 74 41 6c 61  72 6d 22 29 2b 22 2f 22  |("SetAlarm")+"/"|
00014560  2b a4 41 28 22 47 6f 74  6f 44 69 61 72 79 22 29  |+.A("GotoDiary")|
00014570  29 0d 3c ce 05 e1 0d 3c  cf 22 dd f2 4b 4a 28 78  |).<....<."..KJ(x|
00014580  25 29 3a e7 a4 5a 28 78  25 2c 37 29 8c 63 79 25  |%):..Z(x%,7).cy%|
00014590  3d 31 8b 63 79 25 3d 32  0d 3c d0 57 49 4a 25 3d  |=1.cy%=2.<.WIJ%=|
000145a0  a4 5a 28 78 25 2c 35 29  3a 21 46 4a 25 3d a4 75  |.Z(x%,5):!FJ%=.u|
000145b0  28 78 25 2c 36 29 3a e7  a4 4d 28 78 25 2c 39 29  |(x%,6):..M(x%,9)|
000145c0  3d a4 41 28 22 47 6f 74  6f 44 69 61 72 79 22 29  |=.A("GotoDiary")|
000145d0  2b 22 2f 22 2b a4 41 28  22 53 65 74 41 6c 61 72  |+"/"+.A("SetAlar|
000145e0  6d 22 29 8c 68 4a 25 3d  31 8b 68 4a 25 3d 32 0d  |m").hJ%=1.hJ%=2.|
000145f0  3c d1 05 e1 0d 3c d2 3f  dd a4 6a 79 28 79 25 2c  |<....<.?..jy(y%,|
00014600  61 25 2c 51 25 2c f8 64  25 2c f8 7a 25 2c f8 65  |a%,Q%,.d%,.z%,.e|
00014610  25 29 3a ea 6d 5f 25 2c  41 5f 25 2c 6a 79 25 2c  |%):.m_%,A_%,jy%,|
00014620  79 79 25 2c 66 75 25 2c  74 75 25 3a e7 63 79 25  |yy%,fu%,tu%:.cy%|
00014630  3d 31 8c 0d 3c d3 da 6d  5f 25 3d 28 75 25 2d 33  |=1..<..m_%=(u%-3|
00014640  32 29 2f 32 3a 41 5f 25  3d 28 6b 25 2d 35 30 29  |2)/2:A_%=(k%-50)|
00014650  2f 36 3a 6a 79 25 3d 6d  5f 25 2f 37 3a 79 79 25  |/6:jy%=m_%/7:yy%|
00014660  3d 28 41 5f 25 2d 26 41  29 2f 38 3a 65 25 3d 76  |=(A_%-&A)/8:e%=v|
00014670  25 2b 94 79 25 3a 7a 25  3d 32 2a 28 28 2d 51 25  |%+.y%:z%=2*((-Q%|
00014680  2d 35 30 29 81 41 5f 25  29 2b 28 28 61 25 2d 32  |-50).A_%)+((a%-2|
00014690  30 29 81 28 28 75 25 2d  38 29 2f 32 29 29 3a 61  |0).((u%-8)/2)):a|
000146a0  25 2d 3d 32 30 2b 28 7a  25 83 32 29 2a 28 28 75  |%-=20+(z%.2)*((u|
000146b0  25 2d 38 29 2f 32 29 3a  51 25 3d 2d 51 25 2d 35  |%-8)/2):Q%=-Q%-5|
000146c0  30 2d 28 28 7a 25 81 32  29 2a 41 5f 25 29 3a 7a  |0-((z%.2)*A_%):z|
000146d0  25 2b 3d 31 3a 66 75 25  3d 28 61 25 2b 6a 79 25  |%+=1:fu%=(a%+jy%|
000146e0  2a 28 31 2d 30 2e 31 32  29 2b 32 30 2a 94 79 25  |*(1-0.12)+20*.y%|
000146f0  29 81 6a 79 25 3a 74 75  25 3d 28 28 51 25 2d 26  |).jy%:tu%=((Q%-&|
00014700  41 2d 79 79 25 29 81 79  79 25 29 2d 31 0d 3c d4  |A-yy%).yy%)-1.<.|
00014710  2b e7 66 75 25 3e 30 80  66 75 25 3c 38 8c 64 25  |+.fu%>0.fu%<8.d%|
00014720  3d 31 2b 66 75 25 2b 37  2a 74 75 25 2d a4 48 28  |=1+fu%+7*tu%-.H(|
00014730  31 2c 7a 25 2c 65 25 29  0d 3c d5 f7 cc 3a 6d 5f  |1,z%,e%).<...:m_|
00014740  25 3d 28 75 25 2d 34 30  29 2f 32 3a 41 5f 25 3d  |%=(u%-40)/2:A_%=|
00014750  28 6b 25 2d 35 30 29 2f  33 3a 6a 79 25 3d 6d 5f  |(k%-50)/3:jy%=m_|
00014760  25 2f 37 3a 79 79 25 3d  28 41 5f 25 2d 26 41 29  |%/7:yy%=(A_%-&A)|
00014770  2f 38 3a 65 25 3d 76 25  3a 7a 25 3d 32 2a 28 28  |/8:e%=v%:z%=2*((|
00014780  2d 51 25 2d 35 30 29 81  41 5f 25 29 2b 28 28 61  |-Q%-50).A_%)+((a|
00014790  25 2d 32 30 29 81 28 28  75 25 2d 38 29 2f 32 29  |%-20).((u%-8)/2)|
000147a0  29 3a 61 25 2d 3d 32 30  2b 28 7a 25 83 32 29 2a  |):a%-=20+(z%.2)*|
000147b0  28 28 75 25 2d 38 29 2f  32 29 3a 51 25 3d 2d 51  |((u%-8)/2):Q%=-Q|
000147c0  25 2d 35 30 2d 28 28 7a  25 81 32 29 2a 41 5f 25  |%-50-((z%.2)*A_%|
000147d0  29 3a 7a 25 2b 3d 31 2b  36 2a 94 79 25 3a 66 75  |):z%+=1+6*.y%:fu|
000147e0  25 3d 28 61 25 2d 6a 79  25 2a 30 2e 32 35 2b 32  |%=(a%-jy%*0.25+2|
000147f0  30 2a 94 79 25 29 81 6a  79 25 2d 31 3a 74 75 25  |0*.y%).jy%-1:tu%|
00014800  3d 51 25 81 79 79 25 3a  e7 74 75 25 3e 30 80 74  |=Q%.yy%:.tu%>0.t|
00014810  75 25 3c 38 8c 64 25 3d  31 2b 74 75 25 2b 37 2a  |u%<8.d%=1+tu%+7*|
00014820  66 75 25 2d a4 48 28 31  2c 7a 25 2c 65 25 29 0d  |fu%-.H(1,z%,e%).|
00014830  3c d6 0e cd 3a e7 65 25  3c 3e 2d 31 8c 0d 3c d7  |<...:.e%<>-1..<.|
00014840  31 e7 64 25 3c 3d 30 84  64 25 3e a4 44 28 7a 25  |1.d%<=0.d%>.D(z%|
00014850  2c 65 25 29 84 65 25 3e  26 66 66 66 8c 65 25 3d  |,e%).e%>&fff.e%=|
00014860  2d 31 3a 64 25 3d 2d 31  3a 7a 25 3d 2d 31 0d 3c  |-1:d%=-1:z%=-1.<|
00014870  d8 0d cd 3a 3d 28 65 25  3e 30 29 0d 3c d9 83 dd  |...:=(e%>0).<...|
00014880  f2 4e 75 28 65 25 2c 79  25 2c 5f 25 2c 55 25 29  |.Nu(e%,y%,_%,U%)|
00014890  3a ea 7a 25 2c 6a 25 2c  63 25 2c 6a 79 25 2c 79  |:.z%,j%,c%,jy%,y|
000148a0  79 25 2c 70 61 25 2c 41  24 2c 72 25 2c 41 25 2c  |y%,pa%,A$,r%,A%,|
000148b0  42 25 2c 43 25 2c 44 25  2c 45 25 2c 46 25 2c 47  |B%,C%,D%,E%,F%,G|
000148c0  25 2c 48 25 3a 6d 5f 25  3d 28 75 25 2d 34 30 29  |%,H%:m_%=(u%-40)|
000148d0  2f 32 3a 41 5f 25 3d 28  6b 25 2d 35 30 29 2f 33  |/2:A_%=(k%-50)/3|
000148e0  3a 79 79 25 3d 28 41 5f  25 2d 26 41 29 2f 38 3a  |:yy%=(A_%-&A)/8:|
000148f0  6a 79 25 3d 6d 5f 25 2f  37 3a e7 79 25 8c 0d 3c  |jy%=m_%/7:.y%..<|
00014900  da 1a e7 65 25 3c 57 25  28 74 25 29 8c f2 49 28  |...e%<W%(t%)..I(|
00014910  31 2c 5f 25 2c 55 25 29  0d 3c db 1b cc e7 65 25  |1,_%,U%).<....e%|
00014920  3e 42 25 28 74 25 29 8c  f2 49 28 30 2c 5f 25 2c  |>B%(t%)..I(0,_%,|
00014930  55 25 29 0d 3c dc e5 cd  3a 51 75 25 3d a4 50 28  |U%).<...:Qu%=.P(|
00014940  22 48 6f 6d 65 72 74 6f  6e 2e 4d 65 64 69 75 6d  |"Homerton.Medium|
00014950  22 2c 32 30 2c 32 30 29  3a 6c 75 25 3d a4 50 28  |",20,20):lu%=.P(|
00014960  22 48 6f 6d 65 72 74 6f  6e 2e 4d 65 64 69 75 6d  |"Homerton.Medium|
00014970  22 2c 26 44 2c 26 44 29  3a 6f 75 25 3d a4 50 28  |",&D,&D):ou%=.P(|
00014980  22 48 6f 6d 65 72 74 6f  6e 2e 4d 65 64 69 75 6d  |"Homerton.Medium|
00014990  22 2c 39 2c 39 29 3a f2  56 28 30 2c 37 29 3a f2  |",9,9):.V(0,7):.|
000149a0  4c 28 51 75 25 2c c3 65  25 2c 30 2c 5f 25 2b 75  |L(Qu%,.e%,0,_%+u|
000149b0  25 2f 32 2c 55 25 2d 38  29 3a e3 72 25 3d 31 b8  |%/2,U%-8):.r%=1.|
000149c0  36 3a 7a 25 3d 72 25 2b  36 2a 79 25 3a 61 25 3d  |6:z%=r%+6*y%:a%=|
000149d0  28 72 25 2d 31 29 83 32  2a 28 75 25 2d 38 29 2f  |(r%-1).2*(u%-8)/|
000149e0  32 2b 32 30 2d 32 30 2a  79 25 3a 51 25 3d 35 30  |2+20-20*y%:Q%=50|
000149f0  2b 28 72 25 2d 31 29 81  32 2a 41 5f 25 3a e7 a4  |+(r%-1).2*A_%:..|
00014a00  46 28 5f 25 2b 61 25 2c  55 25 2d 51 25 2c 6d 5f  |F(_%+a%,U%-Q%,m_|
00014a10  25 2c 2d 41 5f 25 29 8c  0d 3c dd d8 f2 4c 28 6c  |%,-A_%)..<...L(l|
00014a20  75 25 2c a4 58 28 7a 25  2c 2d 31 29 2c 2d 31 2c  |u%,.X(z%,-1),-1,|
00014a30  5f 25 2b 61 25 2c 55 25  2d 51 25 29 3a 6a 25 3d  |_%+a%,U%-Q%):j%=|
00014a40  a4 48 28 31 2c 7a 25 2c  65 25 29 2d 31 3a c8 99  |.H(1,z%,e%)-1:..|
00014a50  26 34 30 30 38 41 2c 6f  75 25 3a 51 25 2b 3d 79  |&4008A,ou%:Q%+=y|
00014a60  79 25 2d 36 3a e3 63 25  3d 31 b8 37 3a c8 99 26  |y%-6:.c%=1.7:..&|
00014a70  34 30 30 38 36 2c 2c a4  74 28 63 25 2c 32 29 2c  |40086,,.t(c%,2),|
00014a80  31 3c 3c 34 2c 5f 25 2b  61 25 2c 55 25 2d 51 25  |1<<4,_%+a%,U%-Q%|
00014a90  2d 79 79 25 2a 63 25 3a  ed 3a 61 25 2b 3d 6a 79  |-yy%*c%:.:a%+=jy|
00014aa0  25 3a 41 25 3d 55 25 2d  51 25 3a 44 25 3d 5f 25  |%:A%=U%-Q%:D%=_%|
00014ab0  2b 61 25 3a 46 25 3d a4  44 28 7a 25 2c 65 25 29  |+a%:F%=.D(z%,e%)|
00014ac0  3a 47 25 3d 6a 25 3a 48  25 3d 6a 79 25 3a 42 25  |:G%=j%:H%=jy%:B%|
00014ad0  3d 2d 79 79 25 3a e7 65  25 3d 4d 79 25 80 7a 25  |=-yy%:.e%=My%.z%|
00014ae0  3d 66 79 25 8c 43 25 3d  44 79 25 8b 43 25 3d 30  |=fy%.C%=Dy%.C%=0|
00014af0  0d 3c de 68 e7 49 4a 25  80 43 25 3c 3e 30 8c 43  |.<.h.IJ%.C%<>0.C|
00014b00  25 3d 30 3a c8 99 26 34  30 30 45 36 2c 21 46 4a  |%=0:..&400E6,!FJ|
00014b10  25 3a c8 93 5f 25 2b 61  25 2b 28 28 6a 25 2d 31  |%:.._%+a%+((j%-1|
00014b20  2b 44 79 25 29 81 37 2b  30 2e 32 35 29 2a 6a 79  |+Dy%).7+0.25)*jy|
00014b30  25 2c 55 25 2d 51 25 2d  28 28 6a 25 2d 31 2b 44  |%,U%-Q%-((j%-1+D|
00014b40  79 25 29 83 37 2b 30 2e  32 35 29 2a 79 79 25 2c  |y%).7+0.25)*yy%,|
00014b50  6a 79 25 2c 2d 79 79 25  0d 3c df 06 d6 7a 0d 3c  |jy%,-yy%.<...z.<|
00014b60  e0 21 cd 3a ed 3a f2 55  28 51 75 25 29 3a f2 55  |.!.:.:.U(Qu%):.U|
00014b70  28 6c 75 25 29 3a f2 55  28 6f 75 25 29 3a e1 0d  |(lu%):.U(ou%):..|
00014b80  3c e1 89 dd f2 75 4a 28  76 25 2c 79 25 2c 5f 25  |<....uJ(v%,y%,_%|
00014b90  2c 55 25 29 3a ea 7a 25  2c 6a 25 2c 63 25 2c 6a  |,U%):.z%,j%,c%,j|
00014ba0  79 25 2c 6b 61 25 2c 41  5f 25 2c 41 24 2c 41 25  |y%,ka%,A_%,A$,A%|
00014bb0  2c 42 25 2c 43 25 2c 44  25 2c 45 25 2c 46 25 2c  |,B%,C%,D%,E%,F%,|
00014bc0  47 25 2c 48 25 3a 6d 5f  25 3d 28 75 25 2d 33 32  |G%,H%:m_%=(u%-32|
00014bd0  29 2f 32 3a 41 5f 25 3d  28 6b 25 2d 35 30 29 2f  |)/2:A_%=(k%-50)/|
00014be0  36 3a 6a 79 25 3d 6d 5f  25 2f 37 3a 79 79 25 3d  |6:jy%=m_%/7:yy%=|
00014bf0  28 41 5f 25 2d 26 41 29  2f 38 3a 65 25 3d 76 25  |(A_%-&A)/8:e%=v%|
00014c00  2b 79 25 3a e7 79 25 8c  0d 3c e2 1c e7 76 25 2b  |+y%:.y%..<...v%+|
00014c10  31 3c 57 25 28 74 25 29  8c f2 49 28 31 2c 5f 25  |1<W%(t%)..I(1,_%|
00014c20  2c 55 25 29 0d 3c e3 1b  cc e7 76 25 3e 42 25 28  |,U%).<....v%>B%(|
00014c30  74 25 29 8c f2 49 28 30  2c 5f 25 2c 55 25 29 0d  |t%)..I(0,_%,U%).|
00014c40  3c e4 10 cd 3a e7 65 25  3c 3d 26 66 66 66 8c 0d  |<...:.e%<=&fff..|
00014c50  3c e5 d9 51 75 25 3d a4  50 28 22 48 6f 6d 65 72  |<..Qu%=.P("Homer|
00014c60  74 6f 6e 2e 4d 65 64 69  75 6d 22 2c 32 30 2c 32  |ton.Medium",20,2|
00014c70  30 29 3a 6c 75 25 3d a4  50 28 22 48 6f 6d 65 72  |0):lu%=.P("Homer|
00014c80  74 6f 6e 2e 4d 65 64 69  75 6d 22 2c 26 41 2c 26  |ton.Medium",&A,&|
00014c90  41 29 3a 6f 75 25 3d a4  50 28 22 48 6f 6d 65 72  |A):ou%=.P("Homer|
00014ca0  74 6f 6e 2e 4d 65 64 69  75 6d 22 2c 37 2c 37 29  |ton.Medium",7,7)|
00014cb0  3a f2 56 28 30 2c 37 29  3a f2 4c 28 51 75 25 2c  |:.V(0,7):.L(Qu%,|
00014cc0  c3 65 25 2c 30 2c 5f 25  2b 75 25 2f 32 2c 55 25  |.e%,0,_%+u%/2,U%|
00014cd0  2d 38 29 3a e3 7a 25 3d  31 b8 26 43 3a 61 25 3d  |-8):.z%=1.&C:a%=|
00014ce0  28 7a 25 2d 31 29 83 32  2a 28 75 25 2d 38 29 2f  |(z%-1).2*(u%-8)/|
00014cf0  32 2b 32 30 2d 32 30 2a  79 25 3a 51 25 3d 35 30  |2+20-20*y%:Q%=50|
00014d00  2b 28 7a 25 2d 31 29 81  32 2a 41 5f 25 3a e7 a4  |+(z%-1).2*A_%:..|
00014d10  46 28 5f 25 2b 61 25 2c  55 25 2d 51 25 2c 6d 5f  |F(_%+a%,U%-Q%,m_|
00014d20  25 2c 2d 41 5f 25 29 8c  0d 3c e6 ec f2 4c 28 6c  |%,-A_%)..<...L(l|
00014d30  75 25 2c a4 58 28 7a 25  2c 2d 31 29 2c 2d 31 2c  |u%,.X(z%,-1),-1,|
00014d40  5f 25 2b 61 25 2c 55 25  2d 51 25 29 3a 6a 25 3d  |_%+a%,U%-Q%):j%=|
00014d50  a4 48 28 31 2c 7a 25 2c  65 25 29 2d 31 3a c8 99  |.H(1,z%,e%)-1:..|
00014d60  26 34 30 30 38 41 2c 6f  75 25 3a 51 25 2b 3d 79  |&4008A,ou%:Q%+=y|
00014d70  79 25 2b 34 3a e3 63 25  3d 31 b8 37 3a c8 99 26  |y%+4:.c%=1.7:..&|
00014d80  34 30 30 38 36 2c 2c 22  20 20 22 2b a4 74 28 63  |40086,,"  "+.t(c|
00014d90  25 2c 32 29 2c 31 3c 3c  34 2c 5f 25 2b 61 25 2b  |%,2),1<<4,_%+a%+|
00014da0  6a 79 25 2a 63 25 2d 6a  79 25 2c 55 25 2d 51 25  |jy%*c%-jy%,U%-Q%|
00014db0  2d 79 79 25 3a ed 3a 51  25 2b 3d 79 79 25 3a 41  |-yy%:.:Q%+=yy%:A|
00014dc0  25 3d 5f 25 2b 61 25 2d  6a 79 25 3a 45 25 3d 55  |%=_%+a%-jy%:E%=U|
00014dd0  25 2d 51 25 2d 79 79 25  3a 46 25 3d a4 44 28 7a  |%-Q%-yy%:F%=.D(z|
00014de0  25 2c 65 25 29 3a 47 25  3d 6a 25 3a 48 25 3d 6a  |%,e%):G%=j%:H%=j|
00014df0  79 25 3a 42 25 3d 79 79  25 3a e7 65 25 3d 4d 79  |y%:B%=yy%:.e%=My|
00014e00  25 80 7a 25 3d 66 79 25  8c 43 25 3d 44 79 25 8b  |%.z%=fy%.C%=Dy%.|
00014e10  43 25 3d 30 0d 3c e7 6d  e7 49 4a 25 80 43 25 3c  |C%=0.<.m.IJ%.C%<|
00014e20  3e 30 8c 43 25 3d 30 3a  c8 99 26 34 30 30 45 36  |>0.C%=0:..&400E6|
00014e30  2c 21 46 4a 25 3a c8 93  5f 25 2b 61 25 2b 28 28  |,!FJ%:.._%+a%+((|
00014e40  6a 25 2d 31 2b 44 79 25  29 83 37 2b 30 2e 31 32  |j%-1+Dy%).7+0.12|
00014e50  29 2a 6a 79 25 2c 55 25  2d 51 25 2d 28 28 6a 25  |)*jy%,U%-Q%-((j%|
00014e60  2d 31 2b 44 79 25 29 81  37 2b 30 2e 31 38 29 2a  |-1+Dy%).7+0.18)*|
00014e70  79 79 25 2c 6a 79 25 2a  30 2e 37 36 2c 2d 79 79  |yy%,jy%*0.76,-yy|
00014e80  25 0d 3c e8 06 d6 52 0d  3c e9 07 cd 3a ed 0d 3c  |%.<...R.<...:..<|
00014e90  ea 1f cd 3a f2 55 28 51  75 25 29 3a f2 55 28 6c  |...:.U(Qu%):.U(l|
00014ea0  75 25 29 3a f2 55 28 6f  75 25 29 3a e1 0d 3c eb  |u%):.U(ou%):..<.|
00014eb0  f9 dd f2 55 4a 3a ea 50  25 2c 41 25 2c 4f 69 25  |...UJ:.P%,A%,Oi%|
00014ec0  2c 64 61 25 2c 43 2c 46  2c 77 2c 48 2c 53 2c 59  |,da%,C,F,w,H,S,Y|
00014ed0  2c 5a 2c 5f 2c 4d 2c 49  2c 47 2c 50 2c 41 3a de  |,Z,_,M,I,G,P,A:.|
00014ee0  64 61 25 34 35 36 3a 43  3d 26 44 3a 46 3d 26 45  |da%456:C=&D:F=&E|
00014ef0  3a 77 3d 26 46 3a 48 3d  35 3a 53 3d 36 3a 59 3d  |:w=&F:H=5:S=6:Y=|
00014f00  30 3a 5a 3d 33 3a 5f 3d  30 3a 4d 3d 34 3a 49 3d  |0:Z=3:_=0:M=4:I=|
00014f10  37 3a 47 3d 38 3a 50 3d  39 3a 41 3d 26 41 3a e3  |7:G=8:P=9:A=&A:.|
00014f20  4f 69 25 3d 30 b8 32 88  32 3a 50 25 3d 64 61 25  |Oi%=0.2.2:P%=da%|
00014f30  3a 5b 4f 50 54 4f 69 25  3a 2e 52 3a 53 54 4d 46  |:[OPTOi%:.R:STMF|
00014f40  44 28 43 29 21 2c 7b 46  7d 3a 4d 4f 56 20 47 2c  |D(C)!,{F}:MOV G,|
00014f50  31 3a 4d 4f 56 20 50 2c  32 3a 4d 4f 56 20 41 2c  |1:MOV P,2:MOV A,|
00014f60  23 30 3a 4d 4f 56 32 2c  23 31 3c 3c 34 3a 41 44  |#0:MOV2,#1<<4:AD|
00014f70  52 31 2c 44 3a 2e 4f 3a  41 44 44 20 53 2c 53 2c  |R1,D:.O:ADD S,S,|
00014f80  23 31 3a 41 44 44 20 41  2c 41 2c 23 31 3a 43 4d  |#1:ADD A,A,#1:CM|
00014f90  50 20 50 2c 41 3a 42 4c  45 51 20 4c 3a 4d 55 4c  |P P,A:BLEQ L:MUL|
00014fa0  20 5a 2c 49 2c 53 0d 3c  ec d9 41 44 44 20 5a 2c  | Z,I,S.<..ADD Z,|
00014fb0  5a 2c 59 3a 53 57 49 20  26 34 30 30 38 36 3a 43  |Z,Y:SWI &40086:C|
00014fc0  4d 50 20 50 2c 41 3a 42  4c 45 51 20 56 3a 43 4d  |MP P,A:BLEQ V:CM|
00014fd0  50 20 53 2c 23 37 3a 53  55 42 45 51 20 4d 2c 4d  |P S,#7:SUBEQ M,M|
00014fe0  2c 47 3a ec 51 20 53 2c  23 30 3a 41 44 44 31 2c  |,G:.Q S,#0:ADD1,|
00014ff0  31 2c 23 38 3a 43 4d 50  20 41 2c 48 3a 42 4e 45  |1,#8:CMP A,H:BNE|
00015000  20 4f 3a 4c 44 4d 46 44  28 43 29 21 2c 7b 70 63  | O:LDMFD(C)!,{pc|
00015010  7d 3a 2e 7a 3a 53 54 4d  46 44 28 43 29 21 2c 7b  |}:.z:STMFD(C)!,{|
00015020  46 7d 3a 4d 4f 56 20 47  2c 31 3a 4d 4f 56 20 50  |F}:MOV G,1:MOV P|
00015030  2c 32 3a 4d 4f 56 20 41  2c 23 30 3a 4d 4f 56 32  |,2:MOV A,#0:MOV2|
00015040  2c 23 31 3c 3c 34 3a 41  44 52 31 2c 44 3a 2e 73  |,#1<<4:ADR1,D:.s|
00015050  3a 41 44 44 20 53 2c 53  2c 23 31 3a 41 44 44 20  |:ADD S,S,#1:ADD |
00015060  41 2c 41 2c 23 31 3a 43  4d 50 20 50 2c 41 3a 42  |A,A,#1:CMP P,A:B|
00015070  4c 45 51 20 4c 3a 4d 55  4c 20 4d 2c 47 2c 53 0d  |LEQ L:MUL M,G,S.|
00015080  3c ed df 41 44 44 20 4d  2c 4d 2c 5f 3a 53 57 49  |<..ADD M,M,_:SWI|
00015090  20 26 34 30 30 38 36 3a  43 4d 50 20 50 2c 41 3a  | &40086:CMP P,A:|
000150a0  42 4c 45 51 20 56 3a 43  4d 50 20 53 2c 23 37 3a  |BLEQ V:CMP S,#7:|
000150b0  41 44 44 45 51 20 5a 2c  5a 2c 49 3a ec 51 20 53  |ADDEQ Z,Z,I:.Q S|
000150c0  2c 23 30 3a 41 44 44 31  2c 31 2c 23 38 3a 43 4d  |,#0:ADD1,1,#8:CM|
000150d0  50 20 41 2c 48 3a 42 4e  45 20 73 3a 4c 44 4d 46  |P A,H:BNE s:LDMF|
000150e0  44 28 43 29 21 2c 7b 70  63 7d 3a 2e 4c 3a 53 54  |D(C)!,{pc}:.L:ST|
000150f0  4d 46 44 28 43 29 21 2c  7b 46 2c 31 2d 32 7d 3a  |MFD(C)!,{F,1-2}:|
00015100  4c 44 52 32 2c 46 4a 25  3a 42 20 4b 3a 2e 56 3a  |LDR2,FJ%:B K:.V:|
00015110  53 54 4d 46 44 28 43 29  21 2c 7b 46 2c 31 2d 32  |STMFD(C)!,{F,1-2|
00015120  7d 3a 4d 4f 56 32 2c 23  37 3a 2e 4b 3a 4d 4f 56  |}:MOV2,#7:.K:MOV|
00015130  31 2c 23 30 3a 53 57 49  20 26 34 30 30 46 33 3a  |1,#0:SWI &400F3:|
00015140  4c 44 4d 46 44 28 43 29  21 2c 7b 70 63 2c 31 2d  |LDMFD(C)!,{pc,1-|
00015150  32 7d 3a 2e 46 4a 25 26  61 69 25 3a 2e 44 0d 3c  |2}:.FJ%&ai%:.D.<|
00015160  ee 3c 5d e3 41 25 3d 31  b8 33 31 3a 5b 4f 50 54  |.<].A%=1.31:[OPT|
00015170  4f 69 25 3a 3d c4 32 2d  32 2a 28 41 25 3c 26 41  |Oi%:=.2-2*(A%<&A|
00015180  29 2c 22 20 22 29 2b c3  41 25 2b bd 30 3a 41 4c  |)," ")+.A%+.0:AL|
00015190  49 47 4e 3a 5d ed 3a ed  3a e1 0d ff              |IGN:].:.:...|
0001519c