Tebak-tebakan

Sub Main
  DIM jawaban AS INTEGER
  DIM name_user AS INTEGER

  name_user = 12

  INPUT ” Who Are You..? “,jawaban
  SLEEP 500

  IF (name_user = 12) THEN
      PRINT ” Waiting ”

      DIM angka_rahasia AS INTEGER
      DIM tebakan_user AS INTEGER

      angka_rahasia = 100

      SLEEP 500
      INPUT ” silahkan masukan pasword anda..? “,tebakan_user

      IF(tebakan_user = angka_rahasia)THEN
         PRINT ” Waiting ”
      End IF

      IF(tebakan_user angka_rahasia) THEN
        PRINT ” Salah,harap isi dengan benar ”
      End IF

  End IF

  IF (jawaban <> name_user) THEN
     PRINT ” No Match ”
     SLEEP 500
  End IF

End Sub