Syntax
DECLARE SUB TEST[(var as type)]

Remarks

test Name of the procedure.
Var Name of the variable(s). Maximum 10 allowed.
Type Type of the variable(s). Bit, Byte,Word/Integer, Long or String.
You must declare each sub before writing or using the sub procedure.

See also
CALL, SUB

Example
Dim a As Byte, b1 As Byte, c As Byte
Declare Sub Test(a As Byte)
a = 1 : b1 = 2: c = 3

Print a ; b1 ; c

Call Test(b1)
Print a ;b1 ; c
End