P704 CEEFAX 7p4  Tue 19 Jun  20:34/29
|B2201201|a16LOADER|i24BBBC316k|s÷#1÷e|s
÷Z032700 REM TELESOFTWARE DOWNLGADER 327
01 REM (c) ACORN COMPUTERS LTD 327p2 *TE
LESOFT 32703MO.7:DIMn$(8),p$(8I 32704n$(
0)=bMUSIC7":nd(1)="MUSIC8":n$(2)="DEMW":
n$(3)="CON4b:n$(4)="METALS":n$(5)="IONIC
b:n$(6)="MFILE41b:n$(7)="MFILE42":n$(8)=
bAREAS41" 32705pd(0)="705":p$(1)="705b:p
dX2)="7p6b:p$(3I="707":p$(4)="708":p$(5)
="708b:p$(6)="709":p$(7)="709b:p$(8)="70
:" 32706max=8 32707*HON 32708 P.TAB(9,5)
CHR$142+b—)TFLESOFTWARE DOWNLOADER" 3270
9 P.-AB(9,6)CHR$141+b—)TELESOFTW—RE DWWN
LOADE$$ 3272p P.5ABX8,10[bq* Prius     P
rogram   Page"CHR$10 32711F.i=0TGmax:PVT
PC(10);CHR$(e+ASCX"a")),n$(i),p$(i):N. 3
2712REP.C=(GETOR32):U.(C>=ARC("a")) A.(C
<=ARC("a")+max) 32713*HOFF 32714CLS 3271
5PROC#oX"PAGE "+p$(C-ARC("a")I) 32716PRO
C#o("EXEC "+nd(C-ASCX"a"))) 32717PROC#o(
bBASIC ") 32718DEFPROC#o(E$) 32719LOC.F 
32720DIMF LEN(F$) 32721dF=F$:X*=F MOD256
:Y%=F DIV256:CA.&FFF7 32722E. |c