|
 |
%
stunde=0;
pos=0;
WHILE stunde<24;
stunde=stunde+1;
IF (stunde % 2) == 1;
farbe=farbenix1;
ELSE;
farbe=farbenix2;
END;
ende=((stunde * 60 / faktor) +0.5 ) | format('%i');
%?>
 % stunde - 1 %?> |
%
pos=ende;
END;
%?>
%
programm=0;
sender="";
tablaenge=((1440 / faktor) + 0.5 ) | format('%i');
FOREACH timer = timers;
IF timer.cdesc != sender && timer.starttime <= current && timer.stoptime >= current;
bgfarbe=((programm % 2) == 0) ? farbenix1 : farbenix2;
sender=timer.cdesc;
%?>
 % sender | truncate(11) %?> |
%
pos=0;
FOREACH sendung = timers;
IF sendung.cdesc == sender && sendung.starttime <= current && sendung.stoptime >= current;
IF sendung.active == 0 || sendung.active == 32768;
progfarbe=farbeinaktiv;
ELSE;
IF sendung.critical == 1;
progfarbe=farbekonflikt;
ELSE;
progfarbe=farbesendung;
END;
END;
IF sendung.starttime < current;
start=0;
ELSE;
start=((sendung.startlong / faktor) + 0.5 ) | format('%i');
END;
IF sendung.stoptime > current;
ende=tablaenge;
ELSE;
ende=(((sendung.stoplong + 1) / faktor) + 0.5 ) | format('%i');
END;
NEXT IF ende <= start;
IF start>pos;
%?>

|
%
pos=start;
END;
IF ende - pos < 2;
%?>
 |
%
ELSE;
%?>
 |
%
END;
pos=ende;
END;
END;
IF pos

|
%
END;
%?>
%
programm=programm+1;
END;
END;
%?>
|
|