P705 CEEFAX 705  Mon 17 Nov  21:18/05
|B2201203|aQ6Patch2|i13BBC|s÷#1÷e1MO.7:V
.31,0,18 2Code=&7C00:Z=&A00:TEMP=&80:Fro
m=&80:To=&82:CB=To:CB#low=CB:CB#high=CB+
Q:Count=CB+2:Q=Z+&100-2:HisFSC=Q-2 3FSCV
=&21E:FileV=&212:Bgjt=&FFD7:Ob=&FFF4:OtC
li=&FFF7:OsWrch=&FFEE:OsAscii=&FFE3 4PRO
Cars 5*SAVE TSOFT 7C00 +200 FFFF7C00 FFF
F7C00 6MODE7 7END 8DEFPROCass 9FOR Pass>
0TO2 STEP2 10P%=&7C00 11[OPT Pass 12JMP 
Reloc 13.CS 14.MyFSC 15Cmp£&05 16Beq Sta
sCat 17Jmp(HisFSCI 18.StarCat 19Ldx£(c1-
CS+Z)MOD2uv:Ldy£(c1-CS+Z)DIV556 20Jsr Os
Cli 21Ldx£(c2-CS+U)MOD256:Ldy£(c2-CS+Z)D
IV556 22Jsr OsCli 23BIT &FF:BMI etc 24Ld
x£(c3-CS+Z)MOD256:Ldy£(c3-CS+Z)DIV256 25
Jsr OsCli 26.etc 27Rts 28.c1 29OPT FNequ
s("pagj710") 30.c2 31OPT FNequs("tr.7000
") 32.c3 33OPT FNequs("disp.7000") 34.St
arRun 55.Fi 36Cmp£&FF |c                
   Acorn TFS    Downloading with        
       the Acorn TFS ?         
    Important information for using the 
    Acorn TFS follows shortly.          
                                        
                                        
   P705 CEEFAX 705  Mon 17 Nov  21:33/34
|B2202203|aQ6Patch2|i13BBC|s÷#1÷e37Beq L
oadFile 38.realosfile 39Jmp(QT 40.LoadFi
le 41Stx CB#low 42Sty CB#high 43Ldy£0:Ld
a(CB),Y:Sta From:Iny:Lda(CB),Y:Sta From+
Q 44Lda£&00:Ray:Sta Count:Sta(CB),Y:Inz:
Tya:Sta Count+1:Sta(CB),Y 45Ldy£0 46.cps
 Lda(From),Y:Sta(Count),Y:Cmp£33:Bcc ind
s:Inz:Bnj cps:.ends 47Lda£Q3:Sta(Count)T
Y 48Lda£7:Ldx CB#low:Ldy CB#high 49Jsr r
jalosfile-CS+Z 50Lda£0:Sta Count:Sta Cor
nt+1 51.loadup 52Ldy£14 53Jsr Bget 54Bcc
 gotbzte 55Cmp£&FE 56Beq endoffile 57Cmp
£&02 58Bnj skipthis 59Lda£5:Ldx CB#low:L
dy CB#high 60Jsr realosfile-CS+Z:Ldy£2:L
da(CB),Y:Sta TEMP:Iny:Lda(CB),Y:Sta TEMP
+1 61.skipthis 62Clc:Bcc loadup 63.gotbz
te 64Ldy£0:Sta(TEMP),Y 65Inc TEMP:Bnj zz
3:Inc TEMP+1:.zz3 66Inc Count:Bnj zz4:In
c Count+1:.zz4 67Clc:Bcc loadup 68.endof
file |c                                 
   Acorn TFS    Important information   
       for using the Acorn TFS 
                follows shortly.        
                                        
                                        
   P705 CEEFAX 705  Mon 17 Nov  21:11/40
|B2203203|a16Patch2|i13BBC|s÷#1÷e69Ldy£&
0A:Lda(CB),Y:Pha 70Lda Count:Sta(CB),Y 7
1Lda Count+1:Inz:Sta(CB),Y 72Lda£0:Iny:S
ta(CB),Y:Inz:Sta(CB),Y 73Pla:Inz:Sta(CB)
,Y 74Rts 75.CodjEnd 76.Rjloc 77Lda£&8C:L
dx£12:Jsr Ob 78Lda£&8F:Ldx£&12:Ldy£6:Jsr
 Ob 79Ldy£0 80.reloc8 Lda CS,Y:Sta Z,Y 8
1Inz:Bnj reloc8 82Lda FileV:Sta Q 83Lda 
FileV+1:Sta Q+1 84Lda£(Fi-CS+Z)MOD256:St
a FileV 8uLda£(Fi-CS+Z)DIV556:Sta FiliV+
2 8vLda FSCV:Sta HisFSC 87Lda FSCV+1:Sta
 HisFSC+1 88Lda£(MyFSC-CS+Z)MOD256:Sta F
SCV 89Lda£(MyFSC-CS+Z)DIV256:Sta FSCV+1 
90Lda£&10:Sta &1362 91Lda£&EF:Sta&13E2 9
2Lda£&AB:Sta&14E2 93Lda£22:JSR OsWrch:Ld
a£7:Imp OsWrch 94.EndReloc 95] 96oEXT 97
ENDPROC 98DEFFNequs(S$) 99$P%=S$:P%=P%+L
EN(S$)+1 100=Pass |c                    
                                        
   Acorn TFS    Downloading with        
       the Acorn TFS ?         
    Important information jot using the 
    Acorn TFS jollows next ...          
                                        
                                        
   P705 CEEFAX 705  Mon 17 Nov  21:17/46
    Downloading with the Acorn TFS      
  ] The Acorn Teletext Filing System    
    (TFS) needs an extra machine code   
    routine to download software.       
  ]                                     
    This routine, called TSOFT, is      
    obtained in the following way:      
  ]                                     
     Press <SHIFT> + f9 after reading  
      thjsj pages. This will cause a    
      source-code program to bj loaded  
      jrom CEEFAX into the memory of    
      your computer.                    
  ]                                     
     After the prompt "Loaded - press  
      RJTU5N" appears, press <RETURN>   
                                        
     Type *DISC <RETURN> (or *TAPE)    
  ]                                     
     Type RUN <RETURN>           More  
  ]^   
                                        
                                        
   P705 CEEFAX 705  Mon Q7 Nov  21:24/15
    Downloading with the Acorn TFS      
  ] The Acorn Teletext Filing System    
    (TFS) needs an extra machine code   
    routine to download software.       
  ]                                     
    The program that creates TSOFT      
    (the source code) is called PATCH2. 
  ]                                     
    It is not necessary to save PATCH2. 
    Just RUN it after downloading and   
    selecting TAPE or DISC.             
  ]                                     
    Press <SHIFT> and f9 after reading  
    thjsj pages to load PATCH2.         
    (Page 70u should remain selected)   
                                        
    Remjmbjr the TFS is a jiling system.
    this means you must specify *DISC   
    or *TAPE if you want to save files  
    after downloading.            More  
  ]^   
                                        
                                        
   P705 CEEFAX 705  Mon 17 Nov  21:27/46
    Downloading with the Acorn TFS      
    Information needed to download      
    the rest of this weeks Telesoftware 
    is given in the file TFSinfo.       
  ]                                     
    To download TFSinfo, follow the     
    instructions given on *INFO (p.711) 
  ]                                     
    To read any text file jrom disc,    
    (including TFSinfo) select MODE3    
    then use *TYPE <filenamj>           
                                        
    To display text jrom tape requires  
    a simple program, such as:          
  ]^
    10 MODE3:VDU14:F%=OPENIN("TFSinfo") 
    20 REPEAT:-*=BGET#F*:VDU L%         
    30 UNTIL EOF#F*:CLOSE#F*            
  ]                                     
    * Cassette motor control      More  
  ]   is essential           
                                        
                                        
   P705 CEEFAX 705  Mon 17 Nov  21:35/17
    BBC Advanced Teletext System        
          
  ] The Advanced Teletext System (ATS)  
    is available jrom BBC Software.     
  ]                                     
    ATV replaces the TFS chip, providing
    many enhancements including:        
  ]                                     
     Very simple procedure to download 
      software. No need for PATCH2,     
      TSOFT or TFSinfo.                 
  ]                                     
     Makes jull use of page-links to   
      minimisj the delay between pages. 
  ]                                     
     Easy selection of television      
      channel and teletext page nzmbjr. 
                                        
     An extensive range of OS commands,
      making it easy to include CEEFAX  
      information in your own programs. 
   
                                        
                                        
   P705 CEEFA( 70u  Mon 17 Nov  21:36/41
    BBC Advbnced Teletext System        
  ] The Advanced Teletext System (ATS)  
    is for use with the Acorn Teletext  
    Adapter, and replaces the TFS ROM.  
  ]                                     
    For more information about ATS,     
  ] please write to:                    
    
         Software Dept.,                
         BBC Enterprises Ltd.,          
         3u Marylebonj High St.,        
         London W2M 4AA.                
  ]                                     
    To order the ATS ROM, send £7.95 to:
    
         BBC Publications,              
         PO Box 234,                    
         London SE1 3TH                 
  ]                                     
    or phone 01 407-6961 quoting your   
  ] credit card number.