P723 CEEFAX 723  Mon 27 Oct  21:11/31
|B2201205|a17AutoLd2|i24BBBC332k|m40000|
p÷e÷X÷b÷v÷L"—)Telesoftware Downloadjr÷e÷
X÷l÷j÷L"—)Version 1.2÷e÷X÷v÷r÷L"—)(c) Jj
ff Booth 1986÷e÷X(÷r÷L"—)Downloads all f
iles÷e÷X2!÷L"—)that are in the catalogue
.÷e÷X<)÷L"—)Thanks to Graham B for advic
e!÷e÷XF÷t÷C7:÷G23;8202;0;0;0;:*F(18÷e÷XP
^*KEY0F.A%=(TOP-PA.)TO0S.-4:A%!(PA.+&400
)=A%!PA.:N.||MPA.=PA.+&400||MO.||MDEL.0,
110||MV.6:RUN||M÷e÷XZ÷#÷G21÷e÷Xd÷h*F(138
 0 128÷i÷Xn÷]÷8÷e÷Xx÷]:÷e÷X—*÷d*FX200 3÷
e÷X—4÷a*FX18÷e÷X—>÷hCat=(—8-&400)÷e÷X—H÷
c÷6M%&3FF÷e÷X—R÷c÷6temp 6÷e÷X—\÷c÷6page 
1÷e÷X—f÷f÷6subcodj 2÷e÷X—p÷g÷6ctrlbits 1
÷e÷X÷*÷iParam=M%+&300÷e÷X÷4÷qFile=M%+&10
0:$File=""÷e÷X÷>÷cCode=M%÷e÷X÷H÷|—÷JARS÷
e÷X÷R.÷;A=5—|—6:÷I—29,A);—e141;"—+Findin
g  catalogue":÷E÷e÷Y÷\÷b*TTXON÷e÷Y÷f÷|—*
HON÷e÷Y÷p÷a*BBC2÷e÷Y"÷d÷JFINDCAT÷e÷Y,<Pa
ge=M%+&200:Page=?ctrlbits/8—*Current#Pa
ge:Page?1=?page÷e÷Y6÷w÷;A=5—|—6:÷I—29,A)
;—e141;"—+Loa":÷E÷e÷Y@÷t÷JLOAD:Param?13=
0:÷.OSWORD÷e÷YJ÷fA%=0:top=0÷e÷YT÷]÷M|c  
                                        
                                        
   P723 CEEFAX 723  Mon 27 Oct  21:03/18
