Freeware/MemPie2/!MemPie2/!RunImage

Home » Recent acquisitions » Acorn ADFS disks » adfs_ArchimedesWorld_199510.adf » AW1095_1 » Freeware/MemPie2/!MemPie2/!RunImage

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

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

Tape/disk:	Home » Recent acquisitions » Acorn ADFS disks » adfs_ArchimedesWorld_199510.adf » AW1095_1
Filename:	Freeware/MemPie2/!MemPie2/!RunImage
Read OK:	✔
File size:	16B7 bytes
Load address:	0000
Exec address:	0000

File contents

    1REM>!RunImage
    2REMProduced by BasCompress v1.60 (03 Feb 1995)
    3z=-1:R=FALSE:SYS&400ec,-1,-1TOn,,Ay:E=&8000+n+16:ONERRORONERROROFF:ERROREXTERR,REPORT$+" at line "+STR$(ERL):END
    4l=FALSE:ONERRORONERROROFF:PROCP:END
    5PROCO:PROCV:PROCa:PROCg:PROCz:PROCJ:PROCZ:END
    6DEFPROCJ:REPEAT:PROCN(-1):UNTILFALSE:ENDPROC
    7DEFPROCz:PROCY:PROCe:PROCR:PROCc("<MemoryPie2$Dir>"+".Templates"):PROCb("<MemoryPie2$Dir>"+".Sprites"):PROCw(o,7,S$):PROCD:PROCU:G%=FNM:PROCS:ENDPROC
    8DEFPROCO:LOCALA:DIME%&400,Ky 256,I 64:i=FALSE:by=&3831:g=&3830:F%=-1:ENDPROC
    9DEFPROCN(By):LOCALJy:IFBy<>-1THEN
   10SYS&400c7,By,E%TOC%
   11ELSE:SYS66TOJy:SYS&400e1,g,E%,Jy+30TOC%
   12ENDIF:CASEC%OF
   13WHEN0:PROCS
   14WHEN1:PROCW(0)
   15WHEN2:PROCG
   16WHEN3:PROCv
   17WHEN6:PROCf(!E%,E%!4,E%!8,E%!&c,E%!16)
   18WHEN8:PROCt
   19WHEN9:SYS&400cf,,E%+&80:Uy=(E%!&88AND1)=1:PROCK(!E%):IFUyTHEN
   20PROCL(J%,N%,W%)
   21ENDIF
   22WHEN17,18:PROCx(C%)
   23ENDCASE:ENDPROC
   24DEFPROCa:IFz=-1DIMz &78
   25FORry=0TO2STEP2:P%=z:[OPTry:.Qy:STMFD(&d)!,{0-3,&e}:MOV2,#0:.Hy:LDRB3,[0,2]:CMP3,#0:CMPNE3,#&d:MOVEQ3,#&d:STRB3,[1,2]:ADDNE2,2,#1:BNE Hy:LDMIA(&d)!,{0-3,pc}^:.jy:STMFD(&d)!,{0,1,&e}:.y:LDRB1,[0]:CMP1,#&d:BEQ Dy:CMP1,#65:ADDLT0,0,#1:BLT y:CMP1,#90
   26ADDLE1,1,#32:STRLEB1,[0]:ADD0,0,#1:B y:.Dy:LDMIA(&d)!,{0,1,pc}:]:NEXT:ENDPROC
   27DEFPROCg:LOCALMy:S$=FNE("Ver"):SYS&20010TOMy:M$=FNZ(My):DIMIy 4:$Iy="":DIM_ &d:$_="barpie":DIME(7),A(7):L=7:SYS&20051TOO,xy:m=O*xy:Y=TRUE:Xy=1/m*2*PI:s=-1:q=-1:h=FALSE:ENDPROC
   28DEFPROCX(Z):LOCALn,Ay,d,r:SYS&400ec,-1,-1TOn,,Ay:IFAy<>0THEN
   29R=FALSE:W=Z:PROCA(E+Z):SYS29,0,E,,Z:SYS&2001d,1,ETO,,d,r:R=TRUE
   30ELSE:PROCF(FNE("HeapMem"),0)
   31ENDIF:ENDPROC
   32DEFPROCT:R=FALSE:PROCA(E-16):ENDPROC
   33DEFFNS(Z):LOCALJ,b,Zy:IFR=FALSETHENPROCX(256)
   34SYS&2001d,2,E,,ZTO,,J:SYS&2001d,1,ETO,,d,r:SYS&2001d,6,E,JTO,,,a:WHILEJ=0:REPEAT:SYS&400ec,-1,-1TO,,Zy:IFZy<ZTHEN
   35PROCN(g)
   36ENDIF:UNTILZy>=Z:b=((Z+3)AND(NOT3))+64:W+=b:SYS&400ec,E+W-&8000,-1:PROCA(E+W):SYS&2001d,5,E,,b:SYS&2001d,2,E,,ZTO,,J:SYS&2001d,6,E,JTO,,,a:SYS&2001d,1,ETO,,d,r:ENDWHILE:=J
   37DEFPROCI(J):LOCALa,Ty,S_:IFJ<>-1THEN
   38SYS&2001d,6,E,JTO,,,a:SYS&2001d,3,E,J:SYS&2001d,5,E,,-aTO,,,Ty:SYS&2001d,1,ETO,,d,r:W+=Ty-8:IFW<256THENW=256
   39PROCA(E+W)
   40ENDIF:ENDPROC
   41DEFPROCA(A_):SYS&400ec,A_-&8000,-1:ENDPROC
   42DEFPROCZ:ONERRORONERROROFF:END
   43ONERRORONERROROFF:ERROREXTERR,FNE("Err")+STR$(ERL)+REPORT$:END
   44IFlTHEN
   45SYS&400dd,vy,&4b534154
   46ENDIF:END:ENDPROC
   47DEFPROCP:LOCALD:ONERRORONERROROFF:ERROREXTERR,"Internal error code "+STR$(ERL)+": "+REPORT$:END
   48!E%=ERR:$(E%+4)=FNE("Err")+STR$(ERL)+": "+REPORT$+"."+CHR$0:SYS&400df,E%,3,"Memory Pie 2"TO,D:IFD=2THENPROCB
   49ONERRORONERROROFF:PROCP:END
   50IFiTHENPROCd(-2,G%,FALSE)
   51PROCJ:ENDPROC
   52DEFPROCB:LOCALD:$(E%+4)=FNE("Sure"):SYS&400df,E%,23,FNE("Mess")+"Memory Pie 2"TO,D:IFD=1THENPROCZ
   53ENDPROC
   54DEFPROCF(C$):LOCALG$:!E%=0:$(E%+4)=C$:SYS&400df,E%,3,"Memory Pie 2"TO,D:IFD=2THENPROCB
   55ENDPROC
   56DEFPROCt:LOCALyy,gy,py,Fy,B$,N$:LOCALQ$,N$,G_:yy=!E%:gy=E%!4:py=E%!20:Fy=E%!24:Py=TRUE:IFPySYS&400dc,Fy
   57ENDPROC
   58DEFPROC_(RETURNV,P$,`y,M):DIMV 28+`y*24:$V=P$:V!&c=&70207:V!16=16+M*16:V!20=44:V!24=0:F=V+28:ENDPROC
   59DEFPROCQ(E$,my):LOCALH:!F=0:F!4=my:F!8=&7000021:IFLEN(E$)<=&cTHEN
   60$(F+&c)=E$
   61ELSE:DIMHLEN (E$)+1:$H=E$:F!&c=H:F!16=Iy:F!20=LEN(E$)+1:F!8+=2^8
   62ENDIF:F+=24:ENDPROC
   63DEFPROCr:F!(-24)=1<<7:ENDPROC
   64DEFPROCD:LOCALF,A:PROC_(J%,FNE("M1T"),5,&a):PROCQ(FNE("M10"),o):FORA=1TO3:PROCQ(FNE("M1"+STR$(A)),-1):NEXT:PROCr:W%=4*44+96:ENDPROC
   65DEFPROCK(V%):CASEV%OF
   66WHEN1:PROCM(p)
   67WHEN2:PROCM(U)
   68WHEN3:PROCZ
   69ENDCASE:ENDPROC
   70DEFPROCY:ENDPROC
   71DEFPROCf(D%,T%,I%,M%,S%):LOCALH,W_,W$:LOCALF_,B_,M_:CASEM%OF
   72WHEN-2:CASEI%OF
   73WHEN2:PROCs(J%,D%)
   74WHEN1:PROCM(p)
   75WHEN4:PROCM(U)
   76ENDCASE
   77ENDCASE:ENDPROC
   78DEFPROCR:SYS&400c0,310,&4b534154,"Memory Pie 2",kTOE_,vy:l=TRUE:ENDPROC
   79DEFFNZ(B):A%=B:B%=Ky:CALLQy:=$Ky
   80DEFPROCb(A$):LOCALfy,oy,B,x,Z:SYS&20008,23,A$TOny,,,,T:DIMZ%T:!Z%=T+4:Z%!8=16:SYS&2002e,265,Z%:SYS&2002e,266,Z%,A$:B=Z%+Z%!8:x=0:FORoy=1TOZ%!4:CASEFNZ(B+4)OF
   81WHEN"barpie":sy=B
   82WHEN"barpie22":Cy=B
   83ENDCASE:SYS&2002e,512+62,Z%,BTO,,,Z:IFZ>xTHENx=Z
   84B+=!B:NEXT:DIMGy x:ENDPROC
   85DEFFNM:LOCALM:SYS46,512+40,Z%,GTO,,,M:!E%=-1:E%!4=0:E%!8=-32:E%!&c=(M<<P):E%!16=&78:E%!20=&311a:E%!24=_:E%!28=Z%:E%!32=&d:SYS&400c2,,E%TOS%:i=TRUE:=S%
   86DEFPROCw(M%,S%,C$):!E%=M%:E%!4=S%:SYS&400ce,,E%:IF(E%!24AND1<<23)>1THEN
   87PROCF(FNE("IcDel"))
   88ELSE:$(E%!28)=C$:PROCC(M%,S%,0,0)
   89ENDIF:ENDPROC
   90DEFPROCd(M%,S%,U%):LOCALf,Vy:f=1<<22:Vy=(-U%)<<22:IFU%THENf+=1<<21
   91PROCC(M%,S%,f,Vy):ENDPROC
   92DEFPROCC(M%,S%,f,ky):!E%=M%:E%!4=S%:E%!8=ky:E%!&c=f:SYS&400cd,,E%:ENDPROC
   93DEFPROCV:LOCALfy,Wy:SYS&41500,,"<MemoryPie2$Dir>"+".Messages"TOfy,,Wy:IF(fyAND1)=0THEN
   94DIMiy Wy:DIMqy 20:SYS&41501,qy,"<MemoryPie2$Dir>"+".Messages",iy
   95ELSE:PROCF("Hey, these messages are already in memory.")
   96ENDIF:ENDPROC
   97DEFFNE(Z$):LOCALA,J$,dy,T:$I=Z$+":"+Z$:?(I+LEN($I))=0:SYS&41502,qy,I,0,0,0,0,0,0TO,,dy,T:FORA=0TOT-1:J$+=CHR$(dy?A):NEXT:=J$
   98DEFPROCL(Q%,N%,H%):SYS&400d4,,F%,N%-64,H%:F%=Q%:ENDPROC
   99DEFPROCs(Q%,N%):F%=Q%:SYS&400d4,,F%,N%-64,W%:ENDPROC
  100DEFPROCe:LOCALv:DIMk 256:DIMEy 80:DIMQ 20,X 20:v=-4:REPEAT:v+=4:READk!v:UNTILk!v=0
  101DATA 9, 10, &400C1, 0
  102ENDPROC
  103DEFPROCx(C%):LOCALzy,ly,Z_:hy=E%!4:zy=E%!16:CASEzyOF
  104WHEN0:PROCZ
  105WHEN&a:PROCq
  106WHEN9,&400c1:PROCU:Y=TRUE:PROCS
  107ENDCASE:ENDPROC
  108DEFPROCU:LOCALQ,X,A:DIMQ 24,X 24:!Q=&82:Q!4=&83:Q!8=4:Q!&c=5:Q!16=9:Q!20=-1:VDU26:SYS49,Q,X:P=X!8:K=X!&c:uy=(1<<X!16)/8:wy=!X<<P:ay=X!4<<K:IFK=1THEN
  109G=Cy:$_="barpie22"
  110ELSE:G=sy:$_="barpie"
  111ENDIF:SYS&400e5,,Ey:FORA=0TO&f:G!(A*8+44)=(Ey!(A*4)AND-256)+(((Ey!(A*4)AND-&f0f1000)>>4)AND&fffffff):G!(A*8+48)=G!(A*8+44):NEXT:ENDPROC
  112DEFPROCq:LOCALLy:Ly=E%!20:BPUT#Ly,M$:ENDPROC
  113DEFPROCc(A$):LOCALA,C_,Sy,ey,n,P_,Ay:SYS&400d9,,A$:o=FNA("Info"):p=FNA("Key"):U=FNA("Large"):SYS&400da:PROCT:ENDPROC
  114DEFFNA(F$):LOCALSy,cy,`,H,ey:SYS&400db,,-1,,,,F$,0TO,cy,`:H=FNS(cy):DIMey `:SYS&400db,,H,ey,ey+`,-1,F$,0:SYS&400c1,,HTOSy:PROCI(H):=Sy
  115DEFPROCM(M%):LOCALM,S:!E%=M%:SYS&400cb,,E%:M=E%!&c-E%!4:S=E%!16-E%!8:E%!4=(wy-M)/2:E%!8=(ay-S)/2:E%!&c=E%!4+M:E%!16=E%!8+S:E%!28=-1:PROCG:ENDPROC
  116DEFPROCG:LOCALS,M:IF!E%=UTHEN
  117h=TRUE:S=E%!16-E%!8:M=E%!&c-E%!4:IF(S<>qORM<>s)THEN
  118C=INT(M/2)-P:SYS&400d1,U,0,-S,M,0:q=S:s=M
  119ENDIF
  120ENDIF:SYS&400c5,,E%:ENDPROC
  121DEFPROCv:LOCALH,A:IF!E%=UTHENh=FALSE
  122SYS&400c6,,E%:ENDPROC
  123DEFFNF(ly):LOCALZ:SYS&2005c,lyTO,Z:=((Z+O-1)DIVO)*O
  124DEFPROCS:LOCALA,t:t=0:FORA=0TO5:E(A)=FNF(A):t+=E(A):NEXT:SYS&400ec,-1,-1TO,,E(L):t+=E(L):E(6)=m-t:FORA=0TOL:IFE(A)<>A(A)THENY=TRUE
  125NEXT:IFYTHEN
  126PROCH(G):PROCC(-2,G%,0,0):PROCW(1):A()=E():Y=FALSE
  127ENDIF:ENDPROC
  128DEFPROCH(Ny):LOCALe,c,M,S,C,u,j,J_:LOCALRy,Yy,Oy,_y,N:SYS&2002e,512+40,Z%,NyTO,,,M,S:u=M<<P:j=S<<K:e=u/2:c=j/2:M=(M-2)<<P:S=(S-2)<<K:C=INT(u+j)/4-P:!Gy=0:SYS46,512+60,Z%,Ny,GyTORy,Yy,Oy,_y:ORIGINe,c:N=0:PROCE(&b,L):PROCE(&e,6):PROCE(9,2):PROCE(&a,0):PROCE(&d,1):PROCE(&f,4):PROCE(8,3):PROCE(0,5)
  129SYS&400e6,7:CIRCLE0,0,C:SYS46,Ry,Yy,Oy,_y:ENDPROC
  130DEFPROCE(ty,Z):IFE(Z)=0ENDPROC
  131SYS&400e6,ty:MOVE0,0:MOVESIN(N)*C,COS(N)*C:N-=E(Z)*Xy:PLOT&b5,SIN(N)*C,COS(N)*C:ENDPROC
  132DEFPROCW(z):LOCALw,N:CASEzOF
  133WHEN0:SYS&400c8,,E%TOw
  134WHEN1:!E%=U:E%!4=0:E%!8=-q:E%!&c=s:E%!16=0:SYS&400c9,,E%TOw
  135ENDCASE:e=(E%!4+E%!&c)/2:c=(E%!8+E%!16)/2:WHILEw:ORIGINe,c:N=0:PROCE(&b,L):PROCE(&e,6):PROCE(9,2):PROCE(&a,0):PROCE(&d,1):PROCE(&f,4):PROCE(8,3):PROCE(0,5):SYS&400e6,7:CIRCLE0,0,C:CIRCLE0,0,C+P:ORIGIN0,0:SYS&400ca,,E%TOw:ENDWHILE:ENDPROC

�>!RunImage
0�Produced by BasCompress v1.60 (03 Feb 1995)
Nz=-1:R=�:ș&400ec,-1,-1�n,,Ay:E=&8000+n+16:�:���,�$+" at line "+�(�):�
l=�:�:�P:�
�O:�V:�a:�g:�z:�J:�Z:�
��J:�:�N(-1):��:�
r��z:�Y:�e:�R:�c("<MemoryPie2$Dir>"+".Templates"):�b("<MemoryPie2$Dir>"+".Sprites"):�w(o,7,S$):�D:�U:G%=�M:�S:�
;��O:�A:�E%&400,Ky 256,I 64:i=�:by=&3831:g=&3830:F%=-1:�
	��N(By):�Jy:�By<>-1�

ș&400c7,By,E%�C%
$�:ș66�Jy:ș&400e1,g,E%,Jy+30�C%
�:ȎC%�

	�0:�S
�1:�W(0)
	�2:�G
	�3:�v
$�6:�f(!E%,E%!4,E%!8,E%!&c,E%!16)
	�8:�t
4�9:ș&400cf,,E%+&80:Uy=(E%!&88�1)=1:�K(!E%):�Uy�
�L(J%,N%,W%)
�
�17,18:�x(C%)
�:�
��a:�z=-1�z &78
��ry=0�2�2:P%=z:[OPTry:.Qy:STMFD(&d)!,{0-3,&e}:MOV2,#0:.Hy:LDRB3,[0,2]:CMP3,#0:CMPNE3,#&d:�Q3,#&d:STRB3,[1,2]:ADDNE2,2,#1:BNE Hy:LDMIA(&d)!,{0-3,pc}^:.jy:STMFD(&d)!,{0,1,&e}:.y:LDRB1,[0]:CMP1,#&d:BEQ Dy:CMP1,#65:ADDLT0,0,#1:BLT y:CMP1,#90
HADDLE1,1,#32:STRLEB1,[0]:ADD0,0,#1:B y:.Dy:LDMIA(&d)!,{0,1,pc}:]:�:�
���g:�My:S$=�E("Ver"):ș&20010�My:M$=�Z(My):�Iy 4:$Iy="":�_ &d:$_="barpie":�E(7),A(7):L=7:ș&20051�O,xy:m=O*xy:Y=�:Xy=1/m*2*�:s=-1:q=-1:h=�:�
1��X(Z):�n,Ay,d,r:ș&400ec,-1,-1�n,,Ay:�Ay<>0�
6R=�:W=Z:�A(E+Z):ș29,0,E,,Z:ș&2001d,1,E�,,d,r:R=�
�:�F(�E("HeapMem"),0)
�:�
 ��T:R=�:�A(E-16):�
!ݤS(Z):�J,b,Zy:�R=���X(256)
"aș&2001d,2,E,,Z�,,J:ș&2001d,1,E�,,d,r:ș&2001d,6,E,J�,,,a:ȕJ=0:�:ș&400ec,-1,-1�,,Zy:�Zy<Z�
#	�N(g)
$��:�Zy>=Z:b=((Z+3)�(�3))+64:W+=b:ș&400ec,E+W-&8000,-1:�A(E+W):ș&2001d,5,E,,b:ș&2001d,2,E,,Z�,,J:ș&2001d,6,E,J�,,,a:ș&2001d,1,E�,,d,r:�:=J
%��I(J):�a,Ty,S_:�J<>-1�
&eș&2001d,6,E,J�,,,a:ș&2001d,3,E,J:ș&2001d,5,E,,-a�,,,Ty:ș&2001d,1,E�,,d,r:W+=Ty-8:�W<256�W=256
'�A(E+W)
(�:�
)"��A(A_):ș&400ec,A_-&8000,-1:�
*��Z:�:�
+!�:���,�E("Err")+�(�)+�$:�
,�l�
-ș&400dd,vy,&4b534154
.	�:�:�
/:��P:�D:�:���,"Internal error code "+�(�)+": "+�$:�
0W!E%=�:$(E%+4)=�E("Err")+�(�)+": "+�$+"."+�0:ș&400df,E%,3,"Memory Pie 2"�,D:�D=2��B
1�:�P:�
2�i��d(-2,G%,�)
3�J:�
4Q��B:�D:$(E%+4)=�E("Sure"):ș&400df,E%,23,�E("Mess")+"Memory Pie 2"�,D:�D=1��Z
5�
6H��F(C$):�G$:!E%=0:$(E%+4)=C$:ș&400df,E%,3,"Memory Pie 2"�,D:�D=2��B
7�
8Y��t:�yy,gy,py,Fy,B$,N$:�Q$,N$,G_:yy=!E%:gy=E%!4:py=E%!20:Fy=E%!24:Py=�:�Pyș&400dc,Fy
9�
:V��_(�V,P$,`y,M):�V 28+`y*24:$V=P$:V!&c=&70207:V!16=16+M*16:V!20=44:V!24=0:F=V+28:�
;6��Q(E$,my):�H:!F=0:F!4=my:F!8=&7000021:�(E$)<=&c�
<$(F+&c)=E$
=;�:�H� (E$)+1:$H=E$:F!&c=H:F!16=Iy:F!20=�(E$)+1:F!8+=2^8
>
�:F+=24:�
?��r:F!(-24)=1<<7:�
@`��D:�F,A:�_(J%,�E("M1T"),5,&a):�Q(�E("M10"),o):�A=1�3:�Q(�E("M1"+�(A)),-1):�:�r:W%=4*44+96:�
A��K(V%):ȎV%�
B�1:�M(p)
C�2:�M(U)
D	�3:�Z
E�:�
F	��Y:�
G0��f(D%,T%,I%,M%,S%):�H,W_,W$:�F_,B_,M_:ȎM%�
H
�-2:ȎI%�
I�2:�s(J%,D%)
J�1:�M(p)
K�4:�M(U)
L�
M�:�
N;��R:ș&400c0,310,&4b534154,"Memory Pie 2",k�E_,vy:l=�:�
OݤZ(B):A%=B:B%=Ky:�Qy:=$Ky
P���b(A$):�fy,oy,B,x,Z:ș&20008,23,A$�ny,,,,T:�Z%T:!Z%=T+4:Z%!8=16:ș&2002e,265,Z%:ș&2002e,266,Z%,A$:B=Z%+Z%!8:x=0:�oy=1�Z%!4:Ȏ�Z(B+4)�
Q�"barpie":sy=B
R�"barpie22":Cy=B
S(�:ș&2002e,512+62,Z%,B�,,,Z:�Z>x�x=Z
TB+=!B:�:�Gy x:�
U�ݤM:�M:ș46,512+40,Z%,G�,,,M:!E%=-1:E%!4=0:E%!8=-32:E%!&c=(M<<P):E%!16=&78:E%!20=&311a:E%!24=_:E%!28=Z%:E%!32=&d:ș&400c2,,E%�S%:i=�:=S%
V?��w(M%,S%,C$):!E%=M%:E%!4=S%:ș&400ce,,E%:�(E%!24�1<<23)>1�
W�F(�E("IcDel"))
X�:$(E%!28)=C$:�C(M%,S%,0,0)
Y�:�
Z9��d(M%,S%,U%):�f,Vy:f=1<<22:Vy=(-U%)<<22:�U%�f+=1<<21
[�C(M%,S%,f,Vy):�
\A��C(M%,S%,f,ky):!E%=M%:E%!4=S%:E%!8=ky:E%!&c=f:ș&400cd,,E%:�
]I��V:�fy,Wy:ș&41500,,"<MemoryPie2$Dir>"+".Messages"�fy,,Wy:�(fy�1)=0�
^?�iy Wy:�qy 20:ș&41501,qy,"<MemoryPie2$Dir>"+".Messages",iy
_6�:�F("Hey, these messages are already in memory.")
`�:�
alݤE(Z$):�A,J$,dy,T:$I=Z$+":"+Z$:?(I+�($I))=0:ș&41502,qy,I,0,0,0,0,0,0�,,dy,T:�A=0�T-1:J$+=�(dy?A):�:=J$
b/��L(Q%,N%,H%):ș&400d4,,F%,N%-64,H%:F%=Q%:�
c,��s(Q%,N%):F%=Q%:ș&400d4,,F%,N%-64,W%:�
d;��e:�v:�k 256:�Ey 80:�Q 20,X 20:v=-4:�:v+=4:�k!v:�k!v=0
e� 9, 10, &400C1, 0
f�
g,��x(C%):�zy,ly,Z_:hy=E%!4:zy=E%!16:Ȏzy�
h	�0:�Z
i
�&a:�q
j�9,&400c1:�U:Y=�:�S
k�:�
l���U:�Q,X,A:�Q 24,X 24:!Q=&82:Q!4=&83:Q!8=4:Q!&c=5:Q!16=9:Q!20=-1:�26:ș49,Q,X:P=X!8:K=X!&c:uy=(1<<X!16)/8:wy=!X<<P:ay=X!4<<K:�K=1�
mG=Cy:$_="barpie22"
n�:G=sy:$_="barpie"
ot�:ș&400e5,,Ey:�A=0�&f:G!(A*8+44)=(Ey!(A*4)�-256)+(((Ey!(A*4)�-&f0f1000)>>4)�&fffffff):G!(A*8+48)=G!(A*8+44):�:�
p��q:�Ly:Ly=E%!20:�#Ly,M$:�
qa��c(A$):�A,C_,Sy,ey,n,P_,Ay:ș&400d9,,A$:o=�A("Info"):p=�A("Key"):U=�A("Large"):ș&400da:�T:�
rxݤA(F$):�Sy,cy,`,H,ey:ș&400db,,-1,,,,F$,0�,cy,`:H=�S(cy):�ey `:ș&400db,,H,ey,ey+`,-1,F$,0:ș&400c1,,H�Sy:�I(H):=Sy
s���M(M%):�M,S:!E%=M%:ș&400cb,,E%:M=E%!&c-E%!4:S=E%!16-E%!8:E%!4=(wy-M)/2:E%!8=(ay-S)/2:E%!&c=E%!4+M:E%!16=E%!8+S:E%!28=-1:�G:�
t��G:�S,M:�!E%=U�
u/h=�:S=E%!16-E%!8:M=E%!&c-E%!4:�(S<>q�M<>s)�
v*C=�(M/2)-P:ș&400d1,U,0,-S,M,0:q=S:s=M
w�
x�:ș&400c5,,E%:�
y��v:�H,A:�!E%=U�h=�
zș&400c6,,E%:�
{,ݤF(ly):�Z:ș&2005c,ly�,Z:=((Z+O-1)�O)*O
|j��S:�A,t:t=0:�A=0�5:E(A)=�F(A):t+=E(A):�:ș&400ec,-1,-1�,,E(L):t+=E(L):E(6)=m-t:�A=0�L:�E(A)<>A(A)�Y=�
}	�:�Y�
~)�H(G):�C(-2,G%,0,0):�W(1):A()=E():Y=�
�:�
����H(Ny):�e,c,M,S,C,u,j,J_:�Ry,Yy,Oy,_y,N:ș&2002e,512+40,Z%,Ny�,,,M,S:u=M<<P:j=S<<K:e=u/2:c=j/2:M=(M-2)<<P:S=(S-2)<<K:C=�(u+j)/4-P:!Gy=0:ș46,512+60,Z%,Ny,Gy�Ry,Yy,Oy,_y:ȑe,c:N=0:�E(&b,L):�E(&e,6):�E(9,2):�E(&a,0):�E(&d,1):�E(&f,4):�E(8,3):�E(0,5)
�)ș&400e6,7:ȏ0,0,C:ș46,Ry,Yy,Oy,_y:�
���E(ty,Z):�E(Z)=0�
�Cș&400e6,ty:�0,0:�(N)*C,�(N)*C:N-=E(Z)*Xy:�&b5,�(N)*C,�(N)*C:�
���W(z):�w,N:Ȏz�
��0:ș&400c8,,E%�w
�:�1:!E%=U:E%!4=0:E%!8=-q:E%!&c=s:E%!16=0:ș&400c9,,E%�w
���:e=(E%!4+E%!&c)/2:c=(E%!8+E%!16)/2:ȕw:ȑe,c:N=0:�E(&b,L):�E(&e,6):�E(9,2):�E(&a,0):�E(&d,1):�E(&f,4):�E(8,3):�E(0,5):ș&400e6,7:ȏ0,0,C:ȏ0,0,C+P:ȑ0,0:ș&400ca,,E%�w:�:�
�

00000000  0d 00 01 0f f4 3e 21 52  75 6e 49 6d 61 67 65 0d  |.....>!RunImage.|
00000010  00 02 30 f4 50 72 6f 64  75 63 65 64 20 62 79 20  |..0.Produced by |
00000020  42 61 73 43 6f 6d 70 72  65 73 73 20 76 31 2e 36  |BasCompress v1.6|
00000030  30 20 28 30 33 20 46 65  62 20 31 39 39 35 29 0d  |0 (03 Feb 1995).|
00000040  00 03 4e 7a 3d 2d 31 3a  52 3d a3 3a c8 99 26 34  |..Nz=-1:R=.:..&4|
00000050  30 30 65 63 2c 2d 31 2c  2d 31 b8 6e 2c 2c 41 79  |00ec,-1,-1.n,,Ay|
00000060  3a 45 3d 26 38 30 30 30  2b 6e 2b 31 36 3a ee 85  |:E=&8000+n+16:..|
00000070  ee 85 87 3a 85 a2 9f 2c  f6 24 2b 22 20 61 74 20  |...:...,.$+" at |
00000080  6c 69 6e 65 20 22 2b c3  28 9e 29 3a e0 0d 00 04  |line "+.(.):....|
00000090  12 6c 3d a3 3a ee 85 ee  85 87 3a f2 50 3a e0 0d  |.l=.:.....:.P:..|
000000a0  00 05 1a f2 4f 3a f2 56  3a f2 61 3a f2 67 3a f2  |....O:.V:.a:.g:.|
000000b0  7a 3a f2 4a 3a f2 5a 3a  e0 0d 00 06 15 dd f2 4a  |z:.J:.Z:.......J|
000000c0  3a f5 3a f2 4e 28 2d 31  29 3a fd a3 3a e1 0d 00  |:.:.N(-1):..:...|
000000d0  07 72 dd f2 7a 3a f2 59  3a f2 65 3a f2 52 3a f2  |.r..z:.Y:.e:.R:.|
000000e0  63 28 22 3c 4d 65 6d 6f  72 79 50 69 65 32 24 44  |c("<MemoryPie2$D|
000000f0  69 72 3e 22 2b 22 2e 54  65 6d 70 6c 61 74 65 73  |ir>"+".Templates|
00000100  22 29 3a f2 62 28 22 3c  4d 65 6d 6f 72 79 50 69  |"):.b("<MemoryPi|
00000110  65 32 24 44 69 72 3e 22  2b 22 2e 53 70 72 69 74  |e2$Dir>"+".Sprit|
00000120  65 73 22 29 3a f2 77 28  6f 2c 37 2c 53 24 29 3a  |es"):.w(o,7,S$):|
00000130  f2 44 3a f2 55 3a 47 25  3d a4 4d 3a f2 53 3a e1  |.D:.U:G%=.M:.S:.|
00000140  0d 00 08 3b dd f2 4f 3a  ea 41 3a de 45 25 26 34  |...;..O:.A:.E%&4|
00000150  30 30 2c 4b 79 20 32 35  36 2c 49 20 36 34 3a 69  |00,Ky 256,I 64:i|
00000160  3d a3 3a 62 79 3d 26 33  38 33 31 3a 67 3d 26 33  |=.:by=&3831:g=&3|
00000170  38 33 30 3a 46 25 3d 2d  31 3a e1 0d 00 09 18 dd  |830:F%=-1:......|
00000180  f2 4e 28 42 79 29 3a ea  4a 79 3a e7 42 79 3c 3e  |.N(By):.Jy:.By<>|
00000190  2d 31 8c 0d 00 0a 15 c8  99 26 34 30 30 63 37 2c  |-1.......&400c7,|
000001a0  42 79 2c 45 25 b8 43 25  0d 00 0b 24 cc 3a c8 99  |By,E%.C%...$.:..|
000001b0  36 36 b8 4a 79 3a c8 99  26 34 30 30 65 31 2c 67  |66.Jy:..&400e1,g|
000001c0  2c 45 25 2c 4a 79 2b 33  30 b8 43 25 0d 00 0c 0b  |,E%,Jy+30.C%....|
000001d0  cd 3a c8 8e 43 25 ca 0d  00 0d 09 c9 30 3a f2 53  |.:..C%......0:.S|
000001e0  0d 00 0e 0c c9 31 3a f2  57 28 30 29 0d 00 0f 09  |.....1:.W(0)....|
000001f0  c9 32 3a f2 47 0d 00 10  09 c9 33 3a f2 76 0d 00  |.2:.G.....3:.v..|
00000200  11 24 c9 36 3a f2 66 28  21 45 25 2c 45 25 21 34  |.$.6:.f(!E%,E%!4|
00000210  2c 45 25 21 38 2c 45 25  21 26 63 2c 45 25 21 31  |,E%!8,E%!&c,E%!1|
00000220  36 29 0d 00 12 09 c9 38  3a f2 74 0d 00 13 34 c9  |6).....8:.t...4.|
00000230  39 3a c8 99 26 34 30 30  63 66 2c 2c 45 25 2b 26  |9:..&400cf,,E%+&|
00000240  38 30 3a 55 79 3d 28 45  25 21 26 38 38 80 31 29  |80:Uy=(E%!&88.1)|
00000250  3d 31 3a f2 4b 28 21 45  25 29 3a e7 55 79 8c 0d  |=1:.K(!E%):.Uy..|
00000260  00 14 10 f2 4c 28 4a 25  2c 4e 25 2c 57 25 29 0d  |....L(J%,N%,W%).|
00000270  00 15 05 cd 0d 00 16 11  c9 31 37 2c 31 38 3a f2  |.........17,18:.|
00000280  78 28 43 25 29 0d 00 17  07 cb 3a e1 0d 00 18 13  |x(C%).....:.....|
00000290  dd f2 61 3a e7 7a 3d 2d  31 de 7a 20 26 37 38 0d  |..a:.z=-1.z &78.|
000002a0  00 19 f1 e3 72 79 3d 30  b8 32 88 32 3a 50 25 3d  |....ry=0.2.2:P%=|
000002b0  7a 3a 5b 4f 50 54 72 79  3a 2e 51 79 3a 53 54 4d  |z:[OPTry:.Qy:STM|
000002c0  46 44 28 26 64 29 21 2c  7b 30 2d 33 2c 26 65 7d  |FD(&d)!,{0-3,&e}|
000002d0  3a 4d 4f 56 32 2c 23 30  3a 2e 48 79 3a 4c 44 52  |:MOV2,#0:.Hy:LDR|
000002e0  42 33 2c 5b 30 2c 32 5d  3a 43 4d 50 33 2c 23 30  |B3,[0,2]:CMP3,#0|
000002f0  3a 43 4d 50 4e 45 33 2c  23 26 64 3a ec 51 33 2c  |:CMPNE3,#&d:.Q3,|
00000300  23 26 64 3a 53 54 52 42  33 2c 5b 31 2c 32 5d 3a  |#&d:STRB3,[1,2]:|
00000310  41 44 44 4e 45 32 2c 32  2c 23 31 3a 42 4e 45 20  |ADDNE2,2,#1:BNE |
00000320  48 79 3a 4c 44 4d 49 41  28 26 64 29 21 2c 7b 30  |Hy:LDMIA(&d)!,{0|
00000330  2d 33 2c 70 63 7d 5e 3a  2e 6a 79 3a 53 54 4d 46  |-3,pc}^:.jy:STMF|
00000340  44 28 26 64 29 21 2c 7b  30 2c 31 2c 26 65 7d 3a  |D(&d)!,{0,1,&e}:|
00000350  2e 79 3a 4c 44 52 42 31  2c 5b 30 5d 3a 43 4d 50  |.y:LDRB1,[0]:CMP|
00000360  31 2c 23 26 64 3a 42 45  51 20 44 79 3a 43 4d 50  |1,#&d:BEQ Dy:CMP|
00000370  31 2c 23 36 35 3a 41 44  44 4c 54 30 2c 30 2c 23  |1,#65:ADDLT0,0,#|
00000380  31 3a 42 4c 54 20 79 3a  43 4d 50 31 2c 23 39 30  |1:BLT y:CMP1,#90|
00000390  0d 00 1a 48 41 44 44 4c  45 31 2c 31 2c 23 33 32  |...HADDLE1,1,#32|
000003a0  3a 53 54 52 4c 45 42 31  2c 5b 30 5d 3a 41 44 44  |:STRLEB1,[0]:ADD|
000003b0  30 2c 30 2c 23 31 3a 42  20 79 3a 2e 44 79 3a 4c  |0,0,#1:B y:.Dy:L|
000003c0  44 4d 49 41 28 26 64 29  21 2c 7b 30 2c 31 2c 70  |DMIA(&d)!,{0,1,p|
000003d0  63 7d 3a 5d 3a ed 3a e1  0d 00 1b 90 dd f2 67 3a  |c}:]:.:.......g:|
000003e0  ea 4d 79 3a 53 24 3d a4  45 28 22 56 65 72 22 29  |.My:S$=.E("Ver")|
000003f0  3a c8 99 26 32 30 30 31  30 b8 4d 79 3a 4d 24 3d  |:..&20010.My:M$=|
00000400  a4 5a 28 4d 79 29 3a de  49 79 20 34 3a 24 49 79  |.Z(My):.Iy 4:$Iy|
00000410  3d 22 22 3a de 5f 20 26  64 3a 24 5f 3d 22 62 61  |="":._ &d:$_="ba|
00000420  72 70 69 65 22 3a de 45  28 37 29 2c 41 28 37 29  |rpie":.E(7),A(7)|
00000430  3a 4c 3d 37 3a c8 99 26  32 30 30 35 31 b8 4f 2c  |:L=7:..&20051.O,|
00000440  78 79 3a 6d 3d 4f 2a 78  79 3a 59 3d b9 3a 58 79  |xy:m=O*xy:Y=.:Xy|
00000450  3d 31 2f 6d 2a 32 2a af  3a 73 3d 2d 31 3a 71 3d  |=1/m*2*.:s=-1:q=|
00000460  2d 31 3a 68 3d a3 3a e1  0d 00 1c 31 dd f2 58 28  |-1:h=.:....1..X(|
00000470  5a 29 3a ea 6e 2c 41 79  2c 64 2c 72 3a c8 99 26  |Z):.n,Ay,d,r:..&|
00000480  34 30 30 65 63 2c 2d 31  2c 2d 31 b8 6e 2c 2c 41  |400ec,-1,-1.n,,A|
00000490  79 3a e7 41 79 3c 3e 30  8c 0d 00 1d 36 52 3d a3  |y:.Ay<>0....6R=.|
000004a0  3a 57 3d 5a 3a f2 41 28  45 2b 5a 29 3a c8 99 32  |:W=Z:.A(E+Z):..2|
000004b0  39 2c 30 2c 45 2c 2c 5a  3a c8 99 26 32 30 30 31  |9,0,E,,Z:..&2001|
000004c0  64 2c 31 2c 45 b8 2c 2c  64 2c 72 3a 52 3d b9 0d  |d,1,E.,,d,r:R=..|
000004d0  00 1e 19 cc 3a f2 46 28  a4 45 28 22 48 65 61 70  |....:.F(.E("Heap|
000004e0  4d 65 6d 22 29 2c 30 29  0d 00 1f 07 cd 3a e1 0d  |Mem"),0).....:..|
000004f0  00 20 16 dd f2 54 3a 52  3d a3 3a f2 41 28 45 2d  |. ...T:R=.:.A(E-|
00000500  31 36 29 3a e1 0d 00 21  1f dd a4 53 28 5a 29 3a  |16):...!...S(Z):|
00000510  ea 4a 2c 62 2c 5a 79 3a  e7 52 3d a3 8c f2 58 28  |.J,b,Zy:.R=...X(|
00000520  32 35 36 29 0d 00 22 61  c8 99 26 32 30 30 31 64  |256).."a..&2001d|
00000530  2c 32 2c 45 2c 2c 5a b8  2c 2c 4a 3a c8 99 26 32  |,2,E,,Z.,,J:..&2|
00000540  30 30 31 64 2c 31 2c 45  b8 2c 2c 64 2c 72 3a c8  |001d,1,E.,,d,r:.|
00000550  99 26 32 30 30 31 64 2c  36 2c 45 2c 4a b8 2c 2c  |.&2001d,6,E,J.,,|
00000560  2c 61 3a c8 95 4a 3d 30  3a f5 3a c8 99 26 34 30  |,a:..J=0:.:..&40|
00000570  30 65 63 2c 2d 31 2c 2d  31 b8 2c 2c 5a 79 3a e7  |0ec,-1,-1.,,Zy:.|
00000580  5a 79 3c 5a 8c 0d 00 23  09 f2 4e 28 67 29 0d 00  |Zy<Z...#..N(g)..|
00000590  24 91 cd 3a fd 5a 79 3e  3d 5a 3a 62 3d 28 28 5a  |$..:.Zy>=Z:b=((Z|
000005a0  2b 33 29 80 28 ac 33 29  29 2b 36 34 3a 57 2b 3d  |+3).(.3))+64:W+=|
000005b0  62 3a c8 99 26 34 30 30  65 63 2c 45 2b 57 2d 26  |b:..&400ec,E+W-&|
000005c0  38 30 30 30 2c 2d 31 3a  f2 41 28 45 2b 57 29 3a  |8000,-1:.A(E+W):|
000005d0  c8 99 26 32 30 30 31 64  2c 35 2c 45 2c 2c 62 3a  |..&2001d,5,E,,b:|
000005e0  c8 99 26 32 30 30 31 64  2c 32 2c 45 2c 2c 5a b8  |..&2001d,2,E,,Z.|
000005f0  2c 2c 4a 3a c8 99 26 32  30 30 31 64 2c 36 2c 45  |,,J:..&2001d,6,E|
00000600  2c 4a b8 2c 2c 2c 61 3a  c8 99 26 32 30 30 31 64  |,J.,,,a:..&2001d|
00000610  2c 31 2c 45 b8 2c 2c 64  2c 72 3a ce 3a 3d 4a 0d  |,1,E.,,d,r:.:=J.|
00000620  00 25 1b dd f2 49 28 4a  29 3a ea 61 2c 54 79 2c  |.%...I(J):.a,Ty,|
00000630  53 5f 3a e7 4a 3c 3e 2d  31 8c 0d 00 26 65 c8 99  |S_:.J<>-1...&e..|
00000640  26 32 30 30 31 64 2c 36  2c 45 2c 4a b8 2c 2c 2c  |&2001d,6,E,J.,,,|
00000650  61 3a c8 99 26 32 30 30  31 64 2c 33 2c 45 2c 4a  |a:..&2001d,3,E,J|
00000660  3a c8 99 26 32 30 30 31  64 2c 35 2c 45 2c 2c 2d  |:..&2001d,5,E,,-|
00000670  61 b8 2c 2c 2c 54 79 3a  c8 99 26 32 30 30 31 64  |a.,,,Ty:..&2001d|
00000680  2c 31 2c 45 b8 2c 2c 64  2c 72 3a 57 2b 3d 54 79  |,1,E.,,d,r:W+=Ty|
00000690  2d 38 3a e7 57 3c 32 35  36 8c 57 3d 32 35 36 0d  |-8:.W<256.W=256.|
000006a0  00 27 0b f2 41 28 45 2b  57 29 0d 00 28 07 cd 3a  |.'..A(E+W)..(..:|
000006b0  e1 0d 00 29 22 dd f2 41  28 41 5f 29 3a c8 99 26  |...)"..A(A_):..&|
000006c0  34 30 30 65 63 2c 41 5f  2d 26 38 30 30 30 2c 2d  |400ec,A_-&8000,-|
000006d0  31 3a e1 0d 00 2a 0f dd  f2 5a 3a ee 85 ee 85 87  |1:...*...Z:.....|
000006e0  3a e0 0d 00 2b 21 ee 85  ee 85 87 3a 85 a2 9f 2c  |:...+!.....:...,|
000006f0  a4 45 28 22 45 72 72 22  29 2b c3 28 9e 29 2b f6  |.E("Err")+.(.)+.|
00000700  24 3a e0 0d 00 2c 07 e7  6c 8c 0d 00 2d 19 c8 99  |$:...,..l...-...|
00000710  26 34 30 30 64 64 2c 76  79 2c 26 34 62 35 33 34  |&400dd,vy,&4b534|
00000720  31 35 34 0d 00 2e 09 cd  3a e0 3a e1 0d 00 2f 3a  |154.....:.:.../:|
00000730  dd f2 50 3a ea 44 3a ee  85 ee 85 87 3a 85 a2 9f  |..P:.D:.....:...|
00000740  2c 22 49 6e 74 65 72 6e  61 6c 20 65 72 72 6f 72  |,"Internal error|
00000750  20 63 6f 64 65 20 22 2b  c3 28 9e 29 2b 22 3a 20  | code "+.(.)+": |
00000760  22 2b f6 24 3a e0 0d 00  30 57 21 45 25 3d 9f 3a  |"+.$:...0W!E%=.:|
00000770  24 28 45 25 2b 34 29 3d  a4 45 28 22 45 72 72 22  |$(E%+4)=.E("Err"|
00000780  29 2b c3 28 9e 29 2b 22  3a 20 22 2b f6 24 2b 22  |)+.(.)+": "+.$+"|
00000790  2e 22 2b bd 30 3a c8 99  26 34 30 30 64 66 2c 45  |."+.0:..&400df,E|
000007a0  25 2c 33 2c 22 4d 65 6d  6f 72 79 20 50 69 65 20  |%,3,"Memory Pie |
000007b0  32 22 b8 2c 44 3a e7 44  3d 32 8c f2 42 0d 00 31  |2".,D:.D=2..B..1|
000007c0  0e ee 85 ee 85 87 3a f2  50 3a e0 0d 00 32 12 e7  |......:.P:...2..|
000007d0  69 8c f2 64 28 2d 32 2c  47 25 2c a3 29 0d 00 33  |i..d(-2,G%,.)..3|
000007e0  08 f2 4a 3a e1 0d 00 34  51 dd f2 42 3a ea 44 3a  |..J:...4Q..B:.D:|
000007f0  24 28 45 25 2b 34 29 3d  a4 45 28 22 53 75 72 65  |$(E%+4)=.E("Sure|
00000800  22 29 3a c8 99 26 34 30  30 64 66 2c 45 25 2c 32  |"):..&400df,E%,2|
00000810  33 2c a4 45 28 22 4d 65  73 73 22 29 2b 22 4d 65  |3,.E("Mess")+"Me|
00000820  6d 6f 72 79 20 50 69 65  20 32 22 b8 2c 44 3a e7  |mory Pie 2".,D:.|
00000830  44 3d 31 8c f2 5a 0d 00  35 05 e1 0d 00 36 48 dd  |D=1..Z..5....6H.|
00000840  f2 46 28 43 24 29 3a ea  47 24 3a 21 45 25 3d 30  |.F(C$):.G$:!E%=0|
00000850  3a 24 28 45 25 2b 34 29  3d 43 24 3a c8 99 26 34  |:$(E%+4)=C$:..&4|
00000860  30 30 64 66 2c 45 25 2c  33 2c 22 4d 65 6d 6f 72  |00df,E%,3,"Memor|
00000870  79 20 50 69 65 20 32 22  b8 2c 44 3a e7 44 3d 32  |y Pie 2".,D:.D=2|
00000880  8c f2 42 0d 00 37 05 e1  0d 00 38 59 dd f2 74 3a  |..B..7....8Y..t:|
00000890  ea 79 79 2c 67 79 2c 70  79 2c 46 79 2c 42 24 2c  |.yy,gy,py,Fy,B$,|
000008a0  4e 24 3a ea 51 24 2c 4e  24 2c 47 5f 3a 79 79 3d  |N$:.Q$,N$,G_:yy=|
000008b0  21 45 25 3a 67 79 3d 45  25 21 34 3a 70 79 3d 45  |!E%:gy=E%!4:py=E|
000008c0  25 21 32 30 3a 46 79 3d  45 25 21 32 34 3a 50 79  |%!20:Fy=E%!24:Py|
000008d0  3d b9 3a e7 50 79 c8 99  26 34 30 30 64 63 2c 46  |=.:.Py..&400dc,F|
000008e0  79 0d 00 39 05 e1 0d 00  3a 56 dd f2 5f 28 f8 56  |y..9....:V.._(.V|
000008f0  2c 50 24 2c 60 79 2c 4d  29 3a de 56 20 32 38 2b  |,P$,`y,M):.V 28+|
00000900  60 79 2a 32 34 3a 24 56  3d 50 24 3a 56 21 26 63  |`y*24:$V=P$:V!&c|
00000910  3d 26 37 30 32 30 37 3a  56 21 31 36 3d 31 36 2b  |=&70207:V!16=16+|
00000920  4d 2a 31 36 3a 56 21 32  30 3d 34 34 3a 56 21 32  |M*16:V!20=44:V!2|
00000930  34 3d 30 3a 46 3d 56 2b  32 38 3a e1 0d 00 3b 36  |4=0:F=V+28:...;6|
00000940  dd f2 51 28 45 24 2c 6d  79 29 3a ea 48 3a 21 46  |..Q(E$,my):.H:!F|
00000950  3d 30 3a 46 21 34 3d 6d  79 3a 46 21 38 3d 26 37  |=0:F!4=my:F!8=&7|
00000960  30 30 30 30 32 31 3a e7  a9 28 45 24 29 3c 3d 26  |000021:..(E$)<=&|
00000970  63 8c 0d 00 3c 0e 24 28  46 2b 26 63 29 3d 45 24  |c...<.$(F+&c)=E$|
00000980  0d 00 3d 3b cc 3a de 48  a9 20 28 45 24 29 2b 31  |..=;.:.H. (E$)+1|
00000990  3a 24 48 3d 45 24 3a 46  21 26 63 3d 48 3a 46 21  |:$H=E$:F!&c=H:F!|
000009a0  31 36 3d 49 79 3a 46 21  32 30 3d a9 28 45 24 29  |16=Iy:F!20=.(E$)|
000009b0  2b 31 3a 46 21 38 2b 3d  32 5e 38 0d 00 3e 0d cd  |+1:F!8+=2^8..>..|
000009c0  3a 46 2b 3d 32 34 3a e1  0d 00 3f 16 dd f2 72 3a  |:F+=24:...?...r:|
000009d0  46 21 28 2d 32 34 29 3d  31 3c 3c 37 3a e1 0d 00  |F!(-24)=1<<7:...|
000009e0  40 60 dd f2 44 3a ea 46  2c 41 3a f2 5f 28 4a 25  |@`..D:.F,A:._(J%|
000009f0  2c a4 45 28 22 4d 31 54  22 29 2c 35 2c 26 61 29  |,.E("M1T"),5,&a)|
00000a00  3a f2 51 28 a4 45 28 22  4d 31 30 22 29 2c 6f 29  |:.Q(.E("M10"),o)|
00000a10  3a e3 41 3d 31 b8 33 3a  f2 51 28 a4 45 28 22 4d  |:.A=1.3:.Q(.E("M|
00000a20  31 22 2b c3 28 41 29 29  2c 2d 31 29 3a ed 3a f2  |1"+.(A)),-1):.:.|
00000a30  72 3a 57 25 3d 34 2a 34  34 2b 39 36 3a e1 0d 00  |r:W%=4*44+96:...|
00000a40  41 11 dd f2 4b 28 56 25  29 3a c8 8e 56 25 ca 0d  |A...K(V%):..V%..|
00000a50  00 42 0c c9 31 3a f2 4d  28 70 29 0d 00 43 0c c9  |.B..1:.M(p)..C..|
00000a60  32 3a f2 4d 28 55 29 0d  00 44 09 c9 33 3a f2 5a  |2:.M(U)..D..3:.Z|
00000a70  0d 00 45 07 cb 3a e1 0d  00 46 09 dd f2 59 3a e1  |..E..:...F...Y:.|
00000a80  0d 00 47 30 dd f2 66 28  44 25 2c 54 25 2c 49 25  |..G0..f(D%,T%,I%|
00000a90  2c 4d 25 2c 53 25 29 3a  ea 48 2c 57 5f 2c 57 24  |,M%,S%):.H,W_,W$|
00000aa0  3a ea 46 5f 2c 42 5f 2c  4d 5f 3a c8 8e 4d 25 ca  |:.F_,B_,M_:..M%.|
00000ab0  0d 00 48 0d c9 2d 32 3a  c8 8e 49 25 ca 0d 00 49  |..H..-2:..I%...I|
00000ac0  10 c9 32 3a f2 73 28 4a  25 2c 44 25 29 0d 00 4a  |..2:.s(J%,D%)..J|
00000ad0  0c c9 31 3a f2 4d 28 70  29 0d 00 4b 0c c9 34 3a  |..1:.M(p)..K..4:|
00000ae0  f2 4d 28 55 29 0d 00 4c  05 cb 0d 00 4d 07 cb 3a  |.M(U)..L....M..:|
00000af0  e1 0d 00 4e 3b dd f2 52  3a c8 99 26 34 30 30 63  |...N;..R:..&400c|
00000b00  30 2c 33 31 30 2c 26 34  62 35 33 34 31 35 34 2c  |0,310,&4b534154,|
00000b10  22 4d 65 6d 6f 72 79 20  50 69 65 20 32 22 2c 6b  |"Memory Pie 2",k|
00000b20  b8 45 5f 2c 76 79 3a 6c  3d b9 3a e1 0d 00 4f 1e  |.E_,vy:l=.:...O.|
00000b30  dd a4 5a 28 42 29 3a 41  25 3d 42 3a 42 25 3d 4b  |..Z(B):A%=B:B%=K|
00000b40  79 3a d6 51 79 3a 3d 24  4b 79 0d 00 50 8b dd f2  |y:.Qy:=$Ky..P...|
00000b50  62 28 41 24 29 3a ea 66  79 2c 6f 79 2c 42 2c 78  |b(A$):.fy,oy,B,x|
00000b60  2c 5a 3a c8 99 26 32 30  30 30 38 2c 32 33 2c 41  |,Z:..&20008,23,A|
00000b70  24 b8 6e 79 2c 2c 2c 2c  54 3a de 5a 25 54 3a 21  |$.ny,,,,T:.Z%T:!|
00000b80  5a 25 3d 54 2b 34 3a 5a  25 21 38 3d 31 36 3a c8  |Z%=T+4:Z%!8=16:.|
00000b90  99 26 32 30 30 32 65 2c  32 36 35 2c 5a 25 3a c8  |.&2002e,265,Z%:.|
00000ba0  99 26 32 30 30 32 65 2c  32 36 36 2c 5a 25 2c 41  |.&2002e,266,Z%,A|
00000bb0  24 3a 42 3d 5a 25 2b 5a  25 21 38 3a 78 3d 30 3a  |$:B=Z%+Z%!8:x=0:|
00000bc0  e3 6f 79 3d 31 b8 5a 25  21 34 3a c8 8e a4 5a 28  |.oy=1.Z%!4:...Z(|
00000bd0  42 2b 34 29 ca 0d 00 51  12 c9 22 62 61 72 70 69  |B+4)...Q.."barpi|
00000be0  65 22 3a 73 79 3d 42 0d  00 52 14 c9 22 62 61 72  |e":sy=B..R.."bar|
00000bf0  70 69 65 32 32 22 3a 43  79 3d 42 0d 00 53 28 cb  |pie22":Cy=B..S(.|
00000c00  3a c8 99 26 32 30 30 32  65 2c 35 31 32 2b 36 32  |:..&2002e,512+62|
00000c10  2c 5a 25 2c 42 b8 2c 2c  2c 5a 3a e7 5a 3e 78 8c  |,Z%,B.,,,Z:.Z>x.|
00000c20  78 3d 5a 0d 00 54 13 42  2b 3d 21 42 3a ed 3a de  |x=Z..T.B+=!B:.:.|
00000c30  47 79 20 78 3a e1 0d 00  55 8c dd a4 4d 3a ea 4d  |Gy x:...U...M:.M|
00000c40  3a c8 99 34 36 2c 35 31  32 2b 34 30 2c 5a 25 2c  |:..46,512+40,Z%,|
00000c50  47 b8 2c 2c 2c 4d 3a 21  45 25 3d 2d 31 3a 45 25  |G.,,,M:!E%=-1:E%|
00000c60  21 34 3d 30 3a 45 25 21  38 3d 2d 33 32 3a 45 25  |!4=0:E%!8=-32:E%|
00000c70  21 26 63 3d 28 4d 3c 3c  50 29 3a 45 25 21 31 36  |!&c=(M<<P):E%!16|
00000c80  3d 26 37 38 3a 45 25 21  32 30 3d 26 33 31 31 61  |=&78:E%!20=&311a|
00000c90  3a 45 25 21 32 34 3d 5f  3a 45 25 21 32 38 3d 5a  |:E%!24=_:E%!28=Z|
00000ca0  25 3a 45 25 21 33 32 3d  26 64 3a c8 99 26 34 30  |%:E%!32=&d:..&40|
00000cb0  30 63 32 2c 2c 45 25 b8  53 25 3a 69 3d b9 3a 3d  |0c2,,E%.S%:i=.:=|
00000cc0  53 25 0d 00 56 3f dd f2  77 28 4d 25 2c 53 25 2c  |S%..V?..w(M%,S%,|
00000cd0  43 24 29 3a 21 45 25 3d  4d 25 3a 45 25 21 34 3d  |C$):!E%=M%:E%!4=|
00000ce0  53 25 3a c8 99 26 34 30  30 63 65 2c 2c 45 25 3a  |S%:..&400ce,,E%:|
00000cf0  e7 28 45 25 21 32 34 80  31 3c 3c 32 33 29 3e 31  |.(E%!24.1<<23)>1|
00000d00  8c 0d 00 57 13 f2 46 28  a4 45 28 22 49 63 44 65  |...W..F(.E("IcDe|
00000d10  6c 22 29 29 0d 00 58 1f  cc 3a 24 28 45 25 21 32  |l"))..X..:$(E%!2|
00000d20  38 29 3d 43 24 3a f2 43  28 4d 25 2c 53 25 2c 30  |8)=C$:.C(M%,S%,0|
00000d30  2c 30 29 0d 00 59 07 cd  3a e1 0d 00 5a 39 dd f2  |,0)..Y..:...Z9..|
00000d40  64 28 4d 25 2c 53 25 2c  55 25 29 3a ea 66 2c 56  |d(M%,S%,U%):.f,V|
00000d50  79 3a 66 3d 31 3c 3c 32  32 3a 56 79 3d 28 2d 55  |y:f=1<<22:Vy=(-U|
00000d60  25 29 3c 3c 32 32 3a e7  55 25 8c 66 2b 3d 31 3c  |%)<<22:.U%.f+=1<|
00000d70  3c 32 31 0d 00 5b 14 f2  43 28 4d 25 2c 53 25 2c  |<21..[..C(M%,S%,|
00000d80  66 2c 56 79 29 3a e1 0d  00 5c 41 dd f2 43 28 4d  |f,Vy):...\A..C(M|
00000d90  25 2c 53 25 2c 66 2c 6b  79 29 3a 21 45 25 3d 4d  |%,S%,f,ky):!E%=M|
00000da0  25 3a 45 25 21 34 3d 53  25 3a 45 25 21 38 3d 6b  |%:E%!4=S%:E%!8=k|
00000db0  79 3a 45 25 21 26 63 3d  66 3a c8 99 26 34 30 30  |y:E%!&c=f:..&400|
00000dc0  63 64 2c 2c 45 25 3a e1  0d 00 5d 49 dd f2 56 3a  |cd,,E%:...]I..V:|
00000dd0  ea 66 79 2c 57 79 3a c8  99 26 34 31 35 30 30 2c  |.fy,Wy:..&41500,|
00000de0  2c 22 3c 4d 65 6d 6f 72  79 50 69 65 32 24 44 69  |,"<MemoryPie2$Di|
00000df0  72 3e 22 2b 22 2e 4d 65  73 73 61 67 65 73 22 b8  |r>"+".Messages".|
00000e00  66 79 2c 2c 57 79 3a e7  28 66 79 80 31 29 3d 30  |fy,,Wy:.(fy.1)=0|
00000e10  8c 0d 00 5e 3f de 69 79  20 57 79 3a de 71 79 20  |...^?.iy Wy:.qy |
00000e20  32 30 3a c8 99 26 34 31  35 30 31 2c 71 79 2c 22  |20:..&41501,qy,"|
00000e30  3c 4d 65 6d 6f 72 79 50  69 65 32 24 44 69 72 3e  |<MemoryPie2$Dir>|
00000e40  22 2b 22 2e 4d 65 73 73  61 67 65 73 22 2c 69 79  |"+".Messages",iy|
00000e50  0d 00 5f 36 cc 3a f2 46  28 22 48 65 79 2c 20 74  |.._6.:.F("Hey, t|
00000e60  68 65 73 65 20 6d 65 73  73 61 67 65 73 20 61 72  |hese messages ar|
00000e70  65 20 61 6c 72 65 61 64  79 20 69 6e 20 6d 65 6d  |e already in mem|
00000e80  6f 72 79 2e 22 29 0d 00  60 07 cd 3a e1 0d 00 61  |ory.")..`..:...a|
00000e90  6c dd a4 45 28 5a 24 29  3a ea 41 2c 4a 24 2c 64  |l..E(Z$):.A,J$,d|
00000ea0  79 2c 54 3a 24 49 3d 5a  24 2b 22 3a 22 2b 5a 24  |y,T:$I=Z$+":"+Z$|
00000eb0  3a 3f 28 49 2b a9 28 24  49 29 29 3d 30 3a c8 99  |:?(I+.($I))=0:..|
00000ec0  26 34 31 35 30 32 2c 71  79 2c 49 2c 30 2c 30 2c  |&41502,qy,I,0,0,|
00000ed0  30 2c 30 2c 30 2c 30 b8  2c 2c 64 79 2c 54 3a e3  |0,0,0,0.,,dy,T:.|
00000ee0  41 3d 30 b8 54 2d 31 3a  4a 24 2b 3d bd 28 64 79  |A=0.T-1:J$+=.(dy|
00000ef0  3f 41 29 3a ed 3a 3d 4a  24 0d 00 62 2f dd f2 4c  |?A):.:=J$..b/..L|
00000f00  28 51 25 2c 4e 25 2c 48  25 29 3a c8 99 26 34 30  |(Q%,N%,H%):..&40|
00000f10  30 64 34 2c 2c 46 25 2c  4e 25 2d 36 34 2c 48 25  |0d4,,F%,N%-64,H%|
00000f20  3a 46 25 3d 51 25 3a e1  0d 00 63 2c dd f2 73 28  |:F%=Q%:...c,..s(|
00000f30  51 25 2c 4e 25 29 3a 46  25 3d 51 25 3a c8 99 26  |Q%,N%):F%=Q%:..&|
00000f40  34 30 30 64 34 2c 2c 46  25 2c 4e 25 2d 36 34 2c  |400d4,,F%,N%-64,|
00000f50  57 25 3a e1 0d 00 64 3b  dd f2 65 3a ea 76 3a de  |W%:...d;..e:.v:.|
00000f60  6b 20 32 35 36 3a de 45  79 20 38 30 3a de 51 20  |k 256:.Ey 80:.Q |
00000f70  32 30 2c 58 20 32 30 3a  76 3d 2d 34 3a f5 3a 76  |20,X 20:v=-4:.:v|
00000f80  2b 3d 34 3a f3 6b 21 76  3a fd 6b 21 76 3d 30 0d  |+=4:.k!v:.k!v=0.|
00000f90  00 65 16 dc 20 39 2c 20  31 30 2c 20 26 34 30 30  |.e.. 9, 10, &400|
00000fa0  43 31 2c 20 30 0d 00 66  05 e1 0d 00 67 2c dd f2  |C1, 0..f....g,..|
00000fb0  78 28 43 25 29 3a ea 7a  79 2c 6c 79 2c 5a 5f 3a  |x(C%):.zy,ly,Z_:|
00000fc0  68 79 3d 45 25 21 34 3a  7a 79 3d 45 25 21 31 36  |hy=E%!4:zy=E%!16|
00000fd0  3a c8 8e 7a 79 ca 0d 00  68 09 c9 30 3a f2 5a 0d  |:..zy...h..0:.Z.|
00000fe0  00 69 0a c9 26 61 3a f2  71 0d 00 6a 17 c9 39 2c  |.i..&a:.q..j..9,|
00000ff0  26 34 30 30 63 31 3a f2  55 3a 59 3d b9 3a f2 53  |&400c1:.U:Y=.:.S|
00001000  0d 00 6b 07 cb 3a e1 0d  00 6c 86 dd f2 55 3a ea  |..k..:...l...U:.|
00001010  51 2c 58 2c 41 3a de 51  20 32 34 2c 58 20 32 34  |Q,X,A:.Q 24,X 24|
00001020  3a 21 51 3d 26 38 32 3a  51 21 34 3d 26 38 33 3a  |:!Q=&82:Q!4=&83:|
00001030  51 21 38 3d 34 3a 51 21  26 63 3d 35 3a 51 21 31  |Q!8=4:Q!&c=5:Q!1|
00001040  36 3d 39 3a 51 21 32 30  3d 2d 31 3a ef 32 36 3a  |6=9:Q!20=-1:.26:|
00001050  c8 99 34 39 2c 51 2c 58  3a 50 3d 58 21 38 3a 4b  |..49,Q,X:P=X!8:K|
00001060  3d 58 21 26 63 3a 75 79  3d 28 31 3c 3c 58 21 31  |=X!&c:uy=(1<<X!1|
00001070  36 29 2f 38 3a 77 79 3d  21 58 3c 3c 50 3a 61 79  |6)/8:wy=!X<<P:ay|
00001080  3d 58 21 34 3c 3c 4b 3a  e7 4b 3d 31 8c 0d 00 6d  |=X!4<<K:.K=1...m|
00001090  16 47 3d 43 79 3a 24 5f  3d 22 62 61 72 70 69 65  |.G=Cy:$_="barpie|
000010a0  32 32 22 0d 00 6e 16 cc  3a 47 3d 73 79 3a 24 5f  |22"..n..:G=sy:$_|
000010b0  3d 22 62 61 72 70 69 65  22 0d 00 6f 74 cd 3a c8  |="barpie"..ot.:.|
000010c0  99 26 34 30 30 65 35 2c  2c 45 79 3a e3 41 3d 30  |.&400e5,,Ey:.A=0|
000010d0  b8 26 66 3a 47 21 28 41  2a 38 2b 34 34 29 3d 28  |.&f:G!(A*8+44)=(|
000010e0  45 79 21 28 41 2a 34 29  80 2d 32 35 36 29 2b 28  |Ey!(A*4).-256)+(|
000010f0  28 28 45 79 21 28 41 2a  34 29 80 2d 26 66 30 66  |((Ey!(A*4).-&f0f|
00001100  31 30 30 30 29 3e 3e 34  29 80 26 66 66 66 66 66  |1000)>>4).&fffff|
00001110  66 66 29 3a 47 21 28 41  2a 38 2b 34 38 29 3d 47  |ff):G!(A*8+48)=G|
00001120  21 28 41 2a 38 2b 34 34  29 3a ed 3a e1 0d 00 70  |!(A*8+44):.:...p|
00001130  1e dd f2 71 3a ea 4c 79  3a 4c 79 3d 45 25 21 32  |...q:.Ly:Ly=E%!2|
00001140  30 3a d5 23 4c 79 2c 4d  24 3a e1 0d 00 71 61 dd  |0:.#Ly,M$:...qa.|
00001150  f2 63 28 41 24 29 3a ea  41 2c 43 5f 2c 53 79 2c  |.c(A$):.A,C_,Sy,|
00001160  65 79 2c 6e 2c 50 5f 2c  41 79 3a c8 99 26 34 30  |ey,n,P_,Ay:..&40|
00001170  30 64 39 2c 2c 41 24 3a  6f 3d a4 41 28 22 49 6e  |0d9,,A$:o=.A("In|
00001180  66 6f 22 29 3a 70 3d a4  41 28 22 4b 65 79 22 29  |fo"):p=.A("Key")|
00001190  3a 55 3d a4 41 28 22 4c  61 72 67 65 22 29 3a c8  |:U=.A("Large"):.|
000011a0  99 26 34 30 30 64 61 3a  f2 54 3a e1 0d 00 72 78  |.&400da:.T:...rx|
000011b0  dd a4 41 28 46 24 29 3a  ea 53 79 2c 63 79 2c 60  |..A(F$):.Sy,cy,`|
000011c0  2c 48 2c 65 79 3a c8 99  26 34 30 30 64 62 2c 2c  |,H,ey:..&400db,,|
000011d0  2d 31 2c 2c 2c 2c 46 24  2c 30 b8 2c 63 79 2c 60  |-1,,,,F$,0.,cy,`|
000011e0  3a 48 3d a4 53 28 63 79  29 3a de 65 79 20 60 3a  |:H=.S(cy):.ey `:|
000011f0  c8 99 26 34 30 30 64 62  2c 2c 48 2c 65 79 2c 65  |..&400db,,H,ey,e|
00001200  79 2b 60 2c 2d 31 2c 46  24 2c 30 3a c8 99 26 34  |y+`,-1,F$,0:..&4|
00001210  30 30 63 31 2c 2c 48 b8  53 79 3a f2 49 28 48 29  |00c1,,H.Sy:.I(H)|
00001220  3a 3d 53 79 0d 00 73 82  dd f2 4d 28 4d 25 29 3a  |:=Sy..s...M(M%):|
00001230  ea 4d 2c 53 3a 21 45 25  3d 4d 25 3a c8 99 26 34  |.M,S:!E%=M%:..&4|
00001240  30 30 63 62 2c 2c 45 25  3a 4d 3d 45 25 21 26 63  |00cb,,E%:M=E%!&c|
00001250  2d 45 25 21 34 3a 53 3d  45 25 21 31 36 2d 45 25  |-E%!4:S=E%!16-E%|
00001260  21 38 3a 45 25 21 34 3d  28 77 79 2d 4d 29 2f 32  |!8:E%!4=(wy-M)/2|
00001270  3a 45 25 21 38 3d 28 61  79 2d 53 29 2f 32 3a 45  |:E%!8=(ay-S)/2:E|
00001280  25 21 26 63 3d 45 25 21  34 2b 4d 3a 45 25 21 31  |%!&c=E%!4+M:E%!1|
00001290  36 3d 45 25 21 38 2b 53  3a 45 25 21 32 38 3d 2d  |6=E%!8+S:E%!28=-|
000012a0  31 3a f2 47 3a e1 0d 00  74 14 dd f2 47 3a ea 53  |1:.G:...t...G:.S|
000012b0  2c 4d 3a e7 21 45 25 3d  55 8c 0d 00 75 2f 68 3d  |,M:.!E%=U...u/h=|
000012c0  b9 3a 53 3d 45 25 21 31  36 2d 45 25 21 38 3a 4d  |.:S=E%!16-E%!8:M|
000012d0  3d 45 25 21 26 63 2d 45  25 21 34 3a e7 28 53 3c  |=E%!&c-E%!4:.(S<|
000012e0  3e 71 84 4d 3c 3e 73 29  8c 0d 00 76 2a 43 3d a8  |>q.M<>s)...v*C=.|
000012f0  28 4d 2f 32 29 2d 50 3a  c8 99 26 34 30 30 64 31  |(M/2)-P:..&400d1|
00001300  2c 55 2c 30 2c 2d 53 2c  4d 2c 30 3a 71 3d 53 3a  |,U,0,-S,M,0:q=S:|
00001310  73 3d 4d 0d 00 77 05 cd  0d 00 78 14 cd 3a c8 99  |s=M..w....x..:..|
00001320  26 34 30 30 63 35 2c 2c  45 25 3a e1 0d 00 79 17  |&400c5,,E%:...y.|
00001330  dd f2 76 3a ea 48 2c 41  3a e7 21 45 25 3d 55 8c  |..v:.H,A:.!E%=U.|
00001340  68 3d a3 0d 00 7a 12 c8  99 26 34 30 30 63 36 2c  |h=...z...&400c6,|
00001350  2c 45 25 3a e1 0d 00 7b  2c dd a4 46 28 6c 79 29  |,E%:...{,..F(ly)|
00001360  3a ea 5a 3a c8 99 26 32  30 30 35 63 2c 6c 79 b8  |:.Z:..&2005c,ly.|
00001370  2c 5a 3a 3d 28 28 5a 2b  4f 2d 31 29 81 4f 29 2a  |,Z:=((Z+O-1).O)*|
00001380  4f 0d 00 7c 6a dd f2 53  3a ea 41 2c 74 3a 74 3d  |O..|j..S:.A,t:t=|
00001390  30 3a e3 41 3d 30 b8 35  3a 45 28 41 29 3d a4 46  |0:.A=0.5:E(A)=.F|
000013a0  28 41 29 3a 74 2b 3d 45  28 41 29 3a ed 3a c8 99  |(A):t+=E(A):.:..|
000013b0  26 34 30 30 65 63 2c 2d  31 2c 2d 31 b8 2c 2c 45  |&400ec,-1,-1.,,E|
000013c0  28 4c 29 3a 74 2b 3d 45  28 4c 29 3a 45 28 36 29  |(L):t+=E(L):E(6)|
000013d0  3d 6d 2d 74 3a e3 41 3d  30 b8 4c 3a e7 45 28 41  |=m-t:.A=0.L:.E(A|
000013e0  29 3c 3e 41 28 41 29 8c  59 3d b9 0d 00 7d 09 ed  |)<>A(A).Y=...}..|
000013f0  3a e7 59 8c 0d 00 7e 29  f2 48 28 47 29 3a f2 43  |:.Y...~).H(G):.C|
00001400  28 2d 32 2c 47 25 2c 30  2c 30 29 3a f2 57 28 31  |(-2,G%,0,0):.W(1|
00001410  29 3a 41 28 29 3d 45 28  29 3a 59 3d a3 0d 00 7f  |):A()=E():Y=....|
00001420  07 cd 3a e1 0d 00 80 fc  dd f2 48 28 4e 79 29 3a  |..:.......H(Ny):|
00001430  ea 65 2c 63 2c 4d 2c 53  2c 43 2c 75 2c 6a 2c 4a  |.e,c,M,S,C,u,j,J|
00001440  5f 3a ea 52 79 2c 59 79  2c 4f 79 2c 5f 79 2c 4e  |_:.Ry,Yy,Oy,_y,N|
00001450  3a c8 99 26 32 30 30 32  65 2c 35 31 32 2b 34 30  |:..&2002e,512+40|
00001460  2c 5a 25 2c 4e 79 b8 2c  2c 2c 4d 2c 53 3a 75 3d  |,Z%,Ny.,,,M,S:u=|
00001470  4d 3c 3c 50 3a 6a 3d 53  3c 3c 4b 3a 65 3d 75 2f  |M<<P:j=S<<K:e=u/|
00001480  32 3a 63 3d 6a 2f 32 3a  4d 3d 28 4d 2d 32 29 3c  |2:c=j/2:M=(M-2)<|
00001490  3c 50 3a 53 3d 28 53 2d  32 29 3c 3c 4b 3a 43 3d  |<P:S=(S-2)<<K:C=|
000014a0  a8 28 75 2b 6a 29 2f 34  2d 50 3a 21 47 79 3d 30  |.(u+j)/4-P:!Gy=0|
000014b0  3a c8 99 34 36 2c 35 31  32 2b 36 30 2c 5a 25 2c  |:..46,512+60,Z%,|
000014c0  4e 79 2c 47 79 b8 52 79  2c 59 79 2c 4f 79 2c 5f  |Ny,Gy.Ry,Yy,Oy,_|
000014d0  79 3a c8 91 65 2c 63 3a  4e 3d 30 3a f2 45 28 26  |y:..e,c:N=0:.E(&|
000014e0  62 2c 4c 29 3a f2 45 28  26 65 2c 36 29 3a f2 45  |b,L):.E(&e,6):.E|
000014f0  28 39 2c 32 29 3a f2 45  28 26 61 2c 30 29 3a f2  |(9,2):.E(&a,0):.|
00001500  45 28 26 64 2c 31 29 3a  f2 45 28 26 66 2c 34 29  |E(&d,1):.E(&f,4)|
00001510  3a f2 45 28 38 2c 33 29  3a f2 45 28 30 2c 35 29  |:.E(8,3):.E(0,5)|
00001520  0d 00 81 29 c8 99 26 34  30 30 65 36 2c 37 3a c8  |...)..&400e6,7:.|
00001530  8f 30 2c 30 2c 43 3a c8  99 34 36 2c 52 79 2c 59  |.0,0,C:..46,Ry,Y|
00001540  79 2c 4f 79 2c 5f 79 3a  e1 0d 00 82 16 dd f2 45  |y,Oy,_y:.......E|
00001550  28 74 79 2c 5a 29 3a e7  45 28 5a 29 3d 30 e1 0d  |(ty,Z):.E(Z)=0..|
00001560  00 83 43 c8 99 26 34 30  30 65 36 2c 74 79 3a ec  |..C..&400e6,ty:.|
00001570  30 2c 30 3a ec b5 28 4e  29 2a 43 2c 9b 28 4e 29  |0,0:..(N)*C,.(N)|
00001580  2a 43 3a 4e 2d 3d 45 28  5a 29 2a 58 79 3a f0 26  |*C:N-=E(Z)*Xy:.&|
00001590  62 35 2c b5 28 4e 29 2a  43 2c 9b 28 4e 29 2a 43  |b5,.(N)*C,.(N)*C|
000015a0  3a e1 0d 00 84 14 dd f2  57 28 7a 29 3a ea 77 2c  |:.......W(z):.w,|
000015b0  4e 3a c8 8e 7a ca 0d 00  85 15 c9 30 3a c8 99 26  |N:..z......0:..&|
000015c0  34 30 30 63 38 2c 2c 45  25 b8 77 0d 00 86 3a c9  |400c8,,E%.w...:.|
000015d0  31 3a 21 45 25 3d 55 3a  45 25 21 34 3d 30 3a 45  |1:!E%=U:E%!4=0:E|
000015e0  25 21 38 3d 2d 71 3a 45  25 21 26 63 3d 73 3a 45  |%!8=-q:E%!&c=s:E|
000015f0  25 21 31 36 3d 30 3a c8  99 26 34 30 30 63 39 2c  |%!16=0:..&400c9,|
00001600  2c 45 25 b8 77 0d 00 87  b0 cb 3a 65 3d 28 45 25  |,E%.w.....:e=(E%|
00001610  21 34 2b 45 25 21 26 63  29 2f 32 3a 63 3d 28 45  |!4+E%!&c)/2:c=(E|
00001620  25 21 38 2b 45 25 21 31  36 29 2f 32 3a c8 95 77  |%!8+E%!16)/2:..w|
00001630  3a c8 91 65 2c 63 3a 4e  3d 30 3a f2 45 28 26 62  |:..e,c:N=0:.E(&b|
00001640  2c 4c 29 3a f2 45 28 26  65 2c 36 29 3a f2 45 28  |,L):.E(&e,6):.E(|
00001650  39 2c 32 29 3a f2 45 28  26 61 2c 30 29 3a f2 45  |9,2):.E(&a,0):.E|
00001660  28 26 64 2c 31 29 3a f2  45 28 26 66 2c 34 29 3a  |(&d,1):.E(&f,4):|
00001670  f2 45 28 38 2c 33 29 3a  f2 45 28 30 2c 35 29 3a  |.E(8,3):.E(0,5):|
00001680  c8 99 26 34 30 30 65 36  2c 37 3a c8 8f 30 2c 30  |..&400e6,7:..0,0|
00001690  2c 43 3a c8 8f 30 2c 30  2c 43 2b 50 3a c8 91 30  |,C:..0,0,C+P:..0|
000016a0  2c 30 3a c8 99 26 34 30  30 63 61 2c 2c 45 25 b8  |,0:..&400ca,,E%.|
000016b0  77 3a ce 3a e1 0d ff                              |w:.:...|
000016b7

Our privacy policy is here.
Last updated: 28 Jul 2024, 23:31 UTC
Website designed by .