Fonksiyon Kullanımı Sub-EndSub

Sub Fonksiyon adı

  Yapılacak işlem                       Kullanımı

EndSub

TextWindow.WriteLine("Puanınızı Giriniz ? ")

cevap = TextWindow.ReadNumber()                  Klavyeden Puan Girişi

If cevap > 50 Then

  Kazandın()

Else                                        Girilen Değer Kontrol Ediliyor

  Kaybettin()

EndIf

Sub Kazandın

  Sound.PlayBellRing()

  TextWindow.WriteLine("KAZANDIN")                Kazandın Fonksiyonu

EndSub

Sub Kaybettin

  TextWindow.WriteLine("KAYBETTİN")               Kaybettin Fonksiyonu

EndSub