Main Sub
/if hours =24 :goto Sub Change
else :goto Main Sub
Sub Change
/set total hours 48
:goto Day Sub
Day Sub
/set hours 8am > 39:59pm = day
:goto Night Sub
/set hours 40pm > 7:59am = night
/end
--------------------------------------------
Too complicated, mine is simple. Besides, I like night time.