NCR GW-BASIC Betriebsanleitung Seite 179

Beispiel:
Hinweis:
GW-BASIC
tine zu vermeiden, sollte vor ihr ein STOP-, END-
oder GOTO-Befehl stehen, der die Programm­
steuerung um die Subroutine herumleitet.
10 GOSUB 40
20 PRINT "RÜCKSPRUNG AUS
SUBROUTINE"
30 END
40 PRINT "SUBROUTINE";
50 PRINT "IN";
60 PRINT "VERARBEITUNG"
70 RETURN
ergibt
SUBROUTINE IN VERARBEITUNG
RÜCKSPRUNG AUS SUBROUTINE
Mit dem ON...GOSUB-Befehl kann eine Subrou­
tine je nach Ergebnis einer vorhergehenden Opera­
tion ausgewählt werden.
GW-BASIC-BEFEHLE UND FUNKTIONEN
GOSUB...RETURN
4-105