HTBasic Help
×
Menu
Index
Search
 
   
   
   
 
  (c) TransEra Corp, 2021

DATE Example

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