Flash Ortamında Basit Flash oyunu yapımı

Biz muhtemelen bu oyunu daha önce oynadık: Aklından 0 - 1000 arası bir sayı tut ve karşıdaki bunu tahmin etsin. Tahminlere göre aşagı ya da yukarı diyerek dogru sayıyı bulmayı saglar.

Başlangıç :
Kolay bir başlangıç yapalım. Oyuncu sayıyı tahmin etmeyi denesin.
Bilgisayar rastgele bir sayı seçer.
1. Oyuncu bilgisayara bir sayı girer tahmin için.
2. Girilen sayı bilgisayaryn tuttuğuyla kıyaslanır.
3. Oyuncuya küçük ya da büyük denir.
4. İkinci tahmin saıysı girilir. Doğru sayıya kadar süreç devam eder.

Flashı çalıştırın ve aşağıdaki satırları girin.
Set Variable: "high" = 1000
Set Variable: "low" = 0
Set Variable: "Num" = Random (high) +1
Karşılaştırma :
Kiyaslama satirlari. Girilen sayiyi bilgisayarin tuttugu ile kiyaslar ve yüksek ya da alçak der.

If (/:hmGuess > /:Num)
Set Variable: "fback" = "Too High" / "çok yüksek"
End If
If (/:hmGuess < /:Num)
Set Variable: "fback" = "Too Low" / "çok düsük"
End If
If (/:hmGuess = /:Num)
Set Variable: "fback" = ""
Set Variable: "correct" = /:Num / "dogru tahmin"
Go to and Stop ("quit")
End If

Doğru sayı bulununca program sona erer.

Tahmini Değerlendirme
Siz de bilgisayar yerine sayı girebilirsiniz. Bunun için 1-2 satır ilave edilir.

On (Release, Key: )
Call("EvalGuess")
End On

Oyuncuya komutlarla iki seçenek sunma: Oyuncuya yeniden başla ya da çok demek için iki tuş seçenegi konur.

Tuş Kodu
Düşük ya da yüksek uyarisi verildikten sonra kullanıcıya bilgisayar tuşlarının hangileriyle programı kullanmaya devam edeceği gösterilir.

Çok Düşük:
On (Release)
Set Variable: "low" = PCNum
Call ("Guess")
End On

Çok Yüksek:
On (Release)
Set Variable: "high" = PCNum
Call ("Guess")
End On

Set Variable: "/:PCNum" = Int(((/:high) + (/:low)/2)

Doğru Tuş:
On (Release)
Set Variable: "correct" = /:PCNum
Go to and Play ("quit")
End On

Bitiş :
0 ile 1000 arası bir rakam PCNum : Int((1000 + 0)/2) or 500 formülü ile bulunur. Basic'teki RND komutu gibi...
Int((1000 + 500) /2) or 750. 1000 ile 500 arası bir rakam seçer.
kaynak: Bestflash