Sayfa 20

1994:PRİNT *<HOME >< "7 CAN'T RECORD MORE ©0 217 PRİNT "<HOME ><ADOMN> PRİNT PRİNT "3 *<HOME >CSDOMN> "7 PRİNT T O GO 34012,115 PRİNT PRİNT "<RİGHTONAME PRİNT PRİNT PRİNT “PRİNT UP PRİNT *< UP

PRİNT PRİNT PRİNT *< PRİNT G

<9 THEN PRİNT IF Gz2 THEN IF AND THEN FOR 155 T O 1 IF AND IF AND TO DECGİSCKRSC13) TH EN

GoTO IF THEN 160TO 818 1984:PRİNT *<HOME >< NAMES BEGİNNİNS WİT H 21 7 143 TO NEXT LENCDS)<100 THEN 825 19941PRİNT "<HOME >< "7 SD$<*SORRY,THE RECORD IS TOO LONG F OR 2086:GOTO 156 ÖPEN

"ür PRİNT "NAME * *SURNAME *

THEN NEXT 1 IF THEN 1318 PRİNT *<4DOMN>* S0$-*1'M NOT ACGUAİNTED WİTH THİS P ERSON!":GOSUB 2006160TO 817 IF EX<«100 THEN 1319 PRİNT MORE PRECİSİONS ABOUT HE 2006160TO 217 FOR TO PRİNT *<HOME ÜSCRNACK) EXsİ AND THEN 1382

PRİNT Raza THEN PRİNT YOU HANNA Y

POKE Isi TO 28 8,0 IF THEN PRİNT e IF Razi THEN RETURN GoTO 218 IF ASCI"Y* THEN 1324 POKE 8-3,601POKE Isi TO 88 Razi THEN RETUR N IF RCsi THEN GÖTO 4308 PRİNT *<HOME >< İODOKN> "<HOME ><SDOKN > Raz2 THEN 1884 DPXZSO:GOSUB 154 TO Bt IF THEN I IF MRZ<4 THEN 1428 IF THEN 1408 PRİNT NAM E 18 RECORDED BUT THAT'S ALL."1GOSU B 2006 IF HeEX-İ THEN NEXT HiGOTO 217 GET ASLIF ASLI" * THEN 1388 POKE 8-3,681POKE S,33:FOR Isi TO PRİNT 19951NEXT H PRİNT "ANI PRİNT HER/HİS * NUMB

PRİNT İF HsEX-İ THEN NEXT 817 GET ASLIF * THEN 1416 PRİNT S&EPRİNT 1885:NEXT H PRİNT Isi TO Ls IF THEN LİSLENCDSC7)) THEN IF THEN La)/24.5)