X16
Defined in X16.BAS.
Returns the day portion of the current date/time, a number between 1 and 31.
FUNCTION CLOCK_DAY AS BYTE () SHARED STATIC
INCLUDE "x16.bas" day = CLOCK_DAY() PRINT "today is the "; day; IF d = 1 THEN PRINT "st" : END IF d = 2 THEN PRINT "nd" : END IF d = 3 THEN PRINT "rd" : END PRINT "th" : END