Guru
Joined: 11/02/2018
Location: AustraliaPosts: 3319
| Posted: 05:32am 02 Jan 2024 |
> RTC SETTIME LEFT$(DATETIME$(NOW),6)+RIGHT$(DATETIME$(NOW),9)
Error : Date/time format
>
This might do it.
sub RTCSet
local integer y,m,d,h,min,s
y = val(mid$(datetime$(now),7,4))
m = val(mid$(datetime$(now),4,2))
d = val(mid$(datetime$(now),1,2))
h = val(mid$(datetime$(now),12,2))
min = val(mid$(datetime$(now),15,2))
s = val(mid$(datetime$(now),18,2))
RTC SETTIME y,m,d,h,min,s
end sub
local integer y,m,d,h,min,s
y = val(mid$(datetime$(now),7,4))
m = val(mid$(datetime$(now),4,2))
d = val(mid$(datetime$(now),1,2))
h = val(mid$(datetime$(now),12,2))
min = val(mid$(datetime$(now),15,2))
s = val(mid$(datetime$(now),18,2))
RTC SETTIME y,m,d,h,min,s
end sub
Edit
Repaired a dumb mistake, had "m" twice
Edited 2024-01-02 15:57 by phil99