1 to 9999.
@ Line number
.@
100
5-5 Convenient Techniques
© Using the Program Areas
Example:
Program area PO (Main routine)
19 X=12
2@ PRINT
3@ PRINT CSRX3*@";
4@ GOSUB #1
5@ GOTO 2e
6@ END
Program area PI] (Subroutine)
18
KS=KEYS
20
IF
K$=*4"
THEN
X=X—-1:
IF
X<@
THEN
X=O
30
IF
K$=*6"
THEN
X=X+1:
IF
X>23
THEN
X=23
4@
RETURN
101