Sayfa 30

OS; BYS; SP$; KK&; SPS; RES; SPS; YS8;”TUS RETURN PRİNT SP$; CHR$ (35 ); T: RETURN PRINT A PRINT AZS$S<C3);ASC1);ADSCT,3):PRINT A ADSCT, 4): RETURN FOR P-i TO 4:PRINT AZ$SCP); <T,P) PRINT KY$;E$C12);: INPUT ADS<CT,P): NE XT :RETURES IF D-1 THEN 33 GOTO 151 PRINT RETUR N PRINT REHB ERİ CLOSE 3:CLOSE 15: RETURN PRINT P$; KAYIT YOKTUR" GOSUB 219:GOSUB 232: RETURN PRINT RF $; SPS; GRS;"KAYIT VAR.KAPASITE DOLEU STUR” GOSUB 210:GOSUB 232: RETURN POKE 657,0:POKE 788,49: END DATA O,1,2,3,4,5,6,7,6,9 DATA ILK VERİ GIRİSI, REHBERE BAKMA , ADRES ARAMA, ADRES DÜZELTME DATA ADRES EKLEME, ADRES SILME,DIİSK ETR DATA CIKIS & SOS, MENÜYE DONUS, ISME GÖRE, SOYADINA GORE, NO.SUNA GÖRE