P730 CEEFAX 730 Wed 27 Jan 21:10/11 |B2201204 91÷X|s—:1 LE LF $FLEPRINTER LISTING LNE M R LNF -2-1987 LNE LF FL —U—E—) F BBCB B MASTER PLU —E—) W DFS  ADFS ZLUE W TFS  ATS LUE  SEC OND PROCESSOR ATS LE L "—,—E LF TYPE TI F r LE F   |—÷L"—,—E H] RLUE Z P ge A D \A xt=&8C:f=&8E ] LES E A D  0:end=&6600 ]  H ÷]: RLUE ode A D Y ÷\÷dP%=&6600 Y] YK[OPT LDY £0:STYf:SEI:.L1 LDAAYSTAYLDA nit+6,Y:STA&22A,Y YYINYCPYBNELC LI:RTS:.ins2 LDYBECPXBNE CPY£3:BNEB1:SEC:RTS:.B1 LDYSTA Y 9INY:STYf:PHA:LDYins:LDAins+1:JSRS:S|c
P730 CEEFAX 730 Wed 27 Jan 20:00/03 |B2202204<—16TPrint s—91÷X|s—:1 TAins+1:STYins:@LA:INCext:BN EB2:INCext+1 YALDY   ):CPYext+1:BNEB2:STXf:.B2 CLCRT  JMP(ins1):&rfm2 PH :LDYf:BE APXB NEold2:CPY£2:BNEB3:PLP:SEC:RTS:.B3 LDY :LDA(rdm),Y:PLP:BVSB2:INY:STYf:PHA:LDYrd m:LDArem+1:JS SSTASTYPLADEC xt:BNEB4 YLDYBNEBINCBPLB .B4 LDYINYBNEBDECB TAYCL C:RTS0 old2 PLPJMP PHPAPX 127:BEQflsh:LDA£0:CPX£126:BNEB6:STAf:PLP :RTS: B6 CMP BEQCPXBNEPLP PHP:BVCB7 Y@#PLP ÷YJ÷#RTS YTB L 8STAins Y:INY0CPY£6:BNEL2:CLI:PLA: @Y:P LP:RTS:.B7 PLPPHPBCCBSBCTAXLDA ((end-start)—)236):SBCext+1:DAY:PLP:RTS: B8 LDXLDY@L@RTS PLPHD P cnt1):.S INYBNEBCLC Y^ADACM@ end BNEBLDA  B R TS:.init:] Y] YPP start:!(P%+6)=ins2:!(P%S8)=rdm2:!(P%|c
P730 CEEFAX 730 Wed 27 Jan 21:01/05 |B2202204 s—91÷X|s—:1 TAins+1:STYins:PLA:INCext:BN EB2:INCext+1 YALDY  ):CPYext+1:BNEB2:STXf:.B2 CLCRTS JMP(ins1):.rfm2 PHPLDYBE CPXB NEold2:CPY£2:BNEB3:PLP:SEC:RTS:.B3 LDY :LDA(rem),Y:PLP:BVSB2:INY:STYf:PHA:LDYre m:LDArem+1:JSRS:STArem+1:STYrfm:PLA:DECe xt:BNEB4 YLDYBNEBINCBPLB .B4 LDYINYBNEBDECB TAYCL C:RTS:.old2 PLPJMP PHPCPX 127:BEQflsh:LDA£0:CPX£126:BNEB6:STAf:PLP :RTS:.B6 CMPBE CPXBNEPLP PHP:BVCB7 Y@#PLP YJ#RTS YTB L DA£2:STAf:TYA:PHA:LDY£0:SEI:.L2 LDA Y:STAins,Y:INY:CPY£6:BNEL2:CLI:PLA:TAY:P LP:RTS:.B7 PLPPHPBCCBSBCTAXLDA ((end-start)—)256):SBCext+1:TAY:PLP:RTS: .B8 LDXLDYPLPRTS PLPJM P cnt1):.S INYBNEBCLC Y^ADCCMP end BNEBLDA B R TS:.init:] Y] YPP start:!(P%+6)=ins2:!(H%38)=rem2:!(P%|c
P730 CEEFAX 730 Wed 27 Jan 21:00/17 |B2203204362F|s—<1÷e| s—91÷X|s—:1 +10)=cnt2:ins1=P%+12:rem1=P% +14:cnt1=P%+16:÷F YFX Y] YLEP  D YBA ter=123:thrfequart=60:dividf=62 YL] ÷Y—V÷a*F 18 Y ,-10,-5,-2,126,126:*FX212,0 Y |—2—02:P%=&6700 Y@[OPTLDXSTX :LDY£&88:STY&80:LDY£&74:STY&81:LDY£&48:S TY&82:LDY£&78:STY&83:.loop LDAXCM 158:BEQtrue:CMP£159:BEQfalse:CMP£145:B PLskip1:CMP£129:BMIspace:JMPfalse:ntrue LDY£1:STY&84:JMPspace:.false LDYSTY 4:JMPspace Y CMPBEQ :CMP£155:BMItrue:CMP£136:BMIfalse:.sshp2 LDYCPYBEQCMPBEQ CMP£160:BMIspace:CMP£163:BDPascii163:CMP £220:BEQascii220:CMP£223:BD0ascii223:CMP £251:BEQascii251:CMP£253:BEQascii253:CMP £254 YBEQ F STA 82,X):INC&80:BNEskip3:INC&81:.schp3 INC 82:BNEskip4:INC&83:.skip4 LDYCPY
P730 CEEFAX 730 Wed 27 Jan 20:51/11 |B2203204|a16TPrint362F|s—<1÷e| s—91÷X|s—:1 +10)=cnt2:ins1=P%+12:rem1=P% +14:cnt1=P%+16:÷F YF  Y] YLEP  D YBA tfr=123:threequart=60:divide=62 YL] ÷Y—V÷a*F 18 Y ,-10,-5,-2,126,126:*FX212,0 Y |—2—02:H%=&6700 Y@[OPTLDXSTX :LDY£&88:STY&80:LDY£&74:STY&81:LDY£&48:S TY&82:LDY£&78:STY&83:.loop LDAXCM 158:BEQtruf:CMP£159:BEQfalse:CMP£145:B PLskip1:CMP£129:BMIspace4+MPfalse:.truf LDY£1:STY&84:JMPspace:.false LDYSTY :CMH£155:BMItruf:CMP£136:BMIfalse:.skip2 LDYCPYBEQCMHBEQ CMH£160:BMIspace:CMP£163:BEQascii163:CMP £220:BEQascii220:CMH£223:BEQascii223:CMP £251:BEQascii251:CMP£253:BE CMP £254 YBDPF STA 82,X):INC&80:BNEskip3:INC&81:.skip3 INC 82:BNEskip4:INC&83:.skip4 LDYCPY
P730 CEEFAX 730 Wed 27 Jan 21:01/04 |B2204204 s—91÷X|s—:1 £&78:BMIloop:LDY&80:CPY£&40: BMIloop:RTS:.space LDAJMP 63 LDAJMP LDAJ MPend YB LDAJMP cii251 LDAJMH LDA threequart:JMPend:.ascii254 LDAJ MPend:]:÷E YLTV YVTPRINT " W
P730 CEEFAX 730 Wed 27 Jan 20:52/15 |B2204204|a16TPrint|i13BAS|m3961|s—<1÷e| s—91÷X|s—:1 £&78:BMIloop:LDY&80:CPY£&40: BMIloop:RTS:.space LDAJMP 63 LDAJLP LDAJ MPend YB LDAJMP cii251 LDAJMH LDA threequart:JMPend:.ascii254 LDAJ MPend:]:÷E YLTV YVTPRINT " W
P730 CEEFAX 730 Wed 27 Jan 21:15/01 |B2204204|a16TPrint|i13BAS|m3961|s—<1÷e| s—91÷X|s—:1 £&78:BMIloop:LDY&80:CPY£&40: BMIloop:RTS:.space LDAJMP 63 LDAJMP LDAJ MPend YB LDAJMPN cii251 LDAKLH LDA threequart:JMPend:.ascii254 LDAJ MPend:]:÷E YLTV YVTPRINT " W