Sayfa 21

kalsASC(ce$s)-48 IF kalsi THEN AMIGA " ELSE oysay-2:oyuncu2$-"OYUNCUZ" k COLOR 24*(2#0o0y),S5S:LOCATE 8,30:PRINT *8) oyuncuz$ COLOR 4—-(2*0y),S:LOCATE PTAB(((110-LEN(oyuncul$)*8)/2)410) oyuncul$ IF oysay-s2? THEN gec GOSUB temizle:COLOR 7,3:LO0OCATE 16,13:PRINT"OYUNUN ZORLUĞGUNU":LOCATE i7,i PRINT PTAB(115) 19,17:PRINT "(1/9)" dorti ce$-"" THEN dort: IF ASC(ce$)<49 OR ASC(ces)>58 THEN dort zorluksASC(ces)-48 gec:

zal-TIMER: zam?sü zasINT(TIMER) kelimeyibul:GOSUB yenikelime:GOSUB kolonlarıyelsiS5i

devam: IF INKEY$<>"" THEN devam IF MOUSEC(O)-0 OR THEN devam IF MOUSECİ)>68 AND AND AND MOUSE(2)<15i THEN

RETURN ELSE GOTO devam END IF

terketi ; SCREEN CLÜSE RESET:END

IF *RNDezorluk/9)) THEN

FOR azi TÜ LEN(kelime$) IF THEN xaza

NEXT KESALCASC(kel$ina))-65) #8 ELSE KSINT (RND#*208) *54

DATA “BUZDOLABI", "ARABA", "BICAK", "FUTBÜL."

DATA “KASATURA", "PIRLANTA", "KALORİFER", "RADYATOR" DATA "TIMSAH","KANDIL", "HASAT", "VASAT", "KUTUPHANE" DATA "ACELE", "SINEMA", "ADAPTOR", "MUREKKEF" , "KAPI", "KALE", "SATRANC"

DATA "KALEM", "KİTAP", "SILGI", "KARANLIK", "LAMBA" DATA "MASAL", "ISTATISTIK", "SOZLUK" DATA “ANSIKLOPEDİ", "TELEVİZYON", DATA DATA DATA a7 yil