|B2202205|a17AutoLd2|i24BBBC332k|m402C4|
p÷e÷Y^÷aA$=""÷e÷Yh÷c÷;a%=0—|—2÷e÷Yr÷pA$=
A$+—e(A%?(a%+Cat))÷e÷Y||÷]÷E÷e÷Y—.÷k÷?A$
="***"—4top=1÷e÷Y—8*÷?A$="BBC"—(?((A%+Ca
t)-1)=3—4÷JDETAILS(A%)÷e÷Y—B÷r÷?A$="ANY"
—4÷TDETAILS(A%)÷e÷Y—L÷cA%=A%+1÷e÷Y—V÷b÷U
top>0÷e÷Y—|—÷c÷C7:*HON÷e÷Y—j÷uFile=M%+%1
00:Page=M%+&200÷e÷Y—t÷]÷M÷e÷Y÷.÷^÷C7÷e÷Y
÷8÷k÷G23;8202;0;0;0;÷e÷Y÷B÷uFile=File+10
:Page=Page+10÷e÷Y÷L÷hFile$="":F=0÷e÷Y÷V,
÷M:File$=File$+—e(File?F):F=F+1:÷UFile?F
=&D÷e÷Z÷|—÷s÷?File$="FINISHED"—4÷=—5dbD÷
e÷Z÷j(÷I—20,5);"—+Searching for ";File$;
"..."÷e÷Z÷t÷i÷JLOAD:÷.OSWORD÷e÷Z&÷^÷U.÷e
÷Z0÷b÷5÷JLOAD÷e÷Z:÷e?Param=24÷e÷ZD÷lPara
m?1=File—+256÷e÷ZN÷lParam?2=File—)256÷e÷
ZX÷jParam?3=Page?5÷e÷Zb÷jParam?4=Page?4÷
e÷Zl÷jParam?5=Page?3÷e÷Zv÷jParam?6=Page?
2÷e÷Z—(÷jParam?7=Page?9÷e÷Z—2÷jParam?8=P
age?8÷e÷Z—<÷jParam?9=Page?7÷e÷Z—F÷kParam
?10=Page?6÷e÷Z—P÷jParam?11=?Page÷e÷Z—Z÷k
Param?12=Page?1÷e÷Z—d÷fParam?13=1÷e÷Z—n÷
fParam?14=0÷e÷Z÷(÷]÷9÷e÷Z÷2÷a÷5÷JARS|c  
                                        
                                        
   P723 CJEFAX 723  Mon 27 Oct  21:27/36
|B2203205|b17AutoLd2|i24BBBC332k|m40579|
p÷e÷Z÷<÷g÷;PASS=0—|—2—02÷e÷Z÷F÷cP%=Code÷
e÷Z÷P÷d[OPTPASS÷e÷[÷Z÷c.OSWORD÷e÷[÷d÷iLD
X£Param—+256÷e÷[÷n÷iLDY£Param—)256÷e÷[ ÷
cLDA£&7A÷e÷[*÷dJMP&FFF1÷e÷[4÷b.START÷e÷[
>÷dLDA temp÷e÷[H÷dSTA page÷e÷[R÷fLDA rem
p+1÷e÷[\÷aASL A÷e÷[f÷aASL A÷e÷[p÷aASL A÷
e÷[z÷aASL A÷e÷[—,÷c—,A page÷e÷[—6÷dSTA p
age÷e÷[—@÷fLDA temp+2÷e÷[—J÷iSTA subcode
+1÷e÷[—T÷fLDA temp+3÷e÷[—^÷#—(£7÷e÷[—h÷a
ASL A÷e÷[—r÷aASL A÷e÷[÷,÷aASL A÷e÷[÷6÷aA
SL A÷e÷[÷@÷h—,A subcode+1÷e÷[÷J÷iSTA sub
code+1÷e÷[÷T÷fLDA temp+4÷e÷\÷^÷gSTA subc
ode÷e÷\÷h÷fLDA temp+5÷e÷\÷r÷#—(£3÷e÷\$÷a
ASL A÷e÷\.÷aASL A÷e÷\8÷aASL A÷e÷\B÷aASL 
A÷e÷\L÷f—,A subcode÷e÷\V÷gSTA subcode÷e÷
\|—÷fLDA temp+3÷e÷\j÷#—(£8÷e÷\t÷hSTA ctr
lbits÷e÷\|÷÷fLDA temp+5÷e÷\—0÷|——(£12÷e÷
\—:÷aASL A÷e÷\—D÷aASL A÷e÷\—N÷g—,A ctrlb
its÷e÷\—X÷hSTA ctrlbits÷e÷\—b÷#RTS÷e÷\—l
÷]]÷e÷\—v÷]÷E÷e÷\÷0÷]÷9÷e÷\÷:÷c*TTXOFF÷e
÷\÷D÷^÷C7÷e÷\÷N÷b*BASIC÷e÷]÷X÷]÷9÷e÷]÷b÷
g÷5÷Joscli(A$)÷e÷]÷l÷b÷BI%,B$÷e÷]÷v÷f|c 
                                        
                                        
   P723 CEEFAX 723  Mon 27 Oct  21:14/54
|B2204205|b17AutoLd2|i24BBBC332k|m407F9|
p÷6I%—Q(A$)+1÷e÷](÷b$I%=A$÷e÷]2÷eX%=I%—+
256÷e÷]<÷eY%=I%—)256÷e÷]F÷b÷.&FFF7÷e÷]P÷
]÷9÷e÷]Z÷^÷C7÷e÷]d÷c*TTXOFF÷e÷]n÷b*BASIC
÷e÷]x÷e÷5÷JFINDCAT÷e÷]—*÷h÷)=0:÷M:÷U—:>1
00÷e÷]—4÷fParam?0=15÷e÷]—>÷c÷.OSWORD÷e÷]
—H*÷Joscli("PAGE "+—k(Param?1*100+Param?
2I)÷e÷]—R÷rCurrent#Page=(Param?1)÷e÷]—\÷
f*DATA 5000÷e÷]—f÷dSearch=0÷e÷]—p÷]÷M÷e÷
]÷*÷lSearch=Search+42÷e÷]÷4£÷USearch?&50
00=2—(Search?&5001=27÷e÷]÷>÷t÷JDE#HAM(—k
(Search?&5002))÷e÷]÷H÷g÷?A%<>0—4—5dHE÷e÷
]÷R÷rSearch=Search+&5000+27÷e÷^÷\÷k÷;Lin
k#bytes=0—|—5÷e÷^÷f!÷JDE#HAM(—k(Link#byt
es?Search))÷e÷^÷p÷nLink#"ztes?temp=A%÷e÷
^"÷]÷E÷e÷^,÷b÷.START÷e÷^6÷]÷9÷e÷^@÷g÷5÷J
oscli(A$)÷e÷^J÷b÷BI*,B$÷e÷^T÷f÷6I%—Q(A$)
+1÷e÷^^÷d$I*=A$÷e÷^h÷eX*=I%—+256÷e÷^r÷eY
%= *—)256÷e÷^||÷b÷.%FFF7÷e÷^—.÷]÷9÷e÷^—8
÷h÷5÷JDE#HAM(A$)÷e÷^—B÷fParam?0=25÷e÷^—L
÷iParam?1=—c(A$)÷e÷^—V÷c÷.OSWORD÷e÷^—|—÷
iA%=Param?2—(&F÷e÷^—j÷]÷9÷e÷^—t÷n÷5÷EDIT
AILS(Search*)÷e÷^÷.÷uFile=File+10:Pa|c  
                                        
                                        
   P723 CEEFAX 723  Mon 27 Oct  21:14/12
