Sharp PC-1600 Bedienungsanleitung Seite 216

GOSUB
BEISPIEL
1 4 - 7 0
Alland more about Sharp PC-1500 at http:/fwww.PC-1500.info
Unterprogramme können sich auch selbst aufrufen,
wenn man das Programm entsprechend geschickt
auslegt und dafür sorgt, daß das Unterprogramm
verlassen werden kann und die zulässige Tiefe
der Verschachtelung nicht überschritten wird.
lO:WAIT 100
15:PRINT "HAUPTPROGRAMM GESTARTET"
20:GOSUB 90
25 : PR I NT "ZURUECK IM HAUPTPROGRAMM"
30:GOSUB 60
35:PRINT "ZURUECK IM HAUPTPROGRAMM"
40:WAIT 0
45:PRINT "PROGRAMM BEENDET"
50 : END
55:REM
****
UNTERPROGRAMME
*****
60:REM --- UNTERPROGRAMM 1 ---
65:PRINT "UNTERPROGRAMM 1 GESTARTET"
70:GOSUB 90
75:PRINT "ZURUECK IM UNTERPROGRAMM 1"
80:RETURN
85:REM - -- UNTERPROGRAMM 2 ---
90:PRINT"UNTERPROGRAMM 2 GESTARTET"
95:RETURN
>RUN
HAUPTPROGRAMM GESTARTET
UNTERPROGRAMM 2 GESTARTET
ZURUECK IM HAUPTPROGRAMM
UNTERPROGRAMM . 1 GESTARTET
UNTERPROGRAMM 2 GESTARTET
ZlJRUECK IM UNTERPROGRAMM 1
ZURUECK IM HAUPTPROGRAMM
PROGRAMM BEENDET
)
TBI~
IV
BAPITK~
14 Erklärung der BASIC-Befeh le
Do not seil this PDF
!!!