ROBOTICS UNIVERSITY. Diberdayakan oleh Blogger.

Kontrol Program : ON - GOSUB & ON - GOTO



Pencabangan On – GoSub dan On – GoTo pada prinsipnya mirip dengan Select Case yang tujuannya adalah untuk mencabang kebeberapa kemungkinan baris atau label yang sudah ditentukan. Penulisannya adalah sebagai berikut:

On (ekspresi) GoSub (baris/label)
On (ekspresi) GoTo (baris/label)

Ada satu perbedaan antara pemakaian pencabangan On – GoSub dengan On – GoTo, yaitu pada pencabangan On – GoSub setelah mencabang, kontrol program akan kembali ke bawah pernyataan On – GoSub.Sedang pada On – GoTo, kontrol program tidak kembali lagi.

Nilai (ekspresi) disebelah kanan kata Onmerupakan suatu ekspresi numerik yang mempunyai rentang nilai 0 – 255. Nilai untuk (ekspresi) jika diisikan bilangan negatif atau lebih besar dari 255 akan menghasilkan suatu kesalahan.

Nilai (baris/label) yang terletak disebelah kanan dari GoSub/GoTo, merupakan blok program yang akan dikerjakan bilai nilai (ekspresi) terpenuhi.

Contoh:
Dim A As Byte
Input "Enter value 0-2 ", A                          

On A Gosub label1,label2,label3
Print "Returned"

If Portb < 2 Then                                     
On Portb Goto label4,label5
EndIf

End_prog:
End

label1:
Print"0 entered"
Return

label2:
Print"1 entered"
Return

label3:
Print"2 entered"
Return

label4:
Print"P1 = 0"
Goto End_prog

label5:
Print"P1 = 1"
Goto End_prog




0 Comment For "Kontrol Program : ON - GOSUB & ON - GOTO"

Kami hanya mengizinkan komentar yang berkualitas!

Back To Top