Alihanyilmaz
80+ Bronze
- Katılım
- 23 Kasım 2023
- Mesajlar
- 1,487
Dahası
- Reaksiyon skoru
- 464
- İsim
- Alihan YILMAZ
Zıp dosyasını WinRAR veya Winzip ile açıyorsun. Çıkan dosyalar arasından "Yüz kişiye sorduk" isimli dosyaya çift tıklıyorsun.nasıl açılıyor kanka bu
Mesaj otomatik birleştirildi:
Güncelleme.
Görüntüde iyileştirme için data.yab dosyası içeriğini aşağıdaki gibi düzeltin. Çok az fark var.
Kod:
// Alihan Yılmaz'ın müthiş eseri.
// Yüz Kişiye Sorduk oyunu data dosyası.
// Güncellenmiş sürüm.
system("cls")
print " "
print " "
print " "
print " 100 Kişiye Sorduk"
print " "
print " "
print " Soru 1"
print " "
print " En tehlikeli hayvan hangisi?"
print " "
print " A) Aslan B) Fil"
print " C) Timsah D) Yılan"
print " "
print " "
input cevap$
print " "
print " "
if cevap$ = "Sırtlan" or cevap$ = "sırtlan" then
print " Kopya çektiğin için puan veremiyoruz."
else
print " Doğru cevap \"Sırtlan\" olacaktı. Sırtlan hem sırıtır, hem saldırır."
print " 99 kişi Sırtlan demiş. Bir kişi geçersiz oy kullanmış."
fi
sleep 8
system("cls")
print " "
print " "
print " "
print " Soru 2"
print " "
print " Bir Ördeğin kaç bacağı var?"
print " "
print " A) \"1\" B) \"2\""
print " C) \"3\" D) \"4\""
print " "
print " "
input cevap$
print " "
print " "
if cevap$ = "3" or cevap$ = "Üç" or cevap$ = "üç" then
print " Doğru tahmin. Çoğu kişi Üç bacağı olduğunu söyledi."
else
print " Doğru cevap \"Üç\" olacaktı."
print " 67 kişi Üç demiş."
fi
sleep 6
system("cls")
print " "
print " "
print " Soru 3"
print " "
print " Bir Kedi ne der?"
print " "
print " A) Miyav B) Hav hav"
print " C) Mööö D) Tısss"
print " "
print " "
input cevap$
print " "
print " "
if cevap$ = "Miyav" or cevap$ = "miyav" then
print " Tebrikler, bildiniz"
else
print " Doğru cevap \"Miyav\" olacaktı. kediler ", cevap$, " demez."
print " 51 kişi Miyav demiş. Diğerleri saçmalamış"
fi
sleep 6
system("cls")
print " "
print " "
print " Kapatmak için \"K\""
input cevap$
end
exit
Son düzenleme: