Home » Archimedes archive » Acorn User » AU 1997-04 A.adf » Extras1 » MenuBar2/!MenuBar/!RunImage

MenuBar2/!MenuBar/!RunImage

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

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

Tape/disk: Home » Archimedes archive » Acorn User » AU 1997-04 A.adf » Extras1
Filename: MenuBar2/!MenuBar/!RunImage
Read OK:
File size: 8578 bytes
Load address: 0000
Exec address: 0000
File contents
    1REM>!RunImage
    2REMProduced by BasCompress v1.69 (04 Aug 1995)
    3G$="MenuBar":ONERRORPROCS_:END
    4z$="<MenuBar$Dir>":Zu%=0:PROChy(z$):PROCO_:IFFNJy(G$)THENPROCIy:END
    5PROC`y(A%):PROCA_:PROCry:PROCF_:PROCW_(b$):SYS&406C0:PROCJ_:PROCn(iJ%,0,-&64):PROCu_:PROCU:PROCiy(Cy%):X$=FNLy:J$=X$:IFJ$=""THENJ$="NewBar"
    6v$=FNu(J$):_%=FNj(v$,J$):IFNOT_%THENPROCN:END
    7SYS&406C0:PROCh(J$):PROCQ_:PROCg:SYS&406C2:IFZu%THEN
    8S$(0)="":S$(1)=""
    9ENDIF:ONERRORPROCv(1)
   10O_%=FALSE:REPEATPROCYy:UNTILO_%:PROCN:END
   11DEFPROChy(z$):LOCALg$,p$,V%,R%:g$=z$+".Overlays":SYS8,&D,g$TOV%:IFV%=0THENERROR0,"Can't find Overlay directory":END
   12p$=g$+".OvNames":SYS8,&D,p$TOV%:IFV%=1THEN
   13F%=OPENUP(p$):R%=0:WHILENOTEOF#F%:A$=GET$#F%:R%+=1:ENDWHILE:IFR%>0THEN
   14DIMS$(R%-1):PTR#F%=0:FORJ%=0TOR%-1:A$=GET$#F%:S$(J%)=g$+"."+A$:NEXT
   15ENDIF:CLOSE#F%:F%=0:IFR%THENOVERLAYS$()
   16Zu%=R%
   17ELSE:Zu%=0
   18ENDIF:ENDPROC
   19DEFPROCYy:oy%=0:SYS&400C7,oy%,A%TOll%:CASEll%OF
   20WHEN0:PROCM_
   21WHEN2:PROCFy(A%!0)
   22WHEN3:PROCG(A%!0)
   23WHEN6:PROCBy(A%)
   24WHEN7:PROCn_(A%,q%,Uy%,Su%)
   25WHEN8:PROCwy(A%)
   26WHEN9:PROCv_(A%)
   27WHEN17,18:PROCb_(A%)
   28WHEN19:PROCP
   29ENDCASE:ENDPROC
   30DEFPROCN:PROCIy:$A%="TASK":SYS&400DD,XJ%,A%!0:ENDPROC
   31DEFFNJy(G$):LOCALN%:N%=FALSE:IFFNXy(G$)>0THEN
   32N%=TRUE:z%=FNq(G$+" is already running",2)
   33ENDIF:=N%
   34DEFPROCM_:LOCALJ%,x%,M%:Fl%=MODE:IFFl%<>GJ%THEN
   35`%=1:PROCY(`%,w%):GJ%=MODE
   36ENDIF:IFd_%THENPROCuy
   37IF`J%THENPROCP:`J%=FALSE
   38IFby%THEN
   39IFN%(by%)ANDby%>=`%THEN
   40PROC_(Z%(by%))
   41ENDIF:by%+=1:IFby%>w%THEN
   42by%=FALSE:IFVy%THENPROCl(i_%,k_%,Dy%,G%)
   43ENDIF
   44ENDIF:IFcy%THEN
   45IFG%(cy%)ANDcy%>=`%THEN
   46PROCC(Z%(cy%))
   47ENDIF:cy%+=1:IFcy%>w%THENcy%=FALSE
   48ENDIF:IFsJ%THEN
   49IFIy%=1THENPROCK(G%,"name")
   50IFIy%=2THENPROCK(G%,"type")
   51sJ%=FALSE
   52ENDIF:IFW_%THEN
   53IFaJ%THEN
   54SYS&400DE,"Run "+V$:aJ%=FALSE
   55ELSE:IF`_%ANDFNo(V$)THEN
   56SYS&406C0:FORJ%=1TOW_%:PROCjy(J$(J%),V$):NEXT:W_%=FALSE:`_%=FALSE
   57ENDIF
   58ENDIF
   59ELSE:SYS&406C2
   60ENDIF:IFwy%<>dJ%THEN
   61IFwy%THEN
   62PROCZ(Fy%,1,&C):wy%=TRUE:dJ%=wy%
   63ELSE:PROCZ(Fy%,1,2):wy%=FALSE:dJ%=wy%
   64ENDIF
   65ENDIF:IFNOTFNYy(iJ%)THENwy%=FALSE
   66SYS&400CF,,C%:x%=C%!0:M%=C%!&C:IFBJ%<0THEN
   67IFFNVy(M%)ANDINKEY-2THEN
   68IF(x%+2)>=Au%THENPROCRy
   69IFx%=0THENPROCUy
   70ENDIF
   71ENDIF:ENDPROC
   72DEFFNA(d%):LOCALP_%,Hy%:SYS30,6,,,d%TO,,P_%;Hy%:IF(Hy%AND1)=1THEN
   73ERROR0,"Couldn't claim workspace from RMA"
   74ENDIF:=P_%
   75DEFPROCA(RETURNP_%):SYS&2001E,7,,P_%:P_%=0:ENDPROC
   76DEFPROCIy:PROCA(Ou%):PROCA(Ml%):PROCA(_u%):PROCA(ty%):PROCA(py%):PROCA(HJ%):PROCA(D_%):PROCA(L_%):PROCA(H_%):PROCA(bJ%):PROCA(zy%):PROCA(zl%):PROCA(u_%):PROCA(h_%):PROCA(gJ%):PROCA(s_%):PROCA(zJ%):PROCA(_J%):PROCA(b_%):PROCA(y_%):PROCA(tJ%):PROCA(Gu%):PROCA(UJ%):PROCA(ku%):PROCA(Gl%):PROCA(Yu%):PROCA(I%):PROCA(Bu%):PROCA(Cu%):PROCA(Ju%)
   77PROCA(Pu%):PROCA(Wu%):PROCA(x_%):PROCA(A):PROCA(iy%):PROCA(ey%):PROCA(o_%):PROCA(mu%):PROCA(V_%):PROCA(Ru%):ENDPROC
   78DEFPROCb_(A%):CASEA%!16OF
   79WHEN0:O_%=FNx
   80WHEN2:PROCe_(A%)
   81WHEN3:PROCy_(A%)
   82WHEN4
   83WHEN8:PROCsy(A%)
   84WHEN&400C0:PROCxy(A%)
   85WHEN&400C1:GJ%=-1
   86ENDCASE:ENDPROC
   87DEFPROCsy(A%):LOCALd%,Nl%,Rl%:IFl%THEN
   88d%=A%!0:Nl%=A%!4:Rl%=A%!20:A%!&C=A%!8:SYS&400E7,19,A%,Nl%:IFFNxTHEN
   89O_%=TRUE:IF(Rl%AND1)=0ORd%<24THEN
   90SYS&400D3,,A%:A%!24=508:SYS&400E7,8,A%,Nl%
   91ENDIF
   92ENDIF
   93ENDIF:ENDPROC
   94DEFFNx:LOCALU%:U%=TRUE:IFl%THEN
   95M$="Command: Quit MenuBar,...but changes have been made!":O$="Ignore changes,Cancel command,Save changes":z%=FNS(M$,O$,2):CASEz%OF
   96WHEN0:U%=FALSE
   97WHEN1:U%=TRUE
   98WHEN2:U%=FALSE
   99WHEN3:PROCL(J$):U%=TRUE
  100ENDCASE
  101ENDIF:=U%
  102DEFPROCh(J$):LOCALZ$,_%:_%=TRUE:IFJ$=""THENJ$="NewBar"
  103Z$=B$+"."+J$:IFFNZ(Z$)THEN
  104SYS8,5,Z$TO,,,,e%:zu%=FNRy:IFe%>zu%THEN
  105d%=FNw:_%=FN_(d%+e%-zu%):IFNOT_%THEN
  106M$="Not enough room to load data":z%=FNS(M$,"Cancel",3):PROCN:END
  107ENDIF
  108ENDIF:SYS8,&FF,Z$,D%,0:w%=?D%:T%=D%+e%:PROCky
  109ELSE:PROCQy(w%)
  110ENDIF:ENDPROC
  111DEFPROCQy(w%):LOCALJ%,O%::::u%=2:JJ%=y%*44+50+u%:sy%=FNO:Z_%=&f0+4:O%=0:FORJ%=1TOr%:PROCZ_(J%,O%):O%+=Z_%:NEXT:ENDPROC
  112DEFPROCZ_(N%,O%):ly%=O%:QJ%=sy%:t_%=sy%-JJ%:NJ%=ly%+&f0:w_%=0:r_%=0:B%=-&7FFFFFAE:SJ%=0:e_%=0:FJ%=&f0:CJ%=JJ%:A%(N%)=FN`(ly%,t_%,NJ%,QJ%,w_%,r_%,B%,m%,SJ%,e_%,FJ%,CJ%,""):B%=(Qy%<<28)+(xy%<<24)+&A11D:ry%=FNR(A%(N%),-2,0,&f0+4,50,B%,"",C%(N%),Bu%,&D):ENDPROC
  113DEFPROCc_:LOCALJ%,K%,L%,G%:oJ%=1:FORJ%=1TOw%:L%=Z%(J%):IFL%>oJ%THENoJ%=L%
  114NEXT:Tl%=oJ%-w%:IFTl%THEN
  115FORJ%=1TOw%:Wy%=FALSE:FORK%=1TOw%:L%=Z%(K%):IFL%=J%THENWy%=TRUE
  116NEXT:IFNOTWy%THENG%=J%
  117NEXT
  118ELSE:G%=w%+1
  119ENDIF:w%+=1:$C%(G%)="Menu "+STR$G%:Z%(w%)=G%:`%=1:PROCY(`%,w%):PROCC(G%):l%=TRUE:ENDPROC
  120DEFPROCy_(A%):LOCALJ%,p%,Q%,o%,_y%,A$,M%,H%,f%,V%,F$:M%=A%!20:H%=A%!24:S$=FNQ(A%+44):A%!&C=A%!8:A%!16=4:SYS&400E7,17,A%,A%!4:IFM%<1THENENDPROC
  121IFM%=Fy%THENPROCP_(A%):ENDPROC
  122G%=FNN(M%):o$=S$:IFINKEY-3THENPROCT_(H%,S$):ENDPROC
  123h%=FNF(G%):Ry%=h%+1:X%=FNM(h%):IFX%>0THEN
  124Wy%=FNHy(h%,Ry%,o$):IFWy%>0THENENDPROC
  125ENDIF:IFX%=y%THEN`J%=TRUE:ENDPROC
  126V%=A%!40:f%=FNU(S$):F$=FNJ(S$):Xy%=FALSE:a$=FNI(f%,V%,F$,0):IFXy%THENN%=&A913ELSEN%=&A113
  127B%=(m%<<28)+(Jy%<<24)+N%:Q%=50+(X%*44)+u%:`y%=FNL(Ry%):PROCL_(o$,Ry%):IFNOT_%THENENDPROC
  128PROCdy(`y%,h%,X%):IFNOT_%THENENDPROC
  129X%+=1:ky%+=1:o%=S%(G%,X%):$o%=F$:_y%=F%(G%,X%):$_y%="S"+a$:ry%=FNR(M%,&C,Q%,&f0-24,44-u%,B%,"",o%,_y%,56):SYS&400CF,,A%:c%=A%!16:IFc%>0THEN
  130PROCb(M%,ry%,c%):PROCB(G%,c%,1)
  131ELSE:PROCB(G%,X%,1)
  132ENDIF:IFIy%THENsJ%=TRUE
  133IFFNM(h%)=1THENPROCf(G%,dy%)
  134PROCO(M%):l%=TRUE:ENDPROC
  135DEFPROCT_(H%,S$):LOCALV%:V%=0:IFH%>0THENV$=FNC(G%,H%):V%=FNP(V$)
  136IFV%=8192THEN
  137`_%=TRUE:W_%+=1:aJ%=FNo(V$)=FALSE:J$(W_%)=S$
  138ELSE:`_%=FALSE
  139ENDIF:ENDPROC
  140DEFPROCP_(A%):LOCALS$,F$,V%,Z$,A$,_%,pu%,Sl%:_%=TRUE:pu%=FALSE:Sl%=FALSE:A$="":S$=FNQ(A%+44):F$=FNJ(S$):V%=FNP(S$):IFV%=8192ANDF$="!MenuBar"THEN
  141Z$=S$+".MenuData":IFFNZ(Z$)THEN
  142IFFNP(Z$)=&FFDTHENpu%=TRUE
  143ENDIF
  144ENDIF:IFCy%<Yy%THEN
  145IFr%>=&AANDy%>=30THENSl%=TRUE
  146ENDIF:IFpu%ANDSl%THEN
  147IFFNZ(B$+".MenuData")THEN
  148M$="'"+F$+"' already exists,OK to overwrite?":z%=FNS(M$,"Cancel,Overwrite",2):IFz%<>2THEN_%=FALSE
  149ENDIF:IF_%THEN
  150x$="A~C~DF~L~N~P~QR~S~T~V":OSCLI("Copy "+Z$+" "+B$+".MenuData "+x$):F%=OPENUP(B$+".MenuData"):PTR#F%=16:BPUT#F%,&B:BPUT#F%,0:BPUT#F%,2:BPUT#F%,7:BPUT#F%,0:CLOSE#F%:F%=0:PROCU:IFCy%=1THEN
  151X$="MenuData":PROCc(X$)
  152ENDIF:PROCR:PROCz("MenuData"):PROCTy("MenuData")
  153ENDIF
  154ELSE:PROCP
  155ENDIF:ENDPROC
  156DEFPROCf(Fi%,Li%):LOCALM%:M%=A%(Fi%):PROCM(M%,0,(Qy%<<28)+(Li%<<24)+&A13D):ENDPROC
  157DEFFNI(f%,V%,F$,d%):LOCALW$:CASEd%OF
  158WHEN0:W$="small_xxx"
  159WHEN1:W$="file_xxx"
  160ENDCASE:Xy%=FALSE:CASEf%OF
  161WHEN0:W$="notfound"
  162WHEN1,3:W$=FNIy(V%,d%)
  163WHEN2:W$=FNNy(F$,d%)
  164ENDCASE:=W$
  165DEFFNIy(V%,d%):LOCALN$,B%:Xy%=FALSE:CASEd%OF
  166WHEN0:N$="small_"+STR$~V%
  167WHEN1:N$="file_"+STR$~V%
  168ENDCASE:SYS&600E9,24,,N$TO;B%:IF(B%AND1)=0THEN=N$
  169IFd%=1THEN="file_xxx"
  170N$="file_"+STR$~V%:SYS&600E9,24,,N$TO;B%:IF(B%AND1)=0THENXy%=TRUE:=N$
  171="small_xxx"
  172DEFFNNy(P$,d%):LOCALN$,B%:Xy%=FALSE:IFLEFT$(P$,1)<>"!"THEN
  173CASEd%OF
  174WHEN0:="small_dir"
  175WHEN1:="directory"
  176ENDCASE
  177ENDIF:CASEd%OF
  178WHEN0:N$="sm"+P$
  179WHEN1:N$=P$
  180ENDCASE:SYS&600E9,24,,N$TO;B%:IF(B%AND1)=0THEN=N$
  181N$=P$:IFd%=0THEN
  182SYS&600E9,24,,N$TO;B%:IF(B%AND1)=0THENXy%=TRUE:=N$
  183ENDIF:CASEd%OF
  184WHEN0:="small_app"
  185WHEN1:="application"
  186ENDCASE:=""
  187DEFPROCq_(G%):LOCALJ%,M%:Vy%=FALSE:M%=A%(G%):Z%=FNa(M%):Q%=FNF(G%):X%=FNM(Q%):FORJ%=1TOX%:PROCJy(M%,J%):NEXT:PROCG(M%):IFZ%<w%THEN
  188FORJ%=Z%TOw%-1:Z%(J%)=Z%(J%+1):NEXT
  189ENDIF:h%=FNF(G%):Ry%=h%+1:PROCWy(Ry%):PROCWy(h%):w%-=1:`%=1:PROCY(`%,w%):l%=TRUE:ENDPROC
  190DEFPROCs(M%,s%):LOCALJ%:SYS&406C0:Vy%=FALSE:FORJ%=s%TO1STEP-1:p%=M%(J%):PROCI(M%,p%):NEXT:SYS&406C2:l%=TRUE:ENDPROC
  191DEFPROCI(M%,p%):LOCALJ%,X%,S$,B%,N%:IFp%<1THENENDPROC
  192G%=FNN(M%):h%=FNF(G%):Ry%=h%+1:X%=FNM(h%):PROCj_(h%,Ry%,p%):IFp%<y%THEN
  193FORJ%=p%TOX%-1:$S%(G%,J%)=$S%(G%,J%+1):$F%(G%,J%)=$F%(G%,J%+1):N%=FNV(G%,J%+1):PROCB(G%,J%,N%):A%!0=M%:A%!4=J%+1:SYS&400CE,,A%:B%=A%!24:PROCM(M%,J%,B%):NEXT
  194ENDIF:A%!0=M%:SYS&400CB,,A%:Dl%=A%!8:N_%=A%!16:Xl%=N_%-(X%*44)-(50)-u%:PROCJy(M%,X%):X%-=1:ky%-=1:IFX%=0THENPROCf(G%,xy%)
  195IF(Dl%-Xl%)<50THEN
  196PROCC(G%):PROC_(G%)
  197ENDIF:PROCO(M%):l%=TRUE:ENDPROC
  198DEFPROCCy(q%):LOCALJ%,K%,Sy%,yu%,kJ%,tl%,hl%:A_%=FALSE:SYS&400CF,,A%:x%=A%!0:v%=A%!4:Gy%=A%!&C:c%=A%!16:yu%=FNa(q%):kJ%=FNa(Gy%):IFkJ%<1ORq%=Gy%THENENDPROC
  199IFyu%<kJ%THENSy%=1ELSESy%=-1
  200FORJ%=yu%TO(kJ%-Sy%)STEPSy%:tl%=Z%(J%):hl%=Z%(J%+Sy%):PROCV_(tl%,hl%,J%,J%+Sy%):NEXT:l%=TRUE:ENDPROC
  201DEFFNa(M%):LOCALJ%,L%,N%:L%=FNN(M%):J%=1:REPEAT:N%=Z%(J%):J%+=1:UNTILN%=L%ORJ%>w%:IFN%=L%THENJ%-=1ELSEJ%=-1
  202=J%
  203DEFPROCV_(uu%,iu%,jy%,B_%):A%!0=A%(uu%):SYS&400CB,,A%:hu%=A%!4:A%!0=A%(iu%):SYS&400CB,,A%:Ku%=A%!4:A%!0=A%(uu%):SYS&400CB,,A%:A%!4=Ku%:A%!&C=Ku%+&f0:SYS&400C5,,A%:A%!0=A%(iu%):SYS&400CB,,A%:A%!4=hu%:A%!&C=hu%+&f0:SYS&400C5,,A%:Z%(jy%)=iu%:Z%(B_%)=uu%:ENDPROC
  204DEFPROCK_(M%,c%):LOCALJ%,K%,Vl%:s%=FNW(M%):G%=FNN(M%):L%=Z%(G%):Q%=FNF(L%):X%=FNM(Q%):IFc%=-1THENc%=X%+1
  205Vl%=c%>M%(s%):FORJ%=1TOs%:IFVl%THEN
  206K%=0:REPEATK%+=1:UNTILFNB(q%,K%):PROCb(M%,K%,c%-1)
  207ELSE:K%=X%+1:REPEATK%-=1:UNTILFNB(q%,K%):PROCb(M%,K%,c%)
  208ENDIF:NEXT:ENDPROC
  209DEFPROCb(q%,Uy%,c%):LOCALJ%,Sy%,j%,xl%,N%,Zy%,Q%,Ul%,X%:j%=FNN(q%):Q%=j%*2-1:IFc%=k%THENENDPROC
  210Q%=FNF(j%):X%=FNM(Q%):IFc%=0THENc%=X%
  211IFUy%<c%THENSy%=1ELSESy%=-1
  212FORJ%=Uy%TOc%STEPSy%:A%!0=q%:A%!4=J%:SYS&400CE,,A%:B%(J%)=A%!24:NEXT:xl%=FNY(Q%,Uy%):B%(0)=B%(Uy%):$S%(j%,0)=$S%(j%,Uy%):$F%(j%,0)=$F%(j%,Uy%):Ul%=FNV(j%,Uy%):FORJ%=Uy%TO(c%-Sy%)STEPSy%:Zy%=FNG(Q%)+(J%-1)*4:N%=FNY(Q%,J%+Sy%):!Zy%=N%:PROCM(q%,J%,B%(J%+Sy%))
  213$S%(j%,J%)=$S%(j%,J%+Sy%):$F%(j%,J%)=$F%(j%,J%+Sy%):N%=FNV(j%,J%+Sy%):PROCB(j%,J%,N%):NEXT:Zy%=FNG(Q%)+(c%-1)*4:!Zy%=xl%:PROCM(q%,c%,B%(0)):$S%(j%,c%)=$S%(j%,0):$F%(j%,c%)=$F%(j%,0):PROCB(j%,c%,Ul%):PROCW(q%,c%):PROCO(q%):l%=TRUE:ENDPROC
  214DEFFNCy(U%,Ty%):LOCALZy%:Hu%=(U%+8)DIV8:DIMZy%Hu%*Ty%:=Zy%
  215DEFPROCB(U%,Ty%,N%):LOCALF_%,LJ%,__%,oy%:F_%=(Ty%*Hu%)+(U%DIV8):LJ%=U%MOD8:oy%=2^LJ%:__%=?(xJ%+F_%):CASEN%OF
  216WHEN0:__%=__%AND(&FF-oy%)
  217WHEN1:__%=__%ORoy%
  218ENDCASE:?(xJ%+F_%)=__%:ENDPROC
  219DEFFNV(U%,Ty%):LOCALF_%,LJ%,Zy%,oy%:F_%=(Ty%*Hu%)+(U%DIV8):LJ%=U%MOD8:oy%=2^LJ%:Zy%=xJ%+F_%:=(?Zy%ANDoy%)DIVoy%
  220DEFPROCC(G%):A%!0=A%(G%):SYS&400CC,,A%:ny%=A%!16:A%!8=ny%-50+u%:A%!&C=A%!4+(A%!52-A%!44):A%!24=A%!16-A%!8:SYS&400C5,,A%:ENDPROC
  221DEFPROC_(G%):LOCALX%,M%,Q%:Q%=FNF(G%):M%=A%(G%):X%=FNM(Q%):IFX%=0THENENDPROC
  222A%!0=M%:SYS&400CB,,A%:ny%=A%!16:A%!8=ny%-(X%*44)-(50)-u%:A%!&C=A%!4+&f0:A%!28=-1:SYS&400C5,,A%:ENDPROC
  223DEFPROCx:G%()=TRUE:cy%=1:ENDPROC
  224DEFPROCw:N%()=TRUE:by%=1:ENDPROC
  225DEFPROCd:LOCALJ%,L%:A%!0=Fy%:SYS&400CB,,A%:A%!28=-1:SYS&400C5,,A%:FORJ%=1TOw%:L%=Z%(J%):IFL%>=`%THENPROCyy(L%)
  226NEXT:ENDPROC
  227DEFPROCyy(G%):LOCALM%:M%=A%(G%):A%!0=M%:SYS&400CB,,A%:A%!28=-1:SYS&400C5,,A%:ENDPROC
  228DEFPROCa:LOCALJ%,L%:FORJ%=1TOw%:L%=Z%(J%):IFL%>=`%THENPROCay(L%)
  229NEXT:A%!0=Fy%:SYS&400CB,,A%:A%!28=0:SYS&400C5,,A%:ENDPROC
  230DEFPROCay(G%):LOCALM%,n_%,ny%:M%=A%(G%):A%!0=M%:SYS&400CB,,A%:n_%=A%!8:ny%=A%!16:A%!28=-2:SYS&400C5,,A%:IFn_%=ny%-50+u%THENPROCC(G%)
  231ENDPROC
  232DEFFNu(D$):LOCALJ%,Z$,a_%,wl%,U%,A$:A$="":Z$=B$+"."+D$:IFFNZ(Z$)THEN
  233F%=OPENUP(Z$):PTR#F%=32:a_%=BGET#F%:wl%=BGET#F%:IFa_%>0THEN
  234REPEAT:U%=BGET#F%:IFU%>31THENU%-=wl%:A$+=CHR$U%
  235UNTILU%<32ORLENA$>9
  236ENDIF:CLOSE#F%:F%=0
  237ENDIF:=A$
  238DEFFNj(v$,D$):LOCALeu%,_%,M%:M%=Nu%:_%=TRUE:IFv$=""THEN=_%
  239SYS&406C2:$Yl%="MenuBar '"+D$+"'":PROCGy(M%):PROCS(M%,3,""):PROCt(M%,3):A%!0=M%:SYS&400CB,,A%:MOUSERECTANGLEA%!4,A%!8,A%!&C-A%!4,A%!16-A%!8:MOUSETOA%!&C-48,A%!8+48:REPEAT:Ky%=0:MJ%=FALSE:Lu%=FALSE:eu%=TRUE:ONERROROFF
  240REPEAT:SYS&400C7,,A%TOTy%:CASETy%OF
  241WHEN6:PROCBy(A%)
  242WHEN8:IFA%!24=&DTHENLu%=TRUE
  243IFA%!24=27THENMJ%=TRUE
  244WHEN17,18:IFA%!16=0THENMJ%=TRUE
  245ENDCASE:UNTILKy%>0ORMJ%ORLu%:IFKy%=2ORLu%THEN
  246IFFNi(M%,3)<>v$THEN
  247PROCP:PROCS(M%,3,""):PROCt(M%,3):eu%=FALSE
  248ENDIF
  249ENDIF:UNTILeu%:PROCG(M%):OSCLI("Pointer"):IF(Ky%=1ORMJ%)THEN_%=FALSE
  250=_%
  251DEFPROCky:LOCALJ%,L%,_%,R%,ju%,M%:LOCALERROR:ONERRORLOCALPROCh_(ERR):ENDPROC
  252ju%=TRUE:FORJ%=16TO23:IFD%?J%<>0THENju%=FALSE
  253NEXT:IFju%THEN
  254PROCm:PROCVy(4)
  255ELSE:R%=16:dy%=D%?R%:R%+=1:xy%=D%?R%:R%+=1:Qy%=D%?R%:R%+=1:Jy%=D%?R%:R%+=1:m%=D%?R%
  256ENDIF:PROCQy(w%):R%=1:FORJ%=1TOr%:Z%(J%)=D%?R%:R%+=1:NEXT:R%=48:FORJ%=1TOr%:$C%(J%)=$(D%+R%):R%+=16:NEXT:_%=TRUE:FORJ%=1TOw%:L%=Z%(J%):M%=A%(L%):PROCH_(L%,M%):NEXT:l%=FALSE:ENDPROC
  257DEFPROCH_(G%,M%):LOCALp%,S$,f%,V%,F$,A$,N$,Q%,o%,_y%,Xy%,N%,Wy%:X%=FNM(FNF(G%)):IFX%>0THEN
  258FORp%=1TOX%:S$=FNC(G%,p%):Wy%=FNZ(S$):IFNOTWy%THEN
  259F$=FNJ(S$):f%=0:V%=0:Xy%=FALSE:a$="notfound":N%=0
  260ELSE:F$=FNJ(S$):f%=FNU(S$):V%=FNP(S$):Xy%=FALSE:a$=FNI(f%,V%,F$,0):N%=1:CASEa$OF
  261WHEN"small_xxx","file_xxx","small_app","application":N%=0
  262ENDCASE
  263ENDIF:PROCB(G%,p%,N%):IFXy%THENN%=&A913ELSEN%=&A113
  264B%=(m%<<28)+(Jy%<<24)+N%:o%=S%(G%,p%):$o%=F$:_y%=F%(G%,p%):$_y%="S"+a$:Q%=50+(p%-1)*44+u%:ry%=FNR(M%,&C,Q%,&f0-24,44-u%,B%,"",o%,_y%,56):ky%+=1:NEXT
  265ENDIF:ENDPROC
  266DEFPROCh_(Ri%):IFINSTR(REPORT$,"Disc not found")>0THEN
  267IFy$=""THEN
  268z%=FNS("Disc not found","Kill task",3):PROCN:END
  269ELSE:M$="Disc not found,Load bar '"+y$+"'?":z%=FNS(M$,"Load bar,Kill task",2):CASEz%OF
  270WHEN0,1:D$=y$:PROCz(D$)
  271WHEN2:PROCN:END
  272ENDCASE
  273ENDIF
  274ELSE:PROCv(1)
  275ENDIF:ENDPROC
  276DEFFNW(M%):LOCALJ%,N%,Q%,X%:N%=0:G%=FNN(M%):Q%=FNF(G%):X%=FNM(Q%):FORJ%=1TOX%:IFFNB(M%,J%)THENN%+=1:M%(N%)=J%
  277NEXT:=N%
  278DEFPROCj:LOCALJ%,L%:FORJ%=1TOw%:L%=Z%(J%):PROCJ(L%):NEXT:ENDPROC
  279DEFPROCOy(G%):LOCALJ%,X%,M%,Q%,S$,V%:PROCj:Q%=FNF(G%):M%=A%(G%):X%=FNM(Q%):s%=FNW(M%):IFs%<X%THEN
  280FORJ%=1TOX%:IFNOTFNB(M%,J%)THENPROCF(M%,J%)
  281NEXT
  282ENDIF:ENDPROC
  283DEFPROCPy(G%):LOCALJ%,L%:FORJ%=1TOw%:L%=Z%(J%):IFL%<>G%THENPROCJ(L%)
  284NEXT:ENDPROC
  285DEFPROCJ(G%):LOCALJ%,X%,M%,Q%:Q%=FNF(G%):M%=A%(G%):X%=FNM(Q%):s%=FNW(M%):IFs%>0THEN
  286FORJ%=1TOX%:IFFNB(M%,J%)THENPROCW(M%,J%)
  287NEXT
  288ENDIF:ENDPROC
  289DEFFNJ(N$):LOCALT$,A$,U%:A$="":U%=LENN$:T$=MID$(N$,U%,1):WHILET$<>"."ANDT$<>":"ANDU%<>0:A$=T$+A$:U%-=1:T$=MID$(N$,U%,1):ENDWHILE:=A$
  290DEFFNz(N$):IFINSTR(N$,".")=0THEN=""
  291r$=FNJ(N$):=LEFT$(N$,LENN$-LENr$-1)
  292DEFPROC__(Z$):LOCALV%:V%=FNP(Z$):IFV%<4096THENZ$=FNz(Z$)
  293OSCLI"Filer_OpenDir "+Z$:ENDPROC
  294DEFFNQ(P_%):LOCALN%,A$:A$="":REPEAT:N%=?P_%:IFN%>31THENA$+=CHR$N%:P_%+=1
  295UNTILN%<32:=A$
  296DEFFNAy(S$):LOCALe%:SYS8,5,S$TO,,,,e%:=e%
  297DEFFNU(S$):LOCALV%,A$:V%=0:IFFNZ(S$)THEN
  298SYS8,5,S$TOV%:IFV%<0ORV%>3THENV%=0
  299ENDIF:=V%
  300DEFFNZ(S$):LOCALV%,Wy%:Wy%=TRUE:SYS&20008,5,S$TOV%;Hy%:IF(Hy%AND1)=1ORV%=0THENWy%=FALSE
  301=Wy%
  302DEFFNP(S$):LOCALV%,Zy%,f%,F$:V%=0:IFFNZ(S$)THEN
  303F$=FNJ(S$):f%=FNU(S$):CASETRUEOF
  304WHENf%=2ANDLEFT$(F$,1)="!":V%=8192
  305WHENf%=2ANDLEFT$(F$,1)<>"!":V%=4096
  306OTHERWISE:SYS8,5,S$TO,,Zy%:V%=(Zy%AND&FFF00)DIV256
  307ENDCASE
  308ENDIF:=V%
  309DEFFNDy(A$):LOCALJ%,C$,T$,U%,N%:C$=A$:IFLEFT$(A$,1)=" "THEN
  310U%=1:REPEATU%+=1:UNTILMID$(C$,U%,1)<>" ":C$=RIGHT$(C$,LENC$-U%+1)
  311ENDIF:IFRIGHT$(A$,1)=" "THEN
  312U%=LENC$:N%=1:REPEATU%-=1:N%+=1:UNTILMID$(C$,U%,1)<>" ":C$=LEFT$(C$,LENC$-N%+1)
  313ENDIF:=C$
  314DEFFNN(M%):LOCALJ%,j%:j%=0:FORJ%=1TOr%:IFA%(J%)=M%THENj%=J%
  315NEXT:=j%
  316DEFFNVy(M%):LOCALJ%,N%:N%=FALSE:IFM%=Fy%THEN
  317N%=TRUE
  318ELSE:FORJ%=1TOr%:IFA%(J%)=M%THENN%=TRUE
  319NEXT
  320ENDIF:=N%
  321DEFFNKy(Q$):LOCALJ%,T$,U%,A$:A$="":FORJ%=1TOLENQ$:T$=MID$(Q$,J%,1):U%=ASCT$:IFU%>64ANDU%<91THENU%+=32
  322T$=CHR$U%:A$+=T$:NEXT:=A$
  323DEFFNf(Xy$):LOCALe%:SYS&20023,Xy$,A%,&C8,0,3TO,,e%:?(A%+e%)=&D:=$A%
  324DEFFNe(M%,Pi%):!C%=M%:SYS&400CB,,C%:=Pi%-(C%!20-C%!4)
  325DEFFNT(M%,Wi%):!C%=M%:SYS&400CB,,C%:=Wi%-(C%!24-C%!16)
  326DEFFNb:LOCALfl%,vl%:SYS53,-1,&BTO,,fl%:SYS53,-1,4TO,,vl%:=(fl%+1)<<vl%
  327DEFFNO:LOCALQl%,bl%:SYS53,-1,&CTO,,Ql%:SYS53,-1,5TO,,bl%:=(Ql%+1)<<bl%
  328DEFPROCAySOUND1,-&A,&C8,1:ENDPROC
  329DEFPROCPSOUND1,-&A,50,4:ENDPROC
  330DEFPROCwy(A%):LOCALM%,H%,Jl%:M%=A%!0:H%=A%!4:Jl%=A%!24:CASEJl%OF
  331WHEN&D:PROCB_(M%)
  332WHEN27:PROCpy(M%)
  333WHEN6:PROCd
  334WHEN2:PROCa
  335WHEN&F:PROCw
  336WHEN3:PROCx
  337WHEN26:PROCj
  338WHEN79:IFG%>0THENPROC_(G%)
  339WHEN67:IFG%>0THENPROCC(G%)
  340WHEN83:IFG%>0THENPROCOy(G%)
  341WHEN90:IFG%>0THENPROCJ(G%)
  342WHEN387:PROCL(J$)
  343WHEN388:PROCgy
  344WHEN396:PROCUy
  345WHEN397:PROCRy
  346OTHERWISESYS&400DC,Jl%
  347ENDCASE:ENDPROC
  348DEFPROCB_(M%):IFFNk(Ly%)THENPROCk(4)
  349ENDPROC
  350DEFPROCpy(M%):IFFNk(Ly%)THENPROCKy(4)
  351ENDPROC
  352DEFPROCRy:IFFu%>Au%THEN
  353L%=Z%(`%):M%=A%(L%):PROCG(M%):`%+=1:PROCY(`%,w%)
  354ENDIF:ENDPROC
  355DEFPROCUy:IF`%>1THEN
  356`%-=1:PROCY(w%,`%)
  357ENDIF:ENDPROC
  358DEFPROCt(M%,H%):LOCALA$:A$=FNi(M%,H%):SYS&400D2,M%,H%,,,-1,LENA$:ENDPROC
  359DEFPROCBy(A%):LOCALJ%,x%,v%,a%,M%,H%:x%=A%!0:v%=A%!4:a%=A%!8:M%=A%!&C:H%=A%!16:lJ%=FNO:CASEM%OF
  360WHENK_%:Ky%=H%:IFa%=16ORa%=64THENPROCH(M%,H%,a%)
  361WHENg_%,q_%,-2
  362WHENNu%:Ky%=H%
  363WHENLy%:PROCD_(H%,a%)
  364WHENFy%:PROCN_(x%,v%,a%,M%)
  365OTHERWISE:k%=0:IFM%>0ANDH%>0THENk%=H%
  366s%=FNW(M%):IFs%=1THENk%=M%(1)
  367IFM%>0THENG%=FNN(M%)
  368CASEa%OF
  369WHEN2:IFv%>=(lJ%-4)THEN
  370PROCa
  371ELSE:PROCl(x%,v%,M%,G%)
  372ENDIF
  373OTHERWISE:CASEH%OF
  374WHEN-1:CASEa%OF
  375WHEN1,4,64,16:PROCu(G%,M%,H%,a%,x%)
  376ENDCASE
  377WHEN0:CASEa%OF
  378WHEN1:IFINKEY-1THENPROCxELSEPROCC(G%)
  379WHEN4:IFINKEY-1THENPROCwELSEPROC_(G%)
  380WHEN256:IFINKEY-2THENPROCa
  381WHEN&400:IFINKEY-2THENPROCdELSEPROCo(M%)
  382WHEN64,16:PROCu(G%,M%,H%,a%,x%)
  383ENDCASE
  384OTHERWISE:PROCu(G%,M%,H%,a%,x%)
  385ENDCASE
  386ENDCASE
  387ENDCASE:ENDPROC
  388DEFPROCu(G%,M%,H%,a%,x%):LOCALJ%:IFH%=0THEN
  389CASEa%OF
  390WHEN16,64:PROCH(M%,H%,a%)
  391ENDCASE
  392ENDIF:IFH%=-1THEN
  393CASEa%OF
  394WHEN1,4:A%!0=M%:SYS&400CB,,A%:fJ%=A%!4:RJ%=A%!&C:IF(x%-fJ%)<24THEN
  395IFa%=4THEN
  396PROCj
  397ELSE:PROCPy(G%)
  398ENDIF
  399ELSE:IF(x%-RJ%)<24ANDa%=4THENPROCo(M%)
  400ENDIF
  401WHEN16,64:PROCH(M%,H%,a%)
  402ENDCASE
  403ENDIF:IFH%>0THEN
  404PROCPy(G%):CASEa%OF
  405WHEN1,4:S$=FNC(G%,H%):IFFNZ(S$)THEN
  406V%=FNP(S$):IFFNV(G%,H%)=0THENPROCV(S$,G%,H%)
  407PROCMy(M%,H%,a%)
  408ENDIF
  409WHEN16,64:s%=FNW(M%):IFs%=1THEN
  410S$=FNC(G%,H%):IFFNZ(S$)THEN
  411PROCV(S$,G%,H%):PROCH(M%,H%,a%)
  412ENDIF
  413ELSE:IFs%>1THEN
  414FORJ%=1TOs%:S$=FNC(G%,M%(J%)):IFFNZ(S$)THEN
  415IFFNV(G%,M%(J%))=0THEN
  416PROCV(S$,G%,M%(J%)):PROCF(M%,M%(J%))
  417ENDIF
  418ENDIF:NEXT:PROCH(M%,H%,a%)
  419ENDIF
  420ENDIF
  421WHEN256,&400:PROCa_(G%,M%,H%,a%)
  422ENDCASE
  423ENDIF:ENDPROC
  424DEFPROCa_(G%,M%,H%,a%):CASEa%OF
  425WHEN&400:IFNOTFNB(M%,H%)THENPROCJ(G%):PROCF(M%,H%)
  426WHEN256:PROCLy(M%,H%)
  427ENDCASE:ENDPROC
  428DEFPROCMy(M%,H%,a%):LOCALS$,F$,f%,wu%,Ay$:PROCW(M%,H%):G%=FNN(M%):wu%=FNa(M%):S$=FNC(G%,H%):V%=FNP(S$):IFFNZ(S$)THEN
  429IFa%=1ORa%=16THEN
  430G%()=0:G%(wu%)=TRUE:cy%=wu%
  431ENDIF:SYS&400DE,"Filer_Run "+S$
  432ENDIF:ENDPROC
  433DEFPROCN_(x%,v%,a%,M%):LOCALO%,t%:O%=FNe(Fy%,54):t%=FNT(Fy%,46):CASEa%OF
  434WHEN1:CASETRUEOF
  435WHENINKEY-1:PROCx
  436WHENINKEY-2:PROCa
  437OTHERWISEPROCvy(O%,t%)
  438ENDCASE
  439WHEN2:PROC`(O%,t%,M%)
  440WHEN4:CASETRUEOF
  441WHENINKEY-1:PROCw
  442WHENINKEY-2:PROCd
  443OTHERWISEPROCby
  444ENDCASE
  445ENDCASE:ENDPROC
  446DEFPROCvy(O%,t%):LOCALI$,M%:M%=al%:I$=FNK("%z12:%mi %am"):PROCS(M%,2,I$):I$=FNK("%we"):PROCS(M%,3,I$):I$=FNK("%zdy %m3 %ce%yr"):PROCS(M%,4,I$):PROCn(M%,O%,t%+&C):PROCYy:REPEATMOUSEO%,t%,Y%:UNTILY%=0:PROCG(M%):ENDPROC
  447DEFFNK(Cy$):LOCALM_%:Cy$+=CHR$0:?UJ%=3:SYS7,&E,UJ%:SYS&4304B,-1,UJ%,Gu%,31,Cy$TO,M_%:?M_%=&D:=$Gu%
  448DEFPROCby:wy%=NOTwy%:IFwy%THENPROCgELSEPROCf_
  449ENDPROC
  450DEFPROCg:PROCt(iJ%,0):wy%=TRUE:ENDPROC
  451DEFPROCf_:SYS&400D2,-1:ENDPROC
  452DEFFNc:SYS6,&A1,28TO,,OJ%:IF(OJ%AND2)=0THEN=FALSE
  453=TRUE
  454DEFFNUy:SYS6,&A1,28TO,,OJ%:IF(OJ%AND4)=0THEN=TRUE
  455=FALSE
  456DEFPROCH(M%,H%,a%):LOCALX%,Q%:q%=M%:Uy%=H%:yy%=a%:A%!0=M%:SYS&400CB,,A%:fJ%=A%!4:Gi%=A%!8:RJ%=A%!&C:Zi%=A%!16:Hi%=A%!24:qJ%=A%!4-A%!20:wJ%=A%!16-A%!24:SYS&400CF,,A%:x%=A%!0:v%=A%!4:Su%=A%!8:A%!0=M%:A%!4=H%:SYS&400CE,,A%:CASEq%OF
  457WHENK_%:A%!0=M%:A%!4=1:dl%=FNb:lJ%=FNO:A%!24=0:A%!28=0:A%!32=dl%:A%!36=lJ%:l_%=TRUE:C_%=FALSE:my%=1
  458OTHERWISE:G%=FNN(q%):IFG%<1THENENDPROC
  459Q%=FNF(G%):X%=FNM(Q%):C_%=FNc:A_%=FALSE:tu%=FALSE:my%=1:IFH%=-1AND(x%-fJ%)<24THEN
  460tu%=TRUE:C_%=FALSE:A%!0=q%:SYS&400CB,,A%:cJ%=A%!4:vy%=A%!8:Uu%=A%!&C:N_%=A%!16:A%!0=q%:A%!4=6:A%!8=x%:A%!&C=v%:A%!16=x%+4:A%!20=v%+4:A%!24=cJ%:A%!28=vy%+50:A%!32=Uu%:A%!36=N_%
  461ENDIF:IFH%=-1AND(RJ%-x%)<24THENH%=0
  462IFH%=0THEN
  463IFINKEY-3THEN
  464A_%=TRUE:IFNOTC_%THEN
  465IJ%=x%-24:nJ%=x%+24:TJ%=v%-16:ay%=v%+16:A%!8=IJ%:A%!&C=TJ%:A%!16=nJ%:A%!20=ay%
  466ELSE:A%!8=x%:A%!&C=v%:A%!16=x%:A%!20=v%:my%=ty%
  467ENDIF:A%!0=q%:A%!4=5:A%!24=0:A%!28=0:A%!32=&7FFFFFFF:A%!36=&7FFFFFFF
  468ELSE:d_%=TRUE:C_%=FALSE:A%!0=A%(G%):SYS&400CB,,A%:Ci%=A%!4:n_%=A%!8:Di%=A%!&C:ny%=A%!16:qJ%=A%!4-A%!20:wJ%=A%!16-A%!24:SYS&400CF,,A%:x%=A%!0:v%=A%!4:A%!0=A%(G%):A%!4=0:SYS&400CE,,A%:Kl%=A%!20-A%!&C:A%!8=A%!8+qJ%+2:A%!&C=A%!&C+wJ%+2:A%!16=A%!16+qJ%-2
  469A%!20=A%!20+wJ%-2:Ol%=Kl%-(v%-n_%):xu%=v%-n_%:A%!4=7:A%!24=x%:A%!32=x%:A%!28=ny%-(X%*44)-(50-xu%):A%!36=ny%-Ol%+u%+u%
  470ENDIF
  471ENDIF:IFH%>0THEN
  472PROCF(M%,H%):s%=FNW(q%):my%=1:IFNOTC_%THEN
  473IJ%=FNe(q%,A%!8):nJ%=FNe(q%,A%!16):A%!0=q%:A%!4=M%(1):SYS&400CE,,A%:TJ%=FNT(q%,A%!&C):A%!0=q%:A%!4=M%(s%):SYS&400CE,,A%:ay%=FNT(q%,A%!20):A%!8=IJ%:A%!&C=TJ%:A%!16=nJ%:A%!20=ay%
  474ELSE:A%!8=x%:A%!&C=v%:A%!16=x%:A%!20=v%
  475ENDIF:A%!0=q%:A%!4=5:A%!24=0:A%!28=0:A%!32=&7FFFFFFF:A%!36=&7FFFFFFF
  476ENDIF
  477ENDCASE:Xy%=FALSE:IFC_%THEN
  478W$=FNMy(G%,k%):Hy%=69:IFfy%=0THENHy%+=256
  479SYS&42400,Hy%,my%,W$,A%+8
  480ELSE:SYS&400D0,,A%
  481ENDIF:ENDPROC
  482DEFFNMy(G%,k%):LOCALS$,F$,f%,V%,W$:IFk%THEN
  483S$=FNC(G%,k%):F$=FNJ(S$):f%=FNU(S$):V%=FNP(S$)
  484ENDIF:IFs%>1THENf%=4
  485IFA_%THENf%=5
  486CASEf%OF
  487WHEN0:W$="notfound":my%=ty%
  488WHEN4:W$="bundle":my%=ty%
  489WHEN5:W$="move":my%=ty%
  490OTHERWISEW$=FNI(f%,V%,F$,1)
  491ENDCASE:=W$
  492DEFPROCuy:SYS&400CF,,A%:Ni%=A%!0:gl%=A%!4:a%=A%!8:M%=A%!&C:H%=A%!16:A%!0=A%(G%):SYS&400CC,,A%:A%!8=gl%-xu%-u%:A%!&C=A%!4+(A%!52-A%!44):A%!24=A%!16-A%!8:IFa%=4THENA%!28=-1
  493SYS&400C5,,A%:ENDPROC
  494DEFPROCn_(A%,q%,Uy%,Su%):el%=FNc:Si%=A%!0:c_%=A%!4:Xi%=A%!8:AJ%=A%!&C:CASEUy%OF
  495WHEN0:d_%=FALSE:IFA_%THENPROCCy(q%)
  496WHEN-1:IFtu%THEN
  497PROCi_(c_%,AJ%,Su%)
  498ELSE:d_%=FALSE:IFA_%THENPROCCy(q%)
  499ENDIF
  500OTHERWISEPROCly(q%,Uy%,yy%)
  501ENDCASE:ENDPROC
  502DEFPROCi_(c_%,AJ%,Su%):LOCALJ%,M%,H%,X%,Q%:Q%=FNF(G%):M%=A%(G%):X%=FNM(Q%):IFc_%>AJ%THENSWAPc_%,AJ%
  503H%=1:REPEAT:A%!0=M%:A%!4=H%:SYS&400CE,,A%:ay%=A%!20:ay%=FNT(M%,ay%):H%+=1:UNTILay%>c_%:yJ%=H%-1:H%-=1:IFyJ%>X%THENyJ%=X%
  504REPEAT:A%!0=M%:A%!4=H%:SYS&400CE,,A%:ay%=A%!20:ay%=FNT(M%,ay%):H%+=1:UNTILay%>AJ%:pJ%=H%-1:IFpJ%>X%THENpJ%=X%
  505IFX%>0THEN
  506FORJ%=yJ%TOpJ%:CASESu%OF
  507WHEN4:PROCF(M%,J%)
  508WHEN1:PROCLy(M%,J%)
  509ENDCASE:NEXT
  510ENDIF:ENDPROC
  511DEFPROCl(x%,v%,M%,G%):LOCALB%,Y%,i%,M$,c$,s$,R$,S$,F$,_l%,cu%,ru%,Oy%,Q%:i_%=x%:k_%=v%:Dy%=M%:Y%=&7000121:i%=&7400121:W%=D_%:Z%=W%+28:W%!&C=&70207:W%!20=44:W%!24=0:$W%=G$:IFl%THEN$W%=G$+" *"
  512$b_%="Bar  '"+J$+"'":Z%!0=0:Z%!4=L_%:Z%!8=Y%:Z%!&C=b_%:Z%!16=-1:Z%!20=24:Z%+=24:M$=$C%(G%):$y_%="Menu '"+M$+"'":Z%!0=0:Z%!4=H_%:Z%!8=Y%:Z%!&C=y_%:Z%!16=-1:Z%!20=24:Z%+=24:f%=1:B%=i%:c$="File ''":R$="":S$=FNC(G%,k%):F$=FNJ(S$):s%=FNW(Dy%):IFs%=1ORk%THEN
  513IFFNZ(S$)THENf%=FNU(S$)ELSEf%=0
  514s$="File ":R$="File":B%=Y%:IFf%=0THENs$="Obj.":R$="Object"
  515IFf%=2THENs$="Dir. ":R$="Directory"
  516IFf%=2ANDLEFT$(F$,1)="!"THEN
  517s$="App. ":R$="Application"
  518ENDIF:c$=s$+"'"+F$+"'"
  519ENDIF:IFs%>1THENc$="Selection":s$="Sel.":R$=c$:B%=Y%
  520_l%=LEN($b_%):cu%=LEN($y_%):ru%=LENc$:Oy%=_l%:IFcu%>Oy%THENOy%=cu%
  521IFru%>Oy%THENOy%=ru%
  522Oy%=(Oy%+1)*16:IFOy%<&9CTHENOy%=&9C
  523W%!16=Oy%:$tJ%=c$:Z%!0=&80:Z%!4=bJ%:Z%!8=B%:Z%!&C=tJ%:Z%!16=-1:Z%!20=24:Z%+=24:Y%=&7000021:i%=&7400021:W%=L_%:Z%=W%+28:$W%="Bar":B%=Y%:W%!&C=&70207:W%!16=&D*16:W%!20=44:W%!24=0:A$="Save      F3":Z%!0=0:Z%!4=0:Z%!8=B%:$(Z%+&C)=A$:Z%+=24
  524A$="Rename":Z%!0=8:Z%!4=zy%:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:IFky%=0THENB%=i%ELSEB%=Y%
  525A$="Alter":Z%!0=0:Z%!4=gJ%:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:IFky%<2THENB%=i%ELSEB%=Y%
  526A$="Sort":Z%!0=0:Z%!4=s_%:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:IFky%=0THENB%=i%ELSEB%=Y%
  527A$="Find":Z%!0=8:Z%!4=zJ%:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:A$="FilerBoot":Z%!0=0:Z%!4=0:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:IFw%<r%THENB%=Y%ELSEB%=i%
  528A$="Add Menu":Z%!0=2:Z%!4=0:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:A$="Menus: "+STR$w%+"/"+STR$r%:Z%!0=&80:Z%!4=0:Z%!8=i%:$(Z%+&C)=A$:W%=H_%:Z%=W%+28:$W%="Menu":B%=Y%:W%!&C=&70207:W%!16=&D*16:W%!20=44:W%!24=0:A$="Rename":Z%!0=8:Z%!4=zy%:Z%!8=B%:$(Z%+&C)=A$:Z%+=24
  529Q%=FNF(G%):X%=FNM(Q%):IFX%=0THENB%=i%ELSEB%=Y%
  530A$="Alter":Z%!0=0:Z%!4=_J%:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:IFX%<2THENB%=i%ELSEB%=Y%
  531A$="Sort":Z%!0=0:Z%!4=s_%:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:IFX%=0THENB%=i%ELSEB%=Y%
  532A$="FilerBoot":Z%!0=0:Z%!4=0:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:IFw%=1THENB%=i%ELSEB%=Y%
  533A$="Remove Menu":Z%!0=2:Z%!4=0:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:A$="Items: "+STR$X%+"/"+STR$y%:Z%!0=&80:Z%!4=0:Z%!8=i%:$(Z%+&C)=A$:W%=bJ%:Z%=W%+28:$W%=R$:B%=Y%:W%!&C=&70207:W%!16=&C*16:W%!20=44:W%!24=0:IFs%>1THENB%=i%ELSEB%=Y%
  534A$="Pathname":Z%!0=8:Z%!4=zy%:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:IFf%=0THENB%=i%
  535A$="Info":Z%!0=8:Z%!4=q_%:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:A$="Open parent":Z%!0=0:Z%!4=0:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:B%=Y%:A$="Remove "+s$:Z%!0=&80:Z%!4=0:Z%!8=B%:$(Z%+&C)=A$:W%=gJ%:Z%=W%+28:$W%=R$:B%=Y%:W%!&C=&70207:W%!16=&A*16:W%!20=44:W%!24=0
  536$W%="Alter":A$="Open   ^O":Z%!0=0:Z%!4=0:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:A$="Close  ^C":Z%!0=0:Z%!4=0:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:A$="Front  ^F":Z%!0=0:Z%!4=0:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:A$="Back   ^B":Z%!0=&80:Z%!4=0:Z%!8=B%:$(Z%+&C)=A$
  537W%=s_%:Z%=W%+28:$W%=R$:B%=Y%:W%!&C=&70207:W%!16=9*16:W%!20=44:W%!24=0:$W%="Sort":A$="by Name":Z%!0=0:Z%!4=0:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:A$="by Type":Z%!0=&80:Z%!4=0:Z%!8=B%:$(Z%+&C)=A$:W%=zJ%:Z%=W%+28:$W%=R$:B%=Y%
  538W%!&C=&70207:W%!16=5*16:W%!20=44:W%!24=0:$W%="Find":A$="Leaf":Z%!0=8:Z%!4=zy%:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:A$="Path":Z%!0=&88:Z%!4=zy%:Z%!8=B%:$(Z%+&C)=A$:W%=_J%:Z%=W%+28:$W%=R$:B%=Y%:W%!&C=&70207:W%!16=&B*16:W%!20=44:W%!24=0:$W%="Alter"
  539A$="Open    "+CHR$&8B+"O":Z%!0=0:Z%!4=0:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:A$="Close   "+CHR$&8B+"C":Z%!0=0:Z%!4=0:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:A$="Select  "+CHR$&8B+"S":Z%!0=0:Z%!4=0:Z%!8=B%:$(Z%+&C)=A$:Z%+=24
  540A$="Clear   "+CHR$&8B+"Z":Z%!0=&80:Z%!4=0:Z%!8=B%:$(Z%+&C)=A$:SYS&400D4,,D_%,x%-64,v%:ENDPROC
  541DEFPROC`(x%,v%,M%):LOCALB%,Y%,i%,W%,Z%,A$:i_%=x%:k_%=v%:Dy%=M%:Y%=&7000021:i%=&7400021:B%=Y%:W%=D_%:Z%=W%+28:W%!&C=&70207:W%!16=&D*16:W%!20=44:W%!24=0:$W%=G$:IFl%THEN$W%=G$+" *"
  542A$="Library":Z%!0=8:Z%!4=u_%:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:A$="Sprites":Z%!0=0:Z%!4=L_%:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:A$="SysVars":Z%!0=0:Z%!4=H_%:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:A$="Choices...":Z%!0=8:Z%!4=Ly%:Z%!8=B%:$(Z%+&C)=A$:Z%+=24
  543A$="Shortcuts...":Z%!0=2:Z%!4=0:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:A$="Info":Z%!0=0:Z%!4=g_%:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:A$="Quit":Z%!0=&80:Z%!4=0:Z%!8=B%:$(Z%+&C)=A$:W%=L_%:Z%=W%+28:$W%="Sprites":B%=Y%:W%!&C=&70207:W%!16=9*16:W%!20=44:W%!24=0
  544A$="Save":Z%!0=0:Z%!4=0:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:IFFNZ(U$+".Sprites")THENB%=Y%ELSEB%=i%
  545A$="Load":Z%!0=&80:Z%!4=0:Z%!8=B%:$(Z%+&C)=A$:W%=H_%:Z%=W%+28:$W%="SysVars":B%=Y%:W%!&C=&70207:W%!16=9*16:W%!20=44:W%!24=0:A$="Save":Z%!0=0:Z%!4=0:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:IFFNZ(U$+".SysVars")THENB%=Y%ELSEB%=i%
  546A$="Load":Z%!0=&80:Z%!4=0:Z%!8=B%:$(Z%+&C)=A$:SYS&400D4,,D_%,x%,v%:ENDPROC
  547DEFPROCR:LOCALJ%,Z$,a_%,A$:W%=u_%:Z%=W%+28:Oy%=&F*16:$W%="Library":W%!&C=&70207:W%!16=Oy%:W%!20=44:W%!24=0:Y%=&7000021:i%=&7400021:IFCy%>0THEN
  548FORJ%=1TOCy%:IFJ%=Cy%THEN_y%=&AELSE_y%=8
  549B%=&8000121:IFA$(J%)=J$THENB%=&B000121
  550Z%!0=_y%:Z%!4=h_%:Z%!8=B%:$X%(J%)=A$(J%):IFA$(J%)=X$THENZ%!0=_y%+1
  551Z%!&C=X%(J%):Z%!16=-1:Z%!20=16:Z%+=24:NEXT
  552ENDIF:A$="Bars: "+STR$Cy%+"/"+STR$Yy%:Z%!0=2:Z%!4=0:Z%!8=i%:$(Z%+&C)=A$:Z%+=24:A$="Open Lib.":Z%!0=0:Z%!4=0:Z%!8=Y%:$(Z%+&C)=A$:Z%+=24:IFCy%<Yy%THENB%=Y%ELSEB%=i%
  553A$="Create":Z%!0=&88:Z%!4=zy%:Z%!8=B%:$(Z%+&C)=A$:ENDPROC
  554DEFPROCG_(A%):LOCALp%:p%=A%!36:W%=h_%:Z%=W%+28:$W%=A$(p%+1):W%!&C=&70207:W%!16=8*16:W%!20=44:W%!24=0:B%=Y%:A$="Load":Z%!0=0:Z%!4=0:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:A$="Default":Z%!0=0:Z%!4=0:Z%!8=B%:$(Z%+&C)=A$:Z%+=24
  555A$="Delete":Z%!0=0:Z%!4=0:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:A$="Rename":Z%!0=8:Z%!4=zy%:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:A$="Copy as":Z%!0=&88:Z%!4=zy%:Z%!8=B%:$(Z%+&C)=A$:ENDPROC
  556DEFPROCxy(A%):LOCALBl%,O%,t%,hy%,Ay%,Py%:Bl%=A%!20:O%=A%!24:t%=A%!28:hy%=A%!32:Ay%=A%!36:Py%=A%!40:CASEBl%OF
  557WHENq_%:PROCny
  558WHENzy%:PROCqy(hy%,Ay%,Py%)
  559WHENu_%:PROCR
  560WHENh_%:PROCG_(A%)
  561WHENLy%:PROCr:Q_%=Jy%:X_%=m%
  562ENDCASE:SYS&400E8,,Bl%,O%,t%:ENDPROC
  563DEFPROCqy(hy%,Ay%,Py%):LOCALP$:W%=zy%:Z%=W%+28:W%!&C=&70207:W%!16=&B*16:W%!20=44:W%!24=0:B%=&7000121:Z%!0=&84:Z%!4=0:Z%!8=B%:IFDy%=Fy%THEN
  564CASEAy%OF
  565WHENCy%+2:P$="NewBar"
  566ENDCASE:CASEPy%OF
  567WHEN3,4:P$=A$(Ay%+1)
  568ENDCASE:$ey%=P$:$W%="Name:":Z%!&C=ey%:Z%!16=o_%:Z%!20=&B
  569ELSE:CASEhy%OF
  570WHEN0:CASEAy%OF
  571WHEN1:$W%="Name:":P$=J$:$ey%=P$:Z%!&C=ey%:Z%!16=o_%:Z%!20=&B
  572WHEN4:CASEPy%OF
  573WHEN0:$W%="Find leaf:":Z%!&C=x_%:Z%!16=-1:Z%!20=&B
  574WHEN1:$W%="Find path:":Z%!&C=Qu%:Z%!16=-1:Z%!20=&B
  575ENDCASE
  576ENDCASE
  577WHEN1:$W%="Name:":P$=$C%(G%):$iy%=P$:Z%!&C=iy%:Z%!16=-1:Z%!20=&D
  578WHEN2:$W%="Pathname:":$HJ%=FNC(G%,k%):Z%!&C=HJ%:Z%!16=-1:Z%!20=256
  579ENDCASE
  580ENDIF:ENDPROC
  581DEFPROCv_(A%):IFDy%=Fy%THEN
  582PROCcy(A%)
  583ELSE:PROCt_(A%)
  584ENDIF:ENDPROC
  585DEFPROCcy(A%):hy%=A%!0:Ay%=A%!4:Py%=A%!8:WJ%=A%!&C:SYS&400CF,,A%:a%=A%!8:Vy%=a%=1:CASEhy%OF
  586WHEN0:PROCd_(hy%,Ay%,Py%,WJ%)
  587WHEN1:CASEAy%OF
  588WHEN0:PROCmy
  589WHEN1:SYS&406C0:PROCZy:SYS&406C2
  590ENDCASE
  591WHEN2:CASEAy%OF
  592WHEN0:SYS&406C0:PROCm_:SYS&406C2
  593WHEN1:SYS&406C0:PROCHy:SYS&406C2
  594ENDCASE
  595WHEN2
  596WHEN3:PROCr:Q_%=Jy%:X_%=m%:PROCty(Ly%):SYS&400D4,,-1
  597WHEN4:Ay$=z$+".Shortcuts":IFFNZ(Ay$)THENOSCLI("Filer_Run "+Ay$)
  598WHEN5
  599WHEN6:O_%=FNx
  600ENDCASE:IFVy%THENPROC`(i_%,k_%,Dy%)
  601ENDPROC
  602DEFPROCt_(A%):hy%=A%!0:Ay%=A%!4:Py%=A%!8:WJ%=A%!&C:SYS&400CF,,A%:a%=A%!8:Vy%=a%=1:G%=FNN(Dy%):CASEhy%OF
  603WHEN0:CASEAy%OF
  604WHEN0:PROCL(J$)
  605WHEN1:IFPy%>=0THENPROCC_($ey%)
  606WHEN2:CASEPy%OF
  607WHEN0:PROCw
  608WHEN1:PROCx
  609WHEN2:PROCd
  610WHEN3:PROCa
  611ENDCASE
  612WHEN3:CASEPy%OF
  613WHEN0:PROCp("name")
  614WHEN1:PROCp("type")
  615ENDCASE
  616WHEN4:CASEPy%OF
  617WHEN0:IFWJ%>=0THENPROCNy($x_%,Py%)
  618WHEN1:IFWJ%>=0THENPROCNy($Qu%,Py%)
  619ENDCASE
  620WHEN5:uy%=TRUE:SYS6,&E5,0,0:PROCw_:SYS6,&E5,1,0:uy%=FALSE
  621WHEN6:PROCc_
  622ENDCASE
  623WHEN1:CASEAy%OF
  624WHEN0:IF$C%(G%)<>$iy%THEN
  625PROCU_($iy%):PROCO(Dy%)
  626ENDIF
  627ENDIF
  628WHEN1:CASEPy%OF
  629WHEN0:PROC_(G%)
  630WHEN1:PROCC(G%)
  631WHEN2:PROCOy(G%)
  632WHEN3:PROCJ(G%)
  633ENDCASE
  634WHEN2:CASEPy%OF
  635WHEN0:PROCK(G%,"name")
  636WHEN1:PROCK(G%,"type")
  637ENDCASE
  638WHEN3:uy%=TRUE:SYS6,&E5,0,0:PROCXy(G%):SYS6,&E5,1,0:uy%=FALSE
  639WHEN4:PROCq_(G%)
  640ENDCASE
  641WHEN2:CASEAy%OF
  642WHEN0
  643WHEN1
  644WHEN2:PROC__(FNz(FNC(G%,k%)))
  645WHEN3:s%=FNW(Dy%):IFs%>1THEN
  646PROCs(Dy%,s%)
  647ELSE:PROCI(Dy%,k%)
  648ENDIF:PROCJ(G%)
  649ENDCASE
  650ENDCASE:IFVy%THENPROCl(i_%,k_%,Dy%,G%)
  651ENDPROC
  652DEFPROCU_(L$):LOCAL_%:_%=TRUE:IFL$=""THEN
  653M$="Please enter menu name":z%=FNS(M$,"OK",1):_%=FALSE
  654ENDIF:IF_%THEN$C%(G%)=$iy%:l%=TRUE
  655ENDPROC
  656DEFPROCm:LOCALR%:Iy%=0:fy%=0:xy%=0:dy%=7:Qy%=1:Jy%=7:m%=1:R%=16:D%?R%=dy%:R%+=1:D%?R%=xy%:R%+=1:D%?R%=Qy%:R%+=1:D%?R%=Jy%:R%+=1:D%?R%=m%:R%+=1:ENDPROC
  657DEFPROCr:LOCALJ%,B%,M%:M%=Ly%:$pl%="MenuBar choices (Bar '"+J$+"')":FORJ%=34TO38:PROCW(M%,J%):NEXT:IFIy%=1THENPROCF(M%,33)
  658IFIy%=2THENPROCF(M%,34)
  659IFfy%=0THENPROCF(M%,35)
  660IFfy%=1THENPROCF(M%,36)
  661B%=(j_%<<28)+&A00013D:PROCM(M%,22,B%):B%=(m%<<28)+&700303D:PROCM(M%,23,B%):B%=(m%<<28)+(Jy%<<24)+&3135:PROCM(M%,24,B%):B%=(Qy%<<28)+&313D:PROCM(M%,25,B%):B%=(Qy%<<28)+(dy%<<24)+&3135:PROCM(M%,26,B%):B%=(Qy%<<28)+&313D:PROCM(M%,27,B%):B%=(Qy%<<28)+(xy%<<24)+&3135
  662PROCM(M%,28,B%):PROCg:ENDPROC
  663DEFPROCz(D$):LOCALJ%,_%,Ai%:_%=TRUE:Vy%=FALSE:IFl%THEN
  664M$="Command: Load bar '"+D$+"'":M$+=",...but changes have been made!":O$="Ignore changes,Cancel command,Save changes":z%=FNS(M$,O$,2):CASEz%OF
  665WHEN0,2:_%=FALSE
  666WHEN3:PROCL(J$)
  667ENDCASE
  668ENDIF:IF_%THEN
  669v$=FNu(D$):Ai%=FNj(v$,D$):IFAi%THEN
  670SYS&406C0:PROCSy:PROCh(D$):PROCZ(Fy%,0,Qy%):J$=D$:PROCr:SYS&406C2
  671ENDIF
  672ENDIF:ENDPROC
  673DEFPROCU:LOCALJ%,cl%,mJ%,P$,f%,V%,A$,M$:J%=1:mJ%=0:REPEAT:SYS&C,&A,B$,A%,1,mJ%,&64,"*"TO,,,cl%,mJ%:IFcl%THEN
  674P$=FNQ(A%+20):f%=FNU(B$+"."+P$):V%=((!A%)>>>8)AND&FFF:`$=B$+"."+P$:IFV%=&FFDANDf%=1THEN
  675A$(J%)=P$:J%+=1
  676ENDIF
  677ENDIF:UNTILmJ%=-1ORJ%>Yy%:Cy%=J%-1:ENDPROC
  678DEFPROCiy(DJ%):LOCALJ%,Z$,U%,Y%,My%,_%:_%=TRUE:IFDJ%>Yy%THEN_%=FALSE
  679IF_%ANDDJ%>0THEN
  680FORJ%=1TODJ%:Z$=B$+"."+A$(J%):F%=OPENIN(Z$):U%=0:Y%=BGET#F%:REPEAT:Y%=BGET#F%:IFY%<>0THENU%+=1
  681UNTILY%=0:CLOSE#F%:F%=0:My%=U%:IFMy%>0ANDMy%<>r%THEN_%=FALSE:J%=DJ%
  682NEXT
  683ENDIF:IFNOT_%THEN
  684M$="You will need to delete any data files,":M$+="in the 'Library.Data.' directory,":M$+="before running this version of MenuBar":z%=FNS(M$,"Cancel",2):PROCN:END
  685ENDIF:ENDPROC
  686DEFFNLy:LOCALJ%,Z$,Wy%,X$:X$="":Z$=U$+".Default":IFFNZ(Z$)THEN
  687F%=OPENIN(Z$):X$=GET$#F%:CLOSE#F%:F%=0
  688ENDIF:Wy%=FALSE:FORJ%=1TOCy%:IFA$(J%)=X$THENWy%=TRUE
  689NEXT:IFNOTWy%THENX$=""
  690=X$
  691DEFPROCSy:LOCALJ%,S_%:FORJ%=1TOr%:S_%=A%(J%):A%!0=S_%:SYS&400CC,,A%:SYS&400C3,,A%:NEXT:w%=5:_%=FN_(VJ%+Mu%+jJ%):T%=S%:ky%=0:GJ%=-1:FORJ%=D%TOT%-4STEP4:!J%=0:NEXT:FORJ%=1TOMy%:CASETRUEOF
  692WHENJ%MOD2=0:V%=1
  693OTHERWISEV%=0
  694ENDCASE:PROCDy(J%,V%):PROCQ(J%,0):PROCX(J%,0):NEXT:ENDPROC
  695DEFPROCZy:LOCALZ$:Z$=U$+".Sprites":IFFNZ(Z$)THEN
  696OSCLI("IconSprites "+Z$)
  697ENDIF:ENDPROC
  698DEFPROCHy:LOCALZ$:Z$=U$+".SysVars":IFFNZ(Z$)THENSYS&400DE,Z$
  699ENDPROC
  700DEFFNHy(h%,Ry%,Q$):LOCALX%,U%,Z%:X%=FNM(h%):U%=1:REPEAT:A$=FNr(h%,Ry%,U%):U%+=1:UNTILA$=Q$ORU%>X%:IFA$=Q$THENZ%=U%ELSEZ%=-1
  701=Z%
  702DEFFNC(G%,p%):LOCALQ%,A$:Q%=FNF(G%):A$=FNr(Q%,Q%+1,p%):=A$
  703DEFFNF(G%):=G%*2-1
  704DEFFNr(h%,Ry%,v_%):LOCALZy%,`y%:Zy%=FNG(Ry%):`y%=FNY(h%,v_%):=$(Zy%+`y%)
  705DEFFNY(Q%,Z%):LOCALZy%:IFZ%=0THEN=0
  706Zy%=FNG(Q%)+(Z%-1)*4:=!Zy%
  707DEFPROCL_(A$,Q%):LOCALJ%,e%,n%,Ny%,By%,N%:e%=LENA$+1:n%=FNG(Q%)+FNL(Q%):By%=T%-n%:Ny%=n%+e%:_%=FNn(e%):IFNOT_%THEN
  708M$="No room to extend data":z%=FNS(M$,"Cancel",3):ENDPROC
  709ENDIF:PROCq(n%,Ny%,By%):T%+=e%:$n%=A$:N%=FNM(Q%):PROCQ(Q%,N%+1):N%=FNL(Q%):PROCX(Q%,N%+e%):IFQ%<My%THEN
  710FORJ%=Q%+1TOMy%:N%=FNH(J%):PROCT(J%,N%+e%):NEXT
  711ENDIF:ENDPROC
  712DEFPROCdy(g%,Q%,Z%):LOCALJ%,e%,n%,Ny%,By%,N%:e%=4:n%=FNG(Q%)+(Z%*e%):By%=T%-n%:Ny%=n%+e%:_%=FNn(e%):IFNOT_%THEN
  713M$="No room to extend data":z%=FNS(M$,"Cancel",3):ENDPROC
  714ENDIF:PROCq(n%,Ny%,By%):T%+=e%:!n%=g%:N%=FNM(Q%):PROCQ(Q%,N%+1):N%=FNL(Q%):PROCX(Q%,N%+e%):IFQ%<My%THEN
  715FORJ%=Q%+1TOMy%:N%=FNH(J%):PROCT(J%,N%+e%):NEXT
  716ENDIF:ENDPROC
  717DEFPROCj_(h%,Ry%,v_%):LOCALJ%,e%,n%,Ny%,By%,N%,W%,Q%,g%,A$:A$=FNr(h%,Ry%,v_%):R_%=LENA$+1:`y%=FNY(h%,v_%):Ny%=FNG(Ry%)+FNY(h%,v_%):n%=Ny%+R_%:By%=T%-n%:PROCq(n%,Ny%,By%):T%-=R_%:Q%=Ry%:N%=FNM(Q%):PROCQ(Q%,N%-1):N%=FNL(Q%):PROCX(Q%,N%-R_%):IFQ%<My%THEN
  718FORJ%=Q%+1TOMy%:N%=FNH(J%):PROCT(J%,N%-R_%):NEXT
  719ENDIF:Q%=h%:e%=4:n%=FNG(Q%)+(v_%*e%):Ny%=n%-e%:By%=T%-n%:PROCq(n%,Ny%,By%):T%-=e%:N%=FNM(Q%):PROCQ(Q%,N%-1):N%=FNL(Q%):PROCX(Q%,N%-e%):IFQ%<My%THEN
  720FORJ%=Q%+1TOMy%:N%=FNH(J%):PROCT(J%,N%-e%):NEXT
  721ENDIF:g%=FNM(Q%):W%=FNG(Q%):IFg%>0THEN
  722FORJ%=1TOg%:IF!W%>`y%THEN!W%=!W%-R_%
  723W%+=e%:NEXT
  724ENDIF:ENDPROC
  725DEFPROCWy(Q%):LOCALJ%,e%,Ny%,n%,By%,N%:e%=FNL(Q%):Ny%=FNG(Q%):n%=Ny%+e%:By%=T%-n%:PROCq(n%,Ny%,By%):T%-=e%:PROCQ(Q%,0):PROCX(Q%,0):IFQ%<My%THEN
  726FORJ%=Q%+1TOMy%:N%=FNH(J%):PROCT(J%,N%-e%):NEXT
  727ENDIF:ENDPROC
  728DEFPROCq(n%,Ny%,By%):IFBy%>0THEN
  729SYS&400F1,XJ%,n%,XJ%,Ny%,By%
  730ENDIF:ENDPROC
  731DEFFNd(W%)=?W%*256+W%?1
  732DEFFNH(Q%)=FNd(P%+(Q%-1)*8+2)
  733DEFFNM(Q%)=FNd(P%+(Q%-1)*8+4)
  734DEFFNL(Q%)=FNd(P%+(Q%-1)*8+6)
  735DEFFNG(Q%)=S%+FNH(Q%)
  736DEFPROCe(N%,W%)?W%=N%DIV256:W%?1=N%MOD256:ENDPROC
  737DEFPROCDy(Q%,V%)PROCe(V%,P%+(Q%-1)*8):ENDPROC
  738DEFPROCT(Q%,`y%)PROCe(`y%,P%+(Q%-1)*8+2):ENDPROC
  739DEFPROCQ(Q%,X%)PROCe(X%,P%+(Q%-1)*8+4):ENDPROC
  740DEFPROCX(Q%,e%)PROCe(e%,P%+(Q%-1)*8+6):ENDPROC
  741DEFFNw:LOCALnl%:SYS&400EC,-1,-1TOnl%:=nl%
  742DEFFN_(By%):LOCALd%,_%:_%=TRUE:SYS&400EC,By%,-1TOd%:IFd%<By%THEN_%=FALSE
  743=_%
  744DEFFNn(By%):IF(FNl-T%)>=By%THEN=TRUE
  745=FN_(FNw+By%)
  746DEFFNl=&8000+FNw
  747DEFFNQy=T%
  748DEFFNRy=FNl-FNQy
  749DEFPROCo(M%):A%!0=M%:SYS&400CB,,A%:A%!28=-1:SYS&400C5,,A%:ENDPROC
  750DEFPROCFy(M%):CASEM%OF
  751WHENg_%,q_%,Nu%,K_%,Ly%:SYS&400C5,,A%
  752ENDCASE:ENDPROC
  753DEFPROCG(M%):!A%=M%:SYS&400C6,,A%:ENDPROC
  754DEFPROCGy(M%):A%!0=M%:SYS&400CB,,A%:SYS53,-1,&BTO,,YJ%:SYS53,-1,4TO,,PJ%:SYS53,-1,&CTO,,uJ%:SYS53,-1,5TO,,z_%:YJ%=YJ%<<PJ%:uJ%=uJ%<<z_%:PJ%=A%!&C-A%!4:z_%=A%!16-A%!8:A%!4=(YJ%-PJ%)>>1:A%!8=(uJ%-z_%)>>1:A%!&C=A%!4+PJ%:A%!16=A%!8+z_%:A%!28=-1:SYS&400C5,,A%:ENDPROC
  755DEFPROCO(M%):A%!0=M%:SYS&400CB,,A%:SYS&400D1,-1,A%!4,A%!8,A%!&C,A%!16:ENDPROC
  756DEFFNYy(M%):!C%=M%:SYS&400CB,,C%:=FNPy(C%!32,20)
  757DEFFNk(M%):C%!0=M%:SYS&400CB,,C%:=C%!32AND65536
  758DEFFNPy(g%,Y%):LOCALN%,Tu%:Tu%=1<<Y%:N%=(g%ANDTu%)DIVTu%:IFN%=0THEN=FALSE
  759=TRUE
  760DEFPROCn(M%,O%,t%):LOCALb%,qy%:A%!0=M%:SYS&400CB,,A%:A%!28=-1:b%=A%!&C-A%!4:qy%=A%!16-A%!8:A%!4=O%:A%!8=t%-qy%:A%!&C=O%+b%:A%!16=t%:SYS&400C5,,A%:ENDPROC
  761DEFPROCty(M%):SYS&400CF,,A%:PROCn(M%,A%!0,A%!4):ENDPROC
  762DEFFN`(ly%,t_%,NJ%,QJ%,w_%,r_%,B%,m%,SJ%,e_%,FJ%,CJ%,I$):$A%=STRING$(88,CHR$0):A%!0=ly%:A%!4=t_%:A%!8=NJ%:A%!&C=QJ%:A%!16=w_%:A%!20=r_%:A%!24=-1:A%!28=B%:A%?32=7:A%?33=2:A%?34=7:A%?35=m%:A%?36=3:A%?37=1:A%?38=&C:A%!40=SJ%:A%!44=-e_%:A%!48=FJ%:A%!52=CJ%:A%!56=61
  763A%!60=&6000:A%!64=ty%:A%?68=0:A%?69=0:A%?70=0:A%?71=0:$(A%+72)=I$:A%?84=0:SYS&400C1,,A%TODu%:=Du%
  764DEFPROCS(M%,H%,d$):C%!0=M%:C%!4=H%:SYS&400CE,,C%:$(C%!28)=d$:C%!0=M%:C%!4=H%:C%!8=0:C%!&C=0:SYS&400CD,,C%:ENDPROC
  765DEFFNi(M%,H%):C%!0=M%:C%!4=H%:SYS&400CE,,C%:=$(C%!28)
  766DEFFNB(M%,H%):LOCALN%:C%!0=M%:C%!4=H%:SYS&400CE,,C%:N%=((C%!24)>>21)AND1:IFN%=0THEN=FALSE
  767=TRUE
  768DEFPROCF(M%,H%):C%!0=M%:C%!4=H%:C%!8=1<<21:C%!&C=1<<21:SYS&400CD,,C%:ENDPROC
  769DEFPROCW(M%,H%):C%!0=M%:C%!4=H%:C%!8=0:C%!&C=1<<21:SYS&400CD,,C%:ENDPROC
  770DEFPROCLy(M%,H%):IFFNB(M%,H%)THENPROCW(M%,H%)ELSEPROCF(M%,H%)
  771ENDPROC
  772DEFPROCM(M%,H%,Ui%):LOCALI_%,Y_%:I_%=-1:Y_%=Ui%:C%!0=M%:C%!4=H%:C%!8=Y_%:C%!&C=I_%:SYS&400CD,,C%:ENDPROC
  773DEFPROCJy(M%,H%):C%!0=M%:C%!4=H%:SYS&400C4,,C%:SYS&400E0,,C%:cJ%=C%!4:vy%=C%!8:Uu%=C%!&C:N_%=C%!16:SYS&400D1,-1,cJ%,vy%,Uu%,N_%:ENDPROC
  774DEFPROCZ(M%,H%,`l%):C%!0=M%:C%!4=H%:Y_%=`l%<<28:I_%=&F<<28:C%!8=Y_%:C%!&C=I_%:SYS&400CD,,C%:ENDPROC
  775DEFPROCD(M%,H%,`l%):C%!0=M%:C%!4=H%:Y_%=`l%<<24:I_%=&F<<24:C%!8=Y_%:C%!&C=I_%:SYS&400CD,,C%:ENDPROC
  776DEFFNR(M%,ul%,jl%,b%,qy%,Hy%,d$,il%,Ii%,Ti%):LOCALH%:C%!0=M%:C%!4=ul%:C%!8=jl%:C%!&C=ul%+b%:C%!16=jl%+qy%:C%!20=Hy%:IFil%=0THEN
  777$(C%+24)=d$
  778ELSE:C%!24=il%:C%!28=Ii%:C%!32=Ti%
  779ENDIF:SYS&400C2,,C%TOH%:=H%
  780DEFPROCS_:SYS&406C2:IFF%>0THENCLOSE#F%:F%=0
  781ERROREXTERR,REPORT$+" at line "+STR$ERL:ENDPROC
  782DEFPROCv(N%):LOCALz%,M$,A$:SYS&400D0,,-1:SYS&406C2:IFF%>0THENCLOSE#F%:F%=0
  783IFuy%THEN
  784uy%=FALSE:SYS6,&E5,1,0:A$="Escape pressed - operation aborted":z%=FNS(A$,"OK",1):ENDPROC
  785ENDIF:CASEN%OF
  786WHEN0:M$=" (Error "+STR$ERR+": line "+STR$ERL+") ":A$="OK to continue, CANCEL to kill "+G$:!A%=ERR:$(A%+4)=REPORT$+M$+A$+CHR$0:SYS&400DF,A%,3,G$TO,z%:IFz%=2THENPROCN:END
  787OTHERWISE:A$=REPORT$+",(Error "+STR$ERR+": line "+STR$ERL+")":z%=FNS(A$,"OK,Kill task",3):IFz%=2THENPROCN:END
  788ENDCASE:ENDPROC
  789DEFFNq(Ny$,au%):LOCALz%:A%!0=1:$(A%+4)=Ny$+CHR$0:SYS&400DF,A%,au%,G$TO,z%:=z%
  790DEFFNS(Uy$,Qy$,Qi%):LOCALJ%,U%,Z%,O%,t%,b%,qy%,N%,KJ%,o%,Y%,Ty%,Q%,Pl%,A$,M%:LOCALERROR:ONERRORLOCALPROCv(0):=0
  791M%=K_%:SYS&400D0,,-1:SYS&406C2:SYS&400D4,,-1:CASEQi%OF
  792WHEN1:N%=0:f$="Message"
  793WHEN2:N%=&A:f$="Warning"
  794WHEN3:N%=&F:f$="Error"
  795OTHERWISEN%=&F:f$="Error"
  796ENDCASE:SOUND1,-N%,50,4:$Il%=f$+" from "+G$:I%!0=M%:FORJ%=1TO8:I%!4=J%:SYS&400C4,,I%:NEXT:IFq$<>""THEN
  797SYS&600E9,40,,q$TO;au%:IFau%AND1THENq$=""
  798ENDIF:U%=0:A$=Qy$:REPEAT:U%+=1:Z%=INSTR(A$,","):IFZ%=0THENZ$(U%)=A$
  799IFZ%>0THENZ$(U%)=LEFT$(A$,Z%-1):A$=RIGHT$(A$,LENA$-Z%)
  800UNTILZ%=0ORU%=4:Pl%=U%:o%=0:FORJ%=1TOU%:IFLENZ$(J%)>o%THENo%=LENZ$(J%)
  801NEXT:IFo%<96THENo%=96
  802P%()=((o%+2)*16):b%=0:FORJ%=1TOU%:b%+=P%(J%)+&C:NEXT:b%=b%-&C+16:A%!0=M%:SYS&400CB,,A%:KJ%=A%!&C-A%!4:O%=KJ%-b%-16:IFO%<8THEN
  803FORJ%=1TOU%:o%=(LENZ$(J%)+2)*16:IFo%<96THENo%=96
  804P%(J%)=o%:NEXT:b%=0:FORJ%=1TOU%:b%+=P%(J%)+&C:NEXT:b%=b%-&C+16:A%!0=M%:SYS&400CB,,A%:KJ%=A%!&C-A%!4:O%=KJ%-b%-16
  805ENDIF:IFO%<8THENO%=8
  806t%=-284:qy%=54:k$="R5,2":I%!0=M%:I%!20=&1701313D:I%!32=20:FORJ%=1TOU%:b%=P%(J%):IFJ%=U%THEN
  807t%-=6:b%+=16:qy%+=16:k$="R6,2"
  808ENDIF:$D%(J%)=LEFT$(Z$(J%),&F):$Q%(J%)=k$:N%=D%(J%):_y%=Q%(J%):I%!4=O%:I%!8=t%:I%!&C=O%+b%:I%!16=t%+qy%:I%!24=N%:I%!28=_y%:SYS&400C2,,I%TOg%:O%+=b%+&C:NEXT:U%=0:A$=Uy$:REPEAT:U%+=1:Z%=INSTR(A$,","):IFZ%=0THENZ$(U%)=A$
  809IFZ%>0THENZ$(U%)=LEFT$(A$,Z%-1):A$=RIGHT$(A$,LENA$-Z%)
  810UNTILZ%=0ORU%=3:CASEU%OF
  811WHEN1:t%=-&80
  812WHEN2:t%=-96
  813WHEN3:t%=-76
  814ENDCASE:O%=&82:b%=684:qy%=44:IFq$=""THENO%=16:b%=796
  815I%!0=M%:I%!4=O%:I%!&C=O%+b%:I%!20=&17006139:I%!28=-1:I%!32=20:I%!20=&17006119:I%!28=-1:I%!32=20:FORJ%=1TOU%:$U%(J%)=RIGHT$(Z$(J%),50):N%=U%(J%):I%!4=O%:I%!8=t%:I%!16=t%+qy%:I%!24=N%:SYS&400C2,,I%TOg%:t%-=54:NEXT:IFq$<>""THEN
  816SYS&400E9,40,,q$TO,,,b%,qy%,,U%:SYS53,U%,4TO,,Xu%:b%=b%<<Xu%:SYS53,U%,5TO,,Xu%:qy%=qy%<<Xu%:O%=32:t%=-&8A:I%!0=M%:I%!4=O%:I%!8=t%:I%!&C=O%+b%:I%!16=t%+qy%:I%!20=&1700601A:$(I%+24)=q$:SYS&400C2,,I%TOg%
  817ENDIF:I%!0=M%:SYS&400CB,,I%:IFqu%THENqu%=FALSE:PROCGy(M%)ELSEPROCo(M%)
  818SYS&400D2,M%,9,0,,-1,-1:SYS&400CF,,I%:b%=I%!&C:I%!0=M%:SYS&400CB,,I%:o%=I%!4:Y%=I%!8:Ty%=I%!&C-I%!4:Q%=I%!16-I%!8:MOUSERECTANGLEo%,Y%,Ty%,Q%:Ky%=0:p_%=FALSE:ZJ%=FALSE:REPEAT:SYS&400C7,,A%TOTy%:CASETy%OF
  819WHEN0:SYS&400CF,,C%:a%=C%!8:IFl_%=TRUEANDa%=0THEN
  820l_%=FALSE:I%!0=K_%:SYS&400CB,,I%:o%=I%!4:Y%=I%!8:Ty%=I%!&C-I%!4:Q%=I%!16-I%!8:MOUSERECTANGLEo%,Y%,Ty%,Q%
  821ENDIF
  822WHEN2:PROCFy(A%!0)
  823WHEN6:Ky%=A%!16:IFA%!8=16ORA%!8=64THENPROCH(M%,A%!16,a%)
  824WHEN8:IFA%!24=&DTHENZJ%=TRUE
  825IFA%!24=27THENp_%=TRUE
  826WHEN17,18:IFA%!16=0THENO_%=TRUE:p_%=TRUE
  827ENDCASE:UNTIL(Ky%>0ANDKy%<Pl%+1)ORp_%ORZJ%:IFZJ%THENKy%=Pl%
  828I%!0=M%:SYS&400C6,,I%:OSCLI("Pointer"):=Ky%
  829DEFPROCgy:ENDPROC
�>!RunImage
0�Produced by BasCompress v1.69 (04 Aug 1995)
G$="MenuBar":��S_:�
7z$="<MenuBar$Dir>":Zu%=0:�hy(z$):�O_:�Jy(G$)��Iy:�
k�`y(A%):�A_:�ry:�F_:�W_(b$):ș&406C0:�J_:�n(iJ%,0,-&64):�u_:�U:�iy(Cy%):X$=�Ly:J$=X$:�J$=""�J$="NewBar"
$v$=�u(J$):_%=�j(v$,J$):�_%��N:�
)ș&406C0:�h(J$):�Q_:�g:ș&406C2:�Zu%�
S$(0)="":S$(1)=""
	
�:��v(1)

O_%=�:��Yy:�O_%:�N:�
b��hy(z$):�g$,p$,V%,R%:g$=z$+".Overlays":ș8,&D,g$�V%:�V%=0��0,"Can't find Overlay directory":�
(p$=g$+".OvNames":ș8,&D,p$�V%:�V%=1�

0F%=�(p$):R%=0:ȕ��#F%:A$=�#F%:R%+=1:�:�R%>0�
:�S$(R%-1):�#F%=0:�J%=0�R%-1:A$=�#F%:S$(J%)=g$+"."+A$:�
�:�#F%:F%=0:�R%�ȣS$()

Zu%=R%
�:Zu%=0
�:�
)��Yy:oy%=0:ș&400C7,oy%,A%�ll%:Ȏll%�

�0:�M_
�2:�Fy(A%!0)
�3:�G(A%!0)
�6:�By(A%)
�7:�n_(A%,q%,Uy%,Su%)
�8:�wy(A%)
�9:�v_(A%)
�17,18:�b_(A%)

�19:�P
�:�
*��N:�Iy:$A%="TASK":ș&400DD,XJ%,A%!0:�
!ݤJy(G$):�N%:N%=�:�Xy(G$)>0�
 *N%=�:z%=�q(G$+" is already running",2)
!	�:=N%
"#��M_:�J%,x%,M%:Fl%=�:�Fl%<>GJ%�
#`%=1:�Y(`%,w%):GJ%=�
$�:�d_%��uy
%�`J%��P:`J%=�
&	�by%�
'�N%(by%)�by%>=`%�
(�_(Z%(by%))
)�:by%+=1:�by%>w%�
*!by%=�:�Vy%��l(i_%,k_%,Dy%,G%)
+�
,�:�cy%�
-�G%(cy%)�cy%>=`%�
.�C(Z%(cy%))
/�:cy%+=1:�cy%>w%�cy%=�
0�:�sJ%�
1�Iy%=1��K(G%,"name")
2�Iy%=2��K(G%,"type")
3	sJ%=�
4�:�W_%�
5	�aJ%�
6ș&400DE,"Run "+V$:aJ%=�
7�:�`_%��o(V$)�
83ș&406C0:�J%=1�W_%:�jy(J$(J%),V$):�:W_%=�:`_%=�
9�
:�
;�:ș&406C2
<�:�wy%<>dJ%�
=	�wy%�
>�Z(Fy%,1,&C):wy%=�:dJ%=wy%
?�:�Z(Fy%,1,2):wy%=�:dJ%=wy%
@�
A�:笤Yy(iJ%)�wy%=�
B)ș&400CF,,C%:x%=C%!0:M%=C%!&C:�BJ%<0�
C�Vy(M%)��-2�
D�(x%+2)>=Au%��Ry
E
�x%=0��Uy
F�
G�:�
H6ݤA(d%):�P_%,Hy%:ș30,6,,,d%�,,P_%;Hy%:�(Hy%�1)=1�
I*�0,"Couldn't claim workspace from RMA"
J
�:=P_%
K%��A(�P_%):ș&2001E,7,,P_%:P_%=0:�
L���Iy:�A(Ou%):�A(Ml%):�A(_u%):�A(ty%):�A(py%):�A(HJ%):�A(D_%):�A(L_%):�A(H_%):�A(bJ%):�A(zy%):�A(zl%):�A(u_%):�A(h_%):�A(gJ%):�A(s_%):�A(zJ%):�A(_J%):�A(b_%):�A(y_%):�A(tJ%):�A(Gu%):�A(UJ%):�A(ku%):�A(Gl%):�A(Yu%):�A(I%):�A(Bu%):�A(Cu%):�A(Ju%)
MS�A(Pu%):�A(Wu%):�A(x_%):�A(A):�A(iy%):�A(ey%):�A(o_%):�A(mu%):�A(V_%):�A(Ru%):�
N��b_(A%):ȎA%!16�
O
�0:O_%=�x
P�2:�e_(A%)
Q�3:�y_(A%)
R�4
S�8:�sy(A%)
T�&400C0:�xy(A%)
U�&400C1:GJ%=-1
V�:�
W��sy(A%):�d%,Nl%,Rl%:�l%�
XAd%=A%!0:Nl%=A%!4:Rl%=A%!20:A%!&C=A%!8:ș&400E7,19,A%,Nl%:�x�
YO_%=�:�(Rl%�1)=0�d%<24�
Z,ș&400D3,,A%:A%!24=508:ș&400E7,8,A%,Nl%
[�
\�
]�:�
^ݤx:�U%:U%=�:�l%�
_�M$="Command: Quit MenuBar,...but changes have been made!":O$="Ignore changes,Cancel command,Save changes":z%=�S(M$,O$,2):Ȏz%�
`�0:U%=�
a�1:U%=�
b�2:U%=�
c�3:�L(J$):U%=�
d�
e	�:=U%
f*��h(J$):�Z$,_%:_%=�:�J$=""�J$="NewBar"
gZ$=B$+"."+J$:�Z(Z$)�
h$ș8,5,Z$�,,,,e%:zu%=�Ry:�e%>zu%�
i d%=�w:_%=�_(d%+e%-zu%):�_%�
j?M$="Not enough room to load data":z%=�S(M$,"Cancel",3):�N:�
k�
l)�:ș8,&FF,Z$,D%,0:w%=?D%:T%=D%+e%:�ky
m
�:�Qy(w%)
n�:�
oa��Qy(w%):�J%,O%::::u%=2:JJ%=y%*44+50+u%:sy%=�O:Z_%=&f0+4:O%=0:�J%=1�r%:�Z_(J%,O%):O%+=Z_%:�:�
p���Z_(N%,O%):ly%=O%:QJ%=sy%:t_%=sy%-JJ%:NJ%=ly%+&f0:w_%=0:r_%=0:B%=-&7FFFFFAE:SJ%=0:e_%=0:FJ%=&f0:CJ%=JJ%:A%(N%)=�`(ly%,t_%,NJ%,QJ%,w_%,r_%,B%,m%,SJ%,e_%,FJ%,CJ%,""):B%=(Qy%<<28)+(xy%<<24)+&A11D:ry%=�R(A%(N%),-2,0,&f0+4,50,B%,"",C%(N%),Bu%,&D):�
q=��c_:�J%,K%,L%,G%:oJ%=1:�J%=1�w%:L%=Z%(J%):�L%>oJ%�oJ%=L%
r�:Tl%=oJ%-w%:�Tl%�
s2�J%=1�w%:Wy%=�:�K%=1�w%:L%=Z%(K%):�L%=J%�Wy%=�
t�:�Wy%�G%=J%
u�
v
�:G%=w%+1
wF�:w%+=1:$C%(G%)="Menu "+�G%:Z%(w%)=G%:`%=1:�Y(`%,w%):�C(G%):l%=�:�
x}��y_(A%):�J%,p%,Q%,o%,_y%,A$,M%,H%,f%,V%,F$:M%=A%!20:H%=A%!24:S$=�Q(A%+44):A%!&C=A%!8:A%!16=4:ș&400E7,17,A%,A%!4:�M%<1��
y�M%=Fy%��P_(A%):�
z%G%=�N(M%):o$=S$:�-3��T_(H%,S$):�
{'h%=�F(G%):Ry%=h%+1:X%=�M(h%):�X%>0�
|Wy%=�Hy(h%,Ry%,o$):�Wy%>0��
}�:�X%=y%�`J%=�:�
~OV%=A%!40:f%=�U(S$):F$=�J(S$):Xy%=�:a$=�I(f%,V%,F$,0):�Xy%�N%=&A913�N%=&A113
LB%=(m%<<28)+(Jy%<<24)+N%:Q%=50+(X%*44)+u%:`y%=�L(Ry%):�L_(o$,Ry%):�_%��
��dy(`y%,h%,X%):�_%��
��X%+=1:ky%+=1:o%=S%(G%,X%):$o%=F$:_y%=F%(G%,X%):$_y%="S"+a$:ry%=�R(M%,&C,Q%,&f0-24,44-u%,B%,"",o%,_y%,56):ș&400CF,,A%:c%=A%!16:�c%>0�
��b(M%,ry%,c%):�B(G%,c%,1)
��:�B(G%,X%,1)
��:�Iy%�sJ%=�
��M(h%)=1��f(G%,dy%)
��O(M%):l%=�:�
�5��T_(H%,S$):�V%:V%=0:�H%>0�V$=�C(G%,H%):V%=�P(V$)
�
�V%=8192�
�(`_%=�:W_%+=1:aJ%=�o(V$)=�:J$(W_%)=S$
��:`_%=�
��:�
�w��P_(A%):�S$,F$,V%,Z$,A$,_%,pu%,Sl%:_%=�:pu%=�:Sl%=�:A$="":S$=�Q(A%+44):F$=�J(S$):V%=�P(S$):�V%=8192�F$="!MenuBar"�
�Z$=S$+".MenuData":�Z(Z$)�
��P(Z$)=&FFD�pu%=�
��
��:�Cy%<Yy%�
��r%>=&A�y%>=30�Sl%=�
��:�pu%�Sl%�
��Z(B$+".MenuData")�
�\M$="'"+F$+"' already exists,OK to overwrite?":z%=�S(M$,"Cancel,Overwrite",2):�z%<>2�_%=�
�
�:�_%�
��x$="A~C~DF~L~N~P~QR~S~T~V":�("Copy "+Z$+" "+B$+".MenuData "+x$):F%=�(B$+".MenuData"):�#F%=16:�#F%,&B:�#F%,0:�#F%,2:�#F%,7:�#F%,0:�#F%:F%=0:�U:�Cy%=1�
�X$="MenuData":�c(X$)
�'�:�R:�z("MenuData"):�Ty("MenuData")
��
��:�P
��:�
�D��f(Fi%,Li%):�M%:M%=A%(Fi%):�M(M%,0,(Qy%<<28)+(Li%<<24)+&A13D):�
�ݤI(f%,V%,F$,d%):�W$:Ȏd%�
��0:W$="small_xxx"
��1:W$="file_xxx"
��:Xy%=�:Ȏf%�
��0:W$="notfound"
��1,3:W$=�Iy(V%,d%)
��2:W$=�Ny(F$,d%)
�	�:=W$
�"ݤIy(V%,d%):�N$,B%:Xy%=�:Ȏd%�
��0:N$="small_"+�~V%
��1:N$="file_"+�~V%
�'�:ș&600E9,24,,N$�;B%:�(B%�1)=0�=N$
��d%=1�="file_xxx"
�;N$="file_"+�~V%:ș&600E9,24,,N$�;B%:�(B%�1)=0�Xy%=�:=N$
�="small_xxx"
�*ݤNy(P$,d%):�N$,B%:Xy%=�:�P$,1)<>"!"�
�	Ȏd%�
��0:="small_dir"
��1:="directory"
��
��:Ȏd%�
��0:N$="sm"+P$
��1:N$=P$
�'�:ș&600E9,24,,N$�;B%:�(B%�1)=0�=N$
�N$=P$:�d%=0�
�+ș&600E9,24,,N$�;B%:�(B%�1)=0�Xy%=�:=N$
��:Ȏd%�
��0:="small_app"
��1:="application"
�	�:=""
�f��q_(G%):�J%,M%:Vy%=�:M%=A%(G%):Z%=�a(M%):Q%=�F(G%):X%=�M(Q%):�J%=1�X%:�Jy(M%,J%):�:�G(M%):�Z%<w%�
�!�J%=Z%�w%-1:Z%(J%)=Z%(J%+1):�
�E�:h%=�F(G%):Ry%=h%+1:�Wy(Ry%):�Wy(h%):w%-=1:`%=1:�Y(`%,w%):l%=�:�
�S��s(M%,s%):�J%:ș&406C0:Vy%=�:�J%=s%�1�-1:p%=M%(J%):�I(M%,p%):�:ș&406C2:l%=�:�
�&��I(M%,p%):�J%,X%,S$,B%,N%:�p%<1��
�AG%=�N(M%):h%=�F(G%):Ry%=h%+1:X%=�M(h%):�j_(h%,Ry%,p%):�p%<y%�
���J%=p%�X%-1:$S%(G%,J%)=$S%(G%,J%+1):$F%(G%,J%)=$F%(G%,J%+1):N%=�V(G%,J%+1):�B(G%,J%,N%):A%!0=M%:A%!4=J%+1:ș&400CE,,A%:B%=A%!24:�M(M%,J%,B%):�
�n�:A%!0=M%:ș&400CB,,A%:Dl%=A%!8:N_%=A%!16:Xl%=N_%-(X%*44)-(50)-u%:�Jy(M%,X%):X%-=1:ky%-=1:�X%=0��f(G%,xy%)
��(Dl%-Xl%)<50�
��C(G%):�_(G%)
��:�O(M%):l%=�:�
Ƅ��Cy(q%):�J%,K%,Sy%,yu%,kJ%,tl%,hl%:A_%=�:ș&400CF,,A%:x%=A%!0:v%=A%!4:Gy%=A%!&C:c%=A%!16:yu%=�a(q%):kJ%=�a(Gy%):�kJ%<1�q%=Gy%��
��yu%<kJ%�Sy%=1�Sy%=-1
�S�J%=yu%�(kJ%-Sy%)�Sy%:tl%=Z%(J%):hl%=Z%(J%+Sy%):�V_(tl%,hl%,J%,J%+Sy%):�:l%=�:�
�Vݤa(M%):�J%,L%,N%:L%=�N(M%):J%=1:�:N%=Z%(J%):J%+=1:�N%=L%�J%>w%:�N%=L%�J%-=1�J%=-1
�=J%
���V_(uu%,iu%,jy%,B_%):A%!0=A%(uu%):ș&400CB,,A%:hu%=A%!4:A%!0=A%(iu%):ș&400CB,,A%:Ku%=A%!4:A%!0=A%(uu%):ș&400CB,,A%:A%!4=Ku%:A%!&C=Ku%+&f0:ș&400C5,,A%:A%!0=A%(iu%):ș&400CB,,A%:A%!4=hu%:A%!&C=hu%+&f0:ș&400C5,,A%:Z%(jy%)=iu%:Z%(B_%)=uu%:�
�[��K_(M%,c%):�J%,K%,Vl%:s%=�W(M%):G%=�N(M%):L%=Z%(G%):Q%=�F(L%):X%=�M(Q%):�c%=-1�c%=X%+1
� Vl%=c%>M%(s%):�J%=1�s%:�Vl%�
�)K%=0:�K%+=1:��B(q%,K%):�b(M%,K%,c%-1)
�,�:K%=X%+1:�K%-=1:��B(q%,K%):�b(M%,K%,c%)
�	�:�:�
�O��b(q%,Uy%,c%):�J%,Sy%,j%,xl%,N%,Zy%,Q%,Ul%,X%:j%=�N(q%):Q%=j%*2-1:�c%=k%��
�#Q%=�F(j%):X%=�M(Q%):�c%=0�c%=X%
��Uy%<c%�Sy%=1�Sy%=-1
���J%=Uy%�c%�Sy%:A%!0=q%:A%!4=J%:ș&400CE,,A%:B%(J%)=A%!24:�:xl%=�Y(Q%,Uy%):B%(0)=B%(Uy%):$S%(j%,0)=$S%(j%,Uy%):$F%(j%,0)=$F%(j%,Uy%):Ul%=�V(j%,Uy%):�J%=Uy%�(c%-Sy%)�Sy%:Zy%=�G(Q%)+(J%-1)*4:N%=�Y(Q%,J%+Sy%):!Zy%=N%:�M(q%,J%,B%(J%+Sy%))
��$S%(j%,J%)=$S%(j%,J%+Sy%):$F%(j%,J%)=$F%(j%,J%+Sy%):N%=�V(j%,J%+Sy%):�B(j%,J%,N%):�:Zy%=�G(Q%)+(c%-1)*4:!Zy%=xl%:�M(q%,c%,B%(0)):$S%(j%,c%)=$S%(j%,0):$F%(j%,c%)=$F%(j%,0):�B(j%,c%,Ul%):�W(q%,c%):�O(q%):l%=�:�
�3ݤCy(U%,Ty%):�Zy%:Hu%=(U%+8)�8:�Zy%Hu%*Ty%:=Zy%
�`��B(U%,Ty%,N%):�F_%,LJ%,__%,oy%:F_%=(Ty%*Hu%)+(U%�8):LJ%=U%�8:oy%=2^LJ%:__%=?(xJ%+F_%):ȎN%�
��0:__%=__%�(&FF-oy%)
��1:__%=__%�oy%
��:?(xJ%+F_%)=__%:�
�dݤV(U%,Ty%):�F_%,LJ%,Zy%,oy%:F_%=(Ty%*Hu%)+(U%�8):LJ%=U%�8:oy%=2^LJ%:Zy%=xJ%+F_%:=(?Zy%�oy%)�oy%
�v��C(G%):A%!0=A%(G%):ș&400CC,,A%:ny%=A%!16:A%!8=ny%-50+u%:A%!&C=A%!4+(A%!52-A%!44):A%!24=A%!16-A%!8:ș&400C5,,A%:�
�;��_(G%):�X%,M%,Q%:Q%=�F(G%):M%=A%(G%):X%=�M(Q%):�X%=0��
�bA%!0=M%:ș&400CB,,A%:ny%=A%!16:A%!8=ny%-(X%*44)-(50)-u%:A%!&C=A%!4+&f0:A%!28=-1:ș&400C5,,A%:�
���x:G%()=�:cy%=1:�
���w:N%()=�:by%=1:�
�]��d:�J%,L%:A%!0=Fy%:ș&400CB,,A%:A%!28=-1:ș&400C5,,A%:�J%=1�w%:L%=Z%(J%):�L%>=`%��yy(L%)
��:�
�G��yy(G%):�M%:M%=A%(G%):A%!0=M%:ș&400CB,,A%:A%!28=-1:ș&400C5,,A%:�
�1��a:�J%,L%:�J%=1�w%:L%=Z%(J%):�L%>=`%��ay(L%)
�2�:A%!0=Fy%:ș&400CB,,A%:A%!28=0:ș&400C5,,A%:�
�v��ay(G%):�M%,n_%,ny%:M%=A%(G%):A%!0=M%:ș&400CB,,A%:n_%=A%!8:ny%=A%!16:A%!28=-2:ș&400C5,,A%:�n_%=ny%-50+u%��C(G%)
��
�<ݤu(D$):�J%,Z$,a_%,wl%,U%,A$:A$="":Z$=B$+"."+D$:�Z(Z$)�
�.F%=�(Z$):�#F%=32:a_%=�#F%:wl%=�#F%:�a_%>0�
�$�:U%=�#F%:�U%>31�U%-=wl%:A$+=�U%
��U%<32��A$>9
��:�#F%:F%=0
�	�:=A$
�0ݤj(v$,D$):�eu%,_%,M%:M%=Nu%:_%=�:�v$=""�=_%
�ș&406C2:$Yl%="MenuBar '"+D$+"'":�Gy(M%):�S(M%,3,""):�t(M%,3):A%!0=M%:ș&400CB,,A%:ȗȓA%!4,A%!8,A%!&C-A%!4,A%!16-A%!8:ȗ�A%!&C-48,A%!8+48:�:Ky%=0:MJ%=�:Lu%=�:eu%=�:
��:ș&400C7,,A%�Ty%:ȎTy%�
��6:�By(A%)
��8:�A%!24=&D�Lu%=�
��A%!24=27�MJ%=�
��17,18:�A%!16=0�MJ%=�
� �:�Ky%>0�MJ%�Lu%:�Ky%=2�Lu%�
��i(M%,3)<>v$�
�!�P:�S(M%,3,""):�t(M%,3):eu%=�
��
�0�:�eu%:�G(M%):�("Pointer"):�(Ky%=1�MJ%)�_%=�
�=_%
�+��ky:�J%,L%,_%,R%,ju%,M%:�:���h_(�):�
�#ju%=�:�J%=16�23:�D%?J%<>0�ju%=�
��:�ju%�
�
�m:�Vy(4)
�T�:R%=16:dy%=D%?R%:R%+=1:xy%=D%?R%:R%+=1:Qy%=D%?R%:R%+=1:Jy%=D%?R%:R%+=1:m%=D%?R%
��:�Qy(w%):R%=1:�J%=1�r%:Z%(J%)=D%?R%:R%+=1:�:R%=48:�J%=1�r%:$C%(J%)=$(D%+R%):R%+=16:�:_%=�:�J%=1�w%:L%=Z%(J%):M%=A%(L%):�H_(L%,M%):�:l%=�:�
O��H_(G%,M%):�p%,S$,f%,V%,F$,A$,N$,Q%,o%,_y%,Xy%,N%,Wy%:X%=�M(�F(G%)):�X%>0�
+�p%=1�X%:S$=�C(G%,p%):Wy%=�Z(S$):�Wy%�
0F$=�J(S$):f%=0:V%=0:Xy%=�:a$="notfound":N%=0
F�:F$=�J(S$):f%=�U(S$):V%=�P(S$):Xy%=�:a$=�I(f%,V%,F$,0):N%=1:Ȏa$�
:�"small_xxx","file_xxx","small_app","application":N%=0
�
)�:�B(G%,p%,N%):�Xy%�N%=&A913�N%=&A113
�B%=(m%<<28)+(Jy%<<24)+N%:o%=S%(G%,p%):$o%=F$:_y%=F%(G%,p%):$_y%="S"+a$:Q%=50+(p%-1)*44+u%:ry%=�R(M%,&C,Q%,&f0-24,44-u%,B%,"",o%,_y%,56):ky%+=1:�
	�:�

'��h_(Ri%):�$,"Disc not found")>0�
�y$=""�
.z%=�S("Disc not found","Kill task",3):�N:�

S�:M$="Disc not found,Load bar '"+y$+"'?":z%=�S(M$,"Load bar,Kill task",2):Ȏz%�
�0,1:D$=y$:�z(D$)
�2:�N:�
�
�
�:�v(1)
�:�
_ݤW(M%):�J%,N%,Q%,X%:N%=0:G%=�N(M%):Q%=�F(G%):X%=�M(Q%):�J%=1�X%:�B(M%,J%)�N%+=1:M%(N%)=J%
	�:=N%
,��j:�J%,L%:�J%=1�w%:L%=Z%(J%):�J(L%):�:�
R��Oy(G%):�J%,X%,M%,Q%,S$,V%:�j:Q%=�F(G%):M%=A%(G%):X%=�M(Q%):s%=�W(M%):�s%<X%�
"�J%=1�X%:笤B(M%,J%)��F(M%,J%)
�
�:�
5��Py(G%):�J%,L%:�J%=1�w%:L%=Z%(J%):�L%<>G%��J(L%)
�:�
G��J(G%):�J%,X%,M%,Q%:Q%=�F(G%):M%=A%(G%):X%=�M(Q%):s%=�W(M%):�s%>0�
!�J%=1�X%:�B(M%,J%)��W(M%,J%)
�
 �:�
!iݤJ(N$):�T$,A$,U%:A$="":U%=�N$:T$=�N$,U%,1):ȕT$<>"."�T$<>":"�U%<>0:A$=T$+A$:U%-=1:T$=�N$,U%,1):�:=A$
"ݤz(N$):�N$,".")=0�=""
#r$=�J(N$):=�N$,�N$-�r$-1)
$-��__(Z$):�V%:V%=�P(Z$):�V%<4096�Z$=�z(Z$)
%�"Filer_OpenDir "+Z$:�
&9ݤQ(P_%):�N%,A$:A$="":�:N%=?P_%:�N%>31�A$+=�N%:P_%+=1
'�N%<32:=A$
($ݤAy(S$):�e%:ș8,5,S$�,,,,e%:=e%
) ݤU(S$):�V%,A$:V%=0:�Z(S$)�
*ș8,5,S$�V%:�V%<0�V%>3�V%=0
+	�:=V%
,DݤZ(S$):�V%,Wy%:Wy%=�:ș&20008,5,S$�V%;Hy%:�(Hy%�1)=1�V%=0�Wy%=�
-=Wy%
.'ݤP(S$):�V%,Zy%,f%,F$:V%=0:�Z(S$)�
/F$=�J(S$):f%=�U(S$):Ȏ��
0�f%=2��F$,1)="!":V%=8192
1�f%=2��F$,1)<>"!":V%=4096
2(:ș8,5,S$�,,Zy%:V%=(Zy%�&FFF00)�256
3�
4	�:=V%
5/ݤDy(A$):�J%,C$,T$,U%,N%:C$=A$:�A$,1)=" "�
60U%=1:�U%+=1:��C$,U%,1)<>" ":C$=�C$,�C$-U%+1)
7�:��A$,1)=" "�
8=U%=�C$:N%=1:�U%-=1:N%+=1:��C$,U%,1)<>" ":C$=�C$,�C$-N%+1)
9	�:=C$
:1ݤN(M%):�J%,j%:j%=0:�J%=1�r%:�A%(J%)=M%�j%=J%
;	�:=j%
<!ݤVy(M%):�J%,N%:N%=�:�M%=Fy%�
=N%=�
>�:�J%=1�r%:�A%(J%)=M%�N%=�
?�
@	�:=N%
AQݤKy(Q$):�J%,T$,U%,A$:A$="":�J%=1��Q$:T$=�Q$,J%,1):U%=�T$:�U%>64�U%<91�U%+=32
BT$=�U%:A$+=T$:�:=A$
C>ݤf(Xy$):�e%:ș&20023,Xy$,A%,&C8,0,3�,,e%:?(A%+e%)=&D:=$A%
D5ݤe(M%,Pi%):!C%=M%:ș&400CB,,C%:=Pi%-(C%!20-C%!4)
E6ݤT(M%,Wi%):!C%=M%:ș&400CB,,C%:=Wi%-(C%!24-C%!16)
F?ݤb:�fl%,vl%:ș53,-1,&B�,,fl%:ș53,-1,4�,,vl%:=(fl%+1)<<vl%
G?ݤO:�Ql%,bl%:ș53,-1,&C�,,Ql%:ș53,-1,5�,,bl%:=(Ql%+1)<<bl%
H��Ay�1,-&A,&C8,1:�
I��P�1,-&A,50,4:�
J8��wy(A%):�M%,H%,Jl%:M%=A%!0:H%=A%!4:Jl%=A%!24:ȎJl%�
K�&D:�B_(M%)
L�27:�py(M%)
M	�6:�d
N	�2:�a
O
�&F:�w
P	�3:�x
Q
�26:�j
R�79:�G%>0��_(G%)
S�67:�G%>0��C(G%)
T�83:�G%>0��Oy(G%)
U�90:�G%>0��J(G%)
V�387:�L(J$)
W�388:�gy
X�396:�Uy
Y�397:�Ry
Zș&400DC,Jl%
[�:�
\��B_(M%):�k(Ly%)��k(4)
]�
^��py(M%):�k(Ly%)��Ky(4)
_�
`��Ry:�Fu%>Au%�
a.L%=Z%(`%):M%=A%(L%):�G(M%):`%+=1:�Y(`%,w%)
b�:�
c��Uy:�`%>1�
d`%-=1:�Y(w%,`%)
e�:�
f9��t(M%,H%):�A$:A$=�i(M%,H%):ș&400D2,M%,H%,,,-1,�A$:�
gV��By(A%):�J%,x%,v%,a%,M%,H%:x%=A%!0:v%=A%!4:a%=A%!8:M%=A%!&C:H%=A%!16:lJ%=�O:ȎM%�
h)�K_%:Ky%=H%:�a%=16�a%=64��H(M%,H%,a%)
i�g_%,q_%,-2
j�Nu%:Ky%=H%
k�Ly%:�D_(H%,a%)
l�Fy%:�N_(x%,v%,a%,M%)
m:k%=0:�M%>0�H%>0�k%=H%
ns%=�W(M%):�s%=1�k%=M%(1)
o�M%>0�G%=�N(M%)
p	Ȏa%�
q�2:�v%>=(lJ%-4)�
r�a
s�:�l(x%,v%,M%,G%)
t�
u:ȎH%�
v
�-1:Ȏa%�
w!�1,4,64,16:�u(G%,M%,H%,a%,x%)
x�
y�0:Ȏa%�
z�1:�-1��x��C(G%)
{�4:�-1��w��_(G%)
|�256:�-2��a
}�&400:�-2��d��o(M%)
~�64,16:�u(G%,M%,H%,a%,x%)
�
�:�u(G%,M%,H%,a%,x%)
��
��
��:�
�"��u(G%,M%,H%,a%,x%):�J%:�H%=0�
�	Ȏa%�
��16,64:�H(M%,H%,a%)
��
�
�:�H%=-1�
�	Ȏa%�
�>�1,4:A%!0=M%:ș&400CB,,A%:fJ%=A%!4:RJ%=A%!&C:�(x%-fJ%)<24�
�
�a%=4�
��j
�
�:�Py(G%)
��
��:�(x%-RJ%)<24�a%=4��o(M%)
��
��16,64:�H(M%,H%,a%)
��
��:�H%>0�
��Py(G%):Ȏa%�
��1,4:S$=�C(G%,H%):�Z(S$)�
�'V%=�P(S$):�V(G%,H%)=0��V(S$,G%,H%)
��My(M%,H%,a%)
��
��16,64:s%=�W(M%):�s%=1�
�S$=�C(G%,H%):�Z(S$)�
��V(S$,G%,H%):�H(M%,H%,a%)
��
��:�s%>1�
�&�J%=1�s%:S$=�C(G%,M%(J%)):�Z(S$)�
��V(G%,M%(J%))=0�
�"�V(S$,G%,M%(J%)):�F(M%,M%(J%))
��
��:�:�H(M%,H%,a%)
��
��
��256,&400:�a_(G%,M%,H%,a%)
��
��:�
���a_(G%,M%,H%,a%):Ȏa%�
�&�&400:笤B(M%,H%)��J(G%):�F(M%,H%)
��256:�Ly(M%,H%)
��:�
�c��My(M%,H%,a%):�S$,F$,f%,wu%,Ay$:�W(M%,H%):G%=�N(M%):wu%=�a(M%):S$=�C(G%,H%):V%=�P(S$):�Z(S$)�
��a%=1�a%=16�
�G%()=0:G%(wu%)=�:cy%=wu%
��:ș&400DE,"Filer_Run "+S$
��:�
�>��N_(x%,v%,a%,M%):�O%,t%:O%=�e(Fy%,54):t%=�T(Fy%,46):Ȏa%�
��1:Ȏ��
�ɦ-1:�x
�ɦ-2:�a
��vy(O%,t%)
��
��2:�`(O%,t%,M%)
��4:Ȏ��
�ɦ-1:�w
�ɦ-2:�d
��by
��
��:�
����vy(O%,t%):�I$,M%:M%=al%:I$=�K("%z12:%mi %am"):�S(M%,2,I$):I$=�K("%we"):�S(M%,3,I$):I$=�K("%zdy %m3 %ce%yr"):�S(M%,4,I$):�n(M%,O%,t%+&C):�Yy:�ȗO%,t%,Y%:�Y%=0:�G(M%):�
�YݤK(Cy$):�M_%:Cy$+=�0:?UJ%=3:ș7,&E,UJ%:ș&4304B,-1,UJ%,Gu%,31,Cy$�,M_%:?M_%=&D:=$Gu%
���by:wy%=�wy%:�wy%��g��f_
��
���g:�t(iJ%,0):wy%=�:�
���f_:ș&400D2,-1:�
�&ݤc:ș6,&A1,28�,,OJ%:�(OJ%�2)=0�=�
�=�
�'ݤUy:ș6,&A1,28�,,OJ%:�(OJ%�4)=0�=�
�=�
����H(M%,H%,a%):�X%,Q%:q%=M%:Uy%=H%:yy%=a%:A%!0=M%:ș&400CB,,A%:fJ%=A%!4:Gi%=A%!8:RJ%=A%!&C:Zi%=A%!16:Hi%=A%!24:qJ%=A%!4-A%!20:wJ%=A%!16-A%!24:ș&400CF,,A%:x%=A%!0:v%=A%!4:Su%=A%!8:A%!0=M%:A%!4=H%:ș&400CE,,A%:Ȏq%�
�[�K_%:A%!0=M%:A%!4=1:dl%=�b:lJ%=�O:A%!24=0:A%!28=0:A%!32=dl%:A%!36=lJ%:l_%=�:C_%=�:my%=1
�:G%=�N(q%):�G%<1��
�DQ%=�F(G%):X%=�M(Q%):C_%=�c:A_%=�:tu%=�:my%=1:�H%=-1�(x%-fJ%)<24�
̫tu%=�:C_%=�:A%!0=q%:ș&400CB,,A%:cJ%=A%!4:vy%=A%!8:Uu%=A%!&C:N_%=A%!16:A%!0=q%:A%!4=6:A%!8=x%:A%!&C=v%:A%!16=x%+4:A%!20=v%+4:A%!24=cJ%:A%!28=vy%+50:A%!32=Uu%:A%!36=N_%
��:�H%=-1�(RJ%-x%)<24�H%=0
�
�H%=0�
�	�-3�
�A_%=�:�C_%�
�RIJ%=x%-24:nJ%=x%+24:TJ%=v%-16:ay%=v%+16:A%!8=IJ%:A%!&C=TJ%:A%!16=nJ%:A%!20=ay%
�0�:A%!8=x%:A%!&C=v%:A%!16=x%:A%!20=v%:my%=ty%
�D�:A%!0=q%:A%!4=5:A%!24=0:A%!28=0:A%!32=&7FFFFFFF:A%!36=&7FFFFFFF
���:d_%=�:C_%=�:A%!0=A%(G%):ș&400CB,,A%:Ci%=A%!4:n_%=A%!8:Di%=A%!&C:ny%=A%!16:qJ%=A%!4-A%!20:wJ%=A%!16-A%!24:ș&400CF,,A%:x%=A%!0:v%=A%!4:A%!0=A%(G%):A%!4=0:ș&400CE,,A%:Kl%=A%!20-A%!&C:A%!8=A%!8+qJ%+2:A%!&C=A%!&C+wJ%+2:A%!16=A%!16+qJ%-2
�yA%!20=A%!20+wJ%-2:Ol%=Kl%-(v%-n_%):xu%=v%-n_%:A%!4=7:A%!24=x%:A%!32=x%:A%!28=ny%-(X%*44)-(50-xu%):A%!36=ny%-Ol%+u%+u%
��
��:�H%>0�
�$�F(M%,H%):s%=�W(q%):my%=1:�C_%�
ٮIJ%=�e(q%,A%!8):nJ%=�e(q%,A%!16):A%!0=q%:A%!4=M%(1):ș&400CE,,A%:TJ%=�T(q%,A%!&C):A%!0=q%:A%!4=M%(s%):ș&400CE,,A%:ay%=�T(q%,A%!20):A%!8=IJ%:A%!&C=TJ%:A%!16=nJ%:A%!20=ay%
�(�:A%!8=x%:A%!&C=v%:A%!16=x%:A%!20=v%
�D�:A%!0=q%:A%!4=5:A%!24=0:A%!28=0:A%!32=&7FFFFFFF:A%!36=&7FFFFFFF
��
��:Xy%=�:�C_%�
�(W$=�My(G%,k%):Hy%=69:�fy%=0�Hy%+=256
�ș&42400,Hy%,my%,W$,A%+8
��:ș&400D0,,A%
��:�
�$ݤMy(G%,k%):�S$,F$,f%,V%,W$:�k%�
�.S$=�C(G%,k%):F$=�J(S$):f%=�U(S$):V%=�P(S$)
��:�s%>1�f%=4
�
�A_%�f%=5
�	Ȏf%�
��0:W$="notfound":my%=ty%
��4:W$="bundle":my%=ty%
��5:W$="move":my%=ty%
�W$=�I(f%,V%,F$,1)
�	�:=W$
���uy:ș&400CF,,A%:Ni%=A%!0:gl%=A%!4:a%=A%!8:M%=A%!&C:H%=A%!16:A%!0=A%(G%):ș&400CC,,A%:A%!8=gl%-xu%-u%:A%!&C=A%!4+(A%!52-A%!44):A%!24=A%!16-A%!8:�a%=4�A%!28=-1
�ș&400C5,,A%:�
�J��n_(A%,q%,Uy%,Su%):el%=�c:Si%=A%!0:c_%=A%!4:Xi%=A%!8:AJ%=A%!&C:ȎUy%�
��0:d_%=�:�A_%��Cy(q%)
�
�-1:�tu%�
��i_(c_%,AJ%,Su%)
��:d_%=�:�A_%��Cy(q%)
��
��ly(q%,Uy%,yy%)
��:�
�V��i_(c_%,AJ%,Su%):�J%,M%,H%,X%,Q%:Q%=�F(G%):M%=A%(G%):X%=�M(Q%):�c_%>AJ%�Ȕc_%,AJ%
�mH%=1:�:A%!0=M%:A%!4=H%:ș&400CE,,A%:ay%=A%!20:ay%=�T(M%,ay%):H%+=1:�ay%>c_%:yJ%=H%-1:H%-=1:�yJ%>X%�yJ%=X%
�b�:A%!0=M%:A%!4=H%:ș&400CE,,A%:ay%=A%!20:ay%=�T(M%,ay%):H%+=1:�ay%>AJ%:pJ%=H%-1:�pJ%>X%�pJ%=X%
�
�X%>0�
��J%=yJ%�pJ%:ȎSu%�
��4:�F(M%,J%)
��1:�Ly(M%,J%)
��:�
��:�
����l(x%,v%,M%,G%):�B%,Y%,i%,M$,c$,s$,R$,S$,F$,_l%,cu%,ru%,Oy%,Q%:i_%=x%:k_%=v%:Dy%=M%:Y%=&7000121:i%=&7400121:W%=D_%:Z%=W%+28:W%!&C=&70207:W%!20=44:W%!24=0:$W%=G$:�l%�$W%=G$+" *"
�$b_%="Bar  '"+J$+"'":Z%!0=0:Z%!4=L_%:Z%!8=Y%:Z%!&C=b_%:Z%!16=-1:Z%!20=24:Z%+=24:M$=$C%(G%):$y_%="Menu '"+M$+"'":Z%!0=0:Z%!4=H_%:Z%!8=Y%:Z%!&C=y_%:Z%!16=-1:Z%!20=24:Z%+=24:f%=1:B%=i%:c$="File ''":R$="":S$=�C(G%,k%):F$=�J(S$):s%=�W(Dy%):�s%=1�k%�
�Z(S$)�f%=�U(S$)�f%=0
:s$="File ":R$="File":B%=Y%:�f%=0�s$="Obj.":R$="Object"
#�f%=2�s$="Dir. ":R$="Directory"
�f%=2��F$,1)="!"�
s$="App. ":R$="Application"
�:c$=s$+"'"+F$+"'"
0�:�s%>1�c$="Selection":s$="Sel.":R$=c$:B%=Y%
<_l%=�($b_%):cu%=�($y_%):ru%=�c$:Oy%=_l%:�cu%>Oy%�Oy%=cu%
	�ru%>Oy%�Oy%=ru%

#Oy%=(Oy%+1)*16:�Oy%<&9C�Oy%=&9C
�W%!16=Oy%:$tJ%=c$:Z%!0=&80:Z%!4=bJ%:Z%!8=B%:Z%!&C=tJ%:Z%!16=-1:Z%!20=24:Z%+=24:Y%=&7000021:i%=&7400021:W%=L_%:Z%=W%+28:$W%="Bar":B%=Y%:W%!&C=&70207:W%!16=&D*16:W%!20=44:W%!24=0:A$="Save      F3":Z%!0=0:Z%!4=0:Z%!8=B%:$(Z%+&C)=A$:Z%+=24
MA$="Rename":Z%!0=8:Z%!4=zy%:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:�ky%=0�B%=i%�B%=Y%

LA$="Alter":Z%!0=0:Z%!4=gJ%:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:�ky%<2�B%=i%�B%=Y%
KA$="Sort":Z%!0=0:Z%!4=s_%:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:�ky%=0�B%=i%�B%=Y%
�A$="Find":Z%!0=8:Z%!4=zJ%:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:A$="FilerBoot":Z%!0=0:Z%!4=0:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:�w%<r%�B%=Y%�B%=i%
�A$="Add Menu":Z%!0=2:Z%!4=0:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:A$="Menus: "+�w%+"/"+�r%:Z%!0=&80:Z%!4=0:Z%!8=i%:$(Z%+&C)=A$:W%=H_%:Z%=W%+28:$W%="Menu":B%=Y%:W%!&C=&70207:W%!16=&D*16:W%!20=44:W%!24=0:A$="Rename":Z%!0=8:Z%!4=zy%:Z%!8=B%:$(Z%+&C)=A$:Z%+=24
)Q%=�F(G%):X%=�M(Q%):�X%=0�B%=i%�B%=Y%
KA$="Alter":Z%!0=0:Z%!4=_J%:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:�X%<2�B%=i%�B%=Y%
JA$="Sort":Z%!0=0:Z%!4=s_%:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:�X%=0�B%=i%�B%=Y%
MA$="FilerBoot":Z%!0=0:Z%!4=0:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:�w%=1�B%=i%�B%=Y%
�A$="Remove Menu":Z%!0=2:Z%!4=0:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:A$="Items: "+�X%+"/"+�y%:Z%!0=&80:Z%!4=0:Z%!8=i%:$(Z%+&C)=A$:W%=bJ%:Z%=W%+28:$W%=R$:B%=Y%:W%!&C=&70207:W%!16=&C*16:W%!20=44:W%!24=0:�s%>1�B%=i%�B%=Y%
HA$="Pathname":Z%!0=8:Z%!4=zy%:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:�f%=0�B%=i%
�A$="Info":Z%!0=8:Z%!4=q_%:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:A$="Open parent":Z%!0=0:Z%!4=0:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:B%=Y%:A$="Remove "+s$:Z%!0=&80:Z%!4=0:Z%!8=B%:$(Z%+&C)=A$:W%=gJ%:Z%=W%+28:$W%=R$:B%=Y%:W%!&C=&70207:W%!16=&A*16:W%!20=44:W%!24=0
�$W%="Alter":A$="Open   ^O":Z%!0=0:Z%!4=0:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:A$="Close  ^C":Z%!0=0:Z%!4=0:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:A$="Front  ^F":Z%!0=0:Z%!4=0:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:A$="Back   ^B":Z%!0=&80:Z%!4=0:Z%!8=B%:$(Z%+&C)=A$
�W%=s_%:Z%=W%+28:$W%=R$:B%=Y%:W%!&C=&70207:W%!16=9*16:W%!20=44:W%!24=0:$W%="Sort":A$="by Name":Z%!0=0:Z%!4=0:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:A$="by Type":Z%!0=&80:Z%!4=0:Z%!8=B%:$(Z%+&C)=A$:W%=zJ%:Z%=W%+28:$W%=R$:B%=Y%
�W%!&C=&70207:W%!16=5*16:W%!20=44:W%!24=0:$W%="Find":A$="Leaf":Z%!0=8:Z%!4=zy%:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:A$="Path":Z%!0=&88:Z%!4=zy%:Z%!8=B%:$(Z%+&C)=A$:W%=_J%:Z%=W%+28:$W%=R$:B%=Y%:W%!&C=&70207:W%!16=&B*16:W%!20=44:W%!24=0:$W%="Alter"
�A$="Open    "+�&8B+"O":Z%!0=0:Z%!4=0:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:A$="Close   "+�&8B+"C":Z%!0=0:Z%!4=0:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:A$="Select  "+�&8B+"S":Z%!0=0:Z%!4=0:Z%!8=B%:$(Z%+&C)=A$:Z%+=24
WA$="Clear   "+�&8B+"Z":Z%!0=&80:Z%!4=0:Z%!8=B%:$(Z%+&C)=A$:ș&400D4,,D_%,x%-64,v%:�
���`(x%,v%,M%):�B%,Y%,i%,W%,Z%,A$:i_%=x%:k_%=v%:Dy%=M%:Y%=&7000021:i%=&7400021:B%=Y%:W%=D_%:Z%=W%+28:W%!&C=&70207:W%!16=&D*16:W%!20=44:W%!24=0:$W%=G$:�l%�$W%=G$+" *"
�A$="Library":Z%!0=8:Z%!4=u_%:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:A$="Sprites":Z%!0=0:Z%!4=L_%:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:A$="SysVars":Z%!0=0:Z%!4=H_%:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:A$="Choices...":Z%!0=8:Z%!4=Ly%:Z%!8=B%:$(Z%+&C)=A$:Z%+=24
�A$="Shortcuts...":Z%!0=2:Z%!4=0:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:A$="Info":Z%!0=0:Z%!4=g_%:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:A$="Quit":Z%!0=&80:Z%!4=0:Z%!8=B%:$(Z%+&C)=A$:W%=L_%:Z%=W%+28:$W%="Sprites":B%=Y%:W%!&C=&70207:W%!16=9*16:W%!20=44:W%!24=0
 UA$="Save":Z%!0=0:Z%!4=0:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:�Z(U$+".Sprites")�B%=Y%�B%=i%
!�A$="Load":Z%!0=&80:Z%!4=0:Z%!8=B%:$(Z%+&C)=A$:W%=H_%:Z%=W%+28:$W%="SysVars":B%=Y%:W%!&C=&70207:W%!16=9*16:W%!20=44:W%!24=0:A$="Save":Z%!0=0:Z%!4=0:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:�Z(U$+".SysVars")�B%=Y%�B%=i%
"GA$="Load":Z%!0=&80:Z%!4=0:Z%!8=B%:$(Z%+&C)=A$:ș&400D4,,D_%,x%,v%:�
#���R:�J%,Z$,a_%,A$:W%=u_%:Z%=W%+28:Oy%=&F*16:$W%="Library":W%!&C=&70207:W%!16=Oy%:W%!20=44:W%!24=0:Y%=&7000021:i%=&7400021:�Cy%>0�
$"�J%=1�Cy%:�J%=Cy%�_y%=&A�_y%=8
%&B%=&8000121:�A$(J%)=J$�B%=&B000121
&BZ%!0=_y%:Z%!4=h_%:Z%!8=B%:$X%(J%)=A$(J%):�A$(J%)=X$�Z%!0=_y%+1
'+Z%!&C=X%(J%):Z%!16=-1:Z%!20=16:Z%+=24:�
(��:A$="Bars: "+�Cy%+"/"+�Yy%:Z%!0=2:Z%!4=0:Z%!8=i%:$(Z%+&C)=A$:Z%+=24:A$="Open Lib.":Z%!0=0:Z%!4=0:Z%!8=Y%:$(Z%+&C)=A$:Z%+=24:�Cy%<Yy%�B%=Y%�B%=i%
)7A$="Create":Z%!0=&88:Z%!4=zy%:Z%!8=B%:$(Z%+&C)=A$:�
*���G_(A%):�p%:p%=A%!36:W%=h_%:Z%=W%+28:$W%=A$(p%+1):W%!&C=&70207:W%!16=8*16:W%!20=44:W%!24=0:B%=Y%:A$="Load":Z%!0=0:Z%!4=0:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:A$="Default":Z%!0=0:Z%!4=0:Z%!8=B%:$(Z%+&C)=A$:Z%+=24
+�A$="Delete":Z%!0=0:Z%!4=0:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:A$="Rename":Z%!0=8:Z%!4=zy%:Z%!8=B%:$(Z%+&C)=A$:Z%+=24:A$="Copy as":Z%!0=&88:Z%!4=zy%:Z%!8=B%:$(Z%+&C)=A$:�
,d��xy(A%):�Bl%,O%,t%,hy%,Ay%,Py%:Bl%=A%!20:O%=A%!24:t%=A%!28:hy%=A%!32:Ay%=A%!36:Py%=A%!40:ȎBl%�
-�q_%:�ny
.�zy%:�qy(hy%,Ay%,Py%)
/�u_%:�R
0�h_%:�G_(A%)
1�Ly%:�r:Q_%=Jy%:X_%=m%
2�:ș&400E8,,Bl%,O%,t%:�
3���qy(hy%,Ay%,Py%):�P$:W%=zy%:Z%=W%+28:W%!&C=&70207:W%!16=&B*16:W%!20=44:W%!24=0:B%=&7000121:Z%!0=&84:Z%!4=0:Z%!8=B%:�Dy%=Fy%�
4
ȎAy%�
5�Cy%+2:P$="NewBar"
6�:ȎPy%�
7�3,4:P$=A$(Ay%+1)
86�:$ey%=P$:$W%="Name:":Z%!&C=ey%:Z%!16=o_%:Z%!20=&B
9�:Ȏhy%�
:
�0:ȎAy%�
;=�1:$W%="Name:":P$=J$:$ey%=P$:Z%!&C=ey%:Z%!16=o_%:Z%!20=&B
<
�4:ȎPy%�
=3�0:$W%="Find leaf:":Z%!&C=x_%:Z%!16=-1:Z%!20=&B
>3�1:$W%="Find path:":Z%!&C=Qu%:Z%!16=-1:Z%!20=&B
?�
@�
AA�1:$W%="Name:":P$=$C%(G%):$iy%=P$:Z%!&C=iy%:Z%!16=-1:Z%!20=&D
BB�2:$W%="Pathname:":$HJ%=�C(G%,k%):Z%!&C=HJ%:Z%!16=-1:Z%!20=256
C�
D�:�
E��v_(A%):�Dy%=Fy%�
F�cy(A%)
G
�:�t_(A%)
H�:�
IV��cy(A%):hy%=A%!0:Ay%=A%!4:Py%=A%!8:WJ%=A%!&C:ș&400CF,,A%:a%=A%!8:Vy%=a%=1:Ȏhy%�
J�0:�d_(hy%,Ay%,Py%,WJ%)
K
�1:ȎAy%�
L
�0:�my
M�1:ș&406C0:�Zy:ș&406C2
N�
O
�2:ȎAy%�
P�0:ș&406C0:�m_:ș&406C2
Q�1:ș&406C0:�Hy:ș&406C2
R�
S�2
T.�3:�r:Q_%=Jy%:X_%=m%:�ty(Ly%):ș&400D4,,-1
U7�4:Ay$=z$+".Shortcuts":�Z(Ay$)��("Filer_Run "+Ay$)
V�5
W
�6:O_%=�x
X�:�Vy%��`(i_%,k_%,Dy%)
Y�
Za��t_(A%):hy%=A%!0:Ay%=A%!4:Py%=A%!8:WJ%=A%!&C:ș&400CF,,A%:a%=A%!8:Vy%=a%=1:G%=�N(Dy%):Ȏhy%�
[
�0:ȎAy%�
\
�0:�L(J$)
]�1:�Py%>=0��C_($ey%)
^
�2:ȎPy%�
_	�0:�w
`	�1:�x
a	�2:�d
b	�3:�a
c�
d
�3:ȎPy%�
e�0:�p("name")
f�1:�p("type")
g�
h
�4:ȎPy%�
i�0:�WJ%>=0��Ny($x_%,Py%)
j�1:�WJ%>=0��Ny($Qu%,Py%)
k�
l.�5:uy%=�:ș6,&E5,0,0:�w_:ș6,&E5,1,0:uy%=�
m
�6:�c_
n�
o
�1:ȎAy%�
p�0:�$C%(G%)<>$iy%�
q�U_($iy%):�O(Dy%)
r�
s�
t
�1:ȎPy%�
u
�0:�_(G%)
v
�1:�C(G%)
w�2:�Oy(G%)
x
�3:�J(G%)
y�
z
�2:ȎPy%�
{�0:�K(G%,"name")
|�1:�K(G%,"type")
}�
~2�3:uy%=�:ș6,&E5,0,0:�Xy(G%):ș6,&E5,1,0:uy%=�
�4:�q_(G%)
��
�
�2:ȎAy%�
��0
��1
��2:�__(�z(�C(G%,k%)))
��3:s%=�W(Dy%):�s%>1�
��s(Dy%,s%)
��:�I(Dy%,k%)
��:�J(G%)
��
��:�Vy%��l(i_%,k_%,Dy%,G%)
��
���U_(L$):�_%:_%=�:�L$=""�
�5M$="Please enter menu name":z%=�S(M$,"OK",1):_%=�
��:�_%�$C%(G%)=$iy%:l%=�
��
����m:�R%:Iy%=0:fy%=0:xy%=0:dy%=7:Qy%=1:Jy%=7:m%=1:R%=16:D%?R%=dy%:R%+=1:D%?R%=xy%:R%+=1:D%?R%=Qy%:R%+=1:D%?R%=Jy%:R%+=1:D%?R%=m%:R%+=1:�
�e��r:�J%,B%,M%:M%=Ly%:$pl%="MenuBar choices (Bar '"+J$+"')":�J%=34�38:�W(M%,J%):�:�Iy%=1��F(M%,33)
��Iy%=2��F(M%,34)
��fy%=0��F(M%,35)
��fy%=1��F(M%,36)
��B%=(j_%<<28)+&A00013D:�M(M%,22,B%):B%=(m%<<28)+&700303D:�M(M%,23,B%):B%=(m%<<28)+(Jy%<<24)+&3135:�M(M%,24,B%):B%=(Qy%<<28)+&313D:�M(M%,25,B%):B%=(Qy%<<28)+(dy%<<24)+&3135:�M(M%,26,B%):B%=(Qy%<<28)+&313D:�M(M%,27,B%):B%=(Qy%<<28)+(xy%<<24)+&3135
��M(M%,28,B%):�g:�
�&��z(D$):�J%,_%,Ai%:_%=�:Vy%=�:�l%�
��M$="Command: Load bar '"+D$+"'":M$+=",...but changes have been made!":O$="Ignore changes,Cancel command,Save changes":z%=�S(M$,O$,2):Ȏz%�
�
�0,2:_%=�
�
�3:�L(J$)
��
�
�:�_%�
�!v$=�u(D$):Ai%=�j(v$,D$):�Ai%�
�7ș&406C0:�Sy:�h(D$):�Z(Fy%,0,Qy%):J$=D$:�r:ș&406C2
��
��:�
�\��U:�J%,cl%,mJ%,P$,f%,V%,A$,M$:J%=1:mJ%=0:�:ș&C,&A,B$,A%,1,mJ%,&64,"*"�,,,cl%,mJ%:�cl%�
�QP$=�Q(A%+20):f%=�U(B$+"."+P$):V%=((!A%)>>>8)�&FFF:`$=B$+"."+P$:�V%=&FFD�f%=1�
�A$(J%)=P$:J%+=1
��
��:�mJ%=-1�J%>Yy%:Cy%=J%-1:�
�4��iy(DJ%):�J%,Z$,U%,Y%,My%,_%:_%=�:�DJ%>Yy%�_%=�
��_%�DJ%>0�
�K�J%=1�DJ%:Z$=B$+"."+A$(J%):F%=�(Z$):U%=0:Y%=�#F%:�:Y%=�#F%:�Y%<>0�U%+=1
�5�Y%=0:�#F%:F%=0:My%=U%:�My%>0�My%<>r%�_%=�:J%=DJ%
��
��:�_%�
��M$="You will need to delete any data files,":M$+="in the 'Library.Data.' directory,":M$+="before running this version of MenuBar":z%=�S(M$,"Cancel",2):�N:�
��:�
�6ݤLy:�J%,Z$,Wy%,X$:X$="":Z$=U$+".Default":�Z(Z$)�
�F%=�(Z$):X$=�#F%:�#F%:F%=0
�&�:Wy%=�:�J%=1�Cy%:�A$(J%)=X$�Wy%=�
��:�Wy%�X$=""
�=X$
����Sy:�J%,S_%:�J%=1�r%:S_%=A%(J%):A%!0=S_%:ș&400CC,,A%:ș&400C3,,A%:�:w%=5:_%=�_(VJ%+Mu%+jJ%):T%=S%:ky%=0:GJ%=-1:�J%=D%�T%-4�4:!J%=0:�:�J%=1�My%:Ȏ��
��J%�2=0:V%=1
�	V%=0
�&�:�Dy(J%,V%):�Q(J%,0):�X(J%,0):�:�
�&��Zy:�Z$:Z$=U$+".Sprites":�Z(Z$)�
��("IconSprites "+Z$)
��:�
�1��Hy:�Z$:Z$=U$+".SysVars":�Z(Z$)�ș&400DE,Z$
��
�eݤHy(h%,Ry%,Q$):�X%,U%,Z%:X%=�M(h%):U%=1:�:A$=�r(h%,Ry%,U%):U%+=1:�A$=Q$�U%>X%:�A$=Q$�Z%=U%�Z%=-1
�=Z%
�5ݤC(G%,p%):�Q%,A$:Q%=�F(G%):A$=�r(Q%,Q%+1,p%):=A$
�ݤF(G%):=G%*2-1
�Cݤr(h%,Ry%,v_%):�Zy%,`y%:Zy%=�G(Ry%):`y%=�Y(h%,v_%):=$(Zy%+`y%)
�ݤY(Q%,Z%):�Zy%:�Z%=0�=0
�Zy%=�G(Q%)+(Z%-1)*4:=!Zy%
�b��L_(A$,Q%):�J%,e%,n%,Ny%,By%,N%:e%=�A$+1:n%=�G(Q%)+�L(Q%):By%=T%-n%:Ny%=n%+e%:_%=�n(e%):�_%�
�6M$="No room to extend data":z%=�S(M$,"Cancel",3):�
�X�:�q(n%,Ny%,By%):T%+=e%:$n%=A$:N%=�M(Q%):�Q(Q%,N%+1):N%=�L(Q%):�X(Q%,N%+e%):�Q%<My%�
�)�J%=Q%+1�My%:N%=�H(J%):�T(J%,N%+e%):�
��:�
�b��dy(g%,Q%,Z%):�J%,e%,n%,Ny%,By%,N%:e%=4:n%=�G(Q%)+(Z%*e%):By%=T%-n%:Ny%=n%+e%:_%=�n(e%):�_%�
�6M$="No room to extend data":z%=�S(M$,"Cancel",3):�
�X�:�q(n%,Ny%,By%):T%+=e%:!n%=g%:N%=�M(Q%):�Q(Q%,N%+1):N%=�L(Q%):�X(Q%,N%+e%):�Q%<My%�
�)�J%=Q%+1�My%:N%=�H(J%):�T(J%,N%+e%):�
��:�
����j_(h%,Ry%,v_%):�J%,e%,n%,Ny%,By%,N%,W%,Q%,g%,A$:A$=�r(h%,Ry%,v_%):R_%=�A$+1:`y%=�Y(h%,v_%):Ny%=�G(Ry%)+�Y(h%,v_%):n%=Ny%+R_%:By%=T%-n%:�q(n%,Ny%,By%):T%-=R_%:Q%=Ry%:N%=�M(Q%):�Q(Q%,N%-1):N%=�L(Q%):�X(Q%,N%-R_%):�Q%<My%�
�*�J%=Q%+1�My%:N%=�H(J%):�T(J%,N%-R_%):�
σ�:Q%=h%:e%=4:n%=�G(Q%)+(v_%*e%):Ny%=n%-e%:By%=T%-n%:�q(n%,Ny%,By%):T%-=e%:N%=�M(Q%):�Q(Q%,N%-1):N%=�L(Q%):�X(Q%,N%-e%):�Q%<My%�
�)�J%=Q%+1�My%:N%=�H(J%):�T(J%,N%-e%):�
� �:g%=�M(Q%):W%=�G(Q%):�g%>0�
�!�J%=1�g%:�!W%>`y%�!W%=!W%-R_%
�W%+=e%:�
��:�
�{��Wy(Q%):�J%,e%,Ny%,n%,By%,N%:e%=�L(Q%):Ny%=�G(Q%):n%=Ny%+e%:By%=T%-n%:�q(n%,Ny%,By%):T%-=e%:�Q(Q%,0):�X(Q%,0):�Q%<My%�
�)�J%=Q%+1�My%:N%=�H(J%):�T(J%,N%-e%):�
��:�
���q(n%,Ny%,By%):�By%>0�
�ș&400F1,XJ%,n%,XJ%,Ny%,By%
��:�
�ݤd(W%)=?W%*256+W%?1
�ݤH(Q%)=�d(P%+(Q%-1)*8+2)
�ݤM(Q%)=�d(P%+(Q%-1)*8+4)
�ݤL(Q%)=�d(P%+(Q%-1)*8+6)
�ݤG(Q%)=S%+�H(Q%)
�&��e(N%,W%)?W%=N%�256:W%?1=N%�256:�
�#��Dy(Q%,V%)�e(V%,P%+(Q%-1)*8):�
�&��T(Q%,`y%)�e(`y%,P%+(Q%-1)*8+2):�
�$��Q(Q%,X%)�e(X%,P%+(Q%-1)*8+4):�
�$��X(Q%,e%)�e(e%,P%+(Q%-1)*8+6):�
�$ݤw:�nl%:ș&400EC,-1,-1�nl%:=nl%
�8ݤ_(By%):�d%,_%:_%=�:ș&400EC,By%,-1�d%:�d%<By%�_%=�
�=_%
�ݤn(By%):�(�l-T%)>=By%�=�
�=�_(�w+By%)
�ݤl=&8000+�w
�ݤQy=T%
�ݤRy=�l-�Qy
�8��o(M%):A%!0=M%:ș&400CB,,A%:A%!28=-1:ș&400C5,,A%:�
���Fy(M%):ȎM%�
�%�g_%,q_%,Nu%,K_%,Ly%:ș&400C5,,A%
��:�
�!��G(M%):!A%=M%:ș&400C6,,A%:�
���Gy(M%):A%!0=M%:ș&400CB,,A%:ș53,-1,&B�,,YJ%:ș53,-1,4�,,PJ%:ș53,-1,&C�,,uJ%:ș53,-1,5�,,z_%:YJ%=YJ%<<PJ%:uJ%=uJ%<<z_%:PJ%=A%!&C-A%!4:z_%=A%!16-A%!8:A%!4=(YJ%-PJ%)>>1:A%!8=(uJ%-z_%)>>1:A%!&C=A%!4+PJ%:A%!16=A%!8+z_%:A%!28=-1:ș&400C5,,A%:�
�D��O(M%):A%!0=M%:ș&400CB,,A%:ș&400D1,-1,A%!4,A%!8,A%!&C,A%!16:�
�/ݤYy(M%):!C%=M%:ș&400CB,,C%:=�Py(C%!32,20)
�-ݤk(M%):C%!0=M%:ș&400CB,,C%:=C%!32�65536
�:ݤPy(g%,Y%):�N%,Tu%:Tu%=1<<Y%:N%=(g%�Tu%)�Tu%:�N%=0�=�
�=�
����n(M%,O%,t%):�b%,qy%:A%!0=M%:ș&400CB,,A%:A%!28=-1:b%=A%!&C-A%!4:qy%=A%!16-A%!8:A%!4=O%:A%!8=t%-qy%:A%!&C=O%+b%:A%!16=t%:ș&400C5,,A%:�
�,��ty(M%):ș&400CF,,A%:�n(M%,A%!0,A%!4):�
��ݤ`(ly%,t_%,NJ%,QJ%,w_%,r_%,B%,m%,SJ%,e_%,FJ%,CJ%,I$):$A%=�88,�0):A%!0=ly%:A%!4=t_%:A%!8=NJ%:A%!&C=QJ%:A%!16=w_%:A%!20=r_%:A%!24=-1:A%!28=B%:A%?32=7:A%?33=2:A%?34=7:A%?35=m%:A%?36=3:A%?37=1:A%?38=&C:A%!40=SJ%:A%!44=-e_%:A%!48=FJ%:A%!52=CJ%:A%!56=61
�cA%!60=&6000:A%!64=ty%:A%?68=0:A%?69=0:A%?70=0:A%?71=0:$(A%+72)=I$:A%?84=0:ș&400C1,,A%�Du%:=Du%
�h��S(M%,H%,d$):C%!0=M%:C%!4=H%:ș&400CE,,C%:$(C%!28)=d$:C%!0=M%:C%!4=H%:C%!8=0:C%!&C=0:ș&400CD,,C%:�
�5ݤi(M%,H%):C%!0=M%:C%!4=H%:ș&400CE,,C%:=$(C%!28)
�KݤB(M%,H%):�N%:C%!0=M%:C%!4=H%:ș&400CE,,C%:N%=((C%!24)>>21)�1:�N%=0�=�
�=�
D��F(M%,H%):C%!0=M%:C%!4=H%:C%!8=1<<21:C%!&C=1<<21:ș&400CD,,C%:�
@��W(M%,H%):C%!0=M%:C%!4=H%:C%!8=0:C%!&C=1<<21:ș&400CD,,C%:�
.��Ly(M%,H%):�B(M%,H%)��W(M%,H%)��F(M%,H%)
�
\��M(M%,H%,Ui%):�I_%,Y_%:I_%=-1:Y_%=Ui%:C%!0=M%:C%!4=H%:C%!8=Y_%:C%!&C=I_%:ș&400CD,,C%:�
}��Jy(M%,H%):C%!0=M%:C%!4=H%:ș&400C4,,C%:ș&400E0,,C%:cJ%=C%!4:vy%=C%!8:Uu%=C%!&C:N_%=C%!16:ș&400D1,-1,cJ%,vy%,Uu%,N_%:�
[��Z(M%,H%,`l%):C%!0=M%:C%!4=H%:Y_%=`l%<<28:I_%=&F<<28:C%!8=Y_%:C%!&C=I_%:ș&400CD,,C%:�
[��D(M%,H%,`l%):C%!0=M%:C%!4=H%:Y_%=`l%<<24:I_%=&F<<24:C%!8=Y_%:C%!&C=I_%:ș&400CD,,C%:�
xݤR(M%,ul%,jl%,b%,qy%,Hy%,d$,il%,Ii%,Ti%):�H%:C%!0=M%:C%!4=ul%:C%!8=jl%:C%!&C=ul%+b%:C%!16=jl%+qy%:C%!20=Hy%:�il%=0�
	$(C%+24)=d$

#�:C%!24=il%:C%!28=Ii%:C%!32=Ti%
�:ș&400C2,,C%�H%:=H%
!��S_:ș&406C2:�F%>0��#F%:F%=0

���,�$+" at line "+Þ:�
;��v(N%):�z%,M$,A$:ș&400D0,,-1:ș&406C2:�F%>0��#F%:F%=0
	�uy%�
Puy%=�:ș6,&E5,1,0:A$="Escape pressed - operation aborted":z%=�S(A$,"OK",1):�
�:ȎN%�
��0:M$=" (Error "+ß+": line "+Þ+") ":A$="OK to continue, CANCEL to kill "+G$:!A%=�:$(A%+4)=�$+M$+A$+�0:ș&400DF,A%,3,G$�,z%:�z%=2��N:�
P:A$=�$+",(Error "+ß+": line "+Þ+")":z%=�S(A$,"OK,Kill task",3):�z%=2��N:�
�:�
Eݤq(Ny$,au%):�z%:A%!0=1:$(A%+4)=Ny$+�0:ș&400DF,A%,au%,G$�,z%:=z%
XݤS(Uy$,Qy$,Qi%):�J%,U%,Z%,O%,t%,b%,qy%,N%,KJ%,o%,Y%,Ty%,Q%,Pl%,A$,M%:�:���v(0):=0
4M%=K_%:ș&400D0,,-1:ș&406C2:ș&400D4,,-1:ȎQi%�
�1:N%=0:f$="Message"
�2:N%=&A:f$="Warning"
�3:N%=&F:f$="Error"
N%=&F:f$="Error"
U�:�1,-N%,50,4:$Il%=f$+" from "+G$:I%!0=M%:�J%=1�8:I%!4=J%:ș&400C4,,I%:�:�q$<>""�
%ș&600E9,40,,q$�;au%:�au%�1�q$=""
5�:U%=0:A$=Qy$:�:U%+=1:Z%=�A$,","):�Z%=0�Z$(U%)=A$
)�Z%>0�Z$(U%)=�A$,Z%-1):A$=�A$,�A$-Z%)
 :�Z%=0�U%=4:Pl%=U%:o%=0:�J%=1�U%:�Z$(J%)>o%�o%=�Z$(J%)
!�:�o%<96�o%=96
"vP%()=((o%+2)*16):b%=0:�J%=1�U%:b%+=P%(J%)+&C:�:b%=b%-&C+16:A%!0=M%:ș&400CB,,A%:KJ%=A%!&C-A%!4:O%=KJ%-b%-16:�O%<8�
#+�J%=1�U%:o%=(�Z$(J%)+2)*16:�o%<96�o%=96
$jP%(J%)=o%:�:b%=0:�J%=1�U%:b%+=P%(J%)+&C:�:b%=b%-&C+16:A%!0=M%:ș&400CB,,A%:KJ%=A%!&C-A%!4:O%=KJ%-b%-16
%�:�O%<8�O%=8
&Xt%=-284:qy%=54:k$="R5,2":I%!0=M%:I%!20=&1701313D:I%!32=20:�J%=1�U%:b%=P%(J%):�J%=U%�
'"t%-=6:b%+=16:qy%+=16:k$="R6,2"
(��:$D%(J%)=�Z$(J%),&F):$Q%(J%)=k$:N%=D%(J%):_y%=Q%(J%):I%!4=O%:I%!8=t%:I%!&C=O%+b%:I%!16=t%+qy%:I%!24=N%:I%!28=_y%:ș&400C2,,I%�g%:O%+=b%+&C:�:U%=0:A$=Uy$:�:U%+=1:Z%=�A$,","):�Z%=0�Z$(U%)=A$
))�Z%>0�Z$(U%)=�A$,Z%-1):A$=�A$,�A$-Z%)
*�Z%=0�U%=3:ȎU%�
+�1:t%=-&80
,
�2:t%=-96
-
�3:t%=-76
..�:O%=&82:b%=684:qy%=44:�q$=""�O%=16:b%=796
/�I%!0=M%:I%!4=O%:I%!&C=O%+b%:I%!20=&17006139:I%!28=-1:I%!32=20:I%!20=&17006119:I%!28=-1:I%!32=20:�J%=1�U%:$U%(J%)=�Z$(J%),50):N%=U%(J%):I%!4=O%:I%!8=t%:I%!16=t%+qy%:I%!24=N%:ș&400C2,,I%�g%:t%-=54:�:�q$<>""�
0�ș&400E9,40,,q$�,,,b%,qy%,,U%:ș53,U%,4�,,Xu%:b%=b%<<Xu%:ș53,U%,5�,,Xu%:qy%=qy%<<Xu%:O%=32:t%=-&8A:I%!0=M%:I%!4=O%:I%!8=t%:I%!&C=O%+b%:I%!16=t%+qy%:I%!20=&1700601A:$(I%+24)=q$:ș&400C2,,I%�g%
14�:I%!0=M%:ș&400CB,,I%:�qu%�qu%=�:�Gy(M%)��o(M%)
2�ș&400D2,M%,9,0,,-1,-1:ș&400CF,,I%:b%=I%!&C:I%!0=M%:ș&400CB,,I%:o%=I%!4:Y%=I%!8:Ty%=I%!&C-I%!4:Q%=I%!16-I%!8:ȗȓo%,Y%,Ty%,Q%:Ky%=0:p_%=�:ZJ%=�:�:ș&400C7,,A%�Ty%:ȎTy%�
3(�0:ș&400CF,,C%:a%=C%!8:�l_%=��a%=0�
4]l_%=�:I%!0=K_%:ș&400CB,,I%:o%=I%!4:Y%=I%!8:Ty%=I%!&C-I%!4:Q%=I%!16-I%!8:ȗȓo%,Y%,Ty%,Q%
5�
6�2:�Fy(A%!0)
71�6:Ky%=A%!16:�A%!8=16�A%!8=64��H(M%,A%!16,a%)
8�8:�A%!24=&D�ZJ%=�
9�A%!24=27�p_%=�
:�17,18:�A%!16=0�O_%=�:p_%=�
;-�:�(Ky%>0�Ky%<Pl%+1)�p_%�ZJ%:�ZJ%�Ky%=Pl%
<*I%!0=M%:ș&400C6,,I%:�("Pointer"):=Ky%
=
��gy:�
�
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 36  |BasCompress v1.6|
00000030  39 20 28 30 34 20 41 75  67 20 31 39 39 35 29 0d  |9 (04 Aug 1995).|
00000040  00 03 18 47 24 3d 22 4d  65 6e 75 42 61 72 22 3a  |...G$="MenuBar":|
00000050  ee 85 f2 53 5f 3a e0 0d  00 04 37 7a 24 3d 22 3c  |...S_:....7z$="<|
00000060  4d 65 6e 75 42 61 72 24  44 69 72 3e 22 3a 5a 75  |MenuBar$Dir>":Zu|
00000070  25 3d 30 3a f2 68 79 28  7a 24 29 3a f2 4f 5f 3a  |%=0:.hy(z$):.O_:|
00000080  e7 a4 4a 79 28 47 24 29  8c f2 49 79 3a e0 0d 00  |..Jy(G$)..Iy:...|
00000090  05 6b f2 60 79 28 41 25  29 3a f2 41 5f 3a f2 72  |.k.`y(A%):.A_:.r|
000000a0  79 3a f2 46 5f 3a f2 57  5f 28 62 24 29 3a c8 99  |y:.F_:.W_(b$):..|
000000b0  26 34 30 36 43 30 3a f2  4a 5f 3a f2 6e 28 69 4a  |&406C0:.J_:.n(iJ|
000000c0  25 2c 30 2c 2d 26 36 34  29 3a f2 75 5f 3a f2 55  |%,0,-&64):.u_:.U|
000000d0  3a f2 69 79 28 43 79 25  29 3a 58 24 3d a4 4c 79  |:.iy(Cy%):X$=.Ly|
000000e0  3a 4a 24 3d 58 24 3a e7  4a 24 3d 22 22 8c 4a 24  |:J$=X$:.J$="".J$|
000000f0  3d 22 4e 65 77 42 61 72  22 0d 00 06 24 76 24 3d  |="NewBar"...$v$=|
00000100  a4 75 28 4a 24 29 3a 5f  25 3d a4 6a 28 76 24 2c  |.u(J$):_%=.j(v$,|
00000110  4a 24 29 3a e7 ac 5f 25  8c f2 4e 3a e0 0d 00 07  |J$):.._%..N:....|
00000120  29 c8 99 26 34 30 36 43  30 3a f2 68 28 4a 24 29  |)..&406C0:.h(J$)|
00000130  3a f2 51 5f 3a f2 67 3a  c8 99 26 34 30 36 43 32  |:.Q_:.g:..&406C2|
00000140  3a e7 5a 75 25 8c 0d 00  08 15 53 24 28 30 29 3d  |:.Zu%.....S$(0)=|
00000150  22 22 3a 53 24 28 31 29  3d 22 22 0d 00 09 0d cd  |"":S$(1)="".....|
00000160  3a ee 85 f2 76 28 31 29  0d 00 0a 18 4f 5f 25 3d  |:...v(1)....O_%=|
00000170  a3 3a f5 f2 59 79 3a fd  4f 5f 25 3a f2 4e 3a e0  |.:..Yy:.O_%:.N:.|
00000180  0d 00 0b 62 dd f2 68 79  28 7a 24 29 3a ea 67 24  |...b..hy(z$):.g$|
00000190  2c 70 24 2c 56 25 2c 52  25 3a 67 24 3d 7a 24 2b  |,p$,V%,R%:g$=z$+|
000001a0  22 2e 4f 76 65 72 6c 61  79 73 22 3a c8 99 38 2c  |".Overlays":..8,|
000001b0  26 44 2c 67 24 b8 56 25  3a e7 56 25 3d 30 8c 85  |&D,g$.V%:.V%=0..|
000001c0  30 2c 22 43 61 6e 27 74  20 66 69 6e 64 20 4f 76  |0,"Can't find Ov|
000001d0  65 72 6c 61 79 20 64 69  72 65 63 74 6f 72 79 22  |erlay directory"|
000001e0  3a e0 0d 00 0c 28 70 24  3d 67 24 2b 22 2e 4f 76  |:....(p$=g$+".Ov|
000001f0  4e 61 6d 65 73 22 3a c8  99 38 2c 26 44 2c 70 24  |Names":..8,&D,p$|
00000200  b8 56 25 3a e7 56 25 3d  31 8c 0d 00 0d 30 46 25  |.V%:.V%=1....0F%|
00000210  3d ad 28 70 24 29 3a 52  25 3d 30 3a c8 95 ac c5  |=.(p$):R%=0:....|
00000220  23 46 25 3a 41 24 3d be  23 46 25 3a 52 25 2b 3d  |#F%:A$=.#F%:R%+=|
00000230  31 3a ce 3a e7 52 25 3e  30 8c 0d 00 0e 3a de 53  |1:.:.R%>0....:.S|
00000240  24 28 52 25 2d 31 29 3a  cf 23 46 25 3d 30 3a e3  |$(R%-1):.#F%=0:.|
00000250  4a 25 3d 30 b8 52 25 2d  31 3a 41 24 3d be 23 46  |J%=0.R%-1:A$=.#F|
00000260  25 3a 53 24 28 4a 25 29  3d 67 24 2b 22 2e 22 2b  |%:S$(J%)=g$+"."+|
00000270  41 24 3a ed 0d 00 0f 1a  cd 3a d9 23 46 25 3a 46  |A$:......:.#F%:F|
00000280  25 3d 30 3a e7 52 25 8c  c8 a3 53 24 28 29 0d 00  |%=0:.R%...S$()..|
00000290  10 0a 5a 75 25 3d 52 25  0d 00 11 0b cc 3a 5a 75  |..Zu%=R%.....:Zu|
000002a0  25 3d 30 0d 00 12 07 cd  3a e1 0d 00 13 29 dd f2  |%=0.....:....)..|
000002b0  59 79 3a 6f 79 25 3d 30  3a c8 99 26 34 30 30 43  |Yy:oy%=0:..&400C|
000002c0  37 2c 6f 79 25 2c 41 25  b8 6c 6c 25 3a c8 8e 6c  |7,oy%,A%.ll%:..l|
000002d0  6c 25 ca 0d 00 14 0a c9  30 3a f2 4d 5f 0d 00 15  |l%......0:.M_...|
000002e0  10 c9 32 3a f2 46 79 28  41 25 21 30 29 0d 00 16  |..2:.Fy(A%!0)...|
000002f0  0f c9 33 3a f2 47 28 41  25 21 30 29 0d 00 17 0e  |..3:.G(A%!0)....|
00000300  c9 36 3a f2 42 79 28 41  25 29 0d 00 18 19 c9 37  |.6:.By(A%).....7|
00000310  3a f2 6e 5f 28 41 25 2c  71 25 2c 55 79 25 2c 53  |:.n_(A%,q%,Uy%,S|
00000320  75 25 29 0d 00 19 0e c9  38 3a f2 77 79 28 41 25  |u%).....8:.wy(A%|
00000330  29 0d 00 1a 0e c9 39 3a  f2 76 5f 28 41 25 29 0d  |).....9:.v_(A%).|
00000340  00 1b 12 c9 31 37 2c 31  38 3a f2 62 5f 28 41 25  |....17,18:.b_(A%|
00000350  29 0d 00 1c 0a c9 31 39  3a f2 50 0d 00 1d 07 cb  |).....19:.P.....|
00000360  3a e1 0d 00 1e 2a dd f2  4e 3a f2 49 79 3a 24 41  |:....*..N:.Iy:$A|
00000370  25 3d 22 54 41 53 4b 22  3a c8 99 26 34 30 30 44  |%="TASK":..&400D|
00000380  44 2c 58 4a 25 2c 41 25  21 30 3a e1 0d 00 1f 21  |D,XJ%,A%!0:....!|
00000390  dd a4 4a 79 28 47 24 29  3a ea 4e 25 3a 4e 25 3d  |..Jy(G$):.N%:N%=|
000003a0  a3 3a e7 a4 58 79 28 47  24 29 3e 30 8c 0d 00 20  |.:..Xy(G$)>0... |
000003b0  2a 4e 25 3d b9 3a 7a 25  3d a4 71 28 47 24 2b 22  |*N%=.:z%=.q(G$+"|
000003c0  20 69 73 20 61 6c 72 65  61 64 79 20 72 75 6e 6e  | is already runn|
000003d0  69 6e 67 22 2c 32 29 0d  00 21 09 cd 3a 3d 4e 25  |ing",2)..!..:=N%|
000003e0  0d 00 22 23 dd f2 4d 5f  3a ea 4a 25 2c 78 25 2c  |.."#..M_:.J%,x%,|
000003f0  4d 25 3a 46 6c 25 3d eb  3a e7 46 6c 25 3c 3e 47  |M%:Fl%=.:.Fl%<>G|
00000400  4a 25 8c 0d 00 23 18 60  25 3d 31 3a f2 59 28 60  |J%...#.`%=1:.Y(`|
00000410  25 2c 77 25 29 3a 47 4a  25 3d eb 0d 00 24 0e cd  |%,w%):GJ%=...$..|
00000420  3a e7 64 5f 25 8c f2 75  79 0d 00 25 11 e7 60 4a  |:.d_%..uy..%..`J|
00000430  25 8c f2 50 3a 60 4a 25  3d a3 0d 00 26 09 e7 62  |%..P:`J%=...&..b|
00000440  79 25 8c 0d 00 27 15 e7  4e 25 28 62 79 25 29 80  |y%...'..N%(by%).|
00000450  62 79 25 3e 3d 60 25 8c  0d 00 28 0f f2 5f 28 5a  |by%>=`%...(.._(Z|
00000460  25 28 62 79 25 29 29 0d  00 29 15 cd 3a 62 79 25  |%(by%))..)..:by%|
00000470  2b 3d 31 3a e7 62 79 25  3e 77 25 8c 0d 00 2a 21  |+=1:.by%>w%...*!|
00000480  62 79 25 3d a3 3a e7 56  79 25 8c f2 6c 28 69 5f  |by%=.:.Vy%..l(i_|
00000490  25 2c 6b 5f 25 2c 44 79  25 2c 47 25 29 0d 00 2b  |%,k_%,Dy%,G%)..+|
000004a0  05 cd 0d 00 2c 0b cd 3a  e7 63 79 25 8c 0d 00 2d  |....,..:.cy%...-|
000004b0  15 e7 47 25 28 63 79 25  29 80 63 79 25 3e 3d 60  |..G%(cy%).cy%>=`|
000004c0  25 8c 0d 00 2e 0f f2 43  28 5a 25 28 63 79 25 29  |%......C(Z%(cy%)|
000004d0  29 0d 00 2f 1a cd 3a 63  79 25 2b 3d 31 3a e7 63  |)../..:cy%+=1:.c|
000004e0  79 25 3e 77 25 8c 63 79  25 3d a3 0d 00 30 0b cd  |y%>w%.cy%=...0..|
000004f0  3a e7 73 4a 25 8c 0d 00  31 18 e7 49 79 25 3d 31  |:.sJ%...1..Iy%=1|
00000500  8c f2 4b 28 47 25 2c 22  6e 61 6d 65 22 29 0d 00  |..K(G%,"name")..|
00000510  32 18 e7 49 79 25 3d 32  8c f2 4b 28 47 25 2c 22  |2..Iy%=2..K(G%,"|
00000520  74 79 70 65 22 29 0d 00  33 09 73 4a 25 3d a3 0d  |type")..3.sJ%=..|
00000530  00 34 0b cd 3a e7 57 5f  25 8c 0d 00 35 09 e7 61  |.4..:.W_%...5..a|
00000540  4a 25 8c 0d 00 36 1c c8  99 26 34 30 30 44 45 2c  |J%...6...&400DE,|
00000550  22 52 75 6e 20 22 2b 56  24 3a 61 4a 25 3d a3 0d  |"Run "+V$:aJ%=..|
00000560  00 37 12 cc 3a e7 60 5f  25 80 a4 6f 28 56 24 29  |.7..:.`_%..o(V$)|
00000570  8c 0d 00 38 33 c8 99 26  34 30 36 43 30 3a e3 4a  |...83..&406C0:.J|
00000580  25 3d 31 b8 57 5f 25 3a  f2 6a 79 28 4a 24 28 4a  |%=1.W_%:.jy(J$(J|
00000590  25 29 2c 56 24 29 3a ed  3a 57 5f 25 3d a3 3a 60  |%),V$):.:W_%=.:`|
000005a0  5f 25 3d a3 0d 00 39 05  cd 0d 00 3a 05 cd 0d 00  |_%=...9....:....|
000005b0  3b 0e cc 3a c8 99 26 34  30 36 43 32 0d 00 3c 10  |;..:..&406C2..<.|
000005c0  cd 3a e7 77 79 25 3c 3e  64 4a 25 8c 0d 00 3d 09  |.:.wy%<>dJ%...=.|
000005d0  e7 77 79 25 8c 0d 00 3e  1e f2 5a 28 46 79 25 2c  |.wy%...>..Z(Fy%,|
000005e0  31 2c 26 43 29 3a 77 79  25 3d b9 3a 64 4a 25 3d  |1,&C):wy%=.:dJ%=|
000005f0  77 79 25 0d 00 3f 1f cc  3a f2 5a 28 46 79 25 2c  |wy%..?..:.Z(Fy%,|
00000600  31 2c 32 29 3a 77 79 25  3d a3 3a 64 4a 25 3d 77  |1,2):wy%=.:dJ%=w|
00000610  79 25 0d 00 40 05 cd 0d  00 41 16 cd 3a e7 ac a4  |y%..@....A..:...|
00000620  59 79 28 69 4a 25 29 8c  77 79 25 3d a3 0d 00 42  |Yy(iJ%).wy%=...B|
00000630  29 c8 99 26 34 30 30 43  46 2c 2c 43 25 3a 78 25  |)..&400CF,,C%:x%|
00000640  3d 43 25 21 30 3a 4d 25  3d 43 25 21 26 43 3a e7  |=C%!0:M%=C%!&C:.|
00000650  42 4a 25 3c 30 8c 0d 00  43 11 e7 a4 56 79 28 4d  |BJ%<0...C...Vy(M|
00000660  25 29 80 a6 2d 32 8c 0d  00 44 14 e7 28 78 25 2b  |%)..-2...D..(x%+|
00000670  32 29 3e 3d 41 75 25 8c  f2 52 79 0d 00 45 0d e7  |2)>=Au%..Ry..E..|
00000680  78 25 3d 30 8c f2 55 79  0d 00 46 05 cd 0d 00 47  |x%=0..Uy..F....G|
00000690  07 cd 3a e1 0d 00 48 36  dd a4 41 28 64 25 29 3a  |..:...H6..A(d%):|
000006a0  ea 50 5f 25 2c 48 79 25  3a c8 99 33 30 2c 36 2c  |.P_%,Hy%:..30,6,|
000006b0  2c 2c 64 25 b8 2c 2c 50  5f 25 3b 48 79 25 3a e7  |,,d%.,,P_%;Hy%:.|
000006c0  28 48 79 25 80 31 29 3d  31 8c 0d 00 49 2a 85 30  |(Hy%.1)=1...I*.0|
000006d0  2c 22 43 6f 75 6c 64 6e  27 74 20 63 6c 61 69 6d  |,"Couldn't claim|
000006e0  20 77 6f 72 6b 73 70 61  63 65 20 66 72 6f 6d 20  | workspace from |
000006f0  52 4d 41 22 0d 00 4a 0a  cd 3a 3d 50 5f 25 0d 00  |RMA"..J..:=P_%..|
00000700  4b 25 dd f2 41 28 f8 50  5f 25 29 3a c8 99 26 32  |K%..A(.P_%):..&2|
00000710  30 30 31 45 2c 37 2c 2c  50 5f 25 3a 50 5f 25 3d  |001E,7,,P_%:P_%=|
00000720  30 3a e1 0d 00 4c f7 dd  f2 49 79 3a f2 41 28 4f  |0:...L...Iy:.A(O|
00000730  75 25 29 3a f2 41 28 4d  6c 25 29 3a f2 41 28 5f  |u%):.A(Ml%):.A(_|
00000740  75 25 29 3a f2 41 28 74  79 25 29 3a f2 41 28 70  |u%):.A(ty%):.A(p|
00000750  79 25 29 3a f2 41 28 48  4a 25 29 3a f2 41 28 44  |y%):.A(HJ%):.A(D|
00000760  5f 25 29 3a f2 41 28 4c  5f 25 29 3a f2 41 28 48  |_%):.A(L_%):.A(H|
00000770  5f 25 29 3a f2 41 28 62  4a 25 29 3a f2 41 28 7a  |_%):.A(bJ%):.A(z|
00000780  79 25 29 3a f2 41 28 7a  6c 25 29 3a f2 41 28 75  |y%):.A(zl%):.A(u|
00000790  5f 25 29 3a f2 41 28 68  5f 25 29 3a f2 41 28 67  |_%):.A(h_%):.A(g|
000007a0  4a 25 29 3a f2 41 28 73  5f 25 29 3a f2 41 28 7a  |J%):.A(s_%):.A(z|
000007b0  4a 25 29 3a f2 41 28 5f  4a 25 29 3a f2 41 28 62  |J%):.A(_J%):.A(b|
000007c0  5f 25 29 3a f2 41 28 79  5f 25 29 3a f2 41 28 74  |_%):.A(y_%):.A(t|
000007d0  4a 25 29 3a f2 41 28 47  75 25 29 3a f2 41 28 55  |J%):.A(Gu%):.A(U|
000007e0  4a 25 29 3a f2 41 28 6b  75 25 29 3a f2 41 28 47  |J%):.A(ku%):.A(G|
000007f0  6c 25 29 3a f2 41 28 59  75 25 29 3a f2 41 28 49  |l%):.A(Yu%):.A(I|
00000800  25 29 3a f2 41 28 42 75  25 29 3a f2 41 28 43 75  |%):.A(Bu%):.A(Cu|
00000810  25 29 3a f2 41 28 4a 75  25 29 0d 00 4d 53 f2 41  |%):.A(Ju%)..MS.A|
00000820  28 50 75 25 29 3a f2 41  28 57 75 25 29 3a f2 41  |(Pu%):.A(Wu%):.A|
00000830  28 78 5f 25 29 3a f2 41  28 41 29 3a f2 41 28 69  |(x_%):.A(A):.A(i|
00000840  79 25 29 3a f2 41 28 65  79 25 29 3a f2 41 28 6f  |y%):.A(ey%):.A(o|
00000850  5f 25 29 3a f2 41 28 6d  75 25 29 3a f2 41 28 56  |_%):.A(mu%):.A(V|
00000860  5f 25 29 3a f2 41 28 52  75 25 29 3a e1 0d 00 4e  |_%):.A(Ru%):...N|
00000870  15 dd f2 62 5f 28 41 25  29 3a c8 8e 41 25 21 31  |...b_(A%):..A%!1|
00000880  36 ca 0d 00 4f 0d c9 30  3a 4f 5f 25 3d a4 78 0d  |6...O..0:O_%=.x.|
00000890  00 50 0e c9 32 3a f2 65  5f 28 41 25 29 0d 00 51  |.P..2:.e_(A%)..Q|
000008a0  0e c9 33 3a f2 79 5f 28  41 25 29 0d 00 52 06 c9  |..3:.y_(A%)..R..|
000008b0  34 0d 00 53 0e c9 38 3a  f2 73 79 28 41 25 29 0d  |4..S..8:.sy(A%).|
000008c0  00 54 13 c9 26 34 30 30  43 30 3a f2 78 79 28 41  |.T..&400C0:.xy(A|
000008d0  25 29 0d 00 55 12 c9 26  34 30 30 43 31 3a 47 4a  |%)..U..&400C1:GJ|
000008e0  25 3d 2d 31 0d 00 56 07  cb 3a e1 0d 00 57 1d dd  |%=-1..V..:...W..|
000008f0  f2 73 79 28 41 25 29 3a  ea 64 25 2c 4e 6c 25 2c  |.sy(A%):.d%,Nl%,|
00000900  52 6c 25 3a e7 6c 25 8c  0d 00 58 41 64 25 3d 41  |Rl%:.l%...XAd%=A|
00000910  25 21 30 3a 4e 6c 25 3d  41 25 21 34 3a 52 6c 25  |%!0:Nl%=A%!4:Rl%|
00000920  3d 41 25 21 32 30 3a 41  25 21 26 43 3d 41 25 21  |=A%!20:A%!&C=A%!|
00000930  38 3a c8 99 26 34 30 30  45 37 2c 31 39 2c 41 25  |8:..&400E7,19,A%|
00000940  2c 4e 6c 25 3a e7 a4 78  8c 0d 00 59 1b 4f 5f 25  |,Nl%:..x...Y.O_%|
00000950  3d b9 3a e7 28 52 6c 25  80 31 29 3d 30 84 64 25  |=.:.(Rl%.1)=0.d%|
00000960  3c 32 34 8c 0d 00 5a 2c  c8 99 26 34 30 30 44 33  |<24...Z,..&400D3|
00000970  2c 2c 41 25 3a 41 25 21  32 34 3d 35 30 38 3a c8  |,,A%:A%!24=508:.|
00000980  99 26 34 30 30 45 37 2c  38 2c 41 25 2c 4e 6c 25  |.&400E7,8,A%,Nl%|
00000990  0d 00 5b 05 cd 0d 00 5c  05 cd 0d 00 5d 07 cd 3a  |..[....\....]..:|
000009a0  e1 0d 00 5e 15 dd a4 78  3a ea 55 25 3a 55 25 3d  |...^...x:.U%:U%=|
000009b0  b9 3a e7 6c 25 8c 0d 00  5f 82 4d 24 3d 22 43 6f  |.:.l%..._.M$="Co|
000009c0  6d 6d 61 6e 64 3a 20 51  75 69 74 20 4d 65 6e 75  |mmand: Quit Menu|
000009d0  42 61 72 2c 2e 2e 2e 62  75 74 20 63 68 61 6e 67  |Bar,...but chang|
000009e0  65 73 20 68 61 76 65 20  62 65 65 6e 20 6d 61 64  |es have been mad|
000009f0  65 21 22 3a 4f 24 3d 22  49 67 6e 6f 72 65 20 63  |e!":O$="Ignore c|
00000a00  68 61 6e 67 65 73 2c 43  61 6e 63 65 6c 20 63 6f  |hanges,Cancel co|
00000a10  6d 6d 61 6e 64 2c 53 61  76 65 20 63 68 61 6e 67  |mmand,Save chang|
00000a20  65 73 22 3a 7a 25 3d a4  53 28 4d 24 2c 4f 24 2c  |es":z%=.S(M$,O$,|
00000a30  32 29 3a c8 8e 7a 25 ca  0d 00 60 0b c9 30 3a 55  |2):..z%...`..0:U|
00000a40  25 3d a3 0d 00 61 0b c9  31 3a 55 25 3d b9 0d 00  |%=...a..1:U%=...|
00000a50  62 0b c9 32 3a 55 25 3d  a3 0d 00 63 12 c9 33 3a  |b..2:U%=...c..3:|
00000a60  f2 4c 28 4a 24 29 3a 55  25 3d b9 0d 00 64 05 cb  |.L(J$):U%=...d..|
00000a70  0d 00 65 09 cd 3a 3d 55  25 0d 00 66 2a dd f2 68  |..e..:=U%..f*..h|
00000a80  28 4a 24 29 3a ea 5a 24  2c 5f 25 3a 5f 25 3d b9  |(J$):.Z$,_%:_%=.|
00000a90  3a e7 4a 24 3d 22 22 8c  4a 24 3d 22 4e 65 77 42  |:.J$="".J$="NewB|
00000aa0  61 72 22 0d 00 67 19 5a  24 3d 42 24 2b 22 2e 22  |ar"..g.Z$=B$+"."|
00000ab0  2b 4a 24 3a e7 a4 5a 28  5a 24 29 8c 0d 00 68 24  |+J$:..Z(Z$)...h$|
00000ac0  c8 99 38 2c 35 2c 5a 24  b8 2c 2c 2c 2c 65 25 3a  |..8,5,Z$.,,,,e%:|
00000ad0  7a 75 25 3d a4 52 79 3a  e7 65 25 3e 7a 75 25 8c  |zu%=.Ry:.e%>zu%.|
00000ae0  0d 00 69 20 64 25 3d a4  77 3a 5f 25 3d a4 5f 28  |..i d%=.w:_%=._(|
00000af0  64 25 2b 65 25 2d 7a 75  25 29 3a e7 ac 5f 25 8c  |d%+e%-zu%):.._%.|
00000b00  0d 00 6a 3f 4d 24 3d 22  4e 6f 74 20 65 6e 6f 75  |..j?M$="Not enou|
00000b10  67 68 20 72 6f 6f 6d 20  74 6f 20 6c 6f 61 64 20  |gh room to load |
00000b20  64 61 74 61 22 3a 7a 25  3d a4 53 28 4d 24 2c 22  |data":z%=.S(M$,"|
00000b30  43 61 6e 63 65 6c 22 2c  33 29 3a f2 4e 3a e0 0d  |Cancel",3):.N:..|
00000b40  00 6b 05 cd 0d 00 6c 29  cd 3a c8 99 38 2c 26 46  |.k....l).:..8,&F|
00000b50  46 2c 5a 24 2c 44 25 2c  30 3a 77 25 3d 3f 44 25  |F,Z$,D%,0:w%=?D%|
00000b60  3a 54 25 3d 44 25 2b 65  25 3a f2 6b 79 0d 00 6d  |:T%=D%+e%:.ky..m|
00000b70  0d cc 3a f2 51 79 28 77  25 29 0d 00 6e 07 cd 3a  |..:.Qy(w%)..n..:|
00000b80  e1 0d 00 6f 61 dd f2 51  79 28 77 25 29 3a ea 4a  |...oa..Qy(w%):.J|
00000b90  25 2c 4f 25 3a 3a 3a 3a  75 25 3d 32 3a 4a 4a 25  |%,O%::::u%=2:JJ%|
00000ba0  3d 79 25 2a 34 34 2b 35  30 2b 75 25 3a 73 79 25  |=y%*44+50+u%:sy%|
00000bb0  3d a4 4f 3a 5a 5f 25 3d  26 66 30 2b 34 3a 4f 25  |=.O:Z_%=&f0+4:O%|
00000bc0  3d 30 3a e3 4a 25 3d 31  b8 72 25 3a f2 5a 5f 28  |=0:.J%=1.r%:.Z_(|
00000bd0  4a 25 2c 4f 25 29 3a 4f  25 2b 3d 5a 5f 25 3a ed  |J%,O%):O%+=Z_%:.|
00000be0  3a e1 0d 00 70 f8 dd f2  5a 5f 28 4e 25 2c 4f 25  |:...p...Z_(N%,O%|
00000bf0  29 3a 6c 79 25 3d 4f 25  3a 51 4a 25 3d 73 79 25  |):ly%=O%:QJ%=sy%|
00000c00  3a 74 5f 25 3d 73 79 25  2d 4a 4a 25 3a 4e 4a 25  |:t_%=sy%-JJ%:NJ%|
00000c10  3d 6c 79 25 2b 26 66 30  3a 77 5f 25 3d 30 3a 72  |=ly%+&f0:w_%=0:r|
00000c20  5f 25 3d 30 3a 42 25 3d  2d 26 37 46 46 46 46 46  |_%=0:B%=-&7FFFFF|
00000c30  41 45 3a 53 4a 25 3d 30  3a 65 5f 25 3d 30 3a 46  |AE:SJ%=0:e_%=0:F|
00000c40  4a 25 3d 26 66 30 3a 43  4a 25 3d 4a 4a 25 3a 41  |J%=&f0:CJ%=JJ%:A|
00000c50  25 28 4e 25 29 3d a4 60  28 6c 79 25 2c 74 5f 25  |%(N%)=.`(ly%,t_%|
00000c60  2c 4e 4a 25 2c 51 4a 25  2c 77 5f 25 2c 72 5f 25  |,NJ%,QJ%,w_%,r_%|
00000c70  2c 42 25 2c 6d 25 2c 53  4a 25 2c 65 5f 25 2c 46  |,B%,m%,SJ%,e_%,F|
00000c80  4a 25 2c 43 4a 25 2c 22  22 29 3a 42 25 3d 28 51  |J%,CJ%,""):B%=(Q|
00000c90  79 25 3c 3c 32 38 29 2b  28 78 79 25 3c 3c 32 34  |y%<<28)+(xy%<<24|
00000ca0  29 2b 26 41 31 31 44 3a  72 79 25 3d a4 52 28 41  |)+&A11D:ry%=.R(A|
00000cb0  25 28 4e 25 29 2c 2d 32  2c 30 2c 26 66 30 2b 34  |%(N%),-2,0,&f0+4|
00000cc0  2c 35 30 2c 42 25 2c 22  22 2c 43 25 28 4e 25 29  |,50,B%,"",C%(N%)|
00000cd0  2c 42 75 25 2c 26 44 29  3a e1 0d 00 71 3d dd f2  |,Bu%,&D):...q=..|
00000ce0  63 5f 3a ea 4a 25 2c 4b  25 2c 4c 25 2c 47 25 3a  |c_:.J%,K%,L%,G%:|
00000cf0  6f 4a 25 3d 31 3a e3 4a  25 3d 31 b8 77 25 3a 4c  |oJ%=1:.J%=1.w%:L|
00000d00  25 3d 5a 25 28 4a 25 29  3a e7 4c 25 3e 6f 4a 25  |%=Z%(J%):.L%>oJ%|
00000d10  8c 6f 4a 25 3d 4c 25 0d  00 72 16 ed 3a 54 6c 25  |.oJ%=L%..r..:Tl%|
00000d20  3d 6f 4a 25 2d 77 25 3a  e7 54 6c 25 8c 0d 00 73  |=oJ%-w%:.Tl%...s|
00000d30  32 e3 4a 25 3d 31 b8 77  25 3a 57 79 25 3d a3 3a  |2.J%=1.w%:Wy%=.:|
00000d40  e3 4b 25 3d 31 b8 77 25  3a 4c 25 3d 5a 25 28 4b  |.K%=1.w%:L%=Z%(K|
00000d50  25 29 3a e7 4c 25 3d 4a  25 8c 57 79 25 3d b9 0d  |%):.L%=J%.Wy%=..|
00000d60  00 74 11 ed 3a e7 ac 57  79 25 8c 47 25 3d 4a 25  |.t..:..Wy%.G%=J%|
00000d70  0d 00 75 05 ed 0d 00 76  0d cc 3a 47 25 3d 77 25  |..u....v..:G%=w%|
00000d80  2b 31 0d 00 77 46 cd 3a  77 25 2b 3d 31 3a 24 43  |+1..wF.:w%+=1:$C|
00000d90  25 28 47 25 29 3d 22 4d  65 6e 75 20 22 2b c3 47  |%(G%)="Menu "+.G|
00000da0  25 3a 5a 25 28 77 25 29  3d 47 25 3a 60 25 3d 31  |%:Z%(w%)=G%:`%=1|
00000db0  3a f2 59 28 60 25 2c 77  25 29 3a f2 43 28 47 25  |:.Y(`%,w%):.C(G%|
00000dc0  29 3a 6c 25 3d b9 3a e1  0d 00 78 7d dd f2 79 5f  |):l%=.:...x}..y_|
00000dd0  28 41 25 29 3a ea 4a 25  2c 70 25 2c 51 25 2c 6f  |(A%):.J%,p%,Q%,o|
00000de0  25 2c 5f 79 25 2c 41 24  2c 4d 25 2c 48 25 2c 66  |%,_y%,A$,M%,H%,f|
00000df0  25 2c 56 25 2c 46 24 3a  4d 25 3d 41 25 21 32 30  |%,V%,F$:M%=A%!20|
00000e00  3a 48 25 3d 41 25 21 32  34 3a 53 24 3d a4 51 28  |:H%=A%!24:S$=.Q(|
00000e10  41 25 2b 34 34 29 3a 41  25 21 26 43 3d 41 25 21  |A%+44):A%!&C=A%!|
00000e20  38 3a 41 25 21 31 36 3d  34 3a c8 99 26 34 30 30  |8:A%!16=4:..&400|
00000e30  45 37 2c 31 37 2c 41 25  2c 41 25 21 34 3a e7 4d  |E7,17,A%,A%!4:.M|
00000e40  25 3c 31 8c e1 0d 00 79  15 e7 4d 25 3d 46 79 25  |%<1....y..M%=Fy%|
00000e50  8c f2 50 5f 28 41 25 29  3a e1 0d 00 7a 25 47 25  |..P_(A%):...z%G%|
00000e60  3d a4 4e 28 4d 25 29 3a  6f 24 3d 53 24 3a e7 a6  |=.N(M%):o$=S$:..|
00000e70  2d 33 8c f2 54 5f 28 48  25 2c 53 24 29 3a e1 0d  |-3..T_(H%,S$):..|
00000e80  00 7b 27 68 25 3d a4 46  28 47 25 29 3a 52 79 25  |.{'h%=.F(G%):Ry%|
00000e90  3d 68 25 2b 31 3a 58 25  3d a4 4d 28 68 25 29 3a  |=h%+1:X%=.M(h%):|
00000ea0  e7 58 25 3e 30 8c 0d 00  7c 1f 57 79 25 3d a4 48  |.X%>0...|.Wy%=.H|
00000eb0  79 28 68 25 2c 52 79 25  2c 6f 24 29 3a e7 57 79  |y(h%,Ry%,o$):.Wy|
00000ec0  25 3e 30 8c e1 0d 00 7d  14 cd 3a e7 58 25 3d 79  |%>0....}..:.X%=y|
00000ed0  25 8c 60 4a 25 3d b9 3a  e1 0d 00 7e 4f 56 25 3d  |%.`J%=.:...~OV%=|
00000ee0  41 25 21 34 30 3a 66 25  3d a4 55 28 53 24 29 3a  |A%!40:f%=.U(S$):|
00000ef0  46 24 3d a4 4a 28 53 24  29 3a 58 79 25 3d a3 3a  |F$=.J(S$):Xy%=.:|
00000f00  61 24 3d a4 49 28 66 25  2c 56 25 2c 46 24 2c 30  |a$=.I(f%,V%,F$,0|
00000f10  29 3a e7 58 79 25 8c 4e  25 3d 26 41 39 31 33 8b  |):.Xy%.N%=&A913.|
00000f20  4e 25 3d 26 41 31 31 33  0d 00 7f 4c 42 25 3d 28  |N%=&A113...LB%=(|
00000f30  6d 25 3c 3c 32 38 29 2b  28 4a 79 25 3c 3c 32 34  |m%<<28)+(Jy%<<24|
00000f40  29 2b 4e 25 3a 51 25 3d  35 30 2b 28 58 25 2a 34  |)+N%:Q%=50+(X%*4|
00000f50  34 29 2b 75 25 3a 60 79  25 3d a4 4c 28 52 79 25  |4)+u%:`y%=.L(Ry%|
00000f60  29 3a f2 4c 5f 28 6f 24  2c 52 79 25 29 3a e7 ac  |):.L_(o$,Ry%):..|
00000f70  5f 25 8c e1 0d 00 80 19  f2 64 79 28 60 79 25 2c  |_%.......dy(`y%,|
00000f80  68 25 2c 58 25 29 3a e7  ac 5f 25 8c e1 0d 00 81  |h%,X%):.._%.....|
00000f90  89 58 25 2b 3d 31 3a 6b  79 25 2b 3d 31 3a 6f 25  |.X%+=1:ky%+=1:o%|
00000fa0  3d 53 25 28 47 25 2c 58  25 29 3a 24 6f 25 3d 46  |=S%(G%,X%):$o%=F|
00000fb0  24 3a 5f 79 25 3d 46 25  28 47 25 2c 58 25 29 3a  |$:_y%=F%(G%,X%):|
00000fc0  24 5f 79 25 3d 22 53 22  2b 61 24 3a 72 79 25 3d  |$_y%="S"+a$:ry%=|
00000fd0  a4 52 28 4d 25 2c 26 43  2c 51 25 2c 26 66 30 2d  |.R(M%,&C,Q%,&f0-|
00000fe0  32 34 2c 34 34 2d 75 25  2c 42 25 2c 22 22 2c 6f  |24,44-u%,B%,"",o|
00000ff0  25 2c 5f 79 25 2c 35 36  29 3a c8 99 26 34 30 30  |%,_y%,56):..&400|
00001000  43 46 2c 2c 41 25 3a 63  25 3d 41 25 21 31 36 3a  |CF,,A%:c%=A%!16:|
00001010  e7 63 25 3e 30 8c 0d 00  82 1d f2 62 28 4d 25 2c  |.c%>0......b(M%,|
00001020  72 79 25 2c 63 25 29 3a  f2 42 28 47 25 2c 63 25  |ry%,c%):.B(G%,c%|
00001030  2c 31 29 0d 00 83 11 cc  3a f2 42 28 47 25 2c 58  |,1).....:.B(G%,X|
00001040  25 2c 31 29 0d 00 84 10  cd 3a e7 49 79 25 8c 73  |%,1).....:.Iy%.s|
00001050  4a 25 3d b9 0d 00 85 18  e7 a4 4d 28 68 25 29 3d  |J%=.......M(h%)=|
00001060  31 8c f2 66 28 47 25 2c  64 79 25 29 0d 00 86 11  |1..f(G%,dy%)....|
00001070  f2 4f 28 4d 25 29 3a 6c  25 3d b9 3a e1 0d 00 87  |.O(M%):l%=.:....|
00001080  35 dd f2 54 5f 28 48 25  2c 53 24 29 3a ea 56 25  |5..T_(H%,S$):.V%|
00001090  3a 56 25 3d 30 3a e7 48  25 3e 30 8c 56 24 3d a4  |:V%=0:.H%>0.V$=.|
000010a0  43 28 47 25 2c 48 25 29  3a 56 25 3d a4 50 28 56  |C(G%,H%):V%=.P(V|
000010b0  24 29 0d 00 88 0d e7 56  25 3d 38 31 39 32 8c 0d  |$).....V%=8192..|
000010c0  00 89 28 60 5f 25 3d b9  3a 57 5f 25 2b 3d 31 3a  |..(`_%=.:W_%+=1:|
000010d0  61 4a 25 3d a4 6f 28 56  24 29 3d a3 3a 4a 24 28  |aJ%=.o(V$)=.:J$(|
000010e0  57 5f 25 29 3d 53 24 0d  00 8a 0b cc 3a 60 5f 25  |W_%)=S$.....:`_%|
000010f0  3d a3 0d 00 8b 07 cd 3a  e1 0d 00 8c 77 dd f2 50  |=......:....w..P|
00001100  5f 28 41 25 29 3a ea 53  24 2c 46 24 2c 56 25 2c  |_(A%):.S$,F$,V%,|
00001110  5a 24 2c 41 24 2c 5f 25  2c 70 75 25 2c 53 6c 25  |Z$,A$,_%,pu%,Sl%|
00001120  3a 5f 25 3d b9 3a 70 75  25 3d a3 3a 53 6c 25 3d  |:_%=.:pu%=.:Sl%=|
00001130  a3 3a 41 24 3d 22 22 3a  53 24 3d a4 51 28 41 25  |.:A$="":S$=.Q(A%|
00001140  2b 34 34 29 3a 46 24 3d  a4 4a 28 53 24 29 3a 56  |+44):F$=.J(S$):V|
00001150  25 3d a4 50 28 53 24 29  3a e7 56 25 3d 38 31 39  |%=.P(S$):.V%=819|
00001160  32 80 46 24 3d 22 21 4d  65 6e 75 42 61 72 22 8c  |2.F$="!MenuBar".|
00001170  0d 00 8d 1e 5a 24 3d 53  24 2b 22 2e 4d 65 6e 75  |....Z$=S$+".Menu|
00001180  44 61 74 61 22 3a e7 a4  5a 28 5a 24 29 8c 0d 00  |Data":..Z(Z$)...|
00001190  8e 16 e7 a4 50 28 5a 24  29 3d 26 46 46 44 8c 70  |....P(Z$)=&FFD.p|
000011a0  75 25 3d b9 0d 00 8f 05  cd 0d 00 90 0f cd 3a e7  |u%=...........:.|
000011b0  43 79 25 3c 59 79 25 8c  0d 00 91 18 e7 72 25 3e  |Cy%<Yy%......r%>|
000011c0  3d 26 41 80 79 25 3e 3d  33 30 8c 53 6c 25 3d b9  |=&A.y%>=30.Sl%=.|
000011d0  0d 00 92 0f cd 3a e7 70  75 25 80 53 6c 25 8c 0d  |.....:.pu%.Sl%..|
000011e0  00 93 18 e7 a4 5a 28 42  24 2b 22 2e 4d 65 6e 75  |.....Z(B$+".Menu|
000011f0  44 61 74 61 22 29 8c 0d  00 94 5c 4d 24 3d 22 27  |Data")....\M$="'|
00001200  22 2b 46 24 2b 22 27 20  61 6c 72 65 61 64 79 20  |"+F$+"' already |
00001210  65 78 69 73 74 73 2c 4f  4b 20 74 6f 20 6f 76 65  |exists,OK to ove|
00001220  72 77 72 69 74 65 3f 22  3a 7a 25 3d a4 53 28 4d  |rwrite?":z%=.S(M|
00001230  24 2c 22 43 61 6e 63 65  6c 2c 4f 76 65 72 77 72  |$,"Cancel,Overwr|
00001240  69 74 65 22 2c 32 29 3a  e7 7a 25 3c 3e 32 8c 5f  |ite",2):.z%<>2._|
00001250  25 3d a3 0d 00 95 0a cd  3a e7 5f 25 8c 0d 00 96  |%=......:._%....|
00001260  99 78 24 3d 22 41 7e 43  7e 44 46 7e 4c 7e 4e 7e  |.x$="A~C~DF~L~N~|
00001270  50 7e 51 52 7e 53 7e 54  7e 56 22 3a ff 28 22 43  |P~QR~S~T~V":.("C|
00001280  6f 70 79 20 22 2b 5a 24  2b 22 20 22 2b 42 24 2b  |opy "+Z$+" "+B$+|
00001290  22 2e 4d 65 6e 75 44 61  74 61 20 22 2b 78 24 29  |".MenuData "+x$)|
000012a0  3a 46 25 3d ad 28 42 24  2b 22 2e 4d 65 6e 75 44  |:F%=.(B$+".MenuD|
000012b0  61 74 61 22 29 3a cf 23  46 25 3d 31 36 3a d5 23  |ata"):.#F%=16:.#|
000012c0  46 25 2c 26 42 3a d5 23  46 25 2c 30 3a d5 23 46  |F%,&B:.#F%,0:.#F|
000012d0  25 2c 32 3a d5 23 46 25  2c 37 3a d5 23 46 25 2c  |%,2:.#F%,7:.#F%,|
000012e0  30 3a d9 23 46 25 3a 46  25 3d 30 3a f2 55 3a e7  |0:.#F%:F%=0:.U:.|
000012f0  43 79 25 3d 31 8c 0d 00  97 18 58 24 3d 22 4d 65  |Cy%=1.....X$="Me|
00001300  6e 75 44 61 74 61 22 3a  f2 63 28 58 24 29 0d 00  |nuData":.c(X$)..|
00001310  98 27 cd 3a f2 52 3a f2  7a 28 22 4d 65 6e 75 44  |.'.:.R:.z("MenuD|
00001320  61 74 61 22 29 3a f2 54  79 28 22 4d 65 6e 75 44  |ata"):.Ty("MenuD|
00001330  61 74 61 22 29 0d 00 99  05 cd 0d 00 9a 08 cc 3a  |ata")..........:|
00001340  f2 50 0d 00 9b 07 cd 3a  e1 0d 00 9c 44 dd f2 66  |.P.....:....D..f|
00001350  28 46 69 25 2c 4c 69 25  29 3a ea 4d 25 3a 4d 25  |(Fi%,Li%):.M%:M%|
00001360  3d 41 25 28 46 69 25 29  3a f2 4d 28 4d 25 2c 30  |=A%(Fi%):.M(M%,0|
00001370  2c 28 51 79 25 3c 3c 32  38 29 2b 28 4c 69 25 3c  |,(Qy%<<28)+(Li%<|
00001380  3c 32 34 29 2b 26 41 31  33 44 29 3a e1 0d 00 9d  |<24)+&A13D):....|
00001390  1e dd a4 49 28 66 25 2c  56 25 2c 46 24 2c 64 25  |...I(f%,V%,F$,d%|
000013a0  29 3a ea 57 24 3a c8 8e  64 25 ca 0d 00 9e 15 c9  |):.W$:..d%......|
000013b0  30 3a 57 24 3d 22 73 6d  61 6c 6c 5f 78 78 78 22  |0:W$="small_xxx"|
000013c0  0d 00 9f 14 c9 31 3a 57  24 3d 22 66 69 6c 65 5f  |.....1:W$="file_|
000013d0  78 78 78 22 0d 00 a0 11  cb 3a 58 79 25 3d a3 3a  |xxx".....:Xy%=.:|
000013e0  c8 8e 66 25 ca 0d 00 a1  14 c9 30 3a 57 24 3d 22  |..f%......0:W$="|
000013f0  6e 6f 74 66 6f 75 6e 64  22 0d 00 a2 16 c9 31 2c  |notfound".....1,|
00001400  33 3a 57 24 3d a4 49 79  28 56 25 2c 64 25 29 0d  |3:W$=.Iy(V%,d%).|
00001410  00 a3 14 c9 32 3a 57 24  3d a4 4e 79 28 46 24 2c  |....2:W$=.Ny(F$,|
00001420  64 25 29 0d 00 a4 09 cb  3a 3d 57 24 0d 00 a5 22  |d%).....:=W$..."|
00001430  dd a4 49 79 28 56 25 2c  64 25 29 3a ea 4e 24 2c  |..Iy(V%,d%):.N$,|
00001440  42 25 3a 58 79 25 3d a3  3a c8 8e 64 25 ca 0d 00  |B%:Xy%=.:..d%...|
00001450  a6 17 c9 30 3a 4e 24 3d  22 73 6d 61 6c 6c 5f 22  |...0:N$="small_"|
00001460  2b c3 7e 56 25 0d 00 a7  16 c9 31 3a 4e 24 3d 22  |+.~V%.....1:N$="|
00001470  66 69 6c 65 5f 22 2b c3  7e 56 25 0d 00 a8 27 cb  |file_"+.~V%...'.|
00001480  3a c8 99 26 36 30 30 45  39 2c 32 34 2c 2c 4e 24  |:..&600E9,24,,N$|
00001490  b8 3b 42 25 3a e7 28 42  25 80 31 29 3d 30 8c 3d  |.;B%:.(B%.1)=0.=|
000014a0  4e 24 0d 00 a9 15 e7 64  25 3d 31 8c 3d 22 66 69  |N$.....d%=1.="fi|
000014b0  6c 65 5f 78 78 78 22 0d  00 aa 3b 4e 24 3d 22 66  |le_xxx"...;N$="f|
000014c0  69 6c 65 5f 22 2b c3 7e  56 25 3a c8 99 26 36 30  |ile_"+.~V%:..&60|
000014d0  30 45 39 2c 32 34 2c 2c  4e 24 b8 3b 42 25 3a e7  |0E9,24,,N$.;B%:.|
000014e0  28 42 25 80 31 29 3d 30  8c 58 79 25 3d b9 3a 3d  |(B%.1)=0.Xy%=.:=|
000014f0  4e 24 0d 00 ab 10 3d 22  73 6d 61 6c 6c 5f 78 78  |N$....="small_xx|
00001500  78 22 0d 00 ac 2a dd a4  4e 79 28 50 24 2c 64 25  |x"...*..Ny(P$,d%|
00001510  29 3a ea 4e 24 2c 42 25  3a 58 79 25 3d a3 3a e7  |):.N$,B%:Xy%=.:.|
00001520  c0 50 24 2c 31 29 3c 3e  22 21 22 8c 0d 00 ad 09  |.P$,1)<>"!".....|
00001530  c8 8e 64 25 ca 0d 00 ae  13 c9 30 3a 3d 22 73 6d  |..d%......0:="sm|
00001540  61 6c 6c 5f 64 69 72 22  0d 00 af 13 c9 31 3a 3d  |all_dir".....1:=|
00001550  22 64 69 72 65 63 74 6f  72 79 22 0d 00 b0 05 cb  |"directory".....|
00001560  0d 00 b1 0b cd 3a c8 8e  64 25 ca 0d 00 b2 11 c9  |.....:..d%......|
00001570  30 3a 4e 24 3d 22 73 6d  22 2b 50 24 0d 00 b3 0c  |0:N$="sm"+P$....|
00001580  c9 31 3a 4e 24 3d 50 24  0d 00 b4 27 cb 3a c8 99  |.1:N$=P$...'.:..|
00001590  26 36 30 30 45 39 2c 32  34 2c 2c 4e 24 b8 3b 42  |&600E9,24,,N$.;B|
000015a0  25 3a e7 28 42 25 80 31  29 3d 30 8c 3d 4e 24 0d  |%:.(B%.1)=0.=N$.|
000015b0  00 b5 10 4e 24 3d 50 24  3a e7 64 25 3d 30 8c 0d  |...N$=P$:.d%=0..|
000015c0  00 b6 2b c8 99 26 36 30  30 45 39 2c 32 34 2c 2c  |..+..&600E9,24,,|
000015d0  4e 24 b8 3b 42 25 3a e7  28 42 25 80 31 29 3d 30  |N$.;B%:.(B%.1)=0|
000015e0  8c 58 79 25 3d b9 3a 3d  4e 24 0d 00 b7 0b cd 3a  |.Xy%=.:=N$.....:|
000015f0  c8 8e 64 25 ca 0d 00 b8  13 c9 30 3a 3d 22 73 6d  |..d%......0:="sm|
00001600  61 6c 6c 5f 61 70 70 22  0d 00 b9 15 c9 31 3a 3d  |all_app".....1:=|
00001610  22 61 70 70 6c 69 63 61  74 69 6f 6e 22 0d 00 ba  |"application"...|
00001620  09 cb 3a 3d 22 22 0d 00  bb 66 dd f2 71 5f 28 47  |..:=""...f..q_(G|
00001630  25 29 3a ea 4a 25 2c 4d  25 3a 56 79 25 3d a3 3a  |%):.J%,M%:Vy%=.:|
00001640  4d 25 3d 41 25 28 47 25  29 3a 5a 25 3d a4 61 28  |M%=A%(G%):Z%=.a(|
00001650  4d 25 29 3a 51 25 3d a4  46 28 47 25 29 3a 58 25  |M%):Q%=.F(G%):X%|
00001660  3d a4 4d 28 51 25 29 3a  e3 4a 25 3d 31 b8 58 25  |=.M(Q%):.J%=1.X%|
00001670  3a f2 4a 79 28 4d 25 2c  4a 25 29 3a ed 3a f2 47  |:.Jy(M%,J%):.:.G|
00001680  28 4d 25 29 3a e7 5a 25  3c 77 25 8c 0d 00 bc 21  |(M%):.Z%<w%....!|
00001690  e3 4a 25 3d 5a 25 b8 77  25 2d 31 3a 5a 25 28 4a  |.J%=Z%.w%-1:Z%(J|
000016a0  25 29 3d 5a 25 28 4a 25  2b 31 29 3a ed 0d 00 bd  |%)=Z%(J%+1):....|
000016b0  45 cd 3a 68 25 3d a4 46  28 47 25 29 3a 52 79 25  |E.:h%=.F(G%):Ry%|
000016c0  3d 68 25 2b 31 3a f2 57  79 28 52 79 25 29 3a f2  |=h%+1:.Wy(Ry%):.|
000016d0  57 79 28 68 25 29 3a 77  25 2d 3d 31 3a 60 25 3d  |Wy(h%):w%-=1:`%=|
000016e0  31 3a f2 59 28 60 25 2c  77 25 29 3a 6c 25 3d b9  |1:.Y(`%,w%):l%=.|
000016f0  3a e1 0d 00 be 53 dd f2  73 28 4d 25 2c 73 25 29  |:....S..s(M%,s%)|
00001700  3a ea 4a 25 3a c8 99 26  34 30 36 43 30 3a 56 79  |:.J%:..&406C0:Vy|
00001710  25 3d a3 3a e3 4a 25 3d  73 25 b8 31 88 2d 31 3a  |%=.:.J%=s%.1.-1:|
00001720  70 25 3d 4d 25 28 4a 25  29 3a f2 49 28 4d 25 2c  |p%=M%(J%):.I(M%,|
00001730  70 25 29 3a ed 3a c8 99  26 34 30 36 43 32 3a 6c  |p%):.:..&406C2:l|
00001740  25 3d b9 3a e1 0d 00 bf  26 dd f2 49 28 4d 25 2c  |%=.:....&..I(M%,|
00001750  70 25 29 3a ea 4a 25 2c  58 25 2c 53 24 2c 42 25  |p%):.J%,X%,S$,B%|
00001760  2c 4e 25 3a e7 70 25 3c  31 8c e1 0d 00 c0 41 47  |,N%:.p%<1.....AG|
00001770  25 3d a4 4e 28 4d 25 29  3a 68 25 3d a4 46 28 47  |%=.N(M%):h%=.F(G|
00001780  25 29 3a 52 79 25 3d 68  25 2b 31 3a 58 25 3d a4  |%):Ry%=h%+1:X%=.|
00001790  4d 28 68 25 29 3a f2 6a  5f 28 68 25 2c 52 79 25  |M(h%):.j_(h%,Ry%|
000017a0  2c 70 25 29 3a e7 70 25  3c 79 25 8c 0d 00 c1 92  |,p%):.p%<y%.....|
000017b0  e3 4a 25 3d 70 25 b8 58  25 2d 31 3a 24 53 25 28  |.J%=p%.X%-1:$S%(|
000017c0  47 25 2c 4a 25 29 3d 24  53 25 28 47 25 2c 4a 25  |G%,J%)=$S%(G%,J%|
000017d0  2b 31 29 3a 24 46 25 28  47 25 2c 4a 25 29 3d 24  |+1):$F%(G%,J%)=$|
000017e0  46 25 28 47 25 2c 4a 25  2b 31 29 3a 4e 25 3d a4  |F%(G%,J%+1):N%=.|
000017f0  56 28 47 25 2c 4a 25 2b  31 29 3a f2 42 28 47 25  |V(G%,J%+1):.B(G%|
00001800  2c 4a 25 2c 4e 25 29 3a  41 25 21 30 3d 4d 25 3a  |,J%,N%):A%!0=M%:|
00001810  41 25 21 34 3d 4a 25 2b  31 3a c8 99 26 34 30 30  |A%!4=J%+1:..&400|
00001820  43 45 2c 2c 41 25 3a 42  25 3d 41 25 21 32 34 3a  |CE,,A%:B%=A%!24:|
00001830  f2 4d 28 4d 25 2c 4a 25  2c 42 25 29 3a ed 0d 00  |.M(M%,J%,B%):...|
00001840  c2 6e cd 3a 41 25 21 30  3d 4d 25 3a c8 99 26 34  |.n.:A%!0=M%:..&4|
00001850  30 30 43 42 2c 2c 41 25  3a 44 6c 25 3d 41 25 21  |00CB,,A%:Dl%=A%!|
00001860  38 3a 4e 5f 25 3d 41 25  21 31 36 3a 58 6c 25 3d  |8:N_%=A%!16:Xl%=|
00001870  4e 5f 25 2d 28 58 25 2a  34 34 29 2d 28 35 30 29  |N_%-(X%*44)-(50)|
00001880  2d 75 25 3a f2 4a 79 28  4d 25 2c 58 25 29 3a 58  |-u%:.Jy(M%,X%):X|
00001890  25 2d 3d 31 3a 6b 79 25  2d 3d 31 3a e7 58 25 3d  |%-=1:ky%-=1:.X%=|
000018a0  30 8c f2 66 28 47 25 2c  78 79 25 29 0d 00 c3 12  |0..f(G%,xy%)....|
000018b0  e7 28 44 6c 25 2d 58 6c  25 29 3c 35 30 8c 0d 00  |.(Dl%-Xl%)<50...|
000018c0  c4 11 f2 43 28 47 25 29  3a f2 5f 28 47 25 29 0d  |...C(G%):._(G%).|
000018d0  00 c5 13 cd 3a f2 4f 28  4d 25 29 3a 6c 25 3d b9  |....:.O(M%):l%=.|
000018e0  3a e1 0d 00 c6 84 dd f2  43 79 28 71 25 29 3a ea  |:.......Cy(q%):.|
000018f0  4a 25 2c 4b 25 2c 53 79  25 2c 79 75 25 2c 6b 4a  |J%,K%,Sy%,yu%,kJ|
00001900  25 2c 74 6c 25 2c 68 6c  25 3a 41 5f 25 3d a3 3a  |%,tl%,hl%:A_%=.:|
00001910  c8 99 26 34 30 30 43 46  2c 2c 41 25 3a 78 25 3d  |..&400CF,,A%:x%=|
00001920  41 25 21 30 3a 76 25 3d  41 25 21 34 3a 47 79 25  |A%!0:v%=A%!4:Gy%|
00001930  3d 41 25 21 26 43 3a 63  25 3d 41 25 21 31 36 3a  |=A%!&C:c%=A%!16:|
00001940  79 75 25 3d a4 61 28 71  25 29 3a 6b 4a 25 3d a4  |yu%=.a(q%):kJ%=.|
00001950  61 28 47 79 25 29 3a e7  6b 4a 25 3c 31 84 71 25  |a(Gy%):.kJ%<1.q%|
00001960  3d 47 79 25 8c e1 0d 00  c7 19 e7 79 75 25 3c 6b  |=Gy%.......yu%<k|
00001970  4a 25 8c 53 79 25 3d 31  8b 53 79 25 3d 2d 31 0d  |J%.Sy%=1.Sy%=-1.|
00001980  00 c8 53 e3 4a 25 3d 79  75 25 b8 28 6b 4a 25 2d  |..S.J%=yu%.(kJ%-|
00001990  53 79 25 29 88 53 79 25  3a 74 6c 25 3d 5a 25 28  |Sy%).Sy%:tl%=Z%(|
000019a0  4a 25 29 3a 68 6c 25 3d  5a 25 28 4a 25 2b 53 79  |J%):hl%=Z%(J%+Sy|
000019b0  25 29 3a f2 56 5f 28 74  6c 25 2c 68 6c 25 2c 4a  |%):.V_(tl%,hl%,J|
000019c0  25 2c 4a 25 2b 53 79 25  29 3a ed 3a 6c 25 3d b9  |%,J%+Sy%):.:l%=.|
000019d0  3a e1 0d 00 c9 56 dd a4  61 28 4d 25 29 3a ea 4a  |:....V..a(M%):.J|
000019e0  25 2c 4c 25 2c 4e 25 3a  4c 25 3d a4 4e 28 4d 25  |%,L%,N%:L%=.N(M%|
000019f0  29 3a 4a 25 3d 31 3a f5  3a 4e 25 3d 5a 25 28 4a  |):J%=1:.:N%=Z%(J|
00001a00  25 29 3a 4a 25 2b 3d 31  3a fd 4e 25 3d 4c 25 84  |%):J%+=1:.N%=L%.|
00001a10  4a 25 3e 77 25 3a e7 4e  25 3d 4c 25 8c 4a 25 2d  |J%>w%:.N%=L%.J%-|
00001a20  3d 31 8b 4a 25 3d 2d 31  0d 00 ca 07 3d 4a 25 0d  |=1.J%=-1....=J%.|
00001a30  00 cb f5 dd f2 56 5f 28  75 75 25 2c 69 75 25 2c  |.....V_(uu%,iu%,|
00001a40  6a 79 25 2c 42 5f 25 29  3a 41 25 21 30 3d 41 25  |jy%,B_%):A%!0=A%|
00001a50  28 75 75 25 29 3a c8 99  26 34 30 30 43 42 2c 2c  |(uu%):..&400CB,,|
00001a60  41 25 3a 68 75 25 3d 41  25 21 34 3a 41 25 21 30  |A%:hu%=A%!4:A%!0|
00001a70  3d 41 25 28 69 75 25 29  3a c8 99 26 34 30 30 43  |=A%(iu%):..&400C|
00001a80  42 2c 2c 41 25 3a 4b 75  25 3d 41 25 21 34 3a 41  |B,,A%:Ku%=A%!4:A|
00001a90  25 21 30 3d 41 25 28 75  75 25 29 3a c8 99 26 34  |%!0=A%(uu%):..&4|
00001aa0  30 30 43 42 2c 2c 41 25  3a 41 25 21 34 3d 4b 75  |00CB,,A%:A%!4=Ku|
00001ab0  25 3a 41 25 21 26 43 3d  4b 75 25 2b 26 66 30 3a  |%:A%!&C=Ku%+&f0:|
00001ac0  c8 99 26 34 30 30 43 35  2c 2c 41 25 3a 41 25 21  |..&400C5,,A%:A%!|
00001ad0  30 3d 41 25 28 69 75 25  29 3a c8 99 26 34 30 30  |0=A%(iu%):..&400|
00001ae0  43 42 2c 2c 41 25 3a 41  25 21 34 3d 68 75 25 3a  |CB,,A%:A%!4=hu%:|
00001af0  41 25 21 26 43 3d 68 75  25 2b 26 66 30 3a c8 99  |A%!&C=hu%+&f0:..|
00001b00  26 34 30 30 43 35 2c 2c  41 25 3a 5a 25 28 6a 79  |&400C5,,A%:Z%(jy|
00001b10  25 29 3d 69 75 25 3a 5a  25 28 42 5f 25 29 3d 75  |%)=iu%:Z%(B_%)=u|
00001b20  75 25 3a e1 0d 00 cc 5b  dd f2 4b 5f 28 4d 25 2c  |u%:....[..K_(M%,|
00001b30  63 25 29 3a ea 4a 25 2c  4b 25 2c 56 6c 25 3a 73  |c%):.J%,K%,Vl%:s|
00001b40  25 3d a4 57 28 4d 25 29  3a 47 25 3d a4 4e 28 4d  |%=.W(M%):G%=.N(M|
00001b50  25 29 3a 4c 25 3d 5a 25  28 47 25 29 3a 51 25 3d  |%):L%=Z%(G%):Q%=|
00001b60  a4 46 28 4c 25 29 3a 58  25 3d a4 4d 28 51 25 29  |.F(L%):X%=.M(Q%)|
00001b70  3a e7 63 25 3d 2d 31 8c  63 25 3d 58 25 2b 31 0d  |:.c%=-1.c%=X%+1.|
00001b80  00 cd 20 56 6c 25 3d 63  25 3e 4d 25 28 73 25 29  |.. Vl%=c%>M%(s%)|
00001b90  3a e3 4a 25 3d 31 b8 73  25 3a e7 56 6c 25 8c 0d  |:.J%=1.s%:.Vl%..|
00001ba0  00 ce 29 4b 25 3d 30 3a  f5 4b 25 2b 3d 31 3a fd  |..)K%=0:.K%+=1:.|
00001bb0  a4 42 28 71 25 2c 4b 25  29 3a f2 62 28 4d 25 2c  |.B(q%,K%):.b(M%,|
00001bc0  4b 25 2c 63 25 2d 31 29  0d 00 cf 2c cc 3a 4b 25  |K%,c%-1)...,.:K%|
00001bd0  3d 58 25 2b 31 3a f5 4b  25 2d 3d 31 3a fd a4 42  |=X%+1:.K%-=1:..B|
00001be0  28 71 25 2c 4b 25 29 3a  f2 62 28 4d 25 2c 4b 25  |(q%,K%):.b(M%,K%|
00001bf0  2c 63 25 29 0d 00 d0 09  cd 3a ed 3a e1 0d 00 d1  |,c%).....:.:....|
00001c00  4f dd f2 62 28 71 25 2c  55 79 25 2c 63 25 29 3a  |O..b(q%,Uy%,c%):|
00001c10  ea 4a 25 2c 53 79 25 2c  6a 25 2c 78 6c 25 2c 4e  |.J%,Sy%,j%,xl%,N|
00001c20  25 2c 5a 79 25 2c 51 25  2c 55 6c 25 2c 58 25 3a  |%,Zy%,Q%,Ul%,X%:|
00001c30  6a 25 3d a4 4e 28 71 25  29 3a 51 25 3d 6a 25 2a  |j%=.N(q%):Q%=j%*|
00001c40  32 2d 31 3a e7 63 25 3d  6b 25 8c e1 0d 00 d2 23  |2-1:.c%=k%.....#|
00001c50  51 25 3d a4 46 28 6a 25  29 3a 58 25 3d a4 4d 28  |Q%=.F(j%):X%=.M(|
00001c60  51 25 29 3a e7 63 25 3d  30 8c 63 25 3d 58 25 0d  |Q%):.c%=0.c%=X%.|
00001c70  00 d3 18 e7 55 79 25 3c  63 25 8c 53 79 25 3d 31  |....Uy%<c%.Sy%=1|
00001c80  8b 53 79 25 3d 2d 31 0d  00 d4 ed e3 4a 25 3d 55  |.Sy%=-1.....J%=U|
00001c90  79 25 b8 63 25 88 53 79  25 3a 41 25 21 30 3d 71  |y%.c%.Sy%:A%!0=q|
00001ca0  25 3a 41 25 21 34 3d 4a  25 3a c8 99 26 34 30 30  |%:A%!4=J%:..&400|
00001cb0  43 45 2c 2c 41 25 3a 42  25 28 4a 25 29 3d 41 25  |CE,,A%:B%(J%)=A%|
00001cc0  21 32 34 3a ed 3a 78 6c  25 3d a4 59 28 51 25 2c  |!24:.:xl%=.Y(Q%,|
00001cd0  55 79 25 29 3a 42 25 28  30 29 3d 42 25 28 55 79  |Uy%):B%(0)=B%(Uy|
00001ce0  25 29 3a 24 53 25 28 6a  25 2c 30 29 3d 24 53 25  |%):$S%(j%,0)=$S%|
00001cf0  28 6a 25 2c 55 79 25 29  3a 24 46 25 28 6a 25 2c  |(j%,Uy%):$F%(j%,|
00001d00  30 29 3d 24 46 25 28 6a  25 2c 55 79 25 29 3a 55  |0)=$F%(j%,Uy%):U|
00001d10  6c 25 3d a4 56 28 6a 25  2c 55 79 25 29 3a e3 4a  |l%=.V(j%,Uy%):.J|
00001d20  25 3d 55 79 25 b8 28 63  25 2d 53 79 25 29 88 53  |%=Uy%.(c%-Sy%).S|
00001d30  79 25 3a 5a 79 25 3d a4  47 28 51 25 29 2b 28 4a  |y%:Zy%=.G(Q%)+(J|
00001d40  25 2d 31 29 2a 34 3a 4e  25 3d a4 59 28 51 25 2c  |%-1)*4:N%=.Y(Q%,|
00001d50  4a 25 2b 53 79 25 29 3a  21 5a 79 25 3d 4e 25 3a  |J%+Sy%):!Zy%=N%:|
00001d60  f2 4d 28 71 25 2c 4a 25  2c 42 25 28 4a 25 2b 53  |.M(q%,J%,B%(J%+S|
00001d70  79 25 29 29 0d 00 d5 d4  24 53 25 28 6a 25 2c 4a  |y%))....$S%(j%,J|
00001d80  25 29 3d 24 53 25 28 6a  25 2c 4a 25 2b 53 79 25  |%)=$S%(j%,J%+Sy%|
00001d90  29 3a 24 46 25 28 6a 25  2c 4a 25 29 3d 24 46 25  |):$F%(j%,J%)=$F%|
00001da0  28 6a 25 2c 4a 25 2b 53  79 25 29 3a 4e 25 3d a4  |(j%,J%+Sy%):N%=.|
00001db0  56 28 6a 25 2c 4a 25 2b  53 79 25 29 3a f2 42 28  |V(j%,J%+Sy%):.B(|
00001dc0  6a 25 2c 4a 25 2c 4e 25  29 3a ed 3a 5a 79 25 3d  |j%,J%,N%):.:Zy%=|
00001dd0  a4 47 28 51 25 29 2b 28  63 25 2d 31 29 2a 34 3a  |.G(Q%)+(c%-1)*4:|
00001de0  21 5a 79 25 3d 78 6c 25  3a f2 4d 28 71 25 2c 63  |!Zy%=xl%:.M(q%,c|
00001df0  25 2c 42 25 28 30 29 29  3a 24 53 25 28 6a 25 2c  |%,B%(0)):$S%(j%,|
00001e00  63 25 29 3d 24 53 25 28  6a 25 2c 30 29 3a 24 46  |c%)=$S%(j%,0):$F|
00001e10  25 28 6a 25 2c 63 25 29  3d 24 46 25 28 6a 25 2c  |%(j%,c%)=$F%(j%,|
00001e20  30 29 3a f2 42 28 6a 25  2c 63 25 2c 55 6c 25 29  |0):.B(j%,c%,Ul%)|
00001e30  3a f2 57 28 71 25 2c 63  25 29 3a f2 4f 28 71 25  |:.W(q%,c%):.O(q%|
00001e40  29 3a 6c 25 3d b9 3a e1  0d 00 d6 33 dd a4 43 79  |):l%=.:....3..Cy|
00001e50  28 55 25 2c 54 79 25 29  3a ea 5a 79 25 3a 48 75  |(U%,Ty%):.Zy%:Hu|
00001e60  25 3d 28 55 25 2b 38 29  81 38 3a de 5a 79 25 48  |%=(U%+8).8:.Zy%H|
00001e70  75 25 2a 54 79 25 3a 3d  5a 79 25 0d 00 d7 60 dd  |u%*Ty%:=Zy%...`.|
00001e80  f2 42 28 55 25 2c 54 79  25 2c 4e 25 29 3a ea 46  |.B(U%,Ty%,N%):.F|
00001e90  5f 25 2c 4c 4a 25 2c 5f  5f 25 2c 6f 79 25 3a 46  |_%,LJ%,__%,oy%:F|
00001ea0  5f 25 3d 28 54 79 25 2a  48 75 25 29 2b 28 55 25  |_%=(Ty%*Hu%)+(U%|
00001eb0  81 38 29 3a 4c 4a 25 3d  55 25 83 38 3a 6f 79 25  |.8):LJ%=U%.8:oy%|
00001ec0  3d 32 5e 4c 4a 25 3a 5f  5f 25 3d 3f 28 78 4a 25  |=2^LJ%:__%=?(xJ%|
00001ed0  2b 46 5f 25 29 3a c8 8e  4e 25 ca 0d 00 d8 18 c9  |+F_%):..N%......|
00001ee0  30 3a 5f 5f 25 3d 5f 5f  25 80 28 26 46 46 2d 6f  |0:__%=__%.(&FF-o|
00001ef0  79 25 29 0d 00 d9 12 c9  31 3a 5f 5f 25 3d 5f 5f  |y%).....1:__%=__|
00001f00  25 84 6f 79 25 0d 00 da  16 cb 3a 3f 28 78 4a 25  |%.oy%.....:?(xJ%|
00001f10  2b 46 5f 25 29 3d 5f 5f  25 3a e1 0d 00 db 64 dd  |+F_%)=__%:....d.|
00001f20  a4 56 28 55 25 2c 54 79  25 29 3a ea 46 5f 25 2c  |.V(U%,Ty%):.F_%,|
00001f30  4c 4a 25 2c 5a 79 25 2c  6f 79 25 3a 46 5f 25 3d  |LJ%,Zy%,oy%:F_%=|
00001f40  28 54 79 25 2a 48 75 25  29 2b 28 55 25 81 38 29  |(Ty%*Hu%)+(U%.8)|
00001f50  3a 4c 4a 25 3d 55 25 83  38 3a 6f 79 25 3d 32 5e  |:LJ%=U%.8:oy%=2^|
00001f60  4c 4a 25 3a 5a 79 25 3d  78 4a 25 2b 46 5f 25 3a  |LJ%:Zy%=xJ%+F_%:|
00001f70  3d 28 3f 5a 79 25 80 6f  79 25 29 81 6f 79 25 0d  |=(?Zy%.oy%).oy%.|
00001f80  00 dc 76 dd f2 43 28 47  25 29 3a 41 25 21 30 3d  |..v..C(G%):A%!0=|
00001f90  41 25 28 47 25 29 3a c8  99 26 34 30 30 43 43 2c  |A%(G%):..&400CC,|
00001fa0  2c 41 25 3a 6e 79 25 3d  41 25 21 31 36 3a 41 25  |,A%:ny%=A%!16:A%|
00001fb0  21 38 3d 6e 79 25 2d 35  30 2b 75 25 3a 41 25 21  |!8=ny%-50+u%:A%!|
00001fc0  26 43 3d 41 25 21 34 2b  28 41 25 21 35 32 2d 41  |&C=A%!4+(A%!52-A|
00001fd0  25 21 34 34 29 3a 41 25  21 32 34 3d 41 25 21 31  |%!44):A%!24=A%!1|
00001fe0  36 2d 41 25 21 38 3a c8  99 26 34 30 30 43 35 2c  |6-A%!8:..&400C5,|
00001ff0  2c 41 25 3a e1 0d 00 dd  3b dd f2 5f 28 47 25 29  |,A%:....;.._(G%)|
00002000  3a ea 58 25 2c 4d 25 2c  51 25 3a 51 25 3d a4 46  |:.X%,M%,Q%:Q%=.F|
00002010  28 47 25 29 3a 4d 25 3d  41 25 28 47 25 29 3a 58  |(G%):M%=A%(G%):X|
00002020  25 3d a4 4d 28 51 25 29  3a e7 58 25 3d 30 8c e1  |%=.M(Q%):.X%=0..|
00002030  0d 00 de 62 41 25 21 30  3d 4d 25 3a c8 99 26 34  |...bA%!0=M%:..&4|
00002040  30 30 43 42 2c 2c 41 25  3a 6e 79 25 3d 41 25 21  |00CB,,A%:ny%=A%!|
00002050  31 36 3a 41 25 21 38 3d  6e 79 25 2d 28 58 25 2a  |16:A%!8=ny%-(X%*|
00002060  34 34 29 2d 28 35 30 29  2d 75 25 3a 41 25 21 26  |44)-(50)-u%:A%!&|
00002070  43 3d 41 25 21 34 2b 26  66 30 3a 41 25 21 32 38  |C=A%!4+&f0:A%!28|
00002080  3d 2d 31 3a c8 99 26 34  30 30 43 35 2c 2c 41 25  |=-1:..&400C5,,A%|
00002090  3a e1 0d 00 df 16 dd f2  78 3a 47 25 28 29 3d b9  |:.......x:G%()=.|
000020a0  3a 63 79 25 3d 31 3a e1  0d 00 e0 16 dd f2 77 3a  |:cy%=1:.......w:|
000020b0  4e 25 28 29 3d b9 3a 62  79 25 3d 31 3a e1 0d 00  |N%()=.:by%=1:...|
000020c0  e1 5d dd f2 64 3a ea 4a  25 2c 4c 25 3a 41 25 21  |.]..d:.J%,L%:A%!|
000020d0  30 3d 46 79 25 3a c8 99  26 34 30 30 43 42 2c 2c  |0=Fy%:..&400CB,,|
000020e0  41 25 3a 41 25 21 32 38  3d 2d 31 3a c8 99 26 34  |A%:A%!28=-1:..&4|
000020f0  30 30 43 35 2c 2c 41 25  3a e3 4a 25 3d 31 b8 77  |00C5,,A%:.J%=1.w|
00002100  25 3a 4c 25 3d 5a 25 28  4a 25 29 3a e7 4c 25 3e  |%:L%=Z%(J%):.L%>|
00002110  3d 60 25 8c f2 79 79 28  4c 25 29 0d 00 e2 07 ed  |=`%..yy(L%).....|
00002120  3a e1 0d 00 e3 47 dd f2  79 79 28 47 25 29 3a ea  |:....G..yy(G%):.|
00002130  4d 25 3a 4d 25 3d 41 25  28 47 25 29 3a 41 25 21  |M%:M%=A%(G%):A%!|
00002140  30 3d 4d 25 3a c8 99 26  34 30 30 43 42 2c 2c 41  |0=M%:..&400CB,,A|
00002150  25 3a 41 25 21 32 38 3d  2d 31 3a c8 99 26 34 30  |%:A%!28=-1:..&40|
00002160  30 43 35 2c 2c 41 25 3a  e1 0d 00 e4 31 dd f2 61  |0C5,,A%:....1..a|
00002170  3a ea 4a 25 2c 4c 25 3a  e3 4a 25 3d 31 b8 77 25  |:.J%,L%:.J%=1.w%|
00002180  3a 4c 25 3d 5a 25 28 4a  25 29 3a e7 4c 25 3e 3d  |:L%=Z%(J%):.L%>=|
00002190  60 25 8c f2 61 79 28 4c  25 29 0d 00 e5 32 ed 3a  |`%..ay(L%)...2.:|
000021a0  41 25 21 30 3d 46 79 25  3a c8 99 26 34 30 30 43  |A%!0=Fy%:..&400C|
000021b0  42 2c 2c 41 25 3a 41 25  21 32 38 3d 30 3a c8 99  |B,,A%:A%!28=0:..|
000021c0  26 34 30 30 43 35 2c 2c  41 25 3a e1 0d 00 e6 76  |&400C5,,A%:....v|
000021d0  dd f2 61 79 28 47 25 29  3a ea 4d 25 2c 6e 5f 25  |..ay(G%):.M%,n_%|
000021e0  2c 6e 79 25 3a 4d 25 3d  41 25 28 47 25 29 3a 41  |,ny%:M%=A%(G%):A|
000021f0  25 21 30 3d 4d 25 3a c8  99 26 34 30 30 43 42 2c  |%!0=M%:..&400CB,|
00002200  2c 41 25 3a 6e 5f 25 3d  41 25 21 38 3a 6e 79 25  |,A%:n_%=A%!8:ny%|
00002210  3d 41 25 21 31 36 3a 41  25 21 32 38 3d 2d 32 3a  |=A%!16:A%!28=-2:|
00002220  c8 99 26 34 30 30 43 35  2c 2c 41 25 3a e7 6e 5f  |..&400C5,,A%:.n_|
00002230  25 3d 6e 79 25 2d 35 30  2b 75 25 8c f2 43 28 47  |%=ny%-50+u%..C(G|
00002240  25 29 0d 00 e7 05 e1 0d  00 e8 3c dd a4 75 28 44  |%)........<..u(D|
00002250  24 29 3a ea 4a 25 2c 5a  24 2c 61 5f 25 2c 77 6c  |$):.J%,Z$,a_%,wl|
00002260  25 2c 55 25 2c 41 24 3a  41 24 3d 22 22 3a 5a 24  |%,U%,A$:A$="":Z$|
00002270  3d 42 24 2b 22 2e 22 2b  44 24 3a e7 a4 5a 28 5a  |=B$+"."+D$:..Z(Z|
00002280  24 29 8c 0d 00 e9 2e 46  25 3d ad 28 5a 24 29 3a  |$).....F%=.(Z$):|
00002290  cf 23 46 25 3d 33 32 3a  61 5f 25 3d 9a 23 46 25  |.#F%=32:a_%=.#F%|
000022a0  3a 77 6c 25 3d 9a 23 46  25 3a e7 61 5f 25 3e 30  |:wl%=.#F%:.a_%>0|
000022b0  8c 0d 00 ea 24 f5 3a 55  25 3d 9a 23 46 25 3a e7  |....$.:U%=.#F%:.|
000022c0  55 25 3e 33 31 8c 55 25  2d 3d 77 6c 25 3a 41 24  |U%>31.U%-=wl%:A$|
000022d0  2b 3d bd 55 25 0d 00 eb  10 fd 55 25 3c 33 32 84  |+=.U%.....U%<32.|
000022e0  a9 41 24 3e 39 0d 00 ec  0f cd 3a d9 23 46 25 3a  |.A$>9.....:.#F%:|
000022f0  46 25 3d 30 0d 00 ed 09  cd 3a 3d 41 24 0d 00 ee  |F%=0.....:=A$...|
00002300  30 dd a4 6a 28 76 24 2c  44 24 29 3a ea 65 75 25  |0..j(v$,D$):.eu%|
00002310  2c 5f 25 2c 4d 25 3a 4d  25 3d 4e 75 25 3a 5f 25  |,_%,M%:M%=Nu%:_%|
00002320  3d b9 3a e7 76 24 3d 22  22 8c 3d 5f 25 0d 00 ef  |=.:.v$="".=_%...|
00002330  ac c8 99 26 34 30 36 43  32 3a 24 59 6c 25 3d 22  |...&406C2:$Yl%="|
00002340  4d 65 6e 75 42 61 72 20  27 22 2b 44 24 2b 22 27  |MenuBar '"+D$+"'|
00002350  22 3a f2 47 79 28 4d 25  29 3a f2 53 28 4d 25 2c  |":.Gy(M%):.S(M%,|
00002360  33 2c 22 22 29 3a f2 74  28 4d 25 2c 33 29 3a 41  |3,""):.t(M%,3):A|
00002370  25 21 30 3d 4d 25 3a c8  99 26 34 30 30 43 42 2c  |%!0=M%:..&400CB,|
00002380  2c 41 25 3a c8 97 c8 93  41 25 21 34 2c 41 25 21  |,A%:....A%!4,A%!|
00002390  38 2c 41 25 21 26 43 2d  41 25 21 34 2c 41 25 21  |8,A%!&C-A%!4,A%!|
000023a0  31 36 2d 41 25 21 38 3a  c8 97 b8 41 25 21 26 43  |16-A%!8:...A%!&C|
000023b0  2d 34 38 2c 41 25 21 38  2b 34 38 3a f5 3a 4b 79  |-48,A%!8+48:.:Ky|
000023c0  25 3d 30 3a 4d 4a 25 3d  a3 3a 4c 75 25 3d a3 3a  |%=0:MJ%=.:Lu%=.:|
000023d0  65 75 25 3d b9 3a ee 85  87 0d 00 f0 1d f5 3a c8  |eu%=.:........:.|
000023e0  99 26 34 30 30 43 37 2c  2c 41 25 b8 54 79 25 3a  |.&400C7,,A%.Ty%:|
000023f0  c8 8e 54 79 25 ca 0d 00  f1 0e c9 36 3a f2 42 79  |..Ty%......6:.By|
00002400  28 41 25 29 0d 00 f2 16  c9 38 3a e7 41 25 21 32  |(A%).....8:.A%!2|
00002410  34 3d 26 44 8c 4c 75 25  3d b9 0d 00 f3 13 e7 41  |4=&D.Lu%=......A|
00002420  25 21 32 34 3d 32 37 8c  4d 4a 25 3d b9 0d 00 f4  |%!24=27.MJ%=....|
00002430  19 c9 31 37 2c 31 38 3a  e7 41 25 21 31 36 3d 30  |..17,18:.A%!16=0|
00002440  8c 4d 4a 25 3d b9 0d 00  f5 20 cb 3a fd 4b 79 25  |.MJ%=.... .:.Ky%|
00002450  3e 30 84 4d 4a 25 84 4c  75 25 3a e7 4b 79 25 3d  |>0.MJ%.Lu%:.Ky%=|
00002460  32 84 4c 75 25 8c 0d 00  f6 12 e7 a4 69 28 4d 25  |2.Lu%.......i(M%|
00002470  2c 33 29 3c 3e 76 24 8c  0d 00 f7 21 f2 50 3a f2  |,3)<>v$....!.P:.|
00002480  53 28 4d 25 2c 33 2c 22  22 29 3a f2 74 28 4d 25  |S(M%,3,""):.t(M%|
00002490  2c 33 29 3a 65 75 25 3d  a3 0d 00 f8 05 cd 0d 00  |,3):eu%=........|
000024a0  f9 30 cd 3a fd 65 75 25  3a f2 47 28 4d 25 29 3a  |.0.:.eu%:.G(M%):|
000024b0  ff 28 22 50 6f 69 6e 74  65 72 22 29 3a e7 28 4b  |.("Pointer"):.(K|
000024c0  79 25 3d 31 84 4d 4a 25  29 8c 5f 25 3d a3 0d 00  |y%=1.MJ%)._%=...|
000024d0  fa 07 3d 5f 25 0d 00 fb  2b dd f2 6b 79 3a ea 4a  |..=_%...+..ky:.J|
000024e0  25 2c 4c 25 2c 5f 25 2c  52 25 2c 6a 75 25 2c 4d  |%,L%,_%,R%,ju%,M|
000024f0  25 3a ea 85 3a ee 85 ea  f2 68 5f 28 9f 29 3a e1  |%:..:....h_(.):.|
00002500  0d 00 fc 23 6a 75 25 3d  b9 3a e3 4a 25 3d 31 36  |...#ju%=.:.J%=16|
00002510  b8 32 33 3a e7 44 25 3f  4a 25 3c 3e 30 8c 6a 75  |.23:.D%?J%<>0.ju|
00002520  25 3d a3 0d 00 fd 0b ed  3a e7 6a 75 25 8c 0d 00  |%=......:.ju%...|
00002530  fe 0d f2 6d 3a f2 56 79  28 34 29 0d 00 ff 54 cc  |...m:.Vy(4)...T.|
00002540  3a 52 25 3d 31 36 3a 64  79 25 3d 44 25 3f 52 25  |:R%=16:dy%=D%?R%|
00002550  3a 52 25 2b 3d 31 3a 78  79 25 3d 44 25 3f 52 25  |:R%+=1:xy%=D%?R%|
00002560  3a 52 25 2b 3d 31 3a 51  79 25 3d 44 25 3f 52 25  |:R%+=1:Qy%=D%?R%|
00002570  3a 52 25 2b 3d 31 3a 4a  79 25 3d 44 25 3f 52 25  |:R%+=1:Jy%=D%?R%|
00002580  3a 52 25 2b 3d 31 3a 6d  25 3d 44 25 3f 52 25 0d  |:R%+=1:m%=D%?R%.|
00002590  01 00 8f cd 3a f2 51 79  28 77 25 29 3a 52 25 3d  |....:.Qy(w%):R%=|
000025a0  31 3a e3 4a 25 3d 31 b8  72 25 3a 5a 25 28 4a 25  |1:.J%=1.r%:Z%(J%|
000025b0  29 3d 44 25 3f 52 25 3a  52 25 2b 3d 31 3a ed 3a  |)=D%?R%:R%+=1:.:|
000025c0  52 25 3d 34 38 3a e3 4a  25 3d 31 b8 72 25 3a 24  |R%=48:.J%=1.r%:$|
000025d0  43 25 28 4a 25 29 3d 24  28 44 25 2b 52 25 29 3a  |C%(J%)=$(D%+R%):|
000025e0  52 25 2b 3d 31 36 3a ed  3a 5f 25 3d b9 3a e3 4a  |R%+=16:.:_%=.:.J|
000025f0  25 3d 31 b8 77 25 3a 4c  25 3d 5a 25 28 4a 25 29  |%=1.w%:L%=Z%(J%)|
00002600  3a 4d 25 3d 41 25 28 4c  25 29 3a f2 48 5f 28 4c  |:M%=A%(L%):.H_(L|
00002610  25 2c 4d 25 29 3a ed 3a  6c 25 3d a3 3a e1 0d 01  |%,M%):.:l%=.:...|
00002620  01 4f dd f2 48 5f 28 47  25 2c 4d 25 29 3a ea 70  |.O..H_(G%,M%):.p|
00002630  25 2c 53 24 2c 66 25 2c  56 25 2c 46 24 2c 41 24  |%,S$,f%,V%,F$,A$|
00002640  2c 4e 24 2c 51 25 2c 6f  25 2c 5f 79 25 2c 58 79  |,N$,Q%,o%,_y%,Xy|
00002650  25 2c 4e 25 2c 57 79 25  3a 58 25 3d a4 4d 28 a4  |%,N%,Wy%:X%=.M(.|
00002660  46 28 47 25 29 29 3a e7  58 25 3e 30 8c 0d 01 02  |F(G%)):.X%>0....|
00002670  2b e3 70 25 3d 31 b8 58  25 3a 53 24 3d a4 43 28  |+.p%=1.X%:S$=.C(|
00002680  47 25 2c 70 25 29 3a 57  79 25 3d a4 5a 28 53 24  |G%,p%):Wy%=.Z(S$|
00002690  29 3a e7 ac 57 79 25 8c  0d 01 03 30 46 24 3d a4  |):..Wy%....0F$=.|
000026a0  4a 28 53 24 29 3a 66 25  3d 30 3a 56 25 3d 30 3a  |J(S$):f%=0:V%=0:|
000026b0  58 79 25 3d a3 3a 61 24  3d 22 6e 6f 74 66 6f 75  |Xy%=.:a$="notfou|
000026c0  6e 64 22 3a 4e 25 3d 30  0d 01 04 46 cc 3a 46 24  |nd":N%=0...F.:F$|
000026d0  3d a4 4a 28 53 24 29 3a  66 25 3d a4 55 28 53 24  |=.J(S$):f%=.U(S$|
000026e0  29 3a 56 25 3d a4 50 28  53 24 29 3a 58 79 25 3d  |):V%=.P(S$):Xy%=|
000026f0  a3 3a 61 24 3d a4 49 28  66 25 2c 56 25 2c 46 24  |.:a$=.I(f%,V%,F$|
00002700  2c 30 29 3a 4e 25 3d 31  3a c8 8e 61 24 ca 0d 01  |,0):N%=1:..a$...|
00002710  05 3a c9 22 73 6d 61 6c  6c 5f 78 78 78 22 2c 22  |.:."small_xxx","|
00002720  66 69 6c 65 5f 78 78 78  22 2c 22 73 6d 61 6c 6c  |file_xxx","small|
00002730  5f 61 70 70 22 2c 22 61  70 70 6c 69 63 61 74 69  |_app","applicati|
00002740  6f 6e 22 3a 4e 25 3d 30  0d 01 06 05 cb 0d 01 07  |on":N%=0........|
00002750  29 cd 3a f2 42 28 47 25  2c 70 25 2c 4e 25 29 3a  |).:.B(G%,p%,N%):|
00002760  e7 58 79 25 8c 4e 25 3d  26 41 39 31 33 8b 4e 25  |.Xy%.N%=&A913.N%|
00002770  3d 26 41 31 31 33 0d 01  08 94 42 25 3d 28 6d 25  |=&A113....B%=(m%|
00002780  3c 3c 32 38 29 2b 28 4a  79 25 3c 3c 32 34 29 2b  |<<28)+(Jy%<<24)+|
00002790  4e 25 3a 6f 25 3d 53 25  28 47 25 2c 70 25 29 3a  |N%:o%=S%(G%,p%):|
000027a0  24 6f 25 3d 46 24 3a 5f  79 25 3d 46 25 28 47 25  |$o%=F$:_y%=F%(G%|
000027b0  2c 70 25 29 3a 24 5f 79  25 3d 22 53 22 2b 61 24  |,p%):$_y%="S"+a$|
000027c0  3a 51 25 3d 35 30 2b 28  70 25 2d 31 29 2a 34 34  |:Q%=50+(p%-1)*44|
000027d0  2b 75 25 3a 72 79 25 3d  a4 52 28 4d 25 2c 26 43  |+u%:ry%=.R(M%,&C|
000027e0  2c 51 25 2c 26 66 30 2d  32 34 2c 34 34 2d 75 25  |,Q%,&f0-24,44-u%|
000027f0  2c 42 25 2c 22 22 2c 6f  25 2c 5f 79 25 2c 35 36  |,B%,"",o%,_y%,56|
00002800  29 3a 6b 79 25 2b 3d 31  3a ed 0d 01 09 07 cd 3a  |):ky%+=1:......:|
00002810  e1 0d 01 0a 27 dd f2 68  5f 28 52 69 25 29 3a e7  |....'..h_(Ri%):.|
00002820  a7 f6 24 2c 22 44 69 73  63 20 6e 6f 74 20 66 6f  |..$,"Disc not fo|
00002830  75 6e 64 22 29 3e 30 8c  0d 01 0b 0b e7 79 24 3d  |und")>0......y$=|
00002840  22 22 8c 0d 01 0c 2e 7a  25 3d a4 53 28 22 44 69  |"".....z%=.S("Di|
00002850  73 63 20 6e 6f 74 20 66  6f 75 6e 64 22 2c 22 4b  |sc not found","K|
00002860  69 6c 6c 20 74 61 73 6b  22 2c 33 29 3a f2 4e 3a  |ill task",3):.N:|
00002870  e0 0d 01 0d 53 cc 3a 4d  24 3d 22 44 69 73 63 20  |....S.:M$="Disc |
00002880  6e 6f 74 20 66 6f 75 6e  64 2c 4c 6f 61 64 20 62  |not found,Load b|
00002890  61 72 20 27 22 2b 79 24  2b 22 27 3f 22 3a 7a 25  |ar '"+y$+"'?":z%|
000028a0  3d a4 53 28 4d 24 2c 22  4c 6f 61 64 20 62 61 72  |=.S(M$,"Load bar|
000028b0  2c 4b 69 6c 6c 20 74 61  73 6b 22 2c 32 29 3a c8  |,Kill task",2):.|
000028c0  8e 7a 25 ca 0d 01 0e 15  c9 30 2c 31 3a 44 24 3d  |.z%......0,1:D$=|
000028d0  79 24 3a f2 7a 28 44 24  29 0d 01 0f 0b c9 32 3a  |y$:.z(D$).....2:|
000028e0  f2 4e 3a e0 0d 01 10 05  cb 0d 01 11 05 cd 0d 01  |.N:.............|
000028f0  12 0b cc 3a f2 76 28 31  29 0d 01 13 07 cd 3a e1  |...:.v(1).....:.|
00002900  0d 01 14 5f dd a4 57 28  4d 25 29 3a ea 4a 25 2c  |..._..W(M%):.J%,|
00002910  4e 25 2c 51 25 2c 58 25  3a 4e 25 3d 30 3a 47 25  |N%,Q%,X%:N%=0:G%|
00002920  3d a4 4e 28 4d 25 29 3a  51 25 3d a4 46 28 47 25  |=.N(M%):Q%=.F(G%|
00002930  29 3a 58 25 3d a4 4d 28  51 25 29 3a e3 4a 25 3d  |):X%=.M(Q%):.J%=|
00002940  31 b8 58 25 3a e7 a4 42  28 4d 25 2c 4a 25 29 8c  |1.X%:..B(M%,J%).|
00002950  4e 25 2b 3d 31 3a 4d 25  28 4e 25 29 3d 4a 25 0d  |N%+=1:M%(N%)=J%.|
00002960  01 15 09 ed 3a 3d 4e 25  0d 01 16 2c dd f2 6a 3a  |....:=N%...,..j:|
00002970  ea 4a 25 2c 4c 25 3a e3  4a 25 3d 31 b8 77 25 3a  |.J%,L%:.J%=1.w%:|
00002980  4c 25 3d 5a 25 28 4a 25  29 3a f2 4a 28 4c 25 29  |L%=Z%(J%):.J(L%)|
00002990  3a ed 3a e1 0d 01 17 52  dd f2 4f 79 28 47 25 29  |:.:....R..Oy(G%)|
000029a0  3a ea 4a 25 2c 58 25 2c  4d 25 2c 51 25 2c 53 24  |:.J%,X%,M%,Q%,S$|
000029b0  2c 56 25 3a f2 6a 3a 51  25 3d a4 46 28 47 25 29  |,V%:.j:Q%=.F(G%)|
000029c0  3a 4d 25 3d 41 25 28 47  25 29 3a 58 25 3d a4 4d  |:M%=A%(G%):X%=.M|
000029d0  28 51 25 29 3a 73 25 3d  a4 57 28 4d 25 29 3a e7  |(Q%):s%=.W(M%):.|
000029e0  73 25 3c 58 25 8c 0d 01  18 22 e3 4a 25 3d 31 b8  |s%<X%....".J%=1.|
000029f0  58 25 3a e7 ac a4 42 28  4d 25 2c 4a 25 29 8c f2  |X%:...B(M%,J%)..|
00002a00  46 28 4d 25 2c 4a 25 29  0d 01 19 05 ed 0d 01 1a  |F(M%,J%)........|
00002a10  07 cd 3a e1 0d 01 1b 35  dd f2 50 79 28 47 25 29  |..:....5..Py(G%)|
00002a20  3a ea 4a 25 2c 4c 25 3a  e3 4a 25 3d 31 b8 77 25  |:.J%,L%:.J%=1.w%|
00002a30  3a 4c 25 3d 5a 25 28 4a  25 29 3a e7 4c 25 3c 3e  |:L%=Z%(J%):.L%<>|
00002a40  47 25 8c f2 4a 28 4c 25  29 0d 01 1c 07 ed 3a e1  |G%..J(L%).....:.|
00002a50  0d 01 1d 47 dd f2 4a 28  47 25 29 3a ea 4a 25 2c  |...G..J(G%):.J%,|
00002a60  58 25 2c 4d 25 2c 51 25  3a 51 25 3d a4 46 28 47  |X%,M%,Q%:Q%=.F(G|
00002a70  25 29 3a 4d 25 3d 41 25  28 47 25 29 3a 58 25 3d  |%):M%=A%(G%):X%=|
00002a80  a4 4d 28 51 25 29 3a 73  25 3d a4 57 28 4d 25 29  |.M(Q%):s%=.W(M%)|
00002a90  3a e7 73 25 3e 30 8c 0d  01 1e 21 e3 4a 25 3d 31  |:.s%>0....!.J%=1|
00002aa0  b8 58 25 3a e7 a4 42 28  4d 25 2c 4a 25 29 8c f2  |.X%:..B(M%,J%)..|
00002ab0  57 28 4d 25 2c 4a 25 29  0d 01 1f 05 ed 0d 01 20  |W(M%,J%)....... |
00002ac0  07 cd 3a e1 0d 01 21 69  dd a4 4a 28 4e 24 29 3a  |..:...!i..J(N$):|
00002ad0  ea 54 24 2c 41 24 2c 55  25 3a 41 24 3d 22 22 3a  |.T$,A$,U%:A$="":|
00002ae0  55 25 3d a9 4e 24 3a 54  24 3d c1 4e 24 2c 55 25  |U%=.N$:T$=.N$,U%|
00002af0  2c 31 29 3a c8 95 54 24  3c 3e 22 2e 22 80 54 24  |,1):..T$<>".".T$|
00002b00  3c 3e 22 3a 22 80 55 25  3c 3e 30 3a 41 24 3d 54  |<>":".U%<>0:A$=T|
00002b10  24 2b 41 24 3a 55 25 2d  3d 31 3a 54 24 3d c1 4e  |$+A$:U%-=1:T$=.N|
00002b20  24 2c 55 25 2c 31 29 3a  ce 3a 3d 41 24 0d 01 22  |$,U%,1):.:=A$.."|
00002b30  1b dd a4 7a 28 4e 24 29  3a e7 a7 4e 24 2c 22 2e  |...z(N$):..N$,".|
00002b40  22 29 3d 30 8c 3d 22 22  0d 01 23 1d 72 24 3d a4  |")=0.=""..#.r$=.|
00002b50  4a 28 4e 24 29 3a 3d c0  4e 24 2c a9 4e 24 2d a9  |J(N$):=.N$,.N$-.|
00002b60  72 24 2d 31 29 0d 01 24  2d dd f2 5f 5f 28 5a 24  |r$-1)..$-..__(Z$|
00002b70  29 3a ea 56 25 3a 56 25  3d a4 50 28 5a 24 29 3a  |):.V%:V%=.P(Z$):|
00002b80  e7 56 25 3c 34 30 39 36  8c 5a 24 3d a4 7a 28 5a  |.V%<4096.Z$=.z(Z|
00002b90  24 29 0d 01 25 1a ff 22  46 69 6c 65 72 5f 4f 70  |$)..%.."Filer_Op|
00002ba0  65 6e 44 69 72 20 22 2b  5a 24 3a e1 0d 01 26 39  |enDir "+Z$:...&9|
00002bb0  dd a4 51 28 50 5f 25 29  3a ea 4e 25 2c 41 24 3a  |..Q(P_%):.N%,A$:|
00002bc0  41 24 3d 22 22 3a f5 3a  4e 25 3d 3f 50 5f 25 3a  |A$="":.:N%=?P_%:|
00002bd0  e7 4e 25 3e 33 31 8c 41  24 2b 3d bd 4e 25 3a 50  |.N%>31.A$+=.N%:P|
00002be0  5f 25 2b 3d 31 0d 01 27  0e fd 4e 25 3c 33 32 3a  |_%+=1..'..N%<32:|
00002bf0  3d 41 24 0d 01 28 24 dd  a4 41 79 28 53 24 29 3a  |=A$..($..Ay(S$):|
00002c00  ea 65 25 3a c8 99 38 2c  35 2c 53 24 b8 2c 2c 2c  |.e%:..8,5,S$.,,,|
00002c10  2c 65 25 3a 3d 65 25 0d  01 29 20 dd a4 55 28 53  |,e%:=e%..) ..U(S|
00002c20  24 29 3a ea 56 25 2c 41  24 3a 56 25 3d 30 3a e7  |$):.V%,A$:V%=0:.|
00002c30  a4 5a 28 53 24 29 8c 0d  01 2a 1f c8 99 38 2c 35  |.Z(S$)...*...8,5|
00002c40  2c 53 24 b8 56 25 3a e7  56 25 3c 30 84 56 25 3e  |,S$.V%:.V%<0.V%>|
00002c50  33 8c 56 25 3d 30 0d 01  2b 09 cd 3a 3d 56 25 0d  |3.V%=0..+..:=V%.|
00002c60  01 2c 44 dd a4 5a 28 53  24 29 3a ea 56 25 2c 57  |.,D..Z(S$):.V%,W|
00002c70  79 25 3a 57 79 25 3d b9  3a c8 99 26 32 30 30 30  |y%:Wy%=.:..&2000|
00002c80  38 2c 35 2c 53 24 b8 56  25 3b 48 79 25 3a e7 28  |8,5,S$.V%;Hy%:.(|
00002c90  48 79 25 80 31 29 3d 31  84 56 25 3d 30 8c 57 79  |Hy%.1)=1.V%=0.Wy|
00002ca0  25 3d a3 0d 01 2d 08 3d  57 79 25 0d 01 2e 27 dd  |%=...-.=Wy%...'.|
00002cb0  a4 50 28 53 24 29 3a ea  56 25 2c 5a 79 25 2c 66  |.P(S$):.V%,Zy%,f|
00002cc0  25 2c 46 24 3a 56 25 3d  30 3a e7 a4 5a 28 53 24  |%,F$:V%=0:..Z(S$|
00002cd0  29 8c 0d 01 2f 1c 46 24  3d a4 4a 28 53 24 29 3a  |).../.F$=.J(S$):|
00002ce0  66 25 3d a4 55 28 53 24  29 3a c8 8e b9 ca 0d 01  |f%=.U(S$):......|
00002cf0  30 1c c9 66 25 3d 32 80  c0 46 24 2c 31 29 3d 22  |0..f%=2..F$,1)="|
00002d00  21 22 3a 56 25 3d 38 31  39 32 0d 01 31 1d c9 66  |!":V%=8192..1..f|
00002d10  25 3d 32 80 c0 46 24 2c  31 29 3c 3e 22 21 22 3a  |%=2..F$,1)<>"!":|
00002d20  56 25 3d 34 30 39 36 0d  01 32 28 7f 3a c8 99 38  |V%=4096..2(.:..8|
00002d30  2c 35 2c 53 24 b8 2c 2c  5a 79 25 3a 56 25 3d 28  |,5,S$.,,Zy%:V%=(|
00002d40  5a 79 25 80 26 46 46 46  30 30 29 81 32 35 36 0d  |Zy%.&FFF00).256.|
00002d50  01 33 05 cb 0d 01 34 09  cd 3a 3d 56 25 0d 01 35  |.3....4..:=V%..5|
00002d60  2f dd a4 44 79 28 41 24  29 3a ea 4a 25 2c 43 24  |/..Dy(A$):.J%,C$|
00002d70  2c 54 24 2c 55 25 2c 4e  25 3a 43 24 3d 41 24 3a  |,T$,U%,N%:C$=A$:|
00002d80  e7 c0 41 24 2c 31 29 3d  22 20 22 8c 0d 01 36 30  |..A$,1)=" "...60|
00002d90  55 25 3d 31 3a f5 55 25  2b 3d 31 3a fd c1 43 24  |U%=1:.U%+=1:..C$|
00002da0  2c 55 25 2c 31 29 3c 3e  22 20 22 3a 43 24 3d c2  |,U%,1)<>" ":C$=.|
00002db0  43 24 2c a9 43 24 2d 55  25 2b 31 29 0d 01 37 12  |C$,.C$-U%+1)..7.|
00002dc0  cd 3a e7 c2 41 24 2c 31  29 3d 22 20 22 8c 0d 01  |.:..A$,1)=" "...|
00002dd0  38 3d 55 25 3d a9 43 24  3a 4e 25 3d 31 3a f5 55  |8=U%=.C$:N%=1:.U|
00002de0  25 2d 3d 31 3a 4e 25 2b  3d 31 3a fd c1 43 24 2c  |%-=1:N%+=1:..C$,|
00002df0  55 25 2c 31 29 3c 3e 22  20 22 3a 43 24 3d c0 43  |U%,1)<>" ":C$=.C|
00002e00  24 2c a9 43 24 2d 4e 25  2b 31 29 0d 01 39 09 cd  |$,.C$-N%+1)..9..|
00002e10  3a 3d 43 24 0d 01 3a 31  dd a4 4e 28 4d 25 29 3a  |:=C$..:1..N(M%):|
00002e20  ea 4a 25 2c 6a 25 3a 6a  25 3d 30 3a e3 4a 25 3d  |.J%,j%:j%=0:.J%=|
00002e30  31 b8 72 25 3a e7 41 25  28 4a 25 29 3d 4d 25 8c  |1.r%:.A%(J%)=M%.|
00002e40  6a 25 3d 4a 25 0d 01 3b  09 ed 3a 3d 6a 25 0d 01  |j%=J%..;..:=j%..|
00002e50  3c 21 dd a4 56 79 28 4d  25 29 3a ea 4a 25 2c 4e  |<!..Vy(M%):.J%,N|
00002e60  25 3a 4e 25 3d a3 3a e7  4d 25 3d 46 79 25 8c 0d  |%:N%=.:.M%=Fy%..|
00002e70  01 3d 08 4e 25 3d b9 0d  01 3e 1e cc 3a e3 4a 25  |.=.N%=...>..:.J%|
00002e80  3d 31 b8 72 25 3a e7 41  25 28 4a 25 29 3d 4d 25  |=1.r%:.A%(J%)=M%|
00002e90  8c 4e 25 3d b9 0d 01 3f  05 ed 0d 01 40 09 cd 3a  |.N%=...?....@..:|
00002ea0  3d 4e 25 0d 01 41 51 dd  a4 4b 79 28 51 24 29 3a  |=N%..AQ..Ky(Q$):|
00002eb0  ea 4a 25 2c 54 24 2c 55  25 2c 41 24 3a 41 24 3d  |.J%,T$,U%,A$:A$=|
00002ec0  22 22 3a e3 4a 25 3d 31  b8 a9 51 24 3a 54 24 3d  |"":.J%=1..Q$:T$=|
00002ed0  c1 51 24 2c 4a 25 2c 31  29 3a 55 25 3d 97 54 24  |.Q$,J%,1):U%=.T$|
00002ee0  3a e7 55 25 3e 36 34 80  55 25 3c 39 31 8c 55 25  |:.U%>64.U%<91.U%|
00002ef0  2b 3d 33 32 0d 01 42 17  54 24 3d bd 55 25 3a 41  |+=32..B.T$=.U%:A|
00002f00  24 2b 3d 54 24 3a ed 3a  3d 41 24 0d 01 43 3e dd  |$+=T$:.:=A$..C>.|
00002f10  a4 66 28 58 79 24 29 3a  ea 65 25 3a c8 99 26 32  |.f(Xy$):.e%:..&2|
00002f20  30 30 32 33 2c 58 79 24  2c 41 25 2c 26 43 38 2c  |0023,Xy$,A%,&C8,|
00002f30  30 2c 33 b8 2c 2c 65 25  3a 3f 28 41 25 2b 65 25  |0,3.,,e%:?(A%+e%|
00002f40  29 3d 26 44 3a 3d 24 41  25 0d 01 44 35 dd a4 65  |)=&D:=$A%..D5..e|
00002f50  28 4d 25 2c 50 69 25 29  3a 21 43 25 3d 4d 25 3a  |(M%,Pi%):!C%=M%:|
00002f60  c8 99 26 34 30 30 43 42  2c 2c 43 25 3a 3d 50 69  |..&400CB,,C%:=Pi|
00002f70  25 2d 28 43 25 21 32 30  2d 43 25 21 34 29 0d 01  |%-(C%!20-C%!4)..|
00002f80  45 36 dd a4 54 28 4d 25  2c 57 69 25 29 3a 21 43  |E6..T(M%,Wi%):!C|
00002f90  25 3d 4d 25 3a c8 99 26  34 30 30 43 42 2c 2c 43  |%=M%:..&400CB,,C|
00002fa0  25 3a 3d 57 69 25 2d 28  43 25 21 32 34 2d 43 25  |%:=Wi%-(C%!24-C%|
00002fb0  21 31 36 29 0d 01 46 3f  dd a4 62 3a ea 66 6c 25  |!16)..F?..b:.fl%|
00002fc0  2c 76 6c 25 3a c8 99 35  33 2c 2d 31 2c 26 42 b8  |,vl%:..53,-1,&B.|
00002fd0  2c 2c 66 6c 25 3a c8 99  35 33 2c 2d 31 2c 34 b8  |,,fl%:..53,-1,4.|
00002fe0  2c 2c 76 6c 25 3a 3d 28  66 6c 25 2b 31 29 3c 3c  |,,vl%:=(fl%+1)<<|
00002ff0  76 6c 25 0d 01 47 3f dd  a4 4f 3a ea 51 6c 25 2c  |vl%..G?..O:.Ql%,|
00003000  62 6c 25 3a c8 99 35 33  2c 2d 31 2c 26 43 b8 2c  |bl%:..53,-1,&C.,|
00003010  2c 51 6c 25 3a c8 99 35  33 2c 2d 31 2c 35 b8 2c  |,Ql%:..53,-1,5.,|
00003020  2c 62 6c 25 3a 3d 28 51  6c 25 2b 31 29 3c 3c 62  |,bl%:=(Ql%+1)<<b|
00003030  6c 25 0d 01 48 16 dd f2  41 79 d4 31 2c 2d 26 41  |l%..H...Ay.1,-&A|
00003040  2c 26 43 38 2c 31 3a e1  0d 01 49 14 dd f2 50 d4  |,&C8,1:...I...P.|
00003050  31 2c 2d 26 41 2c 35 30  2c 34 3a e1 0d 01 4a 38  |1,-&A,50,4:...J8|
00003060  dd f2 77 79 28 41 25 29  3a ea 4d 25 2c 48 25 2c  |..wy(A%):.M%,H%,|
00003070  4a 6c 25 3a 4d 25 3d 41  25 21 30 3a 48 25 3d 41  |Jl%:M%=A%!0:H%=A|
00003080  25 21 34 3a 4a 6c 25 3d  41 25 21 32 34 3a c8 8e  |%!4:Jl%=A%!24:..|
00003090  4a 6c 25 ca 0d 01 4b 0f  c9 26 44 3a f2 42 5f 28  |Jl%...K..&D:.B_(|
000030a0  4d 25 29 0d 01 4c 0f c9  32 37 3a f2 70 79 28 4d  |M%)..L..27:.py(M|
000030b0  25 29 0d 01 4d 09 c9 36  3a f2 64 0d 01 4e 09 c9  |%)..M..6:.d..N..|
000030c0  32 3a f2 61 0d 01 4f 0a  c9 26 46 3a f2 77 0d 01  |2:.a..O..&F:.w..|
000030d0  50 09 c9 33 3a f2 78 0d  01 51 0a c9 32 36 3a f2  |P..3:.x..Q..26:.|
000030e0  6a 0d 01 52 14 c9 37 39  3a e7 47 25 3e 30 8c f2  |j..R..79:.G%>0..|
000030f0  5f 28 47 25 29 0d 01 53  14 c9 36 37 3a e7 47 25  |_(G%)..S..67:.G%|
00003100  3e 30 8c f2 43 28 47 25  29 0d 01 54 15 c9 38 33  |>0..C(G%)..T..83|
00003110  3a e7 47 25 3e 30 8c f2  4f 79 28 47 25 29 0d 01  |:.G%>0..Oy(G%)..|
00003120  55 14 c9 39 30 3a e7 47  25 3e 30 8c f2 4a 28 47  |U..90:.G%>0..J(G|
00003130  25 29 0d 01 56 0f c9 33  38 37 3a f2 4c 28 4a 24  |%)..V..387:.L(J$|
00003140  29 0d 01 57 0c c9 33 38  38 3a f2 67 79 0d 01 58  |)..W..388:.gy..X|
00003150  0c c9 33 39 36 3a f2 55  79 0d 01 59 0c c9 33 39  |..396:.Uy..Y..39|
00003160  37 3a f2 52 79 0d 01 5a  11 7f c8 99 26 34 30 30  |7:.Ry..Z....&400|
00003170  44 43 2c 4a 6c 25 0d 01  5b 07 cb 3a e1 0d 01 5c  |DC,Jl%..[..:...\|
00003180  1b dd f2 42 5f 28 4d 25  29 3a e7 a4 6b 28 4c 79  |...B_(M%):..k(Ly|
00003190  25 29 8c f2 6b 28 34 29  0d 01 5d 05 e1 0d 01 5e  |%)..k(4)..]....^|
000031a0  1c dd f2 70 79 28 4d 25  29 3a e7 a4 6b 28 4c 79  |...py(M%):..k(Ly|
000031b0  25 29 8c f2 4b 79 28 34  29 0d 01 5f 05 e1 0d 01  |%)..Ky(4).._....|
000031c0  60 12 dd f2 52 79 3a e7  46 75 25 3e 41 75 25 8c  |`...Ry:.Fu%>Au%.|
000031d0  0d 01 61 2e 4c 25 3d 5a  25 28 60 25 29 3a 4d 25  |..a.L%=Z%(`%):M%|
000031e0  3d 41 25 28 4c 25 29 3a  f2 47 28 4d 25 29 3a 60  |=A%(L%):.G(M%):`|
000031f0  25 2b 3d 31 3a f2 59 28  60 25 2c 77 25 29 0d 01  |%+=1:.Y(`%,w%)..|
00003200  62 07 cd 3a e1 0d 01 63  0f dd f2 55 79 3a e7 60  |b..:...c...Uy:.`|
00003210  25 3e 31 8c 0d 01 64 13  60 25 2d 3d 31 3a f2 59  |%>1...d.`%-=1:.Y|
00003220  28 77 25 2c 60 25 29 0d  01 65 07 cd 3a e1 0d 01  |(w%,`%)..e..:...|
00003230  66 39 dd f2 74 28 4d 25  2c 48 25 29 3a ea 41 24  |f9..t(M%,H%):.A$|
00003240  3a 41 24 3d a4 69 28 4d  25 2c 48 25 29 3a c8 99  |:A$=.i(M%,H%):..|
00003250  26 34 30 30 44 32 2c 4d  25 2c 48 25 2c 2c 2c 2d  |&400D2,M%,H%,,,-|
00003260  31 2c a9 41 24 3a e1 0d  01 67 56 dd f2 42 79 28  |1,.A$:...gV..By(|
00003270  41 25 29 3a ea 4a 25 2c  78 25 2c 76 25 2c 61 25  |A%):.J%,x%,v%,a%|
00003280  2c 4d 25 2c 48 25 3a 78  25 3d 41 25 21 30 3a 76  |,M%,H%:x%=A%!0:v|
00003290  25 3d 41 25 21 34 3a 61  25 3d 41 25 21 38 3a 4d  |%=A%!4:a%=A%!8:M|
000032a0  25 3d 41 25 21 26 43 3a  48 25 3d 41 25 21 31 36  |%=A%!&C:H%=A%!16|
000032b0  3a 6c 4a 25 3d a4 4f 3a  c8 8e 4d 25 ca 0d 01 68  |:lJ%=.O:..M%...h|
000032c0  29 c9 4b 5f 25 3a 4b 79  25 3d 48 25 3a e7 61 25  |).K_%:Ky%=H%:.a%|
000032d0  3d 31 36 84 61 25 3d 36  34 8c f2 48 28 4d 25 2c  |=16.a%=64..H(M%,|
000032e0  48 25 2c 61 25 29 0d 01  69 0f c9 67 5f 25 2c 71  |H%,a%)..i..g_%,q|
000032f0  5f 25 2c 2d 32 0d 01 6a  0f c9 4e 75 25 3a 4b 79  |_%,-2..j..Nu%:Ky|
00003300  25 3d 48 25 0d 01 6b 13  c9 4c 79 25 3a f2 44 5f  |%=H%..k..Ly%:.D_|
00003310  28 48 25 2c 61 25 29 0d  01 6c 19 c9 46 79 25 3a  |(H%,a%)..l..Fy%:|
00003320  f2 4e 5f 28 78 25 2c 76  25 2c 61 25 2c 4d 25 29  |.N_(x%,v%,a%,M%)|
00003330  0d 01 6d 1b 7f 3a 6b 25  3d 30 3a e7 4d 25 3e 30  |..m..:k%=0:.M%>0|
00003340  80 48 25 3e 30 8c 6b 25  3d 48 25 0d 01 6e 1c 73  |.H%>0.k%=H%..n.s|
00003350  25 3d a4 57 28 4d 25 29  3a e7 73 25 3d 31 8c 6b  |%=.W(M%):.s%=1.k|
00003360  25 3d 4d 25 28 31 29 0d  01 6f 13 e7 4d 25 3e 30  |%=M%(1)..o..M%>0|
00003370  8c 47 25 3d a4 4e 28 4d  25 29 0d 01 70 09 c8 8e  |.G%=.N(M%)..p...|
00003380  61 25 ca 0d 01 71 14 c9  32 3a e7 76 25 3e 3d 28  |a%...q..2:.v%>=(|
00003390  6c 4a 25 2d 34 29 8c 0d  01 72 06 f2 61 0d 01 73  |lJ%-4)...r..a..s|
000033a0  15 cc 3a f2 6c 28 78 25  2c 76 25 2c 4d 25 2c 47  |..:.l(x%,v%,M%,G|
000033b0  25 29 0d 01 74 05 cd 0d  01 75 0b 7f 3a c8 8e 48  |%)..t....u..:..H|
000033c0  25 ca 0d 01 76 0d c9 2d  31 3a c8 8e 61 25 ca 0d  |%...v..-1:..a%..|
000033d0  01 77 21 c9 31 2c 34 2c  36 34 2c 31 36 3a f2 75  |.w!.1,4,64,16:.u|
000033e0  28 47 25 2c 4d 25 2c 48  25 2c 61 25 2c 78 25 29  |(G%,M%,H%,a%,x%)|
000033f0  0d 01 78 05 cb 0d 01 79  0c c9 30 3a c8 8e 61 25  |..x....y..0:..a%|
00003400  ca 0d 01 7a 15 c9 31 3a  e7 a6 2d 31 8c f2 78 8b  |...z..1:..-1..x.|
00003410  f2 43 28 47 25 29 0d 01  7b 15 c9 34 3a e7 a6 2d  |.C(G%)..{..4:..-|
00003420  31 8c f2 77 8b f2 5f 28  47 25 29 0d 01 7c 10 c9  |1..w.._(G%)..|..|
00003430  32 35 36 3a e7 a6 2d 32  8c f2 61 0d 01 7d 18 c9  |256:..-2..a..}..|
00003440  26 34 30 30 3a e7 a6 2d  32 8c f2 64 8b f2 6f 28  |&400:..-2..d..o(|
00003450  4d 25 29 0d 01 7e 1d c9  36 34 2c 31 36 3a f2 75  |M%)..~..64,16:.u|
00003460  28 47 25 2c 4d 25 2c 48  25 2c 61 25 2c 78 25 29  |(G%,M%,H%,a%,x%)|
00003470  0d 01 7f 05 cb 0d 01 80  18 7f 3a f2 75 28 47 25  |..........:.u(G%|
00003480  2c 4d 25 2c 48 25 2c 61  25 2c 78 25 29 0d 01 81  |,M%,H%,a%,x%)...|
00003490  05 cb 0d 01 82 05 cb 0d  01 83 07 cb 3a e1 0d 01  |............:...|
000034a0  84 22 dd f2 75 28 47 25  2c 4d 25 2c 48 25 2c 61  |."..u(G%,M%,H%,a|
000034b0  25 2c 78 25 29 3a ea 4a  25 3a e7 48 25 3d 30 8c  |%,x%):.J%:.H%=0.|
000034c0  0d 01 85 09 c8 8e 61 25  ca 0d 01 86 17 c9 31 36  |......a%......16|
000034d0  2c 36 34 3a f2 48 28 4d  25 2c 48 25 2c 61 25 29  |,64:.H(M%,H%,a%)|
000034e0  0d 01 87 05 cb 0d 01 88  0d cd 3a e7 48 25 3d 2d  |..........:.H%=-|
000034f0  31 8c 0d 01 89 09 c8 8e  61 25 ca 0d 01 8a 3e c9  |1.......a%....>.|
00003500  31 2c 34 3a 41 25 21 30  3d 4d 25 3a c8 99 26 34  |1,4:A%!0=M%:..&4|
00003510  30 30 43 42 2c 2c 41 25  3a 66 4a 25 3d 41 25 21  |00CB,,A%:fJ%=A%!|
00003520  34 3a 52 4a 25 3d 41 25  21 26 43 3a e7 28 78 25  |4:RJ%=A%!&C:.(x%|
00003530  2d 66 4a 25 29 3c 32 34  8c 0d 01 8b 0a e7 61 25  |-fJ%)<24......a%|
00003540  3d 34 8c 0d 01 8c 06 f2  6a 0d 01 8d 0d cc 3a f2  |=4......j.....:.|
00003550  50 79 28 47 25 29 0d 01  8e 05 cd 0d 01 8f 1e cc  |Py(G%)..........|
00003560  3a e7 28 78 25 2d 52 4a  25 29 3c 32 34 80 61 25  |:.(x%-RJ%)<24.a%|
00003570  3d 34 8c f2 6f 28 4d 25  29 0d 01 90 05 cd 0d 01  |=4..o(M%).......|
00003580  91 17 c9 31 36 2c 36 34  3a f2 48 28 4d 25 2c 48  |...16,64:.H(M%,H|
00003590  25 2c 61 25 29 0d 01 92  05 cb 0d 01 93 0c cd 3a  |%,a%)..........:|
000035a0  e7 48 25 3e 30 8c 0d 01  94 11 f2 50 79 28 47 25  |.H%>0......Py(G%|
000035b0  29 3a c8 8e 61 25 ca 0d  01 95 1e c9 31 2c 34 3a  |):..a%......1,4:|
000035c0  53 24 3d a4 43 28 47 25  2c 48 25 29 3a e7 a4 5a  |S$=.C(G%,H%):..Z|
000035d0  28 53 24 29 8c 0d 01 96  27 56 25 3d a4 50 28 53  |(S$)....'V%=.P(S|
000035e0  24 29 3a e7 a4 56 28 47  25 2c 48 25 29 3d 30 8c  |$):..V(G%,H%)=0.|
000035f0  f2 56 28 53 24 2c 47 25  2c 48 25 29 0d 01 97 11  |.V(S$,G%,H%)....|
00003600  f2 4d 79 28 4d 25 2c 48  25 2c 61 25 29 0d 01 98  |.My(M%,H%,a%)...|
00003610  05 cd 0d 01 99 1b c9 31  36 2c 36 34 3a 73 25 3d  |.......16,64:s%=|
00003620  a4 57 28 4d 25 29 3a e7  73 25 3d 31 8c 0d 01 9a  |.W(M%):.s%=1....|
00003630  19 53 24 3d a4 43 28 47  25 2c 48 25 29 3a e7 a4  |.S$=.C(G%,H%):..|
00003640  5a 28 53 24 29 8c 0d 01  9b 1d f2 56 28 53 24 2c  |Z(S$)......V(S$,|
00003650  47 25 2c 48 25 29 3a f2  48 28 4d 25 2c 48 25 2c  |G%,H%):.H(M%,H%,|
00003660  61 25 29 0d 01 9c 05 cd  0d 01 9d 0c cc 3a e7 73  |a%)..........:.s|
00003670  25 3e 31 8c 0d 01 9e 26  e3 4a 25 3d 31 b8 73 25  |%>1....&.J%=1.s%|
00003680  3a 53 24 3d a4 43 28 47  25 2c 4d 25 28 4a 25 29  |:S$=.C(G%,M%(J%)|
00003690  29 3a e7 a4 5a 28 53 24  29 8c 0d 01 9f 15 e7 a4  |):..Z(S$).......|
000036a0  56 28 47 25 2c 4d 25 28  4a 25 29 29 3d 30 8c 0d  |V(G%,M%(J%))=0..|
000036b0  01 a0 22 f2 56 28 53 24  2c 47 25 2c 4d 25 28 4a  |..".V(S$,G%,M%(J|
000036c0  25 29 29 3a f2 46 28 4d  25 2c 4d 25 28 4a 25 29  |%)):.F(M%,M%(J%)|
000036d0  29 0d 01 a1 05 cd 0d 01  a2 14 cd 3a ed 3a f2 48  |)..........:.:.H|
000036e0  28 4d 25 2c 48 25 2c 61  25 29 0d 01 a3 05 cd 0d  |(M%,H%,a%)......|
000036f0  01 a4 05 cd 0d 01 a5 1e  c9 32 35 36 2c 26 34 30  |.........256,&40|
00003700  30 3a f2 61 5f 28 47 25  2c 4d 25 2c 48 25 2c 61  |0:.a_(G%,M%,H%,a|
00003710  25 29 0d 01 a6 05 cb 0d  01 a7 07 cd 3a e1 0d 01  |%)..........:...|
00003720  a8 1b dd f2 61 5f 28 47  25 2c 4d 25 2c 48 25 2c  |....a_(G%,M%,H%,|
00003730  61 25 29 3a c8 8e 61 25  ca 0d 01 a9 26 c9 26 34  |a%):..a%....&.&4|
00003740  30 30 3a e7 ac a4 42 28  4d 25 2c 48 25 29 8c f2  |00:...B(M%,H%)..|
00003750  4a 28 47 25 29 3a f2 46  28 4d 25 2c 48 25 29 0d  |J(G%):.F(M%,H%).|
00003760  01 aa 13 c9 32 35 36 3a  f2 4c 79 28 4d 25 2c 48  |....256:.Ly(M%,H|
00003770  25 29 0d 01 ab 07 cb 3a  e1 0d 01 ac 63 dd f2 4d  |%).....:....c..M|
00003780  79 28 4d 25 2c 48 25 2c  61 25 29 3a ea 53 24 2c  |y(M%,H%,a%):.S$,|
00003790  46 24 2c 66 25 2c 77 75  25 2c 41 79 24 3a f2 57  |F$,f%,wu%,Ay$:.W|
000037a0  28 4d 25 2c 48 25 29 3a  47 25 3d a4 4e 28 4d 25  |(M%,H%):G%=.N(M%|
000037b0  29 3a 77 75 25 3d a4 61  28 4d 25 29 3a 53 24 3d  |):wu%=.a(M%):S$=|
000037c0  a4 43 28 47 25 2c 48 25  29 3a 56 25 3d a4 50 28  |.C(G%,H%):V%=.P(|
000037d0  53 24 29 3a e7 a4 5a 28  53 24 29 8c 0d 01 ad 10  |S$):..Z(S$).....|
000037e0  e7 61 25 3d 31 84 61 25  3d 31 36 8c 0d 01 ae 1c  |.a%=1.a%=16.....|
000037f0  47 25 28 29 3d 30 3a 47  25 28 77 75 25 29 3d b9  |G%()=0:G%(wu%)=.|
00003800  3a 63 79 25 3d 77 75 25  0d 01 af 1e cd 3a c8 99  |:cy%=wu%.....:..|
00003810  26 34 30 30 44 45 2c 22  46 69 6c 65 72 5f 52 75  |&400DE,"Filer_Ru|
00003820  6e 20 22 2b 53 24 0d 01  b0 07 cd 3a e1 0d 01 b1  |n "+S$.....:....|
00003830  3e dd f2 4e 5f 28 78 25  2c 76 25 2c 61 25 2c 4d  |>..N_(x%,v%,a%,M|
00003840  25 29 3a ea 4f 25 2c 74  25 3a 4f 25 3d a4 65 28  |%):.O%,t%:O%=.e(|
00003850  46 79 25 2c 35 34 29 3a  74 25 3d a4 54 28 46 79  |Fy%,54):t%=.T(Fy|
00003860  25 2c 34 36 29 3a c8 8e  61 25 ca 0d 01 b2 0b c9  |%,46):..a%......|
00003870  31 3a c8 8e b9 ca 0d 01  b3 0b c9 a6 2d 31 3a f2  |1:..........-1:.|
00003880  78 0d 01 b4 0b c9 a6 2d  32 3a f2 61 0d 01 b5 0f  |x......-2:.a....|
00003890  7f f2 76 79 28 4f 25 2c  74 25 29 0d 01 b6 05 cb  |..vy(O%,t%).....|
000038a0  0d 01 b7 13 c9 32 3a f2  60 28 4f 25 2c 74 25 2c  |.....2:.`(O%,t%,|
000038b0  4d 25 29 0d 01 b8 0b c9  34 3a c8 8e b9 ca 0d 01  |M%).....4:......|
000038c0  b9 0b c9 a6 2d 31 3a f2  77 0d 01 ba 0b c9 a6 2d  |....-1:.w......-|
000038d0  32 3a f2 64 0d 01 bb 08  7f f2 62 79 0d 01 bc 05  |2:.d......by....|
000038e0  cb 0d 01 bd 07 cb 3a e1  0d 01 be ac dd f2 76 79  |......:.......vy|
000038f0  28 4f 25 2c 74 25 29 3a  ea 49 24 2c 4d 25 3a 4d  |(O%,t%):.I$,M%:M|
00003900  25 3d 61 6c 25 3a 49 24  3d a4 4b 28 22 25 7a 31  |%=al%:I$=.K("%z1|
00003910  32 3a 25 6d 69 20 25 61  6d 22 29 3a f2 53 28 4d  |2:%mi %am"):.S(M|
00003920  25 2c 32 2c 49 24 29 3a  49 24 3d a4 4b 28 22 25  |%,2,I$):I$=.K("%|
00003930  77 65 22 29 3a f2 53 28  4d 25 2c 33 2c 49 24 29  |we"):.S(M%,3,I$)|
00003940  3a 49 24 3d a4 4b 28 22  25 7a 64 79 20 25 6d 33  |:I$=.K("%zdy %m3|
00003950  20 25 63 65 25 79 72 22  29 3a f2 53 28 4d 25 2c  | %ce%yr"):.S(M%,|
00003960  34 2c 49 24 29 3a f2 6e  28 4d 25 2c 4f 25 2c 74  |4,I$):.n(M%,O%,t|
00003970  25 2b 26 43 29 3a f2 59  79 3a f5 c8 97 4f 25 2c  |%+&C):.Yy:...O%,|
00003980  74 25 2c 59 25 3a fd 59  25 3d 30 3a f2 47 28 4d  |t%,Y%:.Y%=0:.G(M|
00003990  25 29 3a e1 0d 01 bf 59  dd a4 4b 28 43 79 24 29  |%):....Y..K(Cy$)|
000039a0  3a ea 4d 5f 25 3a 43 79  24 2b 3d bd 30 3a 3f 55  |:.M_%:Cy$+=.0:?U|
000039b0  4a 25 3d 33 3a c8 99 37  2c 26 45 2c 55 4a 25 3a  |J%=3:..7,&E,UJ%:|
000039c0  c8 99 26 34 33 30 34 42  2c 2d 31 2c 55 4a 25 2c  |..&4304B,-1,UJ%,|
000039d0  47 75 25 2c 33 31 2c 43  79 24 b8 2c 4d 5f 25 3a  |Gu%,31,Cy$.,M_%:|
000039e0  3f 4d 5f 25 3d 26 44 3a  3d 24 47 75 25 0d 01 c0  |?M_%=&D:=$Gu%...|
000039f0  1d dd f2 62 79 3a 77 79  25 3d ac 77 79 25 3a e7  |...by:wy%=.wy%:.|
00003a00  77 79 25 8c f2 67 8b f2  66 5f 0d 01 c1 05 e1 0d  |wy%..g..f_......|
00003a10  01 c2 19 dd f2 67 3a f2  74 28 69 4a 25 2c 30 29  |.....g:.t(iJ%,0)|
00003a20  3a 77 79 25 3d b9 3a e1  0d 01 c3 16 dd f2 66 5f  |:wy%=.:.......f_|
00003a30  3a c8 99 26 34 30 30 44  32 2c 2d 31 3a e1 0d 01  |:..&400D2,-1:...|
00003a40  c4 26 dd a4 63 3a c8 99  36 2c 26 41 31 2c 32 38  |.&..c:..6,&A1,28|
00003a50  b8 2c 2c 4f 4a 25 3a e7  28 4f 4a 25 80 32 29 3d  |.,,OJ%:.(OJ%.2)=|
00003a60  30 8c 3d a3 0d 01 c5 06  3d b9 0d 01 c6 27 dd a4  |0.=.....=....'..|
00003a70  55 79 3a c8 99 36 2c 26  41 31 2c 32 38 b8 2c 2c  |Uy:..6,&A1,28.,,|
00003a80  4f 4a 25 3a e7 28 4f 4a  25 80 34 29 3d 30 8c 3d  |OJ%:.(OJ%.4)=0.=|
00003a90  b9 0d 01 c7 06 3d a3 0d  01 c8 d9 dd f2 48 28 4d  |.....=.......H(M|
00003aa0  25 2c 48 25 2c 61 25 29  3a ea 58 25 2c 51 25 3a  |%,H%,a%):.X%,Q%:|
00003ab0  71 25 3d 4d 25 3a 55 79  25 3d 48 25 3a 79 79 25  |q%=M%:Uy%=H%:yy%|
00003ac0  3d 61 25 3a 41 25 21 30  3d 4d 25 3a c8 99 26 34  |=a%:A%!0=M%:..&4|
00003ad0  30 30 43 42 2c 2c 41 25  3a 66 4a 25 3d 41 25 21  |00CB,,A%:fJ%=A%!|
00003ae0  34 3a 47 69 25 3d 41 25  21 38 3a 52 4a 25 3d 41  |4:Gi%=A%!8:RJ%=A|
00003af0  25 21 26 43 3a 5a 69 25  3d 41 25 21 31 36 3a 48  |%!&C:Zi%=A%!16:H|
00003b00  69 25 3d 41 25 21 32 34  3a 71 4a 25 3d 41 25 21  |i%=A%!24:qJ%=A%!|
00003b10  34 2d 41 25 21 32 30 3a  77 4a 25 3d 41 25 21 31  |4-A%!20:wJ%=A%!1|
00003b20  36 2d 41 25 21 32 34 3a  c8 99 26 34 30 30 43 46  |6-A%!24:..&400CF|
00003b30  2c 2c 41 25 3a 78 25 3d  41 25 21 30 3a 76 25 3d  |,,A%:x%=A%!0:v%=|
00003b40  41 25 21 34 3a 53 75 25  3d 41 25 21 38 3a 41 25  |A%!4:Su%=A%!8:A%|
00003b50  21 30 3d 4d 25 3a 41 25  21 34 3d 48 25 3a c8 99  |!0=M%:A%!4=H%:..|
00003b60  26 34 30 30 43 45 2c 2c  41 25 3a c8 8e 71 25 ca  |&400CE,,A%:..q%.|
00003b70  0d 01 c9 5b c9 4b 5f 25  3a 41 25 21 30 3d 4d 25  |...[.K_%:A%!0=M%|
00003b80  3a 41 25 21 34 3d 31 3a  64 6c 25 3d a4 62 3a 6c  |:A%!4=1:dl%=.b:l|
00003b90  4a 25 3d a4 4f 3a 41 25  21 32 34 3d 30 3a 41 25  |J%=.O:A%!24=0:A%|
00003ba0  21 32 38 3d 30 3a 41 25  21 33 32 3d 64 6c 25 3a  |!28=0:A%!32=dl%:|
00003bb0  41 25 21 33 36 3d 6c 4a  25 3a 6c 5f 25 3d b9 3a  |A%!36=lJ%:l_%=.:|
00003bc0  43 5f 25 3d a3 3a 6d 79  25 3d 31 0d 01 ca 17 7f  |C_%=.:my%=1.....|
00003bd0  3a 47 25 3d a4 4e 28 71  25 29 3a e7 47 25 3c 31  |:G%=.N(q%):.G%<1|
00003be0  8c e1 0d 01 cb 44 51 25  3d a4 46 28 47 25 29 3a  |.....DQ%=.F(G%):|
00003bf0  58 25 3d a4 4d 28 51 25  29 3a 43 5f 25 3d a4 63  |X%=.M(Q%):C_%=.c|
00003c00  3a 41 5f 25 3d a3 3a 74  75 25 3d a3 3a 6d 79 25  |:A_%=.:tu%=.:my%|
00003c10  3d 31 3a e7 48 25 3d 2d  31 80 28 78 25 2d 66 4a  |=1:.H%=-1.(x%-fJ|
00003c20  25 29 3c 32 34 8c 0d 01  cc ab 74 75 25 3d b9 3a  |%)<24.....tu%=.:|
00003c30  43 5f 25 3d a3 3a 41 25  21 30 3d 71 25 3a c8 99  |C_%=.:A%!0=q%:..|
00003c40  26 34 30 30 43 42 2c 2c  41 25 3a 63 4a 25 3d 41  |&400CB,,A%:cJ%=A|
00003c50  25 21 34 3a 76 79 25 3d  41 25 21 38 3a 55 75 25  |%!4:vy%=A%!8:Uu%|
00003c60  3d 41 25 21 26 43 3a 4e  5f 25 3d 41 25 21 31 36  |=A%!&C:N_%=A%!16|
00003c70  3a 41 25 21 30 3d 71 25  3a 41 25 21 34 3d 36 3a  |:A%!0=q%:A%!4=6:|
00003c80  41 25 21 38 3d 78 25 3a  41 25 21 26 43 3d 76 25  |A%!8=x%:A%!&C=v%|
00003c90  3a 41 25 21 31 36 3d 78  25 2b 34 3a 41 25 21 32  |:A%!16=x%+4:A%!2|
00003ca0  30 3d 76 25 2b 34 3a 41  25 21 32 34 3d 63 4a 25  |0=v%+4:A%!24=cJ%|
00003cb0  3a 41 25 21 32 38 3d 76  79 25 2b 35 30 3a 41 25  |:A%!28=vy%+50:A%|
00003cc0  21 33 32 3d 55 75 25 3a  41 25 21 33 36 3d 4e 5f  |!32=Uu%:A%!36=N_|
00003cd0  25 0d 01 cd 1d cd 3a e7  48 25 3d 2d 31 80 28 52  |%.....:.H%=-1.(R|
00003ce0  4a 25 2d 78 25 29 3c 32  34 8c 48 25 3d 30 0d 01  |J%-x%)<24.H%=0..|
00003cf0  ce 0a e7 48 25 3d 30 8c  0d 01 cf 09 e7 a6 2d 33  |...H%=0.......-3|
00003d00  8c 0d 01 d0 10 41 5f 25  3d b9 3a e7 ac 43 5f 25  |.....A_%=.:..C_%|
00003d10  8c 0d 01 d1 52 49 4a 25  3d 78 25 2d 32 34 3a 6e  |....RIJ%=x%-24:n|
00003d20  4a 25 3d 78 25 2b 32 34  3a 54 4a 25 3d 76 25 2d  |J%=x%+24:TJ%=v%-|
00003d30  31 36 3a 61 79 25 3d 76  25 2b 31 36 3a 41 25 21  |16:ay%=v%+16:A%!|
00003d40  38 3d 49 4a 25 3a 41 25  21 26 43 3d 54 4a 25 3a  |8=IJ%:A%!&C=TJ%:|
00003d50  41 25 21 31 36 3d 6e 4a  25 3a 41 25 21 32 30 3d  |A%!16=nJ%:A%!20=|
00003d60  61 79 25 0d 01 d2 30 cc  3a 41 25 21 38 3d 78 25  |ay%...0.:A%!8=x%|
00003d70  3a 41 25 21 26 43 3d 76  25 3a 41 25 21 31 36 3d  |:A%!&C=v%:A%!16=|
00003d80  78 25 3a 41 25 21 32 30  3d 76 25 3a 6d 79 25 3d  |x%:A%!20=v%:my%=|
00003d90  74 79 25 0d 01 d3 44 cd  3a 41 25 21 30 3d 71 25  |ty%...D.:A%!0=q%|
00003da0  3a 41 25 21 34 3d 35 3a  41 25 21 32 34 3d 30 3a  |:A%!4=5:A%!24=0:|
00003db0  41 25 21 32 38 3d 30 3a  41 25 21 33 32 3d 26 37  |A%!28=0:A%!32=&7|
00003dc0  46 46 46 46 46 46 46 3a  41 25 21 33 36 3d 26 37  |FFFFFFF:A%!36=&7|
00003dd0  46 46 46 46 46 46 46 0d  01 d4 f0 cc 3a 64 5f 25  |FFFFFFF.....:d_%|
00003de0  3d b9 3a 43 5f 25 3d a3  3a 41 25 21 30 3d 41 25  |=.:C_%=.:A%!0=A%|
00003df0  28 47 25 29 3a c8 99 26  34 30 30 43 42 2c 2c 41  |(G%):..&400CB,,A|
00003e00  25 3a 43 69 25 3d 41 25  21 34 3a 6e 5f 25 3d 41  |%:Ci%=A%!4:n_%=A|
00003e10  25 21 38 3a 44 69 25 3d  41 25 21 26 43 3a 6e 79  |%!8:Di%=A%!&C:ny|
00003e20  25 3d 41 25 21 31 36 3a  71 4a 25 3d 41 25 21 34  |%=A%!16:qJ%=A%!4|
00003e30  2d 41 25 21 32 30 3a 77  4a 25 3d 41 25 21 31 36  |-A%!20:wJ%=A%!16|
00003e40  2d 41 25 21 32 34 3a c8  99 26 34 30 30 43 46 2c  |-A%!24:..&400CF,|
00003e50  2c 41 25 3a 78 25 3d 41  25 21 30 3a 76 25 3d 41  |,A%:x%=A%!0:v%=A|
00003e60  25 21 34 3a 41 25 21 30  3d 41 25 28 47 25 29 3a  |%!4:A%!0=A%(G%):|
00003e70  41 25 21 34 3d 30 3a c8  99 26 34 30 30 43 45 2c  |A%!4=0:..&400CE,|
00003e80  2c 41 25 3a 4b 6c 25 3d  41 25 21 32 30 2d 41 25  |,A%:Kl%=A%!20-A%|
00003e90  21 26 43 3a 41 25 21 38  3d 41 25 21 38 2b 71 4a  |!&C:A%!8=A%!8+qJ|
00003ea0  25 2b 32 3a 41 25 21 26  43 3d 41 25 21 26 43 2b  |%+2:A%!&C=A%!&C+|
00003eb0  77 4a 25 2b 32 3a 41 25  21 31 36 3d 41 25 21 31  |wJ%+2:A%!16=A%!1|
00003ec0  36 2b 71 4a 25 2d 32 0d  01 d5 79 41 25 21 32 30  |6+qJ%-2...yA%!20|
00003ed0  3d 41 25 21 32 30 2b 77  4a 25 2d 32 3a 4f 6c 25  |=A%!20+wJ%-2:Ol%|
00003ee0  3d 4b 6c 25 2d 28 76 25  2d 6e 5f 25 29 3a 78 75  |=Kl%-(v%-n_%):xu|
00003ef0  25 3d 76 25 2d 6e 5f 25  3a 41 25 21 34 3d 37 3a  |%=v%-n_%:A%!4=7:|
00003f00  41 25 21 32 34 3d 78 25  3a 41 25 21 33 32 3d 78  |A%!24=x%:A%!32=x|
00003f10  25 3a 41 25 21 32 38 3d  6e 79 25 2d 28 58 25 2a  |%:A%!28=ny%-(X%*|
00003f20  34 34 29 2d 28 35 30 2d  78 75 25 29 3a 41 25 21  |44)-(50-xu%):A%!|
00003f30  33 36 3d 6e 79 25 2d 4f  6c 25 2b 75 25 2b 75 25  |36=ny%-Ol%+u%+u%|
00003f40  0d 01 d6 05 cd 0d 01 d7  0c cd 3a e7 48 25 3e 30  |..........:.H%>0|
00003f50  8c 0d 01 d8 24 f2 46 28  4d 25 2c 48 25 29 3a 73  |....$.F(M%,H%):s|
00003f60  25 3d a4 57 28 71 25 29  3a 6d 79 25 3d 31 3a e7  |%=.W(q%):my%=1:.|
00003f70  ac 43 5f 25 8c 0d 01 d9  ae 49 4a 25 3d a4 65 28  |.C_%.....IJ%=.e(|
00003f80  71 25 2c 41 25 21 38 29  3a 6e 4a 25 3d a4 65 28  |q%,A%!8):nJ%=.e(|
00003f90  71 25 2c 41 25 21 31 36  29 3a 41 25 21 30 3d 71  |q%,A%!16):A%!0=q|
00003fa0  25 3a 41 25 21 34 3d 4d  25 28 31 29 3a c8 99 26  |%:A%!4=M%(1):..&|
00003fb0  34 30 30 43 45 2c 2c 41  25 3a 54 4a 25 3d a4 54  |400CE,,A%:TJ%=.T|
00003fc0  28 71 25 2c 41 25 21 26  43 29 3a 41 25 21 30 3d  |(q%,A%!&C):A%!0=|
00003fd0  71 25 3a 41 25 21 34 3d  4d 25 28 73 25 29 3a c8  |q%:A%!4=M%(s%):.|
00003fe0  99 26 34 30 30 43 45 2c  2c 41 25 3a 61 79 25 3d  |.&400CE,,A%:ay%=|
00003ff0  a4 54 28 71 25 2c 41 25  21 32 30 29 3a 41 25 21  |.T(q%,A%!20):A%!|
00004000  38 3d 49 4a 25 3a 41 25  21 26 43 3d 54 4a 25 3a  |8=IJ%:A%!&C=TJ%:|
00004010  41 25 21 31 36 3d 6e 4a  25 3a 41 25 21 32 30 3d  |A%!16=nJ%:A%!20=|
00004020  61 79 25 0d 01 da 28 cc  3a 41 25 21 38 3d 78 25  |ay%...(.:A%!8=x%|
00004030  3a 41 25 21 26 43 3d 76  25 3a 41 25 21 31 36 3d  |:A%!&C=v%:A%!16=|
00004040  78 25 3a 41 25 21 32 30  3d 76 25 0d 01 db 44 cd  |x%:A%!20=v%...D.|
00004050  3a 41 25 21 30 3d 71 25  3a 41 25 21 34 3d 35 3a  |:A%!0=q%:A%!4=5:|
00004060  41 25 21 32 34 3d 30 3a  41 25 21 32 38 3d 30 3a  |A%!24=0:A%!28=0:|
00004070  41 25 21 33 32 3d 26 37  46 46 46 46 46 46 46 3a  |A%!32=&7FFFFFFF:|
00004080  41 25 21 33 36 3d 26 37  46 46 46 46 46 46 46 0d  |A%!36=&7FFFFFFF.|
00004090  01 dc 05 cd 0d 01 dd 11  cb 3a 58 79 25 3d a3 3a  |.........:Xy%=.:|
000040a0  e7 43 5f 25 8c 0d 01 de  28 57 24 3d a4 4d 79 28  |.C_%....(W$=.My(|
000040b0  47 25 2c 6b 25 29 3a 48  79 25 3d 36 39 3a e7 66  |G%,k%):Hy%=69:.f|
000040c0  79 25 3d 30 8c 48 79 25  2b 3d 32 35 36 0d 01 df  |y%=0.Hy%+=256...|
000040d0  1c c8 99 26 34 32 34 30  30 2c 48 79 25 2c 6d 79  |...&42400,Hy%,my|
000040e0  25 2c 57 24 2c 41 25 2b  38 0d 01 e0 12 cc 3a c8  |%,W$,A%+8.....:.|
000040f0  99 26 34 30 30 44 30 2c  2c 41 25 0d 01 e1 07 cd  |.&400D0,,A%.....|
00004100  3a e1 0d 01 e2 24 dd a4  4d 79 28 47 25 2c 6b 25  |:....$..My(G%,k%|
00004110  29 3a ea 53 24 2c 46 24  2c 66 25 2c 56 25 2c 57  |):.S$,F$,f%,V%,W|
00004120  24 3a e7 6b 25 8c 0d 01  e3 2e 53 24 3d a4 43 28  |$:.k%.....S$=.C(|
00004130  47 25 2c 6b 25 29 3a 46  24 3d a4 4a 28 53 24 29  |G%,k%):F$=.J(S$)|
00004140  3a 66 25 3d a4 55 28 53  24 29 3a 56 25 3d a4 50  |:f%=.U(S$):V%=.P|
00004150  28 53 24 29 0d 01 e4 10  cd 3a e7 73 25 3e 31 8c  |(S$).....:.s%>1.|
00004160  66 25 3d 34 0d 01 e5 0d  e7 41 5f 25 8c 66 25 3d  |f%=4.....A_%.f%=|
00004170  35 0d 01 e6 09 c8 8e 66  25 ca 0d 01 e7 1c c9 30  |5......f%......0|
00004180  3a 57 24 3d 22 6e 6f 74  66 6f 75 6e 64 22 3a 6d  |:W$="notfound":m|
00004190  79 25 3d 74 79 25 0d 01  e8 1a c9 34 3a 57 24 3d  |y%=ty%.....4:W$=|
000041a0  22 62 75 6e 64 6c 65 22  3a 6d 79 25 3d 74 79 25  |"bundle":my%=ty%|
000041b0  0d 01 e9 18 c9 35 3a 57  24 3d 22 6d 6f 76 65 22  |.....5:W$="move"|
000041c0  3a 6d 79 25 3d 74 79 25  0d 01 ea 16 7f 57 24 3d  |:my%=ty%.....W$=|
000041d0  a4 49 28 66 25 2c 56 25  2c 46 24 2c 31 29 0d 01  |.I(f%,V%,F$,1)..|
000041e0  eb 09 cb 3a 3d 57 24 0d  01 ec a3 dd f2 75 79 3a  |...:=W$......uy:|
000041f0  c8 99 26 34 30 30 43 46  2c 2c 41 25 3a 4e 69 25  |..&400CF,,A%:Ni%|
00004200  3d 41 25 21 30 3a 67 6c  25 3d 41 25 21 34 3a 61  |=A%!0:gl%=A%!4:a|
00004210  25 3d 41 25 21 38 3a 4d  25 3d 41 25 21 26 43 3a  |%=A%!8:M%=A%!&C:|
00004220  48 25 3d 41 25 21 31 36  3a 41 25 21 30 3d 41 25  |H%=A%!16:A%!0=A%|
00004230  28 47 25 29 3a c8 99 26  34 30 30 43 43 2c 2c 41  |(G%):..&400CC,,A|
00004240  25 3a 41 25 21 38 3d 67  6c 25 2d 78 75 25 2d 75  |%:A%!8=gl%-xu%-u|
00004250  25 3a 41 25 21 26 43 3d  41 25 21 34 2b 28 41 25  |%:A%!&C=A%!4+(A%|
00004260  21 35 32 2d 41 25 21 34  34 29 3a 41 25 21 32 34  |!52-A%!44):A%!24|
00004270  3d 41 25 21 31 36 2d 41  25 21 38 3a e7 61 25 3d  |=A%!16-A%!8:.a%=|
00004280  34 8c 41 25 21 32 38 3d  2d 31 0d 01 ed 12 c8 99  |4.A%!28=-1......|
00004290  26 34 30 30 43 35 2c 2c  41 25 3a e1 0d 01 ee 4a  |&400C5,,A%:....J|
000042a0  dd f2 6e 5f 28 41 25 2c  71 25 2c 55 79 25 2c 53  |..n_(A%,q%,Uy%,S|
000042b0  75 25 29 3a 65 6c 25 3d  a4 63 3a 53 69 25 3d 41  |u%):el%=.c:Si%=A|
000042c0  25 21 30 3a 63 5f 25 3d  41 25 21 34 3a 58 69 25  |%!0:c_%=A%!4:Xi%|
000042d0  3d 41 25 21 38 3a 41 4a  25 3d 41 25 21 26 43 3a  |=A%!8:AJ%=A%!&C:|
000042e0  c8 8e 55 79 25 ca 0d 01  ef 19 c9 30 3a 64 5f 25  |..Uy%......0:d_%|
000042f0  3d a3 3a e7 41 5f 25 8c  f2 43 79 28 71 25 29 0d  |=.:.A_%..Cy(q%).|
00004300  01 f0 0d c9 2d 31 3a e7  74 75 25 8c 0d 01 f1 14  |....-1:.tu%.....|
00004310  f2 69 5f 28 63 5f 25 2c  41 4a 25 2c 53 75 25 29  |.i_(c_%,AJ%,Su%)|
00004320  0d 01 f2 18 cc 3a 64 5f  25 3d a3 3a e7 41 5f 25  |.....:d_%=.:.A_%|
00004330  8c f2 43 79 28 71 25 29  0d 01 f3 05 cd 0d 01 f4  |..Cy(q%)........|
00004340  14 7f f2 6c 79 28 71 25  2c 55 79 25 2c 79 79 25  |...ly(q%,Uy%,yy%|
00004350  29 0d 01 f5 07 cb 3a e1  0d 01 f6 56 dd f2 69 5f  |).....:....V..i_|
00004360  28 63 5f 25 2c 41 4a 25  2c 53 75 25 29 3a ea 4a  |(c_%,AJ%,Su%):.J|
00004370  25 2c 4d 25 2c 48 25 2c  58 25 2c 51 25 3a 51 25  |%,M%,H%,X%,Q%:Q%|
00004380  3d a4 46 28 47 25 29 3a  4d 25 3d 41 25 28 47 25  |=.F(G%):M%=A%(G%|
00004390  29 3a 58 25 3d a4 4d 28  51 25 29 3a e7 63 5f 25  |):X%=.M(Q%):.c_%|
000043a0  3e 41 4a 25 8c c8 94 63  5f 25 2c 41 4a 25 0d 01  |>AJ%...c_%,AJ%..|
000043b0  f7 6d 48 25 3d 31 3a f5  3a 41 25 21 30 3d 4d 25  |.mH%=1:.:A%!0=M%|
000043c0  3a 41 25 21 34 3d 48 25  3a c8 99 26 34 30 30 43  |:A%!4=H%:..&400C|
000043d0  45 2c 2c 41 25 3a 61 79  25 3d 41 25 21 32 30 3a  |E,,A%:ay%=A%!20:|
000043e0  61 79 25 3d a4 54 28 4d  25 2c 61 79 25 29 3a 48  |ay%=.T(M%,ay%):H|
000043f0  25 2b 3d 31 3a fd 61 79  25 3e 63 5f 25 3a 79 4a  |%+=1:.ay%>c_%:yJ|
00004400  25 3d 48 25 2d 31 3a 48  25 2d 3d 31 3a e7 79 4a  |%=H%-1:H%-=1:.yJ|
00004410  25 3e 58 25 8c 79 4a 25  3d 58 25 0d 01 f8 62 f5  |%>X%.yJ%=X%...b.|
00004420  3a 41 25 21 30 3d 4d 25  3a 41 25 21 34 3d 48 25  |:A%!0=M%:A%!4=H%|
00004430  3a c8 99 26 34 30 30 43  45 2c 2c 41 25 3a 61 79  |:..&400CE,,A%:ay|
00004440  25 3d 41 25 21 32 30 3a  61 79 25 3d a4 54 28 4d  |%=A%!20:ay%=.T(M|
00004450  25 2c 61 79 25 29 3a 48  25 2b 3d 31 3a fd 61 79  |%,ay%):H%+=1:.ay|
00004460  25 3e 41 4a 25 3a 70 4a  25 3d 48 25 2d 31 3a e7  |%>AJ%:pJ%=H%-1:.|
00004470  70 4a 25 3e 58 25 8c 70  4a 25 3d 58 25 0d 01 f9  |pJ%>X%.pJ%=X%...|
00004480  0a e7 58 25 3e 30 8c 0d  01 fa 16 e3 4a 25 3d 79  |..X%>0......J%=y|
00004490  4a 25 b8 70 4a 25 3a c8  8e 53 75 25 ca 0d 01 fb  |J%.pJ%:..Su%....|
000044a0  10 c9 34 3a f2 46 28 4d  25 2c 4a 25 29 0d 01 fc  |..4:.F(M%,J%)...|
000044b0  11 c9 31 3a f2 4c 79 28  4d 25 2c 4a 25 29 0d 01  |..1:.Ly(M%,J%)..|
000044c0  fd 07 cb 3a ed 0d 01 fe  07 cd 3a e1 0d 01 ff b5  |...:......:.....|
000044d0  dd f2 6c 28 78 25 2c 76  25 2c 4d 25 2c 47 25 29  |..l(x%,v%,M%,G%)|
000044e0  3a ea 42 25 2c 59 25 2c  69 25 2c 4d 24 2c 63 24  |:.B%,Y%,i%,M$,c$|
000044f0  2c 73 24 2c 52 24 2c 53  24 2c 46 24 2c 5f 6c 25  |,s$,R$,S$,F$,_l%|
00004500  2c 63 75 25 2c 72 75 25  2c 4f 79 25 2c 51 25 3a  |,cu%,ru%,Oy%,Q%:|
00004510  69 5f 25 3d 78 25 3a 6b  5f 25 3d 76 25 3a 44 79  |i_%=x%:k_%=v%:Dy|
00004520  25 3d 4d 25 3a 59 25 3d  26 37 30 30 30 31 32 31  |%=M%:Y%=&7000121|
00004530  3a 69 25 3d 26 37 34 30  30 31 32 31 3a 57 25 3d  |:i%=&7400121:W%=|
00004540  44 5f 25 3a 5a 25 3d 57  25 2b 32 38 3a 57 25 21  |D_%:Z%=W%+28:W%!|
00004550  26 43 3d 26 37 30 32 30  37 3a 57 25 21 32 30 3d  |&C=&70207:W%!20=|
00004560  34 34 3a 57 25 21 32 34  3d 30 3a 24 57 25 3d 47  |44:W%!24=0:$W%=G|
00004570  24 3a e7 6c 25 8c 24 57  25 3d 47 24 2b 22 20 2a  |$:.l%.$W%=G$+" *|
00004580  22 0d 02 00 f8 24 62 5f  25 3d 22 42 61 72 20 20  |"....$b_%="Bar  |
00004590  27 22 2b 4a 24 2b 22 27  22 3a 5a 25 21 30 3d 30  |'"+J$+"'":Z%!0=0|
000045a0  3a 5a 25 21 34 3d 4c 5f  25 3a 5a 25 21 38 3d 59  |:Z%!4=L_%:Z%!8=Y|
000045b0  25 3a 5a 25 21 26 43 3d  62 5f 25 3a 5a 25 21 31  |%:Z%!&C=b_%:Z%!1|
000045c0  36 3d 2d 31 3a 5a 25 21  32 30 3d 32 34 3a 5a 25  |6=-1:Z%!20=24:Z%|
000045d0  2b 3d 32 34 3a 4d 24 3d  24 43 25 28 47 25 29 3a  |+=24:M$=$C%(G%):|
000045e0  24 79 5f 25 3d 22 4d 65  6e 75 20 27 22 2b 4d 24  |$y_%="Menu '"+M$|
000045f0  2b 22 27 22 3a 5a 25 21  30 3d 30 3a 5a 25 21 34  |+"'":Z%!0=0:Z%!4|
00004600  3d 48 5f 25 3a 5a 25 21  38 3d 59 25 3a 5a 25 21  |=H_%:Z%!8=Y%:Z%!|
00004610  26 43 3d 79 5f 25 3a 5a  25 21 31 36 3d 2d 31 3a  |&C=y_%:Z%!16=-1:|
00004620  5a 25 21 32 30 3d 32 34  3a 5a 25 2b 3d 32 34 3a  |Z%!20=24:Z%+=24:|
00004630  66 25 3d 31 3a 42 25 3d  69 25 3a 63 24 3d 22 46  |f%=1:B%=i%:c$="F|
00004640  69 6c 65 20 27 27 22 3a  52 24 3d 22 22 3a 53 24  |ile ''":R$="":S$|
00004650  3d a4 43 28 47 25 2c 6b  25 29 3a 46 24 3d a4 4a  |=.C(G%,k%):F$=.J|
00004660  28 53 24 29 3a 73 25 3d  a4 57 28 44 79 25 29 3a  |(S$):s%=.W(Dy%):|
00004670  e7 73 25 3d 31 84 6b 25  8c 0d 02 01 1a e7 a4 5a  |.s%=1.k%.......Z|
00004680  28 53 24 29 8c 66 25 3d  a4 55 28 53 24 29 8b 66  |(S$).f%=.U(S$).f|
00004690  25 3d 30 0d 02 02 3a 73  24 3d 22 46 69 6c 65 20  |%=0...:s$="File |
000046a0  22 3a 52 24 3d 22 46 69  6c 65 22 3a 42 25 3d 59  |":R$="File":B%=Y|
000046b0  25 3a e7 66 25 3d 30 8c  73 24 3d 22 4f 62 6a 2e  |%:.f%=0.s$="Obj.|
000046c0  22 3a 52 24 3d 22 4f 62  6a 65 63 74 22 0d 02 03  |":R$="Object"...|
000046d0  23 e7 66 25 3d 32 8c 73  24 3d 22 44 69 72 2e 20  |#.f%=2.s$="Dir. |
000046e0  22 3a 52 24 3d 22 44 69  72 65 63 74 6f 72 79 22  |":R$="Directory"|
000046f0  0d 02 04 15 e7 66 25 3d  32 80 c0 46 24 2c 31 29  |.....f%=2..F$,1)|
00004700  3d 22 21 22 8c 0d 02 05  1f 73 24 3d 22 41 70 70  |="!".....s$="App|
00004710  2e 20 22 3a 52 24 3d 22  41 70 70 6c 69 63 61 74  |. ":R$="Applicat|
00004720  69 6f 6e 22 0d 02 06 16  cd 3a 63 24 3d 73 24 2b  |ion".....:c$=s$+|
00004730  22 27 22 2b 46 24 2b 22  27 22 0d 02 07 30 cd 3a  |"'"+F$+"'"...0.:|
00004740  e7 73 25 3e 31 8c 63 24  3d 22 53 65 6c 65 63 74  |.s%>1.c$="Select|
00004750  69 6f 6e 22 3a 73 24 3d  22 53 65 6c 2e 22 3a 52  |ion":s$="Sel.":R|
00004760  24 3d 63 24 3a 42 25 3d  59 25 0d 02 08 3c 5f 6c  |$=c$:B%=Y%...<_l|
00004770  25 3d a9 28 24 62 5f 25  29 3a 63 75 25 3d a9 28  |%=.($b_%):cu%=.(|
00004780  24 79 5f 25 29 3a 72 75  25 3d a9 63 24 3a 4f 79  |$y_%):ru%=.c$:Oy|
00004790  25 3d 5f 6c 25 3a e7 63  75 25 3e 4f 79 25 8c 4f  |%=_l%:.cu%>Oy%.O|
000047a0  79 25 3d 63 75 25 0d 02  09 14 e7 72 75 25 3e 4f  |y%=cu%.....ru%>O|
000047b0  79 25 8c 4f 79 25 3d 72  75 25 0d 02 0a 23 4f 79  |y%.Oy%=ru%...#Oy|
000047c0  25 3d 28 4f 79 25 2b 31  29 2a 31 36 3a e7 4f 79  |%=(Oy%+1)*16:.Oy|
000047d0  25 3c 26 39 43 8c 4f 79  25 3d 26 39 43 0d 02 0b  |%<&9C.Oy%=&9C...|
000047e0  ef 57 25 21 31 36 3d 4f  79 25 3a 24 74 4a 25 3d  |.W%!16=Oy%:$tJ%=|
000047f0  63 24 3a 5a 25 21 30 3d  26 38 30 3a 5a 25 21 34  |c$:Z%!0=&80:Z%!4|
00004800  3d 62 4a 25 3a 5a 25 21  38 3d 42 25 3a 5a 25 21  |=bJ%:Z%!8=B%:Z%!|
00004810  26 43 3d 74 4a 25 3a 5a  25 21 31 36 3d 2d 31 3a  |&C=tJ%:Z%!16=-1:|
00004820  5a 25 21 32 30 3d 32 34  3a 5a 25 2b 3d 32 34 3a  |Z%!20=24:Z%+=24:|
00004830  59 25 3d 26 37 30 30 30  30 32 31 3a 69 25 3d 26  |Y%=&7000021:i%=&|
00004840  37 34 30 30 30 32 31 3a  57 25 3d 4c 5f 25 3a 5a  |7400021:W%=L_%:Z|
00004850  25 3d 57 25 2b 32 38 3a  24 57 25 3d 22 42 61 72  |%=W%+28:$W%="Bar|
00004860  22 3a 42 25 3d 59 25 3a  57 25 21 26 43 3d 26 37  |":B%=Y%:W%!&C=&7|
00004870  30 32 30 37 3a 57 25 21  31 36 3d 26 44 2a 31 36  |0207:W%!16=&D*16|
00004880  3a 57 25 21 32 30 3d 34  34 3a 57 25 21 32 34 3d  |:W%!20=44:W%!24=|
00004890  30 3a 41 24 3d 22 53 61  76 65 20 20 20 20 20 20  |0:A$="Save      |
000048a0  46 33 22 3a 5a 25 21 30  3d 30 3a 5a 25 21 34 3d  |F3":Z%!0=0:Z%!4=|
000048b0  30 3a 5a 25 21 38 3d 42  25 3a 24 28 5a 25 2b 26  |0:Z%!8=B%:$(Z%+&|
000048c0  43 29 3d 41 24 3a 5a 25  2b 3d 32 34 0d 02 0c 4d  |C)=A$:Z%+=24...M|
000048d0  41 24 3d 22 52 65 6e 61  6d 65 22 3a 5a 25 21 30  |A$="Rename":Z%!0|
000048e0  3d 38 3a 5a 25 21 34 3d  7a 79 25 3a 5a 25 21 38  |=8:Z%!4=zy%:Z%!8|
000048f0  3d 42 25 3a 24 28 5a 25  2b 26 43 29 3d 41 24 3a  |=B%:$(Z%+&C)=A$:|
00004900  5a 25 2b 3d 32 34 3a e7  6b 79 25 3d 30 8c 42 25  |Z%+=24:.ky%=0.B%|
00004910  3d 69 25 8b 42 25 3d 59  25 0d 02 0d 4c 41 24 3d  |=i%.B%=Y%...LA$=|
00004920  22 41 6c 74 65 72 22 3a  5a 25 21 30 3d 30 3a 5a  |"Alter":Z%!0=0:Z|
00004930  25 21 34 3d 67 4a 25 3a  5a 25 21 38 3d 42 25 3a  |%!4=gJ%:Z%!8=B%:|
00004940  24 28 5a 25 2b 26 43 29  3d 41 24 3a 5a 25 2b 3d  |$(Z%+&C)=A$:Z%+=|
00004950  32 34 3a e7 6b 79 25 3c  32 8c 42 25 3d 69 25 8b  |24:.ky%<2.B%=i%.|
00004960  42 25 3d 59 25 0d 02 0e  4b 41 24 3d 22 53 6f 72  |B%=Y%...KA$="Sor|
00004970  74 22 3a 5a 25 21 30 3d  30 3a 5a 25 21 34 3d 73  |t":Z%!0=0:Z%!4=s|
00004980  5f 25 3a 5a 25 21 38 3d  42 25 3a 24 28 5a 25 2b  |_%:Z%!8=B%:$(Z%+|
00004990  26 43 29 3d 41 24 3a 5a  25 2b 3d 32 34 3a e7 6b  |&C)=A$:Z%+=24:.k|
000049a0  79 25 3d 30 8c 42 25 3d  69 25 8b 42 25 3d 59 25  |y%=0.B%=i%.B%=Y%|
000049b0  0d 02 0f 83 41 24 3d 22  46 69 6e 64 22 3a 5a 25  |....A$="Find":Z%|
000049c0  21 30 3d 38 3a 5a 25 21  34 3d 7a 4a 25 3a 5a 25  |!0=8:Z%!4=zJ%:Z%|
000049d0  21 38 3d 42 25 3a 24 28  5a 25 2b 26 43 29 3d 41  |!8=B%:$(Z%+&C)=A|
000049e0  24 3a 5a 25 2b 3d 32 34  3a 41 24 3d 22 46 69 6c  |$:Z%+=24:A$="Fil|
000049f0  65 72 42 6f 6f 74 22 3a  5a 25 21 30 3d 30 3a 5a  |erBoot":Z%!0=0:Z|
00004a00  25 21 34 3d 30 3a 5a 25  21 38 3d 42 25 3a 24 28  |%!4=0:Z%!8=B%:$(|
00004a10  5a 25 2b 26 43 29 3d 41  24 3a 5a 25 2b 3d 32 34  |Z%+&C)=A$:Z%+=24|
00004a20  3a e7 77 25 3c 72 25 8c  42 25 3d 59 25 8b 42 25  |:.w%<r%.B%=Y%.B%|
00004a30  3d 69 25 0d 02 10 f9 41  24 3d 22 41 64 64 20 4d  |=i%....A$="Add M|
00004a40  65 6e 75 22 3a 5a 25 21  30 3d 32 3a 5a 25 21 34  |enu":Z%!0=2:Z%!4|
00004a50  3d 30 3a 5a 25 21 38 3d  42 25 3a 24 28 5a 25 2b  |=0:Z%!8=B%:$(Z%+|
00004a60  26 43 29 3d 41 24 3a 5a  25 2b 3d 32 34 3a 41 24  |&C)=A$:Z%+=24:A$|
00004a70  3d 22 4d 65 6e 75 73 3a  20 22 2b c3 77 25 2b 22  |="Menus: "+.w%+"|
00004a80  2f 22 2b c3 72 25 3a 5a  25 21 30 3d 26 38 30 3a  |/"+.r%:Z%!0=&80:|
00004a90  5a 25 21 34 3d 30 3a 5a  25 21 38 3d 69 25 3a 24  |Z%!4=0:Z%!8=i%:$|
00004aa0  28 5a 25 2b 26 43 29 3d  41 24 3a 57 25 3d 48 5f  |(Z%+&C)=A$:W%=H_|
00004ab0  25 3a 5a 25 3d 57 25 2b  32 38 3a 24 57 25 3d 22  |%:Z%=W%+28:$W%="|
00004ac0  4d 65 6e 75 22 3a 42 25  3d 59 25 3a 57 25 21 26  |Menu":B%=Y%:W%!&|
00004ad0  43 3d 26 37 30 32 30 37  3a 57 25 21 31 36 3d 26  |C=&70207:W%!16=&|
00004ae0  44 2a 31 36 3a 57 25 21  32 30 3d 34 34 3a 57 25  |D*16:W%!20=44:W%|
00004af0  21 32 34 3d 30 3a 41 24  3d 22 52 65 6e 61 6d 65  |!24=0:A$="Rename|
00004b00  22 3a 5a 25 21 30 3d 38  3a 5a 25 21 34 3d 7a 79  |":Z%!0=8:Z%!4=zy|
00004b10  25 3a 5a 25 21 38 3d 42  25 3a 24 28 5a 25 2b 26  |%:Z%!8=B%:$(Z%+&|
00004b20  43 29 3d 41 24 3a 5a 25  2b 3d 32 34 0d 02 11 29  |C)=A$:Z%+=24...)|
00004b30  51 25 3d a4 46 28 47 25  29 3a 58 25 3d a4 4d 28  |Q%=.F(G%):X%=.M(|
00004b40  51 25 29 3a e7 58 25 3d  30 8c 42 25 3d 69 25 8b  |Q%):.X%=0.B%=i%.|
00004b50  42 25 3d 59 25 0d 02 12  4b 41 24 3d 22 41 6c 74  |B%=Y%...KA$="Alt|
00004b60  65 72 22 3a 5a 25 21 30  3d 30 3a 5a 25 21 34 3d  |er":Z%!0=0:Z%!4=|
00004b70  5f 4a 25 3a 5a 25 21 38  3d 42 25 3a 24 28 5a 25  |_J%:Z%!8=B%:$(Z%|
00004b80  2b 26 43 29 3d 41 24 3a  5a 25 2b 3d 32 34 3a e7  |+&C)=A$:Z%+=24:.|
00004b90  58 25 3c 32 8c 42 25 3d  69 25 8b 42 25 3d 59 25  |X%<2.B%=i%.B%=Y%|
00004ba0  0d 02 13 4a 41 24 3d 22  53 6f 72 74 22 3a 5a 25  |...JA$="Sort":Z%|
00004bb0  21 30 3d 30 3a 5a 25 21  34 3d 73 5f 25 3a 5a 25  |!0=0:Z%!4=s_%:Z%|
00004bc0  21 38 3d 42 25 3a 24 28  5a 25 2b 26 43 29 3d 41  |!8=B%:$(Z%+&C)=A|
00004bd0  24 3a 5a 25 2b 3d 32 34  3a e7 58 25 3d 30 8c 42  |$:Z%+=24:.X%=0.B|
00004be0  25 3d 69 25 8b 42 25 3d  59 25 0d 02 14 4d 41 24  |%=i%.B%=Y%...MA$|
00004bf0  3d 22 46 69 6c 65 72 42  6f 6f 74 22 3a 5a 25 21  |="FilerBoot":Z%!|
00004c00  30 3d 30 3a 5a 25 21 34  3d 30 3a 5a 25 21 38 3d  |0=0:Z%!4=0:Z%!8=|
00004c10  42 25 3a 24 28 5a 25 2b  26 43 29 3d 41 24 3a 5a  |B%:$(Z%+&C)=A$:Z|
00004c20  25 2b 3d 32 34 3a e7 77  25 3d 31 8c 42 25 3d 69  |%+=24:.w%=1.B%=i|
00004c30  25 8b 42 25 3d 59 25 0d  02 15 d3 41 24 3d 22 52  |%.B%=Y%....A$="R|
00004c40  65 6d 6f 76 65 20 4d 65  6e 75 22 3a 5a 25 21 30  |emove Menu":Z%!0|
00004c50  3d 32 3a 5a 25 21 34 3d  30 3a 5a 25 21 38 3d 42  |=2:Z%!4=0:Z%!8=B|
00004c60  25 3a 24 28 5a 25 2b 26  43 29 3d 41 24 3a 5a 25  |%:$(Z%+&C)=A$:Z%|
00004c70  2b 3d 32 34 3a 41 24 3d  22 49 74 65 6d 73 3a 20  |+=24:A$="Items: |
00004c80  22 2b c3 58 25 2b 22 2f  22 2b c3 79 25 3a 5a 25  |"+.X%+"/"+.y%:Z%|
00004c90  21 30 3d 26 38 30 3a 5a  25 21 34 3d 30 3a 5a 25  |!0=&80:Z%!4=0:Z%|
00004ca0  21 38 3d 69 25 3a 24 28  5a 25 2b 26 43 29 3d 41  |!8=i%:$(Z%+&C)=A|
00004cb0  24 3a 57 25 3d 62 4a 25  3a 5a 25 3d 57 25 2b 32  |$:W%=bJ%:Z%=W%+2|
00004cc0  38 3a 24 57 25 3d 52 24  3a 42 25 3d 59 25 3a 57  |8:$W%=R$:B%=Y%:W|
00004cd0  25 21 26 43 3d 26 37 30  32 30 37 3a 57 25 21 31  |%!&C=&70207:W%!1|
00004ce0  36 3d 26 43 2a 31 36 3a  57 25 21 32 30 3d 34 34  |6=&C*16:W%!20=44|
00004cf0  3a 57 25 21 32 34 3d 30  3a e7 73 25 3e 31 8c 42  |:W%!24=0:.s%>1.B|
00004d00  25 3d 69 25 8b 42 25 3d  59 25 0d 02 16 48 41 24  |%=i%.B%=Y%...HA$|
00004d10  3d 22 50 61 74 68 6e 61  6d 65 22 3a 5a 25 21 30  |="Pathname":Z%!0|
00004d20  3d 38 3a 5a 25 21 34 3d  7a 79 25 3a 5a 25 21 38  |=8:Z%!4=zy%:Z%!8|
00004d30  3d 42 25 3a 24 28 5a 25  2b 26 43 29 3d 41 24 3a  |=B%:$(Z%+&C)=A$:|
00004d40  5a 25 2b 3d 32 34 3a e7  66 25 3d 30 8c 42 25 3d  |Z%+=24:.f%=0.B%=|
00004d50  69 25 0d 02 17 f3 41 24  3d 22 49 6e 66 6f 22 3a  |i%....A$="Info":|
00004d60  5a 25 21 30 3d 38 3a 5a  25 21 34 3d 71 5f 25 3a  |Z%!0=8:Z%!4=q_%:|
00004d70  5a 25 21 38 3d 42 25 3a  24 28 5a 25 2b 26 43 29  |Z%!8=B%:$(Z%+&C)|
00004d80  3d 41 24 3a 5a 25 2b 3d  32 34 3a 41 24 3d 22 4f  |=A$:Z%+=24:A$="O|
00004d90  70 65 6e 20 70 61 72 65  6e 74 22 3a 5a 25 21 30  |pen parent":Z%!0|
00004da0  3d 30 3a 5a 25 21 34 3d  30 3a 5a 25 21 38 3d 42  |=0:Z%!4=0:Z%!8=B|
00004db0  25 3a 24 28 5a 25 2b 26  43 29 3d 41 24 3a 5a 25  |%:$(Z%+&C)=A$:Z%|
00004dc0  2b 3d 32 34 3a 42 25 3d  59 25 3a 41 24 3d 22 52  |+=24:B%=Y%:A$="R|
00004dd0  65 6d 6f 76 65 20 22 2b  73 24 3a 5a 25 21 30 3d  |emove "+s$:Z%!0=|
00004de0  26 38 30 3a 5a 25 21 34  3d 30 3a 5a 25 21 38 3d  |&80:Z%!4=0:Z%!8=|
00004df0  42 25 3a 24 28 5a 25 2b  26 43 29 3d 41 24 3a 57  |B%:$(Z%+&C)=A$:W|
00004e00  25 3d 67 4a 25 3a 5a 25  3d 57 25 2b 32 38 3a 24  |%=gJ%:Z%=W%+28:$|
00004e10  57 25 3d 52 24 3a 42 25  3d 59 25 3a 57 25 21 26  |W%=R$:B%=Y%:W%!&|
00004e20  43 3d 26 37 30 32 30 37  3a 57 25 21 31 36 3d 26  |C=&70207:W%!16=&|
00004e30  41 2a 31 36 3a 57 25 21  32 30 3d 34 34 3a 57 25  |A*16:W%!20=44:W%|
00004e40  21 32 34 3d 30 0d 02 18  ea 24 57 25 3d 22 41 6c  |!24=0....$W%="Al|
00004e50  74 65 72 22 3a 41 24 3d  22 4f 70 65 6e 20 20 20  |ter":A$="Open   |
00004e60  5e 4f 22 3a 5a 25 21 30  3d 30 3a 5a 25 21 34 3d  |^O":Z%!0=0:Z%!4=|
00004e70  30 3a 5a 25 21 38 3d 42  25 3a 24 28 5a 25 2b 26  |0:Z%!8=B%:$(Z%+&|
00004e80  43 29 3d 41 24 3a 5a 25  2b 3d 32 34 3a 41 24 3d  |C)=A$:Z%+=24:A$=|
00004e90  22 43 6c 6f 73 65 20 20  5e 43 22 3a 5a 25 21 30  |"Close  ^C":Z%!0|
00004ea0  3d 30 3a 5a 25 21 34 3d  30 3a 5a 25 21 38 3d 42  |=0:Z%!4=0:Z%!8=B|
00004eb0  25 3a 24 28 5a 25 2b 26  43 29 3d 41 24 3a 5a 25  |%:$(Z%+&C)=A$:Z%|
00004ec0  2b 3d 32 34 3a 41 24 3d  22 46 72 6f 6e 74 20 20  |+=24:A$="Front  |
00004ed0  5e 46 22 3a 5a 25 21 30  3d 30 3a 5a 25 21 34 3d  |^F":Z%!0=0:Z%!4=|
00004ee0  30 3a 5a 25 21 38 3d 42  25 3a 24 28 5a 25 2b 26  |0:Z%!8=B%:$(Z%+&|
00004ef0  43 29 3d 41 24 3a 5a 25  2b 3d 32 34 3a 41 24 3d  |C)=A$:Z%+=24:A$=|
00004f00  22 42 61 63 6b 20 20 20  5e 42 22 3a 5a 25 21 30  |"Back   ^B":Z%!0|
00004f10  3d 26 38 30 3a 5a 25 21  34 3d 30 3a 5a 25 21 38  |=&80:Z%!4=0:Z%!8|
00004f20  3d 42 25 3a 24 28 5a 25  2b 26 43 29 3d 41 24 0d  |=B%:$(Z%+&C)=A$.|
00004f30  02 19 d8 57 25 3d 73 5f  25 3a 5a 25 3d 57 25 2b  |...W%=s_%:Z%=W%+|
00004f40  32 38 3a 24 57 25 3d 52  24 3a 42 25 3d 59 25 3a  |28:$W%=R$:B%=Y%:|
00004f50  57 25 21 26 43 3d 26 37  30 32 30 37 3a 57 25 21  |W%!&C=&70207:W%!|
00004f60  31 36 3d 39 2a 31 36 3a  57 25 21 32 30 3d 34 34  |16=9*16:W%!20=44|
00004f70  3a 57 25 21 32 34 3d 30  3a 24 57 25 3d 22 53 6f  |:W%!24=0:$W%="So|
00004f80  72 74 22 3a 41 24 3d 22  62 79 20 4e 61 6d 65 22  |rt":A$="by Name"|
00004f90  3a 5a 25 21 30 3d 30 3a  5a 25 21 34 3d 30 3a 5a  |:Z%!0=0:Z%!4=0:Z|
00004fa0  25 21 38 3d 42 25 3a 24  28 5a 25 2b 26 43 29 3d  |%!8=B%:$(Z%+&C)=|
00004fb0  41 24 3a 5a 25 2b 3d 32  34 3a 41 24 3d 22 62 79  |A$:Z%+=24:A$="by|
00004fc0  20 54 79 70 65 22 3a 5a  25 21 30 3d 26 38 30 3a  | Type":Z%!0=&80:|
00004fd0  5a 25 21 34 3d 30 3a 5a  25 21 38 3d 42 25 3a 24  |Z%!4=0:Z%!8=B%:$|
00004fe0  28 5a 25 2b 26 43 29 3d  41 24 3a 57 25 3d 7a 4a  |(Z%+&C)=A$:W%=zJ|
00004ff0  25 3a 5a 25 3d 57 25 2b  32 38 3a 24 57 25 3d 52  |%:Z%=W%+28:$W%=R|
00005000  24 3a 42 25 3d 59 25 0d  02 1a ef 57 25 21 26 43  |$:B%=Y%....W%!&C|
00005010  3d 26 37 30 32 30 37 3a  57 25 21 31 36 3d 35 2a  |=&70207:W%!16=5*|
00005020  31 36 3a 57 25 21 32 30  3d 34 34 3a 57 25 21 32  |16:W%!20=44:W%!2|
00005030  34 3d 30 3a 24 57 25 3d  22 46 69 6e 64 22 3a 41  |4=0:$W%="Find":A|
00005040  24 3d 22 4c 65 61 66 22  3a 5a 25 21 30 3d 38 3a  |$="Leaf":Z%!0=8:|
00005050  5a 25 21 34 3d 7a 79 25  3a 5a 25 21 38 3d 42 25  |Z%!4=zy%:Z%!8=B%|
00005060  3a 24 28 5a 25 2b 26 43  29 3d 41 24 3a 5a 25 2b  |:$(Z%+&C)=A$:Z%+|
00005070  3d 32 34 3a 41 24 3d 22  50 61 74 68 22 3a 5a 25  |=24:A$="Path":Z%|
00005080  21 30 3d 26 38 38 3a 5a  25 21 34 3d 7a 79 25 3a  |!0=&88:Z%!4=zy%:|
00005090  5a 25 21 38 3d 42 25 3a  24 28 5a 25 2b 26 43 29  |Z%!8=B%:$(Z%+&C)|
000050a0  3d 41 24 3a 57 25 3d 5f  4a 25 3a 5a 25 3d 57 25  |=A$:W%=_J%:Z%=W%|
000050b0  2b 32 38 3a 24 57 25 3d  52 24 3a 42 25 3d 59 25  |+28:$W%=R$:B%=Y%|
000050c0  3a 57 25 21 26 43 3d 26  37 30 32 30 37 3a 57 25  |:W%!&C=&70207:W%|
000050d0  21 31 36 3d 26 42 2a 31  36 3a 57 25 21 32 30 3d  |!16=&B*16:W%!20=|
000050e0  34 34 3a 57 25 21 32 34  3d 30 3a 24 57 25 3d 22  |44:W%!24=0:$W%="|
000050f0  41 6c 74 65 72 22 0d 02  1b c3 41 24 3d 22 4f 70  |Alter"....A$="Op|
00005100  65 6e 20 20 20 20 22 2b  bd 26 38 42 2b 22 4f 22  |en    "+.&8B+"O"|
00005110  3a 5a 25 21 30 3d 30 3a  5a 25 21 34 3d 30 3a 5a  |:Z%!0=0:Z%!4=0:Z|
00005120  25 21 38 3d 42 25 3a 24  28 5a 25 2b 26 43 29 3d  |%!8=B%:$(Z%+&C)=|
00005130  41 24 3a 5a 25 2b 3d 32  34 3a 41 24 3d 22 43 6c  |A$:Z%+=24:A$="Cl|
00005140  6f 73 65 20 20 20 22 2b  bd 26 38 42 2b 22 43 22  |ose   "+.&8B+"C"|
00005150  3a 5a 25 21 30 3d 30 3a  5a 25 21 34 3d 30 3a 5a  |:Z%!0=0:Z%!4=0:Z|
00005160  25 21 38 3d 42 25 3a 24  28 5a 25 2b 26 43 29 3d  |%!8=B%:$(Z%+&C)=|
00005170  41 24 3a 5a 25 2b 3d 32  34 3a 41 24 3d 22 53 65  |A$:Z%+=24:A$="Se|
00005180  6c 65 63 74 20 20 22 2b  bd 26 38 42 2b 22 53 22  |lect  "+.&8B+"S"|
00005190  3a 5a 25 21 30 3d 30 3a  5a 25 21 34 3d 30 3a 5a  |:Z%!0=0:Z%!4=0:Z|
000051a0  25 21 38 3d 42 25 3a 24  28 5a 25 2b 26 43 29 3d  |%!8=B%:$(Z%+&C)=|
000051b0  41 24 3a 5a 25 2b 3d 32  34 0d 02 1c 57 41 24 3d  |A$:Z%+=24...WA$=|
000051c0  22 43 6c 65 61 72 20 20  20 22 2b bd 26 38 42 2b  |"Clear   "+.&8B+|
000051d0  22 5a 22 3a 5a 25 21 30  3d 26 38 30 3a 5a 25 21  |"Z":Z%!0=&80:Z%!|
000051e0  34 3d 30 3a 5a 25 21 38  3d 42 25 3a 24 28 5a 25  |4=0:Z%!8=B%:$(Z%|
000051f0  2b 26 43 29 3d 41 24 3a  c8 99 26 34 30 30 44 34  |+&C)=A$:..&400D4|
00005200  2c 2c 44 5f 25 2c 78 25  2d 36 34 2c 76 25 3a e1  |,,D_%,x%-64,v%:.|
00005210  0d 02 1d a8 dd f2 60 28  78 25 2c 76 25 2c 4d 25  |......`(x%,v%,M%|
00005220  29 3a ea 42 25 2c 59 25  2c 69 25 2c 57 25 2c 5a  |):.B%,Y%,i%,W%,Z|
00005230  25 2c 41 24 3a 69 5f 25  3d 78 25 3a 6b 5f 25 3d  |%,A$:i_%=x%:k_%=|
00005240  76 25 3a 44 79 25 3d 4d  25 3a 59 25 3d 26 37 30  |v%:Dy%=M%:Y%=&70|
00005250  30 30 30 32 31 3a 69 25  3d 26 37 34 30 30 30 32  |00021:i%=&740002|
00005260  31 3a 42 25 3d 59 25 3a  57 25 3d 44 5f 25 3a 5a  |1:B%=Y%:W%=D_%:Z|
00005270  25 3d 57 25 2b 32 38 3a  57 25 21 26 43 3d 26 37  |%=W%+28:W%!&C=&7|
00005280  30 32 30 37 3a 57 25 21  31 36 3d 26 44 2a 31 36  |0207:W%!16=&D*16|
00005290  3a 57 25 21 32 30 3d 34  34 3a 57 25 21 32 34 3d  |:W%!20=44:W%!24=|
000052a0  30 3a 24 57 25 3d 47 24  3a e7 6c 25 8c 24 57 25  |0:$W%=G$:.l%.$W%|
000052b0  3d 47 24 2b 22 20 2a 22  0d 02 1e e6 41 24 3d 22  |=G$+" *"....A$="|
000052c0  4c 69 62 72 61 72 79 22  3a 5a 25 21 30 3d 38 3a  |Library":Z%!0=8:|
000052d0  5a 25 21 34 3d 75 5f 25  3a 5a 25 21 38 3d 42 25  |Z%!4=u_%:Z%!8=B%|
000052e0  3a 24 28 5a 25 2b 26 43  29 3d 41 24 3a 5a 25 2b  |:$(Z%+&C)=A$:Z%+|
000052f0  3d 32 34 3a 41 24 3d 22  53 70 72 69 74 65 73 22  |=24:A$="Sprites"|
00005300  3a 5a 25 21 30 3d 30 3a  5a 25 21 34 3d 4c 5f 25  |:Z%!0=0:Z%!4=L_%|
00005310  3a 5a 25 21 38 3d 42 25  3a 24 28 5a 25 2b 26 43  |:Z%!8=B%:$(Z%+&C|
00005320  29 3d 41 24 3a 5a 25 2b  3d 32 34 3a 41 24 3d 22  |)=A$:Z%+=24:A$="|
00005330  53 79 73 56 61 72 73 22  3a 5a 25 21 30 3d 30 3a  |SysVars":Z%!0=0:|
00005340  5a 25 21 34 3d 48 5f 25  3a 5a 25 21 38 3d 42 25  |Z%!4=H_%:Z%!8=B%|
00005350  3a 24 28 5a 25 2b 26 43  29 3d 41 24 3a 5a 25 2b  |:$(Z%+&C)=A$:Z%+|
00005360  3d 32 34 3a 41 24 3d 22  43 68 6f 69 63 65 73 2e  |=24:A$="Choices.|
00005370  2e 2e 22 3a 5a 25 21 30  3d 38 3a 5a 25 21 34 3d  |..":Z%!0=8:Z%!4=|
00005380  4c 79 25 3a 5a 25 21 38  3d 42 25 3a 24 28 5a 25  |Ly%:Z%!8=B%:$(Z%|
00005390  2b 26 43 29 3d 41 24 3a  5a 25 2b 3d 32 34 0d 02  |+&C)=A$:Z%+=24..|
000053a0  1f ee 41 24 3d 22 53 68  6f 72 74 63 75 74 73 2e  |..A$="Shortcuts.|
000053b0  2e 2e 22 3a 5a 25 21 30  3d 32 3a 5a 25 21 34 3d  |..":Z%!0=2:Z%!4=|
000053c0  30 3a 5a 25 21 38 3d 42  25 3a 24 28 5a 25 2b 26  |0:Z%!8=B%:$(Z%+&|
000053d0  43 29 3d 41 24 3a 5a 25  2b 3d 32 34 3a 41 24 3d  |C)=A$:Z%+=24:A$=|
000053e0  22 49 6e 66 6f 22 3a 5a  25 21 30 3d 30 3a 5a 25  |"Info":Z%!0=0:Z%|
000053f0  21 34 3d 67 5f 25 3a 5a  25 21 38 3d 42 25 3a 24  |!4=g_%:Z%!8=B%:$|
00005400  28 5a 25 2b 26 43 29 3d  41 24 3a 5a 25 2b 3d 32  |(Z%+&C)=A$:Z%+=2|
00005410  34 3a 41 24 3d 22 51 75  69 74 22 3a 5a 25 21 30  |4:A$="Quit":Z%!0|
00005420  3d 26 38 30 3a 5a 25 21  34 3d 30 3a 5a 25 21 38  |=&80:Z%!4=0:Z%!8|
00005430  3d 42 25 3a 24 28 5a 25  2b 26 43 29 3d 41 24 3a  |=B%:$(Z%+&C)=A$:|
00005440  57 25 3d 4c 5f 25 3a 5a  25 3d 57 25 2b 32 38 3a  |W%=L_%:Z%=W%+28:|
00005450  24 57 25 3d 22 53 70 72  69 74 65 73 22 3a 42 25  |$W%="Sprites":B%|
00005460  3d 59 25 3a 57 25 21 26  43 3d 26 37 30 32 30 37  |=Y%:W%!&C=&70207|
00005470  3a 57 25 21 31 36 3d 39  2a 31 36 3a 57 25 21 32  |:W%!16=9*16:W%!2|
00005480  30 3d 34 34 3a 57 25 21  32 34 3d 30 0d 02 20 55  |0=44:W%!24=0.. U|
00005490  41 24 3d 22 53 61 76 65  22 3a 5a 25 21 30 3d 30  |A$="Save":Z%!0=0|
000054a0  3a 5a 25 21 34 3d 30 3a  5a 25 21 38 3d 42 25 3a  |:Z%!4=0:Z%!8=B%:|
000054b0  24 28 5a 25 2b 26 43 29  3d 41 24 3a 5a 25 2b 3d  |$(Z%+&C)=A$:Z%+=|
000054c0  32 34 3a e7 a4 5a 28 55  24 2b 22 2e 53 70 72 69  |24:..Z(U$+".Spri|
000054d0  74 65 73 22 29 8c 42 25  3d 59 25 8b 42 25 3d 69  |tes").B%=Y%.B%=i|
000054e0  25 0d 02 21 d0 41 24 3d  22 4c 6f 61 64 22 3a 5a  |%..!.A$="Load":Z|
000054f0  25 21 30 3d 26 38 30 3a  5a 25 21 34 3d 30 3a 5a  |%!0=&80:Z%!4=0:Z|
00005500  25 21 38 3d 42 25 3a 24  28 5a 25 2b 26 43 29 3d  |%!8=B%:$(Z%+&C)=|
00005510  41 24 3a 57 25 3d 48 5f  25 3a 5a 25 3d 57 25 2b  |A$:W%=H_%:Z%=W%+|
00005520  32 38 3a 24 57 25 3d 22  53 79 73 56 61 72 73 22  |28:$W%="SysVars"|
00005530  3a 42 25 3d 59 25 3a 57  25 21 26 43 3d 26 37 30  |:B%=Y%:W%!&C=&70|
00005540  32 30 37 3a 57 25 21 31  36 3d 39 2a 31 36 3a 57  |207:W%!16=9*16:W|
00005550  25 21 32 30 3d 34 34 3a  57 25 21 32 34 3d 30 3a  |%!20=44:W%!24=0:|
00005560  41 24 3d 22 53 61 76 65  22 3a 5a 25 21 30 3d 30  |A$="Save":Z%!0=0|
00005570  3a 5a 25 21 34 3d 30 3a  5a 25 21 38 3d 42 25 3a  |:Z%!4=0:Z%!8=B%:|
00005580  24 28 5a 25 2b 26 43 29  3d 41 24 3a 5a 25 2b 3d  |$(Z%+&C)=A$:Z%+=|
00005590  32 34 3a e7 a4 5a 28 55  24 2b 22 2e 53 79 73 56  |24:..Z(U$+".SysV|
000055a0  61 72 73 22 29 8c 42 25  3d 59 25 8b 42 25 3d 69  |ars").B%=Y%.B%=i|
000055b0  25 0d 02 22 47 41 24 3d  22 4c 6f 61 64 22 3a 5a  |%.."GA$="Load":Z|
000055c0  25 21 30 3d 26 38 30 3a  5a 25 21 34 3d 30 3a 5a  |%!0=&80:Z%!4=0:Z|
000055d0  25 21 38 3d 42 25 3a 24  28 5a 25 2b 26 43 29 3d  |%!8=B%:$(Z%+&C)=|
000055e0  41 24 3a c8 99 26 34 30  30 44 34 2c 2c 44 5f 25  |A$:..&400D4,,D_%|
000055f0  2c 78 25 2c 76 25 3a e1  0d 02 23 85 dd f2 52 3a  |,x%,v%:...#...R:|
00005600  ea 4a 25 2c 5a 24 2c 61  5f 25 2c 41 24 3a 57 25  |.J%,Z$,a_%,A$:W%|
00005610  3d 75 5f 25 3a 5a 25 3d  57 25 2b 32 38 3a 4f 79  |=u_%:Z%=W%+28:Oy|
00005620  25 3d 26 46 2a 31 36 3a  24 57 25 3d 22 4c 69 62  |%=&F*16:$W%="Lib|
00005630  72 61 72 79 22 3a 57 25  21 26 43 3d 26 37 30 32  |rary":W%!&C=&702|
00005640  30 37 3a 57 25 21 31 36  3d 4f 79 25 3a 57 25 21  |07:W%!16=Oy%:W%!|
00005650  32 30 3d 34 34 3a 57 25  21 32 34 3d 30 3a 59 25  |20=44:W%!24=0:Y%|
00005660  3d 26 37 30 30 30 30 32  31 3a 69 25 3d 26 37 34  |=&7000021:i%=&74|
00005670  30 30 30 32 31 3a e7 43  79 25 3e 30 8c 0d 02 24  |00021:.Cy%>0...$|
00005680  22 e3 4a 25 3d 31 b8 43  79 25 3a e7 4a 25 3d 43  |".J%=1.Cy%:.J%=C|
00005690  79 25 8c 5f 79 25 3d 26  41 8b 5f 79 25 3d 38 0d  |y%._y%=&A._y%=8.|
000056a0  02 25 26 42 25 3d 26 38  30 30 30 31 32 31 3a e7  |.%&B%=&8000121:.|
000056b0  41 24 28 4a 25 29 3d 4a  24 8c 42 25 3d 26 42 30  |A$(J%)=J$.B%=&B0|
000056c0  30 30 31 32 31 0d 02 26  42 5a 25 21 30 3d 5f 79  |00121..&BZ%!0=_y|
000056d0  25 3a 5a 25 21 34 3d 68  5f 25 3a 5a 25 21 38 3d  |%:Z%!4=h_%:Z%!8=|
000056e0  42 25 3a 24 58 25 28 4a  25 29 3d 41 24 28 4a 25  |B%:$X%(J%)=A$(J%|
000056f0  29 3a e7 41 24 28 4a 25  29 3d 58 24 8c 5a 25 21  |):.A$(J%)=X$.Z%!|
00005700  30 3d 5f 79 25 2b 31 0d  02 27 2b 5a 25 21 26 43  |0=_y%+1..'+Z%!&C|
00005710  3d 58 25 28 4a 25 29 3a  5a 25 21 31 36 3d 2d 31  |=X%(J%):Z%!16=-1|
00005720  3a 5a 25 21 32 30 3d 31  36 3a 5a 25 2b 3d 32 34  |:Z%!20=16:Z%+=24|
00005730  3a ed 0d 02 28 95 cd 3a  41 24 3d 22 42 61 72 73  |:...(..:A$="Bars|
00005740  3a 20 22 2b c3 43 79 25  2b 22 2f 22 2b c3 59 79  |: "+.Cy%+"/"+.Yy|
00005750  25 3a 5a 25 21 30 3d 32  3a 5a 25 21 34 3d 30 3a  |%:Z%!0=2:Z%!4=0:|
00005760  5a 25 21 38 3d 69 25 3a  24 28 5a 25 2b 26 43 29  |Z%!8=i%:$(Z%+&C)|
00005770  3d 41 24 3a 5a 25 2b 3d  32 34 3a 41 24 3d 22 4f  |=A$:Z%+=24:A$="O|
00005780  70 65 6e 20 4c 69 62 2e  22 3a 5a 25 21 30 3d 30  |pen Lib.":Z%!0=0|
00005790  3a 5a 25 21 34 3d 30 3a  5a 25 21 38 3d 59 25 3a  |:Z%!4=0:Z%!8=Y%:|
000057a0  24 28 5a 25 2b 26 43 29  3d 41 24 3a 5a 25 2b 3d  |$(Z%+&C)=A$:Z%+=|
000057b0  32 34 3a e7 43 79 25 3c  59 79 25 8c 42 25 3d 59  |24:.Cy%<Yy%.B%=Y|
000057c0  25 8b 42 25 3d 69 25 0d  02 29 37 41 24 3d 22 43  |%.B%=i%..)7A$="C|
000057d0  72 65 61 74 65 22 3a 5a  25 21 30 3d 26 38 38 3a  |reate":Z%!0=&88:|
000057e0  5a 25 21 34 3d 7a 79 25  3a 5a 25 21 38 3d 42 25  |Z%!4=zy%:Z%!8=B%|
000057f0  3a 24 28 5a 25 2b 26 43  29 3d 41 24 3a e1 0d 02  |:$(Z%+&C)=A$:...|
00005800  2a ce dd f2 47 5f 28 41  25 29 3a ea 70 25 3a 70  |*...G_(A%):.p%:p|
00005810  25 3d 41 25 21 33 36 3a  57 25 3d 68 5f 25 3a 5a  |%=A%!36:W%=h_%:Z|
00005820  25 3d 57 25 2b 32 38 3a  24 57 25 3d 41 24 28 70  |%=W%+28:$W%=A$(p|
00005830  25 2b 31 29 3a 57 25 21  26 43 3d 26 37 30 32 30  |%+1):W%!&C=&7020|
00005840  37 3a 57 25 21 31 36 3d  38 2a 31 36 3a 57 25 21  |7:W%!16=8*16:W%!|
00005850  32 30 3d 34 34 3a 57 25  21 32 34 3d 30 3a 42 25  |20=44:W%!24=0:B%|
00005860  3d 59 25 3a 41 24 3d 22  4c 6f 61 64 22 3a 5a 25  |=Y%:A$="Load":Z%|
00005870  21 30 3d 30 3a 5a 25 21  34 3d 30 3a 5a 25 21 38  |!0=0:Z%!4=0:Z%!8|
00005880  3d 42 25 3a 24 28 5a 25  2b 26 43 29 3d 41 24 3a  |=B%:$(Z%+&C)=A$:|
00005890  5a 25 2b 3d 32 34 3a 41  24 3d 22 44 65 66 61 75  |Z%+=24:A$="Defau|
000058a0  6c 74 22 3a 5a 25 21 30  3d 30 3a 5a 25 21 34 3d  |lt":Z%!0=0:Z%!4=|
000058b0  30 3a 5a 25 21 38 3d 42  25 3a 24 28 5a 25 2b 26  |0:Z%!8=B%:$(Z%+&|
000058c0  43 29 3d 41 24 3a 5a 25  2b 3d 32 34 0d 02 2b a4  |C)=A$:Z%+=24..+.|
000058d0  41 24 3d 22 44 65 6c 65  74 65 22 3a 5a 25 21 30  |A$="Delete":Z%!0|
000058e0  3d 30 3a 5a 25 21 34 3d  30 3a 5a 25 21 38 3d 42  |=0:Z%!4=0:Z%!8=B|
000058f0  25 3a 24 28 5a 25 2b 26  43 29 3d 41 24 3a 5a 25  |%:$(Z%+&C)=A$:Z%|
00005900  2b 3d 32 34 3a 41 24 3d  22 52 65 6e 61 6d 65 22  |+=24:A$="Rename"|
00005910  3a 5a 25 21 30 3d 38 3a  5a 25 21 34 3d 7a 79 25  |:Z%!0=8:Z%!4=zy%|
00005920  3a 5a 25 21 38 3d 42 25  3a 24 28 5a 25 2b 26 43  |:Z%!8=B%:$(Z%+&C|
00005930  29 3d 41 24 3a 5a 25 2b  3d 32 34 3a 41 24 3d 22  |)=A$:Z%+=24:A$="|
00005940  43 6f 70 79 20 61 73 22  3a 5a 25 21 30 3d 26 38  |Copy as":Z%!0=&8|
00005950  38 3a 5a 25 21 34 3d 7a  79 25 3a 5a 25 21 38 3d  |8:Z%!4=zy%:Z%!8=|
00005960  42 25 3a 24 28 5a 25 2b  26 43 29 3d 41 24 3a e1  |B%:$(Z%+&C)=A$:.|
00005970  0d 02 2c 64 dd f2 78 79  28 41 25 29 3a ea 42 6c  |..,d..xy(A%):.Bl|
00005980  25 2c 4f 25 2c 74 25 2c  68 79 25 2c 41 79 25 2c  |%,O%,t%,hy%,Ay%,|
00005990  50 79 25 3a 42 6c 25 3d  41 25 21 32 30 3a 4f 25  |Py%:Bl%=A%!20:O%|
000059a0  3d 41 25 21 32 34 3a 74  25 3d 41 25 21 32 38 3a  |=A%!24:t%=A%!28:|
000059b0  68 79 25 3d 41 25 21 33  32 3a 41 79 25 3d 41 25  |hy%=A%!32:Ay%=A%|
000059c0  21 33 36 3a 50 79 25 3d  41 25 21 34 30 3a c8 8e  |!36:Py%=A%!40:..|
000059d0  42 6c 25 ca 0d 02 2d 0c  c9 71 5f 25 3a f2 6e 79  |Bl%...-..q_%:.ny|
000059e0  0d 02 2e 19 c9 7a 79 25  3a f2 71 79 28 68 79 25  |.....zy%:.qy(hy%|
000059f0  2c 41 79 25 2c 50 79 25  29 0d 02 2f 0b c9 75 5f  |,Ay%,Py%)../..u_|
00005a00  25 3a f2 52 0d 02 30 10  c9 68 5f 25 3a f2 47 5f  |%:.R..0..h_%:.G_|
00005a10  28 41 25 29 0d 02 31 1a  c9 4c 79 25 3a f2 72 3a  |(A%)..1..Ly%:.r:|
00005a20  51 5f 25 3d 4a 79 25 3a  58 5f 25 3d 6d 25 0d 02  |Q_%=Jy%:X_%=m%..|
00005a30  32 1b cb 3a c8 99 26 34  30 30 45 38 2c 2c 42 6c  |2..:..&400E8,,Bl|
00005a40  25 2c 4f 25 2c 74 25 3a  e1 0d 02 33 81 dd f2 71  |%,O%,t%:...3...q|
00005a50  79 28 68 79 25 2c 41 79  25 2c 50 79 25 29 3a ea  |y(hy%,Ay%,Py%):.|
00005a60  50 24 3a 57 25 3d 7a 79  25 3a 5a 25 3d 57 25 2b  |P$:W%=zy%:Z%=W%+|
00005a70  32 38 3a 57 25 21 26 43  3d 26 37 30 32 30 37 3a  |28:W%!&C=&70207:|
00005a80  57 25 21 31 36 3d 26 42  2a 31 36 3a 57 25 21 32  |W%!16=&B*16:W%!2|
00005a90  30 3d 34 34 3a 57 25 21  32 34 3d 30 3a 42 25 3d  |0=44:W%!24=0:B%=|
00005aa0  26 37 30 30 30 31 32 31  3a 5a 25 21 30 3d 26 38  |&7000121:Z%!0=&8|
00005ab0  34 3a 5a 25 21 34 3d 30  3a 5a 25 21 38 3d 42 25  |4:Z%!4=0:Z%!8=B%|
00005ac0  3a e7 44 79 25 3d 46 79  25 8c 0d 02 34 0a c8 8e  |:.Dy%=Fy%...4...|
00005ad0  41 79 25 ca 0d 02 35 16  c9 43 79 25 2b 32 3a 50  |Ay%...5..Cy%+2:P|
00005ae0  24 3d 22 4e 65 77 42 61  72 22 0d 02 36 0c cb 3a  |$="NewBar"..6..:|
00005af0  c8 8e 50 79 25 ca 0d 02  37 15 c9 33 2c 34 3a 50  |..Py%...7..3,4:P|
00005b00  24 3d 41 24 28 41 79 25  2b 31 29 0d 02 38 36 cb  |$=A$(Ay%+1)..86.|
00005b10  3a 24 65 79 25 3d 50 24  3a 24 57 25 3d 22 4e 61  |:$ey%=P$:$W%="Na|
00005b20  6d 65 3a 22 3a 5a 25 21  26 43 3d 65 79 25 3a 5a  |me:":Z%!&C=ey%:Z|
00005b30  25 21 31 36 3d 6f 5f 25  3a 5a 25 21 32 30 3d 26  |%!16=o_%:Z%!20=&|
00005b40  42 0d 02 39 0c cc 3a c8  8e 68 79 25 ca 0d 02 3a  |B..9..:..hy%...:|
00005b50  0d c9 30 3a c8 8e 41 79  25 ca 0d 02 3b 3d c9 31  |..0:..Ay%...;=.1|
00005b60  3a 24 57 25 3d 22 4e 61  6d 65 3a 22 3a 50 24 3d  |:$W%="Name:":P$=|
00005b70  4a 24 3a 24 65 79 25 3d  50 24 3a 5a 25 21 26 43  |J$:$ey%=P$:Z%!&C|
00005b80  3d 65 79 25 3a 5a 25 21  31 36 3d 6f 5f 25 3a 5a  |=ey%:Z%!16=o_%:Z|
00005b90  25 21 32 30 3d 26 42 0d  02 3c 0d c9 34 3a c8 8e  |%!20=&B..<..4:..|
00005ba0  50 79 25 ca 0d 02 3d 33  c9 30 3a 24 57 25 3d 22  |Py%...=3.0:$W%="|
00005bb0  46 69 6e 64 20 6c 65 61  66 3a 22 3a 5a 25 21 26  |Find leaf:":Z%!&|
00005bc0  43 3d 78 5f 25 3a 5a 25  21 31 36 3d 2d 31 3a 5a  |C=x_%:Z%!16=-1:Z|
00005bd0  25 21 32 30 3d 26 42 0d  02 3e 33 c9 31 3a 24 57  |%!20=&B..>3.1:$W|
00005be0  25 3d 22 46 69 6e 64 20  70 61 74 68 3a 22 3a 5a  |%="Find path:":Z|
00005bf0  25 21 26 43 3d 51 75 25  3a 5a 25 21 31 36 3d 2d  |%!&C=Qu%:Z%!16=-|
00005c00  31 3a 5a 25 21 32 30 3d  26 42 0d 02 3f 05 cb 0d  |1:Z%!20=&B..?...|
00005c10  02 40 05 cb 0d 02 41 41  c9 31 3a 24 57 25 3d 22  |.@....AA.1:$W%="|
00005c20  4e 61 6d 65 3a 22 3a 50  24 3d 24 43 25 28 47 25  |Name:":P$=$C%(G%|
00005c30  29 3a 24 69 79 25 3d 50  24 3a 5a 25 21 26 43 3d  |):$iy%=P$:Z%!&C=|
00005c40  69 79 25 3a 5a 25 21 31  36 3d 2d 31 3a 5a 25 21  |iy%:Z%!16=-1:Z%!|
00005c50  32 30 3d 26 44 0d 02 42  42 c9 32 3a 24 57 25 3d  |20=&D..BB.2:$W%=|
00005c60  22 50 61 74 68 6e 61 6d  65 3a 22 3a 24 48 4a 25  |"Pathname:":$HJ%|
00005c70  3d a4 43 28 47 25 2c 6b  25 29 3a 5a 25 21 26 43  |=.C(G%,k%):Z%!&C|
00005c80  3d 48 4a 25 3a 5a 25 21  31 36 3d 2d 31 3a 5a 25  |=HJ%:Z%!16=-1:Z%|
00005c90  21 32 30 3d 32 35 36 0d  02 43 05 cb 0d 02 44 07  |!20=256..C....D.|
00005ca0  cd 3a e1 0d 02 45 16 dd  f2 76 5f 28 41 25 29 3a  |.:...E...v_(A%):|
00005cb0  e7 44 79 25 3d 46 79 25  8c 0d 02 46 0b f2 63 79  |.Dy%=Fy%...F..cy|
00005cc0  28 41 25 29 0d 02 47 0d  cc 3a f2 74 5f 28 41 25  |(A%)..G..:.t_(A%|
00005cd0  29 0d 02 48 07 cd 3a e1  0d 02 49 56 dd f2 63 79  |)..H..:...IV..cy|
00005ce0  28 41 25 29 3a 68 79 25  3d 41 25 21 30 3a 41 79  |(A%):hy%=A%!0:Ay|
00005cf0  25 3d 41 25 21 34 3a 50  79 25 3d 41 25 21 38 3a  |%=A%!4:Py%=A%!8:|
00005d00  57 4a 25 3d 41 25 21 26  43 3a c8 99 26 34 30 30  |WJ%=A%!&C:..&400|
00005d10  43 46 2c 2c 41 25 3a 61  25 3d 41 25 21 38 3a 56  |CF,,A%:a%=A%!8:V|
00005d20  79 25 3d 61 25 3d 31 3a  c8 8e 68 79 25 ca 0d 02  |y%=a%=1:..hy%...|
00005d30  4a 1b c9 30 3a f2 64 5f  28 68 79 25 2c 41 79 25  |J..0:.d_(hy%,Ay%|
00005d40  2c 50 79 25 2c 57 4a 25  29 0d 02 4b 0d c9 31 3a  |,Py%,WJ%)..K..1:|
00005d50  c8 8e 41 79 25 ca 0d 02  4c 0a c9 30 3a f2 6d 79  |..Ay%...L..0:.my|
00005d60  0d 02 4d 1c c9 31 3a c8  99 26 34 30 36 43 30 3a  |..M..1:..&406C0:|
00005d70  f2 5a 79 3a c8 99 26 34  30 36 43 32 0d 02 4e 05  |.Zy:..&406C2..N.|
00005d80  cb 0d 02 4f 0d c9 32 3a  c8 8e 41 79 25 ca 0d 02  |...O..2:..Ay%...|
00005d90  50 1c c9 30 3a c8 99 26  34 30 36 43 30 3a f2 6d  |P..0:..&406C0:.m|
00005da0  5f 3a c8 99 26 34 30 36  43 32 0d 02 51 1c c9 31  |_:..&406C2..Q..1|
00005db0  3a c8 99 26 34 30 36 43  30 3a f2 48 79 3a c8 99  |:..&406C0:.Hy:..|
00005dc0  26 34 30 36 43 32 0d 02  52 05 cb 0d 02 53 06 c9  |&406C2..R....S..|
00005dd0  32 0d 02 54 2e c9 33 3a  f2 72 3a 51 5f 25 3d 4a  |2..T..3:.r:Q_%=J|
00005de0  79 25 3a 58 5f 25 3d 6d  25 3a f2 74 79 28 4c 79  |y%:X_%=m%:.ty(Ly|
00005df0  25 29 3a c8 99 26 34 30  30 44 34 2c 2c 2d 31 0d  |%):..&400D4,,-1.|
00005e00  02 55 37 c9 34 3a 41 79  24 3d 7a 24 2b 22 2e 53  |.U7.4:Ay$=z$+".S|
00005e10  68 6f 72 74 63 75 74 73  22 3a e7 a4 5a 28 41 79  |hortcuts":..Z(Ay|
00005e20  24 29 8c ff 28 22 46 69  6c 65 72 5f 52 75 6e 20  |$)..("Filer_Run |
00005e30  22 2b 41 79 24 29 0d 02  56 06 c9 35 0d 02 57 0d  |"+Ay$)..V..5..W.|
00005e40  c9 36 3a 4f 5f 25 3d a4  78 0d 02 58 1a cb 3a e7  |.6:O_%=.x..X..:.|
00005e50  56 79 25 8c f2 60 28 69  5f 25 2c 6b 5f 25 2c 44  |Vy%..`(i_%,k_%,D|
00005e60  79 25 29 0d 02 59 05 e1  0d 02 5a 61 dd f2 74 5f  |y%)..Y....Za..t_|
00005e70  28 41 25 29 3a 68 79 25  3d 41 25 21 30 3a 41 79  |(A%):hy%=A%!0:Ay|
00005e80  25 3d 41 25 21 34 3a 50  79 25 3d 41 25 21 38 3a  |%=A%!4:Py%=A%!8:|
00005e90  57 4a 25 3d 41 25 21 26  43 3a c8 99 26 34 30 30  |WJ%=A%!&C:..&400|
00005ea0  43 46 2c 2c 41 25 3a 61  25 3d 41 25 21 38 3a 56  |CF,,A%:a%=A%!8:V|
00005eb0  79 25 3d 61 25 3d 31 3a  47 25 3d a4 4e 28 44 79  |y%=a%=1:G%=.N(Dy|
00005ec0  25 29 3a c8 8e 68 79 25  ca 0d 02 5b 0d c9 30 3a  |%):..hy%...[..0:|
00005ed0  c8 8e 41 79 25 ca 0d 02  5c 0d c9 30 3a f2 4c 28  |..Ay%...\..0:.L(|
00005ee0  4a 24 29 0d 02 5d 18 c9  31 3a e7 50 79 25 3e 3d  |J$)..]..1:.Py%>=|
00005ef0  30 8c f2 43 5f 28 24 65  79 25 29 0d 02 5e 0d c9  |0..C_($ey%)..^..|
00005f00  32 3a c8 8e 50 79 25 ca  0d 02 5f 09 c9 30 3a f2  |2:..Py%..._..0:.|
00005f10  77 0d 02 60 09 c9 31 3a  f2 78 0d 02 61 09 c9 32  |w..`..1:.x..a..2|
00005f20  3a f2 64 0d 02 62 09 c9  33 3a f2 61 0d 02 63 05  |:.d..b..3:.a..c.|
00005f30  cb 0d 02 64 0d c9 33 3a  c8 8e 50 79 25 ca 0d 02  |...d..3:..Py%...|
00005f40  65 11 c9 30 3a f2 70 28  22 6e 61 6d 65 22 29 0d  |e..0:.p("name").|
00005f50  02 66 11 c9 31 3a f2 70  28 22 74 79 70 65 22 29  |.f..1:.p("type")|
00005f60  0d 02 67 05 cb 0d 02 68  0d c9 34 3a c8 8e 50 79  |..g....h..4:..Py|
00005f70  25 ca 0d 02 69 1c c9 30  3a e7 57 4a 25 3e 3d 30  |%...i..0:.WJ%>=0|
00005f80  8c f2 4e 79 28 24 78 5f  25 2c 50 79 25 29 0d 02  |..Ny($x_%,Py%)..|
00005f90  6a 1c c9 31 3a e7 57 4a  25 3e 3d 30 8c f2 4e 79  |j..1:.WJ%>=0..Ny|
00005fa0  28 24 51 75 25 2c 50 79  25 29 0d 02 6b 05 cb 0d  |($Qu%,Py%)..k...|
00005fb0  02 6c 2e c9 35 3a 75 79  25 3d b9 3a c8 99 36 2c  |.l..5:uy%=.:..6,|
00005fc0  26 45 35 2c 30 2c 30 3a  f2 77 5f 3a c8 99 36 2c  |&E5,0,0:.w_:..6,|
00005fd0  26 45 35 2c 31 2c 30 3a  75 79 25 3d a3 0d 02 6d  |&E5,1,0:uy%=...m|
00005fe0  0a c9 36 3a f2 63 5f 0d  02 6e 05 cb 0d 02 6f 0d  |..6:.c_..n....o.|
00005ff0  c9 31 3a c8 8e 41 79 25  ca 0d 02 70 16 c9 30 3a  |.1:..Ay%...p..0:|
00006000  e7 24 43 25 28 47 25 29  3c 3e 24 69 79 25 8c 0d  |.$C%(G%)<>$iy%..|
00006010  02 71 15 f2 55 5f 28 24  69 79 25 29 3a f2 4f 28  |.q..U_($iy%):.O(|
00006020  44 79 25 29 0d 02 72 05  cd 0d 02 73 05 cd 0d 02  |Dy%)..r....s....|
00006030  74 0d c9 31 3a c8 8e 50  79 25 ca 0d 02 75 0d c9  |t..1:..Py%...u..|
00006040  30 3a f2 5f 28 47 25 29  0d 02 76 0d c9 31 3a f2  |0:._(G%)..v..1:.|
00006050  43 28 47 25 29 0d 02 77  0e c9 32 3a f2 4f 79 28  |C(G%)..w..2:.Oy(|
00006060  47 25 29 0d 02 78 0d c9  33 3a f2 4a 28 47 25 29  |G%)..x..3:.J(G%)|
00006070  0d 02 79 05 cb 0d 02 7a  0d c9 32 3a c8 8e 50 79  |..y....z..2:..Py|
00006080  25 ca 0d 02 7b 14 c9 30  3a f2 4b 28 47 25 2c 22  |%...{..0:.K(G%,"|
00006090  6e 61 6d 65 22 29 0d 02  7c 14 c9 31 3a f2 4b 28  |name")..|..1:.K(|
000060a0  47 25 2c 22 74 79 70 65  22 29 0d 02 7d 05 cb 0d  |G%,"type")..}...|
000060b0  02 7e 32 c9 33 3a 75 79  25 3d b9 3a c8 99 36 2c  |.~2.3:uy%=.:..6,|
000060c0  26 45 35 2c 30 2c 30 3a  f2 58 79 28 47 25 29 3a  |&E5,0,0:.Xy(G%):|
000060d0  c8 99 36 2c 26 45 35 2c  31 2c 30 3a 75 79 25 3d  |..6,&E5,1,0:uy%=|
000060e0  a3 0d 02 7f 0e c9 34 3a  f2 71 5f 28 47 25 29 0d  |......4:.q_(G%).|
000060f0  02 80 05 cb 0d 02 81 0d  c9 32 3a c8 8e 41 79 25  |.........2:..Ay%|
00006100  ca 0d 02 82 06 c9 30 0d  02 83 06 c9 31 0d 02 84  |......0.....1...|
00006110  19 c9 32 3a f2 5f 5f 28  a4 7a 28 a4 43 28 47 25  |..2:.__(.z(.C(G%|
00006120  2c 6b 25 29 29 29 0d 02  85 18 c9 33 3a 73 25 3d  |,k%))).....3:s%=|
00006130  a4 57 28 44 79 25 29 3a  e7 73 25 3e 31 8c 0d 02  |.W(Dy%):.s%>1...|
00006140  86 0e f2 73 28 44 79 25  2c 73 25 29 0d 02 87 10  |...s(Dy%,s%)....|
00006150  cc 3a f2 49 28 44 79 25  2c 6b 25 29 0d 02 88 0c  |.:.I(Dy%,k%)....|
00006160  cd 3a f2 4a 28 47 25 29  0d 02 89 05 cb 0d 02 8a  |.:.J(G%)........|
00006170  1d cb 3a e7 56 79 25 8c  f2 6c 28 69 5f 25 2c 6b  |..:.Vy%..l(i_%,k|
00006180  5f 25 2c 44 79 25 2c 47  25 29 0d 02 8b 05 e1 0d  |_%,Dy%,G%)......|
00006190  02 8c 1d dd f2 55 5f 28  4c 24 29 3a ea 5f 25 3a  |.....U_(L$):._%:|
000061a0  5f 25 3d b9 3a e7 4c 24  3d 22 22 8c 0d 02 8d 35  |_%=.:.L$=""....5|
000061b0  4d 24 3d 22 50 6c 65 61  73 65 20 65 6e 74 65 72  |M$="Please enter|
000061c0  20 6d 65 6e 75 20 6e 61  6d 65 22 3a 7a 25 3d a4  | menu name":z%=.|
000061d0  53 28 4d 24 2c 22 4f 4b  22 2c 31 29 3a 5f 25 3d  |S(M$,"OK",1):_%=|
000061e0  a3 0d 02 8e 1b cd 3a e7  5f 25 8c 24 43 25 28 47  |......:._%.$C%(G|
000061f0  25 29 3d 24 69 79 25 3a  6c 25 3d b9 0d 02 8f 05  |%)=$iy%:l%=.....|
00006200  e1 0d 02 90 8b dd f2 6d  3a ea 52 25 3a 49 79 25  |.......m:.R%:Iy%|
00006210  3d 30 3a 66 79 25 3d 30  3a 78 79 25 3d 30 3a 64  |=0:fy%=0:xy%=0:d|
00006220  79 25 3d 37 3a 51 79 25  3d 31 3a 4a 79 25 3d 37  |y%=7:Qy%=1:Jy%=7|
00006230  3a 6d 25 3d 31 3a 52 25  3d 31 36 3a 44 25 3f 52  |:m%=1:R%=16:D%?R|
00006240  25 3d 64 79 25 3a 52 25  2b 3d 31 3a 44 25 3f 52  |%=dy%:R%+=1:D%?R|
00006250  25 3d 78 79 25 3a 52 25  2b 3d 31 3a 44 25 3f 52  |%=xy%:R%+=1:D%?R|
00006260  25 3d 51 79 25 3a 52 25  2b 3d 31 3a 44 25 3f 52  |%=Qy%:R%+=1:D%?R|
00006270  25 3d 4a 79 25 3a 52 25  2b 3d 31 3a 44 25 3f 52  |%=Jy%:R%+=1:D%?R|
00006280  25 3d 6d 25 3a 52 25 2b  3d 31 3a e1 0d 02 91 65  |%=m%:R%+=1:....e|
00006290  dd f2 72 3a ea 4a 25 2c  42 25 2c 4d 25 3a 4d 25  |..r:.J%,B%,M%:M%|
000062a0  3d 4c 79 25 3a 24 70 6c  25 3d 22 4d 65 6e 75 42  |=Ly%:$pl%="MenuB|
000062b0  61 72 20 63 68 6f 69 63  65 73 20 28 42 61 72 20  |ar choices (Bar |
000062c0  27 22 2b 4a 24 2b 22 27  29 22 3a e3 4a 25 3d 33  |'"+J$+"')":.J%=3|
000062d0  34 b8 33 38 3a f2 57 28  4d 25 2c 4a 25 29 3a ed  |4.38:.W(M%,J%):.|
000062e0  3a e7 49 79 25 3d 31 8c  f2 46 28 4d 25 2c 33 33  |:.Iy%=1..F(M%,33|
000062f0  29 0d 02 92 14 e7 49 79  25 3d 32 8c f2 46 28 4d  |).....Iy%=2..F(M|
00006300  25 2c 33 34 29 0d 02 93  14 e7 66 79 25 3d 30 8c  |%,34).....fy%=0.|
00006310  f2 46 28 4d 25 2c 33 35  29 0d 02 94 14 e7 66 79  |.F(M%,35).....fy|
00006320  25 3d 31 8c f2 46 28 4d  25 2c 33 36 29 0d 02 95  |%=1..F(M%,36)...|
00006330  f8 42 25 3d 28 6a 5f 25  3c 3c 32 38 29 2b 26 41  |.B%=(j_%<<28)+&A|
00006340  30 30 30 31 33 44 3a f2  4d 28 4d 25 2c 32 32 2c  |00013D:.M(M%,22,|
00006350  42 25 29 3a 42 25 3d 28  6d 25 3c 3c 32 38 29 2b  |B%):B%=(m%<<28)+|
00006360  26 37 30 30 33 30 33 44  3a f2 4d 28 4d 25 2c 32  |&700303D:.M(M%,2|
00006370  33 2c 42 25 29 3a 42 25  3d 28 6d 25 3c 3c 32 38  |3,B%):B%=(m%<<28|
00006380  29 2b 28 4a 79 25 3c 3c  32 34 29 2b 26 33 31 33  |)+(Jy%<<24)+&313|
00006390  35 3a f2 4d 28 4d 25 2c  32 34 2c 42 25 29 3a 42  |5:.M(M%,24,B%):B|
000063a0  25 3d 28 51 79 25 3c 3c  32 38 29 2b 26 33 31 33  |%=(Qy%<<28)+&313|
000063b0  44 3a f2 4d 28 4d 25 2c  32 35 2c 42 25 29 3a 42  |D:.M(M%,25,B%):B|
000063c0  25 3d 28 51 79 25 3c 3c  32 38 29 2b 28 64 79 25  |%=(Qy%<<28)+(dy%|
000063d0  3c 3c 32 34 29 2b 26 33  31 33 35 3a f2 4d 28 4d  |<<24)+&3135:.M(M|
000063e0  25 2c 32 36 2c 42 25 29  3a 42 25 3d 28 51 79 25  |%,26,B%):B%=(Qy%|
000063f0  3c 3c 32 38 29 2b 26 33  31 33 44 3a f2 4d 28 4d  |<<28)+&313D:.M(M|
00006400  25 2c 32 37 2c 42 25 29  3a 42 25 3d 28 51 79 25  |%,27,B%):B%=(Qy%|
00006410  3c 3c 32 38 29 2b 28 78  79 25 3c 3c 32 34 29 2b  |<<28)+(xy%<<24)+|
00006420  26 33 31 33 35 0d 02 96  15 f2 4d 28 4d 25 2c 32  |&3135.....M(M%,2|
00006430  38 2c 42 25 29 3a f2 67  3a e1 0d 02 97 26 dd f2  |8,B%):.g:....&..|
00006440  7a 28 44 24 29 3a ea 4a  25 2c 5f 25 2c 41 69 25  |z(D$):.J%,_%,Ai%|
00006450  3a 5f 25 3d b9 3a 56 79  25 3d a3 3a e7 6c 25 8c  |:_%=.:Vy%=.:.l%.|
00006460  0d 02 98 8e 4d 24 3d 22  43 6f 6d 6d 61 6e 64 3a  |....M$="Command:|
00006470  20 4c 6f 61 64 20 62 61  72 20 27 22 2b 44 24 2b  | Load bar '"+D$+|
00006480  22 27 22 3a 4d 24 2b 3d  22 2c 2e 2e 2e 62 75 74  |"'":M$+=",...but|
00006490  20 63 68 61 6e 67 65 73  20 68 61 76 65 20 62 65  | changes have be|
000064a0  65 6e 20 6d 61 64 65 21  22 3a 4f 24 3d 22 49 67  |en made!":O$="Ig|
000064b0  6e 6f 72 65 20 63 68 61  6e 67 65 73 2c 43 61 6e  |nore changes,Can|
000064c0  63 65 6c 20 63 6f 6d 6d  61 6e 64 2c 53 61 76 65  |cel command,Save|
000064d0  20 63 68 61 6e 67 65 73  22 3a 7a 25 3d a4 53 28  | changes":z%=.S(|
000064e0  4d 24 2c 4f 24 2c 32 29  3a c8 8e 7a 25 ca 0d 02  |M$,O$,2):..z%...|
000064f0  99 0d c9 30 2c 32 3a 5f  25 3d a3 0d 02 9a 0d c9  |...0,2:_%=......|
00006500  33 3a f2 4c 28 4a 24 29  0d 02 9b 05 cb 0d 02 9c  |3:.L(J$)........|
00006510  0a cd 3a e7 5f 25 8c 0d  02 9d 21 76 24 3d a4 75  |..:._%....!v$=.u|
00006520  28 44 24 29 3a 41 69 25  3d a4 6a 28 76 24 2c 44  |(D$):Ai%=.j(v$,D|
00006530  24 29 3a e7 41 69 25 8c  0d 02 9e 37 c8 99 26 34  |$):.Ai%....7..&4|
00006540  30 36 43 30 3a f2 53 79  3a f2 68 28 44 24 29 3a  |06C0:.Sy:.h(D$):|
00006550  f2 5a 28 46 79 25 2c 30  2c 51 79 25 29 3a 4a 24  |.Z(Fy%,0,Qy%):J$|
00006560  3d 44 24 3a f2 72 3a c8  99 26 34 30 36 43 32 0d  |=D$:.r:..&406C2.|
00006570  02 9f 05 cd 0d 02 a0 07  cd 3a e1 0d 02 a1 5c dd  |.........:....\.|
00006580  f2 55 3a ea 4a 25 2c 63  6c 25 2c 6d 4a 25 2c 50  |.U:.J%,cl%,mJ%,P|
00006590  24 2c 66 25 2c 56 25 2c  41 24 2c 4d 24 3a 4a 25  |$,f%,V%,A$,M$:J%|
000065a0  3d 31 3a 6d 4a 25 3d 30  3a f5 3a c8 99 26 43 2c  |=1:mJ%=0:.:..&C,|
000065b0  26 41 2c 42 24 2c 41 25  2c 31 2c 6d 4a 25 2c 26  |&A,B$,A%,1,mJ%,&|
000065c0  36 34 2c 22 2a 22 b8 2c  2c 2c 63 6c 25 2c 6d 4a  |64,"*".,,,cl%,mJ|
000065d0  25 3a e7 63 6c 25 8c 0d  02 a2 51 50 24 3d a4 51  |%:.cl%....QP$=.Q|
000065e0  28 41 25 2b 32 30 29 3a  66 25 3d a4 55 28 42 24  |(A%+20):f%=.U(B$|
000065f0  2b 22 2e 22 2b 50 24 29  3a 56 25 3d 28 28 21 41  |+"."+P$):V%=((!A|
00006600  25 29 3e 3e 3e 38 29 80  26 46 46 46 3a 60 24 3d  |%)>>>8).&FFF:`$=|
00006610  42 24 2b 22 2e 22 2b 50  24 3a e7 56 25 3d 26 46  |B$+"."+P$:.V%=&F|
00006620  46 44 80 66 25 3d 31 8c  0d 02 a3 13 41 24 28 4a  |FD.f%=1.....A$(J|
00006630  25 29 3d 50 24 3a 4a 25  2b 3d 31 0d 02 a4 05 cd  |%)=P$:J%+=1.....|
00006640  0d 02 a5 1f cd 3a fd 6d  4a 25 3d 2d 31 84 4a 25  |.....:.mJ%=-1.J%|
00006650  3e 59 79 25 3a 43 79 25  3d 4a 25 2d 31 3a e1 0d  |>Yy%:Cy%=J%-1:..|
00006660  02 a6 34 dd f2 69 79 28  44 4a 25 29 3a ea 4a 25  |..4..iy(DJ%):.J%|
00006670  2c 5a 24 2c 55 25 2c 59  25 2c 4d 79 25 2c 5f 25  |,Z$,U%,Y%,My%,_%|
00006680  3a 5f 25 3d b9 3a e7 44  4a 25 3e 59 79 25 8c 5f  |:_%=.:.DJ%>Yy%._|
00006690  25 3d a3 0d 02 a7 0e e7  5f 25 80 44 4a 25 3e 30  |%=......_%.DJ%>0|
000066a0  8c 0d 02 a8 4b e3 4a 25  3d 31 b8 44 4a 25 3a 5a  |....K.J%=1.DJ%:Z|
000066b0  24 3d 42 24 2b 22 2e 22  2b 41 24 28 4a 25 29 3a  |$=B$+"."+A$(J%):|
000066c0  46 25 3d 8e 28 5a 24 29  3a 55 25 3d 30 3a 59 25  |F%=.(Z$):U%=0:Y%|
000066d0  3d 9a 23 46 25 3a f5 3a  59 25 3d 9a 23 46 25 3a  |=.#F%:.:Y%=.#F%:|
000066e0  e7 59 25 3c 3e 30 8c 55  25 2b 3d 31 0d 02 a9 35  |.Y%<>0.U%+=1...5|
000066f0  fd 59 25 3d 30 3a d9 23  46 25 3a 46 25 3d 30 3a  |.Y%=0:.#F%:F%=0:|
00006700  4d 79 25 3d 55 25 3a e7  4d 79 25 3e 30 80 4d 79  |My%=U%:.My%>0.My|
00006710  25 3c 3e 72 25 8c 5f 25  3d a3 3a 4a 25 3d 44 4a  |%<>r%._%=.:J%=DJ|
00006720  25 0d 02 aa 05 ed 0d 02  ab 0b cd 3a e7 ac 5f 25  |%..........:.._%|
00006730  8c 0d 02 ac 9f 4d 24 3d  22 59 6f 75 20 77 69 6c  |.....M$="You wil|
00006740  6c 20 6e 65 65 64 20 74  6f 20 64 65 6c 65 74 65  |l need to delete|
00006750  20 61 6e 79 20 64 61 74  61 20 66 69 6c 65 73 2c  | any data files,|
00006760  22 3a 4d 24 2b 3d 22 69  6e 20 74 68 65 20 27 4c  |":M$+="in the 'L|
00006770  69 62 72 61 72 79 2e 44  61 74 61 2e 27 20 64 69  |ibrary.Data.' di|
00006780  72 65 63 74 6f 72 79 2c  22 3a 4d 24 2b 3d 22 62  |rectory,":M$+="b|
00006790  65 66 6f 72 65 20 72 75  6e 6e 69 6e 67 20 74 68  |efore running th|
000067a0  69 73 20 76 65 72 73 69  6f 6e 20 6f 66 20 4d 65  |is version of Me|
000067b0  6e 75 42 61 72 22 3a 7a  25 3d a4 53 28 4d 24 2c  |nuBar":z%=.S(M$,|
000067c0  22 43 61 6e 63 65 6c 22  2c 32 29 3a f2 4e 3a e0  |"Cancel",2):.N:.|
000067d0  0d 02 ad 07 cd 3a e1 0d  02 ae 36 dd a4 4c 79 3a  |.....:....6..Ly:|
000067e0  ea 4a 25 2c 5a 24 2c 57  79 25 2c 58 24 3a 58 24  |.J%,Z$,Wy%,X$:X$|
000067f0  3d 22 22 3a 5a 24 3d 55  24 2b 22 2e 44 65 66 61  |="":Z$=U$+".Defa|
00006800  75 6c 74 22 3a e7 a4 5a  28 5a 24 29 8c 0d 02 af  |ult":..Z(Z$)....|
00006810  1e 46 25 3d 8e 28 5a 24  29 3a 58 24 3d be 23 46  |.F%=.(Z$):X$=.#F|
00006820  25 3a d9 23 46 25 3a 46  25 3d 30 0d 02 b0 26 cd  |%:.#F%:F%=0...&.|
00006830  3a 57 79 25 3d a3 3a e3  4a 25 3d 31 b8 43 79 25  |:Wy%=.:.J%=1.Cy%|
00006840  3a e7 41 24 28 4a 25 29  3d 58 24 8c 57 79 25 3d  |:.A$(J%)=X$.Wy%=|
00006850  b9 0d 02 b1 11 ed 3a e7  ac 57 79 25 8c 58 24 3d  |......:..Wy%.X$=|
00006860  22 22 0d 02 b2 07 3d 58  24 0d 02 b3 99 dd f2 53  |""....=X$......S|
00006870  79 3a ea 4a 25 2c 53 5f  25 3a e3 4a 25 3d 31 b8  |y:.J%,S_%:.J%=1.|
00006880  72 25 3a 53 5f 25 3d 41  25 28 4a 25 29 3a 41 25  |r%:S_%=A%(J%):A%|
00006890  21 30 3d 53 5f 25 3a c8  99 26 34 30 30 43 43 2c  |!0=S_%:..&400CC,|
000068a0  2c 41 25 3a c8 99 26 34  30 30 43 33 2c 2c 41 25  |,A%:..&400C3,,A%|
000068b0  3a ed 3a 77 25 3d 35 3a  5f 25 3d a4 5f 28 56 4a  |:.:w%=5:_%=._(VJ|
000068c0  25 2b 4d 75 25 2b 6a 4a  25 29 3a 54 25 3d 53 25  |%+Mu%+jJ%):T%=S%|
000068d0  3a 6b 79 25 3d 30 3a 47  4a 25 3d 2d 31 3a e3 4a  |:ky%=0:GJ%=-1:.J|
000068e0  25 3d 44 25 b8 54 25 2d  34 88 34 3a 21 4a 25 3d  |%=D%.T%-4.4:!J%=|
000068f0  30 3a ed 3a e3 4a 25 3d  31 b8 4d 79 25 3a c8 8e  |0:.:.J%=1.My%:..|
00006900  b9 ca 0d 02 b4 10 c9 4a  25 83 32 3d 30 3a 56 25  |.......J%.2=0:V%|
00006910  3d 31 0d 02 b5 09 7f 56  25 3d 30 0d 02 b6 26 cb  |=1.....V%=0...&.|
00006920  3a f2 44 79 28 4a 25 2c  56 25 29 3a f2 51 28 4a  |:.Dy(J%,V%):.Q(J|
00006930  25 2c 30 29 3a f2 58 28  4a 25 2c 30 29 3a ed 3a  |%,0):.X(J%,0):.:|
00006940  e1 0d 02 b7 26 dd f2 5a  79 3a ea 5a 24 3a 5a 24  |....&..Zy:.Z$:Z$|
00006950  3d 55 24 2b 22 2e 53 70  72 69 74 65 73 22 3a e7  |=U$+".Sprites":.|
00006960  a4 5a 28 5a 24 29 8c 0d  02 b8 18 ff 28 22 49 63  |.Z(Z$)......("Ic|
00006970  6f 6e 53 70 72 69 74 65  73 20 22 2b 5a 24 29 0d  |onSprites "+Z$).|
00006980  02 b9 07 cd 3a e1 0d 02  ba 31 dd f2 48 79 3a ea  |....:....1..Hy:.|
00006990  5a 24 3a 5a 24 3d 55 24  2b 22 2e 53 79 73 56 61  |Z$:Z$=U$+".SysVa|
000069a0  72 73 22 3a e7 a4 5a 28  5a 24 29 8c c8 99 26 34  |rs":..Z(Z$)...&4|
000069b0  30 30 44 45 2c 5a 24 0d  02 bb 05 e1 0d 02 bc 65  |00DE,Z$........e|
000069c0  dd a4 48 79 28 68 25 2c  52 79 25 2c 51 24 29 3a  |..Hy(h%,Ry%,Q$):|
000069d0  ea 58 25 2c 55 25 2c 5a  25 3a 58 25 3d a4 4d 28  |.X%,U%,Z%:X%=.M(|
000069e0  68 25 29 3a 55 25 3d 31  3a f5 3a 41 24 3d a4 72  |h%):U%=1:.:A$=.r|
000069f0  28 68 25 2c 52 79 25 2c  55 25 29 3a 55 25 2b 3d  |(h%,Ry%,U%):U%+=|
00006a00  31 3a fd 41 24 3d 51 24  84 55 25 3e 58 25 3a e7  |1:.A$=Q$.U%>X%:.|
00006a10  41 24 3d 51 24 8c 5a 25  3d 55 25 8b 5a 25 3d 2d  |A$=Q$.Z%=U%.Z%=-|
00006a20  31 0d 02 bd 07 3d 5a 25  0d 02 be 35 dd a4 43 28  |1....=Z%...5..C(|
00006a30  47 25 2c 70 25 29 3a ea  51 25 2c 41 24 3a 51 25  |G%,p%):.Q%,A$:Q%|
00006a40  3d a4 46 28 47 25 29 3a  41 24 3d a4 72 28 51 25  |=.F(G%):A$=.r(Q%|
00006a50  2c 51 25 2b 31 2c 70 25  29 3a 3d 41 24 0d 02 bf  |,Q%+1,p%):=A$...|
00006a60  13 dd a4 46 28 47 25 29  3a 3d 47 25 2a 32 2d 31  |...F(G%):=G%*2-1|
00006a70  0d 02 c0 43 dd a4 72 28  68 25 2c 52 79 25 2c 76  |...C..r(h%,Ry%,v|
00006a80  5f 25 29 3a ea 5a 79 25  2c 60 79 25 3a 5a 79 25  |_%):.Zy%,`y%:Zy%|
00006a90  3d a4 47 28 52 79 25 29  3a 60 79 25 3d a4 59 28  |=.G(Ry%):`y%=.Y(|
00006aa0  68 25 2c 76 5f 25 29 3a  3d 24 28 5a 79 25 2b 60  |h%,v_%):=$(Zy%+`|
00006ab0  79 25 29 0d 02 c1 1c dd  a4 59 28 51 25 2c 5a 25  |y%)......Y(Q%,Z%|
00006ac0  29 3a ea 5a 79 25 3a e7  5a 25 3d 30 8c 3d 30 0d  |):.Zy%:.Z%=0.=0.|
00006ad0  02 c2 1d 5a 79 25 3d a4  47 28 51 25 29 2b 28 5a  |...Zy%=.G(Q%)+(Z|
00006ae0  25 2d 31 29 2a 34 3a 3d  21 5a 79 25 0d 02 c3 62  |%-1)*4:=!Zy%...b|
00006af0  dd f2 4c 5f 28 41 24 2c  51 25 29 3a ea 4a 25 2c  |..L_(A$,Q%):.J%,|
00006b00  65 25 2c 6e 25 2c 4e 79  25 2c 42 79 25 2c 4e 25  |e%,n%,Ny%,By%,N%|
00006b10  3a 65 25 3d a9 41 24 2b  31 3a 6e 25 3d a4 47 28  |:e%=.A$+1:n%=.G(|
00006b20  51 25 29 2b a4 4c 28 51  25 29 3a 42 79 25 3d 54  |Q%)+.L(Q%):By%=T|
00006b30  25 2d 6e 25 3a 4e 79 25  3d 6e 25 2b 65 25 3a 5f  |%-n%:Ny%=n%+e%:_|
00006b40  25 3d a4 6e 28 65 25 29  3a e7 ac 5f 25 8c 0d 02  |%=.n(e%):.._%...|
00006b50  c4 36 4d 24 3d 22 4e 6f  20 72 6f 6f 6d 20 74 6f  |.6M$="No room to|
00006b60  20 65 78 74 65 6e 64 20  64 61 74 61 22 3a 7a 25  | extend data":z%|
00006b70  3d a4 53 28 4d 24 2c 22  43 61 6e 63 65 6c 22 2c  |=.S(M$,"Cancel",|
00006b80  33 29 3a e1 0d 02 c5 58  cd 3a f2 71 28 6e 25 2c  |3):....X.:.q(n%,|
00006b90  4e 79 25 2c 42 79 25 29  3a 54 25 2b 3d 65 25 3a  |Ny%,By%):T%+=e%:|
00006ba0  24 6e 25 3d 41 24 3a 4e  25 3d a4 4d 28 51 25 29  |$n%=A$:N%=.M(Q%)|
00006bb0  3a f2 51 28 51 25 2c 4e  25 2b 31 29 3a 4e 25 3d  |:.Q(Q%,N%+1):N%=|
00006bc0  a4 4c 28 51 25 29 3a f2  58 28 51 25 2c 4e 25 2b  |.L(Q%):.X(Q%,N%+|
00006bd0  65 25 29 3a e7 51 25 3c  4d 79 25 8c 0d 02 c6 29  |e%):.Q%<My%....)|
00006be0  e3 4a 25 3d 51 25 2b 31  b8 4d 79 25 3a 4e 25 3d  |.J%=Q%+1.My%:N%=|
00006bf0  a4 48 28 4a 25 29 3a f2  54 28 4a 25 2c 4e 25 2b  |.H(J%):.T(J%,N%+|
00006c00  65 25 29 3a ed 0d 02 c7  07 cd 3a e1 0d 02 c8 62  |e%):......:....b|
00006c10  dd f2 64 79 28 67 25 2c  51 25 2c 5a 25 29 3a ea  |..dy(g%,Q%,Z%):.|
00006c20  4a 25 2c 65 25 2c 6e 25  2c 4e 79 25 2c 42 79 25  |J%,e%,n%,Ny%,By%|
00006c30  2c 4e 25 3a 65 25 3d 34  3a 6e 25 3d a4 47 28 51  |,N%:e%=4:n%=.G(Q|
00006c40  25 29 2b 28 5a 25 2a 65  25 29 3a 42 79 25 3d 54  |%)+(Z%*e%):By%=T|
00006c50  25 2d 6e 25 3a 4e 79 25  3d 6e 25 2b 65 25 3a 5f  |%-n%:Ny%=n%+e%:_|
00006c60  25 3d a4 6e 28 65 25 29  3a e7 ac 5f 25 8c 0d 02  |%=.n(e%):.._%...|
00006c70  c9 36 4d 24 3d 22 4e 6f  20 72 6f 6f 6d 20 74 6f  |.6M$="No room to|
00006c80  20 65 78 74 65 6e 64 20  64 61 74 61 22 3a 7a 25  | extend data":z%|
00006c90  3d a4 53 28 4d 24 2c 22  43 61 6e 63 65 6c 22 2c  |=.S(M$,"Cancel",|
00006ca0  33 29 3a e1 0d 02 ca 58  cd 3a f2 71 28 6e 25 2c  |3):....X.:.q(n%,|
00006cb0  4e 79 25 2c 42 79 25 29  3a 54 25 2b 3d 65 25 3a  |Ny%,By%):T%+=e%:|
00006cc0  21 6e 25 3d 67 25 3a 4e  25 3d a4 4d 28 51 25 29  |!n%=g%:N%=.M(Q%)|
00006cd0  3a f2 51 28 51 25 2c 4e  25 2b 31 29 3a 4e 25 3d  |:.Q(Q%,N%+1):N%=|
00006ce0  a4 4c 28 51 25 29 3a f2  58 28 51 25 2c 4e 25 2b  |.L(Q%):.X(Q%,N%+|
00006cf0  65 25 29 3a e7 51 25 3c  4d 79 25 8c 0d 02 cb 29  |e%):.Q%<My%....)|
00006d00  e3 4a 25 3d 51 25 2b 31  b8 4d 79 25 3a 4e 25 3d  |.J%=Q%+1.My%:N%=|
00006d10  a4 48 28 4a 25 29 3a f2  54 28 4a 25 2c 4e 25 2b  |.H(J%):.T(J%,N%+|
00006d20  65 25 29 3a ed 0d 02 cc  07 cd 3a e1 0d 02 cd e1  |e%):......:.....|
00006d30  dd f2 6a 5f 28 68 25 2c  52 79 25 2c 76 5f 25 29  |..j_(h%,Ry%,v_%)|
00006d40  3a ea 4a 25 2c 65 25 2c  6e 25 2c 4e 79 25 2c 42  |:.J%,e%,n%,Ny%,B|
00006d50  79 25 2c 4e 25 2c 57 25  2c 51 25 2c 67 25 2c 41  |y%,N%,W%,Q%,g%,A|
00006d60  24 3a 41 24 3d a4 72 28  68 25 2c 52 79 25 2c 76  |$:A$=.r(h%,Ry%,v|
00006d70  5f 25 29 3a 52 5f 25 3d  a9 41 24 2b 31 3a 60 79  |_%):R_%=.A$+1:`y|
00006d80  25 3d a4 59 28 68 25 2c  76 5f 25 29 3a 4e 79 25  |%=.Y(h%,v_%):Ny%|
00006d90  3d a4 47 28 52 79 25 29  2b a4 59 28 68 25 2c 76  |=.G(Ry%)+.Y(h%,v|
00006da0  5f 25 29 3a 6e 25 3d 4e  79 25 2b 52 5f 25 3a 42  |_%):n%=Ny%+R_%:B|
00006db0  79 25 3d 54 25 2d 6e 25  3a f2 71 28 6e 25 2c 4e  |y%=T%-n%:.q(n%,N|
00006dc0  79 25 2c 42 79 25 29 3a  54 25 2d 3d 52 5f 25 3a  |y%,By%):T%-=R_%:|
00006dd0  51 25 3d 52 79 25 3a 4e  25 3d a4 4d 28 51 25 29  |Q%=Ry%:N%=.M(Q%)|
00006de0  3a f2 51 28 51 25 2c 4e  25 2d 31 29 3a 4e 25 3d  |:.Q(Q%,N%-1):N%=|
00006df0  a4 4c 28 51 25 29 3a f2  58 28 51 25 2c 4e 25 2d  |.L(Q%):.X(Q%,N%-|
00006e00  52 5f 25 29 3a e7 51 25  3c 4d 79 25 8c 0d 02 ce  |R_%):.Q%<My%....|
00006e10  2a e3 4a 25 3d 51 25 2b  31 b8 4d 79 25 3a 4e 25  |*.J%=Q%+1.My%:N%|
00006e20  3d a4 48 28 4a 25 29 3a  f2 54 28 4a 25 2c 4e 25  |=.H(J%):.T(J%,N%|
00006e30  2d 52 5f 25 29 3a ed 0d  02 cf 83 cd 3a 51 25 3d  |-R_%):......:Q%=|
00006e40  68 25 3a 65 25 3d 34 3a  6e 25 3d a4 47 28 51 25  |h%:e%=4:n%=.G(Q%|
00006e50  29 2b 28 76 5f 25 2a 65  25 29 3a 4e 79 25 3d 6e  |)+(v_%*e%):Ny%=n|
00006e60  25 2d 65 25 3a 42 79 25  3d 54 25 2d 6e 25 3a f2  |%-e%:By%=T%-n%:.|
00006e70  71 28 6e 25 2c 4e 79 25  2c 42 79 25 29 3a 54 25  |q(n%,Ny%,By%):T%|
00006e80  2d 3d 65 25 3a 4e 25 3d  a4 4d 28 51 25 29 3a f2  |-=e%:N%=.M(Q%):.|
00006e90  51 28 51 25 2c 4e 25 2d  31 29 3a 4e 25 3d a4 4c  |Q(Q%,N%-1):N%=.L|
00006ea0  28 51 25 29 3a f2 58 28  51 25 2c 4e 25 2d 65 25  |(Q%):.X(Q%,N%-e%|
00006eb0  29 3a e7 51 25 3c 4d 79  25 8c 0d 02 d0 29 e3 4a  |):.Q%<My%....).J|
00006ec0  25 3d 51 25 2b 31 b8 4d  79 25 3a 4e 25 3d a4 48  |%=Q%+1.My%:N%=.H|
00006ed0  28 4a 25 29 3a f2 54 28  4a 25 2c 4e 25 2d 65 25  |(J%):.T(J%,N%-e%|
00006ee0  29 3a ed 0d 02 d1 20 cd  3a 67 25 3d a4 4d 28 51  |):.... .:g%=.M(Q|
00006ef0  25 29 3a 57 25 3d a4 47  28 51 25 29 3a e7 67 25  |%):W%=.G(Q%):.g%|
00006f00  3e 30 8c 0d 02 d2 21 e3  4a 25 3d 31 b8 67 25 3a  |>0....!.J%=1.g%:|
00006f10  e7 21 57 25 3e 60 79 25  8c 21 57 25 3d 21 57 25  |.!W%>`y%.!W%=!W%|
00006f20  2d 52 5f 25 0d 02 d3 0c  57 25 2b 3d 65 25 3a ed  |-R_%....W%+=e%:.|
00006f30  0d 02 d4 07 cd 3a e1 0d  02 d5 7b dd f2 57 79 28  |.....:....{..Wy(|
00006f40  51 25 29 3a ea 4a 25 2c  65 25 2c 4e 79 25 2c 6e  |Q%):.J%,e%,Ny%,n|
00006f50  25 2c 42 79 25 2c 4e 25  3a 65 25 3d a4 4c 28 51  |%,By%,N%:e%=.L(Q|
00006f60  25 29 3a 4e 79 25 3d a4  47 28 51 25 29 3a 6e 25  |%):Ny%=.G(Q%):n%|
00006f70  3d 4e 79 25 2b 65 25 3a  42 79 25 3d 54 25 2d 6e  |=Ny%+e%:By%=T%-n|
00006f80  25 3a f2 71 28 6e 25 2c  4e 79 25 2c 42 79 25 29  |%:.q(n%,Ny%,By%)|
00006f90  3a 54 25 2d 3d 65 25 3a  f2 51 28 51 25 2c 30 29  |:T%-=e%:.Q(Q%,0)|
00006fa0  3a f2 58 28 51 25 2c 30  29 3a e7 51 25 3c 4d 79  |:.X(Q%,0):.Q%<My|
00006fb0  25 8c 0d 02 d6 29 e3 4a  25 3d 51 25 2b 31 b8 4d  |%....).J%=Q%+1.M|
00006fc0  79 25 3a 4e 25 3d a4 48  28 4a 25 29 3a f2 54 28  |y%:N%=.H(J%):.T(|
00006fd0  4a 25 2c 4e 25 2d 65 25  29 3a ed 0d 02 d7 07 cd  |J%,N%-e%):......|
00006fe0  3a e1 0d 02 d8 1b dd f2  71 28 6e 25 2c 4e 79 25  |:.......q(n%,Ny%|
00006ff0  2c 42 79 25 29 3a e7 42  79 25 3e 30 8c 0d 02 d9  |,By%):.By%>0....|
00007000  1f c8 99 26 34 30 30 46  31 2c 58 4a 25 2c 6e 25  |...&400F1,XJ%,n%|
00007010  2c 58 4a 25 2c 4e 79 25  2c 42 79 25 0d 02 da 07  |,XJ%,Ny%,By%....|
00007020  cd 3a e1 0d 02 db 18 dd  a4 64 28 57 25 29 3d 3f  |.:.......d(W%)=?|
00007030  57 25 2a 32 35 36 2b 57  25 3f 31 0d 02 dc 1d dd  |W%*256+W%?1.....|
00007040  a4 48 28 51 25 29 3d a4  64 28 50 25 2b 28 51 25  |.H(Q%)=.d(P%+(Q%|
00007050  2d 31 29 2a 38 2b 32 29  0d 02 dd 1d dd a4 4d 28  |-1)*8+2)......M(|
00007060  51 25 29 3d a4 64 28 50  25 2b 28 51 25 2d 31 29  |Q%)=.d(P%+(Q%-1)|
00007070  2a 38 2b 34 29 0d 02 de  1d dd a4 4c 28 51 25 29  |*8+4)......L(Q%)|
00007080  3d a4 64 28 50 25 2b 28  51 25 2d 31 29 2a 38 2b  |=.d(P%+(Q%-1)*8+|
00007090  36 29 0d 02 df 15 dd a4  47 28 51 25 29 3d 53 25  |6)......G(Q%)=S%|
000070a0  2b a4 48 28 51 25 29 0d  02 e0 26 dd f2 65 28 4e  |+.H(Q%)...&..e(N|
000070b0  25 2c 57 25 29 3f 57 25  3d 4e 25 81 32 35 36 3a  |%,W%)?W%=N%.256:|
000070c0  57 25 3f 31 3d 4e 25 83  32 35 36 3a e1 0d 02 e1  |W%?1=N%.256:....|
000070d0  23 dd f2 44 79 28 51 25  2c 56 25 29 f2 65 28 56  |#..Dy(Q%,V%).e(V|
000070e0  25 2c 50 25 2b 28 51 25  2d 31 29 2a 38 29 3a e1  |%,P%+(Q%-1)*8):.|
000070f0  0d 02 e2 26 dd f2 54 28  51 25 2c 60 79 25 29 f2  |...&..T(Q%,`y%).|
00007100  65 28 60 79 25 2c 50 25  2b 28 51 25 2d 31 29 2a  |e(`y%,P%+(Q%-1)*|
00007110  38 2b 32 29 3a e1 0d 02  e3 24 dd f2 51 28 51 25  |8+2):....$..Q(Q%|
00007120  2c 58 25 29 f2 65 28 58  25 2c 50 25 2b 28 51 25  |,X%).e(X%,P%+(Q%|
00007130  2d 31 29 2a 38 2b 34 29  3a e1 0d 02 e4 24 dd f2  |-1)*8+4):....$..|
00007140  58 28 51 25 2c 65 25 29  f2 65 28 65 25 2c 50 25  |X(Q%,e%).e(e%,P%|
00007150  2b 28 51 25 2d 31 29 2a  38 2b 36 29 3a e1 0d 02  |+(Q%-1)*8+6):...|
00007160  e5 24 dd a4 77 3a ea 6e  6c 25 3a c8 99 26 34 30  |.$..w:.nl%:..&40|
00007170  30 45 43 2c 2d 31 2c 2d  31 b8 6e 6c 25 3a 3d 6e  |0EC,-1,-1.nl%:=n|
00007180  6c 25 0d 02 e6 38 dd a4  5f 28 42 79 25 29 3a ea  |l%...8.._(By%):.|
00007190  64 25 2c 5f 25 3a 5f 25  3d b9 3a c8 99 26 34 30  |d%,_%:_%=.:..&40|
000071a0  30 45 43 2c 42 79 25 2c  2d 31 b8 64 25 3a e7 64  |0EC,By%,-1.d%:.d|
000071b0  25 3c 42 79 25 8c 5f 25  3d a3 0d 02 e7 07 3d 5f  |%<By%._%=.....=_|
000071c0  25 0d 02 e8 1d dd a4 6e  28 42 79 25 29 3a e7 28  |%......n(By%):.(|
000071d0  a4 6c 2d 54 25 29 3e 3d  42 79 25 8c 3d b9 0d 02  |.l-T%)>=By%.=...|
000071e0  e9 0f 3d a4 5f 28 a4 77  2b 42 79 25 29 0d 02 ea  |..=._(.w+By%)...|
000071f0  10 dd a4 6c 3d 26 38 30  30 30 2b a4 77 0d 02 eb  |...l=&8000+.w...|
00007200  0b dd a4 51 79 3d 54 25  0d 02 ec 0f dd a4 52 79  |...Qy=T%......Ry|
00007210  3d a4 6c 2d a4 51 79 0d  02 ed 38 dd f2 6f 28 4d  |=.l-.Qy...8..o(M|
00007220  25 29 3a 41 25 21 30 3d  4d 25 3a c8 99 26 34 30  |%):A%!0=M%:..&40|
00007230  30 43 42 2c 2c 41 25 3a  41 25 21 32 38 3d 2d 31  |0CB,,A%:A%!28=-1|
00007240  3a c8 99 26 34 30 30 43  35 2c 2c 41 25 3a e1 0d  |:..&400C5,,A%:..|
00007250  02 ee 12 dd f2 46 79 28  4d 25 29 3a c8 8e 4d 25  |.....Fy(M%):..M%|
00007260  ca 0d 02 ef 25 c9 67 5f  25 2c 71 5f 25 2c 4e 75  |....%.g_%,q_%,Nu|
00007270  25 2c 4b 5f 25 2c 4c 79  25 3a c8 99 26 34 30 30  |%,K_%,Ly%:..&400|
00007280  43 35 2c 2c 41 25 0d 02  f0 07 cb 3a e1 0d 02 f1  |C5,,A%.....:....|
00007290  21 dd f2 47 28 4d 25 29  3a 21 41 25 3d 4d 25 3a  |!..G(M%):!A%=M%:|
000072a0  c8 99 26 34 30 30 43 36  2c 2c 41 25 3a e1 0d 02  |..&400C6,,A%:...|
000072b0  f2 f5 dd f2 47 79 28 4d  25 29 3a 41 25 21 30 3d  |....Gy(M%):A%!0=|
000072c0  4d 25 3a c8 99 26 34 30  30 43 42 2c 2c 41 25 3a  |M%:..&400CB,,A%:|
000072d0  c8 99 35 33 2c 2d 31 2c  26 42 b8 2c 2c 59 4a 25  |..53,-1,&B.,,YJ%|
000072e0  3a c8 99 35 33 2c 2d 31  2c 34 b8 2c 2c 50 4a 25  |:..53,-1,4.,,PJ%|
000072f0  3a c8 99 35 33 2c 2d 31  2c 26 43 b8 2c 2c 75 4a  |:..53,-1,&C.,,uJ|
00007300  25 3a c8 99 35 33 2c 2d  31 2c 35 b8 2c 2c 7a 5f  |%:..53,-1,5.,,z_|
00007310  25 3a 59 4a 25 3d 59 4a  25 3c 3c 50 4a 25 3a 75  |%:YJ%=YJ%<<PJ%:u|
00007320  4a 25 3d 75 4a 25 3c 3c  7a 5f 25 3a 50 4a 25 3d  |J%=uJ%<<z_%:PJ%=|
00007330  41 25 21 26 43 2d 41 25  21 34 3a 7a 5f 25 3d 41  |A%!&C-A%!4:z_%=A|
00007340  25 21 31 36 2d 41 25 21  38 3a 41 25 21 34 3d 28  |%!16-A%!8:A%!4=(|
00007350  59 4a 25 2d 50 4a 25 29  3e 3e 31 3a 41 25 21 38  |YJ%-PJ%)>>1:A%!8|
00007360  3d 28 75 4a 25 2d 7a 5f  25 29 3e 3e 31 3a 41 25  |=(uJ%-z_%)>>1:A%|
00007370  21 26 43 3d 41 25 21 34  2b 50 4a 25 3a 41 25 21  |!&C=A%!4+PJ%:A%!|
00007380  31 36 3d 41 25 21 38 2b  7a 5f 25 3a 41 25 21 32  |16=A%!8+z_%:A%!2|
00007390  38 3d 2d 31 3a c8 99 26  34 30 30 43 35 2c 2c 41  |8=-1:..&400C5,,A|
000073a0  25 3a e1 0d 02 f3 44 dd  f2 4f 28 4d 25 29 3a 41  |%:....D..O(M%):A|
000073b0  25 21 30 3d 4d 25 3a c8  99 26 34 30 30 43 42 2c  |%!0=M%:..&400CB,|
000073c0  2c 41 25 3a c8 99 26 34  30 30 44 31 2c 2d 31 2c  |,A%:..&400D1,-1,|
000073d0  41 25 21 34 2c 41 25 21  38 2c 41 25 21 26 43 2c  |A%!4,A%!8,A%!&C,|
000073e0  41 25 21 31 36 3a e1 0d  02 f4 2f dd a4 59 79 28  |A%!16:..../..Yy(|
000073f0  4d 25 29 3a 21 43 25 3d  4d 25 3a c8 99 26 34 30  |M%):!C%=M%:..&40|
00007400  30 43 42 2c 2c 43 25 3a  3d a4 50 79 28 43 25 21  |0CB,,C%:=.Py(C%!|
00007410  33 32 2c 32 30 29 0d 02  f5 2d dd a4 6b 28 4d 25  |32,20)...-..k(M%|
00007420  29 3a 43 25 21 30 3d 4d  25 3a c8 99 26 34 30 30  |):C%!0=M%:..&400|
00007430  43 42 2c 2c 43 25 3a 3d  43 25 21 33 32 80 36 35  |CB,,C%:=C%!32.65|
00007440  35 33 36 0d 02 f6 3a dd  a4 50 79 28 67 25 2c 59  |536...:..Py(g%,Y|
00007450  25 29 3a ea 4e 25 2c 54  75 25 3a 54 75 25 3d 31  |%):.N%,Tu%:Tu%=1|
00007460  3c 3c 59 25 3a 4e 25 3d  28 67 25 80 54 75 25 29  |<<Y%:N%=(g%.Tu%)|
00007470  81 54 75 25 3a e7 4e 25  3d 30 8c 3d a3 0d 02 f7  |.Tu%:.N%=0.=....|
00007480  06 3d b9 0d 02 f8 8c dd  f2 6e 28 4d 25 2c 4f 25  |.=.......n(M%,O%|
00007490  2c 74 25 29 3a ea 62 25  2c 71 79 25 3a 41 25 21  |,t%):.b%,qy%:A%!|
000074a0  30 3d 4d 25 3a c8 99 26  34 30 30 43 42 2c 2c 41  |0=M%:..&400CB,,A|
000074b0  25 3a 41 25 21 32 38 3d  2d 31 3a 62 25 3d 41 25  |%:A%!28=-1:b%=A%|
000074c0  21 26 43 2d 41 25 21 34  3a 71 79 25 3d 41 25 21  |!&C-A%!4:qy%=A%!|
000074d0  31 36 2d 41 25 21 38 3a  41 25 21 34 3d 4f 25 3a  |16-A%!8:A%!4=O%:|
000074e0  41 25 21 38 3d 74 25 2d  71 79 25 3a 41 25 21 26  |A%!8=t%-qy%:A%!&|
000074f0  43 3d 4f 25 2b 62 25 3a  41 25 21 31 36 3d 74 25  |C=O%+b%:A%!16=t%|
00007500  3a c8 99 26 34 30 30 43  35 2c 2c 41 25 3a e1 0d  |:..&400C5,,A%:..|
00007510  02 f9 2c dd f2 74 79 28  4d 25 29 3a c8 99 26 34  |..,..ty(M%):..&4|
00007520  30 30 43 46 2c 2c 41 25  3a f2 6e 28 4d 25 2c 41  |00CF,,A%:.n(M%,A|
00007530  25 21 30 2c 41 25 21 34  29 3a e1 0d 02 fa fc dd  |%!0,A%!4):......|
00007540  a4 60 28 6c 79 25 2c 74  5f 25 2c 4e 4a 25 2c 51  |.`(ly%,t_%,NJ%,Q|
00007550  4a 25 2c 77 5f 25 2c 72  5f 25 2c 42 25 2c 6d 25  |J%,w_%,r_%,B%,m%|
00007560  2c 53 4a 25 2c 65 5f 25  2c 46 4a 25 2c 43 4a 25  |,SJ%,e_%,FJ%,CJ%|
00007570  2c 49 24 29 3a 24 41 25  3d c4 38 38 2c bd 30 29  |,I$):$A%=.88,.0)|
00007580  3a 41 25 21 30 3d 6c 79  25 3a 41 25 21 34 3d 74  |:A%!0=ly%:A%!4=t|
00007590  5f 25 3a 41 25 21 38 3d  4e 4a 25 3a 41 25 21 26  |_%:A%!8=NJ%:A%!&|
000075a0  43 3d 51 4a 25 3a 41 25  21 31 36 3d 77 5f 25 3a  |C=QJ%:A%!16=w_%:|
000075b0  41 25 21 32 30 3d 72 5f  25 3a 41 25 21 32 34 3d  |A%!20=r_%:A%!24=|
000075c0  2d 31 3a 41 25 21 32 38  3d 42 25 3a 41 25 3f 33  |-1:A%!28=B%:A%?3|
000075d0  32 3d 37 3a 41 25 3f 33  33 3d 32 3a 41 25 3f 33  |2=7:A%?33=2:A%?3|
000075e0  34 3d 37 3a 41 25 3f 33  35 3d 6d 25 3a 41 25 3f  |4=7:A%?35=m%:A%?|
000075f0  33 36 3d 33 3a 41 25 3f  33 37 3d 31 3a 41 25 3f  |36=3:A%?37=1:A%?|
00007600  33 38 3d 26 43 3a 41 25  21 34 30 3d 53 4a 25 3a  |38=&C:A%!40=SJ%:|
00007610  41 25 21 34 34 3d 2d 65  5f 25 3a 41 25 21 34 38  |A%!44=-e_%:A%!48|
00007620  3d 46 4a 25 3a 41 25 21  35 32 3d 43 4a 25 3a 41  |=FJ%:A%!52=CJ%:A|
00007630  25 21 35 36 3d 36 31 0d  02 fb 63 41 25 21 36 30  |%!56=61...cA%!60|
00007640  3d 26 36 30 30 30 3a 41  25 21 36 34 3d 74 79 25  |=&6000:A%!64=ty%|
00007650  3a 41 25 3f 36 38 3d 30  3a 41 25 3f 36 39 3d 30  |:A%?68=0:A%?69=0|
00007660  3a 41 25 3f 37 30 3d 30  3a 41 25 3f 37 31 3d 30  |:A%?70=0:A%?71=0|
00007670  3a 24 28 41 25 2b 37 32  29 3d 49 24 3a 41 25 3f  |:$(A%+72)=I$:A%?|
00007680  38 34 3d 30 3a c8 99 26  34 30 30 43 31 2c 2c 41  |84=0:..&400C1,,A|
00007690  25 b8 44 75 25 3a 3d 44  75 25 0d 02 fc 68 dd f2  |%.Du%:=Du%...h..|
000076a0  53 28 4d 25 2c 48 25 2c  64 24 29 3a 43 25 21 30  |S(M%,H%,d$):C%!0|
000076b0  3d 4d 25 3a 43 25 21 34  3d 48 25 3a c8 99 26 34  |=M%:C%!4=H%:..&4|
000076c0  30 30 43 45 2c 2c 43 25  3a 24 28 43 25 21 32 38  |00CE,,C%:$(C%!28|
000076d0  29 3d 64 24 3a 43 25 21  30 3d 4d 25 3a 43 25 21  |)=d$:C%!0=M%:C%!|
000076e0  34 3d 48 25 3a 43 25 21  38 3d 30 3a 43 25 21 26  |4=H%:C%!8=0:C%!&|
000076f0  43 3d 30 3a c8 99 26 34  30 30 43 44 2c 2c 43 25  |C=0:..&400CD,,C%|
00007700  3a e1 0d 02 fd 35 dd a4  69 28 4d 25 2c 48 25 29  |:....5..i(M%,H%)|
00007710  3a 43 25 21 30 3d 4d 25  3a 43 25 21 34 3d 48 25  |:C%!0=M%:C%!4=H%|
00007720  3a c8 99 26 34 30 30 43  45 2c 2c 43 25 3a 3d 24  |:..&400CE,,C%:=$|
00007730  28 43 25 21 32 38 29 0d  02 fe 4b dd a4 42 28 4d  |(C%!28)...K..B(M|
00007740  25 2c 48 25 29 3a ea 4e  25 3a 43 25 21 30 3d 4d  |%,H%):.N%:C%!0=M|
00007750  25 3a 43 25 21 34 3d 48  25 3a c8 99 26 34 30 30  |%:C%!4=H%:..&400|
00007760  43 45 2c 2c 43 25 3a 4e  25 3d 28 28 43 25 21 32  |CE,,C%:N%=((C%!2|
00007770  34 29 3e 3e 32 31 29 80  31 3a e7 4e 25 3d 30 8c  |4)>>21).1:.N%=0.|
00007780  3d a3 0d 02 ff 06 3d b9  0d 03 00 44 dd f2 46 28  |=.....=....D..F(|
00007790  4d 25 2c 48 25 29 3a 43  25 21 30 3d 4d 25 3a 43  |M%,H%):C%!0=M%:C|
000077a0  25 21 34 3d 48 25 3a 43  25 21 38 3d 31 3c 3c 32  |%!4=H%:C%!8=1<<2|
000077b0  31 3a 43 25 21 26 43 3d  31 3c 3c 32 31 3a c8 99  |1:C%!&C=1<<21:..|
000077c0  26 34 30 30 43 44 2c 2c  43 25 3a e1 0d 03 01 40  |&400CD,,C%:....@|
000077d0  dd f2 57 28 4d 25 2c 48  25 29 3a 43 25 21 30 3d  |..W(M%,H%):C%!0=|
000077e0  4d 25 3a 43 25 21 34 3d  48 25 3a 43 25 21 38 3d  |M%:C%!4=H%:C%!8=|
000077f0  30 3a 43 25 21 26 43 3d  31 3c 3c 32 31 3a c8 99  |0:C%!&C=1<<21:..|
00007800  26 34 30 30 43 44 2c 2c  43 25 3a e1 0d 03 02 2e  |&400CD,,C%:.....|
00007810  dd f2 4c 79 28 4d 25 2c  48 25 29 3a e7 a4 42 28  |..Ly(M%,H%):..B(|
00007820  4d 25 2c 48 25 29 8c f2  57 28 4d 25 2c 48 25 29  |M%,H%)..W(M%,H%)|
00007830  8b f2 46 28 4d 25 2c 48  25 29 0d 03 03 05 e1 0d  |..F(M%,H%)......|
00007840  03 04 5c dd f2 4d 28 4d  25 2c 48 25 2c 55 69 25  |..\..M(M%,H%,Ui%|
00007850  29 3a ea 49 5f 25 2c 59  5f 25 3a 49 5f 25 3d 2d  |):.I_%,Y_%:I_%=-|
00007860  31 3a 59 5f 25 3d 55 69  25 3a 43 25 21 30 3d 4d  |1:Y_%=Ui%:C%!0=M|
00007870  25 3a 43 25 21 34 3d 48  25 3a 43 25 21 38 3d 59  |%:C%!4=H%:C%!8=Y|
00007880  5f 25 3a 43 25 21 26 43  3d 49 5f 25 3a c8 99 26  |_%:C%!&C=I_%:..&|
00007890  34 30 30 43 44 2c 2c 43  25 3a e1 0d 03 05 7d dd  |400CD,,C%:....}.|
000078a0  f2 4a 79 28 4d 25 2c 48  25 29 3a 43 25 21 30 3d  |.Jy(M%,H%):C%!0=|
000078b0  4d 25 3a 43 25 21 34 3d  48 25 3a c8 99 26 34 30  |M%:C%!4=H%:..&40|
000078c0  30 43 34 2c 2c 43 25 3a  c8 99 26 34 30 30 45 30  |0C4,,C%:..&400E0|
000078d0  2c 2c 43 25 3a 63 4a 25  3d 43 25 21 34 3a 76 79  |,,C%:cJ%=C%!4:vy|
000078e0  25 3d 43 25 21 38 3a 55  75 25 3d 43 25 21 26 43  |%=C%!8:Uu%=C%!&C|
000078f0  3a 4e 5f 25 3d 43 25 21  31 36 3a c8 99 26 34 30  |:N_%=C%!16:..&40|
00007900  30 44 31 2c 2d 31 2c 63  4a 25 2c 76 79 25 2c 55  |0D1,-1,cJ%,vy%,U|
00007910  75 25 2c 4e 5f 25 3a e1  0d 03 06 5b dd f2 5a 28  |u%,N_%:....[..Z(|
00007920  4d 25 2c 48 25 2c 60 6c  25 29 3a 43 25 21 30 3d  |M%,H%,`l%):C%!0=|
00007930  4d 25 3a 43 25 21 34 3d  48 25 3a 59 5f 25 3d 60  |M%:C%!4=H%:Y_%=`|
00007940  6c 25 3c 3c 32 38 3a 49  5f 25 3d 26 46 3c 3c 32  |l%<<28:I_%=&F<<2|
00007950  38 3a 43 25 21 38 3d 59  5f 25 3a 43 25 21 26 43  |8:C%!8=Y_%:C%!&C|
00007960  3d 49 5f 25 3a c8 99 26  34 30 30 43 44 2c 2c 43  |=I_%:..&400CD,,C|
00007970  25 3a e1 0d 03 07 5b dd  f2 44 28 4d 25 2c 48 25  |%:....[..D(M%,H%|
00007980  2c 60 6c 25 29 3a 43 25  21 30 3d 4d 25 3a 43 25  |,`l%):C%!0=M%:C%|
00007990  21 34 3d 48 25 3a 59 5f  25 3d 60 6c 25 3c 3c 32  |!4=H%:Y_%=`l%<<2|
000079a0  34 3a 49 5f 25 3d 26 46  3c 3c 32 34 3a 43 25 21  |4:I_%=&F<<24:C%!|
000079b0  38 3d 59 5f 25 3a 43 25  21 26 43 3d 49 5f 25 3a  |8=Y_%:C%!&C=I_%:|
000079c0  c8 99 26 34 30 30 43 44  2c 2c 43 25 3a e1 0d 03  |..&400CD,,C%:...|
000079d0  08 78 dd a4 52 28 4d 25  2c 75 6c 25 2c 6a 6c 25  |.x..R(M%,ul%,jl%|
000079e0  2c 62 25 2c 71 79 25 2c  48 79 25 2c 64 24 2c 69  |,b%,qy%,Hy%,d$,i|
000079f0  6c 25 2c 49 69 25 2c 54  69 25 29 3a ea 48 25 3a  |l%,Ii%,Ti%):.H%:|
00007a00  43 25 21 30 3d 4d 25 3a  43 25 21 34 3d 75 6c 25  |C%!0=M%:C%!4=ul%|
00007a10  3a 43 25 21 38 3d 6a 6c  25 3a 43 25 21 26 43 3d  |:C%!8=jl%:C%!&C=|
00007a20  75 6c 25 2b 62 25 3a 43  25 21 31 36 3d 6a 6c 25  |ul%+b%:C%!16=jl%|
00007a30  2b 71 79 25 3a 43 25 21  32 30 3d 48 79 25 3a e7  |+qy%:C%!20=Hy%:.|
00007a40  69 6c 25 3d 30 8c 0d 03  09 0f 24 28 43 25 2b 32  |il%=0.....$(C%+2|
00007a50  34 29 3d 64 24 0d 03 0a  23 cc 3a 43 25 21 32 34  |4)=d$...#.:C%!24|
00007a60  3d 69 6c 25 3a 43 25 21  32 38 3d 49 69 25 3a 43  |=il%:C%!28=Ii%:C|
00007a70  25 21 33 32 3d 54 69 25  0d 03 0b 19 cd 3a c8 99  |%!32=Ti%.....:..|
00007a80  26 34 30 30 43 32 2c 2c  43 25 b8 48 25 3a 3d 48  |&400C2,,C%.H%:=H|
00007a90  25 0d 03 0c 21 dd f2 53  5f 3a c8 99 26 34 30 36  |%...!..S_:..&406|
00007aa0  43 32 3a e7 46 25 3e 30  8c d9 23 46 25 3a 46 25  |C2:.F%>0..#F%:F%|
00007ab0  3d 30 0d 03 0d 1b 85 a2  9f 2c f6 24 2b 22 20 61  |=0.......,.$+" a|
00007ac0  74 20 6c 69 6e 65 20 22  2b c3 9e 3a e1 0d 03 0e  |t line "+..:....|
00007ad0  3b dd f2 76 28 4e 25 29  3a ea 7a 25 2c 4d 24 2c  |;..v(N%):.z%,M$,|
00007ae0  41 24 3a c8 99 26 34 30  30 44 30 2c 2c 2d 31 3a  |A$:..&400D0,,-1:|
00007af0  c8 99 26 34 30 36 43 32  3a e7 46 25 3e 30 8c d9  |..&406C2:.F%>0..|
00007b00  23 46 25 3a 46 25 3d 30  0d 03 0f 09 e7 75 79 25  |#F%:F%=0.....uy%|
00007b10  8c 0d 03 10 50 75 79 25  3d a3 3a c8 99 36 2c 26  |....Puy%=.:..6,&|
00007b20  45 35 2c 31 2c 30 3a 41  24 3d 22 45 73 63 61 70  |E5,1,0:A$="Escap|
00007b30  65 20 70 72 65 73 73 65  64 20 2d 20 6f 70 65 72  |e pressed - oper|
00007b40  61 74 69 6f 6e 20 61 62  6f 72 74 65 64 22 3a 7a  |ation aborted":z|
00007b50  25 3d a4 53 28 41 24 2c  22 4f 4b 22 2c 31 29 3a  |%=.S(A$,"OK",1):|
00007b60  e1 0d 03 11 0b cd 3a c8  8e 4e 25 ca 0d 03 12 8b  |......:..N%.....|
00007b70  c9 30 3a 4d 24 3d 22 20  28 45 72 72 6f 72 20 22  |.0:M$=" (Error "|
00007b80  2b c3 9f 2b 22 3a 20 6c  69 6e 65 20 22 2b c3 9e  |+..+": line "+..|
00007b90  2b 22 29 20 22 3a 41 24  3d 22 4f 4b 20 74 6f 20  |+") ":A$="OK to |
00007ba0  63 6f 6e 74 69 6e 75 65  2c 20 43 41 4e 43 45 4c  |continue, CANCEL|
00007bb0  20 74 6f 20 6b 69 6c 6c  20 22 2b 47 24 3a 21 41  | to kill "+G$:!A|
00007bc0  25 3d 9f 3a 24 28 41 25  2b 34 29 3d f6 24 2b 4d  |%=.:$(A%+4)=.$+M|
00007bd0  24 2b 41 24 2b bd 30 3a  c8 99 26 34 30 30 44 46  |$+A$+.0:..&400DF|
00007be0  2c 41 25 2c 33 2c 47 24  b8 2c 7a 25 3a e7 7a 25  |,A%,3,G$.,z%:.z%|
00007bf0  3d 32 8c f2 4e 3a e0 0d  03 13 50 7f 3a 41 24 3d  |=2..N:....P.:A$=|
00007c00  f6 24 2b 22 2c 28 45 72  72 6f 72 20 22 2b c3 9f  |.$+",(Error "+..|
00007c10  2b 22 3a 20 6c 69 6e 65  20 22 2b c3 9e 2b 22 29  |+": line "+..+")|
00007c20  22 3a 7a 25 3d a4 53 28  41 24 2c 22 4f 4b 2c 4b  |":z%=.S(A$,"OK,K|
00007c30  69 6c 6c 20 74 61 73 6b  22 2c 33 29 3a e7 7a 25  |ill task",3):.z%|
00007c40  3d 32 8c f2 4e 3a e0 0d  03 14 07 cb 3a e1 0d 03  |=2..N:......:...|
00007c50  15 45 dd a4 71 28 4e 79  24 2c 61 75 25 29 3a ea  |.E..q(Ny$,au%):.|
00007c60  7a 25 3a 41 25 21 30 3d  31 3a 24 28 41 25 2b 34  |z%:A%!0=1:$(A%+4|
00007c70  29 3d 4e 79 24 2b bd 30  3a c8 99 26 34 30 30 44  |)=Ny$+.0:..&400D|
00007c80  46 2c 41 25 2c 61 75 25  2c 47 24 b8 2c 7a 25 3a  |F,A%,au%,G$.,z%:|
00007c90  3d 7a 25 0d 03 16 58 dd  a4 53 28 55 79 24 2c 51  |=z%...X..S(Uy$,Q|
00007ca0  79 24 2c 51 69 25 29 3a  ea 4a 25 2c 55 25 2c 5a  |y$,Qi%):.J%,U%,Z|
00007cb0  25 2c 4f 25 2c 74 25 2c  62 25 2c 71 79 25 2c 4e  |%,O%,t%,b%,qy%,N|
00007cc0  25 2c 4b 4a 25 2c 6f 25  2c 59 25 2c 54 79 25 2c  |%,KJ%,o%,Y%,Ty%,|
00007cd0  51 25 2c 50 6c 25 2c 41  24 2c 4d 25 3a ea 85 3a  |Q%,Pl%,A$,M%:..:|
00007ce0  ee 85 ea f2 76 28 30 29  3a 3d 30 0d 03 17 34 4d  |....v(0):=0...4M|
00007cf0  25 3d 4b 5f 25 3a c8 99  26 34 30 30 44 30 2c 2c  |%=K_%:..&400D0,,|
00007d00  2d 31 3a c8 99 26 34 30  36 43 32 3a c8 99 26 34  |-1:..&406C2:..&4|
00007d10  30 30 44 34 2c 2c 2d 31  3a c8 8e 51 69 25 ca 0d  |00D4,,-1:..Qi%..|
00007d20  03 18 18 c9 31 3a 4e 25  3d 30 3a 66 24 3d 22 4d  |....1:N%=0:f$="M|
00007d30  65 73 73 61 67 65 22 0d  03 19 19 c9 32 3a 4e 25  |essage".....2:N%|
00007d40  3d 26 41 3a 66 24 3d 22  57 61 72 6e 69 6e 67 22  |=&A:f$="Warning"|
00007d50  0d 03 1a 17 c9 33 3a 4e  25 3d 26 46 3a 66 24 3d  |.....3:N%=&F:f$=|
00007d60  22 45 72 72 6f 72 22 0d  03 1b 15 7f 4e 25 3d 26  |"Error".....N%=&|
00007d70  46 3a 66 24 3d 22 45 72  72 6f 72 22 0d 03 1c 55  |F:f$="Error"...U|
00007d80  cb 3a d4 31 2c 2d 4e 25  2c 35 30 2c 34 3a 24 49  |.:.1,-N%,50,4:$I|
00007d90  6c 25 3d 66 24 2b 22 20  66 72 6f 6d 20 22 2b 47  |l%=f$+" from "+G|
00007da0  24 3a 49 25 21 30 3d 4d  25 3a e3 4a 25 3d 31 b8  |$:I%!0=M%:.J%=1.|
00007db0  38 3a 49 25 21 34 3d 4a  25 3a c8 99 26 34 30 30  |8:I%!4=J%:..&400|
00007dc0  43 34 2c 2c 49 25 3a ed  3a e7 71 24 3c 3e 22 22  |C4,,I%:.:.q$<>""|
00007dd0  8c 0d 03 1d 25 c8 99 26  36 30 30 45 39 2c 34 30  |....%..&600E9,40|
00007de0  2c 2c 71 24 b8 3b 61 75  25 3a e7 61 75 25 80 31  |,,q$.;au%:.au%.1|
00007df0  8c 71 24 3d 22 22 0d 03  1e 35 cd 3a 55 25 3d 30  |.q$=""...5.:U%=0|
00007e00  3a 41 24 3d 51 79 24 3a  f5 3a 55 25 2b 3d 31 3a  |:A$=Qy$:.:U%+=1:|
00007e10  5a 25 3d a7 41 24 2c 22  2c 22 29 3a e7 5a 25 3d  |Z%=.A$,","):.Z%=|
00007e20  30 8c 5a 24 28 55 25 29  3d 41 24 0d 03 1f 29 e7  |0.Z$(U%)=A$...).|
00007e30  5a 25 3e 30 8c 5a 24 28  55 25 29 3d c0 41 24 2c  |Z%>0.Z$(U%)=.A$,|
00007e40  5a 25 2d 31 29 3a 41 24  3d c2 41 24 2c a9 41 24  |Z%-1):A$=.A$,.A$|
00007e50  2d 5a 25 29 0d 03 20 3a  fd 5a 25 3d 30 84 55 25  |-Z%).. :.Z%=0.U%|
00007e60  3d 34 3a 50 6c 25 3d 55  25 3a 6f 25 3d 30 3a e3  |=4:Pl%=U%:o%=0:.|
00007e70  4a 25 3d 31 b8 55 25 3a  e7 a9 5a 24 28 4a 25 29  |J%=1.U%:..Z$(J%)|
00007e80  3e 6f 25 8c 6f 25 3d a9  5a 24 28 4a 25 29 0d 03  |>o%.o%=.Z$(J%)..|
00007e90  21 12 ed 3a e7 6f 25 3c  39 36 8c 6f 25 3d 39 36  |!..:.o%<96.o%=96|
00007ea0  0d 03 22 76 50 25 28 29  3d 28 28 6f 25 2b 32 29  |.."vP%()=((o%+2)|
00007eb0  2a 31 36 29 3a 62 25 3d  30 3a e3 4a 25 3d 31 b8  |*16):b%=0:.J%=1.|
00007ec0  55 25 3a 62 25 2b 3d 50  25 28 4a 25 29 2b 26 43  |U%:b%+=P%(J%)+&C|
00007ed0  3a ed 3a 62 25 3d 62 25  2d 26 43 2b 31 36 3a 41  |:.:b%=b%-&C+16:A|
00007ee0  25 21 30 3d 4d 25 3a c8  99 26 34 30 30 43 42 2c  |%!0=M%:..&400CB,|
00007ef0  2c 41 25 3a 4b 4a 25 3d  41 25 21 26 43 2d 41 25  |,A%:KJ%=A%!&C-A%|
00007f00  21 34 3a 4f 25 3d 4b 4a  25 2d 62 25 2d 31 36 3a  |!4:O%=KJ%-b%-16:|
00007f10  e7 4f 25 3c 38 8c 0d 03  23 2b e3 4a 25 3d 31 b8  |.O%<8...#+.J%=1.|
00007f20  55 25 3a 6f 25 3d 28 a9  5a 24 28 4a 25 29 2b 32  |U%:o%=(.Z$(J%)+2|
00007f30  29 2a 31 36 3a e7 6f 25  3c 39 36 8c 6f 25 3d 39  |)*16:.o%<96.o%=9|
00007f40  36 0d 03 24 6a 50 25 28  4a 25 29 3d 6f 25 3a ed  |6..$jP%(J%)=o%:.|
00007f50  3a 62 25 3d 30 3a e3 4a  25 3d 31 b8 55 25 3a 62  |:b%=0:.J%=1.U%:b|
00007f60  25 2b 3d 50 25 28 4a 25  29 2b 26 43 3a ed 3a 62  |%+=P%(J%)+&C:.:b|
00007f70  25 3d 62 25 2d 26 43 2b  31 36 3a 41 25 21 30 3d  |%=b%-&C+16:A%!0=|
00007f80  4d 25 3a c8 99 26 34 30  30 43 42 2c 2c 41 25 3a  |M%:..&400CB,,A%:|
00007f90  4b 4a 25 3d 41 25 21 26  43 2d 41 25 21 34 3a 4f  |KJ%=A%!&C-A%!4:O|
00007fa0  25 3d 4b 4a 25 2d 62 25  2d 31 36 0d 03 25 10 cd  |%=KJ%-b%-16..%..|
00007fb0  3a e7 4f 25 3c 38 8c 4f  25 3d 38 0d 03 26 58 74  |:.O%<8.O%=8..&Xt|
00007fc0  25 3d 2d 32 38 34 3a 71  79 25 3d 35 34 3a 6b 24  |%=-284:qy%=54:k$|
00007fd0  3d 22 52 35 2c 32 22 3a  49 25 21 30 3d 4d 25 3a  |="R5,2":I%!0=M%:|
00007fe0  49 25 21 32 30 3d 26 31  37 30 31 33 31 33 44 3a  |I%!20=&1701313D:|
00007ff0  49 25 21 33 32 3d 32 30  3a e3 4a 25 3d 31 b8 55  |I%!32=20:.J%=1.U|
00008000  25 3a 62 25 3d 50 25 28  4a 25 29 3a e7 4a 25 3d  |%:b%=P%(J%):.J%=|
00008010  55 25 8c 0d 03 27 22 74  25 2d 3d 36 3a 62 25 2b  |U%...'"t%-=6:b%+|
00008020  3d 31 36 3a 71 79 25 2b  3d 31 36 3a 6b 24 3d 22  |=16:qy%+=16:k$="|
00008030  52 36 2c 32 22 0d 03 28  c1 cd 3a 24 44 25 28 4a  |R6,2"..(..:$D%(J|
00008040  25 29 3d c0 5a 24 28 4a  25 29 2c 26 46 29 3a 24  |%)=.Z$(J%),&F):$|
00008050  51 25 28 4a 25 29 3d 6b  24 3a 4e 25 3d 44 25 28  |Q%(J%)=k$:N%=D%(|
00008060  4a 25 29 3a 5f 79 25 3d  51 25 28 4a 25 29 3a 49  |J%):_y%=Q%(J%):I|
00008070  25 21 34 3d 4f 25 3a 49  25 21 38 3d 74 25 3a 49  |%!4=O%:I%!8=t%:I|
00008080  25 21 26 43 3d 4f 25 2b  62 25 3a 49 25 21 31 36  |%!&C=O%+b%:I%!16|
00008090  3d 74 25 2b 71 79 25 3a  49 25 21 32 34 3d 4e 25  |=t%+qy%:I%!24=N%|
000080a0  3a 49 25 21 32 38 3d 5f  79 25 3a c8 99 26 34 30  |:I%!28=_y%:..&40|
000080b0  30 43 32 2c 2c 49 25 b8  67 25 3a 4f 25 2b 3d 62  |0C2,,I%.g%:O%+=b|
000080c0  25 2b 26 43 3a ed 3a 55  25 3d 30 3a 41 24 3d 55  |%+&C:.:U%=0:A$=U|
000080d0  79 24 3a f5 3a 55 25 2b  3d 31 3a 5a 25 3d a7 41  |y$:.:U%+=1:Z%=.A|
000080e0  24 2c 22 2c 22 29 3a e7  5a 25 3d 30 8c 5a 24 28  |$,","):.Z%=0.Z$(|
000080f0  55 25 29 3d 41 24 0d 03  29 29 e7 5a 25 3e 30 8c  |U%)=A$..)).Z%>0.|
00008100  5a 24 28 55 25 29 3d c0  41 24 2c 5a 25 2d 31 29  |Z$(U%)=.A$,Z%-1)|
00008110  3a 41 24 3d c2 41 24 2c  a9 41 24 2d 5a 25 29 0d  |:A$=.A$,.A$-Z%).|
00008120  03 2a 14 fd 5a 25 3d 30  84 55 25 3d 33 3a c8 8e  |.*..Z%=0.U%=3:..|
00008130  55 25 ca 0d 03 2b 0e c9  31 3a 74 25 3d 2d 26 38  |U%...+..1:t%=-&8|
00008140  30 0d 03 2c 0d c9 32 3a  74 25 3d 2d 39 36 0d 03  |0..,..2:t%=-96..|
00008150  2d 0d c9 33 3a 74 25 3d  2d 37 36 0d 03 2e 2e cb  |-..3:t%=-76.....|
00008160  3a 4f 25 3d 26 38 32 3a  62 25 3d 36 38 34 3a 71  |:O%=&82:b%=684:q|
00008170  79 25 3d 34 34 3a e7 71  24 3d 22 22 8c 4f 25 3d  |y%=44:.q$="".O%=|
00008180  31 36 3a 62 25 3d 37 39  36 0d 03 2f d2 49 25 21  |16:b%=796../.I%!|
00008190  30 3d 4d 25 3a 49 25 21  34 3d 4f 25 3a 49 25 21  |0=M%:I%!4=O%:I%!|
000081a0  26 43 3d 4f 25 2b 62 25  3a 49 25 21 32 30 3d 26  |&C=O%+b%:I%!20=&|
000081b0  31 37 30 30 36 31 33 39  3a 49 25 21 32 38 3d 2d  |17006139:I%!28=-|
000081c0  31 3a 49 25 21 33 32 3d  32 30 3a 49 25 21 32 30  |1:I%!32=20:I%!20|
000081d0  3d 26 31 37 30 30 36 31  31 39 3a 49 25 21 32 38  |=&17006119:I%!28|
000081e0  3d 2d 31 3a 49 25 21 33  32 3d 32 30 3a e3 4a 25  |=-1:I%!32=20:.J%|
000081f0  3d 31 b8 55 25 3a 24 55  25 28 4a 25 29 3d c2 5a  |=1.U%:$U%(J%)=.Z|
00008200  24 28 4a 25 29 2c 35 30  29 3a 4e 25 3d 55 25 28  |$(J%),50):N%=U%(|
00008210  4a 25 29 3a 49 25 21 34  3d 4f 25 3a 49 25 21 38  |J%):I%!4=O%:I%!8|
00008220  3d 74 25 3a 49 25 21 31  36 3d 74 25 2b 71 79 25  |=t%:I%!16=t%+qy%|
00008230  3a 49 25 21 32 34 3d 4e  25 3a c8 99 26 34 30 30  |:I%!24=N%:..&400|
00008240  43 32 2c 2c 49 25 b8 67  25 3a 74 25 2d 3d 35 34  |C2,,I%.g%:t%-=54|
00008250  3a ed 3a e7 71 24 3c 3e  22 22 8c 0d 03 30 c4 c8  |:.:.q$<>""...0..|
00008260  99 26 34 30 30 45 39 2c  34 30 2c 2c 71 24 b8 2c  |.&400E9,40,,q$.,|
00008270  2c 2c 62 25 2c 71 79 25  2c 2c 55 25 3a c8 99 35  |,,b%,qy%,,U%:..5|
00008280  33 2c 55 25 2c 34 b8 2c  2c 58 75 25 3a 62 25 3d  |3,U%,4.,,Xu%:b%=|
00008290  62 25 3c 3c 58 75 25 3a  c8 99 35 33 2c 55 25 2c  |b%<<Xu%:..53,U%,|
000082a0  35 b8 2c 2c 58 75 25 3a  71 79 25 3d 71 79 25 3c  |5.,,Xu%:qy%=qy%<|
000082b0  3c 58 75 25 3a 4f 25 3d  33 32 3a 74 25 3d 2d 26  |<Xu%:O%=32:t%=-&|
000082c0  38 41 3a 49 25 21 30 3d  4d 25 3a 49 25 21 34 3d  |8A:I%!0=M%:I%!4=|
000082d0  4f 25 3a 49 25 21 38 3d  74 25 3a 49 25 21 26 43  |O%:I%!8=t%:I%!&C|
000082e0  3d 4f 25 2b 62 25 3a 49  25 21 31 36 3d 74 25 2b  |=O%+b%:I%!16=t%+|
000082f0  71 79 25 3a 49 25 21 32  30 3d 26 31 37 30 30 36  |qy%:I%!20=&17006|
00008300  30 31 41 3a 24 28 49 25  2b 32 34 29 3d 71 24 3a  |01A:$(I%+24)=q$:|
00008310  c8 99 26 34 30 30 43 32  2c 2c 49 25 b8 67 25 0d  |..&400C2,,I%.g%.|
00008320  03 31 34 cd 3a 49 25 21  30 3d 4d 25 3a c8 99 26  |.14.:I%!0=M%:..&|
00008330  34 30 30 43 42 2c 2c 49  25 3a e7 71 75 25 8c 71  |400CB,,I%:.qu%.q|
00008340  75 25 3d a3 3a f2 47 79  28 4d 25 29 8b f2 6f 28  |u%=.:.Gy(M%)..o(|
00008350  4d 25 29 0d 03 32 af c8  99 26 34 30 30 44 32 2c  |M%)..2...&400D2,|
00008360  4d 25 2c 39 2c 30 2c 2c  2d 31 2c 2d 31 3a c8 99  |M%,9,0,,-1,-1:..|
00008370  26 34 30 30 43 46 2c 2c  49 25 3a 62 25 3d 49 25  |&400CF,,I%:b%=I%|
00008380  21 26 43 3a 49 25 21 30  3d 4d 25 3a c8 99 26 34  |!&C:I%!0=M%:..&4|
00008390  30 30 43 42 2c 2c 49 25  3a 6f 25 3d 49 25 21 34  |00CB,,I%:o%=I%!4|
000083a0  3a 59 25 3d 49 25 21 38  3a 54 79 25 3d 49 25 21  |:Y%=I%!8:Ty%=I%!|
000083b0  26 43 2d 49 25 21 34 3a  51 25 3d 49 25 21 31 36  |&C-I%!4:Q%=I%!16|
000083c0  2d 49 25 21 38 3a c8 97  c8 93 6f 25 2c 59 25 2c  |-I%!8:....o%,Y%,|
000083d0  54 79 25 2c 51 25 3a 4b  79 25 3d 30 3a 70 5f 25  |Ty%,Q%:Ky%=0:p_%|
000083e0  3d a3 3a 5a 4a 25 3d a3  3a f5 3a c8 99 26 34 30  |=.:ZJ%=.:.:..&40|
000083f0  30 43 37 2c 2c 41 25 b8  54 79 25 3a c8 8e 54 79  |0C7,,A%.Ty%:..Ty|
00008400  25 ca 0d 03 33 28 c9 30  3a c8 99 26 34 30 30 43  |%...3(.0:..&400C|
00008410  46 2c 2c 43 25 3a 61 25  3d 43 25 21 38 3a e7 6c  |F,,C%:a%=C%!8:.l|
00008420  5f 25 3d b9 80 61 25 3d  30 8c 0d 03 34 5d 6c 5f  |_%=..a%=0...4]l_|
00008430  25 3d a3 3a 49 25 21 30  3d 4b 5f 25 3a c8 99 26  |%=.:I%!0=K_%:..&|
00008440  34 30 30 43 42 2c 2c 49  25 3a 6f 25 3d 49 25 21  |400CB,,I%:o%=I%!|
00008450  34 3a 59 25 3d 49 25 21  38 3a 54 79 25 3d 49 25  |4:Y%=I%!8:Ty%=I%|
00008460  21 26 43 2d 49 25 21 34  3a 51 25 3d 49 25 21 31  |!&C-I%!4:Q%=I%!1|
00008470  36 2d 49 25 21 38 3a c8  97 c8 93 6f 25 2c 59 25  |6-I%!8:....o%,Y%|
00008480  2c 54 79 25 2c 51 25 0d  03 35 05 cd 0d 03 36 10  |,Ty%,Q%..5....6.|
00008490  c9 32 3a f2 46 79 28 41  25 21 30 29 0d 03 37 31  |.2:.Fy(A%!0)..71|
000084a0  c9 36 3a 4b 79 25 3d 41  25 21 31 36 3a e7 41 25  |.6:Ky%=A%!16:.A%|
000084b0  21 38 3d 31 36 84 41 25  21 38 3d 36 34 8c f2 48  |!8=16.A%!8=64..H|
000084c0  28 4d 25 2c 41 25 21 31  36 2c 61 25 29 0d 03 38  |(M%,A%!16,a%)..8|
000084d0  16 c9 38 3a e7 41 25 21  32 34 3d 26 44 8c 5a 4a  |..8:.A%!24=&D.ZJ|
000084e0  25 3d b9 0d 03 39 13 e7  41 25 21 32 34 3d 32 37  |%=...9..A%!24=27|
000084f0  8c 70 5f 25 3d b9 0d 03  3a 1f c9 31 37 2c 31 38  |.p_%=...:..17,18|
00008500  3a e7 41 25 21 31 36 3d  30 8c 4f 5f 25 3d b9 3a  |:.A%!16=0.O_%=.:|
00008510  70 5f 25 3d b9 0d 03 3b  2d cb 3a fd 28 4b 79 25  |p_%=...;-.:.(Ky%|
00008520  3e 30 80 4b 79 25 3c 50  6c 25 2b 31 29 84 70 5f  |>0.Ky%<Pl%+1).p_|
00008530  25 84 5a 4a 25 3a e7 5a  4a 25 8c 4b 79 25 3d 50  |%.ZJ%:.ZJ%.Ky%=P|
00008540  6c 25 0d 03 3c 2a 49 25  21 30 3d 4d 25 3a c8 99  |l%..<*I%!0=M%:..|
00008550  26 34 30 30 43 36 2c 2c  49 25 3a ff 28 22 50 6f  |&400C6,,I%:.("Po|
00008560  69 6e 74 65 72 22 29 3a  3d 4b 79 25 0d 03 3d 0a  |inter"):=Ky%..=.|
00008570  dd f2 67 79 3a e1 0d ff                           |..gy:...|
00008578