Home » Archimedes archive » Acorn Computing » 1994 07 subscription disc.adf » 9407s » PD/!Daleks3/!RunImage

PD/!Daleks3/!RunImage

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

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

Tape/disk: Home » Archimedes archive » Acorn Computing » 1994 07 subscription disc.adf » 9407s
Filename: PD/!Daleks3/!RunImage
Read OK:
File size: 13C60 bytes
Load address: 0000
Exec address: 0000
File contents
    1REM><In$Dir>.!RunImage
    2REMProduced by BasCompress v1.30 (09 Sep 1992)
    3Z%=0:yJ%=10:Bn%=1:ly=11:y_=24:DIMs%16:DIMKn%4:!Kn%=0:ONERRORPROCx
    4PROCqJ(20,16):BJ%=FALSE:KJ%=-2:Xa%=TRUE:LJ%=FALSE:PROCS("<BasicV$Lib>.CAsm",6):PROCS("<BasicV$Lib>.Sprite_IO",6):PROCS("<BasicV_Assembler$Lib>.Misc",33):PROCS("<BasicV$Lib>.StickyWin",1):PROCS("<BasicV$Lib>.Template",3):Pi%=BJ%:IFBJ%THEN
    5PROCHy("debug,imath,message,RelObj,stdio,stdlib,string,wimp")
    6ELSE:PROCHy("imath,message,RelObj,stdio,stdlib,string,wimp")
    7ENDIF:PROCsu(10000,FALSE,FALSE):LJ%=BJ%:PROCG(0):PROCS("<BasicV$Lib>.file_io",3):PROCS("<BasicV$Lib>.FileType",1):PROCS("<BasicV$Lib>.Heap",7):PROCS("<BasicV$Lib>.IntMath",4):PROCS("<BasicV$Lib>.ModeInfo",5):PROCS("<BasicV$Lib>.Wimp",28):`y%=FNey("<Daleks3$Dir>",-1,U_%):IFU_%>0THEN
    8ERROR!`y%,"Daleks can't load its' message file: "+FNN(`y%+4)
    9ENDIF:Ry%=TRUE:Tu%=TRUE:N$="9,10,&502,&400C0,&400C1":PROCEJ("Daleks3",3,40,3,10,1992):LJ%=BJ%:PROCW_:PROCYy:PROCd_:CALLMl:IFFNj(Wy%)
   10PROC_(Wy%,`y,W$):SYS&dcb8c,Ru,Wy%,`y:ONERRORPROCx
   11PROCJu:REPEAT:PROCh_:UNTILFALSE:END
   12DEFPROCQ:IFBJ%THEN
   13ERRORERR,REPORT$+" ["+STR$(ERL)+"]"
   14ELSE:ERRORERR,REPORT$
   15ENDIF:PROCB:ENDPROC
   16DEFPROCYu(Q%,X%,E%,I%):LOCALc%,f%,k%:SYS&400d2,Z%!z%,-1,,,1<<25:CASEZ%!q%OF
   17WHEN_:Q%=(Q%-(Z%!ey%))DIV(Z%!Cy%):X%=((Z%!Ei%)-X%)DIV(Z%!vy%):c%=Q%-(Z%!t%):f%=X%-(Z%!Ay%):IF(ABS(c%)<2)AND(ABS(f%)<2)THEN
   18PROCP:IFE%AND4THEN
   19CASEc%OF
   20WHEN-1:k%=2
   21WHEN0:k%=0
   22WHEN+1:k%=1
   23ENDCASE:CASEf%OF
   24WHEN-1:k%=k%OR8
   25WHEN+1:k%=k%OR4
   26ENDCASE:Z%!Ny%=k%:PROCV
   27ELSE:PROCh
   28ENDIF
   29ELSE:IFE%AND1THEN
   30PROCP:PROCu
   31ENDIF
   32ENDIF
   33WHENo:IFE%AND1THEN
   34PROCa
   35ENDIF
   36OTHERWISE:VDU7
   37ENDCASE:ENDPROC
   38DEFPROC`_(p%,I%):PROCP:CASEFNLy(CHR$(p%))OF
   39WHEN"1","2","3","4","5","6","7","8","9":CASEZ%!q%OF
   40WHEN_,Wy:LOCALQ%,X%,j%,c%,f%:c%=((p%-ASC("1"))MOD3)-1:f%=((p%-ASC("1"))DIV3)-1:CASEc%OF
   41WHEN-1:Z%!Ny%=2
   42WHEN0:Z%!Ny%=0
   43WHEN+1:Z%!Ny%=1
   44ENDCASE:CASEf%OF
   45WHEN-1:Z%!Ny%+=4
   46WHEN+1:Z%!Ny%+=8
   47ENDCASE:Q%=Z%!t%+c%:X%=Z%!Ay%-f%:j%=(Q%>=0)AND(Q%<Z%!w%):IFj%AND(X%>=0)AND(X%<Z%!x%)THEN
   48PROCV
   49ENDIF
   50OTHERWISE:VDU7
   51ENDCASE
   52WHEN"A":PROCIy:PROCBy
   53WHEN"C":PROCK
   54WHEN"D":PROCmy
   55WHEN"G":PROCcy:PROCBy
   56WHEN"H":PROCd
   57WHEN"L":PROCKy
   58WHEN"S":PROCh
   59WHEN"T":PROCu
   60WHEN" ":PROCa
   61OTHERWISE:CASEp%OF
   62WHEN3:PROCyy
   63WHEN8:PROCty
   64WHEN13:PROCZ_
   65WHEN16:PROCEy
   66WHEN19:PROCry
   67WHEN20:PROCA_
   68OTHERWISE:SYS&400dc,p%
   69ENDCASE
   70ENDCASE:ENDPROC
   71DEFPROCIy:rJ%=(Z%!uJ%=0):Z%!uJ%=rJ%:CALLU_:ENDPROC
   72DEFPROCcy:IFZ%!_y%THEN
   73iy%=0
   74ELSE:iy%=1
   75ENDIF:PROCJy:Z%!_y%=iy%:PROCr:ENDPROC
   76DEFPROCJy:IFZ%!_y%THEN
   77PROCr:Z%!_y%=0
   78ENDIF:ENDPROC
   79DEFPROCr:CALLZi:ENDPROC
   80DEFPROCKy:CASEZ%!q%OF
   81WHEN_,Wy:Z%!Ku%=TRUE:Z%!Ny%=0:PROCV
   82OTHERWISE:VDU7
   83ENDCASE:ENDPROC
   84DEFPROCZ_:CASEZ%!q%OF
   85WHENfy:VDU7
   86OTHERWISE:Au%=(Z%!T_%=0):Z%!T_%=Au%
   87ENDCASE:ENDPROC
   88DEFPROCu:CASEZ%!q%OF
   89WHEN_,Wy:PROCl:PROCvy
   90OTHERWISE:VDU7
   91ENDCASE:ENDPROC
   92DEFPROCvy:LOCALQ%,X%,Ca%:PROCI:PROCg:REPEAT:Q%=RND(Z%!w%)-1:X%=RND(Z%!x%)-1:Ca%=(Q%<>(Z%!t%))AND(X%<>(Z%!Ay%)):UNTILCa%AND(?FNL(Q%,X%)=0)AND(?FNK(Q%,X%)=0):Z%!t%=Q%:Z%!Ay%=X%:Z%!q%=R_:PROCw(Q%,X%,0):ENDPROC
   93DEFPROCc_:PROCg:Z%!Ny%=0:IFZ%!`_%THEN
   94PROCD("Centre",Z%)
   95ENDIF:IFZ%!L_%THEN
   96Z%!Vu%=GJ:IFZ%!T_%THEN
   97PROCV
   98ENDIF
   99ELSE:PROCV
  100ENDIF:ENDPROC
  101DEFPROCh:CASEZ%!q%OF
  102WHEN_,Wy:IFZ%!V_%>0THEN
  103PROCl:PROCOy
  104ENDIF
  105OTHERWISE:VDU7
  106ENDCASE:ENDPROC
  107DEFPROCOy:PROCI:Z%!q%=_J:PROCw(Z%!t%,Z%!Ay%,1):ENDPROC
  108DEFPROChJ:LOCALc%,f%,Q%,X%,M%,N%,E%:Z%!V_%-=1:PROCj_:Q%=Z%!t%:X%=Z%!Ay%:M%=Z%!w%:N%=Z%!x%:FORf%=-1TO+1:IF((X%+f%)>=0)AND((X%+f%)<N%)THEN
  109E%=FNL(Q%,X%+f%):FORc%=-1TO+1:IF((Q%+c%)>=0)AND((Q%+c%)<M%)THEN
  110IF(E%?c%)<>0THEN
  111PROCBJ(Q%+c%,X%+f%)
  112ENDIF
  113ENDIF:NEXTc%
  114ENDIF:NEXTf%:Z%!Ny%=0:IFZ%!L_%THEN
  115IFZ%!T_%THEN
  116PROCV
  117ENDIF
  118ELSE:PROCV
  119ENDIF:ENDPROC
  120DEFPROCK:IFFNiTHEN
  121PROCH("Centre",Z%):PROCD("Centre",Z%)
  122ENDIF:ENDPROC
  123DEFFN_Null_Reason_Centre(Z%):=NOT(FNi)
  124DEFFNi:LOCALU%,M%,N%,Q%,X%,YJ%,OJ%,Ty%,Iy%,al%,_%:U%=FNM(64):!U%=Z%!z%:SYS&400cb,,U%:M%=(U%!12)-(U%!4):N%=(U%!16)-(U%!8)-(E_%+4):YJ%=Z%!Cy%:OJ%=Z%!vy%:Q%=Z%!JJ%+(YJ%DIV2):X%=-Z%!ul%+(OJ%DIV2):Ty%=FNS(Q%-(M%DIV2),0):Ty%=FNP(Ty%,((Z%!w%*YJ%)-M%)):Iy%=FNP((N%DIV2)+X%,0)
  125Iy%=FNS(Iy%,-((Z%!x%*OJ%)-N%)):Q%=NOT((1<<Sy%)-1):X%=NOT((1<<m%)-1):Ty%=(Ty%ANDQ%)-(U%!20):Iy%=(Iy%ANDX%)-(U%!24):al%=((ABS(Ty%)>=(1<<Sy%))OR(ABS(Iy%)>=(1<<m%))):IFal%THEN
  126_%=Z%!fu%:U%!24+=SGN(Iy%)*FNS((ABS(Iy%)DIV_%)ANDX%,1<<m%):U%!20+=SGN(Ty%)*FNS((ABS(Ty%)DIV_%)ANDQ%,1<<Sy%):SYS&400c5,,U%
  127ENDIF:PROCC(U%,64):=al%
  128DEFPROCyy:xJ%=(Z%!NJ%=0):Z%!NJ%=xJ%:IFZ%!NJ%THEN
  129PROCK
  130ELSE:PROCH("Centre",Z%)
  131ENDIF:ENDPROC
  132DEFPROCry:jJ%=(Z%!DJ%=0):Z%!DJ%=jJ%:IFZ%!DJ%THEN
  133PROCK
  134ELSE:PROCH("Centre",Z%)
  135ENDIF:ENDPROC
  136DEFPROCA_:eJ%=(Z%!`_%=0):Z%!`_%=eJ%:IFZ%!`_%THEN
  137PROCK
  138ELSE:PROCH("Centre",Z%)
  139ENDIF:ENDPROC
  140DEFPROCEy:pJ%=(Z%!GJ%=0):Z%!GJ%=pJ%:IFZ%!GJ%THEN
  141PROCdy
  142ENDIF:ENDPROC
  143DEFPROCdy:IFFNayTHEN
  144PROCH("Centre",Z%):PROCD("Centre",Z%)
  145ENDIF:ENDPROC
  146DEFFNay:LOCALU%,Q%,X%,M%,N%,YJ%,OJ%:U%=FNM(64):!U%=Z%!z%:SYS&400cb,,U%:M%=(U%!12)-(U%!4):N%=(U%!16)-(U%!8)-(E_%+4):Q%=U%!4-U%!20:X%=U%!16-U%!24-E_%:YJ%=Z%!Cy%:OJ%=Z%!vy%:Q%+=Z%!JJ%+(YJ%DIV2):X%-=Z%!ul%+(OJ%DIV2):Q%=FNP(Q%-U%!4,U%!12-Q%)
  147X%=FNP(X%-U%!8,U%!16-X%-E_%):PROCC(U%,64):=FNp(Q%,YJ%)ORFNp(X%,OJ%)
  148DEFFNp(Q%,M%):=(Q%<=(M%*2.5))
  149DEFPROCj_:IF(Z%!V_%)THEN
  150PROCZ(Z%!o%,J_,Z%!V_%)
  151ELSE:PROC_(Z%!o%,J_,FNH("None"))
  152ENDIF:ENDPROC
  153DEFPROCUy:IF(Z%!uJ%)AND(Z%!h_%=FALSE)THEN
  154CALLU_
  155ENDIF:ENDPROC
  156DEFPROCl:IFZ%!h_%THEN
  157CALLU_
  158ENDIF:ENDPROC
  159DEFPROCV:IFFNkTHEN
  160PROCl:Z%!q%=fy:CALLI_:IFZ%!T_%THEN
  161PROCD("Move",Z%)
  162ELSE:REPEAT:UNTILFN_Null_Reason_Move(Z%)
  163ENDIF
  164ENDIF:ENDPROC
  165DEFFNk:LOCALF%,Q%,X%,Z$:Q%=Z%!t%:X%=Z%!Ay%:IF(?FNL(Q%,X%)<>0)OR(?FNK(Q%,X%)<>0)THEN
  166Z%!Ku%=FALSE:Z%!q%=o:PROCz(2):IFZ%!Nl%=FALSETHEN
  167Z$=FNN(Z%+Wu%):PROCxy(Z%,Z$,Z%!C_%,Z%!_J%)
  168ENDIF:F%=FALSE:Z%!q%=o:?FNL(Q%,X%)=0:?FNK(Q%,X%)=0
  169ELSE:F%=Z%!Jy%:F%=(F%!u%<>-1):IFNOT(F%)THEN
  170PROCe(Z%):CALLXu:Z%!q%=Hy:PROCD("Highlight_At_Start",Z%)
  171ELSE:IFZ%!q%<>HyTHEN
  172Z%!q%=_
  173ENDIF
  174ENDIF
  175ENDIF:=F%
  176DEFFN_Null_Reason_Move(A%):PROCG(A%):A%=USR(Zu):IFA%THEN
  177IFFNkTHEN
  178CASETRUEOF
  179WHENZ%!Ku%:A%=FALSE:CALLI_
  180WHENZ%!L_%:PROCLy:A%=(Z%!q%<>_):IFA%=0THEN
  181CALLI_
  182ENDIF
  183OTHERWISE:PROCUy:IFZ%!NJ%THEN
  184PROCK
  185ELSE:IFZ%!GJ%THEN
  186PROCdy
  187ENDIF
  188ENDIF
  189ENDCASE
  190ENDIF
  191ENDIF:=A%
  192DEFPROCBJ(Q%,X%):LOCALF%,Fy%,J%:PROCoy(Z%!Fu%,Q%,X%):F%=Z%!Jy%:WHILE(Q%<>F%!my%)OR(X%<>F%!gl%):F%+=n%:ENDWHILE:Fy%=F%+n%:WHILEFy%!u%<>-1:Fy%+=n%:ENDWHILE:Fy%-=n%:FORJ%=0TOn%-1STEP4:F%!J%=Fy%!J%:NEXTJ%:Fy%!u%=-1:?FNL(Q%,X%)=FALSE:ENDPROC
  193DEFFNL(Q%,X%):=Z%!sy%+(Z%!w%*X%)+Q%
  194DEFFNK(Q%,X%):=Z%!cy%+(Z%!w%*X%)+Q%
  195DEFPROCoy(A%,B%,C%):CALLQl:ENDPROC
  196DEFPROCg:PROCoy(Z%!Hl%,Z%!t%,Z%!Ay%):ENDPROC
  197DEFPROCX_:LOCALU%:Du%=11:DIMGi%Du%+1:DIMMa%LEN (B$)+2+1:U%=FNM(512):U%!0=-1:U%!4=0:U%!8=-16:U%!12=FNS(68,(Du%-1)*8*2):U%!16=68+32-16:U%!20=&1700312b:U%!24=Gi%:$Gi%=FNH("IB0"):$Ma%="S!"+B$:U%!28=Ma%:U%!32=Du%:SYS&400c2,,U%TOZi%:PROCC(U%,512):ENDPROC
  198DEFPROCT_:W$=v$:t_%=CJ:a_%=a_:m_%=TJ:X_%=eJ:Y_%=x_:f_%=xJ:e_%=w_:oy%=__:k_%=o_:EJ%=VJ:dy%=ci:B_%=Gu:rJ%=Fu:iy%=Sa:o_%=Kl:__%=vl:s%!0=Su:s%!4=ru:s%!8=hi:s%!12=fu:IJ%=f_:TJ%=RJ:tJ%=lJ:FJ%=c_:XJ%=WJ:PJ%=EJ:ll%=Oi:Au%=uJ:Su%=d_:xJ%=Pi:jJ%=Ri:eJ%=Bu:Zu%=Xl
  199pJ%=Ll:aJ%=ll:ENDPROC
  200DEFPROCYy:LOCALN%,G$,gJ%:PROCT_:N%=OPENIN("<Daleks3$Dir>.Choices"):IFN%THEN
  201LOCALERROR:ONERRORLOCALRESTOREERROR:CLOSE#N%:ENDPROC
  202INPUT#N%,W$:INPUT#N%,rJ%,iy%,o_%,__%:INPUT#N%,t_%,a_%,m_%:INPUT#N%,B_%:IFB_%>bTHENB_%=1
  203INPUT#N%,X_%,Y_%:INPUT#N%,dy%:INPUT#N%,oy%,f_%,e_%:INPUT#N%,k_%,EJ%:INPUT#N%,s%!0,s%!4,s%!8,s%!12:INPUT#N%,IJ%,TJ%,tJ%,Zu%:INPUT#N%,FJ%,XJ%,PJ%,ll%:INPUT#N%,Su%,xJ%,Au%:INPUT#N%,jJ%,eJ%:IB#N%,pJ%,aJ%:RESTOREERROR:CLOSE#N%
  204ENDIF:ENDPROC
  205DEFPROCo_:LOCALN%:N%=OPENOUT("<Daleks3$Dir>.Choices"):IFN%THEN
  206LOCALERROR:ONERRORLOCALRESTOREERROR:CLOSE#N%:PROCQ
  207PRINT#N%,W$:PRINT#N%,rJ%,iy%,o_%,__%:PRINT#N%,t_%,a_%,m_%:PRINT#N%,B_%:PRINT#N%,X_%,Y_%:PRINT#N%,dy%:PRINT#N%,oy%,f_%,e_%:PRINT#N%,k_%,EJ%:PRINT#N%,s%!0,s%!4,s%!8,s%!12:PRINT#N%,IJ%,TJ%,tJ%,Zu%:PRINT#N%,FJ%,XJ%,PJ%,ll%:PRINT#N%,Su%,xJ%,Au%:PRINT#N%,jJ%,eJ%:PRINT#N%,pJ%,aJ%:RESTOREERROR:CLOSE#N%
  208ENDIF:ENDPROC
  209DEFPROCmy:CASEZ%!q%OF
  210WHEN_,Wy:IFZ%!L_%THEN
  211Z%!L_%=FALSE
  212ELSE:IFFNa(23,FNH("Demo"))=1THEN
  213Z%!Nl%=TRUE:Z%!L_%=TRUE:PROCP:PROCLy:PROCV
  214ENDIF
  215ENDIF
  216OTHERWISE:VDU7
  217ENDCASE:ENDPROC
  218DEFPROCLy:CASEZ%!Vu%OF
  219WHEN_l:PROCNy(FNMy)
  220WHENGJ:PROCNy(FNBy)
  221OTHERWISE:PROCNy(Z%!Vu%)
  222ENDCASE:ENDPROC
  223DEFFNMy:LOCALQ%,X%,K%,F%:K%=0:F%=Z%!Jy%:WHILEF%!u%<>-1:Q%+=F%!Sn%:X%+=F%!Mn%:K%+=1:F%+=n%:ENDWHILE:Q%=(Q%/K%)+0.5:X%=(X%/K%)+0.5:Q%=SGN(Q%-Z%!t%):X%=SGN(X%-Z%!Ay%):=C%(Q%+1,X%+1)
  224DEFFNBy:LOCALQ%,X%,K%,D%,F%,Bl%,Gl%:D%=Z%!i_%:Q%=Z%!t%:X%=Z%!Ay%:K%=&7fffffff:WHILE!D%>=0:Bl%=!D%:Gl%=D%!4:F%=(Q%-Bl%)*(Q%-Bl%)+(X%-Gl%)*(X%-Gl%):IFF%<K%THEN
  225Ty%=Bl%:Iy%=Gl%:K%=F%
  226ENDIF:D%+=8:ENDWHILE:IFK%=&7fffffffTHEN
  227Ty%=Z%!w%DIV2:Iy%=Z%!x%DIV2:K%=(Q%-Ty%)*(Q%-Ty%)+(X%-Iy%)*(X%-Iy%)
  228ENDIF:IFK%<=2THEN
  229F%=0:Z%!Vu%=F%
  230ELSE:Q%=SGN(Ty%-Q%):X%=SGN(Iy%-X%):F%=C%(Q%+1,X%+1)
  231ENDIF:=F%
  232DEFPROCNy(k%):LOCALQ%,X%,J%,Fy%:Q%=Z%!t%:X%=Z%!Ay%:IFFNo(k%)THEN
  233Fy%=TRUE:J%=1:WHILEJ%<9ANDFy%:IFFNo((k%+J%)MOD9)THEN
  234J%+=1
  235ELSE:Fy%=FALSE
  236ENDIF:ENDWHILE:IFJ%>=9THEN
  237IFZ%!V_%>0THEN
  238PROCOy
  239ELSE:PROCvy
  240ENDIF
  241ELSE:k%=(k%+J%)MOD9:Z%!Ny%=W%(k%)
  242ENDIF
  243ELSE:Z%!Ny%=W%(k%)
  244ENDIF:ENDPROC
  245DEFFNo(k%):LOCALc%,f%,Q%,X%,M%,N%,E%,y%:Q%=Z%!t%+J%(k%,0):X%=Z%!Ay%+J%(k%,1):M%=Z%!w%:N%=Z%!x%:y%=(X%>=0)AND(X%<N%)AND(Q%<M%)AND(Q%>=0):y%=y%AND(?FNK(Q%,X%)=0):IFy%THEN
  246FORf%=-1TO+1:IF((X%+f%)>=0)AND((X%+f%)<N%)THEN
  247E%=FNL(Q%,X%+f%):FORc%=-1TO+1:IF((Q%+c%)>=0)AND((Q%+c%)<M%)THEN
  248IF(E%?c%)<>0THEN
  249y%=FALSE:c%=+1:f%=+1
  250ENDIF
  251ENDIF:NEXTc%
  252ENDIF:NEXTf%
  253ENDIF:=(y%=0)
 9181DEFFNv=16
 9182DEFPROCqJ(hi%,na%)LOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("%LibHandler: hard_initialise")
 9183IFFNv<na%THEN
 9184ERROR0,"LibHandler too old"
 9185ENDIF:IFhi%<1THEN
 9186ERROR1,"LibHandler: bad max librarys parameter"
 9187ENDIF:Cl%=hi%:DIMM$(Cl%-1):DIMQ%(Cl%-1):_i%=0:DIMn_%256:Ml%=40:Py%=0:KJ%=12:Ka%=FALSE:DIMZ$(Ml%-1):nJ%=FALSE:LJ%=FALSE:ENDPROC
 9188DEFPROCS(F$,ka%)LOCALUu%,J%,U$,s$:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("%.LibHandler: load_library")
 9189J%=0:Uu%=TRUE:U$=MID$(F$,1+INSTR(F$,".")):WHILEJ%<_i%ANDUu%:Uu%=(U$<>M$(J%)):IFUu%THEN
 9190J%+=1
 9191ENDIF:ENDWHILE:IFUu%THEN
 9192IFJ%=Cl%THEN
 9193ERROR0,"LibHandler: Too many librarys to load!"
 9194ENDIF:M$(J%)=U$:s$="'"+F$+"' does not have a FN_":LOCALERROR:ONERRORLOCALRESTOREERROR:PROCA(s$+U$+"_version")
 9195Q%(J%)=EVAL("FN_"+U$+"_version"):RESTOREERROR:_i%+=1:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCA(s$+"_hard_initialise_"+U$)
 9196IFEVAL("FN_hard_initialise_"+U$)THEN
 9197ERROR1,"Library file '"+F$+"'s hard init'ion failed"
 9198ENDIF:RESTOREERROR
 9199ENDIF:IFka%>Q%(J%)THEN
 9200ERROR1,"Library file '"+F$+"' too old"
 9201ENDIF:ENDPROC
 9202DEFPROCA(P$)IFnJ%THEN
 9203IFLJ%THEN
 9204ERRORERR,REPORT$+" ["+STR$ERL+"]."
 9205ELSEERRORERR,REPORT$
 9206ENDIF
 9207ELSEIFNOTKa%THEN
 9208IFPy%=Ml%THEN
 9209A(Ml%-1)="Errors too deep!!!!!":PROCx
 9210ENDIF:IFRIGHT$(P$,2)=": "THEN
 9211P$=LEFT$(P$,LEN(P$)-2)
 9212ENDIF:IFLJ%THEN
 9213Z$(Py%)=REPORT$
 9214ELSEIFPy%=0THEN
 9215Z$(Py%)="Error `"+REPORT$+"' (line ":Z$(Py%)+=STR$(ERL)+") in ":Z$(Py%)+="`"+P$+"'"
 9216ELSEZ$(Py%)="`"+P$+"'"
 9217ENDIF
 9218ENDIF:Py%+=1:ERRORERR,""
 9219ENDIF
 9220ENDIF:ENDPROC
 9221DEFPROCxLOCALM_%,m$:ONERROR:REPORT:PRINT"::"+STR$(ERL):END
 9222IFnJ%THEN
 9223IFLJ%THEN
 9224PROCF(ERR,REPORT$+" ["+STR$(ERL)+"]."):PROCB:END
 9225ELSEPROCF(ERR,REPORT$):IFERR=p_%THEN
 9226PROCB:END
 9227ENDIF
 9228ENDIF
 9229ELSEIFKJ%=-2THEN
 9230IFPy%>0THEN
 9231ERROREXTERR,Z$(0)
 9232ELSEERROREXTERR,REPORT$
 9233ENDIF:END
 9234ENDIF:IFKJ%=-3THEN
 9235$n_%="TASK":SYS&400c0,200,!n_%,"LibHandler"+CHR$(0):IFPy%THEN
 9236FORM_%=0TOPy%-1:IFM_%<(Py%-1)THEN
 9237PROCAy(Z$(M_%)+" in")
 9238ELSEPROCAy(Z$(M_%))
 9239ENDIF:NEXTM_%
 9240ELSEPROCAy(REPORT$+" (line "+STR$(ERL)+")")
 9241ENDIF:SYS&600dd:END
 9242ENDIF:IFKJ%>=0THEN
 9243MODEKJ%
 9244ENDIF:PRINT"An error has occured...":PRINT:IFPy%THEN
 9245FORM_%=0TOPy%-1:COLOUR((7-(M_%<<1))AND6)+1:PRINTZ$(M_%);:IFM_%<(Py%-1)THEN
 9246PRINT" in ";
 9247ENDIF:NEXTM_%
 9248ELSEPRINTREPORT$;" (line ";STR$(ERL);")"
 9249ENDIF:PRINT:COLOUR7:END
 9250ENDIF:ENDPROC
 9251DEFPROCAy(I$)LOCALmu%:mu%=20+(LEN(I$)+5)AND-4:!n_%=mu%:n_%!16=&804c0:$(n_%+20)=I$:n_%?(20+LEN(I$))=10:n_%?(21+LEN(I$))=0:SYS&600e7,17,n_%,0:ENDPROC
 9252DEFFN_CAsm_version=10
 9253DEFFN_hard_initialise_CAsmLOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("%.CAsm: hard_initialise")
 9254PROCS("<BasicV_Assembler$Lib>.Misc",27):SYS5,"RMEnsure CAssembler 0.03 RMLoad System:Modules.CAssembler":SYS5,"If ""<CAsm$Dir>""="""" Then Set CAsm$Dir <d>.Library.CAsm":CAsmLibrary_stdlib=1:CAsmLibrary_stdio=2:CAsmLibrary_string=3
 9255DO=4:CAsmLibrary_imath=5:z`=6:LB=7:CAsmLibrary_wimp=8:aO=9:CAsmLibrary_message=10:u`=11:CAsmLibrary_debug=12:CAsmLibrary_RelObj=13:jn=14:lo=15:WO=16:wB=17:aa=18:g`=19:LO=20:mB=21:sO=22:D`=23:`o=24:nn=25
 9256ro=26:B_=26:ya=0:ma=1:Fn=2:sa=3:K=4:h=5:Ti=6:Tl=7:Co=8:XJ=9:ny=10:V=11:E_=12:A=13:Z=14:Nk=15:Tu=&6d734143:uy%=0:ny%=13:A_=0:Py=0:X_=10*1024:ju=X_+(1*1024):Pi%=TRUE:Hl=FALSE:=0
 9257DEFPROCHy(X$)LOCALD%,jy%,hy%,L%,O%,P%,V%,F$:LOCALERROR:ONERRORLOCALRESTOREERROR:SYS&400ec,`%,-1:PROCA("%.CAsm: ClaimCAsmLibrary")
 9258`%=HIMEM-32768:SYS&400ec,`%+32768,-1TOL%:L%+=32768:O%=`%+32768:P%=0:V%=14:IFO%=L%THEN
 9259ERROR1,"Not enough memory to start application"
 9260ENDIF:IFuy%<>0THEN
 9261ERROR1,"Only one call to ClaimCAsmLibrary allowed"
 9262ENDIF:DIMYl%B_*8:DIMS$(B_):IFFNh_DEFAULT
 9263WHILEX$<>"":F$=LEFT$(X$,INSTR(X$,",")-1):LOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("Attempted to claim the non-existent library: `"+F$+"'!")
 9264jy%=EVAL("CAsmLibrary_"+F$):RESTOREERROR:hy%=Yl%:D%=hy%+(uy%*8):WHILED%>hy%:IF!hy%=jy%THEN
 9265hy%=D%+1
 9266ELSEhy%+=8
 9267ENDIF:ENDWHILE:IFhy%=D%THEN
 9268IFuy%>=B_THEN
 9269ERROR1,"Too many librarys have been claimed!"
 9270ENDIF:!D%=jy%:S$(jy%)=F$:uy%+=1:O%=`%+32768:P%=0:IFFNJ("FNh_"+F$)
 9271ENDIF:X$=MID$(X$,LEN(F$)+2):WHILEASC(X$)=ASC(" "):X$=MID$(X$,2):ENDWHILE:ENDWHILE:SYS&400ec,`%,-1:RESTOREERROR:ENDPROC
 9272DEFPROCkyLOCALK%,D%,J%,y%:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("%.CAsm: AssembleCAsmTables")
 9273IFuy%=0THEN
 9274IFFNh_DEFAULT
 9275ENDIF:y%=Yl%:J%=uy%:IF(V%AND2)=0THEN
 9276DIMD%uy%*4:SYS79,uy%,D%+&c0000000,3,,y%,8
 9277ENDIF:[OPTV%:.JJ DCDTu:DCDEu:]:WHILEJ%>0:[OPTV%:DCD!y%:DCDy%!4:]:y%+=8:J%-=1:ENDWHILE:[OPTV%:DCD0:]:[OPTV%:ALIGN:.C_:]:D%=P%:IFFNjumpblock_DEFAULT
 9278Eu=(P%-D%)>>2:J%=uy%:y%=Yl%:WHILEJ%>0:D%=P%:IFFNJ("FNjumpblock_"+S$(!y%))
 9279y%!4=(P%-D%)>>2:y%+=8:J%-=1:ENDWHILE:ENDPROC
 9280DEFPROCNuLOCALC:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("%.CAsm: AssembleCAsmBasic")
 9281[OPTV%:ALIGN:.HJ:STMFD(A)!,{4-5,Z}:BL P%+(13<<2):.C DCDJJ-C:DCDC_-C:DCDA_-C:DCDPy:DCDX_:.xy:DCD0:DCD0:DCD0:DCD0:LDR A,xy:LDMFD(A)!,{ny,V,E_,Z}
 9282MOVpc,Z:BIC 5,Z,#&fc000003:LDMIA5,{0-4}:ADD0,0,5:ADD1,1,5:ADD2,2,5:MOV5,#0:SWI &fcb80:STRvc0,xy+(1<<2):STRvc1,xy+(3<<2):LDMFD(A)!,{4-5,pc}:.G_:FNZ:MOV2,Z:MOV1,A:MOV0,ny:SWI &fcb81:MOVvc1,#0
 9283STRvc1,xy+(3<<2):MOVpc,2:MOV13,12:]:A_=P%:PROCM:PROChy:Py=(Py+3)AND-4:P%+=Py-1:O%+=Py-1:[OPTV%:DCB0:]:ENDPROC
 9284DEFPROCOJLOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("%.CAsm: AssembleCAsmApplication")
 9285IFP%<>32768THENERROR1,"Expect P% to be &8000"
 9286[OPTV%:ADR4,jy:MOV5,#Ai:SWI &fcb80:FNl("vc",2,gO):Bvc cl:SWI 43:.jy:DCDJJ-jy:DCDC_-jy:DCDA_-jy:DCDPy:DCDX_:DCDju:]:ENDPROC
 9287DEFFNZLOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("%.CAsm: StartCAssemblerSession")
 9288[OPTV%:STMFD(A)!,{ny,V,E_,Z}:MOV V,pc:FNl("",Z,xy):STR A,[Z],#4:LDMIA(Z)!,{ny,E_,A}:AND V,V,#&fc000003:ORR Z,Z,V:]:=0
 9289DEFFNN(A%)LOCALM$:M$="":WHILE?A%:M$+=CHR$(?A%):A%+=1:ENDWHILE:=M$
 9290DEFFNxy(A%,B%)LOCALM$:M$="":WHILEB%>=0AND?A%:M$+=CHR$(?A%):A%+=1:B%-=1:ENDWHILE:=M$
 9291DEFPROCO(A%,M$)$A%=M$:A%?LEN(M$)=0:ENDPROC
 9292DEFPROCM_(A%,M$,B%)IFLEN(M$)<=B%THEN
 9293$A%=LEFT$(M$,B%-1):A%?(B%-1)=ASC(MID$(M$,B%,1))
 9294ELSE$A%=M$:A%?LEN(M$)=0
 9295ENDIF:ENDPROC
 9296DEFFNJ(f$)LOCALERROR:ONERRORLOCALRESTOREERROR:PROCnJ
 9297=EVAL(f$)
 9298DEFPROCnJIFPi%THEN
 9299ERRORERR,REPORT$+" (evaluating `"+f$+"')"
 9300ELSEERRORERR,REPORT$
 9301ENDIF:ENDPROC
 9302DEFPROCsu(gu%,WJ%,ri%)LOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("%.CAsm: assemble_CAsm")
 9303PROCS("<BasicV$Lib>.Heap",8):PROCS("<BasicV$Lib>.Message",1):IFFNsy(gu%,WJ%,ri%,0)
 9304CALLHJ:ONERRORCALLG_:PROCx
 9305ENDPROC
 9306DEFPROCMIFV%AND4THEN
 9307SYS&606c4,(O%-yy%)*100DIVH%
 9308ELSESYS&606c4,(P%-yy%)*100DIVH%
 9309ENDIF:ENDPROC
 9310DEFFNsy(gu%,WJ%,ri%,fJ%)LOCALL%,O%,P%,V%,Ai%,H%:LOCALO:LOCALgo,L_,VB,j_,to,DB:LOCALbl,c,Ba:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("%.CAsm: assemble_CAsm_External")
 9311IFfJ%=0THEN
 9312PROCS("<BasicV$Lib>.Heap",8):PROCS("<BasicV$Lib>.Message",1)
 9313ENDIF:DIMyy%gu%:O=A:go=1<<31:L_=1<<30:VB=1<<29:j_=1<<28:to=1<<27:DB=1<<26:bl=1<<17:c=256:Ba=c+bl:SYS&606c0:LOCALERROR:ONERRORLOCALRESTOREERROR:SYS&606c1:PROCA("hourglass")
 9314H%=gu%:L%=yy%+gu%:IFWJ%<>0THENWJ%=4
 9315FORV%=8+WJ%TO10+WJ%STEP2:IF(V%AND4)<>0THEN
 9316O%=yy%:IFfJ%=1THEN
 9317P%=32768
 9318ELSEP%=0
 9319ENDIF
 9320ELSEO%=0:P%=yy%
 9321ENDIF:CASEfJ%OF
 9322WHEN1:PROCM:PROCOJ:PROCM:PROCk:PROCM:PROCky:A_=P%:PROCM:PROChy:Py=(Py+3)AND-4
 9323WHEN0:PROCM:PROCk:PROCM:PROCQ_:PROCM:PROCgJ:PROCM:PROCky:PROCM:PROCNu
 9324WHEN2:PROCM:PROCk
 9325ENDCASE:IFV%AND4THENL%=O%ELSEL%=P%
 9326IF(V%AND2)=0THEN
 9327SYS&dcb93,0,yy%,L%-yy%
 9328ENDIF:H%=L%-yy%:NEXTV%:SYS&606c1:IFWJ%THEN
 9329IFfJ%=0THEN
 9330HJ+=yy%:G_+=yy%
 9331ENDIF
 9332ENDIF:IFHlANDfJ%<>2THEN
 9333IFWJ%THEN
 9334H%=C_:IFfJ%THENH%-=32768
 9335ELSEERROR1,"CAsmTablesInBSS TRUE without offset assembly?"
 9336ENDIF
 9337ENDIF:IFri%THEN
 9338PRINT"Assembled to &";~H%;" = ";((H%*10+512)DIV1024)/10;"K":PRINT"Could assemble with ";gu%-H%;" less"
 9339ENDIF:=H%
 9340DEFFN_Sprite_IO_version=6
 9341DEFFN_hard_initialise_Sprite_IOLOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("%.Sprite_IO: hard_initialise_Sprite_IO")
 9342PROCS("<BasicV$Lib>.ModeInfo",5):PROCS("<BasicV$Lib>.Heap",1):PROCS("<BasicV$Lib>.file_io",9):=0
 9343DEFFNU(ai%)=(ai%AND1)<>0
 9344DEFFNny(ay%,M%,N%,yi%,Jn%)SYS&dcb8e,3,ay%,M%,N%,yi%,Jn%TOM%:=M%
 9345DEFPROCiJ(fa%,ja%,RETURNyi%,RETURNan%)LOCALA%,B%,C%:A%=fa%:B%=ja%<>0:C%=FALSE:A%=USR(Gl):yi%=!A%:an%=A%!4:ENDPROC
 9346DEFPROCMuLOCALs:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("%.Sprite_IO: assemble")
 9347[OPTV%:ALIGN:.s DCD0:DCD0:.Gl:FNZ:STMFD(A)!,{1-12,Z}:BL kJ:ADRvc Z,s:STMvcIA Z,{0-1}:MOVvc0,Z:LDMFD(A)!,{1-12,pc}:]:ENDPROC
 9348DEFFN_Misc_version=34
 9349DEFFN_hard_initialise_MiscLOCALJ%,a%,K%:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("%.Misc: hard_initialise_Misc")
 9350IFFNv<12THENERROR1,"Needs newer %.LibHandler"
 9351si%=13:t$=CHR$(si%):Oa%=10:r$=CHR$(Oa%):h$=t$+r$:cn=256:DIMU%(15,1):a%=255:K%=3:FORJ%=0TO15:U%(J%,0)=a%:U%(J%,1)=K%:a%=FNh(a%,2):K%=FNh(K%,2):NEXTJ%:b$="":Cn%=100:On%=&7fff00:ca%=TRUE:An%=0:DIMbu%16:=0
 9352DEFFNl(J$,ZJ%,Wl%)LOCALNu%,fl%,Ti%,zl%,wl%:ly%=FNt(J$):IFV%AND2=0THEN
 9353[OPTV%:DCD0:DCD0:]
 9354ELSENu%=Wl%-P%-8:IFABS(Nu%)>65535THENERROR1,"adrl out of range"
 9355Ti%=ABS(Nu%)AND255:fl%=ABS(Nu%)AND65280:IFNu%>=0THEN
 9356zl%=ly%OR(&28f0000+(ZJ%<<12)+Ti%):wl%=ly%OR(&2800c00+(ZJ%<<16)+(ZJ%<<12)+(fl%>>8))
 9357ELSEzl%=ly%OR(&24f0000+(ZJ%<<12)+Ti%):wl%=ly%OR(&2400c00+(ZJ%<<16)+(ZJ%<<12)+(fl%>>8))
 9358ENDIF:[OPTV%:DCDzl%:DCDwl%:]
 9359ENDIF:=0
 9360DEFFNh(Q%,Cu%)LOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("%.Misc: rol")
 9361Cu%=Cu%MOD32:=(Q%<<Cu%)OR(((NOT((-1)>>>Cu%))ANDQ%)>>>(32-Cu%))
 9362DEFPROCsJ(V$)LOCALti%,bi%,wa%:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("%.Misc: Define_Local_Variables(`"+V$+"')")
 9363ti%=P%:bi%=O%:wa%=V%:IF(V%AND4)=0THEN
 9364O%=P%
 9365ENDIF:P%=0:V%=V%OR6:P%=EVAL("FN_Declare_Local_Variables_"+V$):P%=ti%:O%=bi%:V%=wa%:ENDPROC
 9366DEFPROCm_(J$,K%)LOCALD%,ly%:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("%.Misc: PROCcc")
 9367ly%=FNt(J$):IFV%AND4THEND%=O%ELSED%=P%
 9368FORJ%=1TOK%:D%-=4:!D%=((!D%)AND&fffffff)+ly%:NEXTJ%:ENDPROC
 9369DEFFNt(J$)LOCALly%:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("%.Misc: FNcc")
 9370IFJ$=""ORJ$="  "THEN=14<<28
 9371IFJ$="lo"THEN=3<<28
 9372IFJ$="hs"THEN=2<<28
 9373ly%=INSTR("eqnecsccmiplvsvchilsgeltgtlealnv",J$):IFly%MOD2THEN=((ly%-1)>>1)<<28
 9374ERROR1,"Unrecognised condition code `"+J$+"'":=0
 9375DEFFNyy(Q%,RETURNA%())LOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("%.Misc: armimm")
 9376SYS&dcb92,Q%,bu%TOQ%:A%(0)=!bu%:A%(1)=bu%!4:A%(2)=bu%!8:A%(3)=bu%!12:=Q%
 9377DEFFNZy(J$,a%,K%,Q%,ei%)LOCALA%(),J%,b%:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("%.Misc: SubtractImmediate")
 9378DIMA%(4):J%=FNyy(ABS(Q%),A%()):b%=J%:IFQ%<0THEN
 9379WHILEJ%>1:J%-=1:[OPTV%:ADD a%,K%,#A%(J%):]:K%=a%:ENDWHILE:[OPTV%:ADD a%,K%,#A%(0):]
 9380ELSEWHILEJ%>1:J%-=1:[OPTV%:SUB a%,K%,#A%(J%):]:K%=a%:ENDWHILE:[OPTV%:SUB a%,K%,#A%(0):]
 9381ENDIF:IFei%THEN
 9382IFV%AND4THENa%=O%ELSEa%=P%
 9383a%!-4+=1<<20
 9384ENDIF:PROCm_(J$,b%):=0
 9385DEFFNF(J$,ZJ%,Wl%)Wl%-=P%+8:IFWl%>=0THENERROR1,"invalid call to adrf(), label ahead"
 9386=FNZy(J$,ZJ%,15,-Wl%,ei%)
 9387DEFFNty(K%)P%+=K%:O%+=K%:=0
 9388DEFFN_StickyWin_version=1
 9389DEFFN_hard_initialise_StickyWinLOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("%.StickyWin: hard_initialise")
 9390l_=36:=0
 9391DEFPROCZu(Zy%)Zy%!32=0:ENDPROC
 9392DEFPROCny(Uy%,Zy%,ma%)!Zy%=Uy%:IFZy%!32=0THEN
 9393SYS&400cb,,Zy%
 9394ENDIF:Zy%!28=ma%:SYS&400c5,,Zy%:ENDPROC
 9395DEFPROCn(Uy%,Zy%)IFUy%>0THEN
 9396PROCCy(Uy%,Zy%):SYS&400c6,,Zy%
 9397ENDIF:ENDPROC
 9398DEFPROCCy(Uy%,Zy%)IFUy%>0THEN
 9399!Zy%=Uy%:SYS&400cb,,Zy%
 9400ENDIF:ENDPROC
 9401DEFFN_Template_version=4
 9402DEFFN_hard_initialise_TemplateLOCALXy%:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("%.Template: hard_initialise")
 9403Tu%=FALSE:=0
 9404DEFPROCu_LOCALzy%,Xy%,R%,U%,Q$,Ol%:Q$=FNIy("<"+B$+"$Dir>.Sprites"):zy%=FNb(Q$):IFzy%>0THEN
 9405PROCX(v%,zy%+16):v%!0=zy%+16:v%!4=0:v%!8=16:v%!12=16:SYS&2002e,522,v%,Q$TOXy%;R%:IFFNU(R%)THEN
 9406PROCU("Reason","Sprites"):PROCo(Xy%):PROCL(4):PROCB
 9407ENDIF
 9408ELSEv%=0
 9409ENDIF:PROCSJ("Templates"):IFTu%THEN
 9410IFv%>0THEN
 9411PROCq("ProgInfo",v%,"ProgInfo")
 9412ELSEPROCq("ProgInfo",+1,"ProgInfo")
 9413ENDIF:N_%=0
 9414ELSEIFv%>0THEN
 9415N_%=FNR("ProgInfo",Ol%,v%)
 9416ELSEN_%=FNR("ProgInfo",Ol%,+1)
 9417ENDIF
 9418ENDIF:Ui%=FNR("Query",Ol%,+1):PROC__:ENDPROC
 9419DEFPROCSJ(_$)LOCALji%,jy%,zy%,Xy%,R%,G%:LOCALNa%,Q$,UJ%,du%:Q$="<"+B$+"$Dir>."+_$:zy%=FNb(Q$):IFzy%<=0THEN
 9420PROCU("Reason",_$):PROCU("Sys","Not found"):PROCL(4):PROCB
 9421ENDIF:PROCX(jy%,zy%):PROCX(UJ%,zy%+m):du%=UJ%+AJ:Na%=UJ%+m:SYS&600d9,,Q$TOXy%;R%:IFFNU(R%)THEN
 9422PROCU("Reason","Templates"):PROCo(Xy%):PROCL(4):SYS&600da:PROCB
 9423ENDIF:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCgu
 9424R_%=0:REPEATdu%!0=ASC("*"):SYS&600db,,Na%,jy%,jy%+zy%,-1,du%,R_%TOXy%,,ji%,,,,R_%;R%:IFFNU(R%)THEN
 9425PROCf(Xy%):SYS&600da:PROCB
 9426ENDIF:IFR_%THEN
 9427FORR%=0TO11:IFdu%?R%=13THENdu%?R%=0:R%=12
 9428NEXTR%:UJ%!ou=ji%-jy%:UJ%!su=jy%:G%=FNr(UJ%):IFG%=0THEN
 9429PROCL(16):SYS&600da:PROCB
 9430ENDIF:G%!wy=!qu%:!qu%=G%
 9431ENDIF:UNTILR_%=0:RESTOREERROR:SYS&400da:PROCW(UJ%):PROCW(jy%):ENDPROC
 9432DEFPROCguSYS&600da:PROCA("Template"):ENDPROC
 9433DEFFNR(C$,ta%,hu%)=FNNy(C$,ta%,hu%,"")
 9434DEFFNNy(C$,ta%,hu%,P$)LOCALG%,qa%,N%:G%=FNX(C$):IFG%=0THEN
 9435PROCB
 9436ENDIF:qa%=G%+m:qa%!64=hu%:IFP$<>""THEN
 9437N%=FNJ("FN"+P$)
 9438ENDIF:IFFNO(G%,N%)THEN
 9439PROCB
 9440ENDIF:PROCs(G%):=N%
 9441DEFPROCq(C$,hu%,P$)LOCALG%,M%:G%=FNX(C$):IFG%=0THEN
 9442PROCB
 9443ENDIF:M%=G%+m:M%!64=hu%:IFP$<>""THEN
 9444M%=FNJ("FN"+P$+"("+STR$(M%)+")")
 9445ENDIF:ENDPROC
 9446DEFFNE(C$,hu%)LOCALG%,M%:G%=FNX(C$):IFG%=0THEN
 9447PROCB
 9448ENDIF:M%=G%+m:M%!64=hu%:=0
 9449DEFFND(C$,RETURNUy%)LOCALG%,T%:T%=FALSE:IFUy%<=0THEN
 9450G%=FNX(C$):IFG%THEN
 9451T%=FNO(G%,Uy%):IFT%=FALSETHEN
 9452PROCs(G%)
 9453ENDIF
 9454ELSET%=TRUE
 9455ENDIF
 9456ENDIF:=T%
 9457DEFFNg(C$,c%,f%)LOCALG%:G%=FNX(C$):IFG%THEN
 9458G%=FNcy(G%,c%,f%)
 9459ENDIF:=G%
 9460DEFFNqy(C$,c%,f%,Y$)LOCALG%:G%=FNX(C$):IFG%THEN
 9461G%=FNhy(G%,c%,f%,Y$)
 9462ENDIF:=G%
 9463DEFFNVy(C$)LOCALG%,_$,Y%:G%=!qu%:Y%=FALSE:WHILEG%AND(NOTY%):Y%=(FNxy(G%+AJ,12)=C$):IFNOTY%THEN
 9464G%=G%!wy
 9465ENDIF:ENDWHILE:=G%
 9466DEFFNX(C$)LOCALG%:G%=FNVy(C$):IFG%=0THEN
 9467PROCU("Reason",C$):PROCL(3)
 9468ENDIF:=G%
 9469DEFFNO(G%,RETURNUy%)SYS&600c1,,G%+mTOUy%;G%:G%=FNU(G%):IFG%THEN
 9470PROCf(Uy%):Uy%=0
 9471ENDIF:=G%
 9472DEFPROC`y(G%,RETURNUy%)G%=FNO(G%,Uy%):ENDPROC
 9473DEFFNcy(G%,c%,f%)LOCALN%,M%,R%:N%=0:R%=G%!by:G%!by+=1:G%=FNr(G%):IFG%THEN
 9474M%=G%+m:PROCDy(M%,R%,c%):PROCiy(M%+4,R%,f%):PROC`y(G%,N%):PROCs(G%):G%=N%
 9475ENDIF:=G%
 9476DEFFNhy(G%,c%,f%,Y$)LOCALN%,M%,R%:N%=0:R%=G%!by:G%!by+=1:G%=FNr(G%):IFG%THEN
 9477M%=G%+m:PROCDy(M%,R%,c%):PROCiy(M%+4,R%,f%):IFM%!56AND(1<<8)THEN
 9478PROCM_(M%!72,Y$,M%!80)
 9479ELSEPROCM_(M%+72,Y$,12)
 9480ENDIF:PROC`y(G%,N%):PROCs(G%):G%=N%
 9481ENDIF:=G%
 9482DEFPROCDy(M%,R%,F%)LOCALN%,_%:_%=Yu%<<Sy%:N%=M%!8-M%!0:IF_%<=N%THEN
 9483M%!0=0
 9484ELSE_%=_%-N%:IFF%<0THEN
 9485F%=_%+(F%MOD_%)
 9486ENDIF:M%!0=(M%!0+F%*R%)MOD_%
 9487ENDIF:M%!8=M%!0+N%:ENDPROC
 9488DEFPROCiy(M%,R%,F%)LOCALN%,_%:_%=(w_%<<m%)-96:N%=M%!8-M%!0+48:IF_%<=N%THEN
 9489M%!8=(w_%<<m%)-N%
 9490ELSE_%=_%-N%:IFF%<0THEN
 9491F%=_%+(F%MOD_%)
 9492ENDIF:M%!8=(w_%<<m%)-M%!8:M%!8=(w_%<<m%)-((M%!8+F%*R%)MOD_%)
 9493ENDIF:M%!0=M%!8-N%:ENDPROC
 9494DEFPROCs(G%)LOCALD%:D%=qu%:WHILE!D%<>0AND!D%<>G%:D%=!D%+wy:ENDWHILE:IF!D%=G%THEN
 9495!D%=G%!wy:G%!wy=0:PROCW(G%)
 9496ENDIF:ENDPROC
 9497DEFFNvy(A%)=USR(Hi)
 9498DEFFNr(A%)A%=FNvy(A%):IFA%=0THEN
 9499PROCL(16)
 9500ENDIF:=A%
 9501DEFPROCy_IF(V%AND2)=0THENPROCsJ("Template")
 9502[OPTV%:ALIGN:.Hi:FNZ:B pl:]:ENDPROC
 9503DEFFN_Declare_Local_Variables_TemplateLOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("@.Template")
 9504DIMqu%4:!qu%=0:P%=0:[OPTV%:.wy DCD0:.by DCD0:.su DCD0:.ou DCD0:.AJ DCD0:DCD0:DCD0:.m:]:=0
 9505DEFPROCYJ:LOCALd%,i%,S$:LOCALDATA:RESTORE+0:IFTu%THEN
 9506d%=!(FNX("ProgInfo")+m+88+(16<<5)+20)
 9507ELSE:d%=FNwy(N_%,16)
 9508ENDIF:READS$:i%=ASC(S$):S$=MID$(S$,2):WHILES$<>"":?d%=ASC(S$)EORi%:S$=MID$(S$,2):d%+=1:ENDWHILE:?d%=0
 9509DATA"҂�����򖝟���",,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,
 9510ENDPROC
 9511DEFPROCk:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("@.Assembler")
 9512IF(V%AND2)=0THEN
 9513PROCrJ
 9514ENDIF:[OPTV%:ALIGN:.u_ DCD0:.Nu LDR0,u_:MOVSpc,Z:.vu:]:P%+=s_%:O%+=s_%:[OPTV%:]:PROCM:PROCeJ:PROCM:PROCFJ:PROCM:PROCHJ:PROCM:PROCa_:PROCM:PROCNJ:PROCM:PROCZJ:PROCM:PROCV_:PROCM:PROCau:PROCM:PROCMJ:PROCM:PROClJ:PROCM:PROCxJ:PROCM:PROCRJ:PROCM:PROCqu:PROCM:PROCcJ:PROCM:PROCk_:PROCM:PROCMu:PROCM:PROCy_:ENDPROC
 9515DEFPROChy:ENDPROC
 9516DEFPROCZJ:[OPTV%:ALIGN:.xy%DCD0:.S_ DCD0:ALIGN:.r:LDR12,S_:MOVSpc,Z:.U`:STR0,S_:MOVSpc,Z:]:ENDPROC
 9517DEFPROCa_:LOCALu,M,S,U,D,I,my,X,N,L:LOCALni,My,sy,Hk:LOCALh_,QJ:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("Show_Movement")
 9518u=2:M=3:S=4:U=6:D=7:I=8:my=9:X=10:N=U:L=Z:h_=384:QJ=352:[OPTV%:ALIGN:.Zu:FNZ:STMFD(A)!,{12,Z}:BL r:LDR0,[12,#Yy%]:ADD0,0,#16*c_%:STR0,[12,#Yy%]:BL tJ:LDR0,[12,#Yy%]:LDR1,[12,#Qy%]:CMP0,1:MVNeq0,#NOT(-1):MOVne0,#0:LDMFD(A)!,{12,pc}^:.tJ
 9519STMFD(A)!,{4-9,Z}:SUB O,O,#h_:LDR my,[12,#Yy%]:LDR0,[12,#z%]:MOV1,#0:MOV2,#&f0000000:MOV3,#&70000000:MOV4,#0:STMIA O,{0,1-4}:MOV1,O:SWI &400c9:TEQ0,#0:Beq Fa:BL Qy:ADD D,12,#ey%:LDMIA D,{D,I}:LDR X,[12,#Jy%]:ADD M,12,#JJ%:LDMIA M,{M,S}
 9520LDR U,[12,#Ny%]:TEQ U,#0:ADDne M,D,M:SUBne S,I,S:ADDne u,my,U,LSL#iJ%:LDMneIB u,{0,1,u}:ADDne M,M,0:ADDne S,S,1:MOVeq u,#0:MOV0,#34:ORR0,0,#512:LDR1,[12,#l%]:MOV5,#3:ADD U,O,#QJ:STMIA U,{0,1,M,S,u,X}:.ni:TEQ u,#0:SWIne 46:.sy:LDMIA X,{M,S,U,L}
 9521CMN L,#1:Beq ql:ADD X,X,#n%:ADD M,D,M:SUB S,I,S:ADD u,my,U,LSL#iJ%:LDMIA u,{u,N,L}:ADD M,M,N:ADD S,S,L:SWI 46:B sy:.ql:MOV1,O:SWI &400ca:TEQ0,#0:ADDne U,O,#QJ:LDMneIA U,{0,1,M,S,u,X}:Bne ni:.Fa:LDR1,[12,#Qy%]:LDR0,[12,#Qu%]:ADD0,1,0,LSL#4+iJ%
 9522TEQ0,my:Bne xl:LDR5,[12,#Jy%]:.C LDR0,[5,#u%]:CMN0,#1:Beq sl:ANDS0,0,#sJ%ORz_%:ADDeq5,5,#n%:Beq C:.To:LDR0,[12,#t%]:LDR1,[12,#Ay%]:LDR2,[12,#w%]:MLA 0,1,2,0:LDR1,[12,#sy%]:LDRB1,[1,0]:TEQ1,#0:LDReq1,[12,#cy%]:LDReqB1,[1,0]:TEQeq1,#0:Bne Si
 9523LDR0,[12,#C_%]:ADD0,0,#10:BL s_:.Si:LDR0,[5,#u%]:AND0,0,#z_%ORsJ%:CMP0,#z_%:Bne ei:LDR0,[12,#Fu%]:ADD1,5,#my%:LDMIA1,{1-2}:BL zJ:MOV0,#z_%:.ei:CMP0,#z_%ORsJ%:Bne bJ:ADD1,5,#my%:LDMIA1,{1-2}:LDR0,[12,#ou%]:MVN3,#NOT(-1):STMIA0,{1-2,3}:ADD0,0,#8
 9524STR0,[12,#ou%]:LDR0,[12,#ql%]:BL zJ:.bJ:MOV2,5:.`J ADD2,2,#n%:LDR3,[2,#u%]:CMN3,#1:Bne `J:SUB2,2,5:ADD1,5,#n%:MOV0,5:BL Yu:B C:.sl:BL O_:BL i_:.xl:ADD O,O,#h_:LDMFD(A)!,{4-9,pc}^:]:ENDPROC
 9525DEFPROCNJ:LOCALM,S,U,e,By,w,f,X,N,L:LOCALg,Fy,Y,a,p:LOCALVk,sy,Di:M=1:S=2:U=3:w=4:f=5:e=6:X=7:By=8:Y=9:a=11:p=Z:g=Y:Fy=a:N=0:L=U:[OPTV%:ALIGN:.t_:FNZ:STMFD(A)!,{12,Z}:BL r:BL O_:LDMFD(A)!,{12,pc}^:ALIGN:.O_:STMFD(A)!,{4-9,Z}:LDR0,[12,#Qy%]:STR0,[12,#Yy%]
 9526LDR X,[12,#Jy%]:ADD g,12,#Cy%:LDMIA g,{g,Fy}:ADD N,12,#vu%:LDMIA N,{N,L}:ADD w,12,#t%:LDMIA w,{w,f}:MLA M,w,g,N:MLA S,f,Fy,L:ADD Z,12,#JJ%:STMIA Z,{M,S}:.sy:LDR M,[X,#u%]:CMN M,#1:ADDne w,X,#my%:LDMneIA w,{w,f}:MLAne M,w,g,N:MLAne S,f,Fy,L
 9527STMneIA X,{M,S}:ADDne X,X,#n%:Bne sy:LDMFD(A)!,{4-9,pc}^:ALIGN:.I_:FNZ:STMFD(A)!,{4-9,12,Z}:BL r:LDR e,[12,#sy%]:LDR By,[12,#w%]:LDR2,[12,#x%]:MUL 2,By,2:MOV1,#0:MOV0,e:BL ty:LDR X,[12,#Jy%]:ADD p,12,#t%:LDMIA p,{Y,a}:LDR U,[12,#Ny%]:TST U,#1
 9528ADDne Y,Y,#1:TST U,#2:SUBne Y,Y,#1:TST U,#8:SUBne a,a,#1:TST U,#4:ADDne a,a,#1:STMIA p,{Y,a}:LDR p,[12,#cy%]:.sy:LDR M,[X,#u%]:CMN M,#1:Beq Ui:ADD M,X,#my%:LDMIA M,{w,f}:CMP Y,w:SUBlt w,w,#1:MOVlt U,#2:MOVeq U,#0:MOVgt U,#1:ADDgt w,w,#1:CMP a,f
 9529SUBlt f,f,#1:ORRlt U,U,#8:ORRgt U,U,#4:ADDgt f,f,#1:STR U,[X,#Wi%]:STMIA M,{w,f}:MLA U,By,f,w:LDRB0,[e,U]:TEQ0,#0:Bne Il:LDRB0,[p,U]:EORS0,0,#255:Beq dl:STRB0,[e,U]:.C ADD X,X,#n%:B sy:.Il:MOV0,#0:STRB0,[e,U]:MOV0,#255:STRB0,[p,U]:LDR0,[X,#u%]
 9530ORR0,0,#z_%:ORR0,0,#sJ%:STR0,[X,#u%]:LDR0,[12,#Jy%]:.Di:ADD M,0,#my%:LDMIA M,{M,S}:TEQ M,w:TEQeq S,f:ADDne0,0,#n%:Bne Di:LDR M,[0,#u%]:ORR M,M,#sJ%:STR M,[0,#u%]:B C:.dl:LDR M,[X,#u%]:ORR M,M,#z_%:STR M,[X,#u%]:B C:.Ui:LDMFD(A)!,{4-9,12,pc}^:]:ENDPROC
 9531DEFPROClJ:[OPTV%:ALIGN:.Zi:FNZ:STMFD(A)!,{4-9,12,Z}:BL r:SUB A,A,#512:LDR0,[12,#z%]:MOV1,A:MOV2,#0:MOV3,#&f0000000:MOV4,#&70000000:MOV5,#0:STMIA1,{0,2-5}:SWI &400c9:BL Qy:.C TEQ0,#0:BLne m_:BLne wJ:MOVne1,A:SWIne &400ca:Bne C:ADD A,A,#512
 9532LDMFD(A)!,{4-9,12,pc}^:]:ENDPROC
 9533DEFPROCk_:[OPTV%:ALIGN:.Ql:.zJ:STMFD(A)!,{4-9,12,Z}:SUB A,A,#512:BL r:ADD3,12,#vu%:LDMIA3,{3,4}:ADD5,12,#Cy%:LDMIA5,{5,6}:MLA 3,1,5,3:MLA 4,2,6,4:MOV2,0:LDR7,[12,#z%]:ADD1,A,#2<<2:STR7,[1]:STR3,[1,#4]:ADD5,3,5:STR5,[1,#12]:BL py:RSB Z,4,#0:SUB Z,Z,0
 9534STR Z,[1,#8]:ADD Z,Z,6:STR Z,[1,#16]:MOV5,#3:MOV0,#34:ORR0,0,#512:LDR Z,[12,#l%]:STMIA A,{0,Z}:SWI &400c9:BL Qy:ADD8,12,#ey%:LDMIA8,{8-9}:ADD3,8,3:SUB4,9,4:.C TEQ0,#0:LDMneIA A,{0-1}:SWIne 46:ADDne1,A,#2<<2:SWIne &400ca:Bne C:ADD A,A,#512
 9535LDMFD(A)!,{4-9,12,pc}^:]:ENDPROC
 9536DEFPROCcJ:LOCALFy,g,Y,a,d,n,N,L,By,p_:d=3:n=4:Y=6:a=7:g=8:Fy=9:By=10:p_=11:N=0:L=5:[OPTV%:ALIGN:.U_:STMFD(A)!,{Z,0-12}:SUB A,A,#512:BL r:LDR By,[12,#w%]:LDR p_,[12,#x%]:LDR0,[12,#h_%]:MVN0,0:STR0,[12,#h_%]:ADD Y,12,#t%:LDMIA Y,{Y,a}:ADD g,12,#Cy%
 9537LDMIA g,{g,Fy}:ADD d,12,#JJ%:LDMIA d,{d,n}:RSB2,n,#0:BL py:SUB2,2,0:LDR0,[12,#z%]:MOV1,A:STR0,[1]:SUB0,d,g:STR0,[1,#4]:ADD0,d,g,LSL#1:STR0,[1,#12]:SUB0,2,Fy:STR0,[1,#8]:ADD0,2,Fy,LSL#1:STR0,[1,#16]:SWI &400c9:BL Qy:ADD1,12,#ey%:LDMIA1,{1,Z}
 9538ADD d,1,d:SUB n,Z,n:.C TEQ0,#0:Beq ti:LDR1,[12,#l%]:FNQ(-1,+1,_l%):FNQ(0,+1,Ni%):FNQ(+1,+1,Li%):FNQ(-1,0,cl%):FNQ(+1,0,dl%):FNQ(-1,-1,Oi%):FNQ(0,-1,sl%):FNQ(+1,-1,Ii%):MOV1,A:SWI &400ca:B C:.ti:ADD A,A,#512:LDMFD(A)!,{pc,0-12}^:.au:STMFD(A)!,{d,n,Y,a,Z}
 9539ADD Y,Y,N:SUB a,a,L:CMP Y,By:CMPlo a,p_:LDMhsFD(A)!,{d,n,Y,a,pc}^:MLA d,g,N,d:MLA n,Fy,L,n:MLA N,a,By,Y:LDR L,[12,#sy%]:LDRB L,[L,N]:TEQ L,#0:LDReq L,[12,#cy%]:LDReqB L,[L,N]:TEQeq L,#0:LDMneFD(A)!,{d,n,Y,a,pc}^:MOV0,#34:ORR0,0,#512:MOV5,#3:SWI 46
 9540LDMFD(A)!,{d,n,Y,a,pc}^:]:ENDPROC
 9541DEFFNQ(c%,f%,tu%):[OPTV%:FNY(N,c%):FNY(L,f%):LDR2,[12,#tu%]:BL au:]:=0
 9542DEFFNG(c%,f%,tu%):[OPTV%:LDR2,[12,#tu%]:FNY(3,c%):FNY(4,f%):BL ri:]:=0
 9543DEFFNY(y%,R%):IFR%<0THEN
 9544[OPTV%:MVN y%,#NOT(R%):]
 9545ELSE:[OPTV%:MOV y%,#R%:]
 9546ENDIF:=0
 9547DEFPROCMJ:[OPTV%:ALIGN:.H_ DCD0:.py LDR0,H_:MOVSpc,Z:.Qy:STMFD(A)!,{0-1,Z}:LDR0,[1,#4]:LDR Z,[1,#20]:SUB0,0,Z:LDR Z,[1,#16]:LDR1,[1,#24]:SUB1,Z,1:LDR Z,H_:SUB1,1,Z:ADD Z,12,#ey%:STMIA Z,{0-1}:LDMFD(A)!,{0-1,pc}^:.LJ:STMFD(A)!,{0,Z}:LDR0,[1,#4]
 9548LDR Z,[1,#20]:SUB0,0,Z:STR0,[12,#ey%]:LDR0,[1,#16]:LDR Z,[1,#24]:SUB0,0,Z:STR0,[12,#Ei%]:LDMFD(A)!,{0,pc}^:]:ENDPROC
 9549DEFPROCau:LOCALB,F,G,J,E,T,D,I:LOCALx,v,C:J=11:G=10:F=9:B=8:I=7:D=6:T=5:E=4:[OPTV%:.m_:STMFD(A)!,{Z}:MOV F,1:LDR E,[12,#Cy%]:LDR T,[12,#vy%]:ADD D,12,#ey%:LDMIA D,{D,I}:LDR0,[1,#28]:SUB0,0,D:MOV1,E:BL uy:MOV B,0:LDR0,[F,#36]:SUB0,0,#1:SUB0,0,D:MOV1,E:BL uy
 9550MOV G,0:LDR0,[F,#32]:SUB0,0,#1:SUB0,I,0:MOV1,T:BL uy:MOV J,0:LDR0,[F,#40]:SUB0,I,0:MOV1,T:STMFD(A)!,{J}:BL uy:LDMFD(A)!,{J}:MOV F,0:LDR0,[12,#Yy%]:LDR1,[12,#Qy%]:TEQ0,1:LDMeqFD(A)!,{pc}^:SUBS B,B,#2:MOVlt B,#0:SUBS F,F,#2:MOVlt F,#0:ADD G,G,#2
 9551LDR Z,[12,#w%]:CMP G,Z:SUBge G,Z,#1:ADD J,J,#2:LDR Z,[12,#x%]:CMP J,Z:SUBge J,Z,#1:LDMFD(A)!,{pc}^:ALIGN:.wJ:LDR1,[12,#_y%]:SUBS1,1,#1:MOVltSpc,Z:SWI c+18:SWI c+3:LDR0,[12,#Bi%]:SWI 0:LDR0,[12,#Kl%]:CMP0,#0:Blt el:SWI c+23:SWI c+17:SWI c+2:SWI 0
 9552SWI c:SWI c:SWI c:SWI c:SWI c:SWI c:.el:ADDpc,pc,1,LSL#2:MOVSpc,Z:B vJ:B _u:B mi:B zi:B Za:.vJ:STMFD(A)!,{B,F,G,J,Z}:CMP B,#0:MOVle B,#1:SUBS G,G,B:LDMltFD(A)!,{B,F,G,J,pc}^:MLA B,E,B,D:LDR0,[12,#x%]:SUB0,0,#1:CMP J,0:SUBge J,0,#1:SUBS J,J,F
 9553LDMltFD(A)!,{B,F,G,J,pc}^:MLA F,T,F,T:SUB F,I,F:.v MOV Z,B:MOV3,G:.x MOV0,#69:MOV1,Z:MOV2,F:SWI 69:ADD Z,Z,E:SUBS3,3,#1:Bge x:SUB F,F,T:SUBS J,J,#1:Bge v:LDMFD(A)!,{B,F,G,J,pc}^:._u:STMFD(A)!,{B,F,G,J,Z}:SUB G,G,B:MLA B,E,B,D:ADD B,B,E,ASR#1
 9554SUB J,J,F:MUL F,T,F:ADD F,F,T,ASR#1:SUB F,I,F:.v MOV Z,B:MOV3,G:.x MOV0,#69:MOV1,Z:MOV2,F:SWI 69:ADD Z,Z,E:SUBS3,3,#1:Bge x:SUB F,F,T:SUBS J,J,#1:Bge v:LDMFD(A)!,{B,F,G,J,pc}^:.mi:STMFD(A)!,{B,F,G,J,Z}:SUB G,G,B:ADD G,G,#1:MLA B,E,B,D:SUB J,J,F
 9555ADD J,J,#1:MUL F,T,F:SUB F,I,F:.v MOV Z,B:MOV3,G:.x MOV0,#69:MOV1,Z:MOV2,F:SWI 69:MOV0,#69:ADD1,Z,E,ASR#1:MOV2,F:SWI 69:MOV0,#69:MOV1,Z:ADD2,F,T,ASR#1:SWI 69:ADD Z,Z,E:SUBS3,3,#1:Bge x:SUB F,F,T:SUBS J,J,#1:Bge v:LDMFD(A)!,{B,F,G,J,pc}^:.zi
 9556STMFD(A)!,{B,F,G,J,Z}:SUB G,G,B:ADD G,G,#1:MLA B,E,B,D:SUB J,J,F:MUL F,T,F:ADD J,J,#1:SUB F,I,F:.v MOV Z,B:MOV3,G:.x MOV0,#68:SUB1,Z,#t:SUB2,F,#t:SWI 69:MOV0,#5:ADD1,Z,#t:ADD2,F,#t:SWI 69:MOV0,#68:ADD1,Z,#t:SUB2,F,#t:SWI 69:MOV0,#5:SUB1,Z,#t
 9557ADD2,F,#t:SWI 69:ADD Z,Z,E:SUBS3,3,#1:Bge x:SUB F,F,T:SUBS J,J,#1:Bge v:LDMFD(A)!,{B,F,G,J,pc}^:.Za:STMFD(A)!,{B,F,G,J,Z}:SUB G,G,B:ADD G,G,#1:MLA B,E,B,D:SUB J,J,F:MUL F,T,F:ADD J,J,#1:SUB F,I,F:.v MOV Z,B:MOV3,G:.x MOV0,#68:SUB1,Z,#t:MOV2,F:SWI 69
 9558MOV0,#5:ADD1,Z,#t:MOV2,F:SWI 69:MOV0,#68:MOV1,Z:SUB2,F,#t:SWI 69:MOV0,#5:MOV1,Z:ADD2,F,#t:SWI 69:ADD Z,Z,E:SUBS3,3,#1:Bge x:SUB F,F,T:SUBS J,J,#1:Bge v:LDMFD(A)!,{B,F,G,J,pc}^:ALIGN:.il:LDR0,[12,#q%]:TEQ0,#Hy:TEQne0,#R_:MOVeqSpc,Z
 9559STMFD(A)!,{D,I,E,T,Z}:ADD0,12,#JJ%:LDMIA0,{0-1}:ADD D,D,0:SUB I,I,1:LDR0,[12,#Yy%]:LDR1,[12,#Ny%]:ADD0,0,1,LSL#iJ%:ADD0,0,#W_%:LDMIA0,{0-1}:ADD D,D,0:ADD I,I,1:FNG(0,0,Hl%):LDR0,[12,#h_%]:TEQ0,#0:LDMeqFD(A)!,{D,I,E,T,pc}^:FNG(-1,+1,_l%):FNG(0,+1,Ni%)
 9560FNG(+1,+1,Li%):FNG(-1,0,cl%):FNG(+1,0,dl%):FNG(-1,-1,Oi%):FNG(0,-1,sl%):FNG(+1,-1,Ii%):LDMFD(A)!,{D,I,E,T,pc}^:.ri:ADD0,12,#t%:LDMIA0,{0-1}:ADD0,0,3:SUB1,1,4:CMP0,B:CMPge G,0:CMPge1,F:CMPge J,1:MOVltSpc,Z:LDR5,[12,#w%]:MLA 5,1,5,0:LDR0,[12,#sy%]
 9561LDRB0,[0,5]:TEQ0,#0:LDReq0,[12,#cy%]:LDReqB0,[0,5]:TEQeq0,#0:MOVneSpc,Z:ADD0,12,#Cy%:LDMIA0,{0-1}:MLA 3,0,3,D:MLA 4,1,4,I:MOV5,#3:LDR1,[12,#l%]:MOV0,#34:ORR0,0,#512:SWI 46:MOVSpc,Z:ALIGN:.yi:STMFD(A)!,{E,T,Z}:LDR Z,[12,#Jy%]:LDR2,[12,#Fu%]
 9562LDR1,[12,#l%]:SUB Z,Z,#n%:.C ADD Z,Z,#n%:LDR0,[Z,#u%]:CMN0,#1:LDMeqFD(A)!,{E,T,pc}^:ADD3,Z,#my%:LDMIA3,{3-4}:CMP3,B:CMPge G,3:CMPge4,F:CMPge J,4:Blt C:LDMIA Z,{3-5}:ADD3,D,3:SUB4,I,4:LDR0,[12,#Yy%]:ADD0,0,5,LSL#iJ%:ADD0,0,#W_%:LDMIA0,{0,5}:ADD3,3,0
 9563ADD4,4,5:MOV5,#3:MOV0,#34:ORR0,0,#512:SWI 46:B C:ALIGN:.gJ:STMFD(A)!,{E,T,D,I,12,Z}:ADD0,12,#vu%:LDMIA0,{0-1}:ADD D,D,0:SUB I,I,1:LDR2,[12,#ql%]:LDR1,[12,#l%]:MOV0,#34:ORR0,0,#512:LDR Z,[12,#i_%]:.C LDMIA(Z)!,{3,12}:CMP3,#0
 9564LDMltFD(A)!,{E,T,D,I,12,pc}^:CMP3,B:CMPge G,3:CMPge12,F:CMPge J,12:Blt C:LDMIA A,{E,T}:MLA 3,E,3,D:MUL 4,T,12:SUB4,I,4:MOV5,#3:SWI 46:B C:]:ENDPROC
 9565DEFPROCxJ:[OPTV%:ALIGN:.ui:FNZ:STMFD(A)!,{0-12,Z}:BL r:MOV0,#0:STR0,[12,#_J%]:MOV0,#0:BL s_:MOV0,#0:STR0,[12,#h_%]:LDR0,[12,#y_%]:LDR2,[12,#Q_%]:SUB0,0,2:STR0,[12,#V_%]:BL cu:LDMFD(A)!,{0-12,pc}^:ALIGN:.Xu:FNZ:.cu:STMFD(A)!,{12,Z}:BL r:BL `l:BL Mu:BL O_
 9566BL i_:LDR0,[12,#z%]:MOV1,#&f0000000:MOV2,#&f0000000:MOV3,#&70000000:MOV4,#&70000000:SWI &400d1:LDMFD(A)!,{12,pc}^:]:ENDPROC
 9567DEFPROCRJ:[OPTV%:ALIGN:.`l:STMFD(A)!,{4-9,Z}:LDR3,[12,#_J%]:ADD3,3,#1:STR3,[12,#_J%]:MOV2,#Yi:LDR1,[12,#o%]:MOV0,#gy:SWI &dcb8c:LDR1,[12,#H_%]:LDR2,[12,#O_%]:SUB0,3,#1:MLA 0,1,0,2:LDR1,[12,#b_%]:CMP0,1:MOVgt0,1:MOV5,0:LDR4,[12,#g_%]:LDR0,[12,#w%]
 9568LDR1,[12,#x%]:MUL 9,0,1:MOV0,4:MOV1,9:.C SUBS1,1,#1:STRhs1,[0],#4:Bhi C:LDR6,[12,#sy%]:MOV0,6:MOV1,#0:MOV2,9:BL ty:MOV7,9,LSR#1:.C BL OJ:MOV1,9:BL Ky:LDR0,[4,1,LSL#2]:LDR2,[4,7,LSL#2]:STR0,[4,7,LSL#2]:STR2,[4,1,LSL#2]:SUBS7,7,#1:Bhs C:LDR7,[12,#Jy%]
 9569.C LDR0,[4],#4:MOV Z,#255:STRB Z,[6,0]:LDR1,[12,#w%]:BL Ky:STR1,[7,#my%]:STR0,[7,#gl%]:MOV0,#0:STR0,[7,#u%]:STR0,[7,#Wi%]:ADD7,7,#n%:SUBS5,5,#1:Bne C:MVN0,#NOT(-1):STR0,[7,#u%]:LDR0,[12,#cy%]:MOV1,#0:LDR2,[12,#w%]:LDR3,[12,#x%]:MUL 2,3,2:BL ty
 9570LDR0,[12,#i_%]:MVN1,#0:STR1,[0]:STR0,[12,#ou%]:LDMFD(A)!,{4-9,pc}^:]:ENDPROC
 9571DEFPROCqu:LOCALC:[OPTV%:ALIGN:.Mu:STMFD(A)!,{Z}:MOV0,#0:STR0,[12,#Ku%]:LDR0,[12,#V_%]:LDR1,[12,#Q_%]:ADD0,0,1:BL Sl:.C BL OJ:LDR1,[12,#w%]:LDR2,[12,#x%]:MUL 1,2,1:BL Ky:MOV0,1:LDR1,[12,#w%]:BL Ky:STR1,[12,#t%]:STR0,[12,#Ay%]:BL Ki:Bne C:LDMFD(A)!,{pc}^:ALIGN
 9572.Ki:STMFD(A)!,{4-7,Z}:LDR6,[12,#w%]:LDR7,[12,#x%]:LDR3,[12,#sy%]:MVN4,#NOT(-1):.v MVN5,#NOT(-1):.x BL yl:LDMneFD(A)!,{4-7,pc}:ADD5,5,#1:TEQ5,#2:Bne x:ADD4,4,#1:TEQ4,5:Bne v:LDMFD(A)!,{4-7,pc}:ALIGN:.yl:ADD0,0,4:ADD1,1,5:CMP0,7:CMPlo1,6:MLAlo 2,0,6,1
 9573SUB0,0,4:SUB1,1,5:ORRhsSpc,Z,#L_:LDRB2,[3,2]:TEQ2,#0:ORReqSpc,Z,#L_:BICSpc,Z,#L_:ALIGN:.Sl:STMFD(A)!,{Z}:CMP0,#0:MOVlt0,#0:LDR1,[12,#x_%]:CMP0,1:MOVgt0,1:STR0,[12,#V_%]:MOV3,0:LDR1,[12,#o%]:MOV2,#J_:MOV0,#gy:SWI &dcb8c:LDMFD(A)!,{pc}^:ALIGN
 9574.hJ DCD&f423f:ALIGN:.s_:STMFD(A)!,{Z}:CMP0,#0:MOVlt0,#0:LDR1,hJ:CMP0,1:MOVhi0,1:STR0,[12,#C_%]:MOV3,0:LDR1,[12,#o%]:MOV2,#Fi:MOV0,#gy:SWI &dcb8c:LDMFD(A)!,{pc}^:]:ENDPROC
 9575DEFPROCV_:[OPTV%:ALIGN:ALIGN:.Mi:FNZ:STMFD(A)!,{4-9,12,Z}:BL r:SUB A,A,#512:LDR0,[12,#z%]:MOV1,A:STR0,[1]:SWI &400c8:BL Qy:.C TEQ0,#0:Beq Fl:BL r:BL m_:BL il:BL gJ:BL yi:BL wJ:BL KJ:MOV1,A:SWI &400ca:B C:.Fl:ADD A,A,#512:LDMFD(A)!,{4-9,12,pc}^:]:ENDPROC
 9576DEFPROCeJ:LOCALC,v,x:LOCALe,X,i,ry,Q,y,M,S,io,yy,hy,V_,p:M=0:S=1:Q=2:y=3:X=K:e=h:i=Ti:q=Tl:ry=Z:hy=3:io=V:yy=Z:V_=i:p=X:[OPTV%:.Lu EQUS"%d.%03d":DCB0:.MJFNty(32):ALIGN:.i_:LDR0,[12,#hJ%]:TEQ0,#0:MOVeqSpc,Z:STMFD(A)!,{4-9,Z}:LDR X,[12,#Jy%]:LDR e,[12,#Ou%]
 9577LDR q,[12,#w%]:ADD q,q,#2:ADD q,q,#31:MOV q,q,LSR#5:MOV q,q,LSL#2:LDR2,[12,#x%]:ADD2,2,#2:MUL 2,q,2:MOV1,#0:MOV0,e:BL ty:MOV i,#7:.C LDR M,[X,#u%]:CMN M,#1:Beq Iu:ADD M,X,#my%:LDMIA M,{M,S}:ADD X,X,#n%:ADD M,M,#1:MLA S,q,S,e:BIC Q,M,#31
 9578ADD S,S,Q,LSR#3:AND M,M,#31:CMP M,#30:Bhs ki:LDR Q,[S],#0:ORR Q,Q,i,LSLM:STR Q,[S],q:LDR Q,[S],#0:ORR Q,Q,i,LSLM:STR Q,[S],q:LDR Q,[S],#0:ORR Q,Q,i,LSLM:STR Q,[S],q:B C:.ki:MOVeq ry,#1:MOVhi ry,#3:LDMIA S,{Q,y}:ORR Q,Q,i,LSLM:ORR y,y,ry:STMIA S,{Q,y}
 9579ADD S,S,q:LDMIA S,{Q,y}:ORR Q,Q,i,LSLM:ORR y,y,ry:STMIA S,{Q,y}:ADD S,S,q:LDMIA S,{Q,y}:ORR Q,Q,i,LSLM:ORR y,y,ry:STMIA S,{Q,y}:B C:.Iu:MOV i,#1:LDR p,[12,#i_%]:.C LDMIA(p)!,{M,S}:CMP M,#0:Blt Ii:ADD M,M,#1:ADD S,S,#1:MLA S,q,S,e:BIC Q,M,#31:AND M,M,#31
 9580LDR Q,[S,Q,LSR#3]!:ORR Q,Q,i,LSLM:STR Q,[S],#-1:B C:.Ii:MOV hy,#0:LDR S,[12,#x%]:.v ADD e,e,q:LDR M,[12,#w%]:MOV V_,e:LDR Q,[V_],#4:MOV Q,Q,LSR#1:MOV yy,#31:.x MOVS Q,Q,LSR#1:ADDcs hy,hy,#1:SUBS M,M,#1:Ble Vl:SUBS yy,yy,#1:Bgt x:LDR Q,[V_],#4
 9581MOV yy,#32:B x:.Vl:SUBS S,S,#1:Bgt v:LDR V,[12,#x%]:LDR Z,[12,#w%]:MUL 0,V,Z:MOV V,#1000:MUL 0,V,0:MOV1,hy:ADD0,0,1,LSR#1:BL Ky:MOV1,#1000:BL Ky:MOV3,1:MOV2,0:ADR1,Lu:ADR0,MJ:SWI &dcb8a:ADR3,MJ:LDR1,[12,#o%]:MOV2,#Y_:MOV0,#W_:SWI &dcb8c
 9582LDMFD(A)!,{4-9,pc}^:]:ENDPROC
 9583DEFPROC__:Z_%=FNE("GameP",v%):F_%=FNE("ViewP",v%):Wy%=FNR("EnterName",1,+1):ry%=FNR("Arrow",1,+1):P_%=FNE("Highlight",v%):S_%=FNE("Centre",v%):Oy%=FNE("Magnifier",v%):PROCq("Board",+1,"Board_Template"):PROCq("Status",v%,"Status_Template"):PROCq("HighScores",+1,""):PROCYJ
 9584DIMwn%32:ENDPROC
 9585DEFFNBoard_Template(M%):vl=M%?35:Kl=M%?34:=0
 9586DEFFNStatus_Template(M%):Zl%=(M%!8)-(M%!0):E_%=(M%!12)-(M%!4):!H_=E_%+4:Dn%=M%!28:=0
 9587DEFPROCDJ:D_%=FALSE:zJ%=&1040a31+0:dJ%=&1040a31+1:Hu%=&1040a31+2:kl%=0:ol%=0:ENDPROC
 9588DEFPROCuy:Pa%=6:Ja%=1:MJ%=USR(oJ):D_%=zJ%:ENDPROC
 9589DEFPROCgy:LOCALA%:`l%=Z%:A%=Z%:MJ%=USR(xu):D_%=dJ%:ENDPROC
 9590DEFPROCS_:MJ%=USR(nl):D_%=Hu%:ENDPROC
 9591DEFPROCFJ:LOCALgi,mJ,iJ,El,jJ,ii,gl,cJ,wl:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("@.BasWimp: Menu")
 9592[OPTV%:ALIGN:.Pl DCD0:DCD1:DCD2:DCD3:DCD4:DCD5:DCD6:DCD7:DCD8:.tu:FNZ:STMFD(A)!,{Z}:MOV V,#8:.C SUB A,A,#4:STR A,[A],#0:SUBS V,V,#1:Bgt C:BL hu:LDMFD(A)!,{1-8,Z}:ADRvc V,Pl:STMvcIA V,{0-8}:MOVvc0,V:BICvcSpc,Z,#j_:ORRSpc,Z,#j_:ALIGN:.Ml:FNZ
 9593STMFD(A)!,{Z}:MOV0,#4096:BL wi:MOV0,#512:MOV1,#32:BL fJ:LDMFD(A)!,{pc}:ALIGN:.gi EQUS"[0,w>,<s>,s>,s>,dm>,>":DCB0:EQUS"[40,>,d>,>":DCB0:.mJ EQUS"[100,>,>,>,d>,m>,m>,dm>,w>":DCB0:EQUS"<t[120,w>,<td>,dsw>,>,>,>,s>,>,>,>":DCB0
 9594EQUS"[140,w>,<t>,<t>,<t>,<t>":DCB0:EQUS"[160,<tm>,<t>,m>,w>,w>,d>,<t>":DCB0:EQUS"<t[180,>,>,>,>,>,>,m>":DCB0:EQUS"cb<t[500,>,>,>,>,>,>,>,>,>,>,>,>,>,>,>,>":DCB0:EQUS"cb<t[500,>,>,>,>,>,>,>,>,>,>,>,>,>,>,>,>":DCB0:.iJ EQUS"[1000,m>,m>":DCB0
 9595.El EQUS"[1100":DCB0:.ii EQUS",<t ":DCB0:.cJ EQUS"M1101":DCB0:.jJ EQUS"[1200":DCB0:.gl EQUS", ":DCB0:.wl EQUS"M1201":DCB0:ALIGN:.oJ:FNZ:STMFD(A)!,{Z}:LDR1,Hy%:TEQ1,#0:MOVeq1,#1:MOVne1,#0:STMFD(A)!,{1}:FNF("",0,gi):BL z_:ADD A,A,#1<<2:LDMFD(A)!,{pc}
 9596.xu:FNZ:STMFD(A)!,{Z}:SUB A,A,#12<<2:ADD1,0,#e%:LDR1,[1,#kJ%]:ADD1,1,#D_:LDR2,[0,#bJ%]:LDR3,[0,#NJ%]:LDR4,[0,#DJ%]:LDR5,[0,#`_%]:LDR6,[0,#GJ%]:LDR7,[0,#_y%]:MOV8,7:LDR9,[0,#RJ%]:LDR V,[0,#uJ%]:LDR Z,[0,#r_%]:STMIA A,{1-9,V,Z}:LDR Z,[0,#T_%]
 9597STR Z,[A,#11<<2]:FNF("",0,mJ):BL z_:ADD A,A,#12<<2:LDMFD(A)!,{pc}:.Hy%DCD0:.Xu%DCD0:.My%DCD0:.nl:FNZ:STMFD(A)!,{K-XJ,Z}:BL du:FNF("",0,iJ):BL cy:MOVvc0,#0:BLvc T_:FNF("vc",0,El):BLvc cy:Bvs vy:LDR K,Hy%:ADD K,K,#4:LDR h,My%:.C STMFD(A)!,{K-h}
 9598FNF("",0,ii):BL cy:LDRvc0,[K,#r%]:BLvc Ul:FNF("vc",0,cJ):LDMvcIA K,{1-8}:STMFD(A)!,{1-8}:BLvc e_:ADD A,A,#8<<2:LDMFD(A)!,{K-h}:Bvs vy:ADD K,K,#l_%:SUBS h,h,#1:Bne C:MOV0,#0:BL T_:FNF("vc",0,jJ):BLvc cy:Bvs vy:LDR K,Hy%:ADD K,K,#4:LDR h,My%
 9599.C STMFD(A)!,{K-h}:FNF("",0,gl):BL cy:FNF("vc",0,wl):LDMvcIA K,{1-8}:STMFD(A)!,{1-8}:BLvc e_:ADD A,A,#8<<2:LDMFD(A)!,{K-h}:Bvs vy:ADD K,K,#l_%:SUBS h,h,#1:Bne C:MOV0,#0:BL T_:BLvc hl:.vy:LDMFD(A)!,{K-XJ,pc}:.bi:FNZ:STMFD(A)!,{4-8,Z}
 9600LDMIA0,{0,3,4,5,6,7,V,Z}:STMFD(A)!,{0,3,4,5,6,7,V,Z}:MOV0,2:BL qu:ADD A,A,#8<<2:LDMFD(A)!,{4-8,pc}:]:ENDPROC
 9601DEFPROCJJ:LOCALQ%,X%,VJ%,Dy%,Fy%:Q%=W%!24:X%=W%!28:VJ%=W%!32:Dy%=W%!36:Fy%=p_%:CASED_%OF
 9602WHENzJ%:CASEVJ%OF
 9603WHEN0:IFFND("ProgInfo",N_%)THEN
 9604ELSE:SYS&400e8,,N_%,Q%,X%
 9605ENDIF
 9606OTHERWISE:PROCF(Fy%,"Unexpected MenuWarning Message")
 9607ENDCASE
 9608WHENdJ%:PROCG(`l%):CASEVJ%OF
 9609WHENg_:CASEDy%OF
 9610WHENfl:PROCmJ:SYS&400e8,,S_%,Q%,X%
 9611OTHERWISE:PROCF(Fy%,"Unexpected MenuWarning Message")
 9612ENDCASE
 9613WHENsJ:CASEDy%OF
 9614WHENqJ:PROCXJ:SYS&400e8,,P_%,Q%,X%
 9615WHENNJ:PROCfu:SYS&400e8,,ry%,Q%,X%
 9616OTHERWISE:PROCF(Fy%,"Unexpected MenuWarning Message")
 9617ENDCASE
 9618WHENQ_:CASEDy%OF
 9619WHENdi:PROCn_:SYS&400e8,,Oy%,Q%,X%
 9620WHENAa:PROCt_:SYS&400e8,,F_%,Q%,X%
 9621OTHERWISE:PROCF(Fy%,"Unexpected MenuWarning Message")
 9622ENDCASE
 9623WHENYJ:PROC_u:SYS&400e8,,Z_%,Q%,X%
 9624OTHERWISE:PROCF(Fy%,"Unexpected MenuWarning Message")
 9625ENDCASE
 9626OTHERWISE:PROCF(Fy%,"Unexpected MenuWarning Message")
 9627ENDCASE:ENDPROC
 9628DEFPROCv_:LOCALVJ%,U%,di%,ci%,mJ%,Dy%,A%,Bu%,`i%:LOCALjl%:U%=FNM(512):SYS&400cf,,U%:di%=U%!0:ci%=U%!4:kl%=di%:ol%=ci%:mJ%=U%!8:PROCC(U%,512):VJ%=!W%:Dy%=W%!4:Bu%=W%!8:jl%=W%!12:CASED_%OF
 9629WHENzJ%:CASEVJ%OF
 9630WHENpu:PROCbu
 9631WHENVu:CASEDy%OF
 9632WHENal:PROCo_
 9633WHENHu:PROCYy
 9634WHENEi:PROCGu
 9635ENDCASE
 9636WHENNi:PROCRy
 9637ENDCASE
 9638WHENdJ%:PROCG(`l%):CASEVJ%OF
 9639WHENol:PROCm(mJ%):PROCu
 9640WHENzu:PROCm(mJ%):PROCh
 9641WHENvi:PROCm(mJ%):PROCKy
 9642WHENsJ:PROCLJ(Dy%)
 9643WHENg_:CASEDy%OF
 9644WHEN-1:PROCK
 9645WHENZl:PROCyy
 9646WHENnJ:PROCry
 9647WHEN_i:PROCA_
 9648WHENuu:PROCEy
 9649ENDCASE
 9650WHENQ_:CASEDy%OF
 9651WHEN`i:PROCIy
 9652WHENXi:CASEBu%OF
 9653WHEN-1:PROCcy
 9654WHENmu:CASEjl%OF
 9655WHEN-1
 9656WHEN0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15:o_%=jl%:IFo_%<>Z%!RJ%THEN
 9657`i%=Z%!_y%:PROCJy:Z%!RJ%=o_%:PROCqy:Z%!_y%=`i%:PROCr
 9658ENDIF
 9659ENDCASE
 9660OTHERWISE:iy%=Bu%:IFiy%<>Z%!_y%THEN
 9661PROCJy:Z%!_y%=iy%:PROCr
 9662ENDIF
 9663ENDCASE
 9664WHENkl:CASEBu%OF
 9665WHEN-1
 9666WHEN0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15:__%=Bu%:IF__%<>Z%!r_%THEN
 9667Z%!r_%=__%:Z%?`u%+=1:PROCVJ(Z%!z%,__%):PROCp
 9668ENDIF
 9669ENDCASE
 9670WHENWu:PROCTu(Z%)
 9671WHENiu:PROCZ_
 9672ENDCASE
 9673WHENYJ:PROCa
 9674WHENWi:PROCmy
 9675ENDCASE
 9676WHENHu%:CASEVJ%OF
 9677WHENjl:PROCXu(Dy%)
 9678WHENpi:PROCC_(Dy%)
 9679ENDCASE
 9680ENDCASE:IFmJ%=1THEN
 9681PROCBy
 9682ELSE:PROCP
 9683ENDIF:ENDPROC
 9684DEFPROCm(mJ%):IFmJ%<>1THEN
 9685PROCP
 9686ENDIF:ENDPROC
 9687DEFPROCBy:LOCALj%:j%=TRUE:CASED_%OF
 9688WHENzJ%:PROCuy
 9689WHENdJ%:PROCgy
 9690WHENHu%:PROCS_
 9691OTHERWISEj%=FALSE
 9692ENDCASE:IFj%THEN
 9693SYS&400d4,,MJ%,kl%,ol%
 9694ENDIF:ENDPROC
 9695DEFPROCP:SYS&400d4,,-1:D_%=FALSE:ENDPROC
 9696DEFPROCs_:LOCALD%:D%=FNM(128):CASEFNI(!W%)OF
 9697WHENA_%:!D%=Z%!o%:SYS&400cb,,D%:D%!28=W%!28:W%!28=!D%:SYS&400c5,,W%:SYS&400cb,,W%:PROCMy(D%,W%)
 9698WHENty%:!D%=Z%!z%:SYS&400cb,,D%:PROCMy(W%,D%)
 9699WHENFNV(!W%):PROCfJ(W%)
 9700OTHERWISE:SYS&400c5,,W%
 9701ENDCASE:PROCC(D%,128):ENDPROC
 9702DEFPROCMy(D%,M%):LOCALj_%:D%!4=M%!4:D%!12=M%!12:D%!16=M%!16:D%!8=FNS(M%!8,D%!16-E_%):j_%=M%!12-M%!4:IFj_%<Zl%THEN
 9703D%!20=Zl%-j_%
 9704ELSE:D%!20=((Zl%-j_%)/2)ANDNOT((1<<Sy%)-1)
 9705ENDIF:D%!24=0:SYS&400c5,,D%:M%!28=!D%:SYS&400c5,,M%:ENDPROC
 9706DEFPROCPu:CASEFNI(!W%)OF
 9707WHENA_%,ty%:PROCP_
 9708WHENFNV(!W%):PROCI_
 9709OTHERWISE:SYS&400c6,,W%
 9710ENDCASE:ENDPROC
 9711DEFPROCvJ:LOCALcJ%:LOCALERROR:ONERRORLOCALRESTOREERROR:SYS&606c1:PROCQ
 9712SYS&606c0:CASEFNI(!W%)OF
 9713WHENA_%:PROCLu
 9714WHENry%:PROCHu
 9715OTHERWISE:SYS&400c8,,W%TOcJ%:WHILEcJ%:SYS&81681,,W%:SYS&400ca,,W%TOcJ%:ENDWHILE
 9716ENDCASE:SYS&606c1:ENDPROC
 9717DEFPROCLu:IFZ%!l%<>0THEN
 9718CALLMi
 9719ELSE:SYS&400c8,,W%TOcJ%:WHILEcJ%:SYS&400e6,128+8:CLG:SYS&400ca,,W%TOcJ%:ENDWHILE
 9720ENDIF:ENDPROC
 9721DEFPROCHu:LOCALA%,B%:A%=Z%:B%=W%:CALLrl:ENDPROC
 9722DEFPROCKJ:ENDPROC
 9723DEFPROC`J:ENDPROC
 9724DEFPROCx_:ENDPROC
 9725DEFPROCIu:ENDPROC
 9726DEFPROCGJ:ENDPROC
 9727DEFPROCRy:LOCALvJ%:vJ%=(Z%=0):IFNOTvJ%THEN
 9728vJ%=(Z%!C_%=0)OR(Z%!q%=o)
 9729ENDIF:IFNOTvJ%THEN
 9730vJ%=(FNa(3,FNC(5))=1)
 9731ENDIF:IFvJ%THEN
 9732PROCB
 9733ENDIF:ENDPROC
 9734DEFPROCN_:LOCALA$,I%:A$="":I%=W%!36:CASEFNYy(W%!32)OF
 9735WHEN-2:IFI%=Zi%THEN
 9736A$="IconBar"
 9737ELSE:A$=FNn
 9738ENDIF
 9739WHENN_%:A$="ProgInfo"
 9740WHENWy%:A$="EnterName"
 9741WHENty%:A$="Status"
 9742WHENA_%:A$="Board"
 9743WHENZ_%:A$="GameP"
 9744WHENF_%:A$="ViewP"
 9745WHENP_%:A$="Highlight"
 9746WHENry%:A$="Arrow"
 9747WHENS_%:A$="Centre"
 9748WHENOy%:A$="Magnifier"
 9749WHENFNV(W%!32):A$="HighScore":IFI%>0THEN
 9750I%=-1
 9751ELSE:I%=I%MOD4
 9752ENDIF
 9753OTHERWISE:IF(ju%>218)AND(W%!36<>-1)THEN
 9754A$=FNn
 9755ENDIF
 9756ENDCASE:IFA$<>""THEN
 9757IFI%<0THENA$+=",_"ELSEA$+=","+STR$(I%)
 9758PROCby("H"+A$,W%+20):IFW%?20THEN
 9759W%!16=1283:W%!12=W%!8:A%=W%+20:WHILE?A%:A%+=1:ENDWHILE:W%!0=(A%-W%+4)AND-4:SYS&400e7,17,W%,W%!4
 9760ENDIF
 9761ENDIF:ENDPROC
 9762DEFPROCr_:ENDPROC
 9763DEFFNn:LOCALA$,M%:M%=W%+40:SYS&400f4,1,M%,W%!32,W%!36:CASED_%OF
 9764WHENzJ%:A$="I"
 9765WHENdJ%:A$="D"
 9766WHENHu%:A$="H"
 9767ENDCASE:IFA$<>""THEN
 9768A$="M"+A$+STR$(!M%):WHILEM%!4<>-1:M%+=4:A$+="_,"+STR$(!M%):ENDWHILE
 9769ENDIF:=A$
 9770DEFPROCwy:PROCIJ(-1):PROCTy:ENDPROC
 9771DEFPROCWJ:PROCTy:ENDPROC
 9772DEFPROCTy:pl%=FNS(1<<Sy%,1<<m%)*2:IFZ%<>0THEN
 9773PROCp
 9774ENDIF:ENDPROC
 9775DEFPROCp:LOCALF%:PROCqy:F%=Z%+e%:F%!Tl%=pl%:Z%!Ri%=1<<Sy%:Z%!_a%=1<<m%:PROCGy:ENDPROC
 9776DEFPROCqy:LOCALQ%,X%,Ia%,Ta%,D%:Q%=0:X%=0:SYS50,Q%,X%TO,,Ia%,Ta%:SYS&400e6,0+Z%!r_%:SYS69,69,Q%,X%:SYS&400e6,48+Z%!RJ%:SYS69,69,Q%,X%:SYS50,Q%,X%TO,,Z%!Bi%,Z%!Kl%:GCOL0,Ia%TINTTa%:SYS69,69,Q%,X%:IFFl%<8THENZ%!Kl%=-1
 9777ENDPROC
 9778DEFPROCB:PROCUu:END:ENDPROC
 9779DEFPROCg_:LOCALI%,p%:I%=W%!4:p%=W%!24:CASEFNI(W%!0)OF
 9780WHENWy%:PROCtJ(p%,I%)
 9781WHENA_%:PROC`_(p%,I%)
 9782WHENty%:PROCzJ(p%,I%)
 9783WHENOy%:PROCKu(p%,I%)
 9784OTHERWISE:SYS&400dc,p%
 9785ENDCASE:ENDPROC
 9786DEFPROCzJ(p%,I%):CASEp%OF
 9787WHEN13:SYS&400d2,-1,-1:SYS&400d2,Z%!z%,-1,,,1<<25:W$=FNs(Z%!o%,ZJ):PROCO(Z%+Wu%,W$)
 9788OTHERWISE:SYS&400dc,p%
 9789ENDCASE:ENDPROC
 9790DEFPROCb_:LOCALQ%,X%,E%,M%,I%:Q%=W%!0:X%=W%!4:E%=W%!8:M%=FNI(W%!12):I%=W%!16:CASEE%OF
 9791WHEN2:CASEM%OF
 9792WHEN-2:PROCuy:X%=96+(44*Pa%)+(24*Ja%):SYS&400d4,,MJ%,Q%-64,X%
 9793WHENA_%,ty%:PROCgy:SYS&400d4,,MJ%,Q%-64,X%
 9794WHENFNV(M%):PROCS_:SYS&400d4,,MJ%,Q%-64,X%
 9795ENDCASE
 9796WHEN1*16,4*16
 9797OTHERWISE:ii%=(M%=Wy%):IFRy%ANDM%<>ty%THENSYS&81680,,W%
 9798CASEM%OF
 9799WHENA_%:PROCYu(Q%,X%,E%,I%)
 9800WHENty%:PROCOu(Q%,X%,E%,I%)
 9801WHEN-2:PROCB_(Q%,X%,E%,I%)
 9802WHENZ_%:PROCRu(Q%,X%,E%,I%)
 9803WHENF_%:PROCVu(Q%,X%,E%,I%)
 9804WHENS_%:PROCp_(Q%,X%,E%,I%)
 9805WHENP_%:PROCUJ(Q%,X%,E%,I%)
 9806WHENOy%:PROCAJ(Q%,X%,E%,I%)
 9807WHENUi%:PROCAu(Q%,X%,E%,I%)
 9808WHENN_%:PROCD_(Q%,X%,E%,I%)
 9809WHENWy%:PROCuJ(Q%,X%,E%,I%)
 9810WHENry%:PROCpJ(Q%,X%,E%,I%)
 9811WHENFNV(M%):PROCL_(E%)
 9812ENDCASE:IFRy%ANDii%=0ANDM%<>ty%THENW%!8=0:SYS&81680,,W%
 9813ENDCASE:ENDPROC
 9814DEFPROCD_(Q%,X%,E%,I%):CASEI%OF
 9815WHEN14,15:PROCF(Vy%,FNC(0)):IFE%<>1THEN
 9816PROCP
 9817ENDIF
 9818ENDCASE:ENDPROC
 9819DEFPROCB_(Q%,X%,E%,I%):CASETRUEOF
 9820WHENWy%<>0:PROCF(Vy%,FNC(2)):PROCY(Wy%,-1)
 9821WHEN!xy%=0:PROCb
 9822WHENFN`:PROCY(Z%!z%,-1):PROCa
 9823OTHERWISE:PROCG(!xy%):PROCfy
 9824ENDCASE:ENDPROC
 9825DEFPROCz(K%):$Gi%=LEFT$(FNH("IB"+STR$(K%)),Du%-1):PROCQu(-1,Zi%,0,0,0):ENDPROC
 9826DEFPROCtJ(p%,I%):CASEp%OF
 9827WHEN13:SYS&400d2,-1,-1:W%!8=1:W%!12=W%!0:W%!16=IJ:SYS&81680,,W%:W$=FNs(Wy%,`y):PROCb
 9828OTHERWISE:SYS&400dc,p%
 9829ENDCASE:ENDPROC
 9830DEFPROCuJ(Q%,X%,E%,I%):CASEI%OF
 9831WHENIJ:SYS&400d2,-1,-1:W$=FNs(Wy%,`y):PROCb
 9832ENDCASE:ENDPROC
 9833DEFPROCzu:LOCALM%:M%=Z_%:PROCZ(M%,Ly+1,eJ):PROCZ(M%,Uy+1,x_):PROCZ(M%,k+1,__):PROCZ(M%,Ay+1,w_):PROCZ(M%,Sy+1,xJ):PROCZ(M%,Jy+1,TJ):PROCZ(M%,Ny+1,CJ):PROCZ(M%,ay+1,a_):ENDPROC
 9834DEFPROC_u:LOCALM%:IFFND("GameP",Z_%)THEN
 9835ELSE:M%=Z_%:PROCZ(M%,Ly+1,Z%!w%):PROCZ(M%,Uy+1,Z%!x%):PROCZ(M%,k+1,Z%!b_%):PROCZ(M%,Ay+1,Z%!O_%):PROCZ(M%,Sy+1,Z%!H_%):PROCZ(M%,Jy+1,Z%!x_%):PROCZ(M%,Ny+1,Z%!y_%):PROCZ(M%,ay+1,Z%!Q_%)
 9836ENDIF:ENDPROC
 9837DEFPROCRu(Q%,X%,E%,I%):LOCALM%,a%,d%:M%=Z_%:CASEI%OF
 9838WHENLy,Ly+2:PROCJ(M%,I%,E%,Ly,5,999):PROCj
 9839WHENUy,Uy+2:PROCJ(M%,I%,E%,Uy,5,999):PROCj
 9840WHENk,k+2:a%=FNA(M%,Ay+1):PROCJ(M%,I%,E%,k,a%,9999):PROCj
 9841WHENAy,Ay+2:a%=FNA(M%,k+1):PROCJ(M%,I%,E%,Ay,2,a%)
 9842WHENSy,Sy+2:a%=FNA(M%,k+1):PROCJ(M%,I%,E%,Sy,1,a%)
 9843WHENJy,Jy+2:a%=FNA(M%,Ny+1):PROCJ(M%,I%,E%,Jy,a%,999)
 9844WHENNy,Ny+2:a%=FNA(M%,Jy+1):PROCJ(M%,I%,E%,Ny,1,a%)
 9845WHENay,ay+2:a%=FNA(M%,Jy+1):PROCJ(M%,I%,E%,ay,1,a%)
 9846WHENRl:PROCzu
 9847WHENVi:PROCl_:IFE%AND4THEN
 9848PROCP
 9849ENDIF
 9850ENDCASE:ENDPROC
 9851DEFPROCj:LOCALd%,E%,M%,R%:M%=Z_%:d%=FNA(M%,Ly+1):E%=FNA(M%,Uy+1):R%=FNP((d%*E%)DIV2,9999):IFFNA(M%,k+1)>R%THEN
 9852PROCZ(M%,k+1,R%)
 9853ENDIF:IFFNA(M%,Ay+1)>R%THEN
 9854PROCZ(M%,Ay+1,R%)
 9855ENDIF:IFFNA(M%,Sy+1)>R%THEN
 9856PROCZ(M%,Sy+1,R%)
 9857ENDIF:ENDPROC
 9858DEFPROCl_:LOCALM%:M%=Z_%:X_%=FNA(M%,Ly+1):Y_%=FNA(M%,Uy+1):oy%=FNA(M%,k+1):e_%=FNA(M%,Ay+1):f_%=FNA(M%,Sy+1):m_%=FNA(M%,Jy+1):t_%=FNA(M%,Ny+1):a_%=FNA(M%,ay+1):PROCXy:ENDPROC
 9859DEFPROCXy:LOCALXi%,j_%,Uy%,M%,N%:Xi%=TRUE:CASEFALSEOF
 9860WHEN(X_%=Z%!w%)
 9861WHEN(Y_%=Z%!x%)
 9862WHEN(oy%=Z%!b_%)
 9863WHEN(e_%=Z%!O_%)
 9864WHEN(f_%=Z%!H_%)
 9865WHEN(m_%=Z%!x_%)
 9866WHEN(t_%=Z%!y_%)
 9867WHEN(a_%=Z%!Q_%)
 9868OTHERWISEXi%=FALSE
 9869ENDCASE:IFXi%THEN
 9870Z%!w%=X_%:Z%!x%=Y_%:Z%!b_%=oy%:Z%!O_%=e_%:Z%!H_%=f_%:Z%!x_%=m_%:Z%!y_%=t_%:Z%!Q_%=a_%:M%=Z%!w%:N%=Z%!x%:j_%=Z%!Cy%*M%:Uy%=Z%!vy%*N%+E_%:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCbJ
 9871PROCVy(Z%!z%,j_%,Uy%+4,TRUE):PROCpy(Z%!z%,FNc(Z%,"Board")):PROCW(Z%!sy%):PROCW(Z%!g_%):PROCW(Z%!Jy%):PROCX(Z%!sy%,M%*N%):PROCX(Z%!g_%,M%*N%<<2):PROCX(Z%!Jy%,(oy%+1)*n%):PROCX(Z%!Ou%,((M%+2+31)>>5)*4*(N%+2)):Z%!cy%=Z%!g_%:Z%!i_%=Z%!cy%+((M%*N%+3)AND-4):RESTOREERROR:PROCa
 9872ENDIF:ENDPROC
 9873DEFPROCbJ:PROCF(Vy%,FNC(6)):PROCc:PROCP:ENDPROC
 9874DEFPROCyJ:LOCALM%:M%=F_%:PROCZ(M%,Ry+1,1):PROCT(M%,M_,TRUE):PROCT(M%,Z_,FALSE):PROCT(M%,oy,FALSE):PROCv(M%,j,TRUE):PROCZ(M%,j+1,1):PROCZ(M%,Ty+1,o_):PROCZ(M%,qy+1,VJ):ENDPROC
 9875DEFPROCt_:LOCALM%,K%:IFFND("ViewP",F_%)THEN
 9876ELSE:M%=F_%:PROCZ(M%,Ry+1,Z%!G_%):PROCT(M%,M_,Z%!qy%=0):PROCT(M%,Z_,Z%!qy%>0):PROCT(M%,oy,Z%!qy%<0):PROCv(M%,j,Z%!qy%<=0):CASETRUEOF
 9877WHEN(Z%!qy%<0):K%=4
 9878WHEN(Z%!qy%=0):K%=2
 9879WHEN(Z%!qy%>0):K%=Z%!qy%
 9880ENDCASE:PROCZ(M%,j+1,K%):PROCZ(M%,Ty+1,Z%!HJ%):PROCZ(M%,qy+1,Z%!CJ%)
 9881ENDIF:ENDPROC
 9882DEFPROCVu(Q%,X%,E%,I%):LOCALM%:M%=F_%:CASEI%OF
 9883WHENRy,Ry+2:PROCJ(M%,I%,E%,Ry,1,b)
 9884WHENM_,oy:PROCv(M%,j,TRUE)
 9885WHENZ_:PROCv(M%,j,FALSE)
 9886WHENj,j+2:PROCJ(M%,I%,E%,j,1,99)
 9887WHENTy,Ty+2:PROCJ(M%,I%,E%,Ty,1,99)
 9888WHENqy,qy+2:PROCJ(M%,I%,E%,qy,1,99)
 9889WHENku:PROCyJ
 9890WHENJl:CASEZ%!q%OF
 9891WHEN_,o:PROCR_:IFE%AND4THEN
 9892PROCP
 9893ENDIF
 9894OTHERWISE:VDU7
 9895ENDCASE
 9896ENDCASE:ENDPROC
 9897DEFPROCR_:LOCALM%,j%:M%=F_%:B_%=FNA(M%,Ry+1):CASETRUEOF
 9898WHENFN_(M%,oy):dy%=-1
 9899WHENFN_(M%,Z_):dy%=FNA(M%,j+1)
 9900WHENFN_(M%,M_):dy%=0
 9901ENDCASE:k_%=FNA(M%,Ty+1):EJ%=FNA(M%,qy+1):j%=TRUE:CASEFALSEOF
 9902WHEN(Z%!G_%=B_%)
 9903WHEN(Z%!qy%=dy%)
 9904WHEN(Z%!HJ%=k_%)
 9905WHEN(Z%!CJ%=EJ%)
 9906OTHERWISEj%=FALSE
 9907ENDCASE:IFj%THEN
 9908Z%!G_%=B_%:Z%!qy%=dy%:Z%!HJ%=k_%:Z%!CJ%=EJ%:Z%?`u%+=1:PROCGy:CALLt_:PROCFy(Z%!z%)
 9909ENDIF:ENDPROC
 9910DEFPROCf_:LOCALM%:M%=Oy%:PROCZ(M%,_y,1):PROCZ(M%,Iy,1):PROCZ(M%,Yy,1):PROCZ(M%,Xy,1):ENDPROC
 9911DEFPROCn_:LOCALM%,_%:IFFND("Magnifier",Oy%)THEN
 9912ELSE:M%=Oy%:_%=Z%+_u%:PROCZ(M%,_y,_%!0):PROCZ(M%,Yy,_%!8):PROCZ(M%,Iy,_%!4):PROCZ(M%,Xy,_%!12)
 9913ENDIF:ENDPROC
 9914DEFPROCAJ(Q%,X%,E%,I%):LOCALM%:M%=Oy%:CASEI%OF
 9915WHEN_y-1,_y-2:PROC_y(M%,I%,E%,_y)
 9916WHENYy+1,Yy+2:PROCly(M%,I%,E%,Yy)
 9917WHENIy-1,Iy-2:PROC_y(M%,I%,E%,Iy)
 9918WHENXy+1,Xy+2:PROCly(M%,I%,E%,Xy)
 9919WHENBl:PROCf_
 9920WHEN`_:CASEZ%!q%OF
 9921WHEN_,o:PROCsy:IFE%AND4THEN
 9922PROCP
 9923ENDIF
 9924OTHERWISE:VDU7
 9925ENDCASE
 9926ENDCASE:ENDPROC
 9927DEFPROCKu(p%,I%):CASEp%OF
 9928WHEN13,398:IFp%=13ANDI%=XyTHEN
 9929CASEZ%!q%OF
 9930WHEN_,o:SYS&400d2,-1,-1:W%!8=1:W%!12=W%!0:W%!16=`_:SYS&81680,,W%:W%!8=0:LOCALERROR:ONERRORLOCALRESTOREERROR:SYS&81680,,W%:PROCQ
 9931PROCsy:RESTOREERROR:SYS&81680,,W%
 9932OTHERWISE:VDU7
 9933ENDCASE
 9934ELSE:PROCz_(Oy%,I%)
 9935ENDIF
 9936WHEN27:PROCP
 9937WHEN399:PROCCJ(Oy%,I%)
 9938OTHERWISE:SYS&400dc,p%
 9939ENDCASE:ENDPROC
 9940DEFPROCsy:LOCALM%,j%,_%:M%=Oy%:s%!0=FNA(M%,_y):s%!8=FNA(M%,Yy):s%!4=FNA(M%,Iy):s%!12=FNA(M%,Xy):_%=Z%+_u%:j%=TRUE:CASEFALSEOF
 9941WHEN(_%!0=s%!0)
 9942WHEN(_%!4=s%!4)
 9943WHEN(_%!8=s%!8)
 9944WHEN(_%!12=s%!12)
 9945OTHERWISEj%=FALSE
 9946ENDCASE:IFj%THEN
 9947_%!0=s%!0:_%!4=s%!4:_%!8=s%!8:_%!12=s%!12:PROCGy:CALLt_:PROCFy(Z%!z%)
 9948ENDIF:ENDPROC
 9949DEFPROCp_(Q%,X%,E%,I%):LOCALM%:M%=S_%:CASEI%OF
 9950WHENVy,Vy+2:PROCJ(M%,I%,E%,Vy,1,99)
 9951WHENWl:PROCeu
 9952WHENMa:PROCY_:IFE%AND4THEN
 9953PROCP
 9954ENDIF
 9955ENDCASE:ENDPROC
 9956DEFPROCeu:LOCALM%:M%=S_%:PROCZ(M%,Vy+1,d_):ENDPROC
 9957DEFPROCmJ:LOCALM%:IFFND("Centre",S_%)THEN
 9958ELSE:M%=S_%:PROCZ(M%,Vy+1,Z%!fu%)
 9959ENDIF:ENDPROC
 9960DEFPROCY_:LOCALM%:M%=S_%:Su%=FNA(M%,Vy+1):Z%!fu%=Su%:ENDPROC
 9961DEFPROCb:LOCALQ%:IFWy%<>0THEN
 9962PROCR(Wy%):Wy%=0
 9963ENDIF:Q%=FNDy:IFZ%<>0THEN
 9964PROCey(Z%!o%,ZJ,Z%+Wu%):Q%=FNj(Z%!z%):PROCWy
 9965ELSE:PROCF(Gn%,FNC(1))
 9966ENDIF:ENDPROC
 9967DEFPROCfy:LOCALU%,F%:F%=Z%+e%:F%!Ky%=0:PROCny(Z%!z%,Z%+nu%,-1):U%=FNM(512):!U%=Z%!z%:SYS&400cb,,U%:U%!256=Z%!o%:SYS&400cb,,U%+256:U%!(256+28)=-1:PROCMy(U%+256,U%):PROCC(U%,512):IFZ%!Yy%<>Z%!Qy%THEN
 9968Z%!q%=fy:PROCD("Move",Z%)
 9969ENDIF:IFZ%!q%=_THEN
 9970PROCz(1):Z%!q%=Hy:PROCD("Highlight_At_Start",Z%)
 9971ENDIF:PROCFy(Z%!z%):ENDPROC
 9972DEFPROCP_:LOCALF%:PROCe(Z%):CASEZ%!q%OF
 9973WHENo:PROCc:PROCz(3)
 9974OTHERWISE:PROCn(Z%!z%,Z%+nu%):PROCBu(Z%!o%):IFZ%!C_%>0THEN
 9975PROCz(4)
 9976ELSE:PROCz(3)
 9977ENDIF
 9978ENDCASE:ENDPROC
 9979DEFPROCa:IF(Z%!q%=o)OR(Z%!C_%=0)THEN
 9980Z%!q%=_:PROCWy
 9981ELSE:IFFNa(3,FNC(6))=1THEN
 9982Z%!q%=_:PROCWy
 9983ENDIF
 9984ENDIF:ENDPROC
 9985DEFPROCWy:PROCe(Z%):PROCCy(Z%!z%,Z%+nu%):Z%!C_%=0:Z%!_J%=0:Z%!Nl%=FALSE:Z%!L_%=FALSE:CALLui:PROCfy:ENDPROC
 9986DEFPROCv(M%,J%,rl%):PROCZy(M%,J%,rl%):PROCZy(M%,J%+1,rl%):PROCZy(M%,J%+2,rl%):ENDPROC
 9987DEFPROCJ(M%,I%,E%,K_%,Al%,Il%):PROCQy(M%,I%,E%,K_%+2,K_%,K_%+1,Al%,Il%):ENDPROC
 9988DEFPROCly(M%,I%,E%,K_%):PROCQy(M%,I%,E%,K_%+1,K_%+2,K_%,1,99):ENDPROC
 9989DEFPROC_y(M%,I%,E%,K_%):PROCQy(M%,I%,E%,K_%-2,K_%-1,K_%,1,99):ENDPROC
 9990DEFPROCOu(Q%,X%,E%,I%):Z%!hJ%=(Z%!hJ%=0):aJ%=Z%!hJ%:IFaJ%THEN
 9991PROC_(Z%!o%,Y_,FNH("On"))
 9992ELSE:PROC_(Z%!o%,Y_,FNH("Off"))
 9993ENDIF:ENDPROC
 9994DEFPROCrJ:LOCALO%,P%,V%,L%,`%:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("@.Document:Constants (start)")
 9995_=0:Wy=1:fy=2:R_=3:_J=4:o=5:Du=6:Hy=7:_l=-1:GJ=-2:t=4:ZJ=0:Yi=2:J_=4:Y_=6:Fi=8:`y=6:IJ=3:k=3:Ay=7:Sy=11:Jy=17:Ny=21:ay=25:Ly=31:Uy=35:Rl=38:Vi=39:Ry=3:Ty=9:qy=13:M_=18:Z_=19:oy=20:j=21:ku=24:Jl=25:Gy=1:Dy=5:eu=8:Gi=9:Zy=1:`=5:l=9:Oy=13:nu=16:lu=17
 9996q_=18:Vy=1:Wl=4:Ma=5:_y=3:Yy=5:Iy=11:Xy=13:Bl=16:`_=17:q`=0:pu=1:Q_=2:un=3:Vu=4:Ni=5:al=0:Hu=1:Ei=2:ol=0:zu=1:vi=2:Wi=3:sJ=4:g_=5:Q_=6:YJ=7:Xi=0:`i=1:kl=2:Aa=3:di=4:Wu=5:iu=6:qJ=0:Ou=1:NJ=2:D_=3:fl=0:Zl=1:nJ=2:_i=3:uu=4:mu=6:jl=0:pi=1:Dl=1:Cl=4:li=1
 9997fi=2:ul=3:v$="Zappa":__=(40*23)DIV2:w_=7:xJ=10:TJ=1:CJ=1:a_=1:eJ=40:x_=23:Gu=2:o_=3:VJ=1:ci=-1:f_=30:RJ=10:WJ=18:c_=88:EJ=192:Oi=4:d_=9:Pi=FALSE:Ri=TRUE:Bu=TRUE:Ll=TRUE:Sa=1:Fu=TRUE:lJ=0:Xl=TRUE:Su=1:hi=1:ru=1:fu=1:uJ=TRUE:ll=TRUE:A_%=-101:ty%=-102:DIMJ%(8,1):DIMC%(2,2):DIMW%(8)
 9998J%()=0,0,+1,0,+1,-1,0,-1,-1,-1,-1,0,-1,+1,0,+1,+1,+1:W%()=0,1,9,8,10,2,6,4,5:C%()=4,5,6,3,0,7,2,1,8:RESTOREERROR:LOCALERROR:ONERRORLOCALRESTOREERROR:SYS&400ec,`%,-1:PROCA("@.Document: Constants <real>")
 9999`%=HIMEM-32768:SYS&400ec,`%+32768,-1TOL%:L%+=32768:O%=`%+32768:P%=0:V%=14:IFO%=L%THEN
10000ERROR1,"Not enough memory to start application"
10001ENDIF:P%=0:O%=`%+32768:[OPTV%:.Pl%DCD0:.tl%DCD0:.Ky%DCD0:.J_%DCD0:.nl%DCD0:.Da%DCD0:.kJ%DCD0:.ky%DCD0:.Tl%DCD0:.gy%DCD0:.u_%DCD0:.by%DCD0:.Rl%DCD0:.au%:]:P%=0:O%=`%+32768:[OPTV%:.Ya%DCD0:.Iu%DCD0:.Sl%DCD0:.li%DCD0:.W_%DCD0:.wJ%DCD0:DCD0:DCD0:.c_%:]
10002iJ%=5:P%=0:O%=`%+32768:[OPTV%:.w%DCD0:.x%DCD0:.O_%DCD0:.H_%DCD0:.b_%DCD0:.y_%DCD0:.Q_%DCD0:.x_%DCD0:.s_%:]:P%=0:O%=`%+32768:[OPTV%:.El%:]:P%+=24:[OPTV%:.iu%DCD0:.Mu%DCD0:ALIGN:.Mi%:]:P%=s_%:O%=`%+32768:[OPTV%:.r%DCD0:.`J%:]:P%+=l_:[OPTV%
10003.za%:]:P%+=Mi%*yJ%:[OPTV%:ALIGN:.l_%:]:P%=0:O%=`%+32768:[OPTV%:.Nn%DCD0:.Qn%DCD0:.Wi%DCD0:.u%DCD0:.my%DCD0:.gl%DCD0:.n%:]:sJ%=1<<0:z_%=1<<1:P%=s_%:O%=`%+32768:[OPTV%:.v_%DCD0:.q%DCD0:.G_%DCD0:.l%DCD0:.Qy%DCD0:.Yy%DCD0:.Ri%DCD0:._a%DCD0:.Cy%DCD0
10004.vy%DCD0:.vu%DCD0:.ui%DCD0:.ey%DCD0:.Ei%DCD0:.Vu%DCD0:._y%DCD0:.RJ%DCD0:.r_%DCD0:.Bi%DCD0:.Kl%DCD0:.uJ%DCD0:.h_%DCD0:.qy%DCD0:.Qu%DCD0:.HJ%DCD0:.CJ%DCD0:.g_%DCD0:.sy%DCD0:.cy%DCD0:.i_%DCD0:.ou%DCD0:.Jy%DCD0:.Ou%DCD0:.fu%DCD0:.NJ%DCD0:.DJ%DCD0
10005.`_%DCD0:.GJ%DCD0:.hJ%DCD0:.bJ%DCD0:.Ku%DCD0:.T_%DCD0:.L_%DCD0:.Nl%DCD0:.C_%DCD0:._J%DCD0:.V_%DCD0:.JJ%DCD0:.ul%DCD0:.Ny%DCD0:.t%DCD0:.Ay%DCD0:.zu%:]:P%+=16*2:[OPTV%:.e%:]:P%+=au%:[OPTV%:.z%DCD0:.o%DCD0:.su%DCD0:.Fu%DCD0:.Hl%DCD0:.ql%DCD0:.dl%DCD0
10006.Li%DCD0:.Ni%DCD0:._l%DCD0:.cl%DCD0:.Oi%DCD0:.sl%DCD0:.Ii%DCD0:._u%:]:P%+=16:[OPTV%:.`u%:]:P%+=256:[OPTV%:.Wu%:]:P%+=y_:[OPTV%:.nu%:]:P%+=l_:[OPTV%:.vl%:]:SYS&400ec,`%,-1:RESTOREERROR:ENDPROC
10007DEFFNDy:LOCALU_%,M%,N%,F%,oi%:SYS&606c0:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCe_:PROCQ
10008U_%=TRUE:M%=X_%:N%=Y_%:IFNOT(FNB(Z%,vl%))THEN
10009FORJ%=0TO(vl%-1)STEP4:Z%!J%=0:NEXTJ%:oi%=FNu(dy%):CASETRUEOF
10010WHENFNB(Z%!sy%,M%*N%)
10011WHENFNB(Z%!g_%,M%*N%<<2)
10012WHENFNB(Z%!Jy%,(oy%+1)*n%)
10013WHENFNB(Z%!Qy%,oi%*16*c_%)
10014WHENFNB(Z%!Ou%,((M%+2+31)>>5)*4*(N%+2))
10015OTHERWISE:Z%!cy%=Z%!g_%:Z%!i_%=Z%!cy%+((M%*N%+3)AND-4):Z%!w%=X_%:Z%!x%=Y_%:Z%!G_%=B_%:Z%!qy%=dy%:Z%!O_%=e_%:Z%!H_%=f_%:Z%!b_%=oy%:Z%!y_%=t_%:Z%!Q_%=a_%:Z%!x_%=m_%:Z%!_y%=iy%:Z%!uJ%=rJ%:Z%!HJ%=k_%:Z%!CJ%=EJ%:Z%!T_%=Au%:Z%!r_%=__%:Z%!RJ%=o_%:Z%!fu%=Su%
10016Z%!NJ%=xJ%:Z%!DJ%=jJ%:Z%!`_%=eJ%:Z%!GJ%=pJ%:Z%!hJ%=aJ%:Z%!bJ%=Zu%:F%=Z%+_u%:F%!0=s%!0:F%!4=s%!4:F%!8=s%!8:F%!12=s%!12:F%=Z%+e%:F%!kJ%=tJ%:F%!J_%=IJ%:F%!ky%=TJ%:F%!gy%=FJ%:F%!u_%=XJ%:F%!by%=PJ%:F%!Tl%=pl%:U%=FNM(128):!U%=ry%:U%!4=nu:SYS&400ce,,U%
10017F%=Z%+zu%:F%!0=U%!8:F%!4=U%!12:F%!8=U%!16:F%!12=U%!20:PROCC(U%,128):PROCO(Z%+Wu%,W$):F%=FNX("Board"):IFF%THEN
10018F%+=m:F%?34=Z%!RJ%:F%?35=Z%!r_%:Z%!z%=FNg("Board",+48,-48):Z%!o%=FNg("Status",+48,-48)
10019ENDIF:IF(Z%!z%=0)OR(Z%!o%=0)THEN
10020PROCF(Vy%,FNC(3)):U_%=TRUE
10021ELSE:Z%!C_%=0:Z%!Yy%=Z%!Qy%:Z%!v_%=!xy%:!xy%=Z%:PROCG(Z%):Z%!q%=_:PROCpy(Z%!z%,FNc(Z%,"Board")):PROCp:U_%=FALSE
10022ENDIF
10023ENDCASE
10024ENDIF:IFU_%AND(Z%<>0)THEN
10025PROCc
10026ENDIF:SYS&606c1:RESTOREERROR:=U_%
10027DEFPROCe_:SYS&606c1:PROCc:PROCQ:ENDPROC
10028DEFFNc(F%,a$):LOCALD%,A%,B%,C%:D%=FNM(512):PROCQJ(a$,D%):A%=F%:B%=D%:C%=D%+256:CALLbi:a$=FNN(D%+256):PROCC(D%,512):=a$
10029DEFPROCc:LOCALD%:IFZ%<>0THEN
10030D%=xy%:WHILE!D%<>0AND!D%<>Z%:D%=!D%+v_%:ENDWHILE:IF!D%THEN
10031!D%=Z%!v_%:Z%!v_%=0
10032ENDIF:PROCe(Z%):PROCR(Z%!z%):PROCR(Z%!o%):PROCW(Z%!sy%):PROCW(Z%!g_%):PROCW(Z%!Jy%):PROCW(Z%!Qy%):PROCW(Z%!Ou%):PROCW(Z%):PROCG(0)
10033ENDIF:ENDPROC
10034DEFFNu(Jl%):LOCALT%,lu%,Pu%,M%,N%:M%=P%(Z%!G_%):N%=B%(Z%!G_%):lu%=FNS(M%,N%):Pu%=FNP(M%,N%):T%=FNXy(Jl%,Pu%,lu%):IF(Jl%>0)AND(Jl%<Pu%)THEN
10035T%=Jl%
10036ENDIF:=T%
10037DEFFNXy(La%,Pu%,lu%):LOCALT%:CASELa%OF
10038WHEN-1:T%=Pu%
10039WHEN0:T%=lu%
10040OTHERWISE:T%=FNP(FNS(La%,Pu%),lu%)
10041ENDCASE:=T%
10042DEFFNI(M%):LOCALY%,F%:F%=!xy%:Y%=TRUE:WHILEF%ANDY%:Y%=(M%<>F%!z%)AND(M%<>F%!o%):IFY%THENF%=F%!v_%
10043ENDWHILE:IFY%=0THEN
10044PROCG(F%):IFM%=Z%!z%THENM%=A_%ELSEM%=ty%
10045ENDIF:=M%
10046DEFFNYy(M%):LOCALY%,F%:F%=!xy%:Y%=TRUE:WHILEF%ANDY%:Y%=(M%<>F%!z%)AND(M%<>F%!o%):IFY%THENF%=F%!v_%
10047ENDWHILE:IFY%=0THEN
10048PROCG(F%):IFM%=Z%!z%THENM%=A_%ELSEM%=ty%
10049ENDIF:=M%
10050DEFPROCG(F%):Z%=F%:!S_=Z%:ENDPROC
10051DEFFN`:LOCALY%,F%:F%=!xy%:Y%=TRUE:WHILEF%ANDY%:Y%=(F%!q%<>o):IFY%THENF%=F%!v_%
10052ENDWHILE:IFY%=0THEN
10053PROCG(F%)
10054ENDIF:=(Y%=0)
10055DEFPROCe(F%):PROCH("Demo",F%):PROCH("Centre",F%):PROCH("Move",F%):PROCH("Highlight",F%):PROCH("Highlight_At_Start",F%):F%!h_%=FALSE:F%=F%+e%:F%!Ky%=0:ENDPROC
10056DEFFN_Null_Reason_Highlight_At_Start(A%):PROCG(A%):IFZ%!DJ%THEN
10057PROCD("Centre",Z%)
10058ENDIF:IFZ%!bJ%THEN
10059Z%!q%=Hy:PROCw(Z%!t%,Z%!Ay%,0)
10060ELSE:Z%!q%=_:PROCg:PROCUy
10061ENDIF:IFZ%!L_%THEN
10062PROCy("Highlight_At_Start",Z%):PROCV:A%=FALSE
10063ELSE:A%=TRUE
10064ENDIF:=A%
10065DEFPROCd:CASEZ%!q%OF
10066WHEN_,Wy:PROCI:Z%!q%=Wy:PROCw(Z%!t%,Z%!Ay%,0)
10067OTHERWISE:VDU7
10068ENDCASE:ENDPROC
10069DEFPROCw(Vi%,Hi%,Di%):LOCALF%,N%,Gy%,ky,ey:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("Highlight_Board")
10070CASEDi%OF
10071WHEN0:N%=FNS(ABS(Z%!w%-Vi%),Vi%):Gy%=FNS(ABS(Z%!x%-Hi%),Hi%):ky=FNS(N%*Z%!Cy%,Gy%*Z%!vy%):ky=FNP(16383,ky):ey=FNP(Z%!Cy%,Z%!vy%)/4
10072OTHERWISE:ky=FNP(Z%!Cy%,Z%!vy%)/5:ey=FNS(Z%!Cy%,Z%!vy%)*SQR(2):ey=FNP(16383,ey)
10073ENDCASE:F%=Z%+e%:F%!Pl%=Vi%:F%!tl%=Hi%:F%!Ky%=F%!J_%+F%!ky%:F%!Da%=ey*(1<<16):F%!nl%=((ky-ey)/(F%!J_%))*(1<<16):PROCxu:IFZ%!T_%THEN
10074PROCD("Highlight",Z%)
10075ELSE:REPEAT:UNTILFN_Null_Reason_Highlight(Z%)
10076ENDIF:ENDPROC
10077DEFPROCxu:LOCALyu,rJ,oi,F%:F%=Z%+e%:yu=F%!gy%/256:rJ=F%!u_%/256:oi=F%!by%/256:F%!Rl%=0.5+256*(1+(2*(1-oi)/(rJ-yu))):ENDPROC
10078DEFFN_Null_Reason_Highlight(A%):PROCG(A%):A%=USR(qi):IFA%THEN
10079A%=Z%!q%:Z%!q%=_:CASEA%OF
10080WHENR_:PROCc_
10081WHEN_J:PROChJ
10082WHENHy:PROCg:PROCUy
10083ENDCASE
10084ENDIF:=A%
10085DEFPROCI:IFZ%!q%=WyTHEN
10086CALLpJ:PROCy("Highlight",Z%):Z%!q%=_
10087ENDIF:ENDPROC
10088DEFPROCLJ(Dy%):CASEDy%OF
10089WHEN-1:PROCd
10090WHENOu:PROCty
10091WHENqJ
10092WHENNJ
10093OTHERWISE:PROCI:IFDy%>=D_THEN
10094tJ%=Dy%-D_:Z%!(e%+kJ%)=tJ%
10095ENDIF:PROCd
10096ENDCASE:ENDPROC
10097DEFPROCty:Zu%=(Z%!bJ%=0):Z%!bJ%=Zu%:ENDPROC
10098DEFPROCHJ:LOCALM,S,R,W,P,s,H,z,N,L:LOCALDJ,Ey,r_:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("Highlight")
10099M=4:S=5:R=6:W=7:P=8:s=3:H=9:z=12:N=2:L=s:DJ=0:Ey=au%:r_=Ey+4:[OPTV%:ALIGN:.qi:FNZ:STMFD(A)!,{4-9,12,Z}:SUB A,A,#256:BL r:LDR0,[12,#z%]:STR0,[A]:BL P_:STR0,[A,#4]:BL py:SUB1,1,0:SUB3,3,0:ADD0,A,#4:STMIB0,{1-3}:MOV1,A:SWI &400c9:BL Qy:ADD1,12,#ey%
10100LDMIA1,{1-2}:ADD M,M,1:ADD S,S,2:.C TEQ0,#0:ADDne0,12,#e%:LDRne P,[0,#Ky%]:BLne si:MOVne1,A:SWIne &400ca:Bne C:ADD1,12,#e%:LDR0,[1,#Ky%]:SUBS0,0,#1:MOVle0,#0:STR0,[1,#Ky%]:MVNle0,#NOT(-1):MOVgt0,#0:ADD A,A,#256:LDMFD(A)!,{4-9,12,pc}^:.P_:STMFD(A)!,{Z}
10101ADD11,12,#e%:ADD M,11,#Pl%:LDMIA M,{M,S}:ADD0,12,#Cy%:LDMIA0,{0-1}:MUL M,0,M:ADD M,M,0,LSR#1:MUL S,1,S:ADD S,S,1,LSR#1:RSB S,S,#0:ADD0,11,#Ky%:LDMIA0,{0-3}:CMP2,#0:Bgt Pu:LDR1,[11,#ky%]:SUBS0,0,1:MOVlt0,#0:MOV1,0:.Pu:CMP0,1:MOVgt0,1:MLA 0,2,0,3
10102LDR Z,[11,#Tl%]:ADD0,Z,0,LSR#16:ADD3,S,0:ADD2,M,0:SUB1,S,0:SUB0,M,0:LDMFD(A)!,{pc}^:.si:STMFD(A)!,{P,Z}:ADD0,12,#e%:LDR0,[0,#J_%]:CMP P,0:BLle N_:ADD0,12,#e%:LDR0,[0,#ky%]:SUBS P,P,0:BLgt N_:LDMFD(A)!,{P,pc}^:.N_:STMFD(A)!,{0-12,Z}:BL Nu:TEQ0,#2
10103EORne0,P,P,LSR#4:EORne0,0,0,LSR#3:ANDne0,0,#15:ADDne0,0,#3<<4:MOVeq0,#7OR(3<<4):SWI &400e6:ADD11,12,#e%:ADD R,11,#nl%:LDMIA R,{R,W,Z}:MLA W,R,P,W:MOV W,W,LSR#16:ADDpc,pc,Z,LSL#2:B My:B Li:B Bi:B Ji:B PJ:B Yl:B Ol:B Ci:.My LDMFD(A)!,{0-12,pc}^:.dyFNQy:.Li
10104MOV0,#68:MOV1,M:MOV2,S:SWI 69:MOV0,#145:MOV1,W:MOV2,#0:SWI 69:B My:.Bi:MOV0,#68:MOV1,M:MOV2,S:SWI 69:FNF("",s,dy):AND P,P,#16-1:ADD1,s,P,LSL#3:LDMIA1,{1-2}:MUL 1,W,1:ADD1,M,1,ASR#16:MUL 2,W,2:ADD2,S,2,ASR#16:MOV0,#68:SWI 69:ADD P,P,#13:AND P,P,#16-1
10105ADD1,s,P,LSL#3:LDMIA1,{1-2}:MUL 1,W,1:ADD1,M,1,ASR#16:MUL 2,W,2:ADD2,S,2,ASR#16:MOV0,#165:SWI 69:B My:.Ji:MOV0,#68:MOV1,M:MOV2,S:SWI 69:FNF("",s,dy):AND P,P,#16-1:ADD1,s,P,LSL#3:LDMIA1,{1-2}:MUL 1,W,1:ADD1,M,1,ASR#16:MUL 2,W,2:ADD2,S,2,ASR#16:MOV0,#68
10106SWI 69:ADD P,P,#3:AND P,P,#16-1:ADD1,s,P,LSL#3:LDMIA1,{1-2}:MUL 1,W,1:ADD1,M,1,ASR#16:MUL 2,W,2:ADD2,S,2,ASR#16:MOV0,#173:SWI 69:B My:.PJ:BL iy:ADD P,P,#16/4:BL iy:ADD P,P,#16/4:BL iy:ADD P,P,#16/4:BL iy:B My:.iy:FNF("",s,dy):AND P,P,#16:ADD H,s,P,LSL#3
10107LDMIA H,{H,z}:MUL 0,W,H:ADD M,0,M,LSL#16:MUL 0,W,z:ADD S,0,S,LSL#16:MOV0,H:BL aJ:MOV H,0:MOV0,z:BL aJ:MOV z,0:MOV0,#68:LDR N,[11,#gy%]:MOV N,N,ASR#1:RSB N,N,#0:MOV L,#0:BL zy:MOV0,#68:LDR N,[11,#gy%]:MOV N,N,ASR#1:RSB N,N,#0:LDR L,[11,#by%]:BL zy
10108MOV0,#117:LDR N,[11,#gy%]:MOV N,N,ASR#1:LDR L,[11,#by%]:BL zy:MOV0,#68:LDR N,[11,#u_%]:MOV N,N,ASR#1:RSB N,N,#0:LDR L,[11,#by%]:BL zy:MOV0,#68:LDR N,[11,#gy%]:MOV N,N,ASR#1:LDR L,[11,#by%]:BL zy:MOV0,#85:MOV N,#0:LDR L,[11,#Rl%]:BL zy:B My:.aJ
10109STMFD(A)!,{11,Z}:MOV1,R:MOV2,#1<<24:BL Al:LDMFD(A)!,{11,pc}^:.Yl:MOV0,#68:SUB1,M,W:SUB2,S,W:SWI 69:MOV0,#5:ADD1,M,W:SUB2,S,W:SWI 69:MOV0,#37:ADD1,M,W:ADD2,S,W:SWI 69:MOV0,#37:SUB1,M,W:ADD2,S,W:SWI 69:MOV0,#45:SUB1,M,W:SUB2,S,W:SWI 69:B My:.Ol
10110FNF("",s,dy):AND P,P,#16-1:ADD H,s,P,LSL#3:LDMIA H,{H,z}:MUL H,W,H:MUL z,W,z:MOV0,#68:ADD1,M,H,ASR#16:ADD2,S,z,ASR#16:SWI 69:MOV0,#5:ADD1,M,z,ASR#16:SUB2,S,H,ASR#16:SWI 69:MOV0,#37:SUB1,M,H,ASR#16:SUB2,S,z,ASR#16:SWI 69:MOV0,#37:SUB1,M,z,ASR#16
10111ADD2,S,H,ASR#16:SWI 69:MOV0,#45:ADD1,M,H,ASR#16:ADD2,S,z,ASR#16:SWI 69:B My:.Ci:FNF("",s,dy):MOV R,#6:MOV0,#68:.CAND P,P,#16-1:ADD H,s,P,LSL#3:LDMIA H,{H,z}:MUL H,W,H:MUL z,W,z:ADD1,M,H,ASR#16:ADD2,S,z,ASR#16:SWI 69:SUBS R,R,#1:ADDgt P,P,#1
10112SUBgt W,W,W,ASR#3:MOVgt0,#37:Bgt C:B My:.zy:MUL 1,H,N:RSB1,1,#0:MLA 1,z,L,1:ADD1,M,1:MOV1,1,ASR#16:MUL 2,H,L:MLA 2,z,N,2:SUB2,S,2:MOV2,2,ASR#16:SWI 69:MOVSpc,Z:DCB0:DCB0:DCB0:DCB24:.xi DCD0:DCD0:.rl:FNZ:STMFD(A)!,{4-9,12,Z}:SUB O,O,#r_:MOV12,0
10113STR1,[O,#Ey]:LDR0,[1]:STR0,[12,#su%]:ADD0,O,#DJ:ADD1,12,#e%:MOV2,#au%:BL BJ:LDR1,[O,#Ey]:SWI &400c8:TEQ0,#0:Beq ji:BL LJ:ADD M,12,#e%:MOV2,#`+1:BL K_:STR0,[M,#gy%]:MOV S,0:MOV2,#Zy+1:BL K_:STR0,[M,#u_%]:SUB S,0,S:MOV2,#l+1:BL K_:STR0,[M,#by%]
10114RSBS0,0,#256:ADDne0,0,0:MOVne1,S:ADDne0,0,1,LSR#1:BLne FJ:STR0,[M,#Rl%]:MOV0,#F_:LDR1,[12,#su%]:MOV2,#Oy+1:SWI &dcb8c:MOV P,0:BL k_:LDR1,[O,#Ey]:.C SWI &81681:STMFD(A)!,{4-7}:ADD4,1,#28:LDMIA4,{4-7}:ADD0,12,#zu%+16:LDMIA0,{0-3}:CMP0,4:MOVlt0,4
10115CMP1,5:MOVlt1,5:CMP2,6:MOVgt2,6:CMP3,7:MOVgt3,7:LDMFD(A)!,{4-7}:CMP0,2:CMPlt1,3:Bge ai:ADD V,V,#Ri%:LDMIA V,{V,Z}:SUB2,2,V:SUB3,3,Z:BIC0,0,#&ff000000:BIC0,0,#&ff0000:ORR0,0,1,LSL#16:BIC2,2,#&ff000000:BIC2,2,#&ff0000:ORR1,2,3,LSL#16:FNF("",2,xi)
10116STMIA2,{0-1}:SUB0,2,#1:MOV1,#9:SWI 70:LDR1,[O,#Ey]:BL n_:.ai:LDR1,[O,#Ey]:SWI &400ca:TEQ0,#0:Bne C:.ji:ADD0,12,#e%:ADD1,O,#DJ:MOV2,#au%:BL BJ:ADD O,O,#r_:LDMFD(A)!,{4-9,12,pc}^:.K_:MOV0,#F_:LDR1,[12,#su%]:SWI &dcb8c:MOV0,0,LSL#8:MOV1,#100
10117ADD0,0,1,LSR#1:B FJ:.k_:ADD W,12,#zu%:LDMIA(W)!,{0-3}:ADD M,12,#ey%:LDMIA M,{M,S}:ADD0,M,0:ADD1,S,1:ADD2,M,2:ADD3,S,3:STMIA W,{0-3}:SUB R,2,0:MOV R,R,LSL#16-1:MOV W,R,LSR#1:ADD M,0,2:MOV M,M,ASR#1:ADD S,1,3:MOV S,S,ASR#1:MOVSpc,Z:.n_
10118STMFD(A)!,{0-12,Z}:MOV0,#128+0:SWI &400e6:SWI c+16:ADD11,12,#e%:B PJ:.tl:FNZ:STMFD(A)!,{0-12,Z}:SUB A,A,#256:BL r:ADD1,12,#zu%:LDMIA1,{1-4}:LDR0,[12,#su%]:STMIA A,{0-4}:MOV1,A:SWI &400c9:TEQ0,#0:Beq ml:BL LJ:BL k_:MOV1,A:.C BL n_:MOV1,A:SWI &400ca
10119TEQ0,#0:Bne C:.ml:ADD A,A,#256:LDMFD(A)!,{0-12,pc}^:.KJ:ADD1,12,#e%:LDR0,[1,#Ky%]:CMP0,#0:MOVleSpc,Z:STMFD(A)!,{0-12,Z}:BL P_:ADD0,12,#ey%:LDMIA0,{0-1}:ADD M,M,0:ADD S,S,1:ADD H,12,#e%:LDR W,[H,#Ky%]:LDR R,[H,#ky%]:SUB R,R,#1:.C SUBS P,W,R
10120LDRgt0,[H,#J_%]:ADDgt0,0,#1:CMPgt0,P:BLgt N_:SUBS R,R,#1:Bge C:LDMFD(A)!,{0-12,pc}^:.pJ:FNZ:STMFD(A)!,{4-9,12,Z}:SUB A,A,#256:BL r:LDR0,[12,#z%]:STR0,[A]:ADD W,12,#e%:LDR R,[W,#Ky%]:LDR0,[W,#ky%]:ADD0,0,R:ADD0,0,#1:STR0,[W,#Ky%]:BL P_:STR R,[W,#Ky%]
10121STR0,[A,#4]:BL py:SUB1,1,0:SUB3,3,0:ADD0,A,#4:STMIB0,{1-3}:MOV1,A:SWI &400c9:BL Qy:.C TEQ0,#0:BLne KJ:MOVne1,A:SWIne &400ca:Bne C:ADD A,A,#256:LDMFD(A)!,{4-9,12,pc}^:]:ENDPROC
10122DEFFNQy:LOCALR%,_%,N%,Gu%,ru%:R%=(COS(2*PI/16)*(1<<16))+0.5:_%=(SIN(2*PI/16)*(1<<16))+0.5:N%=((1/SQR(2))*(1<<16))+0.5:Gu%=1<<16:ru%=0:[OPTV%:DCDGu%:DCDru%:DCDR%:DCD_%:DCDN%:DCDN%:DCD_%:DCDR%:DCDru%:DCDGu%:DCD-_%:DCDR%:DCD-N%:DCDN%:DCD-R%:DCD_%:DCD-Gu%:DCDru%
10123DCD-R%:DCD-_%:DCD-N%:DCD-N%:DCD-_%:DCD-R%:DCDru%:DCD-Gu%:DCD_%:DCD-R%:DCDN%:DCD-N%:DCDR%:DCD-_%:]:=0
10124DEFPROCUJ(Q%,X%,E%,I%):LOCALM%,a%:M%=P_%:CASEI%OF
10125WHENGy,Gy+2:a%=FNA(M%,Dy+1):PROCJ(M%,I%,E%,Gy,a%,999)
10126WHENDy,Dy+2:a%=FNA(M%,Gy+1):PROCJ(M%,I%,E%,Dy,1,a%)
10127WHENeu:PROCDu
10128WHENGi:PROCdu:IFE%AND4THEN
10129PROCP
10130ENDIF
10131ENDCASE:ENDPROC
10132DEFPROCDu:LOCALM%:M%=P_%:PROCZ(M%,Gy+1,f_):PROCZ(M%,Dy+1,RJ):ENDPROC
10133DEFPROCXJ:LOCALM%,F%:IFFND("Highlight",P_%)THEN
10134ELSE:M%=P_%:F%=Z%+e%:PROCZ(M%,Gy+1,F%!J_%):PROCZ(M%,Dy+1,F%!ky%)
10135ENDIF:ENDPROC
10136DEFPROCdu:LOCALM%,F%,j%:M%=P_%:F%=Z%+e%:IJ%=FNA(M%,Gy+1):TJ%=FNA(M%,Dy+1):j%=TRUE:CASEFALSEOF
10137WHEN(F%!J_%=IJ%)
10138WHEN(F%!ky%=TJ%)
10139OTHERWISEj%=FALSE
10140ENDCASE:IFj%THEN
10141PROCI:F%!J_%=IJ%:F%!ky%=TJ%
10142ENDIF:PROCd:ENDPROC
10143DEFPROCpJ(Q%,X%,Eu%,I%):LOCALM%,a%,d%,E%,R%,mu%,j%:M%=ry%:d%=FNA(M%,`+1):E%=FNA(M%,Zy+1):R%=FNA(M%,l+1):zi%=FNA(M%,Oy+1):CASEI%OF
10144WHENZy,Zy+2:a%=FNS(d%+1,2*(100-R%)+d%):PROCJ(M%,I%,Eu%,Zy,a%,100)
10145WHEN`,`+2:a%=FNP(E%-1,2*(100-R%)+E%):PROCJ(M%,I%,Eu%,`,0,a%)
10146WHENl,l+2:a%=FNP(99,100-((E%-d%)DIV2)):mu%=FNS(d%,100-((E%-d%)DIV2)*d%):PROCJ(M%,I%,Eu%,l,mu%,a%)
10147WHENOy,Oy+2:PROCJ(M%,I%,Eu%,Oy,0,15)
10148WHENlu:PROCaJ
10149WHENq_:PROCTJ
10150ENDCASE:IF(Eu%=1)AND(I%=q_)THEN
10151PROCP
10152ELSE:j%=TRUE:CASEFALSEOF
10153WHEN(d%=FNA(M%,`+1))
10154WHEN(E%=FNA(M%,Zy+1))
10155WHEN(R%=FNA(M%,l+1))
10156WHEN(zi%=FNA(M%,Oy+1))
10157OTHERWISEj%=FALSE
10158ENDCASE:IFj%THEN
10159CALLtl
10160ENDIF
10161ENDIF:ENDPROC
10162DEFPROCaJ:PROCE(Zy,WJ):PROCE(`,c_):PROCE(l,EJ):ENDPROC
10163DEFPROCfu:LOCALF%:IFFND("Arrow",ry%)THEN
10164ELSE:F%=Z%+e%:PROCE(Zy,F%!gy%):PROCE(`,F%!u_%):PROCE(l,F%!by%)
10165ENDIF:ENDPROC
10166DEFPROCE(J%,Gy%):PROCZ(ry%,J%+1,(Gy%*100+50)>>8):ENDPROC
10167DEFPROCTJ:LOCALM%,F%,j%:M%=ry%:F%=Z%+e%:IFF%!kJ%=4THEN
10168PROCI
10169ENDIF:PROCPy(Zy,FJ%):PROCPy(`,XJ%):PROCPy(l,PJ%):j%=TRUE:CASEFALSEOF
10170WHEN(F%!gy%=FJ%)
10171WHEN(F%!u_%=XJ%)
10172WHEN(F%!by%=PJ%)
10173OTHERWISEj%=FALSE
10174ENDCASE:IFj%THEN
10175F%!gy%=FJ%:F%!u_%=XJ%:F%!by%=PJ%:IFF%!kJ%=4THEN
10176PROCI:PROCw(F%!Pl%,F%!tl%)
10177ENDIF
10178ENDIF:ENDPROC
10179DEFPROCPy(J%,RETURNGy%):Gy%=(FNA(ry%,J%+1)*256/100)+0.5:ENDPROC
10180DEFFNh_DEFAULT:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("@.h.DEFAULT")
10181Vo=16:sn=1<<30:aB=0:vO=1:O`=2:Ia=3:oo=4:pO=5:yn=6:no=7:eo=8:ea=1<<0:Ai=1<<1:so=1<<2:=0
10182DEFFNjumpblock_DEFAULT:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("@.h.DEFAULT")
10183[OPTV%ANDny%:.qo DCDTa:.Oa DCDNO:.mO DCDzo:.I` DCDmo:.IO DCDEO:.tB DCDJ`:.co DCDBB:.Cn DCDFo:.cl DCDfn:]:=0
10184DEFFNh_debug:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("@.h.debug")
10185Ro=FALSE:=0
10186DEFFNjumpblock_debug:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("@.h.debug")
10187[OPTV%ANDny%:.`` DCDP`:.Jn DCDkO:.Ya DCDeB:.d` DCDFk:.tO DCDkn:]:=0
10188DEFFNh_imath:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("@.h.imath")
10189=0
10190DEFFNjumpblock_imath:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("@.h.imath")
10191[OPTV%ANDny%:.Ky DCDyo:.FJ DCDYo:.dO DCDdB:.YB DCDta:.uy DCDOo:.uO DCDfB:.So DCDVa:.qa DCDHO:.xB DCDSk:.An DCDCB:.Ra DCDBO:.zB DCDZk:.Bn DCDZo:.gn DCDsB:.hB DCDWB:.rn DCDlO:.zO DCDla:.JB DCDxO:.h` DCDhO:.M` DCDTB:.r` DCDPn:.Al DCDGn:]:=0
10192DEFFNh_message:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("@.h.message")
10193=0
10194DEFFNjumpblock_message:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("@.h.message")
10195[OPTV%ANDny%:.Nl DCDmn:.f` DCDHn:.MB DCDwO:.E` DCDAk:.C` DCDuo:]:=0
10196DEFFNh_RelObj:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("@.h.RelObj")
10197Y`=4<<2:=0
10198DEFFNjumpblock_RelObj:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("@.h.RelObj")
10199[OPTV%ANDny%:.Wo DCD_a:.W` DCDF`:.o` DCDMo:.Jo DCDPa:.Q` DCDtn:.xo DCDZn:.OB DCDa`:.Wn DCDLk:.Rn DCDyB:.PB DCDen:.Xk DCDZB:.va DCDdo:]:=0
10200DEFFNh_stdio:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("@.h.stdio")
10201JO=0:Dk=17:fa=34:=0
10202DEFFNjumpblock_stdio:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("@.h.stdio")
10203[OPTV%ANDny%:.Pk DCDqn:.qu DCDX`:.`n DCDLa:.Da DCDnB:.n` DCDZO:.Wn%DCDEn%:.Ln%DCDba%:.Xn%DCDva%:.Ua DCDB`:.hu DCDS`:._O DCDLo:.GB DCDH`:.Ko DCDNo:]:=0
10204DEFFNh_stdlib:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("@.h.stdlib")
10205=0
10206DEFFNjumpblock_stdlib:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("@.h.stdlib")
10207[OPTV%ANDny%:.dJ DCDNn:.Cu DCDGa:.eO DCDSO:.zl DCDpo:.Eo DCDQO:.OJ DCDHB:.Qo DCDHa:.T` DCD_n:.da DCDjo:.w` DCDwn:.Io DCDXn:.c` DCDxn:.ho DCDA`:.oB DCDb`:.kB DCDVO:]:=0
10208DEFFNh_string:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("@.h.string")
10209P%=0:[OPTV%:.N` DCB0:.Ao DCB0:.hn DCB0:.za DCB0:.G` DCB0:.ra DCB0:.t` DCB0:]:=0
10210DEFFNjumpblock_string:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("@.h.string")
10211[OPTV%ANDny%:.on DCDMO:.wa DCDrB:.`O DCDy`:.bO DCDKO:.En DCDka:.BJ DCDFO:.Yu DCDm`:.ty DCDe`:.Tn DCDgB:.Do DCDx`:.ua DCD_o:.SB DCDj`:.XO DCDqO:.ao DCDv`:.bB DCDnO:.in DCDKB:.ia DCDk`:.AB DCDpa:.xa DCDln:.Xo DCDoa:.Qk DCDOn:.Mn DCDRB:.Uk DCDYn
10212.p` DCDko:.QB DCDcB:.lB DCDJk:.Dn DCDCO:.Xa DCDCk:.jB DCDSn:.K` DCDpB:.fO DCDvo:.EB DCDiO:.FB DCDrO:.s` DCDyO:.UB DCDUO:.ga DCDWa:._` DCDan:.Ln DCDMk:.Gk DCDUn:.bn DCDiB:.wo DCDRO:.jO DCDJa:]:=0
10213DEFFNh_wimp:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("@.h.wimp")
10214Na=12:zn=0:P%=0:[OPTV%:.UJ DCB0:.F_ DCB0:.W_ DCB0:.gy DCB0:.Au DCB0:.b_ DCB0:.Ru DCB0:.Qu DCB0:.`u DCB0:.Bo DCB0:.TO DCB0:.wu DCB0:.PO DCB0:.vn DCB0:.YO DCB0:.AO DCB0:.OO DCB0:]:P%=0:[OPTV%:.Qa DCB0:.cO DCB0:.yJ DCB0:.gu DCB0:.Ca DCB0:.Ju DCB0
10215.bu DCB0:.Uu DCB0:.na DCB0:.Ku DCB0:.Ho DCB0:.`a DCB0:]:P%=0:[OPTV%:.ha DCB0:.Bk DCB0:.i` DCB0:.R` DCB0:.fo DCB0:]:=0
10216DEFFNjumpblock_wimp:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("@.h.wimp")
10217[OPTV%ANDny%:.uB DCDVn:.Z` DCDQn:.pn DCDWk:.NB DCDKn:.z_ DCDca:.wi DCDba:.kJ DCDl`:.oO DCDL`:.pl DCD`B:.fJ DCDPo:.T_ DCDUo:.cy DCDEa:.ja DCDV`:.e_ DCD_B:.In DCDGO:.Ul DCDdn:.du DCDbo:.hl DCDKa:]:=0
10218DEFFN_file_io_version=9
10219DEFFN_hard_initialise_file_ioLOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("%.file_io: hard_initialise_file_io")
10220PROCS("<BasicV$Lib>.CheckVars",2):PROCS("<BasicV$Lib>.string",6):el%=256+20:DIMJi%el%:DIMua%9:ua%?8=13:=0
10221DEFFNFy(T$)LOCALBa%:SYS8,5,T$TOBa%:=(Ba%=1)
10222DEFFNTy(T$)LOCALh%,Di%:SYS8,5,T$TODi%,,,,h%:IFDi%=0THENERROR1,"File not found ("+T$+")"
10223=h%
10224DEFPROC_J(T$,ga%)SYS8,255,T$,ga%:ENDPROC
10225DEFFN_y(g$,U$,RETURNR_%)LOCALmi%:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("%.file_io: OS_GBPB_ReadEntry")
10226SYS&2000c,10,g$,Ji%,1,R_%,el%,U$TO,,,mi%,R_%:=mi%
10227DEFFNbyLOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("%.file_io: file_object_load_address")
10228=!Ji%
10229DEFFNWyLOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("%.file_io: file_object_name")
10230=FNN(Ji%+20)
10231DEFFNJyLOCALT%:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("%.file_io: file_object_file_type")
10232T%=FNby:IF(T%AND-1048576)=-1048576THEN
10233T%=(T%AND&fff00)>>8
10234ELSET%=-1
10235ENDIF:=T%
10236DEFFN_FileType_version=1
10237DEFFN_hard_initialise_FileTypeLOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("%.FileType: hard_initialise_FileType")
10238XB=4095:SJ=4093:qB=4091:Go=4089:=0
10239DEFFN_Heap_version=8
10240DEFFN_hard_initialise_HeapLOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("%.Heap: hard_initialise_Heap")
10241=0
10242DEFFNRy(h%)LOCALT%:IFFNB(T%,h%)THEN
10243h%=!fy%:ERROR!h%,FNN(h%+4)
10244ENDIF:=T%
10245DEFFNB(RETURNQJ%,A%)QJ%=USR(ki%):IF!fy%THENQJ%=0
10246=!fy%
10247DEFPROCX(RETURNQJ%,h%)IFFNB(QJ%,h%)THEN
10248QJ%=!fy%:ERROR!QJ%,FNN(QJ%+4)
10249ENDIF:ENDPROC
10250DEFPROCW(RETURNA%)IFFNPy(A%)THEN
10251A%=!fy%:ERROR!A%,FNN(A%+4)
10252ENDIF:ENDPROC
10253DEFFNPy(RETURNA%)CALLQa%:A%=0:=!fy%
10254DEFPROC`(RETURNQJ%,h%)IFFNzy(QJ%,h%)THEN
10255h%=!fy%:ERROR!h%,FNN(h%+4)
10256ENDIF:ENDPROC
10257DEFFNzy(RETURNA%,B%)A%=USR(xa%):=!fy%
10258DEFPROCQ_LOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("%.Heap: assembler")
10259[OPTV%:FNq(ki%,dJ):FNq(Qa%,Cu):FNq(xa%,zl):ALIGN:.fy%DCD0:]:ENDPROC
10260DEFFNq(RETURNpa%,ia%)[OPTV%:ALIGN:.pa%:FNZ:STMFD(A)!,{Z}:MOV Z,#0:STR Z,fy%:BL ia%:STRvs0,fy%:LDMFD(A)!,{pc}^:]:=0
10261DEFFN_IntMath_version=4
10262DEFFN_hard_initialise_IntMath=0
10263DEFFNS(d%,E%)IFd%>E%THEN=d%
10264=E%
10265DEFFNP(d%,E%)IFd%>E%THEN=E%
10266=d%
10267DEFFN_ModeInfo_version=5
10268DEFFN_hard_initialise_ModeInfo=0
10269DEFPROCIJ(ay%)SYS53,ay%,1TO,,il%:il%+=1:SYS53,ay%,2TO,,bl%:bl%+=1:SYS53,ay%,3TO,,ml%:ml%+=1:SYS53,ay%,4TO,,Sy%:SYS53,ay%,5TO,,m%:SYS53,ay%,6TO,,la%:SYS53,ay%,7TO,,_n%:SYS53,ay%,9TO,,Ga%:Fl%=1<<Ga%:SYS53,ay%,11TO,,Yu%:Yu%+=1:SYS53,ay%,12TO,,w_%:w_%+=1:oa%=Yu%DIVil%
10270ya%=w_%DIVbl%:Si%=(Yu%<<Sy%)-1:Fi%=(w_%<<m%)-1:ha%=32DIVFl%:ENDPROC
10271DEFFN_Wimp_version=28
10272DEFFN_hard_initialise_WimpLOCALXy%:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("%.Wimp: hard_initialise_Wimp")
10273IFFNv<12THEN
10274ERROR1,"%.Wimp needs more recent version of the LibHandler"
10275ENDIF:SYS&400f2,0TOXy%:IFXy%=0THEN
10276ERROR0,"Application needs to be run from the desktop"
10277ENDIF:PROCS("<BasicV$Lib>.Heap",8):PROCS("<BasicV$Lib>.Message",3):PROCS("<BasicV$Lib>.Template",1):nJ%=FALSE:qJ%=3*1024:PROCX(eu%,qJ%):qJ%+=eu%:AJ%=eu%:PROCX(W%,512):y$="":e$="":wi%=0:B$="Application":H$="0.00 (01-Jan-1900)":d_%=-1:p_%=2400:Vy%=2401
10278Yn%=16*1024:Ry%=FALSE:N$="":=0
10279DEFFNIy(d$)LOCALd%,C%,S$:SYS&600f2,2TOd%;C%:IF(C%AND1)=0THEN
10280S$=CHR$?d%+CHR$d%?1:d%=OPENIN(d$+S$):IFd%THEN
10281CLOSE#d%:d$+=S$
10282ENDIF
10283ENDIF:=d$
10284DEFPROCBu(By%)IFBy%>0THENSYS&dcb8d,gu,By%
10285ENDPROC
10286DEFPROCR(RETURNBy%)IFBy%>0THEN
10287LOCALD%:D%=FNM(4):!D%=By%:SYS&400c3,,D%:PROCC(D%,4):By%=0
10288ENDIF:ENDPROC
10289DEFFNj(By%)SYS&dcb8d,yJ,By%,-1:=TRUE
10290DEFPROCpy(By%,Y$)SYS&dcb8d,Ju,By%,Y$,0,0:ENDPROC
10291DEFPROCVy(By%,Wa%,Sa%,qn%)IFqn%THEN
10292SYS&dcb8d,bu,By%,Wa%,Sa%
10293ELSELOCALU%:U%=FNM(16):!U%=0:U%!4=-Sa%ANDNOT((1<<m%)-1):U%!8=Wa%ANDNOT((1<<Sy%)-1):U%!12=0:SYS&400d7,By%,U%:PROCC(U%,16)
10294ENDIF:ENDPROC
10295DEFPROCVJ(RETURNM%,`a%)SYS&dcb8d,Ku,M%,`a%TOM%:ENDPROC
10296DEFPROCFy(By%)SYS&dcb8d,Uu,By%:ENDPROC
10297DEFPROCY(M%,zn%)LOCALD%:D%=FNM(128):!D%=M%:SYS&400cb,,D%:D%!28=zn%:SYS&400e7,2,D%,M%:PROCC(D%,128):ENDPROC
10298DEFPROCQu(By%,I%,vi%,Vn%,Tn%)LOCALU%:U%=FNM(16):U%!0=By%:U%!4=I%:U%!8=Vn%<<vi%:U%!12=Tn%<<vi%:SYS&400cd,,U%:PROCC(U%,16):ENDPROC
10299DEFFN_(By%,I%)SYS&dcb8c,`u,By%,I%TOI%:=I%
10300DEFPROCT(By%,I%,Za%)SYS&dcb8c,Qu,By%,I%,Za%:ENDPROC
10301DEFPROCZy(By%,I%,Za%)SYS&dcb8c,wu,By%,I%,Za%:ENDPROC
10302DEFPROCF_(M%,I%,Zn%,Al%,Il%)SYS&dcb8c,Au,M%,I%,Zn%,Al%,Il%:ENDPROC
10303DEFPROCQy(M%,I%,E%,sn%,Hn%,pi%,Al%,Il%)IF(I%=Hn%)EOR((E%AND4)=4)THEN
10304PROCF_(M%,pi%,+1,Al%,Il%)
10305ELSEPROCF_(M%,pi%,-1,Al%,Il%)
10306ENDIF:ENDPROC
10307DEFPROCz_(M%,J%)SYS&dcb8c,b_,M%,J%,+1:ENDPROC
10308DEFPROCCJ(M%,J%)SYS&dcb8c,b_,M%,J%,-1:ENDPROC
10309DEFPROCF(ni%,A$)LOCALU%:U%=FNM(300):U%!0=ni%:$(U%+4)=A$+CHR$(0):PROCf(U%):PROCC(U%,300):ENDPROC
10310DEFPROCN(A$)ERRORp_%,A$:ENDPROC
10311DEFPROCL(ni%)LOCALU%:U%=FNM(300):U%!0=Vy%:PROCby("LE"+STR$(ni%),U%+4):PROCf(U%):PROCC(U%,300):ENDPROC
10312DEFPROCf(In%)SYS&400df,In%,1,B$:ENDPROC
10313DEFFNa(ai%,A$)LOCALU%,T%:PROCP:U%=FNM(260):!U%=0:$(U%+4)=A$+CHR$(0):SYS&400df,U%,(16ORai%),FNw(0)TO,T%:PROCC(U%,260):=T%
10314DEFPROCPJLOCALU%:U%=FNM(256):U%?0=1:U%?1=0:U%?2=0:U%?3=0:U%?4=0:U%?5=Si%MOD256:U%?6=Si%DIV256:U%?7=Fi%MOD256:U%?8=Fi%DIV256:SYS7,21,U%:!U%=Ui%:SYS&400c6,,U%:PROCC(U%,256):ENDPROC
10315DEFPROCAu(Q%,X%,E%,I%)LOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("%.Wimp: Mouse_Click_Query")
10316PROCPJ:Q%=FNJ("FN_Stop_Action_"+n$+"("+STR$(I%=0)+")"):ENDPROC
10317DEFFNAy(D%)LOCALc$:c$="":WHILE?D%>31:c$+=CHR$(?D%):D%+=1:ENDWHILE:=c$
10318DEFFNKy(V$)WHILEINSTR(V$,"."):V$=MID$(V$,INSTR(V$,".")+1):ENDWHILE:=V$
10319DEFPROC_(By%,I%,R$)SYS&dcb8c,W_,By%,I%,R$:ENDPROC
10320DEFPROCey(M%,J%,_%)SYS&dcb8c,W_,M%,J%,_%:ENDPROC
10321DEFPROCZ(M%,J%,K%)SYS&dcb8c,gy,M%,J%,K%:ENDPROC
10322DEFFNs(M%,J%)SYS&dcb8c,UJ,M%,J%TOM%:=FNAy(M%)
10323DEFFNwy(M%,J%)SYS&dcb8c,UJ,M%,J%TOM%:=M%
10324DEFFNA(M%,J%)SYS&dcb8c,F_,M%,J%TOM%:=M%
10325DEFFNb(T$)LOCALXy%,zy%,R%:SYS&20008,17,T$TOXy%,,,,zy%;R%:IFFNU(R%)THEN
10326PROCU("Reason",FNKy(T$)):PROCo(Xy%):PROCN(FNw(4))
10327ENDIF:IFXy%<>1THEN
10328zy%=-1
10329ENDIF:=zy%
10330DEFFNM(h%)LOCALT%:IF(AJ%+h%)<qJ%THEN
10331T%=AJ%:AJ%+=h%
10332ELSEPROCN("Wimp Stack full")
10333ENDIF:=T%
10334DEFPROCJu:AJ%=eu%:ENDPROC
10335DEFPROCC(uu%,h%)IF(uu%<eu%)OR(uu%>qJ%)THEN
10336PROCN("Release_Stack: Invalid stack chunk")
10337ELSEIF(h%<0)OR((uu%+h%)>qJ%)THEN
10338PROCN("Release_Stack: Invalid chunk size")
10339ELSEAJ%-=h%:IFAJ%<>uu%THEN
10340PROCN("Release_Stack: Bad pop")
10341ENDIF
10342ENDIF
10343ENDIF:ENDPROC
10344DEFPROCEJ(G$,Gy%,Un%,xu%,Rn%,ra%)H$=STR$(Gy%)+"."+RIGHT$("0"+STR$(Un%),2):H$+=" ("+RIGHT$("0"+STR$(xu%),2)+"-":H$+=MID$("CBJanFebMarAprMayJunJulAugSepOctNovDec",Rn%*3,3):H$+="-"+RIGHT$("19"+STR$(ra%),4)+")":B$=G$
10345PROCU("App",B$):SYS35,B$+"$Dir",W%,256,0,3TO,,xu%:W%?xu%=13:DIMfi%xu%+1:$fi%=$W%:IFN$<>""THEN
10346xu%=FALSE:wu%=W%:Gy%=INSTR(N$,","):WHILEGy%<>0:wu%!0=FNJ(LEFT$(N$,Gy%-1)):wu%+=4:N$=MID$(N$,Gy%+1):Gy%=INSTR(N$,","):ENDWHILE:wu%!0=FNJ(N$):wu%!4=0:SYS&400c0,300,&4b534154,G$,W%TOju%,d_%
10347ELSESYS&400c0,200,&4b534154,G$TOju%,d_%
10348ENDIF:ONERRORPROCkJ
10349SYS&606c0:IFju%<200THEN
10350ERRORp_%,FNw(5)
10351ENDIF:IFRy%THEN
10352SYS&81682,d_%
10353ENDIF:nJ%=TRUE:PROCu_:PROCDJ:nJ%=-2:PROCX_:PROCdJ:IFTu%=0THEN
10354PROC_(N_%,7,H$)
10355ENDIF:Pn%=-1:Ki%=-1:xl%=-1:pu%=-1:Ha%=FALSE:Aa%=-1:da%=-1:O$="":w$="":PROCwy:SYS&606c1:ENDPROC
10356DEFPROCkJSYS&606c1:IFBJ%THEN
10357PROCF(Vy%,REPORT$+" ["+STR$ERL+"]")
10358ELSEPROCF(Vy%,REPORT$)
10359ENDIF:PROCB:END:ENDPROC
10360DEFFNProgInfo(M%)PROCO(M%!(88+(7<<5)+20),H$):=0
10361DEFPROCh_LOCALQi%,aa%:aa%=TRUE:IFRy%THEN
10362wy%=wy%ANDNOT(49)
10363ENDIF:REPEATSYS&400c7,wy%,W%TOQi%:IFRy%THENSYS&81686,Qi%,,d_%
10364CASEQi%OF
10365WHEN0:PROCcu
10366WHEN1:PROCvJ
10367WHEN2:PROCs_
10368WHEN3:PROCPu
10369WHEN4:PROCFu
10370WHEN5:PROCSu
10371WHEN6:PROCb_
10372WHEN7:PROCw_
10373WHEN8:PROCg_
10374WHEN9:PROCv_
10375WHEN10:PROCwJ
10376WHEN11:PROCoJ
10377WHEN12:PROCru
10378WHEN17:PROCzy
10379WHEN18:PROCE_
10380WHEN19:PROCr_
10381ENDCASE:UNTILNOT(aa%):ENDPROC
10382DEFPROCFuIFNOT(Ry%)THEN
10383PROCF(p_%,"Unexpected Pointer_Leaving_Window")
10384ENDIF:ENDPROC
10385DEFPROCSuIFNOT(Ry%)THEN
10386PROCF(p_%,"Unexpected Pointer_Entering_Window")
10387ENDIF:ENDPROC
10388DEFPROCwJPROCN("Unexpected Scroll_Request"):ENDPROC
10389DEFPROCoJPROCN("Unexpected Lose_Caret"):ENDPROC
10390DEFPROCruPROCN("Unexpected Gain_Caret"):ENDPROC
10391DEFPROCdJDIMA$(10):DIMM%(DIM(A$(),1)):D$="�":A$()=D$:M%()=-1:py%=0:wy%=6193:ENDPROC
10392DEFPROCD(L$,cu%)PROCvu(L$,cu%):ENDPROC
10393DEFPROCvu(L$,cu%)LOCALK%:py%+=1:IFpy%=1THEN
10394wy%=wy%AND(NOT(1))
10395ELSEIFpy%=DIM(A$(),1)THEN
10396ERROR1,"Too many null reasons"
10397ENDIF
10398ENDIF:K%=0:WHILEA$(K%)<>D$:K%+=1:ENDWHILE:A$(K%)=L$:M%(K%)=cu%:ENDPROC
10399DEFPROCy(L$,cu%)LOCALK%:IFpy%=0THEN
10400PROCN("Bad release null reason code ("+L$+")")
10401ELSEpy%-=1:K%=DIM(A$(),1):REPEATK%-=1:IFK%<0THEN
10402PROCN("Bad release null reason code ("+L$+")")
10403ENDIF:UNTIL(A$(K%)=L$)AND(M%(K%)=cu%):A$(K%)=D$:IFpy%=0ANDNOT(Ry%)THEN
10404wy%=wy%OR1
10405ENDIF
10406ENDIF:ENDPROC
10407DEFPROCH(L$,cu%)LOCALK%,D%:IFL$=""THEN
10408IFNOT(Ry%)THEN
10409wy%=wy%OR1
10410ELSEwy%=wy%AND(NOT1)
10411ENDIF:py%=0:A$()=D$
10412ELSED%=0:K%=DIM(A$(),1):WHILEK%>0:K%-=1:IFA$(K%)=L$AND((M%(K%)=cu%)OR(cu%=0))THEN
10413A$(K%)=D$:D%+=1
10414ENDIF:ENDWHILE:py%-=D%
10415ENDIF:ENDPROC
10416DEFPROCcuLOCALK%,K$,y%,yl%:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("%.Wimp: Null_Reason_Code")
10417K%=DIM(A$(),1):WHILEK%>0:K%-=1:K$=A$(K%):IFK$<>D$THEN
10418y%=M%(K%):IFy%=-1THEN
10419yl%=FNJ("FN_Null_Reason_"+K$)
10420ELSEyl%=FNJ("FN_Null_Reason_"+K$+"("+STR$(y%)+")")
10421ENDIF:IFyl%AND(A$(K%)=K$)AND(M%(K%)=y%)THEN
10422A$(K%)=D$:py%-=1
10423ENDIF
10424ENDIF:ENDWHILE:ENDPROC
10425DEFFN_Null_Reason_IFNOT(Ry%)THEN
10426PROCN("Bad Null Reason (not expected)")
10427ENDIF:=0
10428DEFPROCw_LOCALQ%:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("%.Wimp: User_Drag")
10429Q%=FNJ("FN_Dragged_"+e$):IFwi%<>(1*16)THEN
10430PROCP
10431ENDIF:SYS&400d0,,-1:e$="":ENDPROC
10432DEFPROCE_LOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("%.Wimp: User_Message_Recorded")
10433PROCzy:ENDPROC
10434DEFPROCG_BPUT#W%!20,"Run "+$fi%:ENDPROC
10435DEFPROCzyLOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("%.Wimp: User_Message")
10436CASEW%!16OF
10437WHEN0:PROCB
10438WHEN1:PROCKJ
10439WHEN2:PROC`J
10440WHEN3:PROCx_
10441WHEN4:PROCIu
10442WHEN5:PROCGJ
10443WHEN6:PROCCu
10444WHEN7:PROCEu
10445WHEN8:PROCRy
10446WHEN9:PROCWJ
10447WHEN10:PROCG_
10448WHEN1282:PROCN_
10449WHEN&400c0:PROCJJ
10450WHEN&400c1:PROCwy
10451WHEN&400c5:PROCwu
10452ENDCASE:ENDPROC
10453DEFPROCwuENDPROC
10454DEFPROCEuLOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("Message_RAM_Transmit: ")
10455IFW%!12<>pu%THEN
10456PROCF(Vy%,"Unexpected RAM_Transmit message")
10457ELSEVl%+=W%!24:IF(W%!24)=hl%THEN
10458PROCU_
10459ELSEIFFNJ("FN_RAM_Load_Completed_"+O$+"("+STR$(Vl%)+")")THEN
10460PROCL(6)
10461ENDIF
10462ENDIF
10463ENDIF:ENDPROC
10464DEFPROCU_LOCALRAM_start%:IFFNJ("FN_RAM_Load_"+O$+"("+STR$(Vl%)+", "+STR$(hl%)+", RAM_start%)")THEN
10465IFVl%<>0THEN
10466PROCL(7)
10467ELSEIFFNJ("FN_RAM_Load_Failed_"+O$)
10468PROCK_
10469ENDIF
10470ELSEW%!12=W%!8:W%!16=6:W%!20=RAM_start%:W%!24=hl%:SYS&400e7,18,W%,W%!4:pu%=W%!8
10471ENDIF:ENDPROC
10472DEFPROCK_LOCALBa%:SYS&20023,"Wimp$Scrap",0,-1,0,3TO,,sa%:IFsa%=0THEN
10473PROCL(8)
10474ELSE$(W%+44)="<Wimp$Scrap>"+CHR$(0):W%!36=-1:W%!16=2:W%!12=da%:W%!0=60:SYS&400e7,17,W%,Aa%:xl%=W%!8:pu%=xl%:Ha%=FALSE
10475ENDIF:ENDPROC
10476DEFPROCCuLOCALM,RAM_start%,RAM_length%:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("Message_RAM_Fetch: ")
10477IFW%!12<>Ki%THEN
10478PROCL(9)
10479ELSEIFw$=""THEN
10480ELSEIFFNJ("FN_RAM_Save_"+w$+"("+STR$(Fa%)+", "+STR$(W%!24)+", RAM_start%, RAM_length%)")THEN
10481ELSEFa%+=RAM_length%:SYS&400f1,d_%,RAM_start%,W%!4,W%!20,RAM_length%:W%!12=W%!8:W%!16=7:W%!24=RAM_length%:SYS&400e7,17-(RAM_length%=(W%!24)),W%,W%!4:Ki%=W%!8
10482ENDIF
10483ENDIF
10484ENDIF:ENDPROC
10485DEFPROCUuONERRORPRINT"Error in error handler: ";REPORT$:END
10486IFRy%THENSYS&a1683,d_%
10487PROCtu:CALLG_:SYS&400dd,d_%,&4b534154:ENDPROC
10488DEFFNgy(u$):LOCALD%,R%:D%=FNM(256):SYS&20023,u$,D%,-256,0,0TO,,R%:PROCC(D%,256):=(R%<0)
10489DEFPROCL_(E%):LOCALF%:IFE%AND1THEN
10490F%=!Xu%:X_%=F%!w%:Y_%=F%!x%:oy%=F%!b_%:e_%=F%!O_%:f_%=F%!H_%:m_%=F%!x_%:t_%=F%!y_%:a_%=F%!Q_%:CASETRUEOF
10491WHENWy%<>0:PROCF(Vy%,FNC(2))
10492WHEN!xy%=0:PROCb
10493WHENFN`:PROCY(Z%!z%,-1):PROCXy
10494OTHERWISE:PROCG(!xy%):PROCXy
10495ENDCASE
10496ENDIF:ENDPROC
10497DEFPROCXu(J%):LOCALG%:IFJ%>=0THEN
10498G%=FNW(J%+1):IFG%!r%THEN
10499PROCn(G%!r%,G%+`J%):PROCR(G%!r%):G%!r%=0
10500ELSE:PROCt(G%)
10501ENDIF
10502ENDIF:ENDPROC
10503DEFPROCC_(J%):LOCALG%,Yi%,b%:IFJ%>=0THEN
10504J%+=1:G%=FNW(J%):IFG%!r%THEN
10505PROCR(G%!r%)
10506ENDIF:!My%-=1:IF!My%=0THEN
10507PROCW(!Hy%):SYS5,"%Remove <Daleks3$Dir>.Scores":PROCP
10508ELSE:WHILEJ%<=!My%:J%+=1:Yi%=FNW(J%):FORb%=0TOl_%-1STEP4:G%!b%=Yi%!b%:NEXTb%:G%=Yi%:ENDWHILE:PROC`(!Hy%,G%-!Hy%):PROCjy
10509ENDIF
10510ENDIF:ENDPROC
10511DEFPROCfJ(M%):LOCALG%:SYS&400c5,,M%:G%=!Xu%:PROCCy(G%!r%,G%+`J%):ENDPROC
10512DEFPROCI_:LOCALG%:G%=!Xu%:PROCn(G%!r%,G%+`J%):PROCR(G%!r%):G%!r%=0:ENDPROC
10513DEFPROCGu:LOCALR_%:IFFNgy("Daleks$Dir")THEN
10514SYS&606c0:LOCALERROR:ONERRORLOCALRESTOREERROR:SYS&606c1:PROCQ
10515R_%=0:WHILEFN_y("<Daleks$Dir>","*",R_%):IFFNJy=SJTHEN
10516PROCWu(FNWy)
10517ENDIF:ENDWHILE:RESTOREERROR:SYS&606c1
10518ELSE:PROCF(Vy%,FNC(10))
10519ENDIF:ENDPROC
10520DEFPROCWu(Q$):LOCALD%,hy%,y%,M%,N%,K%,J%,SJ%,gJ%,G$:D%=FNM(24):PROCO(D%,Q$):hy%=FNM(24):PROCO(hy%,"%dx%dHSC"):A%=D%:B%=hy%:A%=USR(tu):K%=!A%:M%=A%!4:N%=A%!8:PROCC(hy%,24):PROCC(D%,24):IFK%=2THEN
10521D%=vu:D%!w%=M%:D%!x%=N%:D%!O_%=7:D%!H_%=10:D%!b_%=M%*N%/2:D%!y_%=1:D%!Q_%=1:D%!x_%=1:N%=OPENIN("<Daleks$Dir>."+Q$):LOCALERROR:ONERRORLOCALRESTOREERROR:CLOSE#N%:PROCQ
10522FORJ%=1TO10:INPUT#N%,SJ%,G$:gJ%=(SJ%DIV10)-D%!O_%:gJ%=gJ%DIVD%!H_%:G$=LEFT$(G$,y_-1):PROCxy(D%,G$,SJ%,gJ%):NEXTJ%:RESTOREERROR:CLOSE#N%
10523ENDIF:ENDPROC
10524DEFPROCd_:LOCALh%,qi%,G%,J%,D%:SYS&606c0:LOCALERROR:ONERRORLOCALRESTOREERROR:SYS&606c1:PROCQ
10525!My%=0:!Hy%=0:IFFNFy("<Daleks3$Dir>.Scores")THEN
10526h%=FNTy("<Daleks3$Dir>.Scores"):IF((h%-4)MODl_%)<>0THEN
10527PROCN(FNC(4))
10528ENDIF:!Hy%=FNRy(h%):D%=!Hy%:PROC_J("<Daleks3$Dir>.Scores",D%):SYS91,&c1040a31,D%+4,D%+h%,1TOqi%:IFqi%<>!D%THEN
10529PROCN(FNC(4))
10530ENDIF:!My%=(h%-4)DIVl_%:FORJ%=1TO!My%:G%=FNW(J%):G%!r%=0:NEXTJ%
10531ENDIF:RESTOREERROR:SYS&606c1:ENDPROC
10532DEFFNV(M%):LOCALJ%,Y%,G%:J%=1:Y%=TRUE:WHILEJ%<=!My%ANDY%:G%=FNW(J%):Y%=(G%!r%<>M%):J%+=1:ENDWHILE:IFY%THEN
10533M%-=1
10534ELSE:!Xu%=G%
10535ENDIF:=M%
10536DEFPROCxy(F%,G$,SJ%,gJ%):LOCALG%,N%,J%,b%,i%,Ey%,Z$:SYS&606c0:LOCALERROR:ONERRORLOCALRESTOREERROR:SYS&606c1:PROCQ
10537G%=FNGy(F%):Ey%=1:N%=FNT(G%,Ey%):WHILEEy%<yJ%ANDSJ%<=N%!Mu%:Ey%+=1:N%=FNT(G%,Ey%):ENDWHILE:IFSJ%>N%!Mu%THEN
10538i%=yJ%:WHILEi%>Ey%:J%=FNT(G%,i%-1):Z$=FNN(J%+El%):PROCi(G%,i%,Z$,J%!iu%,J%!Mu%):PROCSy(G%,i%):i%-=1:ENDWHILE:PROCi(G%,Ey%,G$,gJ%,SJ%):PROCSy(G%,Ey%):PROCY(G%!r%,-1):PROCjy
10539ENDIF:RESTOREERROR:SYS&606c1:ENDPROC
10540DEFPROCbu:LOCALJ%,Y%,G%:J%=1:Y%=TRUE:WHILEJ%<!My%ANDY%:G%=FNW(J%):Y%=(G%!r%=0):J%+=1:ENDWHILE:IFY%THEN
10541G%=FNW(1):PROCt(G%)
10542ENDIF:PROCY(G%!r%,-1):ENDPROC
10543DEFPROCTu(F%):LOCALJ%,Y%,b%,G%:J%=1:Y%=TRUE:WHILEJ%<=!My%ANDY%:G%=FNW(J%):FORb%=0TOs_%-1STEP4:Y%=Y%AND(G%!b%=F%!b%):NEXTb%:Y%=(Y%=0):J%+=1:ENDWHILE:IFY%THEN
10544VDU7:G%=FNW(1)
10545ENDIF:IFG%!r%=0THEN
10546PROCt(G%)
10547ENDIF:PROCY(G%!r%,-1):ENDPROC
10548DEFPROCjy:LOCALh%,D%:Ai%=FNW(!My%+1):D%=!Hy%:SYS91,&c1040a31,D%+4,Ai%,1TO!D%:SYS&20008,10,"<Daleks3$Dir>.Scores",SJ,,D%,Ai%:ENDPROC
10549DEFFNGy(F%):LOCALY%,J%,b%,G%:Y%=TRUE:J%=1:WHILEJ%<=!My%ANDY%:G%=FNW(J%):FORb%=0TOs_%-1STEP4:Y%=Y%AND(F%!b%=G%!b%):NEXTb%:Y%=(Y%=0):IFY%THEN
10550J%+=1
10551ENDIF:ENDWHILE:IFY%THEN
10552!My%+=1:Y%=FNW(!My%+1)-!Hy%:PROC`(!Hy%,Y%):G%=FNW(!My%):G%!r%=0:PROCZu(G%+`J%):FORb%=0TOs_%-1STEP4:G%!b%=F%!b%:NEXTb%:FORJ%=1TOyJ%:PROCi(G%,J%,"Zappa",0,10):NEXTJ%
10553ENDIF:IFG%!r%=0THEN
10554PROCt(G%)
10555ENDIF:=G%
10556DEFPROCt(G%):LOCALJ%,_$:_$=FNc(G%,"HighScore"):G%!r%=FNqy("HighScores",+48,-48,_$):PROCny(G%!r%,G%+`J%,-1):FORJ%=1TOyJ%:PROCSy(G%,J%):NEXTJ%:ENDPROC
10557DEFPROCi(G%,Ey%,G$,gJ%,SJ%):LOCALN%:N%=FNT(G%,Ey%):PROCO(N%+El%,G$):N%!iu%=gJ%:N%!Mu%=SJ%:ENDPROC
10558DEFPROCSy(G%,Ey%):LOCALM%,J%,N%:M%=G%!r%:J%=FNfy(Ey%):N%=FNT(G%,Ey%):PROCey(M%,J%+li,N%+El%):PROCZ(M%,J%+fi,N%!iu%):PROCZ(M%,J%+ul,N%!Mu%):ENDPROC
10559DEFFNW(J%):=!Hy%+4+((J%-1)*l_%)
10560DEFFNfy(Ey%):=((Ey%-1)*Cl)+Dl
10561DEFFNT(G%,Ey%):=G%+za%+((Ey%-1)*Mi%)
10562DEFPROCW_:LOCALJ%:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCO_
10563SYS&606c0:b=FNdy:IFb<1THEN
10564PROCF(Vy%,FNC(7)):PROCB:END
10565ENDIF:DIMP%(b):DIMG%(b):DIMD%(b):DIMB%(b):DIMS%(b,ly):DIMN%(b):DIMF%(b):DIMX%(b):FORJ%=1TOb:PROCi_(J%):NEXTJ%:RESTOREERROR:SYS&606c1:ENDPROC
10566DEFPROCO_:SYS&606c1:PROCF(Vy%,FNC(8)):PROCB:END:ENDPROC
10567DEFFNdy:LOCALJ%:J%=1:WHILEFNOy(J%):J%+=1:ENDWHILE:=J%-1
10568DEFFNOy(J%):LOCALZ$,R%:LOCALDATA:RESTORE+0:READZ$:SYS&2002e,296,v%,FNd(J%)+Z$TO;R%:=NOTFNU(R%)
10569DEFFNd(J%):=CHR$(J%+ASC("A")-1)+"_"
10570DEFPROCi_(J%):LOCALb%,Z$,M%,N%,Ju%,D%,G%:LOCALDATA:RESTORE+0:READZ$:Z$=FNd(J%)+Z$:SYS46,280,v%,Z$TO,,S%(J%,1):D%=S%(J%,1):SYS46,552,v%,D%TO,,,M%,N%,,Ju%:X%(J%)=Ju%:P%(J%)=M%:B%(J%)=N%:PROCiJ(D%,TRUE,N%(J%),G%):SYS53,Ju%,4TO,,G%(J%):SYS53,Ju%,5TO,,D%(J%):SYS53,Ju%,9TO,,G%:F%(J%)=1<<(1<<G%)
10571FORb%=2TOly:READZ$:Z$=FNd(J%)+Z$:SYS46,280,v%,Z$TO,,S%(J%,b%):NEXTb%:ENDPROC
10572DEFPROCGy:LOCALCy,T%,Ll%,U%,Ly%,Lu%,M%,N%,ku%:LOCALZy%,q_%,xi%,ea%,xn%,Dl%,Y%,G%,J%,F%,j_%,Uy%:ku%=Z%!Yy%-Z%!Qy%:IFku%AND(Z%!q%=fy)THEN
10573PROCy("Move",Z%)
10574ENDIF:!u_=ml%:U%=FNM(272):LOCALERROR:ONERRORLOCALRESTOREERROR:PROCC(U%,272):PROCQ
10575Ly%=U%:Lu%=Ly%+16:Y%=Z%!G_%:G%=Z%+`u%:F%=Z%+_u%:Ly%!0=F%!0*(1<<Sy%):Ly%!4=F%!4*(1<<m%):Ly%!8=F%!8*(1<<G%(Y%)):Ly%!12=F%!12*(1<<D%(Y%)):M%=FNz(Ly%,P%(Y%)):N%=FNf(Ly%,B%(Y%)):SYS&40740,X%(Y%),N%(Y%),-1,-1,Lu%:IFZ%!l%THEN
10576SYS46,296,Z%!l%,"0"TO,,,Zy%,q_%,,Dl%:T%=(M%<>Zy%)OR(N%<>q_%):T%=T%ORFNx(Dl%,4):T%=T%ORFNx(Dl%,5):T%=T%ORFNx(Dl%,9):IFNOTT%THEN
10577FORJ%=0TOF%(Y%)-1:T%=T%OR(Lu%?J%<>G%?J%):NEXTJ%
10578ENDIF
10579ELSE:T%=TRUE
10580ENDIF:IFT%THEN
10581FORJ%=0TOF%(Y%)-1:G%?J%=Lu%?J%:NEXTJ%:PROCW(Z%!l%):Zy%=M%+FNz(Ly%,Z%!HJ%):q_%=N%+FNf(Ly%,Z%!CJ%):Z%!Cy%=Zy%<<Sy%:Z%!vy%=q_%<<m%:xi%=FNz(Ly%,Z%!HJ%):ea%=FNf(Ly%,Z%!CJ%):Z%!vu%=((xi%+1)DIV2)<<Sy%:Z%!ui%=(q_%-((ea%+1)DIV2))<<m%:Ea%=Z%!w%:Ra%=Z%!x%:j_%=(Zy%<<Sy%)*Ea%
10582Uy%=((q_%<<m%)*Ra%)+E_%:PROCVy(Z%!z%,j_%,Uy%+4,0):PROCH_(Zy%,q_%):Cy=ly+(2*Z%!Qu%):Cy=Cy*256/F%(Y%):Cy=Cy*FNny(MODE,Zy%,q_%,FALSE,FALSE):Ll%=FALSE:REPEAT:Cy=Cy*1.2:T%=FNB(Z%!l%,Cy):IFNOT(T%)THEN
10583g%=Z%!l%:g%!0=Cy:g%!4=0:g%!8=16:g%!12=16:Ll%=NOT(FNry):IFNOT(Ll%)THEN
10584PROCW(Z%!l%)
10585ENDIF
10586ENDIF:UNTILT%ORLl%:IFNOT(T%)THEN
10587g%!0=g%!12:PROC`(Z%!l%,g%!12)
10588ENDIF
10589ENDIF:RESTOREERROR:PROCC(U%,272):Z%!Yy%=Z%!Qy%+ku%:IFT%THEN
10590PROCF(Vy%,FNC(9)):Z%!q%=Du
10591ELSE:IFku%AND(Z%!z%<>0)THEN
10592PROCD("Move",Z%)
10593ENDIF
10594ENDIF:ENDPROC
10595DEFFNx(ay%,gi%):LOCALR%,a%:SYS53,MODE,gi%TO,,R%:SYS53,ay%,gi%TO,,a%:=R%<>a%
10596DEFPROCH_(M%,N%):LOCALF%,I_%,J%,oJ%,Q%,lJ%,X%:I_%=FNu(dy%):PROCW(Z%!Qy%):PROCX(Z%!Qy%,((I_%+1)*16*c_%)):oJ%=0:lJ%=0:FORJ%=0TOI_%:F%=Z%!Qy%+(J%*16*c_%):Q%=((J%*M%)DIVI_%)<<Sy%:X%=((J%*N%)DIVI_%)<<m%:PROCJ_(F%,oJ%,lJ%,Q%,X%):oJ%=Q%:lJ%=X%:NEXTJ%:Z%!Qu%=I_%:ENDPROC
10597DEFPROCJ_(F%,oJ%,lJ%,Q%,X%):LOCALJ%:FORJ%=0TO10:CASEJ%AND3OF
10598WHEN0:F%!Iu%=0:F%!W_%=0
10599WHEN1:F%!Iu%=oJ%:F%!W_%=Q%
10600WHEN2:F%!Iu%=-Q%:F%!W_%=-Q%
10601WHEN3:F%!Iu%=0:F%!W_%=0
10602ENDCASE:CASEJ%AND12OF
10603WHEN0:F%!Sl%=0:F%!wJ%=0
10604WHEN4:F%!Sl%=-X%:F%!wJ%=-X%
10605WHEN8:F%!Sl%=lJ%:F%!wJ%=X%
10606ENDCASE:F%+=c_%:NEXTJ%:ENDPROC
10607DEFFNry:LOCALT%,J%,i$,gi%,Xy%,Ql%,Ul%,Xl%,g%,G%:LOCALDATA:RESTORE+0:g%=Z%!l%:LOCALERROR:ONERRORLOCALRESTOREERROR:SYS&606c1:PROCQ
10608SYS&606c0:J%=0:REPEAT:SYS&606c4,(J%*100)DIV27:PROCay:SYS&2002e,271,g%,STR$(J%),0,M%,N%,MODETO;T%:T%=FNU(T%):IFNOT(T%)THEN
10609G%=S%(Z%!G_%,J%+1):SYS46,316,g%,STR$(J%),0TOXy%,Ql%,Ul%,Xl%:SYS&400e6,128+Z%!r_%:SYS46,562,v%,G%,0,0,,Ly%:SYS46,564,v%,G%,0,0,11,Ly%,Lu%:SYS46,Xy%,Ql%,Ul%,Xl%:SYS46,280,g%,STR$(J%)TO,,G%:Z%!(Fu%+(J%<<2))=G%:J%+=1
10610ENDIF:UNTILT%OR(J%=ly):IFXa%THEN
10611IFNOT(T%)THEN
10612T%=FNy(Z%!Fu%,Ya%)
10613ENDIF:IFNOT(T%)THEN
10614T%=FNy(Z%!Hl%,li%)
10615ENDIF
10616ENDIF:IFT%THEN
10617PROCW(Z%!l%)
10618ENDIF:RESTOREERROR:SYS&606c1:=T%
10619DATA "dalek", "man", "pyre", "right"
10620DATA "upright",  "up", "upleft", "left"
10621DATA "downleft", "down", "downright"
10622DEFFNy(Ru%,Va%):LOCALk%,Q%,X%,T%,F%,I_%,Ua%,Y%,Fy%,oJ%,lJ%:LOCALZ%():LOCALDATA:RESTORE+0:T%=FALSE:Ua%=J%:DIMZ%(15,3):Z%()=-1:REPEAT:READk%:F%=Z%!Qy%+(k%*c_%):I_%=Z%!Qu%:F%!Va%=Ru%:REPEAT:oJ%=F%!W_%:lJ%=F%!wJ%:F%+=16*c_%:Q%=F%!W_%:X%=F%!wJ%:Y%=((Q%>0)AND(X%<0))OR((Q%<0)AND(X%>0)):Q%=ABS(Q%-oJ%)>>Sy%
10623X%=ABS(X%-lJ%)>>m%:T%=FNUy(Q%,X%,F%!Va%,Y%):I_%-=1:UNTILT%OR(I_%=0):UNTILT%OR(k%=0)
10624DATA %0001, %1001, %1000, %1010, %0010, %0110, %0100, %0101, %0000
10625=T%
10626DEFFNUy(Q%,X%,RETURNtu%,Ci%):LOCALT%,i%,Xy%,Ql%,Ul%,Xl%,E$,g%:g%=Z%!l%:T%=TRUE:i%=0:WHILE(i%+Ua%)<J%ANDT%:T%=(Z%(i%,0)<>Q%)OR(Z%(i%,1)<>X%):T%=T%OR(Z%(i%,2)<>Ci%):i%+=1:ENDWHILE:IFNOT(T%)THEN
10627tu%=Z%(i%-1,3)
10628ELSE:E$=STR$(J%):PROCay:IF(Q%=0)AND(X%=0)THEN
10629SYS&2002e,271,g%,E$,,,,MODETO;T%
10630ELSE:SYS&2002e,271,g%,E$,,M%+Q%,N%+X%,MODETO;T%
10631ENDIF:T%=FNU(T%):IFNOT(T%)THEN
10632Z%(i%,0)=Q%:Z%(i%,1)=X%:Z%(i%,2)=Ci%:IF(Q%<>0)OR(X%<>0)THEN
10633Q%=Q%<<Sy%:X%=X%<<m%:SYS46,316,g%,E$,0TOXy%,Ql%,Ul%,Xl%:IFCi%THEN
10634SYS46,546,g%,Ru%,0,X%,3:SYS46,546,g%,Ru%,Q%,0,3
10635ELSE:SYS46,546,g%,Ru%,0,0,3:SYS46,546,g%,Ru%,Q%,X%,3
10636ENDIF:SYS46,Xy%,Ql%,Ul%,Xl%
10637ENDIF:SYS46,280,g%,E$TO,,tu%:Z%(i%,3)=tu%:J%+=1:SYS&606c4,(J%*100)DIV27
10638ENDIF
10639ENDIF:=T%
10640DEFFNf(S%,M):=(M*S%!4)DIVS%!12
10641DEFFNz(S%,M):=(M*S%!0)DIVS%!8
10642DEFPROCay:IFFl%>4THEN
10643GCOL0,0TINT0:GCOL128,0TINT0
10644ELSE:GCOL0,0:GCOL128,0
10645ENDIF:ENDPROC
10646DEFFN_Message_version=4
10647DEFFN_hard_initialise_MessageLOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("%.Message: hard_initialise_Message")
10648vB=31:SYS5,"RMEnsure CAssembler 0.01 RMLoad System:Modules.CAssembler":DIMQi 256:=0
10649DEFFNey(j$,Fn%,RETURNU_%)LOCALA%:SYS&fcb83,j$+".Messages.",Fn%,0TOA%,U_%:IFU_%=0THENCALLv_
10650=A%
10651DEFFNSy(N%,x$,I$)LOCALGy%:SYS&fcb85,x$,I$,N%TOGy%;N%:=Gy%AND((N%AND2)=2)
10652DEFFNEy(N%)LOCALGy%:SYS&fcb86,N%TOGy%;N%:=Gy%AND((N%AND2)=2)
10653DEFFNe(N%,x$)LOCALGy%:SYS&fcb84,x$,Qi,256,N%,0TOGy%,N%:?N%=13:=$Qi
10654DEFPROCjJ(N%,x$,I$)N%=FNSy(N%,x$,I$):ENDPROC
10655DEFPROCq_(N%)N%=FNEy(N%):ENDPROC
10656DEFFNC(K%)=FNe(`y%,"E"+STR$(K%))
10657DEFFNH(z$)=FNe(`y%,z$)
10658DEFPROCU(z$,a$)PROCjJ(`y%,z$,a$):ENDPROC
10659DEFPROCby(z$,B%)SYS&dcb84,z$,B%,256,`y%,0:ENDPROC
10660DEFPROCQJ(z$,B%)SYS&dcb84,z$,B%,256,`y%,2:ENDPROC
10661DEFPROCtuPROCq_(`y%):ENDPROC
10662DEFPROCo(E%)IFE%<=0THEN
10663PROCU("Sys",""):PROCU("SysN","")
10664ELSEPROCU("Sys",FNAy(E%+4)):PROCU("SysN",STR$~(!E%))
10665ENDIF:ENDPROC
10666DEFFNw(K%)=FNe(`y%,"LE"+STR$(K%))
10667DEFPROCgJLOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("%.Message: assemble")
10668[OPTV%:ALIGN:.v_:FNZ:B Nl:]:IFV%AND4THENv_+=yy%
10669ENDPROC
10670DEFFN_CheckVars_version=3
10671DEFFN_hard_initialise_CheckVars=0
10672DEFFN_string_version=6
10673DEFFN_hard_initialise_stringLOCALERROR:ONERRORLOCALRESTOREERROR:PROCA("%.string: hard_initialise_string")
10674PROCS("<BasicV$Lib>.ctype",1):=0
10675DEFFNLy(R$)LOCALq$,yu%,J%,R%:yu%=LEN(R$):q$="":WHILEyu%>0:R%=ASC(R$):IFFNm(R%)THEN
10676q$+=CHR$(FNCy(R%))
10677ELSEq$+=CHR$(R%)
10678ENDIF:yu%-=1:R$=RIGHT$(R$,yu%):ENDWHILE:=q$
10679DEFFN_ctype_version=1
10680DEFFN_hard_initialise_ctype=0
10681DEFFNHy(R%)=R%-ASC("a")+ASC("A")
10682DEFFNm(R%)=R%>=ASC("a")ANDR%<=ASC("z")
10683DEFFNCy(R%)LOCALT%:IFFNm(R%)THEN
10684T%=FNHy(R%)
10685ELSET%=R%
10686ENDIF:=T%
�><In$Dir>.!RunImage
0�Produced by BasCompress v1.30 (09 Sep 1992)
9Z%=0:yJ%=10:Bn%=1:ly=11:y_=24:�s%16:�Kn%4:!Kn%=0:��x
��qJ(20,16):BJ%=�:KJ%=-2:Xa%=�:LJ%=�:�S("<BasicV$Lib>.CAsm",6):�S("<BasicV$Lib>.Sprite_IO",6):�S("<BasicV_Assembler$Lib>.Misc",33):�S("<BasicV$Lib>.StickyWin",1):�S("<BasicV$Lib>.Template",3):Pi%=BJ%:�BJ%�
>�Hy("debug,imath,message,RelObj,stdio,stdlib,string,wimp")
:�:�Hy("imath,message,RelObj,stdio,stdlib,string,wimp")
��:�su(10000,�,�):LJ%=BJ%:�G(0):�S("<BasicV$Lib>.file_io",3):�S("<BasicV$Lib>.FileType",1):�S("<BasicV$Lib>.Heap",7):�S("<BasicV$Lib>.IntMath",4):�S("<BasicV$Lib>.ModeInfo",5):�S("<BasicV$Lib>.Wimp",28):`y%=�ey("<Daleks3$Dir>",-1,U_%):�U_%>0�
;�!`y%,"Daleks can't load its' message file: "+�N(`y%+4)
	m�:Ry%=�:Tu%=�:N$="9,10,&502,&400C0,&400C1":�EJ("Daleks3",3,40,3,10,1992):LJ%=BJ%:�W_:�Yy:�d_:�Ml:�j(Wy%)

)�_(Wy%,`y,W$):ș&dcb8c,Ru,Wy%,`y:��x
�Ju:�:�h_:��:�

��Q:�BJ%�

��,�$+" ["+�(�)+"]"
�:��,�$

�:�B:�
B��Yu(Q%,X%,E%,I%):�c%,f%,k%:ș&400d2,Z%!z%,-1,,,1<<25:ȎZ%!q%�
m�_:Q%=(Q%-(Z%!ey%))�(Z%!Cy%):X%=((Z%!Ei%)-X%)�(Z%!vy%):c%=Q%-(Z%!t%):f%=X%-(Z%!Ay%):�(�(c%)<2)�(�(f%)<2)�

�P:�E%�4�
	Ȏc%�
�-1:k%=2
�0:k%=0
�+1:k%=1
�:Ȏf%�
�-1:k%=k%�8
�+1:k%=k%�4
�:Z%!Ny%=k%:�V
�:�h
�
�:�E%�1�
	�P:�u
�
 �
!
�o:�E%�1�
"�a
#�
$:�7
%�:�
& ��`_(p%,I%):�P:Ȏ�Ly(�(p%))�
'1�"1","2","3","4","5","6","7","8","9":ȎZ%!q%�
(I�_,Wy:�Q%,X%,j%,c%,f%:c%=((p%-�("1"))�3)-1:f%=((p%-�("1"))�3)-1:Ȏc%�
)�-1:Z%!Ny%=2
*�0:Z%!Ny%=0
+�+1:Z%!Ny%=1
,�:Ȏf%�
-�-1:Z%!Ny%+=4
.�+1:Z%!Ny%+=8
/L�:Q%=Z%!t%+c%:X%=Z%!Ay%-f%:j%=(Q%>=0)�(Q%<Z%!w%):�j%�(X%>=0)�(X%<Z%!x%)�
0�V
1�
2:�7
3�
4�"A":�Iy:�By
5�"C":�K
6�"D":�my
7�"G":�cy:�By
8�"H":�d
9�"L":�Ky
:�"S":�h
;�"T":�u
<�" ":�a
=:Ȏp%�
>
�3:�yy
?
�8:�ty
@�13:�Z_
A�16:�Ey
B�19:�ry
C�20:�A_
D:ș&400dc,p%
E�
F�:�
G(��Iy:rJ%=(Z%!uJ%=0):Z%!uJ%=rJ%:�U_:�
H��cy:�Z%!_y%�
I	iy%=0
J�:iy%=1
K�:�Jy:Z%!_y%=iy%:�r:�
L��Jy:�Z%!_y%�
M�r:Z%!_y%=0
N�:�
O
��r:�Zi:�
P��Ky:ȎZ%!q%�
Q�_,Wy:Z%!Ku%=�:Z%!Ny%=0:�V
R:�7
S�:�
T��Z_:ȎZ%!q%�
U
�fy:�7
V:Au%=(Z%!T_%=0):Z%!T_%=Au%
W�:�
X��u:ȎZ%!q%�
Y�_,Wy:�l:�vy
Z:�7
[�:�
\���vy:�Q%,X%,Ca%:�I:�g:�:Q%=�(Z%!w%)-1:X%=�(Z%!x%)-1:Ca%=(Q%<>(Z%!t%))�(X%<>(Z%!Ay%)):�Ca%�(?�L(Q%,X%)=0)�(?�K(Q%,X%)=0):Z%!t%=Q%:Z%!Ay%=X%:Z%!q%=R_:�w(Q%,X%,0):�
]��c_:�g:Z%!Ny%=0:�Z%!`_%�
^�D("Centre",Z%)
_�:�Z%!L_%�
`Z%!Vu%=GJ:�Z%!T_%�
a�V
b�
c�:�V
d�:�
e��h:ȎZ%!q%�
f�_,Wy:�Z%!V_%>0�
g
�l:�Oy
h�
i:�7
j�:�
k)��Oy:�I:Z%!q%=_J:�w(Z%!t%,Z%!Ay%,1):�
lw��hJ:�c%,f%,Q%,X%,M%,N%,E%:Z%!V_%-=1:�j_:Q%=Z%!t%:X%=Z%!Ay%:M%=Z%!w%:N%=Z%!x%:�f%=-1�+1:�((X%+f%)>=0)�((X%+f%)<N%)�
m9E%=�L(Q%,X%+f%):�c%=-1�+1:�((Q%+c%)>=0)�((Q%+c%)<M%)�
n�(E%?c%)<>0�
o�BJ(Q%+c%,X%+f%)
p�
q	�:�c%
r�:�f%:Z%!Ny%=0:�Z%!L_%�
s�Z%!T_%�
t�V
u�
v�:�V
w�:�
x��K:�i�
y#�H("Centre",Z%):�D("Centre",Z%)
z�:�
{$ݤ_Null_Reason_Centre(Z%):=�(�i)
|�ݤi:�U%,M%,N%,Q%,X%,YJ%,OJ%,Ty%,Iy%,al%,_%:U%=�M(64):!U%=Z%!z%:ș&400cb,,U%:M%=(U%!12)-(U%!4):N%=(U%!16)-(U%!8)-(E_%+4):YJ%=Z%!Cy%:OJ%=Z%!vy%:Q%=Z%!JJ%+(YJ%�2):X%=-Z%!ul%+(OJ%�2):Ty%=�S(Q%-(M%�2),0):Ty%=�P(Ty%,((Z%!w%*YJ%)-M%)):Iy%=�P((N%�2)+X%,0)
}�Iy%=�S(Iy%,-((Z%!x%*OJ%)-N%)):Q%=�((1<<Sy%)-1):X%=�((1<<m%)-1):Ty%=(Ty%�Q%)-(U%!20):Iy%=(Iy%�X%)-(U%!24):al%=((�(Ty%)>=(1<<Sy%))�(�(Iy%)>=(1<<m%))):�al%�
~i_%=Z%!fu%:U%!24+=�(Iy%)*�S((�(Iy%)�_%)�X%,1<<m%):U%!20+=�(Ty%)*�S((�(Ty%)�_%)�Q%,1<<Sy%):ș&400c5,,U%
�:�C(U%,64):=al%
�+��yy:xJ%=(Z%!NJ%=0):Z%!NJ%=xJ%:�Z%!NJ%�
��K
��:�H("Centre",Z%)
��:�
�+��ry:jJ%=(Z%!DJ%=0):Z%!DJ%=jJ%:�Z%!DJ%�
��K
��:�H("Centre",Z%)
��:�
�+��A_:eJ%=(Z%!`_%=0):Z%!`_%=eJ%:�Z%!`_%�
��K
��:�H("Centre",Z%)
��:�
�+��Ey:pJ%=(Z%!GJ%=0):Z%!GJ%=pJ%:�Z%!GJ%�
��dy
��:�
���dy:�ay�
�#�H("Centre",Z%):�D("Centre",Z%)
��:�
��ݤay:�U%,Q%,X%,M%,N%,YJ%,OJ%:U%=�M(64):!U%=Z%!z%:ș&400cb,,U%:M%=(U%!12)-(U%!4):N%=(U%!16)-(U%!8)-(E_%+4):Q%=U%!4-U%!20:X%=U%!16-U%!24-E_%:YJ%=Z%!Cy%:OJ%=Z%!vy%:Q%+=Z%!JJ%+(YJ%�2):X%-=Z%!ul%+(OJ%�2):Q%=�P(Q%-U%!4,U%!12-Q%)
�@X%=�P(X%-U%!8,U%!16-X%-E_%):�C(U%,64):=�p(Q%,YJ%)��p(X%,OJ%)
�ݤp(Q%,M%):=(Q%<=(M%*2.5))
���j_:�(Z%!V_%)�
��Z(Z%!o%,J_,Z%!V_%)
��:�_(Z%!o%,J_,�H("None"))
��:�
���Uy:�(Z%!uJ%)�(Z%!h_%=�)�
��U_
��:�
���l:�Z%!h_%�
��U_
��:�
���V:�k�
��l:Z%!q%=fy:�I_:�Z%!T_%�
��D("Move",Z%)
��:�:��_Null_Reason_Move(Z%)
��
��:�
�Iݤk:�F%,Q%,X%,Z$:Q%=Z%!t%:X%=Z%!Ay%:�(?�L(Q%,X%)<>0)�(?�K(Q%,X%)<>0)�
�%Z%!Ku%=�:Z%!q%=o:�z(2):�Z%!Nl%=��
�*Z$=�N(Z%+Wu%):�xy(Z%,Z$,Z%!C_%,Z%!_J%)
�,�:F%=�:Z%!q%=o:?�L(Q%,X%)=0:?�K(Q%,X%)=0
�&�:F%=Z%!Jy%:F%=(F%!u%<>-1):�(F%)�
�3�e(Z%):�Xu:Z%!q%=Hy:�D("Highlight_At_Start",Z%)
��:�Z%!q%<>Hy�
�Z%!q%=_
��
��
�	�:=F%
�0ݤ_Null_Reason_Move(A%):�G(A%):A%=�(Zu):�A%�
��k�
�Ȏ��
��Z%!Ku%:A%=�:�I_
�$�Z%!L_%:�Ly:A%=(Z%!q%<>_):�A%=0�
��I_
��
�:�Uy:�Z%!NJ%�
��K
��:�Z%!GJ%�
��dy
��
��
��
��
�	�:=A%
����BJ(Q%,X%):�F%,Fy%,J%:�oy(Z%!Fu%,Q%,X%):F%=Z%!Jy%:ȕ(Q%<>F%!my%)�(X%<>F%!gl%):F%+=n%:�:Fy%=F%+n%:ȕFy%!u%<>-1:Fy%+=n%:�:Fy%-=n%:�J%=0�n%-1�4:F%!J%=Fy%!J%:�J%:Fy%!u%=-1:?�L(Q%,X%)=�:�
�$ݤL(Q%,X%):=Z%!sy%+(Z%!w%*X%)+Q%
�$ݤK(Q%,X%):=Z%!cy%+(Z%!w%*X%)+Q%
���oy(A%,B%,C%):�Ql:�
�"��g:�oy(Z%!Hl%,Z%!t%,Z%!Ay%):�
����X_:�U%:Du%=11:�Gi%Du%+1:�Ma%� (B$)+2+1:U%=�M(512):U%!0=-1:U%!4=0:U%!8=-16:U%!12=�S(68,(Du%-1)*8*2):U%!16=68+32-16:U%!20=&1700312b:U%!24=Gi%:$Gi%=�H("IB0"):$Ma%="S!"+B$:U%!28=Ma%:U%!32=Du%:ș&400c2,,U%�Zi%:�C(U%,512):�
���T_:W$=v$:t_%=CJ:a_%=a_:m_%=TJ:X_%=eJ:Y_%=x_:f_%=xJ:e_%=w_:oy%=__:k_%=o_:EJ%=VJ:dy%=ci:B_%=Gu:rJ%=Fu:iy%=Sa:o_%=Kl:__%=vl:s%!0=Su:s%!4=ru:s%!8=hi:s%!12=fu:IJ%=f_:TJ%=RJ:tJ%=lJ:FJ%=c_:XJ%=WJ:PJ%=EJ:ll%=Oi:Au%=uJ:Su%=d_:xJ%=Pi:jJ%=Ri:eJ%=Bu:Zu%=Xl
�pJ%=Ll:aJ%=ll:�
�:��Yy:�N%,G$,gJ%:�T_:N%=�("<Daleks3$Dir>.Choices"):�N%�
��:��:�#N%:�
�G�#N%,W$:�#N%,rJ%,iy%,o_%,__%:�#N%,t_%,a_%,m_%:�#N%,B_%:�B_%>b�B_%=1
˯�#N%,X_%,Y_%:�#N%,dy%:�#N%,oy%,f_%,e_%:�#N%,k_%,EJ%:�#N%,s%!0,s%!4,s%!8,s%!12:�#N%,IJ%,TJ%,tJ%,Zu%:�#N%,FJ%,XJ%,PJ%,ll%:�#N%,Su%,xJ%,Au%:�#N%,jJ%,eJ%:IB#N%,pJ%,aJ%:��:�#N%
��:�
�/��o_:�N%:N%=�("<Daleks3$Dir>.Choices"):�N%�
��:��:�#N%:�Q
���#N%,W$:�#N%,rJ%,iy%,o_%,__%:�#N%,t_%,a_%,m_%:�#N%,B_%:�#N%,X_%,Y_%:�#N%,dy%:�#N%,oy%,f_%,e_%:�#N%,k_%,EJ%:�#N%,s%!0,s%!4,s%!8,s%!12:�#N%,IJ%,TJ%,tJ%,Zu%:�#N%,FJ%,XJ%,PJ%,ll%:�#N%,Su%,xJ%,Au%:�#N%,jJ%,eJ%:�#N%,pJ%,aJ%:��:�#N%
��:�
���my:ȎZ%!q%�
��_,Wy:�Z%!L_%�
�Z%!L_%=�
��:�a(23,�H("Demo"))=1�
�Z%!Nl%=�:Z%!L_%=�:�P:�Ly:�V
��
��
�:�7
��:�
���Ly:ȎZ%!Vu%�
��_l:�Ny(�My)
��GJ:�Ny(�By)
�:�Ny(Z%!Vu%)
��:�
ߡݤMy:�Q%,X%,K%,F%:K%=0:F%=Z%!Jy%:ȕF%!u%<>-1:Q%+=F%!Sn%:X%+=F%!Mn%:K%+=1:F%+=n%:�:Q%=(Q%/K%)+0.5:X%=(X%/K%)+0.5:Q%=�(Q%-Z%!t%):X%=�(X%-Z%!Ay%):=C%(Q%+1,X%+1)
�ݤBy:�Q%,X%,K%,D%,F%,Bl%,Gl%:D%=Z%!i_%:Q%=Z%!t%:X%=Z%!Ay%:K%=&7fffffff:ȕ!D%>=0:Bl%=!D%:Gl%=D%!4:F%=(Q%-Bl%)*(Q%-Bl%)+(X%-Gl%)*(X%-Gl%):�F%<K%�
�Ty%=Bl%:Iy%=Gl%:K%=F%
��:D%+=8:�:�K%=&7fffffff�
�BTy%=Z%!w%�2:Iy%=Z%!x%�2:K%=(Q%-Ty%)*(Q%-Ty%)+(X%-Iy%)*(X%-Iy%)
�
�:�K%<=2�
�F%=0:Z%!Vu%=F%
�0�:Q%=�(Ty%-Q%):X%=�(Iy%-X%):F%=C%(Q%+1,X%+1)
�	�:=F%
�6��Ny(k%):�Q%,X%,J%,Fy%:Q%=Z%!t%:X%=Z%!Ay%:�o(k%)�
�)Fy%=�:J%=1:ȕJ%<9�Fy%:�o((k%+J%)�9)�
�	J%+=1
��:Fy%=�
��:�:�J%>=9�
��Z%!V_%>0�
��Oy
�	�:�vy
��
� �:k%=(k%+J%)�9:Z%!Ny%=W%(k%)
��
��:Z%!Ny%=W%(k%)
��:�
��ݤo(k%):�c%,f%,Q%,X%,M%,N%,E%,y%:Q%=Z%!t%+J%(k%,0):X%=Z%!Ay%+J%(k%,1):M%=Z%!w%:N%=Z%!x%:y%=(X%>=0)�(X%<N%)�(Q%<M%)�(Q%>=0):y%=y%�(?�K(Q%,X%)=0):�y%�
�)�f%=-1�+1:�((X%+f%)>=0)�((X%+f%)<N%)�
�9E%=�L(Q%,X%+f%):�c%=-1�+1:�((Q%+c%)>=0)�((Q%+c%)<M%)�
��(E%?c%)<>0�
�y%=�:c%=+1:f%=+1
��
�	�:�c%
�	�:�f%
�
�:=(y%=0)
#�
ݤv=16
#�<��qJ(hi%,na%)�:��:�A("%LibHandler: hard_initialise")
#��v<na%�
#��0,"LibHandler too old"
#�
�:�hi%<1�
#�/�1,"LibHandler: bad max librarys parameter"
#�d�:Cl%=hi%:�M$(Cl%-1):�Q%(Cl%-1):_i%=0:�n_%256:Ml%=40:Py%=0:KJ%=12:Ka%=�:�Z$(Ml%-1):nJ%=�:LJ%=�:�
#�F��S(F$,ka%)�Uu%,J%,U$,s$:�:��:�A("%.LibHandler: load_library")
#�EJ%=0:Uu%=�:U$=�F$,1+�F$,".")):ȕJ%<_i%�Uu%:Uu%=(U$<>M$(J%)):�Uu%�
#�	J%+=1
#�
�:�:�Uu%�
#��J%=Cl%�
#�/�0,"LibHandler: Too many librarys to load!"
#�O�:M$(J%)=U$:s$="'"+F$+"' does not have a FN_":�:��:�A(s$+U$+"_version")
#�RQ%(J%)=�("FN_"+U$+"_version"):��:_i%+=1:�:��:�A(s$+"_hard_initialise_"+U$)
#�!�("FN_hard_initialise_"+U$)�
#�4�1,"Library file '"+F$+"'s hard init'ion failed"
#��:��
#��:�ka%>Q%(J%)�
#�&�1,"Library file '"+F$+"' too old"
#��:�
#���A(P$)�nJ%�
#�	�LJ%�
#���,�$+" ["+Þ+"]."
#�
̅�,�$
#��
#���Ka%�
#�
�Py%=Ml%�
#�&A(Ml%-1)="Errors too deep!!!!!":�x
#��:��P$,2)=": "�
#�P$=�P$,�(P$)-2)
#��:�LJ%�
#�Z$(Py%)=�$
#���Py%=0�
#�MZ$(Py%)="Error `"+�$+"' (line ":Z$(Py%)+=�(�)+") in ":Z$(Py%)+="`"+P$+"'"
$�Z$(Py%)="`"+P$+"'"
$�
$�:Py%+=1:��,""
$�
$�:�
$ ��x�M_%,m$:�:�:�"::"+�(�):�
$	�nJ%�
$	�LJ%�
$ �F(�,�$+" ["+�(�)+"]."):�B:�
$	��F(�,�$):�=p_%�
$
�B:�
$�
$�
$

��KJ%=-2�
$�Py%>0�
$
���,Z$(0)
$̅��,�$
$�:�
$�:�KJ%=-3�
$9$n_%="TASK":ș&400c0,200,!n_%,"LibHandler"+�(0):�Py%�
$�M_%=0�Py%-1:�M_%<(Py%-1)�
$�Ay(Z$(M_%)+" in")
$��Ay(Z$(M_%))
$
�:�M_%
$��Ay(�$+" (line "+�(�)+")")
$�:ș&600dd:�
$�:�KJ%>=0�
$�KJ%
$(�:�"An error has occured...":�:�Py%�
$<�M_%=0�Py%-1:�((7-(M_%<<1))�6)+1:�Z$(M_%);:�M_%<(Py%-1)�
$�" in ";
$
�:�M_%
$ ��$;" (line ";�(�);")"
$!�:�:�7:�
$"�:�
$#��Ay(I$)�mu%:mu%=20+(�(I$)+5)�-4:!n_%=mu%:n_%!16=&804c0:$(n_%+20)=I$:n_%?(20+�(I$))=10:n_%?(21+�(I$))=0:ș&600e7,17,n_%,0:�
$$ݤ_CAsm_version=10
$%Aݤ_hard_initialise_CAsm�:��:�A("%.CAsm: hard_initialise")
$&��S("<BasicV_Assembler$Lib>.Misc",27):ș5,"RMEnsure CAssembler 0.03 RMLoad System:Modules.CAssembler":ș5,"If ""<CAsm$Dir>""="""" Then Set CAsm$Dir <d>.Library.CAsm":CAsmLibrary_stdlib=1:CAsmLibrary_stdio=2:CAsmLibrary_string=3
$'�DO=4:CAsmLibrary_imath=5:z`=6:LB=7:CAsmLibrary_wimp=8:aO=9:CAsmLibrary_message=10:u`=11:CAsmLibrary_debug=12:CAsmLibrary_RelObj=13:jn=14:lo=15:WO=16:wB=17:aa=18:g`=19:LO=20:mB=21:sO=22:D`=23:`o=24:nn=25
$(�ro=26:B_=26:ya=0:ma=1:Fn=2:sa=3:K=4:h=5:Ti=6:Tl=7:Co=8:XJ=9:ny=10:V=11:E_=12:A=13:Z=14:Nk=15:Tu=&6d734143:uy%=0:ny%=13:A_=0:Py=0:X_=10*1024:ju=X_+(1*1024):Pi%=�:Hl=�:=0
$)]��Hy(X$)�D%,jy%,hy%,L%,O%,P%,V%,F$:�:��:ș&400ec,`%,-1:�A("%.CAsm: ClaimCAsmLibrary")
$*O`%=�-32768:ș&400ec,`%+32768,-1�L%:L%+=32768:O%=`%+32768:P%=0:V%=14:�O%=L%�
$+/�1,"Not enough memory to start application"
$,�:�uy%<>0�
$-2�1,"Only one call to ClaimCAsmLibrary allowed"
$."�:�Yl%B_*8:�S$(B_):�h_DEFAULT
$/eȕX$<>"":F$=�X$,�X$,",")-1):�:��:�A("Attempted to claim the non-existent library: `"+F$+"'!")
$0Jjy%=�("CAsmLibrary_"+F$):��:hy%=Yl%:D%=hy%+(uy%*8):ȕD%>hy%:�!hy%=jy%�
$1hy%=D%+1
$2�hy%+=8
$3�:�:�hy%=D%�
$4
�uy%>=B_�
$5-�1,"Too many librarys have been claimed!"
$6?�:!D%=jy%:S$(jy%)=F$:uy%+=1:O%=`%+32768:P%=0:�J("FNh_"+F$)
$7F�:X$=�X$,�(F$)+2):ȕ�(X$)=�(" "):X$=�X$,2):�:�:ș&400ec,`%,-1:��:�
$8>��ky�K%,D%,J%,y%:�:��:�A("%.CAsm: AssembleCAsmTables")
$9�uy%=0�
$:�h_DEFAULT
$;�:y%=Yl%:J%=uy%:�(V%�2)=0�
$<*�D%uy%*4:ș79,uy%,D%+&c0000000,3,,y%,8
$=��:[OPTV%:.JJ DCDTu:DCDEu:]:ȕJ%>0:[OPTV%:DCD!y%:DCDy%!4:]:y%+=8:J%-=1:�:[OPTV%:DCD0:]:[OPTV%:ALIGN:.C_:]:D%=P%:�jumpblock_DEFAULT
$>HEu=(P%-D%)>>2:J%=uy%:y%=Yl%:ȕJ%>0:D%=P%:�J("FNjumpblock_"+S$(!y%))
$?#y%!4=(P%-D%)>>2:y%+=8:J%-=1:�:�
$@3��Nu�C:�:��:�A("%.CAsm: AssembleCAsmBasic")
$A�[OPTV%:ALIGN:.HJ:STMFD(A)!,{4-5,Z}:BL P%+(13<<2):.C DCDJJ-C:DCDC_-C:DCDA_-C:DCDPy:DCDX_:.xy:DCD0:DCD0:DCD0:DCD0:LDR A,xy:LDMFD(A)!,{ny,V,E_,Z}
$B�MOVpc,Z:BIC 5,Z,#&fc000003:LDMIA5,{0-4}:ADD0,0,5:ADD1,1,5:ADD2,2,5:MOV5,#0:SWI &fcb80:STRvc0,xy+(1<<2):STRvc1,xy+(3<<2):LDMFD(A)!,{4-5,pc}:.G_:�Z:MOV2,Z:MOV1,A:MOV0,ny:SWI &fcb81:MOVvc1,#0
$CcSTRvc1,xy+(3<<2):MOVpc,2:MOV13,12:]:A_=P%:�M:�hy:Py=(Py+3)�-4:P%+=Py-1:O%+=Py-1:[OPTV%:DCB0:]:�
$D6��OJ�:��:�A("%.CAsm: AssembleCAsmApplication")
$E)�P%<>32768��1,"Expect P% to be &8000"
$Fw[OPTV%:ADR4,jy:MOV5,#Ai:SWI &fcb80:�l("vc",2,gO):Bvc cl:SWI 43:.jy:DCDJJ-jy:DCDC_-jy:DCDA_-jy:DCDPy:DCDX_:DCDju:]:�
$G4ݤZ�:��:�A("%.CAsm: StartCAssemblerSession")
$Hu[OPTV%:STMFD(A)!,{ny,V,E_,Z}:MOV V,pc:�l("",Z,xy):STR A,[Z],#4:LDMIA(Z)!,{ny,E_,A}:� V,V,#&fc000003:�R Z,Z,V:]:=0
$I1ݤN(A%)�M$:M$="":ȕ?A%:M$+=�(?A%):A%+=1:�:=M$
$JAݤxy(A%,B%)�M$:M$="":ȕB%>=0�?A%:M$+=�(?A%):A%+=1:B%-=1:�:=M$
$K!��O(A%,M$)$A%=M$:A%?�(M$)=0:�
$L��M_(A%,M$,B%)�(M$)<=B%�
$M($A%=�M$,B%-1):A%?(B%-1)=�(�M$,B%,1))
$N�$A%=M$:A%?�(M$)=0
$O�:�
$PݤJ(f$)�:��:�nJ
$Q
=�(f$)
$R
��nJ�Pi%�
$S"��,�$+" (evaluating `"+f$+"')"
$T
̅�,�$
$U�:�
$V9��su(gu%,WJ%,ri%)�:��:�A("%.CAsm: assemble_CAsm")
$WN�S("<BasicV$Lib>.Heap",8):�S("<BasicV$Lib>.Message",1):�sy(gu%,WJ%,ri%,0)
$X�HJ:��G_:�x
$Y�
$Z
��M�V%�4�
$[ș&606c4,(O%-yy%)*100�H%
$\�ș&606c4,(P%-yy%)*100�H%
$]�:�
$^yݤsy(gu%,WJ%,ri%,fJ%)�L%,O%,P%,V%,Ai%,H%:�O:�go,L_,VB,j_,to,DB:�bl,c,Ba:�:��:�A("%.CAsm: assemble_CAsm_External")
$_�fJ%=0�
$`:�S("<BasicV$Lib>.Heap",8):�S("<BasicV$Lib>.Message",1)
$a��:�yy%gu%:O=A:go=1<<31:L_=1<<30:VB=1<<29:j_=1<<28:to=1<<27:DB=1<<26:bl=1<<17:c=256:Ba=c+bl:ș&606c0:�:��:ș&606c1:�A("hourglass")
$b#H%=gu%:L%=yy%+gu%:�WJ%<>0�WJ%=4
$c"�V%=8+WJ%�10+WJ%�2:�(V%�4)<>0�
$dO%=yy%:�fJ%=1�
$eP%=32768
$f	�P%=0
$g�
$h�O%=0:P%=yy%
$i�:ȎfJ%�
$j4�1:�M:�OJ:�M:�k:�M:�ky:A_=P%:�M:�hy:Py=(Py+3)�-4
$k(�0:�M:�k:�M:�Q_:�M:�gJ:�M:�ky:�M:�Nu
$l�2:�M:�k
$m�:�V%�4�L%=O%�L%=P%
$n�(V%�2)=0�
$oș&dcb93,0,yy%,L%-yy%
$p"�:H%=L%-yy%:�V%:ș&606c1:�WJ%�
$q�fJ%=0�
$rHJ+=yy%:G_+=yy%
$s�
$t�:�Hl�fJ%<>2�
$u	�WJ%�
$vH%=C_:�fJ%�H%-=32768
$w7̅1,"CAsmTablesInBSS TRUE without offset assembly?"
$x�
$y�:�ri%�
$z`�"Assembled to &";~H%;" = ";((H%*10+512)�1024)/10;"K":�"Could assemble with ";gu%-H%;" less"
${	�:=H%
$|ݤ_Sprite_IO_version=6
$}Uݤ_hard_initialise_Sprite_IO�:��:�A("%.Sprite_IO: hard_initialise_Sprite_IO")
$~[�S("<BasicV$Lib>.ModeInfo",5):�S("<BasicV$Lib>.Heap",1):�S("<BasicV$Lib>.file_io",9):=0
$ݤU(ai%)=(ai%�1)<>0
$�>ݤny(ay%,M%,N%,yi%,Jn%)ș&dcb8e,3,ay%,M%,N%,yi%,Jn%�M%:=M%
$�V��iJ(fa%,ja%,�yi%,�an%)�A%,B%,C%:A%=fa%:B%=ja%<>0:C%=�:A%=�(Gl):yi%=!A%:an%=A%!4:�
$�/��Mu�s:�:��:�A("%.Sprite_IO: assemble")
$�x[OPTV%:ALIGN:.s DCD0:DCD0:.Gl:�Z:STMFD(A)!,{1-12,Z}:BL kJ:ADRvc Z,s:STMvcIA Z,{0-1}:MOVvc0,Z:LDMFD(A)!,{1-12,pc}:]:�
$�ݤ_Misc_version=34
$�Pݤ_hard_initialise_Misc�J%,a%,K%:�:��:�A("%.Misc: hard_initialise_Misc")
$�(�v<12��1,"Needs newer %.LibHandler"
$��si%=13:t$=�(si%):Oa%=10:r$=�(Oa%):h$=t$+r$:cn=256:�U%(15,1):a%=255:K%=3:�J%=0�15:U%(J%,0)=a%:U%(J%,1)=K%:a%=�h(a%,2):K%=�h(K%,2):�J%:b$="":Cn%=100:On%=&7fff00:ca%=�:An%=0:�bu%16:=0
$�;ݤl(J$,ZJ%,Wl%)�Nu%,fl%,Ti%,zl%,wl%:ly%=�t(J$):�V%�2=0�
$�[OPTV%:DCD0:DCD0:]
$�6�Nu%=Wl%-P%-8:�(Nu%)>65535��1,"adrl out of range"
$�,Ti%=�(Nu%)�255:fl%=�(Nu%)�65280:�Nu%>=0�
$�Tzl%=ly%�(&28f0000+(ZJ%<<12)+Ti%):wl%=ly%�(&2800c00+(ZJ%<<16)+(ZJ%<<12)+(fl%>>8))
$�U�zl%=ly%�(&24f0000+(ZJ%<<12)+Ti%):wl%=ly%�(&2400c00+(ZJ%<<16)+(ZJ%<<12)+(fl%>>8))
$��:[OPTV%:DCDzl%:DCDwl%:]
$��:=0
$�)ݤh(Q%,Cu%)�:��:�A("%.Misc: rol")
$�;Cu%=Cu%�32:=(Q%<<Cu%)�(((�((-1)>>>Cu%))�Q%)>>>(32-Cu%))
$�P��sJ(V$)�ti%,bi%,wa%:�:��:�A("%.Misc: Define_Local_Variables(`"+V$+"')")
$�#ti%=P%:bi%=O%:wa%=V%:�(V%�4)=0�
$�	O%=P%
$�P�:P%=0:V%=V%�6:P%=�("FN_Declare_Local_Variables_"+V$):P%=ti%:O%=bi%:V%=wa%:�
$�4��m_(J$,K%)�D%,ly%:�:��:�A("%.Misc: PROCcc")
$� ly%=�t(J$):�V%�4�D%=O%�D%=P%
$�1�J%=1�K%:D%-=4:!D%=((!D%)�&fffffff)+ly%:�J%:�
$�+ݤt(J$)�ly%:�:��:�A("%.Misc: FNcc")
$��J$=""�J$="  "�=14<<28
$��J$="lo"�=3<<28
$��J$="hs"�=2<<28
$�Hly%=�"eqnecsccmiplvsvchilsgeltgtlealnv",J$):�ly%�2�=((ly%-1)>>1)<<28
$�0�1,"Unrecognised condition code `"+J$+"'":=0
$�/ݤyy(Q%,�A%())�:��:�A("%.Misc: armimm")
$�Jș&dcb92,Q%,bu%�Q%:A%(0)=!bu%:A%(1)=bu%!4:A%(2)=bu%!8:A%(3)=bu%!12:=Q%
$�MݤZy(J$,a%,K%,Q%,ei%)�A%(),J%,b%:�:��:�A("%.Misc: SubtractImmediate")
$�*�A%(4):J%=�yy(�(Q%),A%()):b%=J%:�Q%<0�
$�MȕJ%>1:J%-=1:[OPTV%:ADD a%,K%,#A%(J%):]:K%=a%:�:[OPTV%:ADD a%,K%,#A%(0):]
$�N�ȕJ%>1:J%-=1:[OPTV%:SUB a%,K%,#A%(J%):]:K%=a%:�:[OPTV%:SUB a%,K%,#A%(0):]
$��:�ei%�
$��V%�4�a%=O%�a%=P%
$�a%!-4+=1<<20
$��:�m_(J$,b%):=0
$�MݤF(J$,ZJ%,Wl%)Wl%-=P%+8:�Wl%>=0��1,"invalid call to adrf(), label ahead"
$�=�Zy(J$,ZJ%,15,-Wl%,ei%)
$�ݤty(K%)P%+=K%:O%+=K%:=0
$�ݤ_StickyWin_version=1
$�Kݤ_hard_initialise_StickyWin�:��:�A("%.StickyWin: hard_initialise")
$�l_=36:=0
$���Zu(Zy%)Zy%!32=0:�
$�(��ny(Uy%,Zy%,ma%)!Zy%=Uy%:�Zy%!32=0�
$�ș&400cb,,Zy%
$� �:Zy%!28=ma%:ș&400c5,,Zy%:�
$���n(Uy%,Zy%)�Uy%>0�
$��Cy(Uy%,Zy%):ș&400c6,,Zy%
$��:�
$���Cy(Uy%,Zy%)�Uy%>0�
$�!Zy%=Uy%:ș&400cb,,Zy%
$��:�
$�ݤ_Template_version=4
$�Nݤ_hard_initialise_Template�Xy%:�:��:�A("%.Template: hard_initialise")
$�Tu%=�:=0
$�O��u_�zy%,Xy%,R%,U%,Q$,Ol%:Q$=�Iy("<"+B$+"$Dir>.Sprites"):zy%=�b(Q$):�zy%>0�
$�X�X(v%,zy%+16):v%!0=zy%+16:v%!4=0:v%!8=16:v%!12=16:ș&2002e,522,v%,Q$�Xy%;R%:�U(R%)�
$�+�U("Reason","Sprites"):�o(Xy%):�L(4):�B
$��
$�	�v%=0
$��:�SJ("Templates"):�Tu%�
$�
�v%>0�
$� �q("ProgInfo",v%,"ProgInfo")
$�!��q("ProgInfo",+1,"ProgInfo")
$��:N_%=0
$���v%>0�
$�N_%=�R("ProgInfo",Ol%,v%)
$��N_%=�R("ProgInfo",Ol%,+1)
$��
$�"�:Ui%=�R("Query",Ol%,+1):�__:�
$�\��SJ(_$)�ji%,jy%,zy%,Xy%,R%,G%:�Na%,Q$,UJ%,du%:Q$="<"+B$+"$Dir>."+_$:zy%=�b(Q$):�zy%<=0�
$�2�U("Reason",_$):�U("Sys","Not found"):�L(4):�B
$�Q�:�X(jy%,zy%):�X(UJ%,zy%+m):du%=UJ%+AJ:Na%=UJ%+m:ș&600d9,,Q$�Xy%;R%:�U(R%)�
$�6�U("Reason","Templates"):�o(Xy%):�L(4):ș&600da:�B
$��:�:��:�gu
$�XR_%=0:�du%!0=�("*"):ș&600db,,Na%,jy%,jy%+zy%,-1,du%,R_%�Xy%,,ji%,,,,R_%;R%:�U(R%)�
$��f(Xy%):ș&600da:�B
$��:�R_%�
$�&�R%=0�11:�du%?R%=13�du%?R%=0:R%=12
$�3�R%:UJ%!ou=ji%-jy%:UJ%!su=jy%:G%=�r(UJ%):�G%=0�
$��L(16):ș&600da:�B
$��:G%!wy=!qu%:!qu%=G%
$�*�:�R_%=0:��:ș&400da:�W(UJ%):�W(jy%):�
$�!��guș&600da:�A("Template"):�
$�&ݤR(C$,ta%,hu%)=�Ny(C$,ta%,hu%,"")
$�2ݤNy(C$,ta%,hu%,P$)�G%,qa%,N%:G%=�X(C$):�G%=0�
$��B
$�"�:qa%=G%+m:qa%!64=hu%:�P$<>""�
$�N%=�J("FN"+P$)
$��:�O(G%,N%)�
$��B
$��:�s(G%):=N%
$�)��q(C$,hu%,P$)�G%,M%:G%=�X(C$):�G%=0�
$��B
$� �:M%=G%+m:M%!64=hu%:�P$<>""�
$� M%=�J("FN"+P$+"("+�(M%)+")")
$��:�
$�&ݤE(C$,hu%)�G%,M%:G%=�X(C$):�G%=0�
$��B
$��:M%=G%+m:M%!64=hu%:=0
$�$ݤD(C$,�Uy%)�G%,T%:T%=�:�Uy%<=0�
$�G%=�X(C$):�G%�
$�T%=�O(G%,Uy%):�T%=��
$�
�s(G%)
$��
$�	�T%=�
$��
$�	�:=T%
$�#ݤg(C$,c%,f%)�G%:G%=�X(C$):�G%�
$�G%=�cy(G%,c%,f%)
$�	�:=G%
$�'ݤqy(C$,c%,f%,Y$)�G%:G%=�X(C$):�G%�
$�G%=�hy(G%,c%,f%,Y$)
$�	�:=G%
$�IݤVy(C$)�G%,_$,Y%:G%=!qu%:Y%=�:ȕG%�(�Y%):Y%=(�xy(G%+AJ,12)=C$):�Y%�
$�G%=G%!wy
$��:�:=G%
$� ݤX(C$)�G%:G%=�Vy(C$):�G%=0�
$��U("Reason",C$):�L(3)
$�	�:=G%
$�4ݤO(G%,�Uy%)ș&600c1,,G%+m�Uy%;G%:G%=�U(G%):�G%�
$��f(Uy%):Uy%=0
$�	�:=G%
% ��`y(G%,�Uy%)G%=�O(G%,Uy%):�
%Aݤcy(G%,c%,f%)�N%,M%,R%:N%=0:R%=G%!by:G%!by+=1:G%=�r(G%):�G%�
%AM%=G%+m:�Dy(M%,R%,c%):�iy(M%+4,R%,f%):�`y(G%,N%):�s(G%):G%=N%
%	�:=G%
%Dݤhy(G%,c%,f%,Y$)�N%,M%,R%:N%=0:R%=G%!by:G%!by+=1:G%=�r(G%):�G%�
%8M%=G%+m:�Dy(M%,R%,c%):�iy(M%+4,R%,f%):�M%!56�(1<<8)�
%�M_(M%!72,Y$,M%!80)
%��M_(M%+72,Y$,12)
%�:�`y(G%,N%):�s(G%):G%=N%
%		�:=G%
%
:��Dy(M%,R%,F%)�N%,_%:_%=Yu%<<Sy%:N%=M%!8-M%!0:�_%<=N%�
%
M%!0=0
%�_%=_%-N%:�F%<0�
%
F%=_%+(F%�_%)
%�:M%!0=(M%!0+F%*R%)�_%
%�:M%!8=M%!0+N%:�
%A��iy(M%,R%,F%)�N%,_%:_%=(w_%<<m%)-96:N%=M%!8-M%!0+48:�_%<=N%�
%M%!8=(w_%<<m%)-N%
%�_%=_%-N%:�F%<0�
%F%=_%+(F%�_%)
%:�:M%!8=(w_%<<m%)-M%!8:M%!8=(w_%<<m%)-((M%!8+F%*R%)�_%)
%�:M%!0=M%!8-N%:�
%;��s(G%)�D%:D%=qu%:ȕ!D%<>0�!D%<>G%:D%=!D%+wy:�:�!D%=G%�
%!D%=G%!wy:G%!wy=0:�W(G%)
%�:�
%ݤvy(A%)=�(Hi)
%ݤr(A%)A%=�vy(A%):�A%=0�
%
�L(16)
%	�:=A%
%!��y_�(V%�2)=0��sJ("Template")
% [OPTV%:ALIGN:.Hi:�Z:B pl:]:�
%@ݤ_Declare_Local_Variables_Template�:��:�A("@.Template")
% [�qu%4:!qu%=0:P%=0:[OPTV%:.wy DCD0:.by DCD0:.su DCD0:.ou DCD0:.AJ DCD0:DCD0:DCD0:.m:]:=0
%!��YJ:�d%,i%,S$:��:�+0:�Tu%�
%"(d%=!(�X("ProgInfo")+m+88+(16<<5)+20)
%#�:d%=�wy(N_%,16)
%$J�:�S$:i%=�(S$):S$=�S$,2):ȕS$<>"":?d%=�(S$)�i%:S$=�S$,2):d%+=1:�:?d%=0
%%8�"҂�����򖝟���",,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,
%&�
%'"��k:�:��:�A("@.Assembler")
%(�(V%�2)=0�
%)�rJ
%*��:[OPTV%:ALIGN:.u_ DCD0:.Nu LDR0,u_:MOVSpc,Z:.vu:]:P%+=s_%:O%+=s_%:[OPTV%:]:�M:�eJ:�M:�FJ:�M:�HJ:�M:�a_:�M:�NJ:�M:�ZJ:�M:�V_:�M:�au:�M:�MJ:�M:�lJ:�M:�xJ:�M:�RJ:�M:�qu:�M:�cJ:�M:�k_:�M:�Mu:�M:�y_:�
%+
��hy:�
%,[��ZJ:[OPTV%:ALIGN:.xy%DCD0:.S_ DCD0:ALIGN:.r:LDR12,S_:MOVSpc,Z:.U`:STR0,S_:MOVSpc,Z:]:�
%-O��a_:�u,M,S,U,D,I,my,X,N,L:�ni,My,sy,Hk:�h_,QJ:�:��:�A("Show_Movement")
%.�u=2:M=3:S=4:U=6:D=7:I=8:my=9:X=10:N=U:L=Z:h_=384:QJ=352:[OPTV%:ALIGN:.Zu:�Z:STMFD(A)!,{12,Z}:BL r:LDR0,[12,#Yy%]:ADD0,0,#16*c_%:STR0,[12,#Yy%]:BL tJ:LDR0,[12,#Yy%]:LDR1,[12,#Qy%]:CMP0,1:MVNeq0,#�(-1):MOVne0,#0:LDMFD(A)!,{12,pc}^:.tJ
%/�STMFD(A)!,{4-9,Z}:SUB O,O,#h_:LDR my,[12,#Yy%]:LDR0,[12,#z%]:MOV1,#0:MOV2,#&f0000000:MOV3,#&70000000:MOV4,#0:STMIA O,{0,1-4}:MOV1,O:SWI &400c9:TEQ0,#0:Beq Fa:BL Qy:ADD D,12,#ey%:LDMIA D,{D,I}:LDR X,[12,#Jy%]:ADD M,12,#JJ%:LDMIA M,{M,S}
%0�LDR U,[12,#Ny%]:TEQ U,#0:ADDne M,D,M:SUBne S,I,S:ADDne u,my,U,LSL#iJ%:LDMneIB u,{0,1,u}:ADDne M,M,0:ADDne S,S,1:MOVeq u,#0:MOV0,#34:�R0,0,#512:LDR1,[12,#l%]:MOV5,#3:ADD U,O,#QJ:STMIA U,{0,1,M,S,u,X}:.ni:TEQ u,#0:SWIne 46:.sy:LDMIA X,{M,S,U,L}
%1�CMN L,#1:Beq ql:ADD X,X,#n%:ADD M,D,M:SUB S,I,S:ADD u,my,U,LSL#iJ%:LDMIA u,{u,N,L}:ADD M,M,N:ADD S,S,L:SWI 46:B sy:.ql:MOV1,O:SWI &400ca:TEQ0,#0:ADDne U,O,#QJ:LDMneIA U,{0,1,M,S,u,X}:Bne ni:.Fa:LDR1,[12,#Qy%]:LDR0,[12,#Qu%]:ADD0,1,0,LSL#4+iJ%
%2�TEQ0,my:Bne xl:LDR5,[12,#Jy%]:.C LDR0,[5,#u%]:CMN0,#1:Beq sl:�S0,0,#sJ%�z_%:ADDeq5,5,#n%:Beq C:.To:LDR0,[12,#t%]:LDR1,[12,#Ay%]:LDR2,[12,#w%]:MLA 0,1,2,0:LDR1,[12,#sy%]:LDRB1,[1,0]:TEQ1,#0:LDReq1,[12,#cy%]:LDReqB1,[1,0]:TEQeq1,#0:Bne Si
%3�LDR0,[12,#C_%]:ADD0,0,#10:BL s_:.Si:LDR0,[5,#u%]:�0,0,#z_%�sJ%:CMP0,#z_%:Bne ei:LDR0,[12,#Fu%]:ADD1,5,#my%:LDMIA1,{1-2}:BL zJ:MOV0,#z_%:.ei:CMP0,#z_%�sJ%:Bne bJ:ADD1,5,#my%:LDMIA1,{1-2}:LDR0,[12,#ou%]:MVN3,#�(-1):STMIA0,{1-2,3}:ADD0,0,#8
%4�STR0,[12,#ou%]:LDR0,[12,#ql%]:BL zJ:.bJ:MOV2,5:.`J ADD2,2,#n%:LDR3,[2,#u%]:CMN3,#1:Bne `J:SUB2,2,5:ADD1,5,#n%:MOV0,5:BL Yu:B C:.sl:BL O_:BL i_:.xl:ADD O,O,#h_:LDMFD(A)!,{4-9,pc}^:]:�
%5���NJ:�M,S,U,e,By,w,f,X,N,L:�g,Fy,Y,a,p:�Vk,sy,Di:M=1:S=2:U=3:w=4:f=5:e=6:X=7:By=8:Y=9:a=11:p=Z:g=Y:Fy=a:N=0:L=U:[OPTV%:ALIGN:.t_:�Z:STMFD(A)!,{12,Z}:BL r:BL O_:LDMFD(A)!,{12,pc}^:ALIGN:.O_:STMFD(A)!,{4-9,Z}:LDR0,[12,#Qy%]:STR0,[12,#Yy%]
%6�LDR X,[12,#Jy%]:ADD g,12,#Cy%:LDMIA g,{g,Fy}:ADD N,12,#vu%:LDMIA N,{N,L}:ADD w,12,#t%:LDMIA w,{w,f}:MLA M,w,g,N:MLA S,f,Fy,L:ADD Z,12,#JJ%:STMIA Z,{M,S}:.sy:LDR M,[X,#u%]:CMN M,#1:ADDne w,X,#my%:LDMneIA w,{w,f}:MLAne M,w,g,N:MLAne S,f,Fy,L
%7�STMneIA X,{M,S}:ADDne X,X,#n%:Bne sy:LDMFD(A)!,{4-9,pc}^:ALIGN:.I_:�Z:STMFD(A)!,{4-9,12,Z}:BL r:LDR e,[12,#sy%]:LDR By,[12,#w%]:LDR2,[12,#x%]:MUL 2,By,2:MOV1,#0:MOV0,e:BL ty:LDR X,[12,#Jy%]:ADD p,12,#t%:LDMIA p,{Y,a}:LDR U,[12,#Ny%]:TST U,#1
%8�ADDne Y,Y,#1:TST U,#2:SUBne Y,Y,#1:TST U,#8:SUBne a,a,#1:TST U,#4:ADDne a,a,#1:STMIA p,{Y,a}:LDR p,[12,#cy%]:.sy:LDR M,[X,#u%]:CMN M,#1:Beq Ui:ADD M,X,#my%:LDMIA M,{w,f}:CMP Y,w:SUBlt w,w,#1:MOVlt U,#2:MOVeq U,#0:MOVgt U,#1:ADDgt w,w,#1:CMP a,f
%9�SUBlt f,f,#1:�Rlt U,U,#8:�Rgt U,U,#4:ADDgt f,f,#1:STR U,[X,#Wi%]:STMIA M,{w,f}:MLA U,By,f,w:LDRB0,[e,U]:TEQ0,#0:Bne Il:LDRB0,[p,U]:�S0,0,#255:Beq dl:STRB0,[e,U]:.C ADD X,X,#n%:B sy:.Il:MOV0,#0:STRB0,[e,U]:MOV0,#255:STRB0,[p,U]:LDR0,[X,#u%]
%:��R0,0,#z_%:�R0,0,#sJ%:STR0,[X,#u%]:LDR0,[12,#Jy%]:.Di:ADD M,0,#my%:LDMIA M,{M,S}:TEQ M,w:TEQeq S,f:ADDne0,0,#n%:Bne Di:LDR M,[0,#u%]:�R M,M,#sJ%:STR M,[0,#u%]:B C:.dl:LDR M,[X,#u%]:�R M,M,#z_%:STR M,[X,#u%]:B C:.Ui:LDMFD(A)!,{4-9,12,pc}^:]:�
%;���lJ:[OPTV%:ALIGN:.Zi:�Z:STMFD(A)!,{4-9,12,Z}:BL r:SUB A,A,#512:LDR0,[12,#z%]:MOV1,A:MOV2,#0:MOV3,#&f0000000:MOV4,#&70000000:MOV5,#0:STMIA1,{0,2-5}:SWI &400c9:BL Qy:.C TEQ0,#0:BLne m_:BLne wJ:MOVne1,A:SWIne &400ca:Bne C:ADD A,A,#512
%<LDMFD(A)!,{4-9,12,pc}^:]:�
%=���k_:[OPTV%:ALIGN:.Ql:.zJ:STMFD(A)!,{4-9,12,Z}:SUB A,A,#512:BL r:ADD3,12,#vu%:LDMIA3,{3,4}:ADD5,12,#Cy%:LDMIA5,{5,6}:MLA 3,1,5,3:MLA 4,2,6,4:MOV2,0:LDR7,[12,#z%]:ADD1,A,#2<<2:STR7,[1]:STR3,[1,#4]:ADD5,3,5:STR5,[1,#12]:BL py:RSB Z,4,#0:SUB Z,Z,0
%>�STR Z,[1,#8]:ADD Z,Z,6:STR Z,[1,#16]:MOV5,#3:MOV0,#34:�R0,0,#512:LDR Z,[12,#l%]:STMIA A,{0,Z}:SWI &400c9:BL Qy:ADD8,12,#ey%:LDMIA8,{8-9}:ADD3,8,3:SUB4,9,4:.C TEQ0,#0:LDMneIA A,{0-1}:SWIne 46:ADDne1,A,#2<<2:SWIne &400ca:Bne C:ADD A,A,#512
%?LDMFD(A)!,{4-9,12,pc}^:]:�
%@���cJ:�Fy,g,Y,a,d,n,N,L,By,p_:d=3:n=4:Y=6:a=7:g=8:Fy=9:By=10:p_=11:N=0:L=5:[OPTV%:ALIGN:.U_:STMFD(A)!,{Z,0-12}:SUB A,A,#512:BL r:LDR By,[12,#w%]:LDR p_,[12,#x%]:LDR0,[12,#h_%]:MVN0,0:STR0,[12,#h_%]:ADD Y,12,#t%:LDMIA Y,{Y,a}:ADD g,12,#Cy%
%A�LDMIA g,{g,Fy}:ADD d,12,#JJ%:LDMIA d,{d,n}:RSB2,n,#0:BL py:SUB2,2,0:LDR0,[12,#z%]:MOV1,A:STR0,[1]:SUB0,d,g:STR0,[1,#4]:ADD0,d,g,LSL#1:STR0,[1,#12]:SUB0,2,Fy:STR0,[1,#8]:ADD0,2,Fy,LSL#1:STR0,[1,#16]:SWI &400c9:BL Qy:ADD1,12,#ey%:LDMIA1,{1,Z}
%B�ADD d,1,d:SUB n,Z,n:.C TEQ0,#0:Beq ti:LDR1,[12,#l%]:�Q(-1,+1,_l%):�Q(0,+1,Ni%):�Q(+1,+1,Li%):�Q(-1,0,cl%):�Q(+1,0,dl%):�Q(-1,-1,Oi%):�Q(0,-1,sl%):�Q(+1,-1,Ii%):MOV1,A:SWI &400ca:B C:.ti:ADD A,A,#512:LDMFD(A)!,{pc,0-12}^:.au:STMFD(A)!,{d,n,Y,a,Z}
%C�ADD Y,Y,N:SUB a,a,L:CMP Y,By:CMPlo a,p_:LDMhsFD(A)!,{d,n,Y,a,pc}^:MLA d,g,N,d:MLA n,Fy,L,n:MLA N,a,By,Y:LDR L,[12,#sy%]:LDRB L,[L,N]:TEQ L,#0:LDReq L,[12,#cy%]:LDReqB L,[L,N]:TEQeq L,#0:LDMneFD(A)!,{d,n,Y,a,pc}^:MOV0,#34:�R0,0,#512:MOV5,#3:SWI 46
%DLDMFD(A)!,{d,n,Y,a,pc}^:]:�
%EEݤQ(c%,f%,tu%):[OPTV%:�Y(N,c%):�Y(L,f%):LDR2,[12,#tu%]:BL au:]:=0
%FEݤG(c%,f%,tu%):[OPTV%:LDR2,[12,#tu%]:�Y(3,c%):�Y(4,f%):BL ri:]:=0
%GݤY(y%,R%):�R%<0�
%H[OPTV%:MVN y%,#�(R%):]
%I�:[OPTV%:MOV y%,#R%:]
%J�:=0
%K���MJ:[OPTV%:ALIGN:.H_ DCD0:.py LDR0,H_:MOVSpc,Z:.Qy:STMFD(A)!,{0-1,Z}:LDR0,[1,#4]:LDR Z,[1,#20]:SUB0,0,Z:LDR Z,[1,#16]:LDR1,[1,#24]:SUB1,Z,1:LDR Z,H_:SUB1,1,Z:ADD Z,12,#ey%:STMIA Z,{0-1}:LDMFD(A)!,{0-1,pc}^:.LJ:STMFD(A)!,{0,Z}:LDR0,[1,#4]
%LrLDR Z,[1,#20]:SUB0,0,Z:STR0,[12,#ey%]:LDR0,[1,#16]:LDR Z,[1,#24]:SUB0,0,Z:STR0,[12,#Ei%]:LDMFD(A)!,{0,pc}^:]:�
%M���au:�B,F,G,J,E,T,D,I:�x,v,C:J=11:G=10:F=9:B=8:I=7:D=6:T=5:E=4:[OPTV%:.m_:STMFD(A)!,{Z}:MOV F,1:LDR E,[12,#Cy%]:LDR T,[12,#vy%]:ADD D,12,#ey%:LDMIA D,{D,I}:LDR0,[1,#28]:SUB0,0,D:MOV1,E:BL uy:MOV B,0:LDR0,[F,#36]:SUB0,0,#1:SUB0,0,D:MOV1,E:BL uy
%N�MOV G,0:LDR0,[F,#32]:SUB0,0,#1:SUB0,I,0:MOV1,T:BL uy:MOV J,0:LDR0,[F,#40]:SUB0,I,0:MOV1,T:STMFD(A)!,{J}:BL uy:LDMFD(A)!,{J}:MOV F,0:LDR0,[12,#Yy%]:LDR1,[12,#Qy%]:TEQ0,1:LDMeqFD(A)!,{pc}^:SUBS B,B,#2:MOVlt B,#0:SUBS F,F,#2:MOVlt F,#0:ADD G,G,#2
%O�LDR Z,[12,#w%]:CMP G,Z:SUBge G,Z,#1:ADD J,J,#2:LDR Z,[12,#x%]:CMP J,Z:SUBge J,Z,#1:LDMFD(A)!,{pc}^:ALIGN:.wJ:LDR1,[12,#_y%]:SUBS1,1,#1:MOVltSpc,Z:SWI c+18:SWI c+3:LDR0,[12,#Bi%]:SWI 0:LDR0,[12,#Kl%]:CMP0,#0:Blt el:SWI c+23:SWI c+17:SWI c+2:SWI 0
%P�SWI c:SWI c:SWI c:SWI c:SWI c:SWI c:.el:ADDpc,pc,1,LSL#2:MOVSpc,Z:B vJ:B _u:B mi:B zi:B Za:.vJ:STMFD(A)!,{B,F,G,J,Z}:CMP B,#0:MOVle B,#1:SUBS G,G,B:LDMltFD(A)!,{B,F,G,J,pc}^:MLA B,E,B,D:LDR0,[12,#x%]:SUB0,0,#1:CMP J,0:SUBge J,0,#1:SUBS J,J,F
%Q�LDMltFD(A)!,{B,F,G,J,pc}^:MLA F,T,F,T:SUB F,I,F:.v MOV Z,B:MOV3,G:.x MOV0,#69:MOV1,Z:MOV2,F:SWI 69:ADD Z,Z,E:SUBS3,3,#1:Bge x:SUB F,F,T:SUBS J,J,#1:Bge v:LDMFD(A)!,{B,F,G,J,pc}^:._u:STMFD(A)!,{B,F,G,J,Z}:SUB G,G,B:MLA B,E,B,D:ADD B,B,E,ASR#1
%R�SUB J,J,F:MUL F,T,F:ADD F,F,T,ASR#1:SUB F,I,F:.v MOV Z,B:MOV3,G:.x MOV0,#69:MOV1,Z:MOV2,F:SWI 69:ADD Z,Z,E:SUBS3,3,#1:Bge x:SUB F,F,T:SUBS J,J,#1:Bge v:LDMFD(A)!,{B,F,G,J,pc}^:.mi:STMFD(A)!,{B,F,G,J,Z}:SUB G,G,B:ADD G,G,#1:MLA B,E,B,D:SUB J,J,F
%S�ADD J,J,#1:MUL F,T,F:SUB F,I,F:.v MOV Z,B:MOV3,G:.x MOV0,#69:MOV1,Z:MOV2,F:SWI 69:MOV0,#69:ADD1,Z,E,ASR#1:MOV2,F:SWI 69:MOV0,#69:MOV1,Z:ADD2,F,T,ASR#1:SWI 69:ADD Z,Z,E:SUBS3,3,#1:Bge x:SUB F,F,T:SUBS J,J,#1:Bge v:LDMFD(A)!,{B,F,G,J,pc}^:.zi
%T�STMFD(A)!,{B,F,G,J,Z}:SUB G,G,B:ADD G,G,#1:MLA B,E,B,D:SUB J,J,F:MUL F,T,F:ADD J,J,#1:SUB F,I,F:.v MOV Z,B:MOV3,G:.x MOV0,#68:SUB1,Z,#t:SUB2,F,#t:SWI 69:MOV0,#5:ADD1,Z,#t:ADD2,F,#t:SWI 69:MOV0,#68:ADD1,Z,#t:SUB2,F,#t:SWI 69:MOV0,#5:SUB1,Z,#t
%U�ADD2,F,#t:SWI 69:ADD Z,Z,E:SUBS3,3,#1:Bge x:SUB F,F,T:SUBS J,J,#1:Bge v:LDMFD(A)!,{B,F,G,J,pc}^:.Za:STMFD(A)!,{B,F,G,J,Z}:SUB G,G,B:ADD G,G,#1:MLA B,E,B,D:SUB J,J,F:MUL F,T,F:ADD J,J,#1:SUB F,I,F:.v MOV Z,B:MOV3,G:.x MOV0,#68:SUB1,Z,#t:MOV2,F:SWI 69
%V�MOV0,#5:ADD1,Z,#t:MOV2,F:SWI 69:MOV0,#68:MOV1,Z:SUB2,F,#t:SWI 69:MOV0,#5:MOV1,Z:ADD2,F,#t:SWI 69:ADD Z,Z,E:SUBS3,3,#1:Bge x:SUB F,F,T:SUBS J,J,#1:Bge v:LDMFD(A)!,{B,F,G,J,pc}^:ALIGN:.il:LDR0,[12,#q%]:TEQ0,#Hy:TEQne0,#R_:MOVeqSpc,Z
%W�STMFD(A)!,{D,I,E,T,Z}:ADD0,12,#JJ%:LDMIA0,{0-1}:ADD D,D,0:SUB I,I,1:LDR0,[12,#Yy%]:LDR1,[12,#Ny%]:ADD0,0,1,LSL#iJ%:ADD0,0,#W_%:LDMIA0,{0-1}:ADD D,D,0:ADD I,I,1:�G(0,0,Hl%):LDR0,[12,#h_%]:TEQ0,#0:LDMeqFD(A)!,{D,I,E,T,pc}^:�G(-1,+1,_l%):�G(0,+1,Ni%)
%X�G(+1,+1,Li%):�G(-1,0,cl%):�G(+1,0,dl%):�G(-1,-1,Oi%):�G(0,-1,sl%):�G(+1,-1,Ii%):LDMFD(A)!,{D,I,E,T,pc}^:.ri:ADD0,12,#t%:LDMIA0,{0-1}:ADD0,0,3:SUB1,1,4:CMP0,B:CMPge G,0:CMPge1,F:CMPge J,1:MOVltSpc,Z:LDR5,[12,#w%]:MLA 5,1,5,0:LDR0,[12,#sy%]
%Y�LDRB0,[0,5]:TEQ0,#0:LDReq0,[12,#cy%]:LDReqB0,[0,5]:TEQeq0,#0:MOVneSpc,Z:ADD0,12,#Cy%:LDMIA0,{0-1}:MLA 3,0,3,D:MLA 4,1,4,I:MOV5,#3:LDR1,[12,#l%]:MOV0,#34:�R0,0,#512:SWI 46:MOVSpc,Z:ALIGN:.yi:STMFD(A)!,{E,T,Z}:LDR Z,[12,#Jy%]:LDR2,[12,#Fu%]
%Z�LDR1,[12,#l%]:SUB Z,Z,#n%:.C ADD Z,Z,#n%:LDR0,[Z,#u%]:CMN0,#1:LDMeqFD(A)!,{E,T,pc}^:ADD3,Z,#my%:LDMIA3,{3-4}:CMP3,B:CMPge G,3:CMPge4,F:CMPge J,4:Blt C:LDMIA Z,{3-5}:ADD3,D,3:SUB4,I,4:LDR0,[12,#Yy%]:ADD0,0,5,LSL#iJ%:ADD0,0,#W_%:LDMIA0,{0,5}:ADD3,3,0
%[�ADD4,4,5:MOV5,#3:MOV0,#34:�R0,0,#512:SWI 46:B C:ALIGN:.gJ:STMFD(A)!,{E,T,D,I,12,Z}:ADD0,12,#vu%:LDMIA0,{0-1}:ADD D,D,0:SUB I,I,1:LDR2,[12,#ql%]:LDR1,[12,#l%]:MOV0,#34:�R0,0,#512:LDR Z,[12,#i_%]:.C LDMIA(Z)!,{3,12}:CMP3,#0
%\�LDMltFD(A)!,{E,T,D,I,12,pc}^:CMP3,B:CMPge G,3:CMPge12,F:CMPge J,12:Blt C:LDMIA A,{E,T}:MLA 3,E,3,D:MUL 4,T,12:SUB4,I,4:MOV5,#3:SWI 46:B C:]:�
%]���xJ:[OPTV%:ALIGN:.ui:�Z:STMFD(A)!,{0-12,Z}:BL r:MOV0,#0:STR0,[12,#_J%]:MOV0,#0:BL s_:MOV0,#0:STR0,[12,#h_%]:LDR0,[12,#y_%]:LDR2,[12,#Q_%]:SUB0,0,2:STR0,[12,#V_%]:BL cu:LDMFD(A)!,{0-12,pc}^:ALIGN:.Xu:�Z:.cu:STMFD(A)!,{12,Z}:BL r:BL `l:BL Mu:BL O_
%^yBL i_:LDR0,[12,#z%]:MOV1,#&f0000000:MOV2,#&f0000000:MOV3,#&70000000:MOV4,#&70000000:SWI &400d1:LDMFD(A)!,{12,pc}^:]:�
%_���RJ:[OPTV%:ALIGN:.`l:STMFD(A)!,{4-9,Z}:LDR3,[12,#_J%]:ADD3,3,#1:STR3,[12,#_J%]:MOV2,#Yi:LDR1,[12,#o%]:MOV0,#gy:SWI &dcb8c:LDR1,[12,#H_%]:LDR2,[12,#O_%]:SUB0,3,#1:MLA 0,1,0,2:LDR1,[12,#b_%]:CMP0,1:MOVgt0,1:MOV5,0:LDR4,[12,#g_%]:LDR0,[12,#w%]
%`�LDR1,[12,#x%]:MUL 9,0,1:MOV0,4:MOV1,9:.C SUBS1,1,#1:STRhs1,[0],#4:Bhi C:LDR6,[12,#sy%]:MOV0,6:MOV1,#0:MOV2,9:BL ty:MOV7,9,LSR#1:.C BL OJ:MOV1,9:BL Ky:LDR0,[4,1,LSL#2]:LDR2,[4,7,LSL#2]:STR0,[4,7,LSL#2]:STR2,[4,1,LSL#2]:SUBS7,7,#1:Bhs C:LDR7,[12,#Jy%]
%a�.C LDR0,[4],#4:MOV Z,#255:STRB Z,[6,0]:LDR1,[12,#w%]:BL Ky:STR1,[7,#my%]:STR0,[7,#gl%]:MOV0,#0:STR0,[7,#u%]:STR0,[7,#Wi%]:ADD7,7,#n%:SUBS5,5,#1:Bne C:MVN0,#�(-1):STR0,[7,#u%]:LDR0,[12,#cy%]:MOV1,#0:LDR2,[12,#w%]:LDR3,[12,#x%]:MUL 2,3,2:BL ty
%bJLDR0,[12,#i_%]:MVN1,#0:STR1,[0]:STR0,[12,#ou%]:LDMFD(A)!,{4-9,pc}^:]:�
%c���qu:�C:[OPTV%:ALIGN:.Mu:STMFD(A)!,{Z}:MOV0,#0:STR0,[12,#Ku%]:LDR0,[12,#V_%]:LDR1,[12,#Q_%]:ADD0,0,1:BL Sl:.C BL OJ:LDR1,[12,#w%]:LDR2,[12,#x%]:MUL 1,2,1:BL Ky:MOV0,1:LDR1,[12,#w%]:BL Ky:STR1,[12,#t%]:STR0,[12,#Ay%]:BL Ki:Bne C:LDMFD(A)!,{pc}^:ALIGN
%d�.Ki:STMFD(A)!,{4-7,Z}:LDR6,[12,#w%]:LDR7,[12,#x%]:LDR3,[12,#sy%]:MVN4,#�(-1):.v MVN5,#�(-1):.x BL yl:LDMneFD(A)!,{4-7,pc}:ADD5,5,#1:TEQ5,#2:Bne x:ADD4,4,#1:TEQ4,5:Bne v:LDMFD(A)!,{4-7,pc}:ALIGN:.yl:ADD0,0,4:ADD1,1,5:CMP0,7:CMPlo1,6:MLAlo 2,0,6,1
%e�SUB0,0,4:SUB1,1,5:�RhsSpc,Z,#L_:LDRB2,[3,2]:TEQ2,#0:�ReqSpc,Z,#L_:BICSpc,Z,#L_:ALIGN:.Sl:STMFD(A)!,{Z}:CMP0,#0:MOVlt0,#0:LDR1,[12,#x_%]:CMP0,1:MOVgt0,1:STR0,[12,#V_%]:MOV3,0:LDR1,[12,#o%]:MOV2,#J_:MOV0,#gy:SWI &dcb8c:LDMFD(A)!,{pc}^:ALIGN
%f�.hJ DCD&f423f:ALIGN:.s_:STMFD(A)!,{Z}:CMP0,#0:MOVlt0,#0:LDR1,hJ:CMP0,1:MOVhi0,1:STR0,[12,#C_%]:MOV3,0:LDR1,[12,#o%]:MOV2,#Fi:MOV0,#gy:SWI &dcb8c:LDMFD(A)!,{pc}^:]:�
%g���V_:[OPTV%:ALIGN:ALIGN:.Mi:�Z:STMFD(A)!,{4-9,12,Z}:BL r:SUB A,A,#512:LDR0,[12,#z%]:MOV1,A:STR0,[1]:SWI &400c8:BL Qy:.C TEQ0,#0:Beq Fl:BL r:BL m_:BL il:BL gJ:BL yi:BL wJ:BL KJ:MOV1,A:SWI &400ca:B C:.Fl:ADD A,A,#512:LDMFD(A)!,{4-9,12,pc}^:]:�
%h���eJ:�C,v,x:�e,X,i,ry,Q,y,M,S,io,yy,hy,V_,p:M=0:S=1:Q=2:y=3:X=K:e=h:i=Ti:q=Tl:ry=Z:hy=3:io=V:yy=Z:V_=i:p=X:[OPTV%:.Lu EQUS"%d.%03d":DCB0:.MJ�ty(32):ALIGN:.i_:LDR0,[12,#hJ%]:TEQ0,#0:MOVeqSpc,Z:STMFD(A)!,{4-9,Z}:LDR X,[12,#Jy%]:LDR e,[12,#Ou%]
%i�LDR q,[12,#w%]:ADD q,q,#2:ADD q,q,#31:MOV q,q,LSR#5:MOV q,q,LSL#2:LDR2,[12,#x%]:ADD2,2,#2:MUL 2,q,2:MOV1,#0:MOV0,e:BL ty:MOV i,#7:.C LDR M,[X,#u%]:CMN M,#1:Beq Iu:ADD M,X,#my%:LDMIA M,{M,S}:ADD X,X,#n%:ADD M,M,#1:MLA S,q,S,e:BIC Q,M,#31
%j�ADD S,S,Q,LSR#3:� M,M,#31:CMP M,#30:Bhs ki:LDR Q,[S],#0:�R Q,Q,i,LSLM:STR Q,[S],q:LDR Q,[S],#0:�R Q,Q,i,LSLM:STR Q,[S],q:LDR Q,[S],#0:�R Q,Q,i,LSLM:STR Q,[S],q:B C:.ki:MOVeq ry,#1:MOVhi ry,#3:LDMIA S,{Q,y}:�R Q,Q,i,LSLM:�R y,y,ry:STMIA S,{Q,y}
%k�ADD S,S,q:LDMIA S,{Q,y}:�R Q,Q,i,LSLM:�R y,y,ry:STMIA S,{Q,y}:ADD S,S,q:LDMIA S,{Q,y}:�R Q,Q,i,LSLM:�R y,y,ry:STMIA S,{Q,y}:B C:.Iu:MOV i,#1:LDR p,[12,#i_%]:.C LDMIA(p)!,{M,S}:CMP M,#0:Blt Ii:ADD M,M,#1:ADD S,S,#1:MLA S,q,S,e:BIC Q,M,#31:� M,M,#31
%l�LDR Q,[S,Q,LSR#3]!:�R Q,Q,i,LSLM:STR Q,[S],#-1:B C:.Ii:MOV hy,#0:LDR S,[12,#x%]:.v ADD e,e,q:LDR M,[12,#w%]:MOV V_,e:LDR Q,[V_],#4:MOV Q,Q,LSR#1:MOV yy,#31:.x MOVS Q,Q,LSR#1:ADDcs hy,hy,#1:SUBS M,M,#1:Ble Vl:SUBS yy,yy,#1:Bgt x:LDR Q,[V_],#4
%m�MOV yy,#32:B x:.Vl:SUBS S,S,#1:Bgt v:LDR V,[12,#x%]:LDR Z,[12,#w%]:MUL 0,V,Z:MOV V,#1000:MUL 0,V,0:MOV1,hy:ADD0,0,1,LSR#1:BL Ky:MOV1,#1000:BL Ky:MOV3,1:MOV2,0:ADR1,Lu:ADR0,MJ:SWI &dcb8a:ADR3,MJ:LDR1,[12,#o%]:MOV2,#Y_:MOV0,#W_:SWI &dcb8c
%nLDMFD(A)!,{4-9,pc}^:]:�
%o���__:Z_%=�E("GameP",v%):F_%=�E("ViewP",v%):Wy%=�R("EnterName",1,+1):ry%=�R("Arrow",1,+1):P_%=�E("Highlight",v%):S_%=�E("Centre",v%):Oy%=�E("Magnifier",v%):�q("Board",+1,"Board_Template"):�q("Status",v%,"Status_Template"):�q("HighScores",+1,""):�YJ
%p�wn%32:�
%q-ݤBoard_Template(M%):vl=M%?35:Kl=M%?34:=0
%rUݤStatus_Template(M%):Zl%=(M%!8)-(M%!0):E_%=(M%!12)-(M%!4):!H_=E_%+4:Dn%=M%!28:=0
%sI��DJ:D_%=�:zJ%=&1040a31+0:dJ%=&1040a31+1:Hu%=&1040a31+2:kl%=0:ol%=0:�
%t(��uy:Pa%=6:Ja%=1:MJ%=�(oJ):D_%=zJ%:�
%u-��gy:�A%:`l%=Z%:A%=Z%:MJ%=�(xu):D_%=dJ%:�
%v��S_:MJ%=�(nl):D_%=Hu%:�
%wC��FJ:�gi,mJ,iJ,El,jJ,ii,gl,cJ,wl:�:��:�A("@.BasWimp: Menu")
%x�[OPTV%:ALIGN:.Pl DCD0:DCD1:DCD2:DCD3:DCD4:DCD5:DCD6:DCD7:DCD8:.tu:�Z:STMFD(A)!,{Z}:MOV V,#8:.C SUB A,A,#4:STR A,[A],#0:SUBS V,V,#1:Bgt C:BL hu:LDMFD(A)!,{1-8,Z}:ADRvc V,Pl:STMvcIA V,{0-8}:MOVvc0,V:BICvcSpc,Z,#j_:�RSpc,Z,#j_:ALIGN:.Ml:�Z
%y�STMFD(A)!,{Z}:MOV0,#4096:BL wi:MOV0,#512:MOV1,#32:BL fJ:LDMFD(A)!,{pc}:ALIGN:.gi EQUS"[0,w>,<s>,s>,s>,dm>,>":DCB0:EQUS"[40,>,d>,>":DCB0:.mJ EQUS"[100,>,>,>,d>,m>,m>,dm>,w>":DCB0:EQUS"<t[120,w>,<td>,dsw>,>,>,>,s>,>,>,>":DCB0
%z�EQUS"[140,w>,<t>,<t>,<t>,<t>":DCB0:EQUS"[160,<tm>,<t>,m>,w>,w>,d>,<t>":DCB0:EQUS"<t[180,>,>,>,>,>,>,m>":DCB0:EQUS"cb<t[500,>,>,>,>,>,>,>,>,>,>,>,>,>,>,>,>":DCB0:EQUS"cb<t[500,>,>,>,>,>,>,>,>,>,>,>,>,>,>,>,>":DCB0:.iJ EQUS"[1000,m>,m>":DCB0
%{�.El EQUS"[1100":DCB0:.ii EQUS",<t ":DCB0:.cJ EQUS"M1101":DCB0:.jJ EQUS"[1200":DCB0:.gl EQUS", ":DCB0:.wl EQUS"M1201":DCB0:ALIGN:.oJ:�Z:STMFD(A)!,{Z}:LDR1,Hy%:TEQ1,#0:MOVeq1,#1:MOVne1,#0:STMFD(A)!,{1}:�F("",0,gi):BL z_:ADD A,A,#1<<2:LDMFD(A)!,{pc}
%|�.xu:�Z:STMFD(A)!,{Z}:SUB A,A,#12<<2:ADD1,0,#e%:LDR1,[1,#kJ%]:ADD1,1,#D_:LDR2,[0,#bJ%]:LDR3,[0,#NJ%]:LDR4,[0,#DJ%]:LDR5,[0,#`_%]:LDR6,[0,#GJ%]:LDR7,[0,#_y%]:MOV8,7:LDR9,[0,#RJ%]:LDR V,[0,#uJ%]:LDR Z,[0,#r_%]:STMIA A,{1-9,V,Z}:LDR Z,[0,#T_%]
%}�STR Z,[A,#11<<2]:�F("",0,mJ):BL z_:ADD A,A,#12<<2:LDMFD(A)!,{pc}:.Hy%DCD0:.Xu%DCD0:.My%DCD0:.nl:�Z:STMFD(A)!,{K-XJ,Z}:BL du:�F("",0,iJ):BL cy:MOVvc0,#0:BLvc T_:�F("vc",0,El):BLvc cy:Bvs vy:LDR K,Hy%:ADD K,K,#4:LDR h,My%:.C STMFD(A)!,{K-h}
%~�F("",0,ii):BL cy:LDRvc0,[K,#r%]:BLvc Ul:�F("vc",0,cJ):LDMvcIA K,{1-8}:STMFD(A)!,{1-8}:BLvc e_:ADD A,A,#8<<2:LDMFD(A)!,{K-h}:Bvs vy:ADD K,K,#l_%:SUBS h,h,#1:Bne C:MOV0,#0:BL T_:�F("vc",0,jJ):BLvc cy:Bvs vy:LDR K,Hy%:ADD K,K,#4:LDR h,My%
%�.C STMFD(A)!,{K-h}:�F("",0,gl):BL cy:�F("vc",0,wl):LDMvcIA K,{1-8}:STMFD(A)!,{1-8}:BLvc e_:ADD A,A,#8<<2:LDMFD(A)!,{K-h}:Bvs vy:ADD K,K,#l_%:SUBS h,h,#1:Bne C:MOV0,#0:BL T_:BLvc hl:.vy:LDMFD(A)!,{K-XJ,pc}:.bi:�Z:STMFD(A)!,{4-8,Z}
%�jLDMIA0,{0,3,4,5,6,7,V,Z}:STMFD(A)!,{0,3,4,5,6,7,V,Z}:MOV0,2:BL qu:ADD A,A,#8<<2:LDMFD(A)!,{4-8,pc}:]:�
%�P��JJ:�Q%,X%,VJ%,Dy%,Fy%:Q%=W%!24:X%=W%!28:VJ%=W%!32:Dy%=W%!36:Fy%=p_%:ȎD_%�
%��zJ%:ȎVJ%�
%��0:�D("ProgInfo",N_%)�
%��:ș&400e8,,N_%,Q%,X%
%��
%�.:�F(Fy%,"Unexpected MenuWarning Message")
%��
%��dJ%:�G(`l%):ȎVJ%�
%��g_:ȎDy%�
%��fl:�mJ:ș&400e8,,S_%,Q%,X%
%�.:�F(Fy%,"Unexpected MenuWarning Message")
%��
%��sJ:ȎDy%�
%��qJ:�XJ:ș&400e8,,P_%,Q%,X%
%��NJ:�fu:ș&400e8,,ry%,Q%,X%
%�.:�F(Fy%,"Unexpected MenuWarning Message")
%��
%��Q_:ȎDy%�
%��di:�n_:ș&400e8,,Oy%,Q%,X%
%��Aa:�t_:ș&400e8,,F_%,Q%,X%
%�.:�F(Fy%,"Unexpected MenuWarning Message")
%��
%��YJ:�_u:ș&400e8,,Z_%,Q%,X%
%�.:�F(Fy%,"Unexpected MenuWarning Message")
%��
%�.:�F(Fy%,"Unexpected MenuWarning Message")
%��:�
%����v_:�VJ%,U%,di%,ci%,mJ%,Dy%,A%,Bu%,`i%:�jl%:U%=�M(512):ș&400cf,,U%:di%=U%!0:ci%=U%!4:kl%=di%:ol%=ci%:mJ%=U%!8:�C(U%,512):VJ%=!W%:Dy%=W%!4:Bu%=W%!8:jl%=W%!12:ȎD_%�
%��zJ%:ȎVJ%�
%��pu:�bu
%��Vu:ȎDy%�
%��al:�o_
%��Hu:�Yy
%��Ei:�Gu
%��
%��Ni:�Ry
%��
%��dJ%:�G(`l%):ȎVJ%�
%��ol:�m(mJ%):�u
%��zu:�m(mJ%):�h
%��vi:�m(mJ%):�Ky
%��sJ:�LJ(Dy%)
%��g_:ȎDy%�
%�
�-1:�K
%��Zl:�yy
%��nJ:�ry
%��_i:�A_
%��uu:�Ey
%��
%��Q_:ȎDy%�
%��`i:�Iy
%��Xi:ȎBu%�
%��-1:�cy
%��mu:Ȏjl%�
%��-1
%�@�0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15:o_%=jl%:�o_%<>Z%!RJ%�
%�/`i%=Z%!_y%:�Jy:Z%!RJ%=o_%:�qy:Z%!_y%=`i%:�r
%��
%��
%�:iy%=Bu%:�iy%<>Z%!_y%�
%��Jy:Z%!_y%=iy%:�r
%��
%��
%��kl:ȎBu%�
%��-1
%�@�0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15:__%=Bu%:�__%<>Z%!r_%�
%�*Z%!r_%=__%:Z%?`u%+=1:�VJ(Z%!z%,__%):�p
%��
%��
%��Wu:�Tu(Z%)
%��iu:�Z_
%��
%�
�YJ:�a
%��Wi:�my
%��
%��Hu%:ȎVJ%�
%��jl:�Xu(Dy%)
%��pi:�C_(Dy%)
%��
%�
�:�mJ%=1�
%��By
%��:�P
%��:�
%���m(mJ%):�mJ%<>1�
%��P
%��:�
%���By:�j%:j%=�:ȎD_%�
%��zJ%:�uy
%��dJ%:�gy
%��Hu%:�S_
%�	j%=�
%�
�:�j%�
%�ș&400d4,,MJ%,kl%,ol%
%��:�
%���P:ș&400d4,,-1:D_%=�:�
%�"��s_:�D%:D%=�M(128):Ȏ�I(!W%)�
%�Z�A_%:!D%=Z%!o%:ș&400cb,,D%:D%!28=W%!28:W%!28=!D%:ș&400c5,,W%:ș&400cb,,W%:�My(D%,W%)
%�*�ty%:!D%=Z%!z%:ș&400cb,,D%:�My(W%,D%)
%�ɤV(!W%):�fJ(W%)
%�:ș&400c5,,W%
%��:�C(D%,128):�
%�g��My(D%,M%):�j_%:D%!4=M%!4:D%!12=M%!12:D%!16=M%!16:D%!8=�S(M%!8,D%!16-E_%):j_%=M%!12-M%!4:�j_%<Zl%�
%�D%!20=Zl%-j_%
%�'�:D%!20=((Zl%-j_%)/2)��((1<<Sy%)-1)
%�3�:D%!24=0:ș&400c5,,D%:M%!28=!D%:ș&400c5,,M%:�
%���Pu:Ȏ�I(!W%)�
%��A_%,ty%:�P_
%�ɤV(!W%):�I_
%�:ș&400c6,,W%
%��:�
%�"��vJ:�cJ%:�:��:ș&606c1:�Q
%�ș&606c0:Ȏ�I(!W%)�
%��A_%:�Lu
%��ry%:�Hu
%�<:ș&400c8,,W%�cJ%:ȕcJ%:ș&81681,,W%:ș&400ca,,W%�cJ%:�
%��:ș&606c1:�
%���Lu:�Z%!l%<>0�
%��Mi
%�@�:ș&400c8,,W%�cJ%:ȕcJ%:ș&400e6,128+8:�:ș&400ca,,W%�cJ%:�
%��:�
%�!��Hu:�A%,B%:A%=Z%:B%=W%:�rl:�
%�
��KJ:�
%�
��`J:�
%�
��x_:�
%�
��Iu:�
%�
��GJ:�
%���Ry:�vJ%:vJ%=(Z%=0):�vJ%�
&vJ%=(Z%!C_%=0)�(Z%!q%=o)
&�:�vJ%�
&vJ%=(�a(3,�C(5))=1)
&�:�vJ%�
&�B
&�:�
&,��N_:�A$,I%:A$="":I%=W%!36:Ȏ�Yy(W%!32)�
&�-2:�I%=Zi%�
&A$="IconBar"
&	�:A$=�n
&
�
&�N_%:A$="ProgInfo"
&�Wy%:A$="EnterName"
&
�ty%:A$="Status"
&�A_%:A$="Board"
&�Z_%:A$="GameP"
&�F_%:A$="ViewP"
&�P_%:A$="Highlight"
&�ry%:A$="Arrow"
&�S_%:A$="Centre"
&�Oy%:A$="Magnifier"
&$ɤV(W%!32):A$="HighScore":�I%>0�
&	I%=-1
&
�:I%=I%�4
&�
&:�(ju%>218)�(W%!36<>-1)�
&	A$=�n
&�
&�:�A$<>""�
& �I%<0�A$+=",_"�A$+=","+�(I%)
&�by("H"+A$,W%+20):�W%?20�
&VW%!16=1283:W%!12=W%!8:A%=W%+20:ȕ?A%:A%+=1:�:W%!0=(A%-W%+4)�-4:ș&400e7,17,W%,W%!4
& �
&!�:�
&"
��r_:�
&#8ݤn:�A$,M%:M%=W%+40:ș&400f4,1,M%,W%!32,W%!36:ȎD_%�
&$�zJ%:A$="I"
&%�dJ%:A$="D"
&&�Hu%:A$="H"
&'�:�A$<>""�
&(7A$="M"+A$+�(!M%):ȕM%!4<>-1:M%+=4:A$+="_,"+�(!M%):�
&)	�:=A$
&*��wy:�IJ(-1):�Ty:�
&+��WJ:�Ty:�
&,'��Ty:pl%=�S(1<<Sy%,1<<m%)*2:�Z%<>0�
&-�p
&.�:�
&/D��p:�F%:�qy:F%=Z%+e%:F%!Tl%=pl%:Z%!Ri%=1<<Sy%:Z%!_a%=1<<m%:�Gy:�
&0���qy:�Q%,X%,Ia%,Ta%,D%:Q%=0:X%=0:ș50,Q%,X%�,,Ia%,Ta%:ș&400e6,0+Z%!r_%:ș69,69,Q%,X%:ș&400e6,48+Z%!RJ%:ș69,69,Q%,X%:ș50,Q%,X%�,,Z%!Bi%,Z%!Kl%:�0,Ia%ȜTa%:ș69,69,Q%,X%:�Fl%<8�Z%!Kl%=-1
&1�
&2��B:�Uu:�:�
&3,��g_:�I%,p%:I%=W%!4:p%=W%!24:Ȏ�I(W%!0)�
&4�Wy%:�tJ(p%,I%)
&5�A_%:�`_(p%,I%)
&6�ty%:�zJ(p%,I%)
&7�Oy%:�Ku(p%,I%)
&8:ș&400dc,p%
&9�:�
&:��zJ(p%,I%):Ȏp%�
&;N�13:ș&400d2,-1,-1:ș&400d2,Z%!z%,-1,,,1<<25:W$=�s(Z%!o%,ZJ):�O(Z%+Wu%,W$)
&<:ș&400dc,p%
&=�:�
&>L��b_:�Q%,X%,E%,M%,I%:Q%=W%!0:X%=W%!4:E%=W%!8:M%=�I(W%!12):I%=W%!16:ȎE%�
&?�2:ȎM%�
&@:�-2:�uy:X%=96+(44*Pa%)+(24*Ja%):ș&400d4,,MJ%,Q%-64,X%
&A'�A_%,ty%:�gy:ș&400d4,,MJ%,Q%-64,X%
&B&ɤV(M%):�S_:ș&400d4,,MJ%,Q%-64,X%
&C�
&D�1*16,4*16
&E,:ii%=(M%=Wy%):�Ry%�M%<>ty%�ș&81680,,W%
&F	ȎM%�
&G�A_%:�Yu(Q%,X%,E%,I%)
&H�ty%:�Ou(Q%,X%,E%,I%)
&I�-2:�B_(Q%,X%,E%,I%)
&J�Z_%:�Ru(Q%,X%,E%,I%)
&K�F_%:�Vu(Q%,X%,E%,I%)
&L�S_%:�p_(Q%,X%,E%,I%)
&M�P_%:�UJ(Q%,X%,E%,I%)
&N�Oy%:�AJ(Q%,X%,E%,I%)
&O�Ui%:�Au(Q%,X%,E%,I%)
&P�N_%:�D_(Q%,X%,E%,I%)
&Q�Wy%:�uJ(Q%,X%,E%,I%)
&R�ry%:�pJ(Q%,X%,E%,I%)
&SɤV(M%):�L_(E%)
&T,�:�Ry%�ii%=0�M%<>ty%�W%!8=0:ș&81680,,W%
&U�:�
&V��D_(Q%,X%,E%,I%):ȎI%�
&W �14,15:�F(Vy%,�C(0)):�E%<>1�
&X�P
&Y�
&Z�:�
&[��B_(Q%,X%,E%,I%):Ȏ��
&\$�Wy%<>0:�F(Vy%,�C(2)):�Y(Wy%,-1)
&]�!xy%=0:�b
&^ɤ`:�Y(Z%!z%,-1):�a
&_:�G(!xy%):�fy
&`�:�
&a;��z(K%):$Gi%=��H("IB"+�(K%)),Du%-1):�Qu(-1,Zi%,0,0,0):�
&b��tJ(p%,I%):Ȏp%�
&cO�13:ș&400d2,-1,-1:W%!8=1:W%!12=W%!0:W%!16=IJ:ș&81680,,W%:W$=�s(Wy%,`y):�b
&d:ș&400dc,p%
&e�:�
&f��uJ(Q%,X%,E%,I%):ȎI%�
&g'�IJ:ș&400d2,-1,-1:W$=�s(Wy%,`y):�b
&h�:�
&i���zu:�M%:M%=Z_%:�Z(M%,Ly+1,eJ):�Z(M%,Uy+1,x_):�Z(M%,k+1,__):�Z(M%,Ay+1,w_):�Z(M%,Sy+1,xJ):�Z(M%,Jy+1,TJ):�Z(M%,Ny+1,CJ):�Z(M%,ay+1,a_):�
&j��_u:�M%:�D("GameP",Z_%)�
&k��:M%=Z_%:�Z(M%,Ly+1,Z%!w%):�Z(M%,Uy+1,Z%!x%):�Z(M%,k+1,Z%!b_%):�Z(M%,Ay+1,Z%!O_%):�Z(M%,Sy+1,Z%!H_%):�Z(M%,Jy+1,Z%!x_%):�Z(M%,Ny+1,Z%!y_%):�Z(M%,ay+1,Z%!Q_%)
&l�:�
&m,��Ru(Q%,X%,E%,I%):�M%,a%,d%:M%=Z_%:ȎI%�
&n%�Ly,Ly+2:�J(M%,I%,E%,Ly,5,999):�j
&o%�Uy,Uy+2:�J(M%,I%,E%,Uy,5,999):�j
&p3�k,k+2:a%=�A(M%,Ay+1):�J(M%,I%,E%,k,a%,9999):�j
&q/�Ay,Ay+2:a%=�A(M%,k+1):�J(M%,I%,E%,Ay,2,a%)
&r/�Sy,Sy+2:a%=�A(M%,k+1):�J(M%,I%,E%,Sy,1,a%)
&s2�Jy,Jy+2:a%=�A(M%,Ny+1):�J(M%,I%,E%,Jy,a%,999)
&t0�Ny,Ny+2:a%=�A(M%,Jy+1):�J(M%,I%,E%,Ny,1,a%)
&u0�ay,ay+2:a%=�A(M%,Jy+1):�J(M%,I%,E%,ay,1,a%)
&v�Rl:�zu
&w�Vi:�l_:�E%�4�
&x�P
&y�
&z�:�
&{_��j:�d%,E%,M%,R%:M%=Z_%:d%=�A(M%,Ly+1):E%=�A(M%,Uy+1):R%=�P((d%*E%)�2,9999):�A(M%,k+1)>R%�
&|�Z(M%,k+1,R%)
&}�:�A(M%,Ay+1)>R%�
&~�Z(M%,Ay+1,R%)
&�:�A(M%,Sy+1)>R%�
&��Z(M%,Sy+1,R%)
&��:�
&����l_:�M%:M%=Z_%:X_%=�A(M%,Ly+1):Y_%=�A(M%,Uy+1):oy%=�A(M%,k+1):e_%=�A(M%,Ay+1):f_%=�A(M%,Sy+1):m_%=�A(M%,Jy+1):t_%=�A(M%,Ny+1):a_%=�A(M%,ay+1):�Xy:�
&�&��Xy:�Xi%,j_%,Uy%,M%,N%:Xi%=�:Ȏ��
&��(X_%=Z%!w%)
&��(Y_%=Z%!x%)
&��(oy%=Z%!b_%)
&��(e_%=Z%!O_%)
&��(f_%=Z%!H_%)
&��(m_%=Z%!x_%)
&��(t_%=Z%!y_%)
&��(a_%=Z%!Q_%)
&�
Xi%=�
&��:�Xi%�
&��Z%!w%=X_%:Z%!x%=Y_%:Z%!b_%=oy%:Z%!O_%=e_%:Z%!H_%=f_%:Z%!x_%=m_%:Z%!y_%=t_%:Z%!Q_%=a_%:M%=Z%!w%:N%=Z%!x%:j_%=Z%!Cy%*M%:Uy%=Z%!vy%*N%+E_%:�:��:�bJ
&���Vy(Z%!z%,j_%,Uy%+4,�):�py(Z%!z%,�c(Z%,"Board")):�W(Z%!sy%):�W(Z%!g_%):�W(Z%!Jy%):�X(Z%!sy%,M%*N%):�X(Z%!g_%,M%*N%<<2):�X(Z%!Jy%,(oy%+1)*n%):�X(Z%!Ou%,((M%+2+31)>>5)*4*(N%+2)):Z%!cy%=Z%!g_%:Z%!i_%=Z%!cy%+((M%*N%+3)�-4):��:�a
&��:�
&���bJ:�F(Vy%,�C(6)):�c:�P:�
&�}��yJ:�M%:M%=F_%:�Z(M%,Ry+1,1):�T(M%,M_,�):�T(M%,Z_,�):�T(M%,oy,�):�v(M%,j,�):�Z(M%,j+1,1):�Z(M%,Ty+1,o_):�Z(M%,qy+1,VJ):�
&�!��t_:�M%,K%:�D("ViewP",F_%)�
&�p�:M%=F_%:�Z(M%,Ry+1,Z%!G_%):�T(M%,M_,Z%!qy%=0):�T(M%,Z_,Z%!qy%>0):�T(M%,oy,Z%!qy%<0):�v(M%,j,Z%!qy%<=0):Ȏ��
&��(Z%!qy%<0):K%=4
&��(Z%!qy%=0):K%=2
&��(Z%!qy%>0):K%=Z%!qy%
&�9�:�Z(M%,j+1,K%):�Z(M%,Ty+1,Z%!HJ%):�Z(M%,qy+1,Z%!CJ%)
&��:�
&�&��Vu(Q%,X%,E%,I%):�M%:M%=F_%:ȎI%�
&� �Ry,Ry+2:�J(M%,I%,E%,Ry,1,b)
&��M_,oy:�v(M%,j,�)
&��Z_:�v(M%,j,�)
&��j,j+2:�J(M%,I%,E%,j,1,99)
&�!�Ty,Ty+2:�J(M%,I%,E%,Ty,1,99)
&�!�qy,qy+2:�J(M%,I%,E%,qy,1,99)
&��ku:�yJ
&��Jl:ȎZ%!q%�
&��_,o:�R_:�E%�4�
&��P
&��
&�:�7
&��
&��:�
&�+��R_:�M%,j%:M%=F_%:B_%=�A(M%,Ry+1):Ȏ��
&�ɤ_(M%,oy):dy%=-1
&�ɤ_(M%,Z_):dy%=�A(M%,j+1)
&�ɤ_(M%,M_):dy%=0
&�/�:k_%=�A(M%,Ty+1):EJ%=�A(M%,qy+1):j%=�:Ȏ��
&��(Z%!G_%=B_%)
&��(Z%!qy%=dy%)
&��(Z%!HJ%=k_%)
&��(Z%!CJ%=EJ%)
&�	j%=�
&�
�:�j%�
&�LZ%!G_%=B_%:Z%!qy%=dy%:Z%!HJ%=k_%:Z%!CJ%=EJ%:Z%?`u%+=1:�Gy:�t_:�Fy(Z%!z%)
&��:�
&�E��f_:�M%:M%=Oy%:�Z(M%,_y,1):�Z(M%,Iy,1):�Z(M%,Yy,1):�Z(M%,Xy,1):�
&�%��n_:�M%,_%:�D("Magnifier",Oy%)�
&�S�:M%=Oy%:_%=Z%+_u%:�Z(M%,_y,_%!0):�Z(M%,Yy,_%!8):�Z(M%,Iy,_%!4):�Z(M%,Xy,_%!12)
&��:�
&�&��AJ(Q%,X%,E%,I%):�M%:M%=Oy%:ȎI%�
&��_y-1,_y-2:�_y(M%,I%,E%,_y)
&��Yy+1,Yy+2:�ly(M%,I%,E%,Yy)
&��Iy-1,Iy-2:�_y(M%,I%,E%,Iy)
&��Xy+1,Xy+2:�ly(M%,I%,E%,Xy)
&��Bl:�f_
&��`_:ȎZ%!q%�
&��_,o:�sy:�E%�4�
&��P
&��
&�:�7
&��
&��:�
&���Ku(p%,I%):Ȏp%�
&��13,398:�p%=13�I%=Xy�
&�ȎZ%!q%�
&�_�_,o:ș&400d2,-1,-1:W%!8=1:W%!12=W%!0:W%!16=`_:ș&81680,,W%:W%!8=0:�:��:ș&81680,,W%:�Q
&��sy:��:ș&81680,,W%
&�:�7
&��
&��:�z_(Oy%,I%)
&��
&�
�27:�P
&��399:�CJ(Oy%,I%)
&�:ș&400dc,p%
&��:�
&�j��sy:�M%,j%,_%:M%=Oy%:s%!0=�A(M%,_y):s%!8=�A(M%,Yy):s%!4=�A(M%,Iy):s%!12=�A(M%,Xy):_%=Z%+_u%:j%=�:Ȏ��
&��(_%!0=s%!0)
&��(_%!4=s%!4)
&��(_%!8=s%!8)
&��(_%!12=s%!12)
&�	j%=�
&�
�:�j%�
&�@_%!0=s%!0:_%!4=s%!4:_%!8=s%!8:_%!12=s%!12:�Gy:�t_:�Fy(Z%!z%)
&��:�
&�&��p_(Q%,X%,E%,I%):�M%:M%=S_%:ȎI%�
&�!�Vy,Vy+2:�J(M%,I%,E%,Vy,1,99)
&��Wl:�eu
&��Ma:�Y_:�E%�4�
&��P
&��
&��:�
&�$��eu:�M%:M%=S_%:�Z(M%,Vy+1,d_):�
&���mJ:�M%:�D("Centre",S_%)�
&��:M%=S_%:�Z(M%,Vy+1,Z%!fu%)
&��:�
&�0��Y_:�M%:M%=S_%:Su%=�A(M%,Vy+1):Z%!fu%=Su%:�
&���b:�Q%:�Wy%<>0�
&��R(Wy%):Wy%=0
&��:Q%=�Dy:�Z%<>0�
&�)�ey(Z%!o%,ZJ,Z%+Wu%):Q%=�j(Z%!z%):�Wy
&��:�F(Gn%,�C(1))
&��:�
&���fy:�U%,F%:F%=Z%+e%:F%!Ky%=0:�ny(Z%!z%,Z%+nu%,-1):U%=�M(512):!U%=Z%!z%:ș&400cb,,U%:U%!256=Z%!o%:ș&400cb,,U%+256:U%!(256+28)=-1:�My(U%+256,U%):�C(U%,512):�Z%!Yy%<>Z%!Qy%�
&�Z%!q%=fy:�D("Move",Z%)
&��:�Z%!q%=_�
&�.�z(1):Z%!q%=Hy:�D("Highlight_At_Start",Z%)
&��:�Fy(Z%!z%):�
&���P_:�F%:�e(Z%):ȎZ%!q%�
&��o:�c:�z(3)
&�,:�n(Z%!z%,Z%+nu%):�Bu(Z%!o%):�Z%!C_%>0�
&�	�z(4)
&��:�z(3)
&��
&��:�
&���a:�(Z%!q%=o)�(Z%!C_%=0)�
&�Z%!q%=_:�Wy
&��:�a(3,�C(6))=1�
&�Z%!q%=_:�Wy
&��
'�:�
'O��Wy:�e(Z%):�Cy(Z%!z%,Z%+nu%):Z%!C_%=0:Z%!_J%=0:Z%!Nl%=�:Z%!L_%=�:�ui:�fy:�
'E��v(M%,J%,rl%):�Zy(M%,J%,rl%):�Zy(M%,J%+1,rl%):�Zy(M%,J%+2,rl%):�
'E��J(M%,I%,E%,K_%,Al%,Il%):�Qy(M%,I%,E%,K_%+2,K_%,K_%+1,Al%,Il%):�
';��ly(M%,I%,E%,K_%):�Qy(M%,I%,E%,K_%+1,K_%+2,K_%,1,99):�
';��_y(M%,I%,E%,K_%):�Qy(M%,I%,E%,K_%-2,K_%-1,K_%,1,99):�
'8��Ou(Q%,X%,E%,I%):Z%!hJ%=(Z%!hJ%=0):aJ%=Z%!hJ%:�aJ%�
'�_(Z%!o%,Y_,�H("On"))
'�:�_(Z%!o%,Y_,�H("Off"))
'	�:�
'
D��rJ:�O%,P%,V%,L%,`%:�:��:�A("@.Document:Constants (start)")
'�_=0:Wy=1:fy=2:R_=3:_J=4:o=5:Du=6:Hy=7:_l=-1:GJ=-2:t=4:ZJ=0:Yi=2:J_=4:Y_=6:Fi=8:`y=6:IJ=3:k=3:Ay=7:Sy=11:Jy=17:Ny=21:ay=25:Ly=31:Uy=35:Rl=38:Vi=39:Ry=3:Ty=9:qy=13:M_=18:Z_=19:oy=20:j=21:ku=24:Jl=25:Gy=1:Dy=5:eu=8:Gi=9:Zy=1:`=5:l=9:Oy=13:nu=16:lu=17
'�q_=18:Vy=1:Wl=4:Ma=5:_y=3:Yy=5:Iy=11:Xy=13:Bl=16:`_=17:q`=0:pu=1:Q_=2:un=3:Vu=4:Ni=5:al=0:Hu=1:Ei=2:ol=0:zu=1:vi=2:Wi=3:sJ=4:g_=5:Q_=6:YJ=7:Xi=0:`i=1:kl=2:Aa=3:di=4:Wu=5:iu=6:qJ=0:Ou=1:NJ=2:D_=3:fl=0:Zl=1:nJ=2:_i=3:uu=4:mu=6:jl=0:pi=1:Dl=1:Cl=4:li=1
'
�fi=2:ul=3:v$="Zappa":__=(40*23)�2:w_=7:xJ=10:TJ=1:CJ=1:a_=1:eJ=40:x_=23:Gu=2:o_=3:VJ=1:ci=-1:f_=30:RJ=10:WJ=18:c_=88:EJ=192:Oi=4:d_=9:Pi=�:Ri=�:Bu=�:Ll=�:Sa=1:Fu=�:lJ=0:Xl=�:Su=1:hi=1:ru=1:fu=1:uJ=�:ll=�:A_%=-101:ty%=-102:�J%(8,1):�C%(2,2):�W%(8)
'�J%()=0,0,+1,0,+1,-1,0,-1,-1,-1,-1,0,-1,+1,0,+1,+1,+1:W%()=0,1,9,8,10,2,6,4,5:C%()=4,5,6,3,0,7,2,1,8:��:�:��:ș&400ec,`%,-1:�A("@.Document: Constants <real>")
'O`%=�-32768:ș&400ec,`%+32768,-1�L%:L%+=32768:O%=`%+32768:P%=0:V%=14:�O%=L%�
'/�1,"Not enough memory to start application"
'��:P%=0:O%=`%+32768:[OPTV%:.Pl%DCD0:.tl%DCD0:.Ky%DCD0:.J_%DCD0:.nl%DCD0:.Da%DCD0:.kJ%DCD0:.ky%DCD0:.Tl%DCD0:.gy%DCD0:.u_%DCD0:.by%DCD0:.Rl%DCD0:.au%:]:P%=0:O%=`%+32768:[OPTV%:.Ya%DCD0:.Iu%DCD0:.Sl%DCD0:.li%DCD0:.W_%DCD0:.wJ%DCD0:DCD0:DCD0:.c_%:]
'�iJ%=5:P%=0:O%=`%+32768:[OPTV%:.w%DCD0:.x%DCD0:.O_%DCD0:.H_%DCD0:.b_%DCD0:.y_%DCD0:.Q_%DCD0:.x_%DCD0:.s_%:]:P%=0:O%=`%+32768:[OPTV%:.El%:]:P%+=24:[OPTV%:.iu%DCD0:.Mu%DCD0:ALIGN:.Mi%:]:P%=s_%:O%=`%+32768:[OPTV%:.r%DCD0:.`J%:]:P%+=l_:[OPTV%
'�.za%:]:P%+=Mi%*yJ%:[OPTV%:ALIGN:.l_%:]:P%=0:O%=`%+32768:[OPTV%:.Nn%DCD0:.Qn%DCD0:.Wi%DCD0:.u%DCD0:.my%DCD0:.gl%DCD0:.n%:]:sJ%=1<<0:z_%=1<<1:P%=s_%:O%=`%+32768:[OPTV%:.v_%DCD0:.q%DCD0:.G_%DCD0:.l%DCD0:.Qy%DCD0:.Yy%DCD0:.Ri%DCD0:._a%DCD0:.Cy%DCD0
'�.vy%DCD0:.vu%DCD0:.ui%DCD0:.ey%DCD0:.Ei%DCD0:.Vu%DCD0:._y%DCD0:.RJ%DCD0:.r_%DCD0:.Bi%DCD0:.Kl%DCD0:.uJ%DCD0:.h_%DCD0:.qy%DCD0:.Qu%DCD0:.HJ%DCD0:.CJ%DCD0:.g_%DCD0:.sy%DCD0:.cy%DCD0:.i_%DCD0:.ou%DCD0:.Jy%DCD0:.Ou%DCD0:.fu%DCD0:.NJ%DCD0:.DJ%DCD0
'�.`_%DCD0:.GJ%DCD0:.hJ%DCD0:.bJ%DCD0:.Ku%DCD0:.T_%DCD0:.L_%DCD0:.Nl%DCD0:.C_%DCD0:._J%DCD0:.V_%DCD0:.JJ%DCD0:.ul%DCD0:.Ny%DCD0:.t%DCD0:.Ay%DCD0:.zu%:]:P%+=16*2:[OPTV%:.e%:]:P%+=au%:[OPTV%:.z%DCD0:.o%DCD0:.su%DCD0:.Fu%DCD0:.Hl%DCD0:.ql%DCD0:.dl%DCD0
'�.Li%DCD0:.Ni%DCD0:._l%DCD0:.cl%DCD0:.Oi%DCD0:.sl%DCD0:.Ii%DCD0:._u%:]:P%+=16:[OPTV%:.`u%:]:P%+=256:[OPTV%:.Wu%:]:P%+=y_:[OPTV%:.nu%:]:P%+=l_:[OPTV%:.vl%:]:ș&400ec,`%,-1:��:�
'3ݤDy:�U_%,M%,N%,F%,oi%:ș&606c0:�:��:�e_:�Q
''U_%=�:M%=X_%:N%=Y_%:�(�B(Z%,vl%))�
'0�J%=0�(vl%-1)�4:Z%!J%=0:�J%:oi%=�u(dy%):Ȏ��
'ɤB(Z%!sy%,M%*N%)
'ɤB(Z%!g_%,M%*N%<<2)
'ɤB(Z%!Jy%,(oy%+1)*n%)
'ɤB(Z%!Qy%,oi%*16*c_%)
''ɤB(Z%!Ou%,((M%+2+31)>>5)*4*(N%+2))
'�:Z%!cy%=Z%!g_%:Z%!i_%=Z%!cy%+((M%*N%+3)�-4):Z%!w%=X_%:Z%!x%=Y_%:Z%!G_%=B_%:Z%!qy%=dy%:Z%!O_%=e_%:Z%!H_%=f_%:Z%!b_%=oy%:Z%!y_%=t_%:Z%!Q_%=a_%:Z%!x_%=m_%:Z%!_y%=iy%:Z%!uJ%=rJ%:Z%!HJ%=k_%:Z%!CJ%=EJ%:Z%!T_%=Au%:Z%!r_%=__%:Z%!RJ%=o_%:Z%!fu%=Su%
' �Z%!NJ%=xJ%:Z%!DJ%=jJ%:Z%!`_%=eJ%:Z%!GJ%=pJ%:Z%!hJ%=aJ%:Z%!bJ%=Zu%:F%=Z%+_u%:F%!0=s%!0:F%!4=s%!4:F%!8=s%!8:F%!12=s%!12:F%=Z%+e%:F%!kJ%=tJ%:F%!J_%=IJ%:F%!ky%=TJ%:F%!gy%=FJ%:F%!u_%=XJ%:F%!by%=PJ%:F%!Tl%=pl%:U%=�M(128):!U%=ry%:U%!4=nu:ș&400ce,,U%
'!fF%=Z%+zu%:F%!0=U%!8:F%!4=U%!12:F%!8=U%!16:F%!12=U%!20:�C(U%,128):�O(Z%+Wu%,W$):F%=�X("Board"):�F%�
'"XF%+=m:F%?34=Z%!RJ%:F%?35=Z%!r_%:Z%!z%=�g("Board",+48,-48):Z%!o%=�g("Status",+48,-48)
'#�:�(Z%!z%=0)�(Z%!o%=0)�
'$�F(Vy%,�C(3)):U_%=�
'%b�:Z%!C_%=0:Z%!Yy%=Z%!Qy%:Z%!v_%=!xy%:!xy%=Z%:�G(Z%):Z%!q%=_:�py(Z%!z%,�c(Z%,"Board")):�p:U_%=�
'&�
''�
'(�:�U_%�(Z%<>0)�
')�c
'*�:ș&606c1:��:=U_%
'+��e_:ș&606c1:�c:�Q:�
',hݤc(F%,a$):�D%,A%,B%,C%:D%=�M(512):�QJ(a$,D%):A%=F%:B%=D%:C%=D%+256:�bi:a$=�N(D%+256):�C(D%,512):=a$
'-��c:�D%:�Z%<>0�
'..D%=xy%:ȕ!D%<>0�!D%<>Z%:D%=!D%+v_%:�:�!D%�
'/!D%=Z%!v_%:Z%!v_%=0
'0d�:�e(Z%):�R(Z%!z%):�R(Z%!o%):�W(Z%!sy%):�W(Z%!g_%):�W(Z%!Jy%):�W(Z%!Qy%):�W(Z%!Ou%):�W(Z%):�G(0)
'1�:�
'2~ݤu(Jl%):�T%,lu%,Pu%,M%,N%:M%=P%(Z%!G_%):N%=B%(Z%!G_%):lu%=�S(M%,N%):Pu%=�P(M%,N%):T%=�Xy(Jl%,Pu%,lu%):�(Jl%>0)�(Jl%<Pu%)�
'3
T%=Jl%
'4	�:=T%
'5 ݤXy(La%,Pu%,lu%):�T%:ȎLa%�
'6�-1:T%=Pu%
'7
�0:T%=lu%
'8:T%=�P(�S(La%,Pu%),lu%)
'9	�:=T%
':PݤI(M%):�Y%,F%:F%=!xy%:Y%=�:ȕF%�Y%:Y%=(M%<>F%!z%)�(M%<>F%!o%):�Y%�F%=F%!v_%
';�:�Y%=0�
'<"�G(F%):�M%=Z%!z%�M%=A_%�M%=ty%
'=	�:=M%
'>QݤYy(M%):�Y%,F%:F%=!xy%:Y%=�:ȕF%�Y%:Y%=(M%<>F%!z%)�(M%<>F%!o%):�Y%�F%=F%!v_%
'?�:�Y%=0�
'@"�G(F%):�M%=Z%!z%�M%=A_%�M%=ty%
'A	�:=M%
'B��G(F%):Z%=F%:!S_=Z%:�
'C?ݤ`:�Y%,F%:F%=!xy%:Y%=�:ȕF%�Y%:Y%=(F%!q%<>o):�Y%�F%=F%!v_%
'D�:�Y%=0�
'E
�G(F%)
'F
�:=(Y%=0)
'G���e(F%):�H("Demo",F%):�H("Centre",F%):�H("Move",F%):�H("Highlight",F%):�H("Highlight_At_Start",F%):F%!h_%=�:F%=F%+e%:F%!Ky%=0:�
'H9ݤ_Null_Reason_Highlight_At_Start(A%):�G(A%):�Z%!DJ%�
'I�D("Centre",Z%)
'J�:�Z%!bJ%�
'KZ%!q%=Hy:�w(Z%!t%,Z%!Ay%,0)
'L�:Z%!q%=_:�g:�Uy
'M�:�Z%!L_%�
'N'�y("Highlight_At_Start",Z%):�V:A%=�
'O
�:A%=�
'P	�:=A%
'Q��d:ȎZ%!q%�
'R(�_,Wy:�I:Z%!q%=Wy:�w(Z%!t%,Z%!Ay%,0)
'S:�7
'T�:�
'UD��w(Vi%,Hi%,Di%):�F%,N%,Gy%,ky,ey:�:��:�A("Highlight_Board")
'V
ȎDi%�
'Wz�0:N%=�S(�(Z%!w%-Vi%),Vi%):Gy%=�S(�(Z%!x%-Hi%),Hi%):ky=�S(N%*Z%!Cy%,Gy%*Z%!vy%):ky=�P(16383,ky):ey=�P(Z%!Cy%,Z%!vy%)/4
'XF:ky=�P(Z%!Cy%,Z%!vy%)/5:ey=�S(Z%!Cy%,Z%!vy%)*�(2):ey=�P(16383,ey)
'Yz�:F%=Z%+e%:F%!Pl%=Vi%:F%!tl%=Hi%:F%!Ky%=F%!J_%+F%!ky%:F%!Da%=ey*(1<<16):F%!nl%=((ky-ey)/(F%!J_%))*(1<<16):�xu:�Z%!T_%�
'Z�D("Highlight",Z%)
'[$�:�:��_Null_Reason_Highlight(Z%)
'\�:�
']p��xu:�yu,rJ,oi,F%:F%=Z%+e%:yu=F%!gy%/256:rJ=F%!u_%/256:oi=F%!by%/256:F%!Rl%=0.5+256*(1+(2*(1-oi)/(rJ-yu))):�
'^5ݤ_Null_Reason_Highlight(A%):�G(A%):A%=�(qi):�A%�
'_A%=Z%!q%:Z%!q%=_:ȎA%�
'`�R_:�c_
'a�_J:�hJ
'b�Hy:�g:�Uy
'c�
'd	�:=A%
'e��I:�Z%!q%=Wy�
'f"�pJ:�y("Highlight",Z%):Z%!q%=_
'g�:�
'h��LJ(Dy%):ȎDy%�
'i
�-1:�d
'j�Ou:�ty
'k�qJ
'l�NJ
'm:�I:�Dy%>=D_�
'ntJ%=Dy%-D_:Z%!(e%+kJ%)=tJ%
'o�:�d
'p�:�
'q$��ty:Zu%=(Z%!bJ%=0):Z%!bJ%=Zu%:�
'r@��HJ:�M,S,R,W,P,s,H,z,N,L:�DJ,Ey,r_:�:��:�A("Highlight")
's�M=4:S=5:R=6:W=7:P=8:s=3:H=9:z=12:N=2:L=s:DJ=0:Ey=au%:r_=Ey+4:[OPTV%:ALIGN:.qi:�Z:STMFD(A)!,{4-9,12,Z}:SUB A,A,#256:BL r:LDR0,[12,#z%]:STR0,[A]:BL P_:STR0,[A,#4]:BL py:SUB1,1,0:SUB3,3,0:ADD0,A,#4:STMIB0,{1-3}:MOV1,A:SWI &400c9:BL Qy:ADD1,12,#ey%
't�LDMIA1,{1-2}:ADD M,M,1:ADD S,S,2:.C TEQ0,#0:ADDne0,12,#e%:LDRne P,[0,#Ky%]:BLne si:MOVne1,A:SWIne &400ca:Bne C:ADD1,12,#e%:LDR0,[1,#Ky%]:SUBS0,0,#1:MOVle0,#0:STR0,[1,#Ky%]:MVNle0,#�(-1):MOVgt0,#0:ADD A,A,#256:LDMFD(A)!,{4-9,12,pc}^:.P_:STMFD(A)!,{Z}
'u�ADD11,12,#e%:ADD M,11,#Pl%:LDMIA M,{M,S}:ADD0,12,#Cy%:LDMIA0,{0-1}:MUL M,0,M:ADD M,M,0,LSR#1:MUL S,1,S:ADD S,S,1,LSR#1:RSB S,S,#0:ADD0,11,#Ky%:LDMIA0,{0-3}:CMP2,#0:Bgt Pu:LDR1,[11,#ky%]:SUBS0,0,1:MOVlt0,#0:MOV1,0:.Pu:CMP0,1:MOVgt0,1:MLA 0,2,0,3
'v�LDR Z,[11,#Tl%]:ADD0,Z,0,LSR#16:ADD3,S,0:ADD2,M,0:SUB1,S,0:SUB0,M,0:LDMFD(A)!,{pc}^:.si:STMFD(A)!,{P,Z}:ADD0,12,#e%:LDR0,[0,#J_%]:CMP P,0:BLle N_:ADD0,12,#e%:LDR0,[0,#ky%]:SUBS P,P,0:BLgt N_:LDMFD(A)!,{P,pc}^:.N_:STMFD(A)!,{0-12,Z}:BL Nu:TEQ0,#2
'w��ne0,P,P,LSR#4:�ne0,0,0,LSR#3:�ne0,0,#15:ADDne0,0,#3<<4:MOVeq0,#7�(3<<4):SWI &400e6:ADD11,12,#e%:ADD R,11,#nl%:LDMIA R,{R,W,Z}:MLA W,R,P,W:MOV W,W,LSR#16:ADDpc,pc,Z,LSL#2:B My:B Li:B Bi:B Ji:B PJ:B Yl:B Ol:B Ci:.My LDMFD(A)!,{0-12,pc}^:.dy�Qy:.Li
'x�MOV0,#68:MOV1,M:MOV2,S:SWI 69:MOV0,#145:MOV1,W:MOV2,#0:SWI 69:B My:.Bi:MOV0,#68:MOV1,M:MOV2,S:SWI 69:�F("",s,dy):� P,P,#16-1:ADD1,s,P,LSL#3:LDMIA1,{1-2}:MUL 1,W,1:ADD1,M,1,ASR#16:MUL 2,W,2:ADD2,S,2,ASR#16:MOV0,#68:SWI 69:ADD P,P,#13:� P,P,#16-1
'y�ADD1,s,P,LSL#3:LDMIA1,{1-2}:MUL 1,W,1:ADD1,M,1,ASR#16:MUL 2,W,2:ADD2,S,2,ASR#16:MOV0,#165:SWI 69:B My:.Ji:MOV0,#68:MOV1,M:MOV2,S:SWI 69:�F("",s,dy):� P,P,#16-1:ADD1,s,P,LSL#3:LDMIA1,{1-2}:MUL 1,W,1:ADD1,M,1,ASR#16:MUL 2,W,2:ADD2,S,2,ASR#16:MOV0,#68
'z�SWI 69:ADD P,P,#3:� P,P,#16-1:ADD1,s,P,LSL#3:LDMIA1,{1-2}:MUL 1,W,1:ADD1,M,1,ASR#16:MUL 2,W,2:ADD2,S,2,ASR#16:MOV0,#173:SWI 69:B My:.PJ:BL iy:ADD P,P,#16/4:BL iy:ADD P,P,#16/4:BL iy:ADD P,P,#16/4:BL iy:B My:.iy:�F("",s,dy):� P,P,#16:ADD H,s,P,LSL#3
'{�LDMIA H,{H,z}:MUL 0,W,H:ADD M,0,M,LSL#16:MUL 0,W,z:ADD S,0,S,LSL#16:MOV0,H:BL aJ:MOV H,0:MOV0,z:BL aJ:MOV z,0:MOV0,#68:LDR N,[11,#gy%]:MOV N,N,ASR#1:RSB N,N,#0:MOV L,#0:BL zy:MOV0,#68:LDR N,[11,#gy%]:MOV N,N,ASR#1:RSB N,N,#0:LDR L,[11,#by%]:BL zy
'|�MOV0,#117:LDR N,[11,#gy%]:MOV N,N,ASR#1:LDR L,[11,#by%]:BL zy:MOV0,#68:LDR N,[11,#u_%]:MOV N,N,ASR#1:RSB N,N,#0:LDR L,[11,#by%]:BL zy:MOV0,#68:LDR N,[11,#gy%]:MOV N,N,ASR#1:LDR L,[11,#by%]:BL zy:MOV0,#85:MOV N,#0:LDR L,[11,#Rl%]:BL zy:B My:.aJ
'}�STMFD(A)!,{11,Z}:MOV1,R:MOV2,#1<<24:BL Al:LDMFD(A)!,{11,pc}^:.Yl:MOV0,#68:SUB1,M,W:SUB2,S,W:SWI 69:MOV0,#5:ADD1,M,W:SUB2,S,W:SWI 69:MOV0,#37:ADD1,M,W:ADD2,S,W:SWI 69:MOV0,#37:SUB1,M,W:ADD2,S,W:SWI 69:MOV0,#45:SUB1,M,W:SUB2,S,W:SWI 69:B My:.Ol
'~��F("",s,dy):� P,P,#16-1:ADD H,s,P,LSL#3:LDMIA H,{H,z}:MUL H,W,H:MUL z,W,z:MOV0,#68:ADD1,M,H,ASR#16:ADD2,S,z,ASR#16:SWI 69:MOV0,#5:ADD1,M,z,ASR#16:SUB2,S,H,ASR#16:SWI 69:MOV0,#37:SUB1,M,H,ASR#16:SUB2,S,z,ASR#16:SWI 69:MOV0,#37:SUB1,M,z,ASR#16
'�ADD2,S,H,ASR#16:SWI 69:MOV0,#45:ADD1,M,H,ASR#16:ADD2,S,z,ASR#16:SWI 69:B My:.Ci:�F("",s,dy):MOV R,#6:MOV0,#68:.C� P,P,#16-1:ADD H,s,P,LSL#3:LDMIA H,{H,z}:MUL H,W,H:MUL z,W,z:ADD1,M,H,ASR#16:ADD2,S,z,ASR#16:SWI 69:SUBS R,R,#1:ADDgt P,P,#1
'��SUBgt W,W,W,ASR#3:MOVgt0,#37:Bgt C:B My:.zy:MUL 1,H,N:RSB1,1,#0:MLA 1,z,L,1:ADD1,M,1:MOV1,1,ASR#16:MUL 2,H,L:MLA 2,z,N,2:SUB2,S,2:MOV2,2,ASR#16:SWI 69:MOVSpc,Z:DCB0:DCB0:DCB0:DCB24:.xi DCD0:DCD0:.rl:�Z:STMFD(A)!,{4-9,12,Z}:SUB O,O,#r_:MOV12,0
'��STR1,[O,#Ey]:LDR0,[1]:STR0,[12,#su%]:ADD0,O,#DJ:ADD1,12,#e%:MOV2,#au%:BL BJ:LDR1,[O,#Ey]:SWI &400c8:TEQ0,#0:Beq ji:BL LJ:ADD M,12,#e%:MOV2,#`+1:BL K_:STR0,[M,#gy%]:MOV S,0:MOV2,#Zy+1:BL K_:STR0,[M,#u_%]:SUB S,0,S:MOV2,#l+1:BL K_:STR0,[M,#by%]
'��RSBS0,0,#256:ADDne0,0,0:MOVne1,S:ADDne0,0,1,LSR#1:BLne FJ:STR0,[M,#Rl%]:MOV0,#F_:LDR1,[12,#su%]:MOV2,#Oy+1:SWI &dcb8c:MOV P,0:BL k_:LDR1,[O,#Ey]:.C SWI &81681:STMFD(A)!,{4-7}:ADD4,1,#28:LDMIA4,{4-7}:ADD0,12,#zu%+16:LDMIA0,{0-3}:CMP0,4:MOVlt0,4
'��CMP1,5:MOVlt1,5:CMP2,6:MOVgt2,6:CMP3,7:MOVgt3,7:LDMFD(A)!,{4-7}:CMP0,2:CMPlt1,3:Bge ai:ADD V,V,#Ri%:LDMIA V,{V,Z}:SUB2,2,V:SUB3,3,Z:BIC0,0,#&ff000000:BIC0,0,#&ff0000:�R0,0,1,LSL#16:BIC2,2,#&ff000000:BIC2,2,#&ff0000:�R1,2,3,LSL#16:�F("",2,xi)
'��STMIA2,{0-1}:SUB0,2,#1:MOV1,#9:SWI 70:LDR1,[O,#Ey]:BL n_:.ai:LDR1,[O,#Ey]:SWI &400ca:TEQ0,#0:Bne C:.ji:ADD0,12,#e%:ADD1,O,#DJ:MOV2,#au%:BL BJ:ADD O,O,#r_:LDMFD(A)!,{4-9,12,pc}^:.K_:MOV0,#F_:LDR1,[12,#su%]:SWI &dcb8c:MOV0,0,LSL#8:MOV1,#100
'��ADD0,0,1,LSR#1:B FJ:.k_:ADD W,12,#zu%:LDMIA(W)!,{0-3}:ADD M,12,#ey%:LDMIA M,{M,S}:ADD0,M,0:ADD1,S,1:ADD2,M,2:ADD3,S,3:STMIA W,{0-3}:SUB R,2,0:MOV R,R,LSL#16-1:MOV W,R,LSR#1:ADD M,0,2:MOV M,M,ASR#1:ADD S,1,3:MOV S,S,ASR#1:MOVSpc,Z:.n_
'��STMFD(A)!,{0-12,Z}:MOV0,#128+0:SWI &400e6:SWI c+16:ADD11,12,#e%:B PJ:.tl:�Z:STMFD(A)!,{0-12,Z}:SUB A,A,#256:BL r:ADD1,12,#zu%:LDMIA1,{1-4}:LDR0,[12,#su%]:STMIA A,{0-4}:MOV1,A:SWI &400c9:TEQ0,#0:Beq ml:BL LJ:BL k_:MOV1,A:.C BL n_:MOV1,A:SWI &400ca
'��TEQ0,#0:Bne C:.ml:ADD A,A,#256:LDMFD(A)!,{0-12,pc}^:.KJ:ADD1,12,#e%:LDR0,[1,#Ky%]:CMP0,#0:MOVleSpc,Z:STMFD(A)!,{0-12,Z}:BL P_:ADD0,12,#ey%:LDMIA0,{0-1}:ADD M,M,0:ADD S,S,1:ADD H,12,#e%:LDR W,[H,#Ky%]:LDR R,[H,#ky%]:SUB R,R,#1:.C SUBS P,W,R
'��LDRgt0,[H,#J_%]:ADDgt0,0,#1:CMPgt0,P:BLgt N_:SUBS R,R,#1:Bge C:LDMFD(A)!,{0-12,pc}^:.pJ:�Z:STMFD(A)!,{4-9,12,Z}:SUB A,A,#256:BL r:LDR0,[12,#z%]:STR0,[A]:ADD W,12,#e%:LDR R,[W,#Ky%]:LDR0,[W,#ky%]:ADD0,0,R:ADD0,0,#1:STR0,[W,#Ky%]:BL P_:STR R,[W,#Ky%]
'��STR0,[A,#4]:BL py:SUB1,1,0:SUB3,3,0:ADD0,A,#4:STMIB0,{1-3}:MOV1,A:SWI &400c9:BL Qy:.C TEQ0,#0:BLne KJ:MOVne1,A:SWIne &400ca:Bne C:ADD A,A,#256:LDMFD(A)!,{4-9,12,pc}^:]:�
'��ݤQy:�R%,_%,N%,Gu%,ru%:R%=(�(2*�/16)*(1<<16))+0.5:_%=(�(2*�/16)*(1<<16))+0.5:N%=((1/�(2))*(1<<16))+0.5:Gu%=1<<16:ru%=0:[OPTV%:DCDGu%:DCDru%:DCDR%:DCD_%:DCDN%:DCDN%:DCD_%:DCDR%:DCDru%:DCDGu%:DCD-_%:DCDR%:DCD-N%:DCDN%:DCD-R%:DCD_%:DCD-Gu%:DCDru%
'�hDCD-R%:DCD-_%:DCD-N%:DCD-N%:DCD-_%:DCD-R%:DCDru%:DCD-Gu%:DCD_%:DCD-R%:DCDN%:DCD-N%:DCDR%:DCD-_%:]:=0
'�)��UJ(Q%,X%,E%,I%):�M%,a%:M%=P_%:ȎI%�
'�2�Gy,Gy+2:a%=�A(M%,Dy+1):�J(M%,I%,E%,Gy,a%,999)
'�0�Dy,Dy+2:a%=�A(M%,Gy+1):�J(M%,I%,E%,Dy,1,a%)
'��eu:�Du
'��Gi:�du:�E%�4�
'��P
'��
'��:�
'�3��Du:�M%:M%=P_%:�Z(M%,Gy+1,f_):�Z(M%,Dy+1,RJ):�
'�%��XJ:�M%,F%:�D("Highlight",P_%)�
'�;�:M%=P_%:F%=Z%+e%:�Z(M%,Gy+1,F%!J_%):�Z(M%,Dy+1,F%!ky%)
'��:�
'�L��du:�M%,F%,j%:M%=P_%:F%=Z%+e%:IJ%=�A(M%,Gy+1):TJ%=�A(M%,Dy+1):j%=�:Ȏ��
'��(F%!J_%=IJ%)
'��(F%!ky%=TJ%)
'�	j%=�
'�
�:�j%�
'��I:F%!J_%=IJ%:F%!ky%=TJ%
'�
�:�d:�
'�u��pJ(Q%,X%,Eu%,I%):�M%,a%,d%,E%,R%,mu%,j%:M%=ry%:d%=�A(M%,`+1):E%=�A(M%,Zy+1):R%=�A(M%,l+1):zi%=�A(M%,Oy+1):ȎI%�
'�>�Zy,Zy+2:a%=�S(d%+1,2*(100-R%)+d%):�J(M%,I%,Eu%,Zy,a%,100)
'�9�`,`+2:a%=�P(E%-1,2*(100-R%)+E%):�J(M%,I%,Eu%,`,0,a%)
'�Y�l,l+2:a%=�P(99,100-((E%-d%)�2)):mu%=�S(d%,100-((E%-d%)�2)*d%):�J(M%,I%,Eu%,l,mu%,a%)
'�"�Oy,Oy+2:�J(M%,I%,Eu%,Oy,0,15)
'��lu:�aJ
'��q_:�TJ
'��:�(Eu%=1)�(I%=q_)�
'��P
'��:j%=�:Ȏ��
'��(d%=�A(M%,`+1))
'��(E%=�A(M%,Zy+1))
'��(R%=�A(M%,l+1))
'��(zi%=�A(M%,Oy+1))
'�	j%=�
'�
�:�j%�
'��tl
'��
'��:�
'�&��aJ:�E(Zy,WJ):�E(`,c_):�E(l,EJ):�
'���fu:�F%:�D("Arrow",ry%)�
'�6�:F%=Z%+e%:�E(Zy,F%!gy%):�E(`,F%!u_%):�E(l,F%!by%)
'��:�
'�.��E(J%,Gy%):�Z(ry%,J%+1,(Gy%*100+50)>>8):�
'�-��TJ:�M%,F%,j%:M%=ry%:F%=Z%+e%:�F%!kJ%=4�
'��I
'�1�:�Py(Zy,FJ%):�Py(`,XJ%):�Py(l,PJ%):j%=�:Ȏ��
'��(F%!gy%=FJ%)
'��(F%!u_%=XJ%)
'��(F%!by%=PJ%)
'�	j%=�
'�
�:�j%�
'�/F%!gy%=FJ%:F%!u_%=XJ%:F%!by%=PJ%:�F%!kJ%=4�
'��I:�w(F%!Pl%,F%!tl%)
'��
'��:�
'�2��Py(J%,�Gy%):Gy%=(�A(ry%,J%+1)*256/100)+0.5:�
'�*ݤh_DEFAULT:�:��:�A("@.h.DEFAULT")
'�ZVo=16:sn=1<<30:aB=0:vO=1:O`=2:Ia=3:oo=4:pO=5:yn=6:no=7:eo=8:ea=1<<0:Ai=1<<1:so=1<<2:=0
'�2ݤjumpblock_DEFAULT:�:��:�A("@.h.DEFAULT")
'�m[OPTV%�ny%:.qo DCDTa:.Oa DCDNO:.mO DCDzo:.I` DCDmo:.IO DCDEO:.tB DCDJ`:.co DCDBB:.Cn DCDFo:.cl DCDfn:]:=0
'�&ݤh_debug:�:��:�A("@.h.debug")
'�Ro=�:=0
'�.ݤjumpblock_debug:�:��:�A("@.h.debug")
'�E[OPTV%�ny%:.`` DCDP`:.Jn DCDkO:.Ya DCDeB:.d` DCDFk:.tO DCDkn:]:=0
'�&ݤh_imath:�:��:�A("@.h.imath")
'�=0
'�.ݤjumpblock_imath:�:��:�A("@.h.imath")
'��[OPTV%�ny%:.Ky DCDyo:.FJ DCDYo:.dO DCDdB:.YB DCDta:.uy DCDOo:.uO DCDfB:.So DCDVa:.qa DCDHO:.xB DCDSk:.An DCDCB:.Ra DCDBO:.zB DCDZk:.Bn DCDZo:.gn DCDsB:.hB DCDWB:.rn DCDlO:.zO DCDla:.JB DCDxO:.h` DCDhO:.M` DCDTB:.r` DCDPn:.Al DCDGn:]:=0
'�*ݤh_message:�:��:�A("@.h.message")
'�=0
'�2ݤjumpblock_message:�:��:�A("@.h.message")
'�E[OPTV%�ny%:.Nl DCDmn:.f` DCDHn:.MB DCDwO:.E` DCDAk:.C` DCDuo:]:=0
'�(ݤh_RelObj:�:��:�A("@.h.RelObj")
'�Y`=4<<2:=0
'�0ݤjumpblock_RelObj:�:��:�A("@.h.RelObj")
'׋[OPTV%�ny%:.Wo DCD_a:.W` DCDF`:.o` DCDMo:.Jo DCDPa:.Q` DCDtn:.xo DCDZn:.OB DCDa`:.Wn DCDLk:.Rn DCDyB:.PB DCDen:.Xk DCDZB:.va DCDdo:]:=0
'�&ݤh_stdio:�:��:�A("@.h.stdio")
'�JO=0:Dk=17:fa=34:=0
'�.ݤjumpblock_stdio:�:��:�A("@.h.stdio")
'ۘ[OPTV%�ny%:.Pk DCDqn:.qu DCDX`:.`n DCDLa:.Da DCDnB:.n` DCDZO:.Wn%DCDEn%:.Ln%DCDba%:.Xn%DCDva%:.Ua DCDB`:.hu DCDS`:._O DCDLo:.GB DCDH`:.Ko DCDNo:]:=0
'�(ݤh_stdlib:�:��:�A("@.h.stdlib")
'�=0
'�0ݤjumpblock_stdlib:�:��:�A("@.h.stdlib")
'ߩ[OPTV%�ny%:.dJ DCDNn:.Cu DCDGa:.eO DCDSO:.zl DCDpo:.Eo DCDQO:.OJ DCDHB:.Qo DCDHa:.T` DCD_n:.da DCDjo:.w` DCDwn:.Io DCDXn:.c` DCDxn:.ho DCDA`:.oB DCDb`:.kB DCDVO:]:=0
'�(ݤh_string:�:��:�A("@.h.string")
'�SP%=0:[OPTV%:.N` DCB0:.Ao DCB0:.hn DCB0:.za DCB0:.G` DCB0:.ra DCB0:.t` DCB0:]:=0
'�0ݤjumpblock_string:�:��:�A("@.h.string")
'��[OPTV%�ny%:.on DCDMO:.wa DCDrB:.`O DCDy`:.bO DCDKO:.En DCDka:.BJ DCDFO:.Yu DCDm`:.ty DCDe`:.Tn DCDgB:.Do DCDx`:.ua DCD_o:.SB DCDj`:.XO DCDqO:.ao DCDv`:.bB DCDnO:.in DCDKB:.ia DCDk`:.AB DCDpa:.xa DCDln:.Xo DCDoa:.Qk DCDOn:.Mn DCDRB:.Uk DCDYn
'��.p` DCDko:.QB DCDcB:.lB DCDJk:.Dn DCDCO:.Xa DCDCk:.jB DCDSn:.K` DCDpB:.fO DCDvo:.EB DCDiO:.FB DCDrO:.s` DCDyO:.UB DCDUO:.ga DCDWa:._` DCDan:.Ln DCDMk:.Gk DCDUn:.bn DCDiB:.wo DCDRO:.jO DCDJa:]:=0
'�$ݤh_wimp:�:��:�A("@.h.wimp")
'�Na=12:zn=0:P%=0:[OPTV%:.UJ DCB0:.F_ DCB0:.W_ DCB0:.gy DCB0:.Au DCB0:.b_ DCB0:.Ru DCB0:.Qu DCB0:.`u DCB0:.Bo DCB0:.TO DCB0:.wu DCB0:.PO DCB0:.vn DCB0:.YO DCB0:.AO DCB0:.OO DCB0:]:P%=0:[OPTV%:.Qa DCB0:.cO DCB0:.yJ DCB0:.gu DCB0:.Ca DCB0:.Ju DCB0
'�y.bu DCB0:.Uu DCB0:.na DCB0:.Ku DCB0:.Ho DCB0:.`a DCB0:]:P%=0:[OPTV%:.ha DCB0:.Bk DCB0:.i` DCB0:.R` DCB0:.fo DCB0:]:=0
'�,ݤjumpblock_wimp:�:��:�A("@.h.wimp")
'��[OPTV%�ny%:.uB DCDVn:.Z` DCDQn:.pn DCDWk:.NB DCDKn:.z_ DCDca:.wi DCDba:.kJ DCDl`:.oO DCDL`:.pl DCD`B:.fJ DCDPo:.T_ DCDUo:.cy DCDEa:.ja DCDV`:.e_ DCD_B:.In DCDGO:.Ul DCDdn:.du DCDbo:.hl DCDKa:]:=0
'�ݤ_file_io_version=9
'�Oݤ_hard_initialise_file_io�:��:�A("%.file_io: hard_initialise_file_io")
'�c�S("<BasicV$Lib>.CheckVars",2):�S("<BasicV$Lib>.string",6):el%=256+20:�Ji%el%:�ua%9:ua%?8=13:=0
'�&ݤFy(T$)�Ba%:ș8,5,T$�Ba%:=(Ba%=1)
'�JݤTy(T$)�h%,Di%:ș8,5,T$�Di%,,,,h%:�Di%=0��1,"File not found ("+T$+")"
'�=h%
'� ��_J(T$,ga%)ș8,255,T$,ga%:�
'�Dݤ_y(g$,U$,�R_%)�mi%:�:��:�A("%.file_io: OS_GBPB_ReadEntry")
'�3ș&2000c,10,g$,Ji%,1,R_%,el%,U$�,,,mi%,R_%:=mi%
'�:ݤby�:��:�A("%.file_io: file_object_load_address")
'�	=!Ji%
'�2ݤWy�:��:�A("%.file_io: file_object_name")
'�=�N(Ji%+20)
'�;ݤJy�T%:�:��:�A("%.file_io: file_object_file_type")
'�#T%=�by:�(T%�-1048576)=-1048576�
'�T%=(T%�&fff00)>>8
'�
�T%=-1
'�	�:=T%
'�ݤ_FileType_version=1
'�Rݤ_hard_initialise_FileType�:��:�A("%.FileType: hard_initialise_FileType")
'�&XB=4095:SJ=4093:qB=4091:Go=4089:=0
'�ݤ_Heap_version=8
(Fݤ_hard_initialise_Heap�:��:�A("%.Heap: hard_initialise_Heap")
(=0
(ݤRy(h%)�T%:�B(T%,h%)�
(h%=!fy%:�!h%,�N(h%+4)
(	�:=T%
(&ݤB(�QJ%,A%)QJ%=�(ki%):�!fy%�QJ%=0
(	=!fy%
(��X(�QJ%,h%)�B(QJ%,h%)�
(QJ%=!fy%:�!QJ%,�N(QJ%+4)
(	�:�
(
��W(�A%)�Py(A%)�
(A%=!fy%:�!A%,�N(A%+4)
(�:�
(
ݤPy(�A%)�Qa%:A%=0:=!fy%
(��`(�QJ%,h%)�zy(QJ%,h%)�
(h%=!fy%:�!h%,�N(h%+4)
(�:�
(ݤzy(�A%,B%)A%=�(xa%):=!fy%
((��Q_�:��:�A("%.Heap: assembler")
(>[OPTV%:�q(ki%,dJ):�q(Qa%,Cu):�q(xa%,zl):ALIGN:.fy%DCD0:]:�
(mݤq(�pa%,ia%)[OPTV%:ALIGN:.pa%:�Z:STMFD(A)!,{Z}:MOV Z,#0:STR Z,fy%:BL ia%:STRvs0,fy%:LDMFD(A)!,{pc}^:]:=0
(ݤ_IntMath_version=4
( ݤ_hard_initialise_IntMath=0
(ݤS(d%,E%)�d%>E%�=d%
(=E%
(ݤP(d%,E%)�d%>E%�=E%
(=d%
(ݤ_ModeInfo_version=5
(!ݤ_hard_initialise_ModeInfo=0
(���IJ(ay%)ș53,ay%,1�,,il%:il%+=1:ș53,ay%,2�,,bl%:bl%+=1:ș53,ay%,3�,,ml%:ml%+=1:ș53,ay%,4�,,Sy%:ș53,ay%,5�,,m%:ș53,ay%,6�,,la%:ș53,ay%,7�,,_n%:ș53,ay%,9�,,Ga%:Fl%=1<<Ga%:ș53,ay%,11�,,Yu%:Yu%+=1:ș53,ay%,12�,,w_%:w_%+=1:oa%=Yu%�il%
(=ya%=w_%�bl%:Si%=(Yu%<<Sy%)-1:Fi%=(w_%<<m%)-1:ha%=32�Fl%:�
(ݤ_Wimp_version=28
( Kݤ_hard_initialise_Wimp�Xy%:�:��:�A("%.Wimp: hard_initialise_Wimp")
(!�v<12�
(";�1,"%.Wimp needs more recent version of the LibHandler"
(#�:ș&400f2,0�Xy%:�Xy%=0�
($5�0,"Application needs to be run from the desktop"
(%��:�S("<BasicV$Lib>.Heap",8):�S("<BasicV$Lib>.Message",3):�S("<BasicV$Lib>.Template",1):nJ%=�:qJ%=3*1024:�X(eu%,qJ%):qJ%+=eu%:AJ%=eu%:�X(W%,512):y$="":e$="":wi%=0:B$="Application":H$="0.00 (01-Jan-1900)":d_%=-1:p_%=2400:Vy%=2401
(&Yn%=16*1024:Ry%=�:N$="":=0
('1ݤIy(d$)�d%,C%,S$:ș&600f2,2�d%;C%:�(C%�1)=0�
(("S$=�?d%+�d%?1:d%=�(d$+S$):�d%�
()�#d%:d$+=S$
(*�
(+	�:=d$
(,#��Bu(By%)�By%>0�ș&dcb8d,gu,By%
(-�
(.��R(�By%)�By%>0�
(/4�D%:D%=�M(4):!D%=By%:ș&400c3,,D%:�C(D%,4):By%=0
(0�:�
(1!ݤj(By%)ș&dcb8d,yJ,By%,-1:=�
(2(��py(By%,Y$)ș&dcb8d,Ju,By%,Y$,0,0:�
(3��Vy(By%,Wa%,Sa%,qn%)�qn%�
(4ș&dcb8d,bu,By%,Wa%,Sa%
(5h��U%:U%=�M(16):!U%=0:U%!4=-Sa%��((1<<m%)-1):U%!8=Wa%��((1<<Sy%)-1):U%!12=0:ș&400d7,By%,U%:�C(U%,16)
(6�:�
(7(��VJ(�M%,`a%)ș&dcb8d,Ku,M%,`a%�M%:�
(8��Fy(By%)ș&dcb8d,Uu,By%:�
(9Y��Y(M%,zn%)�D%:D%=�M(128):!D%=M%:ș&400cb,,D%:D%!28=zn%:ș&400e7,2,D%,M%:�C(D%,128):�
(:p��Qu(By%,I%,vi%,Vn%,Tn%)�U%:U%=�M(16):U%!0=By%:U%!4=I%:U%!8=Vn%<<vi%:U%!12=Tn%<<vi%:ș&400cd,,U%:�C(U%,16):�
(;(ݤ_(By%,I%)ș&dcb8c,`u,By%,I%�I%:=I%
(<+��T(By%,I%,Za%)ș&dcb8c,Qu,By%,I%,Za%:�
(=,��Zy(By%,I%,Za%)ș&dcb8c,wu,By%,I%,Za%:�
(>:��F_(M%,I%,Zn%,Al%,Il%)ș&dcb8c,Au,M%,I%,Zn%,Al%,Il%:�
(?;��Qy(M%,I%,E%,sn%,Hn%,pi%,Al%,Il%)�(I%=Hn%)�((E%�4)=4)�
(@�F_(M%,pi%,+1,Al%,Il%)
(A��F_(M%,pi%,-1,Al%,Il%)
(B�:�
(C%��z_(M%,J%)ș&dcb8c,b_,M%,J%,+1:�
(D%��CJ(M%,J%)ș&dcb8c,b_,M%,J%,-1:�
(EJ��F(ni%,A$)�U%:U%=�M(300):U%!0=ni%:$(U%+4)=A$+�(0):�f(U%):�C(U%,300):�
(F��N(A$)�p_%,A$:�
(GM��L(ni%)�U%:U%=�M(300):U%!0=Vy%:�by("LE"+�(ni%),U%+4):�f(U%):�C(U%,300):�
(H��f(In%)ș&400df,In%,1,B$:�
(Igݤa(ai%,A$)�U%,T%:�P:U%=�M(260):!U%=0:$(U%+4)=A$+�(0):ș&400df,U%,(16�ai%),�w(0)�,T%:�C(U%,260):=T%
(J���PJ�U%:U%=�M(256):U%?0=1:U%?1=0:U%?2=0:U%?3=0:U%?4=0:U%?5=Si%�256:U%?6=Si%�256:U%?7=Fi%�256:U%?8=Fi%�256:ș7,21,U%:!U%=Ui%:ș&400c6,,U%:�C(U%,256):�
(K=��Au(Q%,X%,E%,I%)�:��:�A("%.Wimp: Mouse_Click_Query")
(L5�PJ:Q%=�J("FN_Stop_Action_"+n$+"("+�(I%=0)+")"):�
(M5ݤAy(D%)�c$:c$="":ȕ?D%>31:c$+=�(?D%):D%+=1:�:=c$
(N/ݤKy(V$)ȕ�V$,"."):V$=�V$,�V$,".")+1):�:=V$
(O)��_(By%,I%,R$)ș&dcb8c,W_,By%,I%,R$:�
(P(��ey(M%,J%,_%)ș&dcb8c,W_,M%,J%,_%:�
(Q'��Z(M%,J%,K%)ș&dcb8c,gy,M%,J%,K%:�
(R+ݤs(M%,J%)ș&dcb8c,UJ,M%,J%�M%:=�Ay(M%)
(S'ݤwy(M%,J%)ș&dcb8c,UJ,M%,J%�M%:=M%
(T&ݤA(M%,J%)ș&dcb8c,F_,M%,J%�M%:=M%
(U<ݤb(T$)�Xy%,zy%,R%:ș&20008,17,T$�Xy%,,,,zy%;R%:�U(R%)�
(V*�U("Reason",�Ky(T$)):�o(Xy%):�N(�w(4))
(W�:�Xy%<>1�
(X
zy%=-1
(Y
�:=zy%
(ZݤM(h%)�T%:�(AJ%+h%)<qJ%�
([T%=AJ%:AJ%+=h%
(\��N("Wimp Stack full")
(]	�:=T%
(^��Ju:AJ%=eu%:�
(_$��C(uu%,h%)�(uu%<eu%)�(uu%>qJ%)�
(`,�N("Release_Stack: Invalid stack chunk")
(a��(h%<0)�((uu%+h%)>qJ%)�
(b+�N("Release_Stack: Invalid chunk size")
(c�AJ%-=h%:�AJ%<>uu%�
(d �N("Release_Stack: Bad pop")
(e�
(f�
(g�:�
(h���EJ(G$,Gy%,Un%,xu%,Rn%,ra%)H$=�(Gy%)+"."+�"0"+�(Un%),2):H$+=" ("+�"0"+�(xu%),2)+"-":H$+=�"CBJanFebMarAprMayJunJulAugSepOctNovDec",Rn%*3,3):H$+="-"+�"19"+�(ra%),4)+")":B$=G$
(iV�U("App",B$):ș35,B$+"$Dir",W%,256,0,3�,,xu%:W%?xu%=13:�fi%xu%+1:$fi%=$W%:�N$<>""�
(j�xu%=�:wu%=W%:Gy%=�N$,","):ȕGy%<>0:wu%!0=�J(�N$,Gy%-1)):wu%+=4:N$=�N$,Gy%+1):Gy%=�N$,","):�:wu%!0=�J(N$):wu%!4=0:ș&400c0,300,&4b534154,G$,W%�ju%,d_%
(k&�ș&400c0,200,&4b534154,G$�ju%,d_%
(l�:��kJ
(mș&606c0:�ju%<200�
(n�p_%,�w(5)
(o�:�Ry%�
(pș&81682,d_%
(q*�:nJ%=�:�u_:�DJ:nJ%=-2:�X_:�dJ:�Tu%=0�
(r�_(N_%,7,H$)
(sP�:Pn%=-1:Ki%=-1:xl%=-1:pu%=-1:Ha%=�:Aa%=-1:da%=-1:O$="":w$="":�wy:ș&606c1:�
(t��kJș&606c1:�BJ%�
(u�F(Vy%,�$+" ["+Þ+"]")
(v��F(Vy%,�$)
(w�:�B:�:�
(x-ݤProgInfo(M%)�O(M%!(88+(7<<5)+20),H$):=0
(y��h_�Qi%,aa%:aa%=�:�Ry%�
(zwy%=wy%��(49)
({1�:�ș&400c7,wy%,W%�Qi%:�Ry%�ș&81686,Qi%,,d_%
(|
ȎQi%�
(}
�0:�cu
(~
�1:�vJ
(
�2:�s_
(�
�3:�Pu
(�
�4:�Fu
(�
�5:�Su
(�
�6:�b_
(�
�7:�w_
(�
�8:�g_
(�
�9:�v_
(��10:�wJ
(��11:�oJ
(��12:�ru
(��17:�zy
(��18:�E_
(��19:�r_
(��:��(aa%):�
(���Fu�(Ry%)�
(�/�F(p_%,"Unexpected Pointer_Leaving_Window")
(��:�
(���Su�(Ry%)�
(�0�F(p_%,"Unexpected Pointer_Entering_Window")
(��:�
(�)��wJ�N("Unexpected Scroll_Request"):�
(�%��oJ�N("Unexpected Lose_Caret"):�
(�%��ru�N("Unexpected Gain_Caret"):�
(�F��dJ�A$(10):�M%(�(A$(),1)):D$="�":A$()=D$:M%()=-1:py%=0:wy%=6193:�
(���D(L$,cu%)�vu(L$,cu%):�
(�"��vu(L$,cu%)�K%:py%+=1:�py%=1�
(�wy%=wy%�(�(1))
(���py%=�(A$(),1)�
(��1,"Too many null reasons"
(��
(�6�:K%=0:ȕA$(K%)<>D$:K%+=1:�:A$(K%)=L$:M%(K%)=cu%:�
(���y(L$,cu%)�K%:�py%=0�
(�/�N("Bad release null reason code ("+L$+")")
(�&�py%-=1:K%=�(A$(),1):�K%-=1:�K%<0�
(�/�N("Bad release null reason code ("+L$+")")
(�8�:�(A$(K%)=L$)�(M%(K%)=cu%):A$(K%)=D$:�py%=0��(Ry%)�
(�
wy%=wy%�1
(��
(��:�
(���H(L$,cu%)�K%,D%:�L$=""�
(��(Ry%)�
(�
wy%=wy%�1
(��wy%=wy%�(�1)
(��:py%=0:A$()=D$
(�F�D%=0:K%=�(A$(),1):ȕK%>0:K%-=1:�A$(K%)=L$�((M%(K%)=cu%)�(cu%=0))�
(�A$(K%)=D$:D%+=1
(��:�:py%-=D%
(��:�
(�=��cu�K%,K$,y%,yl%:�:��:�A("%.Wimp: Null_Reason_Code")
(�0K%=�(A$(),1):ȕK%>0:K%-=1:K$=A$(K%):�K$<>D$�
(�y%=M%(K%):�y%=-1�
(� yl%=�J("FN_Null_Reason_"+K$)
(�/�yl%=�J("FN_Null_Reason_"+K$+"("+�(y%)+")")
(�#�:�yl%�(A$(K%)=K$)�(M%(K%)=y%)�
(�A$(K%)=D$:py%-=1
(��
(�	�:�:�
(�ݤ_Null_Reason_�(Ry%)�
(�(�N("Bad Null Reason (not expected)")
(��:=0
(�,��w_�Q%:�:��:�A("%.Wimp: User_Drag")
(�)Q%=�J("FN_Dragged_"+e$):�wi%<>(1*16)�
(��P
(��:ș&400d0,,-1:e$="":�
(�4��E_�:��:�A("%.Wimp: User_Message_Recorded")
(�	�zy:�
(���G_�#W%!20,"Run "+$fi%:�
(�+��zy�:��:�A("%.Wimp: User_Message")
(�ȎW%!16�
(�	�0:�B
(�
�1:�KJ
(�
�2:�`J
(�
�3:�x_
(�
�4:�Iu
(�
�5:�GJ
(�
�6:�Cu
(�
�7:�Eu
(�
�8:�Ry
(�
�9:�WJ
(��10:�G_
(�
�1282:�N_
(��&400c0:�JJ
(��&400c1:�wy
(��&400c5:�wu
(��:�
(�	��wu�
(�-��Eu�:��:�A("Message_RAM_Transmit: ")
(��W%!12<>pu%�
(�-�F(Vy%,"Unexpected RAM_Transmit message")
(��Vl%+=W%!24:�(W%!24)=hl%�
(��U_
(�5��J("FN_RAM_Load_Completed_"+O$+"("+�(Vl%)+")")�
(�	�L(6)
(��
(��
(��:�
(�R��U_�RAM_start%:�J("FN_RAM_Load_"+O$+"("+�(Vl%)+", "+�(hl%)+", RAM_start%)")�
(��Vl%<>0�
(�	�L(7)
(�"��J("FN_RAM_Load_Failed_"+O$)
(��K_
(��
(�O�W%!12=W%!8:W%!16=6:W%!20=RAM_start%:W%!24=hl%:ș&400e7,18,W%,W%!4:pu%=W%!8
(��:�
(�9��K_�Ba%:ș&20023,"Wimp$Scrap",0,-1,0,3�,,sa%:�sa%=0�
(�	�L(8)
(�n�$(W%+44)="<Wimp$Scrap>"+�(0):W%!36=-1:W%!16=2:W%!12=da%:W%!0=60:ș&400e7,17,W%,Aa%:xl%=W%!8:pu%=xl%:Ha%=�
(��:�
(�D��Cu�M,RAM_start%,RAM_length%:�:��:�A("Message_RAM_Fetch: ")
(��W%!12<>Ki%�
(�	�L(9)
(���w$=""�
(�R��J("FN_RAM_Save_"+w$+"("+�(Fa%)+", "+�(W%!24)+", RAM_start%, RAM_length%)")�
(��Fa%+=RAM_length%:ș&400f1,d_%,RAM_start%,W%!4,W%!20,RAM_length%:W%!12=W%!8:W%!16=7:W%!24=RAM_length%:ș&400e7,17-(RAM_length%=(W%!24)),W%,W%!4:Ki%=W%!8
(��
(��
(��:�
(�*��Uu��"Error in error handler: ";�$:�
(��Ry%�ș&a1683,d_%
(�$�tu:�G_:ș&400dd,d_%,&4b534154:�
(�Nݤgy(u$):�D%,R%:D%=�M(256):ș&20023,u$,D%,-256,0,0�,,R%:�C(D%,256):=(R%<0)
(���L_(E%):�F%:�E%�1�
(�fF%=!Xu%:X_%=F%!w%:Y_%=F%!x%:oy%=F%!b_%:e_%=F%!O_%:f_%=F%!H_%:m_%=F%!x_%:t_%=F%!y_%:a_%=F%!Q_%:Ȏ��
(��Wy%<>0:�F(Vy%,�C(2))
(��!xy%=0:�b
(�ɤ`:�Y(Z%!z%,-1):�Xy
(�:�G(!xy%):�Xy
(��
)�:�
)��Xu(J%):�G%:�J%>=0�
)G%=�W(J%+1):�G%!r%�
)&�n(G%!r%,G%+`J%):�R(G%!r%):G%!r%=0
)�:�t(G%)
)�
)�:�
)��C_(J%):�G%,Yi%,b%:�J%>=0�
)J%+=1:G%=�W(J%):�G%!r%�
)	
�R(G%!r%)
)
�:!My%-=1:�!My%=0�
)2�W(!Hy%):ș5,"%Remove <Daleks3$Dir>.Scores":�P
)^�:ȕJ%<=!My%:J%+=1:Yi%=�W(J%):�b%=0�l_%-1�4:G%!b%=Yi%!b%:�b%:G%=Yi%:�:�`(!Hy%,G%-!Hy%):�jy
)
�
)�:�
)9��fJ(M%):�G%:ș&400c5,,M%:G%=!Xu%:�Cy(G%!r%,G%+`J%):�
)9��I_:�G%:G%=!Xu%:�n(G%!r%,G%+`J%):�R(G%!r%):G%!r%=0:�
)!��Gu:�R_%:�gy("Daleks$Dir")�
)!ș&606c0:�:��:ș&606c1:�Q
)0R_%=0:ȕ�_y("<Daleks$Dir>","*",R_%):�Jy=SJ�
)�Wu(�Wy)
)�:�:��:ș&606c1
)�:�F(Vy%,�C(10))
)�:�
)���Wu(Q$):�D%,hy%,y%,M%,N%,K%,J%,SJ%,gJ%,G$:D%=�M(24):�O(D%,Q$):hy%=�M(24):�O(hy%,"%dx%dHSC"):A%=D%:B%=hy%:A%=�(tu):K%=!A%:M%=A%!4:N%=A%!8:�C(hy%,24):�C(D%,24):�K%=2�
)�D%=vu:D%!w%=M%:D%!x%=N%:D%!O_%=7:D%!H_%=10:D%!b_%=M%*N%/2:D%!y_%=1:D%!Q_%=1:D%!x_%=1:N%=�("<Daleks$Dir>."+Q$):�:��:�#N%:�Q
)g�J%=1�10:�#N%,SJ%,G$:gJ%=(SJ%�10)-D%!O_%:gJ%=gJ%�D%!H_%:G$=�G$,y_-1):�xy(D%,G$,SJ%,gJ%):�J%:��:�#N%
)�:�
)7��d_:�h%,qi%,G%,J%,D%:ș&606c0:�:��:ș&606c1:�Q
)/!My%=0:!Hy%=0:�Fy("<Daleks3$Dir>.Scores")�
)4h%=�Ty("<Daleks3$Dir>.Scores"):�((h%-4)�l_%)<>0�
)
�N(�C(4))
) d�:!Hy%=�Ry(h%):D%=!Hy%:�_J("<Daleks3$Dir>.Scores",D%):ș91,&c1040a31,D%+4,D%+h%,1�qi%:�qi%<>!D%�
)!
�N(�C(4))
)"6�:!My%=(h%-4)�l_%:�J%=1�!My%:G%=�W(J%):G%!r%=0:�J%
)#�:��:ș&606c1:�
)$SݤV(M%):�J%,Y%,G%:J%=1:Y%=�:ȕJ%<=!My%�Y%:G%=�W(J%):Y%=(G%!r%<>M%):J%+=1:�:�Y%�
)%	M%-=1
)&
�:!Xu%=G%
)'	�:=M%
)(L��xy(F%,G$,SJ%,gJ%):�G%,N%,J%,b%,i%,Ey%,Z$:ș&606c0:�:��:ș&606c1:�Q
))\G%=�Gy(F%):Ey%=1:N%=�T(G%,Ey%):ȕEy%<yJ%�SJ%<=N%!Mu%:Ey%+=1:N%=�T(G%,Ey%):�:�SJ%>N%!Mu%�
)*�i%=yJ%:ȕi%>Ey%:J%=�T(G%,i%-1):Z$=�N(J%+El%):�i(G%,i%,Z$,J%!iu%,J%!Mu%):�Sy(G%,i%):i%-=1:�:�i(G%,Ey%,G$,gJ%,SJ%):�Sy(G%,Ey%):�Y(G%!r%,-1):�jy
)+�:��:ș&606c1:�
),M��bu:�J%,Y%,G%:J%=1:Y%=�:ȕJ%<!My%�Y%:G%=�W(J%):Y%=(G%!r%=0):J%+=1:�:�Y%�
)-G%=�W(1):�t(G%)
).�:�Y(G%!r%,-1):�
)/x��Tu(F%):�J%,Y%,b%,G%:J%=1:Y%=�:ȕJ%<=!My%�Y%:G%=�W(J%):�b%=0�s_%-1�4:Y%=Y%�(G%!b%=F%!b%):�b%:Y%=(Y%=0):J%+=1:�:�Y%�
)0�7:G%=�W(1)
)1�:�G%!r%=0�
)2
�t(G%)
)3�:�Y(G%!r%,-1):�
)4t��jy:�h%,D%:Ai%=�W(!My%+1):D%=!Hy%:ș91,&c1040a31,D%+4,Ai%,1�!D%:ș&20008,10,"<Daleks3$Dir>.Scores",SJ,,D%,Ai%:�
)5pݤGy(F%):�Y%,J%,b%,G%:Y%=�:J%=1:ȕJ%<=!My%�Y%:G%=�W(J%):�b%=0�s_%-1�4:Y%=Y%�(F%!b%=G%!b%):�b%:Y%=(Y%=0):�Y%�
)6	J%+=1
)7�:�:�Y%�
)8�!My%+=1:Y%=�W(!My%+1)-!Hy%:�`(!Hy%,Y%):G%=�W(!My%):G%!r%=0:�Zu(G%+`J%):�b%=0�s_%-1�4:G%!b%=F%!b%:�b%:�J%=1�yJ%:�i(G%,J%,"Zappa",0,10):�J%
)9�:�G%!r%=0�
):
�t(G%)
);	�:=G%
)<{��t(G%):�J%,_$:_$=�c(G%,"HighScore"):G%!r%=�qy("HighScores",+48,-48,_$):�ny(G%!r%,G%+`J%,-1):�J%=1�yJ%:�Sy(G%,J%):�J%:�
)=R��i(G%,Ey%,G$,gJ%,SJ%):�N%:N%=�T(G%,Ey%):�O(N%+El%,G$):N%!iu%=gJ%:N%!Mu%=SJ%:�
)>|��Sy(G%,Ey%):�M%,J%,N%:M%=G%!r%:J%=�fy(Ey%):N%=�T(G%,Ey%):�ey(M%,J%+li,N%+El%):�Z(M%,J%+fi,N%!iu%):�Z(M%,J%+ul,N%!Mu%):�
)? ݤW(J%):=!Hy%+4+((J%-1)*l_%)
)@ݤfy(Ey%):=((Ey%-1)*Cl)+Dl
)A%ݤT(G%,Ey%):=G%+za%+((Ey%-1)*Mi%)
)B��W_:�J%:�:��:�O_
)Cș&606c0:b=�dy:�b<1�
)D�F(Vy%,�C(7)):�B:�
)Eb�:�P%(b):�G%(b):�D%(b):�B%(b):�S%(b,ly):�N%(b):�F%(b):�X%(b):�J%=1�b:�i_(J%):�J%:��:ș&606c1:�
)F&��O_:ș&606c1:�F(Vy%,�C(8)):�B:�:�
)G)ݤdy:�J%:J%=1:ȕ�Oy(J%):J%+=1:�:=J%-1
)HEݤOy(J%):�Z$,R%:��:�+0:�Z$:ș&2002e,296,v%,�d(J%)+Z$�;R%:=��U(R%)
)Iݤd(J%):=�(J%+�("A")-1)+"_"
)J���i_(J%):�b%,Z$,M%,N%,Ju%,D%,G%:��:�+0:�Z$:Z$=�d(J%)+Z$:ș46,280,v%,Z$�,,S%(J%,1):D%=S%(J%,1):ș46,552,v%,D%�,,,M%,N%,,Ju%:X%(J%)=Ju%:P%(J%)=M%:B%(J%)=N%:�iJ(D%,�,N%(J%),G%):ș53,Ju%,4�,,G%(J%):ș53,Ju%,5�,,D%(J%):ș53,Ju%,9�,,G%:F%(J%)=1<<(1<<G%)
)K>�b%=2�ly:�Z$:Z$=�d(J%)+Z$:ș46,280,v%,Z$�,,S%(J%,b%):�b%:�
)Lx��Gy:�Cy,T%,Ll%,U%,Ly%,Lu%,M%,N%,ku%:�Zy%,q_%,xi%,ea%,xn%,Dl%,Y%,G%,J%,F%,j_%,Uy%:ku%=Z%!Yy%-Z%!Qy%:�ku%�(Z%!q%=fy)�
)M�y("Move",Z%)
)N/�:!u_=ml%:U%=�M(272):�:��:�C(U%,272):�Q
)O�Ly%=U%:Lu%=Ly%+16:Y%=Z%!G_%:G%=Z%+`u%:F%=Z%+_u%:Ly%!0=F%!0*(1<<Sy%):Ly%!4=F%!4*(1<<m%):Ly%!8=F%!8*(1<<G%(Y%)):Ly%!12=F%!12*(1<<D%(Y%)):M%=�z(Ly%,P%(Y%)):N%=�f(Ly%,B%(Y%)):ș&40740,X%(Y%),N%(Y%),-1,-1,Lu%:�Z%!l%�
)Psș46,296,Z%!l%,"0"�,,,Zy%,q_%,,Dl%:T%=(M%<>Zy%)�(N%<>q_%):T%=T%��x(Dl%,4):T%=T%��x(Dl%,5):T%=T%��x(Dl%,9):�T%�
)Q,�J%=0�F%(Y%)-1:T%=T%�(Lu%?J%<>G%?J%):�J%
)R�
)S
�:T%=�
)T
�:�T%�
)U��J%=0�F%(Y%)-1:G%?J%=Lu%?J%:�J%:�W(Z%!l%):Zy%=M%+�z(Ly%,Z%!HJ%):q_%=N%+�f(Ly%,Z%!CJ%):Z%!Cy%=Zy%<<Sy%:Z%!vy%=q_%<<m%:xi%=�z(Ly%,Z%!HJ%):ea%=�f(Ly%,Z%!CJ%):Z%!vu%=((xi%+1)�2)<<Sy%:Z%!ui%=(q_%-((ea%+1)�2))<<m%:Ea%=Z%!w%:Ra%=Z%!x%:j_%=(Zy%<<Sy%)*Ea%
)V�Uy%=((q_%<<m%)*Ra%)+E_%:�Vy(Z%!z%,j_%,Uy%+4,0):�H_(Zy%,q_%):Cy=ly+(2*Z%!Qu%):Cy=Cy*256/F%(Y%):Cy=Cy*�ny(�,Zy%,q_%,�,�):Ll%=�:�:Cy=Cy*1.2:T%=�B(Z%!l%,Cy):�(T%)�
)W@g%=Z%!l%:g%!0=Cy:g%!4=0:g%!8=16:g%!12=16:Ll%=�(�ry):�(Ll%)�
)X
�W(Z%!l%)
)Y�
)Z�:�T%�Ll%:�(T%)�
)[g%!0=g%!12:�`(Z%!l%,g%!12)
)\�
)]*�:��:�C(U%,272):Z%!Yy%=Z%!Qy%+ku%:�T%�
)^�F(Vy%,�C(9)):Z%!q%=Du
)_�:�ku%�(Z%!z%<>0)�
)`�D("Move",Z%)
)a�
)b�:�
)cAݤx(ay%,gi%):�R%,a%:ș53,�,gi%�,,R%:ș53,ay%,gi%�,,a%:=R%<>a%
)d���H_(M%,N%):�F%,I_%,J%,oJ%,Q%,lJ%,X%:I_%=�u(dy%):�W(Z%!Qy%):�X(Z%!Qy%,((I_%+1)*16*c_%)):oJ%=0:lJ%=0:�J%=0�I_%:F%=Z%!Qy%+(J%*16*c_%):Q%=((J%*M%)�I_%)<<Sy%:X%=((J%*N%)�I_%)<<m%:�J_(F%,oJ%,lJ%,Q%,X%):oJ%=Q%:lJ%=X%:�J%:Z%!Qu%=I_%:�
)e/��J_(F%,oJ%,lJ%,Q%,X%):�J%:�J%=0�10:ȎJ%�3�
)f�0:F%!Iu%=0:F%!W_%=0
)g�1:F%!Iu%=oJ%:F%!W_%=Q%
)h�2:F%!Iu%=-Q%:F%!W_%=-Q%
)i�3:F%!Iu%=0:F%!W_%=0
)j�:ȎJ%�12�
)k�0:F%!Sl%=0:F%!wJ%=0
)l�4:F%!Sl%=-X%:F%!wJ%=-X%
)m�8:F%!Sl%=lJ%:F%!wJ%=X%
)n�:F%+=c_%:�J%:�
)oQݤry:�T%,J%,i$,gi%,Xy%,Ql%,Ul%,Xl%,g%,G%:��:�+0:g%=Z%!l%:�:��:ș&606c1:�Q
)pbș&606c0:J%=0:�:ș&606c4,(J%*100)�27:�ay:ș&2002e,271,g%,�(J%),0,M%,N%,�;T%:T%=�U(T%):�(T%)�
)q�G%=S%(Z%!G_%,J%+1):ș46,316,g%,�(J%),0�Xy%,Ql%,Ul%,Xl%:ș&400e6,128+Z%!r_%:ș46,562,v%,G%,0,0,,Ly%:ș46,564,v%,G%,0,0,11,Ly%,Lu%:ș46,Xy%,Ql%,Ul%,Xl%:ș46,280,g%,�(J%)�,,G%:Z%!(Fu%+(J%<<2))=G%:J%+=1
)r�:�T%�(J%=ly):�Xa%�
)s�(T%)�
)tT%=�y(Z%!Fu%,Ya%)
)u
�:�(T%)�
)vT%=�y(Z%!Hl%,li%)
)w�
)x
�:�T%�
)y
�W(Z%!l%)
)z�:��:ș&606c1:=T%
){%� "dalek", "man", "pyre", "right"
)|(� "upright",  "up", "upleft", "left"
)}%� "downleft", "down", "downright"
)~�ݤy(Ru%,Va%):�k%,Q%,X%,T%,F%,I_%,Ua%,Y%,Fy%,oJ%,lJ%:�Z%():��:�+0:T%=�:Ua%=J%:�Z%(15,3):Z%()=-1:�:�k%:F%=Z%!Qy%+(k%*c_%):I_%=Z%!Qu%:F%!Va%=Ru%:�:oJ%=F%!W_%:lJ%=F%!wJ%:F%+=16*c_%:Q%=F%!W_%:X%=F%!wJ%:Y%=((Q%>0)�(X%<0))�((Q%<0)�(X%>0)):Q%=�(Q%-oJ%)>>Sy%
)JX%=�(X%-lJ%)>>m%:T%=�Uy(Q%,X%,F%!Va%,Y%):I_%-=1:�T%�(I_%=0):�T%�(k%=0)
)�C� %0001, %1001, %1000, %1010, %0010, %0110, %0100, %0101, %0000
)�=T%
)��ݤUy(Q%,X%,�tu%,Ci%):�T%,i%,Xy%,Ql%,Ul%,Xl%,E$,g%:g%=Z%!l%:T%=�:i%=0:ȕ(i%+Ua%)<J%�T%:T%=(Z%(i%,0)<>Q%)�(Z%(i%,1)<>X%):T%=T%�(Z%(i%,2)<>Ci%):i%+=1:�:�(T%)�
)�tu%=Z%(i%-1,3)
)�"�:E$=�(J%):�ay:�(Q%=0)�(X%=0)�
)�ș&2002e,271,g%,E$,,,,�;T%
)�+�:ș&2002e,271,g%,E$,,M%+Q%,N%+X%,�;T%
)��:T%=�U(T%):�(T%)�
)�:Z%(i%,0)=Q%:Z%(i%,1)=X%:Z%(i%,2)=Ci%:�(Q%<>0)�(X%<>0)�
)�?Q%=Q%<<Sy%:X%=X%<<m%:ș46,316,g%,E$,0�Xy%,Ql%,Ul%,Xl%:�Ci%�
)�1ș46,546,g%,Ru%,0,X%,3:ș46,546,g%,Ru%,Q%,0,3
)�3�:ș46,546,g%,Ru%,0,0,3:ș46,546,g%,Ru%,Q%,X%,3
)��:ș46,Xy%,Ql%,Ul%,Xl%
)�B�:ș46,280,g%,E$�,,tu%:Z%(i%,3)=tu%:J%+=1:ș&606c4,(J%*100)�27
)��
)�	�:=T%
)�ݤf(S%,M):=(M*S%!4)�S%!12
)�ݤz(S%,M):=(M*S%!0)�S%!8
)���ay:�Fl%>4�
)��0,0Ȝ0:�128,0Ȝ0
)��:�0,0:�128,0
)��:�
)�ݤ_Message_version=4
)�Oݤ_hard_initialise_Message�:��:�A("%.Message: hard_initialise_Message")
)�TvB=31:ș5,"RMEnsure CAssembler 0.01 RMLoad System:Modules.CAssembler":�Qi 256:=0
)�Iݤey(j$,Fn%,�U_%)�A%:ș&fcb83,j$+".Messages.",Fn%,0�A%,U_%:�U_%=0��v_
)�=A%
)�?ݤSy(N%,x$,I$)�Gy%:ș&fcb85,x$,I$,N%�Gy%;N%:=Gy%�((N%�2)=2)
)�3ݤEy(N%)�Gy%:ș&fcb86,N%�Gy%;N%:=Gy%�((N%�2)=2)
)�=ݤe(N%,x$)�Gy%:ș&fcb84,x$,Qi,256,N%,0�Gy%,N%:?N%=13:=$Qi
)�$��jJ(N%,x$,I$)N%=�Sy(N%,x$,I$):�
)���q_(N%)N%=�Ey(N%):�
)�ݤC(K%)=�e(`y%,"E"+�(K%))
)�ݤH(z$)=�e(`y%,z$)
)���U(z$,a$)�jJ(`y%,z$,a$):�
)�)��by(z$,B%)ș&dcb84,z$,B%,256,`y%,0:�
)�)��QJ(z$,B%)ș&dcb84,z$,B%,256,`y%,2:�
)���tu�q_(`y%):�
)���o(E%)�E%<=0�
)��U("Sys",""):�U("SysN","")
)�+��U("Sys",�Ay(E%+4)):�U("SysN",�~(!E%))
)��:�
)�ݤw(K%)=�e(`y%,"LE"+�(K%))
)�*��gJ�:��:�A("%.Message: assemble")
)�,[OPTV%:ALIGN:.v_:�Z:B Nl:]:�V%�4�v_+=yy%
)��
)�ݤ_CheckVars_version=3
)�"ݤ_hard_initialise_CheckVars=0
)�ݤ_string_version=6
)�Lݤ_hard_initialise_string�:��:�A("%.string: hard_initialise_string")
)�!�S("<BasicV$Lib>.ctype",1):=0
)�CݤLy(R$)�q$,yu%,J%,R%:yu%=�(R$):q$="":ȕyu%>0:R%=�(R$):�m(R%)�
)�q$+=�(�Cy(R%))
)��q$+=�(R%)
)��:yu%-=1:R$=�R$,yu%):�:=q$
)�ݤ_ctype_version=1
)�ݤ_hard_initialise_ctype=0
)�ݤHy(R%)=R%-�("a")+�("A")
)�!ݤm(R%)=R%>=�("a")�R%<=�("z")
)�ݤCy(R%)�T%:�m(R%)�
)�T%=�Hy(R%)
)�
�T%=R%
)�	�:=T%
�
00000000  0d 00 01 18 f4 3e 3c 49  6e 24 44 69 72 3e 2e 21  |.....><In$Dir>.!|
00000010  52 75 6e 49 6d 61 67 65  0d 00 02 30 f4 50 72 6f  |RunImage...0.Pro|
00000020  64 75 63 65 64 20 62 79  20 42 61 73 43 6f 6d 70  |duced by BasComp|
00000030  72 65 73 73 20 76 31 2e  33 30 20 28 30 39 20 53  |ress v1.30 (09 S|
00000040  65 70 20 31 39 39 32 29  0d 00 03 39 5a 25 3d 30  |ep 1992)...9Z%=0|
00000050  3a 79 4a 25 3d 31 30 3a  42 6e 25 3d 31 3a 6c 79  |:yJ%=10:Bn%=1:ly|
00000060  3d 31 31 3a 79 5f 3d 32  34 3a de 73 25 31 36 3a  |=11:y_=24:.s%16:|
00000070  de 4b 6e 25 34 3a 21 4b  6e 25 3d 30 3a ee 85 f2  |.Kn%4:!Kn%=0:...|
00000080  78 0d 00 04 d0 f2 71 4a  28 32 30 2c 31 36 29 3a  |x.....qJ(20,16):|
00000090  42 4a 25 3d a3 3a 4b 4a  25 3d 2d 32 3a 58 61 25  |BJ%=.:KJ%=-2:Xa%|
000000a0  3d b9 3a 4c 4a 25 3d a3  3a f2 53 28 22 3c 42 61  |=.:LJ%=.:.S("<Ba|
000000b0  73 69 63 56 24 4c 69 62  3e 2e 43 41 73 6d 22 2c  |sicV$Lib>.CAsm",|
000000c0  36 29 3a f2 53 28 22 3c  42 61 73 69 63 56 24 4c  |6):.S("<BasicV$L|
000000d0  69 62 3e 2e 53 70 72 69  74 65 5f 49 4f 22 2c 36  |ib>.Sprite_IO",6|
000000e0  29 3a f2 53 28 22 3c 42  61 73 69 63 56 5f 41 73  |):.S("<BasicV_As|
000000f0  73 65 6d 62 6c 65 72 24  4c 69 62 3e 2e 4d 69 73  |sembler$Lib>.Mis|
00000100  63 22 2c 33 33 29 3a f2  53 28 22 3c 42 61 73 69  |c",33):.S("<Basi|
00000110  63 56 24 4c 69 62 3e 2e  53 74 69 63 6b 79 57 69  |cV$Lib>.StickyWi|
00000120  6e 22 2c 31 29 3a f2 53  28 22 3c 42 61 73 69 63  |n",1):.S("<Basic|
00000130  56 24 4c 69 62 3e 2e 54  65 6d 70 6c 61 74 65 22  |V$Lib>.Template"|
00000140  2c 33 29 3a 50 69 25 3d  42 4a 25 3a e7 42 4a 25  |,3):Pi%=BJ%:.BJ%|
00000150  8c 0d 00 05 3e f2 48 79  28 22 64 65 62 75 67 2c  |....>.Hy("debug,|
00000160  69 6d 61 74 68 2c 6d 65  73 73 61 67 65 2c 52 65  |imath,message,Re|
00000170  6c 4f 62 6a 2c 73 74 64  69 6f 2c 73 74 64 6c 69  |lObj,stdio,stdli|
00000180  62 2c 73 74 72 69 6e 67  2c 77 69 6d 70 22 29 0d  |b,string,wimp").|
00000190  00 06 3a cc 3a f2 48 79  28 22 69 6d 61 74 68 2c  |..:.:.Hy("imath,|
000001a0  6d 65 73 73 61 67 65 2c  52 65 6c 4f 62 6a 2c 73  |message,RelObj,s|
000001b0  74 64 69 6f 2c 73 74 64  6c 69 62 2c 73 74 72 69  |tdio,stdlib,stri|
000001c0  6e 67 2c 77 69 6d 70 22  29 0d 00 07 f5 cd 3a f2  |ng,wimp").....:.|
000001d0  73 75 28 31 30 30 30 30  2c a3 2c a3 29 3a 4c 4a  |su(10000,.,.):LJ|
000001e0  25 3d 42 4a 25 3a f2 47  28 30 29 3a f2 53 28 22  |%=BJ%:.G(0):.S("|
000001f0  3c 42 61 73 69 63 56 24  4c 69 62 3e 2e 66 69 6c  |<BasicV$Lib>.fil|
00000200  65 5f 69 6f 22 2c 33 29  3a f2 53 28 22 3c 42 61  |e_io",3):.S("<Ba|
00000210  73 69 63 56 24 4c 69 62  3e 2e 46 69 6c 65 54 79  |sicV$Lib>.FileTy|
00000220  70 65 22 2c 31 29 3a f2  53 28 22 3c 42 61 73 69  |pe",1):.S("<Basi|
00000230  63 56 24 4c 69 62 3e 2e  48 65 61 70 22 2c 37 29  |cV$Lib>.Heap",7)|
00000240  3a f2 53 28 22 3c 42 61  73 69 63 56 24 4c 69 62  |:.S("<BasicV$Lib|
00000250  3e 2e 49 6e 74 4d 61 74  68 22 2c 34 29 3a f2 53  |>.IntMath",4):.S|
00000260  28 22 3c 42 61 73 69 63  56 24 4c 69 62 3e 2e 4d  |("<BasicV$Lib>.M|
00000270  6f 64 65 49 6e 66 6f 22  2c 35 29 3a f2 53 28 22  |odeInfo",5):.S("|
00000280  3c 42 61 73 69 63 56 24  4c 69 62 3e 2e 57 69 6d  |<BasicV$Lib>.Wim|
00000290  70 22 2c 32 38 29 3a 60  79 25 3d a4 65 79 28 22  |p",28):`y%=.ey("|
000002a0  3c 44 61 6c 65 6b 73 33  24 44 69 72 3e 22 2c 2d  |<Daleks3$Dir>",-|
000002b0  31 2c 55 5f 25 29 3a e7  55 5f 25 3e 30 8c 0d 00  |1,U_%):.U_%>0...|
000002c0  08 3b 85 21 60 79 25 2c  22 44 61 6c 65 6b 73 20  |.;.!`y%,"Daleks |
000002d0  63 61 6e 27 74 20 6c 6f  61 64 20 69 74 73 27 20  |can't load its' |
000002e0  6d 65 73 73 61 67 65 20  66 69 6c 65 3a 20 22 2b  |message file: "+|
000002f0  a4 4e 28 60 79 25 2b 34  29 0d 00 09 6d cd 3a 52  |.N(`y%+4)...m.:R|
00000300  79 25 3d b9 3a 54 75 25  3d b9 3a 4e 24 3d 22 39  |y%=.:Tu%=.:N$="9|
00000310  2c 31 30 2c 26 35 30 32  2c 26 34 30 30 43 30 2c  |,10,&502,&400C0,|
00000320  26 34 30 30 43 31 22 3a  f2 45 4a 28 22 44 61 6c  |&400C1":.EJ("Dal|
00000330  65 6b 73 33 22 2c 33 2c  34 30 2c 33 2c 31 30 2c  |eks3",3,40,3,10,|
00000340  31 39 39 32 29 3a 4c 4a  25 3d 42 4a 25 3a f2 57  |1992):LJ%=BJ%:.W|
00000350  5f 3a f2 59 79 3a f2 64  5f 3a d6 4d 6c 3a e7 a4  |_:.Yy:.d_:.Ml:..|
00000360  6a 28 57 79 25 29 0d 00  0a 29 f2 5f 28 57 79 25  |j(Wy%)...)._(Wy%|
00000370  2c 60 79 2c 57 24 29 3a  c8 99 26 64 63 62 38 63  |,`y,W$):..&dcb8c|
00000380  2c 52 75 2c 57 79 25 2c  60 79 3a ee 85 f2 78 0d  |,Ru,Wy%,`y:...x.|
00000390  00 0b 12 f2 4a 75 3a f5  3a f2 68 5f 3a fd a3 3a  |....Ju:.:.h_:..:|
000003a0  e0 0d 00 0c 0d dd f2 51  3a e7 42 4a 25 8c 0d 00  |.......Q:.BJ%...|
000003b0  0d 17 85 9f 2c f6 24 2b  22 20 5b 22 2b c3 28 9e  |....,.$+" ["+.(.|
000003c0  29 2b 22 5d 22 0d 00 0e  0b cc 3a 85 9f 2c f6 24  |)+"]".....:..,.$|
000003d0  0d 00 0f 0a cd 3a f2 42  3a e1 0d 00 10 42 dd f2  |.....:.B:....B..|
000003e0  59 75 28 51 25 2c 58 25  2c 45 25 2c 49 25 29 3a  |Yu(Q%,X%,E%,I%):|
000003f0  ea 63 25 2c 66 25 2c 6b  25 3a c8 99 26 34 30 30  |.c%,f%,k%:..&400|
00000400  64 32 2c 5a 25 21 7a 25  2c 2d 31 2c 2c 2c 31 3c  |d2,Z%!z%,-1,,,1<|
00000410  3c 32 35 3a c8 8e 5a 25  21 71 25 ca 0d 00 11 6d  |<25:..Z%!q%....m|
00000420  c9 5f 3a 51 25 3d 28 51  25 2d 28 5a 25 21 65 79  |._:Q%=(Q%-(Z%!ey|
00000430  25 29 29 81 28 5a 25 21  43 79 25 29 3a 58 25 3d  |%)).(Z%!Cy%):X%=|
00000440  28 28 5a 25 21 45 69 25  29 2d 58 25 29 81 28 5a  |((Z%!Ei%)-X%).(Z|
00000450  25 21 76 79 25 29 3a 63  25 3d 51 25 2d 28 5a 25  |%!vy%):c%=Q%-(Z%|
00000460  21 74 25 29 3a 66 25 3d  58 25 2d 28 5a 25 21 41  |!t%):f%=X%-(Z%!A|
00000470  79 25 29 3a e7 28 94 28  63 25 29 3c 32 29 80 28  |y%):.(.(c%)<2).(|
00000480  94 28 66 25 29 3c 32 29  8c 0d 00 12 0d f2 50 3a  |.(f%)<2)......P:|
00000490  e7 45 25 80 34 8c 0d 00  13 09 c8 8e 63 25 ca 0d  |.E%.4.......c%..|
000004a0  00 14 0c c9 2d 31 3a 6b  25 3d 32 0d 00 15 0b c9  |....-1:k%=2.....|
000004b0  30 3a 6b 25 3d 30 0d 00  16 0c c9 2b 31 3a 6b 25  |0:k%=0.....+1:k%|
000004c0  3d 31 0d 00 17 0b cb 3a  c8 8e 66 25 ca 0d 00 18  |=1.....:..f%....|
000004d0  0f c9 2d 31 3a 6b 25 3d  6b 25 84 38 0d 00 19 0f  |..-1:k%=k%.8....|
000004e0  c9 2b 31 3a 6b 25 3d 6b  25 84 34 0d 00 1a 12 cb  |.+1:k%=k%.4.....|
000004f0  3a 5a 25 21 4e 79 25 3d  6b 25 3a f2 56 0d 00 1b  |:Z%!Ny%=k%:.V...|
00000500  08 cc 3a f2 68 0d 00 1c  05 cd 0d 00 1d 0c cc 3a  |..:.h..........:|
00000510  e7 45 25 80 31 8c 0d 00  1e 09 f2 50 3a f2 75 0d  |.E%.1......P:.u.|
00000520  00 1f 05 cd 0d 00 20 05  cd 0d 00 21 0d c9 6f 3a  |...... ....!..o:|
00000530  e7 45 25 80 31 8c 0d 00  22 06 f2 61 0d 00 23 05  |.E%.1..."..a..#.|
00000540  cd 0d 00 24 08 7f 3a ef  37 0d 00 25 07 cb 3a e1  |...$..:.7..%..:.|
00000550  0d 00 26 20 dd f2 60 5f  28 70 25 2c 49 25 29 3a  |..& ..`_(p%,I%):|
00000560  f2 50 3a c8 8e a4 4c 79  28 bd 28 70 25 29 29 ca  |.P:...Ly(.(p%)).|
00000570  0d 00 27 31 c9 22 31 22  2c 22 32 22 2c 22 33 22  |..'1."1","2","3"|
00000580  2c 22 34 22 2c 22 35 22  2c 22 36 22 2c 22 37 22  |,"4","5","6","7"|
00000590  2c 22 38 22 2c 22 39 22  3a c8 8e 5a 25 21 71 25  |,"8","9":..Z%!q%|
000005a0  ca 0d 00 28 49 c9 5f 2c  57 79 3a ea 51 25 2c 58  |...(I._,Wy:.Q%,X|
000005b0  25 2c 6a 25 2c 63 25 2c  66 25 3a 63 25 3d 28 28  |%,j%,c%,f%:c%=((|
000005c0  70 25 2d 97 28 22 31 22  29 29 83 33 29 2d 31 3a  |p%-.("1")).3)-1:|
000005d0  66 25 3d 28 28 70 25 2d  97 28 22 31 22 29 29 81  |f%=((p%-.("1")).|
000005e0  33 29 2d 31 3a c8 8e 63  25 ca 0d 00 29 10 c9 2d  |3)-1:..c%...)..-|
000005f0  31 3a 5a 25 21 4e 79 25  3d 32 0d 00 2a 0f c9 30  |1:Z%!Ny%=2..*..0|
00000600  3a 5a 25 21 4e 79 25 3d  30 0d 00 2b 10 c9 2b 31  |:Z%!Ny%=0..+..+1|
00000610  3a 5a 25 21 4e 79 25 3d  31 0d 00 2c 0b cb 3a c8  |:Z%!Ny%=1..,..:.|
00000620  8e 66 25 ca 0d 00 2d 11  c9 2d 31 3a 5a 25 21 4e  |.f%...-..-1:Z%!N|
00000630  79 25 2b 3d 34 0d 00 2e  11 c9 2b 31 3a 5a 25 21  |y%+=4.....+1:Z%!|
00000640  4e 79 25 2b 3d 38 0d 00  2f 4c cb 3a 51 25 3d 5a  |Ny%+=8../L.:Q%=Z|
00000650  25 21 74 25 2b 63 25 3a  58 25 3d 5a 25 21 41 79  |%!t%+c%:X%=Z%!Ay|
00000660  25 2d 66 25 3a 6a 25 3d  28 51 25 3e 3d 30 29 80  |%-f%:j%=(Q%>=0).|
00000670  28 51 25 3c 5a 25 21 77  25 29 3a e7 6a 25 80 28  |(Q%<Z%!w%):.j%.(|
00000680  58 25 3e 3d 30 29 80 28  58 25 3c 5a 25 21 78 25  |X%>=0).(X%<Z%!x%|
00000690  29 8c 0d 00 30 06 f2 56  0d 00 31 05 cd 0d 00 32  |)...0..V..1....2|
000006a0  08 7f 3a ef 37 0d 00 33  05 cb 0d 00 34 10 c9 22  |..:.7..3....4.."|
000006b0  41 22 3a f2 49 79 3a f2  42 79 0d 00 35 0b c9 22  |A":.Iy:.By..5.."|
000006c0  43 22 3a f2 4b 0d 00 36  0c c9 22 44 22 3a f2 6d  |C":.K..6.."D":.m|
000006d0  79 0d 00 37 10 c9 22 47  22 3a f2 63 79 3a f2 42  |y..7.."G":.cy:.B|
000006e0  79 0d 00 38 0b c9 22 48  22 3a f2 64 0d 00 39 0c  |y..8.."H":.d..9.|
000006f0  c9 22 4c 22 3a f2 4b 79  0d 00 3a 0b c9 22 53 22  |."L":.Ky..:.."S"|
00000700  3a f2 68 0d 00 3b 0b c9  22 54 22 3a f2 75 0d 00  |:.h..;.."T":.u..|
00000710  3c 0b c9 22 20 22 3a f2  61 0d 00 3d 0b 7f 3a c8  |<.." ":.a..=..:.|
00000720  8e 70 25 ca 0d 00 3e 0a  c9 33 3a f2 79 79 0d 00  |.p%...>..3:.yy..|
00000730  3f 0a c9 38 3a f2 74 79  0d 00 40 0b c9 31 33 3a  |?..8:.ty..@..13:|
00000740  f2 5a 5f 0d 00 41 0b c9  31 36 3a f2 45 79 0d 00  |.Z_..A..16:.Ey..|
00000750  42 0b c9 31 39 3a f2 72  79 0d 00 43 0b c9 32 30  |B..19:.ry..C..20|
00000760  3a f2 41 5f 0d 00 44 11  7f 3a c8 99 26 34 30 30  |:.A_..D..:..&400|
00000770  64 63 2c 70 25 0d 00 45  05 cb 0d 00 46 07 cb 3a  |dc,p%..E....F..:|
00000780  e1 0d 00 47 28 dd f2 49  79 3a 72 4a 25 3d 28 5a  |...G(..Iy:rJ%=(Z|
00000790  25 21 75 4a 25 3d 30 29  3a 5a 25 21 75 4a 25 3d  |%!uJ%=0):Z%!uJ%=|
000007a0  72 4a 25 3a d6 55 5f 3a  e1 0d 00 48 11 dd f2 63  |rJ%:.U_:...H...c|
000007b0  79 3a e7 5a 25 21 5f 79  25 8c 0d 00 49 09 69 79  |y:.Z%!_y%...I.iy|
000007c0  25 3d 30 0d 00 4a 0b cc  3a 69 79 25 3d 31 0d 00  |%=0..J..:iy%=1..|
000007d0  4b 19 cd 3a f2 4a 79 3a  5a 25 21 5f 79 25 3d 69  |K..:.Jy:Z%!_y%=i|
000007e0  79 25 3a f2 72 3a e1 0d  00 4c 11 dd f2 4a 79 3a  |y%:.r:...L...Jy:|
000007f0  e7 5a 25 21 5f 79 25 8c  0d 00 4d 0f f2 72 3a 5a  |.Z%!_y%...M..r:Z|
00000800  25 21 5f 79 25 3d 30 0d  00 4e 07 cd 3a e1 0d 00  |%!_y%=0..N..:...|
00000810  4f 0d dd f2 72 3a d6 5a  69 3a e1 0d 00 50 11 dd  |O...r:.Zi:...P..|
00000820  f2 4b 79 3a c8 8e 5a 25  21 71 25 ca 0d 00 51 1e  |.Ky:..Z%!q%...Q.|
00000830  c9 5f 2c 57 79 3a 5a 25  21 4b 75 25 3d b9 3a 5a  |._,Wy:Z%!Ku%=.:Z|
00000840  25 21 4e 79 25 3d 30 3a  f2 56 0d 00 52 08 7f 3a  |%!Ny%=0:.V..R..:|
00000850  ef 37 0d 00 53 07 cb 3a  e1 0d 00 54 11 dd f2 5a  |.7..S..:...T...Z|
00000860  5f 3a c8 8e 5a 25 21 71  25 ca 0d 00 55 0a c9 66  |_:..Z%!q%...U..f|
00000870  79 3a ef 37 0d 00 56 1f  7f 3a 41 75 25 3d 28 5a  |y:.7..V..:Au%=(Z|
00000880  25 21 54 5f 25 3d 30 29  3a 5a 25 21 54 5f 25 3d  |%!T_%=0):Z%!T_%=|
00000890  41 75 25 0d 00 57 07 cb  3a e1 0d 00 58 10 dd f2  |Au%..W..:...X...|
000008a0  75 3a c8 8e 5a 25 21 71  25 ca 0d 00 59 10 c9 5f  |u:..Z%!q%...Y.._|
000008b0  2c 57 79 3a f2 6c 3a f2  76 79 0d 00 5a 08 7f 3a  |,Wy:.l:.vy..Z..:|
000008c0  ef 37 0d 00 5b 07 cb 3a  e1 0d 00 5c a5 dd f2 76  |.7..[..:...\...v|
000008d0  79 3a ea 51 25 2c 58 25  2c 43 61 25 3a f2 49 3a  |y:.Q%,X%,Ca%:.I:|
000008e0  f2 67 3a f5 3a 51 25 3d  b3 28 5a 25 21 77 25 29  |.g:.:Q%=.(Z%!w%)|
000008f0  2d 31 3a 58 25 3d b3 28  5a 25 21 78 25 29 2d 31  |-1:X%=.(Z%!x%)-1|
00000900  3a 43 61 25 3d 28 51 25  3c 3e 28 5a 25 21 74 25  |:Ca%=(Q%<>(Z%!t%|
00000910  29 29 80 28 58 25 3c 3e  28 5a 25 21 41 79 25 29  |)).(X%<>(Z%!Ay%)|
00000920  29 3a fd 43 61 25 80 28  3f a4 4c 28 51 25 2c 58  |):.Ca%.(?.L(Q%,X|
00000930  25 29 3d 30 29 80 28 3f  a4 4b 28 51 25 2c 58 25  |%)=0).(?.K(Q%,X%|
00000940  29 3d 30 29 3a 5a 25 21  74 25 3d 51 25 3a 5a 25  |)=0):Z%!t%=Q%:Z%|
00000950  21 41 79 25 3d 58 25 3a  5a 25 21 71 25 3d 52 5f  |!Ay%=X%:Z%!q%=R_|
00000960  3a f2 77 28 51 25 2c 58  25 2c 30 29 3a e1 0d 00  |:.w(Q%,X%,0):...|
00000970  5d 1d dd f2 63 5f 3a f2  67 3a 5a 25 21 4e 79 25  |]...c_:.g:Z%!Ny%|
00000980  3d 30 3a e7 5a 25 21 60  5f 25 8c 0d 00 5e 13 f2  |=0:.Z%!`_%...^..|
00000990  44 28 22 43 65 6e 74 72  65 22 2c 5a 25 29 0d 00  |D("Centre",Z%)..|
000009a0  5f 0e cd 3a e7 5a 25 21  4c 5f 25 8c 0d 00 60 16  |_..:.Z%!L_%...`.|
000009b0  5a 25 21 56 75 25 3d 47  4a 3a e7 5a 25 21 54 5f  |Z%!Vu%=GJ:.Z%!T_|
000009c0  25 8c 0d 00 61 06 f2 56  0d 00 62 05 cd 0d 00 63  |%...a..V..b....c|
000009d0  08 cc 3a f2 56 0d 00 64  07 cd 3a e1 0d 00 65 10  |..:.V..d..:...e.|
000009e0  dd f2 68 3a c8 8e 5a 25  21 71 25 ca 0d 00 66 14  |..h:..Z%!q%...f.|
000009f0  c9 5f 2c 57 79 3a e7 5a  25 21 56 5f 25 3e 30 8c  |._,Wy:.Z%!V_%>0.|
00000a00  0d 00 67 0a f2 6c 3a f2  4f 79 0d 00 68 05 cd 0d  |..g..l:.Oy..h...|
00000a10  00 69 08 7f 3a ef 37 0d  00 6a 07 cb 3a e1 0d 00  |.i..:.7..j..:...|
00000a20  6b 29 dd f2 4f 79 3a f2  49 3a 5a 25 21 71 25 3d  |k)..Oy:.I:Z%!q%=|
00000a30  5f 4a 3a f2 77 28 5a 25  21 74 25 2c 5a 25 21 41  |_J:.w(Z%!t%,Z%!A|
00000a40  79 25 2c 31 29 3a e1 0d  00 6c 77 dd f2 68 4a 3a  |y%,1):...lw..hJ:|
00000a50  ea 63 25 2c 66 25 2c 51  25 2c 58 25 2c 4d 25 2c  |.c%,f%,Q%,X%,M%,|
00000a60  4e 25 2c 45 25 3a 5a 25  21 56 5f 25 2d 3d 31 3a  |N%,E%:Z%!V_%-=1:|
00000a70  f2 6a 5f 3a 51 25 3d 5a  25 21 74 25 3a 58 25 3d  |.j_:Q%=Z%!t%:X%=|
00000a80  5a 25 21 41 79 25 3a 4d  25 3d 5a 25 21 77 25 3a  |Z%!Ay%:M%=Z%!w%:|
00000a90  4e 25 3d 5a 25 21 78 25  3a e3 66 25 3d 2d 31 b8  |N%=Z%!x%:.f%=-1.|
00000aa0  2b 31 3a e7 28 28 58 25  2b 66 25 29 3e 3d 30 29  |+1:.((X%+f%)>=0)|
00000ab0  80 28 28 58 25 2b 66 25  29 3c 4e 25 29 8c 0d 00  |.((X%+f%)<N%)...|
00000ac0  6d 39 45 25 3d a4 4c 28  51 25 2c 58 25 2b 66 25  |m9E%=.L(Q%,X%+f%|
00000ad0  29 3a e3 63 25 3d 2d 31  b8 2b 31 3a e7 28 28 51  |):.c%=-1.+1:.((Q|
00000ae0  25 2b 63 25 29 3e 3d 30  29 80 28 28 51 25 2b 63  |%+c%)>=0).((Q%+c|
00000af0  25 29 3c 4d 25 29 8c 0d  00 6e 10 e7 28 45 25 3f  |%)<M%)...n..(E%?|
00000b00  63 25 29 3c 3e 30 8c 0d  00 6f 14 f2 42 4a 28 51  |c%)<>0...o..BJ(Q|
00000b10  25 2b 63 25 2c 58 25 2b  66 25 29 0d 00 70 05 cd  |%+c%,X%+f%)..p..|
00000b20  0d 00 71 09 cd 3a ed 63  25 0d 00 72 1b cd 3a ed  |..q..:.c%..r..:.|
00000b30  66 25 3a 5a 25 21 4e 79  25 3d 30 3a e7 5a 25 21  |f%:Z%!Ny%=0:.Z%!|
00000b40  4c 5f 25 8c 0d 00 73 0c  e7 5a 25 21 54 5f 25 8c  |L_%...s..Z%!T_%.|
00000b50  0d 00 74 06 f2 56 0d 00  75 05 cd 0d 00 76 08 cc  |..t..V..u....v..|
00000b60  3a f2 56 0d 00 77 07 cd  3a e1 0d 00 78 0c dd f2  |:.V..w..:...x...|
00000b70  4b 3a e7 a4 69 8c 0d 00  79 23 f2 48 28 22 43 65  |K:..i...y#.H("Ce|
00000b80  6e 74 72 65 22 2c 5a 25  29 3a f2 44 28 22 43 65  |ntre",Z%):.D("Ce|
00000b90  6e 74 72 65 22 2c 5a 25  29 0d 00 7a 07 cd 3a e1  |ntre",Z%)..z..:.|
00000ba0  0d 00 7b 24 dd a4 5f 4e  75 6c 6c 5f 52 65 61 73  |..{$.._Null_Reas|
00000bb0  6f 6e 5f 43 65 6e 74 72  65 28 5a 25 29 3a 3d ac  |on_Centre(Z%):=.|
00000bc0  28 a4 69 29 0d 00 7c fb  dd a4 69 3a ea 55 25 2c  |(.i)..|...i:.U%,|
00000bd0  4d 25 2c 4e 25 2c 51 25  2c 58 25 2c 59 4a 25 2c  |M%,N%,Q%,X%,YJ%,|
00000be0  4f 4a 25 2c 54 79 25 2c  49 79 25 2c 61 6c 25 2c  |OJ%,Ty%,Iy%,al%,|
00000bf0  5f 25 3a 55 25 3d a4 4d  28 36 34 29 3a 21 55 25  |_%:U%=.M(64):!U%|
00000c00  3d 5a 25 21 7a 25 3a c8  99 26 34 30 30 63 62 2c  |=Z%!z%:..&400cb,|
00000c10  2c 55 25 3a 4d 25 3d 28  55 25 21 31 32 29 2d 28  |,U%:M%=(U%!12)-(|
00000c20  55 25 21 34 29 3a 4e 25  3d 28 55 25 21 31 36 29  |U%!4):N%=(U%!16)|
00000c30  2d 28 55 25 21 38 29 2d  28 45 5f 25 2b 34 29 3a  |-(U%!8)-(E_%+4):|
00000c40  59 4a 25 3d 5a 25 21 43  79 25 3a 4f 4a 25 3d 5a  |YJ%=Z%!Cy%:OJ%=Z|
00000c50  25 21 76 79 25 3a 51 25  3d 5a 25 21 4a 4a 25 2b  |%!vy%:Q%=Z%!JJ%+|
00000c60  28 59 4a 25 81 32 29 3a  58 25 3d 2d 5a 25 21 75  |(YJ%.2):X%=-Z%!u|
00000c70  6c 25 2b 28 4f 4a 25 81  32 29 3a 54 79 25 3d a4  |l%+(OJ%.2):Ty%=.|
00000c80  53 28 51 25 2d 28 4d 25  81 32 29 2c 30 29 3a 54  |S(Q%-(M%.2),0):T|
00000c90  79 25 3d a4 50 28 54 79  25 2c 28 28 5a 25 21 77  |y%=.P(Ty%,((Z%!w|
00000ca0  25 2a 59 4a 25 29 2d 4d  25 29 29 3a 49 79 25 3d  |%*YJ%)-M%)):Iy%=|
00000cb0  a4 50 28 28 4e 25 81 32  29 2b 58 25 2c 30 29 0d  |.P((N%.2)+X%,0).|
00000cc0  00 7d 9d 49 79 25 3d a4  53 28 49 79 25 2c 2d 28  |.}.Iy%=.S(Iy%,-(|
00000cd0  28 5a 25 21 78 25 2a 4f  4a 25 29 2d 4e 25 29 29  |(Z%!x%*OJ%)-N%))|
00000ce0  3a 51 25 3d ac 28 28 31  3c 3c 53 79 25 29 2d 31  |:Q%=.((1<<Sy%)-1|
00000cf0  29 3a 58 25 3d ac 28 28  31 3c 3c 6d 25 29 2d 31  |):X%=.((1<<m%)-1|
00000d00  29 3a 54 79 25 3d 28 54  79 25 80 51 25 29 2d 28  |):Ty%=(Ty%.Q%)-(|
00000d10  55 25 21 32 30 29 3a 49  79 25 3d 28 49 79 25 80  |U%!20):Iy%=(Iy%.|
00000d20  58 25 29 2d 28 55 25 21  32 34 29 3a 61 6c 25 3d  |X%)-(U%!24):al%=|
00000d30  28 28 94 28 54 79 25 29  3e 3d 28 31 3c 3c 53 79  |((.(Ty%)>=(1<<Sy|
00000d40  25 29 29 84 28 94 28 49  79 25 29 3e 3d 28 31 3c  |%)).(.(Iy%)>=(1<|
00000d50  3c 6d 25 29 29 29 3a e7  61 6c 25 8c 0d 00 7e 69  |<m%))):.al%...~i|
00000d60  5f 25 3d 5a 25 21 66 75  25 3a 55 25 21 32 34 2b  |_%=Z%!fu%:U%!24+|
00000d70  3d b4 28 49 79 25 29 2a  a4 53 28 28 94 28 49 79  |=.(Iy%)*.S((.(Iy|
00000d80  25 29 81 5f 25 29 80 58  25 2c 31 3c 3c 6d 25 29  |%)._%).X%,1<<m%)|
00000d90  3a 55 25 21 32 30 2b 3d  b4 28 54 79 25 29 2a a4  |:U%!20+=.(Ty%)*.|
00000da0  53 28 28 94 28 54 79 25  29 81 5f 25 29 80 51 25  |S((.(Ty%)._%).Q%|
00000db0  2c 31 3c 3c 53 79 25 29  3a c8 99 26 34 30 30 63  |,1<<Sy%):..&400c|
00000dc0  35 2c 2c 55 25 0d 00 7f  14 cd 3a f2 43 28 55 25  |5,,U%.....:.C(U%|
00000dd0  2c 36 34 29 3a 3d 61 6c  25 0d 00 80 2b dd f2 79  |,64):=al%...+..y|
00000de0  79 3a 78 4a 25 3d 28 5a  25 21 4e 4a 25 3d 30 29  |y:xJ%=(Z%!NJ%=0)|
00000df0  3a 5a 25 21 4e 4a 25 3d  78 4a 25 3a e7 5a 25 21  |:Z%!NJ%=xJ%:.Z%!|
00000e00  4e 4a 25 8c 0d 00 81 06  f2 4b 0d 00 82 15 cc 3a  |NJ%......K.....:|
00000e10  f2 48 28 22 43 65 6e 74  72 65 22 2c 5a 25 29 0d  |.H("Centre",Z%).|
00000e20  00 83 07 cd 3a e1 0d 00  84 2b dd f2 72 79 3a 6a  |....:....+..ry:j|
00000e30  4a 25 3d 28 5a 25 21 44  4a 25 3d 30 29 3a 5a 25  |J%=(Z%!DJ%=0):Z%|
00000e40  21 44 4a 25 3d 6a 4a 25  3a e7 5a 25 21 44 4a 25  |!DJ%=jJ%:.Z%!DJ%|
00000e50  8c 0d 00 85 06 f2 4b 0d  00 86 15 cc 3a f2 48 28  |......K.....:.H(|
00000e60  22 43 65 6e 74 72 65 22  2c 5a 25 29 0d 00 87 07  |"Centre",Z%)....|
00000e70  cd 3a e1 0d 00 88 2b dd  f2 41 5f 3a 65 4a 25 3d  |.:....+..A_:eJ%=|
00000e80  28 5a 25 21 60 5f 25 3d  30 29 3a 5a 25 21 60 5f  |(Z%!`_%=0):Z%!`_|
00000e90  25 3d 65 4a 25 3a e7 5a  25 21 60 5f 25 8c 0d 00  |%=eJ%:.Z%!`_%...|
00000ea0  89 06 f2 4b 0d 00 8a 15  cc 3a f2 48 28 22 43 65  |...K.....:.H("Ce|
00000eb0  6e 74 72 65 22 2c 5a 25  29 0d 00 8b 07 cd 3a e1  |ntre",Z%).....:.|
00000ec0  0d 00 8c 2b dd f2 45 79  3a 70 4a 25 3d 28 5a 25  |...+..Ey:pJ%=(Z%|
00000ed0  21 47 4a 25 3d 30 29 3a  5a 25 21 47 4a 25 3d 70  |!GJ%=0):Z%!GJ%=p|
00000ee0  4a 25 3a e7 5a 25 21 47  4a 25 8c 0d 00 8d 07 f2  |J%:.Z%!GJ%......|
00000ef0  64 79 0d 00 8e 07 cd 3a  e1 0d 00 8f 0e dd f2 64  |dy.....:.......d|
00000f00  79 3a e7 a4 61 79 8c 0d  00 90 23 f2 48 28 22 43  |y:..ay....#.H("C|
00000f10  65 6e 74 72 65 22 2c 5a  25 29 3a f2 44 28 22 43  |entre",Z%):.D("C|
00000f20  65 6e 74 72 65 22 2c 5a  25 29 0d 00 91 07 cd 3a  |entre",Z%).....:|
00000f30  e1 0d 00 92 e2 dd a4 61  79 3a ea 55 25 2c 51 25  |.......ay:.U%,Q%|
00000f40  2c 58 25 2c 4d 25 2c 4e  25 2c 59 4a 25 2c 4f 4a  |,X%,M%,N%,YJ%,OJ|
00000f50  25 3a 55 25 3d a4 4d 28  36 34 29 3a 21 55 25 3d  |%:U%=.M(64):!U%=|
00000f60  5a 25 21 7a 25 3a c8 99  26 34 30 30 63 62 2c 2c  |Z%!z%:..&400cb,,|
00000f70  55 25 3a 4d 25 3d 28 55  25 21 31 32 29 2d 28 55  |U%:M%=(U%!12)-(U|
00000f80  25 21 34 29 3a 4e 25 3d  28 55 25 21 31 36 29 2d  |%!4):N%=(U%!16)-|
00000f90  28 55 25 21 38 29 2d 28  45 5f 25 2b 34 29 3a 51  |(U%!8)-(E_%+4):Q|
00000fa0  25 3d 55 25 21 34 2d 55  25 21 32 30 3a 58 25 3d  |%=U%!4-U%!20:X%=|
00000fb0  55 25 21 31 36 2d 55 25  21 32 34 2d 45 5f 25 3a  |U%!16-U%!24-E_%:|
00000fc0  59 4a 25 3d 5a 25 21 43  79 25 3a 4f 4a 25 3d 5a  |YJ%=Z%!Cy%:OJ%=Z|
00000fd0  25 21 76 79 25 3a 51 25  2b 3d 5a 25 21 4a 4a 25  |%!vy%:Q%+=Z%!JJ%|
00000fe0  2b 28 59 4a 25 81 32 29  3a 58 25 2d 3d 5a 25 21  |+(YJ%.2):X%-=Z%!|
00000ff0  75 6c 25 2b 28 4f 4a 25  81 32 29 3a 51 25 3d a4  |ul%+(OJ%.2):Q%=.|
00001000  50 28 51 25 2d 55 25 21  34 2c 55 25 21 31 32 2d  |P(Q%-U%!4,U%!12-|
00001010  51 25 29 0d 00 93 40 58  25 3d a4 50 28 58 25 2d  |Q%)...@X%=.P(X%-|
00001020  55 25 21 38 2c 55 25 21  31 36 2d 58 25 2d 45 5f  |U%!8,U%!16-X%-E_|
00001030  25 29 3a f2 43 28 55 25  2c 36 34 29 3a 3d a4 70  |%):.C(U%,64):=.p|
00001040  28 51 25 2c 59 4a 25 29  84 a4 70 28 58 25 2c 4f  |(Q%,YJ%)..p(X%,O|
00001050  4a 25 29 0d 00 94 1e dd  a4 70 28 51 25 2c 4d 25  |J%)......p(Q%,M%|
00001060  29 3a 3d 28 51 25 3c 3d  28 4d 25 2a 32 2e 35 29  |):=(Q%<=(M%*2.5)|
00001070  29 0d 00 95 13 dd f2 6a  5f 3a e7 28 5a 25 21 56  |)......j_:.(Z%!V|
00001080  5f 25 29 8c 0d 00 96 17  f2 5a 28 5a 25 21 6f 25  |_%)......Z(Z%!o%|
00001090  2c 4a 5f 2c 5a 25 21 56  5f 25 29 0d 00 97 1d cc  |,J_,Z%!V_%).....|
000010a0  3a f2 5f 28 5a 25 21 6f  25 2c 4a 5f 2c a4 48 28  |:._(Z%!o%,J_,.H(|
000010b0  22 4e 6f 6e 65 22 29 29  0d 00 98 07 cd 3a e1 0d  |"None")).....:..|
000010c0  00 99 1e dd f2 55 79 3a  e7 28 5a 25 21 75 4a 25  |.....Uy:.(Z%!uJ%|
000010d0  29 80 28 5a 25 21 68 5f  25 3d a3 29 8c 0d 00 9a  |).(Z%!h_%=.)....|
000010e0  07 d6 55 5f 0d 00 9b 07  cd 3a e1 0d 00 9c 10 dd  |..U_.....:......|
000010f0  f2 6c 3a e7 5a 25 21 68  5f 25 8c 0d 00 9d 07 d6  |.l:.Z%!h_%......|
00001100  55 5f 0d 00 9e 07 cd 3a  e1 0d 00 9f 0c dd f2 56  |U_.....:.......V|
00001110  3a e7 a4 6b 8c 0d 00 a0  1c f2 6c 3a 5a 25 21 71  |:..k......l:Z%!q|
00001120  25 3d 66 79 3a d6 49 5f  3a e7 5a 25 21 54 5f 25  |%=fy:.I_:.Z%!T_%|
00001130  8c 0d 00 a1 11 f2 44 28  22 4d 6f 76 65 22 2c 5a  |......D("Move",Z|
00001140  25 29 0d 00 a2 1f cc 3a  f5 3a fd a4 5f 4e 75 6c  |%).....:.:.._Nul|
00001150  6c 5f 52 65 61 73 6f 6e  5f 4d 6f 76 65 28 5a 25  |l_Reason_Move(Z%|
00001160  29 0d 00 a3 05 cd 0d 00  a4 07 cd 3a e1 0d 00 a5  |)..........:....|
00001170  49 dd a4 6b 3a ea 46 25  2c 51 25 2c 58 25 2c 5a  |I..k:.F%,Q%,X%,Z|
00001180  24 3a 51 25 3d 5a 25 21  74 25 3a 58 25 3d 5a 25  |$:Q%=Z%!t%:X%=Z%|
00001190  21 41 79 25 3a e7 28 3f  a4 4c 28 51 25 2c 58 25  |!Ay%:.(?.L(Q%,X%|
000011a0  29 3c 3e 30 29 84 28 3f  a4 4b 28 51 25 2c 58 25  |)<>0).(?.K(Q%,X%|
000011b0  29 3c 3e 30 29 8c 0d 00  a6 25 5a 25 21 4b 75 25  |)<>0)....%Z%!Ku%|
000011c0  3d a3 3a 5a 25 21 71 25  3d 6f 3a f2 7a 28 32 29  |=.:Z%!q%=o:.z(2)|
000011d0  3a e7 5a 25 21 4e 6c 25  3d a3 8c 0d 00 a7 2a 5a  |:.Z%!Nl%=.....*Z|
000011e0  24 3d a4 4e 28 5a 25 2b  57 75 25 29 3a f2 78 79  |$=.N(Z%+Wu%):.xy|
000011f0  28 5a 25 2c 5a 24 2c 5a  25 21 43 5f 25 2c 5a 25  |(Z%,Z$,Z%!C_%,Z%|
00001200  21 5f 4a 25 29 0d 00 a8  2c cd 3a 46 25 3d a3 3a  |!_J%)...,.:F%=.:|
00001210  5a 25 21 71 25 3d 6f 3a  3f a4 4c 28 51 25 2c 58  |Z%!q%=o:?.L(Q%,X|
00001220  25 29 3d 30 3a 3f a4 4b  28 51 25 2c 58 25 29 3d  |%)=0:?.K(Q%,X%)=|
00001230  30 0d 00 a9 26 cc 3a 46  25 3d 5a 25 21 4a 79 25  |0...&.:F%=Z%!Jy%|
00001240  3a 46 25 3d 28 46 25 21  75 25 3c 3e 2d 31 29 3a  |:F%=(F%!u%<>-1):|
00001250  e7 ac 28 46 25 29 8c 0d  00 aa 33 f2 65 28 5a 25  |..(F%)....3.e(Z%|
00001260  29 3a d6 58 75 3a 5a 25  21 71 25 3d 48 79 3a f2  |):.Xu:Z%!q%=Hy:.|
00001270  44 28 22 48 69 67 68 6c  69 67 68 74 5f 41 74 5f  |D("Highlight_At_|
00001280  53 74 61 72 74 22 2c 5a  25 29 0d 00 ab 11 cc 3a  |Start",Z%).....:|
00001290  e7 5a 25 21 71 25 3c 3e  48 79 8c 0d 00 ac 0b 5a  |.Z%!q%<>Hy.....Z|
000012a0  25 21 71 25 3d 5f 0d 00  ad 05 cd 0d 00 ae 05 cd  |%!q%=_..........|
000012b0  0d 00 af 09 cd 3a 3d 46  25 0d 00 b0 30 dd a4 5f  |.....:=F%...0.._|
000012c0  4e 75 6c 6c 5f 52 65 61  73 6f 6e 5f 4d 6f 76 65  |Null_Reason_Move|
000012d0  28 41 25 29 3a f2 47 28  41 25 29 3a 41 25 3d ba  |(A%):.G(A%):A%=.|
000012e0  28 5a 75 29 3a e7 41 25  8c 0d 00 b1 08 e7 a4 6b  |(Zu):.A%.......k|
000012f0  8c 0d 00 b2 08 c8 8e b9  ca 0d 00 b3 14 c9 5a 25  |..............Z%|
00001300  21 4b 75 25 3a 41 25 3d  a3 3a d6 49 5f 0d 00 b4  |!Ku%:A%=.:.I_...|
00001310  24 c9 5a 25 21 4c 5f 25  3a f2 4c 79 3a 41 25 3d  |$.Z%!L_%:.Ly:A%=|
00001320  28 5a 25 21 71 25 3c 3e  5f 29 3a e7 41 25 3d 30  |(Z%!q%<>_):.A%=0|
00001330  8c 0d 00 b5 07 d6 49 5f  0d 00 b6 05 cd 0d 00 b7  |......I_........|
00001340  12 7f 3a f2 55 79 3a e7  5a 25 21 4e 4a 25 8c 0d  |..:.Uy:.Z%!NJ%..|
00001350  00 b8 06 f2 4b 0d 00 b9  0e cc 3a e7 5a 25 21 47  |....K.....:.Z%!G|
00001360  4a 25 8c 0d 00 ba 07 f2  64 79 0d 00 bb 05 cd 0d  |J%......dy......|
00001370  00 bc 05 cd 0d 00 bd 05  cb 0d 00 be 05 cd 0d 00  |................|
00001380  bf 09 cd 3a 3d 41 25 0d  00 c0 bb dd f2 42 4a 28  |...:=A%......BJ(|
00001390  51 25 2c 58 25 29 3a ea  46 25 2c 46 79 25 2c 4a  |Q%,X%):.F%,Fy%,J|
000013a0  25 3a f2 6f 79 28 5a 25  21 46 75 25 2c 51 25 2c  |%:.oy(Z%!Fu%,Q%,|
000013b0  58 25 29 3a 46 25 3d 5a  25 21 4a 79 25 3a c8 95  |X%):F%=Z%!Jy%:..|
000013c0  28 51 25 3c 3e 46 25 21  6d 79 25 29 84 28 58 25  |(Q%<>F%!my%).(X%|
000013d0  3c 3e 46 25 21 67 6c 25  29 3a 46 25 2b 3d 6e 25  |<>F%!gl%):F%+=n%|
000013e0  3a ce 3a 46 79 25 3d 46  25 2b 6e 25 3a c8 95 46  |:.:Fy%=F%+n%:..F|
000013f0  79 25 21 75 25 3c 3e 2d  31 3a 46 79 25 2b 3d 6e  |y%!u%<>-1:Fy%+=n|
00001400  25 3a ce 3a 46 79 25 2d  3d 6e 25 3a e3 4a 25 3d  |%:.:Fy%-=n%:.J%=|
00001410  30 b8 6e 25 2d 31 88 34  3a 46 25 21 4a 25 3d 46  |0.n%-1.4:F%!J%=F|
00001420  79 25 21 4a 25 3a ed 4a  25 3a 46 79 25 21 75 25  |y%!J%:.J%:Fy%!u%|
00001430  3d 2d 31 3a 3f a4 4c 28  51 25 2c 58 25 29 3d a3  |=-1:?.L(Q%,X%)=.|
00001440  3a e1 0d 00 c1 24 dd a4  4c 28 51 25 2c 58 25 29  |:....$..L(Q%,X%)|
00001450  3a 3d 5a 25 21 73 79 25  2b 28 5a 25 21 77 25 2a  |:=Z%!sy%+(Z%!w%*|
00001460  58 25 29 2b 51 25 0d 00  c2 24 dd a4 4b 28 51 25  |X%)+Q%...$..K(Q%|
00001470  2c 58 25 29 3a 3d 5a 25  21 63 79 25 2b 28 5a 25  |,X%):=Z%!cy%+(Z%|
00001480  21 77 25 2a 58 25 29 2b  51 25 0d 00 c3 18 dd f2  |!w%*X%)+Q%......|
00001490  6f 79 28 41 25 2c 42 25  2c 43 25 29 3a d6 51 6c  |oy(A%,B%,C%):.Ql|
000014a0  3a e1 0d 00 c4 22 dd f2  67 3a f2 6f 79 28 5a 25  |:...."..g:.oy(Z%|
000014b0  21 48 6c 25 2c 5a 25 21  74 25 2c 5a 25 21 41 79  |!Hl%,Z%!t%,Z%!Ay|
000014c0  25 29 3a e1 0d 00 c5 df  dd f2 58 5f 3a ea 55 25  |%):.......X_:.U%|
000014d0  3a 44 75 25 3d 31 31 3a  de 47 69 25 44 75 25 2b  |:Du%=11:.Gi%Du%+|
000014e0  31 3a de 4d 61 25 a9 20  28 42 24 29 2b 32 2b 31  |1:.Ma%. (B$)+2+1|
000014f0  3a 55 25 3d a4 4d 28 35  31 32 29 3a 55 25 21 30  |:U%=.M(512):U%!0|
00001500  3d 2d 31 3a 55 25 21 34  3d 30 3a 55 25 21 38 3d  |=-1:U%!4=0:U%!8=|
00001510  2d 31 36 3a 55 25 21 31  32 3d a4 53 28 36 38 2c  |-16:U%!12=.S(68,|
00001520  28 44 75 25 2d 31 29 2a  38 2a 32 29 3a 55 25 21  |(Du%-1)*8*2):U%!|
00001530  31 36 3d 36 38 2b 33 32  2d 31 36 3a 55 25 21 32  |16=68+32-16:U%!2|
00001540  30 3d 26 31 37 30 30 33  31 32 62 3a 55 25 21 32  |0=&1700312b:U%!2|
00001550  34 3d 47 69 25 3a 24 47  69 25 3d a4 48 28 22 49  |4=Gi%:$Gi%=.H("I|
00001560  42 30 22 29 3a 24 4d 61  25 3d 22 53 21 22 2b 42  |B0"):$Ma%="S!"+B|
00001570  24 3a 55 25 21 32 38 3d  4d 61 25 3a 55 25 21 33  |$:U%!28=Ma%:U%!3|
00001580  32 3d 44 75 25 3a c8 99  26 34 30 30 63 32 2c 2c  |2=Du%:..&400c2,,|
00001590  55 25 b8 5a 69 25 3a f2  43 28 55 25 2c 35 31 32  |U%.Zi%:.C(U%,512|
000015a0  29 3a e1 0d 00 c6 fa dd  f2 54 5f 3a 57 24 3d 76  |):.......T_:W$=v|
000015b0  24 3a 74 5f 25 3d 43 4a  3a 61 5f 25 3d 61 5f 3a  |$:t_%=CJ:a_%=a_:|
000015c0  6d 5f 25 3d 54 4a 3a 58  5f 25 3d 65 4a 3a 59 5f  |m_%=TJ:X_%=eJ:Y_|
000015d0  25 3d 78 5f 3a 66 5f 25  3d 78 4a 3a 65 5f 25 3d  |%=x_:f_%=xJ:e_%=|
000015e0  77 5f 3a 6f 79 25 3d 5f  5f 3a 6b 5f 25 3d 6f 5f  |w_:oy%=__:k_%=o_|
000015f0  3a 45 4a 25 3d 56 4a 3a  64 79 25 3d 63 69 3a 42  |:EJ%=VJ:dy%=ci:B|
00001600  5f 25 3d 47 75 3a 72 4a  25 3d 46 75 3a 69 79 25  |_%=Gu:rJ%=Fu:iy%|
00001610  3d 53 61 3a 6f 5f 25 3d  4b 6c 3a 5f 5f 25 3d 76  |=Sa:o_%=Kl:__%=v|
00001620  6c 3a 73 25 21 30 3d 53  75 3a 73 25 21 34 3d 72  |l:s%!0=Su:s%!4=r|
00001630  75 3a 73 25 21 38 3d 68  69 3a 73 25 21 31 32 3d  |u:s%!8=hi:s%!12=|
00001640  66 75 3a 49 4a 25 3d 66  5f 3a 54 4a 25 3d 52 4a  |fu:IJ%=f_:TJ%=RJ|
00001650  3a 74 4a 25 3d 6c 4a 3a  46 4a 25 3d 63 5f 3a 58  |:tJ%=lJ:FJ%=c_:X|
00001660  4a 25 3d 57 4a 3a 50 4a  25 3d 45 4a 3a 6c 6c 25  |J%=WJ:PJ%=EJ:ll%|
00001670  3d 4f 69 3a 41 75 25 3d  75 4a 3a 53 75 25 3d 64  |=Oi:Au%=uJ:Su%=d|
00001680  5f 3a 78 4a 25 3d 50 69  3a 6a 4a 25 3d 52 69 3a  |_:xJ%=Pi:jJ%=Ri:|
00001690  65 4a 25 3d 42 75 3a 5a  75 25 3d 58 6c 0d 00 c7  |eJ%=Bu:Zu%=Xl...|
000016a0  13 70 4a 25 3d 4c 6c 3a  61 4a 25 3d 6c 6c 3a e1  |.pJ%=Ll:aJ%=ll:.|
000016b0  0d 00 c8 3a dd f2 59 79  3a ea 4e 25 2c 47 24 2c  |...:..Yy:.N%,G$,|
000016c0  67 4a 25 3a f2 54 5f 3a  4e 25 3d 8e 28 22 3c 44  |gJ%:.T_:N%=.("<D|
000016d0  61 6c 65 6b 73 33 24 44  69 72 3e 2e 43 68 6f 69  |aleks3$Dir>.Choi|
000016e0  63 65 73 22 29 3a e7 4e  25 8c 0d 00 c9 13 ea 85  |ces"):.N%.......|
000016f0  3a ee 85 ea f7 85 3a d9  23 4e 25 3a e1 0d 00 ca  |:.....:.#N%:....|
00001700  47 e8 23 4e 25 2c 57 24  3a e8 23 4e 25 2c 72 4a  |G.#N%,W$:.#N%,rJ|
00001710  25 2c 69 79 25 2c 6f 5f  25 2c 5f 5f 25 3a e8 23  |%,iy%,o_%,__%:.#|
00001720  4e 25 2c 74 5f 25 2c 61  5f 25 2c 6d 5f 25 3a e8  |N%,t_%,a_%,m_%:.|
00001730  23 4e 25 2c 42 5f 25 3a  e7 42 5f 25 3e 62 8c 42  |#N%,B_%:.B_%>b.B|
00001740  5f 25 3d 31 0d 00 cb af  e8 23 4e 25 2c 58 5f 25  |_%=1.....#N%,X_%|
00001750  2c 59 5f 25 3a e8 23 4e  25 2c 64 79 25 3a e8 23  |,Y_%:.#N%,dy%:.#|
00001760  4e 25 2c 6f 79 25 2c 66  5f 25 2c 65 5f 25 3a e8  |N%,oy%,f_%,e_%:.|
00001770  23 4e 25 2c 6b 5f 25 2c  45 4a 25 3a e8 23 4e 25  |#N%,k_%,EJ%:.#N%|
00001780  2c 73 25 21 30 2c 73 25  21 34 2c 73 25 21 38 2c  |,s%!0,s%!4,s%!8,|
00001790  73 25 21 31 32 3a e8 23  4e 25 2c 49 4a 25 2c 54  |s%!12:.#N%,IJ%,T|
000017a0  4a 25 2c 74 4a 25 2c 5a  75 25 3a e8 23 4e 25 2c  |J%,tJ%,Zu%:.#N%,|
000017b0  46 4a 25 2c 58 4a 25 2c  50 4a 25 2c 6c 6c 25 3a  |FJ%,XJ%,PJ%,ll%:|
000017c0  e8 23 4e 25 2c 53 75 25  2c 78 4a 25 2c 41 75 25  |.#N%,Su%,xJ%,Au%|
000017d0  3a e8 23 4e 25 2c 6a 4a  25 2c 65 4a 25 3a 49 42  |:.#N%,jJ%,eJ%:IB|
000017e0  23 4e 25 2c 70 4a 25 2c  61 4a 25 3a f7 85 3a d9  |#N%,pJ%,aJ%:..:.|
000017f0  23 4e 25 0d 00 cc 07 cd  3a e1 0d 00 cd 2f dd f2  |#N%.....:..../..|
00001800  6f 5f 3a ea 4e 25 3a 4e  25 3d ae 28 22 3c 44 61  |o_:.N%:N%=.("<Da|
00001810  6c 65 6b 73 33 24 44 69  72 3e 2e 43 68 6f 69 63  |leks3$Dir>.Choic|
00001820  65 73 22 29 3a e7 4e 25  8c 0d 00 ce 14 ea 85 3a  |es"):.N%.......:|
00001830  ee 85 ea f7 85 3a d9 23  4e 25 3a f2 51 0d 00 cf  |.....:.#N%:.Q...|
00001840  e5 f1 23 4e 25 2c 57 24  3a f1 23 4e 25 2c 72 4a  |..#N%,W$:.#N%,rJ|
00001850  25 2c 69 79 25 2c 6f 5f  25 2c 5f 5f 25 3a f1 23  |%,iy%,o_%,__%:.#|
00001860  4e 25 2c 74 5f 25 2c 61  5f 25 2c 6d 5f 25 3a f1  |N%,t_%,a_%,m_%:.|
00001870  23 4e 25 2c 42 5f 25 3a  f1 23 4e 25 2c 58 5f 25  |#N%,B_%:.#N%,X_%|
00001880  2c 59 5f 25 3a f1 23 4e  25 2c 64 79 25 3a f1 23  |,Y_%:.#N%,dy%:.#|
00001890  4e 25 2c 6f 79 25 2c 66  5f 25 2c 65 5f 25 3a f1  |N%,oy%,f_%,e_%:.|
000018a0  23 4e 25 2c 6b 5f 25 2c  45 4a 25 3a f1 23 4e 25  |#N%,k_%,EJ%:.#N%|
000018b0  2c 73 25 21 30 2c 73 25  21 34 2c 73 25 21 38 2c  |,s%!0,s%!4,s%!8,|
000018c0  73 25 21 31 32 3a f1 23  4e 25 2c 49 4a 25 2c 54  |s%!12:.#N%,IJ%,T|
000018d0  4a 25 2c 74 4a 25 2c 5a  75 25 3a f1 23 4e 25 2c  |J%,tJ%,Zu%:.#N%,|
000018e0  46 4a 25 2c 58 4a 25 2c  50 4a 25 2c 6c 6c 25 3a  |FJ%,XJ%,PJ%,ll%:|
000018f0  f1 23 4e 25 2c 53 75 25  2c 78 4a 25 2c 41 75 25  |.#N%,Su%,xJ%,Au%|
00001900  3a f1 23 4e 25 2c 6a 4a  25 2c 65 4a 25 3a f1 23  |:.#N%,jJ%,eJ%:.#|
00001910  4e 25 2c 70 4a 25 2c 61  4a 25 3a f7 85 3a d9 23  |N%,pJ%,aJ%:..:.#|
00001920  4e 25 0d 00 d0 07 cd 3a  e1 0d 00 d1 11 dd f2 6d  |N%.....:.......m|
00001930  79 3a c8 8e 5a 25 21 71  25 ca 0d 00 d2 12 c9 5f  |y:..Z%!q%......_|
00001940  2c 57 79 3a e7 5a 25 21  4c 5f 25 8c 0d 00 d3 0c  |,Wy:.Z%!L_%.....|
00001950  5a 25 21 4c 5f 25 3d a3  0d 00 d4 1b cc 3a e7 a4  |Z%!L_%=......:..|
00001960  61 28 32 33 2c a4 48 28  22 44 65 6d 6f 22 29 29  |a(23,.H("Demo"))|
00001970  3d 31 8c 0d 00 d5 1f 5a  25 21 4e 6c 25 3d b9 3a  |=1.....Z%!Nl%=.:|
00001980  5a 25 21 4c 5f 25 3d b9  3a f2 50 3a f2 4c 79 3a  |Z%!L_%=.:.P:.Ly:|
00001990  f2 56 0d 00 d6 05 cd 0d  00 d7 05 cd 0d 00 d8 08  |.V..............|
000019a0  7f 3a ef 37 0d 00 d9 07  cb 3a e1 0d 00 da 12 dd  |.:.7.....:......|
000019b0  f2 4c 79 3a c8 8e 5a 25  21 56 75 25 ca 0d 00 db  |.Ly:..Z%!Vu%....|
000019c0  10 c9 5f 6c 3a f2 4e 79  28 a4 4d 79 29 0d 00 dc  |.._l:.Ny(.My)...|
000019d0  10 c9 47 4a 3a f2 4e 79  28 a4 42 79 29 0d 00 dd  |..GJ:.Ny(.By)...|
000019e0  11 7f 3a f2 4e 79 28 5a  25 21 56 75 25 29 0d 00  |..:.Ny(Z%!Vu%)..|
000019f0  de 07 cb 3a e1 0d 00 df  a1 dd a4 4d 79 3a ea 51  |...:.......My:.Q|
00001a00  25 2c 58 25 2c 4b 25 2c  46 25 3a 4b 25 3d 30 3a  |%,X%,K%,F%:K%=0:|
00001a10  46 25 3d 5a 25 21 4a 79  25 3a c8 95 46 25 21 75  |F%=Z%!Jy%:..F%!u|
00001a20  25 3c 3e 2d 31 3a 51 25  2b 3d 46 25 21 53 6e 25  |%<>-1:Q%+=F%!Sn%|
00001a30  3a 58 25 2b 3d 46 25 21  4d 6e 25 3a 4b 25 2b 3d  |:X%+=F%!Mn%:K%+=|
00001a40  31 3a 46 25 2b 3d 6e 25  3a ce 3a 51 25 3d 28 51  |1:F%+=n%:.:Q%=(Q|
00001a50  25 2f 4b 25 29 2b 30 2e  35 3a 58 25 3d 28 58 25  |%/K%)+0.5:X%=(X%|
00001a60  2f 4b 25 29 2b 30 2e 35  3a 51 25 3d b4 28 51 25  |/K%)+0.5:Q%=.(Q%|
00001a70  2d 5a 25 21 74 25 29 3a  58 25 3d b4 28 58 25 2d  |-Z%!t%):X%=.(X%-|
00001a80  5a 25 21 41 79 25 29 3a  3d 43 25 28 51 25 2b 31  |Z%!Ay%):=C%(Q%+1|
00001a90  2c 58 25 2b 31 29 0d 00  e0 93 dd a4 42 79 3a ea  |,X%+1)......By:.|
00001aa0  51 25 2c 58 25 2c 4b 25  2c 44 25 2c 46 25 2c 42  |Q%,X%,K%,D%,F%,B|
00001ab0  6c 25 2c 47 6c 25 3a 44  25 3d 5a 25 21 69 5f 25  |l%,Gl%:D%=Z%!i_%|
00001ac0  3a 51 25 3d 5a 25 21 74  25 3a 58 25 3d 5a 25 21  |:Q%=Z%!t%:X%=Z%!|
00001ad0  41 79 25 3a 4b 25 3d 26  37 66 66 66 66 66 66 66  |Ay%:K%=&7fffffff|
00001ae0  3a c8 95 21 44 25 3e 3d  30 3a 42 6c 25 3d 21 44  |:..!D%>=0:Bl%=!D|
00001af0  25 3a 47 6c 25 3d 44 25  21 34 3a 46 25 3d 28 51  |%:Gl%=D%!4:F%=(Q|
00001b00  25 2d 42 6c 25 29 2a 28  51 25 2d 42 6c 25 29 2b  |%-Bl%)*(Q%-Bl%)+|
00001b10  28 58 25 2d 47 6c 25 29  2a 28 58 25 2d 47 6c 25  |(X%-Gl%)*(X%-Gl%|
00001b20  29 3a e7 46 25 3c 4b 25  8c 0d 00 e1 19 54 79 25  |):.F%<K%.....Ty%|
00001b30  3d 42 6c 25 3a 49 79 25  3d 47 6c 25 3a 4b 25 3d  |=Bl%:Iy%=Gl%:K%=|
00001b40  46 25 0d 00 e2 1c cd 3a  44 25 2b 3d 38 3a ce 3a  |F%.....:D%+=8:.:|
00001b50  e7 4b 25 3d 26 37 66 66  66 66 66 66 66 8c 0d 00  |.K%=&7fffffff...|
00001b60  e3 42 54 79 25 3d 5a 25  21 77 25 81 32 3a 49 79  |.BTy%=Z%!w%.2:Iy|
00001b70  25 3d 5a 25 21 78 25 81  32 3a 4b 25 3d 28 51 25  |%=Z%!x%.2:K%=(Q%|
00001b80  2d 54 79 25 29 2a 28 51  25 2d 54 79 25 29 2b 28  |-Ty%)*(Q%-Ty%)+(|
00001b90  58 25 2d 49 79 25 29 2a  28 58 25 2d 49 79 25 29  |X%-Iy%)*(X%-Iy%)|
00001ba0  0d 00 e4 0d cd 3a e7 4b  25 3c 3d 32 8c 0d 00 e5  |.....:.K%<=2....|
00001bb0  12 46 25 3d 30 3a 5a 25  21 56 75 25 3d 46 25 0d  |.F%=0:Z%!Vu%=F%.|
00001bc0  00 e6 30 cc 3a 51 25 3d  b4 28 54 79 25 2d 51 25  |..0.:Q%=.(Ty%-Q%|
00001bd0  29 3a 58 25 3d b4 28 49  79 25 2d 58 25 29 3a 46  |):X%=.(Iy%-X%):F|
00001be0  25 3d 43 25 28 51 25 2b  31 2c 58 25 2b 31 29 0d  |%=C%(Q%+1,X%+1).|
00001bf0  00 e7 09 cd 3a 3d 46 25  0d 00 e8 36 dd f2 4e 79  |....:=F%...6..Ny|
00001c00  28 6b 25 29 3a ea 51 25  2c 58 25 2c 4a 25 2c 46  |(k%):.Q%,X%,J%,F|
00001c10  79 25 3a 51 25 3d 5a 25  21 74 25 3a 58 25 3d 5a  |y%:Q%=Z%!t%:X%=Z|
00001c20  25 21 41 79 25 3a e7 a4  6f 28 6b 25 29 8c 0d 00  |%!Ay%:..o(k%)...|
00001c30  e9 29 46 79 25 3d b9 3a  4a 25 3d 31 3a c8 95 4a  |.)Fy%=.:J%=1:..J|
00001c40  25 3c 39 80 46 79 25 3a  e7 a4 6f 28 28 6b 25 2b  |%<9.Fy%:..o((k%+|
00001c50  4a 25 29 83 39 29 8c 0d  00 ea 09 4a 25 2b 3d 31  |J%).9).....J%+=1|
00001c60  0d 00 eb 0b cc 3a 46 79  25 3d a3 0d 00 ec 0f cd  |.....:Fy%=......|
00001c70  3a ce 3a e7 4a 25 3e 3d  39 8c 0d 00 ed 0e e7 5a  |:.:.J%>=9......Z|
00001c80  25 21 56 5f 25 3e 30 8c  0d 00 ee 07 f2 4f 79 0d  |%!V_%>0......Oy.|
00001c90  00 ef 09 cc 3a f2 76 79  0d 00 f0 05 cd 0d 00 f1  |....:.vy........|
00001ca0  20 cc 3a 6b 25 3d 28 6b  25 2b 4a 25 29 83 39 3a  | .:k%=(k%+J%).9:|
00001cb0  5a 25 21 4e 79 25 3d 57  25 28 6b 25 29 0d 00 f2  |Z%!Ny%=W%(k%)...|
00001cc0  05 cd 0d 00 f3 13 cc 3a  5a 25 21 4e 79 25 3d 57  |.......:Z%!Ny%=W|
00001cd0  25 28 6b 25 29 0d 00 f4  07 cd 3a e1 0d 00 f5 98  |%(k%).....:.....|
00001ce0  dd a4 6f 28 6b 25 29 3a  ea 63 25 2c 66 25 2c 51  |..o(k%):.c%,f%,Q|
00001cf0  25 2c 58 25 2c 4d 25 2c  4e 25 2c 45 25 2c 79 25  |%,X%,M%,N%,E%,y%|
00001d00  3a 51 25 3d 5a 25 21 74  25 2b 4a 25 28 6b 25 2c  |:Q%=Z%!t%+J%(k%,|
00001d10  30 29 3a 58 25 3d 5a 25  21 41 79 25 2b 4a 25 28  |0):X%=Z%!Ay%+J%(|
00001d20  6b 25 2c 31 29 3a 4d 25  3d 5a 25 21 77 25 3a 4e  |k%,1):M%=Z%!w%:N|
00001d30  25 3d 5a 25 21 78 25 3a  79 25 3d 28 58 25 3e 3d  |%=Z%!x%:y%=(X%>=|
00001d40  30 29 80 28 58 25 3c 4e  25 29 80 28 51 25 3c 4d  |0).(X%<N%).(Q%<M|
00001d50  25 29 80 28 51 25 3e 3d  30 29 3a 79 25 3d 79 25  |%).(Q%>=0):y%=y%|
00001d60  80 28 3f a4 4b 28 51 25  2c 58 25 29 3d 30 29 3a  |.(?.K(Q%,X%)=0):|
00001d70  e7 79 25 8c 0d 00 f6 29  e3 66 25 3d 2d 31 b8 2b  |.y%....).f%=-1.+|
00001d80  31 3a e7 28 28 58 25 2b  66 25 29 3e 3d 30 29 80  |1:.((X%+f%)>=0).|
00001d90  28 28 58 25 2b 66 25 29  3c 4e 25 29 8c 0d 00 f7  |((X%+f%)<N%)....|
00001da0  39 45 25 3d a4 4c 28 51  25 2c 58 25 2b 66 25 29  |9E%=.L(Q%,X%+f%)|
00001db0  3a e3 63 25 3d 2d 31 b8  2b 31 3a e7 28 28 51 25  |:.c%=-1.+1:.((Q%|
00001dc0  2b 63 25 29 3e 3d 30 29  80 28 28 51 25 2b 63 25  |+c%)>=0).((Q%+c%|
00001dd0  29 3c 4d 25 29 8c 0d 00  f8 10 e7 28 45 25 3f 63  |)<M%)......(E%?c|
00001de0  25 29 3c 3e 30 8c 0d 00  f9 14 79 25 3d a3 3a 63  |%)<>0.....y%=.:c|
00001df0  25 3d 2b 31 3a 66 25 3d  2b 31 0d 00 fa 05 cd 0d  |%=+1:f%=+1......|
00001e00  00 fb 09 cd 3a ed 63 25  0d 00 fc 09 cd 3a ed 66  |....:.c%.....:.f|
00001e10  25 0d 00 fd 0d cd 3a 3d  28 79 25 3d 30 29 0d 23  |%.....:=(y%=0).#|
00001e20  dd 0a dd a4 76 3d 31 36  0d 23 de 3c dd f2 71 4a  |....v=16.#.<..qJ|
00001e30  28 68 69 25 2c 6e 61 25  29 ea 85 3a ee 85 ea f7  |(hi%,na%)..:....|
00001e40  85 3a f2 41 28 22 25 4c  69 62 48 61 6e 64 6c 65  |.:.A("%LibHandle|
00001e50  72 3a 20 68 61 72 64 5f  69 6e 69 74 69 61 6c 69  |r: hard_initiali|
00001e60  73 65 22 29 0d 23 df 0c  e7 a4 76 3c 6e 61 25 8c  |se").#....v<na%.|
00001e70  0d 23 e0 1b 85 30 2c 22  4c 69 62 48 61 6e 64 6c  |.#...0,"LibHandl|
00001e80  65 72 20 74 6f 6f 20 6f  6c 64 22 0d 23 e1 0d cd  |er too old".#...|
00001e90  3a e7 68 69 25 3c 31 8c  0d 23 e2 2f 85 31 2c 22  |:.hi%<1..#./.1,"|
00001ea0  4c 69 62 48 61 6e 64 6c  65 72 3a 20 62 61 64 20  |LibHandler: bad |
00001eb0  6d 61 78 20 6c 69 62 72  61 72 79 73 20 70 61 72  |max librarys par|
00001ec0  61 6d 65 74 65 72 22 0d  23 e3 64 cd 3a 43 6c 25  |ameter".#.d.:Cl%|
00001ed0  3d 68 69 25 3a de 4d 24  28 43 6c 25 2d 31 29 3a  |=hi%:.M$(Cl%-1):|
00001ee0  de 51 25 28 43 6c 25 2d  31 29 3a 5f 69 25 3d 30  |.Q%(Cl%-1):_i%=0|
00001ef0  3a de 6e 5f 25 32 35 36  3a 4d 6c 25 3d 34 30 3a  |:.n_%256:Ml%=40:|
00001f00  50 79 25 3d 30 3a 4b 4a  25 3d 31 32 3a 4b 61 25  |Py%=0:KJ%=12:Ka%|
00001f10  3d a3 3a de 5a 24 28 4d  6c 25 2d 31 29 3a 6e 4a  |=.:.Z$(Ml%-1):nJ|
00001f20  25 3d a3 3a 4c 4a 25 3d  a3 3a e1 0d 23 e4 46 dd  |%=.:LJ%=.:..#.F.|
00001f30  f2 53 28 46 24 2c 6b 61  25 29 ea 55 75 25 2c 4a  |.S(F$,ka%).Uu%,J|
00001f40  25 2c 55 24 2c 73 24 3a  ea 85 3a ee 85 ea f7 85  |%,U$,s$:..:.....|
00001f50  3a f2 41 28 22 25 2e 4c  69 62 48 61 6e 64 6c 65  |:.A("%.LibHandle|
00001f60  72 3a 20 6c 6f 61 64 5f  6c 69 62 72 61 72 79 22  |r: load_library"|
00001f70  29 0d 23 e5 45 4a 25 3d  30 3a 55 75 25 3d b9 3a  |).#.EJ%=0:Uu%=.:|
00001f80  55 24 3d c1 46 24 2c 31  2b a7 46 24 2c 22 2e 22  |U$=.F$,1+.F$,"."|
00001f90  29 29 3a c8 95 4a 25 3c  5f 69 25 80 55 75 25 3a  |)):..J%<_i%.Uu%:|
00001fa0  55 75 25 3d 28 55 24 3c  3e 4d 24 28 4a 25 29 29  |Uu%=(U$<>M$(J%))|
00001fb0  3a e7 55 75 25 8c 0d 23  e6 09 4a 25 2b 3d 31 0d  |:.Uu%..#..J%+=1.|
00001fc0  23 e7 0d cd 3a ce 3a e7  55 75 25 8c 0d 23 e8 0c  |#...:.:.Uu%..#..|
00001fd0  e7 4a 25 3d 43 6c 25 8c  0d 23 e9 2f 85 30 2c 22  |.J%=Cl%..#./.0,"|
00001fe0  4c 69 62 48 61 6e 64 6c  65 72 3a 20 54 6f 6f 20  |LibHandler: Too |
00001ff0  6d 61 6e 79 20 6c 69 62  72 61 72 79 73 20 74 6f  |many librarys to|
00002000  20 6c 6f 61 64 21 22 0d  23 ea 4f cd 3a 4d 24 28  | load!".#.O.:M$(|
00002010  4a 25 29 3d 55 24 3a 73  24 3d 22 27 22 2b 46 24  |J%)=U$:s$="'"+F$|
00002020  2b 22 27 20 64 6f 65 73  20 6e 6f 74 20 68 61 76  |+"' does not hav|
00002030  65 20 61 20 46 4e 5f 22  3a ea 85 3a ee 85 ea f7  |e a FN_":..:....|
00002040  85 3a f2 41 28 73 24 2b  55 24 2b 22 5f 76 65 72  |.:.A(s$+U$+"_ver|
00002050  73 69 6f 6e 22 29 0d 23  eb 52 51 25 28 4a 25 29  |sion").#.RQ%(J%)|
00002060  3d a0 28 22 46 4e 5f 22  2b 55 24 2b 22 5f 76 65  |=.("FN_"+U$+"_ve|
00002070  72 73 69 6f 6e 22 29 3a  f7 85 3a 5f 69 25 2b 3d  |rsion"):..:_i%+=|
00002080  31 3a ea 85 3a ee 85 ea  f7 85 3a f2 41 28 73 24  |1:..:.....:.A(s$|
00002090  2b 22 5f 68 61 72 64 5f  69 6e 69 74 69 61 6c 69  |+"_hard_initiali|
000020a0  73 65 5f 22 2b 55 24 29  0d 23 ec 21 e7 a0 28 22  |se_"+U$).#.!..("|
000020b0  46 4e 5f 68 61 72 64 5f  69 6e 69 74 69 61 6c 69  |FN_hard_initiali|
000020c0  73 65 5f 22 2b 55 24 29  8c 0d 23 ed 34 85 31 2c  |se_"+U$)..#.4.1,|
000020d0  22 4c 69 62 72 61 72 79  20 66 69 6c 65 20 27 22  |"Library file '"|
000020e0  2b 46 24 2b 22 27 73 20  68 61 72 64 20 69 6e 69  |+F$+"'s hard ini|
000020f0  74 27 69 6f 6e 20 66 61  69 6c 65 64 22 0d 23 ee  |t'ion failed".#.|
00002100  08 cd 3a f7 85 0d 23 ef  12 cd 3a e7 6b 61 25 3e  |..:...#...:.ka%>|
00002110  51 25 28 4a 25 29 8c 0d  23 f0 26 85 31 2c 22 4c  |Q%(J%)..#.&.1,"L|
00002120  69 62 72 61 72 79 20 66  69 6c 65 20 27 22 2b 46  |ibrary file '"+F|
00002130  24 2b 22 27 20 74 6f 6f  20 6f 6c 64 22 0d 23 f1  |$+"' too old".#.|
00002140  07 cd 3a e1 0d 23 f2 10  dd f2 41 28 50 24 29 e7  |..:..#....A(P$).|
00002150  6e 4a 25 8c 0d 23 f3 09  e7 4c 4a 25 8c 0d 23 f4  |nJ%..#...LJ%..#.|
00002160  16 85 9f 2c f6 24 2b 22  20 5b 22 2b c3 9e 2b 22  |...,.$+" ["+..+"|
00002170  5d 2e 22 0d 23 f5 0a cc  85 9f 2c f6 24 0d 23 f6  |].".#.....,.$.#.|
00002180  05 cd 0d 23 f7 0b cc e7  ac 4b 61 25 8c 0d 23 f8  |...#.....Ka%..#.|
00002190  0d e7 50 79 25 3d 4d 6c  25 8c 0d 23 f9 26 41 28  |..Py%=Ml%..#.&A(|
000021a0  4d 6c 25 2d 31 29 3d 22  45 72 72 6f 72 73 20 74  |Ml%-1)="Errors t|
000021b0  6f 6f 20 64 65 65 70 21  21 21 21 21 22 3a f2 78  |oo deep!!!!!":.x|
000021c0  0d 23 fa 13 cd 3a e7 c2  50 24 2c 32 29 3d 22 3a  |.#...:..P$,2)=":|
000021d0  20 22 8c 0d 23 fb 13 50  24 3d c0 50 24 2c a9 28  | "..#..P$=.P$,.(|
000021e0  50 24 29 2d 32 29 0d 23  fc 0b cd 3a e7 4c 4a 25  |P$)-2).#...:.LJ%|
000021f0  8c 0d 23 fd 0e 5a 24 28  50 79 25 29 3d f6 24 0d  |..#..Z$(Py%)=.$.|
00002200  23 fe 0c cc e7 50 79 25  3d 30 8c 0d 23 ff 4d 5a  |#....Py%=0..#.MZ|
00002210  24 28 50 79 25 29 3d 22  45 72 72 6f 72 20 60 22  |$(Py%)="Error `"|
00002220  2b f6 24 2b 22 27 20 28  6c 69 6e 65 20 22 3a 5a  |+.$+"' (line ":Z|
00002230  24 28 50 79 25 29 2b 3d  c3 28 9e 29 2b 22 29 20  |$(Py%)+=.(.)+") |
00002240  69 6e 20 22 3a 5a 24 28  50 79 25 29 2b 3d 22 60  |in ":Z$(Py%)+="`|
00002250  22 2b 50 24 2b 22 27 22  0d 24 00 17 cc 5a 24 28  |"+P$+"'".$...Z$(|
00002260  50 79 25 29 3d 22 60 22  2b 50 24 2b 22 27 22 0d  |Py%)="`"+P$+"'".|
00002270  24 01 05 cd 0d 24 02 12  cd 3a 50 79 25 2b 3d 31  |$....$...:Py%+=1|
00002280  3a 85 9f 2c 22 22 0d 24  03 05 cd 0d 24 04 07 cd  |:..,"".$....$...|
00002290  3a e1 0d 24 05 20 dd f2  78 ea 4d 5f 25 2c 6d 24  |:..$. ..x.M_%,m$|
000022a0  3a ee 85 3a f6 3a f1 22  3a 3a 22 2b c3 28 9e 29  |:..:.:."::"+.(.)|
000022b0  3a e0 0d 24 06 09 e7 6e  4a 25 8c 0d 24 07 09 e7  |:..$...nJ%..$...|
000022c0  4c 4a 25 8c 0d 24 08 20  f2 46 28 9f 2c f6 24 2b  |LJ%..$. .F(.,.$+|
000022d0  22 20 5b 22 2b c3 28 9e  29 2b 22 5d 2e 22 29 3a  |" ["+.(.)+"]."):|
000022e0  f2 42 3a e0 0d 24 09 15  cc f2 46 28 9f 2c f6 24  |.B:..$....F(.,.$|
000022f0  29 3a e7 9f 3d 70 5f 25  8c 0d 24 0a 08 f2 42 3a  |):..=p_%..$...B:|
00002300  e0 0d 24 0b 05 cd 0d 24  0c 05 cd 0d 24 0d 0d cc  |..$....$....$...|
00002310  e7 4b 4a 25 3d 2d 32 8c  0d 24 0e 0b e7 50 79 25  |.KJ%=-2..$...Py%|
00002320  3e 30 8c 0d 24 0f 0d 85  a2 9f 2c 5a 24 28 30 29  |>0..$.....,Z$(0)|
00002330  0d 24 10 0b cc 85 a2 9f  2c f6 24 0d 24 11 07 cd  |.$......,.$.$...|
00002340  3a e0 0d 24 12 0e cd 3a  e7 4b 4a 25 3d 2d 33 8c  |:..$...:.KJ%=-3.|
00002350  0d 24 13 39 24 6e 5f 25  3d 22 54 41 53 4b 22 3a  |.$.9$n_%="TASK":|
00002360  c8 99 26 34 30 30 63 30  2c 32 30 30 2c 21 6e 5f  |..&400c0,200,!n_|
00002370  25 2c 22 4c 69 62 48 61  6e 64 6c 65 72 22 2b bd  |%,"LibHandler"+.|
00002380  28 30 29 3a e7 50 79 25  8c 0d 24 14 1e e3 4d 5f  |(0):.Py%..$...M_|
00002390  25 3d 30 b8 50 79 25 2d  31 3a e7 4d 5f 25 3c 28  |%=0.Py%-1:.M_%<(|
000023a0  50 79 25 2d 31 29 8c 0d  24 15 16 f2 41 79 28 5a  |Py%-1)..$...Ay(Z|
000023b0  24 28 4d 5f 25 29 2b 22  20 69 6e 22 29 0d 24 16  |$(M_%)+" in").$.|
000023c0  11 cc f2 41 79 28 5a 24  28 4d 5f 25 29 29 0d 24  |...Ay(Z$(M_%)).$|
000023d0  17 0a cd 3a ed 4d 5f 25  0d 24 18 1f cc f2 41 79  |...:.M_%.$....Ay|
000023e0  28 f6 24 2b 22 20 28 6c  69 6e 65 20 22 2b c3 28  |(.$+" (line "+.(|
000023f0  9e 29 2b 22 29 22 29 0d  24 19 10 cd 3a c8 99 26  |.)+")").$...:..&|
00002400  36 30 30 64 64 3a e0 0d  24 1a 0e cd 3a e7 4b 4a  |600dd:..$...:.KJ|
00002410  25 3e 3d 30 8c 0d 24 1b  08 eb 4b 4a 25 0d 24 1c  |%>=0..$...KJ%.$.|
00002420  28 cd 3a f1 22 41 6e 20  65 72 72 6f 72 20 68 61  |(.:."An error ha|
00002430  73 20 6f 63 63 75 72 65  64 2e 2e 2e 22 3a f1 3a  |s occured...":.:|
00002440  e7 50 79 25 8c 0d 24 1d  3c e3 4d 5f 25 3d 30 b8  |.Py%..$.<.M_%=0.|
00002450  50 79 25 2d 31 3a fb 28  28 37 2d 28 4d 5f 25 3c  |Py%-1:.((7-(M_%<|
00002460  3c 31 29 29 80 36 29 2b  31 3a f1 5a 24 28 4d 5f  |<1)).6)+1:.Z$(M_|
00002470  25 29 3b 3a e7 4d 5f 25  3c 28 50 79 25 2d 31 29  |%);:.M_%<(Py%-1)|
00002480  8c 0d 24 1e 0c f1 22 20  69 6e 20 22 3b 0d 24 1f  |..$..." in ";.$.|
00002490  0a cd 3a ed 4d 5f 25 0d  24 20 1b cc f1 f6 24 3b  |..:.M_%.$ ....$;|
000024a0  22 20 28 6c 69 6e 65 20  22 3b c3 28 9e 29 3b 22  |" (line ";.(.);"|
000024b0  29 22 0d 24 21 0c cd 3a  f1 3a fb 37 3a e0 0d 24  |)".$!..:.:.7:..$|
000024c0  22 07 cd 3a e1 0d 24 23  7f dd f2 41 79 28 49 24  |"..:..$#...Ay(I$|
000024d0  29 ea 6d 75 25 3a 6d 75  25 3d 32 30 2b 28 a9 28  |).mu%:mu%=20+(.(|
000024e0  49 24 29 2b 35 29 80 2d  34 3a 21 6e 5f 25 3d 6d  |I$)+5).-4:!n_%=m|
000024f0  75 25 3a 6e 5f 25 21 31  36 3d 26 38 30 34 63 30  |u%:n_%!16=&804c0|
00002500  3a 24 28 6e 5f 25 2b 32  30 29 3d 49 24 3a 6e 5f  |:$(n_%+20)=I$:n_|
00002510  25 3f 28 32 30 2b a9 28  49 24 29 29 3d 31 30 3a  |%?(20+.(I$))=10:|
00002520  6e 5f 25 3f 28 32 31 2b  a9 28 49 24 29 29 3d 30  |n_%?(21+.(I$))=0|
00002530  3a c8 99 26 36 30 30 65  37 2c 31 37 2c 6e 5f 25  |:..&600e7,17,n_%|
00002540  2c 30 3a e1 0d 24 24 16  dd a4 5f 43 41 73 6d 5f  |,0:..$$..._CAsm_|
00002550  76 65 72 73 69 6f 6e 3d  31 30 0d 24 25 41 dd a4  |version=10.$%A..|
00002560  5f 68 61 72 64 5f 69 6e  69 74 69 61 6c 69 73 65  |_hard_initialise|
00002570  5f 43 41 73 6d ea 85 3a  ee 85 ea f7 85 3a f2 41  |_CAsm..:.....:.A|
00002580  28 22 25 2e 43 41 73 6d  3a 20 68 61 72 64 5f 69  |("%.CAsm: hard_i|
00002590  6e 69 74 69 61 6c 69 73  65 22 29 0d 24 26 e6 f2  |nitialise").$&..|
000025a0  53 28 22 3c 42 61 73 69  63 56 5f 41 73 73 65 6d  |S("<BasicV_Assem|
000025b0  62 6c 65 72 24 4c 69 62  3e 2e 4d 69 73 63 22 2c  |bler$Lib>.Misc",|
000025c0  32 37 29 3a c8 99 35 2c  22 52 4d 45 6e 73 75 72  |27):..5,"RMEnsur|
000025d0  65 20 43 41 73 73 65 6d  62 6c 65 72 20 30 2e 30  |e CAssembler 0.0|
000025e0  33 20 52 4d 4c 6f 61 64  20 53 79 73 74 65 6d 3a  |3 RMLoad System:|
000025f0  4d 6f 64 75 6c 65 73 2e  43 41 73 73 65 6d 62 6c  |Modules.CAssembl|
00002600  65 72 22 3a c8 99 35 2c  22 49 66 20 22 22 3c 43  |er":..5,"If ""<C|
00002610  41 73 6d 24 44 69 72 3e  22 22 3d 22 22 22 22 20  |Asm$Dir>""="""" |
00002620  54 68 65 6e 20 53 65 74  20 43 41 73 6d 24 44 69  |Then Set CAsm$Di|
00002630  72 20 3c 64 3e 2e 4c 69  62 72 61 72 79 2e 43 41  |r <d>.Library.CA|
00002640  73 6d 22 3a 43 41 73 6d  4c 69 62 72 61 72 79 5f  |sm":CAsmLibrary_|
00002650  73 74 64 6c 69 62 3d 31  3a 43 41 73 6d 4c 69 62  |stdlib=1:CAsmLib|
00002660  72 61 72 79 5f 73 74 64  69 6f 3d 32 3a 43 41 73  |rary_stdio=2:CAs|
00002670  6d 4c 69 62 72 61 72 79  5f 73 74 72 69 6e 67 3d  |mLibrary_string=|
00002680  33 0d 24 27 ce 44 4f 3d  34 3a 43 41 73 6d 4c 69  |3.$'.DO=4:CAsmLi|
00002690  62 72 61 72 79 5f 69 6d  61 74 68 3d 35 3a 7a 60  |brary_imath=5:z`|
000026a0  3d 36 3a 4c 42 3d 37 3a  43 41 73 6d 4c 69 62 72  |=6:LB=7:CAsmLibr|
000026b0  61 72 79 5f 77 69 6d 70  3d 38 3a 61 4f 3d 39 3a  |ary_wimp=8:aO=9:|
000026c0  43 41 73 6d 4c 69 62 72  61 72 79 5f 6d 65 73 73  |CAsmLibrary_mess|
000026d0  61 67 65 3d 31 30 3a 75  60 3d 31 31 3a 43 41 73  |age=10:u`=11:CAs|
000026e0  6d 4c 69 62 72 61 72 79  5f 64 65 62 75 67 3d 31  |mLibrary_debug=1|
000026f0  32 3a 43 41 73 6d 4c 69  62 72 61 72 79 5f 52 65  |2:CAsmLibrary_Re|
00002700  6c 4f 62 6a 3d 31 33 3a  6a 6e 3d 31 34 3a 6c 6f  |lObj=13:jn=14:lo|
00002710  3d 31 35 3a 57 4f 3d 31  36 3a 77 42 3d 31 37 3a  |=15:WO=16:wB=17:|
00002720  61 61 3d 31 38 3a 67 60  3d 31 39 3a 4c 4f 3d 32  |aa=18:g`=19:LO=2|
00002730  30 3a 6d 42 3d 32 31 3a  73 4f 3d 32 32 3a 44 60  |0:mB=21:sO=22:D`|
00002740  3d 32 33 3a 60 6f 3d 32  34 3a 6e 6e 3d 32 35 0d  |=23:`o=24:nn=25.|
00002750  24 28 ac 72 6f 3d 32 36  3a 42 5f 3d 32 36 3a 79  |$(.ro=26:B_=26:y|
00002760  61 3d 30 3a 6d 61 3d 31  3a 46 6e 3d 32 3a 73 61  |a=0:ma=1:Fn=2:sa|
00002770  3d 33 3a 4b 3d 34 3a 68  3d 35 3a 54 69 3d 36 3a  |=3:K=4:h=5:Ti=6:|
00002780  54 6c 3d 37 3a 43 6f 3d  38 3a 58 4a 3d 39 3a 6e  |Tl=7:Co=8:XJ=9:n|
00002790  79 3d 31 30 3a 56 3d 31  31 3a 45 5f 3d 31 32 3a  |y=10:V=11:E_=12:|
000027a0  41 3d 31 33 3a 5a 3d 31  34 3a 4e 6b 3d 31 35 3a  |A=13:Z=14:Nk=15:|
000027b0  54 75 3d 26 36 64 37 33  34 31 34 33 3a 75 79 25  |Tu=&6d734143:uy%|
000027c0  3d 30 3a 6e 79 25 3d 31  33 3a 41 5f 3d 30 3a 50  |=0:ny%=13:A_=0:P|
000027d0  79 3d 30 3a 58 5f 3d 31  30 2a 31 30 32 34 3a 6a  |y=0:X_=10*1024:j|
000027e0  75 3d 58 5f 2b 28 31 2a  31 30 32 34 29 3a 50 69  |u=X_+(1*1024):Pi|
000027f0  25 3d b9 3a 48 6c 3d a3  3a 3d 30 0d 24 29 5d dd  |%=.:Hl=.:=0.$)].|
00002800  f2 48 79 28 58 24 29 ea  44 25 2c 6a 79 25 2c 68  |.Hy(X$).D%,jy%,h|
00002810  79 25 2c 4c 25 2c 4f 25  2c 50 25 2c 56 25 2c 46  |y%,L%,O%,P%,V%,F|
00002820  24 3a ea 85 3a ee 85 ea  f7 85 3a c8 99 26 34 30  |$:..:.....:..&40|
00002830  30 65 63 2c 60 25 2c 2d  31 3a f2 41 28 22 25 2e  |0ec,`%,-1:.A("%.|
00002840  43 41 73 6d 3a 20 43 6c  61 69 6d 43 41 73 6d 4c  |CAsm: ClaimCAsmL|
00002850  69 62 72 61 72 79 22 29  0d 24 2a 4f 60 25 3d 93  |ibrary").$*O`%=.|
00002860  2d 33 32 37 36 38 3a c8  99 26 34 30 30 65 63 2c  |-32768:..&400ec,|
00002870  60 25 2b 33 32 37 36 38  2c 2d 31 b8 4c 25 3a 4c  |`%+32768,-1.L%:L|
00002880  25 2b 3d 33 32 37 36 38  3a 4f 25 3d 60 25 2b 33  |%+=32768:O%=`%+3|
00002890  32 37 36 38 3a 50 25 3d  30 3a 56 25 3d 31 34 3a  |2768:P%=0:V%=14:|
000028a0  e7 4f 25 3d 4c 25 8c 0d  24 2b 2f 85 31 2c 22 4e  |.O%=L%..$+/.1,"N|
000028b0  6f 74 20 65 6e 6f 75 67  68 20 6d 65 6d 6f 72 79  |ot enough memory|
000028c0  20 74 6f 20 73 74 61 72  74 20 61 70 70 6c 69 63  | to start applic|
000028d0  61 74 69 6f 6e 22 0d 24  2c 0e cd 3a e7 75 79 25  |ation".$,..:.uy%|
000028e0  3c 3e 30 8c 0d 24 2d 32  85 31 2c 22 4f 6e 6c 79  |<>0..$-2.1,"Only|
000028f0  20 6f 6e 65 20 63 61 6c  6c 20 74 6f 20 43 6c 61  | one call to Cla|
00002900  69 6d 43 41 73 6d 4c 69  62 72 61 72 79 20 61 6c  |imCAsmLibrary al|
00002910  6c 6f 77 65 64 22 0d 24  2e 22 cd 3a de 59 6c 25  |lowed".$.".:.Yl%|
00002920  42 5f 2a 38 3a de 53 24  28 42 5f 29 3a e7 a4 68  |B_*8:.S$(B_):..h|
00002930  5f 44 45 46 41 55 4c 54  0d 24 2f 65 c8 95 58 24  |_DEFAULT.$/e..X$|
00002940  3c 3e 22 22 3a 46 24 3d  c0 58 24 2c a7 58 24 2c  |<>"":F$=.X$,.X$,|
00002950  22 2c 22 29 2d 31 29 3a  ea 85 3a ee 85 ea f7 85  |",")-1):..:.....|
00002960  3a f2 41 28 22 41 74 74  65 6d 70 74 65 64 20 74  |:.A("Attempted t|
00002970  6f 20 63 6c 61 69 6d 20  74 68 65 20 6e 6f 6e 2d  |o claim the non-|
00002980  65 78 69 73 74 65 6e 74  20 6c 69 62 72 61 72 79  |existent library|
00002990  3a 20 60 22 2b 46 24 2b  22 27 21 22 29 0d 24 30  |: `"+F$+"'!").$0|
000029a0  4a 6a 79 25 3d a0 28 22  43 41 73 6d 4c 69 62 72  |Jjy%=.("CAsmLibr|
000029b0  61 72 79 5f 22 2b 46 24  29 3a f7 85 3a 68 79 25  |ary_"+F$):..:hy%|
000029c0  3d 59 6c 25 3a 44 25 3d  68 79 25 2b 28 75 79 25  |=Yl%:D%=hy%+(uy%|
000029d0  2a 38 29 3a c8 95 44 25  3e 68 79 25 3a e7 21 68  |*8):..D%>hy%:.!h|
000029e0  79 25 3d 6a 79 25 8c 0d  24 31 0c 68 79 25 3d 44  |y%=jy%..$1.hy%=D|
000029f0  25 2b 31 0d 24 32 0b cc  68 79 25 2b 3d 38 0d 24  |%+1.$2..hy%+=8.$|
00002a00  33 10 cd 3a ce 3a e7 68  79 25 3d 44 25 8c 0d 24  |3..:.:.hy%=D%..$|
00002a10  34 0d e7 75 79 25 3e 3d  42 5f 8c 0d 24 35 2d 85  |4..uy%>=B_..$5-.|
00002a20  31 2c 22 54 6f 6f 20 6d  61 6e 79 20 6c 69 62 72  |1,"Too many libr|
00002a30  61 72 79 73 20 68 61 76  65 20 62 65 65 6e 20 63  |arys have been c|
00002a40  6c 61 69 6d 65 64 21 22  0d 24 36 3f cd 3a 21 44  |laimed!".$6?.:!D|
00002a50  25 3d 6a 79 25 3a 53 24  28 6a 79 25 29 3d 46 24  |%=jy%:S$(jy%)=F$|
00002a60  3a 75 79 25 2b 3d 31 3a  4f 25 3d 60 25 2b 33 32  |:uy%+=1:O%=`%+32|
00002a70  37 36 38 3a 50 25 3d 30  3a e7 a4 4a 28 22 46 4e  |768:P%=0:..J("FN|
00002a80  68 5f 22 2b 46 24 29 0d  24 37 46 cd 3a 58 24 3d  |h_"+F$).$7F.:X$=|
00002a90  c1 58 24 2c a9 28 46 24  29 2b 32 29 3a c8 95 97  |.X$,.(F$)+2):...|
00002aa0  28 58 24 29 3d 97 28 22  20 22 29 3a 58 24 3d c1  |(X$)=.(" "):X$=.|
00002ab0  58 24 2c 32 29 3a ce 3a  ce 3a c8 99 26 34 30 30  |X$,2):.:.:..&400|
00002ac0  65 63 2c 60 25 2c 2d 31  3a f7 85 3a e1 0d 24 38  |ec,`%,-1:..:..$8|
00002ad0  3e dd f2 6b 79 ea 4b 25  2c 44 25 2c 4a 25 2c 79  |>..ky.K%,D%,J%,y|
00002ae0  25 3a ea 85 3a ee 85 ea  f7 85 3a f2 41 28 22 25  |%:..:.....:.A("%|
00002af0  2e 43 41 73 6d 3a 20 41  73 73 65 6d 62 6c 65 43  |.CAsm: AssembleC|
00002b00  41 73 6d 54 61 62 6c 65  73 22 29 0d 24 39 0b e7  |AsmTables").$9..|
00002b10  75 79 25 3d 30 8c 0d 24  3a 0f e7 a4 68 5f 44 45  |uy%=0..$:...h_DE|
00002b20  46 41 55 4c 54 0d 24 3b  1e cd 3a 79 25 3d 59 6c  |FAULT.$;..:y%=Yl|
00002b30  25 3a 4a 25 3d 75 79 25  3a e7 28 56 25 80 32 29  |%:J%=uy%:.(V%.2)|
00002b40  3d 30 8c 0d 24 3c 2a de  44 25 75 79 25 2a 34 3a  |=0..$<*.D%uy%*4:|
00002b50  c8 99 37 39 2c 75 79 25  2c 44 25 2b 26 63 30 30  |..79,uy%,D%+&c00|
00002b60  30 30 30 30 30 2c 33 2c  2c 79 25 2c 38 0d 24 3d  |00000,3,,y%,8.$=|
00002b70  86 cd 3a 5b 4f 50 54 56  25 3a 2e 4a 4a 20 44 43  |..:[OPTV%:.JJ DC|
00002b80  44 54 75 3a 44 43 44 45  75 3a 5d 3a c8 95 4a 25  |DTu:DCDEu:]:..J%|
00002b90  3e 30 3a 5b 4f 50 54 56  25 3a 44 43 44 21 79 25  |>0:[OPTV%:DCD!y%|
00002ba0  3a 44 43 44 79 25 21 34  3a 5d 3a 79 25 2b 3d 38  |:DCDy%!4:]:y%+=8|
00002bb0  3a 4a 25 2d 3d 31 3a ce  3a 5b 4f 50 54 56 25 3a  |:J%-=1:.:[OPTV%:|
00002bc0  44 43 44 30 3a 5d 3a 5b  4f 50 54 56 25 3a 41 4c  |DCD0:]:[OPTV%:AL|
00002bd0  49 47 4e 3a 2e 43 5f 3a  5d 3a 44 25 3d 50 25 3a  |IGN:.C_:]:D%=P%:|
00002be0  e7 a4 6a 75 6d 70 62 6c  6f 63 6b 5f 44 45 46 41  |..jumpblock_DEFA|
00002bf0  55 4c 54 0d 24 3e 48 45  75 3d 28 50 25 2d 44 25  |ULT.$>HEu=(P%-D%|
00002c00  29 3e 3e 32 3a 4a 25 3d  75 79 25 3a 79 25 3d 59  |)>>2:J%=uy%:y%=Y|
00002c10  6c 25 3a c8 95 4a 25 3e  30 3a 44 25 3d 50 25 3a  |l%:..J%>0:D%=P%:|
00002c20  e7 a4 4a 28 22 46 4e 6a  75 6d 70 62 6c 6f 63 6b  |..J("FNjumpblock|
00002c30  5f 22 2b 53 24 28 21 79  25 29 29 0d 24 3f 23 79  |_"+S$(!y%)).$?#y|
00002c40  25 21 34 3d 28 50 25 2d  44 25 29 3e 3e 32 3a 79  |%!4=(P%-D%)>>2:y|
00002c50  25 2b 3d 38 3a 4a 25 2d  3d 31 3a ce 3a e1 0d 24  |%+=8:J%-=1:.:..$|
00002c60  40 33 dd f2 4e 75 ea 43  3a ea 85 3a ee 85 ea f7  |@3..Nu.C:..:....|
00002c70  85 3a f2 41 28 22 25 2e  43 41 73 6d 3a 20 41 73  |.:.A("%.CAsm: As|
00002c80  73 65 6d 62 6c 65 43 41  73 6d 42 61 73 69 63 22  |sembleCAsmBasic"|
00002c90  29 0d 24 41 92 5b 4f 50  54 56 25 3a 41 4c 49 47  |).$A.[OPTV%:ALIG|
00002ca0  4e 3a 2e 48 4a 3a 53 54  4d 46 44 28 41 29 21 2c  |N:.HJ:STMFD(A)!,|
00002cb0  7b 34 2d 35 2c 5a 7d 3a  42 4c 20 50 25 2b 28 31  |{4-5,Z}:BL P%+(1|
00002cc0  33 3c 3c 32 29 3a 2e 43  20 44 43 44 4a 4a 2d 43  |3<<2):.C DCDJJ-C|
00002cd0  3a 44 43 44 43 5f 2d 43  3a 44 43 44 41 5f 2d 43  |:DCDC_-C:DCDA_-C|
00002ce0  3a 44 43 44 50 79 3a 44  43 44 58 5f 3a 2e 78 79  |:DCDPy:DCDX_:.xy|
00002cf0  3a 44 43 44 30 3a 44 43  44 30 3a 44 43 44 30 3a  |:DCD0:DCD0:DCD0:|
00002d00  44 43 44 30 3a 4c 44 52  20 41 2c 78 79 3a 4c 44  |DCD0:LDR A,xy:LD|
00002d10  4d 46 44 28 41 29 21 2c  7b 6e 79 2c 56 2c 45 5f  |MFD(A)!,{ny,V,E_|
00002d20  2c 5a 7d 0d 24 42 c0 4d  4f 56 70 63 2c 5a 3a 42  |,Z}.$B.MOVpc,Z:B|
00002d30  49 43 20 35 2c 5a 2c 23  26 66 63 30 30 30 30 30  |IC 5,Z,#&fc00000|
00002d40  33 3a 4c 44 4d 49 41 35  2c 7b 30 2d 34 7d 3a 41  |3:LDMIA5,{0-4}:A|
00002d50  44 44 30 2c 30 2c 35 3a  41 44 44 31 2c 31 2c 35  |DD0,0,5:ADD1,1,5|
00002d60  3a 41 44 44 32 2c 32 2c  35 3a 4d 4f 56 35 2c 23  |:ADD2,2,5:MOV5,#|
00002d70  30 3a 53 57 49 20 26 66  63 62 38 30 3a 53 54 52  |0:SWI &fcb80:STR|
00002d80  76 63 30 2c 78 79 2b 28  31 3c 3c 32 29 3a 53 54  |vc0,xy+(1<<2):ST|
00002d90  52 76 63 31 2c 78 79 2b  28 33 3c 3c 32 29 3a 4c  |Rvc1,xy+(3<<2):L|
00002da0  44 4d 46 44 28 41 29 21  2c 7b 34 2d 35 2c 70 63  |DMFD(A)!,{4-5,pc|
00002db0  7d 3a 2e 47 5f 3a a4 5a  3a 4d 4f 56 32 2c 5a 3a  |}:.G_:.Z:MOV2,Z:|
00002dc0  4d 4f 56 31 2c 41 3a 4d  4f 56 30 2c 6e 79 3a 53  |MOV1,A:MOV0,ny:S|
00002dd0  57 49 20 26 66 63 62 38  31 3a 4d 4f 56 76 63 31  |WI &fcb81:MOVvc1|
00002de0  2c 23 30 0d 24 43 63 53  54 52 76 63 31 2c 78 79  |,#0.$CcSTRvc1,xy|
00002df0  2b 28 33 3c 3c 32 29 3a  4d 4f 56 70 63 2c 32 3a  |+(3<<2):MOVpc,2:|
00002e00  4d 4f 56 31 33 2c 31 32  3a 5d 3a 41 5f 3d 50 25  |MOV13,12:]:A_=P%|
00002e10  3a f2 4d 3a f2 68 79 3a  50 79 3d 28 50 79 2b 33  |:.M:.hy:Py=(Py+3|
00002e20  29 80 2d 34 3a 50 25 2b  3d 50 79 2d 31 3a 4f 25  |).-4:P%+=Py-1:O%|
00002e30  2b 3d 50 79 2d 31 3a 5b  4f 50 54 56 25 3a 44 43  |+=Py-1:[OPTV%:DC|
00002e40  42 30 3a 5d 3a e1 0d 24  44 36 dd f2 4f 4a ea 85  |B0:]:..$D6..OJ..|
00002e50  3a ee 85 ea f7 85 3a f2  41 28 22 25 2e 43 41 73  |:.....:.A("%.CAs|
00002e60  6d 3a 20 41 73 73 65 6d  62 6c 65 43 41 73 6d 41  |m: AssembleCAsmA|
00002e70  70 70 6c 69 63 61 74 69  6f 6e 22 29 0d 24 45 29  |pplication").$E)|
00002e80  e7 50 25 3c 3e 33 32 37  36 38 8c 85 31 2c 22 45  |.P%<>32768..1,"E|
00002e90  78 70 65 63 74 20 50 25  20 74 6f 20 62 65 20 26  |xpect P% to be &|
00002ea0  38 30 30 30 22 0d 24 46  77 5b 4f 50 54 56 25 3a  |8000".$Fw[OPTV%:|
00002eb0  41 44 52 34 2c 6a 79 3a  4d 4f 56 35 2c 23 41 69  |ADR4,jy:MOV5,#Ai|
00002ec0  3a 53 57 49 20 26 66 63  62 38 30 3a a4 6c 28 22  |:SWI &fcb80:.l("|
00002ed0  76 63 22 2c 32 2c 67 4f  29 3a 42 76 63 20 63 6c  |vc",2,gO):Bvc cl|
00002ee0  3a 53 57 49 20 34 33 3a  2e 6a 79 3a 44 43 44 4a  |:SWI 43:.jy:DCDJ|
00002ef0  4a 2d 6a 79 3a 44 43 44  43 5f 2d 6a 79 3a 44 43  |J-jy:DCDC_-jy:DC|
00002f00  44 41 5f 2d 6a 79 3a 44  43 44 50 79 3a 44 43 44  |DA_-jy:DCDPy:DCD|
00002f10  58 5f 3a 44 43 44 6a 75  3a 5d 3a e1 0d 24 47 34  |X_:DCDju:]:..$G4|
00002f20  dd a4 5a ea 85 3a ee 85  ea f7 85 3a f2 41 28 22  |..Z..:.....:.A("|
00002f30  25 2e 43 41 73 6d 3a 20  53 74 61 72 74 43 41 73  |%.CAsm: StartCAs|
00002f40  73 65 6d 62 6c 65 72 53  65 73 73 69 6f 6e 22 29  |semblerSession")|
00002f50  0d 24 48 75 5b 4f 50 54  56 25 3a 53 54 4d 46 44  |.$Hu[OPTV%:STMFD|
00002f60  28 41 29 21 2c 7b 6e 79  2c 56 2c 45 5f 2c 5a 7d  |(A)!,{ny,V,E_,Z}|
00002f70  3a 4d 4f 56 20 56 2c 70  63 3a a4 6c 28 22 22 2c  |:MOV V,pc:.l("",|
00002f80  5a 2c 78 79 29 3a 53 54  52 20 41 2c 5b 5a 5d 2c  |Z,xy):STR A,[Z],|
00002f90  23 34 3a 4c 44 4d 49 41  28 5a 29 21 2c 7b 6e 79  |#4:LDMIA(Z)!,{ny|
00002fa0  2c 45 5f 2c 41 7d 3a 80  20 56 2c 56 2c 23 26 66  |,E_,A}:. V,V,#&f|
00002fb0  63 30 30 30 30 30 33 3a  84 52 20 5a 2c 5a 2c 56  |c000003:.R Z,Z,V|
00002fc0  3a 5d 3a 3d 30 0d 24 49  31 dd a4 4e 28 41 25 29  |:]:=0.$I1..N(A%)|
00002fd0  ea 4d 24 3a 4d 24 3d 22  22 3a c8 95 3f 41 25 3a  |.M$:M$="":..?A%:|
00002fe0  4d 24 2b 3d bd 28 3f 41  25 29 3a 41 25 2b 3d 31  |M$+=.(?A%):A%+=1|
00002ff0  3a ce 3a 3d 4d 24 0d 24  4a 41 dd a4 78 79 28 41  |:.:=M$.$JA..xy(A|
00003000  25 2c 42 25 29 ea 4d 24  3a 4d 24 3d 22 22 3a c8  |%,B%).M$:M$="":.|
00003010  95 42 25 3e 3d 30 80 3f  41 25 3a 4d 24 2b 3d bd  |.B%>=0.?A%:M$+=.|
00003020  28 3f 41 25 29 3a 41 25  2b 3d 31 3a 42 25 2d 3d  |(?A%):A%+=1:B%-=|
00003030  31 3a ce 3a 3d 4d 24 0d  24 4b 21 dd f2 4f 28 41  |1:.:=M$.$K!..O(A|
00003040  25 2c 4d 24 29 24 41 25  3d 4d 24 3a 41 25 3f a9  |%,M$)$A%=M$:A%?.|
00003050  28 4d 24 29 3d 30 3a e1  0d 24 4c 1d dd f2 4d 5f  |(M$)=0:..$L...M_|
00003060  28 41 25 2c 4d 24 2c 42  25 29 e7 a9 28 4d 24 29  |(A%,M$,B%)..(M$)|
00003070  3c 3d 42 25 8c 0d 24 4d  28 24 41 25 3d c0 4d 24  |<=B%..$M($A%=.M$|
00003080  2c 42 25 2d 31 29 3a 41  25 3f 28 42 25 2d 31 29  |,B%-1):A%?(B%-1)|
00003090  3d 97 28 c1 4d 24 2c 42  25 2c 31 29 29 0d 24 4e  |=.(.M$,B%,1)).$N|
000030a0  16 cc 24 41 25 3d 4d 24  3a 41 25 3f a9 28 4d 24  |..$A%=M$:A%?.(M$|
000030b0  29 3d 30 0d 24 4f 07 cd  3a e1 0d 24 50 17 dd a4  |)=0.$O..:..$P...|
000030c0  4a 28 66 24 29 ea 85 3a  ee 85 ea f7 85 3a f2 6e  |J(f$)..:.....:.n|
000030d0  4a 0d 24 51 0a 3d a0 28  66 24 29 0d 24 52 0d dd  |J.$Q.=.(f$).$R..|
000030e0  f2 6e 4a e7 50 69 25 8c  0d 24 53 22 85 9f 2c f6  |.nJ.Pi%..$S"..,.|
000030f0  24 2b 22 20 28 65 76 61  6c 75 61 74 69 6e 67 20  |$+" (evaluating |
00003100  60 22 2b 66 24 2b 22 27  29 22 0d 24 54 0a cc 85  |`"+f$+"')".$T...|
00003110  9f 2c f6 24 0d 24 55 07  cd 3a e1 0d 24 56 39 dd  |.,.$.$U..:..$V9.|
00003120  f2 73 75 28 67 75 25 2c  57 4a 25 2c 72 69 25 29  |.su(gu%,WJ%,ri%)|
00003130  ea 85 3a ee 85 ea f7 85  3a f2 41 28 22 25 2e 43  |..:.....:.A("%.C|
00003140  41 73 6d 3a 20 61 73 73  65 6d 62 6c 65 5f 43 41  |Asm: assemble_CA|
00003150  73 6d 22 29 0d 24 57 4e  f2 53 28 22 3c 42 61 73  |sm").$WN.S("<Bas|
00003160  69 63 56 24 4c 69 62 3e  2e 48 65 61 70 22 2c 38  |icV$Lib>.Heap",8|
00003170  29 3a f2 53 28 22 3c 42  61 73 69 63 56 24 4c 69  |):.S("<BasicV$Li|
00003180  62 3e 2e 4d 65 73 73 61  67 65 22 2c 31 29 3a e7  |b>.Message",1):.|
00003190  a4 73 79 28 67 75 25 2c  57 4a 25 2c 72 69 25 2c  |.sy(gu%,WJ%,ri%,|
000031a0  30 29 0d 24 58 10 d6 48  4a 3a ee 85 d6 47 5f 3a  |0).$X..HJ:...G_:|
000031b0  f2 78 0d 24 59 05 e1 0d  24 5a 0d dd f2 4d e7 56  |.x.$Y...$Z...M.V|
000031c0  25 80 34 8c 0d 24 5b 1c  c8 99 26 36 30 36 63 34  |%.4..$[...&606c4|
000031d0  2c 28 4f 25 2d 79 79 25  29 2a 31 30 30 81 48 25  |,(O%-yy%)*100.H%|
000031e0  0d 24 5c 1d cc c8 99 26  36 30 36 63 34 2c 28 50  |.$\....&606c4,(P|
000031f0  25 2d 79 79 25 29 2a 31  30 30 81 48 25 0d 24 5d  |%-yy%)*100.H%.$]|
00003200  07 cd 3a e1 0d 24 5e 79  dd a4 73 79 28 67 75 25  |..:..$^y..sy(gu%|
00003210  2c 57 4a 25 2c 72 69 25  2c 66 4a 25 29 ea 4c 25  |,WJ%,ri%,fJ%).L%|
00003220  2c 4f 25 2c 50 25 2c 56  25 2c 41 69 25 2c 48 25  |,O%,P%,V%,Ai%,H%|
00003230  3a ea 4f 3a ea 67 6f 2c  4c 5f 2c 56 42 2c 6a 5f  |:.O:.go,L_,VB,j_|
00003240  2c 74 6f 2c 44 42 3a ea  62 6c 2c 63 2c 42 61 3a  |,to,DB:.bl,c,Ba:|
00003250  ea 85 3a ee 85 ea f7 85  3a f2 41 28 22 25 2e 43  |..:.....:.A("%.C|
00003260  41 73 6d 3a 20 61 73 73  65 6d 62 6c 65 5f 43 41  |Asm: assemble_CA|
00003270  73 6d 5f 45 78 74 65 72  6e 61 6c 22 29 0d 24 5f  |sm_External").$_|
00003280  0b e7 66 4a 25 3d 30 8c  0d 24 60 3a f2 53 28 22  |..fJ%=0..$`:.S("|
00003290  3c 42 61 73 69 63 56 24  4c 69 62 3e 2e 48 65 61  |<BasicV$Lib>.Hea|
000032a0  70 22 2c 38 29 3a f2 53  28 22 3c 42 61 73 69 63  |p",8):.S("<Basic|
000032b0  56 24 4c 69 62 3e 2e 4d  65 73 73 61 67 65 22 2c  |V$Lib>.Message",|
000032c0  31 29 0d 24 61 89 cd 3a  de 79 79 25 67 75 25 3a  |1).$a..:.yy%gu%:|
000032d0  4f 3d 41 3a 67 6f 3d 31  3c 3c 33 31 3a 4c 5f 3d  |O=A:go=1<<31:L_=|
000032e0  31 3c 3c 33 30 3a 56 42  3d 31 3c 3c 32 39 3a 6a  |1<<30:VB=1<<29:j|
000032f0  5f 3d 31 3c 3c 32 38 3a  74 6f 3d 31 3c 3c 32 37  |_=1<<28:to=1<<27|
00003300  3a 44 42 3d 31 3c 3c 32  36 3a 62 6c 3d 31 3c 3c  |:DB=1<<26:bl=1<<|
00003310  31 37 3a 63 3d 32 35 36  3a 42 61 3d 63 2b 62 6c  |17:c=256:Ba=c+bl|
00003320  3a c8 99 26 36 30 36 63  30 3a ea 85 3a ee 85 ea  |:..&606c0:..:...|
00003330  f7 85 3a c8 99 26 36 30  36 63 31 3a f2 41 28 22  |..:..&606c1:.A("|
00003340  68 6f 75 72 67 6c 61 73  73 22 29 0d 24 62 23 48  |hourglass").$b#H|
00003350  25 3d 67 75 25 3a 4c 25  3d 79 79 25 2b 67 75 25  |%=gu%:L%=yy%+gu%|
00003360  3a e7 57 4a 25 3c 3e 30  8c 57 4a 25 3d 34 0d 24  |:.WJ%<>0.WJ%=4.$|
00003370  63 22 e3 56 25 3d 38 2b  57 4a 25 b8 31 30 2b 57  |c".V%=8+WJ%.10+W|
00003380  4a 25 88 32 3a e7 28 56  25 80 34 29 3c 3e 30 8c  |J%.2:.(V%.4)<>0.|
00003390  0d 24 64 12 4f 25 3d 79  79 25 3a e7 66 4a 25 3d  |.$d.O%=yy%:.fJ%=|
000033a0  31 8c 0d 24 65 0c 50 25  3d 33 32 37 36 38 0d 24  |1..$e.P%=32768.$|
000033b0  66 09 cc 50 25 3d 30 0d  24 67 05 cd 0d 24 68 10  |f..P%=0.$g...$h.|
000033c0  cc 4f 25 3d 30 3a 50 25  3d 79 79 25 0d 24 69 0c  |.O%=0:P%=yy%.$i.|
000033d0  cd 3a c8 8e 66 4a 25 ca  0d 24 6a 34 c9 31 3a f2  |.:..fJ%..$j4.1:.|
000033e0  4d 3a f2 4f 4a 3a f2 4d  3a f2 6b 3a f2 4d 3a f2  |M:.OJ:.M:.k:.M:.|
000033f0  6b 79 3a 41 5f 3d 50 25  3a f2 4d 3a f2 68 79 3a  |ky:A_=P%:.M:.hy:|
00003400  50 79 3d 28 50 79 2b 33  29 80 2d 34 0d 24 6b 28  |Py=(Py+3).-4.$k(|
00003410  c9 30 3a f2 4d 3a f2 6b  3a f2 4d 3a f2 51 5f 3a  |.0:.M:.k:.M:.Q_:|
00003420  f2 4d 3a f2 67 4a 3a f2  4d 3a f2 6b 79 3a f2 4d  |.M:.gJ:.M:.ky:.M|
00003430  3a f2 4e 75 0d 24 6c 0c  c9 32 3a f2 4d 3a f2 6b  |:.Nu.$l..2:.M:.k|
00003440  0d 24 6d 17 cb 3a e7 56  25 80 34 8c 4c 25 3d 4f  |.$m..:.V%.4.L%=O|
00003450  25 8b 4c 25 3d 50 25 0d  24 6e 0e e7 28 56 25 80  |%.L%=P%.$n..(V%.|
00003460  32 29 3d 30 8c 0d 24 6f  19 c8 99 26 64 63 62 39  |2)=0..$o...&dcb9|
00003470  33 2c 30 2c 79 79 25 2c  4c 25 2d 79 79 25 0d 24  |3,0,yy%,L%-yy%.$|
00003480  70 22 cd 3a 48 25 3d 4c  25 2d 79 79 25 3a ed 56  |p".:H%=L%-yy%:.V|
00003490  25 3a c8 99 26 36 30 36  63 31 3a e7 57 4a 25 8c  |%:..&606c1:.WJ%.|
000034a0  0d 24 71 0b e7 66 4a 25  3d 30 8c 0d 24 72 13 48  |.$q..fJ%=0..$r.H|
000034b0  4a 2b 3d 79 79 25 3a 47  5f 2b 3d 79 79 25 0d 24  |J+=yy%:G_+=yy%.$|
000034c0  73 05 cd 0d 24 74 11 cd  3a e7 48 6c 80 66 4a 25  |s...$t..:.Hl.fJ%|
000034d0  3c 3e 32 8c 0d 24 75 09  e7 57 4a 25 8c 0d 24 76  |<>2..$u..WJ%..$v|
000034e0  18 48 25 3d 43 5f 3a e7  66 4a 25 8c 48 25 2d 3d  |.H%=C_:.fJ%.H%-=|
000034f0  33 32 37 36 38 0d 24 77  37 cc 85 31 2c 22 43 41  |32768.$w7..1,"CA|
00003500  73 6d 54 61 62 6c 65 73  49 6e 42 53 53 20 54 52  |smTablesInBSS TR|
00003510  55 45 20 77 69 74 68 6f  75 74 20 6f 66 66 73 65  |UE without offse|
00003520  74 20 61 73 73 65 6d 62  6c 79 3f 22 0d 24 78 05  |t assembly?".$x.|
00003530  cd 0d 24 79 0b cd 3a e7  72 69 25 8c 0d 24 7a 60  |..$y..:.ri%..$z`|
00003540  f1 22 41 73 73 65 6d 62  6c 65 64 20 74 6f 20 26  |."Assembled to &|
00003550  22 3b 7e 48 25 3b 22 20  3d 20 22 3b 28 28 48 25  |";~H%;" = ";((H%|
00003560  2a 31 30 2b 35 31 32 29  81 31 30 32 34 29 2f 31  |*10+512).1024)/1|
00003570  30 3b 22 4b 22 3a f1 22  43 6f 75 6c 64 20 61 73  |0;"K":."Could as|
00003580  73 65 6d 62 6c 65 20 77  69 74 68 20 22 3b 67 75  |semble with ";gu|
00003590  25 2d 48 25 3b 22 20 6c  65 73 73 22 0d 24 7b 09  |%-H%;" less".${.|
000035a0  cd 3a 3d 48 25 0d 24 7c  1a dd a4 5f 53 70 72 69  |.:=H%.$|..._Spri|
000035b0  74 65 5f 49 4f 5f 76 65  72 73 69 6f 6e 3d 36 0d  |te_IO_version=6.|
000035c0  24 7d 55 dd a4 5f 68 61  72 64 5f 69 6e 69 74 69  |$}U.._hard_initi|
000035d0  61 6c 69 73 65 5f 53 70  72 69 74 65 5f 49 4f ea  |alise_Sprite_IO.|
000035e0  85 3a ee 85 ea f7 85 3a  f2 41 28 22 25 2e 53 70  |.:.....:.A("%.Sp|
000035f0  72 69 74 65 5f 49 4f 3a  20 68 61 72 64 5f 69 6e  |rite_IO: hard_in|
00003600  69 74 69 61 6c 69 73 65  5f 53 70 72 69 74 65 5f  |itialise_Sprite_|
00003610  49 4f 22 29 0d 24 7e 5b  f2 53 28 22 3c 42 61 73  |IO").$~[.S("<Bas|
00003620  69 63 56 24 4c 69 62 3e  2e 4d 6f 64 65 49 6e 66  |icV$Lib>.ModeInf|
00003630  6f 22 2c 35 29 3a f2 53  28 22 3c 42 61 73 69 63  |o",5):.S("<Basic|
00003640  56 24 4c 69 62 3e 2e 48  65 61 70 22 2c 31 29 3a  |V$Lib>.Heap",1):|
00003650  f2 53 28 22 3c 42 61 73  69 63 56 24 4c 69 62 3e  |.S("<BasicV$Lib>|
00003660  2e 66 69 6c 65 5f 69 6f  22 2c 39 29 3a 3d 30 0d  |.file_io",9):=0.|
00003670  24 7f 17 dd a4 55 28 61  69 25 29 3d 28 61 69 25  |$....U(ai%)=(ai%|
00003680  80 31 29 3c 3e 30 0d 24  80 3e dd a4 6e 79 28 61  |.1)<>0.$.>..ny(a|
00003690  79 25 2c 4d 25 2c 4e 25  2c 79 69 25 2c 4a 6e 25  |y%,M%,N%,yi%,Jn%|
000036a0  29 c8 99 26 64 63 62 38  65 2c 33 2c 61 79 25 2c  |)..&dcb8e,3,ay%,|
000036b0  4d 25 2c 4e 25 2c 79 69  25 2c 4a 6e 25 b8 4d 25  |M%,N%,yi%,Jn%.M%|
000036c0  3a 3d 4d 25 0d 24 81 56  dd f2 69 4a 28 66 61 25  |:=M%.$.V..iJ(fa%|
000036d0  2c 6a 61 25 2c f8 79 69  25 2c f8 61 6e 25 29 ea  |,ja%,.yi%,.an%).|
000036e0  41 25 2c 42 25 2c 43 25  3a 41 25 3d 66 61 25 3a  |A%,B%,C%:A%=fa%:|
000036f0  42 25 3d 6a 61 25 3c 3e  30 3a 43 25 3d a3 3a 41  |B%=ja%<>0:C%=.:A|
00003700  25 3d ba 28 47 6c 29 3a  79 69 25 3d 21 41 25 3a  |%=.(Gl):yi%=!A%:|
00003710  61 6e 25 3d 41 25 21 34  3a e1 0d 24 82 2f dd f2  |an%=A%!4:..$./..|
00003720  4d 75 ea 73 3a ea 85 3a  ee 85 ea f7 85 3a f2 41  |Mu.s:..:.....:.A|
00003730  28 22 25 2e 53 70 72 69  74 65 5f 49 4f 3a 20 61  |("%.Sprite_IO: a|
00003740  73 73 65 6d 62 6c 65 22  29 0d 24 83 78 5b 4f 50  |ssemble").$.x[OP|
00003750  54 56 25 3a 41 4c 49 47  4e 3a 2e 73 20 44 43 44  |TV%:ALIGN:.s DCD|
00003760  30 3a 44 43 44 30 3a 2e  47 6c 3a a4 5a 3a 53 54  |0:DCD0:.Gl:.Z:ST|
00003770  4d 46 44 28 41 29 21 2c  7b 31 2d 31 32 2c 5a 7d  |MFD(A)!,{1-12,Z}|
00003780  3a 42 4c 20 6b 4a 3a 41  44 52 76 63 20 5a 2c 73  |:BL kJ:ADRvc Z,s|
00003790  3a 53 54 4d 76 63 49 41  20 5a 2c 7b 30 2d 31 7d  |:STMvcIA Z,{0-1}|
000037a0  3a 4d 4f 56 76 63 30 2c  5a 3a 4c 44 4d 46 44 28  |:MOVvc0,Z:LDMFD(|
000037b0  41 29 21 2c 7b 31 2d 31  32 2c 70 63 7d 3a 5d 3a  |A)!,{1-12,pc}:]:|
000037c0  e1 0d 24 84 16 dd a4 5f  4d 69 73 63 5f 76 65 72  |..$...._Misc_ver|
000037d0  73 69 6f 6e 3d 33 34 0d  24 85 50 dd a4 5f 68 61  |sion=34.$.P.._ha|
000037e0  72 64 5f 69 6e 69 74 69  61 6c 69 73 65 5f 4d 69  |rd_initialise_Mi|
000037f0  73 63 ea 4a 25 2c 61 25  2c 4b 25 3a ea 85 3a ee  |sc.J%,a%,K%:..:.|
00003800  85 ea f7 85 3a f2 41 28  22 25 2e 4d 69 73 63 3a  |....:.A("%.Misc:|
00003810  20 68 61 72 64 5f 69 6e  69 74 69 61 6c 69 73 65  | hard_initialise|
00003820  5f 4d 69 73 63 22 29 0d  24 86 28 e7 a4 76 3c 31  |_Misc").$.(..v<1|
00003830  32 8c 85 31 2c 22 4e 65  65 64 73 20 6e 65 77 65  |2..1,"Needs newe|
00003840  72 20 25 2e 4c 69 62 48  61 6e 64 6c 65 72 22 0d  |r %.LibHandler".|
00003850  24 87 b8 73 69 25 3d 31  33 3a 74 24 3d bd 28 73  |$..si%=13:t$=.(s|
00003860  69 25 29 3a 4f 61 25 3d  31 30 3a 72 24 3d bd 28  |i%):Oa%=10:r$=.(|
00003870  4f 61 25 29 3a 68 24 3d  74 24 2b 72 24 3a 63 6e  |Oa%):h$=t$+r$:cn|
00003880  3d 32 35 36 3a de 55 25  28 31 35 2c 31 29 3a 61  |=256:.U%(15,1):a|
00003890  25 3d 32 35 35 3a 4b 25  3d 33 3a e3 4a 25 3d 30  |%=255:K%=3:.J%=0|
000038a0  b8 31 35 3a 55 25 28 4a  25 2c 30 29 3d 61 25 3a  |.15:U%(J%,0)=a%:|
000038b0  55 25 28 4a 25 2c 31 29  3d 4b 25 3a 61 25 3d a4  |U%(J%,1)=K%:a%=.|
000038c0  68 28 61 25 2c 32 29 3a  4b 25 3d a4 68 28 4b 25  |h(a%,2):K%=.h(K%|
000038d0  2c 32 29 3a ed 4a 25 3a  62 24 3d 22 22 3a 43 6e  |,2):.J%:b$="":Cn|
000038e0  25 3d 31 30 30 3a 4f 6e  25 3d 26 37 66 66 66 30  |%=100:On%=&7fff0|
000038f0  30 3a 63 61 25 3d b9 3a  41 6e 25 3d 30 3a de 62  |0:ca%=.:An%=0:.b|
00003900  75 25 31 36 3a 3d 30 0d  24 88 3b dd a4 6c 28 4a  |u%16:=0.$.;..l(J|
00003910  24 2c 5a 4a 25 2c 57 6c  25 29 ea 4e 75 25 2c 66  |$,ZJ%,Wl%).Nu%,f|
00003920  6c 25 2c 54 69 25 2c 7a  6c 25 2c 77 6c 25 3a 6c  |l%,Ti%,zl%,wl%:l|
00003930  79 25 3d a4 74 28 4a 24  29 3a e7 56 25 80 32 3d  |y%=.t(J$):.V%.2=|
00003940  30 8c 0d 24 89 16 5b 4f  50 54 56 25 3a 44 43 44  |0..$..[OPTV%:DCD|
00003950  30 3a 44 43 44 30 3a 5d  0d 24 8a 36 cc 4e 75 25  |0:DCD0:].$.6.Nu%|
00003960  3d 57 6c 25 2d 50 25 2d  38 3a e7 94 28 4e 75 25  |=Wl%-P%-8:..(Nu%|
00003970  29 3e 36 35 35 33 35 8c  85 31 2c 22 61 64 72 6c  |)>65535..1,"adrl|
00003980  20 6f 75 74 20 6f 66 20  72 61 6e 67 65 22 0d 24  | out of range".$|
00003990  8b 2c 54 69 25 3d 94 28  4e 75 25 29 80 32 35 35  |.,Ti%=.(Nu%).255|
000039a0  3a 66 6c 25 3d 94 28 4e  75 25 29 80 36 35 32 38  |:fl%=.(Nu%).6528|
000039b0  30 3a e7 4e 75 25 3e 3d  30 8c 0d 24 8c 54 7a 6c  |0:.Nu%>=0..$.Tzl|
000039c0  25 3d 6c 79 25 84 28 26  32 38 66 30 30 30 30 2b  |%=ly%.(&28f0000+|
000039d0  28 5a 4a 25 3c 3c 31 32  29 2b 54 69 25 29 3a 77  |(ZJ%<<12)+Ti%):w|
000039e0  6c 25 3d 6c 79 25 84 28  26 32 38 30 30 63 30 30  |l%=ly%.(&2800c00|
000039f0  2b 28 5a 4a 25 3c 3c 31  36 29 2b 28 5a 4a 25 3c  |+(ZJ%<<16)+(ZJ%<|
00003a00  3c 31 32 29 2b 28 66 6c  25 3e 3e 38 29 29 0d 24  |<12)+(fl%>>8)).$|
00003a10  8d 55 cc 7a 6c 25 3d 6c  79 25 84 28 26 32 34 66  |.U.zl%=ly%.(&24f|
00003a20  30 30 30 30 2b 28 5a 4a  25 3c 3c 31 32 29 2b 54  |0000+(ZJ%<<12)+T|
00003a30  69 25 29 3a 77 6c 25 3d  6c 79 25 84 28 26 32 34  |i%):wl%=ly%.(&24|
00003a40  30 30 63 30 30 2b 28 5a  4a 25 3c 3c 31 36 29 2b  |00c00+(ZJ%<<16)+|
00003a50  28 5a 4a 25 3c 3c 31 32  29 2b 28 66 6c 25 3e 3e  |(ZJ%<<12)+(fl%>>|
00003a60  38 29 29 0d 24 8e 1c cd  3a 5b 4f 50 54 56 25 3a  |8)).$...:[OPTV%:|
00003a70  44 43 44 7a 6c 25 3a 44  43 44 77 6c 25 3a 5d 0d  |DCDzl%:DCDwl%:].|
00003a80  24 8f 08 cd 3a 3d 30 0d  24 90 29 dd a4 68 28 51  |$...:=0.$.)..h(Q|
00003a90  25 2c 43 75 25 29 ea 85  3a ee 85 ea f7 85 3a f2  |%,Cu%)..:.....:.|
00003aa0  41 28 22 25 2e 4d 69 73  63 3a 20 72 6f 6c 22 29  |A("%.Misc: rol")|
00003ab0  0d 24 91 3b 43 75 25 3d  43 75 25 83 33 32 3a 3d  |.$.;Cu%=Cu%.32:=|
00003ac0  28 51 25 3c 3c 43 75 25  29 84 28 28 28 ac 28 28  |(Q%<<Cu%).(((.((|
00003ad0  2d 31 29 3e 3e 3e 43 75  25 29 29 80 51 25 29 3e  |-1)>>>Cu%)).Q%)>|
00003ae0  3e 3e 28 33 32 2d 43 75  25 29 29 0d 24 92 50 dd  |>>(32-Cu%)).$.P.|
00003af0  f2 73 4a 28 56 24 29 ea  74 69 25 2c 62 69 25 2c  |.sJ(V$).ti%,bi%,|
00003b00  77 61 25 3a ea 85 3a ee  85 ea f7 85 3a f2 41 28  |wa%:..:.....:.A(|
00003b10  22 25 2e 4d 69 73 63 3a  20 44 65 66 69 6e 65 5f  |"%.Misc: Define_|
00003b20  4c 6f 63 61 6c 5f 56 61  72 69 61 62 6c 65 73 28  |Local_Variables(|
00003b30  60 22 2b 56 24 2b 22 27  29 22 29 0d 24 93 23 74  |`"+V$+"')").$.#t|
00003b40  69 25 3d 50 25 3a 62 69  25 3d 4f 25 3a 77 61 25  |i%=P%:bi%=O%:wa%|
00003b50  3d 56 25 3a e7 28 56 25  80 34 29 3d 30 8c 0d 24  |=V%:.(V%.4)=0..$|
00003b60  94 09 4f 25 3d 50 25 0d  24 95 50 cd 3a 50 25 3d  |..O%=P%.$.P.:P%=|
00003b70  30 3a 56 25 3d 56 25 84  36 3a 50 25 3d a0 28 22  |0:V%=V%.6:P%=.("|
00003b80  46 4e 5f 44 65 63 6c 61  72 65 5f 4c 6f 63 61 6c  |FN_Declare_Local|
00003b90  5f 56 61 72 69 61 62 6c  65 73 5f 22 2b 56 24 29  |_Variables_"+V$)|
00003ba0  3a 50 25 3d 74 69 25 3a  4f 25 3d 62 69 25 3a 56  |:P%=ti%:O%=bi%:V|
00003bb0  25 3d 77 61 25 3a e1 0d  24 96 34 dd f2 6d 5f 28  |%=wa%:..$.4..m_(|
00003bc0  4a 24 2c 4b 25 29 ea 44  25 2c 6c 79 25 3a ea 85  |J$,K%).D%,ly%:..|
00003bd0  3a ee 85 ea f7 85 3a f2  41 28 22 25 2e 4d 69 73  |:.....:.A("%.Mis|
00003be0  63 3a 20 50 52 4f 43 63  63 22 29 0d 24 97 20 6c  |c: PROCcc").$. l|
00003bf0  79 25 3d a4 74 28 4a 24  29 3a e7 56 25 80 34 8c  |y%=.t(J$):.V%.4.|
00003c00  44 25 3d 4f 25 8b 44 25  3d 50 25 0d 24 98 31 e3  |D%=O%.D%=P%.$.1.|
00003c10  4a 25 3d 31 b8 4b 25 3a  44 25 2d 3d 34 3a 21 44  |J%=1.K%:D%-=4:!D|
00003c20  25 3d 28 28 21 44 25 29  80 26 66 66 66 66 66 66  |%=((!D%).&ffffff|
00003c30  66 29 2b 6c 79 25 3a ed  4a 25 3a e1 0d 24 99 2b  |f)+ly%:.J%:..$.+|
00003c40  dd a4 74 28 4a 24 29 ea  6c 79 25 3a ea 85 3a ee  |..t(J$).ly%:..:.|
00003c50  85 ea f7 85 3a f2 41 28  22 25 2e 4d 69 73 63 3a  |....:.A("%.Misc:|
00003c60  20 46 4e 63 63 22 29 0d  24 9a 1a e7 4a 24 3d 22  | FNcc").$...J$="|
00003c70  22 84 4a 24 3d 22 20 20  22 8c 3d 31 34 3c 3c 32  |".J$="  ".=14<<2|
00003c80  38 0d 24 9b 13 e7 4a 24  3d 22 6c 6f 22 8c 3d 33  |8.$...J$="lo".=3|
00003c90  3c 3c 32 38 0d 24 9c 13  e7 4a 24 3d 22 68 73 22  |<<28.$...J$="hs"|
00003ca0  8c 3d 32 3c 3c 32 38 0d  24 9d 48 6c 79 25 3d a7  |.=2<<28.$.Hly%=.|
00003cb0  22 65 71 6e 65 63 73 63  63 6d 69 70 6c 76 73 76  |"eqnecsccmiplvsv|
00003cc0  63 68 69 6c 73 67 65 6c  74 67 74 6c 65 61 6c 6e  |chilsgeltgtlealn|
00003cd0  76 22 2c 4a 24 29 3a e7  6c 79 25 83 32 8c 3d 28  |v",J$):.ly%.2.=(|
00003ce0  28 6c 79 25 2d 31 29 3e  3e 31 29 3c 3c 32 38 0d  |(ly%-1)>>1)<<28.|
00003cf0  24 9e 30 85 31 2c 22 55  6e 72 65 63 6f 67 6e 69  |$.0.1,"Unrecogni|
00003d00  73 65 64 20 63 6f 6e 64  69 74 69 6f 6e 20 63 6f  |sed condition co|
00003d10  64 65 20 60 22 2b 4a 24  2b 22 27 22 3a 3d 30 0d  |de `"+J$+"'":=0.|
00003d20  24 9f 2f dd a4 79 79 28  51 25 2c f8 41 25 28 29  |$./..yy(Q%,.A%()|
00003d30  29 ea 85 3a ee 85 ea f7  85 3a f2 41 28 22 25 2e  |)..:.....:.A("%.|
00003d40  4d 69 73 63 3a 20 61 72  6d 69 6d 6d 22 29 0d 24  |Misc: armimm").$|
00003d50  a0 4a c8 99 26 64 63 62  39 32 2c 51 25 2c 62 75  |.J..&dcb92,Q%,bu|
00003d60  25 b8 51 25 3a 41 25 28  30 29 3d 21 62 75 25 3a  |%.Q%:A%(0)=!bu%:|
00003d70  41 25 28 31 29 3d 62 75  25 21 34 3a 41 25 28 32  |A%(1)=bu%!4:A%(2|
00003d80  29 3d 62 75 25 21 38 3a  41 25 28 33 29 3d 62 75  |)=bu%!8:A%(3)=bu|
00003d90  25 21 31 32 3a 3d 51 25  0d 24 a1 4d dd a4 5a 79  |%!12:=Q%.$.M..Zy|
00003da0  28 4a 24 2c 61 25 2c 4b  25 2c 51 25 2c 65 69 25  |(J$,a%,K%,Q%,ei%|
00003db0  29 ea 41 25 28 29 2c 4a  25 2c 62 25 3a ea 85 3a  |).A%(),J%,b%:..:|
00003dc0  ee 85 ea f7 85 3a f2 41  28 22 25 2e 4d 69 73 63  |.....:.A("%.Misc|
00003dd0  3a 20 53 75 62 74 72 61  63 74 49 6d 6d 65 64 69  |: SubtractImmedi|
00003de0  61 74 65 22 29 0d 24 a2  2a de 41 25 28 34 29 3a  |ate").$.*.A%(4):|
00003df0  4a 25 3d a4 79 79 28 94  28 51 25 29 2c 41 25 28  |J%=.yy(.(Q%),A%(|
00003e00  29 29 3a 62 25 3d 4a 25  3a e7 51 25 3c 30 8c 0d  |)):b%=J%:.Q%<0..|
00003e10  24 a3 4d c8 95 4a 25 3e  31 3a 4a 25 2d 3d 31 3a  |$.M..J%>1:J%-=1:|
00003e20  5b 4f 50 54 56 25 3a 41  44 44 20 61 25 2c 4b 25  |[OPTV%:ADD a%,K%|
00003e30  2c 23 41 25 28 4a 25 29  3a 5d 3a 4b 25 3d 61 25  |,#A%(J%):]:K%=a%|
00003e40  3a ce 3a 5b 4f 50 54 56  25 3a 41 44 44 20 61 25  |:.:[OPTV%:ADD a%|
00003e50  2c 4b 25 2c 23 41 25 28  30 29 3a 5d 0d 24 a4 4e  |,K%,#A%(0):].$.N|
00003e60  cc c8 95 4a 25 3e 31 3a  4a 25 2d 3d 31 3a 5b 4f  |...J%>1:J%-=1:[O|
00003e70  50 54 56 25 3a 53 55 42  20 61 25 2c 4b 25 2c 23  |PTV%:SUB a%,K%,#|
00003e80  41 25 28 4a 25 29 3a 5d  3a 4b 25 3d 61 25 3a ce  |A%(J%):]:K%=a%:.|
00003e90  3a 5b 4f 50 54 56 25 3a  53 55 42 20 61 25 2c 4b  |:[OPTV%:SUB a%,K|
00003ea0  25 2c 23 41 25 28 30 29  3a 5d 0d 24 a5 0b cd 3a  |%,#A%(0):].$...:|
00003eb0  e7 65 69 25 8c 0d 24 a6  15 e7 56 25 80 34 8c 61  |.ei%..$...V%.4.a|
00003ec0  25 3d 4f 25 8b 61 25 3d  50 25 0d 24 a7 10 61 25  |%=O%.a%=P%.$..a%|
00003ed0  21 2d 34 2b 3d 31 3c 3c  32 30 0d 24 a8 13 cd 3a  |!-4+=1<<20.$...:|
00003ee0  f2 6d 5f 28 4a 24 2c 62  25 29 3a 3d 30 0d 24 a9  |.m_(J$,b%):=0.$.|
00003ef0  4d dd a4 46 28 4a 24 2c  5a 4a 25 2c 57 6c 25 29  |M..F(J$,ZJ%,Wl%)|
00003f00  57 6c 25 2d 3d 50 25 2b  38 3a e7 57 6c 25 3e 3d  |Wl%-=P%+8:.Wl%>=|
00003f10  30 8c 85 31 2c 22 69 6e  76 61 6c 69 64 20 63 61  |0..1,"invalid ca|
00003f20  6c 6c 20 74 6f 20 61 64  72 66 28 29 2c 20 6c 61  |ll to adrf(), la|
00003f30  62 65 6c 20 61 68 65 61  64 22 0d 24 aa 1c 3d a4  |bel ahead".$..=.|
00003f40  5a 79 28 4a 24 2c 5a 4a  25 2c 31 35 2c 2d 57 6c  |Zy(J$,ZJ%,15,-Wl|
00003f50  25 2c 65 69 25 29 0d 24  ab 1c dd a4 74 79 28 4b  |%,ei%).$....ty(K|
00003f60  25 29 50 25 2b 3d 4b 25  3a 4f 25 2b 3d 4b 25 3a  |%)P%+=K%:O%+=K%:|
00003f70  3d 30 0d 24 ac 1a dd a4  5f 53 74 69 63 6b 79 57  |=0.$...._StickyW|
00003f80  69 6e 5f 76 65 72 73 69  6f 6e 3d 31 0d 24 ad 4b  |in_version=1.$.K|
00003f90  dd a4 5f 68 61 72 64 5f  69 6e 69 74 69 61 6c 69  |.._hard_initiali|
00003fa0  73 65 5f 53 74 69 63 6b  79 57 69 6e ea 85 3a ee  |se_StickyWin..:.|
00003fb0  85 ea f7 85 3a f2 41 28  22 25 2e 53 74 69 63 6b  |....:.A("%.Stick|
00003fc0  79 57 69 6e 3a 20 68 61  72 64 5f 69 6e 69 74 69  |yWin: hard_initi|
00003fd0  61 6c 69 73 65 22 29 0d  24 ae 0c 6c 5f 3d 33 36  |alise").$..l_=36|
00003fe0  3a 3d 30 0d 24 af 17 dd  f2 5a 75 28 5a 79 25 29  |:=0.$....Zu(Zy%)|
00003ff0  5a 79 25 21 33 32 3d 30  3a e1 0d 24 b0 28 dd f2  |Zy%!32=0:..$.(..|
00004000  6e 79 28 55 79 25 2c 5a  79 25 2c 6d 61 25 29 21  |ny(Uy%,Zy%,ma%)!|
00004010  5a 79 25 3d 55 79 25 3a  e7 5a 79 25 21 33 32 3d  |Zy%=Uy%:.Zy%!32=|
00004020  30 8c 0d 24 b1 11 c8 99  26 34 30 30 63 62 2c 2c  |0..$....&400cb,,|
00004030  5a 79 25 0d 24 b2 20 cd  3a 5a 79 25 21 32 38 3d  |Zy%.$. .:Zy%!28=|
00004040  6d 61 25 3a c8 99 26 34  30 30 63 35 2c 2c 5a 79  |ma%:..&400c5,,Zy|
00004050  25 3a e1 0d 24 b3 17 dd  f2 6e 28 55 79 25 2c 5a  |%:..$....n(Uy%,Z|
00004060  79 25 29 e7 55 79 25 3e  30 8c 0d 24 b4 1e f2 43  |y%).Uy%>0..$...C|
00004070  79 28 55 79 25 2c 5a 79  25 29 3a c8 99 26 34 30  |y(Uy%,Zy%):..&40|
00004080  30 63 36 2c 2c 5a 79 25  0d 24 b5 07 cd 3a e1 0d  |0c6,,Zy%.$...:..|
00004090  24 b6 18 dd f2 43 79 28  55 79 25 2c 5a 79 25 29  |$....Cy(Uy%,Zy%)|
000040a0  e7 55 79 25 3e 30 8c 0d  24 b7 1a 21 5a 79 25 3d  |.Uy%>0..$..!Zy%=|
000040b0  55 79 25 3a c8 99 26 34  30 30 63 62 2c 2c 5a 79  |Uy%:..&400cb,,Zy|
000040c0  25 0d 24 b8 07 cd 3a e1  0d 24 b9 19 dd a4 5f 54  |%.$...:..$...._T|
000040d0  65 6d 70 6c 61 74 65 5f  76 65 72 73 69 6f 6e 3d  |emplate_version=|
000040e0  34 0d 24 ba 4e dd a4 5f  68 61 72 64 5f 69 6e 69  |4.$.N.._hard_ini|
000040f0  74 69 61 6c 69 73 65 5f  54 65 6d 70 6c 61 74 65  |tialise_Template|
00004100  ea 58 79 25 3a ea 85 3a  ee 85 ea f7 85 3a f2 41  |.Xy%:..:.....:.A|
00004110  28 22 25 2e 54 65 6d 70  6c 61 74 65 3a 20 68 61  |("%.Template: ha|
00004120  72 64 5f 69 6e 69 74 69  61 6c 69 73 65 22 29 0d  |rd_initialise").|
00004130  24 bb 0c 54 75 25 3d a3  3a 3d 30 0d 24 bc 4f dd  |$..Tu%=.:=0.$.O.|
00004140  f2 75 5f ea 7a 79 25 2c  58 79 25 2c 52 25 2c 55  |.u_.zy%,Xy%,R%,U|
00004150  25 2c 51 24 2c 4f 6c 25  3a 51 24 3d a4 49 79 28  |%,Q$,Ol%:Q$=.Iy(|
00004160  22 3c 22 2b 42 24 2b 22  24 44 69 72 3e 2e 53 70  |"<"+B$+"$Dir>.Sp|
00004170  72 69 74 65 73 22 29 3a  7a 79 25 3d a4 62 28 51  |rites"):zy%=.b(Q|
00004180  24 29 3a e7 7a 79 25 3e  30 8c 0d 24 bd 58 f2 58  |$):.zy%>0..$.X.X|
00004190  28 76 25 2c 7a 79 25 2b  31 36 29 3a 76 25 21 30  |(v%,zy%+16):v%!0|
000041a0  3d 7a 79 25 2b 31 36 3a  76 25 21 34 3d 30 3a 76  |=zy%+16:v%!4=0:v|
000041b0  25 21 38 3d 31 36 3a 76  25 21 31 32 3d 31 36 3a  |%!8=16:v%!12=16:|
000041c0  c8 99 26 32 30 30 32 65  2c 35 32 32 2c 76 25 2c  |..&2002e,522,v%,|
000041d0  51 24 b8 58 79 25 3b 52  25 3a e7 a4 55 28 52 25  |Q$.Xy%;R%:..U(R%|
000041e0  29 8c 0d 24 be 2b f2 55  28 22 52 65 61 73 6f 6e  |)..$.+.U("Reason|
000041f0  22 2c 22 53 70 72 69 74  65 73 22 29 3a f2 6f 28  |","Sprites"):.o(|
00004200  58 79 25 29 3a f2 4c 28  34 29 3a f2 42 0d 24 bf  |Xy%):.L(4):.B.$.|
00004210  05 cd 0d 24 c0 09 cc 76  25 3d 30 0d 24 c1 1c cd  |...$...v%=0.$...|
00004220  3a f2 53 4a 28 22 54 65  6d 70 6c 61 74 65 73 22  |:.SJ("Templates"|
00004230  29 3a e7 54 75 25 8c 0d  24 c2 0a e7 76 25 3e 30  |):.Tu%..$...v%>0|
00004240  8c 0d 24 c3 20 f2 71 28  22 50 72 6f 67 49 6e 66  |..$. .q("ProgInf|
00004250  6f 22 2c 76 25 2c 22 50  72 6f 67 49 6e 66 6f 22  |o",v%,"ProgInfo"|
00004260  29 0d 24 c4 21 cc f2 71  28 22 50 72 6f 67 49 6e  |).$.!..q("ProgIn|
00004270  66 6f 22 2c 2b 31 2c 22  50 72 6f 67 49 6e 66 6f  |fo",+1,"ProgInfo|
00004280  22 29 0d 24 c5 0b cd 3a  4e 5f 25 3d 30 0d 24 c6  |").$...:N_%=0.$.|
00004290  0b cc e7 76 25 3e 30 8c  0d 24 c7 1d 4e 5f 25 3d  |...v%>0..$..N_%=|
000042a0  a4 52 28 22 50 72 6f 67  49 6e 66 6f 22 2c 4f 6c  |.R("ProgInfo",Ol|
000042b0  25 2c 76 25 29 0d 24 c8  1e cc 4e 5f 25 3d a4 52  |%,v%).$...N_%=.R|
000042c0  28 22 50 72 6f 67 49 6e  66 6f 22 2c 4f 6c 25 2c  |("ProgInfo",Ol%,|
000042d0  2b 31 29 0d 24 c9 05 cd  0d 24 ca 22 cd 3a 55 69  |+1).$....$.".:Ui|
000042e0  25 3d a4 52 28 22 51 75  65 72 79 22 2c 4f 6c 25  |%=.R("Query",Ol%|
000042f0  2c 2b 31 29 3a f2 5f 5f  3a e1 0d 24 cb 5c dd f2  |,+1):.__:..$.\..|
00004300  53 4a 28 5f 24 29 ea 6a  69 25 2c 6a 79 25 2c 7a  |SJ(_$).ji%,jy%,z|
00004310  79 25 2c 58 79 25 2c 52  25 2c 47 25 3a ea 4e 61  |y%,Xy%,R%,G%:.Na|
00004320  25 2c 51 24 2c 55 4a 25  2c 64 75 25 3a 51 24 3d  |%,Q$,UJ%,du%:Q$=|
00004330  22 3c 22 2b 42 24 2b 22  24 44 69 72 3e 2e 22 2b  |"<"+B$+"$Dir>."+|
00004340  5f 24 3a 7a 79 25 3d a4  62 28 51 24 29 3a e7 7a  |_$:zy%=.b(Q$):.z|
00004350  79 25 3c 3d 30 8c 0d 24  cc 32 f2 55 28 22 52 65  |y%<=0..$.2.U("Re|
00004360  61 73 6f 6e 22 2c 5f 24  29 3a f2 55 28 22 53 79  |ason",_$):.U("Sy|
00004370  73 22 2c 22 4e 6f 74 20  66 6f 75 6e 64 22 29 3a  |s","Not found"):|
00004380  f2 4c 28 34 29 3a f2 42  0d 24 cd 51 cd 3a f2 58  |.L(4):.B.$.Q.:.X|
00004390  28 6a 79 25 2c 7a 79 25  29 3a f2 58 28 55 4a 25  |(jy%,zy%):.X(UJ%|
000043a0  2c 7a 79 25 2b 6d 29 3a  64 75 25 3d 55 4a 25 2b  |,zy%+m):du%=UJ%+|
000043b0  41 4a 3a 4e 61 25 3d 55  4a 25 2b 6d 3a c8 99 26  |AJ:Na%=UJ%+m:..&|
000043c0  36 30 30 64 39 2c 2c 51  24 b8 58 79 25 3b 52 25  |600d9,,Q$.Xy%;R%|
000043d0  3a e7 a4 55 28 52 25 29  8c 0d 24 ce 36 f2 55 28  |:..U(R%)..$.6.U(|
000043e0  22 52 65 61 73 6f 6e 22  2c 22 54 65 6d 70 6c 61  |"Reason","Templa|
000043f0  74 65 73 22 29 3a f2 6f  28 58 79 25 29 3a f2 4c  |tes"):.o(Xy%):.L|
00004400  28 34 29 3a c8 99 26 36  30 30 64 61 3a f2 42 0d  |(4):..&600da:.B.|
00004410  24 cf 12 cd 3a ea 85 3a  ee 85 ea f7 85 3a f2 67  |$...:..:.....:.g|
00004420  75 0d 24 d0 58 52 5f 25  3d 30 3a f5 64 75 25 21  |u.$.XR_%=0:.du%!|
00004430  30 3d 97 28 22 2a 22 29  3a c8 99 26 36 30 30 64  |0=.("*"):..&600d|
00004440  62 2c 2c 4e 61 25 2c 6a  79 25 2c 6a 79 25 2b 7a  |b,,Na%,jy%,jy%+z|
00004450  79 25 2c 2d 31 2c 64 75  25 2c 52 5f 25 b8 58 79  |y%,-1,du%,R_%.Xy|
00004460  25 2c 2c 6a 69 25 2c 2c  2c 2c 52 5f 25 3b 52 25  |%,,ji%,,,,R_%;R%|
00004470  3a e7 a4 55 28 52 25 29  8c 0d 24 d1 17 f2 66 28  |:..U(R%)..$...f(|
00004480  58 79 25 29 3a c8 99 26  36 30 30 64 61 3a f2 42  |Xy%):..&600da:.B|
00004490  0d 24 d2 0b cd 3a e7 52  5f 25 8c 0d 24 d3 26 e3  |.$...:.R_%..$.&.|
000044a0  52 25 3d 30 b8 31 31 3a  e7 64 75 25 3f 52 25 3d  |R%=0.11:.du%?R%=|
000044b0  31 33 8c 64 75 25 3f 52  25 3d 30 3a 52 25 3d 31  |13.du%?R%=0:R%=1|
000044c0  32 0d 24 d4 33 ed 52 25  3a 55 4a 25 21 6f 75 3d  |2.$.3.R%:UJ%!ou=|
000044d0  6a 69 25 2d 6a 79 25 3a  55 4a 25 21 73 75 3d 6a  |ji%-jy%:UJ%!su=j|
000044e0  79 25 3a 47 25 3d a4 72  28 55 4a 25 29 3a e7 47  |y%:G%=.r(UJ%):.G|
000044f0  25 3d 30 8c 0d 24 d5 16  f2 4c 28 31 36 29 3a c8  |%=0..$...L(16):.|
00004500  99 26 36 30 30 64 61 3a  f2 42 0d 24 d6 18 cd 3a  |.&600da:.B.$...:|
00004510  47 25 21 77 79 3d 21 71  75 25 3a 21 71 75 25 3d  |G%!wy=!qu%:!qu%=|
00004520  47 25 0d 24 d7 2a cd 3a  fd 52 5f 25 3d 30 3a f7  |G%.$.*.:.R_%=0:.|
00004530  85 3a c8 99 26 34 30 30  64 61 3a f2 57 28 55 4a  |.:..&400da:.W(UJ|
00004540  25 29 3a f2 57 28 6a 79  25 29 3a e1 0d 24 d8 21  |%):.W(jy%):..$.!|
00004550  dd f2 67 75 c8 99 26 36  30 30 64 61 3a f2 41 28  |..gu..&600da:.A(|
00004560  22 54 65 6d 70 6c 61 74  65 22 29 3a e1 0d 24 d9  |"Template"):..$.|
00004570  26 dd a4 52 28 43 24 2c  74 61 25 2c 68 75 25 29  |&..R(C$,ta%,hu%)|
00004580  3d a4 4e 79 28 43 24 2c  74 61 25 2c 68 75 25 2c  |=.Ny(C$,ta%,hu%,|
00004590  22 22 29 0d 24 da 32 dd  a4 4e 79 28 43 24 2c 74  |"").$.2..Ny(C$,t|
000045a0  61 25 2c 68 75 25 2c 50  24 29 ea 47 25 2c 71 61  |a%,hu%,P$).G%,qa|
000045b0  25 2c 4e 25 3a 47 25 3d  a4 58 28 43 24 29 3a e7  |%,N%:G%=.X(C$):.|
000045c0  47 25 3d 30 8c 0d 24 db  06 f2 42 0d 24 dc 22 cd  |G%=0..$...B.$.".|
000045d0  3a 71 61 25 3d 47 25 2b  6d 3a 71 61 25 21 36 34  |:qa%=G%+m:qa%!64|
000045e0  3d 68 75 25 3a e7 50 24  3c 3e 22 22 8c 0d 24 dd  |=hu%:.P$<>""..$.|
000045f0  12 4e 25 3d a4 4a 28 22  46 4e 22 2b 50 24 29 0d  |.N%=.J("FN"+P$).|
00004600  24 de 11 cd 3a e7 a4 4f  28 47 25 2c 4e 25 29 8c  |$...:..O(G%,N%).|
00004610  0d 24 df 06 f2 42 0d 24  e0 10 cd 3a f2 73 28 47  |.$...B.$...:.s(G|
00004620  25 29 3a 3d 4e 25 0d 24  e1 29 dd f2 71 28 43 24  |%):=N%.$.)..q(C$|
00004630  2c 68 75 25 2c 50 24 29  ea 47 25 2c 4d 25 3a 47  |,hu%,P$).G%,M%:G|
00004640  25 3d a4 58 28 43 24 29  3a e7 47 25 3d 30 8c 0d  |%=.X(C$):.G%=0..|
00004650  24 e2 06 f2 42 0d 24 e3  20 cd 3a 4d 25 3d 47 25  |$...B.$. .:M%=G%|
00004660  2b 6d 3a 4d 25 21 36 34  3d 68 75 25 3a e7 50 24  |+m:M%!64=hu%:.P$|
00004670  3c 3e 22 22 8c 0d 24 e4  20 4d 25 3d a4 4a 28 22  |<>""..$. M%=.J("|
00004680  46 4e 22 2b 50 24 2b 22  28 22 2b c3 28 4d 25 29  |FN"+P$+"("+.(M%)|
00004690  2b 22 29 22 29 0d 24 e5  07 cd 3a e1 0d 24 e6 26  |+")").$...:..$.&|
000046a0  dd a4 45 28 43 24 2c 68  75 25 29 ea 47 25 2c 4d  |..E(C$,hu%).G%,M|
000046b0  25 3a 47 25 3d a4 58 28  43 24 29 3a e7 47 25 3d  |%:G%=.X(C$):.G%=|
000046c0  30 8c 0d 24 e7 06 f2 42  0d 24 e8 1a cd 3a 4d 25  |0..$...B.$...:M%|
000046d0  3d 47 25 2b 6d 3a 4d 25  21 36 34 3d 68 75 25 3a  |=G%+m:M%!64=hu%:|
000046e0  3d 30 0d 24 e9 24 dd a4  44 28 43 24 2c f8 55 79  |=0.$.$..D(C$,.Uy|
000046f0  25 29 ea 47 25 2c 54 25  3a 54 25 3d a3 3a e7 55  |%).G%,T%:T%=.:.U|
00004700  79 25 3c 3d 30 8c 0d 24  ea 12 47 25 3d a4 58 28  |y%<=0..$..G%=.X(|
00004710  43 24 29 3a e7 47 25 8c  0d 24 eb 18 54 25 3d a4  |C$):.G%..$..T%=.|
00004720  4f 28 47 25 2c 55 79 25  29 3a e7 54 25 3d a3 8c  |O(G%,Uy%):.T%=..|
00004730  0d 24 ec 0a f2 73 28 47  25 29 0d 24 ed 05 cd 0d  |.$...s(G%).$....|
00004740  24 ee 09 cc 54 25 3d b9  0d 24 ef 05 cd 0d 24 f0  |$...T%=..$....$.|
00004750  09 cd 3a 3d 54 25 0d 24  f1 23 dd a4 67 28 43 24  |..:=T%.$.#..g(C$|
00004760  2c 63 25 2c 66 25 29 ea  47 25 3a 47 25 3d a4 58  |,c%,f%).G%:G%=.X|
00004770  28 43 24 29 3a e7 47 25  8c 0d 24 f2 14 47 25 3d  |(C$):.G%..$..G%=|
00004780  a4 63 79 28 47 25 2c 63  25 2c 66 25 29 0d 24 f3  |.cy(G%,c%,f%).$.|
00004790  09 cd 3a 3d 47 25 0d 24  f4 27 dd a4 71 79 28 43  |..:=G%.$.'..qy(C|
000047a0  24 2c 63 25 2c 66 25 2c  59 24 29 ea 47 25 3a 47  |$,c%,f%,Y$).G%:G|
000047b0  25 3d a4 58 28 43 24 29  3a e7 47 25 8c 0d 24 f5  |%=.X(C$):.G%..$.|
000047c0  17 47 25 3d a4 68 79 28  47 25 2c 63 25 2c 66 25  |.G%=.hy(G%,c%,f%|
000047d0  2c 59 24 29 0d 24 f6 09  cd 3a 3d 47 25 0d 24 f7  |,Y$).$...:=G%.$.|
000047e0  49 dd a4 56 79 28 43 24  29 ea 47 25 2c 5f 24 2c  |I..Vy(C$).G%,_$,|
000047f0  59 25 3a 47 25 3d 21 71  75 25 3a 59 25 3d a3 3a  |Y%:G%=!qu%:Y%=.:|
00004800  c8 95 47 25 80 28 ac 59  25 29 3a 59 25 3d 28 a4  |..G%.(.Y%):Y%=(.|
00004810  78 79 28 47 25 2b 41 4a  2c 31 32 29 3d 43 24 29  |xy(G%+AJ,12)=C$)|
00004820  3a e7 ac 59 25 8c 0d 24  f8 0c 47 25 3d 47 25 21  |:..Y%..$..G%=G%!|
00004830  77 79 0d 24 f9 0b cd 3a  ce 3a 3d 47 25 0d 24 fa  |wy.$...:.:=G%.$.|
00004840  20 dd a4 58 28 43 24 29  ea 47 25 3a 47 25 3d a4  | ..X(C$).G%:G%=.|
00004850  56 79 28 43 24 29 3a e7  47 25 3d 30 8c 0d 24 fb  |Vy(C$):.G%=0..$.|
00004860  19 f2 55 28 22 52 65 61  73 6f 6e 22 2c 43 24 29  |..U("Reason",C$)|
00004870  3a f2 4c 28 33 29 0d 24  fc 09 cd 3a 3d 47 25 0d  |:.L(3).$...:=G%.|
00004880  24 fd 34 dd a4 4f 28 47  25 2c f8 55 79 25 29 c8  |$.4..O(G%,.Uy%).|
00004890  99 26 36 30 30 63 31 2c  2c 47 25 2b 6d b8 55 79  |.&600c1,,G%+m.Uy|
000048a0  25 3b 47 25 3a 47 25 3d  a4 55 28 47 25 29 3a e7  |%;G%:G%=.U(G%):.|
000048b0  47 25 8c 0d 24 fe 11 f2  66 28 55 79 25 29 3a 55  |G%..$...f(Uy%):U|
000048c0  79 25 3d 30 0d 24 ff 09  cd 3a 3d 47 25 0d 25 00  |y%=0.$...:=G%.%.|
000048d0  20 dd f2 60 79 28 47 25  2c f8 55 79 25 29 47 25  | ..`y(G%,.Uy%)G%|
000048e0  3d a4 4f 28 47 25 2c 55  79 25 29 3a e1 0d 25 01  |=.O(G%,Uy%):..%.|
000048f0  41 dd a4 63 79 28 47 25  2c 63 25 2c 66 25 29 ea  |A..cy(G%,c%,f%).|
00004900  4e 25 2c 4d 25 2c 52 25  3a 4e 25 3d 30 3a 52 25  |N%,M%,R%:N%=0:R%|
00004910  3d 47 25 21 62 79 3a 47  25 21 62 79 2b 3d 31 3a  |=G%!by:G%!by+=1:|
00004920  47 25 3d a4 72 28 47 25  29 3a e7 47 25 8c 0d 25  |G%=.r(G%):.G%..%|
00004930  02 41 4d 25 3d 47 25 2b  6d 3a f2 44 79 28 4d 25  |.AM%=G%+m:.Dy(M%|
00004940  2c 52 25 2c 63 25 29 3a  f2 69 79 28 4d 25 2b 34  |,R%,c%):.iy(M%+4|
00004950  2c 52 25 2c 66 25 29 3a  f2 60 79 28 47 25 2c 4e  |,R%,f%):.`y(G%,N|
00004960  25 29 3a f2 73 28 47 25  29 3a 47 25 3d 4e 25 0d  |%):.s(G%):G%=N%.|
00004970  25 03 09 cd 3a 3d 47 25  0d 25 04 44 dd a4 68 79  |%...:=G%.%.D..hy|
00004980  28 47 25 2c 63 25 2c 66  25 2c 59 24 29 ea 4e 25  |(G%,c%,f%,Y$).N%|
00004990  2c 4d 25 2c 52 25 3a 4e  25 3d 30 3a 52 25 3d 47  |,M%,R%:N%=0:R%=G|
000049a0  25 21 62 79 3a 47 25 21  62 79 2b 3d 31 3a 47 25  |%!by:G%!by+=1:G%|
000049b0  3d a4 72 28 47 25 29 3a  e7 47 25 8c 0d 25 05 38  |=.r(G%):.G%..%.8|
000049c0  4d 25 3d 47 25 2b 6d 3a  f2 44 79 28 4d 25 2c 52  |M%=G%+m:.Dy(M%,R|
000049d0  25 2c 63 25 29 3a f2 69  79 28 4d 25 2b 34 2c 52  |%,c%):.iy(M%+4,R|
000049e0  25 2c 66 25 29 3a e7 4d  25 21 35 36 80 28 31 3c  |%,f%):.M%!56.(1<|
000049f0  3c 38 29 8c 0d 25 06 17  f2 4d 5f 28 4d 25 21 37  |<8)..%...M_(M%!7|
00004a00  32 2c 59 24 2c 4d 25 21  38 30 29 0d 25 07 15 cc  |2,Y$,M%!80).%...|
00004a10  f2 4d 5f 28 4d 25 2b 37  32 2c 59 24 2c 31 32 29  |.M_(M%+72,Y$,12)|
00004a20  0d 25 08 1d cd 3a f2 60  79 28 47 25 2c 4e 25 29  |.%...:.`y(G%,N%)|
00004a30  3a f2 73 28 47 25 29 3a  47 25 3d 4e 25 0d 25 09  |:.s(G%):G%=N%.%.|
00004a40  09 cd 3a 3d 47 25 0d 25  0a 3a dd f2 44 79 28 4d  |..:=G%.%.:..Dy(M|
00004a50  25 2c 52 25 2c 46 25 29  ea 4e 25 2c 5f 25 3a 5f  |%,R%,F%).N%,_%:_|
00004a60  25 3d 59 75 25 3c 3c 53  79 25 3a 4e 25 3d 4d 25  |%=Yu%<<Sy%:N%=M%|
00004a70  21 38 2d 4d 25 21 30 3a  e7 5f 25 3c 3d 4e 25 8c  |!8-M%!0:._%<=N%.|
00004a80  0d 25 0b 0a 4d 25 21 30  3d 30 0d 25 0c 14 cc 5f  |.%..M%!0=0.%..._|
00004a90  25 3d 5f 25 2d 4e 25 3a  e7 46 25 3c 30 8c 0d 25  |%=_%-N%:.F%<0..%|
00004aa0  0d 11 46 25 3d 5f 25 2b  28 46 25 83 5f 25 29 0d  |..F%=_%+(F%._%).|
00004ab0  25 0e 1a cd 3a 4d 25 21  30 3d 28 4d 25 21 30 2b  |%...:M%!0=(M%!0+|
00004ac0  46 25 2a 52 25 29 83 5f  25 0d 25 0f 14 cd 3a 4d  |F%*R%)._%.%...:M|
00004ad0  25 21 38 3d 4d 25 21 30  2b 4e 25 3a e1 0d 25 10  |%!8=M%!0+N%:..%.|
00004ae0  41 dd f2 69 79 28 4d 25  2c 52 25 2c 46 25 29 ea  |A..iy(M%,R%,F%).|
00004af0  4e 25 2c 5f 25 3a 5f 25  3d 28 77 5f 25 3c 3c 6d  |N%,_%:_%=(w_%<<m|
00004b00  25 29 2d 39 36 3a 4e 25  3d 4d 25 21 38 2d 4d 25  |%)-96:N%=M%!8-M%|
00004b10  21 30 2b 34 38 3a e7 5f  25 3c 3d 4e 25 8c 0d 25  |!0+48:._%<=N%..%|
00004b20  11 15 4d 25 21 38 3d 28  77 5f 25 3c 3c 6d 25 29  |..M%!8=(w_%<<m%)|
00004b30  2d 4e 25 0d 25 12 14 cc  5f 25 3d 5f 25 2d 4e 25  |-N%.%..._%=_%-N%|
00004b40  3a e7 46 25 3c 30 8c 0d  25 13 11 46 25 3d 5f 25  |:.F%<0..%..F%=_%|
00004b50  2b 28 46 25 83 5f 25 29  0d 25 14 3a cd 3a 4d 25  |+(F%._%).%.:.:M%|
00004b60  21 38 3d 28 77 5f 25 3c  3c 6d 25 29 2d 4d 25 21  |!8=(w_%<<m%)-M%!|
00004b70  38 3a 4d 25 21 38 3d 28  77 5f 25 3c 3c 6d 25 29  |8:M%!8=(w_%<<m%)|
00004b80  2d 28 28 4d 25 21 38 2b  46 25 2a 52 25 29 83 5f  |-((M%!8+F%*R%)._|
00004b90  25 29 0d 25 15 14 cd 3a  4d 25 21 30 3d 4d 25 21  |%).%...:M%!0=M%!|
00004ba0  38 2d 4e 25 3a e1 0d 25  16 3b dd f2 73 28 47 25  |8-N%:..%.;..s(G%|
00004bb0  29 ea 44 25 3a 44 25 3d  71 75 25 3a c8 95 21 44  |).D%:D%=qu%:..!D|
00004bc0  25 3c 3e 30 80 21 44 25  3c 3e 47 25 3a 44 25 3d  |%<>0.!D%<>G%:D%=|
00004bd0  21 44 25 2b 77 79 3a ce  3a e7 21 44 25 3d 47 25  |!D%+wy:.:.!D%=G%|
00004be0  8c 0d 25 17 1c 21 44 25  3d 47 25 21 77 79 3a 47  |..%..!D%=G%!wy:G|
00004bf0  25 21 77 79 3d 30 3a f2  57 28 47 25 29 0d 25 18  |%!wy=0:.W(G%).%.|
00004c00  07 cd 3a e1 0d 25 19 12  dd a4 76 79 28 41 25 29  |..:..%....vy(A%)|
00004c10  3d ba 28 48 69 29 0d 25  1a 1c dd a4 72 28 41 25  |=.(Hi).%....r(A%|
00004c20  29 41 25 3d a4 76 79 28  41 25 29 3a e7 41 25 3d  |)A%=.vy(A%):.A%=|
00004c30  30 8c 0d 25 1b 0a f2 4c  28 31 36 29 0d 25 1c 09  |0..%...L(16).%..|
00004c40  cd 3a 3d 41 25 0d 25 1d  21 dd f2 79 5f e7 28 56  |.:=A%.%.!..y_.(V|
00004c50  25 80 32 29 3d 30 8c f2  73 4a 28 22 54 65 6d 70  |%.2)=0..sJ("Temp|
00004c60  6c 61 74 65 22 29 0d 25  1e 20 5b 4f 50 54 56 25  |late").%. [OPTV%|
00004c70  3a 41 4c 49 47 4e 3a 2e  48 69 3a a4 5a 3a 42 20  |:ALIGN:.Hi:.Z:B |
00004c80  70 6c 3a 5d 3a e1 0d 25  1f 40 dd a4 5f 44 65 63  |pl:]:..%.@.._Dec|
00004c90  6c 61 72 65 5f 4c 6f 63  61 6c 5f 56 61 72 69 61  |lare_Local_Varia|
00004ca0  62 6c 65 73 5f 54 65 6d  70 6c 61 74 65 ea 85 3a  |bles_Template..:|
00004cb0  ee 85 ea f7 85 3a f2 41  28 22 40 2e 54 65 6d 70  |.....:.A("@.Temp|
00004cc0  6c 61 74 65 22 29 0d 25  20 5b de 71 75 25 34 3a  |late").% [.qu%4:|
00004cd0  21 71 75 25 3d 30 3a 50  25 3d 30 3a 5b 4f 50 54  |!qu%=0:P%=0:[OPT|
00004ce0  56 25 3a 2e 77 79 20 44  43 44 30 3a 2e 62 79 20  |V%:.wy DCD0:.by |
00004cf0  44 43 44 30 3a 2e 73 75  20 44 43 44 30 3a 2e 6f  |DCD0:.su DCD0:.o|
00004d00  75 20 44 43 44 30 3a 2e  41 4a 20 44 43 44 30 3a  |u DCD0:.AJ DCD0:|
00004d10  44 43 44 30 3a 44 43 44  30 3a 2e 6d 3a 5d 3a 3d  |DCD0:DCD0:.m:]:=|
00004d20  30 0d 25 21 1f dd f2 59  4a 3a ea 64 25 2c 69 25  |0.%!...YJ:.d%,i%|
00004d30  2c 53 24 3a ea dc 3a f7  2b 30 3a e7 54 75 25 8c  |,S$:..:.+0:.Tu%.|
00004d40  0d 25 22 28 64 25 3d 21  28 a4 58 28 22 50 72 6f  |.%"(d%=!(.X("Pro|
00004d50  67 49 6e 66 6f 22 29 2b  6d 2b 38 38 2b 28 31 36  |gInfo")+m+88+(16|
00004d60  3c 3c 35 29 2b 32 30 29  0d 25 23 14 cc 3a 64 25  |<<5)+20).%#..:d%|
00004d70  3d a4 77 79 28 4e 5f 25  2c 31 36 29 0d 25 24 4a  |=.wy(N_%,16).%$J|
00004d80  cd 3a f3 53 24 3a 69 25  3d 97 28 53 24 29 3a 53  |.:.S$:i%=.(S$):S|
00004d90  24 3d c1 53 24 2c 32 29  3a c8 95 53 24 3c 3e 22  |$=.S$,2):..S$<>"|
00004da0  22 3a 3f 64 25 3d 97 28  53 24 29 82 69 25 3a 53  |":?d%=.(S$).i%:S|
00004db0  24 3d c1 53 24 2c 32 29  3a 64 25 2b 3d 31 3a ce  |$=.S$,2):d%+=1:.|
00004dc0  3a 3f 64 25 3d 30 0d 25  25 38 dc 22 d2 82 87 90  |:?d%=0.%%8."....|
00004dd0  9e 9b 91 f2 96 9d 9f 93  9b 9c 22 2c 2c 2c 2c 2c  |..........",,,,,|
00004de0  2c 2c 2c 2c 2c 2c 2c 2c  2c 2c 2c 2c 2c 2c 2c 2c  |,,,,,,,,,,,,,,,,|
00004df0  2c 2c 2c 2c 2c 2c 2c 2c  2c 2c 2c 2c 2c 2c 0d 25  |,,,,,,,,,,,,,,.%|
00004e00  26 05 e1 0d 25 27 22 dd  f2 6b 3a ea 85 3a ee 85  |&...%'"..k:..:..|
00004e10  ea f7 85 3a f2 41 28 22  40 2e 41 73 73 65 6d 62  |...:.A("@.Assemb|
00004e20  6c 65 72 22 29 0d 25 28  0e e7 28 56 25 80 32 29  |ler").%(..(V%.2)|
00004e30  3d 30 8c 0d 25 29 07 f2  72 4a 0d 25 2a c8 cd 3a  |=0..%)..rJ.%*..:|
00004e40  5b 4f 50 54 56 25 3a 41  4c 49 47 4e 3a 2e 75 5f  |[OPTV%:ALIGN:.u_|
00004e50  20 44 43 44 30 3a 2e 4e  75 20 4c 44 52 30 2c 75  | DCD0:.Nu LDR0,u|
00004e60  5f 3a 4d 4f 56 53 70 63  2c 5a 3a 2e 76 75 3a 5d  |_:MOVSpc,Z:.vu:]|
00004e70  3a 50 25 2b 3d 73 5f 25  3a 4f 25 2b 3d 73 5f 25  |:P%+=s_%:O%+=s_%|
00004e80  3a 5b 4f 50 54 56 25 3a  5d 3a f2 4d 3a f2 65 4a  |:[OPTV%:]:.M:.eJ|
00004e90  3a f2 4d 3a f2 46 4a 3a  f2 4d 3a f2 48 4a 3a f2  |:.M:.FJ:.M:.HJ:.|
00004ea0  4d 3a f2 61 5f 3a f2 4d  3a f2 4e 4a 3a f2 4d 3a  |M:.a_:.M:.NJ:.M:|
00004eb0  f2 5a 4a 3a f2 4d 3a f2  56 5f 3a f2 4d 3a f2 61  |.ZJ:.M:.V_:.M:.a|
00004ec0  75 3a f2 4d 3a f2 4d 4a  3a f2 4d 3a f2 6c 4a 3a  |u:.M:.MJ:.M:.lJ:|
00004ed0  f2 4d 3a f2 78 4a 3a f2  4d 3a f2 52 4a 3a f2 4d  |.M:.xJ:.M:.RJ:.M|
00004ee0  3a f2 71 75 3a f2 4d 3a  f2 63 4a 3a f2 4d 3a f2  |:.qu:.M:.cJ:.M:.|
00004ef0  6b 5f 3a f2 4d 3a f2 4d  75 3a f2 4d 3a f2 79 5f  |k_:.M:.Mu:.M:.y_|
00004f00  3a e1 0d 25 2b 0a dd f2  68 79 3a e1 0d 25 2c 5b  |:..%+...hy:..%,[|
00004f10  dd f2 5a 4a 3a 5b 4f 50  54 56 25 3a 41 4c 49 47  |..ZJ:[OPTV%:ALIG|
00004f20  4e 3a 2e 78 79 25 44 43  44 30 3a 2e 53 5f 20 44  |N:.xy%DCD0:.S_ D|
00004f30  43 44 30 3a 41 4c 49 47  4e 3a 2e 72 3a 4c 44 52  |CD0:ALIGN:.r:LDR|
00004f40  31 32 2c 53 5f 3a 4d 4f  56 53 70 63 2c 5a 3a 2e  |12,S_:MOVSpc,Z:.|
00004f50  55 60 3a 53 54 52 30 2c  53 5f 3a 4d 4f 56 53 70  |U`:STR0,S_:MOVSp|
00004f60  63 2c 5a 3a 5d 3a e1 0d  25 2d 4f dd f2 61 5f 3a  |c,Z:]:..%-O..a_:|
00004f70  ea 75 2c 4d 2c 53 2c 55  2c 44 2c 49 2c 6d 79 2c  |.u,M,S,U,D,I,my,|
00004f80  58 2c 4e 2c 4c 3a ea 6e  69 2c 4d 79 2c 73 79 2c  |X,N,L:.ni,My,sy,|
00004f90  48 6b 3a ea 68 5f 2c 51  4a 3a ea 85 3a ee 85 ea  |Hk:.h_,QJ:..:...|
00004fa0  f7 85 3a f2 41 28 22 53  68 6f 77 5f 4d 6f 76 65  |..:.A("Show_Move|
00004fb0  6d 65 6e 74 22 29 0d 25  2e ec 75 3d 32 3a 4d 3d  |ment").%..u=2:M=|
00004fc0  33 3a 53 3d 34 3a 55 3d  36 3a 44 3d 37 3a 49 3d  |3:S=4:U=6:D=7:I=|
00004fd0  38 3a 6d 79 3d 39 3a 58  3d 31 30 3a 4e 3d 55 3a  |8:my=9:X=10:N=U:|
00004fe0  4c 3d 5a 3a 68 5f 3d 33  38 34 3a 51 4a 3d 33 35  |L=Z:h_=384:QJ=35|
00004ff0  32 3a 5b 4f 50 54 56 25  3a 41 4c 49 47 4e 3a 2e  |2:[OPTV%:ALIGN:.|
00005000  5a 75 3a a4 5a 3a 53 54  4d 46 44 28 41 29 21 2c  |Zu:.Z:STMFD(A)!,|
00005010  7b 31 32 2c 5a 7d 3a 42  4c 20 72 3a 4c 44 52 30  |{12,Z}:BL r:LDR0|
00005020  2c 5b 31 32 2c 23 59 79  25 5d 3a 41 44 44 30 2c  |,[12,#Yy%]:ADD0,|
00005030  30 2c 23 31 36 2a 63 5f  25 3a 53 54 52 30 2c 5b  |0,#16*c_%:STR0,[|
00005040  31 32 2c 23 59 79 25 5d  3a 42 4c 20 74 4a 3a 4c  |12,#Yy%]:BL tJ:L|
00005050  44 52 30 2c 5b 31 32 2c  23 59 79 25 5d 3a 4c 44  |DR0,[12,#Yy%]:LD|
00005060  52 31 2c 5b 31 32 2c 23  51 79 25 5d 3a 43 4d 50  |R1,[12,#Qy%]:CMP|
00005070  30 2c 31 3a 4d 56 4e 65  71 30 2c 23 ac 28 2d 31  |0,1:MVNeq0,#.(-1|
00005080  29 3a 4d 4f 56 6e 65 30  2c 23 30 3a 4c 44 4d 46  |):MOVne0,#0:LDMF|
00005090  44 28 41 29 21 2c 7b 31  32 2c 70 63 7d 5e 3a 2e  |D(A)!,{12,pc}^:.|
000050a0  74 4a 0d 25 2f ef 53 54  4d 46 44 28 41 29 21 2c  |tJ.%/.STMFD(A)!,|
000050b0  7b 34 2d 39 2c 5a 7d 3a  53 55 42 20 4f 2c 4f 2c  |{4-9,Z}:SUB O,O,|
000050c0  23 68 5f 3a 4c 44 52 20  6d 79 2c 5b 31 32 2c 23  |#h_:LDR my,[12,#|
000050d0  59 79 25 5d 3a 4c 44 52  30 2c 5b 31 32 2c 23 7a  |Yy%]:LDR0,[12,#z|
000050e0  25 5d 3a 4d 4f 56 31 2c  23 30 3a 4d 4f 56 32 2c  |%]:MOV1,#0:MOV2,|
000050f0  23 26 66 30 30 30 30 30  30 30 3a 4d 4f 56 33 2c  |#&f0000000:MOV3,|
00005100  23 26 37 30 30 30 30 30  30 30 3a 4d 4f 56 34 2c  |#&70000000:MOV4,|
00005110  23 30 3a 53 54 4d 49 41  20 4f 2c 7b 30 2c 31 2d  |#0:STMIA O,{0,1-|
00005120  34 7d 3a 4d 4f 56 31 2c  4f 3a 53 57 49 20 26 34  |4}:MOV1,O:SWI &4|
00005130  30 30 63 39 3a 54 45 51  30 2c 23 30 3a 42 65 71  |00c9:TEQ0,#0:Beq|
00005140  20 46 61 3a 42 4c 20 51  79 3a 41 44 44 20 44 2c  | Fa:BL Qy:ADD D,|
00005150  31 32 2c 23 65 79 25 3a  4c 44 4d 49 41 20 44 2c  |12,#ey%:LDMIA D,|
00005160  7b 44 2c 49 7d 3a 4c 44  52 20 58 2c 5b 31 32 2c  |{D,I}:LDR X,[12,|
00005170  23 4a 79 25 5d 3a 41 44  44 20 4d 2c 31 32 2c 23  |#Jy%]:ADD M,12,#|
00005180  4a 4a 25 3a 4c 44 4d 49  41 20 4d 2c 7b 4d 2c 53  |JJ%:LDMIA M,{M,S|
00005190  7d 0d 25 30 f6 4c 44 52  20 55 2c 5b 31 32 2c 23  |}.%0.LDR U,[12,#|
000051a0  4e 79 25 5d 3a 54 45 51  20 55 2c 23 30 3a 41 44  |Ny%]:TEQ U,#0:AD|
000051b0  44 6e 65 20 4d 2c 44 2c  4d 3a 53 55 42 6e 65 20  |Dne M,D,M:SUBne |
000051c0  53 2c 49 2c 53 3a 41 44  44 6e 65 20 75 2c 6d 79  |S,I,S:ADDne u,my|
000051d0  2c 55 2c 4c 53 4c 23 69  4a 25 3a 4c 44 4d 6e 65  |,U,LSL#iJ%:LDMne|
000051e0  49 42 20 75 2c 7b 30 2c  31 2c 75 7d 3a 41 44 44  |IB u,{0,1,u}:ADD|
000051f0  6e 65 20 4d 2c 4d 2c 30  3a 41 44 44 6e 65 20 53  |ne M,M,0:ADDne S|
00005200  2c 53 2c 31 3a 4d 4f 56  65 71 20 75 2c 23 30 3a  |,S,1:MOVeq u,#0:|
00005210  4d 4f 56 30 2c 23 33 34  3a 84 52 30 2c 30 2c 23  |MOV0,#34:.R0,0,#|
00005220  35 31 32 3a 4c 44 52 31  2c 5b 31 32 2c 23 6c 25  |512:LDR1,[12,#l%|
00005230  5d 3a 4d 4f 56 35 2c 23  33 3a 41 44 44 20 55 2c  |]:MOV5,#3:ADD U,|
00005240  4f 2c 23 51 4a 3a 53 54  4d 49 41 20 55 2c 7b 30  |O,#QJ:STMIA U,{0|
00005250  2c 31 2c 4d 2c 53 2c 75  2c 58 7d 3a 2e 6e 69 3a  |,1,M,S,u,X}:.ni:|
00005260  54 45 51 20 75 2c 23 30  3a 53 57 49 6e 65 20 34  |TEQ u,#0:SWIne 4|
00005270  36 3a 2e 73 79 3a 4c 44  4d 49 41 20 58 2c 7b 4d  |6:.sy:LDMIA X,{M|
00005280  2c 53 2c 55 2c 4c 7d 0d  25 31 f6 43 4d 4e 20 4c  |,S,U,L}.%1.CMN L|
00005290  2c 23 31 3a 42 65 71 20  71 6c 3a 41 44 44 20 58  |,#1:Beq ql:ADD X|
000052a0  2c 58 2c 23 6e 25 3a 41  44 44 20 4d 2c 44 2c 4d  |,X,#n%:ADD M,D,M|
000052b0  3a 53 55 42 20 53 2c 49  2c 53 3a 41 44 44 20 75  |:SUB S,I,S:ADD u|
000052c0  2c 6d 79 2c 55 2c 4c 53  4c 23 69 4a 25 3a 4c 44  |,my,U,LSL#iJ%:LD|
000052d0  4d 49 41 20 75 2c 7b 75  2c 4e 2c 4c 7d 3a 41 44  |MIA u,{u,N,L}:AD|
000052e0  44 20 4d 2c 4d 2c 4e 3a  41 44 44 20 53 2c 53 2c  |D M,M,N:ADD S,S,|
000052f0  4c 3a 53 57 49 20 34 36  3a 42 20 73 79 3a 2e 71  |L:SWI 46:B sy:.q|
00005300  6c 3a 4d 4f 56 31 2c 4f  3a 53 57 49 20 26 34 30  |l:MOV1,O:SWI &40|
00005310  30 63 61 3a 54 45 51 30  2c 23 30 3a 41 44 44 6e  |0ca:TEQ0,#0:ADDn|
00005320  65 20 55 2c 4f 2c 23 51  4a 3a 4c 44 4d 6e 65 49  |e U,O,#QJ:LDMneI|
00005330  41 20 55 2c 7b 30 2c 31  2c 4d 2c 53 2c 75 2c 58  |A U,{0,1,M,S,u,X|
00005340  7d 3a 42 6e 65 20 6e 69  3a 2e 46 61 3a 4c 44 52  |}:Bne ni:.Fa:LDR|
00005350  31 2c 5b 31 32 2c 23 51  79 25 5d 3a 4c 44 52 30  |1,[12,#Qy%]:LDR0|
00005360  2c 5b 31 32 2c 23 51 75  25 5d 3a 41 44 44 30 2c  |,[12,#Qu%]:ADD0,|
00005370  31 2c 30 2c 4c 53 4c 23  34 2b 69 4a 25 0d 25 32  |1,0,LSL#4+iJ%.%2|
00005380  f0 54 45 51 30 2c 6d 79  3a 42 6e 65 20 78 6c 3a  |.TEQ0,my:Bne xl:|
00005390  4c 44 52 35 2c 5b 31 32  2c 23 4a 79 25 5d 3a 2e  |LDR5,[12,#Jy%]:.|
000053a0  43 20 4c 44 52 30 2c 5b  35 2c 23 75 25 5d 3a 43  |C LDR0,[5,#u%]:C|
000053b0  4d 4e 30 2c 23 31 3a 42  65 71 20 73 6c 3a 80 53  |MN0,#1:Beq sl:.S|
000053c0  30 2c 30 2c 23 73 4a 25  84 7a 5f 25 3a 41 44 44  |0,0,#sJ%.z_%:ADD|
000053d0  65 71 35 2c 35 2c 23 6e  25 3a 42 65 71 20 43 3a  |eq5,5,#n%:Beq C:|
000053e0  2e 54 6f 3a 4c 44 52 30  2c 5b 31 32 2c 23 74 25  |.To:LDR0,[12,#t%|
000053f0  5d 3a 4c 44 52 31 2c 5b  31 32 2c 23 41 79 25 5d  |]:LDR1,[12,#Ay%]|
00005400  3a 4c 44 52 32 2c 5b 31  32 2c 23 77 25 5d 3a 4d  |:LDR2,[12,#w%]:M|
00005410  4c 41 20 30 2c 31 2c 32  2c 30 3a 4c 44 52 31 2c  |LA 0,1,2,0:LDR1,|
00005420  5b 31 32 2c 23 73 79 25  5d 3a 4c 44 52 42 31 2c  |[12,#sy%]:LDRB1,|
00005430  5b 31 2c 30 5d 3a 54 45  51 31 2c 23 30 3a 4c 44  |[1,0]:TEQ1,#0:LD|
00005440  52 65 71 31 2c 5b 31 32  2c 23 63 79 25 5d 3a 4c  |Req1,[12,#cy%]:L|
00005450  44 52 65 71 42 31 2c 5b  31 2c 30 5d 3a 54 45 51  |DReqB1,[1,0]:TEQ|
00005460  65 71 31 2c 23 30 3a 42  6e 65 20 53 69 0d 25 33  |eq1,#0:Bne Si.%3|
00005470  f1 4c 44 52 30 2c 5b 31  32 2c 23 43 5f 25 5d 3a  |.LDR0,[12,#C_%]:|
00005480  41 44 44 30 2c 30 2c 23  31 30 3a 42 4c 20 73 5f  |ADD0,0,#10:BL s_|
00005490  3a 2e 53 69 3a 4c 44 52  30 2c 5b 35 2c 23 75 25  |:.Si:LDR0,[5,#u%|
000054a0  5d 3a 80 30 2c 30 2c 23  7a 5f 25 84 73 4a 25 3a  |]:.0,0,#z_%.sJ%:|
000054b0  43 4d 50 30 2c 23 7a 5f  25 3a 42 6e 65 20 65 69  |CMP0,#z_%:Bne ei|
000054c0  3a 4c 44 52 30 2c 5b 31  32 2c 23 46 75 25 5d 3a  |:LDR0,[12,#Fu%]:|
000054d0  41 44 44 31 2c 35 2c 23  6d 79 25 3a 4c 44 4d 49  |ADD1,5,#my%:LDMI|
000054e0  41 31 2c 7b 31 2d 32 7d  3a 42 4c 20 7a 4a 3a 4d  |A1,{1-2}:BL zJ:M|
000054f0  4f 56 30 2c 23 7a 5f 25  3a 2e 65 69 3a 43 4d 50  |OV0,#z_%:.ei:CMP|
00005500  30 2c 23 7a 5f 25 84 73  4a 25 3a 42 6e 65 20 62  |0,#z_%.sJ%:Bne b|
00005510  4a 3a 41 44 44 31 2c 35  2c 23 6d 79 25 3a 4c 44  |J:ADD1,5,#my%:LD|
00005520  4d 49 41 31 2c 7b 31 2d  32 7d 3a 4c 44 52 30 2c  |MIA1,{1-2}:LDR0,|
00005530  5b 31 32 2c 23 6f 75 25  5d 3a 4d 56 4e 33 2c 23  |[12,#ou%]:MVN3,#|
00005540  ac 28 2d 31 29 3a 53 54  4d 49 41 30 2c 7b 31 2d  |.(-1):STMIA0,{1-|
00005550  32 2c 33 7d 3a 41 44 44  30 2c 30 2c 23 38 0d 25  |2,3}:ADD0,0,#8.%|
00005560  34 ba 53 54 52 30 2c 5b  31 32 2c 23 6f 75 25 5d  |4.STR0,[12,#ou%]|
00005570  3a 4c 44 52 30 2c 5b 31  32 2c 23 71 6c 25 5d 3a  |:LDR0,[12,#ql%]:|
00005580  42 4c 20 7a 4a 3a 2e 62  4a 3a 4d 4f 56 32 2c 35  |BL zJ:.bJ:MOV2,5|
00005590  3a 2e 60 4a 20 41 44 44  32 2c 32 2c 23 6e 25 3a  |:.`J ADD2,2,#n%:|
000055a0  4c 44 52 33 2c 5b 32 2c  23 75 25 5d 3a 43 4d 4e  |LDR3,[2,#u%]:CMN|
000055b0  33 2c 23 31 3a 42 6e 65  20 60 4a 3a 53 55 42 32  |3,#1:Bne `J:SUB2|
000055c0  2c 32 2c 35 3a 41 44 44  31 2c 35 2c 23 6e 25 3a  |,2,5:ADD1,5,#n%:|
000055d0  4d 4f 56 30 2c 35 3a 42  4c 20 59 75 3a 42 20 43  |MOV0,5:BL Yu:B C|
000055e0  3a 2e 73 6c 3a 42 4c 20  4f 5f 3a 42 4c 20 69 5f  |:.sl:BL O_:BL i_|
000055f0  3a 2e 78 6c 3a 41 44 44  20 4f 2c 4f 2c 23 68 5f  |:.xl:ADD O,O,#h_|
00005600  3a 4c 44 4d 46 44 28 41  29 21 2c 7b 34 2d 39 2c  |:LDMFD(A)!,{4-9,|
00005610  70 63 7d 5e 3a 5d 3a e1  0d 25 35 f0 dd f2 4e 4a  |pc}^:]:..%5...NJ|
00005620  3a ea 4d 2c 53 2c 55 2c  65 2c 42 79 2c 77 2c 66  |:.M,S,U,e,By,w,f|
00005630  2c 58 2c 4e 2c 4c 3a ea  67 2c 46 79 2c 59 2c 61  |,X,N,L:.g,Fy,Y,a|
00005640  2c 70 3a ea 56 6b 2c 73  79 2c 44 69 3a 4d 3d 31  |,p:.Vk,sy,Di:M=1|
00005650  3a 53 3d 32 3a 55 3d 33  3a 77 3d 34 3a 66 3d 35  |:S=2:U=3:w=4:f=5|
00005660  3a 65 3d 36 3a 58 3d 37  3a 42 79 3d 38 3a 59 3d  |:e=6:X=7:By=8:Y=|
00005670  39 3a 61 3d 31 31 3a 70  3d 5a 3a 67 3d 59 3a 46  |9:a=11:p=Z:g=Y:F|
00005680  79 3d 61 3a 4e 3d 30 3a  4c 3d 55 3a 5b 4f 50 54  |y=a:N=0:L=U:[OPT|
00005690  56 25 3a 41 4c 49 47 4e  3a 2e 74 5f 3a a4 5a 3a  |V%:ALIGN:.t_:.Z:|
000056a0  53 54 4d 46 44 28 41 29  21 2c 7b 31 32 2c 5a 7d  |STMFD(A)!,{12,Z}|
000056b0  3a 42 4c 20 72 3a 42 4c  20 4f 5f 3a 4c 44 4d 46  |:BL r:BL O_:LDMF|
000056c0  44 28 41 29 21 2c 7b 31  32 2c 70 63 7d 5e 3a 41  |D(A)!,{12,pc}^:A|
000056d0  4c 49 47 4e 3a 2e 4f 5f  3a 53 54 4d 46 44 28 41  |LIGN:.O_:STMFD(A|
000056e0  29 21 2c 7b 34 2d 39 2c  5a 7d 3a 4c 44 52 30 2c  |)!,{4-9,Z}:LDR0,|
000056f0  5b 31 32 2c 23 51 79 25  5d 3a 53 54 52 30 2c 5b  |[12,#Qy%]:STR0,[|
00005700  31 32 2c 23 59 79 25 5d  0d 25 36 f3 4c 44 52 20  |12,#Yy%].%6.LDR |
00005710  58 2c 5b 31 32 2c 23 4a  79 25 5d 3a 41 44 44 20  |X,[12,#Jy%]:ADD |
00005720  67 2c 31 32 2c 23 43 79  25 3a 4c 44 4d 49 41 20  |g,12,#Cy%:LDMIA |
00005730  67 2c 7b 67 2c 46 79 7d  3a 41 44 44 20 4e 2c 31  |g,{g,Fy}:ADD N,1|
00005740  32 2c 23 76 75 25 3a 4c  44 4d 49 41 20 4e 2c 7b  |2,#vu%:LDMIA N,{|
00005750  4e 2c 4c 7d 3a 41 44 44  20 77 2c 31 32 2c 23 74  |N,L}:ADD w,12,#t|
00005760  25 3a 4c 44 4d 49 41 20  77 2c 7b 77 2c 66 7d 3a  |%:LDMIA w,{w,f}:|
00005770  4d 4c 41 20 4d 2c 77 2c  67 2c 4e 3a 4d 4c 41 20  |MLA M,w,g,N:MLA |
00005780  53 2c 66 2c 46 79 2c 4c  3a 41 44 44 20 5a 2c 31  |S,f,Fy,L:ADD Z,1|
00005790  32 2c 23 4a 4a 25 3a 53  54 4d 49 41 20 5a 2c 7b  |2,#JJ%:STMIA Z,{|
000057a0  4d 2c 53 7d 3a 2e 73 79  3a 4c 44 52 20 4d 2c 5b  |M,S}:.sy:LDR M,[|
000057b0  58 2c 23 75 25 5d 3a 43  4d 4e 20 4d 2c 23 31 3a  |X,#u%]:CMN M,#1:|
000057c0  41 44 44 6e 65 20 77 2c  58 2c 23 6d 79 25 3a 4c  |ADDne w,X,#my%:L|
000057d0  44 4d 6e 65 49 41 20 77  2c 7b 77 2c 66 7d 3a 4d  |DMneIA w,{w,f}:M|
000057e0  4c 41 6e 65 20 4d 2c 77  2c 67 2c 4e 3a 4d 4c 41  |LAne M,w,g,N:MLA|
000057f0  6e 65 20 53 2c 66 2c 46  79 2c 4c 0d 25 37 f5 53  |ne S,f,Fy,L.%7.S|
00005800  54 4d 6e 65 49 41 20 58  2c 7b 4d 2c 53 7d 3a 41  |TMneIA X,{M,S}:A|
00005810  44 44 6e 65 20 58 2c 58  2c 23 6e 25 3a 42 6e 65  |DDne X,X,#n%:Bne|
00005820  20 73 79 3a 4c 44 4d 46  44 28 41 29 21 2c 7b 34  | sy:LDMFD(A)!,{4|
00005830  2d 39 2c 70 63 7d 5e 3a  41 4c 49 47 4e 3a 2e 49  |-9,pc}^:ALIGN:.I|
00005840  5f 3a a4 5a 3a 53 54 4d  46 44 28 41 29 21 2c 7b  |_:.Z:STMFD(A)!,{|
00005850  34 2d 39 2c 31 32 2c 5a  7d 3a 42 4c 20 72 3a 4c  |4-9,12,Z}:BL r:L|
00005860  44 52 20 65 2c 5b 31 32  2c 23 73 79 25 5d 3a 4c  |DR e,[12,#sy%]:L|
00005870  44 52 20 42 79 2c 5b 31  32 2c 23 77 25 5d 3a 4c  |DR By,[12,#w%]:L|
00005880  44 52 32 2c 5b 31 32 2c  23 78 25 5d 3a 4d 55 4c  |DR2,[12,#x%]:MUL|
00005890  20 32 2c 42 79 2c 32 3a  4d 4f 56 31 2c 23 30 3a  | 2,By,2:MOV1,#0:|
000058a0  4d 4f 56 30 2c 65 3a 42  4c 20 74 79 3a 4c 44 52  |MOV0,e:BL ty:LDR|
000058b0  20 58 2c 5b 31 32 2c 23  4a 79 25 5d 3a 41 44 44  | X,[12,#Jy%]:ADD|
000058c0  20 70 2c 31 32 2c 23 74  25 3a 4c 44 4d 49 41 20  | p,12,#t%:LDMIA |
000058d0  70 2c 7b 59 2c 61 7d 3a  4c 44 52 20 55 2c 5b 31  |p,{Y,a}:LDR U,[1|
000058e0  32 2c 23 4e 79 25 5d 3a  54 53 54 20 55 2c 23 31  |2,#Ny%]:TST U,#1|
000058f0  0d 25 38 f8 41 44 44 6e  65 20 59 2c 59 2c 23 31  |.%8.ADDne Y,Y,#1|
00005900  3a 54 53 54 20 55 2c 23  32 3a 53 55 42 6e 65 20  |:TST U,#2:SUBne |
00005910  59 2c 59 2c 23 31 3a 54  53 54 20 55 2c 23 38 3a  |Y,Y,#1:TST U,#8:|
00005920  53 55 42 6e 65 20 61 2c  61 2c 23 31 3a 54 53 54  |SUBne a,a,#1:TST|
00005930  20 55 2c 23 34 3a 41 44  44 6e 65 20 61 2c 61 2c  | U,#4:ADDne a,a,|
00005940  23 31 3a 53 54 4d 49 41  20 70 2c 7b 59 2c 61 7d  |#1:STMIA p,{Y,a}|
00005950  3a 4c 44 52 20 70 2c 5b  31 32 2c 23 63 79 25 5d  |:LDR p,[12,#cy%]|
00005960  3a 2e 73 79 3a 4c 44 52  20 4d 2c 5b 58 2c 23 75  |:.sy:LDR M,[X,#u|
00005970  25 5d 3a 43 4d 4e 20 4d  2c 23 31 3a 42 65 71 20  |%]:CMN M,#1:Beq |
00005980  55 69 3a 41 44 44 20 4d  2c 58 2c 23 6d 79 25 3a  |Ui:ADD M,X,#my%:|
00005990  4c 44 4d 49 41 20 4d 2c  7b 77 2c 66 7d 3a 43 4d  |LDMIA M,{w,f}:CM|
000059a0  50 20 59 2c 77 3a 53 55  42 6c 74 20 77 2c 77 2c  |P Y,w:SUBlt w,w,|
000059b0  23 31 3a 4d 4f 56 6c 74  20 55 2c 23 32 3a 4d 4f  |#1:MOVlt U,#2:MO|
000059c0  56 65 71 20 55 2c 23 30  3a 4d 4f 56 67 74 20 55  |Veq U,#0:MOVgt U|
000059d0  2c 23 31 3a 41 44 44 67  74 20 77 2c 77 2c 23 31  |,#1:ADDgt w,w,#1|
000059e0  3a 43 4d 50 20 61 2c 66  0d 25 39 f3 53 55 42 6c  |:CMP a,f.%9.SUBl|
000059f0  74 20 66 2c 66 2c 23 31  3a 84 52 6c 74 20 55 2c  |t f,f,#1:.Rlt U,|
00005a00  55 2c 23 38 3a 84 52 67  74 20 55 2c 55 2c 23 34  |U,#8:.Rgt U,U,#4|
00005a10  3a 41 44 44 67 74 20 66  2c 66 2c 23 31 3a 53 54  |:ADDgt f,f,#1:ST|
00005a20  52 20 55 2c 5b 58 2c 23  57 69 25 5d 3a 53 54 4d  |R U,[X,#Wi%]:STM|
00005a30  49 41 20 4d 2c 7b 77 2c  66 7d 3a 4d 4c 41 20 55  |IA M,{w,f}:MLA U|
00005a40  2c 42 79 2c 66 2c 77 3a  4c 44 52 42 30 2c 5b 65  |,By,f,w:LDRB0,[e|
00005a50  2c 55 5d 3a 54 45 51 30  2c 23 30 3a 42 6e 65 20  |,U]:TEQ0,#0:Bne |
00005a60  49 6c 3a 4c 44 52 42 30  2c 5b 70 2c 55 5d 3a 82  |Il:LDRB0,[p,U]:.|
00005a70  53 30 2c 30 2c 23 32 35  35 3a 42 65 71 20 64 6c  |S0,0,#255:Beq dl|
00005a80  3a 53 54 52 42 30 2c 5b  65 2c 55 5d 3a 2e 43 20  |:STRB0,[e,U]:.C |
00005a90  41 44 44 20 58 2c 58 2c  23 6e 25 3a 42 20 73 79  |ADD X,X,#n%:B sy|
00005aa0  3a 2e 49 6c 3a 4d 4f 56  30 2c 23 30 3a 53 54 52  |:.Il:MOV0,#0:STR|
00005ab0  42 30 2c 5b 65 2c 55 5d  3a 4d 4f 56 30 2c 23 32  |B0,[e,U]:MOV0,#2|
00005ac0  35 35 3a 53 54 52 42 30  2c 5b 70 2c 55 5d 3a 4c  |55:STRB0,[p,U]:L|
00005ad0  44 52 30 2c 5b 58 2c 23  75 25 5d 0d 25 3a f5 84  |DR0,[X,#u%].%:..|
00005ae0  52 30 2c 30 2c 23 7a 5f  25 3a 84 52 30 2c 30 2c  |R0,0,#z_%:.R0,0,|
00005af0  23 73 4a 25 3a 53 54 52  30 2c 5b 58 2c 23 75 25  |#sJ%:STR0,[X,#u%|
00005b00  5d 3a 4c 44 52 30 2c 5b  31 32 2c 23 4a 79 25 5d  |]:LDR0,[12,#Jy%]|
00005b10  3a 2e 44 69 3a 41 44 44  20 4d 2c 30 2c 23 6d 79  |:.Di:ADD M,0,#my|
00005b20  25 3a 4c 44 4d 49 41 20  4d 2c 7b 4d 2c 53 7d 3a  |%:LDMIA M,{M,S}:|
00005b30  54 45 51 20 4d 2c 77 3a  54 45 51 65 71 20 53 2c  |TEQ M,w:TEQeq S,|
00005b40  66 3a 41 44 44 6e 65 30  2c 30 2c 23 6e 25 3a 42  |f:ADDne0,0,#n%:B|
00005b50  6e 65 20 44 69 3a 4c 44  52 20 4d 2c 5b 30 2c 23  |ne Di:LDR M,[0,#|
00005b60  75 25 5d 3a 84 52 20 4d  2c 4d 2c 23 73 4a 25 3a  |u%]:.R M,M,#sJ%:|
00005b70  53 54 52 20 4d 2c 5b 30  2c 23 75 25 5d 3a 42 20  |STR M,[0,#u%]:B |
00005b80  43 3a 2e 64 6c 3a 4c 44  52 20 4d 2c 5b 58 2c 23  |C:.dl:LDR M,[X,#|
00005b90  75 25 5d 3a 84 52 20 4d  2c 4d 2c 23 7a 5f 25 3a  |u%]:.R M,M,#z_%:|
00005ba0  53 54 52 20 4d 2c 5b 58  2c 23 75 25 5d 3a 42 20  |STR M,[X,#u%]:B |
00005bb0  43 3a 2e 55 69 3a 4c 44  4d 46 44 28 41 29 21 2c  |C:.Ui:LDMFD(A)!,|
00005bc0  7b 34 2d 39 2c 31 32 2c  70 63 7d 5e 3a 5d 3a e1  |{4-9,12,pc}^:]:.|
00005bd0  0d 25 3b ec dd f2 6c 4a  3a 5b 4f 50 54 56 25 3a  |.%;...lJ:[OPTV%:|
00005be0  41 4c 49 47 4e 3a 2e 5a  69 3a a4 5a 3a 53 54 4d  |ALIGN:.Zi:.Z:STM|
00005bf0  46 44 28 41 29 21 2c 7b  34 2d 39 2c 31 32 2c 5a  |FD(A)!,{4-9,12,Z|
00005c00  7d 3a 42 4c 20 72 3a 53  55 42 20 41 2c 41 2c 23  |}:BL r:SUB A,A,#|
00005c10  35 31 32 3a 4c 44 52 30  2c 5b 31 32 2c 23 7a 25  |512:LDR0,[12,#z%|
00005c20  5d 3a 4d 4f 56 31 2c 41  3a 4d 4f 56 32 2c 23 30  |]:MOV1,A:MOV2,#0|
00005c30  3a 4d 4f 56 33 2c 23 26  66 30 30 30 30 30 30 30  |:MOV3,#&f0000000|
00005c40  3a 4d 4f 56 34 2c 23 26  37 30 30 30 30 30 30 30  |:MOV4,#&70000000|
00005c50  3a 4d 4f 56 35 2c 23 30  3a 53 54 4d 49 41 31 2c  |:MOV5,#0:STMIA1,|
00005c60  7b 30 2c 32 2d 35 7d 3a  53 57 49 20 26 34 30 30  |{0,2-5}:SWI &400|
00005c70  63 39 3a 42 4c 20 51 79  3a 2e 43 20 54 45 51 30  |c9:BL Qy:.C TEQ0|
00005c80  2c 23 30 3a 42 4c 6e 65  20 6d 5f 3a 42 4c 6e 65  |,#0:BLne m_:BLne|
00005c90  20 77 4a 3a 4d 4f 56 6e  65 31 2c 41 3a 53 57 49  | wJ:MOVne1,A:SWI|
00005ca0  6e 65 20 26 34 30 30 63  61 3a 42 6e 65 20 43 3a  |ne &400ca:Bne C:|
00005cb0  41 44 44 20 41 2c 41 2c  23 35 31 32 0d 25 3c 1e  |ADD A,A,#512.%<.|
00005cc0  4c 44 4d 46 44 28 41 29  21 2c 7b 34 2d 39 2c 31  |LDMFD(A)!,{4-9,1|
00005cd0  32 2c 70 63 7d 5e 3a 5d  3a e1 0d 25 3d f8 dd f2  |2,pc}^:]:..%=...|
00005ce0  6b 5f 3a 5b 4f 50 54 56  25 3a 41 4c 49 47 4e 3a  |k_:[OPTV%:ALIGN:|
00005cf0  2e 51 6c 3a 2e 7a 4a 3a  53 54 4d 46 44 28 41 29  |.Ql:.zJ:STMFD(A)|
00005d00  21 2c 7b 34 2d 39 2c 31  32 2c 5a 7d 3a 53 55 42  |!,{4-9,12,Z}:SUB|
00005d10  20 41 2c 41 2c 23 35 31  32 3a 42 4c 20 72 3a 41  | A,A,#512:BL r:A|
00005d20  44 44 33 2c 31 32 2c 23  76 75 25 3a 4c 44 4d 49  |DD3,12,#vu%:LDMI|
00005d30  41 33 2c 7b 33 2c 34 7d  3a 41 44 44 35 2c 31 32  |A3,{3,4}:ADD5,12|
00005d40  2c 23 43 79 25 3a 4c 44  4d 49 41 35 2c 7b 35 2c  |,#Cy%:LDMIA5,{5,|
00005d50  36 7d 3a 4d 4c 41 20 33  2c 31 2c 35 2c 33 3a 4d  |6}:MLA 3,1,5,3:M|
00005d60  4c 41 20 34 2c 32 2c 36  2c 34 3a 4d 4f 56 32 2c  |LA 4,2,6,4:MOV2,|
00005d70  30 3a 4c 44 52 37 2c 5b  31 32 2c 23 7a 25 5d 3a  |0:LDR7,[12,#z%]:|
00005d80  41 44 44 31 2c 41 2c 23  32 3c 3c 32 3a 53 54 52  |ADD1,A,#2<<2:STR|
00005d90  37 2c 5b 31 5d 3a 53 54  52 33 2c 5b 31 2c 23 34  |7,[1]:STR3,[1,#4|
00005da0  5d 3a 41 44 44 35 2c 33  2c 35 3a 53 54 52 35 2c  |]:ADD5,3,5:STR5,|
00005db0  5b 31 2c 23 31 32 5d 3a  42 4c 20 70 79 3a 52 53  |[1,#12]:BL py:RS|
00005dc0  42 20 5a 2c 34 2c 23 30  3a 53 55 42 20 5a 2c 5a  |B Z,4,#0:SUB Z,Z|
00005dd0  2c 30 0d 25 3e f1 53 54  52 20 5a 2c 5b 31 2c 23  |,0.%>.STR Z,[1,#|
00005de0  38 5d 3a 41 44 44 20 5a  2c 5a 2c 36 3a 53 54 52  |8]:ADD Z,Z,6:STR|
00005df0  20 5a 2c 5b 31 2c 23 31  36 5d 3a 4d 4f 56 35 2c  | Z,[1,#16]:MOV5,|
00005e00  23 33 3a 4d 4f 56 30 2c  23 33 34 3a 84 52 30 2c  |#3:MOV0,#34:.R0,|
00005e10  30 2c 23 35 31 32 3a 4c  44 52 20 5a 2c 5b 31 32  |0,#512:LDR Z,[12|
00005e20  2c 23 6c 25 5d 3a 53 54  4d 49 41 20 41 2c 7b 30  |,#l%]:STMIA A,{0|
00005e30  2c 5a 7d 3a 53 57 49 20  26 34 30 30 63 39 3a 42  |,Z}:SWI &400c9:B|
00005e40  4c 20 51 79 3a 41 44 44  38 2c 31 32 2c 23 65 79  |L Qy:ADD8,12,#ey|
00005e50  25 3a 4c 44 4d 49 41 38  2c 7b 38 2d 39 7d 3a 41  |%:LDMIA8,{8-9}:A|
00005e60  44 44 33 2c 38 2c 33 3a  53 55 42 34 2c 39 2c 34  |DD3,8,3:SUB4,9,4|
00005e70  3a 2e 43 20 54 45 51 30  2c 23 30 3a 4c 44 4d 6e  |:.C TEQ0,#0:LDMn|
00005e80  65 49 41 20 41 2c 7b 30  2d 31 7d 3a 53 57 49 6e  |eIA A,{0-1}:SWIn|
00005e90  65 20 34 36 3a 41 44 44  6e 65 31 2c 41 2c 23 32  |e 46:ADDne1,A,#2|
00005ea0  3c 3c 32 3a 53 57 49 6e  65 20 26 34 30 30 63 61  |<<2:SWIne &400ca|
00005eb0  3a 42 6e 65 20 43 3a 41  44 44 20 41 2c 41 2c 23  |:Bne C:ADD A,A,#|
00005ec0  35 31 32 0d 25 3f 1e 4c  44 4d 46 44 28 41 29 21  |512.%?.LDMFD(A)!|
00005ed0  2c 7b 34 2d 39 2c 31 32  2c 70 63 7d 5e 3a 5d 3a  |,{4-9,12,pc}^:]:|
00005ee0  e1 0d 25 40 f1 dd f2 63  4a 3a ea 46 79 2c 67 2c  |..%@...cJ:.Fy,g,|
00005ef0  59 2c 61 2c 64 2c 6e 2c  4e 2c 4c 2c 42 79 2c 70  |Y,a,d,n,N,L,By,p|
00005f00  5f 3a 64 3d 33 3a 6e 3d  34 3a 59 3d 36 3a 61 3d  |_:d=3:n=4:Y=6:a=|
00005f10  37 3a 67 3d 38 3a 46 79  3d 39 3a 42 79 3d 31 30  |7:g=8:Fy=9:By=10|
00005f20  3a 70 5f 3d 31 31 3a 4e  3d 30 3a 4c 3d 35 3a 5b  |:p_=11:N=0:L=5:[|
00005f30  4f 50 54 56 25 3a 41 4c  49 47 4e 3a 2e 55 5f 3a  |OPTV%:ALIGN:.U_:|
00005f40  53 54 4d 46 44 28 41 29  21 2c 7b 5a 2c 30 2d 31  |STMFD(A)!,{Z,0-1|
00005f50  32 7d 3a 53 55 42 20 41  2c 41 2c 23 35 31 32 3a  |2}:SUB A,A,#512:|
00005f60  42 4c 20 72 3a 4c 44 52  20 42 79 2c 5b 31 32 2c  |BL r:LDR By,[12,|
00005f70  23 77 25 5d 3a 4c 44 52  20 70 5f 2c 5b 31 32 2c  |#w%]:LDR p_,[12,|
00005f80  23 78 25 5d 3a 4c 44 52  30 2c 5b 31 32 2c 23 68  |#x%]:LDR0,[12,#h|
00005f90  5f 25 5d 3a 4d 56 4e 30  2c 30 3a 53 54 52 30 2c  |_%]:MVN0,0:STR0,|
00005fa0  5b 31 32 2c 23 68 5f 25  5d 3a 41 44 44 20 59 2c  |[12,#h_%]:ADD Y,|
00005fb0  31 32 2c 23 74 25 3a 4c  44 4d 49 41 20 59 2c 7b  |12,#t%:LDMIA Y,{|
00005fc0  59 2c 61 7d 3a 41 44 44  20 67 2c 31 32 2c 23 43  |Y,a}:ADD g,12,#C|
00005fd0  79 25 0d 25 41 f4 4c 44  4d 49 41 20 67 2c 7b 67  |y%.%A.LDMIA g,{g|
00005fe0  2c 46 79 7d 3a 41 44 44  20 64 2c 31 32 2c 23 4a  |,Fy}:ADD d,12,#J|
00005ff0  4a 25 3a 4c 44 4d 49 41  20 64 2c 7b 64 2c 6e 7d  |J%:LDMIA d,{d,n}|
00006000  3a 52 53 42 32 2c 6e 2c  23 30 3a 42 4c 20 70 79  |:RSB2,n,#0:BL py|
00006010  3a 53 55 42 32 2c 32 2c  30 3a 4c 44 52 30 2c 5b  |:SUB2,2,0:LDR0,[|
00006020  31 32 2c 23 7a 25 5d 3a  4d 4f 56 31 2c 41 3a 53  |12,#z%]:MOV1,A:S|
00006030  54 52 30 2c 5b 31 5d 3a  53 55 42 30 2c 64 2c 67  |TR0,[1]:SUB0,d,g|
00006040  3a 53 54 52 30 2c 5b 31  2c 23 34 5d 3a 41 44 44  |:STR0,[1,#4]:ADD|
00006050  30 2c 64 2c 67 2c 4c 53  4c 23 31 3a 53 54 52 30  |0,d,g,LSL#1:STR0|
00006060  2c 5b 31 2c 23 31 32 5d  3a 53 55 42 30 2c 32 2c  |,[1,#12]:SUB0,2,|
00006070  46 79 3a 53 54 52 30 2c  5b 31 2c 23 38 5d 3a 41  |Fy:STR0,[1,#8]:A|
00006080  44 44 30 2c 32 2c 46 79  2c 4c 53 4c 23 31 3a 53  |DD0,2,Fy,LSL#1:S|
00006090  54 52 30 2c 5b 31 2c 23  31 36 5d 3a 53 57 49 20  |TR0,[1,#16]:SWI |
000060a0  26 34 30 30 63 39 3a 42  4c 20 51 79 3a 41 44 44  |&400c9:BL Qy:ADD|
000060b0  31 2c 31 32 2c 23 65 79  25 3a 4c 44 4d 49 41 31  |1,12,#ey%:LDMIA1|
000060c0  2c 7b 31 2c 5a 7d 0d 25  42 f9 41 44 44 20 64 2c  |,{1,Z}.%B.ADD d,|
000060d0  31 2c 64 3a 53 55 42 20  6e 2c 5a 2c 6e 3a 2e 43  |1,d:SUB n,Z,n:.C|
000060e0  20 54 45 51 30 2c 23 30  3a 42 65 71 20 74 69 3a  | TEQ0,#0:Beq ti:|
000060f0  4c 44 52 31 2c 5b 31 32  2c 23 6c 25 5d 3a a4 51  |LDR1,[12,#l%]:.Q|
00006100  28 2d 31 2c 2b 31 2c 5f  6c 25 29 3a a4 51 28 30  |(-1,+1,_l%):.Q(0|
00006110  2c 2b 31 2c 4e 69 25 29  3a a4 51 28 2b 31 2c 2b  |,+1,Ni%):.Q(+1,+|
00006120  31 2c 4c 69 25 29 3a a4  51 28 2d 31 2c 30 2c 63  |1,Li%):.Q(-1,0,c|
00006130  6c 25 29 3a a4 51 28 2b  31 2c 30 2c 64 6c 25 29  |l%):.Q(+1,0,dl%)|
00006140  3a a4 51 28 2d 31 2c 2d  31 2c 4f 69 25 29 3a a4  |:.Q(-1,-1,Oi%):.|
00006150  51 28 30 2c 2d 31 2c 73  6c 25 29 3a a4 51 28 2b  |Q(0,-1,sl%):.Q(+|
00006160  31 2c 2d 31 2c 49 69 25  29 3a 4d 4f 56 31 2c 41  |1,-1,Ii%):MOV1,A|
00006170  3a 53 57 49 20 26 34 30  30 63 61 3a 42 20 43 3a  |:SWI &400ca:B C:|
00006180  2e 74 69 3a 41 44 44 20  41 2c 41 2c 23 35 31 32  |.ti:ADD A,A,#512|
00006190  3a 4c 44 4d 46 44 28 41  29 21 2c 7b 70 63 2c 30  |:LDMFD(A)!,{pc,0|
000061a0  2d 31 32 7d 5e 3a 2e 61  75 3a 53 54 4d 46 44 28  |-12}^:.au:STMFD(|
000061b0  41 29 21 2c 7b 64 2c 6e  2c 59 2c 61 2c 5a 7d 0d  |A)!,{d,n,Y,a,Z}.|
000061c0  25 43 fa 41 44 44 20 59  2c 59 2c 4e 3a 53 55 42  |%C.ADD Y,Y,N:SUB|
000061d0  20 61 2c 61 2c 4c 3a 43  4d 50 20 59 2c 42 79 3a  | a,a,L:CMP Y,By:|
000061e0  43 4d 50 6c 6f 20 61 2c  70 5f 3a 4c 44 4d 68 73  |CMPlo a,p_:LDMhs|
000061f0  46 44 28 41 29 21 2c 7b  64 2c 6e 2c 59 2c 61 2c  |FD(A)!,{d,n,Y,a,|
00006200  70 63 7d 5e 3a 4d 4c 41  20 64 2c 67 2c 4e 2c 64  |pc}^:MLA d,g,N,d|
00006210  3a 4d 4c 41 20 6e 2c 46  79 2c 4c 2c 6e 3a 4d 4c  |:MLA n,Fy,L,n:ML|
00006220  41 20 4e 2c 61 2c 42 79  2c 59 3a 4c 44 52 20 4c  |A N,a,By,Y:LDR L|
00006230  2c 5b 31 32 2c 23 73 79  25 5d 3a 4c 44 52 42 20  |,[12,#sy%]:LDRB |
00006240  4c 2c 5b 4c 2c 4e 5d 3a  54 45 51 20 4c 2c 23 30  |L,[L,N]:TEQ L,#0|
00006250  3a 4c 44 52 65 71 20 4c  2c 5b 31 32 2c 23 63 79  |:LDReq L,[12,#cy|
00006260  25 5d 3a 4c 44 52 65 71  42 20 4c 2c 5b 4c 2c 4e  |%]:LDReqB L,[L,N|
00006270  5d 3a 54 45 51 65 71 20  4c 2c 23 30 3a 4c 44 4d  |]:TEQeq L,#0:LDM|
00006280  6e 65 46 44 28 41 29 21  2c 7b 64 2c 6e 2c 59 2c  |neFD(A)!,{d,n,Y,|
00006290  61 2c 70 63 7d 5e 3a 4d  4f 56 30 2c 23 33 34 3a  |a,pc}^:MOV0,#34:|
000062a0  84 52 30 2c 30 2c 23 35  31 32 3a 4d 4f 56 35 2c  |.R0,0,#512:MOV5,|
000062b0  23 33 3a 53 57 49 20 34  36 0d 25 44 1f 4c 44 4d  |#3:SWI 46.%D.LDM|
000062c0  46 44 28 41 29 21 2c 7b  64 2c 6e 2c 59 2c 61 2c  |FD(A)!,{d,n,Y,a,|
000062d0  70 63 7d 5e 3a 5d 3a e1  0d 25 45 45 dd a4 51 28  |pc}^:]:..%EE..Q(|
000062e0  63 25 2c 66 25 2c 74 75  25 29 3a 5b 4f 50 54 56  |c%,f%,tu%):[OPTV|
000062f0  25 3a a4 59 28 4e 2c 63  25 29 3a a4 59 28 4c 2c  |%:.Y(N,c%):.Y(L,|
00006300  66 25 29 3a 4c 44 52 32  2c 5b 31 32 2c 23 74 75  |f%):LDR2,[12,#tu|
00006310  25 5d 3a 42 4c 20 61 75  3a 5d 3a 3d 30 0d 25 46  |%]:BL au:]:=0.%F|
00006320  45 dd a4 47 28 63 25 2c  66 25 2c 74 75 25 29 3a  |E..G(c%,f%,tu%):|
00006330  5b 4f 50 54 56 25 3a 4c  44 52 32 2c 5b 31 32 2c  |[OPTV%:LDR2,[12,|
00006340  23 74 75 25 5d 3a a4 59  28 33 2c 63 25 29 3a a4  |#tu%]:.Y(3,c%):.|
00006350  59 28 34 2c 66 25 29 3a  42 4c 20 72 69 3a 5d 3a  |Y(4,f%):BL ri:]:|
00006360  3d 30 0d 25 47 15 dd a4  59 28 79 25 2c 52 25 29  |=0.%G...Y(y%,R%)|
00006370  3a e7 52 25 3c 30 8c 0d  25 48 1a 5b 4f 50 54 56  |:.R%<0..%H.[OPTV|
00006380  25 3a 4d 56 4e 20 79 25  2c 23 ac 28 52 25 29 3a  |%:MVN y%,#.(R%):|
00006390  5d 0d 25 49 19 cc 3a 5b  4f 50 54 56 25 3a 4d 4f  |].%I..:[OPTV%:MO|
000063a0  56 20 79 25 2c 23 52 25  3a 5d 0d 25 4a 08 cd 3a  |V y%,#R%:].%J..:|
000063b0  3d 30 0d 25 4b f2 dd f2  4d 4a 3a 5b 4f 50 54 56  |=0.%K...MJ:[OPTV|
000063c0  25 3a 41 4c 49 47 4e 3a  2e 48 5f 20 44 43 44 30  |%:ALIGN:.H_ DCD0|
000063d0  3a 2e 70 79 20 4c 44 52  30 2c 48 5f 3a 4d 4f 56  |:.py LDR0,H_:MOV|
000063e0  53 70 63 2c 5a 3a 2e 51  79 3a 53 54 4d 46 44 28  |Spc,Z:.Qy:STMFD(|
000063f0  41 29 21 2c 7b 30 2d 31  2c 5a 7d 3a 4c 44 52 30  |A)!,{0-1,Z}:LDR0|
00006400  2c 5b 31 2c 23 34 5d 3a  4c 44 52 20 5a 2c 5b 31  |,[1,#4]:LDR Z,[1|
00006410  2c 23 32 30 5d 3a 53 55  42 30 2c 30 2c 5a 3a 4c  |,#20]:SUB0,0,Z:L|
00006420  44 52 20 5a 2c 5b 31 2c  23 31 36 5d 3a 4c 44 52  |DR Z,[1,#16]:LDR|
00006430  31 2c 5b 31 2c 23 32 34  5d 3a 53 55 42 31 2c 5a  |1,[1,#24]:SUB1,Z|
00006440  2c 31 3a 4c 44 52 20 5a  2c 48 5f 3a 53 55 42 31  |,1:LDR Z,H_:SUB1|
00006450  2c 31 2c 5a 3a 41 44 44  20 5a 2c 31 32 2c 23 65  |,1,Z:ADD Z,12,#e|
00006460  79 25 3a 53 54 4d 49 41  20 5a 2c 7b 30 2d 31 7d  |y%:STMIA Z,{0-1}|
00006470  3a 4c 44 4d 46 44 28 41  29 21 2c 7b 30 2d 31 2c  |:LDMFD(A)!,{0-1,|
00006480  70 63 7d 5e 3a 2e 4c 4a  3a 53 54 4d 46 44 28 41  |pc}^:.LJ:STMFD(A|
00006490  29 21 2c 7b 30 2c 5a 7d  3a 4c 44 52 30 2c 5b 31  |)!,{0,Z}:LDR0,[1|
000064a0  2c 23 34 5d 0d 25 4c 72  4c 44 52 20 5a 2c 5b 31  |,#4].%LrLDR Z,[1|
000064b0  2c 23 32 30 5d 3a 53 55  42 30 2c 30 2c 5a 3a 53  |,#20]:SUB0,0,Z:S|
000064c0  54 52 30 2c 5b 31 32 2c  23 65 79 25 5d 3a 4c 44  |TR0,[12,#ey%]:LD|
000064d0  52 30 2c 5b 31 2c 23 31  36 5d 3a 4c 44 52 20 5a  |R0,[1,#16]:LDR Z|
000064e0  2c 5b 31 2c 23 32 34 5d  3a 53 55 42 30 2c 30 2c  |,[1,#24]:SUB0,0,|
000064f0  5a 3a 53 54 52 30 2c 5b  31 32 2c 23 45 69 25 5d  |Z:STR0,[12,#Ei%]|
00006500  3a 4c 44 4d 46 44 28 41  29 21 2c 7b 30 2c 70 63  |:LDMFD(A)!,{0,pc|
00006510  7d 5e 3a 5d 3a e1 0d 25  4d f7 dd f2 61 75 3a ea  |}^:]:..%M...au:.|
00006520  42 2c 46 2c 47 2c 4a 2c  45 2c 54 2c 44 2c 49 3a  |B,F,G,J,E,T,D,I:|
00006530  ea 78 2c 76 2c 43 3a 4a  3d 31 31 3a 47 3d 31 30  |.x,v,C:J=11:G=10|
00006540  3a 46 3d 39 3a 42 3d 38  3a 49 3d 37 3a 44 3d 36  |:F=9:B=8:I=7:D=6|
00006550  3a 54 3d 35 3a 45 3d 34  3a 5b 4f 50 54 56 25 3a  |:T=5:E=4:[OPTV%:|
00006560  2e 6d 5f 3a 53 54 4d 46  44 28 41 29 21 2c 7b 5a  |.m_:STMFD(A)!,{Z|
00006570  7d 3a 4d 4f 56 20 46 2c  31 3a 4c 44 52 20 45 2c  |}:MOV F,1:LDR E,|
00006580  5b 31 32 2c 23 43 79 25  5d 3a 4c 44 52 20 54 2c  |[12,#Cy%]:LDR T,|
00006590  5b 31 32 2c 23 76 79 25  5d 3a 41 44 44 20 44 2c  |[12,#vy%]:ADD D,|
000065a0  31 32 2c 23 65 79 25 3a  4c 44 4d 49 41 20 44 2c  |12,#ey%:LDMIA D,|
000065b0  7b 44 2c 49 7d 3a 4c 44  52 30 2c 5b 31 2c 23 32  |{D,I}:LDR0,[1,#2|
000065c0  38 5d 3a 53 55 42 30 2c  30 2c 44 3a 4d 4f 56 31  |8]:SUB0,0,D:MOV1|
000065d0  2c 45 3a 42 4c 20 75 79  3a 4d 4f 56 20 42 2c 30  |,E:BL uy:MOV B,0|
000065e0  3a 4c 44 52 30 2c 5b 46  2c 23 33 36 5d 3a 53 55  |:LDR0,[F,#36]:SU|
000065f0  42 30 2c 30 2c 23 31 3a  53 55 42 30 2c 30 2c 44  |B0,0,#1:SUB0,0,D|
00006600  3a 4d 4f 56 31 2c 45 3a  42 4c 20 75 79 0d 25 4e  |:MOV1,E:BL uy.%N|
00006610  f7 4d 4f 56 20 47 2c 30  3a 4c 44 52 30 2c 5b 46  |.MOV G,0:LDR0,[F|
00006620  2c 23 33 32 5d 3a 53 55  42 30 2c 30 2c 23 31 3a  |,#32]:SUB0,0,#1:|
00006630  53 55 42 30 2c 49 2c 30  3a 4d 4f 56 31 2c 54 3a  |SUB0,I,0:MOV1,T:|
00006640  42 4c 20 75 79 3a 4d 4f  56 20 4a 2c 30 3a 4c 44  |BL uy:MOV J,0:LD|
00006650  52 30 2c 5b 46 2c 23 34  30 5d 3a 53 55 42 30 2c  |R0,[F,#40]:SUB0,|
00006660  49 2c 30 3a 4d 4f 56 31  2c 54 3a 53 54 4d 46 44  |I,0:MOV1,T:STMFD|
00006670  28 41 29 21 2c 7b 4a 7d  3a 42 4c 20 75 79 3a 4c  |(A)!,{J}:BL uy:L|
00006680  44 4d 46 44 28 41 29 21  2c 7b 4a 7d 3a 4d 4f 56  |DMFD(A)!,{J}:MOV|
00006690  20 46 2c 30 3a 4c 44 52  30 2c 5b 31 32 2c 23 59  | F,0:LDR0,[12,#Y|
000066a0  79 25 5d 3a 4c 44 52 31  2c 5b 31 32 2c 23 51 79  |y%]:LDR1,[12,#Qy|
000066b0  25 5d 3a 54 45 51 30 2c  31 3a 4c 44 4d 65 71 46  |%]:TEQ0,1:LDMeqF|
000066c0  44 28 41 29 21 2c 7b 70  63 7d 5e 3a 53 55 42 53  |D(A)!,{pc}^:SUBS|
000066d0  20 42 2c 42 2c 23 32 3a  4d 4f 56 6c 74 20 42 2c  | B,B,#2:MOVlt B,|
000066e0  23 30 3a 53 55 42 53 20  46 2c 46 2c 23 32 3a 4d  |#0:SUBS F,F,#2:M|
000066f0  4f 56 6c 74 20 46 2c 23  30 3a 41 44 44 20 47 2c  |OVlt F,#0:ADD G,|
00006700  47 2c 23 32 0d 25 4f f9  4c 44 52 20 5a 2c 5b 31  |G,#2.%O.LDR Z,[1|
00006710  32 2c 23 77 25 5d 3a 43  4d 50 20 47 2c 5a 3a 53  |2,#w%]:CMP G,Z:S|
00006720  55 42 67 65 20 47 2c 5a  2c 23 31 3a 41 44 44 20  |UBge G,Z,#1:ADD |
00006730  4a 2c 4a 2c 23 32 3a 4c  44 52 20 5a 2c 5b 31 32  |J,J,#2:LDR Z,[12|
00006740  2c 23 78 25 5d 3a 43 4d  50 20 4a 2c 5a 3a 53 55  |,#x%]:CMP J,Z:SU|
00006750  42 67 65 20 4a 2c 5a 2c  23 31 3a 4c 44 4d 46 44  |Bge J,Z,#1:LDMFD|
00006760  28 41 29 21 2c 7b 70 63  7d 5e 3a 41 4c 49 47 4e  |(A)!,{pc}^:ALIGN|
00006770  3a 2e 77 4a 3a 4c 44 52  31 2c 5b 31 32 2c 23 5f  |:.wJ:LDR1,[12,#_|
00006780  79 25 5d 3a 53 55 42 53  31 2c 31 2c 23 31 3a 4d  |y%]:SUBS1,1,#1:M|
00006790  4f 56 6c 74 53 70 63 2c  5a 3a 53 57 49 20 63 2b  |OVltSpc,Z:SWI c+|
000067a0  31 38 3a 53 57 49 20 63  2b 33 3a 4c 44 52 30 2c  |18:SWI c+3:LDR0,|
000067b0  5b 31 32 2c 23 42 69 25  5d 3a 53 57 49 20 30 3a  |[12,#Bi%]:SWI 0:|
000067c0  4c 44 52 30 2c 5b 31 32  2c 23 4b 6c 25 5d 3a 43  |LDR0,[12,#Kl%]:C|
000067d0  4d 50 30 2c 23 30 3a 42  6c 74 20 65 6c 3a 53 57  |MP0,#0:Blt el:SW|
000067e0  49 20 63 2b 32 33 3a 53  57 49 20 63 2b 31 37 3a  |I c+23:SWI c+17:|
000067f0  53 57 49 20 63 2b 32 3a  53 57 49 20 30 0d 25 50  |SWI c+2:SWI 0.%P|
00006800  f5 53 57 49 20 63 3a 53  57 49 20 63 3a 53 57 49  |.SWI c:SWI c:SWI|
00006810  20 63 3a 53 57 49 20 63  3a 53 57 49 20 63 3a 53  | c:SWI c:SWI c:S|
00006820  57 49 20 63 3a 2e 65 6c  3a 41 44 44 70 63 2c 70  |WI c:.el:ADDpc,p|
00006830  63 2c 31 2c 4c 53 4c 23  32 3a 4d 4f 56 53 70 63  |c,1,LSL#2:MOVSpc|
00006840  2c 5a 3a 42 20 76 4a 3a  42 20 5f 75 3a 42 20 6d  |,Z:B vJ:B _u:B m|
00006850  69 3a 42 20 7a 69 3a 42  20 5a 61 3a 2e 76 4a 3a  |i:B zi:B Za:.vJ:|
00006860  53 54 4d 46 44 28 41 29  21 2c 7b 42 2c 46 2c 47  |STMFD(A)!,{B,F,G|
00006870  2c 4a 2c 5a 7d 3a 43 4d  50 20 42 2c 23 30 3a 4d  |,J,Z}:CMP B,#0:M|
00006880  4f 56 6c 65 20 42 2c 23  31 3a 53 55 42 53 20 47  |OVle B,#1:SUBS G|
00006890  2c 47 2c 42 3a 4c 44 4d  6c 74 46 44 28 41 29 21  |,G,B:LDMltFD(A)!|
000068a0  2c 7b 42 2c 46 2c 47 2c  4a 2c 70 63 7d 5e 3a 4d  |,{B,F,G,J,pc}^:M|
000068b0  4c 41 20 42 2c 45 2c 42  2c 44 3a 4c 44 52 30 2c  |LA B,E,B,D:LDR0,|
000068c0  5b 31 32 2c 23 78 25 5d  3a 53 55 42 30 2c 30 2c  |[12,#x%]:SUB0,0,|
000068d0  23 31 3a 43 4d 50 20 4a  2c 30 3a 53 55 42 67 65  |#1:CMP J,0:SUBge|
000068e0  20 4a 2c 30 2c 23 31 3a  53 55 42 53 20 4a 2c 4a  | J,0,#1:SUBS J,J|
000068f0  2c 46 0d 25 51 f5 4c 44  4d 6c 74 46 44 28 41 29  |,F.%Q.LDMltFD(A)|
00006900  21 2c 7b 42 2c 46 2c 47  2c 4a 2c 70 63 7d 5e 3a  |!,{B,F,G,J,pc}^:|
00006910  4d 4c 41 20 46 2c 54 2c  46 2c 54 3a 53 55 42 20  |MLA F,T,F,T:SUB |
00006920  46 2c 49 2c 46 3a 2e 76  20 4d 4f 56 20 5a 2c 42  |F,I,F:.v MOV Z,B|
00006930  3a 4d 4f 56 33 2c 47 3a  2e 78 20 4d 4f 56 30 2c  |:MOV3,G:.x MOV0,|
00006940  23 36 39 3a 4d 4f 56 31  2c 5a 3a 4d 4f 56 32 2c  |#69:MOV1,Z:MOV2,|
00006950  46 3a 53 57 49 20 36 39  3a 41 44 44 20 5a 2c 5a  |F:SWI 69:ADD Z,Z|
00006960  2c 45 3a 53 55 42 53 33  2c 33 2c 23 31 3a 42 67  |,E:SUBS3,3,#1:Bg|
00006970  65 20 78 3a 53 55 42 20  46 2c 46 2c 54 3a 53 55  |e x:SUB F,F,T:SU|
00006980  42 53 20 4a 2c 4a 2c 23  31 3a 42 67 65 20 76 3a  |BS J,J,#1:Bge v:|
00006990  4c 44 4d 46 44 28 41 29  21 2c 7b 42 2c 46 2c 47  |LDMFD(A)!,{B,F,G|
000069a0  2c 4a 2c 70 63 7d 5e 3a  2e 5f 75 3a 53 54 4d 46  |,J,pc}^:._u:STMF|
000069b0  44 28 41 29 21 2c 7b 42  2c 46 2c 47 2c 4a 2c 5a  |D(A)!,{B,F,G,J,Z|
000069c0  7d 3a 53 55 42 20 47 2c  47 2c 42 3a 4d 4c 41 20  |}:SUB G,G,B:MLA |
000069d0  42 2c 45 2c 42 2c 44 3a  41 44 44 20 42 2c 42 2c  |B,E,B,D:ADD B,B,|
000069e0  45 2c 41 53 52 23 31 0d  25 52 f8 53 55 42 20 4a  |E,ASR#1.%R.SUB J|
000069f0  2c 4a 2c 46 3a 4d 55 4c  20 46 2c 54 2c 46 3a 41  |,J,F:MUL F,T,F:A|
00006a00  44 44 20 46 2c 46 2c 54  2c 41 53 52 23 31 3a 53  |DD F,F,T,ASR#1:S|
00006a10  55 42 20 46 2c 49 2c 46  3a 2e 76 20 4d 4f 56 20  |UB F,I,F:.v MOV |
00006a20  5a 2c 42 3a 4d 4f 56 33  2c 47 3a 2e 78 20 4d 4f  |Z,B:MOV3,G:.x MO|
00006a30  56 30 2c 23 36 39 3a 4d  4f 56 31 2c 5a 3a 4d 4f  |V0,#69:MOV1,Z:MO|
00006a40  56 32 2c 46 3a 53 57 49  20 36 39 3a 41 44 44 20  |V2,F:SWI 69:ADD |
00006a50  5a 2c 5a 2c 45 3a 53 55  42 53 33 2c 33 2c 23 31  |Z,Z,E:SUBS3,3,#1|
00006a60  3a 42 67 65 20 78 3a 53  55 42 20 46 2c 46 2c 54  |:Bge x:SUB F,F,T|
00006a70  3a 53 55 42 53 20 4a 2c  4a 2c 23 31 3a 42 67 65  |:SUBS J,J,#1:Bge|
00006a80  20 76 3a 4c 44 4d 46 44  28 41 29 21 2c 7b 42 2c  | v:LDMFD(A)!,{B,|
00006a90  46 2c 47 2c 4a 2c 70 63  7d 5e 3a 2e 6d 69 3a 53  |F,G,J,pc}^:.mi:S|
00006aa0  54 4d 46 44 28 41 29 21  2c 7b 42 2c 46 2c 47 2c  |TMFD(A)!,{B,F,G,|
00006ab0  4a 2c 5a 7d 3a 53 55 42  20 47 2c 47 2c 42 3a 41  |J,Z}:SUB G,G,B:A|
00006ac0  44 44 20 47 2c 47 2c 23  31 3a 4d 4c 41 20 42 2c  |DD G,G,#1:MLA B,|
00006ad0  45 2c 42 2c 44 3a 53 55  42 20 4a 2c 4a 2c 46 0d  |E,B,D:SUB J,J,F.|
00006ae0  25 53 f4 41 44 44 20 4a  2c 4a 2c 23 31 3a 4d 55  |%S.ADD J,J,#1:MU|
00006af0  4c 20 46 2c 54 2c 46 3a  53 55 42 20 46 2c 49 2c  |L F,T,F:SUB F,I,|
00006b00  46 3a 2e 76 20 4d 4f 56  20 5a 2c 42 3a 4d 4f 56  |F:.v MOV Z,B:MOV|
00006b10  33 2c 47 3a 2e 78 20 4d  4f 56 30 2c 23 36 39 3a  |3,G:.x MOV0,#69:|
00006b20  4d 4f 56 31 2c 5a 3a 4d  4f 56 32 2c 46 3a 53 57  |MOV1,Z:MOV2,F:SW|
00006b30  49 20 36 39 3a 4d 4f 56  30 2c 23 36 39 3a 41 44  |I 69:MOV0,#69:AD|
00006b40  44 31 2c 5a 2c 45 2c 41  53 52 23 31 3a 4d 4f 56  |D1,Z,E,ASR#1:MOV|
00006b50  32 2c 46 3a 53 57 49 20  36 39 3a 4d 4f 56 30 2c  |2,F:SWI 69:MOV0,|
00006b60  23 36 39 3a 4d 4f 56 31  2c 5a 3a 41 44 44 32 2c  |#69:MOV1,Z:ADD2,|
00006b70  46 2c 54 2c 41 53 52 23  31 3a 53 57 49 20 36 39  |F,T,ASR#1:SWI 69|
00006b80  3a 41 44 44 20 5a 2c 5a  2c 45 3a 53 55 42 53 33  |:ADD Z,Z,E:SUBS3|
00006b90  2c 33 2c 23 31 3a 42 67  65 20 78 3a 53 55 42 20  |,3,#1:Bge x:SUB |
00006ba0  46 2c 46 2c 54 3a 53 55  42 53 20 4a 2c 4a 2c 23  |F,F,T:SUBS J,J,#|
00006bb0  31 3a 42 67 65 20 76 3a  4c 44 4d 46 44 28 41 29  |1:Bge v:LDMFD(A)|
00006bc0  21 2c 7b 42 2c 46 2c 47  2c 4a 2c 70 63 7d 5e 3a  |!,{B,F,G,J,pc}^:|
00006bd0  2e 7a 69 0d 25 54 f5 53  54 4d 46 44 28 41 29 21  |.zi.%T.STMFD(A)!|
00006be0  2c 7b 42 2c 46 2c 47 2c  4a 2c 5a 7d 3a 53 55 42  |,{B,F,G,J,Z}:SUB|
00006bf0  20 47 2c 47 2c 42 3a 41  44 44 20 47 2c 47 2c 23  | G,G,B:ADD G,G,#|
00006c00  31 3a 4d 4c 41 20 42 2c  45 2c 42 2c 44 3a 53 55  |1:MLA B,E,B,D:SU|
00006c10  42 20 4a 2c 4a 2c 46 3a  4d 55 4c 20 46 2c 54 2c  |B J,J,F:MUL F,T,|
00006c20  46 3a 41 44 44 20 4a 2c  4a 2c 23 31 3a 53 55 42  |F:ADD J,J,#1:SUB|
00006c30  20 46 2c 49 2c 46 3a 2e  76 20 4d 4f 56 20 5a 2c  | F,I,F:.v MOV Z,|
00006c40  42 3a 4d 4f 56 33 2c 47  3a 2e 78 20 4d 4f 56 30  |B:MOV3,G:.x MOV0|
00006c50  2c 23 36 38 3a 53 55 42  31 2c 5a 2c 23 74 3a 53  |,#68:SUB1,Z,#t:S|
00006c60  55 42 32 2c 46 2c 23 74  3a 53 57 49 20 36 39 3a  |UB2,F,#t:SWI 69:|
00006c70  4d 4f 56 30 2c 23 35 3a  41 44 44 31 2c 5a 2c 23  |MOV0,#5:ADD1,Z,#|
00006c80  74 3a 41 44 44 32 2c 46  2c 23 74 3a 53 57 49 20  |t:ADD2,F,#t:SWI |
00006c90  36 39 3a 4d 4f 56 30 2c  23 36 38 3a 41 44 44 31  |69:MOV0,#68:ADD1|
00006ca0  2c 5a 2c 23 74 3a 53 55  42 32 2c 46 2c 23 74 3a  |,Z,#t:SUB2,F,#t:|
00006cb0  53 57 49 20 36 39 3a 4d  4f 56 30 2c 23 35 3a 53  |SWI 69:MOV0,#5:S|
00006cc0  55 42 31 2c 5a 2c 23 74  0d 25 55 fd 41 44 44 32  |UB1,Z,#t.%U.ADD2|
00006cd0  2c 46 2c 23 74 3a 53 57  49 20 36 39 3a 41 44 44  |,F,#t:SWI 69:ADD|
00006ce0  20 5a 2c 5a 2c 45 3a 53  55 42 53 33 2c 33 2c 23  | Z,Z,E:SUBS3,3,#|
00006cf0  31 3a 42 67 65 20 78 3a  53 55 42 20 46 2c 46 2c  |1:Bge x:SUB F,F,|
00006d00  54 3a 53 55 42 53 20 4a  2c 4a 2c 23 31 3a 42 67  |T:SUBS J,J,#1:Bg|
00006d10  65 20 76 3a 4c 44 4d 46  44 28 41 29 21 2c 7b 42  |e v:LDMFD(A)!,{B|
00006d20  2c 46 2c 47 2c 4a 2c 70  63 7d 5e 3a 2e 5a 61 3a  |,F,G,J,pc}^:.Za:|
00006d30  53 54 4d 46 44 28 41 29  21 2c 7b 42 2c 46 2c 47  |STMFD(A)!,{B,F,G|
00006d40  2c 4a 2c 5a 7d 3a 53 55  42 20 47 2c 47 2c 42 3a  |,J,Z}:SUB G,G,B:|
00006d50  41 44 44 20 47 2c 47 2c  23 31 3a 4d 4c 41 20 42  |ADD G,G,#1:MLA B|
00006d60  2c 45 2c 42 2c 44 3a 53  55 42 20 4a 2c 4a 2c 46  |,E,B,D:SUB J,J,F|
00006d70  3a 4d 55 4c 20 46 2c 54  2c 46 3a 41 44 44 20 4a  |:MUL F,T,F:ADD J|
00006d80  2c 4a 2c 23 31 3a 53 55  42 20 46 2c 49 2c 46 3a  |,J,#1:SUB F,I,F:|
00006d90  2e 76 20 4d 4f 56 20 5a  2c 42 3a 4d 4f 56 33 2c  |.v MOV Z,B:MOV3,|
00006da0  47 3a 2e 78 20 4d 4f 56  30 2c 23 36 38 3a 53 55  |G:.x MOV0,#68:SU|
00006db0  42 31 2c 5a 2c 23 74 3a  4d 4f 56 32 2c 46 3a 53  |B1,Z,#t:MOV2,F:S|
00006dc0  57 49 20 36 39 0d 25 56  ea 4d 4f 56 30 2c 23 35  |WI 69.%V.MOV0,#5|
00006dd0  3a 41 44 44 31 2c 5a 2c  23 74 3a 4d 4f 56 32 2c  |:ADD1,Z,#t:MOV2,|
00006de0  46 3a 53 57 49 20 36 39  3a 4d 4f 56 30 2c 23 36  |F:SWI 69:MOV0,#6|
00006df0  38 3a 4d 4f 56 31 2c 5a  3a 53 55 42 32 2c 46 2c  |8:MOV1,Z:SUB2,F,|
00006e00  23 74 3a 53 57 49 20 36  39 3a 4d 4f 56 30 2c 23  |#t:SWI 69:MOV0,#|
00006e10  35 3a 4d 4f 56 31 2c 5a  3a 41 44 44 32 2c 46 2c  |5:MOV1,Z:ADD2,F,|
00006e20  23 74 3a 53 57 49 20 36  39 3a 41 44 44 20 5a 2c  |#t:SWI 69:ADD Z,|
00006e30  5a 2c 45 3a 53 55 42 53  33 2c 33 2c 23 31 3a 42  |Z,E:SUBS3,3,#1:B|
00006e40  67 65 20 78 3a 53 55 42  20 46 2c 46 2c 54 3a 53  |ge x:SUB F,F,T:S|
00006e50  55 42 53 20 4a 2c 4a 2c  23 31 3a 42 67 65 20 76  |UBS J,J,#1:Bge v|
00006e60  3a 4c 44 4d 46 44 28 41  29 21 2c 7b 42 2c 46 2c  |:LDMFD(A)!,{B,F,|
00006e70  47 2c 4a 2c 70 63 7d 5e  3a 41 4c 49 47 4e 3a 2e  |G,J,pc}^:ALIGN:.|
00006e80  69 6c 3a 4c 44 52 30 2c  5b 31 32 2c 23 71 25 5d  |il:LDR0,[12,#q%]|
00006e90  3a 54 45 51 30 2c 23 48  79 3a 54 45 51 6e 65 30  |:TEQ0,#Hy:TEQne0|
00006ea0  2c 23 52 5f 3a 4d 4f 56  65 71 53 70 63 2c 5a 0d  |,#R_:MOVeqSpc,Z.|
00006eb0  25 57 fb 53 54 4d 46 44  28 41 29 21 2c 7b 44 2c  |%W.STMFD(A)!,{D,|
00006ec0  49 2c 45 2c 54 2c 5a 7d  3a 41 44 44 30 2c 31 32  |I,E,T,Z}:ADD0,12|
00006ed0  2c 23 4a 4a 25 3a 4c 44  4d 49 41 30 2c 7b 30 2d  |,#JJ%:LDMIA0,{0-|
00006ee0  31 7d 3a 41 44 44 20 44  2c 44 2c 30 3a 53 55 42  |1}:ADD D,D,0:SUB|
00006ef0  20 49 2c 49 2c 31 3a 4c  44 52 30 2c 5b 31 32 2c  | I,I,1:LDR0,[12,|
00006f00  23 59 79 25 5d 3a 4c 44  52 31 2c 5b 31 32 2c 23  |#Yy%]:LDR1,[12,#|
00006f10  4e 79 25 5d 3a 41 44 44  30 2c 30 2c 31 2c 4c 53  |Ny%]:ADD0,0,1,LS|
00006f20  4c 23 69 4a 25 3a 41 44  44 30 2c 30 2c 23 57 5f  |L#iJ%:ADD0,0,#W_|
00006f30  25 3a 4c 44 4d 49 41 30  2c 7b 30 2d 31 7d 3a 41  |%:LDMIA0,{0-1}:A|
00006f40  44 44 20 44 2c 44 2c 30  3a 41 44 44 20 49 2c 49  |DD D,D,0:ADD I,I|
00006f50  2c 31 3a a4 47 28 30 2c  30 2c 48 6c 25 29 3a 4c  |,1:.G(0,0,Hl%):L|
00006f60  44 52 30 2c 5b 31 32 2c  23 68 5f 25 5d 3a 54 45  |DR0,[12,#h_%]:TE|
00006f70  51 30 2c 23 30 3a 4c 44  4d 65 71 46 44 28 41 29  |Q0,#0:LDMeqFD(A)|
00006f80  21 2c 7b 44 2c 49 2c 45  2c 54 2c 70 63 7d 5e 3a  |!,{D,I,E,T,pc}^:|
00006f90  a4 47 28 2d 31 2c 2b 31  2c 5f 6c 25 29 3a a4 47  |.G(-1,+1,_l%):.G|
00006fa0  28 30 2c 2b 31 2c 4e 69  25 29 0d 25 58 f3 a4 47  |(0,+1,Ni%).%X..G|
00006fb0  28 2b 31 2c 2b 31 2c 4c  69 25 29 3a a4 47 28 2d  |(+1,+1,Li%):.G(-|
00006fc0  31 2c 30 2c 63 6c 25 29  3a a4 47 28 2b 31 2c 30  |1,0,cl%):.G(+1,0|
00006fd0  2c 64 6c 25 29 3a a4 47  28 2d 31 2c 2d 31 2c 4f  |,dl%):.G(-1,-1,O|
00006fe0  69 25 29 3a a4 47 28 30  2c 2d 31 2c 73 6c 25 29  |i%):.G(0,-1,sl%)|
00006ff0  3a a4 47 28 2b 31 2c 2d  31 2c 49 69 25 29 3a 4c  |:.G(+1,-1,Ii%):L|
00007000  44 4d 46 44 28 41 29 21  2c 7b 44 2c 49 2c 45 2c  |DMFD(A)!,{D,I,E,|
00007010  54 2c 70 63 7d 5e 3a 2e  72 69 3a 41 44 44 30 2c  |T,pc}^:.ri:ADD0,|
00007020  31 32 2c 23 74 25 3a 4c  44 4d 49 41 30 2c 7b 30  |12,#t%:LDMIA0,{0|
00007030  2d 31 7d 3a 41 44 44 30  2c 30 2c 33 3a 53 55 42  |-1}:ADD0,0,3:SUB|
00007040  31 2c 31 2c 34 3a 43 4d  50 30 2c 42 3a 43 4d 50  |1,1,4:CMP0,B:CMP|
00007050  67 65 20 47 2c 30 3a 43  4d 50 67 65 31 2c 46 3a  |ge G,0:CMPge1,F:|
00007060  43 4d 50 67 65 20 4a 2c  31 3a 4d 4f 56 6c 74 53  |CMPge J,1:MOVltS|
00007070  70 63 2c 5a 3a 4c 44 52  35 2c 5b 31 32 2c 23 77  |pc,Z:LDR5,[12,#w|
00007080  25 5d 3a 4d 4c 41 20 35  2c 31 2c 35 2c 30 3a 4c  |%]:MLA 5,1,5,0:L|
00007090  44 52 30 2c 5b 31 32 2c  23 73 79 25 5d 0d 25 59  |DR0,[12,#sy%].%Y|
000070a0  f2 4c 44 52 42 30 2c 5b  30 2c 35 5d 3a 54 45 51  |.LDRB0,[0,5]:TEQ|
000070b0  30 2c 23 30 3a 4c 44 52  65 71 30 2c 5b 31 32 2c  |0,#0:LDReq0,[12,|
000070c0  23 63 79 25 5d 3a 4c 44  52 65 71 42 30 2c 5b 30  |#cy%]:LDReqB0,[0|
000070d0  2c 35 5d 3a 54 45 51 65  71 30 2c 23 30 3a 4d 4f  |,5]:TEQeq0,#0:MO|
000070e0  56 6e 65 53 70 63 2c 5a  3a 41 44 44 30 2c 31 32  |VneSpc,Z:ADD0,12|
000070f0  2c 23 43 79 25 3a 4c 44  4d 49 41 30 2c 7b 30 2d  |,#Cy%:LDMIA0,{0-|
00007100  31 7d 3a 4d 4c 41 20 33  2c 30 2c 33 2c 44 3a 4d  |1}:MLA 3,0,3,D:M|
00007110  4c 41 20 34 2c 31 2c 34  2c 49 3a 4d 4f 56 35 2c  |LA 4,1,4,I:MOV5,|
00007120  23 33 3a 4c 44 52 31 2c  5b 31 32 2c 23 6c 25 5d  |#3:LDR1,[12,#l%]|
00007130  3a 4d 4f 56 30 2c 23 33  34 3a 84 52 30 2c 30 2c  |:MOV0,#34:.R0,0,|
00007140  23 35 31 32 3a 53 57 49  20 34 36 3a 4d 4f 56 53  |#512:SWI 46:MOVS|
00007150  70 63 2c 5a 3a 41 4c 49  47 4e 3a 2e 79 69 3a 53  |pc,Z:ALIGN:.yi:S|
00007160  54 4d 46 44 28 41 29 21  2c 7b 45 2c 54 2c 5a 7d  |TMFD(A)!,{E,T,Z}|
00007170  3a 4c 44 52 20 5a 2c 5b  31 32 2c 23 4a 79 25 5d  |:LDR Z,[12,#Jy%]|
00007180  3a 4c 44 52 32 2c 5b 31  32 2c 23 46 75 25 5d 0d  |:LDR2,[12,#Fu%].|
00007190  25 5a fc 4c 44 52 31 2c  5b 31 32 2c 23 6c 25 5d  |%Z.LDR1,[12,#l%]|
000071a0  3a 53 55 42 20 5a 2c 5a  2c 23 6e 25 3a 2e 43 20  |:SUB Z,Z,#n%:.C |
000071b0  41 44 44 20 5a 2c 5a 2c  23 6e 25 3a 4c 44 52 30  |ADD Z,Z,#n%:LDR0|
000071c0  2c 5b 5a 2c 23 75 25 5d  3a 43 4d 4e 30 2c 23 31  |,[Z,#u%]:CMN0,#1|
000071d0  3a 4c 44 4d 65 71 46 44  28 41 29 21 2c 7b 45 2c  |:LDMeqFD(A)!,{E,|
000071e0  54 2c 70 63 7d 5e 3a 41  44 44 33 2c 5a 2c 23 6d  |T,pc}^:ADD3,Z,#m|
000071f0  79 25 3a 4c 44 4d 49 41  33 2c 7b 33 2d 34 7d 3a  |y%:LDMIA3,{3-4}:|
00007200  43 4d 50 33 2c 42 3a 43  4d 50 67 65 20 47 2c 33  |CMP3,B:CMPge G,3|
00007210  3a 43 4d 50 67 65 34 2c  46 3a 43 4d 50 67 65 20  |:CMPge4,F:CMPge |
00007220  4a 2c 34 3a 42 6c 74 20  43 3a 4c 44 4d 49 41 20  |J,4:Blt C:LDMIA |
00007230  5a 2c 7b 33 2d 35 7d 3a  41 44 44 33 2c 44 2c 33  |Z,{3-5}:ADD3,D,3|
00007240  3a 53 55 42 34 2c 49 2c  34 3a 4c 44 52 30 2c 5b  |:SUB4,I,4:LDR0,[|
00007250  31 32 2c 23 59 79 25 5d  3a 41 44 44 30 2c 30 2c  |12,#Yy%]:ADD0,0,|
00007260  35 2c 4c 53 4c 23 69 4a  25 3a 41 44 44 30 2c 30  |5,LSL#iJ%:ADD0,0|
00007270  2c 23 57 5f 25 3a 4c 44  4d 49 41 30 2c 7b 30 2c  |,#W_%:LDMIA0,{0,|
00007280  35 7d 3a 41 44 44 33 2c  33 2c 30 0d 25 5b e1 41  |5}:ADD3,3,0.%[.A|
00007290  44 44 34 2c 34 2c 35 3a  4d 4f 56 35 2c 23 33 3a  |DD4,4,5:MOV5,#3:|
000072a0  4d 4f 56 30 2c 23 33 34  3a 84 52 30 2c 30 2c 23  |MOV0,#34:.R0,0,#|
000072b0  35 31 32 3a 53 57 49 20  34 36 3a 42 20 43 3a 41  |512:SWI 46:B C:A|
000072c0  4c 49 47 4e 3a 2e 67 4a  3a 53 54 4d 46 44 28 41  |LIGN:.gJ:STMFD(A|
000072d0  29 21 2c 7b 45 2c 54 2c  44 2c 49 2c 31 32 2c 5a  |)!,{E,T,D,I,12,Z|
000072e0  7d 3a 41 44 44 30 2c 31  32 2c 23 76 75 25 3a 4c  |}:ADD0,12,#vu%:L|
000072f0  44 4d 49 41 30 2c 7b 30  2d 31 7d 3a 41 44 44 20  |DMIA0,{0-1}:ADD |
00007300  44 2c 44 2c 30 3a 53 55  42 20 49 2c 49 2c 31 3a  |D,D,0:SUB I,I,1:|
00007310  4c 44 52 32 2c 5b 31 32  2c 23 71 6c 25 5d 3a 4c  |LDR2,[12,#ql%]:L|
00007320  44 52 31 2c 5b 31 32 2c  23 6c 25 5d 3a 4d 4f 56  |DR1,[12,#l%]:MOV|
00007330  30 2c 23 33 34 3a 84 52  30 2c 30 2c 23 35 31 32  |0,#34:.R0,0,#512|
00007340  3a 4c 44 52 20 5a 2c 5b  31 32 2c 23 69 5f 25 5d  |:LDR Z,[12,#i_%]|
00007350  3a 2e 43 20 4c 44 4d 49  41 28 5a 29 21 2c 7b 33  |:.C LDMIA(Z)!,{3|
00007360  2c 31 32 7d 3a 43 4d 50  33 2c 23 30 0d 25 5c 91  |,12}:CMP3,#0.%\.|
00007370  4c 44 4d 6c 74 46 44 28  41 29 21 2c 7b 45 2c 54  |LDMltFD(A)!,{E,T|
00007380  2c 44 2c 49 2c 31 32 2c  70 63 7d 5e 3a 43 4d 50  |,D,I,12,pc}^:CMP|
00007390  33 2c 42 3a 43 4d 50 67  65 20 47 2c 33 3a 43 4d  |3,B:CMPge G,3:CM|
000073a0  50 67 65 31 32 2c 46 3a  43 4d 50 67 65 20 4a 2c  |Pge12,F:CMPge J,|
000073b0  31 32 3a 42 6c 74 20 43  3a 4c 44 4d 49 41 20 41  |12:Blt C:LDMIA A|
000073c0  2c 7b 45 2c 54 7d 3a 4d  4c 41 20 33 2c 45 2c 33  |,{E,T}:MLA 3,E,3|
000073d0  2c 44 3a 4d 55 4c 20 34  2c 54 2c 31 32 3a 53 55  |,D:MUL 4,T,12:SU|
000073e0  42 34 2c 49 2c 34 3a 4d  4f 56 35 2c 23 33 3a 53  |B4,I,4:MOV5,#3:S|
000073f0  57 49 20 34 36 3a 42 20  43 3a 5d 3a e1 0d 25 5d  |WI 46:B C:]:..%]|
00007400  fa dd f2 78 4a 3a 5b 4f  50 54 56 25 3a 41 4c 49  |...xJ:[OPTV%:ALI|
00007410  47 4e 3a 2e 75 69 3a a4  5a 3a 53 54 4d 46 44 28  |GN:.ui:.Z:STMFD(|
00007420  41 29 21 2c 7b 30 2d 31  32 2c 5a 7d 3a 42 4c 20  |A)!,{0-12,Z}:BL |
00007430  72 3a 4d 4f 56 30 2c 23  30 3a 53 54 52 30 2c 5b  |r:MOV0,#0:STR0,[|
00007440  31 32 2c 23 5f 4a 25 5d  3a 4d 4f 56 30 2c 23 30  |12,#_J%]:MOV0,#0|
00007450  3a 42 4c 20 73 5f 3a 4d  4f 56 30 2c 23 30 3a 53  |:BL s_:MOV0,#0:S|
00007460  54 52 30 2c 5b 31 32 2c  23 68 5f 25 5d 3a 4c 44  |TR0,[12,#h_%]:LD|
00007470  52 30 2c 5b 31 32 2c 23  79 5f 25 5d 3a 4c 44 52  |R0,[12,#y_%]:LDR|
00007480  32 2c 5b 31 32 2c 23 51  5f 25 5d 3a 53 55 42 30  |2,[12,#Q_%]:SUB0|
00007490  2c 30 2c 32 3a 53 54 52  30 2c 5b 31 32 2c 23 56  |,0,2:STR0,[12,#V|
000074a0  5f 25 5d 3a 42 4c 20 63  75 3a 4c 44 4d 46 44 28  |_%]:BL cu:LDMFD(|
000074b0  41 29 21 2c 7b 30 2d 31  32 2c 70 63 7d 5e 3a 41  |A)!,{0-12,pc}^:A|
000074c0  4c 49 47 4e 3a 2e 58 75  3a a4 5a 3a 2e 63 75 3a  |LIGN:.Xu:.Z:.cu:|
000074d0  53 54 4d 46 44 28 41 29  21 2c 7b 31 32 2c 5a 7d  |STMFD(A)!,{12,Z}|
000074e0  3a 42 4c 20 72 3a 42 4c  20 60 6c 3a 42 4c 20 4d  |:BL r:BL `l:BL M|
000074f0  75 3a 42 4c 20 4f 5f 0d  25 5e 79 42 4c 20 69 5f  |u:BL O_.%^yBL i_|
00007500  3a 4c 44 52 30 2c 5b 31  32 2c 23 7a 25 5d 3a 4d  |:LDR0,[12,#z%]:M|
00007510  4f 56 31 2c 23 26 66 30  30 30 30 30 30 30 3a 4d  |OV1,#&f0000000:M|
00007520  4f 56 32 2c 23 26 66 30  30 30 30 30 30 30 3a 4d  |OV2,#&f0000000:M|
00007530  4f 56 33 2c 23 26 37 30  30 30 30 30 30 30 3a 4d  |OV3,#&70000000:M|
00007540  4f 56 34 2c 23 26 37 30  30 30 30 30 30 30 3a 53  |OV4,#&70000000:S|
00007550  57 49 20 26 34 30 30 64  31 3a 4c 44 4d 46 44 28  |WI &400d1:LDMFD(|
00007560  41 29 21 2c 7b 31 32 2c  70 63 7d 5e 3a 5d 3a e1  |A)!,{12,pc}^:]:.|
00007570  0d 25 5f f5 dd f2 52 4a  3a 5b 4f 50 54 56 25 3a  |.%_...RJ:[OPTV%:|
00007580  41 4c 49 47 4e 3a 2e 60  6c 3a 53 54 4d 46 44 28  |ALIGN:.`l:STMFD(|
00007590  41 29 21 2c 7b 34 2d 39  2c 5a 7d 3a 4c 44 52 33  |A)!,{4-9,Z}:LDR3|
000075a0  2c 5b 31 32 2c 23 5f 4a  25 5d 3a 41 44 44 33 2c  |,[12,#_J%]:ADD3,|
000075b0  33 2c 23 31 3a 53 54 52  33 2c 5b 31 32 2c 23 5f  |3,#1:STR3,[12,#_|
000075c0  4a 25 5d 3a 4d 4f 56 32  2c 23 59 69 3a 4c 44 52  |J%]:MOV2,#Yi:LDR|
000075d0  31 2c 5b 31 32 2c 23 6f  25 5d 3a 4d 4f 56 30 2c  |1,[12,#o%]:MOV0,|
000075e0  23 67 79 3a 53 57 49 20  26 64 63 62 38 63 3a 4c  |#gy:SWI &dcb8c:L|
000075f0  44 52 31 2c 5b 31 32 2c  23 48 5f 25 5d 3a 4c 44  |DR1,[12,#H_%]:LD|
00007600  52 32 2c 5b 31 32 2c 23  4f 5f 25 5d 3a 53 55 42  |R2,[12,#O_%]:SUB|
00007610  30 2c 33 2c 23 31 3a 4d  4c 41 20 30 2c 31 2c 30  |0,3,#1:MLA 0,1,0|
00007620  2c 32 3a 4c 44 52 31 2c  5b 31 32 2c 23 62 5f 25  |,2:LDR1,[12,#b_%|
00007630  5d 3a 43 4d 50 30 2c 31  3a 4d 4f 56 67 74 30 2c  |]:CMP0,1:MOVgt0,|
00007640  31 3a 4d 4f 56 35 2c 30  3a 4c 44 52 34 2c 5b 31  |1:MOV5,0:LDR4,[1|
00007650  32 2c 23 67 5f 25 5d 3a  4c 44 52 30 2c 5b 31 32  |2,#g_%]:LDR0,[12|
00007660  2c 23 77 25 5d 0d 25 60  fd 4c 44 52 31 2c 5b 31  |,#w%].%`.LDR1,[1|
00007670  32 2c 23 78 25 5d 3a 4d  55 4c 20 39 2c 30 2c 31  |2,#x%]:MUL 9,0,1|
00007680  3a 4d 4f 56 30 2c 34 3a  4d 4f 56 31 2c 39 3a 2e  |:MOV0,4:MOV1,9:.|
00007690  43 20 53 55 42 53 31 2c  31 2c 23 31 3a 53 54 52  |C SUBS1,1,#1:STR|
000076a0  68 73 31 2c 5b 30 5d 2c  23 34 3a 42 68 69 20 43  |hs1,[0],#4:Bhi C|
000076b0  3a 4c 44 52 36 2c 5b 31  32 2c 23 73 79 25 5d 3a  |:LDR6,[12,#sy%]:|
000076c0  4d 4f 56 30 2c 36 3a 4d  4f 56 31 2c 23 30 3a 4d  |MOV0,6:MOV1,#0:M|
000076d0  4f 56 32 2c 39 3a 42 4c  20 74 79 3a 4d 4f 56 37  |OV2,9:BL ty:MOV7|
000076e0  2c 39 2c 4c 53 52 23 31  3a 2e 43 20 42 4c 20 4f  |,9,LSR#1:.C BL O|
000076f0  4a 3a 4d 4f 56 31 2c 39  3a 42 4c 20 4b 79 3a 4c  |J:MOV1,9:BL Ky:L|
00007700  44 52 30 2c 5b 34 2c 31  2c 4c 53 4c 23 32 5d 3a  |DR0,[4,1,LSL#2]:|
00007710  4c 44 52 32 2c 5b 34 2c  37 2c 4c 53 4c 23 32 5d  |LDR2,[4,7,LSL#2]|
00007720  3a 53 54 52 30 2c 5b 34  2c 37 2c 4c 53 4c 23 32  |:STR0,[4,7,LSL#2|
00007730  5d 3a 53 54 52 32 2c 5b  34 2c 31 2c 4c 53 4c 23  |]:STR2,[4,1,LSL#|
00007740  32 5d 3a 53 55 42 53 37  2c 37 2c 23 31 3a 42 68  |2]:SUBS7,7,#1:Bh|
00007750  73 20 43 3a 4c 44 52 37  2c 5b 31 32 2c 23 4a 79  |s C:LDR7,[12,#Jy|
00007760  25 5d 0d 25 61 f5 2e 43  20 4c 44 52 30 2c 5b 34  |%].%a..C LDR0,[4|
00007770  5d 2c 23 34 3a 4d 4f 56  20 5a 2c 23 32 35 35 3a  |],#4:MOV Z,#255:|
00007780  53 54 52 42 20 5a 2c 5b  36 2c 30 5d 3a 4c 44 52  |STRB Z,[6,0]:LDR|
00007790  31 2c 5b 31 32 2c 23 77  25 5d 3a 42 4c 20 4b 79  |1,[12,#w%]:BL Ky|
000077a0  3a 53 54 52 31 2c 5b 37  2c 23 6d 79 25 5d 3a 53  |:STR1,[7,#my%]:S|
000077b0  54 52 30 2c 5b 37 2c 23  67 6c 25 5d 3a 4d 4f 56  |TR0,[7,#gl%]:MOV|
000077c0  30 2c 23 30 3a 53 54 52  30 2c 5b 37 2c 23 75 25  |0,#0:STR0,[7,#u%|
000077d0  5d 3a 53 54 52 30 2c 5b  37 2c 23 57 69 25 5d 3a  |]:STR0,[7,#Wi%]:|
000077e0  41 44 44 37 2c 37 2c 23  6e 25 3a 53 55 42 53 35  |ADD7,7,#n%:SUBS5|
000077f0  2c 35 2c 23 31 3a 42 6e  65 20 43 3a 4d 56 4e 30  |,5,#1:Bne C:MVN0|
00007800  2c 23 ac 28 2d 31 29 3a  53 54 52 30 2c 5b 37 2c  |,#.(-1):STR0,[7,|
00007810  23 75 25 5d 3a 4c 44 52  30 2c 5b 31 32 2c 23 63  |#u%]:LDR0,[12,#c|
00007820  79 25 5d 3a 4d 4f 56 31  2c 23 30 3a 4c 44 52 32  |y%]:MOV1,#0:LDR2|
00007830  2c 5b 31 32 2c 23 77 25  5d 3a 4c 44 52 33 2c 5b  |,[12,#w%]:LDR3,[|
00007840  31 32 2c 23 78 25 5d 3a  4d 55 4c 20 32 2c 33 2c  |12,#x%]:MUL 2,3,|
00007850  32 3a 42 4c 20 74 79 0d  25 62 4a 4c 44 52 30 2c  |2:BL ty.%bJLDR0,|
00007860  5b 31 32 2c 23 69 5f 25  5d 3a 4d 56 4e 31 2c 23  |[12,#i_%]:MVN1,#|
00007870  30 3a 53 54 52 31 2c 5b  30 5d 3a 53 54 52 30 2c  |0:STR1,[0]:STR0,|
00007880  5b 31 32 2c 23 6f 75 25  5d 3a 4c 44 4d 46 44 28  |[12,#ou%]:LDMFD(|
00007890  41 29 21 2c 7b 34 2d 39  2c 70 63 7d 5e 3a 5d 3a  |A)!,{4-9,pc}^:]:|
000078a0  e1 0d 25 63 fd dd f2 71  75 3a ea 43 3a 5b 4f 50  |..%c...qu:.C:[OP|
000078b0  54 56 25 3a 41 4c 49 47  4e 3a 2e 4d 75 3a 53 54  |TV%:ALIGN:.Mu:ST|
000078c0  4d 46 44 28 41 29 21 2c  7b 5a 7d 3a 4d 4f 56 30  |MFD(A)!,{Z}:MOV0|
000078d0  2c 23 30 3a 53 54 52 30  2c 5b 31 32 2c 23 4b 75  |,#0:STR0,[12,#Ku|
000078e0  25 5d 3a 4c 44 52 30 2c  5b 31 32 2c 23 56 5f 25  |%]:LDR0,[12,#V_%|
000078f0  5d 3a 4c 44 52 31 2c 5b  31 32 2c 23 51 5f 25 5d  |]:LDR1,[12,#Q_%]|
00007900  3a 41 44 44 30 2c 30 2c  31 3a 42 4c 20 53 6c 3a  |:ADD0,0,1:BL Sl:|
00007910  2e 43 20 42 4c 20 4f 4a  3a 4c 44 52 31 2c 5b 31  |.C BL OJ:LDR1,[1|
00007920  32 2c 23 77 25 5d 3a 4c  44 52 32 2c 5b 31 32 2c  |2,#w%]:LDR2,[12,|
00007930  23 78 25 5d 3a 4d 55 4c  20 31 2c 32 2c 31 3a 42  |#x%]:MUL 1,2,1:B|
00007940  4c 20 4b 79 3a 4d 4f 56  30 2c 31 3a 4c 44 52 31  |L Ky:MOV0,1:LDR1|
00007950  2c 5b 31 32 2c 23 77 25  5d 3a 42 4c 20 4b 79 3a  |,[12,#w%]:BL Ky:|
00007960  53 54 52 31 2c 5b 31 32  2c 23 74 25 5d 3a 53 54  |STR1,[12,#t%]:ST|
00007970  52 30 2c 5b 31 32 2c 23  41 79 25 5d 3a 42 4c 20  |R0,[12,#Ay%]:BL |
00007980  4b 69 3a 42 6e 65 20 43  3a 4c 44 4d 46 44 28 41  |Ki:Bne C:LDMFD(A|
00007990  29 21 2c 7b 70 63 7d 5e  3a 41 4c 49 47 4e 0d 25  |)!,{pc}^:ALIGN.%|
000079a0  64 f9 2e 4b 69 3a 53 54  4d 46 44 28 41 29 21 2c  |d..Ki:STMFD(A)!,|
000079b0  7b 34 2d 37 2c 5a 7d 3a  4c 44 52 36 2c 5b 31 32  |{4-7,Z}:LDR6,[12|
000079c0  2c 23 77 25 5d 3a 4c 44  52 37 2c 5b 31 32 2c 23  |,#w%]:LDR7,[12,#|
000079d0  78 25 5d 3a 4c 44 52 33  2c 5b 31 32 2c 23 73 79  |x%]:LDR3,[12,#sy|
000079e0  25 5d 3a 4d 56 4e 34 2c  23 ac 28 2d 31 29 3a 2e  |%]:MVN4,#.(-1):.|
000079f0  76 20 4d 56 4e 35 2c 23  ac 28 2d 31 29 3a 2e 78  |v MVN5,#.(-1):.x|
00007a00  20 42 4c 20 79 6c 3a 4c  44 4d 6e 65 46 44 28 41  | BL yl:LDMneFD(A|
00007a10  29 21 2c 7b 34 2d 37 2c  70 63 7d 3a 41 44 44 35  |)!,{4-7,pc}:ADD5|
00007a20  2c 35 2c 23 31 3a 54 45  51 35 2c 23 32 3a 42 6e  |,5,#1:TEQ5,#2:Bn|
00007a30  65 20 78 3a 41 44 44 34  2c 34 2c 23 31 3a 54 45  |e x:ADD4,4,#1:TE|
00007a40  51 34 2c 35 3a 42 6e 65  20 76 3a 4c 44 4d 46 44  |Q4,5:Bne v:LDMFD|
00007a50  28 41 29 21 2c 7b 34 2d  37 2c 70 63 7d 3a 41 4c  |(A)!,{4-7,pc}:AL|
00007a60  49 47 4e 3a 2e 79 6c 3a  41 44 44 30 2c 30 2c 34  |IGN:.yl:ADD0,0,4|
00007a70  3a 41 44 44 31 2c 31 2c  35 3a 43 4d 50 30 2c 37  |:ADD1,1,5:CMP0,7|
00007a80  3a 43 4d 50 6c 6f 31 2c  36 3a 4d 4c 41 6c 6f 20  |:CMPlo1,6:MLAlo |
00007a90  32 2c 30 2c 36 2c 31 0d  25 65 f2 53 55 42 30 2c  |2,0,6,1.%e.SUB0,|
00007aa0  30 2c 34 3a 53 55 42 31  2c 31 2c 35 3a 84 52 68  |0,4:SUB1,1,5:.Rh|
00007ab0  73 53 70 63 2c 5a 2c 23  4c 5f 3a 4c 44 52 42 32  |sSpc,Z,#L_:LDRB2|
00007ac0  2c 5b 33 2c 32 5d 3a 54  45 51 32 2c 23 30 3a 84  |,[3,2]:TEQ2,#0:.|
00007ad0  52 65 71 53 70 63 2c 5a  2c 23 4c 5f 3a 42 49 43  |ReqSpc,Z,#L_:BIC|
00007ae0  53 70 63 2c 5a 2c 23 4c  5f 3a 41 4c 49 47 4e 3a  |Spc,Z,#L_:ALIGN:|
00007af0  2e 53 6c 3a 53 54 4d 46  44 28 41 29 21 2c 7b 5a  |.Sl:STMFD(A)!,{Z|
00007b00  7d 3a 43 4d 50 30 2c 23  30 3a 4d 4f 56 6c 74 30  |}:CMP0,#0:MOVlt0|
00007b10  2c 23 30 3a 4c 44 52 31  2c 5b 31 32 2c 23 78 5f  |,#0:LDR1,[12,#x_|
00007b20  25 5d 3a 43 4d 50 30 2c  31 3a 4d 4f 56 67 74 30  |%]:CMP0,1:MOVgt0|
00007b30  2c 31 3a 53 54 52 30 2c  5b 31 32 2c 23 56 5f 25  |,1:STR0,[12,#V_%|
00007b40  5d 3a 4d 4f 56 33 2c 30  3a 4c 44 52 31 2c 5b 31  |]:MOV3,0:LDR1,[1|
00007b50  32 2c 23 6f 25 5d 3a 4d  4f 56 32 2c 23 4a 5f 3a  |2,#o%]:MOV2,#J_:|
00007b60  4d 4f 56 30 2c 23 67 79  3a 53 57 49 20 26 64 63  |MOV0,#gy:SWI &dc|
00007b70  62 38 63 3a 4c 44 4d 46  44 28 41 29 21 2c 7b 70  |b8c:LDMFD(A)!,{p|
00007b80  63 7d 5e 3a 41 4c 49 47  4e 0d 25 66 a8 2e 68 4a  |c}^:ALIGN.%f..hJ|
00007b90  20 44 43 44 26 66 34 32  33 66 3a 41 4c 49 47 4e  | DCD&f423f:ALIGN|
00007ba0  3a 2e 73 5f 3a 53 54 4d  46 44 28 41 29 21 2c 7b  |:.s_:STMFD(A)!,{|
00007bb0  5a 7d 3a 43 4d 50 30 2c  23 30 3a 4d 4f 56 6c 74  |Z}:CMP0,#0:MOVlt|
00007bc0  30 2c 23 30 3a 4c 44 52  31 2c 68 4a 3a 43 4d 50  |0,#0:LDR1,hJ:CMP|
00007bd0  30 2c 31 3a 4d 4f 56 68  69 30 2c 31 3a 53 54 52  |0,1:MOVhi0,1:STR|
00007be0  30 2c 5b 31 32 2c 23 43  5f 25 5d 3a 4d 4f 56 33  |0,[12,#C_%]:MOV3|
00007bf0  2c 30 3a 4c 44 52 31 2c  5b 31 32 2c 23 6f 25 5d  |,0:LDR1,[12,#o%]|
00007c00  3a 4d 4f 56 32 2c 23 46  69 3a 4d 4f 56 30 2c 23  |:MOV2,#Fi:MOV0,#|
00007c10  67 79 3a 53 57 49 20 26  64 63 62 38 63 3a 4c 44  |gy:SWI &dcb8c:LD|
00007c20  4d 46 44 28 41 29 21 2c  7b 70 63 7d 5e 3a 5d 3a  |MFD(A)!,{pc}^:]:|
00007c30  e1 0d 25 67 f5 dd f2 56  5f 3a 5b 4f 50 54 56 25  |..%g...V_:[OPTV%|
00007c40  3a 41 4c 49 47 4e 3a 41  4c 49 47 4e 3a 2e 4d 69  |:ALIGN:ALIGN:.Mi|
00007c50  3a a4 5a 3a 53 54 4d 46  44 28 41 29 21 2c 7b 34  |:.Z:STMFD(A)!,{4|
00007c60  2d 39 2c 31 32 2c 5a 7d  3a 42 4c 20 72 3a 53 55  |-9,12,Z}:BL r:SU|
00007c70  42 20 41 2c 41 2c 23 35  31 32 3a 4c 44 52 30 2c  |B A,A,#512:LDR0,|
00007c80  5b 31 32 2c 23 7a 25 5d  3a 4d 4f 56 31 2c 41 3a  |[12,#z%]:MOV1,A:|
00007c90  53 54 52 30 2c 5b 31 5d  3a 53 57 49 20 26 34 30  |STR0,[1]:SWI &40|
00007ca0  30 63 38 3a 42 4c 20 51  79 3a 2e 43 20 54 45 51  |0c8:BL Qy:.C TEQ|
00007cb0  30 2c 23 30 3a 42 65 71  20 46 6c 3a 42 4c 20 72  |0,#0:Beq Fl:BL r|
00007cc0  3a 42 4c 20 6d 5f 3a 42  4c 20 69 6c 3a 42 4c 20  |:BL m_:BL il:BL |
00007cd0  67 4a 3a 42 4c 20 79 69  3a 42 4c 20 77 4a 3a 42  |gJ:BL yi:BL wJ:B|
00007ce0  4c 20 4b 4a 3a 4d 4f 56  31 2c 41 3a 53 57 49 20  |L KJ:MOV1,A:SWI |
00007cf0  26 34 30 30 63 61 3a 42  20 43 3a 2e 46 6c 3a 41  |&400ca:B C:.Fl:A|
00007d00  44 44 20 41 2c 41 2c 23  35 31 32 3a 4c 44 4d 46  |DD A,A,#512:LDMF|
00007d10  44 28 41 29 21 2c 7b 34  2d 39 2c 31 32 2c 70 63  |D(A)!,{4-9,12,pc|
00007d20  7d 5e 3a 5d 3a e1 0d 25  68 f5 dd f2 65 4a 3a ea  |}^:]:..%h...eJ:.|
00007d30  43 2c 76 2c 78 3a ea 65  2c 58 2c 69 2c 72 79 2c  |C,v,x:.e,X,i,ry,|
00007d40  51 2c 79 2c 4d 2c 53 2c  69 6f 2c 79 79 2c 68 79  |Q,y,M,S,io,yy,hy|
00007d50  2c 56 5f 2c 70 3a 4d 3d  30 3a 53 3d 31 3a 51 3d  |,V_,p:M=0:S=1:Q=|
00007d60  32 3a 79 3d 33 3a 58 3d  4b 3a 65 3d 68 3a 69 3d  |2:y=3:X=K:e=h:i=|
00007d70  54 69 3a 71 3d 54 6c 3a  72 79 3d 5a 3a 68 79 3d  |Ti:q=Tl:ry=Z:hy=|
00007d80  33 3a 69 6f 3d 56 3a 79  79 3d 5a 3a 56 5f 3d 69  |3:io=V:yy=Z:V_=i|
00007d90  3a 70 3d 58 3a 5b 4f 50  54 56 25 3a 2e 4c 75 20  |:p=X:[OPTV%:.Lu |
00007da0  45 51 55 53 22 25 64 2e  25 30 33 64 22 3a 44 43  |EQUS"%d.%03d":DC|
00007db0  42 30 3a 2e 4d 4a a4 74  79 28 33 32 29 3a 41 4c  |B0:.MJ.ty(32):AL|
00007dc0  49 47 4e 3a 2e 69 5f 3a  4c 44 52 30 2c 5b 31 32  |IGN:.i_:LDR0,[12|
00007dd0  2c 23 68 4a 25 5d 3a 54  45 51 30 2c 23 30 3a 4d  |,#hJ%]:TEQ0,#0:M|
00007de0  4f 56 65 71 53 70 63 2c  5a 3a 53 54 4d 46 44 28  |OVeqSpc,Z:STMFD(|
00007df0  41 29 21 2c 7b 34 2d 39  2c 5a 7d 3a 4c 44 52 20  |A)!,{4-9,Z}:LDR |
00007e00  58 2c 5b 31 32 2c 23 4a  79 25 5d 3a 4c 44 52 20  |X,[12,#Jy%]:LDR |
00007e10  65 2c 5b 31 32 2c 23 4f  75 25 5d 0d 25 69 f0 4c  |e,[12,#Ou%].%i.L|
00007e20  44 52 20 71 2c 5b 31 32  2c 23 77 25 5d 3a 41 44  |DR q,[12,#w%]:AD|
00007e30  44 20 71 2c 71 2c 23 32  3a 41 44 44 20 71 2c 71  |D q,q,#2:ADD q,q|
00007e40  2c 23 33 31 3a 4d 4f 56  20 71 2c 71 2c 4c 53 52  |,#31:MOV q,q,LSR|
00007e50  23 35 3a 4d 4f 56 20 71  2c 71 2c 4c 53 4c 23 32  |#5:MOV q,q,LSL#2|
00007e60  3a 4c 44 52 32 2c 5b 31  32 2c 23 78 25 5d 3a 41  |:LDR2,[12,#x%]:A|
00007e70  44 44 32 2c 32 2c 23 32  3a 4d 55 4c 20 32 2c 71  |DD2,2,#2:MUL 2,q|
00007e80  2c 32 3a 4d 4f 56 31 2c  23 30 3a 4d 4f 56 30 2c  |,2:MOV1,#0:MOV0,|
00007e90  65 3a 42 4c 20 74 79 3a  4d 4f 56 20 69 2c 23 37  |e:BL ty:MOV i,#7|
00007ea0  3a 2e 43 20 4c 44 52 20  4d 2c 5b 58 2c 23 75 25  |:.C LDR M,[X,#u%|
00007eb0  5d 3a 43 4d 4e 20 4d 2c  23 31 3a 42 65 71 20 49  |]:CMN M,#1:Beq I|
00007ec0  75 3a 41 44 44 20 4d 2c  58 2c 23 6d 79 25 3a 4c  |u:ADD M,X,#my%:L|
00007ed0  44 4d 49 41 20 4d 2c 7b  4d 2c 53 7d 3a 41 44 44  |DMIA M,{M,S}:ADD|
00007ee0  20 58 2c 58 2c 23 6e 25  3a 41 44 44 20 4d 2c 4d  | X,X,#n%:ADD M,M|
00007ef0  2c 23 31 3a 4d 4c 41 20  53 2c 71 2c 53 2c 65 3a  |,#1:MLA S,q,S,e:|
00007f00  42 49 43 20 51 2c 4d 2c  23 33 31 0d 25 6a f7 41  |BIC Q,M,#31.%j.A|
00007f10  44 44 20 53 2c 53 2c 51  2c 4c 53 52 23 33 3a 80  |DD S,S,Q,LSR#3:.|
00007f20  20 4d 2c 4d 2c 23 33 31  3a 43 4d 50 20 4d 2c 23  | M,M,#31:CMP M,#|
00007f30  33 30 3a 42 68 73 20 6b  69 3a 4c 44 52 20 51 2c  |30:Bhs ki:LDR Q,|
00007f40  5b 53 5d 2c 23 30 3a 84  52 20 51 2c 51 2c 69 2c  |[S],#0:.R Q,Q,i,|
00007f50  4c 53 4c 4d 3a 53 54 52  20 51 2c 5b 53 5d 2c 71  |LSLM:STR Q,[S],q|
00007f60  3a 4c 44 52 20 51 2c 5b  53 5d 2c 23 30 3a 84 52  |:LDR Q,[S],#0:.R|
00007f70  20 51 2c 51 2c 69 2c 4c  53 4c 4d 3a 53 54 52 20  | Q,Q,i,LSLM:STR |
00007f80  51 2c 5b 53 5d 2c 71 3a  4c 44 52 20 51 2c 5b 53  |Q,[S],q:LDR Q,[S|
00007f90  5d 2c 23 30 3a 84 52 20  51 2c 51 2c 69 2c 4c 53  |],#0:.R Q,Q,i,LS|
00007fa0  4c 4d 3a 53 54 52 20 51  2c 5b 53 5d 2c 71 3a 42  |LM:STR Q,[S],q:B|
00007fb0  20 43 3a 2e 6b 69 3a 4d  4f 56 65 71 20 72 79 2c  | C:.ki:MOVeq ry,|
00007fc0  23 31 3a 4d 4f 56 68 69  20 72 79 2c 23 33 3a 4c  |#1:MOVhi ry,#3:L|
00007fd0  44 4d 49 41 20 53 2c 7b  51 2c 79 7d 3a 84 52 20  |DMIA S,{Q,y}:.R |
00007fe0  51 2c 51 2c 69 2c 4c 53  4c 4d 3a 84 52 20 79 2c  |Q,Q,i,LSLM:.R y,|
00007ff0  79 2c 72 79 3a 53 54 4d  49 41 20 53 2c 7b 51 2c  |y,ry:STMIA S,{Q,|
00008000  79 7d 0d 25 6b fb 41 44  44 20 53 2c 53 2c 71 3a  |y}.%k.ADD S,S,q:|
00008010  4c 44 4d 49 41 20 53 2c  7b 51 2c 79 7d 3a 84 52  |LDMIA S,{Q,y}:.R|
00008020  20 51 2c 51 2c 69 2c 4c  53 4c 4d 3a 84 52 20 79  | Q,Q,i,LSLM:.R y|
00008030  2c 79 2c 72 79 3a 53 54  4d 49 41 20 53 2c 7b 51  |,y,ry:STMIA S,{Q|
00008040  2c 79 7d 3a 41 44 44 20  53 2c 53 2c 71 3a 4c 44  |,y}:ADD S,S,q:LD|
00008050  4d 49 41 20 53 2c 7b 51  2c 79 7d 3a 84 52 20 51  |MIA S,{Q,y}:.R Q|
00008060  2c 51 2c 69 2c 4c 53 4c  4d 3a 84 52 20 79 2c 79  |,Q,i,LSLM:.R y,y|
00008070  2c 72 79 3a 53 54 4d 49  41 20 53 2c 7b 51 2c 79  |,ry:STMIA S,{Q,y|
00008080  7d 3a 42 20 43 3a 2e 49  75 3a 4d 4f 56 20 69 2c  |}:B C:.Iu:MOV i,|
00008090  23 31 3a 4c 44 52 20 70  2c 5b 31 32 2c 23 69 5f  |#1:LDR p,[12,#i_|
000080a0  25 5d 3a 2e 43 20 4c 44  4d 49 41 28 70 29 21 2c  |%]:.C LDMIA(p)!,|
000080b0  7b 4d 2c 53 7d 3a 43 4d  50 20 4d 2c 23 30 3a 42  |{M,S}:CMP M,#0:B|
000080c0  6c 74 20 49 69 3a 41 44  44 20 4d 2c 4d 2c 23 31  |lt Ii:ADD M,M,#1|
000080d0  3a 41 44 44 20 53 2c 53  2c 23 31 3a 4d 4c 41 20  |:ADD S,S,#1:MLA |
000080e0  53 2c 71 2c 53 2c 65 3a  42 49 43 20 51 2c 4d 2c  |S,q,S,e:BIC Q,M,|
000080f0  23 33 31 3a 80 20 4d 2c  4d 2c 23 33 31 0d 25 6c  |#31:. M,M,#31.%l|
00008100  f5 4c 44 52 20 51 2c 5b  53 2c 51 2c 4c 53 52 23  |.LDR Q,[S,Q,LSR#|
00008110  33 5d 21 3a 84 52 20 51  2c 51 2c 69 2c 4c 53 4c  |3]!:.R Q,Q,i,LSL|
00008120  4d 3a 53 54 52 20 51 2c  5b 53 5d 2c 23 2d 31 3a  |M:STR Q,[S],#-1:|
00008130  42 20 43 3a 2e 49 69 3a  4d 4f 56 20 68 79 2c 23  |B C:.Ii:MOV hy,#|
00008140  30 3a 4c 44 52 20 53 2c  5b 31 32 2c 23 78 25 5d  |0:LDR S,[12,#x%]|
00008150  3a 2e 76 20 41 44 44 20  65 2c 65 2c 71 3a 4c 44  |:.v ADD e,e,q:LD|
00008160  52 20 4d 2c 5b 31 32 2c  23 77 25 5d 3a 4d 4f 56  |R M,[12,#w%]:MOV|
00008170  20 56 5f 2c 65 3a 4c 44  52 20 51 2c 5b 56 5f 5d  | V_,e:LDR Q,[V_]|
00008180  2c 23 34 3a 4d 4f 56 20  51 2c 51 2c 4c 53 52 23  |,#4:MOV Q,Q,LSR#|
00008190  31 3a 4d 4f 56 20 79 79  2c 23 33 31 3a 2e 78 20  |1:MOV yy,#31:.x |
000081a0  4d 4f 56 53 20 51 2c 51  2c 4c 53 52 23 31 3a 41  |MOVS Q,Q,LSR#1:A|
000081b0  44 44 63 73 20 68 79 2c  68 79 2c 23 31 3a 53 55  |DDcs hy,hy,#1:SU|
000081c0  42 53 20 4d 2c 4d 2c 23  31 3a 42 6c 65 20 56 6c  |BS M,M,#1:Ble Vl|
000081d0  3a 53 55 42 53 20 79 79  2c 79 79 2c 23 31 3a 42  |:SUBS yy,yy,#1:B|
000081e0  67 74 20 78 3a 4c 44 52  20 51 2c 5b 56 5f 5d 2c  |gt x:LDR Q,[V_],|
000081f0  23 34 0d 25 6d f0 4d 4f  56 20 79 79 2c 23 33 32  |#4.%m.MOV yy,#32|
00008200  3a 42 20 78 3a 2e 56 6c  3a 53 55 42 53 20 53 2c  |:B x:.Vl:SUBS S,|
00008210  53 2c 23 31 3a 42 67 74  20 76 3a 4c 44 52 20 56  |S,#1:Bgt v:LDR V|
00008220  2c 5b 31 32 2c 23 78 25  5d 3a 4c 44 52 20 5a 2c  |,[12,#x%]:LDR Z,|
00008230  5b 31 32 2c 23 77 25 5d  3a 4d 55 4c 20 30 2c 56  |[12,#w%]:MUL 0,V|
00008240  2c 5a 3a 4d 4f 56 20 56  2c 23 31 30 30 30 3a 4d  |,Z:MOV V,#1000:M|
00008250  55 4c 20 30 2c 56 2c 30  3a 4d 4f 56 31 2c 68 79  |UL 0,V,0:MOV1,hy|
00008260  3a 41 44 44 30 2c 30 2c  31 2c 4c 53 52 23 31 3a  |:ADD0,0,1,LSR#1:|
00008270  42 4c 20 4b 79 3a 4d 4f  56 31 2c 23 31 30 30 30  |BL Ky:MOV1,#1000|
00008280  3a 42 4c 20 4b 79 3a 4d  4f 56 33 2c 31 3a 4d 4f  |:BL Ky:MOV3,1:MO|
00008290  56 32 2c 30 3a 41 44 52  31 2c 4c 75 3a 41 44 52  |V2,0:ADR1,Lu:ADR|
000082a0  30 2c 4d 4a 3a 53 57 49  20 26 64 63 62 38 61 3a  |0,MJ:SWI &dcb8a:|
000082b0  41 44 52 33 2c 4d 4a 3a  4c 44 52 31 2c 5b 31 32  |ADR3,MJ:LDR1,[12|
000082c0  2c 23 6f 25 5d 3a 4d 4f  56 32 2c 23 59 5f 3a 4d  |,#o%]:MOV2,#Y_:M|
000082d0  4f 56 30 2c 23 57 5f 3a  53 57 49 20 26 64 63 62  |OV0,#W_:SWI &dcb|
000082e0  38 63 0d 25 6e 1b 4c 44  4d 46 44 28 41 29 21 2c  |8c.%n.LDMFD(A)!,|
000082f0  7b 34 2d 39 2c 70 63 7d  5e 3a 5d 3a e1 0d 25 6f  |{4-9,pc}^:]:..%o|
00008300  fb dd f2 5f 5f 3a 5a 5f  25 3d a4 45 28 22 47 61  |...__:Z_%=.E("Ga|
00008310  6d 65 50 22 2c 76 25 29  3a 46 5f 25 3d a4 45 28  |meP",v%):F_%=.E(|
00008320  22 56 69 65 77 50 22 2c  76 25 29 3a 57 79 25 3d  |"ViewP",v%):Wy%=|
00008330  a4 52 28 22 45 6e 74 65  72 4e 61 6d 65 22 2c 31  |.R("EnterName",1|
00008340  2c 2b 31 29 3a 72 79 25  3d a4 52 28 22 41 72 72  |,+1):ry%=.R("Arr|
00008350  6f 77 22 2c 31 2c 2b 31  29 3a 50 5f 25 3d a4 45  |ow",1,+1):P_%=.E|
00008360  28 22 48 69 67 68 6c 69  67 68 74 22 2c 76 25 29  |("Highlight",v%)|
00008370  3a 53 5f 25 3d a4 45 28  22 43 65 6e 74 72 65 22  |:S_%=.E("Centre"|
00008380  2c 76 25 29 3a 4f 79 25  3d a4 45 28 22 4d 61 67  |,v%):Oy%=.E("Mag|
00008390  6e 69 66 69 65 72 22 2c  76 25 29 3a f2 71 28 22  |nifier",v%):.q("|
000083a0  42 6f 61 72 64 22 2c 2b  31 2c 22 42 6f 61 72 64  |Board",+1,"Board|
000083b0  5f 54 65 6d 70 6c 61 74  65 22 29 3a f2 71 28 22  |_Template"):.q("|
000083c0  53 74 61 74 75 73 22 2c  76 25 2c 22 53 74 61 74  |Status",v%,"Stat|
000083d0  75 73 5f 54 65 6d 70 6c  61 74 65 22 29 3a f2 71  |us_Template"):.q|
000083e0  28 22 48 69 67 68 53 63  6f 72 65 73 22 2c 2b 31  |("HighScores",+1|
000083f0  2c 22 22 29 3a f2 59 4a  0d 25 70 0c de 77 6e 25  |,""):.YJ.%p..wn%|
00008400  33 32 3a e1 0d 25 71 2d  dd a4 42 6f 61 72 64 5f  |32:..%q-..Board_|
00008410  54 65 6d 70 6c 61 74 65  28 4d 25 29 3a 76 6c 3d  |Template(M%):vl=|
00008420  4d 25 3f 33 35 3a 4b 6c  3d 4d 25 3f 33 34 3a 3d  |M%?35:Kl=M%?34:=|
00008430  30 0d 25 72 55 dd a4 53  74 61 74 75 73 5f 54 65  |0.%rU..Status_Te|
00008440  6d 70 6c 61 74 65 28 4d  25 29 3a 5a 6c 25 3d 28  |mplate(M%):Zl%=(|
00008450  4d 25 21 38 29 2d 28 4d  25 21 30 29 3a 45 5f 25  |M%!8)-(M%!0):E_%|
00008460  3d 28 4d 25 21 31 32 29  2d 28 4d 25 21 34 29 3a  |=(M%!12)-(M%!4):|
00008470  21 48 5f 3d 45 5f 25 2b  34 3a 44 6e 25 3d 4d 25  |!H_=E_%+4:Dn%=M%|
00008480  21 32 38 3a 3d 30 0d 25  73 49 dd f2 44 4a 3a 44  |!28:=0.%sI..DJ:D|
00008490  5f 25 3d a3 3a 7a 4a 25  3d 26 31 30 34 30 61 33  |_%=.:zJ%=&1040a3|
000084a0  31 2b 30 3a 64 4a 25 3d  26 31 30 34 30 61 33 31  |1+0:dJ%=&1040a31|
000084b0  2b 31 3a 48 75 25 3d 26  31 30 34 30 61 33 31 2b  |+1:Hu%=&1040a31+|
000084c0  32 3a 6b 6c 25 3d 30 3a  6f 6c 25 3d 30 3a e1 0d  |2:kl%=0:ol%=0:..|
000084d0  25 74 28 dd f2 75 79 3a  50 61 25 3d 36 3a 4a 61  |%t(..uy:Pa%=6:Ja|
000084e0  25 3d 31 3a 4d 4a 25 3d  ba 28 6f 4a 29 3a 44 5f  |%=1:MJ%=.(oJ):D_|
000084f0  25 3d 7a 4a 25 3a e1 0d  25 75 2d dd f2 67 79 3a  |%=zJ%:..%u-..gy:|
00008500  ea 41 25 3a 60 6c 25 3d  5a 25 3a 41 25 3d 5a 25  |.A%:`l%=Z%:A%=Z%|
00008510  3a 4d 4a 25 3d ba 28 78  75 29 3a 44 5f 25 3d 64  |:MJ%=.(xu):D_%=d|
00008520  4a 25 3a e1 0d 25 76 1c  dd f2 53 5f 3a 4d 4a 25  |J%:..%v...S_:MJ%|
00008530  3d ba 28 6e 6c 29 3a 44  5f 25 3d 48 75 25 3a e1  |=.(nl):D_%=Hu%:.|
00008540  0d 25 77 43 dd f2 46 4a  3a ea 67 69 2c 6d 4a 2c  |.%wC..FJ:.gi,mJ,|
00008550  69 4a 2c 45 6c 2c 6a 4a  2c 69 69 2c 67 6c 2c 63  |iJ,El,jJ,ii,gl,c|
00008560  4a 2c 77 6c 3a ea 85 3a  ee 85 ea f7 85 3a f2 41  |J,wl:..:.....:.A|
00008570  28 22 40 2e 42 61 73 57  69 6d 70 3a 20 4d 65 6e  |("@.BasWimp: Men|
00008580  75 22 29 0d 25 78 f0 5b  4f 50 54 56 25 3a 41 4c  |u").%x.[OPTV%:AL|
00008590  49 47 4e 3a 2e 50 6c 20  44 43 44 30 3a 44 43 44  |IGN:.Pl DCD0:DCD|
000085a0  31 3a 44 43 44 32 3a 44  43 44 33 3a 44 43 44 34  |1:DCD2:DCD3:DCD4|
000085b0  3a 44 43 44 35 3a 44 43  44 36 3a 44 43 44 37 3a  |:DCD5:DCD6:DCD7:|
000085c0  44 43 44 38 3a 2e 74 75  3a a4 5a 3a 53 54 4d 46  |DCD8:.tu:.Z:STMF|
000085d0  44 28 41 29 21 2c 7b 5a  7d 3a 4d 4f 56 20 56 2c  |D(A)!,{Z}:MOV V,|
000085e0  23 38 3a 2e 43 20 53 55  42 20 41 2c 41 2c 23 34  |#8:.C SUB A,A,#4|
000085f0  3a 53 54 52 20 41 2c 5b  41 5d 2c 23 30 3a 53 55  |:STR A,[A],#0:SU|
00008600  42 53 20 56 2c 56 2c 23  31 3a 42 67 74 20 43 3a  |BS V,V,#1:Bgt C:|
00008610  42 4c 20 68 75 3a 4c 44  4d 46 44 28 41 29 21 2c  |BL hu:LDMFD(A)!,|
00008620  7b 31 2d 38 2c 5a 7d 3a  41 44 52 76 63 20 56 2c  |{1-8,Z}:ADRvc V,|
00008630  50 6c 3a 53 54 4d 76 63  49 41 20 56 2c 7b 30 2d  |Pl:STMvcIA V,{0-|
00008640  38 7d 3a 4d 4f 56 76 63  30 2c 56 3a 42 49 43 76  |8}:MOVvc0,V:BICv|
00008650  63 53 70 63 2c 5a 2c 23  6a 5f 3a 84 52 53 70 63  |cSpc,Z,#j_:.RSpc|
00008660  2c 5a 2c 23 6a 5f 3a 41  4c 49 47 4e 3a 2e 4d 6c  |,Z,#j_:ALIGN:.Ml|
00008670  3a a4 5a 0d 25 79 e3 53  54 4d 46 44 28 41 29 21  |:.Z.%y.STMFD(A)!|
00008680  2c 7b 5a 7d 3a 4d 4f 56  30 2c 23 34 30 39 36 3a  |,{Z}:MOV0,#4096:|
00008690  42 4c 20 77 69 3a 4d 4f  56 30 2c 23 35 31 32 3a  |BL wi:MOV0,#512:|
000086a0  4d 4f 56 31 2c 23 33 32  3a 42 4c 20 66 4a 3a 4c  |MOV1,#32:BL fJ:L|
000086b0  44 4d 46 44 28 41 29 21  2c 7b 70 63 7d 3a 41 4c  |DMFD(A)!,{pc}:AL|
000086c0  49 47 4e 3a 2e 67 69 20  45 51 55 53 22 5b 30 2c  |IGN:.gi EQUS"[0,|
000086d0  77 3e 2c 3c 73 3e 2c 73  3e 2c 73 3e 2c 64 6d 3e  |w>,<s>,s>,s>,dm>|
000086e0  2c 3e 22 3a 44 43 42 30  3a 45 51 55 53 22 5b 34  |,>":DCB0:EQUS"[4|
000086f0  30 2c 3e 2c 64 3e 2c 3e  22 3a 44 43 42 30 3a 2e  |0,>,d>,>":DCB0:.|
00008700  6d 4a 20 45 51 55 53 22  5b 31 30 30 2c 3e 2c 3e  |mJ EQUS"[100,>,>|
00008710  2c 3e 2c 64 3e 2c 6d 3e  2c 6d 3e 2c 64 6d 3e 2c  |,>,d>,m>,m>,dm>,|
00008720  77 3e 22 3a 44 43 42 30  3a 45 51 55 53 22 3c 74  |w>":DCB0:EQUS"<t|
00008730  5b 31 32 30 2c 77 3e 2c  3c 74 64 3e 2c 64 73 77  |[120,w>,<td>,dsw|
00008740  3e 2c 3e 2c 3e 2c 3e 2c  73 3e 2c 3e 2c 3e 2c 3e  |>,>,>,>,s>,>,>,>|
00008750  22 3a 44 43 42 30 0d 25  7a f3 45 51 55 53 22 5b  |":DCB0.%z.EQUS"[|
00008760  31 34 30 2c 77 3e 2c 3c  74 3e 2c 3c 74 3e 2c 3c  |140,w>,<t>,<t>,<|
00008770  74 3e 2c 3c 74 3e 22 3a  44 43 42 30 3a 45 51 55  |t>,<t>":DCB0:EQU|
00008780  53 22 5b 31 36 30 2c 3c  74 6d 3e 2c 3c 74 3e 2c  |S"[160,<tm>,<t>,|
00008790  6d 3e 2c 77 3e 2c 77 3e  2c 64 3e 2c 3c 74 3e 22  |m>,w>,w>,d>,<t>"|
000087a0  3a 44 43 42 30 3a 45 51  55 53 22 3c 74 5b 31 38  |:DCB0:EQUS"<t[18|
000087b0  30 2c 3e 2c 3e 2c 3e 2c  3e 2c 3e 2c 3e 2c 6d 3e  |0,>,>,>,>,>,>,m>|
000087c0  22 3a 44 43 42 30 3a 45  51 55 53 22 63 62 3c 74  |":DCB0:EQUS"cb<t|
000087d0  5b 35 30 30 2c 3e 2c 3e  2c 3e 2c 3e 2c 3e 2c 3e  |[500,>,>,>,>,>,>|
000087e0  2c 3e 2c 3e 2c 3e 2c 3e  2c 3e 2c 3e 2c 3e 2c 3e  |,>,>,>,>,>,>,>,>|
000087f0  2c 3e 2c 3e 22 3a 44 43  42 30 3a 45 51 55 53 22  |,>,>":DCB0:EQUS"|
00008800  63 62 3c 74 5b 35 30 30  2c 3e 2c 3e 2c 3e 2c 3e  |cb<t[500,>,>,>,>|
00008810  2c 3e 2c 3e 2c 3e 2c 3e  2c 3e 2c 3e 2c 3e 2c 3e  |,>,>,>,>,>,>,>,>|
00008820  2c 3e 2c 3e 2c 3e 2c 3e  22 3a 44 43 42 30 3a 2e  |,>,>,>,>":DCB0:.|
00008830  69 4a 20 45 51 55 53 22  5b 31 30 30 30 2c 6d 3e  |iJ EQUS"[1000,m>|
00008840  2c 6d 3e 22 3a 44 43 42  30 0d 25 7b fa 2e 45 6c  |,m>":DCB0.%{..El|
00008850  20 45 51 55 53 22 5b 31  31 30 30 22 3a 44 43 42  | EQUS"[1100":DCB|
00008860  30 3a 2e 69 69 20 45 51  55 53 22 2c 3c 74 20 22  |0:.ii EQUS",<t "|
00008870  3a 44 43 42 30 3a 2e 63  4a 20 45 51 55 53 22 4d  |:DCB0:.cJ EQUS"M|
00008880  31 31 30 31 22 3a 44 43  42 30 3a 2e 6a 4a 20 45  |1101":DCB0:.jJ E|
00008890  51 55 53 22 5b 31 32 30  30 22 3a 44 43 42 30 3a  |QUS"[1200":DCB0:|
000088a0  2e 67 6c 20 45 51 55 53  22 2c 20 22 3a 44 43 42  |.gl EQUS", ":DCB|
000088b0  30 3a 2e 77 6c 20 45 51  55 53 22 4d 31 32 30 31  |0:.wl EQUS"M1201|
000088c0  22 3a 44 43 42 30 3a 41  4c 49 47 4e 3a 2e 6f 4a  |":DCB0:ALIGN:.oJ|
000088d0  3a a4 5a 3a 53 54 4d 46  44 28 41 29 21 2c 7b 5a  |:.Z:STMFD(A)!,{Z|
000088e0  7d 3a 4c 44 52 31 2c 48  79 25 3a 54 45 51 31 2c  |}:LDR1,Hy%:TEQ1,|
000088f0  23 30 3a 4d 4f 56 65 71  31 2c 23 31 3a 4d 4f 56  |#0:MOVeq1,#1:MOV|
00008900  6e 65 31 2c 23 30 3a 53  54 4d 46 44 28 41 29 21  |ne1,#0:STMFD(A)!|
00008910  2c 7b 31 7d 3a a4 46 28  22 22 2c 30 2c 67 69 29  |,{1}:.F("",0,gi)|
00008920  3a 42 4c 20 7a 5f 3a 41  44 44 20 41 2c 41 2c 23  |:BL z_:ADD A,A,#|
00008930  31 3c 3c 32 3a 4c 44 4d  46 44 28 41 29 21 2c 7b  |1<<2:LDMFD(A)!,{|
00008940  70 63 7d 0d 25 7c f3 2e  78 75 3a a4 5a 3a 53 54  |pc}.%|..xu:.Z:ST|
00008950  4d 46 44 28 41 29 21 2c  7b 5a 7d 3a 53 55 42 20  |MFD(A)!,{Z}:SUB |
00008960  41 2c 41 2c 23 31 32 3c  3c 32 3a 41 44 44 31 2c  |A,A,#12<<2:ADD1,|
00008970  30 2c 23 65 25 3a 4c 44  52 31 2c 5b 31 2c 23 6b  |0,#e%:LDR1,[1,#k|
00008980  4a 25 5d 3a 41 44 44 31  2c 31 2c 23 44 5f 3a 4c  |J%]:ADD1,1,#D_:L|
00008990  44 52 32 2c 5b 30 2c 23  62 4a 25 5d 3a 4c 44 52  |DR2,[0,#bJ%]:LDR|
000089a0  33 2c 5b 30 2c 23 4e 4a  25 5d 3a 4c 44 52 34 2c  |3,[0,#NJ%]:LDR4,|
000089b0  5b 30 2c 23 44 4a 25 5d  3a 4c 44 52 35 2c 5b 30  |[0,#DJ%]:LDR5,[0|
000089c0  2c 23 60 5f 25 5d 3a 4c  44 52 36 2c 5b 30 2c 23  |,#`_%]:LDR6,[0,#|
000089d0  47 4a 25 5d 3a 4c 44 52  37 2c 5b 30 2c 23 5f 79  |GJ%]:LDR7,[0,#_y|
000089e0  25 5d 3a 4d 4f 56 38 2c  37 3a 4c 44 52 39 2c 5b  |%]:MOV8,7:LDR9,[|
000089f0  30 2c 23 52 4a 25 5d 3a  4c 44 52 20 56 2c 5b 30  |0,#RJ%]:LDR V,[0|
00008a00  2c 23 75 4a 25 5d 3a 4c  44 52 20 5a 2c 5b 30 2c  |,#uJ%]:LDR Z,[0,|
00008a10  23 72 5f 25 5d 3a 53 54  4d 49 41 20 41 2c 7b 31  |#r_%]:STMIA A,{1|
00008a20  2d 39 2c 56 2c 5a 7d 3a  4c 44 52 20 5a 2c 5b 30  |-9,V,Z}:LDR Z,[0|
00008a30  2c 23 54 5f 25 5d 0d 25  7d f2 53 54 52 20 5a 2c  |,#T_%].%}.STR Z,|
00008a40  5b 41 2c 23 31 31 3c 3c  32 5d 3a a4 46 28 22 22  |[A,#11<<2]:.F(""|
00008a50  2c 30 2c 6d 4a 29 3a 42  4c 20 7a 5f 3a 41 44 44  |,0,mJ):BL z_:ADD|
00008a60  20 41 2c 41 2c 23 31 32  3c 3c 32 3a 4c 44 4d 46  | A,A,#12<<2:LDMF|
00008a70  44 28 41 29 21 2c 7b 70  63 7d 3a 2e 48 79 25 44  |D(A)!,{pc}:.Hy%D|
00008a80  43 44 30 3a 2e 58 75 25  44 43 44 30 3a 2e 4d 79  |CD0:.Xu%DCD0:.My|
00008a90  25 44 43 44 30 3a 2e 6e  6c 3a a4 5a 3a 53 54 4d  |%DCD0:.nl:.Z:STM|
00008aa0  46 44 28 41 29 21 2c 7b  4b 2d 58 4a 2c 5a 7d 3a  |FD(A)!,{K-XJ,Z}:|
00008ab0  42 4c 20 64 75 3a a4 46  28 22 22 2c 30 2c 69 4a  |BL du:.F("",0,iJ|
00008ac0  29 3a 42 4c 20 63 79 3a  4d 4f 56 76 63 30 2c 23  |):BL cy:MOVvc0,#|
00008ad0  30 3a 42 4c 76 63 20 54  5f 3a a4 46 28 22 76 63  |0:BLvc T_:.F("vc|
00008ae0  22 2c 30 2c 45 6c 29 3a  42 4c 76 63 20 63 79 3a  |",0,El):BLvc cy:|
00008af0  42 76 73 20 76 79 3a 4c  44 52 20 4b 2c 48 79 25  |Bvs vy:LDR K,Hy%|
00008b00  3a 41 44 44 20 4b 2c 4b  2c 23 34 3a 4c 44 52 20  |:ADD K,K,#4:LDR |
00008b10  68 2c 4d 79 25 3a 2e 43  20 53 54 4d 46 44 28 41  |h,My%:.C STMFD(A|
00008b20  29 21 2c 7b 4b 2d 68 7d  0d 25 7e f0 a4 46 28 22  |)!,{K-h}.%~..F("|
00008b30  22 2c 30 2c 69 69 29 3a  42 4c 20 63 79 3a 4c 44  |",0,ii):BL cy:LD|
00008b40  52 76 63 30 2c 5b 4b 2c  23 72 25 5d 3a 42 4c 76  |Rvc0,[K,#r%]:BLv|
00008b50  63 20 55 6c 3a a4 46 28  22 76 63 22 2c 30 2c 63  |c Ul:.F("vc",0,c|
00008b60  4a 29 3a 4c 44 4d 76 63  49 41 20 4b 2c 7b 31 2d  |J):LDMvcIA K,{1-|
00008b70  38 7d 3a 53 54 4d 46 44  28 41 29 21 2c 7b 31 2d  |8}:STMFD(A)!,{1-|
00008b80  38 7d 3a 42 4c 76 63 20  65 5f 3a 41 44 44 20 41  |8}:BLvc e_:ADD A|
00008b90  2c 41 2c 23 38 3c 3c 32  3a 4c 44 4d 46 44 28 41  |,A,#8<<2:LDMFD(A|
00008ba0  29 21 2c 7b 4b 2d 68 7d  3a 42 76 73 20 76 79 3a  |)!,{K-h}:Bvs vy:|
00008bb0  41 44 44 20 4b 2c 4b 2c  23 6c 5f 25 3a 53 55 42  |ADD K,K,#l_%:SUB|
00008bc0  53 20 68 2c 68 2c 23 31  3a 42 6e 65 20 43 3a 4d  |S h,h,#1:Bne C:M|
00008bd0  4f 56 30 2c 23 30 3a 42  4c 20 54 5f 3a a4 46 28  |OV0,#0:BL T_:.F(|
00008be0  22 76 63 22 2c 30 2c 6a  4a 29 3a 42 4c 76 63 20  |"vc",0,jJ):BLvc |
00008bf0  63 79 3a 42 76 73 20 76  79 3a 4c 44 52 20 4b 2c  |cy:Bvs vy:LDR K,|
00008c00  48 79 25 3a 41 44 44 20  4b 2c 4b 2c 23 34 3a 4c  |Hy%:ADD K,K,#4:L|
00008c10  44 52 20 68 2c 4d 79 25  0d 25 7f e9 2e 43 20 53  |DR h,My%.%...C S|
00008c20  54 4d 46 44 28 41 29 21  2c 7b 4b 2d 68 7d 3a a4  |TMFD(A)!,{K-h}:.|
00008c30  46 28 22 22 2c 30 2c 67  6c 29 3a 42 4c 20 63 79  |F("",0,gl):BL cy|
00008c40  3a a4 46 28 22 76 63 22  2c 30 2c 77 6c 29 3a 4c  |:.F("vc",0,wl):L|
00008c50  44 4d 76 63 49 41 20 4b  2c 7b 31 2d 38 7d 3a 53  |DMvcIA K,{1-8}:S|
00008c60  54 4d 46 44 28 41 29 21  2c 7b 31 2d 38 7d 3a 42  |TMFD(A)!,{1-8}:B|
00008c70  4c 76 63 20 65 5f 3a 41  44 44 20 41 2c 41 2c 23  |Lvc e_:ADD A,A,#|
00008c80  38 3c 3c 32 3a 4c 44 4d  46 44 28 41 29 21 2c 7b  |8<<2:LDMFD(A)!,{|
00008c90  4b 2d 68 7d 3a 42 76 73  20 76 79 3a 41 44 44 20  |K-h}:Bvs vy:ADD |
00008ca0  4b 2c 4b 2c 23 6c 5f 25  3a 53 55 42 53 20 68 2c  |K,K,#l_%:SUBS h,|
00008cb0  68 2c 23 31 3a 42 6e 65  20 43 3a 4d 4f 56 30 2c  |h,#1:Bne C:MOV0,|
00008cc0  23 30 3a 42 4c 20 54 5f  3a 42 4c 76 63 20 68 6c  |#0:BL T_:BLvc hl|
00008cd0  3a 2e 76 79 3a 4c 44 4d  46 44 28 41 29 21 2c 7b  |:.vy:LDMFD(A)!,{|
00008ce0  4b 2d 58 4a 2c 70 63 7d  3a 2e 62 69 3a a4 5a 3a  |K-XJ,pc}:.bi:.Z:|
00008cf0  53 54 4d 46 44 28 41 29  21 2c 7b 34 2d 38 2c 5a  |STMFD(A)!,{4-8,Z|
00008d00  7d 0d 25 80 6a 4c 44 4d  49 41 30 2c 7b 30 2c 33  |}.%.jLDMIA0,{0,3|
00008d10  2c 34 2c 35 2c 36 2c 37  2c 56 2c 5a 7d 3a 53 54  |,4,5,6,7,V,Z}:ST|
00008d20  4d 46 44 28 41 29 21 2c  7b 30 2c 33 2c 34 2c 35  |MFD(A)!,{0,3,4,5|
00008d30  2c 36 2c 37 2c 56 2c 5a  7d 3a 4d 4f 56 30 2c 32  |,6,7,V,Z}:MOV0,2|
00008d40  3a 42 4c 20 71 75 3a 41  44 44 20 41 2c 41 2c 23  |:BL qu:ADD A,A,#|
00008d50  38 3c 3c 32 3a 4c 44 4d  46 44 28 41 29 21 2c 7b  |8<<2:LDMFD(A)!,{|
00008d60  34 2d 38 2c 70 63 7d 3a  5d 3a e1 0d 25 81 50 dd  |4-8,pc}:]:..%.P.|
00008d70  f2 4a 4a 3a ea 51 25 2c  58 25 2c 56 4a 25 2c 44  |.JJ:.Q%,X%,VJ%,D|
00008d80  79 25 2c 46 79 25 3a 51  25 3d 57 25 21 32 34 3a  |y%,Fy%:Q%=W%!24:|
00008d90  58 25 3d 57 25 21 32 38  3a 56 4a 25 3d 57 25 21  |X%=W%!28:VJ%=W%!|
00008da0  33 32 3a 44 79 25 3d 57  25 21 33 36 3a 46 79 25  |32:Dy%=W%!36:Fy%|
00008db0  3d 70 5f 25 3a c8 8e 44  5f 25 ca 0d 25 82 0f c9  |=p_%:..D_%..%...|
00008dc0  7a 4a 25 3a c8 8e 56 4a  25 ca 0d 25 83 1b c9 30  |zJ%:..VJ%..%...0|
00008dd0  3a e7 a4 44 28 22 50 72  6f 67 49 6e 66 6f 22 2c  |:..D("ProgInfo",|
00008de0  4e 5f 25 29 8c 0d 25 84  19 cc 3a c8 99 26 34 30  |N_%)..%...:..&40|
00008df0  30 65 38 2c 2c 4e 5f 25  2c 51 25 2c 58 25 0d 25  |0e8,,N_%,Q%,X%.%|
00008e00  85 05 cd 0d 25 86 2e 7f  3a f2 46 28 46 79 25 2c  |....%...:.F(Fy%,|
00008e10  22 55 6e 65 78 70 65 63  74 65 64 20 4d 65 6e 75  |"Unexpected Menu|
00008e20  57 61 72 6e 69 6e 67 20  4d 65 73 73 61 67 65 22  |Warning Message"|
00008e30  29 0d 25 87 05 cb 0d 25  88 17 c9 64 4a 25 3a f2  |).%....%...dJ%:.|
00008e40  47 28 60 6c 25 29 3a c8  8e 56 4a 25 ca 0d 25 89  |G(`l%):..VJ%..%.|
00008e50  0e c9 67 5f 3a c8 8e 44  79 25 ca 0d 25 8a 1f c9  |..g_:..Dy%..%...|
00008e60  66 6c 3a f2 6d 4a 3a c8  99 26 34 30 30 65 38 2c  |fl:.mJ:..&400e8,|
00008e70  2c 53 5f 25 2c 51 25 2c  58 25 0d 25 8b 2e 7f 3a  |,S_%,Q%,X%.%...:|
00008e80  f2 46 28 46 79 25 2c 22  55 6e 65 78 70 65 63 74  |.F(Fy%,"Unexpect|
00008e90  65 64 20 4d 65 6e 75 57  61 72 6e 69 6e 67 20 4d  |ed MenuWarning M|
00008ea0  65 73 73 61 67 65 22 29  0d 25 8c 05 cb 0d 25 8d  |essage").%....%.|
00008eb0  0e c9 73 4a 3a c8 8e 44  79 25 ca 0d 25 8e 1f c9  |..sJ:..Dy%..%...|
00008ec0  71 4a 3a f2 58 4a 3a c8  99 26 34 30 30 65 38 2c  |qJ:.XJ:..&400e8,|
00008ed0  2c 50 5f 25 2c 51 25 2c  58 25 0d 25 8f 1f c9 4e  |,P_%,Q%,X%.%...N|
00008ee0  4a 3a f2 66 75 3a c8 99  26 34 30 30 65 38 2c 2c  |J:.fu:..&400e8,,|
00008ef0  72 79 25 2c 51 25 2c 58  25 0d 25 90 2e 7f 3a f2  |ry%,Q%,X%.%...:.|
00008f00  46 28 46 79 25 2c 22 55  6e 65 78 70 65 63 74 65  |F(Fy%,"Unexpecte|
00008f10  64 20 4d 65 6e 75 57 61  72 6e 69 6e 67 20 4d 65  |d MenuWarning Me|
00008f20  73 73 61 67 65 22 29 0d  25 91 05 cb 0d 25 92 0e  |ssage").%....%..|
00008f30  c9 51 5f 3a c8 8e 44 79  25 ca 0d 25 93 1f c9 64  |.Q_:..Dy%..%...d|
00008f40  69 3a f2 6e 5f 3a c8 99  26 34 30 30 65 38 2c 2c  |i:.n_:..&400e8,,|
00008f50  4f 79 25 2c 51 25 2c 58  25 0d 25 94 1f c9 41 61  |Oy%,Q%,X%.%...Aa|
00008f60  3a f2 74 5f 3a c8 99 26  34 30 30 65 38 2c 2c 46  |:.t_:..&400e8,,F|
00008f70  5f 25 2c 51 25 2c 58 25  0d 25 95 2e 7f 3a f2 46  |_%,Q%,X%.%...:.F|
00008f80  28 46 79 25 2c 22 55 6e  65 78 70 65 63 74 65 64  |(Fy%,"Unexpected|
00008f90  20 4d 65 6e 75 57 61 72  6e 69 6e 67 20 4d 65 73  | MenuWarning Mes|
00008fa0  73 61 67 65 22 29 0d 25  96 05 cb 0d 25 97 1f c9  |sage").%....%...|
00008fb0  59 4a 3a f2 5f 75 3a c8  99 26 34 30 30 65 38 2c  |YJ:._u:..&400e8,|
00008fc0  2c 5a 5f 25 2c 51 25 2c  58 25 0d 25 98 2e 7f 3a  |,Z_%,Q%,X%.%...:|
00008fd0  f2 46 28 46 79 25 2c 22  55 6e 65 78 70 65 63 74  |.F(Fy%,"Unexpect|
00008fe0  65 64 20 4d 65 6e 75 57  61 72 6e 69 6e 67 20 4d  |ed MenuWarning M|
00008ff0  65 73 73 61 67 65 22 29  0d 25 99 05 cb 0d 25 9a  |essage").%....%.|
00009000  2e 7f 3a f2 46 28 46 79  25 2c 22 55 6e 65 78 70  |..:.F(Fy%,"Unexp|
00009010  65 63 74 65 64 20 4d 65  6e 75 57 61 72 6e 69 6e  |ected MenuWarnin|
00009020  67 20 4d 65 73 73 61 67  65 22 29 0d 25 9b 07 cb  |g Message").%...|
00009030  3a e1 0d 25 9c a9 dd f2  76 5f 3a ea 56 4a 25 2c  |:..%....v_:.VJ%,|
00009040  55 25 2c 64 69 25 2c 63  69 25 2c 6d 4a 25 2c 44  |U%,di%,ci%,mJ%,D|
00009050  79 25 2c 41 25 2c 42 75  25 2c 60 69 25 3a ea 6a  |y%,A%,Bu%,`i%:.j|
00009060  6c 25 3a 55 25 3d a4 4d  28 35 31 32 29 3a c8 99  |l%:U%=.M(512):..|
00009070  26 34 30 30 63 66 2c 2c  55 25 3a 64 69 25 3d 55  |&400cf,,U%:di%=U|
00009080  25 21 30 3a 63 69 25 3d  55 25 21 34 3a 6b 6c 25  |%!0:ci%=U%!4:kl%|
00009090  3d 64 69 25 3a 6f 6c 25  3d 63 69 25 3a 6d 4a 25  |=di%:ol%=ci%:mJ%|
000090a0  3d 55 25 21 38 3a f2 43  28 55 25 2c 35 31 32 29  |=U%!8:.C(U%,512)|
000090b0  3a 56 4a 25 3d 21 57 25  3a 44 79 25 3d 57 25 21  |:VJ%=!W%:Dy%=W%!|
000090c0  34 3a 42 75 25 3d 57 25  21 38 3a 6a 6c 25 3d 57  |4:Bu%=W%!8:jl%=W|
000090d0  25 21 31 32 3a c8 8e 44  5f 25 ca 0d 25 9d 0f c9  |%!12:..D_%..%...|
000090e0  7a 4a 25 3a c8 8e 56 4a  25 ca 0d 25 9e 0b c9 70  |zJ%:..VJ%..%...p|
000090f0  75 3a f2 62 75 0d 25 9f  0e c9 56 75 3a c8 8e 44  |u:.bu.%...Vu:..D|
00009100  79 25 ca 0d 25 a0 0b c9  61 6c 3a f2 6f 5f 0d 25  |y%..%...al:.o_.%|
00009110  a1 0b c9 48 75 3a f2 59  79 0d 25 a2 0b c9 45 69  |...Hu:.Yy.%...Ei|
00009120  3a f2 47 75 0d 25 a3 05  cb 0d 25 a4 0b c9 4e 69  |:.Gu.%....%...Ni|
00009130  3a f2 52 79 0d 25 a5 05  cb 0d 25 a6 17 c9 64 4a  |:.Ry.%....%...dJ|
00009140  25 3a f2 47 28 60 6c 25  29 3a c8 8e 56 4a 25 ca  |%:.G(`l%):..VJ%.|
00009150  0d 25 a7 12 c9 6f 6c 3a  f2 6d 28 6d 4a 25 29 3a  |.%...ol:.m(mJ%):|
00009160  f2 75 0d 25 a8 12 c9 7a  75 3a f2 6d 28 6d 4a 25  |.u.%...zu:.m(mJ%|
00009170  29 3a f2 68 0d 25 a9 13  c9 76 69 3a f2 6d 28 6d  |):.h.%...vi:.m(m|
00009180  4a 25 29 3a f2 4b 79 0d  25 aa 10 c9 73 4a 3a f2  |J%):.Ky.%...sJ:.|
00009190  4c 4a 28 44 79 25 29 0d  25 ab 0e c9 67 5f 3a c8  |LJ(Dy%).%...g_:.|
000091a0  8e 44 79 25 ca 0d 25 ac  0a c9 2d 31 3a f2 4b 0d  |.Dy%..%...-1:.K.|
000091b0  25 ad 0b c9 5a 6c 3a f2  79 79 0d 25 ae 0b c9 6e  |%...Zl:.yy.%...n|
000091c0  4a 3a f2 72 79 0d 25 af  0b c9 5f 69 3a f2 41 5f  |J:.ry.%..._i:.A_|
000091d0  0d 25 b0 0b c9 75 75 3a  f2 45 79 0d 25 b1 05 cb  |.%...uu:.Ey.%...|
000091e0  0d 25 b2 0e c9 51 5f 3a  c8 8e 44 79 25 ca 0d 25  |.%...Q_:..Dy%..%|
000091f0  b3 0b c9 60 69 3a f2 49  79 0d 25 b4 0e c9 58 69  |...`i:.Iy.%...Xi|
00009200  3a c8 8e 42 75 25 ca 0d  25 b5 0b c9 2d 31 3a f2  |:..Bu%..%...-1:.|
00009210  63 79 0d 25 b6 0e c9 6d  75 3a c8 8e 6a 6c 25 ca  |cy.%...mu:..jl%.|
00009220  0d 25 b7 07 c9 2d 31 0d  25 b8 40 c9 30 2c 31 2c  |.%...-1.%.@.0,1,|
00009230  32 2c 33 2c 34 2c 35 2c  36 2c 37 2c 38 2c 39 2c  |2,3,4,5,6,7,8,9,|
00009240  31 30 2c 31 31 2c 31 32  2c 31 33 2c 31 34 2c 31  |10,11,12,13,14,1|
00009250  35 3a 6f 5f 25 3d 6a 6c  25 3a e7 6f 5f 25 3c 3e  |5:o_%=jl%:.o_%<>|
00009260  5a 25 21 52 4a 25 8c 0d  25 b9 2f 60 69 25 3d 5a  |Z%!RJ%..%./`i%=Z|
00009270  25 21 5f 79 25 3a f2 4a  79 3a 5a 25 21 52 4a 25  |%!_y%:.Jy:Z%!RJ%|
00009280  3d 6f 5f 25 3a f2 71 79  3a 5a 25 21 5f 79 25 3d  |=o_%:.qy:Z%!_y%=|
00009290  60 69 25 3a f2 72 0d 25  ba 05 cd 0d 25 bb 05 cb  |`i%:.r.%....%...|
000092a0  0d 25 bc 1b 7f 3a 69 79  25 3d 42 75 25 3a e7 69  |.%...:iy%=Bu%:.i|
000092b0  79 25 3c 3e 5a 25 21 5f  79 25 8c 0d 25 bd 15 f2  |y%<>Z%!_y%..%...|
000092c0  4a 79 3a 5a 25 21 5f 79  25 3d 69 79 25 3a f2 72  |Jy:Z%!_y%=iy%:.r|
000092d0  0d 25 be 05 cd 0d 25 bf  05 cb 0d 25 c0 0e c9 6b  |.%....%....%...k|
000092e0  6c 3a c8 8e 42 75 25 ca  0d 25 c1 07 c9 2d 31 0d  |l:..Bu%..%...-1.|
000092f0  25 c2 40 c9 30 2c 31 2c  32 2c 33 2c 34 2c 35 2c  |%.@.0,1,2,3,4,5,|
00009300  36 2c 37 2c 38 2c 39 2c  31 30 2c 31 31 2c 31 32  |6,7,8,9,10,11,12|
00009310  2c 31 33 2c 31 34 2c 31  35 3a 5f 5f 25 3d 42 75  |,13,14,15:__%=Bu|
00009320  25 3a e7 5f 5f 25 3c 3e  5a 25 21 72 5f 25 8c 0d  |%:.__%<>Z%!r_%..|
00009330  25 c3 2a 5a 25 21 72 5f  25 3d 5f 5f 25 3a 5a 25  |%.*Z%!r_%=__%:Z%|
00009340  3f 60 75 25 2b 3d 31 3a  f2 56 4a 28 5a 25 21 7a  |?`u%+=1:.VJ(Z%!z|
00009350  25 2c 5f 5f 25 29 3a f2  70 0d 25 c4 05 cd 0d 25  |%,__%):.p.%....%|
00009360  c5 05 cb 0d 25 c6 0f c9  57 75 3a f2 54 75 28 5a  |....%...Wu:.Tu(Z|
00009370  25 29 0d 25 c7 0b c9 69  75 3a f2 5a 5f 0d 25 c8  |%).%...iu:.Z_.%.|
00009380  05 cb 0d 25 c9 0a c9 59  4a 3a f2 61 0d 25 ca 0b  |...%...YJ:.a.%..|
00009390  c9 57 69 3a f2 6d 79 0d  25 cb 05 cb 0d 25 cc 0f  |.Wi:.my.%....%..|
000093a0  c9 48 75 25 3a c8 8e 56  4a 25 ca 0d 25 cd 10 c9  |.Hu%:..VJ%..%...|
000093b0  6a 6c 3a f2 58 75 28 44  79 25 29 0d 25 ce 10 c9  |jl:.Xu(Dy%).%...|
000093c0  70 69 3a f2 43 5f 28 44  79 25 29 0d 25 cf 05 cb  |pi:.C_(Dy%).%...|
000093d0  0d 25 d0 0d cb 3a e7 6d  4a 25 3d 31 8c 0d 25 d1  |.%...:.mJ%=1..%.|
000093e0  07 f2 42 79 0d 25 d2 08  cc 3a f2 50 0d 25 d3 07  |..By.%...:.P.%..|
000093f0  cd 3a e1 0d 25 d4 15 dd  f2 6d 28 6d 4a 25 29 3a  |.:..%....m(mJ%):|
00009400  e7 6d 4a 25 3c 3e 31 8c  0d 25 d5 06 f2 50 0d 25  |.mJ%<>1..%...P.%|
00009410  d6 07 cd 3a e1 0d 25 d7  18 dd f2 42 79 3a ea 6a  |...:..%....By:.j|
00009420  25 3a 6a 25 3d b9 3a c8  8e 44 5f 25 ca 0d 25 d8  |%:j%=.:..D_%..%.|
00009430  0c c9 7a 4a 25 3a f2 75  79 0d 25 d9 0c c9 64 4a  |..zJ%:.uy.%...dJ|
00009440  25 3a f2 67 79 0d 25 da  0c c9 48 75 25 3a f2 53  |%:.gy.%...Hu%:.S|
00009450  5f 0d 25 db 09 7f 6a 25  3d a3 0d 25 dc 0a cb 3a  |_.%...j%=..%...:|
00009460  e7 6a 25 8c 0d 25 dd 19  c8 99 26 34 30 30 64 34  |.j%..%....&400d4|
00009470  2c 2c 4d 4a 25 2c 6b 6c  25 2c 6f 6c 25 0d 25 de  |,,MJ%,kl%,ol%.%.|
00009480  07 cd 3a e1 0d 25 df 1c  dd f2 50 3a c8 99 26 34  |..:..%....P:..&4|
00009490  30 30 64 34 2c 2c 2d 31  3a 44 5f 25 3d a3 3a e1  |00d4,,-1:D_%=.:.|
000094a0  0d 25 e0 22 dd f2 73 5f  3a ea 44 25 3a 44 25 3d  |.%."..s_:.D%:D%=|
000094b0  a4 4d 28 31 32 38 29 3a  c8 8e a4 49 28 21 57 25  |.M(128):...I(!W%|
000094c0  29 ca 0d 25 e1 5a c9 41  5f 25 3a 21 44 25 3d 5a  |)..%.Z.A_%:!D%=Z|
000094d0  25 21 6f 25 3a c8 99 26  34 30 30 63 62 2c 2c 44  |%!o%:..&400cb,,D|
000094e0  25 3a 44 25 21 32 38 3d  57 25 21 32 38 3a 57 25  |%:D%!28=W%!28:W%|
000094f0  21 32 38 3d 21 44 25 3a  c8 99 26 34 30 30 63 35  |!28=!D%:..&400c5|
00009500  2c 2c 57 25 3a c8 99 26  34 30 30 63 62 2c 2c 57  |,,W%:..&400cb,,W|
00009510  25 3a f2 4d 79 28 44 25  2c 57 25 29 0d 25 e2 2a  |%:.My(D%,W%).%.*|
00009520  c9 74 79 25 3a 21 44 25  3d 5a 25 21 7a 25 3a c8  |.ty%:!D%=Z%!z%:.|
00009530  99 26 34 30 30 63 62 2c  2c 44 25 3a f2 4d 79 28  |.&400cb,,D%:.My(|
00009540  57 25 2c 44 25 29 0d 25  e3 14 c9 a4 56 28 21 57  |W%,D%).%....V(!W|
00009550  25 29 3a f2 66 4a 28 57  25 29 0d 25 e4 12 7f 3a  |%):.fJ(W%).%...:|
00009560  c8 99 26 34 30 30 63 35  2c 2c 57 25 0d 25 e5 12  |..&400c5,,W%.%..|
00009570  cb 3a f2 43 28 44 25 2c  31 32 38 29 3a e1 0d 25  |.:.C(D%,128):..%|
00009580  e6 67 dd f2 4d 79 28 44  25 2c 4d 25 29 3a ea 6a  |.g..My(D%,M%):.j|
00009590  5f 25 3a 44 25 21 34 3d  4d 25 21 34 3a 44 25 21  |_%:D%!4=M%!4:D%!|
000095a0  31 32 3d 4d 25 21 31 32  3a 44 25 21 31 36 3d 4d  |12=M%!12:D%!16=M|
000095b0  25 21 31 36 3a 44 25 21  38 3d a4 53 28 4d 25 21  |%!16:D%!8=.S(M%!|
000095c0  38 2c 44 25 21 31 36 2d  45 5f 25 29 3a 6a 5f 25  |8,D%!16-E_%):j_%|
000095d0  3d 4d 25 21 31 32 2d 4d  25 21 34 3a e7 6a 5f 25  |=M%!12-M%!4:.j_%|
000095e0  3c 5a 6c 25 8c 0d 25 e7  11 44 25 21 32 30 3d 5a  |<Zl%..%..D%!20=Z|
000095f0  6c 25 2d 6a 5f 25 0d 25  e8 27 cc 3a 44 25 21 32  |l%-j_%.%.'.:D%!2|
00009600  30 3d 28 28 5a 6c 25 2d  6a 5f 25 29 2f 32 29 80  |0=((Zl%-j_%)/2).|
00009610  ac 28 28 31 3c 3c 53 79  25 29 2d 31 29 0d 25 e9  |.((1<<Sy%)-1).%.|
00009620  33 cd 3a 44 25 21 32 34  3d 30 3a c8 99 26 34 30  |3.:D%!24=0:..&40|
00009630  30 63 35 2c 2c 44 25 3a  4d 25 21 32 38 3d 21 44  |0c5,,D%:M%!28=!D|
00009640  25 3a c8 99 26 34 30 30  63 35 2c 2c 4d 25 3a e1  |%:..&400c5,,M%:.|
00009650  0d 25 ea 13 dd f2 50 75  3a c8 8e a4 49 28 21 57  |.%....Pu:...I(!W|
00009660  25 29 ca 0d 25 eb 10 c9  41 5f 25 2c 74 79 25 3a  |%)..%...A_%,ty%:|
00009670  f2 50 5f 0d 25 ec 10 c9  a4 56 28 21 57 25 29 3a  |.P_.%....V(!W%):|
00009680  f2 49 5f 0d 25 ed 12 7f  3a c8 99 26 34 30 30 63  |.I_.%...:..&400c|
00009690  36 2c 2c 57 25 0d 25 ee  07 cb 3a e1 0d 25 ef 22  |6,,W%.%...:..%."|
000096a0  dd f2 76 4a 3a ea 63 4a  25 3a ea 85 3a ee 85 ea  |..vJ:.cJ%:..:...|
000096b0  f7 85 3a c8 99 26 36 30  36 63 31 3a f2 51 0d 25  |..:..&606c1:.Q.%|
000096c0  f0 17 c8 99 26 36 30 36  63 30 3a c8 8e a4 49 28  |....&606c0:...I(|
000096d0  21 57 25 29 ca 0d 25 f1  0c c9 41 5f 25 3a f2 4c  |!W%)..%...A_%:.L|
000096e0  75 0d 25 f2 0c c9 72 79  25 3a f2 48 75 0d 25 f3  |u.%...ry%:.Hu.%.|
000096f0  3c 7f 3a c8 99 26 34 30  30 63 38 2c 2c 57 25 b8  |<.:..&400c8,,W%.|
00009700  63 4a 25 3a c8 95 63 4a  25 3a c8 99 26 38 31 36  |cJ%:..cJ%:..&816|
00009710  38 31 2c 2c 57 25 3a c8  99 26 34 30 30 63 61 2c  |81,,W%:..&400ca,|
00009720  2c 57 25 b8 63 4a 25 3a  ce 0d 25 f4 10 cb 3a c8  |,W%.cJ%:..%...:.|
00009730  99 26 36 30 36 63 31 3a  e1 0d 25 f5 13 dd f2 4c  |.&606c1:..%....L|
00009740  75 3a e7 5a 25 21 6c 25  3c 3e 30 8c 0d 25 f6 07  |u:.Z%!l%<>0..%..|
00009750  d6 4d 69 0d 25 f7 40 cc  3a c8 99 26 34 30 30 63  |.Mi.%.@.:..&400c|
00009760  38 2c 2c 57 25 b8 63 4a  25 3a c8 95 63 4a 25 3a  |8,,W%.cJ%:..cJ%:|
00009770  c8 99 26 34 30 30 65 36  2c 31 32 38 2b 38 3a da  |..&400e6,128+8:.|
00009780  3a c8 99 26 34 30 30 63  61 2c 2c 57 25 b8 63 4a  |:..&400ca,,W%.cJ|
00009790  25 3a ce 0d 25 f8 07 cd  3a e1 0d 25 f9 21 dd f2  |%:..%...:..%.!..|
000097a0  48 75 3a ea 41 25 2c 42  25 3a 41 25 3d 5a 25 3a  |Hu:.A%,B%:A%=Z%:|
000097b0  42 25 3d 57 25 3a d6 72  6c 3a e1 0d 25 fa 0a dd  |B%=W%:.rl:..%...|
000097c0  f2 4b 4a 3a e1 0d 25 fb  0a dd f2 60 4a 3a e1 0d  |.KJ:..%....`J:..|
000097d0  25 fc 0a dd f2 78 5f 3a  e1 0d 25 fd 0a dd f2 49  |%....x_:..%....I|
000097e0  75 3a e1 0d 25 fe 0a dd  f2 47 4a 3a e1 0d 25 ff  |u:..%....GJ:..%.|
000097f0  1f dd f2 52 79 3a ea 76  4a 25 3a 76 4a 25 3d 28  |...Ry:.vJ%:vJ%=(|
00009800  5a 25 3d 30 29 3a e7 ac  76 4a 25 8c 0d 26 00 1c  |Z%=0):..vJ%..&..|
00009810  76 4a 25 3d 28 5a 25 21  43 5f 25 3d 30 29 84 28  |vJ%=(Z%!C_%=0).(|
00009820  5a 25 21 71 25 3d 6f 29  0d 26 01 0c cd 3a e7 ac  |Z%!q%=o).&...:..|
00009830  76 4a 25 8c 0d 26 02 17  76 4a 25 3d 28 a4 61 28  |vJ%..&..vJ%=(.a(|
00009840  33 2c a4 43 28 35 29 29  3d 31 29 0d 26 03 0b cd  |3,.C(5))=1).&...|
00009850  3a e7 76 4a 25 8c 0d 26  04 06 f2 42 0d 26 05 07  |:.vJ%..&...B.&..|
00009860  cd 3a e1 0d 26 06 2c dd  f2 4e 5f 3a ea 41 24 2c  |.:..&.,..N_:.A$,|
00009870  49 25 3a 41 24 3d 22 22  3a 49 25 3d 57 25 21 33  |I%:A$="":I%=W%!3|
00009880  36 3a c8 8e a4 59 79 28  57 25 21 33 32 29 ca 0d  |6:...Yy(W%!32)..|
00009890  26 07 10 c9 2d 32 3a e7  49 25 3d 5a 69 25 8c 0d  |&...-2:.I%=Zi%..|
000098a0  26 08 10 41 24 3d 22 49  63 6f 6e 42 61 72 22 0d  |&..A$="IconBar".|
000098b0  26 09 0b cc 3a 41 24 3d  a4 6e 0d 26 0a 05 cd 0d  |&...:A$=.n.&....|
000098c0  26 0b 16 c9 4e 5f 25 3a  41 24 3d 22 50 72 6f 67  |&...N_%:A$="Prog|
000098d0  49 6e 66 6f 22 0d 26 0c  17 c9 57 79 25 3a 41 24  |Info".&...Wy%:A$|
000098e0  3d 22 45 6e 74 65 72 4e  61 6d 65 22 0d 26 0d 14  |="EnterName".&..|
000098f0  c9 74 79 25 3a 41 24 3d  22 53 74 61 74 75 73 22  |.ty%:A$="Status"|
00009900  0d 26 0e 13 c9 41 5f 25  3a 41 24 3d 22 42 6f 61  |.&...A_%:A$="Boa|
00009910  72 64 22 0d 26 0f 13 c9  5a 5f 25 3a 41 24 3d 22  |rd".&...Z_%:A$="|
00009920  47 61 6d 65 50 22 0d 26  10 13 c9 46 5f 25 3a 41  |GameP".&...F_%:A|
00009930  24 3d 22 56 69 65 77 50  22 0d 26 11 17 c9 50 5f  |$="ViewP".&...P_|
00009940  25 3a 41 24 3d 22 48 69  67 68 6c 69 67 68 74 22  |%:A$="Highlight"|
00009950  0d 26 12 13 c9 72 79 25  3a 41 24 3d 22 41 72 72  |.&...ry%:A$="Arr|
00009960  6f 77 22 0d 26 13 14 c9  53 5f 25 3a 41 24 3d 22  |ow".&...S_%:A$="|
00009970  43 65 6e 74 72 65 22 0d  26 14 17 c9 4f 79 25 3a  |Centre".&...Oy%:|
00009980  41 24 3d 22 4d 61 67 6e  69 66 69 65 72 22 0d 26  |A$="Magnifier".&|
00009990  15 24 c9 a4 56 28 57 25  21 33 32 29 3a 41 24 3d  |.$..V(W%!32):A$=|
000099a0  22 48 69 67 68 53 63 6f  72 65 22 3a e7 49 25 3e  |"HighScore":.I%>|
000099b0  30 8c 0d 26 16 09 49 25  3d 2d 31 0d 26 17 0d cc  |0..&..I%=-1.&...|
000099c0  3a 49 25 3d 49 25 83 34  0d 26 18 05 cd 0d 26 19  |:I%=I%.4.&....&.|
000099d0  1d 7f 3a e7 28 6a 75 25  3e 32 31 38 29 80 28 57  |..:.(ju%>218).(W|
000099e0  25 21 33 36 3c 3e 2d 31  29 8c 0d 26 1a 09 41 24  |%!36<>-1)..&..A$|
000099f0  3d a4 6e 0d 26 1b 05 cd  0d 26 1c 0e cb 3a e7 41  |=.n.&....&...:.A|
00009a00  24 3c 3e 22 22 8c 0d 26  1d 20 e7 49 25 3c 30 8c  |$<>""..&. .I%<0.|
00009a10  41 24 2b 3d 22 2c 5f 22  8b 41 24 2b 3d 22 2c 22  |A$+=",_".A$+=","|
00009a20  2b c3 28 49 25 29 0d 26  1e 1d f2 62 79 28 22 48  |+.(I%).&...by("H|
00009a30  22 2b 41 24 2c 57 25 2b  32 30 29 3a e7 57 25 3f  |"+A$,W%+20):.W%?|
00009a40  32 30 8c 0d 26 1f 56 57  25 21 31 36 3d 31 32 38  |20..&.VW%!16=128|
00009a50  33 3a 57 25 21 31 32 3d  57 25 21 38 3a 41 25 3d  |3:W%!12=W%!8:A%=|
00009a60  57 25 2b 32 30 3a c8 95  3f 41 25 3a 41 25 2b 3d  |W%+20:..?A%:A%+=|
00009a70  31 3a ce 3a 57 25 21 30  3d 28 41 25 2d 57 25 2b  |1:.:W%!0=(A%-W%+|
00009a80  34 29 80 2d 34 3a c8 99  26 34 30 30 65 37 2c 31  |4).-4:..&400e7,1|
00009a90  37 2c 57 25 2c 57 25 21  34 0d 26 20 05 cd 0d 26  |7,W%,W%!4.& ...&|
00009aa0  21 07 cd 3a e1 0d 26 22  0a dd f2 72 5f 3a e1 0d  |!..:..&"...r_:..|
00009ab0  26 23 38 dd a4 6e 3a ea  41 24 2c 4d 25 3a 4d 25  |&#8..n:.A$,M%:M%|
00009ac0  3d 57 25 2b 34 30 3a c8  99 26 34 30 30 66 34 2c  |=W%+40:..&400f4,|
00009ad0  31 2c 4d 25 2c 57 25 21  33 32 2c 57 25 21 33 36  |1,M%,W%!32,W%!36|
00009ae0  3a c8 8e 44 5f 25 ca 0d  26 24 0f c9 7a 4a 25 3a  |:..D_%..&$..zJ%:|
00009af0  41 24 3d 22 49 22 0d 26  25 0f c9 64 4a 25 3a 41  |A$="I".&%..dJ%:A|
00009b00  24 3d 22 44 22 0d 26 26  0f c9 48 75 25 3a 41 24  |$="D".&&..Hu%:A$|
00009b10  3d 22 48 22 0d 26 27 0e  cb 3a e7 41 24 3c 3e 22  |="H".&'..:.A$<>"|
00009b20  22 8c 0d 26 28 37 41 24  3d 22 4d 22 2b 41 24 2b  |"..&(7A$="M"+A$+|
00009b30  c3 28 21 4d 25 29 3a c8  95 4d 25 21 34 3c 3e 2d  |.(!M%):..M%!4<>-|
00009b40  31 3a 4d 25 2b 3d 34 3a  41 24 2b 3d 22 5f 2c 22  |1:M%+=4:A$+="_,"|
00009b50  2b c3 28 21 4d 25 29 3a  ce 0d 26 29 09 cd 3a 3d  |+.(!M%):..&)..:=|
00009b60  41 24 0d 26 2a 16 dd f2  77 79 3a f2 49 4a 28 2d  |A$.&*...wy:.IJ(-|
00009b70  31 29 3a f2 54 79 3a e1  0d 26 2b 0e dd f2 57 4a  |1):.Ty:..&+...WJ|
00009b80  3a f2 54 79 3a e1 0d 26  2c 27 dd f2 54 79 3a 70  |:.Ty:..&,'..Ty:p|
00009b90  6c 25 3d a4 53 28 31 3c  3c 53 79 25 2c 31 3c 3c  |l%=.S(1<<Sy%,1<<|
00009ba0  6d 25 29 2a 32 3a e7 5a  25 3c 3e 30 8c 0d 26 2d  |m%)*2:.Z%<>0..&-|
00009bb0  06 f2 70 0d 26 2e 07 cd  3a e1 0d 26 2f 44 dd f2  |..p.&...:..&/D..|
00009bc0  70 3a ea 46 25 3a f2 71  79 3a 46 25 3d 5a 25 2b  |p:.F%:.qy:F%=Z%+|
00009bd0  65 25 3a 46 25 21 54 6c  25 3d 70 6c 25 3a 5a 25  |e%:F%!Tl%=pl%:Z%|
00009be0  21 52 69 25 3d 31 3c 3c  53 79 25 3a 5a 25 21 5f  |!Ri%=1<<Sy%:Z%!_|
00009bf0  61 25 3d 31 3c 3c 6d 25  3a f2 47 79 3a e1 0d 26  |a%=1<<m%:.Gy:..&|
00009c00  30 c0 dd f2 71 79 3a ea  51 25 2c 58 25 2c 49 61  |0...qy:.Q%,X%,Ia|
00009c10  25 2c 54 61 25 2c 44 25  3a 51 25 3d 30 3a 58 25  |%,Ta%,D%:Q%=0:X%|
00009c20  3d 30 3a c8 99 35 30 2c  51 25 2c 58 25 b8 2c 2c  |=0:..50,Q%,X%.,,|
00009c30  49 61 25 2c 54 61 25 3a  c8 99 26 34 30 30 65 36  |Ia%,Ta%:..&400e6|
00009c40  2c 30 2b 5a 25 21 72 5f  25 3a c8 99 36 39 2c 36  |,0+Z%!r_%:..69,6|
00009c50  39 2c 51 25 2c 58 25 3a  c8 99 26 34 30 30 65 36  |9,Q%,X%:..&400e6|
00009c60  2c 34 38 2b 5a 25 21 52  4a 25 3a c8 99 36 39 2c  |,48+Z%!RJ%:..69,|
00009c70  36 39 2c 51 25 2c 58 25  3a c8 99 35 30 2c 51 25  |69,Q%,X%:..50,Q%|
00009c80  2c 58 25 b8 2c 2c 5a 25  21 42 69 25 2c 5a 25 21  |,X%.,,Z%!Bi%,Z%!|
00009c90  4b 6c 25 3a e6 30 2c 49  61 25 c8 9c 54 61 25 3a  |Kl%:.0,Ia%..Ta%:|
00009ca0  c8 99 36 39 2c 36 39 2c  51 25 2c 58 25 3a e7 46  |..69,69,Q%,X%:.F|
00009cb0  6c 25 3c 38 8c 5a 25 21  4b 6c 25 3d 2d 31 0d 26  |l%<8.Z%!Kl%=-1.&|
00009cc0  31 05 e1 0d 26 32 0f dd  f2 42 3a f2 55 75 3a e0  |1...&2...B:.Uu:.|
00009cd0  3a e1 0d 26 33 2c dd f2  67 5f 3a ea 49 25 2c 70  |:..&3,..g_:.I%,p|
00009ce0  25 3a 49 25 3d 57 25 21  34 3a 70 25 3d 57 25 21  |%:I%=W%!4:p%=W%!|
00009cf0  32 34 3a c8 8e a4 49 28  57 25 21 30 29 ca 0d 26  |24:...I(W%!0)..&|
00009d00  34 13 c9 57 79 25 3a f2  74 4a 28 70 25 2c 49 25  |4..Wy%:.tJ(p%,I%|
00009d10  29 0d 26 35 13 c9 41 5f  25 3a f2 60 5f 28 70 25  |).&5..A_%:.`_(p%|
00009d20  2c 49 25 29 0d 26 36 13  c9 74 79 25 3a f2 7a 4a  |,I%).&6..ty%:.zJ|
00009d30  28 70 25 2c 49 25 29 0d  26 37 13 c9 4f 79 25 3a  |(p%,I%).&7..Oy%:|
00009d40  f2 4b 75 28 70 25 2c 49  25 29 0d 26 38 11 7f 3a  |.Ku(p%,I%).&8..:|
00009d50  c8 99 26 34 30 30 64 63  2c 70 25 0d 26 39 07 cb  |..&400dc,p%.&9..|
00009d60  3a e1 0d 26 3a 15 dd f2  7a 4a 28 70 25 2c 49 25  |:..&:...zJ(p%,I%|
00009d70  29 3a c8 8e 70 25 ca 0d  26 3b 4e c9 31 33 3a c8  |):..p%..&;N.13:.|
00009d80  99 26 34 30 30 64 32 2c  2d 31 2c 2d 31 3a c8 99  |.&400d2,-1,-1:..|
00009d90  26 34 30 30 64 32 2c 5a  25 21 7a 25 2c 2d 31 2c  |&400d2,Z%!z%,-1,|
00009da0  2c 2c 31 3c 3c 32 35 3a  57 24 3d a4 73 28 5a 25  |,,1<<25:W$=.s(Z%|
00009db0  21 6f 25 2c 5a 4a 29 3a  f2 4f 28 5a 25 2b 57 75  |!o%,ZJ):.O(Z%+Wu|
00009dc0  25 2c 57 24 29 0d 26 3c  11 7f 3a c8 99 26 34 30  |%,W$).&<..:..&40|
00009dd0  30 64 63 2c 70 25 0d 26  3d 07 cb 3a e1 0d 26 3e  |0dc,p%.&=..:..&>|
00009de0  4c dd f2 62 5f 3a ea 51  25 2c 58 25 2c 45 25 2c  |L..b_:.Q%,X%,E%,|
00009df0  4d 25 2c 49 25 3a 51 25  3d 57 25 21 30 3a 58 25  |M%,I%:Q%=W%!0:X%|
00009e00  3d 57 25 21 34 3a 45 25  3d 57 25 21 38 3a 4d 25  |=W%!4:E%=W%!8:M%|
00009e10  3d a4 49 28 57 25 21 31  32 29 3a 49 25 3d 57 25  |=.I(W%!12):I%=W%|
00009e20  21 31 36 3a c8 8e 45 25  ca 0d 26 3f 0c c9 32 3a  |!16:..E%..&?..2:|
00009e30  c8 8e 4d 25 ca 0d 26 40  3a c9 2d 32 3a f2 75 79  |..M%..&@:.-2:.uy|
00009e40  3a 58 25 3d 39 36 2b 28  34 34 2a 50 61 25 29 2b  |:X%=96+(44*Pa%)+|
00009e50  28 32 34 2a 4a 61 25 29  3a c8 99 26 34 30 30 64  |(24*Ja%):..&400d|
00009e60  34 2c 2c 4d 4a 25 2c 51  25 2d 36 34 2c 58 25 0d  |4,,MJ%,Q%-64,X%.|
00009e70  26 41 27 c9 41 5f 25 2c  74 79 25 3a f2 67 79 3a  |&A'.A_%,ty%:.gy:|
00009e80  c8 99 26 34 30 30 64 34  2c 2c 4d 4a 25 2c 51 25  |..&400d4,,MJ%,Q%|
00009e90  2d 36 34 2c 58 25 0d 26  42 26 c9 a4 56 28 4d 25  |-64,X%.&B&..V(M%|
00009ea0  29 3a f2 53 5f 3a c8 99  26 34 30 30 64 34 2c 2c  |):.S_:..&400d4,,|
00009eb0  4d 4a 25 2c 51 25 2d 36  34 2c 58 25 0d 26 43 05  |MJ%,Q%-64,X%.&C.|
00009ec0  cb 0d 26 44 0e c9 31 2a  31 36 2c 34 2a 31 36 0d  |..&D..1*16,4*16.|
00009ed0  26 45 2c 7f 3a 69 69 25  3d 28 4d 25 3d 57 79 25  |&E,.:ii%=(M%=Wy%|
00009ee0  29 3a e7 52 79 25 80 4d  25 3c 3e 74 79 25 8c c8  |):.Ry%.M%<>ty%..|
00009ef0  99 26 38 31 36 38 30 2c  2c 57 25 0d 26 46 09 c8  |.&81680,,W%.&F..|
00009f00  8e 4d 25 ca 0d 26 47 19  c9 41 5f 25 3a f2 59 75  |.M%..&G..A_%:.Yu|
00009f10  28 51 25 2c 58 25 2c 45  25 2c 49 25 29 0d 26 48  |(Q%,X%,E%,I%).&H|
00009f20  19 c9 74 79 25 3a f2 4f  75 28 51 25 2c 58 25 2c  |..ty%:.Ou(Q%,X%,|
00009f30  45 25 2c 49 25 29 0d 26  49 18 c9 2d 32 3a f2 42  |E%,I%).&I..-2:.B|
00009f40  5f 28 51 25 2c 58 25 2c  45 25 2c 49 25 29 0d 26  |_(Q%,X%,E%,I%).&|
00009f50  4a 19 c9 5a 5f 25 3a f2  52 75 28 51 25 2c 58 25  |J..Z_%:.Ru(Q%,X%|
00009f60  2c 45 25 2c 49 25 29 0d  26 4b 19 c9 46 5f 25 3a  |,E%,I%).&K..F_%:|
00009f70  f2 56 75 28 51 25 2c 58  25 2c 45 25 2c 49 25 29  |.Vu(Q%,X%,E%,I%)|
00009f80  0d 26 4c 19 c9 53 5f 25  3a f2 70 5f 28 51 25 2c  |.&L..S_%:.p_(Q%,|
00009f90  58 25 2c 45 25 2c 49 25  29 0d 26 4d 19 c9 50 5f  |X%,E%,I%).&M..P_|
00009fa0  25 3a f2 55 4a 28 51 25  2c 58 25 2c 45 25 2c 49  |%:.UJ(Q%,X%,E%,I|
00009fb0  25 29 0d 26 4e 19 c9 4f  79 25 3a f2 41 4a 28 51  |%).&N..Oy%:.AJ(Q|
00009fc0  25 2c 58 25 2c 45 25 2c  49 25 29 0d 26 4f 19 c9  |%,X%,E%,I%).&O..|
00009fd0  55 69 25 3a f2 41 75 28  51 25 2c 58 25 2c 45 25  |Ui%:.Au(Q%,X%,E%|
00009fe0  2c 49 25 29 0d 26 50 19  c9 4e 5f 25 3a f2 44 5f  |,I%).&P..N_%:.D_|
00009ff0  28 51 25 2c 58 25 2c 45  25 2c 49 25 29 0d 26 51  |(Q%,X%,E%,I%).&Q|
0000a000  19 c9 57 79 25 3a f2 75  4a 28 51 25 2c 58 25 2c  |..Wy%:.uJ(Q%,X%,|
0000a010  45 25 2c 49 25 29 0d 26  52 19 c9 72 79 25 3a f2  |E%,I%).&R..ry%:.|
0000a020  70 4a 28 51 25 2c 58 25  2c 45 25 2c 49 25 29 0d  |pJ(Q%,X%,E%,I%).|
0000a030  26 53 13 c9 a4 56 28 4d  25 29 3a f2 4c 5f 28 45  |&S...V(M%):.L_(E|
0000a040  25 29 0d 26 54 2c cb 3a  e7 52 79 25 80 69 69 25  |%).&T,.:.Ry%.ii%|
0000a050  3d 30 80 4d 25 3c 3e 74  79 25 8c 57 25 21 38 3d  |=0.M%<>ty%.W%!8=|
0000a060  30 3a c8 99 26 38 31 36  38 30 2c 2c 57 25 0d 26  |0:..&81680,,W%.&|
0000a070  55 07 cb 3a e1 0d 26 56  1b dd f2 44 5f 28 51 25  |U..:..&V...D_(Q%|
0000a080  2c 58 25 2c 45 25 2c 49  25 29 3a c8 8e 49 25 ca  |,X%,E%,I%):..I%.|
0000a090  0d 26 57 20 c9 31 34 2c  31 35 3a f2 46 28 56 79  |.&W .14,15:.F(Vy|
0000a0a0  25 2c a4 43 28 30 29 29  3a e7 45 25 3c 3e 31 8c  |%,.C(0)):.E%<>1.|
0000a0b0  0d 26 58 06 f2 50 0d 26  59 05 cd 0d 26 5a 07 cb  |.&X..P.&Y...&Z..|
0000a0c0  3a e1 0d 26 5b 1a dd f2  42 5f 28 51 25 2c 58 25  |:..&[...B_(Q%,X%|
0000a0d0  2c 45 25 2c 49 25 29 3a  c8 8e b9 ca 0d 26 5c 24  |,E%,I%):.....&\$|
0000a0e0  c9 57 79 25 3c 3e 30 3a  f2 46 28 56 79 25 2c a4  |.Wy%<>0:.F(Vy%,.|
0000a0f0  43 28 32 29 29 3a f2 59  28 57 79 25 2c 2d 31 29  |C(2)):.Y(Wy%,-1)|
0000a100  0d 26 5d 0e c9 21 78 79  25 3d 30 3a f2 62 0d 26  |.&]..!xy%=0:.b.&|
0000a110  5e 17 c9 a4 60 3a f2 59  28 5a 25 21 7a 25 2c 2d  |^...`:.Y(Z%!z%,-|
0000a120  31 29 3a f2 61 0d 26 5f  12 7f 3a f2 47 28 21 78  |1):.a.&_..:.G(!x|
0000a130  79 25 29 3a f2 66 79 0d  26 60 07 cb 3a e1 0d 26  |y%):.fy.&`..:..&|
0000a140  61 3b dd f2 7a 28 4b 25  29 3a 24 47 69 25 3d c0  |a;..z(K%):$Gi%=.|
0000a150  a4 48 28 22 49 42 22 2b  c3 28 4b 25 29 29 2c 44  |.H("IB"+.(K%)),D|
0000a160  75 25 2d 31 29 3a f2 51  75 28 2d 31 2c 5a 69 25  |u%-1):.Qu(-1,Zi%|
0000a170  2c 30 2c 30 2c 30 29 3a  e1 0d 26 62 15 dd f2 74  |,0,0,0):..&b...t|
0000a180  4a 28 70 25 2c 49 25 29  3a c8 8e 70 25 ca 0d 26  |J(p%,I%):..p%..&|
0000a190  63 4f c9 31 33 3a c8 99  26 34 30 30 64 32 2c 2d  |cO.13:..&400d2,-|
0000a1a0  31 2c 2d 31 3a 57 25 21  38 3d 31 3a 57 25 21 31  |1,-1:W%!8=1:W%!1|
0000a1b0  32 3d 57 25 21 30 3a 57  25 21 31 36 3d 49 4a 3a  |2=W%!0:W%!16=IJ:|
0000a1c0  c8 99 26 38 31 36 38 30  2c 2c 57 25 3a 57 24 3d  |..&81680,,W%:W$=|
0000a1d0  a4 73 28 57 79 25 2c 60  79 29 3a f2 62 0d 26 64  |.s(Wy%,`y):.b.&d|
0000a1e0  11 7f 3a c8 99 26 34 30  30 64 63 2c 70 25 0d 26  |..:..&400dc,p%.&|
0000a1f0  65 07 cb 3a e1 0d 26 66  1b dd f2 75 4a 28 51 25  |e..:..&f...uJ(Q%|
0000a200  2c 58 25 2c 45 25 2c 49  25 29 3a c8 8e 49 25 ca  |,X%,E%,I%):..I%.|
0000a210  0d 26 67 27 c9 49 4a 3a  c8 99 26 34 30 30 64 32  |.&g'.IJ:..&400d2|
0000a220  2c 2d 31 2c 2d 31 3a 57  24 3d a4 73 28 57 79 25  |,-1,-1:W$=.s(Wy%|
0000a230  2c 60 79 29 3a f2 62 0d  26 68 07 cb 3a e1 0d 26  |,`y):.b.&h..:..&|
0000a240  69 8c dd f2 7a 75 3a ea  4d 25 3a 4d 25 3d 5a 5f  |i...zu:.M%:M%=Z_|
0000a250  25 3a f2 5a 28 4d 25 2c  4c 79 2b 31 2c 65 4a 29  |%:.Z(M%,Ly+1,eJ)|
0000a260  3a f2 5a 28 4d 25 2c 55  79 2b 31 2c 78 5f 29 3a  |:.Z(M%,Uy+1,x_):|
0000a270  f2 5a 28 4d 25 2c 6b 2b  31 2c 5f 5f 29 3a f2 5a  |.Z(M%,k+1,__):.Z|
0000a280  28 4d 25 2c 41 79 2b 31  2c 77 5f 29 3a f2 5a 28  |(M%,Ay+1,w_):.Z(|
0000a290  4d 25 2c 53 79 2b 31 2c  78 4a 29 3a f2 5a 28 4d  |M%,Sy+1,xJ):.Z(M|
0000a2a0  25 2c 4a 79 2b 31 2c 54  4a 29 3a f2 5a 28 4d 25  |%,Jy+1,TJ):.Z(M%|
0000a2b0  2c 4e 79 2b 31 2c 43 4a  29 3a f2 5a 28 4d 25 2c  |,Ny+1,CJ):.Z(M%,|
0000a2c0  61 79 2b 31 2c 61 5f 29  3a e1 0d 26 6a 1e dd f2  |ay+1,a_):..&j...|
0000a2d0  5f 75 3a ea 4d 25 3a e7  a4 44 28 22 47 61 6d 65  |_u:.M%:..D("Game|
0000a2e0  50 22 2c 5a 5f 25 29 8c  0d 26 6b a1 cc 3a 4d 25  |P",Z_%)..&k..:M%|
0000a2f0  3d 5a 5f 25 3a f2 5a 28  4d 25 2c 4c 79 2b 31 2c  |=Z_%:.Z(M%,Ly+1,|
0000a300  5a 25 21 77 25 29 3a f2  5a 28 4d 25 2c 55 79 2b  |Z%!w%):.Z(M%,Uy+|
0000a310  31 2c 5a 25 21 78 25 29  3a f2 5a 28 4d 25 2c 6b  |1,Z%!x%):.Z(M%,k|
0000a320  2b 31 2c 5a 25 21 62 5f  25 29 3a f2 5a 28 4d 25  |+1,Z%!b_%):.Z(M%|
0000a330  2c 41 79 2b 31 2c 5a 25  21 4f 5f 25 29 3a f2 5a  |,Ay+1,Z%!O_%):.Z|
0000a340  28 4d 25 2c 53 79 2b 31  2c 5a 25 21 48 5f 25 29  |(M%,Sy+1,Z%!H_%)|
0000a350  3a f2 5a 28 4d 25 2c 4a  79 2b 31 2c 5a 25 21 78  |:.Z(M%,Jy+1,Z%!x|
0000a360  5f 25 29 3a f2 5a 28 4d  25 2c 4e 79 2b 31 2c 5a  |_%):.Z(M%,Ny+1,Z|
0000a370  25 21 79 5f 25 29 3a f2  5a 28 4d 25 2c 61 79 2b  |%!y_%):.Z(M%,ay+|
0000a380  31 2c 5a 25 21 51 5f 25  29 0d 26 6c 07 cd 3a e1  |1,Z%!Q_%).&l..:.|
0000a390  0d 26 6d 2c dd f2 52 75  28 51 25 2c 58 25 2c 45  |.&m,..Ru(Q%,X%,E|
0000a3a0  25 2c 49 25 29 3a ea 4d  25 2c 61 25 2c 64 25 3a  |%,I%):.M%,a%,d%:|
0000a3b0  4d 25 3d 5a 5f 25 3a c8  8e 49 25 ca 0d 26 6e 25  |M%=Z_%:..I%..&n%|
0000a3c0  c9 4c 79 2c 4c 79 2b 32  3a f2 4a 28 4d 25 2c 49  |.Ly,Ly+2:.J(M%,I|
0000a3d0  25 2c 45 25 2c 4c 79 2c  35 2c 39 39 39 29 3a f2  |%,E%,Ly,5,999):.|
0000a3e0  6a 0d 26 6f 25 c9 55 79  2c 55 79 2b 32 3a f2 4a  |j.&o%.Uy,Uy+2:.J|
0000a3f0  28 4d 25 2c 49 25 2c 45  25 2c 55 79 2c 35 2c 39  |(M%,I%,E%,Uy,5,9|
0000a400  39 39 29 3a f2 6a 0d 26  70 33 c9 6b 2c 6b 2b 32  |99):.j.&p3.k,k+2|
0000a410  3a 61 25 3d a4 41 28 4d  25 2c 41 79 2b 31 29 3a  |:a%=.A(M%,Ay+1):|
0000a420  f2 4a 28 4d 25 2c 49 25  2c 45 25 2c 6b 2c 61 25  |.J(M%,I%,E%,k,a%|
0000a430  2c 39 39 39 39 29 3a f2  6a 0d 26 71 2f c9 41 79  |,9999):.j.&q/.Ay|
0000a440  2c 41 79 2b 32 3a 61 25  3d a4 41 28 4d 25 2c 6b  |,Ay+2:a%=.A(M%,k|
0000a450  2b 31 29 3a f2 4a 28 4d  25 2c 49 25 2c 45 25 2c  |+1):.J(M%,I%,E%,|
0000a460  41 79 2c 32 2c 61 25 29  0d 26 72 2f c9 53 79 2c  |Ay,2,a%).&r/.Sy,|
0000a470  53 79 2b 32 3a 61 25 3d  a4 41 28 4d 25 2c 6b 2b  |Sy+2:a%=.A(M%,k+|
0000a480  31 29 3a f2 4a 28 4d 25  2c 49 25 2c 45 25 2c 53  |1):.J(M%,I%,E%,S|
0000a490  79 2c 31 2c 61 25 29 0d  26 73 32 c9 4a 79 2c 4a  |y,1,a%).&s2.Jy,J|
0000a4a0  79 2b 32 3a 61 25 3d a4  41 28 4d 25 2c 4e 79 2b  |y+2:a%=.A(M%,Ny+|
0000a4b0  31 29 3a f2 4a 28 4d 25  2c 49 25 2c 45 25 2c 4a  |1):.J(M%,I%,E%,J|
0000a4c0  79 2c 61 25 2c 39 39 39  29 0d 26 74 30 c9 4e 79  |y,a%,999).&t0.Ny|
0000a4d0  2c 4e 79 2b 32 3a 61 25  3d a4 41 28 4d 25 2c 4a  |,Ny+2:a%=.A(M%,J|
0000a4e0  79 2b 31 29 3a f2 4a 28  4d 25 2c 49 25 2c 45 25  |y+1):.J(M%,I%,E%|
0000a4f0  2c 4e 79 2c 31 2c 61 25  29 0d 26 75 30 c9 61 79  |,Ny,1,a%).&u0.ay|
0000a500  2c 61 79 2b 32 3a 61 25  3d a4 41 28 4d 25 2c 4a  |,ay+2:a%=.A(M%,J|
0000a510  79 2b 31 29 3a f2 4a 28  4d 25 2c 49 25 2c 45 25  |y+1):.J(M%,I%,E%|
0000a520  2c 61 79 2c 31 2c 61 25  29 0d 26 76 0b c9 52 6c  |,ay,1,a%).&v..Rl|
0000a530  3a f2 7a 75 0d 26 77 12  c9 56 69 3a f2 6c 5f 3a  |:.zu.&w..Vi:.l_:|
0000a540  e7 45 25 80 34 8c 0d 26  78 06 f2 50 0d 26 79 05  |.E%.4..&x..P.&y.|
0000a550  cd 0d 26 7a 07 cb 3a e1  0d 26 7b 5f dd f2 6a 3a  |..&z..:..&{_..j:|
0000a560  ea 64 25 2c 45 25 2c 4d  25 2c 52 25 3a 4d 25 3d  |.d%,E%,M%,R%:M%=|
0000a570  5a 5f 25 3a 64 25 3d a4  41 28 4d 25 2c 4c 79 2b  |Z_%:d%=.A(M%,Ly+|
0000a580  31 29 3a 45 25 3d a4 41  28 4d 25 2c 55 79 2b 31  |1):E%=.A(M%,Uy+1|
0000a590  29 3a 52 25 3d a4 50 28  28 64 25 2a 45 25 29 81  |):R%=.P((d%*E%).|
0000a5a0  32 2c 39 39 39 39 29 3a  e7 a4 41 28 4d 25 2c 6b  |2,9999):..A(M%,k|
0000a5b0  2b 31 29 3e 52 25 8c 0d  26 7c 11 f2 5a 28 4d 25  |+1)>R%..&|..Z(M%|
0000a5c0  2c 6b 2b 31 2c 52 25 29  0d 26 7d 16 cd 3a e7 a4  |,k+1,R%).&}..:..|
0000a5d0  41 28 4d 25 2c 41 79 2b  31 29 3e 52 25 8c 0d 26  |A(M%,Ay+1)>R%..&|
0000a5e0  7e 12 f2 5a 28 4d 25 2c  41 79 2b 31 2c 52 25 29  |~..Z(M%,Ay+1,R%)|
0000a5f0  0d 26 7f 16 cd 3a e7 a4  41 28 4d 25 2c 53 79 2b  |.&...:..A(M%,Sy+|
0000a600  31 29 3e 52 25 8c 0d 26  80 12 f2 5a 28 4d 25 2c  |1)>R%..&...Z(M%,|
0000a610  53 79 2b 31 2c 52 25 29  0d 26 81 07 cd 3a e1 0d  |Sy+1,R%).&...:..|
0000a620  26 82 98 dd f2 6c 5f 3a  ea 4d 25 3a 4d 25 3d 5a  |&....l_:.M%:M%=Z|
0000a630  5f 25 3a 58 5f 25 3d a4  41 28 4d 25 2c 4c 79 2b  |_%:X_%=.A(M%,Ly+|
0000a640  31 29 3a 59 5f 25 3d a4  41 28 4d 25 2c 55 79 2b  |1):Y_%=.A(M%,Uy+|
0000a650  31 29 3a 6f 79 25 3d a4  41 28 4d 25 2c 6b 2b 31  |1):oy%=.A(M%,k+1|
0000a660  29 3a 65 5f 25 3d a4 41  28 4d 25 2c 41 79 2b 31  |):e_%=.A(M%,Ay+1|
0000a670  29 3a 66 5f 25 3d a4 41  28 4d 25 2c 53 79 2b 31  |):f_%=.A(M%,Sy+1|
0000a680  29 3a 6d 5f 25 3d a4 41  28 4d 25 2c 4a 79 2b 31  |):m_%=.A(M%,Jy+1|
0000a690  29 3a 74 5f 25 3d a4 41  28 4d 25 2c 4e 79 2b 31  |):t_%=.A(M%,Ny+1|
0000a6a0  29 3a 61 5f 25 3d a4 41  28 4d 25 2c 61 79 2b 31  |):a_%=.A(M%,ay+1|
0000a6b0  29 3a f2 58 79 3a e1 0d  26 83 26 dd f2 58 79 3a  |):.Xy:..&.&..Xy:|
0000a6c0  ea 58 69 25 2c 6a 5f 25  2c 55 79 25 2c 4d 25 2c  |.Xi%,j_%,Uy%,M%,|
0000a6d0  4e 25 3a 58 69 25 3d b9  3a c8 8e a3 ca 0d 26 84  |N%:Xi%=.:.....&.|
0000a6e0  10 c9 28 58 5f 25 3d 5a  25 21 77 25 29 0d 26 85  |..(X_%=Z%!w%).&.|
0000a6f0  10 c9 28 59 5f 25 3d 5a  25 21 78 25 29 0d 26 86  |..(Y_%=Z%!x%).&.|
0000a700  11 c9 28 6f 79 25 3d 5a  25 21 62 5f 25 29 0d 26  |..(oy%=Z%!b_%).&|
0000a710  87 11 c9 28 65 5f 25 3d  5a 25 21 4f 5f 25 29 0d  |...(e_%=Z%!O_%).|
0000a720  26 88 11 c9 28 66 5f 25  3d 5a 25 21 48 5f 25 29  |&...(f_%=Z%!H_%)|
0000a730  0d 26 89 11 c9 28 6d 5f  25 3d 5a 25 21 78 5f 25  |.&...(m_%=Z%!x_%|
0000a740  29 0d 26 8a 11 c9 28 74  5f 25 3d 5a 25 21 79 5f  |).&...(t_%=Z%!y_|
0000a750  25 29 0d 26 8b 11 c9 28  61 5f 25 3d 5a 25 21 51  |%).&...(a_%=Z%!Q|
0000a760  5f 25 29 0d 26 8c 0a 7f  58 69 25 3d a3 0d 26 8d  |_%).&...Xi%=..&.|
0000a770  0b cb 3a e7 58 69 25 8c  0d 26 8e 98 5a 25 21 77  |..:.Xi%..&..Z%!w|
0000a780  25 3d 58 5f 25 3a 5a 25  21 78 25 3d 59 5f 25 3a  |%=X_%:Z%!x%=Y_%:|
0000a790  5a 25 21 62 5f 25 3d 6f  79 25 3a 5a 25 21 4f 5f  |Z%!b_%=oy%:Z%!O_|
0000a7a0  25 3d 65 5f 25 3a 5a 25  21 48 5f 25 3d 66 5f 25  |%=e_%:Z%!H_%=f_%|
0000a7b0  3a 5a 25 21 78 5f 25 3d  6d 5f 25 3a 5a 25 21 79  |:Z%!x_%=m_%:Z%!y|
0000a7c0  5f 25 3d 74 5f 25 3a 5a  25 21 51 5f 25 3d 61 5f  |_%=t_%:Z%!Q_%=a_|
0000a7d0  25 3a 4d 25 3d 5a 25 21  77 25 3a 4e 25 3d 5a 25  |%:M%=Z%!w%:N%=Z%|
0000a7e0  21 78 25 3a 6a 5f 25 3d  5a 25 21 43 79 25 2a 4d  |!x%:j_%=Z%!Cy%*M|
0000a7f0  25 3a 55 79 25 3d 5a 25  21 76 79 25 2a 4e 25 2b  |%:Uy%=Z%!vy%*N%+|
0000a800  45 5f 25 3a ea 85 3a ee  85 ea f7 85 3a f2 62 4a  |E_%:..:.....:.bJ|
0000a810  0d 26 8f e4 f2 56 79 28  5a 25 21 7a 25 2c 6a 5f  |.&...Vy(Z%!z%,j_|
0000a820  25 2c 55 79 25 2b 34 2c  b9 29 3a f2 70 79 28 5a  |%,Uy%+4,.):.py(Z|
0000a830  25 21 7a 25 2c a4 63 28  5a 25 2c 22 42 6f 61 72  |%!z%,.c(Z%,"Boar|
0000a840  64 22 29 29 3a f2 57 28  5a 25 21 73 79 25 29 3a  |d")):.W(Z%!sy%):|
0000a850  f2 57 28 5a 25 21 67 5f  25 29 3a f2 57 28 5a 25  |.W(Z%!g_%):.W(Z%|
0000a860  21 4a 79 25 29 3a f2 58  28 5a 25 21 73 79 25 2c  |!Jy%):.X(Z%!sy%,|
0000a870  4d 25 2a 4e 25 29 3a f2  58 28 5a 25 21 67 5f 25  |M%*N%):.X(Z%!g_%|
0000a880  2c 4d 25 2a 4e 25 3c 3c  32 29 3a f2 58 28 5a 25  |,M%*N%<<2):.X(Z%|
0000a890  21 4a 79 25 2c 28 6f 79  25 2b 31 29 2a 6e 25 29  |!Jy%,(oy%+1)*n%)|
0000a8a0  3a f2 58 28 5a 25 21 4f  75 25 2c 28 28 4d 25 2b  |:.X(Z%!Ou%,((M%+|
0000a8b0  32 2b 33 31 29 3e 3e 35  29 2a 34 2a 28 4e 25 2b  |2+31)>>5)*4*(N%+|
0000a8c0  32 29 29 3a 5a 25 21 63  79 25 3d 5a 25 21 67 5f  |2)):Z%!cy%=Z%!g_|
0000a8d0  25 3a 5a 25 21 69 5f 25  3d 5a 25 21 63 79 25 2b  |%:Z%!i_%=Z%!cy%+|
0000a8e0  28 28 4d 25 2a 4e 25 2b  33 29 80 2d 34 29 3a f7  |((M%*N%+3).-4):.|
0000a8f0  85 3a f2 61 0d 26 90 07  cd 3a e1 0d 26 91 1e dd  |.:.a.&...:..&...|
0000a900  f2 62 4a 3a f2 46 28 56  79 25 2c a4 43 28 36 29  |.bJ:.F(Vy%,.C(6)|
0000a910  29 3a f2 63 3a f2 50 3a  e1 0d 26 92 7d dd f2 79  |):.c:.P:..&.}..y|
0000a920  4a 3a ea 4d 25 3a 4d 25  3d 46 5f 25 3a f2 5a 28  |J:.M%:M%=F_%:.Z(|
0000a930  4d 25 2c 52 79 2b 31 2c  31 29 3a f2 54 28 4d 25  |M%,Ry+1,1):.T(M%|
0000a940  2c 4d 5f 2c b9 29 3a f2  54 28 4d 25 2c 5a 5f 2c  |,M_,.):.T(M%,Z_,|
0000a950  a3 29 3a f2 54 28 4d 25  2c 6f 79 2c a3 29 3a f2  |.):.T(M%,oy,.):.|
0000a960  76 28 4d 25 2c 6a 2c b9  29 3a f2 5a 28 4d 25 2c  |v(M%,j,.):.Z(M%,|
0000a970  6a 2b 31 2c 31 29 3a f2  5a 28 4d 25 2c 54 79 2b  |j+1,1):.Z(M%,Ty+|
0000a980  31 2c 6f 5f 29 3a f2 5a  28 4d 25 2c 71 79 2b 31  |1,o_):.Z(M%,qy+1|
0000a990  2c 56 4a 29 3a e1 0d 26  93 21 dd f2 74 5f 3a ea  |,VJ):..&.!..t_:.|
0000a9a0  4d 25 2c 4b 25 3a e7 a4  44 28 22 56 69 65 77 50  |M%,K%:..D("ViewP|
0000a9b0  22 2c 46 5f 25 29 8c 0d  26 94 70 cc 3a 4d 25 3d  |",F_%)..&.p.:M%=|
0000a9c0  46 5f 25 3a f2 5a 28 4d  25 2c 52 79 2b 31 2c 5a  |F_%:.Z(M%,Ry+1,Z|
0000a9d0  25 21 47 5f 25 29 3a f2  54 28 4d 25 2c 4d 5f 2c  |%!G_%):.T(M%,M_,|
0000a9e0  5a 25 21 71 79 25 3d 30  29 3a f2 54 28 4d 25 2c  |Z%!qy%=0):.T(M%,|
0000a9f0  5a 5f 2c 5a 25 21 71 79  25 3e 30 29 3a f2 54 28  |Z_,Z%!qy%>0):.T(|
0000aa00  4d 25 2c 6f 79 2c 5a 25  21 71 79 25 3c 30 29 3a  |M%,oy,Z%!qy%<0):|
0000aa10  f2 76 28 4d 25 2c 6a 2c  5a 25 21 71 79 25 3c 3d  |.v(M%,j,Z%!qy%<=|
0000aa20  30 29 3a c8 8e b9 ca 0d  26 95 14 c9 28 5a 25 21  |0):.....&...(Z%!|
0000aa30  71 79 25 3c 30 29 3a 4b  25 3d 34 0d 26 96 14 c9  |qy%<0):K%=4.&...|
0000aa40  28 5a 25 21 71 79 25 3d  30 29 3a 4b 25 3d 32 0d  |(Z%!qy%=0):K%=2.|
0000aa50  26 97 19 c9 28 5a 25 21  71 79 25 3e 30 29 3a 4b  |&...(Z%!qy%>0):K|
0000aa60  25 3d 5a 25 21 71 79 25  0d 26 98 39 cb 3a f2 5a  |%=Z%!qy%.&.9.:.Z|
0000aa70  28 4d 25 2c 6a 2b 31 2c  4b 25 29 3a f2 5a 28 4d  |(M%,j+1,K%):.Z(M|
0000aa80  25 2c 54 79 2b 31 2c 5a  25 21 48 4a 25 29 3a f2  |%,Ty+1,Z%!HJ%):.|
0000aa90  5a 28 4d 25 2c 71 79 2b  31 2c 5a 25 21 43 4a 25  |Z(M%,qy+1,Z%!CJ%|
0000aaa0  29 0d 26 99 07 cd 3a e1  0d 26 9a 26 dd f2 56 75  |).&...:..&.&..Vu|
0000aab0  28 51 25 2c 58 25 2c 45  25 2c 49 25 29 3a ea 4d  |(Q%,X%,E%,I%):.M|
0000aac0  25 3a 4d 25 3d 46 5f 25  3a c8 8e 49 25 ca 0d 26  |%:M%=F_%:..I%..&|
0000aad0  9b 20 c9 52 79 2c 52 79  2b 32 3a f2 4a 28 4d 25  |. .Ry,Ry+2:.J(M%|
0000aae0  2c 49 25 2c 45 25 2c 52  79 2c 31 2c 62 29 0d 26  |,I%,E%,Ry,1,b).&|
0000aaf0  9c 15 c9 4d 5f 2c 6f 79  3a f2 76 28 4d 25 2c 6a  |...M_,oy:.v(M%,j|
0000ab00  2c b9 29 0d 26 9d 12 c9  5a 5f 3a f2 76 28 4d 25  |,.).&...Z_:.v(M%|
0000ab10  2c 6a 2c a3 29 0d 26 9e  1e c9 6a 2c 6a 2b 32 3a  |,j,.).&...j,j+2:|
0000ab20  f2 4a 28 4d 25 2c 49 25  2c 45 25 2c 6a 2c 31 2c  |.J(M%,I%,E%,j,1,|
0000ab30  39 39 29 0d 26 9f 21 c9  54 79 2c 54 79 2b 32 3a  |99).&.!.Ty,Ty+2:|
0000ab40  f2 4a 28 4d 25 2c 49 25  2c 45 25 2c 54 79 2c 31  |.J(M%,I%,E%,Ty,1|
0000ab50  2c 39 39 29 0d 26 a0 21  c9 71 79 2c 71 79 2b 32  |,99).&.!.qy,qy+2|
0000ab60  3a f2 4a 28 4d 25 2c 49  25 2c 45 25 2c 71 79 2c  |:.J(M%,I%,E%,qy,|
0000ab70  31 2c 39 39 29 0d 26 a1  0b c9 6b 75 3a f2 79 4a  |1,99).&...ku:.yJ|
0000ab80  0d 26 a2 10 c9 4a 6c 3a  c8 8e 5a 25 21 71 25 ca  |.&...Jl:..Z%!q%.|
0000ab90  0d 26 a3 13 c9 5f 2c 6f  3a f2 52 5f 3a e7 45 25  |.&..._,o:.R_:.E%|
0000aba0  80 34 8c 0d 26 a4 06 f2  50 0d 26 a5 05 cd 0d 26  |.4..&...P.&....&|
0000abb0  a6 08 7f 3a ef 37 0d 26  a7 05 cb 0d 26 a8 07 cb  |...:.7.&....&...|
0000abc0  3a e1 0d 26 a9 2b dd f2  52 5f 3a ea 4d 25 2c 6a  |:..&.+..R_:.M%,j|
0000abd0  25 3a 4d 25 3d 46 5f 25  3a 42 5f 25 3d a4 41 28  |%:M%=F_%:B_%=.A(|
0000abe0  4d 25 2c 52 79 2b 31 29  3a c8 8e b9 ca 0d 26 aa  |M%,Ry+1):.....&.|
0000abf0  15 c9 a4 5f 28 4d 25 2c  6f 79 29 3a 64 79 25 3d  |..._(M%,oy):dy%=|
0000ac00  2d 31 0d 26 ab 1d c9 a4  5f 28 4d 25 2c 5a 5f 29  |-1.&...._(M%,Z_)|
0000ac10  3a 64 79 25 3d a4 41 28  4d 25 2c 6a 2b 31 29 0d  |:dy%=.A(M%,j+1).|
0000ac20  26 ac 14 c9 a4 5f 28 4d  25 2c 4d 5f 29 3a 64 79  |&...._(M%,M_):dy|
0000ac30  25 3d 30 0d 26 ad 2f cb  3a 6b 5f 25 3d a4 41 28  |%=0.&./.:k_%=.A(|
0000ac40  4d 25 2c 54 79 2b 31 29  3a 45 4a 25 3d a4 41 28  |M%,Ty+1):EJ%=.A(|
0000ac50  4d 25 2c 71 79 2b 31 29  3a 6a 25 3d b9 3a c8 8e  |M%,qy+1):j%=.:..|
0000ac60  a3 ca 0d 26 ae 11 c9 28  5a 25 21 47 5f 25 3d 42  |...&...(Z%!G_%=B|
0000ac70  5f 25 29 0d 26 af 11 c9  28 5a 25 21 71 79 25 3d  |_%).&...(Z%!qy%=|
0000ac80  64 79 25 29 0d 26 b0 11  c9 28 5a 25 21 48 4a 25  |dy%).&...(Z%!HJ%|
0000ac90  3d 6b 5f 25 29 0d 26 b1  11 c9 28 5a 25 21 43 4a  |=k_%).&...(Z%!CJ|
0000aca0  25 3d 45 4a 25 29 0d 26  b2 09 7f 6a 25 3d a3 0d  |%=EJ%).&...j%=..|
0000acb0  26 b3 0a cb 3a e7 6a 25  8c 0d 26 b4 4c 5a 25 21  |&...:.j%..&.LZ%!|
0000acc0  47 5f 25 3d 42 5f 25 3a  5a 25 21 71 79 25 3d 64  |G_%=B_%:Z%!qy%=d|
0000acd0  79 25 3a 5a 25 21 48 4a  25 3d 6b 5f 25 3a 5a 25  |y%:Z%!HJ%=k_%:Z%|
0000ace0  21 43 4a 25 3d 45 4a 25  3a 5a 25 3f 60 75 25 2b  |!CJ%=EJ%:Z%?`u%+|
0000acf0  3d 31 3a f2 47 79 3a d6  74 5f 3a f2 46 79 28 5a  |=1:.Gy:.t_:.Fy(Z|
0000ad00  25 21 7a 25 29 0d 26 b5  07 cd 3a e1 0d 26 b6 45  |%!z%).&...:..&.E|
0000ad10  dd f2 66 5f 3a ea 4d 25  3a 4d 25 3d 4f 79 25 3a  |..f_:.M%:M%=Oy%:|
0000ad20  f2 5a 28 4d 25 2c 5f 79  2c 31 29 3a f2 5a 28 4d  |.Z(M%,_y,1):.Z(M|
0000ad30  25 2c 49 79 2c 31 29 3a  f2 5a 28 4d 25 2c 59 79  |%,Iy,1):.Z(M%,Yy|
0000ad40  2c 31 29 3a f2 5a 28 4d  25 2c 58 79 2c 31 29 3a  |,1):.Z(M%,Xy,1):|
0000ad50  e1 0d 26 b7 25 dd f2 6e  5f 3a ea 4d 25 2c 5f 25  |..&.%..n_:.M%,_%|
0000ad60  3a e7 a4 44 28 22 4d 61  67 6e 69 66 69 65 72 22  |:..D("Magnifier"|
0000ad70  2c 4f 79 25 29 8c 0d 26  b8 53 cc 3a 4d 25 3d 4f  |,Oy%)..&.S.:M%=O|
0000ad80  79 25 3a 5f 25 3d 5a 25  2b 5f 75 25 3a f2 5a 28  |y%:_%=Z%+_u%:.Z(|
0000ad90  4d 25 2c 5f 79 2c 5f 25  21 30 29 3a f2 5a 28 4d  |M%,_y,_%!0):.Z(M|
0000ada0  25 2c 59 79 2c 5f 25 21  38 29 3a f2 5a 28 4d 25  |%,Yy,_%!8):.Z(M%|
0000adb0  2c 49 79 2c 5f 25 21 34  29 3a f2 5a 28 4d 25 2c  |,Iy,_%!4):.Z(M%,|
0000adc0  58 79 2c 5f 25 21 31 32  29 0d 26 b9 07 cd 3a e1  |Xy,_%!12).&...:.|
0000add0  0d 26 ba 26 dd f2 41 4a  28 51 25 2c 58 25 2c 45  |.&.&..AJ(Q%,X%,E|
0000ade0  25 2c 49 25 29 3a ea 4d  25 3a 4d 25 3d 4f 79 25  |%,I%):.M%:M%=Oy%|
0000adf0  3a c8 8e 49 25 ca 0d 26  bb 1f c9 5f 79 2d 31 2c  |:..I%..&..._y-1,|
0000ae00  5f 79 2d 32 3a f2 5f 79  28 4d 25 2c 49 25 2c 45  |_y-2:._y(M%,I%,E|
0000ae10  25 2c 5f 79 29 0d 26 bc  1f c9 59 79 2b 31 2c 59  |%,_y).&...Yy+1,Y|
0000ae20  79 2b 32 3a f2 6c 79 28  4d 25 2c 49 25 2c 45 25  |y+2:.ly(M%,I%,E%|
0000ae30  2c 59 79 29 0d 26 bd 1f  c9 49 79 2d 31 2c 49 79  |,Yy).&...Iy-1,Iy|
0000ae40  2d 32 3a f2 5f 79 28 4d  25 2c 49 25 2c 45 25 2c  |-2:._y(M%,I%,E%,|
0000ae50  49 79 29 0d 26 be 1f c9  58 79 2b 31 2c 58 79 2b  |Iy).&...Xy+1,Xy+|
0000ae60  32 3a f2 6c 79 28 4d 25  2c 49 25 2c 45 25 2c 58  |2:.ly(M%,I%,E%,X|
0000ae70  79 29 0d 26 bf 0b c9 42  6c 3a f2 66 5f 0d 26 c0  |y).&...Bl:.f_.&.|
0000ae80  10 c9 60 5f 3a c8 8e 5a  25 21 71 25 ca 0d 26 c1  |..`_:..Z%!q%..&.|
0000ae90  13 c9 5f 2c 6f 3a f2 73  79 3a e7 45 25 80 34 8c  |.._,o:.sy:.E%.4.|
0000aea0  0d 26 c2 06 f2 50 0d 26  c3 05 cd 0d 26 c4 08 7f  |.&...P.&....&...|
0000aeb0  3a ef 37 0d 26 c5 05 cb  0d 26 c6 07 cb 3a e1 0d  |:.7.&....&...:..|
0000aec0  26 c7 15 dd f2 4b 75 28  70 25 2c 49 25 29 3a c8  |&....Ku(p%,I%):.|
0000aed0  8e 70 25 ca 0d 26 c8 19  c9 31 33 2c 33 39 38 3a  |.p%..&...13,398:|
0000aee0  e7 70 25 3d 31 33 80 49  25 3d 58 79 8c 0d 26 c9  |.p%=13.I%=Xy..&.|
0000aef0  0c c8 8e 5a 25 21 71 25  ca 0d 26 ca 5f c9 5f 2c  |...Z%!q%..&._._,|
0000af00  6f 3a c8 99 26 34 30 30  64 32 2c 2d 31 2c 2d 31  |o:..&400d2,-1,-1|
0000af10  3a 57 25 21 38 3d 31 3a  57 25 21 31 32 3d 57 25  |:W%!8=1:W%!12=W%|
0000af20  21 30 3a 57 25 21 31 36  3d 60 5f 3a c8 99 26 38  |!0:W%!16=`_:..&8|
0000af30  31 36 38 30 2c 2c 57 25  3a 57 25 21 38 3d 30 3a  |1680,,W%:W%!8=0:|
0000af40  ea 85 3a ee 85 ea f7 85  3a c8 99 26 38 31 36 38  |..:.....:..&8168|
0000af50  30 2c 2c 57 25 3a f2 51  0d 26 cb 17 f2 73 79 3a  |0,,W%:.Q.&...sy:|
0000af60  f7 85 3a c8 99 26 38 31  36 38 30 2c 2c 57 25 0d  |..:..&81680,,W%.|
0000af70  26 cc 08 7f 3a ef 37 0d  26 cd 05 cb 0d 26 ce 11  |&...:.7.&....&..|
0000af80  cc 3a f2 7a 5f 28 4f 79  25 2c 49 25 29 0d 26 cf  |.:.z_(Oy%,I%).&.|
0000af90  05 cd 0d 26 d0 0a c9 32  37 3a f2 50 0d 26 d1 14  |...&...27:.P.&..|
0000afa0  c9 33 39 39 3a f2 43 4a  28 4f 79 25 2c 49 25 29  |.399:.CJ(Oy%,I%)|
0000afb0  0d 26 d2 11 7f 3a c8 99  26 34 30 30 64 63 2c 70  |.&...:..&400dc,p|
0000afc0  25 0d 26 d3 07 cb 3a e1  0d 26 d4 6a dd f2 73 79  |%.&...:..&.j..sy|
0000afd0  3a ea 4d 25 2c 6a 25 2c  5f 25 3a 4d 25 3d 4f 79  |:.M%,j%,_%:M%=Oy|
0000afe0  25 3a 73 25 21 30 3d a4  41 28 4d 25 2c 5f 79 29  |%:s%!0=.A(M%,_y)|
0000aff0  3a 73 25 21 38 3d a4 41  28 4d 25 2c 59 79 29 3a  |:s%!8=.A(M%,Yy):|
0000b000  73 25 21 34 3d a4 41 28  4d 25 2c 49 79 29 3a 73  |s%!4=.A(M%,Iy):s|
0000b010  25 21 31 32 3d a4 41 28  4d 25 2c 58 79 29 3a 5f  |%!12=.A(M%,Xy):_|
0000b020  25 3d 5a 25 2b 5f 75 25  3a 6a 25 3d b9 3a c8 8e  |%=Z%+_u%:j%=.:..|
0000b030  a3 ca 0d 26 d5 10 c9 28  5f 25 21 30 3d 73 25 21  |...&...(_%!0=s%!|
0000b040  30 29 0d 26 d6 10 c9 28  5f 25 21 34 3d 73 25 21  |0).&...(_%!4=s%!|
0000b050  34 29 0d 26 d7 10 c9 28  5f 25 21 38 3d 73 25 21  |4).&...(_%!8=s%!|
0000b060  38 29 0d 26 d8 12 c9 28  5f 25 21 31 32 3d 73 25  |8).&...(_%!12=s%|
0000b070  21 31 32 29 0d 26 d9 09  7f 6a 25 3d a3 0d 26 da  |!12).&...j%=..&.|
0000b080  0a cb 3a e7 6a 25 8c 0d  26 db 40 5f 25 21 30 3d  |..:.j%..&.@_%!0=|
0000b090  73 25 21 30 3a 5f 25 21  34 3d 73 25 21 34 3a 5f  |s%!0:_%!4=s%!4:_|
0000b0a0  25 21 38 3d 73 25 21 38  3a 5f 25 21 31 32 3d 73  |%!8=s%!8:_%!12=s|
0000b0b0  25 21 31 32 3a f2 47 79  3a d6 74 5f 3a f2 46 79  |%!12:.Gy:.t_:.Fy|
0000b0c0  28 5a 25 21 7a 25 29 0d  26 dc 07 cd 3a e1 0d 26  |(Z%!z%).&...:..&|
0000b0d0  dd 26 dd f2 70 5f 28 51  25 2c 58 25 2c 45 25 2c  |.&..p_(Q%,X%,E%,|
0000b0e0  49 25 29 3a ea 4d 25 3a  4d 25 3d 53 5f 25 3a c8  |I%):.M%:M%=S_%:.|
0000b0f0  8e 49 25 ca 0d 26 de 21  c9 56 79 2c 56 79 2b 32  |.I%..&.!.Vy,Vy+2|
0000b100  3a f2 4a 28 4d 25 2c 49  25 2c 45 25 2c 56 79 2c  |:.J(M%,I%,E%,Vy,|
0000b110  31 2c 39 39 29 0d 26 df  0b c9 57 6c 3a f2 65 75  |1,99).&...Wl:.eu|
0000b120  0d 26 e0 12 c9 4d 61 3a  f2 59 5f 3a e7 45 25 80  |.&...Ma:.Y_:.E%.|
0000b130  34 8c 0d 26 e1 06 f2 50  0d 26 e2 05 cd 0d 26 e3  |4..&...P.&....&.|
0000b140  07 cb 3a e1 0d 26 e4 24  dd f2 65 75 3a ea 4d 25  |..:..&.$..eu:.M%|
0000b150  3a 4d 25 3d 53 5f 25 3a  f2 5a 28 4d 25 2c 56 79  |:M%=S_%:.Z(M%,Vy|
0000b160  2b 31 2c 64 5f 29 3a e1  0d 26 e5 1f dd f2 6d 4a  |+1,d_):..&....mJ|
0000b170  3a ea 4d 25 3a e7 a4 44  28 22 43 65 6e 74 72 65  |:.M%:..D("Centre|
0000b180  22 2c 53 5f 25 29 8c 0d  26 e6 1f cc 3a 4d 25 3d  |",S_%)..&...:M%=|
0000b190  53 5f 25 3a f2 5a 28 4d  25 2c 56 79 2b 31 2c 5a  |S_%:.Z(M%,Vy+1,Z|
0000b1a0  25 21 66 75 25 29 0d 26  e7 07 cd 3a e1 0d 26 e8  |%!fu%).&...:..&.|
0000b1b0  30 dd f2 59 5f 3a ea 4d  25 3a 4d 25 3d 53 5f 25  |0..Y_:.M%:M%=S_%|
0000b1c0  3a 53 75 25 3d a4 41 28  4d 25 2c 56 79 2b 31 29  |:Su%=.A(M%,Vy+1)|
0000b1d0  3a 5a 25 21 66 75 25 3d  53 75 25 3a e1 0d 26 e9  |:Z%!fu%=Su%:..&.|
0000b1e0  14 dd f2 62 3a ea 51 25  3a e7 57 79 25 3c 3e 30  |...b:.Q%:.Wy%<>0|
0000b1f0  8c 0d 26 ea 11 f2 52 28  57 79 25 29 3a 57 79 25  |..&...R(Wy%):Wy%|
0000b200  3d 30 0d 26 eb 14 cd 3a  51 25 3d a4 44 79 3a e7  |=0.&...:Q%=.Dy:.|
0000b210  5a 25 3c 3e 30 8c 0d 26  ec 29 f2 65 79 28 5a 25  |Z%<>0..&.).ey(Z%|
0000b220  21 6f 25 2c 5a 4a 2c 5a  25 2b 57 75 25 29 3a 51  |!o%,ZJ,Z%+Wu%):Q|
0000b230  25 3d a4 6a 28 5a 25 21  7a 25 29 3a f2 57 79 0d  |%=.j(Z%!z%):.Wy.|
0000b240  26 ed 13 cc 3a f2 46 28  47 6e 25 2c a4 43 28 31  |&...:.F(Gn%,.C(1|
0000b250  29 29 0d 26 ee 07 cd 3a  e1 0d 26 ef b0 dd f2 66  |)).&...:..&....f|
0000b260  79 3a ea 55 25 2c 46 25  3a 46 25 3d 5a 25 2b 65  |y:.U%,F%:F%=Z%+e|
0000b270  25 3a 46 25 21 4b 79 25  3d 30 3a f2 6e 79 28 5a  |%:F%!Ky%=0:.ny(Z|
0000b280  25 21 7a 25 2c 5a 25 2b  6e 75 25 2c 2d 31 29 3a  |%!z%,Z%+nu%,-1):|
0000b290  55 25 3d a4 4d 28 35 31  32 29 3a 21 55 25 3d 5a  |U%=.M(512):!U%=Z|
0000b2a0  25 21 7a 25 3a c8 99 26  34 30 30 63 62 2c 2c 55  |%!z%:..&400cb,,U|
0000b2b0  25 3a 55 25 21 32 35 36  3d 5a 25 21 6f 25 3a c8  |%:U%!256=Z%!o%:.|
0000b2c0  99 26 34 30 30 63 62 2c  2c 55 25 2b 32 35 36 3a  |.&400cb,,U%+256:|
0000b2d0  55 25 21 28 32 35 36 2b  32 38 29 3d 2d 31 3a f2  |U%!(256+28)=-1:.|
0000b2e0  4d 79 28 55 25 2b 32 35  36 2c 55 25 29 3a f2 43  |My(U%+256,U%):.C|
0000b2f0  28 55 25 2c 35 31 32 29  3a e7 5a 25 21 59 79 25  |(U%,512):.Z%!Yy%|
0000b300  3c 3e 5a 25 21 51 79 25  8c 0d 26 f0 1a 5a 25 21  |<>Z%!Qy%..&..Z%!|
0000b310  71 25 3d 66 79 3a f2 44  28 22 4d 6f 76 65 22 2c  |q%=fy:.D("Move",|
0000b320  5a 25 29 0d 26 f1 0f cd  3a e7 5a 25 21 71 25 3d  |Z%).&...:.Z%!q%=|
0000b330  5f 8c 0d 26 f2 2e f2 7a  28 31 29 3a 5a 25 21 71  |_..&...z(1):Z%!q|
0000b340  25 3d 48 79 3a f2 44 28  22 48 69 67 68 6c 69 67  |%=Hy:.D("Highlig|
0000b350  68 74 5f 41 74 5f 53 74  61 72 74 22 2c 5a 25 29  |ht_At_Start",Z%)|
0000b360  0d 26 f3 12 cd 3a f2 46  79 28 5a 25 21 7a 25 29  |.&...:.Fy(Z%!z%)|
0000b370  3a e1 0d 26 f4 1c dd f2  50 5f 3a ea 46 25 3a f2  |:..&....P_:.F%:.|
0000b380  65 28 5a 25 29 3a c8 8e  5a 25 21 71 25 ca 0d 26  |e(Z%):..Z%!q%..&|
0000b390  f5 0f c9 6f 3a f2 63 3a  f2 7a 28 33 29 0d 26 f6  |...o:.c:.z(3).&.|
0000b3a0  2c 7f 3a f2 6e 28 5a 25  21 7a 25 2c 5a 25 2b 6e  |,.:.n(Z%!z%,Z%+n|
0000b3b0  75 25 29 3a f2 42 75 28  5a 25 21 6f 25 29 3a e7  |u%):.Bu(Z%!o%):.|
0000b3c0  5a 25 21 43 5f 25 3e 30  8c 0d 26 f7 09 f2 7a 28  |Z%!C_%>0..&...z(|
0000b3d0  34 29 0d 26 f8 0b cc 3a  f2 7a 28 33 29 0d 26 f9  |4).&...:.z(3).&.|
0000b3e0  05 cd 0d 26 fa 07 cb 3a  e1 0d 26 fb 1e dd f2 61  |...&...:..&....a|
0000b3f0  3a e7 28 5a 25 21 71 25  3d 6f 29 84 28 5a 25 21  |:.(Z%!q%=o).(Z%!|
0000b400  43 5f 25 3d 30 29 8c 0d  26 fc 0f 5a 25 21 71 25  |C_%=0)..&..Z%!q%|
0000b410  3d 5f 3a f2 57 79 0d 26  fd 15 cc 3a e7 a4 61 28  |=_:.Wy.&...:..a(|
0000b420  33 2c a4 43 28 36 29 29  3d 31 8c 0d 26 fe 0f 5a  |3,.C(6))=1..&..Z|
0000b430  25 21 71 25 3d 5f 3a f2  57 79 0d 26 ff 05 cd 0d  |%!q%=_:.Wy.&....|
0000b440  27 00 07 cd 3a e1 0d 27  01 4f dd f2 57 79 3a f2  |'...:..'.O..Wy:.|
0000b450  65 28 5a 25 29 3a f2 43  79 28 5a 25 21 7a 25 2c  |e(Z%):.Cy(Z%!z%,|
0000b460  5a 25 2b 6e 75 25 29 3a  5a 25 21 43 5f 25 3d 30  |Z%+nu%):Z%!C_%=0|
0000b470  3a 5a 25 21 5f 4a 25 3d  30 3a 5a 25 21 4e 6c 25  |:Z%!_J%=0:Z%!Nl%|
0000b480  3d a3 3a 5a 25 21 4c 5f  25 3d a3 3a d6 75 69 3a  |=.:Z%!L_%=.:.ui:|
0000b490  f2 66 79 3a e1 0d 27 02  45 dd f2 76 28 4d 25 2c  |.fy:..'.E..v(M%,|
0000b4a0  4a 25 2c 72 6c 25 29 3a  f2 5a 79 28 4d 25 2c 4a  |J%,rl%):.Zy(M%,J|
0000b4b0  25 2c 72 6c 25 29 3a f2  5a 79 28 4d 25 2c 4a 25  |%,rl%):.Zy(M%,J%|
0000b4c0  2b 31 2c 72 6c 25 29 3a  f2 5a 79 28 4d 25 2c 4a  |+1,rl%):.Zy(M%,J|
0000b4d0  25 2b 32 2c 72 6c 25 29  3a e1 0d 27 03 45 dd f2  |%+2,rl%):..'.E..|
0000b4e0  4a 28 4d 25 2c 49 25 2c  45 25 2c 4b 5f 25 2c 41  |J(M%,I%,E%,K_%,A|
0000b4f0  6c 25 2c 49 6c 25 29 3a  f2 51 79 28 4d 25 2c 49  |l%,Il%):.Qy(M%,I|
0000b500  25 2c 45 25 2c 4b 5f 25  2b 32 2c 4b 5f 25 2c 4b  |%,E%,K_%+2,K_%,K|
0000b510  5f 25 2b 31 2c 41 6c 25  2c 49 6c 25 29 3a e1 0d  |_%+1,Al%,Il%):..|
0000b520  27 04 3b dd f2 6c 79 28  4d 25 2c 49 25 2c 45 25  |'.;..ly(M%,I%,E%|
0000b530  2c 4b 5f 25 29 3a f2 51  79 28 4d 25 2c 49 25 2c  |,K_%):.Qy(M%,I%,|
0000b540  45 25 2c 4b 5f 25 2b 31  2c 4b 5f 25 2b 32 2c 4b  |E%,K_%+1,K_%+2,K|
0000b550  5f 25 2c 31 2c 39 39 29  3a e1 0d 27 05 3b dd f2  |_%,1,99):..'.;..|
0000b560  5f 79 28 4d 25 2c 49 25  2c 45 25 2c 4b 5f 25 29  |_y(M%,I%,E%,K_%)|
0000b570  3a f2 51 79 28 4d 25 2c  49 25 2c 45 25 2c 4b 5f  |:.Qy(M%,I%,E%,K_|
0000b580  25 2d 32 2c 4b 5f 25 2d  31 2c 4b 5f 25 2c 31 2c  |%-2,K_%-1,K_%,1,|
0000b590  39 39 29 3a e1 0d 27 06  38 dd f2 4f 75 28 51 25  |99):..'.8..Ou(Q%|
0000b5a0  2c 58 25 2c 45 25 2c 49  25 29 3a 5a 25 21 68 4a  |,X%,E%,I%):Z%!hJ|
0000b5b0  25 3d 28 5a 25 21 68 4a  25 3d 30 29 3a 61 4a 25  |%=(Z%!hJ%=0):aJ%|
0000b5c0  3d 5a 25 21 68 4a 25 3a  e7 61 4a 25 8c 0d 27 07  |=Z%!hJ%:.aJ%..'.|
0000b5d0  19 f2 5f 28 5a 25 21 6f  25 2c 59 5f 2c a4 48 28  |.._(Z%!o%,Y_,.H(|
0000b5e0  22 4f 6e 22 29 29 0d 27  08 1c cc 3a f2 5f 28 5a  |"On")).'...:._(Z|
0000b5f0  25 21 6f 25 2c 59 5f 2c  a4 48 28 22 4f 66 66 22  |%!o%,Y_,.H("Off"|
0000b600  29 29 0d 27 09 07 cd 3a  e1 0d 27 0a 44 dd f2 72  |)).'...:..'.D..r|
0000b610  4a 3a ea 4f 25 2c 50 25  2c 56 25 2c 4c 25 2c 60  |J:.O%,P%,V%,L%,`|
0000b620  25 3a ea 85 3a ee 85 ea  f7 85 3a f2 41 28 22 40  |%:..:.....:.A("@|
0000b630  2e 44 6f 63 75 6d 65 6e  74 3a 43 6f 6e 73 74 61  |.Document:Consta|
0000b640  6e 74 73 20 28 73 74 61  72 74 29 22 29 0d 27 0b  |nts (start)").'.|
0000b650  fb 5f 3d 30 3a 57 79 3d  31 3a 66 79 3d 32 3a 52  |._=0:Wy=1:fy=2:R|
0000b660  5f 3d 33 3a 5f 4a 3d 34  3a 6f 3d 35 3a 44 75 3d  |_=3:_J=4:o=5:Du=|
0000b670  36 3a 48 79 3d 37 3a 5f  6c 3d 2d 31 3a 47 4a 3d  |6:Hy=7:_l=-1:GJ=|
0000b680  2d 32 3a 74 3d 34 3a 5a  4a 3d 30 3a 59 69 3d 32  |-2:t=4:ZJ=0:Yi=2|
0000b690  3a 4a 5f 3d 34 3a 59 5f  3d 36 3a 46 69 3d 38 3a  |:J_=4:Y_=6:Fi=8:|
0000b6a0  60 79 3d 36 3a 49 4a 3d  33 3a 6b 3d 33 3a 41 79  |`y=6:IJ=3:k=3:Ay|
0000b6b0  3d 37 3a 53 79 3d 31 31  3a 4a 79 3d 31 37 3a 4e  |=7:Sy=11:Jy=17:N|
0000b6c0  79 3d 32 31 3a 61 79 3d  32 35 3a 4c 79 3d 33 31  |y=21:ay=25:Ly=31|
0000b6d0  3a 55 79 3d 33 35 3a 52  6c 3d 33 38 3a 56 69 3d  |:Uy=35:Rl=38:Vi=|
0000b6e0  33 39 3a 52 79 3d 33 3a  54 79 3d 39 3a 71 79 3d  |39:Ry=3:Ty=9:qy=|
0000b6f0  31 33 3a 4d 5f 3d 31 38  3a 5a 5f 3d 31 39 3a 6f  |13:M_=18:Z_=19:o|
0000b700  79 3d 32 30 3a 6a 3d 32  31 3a 6b 75 3d 32 34 3a  |y=20:j=21:ku=24:|
0000b710  4a 6c 3d 32 35 3a 47 79  3d 31 3a 44 79 3d 35 3a  |Jl=25:Gy=1:Dy=5:|
0000b720  65 75 3d 38 3a 47 69 3d  39 3a 5a 79 3d 31 3a 60  |eu=8:Gi=9:Zy=1:`|
0000b730  3d 35 3a 6c 3d 39 3a 4f  79 3d 31 33 3a 6e 75 3d  |=5:l=9:Oy=13:nu=|
0000b740  31 36 3a 6c 75 3d 31 37  0d 27 0c fd 71 5f 3d 31  |16:lu=17.'..q_=1|
0000b750  38 3a 56 79 3d 31 3a 57  6c 3d 34 3a 4d 61 3d 35  |8:Vy=1:Wl=4:Ma=5|
0000b760  3a 5f 79 3d 33 3a 59 79  3d 35 3a 49 79 3d 31 31  |:_y=3:Yy=5:Iy=11|
0000b770  3a 58 79 3d 31 33 3a 42  6c 3d 31 36 3a 60 5f 3d  |:Xy=13:Bl=16:`_=|
0000b780  31 37 3a 71 60 3d 30 3a  70 75 3d 31 3a 51 5f 3d  |17:q`=0:pu=1:Q_=|
0000b790  32 3a 75 6e 3d 33 3a 56  75 3d 34 3a 4e 69 3d 35  |2:un=3:Vu=4:Ni=5|
0000b7a0  3a 61 6c 3d 30 3a 48 75  3d 31 3a 45 69 3d 32 3a  |:al=0:Hu=1:Ei=2:|
0000b7b0  6f 6c 3d 30 3a 7a 75 3d  31 3a 76 69 3d 32 3a 57  |ol=0:zu=1:vi=2:W|
0000b7c0  69 3d 33 3a 73 4a 3d 34  3a 67 5f 3d 35 3a 51 5f  |i=3:sJ=4:g_=5:Q_|
0000b7d0  3d 36 3a 59 4a 3d 37 3a  58 69 3d 30 3a 60 69 3d  |=6:YJ=7:Xi=0:`i=|
0000b7e0  31 3a 6b 6c 3d 32 3a 41  61 3d 33 3a 64 69 3d 34  |1:kl=2:Aa=3:di=4|
0000b7f0  3a 57 75 3d 35 3a 69 75  3d 36 3a 71 4a 3d 30 3a  |:Wu=5:iu=6:qJ=0:|
0000b800  4f 75 3d 31 3a 4e 4a 3d  32 3a 44 5f 3d 33 3a 66  |Ou=1:NJ=2:D_=3:f|
0000b810  6c 3d 30 3a 5a 6c 3d 31  3a 6e 4a 3d 32 3a 5f 69  |l=0:Zl=1:nJ=2:_i|
0000b820  3d 33 3a 75 75 3d 34 3a  6d 75 3d 36 3a 6a 6c 3d  |=3:uu=4:mu=6:jl=|
0000b830  30 3a 70 69 3d 31 3a 44  6c 3d 31 3a 43 6c 3d 34  |0:pi=1:Dl=1:Cl=4|
0000b840  3a 6c 69 3d 31 0d 27 0d  fa 66 69 3d 32 3a 75 6c  |:li=1.'..fi=2:ul|
0000b850  3d 33 3a 76 24 3d 22 5a  61 70 70 61 22 3a 5f 5f  |=3:v$="Zappa":__|
0000b860  3d 28 34 30 2a 32 33 29  81 32 3a 77 5f 3d 37 3a  |=(40*23).2:w_=7:|
0000b870  78 4a 3d 31 30 3a 54 4a  3d 31 3a 43 4a 3d 31 3a  |xJ=10:TJ=1:CJ=1:|
0000b880  61 5f 3d 31 3a 65 4a 3d  34 30 3a 78 5f 3d 32 33  |a_=1:eJ=40:x_=23|
0000b890  3a 47 75 3d 32 3a 6f 5f  3d 33 3a 56 4a 3d 31 3a  |:Gu=2:o_=3:VJ=1:|
0000b8a0  63 69 3d 2d 31 3a 66 5f  3d 33 30 3a 52 4a 3d 31  |ci=-1:f_=30:RJ=1|
0000b8b0  30 3a 57 4a 3d 31 38 3a  63 5f 3d 38 38 3a 45 4a  |0:WJ=18:c_=88:EJ|
0000b8c0  3d 31 39 32 3a 4f 69 3d  34 3a 64 5f 3d 39 3a 50  |=192:Oi=4:d_=9:P|
0000b8d0  69 3d a3 3a 52 69 3d b9  3a 42 75 3d b9 3a 4c 6c  |i=.:Ri=.:Bu=.:Ll|
0000b8e0  3d b9 3a 53 61 3d 31 3a  46 75 3d b9 3a 6c 4a 3d  |=.:Sa=1:Fu=.:lJ=|
0000b8f0  30 3a 58 6c 3d b9 3a 53  75 3d 31 3a 68 69 3d 31  |0:Xl=.:Su=1:hi=1|
0000b900  3a 72 75 3d 31 3a 66 75  3d 31 3a 75 4a 3d b9 3a  |:ru=1:fu=1:uJ=.:|
0000b910  6c 6c 3d b9 3a 41 5f 25  3d 2d 31 30 31 3a 74 79  |ll=.:A_%=-101:ty|
0000b920  25 3d 2d 31 30 32 3a de  4a 25 28 38 2c 31 29 3a  |%=-102:.J%(8,1):|
0000b930  de 43 25 28 32 2c 32 29  3a de 57 25 28 38 29 0d  |.C%(2,2):.W%(8).|
0000b940  27 0e a5 4a 25 28 29 3d  30 2c 30 2c 2b 31 2c 30  |'..J%()=0,0,+1,0|
0000b950  2c 2b 31 2c 2d 31 2c 30  2c 2d 31 2c 2d 31 2c 2d  |,+1,-1,0,-1,-1,-|
0000b960  31 2c 2d 31 2c 30 2c 2d  31 2c 2b 31 2c 30 2c 2b  |1,-1,0,-1,+1,0,+|
0000b970  31 2c 2b 31 2c 2b 31 3a  57 25 28 29 3d 30 2c 31  |1,+1,+1:W%()=0,1|
0000b980  2c 39 2c 38 2c 31 30 2c  32 2c 36 2c 34 2c 35 3a  |,9,8,10,2,6,4,5:|
0000b990  43 25 28 29 3d 34 2c 35  2c 36 2c 33 2c 30 2c 37  |C%()=4,5,6,3,0,7|
0000b9a0  2c 32 2c 31 2c 38 3a f7  85 3a ea 85 3a ee 85 ea  |,2,1,8:..:..:...|
0000b9b0  f7 85 3a c8 99 26 34 30  30 65 63 2c 60 25 2c 2d  |..:..&400ec,`%,-|
0000b9c0  31 3a f2 41 28 22 40 2e  44 6f 63 75 6d 65 6e 74  |1:.A("@.Document|
0000b9d0  3a 20 43 6f 6e 73 74 61  6e 74 73 20 3c 72 65 61  |: Constants <rea|
0000b9e0  6c 3e 22 29 0d 27 0f 4f  60 25 3d 93 2d 33 32 37  |l>").'.O`%=.-327|
0000b9f0  36 38 3a c8 99 26 34 30  30 65 63 2c 60 25 2b 33  |68:..&400ec,`%+3|
0000ba00  32 37 36 38 2c 2d 31 b8  4c 25 3a 4c 25 2b 3d 33  |2768,-1.L%:L%+=3|
0000ba10  32 37 36 38 3a 4f 25 3d  60 25 2b 33 32 37 36 38  |2768:O%=`%+32768|
0000ba20  3a 50 25 3d 30 3a 56 25  3d 31 34 3a e7 4f 25 3d  |:P%=0:V%=14:.O%=|
0000ba30  4c 25 8c 0d 27 10 2f 85  31 2c 22 4e 6f 74 20 65  |L%..'./.1,"Not e|
0000ba40  6e 6f 75 67 68 20 6d 65  6d 6f 72 79 20 74 6f 20  |nough memory to |
0000ba50  73 74 61 72 74 20 61 70  70 6c 69 63 61 74 69 6f  |start applicatio|
0000ba60  6e 22 0d 27 11 f8 cd 3a  50 25 3d 30 3a 4f 25 3d  |n".'...:P%=0:O%=|
0000ba70  60 25 2b 33 32 37 36 38  3a 5b 4f 50 54 56 25 3a  |`%+32768:[OPTV%:|
0000ba80  2e 50 6c 25 44 43 44 30  3a 2e 74 6c 25 44 43 44  |.Pl%DCD0:.tl%DCD|
0000ba90  30 3a 2e 4b 79 25 44 43  44 30 3a 2e 4a 5f 25 44  |0:.Ky%DCD0:.J_%D|
0000baa0  43 44 30 3a 2e 6e 6c 25  44 43 44 30 3a 2e 44 61  |CD0:.nl%DCD0:.Da|
0000bab0  25 44 43 44 30 3a 2e 6b  4a 25 44 43 44 30 3a 2e  |%DCD0:.kJ%DCD0:.|
0000bac0  6b 79 25 44 43 44 30 3a  2e 54 6c 25 44 43 44 30  |ky%DCD0:.Tl%DCD0|
0000bad0  3a 2e 67 79 25 44 43 44  30 3a 2e 75 5f 25 44 43  |:.gy%DCD0:.u_%DC|
0000bae0  44 30 3a 2e 62 79 25 44  43 44 30 3a 2e 52 6c 25  |D0:.by%DCD0:.Rl%|
0000baf0  44 43 44 30 3a 2e 61 75  25 3a 5d 3a 50 25 3d 30  |DCD0:.au%:]:P%=0|
0000bb00  3a 4f 25 3d 60 25 2b 33  32 37 36 38 3a 5b 4f 50  |:O%=`%+32768:[OP|
0000bb10  54 56 25 3a 2e 59 61 25  44 43 44 30 3a 2e 49 75  |TV%:.Ya%DCD0:.Iu|
0000bb20  25 44 43 44 30 3a 2e 53  6c 25 44 43 44 30 3a 2e  |%DCD0:.Sl%DCD0:.|
0000bb30  6c 69 25 44 43 44 30 3a  2e 57 5f 25 44 43 44 30  |li%DCD0:.W_%DCD0|
0000bb40  3a 2e 77 4a 25 44 43 44  30 3a 44 43 44 30 3a 44  |:.wJ%DCD0:DCD0:D|
0000bb50  43 44 30 3a 2e 63 5f 25  3a 5d 0d 27 12 f1 69 4a  |CD0:.c_%:].'..iJ|
0000bb60  25 3d 35 3a 50 25 3d 30  3a 4f 25 3d 60 25 2b 33  |%=5:P%=0:O%=`%+3|
0000bb70  32 37 36 38 3a 5b 4f 50  54 56 25 3a 2e 77 25 44  |2768:[OPTV%:.w%D|
0000bb80  43 44 30 3a 2e 78 25 44  43 44 30 3a 2e 4f 5f 25  |CD0:.x%DCD0:.O_%|
0000bb90  44 43 44 30 3a 2e 48 5f  25 44 43 44 30 3a 2e 62  |DCD0:.H_%DCD0:.b|
0000bba0  5f 25 44 43 44 30 3a 2e  79 5f 25 44 43 44 30 3a  |_%DCD0:.y_%DCD0:|
0000bbb0  2e 51 5f 25 44 43 44 30  3a 2e 78 5f 25 44 43 44  |.Q_%DCD0:.x_%DCD|
0000bbc0  30 3a 2e 73 5f 25 3a 5d  3a 50 25 3d 30 3a 4f 25  |0:.s_%:]:P%=0:O%|
0000bbd0  3d 60 25 2b 33 32 37 36  38 3a 5b 4f 50 54 56 25  |=`%+32768:[OPTV%|
0000bbe0  3a 2e 45 6c 25 3a 5d 3a  50 25 2b 3d 32 34 3a 5b  |:.El%:]:P%+=24:[|
0000bbf0  4f 50 54 56 25 3a 2e 69  75 25 44 43 44 30 3a 2e  |OPTV%:.iu%DCD0:.|
0000bc00  4d 75 25 44 43 44 30 3a  41 4c 49 47 4e 3a 2e 4d  |Mu%DCD0:ALIGN:.M|
0000bc10  69 25 3a 5d 3a 50 25 3d  73 5f 25 3a 4f 25 3d 60  |i%:]:P%=s_%:O%=`|
0000bc20  25 2b 33 32 37 36 38 3a  5b 4f 50 54 56 25 3a 2e  |%+32768:[OPTV%:.|
0000bc30  72 25 44 43 44 30 3a 2e  60 4a 25 3a 5d 3a 50 25  |r%DCD0:.`J%:]:P%|
0000bc40  2b 3d 6c 5f 3a 5b 4f 50  54 56 25 0d 27 13 f8 2e  |+=l_:[OPTV%.'...|
0000bc50  7a 61 25 3a 5d 3a 50 25  2b 3d 4d 69 25 2a 79 4a  |za%:]:P%+=Mi%*yJ|
0000bc60  25 3a 5b 4f 50 54 56 25  3a 41 4c 49 47 4e 3a 2e  |%:[OPTV%:ALIGN:.|
0000bc70  6c 5f 25 3a 5d 3a 50 25  3d 30 3a 4f 25 3d 60 25  |l_%:]:P%=0:O%=`%|
0000bc80  2b 33 32 37 36 38 3a 5b  4f 50 54 56 25 3a 2e 4e  |+32768:[OPTV%:.N|
0000bc90  6e 25 44 43 44 30 3a 2e  51 6e 25 44 43 44 30 3a  |n%DCD0:.Qn%DCD0:|
0000bca0  2e 57 69 25 44 43 44 30  3a 2e 75 25 44 43 44 30  |.Wi%DCD0:.u%DCD0|
0000bcb0  3a 2e 6d 79 25 44 43 44  30 3a 2e 67 6c 25 44 43  |:.my%DCD0:.gl%DC|
0000bcc0  44 30 3a 2e 6e 25 3a 5d  3a 73 4a 25 3d 31 3c 3c  |D0:.n%:]:sJ%=1<<|
0000bcd0  30 3a 7a 5f 25 3d 31 3c  3c 31 3a 50 25 3d 73 5f  |0:z_%=1<<1:P%=s_|
0000bce0  25 3a 4f 25 3d 60 25 2b  33 32 37 36 38 3a 5b 4f  |%:O%=`%+32768:[O|
0000bcf0  50 54 56 25 3a 2e 76 5f  25 44 43 44 30 3a 2e 71  |PTV%:.v_%DCD0:.q|
0000bd00  25 44 43 44 30 3a 2e 47  5f 25 44 43 44 30 3a 2e  |%DCD0:.G_%DCD0:.|
0000bd10  6c 25 44 43 44 30 3a 2e  51 79 25 44 43 44 30 3a  |l%DCD0:.Qy%DCD0:|
0000bd20  2e 59 79 25 44 43 44 30  3a 2e 52 69 25 44 43 44  |.Yy%DCD0:.Ri%DCD|
0000bd30  30 3a 2e 5f 61 25 44 43  44 30 3a 2e 43 79 25 44  |0:._a%DCD0:.Cy%D|
0000bd40  43 44 30 0d 27 14 f6 2e  76 79 25 44 43 44 30 3a  |CD0.'...vy%DCD0:|
0000bd50  2e 76 75 25 44 43 44 30  3a 2e 75 69 25 44 43 44  |.vu%DCD0:.ui%DCD|
0000bd60  30 3a 2e 65 79 25 44 43  44 30 3a 2e 45 69 25 44  |0:.ey%DCD0:.Ei%D|
0000bd70  43 44 30 3a 2e 56 75 25  44 43 44 30 3a 2e 5f 79  |CD0:.Vu%DCD0:._y|
0000bd80  25 44 43 44 30 3a 2e 52  4a 25 44 43 44 30 3a 2e  |%DCD0:.RJ%DCD0:.|
0000bd90  72 5f 25 44 43 44 30 3a  2e 42 69 25 44 43 44 30  |r_%DCD0:.Bi%DCD0|
0000bda0  3a 2e 4b 6c 25 44 43 44  30 3a 2e 75 4a 25 44 43  |:.Kl%DCD0:.uJ%DC|
0000bdb0  44 30 3a 2e 68 5f 25 44  43 44 30 3a 2e 71 79 25  |D0:.h_%DCD0:.qy%|
0000bdc0  44 43 44 30 3a 2e 51 75  25 44 43 44 30 3a 2e 48  |DCD0:.Qu%DCD0:.H|
0000bdd0  4a 25 44 43 44 30 3a 2e  43 4a 25 44 43 44 30 3a  |J%DCD0:.CJ%DCD0:|
0000bde0  2e 67 5f 25 44 43 44 30  3a 2e 73 79 25 44 43 44  |.g_%DCD0:.sy%DCD|
0000bdf0  30 3a 2e 63 79 25 44 43  44 30 3a 2e 69 5f 25 44  |0:.cy%DCD0:.i_%D|
0000be00  43 44 30 3a 2e 6f 75 25  44 43 44 30 3a 2e 4a 79  |CD0:.ou%DCD0:.Jy|
0000be10  25 44 43 44 30 3a 2e 4f  75 25 44 43 44 30 3a 2e  |%DCD0:.Ou%DCD0:.|
0000be20  66 75 25 44 43 44 30 3a  2e 4e 4a 25 44 43 44 30  |fu%DCD0:.NJ%DCD0|
0000be30  3a 2e 44 4a 25 44 43 44  30 0d 27 15 fb 2e 60 5f  |:.DJ%DCD0.'...`_|
0000be40  25 44 43 44 30 3a 2e 47  4a 25 44 43 44 30 3a 2e  |%DCD0:.GJ%DCD0:.|
0000be50  68 4a 25 44 43 44 30 3a  2e 62 4a 25 44 43 44 30  |hJ%DCD0:.bJ%DCD0|
0000be60  3a 2e 4b 75 25 44 43 44  30 3a 2e 54 5f 25 44 43  |:.Ku%DCD0:.T_%DC|
0000be70  44 30 3a 2e 4c 5f 25 44  43 44 30 3a 2e 4e 6c 25  |D0:.L_%DCD0:.Nl%|
0000be80  44 43 44 30 3a 2e 43 5f  25 44 43 44 30 3a 2e 5f  |DCD0:.C_%DCD0:._|
0000be90  4a 25 44 43 44 30 3a 2e  56 5f 25 44 43 44 30 3a  |J%DCD0:.V_%DCD0:|
0000bea0  2e 4a 4a 25 44 43 44 30  3a 2e 75 6c 25 44 43 44  |.JJ%DCD0:.ul%DCD|
0000beb0  30 3a 2e 4e 79 25 44 43  44 30 3a 2e 74 25 44 43  |0:.Ny%DCD0:.t%DC|
0000bec0  44 30 3a 2e 41 79 25 44  43 44 30 3a 2e 7a 75 25  |D0:.Ay%DCD0:.zu%|
0000bed0  3a 5d 3a 50 25 2b 3d 31  36 2a 32 3a 5b 4f 50 54  |:]:P%+=16*2:[OPT|
0000bee0  56 25 3a 2e 65 25 3a 5d  3a 50 25 2b 3d 61 75 25  |V%:.e%:]:P%+=au%|
0000bef0  3a 5b 4f 50 54 56 25 3a  2e 7a 25 44 43 44 30 3a  |:[OPTV%:.z%DCD0:|
0000bf00  2e 6f 25 44 43 44 30 3a  2e 73 75 25 44 43 44 30  |.o%DCD0:.su%DCD0|
0000bf10  3a 2e 46 75 25 44 43 44  30 3a 2e 48 6c 25 44 43  |:.Fu%DCD0:.Hl%DC|
0000bf20  44 30 3a 2e 71 6c 25 44  43 44 30 3a 2e 64 6c 25  |D0:.ql%DCD0:.dl%|
0000bf30  44 43 44 30 0d 27 16 b2  2e 4c 69 25 44 43 44 30  |DCD0.'...Li%DCD0|
0000bf40  3a 2e 4e 69 25 44 43 44  30 3a 2e 5f 6c 25 44 43  |:.Ni%DCD0:._l%DC|
0000bf50  44 30 3a 2e 63 6c 25 44  43 44 30 3a 2e 4f 69 25  |D0:.cl%DCD0:.Oi%|
0000bf60  44 43 44 30 3a 2e 73 6c  25 44 43 44 30 3a 2e 49  |DCD0:.sl%DCD0:.I|
0000bf70  69 25 44 43 44 30 3a 2e  5f 75 25 3a 5d 3a 50 25  |i%DCD0:._u%:]:P%|
0000bf80  2b 3d 31 36 3a 5b 4f 50  54 56 25 3a 2e 60 75 25  |+=16:[OPTV%:.`u%|
0000bf90  3a 5d 3a 50 25 2b 3d 32  35 36 3a 5b 4f 50 54 56  |:]:P%+=256:[OPTV|
0000bfa0  25 3a 2e 57 75 25 3a 5d  3a 50 25 2b 3d 79 5f 3a  |%:.Wu%:]:P%+=y_:|
0000bfb0  5b 4f 50 54 56 25 3a 2e  6e 75 25 3a 5d 3a 50 25  |[OPTV%:.nu%:]:P%|
0000bfc0  2b 3d 6c 5f 3a 5b 4f 50  54 56 25 3a 2e 76 6c 25  |+=l_:[OPTV%:.vl%|
0000bfd0  3a 5d 3a c8 99 26 34 30  30 65 63 2c 60 25 2c 2d  |:]:..&400ec,`%,-|
0000bfe0  31 3a f7 85 3a e1 0d 27  17 33 dd a4 44 79 3a ea  |1:..:..'.3..Dy:.|
0000bff0  55 5f 25 2c 4d 25 2c 4e  25 2c 46 25 2c 6f 69 25  |U_%,M%,N%,F%,oi%|
0000c000  3a c8 99 26 36 30 36 63  30 3a ea 85 3a ee 85 ea  |:..&606c0:..:...|
0000c010  f7 85 3a f2 65 5f 3a f2  51 0d 27 18 27 55 5f 25  |..:.e_:.Q.'.'U_%|
0000c020  3d b9 3a 4d 25 3d 58 5f  25 3a 4e 25 3d 59 5f 25  |=.:M%=X_%:N%=Y_%|
0000c030  3a e7 ac 28 a4 42 28 5a  25 2c 76 6c 25 29 29 8c  |:..(.B(Z%,vl%)).|
0000c040  0d 27 19 30 e3 4a 25 3d  30 b8 28 76 6c 25 2d 31  |.'.0.J%=0.(vl%-1|
0000c050  29 88 34 3a 5a 25 21 4a  25 3d 30 3a ed 4a 25 3a  |).4:Z%!J%=0:.J%:|
0000c060  6f 69 25 3d a4 75 28 64  79 25 29 3a c8 8e b9 ca  |oi%=.u(dy%):....|
0000c070  0d 27 1a 15 c9 a4 42 28  5a 25 21 73 79 25 2c 4d  |.'....B(Z%!sy%,M|
0000c080  25 2a 4e 25 29 0d 27 1b  18 c9 a4 42 28 5a 25 21  |%*N%).'....B(Z%!|
0000c090  67 5f 25 2c 4d 25 2a 4e  25 3c 3c 32 29 0d 27 1c  |g_%,M%*N%<<2).'.|
0000c0a0  1a c9 a4 42 28 5a 25 21  4a 79 25 2c 28 6f 79 25  |...B(Z%!Jy%,(oy%|
0000c0b0  2b 31 29 2a 6e 25 29 0d  27 1d 1a c9 a4 42 28 5a  |+1)*n%).'....B(Z|
0000c0c0  25 21 51 79 25 2c 6f 69  25 2a 31 36 2a 63 5f 25  |%!Qy%,oi%*16*c_%|
0000c0d0  29 0d 27 1e 27 c9 a4 42  28 5a 25 21 4f 75 25 2c  |).'.'..B(Z%!Ou%,|
0000c0e0  28 28 4d 25 2b 32 2b 33  31 29 3e 3e 35 29 2a 34  |((M%+2+31)>>5)*4|
0000c0f0  2a 28 4e 25 2b 32 29 29  0d 27 1f f4 7f 3a 5a 25  |*(N%+2)).'...:Z%|
0000c100  21 63 79 25 3d 5a 25 21  67 5f 25 3a 5a 25 21 69  |!cy%=Z%!g_%:Z%!i|
0000c110  5f 25 3d 5a 25 21 63 79  25 2b 28 28 4d 25 2a 4e  |_%=Z%!cy%+((M%*N|
0000c120  25 2b 33 29 80 2d 34 29  3a 5a 25 21 77 25 3d 58  |%+3).-4):Z%!w%=X|
0000c130  5f 25 3a 5a 25 21 78 25  3d 59 5f 25 3a 5a 25 21  |_%:Z%!x%=Y_%:Z%!|
0000c140  47 5f 25 3d 42 5f 25 3a  5a 25 21 71 79 25 3d 64  |G_%=B_%:Z%!qy%=d|
0000c150  79 25 3a 5a 25 21 4f 5f  25 3d 65 5f 25 3a 5a 25  |y%:Z%!O_%=e_%:Z%|
0000c160  21 48 5f 25 3d 66 5f 25  3a 5a 25 21 62 5f 25 3d  |!H_%=f_%:Z%!b_%=|
0000c170  6f 79 25 3a 5a 25 21 79  5f 25 3d 74 5f 25 3a 5a  |oy%:Z%!y_%=t_%:Z|
0000c180  25 21 51 5f 25 3d 61 5f  25 3a 5a 25 21 78 5f 25  |%!Q_%=a_%:Z%!x_%|
0000c190  3d 6d 5f 25 3a 5a 25 21  5f 79 25 3d 69 79 25 3a  |=m_%:Z%!_y%=iy%:|
0000c1a0  5a 25 21 75 4a 25 3d 72  4a 25 3a 5a 25 21 48 4a  |Z%!uJ%=rJ%:Z%!HJ|
0000c1b0  25 3d 6b 5f 25 3a 5a 25  21 43 4a 25 3d 45 4a 25  |%=k_%:Z%!CJ%=EJ%|
0000c1c0  3a 5a 25 21 54 5f 25 3d  41 75 25 3a 5a 25 21 72  |:Z%!T_%=Au%:Z%!r|
0000c1d0  5f 25 3d 5f 5f 25 3a 5a  25 21 52 4a 25 3d 6f 5f  |_%=__%:Z%!RJ%=o_|
0000c1e0  25 3a 5a 25 21 66 75 25  3d 53 75 25 0d 27 20 f7  |%:Z%!fu%=Su%.' .|
0000c1f0  5a 25 21 4e 4a 25 3d 78  4a 25 3a 5a 25 21 44 4a  |Z%!NJ%=xJ%:Z%!DJ|
0000c200  25 3d 6a 4a 25 3a 5a 25  21 60 5f 25 3d 65 4a 25  |%=jJ%:Z%!`_%=eJ%|
0000c210  3a 5a 25 21 47 4a 25 3d  70 4a 25 3a 5a 25 21 68  |:Z%!GJ%=pJ%:Z%!h|
0000c220  4a 25 3d 61 4a 25 3a 5a  25 21 62 4a 25 3d 5a 75  |J%=aJ%:Z%!bJ%=Zu|
0000c230  25 3a 46 25 3d 5a 25 2b  5f 75 25 3a 46 25 21 30  |%:F%=Z%+_u%:F%!0|
0000c240  3d 73 25 21 30 3a 46 25  21 34 3d 73 25 21 34 3a  |=s%!0:F%!4=s%!4:|
0000c250  46 25 21 38 3d 73 25 21  38 3a 46 25 21 31 32 3d  |F%!8=s%!8:F%!12=|
0000c260  73 25 21 31 32 3a 46 25  3d 5a 25 2b 65 25 3a 46  |s%!12:F%=Z%+e%:F|
0000c270  25 21 6b 4a 25 3d 74 4a  25 3a 46 25 21 4a 5f 25  |%!kJ%=tJ%:F%!J_%|
0000c280  3d 49 4a 25 3a 46 25 21  6b 79 25 3d 54 4a 25 3a  |=IJ%:F%!ky%=TJ%:|
0000c290  46 25 21 67 79 25 3d 46  4a 25 3a 46 25 21 75 5f  |F%!gy%=FJ%:F%!u_|
0000c2a0  25 3d 58 4a 25 3a 46 25  21 62 79 25 3d 50 4a 25  |%=XJ%:F%!by%=PJ%|
0000c2b0  3a 46 25 21 54 6c 25 3d  70 6c 25 3a 55 25 3d a4  |:F%!Tl%=pl%:U%=.|
0000c2c0  4d 28 31 32 38 29 3a 21  55 25 3d 72 79 25 3a 55  |M(128):!U%=ry%:U|
0000c2d0  25 21 34 3d 6e 75 3a c8  99 26 34 30 30 63 65 2c  |%!4=nu:..&400ce,|
0000c2e0  2c 55 25 0d 27 21 66 46  25 3d 5a 25 2b 7a 75 25  |,U%.'!fF%=Z%+zu%|
0000c2f0  3a 46 25 21 30 3d 55 25  21 38 3a 46 25 21 34 3d  |:F%!0=U%!8:F%!4=|
0000c300  55 25 21 31 32 3a 46 25  21 38 3d 55 25 21 31 36  |U%!12:F%!8=U%!16|
0000c310  3a 46 25 21 31 32 3d 55  25 21 32 30 3a f2 43 28  |:F%!12=U%!20:.C(|
0000c320  55 25 2c 31 32 38 29 3a  f2 4f 28 5a 25 2b 57 75  |U%,128):.O(Z%+Wu|
0000c330  25 2c 57 24 29 3a 46 25  3d a4 58 28 22 42 6f 61  |%,W$):F%=.X("Boa|
0000c340  72 64 22 29 3a e7 46 25  8c 0d 27 22 58 46 25 2b  |rd"):.F%..'"XF%+|
0000c350  3d 6d 3a 46 25 3f 33 34  3d 5a 25 21 52 4a 25 3a  |=m:F%?34=Z%!RJ%:|
0000c360  46 25 3f 33 35 3d 5a 25  21 72 5f 25 3a 5a 25 21  |F%?35=Z%!r_%:Z%!|
0000c370  7a 25 3d a4 67 28 22 42  6f 61 72 64 22 2c 2b 34  |z%=.g("Board",+4|
0000c380  38 2c 2d 34 38 29 3a 5a  25 21 6f 25 3d a4 67 28  |8,-48):Z%!o%=.g(|
0000c390  22 53 74 61 74 75 73 22  2c 2b 34 38 2c 2d 34 38  |"Status",+48,-48|
0000c3a0  29 0d 27 23 1b cd 3a e7  28 5a 25 21 7a 25 3d 30  |).'#..:.(Z%!z%=0|
0000c3b0  29 84 28 5a 25 21 6f 25  3d 30 29 8c 0d 27 24 17  |).(Z%!o%=0)..'$.|
0000c3c0  f2 46 28 56 79 25 2c a4  43 28 33 29 29 3a 55 5f  |.F(Vy%,.C(3)):U_|
0000c3d0  25 3d b9 0d 27 25 62 cc  3a 5a 25 21 43 5f 25 3d  |%=..'%b.:Z%!C_%=|
0000c3e0  30 3a 5a 25 21 59 79 25  3d 5a 25 21 51 79 25 3a  |0:Z%!Yy%=Z%!Qy%:|
0000c3f0  5a 25 21 76 5f 25 3d 21  78 79 25 3a 21 78 79 25  |Z%!v_%=!xy%:!xy%|
0000c400  3d 5a 25 3a f2 47 28 5a  25 29 3a 5a 25 21 71 25  |=Z%:.G(Z%):Z%!q%|
0000c410  3d 5f 3a f2 70 79 28 5a  25 21 7a 25 2c a4 63 28  |=_:.py(Z%!z%,.c(|
0000c420  5a 25 2c 22 42 6f 61 72  64 22 29 29 3a f2 70 3a  |Z%,"Board")):.p:|
0000c430  55 5f 25 3d a3 0d 27 26  05 cd 0d 27 27 05 cb 0d  |U_%=..'&...''...|
0000c440  27 28 13 cd 3a e7 55 5f  25 80 28 5a 25 3c 3e 30  |'(..:.U_%.(Z%<>0|
0000c450  29 8c 0d 27 29 06 f2 63  0d 27 2a 16 cd 3a c8 99  |)..')..c.'*..:..|
0000c460  26 36 30 36 63 31 3a f7  85 3a 3d 55 5f 25 0d 27  |&606c1:..:=U_%.'|
0000c470  2b 19 dd f2 65 5f 3a c8  99 26 36 30 36 63 31 3a  |+...e_:..&606c1:|
0000c480  f2 63 3a f2 51 3a e1 0d  27 2c 68 dd a4 63 28 46  |.c:.Q:..',h..c(F|
0000c490  25 2c 61 24 29 3a ea 44  25 2c 41 25 2c 42 25 2c  |%,a$):.D%,A%,B%,|
0000c4a0  43 25 3a 44 25 3d a4 4d  28 35 31 32 29 3a f2 51  |C%:D%=.M(512):.Q|
0000c4b0  4a 28 61 24 2c 44 25 29  3a 41 25 3d 46 25 3a 42  |J(a$,D%):A%=F%:B|
0000c4c0  25 3d 44 25 3a 43 25 3d  44 25 2b 32 35 36 3a d6  |%=D%:C%=D%+256:.|
0000c4d0  62 69 3a 61 24 3d a4 4e  28 44 25 2b 32 35 36 29  |bi:a$=.N(D%+256)|
0000c4e0  3a f2 43 28 44 25 2c 35  31 32 29 3a 3d 61 24 0d  |:.C(D%,512):=a$.|
0000c4f0  27 2d 13 dd f2 63 3a ea  44 25 3a e7 5a 25 3c 3e  |'-...c:.D%:.Z%<>|
0000c500  30 8c 0d 27 2e 2e 44 25  3d 78 79 25 3a c8 95 21  |0..'..D%=xy%:..!|
0000c510  44 25 3c 3e 30 80 21 44  25 3c 3e 5a 25 3a 44 25  |D%<>0.!D%<>Z%:D%|
0000c520  3d 21 44 25 2b 76 5f 25  3a ce 3a e7 21 44 25 8c  |=!D%+v_%:.:.!D%.|
0000c530  0d 27 2f 17 21 44 25 3d  5a 25 21 76 5f 25 3a 5a  |.'/.!D%=Z%!v_%:Z|
0000c540  25 21 76 5f 25 3d 30 0d  27 30 64 cd 3a f2 65 28  |%!v_%=0.'0d.:.e(|
0000c550  5a 25 29 3a f2 52 28 5a  25 21 7a 25 29 3a f2 52  |Z%):.R(Z%!z%):.R|
0000c560  28 5a 25 21 6f 25 29 3a  f2 57 28 5a 25 21 73 79  |(Z%!o%):.W(Z%!sy|
0000c570  25 29 3a f2 57 28 5a 25  21 67 5f 25 29 3a f2 57  |%):.W(Z%!g_%):.W|
0000c580  28 5a 25 21 4a 79 25 29  3a f2 57 28 5a 25 21 51  |(Z%!Jy%):.W(Z%!Q|
0000c590  79 25 29 3a f2 57 28 5a  25 21 4f 75 25 29 3a f2  |y%):.W(Z%!Ou%):.|
0000c5a0  57 28 5a 25 29 3a f2 47  28 30 29 0d 27 31 07 cd  |W(Z%):.G(0).'1..|
0000c5b0  3a e1 0d 27 32 7e dd a4  75 28 4a 6c 25 29 3a ea  |:..'2~..u(Jl%):.|
0000c5c0  54 25 2c 6c 75 25 2c 50  75 25 2c 4d 25 2c 4e 25  |T%,lu%,Pu%,M%,N%|
0000c5d0  3a 4d 25 3d 50 25 28 5a  25 21 47 5f 25 29 3a 4e  |:M%=P%(Z%!G_%):N|
0000c5e0  25 3d 42 25 28 5a 25 21  47 5f 25 29 3a 6c 75 25  |%=B%(Z%!G_%):lu%|
0000c5f0  3d a4 53 28 4d 25 2c 4e  25 29 3a 50 75 25 3d a4  |=.S(M%,N%):Pu%=.|
0000c600  50 28 4d 25 2c 4e 25 29  3a 54 25 3d a4 58 79 28  |P(M%,N%):T%=.Xy(|
0000c610  4a 6c 25 2c 50 75 25 2c  6c 75 25 29 3a e7 28 4a  |Jl%,Pu%,lu%):.(J|
0000c620  6c 25 3e 30 29 80 28 4a  6c 25 3c 50 75 25 29 8c  |l%>0).(Jl%<Pu%).|
0000c630  0d 27 33 0a 54 25 3d 4a  6c 25 0d 27 34 09 cd 3a  |.'3.T%=Jl%.'4..:|
0000c640  3d 54 25 0d 27 35 20 dd  a4 58 79 28 4c 61 25 2c  |=T%.'5 ..Xy(La%,|
0000c650  50 75 25 2c 6c 75 25 29  3a ea 54 25 3a c8 8e 4c  |Pu%,lu%):.T%:..L|
0000c660  61 25 ca 0d 27 36 0e c9  2d 31 3a 54 25 3d 50 75  |a%..'6..-1:T%=Pu|
0000c670  25 0d 27 37 0d c9 30 3a  54 25 3d 6c 75 25 0d 27  |%.'7..0:T%=lu%.'|
0000c680  38 1c 7f 3a 54 25 3d a4  50 28 a4 53 28 4c 61 25  |8..:T%=.P(.S(La%|
0000c690  2c 50 75 25 29 2c 6c 75  25 29 0d 27 39 09 cb 3a  |,Pu%),lu%).'9..:|
0000c6a0  3d 54 25 0d 27 3a 50 dd  a4 49 28 4d 25 29 3a ea  |=T%.':P..I(M%):.|
0000c6b0  59 25 2c 46 25 3a 46 25  3d 21 78 79 25 3a 59 25  |Y%,F%:F%=!xy%:Y%|
0000c6c0  3d b9 3a c8 95 46 25 80  59 25 3a 59 25 3d 28 4d  |=.:..F%.Y%:Y%=(M|
0000c6d0  25 3c 3e 46 25 21 7a 25  29 80 28 4d 25 3c 3e 46  |%<>F%!z%).(M%<>F|
0000c6e0  25 21 6f 25 29 3a e7 59  25 8c 46 25 3d 46 25 21  |%!o%):.Y%.F%=F%!|
0000c6f0  76 5f 25 0d 27 3b 0c ce  3a e7 59 25 3d 30 8c 0d  |v_%.';..:.Y%=0..|
0000c700  27 3c 22 f2 47 28 46 25  29 3a e7 4d 25 3d 5a 25  |'<".G(F%):.M%=Z%|
0000c710  21 7a 25 8c 4d 25 3d 41  5f 25 8b 4d 25 3d 74 79  |!z%.M%=A_%.M%=ty|
0000c720  25 0d 27 3d 09 cd 3a 3d  4d 25 0d 27 3e 51 dd a4  |%.'=..:=M%.'>Q..|
0000c730  59 79 28 4d 25 29 3a ea  59 25 2c 46 25 3a 46 25  |Yy(M%):.Y%,F%:F%|
0000c740  3d 21 78 79 25 3a 59 25  3d b9 3a c8 95 46 25 80  |=!xy%:Y%=.:..F%.|
0000c750  59 25 3a 59 25 3d 28 4d  25 3c 3e 46 25 21 7a 25  |Y%:Y%=(M%<>F%!z%|
0000c760  29 80 28 4d 25 3c 3e 46  25 21 6f 25 29 3a e7 59  |).(M%<>F%!o%):.Y|
0000c770  25 8c 46 25 3d 46 25 21  76 5f 25 0d 27 3f 0c ce  |%.F%=F%!v_%.'?..|
0000c780  3a e7 59 25 3d 30 8c 0d  27 40 22 f2 47 28 46 25  |:.Y%=0..'@".G(F%|
0000c790  29 3a e7 4d 25 3d 5a 25  21 7a 25 8c 4d 25 3d 41  |):.M%=Z%!z%.M%=A|
0000c7a0  5f 25 8b 4d 25 3d 74 79  25 0d 27 41 09 cd 3a 3d  |_%.M%=ty%.'A..:=|
0000c7b0  4d 25 0d 27 42 1a dd f2  47 28 46 25 29 3a 5a 25  |M%.'B...G(F%):Z%|
0000c7c0  3d 46 25 3a 21 53 5f 3d  5a 25 3a e1 0d 27 43 3f  |=F%:!S_=Z%:..'C?|
0000c7d0  dd a4 60 3a ea 59 25 2c  46 25 3a 46 25 3d 21 78  |..`:.Y%,F%:F%=!x|
0000c7e0  79 25 3a 59 25 3d b9 3a  c8 95 46 25 80 59 25 3a  |y%:Y%=.:..F%.Y%:|
0000c7f0  59 25 3d 28 46 25 21 71  25 3c 3e 6f 29 3a e7 59  |Y%=(F%!q%<>o):.Y|
0000c800  25 8c 46 25 3d 46 25 21  76 5f 25 0d 27 44 0c ce  |%.F%=F%!v_%.'D..|
0000c810  3a e7 59 25 3d 30 8c 0d  27 45 0a f2 47 28 46 25  |:.Y%=0..'E..G(F%|
0000c820  29 0d 27 46 0d cd 3a 3d  28 59 25 3d 30 29 0d 27  |).'F..:=(Y%=0).'|
0000c830  47 83 dd f2 65 28 46 25  29 3a f2 48 28 22 44 65  |G...e(F%):.H("De|
0000c840  6d 6f 22 2c 46 25 29 3a  f2 48 28 22 43 65 6e 74  |mo",F%):.H("Cent|
0000c850  72 65 22 2c 46 25 29 3a  f2 48 28 22 4d 6f 76 65  |re",F%):.H("Move|
0000c860  22 2c 46 25 29 3a f2 48  28 22 48 69 67 68 6c 69  |",F%):.H("Highli|
0000c870  67 68 74 22 2c 46 25 29  3a f2 48 28 22 48 69 67  |ght",F%):.H("Hig|
0000c880  68 6c 69 67 68 74 5f 41  74 5f 53 74 61 72 74 22  |hlight_At_Start"|
0000c890  2c 46 25 29 3a 46 25 21  68 5f 25 3d a3 3a 46 25  |,F%):F%!h_%=.:F%|
0000c8a0  3d 46 25 2b 65 25 3a 46  25 21 4b 79 25 3d 30 3a  |=F%+e%:F%!Ky%=0:|
0000c8b0  e1 0d 27 48 39 dd a4 5f  4e 75 6c 6c 5f 52 65 61  |..'H9.._Null_Rea|
0000c8c0  73 6f 6e 5f 48 69 67 68  6c 69 67 68 74 5f 41 74  |son_Highlight_At|
0000c8d0  5f 53 74 61 72 74 28 41  25 29 3a f2 47 28 41 25  |_Start(A%):.G(A%|
0000c8e0  29 3a e7 5a 25 21 44 4a  25 8c 0d 27 49 13 f2 44  |):.Z%!DJ%..'I..D|
0000c8f0  28 22 43 65 6e 74 72 65  22 2c 5a 25 29 0d 27 4a  |("Centre",Z%).'J|
0000c900  0e cd 3a e7 5a 25 21 62  4a 25 8c 0d 27 4b 1f 5a  |..:.Z%!bJ%..'K.Z|
0000c910  25 21 71 25 3d 48 79 3a  f2 77 28 5a 25 21 74 25  |%!q%=Hy:.w(Z%!t%|
0000c920  2c 5a 25 21 41 79 25 2c  30 29 0d 27 4c 14 cc 3a  |,Z%!Ay%,0).'L..:|
0000c930  5a 25 21 71 25 3d 5f 3a  f2 67 3a f2 55 79 0d 27  |Z%!q%=_:.g:.Uy.'|
0000c940  4d 0e cd 3a e7 5a 25 21  4c 5f 25 8c 0d 27 4e 27  |M..:.Z%!L_%..'N'|
0000c950  f2 79 28 22 48 69 67 68  6c 69 67 68 74 5f 41 74  |.y("Highlight_At|
0000c960  5f 53 74 61 72 74 22 2c  5a 25 29 3a f2 56 3a 41  |_Start",Z%):.V:A|
0000c970  25 3d a3 0d 27 4f 0a cc  3a 41 25 3d b9 0d 27 50  |%=..'O..:A%=..'P|
0000c980  09 cd 3a 3d 41 25 0d 27  51 10 dd f2 64 3a c8 8e  |..:=A%.'Q...d:..|
0000c990  5a 25 21 71 25 ca 0d 27  52 28 c9 5f 2c 57 79 3a  |Z%!q%..'R(._,Wy:|
0000c9a0  f2 49 3a 5a 25 21 71 25  3d 57 79 3a f2 77 28 5a  |.I:Z%!q%=Wy:.w(Z|
0000c9b0  25 21 74 25 2c 5a 25 21  41 79 25 2c 30 29 0d 27  |%!t%,Z%!Ay%,0).'|
0000c9c0  53 08 7f 3a ef 37 0d 27  54 07 cb 3a e1 0d 27 55  |S..:.7.'T..:..'U|
0000c9d0  44 dd f2 77 28 56 69 25  2c 48 69 25 2c 44 69 25  |D..w(Vi%,Hi%,Di%|
0000c9e0  29 3a ea 46 25 2c 4e 25  2c 47 79 25 2c 6b 79 2c  |):.F%,N%,Gy%,ky,|
0000c9f0  65 79 3a ea 85 3a ee 85  ea f7 85 3a f2 41 28 22  |ey:..:.....:.A("|
0000ca00  48 69 67 68 6c 69 67 68  74 5f 42 6f 61 72 64 22  |Highlight_Board"|
0000ca10  29 0d 27 56 0a c8 8e 44  69 25 ca 0d 27 57 7a c9  |).'V...Di%..'Wz.|
0000ca20  30 3a 4e 25 3d a4 53 28  94 28 5a 25 21 77 25 2d  |0:N%=.S(.(Z%!w%-|
0000ca30  56 69 25 29 2c 56 69 25  29 3a 47 79 25 3d a4 53  |Vi%),Vi%):Gy%=.S|
0000ca40  28 94 28 5a 25 21 78 25  2d 48 69 25 29 2c 48 69  |(.(Z%!x%-Hi%),Hi|
0000ca50  25 29 3a 6b 79 3d a4 53  28 4e 25 2a 5a 25 21 43  |%):ky=.S(N%*Z%!C|
0000ca60  79 25 2c 47 79 25 2a 5a  25 21 76 79 25 29 3a 6b  |y%,Gy%*Z%!vy%):k|
0000ca70  79 3d a4 50 28 31 36 33  38 33 2c 6b 79 29 3a 65  |y=.P(16383,ky):e|
0000ca80  79 3d a4 50 28 5a 25 21  43 79 25 2c 5a 25 21 76  |y=.P(Z%!Cy%,Z%!v|
0000ca90  79 25 29 2f 34 0d 27 58  46 7f 3a 6b 79 3d a4 50  |y%)/4.'XF.:ky=.P|
0000caa0  28 5a 25 21 43 79 25 2c  5a 25 21 76 79 25 29 2f  |(Z%!Cy%,Z%!vy%)/|
0000cab0  35 3a 65 79 3d a4 53 28  5a 25 21 43 79 25 2c 5a  |5:ey=.S(Z%!Cy%,Z|
0000cac0  25 21 76 79 25 29 2a b6  28 32 29 3a 65 79 3d a4  |%!vy%)*.(2):ey=.|
0000cad0  50 28 31 36 33 38 33 2c  65 79 29 0d 27 59 7a cb  |P(16383,ey).'Yz.|
0000cae0  3a 46 25 3d 5a 25 2b 65  25 3a 46 25 21 50 6c 25  |:F%=Z%+e%:F%!Pl%|
0000caf0  3d 56 69 25 3a 46 25 21  74 6c 25 3d 48 69 25 3a  |=Vi%:F%!tl%=Hi%:|
0000cb00  46 25 21 4b 79 25 3d 46  25 21 4a 5f 25 2b 46 25  |F%!Ky%=F%!J_%+F%|
0000cb10  21 6b 79 25 3a 46 25 21  44 61 25 3d 65 79 2a 28  |!ky%:F%!Da%=ey*(|
0000cb20  31 3c 3c 31 36 29 3a 46  25 21 6e 6c 25 3d 28 28  |1<<16):F%!nl%=((|
0000cb30  6b 79 2d 65 79 29 2f 28  46 25 21 4a 5f 25 29 29  |ky-ey)/(F%!J_%))|
0000cb40  2a 28 31 3c 3c 31 36 29  3a f2 78 75 3a e7 5a 25  |*(1<<16):.xu:.Z%|
0000cb50  21 54 5f 25 8c 0d 27 5a  16 f2 44 28 22 48 69 67  |!T_%..'Z..D("Hig|
0000cb60  68 6c 69 67 68 74 22 2c  5a 25 29 0d 27 5b 24 cc  |hlight",Z%).'[$.|
0000cb70  3a f5 3a fd a4 5f 4e 75  6c 6c 5f 52 65 61 73 6f  |:.:.._Null_Reaso|
0000cb80  6e 5f 48 69 67 68 6c 69  67 68 74 28 5a 25 29 0d  |n_Highlight(Z%).|
0000cb90  27 5c 07 cd 3a e1 0d 27  5d 70 dd f2 78 75 3a ea  |'\..:..']p..xu:.|
0000cba0  79 75 2c 72 4a 2c 6f 69  2c 46 25 3a 46 25 3d 5a  |yu,rJ,oi,F%:F%=Z|
0000cbb0  25 2b 65 25 3a 79 75 3d  46 25 21 67 79 25 2f 32  |%+e%:yu=F%!gy%/2|
0000cbc0  35 36 3a 72 4a 3d 46 25  21 75 5f 25 2f 32 35 36  |56:rJ=F%!u_%/256|
0000cbd0  3a 6f 69 3d 46 25 21 62  79 25 2f 32 35 36 3a 46  |:oi=F%!by%/256:F|
0000cbe0  25 21 52 6c 25 3d 30 2e  35 2b 32 35 36 2a 28 31  |%!Rl%=0.5+256*(1|
0000cbf0  2b 28 32 2a 28 31 2d 6f  69 29 2f 28 72 4a 2d 79  |+(2*(1-oi)/(rJ-y|
0000cc00  75 29 29 29 3a e1 0d 27  5e 35 dd a4 5f 4e 75 6c  |u))):..'^5.._Nul|
0000cc10  6c 5f 52 65 61 73 6f 6e  5f 48 69 67 68 6c 69 67  |l_Reason_Highlig|
0000cc20  68 74 28 41 25 29 3a f2  47 28 41 25 29 3a 41 25  |ht(A%):.G(A%):A%|
0000cc30  3d ba 28 71 69 29 3a e7  41 25 8c 0d 27 5f 1a 41  |=.(qi):.A%..'_.A|
0000cc40  25 3d 5a 25 21 71 25 3a  5a 25 21 71 25 3d 5f 3a  |%=Z%!q%:Z%!q%=_:|
0000cc50  c8 8e 41 25 ca 0d 27 60  0b c9 52 5f 3a f2 63 5f  |..A%..'`..R_:.c_|
0000cc60  0d 27 61 0b c9 5f 4a 3a  f2 68 4a 0d 27 62 0e c9  |.'a.._J:.hJ.'b..|
0000cc70  48 79 3a f2 67 3a f2 55  79 0d 27 63 05 cb 0d 27  |Hy:.g:.Uy.'c...'|
0000cc80  64 09 cd 3a 3d 41 25 0d  27 65 12 dd f2 49 3a e7  |d..:=A%.'e...I:.|
0000cc90  5a 25 21 71 25 3d 57 79  8c 0d 27 66 22 d6 70 4a  |Z%!q%=Wy..'f".pJ|
0000cca0  3a f2 79 28 22 48 69 67  68 6c 69 67 68 74 22 2c  |:.y("Highlight",|
0000ccb0  5a 25 29 3a 5a 25 21 71  25 3d 5f 0d 27 67 07 cd  |Z%):Z%!q%=_.'g..|
0000ccc0  3a e1 0d 27 68 14 dd f2  4c 4a 28 44 79 25 29 3a  |:..'h...LJ(Dy%):|
0000ccd0  c8 8e 44 79 25 ca 0d 27  69 0a c9 2d 31 3a f2 64  |..Dy%..'i..-1:.d|
0000cce0  0d 27 6a 0b c9 4f 75 3a  f2 74 79 0d 27 6b 07 c9  |.'j..Ou:.ty.'k..|
0000ccf0  71 4a 0d 27 6c 07 c9 4e  4a 0d 27 6d 12 7f 3a f2  |qJ.'l..NJ.'m..:.|
0000cd00  49 3a e7 44 79 25 3e 3d  44 5f 8c 0d 27 6e 1e 74  |I:.Dy%>=D_..'n.t|
0000cd10  4a 25 3d 44 79 25 2d 44  5f 3a 5a 25 21 28 65 25  |J%=Dy%-D_:Z%!(e%|
0000cd20  2b 6b 4a 25 29 3d 74 4a  25 0d 27 6f 08 cd 3a f2  |+kJ%)=tJ%.'o..:.|
0000cd30  64 0d 27 70 07 cb 3a e1  0d 27 71 24 dd f2 74 79  |d.'p..:..'q$..ty|
0000cd40  3a 5a 75 25 3d 28 5a 25  21 62 4a 25 3d 30 29 3a  |:Zu%=(Z%!bJ%=0):|
0000cd50  5a 25 21 62 4a 25 3d 5a  75 25 3a e1 0d 27 72 40  |Z%!bJ%=Zu%:..'r@|
0000cd60  dd f2 48 4a 3a ea 4d 2c  53 2c 52 2c 57 2c 50 2c  |..HJ:.M,S,R,W,P,|
0000cd70  73 2c 48 2c 7a 2c 4e 2c  4c 3a ea 44 4a 2c 45 79  |s,H,z,N,L:.DJ,Ey|
0000cd80  2c 72 5f 3a ea 85 3a ee  85 ea f7 85 3a f2 41 28  |,r_:..:.....:.A(|
0000cd90  22 48 69 67 68 6c 69 67  68 74 22 29 0d 27 73 f8  |"Highlight").'s.|
0000cda0  4d 3d 34 3a 53 3d 35 3a  52 3d 36 3a 57 3d 37 3a  |M=4:S=5:R=6:W=7:|
0000cdb0  50 3d 38 3a 73 3d 33 3a  48 3d 39 3a 7a 3d 31 32  |P=8:s=3:H=9:z=12|
0000cdc0  3a 4e 3d 32 3a 4c 3d 73  3a 44 4a 3d 30 3a 45 79  |:N=2:L=s:DJ=0:Ey|
0000cdd0  3d 61 75 25 3a 72 5f 3d  45 79 2b 34 3a 5b 4f 50  |=au%:r_=Ey+4:[OP|
0000cde0  54 56 25 3a 41 4c 49 47  4e 3a 2e 71 69 3a a4 5a  |TV%:ALIGN:.qi:.Z|
0000cdf0  3a 53 54 4d 46 44 28 41  29 21 2c 7b 34 2d 39 2c  |:STMFD(A)!,{4-9,|
0000ce00  31 32 2c 5a 7d 3a 53 55  42 20 41 2c 41 2c 23 32  |12,Z}:SUB A,A,#2|
0000ce10  35 36 3a 42 4c 20 72 3a  4c 44 52 30 2c 5b 31 32  |56:BL r:LDR0,[12|
0000ce20  2c 23 7a 25 5d 3a 53 54  52 30 2c 5b 41 5d 3a 42  |,#z%]:STR0,[A]:B|
0000ce30  4c 20 50 5f 3a 53 54 52  30 2c 5b 41 2c 23 34 5d  |L P_:STR0,[A,#4]|
0000ce40  3a 42 4c 20 70 79 3a 53  55 42 31 2c 31 2c 30 3a  |:BL py:SUB1,1,0:|
0000ce50  53 55 42 33 2c 33 2c 30  3a 41 44 44 30 2c 41 2c  |SUB3,3,0:ADD0,A,|
0000ce60  23 34 3a 53 54 4d 49 42  30 2c 7b 31 2d 33 7d 3a  |#4:STMIB0,{1-3}:|
0000ce70  4d 4f 56 31 2c 41 3a 53  57 49 20 26 34 30 30 63  |MOV1,A:SWI &400c|
0000ce80  39 3a 42 4c 20 51 79 3a  41 44 44 31 2c 31 32 2c  |9:BL Qy:ADD1,12,|
0000ce90  23 65 79 25 0d 27 74 fd  4c 44 4d 49 41 31 2c 7b  |#ey%.'t.LDMIA1,{|
0000cea0  31 2d 32 7d 3a 41 44 44  20 4d 2c 4d 2c 31 3a 41  |1-2}:ADD M,M,1:A|
0000ceb0  44 44 20 53 2c 53 2c 32  3a 2e 43 20 54 45 51 30  |DD S,S,2:.C TEQ0|
0000cec0  2c 23 30 3a 41 44 44 6e  65 30 2c 31 32 2c 23 65  |,#0:ADDne0,12,#e|
0000ced0  25 3a 4c 44 52 6e 65 20  50 2c 5b 30 2c 23 4b 79  |%:LDRne P,[0,#Ky|
0000cee0  25 5d 3a 42 4c 6e 65 20  73 69 3a 4d 4f 56 6e 65  |%]:BLne si:MOVne|
0000cef0  31 2c 41 3a 53 57 49 6e  65 20 26 34 30 30 63 61  |1,A:SWIne &400ca|
0000cf00  3a 42 6e 65 20 43 3a 41  44 44 31 2c 31 32 2c 23  |:Bne C:ADD1,12,#|
0000cf10  65 25 3a 4c 44 52 30 2c  5b 31 2c 23 4b 79 25 5d  |e%:LDR0,[1,#Ky%]|
0000cf20  3a 53 55 42 53 30 2c 30  2c 23 31 3a 4d 4f 56 6c  |:SUBS0,0,#1:MOVl|
0000cf30  65 30 2c 23 30 3a 53 54  52 30 2c 5b 31 2c 23 4b  |e0,#0:STR0,[1,#K|
0000cf40  79 25 5d 3a 4d 56 4e 6c  65 30 2c 23 ac 28 2d 31  |y%]:MVNle0,#.(-1|
0000cf50  29 3a 4d 4f 56 67 74 30  2c 23 30 3a 41 44 44 20  |):MOVgt0,#0:ADD |
0000cf60  41 2c 41 2c 23 32 35 36  3a 4c 44 4d 46 44 28 41  |A,A,#256:LDMFD(A|
0000cf70  29 21 2c 7b 34 2d 39 2c  31 32 2c 70 63 7d 5e 3a  |)!,{4-9,12,pc}^:|
0000cf80  2e 50 5f 3a 53 54 4d 46  44 28 41 29 21 2c 7b 5a  |.P_:STMFD(A)!,{Z|
0000cf90  7d 0d 27 75 f8 41 44 44  31 31 2c 31 32 2c 23 65  |}.'u.ADD11,12,#e|
0000cfa0  25 3a 41 44 44 20 4d 2c  31 31 2c 23 50 6c 25 3a  |%:ADD M,11,#Pl%:|
0000cfb0  4c 44 4d 49 41 20 4d 2c  7b 4d 2c 53 7d 3a 41 44  |LDMIA M,{M,S}:AD|
0000cfc0  44 30 2c 31 32 2c 23 43  79 25 3a 4c 44 4d 49 41  |D0,12,#Cy%:LDMIA|
0000cfd0  30 2c 7b 30 2d 31 7d 3a  4d 55 4c 20 4d 2c 30 2c  |0,{0-1}:MUL M,0,|
0000cfe0  4d 3a 41 44 44 20 4d 2c  4d 2c 30 2c 4c 53 52 23  |M:ADD M,M,0,LSR#|
0000cff0  31 3a 4d 55 4c 20 53 2c  31 2c 53 3a 41 44 44 20  |1:MUL S,1,S:ADD |
0000d000  53 2c 53 2c 31 2c 4c 53  52 23 31 3a 52 53 42 20  |S,S,1,LSR#1:RSB |
0000d010  53 2c 53 2c 23 30 3a 41  44 44 30 2c 31 31 2c 23  |S,S,#0:ADD0,11,#|
0000d020  4b 79 25 3a 4c 44 4d 49  41 30 2c 7b 30 2d 33 7d  |Ky%:LDMIA0,{0-3}|
0000d030  3a 43 4d 50 32 2c 23 30  3a 42 67 74 20 50 75 3a  |:CMP2,#0:Bgt Pu:|
0000d040  4c 44 52 31 2c 5b 31 31  2c 23 6b 79 25 5d 3a 53  |LDR1,[11,#ky%]:S|
0000d050  55 42 53 30 2c 30 2c 31  3a 4d 4f 56 6c 74 30 2c  |UBS0,0,1:MOVlt0,|
0000d060  23 30 3a 4d 4f 56 31 2c  30 3a 2e 50 75 3a 43 4d  |#0:MOV1,0:.Pu:CM|
0000d070  50 30 2c 31 3a 4d 4f 56  67 74 30 2c 31 3a 4d 4c  |P0,1:MOVgt0,1:ML|
0000d080  41 20 30 2c 32 2c 30 2c  33 0d 27 76 f9 4c 44 52  |A 0,2,0,3.'v.LDR|
0000d090  20 5a 2c 5b 31 31 2c 23  54 6c 25 5d 3a 41 44 44  | Z,[11,#Tl%]:ADD|
0000d0a0  30 2c 5a 2c 30 2c 4c 53  52 23 31 36 3a 41 44 44  |0,Z,0,LSR#16:ADD|
0000d0b0  33 2c 53 2c 30 3a 41 44  44 32 2c 4d 2c 30 3a 53  |3,S,0:ADD2,M,0:S|
0000d0c0  55 42 31 2c 53 2c 30 3a  53 55 42 30 2c 4d 2c 30  |UB1,S,0:SUB0,M,0|
0000d0d0  3a 4c 44 4d 46 44 28 41  29 21 2c 7b 70 63 7d 5e  |:LDMFD(A)!,{pc}^|
0000d0e0  3a 2e 73 69 3a 53 54 4d  46 44 28 41 29 21 2c 7b  |:.si:STMFD(A)!,{|
0000d0f0  50 2c 5a 7d 3a 41 44 44  30 2c 31 32 2c 23 65 25  |P,Z}:ADD0,12,#e%|
0000d100  3a 4c 44 52 30 2c 5b 30  2c 23 4a 5f 25 5d 3a 43  |:LDR0,[0,#J_%]:C|
0000d110  4d 50 20 50 2c 30 3a 42  4c 6c 65 20 4e 5f 3a 41  |MP P,0:BLle N_:A|
0000d120  44 44 30 2c 31 32 2c 23  65 25 3a 4c 44 52 30 2c  |DD0,12,#e%:LDR0,|
0000d130  5b 30 2c 23 6b 79 25 5d  3a 53 55 42 53 20 50 2c  |[0,#ky%]:SUBS P,|
0000d140  50 2c 30 3a 42 4c 67 74  20 4e 5f 3a 4c 44 4d 46  |P,0:BLgt N_:LDMF|
0000d150  44 28 41 29 21 2c 7b 50  2c 70 63 7d 5e 3a 2e 4e  |D(A)!,{P,pc}^:.N|
0000d160  5f 3a 53 54 4d 46 44 28  41 29 21 2c 7b 30 2d 31  |_:STMFD(A)!,{0-1|
0000d170  32 2c 5a 7d 3a 42 4c 20  4e 75 3a 54 45 51 30 2c  |2,Z}:BL Nu:TEQ0,|
0000d180  23 32 0d 27 77 fa 82 6e  65 30 2c 50 2c 50 2c 4c  |#2.'w..ne0,P,P,L|
0000d190  53 52 23 34 3a 82 6e 65  30 2c 30 2c 30 2c 4c 53  |SR#4:.ne0,0,0,LS|
0000d1a0  52 23 33 3a 80 6e 65 30  2c 30 2c 23 31 35 3a 41  |R#3:.ne0,0,#15:A|
0000d1b0  44 44 6e 65 30 2c 30 2c  23 33 3c 3c 34 3a 4d 4f  |DDne0,0,#3<<4:MO|
0000d1c0  56 65 71 30 2c 23 37 84  28 33 3c 3c 34 29 3a 53  |Veq0,#7.(3<<4):S|
0000d1d0  57 49 20 26 34 30 30 65  36 3a 41 44 44 31 31 2c  |WI &400e6:ADD11,|
0000d1e0  31 32 2c 23 65 25 3a 41  44 44 20 52 2c 31 31 2c  |12,#e%:ADD R,11,|
0000d1f0  23 6e 6c 25 3a 4c 44 4d  49 41 20 52 2c 7b 52 2c  |#nl%:LDMIA R,{R,|
0000d200  57 2c 5a 7d 3a 4d 4c 41  20 57 2c 52 2c 50 2c 57  |W,Z}:MLA W,R,P,W|
0000d210  3a 4d 4f 56 20 57 2c 57  2c 4c 53 52 23 31 36 3a  |:MOV W,W,LSR#16:|
0000d220  41 44 44 70 63 2c 70 63  2c 5a 2c 4c 53 4c 23 32  |ADDpc,pc,Z,LSL#2|
0000d230  3a 42 20 4d 79 3a 42 20  4c 69 3a 42 20 42 69 3a  |:B My:B Li:B Bi:|
0000d240  42 20 4a 69 3a 42 20 50  4a 3a 42 20 59 6c 3a 42  |B Ji:B PJ:B Yl:B|
0000d250  20 4f 6c 3a 42 20 43 69  3a 2e 4d 79 20 4c 44 4d  | Ol:B Ci:.My LDM|
0000d260  46 44 28 41 29 21 2c 7b  30 2d 31 32 2c 70 63 7d  |FD(A)!,{0-12,pc}|
0000d270  5e 3a 2e 64 79 a4 51 79  3a 2e 4c 69 0d 27 78 f8  |^:.dy.Qy:.Li.'x.|
0000d280  4d 4f 56 30 2c 23 36 38  3a 4d 4f 56 31 2c 4d 3a  |MOV0,#68:MOV1,M:|
0000d290  4d 4f 56 32 2c 53 3a 53  57 49 20 36 39 3a 4d 4f  |MOV2,S:SWI 69:MO|
0000d2a0  56 30 2c 23 31 34 35 3a  4d 4f 56 31 2c 57 3a 4d  |V0,#145:MOV1,W:M|
0000d2b0  4f 56 32 2c 23 30 3a 53  57 49 20 36 39 3a 42 20  |OV2,#0:SWI 69:B |
0000d2c0  4d 79 3a 2e 42 69 3a 4d  4f 56 30 2c 23 36 38 3a  |My:.Bi:MOV0,#68:|
0000d2d0  4d 4f 56 31 2c 4d 3a 4d  4f 56 32 2c 53 3a 53 57  |MOV1,M:MOV2,S:SW|
0000d2e0  49 20 36 39 3a a4 46 28  22 22 2c 73 2c 64 79 29  |I 69:.F("",s,dy)|
0000d2f0  3a 80 20 50 2c 50 2c 23  31 36 2d 31 3a 41 44 44  |:. P,P,#16-1:ADD|
0000d300  31 2c 73 2c 50 2c 4c 53  4c 23 33 3a 4c 44 4d 49  |1,s,P,LSL#3:LDMI|
0000d310  41 31 2c 7b 31 2d 32 7d  3a 4d 55 4c 20 31 2c 57  |A1,{1-2}:MUL 1,W|
0000d320  2c 31 3a 41 44 44 31 2c  4d 2c 31 2c 41 53 52 23  |,1:ADD1,M,1,ASR#|
0000d330  31 36 3a 4d 55 4c 20 32  2c 57 2c 32 3a 41 44 44  |16:MUL 2,W,2:ADD|
0000d340  32 2c 53 2c 32 2c 41 53  52 23 31 36 3a 4d 4f 56  |2,S,2,ASR#16:MOV|
0000d350  30 2c 23 36 38 3a 53 57  49 20 36 39 3a 41 44 44  |0,#68:SWI 69:ADD|
0000d360  20 50 2c 50 2c 23 31 33  3a 80 20 50 2c 50 2c 23  | P,P,#13:. P,P,#|
0000d370  31 36 2d 31 0d 27 79 fc  41 44 44 31 2c 73 2c 50  |16-1.'y.ADD1,s,P|
0000d380  2c 4c 53 4c 23 33 3a 4c  44 4d 49 41 31 2c 7b 31  |,LSL#3:LDMIA1,{1|
0000d390  2d 32 7d 3a 4d 55 4c 20  31 2c 57 2c 31 3a 41 44  |-2}:MUL 1,W,1:AD|
0000d3a0  44 31 2c 4d 2c 31 2c 41  53 52 23 31 36 3a 4d 55  |D1,M,1,ASR#16:MU|
0000d3b0  4c 20 32 2c 57 2c 32 3a  41 44 44 32 2c 53 2c 32  |L 2,W,2:ADD2,S,2|
0000d3c0  2c 41 53 52 23 31 36 3a  4d 4f 56 30 2c 23 31 36  |,ASR#16:MOV0,#16|
0000d3d0  35 3a 53 57 49 20 36 39  3a 42 20 4d 79 3a 2e 4a  |5:SWI 69:B My:.J|
0000d3e0  69 3a 4d 4f 56 30 2c 23  36 38 3a 4d 4f 56 31 2c  |i:MOV0,#68:MOV1,|
0000d3f0  4d 3a 4d 4f 56 32 2c 53  3a 53 57 49 20 36 39 3a  |M:MOV2,S:SWI 69:|
0000d400  a4 46 28 22 22 2c 73 2c  64 79 29 3a 80 20 50 2c  |.F("",s,dy):. P,|
0000d410  50 2c 23 31 36 2d 31 3a  41 44 44 31 2c 73 2c 50  |P,#16-1:ADD1,s,P|
0000d420  2c 4c 53 4c 23 33 3a 4c  44 4d 49 41 31 2c 7b 31  |,LSL#3:LDMIA1,{1|
0000d430  2d 32 7d 3a 4d 55 4c 20  31 2c 57 2c 31 3a 41 44  |-2}:MUL 1,W,1:AD|
0000d440  44 31 2c 4d 2c 31 2c 41  53 52 23 31 36 3a 4d 55  |D1,M,1,ASR#16:MU|
0000d450  4c 20 32 2c 57 2c 32 3a  41 44 44 32 2c 53 2c 32  |L 2,W,2:ADD2,S,2|
0000d460  2c 41 53 52 23 31 36 3a  4d 4f 56 30 2c 23 36 38  |,ASR#16:MOV0,#68|
0000d470  0d 27 7a fc 53 57 49 20  36 39 3a 41 44 44 20 50  |.'z.SWI 69:ADD P|
0000d480  2c 50 2c 23 33 3a 80 20  50 2c 50 2c 23 31 36 2d  |,P,#3:. P,P,#16-|
0000d490  31 3a 41 44 44 31 2c 73  2c 50 2c 4c 53 4c 23 33  |1:ADD1,s,P,LSL#3|
0000d4a0  3a 4c 44 4d 49 41 31 2c  7b 31 2d 32 7d 3a 4d 55  |:LDMIA1,{1-2}:MU|
0000d4b0  4c 20 31 2c 57 2c 31 3a  41 44 44 31 2c 4d 2c 31  |L 1,W,1:ADD1,M,1|
0000d4c0  2c 41 53 52 23 31 36 3a  4d 55 4c 20 32 2c 57 2c  |,ASR#16:MUL 2,W,|
0000d4d0  32 3a 41 44 44 32 2c 53  2c 32 2c 41 53 52 23 31  |2:ADD2,S,2,ASR#1|
0000d4e0  36 3a 4d 4f 56 30 2c 23  31 37 33 3a 53 57 49 20  |6:MOV0,#173:SWI |
0000d4f0  36 39 3a 42 20 4d 79 3a  2e 50 4a 3a 42 4c 20 69  |69:B My:.PJ:BL i|
0000d500  79 3a 41 44 44 20 50 2c  50 2c 23 31 36 2f 34 3a  |y:ADD P,P,#16/4:|
0000d510  42 4c 20 69 79 3a 41 44  44 20 50 2c 50 2c 23 31  |BL iy:ADD P,P,#1|
0000d520  36 2f 34 3a 42 4c 20 69  79 3a 41 44 44 20 50 2c  |6/4:BL iy:ADD P,|
0000d530  50 2c 23 31 36 2f 34 3a  42 4c 20 69 79 3a 42 20  |P,#16/4:BL iy:B |
0000d540  4d 79 3a 2e 69 79 3a a4  46 28 22 22 2c 73 2c 64  |My:.iy:.F("",s,d|
0000d550  79 29 3a 80 20 50 2c 50  2c 23 31 36 3a 41 44 44  |y):. P,P,#16:ADD|
0000d560  20 48 2c 73 2c 50 2c 4c  53 4c 23 33 0d 27 7b fa  | H,s,P,LSL#3.'{.|
0000d570  4c 44 4d 49 41 20 48 2c  7b 48 2c 7a 7d 3a 4d 55  |LDMIA H,{H,z}:MU|
0000d580  4c 20 30 2c 57 2c 48 3a  41 44 44 20 4d 2c 30 2c  |L 0,W,H:ADD M,0,|
0000d590  4d 2c 4c 53 4c 23 31 36  3a 4d 55 4c 20 30 2c 57  |M,LSL#16:MUL 0,W|
0000d5a0  2c 7a 3a 41 44 44 20 53  2c 30 2c 53 2c 4c 53 4c  |,z:ADD S,0,S,LSL|
0000d5b0  23 31 36 3a 4d 4f 56 30  2c 48 3a 42 4c 20 61 4a  |#16:MOV0,H:BL aJ|
0000d5c0  3a 4d 4f 56 20 48 2c 30  3a 4d 4f 56 30 2c 7a 3a  |:MOV H,0:MOV0,z:|
0000d5d0  42 4c 20 61 4a 3a 4d 4f  56 20 7a 2c 30 3a 4d 4f  |BL aJ:MOV z,0:MO|
0000d5e0  56 30 2c 23 36 38 3a 4c  44 52 20 4e 2c 5b 31 31  |V0,#68:LDR N,[11|
0000d5f0  2c 23 67 79 25 5d 3a 4d  4f 56 20 4e 2c 4e 2c 41  |,#gy%]:MOV N,N,A|
0000d600  53 52 23 31 3a 52 53 42  20 4e 2c 4e 2c 23 30 3a  |SR#1:RSB N,N,#0:|
0000d610  4d 4f 56 20 4c 2c 23 30  3a 42 4c 20 7a 79 3a 4d  |MOV L,#0:BL zy:M|
0000d620  4f 56 30 2c 23 36 38 3a  4c 44 52 20 4e 2c 5b 31  |OV0,#68:LDR N,[1|
0000d630  31 2c 23 67 79 25 5d 3a  4d 4f 56 20 4e 2c 4e 2c  |1,#gy%]:MOV N,N,|
0000d640  41 53 52 23 31 3a 52 53  42 20 4e 2c 4e 2c 23 30  |ASR#1:RSB N,N,#0|
0000d650  3a 4c 44 52 20 4c 2c 5b  31 31 2c 23 62 79 25 5d  |:LDR L,[11,#by%]|
0000d660  3a 42 4c 20 7a 79 0d 27  7c f7 4d 4f 56 30 2c 23  |:BL zy.'|.MOV0,#|
0000d670  31 31 37 3a 4c 44 52 20  4e 2c 5b 31 31 2c 23 67  |117:LDR N,[11,#g|
0000d680  79 25 5d 3a 4d 4f 56 20  4e 2c 4e 2c 41 53 52 23  |y%]:MOV N,N,ASR#|
0000d690  31 3a 4c 44 52 20 4c 2c  5b 31 31 2c 23 62 79 25  |1:LDR L,[11,#by%|
0000d6a0  5d 3a 42 4c 20 7a 79 3a  4d 4f 56 30 2c 23 36 38  |]:BL zy:MOV0,#68|
0000d6b0  3a 4c 44 52 20 4e 2c 5b  31 31 2c 23 75 5f 25 5d  |:LDR N,[11,#u_%]|
0000d6c0  3a 4d 4f 56 20 4e 2c 4e  2c 41 53 52 23 31 3a 52  |:MOV N,N,ASR#1:R|
0000d6d0  53 42 20 4e 2c 4e 2c 23  30 3a 4c 44 52 20 4c 2c  |SB N,N,#0:LDR L,|
0000d6e0  5b 31 31 2c 23 62 79 25  5d 3a 42 4c 20 7a 79 3a  |[11,#by%]:BL zy:|
0000d6f0  4d 4f 56 30 2c 23 36 38  3a 4c 44 52 20 4e 2c 5b  |MOV0,#68:LDR N,[|
0000d700  31 31 2c 23 67 79 25 5d  3a 4d 4f 56 20 4e 2c 4e  |11,#gy%]:MOV N,N|
0000d710  2c 41 53 52 23 31 3a 4c  44 52 20 4c 2c 5b 31 31  |,ASR#1:LDR L,[11|
0000d720  2c 23 62 79 25 5d 3a 42  4c 20 7a 79 3a 4d 4f 56  |,#by%]:BL zy:MOV|
0000d730  30 2c 23 38 35 3a 4d 4f  56 20 4e 2c 23 30 3a 4c  |0,#85:MOV N,#0:L|
0000d740  44 52 20 4c 2c 5b 31 31  2c 23 52 6c 25 5d 3a 42  |DR L,[11,#Rl%]:B|
0000d750  4c 20 7a 79 3a 42 20 4d  79 3a 2e 61 4a 0d 27 7d  |L zy:B My:.aJ.'}|
0000d760  f6 53 54 4d 46 44 28 41  29 21 2c 7b 31 31 2c 5a  |.STMFD(A)!,{11,Z|
0000d770  7d 3a 4d 4f 56 31 2c 52  3a 4d 4f 56 32 2c 23 31  |}:MOV1,R:MOV2,#1|
0000d780  3c 3c 32 34 3a 42 4c 20  41 6c 3a 4c 44 4d 46 44  |<<24:BL Al:LDMFD|
0000d790  28 41 29 21 2c 7b 31 31  2c 70 63 7d 5e 3a 2e 59  |(A)!,{11,pc}^:.Y|
0000d7a0  6c 3a 4d 4f 56 30 2c 23  36 38 3a 53 55 42 31 2c  |l:MOV0,#68:SUB1,|
0000d7b0  4d 2c 57 3a 53 55 42 32  2c 53 2c 57 3a 53 57 49  |M,W:SUB2,S,W:SWI|
0000d7c0  20 36 39 3a 4d 4f 56 30  2c 23 35 3a 41 44 44 31  | 69:MOV0,#5:ADD1|
0000d7d0  2c 4d 2c 57 3a 53 55 42  32 2c 53 2c 57 3a 53 57  |,M,W:SUB2,S,W:SW|
0000d7e0  49 20 36 39 3a 4d 4f 56  30 2c 23 33 37 3a 41 44  |I 69:MOV0,#37:AD|
0000d7f0  44 31 2c 4d 2c 57 3a 41  44 44 32 2c 53 2c 57 3a  |D1,M,W:ADD2,S,W:|
0000d800  53 57 49 20 36 39 3a 4d  4f 56 30 2c 23 33 37 3a  |SWI 69:MOV0,#37:|
0000d810  53 55 42 31 2c 4d 2c 57  3a 41 44 44 32 2c 53 2c  |SUB1,M,W:ADD2,S,|
0000d820  57 3a 53 57 49 20 36 39  3a 4d 4f 56 30 2c 23 34  |W:SWI 69:MOV0,#4|
0000d830  35 3a 53 55 42 31 2c 4d  2c 57 3a 53 55 42 32 2c  |5:SUB1,M,W:SUB2,|
0000d840  53 2c 57 3a 53 57 49 20  36 39 3a 42 20 4d 79 3a  |S,W:SWI 69:B My:|
0000d850  2e 4f 6c 0d 27 7e f5 a4  46 28 22 22 2c 73 2c 64  |.Ol.'~..F("",s,d|
0000d860  79 29 3a 80 20 50 2c 50  2c 23 31 36 2d 31 3a 41  |y):. P,P,#16-1:A|
0000d870  44 44 20 48 2c 73 2c 50  2c 4c 53 4c 23 33 3a 4c  |DD H,s,P,LSL#3:L|
0000d880  44 4d 49 41 20 48 2c 7b  48 2c 7a 7d 3a 4d 55 4c  |DMIA H,{H,z}:MUL|
0000d890  20 48 2c 57 2c 48 3a 4d  55 4c 20 7a 2c 57 2c 7a  | H,W,H:MUL z,W,z|
0000d8a0  3a 4d 4f 56 30 2c 23 36  38 3a 41 44 44 31 2c 4d  |:MOV0,#68:ADD1,M|
0000d8b0  2c 48 2c 41 53 52 23 31  36 3a 41 44 44 32 2c 53  |,H,ASR#16:ADD2,S|
0000d8c0  2c 7a 2c 41 53 52 23 31  36 3a 53 57 49 20 36 39  |,z,ASR#16:SWI 69|
0000d8d0  3a 4d 4f 56 30 2c 23 35  3a 41 44 44 31 2c 4d 2c  |:MOV0,#5:ADD1,M,|
0000d8e0  7a 2c 41 53 52 23 31 36  3a 53 55 42 32 2c 53 2c  |z,ASR#16:SUB2,S,|
0000d8f0  48 2c 41 53 52 23 31 36  3a 53 57 49 20 36 39 3a  |H,ASR#16:SWI 69:|
0000d900  4d 4f 56 30 2c 23 33 37  3a 53 55 42 31 2c 4d 2c  |MOV0,#37:SUB1,M,|
0000d910  48 2c 41 53 52 23 31 36  3a 53 55 42 32 2c 53 2c  |H,ASR#16:SUB2,S,|
0000d920  7a 2c 41 53 52 23 31 36  3a 53 57 49 20 36 39 3a  |z,ASR#16:SWI 69:|
0000d930  4d 4f 56 30 2c 23 33 37  3a 53 55 42 31 2c 4d 2c  |MOV0,#37:SUB1,M,|
0000d940  7a 2c 41 53 52 23 31 36  0d 27 7f f1 41 44 44 32  |z,ASR#16.'..ADD2|
0000d950  2c 53 2c 48 2c 41 53 52  23 31 36 3a 53 57 49 20  |,S,H,ASR#16:SWI |
0000d960  36 39 3a 4d 4f 56 30 2c  23 34 35 3a 41 44 44 31  |69:MOV0,#45:ADD1|
0000d970  2c 4d 2c 48 2c 41 53 52  23 31 36 3a 41 44 44 32  |,M,H,ASR#16:ADD2|
0000d980  2c 53 2c 7a 2c 41 53 52  23 31 36 3a 53 57 49 20  |,S,z,ASR#16:SWI |
0000d990  36 39 3a 42 20 4d 79 3a  2e 43 69 3a a4 46 28 22  |69:B My:.Ci:.F("|
0000d9a0  22 2c 73 2c 64 79 29 3a  4d 4f 56 20 52 2c 23 36  |",s,dy):MOV R,#6|
0000d9b0  3a 4d 4f 56 30 2c 23 36  38 3a 2e 43 80 20 50 2c  |:MOV0,#68:.C. P,|
0000d9c0  50 2c 23 31 36 2d 31 3a  41 44 44 20 48 2c 73 2c  |P,#16-1:ADD H,s,|
0000d9d0  50 2c 4c 53 4c 23 33 3a  4c 44 4d 49 41 20 48 2c  |P,LSL#3:LDMIA H,|
0000d9e0  7b 48 2c 7a 7d 3a 4d 55  4c 20 48 2c 57 2c 48 3a  |{H,z}:MUL H,W,H:|
0000d9f0  4d 55 4c 20 7a 2c 57 2c  7a 3a 41 44 44 31 2c 4d  |MUL z,W,z:ADD1,M|
0000da00  2c 48 2c 41 53 52 23 31  36 3a 41 44 44 32 2c 53  |,H,ASR#16:ADD2,S|
0000da10  2c 7a 2c 41 53 52 23 31  36 3a 53 57 49 20 36 39  |,z,ASR#16:SWI 69|
0000da20  3a 53 55 42 53 20 52 2c  52 2c 23 31 3a 41 44 44  |:SUBS R,R,#1:ADD|
0000da30  67 74 20 50 2c 50 2c 23  31 0d 27 80 f6 53 55 42  |gt P,P,#1.'..SUB|
0000da40  67 74 20 57 2c 57 2c 57  2c 41 53 52 23 33 3a 4d  |gt W,W,W,ASR#3:M|
0000da50  4f 56 67 74 30 2c 23 33  37 3a 42 67 74 20 43 3a  |OVgt0,#37:Bgt C:|
0000da60  42 20 4d 79 3a 2e 7a 79  3a 4d 55 4c 20 31 2c 48  |B My:.zy:MUL 1,H|
0000da70  2c 4e 3a 52 53 42 31 2c  31 2c 23 30 3a 4d 4c 41  |,N:RSB1,1,#0:MLA|
0000da80  20 31 2c 7a 2c 4c 2c 31  3a 41 44 44 31 2c 4d 2c  | 1,z,L,1:ADD1,M,|
0000da90  31 3a 4d 4f 56 31 2c 31  2c 41 53 52 23 31 36 3a  |1:MOV1,1,ASR#16:|
0000daa0  4d 55 4c 20 32 2c 48 2c  4c 3a 4d 4c 41 20 32 2c  |MUL 2,H,L:MLA 2,|
0000dab0  7a 2c 4e 2c 32 3a 53 55  42 32 2c 53 2c 32 3a 4d  |z,N,2:SUB2,S,2:M|
0000dac0  4f 56 32 2c 32 2c 41 53  52 23 31 36 3a 53 57 49  |OV2,2,ASR#16:SWI|
0000dad0  20 36 39 3a 4d 4f 56 53  70 63 2c 5a 3a 44 43 42  | 69:MOVSpc,Z:DCB|
0000dae0  30 3a 44 43 42 30 3a 44  43 42 30 3a 44 43 42 32  |0:DCB0:DCB0:DCB2|
0000daf0  34 3a 2e 78 69 20 44 43  44 30 3a 44 43 44 30 3a  |4:.xi DCD0:DCD0:|
0000db00  2e 72 6c 3a a4 5a 3a 53  54 4d 46 44 28 41 29 21  |.rl:.Z:STMFD(A)!|
0000db10  2c 7b 34 2d 39 2c 31 32  2c 5a 7d 3a 53 55 42 20  |,{4-9,12,Z}:SUB |
0000db20  4f 2c 4f 2c 23 72 5f 3a  4d 4f 56 31 32 2c 30 0d  |O,O,#r_:MOV12,0.|
0000db30  27 81 f6 53 54 52 31 2c  5b 4f 2c 23 45 79 5d 3a  |'..STR1,[O,#Ey]:|
0000db40  4c 44 52 30 2c 5b 31 5d  3a 53 54 52 30 2c 5b 31  |LDR0,[1]:STR0,[1|
0000db50  32 2c 23 73 75 25 5d 3a  41 44 44 30 2c 4f 2c 23  |2,#su%]:ADD0,O,#|
0000db60  44 4a 3a 41 44 44 31 2c  31 32 2c 23 65 25 3a 4d  |DJ:ADD1,12,#e%:M|
0000db70  4f 56 32 2c 23 61 75 25  3a 42 4c 20 42 4a 3a 4c  |OV2,#au%:BL BJ:L|
0000db80  44 52 31 2c 5b 4f 2c 23  45 79 5d 3a 53 57 49 20  |DR1,[O,#Ey]:SWI |
0000db90  26 34 30 30 63 38 3a 54  45 51 30 2c 23 30 3a 42  |&400c8:TEQ0,#0:B|
0000dba0  65 71 20 6a 69 3a 42 4c  20 4c 4a 3a 41 44 44 20  |eq ji:BL LJ:ADD |
0000dbb0  4d 2c 31 32 2c 23 65 25  3a 4d 4f 56 32 2c 23 60  |M,12,#e%:MOV2,#`|
0000dbc0  2b 31 3a 42 4c 20 4b 5f  3a 53 54 52 30 2c 5b 4d  |+1:BL K_:STR0,[M|
0000dbd0  2c 23 67 79 25 5d 3a 4d  4f 56 20 53 2c 30 3a 4d  |,#gy%]:MOV S,0:M|
0000dbe0  4f 56 32 2c 23 5a 79 2b  31 3a 42 4c 20 4b 5f 3a  |OV2,#Zy+1:BL K_:|
0000dbf0  53 54 52 30 2c 5b 4d 2c  23 75 5f 25 5d 3a 53 55  |STR0,[M,#u_%]:SU|
0000dc00  42 20 53 2c 30 2c 53 3a  4d 4f 56 32 2c 23 6c 2b  |B S,0,S:MOV2,#l+|
0000dc10  31 3a 42 4c 20 4b 5f 3a  53 54 52 30 2c 5b 4d 2c  |1:BL K_:STR0,[M,|
0000dc20  23 62 79 25 5d 0d 27 82  f7 52 53 42 53 30 2c 30  |#by%].'..RSBS0,0|
0000dc30  2c 23 32 35 36 3a 41 44  44 6e 65 30 2c 30 2c 30  |,#256:ADDne0,0,0|
0000dc40  3a 4d 4f 56 6e 65 31 2c  53 3a 41 44 44 6e 65 30  |:MOVne1,S:ADDne0|
0000dc50  2c 30 2c 31 2c 4c 53 52  23 31 3a 42 4c 6e 65 20  |,0,1,LSR#1:BLne |
0000dc60  46 4a 3a 53 54 52 30 2c  5b 4d 2c 23 52 6c 25 5d  |FJ:STR0,[M,#Rl%]|
0000dc70  3a 4d 4f 56 30 2c 23 46  5f 3a 4c 44 52 31 2c 5b  |:MOV0,#F_:LDR1,[|
0000dc80  31 32 2c 23 73 75 25 5d  3a 4d 4f 56 32 2c 23 4f  |12,#su%]:MOV2,#O|
0000dc90  79 2b 31 3a 53 57 49 20  26 64 63 62 38 63 3a 4d  |y+1:SWI &dcb8c:M|
0000dca0  4f 56 20 50 2c 30 3a 42  4c 20 6b 5f 3a 4c 44 52  |OV P,0:BL k_:LDR|
0000dcb0  31 2c 5b 4f 2c 23 45 79  5d 3a 2e 43 20 53 57 49  |1,[O,#Ey]:.C SWI|
0000dcc0  20 26 38 31 36 38 31 3a  53 54 4d 46 44 28 41 29  | &81681:STMFD(A)|
0000dcd0  21 2c 7b 34 2d 37 7d 3a  41 44 44 34 2c 31 2c 23  |!,{4-7}:ADD4,1,#|
0000dce0  32 38 3a 4c 44 4d 49 41  34 2c 7b 34 2d 37 7d 3a  |28:LDMIA4,{4-7}:|
0000dcf0  41 44 44 30 2c 31 32 2c  23 7a 75 25 2b 31 36 3a  |ADD0,12,#zu%+16:|
0000dd00  4c 44 4d 49 41 30 2c 7b  30 2d 33 7d 3a 43 4d 50  |LDMIA0,{0-3}:CMP|
0000dd10  30 2c 34 3a 4d 4f 56 6c  74 30 2c 34 0d 27 83 f5  |0,4:MOVlt0,4.'..|
0000dd20  43 4d 50 31 2c 35 3a 4d  4f 56 6c 74 31 2c 35 3a  |CMP1,5:MOVlt1,5:|
0000dd30  43 4d 50 32 2c 36 3a 4d  4f 56 67 74 32 2c 36 3a  |CMP2,6:MOVgt2,6:|
0000dd40  43 4d 50 33 2c 37 3a 4d  4f 56 67 74 33 2c 37 3a  |CMP3,7:MOVgt3,7:|
0000dd50  4c 44 4d 46 44 28 41 29  21 2c 7b 34 2d 37 7d 3a  |LDMFD(A)!,{4-7}:|
0000dd60  43 4d 50 30 2c 32 3a 43  4d 50 6c 74 31 2c 33 3a  |CMP0,2:CMPlt1,3:|
0000dd70  42 67 65 20 61 69 3a 41  44 44 20 56 2c 56 2c 23  |Bge ai:ADD V,V,#|
0000dd80  52 69 25 3a 4c 44 4d 49  41 20 56 2c 7b 56 2c 5a  |Ri%:LDMIA V,{V,Z|
0000dd90  7d 3a 53 55 42 32 2c 32  2c 56 3a 53 55 42 33 2c  |}:SUB2,2,V:SUB3,|
0000dda0  33 2c 5a 3a 42 49 43 30  2c 30 2c 23 26 66 66 30  |3,Z:BIC0,0,#&ff0|
0000ddb0  30 30 30 30 30 3a 42 49  43 30 2c 30 2c 23 26 66  |00000:BIC0,0,#&f|
0000ddc0  66 30 30 30 30 3a 84 52  30 2c 30 2c 31 2c 4c 53  |f0000:.R0,0,1,LS|
0000ddd0  4c 23 31 36 3a 42 49 43  32 2c 32 2c 23 26 66 66  |L#16:BIC2,2,#&ff|
0000dde0  30 30 30 30 30 30 3a 42  49 43 32 2c 32 2c 23 26  |000000:BIC2,2,#&|
0000ddf0  66 66 30 30 30 30 3a 84  52 31 2c 32 2c 33 2c 4c  |ff0000:.R1,2,3,L|
0000de00  53 4c 23 31 36 3a a4 46  28 22 22 2c 32 2c 78 69  |SL#16:.F("",2,xi|
0000de10  29 0d 27 84 f2 53 54 4d  49 41 32 2c 7b 30 2d 31  |).'..STMIA2,{0-1|
0000de20  7d 3a 53 55 42 30 2c 32  2c 23 31 3a 4d 4f 56 31  |}:SUB0,2,#1:MOV1|
0000de30  2c 23 39 3a 53 57 49 20  37 30 3a 4c 44 52 31 2c  |,#9:SWI 70:LDR1,|
0000de40  5b 4f 2c 23 45 79 5d 3a  42 4c 20 6e 5f 3a 2e 61  |[O,#Ey]:BL n_:.a|
0000de50  69 3a 4c 44 52 31 2c 5b  4f 2c 23 45 79 5d 3a 53  |i:LDR1,[O,#Ey]:S|
0000de60  57 49 20 26 34 30 30 63  61 3a 54 45 51 30 2c 23  |WI &400ca:TEQ0,#|
0000de70  30 3a 42 6e 65 20 43 3a  2e 6a 69 3a 41 44 44 30  |0:Bne C:.ji:ADD0|
0000de80  2c 31 32 2c 23 65 25 3a  41 44 44 31 2c 4f 2c 23  |,12,#e%:ADD1,O,#|
0000de90  44 4a 3a 4d 4f 56 32 2c  23 61 75 25 3a 42 4c 20  |DJ:MOV2,#au%:BL |
0000dea0  42 4a 3a 41 44 44 20 4f  2c 4f 2c 23 72 5f 3a 4c  |BJ:ADD O,O,#r_:L|
0000deb0  44 4d 46 44 28 41 29 21  2c 7b 34 2d 39 2c 31 32  |DMFD(A)!,{4-9,12|
0000dec0  2c 70 63 7d 5e 3a 2e 4b  5f 3a 4d 4f 56 30 2c 23  |,pc}^:.K_:MOV0,#|
0000ded0  46 5f 3a 4c 44 52 31 2c  5b 31 32 2c 23 73 75 25  |F_:LDR1,[12,#su%|
0000dee0  5d 3a 53 57 49 20 26 64  63 62 38 63 3a 4d 4f 56  |]:SWI &dcb8c:MOV|
0000def0  30 2c 30 2c 4c 53 4c 23  38 3a 4d 4f 56 31 2c 23  |0,0,LSL#8:MOV1,#|
0000df00  31 30 30 0d 27 85 ed 41  44 44 30 2c 30 2c 31 2c  |100.'..ADD0,0,1,|
0000df10  4c 53 52 23 31 3a 42 20  46 4a 3a 2e 6b 5f 3a 41  |LSR#1:B FJ:.k_:A|
0000df20  44 44 20 57 2c 31 32 2c  23 7a 75 25 3a 4c 44 4d  |DD W,12,#zu%:LDM|
0000df30  49 41 28 57 29 21 2c 7b  30 2d 33 7d 3a 41 44 44  |IA(W)!,{0-3}:ADD|
0000df40  20 4d 2c 31 32 2c 23 65  79 25 3a 4c 44 4d 49 41  | M,12,#ey%:LDMIA|
0000df50  20 4d 2c 7b 4d 2c 53 7d  3a 41 44 44 30 2c 4d 2c  | M,{M,S}:ADD0,M,|
0000df60  30 3a 41 44 44 31 2c 53  2c 31 3a 41 44 44 32 2c  |0:ADD1,S,1:ADD2,|
0000df70  4d 2c 32 3a 41 44 44 33  2c 53 2c 33 3a 53 54 4d  |M,2:ADD3,S,3:STM|
0000df80  49 41 20 57 2c 7b 30 2d  33 7d 3a 53 55 42 20 52  |IA W,{0-3}:SUB R|
0000df90  2c 32 2c 30 3a 4d 4f 56  20 52 2c 52 2c 4c 53 4c  |,2,0:MOV R,R,LSL|
0000dfa0  23 31 36 2d 31 3a 4d 4f  56 20 57 2c 52 2c 4c 53  |#16-1:MOV W,R,LS|
0000dfb0  52 23 31 3a 41 44 44 20  4d 2c 30 2c 32 3a 4d 4f  |R#1:ADD M,0,2:MO|
0000dfc0  56 20 4d 2c 4d 2c 41 53  52 23 31 3a 41 44 44 20  |V M,M,ASR#1:ADD |
0000dfd0  53 2c 31 2c 33 3a 4d 4f  56 20 53 2c 53 2c 41 53  |S,1,3:MOV S,S,AS|
0000dfe0  52 23 31 3a 4d 4f 56 53  70 63 2c 5a 3a 2e 6e 5f  |R#1:MOVSpc,Z:.n_|
0000dff0  0d 27 86 fa 53 54 4d 46  44 28 41 29 21 2c 7b 30  |.'..STMFD(A)!,{0|
0000e000  2d 31 32 2c 5a 7d 3a 4d  4f 56 30 2c 23 31 32 38  |-12,Z}:MOV0,#128|
0000e010  2b 30 3a 53 57 49 20 26  34 30 30 65 36 3a 53 57  |+0:SWI &400e6:SW|
0000e020  49 20 63 2b 31 36 3a 41  44 44 31 31 2c 31 32 2c  |I c+16:ADD11,12,|
0000e030  23 65 25 3a 42 20 50 4a  3a 2e 74 6c 3a a4 5a 3a  |#e%:B PJ:.tl:.Z:|
0000e040  53 54 4d 46 44 28 41 29  21 2c 7b 30 2d 31 32 2c  |STMFD(A)!,{0-12,|
0000e050  5a 7d 3a 53 55 42 20 41  2c 41 2c 23 32 35 36 3a  |Z}:SUB A,A,#256:|
0000e060  42 4c 20 72 3a 41 44 44  31 2c 31 32 2c 23 7a 75  |BL r:ADD1,12,#zu|
0000e070  25 3a 4c 44 4d 49 41 31  2c 7b 31 2d 34 7d 3a 4c  |%:LDMIA1,{1-4}:L|
0000e080  44 52 30 2c 5b 31 32 2c  23 73 75 25 5d 3a 53 54  |DR0,[12,#su%]:ST|
0000e090  4d 49 41 20 41 2c 7b 30  2d 34 7d 3a 4d 4f 56 31  |MIA A,{0-4}:MOV1|
0000e0a0  2c 41 3a 53 57 49 20 26  34 30 30 63 39 3a 54 45  |,A:SWI &400c9:TE|
0000e0b0  51 30 2c 23 30 3a 42 65  71 20 6d 6c 3a 42 4c 20  |Q0,#0:Beq ml:BL |
0000e0c0  4c 4a 3a 42 4c 20 6b 5f  3a 4d 4f 56 31 2c 41 3a  |LJ:BL k_:MOV1,A:|
0000e0d0  2e 43 20 42 4c 20 6e 5f  3a 4d 4f 56 31 2c 41 3a  |.C BL n_:MOV1,A:|
0000e0e0  53 57 49 20 26 34 30 30  63 61 0d 27 87 f3 54 45  |SWI &400ca.'..TE|
0000e0f0  51 30 2c 23 30 3a 42 6e  65 20 43 3a 2e 6d 6c 3a  |Q0,#0:Bne C:.ml:|
0000e100  41 44 44 20 41 2c 41 2c  23 32 35 36 3a 4c 44 4d  |ADD A,A,#256:LDM|
0000e110  46 44 28 41 29 21 2c 7b  30 2d 31 32 2c 70 63 7d  |FD(A)!,{0-12,pc}|
0000e120  5e 3a 2e 4b 4a 3a 41 44  44 31 2c 31 32 2c 23 65  |^:.KJ:ADD1,12,#e|
0000e130  25 3a 4c 44 52 30 2c 5b  31 2c 23 4b 79 25 5d 3a  |%:LDR0,[1,#Ky%]:|
0000e140  43 4d 50 30 2c 23 30 3a  4d 4f 56 6c 65 53 70 63  |CMP0,#0:MOVleSpc|
0000e150  2c 5a 3a 53 54 4d 46 44  28 41 29 21 2c 7b 30 2d  |,Z:STMFD(A)!,{0-|
0000e160  31 32 2c 5a 7d 3a 42 4c  20 50 5f 3a 41 44 44 30  |12,Z}:BL P_:ADD0|
0000e170  2c 31 32 2c 23 65 79 25  3a 4c 44 4d 49 41 30 2c  |,12,#ey%:LDMIA0,|
0000e180  7b 30 2d 31 7d 3a 41 44  44 20 4d 2c 4d 2c 30 3a  |{0-1}:ADD M,M,0:|
0000e190  41 44 44 20 53 2c 53 2c  31 3a 41 44 44 20 48 2c  |ADD S,S,1:ADD H,|
0000e1a0  31 32 2c 23 65 25 3a 4c  44 52 20 57 2c 5b 48 2c  |12,#e%:LDR W,[H,|
0000e1b0  23 4b 79 25 5d 3a 4c 44  52 20 52 2c 5b 48 2c 23  |#Ky%]:LDR R,[H,#|
0000e1c0  6b 79 25 5d 3a 53 55 42  20 52 2c 52 2c 23 31 3a  |ky%]:SUB R,R,#1:|
0000e1d0  2e 43 20 53 55 42 53 20  50 2c 57 2c 52 0d 27 88  |.C SUBS P,W,R.'.|
0000e1e0  fc 4c 44 52 67 74 30 2c  5b 48 2c 23 4a 5f 25 5d  |.LDRgt0,[H,#J_%]|
0000e1f0  3a 41 44 44 67 74 30 2c  30 2c 23 31 3a 43 4d 50  |:ADDgt0,0,#1:CMP|
0000e200  67 74 30 2c 50 3a 42 4c  67 74 20 4e 5f 3a 53 55  |gt0,P:BLgt N_:SU|
0000e210  42 53 20 52 2c 52 2c 23  31 3a 42 67 65 20 43 3a  |BS R,R,#1:Bge C:|
0000e220  4c 44 4d 46 44 28 41 29  21 2c 7b 30 2d 31 32 2c  |LDMFD(A)!,{0-12,|
0000e230  70 63 7d 5e 3a 2e 70 4a  3a a4 5a 3a 53 54 4d 46  |pc}^:.pJ:.Z:STMF|
0000e240  44 28 41 29 21 2c 7b 34  2d 39 2c 31 32 2c 5a 7d  |D(A)!,{4-9,12,Z}|
0000e250  3a 53 55 42 20 41 2c 41  2c 23 32 35 36 3a 42 4c  |:SUB A,A,#256:BL|
0000e260  20 72 3a 4c 44 52 30 2c  5b 31 32 2c 23 7a 25 5d  | r:LDR0,[12,#z%]|
0000e270  3a 53 54 52 30 2c 5b 41  5d 3a 41 44 44 20 57 2c  |:STR0,[A]:ADD W,|
0000e280  31 32 2c 23 65 25 3a 4c  44 52 20 52 2c 5b 57 2c  |12,#e%:LDR R,[W,|
0000e290  23 4b 79 25 5d 3a 4c 44  52 30 2c 5b 57 2c 23 6b  |#Ky%]:LDR0,[W,#k|
0000e2a0  79 25 5d 3a 41 44 44 30  2c 30 2c 52 3a 41 44 44  |y%]:ADD0,0,R:ADD|
0000e2b0  30 2c 30 2c 23 31 3a 53  54 52 30 2c 5b 57 2c 23  |0,0,#1:STR0,[W,#|
0000e2c0  4b 79 25 5d 3a 42 4c 20  50 5f 3a 53 54 52 20 52  |Ky%]:BL P_:STR R|
0000e2d0  2c 5b 57 2c 23 4b 79 25  5d 0d 27 89 ad 53 54 52  |,[W,#Ky%].'..STR|
0000e2e0  30 2c 5b 41 2c 23 34 5d  3a 42 4c 20 70 79 3a 53  |0,[A,#4]:BL py:S|
0000e2f0  55 42 31 2c 31 2c 30 3a  53 55 42 33 2c 33 2c 30  |UB1,1,0:SUB3,3,0|
0000e300  3a 41 44 44 30 2c 41 2c  23 34 3a 53 54 4d 49 42  |:ADD0,A,#4:STMIB|
0000e310  30 2c 7b 31 2d 33 7d 3a  4d 4f 56 31 2c 41 3a 53  |0,{1-3}:MOV1,A:S|
0000e320  57 49 20 26 34 30 30 63  39 3a 42 4c 20 51 79 3a  |WI &400c9:BL Qy:|
0000e330  2e 43 20 54 45 51 30 2c  23 30 3a 42 4c 6e 65 20  |.C TEQ0,#0:BLne |
0000e340  4b 4a 3a 4d 4f 56 6e 65  31 2c 41 3a 53 57 49 6e  |KJ:MOVne1,A:SWIn|
0000e350  65 20 26 34 30 30 63 61  3a 42 6e 65 20 43 3a 41  |e &400ca:Bne C:A|
0000e360  44 44 20 41 2c 41 2c 23  32 35 36 3a 4c 44 4d 46  |DD A,A,#256:LDMF|
0000e370  44 28 41 29 21 2c 7b 34  2d 39 2c 31 32 2c 70 63  |D(A)!,{4-9,12,pc|
0000e380  7d 5e 3a 5d 3a e1 0d 27  8a f7 dd a4 51 79 3a ea  |}^:]:..'....Qy:.|
0000e390  52 25 2c 5f 25 2c 4e 25  2c 47 75 25 2c 72 75 25  |R%,_%,N%,Gu%,ru%|
0000e3a0  3a 52 25 3d 28 9b 28 32  2a af 2f 31 36 29 2a 28  |:R%=(.(2*./16)*(|
0000e3b0  31 3c 3c 31 36 29 29 2b  30 2e 35 3a 5f 25 3d 28  |1<<16))+0.5:_%=(|
0000e3c0  b5 28 32 2a af 2f 31 36  29 2a 28 31 3c 3c 31 36  |.(2*./16)*(1<<16|
0000e3d0  29 29 2b 30 2e 35 3a 4e  25 3d 28 28 31 2f b6 28  |))+0.5:N%=((1/.(|
0000e3e0  32 29 29 2a 28 31 3c 3c  31 36 29 29 2b 30 2e 35  |2))*(1<<16))+0.5|
0000e3f0  3a 47 75 25 3d 31 3c 3c  31 36 3a 72 75 25 3d 30  |:Gu%=1<<16:ru%=0|
0000e400  3a 5b 4f 50 54 56 25 3a  44 43 44 47 75 25 3a 44  |:[OPTV%:DCDGu%:D|
0000e410  43 44 72 75 25 3a 44 43  44 52 25 3a 44 43 44 5f  |CDru%:DCDR%:DCD_|
0000e420  25 3a 44 43 44 4e 25 3a  44 43 44 4e 25 3a 44 43  |%:DCDN%:DCDN%:DC|
0000e430  44 5f 25 3a 44 43 44 52  25 3a 44 43 44 72 75 25  |D_%:DCDR%:DCDru%|
0000e440  3a 44 43 44 47 75 25 3a  44 43 44 2d 5f 25 3a 44  |:DCDGu%:DCD-_%:D|
0000e450  43 44 52 25 3a 44 43 44  2d 4e 25 3a 44 43 44 4e  |CDR%:DCD-N%:DCDN|
0000e460  25 3a 44 43 44 2d 52 25  3a 44 43 44 5f 25 3a 44  |%:DCD-R%:DCD_%:D|
0000e470  43 44 2d 47 75 25 3a 44  43 44 72 75 25 0d 27 8b  |CD-Gu%:DCDru%.'.|
0000e480  68 44 43 44 2d 52 25 3a  44 43 44 2d 5f 25 3a 44  |hDCD-R%:DCD-_%:D|
0000e490  43 44 2d 4e 25 3a 44 43  44 2d 4e 25 3a 44 43 44  |CD-N%:DCD-N%:DCD|
0000e4a0  2d 5f 25 3a 44 43 44 2d  52 25 3a 44 43 44 72 75  |-_%:DCD-R%:DCDru|
0000e4b0  25 3a 44 43 44 2d 47 75  25 3a 44 43 44 5f 25 3a  |%:DCD-Gu%:DCD_%:|
0000e4c0  44 43 44 2d 52 25 3a 44  43 44 4e 25 3a 44 43 44  |DCD-R%:DCDN%:DCD|
0000e4d0  2d 4e 25 3a 44 43 44 52  25 3a 44 43 44 2d 5f 25  |-N%:DCDR%:DCD-_%|
0000e4e0  3a 5d 3a 3d 30 0d 27 8c  29 dd f2 55 4a 28 51 25  |:]:=0.'.)..UJ(Q%|
0000e4f0  2c 58 25 2c 45 25 2c 49  25 29 3a ea 4d 25 2c 61  |,X%,E%,I%):.M%,a|
0000e500  25 3a 4d 25 3d 50 5f 25  3a c8 8e 49 25 ca 0d 27  |%:M%=P_%:..I%..'|
0000e510  8d 32 c9 47 79 2c 47 79  2b 32 3a 61 25 3d a4 41  |.2.Gy,Gy+2:a%=.A|
0000e520  28 4d 25 2c 44 79 2b 31  29 3a f2 4a 28 4d 25 2c  |(M%,Dy+1):.J(M%,|
0000e530  49 25 2c 45 25 2c 47 79  2c 61 25 2c 39 39 39 29  |I%,E%,Gy,a%,999)|
0000e540  0d 27 8e 30 c9 44 79 2c  44 79 2b 32 3a 61 25 3d  |.'.0.Dy,Dy+2:a%=|
0000e550  a4 41 28 4d 25 2c 47 79  2b 31 29 3a f2 4a 28 4d  |.A(M%,Gy+1):.J(M|
0000e560  25 2c 49 25 2c 45 25 2c  44 79 2c 31 2c 61 25 29  |%,I%,E%,Dy,1,a%)|
0000e570  0d 27 8f 0b c9 65 75 3a  f2 44 75 0d 27 90 12 c9  |.'...eu:.Du.'...|
0000e580  47 69 3a f2 64 75 3a e7  45 25 80 34 8c 0d 27 91  |Gi:.du:.E%.4..'.|
0000e590  06 f2 50 0d 27 92 05 cd  0d 27 93 07 cb 3a e1 0d  |..P.'....'...:..|
0000e5a0  27 94 33 dd f2 44 75 3a  ea 4d 25 3a 4d 25 3d 50  |'.3..Du:.M%:M%=P|
0000e5b0  5f 25 3a f2 5a 28 4d 25  2c 47 79 2b 31 2c 66 5f  |_%:.Z(M%,Gy+1,f_|
0000e5c0  29 3a f2 5a 28 4d 25 2c  44 79 2b 31 2c 52 4a 29  |):.Z(M%,Dy+1,RJ)|
0000e5d0  3a e1 0d 27 95 25 dd f2  58 4a 3a ea 4d 25 2c 46  |:..'.%..XJ:.M%,F|
0000e5e0  25 3a e7 a4 44 28 22 48  69 67 68 6c 69 67 68 74  |%:..D("Highlight|
0000e5f0  22 2c 50 5f 25 29 8c 0d  27 96 3b cc 3a 4d 25 3d  |",P_%)..'.;.:M%=|
0000e600  50 5f 25 3a 46 25 3d 5a  25 2b 65 25 3a f2 5a 28  |P_%:F%=Z%+e%:.Z(|
0000e610  4d 25 2c 47 79 2b 31 2c  46 25 21 4a 5f 25 29 3a  |M%,Gy+1,F%!J_%):|
0000e620  f2 5a 28 4d 25 2c 44 79  2b 31 2c 46 25 21 6b 79  |.Z(M%,Dy+1,F%!ky|
0000e630  25 29 0d 27 97 07 cd 3a  e1 0d 27 98 4c dd f2 64  |%).'...:..'.L..d|
0000e640  75 3a ea 4d 25 2c 46 25  2c 6a 25 3a 4d 25 3d 50  |u:.M%,F%,j%:M%=P|
0000e650  5f 25 3a 46 25 3d 5a 25  2b 65 25 3a 49 4a 25 3d  |_%:F%=Z%+e%:IJ%=|
0000e660  a4 41 28 4d 25 2c 47 79  2b 31 29 3a 54 4a 25 3d  |.A(M%,Gy+1):TJ%=|
0000e670  a4 41 28 4d 25 2c 44 79  2b 31 29 3a 6a 25 3d b9  |.A(M%,Dy+1):j%=.|
0000e680  3a c8 8e a3 ca 0d 27 99  11 c9 28 46 25 21 4a 5f  |:.....'...(F%!J_|
0000e690  25 3d 49 4a 25 29 0d 27  9a 11 c9 28 46 25 21 6b  |%=IJ%).'...(F%!k|
0000e6a0  79 25 3d 54 4a 25 29 0d  27 9b 09 7f 6a 25 3d a3  |y%=TJ%).'...j%=.|
0000e6b0  0d 27 9c 0a cb 3a e7 6a  25 8c 0d 27 9d 1c f2 49  |.'...:.j%..'...I|
0000e6c0  3a 46 25 21 4a 5f 25 3d  49 4a 25 3a 46 25 21 6b  |:F%!J_%=IJ%:F%!k|
0000e6d0  79 25 3d 54 4a 25 0d 27  9e 0a cd 3a f2 64 3a e1  |y%=TJ%.'...:.d:.|
0000e6e0  0d 27 9f 75 dd f2 70 4a  28 51 25 2c 58 25 2c 45  |.'.u..pJ(Q%,X%,E|
0000e6f0  75 25 2c 49 25 29 3a ea  4d 25 2c 61 25 2c 64 25  |u%,I%):.M%,a%,d%|
0000e700  2c 45 25 2c 52 25 2c 6d  75 25 2c 6a 25 3a 4d 25  |,E%,R%,mu%,j%:M%|
0000e710  3d 72 79 25 3a 64 25 3d  a4 41 28 4d 25 2c 60 2b  |=ry%:d%=.A(M%,`+|
0000e720  31 29 3a 45 25 3d a4 41  28 4d 25 2c 5a 79 2b 31  |1):E%=.A(M%,Zy+1|
0000e730  29 3a 52 25 3d a4 41 28  4d 25 2c 6c 2b 31 29 3a  |):R%=.A(M%,l+1):|
0000e740  7a 69 25 3d a4 41 28 4d  25 2c 4f 79 2b 31 29 3a  |zi%=.A(M%,Oy+1):|
0000e750  c8 8e 49 25 ca 0d 27 a0  3e c9 5a 79 2c 5a 79 2b  |..I%..'.>.Zy,Zy+|
0000e760  32 3a 61 25 3d a4 53 28  64 25 2b 31 2c 32 2a 28  |2:a%=.S(d%+1,2*(|
0000e770  31 30 30 2d 52 25 29 2b  64 25 29 3a f2 4a 28 4d  |100-R%)+d%):.J(M|
0000e780  25 2c 49 25 2c 45 75 25  2c 5a 79 2c 61 25 2c 31  |%,I%,Eu%,Zy,a%,1|
0000e790  30 30 29 0d 27 a1 39 c9  60 2c 60 2b 32 3a 61 25  |00).'.9.`,`+2:a%|
0000e7a0  3d a4 50 28 45 25 2d 31  2c 32 2a 28 31 30 30 2d  |=.P(E%-1,2*(100-|
0000e7b0  52 25 29 2b 45 25 29 3a  f2 4a 28 4d 25 2c 49 25  |R%)+E%):.J(M%,I%|
0000e7c0  2c 45 75 25 2c 60 2c 30  2c 61 25 29 0d 27 a2 59  |,Eu%,`,0,a%).'.Y|
0000e7d0  c9 6c 2c 6c 2b 32 3a 61  25 3d a4 50 28 39 39 2c  |.l,l+2:a%=.P(99,|
0000e7e0  31 30 30 2d 28 28 45 25  2d 64 25 29 81 32 29 29  |100-((E%-d%).2))|
0000e7f0  3a 6d 75 25 3d a4 53 28  64 25 2c 31 30 30 2d 28  |:mu%=.S(d%,100-(|
0000e800  28 45 25 2d 64 25 29 81  32 29 2a 64 25 29 3a f2  |(E%-d%).2)*d%):.|
0000e810  4a 28 4d 25 2c 49 25 2c  45 75 25 2c 6c 2c 6d 75  |J(M%,I%,Eu%,l,mu|
0000e820  25 2c 61 25 29 0d 27 a3  22 c9 4f 79 2c 4f 79 2b  |%,a%).'.".Oy,Oy+|
0000e830  32 3a f2 4a 28 4d 25 2c  49 25 2c 45 75 25 2c 4f  |2:.J(M%,I%,Eu%,O|
0000e840  79 2c 30 2c 31 35 29 0d  27 a4 0b c9 6c 75 3a f2  |y,0,15).'...lu:.|
0000e850  61 4a 0d 27 a5 0b c9 71  5f 3a f2 54 4a 0d 27 a6  |aJ.'...q_:.TJ.'.|
0000e860  17 cb 3a e7 28 45 75 25  3d 31 29 80 28 49 25 3d  |..:.(Eu%=1).(I%=|
0000e870  71 5f 29 8c 0d 27 a7 06  f2 50 0d 27 a8 0f cc 3a  |q_)..'...P.'...:|
0000e880  6a 25 3d b9 3a c8 8e a3  ca 0d 27 a9 14 c9 28 64  |j%=.:.....'...(d|
0000e890  25 3d a4 41 28 4d 25 2c  60 2b 31 29 29 0d 27 aa  |%=.A(M%,`+1)).'.|
0000e8a0  15 c9 28 45 25 3d a4 41  28 4d 25 2c 5a 79 2b 31  |..(E%=.A(M%,Zy+1|
0000e8b0  29 29 0d 27 ab 14 c9 28  52 25 3d a4 41 28 4d 25  |)).'...(R%=.A(M%|
0000e8c0  2c 6c 2b 31 29 29 0d 27  ac 16 c9 28 7a 69 25 3d  |,l+1)).'...(zi%=|
0000e8d0  a4 41 28 4d 25 2c 4f 79  2b 31 29 29 0d 27 ad 09  |.A(M%,Oy+1)).'..|
0000e8e0  7f 6a 25 3d a3 0d 27 ae  0a cb 3a e7 6a 25 8c 0d  |.j%=..'...:.j%..|
0000e8f0  27 af 07 d6 74 6c 0d 27  b0 05 cd 0d 27 b1 07 cd  |'...tl.'....'...|
0000e900  3a e1 0d 27 b2 26 dd f2  61 4a 3a f2 45 28 5a 79  |:..'.&..aJ:.E(Zy|
0000e910  2c 57 4a 29 3a f2 45 28  60 2c 63 5f 29 3a f2 45  |,WJ):.E(`,c_):.E|
0000e920  28 6c 2c 45 4a 29 3a e1  0d 27 b3 1e dd f2 66 75  |(l,EJ):..'....fu|
0000e930  3a ea 46 25 3a e7 a4 44  28 22 41 72 72 6f 77 22  |:.F%:..D("Arrow"|
0000e940  2c 72 79 25 29 8c 0d 27  b4 36 cc 3a 46 25 3d 5a  |,ry%)..'.6.:F%=Z|
0000e950  25 2b 65 25 3a f2 45 28  5a 79 2c 46 25 21 67 79  |%+e%:.E(Zy,F%!gy|
0000e960  25 29 3a f2 45 28 60 2c  46 25 21 75 5f 25 29 3a  |%):.E(`,F%!u_%):|
0000e970  f2 45 28 6c 2c 46 25 21  62 79 25 29 0d 27 b5 07  |.E(l,F%!by%).'..|
0000e980  cd 3a e1 0d 27 b6 2e dd  f2 45 28 4a 25 2c 47 79  |.:..'....E(J%,Gy|
0000e990  25 29 3a f2 5a 28 72 79  25 2c 4a 25 2b 31 2c 28  |%):.Z(ry%,J%+1,(|
0000e9a0  47 79 25 2a 31 30 30 2b  35 30 29 3e 3e 38 29 3a  |Gy%*100+50)>>8):|
0000e9b0  e1 0d 27 b7 2d dd f2 54  4a 3a ea 4d 25 2c 46 25  |..'.-..TJ:.M%,F%|
0000e9c0  2c 6a 25 3a 4d 25 3d 72  79 25 3a 46 25 3d 5a 25  |,j%:M%=ry%:F%=Z%|
0000e9d0  2b 65 25 3a e7 46 25 21  6b 4a 25 3d 34 8c 0d 27  |+e%:.F%!kJ%=4..'|
0000e9e0  b8 06 f2 49 0d 27 b9 31  cd 3a f2 50 79 28 5a 79  |...I.'.1.:.Py(Zy|
0000e9f0  2c 46 4a 25 29 3a f2 50  79 28 60 2c 58 4a 25 29  |,FJ%):.Py(`,XJ%)|
0000ea00  3a f2 50 79 28 6c 2c 50  4a 25 29 3a 6a 25 3d b9  |:.Py(l,PJ%):j%=.|
0000ea10  3a c8 8e a3 ca 0d 27 ba  11 c9 28 46 25 21 67 79  |:.....'...(F%!gy|
0000ea20  25 3d 46 4a 25 29 0d 27  bb 11 c9 28 46 25 21 75  |%=FJ%).'...(F%!u|
0000ea30  5f 25 3d 58 4a 25 29 0d  27 bc 11 c9 28 46 25 21  |_%=XJ%).'...(F%!|
0000ea40  62 79 25 3d 50 4a 25 29  0d 27 bd 09 7f 6a 25 3d  |by%=PJ%).'...j%=|
0000ea50  a3 0d 27 be 0a cb 3a e7  6a 25 8c 0d 27 bf 2f 46  |..'...:.j%..'./F|
0000ea60  25 21 67 79 25 3d 46 4a  25 3a 46 25 21 75 5f 25  |%!gy%=FJ%:F%!u_%|
0000ea70  3d 58 4a 25 3a 46 25 21  62 79 25 3d 50 4a 25 3a  |=XJ%:F%!by%=PJ%:|
0000ea80  e7 46 25 21 6b 4a 25 3d  34 8c 0d 27 c0 18 f2 49  |.F%!kJ%=4..'...I|
0000ea90  3a f2 77 28 46 25 21 50  6c 25 2c 46 25 21 74 6c  |:.w(F%!Pl%,F%!tl|
0000eaa0  25 29 0d 27 c1 05 cd 0d  27 c2 07 cd 3a e1 0d 27  |%).'....'...:..'|
0000eab0  c3 32 dd f2 50 79 28 4a  25 2c f8 47 79 25 29 3a  |.2..Py(J%,.Gy%):|
0000eac0  47 79 25 3d 28 a4 41 28  72 79 25 2c 4a 25 2b 31  |Gy%=(.A(ry%,J%+1|
0000ead0  29 2a 32 35 36 2f 31 30  30 29 2b 30 2e 35 3a e1  |)*256/100)+0.5:.|
0000eae0  0d 27 c4 2a dd a4 68 5f  44 45 46 41 55 4c 54 3a  |.'.*..h_DEFAULT:|
0000eaf0  ea 85 3a ee 85 ea f7 85  3a f2 41 28 22 40 2e 68  |..:.....:.A("@.h|
0000eb00  2e 44 45 46 41 55 4c 54  22 29 0d 27 c5 5a 56 6f  |.DEFAULT").'.ZVo|
0000eb10  3d 31 36 3a 73 6e 3d 31  3c 3c 33 30 3a 61 42 3d  |=16:sn=1<<30:aB=|
0000eb20  30 3a 76 4f 3d 31 3a 4f  60 3d 32 3a 49 61 3d 33  |0:vO=1:O`=2:Ia=3|
0000eb30  3a 6f 6f 3d 34 3a 70 4f  3d 35 3a 79 6e 3d 36 3a  |:oo=4:pO=5:yn=6:|
0000eb40  6e 6f 3d 37 3a 65 6f 3d  38 3a 65 61 3d 31 3c 3c  |no=7:eo=8:ea=1<<|
0000eb50  30 3a 41 69 3d 31 3c 3c  31 3a 73 6f 3d 31 3c 3c  |0:Ai=1<<1:so=1<<|
0000eb60  32 3a 3d 30 0d 27 c6 32  dd a4 6a 75 6d 70 62 6c  |2:=0.'.2..jumpbl|
0000eb70  6f 63 6b 5f 44 45 46 41  55 4c 54 3a ea 85 3a ee  |ock_DEFAULT:..:.|
0000eb80  85 ea f7 85 3a f2 41 28  22 40 2e 68 2e 44 45 46  |....:.A("@.h.DEF|
0000eb90  41 55 4c 54 22 29 0d 27  c7 6d 5b 4f 50 54 56 25  |AULT").'.m[OPTV%|
0000eba0  80 6e 79 25 3a 2e 71 6f  20 44 43 44 54 61 3a 2e  |.ny%:.qo DCDTa:.|
0000ebb0  4f 61 20 44 43 44 4e 4f  3a 2e 6d 4f 20 44 43 44  |Oa DCDNO:.mO DCD|
0000ebc0  7a 6f 3a 2e 49 60 20 44  43 44 6d 6f 3a 2e 49 4f  |zo:.I` DCDmo:.IO|
0000ebd0  20 44 43 44 45 4f 3a 2e  74 42 20 44 43 44 4a 60  | DCDEO:.tB DCDJ`|
0000ebe0  3a 2e 63 6f 20 44 43 44  42 42 3a 2e 43 6e 20 44  |:.co DCDBB:.Cn D|
0000ebf0  43 44 46 6f 3a 2e 63 6c  20 44 43 44 66 6e 3a 5d  |CDFo:.cl DCDfn:]|
0000ec00  3a 3d 30 0d 27 c8 26 dd  a4 68 5f 64 65 62 75 67  |:=0.'.&..h_debug|
0000ec10  3a ea 85 3a ee 85 ea f7  85 3a f2 41 28 22 40 2e  |:..:.....:.A("@.|
0000ec20  68 2e 64 65 62 75 67 22  29 0d 27 c9 0b 52 6f 3d  |h.debug").'..Ro=|
0000ec30  a3 3a 3d 30 0d 27 ca 2e  dd a4 6a 75 6d 70 62 6c  |.:=0.'....jumpbl|
0000ec40  6f 63 6b 5f 64 65 62 75  67 3a ea 85 3a ee 85 ea  |ock_debug:..:...|
0000ec50  f7 85 3a f2 41 28 22 40  2e 68 2e 64 65 62 75 67  |..:.A("@.h.debug|
0000ec60  22 29 0d 27 cb 45 5b 4f  50 54 56 25 80 6e 79 25  |").'.E[OPTV%.ny%|
0000ec70  3a 2e 60 60 20 44 43 44  50 60 3a 2e 4a 6e 20 44  |:.`` DCDP`:.Jn D|
0000ec80  43 44 6b 4f 3a 2e 59 61  20 44 43 44 65 42 3a 2e  |CDkO:.Ya DCDeB:.|
0000ec90  64 60 20 44 43 44 46 6b  3a 2e 74 4f 20 44 43 44  |d` DCDFk:.tO DCD|
0000eca0  6b 6e 3a 5d 3a 3d 30 0d  27 cc 26 dd a4 68 5f 69  |kn:]:=0.'.&..h_i|
0000ecb0  6d 61 74 68 3a ea 85 3a  ee 85 ea f7 85 3a f2 41  |math:..:.....:.A|
0000ecc0  28 22 40 2e 68 2e 69 6d  61 74 68 22 29 0d 27 cd  |("@.h.imath").'.|
0000ecd0  06 3d 30 0d 27 ce 2e dd  a4 6a 75 6d 70 62 6c 6f  |.=0.'....jumpblo|
0000ece0  63 6b 5f 69 6d 61 74 68  3a ea 85 3a ee 85 ea f7  |ck_imath:..:....|
0000ecf0  85 3a f2 41 28 22 40 2e  68 2e 69 6d 61 74 68 22  |.:.A("@.h.imath"|
0000ed00  29 0d 27 cf ef 5b 4f 50  54 56 25 80 6e 79 25 3a  |).'..[OPTV%.ny%:|
0000ed10  2e 4b 79 20 44 43 44 79  6f 3a 2e 46 4a 20 44 43  |.Ky DCDyo:.FJ DC|
0000ed20  44 59 6f 3a 2e 64 4f 20  44 43 44 64 42 3a 2e 59  |DYo:.dO DCDdB:.Y|
0000ed30  42 20 44 43 44 74 61 3a  2e 75 79 20 44 43 44 4f  |B DCDta:.uy DCDO|
0000ed40  6f 3a 2e 75 4f 20 44 43  44 66 42 3a 2e 53 6f 20  |o:.uO DCDfB:.So |
0000ed50  44 43 44 56 61 3a 2e 71  61 20 44 43 44 48 4f 3a  |DCDVa:.qa DCDHO:|
0000ed60  2e 78 42 20 44 43 44 53  6b 3a 2e 41 6e 20 44 43  |.xB DCDSk:.An DC|
0000ed70  44 43 42 3a 2e 52 61 20  44 43 44 42 4f 3a 2e 7a  |DCB:.Ra DCDBO:.z|
0000ed80  42 20 44 43 44 5a 6b 3a  2e 42 6e 20 44 43 44 5a  |B DCDZk:.Bn DCDZ|
0000ed90  6f 3a 2e 67 6e 20 44 43  44 73 42 3a 2e 68 42 20  |o:.gn DCDsB:.hB |
0000eda0  44 43 44 57 42 3a 2e 72  6e 20 44 43 44 6c 4f 3a  |DCDWB:.rn DCDlO:|
0000edb0  2e 7a 4f 20 44 43 44 6c  61 3a 2e 4a 42 20 44 43  |.zO DCDla:.JB DC|
0000edc0  44 78 4f 3a 2e 68 60 20  44 43 44 68 4f 3a 2e 4d  |DxO:.h` DCDhO:.M|
0000edd0  60 20 44 43 44 54 42 3a  2e 72 60 20 44 43 44 50  |` DCDTB:.r` DCDP|
0000ede0  6e 3a 2e 41 6c 20 44 43  44 47 6e 3a 5d 3a 3d 30  |n:.Al DCDGn:]:=0|
0000edf0  0d 27 d0 2a dd a4 68 5f  6d 65 73 73 61 67 65 3a  |.'.*..h_message:|
0000ee00  ea 85 3a ee 85 ea f7 85  3a f2 41 28 22 40 2e 68  |..:.....:.A("@.h|
0000ee10  2e 6d 65 73 73 61 67 65  22 29 0d 27 d1 06 3d 30  |.message").'..=0|
0000ee20  0d 27 d2 32 dd a4 6a 75  6d 70 62 6c 6f 63 6b 5f  |.'.2..jumpblock_|
0000ee30  6d 65 73 73 61 67 65 3a  ea 85 3a ee 85 ea f7 85  |message:..:.....|
0000ee40  3a f2 41 28 22 40 2e 68  2e 6d 65 73 73 61 67 65  |:.A("@.h.message|
0000ee50  22 29 0d 27 d3 45 5b 4f  50 54 56 25 80 6e 79 25  |").'.E[OPTV%.ny%|
0000ee60  3a 2e 4e 6c 20 44 43 44  6d 6e 3a 2e 66 60 20 44  |:.Nl DCDmn:.f` D|
0000ee70  43 44 48 6e 3a 2e 4d 42  20 44 43 44 77 4f 3a 2e  |CDHn:.MB DCDwO:.|
0000ee80  45 60 20 44 43 44 41 6b  3a 2e 43 60 20 44 43 44  |E` DCDAk:.C` DCD|
0000ee90  75 6f 3a 5d 3a 3d 30 0d  27 d4 28 dd a4 68 5f 52  |uo:]:=0.'.(..h_R|
0000eea0  65 6c 4f 62 6a 3a ea 85  3a ee 85 ea f7 85 3a f2  |elObj:..:.....:.|
0000eeb0  41 28 22 40 2e 68 2e 52  65 6c 4f 62 6a 22 29 0d  |A("@.h.RelObj").|
0000eec0  27 d5 0e 59 60 3d 34 3c  3c 32 3a 3d 30 0d 27 d6  |'..Y`=4<<2:=0.'.|
0000eed0  30 dd a4 6a 75 6d 70 62  6c 6f 63 6b 5f 52 65 6c  |0..jumpblock_Rel|
0000eee0  4f 62 6a 3a ea 85 3a ee  85 ea f7 85 3a f2 41 28  |Obj:..:.....:.A(|
0000eef0  22 40 2e 68 2e 52 65 6c  4f 62 6a 22 29 0d 27 d7  |"@.h.RelObj").'.|
0000ef00  8b 5b 4f 50 54 56 25 80  6e 79 25 3a 2e 57 6f 20  |.[OPTV%.ny%:.Wo |
0000ef10  44 43 44 5f 61 3a 2e 57  60 20 44 43 44 46 60 3a  |DCD_a:.W` DCDF`:|
0000ef20  2e 6f 60 20 44 43 44 4d  6f 3a 2e 4a 6f 20 44 43  |.o` DCDMo:.Jo DC|
0000ef30  44 50 61 3a 2e 51 60 20  44 43 44 74 6e 3a 2e 78  |DPa:.Q` DCDtn:.x|
0000ef40  6f 20 44 43 44 5a 6e 3a  2e 4f 42 20 44 43 44 61  |o DCDZn:.OB DCDa|
0000ef50  60 3a 2e 57 6e 20 44 43  44 4c 6b 3a 2e 52 6e 20  |`:.Wn DCDLk:.Rn |
0000ef60  44 43 44 79 42 3a 2e 50  42 20 44 43 44 65 6e 3a  |DCDyB:.PB DCDen:|
0000ef70  2e 58 6b 20 44 43 44 5a  42 3a 2e 76 61 20 44 43  |.Xk DCDZB:.va DC|
0000ef80  44 64 6f 3a 5d 3a 3d 30  0d 27 d8 26 dd a4 68 5f  |Ddo:]:=0.'.&..h_|
0000ef90  73 74 64 69 6f 3a ea 85  3a ee 85 ea f7 85 3a f2  |stdio:..:.....:.|
0000efa0  41 28 22 40 2e 68 2e 73  74 64 69 6f 22 29 0d 27  |A("@.h.stdio").'|
0000efb0  d9 17 4a 4f 3d 30 3a 44  6b 3d 31 37 3a 66 61 3d  |..JO=0:Dk=17:fa=|
0000efc0  33 34 3a 3d 30 0d 27 da  2e dd a4 6a 75 6d 70 62  |34:=0.'....jumpb|
0000efd0  6c 6f 63 6b 5f 73 74 64  69 6f 3a ea 85 3a ee 85  |lock_stdio:..:..|
0000efe0  ea f7 85 3a f2 41 28 22  40 2e 68 2e 73 74 64 69  |...:.A("@.h.stdi|
0000eff0  6f 22 29 0d 27 db 98 5b  4f 50 54 56 25 80 6e 79  |o").'..[OPTV%.ny|
0000f000  25 3a 2e 50 6b 20 44 43  44 71 6e 3a 2e 71 75 20  |%:.Pk DCDqn:.qu |
0000f010  44 43 44 58 60 3a 2e 60  6e 20 44 43 44 4c 61 3a  |DCDX`:.`n DCDLa:|
0000f020  2e 44 61 20 44 43 44 6e  42 3a 2e 6e 60 20 44 43  |.Da DCDnB:.n` DC|
0000f030  44 5a 4f 3a 2e 57 6e 25  44 43 44 45 6e 25 3a 2e  |DZO:.Wn%DCDEn%:.|
0000f040  4c 6e 25 44 43 44 62 61  25 3a 2e 58 6e 25 44 43  |Ln%DCDba%:.Xn%DC|
0000f050  44 76 61 25 3a 2e 55 61  20 44 43 44 42 60 3a 2e  |Dva%:.Ua DCDB`:.|
0000f060  68 75 20 44 43 44 53 60  3a 2e 5f 4f 20 44 43 44  |hu DCDS`:._O DCD|
0000f070  4c 6f 3a 2e 47 42 20 44  43 44 48 60 3a 2e 4b 6f  |Lo:.GB DCDH`:.Ko|
0000f080  20 44 43 44 4e 6f 3a 5d  3a 3d 30 0d 27 dc 28 dd  | DCDNo:]:=0.'.(.|
0000f090  a4 68 5f 73 74 64 6c 69  62 3a ea 85 3a ee 85 ea  |.h_stdlib:..:...|
0000f0a0  f7 85 3a f2 41 28 22 40  2e 68 2e 73 74 64 6c 69  |..:.A("@.h.stdli|
0000f0b0  62 22 29 0d 27 dd 06 3d  30 0d 27 de 30 dd a4 6a  |b").'..=0.'.0..j|
0000f0c0  75 6d 70 62 6c 6f 63 6b  5f 73 74 64 6c 69 62 3a  |umpblock_stdlib:|
0000f0d0  ea 85 3a ee 85 ea f7 85  3a f2 41 28 22 40 2e 68  |..:.....:.A("@.h|
0000f0e0  2e 73 74 64 6c 69 62 22  29 0d 27 df a9 5b 4f 50  |.stdlib").'..[OP|
0000f0f0  54 56 25 80 6e 79 25 3a  2e 64 4a 20 44 43 44 4e  |TV%.ny%:.dJ DCDN|
0000f100  6e 3a 2e 43 75 20 44 43  44 47 61 3a 2e 65 4f 20  |n:.Cu DCDGa:.eO |
0000f110  44 43 44 53 4f 3a 2e 7a  6c 20 44 43 44 70 6f 3a  |DCDSO:.zl DCDpo:|
0000f120  2e 45 6f 20 44 43 44 51  4f 3a 2e 4f 4a 20 44 43  |.Eo DCDQO:.OJ DC|
0000f130  44 48 42 3a 2e 51 6f 20  44 43 44 48 61 3a 2e 54  |DHB:.Qo DCDHa:.T|
0000f140  60 20 44 43 44 5f 6e 3a  2e 64 61 20 44 43 44 6a  |` DCD_n:.da DCDj|
0000f150  6f 3a 2e 77 60 20 44 43  44 77 6e 3a 2e 49 6f 20  |o:.w` DCDwn:.Io |
0000f160  44 43 44 58 6e 3a 2e 63  60 20 44 43 44 78 6e 3a  |DCDXn:.c` DCDxn:|
0000f170  2e 68 6f 20 44 43 44 41  60 3a 2e 6f 42 20 44 43  |.ho DCDA`:.oB DC|
0000f180  44 62 60 3a 2e 6b 42 20  44 43 44 56 4f 3a 5d 3a  |Db`:.kB DCDVO:]:|
0000f190  3d 30 0d 27 e0 28 dd a4  68 5f 73 74 72 69 6e 67  |=0.'.(..h_string|
0000f1a0  3a ea 85 3a ee 85 ea f7  85 3a f2 41 28 22 40 2e  |:..:.....:.A("@.|
0000f1b0  68 2e 73 74 72 69 6e 67  22 29 0d 27 e1 53 50 25  |h.string").'.SP%|
0000f1c0  3d 30 3a 5b 4f 50 54 56  25 3a 2e 4e 60 20 44 43  |=0:[OPTV%:.N` DC|
0000f1d0  42 30 3a 2e 41 6f 20 44  43 42 30 3a 2e 68 6e 20  |B0:.Ao DCB0:.hn |
0000f1e0  44 43 42 30 3a 2e 7a 61  20 44 43 42 30 3a 2e 47  |DCB0:.za DCB0:.G|
0000f1f0  60 20 44 43 42 30 3a 2e  72 61 20 44 43 42 30 3a  |` DCB0:.ra DCB0:|
0000f200  2e 74 60 20 44 43 42 30  3a 5d 3a 3d 30 0d 27 e2  |.t` DCB0:]:=0.'.|
0000f210  30 dd a4 6a 75 6d 70 62  6c 6f 63 6b 5f 73 74 72  |0..jumpblock_str|
0000f220  69 6e 67 3a ea 85 3a ee  85 ea f7 85 3a f2 41 28  |ing:..:.....:.A(|
0000f230  22 40 2e 68 2e 73 74 72  69 6e 67 22 29 0d 27 e3  |"@.h.string").'.|
0000f240  f4 5b 4f 50 54 56 25 80  6e 79 25 3a 2e 6f 6e 20  |.[OPTV%.ny%:.on |
0000f250  44 43 44 4d 4f 3a 2e 77  61 20 44 43 44 72 42 3a  |DCDMO:.wa DCDrB:|
0000f260  2e 60 4f 20 44 43 44 79  60 3a 2e 62 4f 20 44 43  |.`O DCDy`:.bO DC|
0000f270  44 4b 4f 3a 2e 45 6e 20  44 43 44 6b 61 3a 2e 42  |DKO:.En DCDka:.B|
0000f280  4a 20 44 43 44 46 4f 3a  2e 59 75 20 44 43 44 6d  |J DCDFO:.Yu DCDm|
0000f290  60 3a 2e 74 79 20 44 43  44 65 60 3a 2e 54 6e 20  |`:.ty DCDe`:.Tn |
0000f2a0  44 43 44 67 42 3a 2e 44  6f 20 44 43 44 78 60 3a  |DCDgB:.Do DCDx`:|
0000f2b0  2e 75 61 20 44 43 44 5f  6f 3a 2e 53 42 20 44 43  |.ua DCD_o:.SB DC|
0000f2c0  44 6a 60 3a 2e 58 4f 20  44 43 44 71 4f 3a 2e 61  |Dj`:.XO DCDqO:.a|
0000f2d0  6f 20 44 43 44 76 60 3a  2e 62 42 20 44 43 44 6e  |o DCDv`:.bB DCDn|
0000f2e0  4f 3a 2e 69 6e 20 44 43  44 4b 42 3a 2e 69 61 20  |O:.in DCDKB:.ia |
0000f2f0  44 43 44 6b 60 3a 2e 41  42 20 44 43 44 70 61 3a  |DCDk`:.AB DCDpa:|
0000f300  2e 78 61 20 44 43 44 6c  6e 3a 2e 58 6f 20 44 43  |.xa DCDln:.Xo DC|
0000f310  44 6f 61 3a 2e 51 6b 20  44 43 44 4f 6e 3a 2e 4d  |Doa:.Qk DCDOn:.M|
0000f320  6e 20 44 43 44 52 42 3a  2e 55 6b 20 44 43 44 59  |n DCDRB:.Uk DCDY|
0000f330  6e 0d 27 e4 c6 2e 70 60  20 44 43 44 6b 6f 3a 2e  |n.'...p` DCDko:.|
0000f340  51 42 20 44 43 44 63 42  3a 2e 6c 42 20 44 43 44  |QB DCDcB:.lB DCD|
0000f350  4a 6b 3a 2e 44 6e 20 44  43 44 43 4f 3a 2e 58 61  |Jk:.Dn DCDCO:.Xa|
0000f360  20 44 43 44 43 6b 3a 2e  6a 42 20 44 43 44 53 6e  | DCDCk:.jB DCDSn|
0000f370  3a 2e 4b 60 20 44 43 44  70 42 3a 2e 66 4f 20 44  |:.K` DCDpB:.fO D|
0000f380  43 44 76 6f 3a 2e 45 42  20 44 43 44 69 4f 3a 2e  |CDvo:.EB DCDiO:.|
0000f390  46 42 20 44 43 44 72 4f  3a 2e 73 60 20 44 43 44  |FB DCDrO:.s` DCD|
0000f3a0  79 4f 3a 2e 55 42 20 44  43 44 55 4f 3a 2e 67 61  |yO:.UB DCDUO:.ga|
0000f3b0  20 44 43 44 57 61 3a 2e  5f 60 20 44 43 44 61 6e  | DCDWa:._` DCDan|
0000f3c0  3a 2e 4c 6e 20 44 43 44  4d 6b 3a 2e 47 6b 20 44  |:.Ln DCDMk:.Gk D|
0000f3d0  43 44 55 6e 3a 2e 62 6e  20 44 43 44 69 42 3a 2e  |CDUn:.bn DCDiB:.|
0000f3e0  77 6f 20 44 43 44 52 4f  3a 2e 6a 4f 20 44 43 44  |wo DCDRO:.jO DCD|
0000f3f0  4a 61 3a 5d 3a 3d 30 0d  27 e5 24 dd a4 68 5f 77  |Ja:]:=0.'.$..h_w|
0000f400  69 6d 70 3a ea 85 3a ee  85 ea f7 85 3a f2 41 28  |imp:..:.....:.A(|
0000f410  22 40 2e 68 2e 77 69 6d  70 22 29 0d 27 e6 f7 4e  |"@.h.wimp").'..N|
0000f420  61 3d 31 32 3a 7a 6e 3d  30 3a 50 25 3d 30 3a 5b  |a=12:zn=0:P%=0:[|
0000f430  4f 50 54 56 25 3a 2e 55  4a 20 44 43 42 30 3a 2e  |OPTV%:.UJ DCB0:.|
0000f440  46 5f 20 44 43 42 30 3a  2e 57 5f 20 44 43 42 30  |F_ DCB0:.W_ DCB0|
0000f450  3a 2e 67 79 20 44 43 42  30 3a 2e 41 75 20 44 43  |:.gy DCB0:.Au DC|
0000f460  42 30 3a 2e 62 5f 20 44  43 42 30 3a 2e 52 75 20  |B0:.b_ DCB0:.Ru |
0000f470  44 43 42 30 3a 2e 51 75  20 44 43 42 30 3a 2e 60  |DCB0:.Qu DCB0:.`|
0000f480  75 20 44 43 42 30 3a 2e  42 6f 20 44 43 42 30 3a  |u DCB0:.Bo DCB0:|
0000f490  2e 54 4f 20 44 43 42 30  3a 2e 77 75 20 44 43 42  |.TO DCB0:.wu DCB|
0000f4a0  30 3a 2e 50 4f 20 44 43  42 30 3a 2e 76 6e 20 44  |0:.PO DCB0:.vn D|
0000f4b0  43 42 30 3a 2e 59 4f 20  44 43 42 30 3a 2e 41 4f  |CB0:.YO DCB0:.AO|
0000f4c0  20 44 43 42 30 3a 2e 4f  4f 20 44 43 42 30 3a 5d  | DCB0:.OO DCB0:]|
0000f4d0  3a 50 25 3d 30 3a 5b 4f  50 54 56 25 3a 2e 51 61  |:P%=0:[OPTV%:.Qa|
0000f4e0  20 44 43 42 30 3a 2e 63  4f 20 44 43 42 30 3a 2e  | DCB0:.cO DCB0:.|
0000f4f0  79 4a 20 44 43 42 30 3a  2e 67 75 20 44 43 42 30  |yJ DCB0:.gu DCB0|
0000f500  3a 2e 43 61 20 44 43 42  30 3a 2e 4a 75 20 44 43  |:.Ca DCB0:.Ju DC|
0000f510  42 30 0d 27 e7 79 2e 62  75 20 44 43 42 30 3a 2e  |B0.'.y.bu DCB0:.|
0000f520  55 75 20 44 43 42 30 3a  2e 6e 61 20 44 43 42 30  |Uu DCB0:.na DCB0|
0000f530  3a 2e 4b 75 20 44 43 42  30 3a 2e 48 6f 20 44 43  |:.Ku DCB0:.Ho DC|
0000f540  42 30 3a 2e 60 61 20 44  43 42 30 3a 5d 3a 50 25  |B0:.`a DCB0:]:P%|
0000f550  3d 30 3a 5b 4f 50 54 56  25 3a 2e 68 61 20 44 43  |=0:[OPTV%:.ha DC|
0000f560  42 30 3a 2e 42 6b 20 44  43 42 30 3a 2e 69 60 20  |B0:.Bk DCB0:.i` |
0000f570  44 43 42 30 3a 2e 52 60  20 44 43 42 30 3a 2e 66  |DCB0:.R` DCB0:.f|
0000f580  6f 20 44 43 42 30 3a 5d  3a 3d 30 0d 27 e8 2c dd  |o DCB0:]:=0.'.,.|
0000f590  a4 6a 75 6d 70 62 6c 6f  63 6b 5f 77 69 6d 70 3a  |.jumpblock_wimp:|
0000f5a0  ea 85 3a ee 85 ea f7 85  3a f2 41 28 22 40 2e 68  |..:.....:.A("@.h|
0000f5b0  2e 77 69 6d 70 22 29 0d  27 e9 c7 5b 4f 50 54 56  |.wimp").'..[OPTV|
0000f5c0  25 80 6e 79 25 3a 2e 75  42 20 44 43 44 56 6e 3a  |%.ny%:.uB DCDVn:|
0000f5d0  2e 5a 60 20 44 43 44 51  6e 3a 2e 70 6e 20 44 43  |.Z` DCDQn:.pn DC|
0000f5e0  44 57 6b 3a 2e 4e 42 20  44 43 44 4b 6e 3a 2e 7a  |DWk:.NB DCDKn:.z|
0000f5f0  5f 20 44 43 44 63 61 3a  2e 77 69 20 44 43 44 62  |_ DCDca:.wi DCDb|
0000f600  61 3a 2e 6b 4a 20 44 43  44 6c 60 3a 2e 6f 4f 20  |a:.kJ DCDl`:.oO |
0000f610  44 43 44 4c 60 3a 2e 70  6c 20 44 43 44 60 42 3a  |DCDL`:.pl DCD`B:|
0000f620  2e 66 4a 20 44 43 44 50  6f 3a 2e 54 5f 20 44 43  |.fJ DCDPo:.T_ DC|
0000f630  44 55 6f 3a 2e 63 79 20  44 43 44 45 61 3a 2e 6a  |DUo:.cy DCDEa:.j|
0000f640  61 20 44 43 44 56 60 3a  2e 65 5f 20 44 43 44 5f  |a DCDV`:.e_ DCD_|
0000f650  42 3a 2e 49 6e 20 44 43  44 47 4f 3a 2e 55 6c 20  |B:.In DCDGO:.Ul |
0000f660  44 43 44 64 6e 3a 2e 64  75 20 44 43 44 62 6f 3a  |DCDdn:.du DCDbo:|
0000f670  2e 68 6c 20 44 43 44 4b  61 3a 5d 3a 3d 30 0d 27  |.hl DCDKa:]:=0.'|
0000f680  ea 18 dd a4 5f 66 69 6c  65 5f 69 6f 5f 76 65 72  |...._file_io_ver|
0000f690  73 69 6f 6e 3d 39 0d 27  eb 4f dd a4 5f 68 61 72  |sion=9.'.O.._har|
0000f6a0  64 5f 69 6e 69 74 69 61  6c 69 73 65 5f 66 69 6c  |d_initialise_fil|
0000f6b0  65 5f 69 6f ea 85 3a ee  85 ea f7 85 3a f2 41 28  |e_io..:.....:.A(|
0000f6c0  22 25 2e 66 69 6c 65 5f  69 6f 3a 20 68 61 72 64  |"%.file_io: hard|
0000f6d0  5f 69 6e 69 74 69 61 6c  69 73 65 5f 66 69 6c 65  |_initialise_file|
0000f6e0  5f 69 6f 22 29 0d 27 ec  63 f2 53 28 22 3c 42 61  |_io").'.c.S("<Ba|
0000f6f0  73 69 63 56 24 4c 69 62  3e 2e 43 68 65 63 6b 56  |sicV$Lib>.CheckV|
0000f700  61 72 73 22 2c 32 29 3a  f2 53 28 22 3c 42 61 73  |ars",2):.S("<Bas|
0000f710  69 63 56 24 4c 69 62 3e  2e 73 74 72 69 6e 67 22  |icV$Lib>.string"|
0000f720  2c 36 29 3a 65 6c 25 3d  32 35 36 2b 32 30 3a de  |,6):el%=256+20:.|
0000f730  4a 69 25 65 6c 25 3a de  75 61 25 39 3a 75 61 25  |Ji%el%:.ua%9:ua%|
0000f740  3f 38 3d 31 33 3a 3d 30  0d 27 ed 26 dd a4 46 79  |?8=13:=0.'.&..Fy|
0000f750  28 54 24 29 ea 42 61 25  3a c8 99 38 2c 35 2c 54  |(T$).Ba%:..8,5,T|
0000f760  24 b8 42 61 25 3a 3d 28  42 61 25 3d 31 29 0d 27  |$.Ba%:=(Ba%=1).'|
0000f770  ee 4a dd a4 54 79 28 54  24 29 ea 68 25 2c 44 69  |.J..Ty(T$).h%,Di|
0000f780  25 3a c8 99 38 2c 35 2c  54 24 b8 44 69 25 2c 2c  |%:..8,5,T$.Di%,,|
0000f790  2c 2c 68 25 3a e7 44 69  25 3d 30 8c 85 31 2c 22  |,,h%:.Di%=0..1,"|
0000f7a0  46 69 6c 65 20 6e 6f 74  20 66 6f 75 6e 64 20 28  |File not found (|
0000f7b0  22 2b 54 24 2b 22 29 22  0d 27 ef 07 3d 68 25 0d  |"+T$+")".'..=h%.|
0000f7c0  27 f0 20 dd f2 5f 4a 28  54 24 2c 67 61 25 29 c8  |'. .._J(T$,ga%).|
0000f7d0  99 38 2c 32 35 35 2c 54  24 2c 67 61 25 3a e1 0d  |.8,255,T$,ga%:..|
0000f7e0  27 f1 44 dd a4 5f 79 28  67 24 2c 55 24 2c f8 52  |'.D.._y(g$,U$,.R|
0000f7f0  5f 25 29 ea 6d 69 25 3a  ea 85 3a ee 85 ea f7 85  |_%).mi%:..:.....|
0000f800  3a f2 41 28 22 25 2e 66  69 6c 65 5f 69 6f 3a 20  |:.A("%.file_io: |
0000f810  4f 53 5f 47 42 50 42 5f  52 65 61 64 45 6e 74 72  |OS_GBPB_ReadEntr|
0000f820  79 22 29 0d 27 f2 33 c8  99 26 32 30 30 30 63 2c  |y").'.3..&2000c,|
0000f830  31 30 2c 67 24 2c 4a 69  25 2c 31 2c 52 5f 25 2c  |10,g$,Ji%,1,R_%,|
0000f840  65 6c 25 2c 55 24 b8 2c  2c 2c 6d 69 25 2c 52 5f  |el%,U$.,,,mi%,R_|
0000f850  25 3a 3d 6d 69 25 0d 27  f3 3a dd a4 62 79 ea 85  |%:=mi%.'.:..by..|
0000f860  3a ee 85 ea f7 85 3a f2  41 28 22 25 2e 66 69 6c  |:.....:.A("%.fil|
0000f870  65 5f 69 6f 3a 20 66 69  6c 65 5f 6f 62 6a 65 63  |e_io: file_objec|
0000f880  74 5f 6c 6f 61 64 5f 61  64 64 72 65 73 73 22 29  |t_load_address")|
0000f890  0d 27 f4 09 3d 21 4a 69  25 0d 27 f5 32 dd a4 57  |.'..=!Ji%.'.2..W|
0000f8a0  79 ea 85 3a ee 85 ea f7  85 3a f2 41 28 22 25 2e  |y..:.....:.A("%.|
0000f8b0  66 69 6c 65 5f 69 6f 3a  20 66 69 6c 65 5f 6f 62  |file_io: file_ob|
0000f8c0  6a 65 63 74 5f 6e 61 6d  65 22 29 0d 27 f6 0f 3d  |ject_name").'..=|
0000f8d0  a4 4e 28 4a 69 25 2b 32  30 29 0d 27 f7 3b dd a4  |.N(Ji%+20).'.;..|
0000f8e0  4a 79 ea 54 25 3a ea 85  3a ee 85 ea f7 85 3a f2  |Jy.T%:..:.....:.|
0000f8f0  41 28 22 25 2e 66 69 6c  65 5f 69 6f 3a 20 66 69  |A("%.file_io: fi|
0000f900  6c 65 5f 6f 62 6a 65 63  74 5f 66 69 6c 65 5f 74  |le_object_file_t|
0000f910  79 70 65 22 29 0d 27 f8  23 54 25 3d a4 62 79 3a  |ype").'.#T%=.by:|
0000f920  e7 28 54 25 80 2d 31 30  34 38 35 37 36 29 3d 2d  |.(T%.-1048576)=-|
0000f930  31 30 34 38 35 37 36 8c  0d 27 f9 15 54 25 3d 28  |1048576..'..T%=(|
0000f940  54 25 80 26 66 66 66 30  30 29 3e 3e 38 0d 27 fa  |T%.&fff00)>>8.'.|
0000f950  0a cc 54 25 3d 2d 31 0d  27 fb 09 cd 3a 3d 54 25  |..T%=-1.'...:=T%|
0000f960  0d 27 fc 19 dd a4 5f 46  69 6c 65 54 79 70 65 5f  |.'...._FileType_|
0000f970  76 65 72 73 69 6f 6e 3d  31 0d 27 fd 52 dd a4 5f  |version=1.'.R.._|
0000f980  68 61 72 64 5f 69 6e 69  74 69 61 6c 69 73 65 5f  |hard_initialise_|
0000f990  46 69 6c 65 54 79 70 65  ea 85 3a ee 85 ea f7 85  |FileType..:.....|
0000f9a0  3a f2 41 28 22 25 2e 46  69 6c 65 54 79 70 65 3a  |:.A("%.FileType:|
0000f9b0  20 68 61 72 64 5f 69 6e  69 74 69 61 6c 69 73 65  | hard_initialise|
0000f9c0  5f 46 69 6c 65 54 79 70  65 22 29 0d 27 fe 26 58  |_FileType").'.&X|
0000f9d0  42 3d 34 30 39 35 3a 53  4a 3d 34 30 39 33 3a 71  |B=4095:SJ=4093:q|
0000f9e0  42 3d 34 30 39 31 3a 47  6f 3d 34 30 38 39 3a 3d  |B=4091:Go=4089:=|
0000f9f0  30 0d 27 ff 15 dd a4 5f  48 65 61 70 5f 76 65 72  |0.'...._Heap_ver|
0000fa00  73 69 6f 6e 3d 38 0d 28  00 46 dd a4 5f 68 61 72  |sion=8.(.F.._har|
0000fa10  64 5f 69 6e 69 74 69 61  6c 69 73 65 5f 48 65 61  |d_initialise_Hea|
0000fa20  70 ea 85 3a ee 85 ea f7  85 3a f2 41 28 22 25 2e  |p..:.....:.A("%.|
0000fa30  48 65 61 70 3a 20 68 61  72 64 5f 69 6e 69 74 69  |Heap: hard_initi|
0000fa40  61 6c 69 73 65 5f 48 65  61 70 22 29 0d 28 01 06  |alise_Heap").(..|
0000fa50  3d 30 0d 28 02 1b dd a4  52 79 28 68 25 29 ea 54  |=0.(....Ry(h%).T|
0000fa60  25 3a e7 a4 42 28 54 25  2c 68 25 29 8c 0d 28 03  |%:..B(T%,h%)..(.|
0000fa70  19 68 25 3d 21 66 79 25  3a 85 21 68 25 2c a4 4e  |.h%=!fy%:.!h%,.N|
0000fa80  28 68 25 2b 34 29 0d 28  04 09 cd 3a 3d 54 25 0d  |(h%+4).(...:=T%.|
0000fa90  28 05 26 dd a4 42 28 f8  51 4a 25 2c 41 25 29 51  |(.&..B(.QJ%,A%)Q|
0000faa0  4a 25 3d ba 28 6b 69 25  29 3a e7 21 66 79 25 8c  |J%=.(ki%):.!fy%.|
0000fab0  51 4a 25 3d 30 0d 28 06  09 3d 21 66 79 25 0d 28  |QJ%=0.(..=!fy%.(|
0000fac0  07 1c dd f2 58 28 f8 51  4a 25 2c 68 25 29 e7 a4  |....X(.QJ%,h%)..|
0000fad0  42 28 51 4a 25 2c 68 25  29 8c 0d 28 08 1c 51 4a  |B(QJ%,h%)..(..QJ|
0000fae0  25 3d 21 66 79 25 3a 85  21 51 4a 25 2c a4 4e 28  |%=!fy%:.!QJ%,.N(|
0000faf0  51 4a 25 2b 34 29 0d 28  09 07 cd 3a e1 0d 28 0a  |QJ%+4).(...:..(.|
0000fb00  15 dd f2 57 28 f8 41 25  29 e7 a4 50 79 28 41 25  |...W(.A%)..Py(A%|
0000fb10  29 8c 0d 28 0b 19 41 25  3d 21 66 79 25 3a 85 21  |)..(..A%=!fy%:.!|
0000fb20  41 25 2c a4 4e 28 41 25  2b 34 29 0d 28 0c 07 cd  |A%,.N(A%+4).(...|
0000fb30  3a e1 0d 28 0d 1c dd a4  50 79 28 f8 41 25 29 d6  |:..(....Py(.A%).|
0000fb40  51 61 25 3a 41 25 3d 30  3a 3d 21 66 79 25 0d 28  |Qa%:A%=0:=!fy%.(|
0000fb50  0e 1d dd f2 60 28 f8 51  4a 25 2c 68 25 29 e7 a4  |....`(.QJ%,h%)..|
0000fb60  7a 79 28 51 4a 25 2c 68  25 29 8c 0d 28 0f 19 68  |zy(QJ%,h%)..(..h|
0000fb70  25 3d 21 66 79 25 3a 85  21 68 25 2c a4 4e 28 68  |%=!fy%:.!h%,.N(h|
0000fb80  25 2b 34 29 0d 28 10 07  cd 3a e1 0d 28 11 1f dd  |%+4).(...:..(...|
0000fb90  a4 7a 79 28 f8 41 25 2c  42 25 29 41 25 3d ba 28  |.zy(.A%,B%)A%=.(|
0000fba0  78 61 25 29 3a 3d 21 66  79 25 0d 28 12 28 dd f2  |xa%):=!fy%.(.(..|
0000fbb0  51 5f ea 85 3a ee 85 ea  f7 85 3a f2 41 28 22 25  |Q_..:.....:.A("%|
0000fbc0  2e 48 65 61 70 3a 20 61  73 73 65 6d 62 6c 65 72  |.Heap: assembler|
0000fbd0  22 29 0d 28 13 3e 5b 4f  50 54 56 25 3a a4 71 28  |").(.>[OPTV%:.q(|
0000fbe0  6b 69 25 2c 64 4a 29 3a  a4 71 28 51 61 25 2c 43  |ki%,dJ):.q(Qa%,C|
0000fbf0  75 29 3a a4 71 28 78 61  25 2c 7a 6c 29 3a 41 4c  |u):.q(xa%,zl):AL|
0000fc00  49 47 4e 3a 2e 66 79 25  44 43 44 30 3a 5d 3a e1  |IGN:.fy%DCD0:]:.|
0000fc10  0d 28 14 6d dd a4 71 28  f8 70 61 25 2c 69 61 25  |.(.m..q(.pa%,ia%|
0000fc20  29 5b 4f 50 54 56 25 3a  41 4c 49 47 4e 3a 2e 70  |)[OPTV%:ALIGN:.p|
0000fc30  61 25 3a a4 5a 3a 53 54  4d 46 44 28 41 29 21 2c  |a%:.Z:STMFD(A)!,|
0000fc40  7b 5a 7d 3a 4d 4f 56 20  5a 2c 23 30 3a 53 54 52  |{Z}:MOV Z,#0:STR|
0000fc50  20 5a 2c 66 79 25 3a 42  4c 20 69 61 25 3a 53 54  | Z,fy%:BL ia%:ST|
0000fc60  52 76 73 30 2c 66 79 25  3a 4c 44 4d 46 44 28 41  |Rvs0,fy%:LDMFD(A|
0000fc70  29 21 2c 7b 70 63 7d 5e  3a 5d 3a 3d 30 0d 28 15  |)!,{pc}^:]:=0.(.|
0000fc80  18 dd a4 5f 49 6e 74 4d  61 74 68 5f 76 65 72 73  |..._IntMath_vers|
0000fc90  69 6f 6e 3d 34 0d 28 16  20 dd a4 5f 68 61 72 64  |ion=4.(. .._hard|
0000fca0  5f 69 6e 69 74 69 61 6c  69 73 65 5f 49 6e 74 4d  |_initialise_IntM|
0000fcb0  61 74 68 3d 30 0d 28 17  18 dd a4 53 28 64 25 2c  |ath=0.(....S(d%,|
0000fcc0  45 25 29 e7 64 25 3e 45  25 8c 3d 64 25 0d 28 18  |E%).d%>E%.=d%.(.|
0000fcd0  07 3d 45 25 0d 28 19 18  dd a4 50 28 64 25 2c 45  |.=E%.(....P(d%,E|
0000fce0  25 29 e7 64 25 3e 45 25  8c 3d 45 25 0d 28 1a 07  |%).d%>E%.=E%.(..|
0000fcf0  3d 64 25 0d 28 1b 19 dd  a4 5f 4d 6f 64 65 49 6e  |=d%.(...._ModeIn|
0000fd00  66 6f 5f 76 65 72 73 69  6f 6e 3d 35 0d 28 1c 21  |fo_version=5.(.!|
0000fd10  dd a4 5f 68 61 72 64 5f  69 6e 69 74 69 61 6c 69  |.._hard_initiali|
0000fd20  73 65 5f 4d 6f 64 65 49  6e 66 6f 3d 30 0d 28 1d  |se_ModeInfo=0.(.|
0000fd30  f1 dd f2 49 4a 28 61 79  25 29 c8 99 35 33 2c 61  |...IJ(ay%)..53,a|
0000fd40  79 25 2c 31 b8 2c 2c 69  6c 25 3a 69 6c 25 2b 3d  |y%,1.,,il%:il%+=|
0000fd50  31 3a c8 99 35 33 2c 61  79 25 2c 32 b8 2c 2c 62  |1:..53,ay%,2.,,b|
0000fd60  6c 25 3a 62 6c 25 2b 3d  31 3a c8 99 35 33 2c 61  |l%:bl%+=1:..53,a|
0000fd70  79 25 2c 33 b8 2c 2c 6d  6c 25 3a 6d 6c 25 2b 3d  |y%,3.,,ml%:ml%+=|
0000fd80  31 3a c8 99 35 33 2c 61  79 25 2c 34 b8 2c 2c 53  |1:..53,ay%,4.,,S|
0000fd90  79 25 3a c8 99 35 33 2c  61 79 25 2c 35 b8 2c 2c  |y%:..53,ay%,5.,,|
0000fda0  6d 25 3a c8 99 35 33 2c  61 79 25 2c 36 b8 2c 2c  |m%:..53,ay%,6.,,|
0000fdb0  6c 61 25 3a c8 99 35 33  2c 61 79 25 2c 37 b8 2c  |la%:..53,ay%,7.,|
0000fdc0  2c 5f 6e 25 3a c8 99 35  33 2c 61 79 25 2c 39 b8  |,_n%:..53,ay%,9.|
0000fdd0  2c 2c 47 61 25 3a 46 6c  25 3d 31 3c 3c 47 61 25  |,,Ga%:Fl%=1<<Ga%|
0000fde0  3a c8 99 35 33 2c 61 79  25 2c 31 31 b8 2c 2c 59  |:..53,ay%,11.,,Y|
0000fdf0  75 25 3a 59 75 25 2b 3d  31 3a c8 99 35 33 2c 61  |u%:Yu%+=1:..53,a|
0000fe00  79 25 2c 31 32 b8 2c 2c  77 5f 25 3a 77 5f 25 2b  |y%,12.,,w_%:w_%+|
0000fe10  3d 31 3a 6f 61 25 3d 59  75 25 81 69 6c 25 0d 28  |=1:oa%=Yu%.il%.(|
0000fe20  1e 3d 79 61 25 3d 77 5f  25 81 62 6c 25 3a 53 69  |.=ya%=w_%.bl%:Si|
0000fe30  25 3d 28 59 75 25 3c 3c  53 79 25 29 2d 31 3a 46  |%=(Yu%<<Sy%)-1:F|
0000fe40  69 25 3d 28 77 5f 25 3c  3c 6d 25 29 2d 31 3a 68  |i%=(w_%<<m%)-1:h|
0000fe50  61 25 3d 33 32 81 46 6c  25 3a e1 0d 28 1f 16 dd  |a%=32.Fl%:..(...|
0000fe60  a4 5f 57 69 6d 70 5f 76  65 72 73 69 6f 6e 3d 32  |._Wimp_version=2|
0000fe70  38 0d 28 20 4b dd a4 5f  68 61 72 64 5f 69 6e 69  |8.( K.._hard_ini|
0000fe80  74 69 61 6c 69 73 65 5f  57 69 6d 70 ea 58 79 25  |tialise_Wimp.Xy%|
0000fe90  3a ea 85 3a ee 85 ea f7  85 3a f2 41 28 22 25 2e  |:..:.....:.A("%.|
0000fea0  57 69 6d 70 3a 20 68 61  72 64 5f 69 6e 69 74 69  |Wimp: hard_initi|
0000feb0  61 6c 69 73 65 5f 57 69  6d 70 22 29 0d 28 21 0b  |alise_Wimp").(!.|
0000fec0  e7 a4 76 3c 31 32 8c 0d  28 22 3b 85 31 2c 22 25  |..v<12..(";.1,"%|
0000fed0  2e 57 69 6d 70 20 6e 65  65 64 73 20 6d 6f 72 65  |.Wimp needs more|
0000fee0  20 72 65 63 65 6e 74 20  76 65 72 73 69 6f 6e 20  | recent version |
0000fef0  6f 66 20 74 68 65 20 4c  69 62 48 61 6e 64 6c 65  |of the LibHandle|
0000ff00  72 22 0d 28 23 1c cd 3a  c8 99 26 34 30 30 66 32  |r".(#..:..&400f2|
0000ff10  2c 30 b8 58 79 25 3a e7  58 79 25 3d 30 8c 0d 28  |,0.Xy%:.Xy%=0..(|
0000ff20  24 35 85 30 2c 22 41 70  70 6c 69 63 61 74 69 6f  |$5.0,"Applicatio|
0000ff30  6e 20 6e 65 65 64 73 20  74 6f 20 62 65 20 72 75  |n needs to be ru|
0000ff40  6e 20 66 72 6f 6d 20 74  68 65 20 64 65 73 6b 74  |n from the deskt|
0000ff50  6f 70 22 0d 28 25 e7 cd  3a f2 53 28 22 3c 42 61  |op".(%..:.S("<Ba|
0000ff60  73 69 63 56 24 4c 69 62  3e 2e 48 65 61 70 22 2c  |sicV$Lib>.Heap",|
0000ff70  38 29 3a f2 53 28 22 3c  42 61 73 69 63 56 24 4c  |8):.S("<BasicV$L|
0000ff80  69 62 3e 2e 4d 65 73 73  61 67 65 22 2c 33 29 3a  |ib>.Message",3):|
0000ff90  f2 53 28 22 3c 42 61 73  69 63 56 24 4c 69 62 3e  |.S("<BasicV$Lib>|
0000ffa0  2e 54 65 6d 70 6c 61 74  65 22 2c 31 29 3a 6e 4a  |.Template",1):nJ|
0000ffb0  25 3d a3 3a 71 4a 25 3d  33 2a 31 30 32 34 3a f2  |%=.:qJ%=3*1024:.|
0000ffc0  58 28 65 75 25 2c 71 4a  25 29 3a 71 4a 25 2b 3d  |X(eu%,qJ%):qJ%+=|
0000ffd0  65 75 25 3a 41 4a 25 3d  65 75 25 3a f2 58 28 57  |eu%:AJ%=eu%:.X(W|
0000ffe0  25 2c 35 31 32 29 3a 79  24 3d 22 22 3a 65 24 3d  |%,512):y$="":e$=|
0000fff0  22 22 3a 77 69 25 3d 30  3a 42 24 3d 22 41 70 70  |"":wi%=0:B$="App|
00010000  6c 69 63 61 74 69 6f 6e  22 3a 48 24 3d 22 30 2e  |lication":H$="0.|
00010010  30 30 20 28 30 31 2d 4a  61 6e 2d 31 39 30 30 29  |00 (01-Jan-1900)|
00010020  22 3a 64 5f 25 3d 2d 31  3a 70 5f 25 3d 32 34 30  |":d_%=-1:p_%=240|
00010030  30 3a 56 79 25 3d 32 34  30 31 0d 28 26 1e 59 6e  |0:Vy%=2401.(&.Yn|
00010040  25 3d 31 36 2a 31 30 32  34 3a 52 79 25 3d a3 3a  |%=16*1024:Ry%=.:|
00010050  4e 24 3d 22 22 3a 3d 30  0d 28 27 31 dd a4 49 79  |N$="":=0.('1..Iy|
00010060  28 64 24 29 ea 64 25 2c  43 25 2c 53 24 3a c8 99  |(d$).d%,C%,S$:..|
00010070  26 36 30 30 66 32 2c 32  b8 64 25 3b 43 25 3a e7  |&600f2,2.d%;C%:.|
00010080  28 43 25 80 31 29 3d 30  8c 0d 28 28 22 53 24 3d  |(C%.1)=0..(("S$=|
00010090  bd 3f 64 25 2b bd 64 25  3f 31 3a 64 25 3d 8e 28  |.?d%+.d%?1:d%=.(|
000100a0  64 24 2b 53 24 29 3a e7  64 25 8c 0d 28 29 0f d9  |d$+S$):.d%..()..|
000100b0  23 64 25 3a 64 24 2b 3d  53 24 0d 28 2a 05 cd 0d  |#d%:d$+=S$.(*...|
000100c0  28 2b 09 cd 3a 3d 64 24  0d 28 2c 23 dd f2 42 75  |(+..:=d$.(,#..Bu|
000100d0  28 42 79 25 29 e7 42 79  25 3e 30 8c c8 99 26 64  |(By%).By%>0...&d|
000100e0  63 62 38 64 2c 67 75 2c  42 79 25 0d 28 2d 05 e1  |cb8d,gu,By%.(-..|
000100f0  0d 28 2e 14 dd f2 52 28  f8 42 79 25 29 e7 42 79  |.(....R(.By%).By|
00010100  25 3e 30 8c 0d 28 2f 34  ea 44 25 3a 44 25 3d a4  |%>0..(/4.D%:D%=.|
00010110  4d 28 34 29 3a 21 44 25  3d 42 79 25 3a c8 99 26  |M(4):!D%=By%:..&|
00010120  34 30 30 63 33 2c 2c 44  25 3a f2 43 28 44 25 2c  |400c3,,D%:.C(D%,|
00010130  34 29 3a 42 79 25 3d 30  0d 28 30 07 cd 3a e1 0d  |4):By%=0.(0..:..|
00010140  28 31 21 dd a4 6a 28 42  79 25 29 c8 99 26 64 63  |(1!..j(By%)..&dc|
00010150  62 38 64 2c 79 4a 2c 42  79 25 2c 2d 31 3a 3d b9  |b8d,yJ,By%,-1:=.|
00010160  0d 28 32 28 dd f2 70 79  28 42 79 25 2c 59 24 29  |.(2(..py(By%,Y$)|
00010170  c8 99 26 64 63 62 38 64  2c 4a 75 2c 42 79 25 2c  |..&dcb8d,Ju,By%,|
00010180  59 24 2c 30 2c 30 3a e1  0d 28 33 1e dd f2 56 79  |Y$,0,0:..(3...Vy|
00010190  28 42 79 25 2c 57 61 25  2c 53 61 25 2c 71 6e 25  |(By%,Wa%,Sa%,qn%|
000101a0  29 e7 71 6e 25 8c 0d 28  34 1b c8 99 26 64 63 62  |).qn%..(4...&dcb|
000101b0  38 64 2c 62 75 2c 42 79  25 2c 57 61 25 2c 53 61  |8d,bu,By%,Wa%,Sa|
000101c0  25 0d 28 35 68 cc ea 55  25 3a 55 25 3d a4 4d 28  |%.(5h..U%:U%=.M(|
000101d0  31 36 29 3a 21 55 25 3d  30 3a 55 25 21 34 3d 2d  |16):!U%=0:U%!4=-|
000101e0  53 61 25 80 ac 28 28 31  3c 3c 6d 25 29 2d 31 29  |Sa%..((1<<m%)-1)|
000101f0  3a 55 25 21 38 3d 57 61  25 80 ac 28 28 31 3c 3c  |:U%!8=Wa%..((1<<|
00010200  53 79 25 29 2d 31 29 3a  55 25 21 31 32 3d 30 3a  |Sy%)-1):U%!12=0:|
00010210  c8 99 26 34 30 30 64 37  2c 42 79 25 2c 55 25 3a  |..&400d7,By%,U%:|
00010220  f2 43 28 55 25 2c 31 36  29 0d 28 36 07 cd 3a e1  |.C(U%,16).(6..:.|
00010230  0d 28 37 28 dd f2 56 4a  28 f8 4d 25 2c 60 61 25  |.(7(..VJ(.M%,`a%|
00010240  29 c8 99 26 64 63 62 38  64 2c 4b 75 2c 4d 25 2c  |)..&dcb8d,Ku,M%,|
00010250  60 61 25 b8 4d 25 3a e1  0d 28 38 1e dd f2 46 79  |`a%.M%:..(8...Fy|
00010260  28 42 79 25 29 c8 99 26  64 63 62 38 64 2c 55 75  |(By%)..&dcb8d,Uu|
00010270  2c 42 79 25 3a e1 0d 28  39 59 dd f2 59 28 4d 25  |,By%:..(9Y..Y(M%|
00010280  2c 7a 6e 25 29 ea 44 25  3a 44 25 3d a4 4d 28 31  |,zn%).D%:D%=.M(1|
00010290  32 38 29 3a 21 44 25 3d  4d 25 3a c8 99 26 34 30  |28):!D%=M%:..&40|
000102a0  30 63 62 2c 2c 44 25 3a  44 25 21 32 38 3d 7a 6e  |0cb,,D%:D%!28=zn|
000102b0  25 3a c8 99 26 34 30 30  65 37 2c 32 2c 44 25 2c  |%:..&400e7,2,D%,|
000102c0  4d 25 3a f2 43 28 44 25  2c 31 32 38 29 3a e1 0d  |M%:.C(D%,128):..|
000102d0  28 3a 70 dd f2 51 75 28  42 79 25 2c 49 25 2c 76  |(:p..Qu(By%,I%,v|
000102e0  69 25 2c 56 6e 25 2c 54  6e 25 29 ea 55 25 3a 55  |i%,Vn%,Tn%).U%:U|
000102f0  25 3d a4 4d 28 31 36 29  3a 55 25 21 30 3d 42 79  |%=.M(16):U%!0=By|
00010300  25 3a 55 25 21 34 3d 49  25 3a 55 25 21 38 3d 56  |%:U%!4=I%:U%!8=V|
00010310  6e 25 3c 3c 76 69 25 3a  55 25 21 31 32 3d 54 6e  |n%<<vi%:U%!12=Tn|
00010320  25 3c 3c 76 69 25 3a c8  99 26 34 30 30 63 64 2c  |%<<vi%:..&400cd,|
00010330  2c 55 25 3a f2 43 28 55  25 2c 31 36 29 3a e1 0d  |,U%:.C(U%,16):..|
00010340  28 3b 28 dd a4 5f 28 42  79 25 2c 49 25 29 c8 99  |(;(.._(By%,I%)..|
00010350  26 64 63 62 38 63 2c 60  75 2c 42 79 25 2c 49 25  |&dcb8c,`u,By%,I%|
00010360  b8 49 25 3a 3d 49 25 0d  28 3c 2b dd f2 54 28 42  |.I%:=I%.(<+..T(B|
00010370  79 25 2c 49 25 2c 5a 61  25 29 c8 99 26 64 63 62  |y%,I%,Za%)..&dcb|
00010380  38 63 2c 51 75 2c 42 79  25 2c 49 25 2c 5a 61 25  |8c,Qu,By%,I%,Za%|
00010390  3a e1 0d 28 3d 2c dd f2  5a 79 28 42 79 25 2c 49  |:..(=,..Zy(By%,I|
000103a0  25 2c 5a 61 25 29 c8 99  26 64 63 62 38 63 2c 77  |%,Za%)..&dcb8c,w|
000103b0  75 2c 42 79 25 2c 49 25  2c 5a 61 25 3a e1 0d 28  |u,By%,I%,Za%:..(|
000103c0  3e 3a dd f2 46 5f 28 4d  25 2c 49 25 2c 5a 6e 25  |>:..F_(M%,I%,Zn%|
000103d0  2c 41 6c 25 2c 49 6c 25  29 c8 99 26 64 63 62 38  |,Al%,Il%)..&dcb8|
000103e0  63 2c 41 75 2c 4d 25 2c  49 25 2c 5a 6e 25 2c 41  |c,Au,M%,I%,Zn%,A|
000103f0  6c 25 2c 49 6c 25 3a e1  0d 28 3f 3b dd f2 51 79  |l%,Il%:..(?;..Qy|
00010400  28 4d 25 2c 49 25 2c 45  25 2c 73 6e 25 2c 48 6e  |(M%,I%,E%,sn%,Hn|
00010410  25 2c 70 69 25 2c 41 6c  25 2c 49 6c 25 29 e7 28  |%,pi%,Al%,Il%).(|
00010420  49 25 3d 48 6e 25 29 82  28 28 45 25 80 34 29 3d  |I%=Hn%).((E%.4)=|
00010430  34 29 8c 0d 28 40 1a f2  46 5f 28 4d 25 2c 70 69  |4)..(@..F_(M%,pi|
00010440  25 2c 2b 31 2c 41 6c 25  2c 49 6c 25 29 0d 28 41  |%,+1,Al%,Il%).(A|
00010450  1b cc f2 46 5f 28 4d 25  2c 70 69 25 2c 2d 31 2c  |...F_(M%,pi%,-1,|
00010460  41 6c 25 2c 49 6c 25 29  0d 28 42 07 cd 3a e1 0d  |Al%,Il%).(B..:..|
00010470  28 43 25 dd f2 7a 5f 28  4d 25 2c 4a 25 29 c8 99  |(C%..z_(M%,J%)..|
00010480  26 64 63 62 38 63 2c 62  5f 2c 4d 25 2c 4a 25 2c  |&dcb8c,b_,M%,J%,|
00010490  2b 31 3a e1 0d 28 44 25  dd f2 43 4a 28 4d 25 2c  |+1:..(D%..CJ(M%,|
000104a0  4a 25 29 c8 99 26 64 63  62 38 63 2c 62 5f 2c 4d  |J%)..&dcb8c,b_,M|
000104b0  25 2c 4a 25 2c 2d 31 3a  e1 0d 28 45 4a dd f2 46  |%,J%,-1:..(EJ..F|
000104c0  28 6e 69 25 2c 41 24 29  ea 55 25 3a 55 25 3d a4  |(ni%,A$).U%:U%=.|
000104d0  4d 28 33 30 30 29 3a 55  25 21 30 3d 6e 69 25 3a  |M(300):U%!0=ni%:|
000104e0  24 28 55 25 2b 34 29 3d  41 24 2b bd 28 30 29 3a  |$(U%+4)=A$+.(0):|
000104f0  f2 66 28 55 25 29 3a f2  43 28 55 25 2c 33 30 30  |.f(U%):.C(U%,300|
00010500  29 3a e1 0d 28 46 14 dd  f2 4e 28 41 24 29 85 70  |):..(F...N(A$).p|
00010510  5f 25 2c 41 24 3a e1 0d  28 47 4d dd f2 4c 28 6e  |_%,A$:..(GM..L(n|
00010520  69 25 29 ea 55 25 3a 55  25 3d a4 4d 28 33 30 30  |i%).U%:U%=.M(300|
00010530  29 3a 55 25 21 30 3d 56  79 25 3a f2 62 79 28 22  |):U%!0=Vy%:.by("|
00010540  4c 45 22 2b c3 28 6e 69  25 29 2c 55 25 2b 34 29  |LE"+.(ni%),U%+4)|
00010550  3a f2 66 28 55 25 29 3a  f2 43 28 55 25 2c 33 30  |:.f(U%):.C(U%,30|
00010560  30 29 3a e1 0d 28 48 1f  dd f2 66 28 49 6e 25 29  |0):..(H...f(In%)|
00010570  c8 99 26 34 30 30 64 66  2c 49 6e 25 2c 31 2c 42  |..&400df,In%,1,B|
00010580  24 3a e1 0d 28 49 67 dd  a4 61 28 61 69 25 2c 41  |$:..(Ig..a(ai%,A|
00010590  24 29 ea 55 25 2c 54 25  3a f2 50 3a 55 25 3d a4  |$).U%,T%:.P:U%=.|
000105a0  4d 28 32 36 30 29 3a 21  55 25 3d 30 3a 24 28 55  |M(260):!U%=0:$(U|
000105b0  25 2b 34 29 3d 41 24 2b  bd 28 30 29 3a c8 99 26  |%+4)=A$+.(0):..&|
000105c0  34 30 30 64 66 2c 55 25  2c 28 31 36 84 61 69 25  |400df,U%,(16.ai%|
000105d0  29 2c a4 77 28 30 29 b8  2c 54 25 3a f2 43 28 55  |),.w(0).,T%:.C(U|
000105e0  25 2c 32 36 30 29 3a 3d  54 25 0d 28 4a 99 dd f2  |%,260):=T%.(J...|
000105f0  50 4a ea 55 25 3a 55 25  3d a4 4d 28 32 35 36 29  |PJ.U%:U%=.M(256)|
00010600  3a 55 25 3f 30 3d 31 3a  55 25 3f 31 3d 30 3a 55  |:U%?0=1:U%?1=0:U|
00010610  25 3f 32 3d 30 3a 55 25  3f 33 3d 30 3a 55 25 3f  |%?2=0:U%?3=0:U%?|
00010620  34 3d 30 3a 55 25 3f 35  3d 53 69 25 83 32 35 36  |4=0:U%?5=Si%.256|
00010630  3a 55 25 3f 36 3d 53 69  25 81 32 35 36 3a 55 25  |:U%?6=Si%.256:U%|
00010640  3f 37 3d 46 69 25 83 32  35 36 3a 55 25 3f 38 3d  |?7=Fi%.256:U%?8=|
00010650  46 69 25 81 32 35 36 3a  c8 99 37 2c 32 31 2c 55  |Fi%.256:..7,21,U|
00010660  25 3a 21 55 25 3d 55 69  25 3a c8 99 26 34 30 30  |%:!U%=Ui%:..&400|
00010670  63 36 2c 2c 55 25 3a f2  43 28 55 25 2c 32 35 36  |c6,,U%:.C(U%,256|
00010680  29 3a e1 0d 28 4b 3d dd  f2 41 75 28 51 25 2c 58  |):..(K=..Au(Q%,X|
00010690  25 2c 45 25 2c 49 25 29  ea 85 3a ee 85 ea f7 85  |%,E%,I%)..:.....|
000106a0  3a f2 41 28 22 25 2e 57  69 6d 70 3a 20 4d 6f 75  |:.A("%.Wimp: Mou|
000106b0  73 65 5f 43 6c 69 63 6b  5f 51 75 65 72 79 22 29  |se_Click_Query")|
000106c0  0d 28 4c 35 f2 50 4a 3a  51 25 3d a4 4a 28 22 46  |.(L5.PJ:Q%=.J("F|
000106d0  4e 5f 53 74 6f 70 5f 41  63 74 69 6f 6e 5f 22 2b  |N_Stop_Action_"+|
000106e0  6e 24 2b 22 28 22 2b c3  28 49 25 3d 30 29 2b 22  |n$+"("+.(I%=0)+"|
000106f0  29 22 29 3a e1 0d 28 4d  35 dd a4 41 79 28 44 25  |)"):..(M5..Ay(D%|
00010700  29 ea 63 24 3a 63 24 3d  22 22 3a c8 95 3f 44 25  |).c$:c$="":..?D%|
00010710  3e 33 31 3a 63 24 2b 3d  bd 28 3f 44 25 29 3a 44  |>31:c$+=.(?D%):D|
00010720  25 2b 3d 31 3a ce 3a 3d  63 24 0d 28 4e 2f dd a4  |%+=1:.:=c$.(N/..|
00010730  4b 79 28 56 24 29 c8 95  a7 56 24 2c 22 2e 22 29  |Ky(V$)...V$,".")|
00010740  3a 56 24 3d c1 56 24 2c  a7 56 24 2c 22 2e 22 29  |:V$=.V$,.V$,".")|
00010750  2b 31 29 3a ce 3a 3d 56  24 0d 28 4f 29 dd f2 5f  |+1):.:=V$.(O).._|
00010760  28 42 79 25 2c 49 25 2c  52 24 29 c8 99 26 64 63  |(By%,I%,R$)..&dc|
00010770  62 38 63 2c 57 5f 2c 42  79 25 2c 49 25 2c 52 24  |b8c,W_,By%,I%,R$|
00010780  3a e1 0d 28 50 28 dd f2  65 79 28 4d 25 2c 4a 25  |:..(P(..ey(M%,J%|
00010790  2c 5f 25 29 c8 99 26 64  63 62 38 63 2c 57 5f 2c  |,_%)..&dcb8c,W_,|
000107a0  4d 25 2c 4a 25 2c 5f 25  3a e1 0d 28 51 27 dd f2  |M%,J%,_%:..(Q'..|
000107b0  5a 28 4d 25 2c 4a 25 2c  4b 25 29 c8 99 26 64 63  |Z(M%,J%,K%)..&dc|
000107c0  62 38 63 2c 67 79 2c 4d  25 2c 4a 25 2c 4b 25 3a  |b8c,gy,M%,J%,K%:|
000107d0  e1 0d 28 52 2b dd a4 73  28 4d 25 2c 4a 25 29 c8  |..(R+..s(M%,J%).|
000107e0  99 26 64 63 62 38 63 2c  55 4a 2c 4d 25 2c 4a 25  |.&dcb8c,UJ,M%,J%|
000107f0  b8 4d 25 3a 3d a4 41 79  28 4d 25 29 0d 28 53 27  |.M%:=.Ay(M%).(S'|
00010800  dd a4 77 79 28 4d 25 2c  4a 25 29 c8 99 26 64 63  |..wy(M%,J%)..&dc|
00010810  62 38 63 2c 55 4a 2c 4d  25 2c 4a 25 b8 4d 25 3a  |b8c,UJ,M%,J%.M%:|
00010820  3d 4d 25 0d 28 54 26 dd  a4 41 28 4d 25 2c 4a 25  |=M%.(T&..A(M%,J%|
00010830  29 c8 99 26 64 63 62 38  63 2c 46 5f 2c 4d 25 2c  |)..&dcb8c,F_,M%,|
00010840  4a 25 b8 4d 25 3a 3d 4d  25 0d 28 55 3c dd a4 62  |J%.M%:=M%.(U<..b|
00010850  28 54 24 29 ea 58 79 25  2c 7a 79 25 2c 52 25 3a  |(T$).Xy%,zy%,R%:|
00010860  c8 99 26 32 30 30 30 38  2c 31 37 2c 54 24 b8 58  |..&20008,17,T$.X|
00010870  79 25 2c 2c 2c 2c 7a 79  25 3b 52 25 3a e7 a4 55  |y%,,,,zy%;R%:..U|
00010880  28 52 25 29 8c 0d 28 56  2a f2 55 28 22 52 65 61  |(R%)..(V*.U("Rea|
00010890  73 6f 6e 22 2c a4 4b 79  28 54 24 29 29 3a f2 6f  |son",.Ky(T$)):.o|
000108a0  28 58 79 25 29 3a f2 4e  28 a4 77 28 34 29 29 0d  |(Xy%):.N(.w(4)).|
000108b0  28 57 0e cd 3a e7 58 79  25 3c 3e 31 8c 0d 28 58  |(W..:.Xy%<>1..(X|
000108c0  0a 7a 79 25 3d 2d 31 0d  28 59 0a cd 3a 3d 7a 79  |.zy%=-1.(Y..:=zy|
000108d0  25 0d 28 5a 1d dd a4 4d  28 68 25 29 ea 54 25 3a  |%.(Z...M(h%).T%:|
000108e0  e7 28 41 4a 25 2b 68 25  29 3c 71 4a 25 8c 0d 28  |.(AJ%+h%)<qJ%..(|
000108f0  5b 12 54 25 3d 41 4a 25  3a 41 4a 25 2b 3d 68 25  |[.T%=AJ%:AJ%+=h%|
00010900  0d 28 5c 1a cc f2 4e 28  22 57 69 6d 70 20 53 74  |.(\...N("Wimp St|
00010910  61 63 6b 20 66 75 6c 6c  22 29 0d 28 5d 09 cd 3a  |ack full").(]..:|
00010920  3d 54 25 0d 28 5e 12 dd  f2 4a 75 3a 41 4a 25 3d  |=T%.(^...Ju:AJ%=|
00010930  65 75 25 3a e1 0d 28 5f  24 dd f2 43 28 75 75 25  |eu%:..(_$..C(uu%|
00010940  2c 68 25 29 e7 28 75 75  25 3c 65 75 25 29 84 28  |,h%).(uu%<eu%).(|
00010950  75 75 25 3e 71 4a 25 29  8c 0d 28 60 2c f2 4e 28  |uu%>qJ%)..(`,.N(|
00010960  22 52 65 6c 65 61 73 65  5f 53 74 61 63 6b 3a 20  |"Release_Stack: |
00010970  49 6e 76 61 6c 69 64 20  73 74 61 63 6b 20 63 68  |Invalid stack ch|
00010980  75 6e 6b 22 29 0d 28 61  1c cc e7 28 68 25 3c 30  |unk").(a...(h%<0|
00010990  29 84 28 28 75 75 25 2b  68 25 29 3e 71 4a 25 29  |).((uu%+h%)>qJ%)|
000109a0  8c 0d 28 62 2b f2 4e 28  22 52 65 6c 65 61 73 65  |..(b+.N("Release|
000109b0  5f 53 74 61 63 6b 3a 20  49 6e 76 61 6c 69 64 20  |_Stack: Invalid |
000109c0  63 68 75 6e 6b 20 73 69  7a 65 22 29 0d 28 63 17  |chunk size").(c.|
000109d0  cc 41 4a 25 2d 3d 68 25  3a e7 41 4a 25 3c 3e 75  |.AJ%-=h%:.AJ%<>u|
000109e0  75 25 8c 0d 28 64 20 f2  4e 28 22 52 65 6c 65 61  |u%..(d .N("Relea|
000109f0  73 65 5f 53 74 61 63 6b  3a 20 42 61 64 20 70 6f  |se_Stack: Bad po|
00010a00  70 22 29 0d 28 65 05 cd  0d 28 66 05 cd 0d 28 67  |p").(e...(f...(g|
00010a10  07 cd 3a e1 0d 28 68 b1  dd f2 45 4a 28 47 24 2c  |..:..(h...EJ(G$,|
00010a20  47 79 25 2c 55 6e 25 2c  78 75 25 2c 52 6e 25 2c  |Gy%,Un%,xu%,Rn%,|
00010a30  72 61 25 29 48 24 3d c3  28 47 79 25 29 2b 22 2e  |ra%)H$=.(Gy%)+".|
00010a40  22 2b c2 22 30 22 2b c3  28 55 6e 25 29 2c 32 29  |"+."0"+.(Un%),2)|
00010a50  3a 48 24 2b 3d 22 20 28  22 2b c2 22 30 22 2b c3  |:H$+=" ("+."0"+.|
00010a60  28 78 75 25 29 2c 32 29  2b 22 2d 22 3a 48 24 2b  |(xu%),2)+"-":H$+|
00010a70  3d c1 22 43 42 4a 61 6e  46 65 62 4d 61 72 41 70  |=."CBJanFebMarAp|
00010a80  72 4d 61 79 4a 75 6e 4a  75 6c 41 75 67 53 65 70  |rMayJunJulAugSep|
00010a90  4f 63 74 4e 6f 76 44 65  63 22 2c 52 6e 25 2a 33  |OctNovDec",Rn%*3|
00010aa0  2c 33 29 3a 48 24 2b 3d  22 2d 22 2b c2 22 31 39  |,3):H$+="-"+."19|
00010ab0  22 2b c3 28 72 61 25 29  2c 34 29 2b 22 29 22 3a  |"+.(ra%),4)+")":|
00010ac0  42 24 3d 47 24 0d 28 69  56 f2 55 28 22 41 70 70  |B$=G$.(iV.U("App|
00010ad0  22 2c 42 24 29 3a c8 99  33 35 2c 42 24 2b 22 24  |",B$):..35,B$+"$|
00010ae0  44 69 72 22 2c 57 25 2c  32 35 36 2c 30 2c 33 b8  |Dir",W%,256,0,3.|
00010af0  2c 2c 78 75 25 3a 57 25  3f 78 75 25 3d 31 33 3a  |,,xu%:W%?xu%=13:|
00010b00  de 66 69 25 78 75 25 2b  31 3a 24 66 69 25 3d 24  |.fi%xu%+1:$fi%=$|
00010b10  57 25 3a e7 4e 24 3c 3e  22 22 8c 0d 28 6a 99 78  |W%:.N$<>""..(j.x|
00010b20  75 25 3d a3 3a 77 75 25  3d 57 25 3a 47 79 25 3d  |u%=.:wu%=W%:Gy%=|
00010b30  a7 4e 24 2c 22 2c 22 29  3a c8 95 47 79 25 3c 3e  |.N$,","):..Gy%<>|
00010b40  30 3a 77 75 25 21 30 3d  a4 4a 28 c0 4e 24 2c 47  |0:wu%!0=.J(.N$,G|
00010b50  79 25 2d 31 29 29 3a 77  75 25 2b 3d 34 3a 4e 24  |y%-1)):wu%+=4:N$|
00010b60  3d c1 4e 24 2c 47 79 25  2b 31 29 3a 47 79 25 3d  |=.N$,Gy%+1):Gy%=|
00010b70  a7 4e 24 2c 22 2c 22 29  3a ce 3a 77 75 25 21 30  |.N$,","):.:wu%!0|
00010b80  3d a4 4a 28 4e 24 29 3a  77 75 25 21 34 3d 30 3a  |=.J(N$):wu%!4=0:|
00010b90  c8 99 26 34 30 30 63 30  2c 33 30 30 2c 26 34 62  |..&400c0,300,&4b|
00010ba0  35 33 34 31 35 34 2c 47  24 2c 57 25 b8 6a 75 25  |534154,G$,W%.ju%|
00010bb0  2c 64 5f 25 0d 28 6b 26  cc c8 99 26 34 30 30 63  |,d_%.(k&...&400c|
00010bc0  30 2c 32 30 30 2c 26 34  62 35 33 34 31 35 34 2c  |0,200,&4b534154,|
00010bd0  47 24 b8 6a 75 25 2c 64  5f 25 0d 28 6c 0b cd 3a  |G$.ju%,d_%.(l..:|
00010be0  ee 85 f2 6b 4a 0d 28 6d  16 c8 99 26 36 30 36 63  |...kJ.(m...&606c|
00010bf0  30 3a e7 6a 75 25 3c 32  30 30 8c 0d 28 6e 0e 85  |0:.ju%<200..(n..|
00010c00  70 5f 25 2c a4 77 28 35  29 0d 28 6f 0b cd 3a e7  |p_%,.w(5).(o..:.|
00010c10  52 79 25 8c 0d 28 70 10  c8 99 26 38 31 36 38 32  |Ry%..(p...&81682|
00010c20  2c 64 5f 25 0d 28 71 2a  cd 3a 6e 4a 25 3d b9 3a  |,d_%.(q*.:nJ%=.:|
00010c30  f2 75 5f 3a f2 44 4a 3a  6e 4a 25 3d 2d 32 3a f2  |.u_:.DJ:nJ%=-2:.|
00010c40  58 5f 3a f2 64 4a 3a e7  54 75 25 3d 30 8c 0d 28  |X_:.dJ:.Tu%=0..(|
00010c50  72 10 f2 5f 28 4e 5f 25  2c 37 2c 48 24 29 0d 28  |r.._(N_%,7,H$).(|
00010c60  73 50 cd 3a 50 6e 25 3d  2d 31 3a 4b 69 25 3d 2d  |sP.:Pn%=-1:Ki%=-|
00010c70  31 3a 78 6c 25 3d 2d 31  3a 70 75 25 3d 2d 31 3a  |1:xl%=-1:pu%=-1:|
00010c80  48 61 25 3d a3 3a 41 61  25 3d 2d 31 3a 64 61 25  |Ha%=.:Aa%=-1:da%|
00010c90  3d 2d 31 3a 4f 24 3d 22  22 3a 77 24 3d 22 22 3a  |=-1:O$="":w$="":|
00010ca0  f2 77 79 3a c8 99 26 36  30 36 63 31 3a e1 0d 28  |.wy:..&606c1:..(|
00010cb0  74 16 dd f2 6b 4a c8 99  26 36 30 36 63 31 3a e7  |t...kJ..&606c1:.|
00010cc0  42 4a 25 8c 0d 28 75 1a  f2 46 28 56 79 25 2c f6  |BJ%..(u..F(Vy%,.|
00010cd0  24 2b 22 20 5b 22 2b c3  9e 2b 22 5d 22 29 0d 28  |$+" ["+..+"]").(|
00010ce0  76 0f cc f2 46 28 56 79  25 2c f6 24 29 0d 28 77  |v...F(Vy%,.$).(w|
00010cf0  0c cd 3a f2 42 3a e0 3a  e1 0d 28 78 2d dd a4 50  |..:.B:.:..(x-..P|
00010d00  72 6f 67 49 6e 66 6f 28  4d 25 29 f2 4f 28 4d 25  |rogInfo(M%).O(M%|
00010d10  21 28 38 38 2b 28 37 3c  3c 35 29 2b 32 30 29 2c  |!(88+(7<<5)+20),|
00010d20  48 24 29 3a 3d 30 0d 28  79 1c dd f2 68 5f ea 51  |H$):=0.(y...h_.Q|
00010d30  69 25 2c 61 61 25 3a 61  61 25 3d b9 3a e7 52 79  |i%,aa%:aa%=.:.Ry|
00010d40  25 8c 0d 28 7a 11 77 79  25 3d 77 79 25 80 ac 28  |%..(z.wy%=wy%..(|
00010d50  34 39 29 0d 28 7b 31 cd  3a f5 c8 99 26 34 30 30  |49).({1.:...&400|
00010d60  63 37 2c 77 79 25 2c 57  25 b8 51 69 25 3a e7 52  |c7,wy%,W%.Qi%:.R|
00010d70  79 25 8c c8 99 26 38 31  36 38 36 2c 51 69 25 2c  |y%...&81686,Qi%,|
00010d80  2c 64 5f 25 0d 28 7c 0a  c8 8e 51 69 25 ca 0d 28  |,d_%.(|...Qi%..(|
00010d90  7d 0a c9 30 3a f2 63 75  0d 28 7e 0a c9 31 3a f2  |}..0:.cu.(~..1:.|
00010da0  76 4a 0d 28 7f 0a c9 32  3a f2 73 5f 0d 28 80 0a  |vJ.(...2:.s_.(..|
00010db0  c9 33 3a f2 50 75 0d 28  81 0a c9 34 3a f2 46 75  |.3:.Pu.(...4:.Fu|
00010dc0  0d 28 82 0a c9 35 3a f2  53 75 0d 28 83 0a c9 36  |.(...5:.Su.(...6|
00010dd0  3a f2 62 5f 0d 28 84 0a  c9 37 3a f2 77 5f 0d 28  |:.b_.(...7:.w_.(|
00010de0  85 0a c9 38 3a f2 67 5f  0d 28 86 0a c9 39 3a f2  |...8:.g_.(...9:.|
00010df0  76 5f 0d 28 87 0b c9 31  30 3a f2 77 4a 0d 28 88  |v_.(...10:.wJ.(.|
00010e00  0b c9 31 31 3a f2 6f 4a  0d 28 89 0b c9 31 32 3a  |..11:.oJ.(...12:|
00010e10  f2 72 75 0d 28 8a 0b c9  31 37 3a f2 7a 79 0d 28  |.ru.(...17:.zy.(|
00010e20  8b 0b c9 31 38 3a f2 45  5f 0d 28 8c 0b c9 31 39  |...18:.E_.(...19|
00010e30  3a f2 72 5f 0d 28 8d 0f  cb 3a fd ac 28 61 61 25  |:.r_.(...:..(aa%|
00010e40  29 3a e1 0d 28 8e 10 dd  f2 46 75 e7 ac 28 52 79  |):..(....Fu..(Ry|
00010e50  25 29 8c 0d 28 8f 2f f2  46 28 70 5f 25 2c 22 55  |%)..(./.F(p_%,"U|
00010e60  6e 65 78 70 65 63 74 65  64 20 50 6f 69 6e 74 65  |nexpected Pointe|
00010e70  72 5f 4c 65 61 76 69 6e  67 5f 57 69 6e 64 6f 77  |r_Leaving_Window|
00010e80  22 29 0d 28 90 07 cd 3a  e1 0d 28 91 10 dd f2 53  |").(...:..(....S|
00010e90  75 e7 ac 28 52 79 25 29  8c 0d 28 92 30 f2 46 28  |u..(Ry%)..(.0.F(|
00010ea0  70 5f 25 2c 22 55 6e 65  78 70 65 63 74 65 64 20  |p_%,"Unexpected |
00010eb0  50 6f 69 6e 74 65 72 5f  45 6e 74 65 72 69 6e 67  |Pointer_Entering|
00010ec0  5f 57 69 6e 64 6f 77 22  29 0d 28 93 07 cd 3a e1  |_Window").(...:.|
00010ed0  0d 28 94 29 dd f2 77 4a  f2 4e 28 22 55 6e 65 78  |.(.)..wJ.N("Unex|
00010ee0  70 65 63 74 65 64 20 53  63 72 6f 6c 6c 5f 52 65  |pected Scroll_Re|
00010ef0  71 75 65 73 74 22 29 3a  e1 0d 28 95 25 dd f2 6f  |quest"):..(.%..o|
00010f00  4a f2 4e 28 22 55 6e 65  78 70 65 63 74 65 64 20  |J.N("Unexpected |
00010f10  4c 6f 73 65 5f 43 61 72  65 74 22 29 3a e1 0d 28  |Lose_Caret"):..(|
00010f20  96 25 dd f2 72 75 f2 4e  28 22 55 6e 65 78 70 65  |.%..ru.N("Unexpe|
00010f30  63 74 65 64 20 47 61 69  6e 5f 43 61 72 65 74 22  |cted Gain_Caret"|
00010f40  29 3a e1 0d 28 97 46 dd  f2 64 4a de 41 24 28 31  |):..(.F..dJ.A$(1|
00010f50  30 29 3a de 4d 25 28 de  28 41 24 28 29 2c 31 29  |0):.M%(.(A$(),1)|
00010f60  29 3a 44 24 3d 22 bb 22  3a 41 24 28 29 3d 44 24  |):D$=".":A$()=D$|
00010f70  3a 4d 25 28 29 3d 2d 31  3a 70 79 25 3d 30 3a 77  |:M%()=-1:py%=0:w|
00010f80  79 25 3d 36 31 39 33 3a  e1 0d 28 98 1c dd f2 44  |y%=6193:..(....D|
00010f90  28 4c 24 2c 63 75 25 29  f2 76 75 28 4c 24 2c 63  |(L$,cu%).vu(L$,c|
00010fa0  75 25 29 3a e1 0d 28 99  22 dd f2 76 75 28 4c 24  |u%):..(."..vu(L$|
00010fb0  2c 63 75 25 29 ea 4b 25  3a 70 79 25 2b 3d 31 3a  |,cu%).K%:py%+=1:|
00010fc0  e7 70 79 25 3d 31 8c 0d  28 9a 12 77 79 25 3d 77  |.py%=1..(..wy%=w|
00010fd0  79 25 80 28 ac 28 31 29  29 0d 28 9b 14 cc e7 70  |y%.(.(1)).(....p|
00010fe0  79 25 3d de 28 41 24 28  29 2c 31 29 8c 0d 28 9c  |y%=.(A$(),1)..(.|
00010ff0  1e 85 31 2c 22 54 6f 6f  20 6d 61 6e 79 20 6e 75  |..1,"Too many nu|
00011000  6c 6c 20 72 65 61 73 6f  6e 73 22 0d 28 9d 05 cd  |ll reasons".(...|
00011010  0d 28 9e 36 cd 3a 4b 25  3d 30 3a c8 95 41 24 28  |.(.6.:K%=0:..A$(|
00011020  4b 25 29 3c 3e 44 24 3a  4b 25 2b 3d 31 3a ce 3a  |K%)<>D$:K%+=1:.:|
00011030  41 24 28 4b 25 29 3d 4c  24 3a 4d 25 28 4b 25 29  |A$(K%)=L$:M%(K%)|
00011040  3d 63 75 25 3a e1 0d 28  9f 1a dd f2 79 28 4c 24  |=cu%:..(....y(L$|
00011050  2c 63 75 25 29 ea 4b 25  3a e7 70 79 25 3d 30 8c  |,cu%).K%:.py%=0.|
00011060  0d 28 a0 2f f2 4e 28 22  42 61 64 20 72 65 6c 65  |.(./.N("Bad rele|
00011070  61 73 65 20 6e 75 6c 6c  20 72 65 61 73 6f 6e 20  |ase null reason |
00011080  63 6f 64 65 20 28 22 2b  4c 24 2b 22 29 22 29 0d  |code ("+L$+")").|
00011090  28 a1 26 cc 70 79 25 2d  3d 31 3a 4b 25 3d de 28  |(.&.py%-=1:K%=.(|
000110a0  41 24 28 29 2c 31 29 3a  f5 4b 25 2d 3d 31 3a e7  |A$(),1):.K%-=1:.|
000110b0  4b 25 3c 30 8c 0d 28 a2  2f f2 4e 28 22 42 61 64  |K%<0..(./.N("Bad|
000110c0  20 72 65 6c 65 61 73 65  20 6e 75 6c 6c 20 72 65  | release null re|
000110d0  61 73 6f 6e 20 63 6f 64  65 20 28 22 2b 4c 24 2b  |ason code ("+L$+|
000110e0  22 29 22 29 0d 28 a3 38  cd 3a fd 28 41 24 28 4b  |")").(.8.:.(A$(K|
000110f0  25 29 3d 4c 24 29 80 28  4d 25 28 4b 25 29 3d 63  |%)=L$).(M%(K%)=c|
00011100  75 25 29 3a 41 24 28 4b  25 29 3d 44 24 3a e7 70  |u%):A$(K%)=D$:.p|
00011110  79 25 3d 30 80 ac 28 52  79 25 29 8c 0d 28 a4 0d  |y%=0..(Ry%)..(..|
00011120  77 79 25 3d 77 79 25 84  31 0d 28 a5 05 cd 0d 28  |wy%=wy%.1.(....(|
00011130  a6 07 cd 3a e1 0d 28 a7  1d dd f2 48 28 4c 24 2c  |...:..(....H(L$,|
00011140  63 75 25 29 ea 4b 25 2c  44 25 3a e7 4c 24 3d 22  |cu%).K%,D%:.L$="|
00011150  22 8c 0d 28 a8 0c e7 ac  28 52 79 25 29 8c 0d 28  |"..(....(Ry%)..(|
00011160  a9 0d 77 79 25 3d 77 79  25 84 31 0d 28 aa 11 cc  |..wy%=wy%.1.(...|
00011170  77 79 25 3d 77 79 25 80  28 ac 31 29 0d 28 ab 13  |wy%=wy%.(.1).(..|
00011180  cd 3a 70 79 25 3d 30 3a  41 24 28 29 3d 44 24 0d  |.:py%=0:A$()=D$.|
00011190  28 ac 46 cc 44 25 3d 30  3a 4b 25 3d de 28 41 24  |(.F.D%=0:K%=.(A$|
000111a0  28 29 2c 31 29 3a c8 95  4b 25 3e 30 3a 4b 25 2d  |(),1):..K%>0:K%-|
000111b0  3d 31 3a e7 41 24 28 4b  25 29 3d 4c 24 80 28 28  |=1:.A$(K%)=L$.((|
000111c0  4d 25 28 4b 25 29 3d 63  75 25 29 84 28 63 75 25  |M%(K%)=cu%).(cu%|
000111d0  3d 30 29 29 8c 0d 28 ad  13 41 24 28 4b 25 29 3d  |=0))..(..A$(K%)=|
000111e0  44 24 3a 44 25 2b 3d 31  0d 28 ae 0f cd 3a ce 3a  |D$:D%+=1.(...:.:|
000111f0  70 79 25 2d 3d 44 25 0d  28 af 07 cd 3a e1 0d 28  |py%-=D%.(...:..(|
00011200  b0 3d dd f2 63 75 ea 4b  25 2c 4b 24 2c 79 25 2c  |.=..cu.K%,K$,y%,|
00011210  79 6c 25 3a ea 85 3a ee  85 ea f7 85 3a f2 41 28  |yl%:..:.....:.A(|
00011220  22 25 2e 57 69 6d 70 3a  20 4e 75 6c 6c 5f 52 65  |"%.Wimp: Null_Re|
00011230  61 73 6f 6e 5f 43 6f 64  65 22 29 0d 28 b1 30 4b  |ason_Code").(.0K|
00011240  25 3d de 28 41 24 28 29  2c 31 29 3a c8 95 4b 25  |%=.(A$(),1):..K%|
00011250  3e 30 3a 4b 25 2d 3d 31  3a 4b 24 3d 41 24 28 4b  |>0:K%-=1:K$=A$(K|
00011260  25 29 3a e7 4b 24 3c 3e  44 24 8c 0d 28 b2 15 79  |%):.K$<>D$..(..y|
00011270  25 3d 4d 25 28 4b 25 29  3a e7 79 25 3d 2d 31 8c  |%=M%(K%):.y%=-1.|
00011280  0d 28 b3 20 79 6c 25 3d  a4 4a 28 22 46 4e 5f 4e  |.(. yl%=.J("FN_N|
00011290  75 6c 6c 5f 52 65 61 73  6f 6e 5f 22 2b 4b 24 29  |ull_Reason_"+K$)|
000112a0  0d 28 b4 2f cc 79 6c 25  3d a4 4a 28 22 46 4e 5f  |.(./.yl%=.J("FN_|
000112b0  4e 75 6c 6c 5f 52 65 61  73 6f 6e 5f 22 2b 4b 24  |Null_Reason_"+K$|
000112c0  2b 22 28 22 2b c3 28 79  25 29 2b 22 29 22 29 0d  |+"("+.(y%)+")").|
000112d0  28 b5 23 cd 3a e7 79 6c  25 80 28 41 24 28 4b 25  |(.#.:.yl%.(A$(K%|
000112e0  29 3d 4b 24 29 80 28 4d  25 28 4b 25 29 3d 79 25  |)=K$).(M%(K%)=y%|
000112f0  29 8c 0d 28 b6 14 41 24  28 4b 25 29 3d 44 24 3a  |)..(..A$(K%)=D$:|
00011300  70 79 25 2d 3d 31 0d 28  b7 05 cd 0d 28 b8 09 cd  |py%-=1.(....(...|
00011310  3a ce 3a e1 0d 28 b9 1b  dd a4 5f 4e 75 6c 6c 5f  |:.:..(...._Null_|
00011320  52 65 61 73 6f 6e 5f e7  ac 28 52 79 25 29 8c 0d  |Reason_..(Ry%)..|
00011330  28 ba 28 f2 4e 28 22 42  61 64 20 4e 75 6c 6c 20  |(.(.N("Bad Null |
00011340  52 65 61 73 6f 6e 20 28  6e 6f 74 20 65 78 70 65  |Reason (not expe|
00011350  63 74 65 64 29 22 29 0d  28 bb 08 cd 3a 3d 30 0d  |cted)").(...:=0.|
00011360  28 bc 2c dd f2 77 5f ea  51 25 3a ea 85 3a ee 85  |(.,..w_.Q%:..:..|
00011370  ea f7 85 3a f2 41 28 22  25 2e 57 69 6d 70 3a 20  |...:.A("%.Wimp: |
00011380  55 73 65 72 5f 44 72 61  67 22 29 0d 28 bd 29 51  |User_Drag").(.)Q|
00011390  25 3d a4 4a 28 22 46 4e  5f 44 72 61 67 67 65 64  |%=.J("FN_Dragged|
000113a0  5f 22 2b 65 24 29 3a e7  77 69 25 3c 3e 28 31 2a  |_"+e$):.wi%<>(1*|
000113b0  31 36 29 8c 0d 28 be 06  f2 50 0d 28 bf 1a cd 3a  |16)..(...P.(...:|
000113c0  c8 99 26 34 30 30 64 30  2c 2c 2d 31 3a 65 24 3d  |..&400d0,,-1:e$=|
000113d0  22 22 3a e1 0d 28 c0 34  dd f2 45 5f ea 85 3a ee  |"":..(.4..E_..:.|
000113e0  85 ea f7 85 3a f2 41 28  22 25 2e 57 69 6d 70 3a  |....:.A("%.Wimp:|
000113f0  20 55 73 65 72 5f 4d 65  73 73 61 67 65 5f 52 65  | User_Message_Re|
00011400  63 6f 72 64 65 64 22 29  0d 28 c1 09 f2 7a 79 3a  |corded").(...zy:|
00011410  e1 0d 28 c2 1d dd f2 47  5f d5 23 57 25 21 32 30  |..(....G_.#W%!20|
00011420  2c 22 52 75 6e 20 22 2b  24 66 69 25 3a e1 0d 28  |,"Run "+$fi%:..(|
00011430  c3 2b dd f2 7a 79 ea 85  3a ee 85 ea f7 85 3a f2  |.+..zy..:.....:.|
00011440  41 28 22 25 2e 57 69 6d  70 3a 20 55 73 65 72 5f  |A("%.Wimp: User_|
00011450  4d 65 73 73 61 67 65 22  29 0d 28 c4 0c c8 8e 57  |Message").(....W|
00011460  25 21 31 36 ca 0d 28 c5  09 c9 30 3a f2 42 0d 28  |%!16..(...0:.B.(|
00011470  c6 0a c9 31 3a f2 4b 4a  0d 28 c7 0a c9 32 3a f2  |...1:.KJ.(...2:.|
00011480  60 4a 0d 28 c8 0a c9 33  3a f2 78 5f 0d 28 c9 0a  |`J.(...3:.x_.(..|
00011490  c9 34 3a f2 49 75 0d 28  ca 0a c9 35 3a f2 47 4a  |.4:.Iu.(...5:.GJ|
000114a0  0d 28 cb 0a c9 36 3a f2  43 75 0d 28 cc 0a c9 37  |.(...6:.Cu.(...7|
000114b0  3a f2 45 75 0d 28 cd 0a  c9 38 3a f2 52 79 0d 28  |:.Eu.(...8:.Ry.(|
000114c0  ce 0a c9 39 3a f2 57 4a  0d 28 cf 0b c9 31 30 3a  |...9:.WJ.(...10:|
000114d0  f2 47 5f 0d 28 d0 0d c9  31 32 38 32 3a f2 4e 5f  |.G_.(...1282:.N_|
000114e0  0d 28 d1 0f c9 26 34 30  30 63 30 3a f2 4a 4a 0d  |.(...&400c0:.JJ.|
000114f0  28 d2 0f c9 26 34 30 30  63 31 3a f2 77 79 0d 28  |(...&400c1:.wy.(|
00011500  d3 0f c9 26 34 30 30 63  35 3a f2 77 75 0d 28 d4  |...&400c5:.wu.(.|
00011510  07 cb 3a e1 0d 28 d5 09  dd f2 77 75 e1 0d 28 d6  |..:..(....wu..(.|
00011520  2d dd f2 45 75 ea 85 3a  ee 85 ea f7 85 3a f2 41  |-..Eu..:.....:.A|
00011530  28 22 4d 65 73 73 61 67  65 5f 52 41 4d 5f 54 72  |("Message_RAM_Tr|
00011540  61 6e 73 6d 69 74 3a 20  22 29 0d 28 d7 10 e7 57  |ansmit: ").(...W|
00011550  25 21 31 32 3c 3e 70 75  25 8c 0d 28 d8 2d f2 46  |%!12<>pu%..(.-.F|
00011560  28 56 79 25 2c 22 55 6e  65 78 70 65 63 74 65 64  |(Vy%,"Unexpected|
00011570  20 52 41 4d 5f 54 72 61  6e 73 6d 69 74 20 6d 65  | RAM_Transmit me|
00011580  73 73 61 67 65 22 29 0d  28 d9 1d cc 56 6c 25 2b  |ssage").(...Vl%+|
00011590  3d 57 25 21 32 34 3a e7  28 57 25 21 32 34 29 3d  |=W%!24:.(W%!24)=|
000115a0  68 6c 25 8c 0d 28 da 07  f2 55 5f 0d 28 db 35 cc  |hl%..(...U_.(.5.|
000115b0  e7 a4 4a 28 22 46 4e 5f  52 41 4d 5f 4c 6f 61 64  |..J("FN_RAM_Load|
000115c0  5f 43 6f 6d 70 6c 65 74  65 64 5f 22 2b 4f 24 2b  |_Completed_"+O$+|
000115d0  22 28 22 2b c3 28 56 6c  25 29 2b 22 29 22 29 8c  |"("+.(Vl%)+")").|
000115e0  0d 28 dc 09 f2 4c 28 36  29 0d 28 dd 05 cd 0d 28  |.(...L(6).(....(|
000115f0  de 05 cd 0d 28 df 07 cd  3a e1 0d 28 e0 52 dd f2  |....(...:..(.R..|
00011600  55 5f ea 52 41 4d 5f 73  74 61 72 74 25 3a e7 a4  |U_.RAM_start%:..|
00011610  4a 28 22 46 4e 5f 52 41  4d 5f 4c 6f 61 64 5f 22  |J("FN_RAM_Load_"|
00011620  2b 4f 24 2b 22 28 22 2b  c3 28 56 6c 25 29 2b 22  |+O$+"("+.(Vl%)+"|
00011630  2c 20 22 2b c3 28 68 6c  25 29 2b 22 2c 20 52 41  |, "+.(hl%)+", RA|
00011640  4d 5f 73 74 61 72 74 25  29 22 29 8c 0d 28 e1 0c  |M_start%)")..(..|
00011650  e7 56 6c 25 3c 3e 30 8c  0d 28 e2 09 f2 4c 28 37  |.Vl%<>0..(...L(7|
00011660  29 0d 28 e3 22 cc e7 a4  4a 28 22 46 4e 5f 52 41  |).(."...J("FN_RA|
00011670  4d 5f 4c 6f 61 64 5f 46  61 69 6c 65 64 5f 22 2b  |M_Load_Failed_"+|
00011680  4f 24 29 0d 28 e4 07 f2  4b 5f 0d 28 e5 05 cd 0d  |O$).(...K_.(....|
00011690  28 e6 4f cc 57 25 21 31  32 3d 57 25 21 38 3a 57  |(.O.W%!12=W%!8:W|
000116a0  25 21 31 36 3d 36 3a 57  25 21 32 30 3d 52 41 4d  |%!16=6:W%!20=RAM|
000116b0  5f 73 74 61 72 74 25 3a  57 25 21 32 34 3d 68 6c  |_start%:W%!24=hl|
000116c0  25 3a c8 99 26 34 30 30  65 37 2c 31 38 2c 57 25  |%:..&400e7,18,W%|
000116d0  2c 57 25 21 34 3a 70 75  25 3d 57 25 21 38 0d 28  |,W%!4:pu%=W%!8.(|
000116e0  e7 07 cd 3a e1 0d 28 e8  39 dd f2 4b 5f ea 42 61  |...:..(.9..K_.Ba|
000116f0  25 3a c8 99 26 32 30 30  32 33 2c 22 57 69 6d 70  |%:..&20023,"Wimp|
00011700  24 53 63 72 61 70 22 2c  30 2c 2d 31 2c 30 2c 33  |$Scrap",0,-1,0,3|
00011710  b8 2c 2c 73 61 25 3a e7  73 61 25 3d 30 8c 0d 28  |.,,sa%:.sa%=0..(|
00011720  e9 09 f2 4c 28 38 29 0d  28 ea 6e cc 24 28 57 25  |...L(8).(.n.$(W%|
00011730  2b 34 34 29 3d 22 3c 57  69 6d 70 24 53 63 72 61  |+44)="<Wimp$Scra|
00011740  70 3e 22 2b bd 28 30 29  3a 57 25 21 33 36 3d 2d  |p>"+.(0):W%!36=-|
00011750  31 3a 57 25 21 31 36 3d  32 3a 57 25 21 31 32 3d  |1:W%!16=2:W%!12=|
00011760  64 61 25 3a 57 25 21 30  3d 36 30 3a c8 99 26 34  |da%:W%!0=60:..&4|
00011770  30 30 65 37 2c 31 37 2c  57 25 2c 41 61 25 3a 78  |00e7,17,W%,Aa%:x|
00011780  6c 25 3d 57 25 21 38 3a  70 75 25 3d 78 6c 25 3a  |l%=W%!8:pu%=xl%:|
00011790  48 61 25 3d a3 0d 28 eb  07 cd 3a e1 0d 28 ec 44  |Ha%=..(...:..(.D|
000117a0  dd f2 43 75 ea 4d 2c 52  41 4d 5f 73 74 61 72 74  |..Cu.M,RAM_start|
000117b0  25 2c 52 41 4d 5f 6c 65  6e 67 74 68 25 3a ea 85  |%,RAM_length%:..|
000117c0  3a ee 85 ea f7 85 3a f2  41 28 22 4d 65 73 73 61  |:.....:.A("Messa|
000117d0  67 65 5f 52 41 4d 5f 46  65 74 63 68 3a 20 22 29  |ge_RAM_Fetch: ")|
000117e0  0d 28 ed 10 e7 57 25 21  31 32 3c 3e 4b 69 25 8c  |.(...W%!12<>Ki%.|
000117f0  0d 28 ee 09 f2 4c 28 39  29 0d 28 ef 0c cc e7 77  |.(...L(9).(....w|
00011800  24 3d 22 22 8c 0d 28 f0  52 cc e7 a4 4a 28 22 46  |$=""..(.R...J("F|
00011810  4e 5f 52 41 4d 5f 53 61  76 65 5f 22 2b 77 24 2b  |N_RAM_Save_"+w$+|
00011820  22 28 22 2b c3 28 46 61  25 29 2b 22 2c 20 22 2b  |"("+.(Fa%)+", "+|
00011830  c3 28 57 25 21 32 34 29  2b 22 2c 20 52 41 4d 5f  |.(W%!24)+", RAM_|
00011840  73 74 61 72 74 25 2c 20  52 41 4d 5f 6c 65 6e 67  |start%, RAM_leng|
00011850  74 68 25 29 22 29 8c 0d  28 f1 9c cc 46 61 25 2b  |th%)")..(...Fa%+|
00011860  3d 52 41 4d 5f 6c 65 6e  67 74 68 25 3a c8 99 26  |=RAM_length%:..&|
00011870  34 30 30 66 31 2c 64 5f  25 2c 52 41 4d 5f 73 74  |400f1,d_%,RAM_st|
00011880  61 72 74 25 2c 57 25 21  34 2c 57 25 21 32 30 2c  |art%,W%!4,W%!20,|
00011890  52 41 4d 5f 6c 65 6e 67  74 68 25 3a 57 25 21 31  |RAM_length%:W%!1|
000118a0  32 3d 57 25 21 38 3a 57  25 21 31 36 3d 37 3a 57  |2=W%!8:W%!16=7:W|
000118b0  25 21 32 34 3d 52 41 4d  5f 6c 65 6e 67 74 68 25  |%!24=RAM_length%|
000118c0  3a c8 99 26 34 30 30 65  37 2c 31 37 2d 28 52 41  |:..&400e7,17-(RA|
000118d0  4d 5f 6c 65 6e 67 74 68  25 3d 28 57 25 21 32 34  |M_length%=(W%!24|
000118e0  29 29 2c 57 25 2c 57 25  21 34 3a 4b 69 25 3d 57  |)),W%,W%!4:Ki%=W|
000118f0  25 21 38 0d 28 f2 05 cd  0d 28 f3 05 cd 0d 28 f4  |%!8.(....(....(.|
00011900  07 cd 3a e1 0d 28 f5 2a  dd f2 55 75 ee 85 f1 22  |..:..(.*..Uu..."|
00011910  45 72 72 6f 72 20 69 6e  20 65 72 72 6f 72 20 68  |Error in error h|
00011920  61 6e 64 6c 65 72 3a 20  22 3b f6 24 3a e0 0d 28  |andler: ";.$:..(|
00011930  f6 15 e7 52 79 25 8c c8  99 26 61 31 36 38 33 2c  |...Ry%...&a1683,|
00011940  64 5f 25 0d 28 f7 24 f2  74 75 3a d6 47 5f 3a c8  |d_%.(.$.tu:.G_:.|
00011950  99 26 34 30 30 64 64 2c  64 5f 25 2c 26 34 62 35  |.&400dd,d_%,&4b5|
00011960  33 34 31 35 34 3a e1 0d  28 f8 4e dd a4 67 79 28  |34154:..(.N..gy(|
00011970  75 24 29 3a ea 44 25 2c  52 25 3a 44 25 3d a4 4d  |u$):.D%,R%:D%=.M|
00011980  28 32 35 36 29 3a c8 99  26 32 30 30 32 33 2c 75  |(256):..&20023,u|
00011990  24 2c 44 25 2c 2d 32 35  36 2c 30 2c 30 b8 2c 2c  |$,D%,-256,0,0.,,|
000119a0  52 25 3a f2 43 28 44 25  2c 32 35 36 29 3a 3d 28  |R%:.C(D%,256):=(|
000119b0  52 25 3c 30 29 0d 28 f9  17 dd f2 4c 5f 28 45 25  |R%<0).(....L_(E%|
000119c0  29 3a ea 46 25 3a e7 45  25 80 31 8c 0d 28 fa 66  |):.F%:.E%.1..(.f|
000119d0  46 25 3d 21 58 75 25 3a  58 5f 25 3d 46 25 21 77  |F%=!Xu%:X_%=F%!w|
000119e0  25 3a 59 5f 25 3d 46 25  21 78 25 3a 6f 79 25 3d  |%:Y_%=F%!x%:oy%=|
000119f0  46 25 21 62 5f 25 3a 65  5f 25 3d 46 25 21 4f 5f  |F%!b_%:e_%=F%!O_|
00011a00  25 3a 66 5f 25 3d 46 25  21 48 5f 25 3a 6d 5f 25  |%:f_%=F%!H_%:m_%|
00011a10  3d 46 25 21 78 5f 25 3a  74 5f 25 3d 46 25 21 79  |=F%!x_%:t_%=F%!y|
00011a20  5f 25 3a 61 5f 25 3d 46  25 21 51 5f 25 3a c8 8e  |_%:a_%=F%!Q_%:..|
00011a30  b9 ca 0d 28 fb 19 c9 57  79 25 3c 3e 30 3a f2 46  |...(...Wy%<>0:.F|
00011a40  28 56 79 25 2c a4 43 28  32 29 29 0d 28 fc 0e c9  |(Vy%,.C(2)).(...|
00011a50  21 78 79 25 3d 30 3a f2  62 0d 28 fd 18 c9 a4 60  |!xy%=0:.b.(....`|
00011a60  3a f2 59 28 5a 25 21 7a  25 2c 2d 31 29 3a f2 58  |:.Y(Z%!z%,-1):.X|
00011a70  79 0d 28 fe 12 7f 3a f2  47 28 21 78 79 25 29 3a  |y.(...:.G(!xy%):|
00011a80  f2 58 79 0d 28 ff 05 cb  0d 29 00 07 cd 3a e1 0d  |.Xy.(....)...:..|
00011a90  29 01 18 dd f2 58 75 28  4a 25 29 3a ea 47 25 3a  |)....Xu(J%):.G%:|
00011aa0  e7 4a 25 3e 3d 30 8c 0d  29 02 17 47 25 3d a4 57  |.J%>=0..)..G%=.W|
00011ab0  28 4a 25 2b 31 29 3a e7  47 25 21 72 25 8c 0d 29  |(J%+1):.G%!r%..)|
00011ac0  03 26 f2 6e 28 47 25 21  72 25 2c 47 25 2b 60 4a  |.&.n(G%!r%,G%+`J|
00011ad0  25 29 3a f2 52 28 47 25  21 72 25 29 3a 47 25 21  |%):.R(G%!r%):G%!|
00011ae0  72 25 3d 30 0d 29 04 0c  cc 3a f2 74 28 47 25 29  |r%=0.)...:.t(G%)|
00011af0  0d 29 05 05 cd 0d 29 06  07 cd 3a e1 0d 29 07 1f  |.)....)...:..)..|
00011b00  dd f2 43 5f 28 4a 25 29  3a ea 47 25 2c 59 69 25  |..C_(J%):.G%,Yi%|
00011b10  2c 62 25 3a e7 4a 25 3e  3d 30 8c 0d 29 08 1b 4a  |,b%:.J%>=0..)..J|
00011b20  25 2b 3d 31 3a 47 25 3d  a4 57 28 4a 25 29 3a e7  |%+=1:G%=.W(J%):.|
00011b30  47 25 21 72 25 8c 0d 29  09 0d f2 52 28 47 25 21  |G%!r%..)...R(G%!|
00011b40  72 25 29 0d 29 0a 16 cd  3a 21 4d 79 25 2d 3d 31  |r%).)...:!My%-=1|
00011b50  3a e7 21 4d 79 25 3d 30  8c 0d 29 0b 32 f2 57 28  |:.!My%=0..).2.W(|
00011b60  21 48 79 25 29 3a c8 99  35 2c 22 25 52 65 6d 6f  |!Hy%):..5,"%Remo|
00011b70  76 65 20 3c 44 61 6c 65  6b 73 33 24 44 69 72 3e  |ve <Daleks3$Dir>|
00011b80  2e 53 63 6f 72 65 73 22  3a f2 50 0d 29 0c 5e cc  |.Scores":.P.).^.|
00011b90  3a c8 95 4a 25 3c 3d 21  4d 79 25 3a 4a 25 2b 3d  |:..J%<=!My%:J%+=|
00011ba0  31 3a 59 69 25 3d a4 57  28 4a 25 29 3a e3 62 25  |1:Yi%=.W(J%):.b%|
00011bb0  3d 30 b8 6c 5f 25 2d 31  88 34 3a 47 25 21 62 25  |=0.l_%-1.4:G%!b%|
00011bc0  3d 59 69 25 21 62 25 3a  ed 62 25 3a 47 25 3d 59  |=Yi%!b%:.b%:G%=Y|
00011bd0  69 25 3a ce 3a f2 60 28  21 48 79 25 2c 47 25 2d  |i%:.:.`(!Hy%,G%-|
00011be0  21 48 79 25 29 3a f2 6a  79 0d 29 0d 05 cd 0d 29  |!Hy%):.jy.)....)|
00011bf0  0e 07 cd 3a e1 0d 29 0f  39 dd f2 66 4a 28 4d 25  |...:..).9..fJ(M%|
00011c00  29 3a ea 47 25 3a c8 99  26 34 30 30 63 35 2c 2c  |):.G%:..&400c5,,|
00011c10  4d 25 3a 47 25 3d 21 58  75 25 3a f2 43 79 28 47  |M%:G%=!Xu%:.Cy(G|
00011c20  25 21 72 25 2c 47 25 2b  60 4a 25 29 3a e1 0d 29  |%!r%,G%+`J%):..)|
00011c30  10 39 dd f2 49 5f 3a ea  47 25 3a 47 25 3d 21 58  |.9..I_:.G%:G%=!X|
00011c40  75 25 3a f2 6e 28 47 25  21 72 25 2c 47 25 2b 60  |u%:.n(G%!r%,G%+`|
00011c50  4a 25 29 3a f2 52 28 47  25 21 72 25 29 3a 47 25  |J%):.R(G%!r%):G%|
00011c60  21 72 25 3d 30 3a e1 0d  29 11 21 dd f2 47 75 3a  |!r%=0:..).!..Gu:|
00011c70  ea 52 5f 25 3a e7 a4 67  79 28 22 44 61 6c 65 6b  |.R_%:..gy("Dalek|
00011c80  73 24 44 69 72 22 29 8c  0d 29 12 21 c8 99 26 36  |s$Dir")..).!..&6|
00011c90  30 36 63 30 3a ea 85 3a  ee 85 ea f7 85 3a c8 99  |06c0:..:.....:..|
00011ca0  26 36 30 36 63 31 3a f2  51 0d 29 13 30 52 5f 25  |&606c1:.Q.).0R_%|
00011cb0  3d 30 3a c8 95 a4 5f 79  28 22 3c 44 61 6c 65 6b  |=0:..._y("<Dalek|
00011cc0  73 24 44 69 72 3e 22 2c  22 2a 22 2c 52 5f 25 29  |s$Dir>","*",R_%)|
00011cd0  3a e7 a4 4a 79 3d 53 4a  8c 0d 29 14 0c f2 57 75  |:..Jy=SJ..)...Wu|
00011ce0  28 a4 57 79 29 0d 29 15  13 cd 3a ce 3a f7 85 3a  |(.Wy).)...:.:..:|
00011cf0  c8 99 26 36 30 36 63 31  0d 29 16 14 cc 3a f2 46  |..&606c1.)...:.F|
00011d00  28 56 79 25 2c a4 43 28  31 30 29 29 0d 29 17 07  |(Vy%,.C(10)).)..|
00011d10  cd 3a e1 0d 29 18 a9 dd  f2 57 75 28 51 24 29 3a  |.:..)....Wu(Q$):|
00011d20  ea 44 25 2c 68 79 25 2c  79 25 2c 4d 25 2c 4e 25  |.D%,hy%,y%,M%,N%|
00011d30  2c 4b 25 2c 4a 25 2c 53  4a 25 2c 67 4a 25 2c 47  |,K%,J%,SJ%,gJ%,G|
00011d40  24 3a 44 25 3d a4 4d 28  32 34 29 3a f2 4f 28 44  |$:D%=.M(24):.O(D|
00011d50  25 2c 51 24 29 3a 68 79  25 3d a4 4d 28 32 34 29  |%,Q$):hy%=.M(24)|
00011d60  3a f2 4f 28 68 79 25 2c  22 25 64 78 25 64 48 53  |:.O(hy%,"%dx%dHS|
00011d70  43 22 29 3a 41 25 3d 44  25 3a 42 25 3d 68 79 25  |C"):A%=D%:B%=hy%|
00011d80  3a 41 25 3d ba 28 74 75  29 3a 4b 25 3d 21 41 25  |:A%=.(tu):K%=!A%|
00011d90  3a 4d 25 3d 41 25 21 34  3a 4e 25 3d 41 25 21 38  |:M%=A%!4:N%=A%!8|
00011da0  3a f2 43 28 68 79 25 2c  32 34 29 3a f2 43 28 44  |:.C(hy%,24):.C(D|
00011db0  25 2c 32 34 29 3a e7 4b  25 3d 32 8c 0d 29 19 82  |%,24):.K%=2..)..|
00011dc0  44 25 3d 76 75 3a 44 25  21 77 25 3d 4d 25 3a 44  |D%=vu:D%!w%=M%:D|
00011dd0  25 21 78 25 3d 4e 25 3a  44 25 21 4f 5f 25 3d 37  |%!x%=N%:D%!O_%=7|
00011de0  3a 44 25 21 48 5f 25 3d  31 30 3a 44 25 21 62 5f  |:D%!H_%=10:D%!b_|
00011df0  25 3d 4d 25 2a 4e 25 2f  32 3a 44 25 21 79 5f 25  |%=M%*N%/2:D%!y_%|
00011e00  3d 31 3a 44 25 21 51 5f  25 3d 31 3a 44 25 21 78  |=1:D%!Q_%=1:D%!x|
00011e10  5f 25 3d 31 3a 4e 25 3d  8e 28 22 3c 44 61 6c 65  |_%=1:N%=.("<Dale|
00011e20  6b 73 24 44 69 72 3e 2e  22 2b 51 24 29 3a ea 85  |ks$Dir>."+Q$):..|
00011e30  3a ee 85 ea f7 85 3a d9  23 4e 25 3a f2 51 0d 29  |:.....:.#N%:.Q.)|
00011e40  1a 67 e3 4a 25 3d 31 b8  31 30 3a e8 23 4e 25 2c  |.g.J%=1.10:.#N%,|
00011e50  53 4a 25 2c 47 24 3a 67  4a 25 3d 28 53 4a 25 81  |SJ%,G$:gJ%=(SJ%.|
00011e60  31 30 29 2d 44 25 21 4f  5f 25 3a 67 4a 25 3d 67  |10)-D%!O_%:gJ%=g|
00011e70  4a 25 81 44 25 21 48 5f  25 3a 47 24 3d c0 47 24  |J%.D%!H_%:G$=.G$|
00011e80  2c 79 5f 2d 31 29 3a f2  78 79 28 44 25 2c 47 24  |,y_-1):.xy(D%,G$|
00011e90  2c 53 4a 25 2c 67 4a 25  29 3a ed 4a 25 3a f7 85  |,SJ%,gJ%):.J%:..|
00011ea0  3a d9 23 4e 25 0d 29 1b  07 cd 3a e1 0d 29 1c 37  |:.#N%.)...:..).7|
00011eb0  dd f2 64 5f 3a ea 68 25  2c 71 69 25 2c 47 25 2c  |..d_:.h%,qi%,G%,|
00011ec0  4a 25 2c 44 25 3a c8 99  26 36 30 36 63 30 3a ea  |J%,D%:..&606c0:.|
00011ed0  85 3a ee 85 ea f7 85 3a  c8 99 26 36 30 36 63 31  |.:.....:..&606c1|
00011ee0  3a f2 51 0d 29 1d 2f 21  4d 79 25 3d 30 3a 21 48  |:.Q.)./!My%=0:!H|
00011ef0  79 25 3d 30 3a e7 a4 46  79 28 22 3c 44 61 6c 65  |y%=0:..Fy("<Dale|
00011f00  6b 73 33 24 44 69 72 3e  2e 53 63 6f 72 65 73 22  |ks3$Dir>.Scores"|
00011f10  29 8c 0d 29 1e 34 68 25  3d a4 54 79 28 22 3c 44  |)..).4h%=.Ty("<D|
00011f20  61 6c 65 6b 73 33 24 44  69 72 3e 2e 53 63 6f 72  |aleks3$Dir>.Scor|
00011f30  65 73 22 29 3a e7 28 28  68 25 2d 34 29 83 6c 5f  |es"):.((h%-4).l_|
00011f40  25 29 3c 3e 30 8c 0d 29  1f 0d f2 4e 28 a4 43 28  |%)<>0..)...N(.C(|
00011f50  34 29 29 0d 29 20 64 cd  3a 21 48 79 25 3d a4 52  |4)).) d.:!Hy%=.R|
00011f60  79 28 68 25 29 3a 44 25  3d 21 48 79 25 3a f2 5f  |y(h%):D%=!Hy%:._|
00011f70  4a 28 22 3c 44 61 6c 65  6b 73 33 24 44 69 72 3e  |J("<Daleks3$Dir>|
00011f80  2e 53 63 6f 72 65 73 22  2c 44 25 29 3a c8 99 39  |.Scores",D%):..9|
00011f90  31 2c 26 63 31 30 34 30  61 33 31 2c 44 25 2b 34  |1,&c1040a31,D%+4|
00011fa0  2c 44 25 2b 68 25 2c 31  b8 71 69 25 3a e7 71 69  |,D%+h%,1.qi%:.qi|
00011fb0  25 3c 3e 21 44 25 8c 0d  29 21 0d f2 4e 28 a4 43  |%<>!D%..)!..N(.C|
00011fc0  28 34 29 29 0d 29 22 36  cd 3a 21 4d 79 25 3d 28  |(4)).)"6.:!My%=(|
00011fd0  68 25 2d 34 29 81 6c 5f  25 3a e3 4a 25 3d 31 b8  |h%-4).l_%:.J%=1.|
00011fe0  21 4d 79 25 3a 47 25 3d  a4 57 28 4a 25 29 3a 47  |!My%:G%=.W(J%):G|
00011ff0  25 21 72 25 3d 30 3a ed  4a 25 0d 29 23 13 cd 3a  |%!r%=0:.J%.)#..:|
00012000  f7 85 3a c8 99 26 36 30  36 63 31 3a e1 0d 29 24  |..:..&606c1:..)$|
00012010  53 dd a4 56 28 4d 25 29  3a ea 4a 25 2c 59 25 2c  |S..V(M%):.J%,Y%,|
00012020  47 25 3a 4a 25 3d 31 3a  59 25 3d b9 3a c8 95 4a  |G%:J%=1:Y%=.:..J|
00012030  25 3c 3d 21 4d 79 25 80  59 25 3a 47 25 3d a4 57  |%<=!My%.Y%:G%=.W|
00012040  28 4a 25 29 3a 59 25 3d  28 47 25 21 72 25 3c 3e  |(J%):Y%=(G%!r%<>|
00012050  4d 25 29 3a 4a 25 2b 3d  31 3a ce 3a e7 59 25 8c  |M%):J%+=1:.:.Y%.|
00012060  0d 29 25 09 4d 25 2d 3d  31 0d 29 26 0d cc 3a 21  |.)%.M%-=1.)&..:!|
00012070  58 75 25 3d 47 25 0d 29  27 09 cd 3a 3d 4d 25 0d  |Xu%=G%.)'..:=M%.|
00012080  29 28 4c dd f2 78 79 28  46 25 2c 47 24 2c 53 4a  |)(L..xy(F%,G$,SJ|
00012090  25 2c 67 4a 25 29 3a ea  47 25 2c 4e 25 2c 4a 25  |%,gJ%):.G%,N%,J%|
000120a0  2c 62 25 2c 69 25 2c 45  79 25 2c 5a 24 3a c8 99  |,b%,i%,Ey%,Z$:..|
000120b0  26 36 30 36 63 30 3a ea  85 3a ee 85 ea f7 85 3a  |&606c0:..:.....:|
000120c0  c8 99 26 36 30 36 63 31  3a f2 51 0d 29 29 5c 47  |..&606c1:.Q.))\G|
000120d0  25 3d a4 47 79 28 46 25  29 3a 45 79 25 3d 31 3a  |%=.Gy(F%):Ey%=1:|
000120e0  4e 25 3d a4 54 28 47 25  2c 45 79 25 29 3a c8 95  |N%=.T(G%,Ey%):..|
000120f0  45 79 25 3c 79 4a 25 80  53 4a 25 3c 3d 4e 25 21  |Ey%<yJ%.SJ%<=N%!|
00012100  4d 75 25 3a 45 79 25 2b  3d 31 3a 4e 25 3d a4 54  |Mu%:Ey%+=1:N%=.T|
00012110  28 47 25 2c 45 79 25 29  3a ce 3a e7 53 4a 25 3e  |(G%,Ey%):.:.SJ%>|
00012120  4e 25 21 4d 75 25 8c 0d  29 2a 91 69 25 3d 79 4a  |N%!Mu%..)*.i%=yJ|
00012130  25 3a c8 95 69 25 3e 45  79 25 3a 4a 25 3d a4 54  |%:..i%>Ey%:J%=.T|
00012140  28 47 25 2c 69 25 2d 31  29 3a 5a 24 3d a4 4e 28  |(G%,i%-1):Z$=.N(|
00012150  4a 25 2b 45 6c 25 29 3a  f2 69 28 47 25 2c 69 25  |J%+El%):.i(G%,i%|
00012160  2c 5a 24 2c 4a 25 21 69  75 25 2c 4a 25 21 4d 75  |,Z$,J%!iu%,J%!Mu|
00012170  25 29 3a f2 53 79 28 47  25 2c 69 25 29 3a 69 25  |%):.Sy(G%,i%):i%|
00012180  2d 3d 31 3a ce 3a f2 69  28 47 25 2c 45 79 25 2c  |-=1:.:.i(G%,Ey%,|
00012190  47 24 2c 67 4a 25 2c 53  4a 25 29 3a f2 53 79 28  |G$,gJ%,SJ%):.Sy(|
000121a0  47 25 2c 45 79 25 29 3a  f2 59 28 47 25 21 72 25  |G%,Ey%):.Y(G%!r%|
000121b0  2c 2d 31 29 3a f2 6a 79  0d 29 2b 13 cd 3a f7 85  |,-1):.jy.)+..:..|
000121c0  3a c8 99 26 36 30 36 63  31 3a e1 0d 29 2c 4d dd  |:..&606c1:..),M.|
000121d0  f2 62 75 3a ea 4a 25 2c  59 25 2c 47 25 3a 4a 25  |.bu:.J%,Y%,G%:J%|
000121e0  3d 31 3a 59 25 3d b9 3a  c8 95 4a 25 3c 21 4d 79  |=1:Y%=.:..J%<!My|
000121f0  25 80 59 25 3a 47 25 3d  a4 57 28 4a 25 29 3a 59  |%.Y%:G%=.W(J%):Y|
00012200  25 3d 28 47 25 21 72 25  3d 30 29 3a 4a 25 2b 3d  |%=(G%!r%=0):J%+=|
00012210  31 3a ce 3a e7 59 25 8c  0d 29 2d 13 47 25 3d a4  |1:.:.Y%..)-.G%=.|
00012220  57 28 31 29 3a f2 74 28  47 25 29 0d 29 2e 14 cd  |W(1):.t(G%).)...|
00012230  3a f2 59 28 47 25 21 72  25 2c 2d 31 29 3a e1 0d  |:.Y(G%!r%,-1):..|
00012240  29 2f 78 dd f2 54 75 28  46 25 29 3a ea 4a 25 2c  |)/x..Tu(F%):.J%,|
00012250  59 25 2c 62 25 2c 47 25  3a 4a 25 3d 31 3a 59 25  |Y%,b%,G%:J%=1:Y%|
00012260  3d b9 3a c8 95 4a 25 3c  3d 21 4d 79 25 80 59 25  |=.:..J%<=!My%.Y%|
00012270  3a 47 25 3d a4 57 28 4a  25 29 3a e3 62 25 3d 30  |:G%=.W(J%):.b%=0|
00012280  b8 73 5f 25 2d 31 88 34  3a 59 25 3d 59 25 80 28  |.s_%-1.4:Y%=Y%.(|
00012290  47 25 21 62 25 3d 46 25  21 62 25 29 3a ed 62 25  |G%!b%=F%!b%):.b%|
000122a0  3a 59 25 3d 28 59 25 3d  30 29 3a 4a 25 2b 3d 31  |:Y%=(Y%=0):J%+=1|
000122b0  3a ce 3a e7 59 25 8c 0d  29 30 0f ef 37 3a 47 25  |:.:.Y%..)0..7:G%|
000122c0  3d a4 57 28 31 29 0d 29  31 0f cd 3a e7 47 25 21  |=.W(1).)1..:.G%!|
000122d0  72 25 3d 30 8c 0d 29 32  0a f2 74 28 47 25 29 0d  |r%=0..)2..t(G%).|
000122e0  29 33 14 cd 3a f2 59 28  47 25 21 72 25 2c 2d 31  |)3..:.Y(G%!r%,-1|
000122f0  29 3a e1 0d 29 34 74 dd  f2 6a 79 3a ea 68 25 2c  |):..)4t..jy:.h%,|
00012300  44 25 3a 41 69 25 3d a4  57 28 21 4d 79 25 2b 31  |D%:Ai%=.W(!My%+1|
00012310  29 3a 44 25 3d 21 48 79  25 3a c8 99 39 31 2c 26  |):D%=!Hy%:..91,&|
00012320  63 31 30 34 30 61 33 31  2c 44 25 2b 34 2c 41 69  |c1040a31,D%+4,Ai|
00012330  25 2c 31 b8 21 44 25 3a  c8 99 26 32 30 30 30 38  |%,1.!D%:..&20008|
00012340  2c 31 30 2c 22 3c 44 61  6c 65 6b 73 33 24 44 69  |,10,"<Daleks3$Di|
00012350  72 3e 2e 53 63 6f 72 65  73 22 2c 53 4a 2c 2c 44  |r>.Scores",SJ,,D|
00012360  25 2c 41 69 25 3a e1 0d  29 35 70 dd a4 47 79 28  |%,Ai%:..)5p..Gy(|
00012370  46 25 29 3a ea 59 25 2c  4a 25 2c 62 25 2c 47 25  |F%):.Y%,J%,b%,G%|
00012380  3a 59 25 3d b9 3a 4a 25  3d 31 3a c8 95 4a 25 3c  |:Y%=.:J%=1:..J%<|
00012390  3d 21 4d 79 25 80 59 25  3a 47 25 3d a4 57 28 4a  |=!My%.Y%:G%=.W(J|
000123a0  25 29 3a e3 62 25 3d 30  b8 73 5f 25 2d 31 88 34  |%):.b%=0.s_%-1.4|
000123b0  3a 59 25 3d 59 25 80 28  46 25 21 62 25 3d 47 25  |:Y%=Y%.(F%!b%=G%|
000123c0  21 62 25 29 3a ed 62 25  3a 59 25 3d 28 59 25 3d  |!b%):.b%:Y%=(Y%=|
000123d0  30 29 3a e7 59 25 8c 0d  29 36 09 4a 25 2b 3d 31  |0):.Y%..)6.J%+=1|
000123e0  0d 29 37 0c cd 3a ce 3a  e7 59 25 8c 0d 29 38 8d  |.)7..:.:.Y%..)8.|
000123f0  21 4d 79 25 2b 3d 31 3a  59 25 3d a4 57 28 21 4d  |!My%+=1:Y%=.W(!M|
00012400  79 25 2b 31 29 2d 21 48  79 25 3a f2 60 28 21 48  |y%+1)-!Hy%:.`(!H|
00012410  79 25 2c 59 25 29 3a 47  25 3d a4 57 28 21 4d 79  |y%,Y%):G%=.W(!My|
00012420  25 29 3a 47 25 21 72 25  3d 30 3a f2 5a 75 28 47  |%):G%!r%=0:.Zu(G|
00012430  25 2b 60 4a 25 29 3a e3  62 25 3d 30 b8 73 5f 25  |%+`J%):.b%=0.s_%|
00012440  2d 31 88 34 3a 47 25 21  62 25 3d 46 25 21 62 25  |-1.4:G%!b%=F%!b%|
00012450  3a ed 62 25 3a e3 4a 25  3d 31 b8 79 4a 25 3a f2  |:.b%:.J%=1.yJ%:.|
00012460  69 28 47 25 2c 4a 25 2c  22 5a 61 70 70 61 22 2c  |i(G%,J%,"Zappa",|
00012470  30 2c 31 30 29 3a ed 4a  25 0d 29 39 0f cd 3a e7  |0,10):.J%.)9..:.|
00012480  47 25 21 72 25 3d 30 8c  0d 29 3a 0a f2 74 28 47  |G%!r%=0..):..t(G|
00012490  25 29 0d 29 3b 09 cd 3a  3d 47 25 0d 29 3c 7b dd  |%).);..:=G%.)<{.|
000124a0  f2 74 28 47 25 29 3a ea  4a 25 2c 5f 24 3a 5f 24  |.t(G%):.J%,_$:_$|
000124b0  3d a4 63 28 47 25 2c 22  48 69 67 68 53 63 6f 72  |=.c(G%,"HighScor|
000124c0  65 22 29 3a 47 25 21 72  25 3d a4 71 79 28 22 48  |e"):G%!r%=.qy("H|
000124d0  69 67 68 53 63 6f 72 65  73 22 2c 2b 34 38 2c 2d  |ighScores",+48,-|
000124e0  34 38 2c 5f 24 29 3a f2  6e 79 28 47 25 21 72 25  |48,_$):.ny(G%!r%|
000124f0  2c 47 25 2b 60 4a 25 2c  2d 31 29 3a e3 4a 25 3d  |,G%+`J%,-1):.J%=|
00012500  31 b8 79 4a 25 3a f2 53  79 28 47 25 2c 4a 25 29  |1.yJ%:.Sy(G%,J%)|
00012510  3a ed 4a 25 3a e1 0d 29  3d 52 dd f2 69 28 47 25  |:.J%:..)=R..i(G%|
00012520  2c 45 79 25 2c 47 24 2c  67 4a 25 2c 53 4a 25 29  |,Ey%,G$,gJ%,SJ%)|
00012530  3a ea 4e 25 3a 4e 25 3d  a4 54 28 47 25 2c 45 79  |:.N%:N%=.T(G%,Ey|
00012540  25 29 3a f2 4f 28 4e 25  2b 45 6c 25 2c 47 24 29  |%):.O(N%+El%,G$)|
00012550  3a 4e 25 21 69 75 25 3d  67 4a 25 3a 4e 25 21 4d  |:N%!iu%=gJ%:N%!M|
00012560  75 25 3d 53 4a 25 3a e1  0d 29 3e 7c dd f2 53 79  |u%=SJ%:..)>|..Sy|
00012570  28 47 25 2c 45 79 25 29  3a ea 4d 25 2c 4a 25 2c  |(G%,Ey%):.M%,J%,|
00012580  4e 25 3a 4d 25 3d 47 25  21 72 25 3a 4a 25 3d a4  |N%:M%=G%!r%:J%=.|
00012590  66 79 28 45 79 25 29 3a  4e 25 3d a4 54 28 47 25  |fy(Ey%):N%=.T(G%|
000125a0  2c 45 79 25 29 3a f2 65  79 28 4d 25 2c 4a 25 2b  |,Ey%):.ey(M%,J%+|
000125b0  6c 69 2c 4e 25 2b 45 6c  25 29 3a f2 5a 28 4d 25  |li,N%+El%):.Z(M%|
000125c0  2c 4a 25 2b 66 69 2c 4e  25 21 69 75 25 29 3a f2  |,J%+fi,N%!iu%):.|
000125d0  5a 28 4d 25 2c 4a 25 2b  75 6c 2c 4e 25 21 4d 75  |Z(M%,J%+ul,N%!Mu|
000125e0  25 29 3a e1 0d 29 3f 20  dd a4 57 28 4a 25 29 3a  |%):..)? ..W(J%):|
000125f0  3d 21 48 79 25 2b 34 2b  28 28 4a 25 2d 31 29 2a  |=!Hy%+4+((J%-1)*|
00012600  6c 5f 25 29 0d 29 40 1e  dd a4 66 79 28 45 79 25  |l_%).)@...fy(Ey%|
00012610  29 3a 3d 28 28 45 79 25  2d 31 29 2a 43 6c 29 2b  |):=((Ey%-1)*Cl)+|
00012620  44 6c 0d 29 41 25 dd a4  54 28 47 25 2c 45 79 25  |Dl.)A%..T(G%,Ey%|
00012630  29 3a 3d 47 25 2b 7a 61  25 2b 28 28 45 79 25 2d  |):=G%+za%+((Ey%-|
00012640  31 29 2a 4d 69 25 29 0d  29 42 19 dd f2 57 5f 3a  |1)*Mi%).)B...W_:|
00012650  ea 4a 25 3a ea 85 3a ee  85 ea f7 85 3a f2 4f 5f  |.J%:..:.....:.O_|
00012660  0d 29 43 18 c8 99 26 36  30 36 63 30 3a 62 3d a4  |.)C...&606c0:b=.|
00012670  64 79 3a e7 62 3c 31 8c  0d 29 44 16 f2 46 28 56  |dy:.b<1..)D..F(V|
00012680  79 25 2c a4 43 28 37 29  29 3a f2 42 3a e0 0d 29  |y%,.C(7)):.B:..)|
00012690  45 62 cd 3a de 50 25 28  62 29 3a de 47 25 28 62  |Eb.:.P%(b):.G%(b|
000126a0  29 3a de 44 25 28 62 29  3a de 42 25 28 62 29 3a  |):.D%(b):.B%(b):|
000126b0  de 53 25 28 62 2c 6c 79  29 3a de 4e 25 28 62 29  |.S%(b,ly):.N%(b)|
000126c0  3a de 46 25 28 62 29 3a  de 58 25 28 62 29 3a e3  |:.F%(b):.X%(b):.|
000126d0  4a 25 3d 31 b8 62 3a f2  69 5f 28 4a 25 29 3a ed  |J%=1.b:.i_(J%):.|
000126e0  4a 25 3a f7 85 3a c8 99  26 36 30 36 63 31 3a e1  |J%:..:..&606c1:.|
000126f0  0d 29 46 26 dd f2 4f 5f  3a c8 99 26 36 30 36 63  |.)F&..O_:..&606c|
00012700  31 3a f2 46 28 56 79 25  2c a4 43 28 38 29 29 3a  |1:.F(Vy%,.C(8)):|
00012710  f2 42 3a e0 3a e1 0d 29  47 29 dd a4 64 79 3a ea  |.B:.:..)G)..dy:.|
00012720  4a 25 3a 4a 25 3d 31 3a  c8 95 a4 4f 79 28 4a 25  |J%:J%=1:...Oy(J%|
00012730  29 3a 4a 25 2b 3d 31 3a  ce 3a 3d 4a 25 2d 31 0d  |):J%+=1:.:=J%-1.|
00012740  29 48 45 dd a4 4f 79 28  4a 25 29 3a ea 5a 24 2c  |)HE..Oy(J%):.Z$,|
00012750  52 25 3a ea dc 3a f7 2b  30 3a f3 5a 24 3a c8 99  |R%:..:.+0:.Z$:..|
00012760  26 32 30 30 32 65 2c 32  39 36 2c 76 25 2c a4 64  |&2002e,296,v%,.d|
00012770  28 4a 25 29 2b 5a 24 b8  3b 52 25 3a 3d ac a4 55  |(J%)+Z$.;R%:=..U|
00012780  28 52 25 29 0d 29 49 1f  dd a4 64 28 4a 25 29 3a  |(R%).)I...d(J%):|
00012790  3d bd 28 4a 25 2b 97 28  22 41 22 29 2d 31 29 2b  |=.(J%+.("A")-1)+|
000127a0  22 5f 22 0d 29 4a fb dd  f2 69 5f 28 4a 25 29 3a  |"_".)J...i_(J%):|
000127b0  ea 62 25 2c 5a 24 2c 4d  25 2c 4e 25 2c 4a 75 25  |.b%,Z$,M%,N%,Ju%|
000127c0  2c 44 25 2c 47 25 3a ea  dc 3a f7 2b 30 3a f3 5a  |,D%,G%:..:.+0:.Z|
000127d0  24 3a 5a 24 3d a4 64 28  4a 25 29 2b 5a 24 3a c8  |$:Z$=.d(J%)+Z$:.|
000127e0  99 34 36 2c 32 38 30 2c  76 25 2c 5a 24 b8 2c 2c  |.46,280,v%,Z$.,,|
000127f0  53 25 28 4a 25 2c 31 29  3a 44 25 3d 53 25 28 4a  |S%(J%,1):D%=S%(J|
00012800  25 2c 31 29 3a c8 99 34  36 2c 35 35 32 2c 76 25  |%,1):..46,552,v%|
00012810  2c 44 25 b8 2c 2c 2c 4d  25 2c 4e 25 2c 2c 4a 75  |,D%.,,,M%,N%,,Ju|
00012820  25 3a 58 25 28 4a 25 29  3d 4a 75 25 3a 50 25 28  |%:X%(J%)=Ju%:P%(|
00012830  4a 25 29 3d 4d 25 3a 42  25 28 4a 25 29 3d 4e 25  |J%)=M%:B%(J%)=N%|
00012840  3a f2 69 4a 28 44 25 2c  b9 2c 4e 25 28 4a 25 29  |:.iJ(D%,.,N%(J%)|
00012850  2c 47 25 29 3a c8 99 35  33 2c 4a 75 25 2c 34 b8  |,G%):..53,Ju%,4.|
00012860  2c 2c 47 25 28 4a 25 29  3a c8 99 35 33 2c 4a 75  |,,G%(J%):..53,Ju|
00012870  25 2c 35 b8 2c 2c 44 25  28 4a 25 29 3a c8 99 35  |%,5.,,D%(J%):..5|
00012880  33 2c 4a 75 25 2c 39 b8  2c 2c 47 25 3a 46 25 28  |3,Ju%,9.,,G%:F%(|
00012890  4a 25 29 3d 31 3c 3c 28  31 3c 3c 47 25 29 0d 29  |J%)=1<<(1<<G%).)|
000128a0  4b 3e e3 62 25 3d 32 b8  6c 79 3a f3 5a 24 3a 5a  |K>.b%=2.ly:.Z$:Z|
000128b0  24 3d a4 64 28 4a 25 29  2b 5a 24 3a c8 99 34 36  |$=.d(J%)+Z$:..46|
000128c0  2c 32 38 30 2c 76 25 2c  5a 24 b8 2c 2c 53 25 28  |,280,v%,Z$.,,S%(|
000128d0  4a 25 2c 62 25 29 3a ed  62 25 3a e1 0d 29 4c 78  |J%,b%):.b%:..)Lx|
000128e0  dd f2 47 79 3a ea 43 79  2c 54 25 2c 4c 6c 25 2c  |..Gy:.Cy,T%,Ll%,|
000128f0  55 25 2c 4c 79 25 2c 4c  75 25 2c 4d 25 2c 4e 25  |U%,Ly%,Lu%,M%,N%|
00012900  2c 6b 75 25 3a ea 5a 79  25 2c 71 5f 25 2c 78 69  |,ku%:.Zy%,q_%,xi|
00012910  25 2c 65 61 25 2c 78 6e  25 2c 44 6c 25 2c 59 25  |%,ea%,xn%,Dl%,Y%|
00012920  2c 47 25 2c 4a 25 2c 46  25 2c 6a 5f 25 2c 55 79  |,G%,J%,F%,j_%,Uy|
00012930  25 3a 6b 75 25 3d 5a 25  21 59 79 25 2d 5a 25 21  |%:ku%=Z%!Yy%-Z%!|
00012940  51 79 25 3a e7 6b 75 25  80 28 5a 25 21 71 25 3d  |Qy%:.ku%.(Z%!q%=|
00012950  66 79 29 8c 0d 29 4d 11  f2 79 28 22 4d 6f 76 65  |fy)..)M..y("Move|
00012960  22 2c 5a 25 29 0d 29 4e  2f cd 3a 21 75 5f 3d 6d  |",Z%).)N/.:!u_=m|
00012970  6c 25 3a 55 25 3d a4 4d  28 32 37 32 29 3a ea 85  |l%:U%=.M(272):..|
00012980  3a ee 85 ea f7 85 3a f2  43 28 55 25 2c 32 37 32  |:.....:.C(U%,272|
00012990  29 3a f2 51 0d 29 4f d7  4c 79 25 3d 55 25 3a 4c  |):.Q.)O.Ly%=U%:L|
000129a0  75 25 3d 4c 79 25 2b 31  36 3a 59 25 3d 5a 25 21  |u%=Ly%+16:Y%=Z%!|
000129b0  47 5f 25 3a 47 25 3d 5a  25 2b 60 75 25 3a 46 25  |G_%:G%=Z%+`u%:F%|
000129c0  3d 5a 25 2b 5f 75 25 3a  4c 79 25 21 30 3d 46 25  |=Z%+_u%:Ly%!0=F%|
000129d0  21 30 2a 28 31 3c 3c 53  79 25 29 3a 4c 79 25 21  |!0*(1<<Sy%):Ly%!|
000129e0  34 3d 46 25 21 34 2a 28  31 3c 3c 6d 25 29 3a 4c  |4=F%!4*(1<<m%):L|
000129f0  79 25 21 38 3d 46 25 21  38 2a 28 31 3c 3c 47 25  |y%!8=F%!8*(1<<G%|
00012a00  28 59 25 29 29 3a 4c 79  25 21 31 32 3d 46 25 21  |(Y%)):Ly%!12=F%!|
00012a10  31 32 2a 28 31 3c 3c 44  25 28 59 25 29 29 3a 4d  |12*(1<<D%(Y%)):M|
00012a20  25 3d a4 7a 28 4c 79 25  2c 50 25 28 59 25 29 29  |%=.z(Ly%,P%(Y%))|
00012a30  3a 4e 25 3d a4 66 28 4c  79 25 2c 42 25 28 59 25  |:N%=.f(Ly%,B%(Y%|
00012a40  29 29 3a c8 99 26 34 30  37 34 30 2c 58 25 28 59  |)):..&40740,X%(Y|
00012a50  25 29 2c 4e 25 28 59 25  29 2c 2d 31 2c 2d 31 2c  |%),N%(Y%),-1,-1,|
00012a60  4c 75 25 3a e7 5a 25 21  6c 25 8c 0d 29 50 73 c8  |Lu%:.Z%!l%..)Ps.|
00012a70  99 34 36 2c 32 39 36 2c  5a 25 21 6c 25 2c 22 30  |.46,296,Z%!l%,"0|
00012a80  22 b8 2c 2c 2c 5a 79 25  2c 71 5f 25 2c 2c 44 6c  |".,,,Zy%,q_%,,Dl|
00012a90  25 3a 54 25 3d 28 4d 25  3c 3e 5a 79 25 29 84 28  |%:T%=(M%<>Zy%).(|
00012aa0  4e 25 3c 3e 71 5f 25 29  3a 54 25 3d 54 25 84 a4  |N%<>q_%):T%=T%..|
00012ab0  78 28 44 6c 25 2c 34 29  3a 54 25 3d 54 25 84 a4  |x(Dl%,4):T%=T%..|
00012ac0  78 28 44 6c 25 2c 35 29  3a 54 25 3d 54 25 84 a4  |x(Dl%,5):T%=T%..|
00012ad0  78 28 44 6c 25 2c 39 29  3a e7 ac 54 25 8c 0d 29  |x(Dl%,9):..T%..)|
00012ae0  51 2c e3 4a 25 3d 30 b8  46 25 28 59 25 29 2d 31  |Q,.J%=0.F%(Y%)-1|
00012af0  3a 54 25 3d 54 25 84 28  4c 75 25 3f 4a 25 3c 3e  |:T%=T%.(Lu%?J%<>|
00012b00  47 25 3f 4a 25 29 3a ed  4a 25 0d 29 52 05 cd 0d  |G%?J%):.J%.)R...|
00012b10  29 53 0a cc 3a 54 25 3d  b9 0d 29 54 0a cd 3a e7  |)S..:T%=..)T..:.|
00012b20  54 25 8c 0d 29 55 fa e3  4a 25 3d 30 b8 46 25 28  |T%..)U..J%=0.F%(|
00012b30  59 25 29 2d 31 3a 47 25  3f 4a 25 3d 4c 75 25 3f  |Y%)-1:G%?J%=Lu%?|
00012b40  4a 25 3a ed 4a 25 3a f2  57 28 5a 25 21 6c 25 29  |J%:.J%:.W(Z%!l%)|
00012b50  3a 5a 79 25 3d 4d 25 2b  a4 7a 28 4c 79 25 2c 5a  |:Zy%=M%+.z(Ly%,Z|
00012b60  25 21 48 4a 25 29 3a 71  5f 25 3d 4e 25 2b a4 66  |%!HJ%):q_%=N%+.f|
00012b70  28 4c 79 25 2c 5a 25 21  43 4a 25 29 3a 5a 25 21  |(Ly%,Z%!CJ%):Z%!|
00012b80  43 79 25 3d 5a 79 25 3c  3c 53 79 25 3a 5a 25 21  |Cy%=Zy%<<Sy%:Z%!|
00012b90  76 79 25 3d 71 5f 25 3c  3c 6d 25 3a 78 69 25 3d  |vy%=q_%<<m%:xi%=|
00012ba0  a4 7a 28 4c 79 25 2c 5a  25 21 48 4a 25 29 3a 65  |.z(Ly%,Z%!HJ%):e|
00012bb0  61 25 3d a4 66 28 4c 79  25 2c 5a 25 21 43 4a 25  |a%=.f(Ly%,Z%!CJ%|
00012bc0  29 3a 5a 25 21 76 75 25  3d 28 28 78 69 25 2b 31  |):Z%!vu%=((xi%+1|
00012bd0  29 81 32 29 3c 3c 53 79  25 3a 5a 25 21 75 69 25  |).2)<<Sy%:Z%!ui%|
00012be0  3d 28 71 5f 25 2d 28 28  65 61 25 2b 31 29 81 32  |=(q_%-((ea%+1).2|
00012bf0  29 29 3c 3c 6d 25 3a 45  61 25 3d 5a 25 21 77 25  |))<<m%:Ea%=Z%!w%|
00012c00  3a 52 61 25 3d 5a 25 21  78 25 3a 6a 5f 25 3d 28  |:Ra%=Z%!x%:j_%=(|
00012c10  5a 79 25 3c 3c 53 79 25  29 2a 45 61 25 0d 29 56  |Zy%<<Sy%)*Ea%.)V|
00012c20  a4 55 79 25 3d 28 28 71  5f 25 3c 3c 6d 25 29 2a  |.Uy%=((q_%<<m%)*|
00012c30  52 61 25 29 2b 45 5f 25  3a f2 56 79 28 5a 25 21  |Ra%)+E_%:.Vy(Z%!|
00012c40  7a 25 2c 6a 5f 25 2c 55  79 25 2b 34 2c 30 29 3a  |z%,j_%,Uy%+4,0):|
00012c50  f2 48 5f 28 5a 79 25 2c  71 5f 25 29 3a 43 79 3d  |.H_(Zy%,q_%):Cy=|
00012c60  6c 79 2b 28 32 2a 5a 25  21 51 75 25 29 3a 43 79  |ly+(2*Z%!Qu%):Cy|
00012c70  3d 43 79 2a 32 35 36 2f  46 25 28 59 25 29 3a 43  |=Cy*256/F%(Y%):C|
00012c80  79 3d 43 79 2a a4 6e 79  28 eb 2c 5a 79 25 2c 71  |y=Cy*.ny(.,Zy%,q|
00012c90  5f 25 2c a3 2c a3 29 3a  4c 6c 25 3d a3 3a f5 3a  |_%,.,.):Ll%=.:.:|
00012ca0  43 79 3d 43 79 2a 31 2e  32 3a 54 25 3d a4 42 28  |Cy=Cy*1.2:T%=.B(|
00012cb0  5a 25 21 6c 25 2c 43 79  29 3a e7 ac 28 54 25 29  |Z%!l%,Cy):..(T%)|
00012cc0  8c 0d 29 57 40 67 25 3d  5a 25 21 6c 25 3a 67 25  |..)W@g%=Z%!l%:g%|
00012cd0  21 30 3d 43 79 3a 67 25  21 34 3d 30 3a 67 25 21  |!0=Cy:g%!4=0:g%!|
00012ce0  38 3d 31 36 3a 67 25 21  31 32 3d 31 36 3a 4c 6c  |8=16:g%!12=16:Ll|
00012cf0  25 3d ac 28 a4 72 79 29  3a e7 ac 28 4c 6c 25 29  |%=.(.ry):..(Ll%)|
00012d00  8c 0d 29 58 0d f2 57 28  5a 25 21 6c 25 29 0d 29  |..)X..W(Z%!l%).)|
00012d10  59 05 cd 0d 29 5a 15 cd  3a fd 54 25 84 4c 6c 25  |Y...)Z..:.T%.Ll%|
00012d20  3a e7 ac 28 54 25 29 8c  0d 29 5b 1e 67 25 21 30  |:..(T%)..)[.g%!0|
00012d30  3d 67 25 21 31 32 3a f2  60 28 5a 25 21 6c 25 2c  |=g%!12:.`(Z%!l%,|
00012d40  67 25 21 31 32 29 0d 29  5c 05 cd 0d 29 5d 2a cd  |g%!12).)\...)]*.|
00012d50  3a f7 85 3a f2 43 28 55  25 2c 32 37 32 29 3a 5a  |:..:.C(U%,272):Z|
00012d60  25 21 59 79 25 3d 5a 25  21 51 79 25 2b 6b 75 25  |%!Yy%=Z%!Qy%+ku%|
00012d70  3a e7 54 25 8c 0d 29 5e  1a f2 46 28 56 79 25 2c  |:.T%..)^..F(Vy%,|
00012d80  a4 43 28 39 29 29 3a 5a  25 21 71 25 3d 44 75 0d  |.C(9)):Z%!q%=Du.|
00012d90  29 5f 16 cc 3a e7 6b 75  25 80 28 5a 25 21 7a 25  |)_..:.ku%.(Z%!z%|
00012da0  3c 3e 30 29 8c 0d 29 60  11 f2 44 28 22 4d 6f 76  |<>0)..)`..D("Mov|
00012db0  65 22 2c 5a 25 29 0d 29  61 05 cd 0d 29 62 07 cd  |e",Z%).)a...)b..|
00012dc0  3a e1 0d 29 63 41 dd a4  78 28 61 79 25 2c 67 69  |:..)cA..x(ay%,gi|
00012dd0  25 29 3a ea 52 25 2c 61  25 3a c8 99 35 33 2c eb  |%):.R%,a%:..53,.|
00012de0  2c 67 69 25 b8 2c 2c 52  25 3a c8 99 35 33 2c 61  |,gi%.,,R%:..53,a|
00012df0  79 25 2c 67 69 25 b8 2c  2c 61 25 3a 3d 52 25 3c  |y%,gi%.,,a%:=R%<|
00012e00  3e 61 25 0d 29 64 e7 dd  f2 48 5f 28 4d 25 2c 4e  |>a%.)d...H_(M%,N|
00012e10  25 29 3a ea 46 25 2c 49  5f 25 2c 4a 25 2c 6f 4a  |%):.F%,I_%,J%,oJ|
00012e20  25 2c 51 25 2c 6c 4a 25  2c 58 25 3a 49 5f 25 3d  |%,Q%,lJ%,X%:I_%=|
00012e30  a4 75 28 64 79 25 29 3a  f2 57 28 5a 25 21 51 79  |.u(dy%):.W(Z%!Qy|
00012e40  25 29 3a f2 58 28 5a 25  21 51 79 25 2c 28 28 49  |%):.X(Z%!Qy%,((I|
00012e50  5f 25 2b 31 29 2a 31 36  2a 63 5f 25 29 29 3a 6f  |_%+1)*16*c_%)):o|
00012e60  4a 25 3d 30 3a 6c 4a 25  3d 30 3a e3 4a 25 3d 30  |J%=0:lJ%=0:.J%=0|
00012e70  b8 49 5f 25 3a 46 25 3d  5a 25 21 51 79 25 2b 28  |.I_%:F%=Z%!Qy%+(|
00012e80  4a 25 2a 31 36 2a 63 5f  25 29 3a 51 25 3d 28 28  |J%*16*c_%):Q%=((|
00012e90  4a 25 2a 4d 25 29 81 49  5f 25 29 3c 3c 53 79 25  |J%*M%).I_%)<<Sy%|
00012ea0  3a 58 25 3d 28 28 4a 25  2a 4e 25 29 81 49 5f 25  |:X%=((J%*N%).I_%|
00012eb0  29 3c 3c 6d 25 3a f2 4a  5f 28 46 25 2c 6f 4a 25  |)<<m%:.J_(F%,oJ%|
00012ec0  2c 6c 4a 25 2c 51 25 2c  58 25 29 3a 6f 4a 25 3d  |,lJ%,Q%,X%):oJ%=|
00012ed0  51 25 3a 6c 4a 25 3d 58  25 3a ed 4a 25 3a 5a 25  |Q%:lJ%=X%:.J%:Z%|
00012ee0  21 51 75 25 3d 49 5f 25  3a e1 0d 29 65 2f dd f2  |!Qu%=I_%:..)e/..|
00012ef0  4a 5f 28 46 25 2c 6f 4a  25 2c 6c 4a 25 2c 51 25  |J_(F%,oJ%,lJ%,Q%|
00012f00  2c 58 25 29 3a ea 4a 25  3a e3 4a 25 3d 30 b8 31  |,X%):.J%:.J%=0.1|
00012f10  30 3a c8 8e 4a 25 80 33  ca 0d 29 66 18 c9 30 3a  |0:..J%.3..)f..0:|
00012f20  46 25 21 49 75 25 3d 30  3a 46 25 21 57 5f 25 3d  |F%!Iu%=0:F%!W_%=|
00012f30  30 0d 29 67 1b c9 31 3a  46 25 21 49 75 25 3d 6f  |0.)g..1:F%!Iu%=o|
00012f40  4a 25 3a 46 25 21 57 5f  25 3d 51 25 0d 29 68 1c  |J%:F%!W_%=Q%.)h.|
00012f50  c9 32 3a 46 25 21 49 75  25 3d 2d 51 25 3a 46 25  |.2:F%!Iu%=-Q%:F%|
00012f60  21 57 5f 25 3d 2d 51 25  0d 29 69 18 c9 33 3a 46  |!W_%=-Q%.)i..3:F|
00012f70  25 21 49 75 25 3d 30 3a  46 25 21 57 5f 25 3d 30  |%!Iu%=0:F%!W_%=0|
00012f80  0d 29 6a 0e cb 3a c8 8e  4a 25 80 31 32 ca 0d 29  |.)j..:..J%.12..)|
00012f90  6b 18 c9 30 3a 46 25 21  53 6c 25 3d 30 3a 46 25  |k..0:F%!Sl%=0:F%|
00012fa0  21 77 4a 25 3d 30 0d 29  6c 1c c9 34 3a 46 25 21  |!wJ%=0.)l..4:F%!|
00012fb0  53 6c 25 3d 2d 58 25 3a  46 25 21 77 4a 25 3d 2d  |Sl%=-X%:F%!wJ%=-|
00012fc0  58 25 0d 29 6d 1b c9 38  3a 46 25 21 53 6c 25 3d  |X%.)m..8:F%!Sl%=|
00012fd0  6c 4a 25 3a 46 25 21 77  4a 25 3d 58 25 0d 29 6e  |lJ%:F%!wJ%=X%.)n|
00012fe0  13 cb 3a 46 25 2b 3d 63  5f 25 3a ed 4a 25 3a e1  |..:F%+=c_%:.J%:.|
00012ff0  0d 29 6f 51 dd a4 72 79  3a ea 54 25 2c 4a 25 2c  |.)oQ..ry:.T%,J%,|
00013000  69 24 2c 67 69 25 2c 58  79 25 2c 51 6c 25 2c 55  |i$,gi%,Xy%,Ql%,U|
00013010  6c 25 2c 58 6c 25 2c 67  25 2c 47 25 3a ea dc 3a  |l%,Xl%,g%,G%:..:|
00013020  f7 2b 30 3a 67 25 3d 5a  25 21 6c 25 3a ea 85 3a  |.+0:g%=Z%!l%:..:|
00013030  ee 85 ea f7 85 3a c8 99  26 36 30 36 63 31 3a f2  |.....:..&606c1:.|
00013040  51 0d 29 70 62 c8 99 26  36 30 36 63 30 3a 4a 25  |Q.)pb..&606c0:J%|
00013050  3d 30 3a f5 3a c8 99 26  36 30 36 63 34 2c 28 4a  |=0:.:..&606c4,(J|
00013060  25 2a 31 30 30 29 81 32  37 3a f2 61 79 3a c8 99  |%*100).27:.ay:..|
00013070  26 32 30 30 32 65 2c 32  37 31 2c 67 25 2c c3 28  |&2002e,271,g%,.(|
00013080  4a 25 29 2c 30 2c 4d 25  2c 4e 25 2c eb b8 3b 54  |J%),0,M%,N%,..;T|
00013090  25 3a 54 25 3d a4 55 28  54 25 29 3a e7 ac 28 54  |%:T%=.U(T%):..(T|
000130a0  25 29 8c 0d 29 71 ca 47  25 3d 53 25 28 5a 25 21  |%)..)q.G%=S%(Z%!|
000130b0  47 5f 25 2c 4a 25 2b 31  29 3a c8 99 34 36 2c 33  |G_%,J%+1):..46,3|
000130c0  31 36 2c 67 25 2c c3 28  4a 25 29 2c 30 b8 58 79  |16,g%,.(J%),0.Xy|
000130d0  25 2c 51 6c 25 2c 55 6c  25 2c 58 6c 25 3a c8 99  |%,Ql%,Ul%,Xl%:..|
000130e0  26 34 30 30 65 36 2c 31  32 38 2b 5a 25 21 72 5f  |&400e6,128+Z%!r_|
000130f0  25 3a c8 99 34 36 2c 35  36 32 2c 76 25 2c 47 25  |%:..46,562,v%,G%|
00013100  2c 30 2c 30 2c 2c 4c 79  25 3a c8 99 34 36 2c 35  |,0,0,,Ly%:..46,5|
00013110  36 34 2c 76 25 2c 47 25  2c 30 2c 30 2c 31 31 2c  |64,v%,G%,0,0,11,|
00013120  4c 79 25 2c 4c 75 25 3a  c8 99 34 36 2c 58 79 25  |Ly%,Lu%:..46,Xy%|
00013130  2c 51 6c 25 2c 55 6c 25  2c 58 6c 25 3a c8 99 34  |,Ql%,Ul%,Xl%:..4|
00013140  36 2c 32 38 30 2c 67 25  2c c3 28 4a 25 29 b8 2c  |6,280,g%,.(J%).,|
00013150  2c 47 25 3a 5a 25 21 28  46 75 25 2b 28 4a 25 3c  |,G%:Z%!(Fu%+(J%<|
00013160  3c 32 29 29 3d 47 25 3a  4a 25 2b 3d 31 0d 29 72  |<2))=G%:J%+=1.)r|
00013170  17 cd 3a fd 54 25 84 28  4a 25 3d 6c 79 29 3a e7  |..:.T%.(J%=ly):.|
00013180  58 61 25 8c 0d 29 73 0b  e7 ac 28 54 25 29 8c 0d  |Xa%..)s...(T%)..|
00013190  29 74 15 54 25 3d a4 79  28 5a 25 21 46 75 25 2c  |)t.T%=.y(Z%!Fu%,|
000131a0  59 61 25 29 0d 29 75 0d  cd 3a e7 ac 28 54 25 29  |Ya%).)u..:..(T%)|
000131b0  8c 0d 29 76 15 54 25 3d  a4 79 28 5a 25 21 48 6c  |..)v.T%=.y(Z%!Hl|
000131c0  25 2c 6c 69 25 29 0d 29  77 05 cd 0d 29 78 0a cd  |%,li%).)w...)x..|
000131d0  3a e7 54 25 8c 0d 29 79  0d f2 57 28 5a 25 21 6c  |:.T%..)y..W(Z%!l|
000131e0  25 29 0d 29 7a 15 cd 3a  f7 85 3a c8 99 26 36 30  |%).)z..:..:..&60|
000131f0  36 63 31 3a 3d 54 25 0d  29 7b 25 dc 20 22 64 61  |6c1:=T%.){%. "da|
00013200  6c 65 6b 22 2c 20 22 6d  61 6e 22 2c 20 22 70 79  |lek", "man", "py|
00013210  72 65 22 2c 20 22 72 69  67 68 74 22 0d 29 7c 28  |re", "right".)|(|
00013220  dc 20 22 75 70 72 69 67  68 74 22 2c 20 20 22 75  |. "upright",  "u|
00013230  70 22 2c 20 22 75 70 6c  65 66 74 22 2c 20 22 6c  |p", "upleft", "l|
00013240  65 66 74 22 0d 29 7d 25  dc 20 22 64 6f 77 6e 6c  |eft".)}%. "downl|
00013250  65 66 74 22 2c 20 22 64  6f 77 6e 22 2c 20 22 64  |eft", "down", "d|
00013260  6f 77 6e 72 69 67 68 74  22 0d 29 7e fd dd a4 79  |ownright".)~...y|
00013270  28 52 75 25 2c 56 61 25  29 3a ea 6b 25 2c 51 25  |(Ru%,Va%):.k%,Q%|
00013280  2c 58 25 2c 54 25 2c 46  25 2c 49 5f 25 2c 55 61  |,X%,T%,F%,I_%,Ua|
00013290  25 2c 59 25 2c 46 79 25  2c 6f 4a 25 2c 6c 4a 25  |%,Y%,Fy%,oJ%,lJ%|
000132a0  3a ea 5a 25 28 29 3a ea  dc 3a f7 2b 30 3a 54 25  |:.Z%():..:.+0:T%|
000132b0  3d a3 3a 55 61 25 3d 4a  25 3a de 5a 25 28 31 35  |=.:Ua%=J%:.Z%(15|
000132c0  2c 33 29 3a 5a 25 28 29  3d 2d 31 3a f5 3a f3 6b  |,3):Z%()=-1:.:.k|
000132d0  25 3a 46 25 3d 5a 25 21  51 79 25 2b 28 6b 25 2a  |%:F%=Z%!Qy%+(k%*|
000132e0  63 5f 25 29 3a 49 5f 25  3d 5a 25 21 51 75 25 3a  |c_%):I_%=Z%!Qu%:|
000132f0  46 25 21 56 61 25 3d 52  75 25 3a f5 3a 6f 4a 25  |F%!Va%=Ru%:.:oJ%|
00013300  3d 46 25 21 57 5f 25 3a  6c 4a 25 3d 46 25 21 77  |=F%!W_%:lJ%=F%!w|
00013310  4a 25 3a 46 25 2b 3d 31  36 2a 63 5f 25 3a 51 25  |J%:F%+=16*c_%:Q%|
00013320  3d 46 25 21 57 5f 25 3a  58 25 3d 46 25 21 77 4a  |=F%!W_%:X%=F%!wJ|
00013330  25 3a 59 25 3d 28 28 51  25 3e 30 29 80 28 58 25  |%:Y%=((Q%>0).(X%|
00013340  3c 30 29 29 84 28 28 51  25 3c 30 29 80 28 58 25  |<0)).((Q%<0).(X%|
00013350  3e 30 29 29 3a 51 25 3d  94 28 51 25 2d 6f 4a 25  |>0)):Q%=.(Q%-oJ%|
00013360  29 3e 3e 53 79 25 0d 29  7f 4a 58 25 3d 94 28 58  |)>>Sy%.).JX%=.(X|
00013370  25 2d 6c 4a 25 29 3e 3e  6d 25 3a 54 25 3d a4 55  |%-lJ%)>>m%:T%=.U|
00013380  79 28 51 25 2c 58 25 2c  46 25 21 56 61 25 2c 59  |y(Q%,X%,F%!Va%,Y|
00013390  25 29 3a 49 5f 25 2d 3d  31 3a fd 54 25 84 28 49  |%):I_%-=1:.T%.(I|
000133a0  5f 25 3d 30 29 3a fd 54  25 84 28 6b 25 3d 30 29  |_%=0):.T%.(k%=0)|
000133b0  0d 29 80 43 dc 20 25 30  30 30 31 2c 20 25 31 30  |.).C. %0001, %10|
000133c0  30 31 2c 20 25 31 30 30  30 2c 20 25 31 30 31 30  |01, %1000, %1010|
000133d0  2c 20 25 30 30 31 30 2c  20 25 30 31 31 30 2c 20  |, %0010, %0110, |
000133e0  25 30 31 30 30 2c 20 25  30 31 30 31 2c 20 25 30  |%0100, %0101, %0|
000133f0  30 30 30 0d 29 81 07 3d  54 25 0d 29 82 a0 dd a4  |000.)..=T%.)....|
00013400  55 79 28 51 25 2c 58 25  2c f8 74 75 25 2c 43 69  |Uy(Q%,X%,.tu%,Ci|
00013410  25 29 3a ea 54 25 2c 69  25 2c 58 79 25 2c 51 6c  |%):.T%,i%,Xy%,Ql|
00013420  25 2c 55 6c 25 2c 58 6c  25 2c 45 24 2c 67 25 3a  |%,Ul%,Xl%,E$,g%:|
00013430  67 25 3d 5a 25 21 6c 25  3a 54 25 3d b9 3a 69 25  |g%=Z%!l%:T%=.:i%|
00013440  3d 30 3a c8 95 28 69 25  2b 55 61 25 29 3c 4a 25  |=0:..(i%+Ua%)<J%|
00013450  80 54 25 3a 54 25 3d 28  5a 25 28 69 25 2c 30 29  |.T%:T%=(Z%(i%,0)|
00013460  3c 3e 51 25 29 84 28 5a  25 28 69 25 2c 31 29 3c  |<>Q%).(Z%(i%,1)<|
00013470  3e 58 25 29 3a 54 25 3d  54 25 84 28 5a 25 28 69  |>X%):T%=T%.(Z%(i|
00013480  25 2c 32 29 3c 3e 43 69  25 29 3a 69 25 2b 3d 31  |%,2)<>Ci%):i%+=1|
00013490  3a ce 3a e7 ac 28 54 25  29 8c 0d 29 83 12 74 75  |:.:..(T%)..)..tu|
000134a0  25 3d 5a 25 28 69 25 2d  31 2c 33 29 0d 29 84 22  |%=Z%(i%-1,3).)."|
000134b0  cc 3a 45 24 3d c3 28 4a  25 29 3a f2 61 79 3a e7  |.:E$=.(J%):.ay:.|
000134c0  28 51 25 3d 30 29 80 28  58 25 3d 30 29 8c 0d 29  |(Q%=0).(X%=0)..)|
000134d0  85 1f c8 99 26 32 30 30  32 65 2c 32 37 31 2c 67  |....&2002e,271,g|
000134e0  25 2c 45 24 2c 2c 2c 2c  eb b8 3b 54 25 0d 29 86  |%,E$,,,,..;T%.).|
000134f0  2b cc 3a c8 99 26 32 30  30 32 65 2c 32 37 31 2c  |+.:..&2002e,271,|
00013500  67 25 2c 45 24 2c 2c 4d  25 2b 51 25 2c 4e 25 2b  |g%,E$,,M%+Q%,N%+|
00013510  58 25 2c eb b8 3b 54 25  0d 29 87 17 cd 3a 54 25  |X%,..;T%.)...:T%|
00013520  3d a4 55 28 54 25 29 3a  e7 ac 28 54 25 29 8c 0d  |=.U(T%):..(T%)..|
00013530  29 88 3a 5a 25 28 69 25  2c 30 29 3d 51 25 3a 5a  |).:Z%(i%,0)=Q%:Z|
00013540  25 28 69 25 2c 31 29 3d  58 25 3a 5a 25 28 69 25  |%(i%,1)=X%:Z%(i%|
00013550  2c 32 29 3d 43 69 25 3a  e7 28 51 25 3c 3e 30 29  |,2)=Ci%:.(Q%<>0)|
00013560  84 28 58 25 3c 3e 30 29  8c 0d 29 89 3f 51 25 3d  |.(X%<>0)..).?Q%=|
00013570  51 25 3c 3c 53 79 25 3a  58 25 3d 58 25 3c 3c 6d  |Q%<<Sy%:X%=X%<<m|
00013580  25 3a c8 99 34 36 2c 33  31 36 2c 67 25 2c 45 24  |%:..46,316,g%,E$|
00013590  2c 30 b8 58 79 25 2c 51  6c 25 2c 55 6c 25 2c 58  |,0.Xy%,Ql%,Ul%,X|
000135a0  6c 25 3a e7 43 69 25 8c  0d 29 8a 31 c8 99 34 36  |l%:.Ci%..).1..46|
000135b0  2c 35 34 36 2c 67 25 2c  52 75 25 2c 30 2c 58 25  |,546,g%,Ru%,0,X%|
000135c0  2c 33 3a c8 99 34 36 2c  35 34 36 2c 67 25 2c 52  |,3:..46,546,g%,R|
000135d0  75 25 2c 51 25 2c 30 2c  33 0d 29 8b 33 cc 3a c8  |u%,Q%,0,3.).3.:.|
000135e0  99 34 36 2c 35 34 36 2c  67 25 2c 52 75 25 2c 30  |.46,546,g%,Ru%,0|
000135f0  2c 30 2c 33 3a c8 99 34  36 2c 35 34 36 2c 67 25  |,0,3:..46,546,g%|
00013600  2c 52 75 25 2c 51 25 2c  58 25 2c 33 0d 29 8c 1a  |,Ru%,Q%,X%,3.)..|
00013610  cd 3a c8 99 34 36 2c 58  79 25 2c 51 6c 25 2c 55  |.:..46,Xy%,Ql%,U|
00013620  6c 25 2c 58 6c 25 0d 29  8d 42 cd 3a c8 99 34 36  |l%,Xl%.).B.:..46|
00013630  2c 32 38 30 2c 67 25 2c  45 24 b8 2c 2c 74 75 25  |,280,g%,E$.,,tu%|
00013640  3a 5a 25 28 69 25 2c 33  29 3d 74 75 25 3a 4a 25  |:Z%(i%,3)=tu%:J%|
00013650  2b 3d 31 3a c8 99 26 36  30 36 63 34 2c 28 4a 25  |+=1:..&606c4,(J%|
00013660  2a 31 30 30 29 81 32 37  0d 29 8e 05 cd 0d 29 8f  |*100).27.)....).|
00013670  09 cd 3a 3d 54 25 0d 29  90 1d dd a4 66 28 53 25  |..:=T%.)....f(S%|
00013680  2c 4d 29 3a 3d 28 4d 2a  53 25 21 34 29 81 53 25  |,M):=(M*S%!4).S%|
00013690  21 31 32 0d 29 91 1c dd  a4 7a 28 53 25 2c 4d 29  |!12.)....z(S%,M)|
000136a0  3a 3d 28 4d 2a 53 25 21  30 29 81 53 25 21 38 0d  |:=(M*S%!0).S%!8.|
000136b0  29 92 10 dd f2 61 79 3a  e7 46 6c 25 3e 34 8c 0d  |)....ay:.Fl%>4..|
000136c0  29 93 15 e6 30 2c 30 c8  9c 30 3a e6 31 32 38 2c  |)...0,0..0:.128,|
000136d0  30 c8 9c 30 0d 29 94 11  cc 3a e6 30 2c 30 3a e6  |0..0.)...:.0,0:.|
000136e0  31 32 38 2c 30 0d 29 95  07 cd 3a e1 0d 29 96 18  |128,0.)...:..)..|
000136f0  dd a4 5f 4d 65 73 73 61  67 65 5f 76 65 72 73 69  |.._Message_versi|
00013700  6f 6e 3d 34 0d 29 97 4f  dd a4 5f 68 61 72 64 5f  |on=4.).O.._hard_|
00013710  69 6e 69 74 69 61 6c 69  73 65 5f 4d 65 73 73 61  |initialise_Messa|
00013720  67 65 ea 85 3a ee 85 ea  f7 85 3a f2 41 28 22 25  |ge..:.....:.A("%|
00013730  2e 4d 65 73 73 61 67 65  3a 20 68 61 72 64 5f 69  |.Message: hard_i|
00013740  6e 69 74 69 61 6c 69 73  65 5f 4d 65 73 73 61 67  |nitialise_Messag|
00013750  65 22 29 0d 29 98 54 76  42 3d 33 31 3a c8 99 35  |e").).TvB=31:..5|
00013760  2c 22 52 4d 45 6e 73 75  72 65 20 43 41 73 73 65  |,"RMEnsure CAsse|
00013770  6d 62 6c 65 72 20 30 2e  30 31 20 52 4d 4c 6f 61  |mbler 0.01 RMLoa|
00013780  64 20 53 79 73 74 65 6d  3a 4d 6f 64 75 6c 65 73  |d System:Modules|
00013790  2e 43 41 73 73 65 6d 62  6c 65 72 22 3a de 51 69  |.CAssembler":.Qi|
000137a0  20 32 35 36 3a 3d 30 0d  29 99 49 dd a4 65 79 28  | 256:=0.).I..ey(|
000137b0  6a 24 2c 46 6e 25 2c f8  55 5f 25 29 ea 41 25 3a  |j$,Fn%,.U_%).A%:|
000137c0  c8 99 26 66 63 62 38 33  2c 6a 24 2b 22 2e 4d 65  |..&fcb83,j$+".Me|
000137d0  73 73 61 67 65 73 2e 22  2c 46 6e 25 2c 30 b8 41  |ssages.",Fn%,0.A|
000137e0  25 2c 55 5f 25 3a e7 55  5f 25 3d 30 8c d6 76 5f  |%,U_%:.U_%=0..v_|
000137f0  0d 29 9a 07 3d 41 25 0d  29 9b 3f dd a4 53 79 28  |.)..=A%.).?..Sy(|
00013800  4e 25 2c 78 24 2c 49 24  29 ea 47 79 25 3a c8 99  |N%,x$,I$).Gy%:..|
00013810  26 66 63 62 38 35 2c 78  24 2c 49 24 2c 4e 25 b8  |&fcb85,x$,I$,N%.|
00013820  47 79 25 3b 4e 25 3a 3d  47 79 25 80 28 28 4e 25  |Gy%;N%:=Gy%.((N%|
00013830  80 32 29 3d 32 29 0d 29  9c 33 dd a4 45 79 28 4e  |.2)=2).).3..Ey(N|
00013840  25 29 ea 47 79 25 3a c8  99 26 66 63 62 38 36 2c  |%).Gy%:..&fcb86,|
00013850  4e 25 b8 47 79 25 3b 4e  25 3a 3d 47 79 25 80 28  |N%.Gy%;N%:=Gy%.(|
00013860  28 4e 25 80 32 29 3d 32  29 0d 29 9d 3d dd a4 65  |(N%.2)=2).).=..e|
00013870  28 4e 25 2c 78 24 29 ea  47 79 25 3a c8 99 26 66  |(N%,x$).Gy%:..&f|
00013880  63 62 38 34 2c 78 24 2c  51 69 2c 32 35 36 2c 4e  |cb84,x$,Qi,256,N|
00013890  25 2c 30 b8 47 79 25 2c  4e 25 3a 3f 4e 25 3d 31  |%,0.Gy%,N%:?N%=1|
000138a0  33 3a 3d 24 51 69 0d 29  9e 24 dd f2 6a 4a 28 4e  |3:=$Qi.).$..jJ(N|
000138b0  25 2c 78 24 2c 49 24 29  4e 25 3d a4 53 79 28 4e  |%,x$,I$)N%=.Sy(N|
000138c0  25 2c 78 24 2c 49 24 29  3a e1 0d 29 9f 18 dd f2  |%,x$,I$):..)....|
000138d0  71 5f 28 4e 25 29 4e 25  3d a4 45 79 28 4e 25 29  |q_(N%)N%=.Ey(N%)|
000138e0  3a e1 0d 29 a0 1d dd a4  43 28 4b 25 29 3d a4 65  |:..)....C(K%)=.e|
000138f0  28 60 79 25 2c 22 45 22  2b c3 28 4b 25 29 29 0d  |(`y%,"E"+.(K%)).|
00013900  29 a1 16 dd a4 48 28 7a  24 29 3d a4 65 28 60 79  |)....H(z$)=.e(`y|
00013910  25 2c 7a 24 29 0d 29 a2  1e dd f2 55 28 7a 24 2c  |%,z$).)....U(z$,|
00013920  61 24 29 f2 6a 4a 28 60  79 25 2c 7a 24 2c 61 24  |a$).jJ(`y%,z$,a$|
00013930  29 3a e1 0d 29 a3 29 dd  f2 62 79 28 7a 24 2c 42  |):..).)..by(z$,B|
00013940  25 29 c8 99 26 64 63 62  38 34 2c 7a 24 2c 42 25  |%)..&dcb84,z$,B%|
00013950  2c 32 35 36 2c 60 79 25  2c 30 3a e1 0d 29 a4 29  |,256,`y%,0:..).)|
00013960  dd f2 51 4a 28 7a 24 2c  42 25 29 c8 99 26 64 63  |..QJ(z$,B%)..&dc|
00013970  62 38 34 2c 7a 24 2c 42  25 2c 32 35 36 2c 60 79  |b84,z$,B%,256,`y|
00013980  25 2c 32 3a e1 0d 29 a5  12 dd f2 74 75 f2 71 5f  |%,2:..)....tu.q_|
00013990  28 60 79 25 29 3a e1 0d  29 a6 12 dd f2 6f 28 45  |(`y%):..)....o(E|
000139a0  25 29 e7 45 25 3c 3d 30  8c 0d 29 a7 1e f2 55 28  |%).E%<=0..)...U(|
000139b0  22 53 79 73 22 2c 22 22  29 3a f2 55 28 22 53 79  |"Sys",""):.U("Sy|
000139c0  73 4e 22 2c 22 22 29 0d  29 a8 2b cc f2 55 28 22  |sN","").).+..U("|
000139d0  53 79 73 22 2c a4 41 79  28 45 25 2b 34 29 29 3a  |Sys",.Ay(E%+4)):|
000139e0  f2 55 28 22 53 79 73 4e  22 2c c3 7e 28 21 45 25  |.U("SysN",.~(!E%|
000139f0  29 29 0d 29 a9 07 cd 3a  e1 0d 29 aa 1e dd a4 77  |)).)...:..)....w|
00013a00  28 4b 25 29 3d a4 65 28  60 79 25 2c 22 4c 45 22  |(K%)=.e(`y%,"LE"|
00013a10  2b c3 28 4b 25 29 29 0d  29 ab 2a dd f2 67 4a ea  |+.(K%)).).*..gJ.|
00013a20  85 3a ee 85 ea f7 85 3a  f2 41 28 22 25 2e 4d 65  |.:.....:.A("%.Me|
00013a30  73 73 61 67 65 3a 20 61  73 73 65 6d 62 6c 65 22  |ssage: assemble"|
00013a40  29 0d 29 ac 2c 5b 4f 50  54 56 25 3a 41 4c 49 47  |).).,[OPTV%:ALIG|
00013a50  4e 3a 2e 76 5f 3a a4 5a  3a 42 20 4e 6c 3a 5d 3a  |N:.v_:.Z:B Nl:]:|
00013a60  e7 56 25 80 34 8c 76 5f  2b 3d 79 79 25 0d 29 ad  |.V%.4.v_+=yy%.).|
00013a70  05 e1 0d 29 ae 1a dd a4  5f 43 68 65 63 6b 56 61  |...)...._CheckVa|
00013a80  72 73 5f 76 65 72 73 69  6f 6e 3d 33 0d 29 af 22  |rs_version=3.)."|
00013a90  dd a4 5f 68 61 72 64 5f  69 6e 69 74 69 61 6c 69  |.._hard_initiali|
00013aa0  73 65 5f 43 68 65 63 6b  56 61 72 73 3d 30 0d 29  |se_CheckVars=0.)|
00013ab0  b0 17 dd a4 5f 73 74 72  69 6e 67 5f 76 65 72 73  |...._string_vers|
00013ac0  69 6f 6e 3d 36 0d 29 b1  4c dd a4 5f 68 61 72 64  |ion=6.).L.._hard|
00013ad0  5f 69 6e 69 74 69 61 6c  69 73 65 5f 73 74 72 69  |_initialise_stri|
00013ae0  6e 67 ea 85 3a ee 85 ea  f7 85 3a f2 41 28 22 25  |ng..:.....:.A("%|
00013af0  2e 73 74 72 69 6e 67 3a  20 68 61 72 64 5f 69 6e  |.string: hard_in|
00013b00  69 74 69 61 6c 69 73 65  5f 73 74 72 69 6e 67 22  |itialise_string"|
00013b10  29 0d 29 b2 21 f2 53 28  22 3c 42 61 73 69 63 56  |).).!.S("<BasicV|
00013b20  24 4c 69 62 3e 2e 63 74  79 70 65 22 2c 31 29 3a  |$Lib>.ctype",1):|
00013b30  3d 30 0d 29 b3 43 dd a4  4c 79 28 52 24 29 ea 71  |=0.).C..Ly(R$).q|
00013b40  24 2c 79 75 25 2c 4a 25  2c 52 25 3a 79 75 25 3d  |$,yu%,J%,R%:yu%=|
00013b50  a9 28 52 24 29 3a 71 24  3d 22 22 3a c8 95 79 75  |.(R$):q$="":..yu|
00013b60  25 3e 30 3a 52 25 3d 97  28 52 24 29 3a e7 a4 6d  |%>0:R%=.(R$):..m|
00013b70  28 52 25 29 8c 0d 29 b4  12 71 24 2b 3d bd 28 a4  |(R%)..)..q$+=.(.|
00013b80  43 79 28 52 25 29 29 0d  29 b5 0e cc 71 24 2b 3d  |Cy(R%)).)...q$+=|
00013b90  bd 28 52 25 29 0d 29 b6  1e cd 3a 79 75 25 2d 3d  |.(R%).)...:yu%-=|
00013ba0  31 3a 52 24 3d c2 52 24  2c 79 75 25 29 3a ce 3a  |1:R$=.R$,yu%):.:|
00013bb0  3d 71 24 0d 29 b7 16 dd  a4 5f 63 74 79 70 65 5f  |=q$.)...._ctype_|
00013bc0  76 65 72 73 69 6f 6e 3d  31 0d 29 b8 1e dd a4 5f  |version=1.)...._|
00013bd0  68 61 72 64 5f 69 6e 69  74 69 61 6c 69 73 65 5f  |hard_initialise_|
00013be0  63 74 79 70 65 3d 30 0d  29 b9 1d dd a4 48 79 28  |ctype=0.)....Hy(|
00013bf0  52 25 29 3d 52 25 2d 97  28 22 61 22 29 2b 97 28  |R%)=R%-.("a")+.(|
00013c00  22 41 22 29 0d 29 ba 21  dd a4 6d 28 52 25 29 3d  |"A").).!..m(R%)=|
00013c10  52 25 3e 3d 97 28 22 61  22 29 80 52 25 3c 3d 97  |R%>=.("a").R%<=.|
00013c20  28 22 7a 22 29 0d 29 bb  18 dd a4 43 79 28 52 25  |("z").)....Cy(R%|
00013c30  29 ea 54 25 3a e7 a4 6d  28 52 25 29 8c 0d 29 bc  |).T%:..m(R%)..).|
00013c40  0e 54 25 3d a4 48 79 28  52 25 29 0d 29 bd 0a cc  |.T%=.Hy(R%).)...|
00013c50  54 25 3d 52 25 0d 29 be  09 cd 3a 3d 54 25 0d ff  |T%=R%.)...:=T%..|
00013c60