Internal Subprogram ☆
A subprogram describes a definite procedure as an object.
An internal subprogram is a subprogram written within a program unit, begins with a SUB line and ends with a END-SUB line.
A SUB line describes its name and parameters. The parameters are written separated by commas and enclosed in parentheses if any.
The rule for naming a subprogram is the same as that for a numeric variable.
Use a CALL statement to execute a subprogram. To execute a subprogram that has parameters, write the arguments enclosed in parentheses as in function reference.
Example

    100 OPTION ANGLE DEGREES
    110 SUB circle(a,b,r)
    120    FOR t=0 TO 360
    130       PLOT LINES: a+r*COS(t),b+r*SIN(t);
    140    NEXT t
    150    PLOT LINES
    160 END SUB
    170 SET WINDOW -4,4,-4,4
    180 CALL circle(1,-1,2)
    190 CALL circle(-1,2,1)
    200 END

All variables except parameters are common with the program unit.
When the control comes to the SUB-line, it jumps to the next line to the END-SUB line.
If a CALL statement is executed , the control jumps to the SUB-line, and if it reaches the END-SUB-line, it returns to the next line to the CALL-line.