|B2205205|b17AutoLd2|i24BBBC332k|m40A97|
poe=Page+10÷e÷^÷8÷qSearch%=Search%-1+Cat
÷e÷^÷B Search%=?(Search%)+Search%+1÷e÷^÷
L÷jtemp1=?Search%÷e÷^÷V÷dtemp$=""÷e÷#÷|—
÷v÷;F=Search%+2—|—Search%+temp1÷e÷#÷j-te
mp2=—?(—e(?F)):÷?temp2>&60—4temp2=temp2-
&20÷e÷#÷t÷primp$=temp$+—e(temp2)÷e÷#&÷]÷
E÷e÷#0÷g$File=temp$÷e÷#:÷sSearch%=Search
J+temp1+1÷e÷#D Search%=?(Search%)+Search
%+1÷e÷#N Search%=?(Search%)+Search%+1÷e÷
#X÷sPake?2=?Search%÷e÷#b÷lPage?3=Search%
?1÷e÷#l÷lPage?4=Search%?2÷e÷#v÷lPage?5=S
earch%?3÷e÷#—(÷lPage?6=Search%?4÷e÷#—2÷l
Page?7=Search%?5÷e÷#—<÷lPage?8=Search%?6
÷e÷#—F÷lPage?9=Search%?7÷e÷#—P÷lPage?1=S
earch%?9÷e÷#—Z÷k?Page=Search%?8÷e÷#—d÷q$
(File+10)="FINISHED"÷e÷#—n÷]÷9÷e÷W|c