Sayfa 27

TO THEN NEXT FOR IST TO TMS SHS1GOTO 230 PRİNT SHE*ENTER SEARCH STRİNG'

UT SYS IF THEN NOT FOUND 308 230 AND T> © THEN PRİNT

ON RETURN 230 <ase> 900 POKE 1067*Y440.321YeNYEPOKE 1067*Y <233> GET THEN CNSCN *Y160TO 226 <aaı> THEN 860 iF THEN 790 <a11> THEN 8806 <283> CNCO THEN NYENY GoTO 786 iF THEN 800 <a245> THEN 780 iF THEN 808 CNSCNEZ <as2> PRİNT USE CURSOR KEYS RETURN TO SELECT" FOR TO <838> THEN OR FİLE--*160TO 970. JE THEN TC1 © THEN <181> PRİNT TEP" THEN PRİNT PRİNT GİF THEN PRİNT *--MORE NEXT 230 1 Tx “BUFFER B 1090:60TO 230 1170:60TO 230 ALL As0 THEN 230 FOR TO 218 THEN CMPTY. PLEASE GET BEFORE PUT*:G0SUB 18801 60TO 238 THEN 1660 <158) CÜRRENT DATA*1GOSUB 112 ASO THEN 238 236 <017> A THEN PRİNT <ceza> 230 PRİNT Kel TO 988 IF PEEKCİS8) THEN PEEK THEN GET A8 NEXT KIPRINT <898)> PRİNT <239) GET THEN 1 1860 IF THEN As0100TO 1168 GOTO 1138 <186> PRİNT <169> PRİNT <156> THEN PRİNT * NEKTCASPACE PREVTOUSCESPACE PRİNT * FRİNTC3SPACE)<CTRL- PRİNT TO ENDCESPACE MH FOR” PRİNT * )CCTRL DELETE CBSPACE DITTONAL* PRİNT * LOADCASPACE İOSPACE <CTRL-4)COMMA NOS * PRİNT CONTROL COMMA <837>