Mikroelektronika MIKROE-724 データシート
684
mikoBasic PRO for dsPIC30/33 and PIC24
MikroElektronika
Library Example
Demonstration of Time library routines usage for time calculations in UNIX time format.
Copy Code To Clipboard
program Time_Demo
‘*
‘* simple time structure
‘*
structure TimeStruct
dim ss as byte ‘ seconds
dim mn as byte ‘ minutes
dim hh as byte ‘ hours
dim md as byte ‘ day in month, from 1 to 31
dim wd as byte ‘ day in week, monday=0, tuesday=1, .... sunday=6
dim mo as byte ‘ month number, from 1 to 12 (and not from 0 to 11 as with unix
C time !)
dim yy as word ‘ year Y2K compliant, from 1892 to 2038
end structure
dim ts1, ts2 as TimeStruct
epoch, diff as longint
main:
ts1.ss = 0
ts1.mn = 7
ts1.hh = 17
ts1.md = 23
ts1.mo = 5
ts1.yy = 2006
‘*
‘* what is the epoch of the date in ts ?
‘*
epoch = Time_dateToEpoch(@ts1) ‘ epoch = 1148404020
‘*
‘* what date is epoch 1234567890 ?
‘*
epoch = 1234567890
Time_epochToDate(epoch, @ts2) ‘ ts2.ss = 30
‘ ts2.mn = 31
‘ ts2.hh = 23
‘ ts2.md = 13
‘ ts2.wd = 4
‘ ts2.mo = 2
‘ ts2.yy = 2009
‘*
‘* how much seconds between this two dates ?