#COMPILE EXE "s48_enum.exe"
' Sample: ENUM for named constants
ENUM Colors SINGULAR
    Red = 1
    Green = 2
    Blue = 3
    Yellow = 4
END ENUM
FUNCTION PBMAIN() AS LONG
    DIM c AS LONG
    c = Green
    PRINT "Green ="; c
    PRINT "Red + Blue ="; Red + Blue
    FUNCTION = 0
END FUNCTION
