GOSUB…RETURN
Description
Branch to and return from a subroutine. Branch to the specified label and
execute subroutines until “RETURN” is reached and then go back to the
statement following the GOSUB statement.
Syntax
GOSUB LABEL
statement
END
:LABEL
statement
RETURN
Parameter Description
LABEL Beginning of the subroutine. The maximum
length of the label is 8 characters.
Example
DOWNLOAD "GOSUB1.BAS"
SIZE 3,3
GAP 0,0
DENSITY 8
SPEED 4
DIRECTION 0
CLS
TEXT 10,10,"3",0,1,1,"GOSUB & RETURN COMMAND TEST"
GOSUB DR_BOX
PRINT 1
END
:DR_BOX
FOR I=21 TO 81 STEP 10
BOX 80+I,80+I,80+300-I,80+300-I,5
NEXT
RETURN
EOP
GOSUB1
See Also
DOWNLOAD, EOP, END, GOTO