HTBasic Help
×
Menu
Index

DATE$ Example

10    CLEAR SCREEN
20    PRINT "The date today is ";DATE$(TIMEDATE)
30    PRINT "The number of seconds from 4713 B.C. is",FNJd(DATE$(TIMEDATE))
40    END
50    DEF FNJd(A$)
60      RETURN (DATE(A$) DIV 86400)-1
70    FNEND