>D 40
IP=192.168.178.49
SB=2560:1535

; time array
M:ta=0 30

res=0
cnt=0
tag=0
from=0
to=0
pw=0

hs1="</span>  von <span style='color:green;'>"
hs2="</span> bis <span style='color:green;'>"
hs3="<span style='color:yellow;'>"
hs4="</span>"
>B

; Wochentage
res=is(0 "So|Mo|Di|Mi|Do|Fr|Sa|")
res=is1(0 "Jan|Feb|Mar|Apr|May|Jun|Jul|Aug|Sep|Okt|Nov|Dez")

; Timer Tabelle, bis 10 Einträge
; von, bis, Tag
; Sonntag
ta[1]=17.30
ta[2]=19.50
ta[3]=1

ta[4]=12.30
ta[5]=14.10
ta[6]=2

ta[7]=17.30
ta[8]=19.50
ta[9]=3

ta[10]=14.30
ta[11]=20.20
ta[12]=4

ta[13]=12.30
ta[14]=19.50
ta[15]=5

ta[16]=17.30
ta[17]=19.50
ta[18]=6

; Samstag
ta[19]=13.30
ta[20]=16.45
ta[21]=7

ta[22]=17.30
ta[23]=18.30
ta[24]=7


>S

pw=0
for cnt 1 ta[-1] 3
	tag=ta[cnt+2]
	from=int(ta[cnt])*60+(ta[cnt]*100%100)
	to=int(ta[cnt+1])*60+(ta[cnt+1]*100%100)
	if tag==wday
	then
		print %tag% %from% %to%
		if time>=from
		and time<to
		then
			pw|=1
		endif
	endif
next

if pwr[1]!=pw
then
	=>power1 %pw%
endif


>W
<center><h1 style="color:green;font-size:40px;">%2.0hours%:%2.0mins%:%2.0secs%</h1>{m}%is[wday]% %0day%-%is1[month]% <br>%0year%
<hr>
Timerliste:
<hr>
1 : %hs3%%is[ta[3]]%%hs1%%2.0(int(ta[1]))%:%2.0(ta[1]*100%100)%%hs2%%2.0(int(ta[2]))%:%2.0(ta[2]*100%100)%</span>
2 : %hs3%%is[ta[6]]%%hs1%%2.0(int(ta[4]))%:%2.0(ta[4]*100%100)%%hs2%%2.0(int(ta[5]))%:%2.0(ta[5]*100%100)%
3 : %hs3%%is[ta[9]]%%hs1%%2.0(int(ta[7]))%:%2.0(ta[7]*100%100)%%hs2%%2.0(int(ta[8]))%:%2.0(ta[8]*100%100)%
4 : %hs3%%is[ta[12]]%%hs1%%2.0(int(ta[10]))%:%2.0(ta[10]*100%100)%%hs2%%2.0(int(ta[11]))%:%2.0(ta[11]*100%100)%
5 : %hs3%%is[ta[15]]%%hs1%%2.0(int(ta[13]))%:%2.0(ta[13]*100%100)%%hs2%%2.0(int(ta[14]))%:%2.0(ta[14]*100%100)%
6 : %hs3%%is[ta[18]]%%hs1%%2.0(int(ta[16]))%:%2.0(ta[16]*100%100)%%hs2%%2.0(int(ta[17]))%:%2.0(ta[17]*100%100)%
7 : %hs3%%is[ta[21]]%%hs1%%2.0(int(ta[19]))%:%2.0(ta[19]*100%100)%%hs2%%2.0(int(ta[20]))%:%2.0(ta[20]*100%100)%
8 : %hs3%%is[ta[24]]%%hs1%%2.0(int(ta[22]))%:%2.0(ta[22]*100%100)%%hs2%%2.0(int(ta[23]))%:%2.0(ta[23]*100%100)%
9 : %hs3%%is[ta[27]]%%hs1%%2.0(int(ta[25]))%:%2.0(ta[25]*100%100)%%hs2%%2.0(int(ta[26]))%:%2.0(ta[26]*100%100)%
10 : %hs3%%is[ta[30]]%%hs1%%2.0(int(ta[28]))%:%2.0(ta[28]*100%100)%%hs2%%2.0(int(ta[29]))%:%2.0(ta[29]*100%100)%
<hr>