Home » Recent acquisitions » Acorn ADFS disks » adfs_ArchimedesWorld_15_3.adf » !Organiser_Organiser » !Upgrade/!Organiser/!RunImage
!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_ArchimedesWorld_15_3.adf » !Organiser_Organiser |
| Filename: | !Upgrade/!Organiser/!RunImage |
| Read OK: | ✔ |
| File size: | 13E18 bytes |
| Load address: | 0000 |
| Exec address: | 0000 |
Duplicates
There is 1 duplicate copy of this file in the archive:
- Recent acquisitions » Acorn ADFS disks » adfs_ArchimedesWorld_15_03.adf » !Organiser_Organiser » !Upgrade/!Organiser/!RunImage
- Recent acquisitions » Acorn ADFS disks » adfs_ArchimedesWorld_15_3.adf » !Organiser_Organiser » !Upgrade/!Organiser/!RunImage
File contents
1REM>!RunImage
2REMProduced by BasCompress v1.71 (19 Sep 1996)
3PROCYJ:z%=0:ml%=FALSE:di%=-1:ONERRORPROCVy:ERROREXTERL,REPORT$+" at line "+STR$ERL
4eu%=-1:Ju%=0::DIMU%512:J%=U%+256:PROCpu:z%=OPENIN"<Organiser$Dir>.Resources.!Language":_$=GET$#z%:d$="<Organiser$Dir>.Resources."+_$:CLOSE#z%:z%=0:PROCFJ(d$+".Messages"):PROCwJ(FNA("Title"),"<Organiser$Dir>","1.20 (27 Oct 97)",TRUE):SYS66TOJu%:eu%=Ju%+500:WHILENOTDu%:PROCd(1):ENDWHILE:PROCVy:END
5DEFPROCVy:IFml%=TRUETHENSYS&406C2:ERROREXTERL,REPORT$+" at line "+STR$ERL:END
6ml%=TRUE:f$=REPORT$+" at line "+STR$ERL:ii%=ERR:ONERRORERROREXTii%,f$
7IFz%<>0THENCLOSE#z%:z%=0
8PROCnJ:PROCCy:SYS&400DD:ENDPROC
9DEFPROCd(Al%):LOCALA$,Ui%,Sl%,py%,uJ%:uJ%=FALSE:IFey%ANDSu%THENPROCt
10IFIu%ANDey%<>Ni%THENNi%=ey%:PROCi(i%,ti%,FNA("Title")+STRING$(-(ey%=TRUE)," *"),TRUE)
11IFAl%AND1THENSl%=&64
12IFB$<>""THENSl%=0
13IF(XJ%<>-1)ANDVy%THENSl%=0
14Al%=(Al%OR(3<<&B)+(1<<5))ANDNOT(1+(3<<17)):IFSl%>0THEN
15SYS66TOmi%:WHILEmi%>Ju%:Ju%+=&64:ENDWHILE:SYS&400E1,Al%,U%,Ju%TOUi%
16ELSESYS&400C7,Al%,U%TOUi%
17ENDIF:CASEUi%OF
18WHEN0:CASETRUEOF
19WHENXJ%<>-1ANDVy%:PROCVu
20WHENJu%>eu%ANDeu%<>-1:PROCW_
21WHEN(Sl%<>0ORB$<>"")ANDdi%<>FNQy:PROCu:PROCI_
22WHENB$<>"":PROCiu
23ENDCASE
24WHEN1:PROCVJ
25WHEN2:IF!U%=I_%THEN
26PROCyJ
27ELSE:IF!U%=i%ANDFJ%THENU%!20=0
28IFNOTFNVyTHENPROC`y
29SYS&400C5,,U%:IF!U%=i%ANDFJ%THENPROC`_
30ENDIF
31WHEN3:CASE!U%OF
32WHENf%:PROCn
33WHENI_%:PROCh
34WHENLy%:PROCBy
35WHENHy%:PROCy
36WHENVJ%:PROCzy
37WHENzy%:PROCCy
38OTHERWISEPROCG(!U%)
39ENDCASE
40WHEN4:IF0<>0THENSYS&400E9,36,,"ptr_default",1
41WHEN5
42WHEN6:IFIu%THENPROCe(U%!&C,U%!16,U%!8,!U%,U%!4)
43WHEN7
44WHEN8:PROC`J(!U%,U%!4,U%!24)
45WHEN9:PROCBJ
46WHEN17,18:PROCgu
47WHEN19:IFU%!4=su%ANDU%!16=&4AF80THEN
48A$=FNN(U%+20):IFjJ%=1ANDFNt("Alias$URLOpen_HTTP")THEN
49SYS&400DE,"URLOpen_HTTP "+A$
50ENDIF:IFjJ%=2ANDFNt("Alias$URLOpen_MailTo")THEN
51SYS&400DE,"URLOpen_MailTo "+A$
52ENDIF
53ENDIF
54ENDCASE:IFDu%THENPROCVy:END
55ENDPROC
56DEFFNVy=(ry%<>U%!16-U%!8ORxy%<>U%!&C-U%!4)
57DEFPROCuLOCALA%,S%,M%,H%,R%,M$,ri%,vi%,bi%,hi%,Rl%,I$:IF(qy%AND4)=4ANDMJ%=0THEN
58M$=FNK("%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:Rl%=TRUE:SYS46,316,Z_%,"clock",0TOri%,vi%,bi%,hi%:GCOL1:RECTANGLEFILL0,0,U_%,Cu%:R%=56:ORIGINU_%/2,Cu%/2:GCOLP%(0):CIRCLEFILL0,0,R%:GCOLP%(3)
59FORA%=0TO330STEP30:LINER%*SINRADA%,R%*COSRADA%,(R%-&A)*SINRADA%,(R%-&A)*COSRADA%:NEXT:GCOLP%(1)+(P%(1)-P%(2))*(s_%ANDNOTIu%):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)
60PLOT85,(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
61IFqy%AND2THENLINE0,0,(R%*0.9)*SINRADS%,(R%*0.9)*COSRADS%
62SYS46,ri%,vi%,bi%,hi%
63ELSE:IF(qy%AND8)=8ORMJ%>0THEN
64SYS&400EC,-1,-1TO,,H%:M$=STR$(H%DIV&400)+"k":IF$aJ%<>M$THEN$aJ%=M$:Rl%=TRUE
65ELSE:IF(qy%AND16)=0THEN
66M$=":%mi":IF(qy%AND2)=2THENM$+=".%se"
67IFr_%THENM$="%z24"+M$ELSEM$="%z12"+M$+" %am"
68ELSEM$=N$
69ENDIF:M$=FNK(M$):IFM$<>$aJ%THEN$aJ%=M$:Rl%=TRUE
70ENDIF
71ENDIF:IFRl%THEN!U%=-1-7*ABS(u_%):U%!4=NJ%:U%!8=0:U%!&C=0:SYS&400CD,,U%:WAIT
72ENDPROC
73DEFPROCI_:IFUy%<>FNIORby%<>FNVORFy%<>FNLTHEN
74qJ%=FNF(0,0,Uy%,by%,Fy%):Fy%=FNL:by%=FNV:Uy%=FNI:IFxJ%THENPROCPy
75IFVy%THENpy%=0:PROCO
76Pu%=TRUE:V_%=t%:z_%=v%:PROCJ_:PROCc
77ENDIF:IFxJ%ANDmJ%<>0THENIFFNG(mJ%,FNz)<>1THENPROCgJ
78IFrJ%<>-1THENIFFNG(rJ%!&C,FNz)<>1THENPROCyu
79IFJ_%>0THENVDU7:J_%-=1:IFJ_%=0THENJ_%=-&A
80IFJ_%<0THENJ_%+=1:IFJ_%=0THENJ_%=&A
81IFMJ%>0THENMJ%-=1:IFMJ%=0THENPROCm:PROCu
82di%=FNQy:ENDPROC
83DEFFNK(A$):?J%=3:SYS7,&E,J%:SYS&C1,J%,J%,&80,A$:=FNN(J%)
84DEFFNf=VALFNK("%24")
85DEFFNi=VALFNK("%MI")
86DEFFNQy=VALFNK("%SE")
87DEFFNI=VALFNK("%DY")
88DEFFNV=VALFNK("%MN")
89DEFFNL=VALFNK("%CE%YR")
90DEFFNF(fy%,b%,c%,r%,Q%)=fy%OR(b%<<6)OR(c%<<&B)OR(r%<<16)OR(Q%<<20)
91DEFPROCP(s%,RETURNfy%,RETURNb%,RETURNc%,RETURNr%,RETURNQ%):fy%=s%AND63:b%=(s%>>6)AND31:c%=(s%>>&B)AND31:r%=(s%>>16)AND&F:Q%=(s%>>20)AND&FFF:ENDPROC
92DEFFNn(s%)=s%ANDNOT&7FF
93DEFFNvy(s%)=s%AND63
94DEFFNXy(s%)=(s%>>6)AND31
95DEFFNz=FNF(FNi,FNf,FNI,FNV,FNL)
96DEFFNG(A%,B%):LOCALBi%,jl%,Li%,ei%,Ki%,Y_%:LOCALWi%,Ji%,Qi%,si%,ai%:IFA%<>B%THEN
97PROCP(A%,Ki%,ei%,Li%,jl%,Bi%):PROCP(B%,ai%,si%,Qi%,Ji%,Wi%):CASETRUEOF
98WHENBi%>Wi%:Y_%=1
99WHENBi%<Wi%:Y_%=-1
100WHENjl%>Ji%:Y_%=1
101WHENjl%<Ji%:Y_%=-1
102WHENLi%>Qi%:Y_%=1
103WHENLi%<Qi%:Y_%=-1
104WHENei%>si%:Y_%=1
105WHENei%<si%:Y_%=-1
106WHENKi%>ai%:Y_%=1
107WHENKi%<ai%:Y_%=-1
108ENDCASE
109ELSEY_%=0
110ENDIF:=Y_%
111DEFPROCeu(_%,Q%,Ry%)SYS&400E6,5:RECTANGLEFILL_%+20,Q%,36-20,20:RECTANGLEFILL_%+20,Q%+Ny%,36-20,-20:SYS&400E6,Ry%:RECTANGLEFILL_%,Q%+20,36-20,Ny%-2*20
112RECTANGLEFILL_%+36,Q%+2*20,-20,Ny%-4*20:PROCT(5,Ry%,_%+20,Q%,20,2):PROCT(5,Ry%,_%+20,Q%+Ny%,20,3):PROCT(Ry%,5,_%+36-20,Q%+2*20,20,4):PROCT(Ry%,5,_%+36-20,Q%+Ny%-2*20,20,1):ENDPROC
113DEFPROCwu(_%,Q%,Ry%)SYS&400E6,5:RECTANGLEFILL_%-20,Q%,20-36,20:RECTANGLEFILL_%-20,Q%+Ny%,20-36,-20:SYS&400E6,Ry%:RECTANGLEFILL_%,Q%+20,-36+20,Ny%-2*20:RECTANGLEFILL_%-36,Q%+2*20,20,Ny%-4*20
114PROCT(5,Ry%,_%-20,Q%,20,1):PROCT(5,Ry%,_%-20,Q%+Ny%,20,4):PROCT(Ry%,5,_%-36+20,Q%+2*20,20,3):PROCT(Ry%,5,_%-36+20,Q%+Ny%-2*20,20,2):ENDPROC
115DEFPROCT_(e%,a%,K%):IFe%=i%THENPROCZu(e%,a%,K%)ELSEPROCCu(e%,a%,K%)
116ENDPROC
117DEFPROCZu(e%,a%,K%)LOCALA%,_%,Q%,Y%:LOCALbl%,li%,pi%:SYS46,40+256,Z_%,"ring"TO,,,li%,pi%:SYS&400E6,0:PROCX(a%+dy%-32,K%-o%,j%+32,-m%):IFt%>0THENPROCX(a%+yy%,K%-o%,j%+32,-m%)
118SYS&400E6,1:PROCX(a%,K%,5,-ry%):PROCX(a%+i_%+36+20,K%,5,-ry%):PROCX(a%,K%,xy%,-5):PROCX(a%,K%-ry%,xy%,5):SYS&400E6,5:IFt%=0THENPROCX(a%+yy%,K%-o%,j%+32,-m%)
119IFt%=0THENPROCX(a%+GJ%,K%-o%,32,-m%)
120PROCX(a%+l_%,K%-o%-t%*Ny%,36,-m%+t%*Ny%):PROCX(a%+i_%,K%-o%,36,-Ny%*t%):PROCX(a%+i_%,K%-o%-iy%*Ny%,36,-m%+iy%*Ny%):PROCX(a%+5,K%-5,20,-m%-2*20):PROCX(a%+5,K%-5,xy%-2*5,-20):PROCX(a%+xy%-5,K%-5,-20,-m%-2*20):PROCX(a%+5,K%-ry%+5,xy%-2*5,20):IFFNS(a%+GJ%,K%-o%,&64,-m%)THEN
121RECTANGLEFILLa%+GJ%+32,K%-o%,&64-2*32,-m%:_%=FNa(a%+GJ%+&64/2):Y%=FNa(K%-o%-m%/(_J%+1)):FORA%=1TO_J%:IFFNS(_%-40-8,Y%-8,2*(40+8),40+8)AND(Ku%AND1<<(A%-1))>0THEN
122SYS&400ED,256,Z_%,"ring",,,,J%,J%+&80:SYS46,52+256,Z_%,"ring",_%-li%,Y%-pi%/2,8,J%,J%+&80
123ENDIF:Y%-=FNa(m%/(_J%+1)):NEXT
124ENDIF:IFFNS(a%+5,K%-5-20,20,20)PROCT(5,1,a%+5+20,K%-5-20,20,2)
125IFFNS(a%+5,K%-ry%+5,20,20)PROCT(5,1,a%+5+20,K%-ry%+5+20,20,3)
126IFFNS(a%+xy%-5-20,K%-5-20,20,20)PROCT(5,1,a%+xy%-5-20,K%-5-20,20,1)
127IFFNS(a%+xy%-5-20,K%-ry%+5,20,20)PROCT(5,1,a%+xy%-5-20,K%-ry%+5+20,20,4)
128SYS&40081,,"Homerton.Medium",&96,&96TObl%:FORA%=1TOiy%:IFt%<A%THEN
129IFFNS(a%+i_%,K%-o%-(Ny%*A%),36,Ny%)THEN
130PROCeu(a%+i_%,K%-o%-(Ny%*A%),D%(A%)):PROCV(D%(A%),I%(A%)):PROCey(bl%,M$(A%),0,0,a%+i_%+36/2,K%-o%-(Ny%*(A%-0.5)),1)
131ENDIF
132ELSE:IFFNS(a%+l_%,K%-o%-(Ny%*A%),36,Ny%)THEN
133PROCwu(a%+l_%+36,K%-o%-(Ny%*A%),D%(A%)):PROCV(D%(A%),I%(A%)):PROCey(bl%,M$(A%),0,0,a%+l_%+36/2,K%-o%-(Ny%*(A%-0.5)),-1)
134ENDIF
135ENDIF:NEXT:IFt%>0ANDFNS(a%+yy%,K%-o%,j%+32,-m%)ANDNOT`J%THENPROCny(0,a%+yy%,K%-o%)
136IFFNS(a%+dy%-32,K%-o%,j%+32,-m%)ANDNOT`J%THENPROCny(1,a%+dy%,K%-o%)
137SYS&40082,bl%:ENDPROC
138DEFPROCR(h%,a%,K%):SYS&400ED,256,Z_%,"corner",,,,J%,J%+&80:IFh%=1ANDFNS(a%+j%,K%-m%,-32,32)THEN
139SYS46,47+256,Z_%,"corner":SYS46,52+256,Z_%,"corner",a%+j%-16*2,K%-m%+2,8,J%,J%+&80:SYS46,47+256,Z_%,"corner":PROCS_(a%+j%-32,K%,G%(1))
140ENDIF:IFh%=0THEN
141G%(0)=a%:IFFNS(a%,K%-m%,32,32)THEN
142SYS46,52+256,Z_%,"corner",a%+2,K%-m%+2,8,J%,J%+&80:PROCS_(a%,K%,G%(0))
143ENDIF
144ENDIF:ENDPROC
145DEFPROCS_(a%,K%,RETURNcy%):!J%=i%:IFcy%>=0THENJ%!4=cy%:SYS&400C4,,J%
146SYS&400CB,,J%:J%!4=a%-J%!4:J%!8=K%-J%!16-m%:J%!&C=J%!4+32:J%!16=J%!8+32:J%!20=&7003119:J%!24=Ol%:J%!32=0:IFh%THENJ%!28=Ii%ELSEJ%!28=Ti%
147SYS&400C2,,J%TOcy%:ENDPROC
148DEFPROCp_:!J%=i%:IFG%(0)>=0THENJ%!4=G%(0):SYS&400C4,,J%
149IFG%(1)>=0THENJ%!4=G%(1):SYS&400C4,,J%
150G%()=-1:ENDPROC
151DEFPROCCu(e%,a%,K%):LOCALR%,A%:a%+=(24+&B8)/2:K%-=(64+&D0)/2:R%=56:SYS&400E6,1:RECTANGLEFILL0,0,&BB8:SYS&400E6,X%(0):CIRCLEFILLa%,K%,R%:SYS&400E6,X%(3):FORA%=0TO330STEP30:LINEa%+R%*SINRADA%,K%+R%*COSRADA%,a%+(R%-&A)*SINRADA%,K%+(R%-&A)*COSRADA%:NEXT:SYS&400E6,X%(1):CIRCLEa%,K%,R%:SYS&400E6,X%(5):A%=60
152MOVEa%,K%:MOVEa%+(R%*0.35)*SINRAD(A%-9),K%+(R%*0.35)*COSRAD(A%-9):PLOT85,a%+(R%*0.35)*SINRAD(A%+9),K%+(R%*0.35)*COSRAD(A%+9):MOVEa%+(R%*0.35)*SINRAD(A%-9),K%+(R%*0.35)*COSRAD(A%-9):PLOT85,a%+(R%*0.7)*SINRADA%,K%+(R%*0.7)*COSRADA%:SYS&400E6,X%(4):A%=300
153MOVEa%,K%:MOVEa%+(R%*0.25)*SINRAD(A%-9),K%+(R%*0.25)*COSRAD(A%-9):PLOT85,a%+(R%*0.25)*SINRAD(A%+9),K%+(R%*0.25)*COSRAD(A%+9):MOVEa%+(R%*0.25)*SINRAD(A%-9),K%+(R%*0.25)*COSRAD(A%-9):PLOT85,a%+(R%*0.5)*SINRADA%,K%+(R%*0.5)*COSRADA%:SYS&400E6,X%(6):MOVEa%,K%:DRAWBY0,-(R%*0.9):CIRCLEFILLa%,K%,2:ENDPROC
154DEFFNc(u%,zJ%):=LEFT$(FNA("Day"+STR$(((u%-1)MOD7)+1)),zJ%)
155DEFFNDy(u%,zJ%):LOCALA$,q$:A$=",Monday,Tuesday,Wednesday,Thursday,Friday,Saturday,Sunday,":u%=((u%-1)MOD7)+1:REPEATA$=MID$(A$,INSTR(A$,",")+1):u%-=1:UNTILu%=0:q$=LEFT$(A$,INSTR(A$,",")-1):IFzJ%>0THENq$=LEFT$(q$,zJ%)
156=q$
157DEFFNIy(Wl%,zJ%):LOCALA$,O$:A$=",January,February,March,April,May,June,July,August,September,October,November,December,":Wl%=((Wl%-1)MOD&C)+1:REPEATA$=MID$(A$,INSTR(A$,",")+1):Wl%-=1:UNTILWl%<=0:O$=LEFT$(A$,INSTR(A$,",")-1):IFzJ%>0THENO$=LEFT$(O$,zJ%)
158=O$
159DEFFNA_(d%):=STR$d%+FNNy(d%)
160DEFFNNy(d%):LOCALA$,Z$,C$,A%,Oy%:A$=FNA("th"):Z$=LEFT$(A$,INSTR(A$,",")-1):WHILEINSTR(A$,",")ANDNOTOy%:A$=MID$(A$,INSTR(A$,",")+1):C$=LEFT$(A$,INSTR(A$,",")-1):IFINSTR(C$,"#")THEN
161IFRIGHT$(STR$d%,LENC$-1)=MID$(C$,2)THENOy%=TRUE
162ELSEIFVALC$=d%THENOy%=TRUE
163ENDIF:ENDWHILE:IFOy%THEN
164WHILEVALA$>0ORASC(A$)=35:A$=MID$(A$,INSTR(A$,",")+1):ENDWHILE:Z$=LEFT$(A$,INSTR(A$,",")-1)
165ENDIF:=Z$
166DEFFNU(Wl%,zJ%):=LEFT$(FNA("Mon"+STR$(((Wl%-1)MOD&C)+1)),zJ%)
167DEFFNoy(b%,r%,Xu%,r_%):LOCALA$,Z$:IFNOTr_%THEN
168IFb%>&BTHENZ$=" "+FNA("pm")ELSEZ$=" "+FNA("am")
169ENDIF:IFb%>&CANDNOTr_%THENb%-=&C
170IFr_%THENA$=STRING$(-(b%<&A),"0")ELSEIFb%=0THENb%=&C
171A$+=STR$b%+":"+STRING$(-(r%<&A),"0")+STR$r%:IFXu%<>-1THENA$+=":"+STRING$(-(Xu%<&A),"0")+STR$Xu%
172=A$+Z$
173DEFPROCwJ(k$,`$,Zy$,sa%):K$=k$:V$=Zy$:Ru%=0:Du%=FALSE:J$=`$:c_%=0:x_%=0:Hu%=FALSE:Vy%=FALSE:SYS&400C0,&C8,&4B534154,K$TOza%,su%:PROCMJ:IFsa%THENPROCdu(aa%,d$+".Templates")
174PROCt_:PROCHu:ENDPROC
175DEFPROCgu:LOCALS%:CASEU%!16OF
176WHEN0:Du%=TRUE
177WHEN1:PROCOJ(U%!40,FNN(U%+44))
178WHEN3:PROCg_(U%!40,FNN(U%+44))
179WHEN8:PROCAJ
180WHEN&400C1:PROCF_
181WHEN&400C2:IFFNN(U%+28)=K$ANDU%!4<>su%THEN
182PROCB(FNA("ErrRun")):PROCeJ(U%!4)
183ENDIF
184WHEN&400CC:CASEU%!20OF
185WHENi%:$(U%+36)=FNA("Title")
186WHENf%,Ly%:$(U%+36)=FNA("Alarm")
187WHENay%:$(U%+36)=FNA("Date")
188WHENI_%:$(U%+36)=FNA("Settings")
189WHENHy%,VJ%:$(U%+36)=FNA("AnniTab")
190WHENAy%:$(U%+36)=FNA("Setclock")
191ENDCASE:!U%=56:$(U%+28)="org":S%=U%!4:U%!4=su%:SWAPU%!8,U%!&C:SYS&400E7,17,U%,S%
192ENDCASE:ENDPROC
193DEFFNPy(`u%,S$):SYS&400CF,,J%:=((`u%=&FFF)OR(`u%=&DFE))ORJ%!&C=f%
194DEFPROCg_(`u%,S$):LOCALz%:IFFNPy(`u%,S$)THEN
195SWAPU%!8,U%!&C:U%!16=4:SYS&400E7,17,U%,U%!4:IFJ%!&C<>f%THEN
196IFzy%<>-1THENPROCCy
197OSCLI"Copy "+S$+" "+J$+".Import ~c ~v f":IFS$="<Wimp$Scrap>"THENOSCLI"Remove <Wimp$Scrap>"
198PROCRJ(J$+".Import")
199ELSEPROCv_(S$)
200ENDIF
201ENDIF:ENDPROC
202DEFFNu:IFey%THEN
203IFFNBy(FNA("ErrSave"),TRUE)THENPROCt
204ENDIF:=TRUE
205DEFPROCF_LOCALXa%,Qa%,M%:IF(qy%AND4)>0THEN
206IFFN`y(MODE)THENM%=20ELSEM%=&C
207SYS&2002E,281,Z_%,"clock":SYS53,M%,4TO,,Xa%:SYS53,M%,5TO,,Qa%:SYS46,8+512,Z_%TO,,,,,F%:SYS46,271,Z_%,"clock",0,&74/(1<<Xa%),&78/(1<<Qa%),M%:PROCu
208ENDIF:ENDPROC
209DEFPROCe(e%,w%,n%,Xy%,Ty%)LOCALA%,B%,A$,X_%:V_%=t%:z_%=v%:X_%=1+2*(n%=1):CASEe%OF
210WHENi%:!U%=i%:SYS&400CB,,U%:a%=U%!4-U%!20:K%=U%!16-U%!24:PROCu_(w%,n%,Xy%-a%,Ty%-K%,a%,K%)
211WHEN-2:CASEn%OF
212WHEN1:PROCs(Uy%,by%,Fy%)
213WHEN2:BJ%=-1:PROCC(Qu%,Xy%,FNby(Qu%),e%,w%)
214WHEN4:CASETRUEOF
215WHENINKEY-1:IFYy%=0THENPROCRy
216WHENINKEY-3:MJ%=5:PROCm
217OTHERWISEPROCx(i%,-1,-1)
218ENDCASE
219ENDCASE
220WHENay%:CASEw%OF
221WHEN0:PROCH(d_%,0,-1):PROCJ(d_%,HJ%-1,TRUE):PROCC(d_%,Xy%,Ty%,e%,w%)
222WHEN2,3:PROCLy(-1,-1,(1+2*(w%=2))*X_%*(1-49*(INKEY-1)))
223WHEN35:PROCry:IFn%<>1THENPROCG(ay%)
224WHEN36:PROCG(ay%)
225OTHERWISE:IFn%=2THEN
226PROCH(d_%,0,-1):PROCJ(d_%,HJ%-1,TRUE):PROCC(d_%,Xy%,Ty%,e%,w%)
227ELSEPROCLy(w%-3,-1,0):IFn%<256THENPROCry
228ENDIF
229ENDCASE
230WHENAy%:IFn%<>2THEN
231CASEw%OF
232WHEN1:PROCe(Ay%,9+FNM(Ay%,1),4,0,0)
233WHEN2:PROCAy(P_%,N_%,Q_%,Ay%,w%)
234WHEN3:IFFNy<>FNM(Ay%,1)THENPROCSy(-1)
235A%=VAL(FNZ(Ay%,4))MOD&C -&C*t_%:A$=STR$A%:A$=STRING$(2-LENA$,"0")+A$:$J%=CHR$24+FNDy(FNH(P_%,N_%,Q_%),3)+","+STRING$(-(P_%<&A),"0")+STR$P_%+" "+FNIy(N_%,3)+" "+STR$Q_%+"."+A$+":"+FNZ(Ay%,5)+":00":SYS&20007,&F,J%TO;B%:IFn%=4THENPROCG(Ay%)
236WHEN8:A%=VAL(FNZ(Ay%,4))MOD&C -&C*t_%+X_%:IFA%=24THENA%=0:PROCF(P_%,N_%,Q_%,1,0,0):PROCA(Ay%,2,FNQ(P_%,N_%,Q_%,TRUE))
237IFA%=-1THENA%=23:PROCF(P_%,N_%,Q_%,-1,0,0):PROCA(Ay%,2,FNQ(P_%,N_%,Q_%,TRUE))
238t_%=A%>&B:IFA%>&BTHENPROCA(Ay%,7,FNA("pm"))ELSEPROCA(Ay%,7,FNA("am"))
239A%=A%MOD&C:A%-=&C*(A%=0):PROCA(Ay%,4,STR$A%)
240WHEN9:A%=VAL(FNZ(Ay%,4))MOD&C -&C*t_%-X_%:IFA%=-1THENA%=23:PROCF(P_%,N_%,Q_%,-1,0,0):PROCA(Ay%,2,FNQ(P_%,N_%,Q_%,TRUE))
241IFA%=24THENA%=0:PROCF(P_%,N_%,Q_%,1,0,0):PROCA(Ay%,2,FNQ(P_%,N_%,Q_%,TRUE))
242t_%=A%>&B:IFA%>&BTHENPROCA(Ay%,7,FNA("pm"))ELSEPROCA(Ay%,7,FNA("am"))
243A%=A%MOD&C:A%-=&C*(A%=0):PROCA(Ay%,4,STR$A%)
244WHEN&A,&C:A%=VALFNZ(Ay%,5)+(1-9*(w%=&A))*X_%:IFA%>59THENA%-=60:PROCe(Ay%,8,4,0,0)
245IFA%<0THENA%+=60:PROCe(Ay%,9,4,0,0)
246PROCA(Ay%,5,STRING$(2-LENSTR$A%,"0")+STR$A%)
247WHEN&B,&D:A%=VALFNZ(Ay%,5)-(1-9*(w%=&B))*X_%:IFA%>59THENA%-=60:PROCe(Ay%,8,4,0,0)
248IFA%<0THENA%+=60:PROCe(Ay%,9,4,0,0)
249PROCA(Ay%,5,STRING$(2-LENSTR$A%,"0")+STR$A%)
250WHEN7:t_%=NOTt_%:IFt_%THENPROCA(Ay%,7,FNA("pm"))ELSEPROCA(Ay%,7,FNA("am"))
251ENDCASE
252ENDIF
253WHENf%:PROClu(Xy%,Ty%,e%,w%,X_%)
254WHENLy%:PROCjJ(Xy%,Ty%,e%,w%)
255WHENZu%:PROCW_
256WHENHy%:PROCtJ(w%)
257WHENI_%,Yy%:PROCNu(e%,w%,n%,Xy%,Ty%)
258WHENVJ%:PROCzy
259WHENzy%:PROCh_(e%,w%,n%,Xy%,Ty%)
260OTHERWISEPROCDJ(e%,w%,n%,Xy%,Ty%)
261ENDCASE:PROCQy:ENDPROC
262DEFPROCu_(w%,n%,_%,Q%,o_%,wJ%):LOCALva%,ca%,A%,QJ%:A%=n%-3-(n%=1):IFn%<>2THEN
263IFw%>=0ANDn%<>2THEN
264CASEw%OF
265WHENG%(0):PROCX_(-A%)
266WHENG%(1):PROCX_(A%)
267OTHERWISEPROCo_(w%)
268ENDCASE
269ELSE:FORA%=1TOiy%:IFt%<A%THENX%=i_%ELSEX%=l_%
270IFFNr(_%,Q%,X%,-o%-A%*Ny%,36,Ny%)THEN
271IFn%<>2THENt%=A%:v%=S%(t%)
272ENDIF:NEXT
273ENDIF
274ENDIF:IF(w%=-1ORn%=2)ANDFNr(_%,Q%,yy%,-o%,j%,-m%)THENPROChy(n%,FALSE,_%-yy%,Q%+o%,o_%,wJ%)
275IF(w%=-1ORn%=2)ANDFNr(_%,Q%,dy%,-o%,j%,-m%)THENPROChy(n%,TRUE,_%-dy%,Q%+o%,o_%,wJ%)
276IFn%=2THEN
277IFT%(t%)<>-1THENPROCC(T%(t%),Xy%,Ty%,e%,w%)
278ELSEIFNOTQJ%THENPROCM(i%,-1)
279ENDIF:ENDPROC
280DEFPROCQy:IFV_%=t%THEN
281IFv%<>z_%ANDpy%=0THENpy%=1+2*(v%<z_%)
282ELSEPROCC_(V_%):PROCM(i%,-1):py%=1+2*(t%<V_%)
283ENDIF:IF(uJ%ORpy%<>0)ANDVy%THENPROCO
284S%(V_%)=z_%:S%(t%)=v%:IFV_%<>t%THENPROCby(t%):PROCpy
285ENDPROC
286DEFPROCO:PROCp_:PROCXu(py%):PROCD(i%,yy%,-o%,yy%+j%,-o%-m%):PROCD(i%,dy%,-o%,dy%+j%,-o%-m%):ENDPROC
287DEFPROCw_:PROCD(i%,yy%+j%-32,-o%,dy%+32,-o%-m%):ENDPROC
288DEFPROCpy:PROCD(i%,l_%,-o%,l_%+36,-o%-m%):PROCD(i%,i_%,-o%,i_%+36,-o%-m%):PROCD(i%,GJ%,-o%,GJ%+32,-o%-m%):ENDPROC
289DEFPROCx(e%,IJ%,Vl%):LOCALA%:A%=Vy%:IFe%=i%THEN
290IFeJ%<>-1THEN
291!J%=i%:SYS&400CB,,J%:J%!4=au%:J%!8=xu%-ry%:J%!&C=au%+xy%:J%!16=xu%:J%!28=IJ%:SYS&400C5,,J%:PROCw(i%,IJ%,0)
292ELSEPROCw(e%,IJ%,Vl%)
293ENDIF:IFNOTA%THENPROCM(i%,-1)
294ELSEPROCw(e%,IJ%,Vl%)
295ENDIF:ENDPROC
296DEFPROCXu(A%):IFMu%ANDA%<>0THEN
297LOCALqu%,_%,a%,K%,Ry%,g%,R%,C%:!J%=i%:SYS&400CB,,J%:a%=J%!4-J%!20:K%=J%!16-J%!24:Ry%=a%+dy%-&64DIV2:g%=(&64/2-32):R%=j%+&64/2:SYS&40742,0TOC%:C%+=3<<4:FOR_%=0TO&B4STEP&F:PROCvy(_%,A%):T%=TIME:REPEATUNTILTIME>T%+1:PROCvy(_%,A%):NEXT
298ENDIF:ENDPROC
299DEFPROCvy(_%,A%):!J%=i%:J%!4=0:J%!8=-ry%:J%!&C=xy%:J%!16=0:IFA%=-1THEN_%=&B4-_%
300SYS&400C9,,J%TOqu%:WHILEqu%:SYS&400E6,C%:MOVERy%+g%*COSRAD_%,K%-o%+0.2*g%*SINRAD_%:DRAWRy%+R%*COSRAD_%,K%-o%+0.2*R%*SINRAD_%:DRAWBY0,-m%:DRAWRy%+g%*COSRAD_%,K%-o%-m%:DRAWRy%+g%*COSRAD_%,K%-o%+0.2*g%*SINRAD_%:SYS&400CA,,J%TOqu%:ENDWHILE:ENDPROC
301DEFPROCBJLOCALA%,C%,Ri%,V_%,z_%,va%:Ri%=FNGy:V_%=t%:z_%=v%:CASEtJ%OF
302WHENQu%:CASE!U%OF
303WHEN0
304WHEN1:PROCs(Uy%,by%,Fy%)
305WHEN2:!U%=-1:U%!4=NJ%:SYS&400CE,,U%:!J%=Ay%:SYS&400CB,,J%:J%!4=U%!16-(J%!&C-J%!4):J%!&C=U%!16:J%!16=&88+(J%!16-J%!8):J%!28=-1:SYS&400C5,,J%:PROCA(Ay%,2,FNQ(Uy%,by%,Fy%,-1)):P_%=Uy%:N_%=by%:Q_%=Fy%:A%=FNf:t_%=A%>&B:A%=A%MOD&C:A%-=&C*(A%=0):PROCA(Ay%,4,STR$A%)
306IFt_%THENPROCA(Ay%,7,FNA("pm"))ELSEPROCA(Ay%,7,FNA("am"))
307A%=FNi:PROCA(Ay%,5,STRING$(2-LENSTR$A%,"0")+STR$A%):SYS6,&A1,&DCTO,,A%:PROCZ(Ay%,1,ABS((A%AND&80)=&80))
308WHEN3:OSCLI"Filer_Run "+J$+".!Help"
309WHEN4:IFYy%=0THENPROCRy
310WHEN5:PROCt
311WHEN6:Du%=FNu
312ENDCASE
313WHENT%(t%):PROCcu(U%,t%)
314WHENd_%:PROCLy(-1,!U%,0)
315WHENFl%:CASEiJ%OF
316WHENf%:hJ%=!U%:IF!U%>0THENC%=!U%ELSEC%=m_%
317FORA%=16TO18:PROCU(f%,A%,C%):NEXT
318WHENHy%:ol%=!U%:IF!U%=0THENA%=DJ%ELSEA%=!U%
319PROCU(Hy%,4,A%)
320ENDCASE
321WHENuu%:PROCPJ(__%,!U%)
322WHENoJ%:Q%(0)=!U%:PROCo(A%(6),18,Q%()):PROCH(oJ%,0,-1):PROCJ(oJ%,Q%(0),-1)
323OTHERWISE:CASEiJ%OF
324WHENA%(6):CASE__%OF
325WHEN2,3,4,5:IFU%!4<>-1THEN
326IF!U%=0THENPROCU(iJ%,__%,U%!4)ELSEPROCb(iJ%,__%,U%!4)
327ENDIF
328WHEN9,&A,&B,&C,&D,&E,&F:X%(__%-9)=!U%:PROCD(iJ%,24,-64,&B8,-&D0)
329WHEN20,21:Q%(__%-19)=!U%:PROCo(A%(6),18,Q%()):PROCH(By%,0,-1):PROCJ(By%,Q%(__%-19),-1)
330ENDCASE
331WHENYy%:PROCUJ(U%)
332WHENf%,Ly%:PROCiy(tJ%,U%)
333OTHERWISEPROCrJ(tJ%,U%)
334ENDCASE
335ENDCASE:IFRi%THENPROCC(tJ%,-1,-1,iJ%,__%)
336PROCQy:ENDPROC
337DEFPROCC(My%,_%,Q%,s%,Sy%)LOCALA%:IF(My%=Qu%ORMy%=T%(t%))ANDMy%<>-1THEN
338PROCJ(Zl%,0,sy%=1):PROCJ(Zl%,1,sy%=2):FORA%=0TO3:PROCK(Yi%,A%,-(BJ%<=0)):NEXT
339ENDIF:SYS&400D4,,My%,_%-64,Q%:tJ%=My%:iJ%=s%:__%=Sy%:ENDPROC
340DEFPROC`J(e%,w%,Cy%)LOCALz_%,va%,A%,B%:V_%=t%:z_%=v%:k%=FALSE:CASEe%OF
341WHENi%:k%=FNyy(w%,Cy%)
342WHEN-1
343WHENI_%,Yy%:k%=FNjy(e%,w%,Cy%)
344OTHERWISEk%=FNC_(e%,w%,Cy%)
345ENDCASE:IFk%=FALSETHEN
346k%=TRUE:CASECy%OF
347WHEN27:IFYy%<>0THENPROCh
348WHEN385:OSCLI"Filer_Run "+J$+".!Help"
349WHEN386:IFYy%=0THENPROCRy
350WHEN387:PROCt
351WHEN81-65+1:Du%=FNu
352OTHERWISEk%=FALSE
353ENDCASE:IFCy%>=401ANDCy%<=400+iy%THENt%=Cy%-400:v%=S%(t%):k%=TRUE
354ENDIF:PROCQy:IFNOTk%THENSYS&400DC,Cy%
355ENDPROC
356DEFPROCq(A$)IFA$<>""THENB$+=A$+CHR$&D
357ENDPROC
358DEFPROCiu:SYS&400D3,,U%:IF!U%<>i%AND!U%<>`%ANDZ%(t%)=2AND!U%<>-1THENSYS&400DC,ASCLEFT$(B$,1):B$=MID$(B$,2)
359ENDPROC
360DEFPROChJ:PROCB("You are about to get a message from the author of !Organiser, please read it, it will be worth your while!"):OSCLI"Filer_Run "+J$+".NewUser":ENDPROC
361DEFPROCW_:!J%=Zu%:SYS&400C3,,J%:eu%=-1:ENDPROC
362DEFPROCYy:`J%=TRUE:PROC_y(0,0,0,0,0,FALSE,FALSE):PROCd(0):`J%=FALSE:XJ%=-1:ENDPROC
363DEFPROCD_(qi%,e%,_%,Q%,Tl%,Zi%,Mi%):IFMu%ANDVy%THEN
364XJ%=e%:x_%=qi%:Bl%=_%:Hl%=Q%:Hu%=Tl%:rl%=Zi%:fl%=Mi%:!J%=20:J%!&C=0:SYS&400E7,0,J%,su%:`J%=TRUE
365ELSEPROC_y(qi%,e%,_%,Q%,Tl%,Zi%,Mi%):XJ%=-1
366ENDIF:ENDPROC
367DEFPROCVu:PROC_y(x_%,XJ%,Bl%,Hl%,Hu%,rl%,fl%):IFXJ%=`%THENPROCM(`%,9)
368XJ%=-1:`J%=FALSE:ENDPROC
369DEFPROCRy:LOCALA%,s%,b%,A$:A%=A%(1):PROCZ(A%,1,-s_%):PROCZ(A%,2,-gu%):PROCZ(A%,3,-du%):PROCZ(A%,4,-Mu%):PROCZ(A%,7,-((qy%AND9)=0)):PROCZ(A%,8,-((qy%AND4)>0)):PROCZ(A%,9,-((qy%AND5)=1)):PROCZ(A%,22,-((qy%AND8)=8)):PROCZ(A%,23,-(xJ%=-1)):PROCZ(A%,&A,-((qy%AND2)>0)):PROCZ(A%,&B,-r_%)
370PROCZ(A%,24,-((qy%AND16)=16)):PROCA(A%,25,N$):PROCZ(A%,&F,-Fu%):PROCZ(A%,16,-Su%):PROCZ(A%,&E,-(eJ%=-1)):PROCZ(A%,19,-(eJ%<>-1)):PROCZ(A%,20,-(u_%=-1)):PROCZ(A%,21,-NOT(FJ%)):PROCS(A%,&B,ABSNOT(FNM(A%,9)ANDNOTFNM(A%,24))):PROCS(A%,&A,ABSNOT(FNM(A%,8)OR(FNM(A%,9)ANDNOTFNM(A%,24)))):PROCS(A%,24,ABSNOTFNM(A%,9))
371PROCS(A%,25,ABSNOT(FNM(A%,9)ANDFNM(A%,24))):FORs%=_J%-1TO0STEP-1:A$+=STR$((Ku%>>s%)AND1):NEXT:PROCA(A%,18,A$):PROCA(A%,27,_$):PROCA(A%,&D,D$):PROCBu:!J%=I_%:SYS&400CB,,J%:s%=J%!&C-J%!4:b%=J%!16-J%!8:J%!4=(FNd-s%)/2:J%!16=FNe-(FNe-b%)/2:SYS&400C5,,J%:PROCwy(1)
372X%()=P%():Q%()=H%():PROCo(A%(6),18,H%()):FORA%=2TO5:PROCb(A%(6),A%,D%(A%-1)):PROCU(A%(6),A%,I%(A%-1)):NEXT:ENDPROC
373DEFPROCuy:LOCALA%,C%,A$:A%=A%(1):B%=qy%:s_%=FNM(A%,1):gu%=FNM(A%,2):du%=FNM(A%,3):Mu%=FNM(A%,4):D$=FNZ(A%,&D):r_%=FNM(A%,&B):qy%=-FNM(A%,9)-5*FNM(A%,8)-8*FNM(A%,22)-2*FNM(A%,&A)-16*FNM(A%,24):Fu%=FNM(A%,&F):Su%=FNM(A%,16):PROCzJ(NOTFNM(A%,21))
374eJ%=FNM(A%,&E):xJ%=FNM(A%,23):N$=FNZ(A%,25):IFNOTeJ%THEN
375!J%=i%:SYS&400CB,,J%:au%=J%!4:cl%=J%!8:wl%=J%!&C:xu%=J%!16
376ENDIF:C%=FNM(A%,20):IFC%<>u_%THENu_%=C%ELSEu_%=C%
377_J%=LENFNZ(A%,18):Ku%=EVAL("%"+FNZ(A%,18)):P%()=X%():H%()=Q%():A$=FNZ(A%,27):IFA$<>_$THENPROCGu(A$)
378FORA%=2TO5:D%(A%-1)=FNp(A%(6),A%):I%(A%-1)=FNq(A%(6),A%):NEXT:PROCTu:IFVy%THENpy%=0:PROCO:PROCw_:PROCpy
379MJ%=0:PROCm:PROCu:PROCm:ENDPROC
380DEFPROCGu(A$):z%=OPENOUT"<Organiser$Dir>.Resources.!Language":BPUT#z%,A$:CLOSE#z%:z%=0:PROCB(FNA("ErrReload")):ENDPROC
381DEFPROCwy(I%):IFYy%<>0THEN!J%=Yy%:SYS&400C6,,J%
382!J%=I_%:SYS&400CB,,J%:Yy%=A%(I%):!J%=Yy%:J%!4+=22:J%!16-=70:J%!8=J%!16-272:SYS&400C5,,J%:!J%=I_%: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
383J%!20=&17000021:J%?24=0:SYS&400C2,,J%TOI%:J%!4=I%:J%!8=0:J%!&C=0:SYS&400CD,,J%:ENDPROC
384DEFPROCyJ:!J%=Yy%:SYS&400CB,,J%:J%!4=U%!4+22:J%!16=U%!16-70:J%!8=J%!16-272:J%!28=U%!28:SYS&400C5,,J%:U%!28=Yy%:SYS&400C5,,U%:ENDPROC
385DEFPROCNu(e%,w%,n%,_%,Q%):CASEe%OF
386WHENI_%:CASEw%OF
387WHEN1,2,3,4,5,6:PROCwy(w%)
388WHEN8:PROCh
389WHEN9:PROCuy:ey%=-1:IFn%<>1THENPROCh
390WHEN&A:PROCuy:PROCt:IFn%<>1THENPROCh
391ENDCASE
392WHENA%(1):CASEw%OF
393WHEN&F:IFn%<&AANDn%<>2THENPROCB(FNA("ErrReload"))
394WHEN7,8,9,22,&E,19:IFn%<>2THEN
395PROCZ(e%,w%,1):PROCS(e%,&B,ABSNOT(FNM(e%,9)ANDNOTFNM(e%,24))):PROCS(e%,&A,ABSNOT(FNM(e%,8)OR(FNM(e%,9)ANDNOTFNM(e%,24)))):PROCS(e%,24,ABSNOTFNM(e%,9)):PROCS(e%,25,ABSNOT(FNM(e%,9)ANDFNM(e%,24)))
396ENDIF
397WHEN24:PROCS(e%,25,ABSNOTFNM(e%,24)):PROCS(e%,&A,ABSFNM(e%,24)):PROCS(e%,&B,ABSFNM(e%,24))
398WHEN27:PROCK_(A%(1),27)
399ENDCASE
400WHENA%(6):!U%=e%:SYS&400CB,,U%:_%=U%!4:Q%=U%!16-U%!24:CASEw%OF
401WHEN2,3,4,5:!Ml%=FNiy(A%(6),w%):PROCC(Ml%,_%+750+64,Q%-&64-48*(w%-2),e%,w%)
402WHEN9,&A,&B,&C,&D,&E,&F:PROCH(By%,0,-1):PROCJ(By%,X%(w%-9),-1):PROCC(By%,_%+470+64,Q%-&64-48*(w%-9),e%,w%)
403WHEN19:PROCH(oJ%,0,-1):PROCJ(oJ%,Q%(w%-19),-1):PROCC(oJ%,_%+578+64,Q%-540-48*(w%-19),e%,w%)
404WHEN20,21:PROCH(By%,0,-1):PROCJ(By%,Q%(w%-19),-1):PROCC(By%,_%+578+64,Q%-540-48*(w%-19),e%,w%)
405ENDCASE
406OTHERWISEPROCaJ(e%,w%,n%,_%,Q%)
407ENDCASE:ENDPROC
408DEFFNjy(e%,w%,n%):CASEe%OF
409WHENI_%,A%(1):k%=FALSE
410OTHERWISEk%=FNF_(e%,w%,n%)
411ENDCASE:=k%
412DEFPROCh:PROCG(Yy%):Yy%=0:PROCG(I_%):IFVy%THENPROCM(i%,-1)
413ENDPROC
414DEFPROCK_(s%,Sy%):LOCALLl%,u$,Py%,R$,a$,c$,g%:Ll%=1:u$=FNZ(s%,Sy%):REPEAT:SYS&C,9,"<Organiser$Dir>.Resources",U%,1,Ll%,256,0TO,,,g%,Ll%:IFg%=1THEN
415a$=FNN(U%):IFc$=""THENc$=a$
416IFPy%=TRUETHENR$=a$
417IFa$=u$THENPy%=TRUE
418ENDIF:UNTILLl%=-1ORR$<>"":IFR$=""THENR$=c$
419PROCA(s%,Sy%,R$):ENDPROC
420DEFPROCAy(c%,r%,Q%,s%,Sy%):LOCALM%,A%:Ri%=FALSE:PROCA(ay%,0,FNMy(c%,r%,Q%,-1)):M%=FNX(r%,Q%):FORA%=29TO31:PROC_(ay%,A%+3,-(A%>M%)):NEXT:FORA%=1TOM%:PROCg(A%,A%=c%):NEXT:HJ%=r%:PROCA(ay%,1,STR$Q%):PROCx(ay%,-1,1):Aa%=s%:Va%=Sy%:ENDPROC
421DEFPROCry:LOCALd%,q%,x%,A$:PROCG(ay%):CASEAa%OF
422WHENf%:PROCA(f%,1,FNj(W_%,C_%,b_%)):PROCY(0,0)
423WHENT%(FNP(3)):A$=FNj(d%,q%,x%):V_%=t%:z_%=v%:PROCI(d%,q%,x%)
424WHENAy%:PROCA(Ay%,2,FNj(P_%,N_%,Q_%))
425ENDCASE:ENDPROC
426DEFPROCg(c%,F%):!J%=ay%:J%!4=c%+3:SYS&400CE,,J%:$J%!32="R"+STR$(1-F%)+";F"+STR$(1-F%)+"7":IFF%THENYu%=c%
427IFGa%THENJ%!8=0:J%!&C=0ELSEJ%!8=(1+ABS(F%))<<28:J%!&C=&F<<28
428SYS&400CD,,J%:ENDPROC
429DEFPROCLy(c%,r%,Gy%):LOCALA%,M%,Q%,A$:IFc%<>-1THENPROCg(Yu%,FALSE):PROCg(c%,TRUE)
430IFr%<>-1THENPROCJ(d_%,HJ%-1,FALSE):HJ%=!U%+1:PROCJ(d_%,HJ%-1,TRUE)
431IFGy%<>0THENQ%=VALFNZ(ay%,1)+Gy%:IFQ%>=&77dANDQ%<=&fffTHENPROCA(ay%,1,STR$Q%)ELSEQ%=VALFNZ(ay%,1)
432M%=FNX(HJ%,Q%):FORA%=29TO31:PROC_(ay%,A%+3,-(A%>M%)):NEXT:IFYu%>M%THENPROCg(Yu%,FALSE):PROCg(M%,TRUE)
433PROCA(ay%,0,FNMy(Yu%,HJ%,Q%,-1)):ENDPROC
434DEFFNj(RETURNc%,RETURNr%,RETURNQ%):c%=Yu%:r%=HJ%:Q%=VALFNZ(ay%,1):=FNQ(c%,r%,Q%,-1)
435DEFFNMy(c%,r%,Q%,Ry%):LOCALA$:A$=FNQ(c%,r%,Q%,Ry%):=LEFT$(A$,LENA$-5)
436DEFPROCPy:LOCALNu%,Pl%,LJ%,KJ%,Za%,l%,b%:mJ%=0:IFxJ%THEN
437l%=FNz:b%=FNf:Pl%=J%(0,1):Nu%=J%(0,3):Nu%+=J%(0,2)-FNH(Nu%,Pl%,Fy%):KJ%=J%(1,1):LJ%=J%(1,3):LJ%+=J%(1,2)-FNH(LJ%,KJ%,Fy%):dl%=FNF(0,1,Nu%,Pl%,Fy%):gl%=FNF(0,2,LJ%,KJ%,Fy%):Za%=(FNG(dl%,l%)<1ANDFNG(l%,gl%)<1):IFFND(Nu%,Pl%,Fy%)=FND(Uy%,by%,Fy%)ANDNOTFNyTHENmJ%=dl%
438IFFND(LJ%,KJ%,Fy%)=FND(Uy%,by%,Fy%)ANDFNyTHENmJ%=gl%
439IFZa%<>FNyANDFND(Nu%,Pl%,Fy%)<>FND(Uy%,by%,Fy%)ANDFND(LJ%,KJ%,Fy%)<>FND(Uy%,by%,Fy%)THENPROCSy(-1)
440ENDIF:ENDPROC
441DEFPROCgJ:IFmJ%=gl%THENPROCSy(0)
442IFmJ%=dl%THENPROCSy(1)
443PROCPy:ENDPROC
444DEFPROCMJ:J$=FNty("Organiser$Dir"):z%=0:Iu%=0:B$="":ey%=FALSE:Ni%=FALSE:XJ%=-1:`J%=FALSE:T$=J$+".Data.":Z_%=FNuy("<Organiser$Dir>.Sprites",&7AC+&C8):DIMSa%3,aJ%32,G%(1),Ti%&B,Ii%&B,Ol%1:$Sa%="R2":G%()=-1:$Ti%="Pptr_turnl"+CHR$0:$Ii%="Pptr_turnr"+CHR$0:?Ol%=0
445DIMD%(5),I%(5),B%(5),W%(5),S%(5),Z%(5),M$(5):DIMP%(7),X%(7),H%(2),Q%(2):A$=FNwy:lJ%=FALSE:IFINSTR(A$,"-delete_all_data")THEN
446IFFNBy(FNA("ErrSure"),TRUE)THEN
447PROCB(FNA("ErrChange")):lJ%=TRUE:ey%=TRUE
448ENDIF
449ENDIF:PROCP_:PROCIJ:PROCzu:PROCly:NJ%=-1:PROCm:w_%=FNl(1*&400):PROCq_(w_%,Ru%):IFs_%THEN
450IFqy%=1THENPROCS(-1,NJ%,1)
451PROCd(NOT1)
452ELSESYS&406C0
453ENDIF:ENDPROC
454DEFPROCHu:PROCdJ:v%=S%(t%):IFPu%THENPROCJ_:PROCPy
455Iu%=TRUE:PROCx(i%,-1,-1):IFNOTgu%THENPROCG(i%)
456PROCby(t%):IFqy%>1THENPROCu
457IFqy%AND1THENPROCS(-1,NJ%,0)
458IFdu%THENPROCx(Zu%,-1,-1)ELSEeu%=-1
459IFNOTs_%THENSYS&406C1
460PROCc:PROCPy:ENDPROC
461DEFFNP(Xu%):LOCALA%:A%=iy%+1:REPEATA%-=1:UNTILZ%(A%)=Xu%ORA%=0:=A%
462DEFPROCt_:LOCALA$,S%:DIMT%(iy%):By%=FNCy(FNA("Cols")):d_%=FNC("Mon","Mon",1,&C):PROCyy(d_%,0,-1):FORS%=1TOiy%:T%(S%)=FNKy(S%):NEXT:Qu%=FNC("Title","Menu",1,7):PROCz(Qu%,0,nu%):Ml%=FNC("TabM","TabM",1,2):PROCz(Ml%,0,By%):PROCz(Ml%,1,By%):oJ%=FNC("BordM","BordM",1,5):ENDPROC
463DEFPROCly:LOCALA%,da%,Qa%:Fy%=FNL:by%=FNV:Uy%=FNI:Ny%=FNa(m%/iy%):xy%=&64+2*(36+j%+5+20):ry%=m%+2*(5+20):l_%=5+20:i_%=l_%+36+&64+2*j%:yy%=l_%+36:dy%=yy%+&64+j%:o%=5+20:GJ%=dy%-&64:j_%=m%/27::dJ%=j%-40-2*&c:ENDPROC
464DEFPROC`_:LOCALB%:IFry%<>U%!16-U%!8ORxy%<>U%!&C-U%!4THEN
465ry%=U%!16-U%!8:xy%=U%!&C-U%!4:m%=ry%-2*(5+20):j%=((xy%-&64)-2*(36+5+20))/2:PROCly:SYS30,6,,,yi%TO,,B%:!B%=`%:SYS&400CC,,B%:SYS&400C3,,B%:PROCty(B%!88,B%+4):SYS&400C1,,B%+4TO`%:SYS30,7,,B%:IFZ%(t%)=2ANDv%=0THENPROCYy:PROCA_
466SYS&400D1,i%,0,-ry%,xy%,0
467ENDIF:ENDPROC
468DEFPROCzu:LOCALA%,g$:LOCALERROR:ONERRORLOCALRESTOREERROR:CLOSE#z%:z%=0:PROCB(REPORT$+" at line "+STR$ERL+", using default settings."):PROCP_:ey%=TRUE:ENDPROC
469z%=OPENIN(J$+".Data.Settings"):o$=GET$#z%:g$=GET$#z%:D$=GET$#z%:s_%=FNR:gu%=FNR:qy%=FNY:r_%=FNR:Su%=FNR:iy%=FNY:t%=FNY:du%=FNR:Mu%=FNR:xJ%=FNR:Fu%=FNR:Ga%=Fu%:_J%=FNY:INPUT#z%,Ku%,qJ%:INPUT#z%,eJ%,au%,wl%,xu%,cl%:u_%=FNR:FJ%=FNR:INPUT#z%,j%,m%:FORA%=0TO6:P%(A%)=FNY:NEXT:FORA%=0TO2:H%(A%)=FNY:NEXT
470FORA%=1TOiy%:Z%(A%)=FNY:D%(A%)=FNY:I%(A%)=FNY:NEXT:N$=GET$#z%:REPEATPROCQJ(GET$#z%,z%):UNTILEOF#z%:CLOSE#z%:z%=0:RESTOREERROR:Pu%=(FNn(qJ%)<>FNn(FNz)):IFlJ%THEND$=FNA("Yourname")
471IFg$<>J$THENPROChJ
472ENDPROC
473DEFPROCd_:LOCALA%:z%=OPENOUT(J$+".Data.Settings"):BPUT#z%,V$:BPUT#z%,J$:BPUT#z%,D$:PROCW(s_%):PROCW(gu%):PROCW(qy%):PROCW(r_%):PROCW(Su%):PROCW(iy%):PROCW(t%):PROCW(du%):PROCW(Mu%):PROCW(xJ%):PROCW(Fu%):PROCW(_J%):PRINT#z%,Ku%,FNz:PRINT#z%,eJ%,au%,wl%,xu%,cl%:PROCW(u_%):PROCW(FJ%):PRINT#z%,j%,m%:FORA%=0TO6:PROCW(P%(A%)):NEXT
474FORA%=0TO2:PROCW(H%(A%)):NEXT:FORA%=1TOiy%:PROCW(Z%(A%)):PROCW(D%(A%)):PROCW(I%(A%)):NEXT:BPUT#z%,N$:PROCKu(z%):CLOSE#z%:z%=0:ey%=FALSE:ENDPROC
475DEFPROCt:PROCd_:PROCOu:ENDPROC
476DEFPROCP_:::J_%=FALSE:Pu%=0:qy%=1+2+4:N$="%z12:%mi:%se %am":H%()=2,2,7:s_%=FALSE:r_%=FALSE:Mu%=TRUE:Su%=TRUE:MJ%=0::::::Fu%=FALSE:u_%=TRUE:iy%=4:I%()=7:D%()=0,&B,&A,&F,9,&E:P%()=0,&F,8,&B,4,4,&B:gu%=FALSE:eJ%=-1:au%=0:xu%=0:wl%=0:cl%=0:FJ%=FALSE:t%=2:Z%()=0,1,3,5,2
477du%=TRUE:D$="Chris Morison":xJ%=FALSE:Su%=FALSE:py%=FALSE::::::j%=500:m%=920:::::::_J%=8:Ku%=&E7::::Pu%=FALSE:qJ%=0::ENDPROC
478DEFFNR=(BGET#z%=&FF)
479DEFPROCW(A%)BPUT#z%,A%:ENDPROC
480DEFFNY=BGET#z%
481DEFPROCm:LOCALB%,H%:IFMJ%>0THENB%=8ELSEB%=qy%
482IFNJ%<>-1THEN!J%=-1-7*ABS(u_%):J%!4=NJ%:SYS&400C4,,J%:U_%=0
483CASEB%ANDNOT(2+16)OF
484WHEN1,8:CASETRUEOF
485WHENB%=1:U_%=6-3*NOTr_%
486WHENB%=3:U_%=9-3*NOTr_%
487WHEN(B%AND8)>0:U_%=9:SYS&400EC,-1,-1TO,,H%:$aJ%=STR$(H%DIV&400)+"k"
488WHEN(B%AND16)>0:U_%=LENFNK(N$)+3
489ENDCASE:U_%=U_%*16:Cu%=68:J%!8=0:J%!&C=U_%:J%!16=Cu%:J%!20=&2700313D:J%!24=aJ%:J%!28=Sa%:J%!32=32
490WHEN1+4:U_%=&74:Cu%=&78:J%!8=-16:J%!&C=U_%:J%!16=Cu%:$aJ%="clock":J%!20=&3102:J%!24=aJ%:J%!28=Z_%:J%!32=32
491OTHERWISE:U_%=68:Cu%=68:J%!8=0:J%!&C=68:J%!16=68:J%!20=&3002:$(J%+24)="!Organiser"
492ENDCASE:!J%=-1-ABS(7*u_%):J%!4=0:SYS&400C2,0,J%TONJ%:IF(B%AND4)=4THENPROCF_
493PROCo(-1,NJ%,H%()):ENDPROC
494DEFPROCo(e%,cy%,K%()):LOCALg_%,A%:g_%=FNgy(e%,cy%):IFg_%<>-1THEN
495A%=INSTR(FNN(g_%),"R"):g_%?A%=ASCSTR$K%(0):PROCU(e%,cy%,K%(2)):PROCb(e%,cy%,K%(1)):!J%=e%:J%!4=cy%:J%!8=0:J%!&C=0:SYS&400CD,,J%
496ENDIF:ENDPROC
497DEFPROChu:LOCALA%,Iy%:DIMA%(6):Yy%=0:PROCmJ:nu%=FNB("Info",Iy%):i%=FNB("Main",Iy%):ti%=Iy%:`%=FNB("Addresses",Iy%):G_%=FNB("Important",Iy%):Zu%=FNB("Banner",Iy%):ay%=FNB("GetDate",Iy%):I_%=FNB("Setup",Iy%):f%=FNB("AlarmSet",Iy%):Ql%=Iy%:Ly%=FNB("AlarmWarn",Iy%)
498Hy%=FNB("Anni",Iy%):Na%=Iy%:VJ%=FNB("AnniNotify",Iy%):A%(1)=FNB("SetGen",Iy%):A%(2)=FNB("SetAdd",Iy%):A%(3)=FNB("SetAnn",Iy%):A%(4)=FNB("SetCal",Iy%):A%(5)=FNB("SetDia",Iy%):A%(6)=FNB("SetColours",Iy%):Ay%=FNB("SetClock",Iy%)
499PROCA(nu%,8,V$):PROCA(nu%,5,"!Organiser"):PROCA(nu%,6,FNA("Purp")):PROCA(Zu%,3,FNA("Vers")+" "+V$):PROCA(Zu%,6,"� Chris Morison 19"+MID$(V$,INSTR(V$,")")-2,2)):PROCA(Zu%,4,D$):FORA%=1TO31:PROCA(ay%,A%+3,STR$A%):NEXT:ENDPROC
500DEFFNB(G$,RETURNIy%):LOCALH%,S%,I%,P%,ty%,g_%:SYS&400DB,,,0,0,0,G$,0TO,S%,I%:IFS%>512THEN
501SYS&2001E,6,,,S%TO,,P%;ty%:IFty%AND1THENERROR2,FNA("ErrWin")
502ELSEP%=U%
503ENDIF:DIMg_%I%:SYS&400DB,,P%,g_%,g_%+I%,Yl%,G$,0TO,,g_%:IFG$="Main"THEN
504P%!68=&64+(&64<<16):P%!0=0:P%!4=0:P%!8=xy%:P%!&C=ry%:IFFJ%THEN
505P%!48=FNd:P%!44=-FNe:P%!28=P%!28OR(3<<29)
506ELSEP%!48=xy%:P%!44=-ry%:P%!28=P%!28ANDNOT(3<<29)
507ENDIF
508ELSE:IFG$="Setup"THEN_a%=S%
509IFG$="Addresses"THENyi%=S%
510ENDIF:IFNOTFu%ANDG$<>"Banner"THENPROCYu(P%)
511IFG$="Addresses"THENPROCty(P%!84,P%)
512P%!64=Z_%:SYS&400C1,,P%TOcy%:Iy%=P%!72:IFS%>512THENSYS30,7,,P%
513=cy%
514DEFPROCzJ(ty%):LOCALUJ%,B%:IFty%<>FJ%THEN
515SYS30,6,,,4+88+32*22TO,,UJ%:!UJ%=i%:SYS&400CC,,UJ%:B%=UJ%+4:SYS&400C3,,UJ%:IFty%THEN
516B%!48=FNd:B%!44=-FNe:B%!28=B%!28OR(3<<29)
517ELSEB%!48=xy%:B%!44=-ry%:B%!28=B%!28ANDNOT(3<<29)
518ENDIF:B%=i%:FJ%=ty%:SYS&400C1,,UJ%+4TOi%:IFx_%=B%THENx_%=i%
519IFVy%THEN!UJ%=i%:SYS&400C5,,UJ%
520SYS30,7,,UJ%
521ENDIF:ENDPROC
522DEFPROCOJ(`u%,S$):IFFNPy(`u%,S$)THEN
523SWAPU%!8,U%!&C:!U%=256:$(U%+44)="<Wimp$Scrap>"+CHR$0:U%!36=-1:U%!16=2:SYS&400E7,17,U%,U%!4
524ENDIF:ENDPROC
525DEFPROCAJ:IFFNu<>-1THENU%!&C=U%!8:U%!8=0:SYS&400E7,19,U%,U%!4
526ENDPROC
527DEFPROCVJ:LOCALqu%,a%,K%:SYS&400C8,,U%TOqu%:a%=U%!4-U%!20:K%=U%!16-U%!24:WHILEqu%:PROCT_(!U%,a%,K%):SYS&400CA,,U%TOqu%:ENDWHILE:ENDPROC
528DEFFNuy(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%
529DEFPROCM(e%,w%):!J%=e%:J%!4=w%:SYS&400CE,,J%:SYS&400D2,e%,w%,,,-1,LENFNN(J%!28):ENDPROC
530DEFFNp(e%,w%):LOCALk_%,`_%:IFFNh(e%,w%)THEN
531PROCdy(e%,w%,`_%,k_%)
532ELSE!J%=e%:J%!4=w%:SYS&400CE,,J%:k_%=(J%!24>>28)AND&F
533ENDIF:=k_%
534DEFPROCb(e%,w%,k_%):IFFNh(e%,w%)THEN
535PROCM_(e%,w%,-1,k_%)
536ELSE!J%=e%:J%!4=w%:J%!&C=&F<<28:J%!8=k_%<<28:SYS&400CD,,J%
537ENDIF:ENDPROC
538DEFFNh(e%,w%):!J%=e%:J%!4=w%:SYS&400CE,,J%:=((J%!24)AND(1<<6))>0
539DEFPROCM_(e%,w%,`_%,k_%):LOCALP%,A%:!J%=e%:J%!4=w%:SYS&400CE,,J%:P%=J%!32:A%=INSTR($P%,"F"):IFA%>0THEN
540IF`_%<>-1THEN?(P%+A%+1)=ASCSTR$~`_%
541IFk_%<>-1THEN?(P%+A%)=ASCSTR$~k_%
542J%!8=0:J%!&C=0:SYS&400CD,,J%
543ENDIF:ENDPROC
544DEFPROCdy(e%,w%,RETURN`_%,RETURNk_%):LOCALP%,A%:!J%=e%:J%!4=w%:SYS&400CE,,J%:P%=J%!32:A%=INSTR($P%,"F"):`_%=-1:k_%=-1:IFA%>0THEN`_%=EVAL("&"+CHR$?(P%+A%+1)):k_%=EVAL("&"+CHR$?(P%+A%))
545ENDPROC
546DEFFNq(e%,w%):LOCALk_%,`_%:IFFNh(e%,w%)THEN
547PROCdy(e%,w%,`_%,k_%)
548ELSE!J%=e%:J%!4=w%:SYS&400CE,,J%:`_%=(J%!24>>24)AND&F
549ENDIF:=`_%
550DEFPROCU(e%,w%,`_%):IFFNh(e%,w%)THEN
551PROCM_(e%,w%,`_%,-1)
552ELSE!J%=e%:J%!4=w%:J%!&C=&F<<24:J%!8=`_%<<24:SYS&400CD,,J%
553ENDIF:ENDPROC
554DEFPROC_(e%,w%,ty%):LOCALp%:p%=J%+64:IFty%=1THEN!J%=e%:J%!4=w%:SYS&400CE,,J%
555!p%=e%:p%!4=w%:p%!8=(ABSty%)<<23:p%!&C=1<<23:SYS&400CD,,p%:IFty%=1THENSYS&400D1,e%,J%!8,J%!&C,J%!16,J%!20
556ENDPROC
557DEFFNgy(e%,w%):LOCALA%:!J%=e%:J%!4=w%:SYS&400CE,,J%:IF(J%!24AND256)>0THENA%=J%!32ELSEA%=-1
558=A%
559DEFPROCZ(e%,w%,ty%):LOCALA%:!J%=e%:J%!4=w%:A%=1:IFty%=-1THENty%=1:A%=0
560J%!8=ty%<<21:J%!&C=A%<<21:SYS&400CD,,J%:ENDPROC
561DEFFNM(e%,w%):!J%=e%:J%!4=w%:SYS&400CE,,J%:=-((J%!24>>21)AND1)
562DEFPROCS(e%,w%,ty%):LOCALA%:A%=1:!J%=e%:J%!4=w%:IFty%=-1THENty%=1:A%=0
563J%!8=ty%*(1<<22):J%!&C=A%<<22:SYS&400CD,,J%:ENDPROC
564DEFPROCA(e%,w%,W$):LOCALP%,L%:!J%=e%:J%!4=w%:SYS&400CE,,J%:IFJ%!24AND(1<<8)THENP%=J%!28:L%=(J%!36)-1:ELSEP%=J%+28:L%=&B
565$P%=LEFT$(W$,L%):J%!8=0:J%!&C=0:SYS&400CD,,J%:ENDPROC
566DEFFNZ(e%,w%):LOCALA$:!J%=e%:J%!4=w%:SYS&400CE,,J%:IF(J%!24AND256)>0THENA$=FNN(J%!28)ELSEA$=FNN(J%+28)
567=A$
568DEFFNiy(e%,w%):LOCALA%:!J%=e%:J%!4=w%:SYS&400CE,,J%:IF(J%!24AND256)>0THENA%=J%!28ELSEA%=-1
569=A%
570DEFPROCyy(My%,L%,H%):My%+=4+24*L%:REPEATMy%+=24:My%!8=My%!8OR8:L%+=1:UNTIL((L%>H%)AND(H%<>-1))OR((!My%AND&80)>0):ENDPROC
571DEFPROCH(My%,L%,H%):My%+=4+24*L%:REPEATMy%+=24:!My%=!My%ANDNOT1:L%+=1:UNTIL((L%>H%)AND(H%<>-1))OR((!My%AND&80)>0):ENDPROC
572DEFFNCy(s$):LOCALMy%,_u%,Sy%:My%=FNWy(s$+"\0\1\2\3\4\5\6\7\8\9\10\11\12\13\14\15"):FORSy%=0TO&F:CASETRUEOF
573WHENSy%<4,Sy%=9,Sy%=&C,Sy%=&E,Sy%=&F:_u%=7
574OTHERWISE_u%=0
575ENDCASE:My%?(39+Sy%*24)=Sy%*16+_u%:NEXT:PROCyy(My%,0,-1):=My%
576DEFFNWy(A$):LOCALA%,B%,L%,Z$,I%:A$+="\":DIMA%4*FNny (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%=FNxy(Z$):B%!4=0:B%!8=&7000021
577IFINSTR(Z$,">")THENB%!4=VALMID$(Z$,INSTR(Z$,">")+1):Z$=LEFT$(Z$,INSTR(Z$,">")-1)
578IFLENZ$>&BTHENDIMI%LENZ$+1:$I%=Z$:B%!8=B%!8OR256:B%!&C=I%:B%!16=0:B%!20=I%+1ELSE$(B%+&C)=Z$
579IFLENZ$>L%THENL%=LENZ$
580A$=MID$(A$,INSTR(A$,"\")+1):ENDWHILE:!B%=!B%OR&80:A%!16=L%*16+16:=A%
581DEFFNC(s$,h$,L%,H%):LOCALM%,A%,C%,D%,Gl%,A$:DIMM%28+24* (H%-L%+1):!M%=FNg(s$):M%!4=0:M%!8=0:Gl%=LENFNA(s$):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=FNg(h$+STR$C%):A%!16=0:A%!20=0:D%=LENFNA(h$+STR$C%):IFD%>Gl%THENGl%=D%
582NEXT:!A%+=&80:M%!28+=256:M%!16=Gl%*16:=M%
583DEFPROCz(M%,I%,S%):M%!(28+24*I%+4)=S%:ENDPROC
584DEFFNxy(RETURNZ$):LOCALA%,F%:REPEAT:CASECHR$ASCZ$OF
585WHEN"�":A%+=1:Z$=MID$(Z$,2)
586WHEN"_":A%+=2:Z$=MID$(Z$,2)
587WHEN"*":A%+=8:Z$=MID$(Z$,2)
588OTHERWISEF%=-1
589ENDCASE:UNTILF%:=A%
590DEFFNny(A$):LOCALA%:WHILEINSTR(A$,"\"):A%+=1:A$=MID$(A$,INSTR(A$,"\")+1):ENDWHILE:=A%
591DEFFNby(A%):LOCALH%:A%+=4:REPEATA%+=24:H%+=44:IF(!A%AND2)>0THENH%+=24
592UNTIL(!A%AND&80)>0:=H%+96
593DEFFNpy(My%,Ta%,W$,ui%,b$):LOCALpl%,g_%:DIMpl%ui%+1,g_%LEN (b$)+1:$pl%=W$:$g_%=b$:My%+=28+24*Ta%:!My%=!My%OR4:My%!8=My%!8OR256:My%!&C=pl%:My%!16=g_%:My%!20=ui%:=pl%
594DEFFNk(My%,y$):LOCALA%,B%:B%=My%+28:WHILE(y$<>FNW(My%,A%))AND(!B%AND&80)=0:A%+=1:B%+=24:ENDWHILE:IFy$<>FNW(My%,A%)THENA%=-1
595=A%
596DEFPROCK(M%,I%,F%):IFF%<>0THEN
597M%!(36+24*I%)=M%!(36+24*I%)OR(1<<22)
598ELSEM%!(36+24*I%)=M%!(36+24*I%)ANDNOT(1<<22)
599ENDIF:ENDPROC
600DEFFNW(M%,I%):M%+=28+24*I%:IF(M%!8AND256)>0THENM%=M%!&CELSEM%=M%+&C
601=FNN(M%)
602DEFPROCJ(M%,I%,F%):IFF%<>0THENM%!(28+24*I%)=M%!(28+24*I%)OR1ELSEM%!(28+24*I%)=M%!(28+24*I%)ANDNOT(1)
603ENDPROC
604DEFFNS_(M%):IFM%!28>&80THENM%=!M%
605=FNN(M%)
606DEFPROCc_(M%,I%,F%):IFF%<>0THENM%!(28+24*I%)=M%!(28+24*I%)OR2ELSEM%!(28+24*I%)=M%!(28+24*I%)ANDNOT(2)
607ENDPROC
608DEFFNa(A%)=A%-A%MOD4
609DEFFNGy:SYS&400CF,,J%:=(((J%!8)AND1)=1)
610DEFFNy:LOCALA%:SYS6,&A1,&DCTO,,A%:=(A%AND&80)=&80
611DEFPROCSy(F%):LOCALA%:SYS6,&A1,&DCTO,,A%:CASEF%OF
612WHEN0:A%=A%ANDNOT&80
613WHEN1:A%=A%OR&80
614WHEN-1:A%=A%EOR&80
615ENDCASE:SYS6,&A2,&DC,A%:ENDPROC
616DEFFNe:LOCALA%,B%:SYS53,-1,&CTO,,A%:SYS53,-1,5TO,,B%:=(A%<<B%)
617DEFFN`y(M%):LOCALA%:SYS53,M%,5TO,,A%:=(A%=1)
618DEFFNw(H%,S%,F%):LOCALP%,E%,V%,L%,T%:SYS&2001D,2,H%,,S%TOE%,,P%;V%:IF(V%AND1)=1THEN
619IFF%THEN
620P%=FNJy:PROCZy(H%,(S%DIVP%)*P%-P%*((S%MODP%)>0),TRUE):P%=FNw(H%,S%,FALSE)
621ELSESYS43,E%
622ENDIF
623ENDIF:=P%
624DEFPROCau(H%,RETURNB%,S%,F%):LOCALL%,E%,V%,T%,P%:SYS&2001D,4,H%,B%,S%TOE%,,B%;V%:V%=((V%AND1)=1):CASETRUEOF
625WHENV%ANDNOTF%:SYS43,E%
626WHENV%ANDF%AND(S%>0):PROCZy(H%,S%,TRUE):PROCau(H%,B%,S%,TRUE)
627WHENV%ANDF%AND(S%<0)
628WHENNOTV%ANDF%AND(S%<0):PROCZy(H%,-1,TRUE)
629ENDCASE:ENDPROC
630DEFPROCDy(H%,B%,F%):LOCALA%,ty%:SYS29,3,H%,B%TOA%;ty%:IFF%THENPROCZy(H%,-1,TRUE)
631ENDPROC
632DEFPROCZy(H%,S%,F%):LOCALP%:IFF%THEN
633IFS%<0THEN
634SYS&2001D,5,H%,,-32*&400*&400:S%=H%!&C+H%-&8000:P%=FNJy: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%
635ELSE:E%=Ru%:F%=FNl(S%):SYS29,5,H%,,Ru%-E%
636ENDIF
637ELSESYS29,5,H%,,S%
638ENDIF:ENDPROC
639DEFPROCq_(H%,S%):IFS%=-1THENS%=Ru%
640SYS29,0,H%,,S%:ENDPROC
641DEFPROCnJ:SYS&61504,S_%:SYS&2001E,7,,S_%:ENDPROC
642DEFPROCFJ(j$):LOCALF%:SYS&2001E,6,,,17+LENj$TO,,S_%;F%:IFF%AND1THENERROR2,"Not enough memory for messages."
643$(S_%+16)=j$:SYS&41501,S_%,S_%+16,0:ENDPROC
644DEFFNA(U$):LOCALF%,L%:SYS&61502,S_%,U$,J%,256TO,,,L%;F%:IFF%AND1ERROR2,"Can't get message '"+U$+"' from Messages file"
645J%?L%=&D:=$J%
646DEFFNg(U$):LOCALF%,P%:SYS&61502,S_%,U$,0TO,,P%;F%:IFF%AND1ERROR2,"Can't get message '"+U$+"' from Messages file"
647=P%
648DEFFNO(U$,A$,Z$,C$,l$):LOCALF%,L%:SYS&61502,S_%,U$,J%,256,A$,Z$,C$,l$TO,,,L%;F%:IFF%AND1ERROR2,"Can't get message '"+U$+"' from Messages file"
649J%?L%=&D:=$J%
650DEFFNOy(U$,L%,H%,Z$,A$):LOCALM$,A%:FORA%=L%TOH%:M$+=Z$+FNA(U$+STR$A%)+A$:NEXT:=M$
651DEFFNr(_%,Q%,nl%,ul%,s%,b%):IFs%<0THENnl%+=s%:s%=-s%
652IFb%<0THENul%+=b%:b%=-b%
653=((_%>=nl%)AND(_%<=(nl%+s%))AND(Q%>=ul%)AND(Q%<=(ul%+b%)))
654DEFFNJy:LOCALP%:SYS81TOP%:=P%
655DEFFNwy:LOCALI$,I%:SYS16TOI$:I%=INSTR(I$," -quit "):IFI%THENI$=MID$(I$,INSTR(I$," ",I%+LEN" -quit ")+1)
656=I$
657DEFFNty(A$):LOCALL%:SYS35,A$,J%,&FF,0,3TO,,L%:J%?L%=0:=FNN(J%)
658DEFFNt(A$):LOCALL%,F%:SYS&20023,A$,J%,&FF,0,3TO,,L%;F%:IF(F%AND1)=0THENJ%?L%=0:IFFNN(J%)<>""THENF%=TRUEELSEF%=FALSE
659=F%
660DEFFNl(M%):LOCALS%:SYS&400EC,-1,-1TOS%:SYS&400EC,S%+M%,-1TOS%:Ru%=S%-(HIMEM-&8000):=HIMEM
661DEFFNN(P%):LOCALA$:WHILE?P%<>0AND?P%<>&DAND?P%<>&A:A$+=CHR$(?P%):P%+=1:ENDWHILE:=A$
662DEFPROCeJ(cy%):!J%=256:J%!&C=0:J%!16=0:SYS&400E7,17,J%,cy%:ENDPROC
663DEFFNs(A$):LOCALA%,C%:FORA%=1TOLENA$:C%=ASCMID$(A$,A%,1):IFC%>=97ANDC%<=&7ATHENC%=C%ANDNOT32
664MID$(A$,A%)=CHR$(C%):NEXT:=A$
665DEFFNd:LOCALA%,B%:SYS53,-1,&BTO,,A%:SYS53,-1,4TO,,B%:=(A%<<B%)
666DEFPROCB(p$):!J%=&FF:$(J%+4)=p$+CHR$0:SYS&400DF,J%,17+(1<<8)+(1<<9),"Message from "+K$,"!Organiser":ENDPROC
667DEFFNBy(A$,R%):!J%=0:$(J%+4)=A$:SYS&400DF,J%,23-4*ABSR%+(1<<8),"Message from "+K$,"!Organiser"TO,R%:=R%-2
668DEFFNZ_(c%,r%,Q%):=(FND(c%,r%,Q%)+1)MOD2
669DEFFND(c%,r%,Q%):LOCALUu%:Gy%=Q%-&77D:Uu%=Gy%*365:Uu%+=Gy%DIV4-(Q%-&76C-1)DIV&64+(Q%-&640-1)DIV400:WHILE(r%-1)>0:r%-=1:CASEr%OF
670WHEN1,3,5,7,8,&A,&C:Uu%+=31
671WHEN4,6,9,&B:Uu%+=30
672WHEN2:Uu%+=28-FNFy(Q%)
673ENDCASE:ENDWHILE:=Uu%+c%
674DEFFNH(c%,r%,Q%):=FNo(FND(c%,r%,Q%))
675DEFFNX(r%,Q%):LOCALc%:CASEr%OF
676WHEN1,3,5,7,8,&A,&C:c%=31
677WHEN4,6,9,&B:c%=30
678WHEN2:c%=28-FNFy(Q%)
679ENDCASE:=c%
680DEFFNFy(Q%)=((Q%MOD4=0)ANDNOT(Q%MOD&64=0))OR(Q%MOD400=0)
681DEFPROCF(RETURNd%,RETURNq%,RETURNx%,my%,Lu%,Gy%):LOCALgi%,Da%,K%:gi%=d%:Da%=q%:K%=x%:d%+=my%:q%+=Lu%:x%+=Gy%:WHILEq%<1:q%+=&C:x%-=1:ENDWHILE:WHILEq%>&C:q%-=&C:Oa%+=1:ENDWHILE:WHILEd%<1:q%-=1:IFq%<1THENq%=&C:x%-=1
682d%+=FNX(q%,x%):ENDWHILE:WHILEd%>FNX(q%,x%):d%-=FNX(q%,x%):q%+=1:IFq%>&CTHENq%=1:x%+=1
683ENDWHILE:IFx%<&77dORx%>&fffTHENd%=gi%:q%=Da%:x%=K%
684ENDPROC
685DEFFNo(u%):=((u%-1)MOD7)+1
686DEFFNQ(c%,r%,Q%,zJ%):=FNc(FND(c%,r%,Q%),zJ%)+", "+FNA_(c%)+" "+FNU(r%,zJ%)+" "+STR$Q%
687DEFPROCpu:LOCALC%,P%,J,P,R,M,Z,W,G,N,w,C,U:DIMC%&90:J=&D:P=&E:R=&F:M=2:Z=3:W=4:G=5:N=0:w=1:C=6:U=7:FORS%=0TO2STEP2:P%=C%:[OPTS%:.V CMP G,#0:RSBLT G,G,#0:SUBLT Z,Z,G:CMP W,#0:RSBLT W,W,#0:SUBLT M,M,W:ADD U,M,W:LDR C,[N,#28]:CMP U,C:BLT Q:LDR C,[N,#36]:CMP M,C:BGT Q
688LDR C,[N,#32]:ADD U,Z,G:CMP U,C:BLT Q:LDR C,[N,#40]:CMP Z,C:BGT Q:CMP w,#0:MVNEQ0,#1:MOVEQpc,P:B a:.Q MOV0,#0:MOVpc,P:.a MOV1,M:MOV2,Z:MOV0,#4:SWI 69:MOV1,W:MOV2,G:MOV0,#96+1:SWI 69:MVN0,#1:MOVpc,P:]NEXT:ENDPROC
689DEFFNS(C%,D%,E%,F%):LOCALA%,B%:A%=U%:B%=0:=USRV
690DEFPROCX(C%,D%,E%,F%):LOCALA%,B%:A%=U%:B%=1:CALLV:ENDPROC
691DEFPROCG(e%):!J%=e%:SYS&400C6,,J%:IFe%=x_%THENHu%=FALSE:!J%=c_%:SYS&600C6,,J%
692IFe%=i%THENVy%=FALSE
693ENDPROC
694DEFPROCYu(B%):LOCALN%,A$,Py%,p%:N%=B%!84:B%+=88:WHILEN%:IF((B%!16)AND64)>0THEN
695A$=$(B%!24):p%=EVAL("&"+MID$(A$,INSTR(A$,"F")+1,1)):Py%=EVAL("&"+MID$(A$,INSTR(A$,"F")+2,1)):B%!16=B%!16ANDNOT(64+(&FF<<24)):B%!16=B%!16OR(Py%<<24)OR(p%<<28)
696ENDIF:B%+=32:N%-=1:ENDWHILE:ENDPROC
697DEFPROCD(e%,O_%,`y%,B_%,jy%):SYS&400D1,e%,O_%,jy%,B_%+2,`y%+4:ENDPROC
698DEFPROCw(e%,IJ%,Vl%):LOCALW%,H%,X%,Y%,Z%:!J%=e%: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%:IFVl%=-1THEN
699J%!4=FNd/2-W%/2:J%!&C=J%!4+W%:J%!16=FNe-((FNe-&84)-H%)/2-Y%:J%!8=J%!16-H%
700ELSE:IFVl%=1THEN
701MOUSEX%,Y%,Z%:J%!4=X%-64:J%!&C=J%!4+W%:J%!8=Y%-H%:J%!16=Y%
702ENDIF
703ENDIF:IFIJ%<>0THENJ%!28=IJ%
704SYS&400C5,,J%:IFe%=i%THENVy%=TRUE
705IFe%=x_%THENHu%=TRUE:!U%=x_%:SYS&400CB,,U%:U%!28=J%!28:PROC`y
706ENDPROC
707DEFPROC_y(qi%,e%,_%,Q%,Tl%,Zi%,Mi%):IFc_%<>0ANDc_%<>e%THEN!J%=c_%:SYS&600C6,,J%
708c_%=e%:x_%=qi%:Bl%=_%:Hl%=Q%:Hu%=Tl%:rl%=Zi%:fl%=Mi%:IFc_%<>0THEN
709!J%=c_%:SYS&400CB,,J%:Fa%=J%!&C-J%!4:Ca%=J%!16-J%!8:!J%=x_%:SYS&400CB,,J%:J%!4+=_%:J%!16+=Q%:IFTl%THEN!J%=e%:SYS&400C5,,J%
710ENDIF:ENDPROC
711DEFPROC`y:IFc_%<>0AND!U%=x_%THEN
712!J%=c_%:J%!4=U%!4+Bl%:J%!16=U%!16+Hl%:J%!&C=J%!4+Fa%:J%!8=J%!16-Ca%:J%!20=0:J%!24=0:J%!28=U%!28:IFrl%THEN
713J%!4-=U%!20:J%!&C-=U%!20:IFJ%!4<U%!4THENJ%!20=U%!20-Bl%:J%!4=U%!4
714IFJ%!&C>U%!&CTHENJ%!&C=U%!&C
715ENDIF:IFfl%THEN
716J%!16-=U%!24:J%!8-=U%!24:IFJ%!16>U%!16THENJ%!24=U%!16-J%!16:J%!16=U%!16
717IFJ%!8<U%!8THENJ%!8=U%!8
718ENDIF:SYS&400C5,,J%:U%!28=c_%
719ENDIF:ENDPROC
720DEFPROCmJ:LOCALA%:DIMYl%256:FORA%=0TO256STEP4:Yl%!A%=0:NEXT:ENDPROC
721DEFPROCdu(aa%,r$):Yl%=-1:SYS&400D9,,r$:PROChu:SYS&400DA:ENDPROC
722DEFPROCi(W%,Iy%,A$,uJ%):$Iy%=A$:IFuJ%THEN
723!U%=W%:SYS&400CB,,U%:SYS&400D1,-1,U%!4,U%!16,U%!&C,U%!16+44
724ENDIF:ENDPROC
725DEFPROCV(B%,F%):SYS&400F3,,B%,F%:ENDPROC
726DEFFNJ(r$,W%,H%):LOCALF%:SYS&40081,,r$,16*W%,16*H%,0,0TOF%:=F%
727DEFPROCQ(H%):SYS&40082,H%:ENDPROC
728DEFPROCoy(RETURNX%,RETURNY%):SYS&40088,,X%,Y%TO,X%,Y%:ENDPROC
729DEFPROCL(cy%,W$,_u%,_%,Q%):LOCALO_%,jy%,B_%,`y%,AJ%:SYS&4008A,cy%:SYS&40097,,W$TO,O_%,jy%,B_%,`y%:SYS&40088,,O_%,jy%TO,O_%,jy%:SYS&40088,,B_%,`y%TO,B_%,`y%:AJ%=B_%+O_%:IF_u%=0THEN_%-=AJ%/2ELSEIF_u%>0THEN_%-=AJ%
730IFFNS(_%,Q%-`y%+jy%,AJ%,`y%-jy%)THENSYS&40086,cy%,W$,1<<4,_%,Q%-`y%
731ENDPROC
732DEFPROCey(cy%,W$,Ja%,wi%,_%,Q%,g%):LOCALO_%,jy%,B_%,`y%,AJ%:!J%=0:J%!4=-g%<<16:J%!8=g%<<16:J%!&C=0:J%!16=0:J%!20=0:SYS&4008A,cy%:SYS&40097,,W$TO,O_%,jy%,B_%,`y%:SYS&40088,,O_%,jy%TO,jy%,O_%:SYS&40088,,B_%,`y%TO,`y%,B_%:IFJa%=0THEN_%-=g%*B_%/2ELSEIFJa%=g%THEN_%-=g%*B_%
733IFwi%=0THENQ%+=g%*`y%/2ELSEIFwi%=-g%THENQ%-=wi%*`y%
734SYS&40086,cy%,W$,(1<<4)+(1<<6),_%,Q%,0,J%:ENDPROC
735DEFPROCr(lu%,W$,a%,K%,s%,b%):IFFNS(a%,K%,s%,b%)THEN
736LOCALA%,cy%,O_%,jy%,B_%,`y%,AJ%,fi%,Xl%,Dl%:SYS&4008A,lu%:cy%=lu%:SYS&40097,lu%,W$TO,O_%,jy%,B_%,`y%:SYS&40088,,B_%+O_%,`y%+jy%TO,AJ%,fi%:IFAJ%>s%THEN
737SYS&40083,lu%,J%TO,,Xl%,Dl%:WHILEAJ%>s%:Xl%=Xl%*0.95:Dl%=Dl%*0.95:SYS&40081,,J%,Xl%,Dl%:SYS&40097,,W$TOcy%,O_%,jy%,B_%,`y%:SYS&40088,,B_%+O_%,`y%+jy%TO,AJ%,fi%:IFAJ%>s%THENSYS&40082,cy%
738ENDWHILE
739ENDIF:SYS&40086,,W$,1<<4,a%,K%:IFcy%<>lu%THENSYS&40082,cy%
740ENDIF:ENDPROC
741DEFPROCT(sl%,Cl%,R_%,H_%,g%,Ra%):SYS&400E6,Cl%:CASERa%OF
742WHEN1:RECTANGLEFILLR_%,H_%,g%:SYS&400E6,sl%:MOVER_%,H_%:MOVEBYg%,0:PLOT&B1,-g%,g%:SYS&400E6,Cl%:MOVER_%,H_%:MOVEBYg%,0:PLOT&A1,-g%,g%
743WHEN2:RECTANGLEFILLR_%,H_%,-g%,g%:SYS&400E6,sl%:MOVER_%,H_%:MOVEBY0,g%:PLOT&B1,-g%,-g%:SYS&400E6,Cl%:MOVER_%,H_%:MOVEBY0,g%:PLOT&A1,-g%,-g%
744WHEN3:RECTANGLEFILLR_%,H_%,-g%:SYS&400E6,sl%:MOVER_%,H_%:MOVEBY-g%,0:PLOT&B1,g%,-g%:SYS&400E6,Cl%:MOVER_%,H_%:MOVEBY-g%,0:PLOT&A1,g%,-g%
745WHEN4:RECTANGLEFILLR_%,H_%,g%,-g%:SYS&400E6,sl%:MOVER_%-2,H_%:MOVEBY0,-g%:PLOT&B1,g%,g%:SYS&400E6,Cl%:MOVER_%,H_%:MOVEBY0,-g%:PLOT&A1,g%,g%
746ENDCASE:ENDPROC
747DEFPROCl(_%,Q%,s%,b%,g%):MOVE_%+g%,Q%:DRAWBYs%-2*g%,0:MOVEBYg%,-g%:DRAWBY0,-b%+2*g%:MOVEBY-g%,-g%:DRAWBY-s%+2*g%,0:MOVEBY-g%,g%:DRAWBY0,b%-2*g%:MOVE_%+g%,Q%-g%:MOVEBY0,g%:PLOT&A1,-g%,-g%:MOVE_%+s%-g%,Q%-g%:MOVEBYg%,0:PLOT&A1,-g%,g%:MOVE_%+s%-g%,Q%-b%+g%:MOVEBY0,-g%
748PLOT&A1,g%,g%:MOVE_%+g%,Q%-b%+g%:MOVEBY-g%,0:PLOT&A1,g%,-g%:ENDPROC
749DEFPROCYJ:ENDPROC
750DEFPROCyu:CASEFi%OF
751WHEN3:PROC__(rJ%)
752ENDCASE:ENDPROC
753DEFPROCc:rJ%=-1:Fi%=-1:IFNOTPu%THEN
754rJ%=FNcy(qJ%):IFrJ%<>-1THENFi%=3
755ELSEPROCxJ
756ENDIF:ENDPROC
757DEFPROCC_(Xu%):CASEZ%(Xu%)OF
758WHEN2:PROCsu
759WHEN3:PROCmu
760ENDCASE:ENDPROC
761DEFPROCny(h%,a%,K%):SYS&400E6,0:CASEZ%(t%)OF
762WHEN2:PROCi_(v%,h%,a%,K%)
763WHEN5:PROCZJ(v%,h%,a%,K%)
764WHEN1:PROCSJ(v%,h%,a%,K%)
765WHEN3:PROCUu(v%,h%,a%,K%)
766ENDCASE:ENDPROC
767DEFFNyy(w%,Cy%):CASEZ%(t%)OF
768WHEN2:k%=FNW_(w%,Cy%)
769WHEN5:k%=FNP_(w%,Cy%)
770WHEN1:k%=FNfy(w%,Cy%)
771WHEN3:k%=FNzy(w%,Cy%)
772ENDCASE:=k%
773DEFPROCcu(p%,A%):CASEZ%(A%)OF
774WHEN2:PROCs_(p%,A%)
775WHEN5:PROCNJ(p%,A%)
776WHEN1:PROCn_(p%,A%)
777WHEN3:PROCx_(p%,A%)
778ENDCASE:ENDPROC
779DEFFNKy(S%):LOCALou%:CASEZ%(S%)OF
780WHEN2:ou%=FNay
781WHEN5:ou%=FN_y
782WHEN1:ou%=FNM_
783WHEN3:ou%=FNqy
784ENDCASE:=ou%
785DEFPROCby(Xu%):CASEZ%(Xu%)OF
786WHEN2:PROCA_
787WHEN3:PROCpJ
788ENDCASE:ENDPROC
789DEFPROChy(n%,h%,_%,Q%,o_%,wJ%):CASEZ%(t%)OF
790WHEN2:PROCru(n%,h%,_%,Q%,o_%,wJ%)
791WHEN5:PROCf_(n%,h%,_%,Q%,o_%,wJ%)
792WHEN1:PROCQu(n%,h%,_%,Q%,o_%,wJ%)
793WHEN3:PROCa_(n%,h%,_%,Q%,o_%,wJ%)
794ENDCASE:ENDPROC
795DEFPROCX_(l%):CASEZ%(t%)OF
796WHEN2:PROCv(l%)
797WHEN5:PROCHy(l%)
798WHEN1:PROCNy(l%)
799WHEN3:PROCXy(l%)
800ENDCASE:ENDPROC
801DEFPROCDJ(e%,w%,n%,Xy%,Ty%):CASEZ%(t%)OF
802WHEN2:PROCZl(e%,w%,n%,Xy%,Ty%)
803ENDCASE:ENDPROC
804DEFFNC_(e%,w%,Cy%):LOCALA%:FORA%=1TOiy%:IFNOTk%THEN
805CASEZ%(A%)OF
806WHEN2:k%=FNHy(e%,w%,Cy%)
807WHEN5:k%=FNUy(e%,w%,Cy%)
808WHEN1:k%=FNLy(e%,w%,Cy%)
809WHEN3:k%=FNdy(e%,w%,Cy%)
810ENDCASE
811ENDIF:NEXT:=k%
812DEFPROCIJ:PROCDu:PROCMu:PROCqu:PROCuJ:ENDPROC
813DEFPROCdJ:LOCALA%:FORA%=1TOiy%:CASEZ%(A%)OF
814WHEN2:PROCm_(A%)
815WHEN5:PROCWu(A%)
816WHEN1:PROCCJ(A%)
817WHEN3:PROCO_(A%)
818ENDCASE:NEXT:ENDPROC
819DEFPROCOu:PROCLJ:PROCfu:PROClJ:ENDPROC
820DEFPROCKu(z%):BPUT#z%,"Address book":PROCuu(z%):BPUT#z%,"Anniversary":PROCsJ(z%):BPUT#z%,"Calendar":PROCe_(z%):BPUT#z%,"Diary":PROCAu(z%):ENDPROC
821DEFPROCQJ(Ay$,z%):CASEAy$OF
822WHEN"Address book":PROCvu(z%)
823WHEN"Anniversary":PROCSu(z%)
824WHEN"Calendar":PROCqJ(z%)
825WHEN"Diary":PROCbJ(z%)
826ENDCASE:ENDPROC
827DEFPROCaJ(e%,w%,n%,_%,Q%):CASEe%OF
828WHENA%(2):PROC`u(e%,w%,n%,_%,Q%)
829WHENA%(3):PROC_J(e%,w%,n%,_%,Q%)
830WHENA%(4):PROCxu(e%,w%,n%,_%,Q%)
831WHENA%(5):PROCJu(e%,w%,n%,_%,Q%)
832ENDCASE:ENDPROC
833DEFFNF_(e%,w%,Cy%):CASEe%OF
834WHENA%(2):k%=FNry(e%,w%,Cy%)
835ENDCASE:=FALSE
836DEFPROCUJ(p%):CASEYy%OF
837WHENA%(2):PROCb_(p%,Yy%)
838WHENA%(3):PROCl_(p%,Yy%)
839WHENA%(4):PROCGJ(p%,Yy%)
840WHENA%(5):PROCiJ(p%,Yy%)
841ENDCASE:ENDPROC
842DEFPROCBu:PROCR_(A%(2)):PROCfJ(A%(3)):PROCRu(A%(4)):PROCnu(A%(5)):ENDPROC
843DEFPROCTu:PROCy_(A%(2)):PROCj_(A%(3)):PROCKJ(A%(4)):PROCbu(A%(5)):ENDPROC
844DEFPROCrJ(My%,p%):CASEZ%(t%)OF
845WHEN3:PROCiy(My%,p%)
846ENDCASE:ENDPROC
847DEFPROCDu:YJ%=FNC("Paste","Paste",1,&A):zy%=-1:P$="":Q$="mailto:":X$="http://":H$="Important numbers":jJ%=-1:uu%=FNC("Import","Import",1,5):f_%=FNC("ABM","ABM",1,6):PROCz(f_%,3,YJ%):F$="":wy%=0:OJ%=0:a_%=-1:Y$="":ku%=0:pu%=0:gJ%=0:F_%=16:Qy%=3::::q_%=2:y_%=-1
848DIMM%(26),F%(26),A$(&A,&E),Z$(F_%-1,1),L%(&A,1),il%&B,N%(&E):N%()=7:N%(0)=5:L%()=-1:$il%="Pptr_hyper"+CHR$0:M%(0)=1:uy%=0:z$=T$+"Addresses":e$=T$+"Important":ENDPROC
849DEFFNay=f_%
850DEFPROCm_(A%):B%(A%)=0:W%(A%)=26:S%(A%)=0:M$(A%)=FNA("AddTab"):PROCz_:PROCa:ENDPROC
851DEFPROCA_:IFv%=0THENPROCD_(i%,`%,dy%,-o%-j_%,Vy%,TRUE,TRUE)
852ENDPROC
853DEFPROCsu:PROCsy:IFz_%=0THENPROCYy
854ENDPROC
855DEFPROCi_(v%,h%,a%,K%):LOCALJl%,A%,A$,G%,Zy%,F%,Q%,_%,B%,C%,y%,yJ%,D%,E%,Ou%,Gi%,RJ%,JJ%:JJ%=FNa((m%-(Qy%+2)*24)/Qy%):Jl%=FNJ("Homerton.Medium",&A,&A):Zy%=j_%:SYS&400E6,7:SYS&400F3,,0,7:IF(h%=0)ANDv%>0THENPROCR(0,a%,K%)
856_%=a%+h%*(j%-40):IFh%=0THEN
857A%=0:WHILEA%<v%:SYS&400E6,7:LINE_%,K%-Zy%*(A%+1),_%+40,K%-Zy%*(A%+1):IFM%(A%)=0THENRy%=2ELSERy%=5
858SYS&400F3,,0,Ry%:IFA%=0THENA$="+"ELSEA$=CHR$(64+A%)
859SYS&40086,Jl%,A$,1<<4,_%+&C,K%-Zy%*A%-Zy%+&A:A%+=1:ENDWHILE:IFv%>0THENSYS&400E6,7:LINE_%+40,K%,_%+40,K%-Zy%*(v%)
860ELSE:A%=v%:IFA%=0THENA$="+"ELSEA$=CHR$(64+A%)
861SYS&400E6,7:MOVE_%+40,K%-Zy%*(A%+1):DRAWBY-40,0:DRAW_%,K%-m%:SYS&40086,Jl%,A$,1<<4,_%+&C,K%-Zy%*A%-Zy%+&A:A%+=1:WHILEA%<27:SYS&400E6,7:LINE_%,K%-Zy%*(A%+1),_%+40,K%-Zy%*(A%+1):IFM%(A%)=0THENRy%=2ELSERy%=5
862SYS&400F3,,0,Ry%:IFA%=0THENA$="+"ELSEA$=CHR$(64+A%)
863SYS&40086,Jl%,A$,1<<4,_%+&C,K%-Zy%*A%-Zy%+&A:IFM%(A%)>0ANDA%>v%THENF%=-1
864A%+=1:ENDWHILE
865ENDIF:IFh%=1AND(F%ORM%(v%)-uy%>2*Qy%)THENPROCR(1,_%-j%,K%)
866IFv%<>0THEN
867IFh%=0OR(h%=1ANDuy%+Qy%<=M%(v%))THEN
868Ou%=FNJ("Trinity.Bold",&E,&E):A%=uy%+h%*Qy%:_%=a%-(40*(h%=0))+&c:WHILEA%<M%(v%)ANDB%<Qy%:Q%=K%-24*(B%+1)-JJ%*B%:IFFNS(_%,Q%,dJ%,-JJ%)THEN
869SYS&400E6,4:PROCl(_%,Q%,dJ%,JJ%,&c):y%=A%MOD(Qy%*2):A$="":IFA$(y%,1)<>""THENA$=A$(y%,1)+" "
870A$+=A$(y%,0):PROCV(0,N%(1)):PROCr(Ou%,A$,_%+&C,Q%-40,dJ%-&C,40):D%=0:FORC%=2TO&E:D%-=(A$(y%,C%)<>""):NEXT:IFD%<5THEND%=5
871Zy%=FNa((JJ%-48)/D%):C%=Zy%/3:IFZy%>30THENZy%=30:C%=&C
872Gi%=FNJ("Homerton.Medium.Oblique",C%-2,C%-2):RJ%=FNJ("Trinity.Medium",C%,C%):G%=1:FORC%=2TO8:IFA$(y%,C%)<>""THENG%+=1:PROCV(0,N%(C%)):PROCr(RJ%,A$(y%,C%),_%+48,Q%-42-Zy%*(G%-1),dJ%-48,Zy%)
873NEXT:Q%-=JJ%-&E:FORC%=&ETO9STEP-1:IFA$(y%,C%)<>""THEN
874A$=FNA("Fld"+STR$(C%-8))+":":SYS&400F3,,0,N%(0):SYS&4008A,Gi%:SYS&40097,,A$TO,D%,,F%:SYS&40088,,F%-D%TO,D%:SYS&40086,,A$,1<<4,_%+92-D%,Q%-4:SYS&400F3,,0,N%(C%):PROCr(RJ%,A$(y%,C%),_%+&64,Q%-4,dJ%-&64,Zy%+4):Q%+=Zy%:IFC%>=&DTHENPROCr_(y%,C%,_%+&64,Q%-4,dJ%-&64,Zy%+4)
875ENDIF:NEXT:PROCQ(RJ%):PROCQ(Gi%)
876ENDIF:A%+=1:B%+=1:ENDWHILE:PROCQ(Ou%)
877ENDIF
878ELSE:IFh%=0THEN
879Ou%=FNJ("Trinity.Bold",16,16):SYS&400E6,4:PROCV(0,7):y%=j%-2*&c:PROCl(_%+&c,K%-24,y%,m%-2*24,2*&c):PROCL(Ou%,H$,0,a%+j%/2,K%-24-&C):PROCQ(Ou%):yJ%=&E:RJ%=FNJ("Trinity.Medium",yJ%,yJ%):Zy%=(m%-2*24-68-2*&c)/F_%:Q%=K%-24-68:_%=a%+&c:SYS&400E6,1
880LINE_%+48,Q%-Zy%*F_%,_%+y%-48,Q%-Zy%*F_%:FORA%=0TOF_%-1:SYS&4008A,RJ%:SYS&400E6,1:LINE_%+48,Q%-Zy%*A%,_%+y%-48,Q%-Zy%*A%:IFFNS(_%,Q%-Zy%*A%,y%,-Zy%)ANDZ$(A%,0)+Z$(A%,1)<>""THEN
881SYS&40097,,Z$(A%,0)+" "TO,B%,C%,D%,E%:B%=D%-B%:PROCoy(B%,E%):SYS&40097,,Z$(A%,1)TO,C%,F%,D%:C%=D%-C%:PROCoy(C%,F%):IFB%+C%>y%-24ORE%-F%>Zy%THEN
882IFZy%/(E%-F%)<(y%-24)/(B%+C%)THENF%=yJ%*Zy%/(E%-F%)ELSEF%=yJ%*(y%-24)/(B%+C%)
883C%=C%*F%/yJ%:E%=E%*F%/yJ%:F%=FNJ("Trinity.Medium",F%,F%)
884ELSEF%=RJ%
885ENDIF:SYS&40086,,Z$(A%,0),1<<4,_%+&C,Q%-Zy%*(A%+0.5)-E%/2:SYS&40086,,Z$(A%,1),1<<4,_%+y%-C%-&C,Q%-Zy%*(A%+0.5)-E%/2:IFF%<>RJ%THENPROCQ(F%)
886ENDIF:NEXT
887ENDIF
888ENDIF:PROCQ(Jl%):ENDPROC
889DEFPROCs_(p%,Oi%):LOCALA%,B%:B%=wy%:CASE!p%OF
890WHEN0:FORA%=9TO23:PROCA(`%,A%,A$(B%,A%-9)):NEXT:PROC_(`%,25,0):PROCN(0,0)
891WHEN1:FORA%=9TO23:PROCA(`%,A%,A$(B%,A%-9)):NEXT:F$="":wy%=-1:PROCN(0,0):PROC_(`%,25,1)
892WHEN2:PROCqy:IFM%(v%)>0THEN
893IFM%(v%)<=uy%THENuy%-=2*Qy%
894PROCN(v%,uy%):uJ%=TRUE
895ELSEPROCN(0,0)
896ENDIF
897WHEN3:IFp%!4>=0THENq_%=p%!4
898IFv%=0THEN
899FORA%=0TO&E:A$(B%,A%)=FNZ(`%,A%+9):NEXT
900ENDIF:CASEq_%OF
901WHEN0:PROCq(A$(B%,1)+" "+A$(B%,0))
902WHEN1:FORA%=2TO8:PROCq(A$(B%,A%)):NEXT
903WHEN2:PROCq(A$(B%,1)+" "+A$(B%,0)):FORA%=2TO8:PROCq(A$(B%,A%)):NEXT
904WHEN9:PROCq(A$(B%,1)+" "+A$(B%,0)):FORA%=2TO&E:PROCq(A$(B%,A%)):NEXT
905OTHERWISEPROCq(A$(B%,q_%+6))
906ENDCASE
907WHEN4:PROCGy(X$+A$(wy%,&E)):jJ%=1
908WHEN5:PROCGy(Q$+A$(wy%,&D)):jJ%=2
909ENDCASE:ENDPROC
910DEFPROCgy:LOCALA%:A%=(wy%<0):FORB%=0TO3:PROCK(f_%,B%,A%):NEXT:FORA%=0TO9:PROCJ(YJ%,A%,q_%=A%):NEXT:FORB%=4TO5:PROCK(f_%,B%,1):NEXT:IFwy%<>-1THEN
911IFFNt("Alias$URLOpen_HTTP")THEN
912PROCK(f_%,4,A$(wy%,&E)="")
913ENDIF:IFFNt("Alias$URLOpen_MailTo")THEN
914PROCK(f_%,5,A$(wy%,&D)="")
915ENDIF
916ELSEPROCK(f_%,4,1):PROCK(f_%,5,1)
917ENDIF:ENDPROC
918DEFPROCv(l%)LOCALA%:A%=v%:IFl%=1THEN
919IFM%(v%)<=uy%+Qy%*2THEN
920REPEATA%+=1:UNTILA%>26ORM%(A%MOD27)>0:IFA%<27THENPROCN(A%,0)
921ELSEPROCN(v%,uy%+Qy%*2)
922ENDIF
923ELSE:IFuy%=0ANDv%>0THEN
924REPEATA%-=1:UNTILM%(A%)>0:PROCN(A%,M%(A%)-1-(M%(A%)-1)MOD(Qy%*2))
925ELSEIFv%>0THENPROCN(v%,uy%-Qy%*2)
926ENDIF:IFv%=0THENPROCN(0,0)
927ENDIF:ENDPROC
928DEFPROCru(n%,h%,_%,Q%,o_%,wJ%):LOCALy%,A%,B%,X%,Y%,JJ%:JJ%=FNa((m%-(Qy%+2)*24)/Qy%):IFh%<>0THEN
929X%=&c:IF_%>j%-40ANDn%<>2THEN
930y%=-Q%DIVj_%:IFy%<27ANDy%>v%THEN
931IFv%=0THENY$=F$:ku%=wy%:pu%=OJ%
932IFM%(y%)>0THENPROCN(y%,0)
933ENDIF
934ENDIF
935ELSE:X%=&c+40:IF_%<40ANDn%<>2THEN
936y%=-Q%DIVj_%:IFy%<v%THEN
937IFy%=0THENF$=Y$:wy%=ku%:OJ%=pu%
938IFM%(y%)>0THENPROCN(y%,0)
939ENDIF
940ENDIF
941ENDIF:IFv%>0THEN
942A%=0:B%=-1:Y%=-24:h%=ABS(h%):F$="":wy%=-1:WHILEA%<Qy%ANDA%+uy%+Qy%*h%<M%(v%):IFFNr(_%,Q%,X%,Y%,dJ%,-JJ%)THENB%=A%+Qy%*h%
943Y%-=JJ%+24:A%+=1:ENDWHILE:IFB%>=0THEN
944F$=FNs(A$(B%,0)+" "+A$(B%,1)):wy%=B%:OJ%=B%+uy%:IFn%<>2THEN
945FORA%=9TO23:PROCA(`%,A%,A$(B%,A%-9)):NEXT:PROC_(`%,25,0):PROCN(0,0)
946ENDIF
947ENDIF
948ELSEIFh%=0ANDn%<>2THEN
949Zy%=(m%-2*24-68-2*&c)/F_%:Y%=-(Q%+24+68-Zy%)/Zy%:IFY%>0ANDY%<=F_%THEN
950gJ%=Y%:PROCA(G_%,3,Z$(Y%-1,0)):PROCA(G_%,4,Z$(Y%-1,1)):MOUSEX%,Y%,A%:SYS&400D4,,G_%,o_%+GJ%,Y%:PROCM(G_%,3):QJ%=TRUE
951ENDIF
952ENDIF
953ENDIF:IFn%=2THENPROCgy
954ENDPROC
955DEFPROCZl(e%,w%,n%,_%,Q%):CASEe%OF
956WHEN`%:IFn%<>2THEN
957CASEw%OF
958WHEN24:PROCj(TRUE):PROCa
959WHEN25:PROCqy:PROCa:PROCM(`%,9)
960WHEN26:PROCa:PROCM(`%,9)
961WHEN-1,0,1,2,3,4,5,6,7,8:PROCM(i%,-1)
962ENDCASE
963ELSEPROCgy:PROCC(f_%,Xy%-64,Ty%,e%,w%)
964ENDIF
965WHENG_%:CASEw%OF
966WHEN5:PROCcy
967WHEN6:SYS&400D4,,-1:gJ%=0
968WHEN7:PROCA(G_%,3,""):PROCA(G_%,4,""):PROCM(G_%,3)
969ENDCASE
970ENDCASE:ENDPROC
971DEFFNW_(w%,Cy%):k%=TRUE:CASECy%OF
972WHEN414:PROCv(-a_%)
973WHEN415:PROCv(a_%)
974WHEN43,461:IFv%>0THENF$=Y$:wy%=ku%:OJ%=pu%:PROCN(0,0)
975OTHERWISE:IFCy%>=97ANDCy%<=&7ATHENL%=Cy%-32-64ELSEL%=Cy%-64
976IFL%>0ANDL%<28THEN
977IFv%=0THENY$=F$:ku%=wy%:pu%=OJ%
978IFM%(L%)>0THENPROCN(L%,0)
979ELSEk%=FALSE
980ENDIF
981ENDCASE:=k%
982DEFFNHy(e%,w%,Cy%):k%=TRUE:CASEe%OF
983WHEN`%:CASECy%OF
984WHEN398,&D,394:IFw%=23THEN
985CASETRUEOF
986WHENCy%=&DANDNOTINKEY-2:PROCj(TRUE):PROCa
987WHENCy%=&DANDINKEY-2:PROCM(`%,20)
988OTHERWISEPROCM(`%,9)
989ENDCASE
990ELSEPROCM(`%,w%+1)
991ENDIF
992WHEN399:IFw%=9THENPROCM(`%,23)ELSEPROCM(`%,w%-1)
993WHEN414:IFINKEY-1THEN
994CASEw%OF
995WHEN9,&A,18,19,20,21,22:PROCM(`%,w%+1)
996WHEN23:PROCM(`%,9)
997OTHERWISEPROCM(`%,18)
998ENDCASE
999ELSEPROCv(-a_%)
1000ENDIF
1001WHEN415:IFINKEY-1THEN
1002CASEw%OF
1003WHEN&A,&B,19,20,21,23:PROCM(`%,w%-1)
1004WHEN9:PROCM(`%,23)
1005OTHERWISEPROCM(`%,&B)
1006ENDCASE
1007ELSEPROCv(a_%)
1008ENDIF
1009WHEN461:PROCj(TRUE):PROCa
1010WHEN83-64:PROCM(`%,9)
1011WHEN70-64:PROCM(`%,&A)
1012WHEN65-64:PROCM(`%,&B)
1013WHEN84-64:PROCM(`%,18)
1014WHEN88-64:IFwy%<>-1THENPROCqy:PROCa:PROCM(`%,9)
1015WHEN69-64:PROCM(`%,22)
1016WHEN87-64:PROCM(`%,23)
1017OTHERWISEk%=FALSE
1018ENDCASE
1019WHENG_%:CASECy%OF
1020WHEN398,399:PROCM(G_%,7-w%)
1021WHEN&D:IFw%=3THENPROCM(G_%,4)ELSEPROCcy
1022OTHERWISEk%=FALSE
1023ENDCASE
1024OTHERWISEk%=FALSE
1025ENDCASE:=k%
1026DEFPROCuu(z%):LOCALA%:BPUT#z%,H$:BPUT#z%,Qy%:BPUT#z%,q_%:BPUT#z%,a_%+5:BPUT#z%,Q$:BPUT#z%,X$:FORA%=0TO&E:BPUT#z%,N%(A%):NEXT:ENDPROC
1027DEFPROCvu(z%):LOCALA%:H$=GET$#z%:Qy%=BGET#z%:q_%=BGET#z%:a_%=BGET#z%-5:Q$=GET$#z%:X$=GET$#z%:FORA%=0TO&E:N%(A%)=BGET#z%:NEXT:ENDPROC
1028DEFPROC`u(s%,Sy%,p%,_%,Q%):LOCALA%:CASETRUEOF
1029WHENSy%>=3ANDSy%<=&D:IFn%<>2THENPROCZ(s%,Sy%,1)
1030WHENSy%=9:FORA%=0TO9:PROCJ(YJ%,A%,q_%=A%):NEXT:PROCC(YJ%,_%,Q%,s%,Sy%)
1031WHENSy%>=22ANDSy%<=36:FORA%=0TO&E:PROCJ(By%,A%,FNq(s%,Sy%)=A%):NEXT:PROCC(By%,_%,Q%,s%,Sy%)
1032ENDCASE:ENDPROC
1033DEFFNry(s%,Sy%,qa%):LOCALju%,c%:k%=FALSE:CASESy%OF
1034WHEN1:c%=17:ju%=18
1035WHEN17:c%=18:ju%=1
1036WHEN18:c%=1:ju%=17
1037ENDCASE:CASEqa%OF
1038WHEN&D,394,398:IFc%<>0THENPROCM(s%,c%):k%=TRUE
1039WHEN399:IFju%<>0THENPROCM(s%,ju%):k%=TRUE
1040ENDCASE:=TRUE
1041DEFPROCb_(p%,s%):LOCALA%:CASE__%OF
1042WHEN8:q_%=!p%:FORA%=0TO9:PROCJ(YJ%,A%,q_%=A%):NEXT:PROCA(s%,8,FNW(YJ%,!p%))
1043OTHERWISEFORA%=0TO&F:PROCJ(By%,A%,!p%=A%):NEXT:PROCU(s%,__%,!p%)
1044ENDCASE:ENDPROC
1045DEFPROCR_(s%):LOCALA%:PROCA(s%,1,H$):FORA%=1TO5:PROCZ(s%,A%+2,-(Qy%=A%)):NEXT:PROCA(s%,8,FNW(YJ%,q_%)):PROCA(s%,17,X$):PROCA(s%,18,Q$):PROCZ(s%,&C,-(a_%=-1)):PROCZ(s%,&D,-(a_%=1)):FORA%=0TO&E:PROCU(s%,A%+22,N%(A%)):NEXT:ENDPROC
1046DEFPROCy_(s%):LOCALA%,B%:H$=FNZ(s%,1):X$=FNZ(s%,17):Q$=FNZ(s%,18):B%=Qy%:FORA%=1TO5:IFFNM(s%,A%+2)THENQy%=A%
1047NEXT:IFA%<>B%ANDt%=FNP(2)THENPROCN(v%,0)
1048IFFNM(s%,&C)THENa_%=-1ELSEa_%=1
1049FORA%=0TO&E:N%(A%)=FNq(s%,A%+22):NEXT:ENDPROC
1050DEFPROCN(y%,iu%):IFv%=0ANDy%<>0THENPROCM(i%,-1):PROCYy
1051IFy%=0THENPROCD_(i%,`%,dy%,-o%-j_%,Vy%,TRUE,TRUE)
1052py%=0:IFy%<v%py%=-1
1053IFy%>v%py%=1
1054IFpy%=0THEN
1055uJ%=iu%<>uy%:IFiu%<uy%THENpy%=-1
1056IFiu%>uy%THENpy%=1
1057ENDIF:v%=y%:uy%=iu%:PROCsy:IFy%<>0THENPROCXJ(y%,iu%)
1058ENDPROC
1059DEFPROCcyLOCALZy%,Y%:Z$(gJ%-1,0)=FNZ(G_%,3):Z$(gJ%-1,1)=FNZ(G_%,4):Zy%=(m%-2*24-68-2*&c)/F_%:Y%=o%+24+68+Zy%*(gJ%-1):PROCD(i%,yy%+&C,-Y%,GJ%-&C,-Y%-Zy%):ey%=TRUE:IFNOTFNGyTHENSYS&400D4,,-1:gJ%=0
1060ENDPROC
1061DEFPROCaLOCALA%:FORA%=9TO23:PROCA(`%,A%,""):NEXT:F$="":wy%=-1:PROC_(`%,25,1):ENDPROC
1062DEFPROCqy:LOCAL_y%:PROCZ_:_y%=FN_(F$)-64:M%(_y%)-=1:F$="":wy%=-1:IFM%(_y%)=0THENF%(_y%)=-1
1063PROCD(i%,dy%+j%-40,-o%-j_%*_y%,dy%+j%,-o%-j_%*(_y%+1)):PROCD(i%,yy%,-o%-j_%*_y%,yy%+40,-o%-j_%*(_y%+1)):ey%=TRUE:ENDPROC
1064DEFPROCZ_:LOCALB%,L%,A%:B%=y_%:L%=FN_(F$)-64:B%=F%(L%):A%=OJ%:WHILEA%>0:B%=B%!4:A%-=1:ENDWHILE:IFOJ%=0THENF%(L%)=B%!4
1065IFB%!4<>-1THEN!(B%!4)=!B%
1066IF!B%=-1THENy_%=B%!4ELSE!(!B%+4)=B%!4
1067PROCDy(w_%,B%,TRUE):ENDPROC
1068DEFPROCj(Ha%):LOCALO%,L%,L$:L$=FNv(FNZ(`%,9)+" "+FNZ(`%,&A)):L%=FN_(L$)-64:M%(L%)+=1:IFF$=""THENO%=L%ELSEO%=FN_(F$)-64:M%(O%)-=1
1069IFwy%<0THENPROCG_ELSEPROCZ_:PROCG_
1070F$="":wy%=-1:IFHa%THENPROCFu(L$)
1071ey%=TRUE:ENDPROC
1072DEFPROCFu(A$):LOCALB%,A%,P%:P%=FN_(A$)-64:B%=F%(P%):WHILEFNs(FNT(B%,0)+" "+FNT(B%,1))<>L$:B%=B%!4:A%+=1:ENDWHILE:PROCN(P%,A%-A%MOD(2*Qy%)):ENDPROC
1073DEFPROCG_:LOCALA%,B%,C%,S%:S%=&C:FORA%=9TO23:S%+=LENFNZ(`%,A%)+1:NEXT:C%=FNw(w_%,S%,TRUE):B%=y_%:C%!8=S%:S%=C%+&C:FORA%=9TO23:$(S%)=FNZ(`%,A%)+CHR$&A:S%+=LEN($S%):NEXT:A%=FN_(FNZ(`%,9)+" "+FNZ(`%,&A))-64:IFF%(A%)=-1THENF%(A%)=C%:A%-=1
1074IFB%<>-1THEN
1075WHILEF%(A%)=-1ANDA%>1:A%-=1:ENDWHILE:IFF%(A%)<>-1THENB%=F%(A%)
1076WHILEFNv(FNT(B%,0)+" "+FNT(B%,1))<L$ANDB%!4<>-1:B%=B%!4:ENDWHILE:IFFNv(FNT(B%,0)+" "+FNT(B%,1))>=L$THEN
1077IFF%(A%)=B%THENF%(A%)=C%
1078!C%=!B%:C%!4=B%:!B%=C%:IF!C%<>-1THEN!(!C%+4)=C%ELSEy_%=C%
1079ELSE:B%!4=C%:!C%=B%:C%!4=-1
1080ENDIF
1081ELSEy_%=C%:!C%=-1:C%!4=-1:F%(A%)=C%
1082ENDIF:ENDPROC
1083DEFFN_(A$):LOCALB%:B%=ASC(FNv(A$)):IFB%<65THENB%=65
1084=B%
1085DEFFNv(A$):LOCALB%:A$=FNs(A$):B%=ASCLEFT$(A$,1):WHILENOT(B%>47ANDB%<58)ANDNOT(B%>64ANDB%<91)ANDA$<>"":A$=MID$(A$,2):B%=ASCLEFT$(A$,1):ENDWHILE:=A$
1086DEFPROCty(l%,y%):LOCALA%:_y%=j%-40:y%!8=!y%+_y%:y%!48=y%!40+_y%:y%+=88+8:FORA%=&BTO17:y%!(A%*32)=_y%-16:NEXT:FORA%=8TO23:A%-=7*(A%=&B):y%!(A%*32)=_y%:NEXT:y%!(24*32-8)=(_y%-384)/4:y%!(24*32)=y%!(24*32-8)+&80
1087y%!(25*32-8)=y%!(24*32)+(_y%-384)/4:y%!(25*32)=y%!(25*32-8)+&80:y%!(26*32-8)=y%!(25*32)+(_y%-384)/4:y%!(26*32)=y%!(26*32-8)+&80:ENDPROC
1088DEFPROCz_:LOCALA%,B%,C%,S%,z%,L%:FORA%=0TO26:M%(A%)=0:F%(A%)=-1:NEXT:M%(0)=1:C%=-1:y_%=-1:F_%=16:z%=OPENIN(z$):IFNOTlJ%ANDz%<>0THEN
1089WHILENOTEOF#z%:S%=VALGET$#z%:B%=FNw(w_%,S%,TRUE):IFC%<>-1THENC%!4=B%ELSEy_%=B%
1090!B%=C%:B%!8=S%:SYS&C,4,z%,B%+&C,S%-&C:L%=FN_(FNT(B%,0)+" "+FNT(B%,1))-64:M%(L%)+=1:IFF%(L%)=-1THENF%(L%)=B%
1091C%=B%:IFs_%THENPROCd(NOT1)
1092ENDWHILE:IFy_%<>-1THENB%!4=-1
1093CLOSE#z%
1094ENDIF:z%=OPENINe$:IFNOTlJ%ANDz%<>0THEN
1095F_%=VALGET$#z%:FORB%=0TOF_%-1:Z$(B%,0)=GET$#z%:Z$(B%,1)=GET$#z%:NEXT:CLOSE#z%
1096ENDIF:ENDPROC
1097DEFPROCLJ:LOCALz%,B%,S%,A%:z%=OPENOUTz$:B%=y_%:WHILEB%<>-1:BPUT#z%,STR$B%!8:SYS&C,2,z%,B%+&C,B%!8 -&C:B%=B%!4:ENDWHILE:CLOSE#z%:z%=OPENOUTe$:BPUT#z%,STR$F_%:FORA%=0TOF_%-1:BPUT#z%,Z$(A%,0)+CHR$&A+Z$(A%,1):NEXT:CLOSE#z%:z%=0:ENDPROC
1098DEFPROCXJ(_y%,ki%):IF_y%>0THEN
1099LOCALA%,B%,C%,F%:B%=F%(_y%):WHILEki%>0:B%=B%!4:ki%-=1:ENDWHILE:REPEATFORC%=0TO&E:A$(A%,C%)=FNT(B%,C%):NEXT:A%+=1:F%=(A%>Qy%*2-1)ORB%!4=-1:B%=B%!4:IFNOTF%THENF%=(FN_(FNT(B%,0)+" "+FNT(B%,1))-64<>_y%)
1100UNTILF%
1101ENDIF:ENDPROC
1102DEFFNT(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$
1103DEFPROCRJ(S$):LOCALt$,A%,B%,S%,I%,xa%,ea%,Wa%,kl%:pJ%=0:nJ%=0:z%=OPENINS$:WHILENOTEOF#z%:t$=GET$#z%:A%=FNJ_(t$):IFA%>nJ%THENnJ%=A%
1104pJ%+=1:ENDWHILE:CLOSE#z%:z%=0:IFnJ%>0THEN
1105SYS&400D9,,J$+".Resources.Default.Templates":SYS&400DB,,,0,0,0,"Import"TO,Wa%,kl%:SYS30,6,,,Wa%TO,,zl%;xa%:SYS30,6,,,kl%TO,,tl%;ea%:SYS&400DB,,zl%,tl%,tl%+kl%,Yl%,"Import",0:SYS&400C1,,zl%TOzy%:SYS&400DA:P$=S$
1106B%=1:FORA%=&ATO52STEP3:PROCA(zy%,A%,STR$B%):IFB%>0THENB%+=1:IFB%>nJ%THENB%=0
1107NEXT:PROCA(zy%,54,FNA("Import1")):PROCA(zy%,55,FNA("Import1")):PROCf(S$,1)
1108ELSEP$="":PROCB(FNA("ErrCSV"))
1109ENDIF:ENDPROC
1110DEFPROCCy:pJ%=0:nJ%=0:IFP$<>""THENOSCLI"Remove "+P$:P$=""
1111IFzy%<>-1THEN
1112!U%=zy%:zy%=-1:SYS&400C3,,U%:SYS30,7,,zl%:SYS30,7,,tl%
1113ENDIF:ENDPROC
1114DEFPROCf(S$,Kl%):LOCALA%,B%,S%,m$,h_%:m$=FNsy(S$,Kl%):F$="":wy%=-1:PROC_(`%,25,1):FORA%=9TO23:B%=&A+(A%-9)*3:h_%=VALFNZ(zy%,B%):IFB%<ÐEN
1115S%=FNk(uu%,FNZ(zy%,55+(B%=&A)))
1116ELSES%=0
1117ENDIF:IFh_%>0THEN
1118PROCA(`%,A%,FNey(m$,h_%,S%))
1119ELSEPROCA(`%,A%,"")
1120ENDIF:NEXT:PROCA(zy%,59,STR$Kl%):IFNOTVy%THENPROCw(i%,-1,-1)
1121V_%=t%:z_%=v%:t%=FNP(2):PROCN(0,0):IFV_%<>t%ORz_%<>v%THENpy%=0:PROCO
1122PROCw(zy%,-1,0):ENDPROC
1123DEFFNsy(S$,Kl%):LOCALA$:z%=OPENINS$:WHILEKl%>0:A$=GET$#z%:Kl%-=1:ENDWHILE:CLOSE#z%:z%=0:=A$
1124DEFFNey(A$,h_%,wa%):LOCALCJ%,B%,Z$,Il%:WHILEh_%>1ANDA$<>"":IFASCA$=34THENCJ%=NOTCJ%
1125IFASCA$=44ANDNOTCJ%THENh_%-=1
1126A$=MID$(A$,2):ENDWHILE:IFASCA$=34THENCJ%=TRUE:A$=MID$(A$,2)
1127WHILENOTIl%:IFASCA$=34ORA$=""THENCJ%=FALSE:Il%=TRUE
1128IFASCA$=44ANDNOTCJ%THENIl%=TRUE
1129IFNOTIl%THENZ$+=LEFT$(A$,1):A$=MID$(A$,2)
1130ENDWHILE:CASEwa%OF
1131WHEN1:Z$=LEFT$(Z$,INSTR(Z$," ")-1)
1132WHEN2:Z$=MID$(Z$,INSTR(Z$," ")+1)
1133WHEN3:IFINSTR(Z$," ")>0THEN
1134B%=LENZ$:REPEATB%-=1:UNTILMID$(Z$,B%,1)=" ":Z$=LEFT$(Z$,B%-1)
1135ELSEZ$=""
1136ENDIF
1137WHEN4:WHILEINSTR(Z$," "):Z$=MID$(Z$,INSTR(Z$," ")+1):ENDWHILE
1138ENDCASE:=Z$
1139DEFFNJ_(A$):LOCALCi%,CJ%:WHILEA$<>"":IFASCA$=34THENCJ%=NOTCJ%
1140IFASCA$=44ANDNOTCJ%THENCi%+=1
1141A$=MID$(A$,2):ENDWHILE:=Ci%-(Ci%>0)
1142DEFPROCh_(e%,w%,n%,Xy%,Ty%):LOCALA%,B%:CASETRUEOF
1143WHENw%=58ORw%=60:A%=VALFNZ(e%,59)-(w%-59):IFA%>0ANDA%<=pJ%THENPROCA(e%,59,STR$A%):PROCf(P$,A%)
1144WHENw%>=9ANDw%<=53:B%=&A+3*((w%-9)DIV3):A%=VALFNZ(e%,B%)+(w%-B%)*(1+2*(n%=1)):IFA%>=0ANDA%<=nJ%THEN
1145PROCA(e%,B%,STR$A%):PROCf(P$,VALFNZ(e%,59))
1146ENDIF
1147WHENw%=54ORw%=55:PROCC(uu%,Xy%,Ty%,e%,w%)
1148WHENw%=66:PROCj(FALSE):A%=VALFNZ(zy%,59)+1:IFA%>0ANDA%<=pJ%THENPROCA(zy%,59,STR$A%):PROCf(P$,A%)
1149WHENw%=67:REPEAT:PROCj(FALSE):A%=VALFNZ(zy%,59)+1:IFA%>0ANDA%<=pJ%THENPROCA(zy%,59,STR$A%):PROCf(P$,A%)
1150UNTILA%>pJ%
1151WHENw%=68:PROCCy
1152ENDCASE:ENDPROC
1153DEFPROCPJ(w%,I%):PROCA(zy%,w%,FNW(uu%,I%)):PROCf(P$,VALFNZ(zy%,59)):ENDPROC
1154DEFPROCr_(y%,ll%,_%,Q%,s%,b%):!J%=i%:IFL%(y%,ll%-&D)<>-1THENJ%!4=L%(y%,ll%-&D):SYS&400C4,,J%
1155SYS&400CB,,J%:Q%-=8:b%-=8:J%!4=_%-J%!4:J%!8=Q%-J%!16-b%:J%!&C=J%!4+s%:J%!16=J%!8+b%:J%!20=&7003119:J%!24=Ol%:J%!28=il%:J%!32=0:SYS&400C2,,J%TOL%(y%,ll%-&D):ENDPROC
1156DEFPROCsy:LOCALy%,Py%:!J%=i%:FORy%=0TO&A:FORPy%=0TO1:IFL%(y%,Py%)<>-1THENJ%!4=L%(y%,Py%):SYS&400C4,,J%
1157NEXT,:L%()=-1:ENDPROC
1158DEFPROCo_(w%):LOCALy%,Py%,Ba%,Hi%,A$:FORy%=0TO&A:FORPy%=0TO1:IFL%(y%,Py%)=w%THENBa%=y%:Hi%=Py%
1159NEXT,:IFHi%=0THENA$=Q$:jJ%=2ELSEA$=X$:jJ%=1
1160PROCGy(A$+A$(Ba%,Hi%+&D)):ENDPROC
1161DEFPROCGy(i$):!J%=256:J%!4=su%:J%!16=&4AF80:$(J%+20)=i$:SYS&400E7,18,J%,0:ENDPROC
1162DEFPROCMu:DIMC%(&C),U%(&C):Dy%=3:DJ%=&B:e_%=-1:C%()=-1:w$=T$+"Anni":`l%=0:WJ%=-1:PJ%=-1:yl%=FNC("ANM","ANM",1,4):ENDPROC
1163DEFFN_y=yl%
1164DEFPROCWu(A%):B%(A%)=1:W%(A%)=&C:S%(A%)=1:M$(A%)=FNA("AnnTab"):PROCL_:ENDPROC
1165DEFPROCZJ(v%,h%,a%,K%):LOCALJy%,Q%,r%:Jy%=(m%-Dy%*20-20)/Dy%:Q%=0:FORr%=v%+Dy%*ABSh%TOv%+Dy%*ABSh%+Dy%-1:Q%+=20+Jy%:PROCkJ(r%,a%+20,K%-Q%+Jy%,j%-40,Jy%):NEXT:IFh%=0ANDv%>1THENPROCR(h%,a%,K%)
1166IFh%ANDr%<&CTHENPROCR(h%,a%,K%)
1167ENDPROC
1168DEFPROCNJ(p%,Oi%):CASE!p%OF
1169WHEN0:IFPJ%<>-1THENPROCp(PJ%,-1)
1170WHEN1:IFPJ%<>-1THENPROCp(PJ%,0)
1171WHEN2:IFPJ%<>-1THENPROCUy(PJ%)
1172WHEN3:PROCWy("X�s %n%t birthday",Uy%,Ua%,Fy%,0,0)
1173ENDCASE:ENDPROC
1174DEFPROCHy(l%):v%+=l%*2*Dy%:IFv%+2*Dy%>&DTHENv%-=2*Dy%
1175IFv%<1THENv%=1
1176ENDPROC
1177DEFPROCf_(n%,h%,_%,Q%,o_%,wJ%):LOCALJy%,r%:Jy%=(m%-20)/Dy%:r%=-Q%DIVJy%+1:Q%+=(r%-1)*Jy%+20:IFQ%>0ORr%>Dy%OR_%<20OR_%>j%-40THENr%=0
1178IFh%THENo_%=dy%+20ELSEo_%=yy%+20
1179wJ%=-o%-20-Jy%*(r%-1):IFr%<>0THENPROCju(r%+Dy%*ABSh%+v%-1,n%,_%-20,Q%,o_%,wJ%,j%-40,-Jy%+20)
1180ENDPROC
1181DEFFNP_(w%,Cy%):k%=TRUE:CASECy%OF
1182WHEN414:PROCHy(1)
1183WHEN415:PROCHy(-1)
1184OTHERWISEk%=FALSE
1185ENDCASE:=k%
1186DEFFNUy(e%,w%,Cy%):k%=FALSE:IFe%=Hy%THEN
1187k%=TRUE:CASECy%OF
1188WHEN394,398,399:PROCM(Hy%,6-w%)
1189WHEN4,24:IFe_%<>-1THENPROCUy(e_%)
1190WHEN27:PROCy
1191WHEN&D:IFw%=2THEN
1192IFFNSy(FNZ(Hy%,2),d%,q%,x%)THENPROCM(Hy%,4)
1193ELSEPROCky
1194ENDIF
1195OTHERWISEk%=FALSE
1196ENDCASE
1197ENDIF:=k%
1198DEFPROCfu:LOCALB%:z%=OPENOUTw$:B%=WJ%:WHILEB%<>-1:BPUT#z%,STR$B%!8:SYS&C,2,z%,B%+&C,B%!8 -&C:B%=B%!4:ENDWHILE:CLOSE#z%:z%=0:ENDPROC
1199DEFPROCsJ(z%):BPUT#z%,DJ%:BPUT#z%,Dy%:ENDPROC
1200DEFPROCSu(z%):DJ%=BGET#z%:Dy%=BGET#z%:ENDPROC
1201DEFPROC_J(s%,Sy%,p%,_%,Q%):CASESy%OF
1202WHEN1:PROCH(By%,0,-1):PROCJ(By%,FNq(s%,Sy%),1):PROCC(By%,_%,Q%,s%,Sy%)
1203WHEN2,3,4,5:IFn%<>2THENPROCZ(s%,Sy%,1)
1204ENDCASE:ENDPROC
1205DEFPROCl_(My%,Ya%):PROCU(Ya%,1,!My%):PROCH(By%,0,-1):PROCJ(By%,!My%,1):ENDPROC
1206DEFPROCfJ(s%):LOCALA%:PROCU(s%,1,DJ%):FORA%=2TO5:PROCZ(s%,A%,0):NEXT:IFDy%<5THENPROCZ(s%,Dy%+1,1)ELSEPROCZ(s%,5,1)
1207ENDPROC
1208DEFPROCj_(s%):LOCALA%,B%:B%=Dy%:DJ%=FNq(s%,1):A%=2:WHILEA%<5ANDNOTFNM(s%,A%):A%+=1:ENDWHILE:IFA%<5THENDy%=A%-1ELSEDy%=6
1209IFB%<>Dy%THENU%()=0
1210IFS%(FNP(5))+2*Dy%>&DTHEN
1211IFZ%(t%)=5THENv%=&D-2*Dy%ELSES%(FNP(5))=&D-2*Dy%
1212ENDIF:ENDPROC
1213DEFPROCkJ(r%,a%,K%,s%,b%):LOCALcJ%,B%,Gy%,A%,Q%:B%=C%(r%):Gy%=28:IFFNS(a%,K%,s%,-b%)THEN
1214cJ%=FNJ("Homerton.Bold",&C,&C):v_%=FNJ("Homerton.Medium",&A,&A):PROCV(0,7):IFr%=by%THENSYS&400E6,!SJ%ELSESYS&400E6,5
1215PROCl(a%,K%,s%,b%,20):PROCL(cJ%,FNU(r%,-1),0,a%+s%/2,K%-&A):Q%=40:A%=U%(r%):WHILEA%>0:B%=B%!4:A%-=1:ENDWHILE:WHILEB%<>-1ANDQ%+Gy%-5<=b%:IFFNS(a%+20,K%-Q%-25,s%-50,Gy%)THEN
1216PROCr(v_%,FN`(B%,FNL),a%+70,K%-Q%-20,s%-70,Gy%):PROCL(v_%,STR$(B%?&C),1,a%+60,K%-Q%-4)
1217ENDIF:Q%+=Gy%:B%=FNZy(B%,r%):ENDWHILE:IFB%<>-1THENMOVEa%+8,K%-b%+20:MOVEBY18,0:PLOT81,-9,-18
1218IFU%(r%)<>0THENMOVEa%+8,K%-60:MOVEBY18,0:PLOT81,-9,18
1219PROCQ(cJ%):PROCQ(v_%)
1220ENDIF:ENDPROC
1221DEFPROCju(r%,n%,_%,Q%,a%,K%,s%,b%):LOCALL%,A%,B%,C%,N%,Gy%,A$:Gy%=28:C%=(-Q%-70+2*Gy%)DIVGy%+U%(r%):N%=-((b%+40)DIVGy%):A%=0:B%=C%(r%):WHILEB%<>-1:A%+=1:B%=FNZy(B%,r%):ENDWHILE:FORL%=0TO2:PROCK(yl%,L%,1):NEXT:PJ%=-1:Ua%=r%:CASETRUEOF
1222WHEN_%>35ANDQ%<-40AND_%<s%ANDC%>0ANDC%<=A%:B%=C%(r%):WHILEC%>1:C%-=1:B%=FNZy(B%,r%):ENDWHILE:IFn%=2THEN
1223FORL%=0TO2:PROCK(yl%,L%,0):NEXT:PJ%=B%
1224ELSEPROCp(B%,n%=4)
1225ENDIF
1226WHENn%=2
1227WHEN_%>0AND_%<30ANDQ%-20<b%:IFU%(r%)<A%-N%THENU%(r%)+=1:PROCD(i%,a%,K%,a%+s%,K%+b%)
1228WHEN_%>0AND_%<30ANDQ%>-60ANDQ%<=-42:IFU%(r%)>0THENU%(r%)-=1:PROCD(i%,a%,K%,a%+s%,K%+b%)
1229OTHERWISEIFn%<>2THENPROCWy("Chris� %n%t birthday",Uy%,r%,Fy%,0,0)
1230ENDCASE:ENDPROC
1231DEFPROCY_(d%,q%,N%,n%):LOCALB%:B%=-1:WHILEN%>0:B%=FNm(d%,q%,B%):N%-=1:ENDWHILE:PROCp(B%,n%=4):ENDPROC
1232DEFPROCp(B%,ty%):LOCALA%,A$:IFty%THENe_%=B%ELSEe_%=-1
1233A%=B%+16:WHILE?A%<>&B:A$+=CHR$?A%:A%+=1:ENDWHILE:PROCWy(A$,B%?&C,(B%!&C>>8)AND&F,(B%!&C>>&C)AND&FFF,B%?&F,ty%):ENDPROC
1234DEFPROCWy(W$,c%,r%,Q%,h_%,ty%):PROCA(Hy%,4,W$):PROCA(Hy%,2,STR$c%+"/"+STR$r%+"/"+STR$Q%):ol%=h_%:IFh_%=0THENh_%=DJ%
1235PROCU(Hy%,4,h_%):PROC_(Hy%,&D,(ty%=0)):IFty%=0THENA$=FNA("anset")ELSEA$=FNA("anedit")
1236PROCG(Hy%):PROCx(Hy%,TRUE,TRUE):PROCM(Hy%,2):QJ%=TRUE:PROCi(Hy%,Na%,A$,0):ENDPROC
1237DEFFNZy(B%,q%):LOCALA%,C%,c%,r%,Q%:B%=B%!4:IF((B%!&C>>8)AND&F)<>q%THENB%=-1
1238=B%
1239DEFFN`(B%,Fy%):LOCALA%,C%,c%,Q%,A$:Q%=(B%!&C>>&C)AND&FFF:IFQ%<=Fy%THEN
1240C%=B%?&F:C%-=DJ%*(C%=0):PROCV(0,C%):A%=B%+16:WHILE?A%<>&B:IF?A%=37THENA%+=1:A$+=FNhy(?A%,Q%,Fy%)ELSEA$+=CHR$?A%
1241A%+=1:ENDWHILE
1242ENDIF:=A$
1243DEFPROCtJ(w%):LOCALc%,r%,Q%:CASEw%OF
1244WHEN5:!J%=Hy%:SYS&400CB,,J%:PROCC(Fl%,J%!&C+66,J%!16,e%,w%)
1245WHEN&B:PROCky
1246WHEN&C:PROCy
1247WHEN&D:PROCUy(e_%)
1248ENDCASE:ENDPROC
1249DEFPROCky:LOCALA$,d%,q%,x%:A$=FNZ(Hy%,4):IFA$<>""THEN
1250IFFNSy(FNZ(Hy%,2),d%,q%,x%)THEN
1251IFe_%<>-1THENPROCxy(e_%)
1252PROCHJ(A$,d%,q%,x%,ol%):U%()=0:PROCy:ey%=TRUE:IFVy%AND(Z%(t%)=5ORZ%(t%)=3)THENPROCO
1253ELSEPROCM(Hy%,2)
1254ENDIF
1255ELSEPROCB(FNA("ErrMes"))
1256ENDIF:ENDPROC
1257DEFPROCy:e_%=-1:PROCG(Hy%):PROCG(ay%):IFVy%THENPROCM(i%,-1)
1258ENDPROC
1259DEFFNSy(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
1260WHENr%<1ORr%>&C:PROCB(FNA("ErrMonth"))
1261WHENQ%<1ORQ%>&FFF:PROCB(FNO("ErrYear","1","4095","",""))
1262WHENc%<1:PROCB(FNA("ErrDateZ"))
1263WHENc%>FNX(r%,Q%):PROCB(FNO("ErrDate",STR$FNX(r%,Q%),FNU(r%,-1)+STRING$(-(r%=2)," "+STR$Q%),"",""))
1264OTHERWISEA%=TRUE
1265ENDCASE:=A%
1266DEFPROCHJ(v$,d%,q%,x%,h_%):LOCALgy%,Wy%,S%,B%,Oy%,T%,A_%:A_%=d%+(q%<<8)+(x%<<&C)+(h_%<<24):Oy%=FALSE:S%=LENv$+1+16:Wy%=WJ%:gy%=-1:WHILEWy%<>-1ANDNOTOy%:IFFNRy(d%,q%,Wy%!&C)THENOy%=TRUEELSEgy%=Wy%:Wy%=Wy%!4
1267ENDWHILE:B%=FNw(w_%,S%,TRUE):!B%=gy%:B%!4=Wy%:B%!8=S%:B%!&C=A_%:$(B%+16)=v$+CHR$&B:IFgy%=-1THENWJ%=B%ELSEgy%!4=B%
1268IFWy%<>-1THEN!Wy%=B%
1269IFC%(q%)=Wy%ORC%(q%)=-1THENC%(q%)=B%
1270ENDPROC
1271DEFPROCUy(B%):PROCxy(B%):PROCy:ey%=TRUE:IFB%=e_%THENe_%=-1
1272IFVy%AND(Z%(t%)=5ORZ%(t%)=3)THENPROCO
1273ENDPROC
1274DEFPROCxy(B%):LOCALgy%,Wy%,r%,Pi%:Pi%=-1:gy%=!B%:Wy%=B%!4:r%=(B%!&C>>8)AND&F:U%(r%)=0:IFgy%<>-1THENgy%!4=Wy%
1275IFWy%<>-1THEN!Wy%=gy%:IF((Wy%!&C>>8)AND&F)=r%THENPi%=Wy%
1276IFWJ%=B%THENWJ%=Wy%
1277IFC%(r%)=B%THENC%(r%)=Pi%
1278PROCDy(w_%,B%,TRUE):ENDPROC
1279DEFFNRy(c%,r%,T%):LOCALg%,Nl%,ru%:Nl%=T%AND&FF:ru%=(T%>>8)AND&F:IFr%>=ru%THEN
1280IFc%<Nl%ANDru%=r%THENg%=TRUEELSEg%=FALSE
1281ELSEg%=TRUE
1282ENDIF:=g%
1283DEFPROCxJ:LOCALB%,Oy%,vJ%,c%,r%,mu%,fJ%,jy%,d%,q%,x%:PROCP(qJ%,c%,r%,mu%,fJ%,jy%):B%=C%(fJ%):d%=FNI:q%=FNV:x%=FNL:WHILEB%<>-1ANDNOTOy%ANDNOTvJ%:c%=B%?&C:r%=(B%!&C>>8)AND&F:IFr%>q%OR(r%=q%ANDc%>d%)THENvJ%=TRUE:PROCTy
1284IF(r%>fJ%OR(r%=fJ%ANDc%>mu%))ANDNOTvJ%THENOy%=TRUE:PROCfy(B%)ELSEB%=B%!4
1285ENDWHILE:IFNOTOy%THENPROCTy
1286ENDPROC
1287DEFPROCzy:LOCALB%,c%,r%,d%,q%,x%:d%=FNI:q%=FNV:x%=FNL:B%=`l%!4:J_%=0:IFB%<>-1THEN
1288c%=B%?&C:r%=(B%!&C>>8)AND&F:IFr%>q%OR(r%=q%ANDc%>d%)THENPROCTyELSEPROCfy(B%)
1289ENDIF:ENDPROC
1290DEFPROCTy:Pu%=FALSE:qJ%=FNn(FNz):PROCG(VJ%):PROCc:ENDPROC
1291DEFPROCfy(B%):LOCALc%:PROCA(VJ%,1,FNO("its",FNQ(d%,q%,x%,-1),"","","")):PROCA(VJ%,2,FN`(B%,x%)):c%=B%?&F:c%-=DJ%*(c%=0):PROCU(VJ%,2,c%):PROCw(VJ%,TRUE,TRUE):ey%=-1:J_%=&A:`l%=B%:ENDPROC
1292DEFFNb(c%,r%):LOCALB%,C%,Nl%,ru%:B%=C%(r%):IFB%<>-1THEN
1293REPEAT:IFB%?&C=c%THENC%+=1
1294B%=B%!4:IFB%<>-1THENNl%=B%?&C:ru%=(B%!&C>>8)AND&FELSEru%=&D
1295UNTILNl%>c%ORru%>r%
1296ENDIF:=C%
1297DEFFNm(c%,r%,B%):IFB%=-1THEN
1298B%=C%(r%):WHILEB%?&C<>c%:B%=B%!4:ENDWHILE
1299ELSEB%=B%!4
1300ENDIF:IFB%<>-1THENIFB%?&C>c%OR((B%!&C>>8)AND&F)>r%THENB%=-1
1301=B%
1302DEFPROCL_:LOCALS%,C%,B%,r%:C%=-1:WJ%=-1:z%=OPENINw$:IFNOTlJ%ANDz%<>0THEN
1303WHILENOTEOF#z%:S%=VALGET$#z%:B%=FNw(w_%,S%,TRUE):IFC%<>-1THENC%!4=B%ELSEWJ%=B%
1304!B%=C%:B%!8=S%:SYS&C,4,z%,B%+&C,S%-&C:r%=((B%!&C)>>8)AND&F:IFC%(r%)=-1THENC%(r%)=B%
1305C%=B%:IFs_%THENPROCd(NOT1)
1306ENDWHILE:IFWJ%<>-1THENB%!4=-1
1307CLOSE#z%:z%=0
1308ENDIF:ENDPROC
1309DEFFNhy(T%,Q%,Fy%):LOCALA$,x,c%,F%,L%:Ul%=(T%AND32)=0:c%=Fy%-Q%:CASECHR$T%OF
1310WHEN"y","Y":A$=FNA("year"+STRING$(-(c%>1),"s")):IFUl%THENA$=FNs(A$)
1311WHEN"n":A$=STR$c%
1312WHEN"t","T":A$=FNNy(c%):IFUl%THENA$=FNs(A$)
1313WHEN"c","C":SYS&61502,S_%,"Ann"+STR$c%,J%,256TO,,,L%;F%:IF(F%AND1)=0THENJ%?L%=&D:A$=" ("+$J%+")"
1314IFUl%THENA$=FNs(A$)
1315ENDCASE:=A$
1316DEFPROCuJ:ky%=2:m_%=&F:Tu%=FALSE:oi%=FNC("FAM","FAM",1,4):Yi%=FNC("DIM4","ANM",1,3):F=FNC("DIM","DIM",1,6):PROCz(F,3,Yi%):PROCz(F,5,oi%):PROCc_(F,2,-1):sJ%=FNC("E","E",1,6):el%=FNC("OT","OT",1,6):xl%=FNC("Day","Day",1,7):al%=FNC("OE","OE",1,&C)
1317Fl%=FNCy(FNA("Col")):$(Fl%+28+&C)=FNA("Def"):x$=T$+"Diary":DIMV%(&E):L_%=-1:BJ%=-1:Au%=0:Wu%=FNC("EN","EN",1,3):Vu%=FNC("EA","E",3,6):D_%=0:ly%=0:M_%=-1:T_%=6:PROCAl:ENDPROC
1318DEFFNqy=F
1319DEFPROCO_(A%):PROCV_:PROCTJ:PROCI(FNI,FNV,FNL):PROCJ(F,ky%-1,TRUE):B%(A%)=FNF(0,0,1,1,&77d):W%(A%)=FNF(0,0,31-6,&C,&fff):M$(A%)=FNA("DiaTab"):ENDPROC
1320DEFPROCpJ:ENDPROC
1321DEFPROCmu:BJ%=-1:ENDPROC
1322DEFPROCUu(v%,h%,a%,K%):LOCALd%,q%,x%,cJ%,vl%,v_%,n_%,ZJ%,hl%:PROCP(v%,n_%,ZJ%,d%,q%,x%):cJ%=FNJ("Homerton.Bold",&E,&E):SYS&400E6,7:vl%=FNJ("Trinity.Bold",&C,&C):v_%=FNJ("Homerton.Medium",&A,&A):SYS&40081,,"Trinity.Medium",9*16,9*16TOhl%:CASEky%OF
1323WHEN1:PROCou(v%,h%,a%,K%)
1324WHEN2:PROCk_(v%,h%,a%,K%)
1325WHEN3:PROCku(v%,h%,a%,K%)
1326ENDCASE:PROCV(0,7):IFh%THEN
1327A$=FNU(q%,-1)+" "+STR$x%:CASETRUEOF
1328WHENZJ%<>x%:A$=FNU(n_%,3)+" "+STR$ZJ%+" - "+FNU(q%,3)+" "+STR$x%
1329WHENn_%<>q%:A$=FNU(n_%,-1)+" - "+A$
1330ENDCASE:IFFNG(FNF(0,0,d%,q%,x%),W%(t%))=-1THENPROCR(h%,a%,K%)
1331PROCL(cJ%,A$,1,a%+j%-&A,K%-&A)
1332ELSE:A$=STR$ZJ%+" "+FNU(n_%,-1):CASETRUEOF
1333WHENZJ%<>x%:A$=STR$ZJ%+" "+FNU(n_%,3)+" - "+STR$x%+" "+FNU(q%,3)
1334WHENn_%<>q%:A$+=" - "+FNU(q%,-1)
1335ENDCASE:PROCL(cJ%,A$,-1,a%+&A,K%-&A):IFFNG(v%,B%(t%))=1THENPROCR(h%,a%,K%)
1336ENDIF:PROCQ(cJ%):PROCQ(vl%):PROCQ(v_%):ENDPROC
1337DEFPROCx_(p%,Oi%):CASE!p%OF
1338WHEN0,1,2:IFky%<>!p%+1THEN
1339PROCJ(F,ky%-1,FALSE):ky%=!p%+1:PROCJ(F,!p%,TRUE):PROCP(S%(FNP(3)),A%,B%,d%,q%,x%):PROCI(d%,q%,x%):IFZ%(t%)=3THENv%=S%(t%):uJ%=TRUE
1340ENDIF
1341WHEN3:CASEp%!4OF
1342WHEN0:PROCOy(BJ%)
1343WHEN1:PROCU_(BJ%)
1344WHEN2:PROCk(BJ%)
1345ENDCASE
1346WHEN4:PROCAy(FNI,FNV,FNL,F,0)
1347WHEN5:CASEp%!4OF
1348WHEN0:PROC_u
1349WHEN1:PROCLu
1350WHEN2:PROCIu
1351WHEN3:PROCH_
1352ENDCASE
1353ENDCASE:ENDPROC
1354DEFPROCiy(My%,p%):CASEMy%OF
1355WHENsJ%:A$=FNW(My%,!p%):IFFNS_(My%)="Every"THENPROCA(f%,30,A$):cu%=!p%+1ELSEPROCA(Ly%,&D,A$)
1356WHENel%:PROCA(f%,33,FNW(My%,!p%)):fu%=!p%+1
1357WHENxl%:PROCA(f%,34,FNW(My%,!p%)):vu%=!p%+1
1358WHENal%:PROCA(f%,35,FNW(My%,!p%)):tu%=!p%+1
1359ENDCASE:ENDPROC
1360DEFPROCXy(l%):LOCALd%,q%,x%,A%,B%:PROCP(v%,A%,B%,d%,q%,x%):CASEky%OF
1361WHEN1:PROCF(d%,q%,x%,l%*&E,0,0)
1362WHEN2:PROCF(d%,q%,x%,l%*7,0,0)
1363WHEN3:PROCF(d%,q%,x%,l%*2,0,0)
1364ENDCASE:py%=-FNG(v%,FNF(0,0,d%,q%,x%)):PROCI(d%,q%,x%):IFFNG(v%,B%(t%))=-1THENv%=B%(t%)
1365IFFNG(v%,W%(t%))=1THENv%=W%(t%)
1366ENDPROC
1367DEFPROCa_(n%,h%,_%,Q%,o_%,wJ%):LOCALR%:CASEky%OF
1368WHEN1:R%=FNTy(n%,h%,_%,Q%)
1369WHEN2:R%=FNky(n%,h%,_%,Q%)
1370WHEN3:R%=FNYy(n%,h%,_%,Q%)
1371ENDCASE:IFn%=2ANDR%>1THENBJ%=R%ELSEBJ%=-1
1372ENDPROC
1373DEFFNzy(w%,Cy%):k%=TRUE:CASECy%OF
1374WHEN414:PROCXy(1)
1375WHEN415:PROCXy(-1)
1376WHEN30:PROCI(FNI,FNV,FNL)
1377WHEN389:PROCAy(FNI,FNV,FNL,F,0)
1378WHEN27:PROCG(ay%)
1379OTHERWISEk%=FALSE
1380ENDCASE:=k%
1381DEFFNdy(e%,w%,Cy%):LOCALA%,B%:k%=TRUE:IFe%=f%THEN
1382A%=0:IFCy%=&DORCy%=398ORCy%=394THENA%=1ELSEIFCy%=399THENA%=-1
1383IFA%<>0THEN
1384CASEw%OF
1385WHEN16:IFA%=1THENB%=17ELSEB%=18
1386WHEN17:B%=w%+A%
1387WHEN18:IFA%=1THEN
1388IFCy%<>&DTHENB%=16ELSEPROCN_
1389ELSEB%=17
1390ENDIF
1391OTHERWISEk%=FALSE
1392ENDCASE:IFB%<>0THENPROCM(e%,B%)
1393ELSE:CASECy%OF
1394WHEN27:PROCn
1395WHEN4,24:IFL_%<>-1THENPROCk(L_%)
1396OTHERWISEk%=FALSE
1397ENDCASE
1398ENDIF
1399ELSEk%=FALSE
1400ENDIF:=k%
1401DEFPROClJ:LOCALz%,B%:z%=OPENOUTx$:B%=M_%:WHILEB%<>-1:BPUT#z%,STR$B%!8:SYS&C,2,z%,B%+&C,B%!8 -&C:B%=B%!4:ENDWHILE:CLOSE#z%:z%=0:ENDPROC
1402DEFPROCAu(z%):BPUT#z%,ky%:BPUT#z%,m_%:BPUT#z%,Tu%+5:BPUT#z%,D_%:BPUT#z%,ly%:BPUT#z%,T_%:ENDPROC
1403DEFPROCbJ(z%):ky%=BGET#z%:m_%=BGET#z%:Tu%=(BGET#z%)-5:D_%=BGET#z%:ly%=BGET#z%:T_%=BGET#z%:ENDPROC
1404DEFPROCJu(s%,Sy%,p%,_%,Q%):LOCALA%,B%:!J%=s%:SYS&400CB,,J%:_%=J%!4+664:CASEw%OF
1405WHEN1,2,3:IFn%<>2PROCZ(s%,Sy%,1)
1406WHEN&D:PROCH(By%,0,-1):PROCJ(By%,FNq(s%,Sy%),1):PROCC(By%,_%,Q%,s%,Sy%)
1407WHEN6:B%=NOTFNM(s%,Sy%):FORA%=7TO&A:PROCS(s%,A%,B%):NEXT
1408WHEN8,9:A%=VALFNZ(s%,7):A%+=1+2*(Sy%=8):IFA%>0ANDA%<&DTHENPROCA(s%,7,STR$A%)
1409WHEN&A:PROCC(Vu%,_%,Q%,s%,Sy%)
1410WHEN&B:PROCS(s%,&C,NOTFNM(s%,Sy%))
1411WHEN&C:PROCC(Wu%,_%,Q%,s%,Sy%)
1412ENDCASE:ENDPROC
1413DEFPROCiJ(p%,s%):CASEtJ%OF
1414WHENBy%:PROCU(s%,&D,!p%):PROCH(By%,0,-1):PROCJ(By%,!p%,1)
1415WHENVu%:PROCA(s%,&A,FNW(Vu%,!p%))
1416WHENWu%:PROCA(s%,&C,FNW(Wu%,!p%))
1417ENDCASE:ENDPROC
1418DEFPROCnu(s%):LOCALA%:FORA%=1TO3:PROCZ(s%,A%,ABS(ky%=A%)):NEXT:PROCU(s%,&D,m_%):PROCZ(s%,5,-Tu%):PROCZ(s%,&B,-(D_%<>0)):PROCS(s%,&C,-(D_%=0)):PROCZ(s%,6,-(ly%<>0)):FORA%=7TO&A:PROCS(s%,A%,-(ly%=0)):NEXT:PROCZ(s%,&F,ABS((T_%AND4)>0)):PROCZ(s%,16,ABS((T_%AND2)>0)):PROCZ(s%,17,ABS((T_%AND1)>0))
1419PROCS(s%,&F,ABS((T_%AND1)>0)):IFly%<>0THEN
1420PROCA(s%,7,STR$(ly%AND&F)):PROCA(s%,&A,FNW(Vu%,ly%>>4))
1421ELSEPROCA(s%,7,"1"):PROCA(s%,&A,FNA("E3"))
1422ENDIF:IFD_%=0THENPROCA(s%,&C,FNA("EN1"))ELSEPROCA(s%,&C,FNW(Wu%,D_%-1))
1423ENDPROC
1424DEFPROCbu(s%):LOCALA%,B%,d%,q%,x%:A%=0:REPEATA%+=1:UNTILFNM(s%,A%)ORA%=3:ky%=A%:PROCP(S%(FNP(3)),A%,B%,d%,q%,x%):PROCI(d%,q%,x%):m_%=FNq(s%,&D):Tu%=FNM(s%,5):ly%=0:D_%=0:IFFNM(s%,6)THENly%=((FNk(Vu%,FNZ(s%,&A)))<<4)+VALFNZ(s%,7)
1425IFFNM(s%,&B)THEND_%=FNk(Wu%,FNZ(s%,&C))+1
1426T_%=ABS(FNM(s%,17)+2*FNM(s%,16)+4*FNM(s%,&F)):ENDPROC
1427DEFPROCI(d%,q%,x%):LOCALu%,B%,Oy%,T%,y%:u%=FNH(d%,q%,x%):IFky%=3THEN
1428PROCF(d%,q%,x%,FNZ_(d%,q%,x%)-1,0,0)
1429ELSEPROCF(d%,q%,x%,-u%+1,0,0)
1430ENDIF:y%=FNF(0,0,d%,q%,x%):S%(FNP(3))=y%:IFZ%(t%)=3THENv%=S%(t%)
1431PROCMy:ENDPROC
1432DEFPROCMy:LOCALB%,T%,Oy%:B%=M_%:kJ%=-1:y%=S%(FNP(3)):V%()=0:WHILEB%<>-1ANDNOTOy%:T%=B%!&C:IFFNG(y%,T%)<>1THENOy%=TRUE:kJ%=B%ELSEB%=B%!4
1433ENDWHILE:ENDPROC
1434DEFFNcy(T%):LOCALB%,F%:B%=M_%:F%=-1:WHILEB%<>-1ANDF%=-1:IF((B%!16)AND(1<<20))=0OR((B%!16)AND4)=4THENF%=B%ELSEB%=B%!4
1435ENDWHILE:=F%
1436DEFPROC__(B%):IF(B%!16AND(3<<20))=0THEN
1437LOCALfy%,Ky%,d%,q%,x%,K_%,A$,A%,R%,C%:PROCP(B%!&C,fy%,Ky%,d%,q%,x%):Au%=B%:IFKy%>&CTHENKy%-=&C:K_%=TRUEELSEIFKy%=0THENKy%=&C
1438A$=STR$Ky%+":"+STRING$(2-LENSTR$fy%,"0")+STR$fy%:IFK_%THENA$+=" pm,"ELSEA$+=" am,"
1439PROCA(Ly%,1,FNO("WasSet",A$,"","","")):PROCA(Ly%,2,FNQ(d%,q%,x%,-1)):IF((B%!16)AND4)=4THEN
1440R%=TRUE:IF((B%!16)AND8)=8THEN
1441PROCmy(fy%,Ky%,d%,q%,x%,((B%!16)>>8)AND&FF,(((B%!16)>>16)AND&F)-1):IFKy%>&CTHENKy%-=&C:K_%=TRUEELSEIFKy%=0THENKy%=&C
1442A$=STR$Ky%+":"+STRING$(2-LENSTR$fy%,"0")+STR$fy%:IFK_%THENA$+=" pm,"ELSEA$+=" am,"
1443PROCA(Ly%,&F,FNO("WilRpt",A$,"","","")):PROCA(Ly%,16,FNQ(d%,q%,x%,-1))
1444ELSE:PROCjy(d%,q%,x%,B%!16):A$=STR$Ky%+":"+STRING$(2-LENSTR$fy%,"0")+STR$fy%:IFK_%THENA$+=" pm,"ELSEA$+=" am,"
1445PROCA(Ly%,&F,FNO("WilRpt",A$,"","","")):PROCA(Ly%,16,FNQ(d%,q%,x%,-1))
1446ENDIF
1447ENDIF:IF((B%!16)AND1)=1THENJ_%=&A
1448C%=(B%!16>>4)AND&F:C%-=m_%*(C%=0):FORA%=4TO6:PROCU(Ly%,A%,C%):NEXT:B%+=20:FORA%=4TO6:A$="":WHILE?B%<>&B:A$+=CHR$?B%:B%+=1:ENDWHILE:B%+=1:PROCA(Ly%,A%,A$):NEXT:PROCZ(Ly%,9,0):FORA%=&ATO&D:PROCS(Ly%,A%,1):NEXT:PROCA(Ly%,&A,"1"):PROCA(Ly%,&D,FNA("E1")):PROCcJ(NOTR%,TRUE):rJ%=-1
1449ELSE:IF(B%!16AND(1<<21))<>0THENPROCtu(B%)
1450PROCBy(B%,0)
1451ENDIF:ENDPROC
1452DEFPROCtu(B%):LOCALA$,A%,Z$,xi%,`u%: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)
1453Z$=FNs(LEFT$(A$,INSTR(A$," "))):IFZ$<>"FILER_RUN"ANDZ$<>"RUN"THEN
1454SYS8,5,A$TOxi%,`u%:IFxi%=2THENA$="Run "+A$ELSEIFxi%<>0THENA$="Filer_Run "+A$
1455ENDIF:SYS&400DE,A$:ENDPROC
1456DEFPROCIu:LOCALy%,B%,Oy%,A%,C%,d%,q%,x%:y%=S%(FNP(3)):B%=kJ%:PROCP(y%,A%,C%,d%,q%,x%):A%=-&E*(ky%=1)-7*(ky%=2)-2*(ky%=3):PROCF(d%,q%,x%,A%,0,0):y%=FNF(0,0,d%,q%,x%):WHILEB%<>-1ANDNOTOy%:T%=B%!&C:IFFNG(y%,T%)=-1THENOy%=TRUEELSEB%=B%!4
1457ENDWHILE:IFOy%THEN
1458t%=FNP(3):PROCP(B%!&C,A%,C%,d%,q%,x%):PROCI(d%,q%,x%)
1459ELSEPROCB(FNA("ErrNoMore"))
1460ENDIF:ENDPROC
1461DEFPROCLu:LOCALy%,B%,Oy%,A%,C%,d%,q%,x%:y%=S%(FNP(3)):B%=kJ%:WHILEB%<>-1ANDNOTOy%:T%=B%!&C:IFFNG(y%,T%)=1THENOy%=TRUEELSEB%=!B%
1462ENDWHILE:IFOy%THEN
1463t%=FNP(3):PROCP(B%!&C,A%,C%,d%,q%,x%):PROCI(d%,q%,x%)
1464ELSEPROCB(FNA("ErrNoB4"))
1465ENDIF:ENDPROC
1466DEFPROC_u:IFM_%<>-1THEN
1467t%=FNP(3):PROCP(M_%!&C,A%,C%,d%,q%,x%):PROCI(d%,q%,x%)
1468ELSEPROCB(FNA("ErrNoEnt"))
1469ENDIF:ENDPROC
1470DEFPROCH_:LOCALB%:B%=M_%:IFB%<>-1THEN
1471WHILEB%!4<>-1:B%=B%!4:ENDWHILE:t%=FNP(3):PROCP(B%!&C,A%,C%,d%,q%,x%):PROCI(d%,q%,x%)
1472ELSEPROCB(FNA("ErrNoEnt"))
1473ENDIF:ENDPROC
1474DEFPROCou(v%,h%,a%,K%):LOCALGu%,Jy%,u%:IFh%THENPROCF(d%,q%,x%,7,0,0)
1475Gu%=K%-40:Jy%=-(m%-60)/7:ZJ%=x%:n_%=q%:FORu%=1TO7:PROCay(u%+7*ABSh%,d%,u%,q%,x%,h%,a%+&A,Gu%,j%-20,Jy%):IFu%<>7THENPROCF(d%,q%,x%,1,0,0):Gu%+=Jy%
1476NEXT:ENDPROC
1477DEFFNTy(n%,h%,_%,Q%):LOCALJy%,l%,a%,R%:Jy%=(m%-60)/7:Q%=-Q%-40+Jy%:l%=((Q%DIVJy%)MOD8):IFl%<>0THENl%+=7*ABSh%:IF_%<&AOR_%>j%-20THENl%=0
1478IFh%THENa%=dy%ELSEa%=yy%
1479IFl%<>0THENR%=FNAy(l%,_%-&A,Q%MODJy%,n%,Jy%,a%+&A,-o%-40-(l%+7*(l%>7))*Jy%+Jy%)
1480=R%
1481DEFPROCk_(v%,h%,a%,K%):LOCALGu%,Jy%,vJ%,u%:IFh%THENPROCF(d%,q%,x%,3,0,0):u%=4:vJ%=7ELSEu%=1:vJ%=3
1482Gu%=K%-40:Jy%=-(m%-60)/3:ZJ%=x%:n_%=q%:FORu%=u%TOvJ%:IFu%=6THENJy%=Jy%/2
1483PROCay(u%,d%,u%,q%,x%,h%,a%+&A,Gu%,j%-20,Jy%):IFu%<>vJ%THENPROCF(d%,q%,x%,1,0,0):Gu%+=Jy%
1484NEXT:ENDPROC
1485DEFFNky(n%,h%,_%,Q%):LOCALJy%,l%,a%,K%,R%:Jy%=(m%-60)/3:Q%=-Q%-40+Jy%:l%=((Q%DIVJy%)MOD4):Q%=Q%MODJy%:K%=-o%-40-l%*Jy%+Jy%:IFl%<>0THENl%+=3*ABSh%:IF_%<&AOR_%>j%-20THENl%=0
1486IFl%>=6THENJy%=Jy%/2
1487IFl%=6ANDQ%>=Jy%THENQ%-=Jy%:l%=7:K%-=Jy%
1488IFh%THENa%=dy%ELSEa%=yy%
1489IFl%<>0THENR%=FNAy(l%,_%-&A,Q%,n%,Jy%,a%+&A,K%)
1490=R%
1491DEFPROCku(v%,h%,a%,K%):IFh%THENPROCF(d%,q%,x%,1,0,0)
1492ZJ%=x%:n_%=q%:PROCay(ABSNOTh%,d%,FNH(d%,q%,x%),q%,x%,h%,a%+&A,K%-40,j%-20,-m%+60):ENDPROC
1493DEFFNYy(n%,h%,_%,Q%):LOCALl%,a%,R%:Q%=-Q%-40:l%=1:IFh%THENa%=dy%ELSEa%=yy%
1494IF_%<&AOR_%>j%-20ORQ%>m%-60ORQ%<0THENl%=0ELSEl%+=ABSh%
1495IFl%<>0THENR%=FNAy(l%,_%-&A,Q%,n%,m%,a%+&A,-o%-40)
1496=R%
1497DEFPROCay(l%,d%,u%,q%,x%,h%,a%,K%,s%,b%):LOCALB%,C%,T%,Q%,Gy%,A%,A_%:Gy%=28:A_%=FNF(0,0,d%,q%,x%):IFFNS(a%,K%,s%,b%)THEN
1498PROCV(0,7):IFA_%=FNF(0,0,FNI,FNV,FNL)THEN
1499SYS&400E6,!SJ%:PROCl(a%-4,K%-4,s%+8,-b%-8,&C):SYS&400E6,7
1500ENDIF:MOVEa%,K%:DRAWBYs%,0:MOVEBY0,b%:DRAWBY-s%,0:IFh%THEN
1501PROCL(vl%,STR$d%,-1,a%+s%-30,K%-6):PROCL(v_%,FNc(u%,-1),1,a%+s%-40,K%-6):IFFNS(a%,K%-6,s%-&DC,-24)THENPROCB_(u%,d%,q%,x%,-1,a%,K%-6)
1502ELSE:PROCL(vl%,STR$d%,1,a%+30,K%-6):PROCL(v_%,FNc(u%,-1),-1,a%+40,K%-6):IFFNS(a%+&DC,K%-6,s%-&DC,-24)THENPROCB_(u%,d%,q%,x%,1,a%+s%,K%-6)
1503ENDIF:Q%=40:T%=FNb(d%,q%):B%=-1:A%=V%(l%):C%=A%-T%:WHILEA%>0ANDT%>0:B%=FNm(d%,q%,B%):T%-=1:A%-=1:ENDWHILE:WHILET%<>0ANDQ%+Gy%-5<=-b%:B%=FNm(d%,q%,B%):T%-=1:PROCr(v_%,FN`(B%,x%),a%+30,K%-Q%-20,j%-50,Gy%):Q%+=Gy%:ENDWHILE:B%=kJ%:T%=FNF(0,0,d%,q%,x%):A%=C%
1504WHILEA%>0:B%=FNx(B%,T%):B%=B%!4:A%-=1:ENDWHILE:IFQ%+Gy%-5<=-b%THEN
1505REPEAT:B%=FNx(B%,T%):IFB%<>-1THENPROCr(v_%,FNmy(B%),a%+30,K%-Q%-20,j%-50,Gy%):Q%+=Gy%:B%=B%!4
1506UNTILB%=-1ORQ%+Gy%-5>-b%
1507ENDIF:IFFNx(B%,T%)<>-1ANDQ%+Gy%-5>-b%THENMOVEa%,K%+b%+24:MOVEBY20,0:PLOT81,-&A,-20
1508IFV%(l%)>0THENMOVEa%,K%-60:MOVEBY20,0:PLOT81,-&A,20
1509ENDIF:ENDPROC
1510DEFPROCTJ:LOCALA%,F%,P%,B%,A$,C%,L%:A%=1:REPEATSYS&61502,S_%,"Spec"+STR$A%,0TO,,P%;F%:A%+=1:UNTILF%AND1:Xi%=A%-3:DIMJ%(A%-3,4):B%=0:WHILEB%<=Xi%:SYS&41502,S_%,"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
1511A%=1:REPEATSYS&61502,S_%,"Easter"+STR$A%,0TO,,P%;F%:A%+=1:UNTILF%AND1:Ma%=A%-3:DIMR%(A%-3,1):B%=0:WHILEB%<=A%-3:SYS&41502,S_%,"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
1512DEFPROCB_(Ka%,c%,r%,x%,_u%,_%,Q%):LOCALA$,LJ%,KJ%,Py%,A%:FORA%=0TOXi%:IFJ%(A%,1)=r%THEN
1513IF(J%(A%,2)=-1ORJ%(A%,2)=Ka%)ANDc%>=J%(A%,3)ANDc%<=J%(A%,4)THENA$+=$J%(A%,0)+"/"
1514ENDIF:NEXT:PROCvJ(LJ%,KJ%,x%):A%=0:Py%=0:WHILEA%<=Ma%:PROCF(LJ%,KJ%,x%,R%(A%,1)-Py%,0,0):Py%=R%(A%,1):IFLJ%=c%ANDKJ%=r%THENA$+=$R%(A%,0)+"/"
1515A%+=1:ENDWHILE:IFINSTR(LEFT$(A$),"/")THENSYS&40081,,"Trinity.Medium",7*16,7*16TOPy%ELSEPy%=hl%
1516IFA$<>""THENPROCL(Py%,LEFT$(A$),_u%,_%,Q%)
1517IFPy%<>hl%THENSYS&40082,Py%
1518ENDPROC
1519DEFFNAy(l%,_%,Q%,n%,b%,a%,K%):LOCALny%,Gy%,A%,B%,d%,q%,x%,T%,F%,R%:Gy%=28:CASETRUEOF
1520WHEN_%>=30AND_%<=j%-20ANDQ%>=40:PROCP(v%,A%,B%,d%,q%,x%):PROCF(d%,q%,x%,l%-1,0,0):ny%=(((Q%-40+Gy%)DIVGy%)):IFny%>0THENny%+=V%(l%)
1521IFny%>0ANDny%<=FNb(d%,q%)ANDn%<>2THENPROCY_(d%,q%,ny%,n%):ny%=-1
1522IFny%>0THENny%-=FNb(d%,q%)
1523IFny%>0THEN
1524T%=FNF(0,0,d%,q%,x%):B%=kJ%:B%=FNx(B%,T%):WHILEny%>1ANDB%<>-1:B%=B%!4:B%=FNx(B%,T%):ny%-=1:ENDWHILE:IFB%=-1THEN
1525IFn%<>2THENPROCs(d%,q%,x%):QJ%=TRUE
1526ELSE:CASEn%OF
1527WHEN4:PROCOy(B%):QJ%=TRUE
1528WHEN2:R%=B%
1529WHEN1:PROCU_(B%):QJ%=TRUE
1530ENDCASE
1531ENDIF
1532ELSE:IFn%<>2ANDny%=0THEN
1533PROCP(v%,A%,B%,d%,q%,x%):PROCF(d%,q%,x%,l%-1,0,0):PROCs(d%,q%,x%):QJ%=TRUE
1534ENDIF
1535ENDIF
1536WHENn%=2
1537WHEN_%<=20ANDQ%>=b%-20:PROCP(v%,A%,B%,d%,q%,x%):PROCF(d%,q%,x%,l%-1,0,0):T%=FNF(0,0,d%,q%,x%):ny%=-((b%-40)DIVGy%):B%=FNx(kJ%,T%):WHILEB%<>-1:B%=B%!4:B%=FNx(B%,T%):ny%+=1:ENDWHILE:ny%+=FNb(d%,q%):IFV%(l%)<ny%THENV%(l%)+=1:PROCD(i%,a%,K%-40,a%+j%-&A,K%-b%+4)
1538WHEN_%<=20ANDQ%<=60ANDQ%>=40ANDV%(l%)<>0:V%(l%)-=1:PROCD(i%,a%,K%-40,a%+j%-&A,K%-b%+4)
1539WHEN_%<=20ANDQ%<=60ANDQ%>=40
1540OTHERWISE:PROCP(v%,A%,B%,d%,q%,x%):PROCF(d%,q%,x%,l%-1,0,0):PROCs(d%,q%,x%):QJ%=TRUE
1541ENDCASE:=R%
1542DEFFNx(B%,T%):LOCALA%:A%=-1:WHILEB%<>-1ANDA%=-1:A%=FNG(FNn(B%!&C),T%):IFA%=-1THENB%=B%!4
1543ENDWHILE:IFA%=0THENA%=B%ELSEA%=-1
1544=A%
1545DEFFNmy(B%):LOCALA$,A%,C%,Z$,T%:C%=(B%!16>>4)AND&F:T%=B%!16AND(1<<21):C%-=m_%*(C%=0):PROCV(0,C%):IF((B%!16>>1)AND1)=1THENZ$=FNoy(FNXy(B%!&C),FNvy(B%!&C),-1,Tu%)+" "
1546B%+=20:FORA%=1TO3:WHILE?B%<>&B:A$+=CHR$?B%:B%+=1:ENDWHILE:IFA%<>3THENA$+=" ":B%+=1
1547NEXT:IFT%>0ANDLEFT$(A$,1)="="THENA$=MID$(A$,2,INSTR(A$,"*")-2)
1548=Z$+A$
1549DEFPROCv_(S$):LOCALA$,`i%,e:PROCZ(f%,39,1):A$=FNZ(f%,16):`i%=LENA$:PROCA(f%,16,A$+S$):ql%=LENFNZ(f%,16):S$=MID$(S$,ql%-`i%+1):PROCA(f%,17,S$):ql%=LENFNZ(f%,16):S$=MID$(S$,ql%+1):PROCA(f%,18,S$):ENDPROC
1550DEFPROCs(c%,r%,Q%):LOCALA%,b%,K_%:FORA%=16TO18:PROCA(f%,A%,""):PROCU(f%,A%,m_%):NEXT:PROCZ(f%,24,0):hJ%=0:PROCZ(f%,21,ABS((T_%AND4)>0)):PROCZ(f%,23,ABS((T_%AND2)>0)):PROCZ(f%,38,ABS((T_%AND1)>0)):PROCS(f%,21,ABS((T_%AND1)>0)):PROCZ(f%,39,0):PROCJy(26):PROCA(f%,27,"1"):PROCA(f%,30,FNA("E1"))
1551cu%=1:fu%=1:vu%=1:tu%=1:PROCS(f%,37,1):PROCA(f%,33,FNA("OT1")):PROCA(f%,34,FNA("Day1")):PROCA(f%,35,FNA("OE1")):PROCA(f%,1,FNQ(c%,r%,Q%,-1)):W_%=c%:C_%=r%:b_%=Q%:b%=FNf:r%=FNi:K_%=(b%>=&C):PROCi(f%,Ql%,FNA("alset"),-1):IFb%>&CTHENb%-=&C
1552PROCA(f%,3,STR$b%):PROCA(f%,5,"00"):IFK_%THENPROCA(f%,&C,FNA("pm"))ELSEPROCA(f%,&C,FNA("am"))
1553PROCY(0,r%):PROCIy(TRUE,TRUE):PROCM(f%,16):ENDPROC
1554DEFPROCU_(B%):PROCOy(B%):L_%=-1:PROCS(f%,37,1):PROCi(f%,Ql%,FNA("alset"),0):ENDPROC
1555DEFPROCOy(B%):LOCALd%,q%,x%,b%,r%,A$,ci%,R%:PROCP(B%!&C,r%,b%,d%,q%,x%):L_%=B%:IFb%<&CTHENA$=FNA("am")ELSEA$=FNA("pm"):IFb%>&CTHENb%-=&C
1556PROCA(f%,&C,A$):IFb%=0THENb%=&C
1557PROCZ(f%,38,((B%!16>>20)AND1)):A$=STR$r%:IFr%<&ATHENA$="0"+A$
1558PROCA(f%,5,A$):hJ%=((B%!16)>>4)AND&F:IFhJ%=0THENhJ%=m_%
1559FORA%=16TO18:PROCU(f%,A%,hJ%):NEXT:PROCS(f%,37,0):PROCA(f%,3,STR$b%):PROCi(f%,Ql%,FNA("aledit"),-1):PROCA(f%,1,FNQ(d%,q%,x%,-1)):W_%=d%:C_%=q%:b_%=x%: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"))
1560cu%=1:fu%=1:vu%=1:tu%=1:PROCJy(26):PROCA(f%,33,FNA("OT1")):PROCA(f%,34,FNA("Day1")):PROCA(f%,35,FNA("OE1")):IF((B%!16)AND4)=4THEN
1561ci%=TRUE:PROCZ(f%,24,1):IF((B%!16)AND8)=8THEN
1562R%=((B%!16)>>8)AND&FF:PROCA(f%,27,STR$R%):cu%=((B%!16)>>16)AND&F:PROCA(f%,30,FNW(sJ%,cu%-1))
1563ELSE:PROCJy(31):fu%=((B%!16)>>8)AND&F:PROCA(f%,33,FNW(el%,fu%-1)):vu%=((B%!16)>>&C)AND&F:PROCA(f%,34,FNW(xl%,vu%-1)):tu%=((B%!16)>>16)AND&F:PROCA(f%,35,FNW(al%,tu%-1))
1564ENDIF
1565ELSEPROCZ(f%,24,0)
1566ENDIF:B%+=20:FORA%=16TO18:A$="":WHILE?B%<>&B:A$+=CHR$?B%:B%+=1:ENDWHILE:B%+=1:PROCA(f%,A%,A$):NEXT:PROCIy(NOTci%,TRUE):PROCM(f%,16):ENDPROC
1567DEFPROCIy(La%,IJ%):!J%=f%:SYS&400CB,,J%:IFIJ%THENJ%!28=-1:J%!4=FNd-&64-(J%!&C-J%!4):J%!&C=J%!4+&3E8:J%!16=900
1568J%!8=J%!16 -&7D0*ABSNOTLa%:SYS&400C5,,J%:ENDPROC
1569DEFPROCcJ(La%,IJ%):!J%=Ly%:SYS&400CB,,J%:IFIJ%THENJ%!28=-1:J%!4=&64:J%!&C=J%!4+&3E8:J%!16=900
1570J%!8=J%!16 -&7D0*ABSNOTLa%:SYS&400C5,,J%:ENDPROC
1571DEFPROCJy(w%):LOCALA%:PROCZ(f%,w%,1):PROCZ(f%,57-w%,0):FORA%=27TO30:PROCS(f%,A%,-(w%=31)):NEXT:FORA%=33TO35:PROCS(f%,A%,-(w%=26)):NEXT:ENDPROC
1572DEFPROCJ_:LOCALF%,c%,r%,Q%,my%,Lu%,Gy%,B%,mu%,fJ%,jy%:PROCP(qJ%,F%,B%,mu%,fJ%,jy%):CASETRUEOF
1573WHEND_%=1:F%=TRUE
1574WHEND_%=2AND(FND(Uy%,by%,Fy%)>FND(mu%,fJ%,jy%)-FNH(mu%,fJ%,jy%)+7):F%=TRUE
1575WHEND_%=3ANDUy%=1:F%=TRUE
1576OTHERWISEF%=FALSE
1577ENDCASE:IFF%ANDNOTVy%THEN
1578IFt%<>FNP(3)ANDIu%THENPROCC_(t%)
1579t%=FNP(3):PROCI(Uy%,by%,Fy%):PROCx(i%,-1,-1)
1580ENDIF:my%=0:Lu%=0:Gy%=0:IFly%<>0THEN
1581CASEly%>>4OF
1582WHEN0:my%=ly%AND&F
1583WHEN1:my%=7*(ly%AND&F)
1584WHEN2:Lu%=ly%AND&F
1585WHEN3:Gy%=ly%AND&F
1586ENDCASE:c%=Uy%:r%=by%:Q%=Fy%:PROCF(c%,r%,Q%,-my%,-Lu%,-Gy%):F%=FNF(0,0,c%,r%,Q%):B%=M_%:c%=TRUE:WHILEB%<>-1ANDc%:IFFNG(B%!&C,F%)=-1THENPROCk(B%):B%=B%!4ELSEc%=FALSE
1587ENDWHILE
1588ENDIF:ENDPROC
1589DEFPROCN_:LOCALA_%,b%,r%,K_%,A$,Z$,C$,Py%:A$=FNZ(f%,16):Z$=FNZ(f%,17):C$=FNZ(f%,18):IFA$+Z$+C$<>""THEN
1590b%=VALFNZ(f%,3):r%=VALFNZ(f%,5):IFb%=&CTHENb%=0
1591K_%=(FNZ(f%,&C)=FNA("pm")):IFK_%THENb%+=&C
1592Py%=Py%OR(-FNM(f%,21))OR((-FNM(f%,23))<<1)OR(hJ%<<4):Py%=Py%OR((-FNM(f%,38))<<20)OR((-FNM(f%,39))<<21):IFFNM(f%,24)THEN
1593IFFNM(f%,26)THEN
1594Py%=Py%OR&COR((VALFNZ(f%,27))<<8)OR(cu%<<16)
1595ELSEPy%=Py%OR4OR(fu%<<8)OR(vu%<<&C)OR(tu%<<16)
1596ENDIF
1597ENDIF:A_%=FNF(r%,b%,W_%,C_%,b_%):PROCKy(A_%,Py%,A$,Z$,C$):PROCMy:PROCc:PROCn:ey%=TRUE:IFVy%ANDZ%(t%)=3THENPROCO
1598ELSEPROCB(FNA("ErrMes"))
1599ENDIF:ENDPROC
1600DEFPROCKy(A_%,Py%,A$,Z$,C$):LOCALS%,B%,Oy%,T%,gy%,Wy%:IFL_%<>-1THENPROCFy(L_%)
1601Oy%=FALSE:S%=LEN(A$+Z$+C$)+3+20:Wy%=M_%:gy%=-1:WHILEWy%<>-1ANDNOTOy%:T%=Wy%!&C:IFFNG(A_%,T%)=-1THENOy%=TRUEELSEgy%=Wy%:Wy%=Wy%!4
1602ENDWHILE:B%=FNw(w_%,S%+1,TRUE):!B%=gy%:B%!4=Wy%:B%!8=S%:B%!&C=A_%:B%!16=Py%:IFgy%=-1THENM_%=B%ELSEgy%!4=B%
1603IFWy%<>-1THEN!Wy%=B%
1604$(B%+20)=A$+CHR$&B+Z$+CHR$&B+C$+CHR$&B:ENDPROC
1605DEFPROCk(B%):PROCFy(B%):PROCMy:PROCc:ey%=TRUE:IFVy%ANDZ%(t%)=3THENPROCO
1606IFB%=L_%THENPROCn
1607IFB%=Au%THENAu%=-1:PROCG(Ly%)
1608ENDPROC
1609DEFPROCFy(B%):LOCALgy%,Wy%:gy%=!B%:Wy%=B%!4:IFgy%<>-1THENgy%!4=Wy%
1610IFWy%<>-1THEN!Wy%=gy%
1611IFM_%=B%THENM_%=Wy%
1612PROCDy(w_%,B%,TRUE):ENDPROC
1613DEFPROCn:PROCG(f%):PROCG(ay%):IFVy%THENPROCM(i%,-1)
1614L_%=-1:ENDPROC
1615DEFPROClu(Xy%,Ty%,e%,w%,X_%):LOCALA%:CASEw%OF
1616WHEN1:PROCAy(W_%,C_%,b_%,e%,w%)
1617WHEN6:PROCY(X_%,0)
1618WHEN7:PROCY(-X_%,0)
1619WHEN8:PROCY(0,&A*X_%)
1620WHEN9:PROCY(0,-&A*X_%)
1621WHEN&A:PROCY(0,X_%)
1622WHEN&B:PROCY(0,-X_%)
1623WHEN&C:A%=&C+24*(FNZ(f%,&C)=FNA("pm")):PROCY(A%,0)
1624WHEN19:PROCN_
1625WHEN20:PROCn
1626WHEN22:PROCC(Fl%,Xy%,Ty%,e%,w%)
1627WHEN24:PROCIy(NOTFNM(e%,24),FALSE)
1628WHEN26,31:PROCJy(w%)
1629WHEN28,29:IFn%=1THENw%=57-w%
1630A%=VALFNZ(e%,27):A%+=(w%-27)*2-3:IFA%=0THENA%=&FFELSEIFA%=256THENA%=1
1631PROCA(e%,27,STR$A%)
1632WHEN30:PROC`(Xy%,Ty%):!sJ%=FNg("E"):PROCC(sJ%,Xy%,Ty%,e%,w%)
1633WHEN33:PROC`(Xy%,Ty%):PROCC(el%,Xy%,Ty%,e%,w%)
1634WHEN34:PROC`(Xy%,Ty%):PROCC(xl%,Xy%,Ty%,e%,w%)
1635WHEN35:PROC`(Xy%,Ty%):PROCC(al%,Xy%,Ty%,e%,w%)
1636WHEN37:PROCk(L_%)
1637WHEN38:PROCS(f%,21,ABSFNM(f%,38))
1638ENDCASE:ENDPROC
1639DEFPROCjJ(Xy%,Ty%,e%,w%):LOCALA%:J_%=0:CASEw%OF
1640WHEN7:PROCBy(Au%,FNM(Ly%,9)):Au%=-1
1641WHEN8:PROCk(Au%)
1642WHEN9:FORA%=&ATO&D:PROCS(e%,A%,ABSNOTFNM(e%,w%)):NEXT
1643WHEN&B,&C:IFn%=1THENw%=23-w%
1644A%=VALFNZ(e%,&A):A%+=(w%-&A)*2-3:IFA%=0THENA%=&FFELSEIFA%=256THENA%=1
1645PROCA(e%,&A,STR$A%)
1646WHEN&D:!J%=e%:SYS&400CB,,J%:Xy%=J%!4+686+64:Ty%=J%!16-312:!sJ%=FNg("ED"):PROCC(sJ%,Xy%,Ty%,e%,w%)
1647ENDCASE:ENDPROC
1648DEFPROCBy(B%,ni%):IFB%<>L_%THENLOCALL_%:L_%=-1
1649IFNOTni%THEN
1650IF(B%!16AND4)=4THEN
1651IF(B%!16AND8)=8THEN
1652PROCQ_(B%,FALSE)
1653ELSEPROCoJ(B%)
1654ENDIF
1655ELSEB%!16=(B%!16)OR(1<<20):ey%=-1
1656ENDIF
1657ELSEPROCQ_(B%,TRUE)
1658ENDIF:PROCMy:PROCc:ey%=TRUE:IFVy%ANDZ%(t%)=3THENPROCO
1659J_%=0:PROCG(Ly%):ENDPROC
1660DEFPROCQ_(B%,ni%):LOCALc%,T%,A$,fy%,Ky%,d%,q%,x%,A_%,Py%,Z$,C$,:IFni%THEN
1661A_%=FNz:c%=VALFNZ(e%,&A):A$=FNZ(Ly%,&D):T%=0:WHILEA$<>FNW(sJ%,T%):T%+=1:ENDWHILE
1662ELSEA_%=B%!&C:c%=((B%!16)>>8)AND&FF:T%=(((B%!16)>>16)AND&F)-1
1663ENDIF:PROCP(A_%,fy%,Ky%,d%,q%,x%):PROCmy(fy%,Ky%,d%,q%,x%,c%,T%):A_%=FNF(fy%,Ky%,d%,q%,x%):Py%=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:C$+=CHR$?c%:c%+=1:ENDWHILE:PROCFy(B%):PROCKy(A_%,Py%,A$,Z$,C$):ENDPROC
1664DEFPROCmy(RETURNfy%,RETURNKy%,RETURNd%,RETURNq%,RETURNx%,c%,T%):LOCALmy%:IFT%=0THENfy%+=c%:c%=fy%DIV60:fy%=fy%MOD60:IFc%>0THENT%=1
1665IFT%=1THENKy%+=c%:c%=Ky%DIV24:Ky%=Ky%MOD24:IFc%>0THENT%=2
1666IFT%=2THENmy%=c%ELSEIFT%=3THENmy%=7*c%
1667WHILEmy%>0:PROCF(d%,q%,x%,1,0,0):my%-=1:ENDWHILE:IFT%=4THEN
1668WHILEc%>0:PROCF(d%,q%,x%,0,1,0):c%-=1:ENDWHILE
1669ENDIF:IFT%=5THEN
1670WHILEc%>0:PROCF(d%,q%,x%,0,0,1):c%-=1:ENDWHILE
1671ENDIF:ENDPROC
1672DEFPROCoJ(B%):LOCALA_%,fy%,Ky%,d%,q%,x%,A$,Z$,C%,Py%,c%:Py%=B%!16:c%=B%+20:PROCP(B%!&C,fy%,Ky%,d%,q%,x%):PROCjy(d%,q%,x%,Py%):A_%=FNF(fy%,Ky%,d%,q%,x%):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:C$+=CHR$?c%:c%+=1:ENDWHILE
1673PROCFy(B%):PROCKy(A_%,Py%,A$,Z$,C$):ENDPROC
1674DEFPROCjy(RETURNd%,RETURNq%,RETURNx%,F%):LOCALl%,c%,r%:l%=(F%>>8)AND&F:c%=(F%>>&C)AND&F:r%=(F%>>16)AND&F:WHILEr%>0:PROCF(d%,q%,x%,-d%+1,1,0):r%-=1:ENDWHILE:CASEl%OF
1675WHEN1,2,3:u%=FNH(d%,q%,x%):WHILEu%<>c%:d%+=1:u%=FNo(u%+1):ENDWHILE:d%+=(l%-1)*7
1676WHEN4,5,6:d%=FNX(q%,x%):u%=FNH(d%,q%,x%):WHILEu%<>c%:d%-=1:u%=FNo(u%+6):ENDWHILE:d%-=(l%-4)*7
1677ENDCASE:ENDPROC
1678DEFPROC`(RETURN_%,RETURNQ%):!J%=f%:SYS&400CB,,J%:_%=J%!4+714+64:Q%=J%!16-480-40:ENDPROC
1679DEFPROCY(hu%,r%):LOCALK_%,M%,Lu%,my%,zi%,A$:Lu%=r%<>0:my%=FALSE:r%+=VALFNZ(f%,5):b%=VALFNZ(f%,3):K_%=(FNZ(f%,&C)=FNA("pm")):M%=FNX(C_%,b_%):IFb%=&CTHENb%=0
1680IFK_%THENb%+=&C
1681b%+=hu%:hu%=hu%<>0:IFr%<0THENb%-=1:r%+=60:hu%=TRUE
1682IFr%>59THENb%+=1:r%-=60:hu%=TRUE
1683IFb%<0THENW_%-=1:b%+=24:my%=TRUE
1684IFb%>23THENW_%+=1:b%-=24:my%=TRUE
1685IFW_%<1THENC_%-=1:my%=TRUE
1686IFW_%>M%THENC_%+=1:W_%=1:my%=TRUE
1687IFC_%<1THENb_%-=1:C_%=&C:my%=TRUE
1688IFC_%>&CTHENb_%+=1:C_%=1:my%=TRUE
1689M%=FNX(C_%,b_%):IFW_%=0ORW_%>M%THENW_%=M%
1690zi%=(b%>=&C):IFb%>&CTHENb%-=&C
1691IFmy%THENPROCA(f%,1,FNQ(W_%,C_%,b_%,-1))
1692IFb%=0THENb%=&C
1693IFhu%THENPROCA(f%,3,STR$b%)
1694A$=STR$r%:IFr%<&ATHENA$="0"+A$:IFr%=0THENA$="00"
1695IFLu%THENPROCA(f%,5,A$)
1696IFzi%<>K_%THEN
1697IFzi%THENA$=FNA("pm")ELSEA$=FNA("am")
1698PROCA(f%,&C,A$)
1699ENDIF:ENDPROC
1700DEFPROCV_:LOCALS%,C%,B%:C%=-1:M_%=-1:z%=OPENINx$:IFNOTlJ%ANDz%<>0THEN
1701WHILENOTEOF#z%:S%=VALGET$#z%:B%=FNw(w_%,S%+1,TRUE):IFC%<>-1THENC%!4=B%ELSEM_%=B%
1702!B%=C%:B%!8=S%:SYS&C,4,z%,B%+&C,S%-&C:C%=B%:IFs_%THENPROCd(NOT1)
1703ENDWHILE:IFM_%<>-1THENB%!4=-1
1704CLOSE#z%:z%=0
1705ENDIF:ENDPROC
1706DEFPROCvJ(RETURNc%,RETURNr%,Q%):LOCAL_l%,_y%:_l%=(Q%+1)MOD19:IF_l%=0THEN_l%=19
1707_y%=(ABS(1.25*Q%)+6)MOD7:c%=Y%(_l%-1,_y%):IFc%>31THENc%-=31:r%=4ELSEr%=3
1708ENDPROC
1709DEFPROCAl:LOCAL_i%,Ai%,d%,u%,c%:DIMY%(18,6):FOR_i%=1TO19:FORAi%=0TO6:CASE_i%OF
1710WHEN&E:u%=1
1711WHEN3:u%=2
1712WHEN&B:u%=4
1713WHEN19:u%=6
1714WHEN8:u%=7
1715WHEN16:u%=9
1716WHEN5:u%=&A
1717WHEN&D:u%=&C
1718WHEN2:u%=&D
1719WHEN&A:u%=&F
1720WHEN18:u%=17
1721WHEN7:u%=18
1722WHEN&F:u%=20
1723WHEN4:u%=21
1724WHEN&C:u%=23
1725WHEN1:u%=24
1726WHEN9:u%=26
1727WHEN17:u%=27
1728WHEN6:u%=28
1729ENDCASE:d%=21+u%:n$=FNA("Mon3")+" ":REPEATd%+=1:c%=5-(d%MOD7):IFc%=-1THENc%=6
1730UNTILc%=Ai%:Y%(_i%-1,Ai%)=d%:IFd%>31THENd%-=31:n$=FNA("Mon4")+" "
1731NEXT:NEXT:ENDPROC
1732DEFPROCqu:sy%=2:Vi%=&B:TJ%=TRUE:bJ%=1:Si%=FNWy(FNA("GYM")+FNOy("GYM",1,2,"\","")+"\"):ji%=FNpy(Si%,2,"",5,"A0-9"):Zl%=FNC("CAM","CAM",1,3):PROCz(Zl%,2,Si%):ENDPROC
1733DEFFNM_=Zl%
1734DEFPROCCJ(A%):B%(A%)=&77d:W%(A%)=&fff:S%(A%)=Fy%:M$(A%)=FNA("CalTab"):PROCWJ:ENDPROC
1735DEFPROCSJ(x%,h%,a%,K%):IFsy%=1THENPROCJJ(x%,h%,a%,K%)
1736IFsy%=2THENPROCPu(x%,h%,a%,K%)
1737ENDPROC
1738DEFPROCn_(p%,Oi%):LOCALA%:CASE!p%OF
1739WHEN0,1:A%=sy%:sy%=!p%+1:uJ%=sy%<>A%
1740WHEN2:CASEp%!4OF
1741WHEN0:IFv%<>Fy%+(sy%=1)THENv%=Fy%:t%=Oi%
1742WHEN1:IFv%<>Fy%+1+(sy%=1)THENv%=Fy%+1:t%=Oi%
1743WHEN2:A%=VAL$ji%:CASETRUEOF
1744WHENA%<&77d:PROCB(FNO("ErrMin",STR$&77d,"","",""))
1745WHENA%>&fff:PROCB(FNO("ErrMax",STR$&fff,"","",""))
1746OTHERWISEIFv%<>A%+(sy%=1)THENv%=A%:t%=Oi%
1747ENDCASE
1748ENDCASE
1749ENDCASE:ENDPROC
1750DEFPROCNy(l%):v%+=(3-sy%)*l%:IFv%<B%(t%)THENv%=B%(t%)
1751IFv%>W%(t%)THENv%=W%(t%)
1752ENDPROC
1753DEFPROCQu(n%,h%,_%,Q%,o_%,wJ%):LOCALPa%,d%,q%,x%:IFn%<>2THEN
1754Pa%=FNly(h%,_%,Q%,d%,q%,x%):IFPa%THEN
1755CASEbJ%+n%OF
1756WHEN5,3:PROCI(d%,q%,x%):t%=FNP(3):v%=S%(t%)
1757WHEN6,2:PROCs(d%,q%,x%):QJ%=TRUE
1758ENDCASE
1759ENDIF
1760ENDIF:ENDPROC
1761DEFFNfy(w%,Cy%):k%=TRUE:CASECy%OF
1762WHEN414:PROCNy(1)
1763WHEN415:PROCNy(-1)
1764WHEN30:IFv%<>Fy%+(sy%=1)THENv%=Fy%
1765OTHERWISEk%=FALSE
1766ENDCASE:=k%
1767DEFPROCGJ(p%,s%):IFtJ%=By%THENPROCb(s%,6,!p%):PROCH(By%,0,-1):PROCJ(By%,!p%,1)
1768ENDPROC
1769DEFFNLy(e%,w%,Cy%):=FALSE
1770DEFPROCe_(z%):BPUT#z%,sy%:BPUT#z%,TJ%+5:BPUT#z%,!SJ%:BPUT#z%,bJ%:ENDPROC
1771DEFPROCqJ(z%):sy%=BGET#z%:TJ%=BGET#z%-5:Vi%=BGET#z%:bJ%=BGET#z%:ENDPROC
1772DEFPROCxu(s%,Sy%,p%,_%,Q%):CASESy%OF
1773WHEN7,1,4,5:IFn%<>2PROCZ(s%,Sy%,1)
1774WHEN6:PROCH(By%,0,-1):PROCJ(By%,FNp(s%,6),1):PROCC(By%,_%,Q%,s%,Sy%)
1775WHEN9:IFFNZ(s%,9)=FNA("SetAlarm")+"/"+FNA("GotoDiary")THENPROCA(s%,9,FNA("GotoDiary")+"/"+FNA("SetAlarm"))ELSEPROCA(s%,9,FNA("SetAlarm")+"/"+FNA("GotoDiary"))
1776ENDCASE:ENDPROC
1777DEFPROCRu(s%):PROCZ(s%,7,-(sy%=1)):PROCZ(s%,1,-(sy%=2)):PROCb(s%,6,!SJ%):PROCZ(s%,4,-NOTTJ%):PROCZ(s%,5,-TJ%):IFbJ%=1THENPROCA(s%,9,FNA("GotoDiary")+"/"+FNA("SetAlarm"))ELSEPROCA(s%,9,FNA("SetAlarm")+"/"+FNA("GotoDiary"))
1778ENDPROC
1779DEFPROCKJ(s%):IFFNM(s%,7)THENsy%=1ELSEsy%=2
1780TJ%=FNM(s%,5):!SJ%=FNp(s%,6):IFFNZ(s%,9)=FNA("GotoDiary")+"/"+FNA("SetAlarm")THENbJ%=1ELSEbJ%=2
1781ENDPROC
1782DEFFNly(h%,_%,Q%,RETURNd%,RETURNq%,RETURNx%):LOCALp_%,oy%,hy%,vy%,zu%,wu%:IFsy%=1THEN
1783p_%=(j%-32)/2:oy%=(m%-50)/6:hy%=p_%/7:vy%=(oy%-&A)/8:x%=v%+ABSh%:q%=2*((-Q%-50)DIVoy%)+((_%-20)DIV((j%-8)/2)):_%-=20+(q%MOD2)*((j%-8)/2):Q%=-Q%-50-((q%DIV2)*oy%):q%+=1:zu%=(_%+hy%*(1-0.12)+20*ABSh%)DIVhy%:wu%=((Q%-&A-vy%)DIVvy%)-1
1784IFzu%>0ANDzu%<8THENd%=1+zu%+7*wu%-FNH(1,q%,x%)
1785ELSE:p_%=(j%-40)/2:oy%=(m%-50)/3:hy%=p_%/7:vy%=(oy%-&A)/8:x%=v%:q%=2*((-Q%-50)DIVoy%)+((_%-20)DIV((j%-8)/2)):_%-=20+(q%MOD2)*((j%-8)/2):Q%=-Q%-50-((q%DIV2)*oy%):q%+=1+6*ABSh%:zu%=(_%-hy%*0.25+20*ABSh%)DIVhy%-1:wu%=Q%DIVvy%:IFwu%>0ANDwu%<8THENd%=1+wu%+7*zu%-FNH(1,q%,x%)
1786ENDIF:IFx%<>-1THEN
1787IFd%<=0ORd%>FNX(q%,x%)ORx%>&fffTHENx%=-1:d%=-1:q%=-1
1788ENDIF:=(x%>0)
1789DEFPROCPu(x%,h%,a%,K%):LOCALq%,u%,c%,hy%,vy%,fa%,A$,r%,A%,B%,C%,D%,E%,F%,G%,H%:p_%=(j%-40)/2:oy%=(m%-50)/3:vy%=(oy%-&A)/8:hy%=p_%/7:IFh%THEN
1790IFx%<W%(t%)THENPROCR(1,a%,K%)
1791ELSEIFx%>B%(t%)THENPROCR(0,a%,K%)
1792ENDIF:Bu%=FNJ("Homerton.Medium",20,20):yu%=FNJ("Homerton.Medium",&D,&D):bu%=FNJ("Homerton.Medium",9,9):PROCV(0,7):PROCL(Bu%,STR$x%,0,a%+j%/2,K%-8):FORr%=1TO6:q%=r%+6*h%:_%=(r%-1)MOD2*(j%-8)/2+20-20*h%:Q%=50+(r%-1)DIV2*oy%:IFFNS(a%+_%,K%-Q%,p_%,-oy%)THEN
1793PROCL(yu%,FNU(q%,-1),-1,a%+_%,K%-Q%):u%=FNH(1,q%,x%)-1:SYS&4008A,bu%:Q%+=vy%-6:FORc%=1TO7:SYS&40086,,FNc(c%,2),1<<4,a%+_%,K%-Q%-vy%*c%:NEXT:_%+=hy%:A%=K%-Q%:D%=a%+_%:F%=FNX(q%,x%):G%=u%:H%=hy%:B%=-vy%:IFx%=Fy%ANDq%=by%THENC%=Uy%ELSEC%=0
1794IFTJ%ANDC%<>0THENC%=0:SYS&400E6,!SJ%:RECTANGLEa%+_%+((u%-1+Uy%)DIV7+0.25)*hy%,K%-Q%-((u%-1+Uy%)MOD7+0.25)*vy%,hy%,-vy%
1795CALLK
1796ENDIF:NEXT:PROCQ(Bu%):PROCQ(yu%):PROCQ(bu%):ENDPROC
1797DEFPROCJJ(v%,h%,a%,K%):LOCALq%,u%,c%,hy%,ra%,oy%,A$,A%,B%,C%,D%,E%,F%,G%,H%:p_%=(j%-32)/2:oy%=(m%-50)/6:hy%=p_%/7:vy%=(oy%-&A)/8:x%=v%+h%:IFh%THEN
1798IFv%+1<W%(t%)THENPROCR(1,a%,K%)
1799ELSEIFv%>B%(t%)THENPROCR(0,a%,K%)
1800ENDIF:IFx%<=&fffTHEN
1801Bu%=FNJ("Homerton.Medium",20,20):yu%=FNJ("Homerton.Medium",&A,&A):bu%=FNJ("Homerton.Medium",7,7):PROCV(0,7):PROCL(Bu%,STR$x%,0,a%+j%/2,K%-8):FORq%=1TO&C:_%=(q%-1)MOD2*(j%-8)/2+20-20*h%:Q%=50+(q%-1)DIV2*oy%:IFFNS(a%+_%,K%-Q%,p_%,-oy%)THEN
1802PROCL(yu%,FNU(q%,-1),-1,a%+_%,K%-Q%):u%=FNH(1,q%,x%)-1:SYS&4008A,bu%:Q%+=vy%+4:FORc%=1TO7:SYS&40086,," "+FNc(c%,2),1<<4,a%+_%+hy%*c%-hy%,K%-Q%-vy%:NEXT:Q%+=vy%:A%=a%+_%-hy%:E%=K%-Q%-vy%:F%=FNX(q%,x%):G%=u%:H%=hy%:B%=vy%:IFx%=Fy%ANDq%=by%THENC%=Uy%ELSEC%=0
1803IFTJ%ANDC%<>0THENC%=0:SYS&400E6,!SJ%:RECTANGLEa%+_%+((u%-1+Uy%)MOD7+0.12)*hy%,K%-Q%-((u%-1+Uy%)DIV7+0.18)*vy%,hy%*0.76,-vy%
1804CALLY
1805ENDIF:NEXT
1806ENDIF:PROCQ(Bu%):PROCQ(yu%):PROCQ(bu%):ENDPROC
1807DEFPROCWJ:LOCALP%,A%,Di%,Ia%,J,P,R,H,S,O,M,_,Z,T,X,B,A:DIMIa%456:J=&D:P=&E:R=&F:H=5:S=6:O=0:M=3:_=0:Z=4:T=7:X=8:B=9:A=&A:FORDi%=0TO2STEP2:P%=Ia%:[OPTDi%:.Y:STMFD(J)!,{P}:MOV X,1:MOV B,2:MOV A,#0:MOV2,#1<<4:ADR1,L:.z:ADD S,S,#1:ADD A,A,#1:CMP B,A:BLEQ D:MUL M,T,S
1808ADD M,M,O:SWI &40086:CMP B,A:BLEQ I:CMP S,#7:SUBEQ Z,Z,X:MOVEQ S,#0:ADD1,1,#8:CMP A,H:BNE z:LDMFD(J)!,{pc}:.K:STMFD(J)!,{P}:MOV X,1:MOV B,2:MOV A,#0:MOV2,#1<<4:ADR1,L:.s:ADD S,S,#1:ADD A,A,#1:CMP B,A:BLEQ D:MUL Z,X,S
1809ADD Z,Z,_:SWI &40086:CMP B,A:BLEQ I:CMP S,#7:ADDEQ M,M,T:MOVEQ S,#0:ADD1,1,#8:CMP A,H:BNE s:LDMFD(J)!,{pc}:.D:STMFD(J)!,{P,1-2}:LDR2,SJ%:B q:.I:STMFD(J)!,{P,1-2}:MOV2,#7:.q:MOV1,#0:SWI &400F3:LDMFD(J)!,{pc,1-2}:.SJ%&Vi%:.L
1810]FORA%=1TO31:[OPTDi%:=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:z%=0:ml%=�:di%=-1:��Vy:���,�$+" at line "+Þ
�eu%=-1:Ju%=0::�U%512:J%=U%+256:�pu:z%=�"<Organiser$Dir>.Resources.!Language":_$=�#z%:d$="<Organiser$Dir>.Resources."+_$:�#z%:z%=0:�FJ(d$+".Messages"):�wJ(�A("Title"),"<Organiser$Dir>","1.20 (27 Oct 97)",�):ș66�Ju%:eu%=Ju%+500:ȕ�Du%:�d(1):�:�Vy:�
0��Vy:�ml%=��ș&406C2:���,�$+" at line "+Þ:�
/ml%=�:f$=�$+" at line "+Þ:ii%=�:�ii%,f$
�z%<>0��#z%:z%=0
�nJ:�Cy:ș&400DD:�
2��d(Al%):�A$,Ui%,Sl%,py%,uJ%:uJ%=�:�ey%�Su%��t
B�Iu%�ey%<>Ni%�Ni%=ey%:�i(i%,ti%,�A("Title")+�-(ey%=�)," *"),�)
�Al%�1�Sl%=&64
�B$<>""�Sl%=0
�(XJ%<>-1)�Vy%�Sl%=0
1Al%=(Al%�(3<<&B)+(1<<5))��(1+(3<<17)):�Sl%>0�
9ș66�mi%:ȕmi%>Ju%:Ju%+=&64:�:ș&400E1,Al%,U%,Ju%�Ui%
�ș&400C7,Al%,U%�Ui%
�:ȎUi%�
�0:Ȏ��
�XJ%<>-1�Vy%:�Vu
�Ju%>eu%�eu%<>-1:�W_
$�(Sl%<>0�B$<>"")�di%<>�Qy:�u:�I_
�B$<>"":�iu
�
�1:�VJ
�2:�!U%=I_%�
�yJ
�:�!U%=i%�FJ%�U%!20=0
笤Vy��`y
ș&400C5,,U%:�!U%=i%�FJ%��`_
�
�3:Ȏ!U%�
�f%:�n
! �I_%:�h
" �Ly%:�By
# �Hy%:�y
$ �VJ%:�zy
% �zy%:�Cy
& �G(!U%)
'�
()�4:�0<>0�ș&400E9,36,,"ptr_default",1
)�5
*)�6:�Iu%��e(U%!&C,U%!16,U%!8,!U%,U%!4)
+�7
,�8:�`J(!U%,U%!4,U%!24)
-
�9:�BJ
.�17,18:�gu
/ �19:�U%!4=su%�U%!16=&4AF80�
01A$=�N(U%+20):�jJ%=1��t("Alias$URLOpen_HTTP")�
1 ș&400DE,"URLOpen_HTTP "+A$
2(�:�jJ%=2��t("Alias$URLOpen_MailTo")�
3!ș&400DE,"URLOpen_MailTo "+A$
4�
5�
6�:�Du%��Vy:�
7�
8*ݤVy=(ry%<>U%!16-U%!8�xy%<>U%!&C-U%!4)
9B��u�A%,S%,M%,H%,R%,M$,ri%,vi%,bi%,hi%,Rl%,I$:�(qy%�4)=4�MJ%=0�
:�M$=�K("%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:Rl%=�:ș46,316,Z_%,"clock",0�ri%,vi%,bi%,hi%:�1:ȓȐ0,0,U_%,Cu%:R%=56:ȑU_%/2,Cu%/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))*(s_%��Iu%):ȏ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
=+�qy%�2��0,0,(R%*0.9)*��S%,(R%*0.9)*��S%
>ș46,ri%,vi%,bi%,hi%
?�:�(qy%�8)=8�MJ%>0�
@Aș&400EC,-1,-1�,,H%:M$=�(H%�&400)+"k":�$aJ%<>M$�$aJ%=M$:Rl%=�
A�:�(qy%�16)=0�
B#M$=":%mi":�(qy%�2)=2�M$+=".%se"
C)�r_%�M$="%z24"+M$�M$="%z12"+M$+" %am"
D
�M$=N$
E'�:M$=�K(M$):�M$<>$aJ%�$aJ%=M$:Rl%=�
F�
GB�:�Rl%�!U%=-1-7*�(u_%):U%!4=NJ%:U%!8=0:U%!&C=0:ș&400CD,,U%:Ȗ
H�
I"��I_:�Uy%<>�I�by%<>�V�Fy%<>�L�
J9qJ%=�F(0,0,Uy%,by%,Fy%):Fy%=�L:by%=�V:Uy%=�I:�xJ%��Py
K�Vy%�py%=0:�O
L Pu%=�:V_%=t%:z_%=v%:�J_:�c
M$�:�xJ%�mJ%<>0��G(mJ%,�z)<>1��gJ
N"�rJ%<>-1��G(rJ%!&C,�z)<>1��yu
O#�J_%>0��7:J_%-=1:�J_%=0�J_%=-&A
P �J_%<0�J_%+=1:�J_%=0�J_%=&A
Q �MJ%>0�MJ%-=1:�MJ%=0��m:�u
R
di%=�Qy:�
S6ݤK(A$):?J%=3:ș7,&E,J%:ș&C1,J%,J%,&80,A$:=�N(J%)
Tݤf=��K("%24")
Uݤi=��K("%MI")
VݤQy=��K("%SE")
WݤI=��K("%DY")
XݤV=��K("%MN")
YݤL=��K("%CE%YR")
Z?ݤF(fy%,b%,c%,r%,Q%)=fy%�(b%<<6)�(c%<<&B)�(r%<<16)�(Q%<<20)
[i��P(s%,�fy%,�b%,�c%,�r%,�Q%):fy%=s%�63:b%=(s%>>6)�31:c%=(s%>>&B)�31:r%=(s%>>16)�&F:Q%=(s%>>20)�&FFF:�
\ݤn(s%)=s%��&7FF
]ݤvy(s%)=s%�63
^ݤXy(s%)=(s%>>6)�31
_ݤz=�F(�i,�f,�I,�V,�L)
`EݤG(A%,B%):�Bi%,jl%,Li%,ei%,Ki%,Y_%:�Wi%,Ji%,Qi%,si%,ai%:�A%<>B%�
a>�P(A%,Ki%,ei%,Li%,jl%,Bi%):�P(B%,ai%,si%,Qi%,Ji%,Wi%):Ȏ��
b�Bi%>Wi%:Y_%=1
c�Bi%<Wi%:Y_%=-1
d�jl%>Ji%:Y_%=1
e�jl%<Ji%:Y_%=-1
f�Li%>Qi%:Y_%=1
g�Li%<Qi%:Y_%=-1
h�ei%>si%:Y_%=1
i�ei%<si%:Y_%=-1
j�Ki%>ai%:Y_%=1
k�Ki%<ai%:Y_%=-1
l�
m
�Y_%=0
n
�:=Y_%
ow��eu(_%,Q%,Ry%)ș&400E6,5:ȓȐ_%+20,Q%,36-20,20:ȓȐ_%+20,Q%+Ny%,36-20,-20:ș&400E6,Ry%:ȓȐ_%,Q%+20,36-20,Ny%-2*20
p�ȓȐ_%+36,Q%+2*20,-20,Ny%-4*20:�T(5,Ry%,_%+20,Q%,20,2):�T(5,Ry%,_%+20,Q%+Ny%,20,3):�T(Ry%,5,_%+36-20,Q%+2*20,20,4):�T(Ry%,5,_%+36-20,Q%+Ny%-2*20,20,1):�
q���wu(_%,Q%,Ry%)ș&400E6,5:ȓȐ_%-20,Q%,20-36,20:ȓȐ_%-20,Q%+Ny%,20-36,-20:ș&400E6,Ry%:ȓȐ_%,Q%+20,-36+20,Ny%-2*20:ȓȐ_%-36,Q%+2*20,20,Ny%-4*20
r}�T(5,Ry%,_%-20,Q%,20,1):�T(5,Ry%,_%-20,Q%+Ny%,20,4):�T(Ry%,5,_%-36+20,Q%+2*20,20,3):�T(Ry%,5,_%-36+20,Q%+Ny%-2*20,20,2):�
s5��T_(e%,a%,K%):�e%=i%��Zu(e%,a%,K%)��Cu(e%,a%,K%)
t�
u���Zu(e%,a%,K%)�A%,_%,Q%,Y%:�bl%,li%,pi%:ș46,40+256,Z_%,"ring"�,,,li%,pi%:ș&400E6,0:�X(a%+dy%-32,K%-o%,j%+32,-m%):�t%>0��X(a%+yy%,K%-o%,j%+32,-m%)
v�ș&400E6,1:�X(a%,K%,5,-ry%):�X(a%+i_%+36+20,K%,5,-ry%):�X(a%,K%,xy%,-5):�X(a%,K%-ry%,xy%,5):ș&400E6,5:�t%=0��X(a%+yy%,K%-o%,j%+32,-m%)
w!�t%=0��X(a%+GJ%,K%-o%,32,-m%)
x��X(a%+l_%,K%-o%-t%*Ny%,36,-m%+t%*Ny%):�X(a%+i_%,K%-o%,36,-Ny%*t%):�X(a%+i_%,K%-o%-iy%*Ny%,36,-m%+iy%*Ny%):�X(a%+5,K%-5,20,-m%-2*20):�X(a%+5,K%-5,xy%-2*5,-20):�X(a%+xy%-5,K%-5,-20,-m%-2*20):�X(a%+5,K%-ry%+5,xy%-2*5,20):�S(a%+GJ%,K%-o%,&64,-m%)�
y�ȓȐa%+GJ%+32,K%-o%,&64-2*32,-m%:_%=�a(a%+GJ%+&64/2):Y%=�a(K%-o%-m%/(_J%+1)):�A%=1�_J%:�S(_%-40-8,Y%-8,2*(40+8),40+8)�(Ku%�1<<(A%-1))>0�
z[ș&400ED,256,Z_%,"ring",,,,J%,J%+&80:ș46,52+256,Z_%,"ring",_%-li%,Y%-pi%/2,8,J%,J%+&80
{�:Y%-=�a(m%/(_J%+1)):�
|9�:�S(a%+5,K%-5-20,20,20)�T(5,1,a%+5+20,K%-5-20,20,2)
}<�S(a%+5,K%-ry%+5,20,20)�T(5,1,a%+5+20,K%-ry%+5+20,20,3)
~B�S(a%+xy%-5-20,K%-5-20,20,20)�T(5,1,a%+xy%-5-20,K%-5-20,20,1)
G�S(a%+xy%-5-20,K%-ry%+5,20,20)�T(5,1,a%+xy%-5-20,K%-ry%+5+20,20,4)
�=ș&40081,,"Homerton.Medium",&96,&96�bl%:�A%=1�iy%:�t%<A%�
�&�S(a%+i_%,K%-o%-(Ny%*A%),36,Ny%)�
�n�eu(a%+i_%,K%-o%-(Ny%*A%),D%(A%)):�V(D%(A%),I%(A%)):�ey(bl%,M$(A%),0,0,a%+i_%+36/2,K%-o%-(Ny%*(A%-0.5)),1)
��
�(�:�S(a%+l_%,K%-o%-(Ny%*A%),36,Ny%)�
�r�wu(a%+l_%+36,K%-o%-(Ny%*A%),D%(A%)):�V(D%(A%),I%(A%)):�ey(bl%,M$(A%),0,0,a%+l_%+36/2,K%-o%-(Ny%*(A%-0.5)),-1)
��
�A�:�:�t%>0��S(a%+yy%,K%-o%,j%+32,-m%)��`J%��ny(0,a%+yy%,K%-o%)
�;�S(a%+dy%-32,K%-o%,j%+32,-m%)��`J%��ny(1,a%+dy%,K%-o%)
�ș&40082,bl%:�
�V��R(h%,a%,K%):ș&400ED,256,Z_%,"corner",,,,J%,J%+&80:�h%=1��S(a%+j%,K%-m%,-32,32)�
��ș46,47+256,Z_%,"corner":ș46,52+256,Z_%,"corner",a%+j%-16*2,K%-m%+2,8,J%,J%+&80:ș46,47+256,Z_%,"corner":�S_(a%+j%-32,K%,G%(1))
� �:�h%=0�
�!G%(0)=a%:�S(a%,K%-m%,32,32)�
�Fș46,52+256,Z_%,"corner",a%+2,K%-m%+2,8,J%,J%+&80:�S_(a%,K%,G%(0))
��
��:�
�9��S_(a%,K%,�cy%):!J%=i%:�cy%>=0�J%!4=cy%:ș&400C4,,J%
��ș&400CB,,J%:J%!4=a%-J%!4:J%!8=K%-J%!16-m%:J%!&C=J%!4+32:J%!16=J%!8+32:J%!20=&7003119:J%!24=Ol%:J%!32=0:�h%�J%!28=Ii%�J%!28=Ti%
�ș&400C2,,J%�cy%:�
�1��p_:!J%=i%:�G%(0)>=0�J%!4=G%(0):ș&400C4,,J%
�%�G%(1)>=0�J%!4=G%(1):ș&400C4,,J%
�
G%()=-1:�
����Cu(e%,a%,K%):�R%,A%:a%+=(24+&B8)/2:K%-=(64+&D0)/2:R%=56:ș&400E6,1:ȓȐ0,0,&BB8:ș&400E6,X%(0):ȏȐa%,K%,R%:ș&400E6,X%(3):�A%=0�330�30:�a%+R%*��A%,K%+R%*��A%,a%+(R%-&A)*��A%,K%+(R%-&A)*��A%:�:ș&400E6,X%(1):ȏa%,K%,R%:ș&400E6,X%(5):A%=60
���a%,K%:�a%+(R%*0.35)*��(A%-9),K%+(R%*0.35)*��(A%-9):�85,a%+(R%*0.35)*��(A%+9),K%+(R%*0.35)*��(A%+9):�a%+(R%*0.35)*��(A%-9),K%+(R%*0.35)*��(A%-9):�85,a%+(R%*0.7)*��A%,K%+(R%*0.7)*��A%:ș&400E6,X%(4):A%=300
���a%,K%:�a%+(R%*0.25)*��(A%-9),K%+(R%*0.25)*��(A%-9):�85,a%+(R%*0.25)*��(A%+9),K%+(R%*0.25)*��(A%+9):�a%+(R%*0.25)*��(A%-9),K%+(R%*0.25)*��(A%-9):�85,a%+(R%*0.5)*��A%,K%+(R%*0.5)*��A%:ș&400E6,X%(6):�a%,K%:�BY0,-(R%*0.9):ȏȐa%,K%,2:�
�0ݤc(u%,zJ%):=��A("Day"+�(((u%-1)�7)+1)),zJ%)
��ݤDy(u%,zJ%):�A$,q$:A$=",Monday,Tuesday,Wednesday,Thursday,Friday,Saturday,Sunday,":u%=((u%-1)�7)+1:�A$=�A$,�A$,",")+1):u%-=1:�u%=0:q$=�A$,�A$,",")-1):�zJ%>0�q$=�q$,zJ%)
�=q$
��ݤIy(Wl%,zJ%):�A$,O$:A$=",January,February,March,April,May,June,July,August,September,October,November,December,":Wl%=((Wl%-1)�&C)+1:�A$=�A$,�A$,",")+1):Wl%-=1:�Wl%<=0:O$=�A$,�A$,",")-1):�zJ%>0�O$=�O$,zJ%)
�=O$
�ݤA_(d%):=�d%+�Ny(d%)
�}ݤNy(d%):�A$,Z$,C$,A%,Oy%:A$=�A("th"):Z$=�A$,�A$,",")-1):ȕ�A$,",")��Oy%:A$=�A$,�A$,",")+1):C$=�A$,�A$,",")-1):�C$,"#")�
� ���d%,�C$-1)=�C$,2)�Oy%=�
���C$=d%�Oy%=�
�
�:�:�Oy%�
�<ȕ�A$>0��(A$)=35:A$=�A$,�A$,",")+1):�:Z$=�A$,�A$,",")-1)
� �:=Z$
�3ݤU(Wl%,zJ%):=��A("Mon"+�(((Wl%-1)�&C)+1)),zJ%)
�%ݤoy(b%,r%,Xu%,r_%):�A$,Z$:�r_%�
�*�b%>&B�Z$=" "+�A("pm")�Z$=" "+�A("am")
��:�b%>&C��r_%�b%-=&C
�&�r_%�A$=�-(b%<&A),"0")��b%=0�b%=&C
�HA$+=�b%+":"+�-(r%<&A),"0")+�r%:�Xu%<>-1�A$+=":"+�-(Xu%<&A),"0")+�Xu%
�
=A$+Z$
����wJ(k$,`$,Zy$,sa%):K$=k$:V$=Zy$:Ru%=0:Du%=�:J$=`$:c_%=0:x_%=0:Hu%=�:Vy%=�:ș&400C0,&C8,&4B534154,K$�za%,su%:�MJ:�sa%��du(aa%,d$+".Templates")
�
�t_:�Hu:�
���gu:�S%:ȎU%!16�
� �0:Du%=�
��1:�OJ(U%!40,�N(U%+44))
��3:�g_(U%!40,�N(U%+44))
�
�8:�AJ
��&400C1:�F_
�$�&400C2:�N(U%+28)=K$�U%!4<>su%�
� �B(�A("ErrRun")):�eJ(U%!4)
��
��&400CC:ȎU%!20�
� �i%:$(U%+36)=�A("Title")
� �f%,Ly%:$(U%+36)=�A("Alarm")
� �ay%:$(U%+36)=�A("Date")
� �I_%:$(U%+36)=�A("Settings")
�#�Hy%,VJ%:$(U%+36)=�A("AnniTab")
� �Ay%:$(U%+36)=�A("Setclock")
�K�:!U%=56:$(U%+28)="org":S%=U%!4:U%!4=su%:ȔU%!8,U%!&C:ș&400E7,17,U%,S%
��:�
�?ݤPy(`u%,S$):ș&400CF,,J%:=((`u%=&FFF)�(`u%=&DFE))�J%!&C=f%
�"��g_(`u%,S$):�z%:�Py(`u%,S$)�
�8ȔU%!8,U%!&C:U%!16=4:ș&400E7,17,U%,U%!4:�J%!&C<>f%�
��zy%<>-1��Cy
�R�"Copy "+S$+" "+J$+".Import ~c ~v f":�S$="<Wimp$Scrap>"��"Remove <Wimp$Scrap>"
��RJ(J$+".Import")
� ��v_(S$)
��
��:�
�
ݤu:�ey%�
� �By(�A("ErrSave"),�)��t
��:=�
� ��F_�Xa%,Qa%,M%:�(qy%�4)>0�
��`y(�)�M%=20�M%=&C
ϊș&2002E,281,Z_%,"clock":ș53,M%,4�,,Xa%:ș53,M%,5�,,Qa%:ș46,8+512,Z_%�,,,,,F%:ș46,271,Z_%,"clock",0,&74/(1<<Xa%),&78/(1<<Qa%),M%:�u
��:�
�I��e(e%,w%,n%,Xy%,Ty%)�A%,B%,A$,X_%:V_%=t%:z_%=v%:X_%=1+2*(n%=1):Ȏe%�
�W�i%:!U%=i%:ș&400CB,,U%:a%=U%!4-U%!20:K%=U%!16-U%!24:�u_(w%,n%,Xy%-a%,Ty%-K%,a%,K%)
�
�-2:Ȏn%�
��1:�s(Uy%,by%,Fy%)
�(�2:BJ%=-1:�C(Qu%,Xy%,�by(Qu%),e%,w%)
� �4:Ȏ��
�ɦ-1:�Yy%=0��Ry
�ɦ-3:MJ%=5:�m
��x(i%,-1,-1)
��
��
��ay%:Ȏw%�
�9�0:�H(d_%,0,-1):�J(d_%,HJ%-1,�):�C(d_%,Xy%,Ty%,e%,w%)
�1�2,3:�Ly(-1,-1,(1+2*(w%=2))*X_%*(1-49*(�-1)))
��35:�ry:�n%<>1��G(ay%)
��36:�G(ay%)
� :�n%=2�
�6�H(d_%,0,-1):�J(d_%,HJ%-1,�):�C(d_%,Xy%,Ty%,e%,w%)
� ��Ly(w%-3,-1,0):�n%<256��ry
��
��
��Ay%:�n%<>2�
� Ȏw%�
� �1:�e(Ay%,9+�M(Ay%,1),4,0,0)
� �2:�Ay(P_%,N_%,Q_%,Ay%,w%)
� �3:�y<>�M(Ay%,1)��Sy(-1)
��A%=�(�Z(Ay%,4))�&C -&C*t_%:A$=�A%:A$=�2-�A$,"0")+A$:$J%=�24+�Dy(�H(P_%,N_%,Q_%),3)+","+�-(P_%<&A),"0")+�P_%+" "+�Iy(N_%,3)+" "+�Q_%+"."+A$+":"+�Z(Ay%,5)+":00":ș&20007,&F,J%�;B%:�n%=4��G(Ay%)
�c�8:A%=�(�Z(Ay%,4))�&C -&C*t_%+X_%:�A%=24�A%=0:�F(P_%,N_%,Q_%,1,0,0):�A(Ay%,2,�Q(P_%,N_%,Q_%,�))
�C�A%=-1�A%=23:�F(P_%,N_%,Q_%,-1,0,0):�A(Ay%,2,�Q(P_%,N_%,Q_%,�))
�:t_%=A%>&B:�A%>&B��A(Ay%,7,�A("pm"))��A(Ay%,7,�A("am"))
�(A%=A%�&C:A%-=&C*(A%=0):�A(Ay%,4,�A%)
�e�9:A%=�(�Z(Ay%,4))�&C -&C*t_%-X_%:�A%=-1�A%=23:�F(P_%,N_%,Q_%,-1,0,0):�A(Ay%,2,�Q(P_%,N_%,Q_%,�))
�A�A%=24�A%=0:�F(P_%,N_%,Q_%,1,0,0):�A(Ay%,2,�Q(P_%,N_%,Q_%,�))
�:t_%=A%>&B:�A%>&B��A(Ay%,7,�A("pm"))��A(Ay%,7,�A("am"))
�(A%=A%�&C:A%-=&C*(A%=0):�A(Ay%,4,�A%)
�H�&A,&C:A%=��Z(Ay%,5)+(1-9*(w%=&A))*X_%:�A%>59�A%-=60:�e(Ay%,8,4,0,0)
� �A%<0�A%+=60:�e(Ay%,9,4,0,0)
� �A(Ay%,5,�2-��A%,"0")+�A%)
�H�&B,&D:A%=��Z(Ay%,5)-(1-9*(w%=&B))*X_%:�A%>59�A%-=60:�e(Ay%,8,4,0,0)
� �A%<0�A%+=60:�e(Ay%,9,4,0,0)
� �A(Ay%,5,�2-��A%,"0")+�A%)
�:�7:t_%=�t_%:�t_%��A(Ay%,7,�A("pm"))��A(Ay%,7,�A("am"))
��
��
� �f%:�lu(Xy%,Ty%,e%,w%,X_%)
��Ly%:�jJ(Xy%,Ty%,e%,w%)
� �Zu%:�W_
�Hy%:�tJ(w%)
"�I_%,Yy%:�Nu(e%,w%,n%,Xy%,Ty%)
�VJ%:�zy
�zy%:�h_(e%,w%,n%,Xy%,Ty%)
�DJ(e%,w%,n%,Xy%,Ty%)
�:�Qy:�
D��u_(w%,n%,_%,Q%,o_%,wJ%):�va%,ca%,A%,QJ%:A%=n%-3-(n%=1):�n%<>2�
�w%>=0�n%<>2�
Ȏw%�
�G%(0):�X_(-A%)
�G%(1):�X_(A%)
�o_(w%)
�
$�:�A%=1�iy%:�t%<A%�X%=i_%�X%=l_%
$�r(_%,Q%,X%,-o%-A%*Ny%,36,Ny%)�
�n%<>2�t%=A%:v%=S%(t%)
�:�
�
K�:�(w%=-1�n%=2)��r(_%,Q%,yy%,-o%,j%,-m%)��hy(n%,�,_%-yy%,Q%+o%,o_%,wJ%)
I�(w%=-1�n%=2)��r(_%,Q%,dy%,-o%,j%,-m%)��hy(n%,�,_%-dy%,Q%+o%,o_%,wJ%)
�n%=2�
(�T%(t%)<>-1��C(T%(t%),Xy%,Ty%,e%,w%)
��QJ%��M(i%,-1)
�:�
��Qy:�V_%=t%�
#�v%<>z_%�py%=0�py%=1+2*(v%<z_%)
(��C_(V_%):�M(i%,-1):py%=1+2*(t%<V_%)
�:�(uJ%�py%<>0)�Vy%��O
.S%(V_%)=z_%:S%(t%)=v%:�V_%<>t%��by(t%):�py
�
P��O:�p_:�Xu(py%):�D(i%,yy%,-o%,yy%+j%,-o%-m%):�D(i%,dy%,-o%,dy%+j%,-o%-m%):�
-��w_:�D(i%,yy%+j%-32,-o%,dy%+32,-o%-m%):�
a��py:�D(i%,l_%,-o%,l_%+36,-o%-m%):�D(i%,i_%,-o%,i_%+36,-o%-m%):�D(i%,GJ%,-o%,GJ%+32,-o%-m%):�
!&��x(e%,IJ%,Vl%):�A%:A%=Vy%:�e%=i%�
"
�eJ%<>-1�
#i!J%=i%:ș&400CB,,J%:J%!4=au%:J%!8=xu%-ry%:J%!&C=au%+xy%:J%!16=xu%:J%!28=IJ%:ș&400C5,,J%:�w(i%,IJ%,0)
$��w(e%,IJ%,Vl%)
%�:�A%��M(i%,-1)
&��w(e%,IJ%,Vl%)
'�:�
(��Xu(A%):�Mu%�A%<>0�
)��qu%,_%,a%,K%,Ry%,g%,R%,C%:!J%=i%:ș&400CB,,J%:a%=J%!4-J%!20:K%=J%!16-J%!24:Ry%=a%+dy%-&64�2:g%=(&64/2-32):R%=j%+&64/2:ș&40742,0�C%:C%+=3<<4:�_%=0�&B4�&F:�vy(_%,A%):T%=�:���>T%+1:�vy(_%,A%):�
*�:�
+J��vy(_%,A%):!J%=i%:J%!4=0:J%!8=-ry%:J%!&C=xy%:J%!16=0:�A%=-1�_%=&B4-_%
,�ș&400C9,,J%�qu%:ȕqu%:ș&400E6,C%:�Ry%+g%*��_%,K%-o%+0.2*g%*��_%:�Ry%+R%*��_%,K%-o%+0.2*R%*��_%:�BY0,-m%:�Ry%+g%*��_%,K%-o%-m%:�Ry%+g%*��_%,K%-o%+0.2*g%*��_%:ș&400CA,,J%�qu%:�:�
-;��BJ�A%,C%,Ri%,V_%,z_%,va%:Ri%=�Gy:V_%=t%:z_%=v%:ȎtJ%�
.�Qu%:Ȏ!U%�
/�0
0�1:�s(Uy%,by%,Fy%)
1��2:!U%=-1:U%!4=NJ%:ș&400CE,,U%:!J%=Ay%:ș&400CB,,J%:J%!4=U%!16-(J%!&C-J%!4):J%!&C=U%!16:J%!16=&88+(J%!16-J%!8):J%!28=-1:ș&400C5,,J%:�A(Ay%,2,�Q(Uy%,by%,Fy%,-1)):P_%=Uy%:N_%=by%:Q_%=Fy%:A%=�f:t_%=A%>&B:A%=A%�&C:A%-=&C*(A%=0):�A(Ay%,4,�A%)
2.�t_%��A(Ay%,7,�A("pm"))��A(Ay%,7,�A("am"))
3OA%=�i:�A(Ay%,5,�2-��A%,"0")+�A%):ș6,&A1,&DC�,,A%:�Z(Ay%,1,�((A%�&80)=&80))
4 �3:�"Filer_Run "+J$+".!Help"
5�4:�Yy%=0��Ry
6 �5:�t
7
�6:Du%=�u
8�
9�T%(t%):�cu(U%,t%)
:�d_%:�Ly(-1,!U%,0)
;�Fl%:ȎiJ%�
<$�f%:hJ%=!U%:�!U%>0�C%=!U%�C%=m_%
= �A%=16�18:�U(f%,A%,C%):�
>%�Hy%:ol%=!U%:�!U%=0�A%=DJ%�A%=!U%
?�U(Hy%,4,A%)
@�
A�uu%:�PJ(__%,!U%)
BB�oJ%:Q%(0)=!U%:�o(A%(6),18,Q%()):�H(oJ%,0,-1):�J(oJ%,Q%(0),-1)
C :ȎiJ%�
D�A%(6):Ȏ__%�
E�2,3,4,5:�U%!4<>-1�
F,�!U%=0��U(iJ%,__%,U%!4)��b(iJ%,__%,U%!4)
G�
H>�9,&A,&B,&C,&D,&E,&F:X%(__%-9)=!U%:�D(iJ%,24,-64,&B8,-&D0)
IN�20,21:Q%(__%-19)=!U%:�o(A%(6),18,Q%()):�H(By%,0,-1):�J(By%,Q%(__%-19),-1)
J�
K�Yy%:�UJ(U%)
L�f%,Ly%:�iy(tJ%,U%)
M�rJ(tJ%,U%)
N�
O �:�Ri%��C(tJ%,-1,-1,iJ%,__%)
P �Qy:�
Q;��C(My%,_%,Q%,s%,Sy%)�A%:�(My%=Qu%�My%=T%(t%))�My%<>-1�
RB�J(Zl%,0,sy%=1):�J(Zl%,1,sy%=2):�A%=0�3:�K(Yi%,A%,-(BJ%<=0)):�
S5�:ș&400D4,,My%,_%-64,Q%:tJ%=My%:iJ%=s%:__%=Sy%:�
T:��`J(e%,w%,Cy%)�z_%,va%,A%,B%:V_%=t%:z_%=v%:k%=�:Ȏe%�
U�i%:k%=�yy(w%,Cy%)
V�-1
W �I_%,Yy%:k%=�jy(e%,w%,Cy%)
Xk%=�C_(e%,w%,Cy%)
Y �:�k%=��
Zk%=�:ȎCy%�
[�27:�Yy%<>0��h
\"�385:�"Filer_Run "+J$+".!Help"
]�386:�Yy%=0��Ry
^ �387:�t
_�81-65+1:Du%=�u
` k%=�
a6�:�Cy%>=401�Cy%<=400+iy%�t%=Cy%-400:v%=S%(t%):k%=�
b�:�Qy:�k%�ș&400DC,Cy%
c�
d ��q(A$)�A$<>""�B$+=A$+�&D
e�
fR��iu:ș&400D3,,U%:�!U%<>i%�!U%<>`%�Z%(t%)=2�!U%<>-1�ș&400DC,��B$,1):B$=�B$,2)
g�
h���hJ:�B("You are about to get a message from the author of !Organiser, please read it, it will be worth your while!"):�"Filer_Run "+J$+".NewUser":�
i&��W_:!J%=Zu%:ș&400C3,,J%:eu%=-1:�
j6��Yy:`J%=�:�_y(0,0,0,0,0,�,�):�d(0):`J%=�:XJ%=-1:�
k,��D_(qi%,e%,_%,Q%,Tl%,Zi%,Mi%):�Mu%�Vy%�
l_XJ%=e%:x_%=qi%:Bl%=_%:Hl%=Q%:Hu%=Tl%:rl%=Zi%:fl%=Mi%:!J%=20:J%!&C=0:ș&400E7,0,J%,su%:`J%=�
m)��_y(qi%,e%,_%,Q%,Tl%,Zi%,Mi%):XJ%=-1
n�:�
o:��Vu:�_y(x_%,XJ%,Bl%,Hl%,Hu%,rl%,fl%):�XJ%=`%��M(`%,9)
pXJ%=-1:`J%=�:�
q���Ry:�A%,s%,b%,A$:A%=A%(1):�Z(A%,1,-s_%):�Z(A%,2,-gu%):�Z(A%,3,-du%):�Z(A%,4,-Mu%):�Z(A%,7,-((qy%�9)=0)):�Z(A%,8,-((qy%�4)>0)):�Z(A%,9,-((qy%�5)=1)):�Z(A%,22,-((qy%�8)=8)):�Z(A%,23,-(xJ%=-1)):�Z(A%,&A,-((qy%�2)>0)):�Z(A%,&B,-r_%)
r��Z(A%,24,-((qy%�16)=16)):�A(A%,25,N$):�Z(A%,&F,-Fu%):�Z(A%,16,-Su%):�Z(A%,&E,-(eJ%=-1)):�Z(A%,19,-(eJ%<>-1)):�Z(A%,20,-(u_%=-1)):�Z(A%,21,-�(FJ%)):�S(A%,&B,��(�M(A%,9)���M(A%,24))):�S(A%,&A,��(�M(A%,8)�(�M(A%,9)���M(A%,24)))):�S(A%,24,���M(A%,9))
s��S(A%,25,��(�M(A%,9)��M(A%,24))):�s%=_J%-1�0�-1:A$+=�((Ku%>>s%)�1):�:�A(A%,18,A$):�A(A%,27,_$):�A(A%,&D,D$):�Bu:!J%=I_%:ș&400CB,,J%:s%=J%!&C-J%!4:b%=J%!16-J%!8:J%!4=(�d-s%)/2:J%!16=�e-(�e-b%)/2:ș&400C5,,J%:�wy(1)
taX%()=P%():Q%()=H%():�o(A%(6),18,H%()):�A%=2�5:�b(A%(6),A%,D%(A%-1)):�U(A%(6),A%,I%(A%-1)):�:�
u���uy:�A%,C%,A$:A%=A%(1):B%=qy%:s_%=�M(A%,1):gu%=�M(A%,2):du%=�M(A%,3):Mu%=�M(A%,4):D$=�Z(A%,&D):r_%=�M(A%,&B):qy%=-�M(A%,9)-5*�M(A%,8)-8*�M(A%,22)-2*�M(A%,&A)-16*�M(A%,24):Fu%=�M(A%,&F):Su%=�M(A%,16):�zJ(��M(A%,21))
v3eJ%=�M(A%,&E):xJ%=�M(A%,23):N$=�Z(A%,25):�eJ%�
w=!J%=i%:ș&400CB,,J%:au%=J%!4:cl%=J%!8:wl%=J%!&C:xu%=J%!16
x)�:C%=�M(A%,20):�C%<>u_%�u_%=C%�u_%=C%
yX_J%=��Z(A%,18):Ku%=�("%"+�Z(A%,18)):P%()=X%():H%()=Q%():A$=�Z(A%,27):�A$<>_$��Gu(A$)
zS�A%=2�5:D%(A%-1)=�p(A%(6),A%):I%(A%-1)=�q(A%(6),A%):�:�Tu:�Vy%�py%=0:�O:�w_:�py
{MJ%=0:�m:�u:�m:�
|^��Gu(A$):z%=�"<Organiser$Dir>.Resources.!Language":�#z%,A$:�#z%:z%=0:�B(�A("ErrReload")):�
})��wy(I%):�Yy%<>0�!J%=Yy%:ș&400C6,,J%
~�!J%=I_%:ș&400CB,,J%:Yy%=A%(I%):!J%=Yy%:J%!4+=22:J%!16-=70:J%!8=J%!16-272:ș&400C5,,J%:!J%=I_%: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��yJ:!J%=Yy%:ș&400CB,,J%:J%!4=U%!4+22:J%!16=U%!16-70:J%!8=J%!16-272:J%!28=U%!28:ș&400C5,,J%:U%!28=Yy%:ș&400C5,,U%:�
� ��Nu(e%,w%,n%,_%,Q%):Ȏe%�
��I_%:Ȏw%�
��1,2,3,4,5,6:�wy(w%)
� �8:�h
��9:�uy:ey%=-1:�n%<>1��h
��&A:�uy:�t:�n%<>1��h
��
��A%(1):Ȏw%�
�(�&F:�n%<&A�n%<>2��B(�A("ErrReload"))
��7,8,9,22,&E,19:�n%<>2�
���Z(e%,w%,1):�S(e%,&B,��(�M(e%,9)���M(e%,24))):�S(e%,&A,��(�M(e%,8)�(�M(e%,9)���M(e%,24)))):�S(e%,24,���M(e%,9)):�S(e%,25,��(�M(e%,9)��M(e%,24)))
��
�G�24:�S(e%,25,���M(e%,24)):�S(e%,&A,��M(e%,24)):�S(e%,&B,��M(e%,24))
��27:�K_(A%(1),27)
��
�;�A%(6):!U%=e%:ș&400CB,,U%:_%=U%!4:Q%=U%!16-U%!24:Ȏw%�
�H�2,3,4,5:!Ml%=�iy(A%(6),w%):�C(Ml%,_%+750+64,Q%-&64-48*(w%-2),e%,w%)
�b�9,&A,&B,&C,&D,&E,&F:�H(By%,0,-1):�J(By%,X%(w%-9),-1):�C(By%,_%+470+64,Q%-&64-48*(w%-9),e%,w%)
�S�19:�H(oJ%,0,-1):�J(oJ%,Q%(w%-19),-1):�C(oJ%,_%+578+64,Q%-540-48*(w%-19),e%,w%)
�V�20,21:�H(By%,0,-1):�J(By%,Q%(w%-19),-1):�C(By%,_%+578+64,Q%-540-48*(w%-19),e%,w%)
��
��aJ(e%,w%,n%,_%,Q%)
��:�
�ݤjy(e%,w%,n%):Ȏe%�
��I_%,A%(1):k%=�
�k%=�F_(e%,w%,n%)
� �:=k%
�,��h:�G(Yy%):Yy%=0:�G(I_%):�Vy%��M(i%,-1)
��
����K_(s%,Sy%):�Ll%,u$,Py%,R$,a$,c$,g%:Ll%=1:u$=�Z(s%,Sy%):�:ș&C,9,"<Organiser$Dir>.Resources",U%,1,Ll%,256,0�,,,g%,Ll%:�g%=1�
�a$=�N(U%):�c$=""�c$=a$
��Py%=��R$=a$
��a$=u$�Py%=�
�!�:�Ll%=-1�R$<>"":�R$=""�R$=c$
��A(s%,Sy%,R$):�
����Ay(c%,r%,Q%,s%,Sy%):�M%,A%:Ri%=�:�A(ay%,0,�My(c%,r%,Q%,-1)):M%=�X(r%,Q%):�A%=29�31:�_(ay%,A%+3,-(A%>M%)):�:�A%=1�M%:�g(A%,A%=c%):�:HJ%=r%:�A(ay%,1,�Q%):�x(ay%,-1,1):Aa%=s%:Va%=Sy%:�
�$��ry:�d%,q%,x%,A$:�G(ay%):ȎAa%�
�(�f%:�A(f%,1,�j(W_%,C_%,b_%)):�Y(0,0)
�9�T%(�P(3)):A$=�j(d%,q%,x%):V_%=t%:z_%=v%:�I(d%,q%,x%)
�"�Ay%:�A(Ay%,2,�j(P_%,N_%,Q_%))
��:�
�\��g(c%,F%):!J%=ay%:J%!4=c%+3:ș&400CE,,J%:$J%!32="R"+�(1-F%)+";F"+�(1-F%)+"7":�F%�Yu%=c%
�7�Ga%�J%!8=0:J%!&C=0�J%!8=(1+�(F%))<<28:J%!&C=&F<<28
�ș&400CD,,J%:�
�;��Ly(c%,r%,Gy%):�A%,M%,Q%,A$:�c%<>-1��g(Yu%,�):�g(c%,�)
�5�r%<>-1��J(d_%,HJ%-1,�):HJ%=!U%+1:�J(d_%,HJ%-1,�)
�L�Gy%<>0�Q%=��Z(ay%,1)+Gy%:�Q%>=&77d�Q%<=&fff��A(ay%,1,�Q%)�Q%=��Z(ay%,1)
�NM%=�X(HJ%,Q%):�A%=29�31:�_(ay%,A%+3,-(A%>M%)):�:�Yu%>M%��g(Yu%,�):�g(M%,�)
�"�A(ay%,0,�My(Yu%,HJ%,Q%,-1)):�
�Aݤj(�c%,�r%,�Q%):c%=Yu%:r%=HJ%:Q%=��Z(ay%,1):=�Q(c%,r%,Q%,-1)
�:ݤMy(c%,r%,Q%,Ry%):�A$:A$=�Q(c%,r%,Q%,Ry%):=�A$,�A$-5)
�/��Py:�Nu%,Pl%,LJ%,KJ%,Za%,l%,b%:mJ%=0:�xJ%�
��l%=�z:b%=�f:Pl%=J%(0,1):Nu%=J%(0,3):Nu%+=J%(0,2)-�H(Nu%,Pl%,Fy%):KJ%=J%(1,1):LJ%=J%(1,3):LJ%+=J%(1,2)-�H(LJ%,KJ%,Fy%):dl%=�F(0,1,Nu%,Pl%,Fy%):gl%=�F(0,2,LJ%,KJ%,Fy%):Za%=(�G(dl%,l%)<1��G(l%,gl%)<1):�D(Nu%,Pl%,Fy%)=�D(Uy%,by%,Fy%)���y�mJ%=dl%
�/�D(LJ%,KJ%,Fy%)=�D(Uy%,by%,Fy%)��y�mJ%=gl%
�V�Za%<>�y��D(Nu%,Pl%,Fy%)<>�D(Uy%,by%,Fy%)��D(LJ%,KJ%,Fy%)<>�D(Uy%,by%,Fy%)��Sy(-1)
��:�
���gJ:�mJ%=gl%��Sy(0)
��mJ%=dl%��Sy(1)
� �Py:�
����MJ:J$=�ty("Organiser$Dir"):z%=0:Iu%=0:B$="":ey%=�:Ni%=�:XJ%=-1:`J%=�:T$=J$+".Data.":Z_%=�uy("<Organiser$Dir>.Sprites",&7AC+&C8):�Sa%3,aJ%32,G%(1),Ti%&B,Ii%&B,Ol%1:$Sa%="R2":G%()=-1:$Ti%="Pptr_turnl"+�0:$Ii%="Pptr_turnr"+�0:?Ol%=0
�n�D%(5),I%(5),B%(5),W%(5),S%(5),Z%(5),M$(5):�P%(7),X%(7),H%(2),Q%(2):A$=�wy:lJ%=�:�A$,"-delete_all_data")�
��By(�A("ErrSure"),�)�
�#�B(�A("ErrChange")):lJ%=�:ey%=�
��
�A�:�P_:�IJ:�zu:�ly:NJ%=-1:�m:w_%=�l(1*&400):�q_(w_%,Ru%):�s_%�
��qy%=1��S(-1,NJ%,1)
�
�d(�1)
�
�ș&406C0
��:�
�#��Hu:�dJ:v%=S%(t%):�Pu%��J_:�Py
�#Iu%=�:�x(i%,-1,-1):�gu%��G(i%)
��by(t%):�qy%>1��u
��qy%�1��S(-1,NJ%,0)
� �du%��x(Zu%,-1,-1)�eu%=-1
��s_%�ș&406C1
� �c:�Py:�
�5ݤP(Xu%):�A%:A%=iy%+1:�A%-=1:�Z%(A%)=Xu%�A%=0:=A%
����t_:�A$,S%:�T%(iy%):By%=�Cy(�A("Cols")):d_%=�C("Mon","Mon",1,&C):�yy(d_%,0,-1):�S%=1�iy%:T%(S%)=�Ky(S%):�:Qu%=�C("Title","Menu",1,7):�z(Qu%,0,nu%):Ml%=�C("TabM","TabM",1,2):�z(Ml%,0,By%):�z(Ml%,1,By%):oJ%=�C("BordM","BordM",1,5):�
����ly:�A%,da%,Qa%:Fy%=�L:by%=�V:Uy%=�I:Ny%=�a(m%/iy%):xy%=&64+2*(36+j%+5+20):ry%=m%+2*(5+20):l_%=5+20:i_%=l_%+36+&64+2*j%:yy%=l_%+36:dy%=yy%+&64+j%:o%=5+20:GJ%=dy%-&64:j_%=m%/27::dJ%=j%-40-2*&c:�
�.��`_:�B%:�ry%<>U%!16-U%!8�xy%<>U%!&C-U%!4�
��ry%=U%!16-U%!8:xy%=U%!&C-U%!4:m%=ry%-2*(5+20):j%=((xy%-&64)-2*(36+5+20))/2:�ly:ș30,6,,,yi%�,,B%:!B%=`%:ș&400CC,,B%:ș&400C3,,B%:�ty(B%!88,B%+4):ș&400C1,,B%+4�`%:ș30,7,,B%:�Z%(t%)=2�v%=0��Yy:�A_
� ș&400D1,i%,0,-ry%,xy%,0
��:�
�`��zu:�A%,g$:�:��:�#z%:z%=0:�B(�$+" at line "+Þ+", using default settings."):�P_:ey%=�:�
�z%=�(J$+".Data.Settings"):o$=�#z%:g$=�#z%:D$=�#z%:s_%=�R:gu%=�R:qy%=�Y:r_%=�R:Su%=�R:iy%=�Y:t%=�Y:du%=�R:Mu%=�R:xJ%=�R:Fu%=�R:Ga%=Fu%:_J%=�Y:�#z%,Ku%,qJ%:�#z%,eJ%,au%,wl%,xu%,cl%:u_%=�R:FJ%=�R:�#z%,j%,m%:�A%=0�6:P%(A%)=�Y:�:�A%=0�2:H%(A%)=�Y:�
փ�A%=1�iy%:Z%(A%)=�Y:D%(A%)=�Y:I%(A%)=�Y:�:N$=�#z%:��QJ(�#z%,z%):��#z%:�#z%:z%=0:��:Pu%=(�n(qJ%)<>�n(�z)):�lJ%�D$=�A("Yourname")
��g$<>J$��hJ
��
����d_:�A%:z%=�(J$+".Data.Settings"):�#z%,V$:�#z%,J$:�#z%,D$:�W(s_%):�W(gu%):�W(qy%):�W(r_%):�W(Su%):�W(iy%):�W(t%):�W(du%):�W(Mu%):�W(xJ%):�W(Fu%):�W(_J%):�#z%,Ku%,�z:�#z%,eJ%,au%,wl%,xu%,cl%:�W(u_%):�W(FJ%):�#z%,j%,m%:�A%=0�6:�W(P%(A%)):�
�g�A%=0�2:�W(H%(A%)):�:�A%=1�iy%:�W(Z%(A%)):�W(D%(A%)):�W(I%(A%)):�:�#z%,N$:�Ku(z%):�#z%:z%=0:ey%=�:�
���t:�d_:�Ou:�
����P_:::J_%=�:Pu%=0:qy%=1+2+4:N$="%z12:%mi:%se %am":H%()=2,2,7:s_%=�:r_%=�:Mu%=�:Su%=�:MJ%=0::::::Fu%=�:u_%=�:iy%=4:I%()=7:D%()=0,&B,&A,&F,9,&E:P%()=0,&F,8,&B,4,4,&B:gu%=�:eJ%=-1:au%=0:xu%=0:wl%=0:cl%=0:FJ%=�:t%=2:Z%()=0,1,3,5,2
�gdu%=�:D$="Chris Morison":xJ%=�:Su%=�:py%=�::::::j%=500:m%=920:::::::_J%=8:Ku%=&E7::::Pu%=�:qJ%=0::�
�ݤR=(�#z%=&FF)
���W(A%)�#z%,A%:�
� ݤY=�#z%
�!��m:�B%,H%:�MJ%>0�B%=8�B%=qy%
�8�NJ%<>-1�!J%=-1-7*�(u_%):J%!4=NJ%:ș&400C4,,J%:U_%=0
�ȎB%��(2+16)�
�
�1,8:Ȏ��
��B%=1:U_%=6-3*�r_%
��B%=3:U_%=9-3*�r_%
�;�(B%�8)>0:U_%=9:ș&400EC,-1,-1�,,H%:$aJ%=�(H%�&400)+"k"
� �(B%�16)>0:U_%=��K(N$)+3
�_�:U_%=U_%*16:Cu%=68:J%!8=0:J%!&C=U_%:J%!16=Cu%:J%!20=&2700313D:J%!24=aJ%:J%!28=Sa%:J%!32=32
�k�1+4:U_%=&74:Cu%=&78:J%!8=-16:J%!&C=U_%:J%!16=Cu%:$aJ%="clock":J%!20=&3102:J%!24=aJ%:J%!28=Z_%:J%!32=32
�N:U_%=68:Cu%=68:J%!8=0:J%!&C=68:J%!16=68:J%!20=&3002:$(J%+24)="!Organiser"
�<�:!J%=-1-�(7*u_%):J%!4=0:ș&400C2,0,J%�NJ%:�(B%�4)=4��F_
��o(-1,NJ%,H%()):�
�6��o(e%,cy%,K%()):�g_%,A%:g_%=�gy(e%,cy%):�g_%<>-1�
�qA%=��N(g_%),"R"):g_%?A%=��K%(0):�U(e%,cy%,K%(2)):�b(e%,cy%,K%(1)):!J%=e%:J%!4=cy%:J%!8=0:J%!&C=0:ș&400CD,,J%
��:�
����hu:�A%,Iy%:�A%(6):Yy%=0:�mJ:nu%=�B("Info",Iy%):i%=�B("Main",Iy%):ti%=Iy%:`%=�B("Addresses",Iy%):G_%=�B("Important",Iy%):Zu%=�B("Banner",Iy%):ay%=�B("GetDate",Iy%):I_%=�B("Setup",Iy%):f%=�B("AlarmSet",Iy%):Ql%=Iy%:Ly%=�B("AlarmWarn",Iy%)
��Hy%=�B("Anni",Iy%):Na%=Iy%:VJ%=�B("AnniNotify",Iy%):A%(1)=�B("SetGen",Iy%):A%(2)=�B("SetAdd",Iy%):A%(3)=�B("SetAnn",Iy%):A%(4)=�B("SetCal",Iy%):A%(5)=�B("SetDia",Iy%):A%(6)=�B("SetColours",Iy%):Ay%=�B("SetClock",Iy%)
��A(nu%,8,V$):�A(nu%,5,"!Organiser"):�A(nu%,6,�A("Purp")):�A(Zu%,3,�A("Vers")+" "+V$):�A(Zu%,6,"� Chris Morison 19"+�V$,�V$,")")-2,2)):�A(Zu%,4,D$):�A%=1�31:�A(ay%,A%+3,�A%):�:�
�KݤB(G$,�Iy%):�H%,S%,I%,P%,ty%,g_%:ș&400DB,,,0,0,0,G$,0�,S%,I%:�S%>512�
�3ș&2001E,6,,,S%�,,P%;ty%:�ty%�1��2,�A("ErrWin")
�
�P%=U%
�?�:�g_%I%:ș&400DB,,P%,g_%,g_%+I%,Yl%,G$,0�,,g_%:�G$="Main"�
�>P%!68=&64+(&64<<16):P%!0=0:P%!4=0:P%!8=xy%:P%!&C=ry%:�FJ%�
�*P%!48=�d:P%!44=-�e:P%!28=P%!28�(3<<29)
�.�P%!48=xy%:P%!44=-ry%:P%!28=P%!28��(3<<29)
��
��:�G$="Setup"�_a%=S%
��G$="Addresses"�yi%=S%
� �:�Fu%�G$<>"Banner"��Yu(P%)
�!�G$="Addresses"��ty(P%!84,P%)
;P%!64=Z_%:ș&400C1,,P%�cy%:Iy%=P%!72:�S%>512�ș30,7,,P%
=cy%
��zJ(ty%):�UJ%,B%:�ty%<>FJ%�
Pș30,6,,,4+88+32*22�,,UJ%:!UJ%=i%:ș&400CC,,UJ%:B%=UJ%+4:ș&400C3,,UJ%:�ty%�
*B%!48=�d:B%!44=-�e:B%!28=B%!28�(3<<29)
.�B%!48=xy%:B%!44=-ry%:B%!28=B%!28��(3<<29)
5�:B%=i%:FJ%=ty%:ș&400C1,,UJ%+4�i%:�x_%=B%�x_%=i%
�Vy%�!UJ%=i%:ș&400C5,,UJ%
ș30,7,,UJ%
�:�
��OJ(`u%,S$):�Py(`u%,S$)�
XȔU%!8,U%!&C:!U%=256:$(U%+44)="<Wimp$Scrap>"+�0:U%!36=-1:U%!16=2:ș&400E7,17,U%,U%!4
�:�
6��AJ:�u<>-1�U%!&C=U%!8:U%!8=0:ș&400E7,19,U%,U%!4
�
k��VJ:�qu%,a%,K%:ș&400C8,,U%�qu%:a%=U%!4-U%!20:K%=U%!16-U%!24:ȕqu%:�T_(!U%,a%,K%):ș&400CA,,U%�qu%:�:�
^ݤuy(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%
K��M(e%,w%):!J%=e%:J%!4=w%:ș&400CE,,J%:ș&400D2,e%,w%,,,-1,��N(J%!28):�
#ݤp(e%,w%):�k_%,`_%:�h(e%,w%)�
�dy(e%,w%,`_%,k_%)
3�!J%=e%:J%!4=w%:ș&400CE,,J%:k_%=(J%!24>>28)�&F
�:=k_%
��b(e%,w%,k_%):�h(e%,w%)�
�M_(e%,w%,-1,k_%)
:�!J%=e%:J%!4=w%:J%!&C=&F<<28:J%!8=k_%<<28:ș&400CD,,J%
�:�
>ݤh(e%,w%):!J%=e%:J%!4=w%:ș&400CE,,J%:=((J%!24)�(1<<6))>0
W��M_(e%,w%,`_%,k_%):�P%,A%:!J%=e%:J%!4=w%:ș&400CE,,J%:P%=J%!32:A%=�$P%,"F"):�A%>0�
�`_%<>-1�?(P%+A%+1)=��~`_%
�k_%<>-1�?(P%+A%)=��~k_%
J%!8=0:J%!&C=0:ș&400CD,,J%
�:�
���dy(e%,w%,�`_%,�k_%):�P%,A%:!J%=e%:J%!4=w%:ș&400CE,,J%:P%=J%!32:A%=�$P%,"F"):`_%=-1:k_%=-1:�A%>0�`_%=�("&"+�?(P%+A%+1)):k_%=�("&"+�?(P%+A%))
!�
"#ݤq(e%,w%):�k_%,`_%:�h(e%,w%)�
#�dy(e%,w%,`_%,k_%)
$3�!J%=e%:J%!4=w%:ș&400CE,,J%:`_%=(J%!24>>24)�&F
%
�:=`_%
& ��U(e%,w%,`_%):�h(e%,w%)�
'�M_(e%,w%,`_%,-1)
(:�!J%=e%:J%!4=w%:J%!&C=&F<<24:J%!8=`_%<<24:ș&400CD,,J%
)�:�
*B��_(e%,w%,ty%):�p%:p%=J%+64:�ty%=1�!J%=e%:J%!4=w%:ș&400CE,,J%
+e!p%=e%:p%!4=w%:p%!8=(�ty%)<<23:p%!&C=1<<23:ș&400CD,,p%:�ty%=1�ș&400D1,e%,J%!8,J%!&C,J%!16,J%!20
,�
-Mݤgy(e%,w%):�A%:!J%=e%:J%!4=w%:ș&400CE,,J%:�(J%!24�256)>0�A%=J%!32�A%=-1
.=A%
/=��Z(e%,w%,ty%):�A%:!J%=e%:J%!4=w%:A%=1:�ty%=-1�ty%=1:A%=0
0,J%!8=ty%<<21:J%!&C=A%<<21:ș&400CD,,J%:�
1<ݤM(e%,w%):!J%=e%:J%!4=w%:ș&400CE,,J%:=-((J%!24>>21)�1)
2=��S(e%,w%,ty%):�A%:A%=1:!J%=e%:J%!4=w%:�ty%=-1�ty%=1:A%=0
30J%!8=ty%*(1<<22):J%!&C=A%<<22:ș&400CD,,J%:�
4h��A(e%,w%,W$):�P%,L%:!J%=e%:J%!4=w%:ș&400CE,,J%:�J%!24�(1<<8)�P%=J%!28:L%=(J%!36)-1:�P%=J%+28:L%=&B
5-$P%=�W$,L%):J%!8=0:J%!&C=0:ș&400CD,,J%:�
6WݤZ(e%,w%):�A$:!J%=e%:J%!4=w%:ș&400CE,,J%:�(J%!24�256)>0�A$=�N(J%!28)�A$=�N(J%+28)
7=A$
8Mݤiy(e%,w%):�A%:!J%=e%:J%!4=w%:ș&400CE,,J%:�(J%!24�256)>0�A%=J%!28�A%=-1
9=A%
:b��yy(My%,L%,H%):My%+=4+24*L%:�My%+=24:My%!8=My%!8�8:L%+=1:�((L%>H%)�(H%<>-1))�((!My%�&80)>0):�
;`��H(My%,L%,H%):My%+=4+24*L%:�My%+=24:!My%=!My%��1:L%+=1:�((L%>H%)�(H%<>-1))�((!My%�&80)>0):�
<]ݤCy(s$):�My%,_u%,Sy%:My%=�Wy(s$+"\0\1\2\3\4\5\6\7\8\9\10\11\12\13\14\15"):�Sy%=0�&F:Ȏ��
=+�Sy%<4,Sy%=9,Sy%=&C,Sy%=&E,Sy%=&F:_u%=7
>
_u%=0
?5�:My%?(39+Sy%*24)=Sy%*16+_u%:�:�yy(My%,0,-1):=My%
@�ݤWy(A$):�A%,B%,L%,Z$,I%:A$+="\":�A%4*�ny (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%=�xy(Z$):B%!4=0:B%!8=&7000021
A6�Z$,">")�B%!4=��Z$,�Z$,">")+1):Z$=�Z$,�Z$,">")-1)
BQ�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$
C�Z$>L%�L%=�Z$
D7A$=�A$,�A$,"\")+1):�:!B%=!B%�&80:A%!16=L%*16+16:=A%
E�ݤC(s$,h$,L%,H%):�M%,A%,C%,D%,Gl%,A$:�M%28+24* (H%-L%+1):!M%=�g(s$):M%!4=0:M%!8=0:Gl%=��A(s$):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=�g(h$+�C%):A%!16=0:A%!20=0:D%=��A(h$+�C%):�D%>Gl%�Gl%=D%
F*�:!A%+=&80:M%!28+=256:M%!16=Gl%*16:=M%
G&��z(M%,I%,S%):M%!(28+24*I%+4)=S%:�
H ݤxy(�Z$):�A%,F%:�:Ȏ��Z$�
I�"�":A%+=1:Z$=�Z$,2)
J�"_":A%+=2:Z$=�Z$,2)
K�"*":A%+=8:Z$=�Z$,2)
L
F%=-1
M
�:�F%:=A%
N:ݤny(A$):�A%:ȕ�A$,"\"):A%+=1:A$=�A$,�A$,"\")+1):�:=A%
O7ݤby(A%):�H%:A%+=4:�A%+=24:H%+=44:�(!A%�2)>0�H%+=24
P�(!A%�&80)>0:=H%+96
Q�ݤpy(My%,Ta%,W$,ui%,b$):�pl%,g_%:�pl%ui%+1,g_%� (b$)+1:$pl%=W$:$g_%=b$:My%+=28+24*Ta%:!My%=!My%�4:My%!8=My%!8�256:My%!&C=pl%:My%!16=g_%:My%!20=ui%:=pl%
Rdݤk(My%,y$):�A%,B%:B%=My%+28:ȕ(y$<>�W(My%,A%))�(!B%�&80)=0:A%+=1:B%+=24:�:�y$<>�W(My%,A%)�A%=-1
S=A%
T��K(M%,I%,F%):�F%<>0�
U'M%!(36+24*I%)=M%!(36+24*I%)�(1<<22)
V)�M%!(36+24*I%)=M%!(36+24*I%)��(1<<22)
W�:�
X;ݤW(M%,I%):M%+=28+24*I%:�(M%!8�256)>0�M%=M%!&C�M%=M%+&C
Y =�N(M%)
ZW��J(M%,I%,F%):�F%<>0�M%!(28+24*I%)=M%!(28+24*I%)�1�M%!(28+24*I%)=M%!(28+24*I%)��(1)
[�
\ ݤS_(M%):�M%!28>&80�M%=!M%
] =�N(M%)
^X��c_(M%,I%,F%):�F%<>0�M%!(28+24*I%)=M%!(28+24*I%)�2�M%!(28+24*I%)=M%!(28+24*I%)��(2)
_�
`ݤa(A%)=A%-A%�4
a%ݤGy:ș&400CF,,J%:=(((J%!8)�1)=1)
b*ݤy:�A%:ș6,&A1,&DC�,,A%:=(A%�&80)=&80
c'��Sy(F%):�A%:ș6,&A1,&DC�,,A%:ȎF%�
d�0:A%=A%��&80
e�1:A%=A%�&80
f�-1:A%=A%�&80
g�:ș6,&A2,&DC,A%:�
h7ݤe:�A%,B%:ș53,-1,&C�,,A%:ș53,-1,5�,,B%:=(A%<<B%)
i'ݤ`y(M%):�A%:ș53,M%,5�,,A%:=(A%=1)
jHݤw(H%,S%,F%):�P%,E%,V%,L%,T%:ș&2001D,2,H%,,S%�E%,,P%;V%:�(V%�1)=1�
k�F%�
l=P%=�Jy:�Zy(H%,(S%�P%)*P%-P%*((S%�P%)>0),�):P%=�w(H%,S%,�)
m �ș43,E%
n�
o �:=P%
pW��au(H%,�B%,S%,F%):�L%,E%,V%,T%,P%:ș&2001D,4,H%,B%,S%�E%,,B%;V%:V%=((V%�1)=1):Ȏ��
q�V%��F%:ș43,E%
r.�V%�F%�(S%>0):�Zy(H%,S%,�):�au(H%,B%,S%,�)
s�V%�F%�(S%<0)
t ɬV%�F%�(S%<0):�Zy(H%,-1,�)
u�:�
v?��Dy(H%,B%,F%):�A%,ty%:ș29,3,H%,B%�A%;ty%:�F%��Zy(H%,-1,�)
w�
x��Zy(H%,S%,F%):�P%:�F%�
y
�S%<0�
z�ș&2001D,5,H%,,-32*&400*&400:S%=H%!&C+H%-&8000:P%=�Jy:ș&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%
{(�:E%=Ru%:F%=�l(S%):ș29,5,H%,,Ru%-E%
|�
}�ș29,5,H%,,S%
~�:�
��q_(H%,S%):�S%=-1�S%=Ru%
�ș29,0,H%,,S%:�
�'��nJ:ș&61504,S_%:ș&2001E,7,,S_%:�
�X��FJ(j$):�F%:ș&2001E,6,,,17+�j$�,,S_%;F%:�F%�1��2,"Not enough memory for messages."
�($(S_%+16)=j$:ș&41501,S_%,S_%+16,0:�
�jݤA(U$):�F%,L%:ș&61502,S_%,U$,J%,256�,,,L%;F%:�F%�1�2,"Can't get message '"+U$+"' from Messages file"
�J%?L%=&D:=$J%
�dݤg(U$):�F%,P%:ș&61502,S_%,U$,0�,,P%;F%:�F%�1�2,"Can't get message '"+U$+"' from Messages file"
�=P%
��ݤO(U$,A$,Z$,C$,l$):�F%,L%:ș&61502,S_%,U$,J%,256,A$,Z$,C$,l$�,,,L%;F%:�F%�1�2,"Can't get message '"+U$+"' from Messages file"
�J%?L%=&D:=$J%
�DݤOy(U$,L%,H%,Z$,A$):�M$,A%:�A%=L%�H%:M$+=Z$+�A(U$+�A%)+A$:�:=M$
�1ݤr(_%,Q%,nl%,ul%,s%,b%):�s%<0�nl%+=s%:s%=-s%
��b%<0�ul%+=b%:b%=-b%
�8=((_%>=nl%)�(_%<=(nl%+s%))�(Q%>=ul%)�(Q%<=(ul%+b%)))
�ݤJy:�P%:ș81�P%:=P%
�Nݤwy:�I$,I%:ș16�I$:I%=�I$," -quit "):�I%�I$=�I$,�I$," ",I%+�" -quit ")+1)
�=I$
�8ݤty(A$):�L%:ș35,A$,J%,&FF,0,3�,,L%:J%?L%=0:=�N(J%)
�Yݤt(A$):�L%,F%:ș&20023,A$,J%,&FF,0,3�,,L%;F%:�(F%�1)=0�J%?L%=0:�N(J%)<>""�F%=��F%=�
�=F%
�Jݤl(M%):�S%:ș&400EC,-1,-1�S%:ș&400EC,S%+M%,-1�S%:Ru%=S%-(�-&8000):=�
�?ݤN(P%):�A$:ȕ?P%<>0�?P%<>&D�?P%<>&A:A$+=�(?P%):P%+=1:�:=A$
�:��eJ(cy%):!J%=256:J%!&C=0:J%!16=0:ș&400E7,17,J%,cy%:�
�Dݤs(A$):�A%,C%:�A%=1��A$:C%=��A$,A%,1):�C%>=97�C%<=&7A�C%=C%��32
��A$,A%)=�(C%):�:=A$
�7ݤd:�A%,B%:ș53,-1,&B�,,A%:ș53,-1,4�,,B%:=(A%<<B%)
�`��B(p$):!J%=&FF:$(J%+4)=p$+�0:ș&400DF,J%,17+(1<<8)+(1<<9),"Message from "+K$,"!Organiser":�
�fݤBy(A$,R%):!J%=0:$(J%+4)=A$:ș&400DF,J%,23-4*�R%+(1<<8),"Message from "+K$,"!Organiser"�,R%:=R%-2
�&ݤZ_(c%,r%,Q%):=(�D(c%,r%,Q%)+1)�2
�pݤD(c%,r%,Q%):�Uu%:Gy%=Q%-&77D:Uu%=Gy%*365:Uu%+=Gy%�4-(Q%-&76C-1)�&64+(Q%-&640-1)�400:ȕ(r%-1)>0:r%-=1:Ȏr%�
� �1,3,5,7,8,&A,&C:Uu%+=31
��4,6,9,&B:Uu%+=30
��2:Uu%+=28-�Fy(Q%)
��:�:=Uu%+c%
�#ݤH(c%,r%,Q%):=�o(�D(c%,r%,Q%))
�ݤX(r%,Q%):�c%:Ȏr%�
��1,3,5,7,8,&A,&C:c%=31
��4,6,9,&B:c%=30
��2:c%=28-�Fy(Q%)
� �:=c%
�.ݤFy(Q%)=((Q%�4=0)��(Q%�&64=0))�(Q%�400=0)
����F(�d%,�q%,�x%,my%,Lu%,Gy%):�gi%,Da%,K%:gi%=d%:Da%=q%:K%=x%:d%+=my%:q%+=Lu%:x%+=Gy%:ȕq%<1:q%+=&C:x%-=1:�:ȕq%>&C:q%-=&C:Oa%+=1:�:ȕd%<1:q%-=1:�q%<1�q%=&C:x%-=1
�Hd%+=�X(q%,x%):�:ȕd%>�X(q%,x%):d%-=�X(q%,x%):q%+=1:�q%>&C�q%=1:x%+=1
�*�:�x%<&77d�x%>&fff�d%=gi%:q%=Da%:x%=K%
��
�ݤo(u%):=((u%-1)�7)+1
�OݤQ(c%,r%,Q%,zJ%):=�c(�D(c%,r%,Q%),zJ%)+", "+�A_(c%)+" "+�U(r%,zJ%)+" "+�Q%
����pu:�C%,P%,J,P,R,M,Z,W,G,N,w,C,U:�C%&90:J=&D:P=&E:R=&F:M=2:Z=3:W=4:G=5:N=0:w=1:C=6:U=7:�S%=0�2�2:P%=C%:[OPTS%:.V CMP G,#0:RSBLT G,G,#0:SUBLT Z,Z,G:CMP W,#0:RSBLT W,W,#0:SUBLT M,M,W:ADD U,M,W:LDR C,[N,#28]:CMP U,C:BLT Q:LDR C,[N,#36]:CMP M,C:BGT Q
��LDR C,[N,#32]:ADD U,Z,G:CMP U,C:BLT Q:LDR C,[N,#40]:CMP Z,C:BGT Q:CMP w,#0:MVNEQ0,#1:�Qpc,P:B a:.Q MOV0,#0:MOVpc,P:.a MOV1,M:MOV2,Z:MOV0,#4:SWI 69:MOV1,W:MOV2,G:MOV0,#96+1:SWI 69:MVN0,#1:MOVpc,P:]�:�
�*ݤS(C%,D%,E%,F%):�A%,B%:A%=U%:B%=0:=�V
�+��X(C%,D%,E%,F%):�A%,B%:A%=U%:B%=1:�V:�
�B��G(e%):!J%=e%:ș&400C6,,J%:�e%=x_%�Hu%=�:!J%=c_%:ș&600C6,,J%
��e%=i%�Vy%=�
��
�@��Yu(B%):�N%,A$,Py%,p%:N%=B%!84:B%+=88:ȕN%:�((B%!16)�64)>0�
��A$=$(B%!24):p%=�("&"+�A$,�A$,"F")+1,1)):Py%=�("&"+�A$,�A$,"F")+2,1)):B%!16=B%!16��(64+(&FF<<24)):B%!16=B%!16�(Py%<<24)�(p%<<28)
��:B%+=32:N%-=1:�:�
�=��D(e%,O_%,`y%,B_%,jy%):ș&400D1,e%,O_%,jy%,B_%+2,`y%+4:�
����w(e%,IJ%,Vl%):�W%,H%,X%,Y%,Z%:!J%=e%:ș&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%:�Vl%=-1�
�JJ%!4=�d/2-W%/2:J%!&C=J%!4+W%:J%!16=�e-((�e-&84)-H%)/2-Y%:J%!8=J%!16-H%
�
�:�Vl%=1�
�;ȗX%,Y%,Z%:J%!4=X%-64:J%!&C=J%!4+W%:J%!8=Y%-H%:J%!16=Y%
��
��:�IJ%<>0�J%!28=IJ%
� ș&400C5,,J%:�e%=i%�Vy%=�
�6�e%=x_%�Hu%=�:!U%=x_%:ș&400CB,,U%:U%!28=J%!28:�`y
��
�G��_y(qi%,e%,_%,Q%,Tl%,Zi%,Mi%):�c_%<>0�c_%<>e%�!J%=c_%:ș&600C6,,J%
�Ac_%=e%:x_%=qi%:Bl%=_%:Hl%=Q%:Hu%=Tl%:rl%=Zi%:fl%=Mi%:�c_%<>0�
�w!J%=c_%:ș&400CB,,J%:Fa%=J%!&C-J%!4:Ca%=J%!16-J%!8:!J%=x_%:ș&400CB,,J%:J%!4+=_%:J%!16+=Q%:�Tl%�!J%=e%:ș&400C5,,J%
��:�
���`y:�c_%<>0�!U%=x_%�
�i!J%=c_%:J%!4=U%!4+Bl%:J%!16=U%!16+Hl%:J%!&C=J%!4+Fa%:J%!8=J%!16-Ca%:J%!20=0:J%!24=0:J%!28=U%!28:�rl%�
�AJ%!4-=U%!20:J%!&C-=U%!20:�J%!4<U%!4�J%!20=U%!20-Bl%:J%!4=U%!4
� �J%!&C>U%!&C�J%!&C=U%!&C
� �:�fl%�
�GJ%!16-=U%!24:J%!8-=U%!24:�J%!16>U%!16�J%!24=U%!16-J%!16:J%!16=U%!16
��J%!8<U%!8�J%!8=U%!8
� �:ș&400C5,,J%:U%!28=c_%
��:�
�-��mJ:�A%:�Yl%256:�A%=0�256�4:Yl%!A%=0:�:�
�3��du(aa%,r$):Yl%=-1:ș&400D9,,r$:�hu:ș&400DA:�
�$��i(W%,Iy%,A$,uJ%):$Iy%=A$:�uJ%�
�=!U%=W%:ș&400CB,,U%:ș&400D1,-1,U%!4,U%!16,U%!&C,U%!16+44
��:�
� ��V(B%,F%):ș&400F3,,B%,F%:�
�9ݤJ(r$,W%,H%):�F%:ș&40081,,r$,16*W%,16*H%,0,0�F%:=F%
���Q(H%):ș&40082,H%:�
�*��oy(�X%,�Y%):ș&40088,,X%,Y%�,X%,Y%:�
ٻ��L(cy%,W$,_u%,_%,Q%):�O_%,jy%,B_%,`y%,AJ%:ș&4008A,cy%:ș&40097,,W$�,O_%,jy%,B_%,`y%:ș&40088,,O_%,jy%�,O_%,jy%:ș&40088,,B_%,`y%�,B_%,`y%:AJ%=B_%+O_%:�_u%=0�_%-=AJ%/2��_u%>0�_%-=AJ%
�A�S(_%,Q%-`y%+jy%,AJ%,`y%-jy%)�ș&40086,cy%,W$,1<<4,_%,Q%-`y%
��
���ey(cy%,W$,Ja%,wi%,_%,Q%,g%):�O_%,jy%,B_%,`y%,AJ%:!J%=0:J%!4=-g%<<16:J%!8=g%<<16:J%!&C=0:J%!16=0:J%!20=0:ș&4008A,cy%:ș&40097,,W$�,O_%,jy%,B_%,`y%:ș&40088,,O_%,jy%�,jy%,O_%:ș&40088,,B_%,`y%�,`y%,B_%:�Ja%=0�_%-=g%*B_%/2��Ja%=g%�_%-=g%*B_%
�,�wi%=0�Q%+=g%*`y%/2��wi%=-g%�Q%-=wi%*`y%
�.ș&40086,cy%,W$,(1<<4)+(1<<6),_%,Q%,0,J%:�
�-��r(lu%,W$,a%,K%,s%,b%):�S(a%,K%,s%,b%)�
��A%,cy%,O_%,jy%,B_%,`y%,AJ%,fi%,Xl%,Dl%:ș&4008A,lu%:cy%=lu%:ș&40097,lu%,W$�,O_%,jy%,B_%,`y%:ș&40088,,B_%+O_%,`y%+jy%�,AJ%,fi%:�AJ%>s%�
�ș&40083,lu%,J%�,,Xl%,Dl%:ȕAJ%>s%:Xl%=Xl%*0.95:Dl%=Dl%*0.95:ș&40081,,J%,Xl%,Dl%:ș&40097,,W$�cy%,O_%,jy%,B_%,`y%:ș&40088,,B_%+O_%,`y%+jy%�,AJ%,fi%:�AJ%>s%�ș&40082,cy%
��
�4�:ș&40086,,W$,1<<4,a%,K%:�cy%<>lu%�ș&40082,cy%
��:�
�3��T(sl%,Cl%,R_%,H_%,g%,Ra%):ș&400E6,Cl%:ȎRa%�
�i�1:ȓȐR_%,H_%,g%:ș&400E6,sl%:�R_%,H_%:�BYg%,0:�&B1,-g%,g%:ș&400E6,Cl%:�R_%,H_%:�BYg%,0:�&A1,-g%,g%
�o�2:ȓȐR_%,H_%,-g%,g%:ș&400E6,sl%:�R_%,H_%:�BY0,g%:�&B1,-g%,-g%:ș&400E6,Cl%:�R_%,H_%:�BY0,g%:�&A1,-g%,-g%
�l�3:ȓȐR_%,H_%,-g%:ș&400E6,sl%:�R_%,H_%:�BY-g%,0:�&B1,g%,-g%:ș&400E6,Cl%:�R_%,H_%:�BY-g%,0:�&A1,g%,-g%
�o�4:ȓȐR_%,H_%,g%,-g%:ș&400E6,sl%:�R_%-2,H_%:�BY0,-g%:�&B1,g%,g%:ș&400E6,Cl%:�R_%,H_%:�BY0,-g%:�&A1,g%,g%
��:�
����l(_%,Q%,s%,b%,g%):�_%+g%,Q%:�BYs%-2*g%,0:�BYg%,-g%:�BY0,-b%+2*g%:�BY-g%,-g%:�BY-s%+2*g%,0:�BY-g%,g%:�BY0,b%-2*g%:�_%+g%,Q%-g%:�BY0,g%:�&A1,-g%,-g%:�_%+s%-g%,Q%-g%:�BYg%,0:�&A1,-g%,g%:�_%+s%-g%,Q%-b%+g%:�BY0,-g%
�5�&A1,g%,g%:�_%+g%,Q%-b%+g%:�BY-g%,0:�&A1,g%,-g%:�
�
��YJ:�
���yu:ȎFi%�
��3:�__(rJ%)
��:�
� ��c:rJ%=-1:Fi%=-1:�Pu%�
� rJ%=�cy(qJ%):�rJ%<>-1�Fi%=3
���xJ
��:�
���C_(Xu%):ȎZ%(Xu%)�
�
�2:�su
�
�3:�mu
��:�
�'��ny(h%,a%,K%):ș&400E6,0:ȎZ%(t%)�
��2:�i_(v%,h%,a%,K%)
��5:�ZJ(v%,h%,a%,K%)
��1:�SJ(v%,h%,a%,K%)
��3:�Uu(v%,h%,a%,K%)
��:�
�ݤyy(w%,Cy%):ȎZ%(t%)�
�2:k%=�W_(w%,Cy%)
�5:k%=�P_(w%,Cy%)
�1:k%=�fy(w%,Cy%)
�3:k%=�zy(w%,Cy%)
�:=k%
��cu(p%,A%):ȎZ%(A%)�
�2:�s_(p%,A%)
�5:�NJ(p%,A%)
�1:�n_(p%,A%)
�3:�x_(p%,A%)
�:�
ݤKy(S%):�ou%:ȎZ%(S%)�
�2:ou%=�ay
�5:ou%=�_y
�1:ou%=�M_
�3:ou%=�qy
�:=ou%
��by(Xu%):ȎZ%(Xu%)�
�2:�A_
�3:�pJ
�:�
'��hy(n%,h%,_%,Q%,o_%,wJ%):ȎZ%(t%)�
�2:�ru(n%,h%,_%,Q%,o_%,wJ%)
�5:�f_(n%,h%,_%,Q%,o_%,wJ%)
�1:�Qu(n%,h%,_%,Q%,o_%,wJ%)
�3:�a_(n%,h%,_%,Q%,o_%,wJ%)
�:�
��X_(l%):ȎZ%(t%)�
�2:�v(l%)
�5:�Hy(l%)
�1:�Ny(l%)
�3:�Xy(l%)
�:�
!$��DJ(e%,w%,n%,Xy%,Ty%):ȎZ%(t%)�
" �2:�Zl(e%,w%,n%,Xy%,Ty%)
#�:�
$'ݤC_(e%,w%,Cy%):�A%:�A%=1�iy%:�k%�
%
ȎZ%(A%)�
&�2:k%=�Hy(e%,w%,Cy%)
'�5:k%=�Uy(e%,w%,Cy%)
(�1:k%=�Ly(e%,w%,Cy%)
)�3:k%=�dy(e%,w%,Cy%)
*�
+ �:�:=k%
,��IJ:�Du:�Mu:�qu:�uJ:�
- ��dJ:�A%:�A%=1�iy%:ȎZ%(A%)�
.�2:�m_(A%)
/�5:�Wu(A%)
0�1:�CJ(A%)
1�3:�O_(A%)
2 �:�:�
3��Ou:�LJ:�fu:�lJ:�
4r��Ku(z%):�#z%,"Address book":�uu(z%):�#z%,"Anniversary":�sJ(z%):�#z%,"Calendar":�e_(z%):�#z%,"Diary":�Au(z%):�
5��QJ(Ay$,z%):ȎAy$�
6�"Address book":�vu(z%)
7�"Anniversary":�Su(z%)
8�"Calendar":�qJ(z%)
9�"Diary":�bJ(z%)
:�:�
; ��aJ(e%,w%,n%,_%,Q%):Ȏe%�
< �A%(2):�`u(e%,w%,n%,_%,Q%)
= �A%(3):�_J(e%,w%,n%,_%,Q%)
> �A%(4):�xu(e%,w%,n%,_%,Q%)
? �A%(5):�Ju(e%,w%,n%,_%,Q%)
@�:�
AݤF_(e%,w%,Cy%):Ȏe%�
B �A%(2):k%=�ry(e%,w%,Cy%)
C�:=�
D��UJ(p%):ȎYy%�
E�A%(2):�b_(p%,Yy%)
F�A%(3):�l_(p%,Yy%)
G�A%(4):�GJ(p%,Yy%)
H�A%(5):�iJ(p%,Yy%)
I�:�
J6��Bu:�R_(A%(2)):�fJ(A%(3)):�Ru(A%(4)):�nu(A%(5)):�
K6��Tu:�y_(A%(2)):�j_(A%(3)):�KJ(A%(4)):�bu(A%(5)):�
L��rJ(My%,p%):ȎZ%(t%)�
M�3:�iy(My%,p%)
N�:�
O���Du:YJ%=�C("Paste","Paste",1,&A):zy%=-1:P$="":Q$="mailto:":X$="http://":H$="Important numbers":jJ%=-1:uu%=�C("Import","Import",1,5):f_%=�C("ABM","ABM",1,6):�z(f_%,3,YJ%):F$="":wy%=0:OJ%=0:a_%=-1:Y$="":ku%=0:pu%=0:gJ%=0:F_%=16:Qy%=3::::q_%=2:y_%=-1
P��M%(26),F%(26),A$(&A,&E),Z$(F_%-1,1),L%(&A,1),il%&B,N%(&E):N%()=7:N%(0)=5:L%()=-1:$il%="Pptr_hyper"+�0:M%(0)=1:uy%=0:z$=T$+"Addresses":e$=T$+"Important":�
Q ݤay=f_%
RE��m_(A%):B%(A%)=0:W%(A%)=26:S%(A%)=0:M$(A%)=�A("AddTab"):�z_:�a:�
S-��A_:�v%=0��D_(i%,`%,dy%,-o%-j_%,Vy%,�,�)
T�
U��su:�sy:�z_%=0��Yy
V�
W���i_(v%,h%,a%,K%):�Jl%,A%,A$,G%,Zy%,F%,Q%,_%,B%,C%,y%,yJ%,D%,E%,Ou%,Gi%,RJ%,JJ%:JJ%=�a((m%-(Qy%+2)*24)/Qy%):Jl%=�J("Homerton.Medium",&A,&A):Zy%=j_%:ș&400E6,7:ș&400F3,,0,7:�(h%=0)�v%>0��R(0,a%,K%)
X_%=a%+h%*(j%-40):�h%=0�
YWA%=0:ȕA%<v%:ș&400E6,7:�_%,K%-Zy%*(A%+1),_%+40,K%-Zy%*(A%+1):�M%(A%)=0�Ry%=2�Ry%=5
Z,ș&400F3,,0,Ry%:�A%=0�A$="+"�A$=�(64+A%)
[dș&40086,Jl%,A$,1<<4,_%+&C,K%-Zy%*A%-Zy%+&A:A%+=1:�:�v%>0�ș&400E6,7:�_%+40,K%,_%+40,K%-Zy%*(v%)
\$�:A%=v%:�A%=0�A$="+"�A$=�(64+A%)
]�ș&400E6,7:�_%+40,K%-Zy%*(A%+1):�BY-40,0:�_%,K%-m%:ș&40086,Jl%,A$,1<<4,_%+&C,K%-Zy%*A%-Zy%+&A:A%+=1:ȕA%<27:ș&400E6,7:�_%,K%-Zy%*(A%+1),_%+40,K%-Zy%*(A%+1):�M%(A%)=0�Ry%=2�Ry%=5
^,ș&400F3,,0,Ry%:�A%=0�A$="+"�A$=�(64+A%)
_Eș&40086,Jl%,A$,1<<4,_%+&C,K%-Zy%*A%-Zy%+&A:�M%(A%)>0�A%>v%�F%=-1
` A%+=1:�
a0�:�h%=1�(F%�M%(v%)-uy%>2*Qy%)��R(1,_%-j%,K%)
b �v%<>0�
c!�h%=0�(h%=1�uy%+Qy%<=M%(v%))�
d�Ou%=�J("Trinity.Bold",&E,&E):A%=uy%+h%*Qy%:_%=a%-(40*(h%=0))+&c:ȕA%<M%(v%)�B%<Qy%:Q%=K%-24*(B%+1)-JJ%*B%:�S(_%,Q%,dJ%,-JJ%)�
eUș&400E6,4:�l(_%,Q%,dJ%,JJ%,&c):y%=A%�(Qy%*2):A$="":�A$(y%,1)<>""�A$=A$(y%,1)+" "
flA$+=A$(y%,0):�V(0,N%(1)):�r(Ou%,A$,_%+&C,Q%-40,dJ%-&C,40):D%=0:�C%=2�&E:D%-=(A$(y%,C%)<>""):�:�D%<5�D%=5
g5Zy%=�a((JJ%-48)/D%):C%=Zy%/3:�Zy%>30�Zy%=30:C%=&C
h�Gi%=�J("Homerton.Medium.Oblique",C%-2,C%-2):RJ%=�J("Trinity.Medium",C%,C%):G%=1:�C%=2�8:�A$(y%,C%)<>""�G%+=1:�V(0,N%(C%)):�r(RJ%,A$(y%,C%),_%+48,Q%-42-Zy%*(G%-1),dJ%-48,Zy%)
i,�:Q%-=JJ%-&E:�C%=&E�9�-1:�A$(y%,C%)<>""�
j�A$=�A("Fld"+�(C%-8))+":":ș&400F3,,0,N%(0):ș&4008A,Gi%:ș&40097,,A$�,D%,,F%:ș&40088,,F%-D%�,D%:ș&40086,,A$,1<<4,_%+92-D%,Q%-4:ș&400F3,,0,N%(C%):�r(RJ%,A$(y%,C%),_%+&64,Q%-4,dJ%-&64,Zy%+4):Q%+=Zy%:�C%>=&D��r_(y%,C%,_%+&64,Q%-4,dJ%-&64,Zy%+4)
k�:�:�Q(RJ%):�Q(Gi%)
l�:A%+=1:B%+=1:�:�Q(Ou%)
m�
n �:�h%=0�
o�Ou%=�J("Trinity.Bold",16,16):ș&400E6,4:�V(0,7):y%=j%-2*&c:�l(_%+&c,K%-24,y%,m%-2*24,2*&c):�L(Ou%,H$,0,a%+j%/2,K%-24-&C):�Q(Ou%):yJ%=&E:RJ%=�J("Trinity.Medium",yJ%,yJ%):Zy%=(m%-2*24-68-2*&c)/F_%:Q%=K%-24-68:_%=a%+&c:ș&400E6,1
p��_%+48,Q%-Zy%*F_%,_%+y%-48,Q%-Zy%*F_%:�A%=0�F_%-1:ș&4008A,RJ%:ș&400E6,1:�_%+48,Q%-Zy%*A%,_%+y%-48,Q%-Zy%*A%:�S(_%,Q%-Zy%*A%,y%,-Zy%)�Z$(A%,0)+Z$(A%,1)<>""�
q�ș&40097,,Z$(A%,0)+" "�,B%,C%,D%,E%:B%=D%-B%:�oy(B%,E%):ș&40097,,Z$(A%,1)�,C%,F%,D%:C%=D%-C%:�oy(C%,F%):�B%+C%>y%-24�E%-F%>Zy%�
rJ�Zy%/(E%-F%)<(y%-24)/(B%+C%)�F%=yJ%*Zy%/(E%-F%)�F%=yJ%*(y%-24)/(B%+C%)
s;C%=C%*F%/yJ%:E%=E%*F%/yJ%:F%=�J("Trinity.Medium",F%,F%)
t �F%=RJ%
u��:ș&40086,,Z$(A%,0),1<<4,_%+&C,Q%-Zy%*(A%+0.5)-E%/2:ș&40086,,Z$(A%,1),1<<4,_%+y%-C%-&C,Q%-Zy%*(A%+0.5)-E%/2:�F%<>RJ%��Q(F%)
v�:�
w�
x�:�Q(Jl%):�
y%��s_(p%,Oi%):�A%,B%:B%=wy%:Ȏ!p%�
z;�0:�A%=9�23:�A(`%,A%,A$(B%,A%-9)):�:�_(`%,25,0):�N(0,0)
{H�1:�A%=9�23:�A(`%,A%,A$(B%,A%-9)):�:F$="":wy%=-1:�N(0,0):�_(`%,25,1)
|�2:�qy:�M%(v%)>0�
}�M%(v%)<=uy%�uy%-=2*Qy%
~�N(v%,uy%):uJ%=�
��N(0,0)
��
��3:�p%!4>=0�q_%=p%!4
�
�v%=0�
�$�A%=0�&E:A$(B%,A%)=�Z(`%,A%+9):�
� �:Ȏq_%�
� �0:�q(A$(B%,1)+" "+A$(B%,0))
� �1:�A%=2�8:�q(A$(B%,A%)):�
�8�2:�q(A$(B%,1)+" "+A$(B%,0)):�A%=2�8:�q(A$(B%,A%)):�
�9�9:�q(A$(B%,1)+" "+A$(B%,0)):�A%=2�&E:�q(A$(B%,A%)):�
��q(A$(B%,q_%+6))
��
� �4:�Gy(X$+A$(wy%,&E)):jJ%=1
� �5:�Gy(Q$+A$(wy%,&D)):jJ%=2
��:�
�l��gy:�A%:A%=(wy%<0):�B%=0�3:�K(f_%,B%,A%):�:�A%=0�9:�J(YJ%,A%,q_%=A%):�:�B%=4�5:�K(f_%,B%,1):�:�wy%<>-1�
� �t("Alias$URLOpen_HTTP")�
��K(f_%,4,A$(wy%,&E)="")
�"�:�t("Alias$URLOpen_MailTo")�
��K(f_%,5,A$(wy%,&D)="")
��
� ��K(f_%,4,1):�K(f_%,5,1)
��:�
���v(l%)�A%:A%=v%:�l%=1�
��M%(v%)<=uy%+Qy%*2�
�-�A%+=1:�A%>26�M%(A%�27)>0:�A%<27��N(A%,0)
���N(v%,uy%+Qy%*2)
��
��:�uy%=0�v%>0�
�7�A%-=1:�M%(A%)>0:�N(A%,M%(A%)-1-(M%(A%)-1)�(Qy%*2))
���v%>0��N(v%,uy%-Qy%*2)
��:�v%=0��N(0,0)
��:�
�U��ru(n%,h%,_%,Q%,o_%,wJ%):�y%,A%,B%,X%,Y%,JJ%:JJ%=�a((m%-(Qy%+2)*24)/Qy%):�h%<>0�
�X%=&c:�_%>j%-40�n%<>2�
� y%=-Q%�j_%:�y%<27�y%>v%�
� �v%=0�Y$=F$:ku%=wy%:pu%=OJ%
��M%(y%)>0��N(y%,0)
��
��
� �:X%=&c+40:�_%<40�n%<>2�
�y%=-Q%�j_%:�y%<v%�
� �y%=0�F$=Y$:wy%=ku%:OJ%=pu%
��M%(y%)>0��N(y%,0)
��
��
� �:�v%>0�
�pA%=0:B%=-1:Y%=-24:h%=�(h%):F$="":wy%=-1:ȕA%<Qy%�A%+uy%+Qy%*h%<M%(v%):�r(_%,Q%,X%,Y%,dJ%,-JJ%)�B%=A%+Qy%*h%
� Y%-=JJ%+24:A%+=1:�:�B%>=0�
�:F$=�s(A$(B%,0)+" "+A$(B%,1)):wy%=B%:OJ%=B%+uy%:�n%<>2�
�8�A%=9�23:�A(`%,A%,A$(B%,A%-9)):�:�_(`%,25,0):�N(0,0)
��
��
���h%=0�n%<>2�
�CZy%=(m%-2*24-68-2*&c)/F_%:Y%=-(Q%+24+68-Zy%)/Zy%:�Y%>0�Y%<=F_%�
�hgJ%=Y%:�A(G_%,3,Z$(Y%-1,0)):�A(G_%,4,Z$(Y%-1,1)):ȗX%,Y%,A%:ș&400D4,,G_%,o_%+GJ%,Y%:�M(G_%,3):QJ%=�
��
��
��:�n%=2��gy
��
� ��Zl(e%,w%,n%,_%,Q%):Ȏe%�
��`%:�n%<>2�
� Ȏw%�
��24:�j(�):�a
��25:�qy:�a:�M(`%,9)
��26:�a:�M(`%,9)
�#�-1,0,1,2,3,4,5,6,7,8:�M(i%,-1)
��
�!��gy:�C(f_%,Xy%-64,Ty%,e%,w%)
��
��G_%:Ȏw%�
�
�5:�cy
��6:ș&400D4,,-1:gJ%=0
�*�7:�A(G_%,3,""):�A(G_%,4,""):�M(G_%,3)
��
��:�
� ݤW_(w%,Cy%):k%=�:ȎCy%�
��414:�v(-a_%)
��415:�v(a_%)
�/�43,461:�v%>0�F$=Y$:wy%=ku%:OJ%=pu%:�N(0,0)
�.:�Cy%>=97�Cy%<=&7A�L%=Cy%-32-64�L%=Cy%-64
��L%>0�L%<28�
� �v%=0�Y$=F$:ku%=wy%:pu%=OJ%
��M%(L%)>0��N(L%,0)
� �k%=�
��
� �:=k%
� ݤHy(e%,w%,Cy%):k%=�:Ȏe%�
��`%:ȎCy%�
��398,&D,394:�w%=23�
�Ȏ��
��Cy%=&D���-2:�j(�):�a
��Cy%=&D��-2:�M(`%,20)
�
�M(`%,9)
��
���M(`%,w%+1)
��
�$�399:�w%=9��M(`%,23)��M(`%,w%-1)
��414:�-1�
� Ȏw%�
�$�9,&A,18,19,20,21,22:�M(`%,w%+1)
��23:�M(`%,9)
��M(`%,18)
��
�
��v(-a_%)
��
��415:�-1�
� Ȏw%�
�"�&A,&B,19,20,21,23:�M(`%,w%-1)
��9:�M(`%,23)
��M(`%,&B)
��
� ��v(a_%)
��
��461:�j(�):�a
��83-64:�M(`%,9)
��70-64:�M(`%,&A)
��65-64:�M(`%,&B)
��84-64:�M(`%,18)
�#�88-64:�wy%<>-1��qy:�a:�M(`%,9)
��69-64:�M(`%,22)
��87-64:�M(`%,23)
� k%=�
��
��G_%:ȎCy%�
��398,399:�M(G_%,7-w%)
��&D:�w%=3��M(G_%,4)��cy
� k%=�
��
k%=�
�:=k%
^��uu(z%):�A%:�#z%,H$:�#z%,Qy%:�#z%,q_%:�#z%,a_%+5:�#z%,Q$:�#z%,X$:�A%=0�&E:�#z%,N%(A%):�:�
^��vu(z%):�A%:H$=�#z%:Qy%=�#z%:q_%=�#z%:a_%=�#z%-5:Q$=�#z%:X$=�#z%:�A%=0�&E:N%(A%)=�#z%:�:�
"��`u(s%,Sy%,p%,_%,Q%):�A%:Ȏ��
'�Sy%>=3�Sy%<=&D:�n%<>2��Z(s%,Sy%,1)
;�Sy%=9:�A%=0�9:�J(YJ%,A%,q_%=A%):�:�C(YJ%,_%,Q%,s%,Sy%)
M�Sy%>=22�Sy%<=36:�A%=0�&E:�J(By%,A%,�q(s%,Sy%)=A%):�:�C(By%,_%,Q%,s%,Sy%)
�:�
(ݤry(s%,Sy%,qa%):�ju%,c%:k%=�:ȎSy%�
�1:c%=17:ju%=18
�17:c%=18:ju%=1
�18:c%=1:ju%=17
�:Ȏqa%�
%�&D,394,398:�c%<>0��M(s%,c%):k%=�
�399:�ju%<>0��M(s%,ju%):k%=�
�:=�
��b_(p%,s%):�A%:Ȏ__%�
?�8:q_%=!p%:�A%=0�9:�J(YJ%,A%,q_%=A%):�:�A(s%,8,�W(YJ%,!p%))
0�A%=0�&F:�J(By%,A%,!p%=A%):�:�U(s%,__%,!p%)
�:�
���R_(s%):�A%:�A(s%,1,H$):�A%=1�5:�Z(s%,A%+2,-(Qy%=A%)):�:�A(s%,8,�W(YJ%,q_%)):�A(s%,17,X$):�A(s%,18,Q$):�Z(s%,&C,-(a_%=-1)):�Z(s%,&D,-(a_%=1)):�A%=0�&E:�U(s%,A%+22,N%(A%)):�:�
\��y_(s%):�A%,B%:H$=�Z(s%,1):X$=�Z(s%,17):Q$=�Z(s%,18):B%=Qy%:�A%=1�5:�M(s%,A%+2)�Qy%=A%
�:�A%<>B%�t%=�P(2)��N(v%,0)
�M(s%,&C)�a_%=-1�a_%=1
$�A%=0�&E:N%(A%)=�q(s%,A%+22):�:�
)��N(y%,iu%):�v%=0�y%<>0��M(i%,-1):�Yy
(�y%=0��D_(i%,`%,dy%,-o%-j_%,Vy%,�,�)
py%=0:�y%<v%py%=-1
�y%>v%py%=1
�py%=0�
uJ%=iu%<>uy%:�iu%<uy%�py%=-1
�iu%>uy%�py%=1
!*�:v%=y%:uy%=iu%:�sy:�y%<>0��XJ(y%,iu%)
"�
#���cy�Zy%,Y%:Z$(gJ%-1,0)=�Z(G_%,3):Z$(gJ%-1,1)=�Z(G_%,4):Zy%=(m%-2*24-68-2*&c)/F_%:Y%=o%+24+68+Zy%*(gJ%-1):�D(i%,yy%+&C,-Y%,GJ%-&C,-Y%-Zy%):ey%=�:笤Gy�ș&400D4,,-1:gJ%=0
$�
%=��a�A%:�A%=9�23:�A(`%,A%,""):�:F$="":wy%=-1:�_(`%,25,1):�
&M��qy:�_y%:�Z_:_y%=�_(F$)-64:M%(_y%)-=1:F$="":wy%=-1:�M%(_y%)=0�F%(_y%)=-1
'm�D(i%,dy%+j%-40,-o%-j_%*_y%,dy%+j%,-o%-j_%*(_y%+1)):�D(i%,yy%,-o%-j_%*_y%,yy%+40,-o%-j_%*(_y%+1)):ey%=�:�
(a��Z_:�B%,L%,A%:B%=y_%:L%=�_(F$)-64:B%=F%(L%):A%=OJ%:ȕA%>0:B%=B%!4:A%-=1:�:�OJ%=0�F%(L%)=B%!4
)�B%!4<>-1�!(B%!4)=!B%
*"�!B%=-1�y_%=B%!4�!(!B%+4)=B%!4
+�Dy(w_%,B%,�):�
,o��j(Ha%):�O%,L%,L$:L$=�v(�Z(`%,9)+" "+�Z(`%,&A)):L%=�_(L$)-64:M%(L%)+=1:�F$=""�O%=L%�O%=�_(F$)-64:M%(O%)-=1
-�wy%<0��G_��Z_:�G_
. F$="":wy%=-1:�Ha%��Fu(L$)
/ ey%=�:�
0t��Fu(A$):�B%,A%,P%:P%=�_(A$)-64:B%=F%(P%):ȕ�s(�T(B%,0)+" "+�T(B%,1))<>L$:B%=B%!4:A%+=1:�:�N(P%,A%-A%�(2*Qy%)):�
1���G_:�A%,B%,C%,S%:S%=&C:�A%=9�23:S%+=��Z(`%,A%)+1:�:C%=�w(w_%,S%,�):B%=y_%:C%!8=S%:S%=C%+&C:�A%=9�23:$(S%)=�Z(`%,A%)+�&A:S%+=�($S%):�:A%=�_(�Z(`%,9)+" "+�Z(`%,&A))-64:�F%(A%)=-1�F%(A%)=C%:A%-=1
2 �B%<>-1�
32ȕF%(A%)=-1�A%>1:A%-=1:�:�F%(A%)<>-1�B%=F%(A%)
4Uȕ�v(�T(B%,0)+" "+�T(B%,1))<L$�B%!4<>-1:B%=B%!4:�:�v(�T(B%,0)+" "+�T(B%,1))>=L$�
5�F%(A%)=B%�F%(A%)=C%
66!C%=!B%:C%!4=B%:!B%=C%:�!C%<>-1�!(!C%+4)=C%�y_%=C%
7 �:B%!4=C%:!C%=B%:C%!4=-1
8�
9$�y_%=C%:!C%=-1:C%!4=-1:F%(A%)=C%
:�:�
;)ݤ_(A$):�B%:B%=�(�v(A$)):�B%<65�B%=65
<=B%
=fݤv(A$):�B%:A$=�s(A$):B%=��A$,1):ȕ�(B%>47�B%<58)��(B%>64�B%<91)�A$<>"":A$=�A$,2):B%=��A$,1):�:=A$
>���ty(l%,y%):�A%:_y%=j%-40:y%!8=!y%+_y%:y%!48=y%!40+_y%:y%+=88+8:�A%=&B�17:y%!(A%*32)=_y%-16:�:�A%=8�23:A%-=7*(A%=&B):y%!(A%*32)=_y%:�:y%!(24*32-8)=(_y%-384)/4:y%!(24*32)=y%!(24*32-8)+&80
?�y%!(25*32-8)=y%!(24*32)+(_y%-384)/4:y%!(25*32)=y%!(25*32-8)+&80:y%!(26*32-8)=y%!(25*32)+(_y%-384)/4:y%!(26*32)=y%!(26*32-8)+&80:�
@k��z_:�A%,B%,C%,S%,z%,L%:�A%=0�26:M%(A%)=0:F%(A%)=-1:�:M%(0)=1:C%=-1:y_%=-1:F_%=16:z%=�(z$):�lJ%�z%<>0�
A;ȕ��#z%:S%=��#z%:B%=�w(w_%,S%,�):�C%<>-1�C%!4=B%�y_%=B%
Bg!B%=C%:B%!8=S%:ș&C,4,z%,B%+&C,S%-&C:L%=�_(�T(B%,0)+" "+�T(B%,1))-64:M%(L%)+=1:�F%(L%)=-1�F%(L%)=B%
CC%=B%:�s_%��d(�1)
D�:�y_%<>-1�B%!4=-1
E�#z%
F�:z%=�e$:�lJ%�z%<>0�
G<F_%=��#z%:�B%=0�F_%-1:Z$(B%,0)=�#z%:Z$(B%,1)=�#z%:�:�#z%
H�:�
I���LJ:�z%,B%,S%,A%:z%=�z$:B%=y_%:ȕB%<>-1:�#z%,�B%!8:ș&C,2,z%,B%+&C,B%!8 -&C:B%=B%!4:�:�#z%:z%=�e$:�#z%,�F_%:�A%=0�F_%-1:�#z%,Z$(A%,0)+�&A+Z$(A%,1):�:�#z%:z%=0:�
J��XJ(_y%,ki%):�_y%>0�
K��A%,B%,C%,F%:B%=F%(_y%):ȕki%>0:B%=B%!4:ki%-=1:�:��C%=0�&E:A$(A%,C%)=�T(B%,C%):�:A%+=1:F%=(A%>Qy%*2-1)�B%!4=-1:B%=B%!4:�F%�F%=(�_(�T(B%,0)+" "+�T(B%,1))-64<>_y%)
L�F%
M�:�
N_ݤT(B%,L%):�A$:B%+=&C:ȕL%>0:ȕ?B%<>&A:B%+=1:�:B%+=1:L%-=1:�:ȕ?B%<>&A:A$+=�?B%:B%+=1:�:=A$
Oi��RJ(S$):�t$,A%,B%,S%,I%,xa%,ea%,Wa%,kl%:pJ%=0:nJ%=0:z%=�S$:ȕ��#z%:t$=�#z%:A%=�J_(t$):�A%>nJ%�nJ%=A%
P pJ%+=1:�:�#z%:z%=0:�nJ%>0�
Q�ș&400D9,,J$+".Resources.Default.Templates":ș&400DB,,,0,0,0,"Import"�,Wa%,kl%:ș30,6,,,Wa%�,,zl%;xa%:ș30,6,,,kl%�,,tl%;ea%:ș&400DB,,zl%,tl%,tl%+kl%,Yl%,"Import",0:ș&400C1,,zl%�zy%:ș&400DA:P$=S$
R<B%=1:�A%=&A�52�3:�A(zy%,A%,�B%):�B%>0�B%+=1:�B%>nJ%�B%=0
S@�:�A(zy%,54,�A("Import1")):�A(zy%,55,�A("Import1")):�f(S$,1)
T�P$="":�B(�A("ErrCSV"))
U�:�
V0��Cy:pJ%=0:nJ%=0:�P$<>""��"Remove "+P$:P$=""
W
�zy%<>-1�
X7!U%=zy%:zy%=-1:ș&400C3,,U%:ș30,7,,zl%:ș30,7,,tl%
Y�:�
Zx��f(S$,Kl%):�A%,B%,S%,m$,h_%:m$=�sy(S$,Kl%):F$="":wy%=-1:�_(`%,25,1):�A%=9�23:B%=&A+(A%-9)*3:h_%=��Z(zy%,B%):�B%<&E�
[!S%=�k(uu%,�Z(zy%,55+(B%=&A)))
\ �S%=0
]
�:�h_%>0�
^ �A(`%,A%,�ey(m$,h_%,S%))
_��A(`%,A%,"")
`*�:�:�A(zy%,59,�Kl%):�Vy%��w(i%,-1,-1)
a<V_%=t%:z_%=v%:t%=�P(2):�N(0,0):�V_%<>t%�z_%<>v%�py%=0:�O
b�w(zy%,-1,0):�
cBݤsy(S$,Kl%):�A$:z%=�S$:ȕKl%>0:A$=�#z%:Kl%-=1:�:�#z%:z%=0:=A$
dCݤey(A$,h_%,wa%):�CJ%,B%,Z$,Il%:ȕh_%>1�A$<>"":�A$=34�CJ%=�CJ%
e�A$=44��CJ%�h_%-=1
f'A$=�A$,2):�:�A$=34�CJ%=�:A$=�A$,2)
g$ȕ�Il%:�A$=34�A$=""�CJ%=�:Il%=�
h�A$=44��CJ%�Il%=�
i �Il%�Z$+=�A$,1):A$=�A$,2)
j �:Ȏwa%�
k�1:Z$=�Z$,�Z$," ")-1)
l�2:Z$=�Z$,�Z$," ")+1)
m�3:�Z$," ")>0�
n-B%=�Z$:�B%-=1:��Z$,B%,1)=" ":Z$=�Z$,B%-1)
o
�Z$=""
p�
q&�4:ȕ�Z$," "):Z$=�Z$,�Z$," ")+1):�
r �:=Z$
s/ݤJ_(A$):�Ci%,CJ%:ȕA$<>"":�A$=34�CJ%=�CJ%
t�A$=44��CJ%�Ci%+=1
u A$=�A$,2):�:=Ci%-(Ci%>0)
v&��h_(e%,w%,n%,Xy%,Ty%):�A%,B%:Ȏ��
wL�w%=58�w%=60:A%=��Z(e%,59)-(w%-59):�A%>0�A%<=pJ%��A(e%,59,�A%):�f(P$,A%)
xW�w%>=9�w%<=53:B%=&A+3*((w%-9)�3):A%=��Z(e%,B%)+(w%-B%)*(1+2*(n%=1)):�A%>=0�A%<=nJ%�
y#�A(e%,B%,�A%):�f(P$,��Z(e%,59))
z�
{&�w%=54�w%=55:�C(uu%,Xy%,Ty%,e%,w%)
|H�w%=66:�j(�):A%=��Z(zy%,59)+1:�A%>0�A%<=pJ%��A(zy%,59,�A%):�f(P$,A%)
}J�w%=67:�:�j(�):A%=��Z(zy%,59)+1:�A%>0�A%<=pJ%��A(zy%,59,�A%):�f(P$,A%)
~ �A%>pJ%
�w%=68:�Cy
��:�
�:��PJ(w%,I%):�A(zy%,w%,�W(uu%,I%)):�f(P$,��Z(zy%,59)):�
�V��r_(y%,ll%,_%,Q%,s%,b%):!J%=i%:�L%(y%,ll%-&D)<>-1�J%!4=L%(y%,ll%-&D):ș&400C4,,J%
��ș&400CB,,J%:Q%-=8:b%-=8:J%!4=_%-J%!4:J%!8=Q%-J%!16-b%:J%!&C=J%!4+s%:J%!16=J%!8+b%:J%!20=&7003119:J%!24=Ol%:J%!28=il%:J%!32=0:ș&400C2,,J%�L%(y%,ll%-&D):�
�V��sy:�y%,Py%:!J%=i%:�y%=0�&A:�Py%=0�1:�L%(y%,Py%)<>-1�J%!4=L%(y%,Py%):ș&400C4,,J%
��,:L%()=-1:�
�O��o_(w%):�y%,Py%,Ba%,Hi%,A$:�y%=0�&A:�Py%=0�1:�L%(y%,Py%)=w%�Ba%=y%:Hi%=Py%
�%�,:�Hi%=0�A$=Q$:jJ%=2�A$=X$:jJ%=1
� �Gy(A$+A$(Ba%,Hi%+&D)):�
�I��Gy(i$):!J%=256:J%!4=su%:J%!16=&4AF80:$(J%+20)=i$:ș&400E7,18,J%,0:�
�n��Mu:�C%(&C),U%(&C):Dy%=3:DJ%=&B:e_%=-1:C%()=-1:w$=T$+"Anni":`l%=0:WJ%=-1:PJ%=-1:yl%=�C("ANM","ANM",1,4):�
� ݤ_y=yl%
�B��Wu(A%):B%(A%)=1:W%(A%)=&C:S%(A%)=1:M$(A%)=�A("AnnTab"):�L_:�
����ZJ(v%,h%,a%,K%):�Jy%,Q%,r%:Jy%=(m%-Dy%*20-20)/Dy%:Q%=0:�r%=v%+Dy%*�h%�v%+Dy%*�h%+Dy%-1:Q%+=20+Jy%:�kJ(r%,a%+20,K%-Q%+Jy%,j%-40,Jy%):�:�h%=0�v%>1��R(h%,a%,K%)
��h%�r%<&C��R(h%,a%,K%)
��
���NJ(p%,Oi%):Ȏ!p%�
��0:�PJ%<>-1��p(PJ%,-1)
��1:�PJ%<>-1��p(PJ%,0)
��2:�PJ%<>-1��Uy(PJ%)
�/�3:�Wy("X�s %n%t birthday",Uy%,Ua%,Fy%,0,0)
��:�
�0��Hy(l%):v%+=l%*2*Dy%:�v%+2*Dy%>&D�v%-=2*Dy%
��v%<1�v%=1
��
�u��f_(n%,h%,_%,Q%,o_%,wJ%):�Jy%,r%:Jy%=(m%-20)/Dy%:r%=-Q%�Jy%+1:Q%+=(r%-1)*Jy%+20:�Q%>0�r%>Dy%�_%<20�_%>j%-40�r%=0
� �h%�o_%=dy%+20�o_%=yy%+20
�WwJ%=-o%-20-Jy%*(r%-1):�r%<>0��ju(r%+Dy%*�h%+v%-1,n%,_%-20,Q%,o_%,wJ%,j%-40,-Jy%+20)
��
� ݤP_(w%,Cy%):k%=�:ȎCy%�
��414:�Hy(1)
��415:�Hy(-1)
� k%=�
� �:=k%
�!ݤUy(e%,w%,Cy%):k%=�:�e%=Hy%�
�k%=�:ȎCy%�
� �394,398,399:�M(Hy%,6-w%)
��4,24:�e_%<>-1��Uy(e_%)
�
�27:�y
��&D:�w%=2�
�&�Sy(�Z(Hy%,2),d%,q%,x%)��M(Hy%,4)
���ky
��
� k%=�
��
� �:=k%
�]��fu:�B%:z%=�w$:B%=WJ%:ȕB%<>-1:�#z%,�B%!8:ș&C,2,z%,B%+&C,B%!8 -&C:B%=B%!4:�:�#z%:z%=0:�
� ��sJ(z%):�#z%,DJ%:�#z%,Dy%:�
� ��Su(z%):DJ%=�#z%:Dy%=�#z%:�
� ��_J(s%,Sy%,p%,_%,Q%):ȎSy%�
�=�1:�H(By%,0,-1):�J(By%,�q(s%,Sy%),1):�C(By%,_%,Q%,s%,Sy%)
� �2,3,4,5:�n%<>2��Z(s%,Sy%,1)
��:�
�>��l_(My%,Ya%):�U(Ya%,1,!My%):�H(By%,0,-1):�J(By%,!My%,1):�
�T��fJ(s%):�A%:�U(s%,1,DJ%):�A%=2�5:�Z(s%,A%,0):�:�Dy%<5��Z(s%,Dy%+1,1)��Z(s%,5,1)
��
�[��j_(s%):�A%,B%:B%=Dy%:DJ%=�q(s%,1):A%=2:ȕA%<5���M(s%,A%):A%+=1:�:�A%<5�Dy%=A%-1�Dy%=6
��B%<>Dy%�U%()=0
��S%(�P(5))+2*Dy%>&D�
�,�Z%(t%)=5�v%=&D-2*Dy%�S%(�P(5))=&D-2*Dy%
��:�
�N��kJ(r%,a%,K%,s%,b%):�cJ%,B%,Gy%,A%,Q%:B%=C%(r%):Gy%=28:�S(a%,K%,s%,-b%)�
�jcJ%=�J("Homerton.Bold",&C,&C):v_%=�J("Homerton.Medium",&A,&A):�V(0,7):�r%=by%�ș&400E6,!SJ%�ș&400E6,5
���l(a%,K%,s%,b%,20):�L(cJ%,�U(r%,-1),0,a%+s%/2,K%-&A):Q%=40:A%=U%(r%):ȕA%>0:B%=B%!4:A%-=1:�:ȕB%<>-1�Q%+Gy%-5<=b%:�S(a%+20,K%-Q%-25,s%-50,Gy%)�
�O�r(v_%,�`(B%,�L),a%+70,K%-Q%-20,s%-70,Gy%):�L(v_%,�(B%?&C),1,a%+60,K%-Q%-4)
�G�:Q%+=Gy%:B%=�Zy(B%,r%):�:�B%<>-1��a%+8,K%-b%+20:�BY18,0:�81,-9,-18
�,�U%(r%)<>0��a%+8,K%-60:�BY18,0:�81,-9,18
��Q(cJ%):�Q(v_%)
��:�
����ju(r%,n%,_%,Q%,a%,K%,s%,b%):�L%,A%,B%,C%,N%,Gy%,A$:Gy%=28:C%=(-Q%-70+2*Gy%)�Gy%+U%(r%):N%=-((b%+40)�Gy%):A%=0:B%=C%(r%):ȕB%<>-1:A%+=1:B%=�Zy(B%,r%):�:�L%=0�2:�K(yl%,L%,1):�:PJ%=-1:Ua%=r%:Ȏ��
�Q�_%>35�Q%<-40�_%<s%�C%>0�C%<=A%:B%=C%(r%):ȕC%>1:C%-=1:B%=�Zy(B%,r%):�:�n%=2�
�!�L%=0�2:�K(yl%,L%,0):�:PJ%=B%
���p(B%,n%=4)
��
� �n%=2
�I�_%>0�_%<30�Q%-20<b%:�U%(r%)<A%-N%�U%(r%)+=1:�D(i%,a%,K%,a%+s%,K%+b%)
�K�_%>0�_%<30�Q%>-60�Q%<=-42:�U%(r%)>0�U%(r%)-=1:�D(i%,a%,K%,a%+s%,K%+b%)
�6�n%<>2��Wy("Chris� %n%t birthday",Uy%,r%,Fy%,0,0)
��:�
�L��Y_(d%,q%,N%,n%):�B%:B%=-1:ȕN%>0:B%=�m(d%,q%,B%):N%-=1:�:�p(B%,n%=4):�
�)��p(B%,ty%):�A%,A$:�ty%�e_%=B%�e_%=-1
�`A%=B%+16:ȕ?A%<>&B:A$+=�?A%:A%+=1:�:�Wy(A$,B%?&C,(B%!&C>>8)�&F,(B%!&C>>&C)�&FFF,B%?&F,ty%):�
�_��Wy(W$,c%,r%,Q%,h_%,ty%):�A(Hy%,4,W$):�A(Hy%,2,�c%+"/"+�r%+"/"+�Q%):ol%=h_%:�h_%=0�h_%=DJ%
�J�U(Hy%,4,h_%):�_(Hy%,&D,(ty%=0)):�ty%=0�A$=�A("anset")�A$=�A("anedit")
�:�G(Hy%):�x(Hy%,�,�):�M(Hy%,2):QJ%=�:�i(Hy%,Na%,A$,0):�
�BݤZy(B%,q%):�A%,C%,c%,r%,Q%:B%=B%!4:�((B%!&C>>8)�&F)<>q%�B%=-1
�=B%
�=ݤ`(B%,Fy%):�A%,C%,c%,Q%,A$:Q%=(B%!&C>>&C)�&FFF:�Q%<=Fy%�
�bC%=B%?&F:C%-=DJ%*(C%=0):�V(0,C%):A%=B%+16:ȕ?A%<>&B:�?A%=37�A%+=1:A$+=�hy(?A%,Q%,Fy%)�A$+=�?A%
� A%+=1:�
� �:=A$
� ��tJ(w%):�c%,r%,Q%:Ȏw%�
�8�5:!J%=Hy%:ș&400CB,,J%:�C(Fl%,J%!&C+66,J%!16,e%,w%)
� �&B:�ky
�
�&C:�y
��&D:�Uy(e_%)
��:�
�+��ky:�A$,d%,q%,x%:A$=�Z(Hy%,4):�A$<>""�
� �Sy(�Z(Hy%,2),d%,q%,x%)�
��e_%<>-1��xy(e_%)
�D�HJ(A$,d%,q%,x%,ol%):U%()=0:�y:ey%=�:�Vy%�(Z%(t%)=5�Z%(t%)=3)��O
���M(Hy%,2)
��
���B(�A("ErrMes"))
��:�
�-��y:e_%=-1:�G(Hy%):�G(ay%):�Vy%��M(i%,-1)
��
�aݤSy(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%>�X(r%,Q%):�B(�O("ErrDate",äX(r%,Q%),�U(r%,-1)+�-(r%=2)," "+�Q%),"",""))
� A%=�
� �:=A%
���HJ(v$,d%,q%,x%,h_%):�gy%,Wy%,S%,B%,Oy%,T%,A_%:A_%=d%+(q%<<8)+(x%<<&C)+(h_%<<24):Oy%=�:S%=�v$+1+16:Wy%=WJ%:gy%=-1:ȕWy%<>-1��Oy%:�Ry(d%,q%,Wy%!&C)�Oy%=��gy%=Wy%:Wy%=Wy%!4
�`�:B%=�w(w_%,S%,�):!B%=gy%:B%!4=Wy%:B%!8=S%:B%!&C=A_%:$(B%+16)=v$+�&B:�gy%=-1�WJ%=B%�gy%!4=B%
��Wy%<>-1�!Wy%=B%
�#�C%(q%)=Wy%�C%(q%)=-1�C%(q%)=B%
��
�,��Uy(B%):�xy(B%):�y:ey%=�:�B%=e_%�e_%=-1
� �Vy%�(Z%(t%)=5�Z%(t%)=3)��O
��
�a��xy(B%):�gy%,Wy%,r%,Pi%:Pi%=-1:gy%=!B%:Wy%=B%!4:r%=(B%!&C>>8)�&F:U%(r%)=0:�gy%<>-1�gy%!4=Wy%
�2�Wy%<>-1�!Wy%=gy%:�((Wy%!&C>>8)�&F)=r%�Pi%=Wy%
��WJ%=B%�WJ%=Wy%
��C%(r%)=B%�C%(r%)=Pi%
��Dy(w_%,B%,�):�
�BݤRy(c%,r%,T%):�g%,Nl%,ru%:Nl%=T%�&FF:ru%=(T%>>8)�&F:�r%>=ru%�
�c%<Nl%�ru%=r%�g%=��g%=�
�g%=�
�:=g%
���xJ:�B%,Oy%,vJ%,c%,r%,mu%,fJ%,jy%,d%,q%,x%:�P(qJ%,c%,r%,mu%,fJ%,jy%):B%=C%(fJ%):d%=�I:q%=�V:x%=�L:ȕB%<>-1��Oy%��vJ%:c%=B%?&C:r%=(B%!&C>>8)�&F:�r%>q%�(r%=q%�c%>d%)�vJ%=�:�Ty
8�(r%>fJ%�(r%=fJ%�c%>mu%))��vJ%�Oy%=�:�fy(B%)�B%=B%!4
�:�Oy%��Ty
�
E��zy:�B%,c%,r%,d%,q%,x%:d%=�I:q%=�V:x%=�L:B%=`l%!4:J_%=0:�B%<>-1�
>c%=B%?&C:r%=(B%!&C>>8)�&F:�r%>q%�(r%=q%�c%>d%)��Ty��fy(B%)
�:�
&��Ty:Pu%=�:qJ%=�n(�z):�G(VJ%):�c:�
���fy(B%):�c%:�A(VJ%,1,�O("its",�Q(d%,q%,x%,-1),"","","")):�A(VJ%,2,�`(B%,x%)):c%=B%?&F:c%-=DJ%*(c%=0):�U(VJ%,2,c%):�w(VJ%,�,�):ey%=-1:J_%=&A:`l%=B%:�
0ݤb(c%,r%):�B%,C%,Nl%,ru%:B%=C%(r%):�B%<>-1�
�:�B%?&C=c%�C%+=1
6B%=B%!4:�B%<>-1�Nl%=B%?&C:ru%=(B%!&C>>8)�&F�ru%=&D
�Nl%>c%�ru%>r%
�:=C%
ݤm(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��L_:�S%,C%,B%,r%:C%=-1:WJ%=-1:z%=�w$:�lJ%�z%<>0�
;ȕ��#z%:S%=��#z%:B%=�w(w_%,S%,�):�C%<>-1�C%!4=B%�WJ%=B%
P!B%=C%:B%!8=S%:ș&C,4,z%,B%+&C,S%-&C:r%=((B%!&C)>>8)�&F:�C%(r%)=-1�C%(r%)=B%
C%=B%:�s_%��d(�1)
�:�WJ%<>-1�B%!4=-1
�#z%:z%=0
�:�
Aݤhy(T%,Q%,Fy%):�A$,x,c%,F%,L%:Ul%=(T%�32)=0:c%=Fy%-Q%:Ȏ�T%�
7�"y","Y":A$=�A("year"+�-(c%>1),"s")):�Ul%�A$=�s(A$)
�"n":A$=�c%
&�"t","T":A$=�Ny(c%):�Ul%�A$=�s(A$)
!V�"c","C":ș&61502,S_%,"Ann"+�c%,J%,256�,,,L%;F%:�(F%�1)=0�J%?L%=&D:A$=" ("+$J%+")"
"�Ul%�A$=�s(A$)
# �:=A$
$���uJ:ky%=2:m_%=&F:Tu%=�:oi%=�C("FAM","FAM",1,4):Yi%=�C("DIM4","ANM",1,3):F=�C("DIM","DIM",1,6):�z(F,3,Yi%):�z(F,5,oi%):�c_(F,2,-1):sJ%=�C("E","E",1,6):el%=�C("OT","OT",1,6):xl%=�C("Day","Day",1,7):al%=�C("OE","OE",1,&C)
%�Fl%=�Cy(�A("Col")):$(Fl%+28+&C)=�A("Def"):x$=T$+"Diary":�V%(&E):L_%=-1:BJ%=-1:Au%=0:Wu%=�C("EN","EN",1,3):Vu%=�C("EA","E",3,6):D_%=0:ly%=0:M_%=-1:T_%=6:�Al:�
&
ݤqy=F
'y��O_(A%):�V_:�TJ:�I(�I,�V,�L):�J(F,ky%-1,�):B%(A%)=�F(0,0,1,1,&77d):W%(A%)=�F(0,0,31-6,&C,&fff):M$(A%)=�A("DiaTab"):�
(
��pJ:�
)��mu:BJ%=-1:�
*���Uu(v%,h%,a%,K%):�d%,q%,x%,cJ%,vl%,v_%,n_%,ZJ%,hl%:�P(v%,n_%,ZJ%,d%,q%,x%):cJ%=�J("Homerton.Bold",&E,&E):ș&400E6,7:vl%=�J("Trinity.Bold",&C,&C):v_%=�J("Homerton.Medium",&A,&A):ș&40081,,"Trinity.Medium",9*16,9*16�hl%:Ȏky%�
+�1:�ou(v%,h%,a%,K%)
,�2:�k_(v%,h%,a%,K%)
-�3:�ku(v%,h%,a%,K%)
.�:�V(0,7):�h%�
/ A$=�U(q%,-1)+" "+�x%:Ȏ��
09�ZJ%<>x%:A$=�U(n_%,3)+" "+�ZJ%+" - "+�U(q%,3)+" "+�x%
1#�n_%<>q%:A$=�U(n_%,-1)+" - "+A$
22�:�G(�F(0,0,d%,q%,x%),W%(t%))=-1��R(h%,a%,K%)
3 �L(cJ%,A$,1,a%+j%-&A,K%-&A)
4!�:A$=�ZJ%+" "+�U(n_%,-1):Ȏ��
59�ZJ%<>x%:A$=�ZJ%+" "+�U(n_%,3)+" - "+�x%+" "+�U(q%,3)
6 �n_%<>q%:A$+=" - "+�U(q%,-1)
7=�:�L(cJ%,A$,-1,a%+&A,K%-&A):�G(v%,B%(t%))=1��R(h%,a%,K%)
8 �:�Q(cJ%):�Q(vl%):�Q(v_%):�
9��x_(p%,Oi%):Ȏ!p%�
:�0,1,2:�ky%<>!p%+1�
;k�J(F,ky%-1,�):ky%=!p%+1:�J(F,!p%,�):�P(S%(�P(3)),A%,B%,d%,q%,x%):�I(d%,q%,x%):�Z%(t%)=3�v%=S%(t%):uJ%=�
<�
=�3:Ȏp%!4�
>�0:�Oy(BJ%)
?�1:�U_(BJ%)
@�2:�k(BJ%)
A�
B�4:�Ay(�I,�V,�L,F,0)
C�5:Ȏp%!4�
D
�0:�_u
E
�1:�Lu
F
�2:�Iu
G
�3:�H_
H�
I�:�
J��iy(My%,p%):ȎMy%�
KN�sJ%:A$=�W(My%,!p%):�S_(My%)="Every"��A(f%,30,A$):cu%=!p%+1��A(Ly%,&D,A$)
L(�el%:�A(f%,33,�W(My%,!p%)):fu%=!p%+1
M(�xl%:�A(f%,34,�W(My%,!p%)):vu%=!p%+1
N(�al%:�A(f%,35,�W(My%,!p%)):tu%=!p%+1
O�:�
P9��Xy(l%):�d%,q%,x%,A%,B%:�P(v%,A%,B%,d%,q%,x%):Ȏky%�
Q �1:�F(d%,q%,x%,l%*&E,0,0)
R �2:�F(d%,q%,x%,l%*7,0,0)
S �3:�F(d%,q%,x%,l%*2,0,0)
TK�:py%=-�G(v%,�F(0,0,d%,q%,x%)):�I(d%,q%,x%):�G(v%,B%(t%))=-1�v%=B%(t%)
U �G(v%,W%(t%))=1�v%=W%(t%)
V�
W(��a_(n%,h%,_%,Q%,o_%,wJ%):�R%:Ȏky%�
X�1:R%=�Ty(n%,h%,_%,Q%)
Y�2:R%=�ky(n%,h%,_%,Q%)
Z�3:R%=�Yy(n%,h%,_%,Q%)
[ �:�n%=2�R%>1�BJ%=R%�BJ%=-1
\�
] ݤzy(w%,Cy%):k%=�:ȎCy%�
^�414:�Xy(1)
_�415:�Xy(-1)
`�30:�I(�I,�V,�L)
a�389:�Ay(�I,�V,�L,F,0)
b�27:�G(ay%)
c k%=�
d �:=k%
e'ݤdy(e%,w%,Cy%):�A%,B%:k%=�:�e%=f%�
f4A%=0:�Cy%=&D�Cy%=398�Cy%=394�A%=1��Cy%=399�A%=-1
g �A%<>0�
h Ȏw%�
i�16:�A%=1�B%=17�B%=18
j�17:B%=w%+A%
k�18:�A%=1�
l�Cy%<>&D�B%=16��N_
m
�B%=17
n�
o k%=�
p�:�B%<>0��M(e%,B%)
q �:ȎCy%�
r
�27:�n
s�4,24:�L_%<>-1��k(L_%)
t k%=�
u�
v�
w �k%=�
x �:=k%
y`��lJ:�z%,B%:z%=�x$:B%=M_%:ȕB%<>-1:�#z%,�B%!8:ș&C,2,z%,B%+&C,B%!8 -&C:B%=B%!4:�:�#z%:z%=0:�
zF��Au(z%):�#z%,ky%:�#z%,m_%:�#z%,Tu%+5:�#z%,D_%:�#z%,ly%:�#z%,T_%:�
{H��bJ(z%):ky%=�#z%:m_%=�#z%:Tu%=(�#z%)-5:D_%=�#z%:ly%=�#z%:T_%=�#z%:�
|F��Ju(s%,Sy%,p%,_%,Q%):�A%,B%:!J%=s%:ș&400CB,,J%:_%=J%!4+664:Ȏw%�
} �1,2,3:�n%<>2�Z(s%,Sy%,1)
~>�&D:�H(By%,0,-1):�J(By%,�q(s%,Sy%),1):�C(By%,_%,Q%,s%,Sy%)
-�6:B%=��M(s%,Sy%):�A%=7�&A:�S(s%,A%,B%):�
�>�8,9:A%=��Z(s%,7):A%+=1+2*(Sy%=8):�A%>0�A%<&D��A(s%,7,�A%)
� �&A:�C(Vu%,_%,Q%,s%,Sy%)
� �&B:�S(s%,&C,��M(s%,Sy%))
� �&C:�C(Wu%,_%,Q%,s%,Sy%)
��:�
���iJ(p%,s%):ȎtJ%�
�1�By%:�U(s%,&D,!p%):�H(By%,0,-1):�J(By%,!p%,1)
� �Vu%:�A(s%,&A,�W(Vu%,!p%))
� �Wu%:�A(s%,&C,�W(Wu%,!p%))
��:�
����nu(s%):�A%:�A%=1�3:�Z(s%,A%,�(ky%=A%)):�:�U(s%,&D,m_%):�Z(s%,5,-Tu%):�Z(s%,&B,-(D_%<>0)):�S(s%,&C,-(D_%=0)):�Z(s%,6,-(ly%<>0)):�A%=7�&A:�S(s%,A%,-(ly%=0)):�:�Z(s%,&F,�((T_%�4)>0)):�Z(s%,16,�((T_%�2)>0)):�Z(s%,17,�((T_%�1)>0))
�#�S(s%,&F,�((T_%�1)>0)):�ly%<>0�
�/�A(s%,7,�(ly%�&F)):�A(s%,&A,�W(Vu%,ly%>>4))
�$��A(s%,7,"1"):�A(s%,&A,�A("E3"))
�8�:�D_%=0��A(s%,&C,�A("EN1"))��A(s%,&C,�W(Wu%,D_%-1))
��
����bu(s%):�A%,B%,d%,q%,x%:A%=0:�A%+=1:��M(s%,A%)�A%=3:ky%=A%:�P(S%(�P(3)),A%,B%,d%,q%,x%):�I(d%,q%,x%):m_%=�q(s%,&D):Tu%=�M(s%,5):ly%=0:D_%=0:�M(s%,6)�ly%=((�k(Vu%,�Z(s%,&A)))<<4)+��Z(s%,7)
�&�M(s%,&B)�D_%=�k(Wu%,�Z(s%,&C))+1
�.T_%=�(�M(s%,17)+2*�M(s%,16)+4*�M(s%,&F)):�
�:��I(d%,q%,x%):�u%,B%,Oy%,T%,y%:u%=�H(d%,q%,x%):�ky%=3�
�$�F(d%,q%,x%,�Z_(d%,q%,x%)-1,0,0)
���F(d%,q%,x%,-u%+1,0,0)
�:�:y%=�F(0,0,d%,q%,x%):S%(�P(3))=y%:�Z%(t%)=3�v%=S%(t%)
� �My:�
�o��My:�B%,T%,Oy%:B%=M_%:kJ%=-1:y%=S%(�P(3)):V%()=0:ȕB%<>-1��Oy%:T%=B%!&C:�G(y%,T%)<>1�Oy%=�:kJ%=B%�B%=B%!4
��:�
�`ݤcy(T%):�B%,F%:B%=M_%:F%=-1:ȕB%<>-1�F%=-1:�((B%!16)�(1<<20))=0�((B%!16)�4)=4�F%=B%�B%=B%!4
� �:=F%
� ��__(B%):�(B%!16�(3<<20))=0�
�k�fy%,Ky%,d%,q%,x%,K_%,A$,A%,R%,C%:�P(B%!&C,fy%,Ky%,d%,q%,x%):Au%=B%:�Ky%>&C�Ky%-=&C:K_%=���Ky%=0�Ky%=&C
�=A$=�Ky%+":"+�2-��fy%,"0")+�fy%:�K_%�A$+=" pm,"�A$+=" am,"
�P�A(Ly%,1,�O("WasSet",A$,"","","")):�A(Ly%,2,�Q(d%,q%,x%,-1)):�((B%!16)�4)=4�
�R%=�:�((B%!16)�8)=8�
�c�my(fy%,Ky%,d%,q%,x%,((B%!16)>>8)�&FF,(((B%!16)>>16)�&F)-1):�Ky%>&C�Ky%-=&C:K_%=���Ky%=0�Ky%=&C
�=A$=�Ky%+":"+�2-��fy%,"0")+�fy%:�K_%�A$+=" pm,"�A$+=" am,"
�B�A(Ly%,&F,�O("WilRpt",A$,"","","")):�A(Ly%,16,�Q(d%,q%,x%,-1))
�S�:�jy(d%,q%,x%,B%!16):A$=�Ky%+":"+�2-��fy%,"0")+�fy%:�K_%�A$+=" pm,"�A$+=" am,"
�B�A(Ly%,&F,�O("WilRpt",A$,"","","")):�A(Ly%,16,�Q(d%,q%,x%,-1))
��
��:�((B%!16)�1)=1�J_%=&A
��C%=(B%!16>>4)�&F:C%-=m_%*(C%=0):�A%=4�6:�U(Ly%,A%,C%):�:B%+=20:�A%=4�6:A$="":ȕ?B%<>&B:A$+=�?B%:B%+=1:�:B%+=1:�A(Ly%,A%,A$):�:�Z(Ly%,9,0):�A%=&A�&D:�S(Ly%,A%,1):�:�A(Ly%,&A,"1"):�A(Ly%,&D,�A("E1")):�cJ(�R%,�):rJ%=-1
�!�:�(B%!16�(1<<21))<>0��tu(B%)
�
�By(B%,0)
��:�
�o��tu(B%):�A$,A%,Z$,xi%,`u%:B%+=20:�A%=1�3:ȕ?B%<>&B:A$+=�?B%:B%+=1:�:B%+=1:�:�A$,1)="="�A$=�A$,�A$,"*")+1)
�4Z$=�s(�A$,�A$," "))):�Z$<>"FILER_RUN"�Z$<>"RUN"�
�Cș8,5,A$�xi%,`u%:�xi%=2�A$="Run "+A$��xi%<>0�A$="Filer_Run "+A$
��:ș&400DE,A$:�
����Iu:�y%,B%,Oy%,A%,C%,d%,q%,x%:y%=S%(�P(3)):B%=kJ%:�P(y%,A%,C%,d%,q%,x%):A%=-&E*(ky%=1)-7*(ky%=2)-2*(ky%=3):�F(d%,q%,x%,A%,0,0):y%=�F(0,0,d%,q%,x%):ȕB%<>-1��Oy%:T%=B%!&C:�G(y%,T%)=-1�Oy%=��B%=B%!4
� �:�Oy%�
�2t%=�P(3):�P(B%!&C,A%,C%,d%,q%,x%):�I(d%,q%,x%)
���B(�A("ErrNoMore"))
��:�
�g��Lu:�y%,B%,Oy%,A%,C%,d%,q%,x%:y%=S%(�P(3)):B%=kJ%:ȕB%<>-1��Oy%:T%=B%!&C:�G(y%,T%)=1�Oy%=��B%=!B%
� �:�Oy%�
�2t%=�P(3):�P(B%!&C,A%,C%,d%,q%,x%):�I(d%,q%,x%)
���B(�A("ErrNoB4"))
��:�
���_u:�M_%<>-1�
�3t%=�P(3):�P(M_%!&C,A%,C%,d%,q%,x%):�I(d%,q%,x%)
���B(�A("ErrNoEnt"))
��:�
� ��H_:�B%:B%=M_%:�B%<>-1�
�GȕB%!4<>-1:B%=B%!4:�:t%=�P(3):�P(B%!&C,A%,C%,d%,q%,x%):�I(d%,q%,x%)
���B(�A("ErrNoEnt"))
��:�
�8��ou(v%,h%,a%,K%):�Gu%,Jy%,u%:�h%��F(d%,q%,x%,7,0,0)
ÆGu%=K%-40:Jy%=-(m%-60)/7:ZJ%=x%:n_%=q%:�u%=1�7:�ay(u%+7*�h%,d%,u%,q%,x%,h%,a%+&A,Gu%,j%-20,Jy%):�u%<>7��F(d%,q%,x%,1,0,0):Gu%+=Jy%
��:�
�uݤTy(n%,h%,_%,Q%):�Jy%,l%,a%,R%:Jy%=(m%-60)/7:Q%=-Q%-40+Jy%:l%=((Q%�Jy%)�8):�l%<>0�l%+=7*�h%:�_%<&A�_%>j%-20�l%=0
��h%�a%=dy%�a%=yy%
�L�l%<>0�R%=�Ay(l%,_%-&A,Q%�Jy%,n%,Jy%,a%+&A,-o%-40-(l%+7*(l%>7))*Jy%+Jy%)
�=R%
�R��k_(v%,h%,a%,K%):�Gu%,Jy%,vJ%,u%:�h%��F(d%,q%,x%,3,0,0):u%=4:vJ%=7�u%=1:vJ%=3
�EGu%=K%-40:Jy%=-(m%-60)/3:ZJ%=x%:n_%=q%:�u%=u%�vJ%:�u%=6�Jy%=Jy%/2
�S�ay(u%,d%,u%,q%,x%,h%,a%+&A,Gu%,j%-20,Jy%):�u%<>vJ%��F(d%,q%,x%,1,0,0):Gu%+=Jy%
��:�
͗ݤky(n%,h%,_%,Q%):�Jy%,l%,a%,K%,R%:Jy%=(m%-60)/3:Q%=-Q%-40+Jy%:l%=((Q%�Jy%)�4):Q%=Q%�Jy%:K%=-o%-40-l%*Jy%+Jy%:�l%<>0�l%+=3*�h%:�_%<&A�_%>j%-20�l%=0
��l%>=6�Jy%=Jy%/2
�&�l%=6�Q%>=Jy%�Q%-=Jy%:l%=7:K%-=Jy%
��h%�a%=dy%�a%=yy%
�.�l%<>0�R%=�Ay(l%,_%-&A,Q%,n%,Jy%,a%+&A,K%)
�=R%
�,��ku(v%,h%,a%,K%):�h%��F(d%,q%,x%,1,0,0)
�OZJ%=x%:n_%=q%:�ay(��h%,d%,�H(d%,q%,x%),q%,x%,h%,a%+&A,K%-40,j%-20,-m%+60):�
�@ݤYy(n%,h%,_%,Q%):�l%,a%,R%:Q%=-Q%-40:l%=1:�h%�a%=dy%�a%=yy%
�.�_%<&A�_%>j%-20�Q%>m%-60�Q%<0�l%=0�l%+=�h%
�1�l%<>0�R%=�Ay(l%,_%-&A,Q%,n%,m%,a%+&A,-o%-40)
�=R%
�m��ay(l%,d%,u%,q%,x%,h%,a%,K%,s%,b%):�B%,C%,T%,Q%,Gy%,A%,A_%:Gy%=28:A_%=�F(0,0,d%,q%,x%):�S(a%,K%,s%,b%)�
�"�V(0,7):�A_%=�F(0,0,�I,�V,�L)�
�8ș&400E6,!SJ%:�l(a%-4,K%-4,s%+8,-b%-8,&C):ș&400E6,7
�*�:�a%,K%:�BYs%,0:�BY0,b%:�BY-s%,0:�h%�
�v�L(vl%,�d%,-1,a%+s%-30,K%-6):�L(v_%,�c(u%,-1),1,a%+s%-40,K%-6):�S(a%,K%-6,s%-&DC,-24)��B_(u%,d%,q%,x%,-1,a%,K%-6)
�x�:�L(vl%,�d%,1,a%+30,K%-6):�L(v_%,�c(u%,-1),-1,a%+40,K%-6):�S(a%+&DC,K%-6,s%-&DC,-24)��B_(u%,d%,q%,x%,1,a%+s%,K%-6)
���:Q%=40:T%=�b(d%,q%):B%=-1:A%=V%(l%):C%=A%-T%:ȕA%>0�T%>0:B%=�m(d%,q%,B%):T%-=1:A%-=1:�:ȕT%<>0�Q%+Gy%-5<=-b%:B%=�m(d%,q%,B%):T%-=1:�r(v_%,�`(B%,x%),a%+30,K%-Q%-20,j%-50,Gy%):Q%+=Gy%:�:B%=kJ%:T%=�F(0,0,d%,q%,x%):A%=C%
�7ȕA%>0:B%=�x(B%,T%):B%=B%!4:A%-=1:�:�Q%+Gy%-5<=-b%�
�S�:B%=�x(B%,T%):�B%<>-1��r(v_%,�my(B%),a%+30,K%-Q%-20,j%-50,Gy%):Q%+=Gy%:B%=B%!4
��B%=-1�Q%+Gy%-5>-b%
�B�:�x(B%,T%)<>-1�Q%+Gy%-5>-b%��a%,K%+b%+24:�BY20,0:�81,-&A,-20
�*�V%(l%)>0��a%,K%-60:�BY20,0:�81,-&A,20
��:�
����TJ:�A%,F%,P%,B%,A$,C%,L%:A%=1:�ș&61502,S_%,"Spec"+�A%,0�,,P%;F%:A%+=1:�F%�1:Xi%=A%-3:�J%(A%-3,4):B%=0:ȕB%<=Xi%:ș&41502,S_%,"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,S_%,"Easter"+�A%,0�,,P%;F%:A%+=1:�F%�1:Ma%=A%-3:�R%(A%-3,1):B%=0:ȕB%<=A%-3:ș&41502,S_%,"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��B_(Ka%,c%,r%,x%,_u%,_%,Q%):�A$,LJ%,KJ%,Py%,A%:�A%=0�Xi%:�J%(A%,1)=r%�
�K�(J%(A%,2)=-1�J%(A%,2)=Ka%)�c%>=J%(A%,3)�c%<=J%(A%,4)�A$+=$J%(A%,0)+"/"
�z�:�:�vJ(LJ%,KJ%,x%):A%=0:Py%=0:ȕA%<=Ma%:�F(LJ%,KJ%,x%,R%(A%,1)-Py%,0,0):Py%=R%(A%,1):�LJ%=c%�KJ%=r%�A$+=$R%(A%,0)+"/"
�HA%+=1:�:�A$),"/")�ș&40081,,"Trinity.Medium",7*16,7*16�Py%�Py%=hl%
�"�A$<>""��L(Py%,�A$),_u%,_%,Q%)
��Py%<>hl%�ș&40082,Py%
��
�KݤAy(l%,_%,Q%,n%,b%,a%,K%):�ny%,Gy%,A%,B%,d%,q%,x%,T%,F%,R%:Gy%=28:Ȏ��
�s�_%>=30�_%<=j%-20�Q%>=40:�P(v%,A%,B%,d%,q%,x%):�F(d%,q%,x%,l%-1,0,0):ny%=(((Q%-40+Gy%)�Gy%)):�ny%>0�ny%+=V%(l%)
�8�ny%>0�ny%<=�b(d%,q%)�n%<>2��Y_(d%,q%,ny%,n%):ny%=-1
��ny%>0�ny%-=�b(d%,q%)
� �ny%>0�
�`T%=�F(0,0,d%,q%,x%):B%=kJ%:B%=�x(B%,T%):ȕny%>1�B%<>-1:B%=B%!4:B%=�x(B%,T%):ny%-=1:�:�B%=-1�
� �n%<>2��s(d%,q%,x%):QJ%=�
� �:Ȏn%�
��4:�Oy(B%):QJ%=�
� �2:R%=B%
��1:�U_(B%):QJ%=�
��
��
��:�n%<>2�ny%=0�
�B�P(v%,A%,B%,d%,q%,x%):�F(d%,q%,x%,l%-1,0,0):�s(d%,q%,x%):QJ%=�
��
��
�n%=2
��_%<=20�Q%>=b%-20:�P(v%,A%,B%,d%,q%,x%):�F(d%,q%,x%,l%-1,0,0):T%=�F(0,0,d%,q%,x%):ny%=-((b%-40)�Gy%):B%=�x(kJ%,T%):ȕB%<>-1:B%=B%!4:B%=�x(B%,T%):ny%+=1:�:ny%+=�b(d%,q%):�V%(l%)<ny%�V%(l%)+=1:�D(i%,a%,K%-40,a%+j%-&A,K%-b%+4)
N�_%<=20�Q%<=60�Q%>=40�V%(l%)<>0:V%(l%)-=1:�D(i%,a%,K%-40,a%+j%-&A,K%-b%+4)
�_%<=20�Q%<=60�Q%>=40
D:�P(v%,A%,B%,d%,q%,x%):�F(d%,q%,x%,l%-1,0,0):�s(d%,q%,x%):QJ%=�
�:=R%
Jݤx(B%,T%):�A%:A%=-1:ȕB%<>-1�A%=-1:A%=�G(�n(B%!&C),T%):�A%=-1�B%=B%!4
�:�A%=0�A%=B%�A%=-1
=A%
�ݤmy(B%):�A$,A%,C%,Z$,T%:C%=(B%!16>>4)�&F:T%=B%!16�(1<<21):C%-=m_%*(C%=0):�V(0,C%):�((B%!16>>1)�1)=1�Z$=�oy(�Xy(B%!&C),�vy(B%!&C),-1,Tu%)+" "
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$
���v_(S$):�A$,`i%,e:�Z(f%,39,1):A$=�Z(f%,16):`i%=�A$:�A(f%,16,A$+S$):ql%=��Z(f%,16):S$=�S$,ql%-`i%+1):�A(f%,17,S$):ql%=��Z(f%,16):S$=�S$,ql%+1):�A(f%,18,S$):�
���s(c%,r%,Q%):�A%,b%,K_%:�A%=16�18:�A(f%,A%,""):�U(f%,A%,m_%):�:�Z(f%,24,0):hJ%=0:�Z(f%,21,�((T_%�4)>0)):�Z(f%,23,�((T_%�2)>0)):�Z(f%,38,�((T_%�1)>0)):�S(f%,21,�((T_%�1)>0)):�Z(f%,39,0):�Jy(26):�A(f%,27,"1"):�A(f%,30,�A("E1"))
�cu%=1:fu%=1:vu%=1:tu%=1:�S(f%,37,1):�A(f%,33,�A("OT1")):�A(f%,34,�A("Day1")):�A(f%,35,�A("OE1")):�A(f%,1,�Q(c%,r%,Q%,-1)):W_%=c%:C_%=r%:b_%=Q%:b%=�f:r%=�i:K_%=(b%>=&C):�i(f%,Ql%,�A("alset"),-1):�b%>&C�b%-=&C
I�A(f%,3,�b%):�A(f%,5,"00"):�K_%��A(f%,&C,�A("pm"))��A(f%,&C,�A("am"))
!�Y(0,r%):�Iy(�,�):�M(f%,16):�
B��U_(B%):�Oy(B%):L_%=-1:�S(f%,37,1):�i(f%,Ql%,�A("alset"),0):�
s��Oy(B%):�d%,q%,x%,b%,r%,A$,ci%,R%:�P(B%!&C,r%,b%,d%,q%,x%):L_%=B%:�b%<&C�A$=�A("am")�A$=�A("pm"):�b%>&C�b%-=&C
�A(f%,&C,A$):�b%=0�b%=&C
5�Z(f%,38,((B%!16>>20)�1)):A$=�r%:�r%<&A�A$="0"+A$
2�A(f%,5,A$):hJ%=((B%!16)>>4)�&F:�hJ%=0�hJ%=m_%
��A%=16�18:�U(f%,A%,hJ%):�:�S(f%,37,0):�A(f%,3,�b%):�i(f%,Ql%,�A("aledit"),-1):�A(f%,1,�Q(d%,q%,x%,-1)):W_%=d%:C_%=q%:b_%=x%:�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"))
pcu%=1:fu%=1:vu%=1:tu%=1:�Jy(26):�A(f%,33,�A("OT1")):�A(f%,34,�A("Day1")):�A(f%,35,�A("OE1")):�((B%!16)�4)=4�
%ci%=�:�Z(f%,24,1):�((B%!16)�8)=8�
RR%=((B%!16)>>8)�&FF:�A(f%,27,�R%):cu%=((B%!16)>>16)�&F:�A(f%,30,�W(sJ%,cu%-1))
��:�Jy(31):fu%=((B%!16)>>8)�&F:�A(f%,33,�W(el%,fu%-1)):vu%=((B%!16)>>&C)�&F:�A(f%,34,�W(xl%,vu%-1)):tu%=((B%!16)>>16)�&F:�A(f%,35,�W(al%,tu%-1))
�
��Z(f%,24,0)
d�:B%+=20:�A%=16�18:A$="":ȕ?B%<>&B:A$+=�?B%:B%+=1:�:B%+=1:�A(f%,A%,A$):�:�Iy(�ci%,�):�M(f%,16):�
f��Iy(La%,IJ%):!J%=f%:ș&400CB,,J%:�IJ%�J%!28=-1:J%!4=�d-&64-(J%!&C-J%!4):J%!&C=J%!4+&3E8:J%!16=900
)J%!8=J%!16 -&7D0*��La%:ș&400C5,,J%:�
!W��cJ(La%,IJ%):!J%=Ly%:ș&400CB,,J%:�IJ%�J%!28=-1:J%!4=&64:J%!&C=J%!4+&3E8:J%!16=900
")J%!8=J%!16 -&7D0*��La%:ș&400C5,,J%:�
#k��Jy(w%):�A%:�Z(f%,w%,1):�Z(f%,57-w%,0):�A%=27�30:�S(f%,A%,-(w%=31)):�:�A%=33�35:�S(f%,A%,-(w%=26)):�:�
$O��J_:�F%,c%,r%,Q%,my%,Lu%,Gy%,B%,mu%,fJ%,jy%:�P(qJ%,F%,B%,mu%,fJ%,jy%):Ȏ��
%�D_%=1:F%=�
&C�D_%=2�(�D(Uy%,by%,Fy%)>�D(mu%,fJ%,jy%)-�H(mu%,fJ%,jy%)+7):F%=�
'�D_%=3�Uy%=1:F%=�
( F%=�
)�:�F%��Vy%�
*�t%<>�P(3)�Iu%��C_(t%)
+)t%=�P(3):�I(Uy%,by%,Fy%):�x(i%,-1,-1)
, �:my%=0:Lu%=0:Gy%=0:�ly%<>0�
-
Ȏly%>>4�
.�0:my%=ly%�&F
/�1:my%=7*(ly%�&F)
0�2:Lu%=ly%�&F
1�3:Gy%=ly%�&F
2��:c%=Uy%:r%=by%:Q%=Fy%:�F(c%,r%,Q%,-my%,-Lu%,-Gy%):F%=�F(0,0,c%,r%,Q%):B%=M_%:c%=�:ȕB%<>-1�c%:�G(B%!&C,F%)=-1��k(B%):B%=B%!4�c%=�
3�
4�:�
5Z��N_:�A_%,b%,r%,K_%,A$,Z$,C$,Py%:A$=�Z(f%,16):Z$=�Z(f%,17):C$=�Z(f%,18):�A$+Z$+C$<>""�
6)b%=��Z(f%,3):r%=��Z(f%,5):�b%=&C�b%=0
7(K_%=(�Z(f%,&C)=�A("pm")):�K_%�b%+=&C
8mPy%=Py%�(-�M(f%,21))�((-�M(f%,23))<<1)�(hJ%<<4):Py%=Py%�((-�M(f%,38))<<20)�((-�M(f%,39))<<21):�M(f%,24)�
9�M(f%,26)�
:*Py%=Py%�&C�((��Z(f%,27))<<8)�(cu%<<16)
;+�Py%=Py%�4�(fu%<<8)�(vu%<<&C)�(tu%<<16)
<�
=V�:A_%=�F(r%,b%,W_%,C_%,b_%):�Ky(A_%,Py%,A$,Z$,C$):�My:�c:�n:ey%=�:�Vy%�Z%(t%)=3��O
>��B(�A("ErrMes"))
?�:�
@B��Ky(A_%,Py%,A$,Z$,C$):�S%,B%,Oy%,T%,gy%,Wy%:�L_%<>-1��Fy(L_%)
AlOy%=�:S%=�(A$+Z$+C$)+3+20:Wy%=M_%:gy%=-1:ȕWy%<>-1��Oy%:T%=Wy%!&C:�G(A_%,T%)=-1�Oy%=��gy%=Wy%:Wy%=Wy%!4
B\�:B%=�w(w_%,S%+1,�):!B%=gy%:B%!4=Wy%:B%!8=S%:B%!&C=A_%:B%!16=Py%:�gy%=-1�M_%=B%�gy%!4=B%
C�Wy%<>-1�!Wy%=B%
D#$(B%+20)=A$+�&B+Z$+�&B+C$+�&B:�
E1��k(B%):�Fy(B%):�My:�c:ey%=�:�Vy%�Z%(t%)=3��O
F�B%=L_%��n
G�B%=Au%�Au%=-1:�G(Ly%)
H�
I9��Fy(B%):�gy%,Wy%:gy%=!B%:Wy%=B%!4:�gy%<>-1�gy%!4=Wy%
J�Wy%<>-1�!Wy%=gy%
K�M_%=B%�M_%=Wy%
L�Dy(w_%,B%,�):�
M%��n:�G(f%):�G(ay%):�Vy%��M(i%,-1)
N L_%=-1:�
O%��lu(Xy%,Ty%,e%,w%,X_%):�A%:Ȏw%�
P �1:�Ay(W_%,C_%,b_%,e%,w%)
Q�6:�Y(X_%,0)
R�7:�Y(-X_%,0)
S�8:�Y(0,&A*X_%)
T�9:�Y(0,-&A*X_%)
U�&A:�Y(0,X_%)
V�&B:�Y(0,-X_%)
W.�&C:A%=&C+24*(�Z(f%,&C)=�A("pm")):�Y(A%,0)
X �19:�N_
Y
�20:�n
Z �22:�C(Fl%,Xy%,Ty%,e%,w%)
[�24:�Iy(��M(e%,24),�)
\�26,31:�Jy(w%)
]�28,29:�n%=1�w%=57-w%
^;A%=��Z(e%,27):A%+=(w%-27)*2-3:�A%=0�A%=&FF��A%=256�A%=1
_�A(e%,27,�A%)
`6�30:�`(Xy%,Ty%):!sJ%=�g("E"):�C(sJ%,Xy%,Ty%,e%,w%)
a)�33:�`(Xy%,Ty%):�C(el%,Xy%,Ty%,e%,w%)
b)�34:�`(Xy%,Ty%):�C(xl%,Xy%,Ty%,e%,w%)
c)�35:�`(Xy%,Ty%):�C(al%,Xy%,Ty%,e%,w%)
d�37:�k(L_%)
e �38:�S(f%,21,��M(f%,38))
f�:�
g'��jJ(Xy%,Ty%,e%,w%):�A%:J_%=0:Ȏw%�
h �7:�By(Au%,�M(Ly%,9)):Au%=-1
i�8:�k(Au%)
j(�9:�A%=&A�&D:�S(e%,A%,���M(e%,w%)):�
k�&B,&C:�n%=1�w%=23-w%
l;A%=��Z(e%,&A):A%+=(w%-&A)*2-3:�A%=0�A%=&FF��A%=256�A%=1
m�A(e%,&A,�A%)
n]�&D:!J%=e%:ș&400CB,,J%:Xy%=J%!4+686+64:Ty%=J%!16-312:!sJ%=�g("ED"):�C(sJ%,Xy%,Ty%,e%,w%)
o�:�
p%��By(B%,ni%):�B%<>L_%��L_%:L_%=-1
q
�ni%�
r�(B%!16�4)=4�
s�(B%!16�8)=8�
t
�Q_(B%,�)
u ��oJ(B%)
v�
w!�B%!16=(B%!16)�(1<<20):ey%=-1
x�
y��Q_(B%,�)
z#�:�My:�c:ey%=�:�Vy%�Z%(t%)=3��O
{J_%=0:�G(Ly%):�
|@��Q_(B%,ni%):�c%,T%,A$,fy%,Ky%,d%,q%,x%,A_%,Py%,Z$,C$,:�ni%�
}DA_%=�z:c%=��Z(e%,&A):A$=�Z(Ly%,&D):T%=0:ȕA$<>�W(sJ%,T%):T%+=1:�
~:�A_%=B%!&C:c%=((B%!16)>>8)�&FF:T%=(((B%!16)>>16)�&F)-1
��:�P(A_%,fy%,Ky%,d%,q%,x%):�my(fy%,Ky%,d%,q%,x%,c%,T%):A_%=�F(fy%,Ky%,d%,q%,x%):Py%=B%!16:c%=B%+20:A$="":ȕ?c%<>&B:A$+=�?c%:c%+=1:�:c%+=1:ȕ?c%<>&B:Z$+=�?c%:c%+=1:�:c%+=1:ȕ?c%<>&B:C$+=�?c%:c%+=1:�:�Fy(B%):�Ky(A_%,Py%,A$,Z$,C$):�
�X��my(�fy%,�Ky%,�d%,�q%,�x%,c%,T%):�my%:�T%=0�fy%+=c%:c%=fy%�60:fy%=fy%�60:�c%>0�T%=1
�1�T%=1�Ky%+=c%:c%=Ky%�24:Ky%=Ky%�24:�c%>0�T%=2
� �T%=2�my%=c%��T%=3�my%=7*c%
�.ȕmy%>0:�F(d%,q%,x%,1,0,0):my%-=1:�:�T%=4�
�%ȕc%>0:�F(d%,q%,x%,0,1,0):c%-=1:�
� �:�T%=5�
�%ȕc%>0:�F(d%,q%,x%,0,0,1):c%-=1:�
��:�
����oJ(B%):�A_%,fy%,Ky%,d%,q%,x%,A$,Z$,C%,Py%,c%:Py%=B%!16:c%=B%+20:�P(B%!&C,fy%,Ky%,d%,q%,x%):�jy(d%,q%,x%,Py%):A_%=�F(fy%,Ky%,d%,q%,x%):ȕ?c%<>&B:A$+=�?c%:c%+=1:�:c%+=1:ȕ?c%<>&B:Z$+=�?c%:c%+=1:�:c%+=1:ȕ?c%<>&B:C$+=�?c%:c%+=1:�
�#�Fy(B%):�Ky(A_%,Py%,A$,Z$,C$):�
�z��jy(�d%,�q%,�x%,F%):�l%,c%,r%:l%=(F%>>8)�&F:c%=(F%>>&C)�&F:r%=(F%>>16)�&F:ȕr%>0:�F(d%,q%,x%,-d%+1,1,0):r%-=1:�:Ȏl%�
�D�1,2,3:u%=�H(d%,q%,x%):ȕu%<>c%:d%+=1:u%=�o(u%+1):�:d%+=(l%-1)*7
�Q�4,5,6:d%=�X(q%,x%):u%=�H(d%,q%,x%):ȕu%<>c%:d%-=1:u%=�o(u%+6):�:d%-=(l%-4)*7
��:�
�E��`(�_%,�Q%):!J%=f%:ș&400CB,,J%:_%=J%!4+714+64:Q%=J%!16-480-40:�
����Y(hu%,r%):�K_%,M%,Lu%,my%,zi%,A$:Lu%=r%<>0:my%=�:r%+=��Z(f%,5):b%=��Z(f%,3):K_%=(�Z(f%,&C)=�A("pm")):M%=�X(C_%,b_%):�b%=&C�b%=0
��K_%�b%+=&C
�/b%+=hu%:hu%=hu%<>0:�r%<0�b%-=1:r%+=60:hu%=�
� �r%>59�b%+=1:r%-=60:hu%=�
� �b%<0�W_%-=1:b%+=24:my%=�
� �b%>23�W_%+=1:b%-=24:my%=�
��W_%<1�C_%-=1:my%=�
� �W_%>M%�C_%+=1:W_%=1:my%=�
� �C_%<1�b_%-=1:C_%=&C:my%=�
� �C_%>&C�b_%+=1:C_%=1:my%=�
�'M%=�X(C_%,b_%):�W_%=0�W_%>M%�W_%=M%
� zi%=(b%>=&C):�b%>&C�b%-=&C
�$�my%��A(f%,1,�Q(W_%,C_%,b_%,-1))
��b%=0�b%=&C
��hu%��A(f%,3,�b%)
�)A$=�r%:�r%<&A�A$="0"+A$:�r%=0�A$="00"
��Lu%��A(f%,5,A$)
��zi%<>K_%�
� �zi%�A$=�A("pm")�A$=�A("am")
��A(f%,&C,A$)
��:�
�3��V_:�S%,C%,B%:C%=-1:M_%=-1:z%=�x$:�lJ%�z%<>0�
�=ȕ��#z%:S%=��#z%:B%=�w(w_%,S%+1,�):�C%<>-1�C%!4=B%�M_%=B%
�:!B%=C%:B%!8=S%:ș&C,4,z%,B%+&C,S%-&C:C%=B%:�s_%��d(�1)
��:�M_%<>-1�B%!4=-1
�
�#z%:z%=0
��:�
�9��vJ(�c%,�r%,Q%):�_l%,_y%:_l%=(Q%+1)�19:�_l%=0�_l%=19
�A_y%=(�(1.25*Q%)+6)�7:c%=Y%(_l%-1,_y%):�c%>31�c%-=31:r%=4�r%=3
��
�>��Al:�_i%,Ai%,d%,u%,c%:�Y%(18,6):�_i%=1�19:�Ai%=0�6:Ȏ_i%�
� �&E:u%=1
� �3:u%=2
� �&B:u%=4
� �19:u%=6
� �8:u%=7
� �16:u%=9
� �5:u%=&A
�
�&D:u%=&C
� �2:u%=&D
�
�&A:u%=&F
�
�18:u%=17
� �7:u%=18
�
�&F:u%=20
� �4:u%=21
�
�&C:u%=23
� �1:u%=24
� �9:u%=26
�
�17:u%=27
� �6:u%=28
�?�:d%=21+u%:n$=�A("Mon3")+" ":�d%+=1:c%=5-(d%�7):�c%=-1�c%=6
�<�c%=Ai%:Y%(_i%-1,Ai%)=d%:�d%>31�d%-=31:n$=�A("Mon4")+" "
� �:�:�
đ��qu:sy%=2:Vi%=&B:TJ%=�:bJ%=1:Si%=�Wy(�A("GYM")+�Oy("GYM",1,2,"\","")+"\"):ji%=�py(Si%,2,"",5,"A0-9"):Zl%=�C("CAM","CAM",1,3):�z(Zl%,2,Si%):�
� ݤM_=Zl%
�I��CJ(A%):B%(A%)=&77d:W%(A%)=&fff:S%(A%)=Fy%:M$(A%)=�A("CalTab"):�WJ:�
�-��SJ(x%,h%,a%,K%):�sy%=1��JJ(x%,h%,a%,K%)
��sy%=2��Pu(x%,h%,a%,K%)
��
���n_(p%,Oi%):�A%:Ȏ!p%�
�%�0,1:A%=sy%:sy%=!p%+1:uJ%=sy%<>A%
��2:Ȏp%!4�
�%�0:�v%<>Fy%+(sy%=1)�v%=Fy%:t%=Oi%
�)�1:�v%<>Fy%+1+(sy%=1)�v%=Fy%+1:t%=Oi%
��2:A%=�$ji%:Ȏ��
�,�A%<&77d:�B(�O("ErrMin",�&77d,"","",""))
�,�A%>&fff:�B(�O("ErrMax",�&fff,"","",""))
�!�v%<>A%+(sy%=1)�v%=A%:t%=Oi%
��
��
��:�
�0��Ny(l%):v%+=(3-sy%)*l%:�v%<B%(t%)�v%=B%(t%)
��v%>W%(t%)�v%=W%(t%)
��
�3��Qu(n%,h%,_%,Q%,o_%,wJ%):�Pa%,d%,q%,x%:�n%<>2�
�$Pa%=�ly(h%,_%,Q%,d%,q%,x%):�Pa%�
�
ȎbJ%+n%�
�(�5,3:�I(d%,q%,x%):t%=�P(3):v%=S%(t%)
��6,2:�s(d%,q%,x%):QJ%=�
��
��
��:�
� ݤfy(w%,Cy%):k%=�:ȎCy%�
��414:�Ny(1)
��415:�Ny(-1)
� �30:�v%<>Fy%+(sy%=1)�v%=Fy%
� k%=�
� �:=k%
�@��GJ(p%,s%):�tJ%=By%��b(s%,6,!p%):�H(By%,0,-1):�J(By%,!p%,1)
��
�ݤLy(e%,w%,Cy%):=�
�5��e_(z%):�#z%,sy%:�#z%,TJ%+5:�#z%,!SJ%:�#z%,bJ%:�
�4��qJ(z%):sy%=�#z%:TJ%=�#z%-5:Vi%=�#z%:bJ%=�#z%:�
� ��xu(s%,Sy%,p%,_%,Q%):ȎSy%�
� �7,1,4,5:�n%<>2�Z(s%,Sy%,1)
�;�6:�H(By%,0,-1):�J(By%,�p(s%,6),1):�C(By%,_%,Q%,s%,Sy%)
��9:�Z(s%,9)=�A("SetAlarm")+"/"+�A("GotoDiary")��A(s%,9,�A("GotoDiary")+"/"+�A("SetAlarm"))��A(s%,9,�A("SetAlarm")+"/"+�A("GotoDiary"))
��:�
���Ru(s%):�Z(s%,7,-(sy%=1)):�Z(s%,1,-(sy%=2)):�b(s%,6,!SJ%):�Z(s%,4,-�TJ%):�Z(s%,5,-TJ%):�bJ%=1��A(s%,9,�A("GotoDiary")+"/"+�A("SetAlarm"))��A(s%,9,�A("SetAlarm")+"/"+�A("GotoDiary"))
��
�"��KJ(s%):�M(s%,7)�sy%=1�sy%=2
�WTJ%=�M(s%,5):!SJ%=�p(s%,6):�Z(s%,9)=�A("GotoDiary")+"/"+�A("SetAlarm")�bJ%=1�bJ%=2
��
�?ݤly(h%,_%,Q%,�d%,�q%,�x%):�p_%,oy%,hy%,vy%,zu%,wu%:�sy%=1�
��p_%=(j%-32)/2:oy%=(m%-50)/6:hy%=p_%/7:vy%=(oy%-&A)/8:x%=v%+�h%:q%=2*((-Q%-50)�oy%)+((_%-20)�((j%-8)/2)):_%-=20+(q%�2)*((j%-8)/2):Q%=-Q%-50-((q%�2)*oy%):q%+=1:zu%=(_%+hy%*(1-0.12)+20*�h%)�hy%:wu%=((Q%-&A-vy%)�vy%)-1
�+�zu%>0�zu%<8�d%=1+zu%+7*wu%-�H(1,q%,x%)
���:p_%=(j%-40)/2:oy%=(m%-50)/3:hy%=p_%/7:vy%=(oy%-&A)/8:x%=v%:q%=2*((-Q%-50)�oy%)+((_%-20)�((j%-8)/2)):_%-=20+(q%�2)*((j%-8)/2):Q%=-Q%-50-((q%�2)*oy%):q%+=1+6*�h%:zu%=(_%-hy%*0.25+20*�h%)�hy%-1:wu%=Q%�vy%:�wu%>0�wu%<8�d%=1+wu%+7*zu%-�H(1,q%,x%)
��:�x%<>-1�
�1�d%<=0�d%>�X(q%,x%)�x%>&fff�x%=-1:d%=-1:q%=-1
�
�:=(x%>0)
����Pu(x%,h%,a%,K%):�q%,u%,c%,hy%,vy%,fa%,A$,r%,A%,B%,C%,D%,E%,F%,G%,H%:p_%=(j%-40)/2:oy%=(m%-50)/3:vy%=(oy%-&A)/8:hy%=p_%/7:�h%�
��x%<W%(t%)��R(1,a%,K%)
���x%>B%(t%)��R(0,a%,K%)
��:Bu%=�J("Homerton.Medium",20,20):yu%=�J("Homerton.Medium",&D,&D):bu%=�J("Homerton.Medium",9,9):�V(0,7):�L(Bu%,�x%,0,a%+j%/2,K%-8):�r%=1�6:q%=r%+6*h%:_%=(r%-1)�2*(j%-8)/2+20-20*h%:Q%=50+(r%-1)�2*oy%:�S(a%+_%,K%-Q%,p_%,-oy%)�
��L(yu%,�U(q%,-1),-1,a%+_%,K%-Q%):u%=�H(1,q%,x%)-1:ș&4008A,bu%:Q%+=vy%-6:�c%=1�7:ș&40086,,�c(c%,2),1<<4,a%+_%,K%-Q%-vy%*c%:�:_%+=hy%:A%=K%-Q%:D%=a%+_%:F%=�X(q%,x%):G%=u%:H%=hy%:B%=-vy%:�x%=Fy%�q%=by%�C%=Uy%�C%=0
h�TJ%�C%<>0�C%=0:ș&400E6,!SJ%:ȓa%+_%+((u%-1+Uy%)�7+0.25)*hy%,K%-Q%-((u%-1+Uy%)�7+0.25)*vy%,hy%,-vy%
�K
!�:�:�Q(Bu%):�Q(yu%):�Q(bu%):�
���JJ(v%,h%,a%,K%):�q%,u%,c%,hy%,ra%,oy%,A$,A%,B%,C%,D%,E%,F%,G%,H%:p_%=(j%-32)/2:oy%=(m%-50)/6:hy%=p_%/7:vy%=(oy%-&A)/8:x%=v%+h%:�h%�
�v%+1<W%(t%)��R(1,a%,K%)
��v%>B%(t%)��R(0,a%,K%)
�:�x%<=&fff�
�Bu%=�J("Homerton.Medium",20,20):yu%=�J("Homerton.Medium",&A,&A):bu%=�J("Homerton.Medium",7,7):�V(0,7):�L(Bu%,�x%,0,a%+j%/2,K%-8):�q%=1�&C:_%=(q%-1)�2*(j%-8)/2+20-20*h%:Q%=50+(q%-1)�2*oy%:�S(a%+_%,K%-Q%,p_%,-oy%)�
��L(yu%,�U(q%,-1),-1,a%+_%,K%-Q%):u%=�H(1,q%,x%)-1:ș&4008A,bu%:Q%+=vy%+4:�c%=1�7:ș&40086,," "+�c(c%,2),1<<4,a%+_%+hy%*c%-hy%,K%-Q%-vy%:�:Q%+=vy%:A%=a%+_%-hy%:E%=K%-Q%-vy%:F%=�X(q%,x%):G%=u%:H%=hy%:B%=vy%:�x%=Fy%�q%=by%�C%=Uy%�C%=0
m�TJ%�C%<>0�C%=0:ș&400E6,!SJ%:ȓa%+_%+((u%-1+Uy%)�7+0.12)*hy%,K%-Q%-((u%-1+Uy%)�7+0.18)*vy%,hy%*0.76,-vy%
�Y
�:�
�:�Q(Bu%):�Q(yu%):�Q(bu%):�
���WJ:�P%,A%,Di%,Ia%,J,P,R,H,S,O,M,_,Z,T,X,B,A:�Ia%456:J=&D:P=&E:R=&F:H=5:S=6:O=0:M=3:_=0:Z=4:T=7:X=8:B=9:A=&A:�Di%=0�2�2:P%=Ia%:[OPTDi%:.Y:STMFD(J)!,{P}:MOV X,1:MOV B,2:MOV A,#0:MOV2,#1<<4:ADR1,L:.z:ADD S,S,#1:ADD A,A,#1:CMP B,A:BLEQ D:MUL M,T,S
�ADD M,M,O:SWI &40086:CMP B,A:BLEQ I:CMP S,#7:SUBEQ Z,Z,X:�Q S,#0:ADD1,1,#8:CMP A,H:BNE z:LDMFD(J)!,{pc}:.K:STMFD(J)!,{P}:MOV X,1:MOV B,2:MOV A,#0:MOV2,#1<<4:ADR1,L:.s:ADD S,S,#1:ADD A,A,#1:CMP B,A:BLEQ D:MUL Z,X,S
�ADD Z,Z,_:SWI &40086:CMP B,A:BLEQ I:CMP S,#7:ADDEQ M,M,T:�Q S,#0:ADD1,1,#8:CMP A,H:BNE s:LDMFD(J)!,{pc}:.D:STMFD(J)!,{P,1-2}:LDR2,SJ%:B q:.I:STMFD(J)!,{P,1-2}:MOV2,#7:.q:MOV1,#0:SWI &400F3:LDMFD(J)!,{pc,1-2}:.SJ%&Vi%:.L
<]�A%=1�31:[OPTDi%:=�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 7a 25 3d 30 3a 6d 6c 25 3d |..5.YJ:z%=0:ml%=|
00000050 a3 3a 64 69 25 3d 2d 31 3a ee 85 f2 56 79 3a 85 |.:di%=-1:...Vy:.|
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 fb 65 75 25 3d 2d 31 3a 4a |"+......eu%=-1:J|
00000080 75 25 3d 30 3a 3a de 55 25 35 31 32 3a 4a 25 3d |u%=0::.U%512:J%=|
00000090 55 25 2b 32 35 36 3a f2 70 75 3a 7a 25 3d 8e 22 |U%+256:.pu:z%=."|
000000a0 3c 4f 72 67 61 6e 69 73 65 72 24 44 69 72 3e 2e |<Organiser$Dir>.|
000000b0 52 65 73 6f 75 72 63 65 73 2e 21 4c 61 6e 67 75 |Resources.!Langu|
000000c0 61 67 65 22 3a 5f 24 3d be 23 7a 25 3a 64 24 3d |age":_$=.#z%:d$=|
000000d0 22 3c 4f 72 67 61 6e 69 73 65 72 24 44 69 72 3e |"<Organiser$Dir>|
000000e0 2e 52 65 73 6f 75 72 63 65 73 2e 22 2b 5f 24 3a |.Resources."+_$:|
000000f0 d9 23 7a 25 3a 7a 25 3d 30 3a f2 46 4a 28 64 24 |.#z%:z%=0:.FJ(d$|
00000100 2b 22 2e 4d 65 73 73 61 67 65 73 22 29 3a f2 77 |+".Messages"):.w|
00000110 4a 28 a4 41 28 22 54 69 74 6c 65 22 29 2c 22 3c |J(.A("Title"),"<|
00000120 4f 72 67 61 6e 69 73 65 72 24 44 69 72 3e 22 2c |Organiser$Dir>",|
00000130 22 31 2e 32 30 20 28 32 37 20 4f 63 74 20 39 37 |"1.20 (27 Oct 97|
00000140 29 22 2c b9 29 3a c8 99 36 36 b8 4a 75 25 3a 65 |)",.):..66.Ju%:e|
00000150 75 25 3d 4a 75 25 2b 35 30 30 3a c8 95 ac 44 75 |u%=Ju%+500:...Du|
00000160 25 3a f2 64 28 31 29 3a ce 3a f2 56 79 3a e0 0d |%:.d(1):.:.Vy:..|
00000170 00 05 30 dd f2 56 79 3a e7 6d 6c 25 3d b9 8c c8 |..0..Vy:.ml%=...|
00000180 99 26 34 30 36 43 32 3a 85 a2 9e 2c f6 24 2b 22 |.&406C2:...,.$+"|
00000190 20 61 74 20 6c 69 6e 65 20 22 2b c3 9e 3a e0 0d | at line "+..:..|
000001a0 00 06 2f 6d 6c 25 3d b9 3a 66 24 3d f6 24 2b 22 |../ml%=.:f$=.$+"|
000001b0 20 61 74 20 6c 69 6e 65 20 22 2b c3 9e 3a 69 69 | at line "+..:ii|
000001c0 25 3d 9f 3a ee 85 85 a2 69 69 25 2c 66 24 0d 00 |%=.:....ii%,f$..|
000001d0 07 14 e7 7a 25 3c 3e 30 8c d9 23 7a 25 3a 7a 25 |...z%<>0..#z%:z%|
000001e0 3d 30 0d 00 08 16 f2 6e 4a 3a f2 43 79 3a c8 99 |=0.....nJ:.Cy:..|
000001f0 26 34 30 30 44 44 3a e1 0d 00 09 32 dd f2 64 28 |&400DD:....2..d(|
00000200 41 6c 25 29 3a ea 41 24 2c 55 69 25 2c 53 6c 25 |Al%):.A$,Ui%,Sl%|
00000210 2c 70 79 25 2c 75 4a 25 3a 75 4a 25 3d a3 3a e7 |,py%,uJ%:uJ%=.:.|
00000220 65 79 25 80 53 75 25 8c f2 74 0d 00 0a 42 e7 49 |ey%.Su%..t...B.I|
00000230 75 25 80 65 79 25 3c 3e 4e 69 25 8c 4e 69 25 3d |u%.ey%<>Ni%.Ni%=|
00000240 65 79 25 3a f2 69 28 69 25 2c 74 69 25 2c a4 41 |ey%:.i(i%,ti%,.A|
00000250 28 22 54 69 74 6c 65 22 29 2b c4 2d 28 65 79 25 |("Title")+.-(ey%|
00000260 3d b9 29 2c 22 20 2a 22 29 2c b9 29 0d 00 0b 12 |=.)," *"),.)....|
00000270 e7 41 6c 25 80 31 8c 53 6c 25 3d 26 36 34 0d 00 |.Al%.1.Sl%=&64..|
00000280 0c 11 e7 42 24 3c 3e 22 22 8c 53 6c 25 3d 30 0d |...B$<>"".Sl%=0.|
00000290 00 0d 18 e7 28 58 4a 25 3c 3e 2d 31 29 80 56 79 |....(XJ%<>-1).Vy|
000002a0 25 8c 53 6c 25 3d 30 0d 00 0e 31 41 6c 25 3d 28 |%.Sl%=0...1Al%=(|
000002b0 41 6c 25 84 28 33 3c 3c 26 42 29 2b 28 31 3c 3c |Al%.(3<<&B)+(1<<|
000002c0 35 29 29 80 ac 28 31 2b 28 33 3c 3c 31 37 29 29 |5))..(1+(3<<17))|
000002d0 3a e7 53 6c 25 3e 30 8c 0d 00 0f 39 c8 99 36 36 |:.Sl%>0....9..66|
000002e0 b8 6d 69 25 3a c8 95 6d 69 25 3e 4a 75 25 3a 4a |.mi%:..mi%>Ju%:J|
000002f0 75 25 2b 3d 26 36 34 3a ce 3a c8 99 26 34 30 30 |u%+=&64:.:..&400|
00000300 45 31 2c 41 6c 25 2c 55 25 2c 4a 75 25 b8 55 69 |E1,Al%,U%,Ju%.Ui|
00000310 25 0d 00 10 18 cc c8 99 26 34 30 30 43 37 2c 41 |%.......&400C7,A|
00000320 6c 25 2c 55 25 b8 55 69 25 0d 00 11 0c cd 3a c8 |l%,U%.Ui%.....:.|
00000330 8e 55 69 25 ca 0d 00 12 0b c9 30 3a c8 8e b9 ca |.Ui%......0:....|
00000340 0d 00 13 14 c9 58 4a 25 3c 3e 2d 31 80 56 79 25 |.....XJ%<>-1.Vy%|
00000350 3a f2 56 75 0d 00 14 18 c9 4a 75 25 3e 65 75 25 |:.Vu.....Ju%>eu%|
00000360 80 65 75 25 3c 3e 2d 31 3a f2 57 5f 0d 00 15 24 |.eu%<>-1:.W_...$|
00000370 c9 28 53 6c 25 3c 3e 30 84 42 24 3c 3e 22 22 29 |.(Sl%<>0.B$<>"")|
00000380 80 64 69 25 3c 3e a4 51 79 3a f2 75 3a f2 49 5f |.di%<>.Qy:.u:.I_|
00000390 0d 00 16 0f c9 42 24 3c 3e 22 22 3a f2 69 75 0d |.....B$<>"":.iu.|
000003a0 00 17 05 cb 0d 00 18 0a c9 31 3a f2 56 4a 0d 00 |.........1:.VJ..|
000003b0 19 10 c9 32 3a e7 21 55 25 3d 49 5f 25 8c 0d 00 |...2:.!U%=I_%...|
000003c0 1a 07 f2 79 4a 0d 00 1b 19 cc 3a e7 21 55 25 3d |...yJ.....:.!U%=|
000003d0 69 25 80 46 4a 25 8c 55 25 21 32 30 3d 30 0d 00 |i%.FJ%.U%!20=0..|
000003e0 1c 0d e7 ac a4 56 79 8c f2 60 79 0d 00 1d 20 c8 |.....Vy..`y... .|
000003f0 99 26 34 30 30 43 35 2c 2c 55 25 3a e7 21 55 25 |.&400C5,,U%:.!U%|
00000400 3d 69 25 80 46 4a 25 8c f2 60 5f 0d 00 1e 05 cd |=i%.FJ%..`_.....|
00000410 0d 00 1f 0d c9 33 3a c8 8e 21 55 25 ca 0d 00 20 |.....3:..!U%... |
00000420 0a c9 66 25 3a f2 6e 0d 00 21 0b c9 49 5f 25 3a |..f%:.n..!..I_%:|
00000430 f2 68 0d 00 22 0c c9 4c 79 25 3a f2 42 79 0d 00 |.h.."..Ly%:.By..|
00000440 23 0b c9 48 79 25 3a f2 79 0d 00 24 0c c9 56 4a |#..Hy%:.y..$..VJ|
00000450 25 3a f2 7a 79 0d 00 25 0c c9 7a 79 25 3a f2 43 |%:.zy..%..zy%:.C|
00000460 79 0d 00 26 0c 7f f2 47 28 21 55 25 29 0d 00 27 |y..&...G(!U%)..'|
00000470 05 cb 0d 00 28 29 c9 34 3a e7 30 3c 3e 30 8c c8 |....().4:.0<>0..|
00000480 99 26 34 30 30 45 39 2c 33 36 2c 2c 22 70 74 72 |.&400E9,36,,"ptr|
00000490 5f 64 65 66 61 75 6c 74 22 2c 31 0d 00 29 06 c9 |_default",1..)..|
000004a0 35 0d 00 2a 29 c9 36 3a e7 49 75 25 8c f2 65 28 |5..*).6:.Iu%..e(|
000004b0 55 25 21 26 43 2c 55 25 21 31 36 2c 55 25 21 38 |U%!&C,U%!16,U%!8|
000004c0 2c 21 55 25 2c 55 25 21 34 29 0d 00 2b 06 c9 37 |,!U%,U%!4)..+..7|
000004d0 0d 00 2c 1a c9 38 3a f2 60 4a 28 21 55 25 2c 55 |..,..8:.`J(!U%,U|
000004e0 25 21 34 2c 55 25 21 32 34 29 0d 00 2d 0a c9 39 |%!4,U%!24)..-..9|
000004f0 3a f2 42 4a 0d 00 2e 0e c9 31 37 2c 31 38 3a f2 |:.BJ.....17,18:.|
00000500 67 75 0d 00 2f 1f c9 31 39 3a e7 55 25 21 34 3d |gu../..19:.U%!4=|
00000510 73 75 25 80 55 25 21 31 36 3d 26 34 41 46 38 30 |su%.U%!16=&4AF80|
00000520 8c 0d 00 30 31 41 24 3d a4 4e 28 55 25 2b 32 30 |...01A$=.N(U%+20|
00000530 29 3a e7 6a 4a 25 3d 31 80 a4 74 28 22 41 6c 69 |):.jJ%=1..t("Ali|
00000540 61 73 24 55 52 4c 4f 70 65 6e 5f 48 54 54 50 22 |as$URLOpen_HTTP"|
00000550 29 8c 0d 00 31 1f c8 99 26 34 30 30 44 45 2c 22 |)...1...&400DE,"|
00000560 55 52 4c 4f 70 65 6e 5f 48 54 54 50 20 22 2b 41 |URLOpen_HTTP "+A|
00000570 24 0d 00 32 28 cd 3a e7 6a 4a 25 3d 32 80 a4 74 |$..2(.:.jJ%=2..t|
00000580 28 22 41 6c 69 61 73 24 55 52 4c 4f 70 65 6e 5f |("Alias$URLOpen_|
00000590 4d 61 69 6c 54 6f 22 29 8c 0d 00 33 21 c8 99 26 |MailTo")...3!..&|
000005a0 34 30 30 44 45 2c 22 55 52 4c 4f 70 65 6e 5f 4d |400DE,"URLOpen_M|
000005b0 61 69 6c 54 6f 20 22 2b 41 24 0d 00 34 05 cd 0d |ailTo "+A$..4...|
000005c0 00 35 05 cd 0d 00 36 10 cb 3a e7 44 75 25 8c f2 |.5....6..:.Du%..|
000005d0 56 79 3a e0 0d 00 37 05 e1 0d 00 38 2a dd a4 56 |Vy:...7....8*..V|
000005e0 79 3d 28 72 79 25 3c 3e 55 25 21 31 36 2d 55 25 |y=(ry%<>U%!16-U%|
000005f0 21 38 84 78 79 25 3c 3e 55 25 21 26 43 2d 55 25 |!8.xy%<>U%!&C-U%|
00000600 21 34 29 0d 00 39 42 dd f2 75 ea 41 25 2c 53 25 |!4)..9B..u.A%,S%|
00000610 2c 4d 25 2c 48 25 2c 52 25 2c 4d 24 2c 72 69 25 |,M%,H%,R%,M$,ri%|
00000620 2c 76 69 25 2c 62 69 25 2c 68 69 25 2c 52 6c 25 |,vi%,bi%,hi%,Rl%|
00000630 2c 49 24 3a e7 28 71 79 25 80 34 29 3d 34 80 4d |,I$:.(qy%.4)=4.M|
00000640 4a 25 3d 30 8c 0d 00 3a c7 4d 24 3d a4 4b 28 22 |J%=0...:.M$=.K("|
00000650 25 31 32 25 6d 69 25 73 65 22 29 3a 48 25 3d bb |%12%mi%se"):H%=.|
00000660 c0 4d 24 2c 32 29 3a 4d 25 3d bb c1 4d 24 2c 33 |.M$,2):M%=..M$,3|
00000670 2c 32 29 3a 53 25 3d bb c1 4d 24 2c 35 2c 32 29 |,2):S%=..M$,5,2)|
00000680 3a 4d 25 3d 4d 25 2a 36 3a 53 25 3d 53 25 2a 36 |:M%=M%*6:S%=S%*6|
00000690 3a 48 25 3d 48 25 2a 33 30 2b 4d 25 2f 26 43 3a |:H%=H%*30+M%/&C:|
000006a0 52 6c 25 3d b9 3a c8 99 34 36 2c 33 31 36 2c 5a |Rl%=.:..46,316,Z|
000006b0 5f 25 2c 22 63 6c 6f 63 6b 22 2c 30 b8 72 69 25 |_%,"clock",0.ri%|
000006c0 2c 76 69 25 2c 62 69 25 2c 68 69 25 3a e6 31 3a |,vi%,bi%,hi%:.1:|
000006d0 c8 93 c8 90 30 2c 30 2c 55 5f 25 2c 43 75 25 3a |....0,0,U_%,Cu%:|
000006e0 52 25 3d 35 36 3a c8 91 55 5f 25 2f 32 2c 43 75 |R%=56:..U_%/2,Cu|
000006f0 25 2f 32 3a e6 50 25 28 30 29 3a c8 8f c8 90 30 |%/2:.P%(0):....0|
00000700 2c 30 2c 52 25 3a e6 50 25 28 33 29 0d 00 3b ea |,0,R%:.P%(3)..;.|
00000710 e3 41 25 3d 30 b8 33 33 30 88 33 30 3a 86 52 25 |.A%=0.330.30:.R%|
00000720 2a b5 b2 41 25 2c 52 25 2a 9b b2 41 25 2c 28 52 |*..A%,R%*..A%,(R|
00000730 25 2d 26 41 29 2a b5 b2 41 25 2c 28 52 25 2d 26 |%-&A)*..A%,(R%-&|
00000740 41 29 2a 9b b2 41 25 3a ed 3a e6 50 25 28 31 29 |A)*..A%:.:.P%(1)|
00000750 2b 28 50 25 28 31 29 2d 50 25 28 32 29 29 2a 28 |+(P%(1)-P%(2))*(|
00000760 73 5f 25 80 ac 49 75 25 29 3a c8 8f 30 2c 30 2c |s_%..Iu%):..0,0,|
00000770 52 25 3a e6 50 25 28 35 29 3a ec 30 2c 30 3a ec |R%:.P%(5):.0,0:.|
00000780 28 52 25 2a 30 2e 33 35 29 2a b5 b2 28 4d 25 2d |(R%*0.35)*..(M%-|
00000790 39 29 2c 28 52 25 2a 30 2e 33 35 29 2a 9b b2 28 |9),(R%*0.35)*..(|
000007a0 4d 25 2d 39 29 3a f0 38 35 2c 28 52 25 2a 30 2e |M%-9):.85,(R%*0.|
000007b0 33 35 29 2a b5 b2 28 4d 25 2b 39 29 2c 28 52 25 |35)*..(M%+9),(R%|
000007c0 2a 30 2e 33 35 29 2a 9b b2 28 4d 25 2b 39 29 3a |*0.35)*..(M%+9):|
000007d0 ec 28 52 25 2a 30 2e 33 35 29 2a b5 b2 28 4d 25 |.(R%*0.35)*..(M%|
000007e0 2d 39 29 2c 28 52 25 2a 30 2e 33 35 29 2a 9b b2 |-9),(R%*0.35)*..|
000007f0 28 4d 25 2d 39 29 0d 00 3c d8 f0 38 35 2c 28 52 |(M%-9)..<..85,(R|
00000800 25 2a 30 2e 37 29 2a b5 b2 4d 25 2c 28 52 25 2a |%*0.7)*..M%,(R%*|
00000810 30 2e 37 29 2a 9b b2 4d 25 3a e6 50 25 28 34 29 |0.7)*..M%:.P%(4)|
00000820 3a ec 30 2c 30 3a ec 28 52 25 2a 30 2e 32 35 29 |:.0,0:.(R%*0.25)|
00000830 2a b5 b2 28 48 25 2d 39 29 2c 28 52 25 2a 30 2e |*..(H%-9),(R%*0.|
00000840 32 35 29 2a 9b b2 28 48 25 2d 39 29 3a f0 38 35 |25)*..(H%-9):.85|
00000850 2c 28 52 25 2a 30 2e 32 35 29 2a b5 b2 28 48 25 |,(R%*0.25)*..(H%|
00000860 2b 39 29 2c 28 52 25 2a 30 2e 32 35 29 2a 9b b2 |+9),(R%*0.25)*..|
00000870 28 48 25 2b 39 29 3a ec 28 52 25 2a 30 2e 32 35 |(H%+9):.(R%*0.25|
00000880 29 2a b5 b2 28 48 25 2d 39 29 2c 28 52 25 2a 30 |)*..(H%-9),(R%*0|
00000890 2e 32 35 29 2a 9b b2 28 48 25 2d 39 29 3a f0 38 |.25)*..(H%-9):.8|
000008a0 35 2c 28 52 25 2a 30 2e 35 29 2a b5 b2 48 25 2c |5,(R%*0.5)*..H%,|
000008b0 28 52 25 2a 30 2e 35 29 2a 9b b2 48 25 3a e6 50 |(R%*0.5)*..H%:.P|
000008c0 25 28 36 29 3a c8 8f c8 90 30 2c 30 2c 32 0d 00 |%(6):....0,0,2..|
000008d0 3d 2b e7 71 79 25 80 32 8c 86 30 2c 30 2c 28 52 |=+.qy%.2..0,0,(R|
000008e0 25 2a 30 2e 39 29 2a b5 b2 53 25 2c 28 52 25 2a |%*0.9)*..S%,(R%*|
000008f0 30 2e 39 29 2a 9b b2 53 25 0d 00 3e 18 c8 99 34 |0.9)*..S%..>...4|
00000900 36 2c 72 69 25 2c 76 69 25 2c 62 69 25 2c 68 69 |6,ri%,vi%,bi%,hi|
00000910 25 0d 00 3f 17 cc 3a e7 28 71 79 25 80 38 29 3d |%..?..:.(qy%.8)=|
00000920 38 84 4d 4a 25 3e 30 8c 0d 00 40 41 c8 99 26 34 |8.MJ%>0...@A..&4|
00000930 30 30 45 43 2c 2d 31 2c 2d 31 b8 2c 2c 48 25 3a |00EC,-1,-1.,,H%:|
00000940 4d 24 3d c3 28 48 25 81 26 34 30 30 29 2b 22 6b |M$=.(H%.&400)+"k|
00000950 22 3a e7 24 61 4a 25 3c 3e 4d 24 8c 24 61 4a 25 |":.$aJ%<>M$.$aJ%|
00000960 3d 4d 24 3a 52 6c 25 3d b9 0d 00 41 12 cc 3a e7 |=M$:Rl%=...A..:.|
00000970 28 71 79 25 80 31 36 29 3d 30 8c 0d 00 42 23 4d |(qy%.16)=0...B#M|
00000980 24 3d 22 3a 25 6d 69 22 3a e7 28 71 79 25 80 32 |$=":%mi":.(qy%.2|
00000990 29 3d 32 8c 4d 24 2b 3d 22 2e 25 73 65 22 0d 00 |)=2.M$+=".%se"..|
000009a0 43 29 e7 72 5f 25 8c 4d 24 3d 22 25 7a 32 34 22 |C).r_%.M$="%z24"|
000009b0 2b 4d 24 8b 4d 24 3d 22 25 7a 31 32 22 2b 4d 24 |+M$.M$="%z12"+M$|
000009c0 2b 22 20 25 61 6d 22 0d 00 44 0a cc 4d 24 3d 4e |+" %am"..D..M$=N|
000009d0 24 0d 00 45 27 cd 3a 4d 24 3d a4 4b 28 4d 24 29 |$..E'.:M$=.K(M$)|
000009e0 3a e7 4d 24 3c 3e 24 61 4a 25 8c 24 61 4a 25 3d |:.M$<>$aJ%.$aJ%=|
000009f0 4d 24 3a 52 6c 25 3d b9 0d 00 46 05 cd 0d 00 47 |M$:Rl%=...F....G|
00000a00 42 cd 3a e7 52 6c 25 8c 21 55 25 3d 2d 31 2d 37 |B.:.Rl%.!U%=-1-7|
00000a10 2a 94 28 75 5f 25 29 3a 55 25 21 34 3d 4e 4a 25 |*.(u_%):U%!4=NJ%|
00000a20 3a 55 25 21 38 3d 30 3a 55 25 21 26 43 3d 30 3a |:U%!8=0:U%!&C=0:|
00000a30 c8 99 26 34 30 30 43 44 2c 2c 55 25 3a c8 96 0d |..&400CD,,U%:...|
00000a40 00 48 05 e1 0d 00 49 22 dd f2 49 5f 3a e7 55 79 |.H....I"..I_:.Uy|
00000a50 25 3c 3e a4 49 84 62 79 25 3c 3e a4 56 84 46 79 |%<>.I.by%<>.V.Fy|
00000a60 25 3c 3e a4 4c 8c 0d 00 4a 39 71 4a 25 3d a4 46 |%<>.L...J9qJ%=.F|
00000a70 28 30 2c 30 2c 55 79 25 2c 62 79 25 2c 46 79 25 |(0,0,Uy%,by%,Fy%|
00000a80 29 3a 46 79 25 3d a4 4c 3a 62 79 25 3d a4 56 3a |):Fy%=.L:by%=.V:|
00000a90 55 79 25 3d a4 49 3a e7 78 4a 25 8c f2 50 79 0d |Uy%=.I:.xJ%..Py.|
00000aa0 00 4b 11 e7 56 79 25 8c 70 79 25 3d 30 3a f2 4f |.K..Vy%.py%=0:.O|
00000ab0 0d 00 4c 1e 50 75 25 3d b9 3a 56 5f 25 3d 74 25 |..L.Pu%=.:V_%=t%|
00000ac0 3a 7a 5f 25 3d 76 25 3a f2 4a 5f 3a f2 63 0d 00 |:z_%=v%:.J_:.c..|
00000ad0 4d 24 cd 3a e7 78 4a 25 80 6d 4a 25 3c 3e 30 8c |M$.:.xJ%.mJ%<>0.|
00000ae0 e7 a4 47 28 6d 4a 25 2c a4 7a 29 3c 3e 31 8c f2 |..G(mJ%,.z)<>1..|
00000af0 67 4a 0d 00 4e 22 e7 72 4a 25 3c 3e 2d 31 8c e7 |gJ..N".rJ%<>-1..|
00000b00 a4 47 28 72 4a 25 21 26 43 2c a4 7a 29 3c 3e 31 |.G(rJ%!&C,.z)<>1|
00000b10 8c f2 79 75 0d 00 4f 23 e7 4a 5f 25 3e 30 8c ef |..yu..O#.J_%>0..|
00000b20 37 3a 4a 5f 25 2d 3d 31 3a e7 4a 5f 25 3d 30 8c |7:J_%-=1:.J_%=0.|
00000b30 4a 5f 25 3d 2d 26 41 0d 00 50 1f e7 4a 5f 25 3c |J_%=-&A..P..J_%<|
00000b40 30 8c 4a 5f 25 2b 3d 31 3a e7 4a 5f 25 3d 30 8c |0.J_%+=1:.J_%=0.|
00000b50 4a 5f 25 3d 26 41 0d 00 51 1e e7 4d 4a 25 3e 30 |J_%=&A..Q..MJ%>0|
00000b60 8c 4d 4a 25 2d 3d 31 3a e7 4d 4a 25 3d 30 8c f2 |.MJ%-=1:.MJ%=0..|
00000b70 6d 3a f2 75 0d 00 52 0d 64 69 25 3d a4 51 79 3a |m:.u..R.di%=.Qy:|
00000b80 e1 0d 00 53 36 dd a4 4b 28 41 24 29 3a 3f 4a 25 |...S6..K(A$):?J%|
00000b90 3d 33 3a c8 99 37 2c 26 45 2c 4a 25 3a c8 99 26 |=3:..7,&E,J%:..&|
00000ba0 43 31 2c 4a 25 2c 4a 25 2c 26 38 30 2c 41 24 3a |C1,J%,J%,&80,A$:|
00000bb0 3d a4 4e 28 4a 25 29 0d 00 54 12 dd a4 66 3d bb |=.N(J%)..T...f=.|
00000bc0 a4 4b 28 22 25 32 34 22 29 0d 00 55 12 dd a4 69 |.K("%24")..U...i|
00000bd0 3d bb a4 4b 28 22 25 4d 49 22 29 0d 00 56 13 dd |=..K("%MI")..V..|
00000be0 a4 51 79 3d bb a4 4b 28 22 25 53 45 22 29 0d 00 |.Qy=..K("%SE")..|
00000bf0 57 12 dd a4 49 3d bb a4 4b 28 22 25 44 59 22 29 |W...I=..K("%DY")|
00000c00 0d 00 58 12 dd a4 56 3d bb a4 4b 28 22 25 4d 4e |..X...V=..K("%MN|
00000c10 22 29 0d 00 59 15 dd a4 4c 3d bb a4 4b 28 22 25 |")..Y...L=..K("%|
00000c20 43 45 25 59 52 22 29 0d 00 5a 3f dd a4 46 28 66 |CE%YR")..Z?..F(f|
00000c30 79 25 2c 62 25 2c 63 25 2c 72 25 2c 51 25 29 3d |y%,b%,c%,r%,Q%)=|
00000c40 66 79 25 84 28 62 25 3c 3c 36 29 84 28 63 25 3c |fy%.(b%<<6).(c%<|
00000c50 3c 26 42 29 84 28 72 25 3c 3c 31 36 29 84 28 51 |<&B).(r%<<16).(Q|
00000c60 25 3c 3c 32 30 29 0d 00 5b 69 dd f2 50 28 73 25 |%<<20)..[i..P(s%|
00000c70 2c f8 66 79 25 2c f8 62 25 2c f8 63 25 2c f8 72 |,.fy%,.b%,.c%,.r|
00000c80 25 2c f8 51 25 29 3a 66 79 25 3d 73 25 80 36 33 |%,.Q%):fy%=s%.63|
00000c90 3a 62 25 3d 28 73 25 3e 3e 36 29 80 33 31 3a 63 |:b%=(s%>>6).31:c|
00000ca0 25 3d 28 73 25 3e 3e 26 42 29 80 33 31 3a 72 25 |%=(s%>>&B).31:r%|
00000cb0 3d 28 73 25 3e 3e 31 36 29 80 26 46 3a 51 25 3d |=(s%>>16).&F:Q%=|
00000cc0 28 73 25 3e 3e 32 30 29 80 26 46 46 46 3a e1 0d |(s%>>20).&FFF:..|
00000cd0 00 5c 14 dd a4 6e 28 73 25 29 3d 73 25 80 ac 26 |.\...n(s%)=s%..&|
00000ce0 37 46 46 0d 00 5d 12 dd a4 76 79 28 73 25 29 3d |7FF..]...vy(s%)=|
00000cf0 73 25 80 36 33 0d 00 5e 17 dd a4 58 79 28 73 25 |s%.63..^...Xy(s%|
00000d00 29 3d 28 73 25 3e 3e 36 29 80 33 31 0d 00 5f 1a |)=(s%>>6).31.._.|
00000d10 dd a4 7a 3d a4 46 28 a4 69 2c a4 66 2c a4 49 2c |..z=.F(.i,.f,.I,|
00000d20 a4 56 2c a4 4c 29 0d 00 60 45 dd a4 47 28 41 25 |.V,.L)..`E..G(A%|
00000d30 2c 42 25 29 3a ea 42 69 25 2c 6a 6c 25 2c 4c 69 |,B%):.Bi%,jl%,Li|
00000d40 25 2c 65 69 25 2c 4b 69 25 2c 59 5f 25 3a ea 57 |%,ei%,Ki%,Y_%:.W|
00000d50 69 25 2c 4a 69 25 2c 51 69 25 2c 73 69 25 2c 61 |i%,Ji%,Qi%,si%,a|
00000d60 69 25 3a e7 41 25 3c 3e 42 25 8c 0d 00 61 3e f2 |i%:.A%<>B%...a>.|
00000d70 50 28 41 25 2c 4b 69 25 2c 65 69 25 2c 4c 69 25 |P(A%,Ki%,ei%,Li%|
00000d80 2c 6a 6c 25 2c 42 69 25 29 3a f2 50 28 42 25 2c |,jl%,Bi%):.P(B%,|
00000d90 61 69 25 2c 73 69 25 2c 51 69 25 2c 4a 69 25 2c |ai%,si%,Qi%,Ji%,|
00000da0 57 69 25 29 3a c8 8e b9 ca 0d 00 62 12 c9 42 69 |Wi%):......b..Bi|
00000db0 25 3e 57 69 25 3a 59 5f 25 3d 31 0d 00 63 13 c9 |%>Wi%:Y_%=1..c..|
00000dc0 42 69 25 3c 57 69 25 3a 59 5f 25 3d 2d 31 0d 00 |Bi%<Wi%:Y_%=-1..|
00000dd0 64 12 c9 6a 6c 25 3e 4a 69 25 3a 59 5f 25 3d 31 |d..jl%>Ji%:Y_%=1|
00000de0 0d 00 65 13 c9 6a 6c 25 3c 4a 69 25 3a 59 5f 25 |..e..jl%<Ji%:Y_%|
00000df0 3d 2d 31 0d 00 66 12 c9 4c 69 25 3e 51 69 25 3a |=-1..f..Li%>Qi%:|
00000e00 59 5f 25 3d 31 0d 00 67 13 c9 4c 69 25 3c 51 69 |Y_%=1..g..Li%<Qi|
00000e10 25 3a 59 5f 25 3d 2d 31 0d 00 68 12 c9 65 69 25 |%:Y_%=-1..h..ei%|
00000e20 3e 73 69 25 3a 59 5f 25 3d 31 0d 00 69 13 c9 65 |>si%:Y_%=1..i..e|
00000e30 69 25 3c 73 69 25 3a 59 5f 25 3d 2d 31 0d 00 6a |i%<si%:Y_%=-1..j|
00000e40 12 c9 4b 69 25 3e 61 69 25 3a 59 5f 25 3d 31 0d |..Ki%>ai%:Y_%=1.|
00000e50 00 6b 13 c9 4b 69 25 3c 61 69 25 3a 59 5f 25 3d |.k..Ki%<ai%:Y_%=|
00000e60 2d 31 0d 00 6c 05 cb 0d 00 6d 0a cc 59 5f 25 3d |-1..l....m..Y_%=|
00000e70 30 0d 00 6e 0a cd 3a 3d 59 5f 25 0d 00 6f 77 dd |0..n..:=Y_%..ow.|
00000e80 f2 65 75 28 5f 25 2c 51 25 2c 52 79 25 29 c8 99 |.eu(_%,Q%,Ry%)..|
00000e90 26 34 30 30 45 36 2c 35 3a c8 93 c8 90 5f 25 2b |&400E6,5:...._%+|
00000ea0 32 30 2c 51 25 2c 33 36 2d 32 30 2c 32 30 3a c8 |20,Q%,36-20,20:.|
00000eb0 93 c8 90 5f 25 2b 32 30 2c 51 25 2b 4e 79 25 2c |..._%+20,Q%+Ny%,|
00000ec0 33 36 2d 32 30 2c 2d 32 30 3a c8 99 26 34 30 30 |36-20,-20:..&400|
00000ed0 45 36 2c 52 79 25 3a c8 93 c8 90 5f 25 2c 51 25 |E6,Ry%:...._%,Q%|
00000ee0 2b 32 30 2c 33 36 2d 32 30 2c 4e 79 25 2d 32 2a |+20,36-20,Ny%-2*|
00000ef0 32 30 0d 00 70 9c c8 93 c8 90 5f 25 2b 33 36 2c |20..p....._%+36,|
00000f00 51 25 2b 32 2a 32 30 2c 2d 32 30 2c 4e 79 25 2d |Q%+2*20,-20,Ny%-|
00000f10 34 2a 32 30 3a f2 54 28 35 2c 52 79 25 2c 5f 25 |4*20:.T(5,Ry%,_%|
00000f20 2b 32 30 2c 51 25 2c 32 30 2c 32 29 3a f2 54 28 |+20,Q%,20,2):.T(|
00000f30 35 2c 52 79 25 2c 5f 25 2b 32 30 2c 51 25 2b 4e |5,Ry%,_%+20,Q%+N|
00000f40 79 25 2c 32 30 2c 33 29 3a f2 54 28 52 79 25 2c |y%,20,3):.T(Ry%,|
00000f50 35 2c 5f 25 2b 33 36 2d 32 30 2c 51 25 2b 32 2a |5,_%+36-20,Q%+2*|
00000f60 32 30 2c 32 30 2c 34 29 3a f2 54 28 52 79 25 2c |20,20,4):.T(Ry%,|
00000f70 35 2c 5f 25 2b 33 36 2d 32 30 2c 51 25 2b 4e 79 |5,_%+36-20,Q%+Ny|
00000f80 25 2d 32 2a 32 30 2c 32 30 2c 31 29 3a e1 0d 00 |%-2*20,20,1):...|
00000f90 71 96 dd f2 77 75 28 5f 25 2c 51 25 2c 52 79 25 |q...wu(_%,Q%,Ry%|
00000fa0 29 c8 99 26 34 30 30 45 36 2c 35 3a c8 93 c8 90 |)..&400E6,5:....|
00000fb0 5f 25 2d 32 30 2c 51 25 2c 32 30 2d 33 36 2c 32 |_%-20,Q%,20-36,2|
00000fc0 30 3a c8 93 c8 90 5f 25 2d 32 30 2c 51 25 2b 4e |0:...._%-20,Q%+N|
00000fd0 79 25 2c 32 30 2d 33 36 2c 2d 32 30 3a c8 99 26 |y%,20-36,-20:..&|
00000fe0 34 30 30 45 36 2c 52 79 25 3a c8 93 c8 90 5f 25 |400E6,Ry%:...._%|
00000ff0 2c 51 25 2b 32 30 2c 2d 33 36 2b 32 30 2c 4e 79 |,Q%+20,-36+20,Ny|
00001000 25 2d 32 2a 32 30 3a c8 93 c8 90 5f 25 2d 33 36 |%-2*20:...._%-36|
00001010 2c 51 25 2b 32 2a 32 30 2c 32 30 2c 4e 79 25 2d |,Q%+2*20,20,Ny%-|
00001020 34 2a 32 30 0d 00 72 7d f2 54 28 35 2c 52 79 25 |4*20..r}.T(5,Ry%|
00001030 2c 5f 25 2d 32 30 2c 51 25 2c 32 30 2c 31 29 3a |,_%-20,Q%,20,1):|
00001040 f2 54 28 35 2c 52 79 25 2c 5f 25 2d 32 30 2c 51 |.T(5,Ry%,_%-20,Q|
00001050 25 2b 4e 79 25 2c 32 30 2c 34 29 3a f2 54 28 52 |%+Ny%,20,4):.T(R|
00001060 79 25 2c 35 2c 5f 25 2d 33 36 2b 32 30 2c 51 25 |y%,5,_%-36+20,Q%|
00001070 2b 32 2a 32 30 2c 32 30 2c 33 29 3a f2 54 28 52 |+2*20,20,3):.T(R|
00001080 79 25 2c 35 2c 5f 25 2d 33 36 2b 32 30 2c 51 25 |y%,5,_%-36+20,Q%|
00001090 2b 4e 79 25 2d 32 2a 32 30 2c 32 30 2c 32 29 3a |+Ny%-2*20,20,2):|
000010a0 e1 0d 00 73 35 dd f2 54 5f 28 65 25 2c 61 25 2c |...s5..T_(e%,a%,|
000010b0 4b 25 29 3a e7 65 25 3d 69 25 8c f2 5a 75 28 65 |K%):.e%=i%..Zu(e|
000010c0 25 2c 61 25 2c 4b 25 29 8b f2 43 75 28 65 25 2c |%,a%,K%)..Cu(e%,|
000010d0 61 25 2c 4b 25 29 0d 00 74 05 e1 0d 00 75 97 dd |a%,K%)..t....u..|
000010e0 f2 5a 75 28 65 25 2c 61 25 2c 4b 25 29 ea 41 25 |.Zu(e%,a%,K%).A%|
000010f0 2c 5f 25 2c 51 25 2c 59 25 3a ea 62 6c 25 2c 6c |,_%,Q%,Y%:.bl%,l|
00001100 69 25 2c 70 69 25 3a c8 99 34 36 2c 34 30 2b 32 |i%,pi%:..46,40+2|
00001110 35 36 2c 5a 5f 25 2c 22 72 69 6e 67 22 b8 2c 2c |56,Z_%,"ring".,,|
00001120 2c 6c 69 25 2c 70 69 25 3a c8 99 26 34 30 30 45 |,li%,pi%:..&400E|
00001130 36 2c 30 3a f2 58 28 61 25 2b 64 79 25 2d 33 32 |6,0:.X(a%+dy%-32|
00001140 2c 4b 25 2d 6f 25 2c 6a 25 2b 33 32 2c 2d 6d 25 |,K%-o%,j%+32,-m%|
00001150 29 3a e7 74 25 3e 30 8c f2 58 28 61 25 2b 79 79 |):.t%>0..X(a%+yy|
00001160 25 2c 4b 25 2d 6f 25 2c 6a 25 2b 33 32 2c 2d 6d |%,K%-o%,j%+32,-m|
00001170 25 29 0d 00 76 8b c8 99 26 34 30 30 45 36 2c 31 |%)..v...&400E6,1|
00001180 3a f2 58 28 61 25 2c 4b 25 2c 35 2c 2d 72 79 25 |:.X(a%,K%,5,-ry%|
00001190 29 3a f2 58 28 61 25 2b 69 5f 25 2b 33 36 2b 32 |):.X(a%+i_%+36+2|
000011a0 30 2c 4b 25 2c 35 2c 2d 72 79 25 29 3a f2 58 28 |0,K%,5,-ry%):.X(|
000011b0 61 25 2c 4b 25 2c 78 79 25 2c 2d 35 29 3a f2 58 |a%,K%,xy%,-5):.X|
000011c0 28 61 25 2c 4b 25 2d 72 79 25 2c 78 79 25 2c 35 |(a%,K%-ry%,xy%,5|
000011d0 29 3a c8 99 26 34 30 30 45 36 2c 35 3a e7 74 25 |):..&400E6,5:.t%|
000011e0 3d 30 8c f2 58 28 61 25 2b 79 79 25 2c 4b 25 2d |=0..X(a%+yy%,K%-|
000011f0 6f 25 2c 6a 25 2b 33 32 2c 2d 6d 25 29 0d 00 77 |o%,j%+32,-m%)..w|
00001200 21 e7 74 25 3d 30 8c f2 58 28 61 25 2b 47 4a 25 |!.t%=0..X(a%+GJ%|
00001210 2c 4b 25 2d 6f 25 2c 33 32 2c 2d 6d 25 29 0d 00 |,K%-o%,32,-m%)..|
00001220 78 f8 f2 58 28 61 25 2b 6c 5f 25 2c 4b 25 2d 6f |x..X(a%+l_%,K%-o|
00001230 25 2d 74 25 2a 4e 79 25 2c 33 36 2c 2d 6d 25 2b |%-t%*Ny%,36,-m%+|
00001240 74 25 2a 4e 79 25 29 3a f2 58 28 61 25 2b 69 5f |t%*Ny%):.X(a%+i_|
00001250 25 2c 4b 25 2d 6f 25 2c 33 36 2c 2d 4e 79 25 2a |%,K%-o%,36,-Ny%*|
00001260 74 25 29 3a f2 58 28 61 25 2b 69 5f 25 2c 4b 25 |t%):.X(a%+i_%,K%|
00001270 2d 6f 25 2d 69 79 25 2a 4e 79 25 2c 33 36 2c 2d |-o%-iy%*Ny%,36,-|
00001280 6d 25 2b 69 79 25 2a 4e 79 25 29 3a f2 58 28 61 |m%+iy%*Ny%):.X(a|
00001290 25 2b 35 2c 4b 25 2d 35 2c 32 30 2c 2d 6d 25 2d |%+5,K%-5,20,-m%-|
000012a0 32 2a 32 30 29 3a f2 58 28 61 25 2b 35 2c 4b 25 |2*20):.X(a%+5,K%|
000012b0 2d 35 2c 78 79 25 2d 32 2a 35 2c 2d 32 30 29 3a |-5,xy%-2*5,-20):|
000012c0 f2 58 28 61 25 2b 78 79 25 2d 35 2c 4b 25 2d 35 |.X(a%+xy%-5,K%-5|
000012d0 2c 2d 32 30 2c 2d 6d 25 2d 32 2a 32 30 29 3a f2 |,-20,-m%-2*20):.|
000012e0 58 28 61 25 2b 35 2c 4b 25 2d 72 79 25 2b 35 2c |X(a%+5,K%-ry%+5,|
000012f0 78 79 25 2d 32 2a 35 2c 32 30 29 3a e7 a4 53 28 |xy%-2*5,20):..S(|
00001300 61 25 2b 47 4a 25 2c 4b 25 2d 6f 25 2c 26 36 34 |a%+GJ%,K%-o%,&64|
00001310 2c 2d 6d 25 29 8c 0d 00 79 8d c8 93 c8 90 61 25 |,-m%)...y.....a%|
00001320 2b 47 4a 25 2b 33 32 2c 4b 25 2d 6f 25 2c 26 36 |+GJ%+32,K%-o%,&6|
00001330 34 2d 32 2a 33 32 2c 2d 6d 25 3a 5f 25 3d a4 61 |4-2*32,-m%:_%=.a|
00001340 28 61 25 2b 47 4a 25 2b 26 36 34 2f 32 29 3a 59 |(a%+GJ%+&64/2):Y|
00001350 25 3d a4 61 28 4b 25 2d 6f 25 2d 6d 25 2f 28 5f |%=.a(K%-o%-m%/(_|
00001360 4a 25 2b 31 29 29 3a e3 41 25 3d 31 b8 5f 4a 25 |J%+1)):.A%=1._J%|
00001370 3a e7 a4 53 28 5f 25 2d 34 30 2d 38 2c 59 25 2d |:..S(_%-40-8,Y%-|
00001380 38 2c 32 2a 28 34 30 2b 38 29 2c 34 30 2b 38 29 |8,2*(40+8),40+8)|
00001390 80 28 4b 75 25 80 31 3c 3c 28 41 25 2d 31 29 29 |.(Ku%.1<<(A%-1))|
000013a0 3e 30 8c 0d 00 7a 5b c8 99 26 34 30 30 45 44 2c |>0...z[..&400ED,|
000013b0 32 35 36 2c 5a 5f 25 2c 22 72 69 6e 67 22 2c 2c |256,Z_%,"ring",,|
000013c0 2c 2c 4a 25 2c 4a 25 2b 26 38 30 3a c8 99 34 36 |,,J%,J%+&80:..46|
000013d0 2c 35 32 2b 32 35 36 2c 5a 5f 25 2c 22 72 69 6e |,52+256,Z_%,"rin|
000013e0 67 22 2c 5f 25 2d 6c 69 25 2c 59 25 2d 70 69 25 |g",_%-li%,Y%-pi%|
000013f0 2f 32 2c 38 2c 4a 25 2c 4a 25 2b 26 38 30 0d 00 |/2,8,J%,J%+&80..|
00001400 7b 1a cd 3a 59 25 2d 3d a4 61 28 6d 25 2f 28 5f |{..:Y%-=.a(m%/(_|
00001410 4a 25 2b 31 29 29 3a ed 0d 00 7c 39 cd 3a e7 a4 |J%+1)):...|9.:..|
00001420 53 28 61 25 2b 35 2c 4b 25 2d 35 2d 32 30 2c 32 |S(a%+5,K%-5-20,2|
00001430 30 2c 32 30 29 f2 54 28 35 2c 31 2c 61 25 2b 35 |0,20).T(5,1,a%+5|
00001440 2b 32 30 2c 4b 25 2d 35 2d 32 30 2c 32 30 2c 32 |+20,K%-5-20,20,2|
00001450 29 0d 00 7d 3c e7 a4 53 28 61 25 2b 35 2c 4b 25 |)..}<..S(a%+5,K%|
00001460 2d 72 79 25 2b 35 2c 32 30 2c 32 30 29 f2 54 28 |-ry%+5,20,20).T(|
00001470 35 2c 31 2c 61 25 2b 35 2b 32 30 2c 4b 25 2d 72 |5,1,a%+5+20,K%-r|
00001480 79 25 2b 35 2b 32 30 2c 32 30 2c 33 29 0d 00 7e |y%+5+20,20,3)..~|
00001490 42 e7 a4 53 28 61 25 2b 78 79 25 2d 35 2d 32 30 |B..S(a%+xy%-5-20|
000014a0 2c 4b 25 2d 35 2d 32 30 2c 32 30 2c 32 30 29 f2 |,K%-5-20,20,20).|
000014b0 54 28 35 2c 31 2c 61 25 2b 78 79 25 2d 35 2d 32 |T(5,1,a%+xy%-5-2|
000014c0 30 2c 4b 25 2d 35 2d 32 30 2c 32 30 2c 31 29 0d |0,K%-5-20,20,1).|
000014d0 00 7f 47 e7 a4 53 28 61 25 2b 78 79 25 2d 35 2d |..G..S(a%+xy%-5-|
000014e0 32 30 2c 4b 25 2d 72 79 25 2b 35 2c 32 30 2c 32 |20,K%-ry%+5,20,2|
000014f0 30 29 f2 54 28 35 2c 31 2c 61 25 2b 78 79 25 2d |0).T(5,1,a%+xy%-|
00001500 35 2d 32 30 2c 4b 25 2d 72 79 25 2b 35 2b 32 30 |5-20,K%-ry%+5+20|
00001510 2c 32 30 2c 34 29 0d 00 80 3d c8 99 26 34 30 30 |,20,4)...=..&400|
00001520 38 31 2c 2c 22 48 6f 6d 65 72 74 6f 6e 2e 4d 65 |81,,"Homerton.Me|
00001530 64 69 75 6d 22 2c 26 39 36 2c 26 39 36 b8 62 6c |dium",&96,&96.bl|
00001540 25 3a e3 41 25 3d 31 b8 69 79 25 3a e7 74 25 3c |%:.A%=1.iy%:.t%<|
00001550 41 25 8c 0d 00 81 26 e7 a4 53 28 61 25 2b 69 5f |A%....&..S(a%+i_|
00001560 25 2c 4b 25 2d 6f 25 2d 28 4e 79 25 2a 41 25 29 |%,K%-o%-(Ny%*A%)|
00001570 2c 33 36 2c 4e 79 25 29 8c 0d 00 82 6e f2 65 75 |,36,Ny%)....n.eu|
00001580 28 61 25 2b 69 5f 25 2c 4b 25 2d 6f 25 2d 28 4e |(a%+i_%,K%-o%-(N|
00001590 79 25 2a 41 25 29 2c 44 25 28 41 25 29 29 3a f2 |y%*A%),D%(A%)):.|
000015a0 56 28 44 25 28 41 25 29 2c 49 25 28 41 25 29 29 |V(D%(A%),I%(A%))|
000015b0 3a f2 65 79 28 62 6c 25 2c 4d 24 28 41 25 29 2c |:.ey(bl%,M$(A%),|
000015c0 30 2c 30 2c 61 25 2b 69 5f 25 2b 33 36 2f 32 2c |0,0,a%+i_%+36/2,|
000015d0 4b 25 2d 6f 25 2d 28 4e 79 25 2a 28 41 25 2d 30 |K%-o%-(Ny%*(A%-0|
000015e0 2e 35 29 29 2c 31 29 0d 00 83 05 cd 0d 00 84 28 |.5)),1)........(|
000015f0 cc 3a e7 a4 53 28 61 25 2b 6c 5f 25 2c 4b 25 2d |.:..S(a%+l_%,K%-|
00001600 6f 25 2d 28 4e 79 25 2a 41 25 29 2c 33 36 2c 4e |o%-(Ny%*A%),36,N|
00001610 79 25 29 8c 0d 00 85 72 f2 77 75 28 61 25 2b 6c |y%)....r.wu(a%+l|
00001620 5f 25 2b 33 36 2c 4b 25 2d 6f 25 2d 28 4e 79 25 |_%+36,K%-o%-(Ny%|
00001630 2a 41 25 29 2c 44 25 28 41 25 29 29 3a f2 56 28 |*A%),D%(A%)):.V(|
00001640 44 25 28 41 25 29 2c 49 25 28 41 25 29 29 3a f2 |D%(A%),I%(A%)):.|
00001650 65 79 28 62 6c 25 2c 4d 24 28 41 25 29 2c 30 2c |ey(bl%,M$(A%),0,|
00001660 30 2c 61 25 2b 6c 5f 25 2b 33 36 2f 32 2c 4b 25 |0,a%+l_%+36/2,K%|
00001670 2d 6f 25 2d 28 4e 79 25 2a 28 41 25 2d 30 2e 35 |-o%-(Ny%*(A%-0.5|
00001680 29 29 2c 2d 31 29 0d 00 86 05 cd 0d 00 87 41 cd |)),-1)........A.|
00001690 3a ed 3a e7 74 25 3e 30 80 a4 53 28 61 25 2b 79 |:.:.t%>0..S(a%+y|
000016a0 79 25 2c 4b 25 2d 6f 25 2c 6a 25 2b 33 32 2c 2d |y%,K%-o%,j%+32,-|
000016b0 6d 25 29 80 ac 60 4a 25 8c f2 6e 79 28 30 2c 61 |m%)..`J%..ny(0,a|
000016c0 25 2b 79 79 25 2c 4b 25 2d 6f 25 29 0d 00 88 3b |%+yy%,K%-o%)...;|
000016d0 e7 a4 53 28 61 25 2b 64 79 25 2d 33 32 2c 4b 25 |..S(a%+dy%-32,K%|
000016e0 2d 6f 25 2c 6a 25 2b 33 32 2c 2d 6d 25 29 80 ac |-o%,j%+32,-m%)..|
000016f0 60 4a 25 8c f2 6e 79 28 31 2c 61 25 2b 64 79 25 |`J%..ny(1,a%+dy%|
00001700 2c 4b 25 2d 6f 25 29 0d 00 89 12 c8 99 26 34 30 |,K%-o%)......&40|
00001710 30 38 32 2c 62 6c 25 3a e1 0d 00 8a 56 dd f2 52 |082,bl%:....V..R|
00001720 28 68 25 2c 61 25 2c 4b 25 29 3a c8 99 26 34 30 |(h%,a%,K%):..&40|
00001730 30 45 44 2c 32 35 36 2c 5a 5f 25 2c 22 63 6f 72 |0ED,256,Z_%,"cor|
00001740 6e 65 72 22 2c 2c 2c 2c 4a 25 2c 4a 25 2b 26 38 |ner",,,,J%,J%+&8|
00001750 30 3a e7 68 25 3d 31 80 a4 53 28 61 25 2b 6a 25 |0:.h%=1..S(a%+j%|
00001760 2c 4b 25 2d 6d 25 2c 2d 33 32 2c 33 32 29 8c 0d |,K%-m%,-32,32)..|
00001770 00 8b 84 c8 99 34 36 2c 34 37 2b 32 35 36 2c 5a |.....46,47+256,Z|
00001780 5f 25 2c 22 63 6f 72 6e 65 72 22 3a c8 99 34 36 |_%,"corner":..46|
00001790 2c 35 32 2b 32 35 36 2c 5a 5f 25 2c 22 63 6f 72 |,52+256,Z_%,"cor|
000017a0 6e 65 72 22 2c 61 25 2b 6a 25 2d 31 36 2a 32 2c |ner",a%+j%-16*2,|
000017b0 4b 25 2d 6d 25 2b 32 2c 38 2c 4a 25 2c 4a 25 2b |K%-m%+2,8,J%,J%+|
000017c0 26 38 30 3a c8 99 34 36 2c 34 37 2b 32 35 36 2c |&80:..46,47+256,|
000017d0 5a 5f 25 2c 22 63 6f 72 6e 65 72 22 3a f2 53 5f |Z_%,"corner":.S_|
000017e0 28 61 25 2b 6a 25 2d 33 32 2c 4b 25 2c 47 25 28 |(a%+j%-32,K%,G%(|
000017f0 31 29 29 0d 00 8c 0c cd 3a e7 68 25 3d 30 8c 0d |1)).....:.h%=0..|
00001800 00 8d 21 47 25 28 30 29 3d 61 25 3a e7 a4 53 28 |..!G%(0)=a%:..S(|
00001810 61 25 2c 4b 25 2d 6d 25 2c 33 32 2c 33 32 29 8c |a%,K%-m%,32,32).|
00001820 0d 00 8e 46 c8 99 34 36 2c 35 32 2b 32 35 36 2c |...F..46,52+256,|
00001830 5a 5f 25 2c 22 63 6f 72 6e 65 72 22 2c 61 25 2b |Z_%,"corner",a%+|
00001840 32 2c 4b 25 2d 6d 25 2b 32 2c 38 2c 4a 25 2c 4a |2,K%-m%+2,8,J%,J|
00001850 25 2b 26 38 30 3a f2 53 5f 28 61 25 2c 4b 25 2c |%+&80:.S_(a%,K%,|
00001860 47 25 28 30 29 29 0d 00 8f 05 cd 0d 00 90 07 cd |G%(0))..........|
00001870 3a e1 0d 00 91 39 dd f2 53 5f 28 61 25 2c 4b 25 |:....9..S_(a%,K%|
00001880 2c f8 63 79 25 29 3a 21 4a 25 3d 69 25 3a e7 63 |,.cy%):!J%=i%:.c|
00001890 79 25 3e 3d 30 8c 4a 25 21 34 3d 63 79 25 3a c8 |y%>=0.J%!4=cy%:.|
000018a0 99 26 34 30 30 43 34 2c 2c 4a 25 0d 00 92 83 c8 |.&400C4,,J%.....|
000018b0 99 26 34 30 30 43 42 2c 2c 4a 25 3a 4a 25 21 34 |.&400CB,,J%:J%!4|
000018c0 3d 61 25 2d 4a 25 21 34 3a 4a 25 21 38 3d 4b 25 |=a%-J%!4:J%!8=K%|
000018d0 2d 4a 25 21 31 36 2d 6d 25 3a 4a 25 21 26 43 3d |-J%!16-m%:J%!&C=|
000018e0 4a 25 21 34 2b 33 32 3a 4a 25 21 31 36 3d 4a 25 |J%!4+32:J%!16=J%|
000018f0 21 38 2b 33 32 3a 4a 25 21 32 30 3d 26 37 30 30 |!8+32:J%!20=&700|
00001900 33 31 31 39 3a 4a 25 21 32 34 3d 4f 6c 25 3a 4a |3119:J%!24=Ol%:J|
00001910 25 21 33 32 3d 30 3a e7 68 25 8c 4a 25 21 32 38 |%!32=0:.h%.J%!28|
00001920 3d 49 69 25 8b 4a 25 21 32 38 3d 54 69 25 0d 00 |=Ii%.J%!28=Ti%..|
00001930 93 16 c8 99 26 34 30 30 43 32 2c 2c 4a 25 b8 63 |....&400C2,,J%.c|
00001940 79 25 3a e1 0d 00 94 31 dd f2 70 5f 3a 21 4a 25 |y%:....1..p_:!J%|
00001950 3d 69 25 3a e7 47 25 28 30 29 3e 3d 30 8c 4a 25 |=i%:.G%(0)>=0.J%|
00001960 21 34 3d 47 25 28 30 29 3a c8 99 26 34 30 30 43 |!4=G%(0):..&400C|
00001970 34 2c 2c 4a 25 0d 00 95 25 e7 47 25 28 31 29 3e |4,,J%...%.G%(1)>|
00001980 3d 30 8c 4a 25 21 34 3d 47 25 28 31 29 3a c8 99 |=0.J%!4=G%(1):..|
00001990 26 34 30 30 43 34 2c 2c 4a 25 0d 00 96 0d 47 25 |&400C4,,J%....G%|
000019a0 28 29 3d 2d 31 3a e1 0d 00 97 f5 dd f2 43 75 28 |()=-1:.......Cu(|
000019b0 65 25 2c 61 25 2c 4b 25 29 3a ea 52 25 2c 41 25 |e%,a%,K%):.R%,A%|
000019c0 3a 61 25 2b 3d 28 32 34 2b 26 42 38 29 2f 32 3a |:a%+=(24+&B8)/2:|
000019d0 4b 25 2d 3d 28 36 34 2b 26 44 30 29 2f 32 3a 52 |K%-=(64+&D0)/2:R|
000019e0 25 3d 35 36 3a c8 99 26 34 30 30 45 36 2c 31 3a |%=56:..&400E6,1:|
000019f0 c8 93 c8 90 30 2c 30 2c 26 42 42 38 3a c8 99 26 |....0,0,&BB8:..&|
00001a00 34 30 30 45 36 2c 58 25 28 30 29 3a c8 8f c8 90 |400E6,X%(0):....|
00001a10 61 25 2c 4b 25 2c 52 25 3a c8 99 26 34 30 30 45 |a%,K%,R%:..&400E|
00001a20 36 2c 58 25 28 33 29 3a e3 41 25 3d 30 b8 33 33 |6,X%(3):.A%=0.33|
00001a30 30 88 33 30 3a 86 61 25 2b 52 25 2a b5 b2 41 25 |0.30:.a%+R%*..A%|
00001a40 2c 4b 25 2b 52 25 2a 9b b2 41 25 2c 61 25 2b 28 |,K%+R%*..A%,a%+(|
00001a50 52 25 2d 26 41 29 2a b5 b2 41 25 2c 4b 25 2b 28 |R%-&A)*..A%,K%+(|
00001a60 52 25 2d 26 41 29 2a 9b b2 41 25 3a ed 3a c8 99 |R%-&A)*..A%:.:..|
00001a70 26 34 30 30 45 36 2c 58 25 28 31 29 3a c8 8f 61 |&400E6,X%(1):..a|
00001a80 25 2c 4b 25 2c 52 25 3a c8 99 26 34 30 30 45 36 |%,K%,R%:..&400E6|
00001a90 2c 58 25 28 35 29 3a 41 25 3d 36 30 0d 00 98 d0 |,X%(5):A%=60....|
00001aa0 ec 61 25 2c 4b 25 3a ec 61 25 2b 28 52 25 2a 30 |.a%,K%:.a%+(R%*0|
00001ab0 2e 33 35 29 2a b5 b2 28 41 25 2d 39 29 2c 4b 25 |.35)*..(A%-9),K%|
00001ac0 2b 28 52 25 2a 30 2e 33 35 29 2a 9b b2 28 41 25 |+(R%*0.35)*..(A%|
00001ad0 2d 39 29 3a f0 38 35 2c 61 25 2b 28 52 25 2a 30 |-9):.85,a%+(R%*0|
00001ae0 2e 33 35 29 2a b5 b2 28 41 25 2b 39 29 2c 4b 25 |.35)*..(A%+9),K%|
00001af0 2b 28 52 25 2a 30 2e 33 35 29 2a 9b b2 28 41 25 |+(R%*0.35)*..(A%|
00001b00 2b 39 29 3a ec 61 25 2b 28 52 25 2a 30 2e 33 35 |+9):.a%+(R%*0.35|
00001b10 29 2a b5 b2 28 41 25 2d 39 29 2c 4b 25 2b 28 52 |)*..(A%-9),K%+(R|
00001b20 25 2a 30 2e 33 35 29 2a 9b b2 28 41 25 2d 39 29 |%*0.35)*..(A%-9)|
00001b30 3a f0 38 35 2c 61 25 2b 28 52 25 2a 30 2e 37 29 |:.85,a%+(R%*0.7)|
00001b40 2a b5 b2 41 25 2c 4b 25 2b 28 52 25 2a 30 2e 37 |*..A%,K%+(R%*0.7|
00001b50 29 2a 9b b2 41 25 3a c8 99 26 34 30 30 45 36 2c |)*..A%:..&400E6,|
00001b60 58 25 28 34 29 3a 41 25 3d 33 30 30 0d 00 99 ed |X%(4):A%=300....|
00001b70 ec 61 25 2c 4b 25 3a ec 61 25 2b 28 52 25 2a 30 |.a%,K%:.a%+(R%*0|
00001b80 2e 32 35 29 2a b5 b2 28 41 25 2d 39 29 2c 4b 25 |.25)*..(A%-9),K%|
00001b90 2b 28 52 25 2a 30 2e 32 35 29 2a 9b b2 28 41 25 |+(R%*0.25)*..(A%|
00001ba0 2d 39 29 3a f0 38 35 2c 61 25 2b 28 52 25 2a 30 |-9):.85,a%+(R%*0|
00001bb0 2e 32 35 29 2a b5 b2 28 41 25 2b 39 29 2c 4b 25 |.25)*..(A%+9),K%|
00001bc0 2b 28 52 25 2a 30 2e 32 35 29 2a 9b b2 28 41 25 |+(R%*0.25)*..(A%|
00001bd0 2b 39 29 3a ec 61 25 2b 28 52 25 2a 30 2e 32 35 |+9):.a%+(R%*0.25|
00001be0 29 2a b5 b2 28 41 25 2d 39 29 2c 4b 25 2b 28 52 |)*..(A%-9),K%+(R|
00001bf0 25 2a 30 2e 32 35 29 2a 9b b2 28 41 25 2d 39 29 |%*0.25)*..(A%-9)|
00001c00 3a f0 38 35 2c 61 25 2b 28 52 25 2a 30 2e 35 29 |:.85,a%+(R%*0.5)|
00001c10 2a b5 b2 41 25 2c 4b 25 2b 28 52 25 2a 30 2e 35 |*..A%,K%+(R%*0.5|
00001c20 29 2a 9b b2 41 25 3a c8 99 26 34 30 30 45 36 2c |)*..A%:..&400E6,|
00001c30 58 25 28 36 29 3a ec 61 25 2c 4b 25 3a df 42 59 |X%(6):.a%,K%:.BY|
00001c40 30 2c 2d 28 52 25 2a 30 2e 39 29 3a c8 8f c8 90 |0,-(R%*0.9):....|
00001c50 61 25 2c 4b 25 2c 32 3a e1 0d 00 9a 30 dd a4 63 |a%,K%,2:....0..c|
00001c60 28 75 25 2c 7a 4a 25 29 3a 3d c0 a4 41 28 22 44 |(u%,zJ%):=..A("D|
00001c70 61 79 22 2b c3 28 28 28 75 25 2d 31 29 83 37 29 |ay"+.(((u%-1).7)|
00001c80 2b 31 29 29 2c 7a 4a 25 29 0d 00 9b ad dd a4 44 |+1)),zJ%)......D|
00001c90 79 28 75 25 2c 7a 4a 25 29 3a ea 41 24 2c 71 24 |y(u%,zJ%):.A$,q$|
00001ca0 3a 41 24 3d 22 2c 4d 6f 6e 64 61 79 2c 54 75 65 |:A$=",Monday,Tue|
00001cb0 73 64 61 79 2c 57 65 64 6e 65 73 64 61 79 2c 54 |sday,Wednesday,T|
00001cc0 68 75 72 73 64 61 79 2c 46 72 69 64 61 79 2c 53 |hursday,Friday,S|
00001cd0 61 74 75 72 64 61 79 2c 53 75 6e 64 61 79 2c 22 |aturday,Sunday,"|
00001ce0 3a 75 25 3d 28 28 75 25 2d 31 29 83 37 29 2b 31 |:u%=((u%-1).7)+1|
00001cf0 3a f5 41 24 3d c1 41 24 2c a7 41 24 2c 22 2c 22 |:.A$=.A$,.A$,","|
00001d00 29 2b 31 29 3a 75 25 2d 3d 31 3a fd 75 25 3d 30 |)+1):u%-=1:.u%=0|
00001d10 3a 71 24 3d c0 41 24 2c a7 41 24 2c 22 2c 22 29 |:q$=.A$,.A$,",")|
00001d20 2d 31 29 3a e7 7a 4a 25 3e 30 8c 71 24 3d c0 71 |-1):.zJ%>0.q$=.q|
00001d30 24 2c 7a 4a 25 29 0d 00 9c 07 3d 71 24 0d 00 9d |$,zJ%)....=q$...|
00001d40 d1 dd a4 49 79 28 57 6c 25 2c 7a 4a 25 29 3a ea |...Iy(Wl%,zJ%):.|
00001d50 41 24 2c 4f 24 3a 41 24 3d 22 2c 4a 61 6e 75 61 |A$,O$:A$=",Janua|
00001d60 72 79 2c 46 65 62 72 75 61 72 79 2c 4d 61 72 63 |ry,February,Marc|
00001d70 68 2c 41 70 72 69 6c 2c 4d 61 79 2c 4a 75 6e 65 |h,April,May,June|
00001d80 2c 4a 75 6c 79 2c 41 75 67 75 73 74 2c 53 65 70 |,July,August,Sep|
00001d90 74 65 6d 62 65 72 2c 4f 63 74 6f 62 65 72 2c 4e |tember,October,N|
00001da0 6f 76 65 6d 62 65 72 2c 44 65 63 65 6d 62 65 72 |ovember,December|
00001db0 2c 22 3a 57 6c 25 3d 28 28 57 6c 25 2d 31 29 83 |,":Wl%=((Wl%-1).|
00001dc0 26 43 29 2b 31 3a f5 41 24 3d c1 41 24 2c a7 41 |&C)+1:.A$=.A$,.A|
00001dd0 24 2c 22 2c 22 29 2b 31 29 3a 57 6c 25 2d 3d 31 |$,",")+1):Wl%-=1|
00001de0 3a fd 57 6c 25 3c 3d 30 3a 4f 24 3d c0 41 24 2c |:.Wl%<=0:O$=.A$,|
00001df0 a7 41 24 2c 22 2c 22 29 2d 31 29 3a e7 7a 4a 25 |.A$,",")-1):.zJ%|
00001e00 3e 30 8c 4f 24 3d c0 4f 24 2c 7a 4a 25 29 0d 00 |>0.O$=.O$,zJ%)..|
00001e10 9e 07 3d 4f 24 0d 00 9f 19 dd a4 41 5f 28 64 25 |..=O$......A_(d%|
00001e20 29 3a 3d c3 64 25 2b a4 4e 79 28 64 25 29 0d 00 |):=.d%+.Ny(d%)..|
00001e30 a0 7d dd a4 4e 79 28 64 25 29 3a ea 41 24 2c 5a |.}..Ny(d%):.A$,Z|
00001e40 24 2c 43 24 2c 41 25 2c 4f 79 25 3a 41 24 3d a4 |$,C$,A%,Oy%:A$=.|
00001e50 41 28 22 74 68 22 29 3a 5a 24 3d c0 41 24 2c a7 |A("th"):Z$=.A$,.|
00001e60 41 24 2c 22 2c 22 29 2d 31 29 3a c8 95 a7 41 24 |A$,",")-1):...A$|
00001e70 2c 22 2c 22 29 80 ac 4f 79 25 3a 41 24 3d c1 41 |,",")..Oy%:A$=.A|
00001e80 24 2c a7 41 24 2c 22 2c 22 29 2b 31 29 3a 43 24 |$,.A$,",")+1):C$|
00001e90 3d c0 41 24 2c a7 41 24 2c 22 2c 22 29 2d 31 29 |=.A$,.A$,",")-1)|
00001ea0 3a e7 a7 43 24 2c 22 23 22 29 8c 0d 00 a1 1d e7 |:..C$,"#")......|
00001eb0 c2 c3 64 25 2c a9 43 24 2d 31 29 3d c1 43 24 2c |..d%,.C$-1)=.C$,|
00001ec0 32 29 8c 4f 79 25 3d b9 0d 00 a2 12 cc e7 bb 43 |2).Oy%=........C|
00001ed0 24 3d 64 25 8c 4f 79 25 3d b9 0d 00 a3 0d cd 3a |$=d%.Oy%=......:|
00001ee0 ce 3a e7 4f 79 25 8c 0d 00 a4 3c c8 95 bb 41 24 |.:.Oy%....<...A$|
00001ef0 3e 30 84 97 28 41 24 29 3d 33 35 3a 41 24 3d c1 |>0..(A$)=35:A$=.|
00001f00 41 24 2c a7 41 24 2c 22 2c 22 29 2b 31 29 3a ce |A$,.A$,",")+1):.|
00001f10 3a 5a 24 3d c0 41 24 2c a7 41 24 2c 22 2c 22 29 |:Z$=.A$,.A$,",")|
00001f20 2d 31 29 0d 00 a5 09 cd 3a 3d 5a 24 0d 00 a6 33 |-1).....:=Z$...3|
00001f30 dd a4 55 28 57 6c 25 2c 7a 4a 25 29 3a 3d c0 a4 |..U(Wl%,zJ%):=..|
00001f40 41 28 22 4d 6f 6e 22 2b c3 28 28 28 57 6c 25 2d |A("Mon"+.(((Wl%-|
00001f50 31 29 83 26 43 29 2b 31 29 29 2c 7a 4a 25 29 0d |1).&C)+1)),zJ%).|
00001f60 00 a7 25 dd a4 6f 79 28 62 25 2c 72 25 2c 58 75 |..%..oy(b%,r%,Xu|
00001f70 25 2c 72 5f 25 29 3a ea 41 24 2c 5a 24 3a e7 ac |%,r_%):.A$,Z$:..|
00001f80 72 5f 25 8c 0d 00 a8 2a e7 62 25 3e 26 42 8c 5a |r_%....*.b%>&B.Z|
00001f90 24 3d 22 20 22 2b a4 41 28 22 70 6d 22 29 8b 5a |$=" "+.A("pm").Z|
00001fa0 24 3d 22 20 22 2b a4 41 28 22 61 6d 22 29 0d 00 |$=" "+.A("am")..|
00001fb0 a9 18 cd 3a e7 62 25 3e 26 43 80 ac 72 5f 25 8c |...:.b%>&C..r_%.|
00001fc0 62 25 2d 3d 26 43 0d 00 aa 26 e7 72 5f 25 8c 41 |b%-=&C...&.r_%.A|
00001fd0 24 3d c4 2d 28 62 25 3c 26 41 29 2c 22 30 22 29 |$=.-(b%<&A),"0")|
00001fe0 8b e7 62 25 3d 30 8c 62 25 3d 26 43 0d 00 ab 48 |..b%=0.b%=&C...H|
00001ff0 41 24 2b 3d c3 62 25 2b 22 3a 22 2b c4 2d 28 72 |A$+=.b%+":"+.-(r|
00002000 25 3c 26 41 29 2c 22 30 22 29 2b c3 72 25 3a e7 |%<&A),"0")+.r%:.|
00002010 58 75 25 3c 3e 2d 31 8c 41 24 2b 3d 22 3a 22 2b |Xu%<>-1.A$+=":"+|
00002020 c4 2d 28 58 75 25 3c 26 41 29 2c 22 30 22 29 2b |.-(Xu%<&A),"0")+|
00002030 c3 58 75 25 0d 00 ac 0a 3d 41 24 2b 5a 24 0d 00 |.Xu%....=A$+Z$..|
00002040 ad 92 dd f2 77 4a 28 6b 24 2c 60 24 2c 5a 79 24 |....wJ(k$,`$,Zy$|
00002050 2c 73 61 25 29 3a 4b 24 3d 6b 24 3a 56 24 3d 5a |,sa%):K$=k$:V$=Z|
00002060 79 24 3a 52 75 25 3d 30 3a 44 75 25 3d a3 3a 4a |y$:Ru%=0:Du%=.:J|
00002070 24 3d 60 24 3a 63 5f 25 3d 30 3a 78 5f 25 3d 30 |$=`$:c_%=0:x_%=0|
00002080 3a 48 75 25 3d a3 3a 56 79 25 3d a3 3a c8 99 26 |:Hu%=.:Vy%=.:..&|
00002090 34 30 30 43 30 2c 26 43 38 2c 26 34 42 35 33 34 |400C0,&C8,&4B534|
000020a0 31 35 34 2c 4b 24 b8 7a 61 25 2c 73 75 25 3a f2 |154,K$.za%,su%:.|
000020b0 4d 4a 3a e7 73 61 25 8c f2 64 75 28 61 61 25 2c |MJ:.sa%..du(aa%,|
000020c0 64 24 2b 22 2e 54 65 6d 70 6c 61 74 65 73 22 29 |d$+".Templates")|
000020d0 0d 00 ae 0d f2 74 5f 3a f2 48 75 3a e1 0d 00 af |.....t_:.Hu:....|
000020e0 15 dd f2 67 75 3a ea 53 25 3a c8 8e 55 25 21 31 |...gu:.S%:..U%!1|
000020f0 36 ca 0d 00 b0 0c c9 30 3a 44 75 25 3d b9 0d 00 |6......0:Du%=...|
00002100 b1 1b c9 31 3a f2 4f 4a 28 55 25 21 34 30 2c a4 |...1:.OJ(U%!40,.|
00002110 4e 28 55 25 2b 34 34 29 29 0d 00 b2 1b c9 33 3a |N(U%+44)).....3:|
00002120 f2 67 5f 28 55 25 21 34 30 2c a4 4e 28 55 25 2b |.g_(U%!40,.N(U%+|
00002130 34 34 29 29 0d 00 b3 0a c9 38 3a f2 41 4a 0d 00 |44)).....8:.AJ..|
00002140 b4 0f c9 26 34 30 30 43 31 3a f2 46 5f 0d 00 b5 |...&400C1:.F_...|
00002150 24 c9 26 34 30 30 43 32 3a e7 a4 4e 28 55 25 2b |$.&400C2:..N(U%+|
00002160 32 38 29 3d 4b 24 80 55 25 21 34 3c 3e 73 75 25 |28)=K$.U%!4<>su%|
00002170 8c 0d 00 b6 1e f2 42 28 a4 41 28 22 45 72 72 52 |......B(.A("ErrR|
00002180 75 6e 22 29 29 3a f2 65 4a 28 55 25 21 34 29 0d |un")):.eJ(U%!4).|
00002190 00 b7 05 cd 0d 00 b8 14 c9 26 34 30 30 43 43 3a |.........&400CC:|
000021a0 c8 8e 55 25 21 32 30 ca 0d 00 b9 1c c9 69 25 3a |..U%!20......i%:|
000021b0 24 28 55 25 2b 33 36 29 3d a4 41 28 22 54 69 74 |$(U%+36)=.A("Tit|
000021c0 6c 65 22 29 0d 00 ba 20 c9 66 25 2c 4c 79 25 3a |le")... .f%,Ly%:|
000021d0 24 28 55 25 2b 33 36 29 3d a4 41 28 22 41 6c 61 |$(U%+36)=.A("Ala|
000021e0 72 6d 22 29 0d 00 bb 1c c9 61 79 25 3a 24 28 55 |rm").....ay%:$(U|
000021f0 25 2b 33 36 29 3d a4 41 28 22 44 61 74 65 22 29 |%+36)=.A("Date")|
00002200 0d 00 bc 20 c9 49 5f 25 3a 24 28 55 25 2b 33 36 |... .I_%:$(U%+36|
00002210 29 3d a4 41 28 22 53 65 74 74 69 6e 67 73 22 29 |)=.A("Settings")|
00002220 0d 00 bd 23 c9 48 79 25 2c 56 4a 25 3a 24 28 55 |...#.Hy%,VJ%:$(U|
00002230 25 2b 33 36 29 3d a4 41 28 22 41 6e 6e 69 54 61 |%+36)=.A("AnniTa|
00002240 62 22 29 0d 00 be 20 c9 41 79 25 3a 24 28 55 25 |b")... .Ay%:$(U%|
00002250 2b 33 36 29 3d a4 41 28 22 53 65 74 63 6c 6f 63 |+36)=.A("Setcloc|
00002260 6b 22 29 0d 00 bf 4b cb 3a 21 55 25 3d 35 36 3a |k")...K.:!U%=56:|
00002270 24 28 55 25 2b 32 38 29 3d 22 6f 72 67 22 3a 53 |$(U%+28)="org":S|
00002280 25 3d 55 25 21 34 3a 55 25 21 34 3d 73 75 25 3a |%=U%!4:U%!4=su%:|
00002290 c8 94 55 25 21 38 2c 55 25 21 26 43 3a c8 99 26 |..U%!8,U%!&C:..&|
000022a0 34 30 30 45 37 2c 31 37 2c 55 25 2c 53 25 0d 00 |400E7,17,U%,S%..|
000022b0 c0 07 cb 3a e1 0d 00 c1 3f dd a4 50 79 28 60 75 |...:....?..Py(`u|
000022c0 25 2c 53 24 29 3a c8 99 26 34 30 30 43 46 2c 2c |%,S$):..&400CF,,|
000022d0 4a 25 3a 3d 28 28 60 75 25 3d 26 46 46 46 29 84 |J%:=((`u%=&FFF).|
000022e0 28 60 75 25 3d 26 44 46 45 29 29 84 4a 25 21 26 |(`u%=&DFE)).J%!&|
000022f0 43 3d 66 25 0d 00 c2 22 dd f2 67 5f 28 60 75 25 |C=f%..."..g_(`u%|
00002300 2c 53 24 29 3a ea 7a 25 3a e7 a4 50 79 28 60 75 |,S$):.z%:..Py(`u|
00002310 25 2c 53 24 29 8c 0d 00 c3 38 c8 94 55 25 21 38 |%,S$)....8..U%!8|
00002320 2c 55 25 21 26 43 3a 55 25 21 31 36 3d 34 3a c8 |,U%!&C:U%!16=4:.|
00002330 99 26 34 30 30 45 37 2c 31 37 2c 55 25 2c 55 25 |.&400E7,17,U%,U%|
00002340 21 34 3a e7 4a 25 21 26 43 3c 3e 66 25 8c 0d 00 |!4:.J%!&C<>f%...|
00002350 c4 10 e7 7a 79 25 3c 3e 2d 31 8c f2 43 79 0d 00 |...zy%<>-1..Cy..|
00002360 c5 52 ff 22 43 6f 70 79 20 22 2b 53 24 2b 22 20 |.R."Copy "+S$+" |
00002370 22 2b 4a 24 2b 22 2e 49 6d 70 6f 72 74 20 7e 63 |"+J$+".Import ~c|
00002380 20 7e 76 20 66 22 3a e7 53 24 3d 22 3c 57 69 6d | ~v f":.S$="<Wim|
00002390 70 24 53 63 72 61 70 3e 22 8c ff 22 52 65 6d 6f |p$Scrap>".."Remo|
000023a0 76 65 20 3c 57 69 6d 70 24 53 63 72 61 70 3e 22 |ve <Wimp$Scrap>"|
000023b0 0d 00 c6 15 f2 52 4a 28 4a 24 2b 22 2e 49 6d 70 |.....RJ(J$+".Imp|
000023c0 6f 72 74 22 29 0d 00 c7 0c cc f2 76 5f 28 53 24 |ort")......v_(S$|
000023d0 29 0d 00 c8 05 cd 0d 00 c9 07 cd 3a e1 0d 00 ca |)..........:....|
000023e0 0d dd a4 75 3a e7 65 79 25 8c 0d 00 cb 1c e7 a4 |...u:.ey%.......|
000023f0 42 79 28 a4 41 28 22 45 72 72 53 61 76 65 22 29 |By(.A("ErrSave")|
00002400 2c b9 29 8c f2 74 0d 00 cc 08 cd 3a 3d b9 0d 00 |,.)..t.....:=...|
00002410 cd 1f dd f2 46 5f ea 58 61 25 2c 51 61 25 2c 4d |....F_.Xa%,Qa%,M|
00002420 25 3a e7 28 71 79 25 80 34 29 3e 30 8c 0d 00 ce |%:.(qy%.4)>0....|
00002430 17 e7 a4 60 79 28 eb 29 8c 4d 25 3d 32 30 8b 4d |...`y(.).M%=20.M|
00002440 25 3d 26 43 0d 00 cf 8a c8 99 26 32 30 30 32 45 |%=&C......&2002E|
00002450 2c 32 38 31 2c 5a 5f 25 2c 22 63 6c 6f 63 6b 22 |,281,Z_%,"clock"|
00002460 3a c8 99 35 33 2c 4d 25 2c 34 b8 2c 2c 58 61 25 |:..53,M%,4.,,Xa%|
00002470 3a c8 99 35 33 2c 4d 25 2c 35 b8 2c 2c 51 61 25 |:..53,M%,5.,,Qa%|
00002480 3a c8 99 34 36 2c 38 2b 35 31 32 2c 5a 5f 25 b8 |:..46,8+512,Z_%.|
00002490 2c 2c 2c 2c 2c 46 25 3a c8 99 34 36 2c 32 37 31 |,,,,,F%:..46,271|
000024a0 2c 5a 5f 25 2c 22 63 6c 6f 63 6b 22 2c 30 2c 26 |,Z_%,"clock",0,&|
000024b0 37 34 2f 28 31 3c 3c 58 61 25 29 2c 26 37 38 2f |74/(1<<Xa%),&78/|
000024c0 28 31 3c 3c 51 61 25 29 2c 4d 25 3a f2 75 0d 00 |(1<<Qa%),M%:.u..|
000024d0 d0 07 cd 3a e1 0d 00 d1 49 dd f2 65 28 65 25 2c |...:....I..e(e%,|
000024e0 77 25 2c 6e 25 2c 58 79 25 2c 54 79 25 29 ea 41 |w%,n%,Xy%,Ty%).A|
000024f0 25 2c 42 25 2c 41 24 2c 58 5f 25 3a 56 5f 25 3d |%,B%,A$,X_%:V_%=|
00002500 74 25 3a 7a 5f 25 3d 76 25 3a 58 5f 25 3d 31 2b |t%:z_%=v%:X_%=1+|
00002510 32 2a 28 6e 25 3d 31 29 3a c8 8e 65 25 ca 0d 00 |2*(n%=1):..e%...|
00002520 d2 57 c9 69 25 3a 21 55 25 3d 69 25 3a c8 99 26 |.W.i%:!U%=i%:..&|
00002530 34 30 30 43 42 2c 2c 55 25 3a 61 25 3d 55 25 21 |400CB,,U%:a%=U%!|
00002540 34 2d 55 25 21 32 30 3a 4b 25 3d 55 25 21 31 36 |4-U%!20:K%=U%!16|
00002550 2d 55 25 21 32 34 3a f2 75 5f 28 77 25 2c 6e 25 |-U%!24:.u_(w%,n%|
00002560 2c 58 79 25 2d 61 25 2c 54 79 25 2d 4b 25 2c 61 |,Xy%-a%,Ty%-K%,a|
00002570 25 2c 4b 25 29 0d 00 d3 0d c9 2d 32 3a c8 8e 6e |%,K%).....-2:..n|
00002580 25 ca 0d 00 d4 16 c9 31 3a f2 73 28 55 79 25 2c |%......1:.s(Uy%,|
00002590 62 79 25 2c 46 79 25 29 0d 00 d5 28 c9 32 3a 42 |by%,Fy%)...(.2:B|
000025a0 4a 25 3d 2d 31 3a f2 43 28 51 75 25 2c 58 79 25 |J%=-1:.C(Qu%,Xy%|
000025b0 2c a4 62 79 28 51 75 25 29 2c 65 25 2c 77 25 29 |,.by(Qu%),e%,w%)|
000025c0 0d 00 d6 0b c9 34 3a c8 8e b9 ca 0d 00 d7 13 c9 |.....4:.........|
000025d0 a6 2d 31 3a e7 59 79 25 3d 30 8c f2 52 79 0d 00 |.-1:.Yy%=0..Ry..|
000025e0 d8 11 c9 a6 2d 33 3a 4d 4a 25 3d 35 3a f2 6d 0d |....-3:MJ%=5:.m.|
000025f0 00 d9 11 7f f2 78 28 69 25 2c 2d 31 2c 2d 31 29 |.....x(i%,-1,-1)|
00002600 0d 00 da 05 cb 0d 00 db 05 cb 0d 00 dc 0e c9 61 |...............a|
00002610 79 25 3a c8 8e 77 25 ca 0d 00 dd 39 c9 30 3a f2 |y%:..w%....9.0:.|
00002620 48 28 64 5f 25 2c 30 2c 2d 31 29 3a f2 4a 28 64 |H(d_%,0,-1):.J(d|
00002630 5f 25 2c 48 4a 25 2d 31 2c b9 29 3a f2 43 28 64 |_%,HJ%-1,.):.C(d|
00002640 5f 25 2c 58 79 25 2c 54 79 25 2c 65 25 2c 77 25 |_%,Xy%,Ty%,e%,w%|
00002650 29 0d 00 de 31 c9 32 2c 33 3a f2 4c 79 28 2d 31 |)...1.2,3:.Ly(-1|
00002660 2c 2d 31 2c 28 31 2b 32 2a 28 77 25 3d 32 29 29 |,-1,(1+2*(w%=2))|
00002670 2a 58 5f 25 2a 28 31 2d 34 39 2a 28 a6 2d 31 29 |*X_%*(1-49*(.-1)|
00002680 29 29 0d 00 df 1a c9 33 35 3a f2 72 79 3a e7 6e |)).....35:.ry:.n|
00002690 25 3c 3e 31 8c f2 47 28 61 79 25 29 0d 00 e0 0f |%<>1..G(ay%)....|
000026a0 c9 33 36 3a f2 47 28 61 79 25 29 0d 00 e1 0c 7f |.36:.G(ay%).....|
000026b0 3a e7 6e 25 3d 32 8c 0d 00 e2 36 f2 48 28 64 5f |:.n%=2....6.H(d_|
000026c0 25 2c 30 2c 2d 31 29 3a f2 4a 28 64 5f 25 2c 48 |%,0,-1):.J(d_%,H|
000026d0 4a 25 2d 31 2c b9 29 3a f2 43 28 64 5f 25 2c 58 |J%-1,.):.C(d_%,X|
000026e0 79 25 2c 54 79 25 2c 65 25 2c 77 25 29 0d 00 e3 |y%,Ty%,e%,w%)...|
000026f0 1f cc f2 4c 79 28 77 25 2d 33 2c 2d 31 2c 30 29 |...Ly(w%-3,-1,0)|
00002700 3a e7 6e 25 3c 32 35 36 8c f2 72 79 0d 00 e4 05 |:.n%<256..ry....|
00002710 cd 0d 00 e5 05 cb 0d 00 e6 10 c9 41 79 25 3a e7 |...........Ay%:.|
00002720 6e 25 3c 3e 32 8c 0d 00 e7 09 c8 8e 77 25 ca 0d |n%<>2.......w%..|
00002730 00 e8 20 c9 31 3a f2 65 28 41 79 25 2c 39 2b a4 |.. .1:.e(Ay%,9+.|
00002740 4d 28 41 79 25 2c 31 29 2c 34 2c 30 2c 30 29 0d |M(Ay%,1),4,0,0).|
00002750 00 e9 1e c9 32 3a f2 41 79 28 50 5f 25 2c 4e 5f |....2:.Ay(P_%,N_|
00002760 25 2c 51 5f 25 2c 41 79 25 2c 77 25 29 0d 00 ea |%,Q_%,Ay%,w%)...|
00002770 1d c9 33 3a e7 a4 79 3c 3e a4 4d 28 41 79 25 2c |..3:..y<>.M(Ay%,|
00002780 31 29 8c f2 53 79 28 2d 31 29 0d 00 eb c3 41 25 |1)..Sy(-1)....A%|
00002790 3d bb 28 a4 5a 28 41 79 25 2c 34 29 29 83 26 43 |=.(.Z(Ay%,4)).&C|
000027a0 20 2d 26 43 2a 74 5f 25 3a 41 24 3d c3 41 25 3a | -&C*t_%:A$=.A%:|
000027b0 41 24 3d c4 32 2d a9 41 24 2c 22 30 22 29 2b 41 |A$=.2-.A$,"0")+A|
000027c0 24 3a 24 4a 25 3d bd 32 34 2b a4 44 79 28 a4 48 |$:$J%=.24+.Dy(.H|
000027d0 28 50 5f 25 2c 4e 5f 25 2c 51 5f 25 29 2c 33 29 |(P_%,N_%,Q_%),3)|
000027e0 2b 22 2c 22 2b c4 2d 28 50 5f 25 3c 26 41 29 2c |+","+.-(P_%<&A),|
000027f0 22 30 22 29 2b c3 50 5f 25 2b 22 20 22 2b a4 49 |"0")+.P_%+" "+.I|
00002800 79 28 4e 5f 25 2c 33 29 2b 22 20 22 2b c3 51 5f |y(N_%,3)+" "+.Q_|
00002810 25 2b 22 2e 22 2b 41 24 2b 22 3a 22 2b a4 5a 28 |%+"."+A$+":"+.Z(|
00002820 41 79 25 2c 35 29 2b 22 3a 30 30 22 3a c8 99 26 |Ay%,5)+":00":..&|
00002830 32 30 30 30 37 2c 26 46 2c 4a 25 b8 3b 42 25 3a |20007,&F,J%.;B%:|
00002840 e7 6e 25 3d 34 8c f2 47 28 41 79 25 29 0d 00 ec |.n%=4..G(Ay%)...|
00002850 63 c9 38 3a 41 25 3d bb 28 a4 5a 28 41 79 25 2c |c.8:A%=.(.Z(Ay%,|
00002860 34 29 29 83 26 43 20 2d 26 43 2a 74 5f 25 2b 58 |4)).&C -&C*t_%+X|
00002870 5f 25 3a e7 41 25 3d 32 34 8c 41 25 3d 30 3a f2 |_%:.A%=24.A%=0:.|
00002880 46 28 50 5f 25 2c 4e 5f 25 2c 51 5f 25 2c 31 2c |F(P_%,N_%,Q_%,1,|
00002890 30 2c 30 29 3a f2 41 28 41 79 25 2c 32 2c a4 51 |0,0):.A(Ay%,2,.Q|
000028a0 28 50 5f 25 2c 4e 5f 25 2c 51 5f 25 2c b9 29 29 |(P_%,N_%,Q_%,.))|
000028b0 0d 00 ed 43 e7 41 25 3d 2d 31 8c 41 25 3d 32 33 |...C.A%=-1.A%=23|
000028c0 3a f2 46 28 50 5f 25 2c 4e 5f 25 2c 51 5f 25 2c |:.F(P_%,N_%,Q_%,|
000028d0 2d 31 2c 30 2c 30 29 3a f2 41 28 41 79 25 2c 32 |-1,0,0):.A(Ay%,2|
000028e0 2c a4 51 28 50 5f 25 2c 4e 5f 25 2c 51 5f 25 2c |,.Q(P_%,N_%,Q_%,|
000028f0 b9 29 29 0d 00 ee 3a 74 5f 25 3d 41 25 3e 26 42 |.))...:t_%=A%>&B|
00002900 3a e7 41 25 3e 26 42 8c f2 41 28 41 79 25 2c 37 |:.A%>&B..A(Ay%,7|
00002910 2c a4 41 28 22 70 6d 22 29 29 8b f2 41 28 41 79 |,.A("pm"))..A(Ay|
00002920 25 2c 37 2c a4 41 28 22 61 6d 22 29 29 0d 00 ef |%,7,.A("am"))...|
00002930 28 41 25 3d 41 25 83 26 43 3a 41 25 2d 3d 26 43 |(A%=A%.&C:A%-=&C|
00002940 2a 28 41 25 3d 30 29 3a f2 41 28 41 79 25 2c 34 |*(A%=0):.A(Ay%,4|
00002950 2c c3 41 25 29 0d 00 f0 65 c9 39 3a 41 25 3d bb |,.A%)...e.9:A%=.|
00002960 28 a4 5a 28 41 79 25 2c 34 29 29 83 26 43 20 2d |(.Z(Ay%,4)).&C -|
00002970 26 43 2a 74 5f 25 2d 58 5f 25 3a e7 41 25 3d 2d |&C*t_%-X_%:.A%=-|
00002980 31 8c 41 25 3d 32 33 3a f2 46 28 50 5f 25 2c 4e |1.A%=23:.F(P_%,N|
00002990 5f 25 2c 51 5f 25 2c 2d 31 2c 30 2c 30 29 3a f2 |_%,Q_%,-1,0,0):.|
000029a0 41 28 41 79 25 2c 32 2c a4 51 28 50 5f 25 2c 4e |A(Ay%,2,.Q(P_%,N|
000029b0 5f 25 2c 51 5f 25 2c b9 29 29 0d 00 f1 41 e7 41 |_%,Q_%,.))...A.A|
000029c0 25 3d 32 34 8c 41 25 3d 30 3a f2 46 28 50 5f 25 |%=24.A%=0:.F(P_%|
000029d0 2c 4e 5f 25 2c 51 5f 25 2c 31 2c 30 2c 30 29 3a |,N_%,Q_%,1,0,0):|
000029e0 f2 41 28 41 79 25 2c 32 2c a4 51 28 50 5f 25 2c |.A(Ay%,2,.Q(P_%,|
000029f0 4e 5f 25 2c 51 5f 25 2c b9 29 29 0d 00 f2 3a 74 |N_%,Q_%,.))...:t|
00002a00 5f 25 3d 41 25 3e 26 42 3a e7 41 25 3e 26 42 8c |_%=A%>&B:.A%>&B.|
00002a10 f2 41 28 41 79 25 2c 37 2c a4 41 28 22 70 6d 22 |.A(Ay%,7,.A("pm"|
00002a20 29 29 8b f2 41 28 41 79 25 2c 37 2c a4 41 28 22 |))..A(Ay%,7,.A("|
00002a30 61 6d 22 29 29 0d 00 f3 28 41 25 3d 41 25 83 26 |am"))...(A%=A%.&|
00002a40 43 3a 41 25 2d 3d 26 43 2a 28 41 25 3d 30 29 3a |C:A%-=&C*(A%=0):|
00002a50 f2 41 28 41 79 25 2c 34 2c c3 41 25 29 0d 00 f4 |.A(Ay%,4,.A%)...|
00002a60 48 c9 26 41 2c 26 43 3a 41 25 3d bb a4 5a 28 41 |H.&A,&C:A%=..Z(A|
00002a70 79 25 2c 35 29 2b 28 31 2d 39 2a 28 77 25 3d 26 |y%,5)+(1-9*(w%=&|
00002a80 41 29 29 2a 58 5f 25 3a e7 41 25 3e 35 39 8c 41 |A))*X_%:.A%>59.A|
00002a90 25 2d 3d 36 30 3a f2 65 28 41 79 25 2c 38 2c 34 |%-=60:.e(Ay%,8,4|
00002aa0 2c 30 2c 30 29 0d 00 f5 20 e7 41 25 3c 30 8c 41 |,0,0)... .A%<0.A|
00002ab0 25 2b 3d 36 30 3a f2 65 28 41 79 25 2c 39 2c 34 |%+=60:.e(Ay%,9,4|
00002ac0 2c 30 2c 30 29 0d 00 f6 1e f2 41 28 41 79 25 2c |,0,0).....A(Ay%,|
00002ad0 35 2c c4 32 2d a9 c3 41 25 2c 22 30 22 29 2b c3 |5,.2-..A%,"0")+.|
00002ae0 41 25 29 0d 00 f7 48 c9 26 42 2c 26 44 3a 41 25 |A%)...H.&B,&D:A%|
00002af0 3d bb a4 5a 28 41 79 25 2c 35 29 2d 28 31 2d 39 |=..Z(Ay%,5)-(1-9|
00002b00 2a 28 77 25 3d 26 42 29 29 2a 58 5f 25 3a e7 41 |*(w%=&B))*X_%:.A|
00002b10 25 3e 35 39 8c 41 25 2d 3d 36 30 3a f2 65 28 41 |%>59.A%-=60:.e(A|
00002b20 79 25 2c 38 2c 34 2c 30 2c 30 29 0d 00 f8 20 e7 |y%,8,4,0,0)... .|
00002b30 41 25 3c 30 8c 41 25 2b 3d 36 30 3a f2 65 28 41 |A%<0.A%+=60:.e(A|
00002b40 79 25 2c 39 2c 34 2c 30 2c 30 29 0d 00 f9 1e f2 |y%,9,4,0,0).....|
00002b50 41 28 41 79 25 2c 35 2c c4 32 2d a9 c3 41 25 2c |A(Ay%,5,.2-..A%,|
00002b60 22 30 22 29 2b c3 41 25 29 0d 00 fa 3a c9 37 3a |"0")+.A%)...:.7:|
00002b70 74 5f 25 3d ac 74 5f 25 3a e7 74 5f 25 8c f2 41 |t_%=.t_%:.t_%..A|
00002b80 28 41 79 25 2c 37 2c a4 41 28 22 70 6d 22 29 29 |(Ay%,7,.A("pm"))|
00002b90 8b f2 41 28 41 79 25 2c 37 2c a4 41 28 22 61 6d |..A(Ay%,7,.A("am|
00002ba0 22 29 29 0d 00 fb 05 cb 0d 00 fc 05 cd 0d 00 fd |")).............|
00002bb0 1e c9 66 25 3a f2 6c 75 28 58 79 25 2c 54 79 25 |..f%:.lu(Xy%,Ty%|
00002bc0 2c 65 25 2c 77 25 2c 58 5f 25 29 0d 00 fe 1b c9 |,e%,w%,X_%).....|
00002bd0 4c 79 25 3a f2 6a 4a 28 58 79 25 2c 54 79 25 2c |Ly%:.jJ(Xy%,Ty%,|
00002be0 65 25 2c 77 25 29 0d 00 ff 0c c9 5a 75 25 3a f2 |e%,w%).....Zu%:.|
00002bf0 57 5f 0d 01 00 10 c9 48 79 25 3a f2 74 4a 28 77 |W_.....Hy%:.tJ(w|
00002c00 25 29 0d 01 01 22 c9 49 5f 25 2c 59 79 25 3a f2 |%)...".I_%,Yy%:.|
00002c10 4e 75 28 65 25 2c 77 25 2c 6e 25 2c 58 79 25 2c |Nu(e%,w%,n%,Xy%,|
00002c20 54 79 25 29 0d 01 02 0c c9 56 4a 25 3a f2 7a 79 |Ty%).....VJ%:.zy|
00002c30 0d 01 03 1e c9 7a 79 25 3a f2 68 5f 28 65 25 2c |.....zy%:.h_(e%,|
00002c40 77 25 2c 6e 25 2c 58 79 25 2c 54 79 25 29 0d 01 |w%,n%,Xy%,Ty%)..|
00002c50 04 1a 7f f2 44 4a 28 65 25 2c 77 25 2c 6e 25 2c |....DJ(e%,w%,n%,|
00002c60 58 79 25 2c 54 79 25 29 0d 01 05 0b cb 3a f2 51 |Xy%,Ty%).....:.Q|
00002c70 79 3a e1 0d 01 06 44 dd f2 75 5f 28 77 25 2c 6e |y:....D..u_(w%,n|
00002c80 25 2c 5f 25 2c 51 25 2c 6f 5f 25 2c 77 4a 25 29 |%,_%,Q%,o_%,wJ%)|
00002c90 3a ea 76 61 25 2c 63 61 25 2c 41 25 2c 51 4a 25 |:.va%,ca%,A%,QJ%|
00002ca0 3a 41 25 3d 6e 25 2d 33 2d 28 6e 25 3d 31 29 3a |:A%=n%-3-(n%=1):|
00002cb0 e7 6e 25 3c 3e 32 8c 0d 01 07 11 e7 77 25 3e 3d |.n%<>2......w%>=|
00002cc0 30 80 6e 25 3c 3e 32 8c 0d 01 08 09 c8 8e 77 25 |0.n%<>2.......w%|
00002cd0 ca 0d 01 09 13 c9 47 25 28 30 29 3a f2 58 5f 28 |......G%(0):.X_(|
00002ce0 2d 41 25 29 0d 01 0a 12 c9 47 25 28 31 29 3a f2 |-A%).....G%(1):.|
00002cf0 58 5f 28 41 25 29 0d 01 0b 0c 7f f2 6f 5f 28 77 |X_(A%)......o_(w|
00002d00 25 29 0d 01 0c 05 cb 0d 01 0d 24 cc 3a e3 41 25 |%)........$.:.A%|
00002d10 3d 31 b8 69 79 25 3a e7 74 25 3c 41 25 8c 58 25 |=1.iy%:.t%<A%.X%|
00002d20 3d 69 5f 25 8b 58 25 3d 6c 5f 25 0d 01 0e 24 e7 |=i_%.X%=l_%...$.|
00002d30 a4 72 28 5f 25 2c 51 25 2c 58 25 2c 2d 6f 25 2d |.r(_%,Q%,X%,-o%-|
00002d40 41 25 2a 4e 79 25 2c 33 36 2c 4e 79 25 29 8c 0d |A%*Ny%,36,Ny%)..|
00002d50 01 0f 1a e7 6e 25 3c 3e 32 8c 74 25 3d 41 25 3a |....n%<>2.t%=A%:|
00002d60 76 25 3d 53 25 28 74 25 29 0d 01 10 07 cd 3a ed |v%=S%(t%).....:.|
00002d70 0d 01 11 05 cd 0d 01 12 4b cd 3a e7 28 77 25 3d |........K.:.(w%=|
00002d80 2d 31 84 6e 25 3d 32 29 80 a4 72 28 5f 25 2c 51 |-1.n%=2)..r(_%,Q|
00002d90 25 2c 79 79 25 2c 2d 6f 25 2c 6a 25 2c 2d 6d 25 |%,yy%,-o%,j%,-m%|
00002da0 29 8c f2 68 79 28 6e 25 2c a3 2c 5f 25 2d 79 79 |)..hy(n%,.,_%-yy|
00002db0 25 2c 51 25 2b 6f 25 2c 6f 5f 25 2c 77 4a 25 29 |%,Q%+o%,o_%,wJ%)|
00002dc0 0d 01 13 49 e7 28 77 25 3d 2d 31 84 6e 25 3d 32 |...I.(w%=-1.n%=2|
00002dd0 29 80 a4 72 28 5f 25 2c 51 25 2c 64 79 25 2c 2d |)..r(_%,Q%,dy%,-|
00002de0 6f 25 2c 6a 25 2c 2d 6d 25 29 8c f2 68 79 28 6e |o%,j%,-m%)..hy(n|
00002df0 25 2c b9 2c 5f 25 2d 64 79 25 2c 51 25 2b 6f 25 |%,.,_%-dy%,Q%+o%|
00002e00 2c 6f 5f 25 2c 77 4a 25 29 0d 01 14 0a e7 6e 25 |,o_%,wJ%).....n%|
00002e10 3d 32 8c 0d 01 15 28 e7 54 25 28 74 25 29 3c 3e |=2....(.T%(t%)<>|
00002e20 2d 31 8c f2 43 28 54 25 28 74 25 29 2c 58 79 25 |-1..C(T%(t%),Xy%|
00002e30 2c 54 79 25 2c 65 25 2c 77 25 29 0d 01 16 14 cc |,Ty%,e%,w%).....|
00002e40 e7 ac 51 4a 25 8c f2 4d 28 69 25 2c 2d 31 29 0d |..QJ%..M(i%,-1).|
00002e50 01 17 07 cd 3a e1 0d 01 18 11 dd f2 51 79 3a e7 |....:.......Qy:.|
00002e60 56 5f 25 3d 74 25 8c 0d 01 19 23 e7 76 25 3c 3e |V_%=t%....#.v%<>|
00002e70 7a 5f 25 80 70 79 25 3d 30 8c 70 79 25 3d 31 2b |z_%.py%=0.py%=1+|
00002e80 32 2a 28 76 25 3c 7a 5f 25 29 0d 01 1a 28 cc f2 |2*(v%<z_%)...(..|
00002e90 43 5f 28 56 5f 25 29 3a f2 4d 28 69 25 2c 2d 31 |C_(V_%):.M(i%,-1|
00002ea0 29 3a 70 79 25 3d 31 2b 32 2a 28 74 25 3c 56 5f |):py%=1+2*(t%<V_|
00002eb0 25 29 0d 01 1b 1a cd 3a e7 28 75 4a 25 84 70 79 |%).....:.(uJ%.py|
00002ec0 25 3c 3e 30 29 80 56 79 25 8c f2 4f 0d 01 1c 2e |%<>0).Vy%..O....|
00002ed0 53 25 28 56 5f 25 29 3d 7a 5f 25 3a 53 25 28 74 |S%(V_%)=z_%:S%(t|
00002ee0 25 29 3d 76 25 3a e7 56 5f 25 3c 3e 74 25 8c f2 |%)=v%:.V_%<>t%..|
00002ef0 62 79 28 74 25 29 3a f2 70 79 0d 01 1d 05 e1 0d |by(t%):.py......|
00002f00 01 1e 50 dd f2 4f 3a f2 70 5f 3a f2 58 75 28 70 |..P..O:.p_:.Xu(p|
00002f10 79 25 29 3a f2 44 28 69 25 2c 79 79 25 2c 2d 6f |y%):.D(i%,yy%,-o|
00002f20 25 2c 79 79 25 2b 6a 25 2c 2d 6f 25 2d 6d 25 29 |%,yy%+j%,-o%-m%)|
00002f30 3a f2 44 28 69 25 2c 64 79 25 2c 2d 6f 25 2c 64 |:.D(i%,dy%,-o%,d|
00002f40 79 25 2b 6a 25 2c 2d 6f 25 2d 6d 25 29 3a e1 0d |y%+j%,-o%-m%):..|
00002f50 01 1f 2d dd f2 77 5f 3a f2 44 28 69 25 2c 79 79 |..-..w_:.D(i%,yy|
00002f60 25 2b 6a 25 2d 33 32 2c 2d 6f 25 2c 64 79 25 2b |%+j%-32,-o%,dy%+|
00002f70 33 32 2c 2d 6f 25 2d 6d 25 29 3a e1 0d 01 20 61 |32,-o%-m%):... a|
00002f80 dd f2 70 79 3a f2 44 28 69 25 2c 6c 5f 25 2c 2d |..py:.D(i%,l_%,-|
00002f90 6f 25 2c 6c 5f 25 2b 33 36 2c 2d 6f 25 2d 6d 25 |o%,l_%+36,-o%-m%|
00002fa0 29 3a f2 44 28 69 25 2c 69 5f 25 2c 2d 6f 25 2c |):.D(i%,i_%,-o%,|
00002fb0 69 5f 25 2b 33 36 2c 2d 6f 25 2d 6d 25 29 3a f2 |i_%+36,-o%-m%):.|
00002fc0 44 28 69 25 2c 47 4a 25 2c 2d 6f 25 2c 47 4a 25 |D(i%,GJ%,-o%,GJ%|
00002fd0 2b 33 32 2c 2d 6f 25 2d 6d 25 29 3a e1 0d 01 21 |+32,-o%-m%):...!|
00002fe0 26 dd f2 78 28 65 25 2c 49 4a 25 2c 56 6c 25 29 |&..x(e%,IJ%,Vl%)|
00002ff0 3a ea 41 25 3a 41 25 3d 56 79 25 3a e7 65 25 3d |:.A%:A%=Vy%:.e%=|
00003000 69 25 8c 0d 01 22 0d e7 65 4a 25 3c 3e 2d 31 8c |i%..."..eJ%<>-1.|
00003010 0d 01 23 69 21 4a 25 3d 69 25 3a c8 99 26 34 30 |..#i!J%=i%:..&40|
00003020 30 43 42 2c 2c 4a 25 3a 4a 25 21 34 3d 61 75 25 |0CB,,J%:J%!4=au%|
00003030 3a 4a 25 21 38 3d 78 75 25 2d 72 79 25 3a 4a 25 |:J%!8=xu%-ry%:J%|
00003040 21 26 43 3d 61 75 25 2b 78 79 25 3a 4a 25 21 31 |!&C=au%+xy%:J%!1|
00003050 36 3d 78 75 25 3a 4a 25 21 32 38 3d 49 4a 25 3a |6=xu%:J%!28=IJ%:|
00003060 c8 99 26 34 30 30 43 35 2c 2c 4a 25 3a f2 77 28 |..&400C5,,J%:.w(|
00003070 69 25 2c 49 4a 25 2c 30 29 0d 01 24 13 cc f2 77 |i%,IJ%,0)..$...w|
00003080 28 65 25 2c 49 4a 25 2c 56 6c 25 29 0d 01 25 14 |(e%,IJ%,Vl%)..%.|
00003090 cd 3a e7 ac 41 25 8c f2 4d 28 69 25 2c 2d 31 29 |.:..A%..M(i%,-1)|
000030a0 0d 01 26 13 cc f2 77 28 65 25 2c 49 4a 25 2c 56 |..&...w(e%,IJ%,V|
000030b0 6c 25 29 0d 01 27 07 cd 3a e1 0d 01 28 18 dd f2 |l%)..'..:...(...|
000030c0 58 75 28 41 25 29 3a e7 4d 75 25 80 41 25 3c 3e |Xu(A%):.Mu%.A%<>|
000030d0 30 8c 0d 01 29 c4 ea 71 75 25 2c 5f 25 2c 61 25 |0...)..qu%,_%,a%|
000030e0 2c 4b 25 2c 52 79 25 2c 67 25 2c 52 25 2c 43 25 |,K%,Ry%,g%,R%,C%|
000030f0 3a 21 4a 25 3d 69 25 3a c8 99 26 34 30 30 43 42 |:!J%=i%:..&400CB|
00003100 2c 2c 4a 25 3a 61 25 3d 4a 25 21 34 2d 4a 25 21 |,,J%:a%=J%!4-J%!|
00003110 32 30 3a 4b 25 3d 4a 25 21 31 36 2d 4a 25 21 32 |20:K%=J%!16-J%!2|
00003120 34 3a 52 79 25 3d 61 25 2b 64 79 25 2d 26 36 34 |4:Ry%=a%+dy%-&64|
00003130 81 32 3a 67 25 3d 28 26 36 34 2f 32 2d 33 32 29 |.2:g%=(&64/2-32)|
00003140 3a 52 25 3d 6a 25 2b 26 36 34 2f 32 3a c8 99 26 |:R%=j%+&64/2:..&|
00003150 34 30 37 34 32 2c 30 b8 43 25 3a 43 25 2b 3d 33 |40742,0.C%:C%+=3|
00003160 3c 3c 34 3a e3 5f 25 3d 30 b8 26 42 34 88 26 46 |<<4:._%=0.&B4.&F|
00003170 3a f2 76 79 28 5f 25 2c 41 25 29 3a 54 25 3d 91 |:.vy(_%,A%):T%=.|
00003180 3a f5 fd 91 3e 54 25 2b 31 3a f2 76 79 28 5f 25 |:...>T%+1:.vy(_%|
00003190 2c 41 25 29 3a ed 0d 01 2a 07 cd 3a e1 0d 01 2b |,A%):...*..:...+|
000031a0 4a dd f2 76 79 28 5f 25 2c 41 25 29 3a 21 4a 25 |J..vy(_%,A%):!J%|
000031b0 3d 69 25 3a 4a 25 21 34 3d 30 3a 4a 25 21 38 3d |=i%:J%!4=0:J%!8=|
000031c0 2d 72 79 25 3a 4a 25 21 26 43 3d 78 79 25 3a 4a |-ry%:J%!&C=xy%:J|
000031d0 25 21 31 36 3d 30 3a e7 41 25 3d 2d 31 8c 5f 25 |%!16=0:.A%=-1._%|
000031e0 3d 26 42 34 2d 5f 25 0d 01 2c b7 c8 99 26 34 30 |=&B4-_%..,...&40|
000031f0 30 43 39 2c 2c 4a 25 b8 71 75 25 3a c8 95 71 75 |0C9,,J%.qu%:..qu|
00003200 25 3a c8 99 26 34 30 30 45 36 2c 43 25 3a ec 52 |%:..&400E6,C%:.R|
00003210 79 25 2b 67 25 2a 9b b2 5f 25 2c 4b 25 2d 6f 25 |y%+g%*.._%,K%-o%|
00003220 2b 30 2e 32 2a 67 25 2a b5 b2 5f 25 3a df 52 79 |+0.2*g%*.._%:.Ry|
00003230 25 2b 52 25 2a 9b b2 5f 25 2c 4b 25 2d 6f 25 2b |%+R%*.._%,K%-o%+|
00003240 30 2e 32 2a 52 25 2a b5 b2 5f 25 3a df 42 59 30 |0.2*R%*.._%:.BY0|
00003250 2c 2d 6d 25 3a df 52 79 25 2b 67 25 2a 9b b2 5f |,-m%:.Ry%+g%*.._|
00003260 25 2c 4b 25 2d 6f 25 2d 6d 25 3a df 52 79 25 2b |%,K%-o%-m%:.Ry%+|
00003270 67 25 2a 9b b2 5f 25 2c 4b 25 2d 6f 25 2b 30 2e |g%*.._%,K%-o%+0.|
00003280 32 2a 67 25 2a b5 b2 5f 25 3a c8 99 26 34 30 30 |2*g%*.._%:..&400|
00003290 43 41 2c 2c 4a 25 b8 71 75 25 3a ce 3a e1 0d 01 |CA,,J%.qu%:.:...|
000032a0 2d 3b dd f2 42 4a ea 41 25 2c 43 25 2c 52 69 25 |-;..BJ.A%,C%,Ri%|
000032b0 2c 56 5f 25 2c 7a 5f 25 2c 76 61 25 3a 52 69 25 |,V_%,z_%,va%:Ri%|
000032c0 3d a4 47 79 3a 56 5f 25 3d 74 25 3a 7a 5f 25 3d |=.Gy:V_%=t%:z_%=|
000032d0 76 25 3a c8 8e 74 4a 25 ca 0d 01 2e 0f c9 51 75 |v%:..tJ%......Qu|
000032e0 25 3a c8 8e 21 55 25 ca 0d 01 2f 06 c9 30 0d 01 |%:..!U%.../..0..|
000032f0 30 16 c9 31 3a f2 73 28 55 79 25 2c 62 79 25 2c |0..1:.s(Uy%,by%,|
00003300 46 79 25 29 0d 01 31 f3 c9 32 3a 21 55 25 3d 2d |Fy%)..1..2:!U%=-|
00003310 31 3a 55 25 21 34 3d 4e 4a 25 3a c8 99 26 34 30 |1:U%!4=NJ%:..&40|
00003320 30 43 45 2c 2c 55 25 3a 21 4a 25 3d 41 79 25 3a |0CE,,U%:!J%=Ay%:|
00003330 c8 99 26 34 30 30 43 42 2c 2c 4a 25 3a 4a 25 21 |..&400CB,,J%:J%!|
00003340 34 3d 55 25 21 31 36 2d 28 4a 25 21 26 43 2d 4a |4=U%!16-(J%!&C-J|
00003350 25 21 34 29 3a 4a 25 21 26 43 3d 55 25 21 31 36 |%!4):J%!&C=U%!16|
00003360 3a 4a 25 21 31 36 3d 26 38 38 2b 28 4a 25 21 31 |:J%!16=&88+(J%!1|
00003370 36 2d 4a 25 21 38 29 3a 4a 25 21 32 38 3d 2d 31 |6-J%!8):J%!28=-1|
00003380 3a c8 99 26 34 30 30 43 35 2c 2c 4a 25 3a f2 41 |:..&400C5,,J%:.A|
00003390 28 41 79 25 2c 32 2c a4 51 28 55 79 25 2c 62 79 |(Ay%,2,.Q(Uy%,by|
000033a0 25 2c 46 79 25 2c 2d 31 29 29 3a 50 5f 25 3d 55 |%,Fy%,-1)):P_%=U|
000033b0 79 25 3a 4e 5f 25 3d 62 79 25 3a 51 5f 25 3d 46 |y%:N_%=by%:Q_%=F|
000033c0 79 25 3a 41 25 3d a4 66 3a 74 5f 25 3d 41 25 3e |y%:A%=.f:t_%=A%>|
000033d0 26 42 3a 41 25 3d 41 25 83 26 43 3a 41 25 2d 3d |&B:A%=A%.&C:A%-=|
000033e0 26 43 2a 28 41 25 3d 30 29 3a f2 41 28 41 79 25 |&C*(A%=0):.A(Ay%|
000033f0 2c 34 2c c3 41 25 29 0d 01 32 2e e7 74 5f 25 8c |,4,.A%)..2..t_%.|
00003400 f2 41 28 41 79 25 2c 37 2c a4 41 28 22 70 6d 22 |.A(Ay%,7,.A("pm"|
00003410 29 29 8b f2 41 28 41 79 25 2c 37 2c a4 41 28 22 |))..A(Ay%,7,.A("|
00003420 61 6d 22 29 29 0d 01 33 4f 41 25 3d a4 69 3a f2 |am"))..3OA%=.i:.|
00003430 41 28 41 79 25 2c 35 2c c4 32 2d a9 c3 41 25 2c |A(Ay%,5,.2-..A%,|
00003440 22 30 22 29 2b c3 41 25 29 3a c8 99 36 2c 26 41 |"0")+.A%):..6,&A|
00003450 31 2c 26 44 43 b8 2c 2c 41 25 3a f2 5a 28 41 79 |1,&DC.,,A%:.Z(Ay|
00003460 25 2c 31 2c 94 28 28 41 25 80 26 38 30 29 3d 26 |%,1,.((A%.&80)=&|
00003470 38 30 29 29 0d 01 34 20 c9 33 3a ff 22 46 69 6c |80))..4 .3:."Fil|
00003480 65 72 5f 52 75 6e 20 22 2b 4a 24 2b 22 2e 21 48 |er_Run "+J$+".!H|
00003490 65 6c 70 22 0d 01 35 11 c9 34 3a e7 59 79 25 3d |elp"..5..4:.Yy%=|
000034a0 30 8c f2 52 79 0d 01 36 09 c9 35 3a f2 74 0d 01 |0..Ry..6..5:.t..|
000034b0 37 0d c9 36 3a 44 75 25 3d a4 75 0d 01 38 05 cb |7..6:Du%=.u..8..|
000034c0 0d 01 39 16 c9 54 25 28 74 25 29 3a f2 63 75 28 |..9..T%(t%):.cu(|
000034d0 55 25 2c 74 25 29 0d 01 3a 16 c9 64 5f 25 3a f2 |U%,t%)..:..d_%:.|
000034e0 4c 79 28 2d 31 2c 21 55 25 2c 30 29 0d 01 3b 0f |Ly(-1,!U%,0)..;.|
000034f0 c9 46 6c 25 3a c8 8e 69 4a 25 ca 0d 01 3c 24 c9 |.Fl%:..iJ%...<$.|
00003500 66 25 3a 68 4a 25 3d 21 55 25 3a e7 21 55 25 3e |f%:hJ%=!U%:.!U%>|
00003510 30 8c 43 25 3d 21 55 25 8b 43 25 3d 6d 5f 25 0d |0.C%=!U%.C%=m_%.|
00003520 01 3d 1c e3 41 25 3d 31 36 b8 31 38 3a f2 55 28 |.=..A%=16.18:.U(|
00003530 66 25 2c 41 25 2c 43 25 29 3a ed 0d 01 3e 25 c9 |f%,A%,C%):...>%.|
00003540 48 79 25 3a 6f 6c 25 3d 21 55 25 3a e7 21 55 25 |Hy%:ol%=!U%:.!U%|
00003550 3d 30 8c 41 25 3d 44 4a 25 8b 41 25 3d 21 55 25 |=0.A%=DJ%.A%=!U%|
00003560 0d 01 3f 10 f2 55 28 48 79 25 2c 34 2c 41 25 29 |..?..U(Hy%,4,A%)|
00003570 0d 01 40 05 cb 0d 01 41 15 c9 75 75 25 3a f2 50 |..@....A..uu%:.P|
00003580 4a 28 5f 5f 25 2c 21 55 25 29 0d 01 42 42 c9 6f |J(__%,!U%)..BB.o|
00003590 4a 25 3a 51 25 28 30 29 3d 21 55 25 3a f2 6f 28 |J%:Q%(0)=!U%:.o(|
000035a0 41 25 28 36 29 2c 31 38 2c 51 25 28 29 29 3a f2 |A%(6),18,Q%()):.|
000035b0 48 28 6f 4a 25 2c 30 2c 2d 31 29 3a f2 4a 28 6f |H(oJ%,0,-1):.J(o|
000035c0 4a 25 2c 51 25 28 30 29 2c 2d 31 29 0d 01 43 0c |J%,Q%(0),-1)..C.|
000035d0 7f 3a c8 8e 69 4a 25 ca 0d 01 44 11 c9 41 25 28 |.:..iJ%...D..A%(|
000035e0 36 29 3a c8 8e 5f 5f 25 ca 0d 01 45 17 c9 32 2c |6):..__%...E..2,|
000035f0 33 2c 34 2c 35 3a e7 55 25 21 34 3c 3e 2d 31 8c |3,4,5:.U%!4<>-1.|
00003600 0d 01 46 2c e7 21 55 25 3d 30 8c f2 55 28 69 4a |..F,.!U%=0..U(iJ|
00003610 25 2c 5f 5f 25 2c 55 25 21 34 29 8b f2 62 28 69 |%,__%,U%!4)..b(i|
00003620 4a 25 2c 5f 5f 25 2c 55 25 21 34 29 0d 01 47 05 |J%,__%,U%!4)..G.|
00003630 cd 0d 01 48 3e c9 39 2c 26 41 2c 26 42 2c 26 43 |...H>.9,&A,&B,&C|
00003640 2c 26 44 2c 26 45 2c 26 46 3a 58 25 28 5f 5f 25 |,&D,&E,&F:X%(__%|
00003650 2d 39 29 3d 21 55 25 3a f2 44 28 69 4a 25 2c 32 |-9)=!U%:.D(iJ%,2|
00003660 34 2c 2d 36 34 2c 26 42 38 2c 2d 26 44 30 29 0d |4,-64,&B8,-&D0).|
00003670 01 49 4e c9 32 30 2c 32 31 3a 51 25 28 5f 5f 25 |.IN.20,21:Q%(__%|
00003680 2d 31 39 29 3d 21 55 25 3a f2 6f 28 41 25 28 36 |-19)=!U%:.o(A%(6|
00003690 29 2c 31 38 2c 51 25 28 29 29 3a f2 48 28 42 79 |),18,Q%()):.H(By|
000036a0 25 2c 30 2c 2d 31 29 3a f2 4a 28 42 79 25 2c 51 |%,0,-1):.J(By%,Q|
000036b0 25 28 5f 5f 25 2d 31 39 29 2c 2d 31 29 0d 01 4a |%(__%-19),-1)..J|
000036c0 05 cb 0d 01 4b 10 c9 59 79 25 3a f2 55 4a 28 55 |....K..Yy%:.UJ(U|
000036d0 25 29 0d 01 4c 17 c9 66 25 2c 4c 79 25 3a f2 69 |%)..L..f%,Ly%:.i|
000036e0 79 28 74 4a 25 2c 55 25 29 0d 01 4d 10 7f f2 72 |y(tJ%,U%)..M...r|
000036f0 4a 28 74 4a 25 2c 55 25 29 0d 01 4e 05 cb 0d 01 |J(tJ%,U%)..N....|
00003700 4f 20 cb 3a e7 52 69 25 8c f2 43 28 74 4a 25 2c |O .:.Ri%..C(tJ%,|
00003710 2d 31 2c 2d 31 2c 69 4a 25 2c 5f 5f 25 29 0d 01 |-1,-1,iJ%,__%)..|
00003720 50 09 f2 51 79 3a e1 0d 01 51 3b dd f2 43 28 4d |P..Qy:...Q;..C(M|
00003730 79 25 2c 5f 25 2c 51 25 2c 73 25 2c 53 79 25 29 |y%,_%,Q%,s%,Sy%)|
00003740 ea 41 25 3a e7 28 4d 79 25 3d 51 75 25 84 4d 79 |.A%:.(My%=Qu%.My|
00003750 25 3d 54 25 28 74 25 29 29 80 4d 79 25 3c 3e 2d |%=T%(t%)).My%<>-|
00003760 31 8c 0d 01 52 42 f2 4a 28 5a 6c 25 2c 30 2c 73 |1...RB.J(Zl%,0,s|
00003770 79 25 3d 31 29 3a f2 4a 28 5a 6c 25 2c 31 2c 73 |y%=1):.J(Zl%,1,s|
00003780 79 25 3d 32 29 3a e3 41 25 3d 30 b8 33 3a f2 4b |y%=2):.A%=0.3:.K|
00003790 28 59 69 25 2c 41 25 2c 2d 28 42 4a 25 3c 3d 30 |(Yi%,A%,-(BJ%<=0|
000037a0 29 29 3a ed 0d 01 53 35 cd 3a c8 99 26 34 30 30 |)):...S5.:..&400|
000037b0 44 34 2c 2c 4d 79 25 2c 5f 25 2d 36 34 2c 51 25 |D4,,My%,_%-64,Q%|
000037c0 3a 74 4a 25 3d 4d 79 25 3a 69 4a 25 3d 73 25 3a |:tJ%=My%:iJ%=s%:|
000037d0 5f 5f 25 3d 53 79 25 3a e1 0d 01 54 3a dd f2 60 |__%=Sy%:...T:..`|
000037e0 4a 28 65 25 2c 77 25 2c 43 79 25 29 ea 7a 5f 25 |J(e%,w%,Cy%).z_%|
000037f0 2c 76 61 25 2c 41 25 2c 42 25 3a 56 5f 25 3d 74 |,va%,A%,B%:V_%=t|
00003800 25 3a 7a 5f 25 3d 76 25 3a 6b 25 3d a3 3a c8 8e |%:z_%=v%:k%=.:..|
00003810 65 25 ca 0d 01 55 16 c9 69 25 3a 6b 25 3d a4 79 |e%...U..i%:k%=.y|
00003820 79 28 77 25 2c 43 79 25 29 0d 01 56 07 c9 2d 31 |y(w%,Cy%)..V..-1|
00003830 0d 01 57 1e c9 49 5f 25 2c 59 79 25 3a 6b 25 3d |..W..I_%,Yy%:k%=|
00003840 a4 6a 79 28 65 25 2c 77 25 2c 43 79 25 29 0d 01 |.jy(e%,w%,Cy%)..|
00003850 58 16 7f 6b 25 3d a4 43 5f 28 65 25 2c 77 25 2c |X..k%=.C_(e%,w%,|
00003860 43 79 25 29 0d 01 59 0c cb 3a e7 6b 25 3d a3 8c |Cy%)..Y..:.k%=..|
00003870 0d 01 5a 0f 6b 25 3d b9 3a c8 8e 43 79 25 ca 0d |..Z.k%=.:..Cy%..|
00003880 01 5b 12 c9 32 37 3a e7 59 79 25 3c 3e 30 8c f2 |.[..27:.Yy%<>0..|
00003890 68 0d 01 5c 22 c9 33 38 35 3a ff 22 46 69 6c 65 |h..\".385:."File|
000038a0 72 5f 52 75 6e 20 22 2b 4a 24 2b 22 2e 21 48 65 |r_Run "+J$+".!He|
000038b0 6c 70 22 0d 01 5d 13 c9 33 38 36 3a e7 59 79 25 |lp"..]..386:.Yy%|
000038c0 3d 30 8c f2 52 79 0d 01 5e 0b c9 33 38 37 3a f2 |=0..Ry..^..387:.|
000038d0 74 0d 01 5f 13 c9 38 31 2d 36 35 2b 31 3a 44 75 |t.._..81-65+1:Du|
000038e0 25 3d a4 75 0d 01 60 09 7f 6b 25 3d a3 0d 01 61 |%=.u..`..k%=...a|
000038f0 36 cb 3a e7 43 79 25 3e 3d 34 30 31 80 43 79 25 |6.:.Cy%>=401.Cy%|
00003900 3c 3d 34 30 30 2b 69 79 25 8c 74 25 3d 43 79 25 |<=400+iy%.t%=Cy%|
00003910 2d 34 30 30 3a 76 25 3d 53 25 28 74 25 29 3a 6b |-400:v%=S%(t%):k|
00003920 25 3d b9 0d 01 62 1b cd 3a f2 51 79 3a e7 ac 6b |%=...b..:.Qy:..k|
00003930 25 8c c8 99 26 34 30 30 44 43 2c 43 79 25 0d 01 |%...&400DC,Cy%..|
00003940 63 05 e1 0d 01 64 1d dd f2 71 28 41 24 29 e7 41 |c....d...q(A$).A|
00003950 24 3c 3e 22 22 8c 42 24 2b 3d 41 24 2b bd 26 44 |$<>"".B$+=A$+.&D|
00003960 0d 01 65 05 e1 0d 01 66 52 dd f2 69 75 3a c8 99 |..e....fR..iu:..|
00003970 26 34 30 30 44 33 2c 2c 55 25 3a e7 21 55 25 3c |&400D3,,U%:.!U%<|
00003980 3e 69 25 80 21 55 25 3c 3e 60 25 80 5a 25 28 74 |>i%.!U%<>`%.Z%(t|
00003990 25 29 3d 32 80 21 55 25 3c 3e 2d 31 8c c8 99 26 |%)=2.!U%<>-1...&|
000039a0 34 30 30 44 43 2c 97 c0 42 24 2c 31 29 3a 42 24 |400DC,..B$,1):B$|
000039b0 3d c1 42 24 2c 32 29 0d 01 67 05 e1 0d 01 68 97 |=.B$,2)..g....h.|
000039c0 dd f2 68 4a 3a f2 42 28 22 59 6f 75 20 61 72 65 |..hJ:.B("You are|
000039d0 20 61 62 6f 75 74 20 74 6f 20 67 65 74 20 61 20 | about to get a |
000039e0 6d 65 73 73 61 67 65 20 66 72 6f 6d 20 74 68 65 |message from the|
000039f0 20 61 75 74 68 6f 72 20 6f 66 20 21 4f 72 67 61 | author of !Orga|
00003a00 6e 69 73 65 72 2c 20 70 6c 65 61 73 65 20 72 65 |niser, please re|
00003a10 61 64 20 69 74 2c 20 69 74 20 77 69 6c 6c 20 62 |ad it, it will b|
00003a20 65 20 77 6f 72 74 68 20 79 6f 75 72 20 77 68 69 |e worth your whi|
00003a30 6c 65 21 22 29 3a ff 22 46 69 6c 65 72 5f 52 75 |le!"):."Filer_Ru|
00003a40 6e 20 22 2b 4a 24 2b 22 2e 4e 65 77 55 73 65 72 |n "+J$+".NewUser|
00003a50 22 3a e1 0d 01 69 26 dd f2 57 5f 3a 21 4a 25 3d |":...i&..W_:!J%=|
00003a60 5a 75 25 3a c8 99 26 34 30 30 43 33 2c 2c 4a 25 |Zu%:..&400C3,,J%|
00003a70 3a 65 75 25 3d 2d 31 3a e1 0d 01 6a 36 dd f2 59 |:eu%=-1:...j6..Y|
00003a80 79 3a 60 4a 25 3d b9 3a f2 5f 79 28 30 2c 30 2c |y:`J%=.:._y(0,0,|
00003a90 30 2c 30 2c 30 2c a3 2c a3 29 3a f2 64 28 30 29 |0,0,0,.,.):.d(0)|
00003aa0 3a 60 4a 25 3d a3 3a 58 4a 25 3d 2d 31 3a e1 0d |:`J%=.:XJ%=-1:..|
00003ab0 01 6b 2c dd f2 44 5f 28 71 69 25 2c 65 25 2c 5f |.k,..D_(qi%,e%,_|
00003ac0 25 2c 51 25 2c 54 6c 25 2c 5a 69 25 2c 4d 69 25 |%,Q%,Tl%,Zi%,Mi%|
00003ad0 29 3a e7 4d 75 25 80 56 79 25 8c 0d 01 6c 5f 58 |):.Mu%.Vy%...l_X|
00003ae0 4a 25 3d 65 25 3a 78 5f 25 3d 71 69 25 3a 42 6c |J%=e%:x_%=qi%:Bl|
00003af0 25 3d 5f 25 3a 48 6c 25 3d 51 25 3a 48 75 25 3d |%=_%:Hl%=Q%:Hu%=|
00003b00 54 6c 25 3a 72 6c 25 3d 5a 69 25 3a 66 6c 25 3d |Tl%:rl%=Zi%:fl%=|
00003b10 4d 69 25 3a 21 4a 25 3d 32 30 3a 4a 25 21 26 43 |Mi%:!J%=20:J%!&C|
00003b20 3d 30 3a c8 99 26 34 30 30 45 37 2c 30 2c 4a 25 |=0:..&400E7,0,J%|
00003b30 2c 73 75 25 3a 60 4a 25 3d b9 0d 01 6d 29 cc f2 |,su%:`J%=...m)..|
00003b40 5f 79 28 71 69 25 2c 65 25 2c 5f 25 2c 51 25 2c |_y(qi%,e%,_%,Q%,|
00003b50 54 6c 25 2c 5a 69 25 2c 4d 69 25 29 3a 58 4a 25 |Tl%,Zi%,Mi%):XJ%|
00003b60 3d 2d 31 0d 01 6e 07 cd 3a e1 0d 01 6f 3a dd f2 |=-1..n..:...o:..|
00003b70 56 75 3a f2 5f 79 28 78 5f 25 2c 58 4a 25 2c 42 |Vu:._y(x_%,XJ%,B|
00003b80 6c 25 2c 48 6c 25 2c 48 75 25 2c 72 6c 25 2c 66 |l%,Hl%,Hu%,rl%,f|
00003b90 6c 25 29 3a e7 58 4a 25 3d 60 25 8c f2 4d 28 60 |l%):.XJ%=`%..M(`|
00003ba0 25 2c 39 29 0d 01 70 12 58 4a 25 3d 2d 31 3a 60 |%,9)..p.XJ%=-1:`|
00003bb0 4a 25 3d a3 3a e1 0d 01 71 e9 dd f2 52 79 3a ea |J%=.:...q...Ry:.|
00003bc0 41 25 2c 73 25 2c 62 25 2c 41 24 3a 41 25 3d 41 |A%,s%,b%,A$:A%=A|
00003bd0 25 28 31 29 3a f2 5a 28 41 25 2c 31 2c 2d 73 5f |%(1):.Z(A%,1,-s_|
00003be0 25 29 3a f2 5a 28 41 25 2c 32 2c 2d 67 75 25 29 |%):.Z(A%,2,-gu%)|
00003bf0 3a f2 5a 28 41 25 2c 33 2c 2d 64 75 25 29 3a f2 |:.Z(A%,3,-du%):.|
00003c00 5a 28 41 25 2c 34 2c 2d 4d 75 25 29 3a f2 5a 28 |Z(A%,4,-Mu%):.Z(|
00003c10 41 25 2c 37 2c 2d 28 28 71 79 25 80 39 29 3d 30 |A%,7,-((qy%.9)=0|
00003c20 29 29 3a f2 5a 28 41 25 2c 38 2c 2d 28 28 71 79 |)):.Z(A%,8,-((qy|
00003c30 25 80 34 29 3e 30 29 29 3a f2 5a 28 41 25 2c 39 |%.4)>0)):.Z(A%,9|
00003c40 2c 2d 28 28 71 79 25 80 35 29 3d 31 29 29 3a f2 |,-((qy%.5)=1)):.|
00003c50 5a 28 41 25 2c 32 32 2c 2d 28 28 71 79 25 80 38 |Z(A%,22,-((qy%.8|
00003c60 29 3d 38 29 29 3a f2 5a 28 41 25 2c 32 33 2c 2d |)=8)):.Z(A%,23,-|
00003c70 28 78 4a 25 3d 2d 31 29 29 3a f2 5a 28 41 25 2c |(xJ%=-1)):.Z(A%,|
00003c80 26 41 2c 2d 28 28 71 79 25 80 32 29 3e 30 29 29 |&A,-((qy%.2)>0))|
00003c90 3a f2 5a 28 41 25 2c 26 42 2c 2d 72 5f 25 29 0d |:.Z(A%,&B,-r_%).|
00003ca0 01 72 fa f2 5a 28 41 25 2c 32 34 2c 2d 28 28 71 |.r..Z(A%,24,-((q|
00003cb0 79 25 80 31 36 29 3d 31 36 29 29 3a f2 41 28 41 |y%.16)=16)):.A(A|
00003cc0 25 2c 32 35 2c 4e 24 29 3a f2 5a 28 41 25 2c 26 |%,25,N$):.Z(A%,&|
00003cd0 46 2c 2d 46 75 25 29 3a f2 5a 28 41 25 2c 31 36 |F,-Fu%):.Z(A%,16|
00003ce0 2c 2d 53 75 25 29 3a f2 5a 28 41 25 2c 26 45 2c |,-Su%):.Z(A%,&E,|
00003cf0 2d 28 65 4a 25 3d 2d 31 29 29 3a f2 5a 28 41 25 |-(eJ%=-1)):.Z(A%|
00003d00 2c 31 39 2c 2d 28 65 4a 25 3c 3e 2d 31 29 29 3a |,19,-(eJ%<>-1)):|
00003d10 f2 5a 28 41 25 2c 32 30 2c 2d 28 75 5f 25 3d 2d |.Z(A%,20,-(u_%=-|
00003d20 31 29 29 3a f2 5a 28 41 25 2c 32 31 2c 2d ac 28 |1)):.Z(A%,21,-.(|
00003d30 46 4a 25 29 29 3a f2 53 28 41 25 2c 26 42 2c 94 |FJ%)):.S(A%,&B,.|
00003d40 ac 28 a4 4d 28 41 25 2c 39 29 80 ac a4 4d 28 41 |.(.M(A%,9)...M(A|
00003d50 25 2c 32 34 29 29 29 3a f2 53 28 41 25 2c 26 41 |%,24))):.S(A%,&A|
00003d60 2c 94 ac 28 a4 4d 28 41 25 2c 38 29 84 28 a4 4d |,..(.M(A%,8).(.M|
00003d70 28 41 25 2c 39 29 80 ac a4 4d 28 41 25 2c 32 34 |(A%,9)...M(A%,24|
00003d80 29 29 29 29 3a f2 53 28 41 25 2c 32 34 2c 94 ac |)))):.S(A%,24,..|
00003d90 a4 4d 28 41 25 2c 39 29 29 0d 01 73 da f2 53 28 |.M(A%,9))..s..S(|
00003da0 41 25 2c 32 35 2c 94 ac 28 a4 4d 28 41 25 2c 39 |A%,25,..(.M(A%,9|
00003db0 29 80 a4 4d 28 41 25 2c 32 34 29 29 29 3a e3 73 |)..M(A%,24))):.s|
00003dc0 25 3d 5f 4a 25 2d 31 b8 30 88 2d 31 3a 41 24 2b |%=_J%-1.0.-1:A$+|
00003dd0 3d c3 28 28 4b 75 25 3e 3e 73 25 29 80 31 29 3a |=.((Ku%>>s%).1):|
00003de0 ed 3a f2 41 28 41 25 2c 31 38 2c 41 24 29 3a f2 |.:.A(A%,18,A$):.|
00003df0 41 28 41 25 2c 32 37 2c 5f 24 29 3a f2 41 28 41 |A(A%,27,_$):.A(A|
00003e00 25 2c 26 44 2c 44 24 29 3a f2 42 75 3a 21 4a 25 |%,&D,D$):.Bu:!J%|
00003e10 3d 49 5f 25 3a c8 99 26 34 30 30 43 42 2c 2c 4a |=I_%:..&400CB,,J|
00003e20 25 3a 73 25 3d 4a 25 21 26 43 2d 4a 25 21 34 3a |%:s%=J%!&C-J%!4:|
00003e30 62 25 3d 4a 25 21 31 36 2d 4a 25 21 38 3a 4a 25 |b%=J%!16-J%!8:J%|
00003e40 21 34 3d 28 a4 64 2d 73 25 29 2f 32 3a 4a 25 21 |!4=(.d-s%)/2:J%!|
00003e50 31 36 3d a4 65 2d 28 a4 65 2d 62 25 29 2f 32 3a |16=.e-(.e-b%)/2:|
00003e60 c8 99 26 34 30 30 43 35 2c 2c 4a 25 3a f2 77 79 |..&400C5,,J%:.wy|
00003e70 28 31 29 0d 01 74 61 58 25 28 29 3d 50 25 28 29 |(1)..taX%()=P%()|
00003e80 3a 51 25 28 29 3d 48 25 28 29 3a f2 6f 28 41 25 |:Q%()=H%():.o(A%|
00003e90 28 36 29 2c 31 38 2c 48 25 28 29 29 3a e3 41 25 |(6),18,H%()):.A%|
00003ea0 3d 32 b8 35 3a f2 62 28 41 25 28 36 29 2c 41 25 |=2.5:.b(A%(6),A%|
00003eb0 2c 44 25 28 41 25 2d 31 29 29 3a f2 55 28 41 25 |,D%(A%-1)):.U(A%|
00003ec0 28 36 29 2c 41 25 2c 49 25 28 41 25 2d 31 29 29 |(6),A%,I%(A%-1))|
00003ed0 3a ed 3a e1 0d 01 75 db dd f2 75 79 3a ea 41 25 |:.:...u...uy:.A%|
00003ee0 2c 43 25 2c 41 24 3a 41 25 3d 41 25 28 31 29 3a |,C%,A$:A%=A%(1):|
00003ef0 42 25 3d 71 79 25 3a 73 5f 25 3d a4 4d 28 41 25 |B%=qy%:s_%=.M(A%|
00003f00 2c 31 29 3a 67 75 25 3d a4 4d 28 41 25 2c 32 29 |,1):gu%=.M(A%,2)|
00003f10 3a 64 75 25 3d a4 4d 28 41 25 2c 33 29 3a 4d 75 |:du%=.M(A%,3):Mu|
00003f20 25 3d a4 4d 28 41 25 2c 34 29 3a 44 24 3d a4 5a |%=.M(A%,4):D$=.Z|
00003f30 28 41 25 2c 26 44 29 3a 72 5f 25 3d a4 4d 28 41 |(A%,&D):r_%=.M(A|
00003f40 25 2c 26 42 29 3a 71 79 25 3d 2d a4 4d 28 41 25 |%,&B):qy%=-.M(A%|
00003f50 2c 39 29 2d 35 2a a4 4d 28 41 25 2c 38 29 2d 38 |,9)-5*.M(A%,8)-8|
00003f60 2a a4 4d 28 41 25 2c 32 32 29 2d 32 2a a4 4d 28 |*.M(A%,22)-2*.M(|
00003f70 41 25 2c 26 41 29 2d 31 36 2a a4 4d 28 41 25 2c |A%,&A)-16*.M(A%,|
00003f80 32 34 29 3a 46 75 25 3d a4 4d 28 41 25 2c 26 46 |24):Fu%=.M(A%,&F|
00003f90 29 3a 53 75 25 3d a4 4d 28 41 25 2c 31 36 29 3a |):Su%=.M(A%,16):|
00003fa0 f2 7a 4a 28 ac a4 4d 28 41 25 2c 32 31 29 29 0d |.zJ(..M(A%,21)).|
00003fb0 01 76 33 65 4a 25 3d a4 4d 28 41 25 2c 26 45 29 |.v3eJ%=.M(A%,&E)|
00003fc0 3a 78 4a 25 3d a4 4d 28 41 25 2c 32 33 29 3a 4e |:xJ%=.M(A%,23):N|
00003fd0 24 3d a4 5a 28 41 25 2c 32 35 29 3a e7 ac 65 4a |$=.Z(A%,25):..eJ|
00003fe0 25 8c 0d 01 77 3d 21 4a 25 3d 69 25 3a c8 99 26 |%...w=!J%=i%:..&|
00003ff0 34 30 30 43 42 2c 2c 4a 25 3a 61 75 25 3d 4a 25 |400CB,,J%:au%=J%|
00004000 21 34 3a 63 6c 25 3d 4a 25 21 38 3a 77 6c 25 3d |!4:cl%=J%!8:wl%=|
00004010 4a 25 21 26 43 3a 78 75 25 3d 4a 25 21 31 36 0d |J%!&C:xu%=J%!16.|
00004020 01 78 29 cd 3a 43 25 3d a4 4d 28 41 25 2c 32 30 |.x).:C%=.M(A%,20|
00004030 29 3a e7 43 25 3c 3e 75 5f 25 8c 75 5f 25 3d 43 |):.C%<>u_%.u_%=C|
00004040 25 8b 75 5f 25 3d 43 25 0d 01 79 58 5f 4a 25 3d |%.u_%=C%..yX_J%=|
00004050 a9 a4 5a 28 41 25 2c 31 38 29 3a 4b 75 25 3d a0 |..Z(A%,18):Ku%=.|
00004060 28 22 25 22 2b a4 5a 28 41 25 2c 31 38 29 29 3a |("%"+.Z(A%,18)):|
00004070 50 25 28 29 3d 58 25 28 29 3a 48 25 28 29 3d 51 |P%()=X%():H%()=Q|
00004080 25 28 29 3a 41 24 3d a4 5a 28 41 25 2c 32 37 29 |%():A$=.Z(A%,27)|
00004090 3a e7 41 24 3c 3e 5f 24 8c f2 47 75 28 41 24 29 |:.A$<>_$..Gu(A$)|
000040a0 0d 01 7a 53 e3 41 25 3d 32 b8 35 3a 44 25 28 41 |..zS.A%=2.5:D%(A|
000040b0 25 2d 31 29 3d a4 70 28 41 25 28 36 29 2c 41 25 |%-1)=.p(A%(6),A%|
000040c0 29 3a 49 25 28 41 25 2d 31 29 3d a4 71 28 41 25 |):I%(A%-1)=.q(A%|
000040d0 28 36 29 2c 41 25 29 3a ed 3a f2 54 75 3a e7 56 |(6),A%):.:.Tu:.V|
000040e0 79 25 8c 70 79 25 3d 30 3a f2 4f 3a f2 77 5f 3a |y%.py%=0:.O:.w_:|
000040f0 f2 70 79 0d 01 7b 14 4d 4a 25 3d 30 3a f2 6d 3a |.py..{.MJ%=0:.m:|
00004100 f2 75 3a f2 6d 3a e1 0d 01 7c 5e dd f2 47 75 28 |.u:.m:...|^..Gu(|
00004110 41 24 29 3a 7a 25 3d ae 22 3c 4f 72 67 61 6e 69 |A$):z%=."<Organi|
00004120 73 65 72 24 44 69 72 3e 2e 52 65 73 6f 75 72 63 |ser$Dir>.Resourc|
00004130 65 73 2e 21 4c 61 6e 67 75 61 67 65 22 3a d5 23 |es.!Language":.#|
00004140 7a 25 2c 41 24 3a d9 23 7a 25 3a 7a 25 3d 30 3a |z%,A$:.#z%:z%=0:|
00004150 f2 42 28 a4 41 28 22 45 72 72 52 65 6c 6f 61 64 |.B(.A("ErrReload|
00004160 22 29 29 3a e1 0d 01 7d 29 dd f2 77 79 28 49 25 |")):...})..wy(I%|
00004170 29 3a e7 59 79 25 3c 3e 30 8c 21 4a 25 3d 59 79 |):.Yy%<>0.!J%=Yy|
00004180 25 3a c8 99 26 34 30 30 43 36 2c 2c 4a 25 0d 01 |%:..&400C6,,J%..|
00004190 7e f2 21 4a 25 3d 49 5f 25 3a c8 99 26 34 30 30 |~.!J%=I_%:..&400|
000041a0 43 42 2c 2c 4a 25 3a 59 79 25 3d 41 25 28 49 25 |CB,,J%:Yy%=A%(I%|
000041b0 29 3a 21 4a 25 3d 59 79 25 3a 4a 25 21 34 2b 3d |):!J%=Yy%:J%!4+=|
000041c0 32 32 3a 4a 25 21 31 36 2d 3d 37 30 3a 4a 25 21 |22:J%!16-=70:J%!|
000041d0 38 3d 4a 25 21 31 36 2d 32 37 32 3a c8 99 26 34 |8=J%!16-272:..&4|
000041e0 30 30 43 35 2c 2c 4a 25 3a 21 4a 25 3d 49 5f 25 |00C5,,J%:!J%=I_%|
000041f0 3a 4a 25 21 34 3d 26 42 3a 4a 25 21 38 3d 31 3c |:J%!4=&B:J%!8=1<|
00004200 3c 32 33 3a 4a 25 21 26 43 3d 31 3c 3c 32 33 3a |<23:J%!&C=1<<23:|
00004210 c8 99 26 34 30 30 43 44 2c 2c 4a 25 3a 4a 25 21 |..&400CD,,J%:J%!|
00004220 34 3d 4a 25 21 38 38 2d 31 3a c8 99 26 34 30 30 |4=J%!88-1:..&400|
00004230 43 34 2c 2c 4a 25 3a 4a 25 21 34 3d 49 25 3a c8 |C4,,J%:J%!4=I%:.|
00004240 99 26 34 30 30 43 45 2c 2c 4a 25 3a 4a 25 21 34 |.&400CE,,J%:J%!4|
00004250 3d 4a 25 21 38 2b 34 3a 4a 25 21 38 3d 4a 25 21 |=J%!8+4:J%!8=J%!|
00004260 26 43 2d 38 3a 4a 25 21 26 43 3d 4a 25 21 31 36 |&C-8:J%!&C=J%!16|
00004270 2d 34 3a 4a 25 21 31 36 3d 4a 25 21 38 2b 26 43 |-4:J%!16=J%!8+&C|
00004280 0d 01 7f 51 4a 25 21 32 30 3d 26 31 37 30 30 30 |...QJ%!20=&17000|
00004290 30 32 31 3a 4a 25 3f 32 34 3d 30 3a c8 99 26 34 |021:J%?24=0:..&4|
000042a0 30 30 43 32 2c 2c 4a 25 b8 49 25 3a 4a 25 21 34 |00C2,,J%.I%:J%!4|
000042b0 3d 49 25 3a 4a 25 21 38 3d 30 3a 4a 25 21 26 43 |=I%:J%!8=0:J%!&C|
000042c0 3d 30 3a c8 99 26 34 30 30 43 44 2c 2c 4a 25 3a |=0:..&400CD,,J%:|
000042d0 e1 0d 01 80 7a dd f2 79 4a 3a 21 4a 25 3d 59 79 |....z..yJ:!J%=Yy|
000042e0 25 3a c8 99 26 34 30 30 43 42 2c 2c 4a 25 3a 4a |%:..&400CB,,J%:J|
000042f0 25 21 34 3d 55 25 21 34 2b 32 32 3a 4a 25 21 31 |%!4=U%!4+22:J%!1|
00004300 36 3d 55 25 21 31 36 2d 37 30 3a 4a 25 21 38 3d |6=U%!16-70:J%!8=|
00004310 4a 25 21 31 36 2d 32 37 32 3a 4a 25 21 32 38 3d |J%!16-272:J%!28=|
00004320 55 25 21 32 38 3a c8 99 26 34 30 30 43 35 2c 2c |U%!28:..&400C5,,|
00004330 4a 25 3a 55 25 21 32 38 3d 59 79 25 3a c8 99 26 |J%:U%!28=Yy%:..&|
00004340 34 30 30 43 35 2c 2c 55 25 3a e1 0d 01 81 1e dd |400C5,,U%:......|
00004350 f2 4e 75 28 65 25 2c 77 25 2c 6e 25 2c 5f 25 2c |.Nu(e%,w%,n%,_%,|
00004360 51 25 29 3a c8 8e 65 25 ca 0d 01 82 0e c9 49 5f |Q%):..e%......I_|
00004370 25 3a c8 8e 77 25 ca 0d 01 83 18 c9 31 2c 32 2c |%:..w%......1,2,|
00004380 33 2c 34 2c 35 2c 36 3a f2 77 79 28 77 25 29 0d |3,4,5,6:.wy(w%).|
00004390 01 84 09 c9 38 3a f2 68 0d 01 85 1b c9 39 3a f2 |....8:.h.....9:.|
000043a0 75 79 3a 65 79 25 3d 2d 31 3a e7 6e 25 3c 3e 31 |uy:ey%=-1:.n%<>1|
000043b0 8c f2 68 0d 01 86 18 c9 26 41 3a f2 75 79 3a f2 |..h.....&A:.uy:.|
000043c0 74 3a e7 6e 25 3c 3e 31 8c f2 68 0d 01 87 05 cb |t:.n%<>1..h.....|
000043d0 0d 01 88 10 c9 41 25 28 31 29 3a c8 8e 77 25 ca |.....A%(1):..w%.|
000043e0 0d 01 89 28 c9 26 46 3a e7 6e 25 3c 26 41 80 6e |...(.&F:.n%<&A.n|
000043f0 25 3c 3e 32 8c f2 42 28 a4 41 28 22 45 72 72 52 |%<>2..B(.A("ErrR|
00004400 65 6c 6f 61 64 22 29 29 0d 01 8a 1b c9 37 2c 38 |eload")).....7,8|
00004410 2c 39 2c 32 32 2c 26 45 2c 31 39 3a e7 6e 25 3c |,9,22,&E,19:.n%<|
00004420 3e 32 8c 0d 01 8b 94 f2 5a 28 65 25 2c 77 25 2c |>2......Z(e%,w%,|
00004430 31 29 3a f2 53 28 65 25 2c 26 42 2c 94 ac 28 a4 |1):.S(e%,&B,..(.|
00004440 4d 28 65 25 2c 39 29 80 ac a4 4d 28 65 25 2c 32 |M(e%,9)...M(e%,2|
00004450 34 29 29 29 3a f2 53 28 65 25 2c 26 41 2c 94 ac |4))):.S(e%,&A,..|
00004460 28 a4 4d 28 65 25 2c 38 29 84 28 a4 4d 28 65 25 |(.M(e%,8).(.M(e%|
00004470 2c 39 29 80 ac a4 4d 28 65 25 2c 32 34 29 29 29 |,9)...M(e%,24)))|
00004480 29 3a f2 53 28 65 25 2c 32 34 2c 94 ac a4 4d 28 |):.S(e%,24,...M(|
00004490 65 25 2c 39 29 29 3a f2 53 28 65 25 2c 32 35 2c |e%,9)):.S(e%,25,|
000044a0 94 ac 28 a4 4d 28 65 25 2c 39 29 80 a4 4d 28 65 |..(.M(e%,9)..M(e|
000044b0 25 2c 32 34 29 29 29 0d 01 8c 05 cd 0d 01 8d 47 |%,24)))........G|
000044c0 c9 32 34 3a f2 53 28 65 25 2c 32 35 2c 94 ac a4 |.24:.S(e%,25,...|
000044d0 4d 28 65 25 2c 32 34 29 29 3a f2 53 28 65 25 2c |M(e%,24)):.S(e%,|
000044e0 26 41 2c 94 a4 4d 28 65 25 2c 32 34 29 29 3a f2 |&A,..M(e%,24)):.|
000044f0 53 28 65 25 2c 26 42 2c 94 a4 4d 28 65 25 2c 32 |S(e%,&B,..M(e%,2|
00004500 34 29 29 0d 01 8e 15 c9 32 37 3a f2 4b 5f 28 41 |4)).....27:.K_(A|
00004510 25 28 31 29 2c 32 37 29 0d 01 8f 05 cb 0d 01 90 |%(1),27)........|
00004520 3b c9 41 25 28 36 29 3a 21 55 25 3d 65 25 3a c8 |;.A%(6):!U%=e%:.|
00004530 99 26 34 30 30 43 42 2c 2c 55 25 3a 5f 25 3d 55 |.&400CB,,U%:_%=U|
00004540 25 21 34 3a 51 25 3d 55 25 21 31 36 2d 55 25 21 |%!4:Q%=U%!16-U%!|
00004550 32 34 3a c8 8e 77 25 ca 0d 01 91 48 c9 32 2c 33 |24:..w%....H.2,3|
00004560 2c 34 2c 35 3a 21 4d 6c 25 3d a4 69 79 28 41 25 |,4,5:!Ml%=.iy(A%|
00004570 28 36 29 2c 77 25 29 3a f2 43 28 4d 6c 25 2c 5f |(6),w%):.C(Ml%,_|
00004580 25 2b 37 35 30 2b 36 34 2c 51 25 2d 26 36 34 2d |%+750+64,Q%-&64-|
00004590 34 38 2a 28 77 25 2d 32 29 2c 65 25 2c 77 25 29 |48*(w%-2),e%,w%)|
000045a0 0d 01 92 62 c9 39 2c 26 41 2c 26 42 2c 26 43 2c |...b.9,&A,&B,&C,|
000045b0 26 44 2c 26 45 2c 26 46 3a f2 48 28 42 79 25 2c |&D,&E,&F:.H(By%,|
000045c0 30 2c 2d 31 29 3a f2 4a 28 42 79 25 2c 58 25 28 |0,-1):.J(By%,X%(|
000045d0 77 25 2d 39 29 2c 2d 31 29 3a f2 43 28 42 79 25 |w%-9),-1):.C(By%|
000045e0 2c 5f 25 2b 34 37 30 2b 36 34 2c 51 25 2d 26 36 |,_%+470+64,Q%-&6|
000045f0 34 2d 34 38 2a 28 77 25 2d 39 29 2c 65 25 2c 77 |4-48*(w%-9),e%,w|
00004600 25 29 0d 01 93 53 c9 31 39 3a f2 48 28 6f 4a 25 |%)...S.19:.H(oJ%|
00004610 2c 30 2c 2d 31 29 3a f2 4a 28 6f 4a 25 2c 51 25 |,0,-1):.J(oJ%,Q%|
00004620 28 77 25 2d 31 39 29 2c 2d 31 29 3a f2 43 28 6f |(w%-19),-1):.C(o|
00004630 4a 25 2c 5f 25 2b 35 37 38 2b 36 34 2c 51 25 2d |J%,_%+578+64,Q%-|
00004640 35 34 30 2d 34 38 2a 28 77 25 2d 31 39 29 2c 65 |540-48*(w%-19),e|
00004650 25 2c 77 25 29 0d 01 94 56 c9 32 30 2c 32 31 3a |%,w%)...V.20,21:|
00004660 f2 48 28 42 79 25 2c 30 2c 2d 31 29 3a f2 4a 28 |.H(By%,0,-1):.J(|
00004670 42 79 25 2c 51 25 28 77 25 2d 31 39 29 2c 2d 31 |By%,Q%(w%-19),-1|
00004680 29 3a f2 43 28 42 79 25 2c 5f 25 2b 35 37 38 2b |):.C(By%,_%+578+|
00004690 36 34 2c 51 25 2d 35 34 30 2d 34 38 2a 28 77 25 |64,Q%-540-48*(w%|
000046a0 2d 31 39 29 2c 65 25 2c 77 25 29 0d 01 95 05 cb |-19),e%,w%).....|
000046b0 0d 01 96 18 7f f2 61 4a 28 65 25 2c 77 25 2c 6e |......aJ(e%,w%,n|
000046c0 25 2c 5f 25 2c 51 25 29 0d 01 97 07 cb 3a e1 0d |%,_%,Q%).....:..|
000046d0 01 98 18 dd a4 6a 79 28 65 25 2c 77 25 2c 6e 25 |.....jy(e%,w%,n%|
000046e0 29 3a c8 8e 65 25 ca 0d 01 99 13 c9 49 5f 25 2c |):..e%......I_%,|
000046f0 41 25 28 31 29 3a 6b 25 3d a3 0d 01 9a 15 7f 6b |A%(1):k%=......k|
00004700 25 3d a4 46 5f 28 65 25 2c 77 25 2c 6e 25 29 0d |%=.F_(e%,w%,n%).|
00004710 01 9b 09 cb 3a 3d 6b 25 0d 01 9c 2c dd f2 68 3a |....:=k%...,..h:|
00004720 f2 47 28 59 79 25 29 3a 59 79 25 3d 30 3a f2 47 |.G(Yy%):Yy%=0:.G|
00004730 28 49 5f 25 29 3a e7 56 79 25 8c f2 4d 28 69 25 |(I_%):.Vy%..M(i%|
00004740 2c 2d 31 29 0d 01 9d 05 e1 0d 01 9e 81 dd f2 4b |,-1)...........K|
00004750 5f 28 73 25 2c 53 79 25 29 3a ea 4c 6c 25 2c 75 |_(s%,Sy%):.Ll%,u|
00004760 24 2c 50 79 25 2c 52 24 2c 61 24 2c 63 24 2c 67 |$,Py%,R$,a$,c$,g|
00004770 25 3a 4c 6c 25 3d 31 3a 75 24 3d a4 5a 28 73 25 |%:Ll%=1:u$=.Z(s%|
00004780 2c 53 79 25 29 3a f5 3a c8 99 26 43 2c 39 2c 22 |,Sy%):.:..&C,9,"|
00004790 3c 4f 72 67 61 6e 69 73 65 72 24 44 69 72 3e 2e |<Organiser$Dir>.|
000047a0 52 65 73 6f 75 72 63 65 73 22 2c 55 25 2c 31 2c |Resources",U%,1,|
000047b0 4c 6c 25 2c 32 35 36 2c 30 b8 2c 2c 2c 67 25 2c |Ll%,256,0.,,,g%,|
000047c0 4c 6c 25 3a e7 67 25 3d 31 8c 0d 01 9f 1a 61 24 |Ll%:.g%=1.....a$|
000047d0 3d a4 4e 28 55 25 29 3a e7 63 24 3d 22 22 8c 63 |=.N(U%):.c$="".c|
000047e0 24 3d 61 24 0d 01 a0 10 e7 50 79 25 3d b9 8c 52 |$=a$.....Py%=..R|
000047f0 24 3d 61 24 0d 01 a1 10 e7 61 24 3d 75 24 8c 50 |$=a$.....a$=u$.P|
00004800 79 25 3d b9 0d 01 a2 21 cd 3a fd 4c 6c 25 3d 2d |y%=....!.:.Ll%=-|
00004810 31 84 52 24 3c 3e 22 22 3a e7 52 24 3d 22 22 8c |1.R$<>"":.R$="".|
00004820 52 24 3d 63 24 0d 01 a3 13 f2 41 28 73 25 2c 53 |R$=c$.....A(s%,S|
00004830 79 25 2c 52 24 29 3a e1 0d 01 a4 bb dd f2 41 79 |y%,R$):.......Ay|
00004840 28 63 25 2c 72 25 2c 51 25 2c 73 25 2c 53 79 25 |(c%,r%,Q%,s%,Sy%|
00004850 29 3a ea 4d 25 2c 41 25 3a 52 69 25 3d a3 3a f2 |):.M%,A%:Ri%=.:.|
00004860 41 28 61 79 25 2c 30 2c a4 4d 79 28 63 25 2c 72 |A(ay%,0,.My(c%,r|
00004870 25 2c 51 25 2c 2d 31 29 29 3a 4d 25 3d a4 58 28 |%,Q%,-1)):M%=.X(|
00004880 72 25 2c 51 25 29 3a e3 41 25 3d 32 39 b8 33 31 |r%,Q%):.A%=29.31|
00004890 3a f2 5f 28 61 79 25 2c 41 25 2b 33 2c 2d 28 41 |:._(ay%,A%+3,-(A|
000048a0 25 3e 4d 25 29 29 3a ed 3a e3 41 25 3d 31 b8 4d |%>M%)):.:.A%=1.M|
000048b0 25 3a f2 67 28 41 25 2c 41 25 3d 63 25 29 3a ed |%:.g(A%,A%=c%):.|
000048c0 3a 48 4a 25 3d 72 25 3a f2 41 28 61 79 25 2c 31 |:HJ%=r%:.A(ay%,1|
000048d0 2c c3 51 25 29 3a f2 78 28 61 79 25 2c 2d 31 2c |,.Q%):.x(ay%,-1,|
000048e0 31 29 3a 41 61 25 3d 73 25 3a 56 61 25 3d 53 79 |1):Aa%=s%:Va%=Sy|
000048f0 25 3a e1 0d 01 a5 24 dd f2 72 79 3a ea 64 25 2c |%:....$..ry:.d%,|
00004900 71 25 2c 78 25 2c 41 24 3a f2 47 28 61 79 25 29 |q%,x%,A$:.G(ay%)|
00004910 3a c8 8e 41 61 25 ca 0d 01 a6 28 c9 66 25 3a f2 |:..Aa%....(.f%:.|
00004920 41 28 66 25 2c 31 2c a4 6a 28 57 5f 25 2c 43 5f |A(f%,1,.j(W_%,C_|
00004930 25 2c 62 5f 25 29 29 3a f2 59 28 30 2c 30 29 0d |%,b_%)):.Y(0,0).|
00004940 01 a7 39 c9 54 25 28 a4 50 28 33 29 29 3a 41 24 |..9.T%(.P(3)):A$|
00004950 3d a4 6a 28 64 25 2c 71 25 2c 78 25 29 3a 56 5f |=.j(d%,q%,x%):V_|
00004960 25 3d 74 25 3a 7a 5f 25 3d 76 25 3a f2 49 28 64 |%=t%:z_%=v%:.I(d|
00004970 25 2c 71 25 2c 78 25 29 0d 01 a8 22 c9 41 79 25 |%,q%,x%)...".Ay%|
00004980 3a f2 41 28 41 79 25 2c 32 2c a4 6a 28 50 5f 25 |:.A(Ay%,2,.j(P_%|
00004990 2c 4e 5f 25 2c 51 5f 25 29 29 0d 01 a9 07 cb 3a |,N_%,Q_%)).....:|
000049a0 e1 0d 01 aa 5c dd f2 67 28 63 25 2c 46 25 29 3a |....\..g(c%,F%):|
000049b0 21 4a 25 3d 61 79 25 3a 4a 25 21 34 3d 63 25 2b |!J%=ay%:J%!4=c%+|
000049c0 33 3a c8 99 26 34 30 30 43 45 2c 2c 4a 25 3a 24 |3:..&400CE,,J%:$|
000049d0 4a 25 21 33 32 3d 22 52 22 2b c3 28 31 2d 46 25 |J%!32="R"+.(1-F%|
000049e0 29 2b 22 3b 46 22 2b c3 28 31 2d 46 25 29 2b 22 |)+";F"+.(1-F%)+"|
000049f0 37 22 3a e7 46 25 8c 59 75 25 3d 63 25 0d 01 ab |7":.F%.Yu%=c%...|
00004a00 37 e7 47 61 25 8c 4a 25 21 38 3d 30 3a 4a 25 21 |7.Ga%.J%!8=0:J%!|
00004a10 26 43 3d 30 8b 4a 25 21 38 3d 28 31 2b 94 28 46 |&C=0.J%!8=(1+.(F|
00004a20 25 29 29 3c 3c 32 38 3a 4a 25 21 26 43 3d 26 46 |%))<<28:J%!&C=&F|
00004a30 3c 3c 32 38 0d 01 ac 12 c8 99 26 34 30 30 43 44 |<<28......&400CD|
00004a40 2c 2c 4a 25 3a e1 0d 01 ad 3b dd f2 4c 79 28 63 |,,J%:....;..Ly(c|
00004a50 25 2c 72 25 2c 47 79 25 29 3a ea 41 25 2c 4d 25 |%,r%,Gy%):.A%,M%|
00004a60 2c 51 25 2c 41 24 3a e7 63 25 3c 3e 2d 31 8c f2 |,Q%,A$:.c%<>-1..|
00004a70 67 28 59 75 25 2c a3 29 3a f2 67 28 63 25 2c b9 |g(Yu%,.):.g(c%,.|
00004a80 29 0d 01 ae 35 e7 72 25 3c 3e 2d 31 8c f2 4a 28 |)...5.r%<>-1..J(|
00004a90 64 5f 25 2c 48 4a 25 2d 31 2c a3 29 3a 48 4a 25 |d_%,HJ%-1,.):HJ%|
00004aa0 3d 21 55 25 2b 31 3a f2 4a 28 64 5f 25 2c 48 4a |=!U%+1:.J(d_%,HJ|
00004ab0 25 2d 31 2c b9 29 0d 01 af 4c e7 47 79 25 3c 3e |%-1,.)...L.Gy%<>|
00004ac0 30 8c 51 25 3d bb a4 5a 28 61 79 25 2c 31 29 2b |0.Q%=..Z(ay%,1)+|
00004ad0 47 79 25 3a e7 51 25 3e 3d 26 37 37 64 80 51 25 |Gy%:.Q%>=&77d.Q%|
00004ae0 3c 3d 26 66 66 66 8c f2 41 28 61 79 25 2c 31 2c |<=&fff..A(ay%,1,|
00004af0 c3 51 25 29 8b 51 25 3d bb a4 5a 28 61 79 25 2c |.Q%).Q%=..Z(ay%,|
00004b00 31 29 0d 01 b0 4e 4d 25 3d a4 58 28 48 4a 25 2c |1)...NM%=.X(HJ%,|
00004b10 51 25 29 3a e3 41 25 3d 32 39 b8 33 31 3a f2 5f |Q%):.A%=29.31:._|
00004b20 28 61 79 25 2c 41 25 2b 33 2c 2d 28 41 25 3e 4d |(ay%,A%+3,-(A%>M|
00004b30 25 29 29 3a ed 3a e7 59 75 25 3e 4d 25 8c f2 67 |%)):.:.Yu%>M%..g|
00004b40 28 59 75 25 2c a3 29 3a f2 67 28 4d 25 2c b9 29 |(Yu%,.):.g(M%,.)|
00004b50 0d 01 b1 22 f2 41 28 61 79 25 2c 30 2c a4 4d 79 |...".A(ay%,0,.My|
00004b60 28 59 75 25 2c 48 4a 25 2c 51 25 2c 2d 31 29 29 |(Yu%,HJ%,Q%,-1))|
00004b70 3a e1 0d 01 b2 41 dd a4 6a 28 f8 63 25 2c f8 72 |:....A..j(.c%,.r|
00004b80 25 2c f8 51 25 29 3a 63 25 3d 59 75 25 3a 72 25 |%,.Q%):c%=Yu%:r%|
00004b90 3d 48 4a 25 3a 51 25 3d bb a4 5a 28 61 79 25 2c |=HJ%:Q%=..Z(ay%,|
00004ba0 31 29 3a 3d a4 51 28 63 25 2c 72 25 2c 51 25 2c |1):=.Q(c%,r%,Q%,|
00004bb0 2d 31 29 0d 01 b3 3a dd a4 4d 79 28 63 25 2c 72 |-1)...:..My(c%,r|
00004bc0 25 2c 51 25 2c 52 79 25 29 3a ea 41 24 3a 41 24 |%,Q%,Ry%):.A$:A$|
00004bd0 3d a4 51 28 63 25 2c 72 25 2c 51 25 2c 52 79 25 |=.Q(c%,r%,Q%,Ry%|
00004be0 29 3a 3d c0 41 24 2c a9 41 24 2d 35 29 0d 01 b4 |):=.A$,.A$-5)...|
00004bf0 2f dd f2 50 79 3a ea 4e 75 25 2c 50 6c 25 2c 4c |/..Py:.Nu%,Pl%,L|
00004c00 4a 25 2c 4b 4a 25 2c 5a 61 25 2c 6c 25 2c 62 25 |J%,KJ%,Za%,l%,b%|
00004c10 3a 6d 4a 25 3d 30 3a e7 78 4a 25 8c 0d 01 b5 f6 |:mJ%=0:.xJ%.....|
00004c20 6c 25 3d a4 7a 3a 62 25 3d a4 66 3a 50 6c 25 3d |l%=.z:b%=.f:Pl%=|
00004c30 4a 25 28 30 2c 31 29 3a 4e 75 25 3d 4a 25 28 30 |J%(0,1):Nu%=J%(0|
00004c40 2c 33 29 3a 4e 75 25 2b 3d 4a 25 28 30 2c 32 29 |,3):Nu%+=J%(0,2)|
00004c50 2d a4 48 28 4e 75 25 2c 50 6c 25 2c 46 79 25 29 |-.H(Nu%,Pl%,Fy%)|
00004c60 3a 4b 4a 25 3d 4a 25 28 31 2c 31 29 3a 4c 4a 25 |:KJ%=J%(1,1):LJ%|
00004c70 3d 4a 25 28 31 2c 33 29 3a 4c 4a 25 2b 3d 4a 25 |=J%(1,3):LJ%+=J%|
00004c80 28 31 2c 32 29 2d a4 48 28 4c 4a 25 2c 4b 4a 25 |(1,2)-.H(LJ%,KJ%|
00004c90 2c 46 79 25 29 3a 64 6c 25 3d a4 46 28 30 2c 31 |,Fy%):dl%=.F(0,1|
00004ca0 2c 4e 75 25 2c 50 6c 25 2c 46 79 25 29 3a 67 6c |,Nu%,Pl%,Fy%):gl|
00004cb0 25 3d a4 46 28 30 2c 32 2c 4c 4a 25 2c 4b 4a 25 |%=.F(0,2,LJ%,KJ%|
00004cc0 2c 46 79 25 29 3a 5a 61 25 3d 28 a4 47 28 64 6c |,Fy%):Za%=(.G(dl|
00004cd0 25 2c 6c 25 29 3c 31 80 a4 47 28 6c 25 2c 67 6c |%,l%)<1..G(l%,gl|
00004ce0 25 29 3c 31 29 3a e7 a4 44 28 4e 75 25 2c 50 6c |%)<1):..D(Nu%,Pl|
00004cf0 25 2c 46 79 25 29 3d a4 44 28 55 79 25 2c 62 79 |%,Fy%)=.D(Uy%,by|
00004d00 25 2c 46 79 25 29 80 ac a4 79 8c 6d 4a 25 3d 64 |%,Fy%)...y.mJ%=d|
00004d10 6c 25 0d 01 b6 2f e7 a4 44 28 4c 4a 25 2c 4b 4a |l%.../..D(LJ%,KJ|
00004d20 25 2c 46 79 25 29 3d a4 44 28 55 79 25 2c 62 79 |%,Fy%)=.D(Uy%,by|
00004d30 25 2c 46 79 25 29 80 a4 79 8c 6d 4a 25 3d 67 6c |%,Fy%)..y.mJ%=gl|
00004d40 25 0d 01 b7 56 e7 5a 61 25 3c 3e a4 79 80 a4 44 |%...V.Za%<>.y..D|
00004d50 28 4e 75 25 2c 50 6c 25 2c 46 79 25 29 3c 3e a4 |(Nu%,Pl%,Fy%)<>.|
00004d60 44 28 55 79 25 2c 62 79 25 2c 46 79 25 29 80 a4 |D(Uy%,by%,Fy%)..|
00004d70 44 28 4c 4a 25 2c 4b 4a 25 2c 46 79 25 29 3c 3e |D(LJ%,KJ%,Fy%)<>|
00004d80 a4 44 28 55 79 25 2c 62 79 25 2c 46 79 25 29 8c |.D(Uy%,by%,Fy%).|
00004d90 f2 53 79 28 2d 31 29 0d 01 b8 07 cd 3a e1 0d 01 |.Sy(-1).....:...|
00004da0 b9 18 dd f2 67 4a 3a e7 6d 4a 25 3d 67 6c 25 8c |....gJ:.mJ%=gl%.|
00004db0 f2 53 79 28 30 29 0d 01 ba 13 e7 6d 4a 25 3d 64 |.Sy(0).....mJ%=d|
00004dc0 6c 25 8c f2 53 79 28 31 29 0d 01 bb 09 f2 50 79 |l%..Sy(1).....Py|
00004dd0 3a e1 0d 01 bc eb dd f2 4d 4a 3a 4a 24 3d a4 74 |:.......MJ:J$=.t|
00004de0 79 28 22 4f 72 67 61 6e 69 73 65 72 24 44 69 72 |y("Organiser$Dir|
00004df0 22 29 3a 7a 25 3d 30 3a 49 75 25 3d 30 3a 42 24 |"):z%=0:Iu%=0:B$|
00004e00 3d 22 22 3a 65 79 25 3d a3 3a 4e 69 25 3d a3 3a |="":ey%=.:Ni%=.:|
00004e10 58 4a 25 3d 2d 31 3a 60 4a 25 3d a3 3a 54 24 3d |XJ%=-1:`J%=.:T$=|
00004e20 4a 24 2b 22 2e 44 61 74 61 2e 22 3a 5a 5f 25 3d |J$+".Data.":Z_%=|
00004e30 a4 75 79 28 22 3c 4f 72 67 61 6e 69 73 65 72 24 |.uy("<Organiser$|
00004e40 44 69 72 3e 2e 53 70 72 69 74 65 73 22 2c 26 37 |Dir>.Sprites",&7|
00004e50 41 43 2b 26 43 38 29 3a de 53 61 25 33 2c 61 4a |AC+&C8):.Sa%3,aJ|
00004e60 25 33 32 2c 47 25 28 31 29 2c 54 69 25 26 42 2c |%32,G%(1),Ti%&B,|
00004e70 49 69 25 26 42 2c 4f 6c 25 31 3a 24 53 61 25 3d |Ii%&B,Ol%1:$Sa%=|
00004e80 22 52 32 22 3a 47 25 28 29 3d 2d 31 3a 24 54 69 |"R2":G%()=-1:$Ti|
00004e90 25 3d 22 50 70 74 72 5f 74 75 72 6e 6c 22 2b bd |%="Pptr_turnl"+.|
00004ea0 30 3a 24 49 69 25 3d 22 50 70 74 72 5f 74 75 72 |0:$Ii%="Pptr_tur|
00004eb0 6e 72 22 2b bd 30 3a 3f 4f 6c 25 3d 30 0d 01 bd |nr"+.0:?Ol%=0...|
00004ec0 6e de 44 25 28 35 29 2c 49 25 28 35 29 2c 42 25 |n.D%(5),I%(5),B%|
00004ed0 28 35 29 2c 57 25 28 35 29 2c 53 25 28 35 29 2c |(5),W%(5),S%(5),|
00004ee0 5a 25 28 35 29 2c 4d 24 28 35 29 3a de 50 25 28 |Z%(5),M$(5):.P%(|
00004ef0 37 29 2c 58 25 28 37 29 2c 48 25 28 32 29 2c 51 |7),X%(7),H%(2),Q|
00004f00 25 28 32 29 3a 41 24 3d a4 77 79 3a 6c 4a 25 3d |%(2):A$=.wy:lJ%=|
00004f10 a3 3a e7 a7 41 24 2c 22 2d 64 65 6c 65 74 65 5f |.:..A$,"-delete_|
00004f20 61 6c 6c 5f 64 61 74 61 22 29 8c 0d 01 be 1a e7 |all_data")......|
00004f30 a4 42 79 28 a4 41 28 22 45 72 72 53 75 72 65 22 |.By(.A("ErrSure"|
00004f40 29 2c b9 29 8c 0d 01 bf 23 f2 42 28 a4 41 28 22 |),.)....#.B(.A("|
00004f50 45 72 72 43 68 61 6e 67 65 22 29 29 3a 6c 4a 25 |ErrChange")):lJ%|
00004f60 3d b9 3a 65 79 25 3d b9 0d 01 c0 05 cd 0d 01 c1 |=.:ey%=.........|
00004f70 41 cd 3a f2 50 5f 3a f2 49 4a 3a f2 7a 75 3a f2 |A.:.P_:.IJ:.zu:.|
00004f80 6c 79 3a 4e 4a 25 3d 2d 31 3a f2 6d 3a 77 5f 25 |ly:NJ%=-1:.m:w_%|
00004f90 3d a4 6c 28 31 2a 26 34 30 30 29 3a f2 71 5f 28 |=.l(1*&400):.q_(|
00004fa0 77 5f 25 2c 52 75 25 29 3a e7 73 5f 25 8c 0d 01 |w_%,Ru%):.s_%...|
00004fb0 c2 17 e7 71 79 25 3d 31 8c f2 53 28 2d 31 2c 4e |...qy%=1..S(-1,N|
00004fc0 4a 25 2c 31 29 0d 01 c3 0a f2 64 28 ac 31 29 0d |J%,1).....d(.1).|
00004fd0 01 c4 0d cc c8 99 26 34 30 36 43 30 0d 01 c5 07 |......&406C0....|
00004fe0 cd 3a e1 0d 01 c6 23 dd f2 48 75 3a f2 64 4a 3a |.:....#..Hu:.dJ:|
00004ff0 76 25 3d 53 25 28 74 25 29 3a e7 50 75 25 8c f2 |v%=S%(t%):.Pu%..|
00005000 4a 5f 3a f2 50 79 0d 01 c7 23 49 75 25 3d b9 3a |J_:.Py...#Iu%=.:|
00005010 f2 78 28 69 25 2c 2d 31 2c 2d 31 29 3a e7 ac 67 |.x(i%,-1,-1):..g|
00005020 75 25 8c f2 47 28 69 25 29 0d 01 c8 15 f2 62 79 |u%..G(i%).....by|
00005030 28 74 25 29 3a e7 71 79 25 3e 31 8c f2 75 0d 01 |(t%):.qy%>1..u..|
00005040 c9 17 e7 71 79 25 80 31 8c f2 53 28 2d 31 2c 4e |...qy%.1..S(-1,N|
00005050 4a 25 2c 30 29 0d 01 ca 1d e7 64 75 25 8c f2 78 |J%,0).....du%..x|
00005060 28 5a 75 25 2c 2d 31 2c 2d 31 29 8b 65 75 25 3d |(Zu%,-1,-1).eu%=|
00005070 2d 31 0d 01 cb 12 e7 ac 73 5f 25 8c c8 99 26 34 |-1......s_%...&4|
00005080 30 36 43 31 0d 01 cc 0c f2 63 3a f2 50 79 3a e1 |06C1.....c:.Py:.|
00005090 0d 01 cd 35 dd a4 50 28 58 75 25 29 3a ea 41 25 |...5..P(Xu%):.A%|
000050a0 3a 41 25 3d 69 79 25 2b 31 3a f5 41 25 2d 3d 31 |:A%=iy%+1:.A%-=1|
000050b0 3a fd 5a 25 28 41 25 29 3d 58 75 25 84 41 25 3d |:.Z%(A%)=Xu%.A%=|
000050c0 30 3a 3d 41 25 0d 01 ce eb dd f2 74 5f 3a ea 41 |0:=A%......t_:.A|
000050d0 24 2c 53 25 3a de 54 25 28 69 79 25 29 3a 42 79 |$,S%:.T%(iy%):By|
000050e0 25 3d a4 43 79 28 a4 41 28 22 43 6f 6c 73 22 29 |%=.Cy(.A("Cols")|
000050f0 29 3a 64 5f 25 3d a4 43 28 22 4d 6f 6e 22 2c 22 |):d_%=.C("Mon","|
00005100 4d 6f 6e 22 2c 31 2c 26 43 29 3a f2 79 79 28 64 |Mon",1,&C):.yy(d|
00005110 5f 25 2c 30 2c 2d 31 29 3a e3 53 25 3d 31 b8 69 |_%,0,-1):.S%=1.i|
00005120 79 25 3a 54 25 28 53 25 29 3d a4 4b 79 28 53 25 |y%:T%(S%)=.Ky(S%|
00005130 29 3a ed 3a 51 75 25 3d a4 43 28 22 54 69 74 6c |):.:Qu%=.C("Titl|
00005140 65 22 2c 22 4d 65 6e 75 22 2c 31 2c 37 29 3a f2 |e","Menu",1,7):.|
00005150 7a 28 51 75 25 2c 30 2c 6e 75 25 29 3a 4d 6c 25 |z(Qu%,0,nu%):Ml%|
00005160 3d a4 43 28 22 54 61 62 4d 22 2c 22 54 61 62 4d |=.C("TabM","TabM|
00005170 22 2c 31 2c 32 29 3a f2 7a 28 4d 6c 25 2c 30 2c |",1,2):.z(Ml%,0,|
00005180 42 79 25 29 3a f2 7a 28 4d 6c 25 2c 31 2c 42 79 |By%):.z(Ml%,1,By|
00005190 25 29 3a 6f 4a 25 3d a4 43 28 22 42 6f 72 64 4d |%):oJ%=.C("BordM|
000051a0 22 2c 22 42 6f 72 64 4d 22 2c 31 2c 35 29 3a e1 |","BordM",1,5):.|
000051b0 0d 01 cf c6 dd f2 6c 79 3a ea 41 25 2c 64 61 25 |......ly:.A%,da%|
000051c0 2c 51 61 25 3a 46 79 25 3d a4 4c 3a 62 79 25 3d |,Qa%:Fy%=.L:by%=|
000051d0 a4 56 3a 55 79 25 3d a4 49 3a 4e 79 25 3d a4 61 |.V:Uy%=.I:Ny%=.a|
000051e0 28 6d 25 2f 69 79 25 29 3a 78 79 25 3d 26 36 34 |(m%/iy%):xy%=&64|
000051f0 2b 32 2a 28 33 36 2b 6a 25 2b 35 2b 32 30 29 3a |+2*(36+j%+5+20):|
00005200 72 79 25 3d 6d 25 2b 32 2a 28 35 2b 32 30 29 3a |ry%=m%+2*(5+20):|
00005210 6c 5f 25 3d 35 2b 32 30 3a 69 5f 25 3d 6c 5f 25 |l_%=5+20:i_%=l_%|
00005220 2b 33 36 2b 26 36 34 2b 32 2a 6a 25 3a 79 79 25 |+36+&64+2*j%:yy%|
00005230 3d 6c 5f 25 2b 33 36 3a 64 79 25 3d 79 79 25 2b |=l_%+36:dy%=yy%+|
00005240 26 36 34 2b 6a 25 3a 6f 25 3d 35 2b 32 30 3a 47 |&64+j%:o%=5+20:G|
00005250 4a 25 3d 64 79 25 2d 26 36 34 3a 6a 5f 25 3d 6d |J%=dy%-&64:j_%=m|
00005260 25 2f 32 37 3a 3a 64 4a 25 3d 6a 25 2d 34 30 2d |%/27::dJ%=j%-40-|
00005270 32 2a 26 63 3a e1 0d 01 d0 2e dd f2 60 5f 3a ea |2*&c:.......`_:.|
00005280 42 25 3a e7 72 79 25 3c 3e 55 25 21 31 36 2d 55 |B%:.ry%<>U%!16-U|
00005290 25 21 38 84 78 79 25 3c 3e 55 25 21 26 43 2d 55 |%!8.xy%<>U%!&C-U|
000052a0 25 21 34 8c 0d 01 d1 c9 72 79 25 3d 55 25 21 31 |%!4.....ry%=U%!1|
000052b0 36 2d 55 25 21 38 3a 78 79 25 3d 55 25 21 26 43 |6-U%!8:xy%=U%!&C|
000052c0 2d 55 25 21 34 3a 6d 25 3d 72 79 25 2d 32 2a 28 |-U%!4:m%=ry%-2*(|
000052d0 35 2b 32 30 29 3a 6a 25 3d 28 28 78 79 25 2d 26 |5+20):j%=((xy%-&|
000052e0 36 34 29 2d 32 2a 28 33 36 2b 35 2b 32 30 29 29 |64)-2*(36+5+20))|
000052f0 2f 32 3a f2 6c 79 3a c8 99 33 30 2c 36 2c 2c 2c |/2:.ly:..30,6,,,|
00005300 79 69 25 b8 2c 2c 42 25 3a 21 42 25 3d 60 25 3a |yi%.,,B%:!B%=`%:|
00005310 c8 99 26 34 30 30 43 43 2c 2c 42 25 3a c8 99 26 |..&400CC,,B%:..&|
00005320 34 30 30 43 33 2c 2c 42 25 3a f2 74 79 28 42 25 |400C3,,B%:.ty(B%|
00005330 21 38 38 2c 42 25 2b 34 29 3a c8 99 26 34 30 30 |!88,B%+4):..&400|
00005340 43 31 2c 2c 42 25 2b 34 b8 60 25 3a c8 99 33 30 |C1,,B%+4.`%:..30|
00005350 2c 37 2c 2c 42 25 3a e7 5a 25 28 74 25 29 3d 32 |,7,,B%:.Z%(t%)=2|
00005360 80 76 25 3d 30 8c f2 59 79 3a f2 41 5f 0d 01 d2 |.v%=0..Yy:.A_...|
00005370 1c c8 99 26 34 30 30 44 31 2c 69 25 2c 30 2c 2d |...&400D1,i%,0,-|
00005380 72 79 25 2c 78 79 25 2c 30 0d 01 d3 07 cd 3a e1 |ry%,xy%,0.....:.|
00005390 0d 01 d4 60 dd f2 7a 75 3a ea 41 25 2c 67 24 3a |...`..zu:.A%,g$:|
000053a0 ea 85 3a ee 85 ea f7 85 3a d9 23 7a 25 3a 7a 25 |..:.....:.#z%:z%|
000053b0 3d 30 3a f2 42 28 f6 24 2b 22 20 61 74 20 6c 69 |=0:.B(.$+" at li|
000053c0 6e 65 20 22 2b c3 9e 2b 22 2c 20 75 73 69 6e 67 |ne "+..+", using|
000053d0 20 64 65 66 61 75 6c 74 20 73 65 74 74 69 6e 67 | default setting|
000053e0 73 2e 22 29 3a f2 50 5f 3a 65 79 25 3d b9 3a e1 |s."):.P_:ey%=.:.|
000053f0 0d 01 d5 f7 7a 25 3d 8e 28 4a 24 2b 22 2e 44 61 |....z%=.(J$+".Da|
00005400 74 61 2e 53 65 74 74 69 6e 67 73 22 29 3a 6f 24 |ta.Settings"):o$|
00005410 3d be 23 7a 25 3a 67 24 3d be 23 7a 25 3a 44 24 |=.#z%:g$=.#z%:D$|
00005420 3d be 23 7a 25 3a 73 5f 25 3d a4 52 3a 67 75 25 |=.#z%:s_%=.R:gu%|
00005430 3d a4 52 3a 71 79 25 3d a4 59 3a 72 5f 25 3d a4 |=.R:qy%=.Y:r_%=.|
00005440 52 3a 53 75 25 3d a4 52 3a 69 79 25 3d a4 59 3a |R:Su%=.R:iy%=.Y:|
00005450 74 25 3d a4 59 3a 64 75 25 3d a4 52 3a 4d 75 25 |t%=.Y:du%=.R:Mu%|
00005460 3d a4 52 3a 78 4a 25 3d a4 52 3a 46 75 25 3d a4 |=.R:xJ%=.R:Fu%=.|
00005470 52 3a 47 61 25 3d 46 75 25 3a 5f 4a 25 3d a4 59 |R:Ga%=Fu%:_J%=.Y|
00005480 3a e8 23 7a 25 2c 4b 75 25 2c 71 4a 25 3a e8 23 |:.#z%,Ku%,qJ%:.#|
00005490 7a 25 2c 65 4a 25 2c 61 75 25 2c 77 6c 25 2c 78 |z%,eJ%,au%,wl%,x|
000054a0 75 25 2c 63 6c 25 3a 75 5f 25 3d a4 52 3a 46 4a |u%,cl%:u_%=.R:FJ|
000054b0 25 3d a4 52 3a e8 23 7a 25 2c 6a 25 2c 6d 25 3a |%=.R:.#z%,j%,m%:|
000054c0 e3 41 25 3d 30 b8 36 3a 50 25 28 41 25 29 3d a4 |.A%=0.6:P%(A%)=.|
000054d0 59 3a ed 3a e3 41 25 3d 30 b8 32 3a 48 25 28 41 |Y:.:.A%=0.2:H%(A|
000054e0 25 29 3d a4 59 3a ed 0d 01 d6 83 e3 41 25 3d 31 |%)=.Y:......A%=1|
000054f0 b8 69 79 25 3a 5a 25 28 41 25 29 3d a4 59 3a 44 |.iy%:Z%(A%)=.Y:D|
00005500 25 28 41 25 29 3d a4 59 3a 49 25 28 41 25 29 3d |%(A%)=.Y:I%(A%)=|
00005510 a4 59 3a ed 3a 4e 24 3d be 23 7a 25 3a f5 f2 51 |.Y:.:N$=.#z%:..Q|
00005520 4a 28 be 23 7a 25 2c 7a 25 29 3a fd c5 23 7a 25 |J(.#z%,z%):..#z%|
00005530 3a d9 23 7a 25 3a 7a 25 3d 30 3a f7 85 3a 50 75 |:.#z%:z%=0:..:Pu|
00005540 25 3d 28 a4 6e 28 71 4a 25 29 3c 3e a4 6e 28 a4 |%=(.n(qJ%)<>.n(.|
00005550 7a 29 29 3a e7 6c 4a 25 8c 44 24 3d a4 41 28 22 |z)):.lJ%.D$=.A("|
00005560 59 6f 75 72 6e 61 6d 65 22 29 0d 01 d7 0f e7 67 |Yourname").....g|
00005570 24 3c 3e 4a 24 8c f2 68 4a 0d 01 d8 05 e1 0d 01 |$<>J$..hJ.......|
00005580 d9 f2 dd f2 64 5f 3a ea 41 25 3a 7a 25 3d ae 28 |....d_:.A%:z%=.(|
00005590 4a 24 2b 22 2e 44 61 74 61 2e 53 65 74 74 69 6e |J$+".Data.Settin|
000055a0 67 73 22 29 3a d5 23 7a 25 2c 56 24 3a d5 23 7a |gs"):.#z%,V$:.#z|
000055b0 25 2c 4a 24 3a d5 23 7a 25 2c 44 24 3a f2 57 28 |%,J$:.#z%,D$:.W(|
000055c0 73 5f 25 29 3a f2 57 28 67 75 25 29 3a f2 57 28 |s_%):.W(gu%):.W(|
000055d0 71 79 25 29 3a f2 57 28 72 5f 25 29 3a f2 57 28 |qy%):.W(r_%):.W(|
000055e0 53 75 25 29 3a f2 57 28 69 79 25 29 3a f2 57 28 |Su%):.W(iy%):.W(|
000055f0 74 25 29 3a f2 57 28 64 75 25 29 3a f2 57 28 4d |t%):.W(du%):.W(M|
00005600 75 25 29 3a f2 57 28 78 4a 25 29 3a f2 57 28 46 |u%):.W(xJ%):.W(F|
00005610 75 25 29 3a f2 57 28 5f 4a 25 29 3a f1 23 7a 25 |u%):.W(_J%):.#z%|
00005620 2c 4b 75 25 2c a4 7a 3a f1 23 7a 25 2c 65 4a 25 |,Ku%,.z:.#z%,eJ%|
00005630 2c 61 75 25 2c 77 6c 25 2c 78 75 25 2c 63 6c 25 |,au%,wl%,xu%,cl%|
00005640 3a f2 57 28 75 5f 25 29 3a f2 57 28 46 4a 25 29 |:.W(u_%):.W(FJ%)|
00005650 3a f1 23 7a 25 2c 6a 25 2c 6d 25 3a e3 41 25 3d |:.#z%,j%,m%:.A%=|
00005660 30 b8 36 3a f2 57 28 50 25 28 41 25 29 29 3a ed |0.6:.W(P%(A%)):.|
00005670 0d 01 da 67 e3 41 25 3d 30 b8 32 3a f2 57 28 48 |...g.A%=0.2:.W(H|
00005680 25 28 41 25 29 29 3a ed 3a e3 41 25 3d 31 b8 69 |%(A%)):.:.A%=1.i|
00005690 79 25 3a f2 57 28 5a 25 28 41 25 29 29 3a f2 57 |y%:.W(Z%(A%)):.W|
000056a0 28 44 25 28 41 25 29 29 3a f2 57 28 49 25 28 41 |(D%(A%)):.W(I%(A|
000056b0 25 29 29 3a ed 3a d5 23 7a 25 2c 4e 24 3a f2 4b |%)):.:.#z%,N$:.K|
000056c0 75 28 7a 25 29 3a d9 23 7a 25 3a 7a 25 3d 30 3a |u(z%):.#z%:z%=0:|
000056d0 65 79 25 3d a3 3a e1 0d 01 db 11 dd f2 74 3a f2 |ey%=.:.......t:.|
000056e0 64 5f 3a f2 4f 75 3a e1 0d 01 dc e7 dd f2 50 5f |d_:.Ou:.......P_|
000056f0 3a 3a 3a 4a 5f 25 3d a3 3a 50 75 25 3d 30 3a 71 |:::J_%=.:Pu%=0:q|
00005700 79 25 3d 31 2b 32 2b 34 3a 4e 24 3d 22 25 7a 31 |y%=1+2+4:N$="%z1|
00005710 32 3a 25 6d 69 3a 25 73 65 20 25 61 6d 22 3a 48 |2:%mi:%se %am":H|
00005720 25 28 29 3d 32 2c 32 2c 37 3a 73 5f 25 3d a3 3a |%()=2,2,7:s_%=.:|
00005730 72 5f 25 3d a3 3a 4d 75 25 3d b9 3a 53 75 25 3d |r_%=.:Mu%=.:Su%=|
00005740 b9 3a 4d 4a 25 3d 30 3a 3a 3a 3a 3a 3a 46 75 25 |.:MJ%=0::::::Fu%|
00005750 3d a3 3a 75 5f 25 3d b9 3a 69 79 25 3d 34 3a 49 |=.:u_%=.:iy%=4:I|
00005760 25 28 29 3d 37 3a 44 25 28 29 3d 30 2c 26 42 2c |%()=7:D%()=0,&B,|
00005770 26 41 2c 26 46 2c 39 2c 26 45 3a 50 25 28 29 3d |&A,&F,9,&E:P%()=|
00005780 30 2c 26 46 2c 38 2c 26 42 2c 34 2c 34 2c 26 42 |0,&F,8,&B,4,4,&B|
00005790 3a 67 75 25 3d a3 3a 65 4a 25 3d 2d 31 3a 61 75 |:gu%=.:eJ%=-1:au|
000057a0 25 3d 30 3a 78 75 25 3d 30 3a 77 6c 25 3d 30 3a |%=0:xu%=0:wl%=0:|
000057b0 63 6c 25 3d 30 3a 46 4a 25 3d a3 3a 74 25 3d 32 |cl%=0:FJ%=.:t%=2|
000057c0 3a 5a 25 28 29 3d 30 2c 31 2c 33 2c 35 2c 32 0d |:Z%()=0,1,3,5,2.|
000057d0 01 dd 67 64 75 25 3d b9 3a 44 24 3d 22 43 68 72 |..gdu%=.:D$="Chr|
000057e0 69 73 20 4d 6f 72 69 73 6f 6e 22 3a 78 4a 25 3d |is Morison":xJ%=|
000057f0 a3 3a 53 75 25 3d a3 3a 70 79 25 3d a3 3a 3a 3a |.:Su%=.:py%=.:::|
00005800 3a 3a 3a 6a 25 3d 35 30 30 3a 6d 25 3d 39 32 30 |:::j%=500:m%=920|
00005810 3a 3a 3a 3a 3a 3a 3a 5f 4a 25 3d 38 3a 4b 75 25 |:::::::_J%=8:Ku%|
00005820 3d 26 45 37 3a 3a 3a 3a 50 75 25 3d a3 3a 71 4a |=&E7::::Pu%=.:qJ|
00005830 25 3d 30 3a 3a e1 0d 01 de 12 dd a4 52 3d 28 9a |%=0::.......R=(.|
00005840 23 7a 25 3d 26 46 46 29 0d 01 df 14 dd f2 57 28 |#z%=&FF)......W(|
00005850 41 25 29 d5 23 7a 25 2c 41 25 3a e1 0d 01 e0 0c |A%).#z%,A%:.....|
00005860 dd a4 59 3d 9a 23 7a 25 0d 01 e1 21 dd f2 6d 3a |..Y=.#z%...!..m:|
00005870 ea 42 25 2c 48 25 3a e7 4d 4a 25 3e 30 8c 42 25 |.B%,H%:.MJ%>0.B%|
00005880 3d 38 8b 42 25 3d 71 79 25 0d 01 e2 38 e7 4e 4a |=8.B%=qy%...8.NJ|
00005890 25 3c 3e 2d 31 8c 21 4a 25 3d 2d 31 2d 37 2a 94 |%<>-1.!J%=-1-7*.|
000058a0 28 75 5f 25 29 3a 4a 25 21 34 3d 4e 4a 25 3a c8 |(u_%):J%!4=NJ%:.|
000058b0 99 26 34 30 30 43 34 2c 2c 4a 25 3a 55 5f 25 3d |.&400C4,,J%:U_%=|
000058c0 30 0d 01 e3 11 c8 8e 42 25 80 ac 28 32 2b 31 36 |0......B%..(2+16|
000058d0 29 ca 0d 01 e4 0d c9 31 2c 38 3a c8 8e b9 ca 0d |)......1,8:.....|
000058e0 01 e5 16 c9 42 25 3d 31 3a 55 5f 25 3d 36 2d 33 |....B%=1:U_%=6-3|
000058f0 2a ac 72 5f 25 0d 01 e6 16 c9 42 25 3d 33 3a 55 |*.r_%.....B%=3:U|
00005900 5f 25 3d 39 2d 33 2a ac 72 5f 25 0d 01 e7 3b c9 |_%=9-3*.r_%...;.|
00005910 28 42 25 80 38 29 3e 30 3a 55 5f 25 3d 39 3a c8 |(B%.8)>0:U_%=9:.|
00005920 99 26 34 30 30 45 43 2c 2d 31 2c 2d 31 b8 2c 2c |.&400EC,-1,-1.,,|
00005930 48 25 3a 24 61 4a 25 3d c3 28 48 25 81 26 34 30 |H%:$aJ%=.(H%.&40|
00005940 30 29 2b 22 6b 22 0d 01 e8 1c c9 28 42 25 80 31 |0)+"k".....(B%.1|
00005950 36 29 3e 30 3a 55 5f 25 3d a9 a4 4b 28 4e 24 29 |6)>0:U_%=..K(N$)|
00005960 2b 33 0d 01 e9 5f cb 3a 55 5f 25 3d 55 5f 25 2a |+3..._.:U_%=U_%*|
00005970 31 36 3a 43 75 25 3d 36 38 3a 4a 25 21 38 3d 30 |16:Cu%=68:J%!8=0|
00005980 3a 4a 25 21 26 43 3d 55 5f 25 3a 4a 25 21 31 36 |:J%!&C=U_%:J%!16|
00005990 3d 43 75 25 3a 4a 25 21 32 30 3d 26 32 37 30 30 |=Cu%:J%!20=&2700|
000059a0 33 31 33 44 3a 4a 25 21 32 34 3d 61 4a 25 3a 4a |313D:J%!24=aJ%:J|
000059b0 25 21 32 38 3d 53 61 25 3a 4a 25 21 33 32 3d 33 |%!28=Sa%:J%!32=3|
000059c0 32 0d 01 ea 6b c9 31 2b 34 3a 55 5f 25 3d 26 37 |2...k.1+4:U_%=&7|
000059d0 34 3a 43 75 25 3d 26 37 38 3a 4a 25 21 38 3d 2d |4:Cu%=&78:J%!8=-|
000059e0 31 36 3a 4a 25 21 26 43 3d 55 5f 25 3a 4a 25 21 |16:J%!&C=U_%:J%!|
000059f0 31 36 3d 43 75 25 3a 24 61 4a 25 3d 22 63 6c 6f |16=Cu%:$aJ%="clo|
00005a00 63 6b 22 3a 4a 25 21 32 30 3d 26 33 31 30 32 3a |ck":J%!20=&3102:|
00005a10 4a 25 21 32 34 3d 61 4a 25 3a 4a 25 21 32 38 3d |J%!24=aJ%:J%!28=|
00005a20 5a 5f 25 3a 4a 25 21 33 32 3d 33 32 0d 01 eb 4e |Z_%:J%!32=32...N|
00005a30 7f 3a 55 5f 25 3d 36 38 3a 43 75 25 3d 36 38 3a |.:U_%=68:Cu%=68:|
00005a40 4a 25 21 38 3d 30 3a 4a 25 21 26 43 3d 36 38 3a |J%!8=0:J%!&C=68:|
00005a50 4a 25 21 31 36 3d 36 38 3a 4a 25 21 32 30 3d 26 |J%!16=68:J%!20=&|
00005a60 33 30 30 32 3a 24 28 4a 25 2b 32 34 29 3d 22 21 |3002:$(J%+24)="!|
00005a70 4f 72 67 61 6e 69 73 65 72 22 0d 01 ec 3c cb 3a |Organiser"...<.:|
00005a80 21 4a 25 3d 2d 31 2d 94 28 37 2a 75 5f 25 29 3a |!J%=-1-.(7*u_%):|
00005a90 4a 25 21 34 3d 30 3a c8 99 26 34 30 30 43 32 2c |J%!4=0:..&400C2,|
00005aa0 30 2c 4a 25 b8 4e 4a 25 3a e7 28 42 25 80 34 29 |0,J%.NJ%:.(B%.4)|
00005ab0 3d 34 8c f2 46 5f 0d 01 ed 15 f2 6f 28 2d 31 2c |=4..F_.....o(-1,|
00005ac0 4e 4a 25 2c 48 25 28 29 29 3a e1 0d 01 ee 36 dd |NJ%,H%()):....6.|
00005ad0 f2 6f 28 65 25 2c 63 79 25 2c 4b 25 28 29 29 3a |.o(e%,cy%,K%()):|
00005ae0 ea 67 5f 25 2c 41 25 3a 67 5f 25 3d a4 67 79 28 |.g_%,A%:g_%=.gy(|
00005af0 65 25 2c 63 79 25 29 3a e7 67 5f 25 3c 3e 2d 31 |e%,cy%):.g_%<>-1|
00005b00 8c 0d 01 ef 71 41 25 3d a7 a4 4e 28 67 5f 25 29 |....qA%=..N(g_%)|
00005b10 2c 22 52 22 29 3a 67 5f 25 3f 41 25 3d 97 c3 4b |,"R"):g_%?A%=..K|
00005b20 25 28 30 29 3a f2 55 28 65 25 2c 63 79 25 2c 4b |%(0):.U(e%,cy%,K|
00005b30 25 28 32 29 29 3a f2 62 28 65 25 2c 63 79 25 2c |%(2)):.b(e%,cy%,|
00005b40 4b 25 28 31 29 29 3a 21 4a 25 3d 65 25 3a 4a 25 |K%(1)):!J%=e%:J%|
00005b50 21 34 3d 63 79 25 3a 4a 25 21 38 3d 30 3a 4a 25 |!4=cy%:J%!8=0:J%|
00005b60 21 26 43 3d 30 3a c8 99 26 34 30 30 43 44 2c 2c |!&C=0:..&400CD,,|
00005b70 4a 25 0d 01 f0 07 cd 3a e1 0d 01 f1 f2 dd f2 68 |J%.....:.......h|
00005b80 75 3a ea 41 25 2c 49 79 25 3a de 41 25 28 36 29 |u:.A%,Iy%:.A%(6)|
00005b90 3a 59 79 25 3d 30 3a f2 6d 4a 3a 6e 75 25 3d a4 |:Yy%=0:.mJ:nu%=.|
00005ba0 42 28 22 49 6e 66 6f 22 2c 49 79 25 29 3a 69 25 |B("Info",Iy%):i%|
00005bb0 3d a4 42 28 22 4d 61 69 6e 22 2c 49 79 25 29 3a |=.B("Main",Iy%):|
00005bc0 74 69 25 3d 49 79 25 3a 60 25 3d a4 42 28 22 41 |ti%=Iy%:`%=.B("A|
00005bd0 64 64 72 65 73 73 65 73 22 2c 49 79 25 29 3a 47 |ddresses",Iy%):G|
00005be0 5f 25 3d a4 42 28 22 49 6d 70 6f 72 74 61 6e 74 |_%=.B("Important|
00005bf0 22 2c 49 79 25 29 3a 5a 75 25 3d a4 42 28 22 42 |",Iy%):Zu%=.B("B|
00005c00 61 6e 6e 65 72 22 2c 49 79 25 29 3a 61 79 25 3d |anner",Iy%):ay%=|
00005c10 a4 42 28 22 47 65 74 44 61 74 65 22 2c 49 79 25 |.B("GetDate",Iy%|
00005c20 29 3a 49 5f 25 3d a4 42 28 22 53 65 74 75 70 22 |):I_%=.B("Setup"|
00005c30 2c 49 79 25 29 3a 66 25 3d a4 42 28 22 41 6c 61 |,Iy%):f%=.B("Ala|
00005c40 72 6d 53 65 74 22 2c 49 79 25 29 3a 51 6c 25 3d |rmSet",Iy%):Ql%=|
00005c50 49 79 25 3a 4c 79 25 3d a4 42 28 22 41 6c 61 72 |Iy%:Ly%=.B("Alar|
00005c60 6d 57 61 72 6e 22 2c 49 79 25 29 0d 01 f2 dc 48 |mWarn",Iy%)....H|
00005c70 79 25 3d a4 42 28 22 41 6e 6e 69 22 2c 49 79 25 |y%=.B("Anni",Iy%|
00005c80 29 3a 4e 61 25 3d 49 79 25 3a 56 4a 25 3d a4 42 |):Na%=Iy%:VJ%=.B|
00005c90 28 22 41 6e 6e 69 4e 6f 74 69 66 79 22 2c 49 79 |("AnniNotify",Iy|
00005ca0 25 29 3a 41 25 28 31 29 3d a4 42 28 22 53 65 74 |%):A%(1)=.B("Set|
00005cb0 47 65 6e 22 2c 49 79 25 29 3a 41 25 28 32 29 3d |Gen",Iy%):A%(2)=|
00005cc0 a4 42 28 22 53 65 74 41 64 64 22 2c 49 79 25 29 |.B("SetAdd",Iy%)|
00005cd0 3a 41 25 28 33 29 3d a4 42 28 22 53 65 74 41 6e |:A%(3)=.B("SetAn|
00005ce0 6e 22 2c 49 79 25 29 3a 41 25 28 34 29 3d a4 42 |n",Iy%):A%(4)=.B|
00005cf0 28 22 53 65 74 43 61 6c 22 2c 49 79 25 29 3a 41 |("SetCal",Iy%):A|
00005d00 25 28 35 29 3d a4 42 28 22 53 65 74 44 69 61 22 |%(5)=.B("SetDia"|
00005d10 2c 49 79 25 29 3a 41 25 28 36 29 3d a4 42 28 22 |,Iy%):A%(6)=.B("|
00005d20 53 65 74 43 6f 6c 6f 75 72 73 22 2c 49 79 25 29 |SetColours",Iy%)|
00005d30 3a 41 79 25 3d a4 42 28 22 53 65 74 43 6c 6f 63 |:Ay%=.B("SetCloc|
00005d40 6b 22 2c 49 79 25 29 0d 01 f3 b4 f2 41 28 6e 75 |k",Iy%).....A(nu|
00005d50 25 2c 38 2c 56 24 29 3a f2 41 28 6e 75 25 2c 35 |%,8,V$):.A(nu%,5|
00005d60 2c 22 21 4f 72 67 61 6e 69 73 65 72 22 29 3a f2 |,"!Organiser"):.|
00005d70 41 28 6e 75 25 2c 36 2c a4 41 28 22 50 75 72 70 |A(nu%,6,.A("Purp|
00005d80 22 29 29 3a f2 41 28 5a 75 25 2c 33 2c a4 41 28 |")):.A(Zu%,3,.A(|
00005d90 22 56 65 72 73 22 29 2b 22 20 22 2b 56 24 29 3a |"Vers")+" "+V$):|
00005da0 f2 41 28 5a 75 25 2c 36 2c 22 a9 20 43 68 72 69 |.A(Zu%,6,". Chri|
00005db0 73 20 4d 6f 72 69 73 6f 6e 20 31 39 22 2b c1 56 |s Morison 19"+.V|
00005dc0 24 2c a7 56 24 2c 22 29 22 29 2d 32 2c 32 29 29 |$,.V$,")")-2,2))|
00005dd0 3a f2 41 28 5a 75 25 2c 34 2c 44 24 29 3a e3 41 |:.A(Zu%,4,D$):.A|
00005de0 25 3d 31 b8 33 31 3a f2 41 28 61 79 25 2c 41 25 |%=1.31:.A(ay%,A%|
00005df0 2b 33 2c c3 41 25 29 3a ed 3a e1 0d 01 f4 4b dd |+3,.A%):.:....K.|
00005e00 a4 42 28 47 24 2c f8 49 79 25 29 3a ea 48 25 2c |.B(G$,.Iy%):.H%,|
00005e10 53 25 2c 49 25 2c 50 25 2c 74 79 25 2c 67 5f 25 |S%,I%,P%,ty%,g_%|
00005e20 3a c8 99 26 34 30 30 44 42 2c 2c 2c 30 2c 30 2c |:..&400DB,,,0,0,|
00005e30 30 2c 47 24 2c 30 b8 2c 53 25 2c 49 25 3a e7 53 |0,G$,0.,S%,I%:.S|
00005e40 25 3e 35 31 32 8c 0d 01 f5 33 c8 99 26 32 30 30 |%>512....3..&200|
00005e50 31 45 2c 36 2c 2c 2c 53 25 b8 2c 2c 50 25 3b 74 |1E,6,,,S%.,,P%;t|
00005e60 79 25 3a e7 74 79 25 80 31 8c 85 32 2c a4 41 28 |y%:.ty%.1..2,.A(|
00005e70 22 45 72 72 57 69 6e 22 29 0d 01 f6 0a cc 50 25 |"ErrWin").....P%|
00005e80 3d 55 25 0d 01 f7 3f cd 3a de 67 5f 25 49 25 3a |=U%...?.:.g_%I%:|
00005e90 c8 99 26 34 30 30 44 42 2c 2c 50 25 2c 67 5f 25 |..&400DB,,P%,g_%|
00005ea0 2c 67 5f 25 2b 49 25 2c 59 6c 25 2c 47 24 2c 30 |,g_%+I%,Yl%,G$,0|
00005eb0 b8 2c 2c 67 5f 25 3a e7 47 24 3d 22 4d 61 69 6e |.,,g_%:.G$="Main|
00005ec0 22 8c 0d 01 f8 3e 50 25 21 36 38 3d 26 36 34 2b |"....>P%!68=&64+|
00005ed0 28 26 36 34 3c 3c 31 36 29 3a 50 25 21 30 3d 30 |(&64<<16):P%!0=0|
00005ee0 3a 50 25 21 34 3d 30 3a 50 25 21 38 3d 78 79 25 |:P%!4=0:P%!8=xy%|
00005ef0 3a 50 25 21 26 43 3d 72 79 25 3a e7 46 4a 25 8c |:P%!&C=ry%:.FJ%.|
00005f00 0d 01 f9 2a 50 25 21 34 38 3d a4 64 3a 50 25 21 |...*P%!48=.d:P%!|
00005f10 34 34 3d 2d a4 65 3a 50 25 21 32 38 3d 50 25 21 |44=-.e:P%!28=P%!|
00005f20 32 38 84 28 33 3c 3c 32 39 29 0d 01 fa 2e cc 50 |28.(3<<29).....P|
00005f30 25 21 34 38 3d 78 79 25 3a 50 25 21 34 34 3d 2d |%!48=xy%:P%!44=-|
00005f40 72 79 25 3a 50 25 21 32 38 3d 50 25 21 32 38 80 |ry%:P%!28=P%!28.|
00005f50 ac 28 33 3c 3c 32 39 29 0d 01 fb 05 cd 0d 01 fc |.(3<<29)........|
00005f60 18 cc 3a e7 47 24 3d 22 53 65 74 75 70 22 8c 5f |..:.G$="Setup"._|
00005f70 61 25 3d 53 25 0d 01 fd 1a e7 47 24 3d 22 41 64 |a%=S%.....G$="Ad|
00005f80 64 72 65 73 73 65 73 22 8c 79 69 25 3d 53 25 0d |dresses".yi%=S%.|
00005f90 01 fe 20 cd 3a e7 ac 46 75 25 80 47 24 3c 3e 22 |.. .:..Fu%.G$<>"|
00005fa0 42 61 6e 6e 65 72 22 8c f2 59 75 28 50 25 29 0d |Banner"..Yu(P%).|
00005fb0 01 ff 21 e7 47 24 3d 22 41 64 64 72 65 73 73 65 |..!.G$="Addresse|
00005fc0 73 22 8c f2 74 79 28 50 25 21 38 34 2c 50 25 29 |s"..ty(P%!84,P%)|
00005fd0 0d 02 00 3b 50 25 21 36 34 3d 5a 5f 25 3a c8 99 |...;P%!64=Z_%:..|
00005fe0 26 34 30 30 43 31 2c 2c 50 25 b8 63 79 25 3a 49 |&400C1,,P%.cy%:I|
00005ff0 79 25 3d 50 25 21 37 32 3a e7 53 25 3e 35 31 32 |y%=P%!72:.S%>512|
00006000 8c c8 99 33 30 2c 37 2c 2c 50 25 0d 02 01 08 3d |...30,7,,P%....=|
00006010 63 79 25 0d 02 02 20 dd f2 7a 4a 28 74 79 25 29 |cy%... ..zJ(ty%)|
00006020 3a ea 55 4a 25 2c 42 25 3a e7 74 79 25 3c 3e 46 |:.UJ%,B%:.ty%<>F|
00006030 4a 25 8c 0d 02 03 50 c8 99 33 30 2c 36 2c 2c 2c |J%....P..30,6,,,|
00006040 34 2b 38 38 2b 33 32 2a 32 32 b8 2c 2c 55 4a 25 |4+88+32*22.,,UJ%|
00006050 3a 21 55 4a 25 3d 69 25 3a c8 99 26 34 30 30 43 |:!UJ%=i%:..&400C|
00006060 43 2c 2c 55 4a 25 3a 42 25 3d 55 4a 25 2b 34 3a |C,,UJ%:B%=UJ%+4:|
00006070 c8 99 26 34 30 30 43 33 2c 2c 55 4a 25 3a e7 74 |..&400C3,,UJ%:.t|
00006080 79 25 8c 0d 02 04 2a 42 25 21 34 38 3d a4 64 3a |y%....*B%!48=.d:|
00006090 42 25 21 34 34 3d 2d a4 65 3a 42 25 21 32 38 3d |B%!44=-.e:B%!28=|
000060a0 42 25 21 32 38 84 28 33 3c 3c 32 39 29 0d 02 05 |B%!28.(3<<29)...|
000060b0 2e cc 42 25 21 34 38 3d 78 79 25 3a 42 25 21 34 |..B%!48=xy%:B%!4|
000060c0 34 3d 2d 72 79 25 3a 42 25 21 32 38 3d 42 25 21 |4=-ry%:B%!28=B%!|
000060d0 32 38 80 ac 28 33 3c 3c 32 39 29 0d 02 06 35 cd |28..(3<<29)...5.|
000060e0 3a 42 25 3d 69 25 3a 46 4a 25 3d 74 79 25 3a c8 |:B%=i%:FJ%=ty%:.|
000060f0 99 26 34 30 30 43 31 2c 2c 55 4a 25 2b 34 b8 69 |.&400C1,,UJ%+4.i|
00006100 25 3a e7 78 5f 25 3d 42 25 8c 78 5f 25 3d 69 25 |%:.x_%=B%.x_%=i%|
00006110 0d 02 07 1e e7 56 79 25 8c 21 55 4a 25 3d 69 25 |.....Vy%.!UJ%=i%|
00006120 3a c8 99 26 34 30 30 43 35 2c 2c 55 4a 25 0d 02 |:..&400C5,,UJ%..|
00006130 08 0f c8 99 33 30 2c 37 2c 2c 55 4a 25 0d 02 09 |....30,7,,UJ%...|
00006140 07 cd 3a e1 0d 02 0a 1e dd f2 4f 4a 28 60 75 25 |..:.......OJ(`u%|
00006150 2c 53 24 29 3a e7 a4 50 79 28 60 75 25 2c 53 24 |,S$):..Py(`u%,S$|
00006160 29 8c 0d 02 0b 58 c8 94 55 25 21 38 2c 55 25 21 |)....X..U%!8,U%!|
00006170 26 43 3a 21 55 25 3d 32 35 36 3a 24 28 55 25 2b |&C:!U%=256:$(U%+|
00006180 34 34 29 3d 22 3c 57 69 6d 70 24 53 63 72 61 70 |44)="<Wimp$Scrap|
00006190 3e 22 2b bd 30 3a 55 25 21 33 36 3d 2d 31 3a 55 |>"+.0:U%!36=-1:U|
000061a0 25 21 31 36 3d 32 3a c8 99 26 34 30 30 45 37 2c |%!16=2:..&400E7,|
000061b0 31 37 2c 55 25 2c 55 25 21 34 0d 02 0c 07 cd 3a |17,U%,U%!4.....:|
000061c0 e1 0d 02 0d 36 dd f2 41 4a 3a e7 a4 75 3c 3e 2d |....6..AJ:..u<>-|
000061d0 31 8c 55 25 21 26 43 3d 55 25 21 38 3a 55 25 21 |1.U%!&C=U%!8:U%!|
000061e0 38 3d 30 3a c8 99 26 34 30 30 45 37 2c 31 39 2c |8=0:..&400E7,19,|
000061f0 55 25 2c 55 25 21 34 0d 02 0e 05 e1 0d 02 0f 6b |U%,U%!4........k|
00006200 dd f2 56 4a 3a ea 71 75 25 2c 61 25 2c 4b 25 3a |..VJ:.qu%,a%,K%:|
00006210 c8 99 26 34 30 30 43 38 2c 2c 55 25 b8 71 75 25 |..&400C8,,U%.qu%|
00006220 3a 61 25 3d 55 25 21 34 2d 55 25 21 32 30 3a 4b |:a%=U%!4-U%!20:K|
00006230 25 3d 55 25 21 31 36 2d 55 25 21 32 34 3a c8 95 |%=U%!16-U%!24:..|
00006240 71 75 25 3a f2 54 5f 28 21 55 25 2c 61 25 2c 4b |qu%:.T_(!U%,a%,K|
00006250 25 29 3a c8 99 26 34 30 30 43 41 2c 2c 55 25 b8 |%):..&400CA,,U%.|
00006260 71 75 25 3a ce 3a e1 0d 02 10 5e dd a4 75 79 28 |qu%:.:....^..uy(|
00006270 53 24 2c 45 25 29 3a ea 46 25 2c 41 25 2c 53 25 |S$,E%):.F%,A%,S%|
00006280 3a 46 25 3d 8e 53 24 3a 41 25 3d a2 23 46 25 2b |:F%=.S$:A%=.#F%+|
00006290 34 3a d9 23 46 25 3a 41 25 2b 3d 45 25 3a de 53 |4:.#F%:A%+=E%:.S|
000062a0 25 41 25 3a 21 53 25 3d 41 25 3a 53 25 21 38 3d |%A%:!S%=A%:S%!8=|
000062b0 31 36 3a c8 99 34 36 2c 32 36 36 2c 53 25 2c 53 |16:..46,266,S%,S|
000062c0 24 3a 3d 53 25 0d 02 11 4b dd f2 4d 28 65 25 2c |$:=S%...K..M(e%,|
000062d0 77 25 29 3a 21 4a 25 3d 65 25 3a 4a 25 21 34 3d |w%):!J%=e%:J%!4=|
000062e0 77 25 3a c8 99 26 34 30 30 43 45 2c 2c 4a 25 3a |w%:..&400CE,,J%:|
000062f0 c8 99 26 34 30 30 44 32 2c 65 25 2c 77 25 2c 2c |..&400D2,e%,w%,,|
00006300 2c 2d 31 2c a9 a4 4e 28 4a 25 21 32 38 29 3a e1 |,-1,..N(J%!28):.|
00006310 0d 02 12 23 dd a4 70 28 65 25 2c 77 25 29 3a ea |...#..p(e%,w%):.|
00006320 6b 5f 25 2c 60 5f 25 3a e7 a4 68 28 65 25 2c 77 |k_%,`_%:..h(e%,w|
00006330 25 29 8c 0d 02 13 16 f2 64 79 28 65 25 2c 77 25 |%)......dy(e%,w%|
00006340 2c 60 5f 25 2c 6b 5f 25 29 0d 02 14 33 cc 21 4a |,`_%,k_%)...3.!J|
00006350 25 3d 65 25 3a 4a 25 21 34 3d 77 25 3a c8 99 26 |%=e%:J%!4=w%:..&|
00006360 34 30 30 43 45 2c 2c 4a 25 3a 6b 5f 25 3d 28 4a |400CE,,J%:k_%=(J|
00006370 25 21 32 34 3e 3e 32 38 29 80 26 46 0d 02 15 0a |%!24>>28).&F....|
00006380 cd 3a 3d 6b 5f 25 0d 02 16 1e dd f2 62 28 65 25 |.:=k_%......b(e%|
00006390 2c 77 25 2c 6b 5f 25 29 3a e7 a4 68 28 65 25 2c |,w%,k_%):..h(e%,|
000063a0 77 25 29 8c 0d 02 17 15 f2 4d 5f 28 65 25 2c 77 |w%)......M_(e%,w|
000063b0 25 2c 2d 31 2c 6b 5f 25 29 0d 02 18 3a cc 21 4a |%,-1,k_%)...:.!J|
000063c0 25 3d 65 25 3a 4a 25 21 34 3d 77 25 3a 4a 25 21 |%=e%:J%!4=w%:J%!|
000063d0 26 43 3d 26 46 3c 3c 32 38 3a 4a 25 21 38 3d 6b |&C=&F<<28:J%!8=k|
000063e0 5f 25 3c 3c 32 38 3a c8 99 26 34 30 30 43 44 2c |_%<<28:..&400CD,|
000063f0 2c 4a 25 0d 02 19 07 cd 3a e1 0d 02 1a 3e dd a4 |,J%.....:....>..|
00006400 68 28 65 25 2c 77 25 29 3a 21 4a 25 3d 65 25 3a |h(e%,w%):!J%=e%:|
00006410 4a 25 21 34 3d 77 25 3a c8 99 26 34 30 30 43 45 |J%!4=w%:..&400CE|
00006420 2c 2c 4a 25 3a 3d 28 28 4a 25 21 32 34 29 80 28 |,,J%:=((J%!24).(|
00006430 31 3c 3c 36 29 29 3e 30 0d 02 1b 57 dd f2 4d 5f |1<<6))>0...W..M_|
00006440 28 65 25 2c 77 25 2c 60 5f 25 2c 6b 5f 25 29 3a |(e%,w%,`_%,k_%):|
00006450 ea 50 25 2c 41 25 3a 21 4a 25 3d 65 25 3a 4a 25 |.P%,A%:!J%=e%:J%|
00006460 21 34 3d 77 25 3a c8 99 26 34 30 30 43 45 2c 2c |!4=w%:..&400CE,,|
00006470 4a 25 3a 50 25 3d 4a 25 21 33 32 3a 41 25 3d a7 |J%:P%=J%!32:A%=.|
00006480 24 50 25 2c 22 46 22 29 3a e7 41 25 3e 30 8c 0d |$P%,"F"):.A%>0..|
00006490 02 1c 1e e7 60 5f 25 3c 3e 2d 31 8c 3f 28 50 25 |....`_%<>-1.?(P%|
000064a0 2b 41 25 2b 31 29 3d 97 c3 7e 60 5f 25 0d 02 1d |+A%+1)=..~`_%...|
000064b0 1c e7 6b 5f 25 3c 3e 2d 31 8c 3f 28 50 25 2b 41 |..k_%<>-1.?(P%+A|
000064c0 25 29 3d 97 c3 7e 6b 5f 25 0d 02 1e 1f 4a 25 21 |%)=..~k_%....J%!|
000064d0 38 3d 30 3a 4a 25 21 26 43 3d 30 3a c8 99 26 34 |8=0:J%!&C=0:..&4|
000064e0 30 30 43 44 2c 2c 4a 25 0d 02 1f 07 cd 3a e1 0d |00CD,,J%.....:..|
000064f0 02 20 92 dd f2 64 79 28 65 25 2c 77 25 2c f8 60 |. ...dy(e%,w%,.`|
00006500 5f 25 2c f8 6b 5f 25 29 3a ea 50 25 2c 41 25 3a |_%,.k_%):.P%,A%:|
00006510 21 4a 25 3d 65 25 3a 4a 25 21 34 3d 77 25 3a c8 |!J%=e%:J%!4=w%:.|
00006520 99 26 34 30 30 43 45 2c 2c 4a 25 3a 50 25 3d 4a |.&400CE,,J%:P%=J|
00006530 25 21 33 32 3a 41 25 3d a7 24 50 25 2c 22 46 22 |%!32:A%=.$P%,"F"|
00006540 29 3a 60 5f 25 3d 2d 31 3a 6b 5f 25 3d 2d 31 3a |):`_%=-1:k_%=-1:|
00006550 e7 41 25 3e 30 8c 60 5f 25 3d a0 28 22 26 22 2b |.A%>0.`_%=.("&"+|
00006560 bd 3f 28 50 25 2b 41 25 2b 31 29 29 3a 6b 5f 25 |.?(P%+A%+1)):k_%|
00006570 3d a0 28 22 26 22 2b bd 3f 28 50 25 2b 41 25 29 |=.("&"+.?(P%+A%)|
00006580 29 0d 02 21 05 e1 0d 02 22 23 dd a4 71 28 65 25 |)..!...."#..q(e%|
00006590 2c 77 25 29 3a ea 6b 5f 25 2c 60 5f 25 3a e7 a4 |,w%):.k_%,`_%:..|
000065a0 68 28 65 25 2c 77 25 29 8c 0d 02 23 16 f2 64 79 |h(e%,w%)...#..dy|
000065b0 28 65 25 2c 77 25 2c 60 5f 25 2c 6b 5f 25 29 0d |(e%,w%,`_%,k_%).|
000065c0 02 24 33 cc 21 4a 25 3d 65 25 3a 4a 25 21 34 3d |.$3.!J%=e%:J%!4=|
000065d0 77 25 3a c8 99 26 34 30 30 43 45 2c 2c 4a 25 3a |w%:..&400CE,,J%:|
000065e0 60 5f 25 3d 28 4a 25 21 32 34 3e 3e 32 34 29 80 |`_%=(J%!24>>24).|
000065f0 26 46 0d 02 25 0a cd 3a 3d 60 5f 25 0d 02 26 1e |&F..%..:=`_%..&.|
00006600 dd f2 55 28 65 25 2c 77 25 2c 60 5f 25 29 3a e7 |..U(e%,w%,`_%):.|
00006610 a4 68 28 65 25 2c 77 25 29 8c 0d 02 27 15 f2 4d |.h(e%,w%)...'..M|
00006620 5f 28 65 25 2c 77 25 2c 60 5f 25 2c 2d 31 29 0d |_(e%,w%,`_%,-1).|
00006630 02 28 3a cc 21 4a 25 3d 65 25 3a 4a 25 21 34 3d |.(:.!J%=e%:J%!4=|
00006640 77 25 3a 4a 25 21 26 43 3d 26 46 3c 3c 32 34 3a |w%:J%!&C=&F<<24:|
00006650 4a 25 21 38 3d 60 5f 25 3c 3c 32 34 3a c8 99 26 |J%!8=`_%<<24:..&|
00006660 34 30 30 43 44 2c 2c 4a 25 0d 02 29 07 cd 3a e1 |400CD,,J%..)..:.|
00006670 0d 02 2a 42 dd f2 5f 28 65 25 2c 77 25 2c 74 79 |..*B.._(e%,w%,ty|
00006680 25 29 3a ea 70 25 3a 70 25 3d 4a 25 2b 36 34 3a |%):.p%:p%=J%+64:|
00006690 e7 74 79 25 3d 31 8c 21 4a 25 3d 65 25 3a 4a 25 |.ty%=1.!J%=e%:J%|
000066a0 21 34 3d 77 25 3a c8 99 26 34 30 30 43 45 2c 2c |!4=w%:..&400CE,,|
000066b0 4a 25 0d 02 2b 65 21 70 25 3d 65 25 3a 70 25 21 |J%..+e!p%=e%:p%!|
000066c0 34 3d 77 25 3a 70 25 21 38 3d 28 94 74 79 25 29 |4=w%:p%!8=(.ty%)|
000066d0 3c 3c 32 33 3a 70 25 21 26 43 3d 31 3c 3c 32 33 |<<23:p%!&C=1<<23|
000066e0 3a c8 99 26 34 30 30 43 44 2c 2c 70 25 3a e7 74 |:..&400CD,,p%:.t|
000066f0 79 25 3d 31 8c c8 99 26 34 30 30 44 31 2c 65 25 |y%=1...&400D1,e%|
00006700 2c 4a 25 21 38 2c 4a 25 21 26 43 2c 4a 25 21 31 |,J%!8,J%!&C,J%!1|
00006710 36 2c 4a 25 21 32 30 0d 02 2c 05 e1 0d 02 2d 4d |6,J%!20..,....-M|
00006720 dd a4 67 79 28 65 25 2c 77 25 29 3a ea 41 25 3a |..gy(e%,w%):.A%:|
00006730 21 4a 25 3d 65 25 3a 4a 25 21 34 3d 77 25 3a c8 |!J%=e%:J%!4=w%:.|
00006740 99 26 34 30 30 43 45 2c 2c 4a 25 3a e7 28 4a 25 |.&400CE,,J%:.(J%|
00006750 21 32 34 80 32 35 36 29 3e 30 8c 41 25 3d 4a 25 |!24.256)>0.A%=J%|
00006760 21 33 32 8b 41 25 3d 2d 31 0d 02 2e 07 3d 41 25 |!32.A%=-1....=A%|
00006770 0d 02 2f 3d dd f2 5a 28 65 25 2c 77 25 2c 74 79 |../=..Z(e%,w%,ty|
00006780 25 29 3a ea 41 25 3a 21 4a 25 3d 65 25 3a 4a 25 |%):.A%:!J%=e%:J%|
00006790 21 34 3d 77 25 3a 41 25 3d 31 3a e7 74 79 25 3d |!4=w%:A%=1:.ty%=|
000067a0 2d 31 8c 74 79 25 3d 31 3a 41 25 3d 30 0d 02 30 |-1.ty%=1:A%=0..0|
000067b0 2c 4a 25 21 38 3d 74 79 25 3c 3c 32 31 3a 4a 25 |,J%!8=ty%<<21:J%|
000067c0 21 26 43 3d 41 25 3c 3c 32 31 3a c8 99 26 34 30 |!&C=A%<<21:..&40|
000067d0 30 43 44 2c 2c 4a 25 3a e1 0d 02 31 3c dd a4 4d |0CD,,J%:...1<..M|
000067e0 28 65 25 2c 77 25 29 3a 21 4a 25 3d 65 25 3a 4a |(e%,w%):!J%=e%:J|
000067f0 25 21 34 3d 77 25 3a c8 99 26 34 30 30 43 45 2c |%!4=w%:..&400CE,|
00006800 2c 4a 25 3a 3d 2d 28 28 4a 25 21 32 34 3e 3e 32 |,J%:=-((J%!24>>2|
00006810 31 29 80 31 29 0d 02 32 3d dd f2 53 28 65 25 2c |1).1)..2=..S(e%,|
00006820 77 25 2c 74 79 25 29 3a ea 41 25 3a 41 25 3d 31 |w%,ty%):.A%:A%=1|
00006830 3a 21 4a 25 3d 65 25 3a 4a 25 21 34 3d 77 25 3a |:!J%=e%:J%!4=w%:|
00006840 e7 74 79 25 3d 2d 31 8c 74 79 25 3d 31 3a 41 25 |.ty%=-1.ty%=1:A%|
00006850 3d 30 0d 02 33 30 4a 25 21 38 3d 74 79 25 2a 28 |=0..30J%!8=ty%*(|
00006860 31 3c 3c 32 32 29 3a 4a 25 21 26 43 3d 41 25 3c |1<<22):J%!&C=A%<|
00006870 3c 32 32 3a c8 99 26 34 30 30 43 44 2c 2c 4a 25 |<22:..&400CD,,J%|
00006880 3a e1 0d 02 34 68 dd f2 41 28 65 25 2c 77 25 2c |:...4h..A(e%,w%,|
00006890 57 24 29 3a ea 50 25 2c 4c 25 3a 21 4a 25 3d 65 |W$):.P%,L%:!J%=e|
000068a0 25 3a 4a 25 21 34 3d 77 25 3a c8 99 26 34 30 30 |%:J%!4=w%:..&400|
000068b0 43 45 2c 2c 4a 25 3a e7 4a 25 21 32 34 80 28 31 |CE,,J%:.J%!24.(1|
000068c0 3c 3c 38 29 8c 50 25 3d 4a 25 21 32 38 3a 4c 25 |<<8).P%=J%!28:L%|
000068d0 3d 28 4a 25 21 33 36 29 2d 31 3a 8b 50 25 3d 4a |=(J%!36)-1:.P%=J|
000068e0 25 2b 32 38 3a 4c 25 3d 26 42 0d 02 35 2d 24 50 |%+28:L%=&B..5-$P|
000068f0 25 3d c0 57 24 2c 4c 25 29 3a 4a 25 21 38 3d 30 |%=.W$,L%):J%!8=0|
00006900 3a 4a 25 21 26 43 3d 30 3a c8 99 26 34 30 30 43 |:J%!&C=0:..&400C|
00006910 44 2c 2c 4a 25 3a e1 0d 02 36 57 dd a4 5a 28 65 |D,,J%:...6W..Z(e|
00006920 25 2c 77 25 29 3a ea 41 24 3a 21 4a 25 3d 65 25 |%,w%):.A$:!J%=e%|
00006930 3a 4a 25 21 34 3d 77 25 3a c8 99 26 34 30 30 43 |:J%!4=w%:..&400C|
00006940 45 2c 2c 4a 25 3a e7 28 4a 25 21 32 34 80 32 35 |E,,J%:.(J%!24.25|
00006950 36 29 3e 30 8c 41 24 3d a4 4e 28 4a 25 21 32 38 |6)>0.A$=.N(J%!28|
00006960 29 8b 41 24 3d a4 4e 28 4a 25 2b 32 38 29 0d 02 |).A$=.N(J%+28)..|
00006970 37 07 3d 41 24 0d 02 38 4d dd a4 69 79 28 65 25 |7.=A$..8M..iy(e%|
00006980 2c 77 25 29 3a ea 41 25 3a 21 4a 25 3d 65 25 3a |,w%):.A%:!J%=e%:|
00006990 4a 25 21 34 3d 77 25 3a c8 99 26 34 30 30 43 45 |J%!4=w%:..&400CE|
000069a0 2c 2c 4a 25 3a e7 28 4a 25 21 32 34 80 32 35 36 |,,J%:.(J%!24.256|
000069b0 29 3e 30 8c 41 25 3d 4a 25 21 32 38 8b 41 25 3d |)>0.A%=J%!28.A%=|
000069c0 2d 31 0d 02 39 07 3d 41 25 0d 02 3a 62 dd f2 79 |-1..9.=A%..:b..y|
000069d0 79 28 4d 79 25 2c 4c 25 2c 48 25 29 3a 4d 79 25 |y(My%,L%,H%):My%|
000069e0 2b 3d 34 2b 32 34 2a 4c 25 3a f5 4d 79 25 2b 3d |+=4+24*L%:.My%+=|
000069f0 32 34 3a 4d 79 25 21 38 3d 4d 79 25 21 38 84 38 |24:My%!8=My%!8.8|
00006a00 3a 4c 25 2b 3d 31 3a fd 28 28 4c 25 3e 48 25 29 |:L%+=1:.((L%>H%)|
00006a10 80 28 48 25 3c 3e 2d 31 29 29 84 28 28 21 4d 79 |.(H%<>-1)).((!My|
00006a20 25 80 26 38 30 29 3e 30 29 3a e1 0d 02 3b 60 dd |%.&80)>0):...;`.|
00006a30 f2 48 28 4d 79 25 2c 4c 25 2c 48 25 29 3a 4d 79 |.H(My%,L%,H%):My|
00006a40 25 2b 3d 34 2b 32 34 2a 4c 25 3a f5 4d 79 25 2b |%+=4+24*L%:.My%+|
00006a50 3d 32 34 3a 21 4d 79 25 3d 21 4d 79 25 80 ac 31 |=24:!My%=!My%..1|
00006a60 3a 4c 25 2b 3d 31 3a fd 28 28 4c 25 3e 48 25 29 |:L%+=1:.((L%>H%)|
00006a70 80 28 48 25 3c 3e 2d 31 29 29 84 28 28 21 4d 79 |.(H%<>-1)).((!My|
00006a80 25 80 26 38 30 29 3e 30 29 3a e1 0d 02 3c 5d dd |%.&80)>0):...<].|
00006a90 a4 43 79 28 73 24 29 3a ea 4d 79 25 2c 5f 75 25 |.Cy(s$):.My%,_u%|
00006aa0 2c 53 79 25 3a 4d 79 25 3d a4 57 79 28 73 24 2b |,Sy%:My%=.Wy(s$+|
00006ab0 22 5c 30 5c 31 5c 32 5c 33 5c 34 5c 35 5c 36 5c |"\0\1\2\3\4\5\6\|
00006ac0 37 5c 38 5c 39 5c 31 30 5c 31 31 5c 31 32 5c 31 |7\8\9\10\11\12\1|
00006ad0 33 5c 31 34 5c 31 35 22 29 3a e3 53 79 25 3d 30 |3\14\15"):.Sy%=0|
00006ae0 b8 26 46 3a c8 8e b9 ca 0d 02 3d 2b c9 53 79 25 |.&F:......=+.Sy%|
00006af0 3c 34 2c 53 79 25 3d 39 2c 53 79 25 3d 26 43 2c |<4,Sy%=9,Sy%=&C,|
00006b00 53 79 25 3d 26 45 2c 53 79 25 3d 26 46 3a 5f 75 |Sy%=&E,Sy%=&F:_u|
00006b10 25 3d 37 0d 02 3e 0a 7f 5f 75 25 3d 30 0d 02 3f |%=7..>.._u%=0..?|
00006b20 35 cb 3a 4d 79 25 3f 28 33 39 2b 53 79 25 2a 32 |5.:My%?(39+Sy%*2|
00006b30 34 29 3d 53 79 25 2a 31 36 2b 5f 75 25 3a ed 3a |4)=Sy%*16+_u%:.:|
00006b40 f2 79 79 28 4d 79 25 2c 30 2c 2d 31 29 3a 3d 4d |.yy(My%,0,-1):=M|
00006b50 79 25 0d 02 40 d5 dd a4 57 79 28 41 24 29 3a ea |y%..@...Wy(A$):.|
00006b60 41 25 2c 42 25 2c 4c 25 2c 5a 24 2c 49 25 3a 41 |A%,B%,L%,Z$,I%:A|
00006b70 24 2b 3d 22 5c 22 3a de 41 25 34 2a a4 6e 79 20 |$+="\":.A%4*.ny |
00006b80 28 41 24 29 2a 32 34 3a 42 25 3d 41 25 2b 34 3a |(A$)*24:B%=A%+4:|
00006b90 5a 24 3d c0 41 24 2c a7 41 24 2c 22 5c 22 29 2d |Z$=.A$,.A$,"\")-|
00006ba0 31 29 3a 24 41 25 3d 5a 24 3a 41 25 21 26 43 3d |1):$A%=Z$:A%!&C=|
00006bb0 26 37 30 32 30 37 3a 41 25 21 32 30 3d 34 34 3a |&70207:A%!20=44:|
00006bc0 41 25 21 32 34 3d 30 3a 4c 25 3d a9 5a 24 3a 41 |A%!24=0:L%=.Z$:A|
00006bd0 24 3d c1 41 24 2c a7 41 24 2c 22 5c 22 29 2b 31 |$=.A$,.A$,"\")+1|
00006be0 29 3a c8 95 a7 41 24 2c 22 5c 22 29 3a 5a 24 3d |):...A$,"\"):Z$=|
00006bf0 c0 41 24 2c a7 41 24 2c 22 5c 22 29 2d 31 29 3a |.A$,.A$,"\")-1):|
00006c00 42 25 2b 3d 32 34 3a 21 42 25 3d a4 78 79 28 5a |B%+=24:!B%=.xy(Z|
00006c10 24 29 3a 42 25 21 34 3d 30 3a 42 25 21 38 3d 26 |$):B%!4=0:B%!8=&|
00006c20 37 30 30 30 30 32 31 0d 02 41 36 e7 a7 5a 24 2c |7000021..A6..Z$,|
00006c30 22 3e 22 29 8c 42 25 21 34 3d bb c1 5a 24 2c a7 |">").B%!4=..Z$,.|
00006c40 5a 24 2c 22 3e 22 29 2b 31 29 3a 5a 24 3d c0 5a |Z$,">")+1):Z$=.Z|
00006c50 24 2c a7 5a 24 2c 22 3e 22 29 2d 31 29 0d 02 42 |$,.Z$,">")-1)..B|
00006c60 51 e7 a9 5a 24 3e 26 42 8c de 49 25 a9 5a 24 2b |Q..Z$>&B..I%.Z$+|
00006c70 31 3a 24 49 25 3d 5a 24 3a 42 25 21 38 3d 42 25 |1:$I%=Z$:B%!8=B%|
00006c80 21 38 84 32 35 36 3a 42 25 21 26 43 3d 49 25 3a |!8.256:B%!&C=I%:|
00006c90 42 25 21 31 36 3d 30 3a 42 25 21 32 30 3d 49 25 |B%!16=0:B%!20=I%|
00006ca0 2b 31 8b 24 28 42 25 2b 26 43 29 3d 5a 24 0d 02 |+1.$(B%+&C)=Z$..|
00006cb0 43 12 e7 a9 5a 24 3e 4c 25 8c 4c 25 3d a9 5a 24 |C...Z$>L%.L%=.Z$|
00006cc0 0d 02 44 37 41 24 3d c1 41 24 2c a7 41 24 2c 22 |..D7A$=.A$,.A$,"|
00006cd0 5c 22 29 2b 31 29 3a ce 3a 21 42 25 3d 21 42 25 |\")+1):.:!B%=!B%|
00006ce0 84 26 38 30 3a 41 25 21 31 36 3d 4c 25 2a 31 36 |.&80:A%!16=L%*16|
00006cf0 2b 31 36 3a 3d 41 25 0d 02 45 f2 dd a4 43 28 73 |+16:=A%..E...C(s|
00006d00 24 2c 68 24 2c 4c 25 2c 48 25 29 3a ea 4d 25 2c |$,h$,L%,H%):.M%,|
00006d10 41 25 2c 43 25 2c 44 25 2c 47 6c 25 2c 41 24 3a |A%,C%,D%,Gl%,A$:|
00006d20 de 4d 25 32 38 2b 32 34 2a 20 28 48 25 2d 4c 25 |.M%28+24* (H%-L%|
00006d30 2b 31 29 3a 21 4d 25 3d a4 67 28 73 24 29 3a 4d |+1):!M%=.g(s$):M|
00006d40 25 21 34 3d 30 3a 4d 25 21 38 3d 30 3a 47 6c 25 |%!4=0:M%!8=0:Gl%|
00006d50 3d a9 a4 41 28 73 24 29 3a 4d 25 21 26 43 3d 26 |=..A(s$):M%!&C=&|
00006d60 37 30 32 30 37 3a 4d 25 21 32 30 3d 34 34 3a 4d |70207:M%!20=44:M|
00006d70 25 21 32 34 3d 30 3a 41 25 3d 4d 25 2b 34 3a e3 |%!24=0:A%=M%+4:.|
00006d80 43 25 3d 4c 25 b8 48 25 3a 41 25 2b 3d 32 34 3a |C%=L%.H%:A%+=24:|
00006d90 21 41 25 3d 30 3a 41 25 21 34 3d 30 3a 41 25 21 |!A%=0:A%!4=0:A%!|
00006da0 38 3d 26 37 30 30 30 31 32 31 3a 41 25 21 26 43 |8=&7000121:A%!&C|
00006db0 3d a4 67 28 68 24 2b c3 43 25 29 3a 41 25 21 31 |=.g(h$+.C%):A%!1|
00006dc0 36 3d 30 3a 41 25 21 32 30 3d 30 3a 44 25 3d a9 |6=0:A%!20=0:D%=.|
00006dd0 a4 41 28 68 24 2b c3 43 25 29 3a e7 44 25 3e 47 |.A(h$+.C%):.D%>G|
00006de0 6c 25 8c 47 6c 25 3d 44 25 0d 02 46 2a ed 3a 21 |l%.Gl%=D%..F*.:!|
00006df0 41 25 2b 3d 26 38 30 3a 4d 25 21 32 38 2b 3d 32 |A%+=&80:M%!28+=2|
00006e00 35 36 3a 4d 25 21 31 36 3d 47 6c 25 2a 31 36 3a |56:M%!16=Gl%*16:|
00006e10 3d 4d 25 0d 02 47 26 dd f2 7a 28 4d 25 2c 49 25 |=M%..G&..z(M%,I%|
00006e20 2c 53 25 29 3a 4d 25 21 28 32 38 2b 32 34 2a 49 |,S%):M%!(28+24*I|
00006e30 25 2b 34 29 3d 53 25 3a e1 0d 02 48 1e dd a4 78 |%+4)=S%:...H...x|
00006e40 79 28 f8 5a 24 29 3a ea 41 25 2c 46 25 3a f5 3a |y(.Z$):.A%,F%:.:|
00006e50 c8 8e bd 97 5a 24 ca 0d 02 49 18 c9 22 80 22 3a |....Z$...I..".":|
00006e60 41 25 2b 3d 31 3a 5a 24 3d c1 5a 24 2c 32 29 0d |A%+=1:Z$=.Z$,2).|
00006e70 02 4a 18 c9 22 5f 22 3a 41 25 2b 3d 32 3a 5a 24 |.J.."_":A%+=2:Z$|
00006e80 3d c1 5a 24 2c 32 29 0d 02 4b 18 c9 22 2a 22 3a |=.Z$,2)..K.."*":|
00006e90 41 25 2b 3d 38 3a 5a 24 3d c1 5a 24 2c 32 29 0d |A%+=8:Z$=.Z$,2).|
00006ea0 02 4c 0a 7f 46 25 3d 2d 31 0d 02 4d 0d cb 3a fd |.L..F%=-1..M..:.|
00006eb0 46 25 3a 3d 41 25 0d 02 4e 3a dd a4 6e 79 28 41 |F%:=A%..N:..ny(A|
00006ec0 24 29 3a ea 41 25 3a c8 95 a7 41 24 2c 22 5c 22 |$):.A%:...A$,"\"|
00006ed0 29 3a 41 25 2b 3d 31 3a 41 24 3d c1 41 24 2c a7 |):A%+=1:A$=.A$,.|
00006ee0 41 24 2c 22 5c 22 29 2b 31 29 3a ce 3a 3d 41 25 |A$,"\")+1):.:=A%|
00006ef0 0d 02 4f 37 dd a4 62 79 28 41 25 29 3a ea 48 25 |..O7..by(A%):.H%|
00006f00 3a 41 25 2b 3d 34 3a f5 41 25 2b 3d 32 34 3a 48 |:A%+=4:.A%+=24:H|
00006f10 25 2b 3d 34 34 3a e7 28 21 41 25 80 32 29 3e 30 |%+=44:.(!A%.2)>0|
00006f20 8c 48 25 2b 3d 32 34 0d 02 50 17 fd 28 21 41 25 |.H%+=24..P..(!A%|
00006f30 80 26 38 30 29 3e 30 3a 3d 48 25 2b 39 36 0d 02 |.&80)>0:=H%+96..|
00006f40 51 9b dd a4 70 79 28 4d 79 25 2c 54 61 25 2c 57 |Q...py(My%,Ta%,W|
00006f50 24 2c 75 69 25 2c 62 24 29 3a ea 70 6c 25 2c 67 |$,ui%,b$):.pl%,g|
00006f60 5f 25 3a de 70 6c 25 75 69 25 2b 31 2c 67 5f 25 |_%:.pl%ui%+1,g_%|
00006f70 a9 20 28 62 24 29 2b 31 3a 24 70 6c 25 3d 57 24 |. (b$)+1:$pl%=W$|
00006f80 3a 24 67 5f 25 3d 62 24 3a 4d 79 25 2b 3d 32 38 |:$g_%=b$:My%+=28|
00006f90 2b 32 34 2a 54 61 25 3a 21 4d 79 25 3d 21 4d 79 |+24*Ta%:!My%=!My|
00006fa0 25 84 34 3a 4d 79 25 21 38 3d 4d 79 25 21 38 84 |%.4:My%!8=My%!8.|
00006fb0 32 35 36 3a 4d 79 25 21 26 43 3d 70 6c 25 3a 4d |256:My%!&C=pl%:M|
00006fc0 79 25 21 31 36 3d 67 5f 25 3a 4d 79 25 21 32 30 |y%!16=g_%:My%!20|
00006fd0 3d 75 69 25 3a 3d 70 6c 25 0d 02 52 64 dd a4 6b |=ui%:=pl%..Rd..k|
00006fe0 28 4d 79 25 2c 79 24 29 3a ea 41 25 2c 42 25 3a |(My%,y$):.A%,B%:|
00006ff0 42 25 3d 4d 79 25 2b 32 38 3a c8 95 28 79 24 3c |B%=My%+28:..(y$<|
00007000 3e a4 57 28 4d 79 25 2c 41 25 29 29 80 28 21 42 |>.W(My%,A%)).(!B|
00007010 25 80 26 38 30 29 3d 30 3a 41 25 2b 3d 31 3a 42 |%.&80)=0:A%+=1:B|
00007020 25 2b 3d 32 34 3a ce 3a e7 79 24 3c 3e a4 57 28 |%+=24:.:.y$<>.W(|
00007030 4d 79 25 2c 41 25 29 8c 41 25 3d 2d 31 0d 02 53 |My%,A%).A%=-1..S|
00007040 07 3d 41 25 0d 02 54 19 dd f2 4b 28 4d 25 2c 49 |.=A%..T...K(M%,I|
00007050 25 2c 46 25 29 3a e7 46 25 3c 3e 30 8c 0d 02 55 |%,F%):.F%<>0...U|
00007060 27 4d 25 21 28 33 36 2b 32 34 2a 49 25 29 3d 4d |'M%!(36+24*I%)=M|
00007070 25 21 28 33 36 2b 32 34 2a 49 25 29 84 28 31 3c |%!(36+24*I%).(1<|
00007080 3c 32 32 29 0d 02 56 29 cc 4d 25 21 28 33 36 2b |<22)..V).M%!(36+|
00007090 32 34 2a 49 25 29 3d 4d 25 21 28 33 36 2b 32 34 |24*I%)=M%!(36+24|
000070a0 2a 49 25 29 80 ac 28 31 3c 3c 32 32 29 0d 02 57 |*I%)..(1<<22)..W|
000070b0 07 cd 3a e1 0d 02 58 3b dd a4 57 28 4d 25 2c 49 |..:...X;..W(M%,I|
000070c0 25 29 3a 4d 25 2b 3d 32 38 2b 32 34 2a 49 25 3a |%):M%+=28+24*I%:|
000070d0 e7 28 4d 25 21 38 80 32 35 36 29 3e 30 8c 4d 25 |.(M%!8.256)>0.M%|
000070e0 3d 4d 25 21 26 43 8b 4d 25 3d 4d 25 2b 26 43 0d |=M%!&C.M%=M%+&C.|
000070f0 02 59 0b 3d a4 4e 28 4d 25 29 0d 02 5a 57 dd f2 |.Y.=.N(M%)..ZW..|
00007100 4a 28 4d 25 2c 49 25 2c 46 25 29 3a e7 46 25 3c |J(M%,I%,F%):.F%<|
00007110 3e 30 8c 4d 25 21 28 32 38 2b 32 34 2a 49 25 29 |>0.M%!(28+24*I%)|
00007120 3d 4d 25 21 28 32 38 2b 32 34 2a 49 25 29 84 31 |=M%!(28+24*I%).1|
00007130 8b 4d 25 21 28 32 38 2b 32 34 2a 49 25 29 3d 4d |.M%!(28+24*I%)=M|
00007140 25 21 28 32 38 2b 32 34 2a 49 25 29 80 ac 28 31 |%!(28+24*I%)..(1|
00007150 29 0d 02 5b 05 e1 0d 02 5c 1e dd a4 53 5f 28 4d |)..[....\...S_(M|
00007160 25 29 3a e7 4d 25 21 32 38 3e 26 38 30 8c 4d 25 |%):.M%!28>&80.M%|
00007170 3d 21 4d 25 0d 02 5d 0b 3d a4 4e 28 4d 25 29 0d |=!M%..].=.N(M%).|
00007180 02 5e 58 dd f2 63 5f 28 4d 25 2c 49 25 2c 46 25 |.^X..c_(M%,I%,F%|
00007190 29 3a e7 46 25 3c 3e 30 8c 4d 25 21 28 32 38 2b |):.F%<>0.M%!(28+|
000071a0 32 34 2a 49 25 29 3d 4d 25 21 28 32 38 2b 32 34 |24*I%)=M%!(28+24|
000071b0 2a 49 25 29 84 32 8b 4d 25 21 28 32 38 2b 32 34 |*I%).2.M%!(28+24|
000071c0 2a 49 25 29 3d 4d 25 21 28 32 38 2b 32 34 2a 49 |*I%)=M%!(28+24*I|
000071d0 25 29 80 ac 28 32 29 0d 02 5f 05 e1 0d 02 60 13 |%)..(2).._....`.|
000071e0 dd a4 61 28 41 25 29 3d 41 25 2d 41 25 83 34 0d |..a(A%)=A%-A%.4.|
000071f0 02 61 25 dd a4 47 79 3a c8 99 26 34 30 30 43 46 |.a%..Gy:..&400CF|
00007200 2c 2c 4a 25 3a 3d 28 28 28 4a 25 21 38 29 80 31 |,,J%:=(((J%!8).1|
00007210 29 3d 31 29 0d 02 62 2a dd a4 79 3a ea 41 25 3a |)=1)..b*..y:.A%:|
00007220 c8 99 36 2c 26 41 31 2c 26 44 43 b8 2c 2c 41 25 |..6,&A1,&DC.,,A%|
00007230 3a 3d 28 41 25 80 26 38 30 29 3d 26 38 30 0d 02 |:=(A%.&80)=&80..|
00007240 63 27 dd f2 53 79 28 46 25 29 3a ea 41 25 3a c8 |c'..Sy(F%):.A%:.|
00007250 99 36 2c 26 41 31 2c 26 44 43 b8 2c 2c 41 25 3a |.6,&A1,&DC.,,A%:|
00007260 c8 8e 46 25 ca 0d 02 64 11 c9 30 3a 41 25 3d 41 |..F%...d..0:A%=A|
00007270 25 80 ac 26 38 30 0d 02 65 10 c9 31 3a 41 25 3d |%..&80..e..1:A%=|
00007280 41 25 84 26 38 30 0d 02 66 11 c9 2d 31 3a 41 25 |A%.&80..f..-1:A%|
00007290 3d 41 25 82 26 38 30 0d 02 67 16 cb 3a c8 99 36 |=A%.&80..g..:..6|
000072a0 2c 26 41 32 2c 26 44 43 2c 41 25 3a e1 0d 02 68 |,&A2,&DC,A%:...h|
000072b0 37 dd a4 65 3a ea 41 25 2c 42 25 3a c8 99 35 33 |7..e:.A%,B%:..53|
000072c0 2c 2d 31 2c 26 43 b8 2c 2c 41 25 3a c8 99 35 33 |,-1,&C.,,A%:..53|
000072d0 2c 2d 31 2c 35 b8 2c 2c 42 25 3a 3d 28 41 25 3c |,-1,5.,,B%:=(A%<|
000072e0 3c 42 25 29 0d 02 69 27 dd a4 60 79 28 4d 25 29 |<B%)..i'..`y(M%)|
000072f0 3a ea 41 25 3a c8 99 35 33 2c 4d 25 2c 35 b8 2c |:.A%:..53,M%,5.,|
00007300 2c 41 25 3a 3d 28 41 25 3d 31 29 0d 02 6a 48 dd |,A%:=(A%=1)..jH.|
00007310 a4 77 28 48 25 2c 53 25 2c 46 25 29 3a ea 50 25 |.w(H%,S%,F%):.P%|
00007320 2c 45 25 2c 56 25 2c 4c 25 2c 54 25 3a c8 99 26 |,E%,V%,L%,T%:..&|
00007330 32 30 30 31 44 2c 32 2c 48 25 2c 2c 53 25 b8 45 |2001D,2,H%,,S%.E|
00007340 25 2c 2c 50 25 3b 56 25 3a e7 28 56 25 80 31 29 |%,,P%;V%:.(V%.1)|
00007350 3d 31 8c 0d 02 6b 08 e7 46 25 8c 0d 02 6c 3d 50 |=1...k..F%...l=P|
00007360 25 3d a4 4a 79 3a f2 5a 79 28 48 25 2c 28 53 25 |%=.Jy:.Zy(H%,(S%|
00007370 81 50 25 29 2a 50 25 2d 50 25 2a 28 28 53 25 83 |.P%)*P%-P%*((S%.|
00007380 50 25 29 3e 30 29 2c b9 29 3a 50 25 3d a4 77 28 |P%)>0),.):P%=.w(|
00007390 48 25 2c 53 25 2c a3 29 0d 02 6d 0c cc c8 99 34 |H%,S%,.)..m....4|
000073a0 33 2c 45 25 0d 02 6e 05 cd 0d 02 6f 09 cd 3a 3d |3,E%..n....o..:=|
000073b0 50 25 0d 02 70 57 dd f2 61 75 28 48 25 2c f8 42 |P%..pW..au(H%,.B|
000073c0 25 2c 53 25 2c 46 25 29 3a ea 4c 25 2c 45 25 2c |%,S%,F%):.L%,E%,|
000073d0 56 25 2c 54 25 2c 50 25 3a c8 99 26 32 30 30 31 |V%,T%,P%:..&2001|
000073e0 44 2c 34 2c 48 25 2c 42 25 2c 53 25 b8 45 25 2c |D,4,H%,B%,S%.E%,|
000073f0 2c 42 25 3b 56 25 3a 56 25 3d 28 28 56 25 80 31 |,B%;V%:V%=((V%.1|
00007400 29 3d 31 29 3a c8 8e b9 ca 0d 02 71 13 c9 56 25 |)=1):......q..V%|
00007410 80 ac 46 25 3a c8 99 34 33 2c 45 25 0d 02 72 2e |..F%:..43,E%..r.|
00007420 c9 56 25 80 46 25 80 28 53 25 3e 30 29 3a f2 5a |.V%.F%.(S%>0):.Z|
00007430 79 28 48 25 2c 53 25 2c b9 29 3a f2 61 75 28 48 |y(H%,S%,.):.au(H|
00007440 25 2c 42 25 2c 53 25 2c b9 29 0d 02 73 11 c9 56 |%,B%,S%,.)..s..V|
00007450 25 80 46 25 80 28 53 25 3c 30 29 0d 02 74 1f c9 |%.F%.(S%<0)..t..|
00007460 ac 56 25 80 46 25 80 28 53 25 3c 30 29 3a f2 5a |.V%.F%.(S%<0):.Z|
00007470 79 28 48 25 2c 2d 31 2c b9 29 0d 02 75 07 cb 3a |y(H%,-1,.)..u..:|
00007480 e1 0d 02 76 3f dd f2 44 79 28 48 25 2c 42 25 2c |...v?..Dy(H%,B%,|
00007490 46 25 29 3a ea 41 25 2c 74 79 25 3a c8 99 32 39 |F%):.A%,ty%:..29|
000074a0 2c 33 2c 48 25 2c 42 25 b8 41 25 3b 74 79 25 3a |,3,H%,B%.A%;ty%:|
000074b0 e7 46 25 8c f2 5a 79 28 48 25 2c 2d 31 2c b9 29 |.F%..Zy(H%,-1,.)|
000074c0 0d 02 77 05 e1 0d 02 78 1b dd f2 5a 79 28 48 25 |..w....x...Zy(H%|
000074d0 2c 53 25 2c 46 25 29 3a ea 50 25 3a e7 46 25 8c |,S%,F%):.P%:.F%.|
000074e0 0d 02 79 0a e7 53 25 3c 30 8c 0d 02 7a 9b c8 99 |..y..S%<0...z...|
000074f0 26 32 30 30 31 44 2c 35 2c 48 25 2c 2c 2d 33 32 |&2001D,5,H%,,-32|
00007500 2a 26 34 30 30 2a 26 34 30 30 3a 53 25 3d 48 25 |*&400*&400:S%=H%|
00007510 21 26 43 2b 48 25 2d 26 38 30 30 30 3a 50 25 3d |!&C+H%-&8000:P%=|
00007520 a4 4a 79 3a c8 99 26 34 30 30 45 43 2c 2d 31 2c |.Jy:..&400EC,-1,|
00007530 2d 31 b8 46 25 3a 46 25 3d a4 6c 28 28 28 53 25 |-1.F%:F%=.l(((S%|
00007540 81 50 25 29 2a 50 25 2d 50 25 2a 28 28 53 25 83 |.P%)*P%-P%*((S%.|
00007550 50 25 29 3e 30 29 29 2d 46 25 29 3a c8 99 32 39 |P%)>0))-F%):..29|
00007560 2c 35 2c 48 25 2c 2c 28 28 53 25 81 50 25 29 2a |,5,H%,,((S%.P%)*|
00007570 50 25 2d 50 25 2a 28 28 53 25 83 50 25 29 3e 30 |P%-P%*((S%.P%)>0|
00007580 29 29 2d 53 25 0d 02 7b 28 cc 3a 45 25 3d 52 75 |))-S%..{(.:E%=Ru|
00007590 25 3a 46 25 3d a4 6c 28 53 25 29 3a c8 99 32 39 |%:F%=.l(S%):..29|
000075a0 2c 35 2c 48 25 2c 2c 52 75 25 2d 45 25 0d 02 7c |,5,H%,,Ru%-E%..||
000075b0 05 cd 0d 02 7d 12 cc c8 99 32 39 2c 35 2c 48 25 |....}....29,5,H%|
000075c0 2c 2c 53 25 0d 02 7e 07 cd 3a e1 0d 02 7f 1d dd |,,S%..~..:......|
000075d0 f2 71 5f 28 48 25 2c 53 25 29 3a e7 53 25 3d 2d |.q_(H%,S%):.S%=-|
000075e0 31 8c 53 25 3d 52 75 25 0d 02 80 13 c8 99 32 39 |1.S%=Ru%......29|
000075f0 2c 30 2c 48 25 2c 2c 53 25 3a e1 0d 02 81 27 dd |,0,H%,,S%:....'.|
00007600 f2 6e 4a 3a c8 99 26 36 31 35 30 34 2c 53 5f 25 |.nJ:..&61504,S_%|
00007610 3a c8 99 26 32 30 30 31 45 2c 37 2c 2c 53 5f 25 |:..&2001E,7,,S_%|
00007620 3a e1 0d 02 82 58 dd f2 46 4a 28 6a 24 29 3a ea |:....X..FJ(j$):.|
00007630 46 25 3a c8 99 26 32 30 30 31 45 2c 36 2c 2c 2c |F%:..&2001E,6,,,|
00007640 31 37 2b a9 6a 24 b8 2c 2c 53 5f 25 3b 46 25 3a |17+.j$.,,S_%;F%:|
00007650 e7 46 25 80 31 8c 85 32 2c 22 4e 6f 74 20 65 6e |.F%.1..2,"Not en|
00007660 6f 75 67 68 20 6d 65 6d 6f 72 79 20 66 6f 72 20 |ough memory for |
00007670 6d 65 73 73 61 67 65 73 2e 22 0d 02 83 28 24 28 |messages."...($(|
00007680 53 5f 25 2b 31 36 29 3d 6a 24 3a c8 99 26 34 31 |S_%+16)=j$:..&41|
00007690 35 30 31 2c 53 5f 25 2c 53 5f 25 2b 31 36 2c 30 |501,S_%,S_%+16,0|
000076a0 3a e1 0d 02 84 6a dd a4 41 28 55 24 29 3a ea 46 |:....j..A(U$):.F|
000076b0 25 2c 4c 25 3a c8 99 26 36 31 35 30 32 2c 53 5f |%,L%:..&61502,S_|
000076c0 25 2c 55 24 2c 4a 25 2c 32 35 36 b8 2c 2c 2c 4c |%,U$,J%,256.,,,L|
000076d0 25 3b 46 25 3a e7 46 25 80 31 85 32 2c 22 43 61 |%;F%:.F%.1.2,"Ca|
000076e0 6e 27 74 20 67 65 74 20 6d 65 73 73 61 67 65 20 |n't get message |
000076f0 27 22 2b 55 24 2b 22 27 20 66 72 6f 6d 20 4d 65 |'"+U$+"' from Me|
00007700 73 73 61 67 65 73 20 66 69 6c 65 22 0d 02 85 11 |ssages file"....|
00007710 4a 25 3f 4c 25 3d 26 44 3a 3d 24 4a 25 0d 02 86 |J%?L%=&D:=$J%...|
00007720 64 dd a4 67 28 55 24 29 3a ea 46 25 2c 50 25 3a |d..g(U$):.F%,P%:|
00007730 c8 99 26 36 31 35 30 32 2c 53 5f 25 2c 55 24 2c |..&61502,S_%,U$,|
00007740 30 b8 2c 2c 50 25 3b 46 25 3a e7 46 25 80 31 85 |0.,,P%;F%:.F%.1.|
00007750 32 2c 22 43 61 6e 27 74 20 67 65 74 20 6d 65 73 |2,"Can't get mes|
00007760 73 61 67 65 20 27 22 2b 55 24 2b 22 27 20 66 72 |sage '"+U$+"' fr|
00007770 6f 6d 20 4d 65 73 73 61 67 65 73 20 66 69 6c 65 |om Messages file|
00007780 22 0d 02 87 07 3d 50 25 0d 02 88 82 dd a4 4f 28 |"....=P%......O(|
00007790 55 24 2c 41 24 2c 5a 24 2c 43 24 2c 6c 24 29 3a |U$,A$,Z$,C$,l$):|
000077a0 ea 46 25 2c 4c 25 3a c8 99 26 36 31 35 30 32 2c |.F%,L%:..&61502,|
000077b0 53 5f 25 2c 55 24 2c 4a 25 2c 32 35 36 2c 41 24 |S_%,U$,J%,256,A$|
000077c0 2c 5a 24 2c 43 24 2c 6c 24 b8 2c 2c 2c 4c 25 3b |,Z$,C$,l$.,,,L%;|
000077d0 46 25 3a e7 46 25 80 31 85 32 2c 22 43 61 6e 27 |F%:.F%.1.2,"Can'|
000077e0 74 20 67 65 74 20 6d 65 73 73 61 67 65 20 27 22 |t get message '"|
000077f0 2b 55 24 2b 22 27 20 66 72 6f 6d 20 4d 65 73 73 |+U$+"' from Mess|
00007800 61 67 65 73 20 66 69 6c 65 22 0d 02 89 11 4a 25 |ages file"....J%|
00007810 3f 4c 25 3d 26 44 3a 3d 24 4a 25 0d 02 8a 44 dd |?L%=&D:=$J%...D.|
00007820 a4 4f 79 28 55 24 2c 4c 25 2c 48 25 2c 5a 24 2c |.Oy(U$,L%,H%,Z$,|
00007830 41 24 29 3a ea 4d 24 2c 41 25 3a e3 41 25 3d 4c |A$):.M$,A%:.A%=L|
00007840 25 b8 48 25 3a 4d 24 2b 3d 5a 24 2b a4 41 28 55 |%.H%:M$+=Z$+.A(U|
00007850 24 2b c3 41 25 29 2b 41 24 3a ed 3a 3d 4d 24 0d |$+.A%)+A$:.:=M$.|
00007860 02 8b 31 dd a4 72 28 5f 25 2c 51 25 2c 6e 6c 25 |..1..r(_%,Q%,nl%|
00007870 2c 75 6c 25 2c 73 25 2c 62 25 29 3a e7 73 25 3c |,ul%,s%,b%):.s%<|
00007880 30 8c 6e 6c 25 2b 3d 73 25 3a 73 25 3d 2d 73 25 |0.nl%+=s%:s%=-s%|
00007890 0d 02 8c 18 e7 62 25 3c 30 8c 75 6c 25 2b 3d 62 |.....b%<0.ul%+=b|
000078a0 25 3a 62 25 3d 2d 62 25 0d 02 8d 38 3d 28 28 5f |%:b%=-b%...8=((_|
000078b0 25 3e 3d 6e 6c 25 29 80 28 5f 25 3c 3d 28 6e 6c |%>=nl%).(_%<=(nl|
000078c0 25 2b 73 25 29 29 80 28 51 25 3e 3d 75 6c 25 29 |%+s%)).(Q%>=ul%)|
000078d0 80 28 51 25 3c 3d 28 75 6c 25 2b 62 25 29 29 29 |.(Q%<=(ul%+b%)))|
000078e0 0d 02 8e 18 dd a4 4a 79 3a ea 50 25 3a c8 99 38 |......Jy:.P%:..8|
000078f0 31 b8 50 25 3a 3d 50 25 0d 02 8f 4e dd a4 77 79 |1.P%:=P%...N..wy|
00007900 3a ea 49 24 2c 49 25 3a c8 99 31 36 b8 49 24 3a |:.I$,I%:..16.I$:|
00007910 49 25 3d a7 49 24 2c 22 20 2d 71 75 69 74 20 22 |I%=.I$," -quit "|
00007920 29 3a e7 49 25 8c 49 24 3d c1 49 24 2c a7 49 24 |):.I%.I$=.I$,.I$|
00007930 2c 22 20 22 2c 49 25 2b a9 22 20 2d 71 75 69 74 |," ",I%+." -quit|
00007940 20 22 29 2b 31 29 0d 02 90 07 3d 49 24 0d 02 91 | ")+1)....=I$...|
00007950 38 dd a4 74 79 28 41 24 29 3a ea 4c 25 3a c8 99 |8..ty(A$):.L%:..|
00007960 33 35 2c 41 24 2c 4a 25 2c 26 46 46 2c 30 2c 33 |35,A$,J%,&FF,0,3|
00007970 b8 2c 2c 4c 25 3a 4a 25 3f 4c 25 3d 30 3a 3d a4 |.,,L%:J%?L%=0:=.|
00007980 4e 28 4a 25 29 0d 02 92 59 dd a4 74 28 41 24 29 |N(J%)...Y..t(A$)|
00007990 3a ea 4c 25 2c 46 25 3a c8 99 26 32 30 30 32 33 |:.L%,F%:..&20023|
000079a0 2c 41 24 2c 4a 25 2c 26 46 46 2c 30 2c 33 b8 2c |,A$,J%,&FF,0,3.,|
000079b0 2c 4c 25 3b 46 25 3a e7 28 46 25 80 31 29 3d 30 |,L%;F%:.(F%.1)=0|
000079c0 8c 4a 25 3f 4c 25 3d 30 3a e7 a4 4e 28 4a 25 29 |.J%?L%=0:..N(J%)|
000079d0 3c 3e 22 22 8c 46 25 3d b9 8b 46 25 3d a3 0d 02 |<>"".F%=..F%=...|
000079e0 93 07 3d 46 25 0d 02 94 4a dd a4 6c 28 4d 25 29 |..=F%...J..l(M%)|
000079f0 3a ea 53 25 3a c8 99 26 34 30 30 45 43 2c 2d 31 |:.S%:..&400EC,-1|
00007a00 2c 2d 31 b8 53 25 3a c8 99 26 34 30 30 45 43 2c |,-1.S%:..&400EC,|
00007a10 53 25 2b 4d 25 2c 2d 31 b8 53 25 3a 52 75 25 3d |S%+M%,-1.S%:Ru%=|
00007a20 53 25 2d 28 93 2d 26 38 30 30 30 29 3a 3d 93 0d |S%-(.-&8000):=..|
00007a30 02 95 3f dd a4 4e 28 50 25 29 3a ea 41 24 3a c8 |..?..N(P%):.A$:.|
00007a40 95 3f 50 25 3c 3e 30 80 3f 50 25 3c 3e 26 44 80 |.?P%<>0.?P%<>&D.|
00007a50 3f 50 25 3c 3e 26 41 3a 41 24 2b 3d bd 28 3f 50 |?P%<>&A:A$+=.(?P|
00007a60 25 29 3a 50 25 2b 3d 31 3a ce 3a 3d 41 24 0d 02 |%):P%+=1:.:=A$..|
00007a70 96 3a dd f2 65 4a 28 63 79 25 29 3a 21 4a 25 3d |.:..eJ(cy%):!J%=|
00007a80 32 35 36 3a 4a 25 21 26 43 3d 30 3a 4a 25 21 31 |256:J%!&C=0:J%!1|
00007a90 36 3d 30 3a c8 99 26 34 30 30 45 37 2c 31 37 2c |6=0:..&400E7,17,|
00007aa0 4a 25 2c 63 79 25 3a e1 0d 02 97 44 dd a4 73 28 |J%,cy%:....D..s(|
00007ab0 41 24 29 3a ea 41 25 2c 43 25 3a e3 41 25 3d 31 |A$):.A%,C%:.A%=1|
00007ac0 b8 a9 41 24 3a 43 25 3d 97 c1 41 24 2c 41 25 2c |..A$:C%=..A$,A%,|
00007ad0 31 29 3a e7 43 25 3e 3d 39 37 80 43 25 3c 3d 26 |1):.C%>=97.C%<=&|
00007ae0 37 41 8c 43 25 3d 43 25 80 ac 33 32 0d 02 98 17 |7A.C%=C%..32....|
00007af0 c1 41 24 2c 41 25 29 3d bd 28 43 25 29 3a ed 3a |.A$,A%)=.(C%):.:|
00007b00 3d 41 24 0d 02 99 37 dd a4 64 3a ea 41 25 2c 42 |=A$...7..d:.A%,B|
00007b10 25 3a c8 99 35 33 2c 2d 31 2c 26 42 b8 2c 2c 41 |%:..53,-1,&B.,,A|
00007b20 25 3a c8 99 35 33 2c 2d 31 2c 34 b8 2c 2c 42 25 |%:..53,-1,4.,,B%|
00007b30 3a 3d 28 41 25 3c 3c 42 25 29 0d 02 9a 60 dd f2 |:=(A%<<B%)...`..|
00007b40 42 28 70 24 29 3a 21 4a 25 3d 26 46 46 3a 24 28 |B(p$):!J%=&FF:$(|
00007b50 4a 25 2b 34 29 3d 70 24 2b bd 30 3a c8 99 26 34 |J%+4)=p$+.0:..&4|
00007b60 30 30 44 46 2c 4a 25 2c 31 37 2b 28 31 3c 3c 38 |00DF,J%,17+(1<<8|
00007b70 29 2b 28 31 3c 3c 39 29 2c 22 4d 65 73 73 61 67 |)+(1<<9),"Messag|
00007b80 65 20 66 72 6f 6d 20 22 2b 4b 24 2c 22 21 4f 72 |e from "+K$,"!Or|
00007b90 67 61 6e 69 73 65 72 22 3a e1 0d 02 9b 66 dd a4 |ganiser":....f..|
00007ba0 42 79 28 41 24 2c 52 25 29 3a 21 4a 25 3d 30 3a |By(A$,R%):!J%=0:|
00007bb0 24 28 4a 25 2b 34 29 3d 41 24 3a c8 99 26 34 30 |$(J%+4)=A$:..&40|
00007bc0 30 44 46 2c 4a 25 2c 32 33 2d 34 2a 94 52 25 2b |0DF,J%,23-4*.R%+|
00007bd0 28 31 3c 3c 38 29 2c 22 4d 65 73 73 61 67 65 20 |(1<<8),"Message |
00007be0 66 72 6f 6d 20 22 2b 4b 24 2c 22 21 4f 72 67 61 |from "+K$,"!Orga|
00007bf0 6e 69 73 65 72 22 b8 2c 52 25 3a 3d 52 25 2d 32 |niser".,R%:=R%-2|
00007c00 0d 02 9c 26 dd a4 5a 5f 28 63 25 2c 72 25 2c 51 |...&..Z_(c%,r%,Q|
00007c10 25 29 3a 3d 28 a4 44 28 63 25 2c 72 25 2c 51 25 |%):=(.D(c%,r%,Q%|
00007c20 29 2b 31 29 83 32 0d 02 9d 70 dd a4 44 28 63 25 |)+1).2...p..D(c%|
00007c30 2c 72 25 2c 51 25 29 3a ea 55 75 25 3a 47 79 25 |,r%,Q%):.Uu%:Gy%|
00007c40 3d 51 25 2d 26 37 37 44 3a 55 75 25 3d 47 79 25 |=Q%-&77D:Uu%=Gy%|
00007c50 2a 33 36 35 3a 55 75 25 2b 3d 47 79 25 81 34 2d |*365:Uu%+=Gy%.4-|
00007c60 28 51 25 2d 26 37 36 43 2d 31 29 81 26 36 34 2b |(Q%-&76C-1).&64+|
00007c70 28 51 25 2d 26 36 34 30 2d 31 29 81 34 30 30 3a |(Q%-&640-1).400:|
00007c80 c8 95 28 72 25 2d 31 29 3e 30 3a 72 25 2d 3d 31 |..(r%-1)>0:r%-=1|
00007c90 3a c8 8e 72 25 ca 0d 02 9e 1c c9 31 2c 33 2c 35 |:..r%......1,3,5|
00007ca0 2c 37 2c 38 2c 26 41 2c 26 43 3a 55 75 25 2b 3d |,7,8,&A,&C:Uu%+=|
00007cb0 33 31 0d 02 9f 15 c9 34 2c 36 2c 39 2c 26 42 3a |31.....4,6,9,&B:|
00007cc0 55 75 25 2b 3d 33 30 0d 02 a0 16 c9 32 3a 55 75 |Uu%+=30.....2:Uu|
00007cd0 25 2b 3d 32 38 2d a4 46 79 28 51 25 29 0d 02 a1 |%+=28-.Fy(Q%)...|
00007ce0 0f cb 3a ce 3a 3d 55 75 25 2b 63 25 0d 02 a2 23 |..:.:=Uu%+c%...#|
00007cf0 dd a4 48 28 63 25 2c 72 25 2c 51 25 29 3a 3d a4 |..H(c%,r%,Q%):=.|
00007d00 6f 28 a4 44 28 63 25 2c 72 25 2c 51 25 29 29 0d |o(.D(c%,r%,Q%)).|
00007d10 02 a3 18 dd a4 58 28 72 25 2c 51 25 29 3a ea 63 |.....X(r%,Q%):.c|
00007d20 25 3a c8 8e 72 25 ca 0d 02 a4 1a c9 31 2c 33 2c |%:..r%......1,3,|
00007d30 35 2c 37 2c 38 2c 26 41 2c 26 43 3a 63 25 3d 33 |5,7,8,&A,&C:c%=3|
00007d40 31 0d 02 a5 13 c9 34 2c 36 2c 39 2c 26 42 3a 63 |1.....4,6,9,&B:c|
00007d50 25 3d 33 30 0d 02 a6 14 c9 32 3a 63 25 3d 32 38 |%=30.....2:c%=28|
00007d60 2d a4 46 79 28 51 25 29 0d 02 a7 09 cb 3a 3d 63 |-.Fy(Q%).....:=c|
00007d70 25 0d 02 a8 2e dd a4 46 79 28 51 25 29 3d 28 28 |%......Fy(Q%)=((|
00007d80 51 25 83 34 3d 30 29 80 ac 28 51 25 83 26 36 34 |Q%.4=0)..(Q%.&64|
00007d90 3d 30 29 29 84 28 51 25 83 34 30 30 3d 30 29 0d |=0)).(Q%.400=0).|
00007da0 02 a9 a5 dd f2 46 28 f8 64 25 2c f8 71 25 2c f8 |.....F(.d%,.q%,.|
00007db0 78 25 2c 6d 79 25 2c 4c 75 25 2c 47 79 25 29 3a |x%,my%,Lu%,Gy%):|
00007dc0 ea 67 69 25 2c 44 61 25 2c 4b 25 3a 67 69 25 3d |.gi%,Da%,K%:gi%=|
00007dd0 64 25 3a 44 61 25 3d 71 25 3a 4b 25 3d 78 25 3a |d%:Da%=q%:K%=x%:|
00007de0 64 25 2b 3d 6d 79 25 3a 71 25 2b 3d 4c 75 25 3a |d%+=my%:q%+=Lu%:|
00007df0 78 25 2b 3d 47 79 25 3a c8 95 71 25 3c 31 3a 71 |x%+=Gy%:..q%<1:q|
00007e00 25 2b 3d 26 43 3a 78 25 2d 3d 31 3a ce 3a c8 95 |%+=&C:x%-=1:.:..|
00007e10 71 25 3e 26 43 3a 71 25 2d 3d 26 43 3a 4f 61 25 |q%>&C:q%-=&C:Oa%|
00007e20 2b 3d 31 3a ce 3a c8 95 64 25 3c 31 3a 71 25 2d |+=1:.:..d%<1:q%-|
00007e30 3d 31 3a e7 71 25 3c 31 8c 71 25 3d 26 43 3a 78 |=1:.q%<1.q%=&C:x|
00007e40 25 2d 3d 31 0d 02 aa 48 64 25 2b 3d a4 58 28 71 |%-=1...Hd%+=.X(q|
00007e50 25 2c 78 25 29 3a ce 3a c8 95 64 25 3e a4 58 28 |%,x%):.:..d%>.X(|
00007e60 71 25 2c 78 25 29 3a 64 25 2d 3d a4 58 28 71 25 |q%,x%):d%-=.X(q%|
00007e70 2c 78 25 29 3a 71 25 2b 3d 31 3a e7 71 25 3e 26 |,x%):q%+=1:.q%>&|
00007e80 43 8c 71 25 3d 31 3a 78 25 2b 3d 31 0d 02 ab 2a |C.q%=1:x%+=1...*|
00007e90 ce 3a e7 78 25 3c 26 37 37 64 84 78 25 3e 26 66 |.:.x%<&77d.x%>&f|
00007ea0 66 66 8c 64 25 3d 67 69 25 3a 71 25 3d 44 61 25 |ff.d%=gi%:q%=Da%|
00007eb0 3a 78 25 3d 4b 25 0d 02 ac 05 e1 0d 02 ad 19 dd |:x%=K%..........|
00007ec0 a4 6f 28 75 25 29 3a 3d 28 28 75 25 2d 31 29 83 |.o(u%):=((u%-1).|
00007ed0 37 29 2b 31 0d 02 ae 4f dd a4 51 28 63 25 2c 72 |7)+1...O..Q(c%,r|
00007ee0 25 2c 51 25 2c 7a 4a 25 29 3a 3d a4 63 28 a4 44 |%,Q%,zJ%):=.c(.D|
00007ef0 28 63 25 2c 72 25 2c 51 25 29 2c 7a 4a 25 29 2b |(c%,r%,Q%),zJ%)+|
00007f00 22 2c 20 22 2b a4 41 5f 28 63 25 29 2b 22 20 22 |", "+.A_(c%)+" "|
00007f10 2b a4 55 28 72 25 2c 7a 4a 25 29 2b 22 20 22 2b |+.U(r%,zJ%)+" "+|
00007f20 c3 51 25 0d 02 af fb dd f2 70 75 3a ea 43 25 2c |.Q%......pu:.C%,|
00007f30 50 25 2c 4a 2c 50 2c 52 2c 4d 2c 5a 2c 57 2c 47 |P%,J,P,R,M,Z,W,G|
00007f40 2c 4e 2c 77 2c 43 2c 55 3a de 43 25 26 39 30 3a |,N,w,C,U:.C%&90:|
00007f50 4a 3d 26 44 3a 50 3d 26 45 3a 52 3d 26 46 3a 4d |J=&D:P=&E:R=&F:M|
00007f60 3d 32 3a 5a 3d 33 3a 57 3d 34 3a 47 3d 35 3a 4e |=2:Z=3:W=4:G=5:N|
00007f70 3d 30 3a 77 3d 31 3a 43 3d 36 3a 55 3d 37 3a e3 |=0:w=1:C=6:U=7:.|
00007f80 53 25 3d 30 b8 32 88 32 3a 50 25 3d 43 25 3a 5b |S%=0.2.2:P%=C%:[|
00007f90 4f 50 54 53 25 3a 2e 56 20 43 4d 50 20 47 2c 23 |OPTS%:.V CMP G,#|
00007fa0 30 3a 52 53 42 4c 54 20 47 2c 47 2c 23 30 3a 53 |0:RSBLT G,G,#0:S|
00007fb0 55 42 4c 54 20 5a 2c 5a 2c 47 3a 43 4d 50 20 57 |UBLT Z,Z,G:CMP W|
00007fc0 2c 23 30 3a 52 53 42 4c 54 20 57 2c 57 2c 23 30 |,#0:RSBLT W,W,#0|
00007fd0 3a 53 55 42 4c 54 20 4d 2c 4d 2c 57 3a 41 44 44 |:SUBLT M,M,W:ADD|
00007fe0 20 55 2c 4d 2c 57 3a 4c 44 52 20 43 2c 5b 4e 2c | U,M,W:LDR C,[N,|
00007ff0 23 32 38 5d 3a 43 4d 50 20 55 2c 43 3a 42 4c 54 |#28]:CMP U,C:BLT|
00008000 20 51 3a 4c 44 52 20 43 2c 5b 4e 2c 23 33 36 5d | Q:LDR C,[N,#36]|
00008010 3a 43 4d 50 20 4d 2c 43 3a 42 47 54 20 51 0d 02 |:CMP M,C:BGT Q..|
00008020 b0 cb 4c 44 52 20 43 2c 5b 4e 2c 23 33 32 5d 3a |..LDR C,[N,#32]:|
00008030 41 44 44 20 55 2c 5a 2c 47 3a 43 4d 50 20 55 2c |ADD U,Z,G:CMP U,|
00008040 43 3a 42 4c 54 20 51 3a 4c 44 52 20 43 2c 5b 4e |C:BLT Q:LDR C,[N|
00008050 2c 23 34 30 5d 3a 43 4d 50 20 5a 2c 43 3a 42 47 |,#40]:CMP Z,C:BG|
00008060 54 20 51 3a 43 4d 50 20 77 2c 23 30 3a 4d 56 4e |T Q:CMP w,#0:MVN|
00008070 45 51 30 2c 23 31 3a ec 51 70 63 2c 50 3a 42 20 |EQ0,#1:.Qpc,P:B |
00008080 61 3a 2e 51 20 4d 4f 56 30 2c 23 30 3a 4d 4f 56 |a:.Q MOV0,#0:MOV|
00008090 70 63 2c 50 3a 2e 61 20 4d 4f 56 31 2c 4d 3a 4d |pc,P:.a MOV1,M:M|
000080a0 4f 56 32 2c 5a 3a 4d 4f 56 30 2c 23 34 3a 53 57 |OV2,Z:MOV0,#4:SW|
000080b0 49 20 36 39 3a 4d 4f 56 31 2c 57 3a 4d 4f 56 32 |I 69:MOV1,W:MOV2|
000080c0 2c 47 3a 4d 4f 56 30 2c 23 39 36 2b 31 3a 53 57 |,G:MOV0,#96+1:SW|
000080d0 49 20 36 39 3a 4d 56 4e 30 2c 23 31 3a 4d 4f 56 |I 69:MVN0,#1:MOV|
000080e0 70 63 2c 50 3a 5d ed 3a e1 0d 02 b1 2a dd a4 53 |pc,P:].:....*..S|
000080f0 28 43 25 2c 44 25 2c 45 25 2c 46 25 29 3a ea 41 |(C%,D%,E%,F%):.A|
00008100 25 2c 42 25 3a 41 25 3d 55 25 3a 42 25 3d 30 3a |%,B%:A%=U%:B%=0:|
00008110 3d ba 56 0d 02 b2 2b dd f2 58 28 43 25 2c 44 25 |=.V...+..X(C%,D%|
00008120 2c 45 25 2c 46 25 29 3a ea 41 25 2c 42 25 3a 41 |,E%,F%):.A%,B%:A|
00008130 25 3d 55 25 3a 42 25 3d 31 3a d6 56 3a e1 0d 02 |%=U%:B%=1:.V:...|
00008140 b3 42 dd f2 47 28 65 25 29 3a 21 4a 25 3d 65 25 |.B..G(e%):!J%=e%|
00008150 3a c8 99 26 34 30 30 43 36 2c 2c 4a 25 3a e7 65 |:..&400C6,,J%:.e|
00008160 25 3d 78 5f 25 8c 48 75 25 3d a3 3a 21 4a 25 3d |%=x_%.Hu%=.:!J%=|
00008170 63 5f 25 3a c8 99 26 36 30 30 43 36 2c 2c 4a 25 |c_%:..&600C6,,J%|
00008180 0d 02 b4 10 e7 65 25 3d 69 25 8c 56 79 25 3d a3 |.....e%=i%.Vy%=.|
00008190 0d 02 b5 05 e1 0d 02 b6 40 dd f2 59 75 28 42 25 |........@..Yu(B%|
000081a0 29 3a ea 4e 25 2c 41 24 2c 50 79 25 2c 70 25 3a |):.N%,A$,Py%,p%:|
000081b0 4e 25 3d 42 25 21 38 34 3a 42 25 2b 3d 38 38 3a |N%=B%!84:B%+=88:|
000081c0 c8 95 4e 25 3a e7 28 28 42 25 21 31 36 29 80 36 |..N%:.((B%!16).6|
000081d0 34 29 3e 30 8c 0d 02 b7 83 41 24 3d 24 28 42 25 |4)>0.....A$=$(B%|
000081e0 21 32 34 29 3a 70 25 3d a0 28 22 26 22 2b c1 41 |!24):p%=.("&"+.A|
000081f0 24 2c a7 41 24 2c 22 46 22 29 2b 31 2c 31 29 29 |$,.A$,"F")+1,1))|
00008200 3a 50 79 25 3d a0 28 22 26 22 2b c1 41 24 2c a7 |:Py%=.("&"+.A$,.|
00008210 41 24 2c 22 46 22 29 2b 32 2c 31 29 29 3a 42 25 |A$,"F")+2,1)):B%|
00008220 21 31 36 3d 42 25 21 31 36 80 ac 28 36 34 2b 28 |!16=B%!16..(64+(|
00008230 26 46 46 3c 3c 32 34 29 29 3a 42 25 21 31 36 3d |&FF<<24)):B%!16=|
00008240 42 25 21 31 36 84 28 50 79 25 3c 3c 32 34 29 84 |B%!16.(Py%<<24).|
00008250 28 70 25 3c 3c 32 38 29 0d 02 b8 16 cd 3a 42 25 |(p%<<28).....:B%|
00008260 2b 3d 33 32 3a 4e 25 2d 3d 31 3a ce 3a e1 0d 02 |+=32:N%-=1:.:...|
00008270 b9 3d dd f2 44 28 65 25 2c 4f 5f 25 2c 60 79 25 |.=..D(e%,O_%,`y%|
00008280 2c 42 5f 25 2c 6a 79 25 29 3a c8 99 26 34 30 30 |,B_%,jy%):..&400|
00008290 44 31 2c 65 25 2c 4f 5f 25 2c 6a 79 25 2c 42 5f |D1,e%,O_%,jy%,B_|
000082a0 25 2b 32 2c 60 79 25 2b 34 3a e1 0d 02 ba a1 dd |%+2,`y%+4:......|
000082b0 f2 77 28 65 25 2c 49 4a 25 2c 56 6c 25 29 3a ea |.w(e%,IJ%,Vl%):.|
000082c0 57 25 2c 48 25 2c 58 25 2c 59 25 2c 5a 25 3a 21 |W%,H%,X%,Y%,Z%:!|
000082d0 4a 25 3d 65 25 3a c8 99 26 34 30 30 43 42 2c 2c |J%=e%:..&400CB,,|
000082e0 4a 25 3a 58 25 3d 33 36 2a 28 28 4a 25 21 33 32 |J%:X%=36*((J%!32|
000082f0 3e 3e 32 38 29 80 31 29 3a 59 25 3d 33 36 2a 28 |>>28).1):Y%=36*(|
00008300 28 4a 25 21 33 32 3e 3e 32 36 29 80 31 29 2d 33 |(J%!32>>26).1)-3|
00008310 36 2a 28 28 4a 25 21 33 32 3e 3e 33 30 29 80 31 |6*((J%!32>>30).1|
00008320 29 3a 57 25 3d 4a 25 21 26 43 2d 4a 25 21 34 2b |):W%=J%!&C-J%!4+|
00008330 58 25 3a 48 25 3d 4a 25 21 31 36 2d 4a 25 21 38 |X%:H%=J%!16-J%!8|
00008340 2b 59 25 3a e7 56 6c 25 3d 2d 31 8c 0d 02 bb 4a |+Y%:.Vl%=-1....J|
00008350 4a 25 21 34 3d a4 64 2f 32 2d 57 25 2f 32 3a 4a |J%!4=.d/2-W%/2:J|
00008360 25 21 26 43 3d 4a 25 21 34 2b 57 25 3a 4a 25 21 |%!&C=J%!4+W%:J%!|
00008370 31 36 3d a4 65 2d 28 28 a4 65 2d 26 38 34 29 2d |16=.e-((.e-&84)-|
00008380 48 25 29 2f 32 2d 59 25 3a 4a 25 21 38 3d 4a 25 |H%)/2-Y%:J%!8=J%|
00008390 21 31 36 2d 48 25 0d 02 bc 0d cc 3a e7 56 6c 25 |!16-H%.....:.Vl%|
000083a0 3d 31 8c 0d 02 bd 3b c8 97 58 25 2c 59 25 2c 5a |=1....;..X%,Y%,Z|
000083b0 25 3a 4a 25 21 34 3d 58 25 2d 36 34 3a 4a 25 21 |%:J%!4=X%-64:J%!|
000083c0 26 43 3d 4a 25 21 34 2b 57 25 3a 4a 25 21 38 3d |&C=J%!4+W%:J%!8=|
000083d0 59 25 2d 48 25 3a 4a 25 21 31 36 3d 59 25 0d 02 |Y%-H%:J%!16=Y%..|
000083e0 be 05 cd 0d 02 bf 17 cd 3a e7 49 4a 25 3c 3e 30 |........:.IJ%<>0|
000083f0 8c 4a 25 21 32 38 3d 49 4a 25 0d 02 c0 1d c8 99 |.J%!28=IJ%......|
00008400 26 34 30 30 43 35 2c 2c 4a 25 3a e7 65 25 3d 69 |&400C5,,J%:.e%=i|
00008410 25 8c 56 79 25 3d b9 0d 02 c1 36 e7 65 25 3d 78 |%.Vy%=....6.e%=x|
00008420 5f 25 8c 48 75 25 3d b9 3a 21 55 25 3d 78 5f 25 |_%.Hu%=.:!U%=x_%|
00008430 3a c8 99 26 34 30 30 43 42 2c 2c 55 25 3a 55 25 |:..&400CB,,U%:U%|
00008440 21 32 38 3d 4a 25 21 32 38 3a f2 60 79 0d 02 c2 |!28=J%!28:.`y...|
00008450 05 e1 0d 02 c3 47 dd f2 5f 79 28 71 69 25 2c 65 |.....G.._y(qi%,e|
00008460 25 2c 5f 25 2c 51 25 2c 54 6c 25 2c 5a 69 25 2c |%,_%,Q%,Tl%,Zi%,|
00008470 4d 69 25 29 3a e7 63 5f 25 3c 3e 30 80 63 5f 25 |Mi%):.c_%<>0.c_%|
00008480 3c 3e 65 25 8c 21 4a 25 3d 63 5f 25 3a c8 99 26 |<>e%.!J%=c_%:..&|
00008490 36 30 30 43 36 2c 2c 4a 25 0d 02 c4 41 63 5f 25 |600C6,,J%...Ac_%|
000084a0 3d 65 25 3a 78 5f 25 3d 71 69 25 3a 42 6c 25 3d |=e%:x_%=qi%:Bl%=|
000084b0 5f 25 3a 48 6c 25 3d 51 25 3a 48 75 25 3d 54 6c |_%:Hl%=Q%:Hu%=Tl|
000084c0 25 3a 72 6c 25 3d 5a 69 25 3a 66 6c 25 3d 4d 69 |%:rl%=Zi%:fl%=Mi|
000084d0 25 3a e7 63 5f 25 3c 3e 30 8c 0d 02 c5 77 21 4a |%:.c_%<>0....w!J|
000084e0 25 3d 63 5f 25 3a c8 99 26 34 30 30 43 42 2c 2c |%=c_%:..&400CB,,|
000084f0 4a 25 3a 46 61 25 3d 4a 25 21 26 43 2d 4a 25 21 |J%:Fa%=J%!&C-J%!|
00008500 34 3a 43 61 25 3d 4a 25 21 31 36 2d 4a 25 21 38 |4:Ca%=J%!16-J%!8|
00008510 3a 21 4a 25 3d 78 5f 25 3a c8 99 26 34 30 30 43 |:!J%=x_%:..&400C|
00008520 42 2c 2c 4a 25 3a 4a 25 21 34 2b 3d 5f 25 3a 4a |B,,J%:J%!4+=_%:J|
00008530 25 21 31 36 2b 3d 51 25 3a e7 54 6c 25 8c 21 4a |%!16+=Q%:.Tl%.!J|
00008540 25 3d 65 25 3a c8 99 26 34 30 30 43 35 2c 2c 4a |%=e%:..&400C5,,J|
00008550 25 0d 02 c6 07 cd 3a e1 0d 02 c7 19 dd f2 60 79 |%.....:.......`y|
00008560 3a e7 63 5f 25 3c 3e 30 80 21 55 25 3d 78 5f 25 |:.c_%<>0.!U%=x_%|
00008570 8c 0d 02 c8 69 21 4a 25 3d 63 5f 25 3a 4a 25 21 |....i!J%=c_%:J%!|
00008580 34 3d 55 25 21 34 2b 42 6c 25 3a 4a 25 21 31 36 |4=U%!4+Bl%:J%!16|
00008590 3d 55 25 21 31 36 2b 48 6c 25 3a 4a 25 21 26 43 |=U%!16+Hl%:J%!&C|
000085a0 3d 4a 25 21 34 2b 46 61 25 3a 4a 25 21 38 3d 4a |=J%!4+Fa%:J%!8=J|
000085b0 25 21 31 36 2d 43 61 25 3a 4a 25 21 32 30 3d 30 |%!16-Ca%:J%!20=0|
000085c0 3a 4a 25 21 32 34 3d 30 3a 4a 25 21 32 38 3d 55 |:J%!24=0:J%!28=U|
000085d0 25 21 32 38 3a e7 72 6c 25 8c 0d 02 c9 41 4a 25 |%!28:.rl%....AJ%|
000085e0 21 34 2d 3d 55 25 21 32 30 3a 4a 25 21 26 43 2d |!4-=U%!20:J%!&C-|
000085f0 3d 55 25 21 32 30 3a e7 4a 25 21 34 3c 55 25 21 |=U%!20:.J%!4<U%!|
00008600 34 8c 4a 25 21 32 30 3d 55 25 21 32 30 2d 42 6c |4.J%!20=U%!20-Bl|
00008610 25 3a 4a 25 21 34 3d 55 25 21 34 0d 02 ca 1c e7 |%:J%!4=U%!4.....|
00008620 4a 25 21 26 43 3e 55 25 21 26 43 8c 4a 25 21 26 |J%!&C>U%!&C.J%!&|
00008630 43 3d 55 25 21 26 43 0d 02 cb 0b cd 3a e7 66 6c |C=U%!&C.....:.fl|
00008640 25 8c 0d 02 cc 47 4a 25 21 31 36 2d 3d 55 25 21 |%....GJ%!16-=U%!|
00008650 32 34 3a 4a 25 21 38 2d 3d 55 25 21 32 34 3a e7 |24:J%!8-=U%!24:.|
00008660 4a 25 21 31 36 3e 55 25 21 31 36 8c 4a 25 21 32 |J%!16>U%!16.J%!2|
00008670 34 3d 55 25 21 31 36 2d 4a 25 21 31 36 3a 4a 25 |4=U%!16-J%!16:J%|
00008680 21 31 36 3d 55 25 21 31 36 0d 02 cd 18 e7 4a 25 |!16=U%!16.....J%|
00008690 21 38 3c 55 25 21 38 8c 4a 25 21 38 3d 55 25 21 |!8<U%!8.J%!8=U%!|
000086a0 38 0d 02 ce 1c cd 3a c8 99 26 34 30 30 43 35 2c |8.....:..&400C5,|
000086b0 2c 4a 25 3a 55 25 21 32 38 3d 63 5f 25 0d 02 cf |,J%:U%!28=c_%...|
000086c0 07 cd 3a e1 0d 02 d0 2d dd f2 6d 4a 3a ea 41 25 |..:....-..mJ:.A%|
000086d0 3a de 59 6c 25 32 35 36 3a e3 41 25 3d 30 b8 32 |:.Yl%256:.A%=0.2|
000086e0 35 36 88 34 3a 59 6c 25 21 41 25 3d 30 3a ed 3a |56.4:Yl%!A%=0:.:|
000086f0 e1 0d 02 d1 33 dd f2 64 75 28 61 61 25 2c 72 24 |....3..du(aa%,r$|
00008700 29 3a 59 6c 25 3d 2d 31 3a c8 99 26 34 30 30 44 |):Yl%=-1:..&400D|
00008710 39 2c 2c 72 24 3a f2 68 75 3a c8 99 26 34 30 30 |9,,r$:.hu:..&400|
00008720 44 41 3a e1 0d 02 d2 24 dd f2 69 28 57 25 2c 49 |DA:....$..i(W%,I|
00008730 79 25 2c 41 24 2c 75 4a 25 29 3a 24 49 79 25 3d |y%,A$,uJ%):$Iy%=|
00008740 41 24 3a e7 75 4a 25 8c 0d 02 d3 3d 21 55 25 3d |A$:.uJ%....=!U%=|
00008750 57 25 3a c8 99 26 34 30 30 43 42 2c 2c 55 25 3a |W%:..&400CB,,U%:|
00008760 c8 99 26 34 30 30 44 31 2c 2d 31 2c 55 25 21 34 |..&400D1,-1,U%!4|
00008770 2c 55 25 21 31 36 2c 55 25 21 26 43 2c 55 25 21 |,U%!16,U%!&C,U%!|
00008780 31 36 2b 34 34 0d 02 d4 07 cd 3a e1 0d 02 d5 20 |16+44.....:.... |
00008790 dd f2 56 28 42 25 2c 46 25 29 3a c8 99 26 34 30 |..V(B%,F%):..&40|
000087a0 30 46 33 2c 2c 42 25 2c 46 25 3a e1 0d 02 d6 39 |0F3,,B%,F%:....9|
000087b0 dd a4 4a 28 72 24 2c 57 25 2c 48 25 29 3a ea 46 |..J(r$,W%,H%):.F|
000087c0 25 3a c8 99 26 34 30 30 38 31 2c 2c 72 24 2c 31 |%:..&40081,,r$,1|
000087d0 36 2a 57 25 2c 31 36 2a 48 25 2c 30 2c 30 b8 46 |6*W%,16*H%,0,0.F|
000087e0 25 3a 3d 46 25 0d 02 d7 19 dd f2 51 28 48 25 29 |%:=F%......Q(H%)|
000087f0 3a c8 99 26 34 30 30 38 32 2c 48 25 3a e1 0d 02 |:..&40082,H%:...|
00008800 d8 2a dd f2 6f 79 28 f8 58 25 2c f8 59 25 29 3a |.*..oy(.X%,.Y%):|
00008810 c8 99 26 34 30 30 38 38 2c 2c 58 25 2c 59 25 b8 |..&40088,,X%,Y%.|
00008820 2c 58 25 2c 59 25 3a e1 0d 02 d9 bb dd f2 4c 28 |,X%,Y%:.......L(|
00008830 63 79 25 2c 57 24 2c 5f 75 25 2c 5f 25 2c 51 25 |cy%,W$,_u%,_%,Q%|
00008840 29 3a ea 4f 5f 25 2c 6a 79 25 2c 42 5f 25 2c 60 |):.O_%,jy%,B_%,`|
00008850 79 25 2c 41 4a 25 3a c8 99 26 34 30 30 38 41 2c |y%,AJ%:..&4008A,|
00008860 63 79 25 3a c8 99 26 34 30 30 39 37 2c 2c 57 24 |cy%:..&40097,,W$|
00008870 b8 2c 4f 5f 25 2c 6a 79 25 2c 42 5f 25 2c 60 79 |.,O_%,jy%,B_%,`y|
00008880 25 3a c8 99 26 34 30 30 38 38 2c 2c 4f 5f 25 2c |%:..&40088,,O_%,|
00008890 6a 79 25 b8 2c 4f 5f 25 2c 6a 79 25 3a c8 99 26 |jy%.,O_%,jy%:..&|
000088a0 34 30 30 38 38 2c 2c 42 5f 25 2c 60 79 25 b8 2c |40088,,B_%,`y%.,|
000088b0 42 5f 25 2c 60 79 25 3a 41 4a 25 3d 42 5f 25 2b |B_%,`y%:AJ%=B_%+|
000088c0 4f 5f 25 3a e7 5f 75 25 3d 30 8c 5f 25 2d 3d 41 |O_%:._u%=0._%-=A|
000088d0 4a 25 2f 32 8b e7 5f 75 25 3e 30 8c 5f 25 2d 3d |J%/2.._u%>0._%-=|
000088e0 41 4a 25 0d 02 da 41 e7 a4 53 28 5f 25 2c 51 25 |AJ%...A..S(_%,Q%|
000088f0 2d 60 79 25 2b 6a 79 25 2c 41 4a 25 2c 60 79 25 |-`y%+jy%,AJ%,`y%|
00008900 2d 6a 79 25 29 8c c8 99 26 34 30 30 38 36 2c 63 |-jy%)...&40086,c|
00008910 79 25 2c 57 24 2c 31 3c 3c 34 2c 5f 25 2c 51 25 |y%,W$,1<<4,_%,Q%|
00008920 2d 60 79 25 0d 02 db 05 e1 0d 02 dc f5 dd f2 65 |-`y%...........e|
00008930 79 28 63 79 25 2c 57 24 2c 4a 61 25 2c 77 69 25 |y(cy%,W$,Ja%,wi%|
00008940 2c 5f 25 2c 51 25 2c 67 25 29 3a ea 4f 5f 25 2c |,_%,Q%,g%):.O_%,|
00008950 6a 79 25 2c 42 5f 25 2c 60 79 25 2c 41 4a 25 3a |jy%,B_%,`y%,AJ%:|
00008960 21 4a 25 3d 30 3a 4a 25 21 34 3d 2d 67 25 3c 3c |!J%=0:J%!4=-g%<<|
00008970 31 36 3a 4a 25 21 38 3d 67 25 3c 3c 31 36 3a 4a |16:J%!8=g%<<16:J|
00008980 25 21 26 43 3d 30 3a 4a 25 21 31 36 3d 30 3a 4a |%!&C=0:J%!16=0:J|
00008990 25 21 32 30 3d 30 3a c8 99 26 34 30 30 38 41 2c |%!20=0:..&4008A,|
000089a0 63 79 25 3a c8 99 26 34 30 30 39 37 2c 2c 57 24 |cy%:..&40097,,W$|
000089b0 b8 2c 4f 5f 25 2c 6a 79 25 2c 42 5f 25 2c 60 79 |.,O_%,jy%,B_%,`y|
000089c0 25 3a c8 99 26 34 30 30 38 38 2c 2c 4f 5f 25 2c |%:..&40088,,O_%,|
000089d0 6a 79 25 b8 2c 6a 79 25 2c 4f 5f 25 3a c8 99 26 |jy%.,jy%,O_%:..&|
000089e0 34 30 30 38 38 2c 2c 42 5f 25 2c 60 79 25 b8 2c |40088,,B_%,`y%.,|
000089f0 60 79 25 2c 42 5f 25 3a e7 4a 61 25 3d 30 8c 5f |`y%,B_%:.Ja%=0._|
00008a00 25 2d 3d 67 25 2a 42 5f 25 2f 32 8b e7 4a 61 25 |%-=g%*B_%/2..Ja%|
00008a10 3d 67 25 8c 5f 25 2d 3d 67 25 2a 42 5f 25 0d 02 |=g%._%-=g%*B_%..|
00008a20 dd 2c e7 77 69 25 3d 30 8c 51 25 2b 3d 67 25 2a |.,.wi%=0.Q%+=g%*|
00008a30 60 79 25 2f 32 8b e7 77 69 25 3d 2d 67 25 8c 51 |`y%/2..wi%=-g%.Q|
00008a40 25 2d 3d 77 69 25 2a 60 79 25 0d 02 de 2e c8 99 |%-=wi%*`y%......|
00008a50 26 34 30 30 38 36 2c 63 79 25 2c 57 24 2c 28 31 |&40086,cy%,W$,(1|
00008a60 3c 3c 34 29 2b 28 31 3c 3c 36 29 2c 5f 25 2c 51 |<<4)+(1<<6),_%,Q|
00008a70 25 2c 30 2c 4a 25 3a e1 0d 02 df 2d dd f2 72 28 |%,0,J%:....-..r(|
00008a80 6c 75 25 2c 57 24 2c 61 25 2c 4b 25 2c 73 25 2c |lu%,W$,a%,K%,s%,|
00008a90 62 25 29 3a e7 a4 53 28 61 25 2c 4b 25 2c 73 25 |b%):..S(a%,K%,s%|
00008aa0 2c 62 25 29 8c 0d 02 e0 8d ea 41 25 2c 63 79 25 |,b%)......A%,cy%|
00008ab0 2c 4f 5f 25 2c 6a 79 25 2c 42 5f 25 2c 60 79 25 |,O_%,jy%,B_%,`y%|
00008ac0 2c 41 4a 25 2c 66 69 25 2c 58 6c 25 2c 44 6c 25 |,AJ%,fi%,Xl%,Dl%|
00008ad0 3a c8 99 26 34 30 30 38 41 2c 6c 75 25 3a 63 79 |:..&4008A,lu%:cy|
00008ae0 25 3d 6c 75 25 3a c8 99 26 34 30 30 39 37 2c 6c |%=lu%:..&40097,l|
00008af0 75 25 2c 57 24 b8 2c 4f 5f 25 2c 6a 79 25 2c 42 |u%,W$.,O_%,jy%,B|
00008b00 5f 25 2c 60 79 25 3a c8 99 26 34 30 30 38 38 2c |_%,`y%:..&40088,|
00008b10 2c 42 5f 25 2b 4f 5f 25 2c 60 79 25 2b 6a 79 25 |,B_%+O_%,`y%+jy%|
00008b20 b8 2c 41 4a 25 2c 66 69 25 3a e7 41 4a 25 3e 73 |.,AJ%,fi%:.AJ%>s|
00008b30 25 8c 0d 02 e1 ae c8 99 26 34 30 30 38 33 2c 6c |%.......&40083,l|
00008b40 75 25 2c 4a 25 b8 2c 2c 58 6c 25 2c 44 6c 25 3a |u%,J%.,,Xl%,Dl%:|
00008b50 c8 95 41 4a 25 3e 73 25 3a 58 6c 25 3d 58 6c 25 |..AJ%>s%:Xl%=Xl%|
00008b60 2a 30 2e 39 35 3a 44 6c 25 3d 44 6c 25 2a 30 2e |*0.95:Dl%=Dl%*0.|
00008b70 39 35 3a c8 99 26 34 30 30 38 31 2c 2c 4a 25 2c |95:..&40081,,J%,|
00008b80 58 6c 25 2c 44 6c 25 3a c8 99 26 34 30 30 39 37 |Xl%,Dl%:..&40097|
00008b90 2c 2c 57 24 b8 63 79 25 2c 4f 5f 25 2c 6a 79 25 |,,W$.cy%,O_%,jy%|
00008ba0 2c 42 5f 25 2c 60 79 25 3a c8 99 26 34 30 30 38 |,B_%,`y%:..&4008|
00008bb0 38 2c 2c 42 5f 25 2b 4f 5f 25 2c 60 79 25 2b 6a |8,,B_%+O_%,`y%+j|
00008bc0 79 25 b8 2c 41 4a 25 2c 66 69 25 3a e7 41 4a 25 |y%.,AJ%,fi%:.AJ%|
00008bd0 3e 73 25 8c c8 99 26 34 30 30 38 32 2c 63 79 25 |>s%...&40082,cy%|
00008be0 0d 02 e2 05 ce 0d 02 e3 34 cd 3a c8 99 26 34 30 |........4.:..&40|
00008bf0 30 38 36 2c 2c 57 24 2c 31 3c 3c 34 2c 61 25 2c |086,,W$,1<<4,a%,|
00008c00 4b 25 3a e7 63 79 25 3c 3e 6c 75 25 8c c8 99 26 |K%:.cy%<>lu%...&|
00008c10 34 30 30 38 32 2c 63 79 25 0d 02 e4 07 cd 3a e1 |40082,cy%.....:.|
00008c20 0d 02 e5 33 dd f2 54 28 73 6c 25 2c 43 6c 25 2c |...3..T(sl%,Cl%,|
00008c30 52 5f 25 2c 48 5f 25 2c 67 25 2c 52 61 25 29 3a |R_%,H_%,g%,Ra%):|
00008c40 c8 99 26 34 30 30 45 36 2c 43 6c 25 3a c8 8e 52 |..&400E6,Cl%:..R|
00008c50 61 25 ca 0d 02 e6 69 c9 31 3a c8 93 c8 90 52 5f |a%....i.1:....R_|
00008c60 25 2c 48 5f 25 2c 67 25 3a c8 99 26 34 30 30 45 |%,H_%,g%:..&400E|
00008c70 36 2c 73 6c 25 3a ec 52 5f 25 2c 48 5f 25 3a ec |6,sl%:.R_%,H_%:.|
00008c80 42 59 67 25 2c 30 3a f0 26 42 31 2c 2d 67 25 2c |BYg%,0:.&B1,-g%,|
00008c90 67 25 3a c8 99 26 34 30 30 45 36 2c 43 6c 25 3a |g%:..&400E6,Cl%:|
00008ca0 ec 52 5f 25 2c 48 5f 25 3a ec 42 59 67 25 2c 30 |.R_%,H_%:.BYg%,0|
00008cb0 3a f0 26 41 31 2c 2d 67 25 2c 67 25 0d 02 e7 6f |:.&A1,-g%,g%...o|
00008cc0 c9 32 3a c8 93 c8 90 52 5f 25 2c 48 5f 25 2c 2d |.2:....R_%,H_%,-|
00008cd0 67 25 2c 67 25 3a c8 99 26 34 30 30 45 36 2c 73 |g%,g%:..&400E6,s|
00008ce0 6c 25 3a ec 52 5f 25 2c 48 5f 25 3a ec 42 59 30 |l%:.R_%,H_%:.BY0|
00008cf0 2c 67 25 3a f0 26 42 31 2c 2d 67 25 2c 2d 67 25 |,g%:.&B1,-g%,-g%|
00008d00 3a c8 99 26 34 30 30 45 36 2c 43 6c 25 3a ec 52 |:..&400E6,Cl%:.R|
00008d10 5f 25 2c 48 5f 25 3a ec 42 59 30 2c 67 25 3a f0 |_%,H_%:.BY0,g%:.|
00008d20 26 41 31 2c 2d 67 25 2c 2d 67 25 0d 02 e8 6c c9 |&A1,-g%,-g%...l.|
00008d30 33 3a c8 93 c8 90 52 5f 25 2c 48 5f 25 2c 2d 67 |3:....R_%,H_%,-g|
00008d40 25 3a c8 99 26 34 30 30 45 36 2c 73 6c 25 3a ec |%:..&400E6,sl%:.|
00008d50 52 5f 25 2c 48 5f 25 3a ec 42 59 2d 67 25 2c 30 |R_%,H_%:.BY-g%,0|
00008d60 3a f0 26 42 31 2c 67 25 2c 2d 67 25 3a c8 99 26 |:.&B1,g%,-g%:..&|
00008d70 34 30 30 45 36 2c 43 6c 25 3a ec 52 5f 25 2c 48 |400E6,Cl%:.R_%,H|
00008d80 5f 25 3a ec 42 59 2d 67 25 2c 30 3a f0 26 41 31 |_%:.BY-g%,0:.&A1|
00008d90 2c 67 25 2c 2d 67 25 0d 02 e9 6f c9 34 3a c8 93 |,g%,-g%...o.4:..|
00008da0 c8 90 52 5f 25 2c 48 5f 25 2c 67 25 2c 2d 67 25 |..R_%,H_%,g%,-g%|
00008db0 3a c8 99 26 34 30 30 45 36 2c 73 6c 25 3a ec 52 |:..&400E6,sl%:.R|
00008dc0 5f 25 2d 32 2c 48 5f 25 3a ec 42 59 30 2c 2d 67 |_%-2,H_%:.BY0,-g|
00008dd0 25 3a f0 26 42 31 2c 67 25 2c 67 25 3a c8 99 26 |%:.&B1,g%,g%:..&|
00008de0 34 30 30 45 36 2c 43 6c 25 3a ec 52 5f 25 2c 48 |400E6,Cl%:.R_%,H|
00008df0 5f 25 3a ec 42 59 30 2c 2d 67 25 3a f0 26 41 31 |_%:.BY0,-g%:.&A1|
00008e00 2c 67 25 2c 67 25 0d 02 ea 07 cb 3a e1 0d 02 eb |,g%,g%.....:....|
00008e10 d8 dd f2 6c 28 5f 25 2c 51 25 2c 73 25 2c 62 25 |...l(_%,Q%,s%,b%|
00008e20 2c 67 25 29 3a ec 5f 25 2b 67 25 2c 51 25 3a df |,g%):._%+g%,Q%:.|
00008e30 42 59 73 25 2d 32 2a 67 25 2c 30 3a ec 42 59 67 |BYs%-2*g%,0:.BYg|
00008e40 25 2c 2d 67 25 3a df 42 59 30 2c 2d 62 25 2b 32 |%,-g%:.BY0,-b%+2|
00008e50 2a 67 25 3a ec 42 59 2d 67 25 2c 2d 67 25 3a df |*g%:.BY-g%,-g%:.|
00008e60 42 59 2d 73 25 2b 32 2a 67 25 2c 30 3a ec 42 59 |BY-s%+2*g%,0:.BY|
00008e70 2d 67 25 2c 67 25 3a df 42 59 30 2c 62 25 2d 32 |-g%,g%:.BY0,b%-2|
00008e80 2a 67 25 3a ec 5f 25 2b 67 25 2c 51 25 2d 67 25 |*g%:._%+g%,Q%-g%|
00008e90 3a ec 42 59 30 2c 67 25 3a f0 26 41 31 2c 2d 67 |:.BY0,g%:.&A1,-g|
00008ea0 25 2c 2d 67 25 3a ec 5f 25 2b 73 25 2d 67 25 2c |%,-g%:._%+s%-g%,|
00008eb0 51 25 2d 67 25 3a ec 42 59 67 25 2c 30 3a f0 26 |Q%-g%:.BYg%,0:.&|
00008ec0 41 31 2c 2d 67 25 2c 67 25 3a ec 5f 25 2b 73 25 |A1,-g%,g%:._%+s%|
00008ed0 2d 67 25 2c 51 25 2d 62 25 2b 67 25 3a ec 42 59 |-g%,Q%-b%+g%:.BY|
00008ee0 30 2c 2d 67 25 0d 02 ec 35 f0 26 41 31 2c 67 25 |0,-g%...5.&A1,g%|
00008ef0 2c 67 25 3a ec 5f 25 2b 67 25 2c 51 25 2d 62 25 |,g%:._%+g%,Q%-b%|
00008f00 2b 67 25 3a ec 42 59 2d 67 25 2c 30 3a f0 26 41 |+g%:.BY-g%,0:.&A|
00008f10 31 2c 67 25 2c 2d 67 25 3a e1 0d 02 ed 0a dd f2 |1,g%,-g%:.......|
00008f20 59 4a 3a e1 0d 02 ee 0f dd f2 79 75 3a c8 8e 46 |YJ:.......yu:..F|
00008f30 69 25 ca 0d 02 ef 0f c9 33 3a f2 5f 5f 28 72 4a |i%......3:.__(rJ|
00008f40 25 29 0d 02 f0 07 cb 3a e1 0d 02 f1 1c dd f2 63 |%).....:.......c|
00008f50 3a 72 4a 25 3d 2d 31 3a 46 69 25 3d 2d 31 3a e7 |:rJ%=-1:Fi%=-1:.|
00008f60 ac 50 75 25 8c 0d 02 f2 1f 72 4a 25 3d a4 63 79 |.Pu%.....rJ%=.cy|
00008f70 28 71 4a 25 29 3a e7 72 4a 25 3c 3e 2d 31 8c 46 |(qJ%):.rJ%<>-1.F|
00008f80 69 25 3d 33 0d 02 f3 08 cc f2 78 4a 0d 02 f4 07 |i%=3......xJ....|
00008f90 cd 3a e1 0d 02 f5 18 dd f2 43 5f 28 58 75 25 29 |.:.......C_(Xu%)|
00008fa0 3a c8 8e 5a 25 28 58 75 25 29 ca 0d 02 f6 0a c9 |:..Z%(Xu%)......|
00008fb0 32 3a f2 73 75 0d 02 f7 0a c9 33 3a f2 6d 75 0d |2:.su.....3:.mu.|
00008fc0 02 f8 07 cb 3a e1 0d 02 f9 27 dd f2 6e 79 28 68 |....:....'..ny(h|
00008fd0 25 2c 61 25 2c 4b 25 29 3a c8 99 26 34 30 30 45 |%,a%,K%):..&400E|
00008fe0 36 2c 30 3a c8 8e 5a 25 28 74 25 29 ca 0d 02 fa |6,0:..Z%(t%)....|
00008ff0 17 c9 32 3a f2 69 5f 28 76 25 2c 68 25 2c 61 25 |..2:.i_(v%,h%,a%|
00009000 2c 4b 25 29 0d 02 fb 17 c9 35 3a f2 5a 4a 28 76 |,K%).....5:.ZJ(v|
00009010 25 2c 68 25 2c 61 25 2c 4b 25 29 0d 02 fc 17 c9 |%,h%,a%,K%).....|
00009020 31 3a f2 53 4a 28 76 25 2c 68 25 2c 61 25 2c 4b |1:.SJ(v%,h%,a%,K|
00009030 25 29 0d 02 fd 17 c9 33 3a f2 55 75 28 76 25 2c |%).....3:.Uu(v%,|
00009040 68 25 2c 61 25 2c 4b 25 29 0d 02 fe 07 cb 3a e1 |h%,a%,K%).....:.|
00009050 0d 02 ff 1a dd a4 79 79 28 77 25 2c 43 79 25 29 |......yy(w%,Cy%)|
00009060 3a c8 8e 5a 25 28 74 25 29 ca 0d 03 00 15 c9 32 |:..Z%(t%)......2|
00009070 3a 6b 25 3d a4 57 5f 28 77 25 2c 43 79 25 29 0d |:k%=.W_(w%,Cy%).|
00009080 03 01 15 c9 35 3a 6b 25 3d a4 50 5f 28 77 25 2c |....5:k%=.P_(w%,|
00009090 43 79 25 29 0d 03 02 15 c9 31 3a 6b 25 3d a4 66 |Cy%).....1:k%=.f|
000090a0 79 28 77 25 2c 43 79 25 29 0d 03 03 15 c9 33 3a |y(w%,Cy%).....3:|
000090b0 6b 25 3d a4 7a 79 28 77 25 2c 43 79 25 29 0d 03 |k%=.zy(w%,Cy%)..|
000090c0 04 09 cb 3a 3d 6b 25 0d 03 05 19 dd f2 63 75 28 |...:=k%......cu(|
000090d0 70 25 2c 41 25 29 3a c8 8e 5a 25 28 41 25 29 ca |p%,A%):..Z%(A%).|
000090e0 0d 03 06 11 c9 32 3a f2 73 5f 28 70 25 2c 41 25 |.....2:.s_(p%,A%|
000090f0 29 0d 03 07 11 c9 35 3a f2 4e 4a 28 70 25 2c 41 |).....5:.NJ(p%,A|
00009100 25 29 0d 03 08 11 c9 31 3a f2 6e 5f 28 70 25 2c |%).....1:.n_(p%,|
00009110 41 25 29 0d 03 09 11 c9 33 3a f2 78 5f 28 70 25 |A%).....3:.x_(p%|
00009120 2c 41 25 29 0d 03 0a 07 cb 3a e1 0d 03 0b 1b dd |,A%).....:......|
00009130 a4 4b 79 28 53 25 29 3a ea 6f 75 25 3a c8 8e 5a |.Ky(S%):.ou%:..Z|
00009140 25 28 53 25 29 ca 0d 03 0c 0e c9 32 3a 6f 75 25 |%(S%)......2:ou%|
00009150 3d a4 61 79 0d 03 0d 0e c9 35 3a 6f 75 25 3d a4 |=.ay.....5:ou%=.|
00009160 5f 79 0d 03 0e 0e c9 31 3a 6f 75 25 3d a4 4d 5f |_y.....1:ou%=.M_|
00009170 0d 03 0f 0e c9 33 3a 6f 75 25 3d a4 71 79 0d 03 |.....3:ou%=.qy..|
00009180 10 0a cb 3a 3d 6f 75 25 0d 03 11 18 dd f2 62 79 |...:=ou%......by|
00009190 28 58 75 25 29 3a c8 8e 5a 25 28 58 75 25 29 ca |(Xu%):..Z%(Xu%).|
000091a0 0d 03 12 0a c9 32 3a f2 41 5f 0d 03 13 0a c9 33 |.....2:.A_.....3|
000091b0 3a f2 70 4a 0d 03 14 07 cb 3a e1 0d 03 15 27 dd |:.pJ.....:....'.|
000091c0 f2 68 79 28 6e 25 2c 68 25 2c 5f 25 2c 51 25 2c |.hy(n%,h%,_%,Q%,|
000091d0 6f 5f 25 2c 77 4a 25 29 3a c8 8e 5a 25 28 74 25 |o_%,wJ%):..Z%(t%|
000091e0 29 ca 0d 03 16 1f c9 32 3a f2 72 75 28 6e 25 2c |)......2:.ru(n%,|
000091f0 68 25 2c 5f 25 2c 51 25 2c 6f 5f 25 2c 77 4a 25 |h%,_%,Q%,o_%,wJ%|
00009200 29 0d 03 17 1f c9 35 3a f2 66 5f 28 6e 25 2c 68 |).....5:.f_(n%,h|
00009210 25 2c 5f 25 2c 51 25 2c 6f 5f 25 2c 77 4a 25 29 |%,_%,Q%,o_%,wJ%)|
00009220 0d 03 18 1f c9 31 3a f2 51 75 28 6e 25 2c 68 25 |.....1:.Qu(n%,h%|
00009230 2c 5f 25 2c 51 25 2c 6f 5f 25 2c 77 4a 25 29 0d |,_%,Q%,o_%,wJ%).|
00009240 03 19 1f c9 33 3a f2 61 5f 28 6e 25 2c 68 25 2c |....3:.a_(n%,h%,|
00009250 5f 25 2c 51 25 2c 6f 5f 25 2c 77 4a 25 29 0d 03 |_%,Q%,o_%,wJ%)..|
00009260 1a 07 cb 3a e1 0d 03 1b 16 dd f2 58 5f 28 6c 25 |...:.......X_(l%|
00009270 29 3a c8 8e 5a 25 28 74 25 29 ca 0d 03 1c 0d c9 |):..Z%(t%)......|
00009280 32 3a f2 76 28 6c 25 29 0d 03 1d 0e c9 35 3a f2 |2:.v(l%).....5:.|
00009290 48 79 28 6c 25 29 0d 03 1e 0e c9 31 3a f2 4e 79 |Hy(l%).....1:.Ny|
000092a0 28 6c 25 29 0d 03 1f 0e c9 33 3a f2 58 79 28 6c |(l%).....3:.Xy(l|
000092b0 25 29 0d 03 20 07 cb 3a e1 0d 03 21 24 dd f2 44 |%).. ..:...!$..D|
000092c0 4a 28 65 25 2c 77 25 2c 6e 25 2c 58 79 25 2c 54 |J(e%,w%,n%,Xy%,T|
000092d0 79 25 29 3a c8 8e 5a 25 28 74 25 29 ca 0d 03 22 |y%):..Z%(t%)..."|
000092e0 1c c9 32 3a f2 5a 6c 28 65 25 2c 77 25 2c 6e 25 |..2:.Zl(e%,w%,n%|
000092f0 2c 58 79 25 2c 54 79 25 29 0d 03 23 07 cb 3a e1 |,Xy%,Ty%)..#..:.|
00009300 0d 03 24 27 dd a4 43 5f 28 65 25 2c 77 25 2c 43 |..$'..C_(e%,w%,C|
00009310 79 25 29 3a ea 41 25 3a e3 41 25 3d 31 b8 69 79 |y%):.A%:.A%=1.iy|
00009320 25 3a e7 ac 6b 25 8c 0d 03 25 0d c8 8e 5a 25 28 |%:..k%...%...Z%(|
00009330 41 25 29 ca 0d 03 26 18 c9 32 3a 6b 25 3d a4 48 |A%)...&..2:k%=.H|
00009340 79 28 65 25 2c 77 25 2c 43 79 25 29 0d 03 27 18 |y(e%,w%,Cy%)..'.|
00009350 c9 35 3a 6b 25 3d a4 55 79 28 65 25 2c 77 25 2c |.5:k%=.Uy(e%,w%,|
00009360 43 79 25 29 0d 03 28 18 c9 31 3a 6b 25 3d a4 4c |Cy%)..(..1:k%=.L|
00009370 79 28 65 25 2c 77 25 2c 43 79 25 29 0d 03 29 18 |y(e%,w%,Cy%)..).|
00009380 c9 33 3a 6b 25 3d a4 64 79 28 65 25 2c 77 25 2c |.3:k%=.dy(e%,w%,|
00009390 43 79 25 29 0d 03 2a 05 cb 0d 03 2b 0b cd 3a ed |Cy%)..*....+..:.|
000093a0 3a 3d 6b 25 0d 03 2c 1a dd f2 49 4a 3a f2 44 75 |:=k%..,...IJ:.Du|
000093b0 3a f2 4d 75 3a f2 71 75 3a f2 75 4a 3a e1 0d 03 |:.Mu:.qu:.uJ:...|
000093c0 2d 20 dd f2 64 4a 3a ea 41 25 3a e3 41 25 3d 31 |- ..dJ:.A%:.A%=1|
000093d0 b8 69 79 25 3a c8 8e 5a 25 28 41 25 29 ca 0d 03 |.iy%:..Z%(A%)...|
000093e0 2e 0e c9 32 3a f2 6d 5f 28 41 25 29 0d 03 2f 0e |...2:.m_(A%)../.|
000093f0 c9 35 3a f2 57 75 28 41 25 29 0d 03 30 0e c9 31 |.5:.Wu(A%)..0..1|
00009400 3a f2 43 4a 28 41 25 29 0d 03 31 0e c9 33 3a f2 |:.CJ(A%)..1..3:.|
00009410 4f 5f 28 41 25 29 0d 03 32 09 cb 3a ed 3a e1 0d |O_(A%)..2..:.:..|
00009420 03 33 16 dd f2 4f 75 3a f2 4c 4a 3a f2 66 75 3a |.3...Ou:.LJ:.fu:|
00009430 f2 6c 4a 3a e1 0d 03 34 72 dd f2 4b 75 28 7a 25 |.lJ:...4r..Ku(z%|
00009440 29 3a d5 23 7a 25 2c 22 41 64 64 72 65 73 73 20 |):.#z%,"Address |
00009450 62 6f 6f 6b 22 3a f2 75 75 28 7a 25 29 3a d5 23 |book":.uu(z%):.#|
00009460 7a 25 2c 22 41 6e 6e 69 76 65 72 73 61 72 79 22 |z%,"Anniversary"|
00009470 3a f2 73 4a 28 7a 25 29 3a d5 23 7a 25 2c 22 43 |:.sJ(z%):.#z%,"C|
00009480 61 6c 65 6e 64 61 72 22 3a f2 65 5f 28 7a 25 29 |alendar":.e_(z%)|
00009490 3a d5 23 7a 25 2c 22 44 69 61 72 79 22 3a f2 41 |:.#z%,"Diary":.A|
000094a0 75 28 7a 25 29 3a e1 0d 03 35 17 dd f2 51 4a 28 |u(z%):...5...QJ(|
000094b0 41 79 24 2c 7a 25 29 3a c8 8e 41 79 24 ca 0d 03 |Ay$,z%):..Ay$...|
000094c0 36 1b c9 22 41 64 64 72 65 73 73 20 62 6f 6f 6b |6.."Address book|
000094d0 22 3a f2 76 75 28 7a 25 29 0d 03 37 1a c9 22 41 |":.vu(z%)..7.."A|
000094e0 6e 6e 69 76 65 72 73 61 72 79 22 3a f2 53 75 28 |nniversary":.Su(|
000094f0 7a 25 29 0d 03 38 17 c9 22 43 61 6c 65 6e 64 61 |z%)..8.."Calenda|
00009500 72 22 3a f2 71 4a 28 7a 25 29 0d 03 39 14 c9 22 |r":.qJ(z%)..9.."|
00009510 44 69 61 72 79 22 3a f2 62 4a 28 7a 25 29 0d 03 |Diary":.bJ(z%)..|
00009520 3a 07 cb 3a e1 0d 03 3b 1e dd f2 61 4a 28 65 25 |:..:...;...aJ(e%|
00009530 2c 77 25 2c 6e 25 2c 5f 25 2c 51 25 29 3a c8 8e |,w%,n%,_%,Q%):..|
00009540 65 25 ca 0d 03 3c 1e c9 41 25 28 32 29 3a f2 60 |e%...<..A%(2):.`|
00009550 75 28 65 25 2c 77 25 2c 6e 25 2c 5f 25 2c 51 25 |u(e%,w%,n%,_%,Q%|
00009560 29 0d 03 3d 1e c9 41 25 28 33 29 3a f2 5f 4a 28 |)..=..A%(3):._J(|
00009570 65 25 2c 77 25 2c 6e 25 2c 5f 25 2c 51 25 29 0d |e%,w%,n%,_%,Q%).|
00009580 03 3e 1e c9 41 25 28 34 29 3a f2 78 75 28 65 25 |.>..A%(4):.xu(e%|
00009590 2c 77 25 2c 6e 25 2c 5f 25 2c 51 25 29 0d 03 3f |,w%,n%,_%,Q%)..?|
000095a0 1e c9 41 25 28 35 29 3a f2 4a 75 28 65 25 2c 77 |..A%(5):.Ju(e%,w|
000095b0 25 2c 6e 25 2c 5f 25 2c 51 25 29 0d 03 40 07 cb |%,n%,_%,Q%)..@..|
000095c0 3a e1 0d 03 41 19 dd a4 46 5f 28 65 25 2c 77 25 |:...A...F_(e%,w%|
000095d0 2c 43 79 25 29 3a c8 8e 65 25 ca 0d 03 42 1c c9 |,Cy%):..e%...B..|
000095e0 41 25 28 32 29 3a 6b 25 3d a4 72 79 28 65 25 2c |A%(2):k%=.ry(e%,|
000095f0 77 25 2c 43 79 25 29 0d 03 43 08 cb 3a 3d a3 0d |w%,Cy%)..C..:=..|
00009600 03 44 13 dd f2 55 4a 28 70 25 29 3a c8 8e 59 79 |.D...UJ(p%):..Yy|
00009610 25 ca 0d 03 45 16 c9 41 25 28 32 29 3a f2 62 5f |%...E..A%(2):.b_|
00009620 28 70 25 2c 59 79 25 29 0d 03 46 16 c9 41 25 28 |(p%,Yy%)..F..A%(|
00009630 33 29 3a f2 6c 5f 28 70 25 2c 59 79 25 29 0d 03 |3):.l_(p%,Yy%)..|
00009640 47 16 c9 41 25 28 34 29 3a f2 47 4a 28 70 25 2c |G..A%(4):.GJ(p%,|
00009650 59 79 25 29 0d 03 48 16 c9 41 25 28 35 29 3a f2 |Yy%)..H..A%(5):.|
00009660 69 4a 28 70 25 2c 59 79 25 29 0d 03 49 07 cb 3a |iJ(p%,Yy%)..I..:|
00009670 e1 0d 03 4a 36 dd f2 42 75 3a f2 52 5f 28 41 25 |...J6..Bu:.R_(A%|
00009680 28 32 29 29 3a f2 66 4a 28 41 25 28 33 29 29 3a |(2)):.fJ(A%(3)):|
00009690 f2 52 75 28 41 25 28 34 29 29 3a f2 6e 75 28 41 |.Ru(A%(4)):.nu(A|
000096a0 25 28 35 29 29 3a e1 0d 03 4b 36 dd f2 54 75 3a |%(5)):...K6..Tu:|
000096b0 f2 79 5f 28 41 25 28 32 29 29 3a f2 6a 5f 28 41 |.y_(A%(2)):.j_(A|
000096c0 25 28 33 29 29 3a f2 4b 4a 28 41 25 28 34 29 29 |%(3)):.KJ(A%(4))|
000096d0 3a f2 62 75 28 41 25 28 35 29 29 3a e1 0d 03 4c |:.bu(A%(5)):...L|
000096e0 1a dd f2 72 4a 28 4d 79 25 2c 70 25 29 3a c8 8e |...rJ(My%,p%):..|
000096f0 5a 25 28 74 25 29 ca 0d 03 4d 12 c9 33 3a f2 69 |Z%(t%)...M..3:.i|
00009700 79 28 4d 79 25 2c 70 25 29 0d 03 4e 07 cb 3a e1 |y(My%,p%)..N..:.|
00009710 0d 03 4f fc dd f2 44 75 3a 59 4a 25 3d a4 43 28 |..O...Du:YJ%=.C(|
00009720 22 50 61 73 74 65 22 2c 22 50 61 73 74 65 22 2c |"Paste","Paste",|
00009730 31 2c 26 41 29 3a 7a 79 25 3d 2d 31 3a 50 24 3d |1,&A):zy%=-1:P$=|
00009740 22 22 3a 51 24 3d 22 6d 61 69 6c 74 6f 3a 22 3a |"":Q$="mailto:":|
00009750 58 24 3d 22 68 74 74 70 3a 2f 2f 22 3a 48 24 3d |X$="http://":H$=|
00009760 22 49 6d 70 6f 72 74 61 6e 74 20 6e 75 6d 62 65 |"Important numbe|
00009770 72 73 22 3a 6a 4a 25 3d 2d 31 3a 75 75 25 3d a4 |rs":jJ%=-1:uu%=.|
00009780 43 28 22 49 6d 70 6f 72 74 22 2c 22 49 6d 70 6f |C("Import","Impo|
00009790 72 74 22 2c 31 2c 35 29 3a 66 5f 25 3d a4 43 28 |rt",1,5):f_%=.C(|
000097a0 22 41 42 4d 22 2c 22 41 42 4d 22 2c 31 2c 36 29 |"ABM","ABM",1,6)|
000097b0 3a f2 7a 28 66 5f 25 2c 33 2c 59 4a 25 29 3a 46 |:.z(f_%,3,YJ%):F|
000097c0 24 3d 22 22 3a 77 79 25 3d 30 3a 4f 4a 25 3d 30 |$="":wy%=0:OJ%=0|
000097d0 3a 61 5f 25 3d 2d 31 3a 59 24 3d 22 22 3a 6b 75 |:a_%=-1:Y$="":ku|
000097e0 25 3d 30 3a 70 75 25 3d 30 3a 67 4a 25 3d 30 3a |%=0:pu%=0:gJ%=0:|
000097f0 46 5f 25 3d 31 36 3a 51 79 25 3d 33 3a 3a 3a 3a |F_%=16:Qy%=3::::|
00009800 71 5f 25 3d 32 3a 79 5f 25 3d 2d 31 0d 03 50 9e |q_%=2:y_%=-1..P.|
00009810 de 4d 25 28 32 36 29 2c 46 25 28 32 36 29 2c 41 |.M%(26),F%(26),A|
00009820 24 28 26 41 2c 26 45 29 2c 5a 24 28 46 5f 25 2d |$(&A,&E),Z$(F_%-|
00009830 31 2c 31 29 2c 4c 25 28 26 41 2c 31 29 2c 69 6c |1,1),L%(&A,1),il|
00009840 25 26 42 2c 4e 25 28 26 45 29 3a 4e 25 28 29 3d |%&B,N%(&E):N%()=|
00009850 37 3a 4e 25 28 30 29 3d 35 3a 4c 25 28 29 3d 2d |7:N%(0)=5:L%()=-|
00009860 31 3a 24 69 6c 25 3d 22 50 70 74 72 5f 68 79 70 |1:$il%="Pptr_hyp|
00009870 65 72 22 2b bd 30 3a 4d 25 28 30 29 3d 31 3a 75 |er"+.0:M%(0)=1:u|
00009880 79 25 3d 30 3a 7a 24 3d 54 24 2b 22 41 64 64 72 |y%=0:z$=T$+"Addr|
00009890 65 73 73 65 73 22 3a 65 24 3d 54 24 2b 22 49 6d |esses":e$=T$+"Im|
000098a0 70 6f 72 74 61 6e 74 22 3a e1 0d 03 51 0c dd a4 |portant":...Q...|
000098b0 61 79 3d 66 5f 25 0d 03 52 45 dd f2 6d 5f 28 41 |ay=f_%..RE..m_(A|
000098c0 25 29 3a 42 25 28 41 25 29 3d 30 3a 57 25 28 41 |%):B%(A%)=0:W%(A|
000098d0 25 29 3d 32 36 3a 53 25 28 41 25 29 3d 30 3a 4d |%)=26:S%(A%)=0:M|
000098e0 24 28 41 25 29 3d a4 41 28 22 41 64 64 54 61 62 |$(A%)=.A("AddTab|
000098f0 22 29 3a f2 7a 5f 3a f2 61 3a e1 0d 03 53 2d dd |"):.z_:.a:...S-.|
00009900 f2 41 5f 3a e7 76 25 3d 30 8c f2 44 5f 28 69 25 |.A_:.v%=0..D_(i%|
00009910 2c 60 25 2c 64 79 25 2c 2d 6f 25 2d 6a 5f 25 2c |,`%,dy%,-o%-j_%,|
00009920 56 79 25 2c b9 2c b9 29 0d 03 54 05 e1 0d 03 55 |Vy%,.,.)..T....U|
00009930 17 dd f2 73 75 3a f2 73 79 3a e7 7a 5f 25 3d 30 |...su:.sy:.z_%=0|
00009940 8c f2 59 79 0d 03 56 05 e1 0d 03 57 c9 dd f2 69 |..Yy..V....W...i|
00009950 5f 28 76 25 2c 68 25 2c 61 25 2c 4b 25 29 3a ea |_(v%,h%,a%,K%):.|
00009960 4a 6c 25 2c 41 25 2c 41 24 2c 47 25 2c 5a 79 25 |Jl%,A%,A$,G%,Zy%|
00009970 2c 46 25 2c 51 25 2c 5f 25 2c 42 25 2c 43 25 2c |,F%,Q%,_%,B%,C%,|
00009980 79 25 2c 79 4a 25 2c 44 25 2c 45 25 2c 4f 75 25 |y%,yJ%,D%,E%,Ou%|
00009990 2c 47 69 25 2c 52 4a 25 2c 4a 4a 25 3a 4a 4a 25 |,Gi%,RJ%,JJ%:JJ%|
000099a0 3d a4 61 28 28 6d 25 2d 28 51 79 25 2b 32 29 2a |=.a((m%-(Qy%+2)*|
000099b0 32 34 29 2f 51 79 25 29 3a 4a 6c 25 3d a4 4a 28 |24)/Qy%):Jl%=.J(|
000099c0 22 48 6f 6d 65 72 74 6f 6e 2e 4d 65 64 69 75 6d |"Homerton.Medium|
000099d0 22 2c 26 41 2c 26 41 29 3a 5a 79 25 3d 6a 5f 25 |",&A,&A):Zy%=j_%|
000099e0 3a c8 99 26 34 30 30 45 36 2c 37 3a c8 99 26 34 |:..&400E6,7:..&4|
000099f0 30 30 46 33 2c 2c 30 2c 37 3a e7 28 68 25 3d 30 |00F3,,0,7:.(h%=0|
00009a00 29 80 76 25 3e 30 8c f2 52 28 30 2c 61 25 2c 4b |).v%>0..R(0,a%,K|
00009a10 25 29 0d 03 58 1b 5f 25 3d 61 25 2b 68 25 2a 28 |%)..X._%=a%+h%*(|
00009a20 6a 25 2d 34 30 29 3a e7 68 25 3d 30 8c 0d 03 59 |j%-40):.h%=0...Y|
00009a30 57 41 25 3d 30 3a c8 95 41 25 3c 76 25 3a c8 99 |WA%=0:..A%<v%:..|
00009a40 26 34 30 30 45 36 2c 37 3a 86 5f 25 2c 4b 25 2d |&400E6,7:._%,K%-|
00009a50 5a 79 25 2a 28 41 25 2b 31 29 2c 5f 25 2b 34 30 |Zy%*(A%+1),_%+40|
00009a60 2c 4b 25 2d 5a 79 25 2a 28 41 25 2b 31 29 3a e7 |,K%-Zy%*(A%+1):.|
00009a70 4d 25 28 41 25 29 3d 30 8c 52 79 25 3d 32 8b 52 |M%(A%)=0.Ry%=2.R|
00009a80 79 25 3d 35 0d 03 5a 2c c8 99 26 34 30 30 46 33 |y%=5..Z,..&400F3|
00009a90 2c 2c 30 2c 52 79 25 3a e7 41 25 3d 30 8c 41 24 |,,0,Ry%:.A%=0.A$|
00009aa0 3d 22 2b 22 8b 41 24 3d bd 28 36 34 2b 41 25 29 |="+".A$=.(64+A%)|
00009ab0 0d 03 5b 64 c8 99 26 34 30 30 38 36 2c 4a 6c 25 |..[d..&40086,Jl%|
00009ac0 2c 41 24 2c 31 3c 3c 34 2c 5f 25 2b 26 43 2c 4b |,A$,1<<4,_%+&C,K|
00009ad0 25 2d 5a 79 25 2a 41 25 2d 5a 79 25 2b 26 41 3a |%-Zy%*A%-Zy%+&A:|
00009ae0 41 25 2b 3d 31 3a ce 3a e7 76 25 3e 30 8c c8 99 |A%+=1:.:.v%>0...|
00009af0 26 34 30 30 45 36 2c 37 3a 86 5f 25 2b 34 30 2c |&400E6,7:._%+40,|
00009b00 4b 25 2c 5f 25 2b 34 30 2c 4b 25 2d 5a 79 25 2a |K%,_%+40,K%-Zy%*|
00009b10 28 76 25 29 0d 03 5c 24 cc 3a 41 25 3d 76 25 3a |(v%)..\$.:A%=v%:|
00009b20 e7 41 25 3d 30 8c 41 24 3d 22 2b 22 8b 41 24 3d |.A%=0.A$="+".A$=|
00009b30 bd 28 36 34 2b 41 25 29 0d 03 5d b7 c8 99 26 34 |.(64+A%)..]...&4|
00009b40 30 30 45 36 2c 37 3a ec 5f 25 2b 34 30 2c 4b 25 |00E6,7:._%+40,K%|
00009b50 2d 5a 79 25 2a 28 41 25 2b 31 29 3a df 42 59 2d |-Zy%*(A%+1):.BY-|
00009b60 34 30 2c 30 3a df 5f 25 2c 4b 25 2d 6d 25 3a c8 |40,0:._%,K%-m%:.|
00009b70 99 26 34 30 30 38 36 2c 4a 6c 25 2c 41 24 2c 31 |.&40086,Jl%,A$,1|
00009b80 3c 3c 34 2c 5f 25 2b 26 43 2c 4b 25 2d 5a 79 25 |<<4,_%+&C,K%-Zy%|
00009b90 2a 41 25 2d 5a 79 25 2b 26 41 3a 41 25 2b 3d 31 |*A%-Zy%+&A:A%+=1|
00009ba0 3a c8 95 41 25 3c 32 37 3a c8 99 26 34 30 30 45 |:..A%<27:..&400E|
00009bb0 36 2c 37 3a 86 5f 25 2c 4b 25 2d 5a 79 25 2a 28 |6,7:._%,K%-Zy%*(|
00009bc0 41 25 2b 31 29 2c 5f 25 2b 34 30 2c 4b 25 2d 5a |A%+1),_%+40,K%-Z|
00009bd0 79 25 2a 28 41 25 2b 31 29 3a e7 4d 25 28 41 25 |y%*(A%+1):.M%(A%|
00009be0 29 3d 30 8c 52 79 25 3d 32 8b 52 79 25 3d 35 0d |)=0.Ry%=2.Ry%=5.|
00009bf0 03 5e 2c c8 99 26 34 30 30 46 33 2c 2c 30 2c 52 |.^,..&400F3,,0,R|
00009c00 79 25 3a e7 41 25 3d 30 8c 41 24 3d 22 2b 22 8b |y%:.A%=0.A$="+".|
00009c10 41 24 3d bd 28 36 34 2b 41 25 29 0d 03 5f 45 c8 |A$=.(64+A%).._E.|
00009c20 99 26 34 30 30 38 36 2c 4a 6c 25 2c 41 24 2c 31 |.&40086,Jl%,A$,1|
00009c30 3c 3c 34 2c 5f 25 2b 26 43 2c 4b 25 2d 5a 79 25 |<<4,_%+&C,K%-Zy%|
00009c40 2a 41 25 2d 5a 79 25 2b 26 41 3a e7 4d 25 28 41 |*A%-Zy%+&A:.M%(A|
00009c50 25 29 3e 30 80 41 25 3e 76 25 8c 46 25 3d 2d 31 |%)>0.A%>v%.F%=-1|
00009c60 0d 03 60 0b 41 25 2b 3d 31 3a ce 0d 03 61 30 cd |..`.A%+=1:...a0.|
00009c70 3a e7 68 25 3d 31 80 28 46 25 84 4d 25 28 76 25 |:.h%=1.(F%.M%(v%|
00009c80 29 2d 75 79 25 3e 32 2a 51 79 25 29 8c f2 52 28 |)-uy%>2*Qy%)..R(|
00009c90 31 2c 5f 25 2d 6a 25 2c 4b 25 29 0d 03 62 0b e7 |1,_%-j%,K%)..b..|
00009ca0 76 25 3c 3e 30 8c 0d 03 63 21 e7 68 25 3d 30 84 |v%<>0...c!.h%=0.|
00009cb0 28 68 25 3d 31 80 75 79 25 2b 51 79 25 3c 3d 4d |(h%=1.uy%+Qy%<=M|
00009cc0 25 28 76 25 29 29 8c 0d 03 64 82 4f 75 25 3d a4 |%(v%))...d.Ou%=.|
00009cd0 4a 28 22 54 72 69 6e 69 74 79 2e 42 6f 6c 64 22 |J("Trinity.Bold"|
00009ce0 2c 26 45 2c 26 45 29 3a 41 25 3d 75 79 25 2b 68 |,&E,&E):A%=uy%+h|
00009cf0 25 2a 51 79 25 3a 5f 25 3d 61 25 2d 28 34 30 2a |%*Qy%:_%=a%-(40*|
00009d00 28 68 25 3d 30 29 29 2b 26 63 3a c8 95 41 25 3c |(h%=0))+&c:..A%<|
00009d10 4d 25 28 76 25 29 80 42 25 3c 51 79 25 3a 51 25 |M%(v%).B%<Qy%:Q%|
00009d20 3d 4b 25 2d 32 34 2a 28 42 25 2b 31 29 2d 4a 4a |=K%-24*(B%+1)-JJ|
00009d30 25 2a 42 25 3a e7 a4 53 28 5f 25 2c 51 25 2c 64 |%*B%:..S(_%,Q%,d|
00009d40 4a 25 2c 2d 4a 4a 25 29 8c 0d 03 65 55 c8 99 26 |J%,-JJ%)...eU..&|
00009d50 34 30 30 45 36 2c 34 3a f2 6c 28 5f 25 2c 51 25 |400E6,4:.l(_%,Q%|
00009d60 2c 64 4a 25 2c 4a 4a 25 2c 26 63 29 3a 79 25 3d |,dJ%,JJ%,&c):y%=|
00009d70 41 25 83 28 51 79 25 2a 32 29 3a 41 24 3d 22 22 |A%.(Qy%*2):A$=""|
00009d80 3a e7 41 24 28 79 25 2c 31 29 3c 3e 22 22 8c 41 |:.A$(y%,1)<>"".A|
00009d90 24 3d 41 24 28 79 25 2c 31 29 2b 22 20 22 0d 03 |$=A$(y%,1)+" "..|
00009da0 66 6c 41 24 2b 3d 41 24 28 79 25 2c 30 29 3a f2 |flA$+=A$(y%,0):.|
00009db0 56 28 30 2c 4e 25 28 31 29 29 3a f2 72 28 4f 75 |V(0,N%(1)):.r(Ou|
00009dc0 25 2c 41 24 2c 5f 25 2b 26 43 2c 51 25 2d 34 30 |%,A$,_%+&C,Q%-40|
00009dd0 2c 64 4a 25 2d 26 43 2c 34 30 29 3a 44 25 3d 30 |,dJ%-&C,40):D%=0|
00009de0 3a e3 43 25 3d 32 b8 26 45 3a 44 25 2d 3d 28 41 |:.C%=2.&E:D%-=(A|
00009df0 24 28 79 25 2c 43 25 29 3c 3e 22 22 29 3a ed 3a |$(y%,C%)<>""):.:|
00009e00 e7 44 25 3c 35 8c 44 25 3d 35 0d 03 67 35 5a 79 |.D%<5.D%=5..g5Zy|
00009e10 25 3d a4 61 28 28 4a 4a 25 2d 34 38 29 2f 44 25 |%=.a((JJ%-48)/D%|
00009e20 29 3a 43 25 3d 5a 79 25 2f 33 3a e7 5a 79 25 3e |):C%=Zy%/3:.Zy%>|
00009e30 33 30 8c 5a 79 25 3d 33 30 3a 43 25 3d 26 43 0d |30.Zy%=30:C%=&C.|
00009e40 03 68 b1 47 69 25 3d a4 4a 28 22 48 6f 6d 65 72 |.h.Gi%=.J("Homer|
00009e50 74 6f 6e 2e 4d 65 64 69 75 6d 2e 4f 62 6c 69 71 |ton.Medium.Obliq|
00009e60 75 65 22 2c 43 25 2d 32 2c 43 25 2d 32 29 3a 52 |ue",C%-2,C%-2):R|
00009e70 4a 25 3d a4 4a 28 22 54 72 69 6e 69 74 79 2e 4d |J%=.J("Trinity.M|
00009e80 65 64 69 75 6d 22 2c 43 25 2c 43 25 29 3a 47 25 |edium",C%,C%):G%|
00009e90 3d 31 3a e3 43 25 3d 32 b8 38 3a e7 41 24 28 79 |=1:.C%=2.8:.A$(y|
00009ea0 25 2c 43 25 29 3c 3e 22 22 8c 47 25 2b 3d 31 3a |%,C%)<>"".G%+=1:|
00009eb0 f2 56 28 30 2c 4e 25 28 43 25 29 29 3a f2 72 28 |.V(0,N%(C%)):.r(|
00009ec0 52 4a 25 2c 41 24 28 79 25 2c 43 25 29 2c 5f 25 |RJ%,A$(y%,C%),_%|
00009ed0 2b 34 38 2c 51 25 2d 34 32 2d 5a 79 25 2a 28 47 |+48,Q%-42-Zy%*(G|
00009ee0 25 2d 31 29 2c 64 4a 25 2d 34 38 2c 5a 79 25 29 |%-1),dJ%-48,Zy%)|
00009ef0 0d 03 69 2c ed 3a 51 25 2d 3d 4a 4a 25 2d 26 45 |..i,.:Q%-=JJ%-&E|
00009f00 3a e3 43 25 3d 26 45 b8 39 88 2d 31 3a e7 41 24 |:.C%=&E.9.-1:.A$|
00009f10 28 79 25 2c 43 25 29 3c 3e 22 22 8c 0d 03 6a f8 |(y%,C%)<>""...j.|
00009f20 41 24 3d a4 41 28 22 46 6c 64 22 2b c3 28 43 25 |A$=.A("Fld"+.(C%|
00009f30 2d 38 29 29 2b 22 3a 22 3a c8 99 26 34 30 30 46 |-8))+":":..&400F|
00009f40 33 2c 2c 30 2c 4e 25 28 30 29 3a c8 99 26 34 30 |3,,0,N%(0):..&40|
00009f50 30 38 41 2c 47 69 25 3a c8 99 26 34 30 30 39 37 |08A,Gi%:..&40097|
00009f60 2c 2c 41 24 b8 2c 44 25 2c 2c 46 25 3a c8 99 26 |,,A$.,D%,,F%:..&|
00009f70 34 30 30 38 38 2c 2c 46 25 2d 44 25 b8 2c 44 25 |40088,,F%-D%.,D%|
00009f80 3a c8 99 26 34 30 30 38 36 2c 2c 41 24 2c 31 3c |:..&40086,,A$,1<|
00009f90 3c 34 2c 5f 25 2b 39 32 2d 44 25 2c 51 25 2d 34 |<4,_%+92-D%,Q%-4|
00009fa0 3a c8 99 26 34 30 30 46 33 2c 2c 30 2c 4e 25 28 |:..&400F3,,0,N%(|
00009fb0 43 25 29 3a f2 72 28 52 4a 25 2c 41 24 28 79 25 |C%):.r(RJ%,A$(y%|
00009fc0 2c 43 25 29 2c 5f 25 2b 26 36 34 2c 51 25 2d 34 |,C%),_%+&64,Q%-4|
00009fd0 2c 64 4a 25 2d 26 36 34 2c 5a 79 25 2b 34 29 3a |,dJ%-&64,Zy%+4):|
00009fe0 51 25 2b 3d 5a 79 25 3a e7 43 25 3e 3d 26 44 8c |Q%+=Zy%:.C%>=&D.|
00009ff0 f2 72 5f 28 79 25 2c 43 25 2c 5f 25 2b 26 36 34 |.r_(y%,C%,_%+&64|
0000a000 2c 51 25 2d 34 2c 64 4a 25 2d 26 36 34 2c 5a 79 |,Q%-4,dJ%-&64,Zy|
0000a010 25 2b 34 29 0d 03 6b 17 cd 3a ed 3a f2 51 28 52 |%+4)..k..:.:.Q(R|
0000a020 4a 25 29 3a f2 51 28 47 69 25 29 0d 03 6c 1b cd |J%):.Q(Gi%)..l..|
0000a030 3a 41 25 2b 3d 31 3a 42 25 2b 3d 31 3a ce 3a f2 |:A%+=1:B%+=1:.:.|
0000a040 51 28 4f 75 25 29 0d 03 6d 05 cd 0d 03 6e 0c cc |Q(Ou%)..m....n..|
0000a050 3a e7 68 25 3d 30 8c 0d 03 6f e6 4f 75 25 3d a4 |:.h%=0...o.Ou%=.|
0000a060 4a 28 22 54 72 69 6e 69 74 79 2e 42 6f 6c 64 22 |J("Trinity.Bold"|
0000a070 2c 31 36 2c 31 36 29 3a c8 99 26 34 30 30 45 36 |,16,16):..&400E6|
0000a080 2c 34 3a f2 56 28 30 2c 37 29 3a 79 25 3d 6a 25 |,4:.V(0,7):y%=j%|
0000a090 2d 32 2a 26 63 3a f2 6c 28 5f 25 2b 26 63 2c 4b |-2*&c:.l(_%+&c,K|
0000a0a0 25 2d 32 34 2c 79 25 2c 6d 25 2d 32 2a 32 34 2c |%-24,y%,m%-2*24,|
0000a0b0 32 2a 26 63 29 3a f2 4c 28 4f 75 25 2c 48 24 2c |2*&c):.L(Ou%,H$,|
0000a0c0 30 2c 61 25 2b 6a 25 2f 32 2c 4b 25 2d 32 34 2d |0,a%+j%/2,K%-24-|
0000a0d0 26 43 29 3a f2 51 28 4f 75 25 29 3a 79 4a 25 3d |&C):.Q(Ou%):yJ%=|
0000a0e0 26 45 3a 52 4a 25 3d a4 4a 28 22 54 72 69 6e 69 |&E:RJ%=.J("Trini|
0000a0f0 74 79 2e 4d 65 64 69 75 6d 22 2c 79 4a 25 2c 79 |ty.Medium",yJ%,y|
0000a100 4a 25 29 3a 5a 79 25 3d 28 6d 25 2d 32 2a 32 34 |J%):Zy%=(m%-2*24|
0000a110 2d 36 38 2d 32 2a 26 63 29 2f 46 5f 25 3a 51 25 |-68-2*&c)/F_%:Q%|
0000a120 3d 4b 25 2d 32 34 2d 36 38 3a 5f 25 3d 61 25 2b |=K%-24-68:_%=a%+|
0000a130 26 63 3a c8 99 26 34 30 30 45 36 2c 31 0d 03 70 |&c:..&400E6,1..p|
0000a140 a2 86 5f 25 2b 34 38 2c 51 25 2d 5a 79 25 2a 46 |.._%+48,Q%-Zy%*F|
0000a150 5f 25 2c 5f 25 2b 79 25 2d 34 38 2c 51 25 2d 5a |_%,_%+y%-48,Q%-Z|
0000a160 79 25 2a 46 5f 25 3a e3 41 25 3d 30 b8 46 5f 25 |y%*F_%:.A%=0.F_%|
0000a170 2d 31 3a c8 99 26 34 30 30 38 41 2c 52 4a 25 3a |-1:..&4008A,RJ%:|
0000a180 c8 99 26 34 30 30 45 36 2c 31 3a 86 5f 25 2b 34 |..&400E6,1:._%+4|
0000a190 38 2c 51 25 2d 5a 79 25 2a 41 25 2c 5f 25 2b 79 |8,Q%-Zy%*A%,_%+y|
0000a1a0 25 2d 34 38 2c 51 25 2d 5a 79 25 2a 41 25 3a e7 |%-48,Q%-Zy%*A%:.|
0000a1b0 a4 53 28 5f 25 2c 51 25 2d 5a 79 25 2a 41 25 2c |.S(_%,Q%-Zy%*A%,|
0000a1c0 79 25 2c 2d 5a 79 25 29 80 5a 24 28 41 25 2c 30 |y%,-Zy%).Z$(A%,0|
0000a1d0 29 2b 5a 24 28 41 25 2c 31 29 3c 3e 22 22 8c 0d |)+Z$(A%,1)<>""..|
0000a1e0 03 71 85 c8 99 26 34 30 30 39 37 2c 2c 5a 24 28 |.q...&40097,,Z$(|
0000a1f0 41 25 2c 30 29 2b 22 20 20 22 b8 2c 42 25 2c 43 |A%,0)+" ".,B%,C|
0000a200 25 2c 44 25 2c 45 25 3a 42 25 3d 44 25 2d 42 25 |%,D%,E%:B%=D%-B%|
0000a210 3a f2 6f 79 28 42 25 2c 45 25 29 3a c8 99 26 34 |:.oy(B%,E%):..&4|
0000a220 30 30 39 37 2c 2c 5a 24 28 41 25 2c 31 29 b8 2c |0097,,Z$(A%,1).,|
0000a230 43 25 2c 46 25 2c 44 25 3a 43 25 3d 44 25 2d 43 |C%,F%,D%:C%=D%-C|
0000a240 25 3a f2 6f 79 28 43 25 2c 46 25 29 3a e7 42 25 |%:.oy(C%,F%):.B%|
0000a250 2b 43 25 3e 79 25 2d 32 34 84 45 25 2d 46 25 3e |+C%>y%-24.E%-F%>|
0000a260 5a 79 25 8c 0d 03 72 4a e7 5a 79 25 2f 28 45 25 |Zy%...rJ.Zy%/(E%|
0000a270 2d 46 25 29 3c 28 79 25 2d 32 34 29 2f 28 42 25 |-F%)<(y%-24)/(B%|
0000a280 2b 43 25 29 8c 46 25 3d 79 4a 25 2a 5a 79 25 2f |+C%).F%=yJ%*Zy%/|
0000a290 28 45 25 2d 46 25 29 8b 46 25 3d 79 4a 25 2a 28 |(E%-F%).F%=yJ%*(|
0000a2a0 79 25 2d 32 34 29 2f 28 42 25 2b 43 25 29 0d 03 |y%-24)/(B%+C%)..|
0000a2b0 73 3b 43 25 3d 43 25 2a 46 25 2f 79 4a 25 3a 45 |s;C%=C%*F%/yJ%:E|
0000a2c0 25 3d 45 25 2a 46 25 2f 79 4a 25 3a 46 25 3d a4 |%=E%*F%/yJ%:F%=.|
0000a2d0 4a 28 22 54 72 69 6e 69 74 79 2e 4d 65 64 69 75 |J("Trinity.Mediu|
0000a2e0 6d 22 2c 46 25 2c 46 25 29 0d 03 74 0b cc 46 25 |m",F%,F%)..t..F%|
0000a2f0 3d 52 4a 25 0d 03 75 81 cd 3a c8 99 26 34 30 30 |=RJ%..u..:..&400|
0000a300 38 36 2c 2c 5a 24 28 41 25 2c 30 29 2c 31 3c 3c |86,,Z$(A%,0),1<<|
0000a310 34 2c 5f 25 2b 26 43 2c 51 25 2d 5a 79 25 2a 28 |4,_%+&C,Q%-Zy%*(|
0000a320 41 25 2b 30 2e 35 29 2d 45 25 2f 32 3a c8 99 26 |A%+0.5)-E%/2:..&|
0000a330 34 30 30 38 36 2c 2c 5a 24 28 41 25 2c 31 29 2c |40086,,Z$(A%,1),|
0000a340 31 3c 3c 34 2c 5f 25 2b 79 25 2d 43 25 2d 26 43 |1<<4,_%+y%-C%-&C|
0000a350 2c 51 25 2d 5a 79 25 2a 28 41 25 2b 30 2e 35 29 |,Q%-Zy%*(A%+0.5)|
0000a360 2d 45 25 2f 32 3a e7 46 25 3c 3e 52 4a 25 8c f2 |-E%/2:.F%<>RJ%..|
0000a370 51 28 46 25 29 0d 03 76 07 cd 3a ed 0d 03 77 05 |Q(F%)..v..:...w.|
0000a380 cd 0d 03 78 0f cd 3a f2 51 28 4a 6c 25 29 3a e1 |...x..:.Q(Jl%):.|
0000a390 0d 03 79 25 dd f2 73 5f 28 70 25 2c 4f 69 25 29 |..y%..s_(p%,Oi%)|
0000a3a0 3a ea 41 25 2c 42 25 3a 42 25 3d 77 79 25 3a c8 |:.A%,B%:B%=wy%:.|
0000a3b0 8e 21 70 25 ca 0d 03 7a 3b c9 30 3a e3 41 25 3d |.!p%...z;.0:.A%=|
0000a3c0 39 b8 32 33 3a f2 41 28 60 25 2c 41 25 2c 41 24 |9.23:.A(`%,A%,A$|
0000a3d0 28 42 25 2c 41 25 2d 39 29 29 3a ed 3a f2 5f 28 |(B%,A%-9)):.:._(|
0000a3e0 60 25 2c 32 35 2c 30 29 3a f2 4e 28 30 2c 30 29 |`%,25,0):.N(0,0)|
0000a3f0 0d 03 7b 48 c9 31 3a e3 41 25 3d 39 b8 32 33 3a |..{H.1:.A%=9.23:|
0000a400 f2 41 28 60 25 2c 41 25 2c 41 24 28 42 25 2c 41 |.A(`%,A%,A$(B%,A|
0000a410 25 2d 39 29 29 3a ed 3a 46 24 3d 22 22 3a 77 79 |%-9)):.:F$="":wy|
0000a420 25 3d 2d 31 3a f2 4e 28 30 2c 30 29 3a f2 5f 28 |%=-1:.N(0,0):._(|
0000a430 60 25 2c 32 35 2c 31 29 0d 03 7c 15 c9 32 3a f2 |`%,25,1)..|..2:.|
0000a440 71 79 3a e7 4d 25 28 76 25 29 3e 30 8c 0d 03 7d |qy:.M%(v%)>0...}|
0000a450 1b e7 4d 25 28 76 25 29 3c 3d 75 79 25 8c 75 79 |..M%(v%)<=uy%.uy|
0000a460 25 2d 3d 32 2a 51 79 25 0d 03 7e 14 f2 4e 28 76 |%-=2*Qy%..~..N(v|
0000a470 25 2c 75 79 25 29 3a 75 4a 25 3d b9 0d 03 7f 0c |%,uy%):uJ%=.....|
0000a480 cc f2 4e 28 30 2c 30 29 0d 03 80 05 cd 0d 03 81 |..N(0,0)........|
0000a490 18 c9 33 3a e7 70 25 21 34 3e 3d 30 8c 71 5f 25 |..3:.p%!4>=0.q_%|
0000a4a0 3d 70 25 21 34 0d 03 82 0a e7 76 25 3d 30 8c 0d |=p%!4.....v%=0..|
0000a4b0 03 83 24 e3 41 25 3d 30 b8 26 45 3a 41 24 28 42 |..$.A%=0.&E:A$(B|
0000a4c0 25 2c 41 25 29 3d a4 5a 28 60 25 2c 41 25 2b 39 |%,A%)=.Z(`%,A%+9|
0000a4d0 29 3a ed 0d 03 84 0c cd 3a c8 8e 71 5f 25 ca 0d |):......:..q_%..|
0000a4e0 03 85 20 c9 30 3a f2 71 28 41 24 28 42 25 2c 31 |.. .0:.q(A$(B%,1|
0000a4f0 29 2b 22 20 22 2b 41 24 28 42 25 2c 30 29 29 0d |)+" "+A$(B%,0)).|
0000a500 03 86 1e c9 31 3a e3 41 25 3d 32 b8 38 3a f2 71 |....1:.A%=2.8:.q|
0000a510 28 41 24 28 42 25 2c 41 25 29 29 3a ed 0d 03 87 |(A$(B%,A%)):....|
0000a520 38 c9 32 3a f2 71 28 41 24 28 42 25 2c 31 29 2b |8.2:.q(A$(B%,1)+|
0000a530 22 20 22 2b 41 24 28 42 25 2c 30 29 29 3a e3 41 |" "+A$(B%,0)):.A|
0000a540 25 3d 32 b8 38 3a f2 71 28 41 24 28 42 25 2c 41 |%=2.8:.q(A$(B%,A|
0000a550 25 29 29 3a ed 0d 03 88 39 c9 39 3a f2 71 28 41 |%)):....9.9:.q(A|
0000a560 24 28 42 25 2c 31 29 2b 22 20 22 2b 41 24 28 42 |$(B%,1)+" "+A$(B|
0000a570 25 2c 30 29 29 3a e3 41 25 3d 32 b8 26 45 3a f2 |%,0)):.A%=2.&E:.|
0000a580 71 28 41 24 28 42 25 2c 41 25 29 29 3a ed 0d 03 |q(A$(B%,A%)):...|
0000a590 89 15 7f f2 71 28 41 24 28 42 25 2c 71 5f 25 2b |....q(A$(B%,q_%+|
0000a5a0 36 29 29 0d 03 8a 05 cb 0d 03 8b 1f c9 34 3a f2 |6))..........4:.|
0000a5b0 47 79 28 58 24 2b 41 24 28 77 79 25 2c 26 45 29 |Gy(X$+A$(wy%,&E)|
0000a5c0 29 3a 6a 4a 25 3d 31 0d 03 8c 1f c9 35 3a f2 47 |):jJ%=1.....5:.G|
0000a5d0 79 28 51 24 2b 41 24 28 77 79 25 2c 26 44 29 29 |y(Q$+A$(wy%,&D))|
0000a5e0 3a 6a 4a 25 3d 32 0d 03 8d 07 cb 3a e1 0d 03 8e |:jJ%=2.....:....|
0000a5f0 6c dd f2 67 79 3a ea 41 25 3a 41 25 3d 28 77 79 |l..gy:.A%:A%=(wy|
0000a600 25 3c 30 29 3a e3 42 25 3d 30 b8 33 3a f2 4b 28 |%<0):.B%=0.3:.K(|
0000a610 66 5f 25 2c 42 25 2c 41 25 29 3a ed 3a e3 41 25 |f_%,B%,A%):.:.A%|
0000a620 3d 30 b8 39 3a f2 4a 28 59 4a 25 2c 41 25 2c 71 |=0.9:.J(YJ%,A%,q|
0000a630 5f 25 3d 41 25 29 3a ed 3a e3 42 25 3d 34 b8 35 |_%=A%):.:.B%=4.5|
0000a640 3a f2 4b 28 66 5f 25 2c 42 25 2c 31 29 3a ed 3a |:.K(f_%,B%,1):.:|
0000a650 e7 77 79 25 3c 3e 2d 31 8c 0d 03 8f 1e e7 a4 74 |.wy%<>-1.......t|
0000a660 28 22 41 6c 69 61 73 24 55 52 4c 4f 70 65 6e 5f |("Alias$URLOpen_|
0000a670 48 54 54 50 22 29 8c 0d 03 90 1b f2 4b 28 66 5f |HTTP")......K(f_|
0000a680 25 2c 34 2c 41 24 28 77 79 25 2c 26 45 29 3d 22 |%,4,A$(wy%,&E)="|
0000a690 22 29 0d 03 91 22 cd 3a e7 a4 74 28 22 41 6c 69 |")...".:..t("Ali|
0000a6a0 61 73 24 55 52 4c 4f 70 65 6e 5f 4d 61 69 6c 54 |as$URLOpen_MailT|
0000a6b0 6f 22 29 8c 0d 03 92 1b f2 4b 28 66 5f 25 2c 35 |o")......K(f_%,5|
0000a6c0 2c 41 24 28 77 79 25 2c 26 44 29 3d 22 22 29 0d |,A$(wy%,&D)="").|
0000a6d0 03 93 05 cd 0d 03 94 1c cc f2 4b 28 66 5f 25 2c |..........K(f_%,|
0000a6e0 34 2c 31 29 3a f2 4b 28 66 5f 25 2c 35 2c 31 29 |4,1):.K(f_%,5,1)|
0000a6f0 0d 03 95 07 cd 3a e1 0d 03 96 1b dd f2 76 28 6c |.....:.......v(l|
0000a700 25 29 ea 41 25 3a 41 25 3d 76 25 3a e7 6c 25 3d |%).A%:A%=v%:.l%=|
0000a710 31 8c 0d 03 97 17 e7 4d 25 28 76 25 29 3c 3d 75 |1......M%(v%)<=u|
0000a720 79 25 2b 51 79 25 2a 32 8c 0d 03 98 2d f5 41 25 |y%+Qy%*2....-.A%|
0000a730 2b 3d 31 3a fd 41 25 3e 32 36 84 4d 25 28 41 25 |+=1:.A%>26.M%(A%|
0000a740 83 32 37 29 3e 30 3a e7 41 25 3c 32 37 8c f2 4e |.27)>0:.A%<27..N|
0000a750 28 41 25 2c 30 29 0d 03 99 15 cc f2 4e 28 76 25 |(A%,0)......N(v%|
0000a760 2c 75 79 25 2b 51 79 25 2a 32 29 0d 03 9a 05 cd |,uy%+Qy%*2).....|
0000a770 0d 03 9b 12 cc 3a e7 75 79 25 3d 30 80 76 25 3e |.....:.uy%=0.v%>|
0000a780 30 8c 0d 03 9c 37 f5 41 25 2d 3d 31 3a fd 4d 25 |0....7.A%-=1:.M%|
0000a790 28 41 25 29 3e 30 3a f2 4e 28 41 25 2c 4d 25 28 |(A%)>0:.N(A%,M%(|
0000a7a0 41 25 29 2d 31 2d 28 4d 25 28 41 25 29 2d 31 29 |A%)-1-(M%(A%)-1)|
0000a7b0 83 28 51 79 25 2a 32 29 29 0d 03 9d 1b cc e7 76 |.(Qy%*2))......v|
0000a7c0 25 3e 30 8c f2 4e 28 76 25 2c 75 79 25 2d 51 79 |%>0..N(v%,uy%-Qy|
0000a7d0 25 2a 32 29 0d 03 9e 13 cd 3a e7 76 25 3d 30 8c |%*2).....:.v%=0.|
0000a7e0 f2 4e 28 30 2c 30 29 0d 03 9f 07 cd 3a e1 0d 03 |.N(0,0).....:...|
0000a7f0 a0 55 dd f2 72 75 28 6e 25 2c 68 25 2c 5f 25 2c |.U..ru(n%,h%,_%,|
0000a800 51 25 2c 6f 5f 25 2c 77 4a 25 29 3a ea 79 25 2c |Q%,o_%,wJ%):.y%,|
0000a810 41 25 2c 42 25 2c 58 25 2c 59 25 2c 4a 4a 25 3a |A%,B%,X%,Y%,JJ%:|
0000a820 4a 4a 25 3d a4 61 28 28 6d 25 2d 28 51 79 25 2b |JJ%=.a((m%-(Qy%+|
0000a830 32 29 2a 32 34 29 2f 51 79 25 29 3a e7 68 25 3c |2)*24)/Qy%):.h%<|
0000a840 3e 30 8c 0d 03 a1 1a 58 25 3d 26 63 3a e7 5f 25 |>0.....X%=&c:._%|
0000a850 3e 6a 25 2d 34 30 80 6e 25 3c 3e 32 8c 0d 03 a2 |>j%-40.n%<>2....|
0000a860 1c 79 25 3d 2d 51 25 81 6a 5f 25 3a e7 79 25 3c |.y%=-Q%.j_%:.y%<|
0000a870 32 37 80 79 25 3e 76 25 8c 0d 03 a3 1f e7 76 25 |27.y%>v%......v%|
0000a880 3d 30 8c 59 24 3d 46 24 3a 6b 75 25 3d 77 79 25 |=0.Y$=F$:ku%=wy%|
0000a890 3a 70 75 25 3d 4f 4a 25 0d 03 a4 16 e7 4d 25 28 |:pu%=OJ%.....M%(|
0000a8a0 79 25 29 3e 30 8c f2 4e 28 79 25 2c 30 29 0d 03 |y%)>0..N(y%,0)..|
0000a8b0 a5 05 cd 0d 03 a6 05 cd 0d 03 a7 1c cc 3a 58 25 |.............:X%|
0000a8c0 3d 26 63 2b 34 30 3a e7 5f 25 3c 34 30 80 6e 25 |=&c+40:._%<40.n%|
0000a8d0 3c 3e 32 8c 0d 03 a8 16 79 25 3d 2d 51 25 81 6a |<>2.....y%=-Q%.j|
0000a8e0 5f 25 3a e7 79 25 3c 76 25 8c 0d 03 a9 1f e7 79 |_%:.y%<v%......y|
0000a8f0 25 3d 30 8c 46 24 3d 59 24 3a 77 79 25 3d 6b 75 |%=0.F$=Y$:wy%=ku|
0000a900 25 3a 4f 4a 25 3d 70 75 25 0d 03 aa 16 e7 4d 25 |%:OJ%=pu%.....M%|
0000a910 28 79 25 29 3e 30 8c f2 4e 28 79 25 2c 30 29 0d |(y%)>0..N(y%,0).|
0000a920 03 ab 05 cd 0d 03 ac 05 cd 0d 03 ad 0c cd 3a e7 |..............:.|
0000a930 76 25 3e 30 8c 0d 03 ae 70 41 25 3d 30 3a 42 25 |v%>0....pA%=0:B%|
0000a940 3d 2d 31 3a 59 25 3d 2d 32 34 3a 68 25 3d 94 28 |=-1:Y%=-24:h%=.(|
0000a950 68 25 29 3a 46 24 3d 22 22 3a 77 79 25 3d 2d 31 |h%):F$="":wy%=-1|
0000a960 3a c8 95 41 25 3c 51 79 25 80 41 25 2b 75 79 25 |:..A%<Qy%.A%+uy%|
0000a970 2b 51 79 25 2a 68 25 3c 4d 25 28 76 25 29 3a e7 |+Qy%*h%<M%(v%):.|
0000a980 a4 72 28 5f 25 2c 51 25 2c 58 25 2c 59 25 2c 64 |.r(_%,Q%,X%,Y%,d|
0000a990 4a 25 2c 2d 4a 4a 25 29 8c 42 25 3d 41 25 2b 51 |J%,-JJ%).B%=A%+Q|
0000a9a0 79 25 2a 68 25 0d 03 af 1e 59 25 2d 3d 4a 4a 25 |y%*h%....Y%-=JJ%|
0000a9b0 2b 32 34 3a 41 25 2b 3d 31 3a ce 3a e7 42 25 3e |+24:A%+=1:.:.B%>|
0000a9c0 3d 30 8c 0d 03 b0 3a 46 24 3d a4 73 28 41 24 28 |=0....:F$=.s(A$(|
0000a9d0 42 25 2c 30 29 2b 22 20 22 2b 41 24 28 42 25 2c |B%,0)+" "+A$(B%,|
0000a9e0 31 29 29 3a 77 79 25 3d 42 25 3a 4f 4a 25 3d 42 |1)):wy%=B%:OJ%=B|
0000a9f0 25 2b 75 79 25 3a e7 6e 25 3c 3e 32 8c 0d 03 b1 |%+uy%:.n%<>2....|
0000aa00 38 e3 41 25 3d 39 b8 32 33 3a f2 41 28 60 25 2c |8.A%=9.23:.A(`%,|
0000aa10 41 25 2c 41 24 28 42 25 2c 41 25 2d 39 29 29 3a |A%,A$(B%,A%-9)):|
0000aa20 ed 3a f2 5f 28 60 25 2c 32 35 2c 30 29 3a f2 4e |.:._(`%,25,0):.N|
0000aa30 28 30 2c 30 29 0d 03 b2 05 cd 0d 03 b3 05 cd 0d |(0,0)...........|
0000aa40 03 b4 11 cc e7 68 25 3d 30 80 6e 25 3c 3e 32 8c |.....h%=0.n%<>2.|
0000aa50 0d 03 b5 43 5a 79 25 3d 28 6d 25 2d 32 2a 32 34 |...CZy%=(m%-2*24|
0000aa60 2d 36 38 2d 32 2a 26 63 29 2f 46 5f 25 3a 59 25 |-68-2*&c)/F_%:Y%|
0000aa70 3d 2d 28 51 25 2b 32 34 2b 36 38 2d 5a 79 25 29 |=-(Q%+24+68-Zy%)|
0000aa80 2f 5a 79 25 3a e7 59 25 3e 30 80 59 25 3c 3d 46 |/Zy%:.Y%>0.Y%<=F|
0000aa90 5f 25 8c 0d 03 b6 68 67 4a 25 3d 59 25 3a f2 41 |_%....hgJ%=Y%:.A|
0000aaa0 28 47 5f 25 2c 33 2c 5a 24 28 59 25 2d 31 2c 30 |(G_%,3,Z$(Y%-1,0|
0000aab0 29 29 3a f2 41 28 47 5f 25 2c 34 2c 5a 24 28 59 |)):.A(G_%,4,Z$(Y|
0000aac0 25 2d 31 2c 31 29 29 3a c8 97 58 25 2c 59 25 2c |%-1,1)):..X%,Y%,|
0000aad0 41 25 3a c8 99 26 34 30 30 44 34 2c 2c 47 5f 25 |A%:..&400D4,,G_%|
0000aae0 2c 6f 5f 25 2b 47 4a 25 2c 59 25 3a f2 4d 28 47 |,o_%+GJ%,Y%:.M(G|
0000aaf0 5f 25 2c 33 29 3a 51 4a 25 3d b9 0d 03 b7 05 cd |_%,3):QJ%=......|
0000ab00 0d 03 b8 05 cd 0d 03 b9 0f cd 3a e7 6e 25 3d 32 |..........:.n%=2|
0000ab10 8c f2 67 79 0d 03 ba 05 e1 0d 03 bb 1e dd f2 5a |..gy...........Z|
0000ab20 6c 28 65 25 2c 77 25 2c 6e 25 2c 5f 25 2c 51 25 |l(e%,w%,n%,_%,Q%|
0000ab30 29 3a c8 8e 65 25 ca 0d 03 bc 0f c9 60 25 3a e7 |):..e%......`%:.|
0000ab40 6e 25 3c 3e 32 8c 0d 03 bd 09 c8 8e 77 25 ca 0d |n%<>2.......w%..|
0000ab50 03 be 10 c9 32 34 3a f2 6a 28 b9 29 3a f2 61 0d |....24:.j(.):.a.|
0000ab60 03 bf 17 c9 32 35 3a f2 71 79 3a f2 61 3a f2 4d |....25:.qy:.a:.M|
0000ab70 28 60 25 2c 39 29 0d 03 c0 13 c9 32 36 3a f2 61 |(`%,9).....26:.a|
0000ab80 3a f2 4d 28 60 25 2c 39 29 0d 03 c1 23 c9 2d 31 |:.M(`%,9)...#.-1|
0000ab90 2c 30 2c 31 2c 32 2c 33 2c 34 2c 35 2c 36 2c 37 |,0,1,2,3,4,5,6,7|
0000aba0 2c 38 3a f2 4d 28 69 25 2c 2d 31 29 0d 03 c2 05 |,8:.M(i%,-1)....|
0000abb0 cb 0d 03 c3 21 cc f2 67 79 3a f2 43 28 66 5f 25 |....!..gy:.C(f_%|
0000abc0 2c 58 79 25 2d 36 34 2c 54 79 25 2c 65 25 2c 77 |,Xy%-64,Ty%,e%,w|
0000abd0 25 29 0d 03 c4 05 cd 0d 03 c5 0e c9 47 5f 25 3a |%)..........G_%:|
0000abe0 c8 8e 77 25 ca 0d 03 c6 0a c9 35 3a f2 63 79 0d |..w%......5:.cy.|
0000abf0 03 c7 19 c9 36 3a c8 99 26 34 30 30 44 34 2c 2c |....6:..&400D4,,|
0000ac00 2d 31 3a 67 4a 25 3d 30 0d 03 c8 2a c9 37 3a f2 |-1:gJ%=0...*.7:.|
0000ac10 41 28 47 5f 25 2c 33 2c 22 22 29 3a f2 41 28 47 |A(G_%,3,""):.A(G|
0000ac20 5f 25 2c 34 2c 22 22 29 3a f2 4d 28 47 5f 25 2c |_%,4,""):.M(G_%,|
0000ac30 33 29 0d 03 c9 05 cb 0d 03 ca 07 cb 3a e1 0d 03 |3)..........:...|
0000ac40 cb 1c dd a4 57 5f 28 77 25 2c 43 79 25 29 3a 6b |....W_(w%,Cy%):k|
0000ac50 25 3d b9 3a c8 8e 43 79 25 ca 0d 03 cc 11 c9 34 |%=.:..Cy%......4|
0000ac60 31 34 3a f2 76 28 2d 61 5f 25 29 0d 03 cd 10 c9 |14:.v(-a_%).....|
0000ac70 34 31 35 3a f2 76 28 61 5f 25 29 0d 03 ce 2f c9 |415:.v(a_%).../.|
0000ac80 34 33 2c 34 36 31 3a e7 76 25 3e 30 8c 46 24 3d |43,461:.v%>0.F$=|
0000ac90 59 24 3a 77 79 25 3d 6b 75 25 3a 4f 4a 25 3d 70 |Y$:wy%=ku%:OJ%=p|
0000aca0 75 25 3a f2 4e 28 30 2c 30 29 0d 03 cf 2e 7f 3a |u%:.N(0,0).....:|
0000acb0 e7 43 79 25 3e 3d 39 37 80 43 79 25 3c 3d 26 37 |.Cy%>=97.Cy%<=&7|
0000acc0 41 8c 4c 25 3d 43 79 25 2d 33 32 2d 36 34 8b 4c |A.L%=Cy%-32-64.L|
0000acd0 25 3d 43 79 25 2d 36 34 0d 03 d0 10 e7 4c 25 3e |%=Cy%-64.....L%>|
0000ace0 30 80 4c 25 3c 32 38 8c 0d 03 d1 1f e7 76 25 3d |0.L%<28......v%=|
0000acf0 30 8c 59 24 3d 46 24 3a 6b 75 25 3d 77 79 25 3a |0.Y$=F$:ku%=wy%:|
0000ad00 70 75 25 3d 4f 4a 25 0d 03 d2 16 e7 4d 25 28 4c |pu%=OJ%.....M%(L|
0000ad10 25 29 3e 30 8c f2 4e 28 4c 25 2c 30 29 0d 03 d3 |%)>0..N(L%,0)...|
0000ad20 09 cc 6b 25 3d a3 0d 03 d4 05 cd 0d 03 d5 09 cb |..k%=...........|
0000ad30 3a 3d 6b 25 0d 03 d6 1e dd a4 48 79 28 65 25 2c |:=k%......Hy(e%,|
0000ad40 77 25 2c 43 79 25 29 3a 6b 25 3d b9 3a c8 8e 65 |w%,Cy%):k%=.:..e|
0000ad50 25 ca 0d 03 d7 0e c9 60 25 3a c8 8e 43 79 25 ca |%......`%:..Cy%.|
0000ad60 0d 03 d8 17 c9 33 39 38 2c 26 44 2c 33 39 34 3a |.....398,&D,394:|
0000ad70 e7 77 25 3d 32 33 8c 0d 03 d9 08 c8 8e b9 ca 0d |.w%=23..........|
0000ad80 03 da 19 c9 43 79 25 3d 26 44 80 ac a6 2d 32 3a |....Cy%=&D...-2:|
0000ad90 f2 6a 28 b9 29 3a f2 61 0d 03 db 19 c9 43 79 25 |.j(.):.a.....Cy%|
0000ada0 3d 26 44 80 a6 2d 32 3a f2 4d 28 60 25 2c 32 30 |=&D..-2:.M(`%,20|
0000adb0 29 0d 03 dc 0d 7f f2 4d 28 60 25 2c 39 29 0d 03 |)......M(`%,9)..|
0000adc0 dd 05 cb 0d 03 de 10 cc f2 4d 28 60 25 2c 77 25 |.........M(`%,w%|
0000add0 2b 31 29 0d 03 df 05 cd 0d 03 e0 24 c9 33 39 39 |+1)........$.399|
0000ade0 3a e7 77 25 3d 39 8c f2 4d 28 60 25 2c 32 33 29 |:.w%=9..M(`%,23)|
0000adf0 8b f2 4d 28 60 25 2c 77 25 2d 31 29 0d 03 e1 0e |..M(`%,w%-1)....|
0000ae00 c9 34 31 34 3a e7 a6 2d 31 8c 0d 03 e2 09 c8 8e |.414:..-1.......|
0000ae10 77 25 ca 0d 03 e3 24 c9 39 2c 26 41 2c 31 38 2c |w%....$.9,&A,18,|
0000ae20 31 39 2c 32 30 2c 32 31 2c 32 32 3a f2 4d 28 60 |19,20,21,22:.M(`|
0000ae30 25 2c 77 25 2b 31 29 0d 03 e4 10 c9 32 33 3a f2 |%,w%+1).....23:.|
0000ae40 4d 28 60 25 2c 39 29 0d 03 e5 0e 7f f2 4d 28 60 |M(`%,9)......M(`|
0000ae50 25 2c 31 38 29 0d 03 e6 05 cb 0d 03 e7 0d cc f2 |%,18)...........|
0000ae60 76 28 2d 61 5f 25 29 0d 03 e8 05 cd 0d 03 e9 0e |v(-a_%).........|
0000ae70 c9 34 31 35 3a e7 a6 2d 31 8c 0d 03 ea 09 c8 8e |.415:..-1.......|
0000ae80 77 25 ca 0d 03 eb 22 c9 26 41 2c 26 42 2c 31 39 |w%....".&A,&B,19|
0000ae90 2c 32 30 2c 32 31 2c 32 33 3a f2 4d 28 60 25 2c |,20,21,23:.M(`%,|
0000aea0 77 25 2d 31 29 0d 03 ec 10 c9 39 3a f2 4d 28 60 |w%-1).....9:.M(`|
0000aeb0 25 2c 32 33 29 0d 03 ed 0e 7f f2 4d 28 60 25 2c |%,23)......M(`%,|
0000aec0 26 42 29 0d 03 ee 05 cb 0d 03 ef 0c cc f2 76 28 |&B)...........v(|
0000aed0 61 5f 25 29 0d 03 f0 05 cd 0d 03 f1 11 c9 34 36 |a_%)..........46|
0000aee0 31 3a f2 6a 28 b9 29 3a f2 61 0d 03 f2 13 c9 38 |1:.j(.):.a.....8|
0000aef0 33 2d 36 34 3a f2 4d 28 60 25 2c 39 29 0d 03 f3 |3-64:.M(`%,9)...|
0000af00 14 c9 37 30 2d 36 34 3a f2 4d 28 60 25 2c 26 41 |..70-64:.M(`%,&A|
0000af10 29 0d 03 f4 14 c9 36 35 2d 36 34 3a f2 4d 28 60 |).....65-64:.M(`|
0000af20 25 2c 26 42 29 0d 03 f5 14 c9 38 34 2d 36 34 3a |%,&B).....84-64:|
0000af30 f2 4d 28 60 25 2c 31 38 29 0d 03 f6 23 c9 38 38 |.M(`%,18)...#.88|
0000af40 2d 36 34 3a e7 77 79 25 3c 3e 2d 31 8c f2 71 79 |-64:.wy%<>-1..qy|
0000af50 3a f2 61 3a f2 4d 28 60 25 2c 39 29 0d 03 f7 14 |:.a:.M(`%,9)....|
0000af60 c9 36 39 2d 36 34 3a f2 4d 28 60 25 2c 32 32 29 |.69-64:.M(`%,22)|
0000af70 0d 03 f8 14 c9 38 37 2d 36 34 3a f2 4d 28 60 25 |.....87-64:.M(`%|
0000af80 2c 32 33 29 0d 03 f9 09 7f 6b 25 3d a3 0d 03 fa |,23).....k%=....|
0000af90 05 cb 0d 03 fb 0f c9 47 5f 25 3a c8 8e 43 79 25 |.......G_%:..Cy%|
0000afa0 ca 0d 03 fc 19 c9 33 39 38 2c 33 39 39 3a f2 4d |......398,399:.M|
0000afb0 28 47 5f 25 2c 37 2d 77 25 29 0d 03 fd 1b c9 26 |(G_%,7-w%).....&|
0000afc0 44 3a e7 77 25 3d 33 8c f2 4d 28 47 5f 25 2c 34 |D:.w%=3..M(G_%,4|
0000afd0 29 8b f2 63 79 0d 03 fe 09 7f 6b 25 3d a3 0d 03 |)..cy.....k%=...|
0000afe0 ff 05 cb 0d 04 00 09 7f 6b 25 3d a3 0d 04 01 09 |........k%=.....|
0000aff0 cb 3a 3d 6b 25 0d 04 02 5e dd f2 75 75 28 7a 25 |.:=k%...^..uu(z%|
0000b000 29 3a ea 41 25 3a d5 23 7a 25 2c 48 24 3a d5 23 |):.A%:.#z%,H$:.#|
0000b010 7a 25 2c 51 79 25 3a d5 23 7a 25 2c 71 5f 25 3a |z%,Qy%:.#z%,q_%:|
0000b020 d5 23 7a 25 2c 61 5f 25 2b 35 3a d5 23 7a 25 2c |.#z%,a_%+5:.#z%,|
0000b030 51 24 3a d5 23 7a 25 2c 58 24 3a e3 41 25 3d 30 |Q$:.#z%,X$:.A%=0|
0000b040 b8 26 45 3a d5 23 7a 25 2c 4e 25 28 41 25 29 3a |.&E:.#z%,N%(A%):|
0000b050 ed 3a e1 0d 04 03 5e dd f2 76 75 28 7a 25 29 3a |.:....^..vu(z%):|
0000b060 ea 41 25 3a 48 24 3d be 23 7a 25 3a 51 79 25 3d |.A%:H$=.#z%:Qy%=|
0000b070 9a 23 7a 25 3a 71 5f 25 3d 9a 23 7a 25 3a 61 5f |.#z%:q_%=.#z%:a_|
0000b080 25 3d 9a 23 7a 25 2d 35 3a 51 24 3d be 23 7a 25 |%=.#z%-5:Q$=.#z%|
0000b090 3a 58 24 3d be 23 7a 25 3a e3 41 25 3d 30 b8 26 |:X$=.#z%:.A%=0.&|
0000b0a0 45 3a 4e 25 28 41 25 29 3d 9a 23 7a 25 3a ed 3a |E:N%(A%)=.#z%:.:|
0000b0b0 e1 0d 04 04 22 dd f2 60 75 28 73 25 2c 53 79 25 |...."..`u(s%,Sy%|
0000b0c0 2c 70 25 2c 5f 25 2c 51 25 29 3a ea 41 25 3a c8 |,p%,_%,Q%):.A%:.|
0000b0d0 8e b9 ca 0d 04 05 27 c9 53 79 25 3e 3d 33 80 53 |......'.Sy%>=3.S|
0000b0e0 79 25 3c 3d 26 44 3a e7 6e 25 3c 3e 32 8c f2 5a |y%<=&D:.n%<>2..Z|
0000b0f0 28 73 25 2c 53 79 25 2c 31 29 0d 04 06 3b c9 53 |(s%,Sy%,1)...;.S|
0000b100 79 25 3d 39 3a e3 41 25 3d 30 b8 39 3a f2 4a 28 |y%=9:.A%=0.9:.J(|
0000b110 59 4a 25 2c 41 25 2c 71 5f 25 3d 41 25 29 3a ed |YJ%,A%,q_%=A%):.|
0000b120 3a f2 43 28 59 4a 25 2c 5f 25 2c 51 25 2c 73 25 |:.C(YJ%,_%,Q%,s%|
0000b130 2c 53 79 25 29 0d 04 07 4d c9 53 79 25 3e 3d 32 |,Sy%)...M.Sy%>=2|
0000b140 32 80 53 79 25 3c 3d 33 36 3a e3 41 25 3d 30 b8 |2.Sy%<=36:.A%=0.|
0000b150 26 45 3a f2 4a 28 42 79 25 2c 41 25 2c a4 71 28 |&E:.J(By%,A%,.q(|
0000b160 73 25 2c 53 79 25 29 3d 41 25 29 3a ed 3a f2 43 |s%,Sy%)=A%):.:.C|
0000b170 28 42 79 25 2c 5f 25 2c 51 25 2c 73 25 2c 53 79 |(By%,_%,Q%,s%,Sy|
0000b180 25 29 0d 04 08 07 cb 3a e1 0d 04 09 28 dd a4 72 |%).....:....(..r|
0000b190 79 28 73 25 2c 53 79 25 2c 71 61 25 29 3a ea 6a |y(s%,Sy%,qa%):.j|
0000b1a0 75 25 2c 63 25 3a 6b 25 3d a3 3a c8 8e 53 79 25 |u%,c%:k%=.:..Sy%|
0000b1b0 ca 0d 04 0a 13 c9 31 3a 63 25 3d 31 37 3a 6a 75 |......1:c%=17:ju|
0000b1c0 25 3d 31 38 0d 04 0b 13 c9 31 37 3a 63 25 3d 31 |%=18.....17:c%=1|
0000b1d0 38 3a 6a 75 25 3d 31 0d 04 0c 13 c9 31 38 3a 63 |8:ju%=1.....18:c|
0000b1e0 25 3d 31 3a 6a 75 25 3d 31 37 0d 04 0d 0c cb 3a |%=1:ju%=17.....:|
0000b1f0 c8 8e 71 61 25 ca 0d 04 0e 25 c9 26 44 2c 33 39 |..qa%....%.&D,39|
0000b200 34 2c 33 39 38 3a e7 63 25 3c 3e 30 8c f2 4d 28 |4,398:.c%<>0..M(|
0000b210 73 25 2c 63 25 29 3a 6b 25 3d b9 0d 04 0f 20 c9 |s%,c%):k%=.... .|
0000b220 33 39 39 3a e7 6a 75 25 3c 3e 30 8c f2 4d 28 73 |399:.ju%<>0..M(s|
0000b230 25 2c 6a 75 25 29 3a 6b 25 3d b9 0d 04 10 08 cb |%,ju%):k%=......|
0000b240 3a 3d b9 0d 04 11 1a dd f2 62 5f 28 70 25 2c 73 |:=.......b_(p%,s|
0000b250 25 29 3a ea 41 25 3a c8 8e 5f 5f 25 ca 0d 04 12 |%):.A%:..__%....|
0000b260 3f c9 38 3a 71 5f 25 3d 21 70 25 3a e3 41 25 3d |?.8:q_%=!p%:.A%=|
0000b270 30 b8 39 3a f2 4a 28 59 4a 25 2c 41 25 2c 71 5f |0.9:.J(YJ%,A%,q_|
0000b280 25 3d 41 25 29 3a ed 3a f2 41 28 73 25 2c 38 2c |%=A%):.:.A(s%,8,|
0000b290 a4 57 28 59 4a 25 2c 21 70 25 29 29 0d 04 13 30 |.W(YJ%,!p%))...0|
0000b2a0 7f e3 41 25 3d 30 b8 26 46 3a f2 4a 28 42 79 25 |..A%=0.&F:.J(By%|
0000b2b0 2c 41 25 2c 21 70 25 3d 41 25 29 3a ed 3a f2 55 |,A%,!p%=A%):.:.U|
0000b2c0 28 73 25 2c 5f 5f 25 2c 21 70 25 29 0d 04 14 07 |(s%,__%,!p%)....|
0000b2d0 cb 3a e1 0d 04 15 b3 dd f2 52 5f 28 73 25 29 3a |.:.......R_(s%):|
0000b2e0 ea 41 25 3a f2 41 28 73 25 2c 31 2c 48 24 29 3a |.A%:.A(s%,1,H$):|
0000b2f0 e3 41 25 3d 31 b8 35 3a f2 5a 28 73 25 2c 41 25 |.A%=1.5:.Z(s%,A%|
0000b300 2b 32 2c 2d 28 51 79 25 3d 41 25 29 29 3a ed 3a |+2,-(Qy%=A%)):.:|
0000b310 f2 41 28 73 25 2c 38 2c a4 57 28 59 4a 25 2c 71 |.A(s%,8,.W(YJ%,q|
0000b320 5f 25 29 29 3a f2 41 28 73 25 2c 31 37 2c 58 24 |_%)):.A(s%,17,X$|
0000b330 29 3a f2 41 28 73 25 2c 31 38 2c 51 24 29 3a f2 |):.A(s%,18,Q$):.|
0000b340 5a 28 73 25 2c 26 43 2c 2d 28 61 5f 25 3d 2d 31 |Z(s%,&C,-(a_%=-1|
0000b350 29 29 3a f2 5a 28 73 25 2c 26 44 2c 2d 28 61 5f |)):.Z(s%,&D,-(a_|
0000b360 25 3d 31 29 29 3a e3 41 25 3d 30 b8 26 45 3a f2 |%=1)):.A%=0.&E:.|
0000b370 55 28 73 25 2c 41 25 2b 32 32 2c 4e 25 28 41 25 |U(s%,A%+22,N%(A%|
0000b380 29 29 3a ed 3a e1 0d 04 16 5c dd f2 79 5f 28 73 |)):.:....\..y_(s|
0000b390 25 29 3a ea 41 25 2c 42 25 3a 48 24 3d a4 5a 28 |%):.A%,B%:H$=.Z(|
0000b3a0 73 25 2c 31 29 3a 58 24 3d a4 5a 28 73 25 2c 31 |s%,1):X$=.Z(s%,1|
0000b3b0 37 29 3a 51 24 3d a4 5a 28 73 25 2c 31 38 29 3a |7):Q$=.Z(s%,18):|
0000b3c0 42 25 3d 51 79 25 3a e3 41 25 3d 31 b8 35 3a e7 |B%=Qy%:.A%=1.5:.|
0000b3d0 a4 4d 28 73 25 2c 41 25 2b 32 29 8c 51 79 25 3d |.M(s%,A%+2).Qy%=|
0000b3e0 41 25 0d 04 17 1f ed 3a e7 41 25 3c 3e 42 25 80 |A%.....:.A%<>B%.|
0000b3f0 74 25 3d a4 50 28 32 29 8c f2 4e 28 76 25 2c 30 |t%=.P(2)..N(v%,0|
0000b400 29 0d 04 18 1b e7 a4 4d 28 73 25 2c 26 43 29 8c |)......M(s%,&C).|
0000b410 61 5f 25 3d 2d 31 8b 61 5f 25 3d 31 0d 04 19 24 |a_%=-1.a_%=1...$|
0000b420 e3 41 25 3d 30 b8 26 45 3a 4e 25 28 41 25 29 3d |.A%=0.&E:N%(A%)=|
0000b430 a4 71 28 73 25 2c 41 25 2b 32 32 29 3a ed 3a e1 |.q(s%,A%+22):.:.|
0000b440 0d 04 1a 29 dd f2 4e 28 79 25 2c 69 75 25 29 3a |...)..N(y%,iu%):|
0000b450 e7 76 25 3d 30 80 79 25 3c 3e 30 8c f2 4d 28 69 |.v%=0.y%<>0..M(i|
0000b460 25 2c 2d 31 29 3a f2 59 79 0d 04 1b 28 e7 79 25 |%,-1):.Yy...(.y%|
0000b470 3d 30 8c f2 44 5f 28 69 25 2c 60 25 2c 64 79 25 |=0..D_(i%,`%,dy%|
0000b480 2c 2d 6f 25 2d 6a 5f 25 2c 56 79 25 2c b9 2c b9 |,-o%-j_%,Vy%,.,.|
0000b490 29 0d 04 1c 16 70 79 25 3d 30 3a e7 79 25 3c 76 |)....py%=0:.y%<v|
0000b4a0 25 70 79 25 3d 2d 31 0d 04 1d 0f e7 79 25 3e 76 |%py%=-1.....y%>v|
0000b4b0 25 70 79 25 3d 31 0d 04 1e 0b e7 70 79 25 3d 30 |%py%=1.....py%=0|
0000b4c0 8c 0d 04 1f 20 75 4a 25 3d 69 75 25 3c 3e 75 79 |.... uJ%=iu%<>uy|
0000b4d0 25 3a e7 69 75 25 3c 75 79 25 8c 70 79 25 3d 2d |%:.iu%<uy%.py%=-|
0000b4e0 31 0d 04 20 12 e7 69 75 25 3e 75 79 25 8c 70 79 |1.. ..iu%>uy%.py|
0000b4f0 25 3d 31 0d 04 21 2a cd 3a 76 25 3d 79 25 3a 75 |%=1..!*.:v%=y%:u|
0000b500 79 25 3d 69 75 25 3a f2 73 79 3a e7 79 25 3c 3e |y%=iu%:.sy:.y%<>|
0000b510 30 8c f2 58 4a 28 79 25 2c 69 75 25 29 0d 04 22 |0..XJ(y%,iu%).."|
0000b520 05 e1 0d 04 23 ad dd f2 63 79 ea 5a 79 25 2c 59 |....#...cy.Zy%,Y|
0000b530 25 3a 5a 24 28 67 4a 25 2d 31 2c 30 29 3d a4 5a |%:Z$(gJ%-1,0)=.Z|
0000b540 28 47 5f 25 2c 33 29 3a 5a 24 28 67 4a 25 2d 31 |(G_%,3):Z$(gJ%-1|
0000b550 2c 31 29 3d a4 5a 28 47 5f 25 2c 34 29 3a 5a 79 |,1)=.Z(G_%,4):Zy|
0000b560 25 3d 28 6d 25 2d 32 2a 32 34 2d 36 38 2d 32 2a |%=(m%-2*24-68-2*|
0000b570 26 63 29 2f 46 5f 25 3a 59 25 3d 6f 25 2b 32 34 |&c)/F_%:Y%=o%+24|
0000b580 2b 36 38 2b 5a 79 25 2a 28 67 4a 25 2d 31 29 3a |+68+Zy%*(gJ%-1):|
0000b590 f2 44 28 69 25 2c 79 79 25 2b 26 43 2c 2d 59 25 |.D(i%,yy%+&C,-Y%|
0000b5a0 2c 47 4a 25 2d 26 43 2c 2d 59 25 2d 5a 79 25 29 |,GJ%-&C,-Y%-Zy%)|
0000b5b0 3a 65 79 25 3d b9 3a e7 ac a4 47 79 8c c8 99 26 |:ey%=.:...Gy...&|
0000b5c0 34 30 30 44 34 2c 2c 2d 31 3a 67 4a 25 3d 30 0d |400D4,,-1:gJ%=0.|
0000b5d0 04 24 05 e1 0d 04 25 3d dd f2 61 ea 41 25 3a e3 |.$....%=..a.A%:.|
0000b5e0 41 25 3d 39 b8 32 33 3a f2 41 28 60 25 2c 41 25 |A%=9.23:.A(`%,A%|
0000b5f0 2c 22 22 29 3a ed 3a 46 24 3d 22 22 3a 77 79 25 |,""):.:F$="":wy%|
0000b600 3d 2d 31 3a f2 5f 28 60 25 2c 32 35 2c 31 29 3a |=-1:._(`%,25,1):|
0000b610 e1 0d 04 26 4d dd f2 71 79 3a ea 5f 79 25 3a f2 |...&M..qy:._y%:.|
0000b620 5a 5f 3a 5f 79 25 3d a4 5f 28 46 24 29 2d 36 34 |Z_:_y%=._(F$)-64|
0000b630 3a 4d 25 28 5f 79 25 29 2d 3d 31 3a 46 24 3d 22 |:M%(_y%)-=1:F$="|
0000b640 22 3a 77 79 25 3d 2d 31 3a e7 4d 25 28 5f 79 25 |":wy%=-1:.M%(_y%|
0000b650 29 3d 30 8c 46 25 28 5f 79 25 29 3d 2d 31 0d 04 |)=0.F%(_y%)=-1..|
0000b660 27 6d f2 44 28 69 25 2c 64 79 25 2b 6a 25 2d 34 |'m.D(i%,dy%+j%-4|
0000b670 30 2c 2d 6f 25 2d 6a 5f 25 2a 5f 79 25 2c 64 79 |0,-o%-j_%*_y%,dy|
0000b680 25 2b 6a 25 2c 2d 6f 25 2d 6a 5f 25 2a 28 5f 79 |%+j%,-o%-j_%*(_y|
0000b690 25 2b 31 29 29 3a f2 44 28 69 25 2c 79 79 25 2c |%+1)):.D(i%,yy%,|
0000b6a0 2d 6f 25 2d 6a 5f 25 2a 5f 79 25 2c 79 79 25 2b |-o%-j_%*_y%,yy%+|
0000b6b0 34 30 2c 2d 6f 25 2d 6a 5f 25 2a 28 5f 79 25 2b |40,-o%-j_%*(_y%+|
0000b6c0 31 29 29 3a 65 79 25 3d b9 3a e1 0d 04 28 61 dd |1)):ey%=.:...(a.|
0000b6d0 f2 5a 5f 3a ea 42 25 2c 4c 25 2c 41 25 3a 42 25 |.Z_:.B%,L%,A%:B%|
0000b6e0 3d 79 5f 25 3a 4c 25 3d a4 5f 28 46 24 29 2d 36 |=y_%:L%=._(F$)-6|
0000b6f0 34 3a 42 25 3d 46 25 28 4c 25 29 3a 41 25 3d 4f |4:B%=F%(L%):A%=O|
0000b700 4a 25 3a c8 95 41 25 3e 30 3a 42 25 3d 42 25 21 |J%:..A%>0:B%=B%!|
0000b710 34 3a 41 25 2d 3d 31 3a ce 3a e7 4f 4a 25 3d 30 |4:A%-=1:.:.OJ%=0|
0000b720 8c 46 25 28 4c 25 29 3d 42 25 21 34 0d 04 29 19 |.F%(L%)=B%!4..).|
0000b730 e7 42 25 21 34 3c 3e 2d 31 8c 21 28 42 25 21 34 |.B%!4<>-1.!(B%!4|
0000b740 29 3d 21 42 25 0d 04 2a 22 e7 21 42 25 3d 2d 31 |)=!B%..*".!B%=-1|
0000b750 8c 79 5f 25 3d 42 25 21 34 8b 21 28 21 42 25 2b |.y_%=B%!4.!(!B%+|
0000b760 34 29 3d 42 25 21 34 0d 04 2b 13 f2 44 79 28 77 |4)=B%!4..+..Dy(w|
0000b770 5f 25 2c 42 25 2c b9 29 3a e1 0d 04 2c 6f dd f2 |_%,B%,.):...,o..|
0000b780 6a 28 48 61 25 29 3a ea 4f 25 2c 4c 25 2c 4c 24 |j(Ha%):.O%,L%,L$|
0000b790 3a 4c 24 3d a4 76 28 a4 5a 28 60 25 2c 39 29 2b |:L$=.v(.Z(`%,9)+|
0000b7a0 22 20 22 2b a4 5a 28 60 25 2c 26 41 29 29 3a 4c |" "+.Z(`%,&A)):L|
0000b7b0 25 3d a4 5f 28 4c 24 29 2d 36 34 3a 4d 25 28 4c |%=._(L$)-64:M%(L|
0000b7c0 25 29 2b 3d 31 3a e7 46 24 3d 22 22 8c 4f 25 3d |%)+=1:.F$="".O%=|
0000b7d0 4c 25 8b 4f 25 3d a4 5f 28 46 24 29 2d 36 34 3a |L%.O%=._(F$)-64:|
0000b7e0 4d 25 28 4f 25 29 2d 3d 31 0d 04 2d 16 e7 77 79 |M%(O%)-=1..-..wy|
0000b7f0 25 3c 30 8c f2 47 5f 8b f2 5a 5f 3a f2 47 5f 0d |%<0..G_..Z_:.G_.|
0000b800 04 2e 1d 46 24 3d 22 22 3a 77 79 25 3d 2d 31 3a |...F$="":wy%=-1:|
0000b810 e7 48 61 25 8c f2 46 75 28 4c 24 29 0d 04 2f 0b |.Ha%..Fu(L$)../.|
0000b820 65 79 25 3d b9 3a e1 0d 04 30 74 dd f2 46 75 28 |ey%=.:...0t..Fu(|
0000b830 41 24 29 3a ea 42 25 2c 41 25 2c 50 25 3a 50 25 |A$):.B%,A%,P%:P%|
0000b840 3d a4 5f 28 41 24 29 2d 36 34 3a 42 25 3d 46 25 |=._(A$)-64:B%=F%|
0000b850 28 50 25 29 3a c8 95 a4 73 28 a4 54 28 42 25 2c |(P%):...s(.T(B%,|
0000b860 30 29 2b 22 20 22 2b a4 54 28 42 25 2c 31 29 29 |0)+" "+.T(B%,1))|
0000b870 3c 3e 4c 24 3a 42 25 3d 42 25 21 34 3a 41 25 2b |<>L$:B%=B%!4:A%+|
0000b880 3d 31 3a ce 3a f2 4e 28 50 25 2c 41 25 2d 41 25 |=1:.:.N(P%,A%-A%|
0000b890 83 28 32 2a 51 79 25 29 29 3a e1 0d 04 31 c5 dd |.(2*Qy%)):...1..|
0000b8a0 f2 47 5f 3a ea 41 25 2c 42 25 2c 43 25 2c 53 25 |.G_:.A%,B%,C%,S%|
0000b8b0 3a 53 25 3d 26 43 3a e3 41 25 3d 39 b8 32 33 3a |:S%=&C:.A%=9.23:|
0000b8c0 53 25 2b 3d a9 a4 5a 28 60 25 2c 41 25 29 2b 31 |S%+=..Z(`%,A%)+1|
0000b8d0 3a ed 3a 43 25 3d a4 77 28 77 5f 25 2c 53 25 2c |:.:C%=.w(w_%,S%,|
0000b8e0 b9 29 3a 42 25 3d 79 5f 25 3a 43 25 21 38 3d 53 |.):B%=y_%:C%!8=S|
0000b8f0 25 3a 53 25 3d 43 25 2b 26 43 3a e3 41 25 3d 39 |%:S%=C%+&C:.A%=9|
0000b900 b8 32 33 3a 24 28 53 25 29 3d a4 5a 28 60 25 2c |.23:$(S%)=.Z(`%,|
0000b910 41 25 29 2b bd 26 41 3a 53 25 2b 3d a9 28 24 53 |A%)+.&A:S%+=.($S|
0000b920 25 29 3a ed 3a 41 25 3d a4 5f 28 a4 5a 28 60 25 |%):.:A%=._(.Z(`%|
0000b930 2c 39 29 2b 22 20 22 2b a4 5a 28 60 25 2c 26 41 |,9)+" "+.Z(`%,&A|
0000b940 29 29 2d 36 34 3a e7 46 25 28 41 25 29 3d 2d 31 |))-64:.F%(A%)=-1|
0000b950 8c 46 25 28 41 25 29 3d 43 25 3a 41 25 2d 3d 31 |.F%(A%)=C%:A%-=1|
0000b960 0d 04 32 0c e7 42 25 3c 3e 2d 31 8c 0d 04 33 32 |..2..B%<>-1...32|
0000b970 c8 95 46 25 28 41 25 29 3d 2d 31 80 41 25 3e 31 |..F%(A%)=-1.A%>1|
0000b980 3a 41 25 2d 3d 31 3a ce 3a e7 46 25 28 41 25 29 |:A%-=1:.:.F%(A%)|
0000b990 3c 3e 2d 31 8c 42 25 3d 46 25 28 41 25 29 0d 04 |<>-1.B%=F%(A%)..|
0000b9a0 34 55 c8 95 a4 76 28 a4 54 28 42 25 2c 30 29 2b |4U...v(.T(B%,0)+|
0000b9b0 22 20 22 2b a4 54 28 42 25 2c 31 29 29 3c 4c 24 |" "+.T(B%,1))<L$|
0000b9c0 80 42 25 21 34 3c 3e 2d 31 3a 42 25 3d 42 25 21 |.B%!4<>-1:B%=B%!|
0000b9d0 34 3a ce 3a e7 a4 76 28 a4 54 28 42 25 2c 30 29 |4:.:..v(.T(B%,0)|
0000b9e0 2b 22 20 22 2b a4 54 28 42 25 2c 31 29 29 3e 3d |+" "+.T(B%,1))>=|
0000b9f0 4c 24 8c 0d 04 35 18 e7 46 25 28 41 25 29 3d 42 |L$...5..F%(A%)=B|
0000ba00 25 8c 46 25 28 41 25 29 3d 43 25 0d 04 36 36 21 |%.F%(A%)=C%..66!|
0000ba10 43 25 3d 21 42 25 3a 43 25 21 34 3d 42 25 3a 21 |C%=!B%:C%!4=B%:!|
0000ba20 42 25 3d 43 25 3a e7 21 43 25 3c 3e 2d 31 8c 21 |B%=C%:.!C%<>-1.!|
0000ba30 28 21 43 25 2b 34 29 3d 43 25 8b 79 5f 25 3d 43 |(!C%+4)=C%.y_%=C|
0000ba40 25 0d 04 37 1c cc 3a 42 25 21 34 3d 43 25 3a 21 |%..7..:B%!4=C%:!|
0000ba50 43 25 3d 42 25 3a 43 25 21 34 3d 2d 31 0d 04 38 |C%=B%:C%!4=-1..8|
0000ba60 05 cd 0d 04 39 24 cc 79 5f 25 3d 43 25 3a 21 43 |....9$.y_%=C%:!C|
0000ba70 25 3d 2d 31 3a 43 25 21 34 3d 2d 31 3a 46 25 28 |%=-1:C%!4=-1:F%(|
0000ba80 41 25 29 3d 43 25 0d 04 3a 07 cd 3a e1 0d 04 3b |A%)=C%..:..:...;|
0000ba90 29 dd a4 5f 28 41 24 29 3a ea 42 25 3a 42 25 3d |).._(A$):.B%:B%=|
0000baa0 97 28 a4 76 28 41 24 29 29 3a e7 42 25 3c 36 35 |.(.v(A$)):.B%<65|
0000bab0 8c 42 25 3d 36 35 0d 04 3c 07 3d 42 25 0d 04 3d |.B%=65..<.=B%..=|
0000bac0 66 dd a4 76 28 41 24 29 3a ea 42 25 3a 41 24 3d |f..v(A$):.B%:A$=|
0000bad0 a4 73 28 41 24 29 3a 42 25 3d 97 c0 41 24 2c 31 |.s(A$):B%=..A$,1|
0000bae0 29 3a c8 95 ac 28 42 25 3e 34 37 80 42 25 3c 35 |):...(B%>47.B%<5|
0000baf0 38 29 80 ac 28 42 25 3e 36 34 80 42 25 3c 39 31 |8)..(B%>64.B%<91|
0000bb00 29 80 41 24 3c 3e 22 22 3a 41 24 3d c1 41 24 2c |).A$<>"":A$=.A$,|
0000bb10 32 29 3a 42 25 3d 97 c0 41 24 2c 31 29 3a ce 3a |2):B%=..A$,1):.:|
0000bb20 3d 41 24 0d 04 3e be dd f2 74 79 28 6c 25 2c 79 |=A$..>...ty(l%,y|
0000bb30 25 29 3a ea 41 25 3a 5f 79 25 3d 6a 25 2d 34 30 |%):.A%:_y%=j%-40|
0000bb40 3a 79 25 21 38 3d 21 79 25 2b 5f 79 25 3a 79 25 |:y%!8=!y%+_y%:y%|
0000bb50 21 34 38 3d 79 25 21 34 30 2b 5f 79 25 3a 79 25 |!48=y%!40+_y%:y%|
0000bb60 2b 3d 38 38 2b 38 3a e3 41 25 3d 26 42 b8 31 37 |+=88+8:.A%=&B.17|
0000bb70 3a 79 25 21 28 41 25 2a 33 32 29 3d 5f 79 25 2d |:y%!(A%*32)=_y%-|
0000bb80 31 36 3a ed 3a e3 41 25 3d 38 b8 32 33 3a 41 25 |16:.:.A%=8.23:A%|
0000bb90 2d 3d 37 2a 28 41 25 3d 26 42 29 3a 79 25 21 28 |-=7*(A%=&B):y%!(|
0000bba0 41 25 2a 33 32 29 3d 5f 79 25 3a ed 3a 79 25 21 |A%*32)=_y%:.:y%!|
0000bbb0 28 32 34 2a 33 32 2d 38 29 3d 28 5f 79 25 2d 33 |(24*32-8)=(_y%-3|
0000bbc0 38 34 29 2f 34 3a 79 25 21 28 32 34 2a 33 32 29 |84)/4:y%!(24*32)|
0000bbd0 3d 79 25 21 28 32 34 2a 33 32 2d 38 29 2b 26 38 |=y%!(24*32-8)+&8|
0000bbe0 30 0d 04 3f 85 79 25 21 28 32 35 2a 33 32 2d 38 |0..?.y%!(25*32-8|
0000bbf0 29 3d 79 25 21 28 32 34 2a 33 32 29 2b 28 5f 79 |)=y%!(24*32)+(_y|
0000bc00 25 2d 33 38 34 29 2f 34 3a 79 25 21 28 32 35 2a |%-384)/4:y%!(25*|
0000bc10 33 32 29 3d 79 25 21 28 32 35 2a 33 32 2d 38 29 |32)=y%!(25*32-8)|
0000bc20 2b 26 38 30 3a 79 25 21 28 32 36 2a 33 32 2d 38 |+&80:y%!(26*32-8|
0000bc30 29 3d 79 25 21 28 32 35 2a 33 32 29 2b 28 5f 79 |)=y%!(25*32)+(_y|
0000bc40 25 2d 33 38 34 29 2f 34 3a 79 25 21 28 32 36 2a |%-384)/4:y%!(26*|
0000bc50 33 32 29 3d 79 25 21 28 32 36 2a 33 32 2d 38 29 |32)=y%!(26*32-8)|
0000bc60 2b 26 38 30 3a e1 0d 04 40 6b dd f2 7a 5f 3a ea |+&80:...@k..z_:.|
0000bc70 41 25 2c 42 25 2c 43 25 2c 53 25 2c 7a 25 2c 4c |A%,B%,C%,S%,z%,L|
0000bc80 25 3a e3 41 25 3d 30 b8 32 36 3a 4d 25 28 41 25 |%:.A%=0.26:M%(A%|
0000bc90 29 3d 30 3a 46 25 28 41 25 29 3d 2d 31 3a ed 3a |)=0:F%(A%)=-1:.:|
0000bca0 4d 25 28 30 29 3d 31 3a 43 25 3d 2d 31 3a 79 5f |M%(0)=1:C%=-1:y_|
0000bcb0 25 3d 2d 31 3a 46 5f 25 3d 31 36 3a 7a 25 3d 8e |%=-1:F_%=16:z%=.|
0000bcc0 28 7a 24 29 3a e7 ac 6c 4a 25 80 7a 25 3c 3e 30 |(z$):..lJ%.z%<>0|
0000bcd0 8c 0d 04 41 3b c8 95 ac c5 23 7a 25 3a 53 25 3d |...A;....#z%:S%=|
0000bce0 bb be 23 7a 25 3a 42 25 3d a4 77 28 77 5f 25 2c |..#z%:B%=.w(w_%,|
0000bcf0 53 25 2c b9 29 3a e7 43 25 3c 3e 2d 31 8c 43 25 |S%,.):.C%<>-1.C%|
0000bd00 21 34 3d 42 25 8b 79 5f 25 3d 42 25 0d 04 42 67 |!4=B%.y_%=B%..Bg|
0000bd10 21 42 25 3d 43 25 3a 42 25 21 38 3d 53 25 3a c8 |!B%=C%:B%!8=S%:.|
0000bd20 99 26 43 2c 34 2c 7a 25 2c 42 25 2b 26 43 2c 53 |.&C,4,z%,B%+&C,S|
0000bd30 25 2d 26 43 3a 4c 25 3d a4 5f 28 a4 54 28 42 25 |%-&C:L%=._(.T(B%|
0000bd40 2c 30 29 2b 22 20 22 2b a4 54 28 42 25 2c 31 29 |,0)+" "+.T(B%,1)|
0000bd50 29 2d 36 34 3a 4d 25 28 4c 25 29 2b 3d 31 3a e7 |)-64:M%(L%)+=1:.|
0000bd60 46 25 28 4c 25 29 3d 2d 31 8c 46 25 28 4c 25 29 |F%(L%)=-1.F%(L%)|
0000bd70 3d 42 25 0d 04 43 15 43 25 3d 42 25 3a e7 73 5f |=B%..C.C%=B%:.s_|
0000bd80 25 8c f2 64 28 ac 31 29 0d 04 44 16 ce 3a e7 79 |%..d(.1)..D..:.y|
0000bd90 5f 25 3c 3e 2d 31 8c 42 25 21 34 3d 2d 31 0d 04 |_%<>-1.B%!4=-1..|
0000bda0 45 08 d9 23 7a 25 0d 04 46 19 cd 3a 7a 25 3d 8e |E..#z%..F..:z%=.|
0000bdb0 65 24 3a e7 ac 6c 4a 25 80 7a 25 3c 3e 30 8c 0d |e$:..lJ%.z%<>0..|
0000bdc0 04 47 3c 46 5f 25 3d bb be 23 7a 25 3a e3 42 25 |.G<F_%=..#z%:.B%|
0000bdd0 3d 30 b8 46 5f 25 2d 31 3a 5a 24 28 42 25 2c 30 |=0.F_%-1:Z$(B%,0|
0000bde0 29 3d be 23 7a 25 3a 5a 24 28 42 25 2c 31 29 3d |)=.#z%:Z$(B%,1)=|
0000bdf0 be 23 7a 25 3a ed 3a d9 23 7a 25 0d 04 48 07 cd |.#z%:.:.#z%..H..|
0000be00 3a e1 0d 04 49 a5 dd f2 4c 4a 3a ea 7a 25 2c 42 |:...I...LJ:.z%,B|
0000be10 25 2c 53 25 2c 41 25 3a 7a 25 3d ae 7a 24 3a 42 |%,S%,A%:z%=.z$:B|
0000be20 25 3d 79 5f 25 3a c8 95 42 25 3c 3e 2d 31 3a d5 |%=y_%:..B%<>-1:.|
0000be30 23 7a 25 2c c3 42 25 21 38 3a c8 99 26 43 2c 32 |#z%,.B%!8:..&C,2|
0000be40 2c 7a 25 2c 42 25 2b 26 43 2c 42 25 21 38 20 2d |,z%,B%+&C,B%!8 -|
0000be50 26 43 3a 42 25 3d 42 25 21 34 3a ce 3a d9 23 7a |&C:B%=B%!4:.:.#z|
0000be60 25 3a 7a 25 3d ae 65 24 3a d5 23 7a 25 2c c3 46 |%:z%=.e$:.#z%,.F|
0000be70 5f 25 3a e3 41 25 3d 30 b8 46 5f 25 2d 31 3a d5 |_%:.A%=0.F_%-1:.|
0000be80 23 7a 25 2c 5a 24 28 41 25 2c 30 29 2b bd 26 41 |#z%,Z$(A%,0)+.&A|
0000be90 2b 5a 24 28 41 25 2c 31 29 3a ed 3a d9 23 7a 25 |+Z$(A%,1):.:.#z%|
0000bea0 3a 7a 25 3d 30 3a e1 0d 04 4a 19 dd f2 58 4a 28 |:z%=0:...J...XJ(|
0000beb0 5f 79 25 2c 6b 69 25 29 3a e7 5f 79 25 3e 30 8c |_y%,ki%):._y%>0.|
0000bec0 0d 04 4b a6 ea 41 25 2c 42 25 2c 43 25 2c 46 25 |..K..A%,B%,C%,F%|
0000bed0 3a 42 25 3d 46 25 28 5f 79 25 29 3a c8 95 6b 69 |:B%=F%(_y%):..ki|
0000bee0 25 3e 30 3a 42 25 3d 42 25 21 34 3a 6b 69 25 2d |%>0:B%=B%!4:ki%-|
0000bef0 3d 31 3a ce 3a f5 e3 43 25 3d 30 b8 26 45 3a 41 |=1:.:..C%=0.&E:A|
0000bf00 24 28 41 25 2c 43 25 29 3d a4 54 28 42 25 2c 43 |$(A%,C%)=.T(B%,C|
0000bf10 25 29 3a ed 3a 41 25 2b 3d 31 3a 46 25 3d 28 41 |%):.:A%+=1:F%=(A|
0000bf20 25 3e 51 79 25 2a 32 2d 31 29 84 42 25 21 34 3d |%>Qy%*2-1).B%!4=|
0000bf30 2d 31 3a 42 25 3d 42 25 21 34 3a e7 ac 46 25 8c |-1:B%=B%!4:..F%.|
0000bf40 46 25 3d 28 a4 5f 28 a4 54 28 42 25 2c 30 29 2b |F%=(._(.T(B%,0)+|
0000bf50 22 20 22 2b a4 54 28 42 25 2c 31 29 29 2d 36 34 |" "+.T(B%,1))-64|
0000bf60 3c 3e 5f 79 25 29 0d 04 4c 07 fd 46 25 0d 04 4d |<>_y%)..L..F%..M|
0000bf70 07 cd 3a e1 0d 04 4e 5f dd a4 54 28 42 25 2c 4c |..:...N_..T(B%,L|
0000bf80 25 29 3a ea 41 24 3a 42 25 2b 3d 26 43 3a c8 95 |%):.A$:B%+=&C:..|
0000bf90 4c 25 3e 30 3a c8 95 3f 42 25 3c 3e 26 41 3a 42 |L%>0:..?B%<>&A:B|
0000bfa0 25 2b 3d 31 3a ce 3a 42 25 2b 3d 31 3a 4c 25 2d |%+=1:.:B%+=1:L%-|
0000bfb0 3d 31 3a ce 3a c8 95 3f 42 25 3c 3e 26 41 3a 41 |=1:.:..?B%<>&A:A|
0000bfc0 24 2b 3d bd 3f 42 25 3a 42 25 2b 3d 31 3a ce 3a |$+=.?B%:B%+=1:.:|
0000bfd0 3d 41 24 0d 04 4f 69 dd f2 52 4a 28 53 24 29 3a |=A$..Oi..RJ(S$):|
0000bfe0 ea 74 24 2c 41 25 2c 42 25 2c 53 25 2c 49 25 2c |.t$,A%,B%,S%,I%,|
0000bff0 78 61 25 2c 65 61 25 2c 57 61 25 2c 6b 6c 25 3a |xa%,ea%,Wa%,kl%:|
0000c000 70 4a 25 3d 30 3a 6e 4a 25 3d 30 3a 7a 25 3d 8e |pJ%=0:nJ%=0:z%=.|
0000c010 53 24 3a c8 95 ac c5 23 7a 25 3a 74 24 3d be 23 |S$:....#z%:t$=.#|
0000c020 7a 25 3a 41 25 3d a4 4a 5f 28 74 24 29 3a e7 41 |z%:A%=.J_(t$):.A|
0000c030 25 3e 6e 4a 25 8c 6e 4a 25 3d 41 25 0d 04 50 1e |%>nJ%.nJ%=A%..P.|
0000c040 70 4a 25 2b 3d 31 3a ce 3a d9 23 7a 25 3a 7a 25 |pJ%+=1:.:.#z%:z%|
0000c050 3d 30 3a e7 6e 4a 25 3e 30 8c 0d 04 51 ca c8 99 |=0:.nJ%>0...Q...|
0000c060 26 34 30 30 44 39 2c 2c 4a 24 2b 22 2e 52 65 73 |&400D9,,J$+".Res|
0000c070 6f 75 72 63 65 73 2e 44 65 66 61 75 6c 74 2e 54 |ources.Default.T|
0000c080 65 6d 70 6c 61 74 65 73 22 3a c8 99 26 34 30 30 |emplates":..&400|
0000c090 44 42 2c 2c 2c 30 2c 30 2c 30 2c 22 49 6d 70 6f |DB,,,0,0,0,"Impo|
0000c0a0 72 74 22 b8 2c 57 61 25 2c 6b 6c 25 3a c8 99 33 |rt".,Wa%,kl%:..3|
0000c0b0 30 2c 36 2c 2c 2c 57 61 25 b8 2c 2c 7a 6c 25 3b |0,6,,,Wa%.,,zl%;|
0000c0c0 78 61 25 3a c8 99 33 30 2c 36 2c 2c 2c 6b 6c 25 |xa%:..30,6,,,kl%|
0000c0d0 b8 2c 2c 74 6c 25 3b 65 61 25 3a c8 99 26 34 30 |.,,tl%;ea%:..&40|
0000c0e0 30 44 42 2c 2c 7a 6c 25 2c 74 6c 25 2c 74 6c 25 |0DB,,zl%,tl%,tl%|
0000c0f0 2b 6b 6c 25 2c 59 6c 25 2c 22 49 6d 70 6f 72 74 |+kl%,Yl%,"Import|
0000c100 22 2c 30 3a c8 99 26 34 30 30 43 31 2c 2c 7a 6c |",0:..&400C1,,zl|
0000c110 25 b8 7a 79 25 3a c8 99 26 34 30 30 44 41 3a 50 |%.zy%:..&400DA:P|
0000c120 24 3d 53 24 0d 04 52 3c 42 25 3d 31 3a e3 41 25 |$=S$..R<B%=1:.A%|
0000c130 3d 26 41 b8 35 32 88 33 3a f2 41 28 7a 79 25 2c |=&A.52.3:.A(zy%,|
0000c140 41 25 2c c3 42 25 29 3a e7 42 25 3e 30 8c 42 25 |A%,.B%):.B%>0.B%|
0000c150 2b 3d 31 3a e7 42 25 3e 6e 4a 25 8c 42 25 3d 30 |+=1:.B%>nJ%.B%=0|
0000c160 0d 04 53 40 ed 3a f2 41 28 7a 79 25 2c 35 34 2c |..S@.:.A(zy%,54,|
0000c170 a4 41 28 22 49 6d 70 6f 72 74 31 22 29 29 3a f2 |.A("Import1")):.|
0000c180 41 28 7a 79 25 2c 35 35 2c a4 41 28 22 49 6d 70 |A(zy%,55,.A("Imp|
0000c190 6f 72 74 31 22 29 29 3a f2 66 28 53 24 2c 31 29 |ort1")):.f(S$,1)|
0000c1a0 0d 04 54 1b cc 50 24 3d 22 22 3a f2 42 28 a4 41 |..T..P$="":.B(.A|
0000c1b0 28 22 45 72 72 43 53 56 22 29 29 0d 04 55 07 cd |("ErrCSV"))..U..|
0000c1c0 3a e1 0d 04 56 30 dd f2 43 79 3a 70 4a 25 3d 30 |:...V0..Cy:pJ%=0|
0000c1d0 3a 6e 4a 25 3d 30 3a e7 50 24 3c 3e 22 22 8c ff |:nJ%=0:.P$<>""..|
0000c1e0 22 52 65 6d 6f 76 65 20 22 2b 50 24 3a 50 24 3d |"Remove "+P$:P$=|
0000c1f0 22 22 0d 04 57 0d e7 7a 79 25 3c 3e 2d 31 8c 0d |""..W..zy%<>-1..|
0000c200 04 58 37 21 55 25 3d 7a 79 25 3a 7a 79 25 3d 2d |.X7!U%=zy%:zy%=-|
0000c210 31 3a c8 99 26 34 30 30 43 33 2c 2c 55 25 3a c8 |1:..&400C3,,U%:.|
0000c220 99 33 30 2c 37 2c 2c 7a 6c 25 3a c8 99 33 30 2c |.30,7,,zl%:..30,|
0000c230 37 2c 2c 74 6c 25 0d 04 59 07 cd 3a e1 0d 04 5a |7,,tl%..Y..:...Z|
0000c240 78 dd f2 66 28 53 24 2c 4b 6c 25 29 3a ea 41 25 |x..f(S$,Kl%):.A%|
0000c250 2c 42 25 2c 53 25 2c 6d 24 2c 68 5f 25 3a 6d 24 |,B%,S%,m$,h_%:m$|
0000c260 3d a4 73 79 28 53 24 2c 4b 6c 25 29 3a 46 24 3d |=.sy(S$,Kl%):F$=|
0000c270 22 22 3a 77 79 25 3d 2d 31 3a f2 5f 28 60 25 2c |"":wy%=-1:._(`%,|
0000c280 32 35 2c 31 29 3a e3 41 25 3d 39 b8 32 33 3a 42 |25,1):.A%=9.23:B|
0000c290 25 3d 26 41 2b 28 41 25 2d 39 29 2a 33 3a 68 5f |%=&A+(A%-9)*3:h_|
0000c2a0 25 3d bb a4 5a 28 7a 79 25 2c 42 25 29 3a e7 42 |%=..Z(zy%,B%):.B|
0000c2b0 25 3c 26 45 8c 0d 04 5b 21 53 25 3d a4 6b 28 75 |%<&E...[!S%=.k(u|
0000c2c0 75 25 2c a4 5a 28 7a 79 25 2c 35 35 2b 28 42 25 |u%,.Z(zy%,55+(B%|
0000c2d0 3d 26 41 29 29 29 0d 04 5c 09 cc 53 25 3d 30 0d |=&A)))..\..S%=0.|
0000c2e0 04 5d 0d cd 3a e7 68 5f 25 3e 30 8c 0d 04 5e 1c |.]..:.h_%>0...^.|
0000c2f0 f2 41 28 60 25 2c 41 25 2c a4 65 79 28 6d 24 2c |.A(`%,A%,.ey(m$,|
0000c300 68 5f 25 2c 53 25 29 29 0d 04 5f 11 cc f2 41 28 |h_%,S%)).._...A(|
0000c310 60 25 2c 41 25 2c 22 22 29 0d 04 60 2a cd 3a ed |`%,A%,"")..`*.:.|
0000c320 3a f2 41 28 7a 79 25 2c 35 39 2c c3 4b 6c 25 29 |:.A(zy%,59,.Kl%)|
0000c330 3a e7 ac 56 79 25 8c f2 77 28 69 25 2c 2d 31 2c |:..Vy%..w(i%,-1,|
0000c340 2d 31 29 0d 04 61 3c 56 5f 25 3d 74 25 3a 7a 5f |-1)..a<V_%=t%:z_|
0000c350 25 3d 76 25 3a 74 25 3d a4 50 28 32 29 3a f2 4e |%=v%:t%=.P(2):.N|
0000c360 28 30 2c 30 29 3a e7 56 5f 25 3c 3e 74 25 84 7a |(0,0):.V_%<>t%.z|
0000c370 5f 25 3c 3e 76 25 8c 70 79 25 3d 30 3a f2 4f 0d |_%<>v%.py%=0:.O.|
0000c380 04 62 12 f2 77 28 7a 79 25 2c 2d 31 2c 30 29 3a |.b..w(zy%,-1,0):|
0000c390 e1 0d 04 63 42 dd a4 73 79 28 53 24 2c 4b 6c 25 |...cB..sy(S$,Kl%|
0000c3a0 29 3a ea 41 24 3a 7a 25 3d 8e 53 24 3a c8 95 4b |):.A$:z%=.S$:..K|
0000c3b0 6c 25 3e 30 3a 41 24 3d be 23 7a 25 3a 4b 6c 25 |l%>0:A$=.#z%:Kl%|
0000c3c0 2d 3d 31 3a ce 3a d9 23 7a 25 3a 7a 25 3d 30 3a |-=1:.:.#z%:z%=0:|
0000c3d0 3d 41 24 0d 04 64 43 dd a4 65 79 28 41 24 2c 68 |=A$..dC..ey(A$,h|
0000c3e0 5f 25 2c 77 61 25 29 3a ea 43 4a 25 2c 42 25 2c |_%,wa%):.CJ%,B%,|
0000c3f0 5a 24 2c 49 6c 25 3a c8 95 68 5f 25 3e 31 80 41 |Z$,Il%:..h_%>1.A|
0000c400 24 3c 3e 22 22 3a e7 97 41 24 3d 33 34 8c 43 4a |$<>"":..A$=34.CJ|
0000c410 25 3d ac 43 4a 25 0d 04 65 17 e7 97 41 24 3d 34 |%=.CJ%..e...A$=4|
0000c420 34 80 ac 43 4a 25 8c 68 5f 25 2d 3d 31 0d 04 66 |4..CJ%.h_%-=1..f|
0000c430 27 41 24 3d c1 41 24 2c 32 29 3a ce 3a e7 97 41 |'A$=.A$,2):.:..A|
0000c440 24 3d 33 34 8c 43 4a 25 3d b9 3a 41 24 3d c1 41 |$=34.CJ%=.:A$=.A|
0000c450 24 2c 32 29 0d 04 67 24 c8 95 ac 49 6c 25 3a e7 |$,2)..g$...Il%:.|
0000c460 97 41 24 3d 33 34 84 41 24 3d 22 22 8c 43 4a 25 |.A$=34.A$="".CJ%|
0000c470 3d a3 3a 49 6c 25 3d b9 0d 04 68 16 e7 97 41 24 |=.:Il%=...h...A$|
0000c480 3d 34 34 80 ac 43 4a 25 8c 49 6c 25 3d b9 0d 04 |=44..CJ%.Il%=...|
0000c490 69 1e e7 ac 49 6c 25 8c 5a 24 2b 3d c0 41 24 2c |i...Il%.Z$+=.A$,|
0000c4a0 31 29 3a 41 24 3d c1 41 24 2c 32 29 0d 04 6a 0c |1):A$=.A$,2)..j.|
0000c4b0 ce 3a c8 8e 77 61 25 ca 0d 04 6b 19 c9 31 3a 5a |.:..wa%...k..1:Z|
0000c4c0 24 3d c0 5a 24 2c a7 5a 24 2c 22 20 22 29 2d 31 |$=.Z$,.Z$," ")-1|
0000c4d0 29 0d 04 6c 19 c9 32 3a 5a 24 3d c1 5a 24 2c a7 |)..l..2:Z$=.Z$,.|
0000c4e0 5a 24 2c 22 20 22 29 2b 31 29 0d 04 6d 13 c9 33 |Z$," ")+1)..m..3|
0000c4f0 3a e7 a7 5a 24 2c 22 20 22 29 3e 30 8c 0d 04 6e |:..Z$," ")>0...n|
0000c500 2d 42 25 3d a9 5a 24 3a f5 42 25 2d 3d 31 3a fd |-B%=.Z$:.B%-=1:.|
0000c510 c1 5a 24 2c 42 25 2c 31 29 3d 22 20 22 3a 5a 24 |.Z$,B%,1)=" ":Z$|
0000c520 3d c0 5a 24 2c 42 25 2d 31 29 0d 04 6f 0a cc 5a |=.Z$,B%-1)..o..Z|
0000c530 24 3d 22 22 0d 04 70 05 cd 0d 04 71 26 c9 34 3a |$=""..p....q&.4:|
0000c540 c8 95 a7 5a 24 2c 22 20 22 29 3a 5a 24 3d c1 5a |...Z$," "):Z$=.Z|
0000c550 24 2c a7 5a 24 2c 22 20 22 29 2b 31 29 3a ce 0d |$,.Z$," ")+1):..|
0000c560 04 72 09 cb 3a 3d 5a 24 0d 04 73 2f dd a4 4a 5f |.r..:=Z$..s/..J_|
0000c570 28 41 24 29 3a ea 43 69 25 2c 43 4a 25 3a c8 95 |(A$):.Ci%,CJ%:..|
0000c580 41 24 3c 3e 22 22 3a e7 97 41 24 3d 33 34 8c 43 |A$<>"":..A$=34.C|
0000c590 4a 25 3d ac 43 4a 25 0d 04 74 17 e7 97 41 24 3d |J%=.CJ%..t...A$=|
0000c5a0 34 34 80 ac 43 4a 25 8c 43 69 25 2b 3d 31 0d 04 |44..CJ%.Ci%+=1..|
0000c5b0 75 1c 41 24 3d c1 41 24 2c 32 29 3a ce 3a 3d 43 |u.A$=.A$,2):.:=C|
0000c5c0 69 25 2d 28 43 69 25 3e 30 29 0d 04 76 26 dd f2 |i%-(Ci%>0)..v&..|
0000c5d0 68 5f 28 65 25 2c 77 25 2c 6e 25 2c 58 79 25 2c |h_(e%,w%,n%,Xy%,|
0000c5e0 54 79 25 29 3a ea 41 25 2c 42 25 3a c8 8e b9 ca |Ty%):.A%,B%:....|
0000c5f0 0d 04 77 4c c9 77 25 3d 35 38 84 77 25 3d 36 30 |..wL.w%=58.w%=60|
0000c600 3a 41 25 3d bb a4 5a 28 65 25 2c 35 39 29 2d 28 |:A%=..Z(e%,59)-(|
0000c610 77 25 2d 35 39 29 3a e7 41 25 3e 30 80 41 25 3c |w%-59):.A%>0.A%<|
0000c620 3d 70 4a 25 8c f2 41 28 65 25 2c 35 39 2c c3 41 |=pJ%..A(e%,59,.A|
0000c630 25 29 3a f2 66 28 50 24 2c 41 25 29 0d 04 78 57 |%):.f(P$,A%)..xW|
0000c640 c9 77 25 3e 3d 39 80 77 25 3c 3d 35 33 3a 42 25 |.w%>=9.w%<=53:B%|
0000c650 3d 26 41 2b 33 2a 28 28 77 25 2d 39 29 81 33 29 |=&A+3*((w%-9).3)|
0000c660 3a 41 25 3d bb a4 5a 28 65 25 2c 42 25 29 2b 28 |:A%=..Z(e%,B%)+(|
0000c670 77 25 2d 42 25 29 2a 28 31 2b 32 2a 28 6e 25 3d |w%-B%)*(1+2*(n%=|
0000c680 31 29 29 3a e7 41 25 3e 3d 30 80 41 25 3c 3d 6e |1)):.A%>=0.A%<=n|
0000c690 4a 25 8c 0d 04 79 23 f2 41 28 65 25 2c 42 25 2c |J%...y#.A(e%,B%,|
0000c6a0 c3 41 25 29 3a f2 66 28 50 24 2c bb a4 5a 28 65 |.A%):.f(P$,..Z(e|
0000c6b0 25 2c 35 39 29 29 0d 04 7a 05 cd 0d 04 7b 26 c9 |%,59))..z....{&.|
0000c6c0 77 25 3d 35 34 84 77 25 3d 35 35 3a f2 43 28 75 |w%=54.w%=55:.C(u|
0000c6d0 75 25 2c 58 79 25 2c 54 79 25 2c 65 25 2c 77 25 |u%,Xy%,Ty%,e%,w%|
0000c6e0 29 0d 04 7c 48 c9 77 25 3d 36 36 3a f2 6a 28 a3 |)..|H.w%=66:.j(.|
0000c6f0 29 3a 41 25 3d bb a4 5a 28 7a 79 25 2c 35 39 29 |):A%=..Z(zy%,59)|
0000c700 2b 31 3a e7 41 25 3e 30 80 41 25 3c 3d 70 4a 25 |+1:.A%>0.A%<=pJ%|
0000c710 8c f2 41 28 7a 79 25 2c 35 39 2c c3 41 25 29 3a |..A(zy%,59,.A%):|
0000c720 f2 66 28 50 24 2c 41 25 29 0d 04 7d 4a c9 77 25 |.f(P$,A%)..}J.w%|
0000c730 3d 36 37 3a f5 3a f2 6a 28 a3 29 3a 41 25 3d bb |=67:.:.j(.):A%=.|
0000c740 a4 5a 28 7a 79 25 2c 35 39 29 2b 31 3a e7 41 25 |.Z(zy%,59)+1:.A%|
0000c750 3e 30 80 41 25 3c 3d 70 4a 25 8c f2 41 28 7a 79 |>0.A%<=pJ%..A(zy|
0000c760 25 2c 35 39 2c c3 41 25 29 3a f2 66 28 50 24 2c |%,59,.A%):.f(P$,|
0000c770 41 25 29 0d 04 7e 0b fd 41 25 3e 70 4a 25 0d 04 |A%)..~..A%>pJ%..|
0000c780 7f 0e c9 77 25 3d 36 38 3a f2 43 79 0d 04 80 07 |...w%=68:.Cy....|
0000c790 cb 3a e1 0d 04 81 3a dd f2 50 4a 28 77 25 2c 49 |.:....:..PJ(w%,I|
0000c7a0 25 29 3a f2 41 28 7a 79 25 2c 77 25 2c a4 57 28 |%):.A(zy%,w%,.W(|
0000c7b0 75 75 25 2c 49 25 29 29 3a f2 66 28 50 24 2c bb |uu%,I%)):.f(P$,.|
0000c7c0 a4 5a 28 7a 79 25 2c 35 39 29 29 3a e1 0d 04 82 |.Z(zy%,59)):....|
0000c7d0 56 dd f2 72 5f 28 79 25 2c 6c 6c 25 2c 5f 25 2c |V..r_(y%,ll%,_%,|
0000c7e0 51 25 2c 73 25 2c 62 25 29 3a 21 4a 25 3d 69 25 |Q%,s%,b%):!J%=i%|
0000c7f0 3a e7 4c 25 28 79 25 2c 6c 6c 25 2d 26 44 29 3c |:.L%(y%,ll%-&D)<|
0000c800 3e 2d 31 8c 4a 25 21 34 3d 4c 25 28 79 25 2c 6c |>-1.J%!4=L%(y%,l|
0000c810 6c 25 2d 26 44 29 3a c8 99 26 34 30 30 43 34 2c |l%-&D):..&400C4,|
0000c820 2c 4a 25 0d 04 83 9e c8 99 26 34 30 30 43 42 2c |,J%......&400CB,|
0000c830 2c 4a 25 3a 51 25 2d 3d 38 3a 62 25 2d 3d 38 3a |,J%:Q%-=8:b%-=8:|
0000c840 4a 25 21 34 3d 5f 25 2d 4a 25 21 34 3a 4a 25 21 |J%!4=_%-J%!4:J%!|
0000c850 38 3d 51 25 2d 4a 25 21 31 36 2d 62 25 3a 4a 25 |8=Q%-J%!16-b%:J%|
0000c860 21 26 43 3d 4a 25 21 34 2b 73 25 3a 4a 25 21 31 |!&C=J%!4+s%:J%!1|
0000c870 36 3d 4a 25 21 38 2b 62 25 3a 4a 25 21 32 30 3d |6=J%!8+b%:J%!20=|
0000c880 26 37 30 30 33 31 31 39 3a 4a 25 21 32 34 3d 4f |&7003119:J%!24=O|
0000c890 6c 25 3a 4a 25 21 32 38 3d 69 6c 25 3a 4a 25 21 |l%:J%!28=il%:J%!|
0000c8a0 33 32 3d 30 3a c8 99 26 34 30 30 43 32 2c 2c 4a |32=0:..&400C2,,J|
0000c8b0 25 b8 4c 25 28 79 25 2c 6c 6c 25 2d 26 44 29 3a |%.L%(y%,ll%-&D):|
0000c8c0 e1 0d 04 84 56 dd f2 73 79 3a ea 79 25 2c 50 79 |....V..sy:.y%,Py|
0000c8d0 25 3a 21 4a 25 3d 69 25 3a e3 79 25 3d 30 b8 26 |%:!J%=i%:.y%=0.&|
0000c8e0 41 3a e3 50 79 25 3d 30 b8 31 3a e7 4c 25 28 79 |A:.Py%=0.1:.L%(y|
0000c8f0 25 2c 50 79 25 29 3c 3e 2d 31 8c 4a 25 21 34 3d |%,Py%)<>-1.J%!4=|
0000c900 4c 25 28 79 25 2c 50 79 25 29 3a c8 99 26 34 30 |L%(y%,Py%):..&40|
0000c910 30 43 34 2c 2c 4a 25 0d 04 85 10 ed 2c 3a 4c 25 |0C4,,J%.....,:L%|
0000c920 28 29 3d 2d 31 3a e1 0d 04 86 4f dd f2 6f 5f 28 |()=-1:....O..o_(|
0000c930 77 25 29 3a ea 79 25 2c 50 79 25 2c 42 61 25 2c |w%):.y%,Py%,Ba%,|
0000c940 48 69 25 2c 41 24 3a e3 79 25 3d 30 b8 26 41 3a |Hi%,A$:.y%=0.&A:|
0000c950 e3 50 79 25 3d 30 b8 31 3a e7 4c 25 28 79 25 2c |.Py%=0.1:.L%(y%,|
0000c960 50 79 25 29 3d 77 25 8c 42 61 25 3d 79 25 3a 48 |Py%)=w%.Ba%=y%:H|
0000c970 69 25 3d 50 79 25 0d 04 87 25 ed 2c 3a e7 48 69 |i%=Py%...%.,:.Hi|
0000c980 25 3d 30 8c 41 24 3d 51 24 3a 6a 4a 25 3d 32 8b |%=0.A$=Q$:jJ%=2.|
0000c990 41 24 3d 58 24 3a 6a 4a 25 3d 31 0d 04 88 1c f2 |A$=X$:jJ%=1.....|
0000c9a0 47 79 28 41 24 2b 41 24 28 42 61 25 2c 48 69 25 |Gy(A$+A$(Ba%,Hi%|
0000c9b0 2b 26 44 29 29 3a e1 0d 04 89 49 dd f2 47 79 28 |+&D)):....I..Gy(|
0000c9c0 69 24 29 3a 21 4a 25 3d 32 35 36 3a 4a 25 21 34 |i$):!J%=256:J%!4|
0000c9d0 3d 73 75 25 3a 4a 25 21 31 36 3d 26 34 41 46 38 |=su%:J%!16=&4AF8|
0000c9e0 30 3a 24 28 4a 25 2b 32 30 29 3d 69 24 3a c8 99 |0:$(J%+20)=i$:..|
0000c9f0 26 34 30 30 45 37 2c 31 38 2c 4a 25 2c 30 3a e1 |&400E7,18,J%,0:.|
0000ca00 0d 04 8a 6e dd f2 4d 75 3a de 43 25 28 26 43 29 |...n..Mu:.C%(&C)|
0000ca10 2c 55 25 28 26 43 29 3a 44 79 25 3d 33 3a 44 4a |,U%(&C):Dy%=3:DJ|
0000ca20 25 3d 26 42 3a 65 5f 25 3d 2d 31 3a 43 25 28 29 |%=&B:e_%=-1:C%()|
0000ca30 3d 2d 31 3a 77 24 3d 54 24 2b 22 41 6e 6e 69 22 |=-1:w$=T$+"Anni"|
0000ca40 3a 60 6c 25 3d 30 3a 57 4a 25 3d 2d 31 3a 50 4a |:`l%=0:WJ%=-1:PJ|
0000ca50 25 3d 2d 31 3a 79 6c 25 3d a4 43 28 22 41 4e 4d |%=-1:yl%=.C("ANM|
0000ca60 22 2c 22 41 4e 4d 22 2c 31 2c 34 29 3a e1 0d 04 |","ANM",1,4):...|
0000ca70 8b 0c dd a4 5f 79 3d 79 6c 25 0d 04 8c 42 dd f2 |...._y=yl%...B..|
0000ca80 57 75 28 41 25 29 3a 42 25 28 41 25 29 3d 31 3a |Wu(A%):B%(A%)=1:|
0000ca90 57 25 28 41 25 29 3d 26 43 3a 53 25 28 41 25 29 |W%(A%)=&C:S%(A%)|
0000caa0 3d 31 3a 4d 24 28 41 25 29 3d a4 41 28 22 41 6e |=1:M$(A%)=.A("An|
0000cab0 6e 54 61 62 22 29 3a f2 4c 5f 3a e1 0d 04 8d a3 |nTab"):.L_:.....|
0000cac0 dd f2 5a 4a 28 76 25 2c 68 25 2c 61 25 2c 4b 25 |..ZJ(v%,h%,a%,K%|
0000cad0 29 3a ea 4a 79 25 2c 51 25 2c 72 25 3a 4a 79 25 |):.Jy%,Q%,r%:Jy%|
0000cae0 3d 28 6d 25 2d 44 79 25 2a 32 30 2d 32 30 29 2f |=(m%-Dy%*20-20)/|
0000caf0 44 79 25 3a 51 25 3d 30 3a e3 72 25 3d 76 25 2b |Dy%:Q%=0:.r%=v%+|
0000cb00 44 79 25 2a 94 68 25 b8 76 25 2b 44 79 25 2a 94 |Dy%*.h%.v%+Dy%*.|
0000cb10 68 25 2b 44 79 25 2d 31 3a 51 25 2b 3d 32 30 2b |h%+Dy%-1:Q%+=20+|
0000cb20 4a 79 25 3a f2 6b 4a 28 72 25 2c 61 25 2b 32 30 |Jy%:.kJ(r%,a%+20|
0000cb30 2c 4b 25 2d 51 25 2b 4a 79 25 2c 6a 25 2d 34 30 |,K%-Q%+Jy%,j%-40|
0000cb40 2c 4a 79 25 29 3a ed 3a e7 68 25 3d 30 80 76 25 |,Jy%):.:.h%=0.v%|
0000cb50 3e 31 8c f2 52 28 68 25 2c 61 25 2c 4b 25 29 0d |>1..R(h%,a%,K%).|
0000cb60 04 8e 1a e7 68 25 80 72 25 3c 26 43 8c f2 52 28 |....h%.r%<&C..R(|
0000cb70 68 25 2c 61 25 2c 4b 25 29 0d 04 8f 05 e1 0d 04 |h%,a%,K%).......|
0000cb80 90 17 dd f2 4e 4a 28 70 25 2c 4f 69 25 29 3a c8 |....NJ(p%,Oi%):.|
0000cb90 8e 21 70 25 ca 0d 04 91 1a c9 30 3a e7 50 4a 25 |.!p%......0:.PJ%|
0000cba0 3c 3e 2d 31 8c f2 70 28 50 4a 25 2c 2d 31 29 0d |<>-1..p(PJ%,-1).|
0000cbb0 04 92 19 c9 31 3a e7 50 4a 25 3c 3e 2d 31 8c f2 |....1:.PJ%<>-1..|
0000cbc0 70 28 50 4a 25 2c 30 29 0d 04 93 18 c9 32 3a e7 |p(PJ%,0).....2:.|
0000cbd0 50 4a 25 3c 3e 2d 31 8c f2 55 79 28 50 4a 25 29 |PJ%<>-1..Uy(PJ%)|
0000cbe0 0d 04 94 2f c9 33 3a f2 57 79 28 22 58 91 73 20 |.../.3:.Wy("X.s |
0000cbf0 25 6e 25 74 20 62 69 72 74 68 64 61 79 22 2c 55 |%n%t birthday",U|
0000cc00 79 25 2c 55 61 25 2c 46 79 25 2c 30 2c 30 29 0d |y%,Ua%,Fy%,0,0).|
0000cc10 04 95 07 cb 3a e1 0d 04 96 30 dd f2 48 79 28 6c |....:....0..Hy(l|
0000cc20 25 29 3a 76 25 2b 3d 6c 25 2a 32 2a 44 79 25 3a |%):v%+=l%*2*Dy%:|
0000cc30 e7 76 25 2b 32 2a 44 79 25 3e 26 44 8c 76 25 2d |.v%+2*Dy%>&D.v%-|
0000cc40 3d 32 2a 44 79 25 0d 04 97 0e e7 76 25 3c 31 8c |=2*Dy%.....v%<1.|
0000cc50 76 25 3d 31 0d 04 98 05 e1 0d 04 99 75 dd f2 66 |v%=1........u..f|
0000cc60 5f 28 6e 25 2c 68 25 2c 5f 25 2c 51 25 2c 6f 5f |_(n%,h%,_%,Q%,o_|
0000cc70 25 2c 77 4a 25 29 3a ea 4a 79 25 2c 72 25 3a 4a |%,wJ%):.Jy%,r%:J|
0000cc80 79 25 3d 28 6d 25 2d 32 30 29 2f 44 79 25 3a 72 |y%=(m%-20)/Dy%:r|
0000cc90 25 3d 2d 51 25 81 4a 79 25 2b 31 3a 51 25 2b 3d |%=-Q%.Jy%+1:Q%+=|
0000cca0 28 72 25 2d 31 29 2a 4a 79 25 2b 32 30 3a e7 51 |(r%-1)*Jy%+20:.Q|
0000ccb0 25 3e 30 84 72 25 3e 44 79 25 84 5f 25 3c 32 30 |%>0.r%>Dy%._%<20|
0000ccc0 84 5f 25 3e 6a 25 2d 34 30 8c 72 25 3d 30 0d 04 |._%>j%-40.r%=0..|
0000ccd0 9a 1d e7 68 25 8c 6f 5f 25 3d 64 79 25 2b 32 30 |...h%.o_%=dy%+20|
0000cce0 8b 6f 5f 25 3d 79 79 25 2b 32 30 0d 04 9b 57 77 |.o_%=yy%+20...Ww|
0000ccf0 4a 25 3d 2d 6f 25 2d 32 30 2d 4a 79 25 2a 28 72 |J%=-o%-20-Jy%*(r|
0000cd00 25 2d 31 29 3a e7 72 25 3c 3e 30 8c f2 6a 75 28 |%-1):.r%<>0..ju(|
0000cd10 72 25 2b 44 79 25 2a 94 68 25 2b 76 25 2d 31 2c |r%+Dy%*.h%+v%-1,|
0000cd20 6e 25 2c 5f 25 2d 32 30 2c 51 25 2c 6f 5f 25 2c |n%,_%-20,Q%,o_%,|
0000cd30 77 4a 25 2c 6a 25 2d 34 30 2c 2d 4a 79 25 2b 32 |wJ%,j%-40,-Jy%+2|
0000cd40 30 29 0d 04 9c 05 e1 0d 04 9d 1c dd a4 50 5f 28 |0)...........P_(|
0000cd50 77 25 2c 43 79 25 29 3a 6b 25 3d b9 3a c8 8e 43 |w%,Cy%):k%=.:..C|
0000cd60 79 25 ca 0d 04 9e 0f c9 34 31 34 3a f2 48 79 28 |y%......414:.Hy(|
0000cd70 31 29 0d 04 9f 10 c9 34 31 35 3a f2 48 79 28 2d |1).....415:.Hy(-|
0000cd80 31 29 0d 04 a0 09 7f 6b 25 3d a3 0d 04 a1 09 cb |1).....k%=......|
0000cd90 3a 3d 6b 25 0d 04 a2 21 dd a4 55 79 28 65 25 2c |:=k%...!..Uy(e%,|
0000cda0 77 25 2c 43 79 25 29 3a 6b 25 3d a3 3a e7 65 25 |w%,Cy%):k%=.:.e%|
0000cdb0 3d 48 79 25 8c 0d 04 a3 0f 6b 25 3d b9 3a c8 8e |=Hy%.....k%=.:..|
0000cdc0 43 79 25 ca 0d 04 a4 1d c9 33 39 34 2c 33 39 38 |Cy%......394,398|
0000cdd0 2c 33 39 39 3a f2 4d 28 48 79 25 2c 36 2d 77 25 |,399:.M(Hy%,6-w%|
0000cde0 29 0d 04 a5 1b c9 34 2c 32 34 3a e7 65 5f 25 3c |).....4,24:.e_%<|
0000cdf0 3e 2d 31 8c f2 55 79 28 65 5f 25 29 0d 04 a6 0a |>-1..Uy(e_%)....|
0000ce00 c9 32 37 3a f2 79 0d 04 a7 0e c9 26 44 3a e7 77 |.27:.y.....&D:.w|
0000ce10 25 3d 32 8c 0d 04 a8 26 e7 a4 53 79 28 a4 5a 28 |%=2....&..Sy(.Z(|
0000ce20 48 79 25 2c 32 29 2c 64 25 2c 71 25 2c 78 25 29 |Hy%,2),d%,q%,x%)|
0000ce30 8c f2 4d 28 48 79 25 2c 34 29 0d 04 a9 08 cc f2 |..M(Hy%,4)......|
0000ce40 6b 79 0d 04 aa 05 cd 0d 04 ab 09 7f 6b 25 3d a3 |ky..........k%=.|
0000ce50 0d 04 ac 05 cb 0d 04 ad 09 cd 3a 3d 6b 25 0d 04 |..........:=k%..|
0000ce60 ae 5d dd f2 66 75 3a ea 42 25 3a 7a 25 3d ae 77 |.]..fu:.B%:z%=.w|
0000ce70 24 3a 42 25 3d 57 4a 25 3a c8 95 42 25 3c 3e 2d |$:B%=WJ%:..B%<>-|
0000ce80 31 3a d5 23 7a 25 2c c3 42 25 21 38 3a c8 99 26 |1:.#z%,.B%!8:..&|
0000ce90 43 2c 32 2c 7a 25 2c 42 25 2b 26 43 2c 42 25 21 |C,2,z%,B%+&C,B%!|
0000cea0 38 20 2d 26 43 3a 42 25 3d 42 25 21 34 3a ce 3a |8 -&C:B%=B%!4:.:|
0000ceb0 d9 23 7a 25 3a 7a 25 3d 30 3a e1 0d 04 af 20 dd |.#z%:z%=0:.... .|
0000cec0 f2 73 4a 28 7a 25 29 3a d5 23 7a 25 2c 44 4a 25 |.sJ(z%):.#z%,DJ%|
0000ced0 3a d5 23 7a 25 2c 44 79 25 3a e1 0d 04 b0 20 dd |:.#z%,Dy%:.... .|
0000cee0 f2 53 75 28 7a 25 29 3a 44 4a 25 3d 9a 23 7a 25 |.Su(z%):DJ%=.#z%|
0000cef0 3a 44 79 25 3d 9a 23 7a 25 3a e1 0d 04 b1 20 dd |:Dy%=.#z%:.... .|
0000cf00 f2 5f 4a 28 73 25 2c 53 79 25 2c 70 25 2c 5f 25 |._J(s%,Sy%,p%,_%|
0000cf10 2c 51 25 29 3a c8 8e 53 79 25 ca 0d 04 b2 3d c9 |,Q%):..Sy%....=.|
0000cf20 31 3a f2 48 28 42 79 25 2c 30 2c 2d 31 29 3a f2 |1:.H(By%,0,-1):.|
0000cf30 4a 28 42 79 25 2c a4 71 28 73 25 2c 53 79 25 29 |J(By%,.q(s%,Sy%)|
0000cf40 2c 31 29 3a f2 43 28 42 79 25 2c 5f 25 2c 51 25 |,1):.C(By%,_%,Q%|
0000cf50 2c 73 25 2c 53 79 25 29 0d 04 b3 20 c9 32 2c 33 |,s%,Sy%)... .2,3|
0000cf60 2c 34 2c 35 3a e7 6e 25 3c 3e 32 8c f2 5a 28 73 |,4,5:.n%<>2..Z(s|
0000cf70 25 2c 53 79 25 2c 31 29 0d 04 b4 07 cb 3a e1 0d |%,Sy%,1).....:..|
0000cf80 04 b5 3e dd f2 6c 5f 28 4d 79 25 2c 59 61 25 29 |..>..l_(My%,Ya%)|
0000cf90 3a f2 55 28 59 61 25 2c 31 2c 21 4d 79 25 29 3a |:.U(Ya%,1,!My%):|
0000cfa0 f2 48 28 42 79 25 2c 30 2c 2d 31 29 3a f2 4a 28 |.H(By%,0,-1):.J(|
0000cfb0 42 79 25 2c 21 4d 79 25 2c 31 29 3a e1 0d 04 b6 |By%,!My%,1):....|
0000cfc0 54 dd f2 66 4a 28 73 25 29 3a ea 41 25 3a f2 55 |T..fJ(s%):.A%:.U|
0000cfd0 28 73 25 2c 31 2c 44 4a 25 29 3a e3 41 25 3d 32 |(s%,1,DJ%):.A%=2|
0000cfe0 b8 35 3a f2 5a 28 73 25 2c 41 25 2c 30 29 3a ed |.5:.Z(s%,A%,0):.|
0000cff0 3a e7 44 79 25 3c 35 8c f2 5a 28 73 25 2c 44 79 |:.Dy%<5..Z(s%,Dy|
0000d000 25 2b 31 2c 31 29 8b f2 5a 28 73 25 2c 35 2c 31 |%+1,1)..Z(s%,5,1|
0000d010 29 0d 04 b7 05 e1 0d 04 b8 5b dd f2 6a 5f 28 73 |)........[..j_(s|
0000d020 25 29 3a ea 41 25 2c 42 25 3a 42 25 3d 44 79 25 |%):.A%,B%:B%=Dy%|
0000d030 3a 44 4a 25 3d a4 71 28 73 25 2c 31 29 3a 41 25 |:DJ%=.q(s%,1):A%|
0000d040 3d 32 3a c8 95 41 25 3c 35 80 ac a4 4d 28 73 25 |=2:..A%<5...M(s%|
0000d050 2c 41 25 29 3a 41 25 2b 3d 31 3a ce 3a e7 41 25 |,A%):A%+=1:.:.A%|
0000d060 3c 35 8c 44 79 25 3d 41 25 2d 31 8b 44 79 25 3d |<5.Dy%=A%-1.Dy%=|
0000d070 36 0d 04 b9 13 e7 42 25 3c 3e 44 79 25 8c 55 25 |6.....B%<>Dy%.U%|
0000d080 28 29 3d 30 0d 04 ba 18 e7 53 25 28 a4 50 28 35 |()=0.....S%(.P(5|
0000d090 29 29 2b 32 2a 44 79 25 3e 26 44 8c 0d 04 bb 2c |))+2*Dy%>&D....,|
0000d0a0 e7 5a 25 28 74 25 29 3d 35 8c 76 25 3d 26 44 2d |.Z%(t%)=5.v%=&D-|
0000d0b0 32 2a 44 79 25 8b 53 25 28 a4 50 28 35 29 29 3d |2*Dy%.S%(.P(5))=|
0000d0c0 26 44 2d 32 2a 44 79 25 0d 04 bc 07 cd 3a e1 0d |&D-2*Dy%.....:..|
0000d0d0 04 bd 4e dd f2 6b 4a 28 72 25 2c 61 25 2c 4b 25 |..N..kJ(r%,a%,K%|
0000d0e0 2c 73 25 2c 62 25 29 3a ea 63 4a 25 2c 42 25 2c |,s%,b%):.cJ%,B%,|
0000d0f0 47 79 25 2c 41 25 2c 51 25 3a 42 25 3d 43 25 28 |Gy%,A%,Q%:B%=C%(|
0000d100 72 25 29 3a 47 79 25 3d 32 38 3a e7 a4 53 28 61 |r%):Gy%=28:..S(a|
0000d110 25 2c 4b 25 2c 73 25 2c 2d 62 25 29 8c 0d 04 be |%,K%,s%,-b%)....|
0000d120 6a 63 4a 25 3d a4 4a 28 22 48 6f 6d 65 72 74 6f |jcJ%=.J("Homerto|
0000d130 6e 2e 42 6f 6c 64 22 2c 26 43 2c 26 43 29 3a 76 |n.Bold",&C,&C):v|
0000d140 5f 25 3d a4 4a 28 22 48 6f 6d 65 72 74 6f 6e 2e |_%=.J("Homerton.|
0000d150 4d 65 64 69 75 6d 22 2c 26 41 2c 26 41 29 3a f2 |Medium",&A,&A):.|
0000d160 56 28 30 2c 37 29 3a e7 72 25 3d 62 79 25 8c c8 |V(0,7):.r%=by%..|
0000d170 99 26 34 30 30 45 36 2c 21 53 4a 25 8b c8 99 26 |.&400E6,!SJ%...&|
0000d180 34 30 30 45 36 2c 35 0d 04 bf 94 f2 6c 28 61 25 |400E6,5.....l(a%|
0000d190 2c 4b 25 2c 73 25 2c 62 25 2c 32 30 29 3a f2 4c |,K%,s%,b%,20):.L|
0000d1a0 28 63 4a 25 2c a4 55 28 72 25 2c 2d 31 29 2c 30 |(cJ%,.U(r%,-1),0|
0000d1b0 2c 61 25 2b 73 25 2f 32 2c 4b 25 2d 26 41 29 3a |,a%+s%/2,K%-&A):|
0000d1c0 51 25 3d 34 30 3a 41 25 3d 55 25 28 72 25 29 3a |Q%=40:A%=U%(r%):|
0000d1d0 c8 95 41 25 3e 30 3a 42 25 3d 42 25 21 34 3a 41 |..A%>0:B%=B%!4:A|
0000d1e0 25 2d 3d 31 3a ce 3a c8 95 42 25 3c 3e 2d 31 80 |%-=1:.:..B%<>-1.|
0000d1f0 51 25 2b 47 79 25 2d 35 3c 3d 62 25 3a e7 a4 53 |Q%+Gy%-5<=b%:..S|
0000d200 28 61 25 2b 32 30 2c 4b 25 2d 51 25 2d 32 35 2c |(a%+20,K%-Q%-25,|
0000d210 73 25 2d 35 30 2c 47 79 25 29 8c 0d 04 c0 4f f2 |s%-50,Gy%)....O.|
0000d220 72 28 76 5f 25 2c a4 60 28 42 25 2c a4 4c 29 2c |r(v_%,.`(B%,.L),|
0000d230 61 25 2b 37 30 2c 4b 25 2d 51 25 2d 32 30 2c 73 |a%+70,K%-Q%-20,s|
0000d240 25 2d 37 30 2c 47 79 25 29 3a f2 4c 28 76 5f 25 |%-70,Gy%):.L(v_%|
0000d250 2c c3 28 42 25 3f 26 43 29 2c 31 2c 61 25 2b 36 |,.(B%?&C),1,a%+6|
0000d260 30 2c 4b 25 2d 51 25 2d 34 29 0d 04 c1 47 cd 3a |0,K%-Q%-4)...G.:|
0000d270 51 25 2b 3d 47 79 25 3a 42 25 3d a4 5a 79 28 42 |Q%+=Gy%:B%=.Zy(B|
0000d280 25 2c 72 25 29 3a ce 3a e7 42 25 3c 3e 2d 31 8c |%,r%):.:.B%<>-1.|
0000d290 ec 61 25 2b 38 2c 4b 25 2d 62 25 2b 32 30 3a ec |.a%+8,K%-b%+20:.|
0000d2a0 42 59 31 38 2c 30 3a f0 38 31 2c 2d 39 2c 2d 31 |BY18,0:.81,-9,-1|
0000d2b0 38 0d 04 c2 2c e7 55 25 28 72 25 29 3c 3e 30 8c |8...,.U%(r%)<>0.|
0000d2c0 ec 61 25 2b 38 2c 4b 25 2d 36 30 3a ec 42 59 31 |.a%+8,K%-60:.BY1|
0000d2d0 38 2c 30 3a f0 38 31 2c 2d 39 2c 31 38 0d 04 c3 |8,0:.81,-9,18...|
0000d2e0 13 f2 51 28 63 4a 25 29 3a f2 51 28 76 5f 25 29 |..Q(cJ%):.Q(v_%)|
0000d2f0 0d 04 c4 07 cd 3a e1 0d 04 c5 c6 dd f2 6a 75 28 |.....:.......ju(|
0000d300 72 25 2c 6e 25 2c 5f 25 2c 51 25 2c 61 25 2c 4b |r%,n%,_%,Q%,a%,K|
0000d310 25 2c 73 25 2c 62 25 29 3a ea 4c 25 2c 41 25 2c |%,s%,b%):.L%,A%,|
0000d320 42 25 2c 43 25 2c 4e 25 2c 47 79 25 2c 41 24 3a |B%,C%,N%,Gy%,A$:|
0000d330 47 79 25 3d 32 38 3a 43 25 3d 28 2d 51 25 2d 37 |Gy%=28:C%=(-Q%-7|
0000d340 30 2b 32 2a 47 79 25 29 81 47 79 25 2b 55 25 28 |0+2*Gy%).Gy%+U%(|
0000d350 72 25 29 3a 4e 25 3d 2d 28 28 62 25 2b 34 30 29 |r%):N%=-((b%+40)|
0000d360 81 47 79 25 29 3a 41 25 3d 30 3a 42 25 3d 43 25 |.Gy%):A%=0:B%=C%|
0000d370 28 72 25 29 3a c8 95 42 25 3c 3e 2d 31 3a 41 25 |(r%):..B%<>-1:A%|
0000d380 2b 3d 31 3a 42 25 3d a4 5a 79 28 42 25 2c 72 25 |+=1:B%=.Zy(B%,r%|
0000d390 29 3a ce 3a e3 4c 25 3d 30 b8 32 3a f2 4b 28 79 |):.:.L%=0.2:.K(y|
0000d3a0 6c 25 2c 4c 25 2c 31 29 3a ed 3a 50 4a 25 3d 2d |l%,L%,1):.:PJ%=-|
0000d3b0 31 3a 55 61 25 3d 72 25 3a c8 8e b9 ca 0d 04 c6 |1:Ua%=r%:.......|
0000d3c0 51 c9 5f 25 3e 33 35 80 51 25 3c 2d 34 30 80 5f |Q._%>35.Q%<-40._|
0000d3d0 25 3c 73 25 80 43 25 3e 30 80 43 25 3c 3d 41 25 |%<s%.C%>0.C%<=A%|
0000d3e0 3a 42 25 3d 43 25 28 72 25 29 3a c8 95 43 25 3e |:B%=C%(r%):..C%>|
0000d3f0 31 3a 43 25 2d 3d 31 3a 42 25 3d a4 5a 79 28 42 |1:C%-=1:B%=.Zy(B|
0000d400 25 2c 72 25 29 3a ce 3a e7 6e 25 3d 32 8c 0d 04 |%,r%):.:.n%=2...|
0000d410 c7 21 e3 4c 25 3d 30 b8 32 3a f2 4b 28 79 6c 25 |.!.L%=0.2:.K(yl%|
0000d420 2c 4c 25 2c 30 29 3a ed 3a 50 4a 25 3d 42 25 0d |,L%,0):.:PJ%=B%.|
0000d430 04 c8 10 cc f2 70 28 42 25 2c 6e 25 3d 34 29 0d |.....p(B%,n%=4).|
0000d440 04 c9 05 cd 0d 04 ca 09 c9 6e 25 3d 32 0d 04 cb |.........n%=2...|
0000d450 49 c9 5f 25 3e 30 80 5f 25 3c 33 30 80 51 25 2d |I._%>0._%<30.Q%-|
0000d460 32 30 3c 62 25 3a e7 55 25 28 72 25 29 3c 41 25 |20<b%:.U%(r%)<A%|
0000d470 2d 4e 25 8c 55 25 28 72 25 29 2b 3d 31 3a f2 44 |-N%.U%(r%)+=1:.D|
0000d480 28 69 25 2c 61 25 2c 4b 25 2c 61 25 2b 73 25 2c |(i%,a%,K%,a%+s%,|
0000d490 4b 25 2b 62 25 29 0d 04 cc 4b c9 5f 25 3e 30 80 |K%+b%)...K._%>0.|
0000d4a0 5f 25 3c 33 30 80 51 25 3e 2d 36 30 80 51 25 3c |_%<30.Q%>-60.Q%<|
0000d4b0 3d 2d 34 32 3a e7 55 25 28 72 25 29 3e 30 8c 55 |=-42:.U%(r%)>0.U|
0000d4c0 25 28 72 25 29 2d 3d 31 3a f2 44 28 69 25 2c 61 |%(r%)-=1:.D(i%,a|
0000d4d0 25 2c 4b 25 2c 61 25 2b 73 25 2c 4b 25 2b 62 25 |%,K%,a%+s%,K%+b%|
0000d4e0 29 0d 04 cd 36 7f e7 6e 25 3c 3e 32 8c f2 57 79 |)...6..n%<>2..Wy|
0000d4f0 28 22 43 68 72 69 73 91 20 25 6e 25 74 20 62 69 |("Chris. %n%t bi|
0000d500 72 74 68 64 61 79 22 2c 55 79 25 2c 72 25 2c 46 |rthday",Uy%,r%,F|
0000d510 79 25 2c 30 2c 30 29 0d 04 ce 07 cb 3a e1 0d 04 |y%,0,0).....:...|
0000d520 cf 4c dd f2 59 5f 28 64 25 2c 71 25 2c 4e 25 2c |.L..Y_(d%,q%,N%,|
0000d530 6e 25 29 3a ea 42 25 3a 42 25 3d 2d 31 3a c8 95 |n%):.B%:B%=-1:..|
0000d540 4e 25 3e 30 3a 42 25 3d a4 6d 28 64 25 2c 71 25 |N%>0:B%=.m(d%,q%|
0000d550 2c 42 25 29 3a 4e 25 2d 3d 31 3a ce 3a f2 70 28 |,B%):N%-=1:.:.p(|
0000d560 42 25 2c 6e 25 3d 34 29 3a e1 0d 04 d0 29 dd f2 |B%,n%=4):....)..|
0000d570 70 28 42 25 2c 74 79 25 29 3a ea 41 25 2c 41 24 |p(B%,ty%):.A%,A$|
0000d580 3a e7 74 79 25 8c 65 5f 25 3d 42 25 8b 65 5f 25 |:.ty%.e_%=B%.e_%|
0000d590 3d 2d 31 0d 04 d1 60 41 25 3d 42 25 2b 31 36 3a |=-1...`A%=B%+16:|
0000d5a0 c8 95 3f 41 25 3c 3e 26 42 3a 41 24 2b 3d bd 3f |..?A%<>&B:A$+=.?|
0000d5b0 41 25 3a 41 25 2b 3d 31 3a ce 3a f2 57 79 28 41 |A%:A%+=1:.:.Wy(A|
0000d5c0 24 2c 42 25 3f 26 43 2c 28 42 25 21 26 43 3e 3e |$,B%?&C,(B%!&C>>|
0000d5d0 38 29 80 26 46 2c 28 42 25 21 26 43 3e 3e 26 43 |8).&F,(B%!&C>>&C|
0000d5e0 29 80 26 46 46 46 2c 42 25 3f 26 46 2c 74 79 25 |).&FFF,B%?&F,ty%|
0000d5f0 29 3a e1 0d 04 d2 5f dd f2 57 79 28 57 24 2c 63 |):...._..Wy(W$,c|
0000d600 25 2c 72 25 2c 51 25 2c 68 5f 25 2c 74 79 25 29 |%,r%,Q%,h_%,ty%)|
0000d610 3a f2 41 28 48 79 25 2c 34 2c 57 24 29 3a f2 41 |:.A(Hy%,4,W$):.A|
0000d620 28 48 79 25 2c 32 2c c3 63 25 2b 22 2f 22 2b c3 |(Hy%,2,.c%+"/"+.|
0000d630 72 25 2b 22 2f 22 2b c3 51 25 29 3a 6f 6c 25 3d |r%+"/"+.Q%):ol%=|
0000d640 68 5f 25 3a e7 68 5f 25 3d 30 8c 68 5f 25 3d 44 |h_%:.h_%=0.h_%=D|
0000d650 4a 25 0d 04 d3 4a f2 55 28 48 79 25 2c 34 2c 68 |J%...J.U(Hy%,4,h|
0000d660 5f 25 29 3a f2 5f 28 48 79 25 2c 26 44 2c 28 74 |_%):._(Hy%,&D,(t|
0000d670 79 25 3d 30 29 29 3a e7 74 79 25 3d 30 8c 41 24 |y%=0)):.ty%=0.A$|
0000d680 3d a4 41 28 22 61 6e 73 65 74 22 29 8b 41 24 3d |=.A("anset").A$=|
0000d690 a4 41 28 22 61 6e 65 64 69 74 22 29 0d 04 d4 3a |.A("anedit")...:|
0000d6a0 f2 47 28 48 79 25 29 3a f2 78 28 48 79 25 2c b9 |.G(Hy%):.x(Hy%,.|
0000d6b0 2c b9 29 3a f2 4d 28 48 79 25 2c 32 29 3a 51 4a |,.):.M(Hy%,2):QJ|
0000d6c0 25 3d b9 3a f2 69 28 48 79 25 2c 4e 61 25 2c 41 |%=.:.i(Hy%,Na%,A|
0000d6d0 24 2c 30 29 3a e1 0d 04 d5 42 dd a4 5a 79 28 42 |$,0):....B..Zy(B|
0000d6e0 25 2c 71 25 29 3a ea 41 25 2c 43 25 2c 63 25 2c |%,q%):.A%,C%,c%,|
0000d6f0 72 25 2c 51 25 3a 42 25 3d 42 25 21 34 3a e7 28 |r%,Q%:B%=B%!4:.(|
0000d700 28 42 25 21 26 43 3e 3e 38 29 80 26 46 29 3c 3e |(B%!&C>>8).&F)<>|
0000d710 71 25 8c 42 25 3d 2d 31 0d 04 d6 07 3d 42 25 0d |q%.B%=-1....=B%.|
0000d720 04 d7 3d dd a4 60 28 42 25 2c 46 79 25 29 3a ea |..=..`(B%,Fy%):.|
0000d730 41 25 2c 43 25 2c 63 25 2c 51 25 2c 41 24 3a 51 |A%,C%,c%,Q%,A$:Q|
0000d740 25 3d 28 42 25 21 26 43 3e 3e 26 43 29 80 26 46 |%=(B%!&C>>&C).&F|
0000d750 46 46 3a e7 51 25 3c 3d 46 79 25 8c 0d 04 d8 62 |FF:.Q%<=Fy%....b|
0000d760 43 25 3d 42 25 3f 26 46 3a 43 25 2d 3d 44 4a 25 |C%=B%?&F:C%-=DJ%|
0000d770 2a 28 43 25 3d 30 29 3a f2 56 28 30 2c 43 25 29 |*(C%=0):.V(0,C%)|
0000d780 3a 41 25 3d 42 25 2b 31 36 3a c8 95 3f 41 25 3c |:A%=B%+16:..?A%<|
0000d790 3e 26 42 3a e7 3f 41 25 3d 33 37 8c 41 25 2b 3d |>&B:.?A%=37.A%+=|
0000d7a0 31 3a 41 24 2b 3d a4 68 79 28 3f 41 25 2c 51 25 |1:A$+=.hy(?A%,Q%|
0000d7b0 2c 46 79 25 29 8b 41 24 2b 3d bd 3f 41 25 0d 04 |,Fy%).A$+=.?A%..|
0000d7c0 d9 0b 41 25 2b 3d 31 3a ce 0d 04 da 09 cd 3a 3d |..A%+=1:......:=|
0000d7d0 41 24 0d 04 db 1c dd f2 74 4a 28 77 25 29 3a ea |A$......tJ(w%):.|
0000d7e0 63 25 2c 72 25 2c 51 25 3a c8 8e 77 25 ca 0d 04 |c%,r%,Q%:..w%...|
0000d7f0 dc 38 c9 35 3a 21 4a 25 3d 48 79 25 3a c8 99 26 |.8.5:!J%=Hy%:..&|
0000d800 34 30 30 43 42 2c 2c 4a 25 3a f2 43 28 46 6c 25 |400CB,,J%:.C(Fl%|
0000d810 2c 4a 25 21 26 43 2b 36 36 2c 4a 25 21 31 36 2c |,J%!&C+66,J%!16,|
0000d820 65 25 2c 77 25 29 0d 04 dd 0b c9 26 42 3a f2 6b |e%,w%).....&B:.k|
0000d830 79 0d 04 de 0a c9 26 43 3a f2 79 0d 04 df 10 c9 |y.....&C:.y.....|
0000d840 26 44 3a f2 55 79 28 65 5f 25 29 0d 04 e0 07 cb |&D:.Uy(e_%).....|
0000d850 3a e1 0d 04 e1 2b dd f2 6b 79 3a ea 41 24 2c 64 |:....+..ky:.A$,d|
0000d860 25 2c 71 25 2c 78 25 3a 41 24 3d a4 5a 28 48 79 |%,q%,x%:A$=.Z(Hy|
0000d870 25 2c 34 29 3a e7 41 24 3c 3e 22 22 8c 0d 04 e2 |%,4):.A$<>""....|
0000d880 1d e7 a4 53 79 28 a4 5a 28 48 79 25 2c 32 29 2c |...Sy(.Z(Hy%,2),|
0000d890 64 25 2c 71 25 2c 78 25 29 8c 0d 04 e3 15 e7 65 |d%,q%,x%)......e|
0000d8a0 5f 25 3c 3e 2d 31 8c f2 78 79 28 65 5f 25 29 0d |_%<>-1..xy(e_%).|
0000d8b0 04 e4 44 f2 48 4a 28 41 24 2c 64 25 2c 71 25 2c |..D.HJ(A$,d%,q%,|
0000d8c0 78 25 2c 6f 6c 25 29 3a 55 25 28 29 3d 30 3a f2 |x%,ol%):U%()=0:.|
0000d8d0 79 3a 65 79 25 3d b9 3a e7 56 79 25 80 28 5a 25 |y:ey%=.:.Vy%.(Z%|
0000d8e0 28 74 25 29 3d 35 84 5a 25 28 74 25 29 3d 33 29 |(t%)=5.Z%(t%)=3)|
0000d8f0 8c f2 4f 0d 04 e5 0e cc f2 4d 28 48 79 25 2c 32 |..O......M(Hy%,2|
0000d900 29 0d 04 e6 05 cd 0d 04 e7 15 cc f2 42 28 a4 41 |)...........B(.A|
0000d910 28 22 45 72 72 4d 65 73 22 29 29 0d 04 e8 07 cd |("ErrMes")).....|
0000d920 3a e1 0d 04 e9 2d dd f2 79 3a 65 5f 25 3d 2d 31 |:....-..y:e_%=-1|
0000d930 3a f2 47 28 48 79 25 29 3a f2 47 28 61 79 25 29 |:.G(Hy%):.G(ay%)|
0000d940 3a e7 56 79 25 8c f2 4d 28 69 25 2c 2d 31 29 0d |:.Vy%..M(i%,-1).|
0000d950 04 ea 05 e1 0d 04 eb 61 dd a4 53 79 28 41 24 2c |.......a..Sy(A$,|
0000d960 f8 63 25 2c f8 72 25 2c f8 51 25 29 3a ea 41 25 |.c%,.r%,.Q%):.A%|
0000d970 3a 63 25 3d bb 41 24 3a 41 24 3d c1 41 24 2c a7 |:c%=.A$:A$=.A$,.|
0000d980 41 24 2c 22 2f 22 29 2b 31 29 3a 72 25 3d bb 41 |A$,"/")+1):r%=.A|
0000d990 24 3a 41 24 3d c1 41 24 2c a7 41 24 2c 22 2f 22 |$:A$=.A$,.A$,"/"|
0000d9a0 29 2b 31 29 3a 51 25 3d bb 41 24 3a 41 25 3d a3 |)+1):Q%=.A$:A%=.|
0000d9b0 3a c8 8e b9 ca 0d 04 ec 22 c9 72 25 3c 31 84 72 |:.......".r%<1.r|
0000d9c0 25 3e 26 43 3a f2 42 28 a4 41 28 22 45 72 72 4d |%>&C:.B(.A("ErrM|
0000d9d0 6f 6e 74 68 22 29 29 0d 04 ed 34 c9 51 25 3c 31 |onth"))...4.Q%<1|
0000d9e0 84 51 25 3e 26 46 46 46 3a f2 42 28 a4 4f 28 22 |.Q%>&FFF:.B(.O("|
0000d9f0 45 72 72 59 65 61 72 22 2c 22 31 22 2c 22 34 30 |ErrYear","1","40|
0000da00 39 35 22 2c 22 22 2c 22 22 29 29 0d 04 ee 1c c9 |95","","")).....|
0000da10 63 25 3c 31 3a f2 42 28 a4 41 28 22 45 72 72 44 |c%<1:.B(.A("ErrD|
0000da20 61 74 65 5a 22 29 29 0d 04 ef 50 c9 63 25 3e a4 |ateZ"))...P.c%>.|
0000da30 58 28 72 25 2c 51 25 29 3a f2 42 28 a4 4f 28 22 |X(r%,Q%):.B(.O("|
0000da40 45 72 72 44 61 74 65 22 2c c3 a4 58 28 72 25 2c |ErrDate",..X(r%,|
0000da50 51 25 29 2c a4 55 28 72 25 2c 2d 31 29 2b c4 2d |Q%),.U(r%,-1)+.-|
0000da60 28 72 25 3d 32 29 2c 22 20 22 2b c3 51 25 29 2c |(r%=2)," "+.Q%),|
0000da70 22 22 2c 22 22 29 29 0d 04 f0 09 7f 41 25 3d b9 |"","")).....A%=.|
0000da80 0d 04 f1 09 cb 3a 3d 41 25 0d 04 f2 b0 dd f2 48 |.....:=A%......H|
0000da90 4a 28 76 24 2c 64 25 2c 71 25 2c 78 25 2c 68 5f |J(v$,d%,q%,x%,h_|
0000daa0 25 29 3a ea 67 79 25 2c 57 79 25 2c 53 25 2c 42 |%):.gy%,Wy%,S%,B|
0000dab0 25 2c 4f 79 25 2c 54 25 2c 41 5f 25 3a 41 5f 25 |%,Oy%,T%,A_%:A_%|
0000dac0 3d 64 25 2b 28 71 25 3c 3c 38 29 2b 28 78 25 3c |=d%+(q%<<8)+(x%<|
0000dad0 3c 26 43 29 2b 28 68 5f 25 3c 3c 32 34 29 3a 4f |<&C)+(h_%<<24):O|
0000dae0 79 25 3d a3 3a 53 25 3d a9 76 24 2b 31 2b 31 36 |y%=.:S%=.v$+1+16|
0000daf0 3a 57 79 25 3d 57 4a 25 3a 67 79 25 3d 2d 31 3a |:Wy%=WJ%:gy%=-1:|
0000db00 c8 95 57 79 25 3c 3e 2d 31 80 ac 4f 79 25 3a e7 |..Wy%<>-1..Oy%:.|
0000db10 a4 52 79 28 64 25 2c 71 25 2c 57 79 25 21 26 43 |.Ry(d%,q%,Wy%!&C|
0000db20 29 8c 4f 79 25 3d b9 8b 67 79 25 3d 57 79 25 3a |).Oy%=..gy%=Wy%:|
0000db30 57 79 25 3d 57 79 25 21 34 0d 04 f3 60 ce 3a 42 |Wy%=Wy%!4...`.:B|
0000db40 25 3d a4 77 28 77 5f 25 2c 53 25 2c b9 29 3a 21 |%=.w(w_%,S%,.):!|
0000db50 42 25 3d 67 79 25 3a 42 25 21 34 3d 57 79 25 3a |B%=gy%:B%!4=Wy%:|
0000db60 42 25 21 38 3d 53 25 3a 42 25 21 26 43 3d 41 5f |B%!8=S%:B%!&C=A_|
0000db70 25 3a 24 28 42 25 2b 31 36 29 3d 76 24 2b bd 26 |%:$(B%+16)=v$+.&|
0000db80 42 3a e7 67 79 25 3d 2d 31 8c 57 4a 25 3d 42 25 |B:.gy%=-1.WJ%=B%|
0000db90 8b 67 79 25 21 34 3d 42 25 0d 04 f4 14 e7 57 79 |.gy%!4=B%.....Wy|
0000dba0 25 3c 3e 2d 31 8c 21 57 79 25 3d 42 25 0d 04 f5 |%<>-1.!Wy%=B%...|
0000dbb0 23 e7 43 25 28 71 25 29 3d 57 79 25 84 43 25 28 |#.C%(q%)=Wy%.C%(|
0000dbc0 71 25 29 3d 2d 31 8c 43 25 28 71 25 29 3d 42 25 |q%)=-1.C%(q%)=B%|
0000dbd0 0d 04 f6 05 e1 0d 04 f7 2c dd f2 55 79 28 42 25 |........,..Uy(B%|
0000dbe0 29 3a f2 78 79 28 42 25 29 3a f2 79 3a 65 79 25 |):.xy(B%):.y:ey%|
0000dbf0 3d b9 3a e7 42 25 3d 65 5f 25 8c 65 5f 25 3d 2d |=.:.B%=e_%.e_%=-|
0000dc00 31 0d 04 f8 1f e7 56 79 25 80 28 5a 25 28 74 25 |1.....Vy%.(Z%(t%|
0000dc10 29 3d 35 84 5a 25 28 74 25 29 3d 33 29 8c f2 4f |)=5.Z%(t%)=3)..O|
0000dc20 0d 04 f9 05 e1 0d 04 fa 61 dd f2 78 79 28 42 25 |........a..xy(B%|
0000dc30 29 3a ea 67 79 25 2c 57 79 25 2c 72 25 2c 50 69 |):.gy%,Wy%,r%,Pi|
0000dc40 25 3a 50 69 25 3d 2d 31 3a 67 79 25 3d 21 42 25 |%:Pi%=-1:gy%=!B%|
0000dc50 3a 57 79 25 3d 42 25 21 34 3a 72 25 3d 28 42 25 |:Wy%=B%!4:r%=(B%|
0000dc60 21 26 43 3e 3e 38 29 80 26 46 3a 55 25 28 72 25 |!&C>>8).&F:U%(r%|
0000dc70 29 3d 30 3a e7 67 79 25 3c 3e 2d 31 8c 67 79 25 |)=0:.gy%<>-1.gy%|
0000dc80 21 34 3d 57 79 25 0d 04 fb 32 e7 57 79 25 3c 3e |!4=Wy%...2.Wy%<>|
0000dc90 2d 31 8c 21 57 79 25 3d 67 79 25 3a e7 28 28 57 |-1.!Wy%=gy%:.((W|
0000dca0 79 25 21 26 43 3e 3e 38 29 80 26 46 29 3d 72 25 |y%!&C>>8).&F)=r%|
0000dcb0 8c 50 69 25 3d 57 79 25 0d 04 fc 13 e7 57 4a 25 |.Pi%=Wy%.....WJ%|
0000dcc0 3d 42 25 8c 57 4a 25 3d 57 79 25 0d 04 fd 19 e7 |=B%.WJ%=Wy%.....|
0000dcd0 43 25 28 72 25 29 3d 42 25 8c 43 25 28 72 25 29 |C%(r%)=B%.C%(r%)|
0000dce0 3d 50 69 25 0d 04 fe 13 f2 44 79 28 77 5f 25 2c |=Pi%.....Dy(w_%,|
0000dcf0 42 25 2c b9 29 3a e1 0d 04 ff 42 dd a4 52 79 28 |B%,.):....B..Ry(|
0000dd00 63 25 2c 72 25 2c 54 25 29 3a ea 67 25 2c 4e 6c |c%,r%,T%):.g%,Nl|
0000dd10 25 2c 72 75 25 3a 4e 6c 25 3d 54 25 80 26 46 46 |%,ru%:Nl%=T%.&FF|
0000dd20 3a 72 75 25 3d 28 54 25 3e 3e 38 29 80 26 46 3a |:ru%=(T%>>8).&F:|
0000dd30 e7 72 25 3e 3d 72 75 25 8c 0d 05 00 1c e7 63 25 |.r%>=ru%......c%|
0000dd40 3c 4e 6c 25 80 72 75 25 3d 72 25 8c 67 25 3d b9 |<Nl%.ru%=r%.g%=.|
0000dd50 8b 67 25 3d a3 0d 05 01 09 cc 67 25 3d b9 0d 05 |.g%=......g%=...|
0000dd60 02 09 cd 3a 3d 67 25 0d 05 03 b2 dd f2 78 4a 3a |...:=g%......xJ:|
0000dd70 ea 42 25 2c 4f 79 25 2c 76 4a 25 2c 63 25 2c 72 |.B%,Oy%,vJ%,c%,r|
0000dd80 25 2c 6d 75 25 2c 66 4a 25 2c 6a 79 25 2c 64 25 |%,mu%,fJ%,jy%,d%|
0000dd90 2c 71 25 2c 78 25 3a f2 50 28 71 4a 25 2c 63 25 |,q%,x%:.P(qJ%,c%|
0000dda0 2c 72 25 2c 6d 75 25 2c 66 4a 25 2c 6a 79 25 29 |,r%,mu%,fJ%,jy%)|
0000ddb0 3a 42 25 3d 43 25 28 66 4a 25 29 3a 64 25 3d a4 |:B%=C%(fJ%):d%=.|
0000ddc0 49 3a 71 25 3d a4 56 3a 78 25 3d a4 4c 3a c8 95 |I:q%=.V:x%=.L:..|
0000ddd0 42 25 3c 3e 2d 31 80 ac 4f 79 25 80 ac 76 4a 25 |B%<>-1..Oy%..vJ%|
0000dde0 3a 63 25 3d 42 25 3f 26 43 3a 72 25 3d 28 42 25 |:c%=B%?&C:r%=(B%|
0000ddf0 21 26 43 3e 3e 38 29 80 26 46 3a e7 72 25 3e 71 |!&C>>8).&F:.r%>q|
0000de00 25 84 28 72 25 3d 71 25 80 63 25 3e 64 25 29 8c |%.(r%=q%.c%>d%).|
0000de10 76 4a 25 3d b9 3a f2 54 79 0d 05 04 38 e7 28 72 |vJ%=.:.Ty...8.(r|
0000de20 25 3e 66 4a 25 84 28 72 25 3d 66 4a 25 80 63 25 |%>fJ%.(r%=fJ%.c%|
0000de30 3e 6d 75 25 29 29 80 ac 76 4a 25 8c 4f 79 25 3d |>mu%))..vJ%.Oy%=|
0000de40 b9 3a f2 66 79 28 42 25 29 8b 42 25 3d 42 25 21 |.:.fy(B%).B%=B%!|
0000de50 34 0d 05 05 0f ce 3a e7 ac 4f 79 25 8c f2 54 79 |4.....:..Oy%..Ty|
0000de60 0d 05 06 05 e1 0d 05 07 45 dd f2 7a 79 3a ea 42 |........E..zy:.B|
0000de70 25 2c 63 25 2c 72 25 2c 64 25 2c 71 25 2c 78 25 |%,c%,r%,d%,q%,x%|
0000de80 3a 64 25 3d a4 49 3a 71 25 3d a4 56 3a 78 25 3d |:d%=.I:q%=.V:x%=|
0000de90 a4 4c 3a 42 25 3d 60 6c 25 21 34 3a 4a 5f 25 3d |.L:B%=`l%!4:J_%=|
0000dea0 30 3a e7 42 25 3c 3e 2d 31 8c 0d 05 08 3e 63 25 |0:.B%<>-1....>c%|
0000deb0 3d 42 25 3f 26 43 3a 72 25 3d 28 42 25 21 26 43 |=B%?&C:r%=(B%!&C|
0000dec0 3e 3e 38 29 80 26 46 3a e7 72 25 3e 71 25 84 28 |>>8).&F:.r%>q%.(|
0000ded0 72 25 3d 71 25 80 63 25 3e 64 25 29 8c f2 54 79 |r%=q%.c%>d%)..Ty|
0000dee0 8b f2 66 79 28 42 25 29 0d 05 09 07 cd 3a e1 0d |..fy(B%).....:..|
0000def0 05 0a 26 dd f2 54 79 3a 50 75 25 3d a3 3a 71 4a |..&..Ty:Pu%=.:qJ|
0000df00 25 3d a4 6e 28 a4 7a 29 3a f2 47 28 56 4a 25 29 |%=.n(.z):.G(VJ%)|
0000df10 3a f2 63 3a e1 0d 05 0b 99 dd f2 66 79 28 42 25 |:.c:.......fy(B%|
0000df20 29 3a ea 63 25 3a f2 41 28 56 4a 25 2c 31 2c a4 |):.c%:.A(VJ%,1,.|
0000df30 4f 28 22 69 74 73 22 2c a4 51 28 64 25 2c 71 25 |O("its",.Q(d%,q%|
0000df40 2c 78 25 2c 2d 31 29 2c 22 22 2c 22 22 2c 22 22 |,x%,-1),"","",""|
0000df50 29 29 3a f2 41 28 56 4a 25 2c 32 2c a4 60 28 42 |)):.A(VJ%,2,.`(B|
0000df60 25 2c 78 25 29 29 3a 63 25 3d 42 25 3f 26 46 3a |%,x%)):c%=B%?&F:|
0000df70 63 25 2d 3d 44 4a 25 2a 28 63 25 3d 30 29 3a f2 |c%-=DJ%*(c%=0):.|
0000df80 55 28 56 4a 25 2c 32 2c 63 25 29 3a f2 77 28 56 |U(VJ%,2,c%):.w(V|
0000df90 4a 25 2c b9 2c b9 29 3a 65 79 25 3d 2d 31 3a 4a |J%,.,.):ey%=-1:J|
0000dfa0 5f 25 3d 26 41 3a 60 6c 25 3d 42 25 3a e1 0d 05 |_%=&A:`l%=B%:...|
0000dfb0 0c 30 dd a4 62 28 63 25 2c 72 25 29 3a ea 42 25 |.0..b(c%,r%):.B%|
0000dfc0 2c 43 25 2c 4e 6c 25 2c 72 75 25 3a 42 25 3d 43 |,C%,Nl%,ru%:B%=C|
0000dfd0 25 28 72 25 29 3a e7 42 25 3c 3e 2d 31 8c 0d 05 |%(r%):.B%<>-1...|
0000dfe0 0d 15 f5 3a e7 42 25 3f 26 43 3d 63 25 8c 43 25 |...:.B%?&C=c%.C%|
0000dff0 2b 3d 31 0d 05 0e 36 42 25 3d 42 25 21 34 3a e7 |+=1...6B%=B%!4:.|
0000e000 42 25 3c 3e 2d 31 8c 4e 6c 25 3d 42 25 3f 26 43 |B%<>-1.Nl%=B%?&C|
0000e010 3a 72 75 25 3d 28 42 25 21 26 43 3e 3e 38 29 80 |:ru%=(B%!&C>>8).|
0000e020 26 46 8b 72 75 25 3d 26 44 0d 05 0f 12 fd 4e 6c |&F.ru%=&D.....Nl|
0000e030 25 3e 63 25 84 72 75 25 3e 72 25 0d 05 10 09 cd |%>c%.ru%>r%.....|
0000e040 3a 3d 43 25 0d 05 11 19 dd a4 6d 28 63 25 2c 72 |:=C%......m(c%,r|
0000e050 25 2c 42 25 29 3a e7 42 25 3d 2d 31 8c 0d 05 12 |%,B%):.B%=-1....|
0000e060 23 42 25 3d 43 25 28 72 25 29 3a c8 95 42 25 3f |#B%=C%(r%):..B%?|
0000e070 26 43 3c 3e 63 25 3a 42 25 3d 42 25 21 34 3a ce |&C<>c%:B%=B%!4:.|
0000e080 0d 05 13 0c cc 42 25 3d 42 25 21 34 0d 05 14 30 |.....B%=B%!4...0|
0000e090 cd 3a e7 42 25 3c 3e 2d 31 8c e7 42 25 3f 26 43 |.:.B%<>-1..B%?&C|
0000e0a0 3e 63 25 84 28 28 42 25 21 26 43 3e 3e 38 29 80 |>c%.((B%!&C>>8).|
0000e0b0 26 46 29 3e 72 25 8c 42 25 3d 2d 31 0d 05 15 07 |&F)>r%.B%=-1....|
0000e0c0 3d 42 25 0d 05 16 36 dd f2 4c 5f 3a ea 53 25 2c |=B%...6..L_:.S%,|
0000e0d0 43 25 2c 42 25 2c 72 25 3a 43 25 3d 2d 31 3a 57 |C%,B%,r%:C%=-1:W|
0000e0e0 4a 25 3d 2d 31 3a 7a 25 3d 8e 77 24 3a e7 ac 6c |J%=-1:z%=.w$:..l|
0000e0f0 4a 25 80 7a 25 3c 3e 30 8c 0d 05 17 3b c8 95 ac |J%.z%<>0....;...|
0000e100 c5 23 7a 25 3a 53 25 3d bb be 23 7a 25 3a 42 25 |.#z%:S%=..#z%:B%|
0000e110 3d a4 77 28 77 5f 25 2c 53 25 2c b9 29 3a e7 43 |=.w(w_%,S%,.):.C|
0000e120 25 3c 3e 2d 31 8c 43 25 21 34 3d 42 25 8b 57 4a |%<>-1.C%!4=B%.WJ|
0000e130 25 3d 42 25 0d 05 18 50 21 42 25 3d 43 25 3a 42 |%=B%...P!B%=C%:B|
0000e140 25 21 38 3d 53 25 3a c8 99 26 43 2c 34 2c 7a 25 |%!8=S%:..&C,4,z%|
0000e150 2c 42 25 2b 26 43 2c 53 25 2d 26 43 3a 72 25 3d |,B%+&C,S%-&C:r%=|
0000e160 28 28 42 25 21 26 43 29 3e 3e 38 29 80 26 46 3a |((B%!&C)>>8).&F:|
0000e170 e7 43 25 28 72 25 29 3d 2d 31 8c 43 25 28 72 25 |.C%(r%)=-1.C%(r%|
0000e180 29 3d 42 25 0d 05 19 15 43 25 3d 42 25 3a e7 73 |)=B%....C%=B%:.s|
0000e190 5f 25 8c f2 64 28 ac 31 29 0d 05 1a 16 ce 3a e7 |_%..d(.1).....:.|
0000e1a0 57 4a 25 3c 3e 2d 31 8c 42 25 21 34 3d 2d 31 0d |WJ%<>-1.B%!4=-1.|
0000e1b0 05 1b 0d d9 23 7a 25 3a 7a 25 3d 30 0d 05 1c 07 |....#z%:z%=0....|
0000e1c0 cd 3a e1 0d 05 1d 41 dd a4 68 79 28 54 25 2c 51 |.:....A..hy(T%,Q|
0000e1d0 25 2c 46 79 25 29 3a ea 41 24 2c 78 2c 63 25 2c |%,Fy%):.A$,x,c%,|
0000e1e0 46 25 2c 4c 25 3a 55 6c 25 3d 28 54 25 80 33 32 |F%,L%:Ul%=(T%.32|
0000e1f0 29 3d 30 3a 63 25 3d 46 79 25 2d 51 25 3a c8 8e |)=0:c%=Fy%-Q%:..|
0000e200 bd 54 25 ca 0d 05 1e 37 c9 22 79 22 2c 22 59 22 |.T%....7."y","Y"|
0000e210 3a 41 24 3d a4 41 28 22 79 65 61 72 22 2b c4 2d |:A$=.A("year"+.-|
0000e220 28 63 25 3e 31 29 2c 22 73 22 29 29 3a e7 55 6c |(c%>1),"s")):.Ul|
0000e230 25 8c 41 24 3d a4 73 28 41 24 29 0d 05 1f 0f c9 |%.A$=.s(A$).....|
0000e240 22 6e 22 3a 41 24 3d c3 63 25 0d 05 20 26 c9 22 |"n":A$=.c%.. &."|
0000e250 74 22 2c 22 54 22 3a 41 24 3d a4 4e 79 28 63 25 |t","T":A$=.Ny(c%|
0000e260 29 3a e7 55 6c 25 8c 41 24 3d a4 73 28 41 24 29 |):.Ul%.A$=.s(A$)|
0000e270 0d 05 21 56 c9 22 63 22 2c 22 43 22 3a c8 99 26 |..!V."c","C":..&|
0000e280 36 31 35 30 32 2c 53 5f 25 2c 22 41 6e 6e 22 2b |61502,S_%,"Ann"+|
0000e290 c3 63 25 2c 4a 25 2c 32 35 36 b8 2c 2c 2c 4c 25 |.c%,J%,256.,,,L%|
0000e2a0 3b 46 25 3a e7 28 46 25 80 31 29 3d 30 8c 4a 25 |;F%:.(F%.1)=0.J%|
0000e2b0 3f 4c 25 3d 26 44 3a 41 24 3d 22 20 28 22 2b 24 |?L%=&D:A$=" ("+$|
0000e2c0 4a 25 2b 22 29 22 0d 05 22 12 e7 55 6c 25 8c 41 |J%+")".."..Ul%.A|
0000e2d0 24 3d a4 73 28 41 24 29 0d 05 23 09 cb 3a 3d 41 |$=.s(A$)..#..:=A|
0000e2e0 24 0d 05 24 df dd f2 75 4a 3a 6b 79 25 3d 32 3a |$..$...uJ:ky%=2:|
0000e2f0 6d 5f 25 3d 26 46 3a 54 75 25 3d a3 3a 6f 69 25 |m_%=&F:Tu%=.:oi%|
0000e300 3d a4 43 28 22 46 41 4d 22 2c 22 46 41 4d 22 2c |=.C("FAM","FAM",|
0000e310 31 2c 34 29 3a 59 69 25 3d a4 43 28 22 44 49 4d |1,4):Yi%=.C("DIM|
0000e320 34 22 2c 22 41 4e 4d 22 2c 31 2c 33 29 3a 46 3d |4","ANM",1,3):F=|
0000e330 a4 43 28 22 44 49 4d 22 2c 22 44 49 4d 22 2c 31 |.C("DIM","DIM",1|
0000e340 2c 36 29 3a f2 7a 28 46 2c 33 2c 59 69 25 29 3a |,6):.z(F,3,Yi%):|
0000e350 f2 7a 28 46 2c 35 2c 6f 69 25 29 3a f2 63 5f 28 |.z(F,5,oi%):.c_(|
0000e360 46 2c 32 2c 2d 31 29 3a 73 4a 25 3d a4 43 28 22 |F,2,-1):sJ%=.C("|
0000e370 45 22 2c 22 45 22 2c 31 2c 36 29 3a 65 6c 25 3d |E","E",1,6):el%=|
0000e380 a4 43 28 22 4f 54 22 2c 22 4f 54 22 2c 31 2c 36 |.C("OT","OT",1,6|
0000e390 29 3a 78 6c 25 3d a4 43 28 22 44 61 79 22 2c 22 |):xl%=.C("Day","|
0000e3a0 44 61 79 22 2c 31 2c 37 29 3a 61 6c 25 3d a4 43 |Day",1,7):al%=.C|
0000e3b0 28 22 4f 45 22 2c 22 4f 45 22 2c 31 2c 26 43 29 |("OE","OE",1,&C)|
0000e3c0 0d 05 25 a1 46 6c 25 3d a4 43 79 28 a4 41 28 22 |..%.Fl%=.Cy(.A("|
0000e3d0 43 6f 6c 22 29 29 3a 24 28 46 6c 25 2b 32 38 2b |Col")):$(Fl%+28+|
0000e3e0 26 43 29 3d a4 41 28 22 44 65 66 22 29 3a 78 24 |&C)=.A("Def"):x$|
0000e3f0 3d 54 24 2b 22 44 69 61 72 79 22 3a de 56 25 28 |=T$+"Diary":.V%(|
0000e400 26 45 29 3a 4c 5f 25 3d 2d 31 3a 42 4a 25 3d 2d |&E):L_%=-1:BJ%=-|
0000e410 31 3a 41 75 25 3d 30 3a 57 75 25 3d a4 43 28 22 |1:Au%=0:Wu%=.C("|
0000e420 45 4e 22 2c 22 45 4e 22 2c 31 2c 33 29 3a 56 75 |EN","EN",1,3):Vu|
0000e430 25 3d a4 43 28 22 45 41 22 2c 22 45 22 2c 33 2c |%=.C("EA","E",3,|
0000e440 36 29 3a 44 5f 25 3d 30 3a 6c 79 25 3d 30 3a 4d |6):D_%=0:ly%=0:M|
0000e450 5f 25 3d 2d 31 3a 54 5f 25 3d 36 3a f2 41 6c 3a |_%=-1:T_%=6:.Al:|
0000e460 e1 0d 05 26 0a dd a4 71 79 3d 46 0d 05 27 79 dd |...&...qy=F..'y.|
0000e470 f2 4f 5f 28 41 25 29 3a f2 56 5f 3a f2 54 4a 3a |.O_(A%):.V_:.TJ:|
0000e480 f2 49 28 a4 49 2c a4 56 2c a4 4c 29 3a f2 4a 28 |.I(.I,.V,.L):.J(|
0000e490 46 2c 6b 79 25 2d 31 2c b9 29 3a 42 25 28 41 25 |F,ky%-1,.):B%(A%|
0000e4a0 29 3d a4 46 28 30 2c 30 2c 31 2c 31 2c 26 37 37 |)=.F(0,0,1,1,&77|
0000e4b0 64 29 3a 57 25 28 41 25 29 3d a4 46 28 30 2c 30 |d):W%(A%)=.F(0,0|
0000e4c0 2c 33 31 2d 36 2c 26 43 2c 26 66 66 66 29 3a 4d |,31-6,&C,&fff):M|
0000e4d0 24 28 41 25 29 3d a4 41 28 22 44 69 61 54 61 62 |$(A%)=.A("DiaTab|
0000e4e0 22 29 3a e1 0d 05 28 0a dd f2 70 4a 3a e1 0d 05 |"):...(...pJ:...|
0000e4f0 29 11 dd f2 6d 75 3a 42 4a 25 3d 2d 31 3a e1 0d |)...mu:BJ%=-1:..|
0000e500 05 2a e5 dd f2 55 75 28 76 25 2c 68 25 2c 61 25 |.*...Uu(v%,h%,a%|
0000e510 2c 4b 25 29 3a ea 64 25 2c 71 25 2c 78 25 2c 63 |,K%):.d%,q%,x%,c|
0000e520 4a 25 2c 76 6c 25 2c 76 5f 25 2c 6e 5f 25 2c 5a |J%,vl%,v_%,n_%,Z|
0000e530 4a 25 2c 68 6c 25 3a f2 50 28 76 25 2c 6e 5f 25 |J%,hl%:.P(v%,n_%|
0000e540 2c 5a 4a 25 2c 64 25 2c 71 25 2c 78 25 29 3a 63 |,ZJ%,d%,q%,x%):c|
0000e550 4a 25 3d a4 4a 28 22 48 6f 6d 65 72 74 6f 6e 2e |J%=.J("Homerton.|
0000e560 42 6f 6c 64 22 2c 26 45 2c 26 45 29 3a c8 99 26 |Bold",&E,&E):..&|
0000e570 34 30 30 45 36 2c 37 3a 76 6c 25 3d a4 4a 28 22 |400E6,7:vl%=.J("|
0000e580 54 72 69 6e 69 74 79 2e 42 6f 6c 64 22 2c 26 43 |Trinity.Bold",&C|
0000e590 2c 26 43 29 3a 76 5f 25 3d a4 4a 28 22 48 6f 6d |,&C):v_%=.J("Hom|
0000e5a0 65 72 74 6f 6e 2e 4d 65 64 69 75 6d 22 2c 26 41 |erton.Medium",&A|
0000e5b0 2c 26 41 29 3a c8 99 26 34 30 30 38 31 2c 2c 22 |,&A):..&40081,,"|
0000e5c0 54 72 69 6e 69 74 79 2e 4d 65 64 69 75 6d 22 2c |Trinity.Medium",|
0000e5d0 39 2a 31 36 2c 39 2a 31 36 b8 68 6c 25 3a c8 8e |9*16,9*16.hl%:..|
0000e5e0 6b 79 25 ca 0d 05 2b 17 c9 31 3a f2 6f 75 28 76 |ky%...+..1:.ou(v|
0000e5f0 25 2c 68 25 2c 61 25 2c 4b 25 29 0d 05 2c 17 c9 |%,h%,a%,K%)..,..|
0000e600 32 3a f2 6b 5f 28 76 25 2c 68 25 2c 61 25 2c 4b |2:.k_(v%,h%,a%,K|
0000e610 25 29 0d 05 2d 17 c9 33 3a f2 6b 75 28 76 25 2c |%)..-..3:.ku(v%,|
0000e620 68 25 2c 61 25 2c 4b 25 29 0d 05 2e 12 cb 3a f2 |h%,a%,K%).....:.|
0000e630 56 28 30 2c 37 29 3a e7 68 25 8c 0d 05 2f 1d 41 |V(0,7):.h%.../.A|
0000e640 24 3d a4 55 28 71 25 2c 2d 31 29 2b 22 20 22 2b |$=.U(q%,-1)+" "+|
0000e650 c3 78 25 3a c8 8e b9 ca 0d 05 30 39 c9 5a 4a 25 |.x%:......09.ZJ%|
0000e660 3c 3e 78 25 3a 41 24 3d a4 55 28 6e 5f 25 2c 33 |<>x%:A$=.U(n_%,3|
0000e670 29 2b 22 20 22 2b c3 5a 4a 25 2b 22 20 2d 20 22 |)+" "+.ZJ%+" - "|
0000e680 2b a4 55 28 71 25 2c 33 29 2b 22 20 22 2b c3 78 |+.U(q%,3)+" "+.x|
0000e690 25 0d 05 31 23 c9 6e 5f 25 3c 3e 71 25 3a 41 24 |%..1#.n_%<>q%:A$|
0000e6a0 3d a4 55 28 6e 5f 25 2c 2d 31 29 2b 22 20 2d 20 |=.U(n_%,-1)+" - |
0000e6b0 22 2b 41 24 0d 05 32 32 cb 3a e7 a4 47 28 a4 46 |"+A$..22.:..G(.F|
0000e6c0 28 30 2c 30 2c 64 25 2c 71 25 2c 78 25 29 2c 57 |(0,0,d%,q%,x%),W|
0000e6d0 25 28 74 25 29 29 3d 2d 31 8c f2 52 28 68 25 2c |%(t%))=-1..R(h%,|
0000e6e0 61 25 2c 4b 25 29 0d 05 33 1f f2 4c 28 63 4a 25 |a%,K%)..3..L(cJ%|
0000e6f0 2c 41 24 2c 31 2c 61 25 2b 6a 25 2d 26 41 2c 4b |,A$,1,a%+j%-&A,K|
0000e700 25 2d 26 41 29 0d 05 34 21 cc 3a 41 24 3d c3 5a |%-&A)..4!.:A$=.Z|
0000e710 4a 25 2b 22 20 22 2b a4 55 28 6e 5f 25 2c 2d 31 |J%+" "+.U(n_%,-1|
0000e720 29 3a c8 8e b9 ca 0d 05 35 39 c9 5a 4a 25 3c 3e |):......59.ZJ%<>|
0000e730 78 25 3a 41 24 3d c3 5a 4a 25 2b 22 20 22 2b a4 |x%:A$=.ZJ%+" "+.|
0000e740 55 28 6e 5f 25 2c 33 29 2b 22 20 2d 20 22 2b c3 |U(n_%,3)+" - "+.|
0000e750 78 25 2b 22 20 22 2b a4 55 28 71 25 2c 33 29 0d |x%+" "+.U(q%,3).|
0000e760 05 36 20 c9 6e 5f 25 3c 3e 71 25 3a 41 24 2b 3d |.6 .n_%<>q%:A$+=|
0000e770 22 20 2d 20 22 2b a4 55 28 71 25 2c 2d 31 29 0d |" - "+.U(q%,-1).|
0000e780 05 37 3d cb 3a f2 4c 28 63 4a 25 2c 41 24 2c 2d |.7=.:.L(cJ%,A$,-|
0000e790 31 2c 61 25 2b 26 41 2c 4b 25 2d 26 41 29 3a e7 |1,a%+&A,K%-&A):.|
0000e7a0 a4 47 28 76 25 2c 42 25 28 74 25 29 29 3d 31 8c |.G(v%,B%(t%))=1.|
0000e7b0 f2 52 28 68 25 2c 61 25 2c 4b 25 29 0d 05 38 1f |.R(h%,a%,K%)..8.|
0000e7c0 cd 3a f2 51 28 63 4a 25 29 3a f2 51 28 76 6c 25 |.:.Q(cJ%):.Q(vl%|
0000e7d0 29 3a f2 51 28 76 5f 25 29 3a e1 0d 05 39 17 dd |):.Q(v_%):...9..|
0000e7e0 f2 78 5f 28 70 25 2c 4f 69 25 29 3a c8 8e 21 70 |.x_(p%,Oi%):..!p|
0000e7f0 25 ca 0d 05 3a 17 c9 30 2c 31 2c 32 3a e7 6b 79 |%...:..0,1,2:.ky|
0000e800 25 3c 3e 21 70 25 2b 31 8c 0d 05 3b 6b f2 4a 28 |%<>!p%+1...;k.J(|
0000e810 46 2c 6b 79 25 2d 31 2c a3 29 3a 6b 79 25 3d 21 |F,ky%-1,.):ky%=!|
0000e820 70 25 2b 31 3a f2 4a 28 46 2c 21 70 25 2c b9 29 |p%+1:.J(F,!p%,.)|
0000e830 3a f2 50 28 53 25 28 a4 50 28 33 29 29 2c 41 25 |:.P(S%(.P(3)),A%|
0000e840 2c 42 25 2c 64 25 2c 71 25 2c 78 25 29 3a f2 49 |,B%,d%,q%,x%):.I|
0000e850 28 64 25 2c 71 25 2c 78 25 29 3a e7 5a 25 28 74 |(d%,q%,x%):.Z%(t|
0000e860 25 29 3d 33 8c 76 25 3d 53 25 28 74 25 29 3a 75 |%)=3.v%=S%(t%):u|
0000e870 4a 25 3d b9 0d 05 3c 05 cd 0d 05 3d 0e c9 33 3a |J%=...<....=..3:|
0000e880 c8 8e 70 25 21 34 ca 0d 05 3e 0f c9 30 3a f2 4f |..p%!4...>..0:.O|
0000e890 79 28 42 4a 25 29 0d 05 3f 0f c9 31 3a f2 55 5f |y(BJ%)..?..1:.U_|
0000e8a0 28 42 4a 25 29 0d 05 40 0e c9 32 3a f2 6b 28 42 |(BJ%)..@..2:.k(B|
0000e8b0 4a 25 29 0d 05 41 05 cb 0d 05 42 18 c9 34 3a f2 |J%)..A....B..4:.|
0000e8c0 41 79 28 a4 49 2c a4 56 2c a4 4c 2c 46 2c 30 29 |Ay(.I,.V,.L,F,0)|
0000e8d0 0d 05 43 0e c9 35 3a c8 8e 70 25 21 34 ca 0d 05 |..C..5:..p%!4...|
0000e8e0 44 0a c9 30 3a f2 5f 75 0d 05 45 0a c9 31 3a f2 |D..0:._u..E..1:.|
0000e8f0 4c 75 0d 05 46 0a c9 32 3a f2 49 75 0d 05 47 0a |Lu..F..2:.Iu..G.|
0000e900 c9 33 3a f2 48 5f 0d 05 48 05 cb 0d 05 49 07 cb |.3:.H_..H....I..|
0000e910 3a e1 0d 05 4a 17 dd f2 69 79 28 4d 79 25 2c 70 |:...J...iy(My%,p|
0000e920 25 29 3a c8 8e 4d 79 25 ca 0d 05 4b 4e c9 73 4a |%):..My%...KN.sJ|
0000e930 25 3a 41 24 3d a4 57 28 4d 79 25 2c 21 70 25 29 |%:A$=.W(My%,!p%)|
0000e940 3a e7 a4 53 5f 28 4d 79 25 29 3d 22 45 76 65 72 |:..S_(My%)="Ever|
0000e950 79 22 8c f2 41 28 66 25 2c 33 30 2c 41 24 29 3a |y"..A(f%,30,A$):|
0000e960 63 75 25 3d 21 70 25 2b 31 8b f2 41 28 4c 79 25 |cu%=!p%+1..A(Ly%|
0000e970 2c 26 44 2c 41 24 29 0d 05 4c 28 c9 65 6c 25 3a |,&D,A$)..L(.el%:|
0000e980 f2 41 28 66 25 2c 33 33 2c a4 57 28 4d 79 25 2c |.A(f%,33,.W(My%,|
0000e990 21 70 25 29 29 3a 66 75 25 3d 21 70 25 2b 31 0d |!p%)):fu%=!p%+1.|
0000e9a0 05 4d 28 c9 78 6c 25 3a f2 41 28 66 25 2c 33 34 |.M(.xl%:.A(f%,34|
0000e9b0 2c a4 57 28 4d 79 25 2c 21 70 25 29 29 3a 76 75 |,.W(My%,!p%)):vu|
0000e9c0 25 3d 21 70 25 2b 31 0d 05 4e 28 c9 61 6c 25 3a |%=!p%+1..N(.al%:|
0000e9d0 f2 41 28 66 25 2c 33 35 2c a4 57 28 4d 79 25 2c |.A(f%,35,.W(My%,|
0000e9e0 21 70 25 29 29 3a 74 75 25 3d 21 70 25 2b 31 0d |!p%)):tu%=!p%+1.|
0000e9f0 05 4f 07 cb 3a e1 0d 05 50 39 dd f2 58 79 28 6c |.O..:...P9..Xy(l|
0000ea00 25 29 3a ea 64 25 2c 71 25 2c 78 25 2c 41 25 2c |%):.d%,q%,x%,A%,|
0000ea10 42 25 3a f2 50 28 76 25 2c 41 25 2c 42 25 2c 64 |B%:.P(v%,A%,B%,d|
0000ea20 25 2c 71 25 2c 78 25 29 3a c8 8e 6b 79 25 ca 0d |%,q%,x%):..ky%..|
0000ea30 05 51 1d c9 31 3a f2 46 28 64 25 2c 71 25 2c 78 |.Q..1:.F(d%,q%,x|
0000ea40 25 2c 6c 25 2a 26 45 2c 30 2c 30 29 0d 05 52 1c |%,l%*&E,0,0)..R.|
0000ea50 c9 32 3a f2 46 28 64 25 2c 71 25 2c 78 25 2c 6c |.2:.F(d%,q%,x%,l|
0000ea60 25 2a 37 2c 30 2c 30 29 0d 05 53 1c c9 33 3a f2 |%*7,0,0)..S..3:.|
0000ea70 46 28 64 25 2c 71 25 2c 78 25 2c 6c 25 2a 32 2c |F(d%,q%,x%,l%*2,|
0000ea80 30 2c 30 29 0d 05 54 4b cb 3a 70 79 25 3d 2d a4 |0,0)..TK.:py%=-.|
0000ea90 47 28 76 25 2c a4 46 28 30 2c 30 2c 64 25 2c 71 |G(v%,.F(0,0,d%,q|
0000eaa0 25 2c 78 25 29 29 3a f2 49 28 64 25 2c 71 25 2c |%,x%)):.I(d%,q%,|
0000eab0 78 25 29 3a e7 a4 47 28 76 25 2c 42 25 28 74 25 |x%):..G(v%,B%(t%|
0000eac0 29 29 3d 2d 31 8c 76 25 3d 42 25 28 74 25 29 0d |))=-1.v%=B%(t%).|
0000ead0 05 55 1e e7 a4 47 28 76 25 2c 57 25 28 74 25 29 |.U...G(v%,W%(t%)|
0000eae0 29 3d 31 8c 76 25 3d 57 25 28 74 25 29 0d 05 56 |)=1.v%=W%(t%)..V|
0000eaf0 05 e1 0d 05 57 28 dd f2 61 5f 28 6e 25 2c 68 25 |....W(..a_(n%,h%|
0000eb00 2c 5f 25 2c 51 25 2c 6f 5f 25 2c 77 4a 25 29 3a |,_%,Q%,o_%,wJ%):|
0000eb10 ea 52 25 3a c8 8e 6b 79 25 ca 0d 05 58 1a c9 31 |.R%:..ky%...X..1|
0000eb20 3a 52 25 3d a4 54 79 28 6e 25 2c 68 25 2c 5f 25 |:R%=.Ty(n%,h%,_%|
0000eb30 2c 51 25 29 0d 05 59 1a c9 32 3a 52 25 3d a4 6b |,Q%)..Y..2:R%=.k|
0000eb40 79 28 6e 25 2c 68 25 2c 5f 25 2c 51 25 29 0d 05 |y(n%,h%,_%,Q%)..|
0000eb50 5a 1a c9 33 3a 52 25 3d a4 59 79 28 6e 25 2c 68 |Z..3:R%=.Yy(n%,h|
0000eb60 25 2c 5f 25 2c 51 25 29 0d 05 5b 1e cb 3a e7 6e |%,_%,Q%)..[..:.n|
0000eb70 25 3d 32 80 52 25 3e 31 8c 42 4a 25 3d 52 25 8b |%=2.R%>1.BJ%=R%.|
0000eb80 42 4a 25 3d 2d 31 0d 05 5c 05 e1 0d 05 5d 1c dd |BJ%=-1..\....]..|
0000eb90 a4 7a 79 28 77 25 2c 43 79 25 29 3a 6b 25 3d b9 |.zy(w%,Cy%):k%=.|
0000eba0 3a c8 8e 43 79 25 ca 0d 05 5e 0f c9 34 31 34 3a |:..Cy%...^..414:|
0000ebb0 f2 58 79 28 31 29 0d 05 5f 10 c9 34 31 35 3a f2 |.Xy(1).._..415:.|
0000ebc0 58 79 28 2d 31 29 0d 05 60 14 c9 33 30 3a f2 49 |Xy(-1)..`..30:.I|
0000ebd0 28 a4 49 2c a4 56 2c a4 4c 29 0d 05 61 1a c9 33 |(.I,.V,.L)..a..3|
0000ebe0 38 39 3a f2 41 79 28 a4 49 2c a4 56 2c a4 4c 2c |89:.Ay(.I,.V,.L,|
0000ebf0 46 2c 30 29 0d 05 62 0f c9 32 37 3a f2 47 28 61 |F,0)..b..27:.G(a|
0000ec00 79 25 29 0d 05 63 09 7f 6b 25 3d a3 0d 05 64 09 |y%)..c..k%=...d.|
0000ec10 cb 3a 3d 6b 25 0d 05 65 27 dd a4 64 79 28 65 25 |.:=k%..e'..dy(e%|
0000ec20 2c 77 25 2c 43 79 25 29 3a ea 41 25 2c 42 25 3a |,w%,Cy%):.A%,B%:|
0000ec30 6b 25 3d b9 3a e7 65 25 3d 66 25 8c 0d 05 66 34 |k%=.:.e%=f%...f4|
0000ec40 41 25 3d 30 3a e7 43 79 25 3d 26 44 84 43 79 25 |A%=0:.Cy%=&D.Cy%|
0000ec50 3d 33 39 38 84 43 79 25 3d 33 39 34 8c 41 25 3d |=398.Cy%=394.A%=|
0000ec60 31 8b e7 43 79 25 3d 33 39 39 8c 41 25 3d 2d 31 |1..Cy%=399.A%=-1|
0000ec70 0d 05 67 0b e7 41 25 3c 3e 30 8c 0d 05 68 09 c8 |..g..A%<>0...h..|
0000ec80 8e 77 25 ca 0d 05 69 19 c9 31 36 3a e7 41 25 3d |.w%...i..16:.A%=|
0000ec90 31 8c 42 25 3d 31 37 8b 42 25 3d 31 38 0d 05 6a |1.B%=17.B%=18..j|
0000eca0 10 c9 31 37 3a 42 25 3d 77 25 2b 41 25 0d 05 6b |..17:B%=w%+A%..k|
0000ecb0 0e c9 31 38 3a e7 41 25 3d 31 8c 0d 05 6c 16 e7 |..18:.A%=1...l..|
0000ecc0 43 79 25 3c 3e 26 44 8c 42 25 3d 31 36 8b f2 4e |Cy%<>&D.B%=16..N|
0000ecd0 5f 0d 05 6d 0a cc 42 25 3d 31 37 0d 05 6e 05 cd |_..m..B%=17..n..|
0000ece0 0d 05 6f 09 7f 6b 25 3d a3 0d 05 70 16 cb 3a e7 |..o..k%=...p..:.|
0000ecf0 42 25 3c 3e 30 8c f2 4d 28 65 25 2c 42 25 29 0d |B%<>0..M(e%,B%).|
0000ed00 05 71 0c cc 3a c8 8e 43 79 25 ca 0d 05 72 0a c9 |.q..:..Cy%...r..|
0000ed10 32 37 3a f2 6e 0d 05 73 1a c9 34 2c 32 34 3a e7 |27:.n..s..4,24:.|
0000ed20 4c 5f 25 3c 3e 2d 31 8c f2 6b 28 4c 5f 25 29 0d |L_%<>-1..k(L_%).|
0000ed30 05 74 09 7f 6b 25 3d a3 0d 05 75 05 cb 0d 05 76 |.t..k%=...u....v|
0000ed40 05 cd 0d 05 77 09 cc 6b 25 3d a3 0d 05 78 09 cd |....w..k%=...x..|
0000ed50 3a 3d 6b 25 0d 05 79 60 dd f2 6c 4a 3a ea 7a 25 |:=k%..y`..lJ:.z%|
0000ed60 2c 42 25 3a 7a 25 3d ae 78 24 3a 42 25 3d 4d 5f |,B%:z%=.x$:B%=M_|
0000ed70 25 3a c8 95 42 25 3c 3e 2d 31 3a d5 23 7a 25 2c |%:..B%<>-1:.#z%,|
0000ed80 c3 42 25 21 38 3a c8 99 26 43 2c 32 2c 7a 25 2c |.B%!8:..&C,2,z%,|
0000ed90 42 25 2b 26 43 2c 42 25 21 38 20 2d 26 43 3a 42 |B%+&C,B%!8 -&C:B|
0000eda0 25 3d 42 25 21 34 3a ce 3a d9 23 7a 25 3a 7a 25 |%=B%!4:.:.#z%:z%|
0000edb0 3d 30 3a e1 0d 05 7a 46 dd f2 41 75 28 7a 25 29 |=0:...zF..Au(z%)|
0000edc0 3a d5 23 7a 25 2c 6b 79 25 3a d5 23 7a 25 2c 6d |:.#z%,ky%:.#z%,m|
0000edd0 5f 25 3a d5 23 7a 25 2c 54 75 25 2b 35 3a d5 23 |_%:.#z%,Tu%+5:.#|
0000ede0 7a 25 2c 44 5f 25 3a d5 23 7a 25 2c 6c 79 25 3a |z%,D_%:.#z%,ly%:|
0000edf0 d5 23 7a 25 2c 54 5f 25 3a e1 0d 05 7b 48 dd f2 |.#z%,T_%:...{H..|
0000ee00 62 4a 28 7a 25 29 3a 6b 79 25 3d 9a 23 7a 25 3a |bJ(z%):ky%=.#z%:|
0000ee10 6d 5f 25 3d 9a 23 7a 25 3a 54 75 25 3d 28 9a 23 |m_%=.#z%:Tu%=(.#|
0000ee20 7a 25 29 2d 35 3a 44 5f 25 3d 9a 23 7a 25 3a 6c |z%)-5:D_%=.#z%:l|
0000ee30 79 25 3d 9a 23 7a 25 3a 54 5f 25 3d 9a 23 7a 25 |y%=.#z%:T_%=.#z%|
0000ee40 3a e1 0d 05 7c 46 dd f2 4a 75 28 73 25 2c 53 79 |:...|F..Ju(s%,Sy|
0000ee50 25 2c 70 25 2c 5f 25 2c 51 25 29 3a ea 41 25 2c |%,p%,_%,Q%):.A%,|
0000ee60 42 25 3a 21 4a 25 3d 73 25 3a c8 99 26 34 30 30 |B%:!J%=s%:..&400|
0000ee70 43 42 2c 2c 4a 25 3a 5f 25 3d 4a 25 21 34 2b 36 |CB,,J%:_%=J%!4+6|
0000ee80 36 34 3a c8 8e 77 25 ca 0d 05 7d 1d c9 31 2c 32 |64:..w%...}..1,2|
0000ee90 2c 33 3a e7 6e 25 3c 3e 32 f2 5a 28 73 25 2c 53 |,3:.n%<>2.Z(s%,S|
0000eea0 79 25 2c 31 29 0d 05 7e 3e c9 26 44 3a f2 48 28 |y%,1)..~>.&D:.H(|
0000eeb0 42 79 25 2c 30 2c 2d 31 29 3a f2 4a 28 42 79 25 |By%,0,-1):.J(By%|
0000eec0 2c a4 71 28 73 25 2c 53 79 25 29 2c 31 29 3a f2 |,.q(s%,Sy%),1):.|
0000eed0 43 28 42 79 25 2c 5f 25 2c 51 25 2c 73 25 2c 53 |C(By%,_%,Q%,s%,S|
0000eee0 79 25 29 0d 05 7f 2d c9 36 3a 42 25 3d ac a4 4d |y%)...-.6:B%=..M|
0000eef0 28 73 25 2c 53 79 25 29 3a e3 41 25 3d 37 b8 26 |(s%,Sy%):.A%=7.&|
0000ef00 41 3a f2 53 28 73 25 2c 41 25 2c 42 25 29 3a ed |A:.S(s%,A%,B%):.|
0000ef10 0d 05 80 3e c9 38 2c 39 3a 41 25 3d bb a4 5a 28 |...>.8,9:A%=..Z(|
0000ef20 73 25 2c 37 29 3a 41 25 2b 3d 31 2b 32 2a 28 53 |s%,7):A%+=1+2*(S|
0000ef30 79 25 3d 38 29 3a e7 41 25 3e 30 80 41 25 3c 26 |y%=8):.A%>0.A%<&|
0000ef40 44 8c f2 41 28 73 25 2c 37 2c c3 41 25 29 0d 05 |D..A(s%,7,.A%)..|
0000ef50 81 1c c9 26 41 3a f2 43 28 56 75 25 2c 5f 25 2c |...&A:.C(Vu%,_%,|
0000ef60 51 25 2c 73 25 2c 53 79 25 29 0d 05 82 1d c9 26 |Q%,s%,Sy%).....&|
0000ef70 42 3a f2 53 28 73 25 2c 26 43 2c ac a4 4d 28 73 |B:.S(s%,&C,..M(s|
0000ef80 25 2c 53 79 25 29 29 0d 05 83 1c c9 26 43 3a f2 |%,Sy%)).....&C:.|
0000ef90 43 28 57 75 25 2c 5f 25 2c 51 25 2c 73 25 2c 53 |C(Wu%,_%,Q%,s%,S|
0000efa0 79 25 29 0d 05 84 07 cb 3a e1 0d 05 85 16 dd f2 |y%).....:.......|
0000efb0 69 4a 28 70 25 2c 73 25 29 3a c8 8e 74 4a 25 ca |iJ(p%,s%):..tJ%.|
0000efc0 0d 05 86 31 c9 42 79 25 3a f2 55 28 73 25 2c 26 |...1.By%:.U(s%,&|
0000efd0 44 2c 21 70 25 29 3a f2 48 28 42 79 25 2c 30 2c |D,!p%):.H(By%,0,|
0000efe0 2d 31 29 3a f2 4a 28 42 79 25 2c 21 70 25 2c 31 |-1):.J(By%,!p%,1|
0000eff0 29 0d 05 87 1e c9 56 75 25 3a f2 41 28 73 25 2c |).....Vu%:.A(s%,|
0000f000 26 41 2c a4 57 28 56 75 25 2c 21 70 25 29 29 0d |&A,.W(Vu%,!p%)).|
0000f010 05 88 1e c9 57 75 25 3a f2 41 28 73 25 2c 26 43 |....Wu%:.A(s%,&C|
0000f020 2c a4 57 28 57 75 25 2c 21 70 25 29 29 0d 05 89 |,.W(Wu%,!p%))...|
0000f030 07 cb 3a e1 0d 05 8a e7 dd f2 6e 75 28 73 25 29 |..:.......nu(s%)|
0000f040 3a ea 41 25 3a e3 41 25 3d 31 b8 33 3a f2 5a 28 |:.A%:.A%=1.3:.Z(|
0000f050 73 25 2c 41 25 2c 94 28 6b 79 25 3d 41 25 29 29 |s%,A%,.(ky%=A%))|
0000f060 3a ed 3a f2 55 28 73 25 2c 26 44 2c 6d 5f 25 29 |:.:.U(s%,&D,m_%)|
0000f070 3a f2 5a 28 73 25 2c 35 2c 2d 54 75 25 29 3a f2 |:.Z(s%,5,-Tu%):.|
0000f080 5a 28 73 25 2c 26 42 2c 2d 28 44 5f 25 3c 3e 30 |Z(s%,&B,-(D_%<>0|
0000f090 29 29 3a f2 53 28 73 25 2c 26 43 2c 2d 28 44 5f |)):.S(s%,&C,-(D_|
0000f0a0 25 3d 30 29 29 3a f2 5a 28 73 25 2c 36 2c 2d 28 |%=0)):.Z(s%,6,-(|
0000f0b0 6c 79 25 3c 3e 30 29 29 3a e3 41 25 3d 37 b8 26 |ly%<>0)):.A%=7.&|
0000f0c0 41 3a f2 53 28 73 25 2c 41 25 2c 2d 28 6c 79 25 |A:.S(s%,A%,-(ly%|
0000f0d0 3d 30 29 29 3a ed 3a f2 5a 28 73 25 2c 26 46 2c |=0)):.:.Z(s%,&F,|
0000f0e0 94 28 28 54 5f 25 80 34 29 3e 30 29 29 3a f2 5a |.((T_%.4)>0)):.Z|
0000f0f0 28 73 25 2c 31 36 2c 94 28 28 54 5f 25 80 32 29 |(s%,16,.((T_%.2)|
0000f100 3e 30 29 29 3a f2 5a 28 73 25 2c 31 37 2c 94 28 |>0)):.Z(s%,17,.(|
0000f110 28 54 5f 25 80 31 29 3e 30 29 29 0d 05 8b 23 f2 |(T_%.1)>0))...#.|
0000f120 53 28 73 25 2c 26 46 2c 94 28 28 54 5f 25 80 31 |S(s%,&F,.((T_%.1|
0000f130 29 3e 30 29 29 3a e7 6c 79 25 3c 3e 30 8c 0d 05 |)>0)):.ly%<>0...|
0000f140 8c 2f f2 41 28 73 25 2c 37 2c c3 28 6c 79 25 80 |./.A(s%,7,.(ly%.|
0000f150 26 46 29 29 3a f2 41 28 73 25 2c 26 41 2c a4 57 |&F)):.A(s%,&A,.W|
0000f160 28 56 75 25 2c 6c 79 25 3e 3e 34 29 29 0d 05 8d |(Vu%,ly%>>4))...|
0000f170 24 cc f2 41 28 73 25 2c 37 2c 22 31 22 29 3a f2 |$..A(s%,7,"1"):.|
0000f180 41 28 73 25 2c 26 41 2c a4 41 28 22 45 33 22 29 |A(s%,&A,.A("E3")|
0000f190 29 0d 05 8e 38 cd 3a e7 44 5f 25 3d 30 8c f2 41 |)...8.:.D_%=0..A|
0000f1a0 28 73 25 2c 26 43 2c a4 41 28 22 45 4e 31 22 29 |(s%,&C,.A("EN1")|
0000f1b0 29 8b f2 41 28 73 25 2c 26 43 2c a4 57 28 57 75 |)..A(s%,&C,.W(Wu|
0000f1c0 25 2c 44 5f 25 2d 31 29 29 0d 05 8f 05 e1 0d 05 |%,D_%-1)).......|
0000f1d0 90 c1 dd f2 62 75 28 73 25 29 3a ea 41 25 2c 42 |....bu(s%):.A%,B|
0000f1e0 25 2c 64 25 2c 71 25 2c 78 25 3a 41 25 3d 30 3a |%,d%,q%,x%:A%=0:|
0000f1f0 f5 41 25 2b 3d 31 3a fd a4 4d 28 73 25 2c 41 25 |.A%+=1:..M(s%,A%|
0000f200 29 84 41 25 3d 33 3a 6b 79 25 3d 41 25 3a f2 50 |).A%=3:ky%=A%:.P|
0000f210 28 53 25 28 a4 50 28 33 29 29 2c 41 25 2c 42 25 |(S%(.P(3)),A%,B%|
0000f220 2c 64 25 2c 71 25 2c 78 25 29 3a f2 49 28 64 25 |,d%,q%,x%):.I(d%|
0000f230 2c 71 25 2c 78 25 29 3a 6d 5f 25 3d a4 71 28 73 |,q%,x%):m_%=.q(s|
0000f240 25 2c 26 44 29 3a 54 75 25 3d a4 4d 28 73 25 2c |%,&D):Tu%=.M(s%,|
0000f250 35 29 3a 6c 79 25 3d 30 3a 44 5f 25 3d 30 3a e7 |5):ly%=0:D_%=0:.|
0000f260 a4 4d 28 73 25 2c 36 29 8c 6c 79 25 3d 28 28 a4 |.M(s%,6).ly%=((.|
0000f270 6b 28 56 75 25 2c a4 5a 28 73 25 2c 26 41 29 29 |k(Vu%,.Z(s%,&A))|
0000f280 29 3c 3c 34 29 2b bb a4 5a 28 73 25 2c 37 29 0d |)<<4)+..Z(s%,7).|
0000f290 05 91 26 e7 a4 4d 28 73 25 2c 26 42 29 8c 44 5f |..&..M(s%,&B).D_|
0000f2a0 25 3d a4 6b 28 57 75 25 2c a4 5a 28 73 25 2c 26 |%=.k(Wu%,.Z(s%,&|
0000f2b0 43 29 29 2b 31 0d 05 92 2e 54 5f 25 3d 94 28 a4 |C))+1....T_%=.(.|
0000f2c0 4d 28 73 25 2c 31 37 29 2b 32 2a a4 4d 28 73 25 |M(s%,17)+2*.M(s%|
0000f2d0 2c 31 36 29 2b 34 2a a4 4d 28 73 25 2c 26 46 29 |,16)+4*.M(s%,&F)|
0000f2e0 29 3a e1 0d 05 93 3a dd f2 49 28 64 25 2c 71 25 |):....:..I(d%,q%|
0000f2f0 2c 78 25 29 3a ea 75 25 2c 42 25 2c 4f 79 25 2c |,x%):.u%,B%,Oy%,|
0000f300 54 25 2c 79 25 3a 75 25 3d a4 48 28 64 25 2c 71 |T%,y%:u%=.H(d%,q|
0000f310 25 2c 78 25 29 3a e7 6b 79 25 3d 33 8c 0d 05 94 |%,x%):.ky%=3....|
0000f320 24 f2 46 28 64 25 2c 71 25 2c 78 25 2c a4 5a 5f |$.F(d%,q%,x%,.Z_|
0000f330 28 64 25 2c 71 25 2c 78 25 29 2d 31 2c 30 2c 30 |(d%,q%,x%)-1,0,0|
0000f340 29 0d 05 95 1b cc f2 46 28 64 25 2c 71 25 2c 78 |)......F(d%,q%,x|
0000f350 25 2c 2d 75 25 2b 31 2c 30 2c 30 29 0d 05 96 3a |%,-u%+1,0,0)...:|
0000f360 cd 3a 79 25 3d a4 46 28 30 2c 30 2c 64 25 2c 71 |.:y%=.F(0,0,d%,q|
0000f370 25 2c 78 25 29 3a 53 25 28 a4 50 28 33 29 29 3d |%,x%):S%(.P(3))=|
0000f380 79 25 3a e7 5a 25 28 74 25 29 3d 33 8c 76 25 3d |y%:.Z%(t%)=3.v%=|
0000f390 53 25 28 74 25 29 0d 05 97 09 f2 4d 79 3a e1 0d |S%(t%).....My:..|
0000f3a0 05 98 6f dd f2 4d 79 3a ea 42 25 2c 54 25 2c 4f |..o..My:.B%,T%,O|
0000f3b0 79 25 3a 42 25 3d 4d 5f 25 3a 6b 4a 25 3d 2d 31 |y%:B%=M_%:kJ%=-1|
0000f3c0 3a 79 25 3d 53 25 28 a4 50 28 33 29 29 3a 56 25 |:y%=S%(.P(3)):V%|
0000f3d0 28 29 3d 30 3a c8 95 42 25 3c 3e 2d 31 80 ac 4f |()=0:..B%<>-1..O|
0000f3e0 79 25 3a 54 25 3d 42 25 21 26 43 3a e7 a4 47 28 |y%:T%=B%!&C:..G(|
0000f3f0 79 25 2c 54 25 29 3c 3e 31 8c 4f 79 25 3d b9 3a |y%,T%)<>1.Oy%=.:|
0000f400 6b 4a 25 3d 42 25 8b 42 25 3d 42 25 21 34 0d 05 |kJ%=B%.B%=B%!4..|
0000f410 99 07 ce 3a e1 0d 05 9a 60 dd a4 63 79 28 54 25 |...:....`..cy(T%|
0000f420 29 3a ea 42 25 2c 46 25 3a 42 25 3d 4d 5f 25 3a |):.B%,F%:B%=M_%:|
0000f430 46 25 3d 2d 31 3a c8 95 42 25 3c 3e 2d 31 80 46 |F%=-1:..B%<>-1.F|
0000f440 25 3d 2d 31 3a e7 28 28 42 25 21 31 36 29 80 28 |%=-1:.((B%!16).(|
0000f450 31 3c 3c 32 30 29 29 3d 30 84 28 28 42 25 21 31 |1<<20))=0.((B%!1|
0000f460 36 29 80 34 29 3d 34 8c 46 25 3d 42 25 8b 42 25 |6).4)=4.F%=B%.B%|
0000f470 3d 42 25 21 34 0d 05 9b 09 ce 3a 3d 46 25 0d 05 |=B%!4.....:=F%..|
0000f480 9c 20 dd f2 5f 5f 28 42 25 29 3a e7 28 42 25 21 |. ..__(B%):.(B%!|
0000f490 31 36 80 28 33 3c 3c 32 30 29 29 3d 30 8c 0d 05 |16.(3<<20))=0...|
0000f4a0 9d 6b ea 66 79 25 2c 4b 79 25 2c 64 25 2c 71 25 |.k.fy%,Ky%,d%,q%|
0000f4b0 2c 78 25 2c 4b 5f 25 2c 41 24 2c 41 25 2c 52 25 |,x%,K_%,A$,A%,R%|
0000f4c0 2c 43 25 3a f2 50 28 42 25 21 26 43 2c 66 79 25 |,C%:.P(B%!&C,fy%|
0000f4d0 2c 4b 79 25 2c 64 25 2c 71 25 2c 78 25 29 3a 41 |,Ky%,d%,q%,x%):A|
0000f4e0 75 25 3d 42 25 3a e7 4b 79 25 3e 26 43 8c 4b 79 |u%=B%:.Ky%>&C.Ky|
0000f4f0 25 2d 3d 26 43 3a 4b 5f 25 3d b9 8b e7 4b 79 25 |%-=&C:K_%=...Ky%|
0000f500 3d 30 8c 4b 79 25 3d 26 43 0d 05 9e 3d 41 24 3d |=0.Ky%=&C...=A$=|
0000f510 c3 4b 79 25 2b 22 3a 22 2b c4 32 2d a9 c3 66 79 |.Ky%+":"+.2-..fy|
0000f520 25 2c 22 30 22 29 2b c3 66 79 25 3a e7 4b 5f 25 |%,"0")+.fy%:.K_%|
0000f530 8c 41 24 2b 3d 22 20 70 6d 2c 22 8b 41 24 2b 3d |.A$+=" pm,".A$+=|
0000f540 22 20 61 6d 2c 22 0d 05 9f 50 f2 41 28 4c 79 25 |" am,"...P.A(Ly%|
0000f550 2c 31 2c a4 4f 28 22 57 61 73 53 65 74 22 2c 41 |,1,.O("WasSet",A|
0000f560 24 2c 22 22 2c 22 22 2c 22 22 29 29 3a f2 41 28 |$,"","","")):.A(|
0000f570 4c 79 25 2c 32 2c a4 51 28 64 25 2c 71 25 2c 78 |Ly%,2,.Q(d%,q%,x|
0000f580 25 2c 2d 31 29 29 3a e7 28 28 42 25 21 31 36 29 |%,-1)):.((B%!16)|
0000f590 80 34 29 3d 34 8c 0d 05 a0 18 52 25 3d b9 3a e7 |.4)=4.....R%=.:.|
0000f5a0 28 28 42 25 21 31 36 29 80 38 29 3d 38 8c 0d 05 |((B%!16).8)=8...|
0000f5b0 a1 63 f2 6d 79 28 66 79 25 2c 4b 79 25 2c 64 25 |.c.my(fy%,Ky%,d%|
0000f5c0 2c 71 25 2c 78 25 2c 28 28 42 25 21 31 36 29 3e |,q%,x%,((B%!16)>|
0000f5d0 3e 38 29 80 26 46 46 2c 28 28 28 42 25 21 31 36 |>8).&FF,(((B%!16|
0000f5e0 29 3e 3e 31 36 29 80 26 46 29 2d 31 29 3a e7 4b |)>>16).&F)-1):.K|
0000f5f0 79 25 3e 26 43 8c 4b 79 25 2d 3d 26 43 3a 4b 5f |y%>&C.Ky%-=&C:K_|
0000f600 25 3d b9 8b e7 4b 79 25 3d 30 8c 4b 79 25 3d 26 |%=...Ky%=0.Ky%=&|
0000f610 43 0d 05 a2 3d 41 24 3d c3 4b 79 25 2b 22 3a 22 |C...=A$=.Ky%+":"|
0000f620 2b c4 32 2d a9 c3 66 79 25 2c 22 30 22 29 2b c3 |+.2-..fy%,"0")+.|
0000f630 66 79 25 3a e7 4b 5f 25 8c 41 24 2b 3d 22 20 70 |fy%:.K_%.A$+=" p|
0000f640 6d 2c 22 8b 41 24 2b 3d 22 20 61 6d 2c 22 0d 05 |m,".A$+=" am,"..|
0000f650 a3 42 f2 41 28 4c 79 25 2c 26 46 2c a4 4f 28 22 |.B.A(Ly%,&F,.O("|
0000f660 57 69 6c 52 70 74 22 2c 41 24 2c 22 22 2c 22 22 |WilRpt",A$,"",""|
0000f670 2c 22 22 29 29 3a f2 41 28 4c 79 25 2c 31 36 2c |,"")):.A(Ly%,16,|
0000f680 a4 51 28 64 25 2c 71 25 2c 78 25 2c 2d 31 29 29 |.Q(d%,q%,x%,-1))|
0000f690 0d 05 a4 53 cc 3a f2 6a 79 28 64 25 2c 71 25 2c |...S.:.jy(d%,q%,|
0000f6a0 78 25 2c 42 25 21 31 36 29 3a 41 24 3d c3 4b 79 |x%,B%!16):A$=.Ky|
0000f6b0 25 2b 22 3a 22 2b c4 32 2d a9 c3 66 79 25 2c 22 |%+":"+.2-..fy%,"|
0000f6c0 30 22 29 2b c3 66 79 25 3a e7 4b 5f 25 8c 41 24 |0")+.fy%:.K_%.A$|
0000f6d0 2b 3d 22 20 70 6d 2c 22 8b 41 24 2b 3d 22 20 61 |+=" pm,".A$+=" a|
0000f6e0 6d 2c 22 0d 05 a5 42 f2 41 28 4c 79 25 2c 26 46 |m,"...B.A(Ly%,&F|
0000f6f0 2c a4 4f 28 22 57 69 6c 52 70 74 22 2c 41 24 2c |,.O("WilRpt",A$,|
0000f700 22 22 2c 22 22 2c 22 22 29 29 3a f2 41 28 4c 79 |"","","")):.A(Ly|
0000f710 25 2c 31 36 2c a4 51 28 64 25 2c 71 25 2c 78 25 |%,16,.Q(d%,q%,x%|
0000f720 2c 2d 31 29 29 0d 05 a6 05 cd 0d 05 a7 1b cd 3a |,-1))..........:|
0000f730 e7 28 28 42 25 21 31 36 29 80 31 29 3d 31 8c 4a |.((B%!16).1)=1.J|
0000f740 5f 25 3d 26 41 0d 05 a8 db 43 25 3d 28 42 25 21 |_%=&A....C%=(B%!|
0000f750 31 36 3e 3e 34 29 80 26 46 3a 43 25 2d 3d 6d 5f |16>>4).&F:C%-=m_|
0000f760 25 2a 28 43 25 3d 30 29 3a e3 41 25 3d 34 b8 36 |%*(C%=0):.A%=4.6|
0000f770 3a f2 55 28 4c 79 25 2c 41 25 2c 43 25 29 3a ed |:.U(Ly%,A%,C%):.|
0000f780 3a 42 25 2b 3d 32 30 3a e3 41 25 3d 34 b8 36 3a |:B%+=20:.A%=4.6:|
0000f790 41 24 3d 22 22 3a c8 95 3f 42 25 3c 3e 26 42 3a |A$="":..?B%<>&B:|
0000f7a0 41 24 2b 3d bd 3f 42 25 3a 42 25 2b 3d 31 3a ce |A$+=.?B%:B%+=1:.|
0000f7b0 3a 42 25 2b 3d 31 3a f2 41 28 4c 79 25 2c 41 25 |:B%+=1:.A(Ly%,A%|
0000f7c0 2c 41 24 29 3a ed 3a f2 5a 28 4c 79 25 2c 39 2c |,A$):.:.Z(Ly%,9,|
0000f7d0 30 29 3a e3 41 25 3d 26 41 b8 26 44 3a f2 53 28 |0):.A%=&A.&D:.S(|
0000f7e0 4c 79 25 2c 41 25 2c 31 29 3a ed 3a f2 41 28 4c |Ly%,A%,1):.:.A(L|
0000f7f0 79 25 2c 26 41 2c 22 31 22 29 3a f2 41 28 4c 79 |y%,&A,"1"):.A(Ly|
0000f800 25 2c 26 44 2c a4 41 28 22 45 31 22 29 29 3a f2 |%,&D,.A("E1")):.|
0000f810 63 4a 28 ac 52 25 2c b9 29 3a 72 4a 25 3d 2d 31 |cJ(.R%,.):rJ%=-1|
0000f820 0d 05 a9 21 cc 3a e7 28 42 25 21 31 36 80 28 31 |...!.:.(B%!16.(1|
0000f830 3c 3c 32 31 29 29 3c 3e 30 8c f2 74 75 28 42 25 |<<21))<>0..tu(B%|
0000f840 29 0d 05 aa 0d f2 42 79 28 42 25 2c 30 29 0d 05 |).....By(B%,0)..|
0000f850 ab 07 cd 3a e1 0d 05 ac 6f dd f2 74 75 28 42 25 |...:....o..tu(B%|
0000f860 29 3a ea 41 24 2c 41 25 2c 5a 24 2c 78 69 25 2c |):.A$,A%,Z$,xi%,|
0000f870 60 75 25 3a 42 25 2b 3d 32 30 3a e3 41 25 3d 31 |`u%:B%+=20:.A%=1|
0000f880 b8 33 3a c8 95 3f 42 25 3c 3e 26 42 3a 41 24 2b |.3:..?B%<>&B:A$+|
0000f890 3d bd 3f 42 25 3a 42 25 2b 3d 31 3a ce 3a 42 25 |=.?B%:B%+=1:.:B%|
0000f8a0 2b 3d 31 3a ed 3a e7 c0 41 24 2c 31 29 3d 22 3d |+=1:.:..A$,1)="=|
0000f8b0 22 8c 41 24 3d c1 41 24 2c a7 41 24 2c 22 2a 22 |".A$=.A$,.A$,"*"|
0000f8c0 29 2b 31 29 0d 05 ad 34 5a 24 3d a4 73 28 c0 41 |)+1)...4Z$=.s(.A|
0000f8d0 24 2c a7 41 24 2c 22 20 22 29 29 29 3a e7 5a 24 |$,.A$," "))):.Z$|
0000f8e0 3c 3e 22 46 49 4c 45 52 5f 52 55 4e 22 80 5a 24 |<>"FILER_RUN".Z$|
0000f8f0 3c 3e 22 52 55 4e 22 8c 0d 05 ae 43 c8 99 38 2c |<>"RUN"....C..8,|
0000f900 35 2c 41 24 b8 78 69 25 2c 60 75 25 3a e7 78 69 |5,A$.xi%,`u%:.xi|
0000f910 25 3d 32 8c 41 24 3d 22 52 75 6e 20 22 2b 41 24 |%=2.A$="Run "+A$|
0000f920 8b e7 78 69 25 3c 3e 30 8c 41 24 3d 22 46 69 6c |..xi%<>0.A$="Fil|
0000f930 65 72 5f 52 75 6e 20 22 2b 41 24 0d 05 af 13 cd |er_Run "+A$.....|
0000f940 3a c8 99 26 34 30 30 44 45 2c 41 24 3a e1 0d 05 |:..&400DE,A$:...|
0000f950 b0 ca dd f2 49 75 3a ea 79 25 2c 42 25 2c 4f 79 |....Iu:.y%,B%,Oy|
0000f960 25 2c 41 25 2c 43 25 2c 64 25 2c 71 25 2c 78 25 |%,A%,C%,d%,q%,x%|
0000f970 3a 79 25 3d 53 25 28 a4 50 28 33 29 29 3a 42 25 |:y%=S%(.P(3)):B%|
0000f980 3d 6b 4a 25 3a f2 50 28 79 25 2c 41 25 2c 43 25 |=kJ%:.P(y%,A%,C%|
0000f990 2c 64 25 2c 71 25 2c 78 25 29 3a 41 25 3d 2d 26 |,d%,q%,x%):A%=-&|
0000f9a0 45 2a 28 6b 79 25 3d 31 29 2d 37 2a 28 6b 79 25 |E*(ky%=1)-7*(ky%|
0000f9b0 3d 32 29 2d 32 2a 28 6b 79 25 3d 33 29 3a f2 46 |=2)-2*(ky%=3):.F|
0000f9c0 28 64 25 2c 71 25 2c 78 25 2c 41 25 2c 30 2c 30 |(d%,q%,x%,A%,0,0|
0000f9d0 29 3a 79 25 3d a4 46 28 30 2c 30 2c 64 25 2c 71 |):y%=.F(0,0,d%,q|
0000f9e0 25 2c 78 25 29 3a c8 95 42 25 3c 3e 2d 31 80 ac |%,x%):..B%<>-1..|
0000f9f0 4f 79 25 3a 54 25 3d 42 25 21 26 43 3a e7 a4 47 |Oy%:T%=B%!&C:..G|
0000fa00 28 79 25 2c 54 25 29 3d 2d 31 8c 4f 79 25 3d b9 |(y%,T%)=-1.Oy%=.|
0000fa10 8b 42 25 3d 42 25 21 34 0d 05 b1 0b ce 3a e7 4f |.B%=B%!4.....:.O|
0000fa20 79 25 8c 0d 05 b2 32 74 25 3d a4 50 28 33 29 3a |y%....2t%=.P(3):|
0000fa30 f2 50 28 42 25 21 26 43 2c 41 25 2c 43 25 2c 64 |.P(B%!&C,A%,C%,d|
0000fa40 25 2c 71 25 2c 78 25 29 3a f2 49 28 64 25 2c 71 |%,q%,x%):.I(d%,q|
0000fa50 25 2c 78 25 29 0d 05 b3 18 cc f2 42 28 a4 41 28 |%,x%)......B(.A(|
0000fa60 22 45 72 72 4e 6f 4d 6f 72 65 22 29 29 0d 05 b4 |"ErrNoMore"))...|
0000fa70 07 cd 3a e1 0d 05 b5 67 dd f2 4c 75 3a ea 79 25 |..:....g..Lu:.y%|
0000fa80 2c 42 25 2c 4f 79 25 2c 41 25 2c 43 25 2c 64 25 |,B%,Oy%,A%,C%,d%|
0000fa90 2c 71 25 2c 78 25 3a 79 25 3d 53 25 28 a4 50 28 |,q%,x%:y%=S%(.P(|
0000faa0 33 29 29 3a 42 25 3d 6b 4a 25 3a c8 95 42 25 3c |3)):B%=kJ%:..B%<|
0000fab0 3e 2d 31 80 ac 4f 79 25 3a 54 25 3d 42 25 21 26 |>-1..Oy%:T%=B%!&|
0000fac0 43 3a e7 a4 47 28 79 25 2c 54 25 29 3d 31 8c 4f |C:..G(y%,T%)=1.O|
0000fad0 79 25 3d b9 8b 42 25 3d 21 42 25 0d 05 b6 0b ce |y%=..B%=!B%.....|
0000fae0 3a e7 4f 79 25 8c 0d 05 b7 32 74 25 3d a4 50 28 |:.Oy%....2t%=.P(|
0000faf0 33 29 3a f2 50 28 42 25 21 26 43 2c 41 25 2c 43 |3):.P(B%!&C,A%,C|
0000fb00 25 2c 64 25 2c 71 25 2c 78 25 29 3a f2 49 28 64 |%,d%,q%,x%):.I(d|
0000fb10 25 2c 71 25 2c 78 25 29 0d 05 b8 16 cc f2 42 28 |%,q%,x%)......B(|
0000fb20 a4 41 28 22 45 72 72 4e 6f 42 34 22 29 29 0d 05 |.A("ErrNoB4"))..|
0000fb30 b9 07 cd 3a e1 0d 05 ba 12 dd f2 5f 75 3a e7 4d |...:......._u:.M|
0000fb40 5f 25 3c 3e 2d 31 8c 0d 05 bb 33 74 25 3d a4 50 |_%<>-1....3t%=.P|
0000fb50 28 33 29 3a f2 50 28 4d 5f 25 21 26 43 2c 41 25 |(3):.P(M_%!&C,A%|
0000fb60 2c 43 25 2c 64 25 2c 71 25 2c 78 25 29 3a f2 49 |,C%,d%,q%,x%):.I|
0000fb70 28 64 25 2c 71 25 2c 78 25 29 0d 05 bc 17 cc f2 |(d%,q%,x%)......|
0000fb80 42 28 a4 41 28 22 45 72 72 4e 6f 45 6e 74 22 29 |B(.A("ErrNoEnt")|
0000fb90 29 0d 05 bd 07 cd 3a e1 0d 05 be 1c dd f2 48 5f |).....:.......H_|
0000fba0 3a ea 42 25 3a 42 25 3d 4d 5f 25 3a e7 42 25 3c |:.B%:B%=M_%:.B%<|
0000fbb0 3e 2d 31 8c 0d 05 bf 47 c8 95 42 25 21 34 3c 3e |>-1....G..B%!4<>|
0000fbc0 2d 31 3a 42 25 3d 42 25 21 34 3a ce 3a 74 25 3d |-1:B%=B%!4:.:t%=|
0000fbd0 a4 50 28 33 29 3a f2 50 28 42 25 21 26 43 2c 41 |.P(3):.P(B%!&C,A|
0000fbe0 25 2c 43 25 2c 64 25 2c 71 25 2c 78 25 29 3a f2 |%,C%,d%,q%,x%):.|
0000fbf0 49 28 64 25 2c 71 25 2c 78 25 29 0d 05 c0 17 cc |I(d%,q%,x%).....|
0000fc00 f2 42 28 a4 41 28 22 45 72 72 4e 6f 45 6e 74 22 |.B(.A("ErrNoEnt"|
0000fc10 29 29 0d 05 c1 07 cd 3a e1 0d 05 c2 38 dd f2 6f |)).....:....8..o|
0000fc20 75 28 76 25 2c 68 25 2c 61 25 2c 4b 25 29 3a ea |u(v%,h%,a%,K%):.|
0000fc30 47 75 25 2c 4a 79 25 2c 75 25 3a e7 68 25 8c f2 |Gu%,Jy%,u%:.h%..|
0000fc40 46 28 64 25 2c 71 25 2c 78 25 2c 37 2c 30 2c 30 |F(d%,q%,x%,7,0,0|
0000fc50 29 0d 05 c3 86 47 75 25 3d 4b 25 2d 34 30 3a 4a |)....Gu%=K%-40:J|
0000fc60 79 25 3d 2d 28 6d 25 2d 36 30 29 2f 37 3a 5a 4a |y%=-(m%-60)/7:ZJ|
0000fc70 25 3d 78 25 3a 6e 5f 25 3d 71 25 3a e3 75 25 3d |%=x%:n_%=q%:.u%=|
0000fc80 31 b8 37 3a f2 61 79 28 75 25 2b 37 2a 94 68 25 |1.7:.ay(u%+7*.h%|
0000fc90 2c 64 25 2c 75 25 2c 71 25 2c 78 25 2c 68 25 2c |,d%,u%,q%,x%,h%,|
0000fca0 61 25 2b 26 41 2c 47 75 25 2c 6a 25 2d 32 30 2c |a%+&A,Gu%,j%-20,|
0000fcb0 4a 79 25 29 3a e7 75 25 3c 3e 37 8c f2 46 28 64 |Jy%):.u%<>7..F(d|
0000fcc0 25 2c 71 25 2c 78 25 2c 31 2c 30 2c 30 29 3a 47 |%,q%,x%,1,0,0):G|
0000fcd0 75 25 2b 3d 4a 79 25 0d 05 c4 07 ed 3a e1 0d 05 |u%+=Jy%.....:...|
0000fce0 c5 75 dd a4 54 79 28 6e 25 2c 68 25 2c 5f 25 2c |.u..Ty(n%,h%,_%,|
0000fcf0 51 25 29 3a ea 4a 79 25 2c 6c 25 2c 61 25 2c 52 |Q%):.Jy%,l%,a%,R|
0000fd00 25 3a 4a 79 25 3d 28 6d 25 2d 36 30 29 2f 37 3a |%:Jy%=(m%-60)/7:|
0000fd10 51 25 3d 2d 51 25 2d 34 30 2b 4a 79 25 3a 6c 25 |Q%=-Q%-40+Jy%:l%|
0000fd20 3d 28 28 51 25 81 4a 79 25 29 83 38 29 3a e7 6c |=((Q%.Jy%).8):.l|
0000fd30 25 3c 3e 30 8c 6c 25 2b 3d 37 2a 94 68 25 3a e7 |%<>0.l%+=7*.h%:.|
0000fd40 5f 25 3c 26 41 84 5f 25 3e 6a 25 2d 32 30 8c 6c |_%<&A._%>j%-20.l|
0000fd50 25 3d 30 0d 05 c6 15 e7 68 25 8c 61 25 3d 64 79 |%=0.....h%.a%=dy|
0000fd60 25 8b 61 25 3d 79 79 25 0d 05 c7 4c e7 6c 25 3c |%.a%=yy%...L.l%<|
0000fd70 3e 30 8c 52 25 3d a4 41 79 28 6c 25 2c 5f 25 2d |>0.R%=.Ay(l%,_%-|
0000fd80 26 41 2c 51 25 83 4a 79 25 2c 6e 25 2c 4a 79 25 |&A,Q%.Jy%,n%,Jy%|
0000fd90 2c 61 25 2b 26 41 2c 2d 6f 25 2d 34 30 2d 28 6c |,a%+&A,-o%-40-(l|
0000fda0 25 2b 37 2a 28 6c 25 3e 37 29 29 2a 4a 79 25 2b |%+7*(l%>7))*Jy%+|
0000fdb0 4a 79 25 29 0d 05 c8 07 3d 52 25 0d 05 c9 52 dd |Jy%)....=R%...R.|
0000fdc0 f2 6b 5f 28 76 25 2c 68 25 2c 61 25 2c 4b 25 29 |.k_(v%,h%,a%,K%)|
0000fdd0 3a ea 47 75 25 2c 4a 79 25 2c 76 4a 25 2c 75 25 |:.Gu%,Jy%,vJ%,u%|
0000fde0 3a e7 68 25 8c f2 46 28 64 25 2c 71 25 2c 78 25 |:.h%..F(d%,q%,x%|
0000fdf0 2c 33 2c 30 2c 30 29 3a 75 25 3d 34 3a 76 4a 25 |,3,0,0):u%=4:vJ%|
0000fe00 3d 37 8b 75 25 3d 31 3a 76 4a 25 3d 33 0d 05 ca |=7.u%=1:vJ%=3...|
0000fe10 45 47 75 25 3d 4b 25 2d 34 30 3a 4a 79 25 3d 2d |EGu%=K%-40:Jy%=-|
0000fe20 28 6d 25 2d 36 30 29 2f 33 3a 5a 4a 25 3d 78 25 |(m%-60)/3:ZJ%=x%|
0000fe30 3a 6e 5f 25 3d 71 25 3a e3 75 25 3d 75 25 b8 76 |:n_%=q%:.u%=u%.v|
0000fe40 4a 25 3a e7 75 25 3d 36 8c 4a 79 25 3d 4a 79 25 |J%:.u%=6.Jy%=Jy%|
0000fe50 2f 32 0d 05 cb 53 f2 61 79 28 75 25 2c 64 25 2c |/2...S.ay(u%,d%,|
0000fe60 75 25 2c 71 25 2c 78 25 2c 68 25 2c 61 25 2b 26 |u%,q%,x%,h%,a%+&|
0000fe70 41 2c 47 75 25 2c 6a 25 2d 32 30 2c 4a 79 25 29 |A,Gu%,j%-20,Jy%)|
0000fe80 3a e7 75 25 3c 3e 76 4a 25 8c f2 46 28 64 25 2c |:.u%<>vJ%..F(d%,|
0000fe90 71 25 2c 78 25 2c 31 2c 30 2c 30 29 3a 47 75 25 |q%,x%,1,0,0):Gu%|
0000fea0 2b 3d 4a 79 25 0d 05 cc 07 ed 3a e1 0d 05 cd 97 |+=Jy%.....:.....|
0000feb0 dd a4 6b 79 28 6e 25 2c 68 25 2c 5f 25 2c 51 25 |..ky(n%,h%,_%,Q%|
0000fec0 29 3a ea 4a 79 25 2c 6c 25 2c 61 25 2c 4b 25 2c |):.Jy%,l%,a%,K%,|
0000fed0 52 25 3a 4a 79 25 3d 28 6d 25 2d 36 30 29 2f 33 |R%:Jy%=(m%-60)/3|
0000fee0 3a 51 25 3d 2d 51 25 2d 34 30 2b 4a 79 25 3a 6c |:Q%=-Q%-40+Jy%:l|
0000fef0 25 3d 28 28 51 25 81 4a 79 25 29 83 34 29 3a 51 |%=((Q%.Jy%).4):Q|
0000ff00 25 3d 51 25 83 4a 79 25 3a 4b 25 3d 2d 6f 25 2d |%=Q%.Jy%:K%=-o%-|
0000ff10 34 30 2d 6c 25 2a 4a 79 25 2b 4a 79 25 3a e7 6c |40-l%*Jy%+Jy%:.l|
0000ff20 25 3c 3e 30 8c 6c 25 2b 3d 33 2a 94 68 25 3a e7 |%<>0.l%+=3*.h%:.|
0000ff30 5f 25 3c 26 41 84 5f 25 3e 6a 25 2d 32 30 8c 6c |_%<&A._%>j%-20.l|
0000ff40 25 3d 30 0d 05 ce 14 e7 6c 25 3e 3d 36 8c 4a 79 |%=0.....l%>=6.Jy|
0000ff50 25 3d 4a 79 25 2f 32 0d 05 cf 26 e7 6c 25 3d 36 |%=Jy%/2...&.l%=6|
0000ff60 80 51 25 3e 3d 4a 79 25 8c 51 25 2d 3d 4a 79 25 |.Q%>=Jy%.Q%-=Jy%|
0000ff70 3a 6c 25 3d 37 3a 4b 25 2d 3d 4a 79 25 0d 05 d0 |:l%=7:K%-=Jy%...|
0000ff80 15 e7 68 25 8c 61 25 3d 64 79 25 8b 61 25 3d 79 |..h%.a%=dy%.a%=y|
0000ff90 79 25 0d 05 d1 2e e7 6c 25 3c 3e 30 8c 52 25 3d |y%.....l%<>0.R%=|
0000ffa0 a4 41 79 28 6c 25 2c 5f 25 2d 26 41 2c 51 25 2c |.Ay(l%,_%-&A,Q%,|
0000ffb0 6e 25 2c 4a 79 25 2c 61 25 2b 26 41 2c 4b 25 29 |n%,Jy%,a%+&A,K%)|
0000ffc0 0d 05 d2 07 3d 52 25 0d 05 d3 2c dd f2 6b 75 28 |....=R%...,..ku(|
0000ffd0 76 25 2c 68 25 2c 61 25 2c 4b 25 29 3a e7 68 25 |v%,h%,a%,K%):.h%|
0000ffe0 8c f2 46 28 64 25 2c 71 25 2c 78 25 2c 31 2c 30 |..F(d%,q%,x%,1,0|
0000fff0 2c 30 29 0d 05 d4 4f 5a 4a 25 3d 78 25 3a 6e 5f |,0)...OZJ%=x%:n_|
00010000 25 3d 71 25 3a f2 61 79 28 94 ac 68 25 2c 64 25 |%=q%:.ay(..h%,d%|
00010010 2c a4 48 28 64 25 2c 71 25 2c 78 25 29 2c 71 25 |,.H(d%,q%,x%),q%|
00010020 2c 78 25 2c 68 25 2c 61 25 2b 26 41 2c 4b 25 2d |,x%,h%,a%+&A,K%-|
00010030 34 30 2c 6a 25 2d 32 30 2c 2d 6d 25 2b 36 30 29 |40,j%-20,-m%+60)|
00010040 3a e1 0d 05 d5 40 dd a4 59 79 28 6e 25 2c 68 25 |:....@..Yy(n%,h%|
00010050 2c 5f 25 2c 51 25 29 3a ea 6c 25 2c 61 25 2c 52 |,_%,Q%):.l%,a%,R|
00010060 25 3a 51 25 3d 2d 51 25 2d 34 30 3a 6c 25 3d 31 |%:Q%=-Q%-40:l%=1|
00010070 3a e7 68 25 8c 61 25 3d 64 79 25 8b 61 25 3d 79 |:.h%.a%=dy%.a%=y|
00010080 79 25 0d 05 d6 2e e7 5f 25 3c 26 41 84 5f 25 3e |y%....._%<&A._%>|
00010090 6a 25 2d 32 30 84 51 25 3e 6d 25 2d 36 30 84 51 |j%-20.Q%>m%-60.Q|
000100a0 25 3c 30 8c 6c 25 3d 30 8b 6c 25 2b 3d 94 68 25 |%<0.l%=0.l%+=.h%|
000100b0 0d 05 d7 31 e7 6c 25 3c 3e 30 8c 52 25 3d a4 41 |...1.l%<>0.R%=.A|
000100c0 79 28 6c 25 2c 5f 25 2d 26 41 2c 51 25 2c 6e 25 |y(l%,_%-&A,Q%,n%|
000100d0 2c 6d 25 2c 61 25 2b 26 41 2c 2d 6f 25 2d 34 30 |,m%,a%+&A,-o%-40|
000100e0 29 0d 05 d8 07 3d 52 25 0d 05 d9 6d dd f2 61 79 |)....=R%...m..ay|
000100f0 28 6c 25 2c 64 25 2c 75 25 2c 71 25 2c 78 25 2c |(l%,d%,u%,q%,x%,|
00010100 68 25 2c 61 25 2c 4b 25 2c 73 25 2c 62 25 29 3a |h%,a%,K%,s%,b%):|
00010110 ea 42 25 2c 43 25 2c 54 25 2c 51 25 2c 47 79 25 |.B%,C%,T%,Q%,Gy%|
00010120 2c 41 25 2c 41 5f 25 3a 47 79 25 3d 32 38 3a 41 |,A%,A_%:Gy%=28:A|
00010130 5f 25 3d a4 46 28 30 2c 30 2c 64 25 2c 71 25 2c |_%=.F(0,0,d%,q%,|
00010140 78 25 29 3a e7 a4 53 28 61 25 2c 4b 25 2c 73 25 |x%):..S(a%,K%,s%|
00010150 2c 62 25 29 8c 0d 05 da 22 f2 56 28 30 2c 37 29 |,b%)....".V(0,7)|
00010160 3a e7 41 5f 25 3d a4 46 28 30 2c 30 2c a4 49 2c |:.A_%=.F(0,0,.I,|
00010170 a4 56 2c a4 4c 29 8c 0d 05 db 38 c8 99 26 34 30 |.V,.L)....8..&40|
00010180 30 45 36 2c 21 53 4a 25 3a f2 6c 28 61 25 2d 34 |0E6,!SJ%:.l(a%-4|
00010190 2c 4b 25 2d 34 2c 73 25 2b 38 2c 2d 62 25 2d 38 |,K%-4,s%+8,-b%-8|
000101a0 2c 26 43 29 3a c8 99 26 34 30 30 45 36 2c 37 0d |,&C):..&400E6,7.|
000101b0 05 dc 2a cd 3a ec 61 25 2c 4b 25 3a df 42 59 73 |..*.:.a%,K%:.BYs|
000101c0 25 2c 30 3a ec 42 59 30 2c 62 25 3a df 42 59 2d |%,0:.BY0,b%:.BY-|
000101d0 73 25 2c 30 3a e7 68 25 8c 0d 05 dd 76 f2 4c 28 |s%,0:.h%....v.L(|
000101e0 76 6c 25 2c c3 64 25 2c 2d 31 2c 61 25 2b 73 25 |vl%,.d%,-1,a%+s%|
000101f0 2d 33 30 2c 4b 25 2d 36 29 3a f2 4c 28 76 5f 25 |-30,K%-6):.L(v_%|
00010200 2c a4 63 28 75 25 2c 2d 31 29 2c 31 2c 61 25 2b |,.c(u%,-1),1,a%+|
00010210 73 25 2d 34 30 2c 4b 25 2d 36 29 3a e7 a4 53 28 |s%-40,K%-6):..S(|
00010220 61 25 2c 4b 25 2d 36 2c 73 25 2d 26 44 43 2c 2d |a%,K%-6,s%-&DC,-|
00010230 32 34 29 8c f2 42 5f 28 75 25 2c 64 25 2c 71 25 |24)..B_(u%,d%,q%|
00010240 2c 78 25 2c 2d 31 2c 61 25 2c 4b 25 2d 36 29 0d |,x%,-1,a%,K%-6).|
00010250 05 de 78 cc 3a f2 4c 28 76 6c 25 2c c3 64 25 2c |..x.:.L(vl%,.d%,|
00010260 31 2c 61 25 2b 33 30 2c 4b 25 2d 36 29 3a f2 4c |1,a%+30,K%-6):.L|
00010270 28 76 5f 25 2c a4 63 28 75 25 2c 2d 31 29 2c 2d |(v_%,.c(u%,-1),-|
00010280 31 2c 61 25 2b 34 30 2c 4b 25 2d 36 29 3a e7 a4 |1,a%+40,K%-6):..|
00010290 53 28 61 25 2b 26 44 43 2c 4b 25 2d 36 2c 73 25 |S(a%+&DC,K%-6,s%|
000102a0 2d 26 44 43 2c 2d 32 34 29 8c f2 42 5f 28 75 25 |-&DC,-24)..B_(u%|
000102b0 2c 64 25 2c 71 25 2c 78 25 2c 31 2c 61 25 2b 73 |,d%,q%,x%,1,a%+s|
000102c0 25 2c 4b 25 2d 36 29 0d 05 df dd cd 3a 51 25 3d |%,K%-6).....:Q%=|
000102d0 34 30 3a 54 25 3d a4 62 28 64 25 2c 71 25 29 3a |40:T%=.b(d%,q%):|
000102e0 42 25 3d 2d 31 3a 41 25 3d 56 25 28 6c 25 29 3a |B%=-1:A%=V%(l%):|
000102f0 43 25 3d 41 25 2d 54 25 3a c8 95 41 25 3e 30 80 |C%=A%-T%:..A%>0.|
00010300 54 25 3e 30 3a 42 25 3d a4 6d 28 64 25 2c 71 25 |T%>0:B%=.m(d%,q%|
00010310 2c 42 25 29 3a 54 25 2d 3d 31 3a 41 25 2d 3d 31 |,B%):T%-=1:A%-=1|
00010320 3a ce 3a c8 95 54 25 3c 3e 30 80 51 25 2b 47 79 |:.:..T%<>0.Q%+Gy|
00010330 25 2d 35 3c 3d 2d 62 25 3a 42 25 3d a4 6d 28 64 |%-5<=-b%:B%=.m(d|
00010340 25 2c 71 25 2c 42 25 29 3a 54 25 2d 3d 31 3a f2 |%,q%,B%):T%-=1:.|
00010350 72 28 76 5f 25 2c a4 60 28 42 25 2c 78 25 29 2c |r(v_%,.`(B%,x%),|
00010360 61 25 2b 33 30 2c 4b 25 2d 51 25 2d 32 30 2c 6a |a%+30,K%-Q%-20,j|
00010370 25 2d 35 30 2c 47 79 25 29 3a 51 25 2b 3d 47 79 |%-50,Gy%):Q%+=Gy|
00010380 25 3a ce 3a 42 25 3d 6b 4a 25 3a 54 25 3d a4 46 |%:.:B%=kJ%:T%=.F|
00010390 28 30 2c 30 2c 64 25 2c 71 25 2c 78 25 29 3a 41 |(0,0,d%,q%,x%):A|
000103a0 25 3d 43 25 0d 05 e0 37 c8 95 41 25 3e 30 3a 42 |%=C%...7..A%>0:B|
000103b0 25 3d a4 78 28 42 25 2c 54 25 29 3a 42 25 3d 42 |%=.x(B%,T%):B%=B|
000103c0 25 21 34 3a 41 25 2d 3d 31 3a ce 3a e7 51 25 2b |%!4:A%-=1:.:.Q%+|
000103d0 47 79 25 2d 35 3c 3d 2d 62 25 8c 0d 05 e1 53 f5 |Gy%-5<=-b%....S.|
000103e0 3a 42 25 3d a4 78 28 42 25 2c 54 25 29 3a e7 42 |:B%=.x(B%,T%):.B|
000103f0 25 3c 3e 2d 31 8c f2 72 28 76 5f 25 2c a4 6d 79 |%<>-1..r(v_%,.my|
00010400 28 42 25 29 2c 61 25 2b 33 30 2c 4b 25 2d 51 25 |(B%),a%+30,K%-Q%|
00010410 2d 32 30 2c 6a 25 2d 35 30 2c 47 79 25 29 3a 51 |-20,j%-50,Gy%):Q|
00010420 25 2b 3d 47 79 25 3a 42 25 3d 42 25 21 34 0d 05 |%+=Gy%:B%=B%!4..|
00010430 e2 17 fd 42 25 3d 2d 31 84 51 25 2b 47 79 25 2d |...B%=-1.Q%+Gy%-|
00010440 35 3e 2d 62 25 0d 05 e3 42 cd 3a e7 a4 78 28 42 |5>-b%...B.:..x(B|
00010450 25 2c 54 25 29 3c 3e 2d 31 80 51 25 2b 47 79 25 |%,T%)<>-1.Q%+Gy%|
00010460 2d 35 3e 2d 62 25 8c ec 61 25 2c 4b 25 2b 62 25 |-5>-b%..a%,K%+b%|
00010470 2b 32 34 3a ec 42 59 32 30 2c 30 3a f0 38 31 2c |+24:.BY20,0:.81,|
00010480 2d 26 41 2c 2d 32 30 0d 05 e4 2a e7 56 25 28 6c |-&A,-20...*.V%(l|
00010490 25 29 3e 30 8c ec 61 25 2c 4b 25 2d 36 30 3a ec |%)>0..a%,K%-60:.|
000104a0 42 59 32 30 2c 30 3a f0 38 31 2c 2d 26 41 2c 32 |BY20,0:.81,-&A,2|
000104b0 30 0d 05 e5 07 cd 3a e1 0d 05 e6 ef dd f2 54 4a |0.....:.......TJ|
000104c0 3a ea 41 25 2c 46 25 2c 50 25 2c 42 25 2c 41 24 |:.A%,F%,P%,B%,A$|
000104d0 2c 43 25 2c 4c 25 3a 41 25 3d 31 3a f5 c8 99 26 |,C%,L%:A%=1:...&|
000104e0 36 31 35 30 32 2c 53 5f 25 2c 22 53 70 65 63 22 |61502,S_%,"Spec"|
000104f0 2b c3 41 25 2c 30 b8 2c 2c 50 25 3b 46 25 3a 41 |+.A%,0.,,P%;F%:A|
00010500 25 2b 3d 31 3a fd 46 25 80 31 3a 58 69 25 3d 41 |%+=1:.F%.1:Xi%=A|
00010510 25 2d 33 3a de 4a 25 28 41 25 2d 33 2c 34 29 3a |%-3:.J%(A%-3,4):|
00010520 42 25 3d 30 3a c8 95 42 25 3c 3d 58 69 25 3a c8 |B%=0:..B%<=Xi%:.|
00010530 99 26 34 31 35 30 32 2c 53 5f 25 2c 22 53 70 65 |.&41502,S_%,"Spe|
00010540 63 22 2b c3 28 42 25 2b 31 29 2c 30 b8 2c 2c 50 |c"+.(B%+1),0.,,P|
00010550 25 2c 4c 25 3b 46 25 3a 50 25 3f 4c 25 3d 26 44 |%,L%;F%:P%?L%=&D|
00010560 3a e3 43 25 3d 31 b8 34 3a 4a 25 28 42 25 2c 43 |:.C%=1.4:J%(B%,C|
00010570 25 29 3d bb 28 24 50 25 29 3a c8 95 3f 50 25 3c |%)=.($P%):..?P%<|
00010580 3e 34 34 3a 50 25 2b 3d 31 3a ce 3a 50 25 2b 3d |>44:P%+=1:.:P%+=|
00010590 31 3a ed 3a 4a 25 28 42 25 2c 30 29 3d 50 25 3a |1:.:J%(B%,0)=P%:|
000105a0 42 25 2b 3d 31 3a ce 0d 05 e7 d0 41 25 3d 31 3a |B%+=1:.....A%=1:|
000105b0 f5 c8 99 26 36 31 35 30 32 2c 53 5f 25 2c 22 45 |...&61502,S_%,"E|
000105c0 61 73 74 65 72 22 2b c3 41 25 2c 30 b8 2c 2c 50 |aster"+.A%,0.,,P|
000105d0 25 3b 46 25 3a 41 25 2b 3d 31 3a fd 46 25 80 31 |%;F%:A%+=1:.F%.1|
000105e0 3a 4d 61 25 3d 41 25 2d 33 3a de 52 25 28 41 25 |:Ma%=A%-3:.R%(A%|
000105f0 2d 33 2c 31 29 3a 42 25 3d 30 3a c8 95 42 25 3c |-3,1):B%=0:..B%<|
00010600 3d 41 25 2d 33 3a c8 99 26 34 31 35 30 32 2c 53 |=A%-3:..&41502,S|
00010610 5f 25 2c 22 45 61 73 74 65 72 22 2b c3 28 42 25 |_%,"Easter"+.(B%|
00010620 2b 31 29 2c 30 b8 2c 2c 50 25 2c 4c 25 3b 46 25 |+1),0.,,P%,L%;F%|
00010630 3a 50 25 3f 4c 25 3d 26 44 3a 52 25 28 42 25 2c |:P%?L%=&D:R%(B%,|
00010640 31 29 3d bb 28 24 50 25 29 3a c8 95 3f 50 25 3c |1)=.($P%):..?P%<|
00010650 3e 34 34 3a 50 25 2b 3d 31 3a ce 3a 50 25 2b 3d |>44:P%+=1:.:P%+=|
00010660 31 3a 52 25 28 42 25 2c 30 29 3d 50 25 3a 42 25 |1:R%(B%,0)=P%:B%|
00010670 2b 3d 31 3a ce 3a e1 0d 05 e8 4b dd f2 42 5f 28 |+=1:.:....K..B_(|
00010680 4b 61 25 2c 63 25 2c 72 25 2c 78 25 2c 5f 75 25 |Ka%,c%,r%,x%,_u%|
00010690 2c 5f 25 2c 51 25 29 3a ea 41 24 2c 4c 4a 25 2c |,_%,Q%):.A$,LJ%,|
000106a0 4b 4a 25 2c 50 79 25 2c 41 25 3a e3 41 25 3d 30 |KJ%,Py%,A%:.A%=0|
000106b0 b8 58 69 25 3a e7 4a 25 28 41 25 2c 31 29 3d 72 |.Xi%:.J%(A%,1)=r|
000106c0 25 8c 0d 05 e9 4b e7 28 4a 25 28 41 25 2c 32 29 |%....K.(J%(A%,2)|
000106d0 3d 2d 31 84 4a 25 28 41 25 2c 32 29 3d 4b 61 25 |=-1.J%(A%,2)=Ka%|
000106e0 29 80 63 25 3e 3d 4a 25 28 41 25 2c 33 29 80 63 |).c%>=J%(A%,3).c|
000106f0 25 3c 3d 4a 25 28 41 25 2c 34 29 8c 41 24 2b 3d |%<=J%(A%,4).A$+=|
00010700 24 4a 25 28 41 25 2c 30 29 2b 22 2f 22 0d 05 ea |$J%(A%,0)+"/"...|
00010710 7a cd 3a ed 3a f2 76 4a 28 4c 4a 25 2c 4b 4a 25 |z.:.:.vJ(LJ%,KJ%|
00010720 2c 78 25 29 3a 41 25 3d 30 3a 50 79 25 3d 30 3a |,x%):A%=0:Py%=0:|
00010730 c8 95 41 25 3c 3d 4d 61 25 3a f2 46 28 4c 4a 25 |..A%<=Ma%:.F(LJ%|
00010740 2c 4b 4a 25 2c 78 25 2c 52 25 28 41 25 2c 31 29 |,KJ%,x%,R%(A%,1)|
00010750 2d 50 79 25 2c 30 2c 30 29 3a 50 79 25 3d 52 25 |-Py%,0,0):Py%=R%|
00010760 28 41 25 2c 31 29 3a e7 4c 4a 25 3d 63 25 80 4b |(A%,1):.LJ%=c%.K|
00010770 4a 25 3d 72 25 8c 41 24 2b 3d 24 52 25 28 41 25 |J%=r%.A$+=$R%(A%|
00010780 2c 30 29 2b 22 2f 22 0d 05 eb 48 41 25 2b 3d 31 |,0)+"/"...HA%+=1|
00010790 3a ce 3a e7 a7 c0 41 24 29 2c 22 2f 22 29 8c c8 |:.:...A$),"/")..|
000107a0 99 26 34 30 30 38 31 2c 2c 22 54 72 69 6e 69 74 |.&40081,,"Trinit|
000107b0 79 2e 4d 65 64 69 75 6d 22 2c 37 2a 31 36 2c 37 |y.Medium",7*16,7|
000107c0 2a 31 36 b8 50 79 25 8b 50 79 25 3d 68 6c 25 0d |*16.Py%.Py%=hl%.|
000107d0 05 ec 22 e7 41 24 3c 3e 22 22 8c f2 4c 28 50 79 |..".A$<>""..L(Py|
000107e0 25 2c c0 41 24 29 2c 5f 75 25 2c 5f 25 2c 51 25 |%,.A$),_u%,_%,Q%|
000107f0 29 0d 05 ed 1a e7 50 79 25 3c 3e 68 6c 25 8c c8 |).....Py%<>hl%..|
00010800 99 26 34 30 30 38 32 2c 50 79 25 0d 05 ee 05 e1 |.&40082,Py%.....|
00010810 0d 05 ef 4b dd a4 41 79 28 6c 25 2c 5f 25 2c 51 |...K..Ay(l%,_%,Q|
00010820 25 2c 6e 25 2c 62 25 2c 61 25 2c 4b 25 29 3a ea |%,n%,b%,a%,K%):.|
00010830 6e 79 25 2c 47 79 25 2c 41 25 2c 42 25 2c 64 25 |ny%,Gy%,A%,B%,d%|
00010840 2c 71 25 2c 78 25 2c 54 25 2c 46 25 2c 52 25 3a |,q%,x%,T%,F%,R%:|
00010850 47 79 25 3d 32 38 3a c8 8e b9 ca 0d 05 f0 73 c9 |Gy%=28:.......s.|
00010860 5f 25 3e 3d 33 30 80 5f 25 3c 3d 6a 25 2d 32 30 |_%>=30._%<=j%-20|
00010870 80 51 25 3e 3d 34 30 3a f2 50 28 76 25 2c 41 25 |.Q%>=40:.P(v%,A%|
00010880 2c 42 25 2c 64 25 2c 71 25 2c 78 25 29 3a f2 46 |,B%,d%,q%,x%):.F|
00010890 28 64 25 2c 71 25 2c 78 25 2c 6c 25 2d 31 2c 30 |(d%,q%,x%,l%-1,0|
000108a0 2c 30 29 3a 6e 79 25 3d 28 28 28 51 25 2d 34 30 |,0):ny%=(((Q%-40|
000108b0 2b 47 79 25 29 81 47 79 25 29 29 3a e7 6e 79 25 |+Gy%).Gy%)):.ny%|
000108c0 3e 30 8c 6e 79 25 2b 3d 56 25 28 6c 25 29 0d 05 |>0.ny%+=V%(l%)..|
000108d0 f1 38 e7 6e 79 25 3e 30 80 6e 79 25 3c 3d a4 62 |.8.ny%>0.ny%<=.b|
000108e0 28 64 25 2c 71 25 29 80 6e 25 3c 3e 32 8c f2 59 |(d%,q%).n%<>2..Y|
000108f0 5f 28 64 25 2c 71 25 2c 6e 79 25 2c 6e 25 29 3a |_(d%,q%,ny%,n%):|
00010900 6e 79 25 3d 2d 31 0d 05 f2 19 e7 6e 79 25 3e 30 |ny%=-1.....ny%>0|
00010910 8c 6e 79 25 2d 3d a4 62 28 64 25 2c 71 25 29 0d |.ny%-=.b(d%,q%).|
00010920 05 f3 0b e7 6e 79 25 3e 30 8c 0d 05 f4 60 54 25 |....ny%>0....`T%|
00010930 3d a4 46 28 30 2c 30 2c 64 25 2c 71 25 2c 78 25 |=.F(0,0,d%,q%,x%|
00010940 29 3a 42 25 3d 6b 4a 25 3a 42 25 3d a4 78 28 42 |):B%=kJ%:B%=.x(B|
00010950 25 2c 54 25 29 3a c8 95 6e 79 25 3e 31 80 42 25 |%,T%):..ny%>1.B%|
00010960 3c 3e 2d 31 3a 42 25 3d 42 25 21 34 3a 42 25 3d |<>-1:B%=B%!4:B%=|
00010970 a4 78 28 42 25 2c 54 25 29 3a 6e 79 25 2d 3d 31 |.x(B%,T%):ny%-=1|
00010980 3a ce 3a e7 42 25 3d 2d 31 8c 0d 05 f5 1d e7 6e |:.:.B%=-1......n|
00010990 25 3c 3e 32 8c f2 73 28 64 25 2c 71 25 2c 78 25 |%<>2..s(d%,q%,x%|
000109a0 29 3a 51 4a 25 3d b9 0d 05 f6 0b cc 3a c8 8e 6e |):QJ%=......:..n|
000109b0 25 ca 0d 05 f7 14 c9 34 3a f2 4f 79 28 42 25 29 |%......4:.Oy(B%)|
000109c0 3a 51 4a 25 3d b9 0d 05 f8 0c c9 32 3a 52 25 3d |:QJ%=......2:R%=|
000109d0 42 25 0d 05 f9 14 c9 31 3a f2 55 5f 28 42 25 29 |B%.....1:.U_(B%)|
000109e0 3a 51 4a 25 3d b9 0d 05 fa 05 cb 0d 05 fb 05 cd |:QJ%=...........|
000109f0 0d 05 fc 13 cc 3a e7 6e 25 3c 3e 32 80 6e 79 25 |.....:.n%<>2.ny%|
00010a00 3d 30 8c 0d 05 fd 42 f2 50 28 76 25 2c 41 25 2c |=0....B.P(v%,A%,|
00010a10 42 25 2c 64 25 2c 71 25 2c 78 25 29 3a f2 46 28 |B%,d%,q%,x%):.F(|
00010a20 64 25 2c 71 25 2c 78 25 2c 6c 25 2d 31 2c 30 2c |d%,q%,x%,l%-1,0,|
00010a30 30 29 3a f2 73 28 64 25 2c 71 25 2c 78 25 29 3a |0):.s(d%,q%,x%):|
00010a40 51 4a 25 3d b9 0d 05 fe 05 cd 0d 05 ff 05 cd 0d |QJ%=............|
00010a50 06 00 09 c9 6e 25 3d 32 0d 06 01 e3 c9 5f 25 3c |....n%=2....._%<|
00010a60 3d 32 30 80 51 25 3e 3d 62 25 2d 32 30 3a f2 50 |=20.Q%>=b%-20:.P|
00010a70 28 76 25 2c 41 25 2c 42 25 2c 64 25 2c 71 25 2c |(v%,A%,B%,d%,q%,|
00010a80 78 25 29 3a f2 46 28 64 25 2c 71 25 2c 78 25 2c |x%):.F(d%,q%,x%,|
00010a90 6c 25 2d 31 2c 30 2c 30 29 3a 54 25 3d a4 46 28 |l%-1,0,0):T%=.F(|
00010aa0 30 2c 30 2c 64 25 2c 71 25 2c 78 25 29 3a 6e 79 |0,0,d%,q%,x%):ny|
00010ab0 25 3d 2d 28 28 62 25 2d 34 30 29 81 47 79 25 29 |%=-((b%-40).Gy%)|
00010ac0 3a 42 25 3d a4 78 28 6b 4a 25 2c 54 25 29 3a c8 |:B%=.x(kJ%,T%):.|
00010ad0 95 42 25 3c 3e 2d 31 3a 42 25 3d 42 25 21 34 3a |.B%<>-1:B%=B%!4:|
00010ae0 42 25 3d a4 78 28 42 25 2c 54 25 29 3a 6e 79 25 |B%=.x(B%,T%):ny%|
00010af0 2b 3d 31 3a ce 3a 6e 79 25 2b 3d a4 62 28 64 25 |+=1:.:ny%+=.b(d%|
00010b00 2c 71 25 29 3a e7 56 25 28 6c 25 29 3c 6e 79 25 |,q%):.V%(l%)<ny%|
00010b10 8c 56 25 28 6c 25 29 2b 3d 31 3a f2 44 28 69 25 |.V%(l%)+=1:.D(i%|
00010b20 2c 61 25 2c 4b 25 2d 34 30 2c 61 25 2b 6a 25 2d |,a%,K%-40,a%+j%-|
00010b30 26 41 2c 4b 25 2d 62 25 2b 34 29 0d 06 02 4e c9 |&A,K%-b%+4)...N.|
00010b40 5f 25 3c 3d 32 30 80 51 25 3c 3d 36 30 80 51 25 |_%<=20.Q%<=60.Q%|
00010b50 3e 3d 34 30 80 56 25 28 6c 25 29 3c 3e 30 3a 56 |>=40.V%(l%)<>0:V|
00010b60 25 28 6c 25 29 2d 3d 31 3a f2 44 28 69 25 2c 61 |%(l%)-=1:.D(i%,a|
00010b70 25 2c 4b 25 2d 34 30 2c 61 25 2b 6a 25 2d 26 41 |%,K%-40,a%+j%-&A|
00010b80 2c 4b 25 2d 62 25 2b 34 29 0d 06 03 19 c9 5f 25 |,K%-b%+4)....._%|
00010b90 3c 3d 32 30 80 51 25 3c 3d 36 30 80 51 25 3e 3d |<=20.Q%<=60.Q%>=|
00010ba0 34 30 0d 06 04 44 7f 3a f2 50 28 76 25 2c 41 25 |40...D.:.P(v%,A%|
00010bb0 2c 42 25 2c 64 25 2c 71 25 2c 78 25 29 3a f2 46 |,B%,d%,q%,x%):.F|
00010bc0 28 64 25 2c 71 25 2c 78 25 2c 6c 25 2d 31 2c 30 |(d%,q%,x%,l%-1,0|
00010bd0 2c 30 29 3a f2 73 28 64 25 2c 71 25 2c 78 25 29 |,0):.s(d%,q%,x%)|
00010be0 3a 51 4a 25 3d b9 0d 06 05 09 cb 3a 3d 52 25 0d |:QJ%=......:=R%.|
00010bf0 06 06 4a dd a4 78 28 42 25 2c 54 25 29 3a ea 41 |..J..x(B%,T%):.A|
00010c00 25 3a 41 25 3d 2d 31 3a c8 95 42 25 3c 3e 2d 31 |%:A%=-1:..B%<>-1|
00010c10 80 41 25 3d 2d 31 3a 41 25 3d a4 47 28 a4 6e 28 |.A%=-1:A%=.G(.n(|
00010c20 42 25 21 26 43 29 2c 54 25 29 3a e7 41 25 3d 2d |B%!&C),T%):.A%=-|
00010c30 31 8c 42 25 3d 42 25 21 34 0d 06 07 17 ce 3a e7 |1.B%=B%!4.....:.|
00010c40 41 25 3d 30 8c 41 25 3d 42 25 8b 41 25 3d 2d 31 |A%=0.A%=B%.A%=-1|
00010c50 0d 06 08 07 3d 41 25 0d 06 09 92 dd a4 6d 79 28 |....=A%......my(|
00010c60 42 25 29 3a ea 41 24 2c 41 25 2c 43 25 2c 5a 24 |B%):.A$,A%,C%,Z$|
00010c70 2c 54 25 3a 43 25 3d 28 42 25 21 31 36 3e 3e 34 |,T%:C%=(B%!16>>4|
00010c80 29 80 26 46 3a 54 25 3d 42 25 21 31 36 80 28 31 |).&F:T%=B%!16.(1|
00010c90 3c 3c 32 31 29 3a 43 25 2d 3d 6d 5f 25 2a 28 43 |<<21):C%-=m_%*(C|
00010ca0 25 3d 30 29 3a f2 56 28 30 2c 43 25 29 3a e7 28 |%=0):.V(0,C%):.(|
00010cb0 28 42 25 21 31 36 3e 3e 31 29 80 31 29 3d 31 8c |(B%!16>>1).1)=1.|
00010cc0 5a 24 3d a4 6f 79 28 a4 58 79 28 42 25 21 26 43 |Z$=.oy(.Xy(B%!&C|
00010cd0 29 2c a4 76 79 28 42 25 21 26 43 29 2c 2d 31 2c |),.vy(B%!&C),-1,|
00010ce0 54 75 25 29 2b 22 20 20 22 0d 06 0a 42 42 25 2b |Tu%)+" "...BB%+|
00010cf0 3d 32 30 3a e3 41 25 3d 31 b8 33 3a c8 95 3f 42 |=20:.A%=1.3:..?B|
00010d00 25 3c 3e 26 42 3a 41 24 2b 3d bd 3f 42 25 3a 42 |%<>&B:A$+=.?B%:B|
00010d10 25 2b 3d 31 3a ce 3a e7 41 25 3c 3e 33 8c 41 24 |%+=1:.:.A%<>3.A$|
00010d20 2b 3d 22 20 22 3a 42 25 2b 3d 31 0d 06 0b 2b ed |+=" ":B%+=1...+.|
00010d30 3a e7 54 25 3e 30 80 c0 41 24 2c 31 29 3d 22 3d |:.T%>0..A$,1)="=|
00010d40 22 8c 41 24 3d c1 41 24 2c 32 2c a7 41 24 2c 22 |".A$=.A$,2,.A$,"|
00010d50 2a 22 29 2d 32 29 0d 06 0c 0a 3d 5a 24 2b 41 24 |*")-2)....=Z$+A$|
00010d60 0d 06 0d a1 dd f2 76 5f 28 53 24 29 3a ea 41 24 |......v_(S$):.A$|
00010d70 2c 60 69 25 2c 65 3a f2 5a 28 66 25 2c 33 39 2c |,`i%,e:.Z(f%,39,|
00010d80 31 29 3a 41 24 3d a4 5a 28 66 25 2c 31 36 29 3a |1):A$=.Z(f%,16):|
00010d90 60 69 25 3d a9 41 24 3a f2 41 28 66 25 2c 31 36 |`i%=.A$:.A(f%,16|
00010da0 2c 41 24 2b 53 24 29 3a 71 6c 25 3d a9 a4 5a 28 |,A$+S$):ql%=..Z(|
00010db0 66 25 2c 31 36 29 3a 53 24 3d c1 53 24 2c 71 6c |f%,16):S$=.S$,ql|
00010dc0 25 2d 60 69 25 2b 31 29 3a f2 41 28 66 25 2c 31 |%-`i%+1):.A(f%,1|
00010dd0 37 2c 53 24 29 3a 71 6c 25 3d a9 a4 5a 28 66 25 |7,S$):ql%=..Z(f%|
00010de0 2c 31 36 29 3a 53 24 3d c1 53 24 2c 71 6c 25 2b |,16):S$=.S$,ql%+|
00010df0 31 29 3a f2 41 28 66 25 2c 31 38 2c 53 24 29 3a |1):.A(f%,18,S$):|
00010e00 e1 0d 06 0e e6 dd f2 73 28 63 25 2c 72 25 2c 51 |.......s(c%,r%,Q|
00010e10 25 29 3a ea 41 25 2c 62 25 2c 4b 5f 25 3a e3 41 |%):.A%,b%,K_%:.A|
00010e20 25 3d 31 36 b8 31 38 3a f2 41 28 66 25 2c 41 25 |%=16.18:.A(f%,A%|
00010e30 2c 22 22 29 3a f2 55 28 66 25 2c 41 25 2c 6d 5f |,""):.U(f%,A%,m_|
00010e40 25 29 3a ed 3a f2 5a 28 66 25 2c 32 34 2c 30 29 |%):.:.Z(f%,24,0)|
00010e50 3a 68 4a 25 3d 30 3a f2 5a 28 66 25 2c 32 31 2c |:hJ%=0:.Z(f%,21,|
00010e60 94 28 28 54 5f 25 80 34 29 3e 30 29 29 3a f2 5a |.((T_%.4)>0)):.Z|
00010e70 28 66 25 2c 32 33 2c 94 28 28 54 5f 25 80 32 29 |(f%,23,.((T_%.2)|
00010e80 3e 30 29 29 3a f2 5a 28 66 25 2c 33 38 2c 94 28 |>0)):.Z(f%,38,.(|
00010e90 28 54 5f 25 80 31 29 3e 30 29 29 3a f2 53 28 66 |(T_%.1)>0)):.S(f|
00010ea0 25 2c 32 31 2c 94 28 28 54 5f 25 80 31 29 3e 30 |%,21,.((T_%.1)>0|
00010eb0 29 29 3a f2 5a 28 66 25 2c 33 39 2c 30 29 3a f2 |)):.Z(f%,39,0):.|
00010ec0 4a 79 28 32 36 29 3a f2 41 28 66 25 2c 32 37 2c |Jy(26):.A(f%,27,|
00010ed0 22 31 22 29 3a f2 41 28 66 25 2c 33 30 2c a4 41 |"1"):.A(f%,30,.A|
00010ee0 28 22 45 31 22 29 29 0d 06 0f d3 63 75 25 3d 31 |("E1"))....cu%=1|
00010ef0 3a 66 75 25 3d 31 3a 76 75 25 3d 31 3a 74 75 25 |:fu%=1:vu%=1:tu%|
00010f00 3d 31 3a f2 53 28 66 25 2c 33 37 2c 31 29 3a f2 |=1:.S(f%,37,1):.|
00010f10 41 28 66 25 2c 33 33 2c a4 41 28 22 4f 54 31 22 |A(f%,33,.A("OT1"|
00010f20 29 29 3a f2 41 28 66 25 2c 33 34 2c a4 41 28 22 |)):.A(f%,34,.A("|
00010f30 44 61 79 31 22 29 29 3a f2 41 28 66 25 2c 33 35 |Day1")):.A(f%,35|
00010f40 2c a4 41 28 22 4f 45 31 22 29 29 3a f2 41 28 66 |,.A("OE1")):.A(f|
00010f50 25 2c 31 2c a4 51 28 63 25 2c 72 25 2c 51 25 2c |%,1,.Q(c%,r%,Q%,|
00010f60 2d 31 29 29 3a 57 5f 25 3d 63 25 3a 43 5f 25 3d |-1)):W_%=c%:C_%=|
00010f70 72 25 3a 62 5f 25 3d 51 25 3a 62 25 3d a4 66 3a |r%:b_%=Q%:b%=.f:|
00010f80 72 25 3d a4 69 3a 4b 5f 25 3d 28 62 25 3e 3d 26 |r%=.i:K_%=(b%>=&|
00010f90 43 29 3a f2 69 28 66 25 2c 51 6c 25 2c a4 41 28 |C):.i(f%,Ql%,.A(|
00010fa0 22 61 6c 73 65 74 22 29 2c 2d 31 29 3a e7 62 25 |"alset"),-1):.b%|
00010fb0 3e 26 43 8c 62 25 2d 3d 26 43 0d 06 10 49 f2 41 |>&C.b%-=&C...I.A|
00010fc0 28 66 25 2c 33 2c c3 62 25 29 3a f2 41 28 66 25 |(f%,3,.b%):.A(f%|
00010fd0 2c 35 2c 22 30 30 22 29 3a e7 4b 5f 25 8c f2 41 |,5,"00"):.K_%..A|
00010fe0 28 66 25 2c 26 43 2c a4 41 28 22 70 6d 22 29 29 |(f%,&C,.A("pm"))|
00010ff0 8b f2 41 28 66 25 2c 26 43 2c a4 41 28 22 61 6d |..A(f%,&C,.A("am|
00011000 22 29 29 0d 06 11 21 f2 59 28 30 2c 72 25 29 3a |"))...!.Y(0,r%):|
00011010 f2 49 79 28 b9 2c b9 29 3a f2 4d 28 66 25 2c 31 |.Iy(.,.):.M(f%,1|
00011020 36 29 3a e1 0d 06 12 42 dd f2 55 5f 28 42 25 29 |6):....B..U_(B%)|
00011030 3a f2 4f 79 28 42 25 29 3a 4c 5f 25 3d 2d 31 3a |:.Oy(B%):L_%=-1:|
00011040 f2 53 28 66 25 2c 33 37 2c 31 29 3a f2 69 28 66 |.S(f%,37,1):.i(f|
00011050 25 2c 51 6c 25 2c a4 41 28 22 61 6c 73 65 74 22 |%,Ql%,.A("alset"|
00011060 29 2c 30 29 3a e1 0d 06 13 73 dd f2 4f 79 28 42 |),0):....s..Oy(B|
00011070 25 29 3a ea 64 25 2c 71 25 2c 78 25 2c 62 25 2c |%):.d%,q%,x%,b%,|
00011080 72 25 2c 41 24 2c 63 69 25 2c 52 25 3a f2 50 28 |r%,A$,ci%,R%:.P(|
00011090 42 25 21 26 43 2c 72 25 2c 62 25 2c 64 25 2c 71 |B%!&C,r%,b%,d%,q|
000110a0 25 2c 78 25 29 3a 4c 5f 25 3d 42 25 3a e7 62 25 |%,x%):L_%=B%:.b%|
000110b0 3c 26 43 8c 41 24 3d a4 41 28 22 61 6d 22 29 8b |<&C.A$=.A("am").|
000110c0 41 24 3d a4 41 28 22 70 6d 22 29 3a e7 62 25 3e |A$=.A("pm"):.b%>|
000110d0 26 43 8c 62 25 2d 3d 26 43 0d 06 14 1c f2 41 28 |&C.b%-=&C.....A(|
000110e0 66 25 2c 26 43 2c 41 24 29 3a e7 62 25 3d 30 8c |f%,&C,A$):.b%=0.|
000110f0 62 25 3d 26 43 0d 06 15 35 f2 5a 28 66 25 2c 33 |b%=&C...5.Z(f%,3|
00011100 38 2c 28 28 42 25 21 31 36 3e 3e 32 30 29 80 31 |8,((B%!16>>20).1|
00011110 29 29 3a 41 24 3d c3 72 25 3a e7 72 25 3c 26 41 |)):A$=.r%:.r%<&A|
00011120 8c 41 24 3d 22 30 22 2b 41 24 0d 06 16 32 f2 41 |.A$="0"+A$...2.A|
00011130 28 66 25 2c 35 2c 41 24 29 3a 68 4a 25 3d 28 28 |(f%,5,A$):hJ%=((|
00011140 42 25 21 31 36 29 3e 3e 34 29 80 26 46 3a e7 68 |B%!16)>>4).&F:.h|
00011150 4a 25 3d 30 8c 68 4a 25 3d 6d 5f 25 0d 06 17 f5 |J%=0.hJ%=m_%....|
00011160 e3 41 25 3d 31 36 b8 31 38 3a f2 55 28 66 25 2c |.A%=16.18:.U(f%,|
00011170 41 25 2c 68 4a 25 29 3a ed 3a f2 53 28 66 25 2c |A%,hJ%):.:.S(f%,|
00011180 33 37 2c 30 29 3a f2 41 28 66 25 2c 33 2c c3 62 |37,0):.A(f%,3,.b|
00011190 25 29 3a f2 69 28 66 25 2c 51 6c 25 2c a4 41 28 |%):.i(f%,Ql%,.A(|
000111a0 22 61 6c 65 64 69 74 22 29 2c 2d 31 29 3a f2 41 |"aledit"),-1):.A|
000111b0 28 66 25 2c 31 2c a4 51 28 64 25 2c 71 25 2c 78 |(f%,1,.Q(d%,q%,x|
000111c0 25 2c 2d 31 29 29 3a 57 5f 25 3d 64 25 3a 43 5f |%,-1)):W_%=d%:C_|
000111d0 25 3d 71 25 3a 62 5f 25 3d 78 25 3a f2 5a 28 66 |%=q%:b_%=x%:.Z(f|
000111e0 25 2c 32 31 2c 94 28 28 28 42 25 21 31 36 29 80 |%,21,.(((B%!16).|
000111f0 31 29 3d 31 29 29 3a f2 5a 28 66 25 2c 32 33 2c |1)=1)):.Z(f%,23,|
00011200 94 28 28 28 42 25 21 31 36 29 80 32 29 3d 32 29 |.(((B%!16).2)=2)|
00011210 29 3a f2 5a 28 66 25 2c 33 39 2c 94 28 28 42 25 |):.Z(f%,39,.((B%|
00011220 21 31 36 80 28 31 3c 3c 32 31 29 29 3e 31 29 29 |!16.(1<<21))>1))|
00011230 3a f2 41 28 66 25 2c 32 37 2c 22 31 22 29 3a f2 |:.A(f%,27,"1"):.|
00011240 41 28 66 25 2c 33 30 2c a4 41 28 22 45 31 22 29 |A(f%,30,.A("E1")|
00011250 29 0d 06 18 70 63 75 25 3d 31 3a 66 75 25 3d 31 |)...pcu%=1:fu%=1|
00011260 3a 76 75 25 3d 31 3a 74 75 25 3d 31 3a f2 4a 79 |:vu%=1:tu%=1:.Jy|
00011270 28 32 36 29 3a f2 41 28 66 25 2c 33 33 2c a4 41 |(26):.A(f%,33,.A|
00011280 28 22 4f 54 31 22 29 29 3a f2 41 28 66 25 2c 33 |("OT1")):.A(f%,3|
00011290 34 2c a4 41 28 22 44 61 79 31 22 29 29 3a f2 41 |4,.A("Day1")):.A|
000112a0 28 66 25 2c 33 35 2c a4 41 28 22 4f 45 31 22 29 |(f%,35,.A("OE1")|
000112b0 29 3a e7 28 28 42 25 21 31 36 29 80 34 29 3d 34 |):.((B%!16).4)=4|
000112c0 8c 0d 06 19 25 63 69 25 3d b9 3a f2 5a 28 66 25 |....%ci%=.:.Z(f%|
000112d0 2c 32 34 2c 31 29 3a e7 28 28 42 25 21 31 36 29 |,24,1):.((B%!16)|
000112e0 80 38 29 3d 38 8c 0d 06 1a 52 52 25 3d 28 28 42 |.8)=8....RR%=((B|
000112f0 25 21 31 36 29 3e 3e 38 29 80 26 46 46 3a f2 41 |%!16)>>8).&FF:.A|
00011300 28 66 25 2c 32 37 2c c3 52 25 29 3a 63 75 25 3d |(f%,27,.R%):cu%=|
00011310 28 28 42 25 21 31 36 29 3e 3e 31 36 29 80 26 46 |((B%!16)>>16).&F|
00011320 3a f2 41 28 66 25 2c 33 30 2c a4 57 28 73 4a 25 |:.A(f%,30,.W(sJ%|
00011330 2c 63 75 25 2d 31 29 29 0d 06 1b 93 cc 3a f2 4a |,cu%-1)).....:.J|
00011340 79 28 33 31 29 3a 66 75 25 3d 28 28 42 25 21 31 |y(31):fu%=((B%!1|
00011350 36 29 3e 3e 38 29 80 26 46 3a f2 41 28 66 25 2c |6)>>8).&F:.A(f%,|
00011360 33 33 2c a4 57 28 65 6c 25 2c 66 75 25 2d 31 29 |33,.W(el%,fu%-1)|
00011370 29 3a 76 75 25 3d 28 28 42 25 21 31 36 29 3e 3e |):vu%=((B%!16)>>|
00011380 26 43 29 80 26 46 3a f2 41 28 66 25 2c 33 34 2c |&C).&F:.A(f%,34,|
00011390 a4 57 28 78 6c 25 2c 76 75 25 2d 31 29 29 3a 74 |.W(xl%,vu%-1)):t|
000113a0 75 25 3d 28 28 42 25 21 31 36 29 3e 3e 31 36 29 |u%=((B%!16)>>16)|
000113b0 80 26 46 3a f2 41 28 66 25 2c 33 35 2c a4 57 28 |.&F:.A(f%,35,.W(|
000113c0 61 6c 25 2c 74 75 25 2d 31 29 29 0d 06 1c 05 cd |al%,tu%-1)).....|
000113d0 0d 06 1d 10 cc f2 5a 28 66 25 2c 32 34 2c 30 29 |......Z(f%,24,0)|
000113e0 0d 06 1e 64 cd 3a 42 25 2b 3d 32 30 3a e3 41 25 |...d.:B%+=20:.A%|
000113f0 3d 31 36 b8 31 38 3a 41 24 3d 22 22 3a c8 95 3f |=16.18:A$="":..?|
00011400 42 25 3c 3e 26 42 3a 41 24 2b 3d bd 3f 42 25 3a |B%<>&B:A$+=.?B%:|
00011410 42 25 2b 3d 31 3a ce 3a 42 25 2b 3d 31 3a f2 41 |B%+=1:.:B%+=1:.A|
00011420 28 66 25 2c 41 25 2c 41 24 29 3a ed 3a f2 49 79 |(f%,A%,A$):.:.Iy|
00011430 28 ac 63 69 25 2c b9 29 3a f2 4d 28 66 25 2c 31 |(.ci%,.):.M(f%,1|
00011440 36 29 3a e1 0d 06 1f 66 dd f2 49 79 28 4c 61 25 |6):....f..Iy(La%|
00011450 2c 49 4a 25 29 3a 21 4a 25 3d 66 25 3a c8 99 26 |,IJ%):!J%=f%:..&|
00011460 34 30 30 43 42 2c 2c 4a 25 3a e7 49 4a 25 8c 4a |400CB,,J%:.IJ%.J|
00011470 25 21 32 38 3d 2d 31 3a 4a 25 21 34 3d a4 64 2d |%!28=-1:J%!4=.d-|
00011480 26 36 34 2d 28 4a 25 21 26 43 2d 4a 25 21 34 29 |&64-(J%!&C-J%!4)|
00011490 3a 4a 25 21 26 43 3d 4a 25 21 34 2b 26 33 45 38 |:J%!&C=J%!4+&3E8|
000114a0 3a 4a 25 21 31 36 3d 39 30 30 0d 06 20 29 4a 25 |:J%!16=900.. )J%|
000114b0 21 38 3d 4a 25 21 31 36 20 2d 26 37 44 30 2a 94 |!8=J%!16 -&7D0*.|
000114c0 ac 4c 61 25 3a c8 99 26 34 30 30 43 35 2c 2c 4a |.La%:..&400C5,,J|
000114d0 25 3a e1 0d 06 21 57 dd f2 63 4a 28 4c 61 25 2c |%:...!W..cJ(La%,|
000114e0 49 4a 25 29 3a 21 4a 25 3d 4c 79 25 3a c8 99 26 |IJ%):!J%=Ly%:..&|
000114f0 34 30 30 43 42 2c 2c 4a 25 3a e7 49 4a 25 8c 4a |400CB,,J%:.IJ%.J|
00011500 25 21 32 38 3d 2d 31 3a 4a 25 21 34 3d 26 36 34 |%!28=-1:J%!4=&64|
00011510 3a 4a 25 21 26 43 3d 4a 25 21 34 2b 26 33 45 38 |:J%!&C=J%!4+&3E8|
00011520 3a 4a 25 21 31 36 3d 39 30 30 0d 06 22 29 4a 25 |:J%!16=900..")J%|
00011530 21 38 3d 4a 25 21 31 36 20 2d 26 37 44 30 2a 94 |!8=J%!16 -&7D0*.|
00011540 ac 4c 61 25 3a c8 99 26 34 30 30 43 35 2c 2c 4a |.La%:..&400C5,,J|
00011550 25 3a e1 0d 06 23 6b dd f2 4a 79 28 77 25 29 3a |%:...#k..Jy(w%):|
00011560 ea 41 25 3a f2 5a 28 66 25 2c 77 25 2c 31 29 3a |.A%:.Z(f%,w%,1):|
00011570 f2 5a 28 66 25 2c 35 37 2d 77 25 2c 30 29 3a e3 |.Z(f%,57-w%,0):.|
00011580 41 25 3d 32 37 b8 33 30 3a f2 53 28 66 25 2c 41 |A%=27.30:.S(f%,A|
00011590 25 2c 2d 28 77 25 3d 33 31 29 29 3a ed 3a e3 41 |%,-(w%=31)):.:.A|
000115a0 25 3d 33 33 b8 33 35 3a f2 53 28 66 25 2c 41 25 |%=33.35:.S(f%,A%|
000115b0 2c 2d 28 77 25 3d 32 36 29 29 3a ed 3a e1 0d 06 |,-(w%=26)):.:...|
000115c0 24 4f dd f2 4a 5f 3a ea 46 25 2c 63 25 2c 72 25 |$O..J_:.F%,c%,r%|
000115d0 2c 51 25 2c 6d 79 25 2c 4c 75 25 2c 47 79 25 2c |,Q%,my%,Lu%,Gy%,|
000115e0 42 25 2c 6d 75 25 2c 66 4a 25 2c 6a 79 25 3a f2 |B%,mu%,fJ%,jy%:.|
000115f0 50 28 71 4a 25 2c 46 25 2c 42 25 2c 6d 75 25 2c |P(qJ%,F%,B%,mu%,|
00011600 66 4a 25 2c 6a 79 25 29 3a c8 8e b9 ca 0d 06 25 |fJ%,jy%):......%|
00011610 0f c9 44 5f 25 3d 31 3a 46 25 3d b9 0d 06 26 43 |..D_%=1:F%=...&C|
00011620 c9 44 5f 25 3d 32 80 28 a4 44 28 55 79 25 2c 62 |.D_%=2.(.D(Uy%,b|
00011630 79 25 2c 46 79 25 29 3e a4 44 28 6d 75 25 2c 66 |y%,Fy%)>.D(mu%,f|
00011640 4a 25 2c 6a 79 25 29 2d a4 48 28 6d 75 25 2c 66 |J%,jy%)-.H(mu%,f|
00011650 4a 25 2c 6a 79 25 29 2b 37 29 3a 46 25 3d b9 0d |J%,jy%)+7):F%=..|
00011660 06 27 15 c9 44 5f 25 3d 33 80 55 79 25 3d 31 3a |.'..D_%=3.Uy%=1:|
00011670 46 25 3d b9 0d 06 28 09 7f 46 25 3d a3 0d 06 29 |F%=...(..F%=...)|
00011680 0f cb 3a e7 46 25 80 ac 56 79 25 8c 0d 06 2a 1a |..:.F%..Vy%...*.|
00011690 e7 74 25 3c 3e a4 50 28 33 29 80 49 75 25 8c f2 |.t%<>.P(3).Iu%..|
000116a0 43 5f 28 74 25 29 0d 06 2b 29 74 25 3d a4 50 28 |C_(t%)..+)t%=.P(|
000116b0 33 29 3a f2 49 28 55 79 25 2c 62 79 25 2c 46 79 |3):.I(Uy%,by%,Fy|
000116c0 25 29 3a f2 78 28 69 25 2c 2d 31 2c 2d 31 29 0d |%):.x(i%,-1,-1).|
000116d0 06 2c 20 cd 3a 6d 79 25 3d 30 3a 4c 75 25 3d 30 |., .:my%=0:Lu%=0|
000116e0 3a 47 79 25 3d 30 3a e7 6c 79 25 3c 3e 30 8c 0d |:Gy%=0:.ly%<>0..|
000116f0 06 2d 0d c8 8e 6c 79 25 3e 3e 34 ca 0d 06 2e 11 |.-...ly%>>4.....|
00011700 c9 30 3a 6d 79 25 3d 6c 79 25 80 26 46 0d 06 2f |.0:my%=ly%.&F../|
00011710 15 c9 31 3a 6d 79 25 3d 37 2a 28 6c 79 25 80 26 |..1:my%=7*(ly%.&|
00011720 46 29 0d 06 30 11 c9 32 3a 4c 75 25 3d 6c 79 25 |F)..0..2:Lu%=ly%|
00011730 80 26 46 0d 06 31 11 c9 33 3a 47 79 25 3d 6c 79 |.&F..1..3:Gy%=ly|
00011740 25 80 26 46 0d 06 32 87 cb 3a 63 25 3d 55 79 25 |%.&F..2..:c%=Uy%|
00011750 3a 72 25 3d 62 79 25 3a 51 25 3d 46 79 25 3a f2 |:r%=by%:Q%=Fy%:.|
00011760 46 28 63 25 2c 72 25 2c 51 25 2c 2d 6d 79 25 2c |F(c%,r%,Q%,-my%,|
00011770 2d 4c 75 25 2c 2d 47 79 25 29 3a 46 25 3d a4 46 |-Lu%,-Gy%):F%=.F|
00011780 28 30 2c 30 2c 63 25 2c 72 25 2c 51 25 29 3a 42 |(0,0,c%,r%,Q%):B|
00011790 25 3d 4d 5f 25 3a 63 25 3d b9 3a c8 95 42 25 3c |%=M_%:c%=.:..B%<|
000117a0 3e 2d 31 80 63 25 3a e7 a4 47 28 42 25 21 26 43 |>-1.c%:..G(B%!&C|
000117b0 2c 46 25 29 3d 2d 31 8c f2 6b 28 42 25 29 3a 42 |,F%)=-1..k(B%):B|
000117c0 25 3d 42 25 21 34 8b 63 25 3d a3 0d 06 33 05 ce |%=B%!4.c%=...3..|
000117d0 0d 06 34 07 cd 3a e1 0d 06 35 5a dd f2 4e 5f 3a |..4..:...5Z..N_:|
000117e0 ea 41 5f 25 2c 62 25 2c 72 25 2c 4b 5f 25 2c 41 |.A_%,b%,r%,K_%,A|
000117f0 24 2c 5a 24 2c 43 24 2c 50 79 25 3a 41 24 3d a4 |$,Z$,C$,Py%:A$=.|
00011800 5a 28 66 25 2c 31 36 29 3a 5a 24 3d a4 5a 28 66 |Z(f%,16):Z$=.Z(f|
00011810 25 2c 31 37 29 3a 43 24 3d a4 5a 28 66 25 2c 31 |%,17):C$=.Z(f%,1|
00011820 38 29 3a e7 41 24 2b 5a 24 2b 43 24 3c 3e 22 22 |8):.A$+Z$+C$<>""|
00011830 8c 0d 06 36 29 62 25 3d bb a4 5a 28 66 25 2c 33 |...6)b%=..Z(f%,3|
00011840 29 3a 72 25 3d bb a4 5a 28 66 25 2c 35 29 3a e7 |):r%=..Z(f%,5):.|
00011850 62 25 3d 26 43 8c 62 25 3d 30 0d 06 37 28 4b 5f |b%=&C.b%=0..7(K_|
00011860 25 3d 28 a4 5a 28 66 25 2c 26 43 29 3d a4 41 28 |%=(.Z(f%,&C)=.A(|
00011870 22 70 6d 22 29 29 3a e7 4b 5f 25 8c 62 25 2b 3d |"pm")):.K_%.b%+=|
00011880 26 43 0d 06 38 6d 50 79 25 3d 50 79 25 84 28 2d |&C..8mPy%=Py%.(-|
00011890 a4 4d 28 66 25 2c 32 31 29 29 84 28 28 2d a4 4d |.M(f%,21)).((-.M|
000118a0 28 66 25 2c 32 33 29 29 3c 3c 31 29 84 28 68 4a |(f%,23))<<1).(hJ|
000118b0 25 3c 3c 34 29 3a 50 79 25 3d 50 79 25 84 28 28 |%<<4):Py%=Py%.((|
000118c0 2d a4 4d 28 66 25 2c 33 38 29 29 3c 3c 32 30 29 |-.M(f%,38))<<20)|
000118d0 84 28 28 2d a4 4d 28 66 25 2c 33 39 29 29 3c 3c |.((-.M(f%,39))<<|
000118e0 32 31 29 3a e7 a4 4d 28 66 25 2c 32 34 29 8c 0d |21):..M(f%,24)..|
000118f0 06 39 0f e7 a4 4d 28 66 25 2c 32 36 29 8c 0d 06 |.9...M(f%,26)...|
00011900 3a 2a 50 79 25 3d 50 79 25 84 26 43 84 28 28 bb |:*Py%=Py%.&C.((.|
00011910 a4 5a 28 66 25 2c 32 37 29 29 3c 3c 38 29 84 28 |.Z(f%,27))<<8).(|
00011920 63 75 25 3c 3c 31 36 29 0d 06 3b 2b cc 50 79 25 |cu%<<16)..;+.Py%|
00011930 3d 50 79 25 84 34 84 28 66 75 25 3c 3c 38 29 84 |=Py%.4.(fu%<<8).|
00011940 28 76 75 25 3c 3c 26 43 29 84 28 74 75 25 3c 3c |(vu%<<&C).(tu%<<|
00011950 31 36 29 0d 06 3c 05 cd 0d 06 3d 56 cd 3a 41 5f |16)..<....=V.:A_|
00011960 25 3d a4 46 28 72 25 2c 62 25 2c 57 5f 25 2c 43 |%=.F(r%,b%,W_%,C|
00011970 5f 25 2c 62 5f 25 29 3a f2 4b 79 28 41 5f 25 2c |_%,b_%):.Ky(A_%,|
00011980 50 79 25 2c 41 24 2c 5a 24 2c 43 24 29 3a f2 4d |Py%,A$,Z$,C$):.M|
00011990 79 3a f2 63 3a f2 6e 3a 65 79 25 3d b9 3a e7 56 |y:.c:.n:ey%=.:.V|
000119a0 79 25 80 5a 25 28 74 25 29 3d 33 8c f2 4f 0d 06 |y%.Z%(t%)=3..O..|
000119b0 3e 15 cc f2 42 28 a4 41 28 22 45 72 72 4d 65 73 |>...B(.A("ErrMes|
000119c0 22 29 29 0d 06 3f 07 cd 3a e1 0d 06 40 42 dd f2 |"))..?..:...@B..|
000119d0 4b 79 28 41 5f 25 2c 50 79 25 2c 41 24 2c 5a 24 |Ky(A_%,Py%,A$,Z$|
000119e0 2c 43 24 29 3a ea 53 25 2c 42 25 2c 4f 79 25 2c |,C$):.S%,B%,Oy%,|
000119f0 54 25 2c 67 79 25 2c 57 79 25 3a e7 4c 5f 25 3c |T%,gy%,Wy%:.L_%<|
00011a00 3e 2d 31 8c f2 46 79 28 4c 5f 25 29 0d 06 41 6c |>-1..Fy(L_%)..Al|
00011a10 4f 79 25 3d a3 3a 53 25 3d a9 28 41 24 2b 5a 24 |Oy%=.:S%=.(A$+Z$|
00011a20 2b 43 24 29 2b 33 2b 32 30 3a 57 79 25 3d 4d 5f |+C$)+3+20:Wy%=M_|
00011a30 25 3a 67 79 25 3d 2d 31 3a c8 95 57 79 25 3c 3e |%:gy%=-1:..Wy%<>|
00011a40 2d 31 80 ac 4f 79 25 3a 54 25 3d 57 79 25 21 26 |-1..Oy%:T%=Wy%!&|
00011a50 43 3a e7 a4 47 28 41 5f 25 2c 54 25 29 3d 2d 31 |C:..G(A_%,T%)=-1|
00011a60 8c 4f 79 25 3d b9 8b 67 79 25 3d 57 79 25 3a 57 |.Oy%=..gy%=Wy%:W|
00011a70 79 25 3d 57 79 25 21 34 0d 06 42 5c ce 3a 42 25 |y%=Wy%!4..B\.:B%|
00011a80 3d a4 77 28 77 5f 25 2c 53 25 2b 31 2c b9 29 3a |=.w(w_%,S%+1,.):|
00011a90 21 42 25 3d 67 79 25 3a 42 25 21 34 3d 57 79 25 |!B%=gy%:B%!4=Wy%|
00011aa0 3a 42 25 21 38 3d 53 25 3a 42 25 21 26 43 3d 41 |:B%!8=S%:B%!&C=A|
00011ab0 5f 25 3a 42 25 21 31 36 3d 50 79 25 3a e7 67 79 |_%:B%!16=Py%:.gy|
00011ac0 25 3d 2d 31 8c 4d 5f 25 3d 42 25 8b 67 79 25 21 |%=-1.M_%=B%.gy%!|
00011ad0 34 3d 42 25 0d 06 43 14 e7 57 79 25 3c 3e 2d 31 |4=B%..C..Wy%<>-1|
00011ae0 8c 21 57 79 25 3d 42 25 0d 06 44 23 24 28 42 25 |.!Wy%=B%..D#$(B%|
00011af0 2b 32 30 29 3d 41 24 2b bd 26 42 2b 5a 24 2b bd |+20)=A$+.&B+Z$+.|
00011b00 26 42 2b 43 24 2b bd 26 42 3a e1 0d 06 45 31 dd |&B+C$+.&B:...E1.|
00011b10 f2 6b 28 42 25 29 3a f2 46 79 28 42 25 29 3a f2 |.k(B%):.Fy(B%):.|
00011b20 4d 79 3a f2 63 3a 65 79 25 3d b9 3a e7 56 79 25 |My:.c:ey%=.:.Vy%|
00011b30 80 5a 25 28 74 25 29 3d 33 8c f2 4f 0d 06 46 0e |.Z%(t%)=3..O..F.|
00011b40 e7 42 25 3d 4c 5f 25 8c f2 6e 0d 06 47 1a e7 42 |.B%=L_%..n..G..B|
00011b50 25 3d 41 75 25 8c 41 75 25 3d 2d 31 3a f2 47 28 |%=Au%.Au%=-1:.G(|
00011b60 4c 79 25 29 0d 06 48 05 e1 0d 06 49 39 dd f2 46 |Ly%)..H....I9..F|
00011b70 79 28 42 25 29 3a ea 67 79 25 2c 57 79 25 3a 67 |y(B%):.gy%,Wy%:g|
00011b80 79 25 3d 21 42 25 3a 57 79 25 3d 42 25 21 34 3a |y%=!B%:Wy%=B%!4:|
00011b90 e7 67 79 25 3c 3e 2d 31 8c 67 79 25 21 34 3d 57 |.gy%<>-1.gy%!4=W|
00011ba0 79 25 0d 06 4a 15 e7 57 79 25 3c 3e 2d 31 8c 21 |y%..J..Wy%<>-1.!|
00011bb0 57 79 25 3d 67 79 25 0d 06 4b 13 e7 4d 5f 25 3d |Wy%=gy%..K..M_%=|
00011bc0 42 25 8c 4d 5f 25 3d 57 79 25 0d 06 4c 13 f2 44 |B%.M_%=Wy%..L..D|
00011bd0 79 28 77 5f 25 2c 42 25 2c b9 29 3a e1 0d 06 4d |y(w_%,B%,.):...M|
00011be0 25 dd f2 6e 3a f2 47 28 66 25 29 3a f2 47 28 61 |%..n:.G(f%):.G(a|
00011bf0 79 25 29 3a e7 56 79 25 8c f2 4d 28 69 25 2c 2d |y%):.Vy%..M(i%,-|
00011c00 31 29 0d 06 4e 0c 4c 5f 25 3d 2d 31 3a e1 0d 06 |1)..N.L_%=-1:...|
00011c10 4f 25 dd f2 6c 75 28 58 79 25 2c 54 79 25 2c 65 |O%..lu(Xy%,Ty%,e|
00011c20 25 2c 77 25 2c 58 5f 25 29 3a ea 41 25 3a c8 8e |%,w%,X_%):.A%:..|
00011c30 77 25 ca 0d 06 50 1d c9 31 3a f2 41 79 28 57 5f |w%...P..1:.Ay(W_|
00011c40 25 2c 43 5f 25 2c 62 5f 25 2c 65 25 2c 77 25 29 |%,C_%,b_%,e%,w%)|
00011c50 0d 06 51 10 c9 36 3a f2 59 28 58 5f 25 2c 30 29 |..Q..6:.Y(X_%,0)|
00011c60 0d 06 52 11 c9 37 3a f2 59 28 2d 58 5f 25 2c 30 |..R..7:.Y(-X_%,0|
00011c70 29 0d 06 53 13 c9 38 3a f2 59 28 30 2c 26 41 2a |)..S..8:.Y(0,&A*|
00011c80 58 5f 25 29 0d 06 54 14 c9 39 3a f2 59 28 30 2c |X_%)..T..9:.Y(0,|
00011c90 2d 26 41 2a 58 5f 25 29 0d 06 55 11 c9 26 41 3a |-&A*X_%)..U..&A:|
00011ca0 f2 59 28 30 2c 58 5f 25 29 0d 06 56 12 c9 26 42 |.Y(0,X_%)..V..&B|
00011cb0 3a f2 59 28 30 2c 2d 58 5f 25 29 0d 06 57 2e c9 |:.Y(0,-X_%)..W..|
00011cc0 26 43 3a 41 25 3d 26 43 2b 32 34 2a 28 a4 5a 28 |&C:A%=&C+24*(.Z(|
00011cd0 66 25 2c 26 43 29 3d a4 41 28 22 70 6d 22 29 29 |f%,&C)=.A("pm"))|
00011ce0 3a f2 59 28 41 25 2c 30 29 0d 06 58 0b c9 31 39 |:.Y(A%,0)..X..19|
00011cf0 3a f2 4e 5f 0d 06 59 0a c9 32 30 3a f2 6e 0d 06 |:.N_..Y..20:.n..|
00011d00 5a 1d c9 32 32 3a f2 43 28 46 6c 25 2c 58 79 25 |Z..22:.C(Fl%,Xy%|
00011d10 2c 54 79 25 2c 65 25 2c 77 25 29 0d 06 5b 19 c9 |,Ty%,e%,w%)..[..|
00011d20 32 34 3a f2 49 79 28 ac a4 4d 28 65 25 2c 32 34 |24:.Iy(..M(e%,24|
00011d30 29 2c a3 29 0d 06 5c 12 c9 32 36 2c 33 31 3a f2 |),.)..\..26,31:.|
00011d40 4a 79 28 77 25 29 0d 06 5d 19 c9 32 38 2c 32 39 |Jy(w%)..]..28,29|
00011d50 3a e7 6e 25 3d 31 8c 77 25 3d 35 37 2d 77 25 0d |:.n%=1.w%=57-w%.|
00011d60 06 5e 3b 41 25 3d bb a4 5a 28 65 25 2c 32 37 29 |.^;A%=..Z(e%,27)|
00011d70 3a 41 25 2b 3d 28 77 25 2d 32 37 29 2a 32 2d 33 |:A%+=(w%-27)*2-3|
00011d80 3a e7 41 25 3d 30 8c 41 25 3d 26 46 46 8b e7 41 |:.A%=0.A%=&FF..A|
00011d90 25 3d 32 35 36 8c 41 25 3d 31 0d 06 5f 11 f2 41 |%=256.A%=1.._..A|
00011da0 28 65 25 2c 32 37 2c c3 41 25 29 0d 06 60 36 c9 |(e%,27,.A%)..`6.|
00011db0 33 30 3a f2 60 28 58 79 25 2c 54 79 25 29 3a 21 |30:.`(Xy%,Ty%):!|
00011dc0 73 4a 25 3d a4 67 28 22 45 22 29 3a f2 43 28 73 |sJ%=.g("E"):.C(s|
00011dd0 4a 25 2c 58 79 25 2c 54 79 25 2c 65 25 2c 77 25 |J%,Xy%,Ty%,e%,w%|
00011de0 29 0d 06 61 29 c9 33 33 3a f2 60 28 58 79 25 2c |)..a).33:.`(Xy%,|
00011df0 54 79 25 29 3a f2 43 28 65 6c 25 2c 58 79 25 2c |Ty%):.C(el%,Xy%,|
00011e00 54 79 25 2c 65 25 2c 77 25 29 0d 06 62 29 c9 33 |Ty%,e%,w%)..b).3|
00011e10 34 3a f2 60 28 58 79 25 2c 54 79 25 29 3a f2 43 |4:.`(Xy%,Ty%):.C|
00011e20 28 78 6c 25 2c 58 79 25 2c 54 79 25 2c 65 25 2c |(xl%,Xy%,Ty%,e%,|
00011e30 77 25 29 0d 06 63 29 c9 33 35 3a f2 60 28 58 79 |w%)..c).35:.`(Xy|
00011e40 25 2c 54 79 25 29 3a f2 43 28 61 6c 25 2c 58 79 |%,Ty%):.C(al%,Xy|
00011e50 25 2c 54 79 25 2c 65 25 2c 77 25 29 0d 06 64 0f |%,Ty%,e%,w%)..d.|
00011e60 c9 33 37 3a f2 6b 28 4c 5f 25 29 0d 06 65 1c c9 |.37:.k(L_%)..e..|
00011e70 33 38 3a f2 53 28 66 25 2c 32 31 2c 94 a4 4d 28 |38:.S(f%,21,..M(|
00011e80 66 25 2c 33 38 29 29 0d 06 66 07 cb 3a e1 0d 06 |f%,38))..f..:...|
00011e90 67 27 dd f2 6a 4a 28 58 79 25 2c 54 79 25 2c 65 |g'..jJ(Xy%,Ty%,e|
00011ea0 25 2c 77 25 29 3a ea 41 25 3a 4a 5f 25 3d 30 3a |%,w%):.A%:J_%=0:|
00011eb0 c8 8e 77 25 ca 0d 06 68 20 c9 37 3a f2 42 79 28 |..w%...h .7:.By(|
00011ec0 41 75 25 2c a4 4d 28 4c 79 25 2c 39 29 29 3a 41 |Au%,.M(Ly%,9)):A|
00011ed0 75 25 3d 2d 31 0d 06 69 0e c9 38 3a f2 6b 28 41 |u%=-1..i..8:.k(A|
00011ee0 75 25 29 0d 06 6a 28 c9 39 3a e3 41 25 3d 26 41 |u%)..j(.9:.A%=&A|
00011ef0 b8 26 44 3a f2 53 28 65 25 2c 41 25 2c 94 ac a4 |.&D:.S(e%,A%,...|
00011f00 4d 28 65 25 2c 77 25 29 29 3a ed 0d 06 6b 19 c9 |M(e%,w%)):...k..|
00011f10 26 42 2c 26 43 3a e7 6e 25 3d 31 8c 77 25 3d 32 |&B,&C:.n%=1.w%=2|
00011f20 33 2d 77 25 0d 06 6c 3b 41 25 3d bb a4 5a 28 65 |3-w%..l;A%=..Z(e|
00011f30 25 2c 26 41 29 3a 41 25 2b 3d 28 77 25 2d 26 41 |%,&A):A%+=(w%-&A|
00011f40 29 2a 32 2d 33 3a e7 41 25 3d 30 8c 41 25 3d 26 |)*2-3:.A%=0.A%=&|
00011f50 46 46 8b e7 41 25 3d 32 35 36 8c 41 25 3d 31 0d |FF..A%=256.A%=1.|
00011f60 06 6d 11 f2 41 28 65 25 2c 26 41 2c c3 41 25 29 |.m..A(e%,&A,.A%)|
00011f70 0d 06 6e 5d c9 26 44 3a 21 4a 25 3d 65 25 3a c8 |..n].&D:!J%=e%:.|
00011f80 99 26 34 30 30 43 42 2c 2c 4a 25 3a 58 79 25 3d |.&400CB,,J%:Xy%=|
00011f90 4a 25 21 34 2b 36 38 36 2b 36 34 3a 54 79 25 3d |J%!4+686+64:Ty%=|
00011fa0 4a 25 21 31 36 2d 33 31 32 3a 21 73 4a 25 3d a4 |J%!16-312:!sJ%=.|
00011fb0 67 28 22 45 44 22 29 3a f2 43 28 73 4a 25 2c 58 |g("ED"):.C(sJ%,X|
00011fc0 79 25 2c 54 79 25 2c 65 25 2c 77 25 29 0d 06 6f |y%,Ty%,e%,w%)..o|
00011fd0 07 cb 3a e1 0d 06 70 25 dd f2 42 79 28 42 25 2c |..:...p%..By(B%,|
00011fe0 6e 69 25 29 3a e7 42 25 3c 3e 4c 5f 25 8c ea 4c |ni%):.B%<>L_%..L|
00011ff0 5f 25 3a 4c 5f 25 3d 2d 31 0d 06 71 0a e7 ac 6e |_%:L_%=-1..q...n|
00012000 69 25 8c 0d 06 72 11 e7 28 42 25 21 31 36 80 34 |i%...r..(B%!16.4|
00012010 29 3d 34 8c 0d 06 73 11 e7 28 42 25 21 31 36 80 |)=4...s..(B%!16.|
00012020 38 29 3d 38 8c 0d 06 74 0d f2 51 5f 28 42 25 2c |8)=8...t..Q_(B%,|
00012030 a3 29 0d 06 75 0c cc f2 6f 4a 28 42 25 29 0d 06 |.)..u...oJ(B%)..|
00012040 76 05 cd 0d 06 77 21 cc 42 25 21 31 36 3d 28 42 |v....w!.B%!16=(B|
00012050 25 21 31 36 29 84 28 31 3c 3c 32 30 29 3a 65 79 |%!16).(1<<20):ey|
00012060 25 3d 2d 31 0d 06 78 05 cd 0d 06 79 0e cc f2 51 |%=-1..x....y...Q|
00012070 5f 28 42 25 2c b9 29 0d 06 7a 23 cd 3a f2 4d 79 |_(B%,.)..z#.:.My|
00012080 3a f2 63 3a 65 79 25 3d b9 3a e7 56 79 25 80 5a |:.c:ey%=.:.Vy%.Z|
00012090 25 28 74 25 29 3d 33 8c f2 4f 0d 06 7b 13 4a 5f |%(t%)=3..O..{.J_|
000120a0 25 3d 30 3a f2 47 28 4c 79 25 29 3a e1 0d 06 7c |%=0:.G(Ly%):...||
000120b0 40 dd f2 51 5f 28 42 25 2c 6e 69 25 29 3a ea 63 |@..Q_(B%,ni%):.c|
000120c0 25 2c 54 25 2c 41 24 2c 66 79 25 2c 4b 79 25 2c |%,T%,A$,fy%,Ky%,|
000120d0 64 25 2c 71 25 2c 78 25 2c 41 5f 25 2c 50 79 25 |d%,q%,x%,A_%,Py%|
000120e0 2c 5a 24 2c 43 24 2c 3a e7 6e 69 25 8c 0d 06 7d |,Z$,C$,:.ni%...}|
000120f0 44 41 5f 25 3d a4 7a 3a 63 25 3d bb a4 5a 28 65 |DA_%=.z:c%=..Z(e|
00012100 25 2c 26 41 29 3a 41 24 3d a4 5a 28 4c 79 25 2c |%,&A):A$=.Z(Ly%,|
00012110 26 44 29 3a 54 25 3d 30 3a c8 95 41 24 3c 3e a4 |&D):T%=0:..A$<>.|
00012120 57 28 73 4a 25 2c 54 25 29 3a 54 25 2b 3d 31 3a |W(sJ%,T%):T%+=1:|
00012130 ce 0d 06 7e 3a cc 41 5f 25 3d 42 25 21 26 43 3a |...~:.A_%=B%!&C:|
00012140 63 25 3d 28 28 42 25 21 31 36 29 3e 3e 38 29 80 |c%=((B%!16)>>8).|
00012150 26 46 46 3a 54 25 3d 28 28 28 42 25 21 31 36 29 |&FF:T%=(((B%!16)|
00012160 3e 3e 31 36 29 80 26 46 29 2d 31 0d 06 7f e9 cd |>>16).&F)-1.....|
00012170 3a f2 50 28 41 5f 25 2c 66 79 25 2c 4b 79 25 2c |:.P(A_%,fy%,Ky%,|
00012180 64 25 2c 71 25 2c 78 25 29 3a f2 6d 79 28 66 79 |d%,q%,x%):.my(fy|
00012190 25 2c 4b 79 25 2c 64 25 2c 71 25 2c 78 25 2c 63 |%,Ky%,d%,q%,x%,c|
000121a0 25 2c 54 25 29 3a 41 5f 25 3d a4 46 28 66 79 25 |%,T%):A_%=.F(fy%|
000121b0 2c 4b 79 25 2c 64 25 2c 71 25 2c 78 25 29 3a 50 |,Ky%,d%,q%,x%):P|
000121c0 79 25 3d 42 25 21 31 36 3a 63 25 3d 42 25 2b 32 |y%=B%!16:c%=B%+2|
000121d0 30 3a 41 24 3d 22 22 3a c8 95 3f 63 25 3c 3e 26 |0:A$="":..?c%<>&|
000121e0 42 3a 41 24 2b 3d bd 3f 63 25 3a 63 25 2b 3d 31 |B:A$+=.?c%:c%+=1|
000121f0 3a ce 3a 63 25 2b 3d 31 3a c8 95 3f 63 25 3c 3e |:.:c%+=1:..?c%<>|
00012200 26 42 3a 5a 24 2b 3d bd 3f 63 25 3a 63 25 2b 3d |&B:Z$+=.?c%:c%+=|
00012210 31 3a ce 3a 63 25 2b 3d 31 3a c8 95 3f 63 25 3c |1:.:c%+=1:..?c%<|
00012220 3e 26 42 3a 43 24 2b 3d bd 3f 63 25 3a 63 25 2b |>&B:C$+=.?c%:c%+|
00012230 3d 31 3a ce 3a f2 46 79 28 42 25 29 3a f2 4b 79 |=1:.:.Fy(B%):.Ky|
00012240 28 41 5f 25 2c 50 79 25 2c 41 24 2c 5a 24 2c 43 |(A_%,Py%,A$,Z$,C|
00012250 24 29 3a e1 0d 06 80 58 dd f2 6d 79 28 f8 66 79 |$):....X..my(.fy|
00012260 25 2c f8 4b 79 25 2c f8 64 25 2c f8 71 25 2c f8 |%,.Ky%,.d%,.q%,.|
00012270 78 25 2c 63 25 2c 54 25 29 3a ea 6d 79 25 3a e7 |x%,c%,T%):.my%:.|
00012280 54 25 3d 30 8c 66 79 25 2b 3d 63 25 3a 63 25 3d |T%=0.fy%+=c%:c%=|
00012290 66 79 25 81 36 30 3a 66 79 25 3d 66 79 25 83 36 |fy%.60:fy%=fy%.6|
000122a0 30 3a e7 63 25 3e 30 8c 54 25 3d 31 0d 06 81 31 |0:.c%>0.T%=1...1|
000122b0 e7 54 25 3d 31 8c 4b 79 25 2b 3d 63 25 3a 63 25 |.T%=1.Ky%+=c%:c%|
000122c0 3d 4b 79 25 81 32 34 3a 4b 79 25 3d 4b 79 25 83 |=Ky%.24:Ky%=Ky%.|
000122d0 32 34 3a e7 63 25 3e 30 8c 54 25 3d 32 0d 06 82 |24:.c%>0.T%=2...|
000122e0 1f e7 54 25 3d 32 8c 6d 79 25 3d 63 25 8b e7 54 |..T%=2.my%=c%..T|
000122f0 25 3d 33 8c 6d 79 25 3d 37 2a 63 25 0d 06 83 2e |%=3.my%=7*c%....|
00012300 c8 95 6d 79 25 3e 30 3a f2 46 28 64 25 2c 71 25 |..my%>0:.F(d%,q%|
00012310 2c 78 25 2c 31 2c 30 2c 30 29 3a 6d 79 25 2d 3d |,x%,1,0,0):my%-=|
00012320 31 3a ce 3a e7 54 25 3d 34 8c 0d 06 84 25 c8 95 |1:.:.T%=4....%..|
00012330 63 25 3e 30 3a f2 46 28 64 25 2c 71 25 2c 78 25 |c%>0:.F(d%,q%,x%|
00012340 2c 30 2c 31 2c 30 29 3a 63 25 2d 3d 31 3a ce 0d |,0,1,0):c%-=1:..|
00012350 06 85 0c cd 3a e7 54 25 3d 35 8c 0d 06 86 25 c8 |....:.T%=5....%.|
00012360 95 63 25 3e 30 3a f2 46 28 64 25 2c 71 25 2c 78 |.c%>0:.F(d%,q%,x|
00012370 25 2c 30 2c 30 2c 31 29 3a 63 25 2d 3d 31 3a ce |%,0,0,1):c%-=1:.|
00012380 0d 06 87 07 cd 3a e1 0d 06 88 e8 dd f2 6f 4a 28 |.....:.......oJ(|
00012390 42 25 29 3a ea 41 5f 25 2c 66 79 25 2c 4b 79 25 |B%):.A_%,fy%,Ky%|
000123a0 2c 64 25 2c 71 25 2c 78 25 2c 41 24 2c 5a 24 2c |,d%,q%,x%,A$,Z$,|
000123b0 43 25 2c 50 79 25 2c 63 25 3a 50 79 25 3d 42 25 |C%,Py%,c%:Py%=B%|
000123c0 21 31 36 3a 63 25 3d 42 25 2b 32 30 3a f2 50 28 |!16:c%=B%+20:.P(|
000123d0 42 25 21 26 43 2c 66 79 25 2c 4b 79 25 2c 64 25 |B%!&C,fy%,Ky%,d%|
000123e0 2c 71 25 2c 78 25 29 3a f2 6a 79 28 64 25 2c 71 |,q%,x%):.jy(d%,q|
000123f0 25 2c 78 25 2c 50 79 25 29 3a 41 5f 25 3d a4 46 |%,x%,Py%):A_%=.F|
00012400 28 66 79 25 2c 4b 79 25 2c 64 25 2c 71 25 2c 78 |(fy%,Ky%,d%,q%,x|
00012410 25 29 3a c8 95 3f 63 25 3c 3e 26 42 3a 41 24 2b |%):..?c%<>&B:A$+|
00012420 3d bd 3f 63 25 3a 63 25 2b 3d 31 3a ce 3a 63 25 |=.?c%:c%+=1:.:c%|
00012430 2b 3d 31 3a c8 95 3f 63 25 3c 3e 26 42 3a 5a 24 |+=1:..?c%<>&B:Z$|
00012440 2b 3d bd 3f 63 25 3a 63 25 2b 3d 31 3a ce 3a 63 |+=.?c%:c%+=1:.:c|
00012450 25 2b 3d 31 3a c8 95 3f 63 25 3c 3e 26 42 3a 43 |%+=1:..?c%<>&B:C|
00012460 24 2b 3d bd 3f 63 25 3a 63 25 2b 3d 31 3a ce 0d |$+=.?c%:c%+=1:..|
00012470 06 89 23 f2 46 79 28 42 25 29 3a f2 4b 79 28 41 |..#.Fy(B%):.Ky(A|
00012480 5f 25 2c 50 79 25 2c 41 24 2c 5a 24 2c 43 24 29 |_%,Py%,A$,Z$,C$)|
00012490 3a e1 0d 06 8a 7a dd f2 6a 79 28 f8 64 25 2c f8 |:....z..jy(.d%,.|
000124a0 71 25 2c f8 78 25 2c 46 25 29 3a ea 6c 25 2c 63 |q%,.x%,F%):.l%,c|
000124b0 25 2c 72 25 3a 6c 25 3d 28 46 25 3e 3e 38 29 80 |%,r%:l%=(F%>>8).|
000124c0 26 46 3a 63 25 3d 28 46 25 3e 3e 26 43 29 80 26 |&F:c%=(F%>>&C).&|
000124d0 46 3a 72 25 3d 28 46 25 3e 3e 31 36 29 80 26 46 |F:r%=(F%>>16).&F|
000124e0 3a c8 95 72 25 3e 30 3a f2 46 28 64 25 2c 71 25 |:..r%>0:.F(d%,q%|
000124f0 2c 78 25 2c 2d 64 25 2b 31 2c 31 2c 30 29 3a 72 |,x%,-d%+1,1,0):r|
00012500 25 2d 3d 31 3a ce 3a c8 8e 6c 25 ca 0d 06 8b 44 |%-=1:.:..l%....D|
00012510 c9 31 2c 32 2c 33 3a 75 25 3d a4 48 28 64 25 2c |.1,2,3:u%=.H(d%,|
00012520 71 25 2c 78 25 29 3a c8 95 75 25 3c 3e 63 25 3a |q%,x%):..u%<>c%:|
00012530 64 25 2b 3d 31 3a 75 25 3d a4 6f 28 75 25 2b 31 |d%+=1:u%=.o(u%+1|
00012540 29 3a ce 3a 64 25 2b 3d 28 6c 25 2d 31 29 2a 37 |):.:d%+=(l%-1)*7|
00012550 0d 06 8c 51 c9 34 2c 35 2c 36 3a 64 25 3d a4 58 |...Q.4,5,6:d%=.X|
00012560 28 71 25 2c 78 25 29 3a 75 25 3d a4 48 28 64 25 |(q%,x%):u%=.H(d%|
00012570 2c 71 25 2c 78 25 29 3a c8 95 75 25 3c 3e 63 25 |,q%,x%):..u%<>c%|
00012580 3a 64 25 2d 3d 31 3a 75 25 3d a4 6f 28 75 25 2b |:d%-=1:u%=.o(u%+|
00012590 36 29 3a ce 3a 64 25 2d 3d 28 6c 25 2d 34 29 2a |6):.:d%-=(l%-4)*|
000125a0 37 0d 06 8d 07 cb 3a e1 0d 06 8e 45 dd f2 60 28 |7.....:....E..`(|
000125b0 f8 5f 25 2c f8 51 25 29 3a 21 4a 25 3d 66 25 3a |._%,.Q%):!J%=f%:|
000125c0 c8 99 26 34 30 30 43 42 2c 2c 4a 25 3a 5f 25 3d |..&400CB,,J%:_%=|
000125d0 4a 25 21 34 2b 37 31 34 2b 36 34 3a 51 25 3d 4a |J%!4+714+64:Q%=J|
000125e0 25 21 31 36 2d 34 38 30 2d 34 30 3a e1 0d 06 8f |%!16-480-40:....|
000125f0 85 dd f2 59 28 68 75 25 2c 72 25 29 3a ea 4b 5f |...Y(hu%,r%):.K_|
00012600 25 2c 4d 25 2c 4c 75 25 2c 6d 79 25 2c 7a 69 25 |%,M%,Lu%,my%,zi%|
00012610 2c 41 24 3a 4c 75 25 3d 72 25 3c 3e 30 3a 6d 79 |,A$:Lu%=r%<>0:my|
00012620 25 3d a3 3a 72 25 2b 3d bb a4 5a 28 66 25 2c 35 |%=.:r%+=..Z(f%,5|
00012630 29 3a 62 25 3d bb a4 5a 28 66 25 2c 33 29 3a 4b |):b%=..Z(f%,3):K|
00012640 5f 25 3d 28 a4 5a 28 66 25 2c 26 43 29 3d a4 41 |_%=(.Z(f%,&C)=.A|
00012650 28 22 70 6d 22 29 29 3a 4d 25 3d a4 58 28 43 5f |("pm")):M%=.X(C_|
00012660 25 2c 62 5f 25 29 3a e7 62 25 3d 26 43 8c 62 25 |%,b_%):.b%=&C.b%|
00012670 3d 30 0d 06 90 0f e7 4b 5f 25 8c 62 25 2b 3d 26 |=0.....K_%.b%+=&|
00012680 43 0d 06 91 2f 62 25 2b 3d 68 75 25 3a 68 75 25 |C.../b%+=hu%:hu%|
00012690 3d 68 75 25 3c 3e 30 3a e7 72 25 3c 30 8c 62 25 |=hu%<>0:.r%<0.b%|
000126a0 2d 3d 31 3a 72 25 2b 3d 36 30 3a 68 75 25 3d b9 |-=1:r%+=60:hu%=.|
000126b0 0d 06 92 1d e7 72 25 3e 35 39 8c 62 25 2b 3d 31 |.....r%>59.b%+=1|
000126c0 3a 72 25 2d 3d 36 30 3a 68 75 25 3d b9 0d 06 93 |:r%-=60:hu%=....|
000126d0 1d e7 62 25 3c 30 8c 57 5f 25 2d 3d 31 3a 62 25 |..b%<0.W_%-=1:b%|
000126e0 2b 3d 32 34 3a 6d 79 25 3d b9 0d 06 94 1e e7 62 |+=24:my%=......b|
000126f0 25 3e 32 33 8c 57 5f 25 2b 3d 31 3a 62 25 2d 3d |%>23.W_%+=1:b%-=|
00012700 32 34 3a 6d 79 25 3d b9 0d 06 95 17 e7 57 5f 25 |24:my%=......W_%|
00012710 3c 31 8c 43 5f 25 2d 3d 31 3a 6d 79 25 3d b9 0d |<1.C_%-=1:my%=..|
00012720 06 96 1e e7 57 5f 25 3e 4d 25 8c 43 5f 25 2b 3d |....W_%>M%.C_%+=|
00012730 31 3a 57 5f 25 3d 31 3a 6d 79 25 3d b9 0d 06 97 |1:W_%=1:my%=....|
00012740 1e e7 43 5f 25 3c 31 8c 62 5f 25 2d 3d 31 3a 43 |..C_%<1.b_%-=1:C|
00012750 5f 25 3d 26 43 3a 6d 79 25 3d b9 0d 06 98 1e e7 |_%=&C:my%=......|
00012760 43 5f 25 3e 26 43 8c 62 5f 25 2b 3d 31 3a 43 5f |C_%>&C.b_%+=1:C_|
00012770 25 3d 31 3a 6d 79 25 3d b9 0d 06 99 27 4d 25 3d |%=1:my%=....'M%=|
00012780 a4 58 28 43 5f 25 2c 62 5f 25 29 3a e7 57 5f 25 |.X(C_%,b_%):.W_%|
00012790 3d 30 84 57 5f 25 3e 4d 25 8c 57 5f 25 3d 4d 25 |=0.W_%>M%.W_%=M%|
000127a0 0d 06 9a 1e 7a 69 25 3d 28 62 25 3e 3d 26 43 29 |....zi%=(b%>=&C)|
000127b0 3a e7 62 25 3e 26 43 8c 62 25 2d 3d 26 43 0d 06 |:.b%>&C.b%-=&C..|
000127c0 9b 24 e7 6d 79 25 8c f2 41 28 66 25 2c 31 2c a4 |.$.my%..A(f%,1,.|
000127d0 51 28 57 5f 25 2c 43 5f 25 2c 62 5f 25 2c 2d 31 |Q(W_%,C_%,b_%,-1|
000127e0 29 29 0d 06 9c 0f e7 62 25 3d 30 8c 62 25 3d 26 |)).....b%=0.b%=&|
000127f0 43 0d 06 9d 15 e7 68 75 25 8c f2 41 28 66 25 2c |C.....hu%..A(f%,|
00012800 33 2c c3 62 25 29 0d 06 9e 29 41 24 3d c3 72 25 |3,.b%)...)A$=.r%|
00012810 3a e7 72 25 3c 26 41 8c 41 24 3d 22 30 22 2b 41 |:.r%<&A.A$="0"+A|
00012820 24 3a e7 72 25 3d 30 8c 41 24 3d 22 30 30 22 0d |$:.r%=0.A$="00".|
00012830 06 9f 14 e7 4c 75 25 8c f2 41 28 66 25 2c 35 2c |....Lu%..A(f%,5,|
00012840 41 24 29 0d 06 a0 0e e7 7a 69 25 3c 3e 4b 5f 25 |A$).....zi%<>K_%|
00012850 8c 0d 06 a1 20 e7 7a 69 25 8c 41 24 3d a4 41 28 |.... .zi%.A$=.A(|
00012860 22 70 6d 22 29 8b 41 24 3d a4 41 28 22 61 6d 22 |"pm").A$=.A("am"|
00012870 29 0d 06 a2 10 f2 41 28 66 25 2c 26 43 2c 41 24 |).....A(f%,&C,A$|
00012880 29 0d 06 a3 07 cd 3a e1 0d 06 a4 33 dd f2 56 5f |).....:....3..V_|
00012890 3a ea 53 25 2c 43 25 2c 42 25 3a 43 25 3d 2d 31 |:.S%,C%,B%:C%=-1|
000128a0 3a 4d 5f 25 3d 2d 31 3a 7a 25 3d 8e 78 24 3a e7 |:M_%=-1:z%=.x$:.|
000128b0 ac 6c 4a 25 80 7a 25 3c 3e 30 8c 0d 06 a5 3d c8 |.lJ%.z%<>0....=.|
000128c0 95 ac c5 23 7a 25 3a 53 25 3d bb be 23 7a 25 3a |...#z%:S%=..#z%:|
000128d0 42 25 3d a4 77 28 77 5f 25 2c 53 25 2b 31 2c b9 |B%=.w(w_%,S%+1,.|
000128e0 29 3a e7 43 25 3c 3e 2d 31 8c 43 25 21 34 3d 42 |):.C%<>-1.C%!4=B|
000128f0 25 8b 4d 5f 25 3d 42 25 0d 06 a6 3a 21 42 25 3d |%.M_%=B%...:!B%=|
00012900 43 25 3a 42 25 21 38 3d 53 25 3a c8 99 26 43 2c |C%:B%!8=S%:..&C,|
00012910 34 2c 7a 25 2c 42 25 2b 26 43 2c 53 25 2d 26 43 |4,z%,B%+&C,S%-&C|
00012920 3a 43 25 3d 42 25 3a e7 73 5f 25 8c f2 64 28 ac |:C%=B%:.s_%..d(.|
00012930 31 29 0d 06 a7 16 ce 3a e7 4d 5f 25 3c 3e 2d 31 |1).....:.M_%<>-1|
00012940 8c 42 25 21 34 3d 2d 31 0d 06 a8 0d d9 23 7a 25 |.B%!4=-1.....#z%|
00012950 3a 7a 25 3d 30 0d 06 a9 07 cd 3a e1 0d 06 aa 39 |:z%=0.....:....9|
00012960 dd f2 76 4a 28 f8 63 25 2c f8 72 25 2c 51 25 29 |..vJ(.c%,.r%,Q%)|
00012970 3a ea 5f 6c 25 2c 5f 79 25 3a 5f 6c 25 3d 28 51 |:._l%,_y%:_l%=(Q|
00012980 25 2b 31 29 83 31 39 3a e7 5f 6c 25 3d 30 8c 5f |%+1).19:._l%=0._|
00012990 6c 25 3d 31 39 0d 06 ab 41 5f 79 25 3d 28 94 28 |l%=19...A_y%=(.(|
000129a0 31 2e 32 35 2a 51 25 29 2b 36 29 83 37 3a 63 25 |1.25*Q%)+6).7:c%|
000129b0 3d 59 25 28 5f 6c 25 2d 31 2c 5f 79 25 29 3a e7 |=Y%(_l%-1,_y%):.|
000129c0 63 25 3e 33 31 8c 63 25 2d 3d 33 31 3a 72 25 3d |c%>31.c%-=31:r%=|
000129d0 34 8b 72 25 3d 33 0d 06 ac 05 e1 0d 06 ad 3e dd |4.r%=3........>.|
000129e0 f2 41 6c 3a ea 5f 69 25 2c 41 69 25 2c 64 25 2c |.Al:._i%,Ai%,d%,|
000129f0 75 25 2c 63 25 3a de 59 25 28 31 38 2c 36 29 3a |u%,c%:.Y%(18,6):|
00012a00 e3 5f 69 25 3d 31 b8 31 39 3a e3 41 69 25 3d 30 |._i%=1.19:.Ai%=0|
00012a10 b8 36 3a c8 8e 5f 69 25 ca 0d 06 ae 0c c9 26 45 |.6:.._i%......&E|
00012a20 3a 75 25 3d 31 0d 06 af 0b c9 33 3a 75 25 3d 32 |:u%=1.....3:u%=2|
00012a30 0d 06 b0 0c c9 26 42 3a 75 25 3d 34 0d 06 b1 0c |.....&B:u%=4....|
00012a40 c9 31 39 3a 75 25 3d 36 0d 06 b2 0b c9 38 3a 75 |.19:u%=6.....8:u|
00012a50 25 3d 37 0d 06 b3 0c c9 31 36 3a 75 25 3d 39 0d |%=7.....16:u%=9.|
00012a60 06 b4 0c c9 35 3a 75 25 3d 26 41 0d 06 b5 0d c9 |....5:u%=&A.....|
00012a70 26 44 3a 75 25 3d 26 43 0d 06 b6 0c c9 32 3a 75 |&D:u%=&C.....2:u|
00012a80 25 3d 26 44 0d 06 b7 0d c9 26 41 3a 75 25 3d 26 |%=&D.....&A:u%=&|
00012a90 46 0d 06 b8 0d c9 31 38 3a 75 25 3d 31 37 0d 06 |F.....18:u%=17..|
00012aa0 b9 0c c9 37 3a 75 25 3d 31 38 0d 06 ba 0d c9 26 |...7:u%=18.....&|
00012ab0 46 3a 75 25 3d 32 30 0d 06 bb 0c c9 34 3a 75 25 |F:u%=20.....4:u%|
00012ac0 3d 32 31 0d 06 bc 0d c9 26 43 3a 75 25 3d 32 33 |=21.....&C:u%=23|
00012ad0 0d 06 bd 0c c9 31 3a 75 25 3d 32 34 0d 06 be 0c |.....1:u%=24....|
00012ae0 c9 39 3a 75 25 3d 32 36 0d 06 bf 0d c9 31 37 3a |.9:u%=26.....17:|
00012af0 75 25 3d 32 37 0d 06 c0 0c c9 36 3a 75 25 3d 32 |u%=27.....6:u%=2|
00012b00 38 0d 06 c1 3f cb 3a 64 25 3d 32 31 2b 75 25 3a |8...?.:d%=21+u%:|
00012b10 6e 24 3d a4 41 28 22 4d 6f 6e 33 22 29 2b 22 20 |n$=.A("Mon3")+" |
00012b20 22 3a f5 64 25 2b 3d 31 3a 63 25 3d 35 2d 28 64 |":.d%+=1:c%=5-(d|
00012b30 25 83 37 29 3a e7 63 25 3d 2d 31 8c 63 25 3d 36 |%.7):.c%=-1.c%=6|
00012b40 0d 06 c2 3c fd 63 25 3d 41 69 25 3a 59 25 28 5f |...<.c%=Ai%:Y%(_|
00012b50 69 25 2d 31 2c 41 69 25 29 3d 64 25 3a e7 64 25 |i%-1,Ai%)=d%:.d%|
00012b60 3e 33 31 8c 64 25 2d 3d 33 31 3a 6e 24 3d a4 41 |>31.d%-=31:n$=.A|
00012b70 28 22 4d 6f 6e 34 22 29 2b 22 20 22 0d 06 c3 09 |("Mon4")+" "....|
00012b80 ed 3a ed 3a e1 0d 06 c4 91 dd f2 71 75 3a 73 79 |.:.:.......qu:sy|
00012b90 25 3d 32 3a 56 69 25 3d 26 42 3a 54 4a 25 3d b9 |%=2:Vi%=&B:TJ%=.|
00012ba0 3a 62 4a 25 3d 31 3a 53 69 25 3d a4 57 79 28 a4 |:bJ%=1:Si%=.Wy(.|
00012bb0 41 28 22 47 59 4d 22 29 2b a4 4f 79 28 22 47 59 |A("GYM")+.Oy("GY|
00012bc0 4d 22 2c 31 2c 32 2c 22 5c 22 2c 22 22 29 2b 22 |M",1,2,"\","")+"|
00012bd0 5c 22 29 3a 6a 69 25 3d a4 70 79 28 53 69 25 2c |\"):ji%=.py(Si%,|
00012be0 32 2c 22 22 2c 35 2c 22 41 30 2d 39 22 29 3a 5a |2,"",5,"A0-9"):Z|
00012bf0 6c 25 3d a4 43 28 22 43 41 4d 22 2c 22 43 41 4d |l%=.C("CAM","CAM|
00012c00 22 2c 31 2c 33 29 3a f2 7a 28 5a 6c 25 2c 32 2c |",1,3):.z(Zl%,2,|
00012c10 53 69 25 29 3a e1 0d 06 c5 0c dd a4 4d 5f 3d 5a |Si%):.......M_=Z|
00012c20 6c 25 0d 06 c6 49 dd f2 43 4a 28 41 25 29 3a 42 |l%...I..CJ(A%):B|
00012c30 25 28 41 25 29 3d 26 37 37 64 3a 57 25 28 41 25 |%(A%)=&77d:W%(A%|
00012c40 29 3d 26 66 66 66 3a 53 25 28 41 25 29 3d 46 79 |)=&fff:S%(A%)=Fy|
00012c50 25 3a 4d 24 28 41 25 29 3d a4 41 28 22 43 61 6c |%:M$(A%)=.A("Cal|
00012c60 54 61 62 22 29 3a f2 57 4a 3a e1 0d 06 c7 2d dd |Tab"):.WJ:....-.|
00012c70 f2 53 4a 28 78 25 2c 68 25 2c 61 25 2c 4b 25 29 |.SJ(x%,h%,a%,K%)|
00012c80 3a e7 73 79 25 3d 31 8c f2 4a 4a 28 78 25 2c 68 |:.sy%=1..JJ(x%,h|
00012c90 25 2c 61 25 2c 4b 25 29 0d 06 c8 1b e7 73 79 25 |%,a%,K%).....sy%|
00012ca0 3d 32 8c f2 50 75 28 78 25 2c 68 25 2c 61 25 2c |=2..Pu(x%,h%,a%,|
00012cb0 4b 25 29 0d 06 c9 05 e1 0d 06 ca 1b dd f2 6e 5f |K%)...........n_|
00012cc0 28 70 25 2c 4f 69 25 29 3a ea 41 25 3a c8 8e 21 |(p%,Oi%):.A%:..!|
00012cd0 70 25 ca 0d 06 cb 25 c9 30 2c 31 3a 41 25 3d 73 |p%....%.0,1:A%=s|
00012ce0 79 25 3a 73 79 25 3d 21 70 25 2b 31 3a 75 4a 25 |y%:sy%=!p%+1:uJ%|
00012cf0 3d 73 79 25 3c 3e 41 25 0d 06 cc 0e c9 32 3a c8 |=sy%<>A%.....2:.|
00012d00 8e 70 25 21 34 ca 0d 06 cd 25 c9 30 3a e7 76 25 |.p%!4....%.0:.v%|
00012d10 3c 3e 46 79 25 2b 28 73 79 25 3d 31 29 8c 76 25 |<>Fy%+(sy%=1).v%|
00012d20 3d 46 79 25 3a 74 25 3d 4f 69 25 0d 06 ce 29 c9 |=Fy%:t%=Oi%...).|
00012d30 31 3a e7 76 25 3c 3e 46 79 25 2b 31 2b 28 73 79 |1:.v%<>Fy%+1+(sy|
00012d40 25 3d 31 29 8c 76 25 3d 46 79 25 2b 31 3a 74 25 |%=1).v%=Fy%+1:t%|
00012d50 3d 4f 69 25 0d 06 cf 14 c9 32 3a 41 25 3d bb 24 |=Oi%.....2:A%=.$|
00012d60 6a 69 25 3a c8 8e b9 ca 0d 06 d0 2c c9 41 25 3c |ji%:.......,.A%<|
00012d70 26 37 37 64 3a f2 42 28 a4 4f 28 22 45 72 72 4d |&77d:.B(.O("ErrM|
00012d80 69 6e 22 2c c3 26 37 37 64 2c 22 22 2c 22 22 2c |in",.&77d,"","",|
00012d90 22 22 29 29 0d 06 d1 2c c9 41 25 3e 26 66 66 66 |""))...,.A%>&fff|
00012da0 3a f2 42 28 a4 4f 28 22 45 72 72 4d 61 78 22 2c |:.B(.O("ErrMax",|
00012db0 c3 26 66 66 66 2c 22 22 2c 22 22 2c 22 22 29 29 |.&fff,"","",""))|
00012dc0 0d 06 d2 21 7f e7 76 25 3c 3e 41 25 2b 28 73 79 |...!..v%<>A%+(sy|
00012dd0 25 3d 31 29 8c 76 25 3d 41 25 3a 74 25 3d 4f 69 |%=1).v%=A%:t%=Oi|
00012de0 25 0d 06 d3 05 cb 0d 06 d4 05 cb 0d 06 d5 07 cb |%...............|
00012df0 3a e1 0d 06 d6 30 dd f2 4e 79 28 6c 25 29 3a 76 |:....0..Ny(l%):v|
00012e00 25 2b 3d 28 33 2d 73 79 25 29 2a 6c 25 3a e7 76 |%+=(3-sy%)*l%:.v|
00012e10 25 3c 42 25 28 74 25 29 8c 76 25 3d 42 25 28 74 |%<B%(t%).v%=B%(t|
00012e20 25 29 0d 06 d7 18 e7 76 25 3e 57 25 28 74 25 29 |%).....v%>W%(t%)|
00012e30 8c 76 25 3d 57 25 28 74 25 29 0d 06 d8 05 e1 0d |.v%=W%(t%)......|
00012e40 06 d9 33 dd f2 51 75 28 6e 25 2c 68 25 2c 5f 25 |..3..Qu(n%,h%,_%|
00012e50 2c 51 25 2c 6f 5f 25 2c 77 4a 25 29 3a ea 50 61 |,Q%,o_%,wJ%):.Pa|
00012e60 25 2c 64 25 2c 71 25 2c 78 25 3a e7 6e 25 3c 3e |%,d%,q%,x%:.n%<>|
00012e70 32 8c 0d 06 da 24 50 61 25 3d a4 6c 79 28 68 25 |2....$Pa%=.ly(h%|
00012e80 2c 5f 25 2c 51 25 2c 64 25 2c 71 25 2c 78 25 29 |,_%,Q%,d%,q%,x%)|
00012e90 3a e7 50 61 25 8c 0d 06 db 0d c8 8e 62 4a 25 2b |:.Pa%.......bJ%+|
00012ea0 6e 25 ca 0d 06 dc 28 c9 35 2c 33 3a f2 49 28 64 |n%....(.5,3:.I(d|
00012eb0 25 2c 71 25 2c 78 25 29 3a 74 25 3d a4 50 28 33 |%,q%,x%):t%=.P(3|
00012ec0 29 3a 76 25 3d 53 25 28 74 25 29 0d 06 dd 1b c9 |):v%=S%(t%).....|
00012ed0 36 2c 32 3a f2 73 28 64 25 2c 71 25 2c 78 25 29 |6,2:.s(d%,q%,x%)|
00012ee0 3a 51 4a 25 3d b9 0d 06 de 05 cb 0d 06 df 05 cd |:QJ%=...........|
00012ef0 0d 06 e0 07 cd 3a e1 0d 06 e1 1c dd a4 66 79 28 |.....:.......fy(|
00012f00 77 25 2c 43 79 25 29 3a 6b 25 3d b9 3a c8 8e 43 |w%,Cy%):k%=.:..C|
00012f10 79 25 ca 0d 06 e2 0f c9 34 31 34 3a f2 4e 79 28 |y%......414:.Ny(|
00012f20 31 29 0d 06 e3 10 c9 34 31 35 3a f2 4e 79 28 2d |1).....415:.Ny(-|
00012f30 31 29 0d 06 e4 1f c9 33 30 3a e7 76 25 3c 3e 46 |1).....30:.v%<>F|
00012f40 79 25 2b 28 73 79 25 3d 31 29 8c 76 25 3d 46 79 |y%+(sy%=1).v%=Fy|
00012f50 25 0d 06 e5 09 7f 6b 25 3d a3 0d 06 e6 09 cb 3a |%.....k%=......:|
00012f60 3d 6b 25 0d 06 e7 40 dd f2 47 4a 28 70 25 2c 73 |=k%...@..GJ(p%,s|
00012f70 25 29 3a e7 74 4a 25 3d 42 79 25 8c f2 62 28 73 |%):.tJ%=By%..b(s|
00012f80 25 2c 36 2c 21 70 25 29 3a f2 48 28 42 79 25 2c |%,6,!p%):.H(By%,|
00012f90 30 2c 2d 31 29 3a f2 4a 28 42 79 25 2c 21 70 25 |0,-1):.J(By%,!p%|
00012fa0 2c 31 29 0d 06 e8 05 e1 0d 06 e9 16 dd a4 4c 79 |,1)...........Ly|
00012fb0 28 65 25 2c 77 25 2c 43 79 25 29 3a 3d a3 0d 06 |(e%,w%,Cy%):=...|
00012fc0 ea 35 dd f2 65 5f 28 7a 25 29 3a d5 23 7a 25 2c |.5..e_(z%):.#z%,|
00012fd0 73 79 25 3a d5 23 7a 25 2c 54 4a 25 2b 35 3a d5 |sy%:.#z%,TJ%+5:.|
00012fe0 23 7a 25 2c 21 53 4a 25 3a d5 23 7a 25 2c 62 4a |#z%,!SJ%:.#z%,bJ|
00012ff0 25 3a e1 0d 06 eb 34 dd f2 71 4a 28 7a 25 29 3a |%:....4..qJ(z%):|
00013000 73 79 25 3d 9a 23 7a 25 3a 54 4a 25 3d 9a 23 7a |sy%=.#z%:TJ%=.#z|
00013010 25 2d 35 3a 56 69 25 3d 9a 23 7a 25 3a 62 4a 25 |%-5:Vi%=.#z%:bJ%|
00013020 3d 9a 23 7a 25 3a e1 0d 06 ec 20 dd f2 78 75 28 |=.#z%:.... ..xu(|
00013030 73 25 2c 53 79 25 2c 70 25 2c 5f 25 2c 51 25 29 |s%,Sy%,p%,_%,Q%)|
00013040 3a c8 8e 53 79 25 ca 0d 06 ed 1f c9 37 2c 31 2c |:..Sy%......7,1,|
00013050 34 2c 35 3a e7 6e 25 3c 3e 32 f2 5a 28 73 25 2c |4,5:.n%<>2.Z(s%,|
00013060 53 79 25 2c 31 29 0d 06 ee 3b c9 36 3a f2 48 28 |Sy%,1)...;.6:.H(|
00013070 42 79 25 2c 30 2c 2d 31 29 3a f2 4a 28 42 79 25 |By%,0,-1):.J(By%|
00013080 2c a4 70 28 73 25 2c 36 29 2c 31 29 3a f2 43 28 |,.p(s%,6),1):.C(|
00013090 42 79 25 2c 5f 25 2c 51 25 2c 73 25 2c 53 79 25 |By%,_%,Q%,s%,Sy%|
000130a0 29 0d 06 ef 8b c9 39 3a e7 a4 5a 28 73 25 2c 39 |).....9:..Z(s%,9|
000130b0 29 3d a4 41 28 22 53 65 74 41 6c 61 72 6d 22 29 |)=.A("SetAlarm")|
000130c0 2b 22 2f 22 2b a4 41 28 22 47 6f 74 6f 44 69 61 |+"/"+.A("GotoDia|
000130d0 72 79 22 29 8c f2 41 28 73 25 2c 39 2c a4 41 28 |ry")..A(s%,9,.A(|
000130e0 22 47 6f 74 6f 44 69 61 72 79 22 29 2b 22 2f 22 |"GotoDiary")+"/"|
000130f0 2b a4 41 28 22 53 65 74 41 6c 61 72 6d 22 29 29 |+.A("SetAlarm"))|
00013100 8b f2 41 28 73 25 2c 39 2c a4 41 28 22 53 65 74 |..A(s%,9,.A("Set|
00013110 41 6c 61 72 6d 22 29 2b 22 2f 22 2b a4 41 28 22 |Alarm")+"/"+.A("|
00013120 47 6f 74 6f 44 69 61 72 79 22 29 29 0d 06 f0 07 |GotoDiary"))....|
00013130 cb 3a e1 0d 06 f1 ba dd f2 52 75 28 73 25 29 3a |.:.......Ru(s%):|
00013140 f2 5a 28 73 25 2c 37 2c 2d 28 73 79 25 3d 31 29 |.Z(s%,7,-(sy%=1)|
00013150 29 3a f2 5a 28 73 25 2c 31 2c 2d 28 73 79 25 3d |):.Z(s%,1,-(sy%=|
00013160 32 29 29 3a f2 62 28 73 25 2c 36 2c 21 53 4a 25 |2)):.b(s%,6,!SJ%|
00013170 29 3a f2 5a 28 73 25 2c 34 2c 2d ac 54 4a 25 29 |):.Z(s%,4,-.TJ%)|
00013180 3a f2 5a 28 73 25 2c 35 2c 2d 54 4a 25 29 3a e7 |:.Z(s%,5,-TJ%):.|
00013190 62 4a 25 3d 31 8c f2 41 28 73 25 2c 39 2c a4 41 |bJ%=1..A(s%,9,.A|
000131a0 28 22 47 6f 74 6f 44 69 61 72 79 22 29 2b 22 2f |("GotoDiary")+"/|
000131b0 22 2b a4 41 28 22 53 65 74 41 6c 61 72 6d 22 29 |"+.A("SetAlarm")|
000131c0 29 8b f2 41 28 73 25 2c 39 2c a4 41 28 22 53 65 |)..A(s%,9,.A("Se|
000131d0 74 41 6c 61 72 6d 22 29 2b 22 2f 22 2b a4 41 28 |tAlarm")+"/"+.A(|
000131e0 22 47 6f 74 6f 44 69 61 72 79 22 29 29 0d 06 f2 |"GotoDiary"))...|
000131f0 05 e1 0d 06 f3 22 dd f2 4b 4a 28 73 25 29 3a e7 |....."..KJ(s%):.|
00013200 a4 4d 28 73 25 2c 37 29 8c 73 79 25 3d 31 8b 73 |.M(s%,7).sy%=1.s|
00013210 79 25 3d 32 0d 06 f4 57 54 4a 25 3d a4 4d 28 73 |y%=2...WTJ%=.M(s|
00013220 25 2c 35 29 3a 21 53 4a 25 3d a4 70 28 73 25 2c |%,5):!SJ%=.p(s%,|
00013230 36 29 3a e7 a4 5a 28 73 25 2c 39 29 3d a4 41 28 |6):..Z(s%,9)=.A(|
00013240 22 47 6f 74 6f 44 69 61 72 79 22 29 2b 22 2f 22 |"GotoDiary")+"/"|
00013250 2b a4 41 28 22 53 65 74 41 6c 61 72 6d 22 29 8c |+.A("SetAlarm").|
00013260 62 4a 25 3d 31 8b 62 4a 25 3d 32 0d 06 f5 05 e1 |bJ%=1.bJ%=2.....|
00013270 0d 06 f6 3f dd a4 6c 79 28 68 25 2c 5f 25 2c 51 |...?..ly(h%,_%,Q|
00013280 25 2c f8 64 25 2c f8 71 25 2c f8 78 25 29 3a ea |%,.d%,.q%,.x%):.|
00013290 70 5f 25 2c 6f 79 25 2c 68 79 25 2c 76 79 25 2c |p_%,oy%,hy%,vy%,|
000132a0 7a 75 25 2c 77 75 25 3a e7 73 79 25 3d 31 8c 0d |zu%,wu%:.sy%=1..|
000132b0 06 f7 da 70 5f 25 3d 28 6a 25 2d 33 32 29 2f 32 |...p_%=(j%-32)/2|
000132c0 3a 6f 79 25 3d 28 6d 25 2d 35 30 29 2f 36 3a 68 |:oy%=(m%-50)/6:h|
000132d0 79 25 3d 70 5f 25 2f 37 3a 76 79 25 3d 28 6f 79 |y%=p_%/7:vy%=(oy|
000132e0 25 2d 26 41 29 2f 38 3a 78 25 3d 76 25 2b 94 68 |%-&A)/8:x%=v%+.h|
000132f0 25 3a 71 25 3d 32 2a 28 28 2d 51 25 2d 35 30 29 |%:q%=2*((-Q%-50)|
00013300 81 6f 79 25 29 2b 28 28 5f 25 2d 32 30 29 81 28 |.oy%)+((_%-20).(|
00013310 28 6a 25 2d 38 29 2f 32 29 29 3a 5f 25 2d 3d 32 |(j%-8)/2)):_%-=2|
00013320 30 2b 28 71 25 83 32 29 2a 28 28 6a 25 2d 38 29 |0+(q%.2)*((j%-8)|
00013330 2f 32 29 3a 51 25 3d 2d 51 25 2d 35 30 2d 28 28 |/2):Q%=-Q%-50-((|
00013340 71 25 81 32 29 2a 6f 79 25 29 3a 71 25 2b 3d 31 |q%.2)*oy%):q%+=1|
00013350 3a 7a 75 25 3d 28 5f 25 2b 68 79 25 2a 28 31 2d |:zu%=(_%+hy%*(1-|
00013360 30 2e 31 32 29 2b 32 30 2a 94 68 25 29 81 68 79 |0.12)+20*.h%).hy|
00013370 25 3a 77 75 25 3d 28 28 51 25 2d 26 41 2d 76 79 |%:wu%=((Q%-&A-vy|
00013380 25 29 81 76 79 25 29 2d 31 0d 06 f8 2b e7 7a 75 |%).vy%)-1...+.zu|
00013390 25 3e 30 80 7a 75 25 3c 38 8c 64 25 3d 31 2b 7a |%>0.zu%<8.d%=1+z|
000133a0 75 25 2b 37 2a 77 75 25 2d a4 48 28 31 2c 71 25 |u%+7*wu%-.H(1,q%|
000133b0 2c 78 25 29 0d 06 f9 f7 cc 3a 70 5f 25 3d 28 6a |,x%).....:p_%=(j|
000133c0 25 2d 34 30 29 2f 32 3a 6f 79 25 3d 28 6d 25 2d |%-40)/2:oy%=(m%-|
000133d0 35 30 29 2f 33 3a 68 79 25 3d 70 5f 25 2f 37 3a |50)/3:hy%=p_%/7:|
000133e0 76 79 25 3d 28 6f 79 25 2d 26 41 29 2f 38 3a 78 |vy%=(oy%-&A)/8:x|
000133f0 25 3d 76 25 3a 71 25 3d 32 2a 28 28 2d 51 25 2d |%=v%:q%=2*((-Q%-|
00013400 35 30 29 81 6f 79 25 29 2b 28 28 5f 25 2d 32 30 |50).oy%)+((_%-20|
00013410 29 81 28 28 6a 25 2d 38 29 2f 32 29 29 3a 5f 25 |).((j%-8)/2)):_%|
00013420 2d 3d 32 30 2b 28 71 25 83 32 29 2a 28 28 6a 25 |-=20+(q%.2)*((j%|
00013430 2d 38 29 2f 32 29 3a 51 25 3d 2d 51 25 2d 35 30 |-8)/2):Q%=-Q%-50|
00013440 2d 28 28 71 25 81 32 29 2a 6f 79 25 29 3a 71 25 |-((q%.2)*oy%):q%|
00013450 2b 3d 31 2b 36 2a 94 68 25 3a 7a 75 25 3d 28 5f |+=1+6*.h%:zu%=(_|
00013460 25 2d 68 79 25 2a 30 2e 32 35 2b 32 30 2a 94 68 |%-hy%*0.25+20*.h|
00013470 25 29 81 68 79 25 2d 31 3a 77 75 25 3d 51 25 81 |%).hy%-1:wu%=Q%.|
00013480 76 79 25 3a e7 77 75 25 3e 30 80 77 75 25 3c 38 |vy%:.wu%>0.wu%<8|
00013490 8c 64 25 3d 31 2b 77 75 25 2b 37 2a 7a 75 25 2d |.d%=1+wu%+7*zu%-|
000134a0 a4 48 28 31 2c 71 25 2c 78 25 29 0d 06 fa 0e cd |.H(1,q%,x%).....|
000134b0 3a e7 78 25 3c 3e 2d 31 8c 0d 06 fb 31 e7 64 25 |:.x%<>-1....1.d%|
000134c0 3c 3d 30 84 64 25 3e a4 58 28 71 25 2c 78 25 29 |<=0.d%>.X(q%,x%)|
000134d0 84 78 25 3e 26 66 66 66 8c 78 25 3d 2d 31 3a 64 |.x%>&fff.x%=-1:d|
000134e0 25 3d 2d 31 3a 71 25 3d 2d 31 0d 06 fc 0d cd 3a |%=-1:q%=-1.....:|
000134f0 3d 28 78 25 3e 30 29 0d 06 fd 83 dd f2 50 75 28 |=(x%>0)......Pu(|
00013500 78 25 2c 68 25 2c 61 25 2c 4b 25 29 3a ea 71 25 |x%,h%,a%,K%):.q%|
00013510 2c 75 25 2c 63 25 2c 68 79 25 2c 76 79 25 2c 66 |,u%,c%,hy%,vy%,f|
00013520 61 25 2c 41 24 2c 72 25 2c 41 25 2c 42 25 2c 43 |a%,A$,r%,A%,B%,C|
00013530 25 2c 44 25 2c 45 25 2c 46 25 2c 47 25 2c 48 25 |%,D%,E%,F%,G%,H%|
00013540 3a 70 5f 25 3d 28 6a 25 2d 34 30 29 2f 32 3a 6f |:p_%=(j%-40)/2:o|
00013550 79 25 3d 28 6d 25 2d 35 30 29 2f 33 3a 76 79 25 |y%=(m%-50)/3:vy%|
00013560 3d 28 6f 79 25 2d 26 41 29 2f 38 3a 68 79 25 3d |=(oy%-&A)/8:hy%=|
00013570 70 5f 25 2f 37 3a e7 68 25 8c 0d 06 fe 1a e7 78 |p_%/7:.h%......x|
00013580 25 3c 57 25 28 74 25 29 8c f2 52 28 31 2c 61 25 |%<W%(t%)..R(1,a%|
00013590 2c 4b 25 29 0d 06 ff 1b cc e7 78 25 3e 42 25 28 |,K%)......x%>B%(|
000135a0 74 25 29 8c f2 52 28 30 2c 61 25 2c 4b 25 29 0d |t%)..R(0,a%,K%).|
000135b0 07 00 e5 cd 3a 42 75 25 3d a4 4a 28 22 48 6f 6d |....:Bu%=.J("Hom|
000135c0 65 72 74 6f 6e 2e 4d 65 64 69 75 6d 22 2c 32 30 |erton.Medium",20|
000135d0 2c 32 30 29 3a 79 75 25 3d a4 4a 28 22 48 6f 6d |,20):yu%=.J("Hom|
000135e0 65 72 74 6f 6e 2e 4d 65 64 69 75 6d 22 2c 26 44 |erton.Medium",&D|
000135f0 2c 26 44 29 3a 62 75 25 3d a4 4a 28 22 48 6f 6d |,&D):bu%=.J("Hom|
00013600 65 72 74 6f 6e 2e 4d 65 64 69 75 6d 22 2c 39 2c |erton.Medium",9,|
00013610 39 29 3a f2 56 28 30 2c 37 29 3a f2 4c 28 42 75 |9):.V(0,7):.L(Bu|
00013620 25 2c c3 78 25 2c 30 2c 61 25 2b 6a 25 2f 32 2c |%,.x%,0,a%+j%/2,|
00013630 4b 25 2d 38 29 3a e3 72 25 3d 31 b8 36 3a 71 25 |K%-8):.r%=1.6:q%|
00013640 3d 72 25 2b 36 2a 68 25 3a 5f 25 3d 28 72 25 2d |=r%+6*h%:_%=(r%-|
00013650 31 29 83 32 2a 28 6a 25 2d 38 29 2f 32 2b 32 30 |1).2*(j%-8)/2+20|
00013660 2d 32 30 2a 68 25 3a 51 25 3d 35 30 2b 28 72 25 |-20*h%:Q%=50+(r%|
00013670 2d 31 29 81 32 2a 6f 79 25 3a e7 a4 53 28 61 25 |-1).2*oy%:..S(a%|
00013680 2b 5f 25 2c 4b 25 2d 51 25 2c 70 5f 25 2c 2d 6f |+_%,K%-Q%,p_%,-o|
00013690 79 25 29 8c 0d 07 01 d8 f2 4c 28 79 75 25 2c a4 |y%)......L(yu%,.|
000136a0 55 28 71 25 2c 2d 31 29 2c 2d 31 2c 61 25 2b 5f |U(q%,-1),-1,a%+_|
000136b0 25 2c 4b 25 2d 51 25 29 3a 75 25 3d a4 48 28 31 |%,K%-Q%):u%=.H(1|
000136c0 2c 71 25 2c 78 25 29 2d 31 3a c8 99 26 34 30 30 |,q%,x%)-1:..&400|
000136d0 38 41 2c 62 75 25 3a 51 25 2b 3d 76 79 25 2d 36 |8A,bu%:Q%+=vy%-6|
000136e0 3a e3 63 25 3d 31 b8 37 3a c8 99 26 34 30 30 38 |:.c%=1.7:..&4008|
000136f0 36 2c 2c a4 63 28 63 25 2c 32 29 2c 31 3c 3c 34 |6,,.c(c%,2),1<<4|
00013700 2c 61 25 2b 5f 25 2c 4b 25 2d 51 25 2d 76 79 25 |,a%+_%,K%-Q%-vy%|
00013710 2a 63 25 3a ed 3a 5f 25 2b 3d 68 79 25 3a 41 25 |*c%:.:_%+=hy%:A%|
00013720 3d 4b 25 2d 51 25 3a 44 25 3d 61 25 2b 5f 25 3a |=K%-Q%:D%=a%+_%:|
00013730 46 25 3d a4 58 28 71 25 2c 78 25 29 3a 47 25 3d |F%=.X(q%,x%):G%=|
00013740 75 25 3a 48 25 3d 68 79 25 3a 42 25 3d 2d 76 79 |u%:H%=hy%:B%=-vy|
00013750 25 3a e7 78 25 3d 46 79 25 80 71 25 3d 62 79 25 |%:.x%=Fy%.q%=by%|
00013760 8c 43 25 3d 55 79 25 8b 43 25 3d 30 0d 07 02 68 |.C%=Uy%.C%=0...h|
00013770 e7 54 4a 25 80 43 25 3c 3e 30 8c 43 25 3d 30 3a |.TJ%.C%<>0.C%=0:|
00013780 c8 99 26 34 30 30 45 36 2c 21 53 4a 25 3a c8 93 |..&400E6,!SJ%:..|
00013790 61 25 2b 5f 25 2b 28 28 75 25 2d 31 2b 55 79 25 |a%+_%+((u%-1+Uy%|
000137a0 29 81 37 2b 30 2e 32 35 29 2a 68 79 25 2c 4b 25 |).7+0.25)*hy%,K%|
000137b0 2d 51 25 2d 28 28 75 25 2d 31 2b 55 79 25 29 83 |-Q%-((u%-1+Uy%).|
000137c0 37 2b 30 2e 32 35 29 2a 76 79 25 2c 68 79 25 2c |7+0.25)*vy%,hy%,|
000137d0 2d 76 79 25 0d 07 03 06 d6 4b 0d 07 04 21 cd 3a |-vy%.....K...!.:|
000137e0 ed 3a f2 51 28 42 75 25 29 3a f2 51 28 79 75 25 |.:.Q(Bu%):.Q(yu%|
000137f0 29 3a f2 51 28 62 75 25 29 3a e1 0d 07 05 89 dd |):.Q(bu%):......|
00013800 f2 4a 4a 28 76 25 2c 68 25 2c 61 25 2c 4b 25 29 |.JJ(v%,h%,a%,K%)|
00013810 3a ea 71 25 2c 75 25 2c 63 25 2c 68 79 25 2c 72 |:.q%,u%,c%,hy%,r|
00013820 61 25 2c 6f 79 25 2c 41 24 2c 41 25 2c 42 25 2c |a%,oy%,A$,A%,B%,|
00013830 43 25 2c 44 25 2c 45 25 2c 46 25 2c 47 25 2c 48 |C%,D%,E%,F%,G%,H|
00013840 25 3a 70 5f 25 3d 28 6a 25 2d 33 32 29 2f 32 3a |%:p_%=(j%-32)/2:|
00013850 6f 79 25 3d 28 6d 25 2d 35 30 29 2f 36 3a 68 79 |oy%=(m%-50)/6:hy|
00013860 25 3d 70 5f 25 2f 37 3a 76 79 25 3d 28 6f 79 25 |%=p_%/7:vy%=(oy%|
00013870 2d 26 41 29 2f 38 3a 78 25 3d 76 25 2b 68 25 3a |-&A)/8:x%=v%+h%:|
00013880 e7 68 25 8c 0d 07 06 1c e7 76 25 2b 31 3c 57 25 |.h%......v%+1<W%|
00013890 28 74 25 29 8c f2 52 28 31 2c 61 25 2c 4b 25 29 |(t%)..R(1,a%,K%)|
000138a0 0d 07 07 1b cc e7 76 25 3e 42 25 28 74 25 29 8c |......v%>B%(t%).|
000138b0 f2 52 28 30 2c 61 25 2c 4b 25 29 0d 07 08 10 cd |.R(0,a%,K%).....|
000138c0 3a e7 78 25 3c 3d 26 66 66 66 8c 0d 07 09 d9 42 |:.x%<=&fff.....B|
000138d0 75 25 3d a4 4a 28 22 48 6f 6d 65 72 74 6f 6e 2e |u%=.J("Homerton.|
000138e0 4d 65 64 69 75 6d 22 2c 32 30 2c 32 30 29 3a 79 |Medium",20,20):y|
000138f0 75 25 3d a4 4a 28 22 48 6f 6d 65 72 74 6f 6e 2e |u%=.J("Homerton.|
00013900 4d 65 64 69 75 6d 22 2c 26 41 2c 26 41 29 3a 62 |Medium",&A,&A):b|
00013910 75 25 3d a4 4a 28 22 48 6f 6d 65 72 74 6f 6e 2e |u%=.J("Homerton.|
00013920 4d 65 64 69 75 6d 22 2c 37 2c 37 29 3a f2 56 28 |Medium",7,7):.V(|
00013930 30 2c 37 29 3a f2 4c 28 42 75 25 2c c3 78 25 2c |0,7):.L(Bu%,.x%,|
00013940 30 2c 61 25 2b 6a 25 2f 32 2c 4b 25 2d 38 29 3a |0,a%+j%/2,K%-8):|
00013950 e3 71 25 3d 31 b8 26 43 3a 5f 25 3d 28 71 25 2d |.q%=1.&C:_%=(q%-|
00013960 31 29 83 32 2a 28 6a 25 2d 38 29 2f 32 2b 32 30 |1).2*(j%-8)/2+20|
00013970 2d 32 30 2a 68 25 3a 51 25 3d 35 30 2b 28 71 25 |-20*h%:Q%=50+(q%|
00013980 2d 31 29 81 32 2a 6f 79 25 3a e7 a4 53 28 61 25 |-1).2*oy%:..S(a%|
00013990 2b 5f 25 2c 4b 25 2d 51 25 2c 70 5f 25 2c 2d 6f |+_%,K%-Q%,p_%,-o|
000139a0 79 25 29 8c 0d 07 0a ec f2 4c 28 79 75 25 2c a4 |y%)......L(yu%,.|
000139b0 55 28 71 25 2c 2d 31 29 2c 2d 31 2c 61 25 2b 5f |U(q%,-1),-1,a%+_|
000139c0 25 2c 4b 25 2d 51 25 29 3a 75 25 3d a4 48 28 31 |%,K%-Q%):u%=.H(1|
000139d0 2c 71 25 2c 78 25 29 2d 31 3a c8 99 26 34 30 30 |,q%,x%)-1:..&400|
000139e0 38 41 2c 62 75 25 3a 51 25 2b 3d 76 79 25 2b 34 |8A,bu%:Q%+=vy%+4|
000139f0 3a e3 63 25 3d 31 b8 37 3a c8 99 26 34 30 30 38 |:.c%=1.7:..&4008|
00013a00 36 2c 2c 22 20 20 22 2b a4 63 28 63 25 2c 32 29 |6,," "+.c(c%,2)|
00013a10 2c 31 3c 3c 34 2c 61 25 2b 5f 25 2b 68 79 25 2a |,1<<4,a%+_%+hy%*|
00013a20 63 25 2d 68 79 25 2c 4b 25 2d 51 25 2d 76 79 25 |c%-hy%,K%-Q%-vy%|
00013a30 3a ed 3a 51 25 2b 3d 76 79 25 3a 41 25 3d 61 25 |:.:Q%+=vy%:A%=a%|
00013a40 2b 5f 25 2d 68 79 25 3a 45 25 3d 4b 25 2d 51 25 |+_%-hy%:E%=K%-Q%|
00013a50 2d 76 79 25 3a 46 25 3d a4 58 28 71 25 2c 78 25 |-vy%:F%=.X(q%,x%|
00013a60 29 3a 47 25 3d 75 25 3a 48 25 3d 68 79 25 3a 42 |):G%=u%:H%=hy%:B|
00013a70 25 3d 76 79 25 3a e7 78 25 3d 46 79 25 80 71 25 |%=vy%:.x%=Fy%.q%|
00013a80 3d 62 79 25 8c 43 25 3d 55 79 25 8b 43 25 3d 30 |=by%.C%=Uy%.C%=0|
00013a90 0d 07 0b 6d e7 54 4a 25 80 43 25 3c 3e 30 8c 43 |...m.TJ%.C%<>0.C|
00013aa0 25 3d 30 3a c8 99 26 34 30 30 45 36 2c 21 53 4a |%=0:..&400E6,!SJ|
00013ab0 25 3a c8 93 61 25 2b 5f 25 2b 28 28 75 25 2d 31 |%:..a%+_%+((u%-1|
00013ac0 2b 55 79 25 29 83 37 2b 30 2e 31 32 29 2a 68 79 |+Uy%).7+0.12)*hy|
00013ad0 25 2c 4b 25 2d 51 25 2d 28 28 75 25 2d 31 2b 55 |%,K%-Q%-((u%-1+U|
00013ae0 79 25 29 81 37 2b 30 2e 31 38 29 2a 76 79 25 2c |y%).7+0.18)*vy%,|
00013af0 68 79 25 2a 30 2e 37 36 2c 2d 76 79 25 0d 07 0c |hy%*0.76,-vy%...|
00013b00 06 d6 59 0d 07 0d 07 cd 3a ed 0d 07 0e 1f cd 3a |..Y.....:......:|
00013b10 f2 51 28 42 75 25 29 3a f2 51 28 79 75 25 29 3a |.Q(Bu%):.Q(yu%):|
00013b20 f2 51 28 62 75 25 29 3a e1 0d 07 0f f9 dd f2 57 |.Q(bu%):.......W|
00013b30 4a 3a ea 50 25 2c 41 25 2c 44 69 25 2c 49 61 25 |J:.P%,A%,Di%,Ia%|
00013b40 2c 4a 2c 50 2c 52 2c 48 2c 53 2c 4f 2c 4d 2c 5f |,J,P,R,H,S,O,M,_|
00013b50 2c 5a 2c 54 2c 58 2c 42 2c 41 3a de 49 61 25 34 |,Z,T,X,B,A:.Ia%4|
00013b60 35 36 3a 4a 3d 26 44 3a 50 3d 26 45 3a 52 3d 26 |56:J=&D:P=&E:R=&|
00013b70 46 3a 48 3d 35 3a 53 3d 36 3a 4f 3d 30 3a 4d 3d |F:H=5:S=6:O=0:M=|
00013b80 33 3a 5f 3d 30 3a 5a 3d 34 3a 54 3d 37 3a 58 3d |3:_=0:Z=4:T=7:X=|
00013b90 38 3a 42 3d 39 3a 41 3d 26 41 3a e3 44 69 25 3d |8:B=9:A=&A:.Di%=|
00013ba0 30 b8 32 88 32 3a 50 25 3d 49 61 25 3a 5b 4f 50 |0.2.2:P%=Ia%:[OP|
00013bb0 54 44 69 25 3a 2e 59 3a 53 54 4d 46 44 28 4a 29 |TDi%:.Y:STMFD(J)|
00013bc0 21 2c 7b 50 7d 3a 4d 4f 56 20 58 2c 31 3a 4d 4f |!,{P}:MOV X,1:MO|
00013bd0 56 20 42 2c 32 3a 4d 4f 56 20 41 2c 23 30 3a 4d |V B,2:MOV A,#0:M|
00013be0 4f 56 32 2c 23 31 3c 3c 34 3a 41 44 52 31 2c 4c |OV2,#1<<4:ADR1,L|
00013bf0 3a 2e 7a 3a 41 44 44 20 53 2c 53 2c 23 31 3a 41 |:.z:ADD S,S,#1:A|
00013c00 44 44 20 41 2c 41 2c 23 31 3a 43 4d 50 20 42 2c |DD A,A,#1:CMP B,|
00013c10 41 3a 42 4c 45 51 20 44 3a 4d 55 4c 20 4d 2c 54 |A:BLEQ D:MUL M,T|
00013c20 2c 53 0d 07 10 d9 41 44 44 20 4d 2c 4d 2c 4f 3a |,S....ADD M,M,O:|
00013c30 53 57 49 20 26 34 30 30 38 36 3a 43 4d 50 20 42 |SWI &40086:CMP B|
00013c40 2c 41 3a 42 4c 45 51 20 49 3a 43 4d 50 20 53 2c |,A:BLEQ I:CMP S,|
00013c50 23 37 3a 53 55 42 45 51 20 5a 2c 5a 2c 58 3a ec |#7:SUBEQ Z,Z,X:.|
00013c60 51 20 53 2c 23 30 3a 41 44 44 31 2c 31 2c 23 38 |Q S,#0:ADD1,1,#8|
00013c70 3a 43 4d 50 20 41 2c 48 3a 42 4e 45 20 7a 3a 4c |:CMP A,H:BNE z:L|
00013c80 44 4d 46 44 28 4a 29 21 2c 7b 70 63 7d 3a 2e 4b |DMFD(J)!,{pc}:.K|
00013c90 3a 53 54 4d 46 44 28 4a 29 21 2c 7b 50 7d 3a 4d |:STMFD(J)!,{P}:M|
00013ca0 4f 56 20 58 2c 31 3a 4d 4f 56 20 42 2c 32 3a 4d |OV X,1:MOV B,2:M|
00013cb0 4f 56 20 41 2c 23 30 3a 4d 4f 56 32 2c 23 31 3c |OV A,#0:MOV2,#1<|
00013cc0 3c 34 3a 41 44 52 31 2c 4c 3a 2e 73 3a 41 44 44 |<4:ADR1,L:.s:ADD|
00013cd0 20 53 2c 53 2c 23 31 3a 41 44 44 20 41 2c 41 2c | S,S,#1:ADD A,A,|
00013ce0 23 31 3a 43 4d 50 20 42 2c 41 3a 42 4c 45 51 20 |#1:CMP B,A:BLEQ |
00013cf0 44 3a 4d 55 4c 20 5a 2c 58 2c 53 0d 07 11 df 41 |D:MUL Z,X,S....A|
00013d00 44 44 20 5a 2c 5a 2c 5f 3a 53 57 49 20 26 34 30 |DD Z,Z,_:SWI &40|
00013d10 30 38 36 3a 43 4d 50 20 42 2c 41 3a 42 4c 45 51 |086:CMP B,A:BLEQ|
00013d20 20 49 3a 43 4d 50 20 53 2c 23 37 3a 41 44 44 45 | I:CMP S,#7:ADDE|
00013d30 51 20 4d 2c 4d 2c 54 3a ec 51 20 53 2c 23 30 3a |Q M,M,T:.Q S,#0:|
00013d40 41 44 44 31 2c 31 2c 23 38 3a 43 4d 50 20 41 2c |ADD1,1,#8:CMP A,|
00013d50 48 3a 42 4e 45 20 73 3a 4c 44 4d 46 44 28 4a 29 |H:BNE s:LDMFD(J)|
00013d60 21 2c 7b 70 63 7d 3a 2e 44 3a 53 54 4d 46 44 28 |!,{pc}:.D:STMFD(|
00013d70 4a 29 21 2c 7b 50 2c 31 2d 32 7d 3a 4c 44 52 32 |J)!,{P,1-2}:LDR2|
00013d80 2c 53 4a 25 3a 42 20 71 3a 2e 49 3a 53 54 4d 46 |,SJ%:B q:.I:STMF|
00013d90 44 28 4a 29 21 2c 7b 50 2c 31 2d 32 7d 3a 4d 4f |D(J)!,{P,1-2}:MO|
00013da0 56 32 2c 23 37 3a 2e 71 3a 4d 4f 56 31 2c 23 30 |V2,#7:.q:MOV1,#0|
00013db0 3a 53 57 49 20 26 34 30 30 46 33 3a 4c 44 4d 46 |:SWI &400F3:LDMF|
00013dc0 44 28 4a 29 21 2c 7b 70 63 2c 31 2d 32 7d 3a 2e |D(J)!,{pc,1-2}:.|
00013dd0 53 4a 25 26 56 69 25 3a 2e 4c 0d 07 12 3c 5d e3 |SJ%&Vi%:.L...<].|
00013de0 41 25 3d 31 b8 33 31 3a 5b 4f 50 54 44 69 25 3a |A%=1.31:[OPTDi%:|
00013df0 3d c4 32 2d 32 2a 28 41 25 3c 26 41 29 2c 22 20 |=.2-2*(A%<&A)," |
00013e00 22 29 2b c3 41 25 2b bd 30 3a 41 4c 49 47 4e 3a |")+.A%+.0:ALIGN:|
00013e10 5d ed 3a ed 3a e1 0d ff |].:.:...|
00013e18 
.