CALL One() CALL Two() SUB One() PRIVATE CONST ONE = 1 PRIVATE CONST TWO = 2 PRINT ONE, TWO END SUB SUB Two() PRIVATE CONST ONE = 3 PRIVATE CONST TWO = 4 PRINT ONE, TWO END SUB
CALL
(
)
SUB
PRIVATE
CONST
=
1
2
PRINT
END
3
4