Re: Panel Meter Clock (yet another one)
Posted: Sun Mar 12, 2017 8:44 am
DST worked this morning, so both cycles have run, code complete...
-->
Open Community Forum for ESP8266, Come share Arduino and IoT (Internet of Things)
https://www.esp8266.com/
'********************************************************
'* Calibrate Analog Panel Meter Clock *
'* by Russ McIntire, 9/9/16 *
'* D0 = Hours *
'* D1 = Minutes *
'* D2 = Seconds *
'* *
'* Set Hour, Minute, Second to calibrate panel meters *
'********************************************************
memclear
hour = 0
min = 0
sec = 0
M = " "
udptimer = 0
hourpwm = 0
minpwm = 0
secpwm = 0
updated = 0
updatetimer = 0
cts = time("hour:min:sec")
uvsr = "Running..."
'GUI setup
cls
wprint |<HTML>|
wprint |<HEAD>|
wprint |<style> h1{text-shadow: 2px 2px 5px blue} </style>|
wprint |<h1>Analog Clock Setup</h1>|
wprint |</HEAD>|
wprint "Calibration"
wprint "<br><br>"
textbox hour
cssid htmlid(),"position: absolute; left: 130px; display:block;width:40px"
wprint "Hour(0-12,12=0): "
wprint "<br>"
textbox min
cssid htmlid(),"position: absolute; left: 130px; display:block;width:40px"
wprint "Minute(0-59):"
wprint "<br>"
textbox sec
cssid htmlid(),"position: absolute; left: 130px; display:block;width:40px"
wprint "Second(0-59):"
wprint "<br><br>"
button "Show Time", [show_time]
wprint "<br><br>"
wprint "<br> <br>"
button "Reboot Clock", [reboot_clock]
wprint "<br><br>"
wprint htmlvar(uvsr)
wprint "<br><br>"
timer 5000, [show_time]
wait
end
[show_time]
'Get time values from NTP server
'hour = val(time("hour"))
'min = val(time("min"))
'sec = val(time("sec"))