P723 CEEFAX 723  Mon 20 Oct  21:12/15
|B2201202|a17TVPtint|j24BBBC332k|m40000|
p÷e÷X÷b÷q÷L"—+—E—)TV Program Print÷e÷X÷l
÷r÷L"—+—E—)By Darren Jackson÷e÷X÷v÷w÷L"—
+—E—)BBC Computer, Teletext÷e÷X(!÷L"—+—E
—)Epson Compatible Printer÷i÷X2$÷L"—)—E—
+Issue *FX6 for automatic LF÷e÷X<÷^÷C7÷e
÷XF÷b÷Jsetup÷e÷XP÷d÷Jtvprogs÷e÷XZ÷c÷5÷Js
etup÷e÷X#÷d÷6 sp% 20÷e÷Xd÷l÷G23;10,32;0;
0;0;÷e÷Xn÷j÷G2,1,27,1,64,3÷e÷Xx4÷I—20,0)
"TV Program Print bz Darren Jackson 04/8
6"÷e÷X—*)÷I—20,24)"Set Paper and Press '
TAB'"—e30÷e÷X—4÷d÷M÷U—N(-97)÷e÷X—>÷l÷I—2
0,0)"        "÷e÷X—H÷e*TELESOFT÷e÷X—R÷|—
*HON÷e÷X—\÷]÷9÷e÷X—f÷e÷5÷Jtvprogs÷e÷X—p÷
c÷;W*=1—|—8÷e÷X÷*÷h÷KC%,P%,S%,F%÷e÷X÷4B÷
?C*=5 ÷K C$:÷G31,0,24,2,1,10,1,13,1,27,1
,14:÷IC$"  ";:÷G3,30:÷=—5dR@÷e÷X÷>'÷I—26
,24)"Searching for Page ";P%;—e30÷e÷X÷H÷
n÷Joscli("CH"+—k(C%))÷e÷X÷R÷p÷Joscli("PA
GE"+—k(P%)I÷e÷Y÷\÷i*TRANSFER7700÷e÷Y÷f÷h
*DISPLAY7700÷e÷Y÷p÷h÷Jdump(S%,F%)÷e÷Y"÷]
÷E÷e÷Y,÷a*HOFF÷e÷Y6÷a*DISC÷i÷Y@[÷G2,1,10
,1,10-1,10,1,10,1,10,1,10,1,10,1,10:|c  
                                        
                                        
   P723 CEEFAX 723  Mon 20 Oct  21:15/40
|B2202202|a17TVPtint|j24BBBC332k|m402BD|
p÷G3,12:÷I"Printing of TV Programs Compl
ere"'''÷e÷YJ÷]÷8÷e÷YT÷]÷9÷e÷Y^÷i÷5÷Jdump
(T*,G%)÷e÷Yh÷^÷G2÷e÷Yr÷q÷;X%=T**40 —|— G
J*40 —040÷e÷Y||÷f÷G1,10,1,13÷e÷Y—.÷j÷;Y%
=X* —|— X*+40÷e÷Y—8÷jV%=?(&7C00+Y%)÷e÷Y—
B÷h÷?V%<32 V%=32÷e÷Y—L÷r÷?V%>126 —( V%<1
60 V%=32÷e÷Y—V÷v÷?V%>159 —( V%<255 V%=V%
-128÷e÷Y—|—÷i÷?V%=255 V%=64÷e÷Y—j÷a÷G1,V
*÷e÷Y—t÷]÷E÷e÷Y÷.÷]÷E÷e÷Y÷8÷^÷G5÷e÷Y÷B÷]
÷9÷e÷Y÷V—^÷4 5,0,0,0,"BBC 1",1,1780001,8
,21,1,1780002,8,21,1,1780003,8,21,5,0,0,
0,"BBC 2",1,1780004,8,21,1,1780005,8,21,
u,0,0,0,"ITV",3,2170001,5,17,3,2170002,5
,17,5,0,0,0,"CH 4",4,415,5,21÷e÷Z÷|—÷g÷5
÷Joscli(X$)÷e÷Z÷j($up*=X$:X*=sp%—+256:Y%
=sp*—)256:÷.&FFF7÷e÷Z÷t÷]÷9÷e÷W|c