Freeware/Shareware/Smartquote/!Quotes/!SQ/!RunImage

Home » Recent acquisitions » Acorn ADFS disks » adfs_ArchimedesWorld_199510.adf » AW1095_1 » Freeware/Shareware/Smartquote/!Quotes/!SQ/!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/Shareware/Smartquote/!Quotes/!SQ/!RunImage
Read OK:	✔
File size:	1EE3 bytes
Load address:	0000
Exec address:	0000

File contents

    1REM>!RunImage
    2REMProduced by BasCompress v1.31 (18 Jan 1993)
    3ONERRORONERROROFF:ERRORERR,"Internal error code "+STR$(ERL)+": "+REPORT$:END
    4X$="<SmartQuotesSetup$Dir>":B$="Smart Quotes setup":k=FALSE:PROCz:PROCa:ONERRORONERROROFF:PROCR:END
    5PROCn:PROCN:PROCV(E):PROCQ:PROCM:END
    6DEFPROCQ:REPEAT:PROCb(Hy):UNTILFALSE:ENDPROC
    7DEFPROCn:PROCx:PROC_:PROCu:PROCs:PROCg(X$+".Templates"):ENDPROC
    8DEFPROCz:LOCALr:DIME%1024,V 256:ry=-1:sy=-2:hy=4096:Hy=14385:Qy=14384:Ey=-1:Fy=10:I=1:T=2:W=42:ENDPROC
    9DEFPROCb(p):LOCALZy:IFp<>EyTHEN
   10SYS&400c7,p,E%TOJ%
   11ELSE:SYS66TOZy:SYS&400e1,Qy,E%,Zy+FyTOJ%
   12ENDIF:CASEJ%OF
   13WHEN2:PROCT
   14WHEN3:SYS&400cf,,E%+128:IFE%!136=1THEN
   15IFINKEY-1THEN
   16*WimpTask <SmartQuotes$RunChars>
   17ELSE:*Filer_OpenDir <SmartQuotes$ChoicesDir>
   18ENDIF
   19ELSE:SYS&400c6,,E%:IF!E%=ETHENPROCF
   20ENDIF
   21WHEN6:PROCy(!E%,E%!4,E%!8,E%!12,E%!16)
   22WHEN7:PROCe
   23WHEN8:PROCh
   24WHEN9:PROCq
   25WHEN17,18:PROCt(J%)
   26ENDCASE:ENDPROC
   27DEFPROCx:LOCALSy,H,v,xy:DIMty 128:H=13:v=14:xy=15:FORSy=0TO2STEP2:P%=ty:[OPTSy:.Py:STMFD(H)!,{0-3,v}:MOV2,#0:.C:LDRB3,[0,2]:CMP3,#0:MOVEQ3,#13:STRB3,[1,2]:ADDNE2,2,#1:BNE C:LDMIA(H)!,{0-3,pc}:.Iy:STMFD(H)!,{0,1,v}:.C:LDRB1,[0]:CMP1,#13:BEQ Dy:CMP1,#65:BLT Ly:CMP1,#90
   28ADDLE1,1,#32:STRLEB1,[0]:.Ly:ADD0,0,#1:B C:.Dy:LDMIA(H)!,{0,1,pc}:]:NEXT:ENDPROC
   29DEFPROCM:ONERRORONERROROFF:ERRORERR,FNE("Err")+STR$(ERL)+": "+REPORT$:END
   30$E%="TASK":IFkTHENSYS&400dd,Gy,!E%
   31END:ENDPROC
   32DEFPROCR:LOCALX:ONERRORONERROROFF:ERROREXTERR,"Internal error code "+STR$(ERL)+REPORT$:END
   33!E%=ERR:$(E%+4)=FNE("Err")+STR$(ERL)+": "+REPORT$+"."+CHR$0:SYS&400df,E%,3,B$TO,X:IFX=2THENPROCL
   34ONERRORONERROROFF:PROCR:END
   35PROCQ:ENDPROC
   36DEFPROCL:LOCALX:$(E%+4)=FNE("Sure"):SYS&400df,E%,23,FNE("Mess")+B$TO,X:IFX=1THENPROCM
   37ENDPROC
   38DEFPROCE(V$,gy):LOCALW$:!E%=0:$(E%+4)=V$:SYS&400df,E%,1-2*gy,B$TO,X:IFX=2THENPROCL
   39ENDPROC
   40DEFPROCh:LOCALD,P,ny,F,e$:D=!E%:P=E%!4:ny=E%!20:F=E%!24:m=FALSE:CASEFOF
   41WHEN13:PROCG:PROCC:PROCB:PROCF
   42WHEN27:PROCF
   43WHEN386:PROCN
   44WHEN387:PROCG:PROCC:PROCB
   45OTHERWISEm=TRUE
   46ENDCASE:IF(F>=32ANDF<=255)ORF=21ORF=8ORF=395ORF=427THENPROCZ(TRUE)
   47IFmSYS&400dc,F
   48ENDPROC
   49DEFPROC_:L=2:i=4:R=5:b=7:a=9:By=11:Jy=12:Ny=16:w=17:Yy=21:K=22:Wy=23:Cy=24:Oy=26:Ky=25:ey=1:Vy=2:Ty=3:ENDPROC
   50DEFPROCy(Q%,U%,C%,Z%,S%):LOCALz,oy,x$:LOCALiy,g:IFC%=2THEN
   51CASEZ%OF
   52WHENE:CASES%OF
   53WHENL:M%=FNF(C$,I):PROCK(M%,Q%,U%)
   54WHENi:M%=FNF(C$,I):PROCP(M%,Z%,S%)
   55WHENR:M%=FNF(S$,T):PROCK(M%,Q%,U%)
   56WHENb:M%=FNF(S$,T):PROCP(M%,Z%,S%)
   57ENDCASE
   58ENDCASE
   59ELSE:CASEZ%OF
   60WHENE:CASES%OF
   61WHENBy:PROCO(SGN(2.5-C%))
   62WHENJy:PROCO(-SGN(2.5-C%))
   63WHENWy:PROCN
   64WHENCy:PROCj:PROCX
   65WHENOy:PROCF
   66WHENKy:PROCG:PROCC:PROCB:IFC%=4THENPROCF
   67WHENYy:IFC%>=16THENPROCf("directory",Z%,S%)
   68WHENi:M%=FNF(C$,I):PROCP(M%,Z%,S%)
   69WHENb:M%=FNF(S$,T):PROCP(M%,Z%,S%)
   70ENDCASE
   71WHENU:PROCk(U):CASES%OF
   72WHENVy:PROCM
   73WHENTy:PROCC:PROCB:PROCM
   74ENDCASE
   75ENDCASE
   76ENDIF:ENDPROC
   77DEFFNF(J$,vy):LOCALq,t,n:LOCALd,x:SYS&40091,,0,(1<<19)+(1<<21),0,0,0,0TO,,,q,,t:SYS&400ec,-1,-1TO_,,G:n=(q+t+7)ANDNOT3:IFG>=nTHEN
   78d=HIMEM:x=(d+q+3)ANDNOT3:END=PAGE+_+n
   79ELSE:PROCE(FNE("MenuMem"),0):PROCQ
   80ENDIF:SYS&40091,,d,(1<<19)+(1<<21),q,x,t,J$:Ry=vy:=d
   81DEFPROCq:LOCALJ$,M,N$,P,j,Y,C:SYS&400a0,0,M%,E%,E%+256,256:J$=FNC(E%+256,0):j=INSTR(J$,"\F"):Y=INSTR(J$,"\f"):IFj+Y=0THENPROCE(FNE("Font"),0):ENDPROC
   82IFY>0THEN
   83C=INSTR(J$," ",Y)+1
   84ELSE:C=j+2
   85ENDIF:M=INSTR(J$,"\",C+1):N$=MID$(J$,C,M-C):IFM=0THENM=LEN(J$)
   86CASERyOF
   87WHENI:C$=N$:P=L
   88WHENT:S$=N$:P=R
   89ENDCASE:PROCA(E,P,N$):SYS&400cf,,E%+128:IF(E%!136AND1)=1THEN
   90PROCi(F%,G%,N%)
   91ELSE:F%=0:END=M%
   92ENDIF:PROCZ(TRUE):ENDPROC
   93DEFPROCO(yy):S+=yy:IFS<1THENS=1
   94IFS>999THENS=999
   95PROCA(E,a,STR$(S)):PROCZ(TRUE):ENDPROC
   96DEFPROCf(w$,O,P):!E%=O:SYS&400cb,,E%:E%!36=O:E%!40=P:SYS&400ce,,E%+36:E%!44+=E%!4:E%!48+=E%!16-E%!24:E%!52+=E%!4:E%!56+=E%!16-E%!24:SYS&42400,128,1,w$,E%+44:ENDPROC
   97DEFPROCi(W%,G%,N%):SYS&400d4,,F%,G%-64,N%:F%=W%:ENDPROC
   98DEFPROCK(W%,G%,N%):F%=W%:SYS&400d4,,F%,G%-64,N%:ENDPROC
   99DEFPROCP(W%,D,P):LOCALqy,_y:F%=W%:!E%=D:SYS&400cb,,E%:qy=E%!4:_y=E%!16:E%!4=P:SYS&400ce,,E%:SYS&400d4,,F%,E%!16+qy,E%!20+_y:ENDPROC
  100DEFPROCc(D):SYS&400cf,,E%:SYS&400d4,,D,!E%-64,E%!4:F%=D:ENDPROC
  101DEFPROCs:$E%="TASK":SYS&400c0,310,!E%,B$,oTOzy,Gy:k=TRUE:ENDPROC
  102DEFFNC(Q,my):A%=Q:B%=V:CALLPy:=$V
  103DEFPROCA(Z%,S%,V$):!E%=Z%:E%!4=S%:SYS&400ce,,E%:IF(E%!24AND1<<23)>1THEN
  104PROCE(FNE("IcDel"),FALSE):ENDPROC
  105ENDIF:$(E%!28)=V$:PROCY(Z%,S%,0,0):ENDPROC
  106DEFFNM(Z%,S%):!E%=Z%:E%!4=S%:SYS&400ce,,E%:IF(E%!24AND1<<23)>1THENPROCE("Read: "+FNE("Icdel"),FALSE):=""
  107=$(E%!28)
  108DEFPROCY(Z%,S%,fy,cy):!E%=Z%:E%!4=S%:E%!8=cy:E%!12=fy:SYS&400cd,,E%:ENDPROC
  109DEFFNB(R$):LOCALM$:M$=FNG(":",R$):M$=FNG(".",M$):=M$
  110DEFFNG(E$,W$):LOCALM:M=INSTR(W$,E$):WHILEM>0:W$=RIGHT$(W$,LEN(W$)-M):M=INSTR(W$,E$):ENDWHILE:=W$
  111DEFPROCa:LOCALB,`:SYS&41500,,X$+".Messages"TOB,,`:IF(BAND1)=0THEN
  112DIMby `:DIMu 20:SYS&41501,u,X$+".Messages",by
  113ELSE:PROCE("Hey, these messages are already in memory.",FALSE)
  114ENDIF:ENDPROC
  115DEFFNE(P$):LOCALr,J,U$,e,s:DIMJ (LEN(P$)+1)*2:$J=P$+":"+P$:?(J+LEN($J))=0:SYS&41502,u,J,0,0,0,0,0,0TO,,e,s:FORr=0TOs-1:U$+=CHR$(e?r):NEXT:=U$
  116DEFFNZ(P$,O$,T$,a$,q$):LOCALr,s$,U$,z,e,s:DIMJ (LEN(P$)+1)*2,z 256:$J=P$+":"+P$:?(J+LEN($J))=0:SYS&41502,u,J,z,256,O$,T$,a$,q$TO,,e,s:FORr=0TOs-1:U$+=CHR$(e?r):NEXT:=U$
  117DEFPROCl(D,P):SYS&400d2,D,P,-1,-1,-1,LEN(FNM(D,P)):ENDPROC
  118DEFFNP(_$):$V=_$:A%=V:CALLIy:=$V
  119DEFPROCu:LOCALM:DIMo 256:M=-4:RESTORE+1:REPEAT:M+=4:READo!M:UNTILo!M=0
  120DATA 2, 3, 8, &502, &400C9, 0
  121ENDPROC
  122DEFPROCt(J%):LOCALXy,uy,jy,r:wy=E%!4:Xy=E%!16:CASEXyOF
  123WHEN0:PROCM
  124WHEN2:PROCd
  125WHEN3:PROCv
  126WHEN8:PROCr
  127WHEN&400c9:IFF%<>UTHENEND=M%
  128ENDCASE:ENDPROC
  129DEFPROCr:IFNOTWTHENENDPROC
  130E%!12=E%!8:SYS&400e7,19,E%,E%!4:PROCV(U):ENDPROC
  131DEFPROCv:LOCALD$,Z$:IFE%!12<>0THENENDPROC
  132Z$=FNC(E%+44,0):E$=Z$:PROCI:ENDPROC
  133DEFPROCI:LOCALM$,L$,c,Q,Z,y:M$=FNB(E$):L$=LEFT$(E$,LEN(E$)-LEN(M$)-1):Q=0:REPEAT:SYS12,12,L$,E%,1,Q,1024,M$TO,,,c,Q:UNTILc>0ORQ=-1:IFQ=-1THENPROCE(FNE("WhatFile"),0):ENDPROC
  134IFE%!20=4096THENPROCE(FNE("YuckDir"),0):ENDPROC
  135Z=FNA("Filer_Boot "+E$):y=TRUE:IFFNP(M$)=".!run"THEN
  136E$=LEFT$(E$,LEN(E$)-5):M$=FNB(E$)
  137ELSE:CASEE%!20OF
  138WHEN8192:D$=FNP(M$)
  139OTHERWISE:D$="file_"+FNP(STR$~(E%!20)):y=FALSE
  140ENDCASE
  141ENDIF:PROCA(E,Ny,D$):PROCA(E,w,E$):PROCY(E,w,1<<3,-(1<<3)*(LEN(E$)<=39)):IFyTHENE$+=".!Run"
  142PROCZ(TRUE):ENDPROC
  143DEFPROCe:SYS&400cf,,E%:E%!20=E%!12:E%!24=E%!16:E%!28=E%!0:E%!32=E%!4:E%!36=2048:E%!40=4096:$(E%+44)="SQ�Choices":E%?54=0:!E%=56:E%!12=0:E%!16=1:SYS&400e7,17,E%,E%!20,E%!24:ENDPROC
  144DEFPROCd:A$=FNC(E%+44,0):PROCA(E,K,A$):PROCl(E,K):PROCZ(TRUE):ENDPROC
  145DEFPROCg(Z$):LOCALr,ky,O,x,_,N,G:SYS&400d9,,Z$:SYS&400ec,-1,-1TO_,,G:IFG<>0THEN
  146N=HIMEM:ay=G:END=PAGE+_+G
  147ELSE:N=0
  148ENDIF:E=FNW("setup"):U=FNW("query"):IFN<>0THENEND=N
  149SYS&400da:ENDPROC
  150DEFFNW(H$):LOCALO,My,f,z,x:SYS&400db,,-1,,,,H$,0TO,My,f:IFN=0THEN
  151DIMz My
  152ELSE:z=N
  153ENDIF:DIMx f:SYS&400db,,z,x,x+f,-1,H$,0:SYS&400c1,,zTOO:=O
  154DEFPROCV(Z%):!E%=Z%:SYS&400cb,,E%:PROCT:ENDPROC
  155DEFPROCT:SYS&400c5,,E%:ENDPROC
  156DEFPROCk(Z%):!E%=Z%:PROCm:ENDPROC
  157DEFPROCm:LOCALz,r:SYS&400c6,,E%:ENDPROC
  158DEFPROCN:A$=FNS(FNE("Choices"),0):C$=FNS(FNE("Norm"),0):S$=FNS(FNE("Head"),0):S=VAL(FNS(FNE("Size"),-1))/16:E$=FNS(FNE("Chars"),0):PROCX:PROCZ(FALSE):ENDPROC
  159DEFPROCj:C$="Trinity.Medium":S$="Homerton.Bold":S=15:E$="Resources:$.Apps.!Chars":A$="<SmartQuotes$Dir>.SQ�Choices":ENDPROC
  160DEFPROCX:PROCA(E,L,C$):PROCA(E,R,S$):PROCA(E,a,STR$(S)):PROCI:PROCA(E,K,A$):ENDPROC
  161DEFPROCG:C$=FNM(E,L):S$=FNM(E,R):S=VAL(FNM(E,a)):E$=FNM(E,w):A$=FNM(E,K):ENDPROC
  162DEFPROCH:PROCS(A,"Set","Norm",C$):PROCS(A,"Set","Head",S$):PROCS(A,"SetEval","Size",STR$(S)+"*16"):PROCS(A,"Set","Chars",E$):PROCD:ENDPROC
  163DEFPROCU:PROCS(A,"SetMacro","Choices",A$):PROCD:ENDPROC
  164DEFPROCD:LOCALZ:SYS9,7,A,E%+256,,,256:CLOSE#A:Z=FNA("SetType "+FNC(E%+256,0)+" Obey"):ENDPROC
  165DEFPROCC:LOCALA,Z,Ay,F$:F$="<Wimp$ScrapDir>.Quotes":Z=FNA("CDir <SmartQuotes$ChoicesDir>"):A=FNJ("<SmartQuotes$ChoicesDir>."+FNE("FileSet")):IFA<>0THEN
  166PROCH
  167ELSE:Z=TRUE:PROCE(FNZ("NoRW",FNE("FileSet"),"<SmartQuotes$ChoicesDir>","","")+FNZ("WScrap",F$,"","",""),0):Ay=FNA("CDir "+F$):A=FNJ(F$+"."+FNE("FileSet")):IFA=0THEN
  168PROCE(FNZ("NoRW",FNE("FileSet"),F$,"",""),0)
  169ELSE:PROCH
  170ENDIF
  171ENDIF:A=FNJ("<SmartQuotes$Dir>."+FNE("FileCho")):IFA<>0THEN
  172PROCU
  173ELSE:Z=TRUE:PROCE(FNZ("NoRW",FNE("FileCho"),"<SmartQuotes$ChoicesDir>","","")+FNZ("WScrap",F$,"","",""),0):Ay=FNA("CDir "+F$):A=FNJ(F$+"."+FNE("FileCho")):IFA=0THEN
  174PROCE(FNZ("NoRW",FNE("FileCho"),F$,"",""),0)
  175ELSE:PROCU
  176ENDIF
  177ENDIF:PROCZ(Z):ENDPROC
  178DEFFNJ(Z$):LOCALh,B:SYS&2000d,128+3,Z$TOh;B:IF(BAND1)>0THENh=0
  179=h
  180DEFPROCS(A,I$,z$,Y$):BPUT#A,I$+" SmartQuotes$"+FNE(z$)+" "+Y$:ENDPROC
  181DEFPROCB:LOCALZ,G$:G$=FNS(FNE("Choices"),0):IFA$<>G$THEN
  182Z=FNA("CDir "+A$):IFZ>0THEN
  183PROCE(FNE("NoCDir"),0):A$=G$:PROCC
  184ELSE:*CDir <Wimp$ScrapDir>.Quotes
  185PROCJ("FileCho"):PROCJ("FileDip"):PROCJ("FileCha"):PROCJ("FileSet"):Z=FNA("Wipe "+G$+FNE("WipeOpt")):Z=FNA("CDir "+A$):PROCW("FileCho"):PROCW("FileDip"):PROCW("FileCha"):PROCW("FileSet")
  186ENDIF
  187ENDIF:Z=FNA("SetMacro SmartQuotes$ChoicesDir "+A$):*WimpTask <SmartQuotes$Dir>.Choices
  188*WimpTask <SmartQuotes$ChoicesDir>.Setup
  189ENDPROC
  190DEFPROCJ(P$):LOCALZ,Z$:Z$=FNE(P$):Z=FNA("Copy "+G$+"."+Z$+" <Wimp$ScrapDir>.Quotes."+Z$+FNE("CopyOpt")):ENDPROC
  191DEFPROCW(P$):LOCALZ,Z$:Z$=FNE(P$):Z=FNA("Copy <Wimp$ScrapDir>.Quotes."+Z$+" "+A$+"."+Z$+FNE("CopyOpt")):ENDPROC
  192DEFFNA(I$):LOCALl,B:SYS&20005,I$TOl;B:IF(BAND1)>0THENPROCE(FNC(l+4,0),0):=!lELSE=0
  193=0
  194DEFPROCZ(Uy):LOCALQ$:IFUy=WTHENENDPROC
  195W=Uy:Q$=FNE("Title"):IFWTHENQ$+=" *"
  196PROCo(E,Q$):ENDPROC
  197DEFPROCo(Z%,Q$):!E%=Z%:SYS&400cc,,E%+1:$(E%!76)=Q$:PROCw(Z%):ENDPROC
  198DEFPROCw(Z%):!E%=Z%:SYS&400e0,,E%:SYS&400d1,-1,E%!4,E%!16-40,E%!12,E%!16:ENDPROC
  199DEFPROCF:IFWTHEN
  200PROCc(U)
  201ELSE:PROCM
  202ENDIF:ENDPROC
  203DEFFNS(K$,dy):LOCALc,g:IFdyTHENg=3ELSEg=0
  204SYS&20023,"SmartQuotes$"+K$,E%,255,0,gTO,,c:E%?c=13:=$E%

�>!RunImage
0�Produced by BasCompress v1.31 (18 Jan 1993)
2�:��,"Internal error code "+�(�)+": "+�$:�
LX$="<SmartQuotesSetup$Dir>":B$="Smart Quotes setup":k=�:�z:�a:�:�R:�
�n:�N:�V(E):�Q:�M:�
��Q:�:�b(Hy):��:�
)��n:�x:�_:�u:�s:�g(X$+".Templates"):�
Y��z:�r:�E%1024,V 256:ry=-1:sy=-2:hy=4096:Hy=14385:Qy=14384:Ey=-1:Fy=10:I=1:T=2:W=42:�
	��b(p):�Zy:�p<>Ey�

ș&400c7,p,E%�J%
%�:ș66�Zy:ș&400e1,Qy,E%,Zy+Fy�J%
�:ȎJ%�

	�2:�T
"�3:ș&400cf,,E%+128:�E%!136=1�
	�-1�
$*WimpTask <SmartQuotes$RunChars>
-�:*Filer_OpenDir <SmartQuotes$ChoicesDir>
�
�:ș&400c6,,E%:�!E%=E��F
�
$�6:�y(!E%,E%!4,E%!8,E%!12,E%!16)
	�7:�e
	�8:�h
	�9:�q
�17,18:�t(J%)
�:�
���x:�Sy,H,v,xy:�ty 128:H=13:v=14:xy=15:�Sy=0�2�2:P%=ty:[OPTSy:.Py:STMFD(H)!,{0-3,v}:MOV2,#0:.C:LDRB3,[0,2]:CMP3,#0:�Q3,#13:STRB3,[1,2]:ADDNE2,2,#1:BNE C:LDMIA(H)!,{0-3,pc}:.Iy:STMFD(H)!,{0,1,v}:.C:LDRB1,[0]:CMP1,#13:BEQ Dy:CMP1,#65:BLT Ly:CMP1,#90
KADDLE1,1,#32:STRLEB1,[0]:.Ly:ADD0,0,#1:B C:.Dy:LDMIA(H)!,{0,1,pc}:]:�:�
)��M:�:��,�E("Err")+�(�)+": "+�$:�
!$E%="TASK":�k�ș&400dd,Gy,!E%
�:�
 5��R:�X:�:���,"Internal error code "+�(�)+�$:�
!K!E%=�:$(E%+4)=�E("Err")+�(�)+": "+�$+"."+�0:ș&400df,E%,3,B$�,X:�X=2��L
"�:�R:�
#�Q:�
$E��L:�X:$(E%+4)=�E("Sure"):ș&400df,E%,23,�E("Mess")+B$�,X:�X=1��M
%�
&D��E(V$,gy):�W$:!E%=0:$(E%+4)=V$:ș&400df,E%,1-2*gy,B$�,X:�X=2��L
'�
(;��h:�D,P,ny,F,e$:D=!E%:P=E%!4:ny=E%!20:F=E%!24:m=�:ȎF�
)�13:�G:�C:�B:�F
*
�27:�F
+�386:�N
,�387:�G:�C:�B
-m=�
.0�:�(F>=32�F<=255)�F=21�F=8�F=395�F=427��Z(�)
/�mș&400dc,F
0�
1f��_:L=2:i=4:R=5:b=7:a=9:By=11:Jy=12:Ny=16:w=17:Yy=21:K=22:Wy=23:Cy=24:Oy=26:Ky=25:ey=1:Vy=2:Ty=3:�
2-��y(Q%,U%,C%,Z%,S%):�z,oy,x$:�iy,g:�C%=2�
3	ȎZ%�
4�E:ȎS%�
5�L:M%=�F(C$,I):�K(M%,Q%,U%)
6�i:M%=�F(C$,I):�P(M%,Z%,S%)
7�R:M%=�F(S$,T):�K(M%,Q%,U%)
8�b:M%=�F(S$,T):�P(M%,Z%,S%)
9�
:�
;�:ȎZ%�
<�E:ȎS%�
=�By:�O(�(2.5-C%))
>�Jy:�O(-�(2.5-C%))
?
�Wy:�N
@
�Cy:�j:�X
A
�Oy:�F
B�Ky:�G:�C:�B:�C%=4��F
C%�Yy:�C%>=16��f("directory",Z%,S%)
D�i:M%=�F(C$,I):�P(M%,Z%,S%)
E�b:M%=�F(S$,T):�P(M%,Z%,S%)
F�
G�U:�k(U):ȎS%�
H
�Vy:�M
I�Ty:�C:�B:�M
J�
K�
L�:�
MnݤF(J$,vy):�q,t,n:�d,x:ș&40091,,0,(1<<19)+(1<<21),0,0,0,0�,,,q,,t:ș&400ec,-1,-1�_,,G:n=(q+t+7)��3:�G>=n�
Nd=�:x=(d+q+3)��3:�=�+_+n
O�:�E(�E("MenuMem"),0):�Q
P3�:ș&40091,,d,(1<<19)+(1<<21),q,x,t,J$:Ry=vy:=d
Qv��q:�J$,M,N$,P,j,Y,C:ș&400a0,0,M%,E%,E%+256,256:J$=�C(E%+256,0):j=�J$,"\F"):Y=�J$,"\f"):�j+Y=0��E(�E("Font"),0):�
R	�Y>0�
SC=�J$," ",Y)+1
T�:C=j+2
U/�:M=�J$,"\",C+1):N$=�J$,C,M-C):�M=0�M=�(J$)
V	ȎRy�
W�I:C$=N$:P=L
X�T:S$=N$:P=R
Y0�:�A(E,P,N$):ș&400cf,,E%+128:�(E%!136�1)=1�
Z�i(F%,G%,N%)
[�:F%=0:�=M%
\
�:�Z(�):�
]��O(yy):S+=yy:�S<1�S=1
^�S>999�S=999
_�A(E,a,�(S)):�Z(�):�
`���f(w$,O,P):!E%=O:ș&400cb,,E%:E%!36=O:E%!40=P:ș&400ce,,E%+36:E%!44+=E%!4:E%!48+=E%!16-E%!24:E%!52+=E%!4:E%!56+=E%!16-E%!24:ș&42400,128,1,w$,E%+44:�
a/��i(W%,G%,N%):ș&400d4,,F%,G%-64,N%:F%=W%:�
b/��K(W%,G%,N%):F%=W%:ș&400d4,,F%,G%-64,N%:�
cu��P(W%,D,P):�qy,_y:F%=W%:!E%=D:ș&400cb,,E%:qy=E%!4:_y=E%!16:E%!4=P:ș&400ce,,E%:ș&400d4,,F%,E%!16+qy,E%!20+_y:�
d6��c(D):ș&400cf,,E%:ș&400d4,,D,!E%-64,E%!4:F%=D:�
e4��s:$E%="TASK":ș&400c0,310,!E%,B$,o�zy,Gy:k=�:�
fݤC(Q,my):A%=Q:B%=V:�Py:=$V
g?��A(Z%,S%,V$):!E%=Z%:E%!4=S%:ș&400ce,,E%:�(E%!24�1<<23)>1�
h�E(�E("IcDel"),�):�
i!�:$(E%!28)=V$:�Y(Z%,S%,0,0):�
jZݤM(Z%,S%):!E%=Z%:E%!4=S%:ș&400ce,,E%:�(E%!24�1<<23)>1��E("Read: "+�E("Icdel"),�):=""
k
=$(E%!28)
lC��Y(Z%,S%,fy,cy):!E%=Z%:E%!4=S%:E%!8=cy:E%!12=fy:ș&400cd,,E%:�
m/ݤB(R$):�M$:M$=�G(":",R$):M$=�G(".",M$):=M$
nAݤG(E$,W$):�M:M=�W$,E$):ȕM>0:W$=�W$,�(W$)-M):M=�W$,E$):�:=W$
o4��a:�B,`:ș&41500,,X$+".Messages"�B,,`:�(B�1)=0�
p,�by `:�u 20:ș&41501,u,X$+".Messages",by
q8�:�E("Hey, these messages are already in memory.",�)
r�:�
syݤE(P$):�r,J,U$,e,s:�J (�(P$)+1)*2:$J=P$+":"+P$:?(J+�($J))=0:ș&41502,u,J,0,0,0,0,0,0�,,e,s:�r=0�s-1:U$+=�(e?r):�:=U$
t�ݤZ(P$,O$,T$,a$,q$):�r,s$,U$,z,e,s:�J (�(P$)+1)*2,z 256:$J=P$+":"+P$:?(J+�($J))=0:ș&41502,u,J,z,256,O$,T$,a$,q$�,,e,s:�r=0�s-1:U$+=�(e?r):�:=U$
u/��l(D,P):ș&400d2,D,P,-1,-1,-1,�(�M(D,P)):�
vݤP(_$):$V=_$:A%=V:�Iy:=$V
w-��u:�M:�o 256:M=-4:�+1:�:M+=4:�o!M:�o!M=0
x� 2, 3, 8, &502, &400C9, 0
y�
z.��t(J%):�Xy,uy,jy,r:wy=E%!4:Xy=E%!16:ȎXy�
{	�0:�M
|	�2:�d
}	�3:�v
~	�8:�r
�&400c9:�F%<>U��=M%
��:�
�
��r:�W��
�*E%!12=E%!8:ș&400e7,19,E%,E%!4:�V(U):�
���v:�D$,Z$:�E%!12<>0��
�Z$=�C(E%+44,0):E$=Z$:�I:�
����I:�M$,L$,c,Q,Z,y:M$=�B(E$):L$=�E$,�(E$)-�(M$)-1):Q=0:�:ș12,12,L$,E%,1,Q,1024,M$�,,,c,Q:�c>0�Q=-1:�Q=-1��E(�E("WhatFile"),0):�
�%�E%!20=4096��E(�E("YuckDir"),0):�
�/Z=�A("Filer_Boot "+E$):y=�:�P(M$)=".!run"�
�E$=�E$,�(E$)-5):M$=�B(E$)
��:ȎE%!20�
��8192:D$=�P(M$)
�":D$="file_"+�P(�~(E%!20)):y=�
��
�L�:�A(E,Ny,D$):�A(E,w,E$):�Y(E,w,1<<3,-(1<<3)*(�(E$)<=39)):�y�E$+=".!Run"
��Z(�):�
����e:ș&400cf,,E%:E%!20=E%!12:E%!24=E%!16:E%!28=E%!0:E%!32=E%!4:E%!36=2048:E%!40=4096:$(E%+44)="SQ�Choices":E%?54=0:!E%=56:E%!12=0:E%!16=1:ș&400e7,17,E%,E%!20,E%!24:�
�1��d:A$=�C(E%+44,0):�A(E,K,A$):�l(E,K):�Z(�):�
�C��g(Z$):�r,ky,O,x,_,N,G:ș&400d9,,Z$:ș&400ec,-1,-1�_,,G:�G<>0�
�N=�:ay=G:�=�+_+G
�	�:N=0
�+�:E=�W("setup"):U=�W("query"):�N<>0��=N
�ș&400da:�
�8ݤW(H$):�O,My,f,z,x:ș&400db,,-1,,,,H$,0�,My,f:�N=0�
�	�z My
�	�:z=N
�5�:�x f:ș&400db,,z,x,x+f,-1,H$,0:ș&400c1,,z�O:=O
�$��V(Z%):!E%=Z%:ș&400cb,,E%:�T:�
���T:ș&400c5,,E%:�
���k(Z%):!E%=Z%:�m:�
���m:�z,r:ș&400c6,,E%:�
����N:A$=�S(�E("Choices"),0):C$=�S(�E("Norm"),0):S$=�S(�E("Head"),0):S=�(�S(�E("Size"),-1))/16:E$=�S(�E("Chars"),0):�X:�Z(�):�
�t��j:C$="Trinity.Medium":S$="Homerton.Bold":S=15:E$="Resources:$.Apps.!Chars":A$="<SmartQuotes$Dir>.SQ�Choices":�
�:��X:�A(E,L,C$):�A(E,R,S$):�A(E,a,�(S)):�I:�A(E,K,A$):�
�B��G:C$=�M(E,L):S$=�M(E,R):S=�(�M(E,a)):E$=�M(E,w):A$=�M(E,K):�
�q��H:�S(A,"Set","Norm",C$):�S(A,"Set","Head",S$):�S(A,"SetEval","Size",�(S)+"*16"):�S(A,"Set","Chars",E$):�D:�
�*��U:�S(A,"SetMacro","Choices",A$):�D:�
�K��D:�Z:ș9,7,A,E%+256,,,256:�#A:Z=�A("SetType "+�C(E%+256,0)+" Obey"):�
����C:�A,Z,Ay,F$:F$="<Wimp$ScrapDir>.Quotes":Z=�A("CDir <SmartQuotes$ChoicesDir>"):A=�J("<SmartQuotes$ChoicesDir>."+�E("FileSet")):�A<>0�
��H
���:Z=�:�E(�Z("NoRW",�E("FileSet"),"<SmartQuotes$ChoicesDir>","","")+�Z("WScrap",F$,"","",""),0):Ay=�A("CDir "+F$):A=�J(F$+"."+�E("FileSet")):�A=0�
�+�E(�Z("NoRW",�E("FileSet"),F$,"",""),0)
��:�H
��
�5�:A=�J("<SmartQuotes$Dir>."+�E("FileCho")):�A<>0�
��U
���:Z=�:�E(�Z("NoRW",�E("FileCho"),"<SmartQuotes$ChoicesDir>","","")+�Z("WScrap",F$,"","",""),0):Ay=�A("CDir "+F$):A=�J(F$+"."+�E("FileCho")):�A=0�
�+�E(�Z("NoRW",�E("FileCho"),F$,"",""),0)
��:�U
��
�
�:�Z(Z):�
�3ݤJ(Z$):�h,B:ș&2000d,128+3,Z$�h;B:�(B�1)>0�h=0
�=h
�:��S(A,I$,z$,Y$):�#A,I$+" SmartQuotes$"+�E(z$)+" "+Y$:�
�-��B:�Z,G$:G$=�S(�E("Choices"),0):�A$<>G$�
�Z=�A("CDir "+A$):�Z>0�
��E(�E("NoCDir"),0):A$=G$:�C
�"�:*CDir <Wimp$ScrapDir>.Quotes
���J("FileCho"):�J("FileDip"):�J("FileCha"):�J("FileSet"):Z=�A("Wipe "+G$+�E("WipeOpt")):Z=�A("CDir "+A$):�W("FileCho"):�W("FileDip"):�W("FileCha"):�W("FileSet")
��
�U�:Z=�A("SetMacro SmartQuotes$ChoicesDir "+A$):*WimpTask <SmartQuotes$Dir>.Choices
�,*WimpTask <SmartQuotes$ChoicesDir>.Setup
��
�a��J(P$):�Z,Z$:Z$=�E(P$):Z=�A("Copy "+G$+"."+Z$+" <Wimp$ScrapDir>.Quotes."+Z$+�E("CopyOpt")):�
�a��W(P$):�Z,Z$:Z$=�E(P$):Z=�A("Copy <Wimp$ScrapDir>.Quotes."+Z$+" "+A$+"."+Z$+�E("CopyOpt")):�
�@ݤA(I$):�l,B:ș&20005,I$�l;B:�(B�1)>0��E(�C(l+4,0),0):=!l�=0
�=0
���Z(Uy):�Q$:�Uy=W��
�#W=Uy:Q$=�E("Title"):�W�Q$+=" *"
��o(E,Q$):�
�9��o(Z%,Q$):!E%=Z%:ș&400cc,,E%+1:$(E%!76)=Q$:�w(Z%):�
�G��w(Z%):!E%=Z%:ș&400e0,,E%:ș&400d1,-1,E%!4,E%!16-40,E%!12,E%!16:�
���F:�W�
�	�c(U)
��:�M
��:�
�ݤS(K$,dy):�c,g:�dy�g=3�g=0
�:ș&20023,"SmartQuotes$"+K$,E%,255,0,g�,,c:E%?c=13:=$E%
�

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 33  |BasCompress v1.3|
00000030  31 20 28 31 38 20 4a 61  6e 20 31 39 39 33 29 0d  |1 (18 Jan 1993).|
00000040  00 03 32 ee 85 ee 85 87  3a 85 9f 2c 22 49 6e 74  |..2.....:..,"Int|
00000050  65 72 6e 61 6c 20 65 72  72 6f 72 20 63 6f 64 65  |ernal error code|
00000060  20 22 2b c3 28 9e 29 2b  22 3a 20 22 2b f6 24 3a  | "+.(.)+": "+.$:|
00000070  e0 0d 00 04 4c 58 24 3d  22 3c 53 6d 61 72 74 51  |....LX$="<SmartQ|
00000080  75 6f 74 65 73 53 65 74  75 70 24 44 69 72 3e 22  |uotesSetup$Dir>"|
00000090  3a 42 24 3d 22 53 6d 61  72 74 20 51 75 6f 74 65  |:B$="Smart Quote|
000000a0  73 20 73 65 74 75 70 22  3a 6b 3d a3 3a f2 7a 3a  |s setup":k=.:.z:|
000000b0  f2 61 3a ee 85 ee 85 87  3a f2 52 3a e0 0d 00 05  |.a:.....:.R:....|
000000c0  17 f2 6e 3a f2 4e 3a f2  56 28 45 29 3a f2 51 3a  |..n:.N:.V(E):.Q:|
000000d0  f2 4d 3a e0 0d 00 06 15  dd f2 51 3a f5 3a f2 62  |.M:.......Q:.:.b|
000000e0  28 48 79 29 3a fd a3 3a  e1 0d 00 07 29 dd f2 6e  |(Hy):..:....)..n|
000000f0  3a f2 78 3a f2 5f 3a f2  75 3a f2 73 3a f2 67 28  |:.x:._:.u:.s:.g(|
00000100  58 24 2b 22 2e 54 65 6d  70 6c 61 74 65 73 22 29  |X$+".Templates")|
00000110  3a e1 0d 00 08 59 dd f2  7a 3a ea 72 3a de 45 25  |:....Y..z:.r:.E%|
00000120  31 30 32 34 2c 56 20 32  35 36 3a 72 79 3d 2d 31  |1024,V 256:ry=-1|
00000130  3a 73 79 3d 2d 32 3a 68  79 3d 34 30 39 36 3a 48  |:sy=-2:hy=4096:H|
00000140  79 3d 31 34 33 38 35 3a  51 79 3d 31 34 33 38 34  |y=14385:Qy=14384|
00000150  3a 45 79 3d 2d 31 3a 46  79 3d 31 30 3a 49 3d 31  |:Ey=-1:Fy=10:I=1|
00000160  3a 54 3d 32 3a 57 3d 34  32 3a e1 0d 00 09 16 dd  |:T=2:W=42:......|
00000170  f2 62 28 70 29 3a ea 5a  79 3a e7 70 3c 3e 45 79  |.b(p):.Zy:.p<>Ey|
00000180  8c 0d 00 0a 14 c8 99 26  34 30 30 63 37 2c 70 2c  |.......&400c7,p,|
00000190  45 25 b8 4a 25 0d 00 0b  25 cc 3a c8 99 36 36 b8  |E%.J%...%.:..66.|
000001a0  5a 79 3a c8 99 26 34 30  30 65 31 2c 51 79 2c 45  |Zy:..&400e1,Qy,E|
000001b0  25 2c 5a 79 2b 46 79 b8  4a 25 0d 00 0c 0b cd 3a  |%,Zy+Fy.J%.....:|
000001c0  c8 8e 4a 25 ca 0d 00 0d  09 c9 32 3a f2 54 0d 00  |..J%......2:.T..|
000001d0  0e 22 c9 33 3a c8 99 26  34 30 30 63 66 2c 2c 45  |.".3:..&400cf,,E|
000001e0  25 2b 31 32 38 3a e7 45  25 21 31 33 36 3d 31 8c  |%+128:.E%!136=1.|
000001f0  0d 00 0f 09 e7 a6 2d 31  8c 0d 00 10 24 2a 57 69  |......-1....$*Wi|
00000200  6d 70 54 61 73 6b 20 3c  53 6d 61 72 74 51 75 6f  |mpTask <SmartQuo|
00000210  74 65 73 24 52 75 6e 43  68 61 72 73 3e 0d 00 11  |tes$RunChars>...|
00000220  2d cc 3a 2a 46 69 6c 65  72 5f 4f 70 65 6e 44 69  |-.:*Filer_OpenDi|
00000230  72 20 3c 53 6d 61 72 74  51 75 6f 74 65 73 24 43  |r <SmartQuotes$C|
00000240  68 6f 69 63 65 73 44 69  72 3e 0d 00 12 05 cd 0d  |hoicesDir>......|
00000250  00 13 1c cc 3a c8 99 26  34 30 30 63 36 2c 2c 45  |....:..&400c6,,E|
00000260  25 3a e7 21 45 25 3d 45  8c f2 46 0d 00 14 05 cd  |%:.!E%=E..F.....|
00000270  0d 00 15 24 c9 36 3a f2  79 28 21 45 25 2c 45 25  |...$.6:.y(!E%,E%|
00000280  21 34 2c 45 25 21 38 2c  45 25 21 31 32 2c 45 25  |!4,E%!8,E%!12,E%|
00000290  21 31 36 29 0d 00 16 09  c9 37 3a f2 65 0d 00 17  |!16).....7:.e...|
000002a0  09 c9 38 3a f2 68 0d 00  18 09 c9 39 3a f2 71 0d  |..8:.h.....9:.q.|
000002b0  00 19 11 c9 31 37 2c 31  38 3a f2 74 28 4a 25 29  |....17,18:.t(J%)|
000002c0  0d 00 1a 07 cb 3a e1 0d  00 1b fb dd f2 78 3a ea  |.....:.......x:.|
000002d0  53 79 2c 48 2c 76 2c 78  79 3a de 74 79 20 31 32  |Sy,H,v,xy:.ty 12|
000002e0  38 3a 48 3d 31 33 3a 76  3d 31 34 3a 78 79 3d 31  |8:H=13:v=14:xy=1|
000002f0  35 3a e3 53 79 3d 30 b8  32 88 32 3a 50 25 3d 74  |5:.Sy=0.2.2:P%=t|
00000300  79 3a 5b 4f 50 54 53 79  3a 2e 50 79 3a 53 54 4d  |y:[OPTSy:.Py:STM|
00000310  46 44 28 48 29 21 2c 7b  30 2d 33 2c 76 7d 3a 4d  |FD(H)!,{0-3,v}:M|
00000320  4f 56 32 2c 23 30 3a 2e  43 3a 4c 44 52 42 33 2c  |OV2,#0:.C:LDRB3,|
00000330  5b 30 2c 32 5d 3a 43 4d  50 33 2c 23 30 3a ec 51  |[0,2]:CMP3,#0:.Q|
00000340  33 2c 23 31 33 3a 53 54  52 42 33 2c 5b 31 2c 32  |3,#13:STRB3,[1,2|
00000350  5d 3a 41 44 44 4e 45 32  2c 32 2c 23 31 3a 42 4e  |]:ADDNE2,2,#1:BN|
00000360  45 20 43 3a 4c 44 4d 49  41 28 48 29 21 2c 7b 30  |E C:LDMIA(H)!,{0|
00000370  2d 33 2c 70 63 7d 3a 2e  49 79 3a 53 54 4d 46 44  |-3,pc}:.Iy:STMFD|
00000380  28 48 29 21 2c 7b 30 2c  31 2c 76 7d 3a 2e 43 3a  |(H)!,{0,1,v}:.C:|
00000390  4c 44 52 42 31 2c 5b 30  5d 3a 43 4d 50 31 2c 23  |LDRB1,[0]:CMP1,#|
000003a0  31 33 3a 42 45 51 20 44  79 3a 43 4d 50 31 2c 23  |13:BEQ Dy:CMP1,#|
000003b0  36 35 3a 42 4c 54 20 4c  79 3a 43 4d 50 31 2c 23  |65:BLT Ly:CMP1,#|
000003c0  39 30 0d 00 1c 4b 41 44  44 4c 45 31 2c 31 2c 23  |90...KADDLE1,1,#|
000003d0  33 32 3a 53 54 52 4c 45  42 31 2c 5b 30 5d 3a 2e  |32:STRLEB1,[0]:.|
000003e0  4c 79 3a 41 44 44 30 2c  30 2c 23 31 3a 42 20 43  |Ly:ADD0,0,#1:B C|
000003f0  3a 2e 44 79 3a 4c 44 4d  49 41 28 48 29 21 2c 7b  |:.Dy:LDMIA(H)!,{|
00000400  30 2c 31 2c 70 63 7d 3a  5d 3a ed 3a e1 0d 00 1d  |0,1,pc}:]:.:....|
00000410  29 dd f2 4d 3a ee 85 ee  85 87 3a 85 9f 2c a4 45  |)..M:.....:..,.E|
00000420  28 22 45 72 72 22 29 2b  c3 28 9e 29 2b 22 3a 20  |("Err")+.(.)+": |
00000430  22 2b f6 24 3a e0 0d 00  1e 21 24 45 25 3d 22 54  |"+.$:....!$E%="T|
00000440  41 53 4b 22 3a e7 6b 8c  c8 99 26 34 30 30 64 64  |ASK":.k...&400dd|
00000450  2c 47 79 2c 21 45 25 0d  00 1f 07 e0 3a e1 0d 00  |,Gy,!E%.....:...|
00000460  20 35 dd f2 52 3a ea 58  3a ee 85 ee 85 87 3a 85  | 5..R:.X:.....:.|
00000470  a2 9f 2c 22 49 6e 74 65  72 6e 61 6c 20 65 72 72  |..,"Internal err|
00000480  6f 72 20 63 6f 64 65 20  22 2b c3 28 9e 29 2b f6  |or code "+.(.)+.|
00000490  24 3a e0 0d 00 21 4b 21  45 25 3d 9f 3a 24 28 45  |$:...!K!E%=.:$(E|
000004a0  25 2b 34 29 3d a4 45 28  22 45 72 72 22 29 2b c3  |%+4)=.E("Err")+.|
000004b0  28 9e 29 2b 22 3a 20 22  2b f6 24 2b 22 2e 22 2b  |(.)+": "+.$+"."+|
000004c0  bd 30 3a c8 99 26 34 30  30 64 66 2c 45 25 2c 33  |.0:..&400df,E%,3|
000004d0  2c 42 24 b8 2c 58 3a e7  58 3d 32 8c f2 4c 0d 00  |,B$.,X:.X=2..L..|
000004e0  22 0e ee 85 ee 85 87 3a  f2 52 3a e0 0d 00 23 08  |"......:.R:...#.|
000004f0  f2 51 3a e1 0d 00 24 45  dd f2 4c 3a ea 58 3a 24  |.Q:...$E..L:.X:$|
00000500  28 45 25 2b 34 29 3d a4  45 28 22 53 75 72 65 22  |(E%+4)=.E("Sure"|
00000510  29 3a c8 99 26 34 30 30  64 66 2c 45 25 2c 32 33  |):..&400df,E%,23|
00000520  2c a4 45 28 22 4d 65 73  73 22 29 2b 42 24 b8 2c  |,.E("Mess")+B$.,|
00000530  58 3a e7 58 3d 31 8c f2  4d 0d 00 25 05 e1 0d 00  |X:.X=1..M..%....|
00000540  26 44 dd f2 45 28 56 24  2c 67 79 29 3a ea 57 24  |&D..E(V$,gy):.W$|
00000550  3a 21 45 25 3d 30 3a 24  28 45 25 2b 34 29 3d 56  |:!E%=0:$(E%+4)=V|
00000560  24 3a c8 99 26 34 30 30  64 66 2c 45 25 2c 31 2d  |$:..&400df,E%,1-|
00000570  32 2a 67 79 2c 42 24 b8  2c 58 3a e7 58 3d 32 8c  |2*gy,B$.,X:.X=2.|
00000580  f2 4c 0d 00 27 05 e1 0d  00 28 3b dd f2 68 3a ea  |.L..'....(;..h:.|
00000590  44 2c 50 2c 6e 79 2c 46  2c 65 24 3a 44 3d 21 45  |D,P,ny,F,e$:D=!E|
000005a0  25 3a 50 3d 45 25 21 34  3a 6e 79 3d 45 25 21 32  |%:P=E%!4:ny=E%!2|
000005b0  30 3a 46 3d 45 25 21 32  34 3a 6d 3d a3 3a c8 8e  |0:F=E%!24:m=.:..|
000005c0  46 ca 0d 00 29 13 c9 31  33 3a f2 47 3a f2 43 3a  |F...)..13:.G:.C:|
000005d0  f2 42 3a f2 46 0d 00 2a  0a c9 32 37 3a f2 46 0d  |.B:.F..*..27:.F.|
000005e0  00 2b 0b c9 33 38 36 3a  f2 4e 0d 00 2c 11 c9 33  |.+..386:.N..,..3|
000005f0  38 37 3a f2 47 3a f2 43  3a f2 42 0d 00 2d 08 7f  |87:.G:.C:.B..-..|
00000600  6d 3d b9 0d 00 2e 30 cb  3a e7 28 46 3e 3d 33 32  |m=....0.:.(F>=32|
00000610  80 46 3c 3d 32 35 35 29  84 46 3d 32 31 84 46 3d  |.F<=255).F=21.F=|
00000620  38 84 46 3d 33 39 35 84  46 3d 34 32 37 8c f2 5a  |8.F=395.F=427..Z|
00000630  28 b9 29 0d 00 2f 10 e7  6d c8 99 26 34 30 30 64  |(.)../..m..&400d|
00000640  63 2c 46 0d 00 30 05 e1  0d 00 31 66 dd f2 5f 3a  |c,F..0....1f.._:|
00000650  4c 3d 32 3a 69 3d 34 3a  52 3d 35 3a 62 3d 37 3a  |L=2:i=4:R=5:b=7:|
00000660  61 3d 39 3a 42 79 3d 31  31 3a 4a 79 3d 31 32 3a  |a=9:By=11:Jy=12:|
00000670  4e 79 3d 31 36 3a 77 3d  31 37 3a 59 79 3d 32 31  |Ny=16:w=17:Yy=21|
00000680  3a 4b 3d 32 32 3a 57 79  3d 32 33 3a 43 79 3d 32  |:K=22:Wy=23:Cy=2|
00000690  34 3a 4f 79 3d 32 36 3a  4b 79 3d 32 35 3a 65 79  |4:Oy=26:Ky=25:ey|
000006a0  3d 31 3a 56 79 3d 32 3a  54 79 3d 33 3a e1 0d 00  |=1:Vy=2:Ty=3:...|
000006b0  32 2d dd f2 79 28 51 25  2c 55 25 2c 43 25 2c 5a  |2-..y(Q%,U%,C%,Z|
000006c0  25 2c 53 25 29 3a ea 7a  2c 6f 79 2c 78 24 3a ea  |%,S%):.z,oy,x$:.|
000006d0  69 79 2c 67 3a e7 43 25  3d 32 8c 0d 00 33 09 c8  |iy,g:.C%=2...3..|
000006e0  8e 5a 25 ca 0d 00 34 0c  c9 45 3a c8 8e 53 25 ca  |.Z%...4..E:..S%.|
000006f0  0d 00 35 1f c9 4c 3a 4d  25 3d a4 46 28 43 24 2c  |..5..L:M%=.F(C$,|
00000700  49 29 3a f2 4b 28 4d 25  2c 51 25 2c 55 25 29 0d  |I):.K(M%,Q%,U%).|
00000710  00 36 1f c9 69 3a 4d 25  3d a4 46 28 43 24 2c 49  |.6..i:M%=.F(C$,I|
00000720  29 3a f2 50 28 4d 25 2c  5a 25 2c 53 25 29 0d 00  |):.P(M%,Z%,S%)..|
00000730  37 1f c9 52 3a 4d 25 3d  a4 46 28 53 24 2c 54 29  |7..R:M%=.F(S$,T)|
00000740  3a f2 4b 28 4d 25 2c 51  25 2c 55 25 29 0d 00 38  |:.K(M%,Q%,U%)..8|
00000750  1f c9 62 3a 4d 25 3d a4  46 28 53 24 2c 54 29 3a  |..b:M%=.F(S$,T):|
00000760  f2 50 28 4d 25 2c 5a 25  2c 53 25 29 0d 00 39 05  |.P(M%,Z%,S%)..9.|
00000770  cb 0d 00 3a 05 cb 0d 00  3b 0b cc 3a c8 8e 5a 25  |...:....;..:..Z%|
00000780  ca 0d 00 3c 0c c9 45 3a  c8 8e 53 25 ca 0d 00 3d  |...<..E:..S%...=|
00000790  15 c9 42 79 3a f2 4f 28  b4 28 32 2e 35 2d 43 25  |..By:.O(.(2.5-C%|
000007a0  29 29 0d 00 3e 16 c9 4a  79 3a f2 4f 28 2d b4 28  |))..>..Jy:.O(-.(|
000007b0  32 2e 35 2d 43 25 29 29  0d 00 3f 0a c9 57 79 3a  |2.5-C%))..?..Wy:|
000007c0  f2 4e 0d 00 40 0d c9 43  79 3a f2 6a 3a f2 58 0d  |.N..@..Cy:.j:.X.|
000007d0  00 41 0a c9 4f 79 3a f2  46 0d 00 42 19 c9 4b 79  |.A..Oy:.F..B..Ky|
000007e0  3a f2 47 3a f2 43 3a f2  42 3a e7 43 25 3d 34 8c  |:.G:.C:.B:.C%=4.|
000007f0  f2 46 0d 00 43 25 c9 59  79 3a e7 43 25 3e 3d 31  |.F..C%.Yy:.C%>=1|
00000800  36 8c f2 66 28 22 64 69  72 65 63 74 6f 72 79 22  |6..f("directory"|
00000810  2c 5a 25 2c 53 25 29 0d  00 44 1f c9 69 3a 4d 25  |,Z%,S%)..D..i:M%|
00000820  3d a4 46 28 43 24 2c 49  29 3a f2 50 28 4d 25 2c  |=.F(C$,I):.P(M%,|
00000830  5a 25 2c 53 25 29 0d 00  45 1f c9 62 3a 4d 25 3d  |Z%,S%)..E..b:M%=|
00000840  a4 46 28 53 24 2c 54 29  3a f2 50 28 4d 25 2c 5a  |.F(S$,T):.P(M%,Z|
00000850  25 2c 53 25 29 0d 00 46  05 cb 0d 00 47 12 c9 55  |%,S%)..F....G..U|
00000860  3a f2 6b 28 55 29 3a c8  8e 53 25 ca 0d 00 48 0a  |:.k(U):..S%...H.|
00000870  c9 56 79 3a f2 4d 0d 00  49 10 c9 54 79 3a f2 43  |.Vy:.M..I..Ty:.C|
00000880  3a f2 42 3a f2 4d 0d 00  4a 05 cb 0d 00 4b 05 cb  |:.B:.M..J....K..|
00000890  0d 00 4c 07 cd 3a e1 0d  00 4d 6e dd a4 46 28 4a  |..L..:...Mn..F(J|
000008a0  24 2c 76 79 29 3a ea 71  2c 74 2c 6e 3a ea 64 2c  |$,vy):.q,t,n:.d,|
000008b0  78 3a c8 99 26 34 30 30  39 31 2c 2c 30 2c 28 31  |x:..&40091,,0,(1|
000008c0  3c 3c 31 39 29 2b 28 31  3c 3c 32 31 29 2c 30 2c  |<<19)+(1<<21),0,|
000008d0  30 2c 30 2c 30 b8 2c 2c  2c 71 2c 2c 74 3a c8 99  |0,0,0.,,,q,,t:..|
000008e0  26 34 30 30 65 63 2c 2d  31 2c 2d 31 b8 5f 2c 2c  |&400ec,-1,-1._,,|
000008f0  47 3a 6e 3d 28 71 2b 74  2b 37 29 80 ac 33 3a e7  |G:n=(q+t+7)..3:.|
00000900  47 3e 3d 6e 8c 0d 00 4e  1c 64 3d 93 3a 78 3d 28  |G>=n...N.d=.:x=(|
00000910  64 2b 71 2b 33 29 80 ac  33 3a e0 3d 90 2b 5f 2b  |d+q+3)..3:.=.+_+|
00000920  6e 0d 00 4f 1c cc 3a f2  45 28 a4 45 28 22 4d 65  |n..O..:.E(.E("Me|
00000930  6e 75 4d 65 6d 22 29 2c  30 29 3a f2 51 0d 00 50  |nuMem"),0):.Q..P|
00000940  33 cd 3a c8 99 26 34 30  30 39 31 2c 2c 64 2c 28  |3.:..&40091,,d,(|
00000950  31 3c 3c 31 39 29 2b 28  31 3c 3c 32 31 29 2c 71  |1<<19)+(1<<21),q|
00000960  2c 78 2c 74 2c 4a 24 3a  52 79 3d 76 79 3a 3d 64  |,x,t,J$:Ry=vy:=d|
00000970  0d 00 51 76 dd f2 71 3a  ea 4a 24 2c 4d 2c 4e 24  |..Qv..q:.J$,M,N$|
00000980  2c 50 2c 6a 2c 59 2c 43  3a c8 99 26 34 30 30 61  |,P,j,Y,C:..&400a|
00000990  30 2c 30 2c 4d 25 2c 45  25 2c 45 25 2b 32 35 36  |0,0,M%,E%,E%+256|
000009a0  2c 32 35 36 3a 4a 24 3d  a4 43 28 45 25 2b 32 35  |,256:J$=.C(E%+25|
000009b0  36 2c 30 29 3a 6a 3d a7  4a 24 2c 22 5c 46 22 29  |6,0):j=.J$,"\F")|
000009c0  3a 59 3d a7 4a 24 2c 22  5c 66 22 29 3a e7 6a 2b  |:Y=.J$,"\f"):.j+|
000009d0  59 3d 30 8c f2 45 28 a4  45 28 22 46 6f 6e 74 22  |Y=0..E(.E("Font"|
000009e0  29 2c 30 29 3a e1 0d 00  52 09 e7 59 3e 30 8c 0d  |),0):...R..Y>0..|
000009f0  00 53 12 43 3d a7 4a 24  2c 22 20 22 2c 59 29 2b  |.S.C=.J$," ",Y)+|
00000a00  31 0d 00 54 0b cc 3a 43  3d 6a 2b 32 0d 00 55 2f  |1..T..:C=j+2..U/|
00000a10  cd 3a 4d 3d a7 4a 24 2c  22 5c 22 2c 43 2b 31 29  |.:M=.J$,"\",C+1)|
00000a20  3a 4e 24 3d c1 4a 24 2c  43 2c 4d 2d 43 29 3a e7  |:N$=.J$,C,M-C):.|
00000a30  4d 3d 30 8c 4d 3d a9 28  4a 24 29 0d 00 56 09 c8  |M=0.M=.(J$)..V..|
00000a40  8e 52 79 ca 0d 00 57 10  c9 49 3a 43 24 3d 4e 24  |.Ry...W..I:C$=N$|
00000a50  3a 50 3d 4c 0d 00 58 10  c9 54 3a 53 24 3d 4e 24  |:P=L..X..T:S$=N$|
00000a60  3a 50 3d 52 0d 00 59 30  cb 3a f2 41 28 45 2c 50  |:P=R..Y0.:.A(E,P|
00000a70  2c 4e 24 29 3a c8 99 26  34 30 30 63 66 2c 2c 45  |,N$):..&400cf,,E|
00000a80  25 2b 31 32 38 3a e7 28  45 25 21 31 33 36 80 31  |%+128:.(E%!136.1|
00000a90  29 3d 31 8c 0d 00 5a 10  f2 69 28 46 25 2c 47 25  |)=1...Z..i(F%,G%|
00000aa0  2c 4e 25 29 0d 00 5b 0f  cc 3a 46 25 3d 30 3a e0  |,N%)..[..:F%=0:.|
00000ab0  3d 4d 25 0d 00 5c 0d cd  3a f2 5a 28 b9 29 3a e1  |=M%..\..:.Z(.):.|
00000ac0  0d 00 5d 1a dd f2 4f 28  79 79 29 3a 53 2b 3d 79  |..]...O(yy):S+=y|
00000ad0  79 3a e7 53 3c 31 8c 53  3d 31 0d 00 5e 10 e7 53  |y:.S<1.S=1..^..S|
00000ae0  3e 39 39 39 8c 53 3d 39  39 39 0d 00 5f 18 f2 41  |>999.S=999.._..A|
00000af0  28 45 2c 61 2c c3 28 53  29 29 3a f2 5a 28 b9 29  |(E,a,.(S)):.Z(.)|
00000b00  3a e1 0d 00 60 9a dd f2  66 28 77 24 2c 4f 2c 50  |:...`...f(w$,O,P|
00000b10  29 3a 21 45 25 3d 4f 3a  c8 99 26 34 30 30 63 62  |):!E%=O:..&400cb|
00000b20  2c 2c 45 25 3a 45 25 21  33 36 3d 4f 3a 45 25 21  |,,E%:E%!36=O:E%!|
00000b30  34 30 3d 50 3a c8 99 26  34 30 30 63 65 2c 2c 45  |40=P:..&400ce,,E|
00000b40  25 2b 33 36 3a 45 25 21  34 34 2b 3d 45 25 21 34  |%+36:E%!44+=E%!4|
00000b50  3a 45 25 21 34 38 2b 3d  45 25 21 31 36 2d 45 25  |:E%!48+=E%!16-E%|
00000b60  21 32 34 3a 45 25 21 35  32 2b 3d 45 25 21 34 3a  |!24:E%!52+=E%!4:|
00000b70  45 25 21 35 36 2b 3d 45  25 21 31 36 2d 45 25 21  |E%!56+=E%!16-E%!|
00000b80  32 34 3a c8 99 26 34 32  34 30 30 2c 31 32 38 2c  |24:..&42400,128,|
00000b90  31 2c 77 24 2c 45 25 2b  34 34 3a e1 0d 00 61 2f  |1,w$,E%+44:...a/|
00000ba0  dd f2 69 28 57 25 2c 47  25 2c 4e 25 29 3a c8 99  |..i(W%,G%,N%):..|
00000bb0  26 34 30 30 64 34 2c 2c  46 25 2c 47 25 2d 36 34  |&400d4,,F%,G%-64|
00000bc0  2c 4e 25 3a 46 25 3d 57  25 3a e1 0d 00 62 2f dd  |,N%:F%=W%:...b/.|
00000bd0  f2 4b 28 57 25 2c 47 25  2c 4e 25 29 3a 46 25 3d  |.K(W%,G%,N%):F%=|
00000be0  57 25 3a c8 99 26 34 30  30 64 34 2c 2c 46 25 2c  |W%:..&400d4,,F%,|
00000bf0  47 25 2d 36 34 2c 4e 25  3a e1 0d 00 63 75 dd f2  |G%-64,N%:...cu..|
00000c00  50 28 57 25 2c 44 2c 50  29 3a ea 71 79 2c 5f 79  |P(W%,D,P):.qy,_y|
00000c10  3a 46 25 3d 57 25 3a 21  45 25 3d 44 3a c8 99 26  |:F%=W%:!E%=D:..&|
00000c20  34 30 30 63 62 2c 2c 45  25 3a 71 79 3d 45 25 21  |400cb,,E%:qy=E%!|
00000c30  34 3a 5f 79 3d 45 25 21  31 36 3a 45 25 21 34 3d  |4:_y=E%!16:E%!4=|
00000c40  50 3a c8 99 26 34 30 30  63 65 2c 2c 45 25 3a c8  |P:..&400ce,,E%:.|
00000c50  99 26 34 30 30 64 34 2c  2c 46 25 2c 45 25 21 31  |.&400d4,,F%,E%!1|
00000c60  36 2b 71 79 2c 45 25 21  32 30 2b 5f 79 3a e1 0d  |6+qy,E%!20+_y:..|
00000c70  00 64 36 dd f2 63 28 44  29 3a c8 99 26 34 30 30  |.d6..c(D):..&400|
00000c80  63 66 2c 2c 45 25 3a c8  99 26 34 30 30 64 34 2c  |cf,,E%:..&400d4,|
00000c90  2c 44 2c 21 45 25 2d 36  34 2c 45 25 21 34 3a 46  |,D,!E%-64,E%!4:F|
00000ca0  25 3d 44 3a e1 0d 00 65  34 dd f2 73 3a 24 45 25  |%=D:...e4..s:$E%|
00000cb0  3d 22 54 41 53 4b 22 3a  c8 99 26 34 30 30 63 30  |="TASK":..&400c0|
00000cc0  2c 33 31 30 2c 21 45 25  2c 42 24 2c 6f b8 7a 79  |,310,!E%,B$,o.zy|
00000cd0  2c 47 79 3a 6b 3d b9 3a  e1 0d 00 66 1f dd a4 43  |,Gy:k=.:...f...C|
00000ce0  28 51 2c 6d 79 29 3a 41  25 3d 51 3a 42 25 3d 56  |(Q,my):A%=Q:B%=V|
00000cf0  3a d6 50 79 3a 3d 24 56  0d 00 67 3f dd f2 41 28  |:.Py:=$V..g?..A(|
00000d00  5a 25 2c 53 25 2c 56 24  29 3a 21 45 25 3d 5a 25  |Z%,S%,V$):!E%=Z%|
00000d10  3a 45 25 21 34 3d 53 25  3a c8 99 26 34 30 30 63  |:E%!4=S%:..&400c|
00000d20  65 2c 2c 45 25 3a e7 28  45 25 21 32 34 80 31 3c  |e,,E%:.(E%!24.1<|
00000d30  3c 32 33 29 3e 31 8c 0d  00 68 17 f2 45 28 a4 45  |<23)>1...h..E(.E|
00000d40  28 22 49 63 44 65 6c 22  29 2c a3 29 3a e1 0d 00  |("IcDel"),.):...|
00000d50  69 21 cd 3a 24 28 45 25  21 32 38 29 3d 56 24 3a  |i!.:$(E%!28)=V$:|
00000d60  f2 59 28 5a 25 2c 53 25  2c 30 2c 30 29 3a e1 0d  |.Y(Z%,S%,0,0):..|
00000d70  00 6a 5a dd a4 4d 28 5a  25 2c 53 25 29 3a 21 45  |.jZ..M(Z%,S%):!E|
00000d80  25 3d 5a 25 3a 45 25 21  34 3d 53 25 3a c8 99 26  |%=Z%:E%!4=S%:..&|
00000d90  34 30 30 63 65 2c 2c 45  25 3a e7 28 45 25 21 32  |400ce,,E%:.(E%!2|
00000da0  34 80 31 3c 3c 32 33 29  3e 31 8c f2 45 28 22 52  |4.1<<23)>1..E("R|
00000db0  65 61 64 3a 20 22 2b a4  45 28 22 49 63 64 65 6c  |ead: "+.E("Icdel|
00000dc0  22 29 2c a3 29 3a 3d 22  22 0d 00 6b 0d 3d 24 28  |"),.):=""..k.=$(|
00000dd0  45 25 21 32 38 29 0d 00  6c 43 dd f2 59 28 5a 25  |E%!28)..lC..Y(Z%|
00000de0  2c 53 25 2c 66 79 2c 63  79 29 3a 21 45 25 3d 5a  |,S%,fy,cy):!E%=Z|
00000df0  25 3a 45 25 21 34 3d 53  25 3a 45 25 21 38 3d 63  |%:E%!4=S%:E%!8=c|
00000e00  79 3a 45 25 21 31 32 3d  66 79 3a c8 99 26 34 30  |y:E%!12=fy:..&40|
00000e10  30 63 64 2c 2c 45 25 3a  e1 0d 00 6d 2f dd a4 42  |0cd,,E%:...m/..B|
00000e20  28 52 24 29 3a ea 4d 24  3a 4d 24 3d a4 47 28 22  |(R$):.M$:M$=.G("|
00000e30  3a 22 2c 52 24 29 3a 4d  24 3d a4 47 28 22 2e 22  |:",R$):M$=.G("."|
00000e40  2c 4d 24 29 3a 3d 4d 24  0d 00 6e 41 dd a4 47 28  |,M$):=M$..nA..G(|
00000e50  45 24 2c 57 24 29 3a ea  4d 3a 4d 3d a7 57 24 2c  |E$,W$):.M:M=.W$,|
00000e60  45 24 29 3a c8 95 4d 3e  30 3a 57 24 3d c2 57 24  |E$):..M>0:W$=.W$|
00000e70  2c a9 28 57 24 29 2d 4d  29 3a 4d 3d a7 57 24 2c  |,.(W$)-M):M=.W$,|
00000e80  45 24 29 3a ce 3a 3d 57  24 0d 00 6f 34 dd f2 61  |E$):.:=W$..o4..a|
00000e90  3a ea 42 2c 60 3a c8 99  26 34 31 35 30 30 2c 2c  |:.B,`:..&41500,,|
00000ea0  58 24 2b 22 2e 4d 65 73  73 61 67 65 73 22 b8 42  |X$+".Messages".B|
00000eb0  2c 2c 60 3a e7 28 42 80  31 29 3d 30 8c 0d 00 70  |,,`:.(B.1)=0...p|
00000ec0  2c de 62 79 20 60 3a de  75 20 32 30 3a c8 99 26  |,.by `:.u 20:..&|
00000ed0  34 31 35 30 31 2c 75 2c  58 24 2b 22 2e 4d 65 73  |41501,u,X$+".Mes|
00000ee0  73 61 67 65 73 22 2c 62  79 0d 00 71 38 cc 3a f2  |sages",by..q8.:.|
00000ef0  45 28 22 48 65 79 2c 20  74 68 65 73 65 20 6d 65  |E("Hey, these me|
00000f00  73 73 61 67 65 73 20 61  72 65 20 61 6c 72 65 61  |ssages are alrea|
00000f10  64 79 20 69 6e 20 6d 65  6d 6f 72 79 2e 22 2c a3  |dy in memory.",.|
00000f20  29 0d 00 72 07 cd 3a e1  0d 00 73 79 dd a4 45 28  |)..r..:...sy..E(|
00000f30  50 24 29 3a ea 72 2c 4a  2c 55 24 2c 65 2c 73 3a  |P$):.r,J,U$,e,s:|
00000f40  de 4a 20 28 a9 28 50 24  29 2b 31 29 2a 32 3a 24  |.J (.(P$)+1)*2:$|
00000f50  4a 3d 50 24 2b 22 3a 22  2b 50 24 3a 3f 28 4a 2b  |J=P$+":"+P$:?(J+|
00000f60  a9 28 24 4a 29 29 3d 30  3a c8 99 26 34 31 35 30  |.($J))=0:..&4150|
00000f70  32 2c 75 2c 4a 2c 30 2c  30 2c 30 2c 30 2c 30 2c  |2,u,J,0,0,0,0,0,|
00000f80  30 b8 2c 2c 65 2c 73 3a  e3 72 3d 30 b8 73 2d 31  |0.,,e,s:.r=0.s-1|
00000f90  3a 55 24 2b 3d bd 28 65  3f 72 29 3a ed 3a 3d 55  |:U$+=.(e?r):.:=U|
00000fa0  24 0d 00 74 94 dd a4 5a  28 50 24 2c 4f 24 2c 54  |$..t...Z(P$,O$,T|
00000fb0  24 2c 61 24 2c 71 24 29  3a ea 72 2c 73 24 2c 55  |$,a$,q$):.r,s$,U|
00000fc0  24 2c 7a 2c 65 2c 73 3a  de 4a 20 28 a9 28 50 24  |$,z,e,s:.J (.(P$|
00000fd0  29 2b 31 29 2a 32 2c 7a  20 32 35 36 3a 24 4a 3d  |)+1)*2,z 256:$J=|
00000fe0  50 24 2b 22 3a 22 2b 50  24 3a 3f 28 4a 2b a9 28  |P$+":"+P$:?(J+.(|
00000ff0  24 4a 29 29 3d 30 3a c8  99 26 34 31 35 30 32 2c  |$J))=0:..&41502,|
00001000  75 2c 4a 2c 7a 2c 32 35  36 2c 4f 24 2c 54 24 2c  |u,J,z,256,O$,T$,|
00001010  61 24 2c 71 24 b8 2c 2c  65 2c 73 3a e3 72 3d 30  |a$,q$.,,e,s:.r=0|
00001020  b8 73 2d 31 3a 55 24 2b  3d bd 28 65 3f 72 29 3a  |.s-1:U$+=.(e?r):|
00001030  ed 3a 3d 55 24 0d 00 75  2f dd f2 6c 28 44 2c 50  |.:=U$..u/..l(D,P|
00001040  29 3a c8 99 26 34 30 30  64 32 2c 44 2c 50 2c 2d  |):..&400d2,D,P,-|
00001050  31 2c 2d 31 2c 2d 31 2c  a9 28 a4 4d 28 44 2c 50  |1,-1,-1,.(.M(D,P|
00001060  29 29 3a e1 0d 00 76 1e  dd a4 50 28 5f 24 29 3a  |)):...v...P(_$):|
00001070  24 56 3d 5f 24 3a 41 25  3d 56 3a d6 49 79 3a 3d  |$V=_$:A%=V:.Iy:=|
00001080  24 56 0d 00 77 2d dd f2  75 3a ea 4d 3a de 6f 20  |$V..w-..u:.M:.o |
00001090  32 35 36 3a 4d 3d 2d 34  3a f7 2b 31 3a f5 3a 4d  |256:M=-4:.+1:.:M|
000010a0  2b 3d 34 3a f3 6f 21 4d  3a fd 6f 21 4d 3d 30 0d  |+=4:.o!M:.o!M=0.|
000010b0  00 78 1e dc 20 32 2c 20  33 2c 20 38 2c 20 26 35  |.x.. 2, 3, 8, &5|
000010c0  30 32 2c 20 26 34 30 30  43 39 2c 20 30 0d 00 79  |02, &400C9, 0..y|
000010d0  05 e1 0d 00 7a 2e dd f2  74 28 4a 25 29 3a ea 58  |....z...t(J%):.X|
000010e0  79 2c 75 79 2c 6a 79 2c  72 3a 77 79 3d 45 25 21  |y,uy,jy,r:wy=E%!|
000010f0  34 3a 58 79 3d 45 25 21  31 36 3a c8 8e 58 79 ca  |4:Xy=E%!16:..Xy.|
00001100  0d 00 7b 09 c9 30 3a f2  4d 0d 00 7c 09 c9 32 3a  |..{..0:.M..|..2:|
00001110  f2 64 0d 00 7d 09 c9 33  3a f2 76 0d 00 7e 09 c9  |.d..}..3:.v..~..|
00001120  38 3a f2 72 0d 00 7f 17  c9 26 34 30 30 63 39 3a  |8:.r.....&400c9:|
00001130  e7 46 25 3c 3e 55 8c e0  3d 4d 25 0d 00 80 07 cb  |.F%<>U..=M%.....|
00001140  3a e1 0d 00 81 0d dd f2  72 3a e7 ac 57 8c e1 0d  |:.......r:..W...|
00001150  00 82 2a 45 25 21 31 32  3d 45 25 21 38 3a c8 99  |..*E%!12=E%!8:..|
00001160  26 34 30 30 65 37 2c 31  39 2c 45 25 2c 45 25 21  |&400e7,19,E%,E%!|
00001170  34 3a f2 56 28 55 29 3a  e1 0d 00 83 1a dd f2 76  |4:.V(U):.......v|
00001180  3a ea 44 24 2c 5a 24 3a  e7 45 25 21 31 32 3c 3e  |:.D$,Z$:.E%!12<>|
00001190  30 8c e1 0d 00 84 1d 5a  24 3d a4 43 28 45 25 2b  |0......Z$=.C(E%+|
000011a0  34 34 2c 30 29 3a 45 24  3d 5a 24 3a f2 49 3a e1  |44,0):E$=Z$:.I:.|
000011b0  0d 00 85 84 dd f2 49 3a  ea 4d 24 2c 4c 24 2c 63  |......I:.M$,L$,c|
000011c0  2c 51 2c 5a 2c 79 3a 4d  24 3d a4 42 28 45 24 29  |,Q,Z,y:M$=.B(E$)|
000011d0  3a 4c 24 3d c0 45 24 2c  a9 28 45 24 29 2d a9 28  |:L$=.E$,.(E$)-.(|
000011e0  4d 24 29 2d 31 29 3a 51  3d 30 3a f5 3a c8 99 31  |M$)-1):Q=0:.:..1|
000011f0  32 2c 31 32 2c 4c 24 2c  45 25 2c 31 2c 51 2c 31  |2,12,L$,E%,1,Q,1|
00001200  30 32 34 2c 4d 24 b8 2c  2c 2c 63 2c 51 3a fd 63  |024,M$.,,,c,Q:.c|
00001210  3e 30 84 51 3d 2d 31 3a  e7 51 3d 2d 31 8c f2 45  |>0.Q=-1:.Q=-1..E|
00001220  28 a4 45 28 22 57 68 61  74 46 69 6c 65 22 29 2c  |(.E("WhatFile"),|
00001230  30 29 3a e1 0d 00 86 25  e7 45 25 21 32 30 3d 34  |0):....%.E%!20=4|
00001240  30 39 36 8c f2 45 28 a4  45 28 22 59 75 63 6b 44  |096..E(.E("YuckD|
00001250  69 72 22 29 2c 30 29 3a  e1 0d 00 87 2f 5a 3d a4  |ir"),0):..../Z=.|
00001260  41 28 22 46 69 6c 65 72  5f 42 6f 6f 74 20 22 2b  |A("Filer_Boot "+|
00001270  45 24 29 3a 79 3d b9 3a  e7 a4 50 28 4d 24 29 3d  |E$):y=.:..P(M$)=|
00001280  22 2e 21 72 75 6e 22 8c  0d 00 88 1d 45 24 3d c0  |".!run".....E$=.|
00001290  45 24 2c a9 28 45 24 29  2d 35 29 3a 4d 24 3d a4  |E$,.(E$)-5):M$=.|
000012a0  42 28 45 24 29 0d 00 89  0e cc 3a c8 8e 45 25 21  |B(E$).....:..E%!|
000012b0  32 30 ca 0d 00 8a 13 c9  38 31 39 32 3a 44 24 3d  |20......8192:D$=|
000012c0  a4 50 28 4d 24 29 0d 00  8b 22 7f 3a 44 24 3d 22  |.P(M$)...".:D$="|
000012d0  66 69 6c 65 5f 22 2b a4  50 28 c3 7e 28 45 25 21  |file_"+.P(.~(E%!|
000012e0  32 30 29 29 3a 79 3d a3  0d 00 8c 05 cb 0d 00 8d  |20)):y=.........|
000012f0  4c cd 3a f2 41 28 45 2c  4e 79 2c 44 24 29 3a f2  |L.:.A(E,Ny,D$):.|
00001300  41 28 45 2c 77 2c 45 24  29 3a f2 59 28 45 2c 77  |A(E,w,E$):.Y(E,w|
00001310  2c 31 3c 3c 33 2c 2d 28  31 3c 3c 33 29 2a 28 a9  |,1<<3,-(1<<3)*(.|
00001320  28 45 24 29 3c 3d 33 39  29 29 3a e7 79 8c 45 24  |(E$)<=39)):.y.E$|
00001330  2b 3d 22 2e 21 52 75 6e  22 0d 00 8e 0b f2 5a 28  |+=".!Run".....Z(|
00001340  b9 29 3a e1 0d 00 8f aa  dd f2 65 3a c8 99 26 34  |.):.......e:..&4|
00001350  30 30 63 66 2c 2c 45 25  3a 45 25 21 32 30 3d 45  |00cf,,E%:E%!20=E|
00001360  25 21 31 32 3a 45 25 21  32 34 3d 45 25 21 31 36  |%!12:E%!24=E%!16|
00001370  3a 45 25 21 32 38 3d 45  25 21 30 3a 45 25 21 33  |:E%!28=E%!0:E%!3|
00001380  32 3d 45 25 21 34 3a 45  25 21 33 36 3d 32 30 34  |2=E%!4:E%!36=204|
00001390  38 3a 45 25 21 34 30 3d  34 30 39 36 3a 24 28 45  |8:E%!40=4096:$(E|
000013a0  25 2b 34 34 29 3d 22 53  51 a0 43 68 6f 69 63 65  |%+44)="SQ.Choice|
000013b0  73 22 3a 45 25 3f 35 34  3d 30 3a 21 45 25 3d 35  |s":E%?54=0:!E%=5|
000013c0  36 3a 45 25 21 31 32 3d  30 3a 45 25 21 31 36 3d  |6:E%!12=0:E%!16=|
000013d0  31 3a c8 99 26 34 30 30  65 37 2c 31 37 2c 45 25  |1:..&400e7,17,E%|
000013e0  2c 45 25 21 32 30 2c 45  25 21 32 34 3a e1 0d 00  |,E%!20,E%!24:...|
000013f0  90 31 dd f2 64 3a 41 24  3d a4 43 28 45 25 2b 34  |.1..d:A$=.C(E%+4|
00001400  34 2c 30 29 3a f2 41 28  45 2c 4b 2c 41 24 29 3a  |4,0):.A(E,K,A$):|
00001410  f2 6c 28 45 2c 4b 29 3a  f2 5a 28 b9 29 3a e1 0d  |.l(E,K):.Z(.):..|
00001420  00 91 43 dd f2 67 28 5a  24 29 3a ea 72 2c 6b 79  |..C..g(Z$):.r,ky|
00001430  2c 4f 2c 78 2c 5f 2c 4e  2c 47 3a c8 99 26 34 30  |,O,x,_,N,G:..&40|
00001440  30 64 39 2c 2c 5a 24 3a  c8 99 26 34 30 30 65 63  |0d9,,Z$:..&400ec|
00001450  2c 2d 31 2c 2d 31 b8 5f  2c 2c 47 3a e7 47 3c 3e  |,-1,-1._,,G:.G<>|
00001460  30 8c 0d 00 92 14 4e 3d  93 3a 61 79 3d 47 3a e0  |0.....N=.:ay=G:.|
00001470  3d 90 2b 5f 2b 47 0d 00  93 09 cc 3a 4e 3d 30 0d  |=.+_+G.....:N=0.|
00001480  00 94 2b cd 3a 45 3d a4  57 28 22 73 65 74 75 70  |..+.:E=.W("setup|
00001490  22 29 3a 55 3d a4 57 28  22 71 75 65 72 79 22 29  |"):U=.W("query")|
000014a0  3a e7 4e 3c 3e 30 8c e0  3d 4e 0d 00 95 0e c8 99  |:.N<>0..=N......|
000014b0  26 34 30 30 64 61 3a e1  0d 00 96 38 dd a4 57 28  |&400da:....8..W(|
000014c0  48 24 29 3a ea 4f 2c 4d  79 2c 66 2c 7a 2c 78 3a  |H$):.O,My,f,z,x:|
000014d0  c8 99 26 34 30 30 64 62  2c 2c 2d 31 2c 2c 2c 2c  |..&400db,,-1,,,,|
000014e0  48 24 2c 30 b8 2c 4d 79  2c 66 3a e7 4e 3d 30 8c  |H$,0.,My,f:.N=0.|
000014f0  0d 00 97 09 de 7a 20 4d  79 0d 00 98 09 cc 3a 7a  |.....z My.....:z|
00001500  3d 4e 0d 00 99 35 cd 3a  de 78 20 66 3a c8 99 26  |=N...5.:.x f:..&|
00001510  34 30 30 64 62 2c 2c 7a  2c 78 2c 78 2b 66 2c 2d  |400db,,z,x,x+f,-|
00001520  31 2c 48 24 2c 30 3a c8  99 26 34 30 30 63 31 2c  |1,H$,0:..&400c1,|
00001530  2c 7a b8 4f 3a 3d 4f 0d  00 9a 24 dd f2 56 28 5a  |,z.O:=O...$..V(Z|
00001540  25 29 3a 21 45 25 3d 5a  25 3a c8 99 26 34 30 30  |%):!E%=Z%:..&400|
00001550  63 62 2c 2c 45 25 3a f2  54 3a e1 0d 00 9b 16 dd  |cb,,E%:.T:......|
00001560  f2 54 3a c8 99 26 34 30  30 63 35 2c 2c 45 25 3a  |.T:..&400c5,,E%:|
00001570  e1 0d 00 9c 17 dd f2 6b  28 5a 25 29 3a 21 45 25  |.......k(Z%):!E%|
00001580  3d 5a 25 3a f2 6d 3a e1  0d 00 9d 1b dd f2 6d 3a  |=Z%:.m:.......m:|
00001590  ea 7a 2c 72 3a c8 99 26  34 30 30 63 36 2c 2c 45  |.z,r:..&400c6,,E|
000015a0  25 3a e1 0d 00 9e 80 dd  f2 4e 3a 41 24 3d a4 53  |%:.......N:A$=.S|
000015b0  28 a4 45 28 22 43 68 6f  69 63 65 73 22 29 2c 30  |(.E("Choices"),0|
000015c0  29 3a 43 24 3d a4 53 28  a4 45 28 22 4e 6f 72 6d  |):C$=.S(.E("Norm|
000015d0  22 29 2c 30 29 3a 53 24  3d a4 53 28 a4 45 28 22  |"),0):S$=.S(.E("|
000015e0  48 65 61 64 22 29 2c 30  29 3a 53 3d bb 28 a4 53  |Head"),0):S=.(.S|
000015f0  28 a4 45 28 22 53 69 7a  65 22 29 2c 2d 31 29 29  |(.E("Size"),-1))|
00001600  2f 31 36 3a 45 24 3d a4  53 28 a4 45 28 22 43 68  |/16:E$=.S(.E("Ch|
00001610  61 72 73 22 29 2c 30 29  3a f2 58 3a f2 5a 28 a3  |ars"),0):.X:.Z(.|
00001620  29 3a e1 0d 00 9f 74 dd  f2 6a 3a 43 24 3d 22 54  |):....t..j:C$="T|
00001630  72 69 6e 69 74 79 2e 4d  65 64 69 75 6d 22 3a 53  |rinity.Medium":S|
00001640  24 3d 22 48 6f 6d 65 72  74 6f 6e 2e 42 6f 6c 64  |$="Homerton.Bold|
00001650  22 3a 53 3d 31 35 3a 45  24 3d 22 52 65 73 6f 75  |":S=15:E$="Resou|
00001660  72 63 65 73 3a 24 2e 41  70 70 73 2e 21 43 68 61  |rces:$.Apps.!Cha|
00001670  72 73 22 3a 41 24 3d 22  3c 53 6d 61 72 74 51 75  |rs":A$="<SmartQu|
00001680  6f 74 65 73 24 44 69 72  3e 2e 53 51 a0 43 68 6f  |otes$Dir>.SQ.Cho|
00001690  69 63 65 73 22 3a e1 0d  00 a0 3a dd f2 58 3a f2  |ices":....:..X:.|
000016a0  41 28 45 2c 4c 2c 43 24  29 3a f2 41 28 45 2c 52  |A(E,L,C$):.A(E,R|
000016b0  2c 53 24 29 3a f2 41 28  45 2c 61 2c c3 28 53 29  |,S$):.A(E,a,.(S)|
000016c0  29 3a f2 49 3a f2 41 28  45 2c 4b 2c 41 24 29 3a  |):.I:.A(E,K,A$):|
000016d0  e1 0d 00 a1 42 dd f2 47  3a 43 24 3d a4 4d 28 45  |....B..G:C$=.M(E|
000016e0  2c 4c 29 3a 53 24 3d a4  4d 28 45 2c 52 29 3a 53  |,L):S$=.M(E,R):S|
000016f0  3d bb 28 a4 4d 28 45 2c  61 29 29 3a 45 24 3d a4  |=.(.M(E,a)):E$=.|
00001700  4d 28 45 2c 77 29 3a 41  24 3d a4 4d 28 45 2c 4b  |M(E,w):A$=.M(E,K|
00001710  29 3a e1 0d 00 a2 71 dd  f2 48 3a f2 53 28 41 2c  |):....q..H:.S(A,|
00001720  22 53 65 74 22 2c 22 4e  6f 72 6d 22 2c 43 24 29  |"Set","Norm",C$)|
00001730  3a f2 53 28 41 2c 22 53  65 74 22 2c 22 48 65 61  |:.S(A,"Set","Hea|
00001740  64 22 2c 53 24 29 3a f2  53 28 41 2c 22 53 65 74  |d",S$):.S(A,"Set|
00001750  45 76 61 6c 22 2c 22 53  69 7a 65 22 2c c3 28 53  |Eval","Size",.(S|
00001760  29 2b 22 2a 31 36 22 29  3a f2 53 28 41 2c 22 53  |)+"*16"):.S(A,"S|
00001770  65 74 22 2c 22 43 68 61  72 73 22 2c 45 24 29 3a  |et","Chars",E$):|
00001780  f2 44 3a e1 0d 00 a3 2a  dd f2 55 3a f2 53 28 41  |.D:....*..U:.S(A|
00001790  2c 22 53 65 74 4d 61 63  72 6f 22 2c 22 43 68 6f  |,"SetMacro","Cho|
000017a0  69 63 65 73 22 2c 41 24  29 3a f2 44 3a e1 0d 00  |ices",A$):.D:...|
000017b0  a4 4b dd f2 44 3a ea 5a  3a c8 99 39 2c 37 2c 41  |.K..D:.Z:..9,7,A|
000017c0  2c 45 25 2b 32 35 36 2c  2c 2c 32 35 36 3a d9 23  |,E%+256,,,256:.#|
000017d0  41 3a 5a 3d a4 41 28 22  53 65 74 54 79 70 65 20  |A:Z=.A("SetType |
000017e0  22 2b a4 43 28 45 25 2b  32 35 36 2c 30 29 2b 22  |"+.C(E%+256,0)+"|
000017f0  20 4f 62 65 79 22 29 3a  e1 0d 00 a5 8b dd f2 43  | Obey"):.......C|
00001800  3a ea 41 2c 5a 2c 41 79  2c 46 24 3a 46 24 3d 22  |:.A,Z,Ay,F$:F$="|
00001810  3c 57 69 6d 70 24 53 63  72 61 70 44 69 72 3e 2e  |<Wimp$ScrapDir>.|
00001820  51 75 6f 74 65 73 22 3a  5a 3d a4 41 28 22 43 44  |Quotes":Z=.A("CD|
00001830  69 72 20 3c 53 6d 61 72  74 51 75 6f 74 65 73 24  |ir <SmartQuotes$|
00001840  43 68 6f 69 63 65 73 44  69 72 3e 22 29 3a 41 3d  |ChoicesDir>"):A=|
00001850  a4 4a 28 22 3c 53 6d 61  72 74 51 75 6f 74 65 73  |.J("<SmartQuotes|
00001860  24 43 68 6f 69 63 65 73  44 69 72 3e 2e 22 2b a4  |$ChoicesDir>."+.|
00001870  45 28 22 46 69 6c 65 53  65 74 22 29 29 3a e7 41  |E("FileSet")):.A|
00001880  3c 3e 30 8c 0d 00 a6 06  f2 48 0d 00 a7 95 cc 3a  |<>0......H.....:|
00001890  5a 3d b9 3a f2 45 28 a4  5a 28 22 4e 6f 52 57 22  |Z=.:.E(.Z("NoRW"|
000018a0  2c a4 45 28 22 46 69 6c  65 53 65 74 22 29 2c 22  |,.E("FileSet"),"|
000018b0  3c 53 6d 61 72 74 51 75  6f 74 65 73 24 43 68 6f  |<SmartQuotes$Cho|
000018c0  69 63 65 73 44 69 72 3e  22 2c 22 22 2c 22 22 29  |icesDir>","","")|
000018d0  2b a4 5a 28 22 57 53 63  72 61 70 22 2c 46 24 2c  |+.Z("WScrap",F$,|
000018e0  22 22 2c 22 22 2c 22 22  29 2c 30 29 3a 41 79 3d  |"","",""),0):Ay=|
000018f0  a4 41 28 22 43 44 69 72  20 22 2b 46 24 29 3a 41  |.A("CDir "+F$):A|
00001900  3d a4 4a 28 46 24 2b 22  2e 22 2b a4 45 28 22 46  |=.J(F$+"."+.E("F|
00001910  69 6c 65 53 65 74 22 29  29 3a e7 41 3d 30 8c 0d  |ileSet")):.A=0..|
00001920  00 a8 2b f2 45 28 a4 5a  28 22 4e 6f 52 57 22 2c  |..+.E(.Z("NoRW",|
00001930  a4 45 28 22 46 69 6c 65  53 65 74 22 29 2c 46 24  |.E("FileSet"),F$|
00001940  2c 22 22 2c 22 22 29 2c  30 29 0d 00 a9 08 cc 3a  |,"",""),0).....:|
00001950  f2 48 0d 00 aa 05 cd 0d  00 ab 35 cd 3a 41 3d a4  |.H........5.:A=.|
00001960  4a 28 22 3c 53 6d 61 72  74 51 75 6f 74 65 73 24  |J("<SmartQuotes$|
00001970  44 69 72 3e 2e 22 2b a4  45 28 22 46 69 6c 65 43  |Dir>."+.E("FileC|
00001980  68 6f 22 29 29 3a e7 41  3c 3e 30 8c 0d 00 ac 06  |ho")):.A<>0.....|
00001990  f2 55 0d 00 ad 95 cc 3a  5a 3d b9 3a f2 45 28 a4  |.U.....:Z=.:.E(.|
000019a0  5a 28 22 4e 6f 52 57 22  2c a4 45 28 22 46 69 6c  |Z("NoRW",.E("Fil|
000019b0  65 43 68 6f 22 29 2c 22  3c 53 6d 61 72 74 51 75  |eCho"),"<SmartQu|
000019c0  6f 74 65 73 24 43 68 6f  69 63 65 73 44 69 72 3e  |otes$ChoicesDir>|
000019d0  22 2c 22 22 2c 22 22 29  2b a4 5a 28 22 57 53 63  |","","")+.Z("WSc|
000019e0  72 61 70 22 2c 46 24 2c  22 22 2c 22 22 2c 22 22  |rap",F$,"","",""|
000019f0  29 2c 30 29 3a 41 79 3d  a4 41 28 22 43 44 69 72  |),0):Ay=.A("CDir|
00001a00  20 22 2b 46 24 29 3a 41  3d a4 4a 28 46 24 2b 22  | "+F$):A=.J(F$+"|
00001a10  2e 22 2b a4 45 28 22 46  69 6c 65 43 68 6f 22 29  |."+.E("FileCho")|
00001a20  29 3a e7 41 3d 30 8c 0d  00 ae 2b f2 45 28 a4 5a  |):.A=0....+.E(.Z|
00001a30  28 22 4e 6f 52 57 22 2c  a4 45 28 22 46 69 6c 65  |("NoRW",.E("File|
00001a40  43 68 6f 22 29 2c 46 24  2c 22 22 2c 22 22 29 2c  |Cho"),F$,"",""),|
00001a50  30 29 0d 00 af 08 cc 3a  f2 55 0d 00 b0 05 cd 0d  |0).....:.U......|
00001a60  00 b1 0d cd 3a f2 5a 28  5a 29 3a e1 0d 00 b2 33  |....:.Z(Z):....3|
00001a70  dd a4 4a 28 5a 24 29 3a  ea 68 2c 42 3a c8 99 26  |..J(Z$):.h,B:..&|
00001a80  32 30 30 30 64 2c 31 32  38 2b 33 2c 5a 24 b8 68  |2000d,128+3,Z$.h|
00001a90  3b 42 3a e7 28 42 80 31  29 3e 30 8c 68 3d 30 0d  |;B:.(B.1)>0.h=0.|
00001aa0  00 b3 06 3d 68 0d 00 b4  3a dd f2 53 28 41 2c 49  |...=h...:..S(A,I|
00001ab0  24 2c 7a 24 2c 59 24 29  3a d5 23 41 2c 49 24 2b  |$,z$,Y$):.#A,I$+|
00001ac0  22 20 53 6d 61 72 74 51  75 6f 74 65 73 24 22 2b  |" SmartQuotes$"+|
00001ad0  a4 45 28 7a 24 29 2b 22  20 22 2b 59 24 3a e1 0d  |.E(z$)+" "+Y$:..|
00001ae0  00 b5 2d dd f2 42 3a ea  5a 2c 47 24 3a 47 24 3d  |..-..B:.Z,G$:G$=|
00001af0  a4 53 28 a4 45 28 22 43  68 6f 69 63 65 73 22 29  |.S(.E("Choices")|
00001b00  2c 30 29 3a e7 41 24 3c  3e 47 24 8c 0d 00 b6 1a  |,0):.A$<>G$.....|
00001b10  5a 3d a4 41 28 22 43 44  69 72 20 22 2b 41 24 29  |Z=.A("CDir "+A$)|
00001b20  3a e7 5a 3e 30 8c 0d 00  b7 1f f2 45 28 a4 45 28  |:.Z>0......E(.E(|
00001b30  22 4e 6f 43 44 69 72 22  29 2c 30 29 3a 41 24 3d  |"NoCDir"),0):A$=|
00001b40  47 24 3a f2 43 0d 00 b8  22 cc 3a 2a 43 44 69 72  |G$:.C...".:*CDir|
00001b50  20 3c 57 69 6d 70 24 53  63 72 61 70 44 69 72 3e  | <Wimp$ScrapDir>|
00001b60  2e 51 75 6f 74 65 73 0d  00 b9 a3 f2 4a 28 22 46  |.Quotes.....J("F|
00001b70  69 6c 65 43 68 6f 22 29  3a f2 4a 28 22 46 69 6c  |ileCho"):.J("Fil|
00001b80  65 44 69 70 22 29 3a f2  4a 28 22 46 69 6c 65 43  |eDip"):.J("FileC|
00001b90  68 61 22 29 3a f2 4a 28  22 46 69 6c 65 53 65 74  |ha"):.J("FileSet|
00001ba0  22 29 3a 5a 3d a4 41 28  22 57 69 70 65 20 22 2b  |"):Z=.A("Wipe "+|
00001bb0  47 24 2b a4 45 28 22 57  69 70 65 4f 70 74 22 29  |G$+.E("WipeOpt")|
00001bc0  29 3a 5a 3d a4 41 28 22  43 44 69 72 20 22 2b 41  |):Z=.A("CDir "+A|
00001bd0  24 29 3a f2 57 28 22 46  69 6c 65 43 68 6f 22 29  |$):.W("FileCho")|
00001be0  3a f2 57 28 22 46 69 6c  65 44 69 70 22 29 3a f2  |:.W("FileDip"):.|
00001bf0  57 28 22 46 69 6c 65 43  68 61 22 29 3a f2 57 28  |W("FileCha"):.W(|
00001c00  22 46 69 6c 65 53 65 74  22 29 0d 00 ba 05 cd 0d  |"FileSet")......|
00001c10  00 bb 55 cd 3a 5a 3d a4  41 28 22 53 65 74 4d 61  |..U.:Z=.A("SetMa|
00001c20  63 72 6f 20 53 6d 61 72  74 51 75 6f 74 65 73 24  |cro SmartQuotes$|
00001c30  43 68 6f 69 63 65 73 44  69 72 20 22 2b 41 24 29  |ChoicesDir "+A$)|
00001c40  3a 2a 57 69 6d 70 54 61  73 6b 20 3c 53 6d 61 72  |:*WimpTask <Smar|
00001c50  74 51 75 6f 74 65 73 24  44 69 72 3e 2e 43 68 6f  |tQuotes$Dir>.Cho|
00001c60  69 63 65 73 0d 00 bc 2c  2a 57 69 6d 70 54 61 73  |ices...,*WimpTas|
00001c70  6b 20 3c 53 6d 61 72 74  51 75 6f 74 65 73 24 43  |k <SmartQuotes$C|
00001c80  68 6f 69 63 65 73 44 69  72 3e 2e 53 65 74 75 70  |hoicesDir>.Setup|
00001c90  0d 00 bd 05 e1 0d 00 be  61 dd f2 4a 28 50 24 29  |........a..J(P$)|
00001ca0  3a ea 5a 2c 5a 24 3a 5a  24 3d a4 45 28 50 24 29  |:.Z,Z$:Z$=.E(P$)|
00001cb0  3a 5a 3d a4 41 28 22 43  6f 70 79 20 22 2b 47 24  |:Z=.A("Copy "+G$|
00001cc0  2b 22 2e 22 2b 5a 24 2b  22 20 3c 57 69 6d 70 24  |+"."+Z$+" <Wimp$|
00001cd0  53 63 72 61 70 44 69 72  3e 2e 51 75 6f 74 65 73  |ScrapDir>.Quotes|
00001ce0  2e 22 2b 5a 24 2b a4 45  28 22 43 6f 70 79 4f 70  |."+Z$+.E("CopyOp|
00001cf0  74 22 29 29 3a e1 0d 00  bf 61 dd f2 57 28 50 24  |t")):....a..W(P$|
00001d00  29 3a ea 5a 2c 5a 24 3a  5a 24 3d a4 45 28 50 24  |):.Z,Z$:Z$=.E(P$|
00001d10  29 3a 5a 3d a4 41 28 22  43 6f 70 79 20 3c 57 69  |):Z=.A("Copy <Wi|
00001d20  6d 70 24 53 63 72 61 70  44 69 72 3e 2e 51 75 6f  |mp$ScrapDir>.Quo|
00001d30  74 65 73 2e 22 2b 5a 24  2b 22 20 22 2b 41 24 2b  |tes."+Z$+" "+A$+|
00001d40  22 2e 22 2b 5a 24 2b a4  45 28 22 43 6f 70 79 4f  |"."+Z$+.E("CopyO|
00001d50  70 74 22 29 29 3a e1 0d  00 c0 40 dd a4 41 28 49  |pt")):....@..A(I|
00001d60  24 29 3a ea 6c 2c 42 3a  c8 99 26 32 30 30 30 35  |$):.l,B:..&20005|
00001d70  2c 49 24 b8 6c 3b 42 3a  e7 28 42 80 31 29 3e 30  |,I$.l;B:.(B.1)>0|
00001d80  8c f2 45 28 a4 43 28 6c  2b 34 2c 30 29 2c 30 29  |..E(.C(l+4,0),0)|
00001d90  3a 3d 21 6c 8b 3d 30 0d  00 c1 06 3d 30 0d 00 c2  |:=!l.=0....=0...|
00001da0  17 dd f2 5a 28 55 79 29  3a ea 51 24 3a e7 55 79  |...Z(Uy):.Q$:.Uy|
00001db0  3d 57 8c e1 0d 00 c3 23  57 3d 55 79 3a 51 24 3d  |=W.....#W=Uy:Q$=|
00001dc0  a4 45 28 22 54 69 74 6c  65 22 29 3a e7 57 8c 51  |.E("Title"):.W.Q|
00001dd0  24 2b 3d 22 20 2a 22 0d  00 c4 0e f2 6f 28 45 2c  |$+=" *".....o(E,|
00001de0  51 24 29 3a e1 0d 00 c5  39 dd f2 6f 28 5a 25 2c  |Q$):....9..o(Z%,|
00001df0  51 24 29 3a 21 45 25 3d  5a 25 3a c8 99 26 34 30  |Q$):!E%=Z%:..&40|
00001e00  30 63 63 2c 2c 45 25 2b  31 3a 24 28 45 25 21 37  |0cc,,E%+1:$(E%!7|
00001e10  36 29 3d 51 24 3a f2 77  28 5a 25 29 3a e1 0d 00  |6)=Q$:.w(Z%):...|
00001e20  c6 47 dd f2 77 28 5a 25  29 3a 21 45 25 3d 5a 25  |.G..w(Z%):!E%=Z%|
00001e30  3a c8 99 26 34 30 30 65  30 2c 2c 45 25 3a c8 99  |:..&400e0,,E%:..|
00001e40  26 34 30 30 64 31 2c 2d  31 2c 45 25 21 34 2c 45  |&400d1,-1,E%!4,E|
00001e50  25 21 31 36 2d 34 30 2c  45 25 21 31 32 2c 45 25  |%!16-40,E%!12,E%|
00001e60  21 31 36 3a e1 0d 00 c7  0b dd f2 46 3a e7 57 8c  |!16:.......F:.W.|
00001e70  0d 00 c8 09 f2 63 28 55  29 0d 00 c9 08 cc 3a f2  |.....c(U).....:.|
00001e80  4d 0d 00 ca 07 cd 3a e1  0d 00 cb 1f dd a4 53 28  |M.....:.......S(|
00001e90  4b 24 2c 64 79 29 3a ea  63 2c 67 3a e7 64 79 8c  |K$,dy):.c,g:.dy.|
00001ea0  67 3d 33 8b 67 3d 30 0d  00 cc 3a c8 99 26 32 30  |g=3.g=0...:..&20|
00001eb0  30 32 33 2c 22 53 6d 61  72 74 51 75 6f 74 65 73  |023,"SmartQuotes|
00001ec0  24 22 2b 4b 24 2c 45 25  2c 32 35 35 2c 30 2c 67  |$"+K$,E%,255,0,g|
00001ed0  b8 2c 2c 63 3a 45 25 3f  63 3d 31 33 3a 3d 24 45  |.,,c:E%?c=13:=$E|
00001ee0  25 0d ff                                          |%..|
00001ee3

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