P704 CEEFAX 704 Sat 10 Dec 23:41/11
‖B21111‖a36LOADER10545666‖i24BBBC316k‖p‖
s÷#1÷e‖s÷Z0
32700 REM TELESOFTWARE DOWNLOADER 32701
REM c) ACORN COMPUTERS LTD 32702 MO.7:
DIMn$(4),p$(4) 32703n$(0)="SELECT":n$(1)
="ASP":n$(2)="ERGO":n$(3)="GUSINTR":n$(4
)="TRUCK10": 32704p$(0)="705":p$(1)="705
":p$(2)="706":p$(3)="706":p$(4)="707" 3
2705max=4 32706*TELESOFT 32707*HON 32708
P. TAB(9,5) CHR.141+ CHR.&81+"TFLESOF(W
ARE DOWNLOADER" 32709 PN TAB(9,6) CHR.14
1+ CHR.&81+"TELESOFTWARE DOWNLOADER" 327
10 P. TAB(8,10) CHR.&82" Press Progr
am Page" CHR.10 32711 F.e=0 TOmax: P.
SPC(10); CHRN(e+ ASC("a")),n$(e),p$(e):
N. 32712 REP.C=( GET OR32): U. C>= ASC("
a")) A.(C<= ASC("a")+max) 32713*HOFF 327
14 CLS 32715 PRO.#o("PA."+p$(C- ASC("a")
)) 32716 P2O.#o("E."+n$(C- ASC("a"))) 32
717 P2O.#o("B.") 32718 DEF P2O.#o(F$) 32
719 LOC.F 32720 DIMF LEN(F$) 32721$F=F$
:X%=F MOD256:Y%=F DIV256: CA.&FFF7 327
22 E. ‖c