/*-------------------------------------------------------------------------------------*/
/*----PROGRAMM ZUM BELEGEN DER FEIERTAGE IN DER 4-TAGE-VORSCHAU */
/* die varrierenden Feiertag wie Fasching, Ostern und Pfingsten müssen von Hand */
/* belegt werden, während feste Termine wie Weihnachten etc automatisch belegt werden */
/*-------------------------------------------------------------------------------------*/
/*-------------------------------------------------------------------------------------*/
/*--Sommerzeit Anfang und Ende für Sonnenauf- und untergangszeiten (letzter Sonntag im März bzw. Oktober) */
tag_sommerzeit_anfang=28; tag_sommerzeit_ende=31;
/*--Datum Fasching (bei Schaltjahren muss schalttag auf 1 gesetzt werden)---------------*/
schalttag=0; fruehling=20; sommer=21; herbst=23; winter=22;
rosenmontag=15; rosenmontagmonat=2;
/*--Datum Ostern -----------------------------------------------------------------------*/
karfreitag=2; karfreitagmonat=4; ostersonntag=4; ostersonntagmonat=4;
/*--Datum Himmelfahrt, Pfingsten und Fronleichnam--------------------------------------*/
himmelfahrt=13; himmelfahrtmonat=5;
pfingstsonntag=23; pfingstmonat=5;
fronleichnam=3; fronleichnammonat=6;
/*--Datum 1.Advent ---------------------------------------------------------------------*/
ersteradvent=28; ersteradvent_monat=12;
zweiteradvent=ersteradvent+7; if(zweiteradvent>30)zweiteradvent=zweiteradvent-30;
dritteradvent=zweiteradvent+7; vierteradvent=dritteradvent+7;
/*--------------------------------------------------------------------------------------*/
/*--------------------------------------------------------------------------------------*/
Voraus1=Day+1; Voraus2=Day+2;Voraus3=Day+3; Voraus4=Day+4; Voraus5=Day+5; Voraus6=Day+6;
if(Voraus1>6)Voraus1=Voraus1-7; if(Voraus2>6)Voraus2=Voraus2-7;
if(Voraus3>6)Voraus3=Voraus3-7; if(Voraus4>6)Voraus4=Voraus4-7;
if(Voraus5>6)Voraus5=Voraus5-7; if(Voraus6>6)Voraus6=Voraus6-7;
/*--------------------------------------------------------------------------------------*/
/*--Advent-------------------------------------------------------------------*/
/*--1. Advent-----------------------------------------------------------------*/
vorher5=ersteradvent-5; if(vorher5<=0)vorher5=vorher5+30;
vorher4=ersteradvent-4; if(vorher4<=0)vorher4=vorher4+30;
vorher3=ersteradvent-3; if(vorher3<=0)vorher3=vorher3+30;
vorher2=ersteradvent-2; if(vorher2<=0)vorher2=vorher2+30;
vorher1=ersteradvent-1; if(vorher1<=0)vorher1=vorher1+30;
if(monat==11 && dat>25){
if(dat==vorher5){if(Day==tag)wochtag[Voraus5]=wochtag[Voraus5]+"
(1.Advent)"};
if(dat==vorher4){if(Day==tag)wochtag[Voraus4]=wochtag[Voraus4]+"
(1.Advent)";
else if(Day!=tag)wochtag[Voraus5]=wochtag[Voraus5]+"
(1.Advent)"};
if(dat==vorher3){if(Day==tag)wochtag[Voraus3]=wochtag[Voraus3]+"
(1.Advent)";
else if(Day!=tag)wochtag[Voraus4]=wochtag[Voraus4]+"
(1.Advent)"};
if(dat==vorher2){if(Day==tag)wochtag[Voraus2]=wochtag[Voraus2]+"
(1.Advent)";
else if(Day!=tag)wochtag[Voraus3]=wochtag[Voraus3]+"
(1.Advent)"};
if(dat==vorher1){if(Day!=tag) wochtag[Voraus2]=wochtag[Voraus2]+"
(1.Advent)"};
};
if(monat==12 && dat<10){
if(dat==vorher5){if(Day==tag) wochtag[Voraus5]=wochtag[Voraus5]+"
(1.Advent)"};
if(dat==vorher4){if(Day==tag)wochtag[Voraus4]=wochtag[Voraus4]+"
(1.Advent)";
else if(Day!=tag)wochtag[Voraus5]=wochtag[Voraus5]+"
(1.Advent)"};
if(dat==vorher3){if(Day==tag)wochtag[Voraus3]=wochtag[Voraus3]+"
(1.Advent)";
else if(Day!=tag)wochtag[Voraus4]=wochtag[Voraus4]+"
(1.Advent)"};
if(dat==vorher2){if(Day==tag)wochtag[Voraus2]=wochtag[Voraus2]+"
(1.Advent)";
else if(Day!=tag)wochtag[Voraus3]=wochtag[Voraus3]+"
(1.Advent)"};
if(dat==vorher1){if(Day!=tag) wochtag[Voraus2]=wochtag[Voraus2]+"
(1.Advent)"};
};
/*--2. Advent-----------------------------------------------------------------*/
vorher5=zweiteradvent-5; if(vorher5<=0)vorher5=vorher5+30;
vorher4=zweiteradvent-4; if(vorher4<=0)vorher4=vorher4+30;
vorher3=zweiteradvent-3; if(vorher3<=0)vorher3=vorher3+30;
vorher2=zweiteradvent-2;
vorher1=zweiteradvent-1;
if(monat==11 && dat>25 || monat==12){
if(dat==vorher5){if(Day==tag) wochtag[Voraus5]=wochtag[Voraus5]+"
(2.Advent)"};
if(dat==vorher4){if(Day==tag)wochtag[Voraus4]=wochtag[Voraus4]+"
(2.Advent)";
else if(Day!=tag)wochtag[Voraus5]=wochtag[Voraus5]+"
(2.Advent)"};
if(dat==vorher3){if(Day==tag)wochtag[Voraus3]=wochtag[Voraus3]+"
(2.Advent)";
else if(Day!=tag)wochtag[Voraus4]=wochtag[Voraus4]+"
(2.Advent)"};
if(dat==vorher2){if(Day==tag)wochtag[Voraus2]=wochtag[Voraus2]+"
(2.Advent)";
else if(Day!=tag)wochtag[Voraus3]=wochtag[Voraus3]+"
(2.Advent)"};
if(dat==vorher1){if(Day!=tag) wochtag[Voraus2]=wochtag[Voraus2]+"
(2.Advent)"};
};
/*--3. Advent-----------------------------------------------------------------*/
vorher5=dritteradvent-5;
vorher4=dritteradvent-4;
vorher3=dritteradvent-3;
vorher2=dritteradvent-2;
vorher1=dritteradvent-1;
if(monat==12){
if(dat==vorher5){if(Day==tag)wochtag[Voraus5]=wochtag[Voraus5]+"
(3.Advent)"};
if(dat==vorher4){if(Day==tag)wochtag[Voraus4]=wochtag[Voraus4]+"
(3.Advent)";
else if(Day!=tag)wochtag[Voraus5]=wochtag[Voraus5]+"
(3.Advent)"};
if(dat==vorher3){if(Day==tag)wochtag[Voraus3]=wochtag[Voraus3]+"
(3.Advent)";
else if(Day!=tag)wochtag[Voraus4]=wochtag[Voraus4]+"
(3.Advent)"};
if(dat==vorher2){if(Day==tag)wochtag[Voraus2]=wochtag[Voraus2]+"
(3.Advent)";
else if(Day!=tag)wochtag[Voraus3]=wochtag[Voraus3]+"
(3.Advent)"};
if(dat==vorher1){if(Day!=tag)wochtag[Voraus2]=wochtag[Voraus2]+"
(3.Advent)"};
};
/*--4. Advent-----------------------------------------------------------------*/
vorher5=vierteradvent-5;
vorher4=vierteradvent-4;
vorher3=vierteradvent-3;
vorher2=vierteradvent-2;
vorher1=vierteradvent-1;
if(monat==12){
if(vierteradvent!=24){
if(dat==vorher5){if(Day==tag)wochtag[Voraus5]=wochtag[Voraus5]+"
(4.Advent)"};
if(dat==vorher4){if(Day==tag)wochtag[Voraus4]=wochtag[Voraus4]+"
(4.Advent)";
else if(Day!=tag)wochtag[Voraus5]=wochtag[Voraus5]+"
(4.Advent)"};
if(dat==vorher3){if(Day==tag)wochtag[Voraus3]=wochtag[Voraus3]+"
(4.Advent)";
else if(Day!=tag)wochtag[Voraus4]=wochtag[Voraus4]+"
(4.Advent)"};
if(dat==vorher2){if(Day==tag)wochtag[Voraus2]=wochtag[Voraus2]+"
(4.Advent)";
else if(Day!=tag)wochtag[Voraus3]=wochtag[Voraus3]+"
(4.Advent)"};
if(dat==vorher1){if(Day!=tag)wochtag[Voraus2]=wochtag[Voraus2]+"
(4.Advent)"};
};
};
/*------------------------------------------------------------------------------------------------*/
/*--Nikolaus, Weihnachten, Neujahr und Silvester --------------------------------------------------*/
if(monat==12){
if(dat==1){if(Day==tag) wochtag[Voraus5]=wochtag[Voraus5]+"
(Nikolaus)"};
if(dat==2){if(Day==tag)wochtag[Voraus4]=wochtag[Voraus4]+"
(Nikolaus)";
else if(Day!=tag)wochtag[Voraus5]=wochtag[Voraus5]+"
(Nikolaus)"};
if(dat==3){if(Day==tag)wochtag[Voraus3]=wochtag[Voraus3]+"
(Nikolaus)";
else if(Day!=tag)wochtag[Voraus4]=wochtag[Voraus4]+"
(Nikolaus)"};
if(dat==4){if(Day==tag)wochtag[Voraus2]=wochtag[Voraus2]+"
(Nikolaus)";
else if(Day!=tag)wochtag[Voraus3]=wochtag[Voraus3]+"
(Nikolaus)"};
if(dat==5){if(Day!=tag) wochtag[Voraus2]=wochtag[Voraus2]+"
(Nikolaus)"};
/*------------------------------------------------------------------------------------------------*/
if(dat==19){if(Day==tag)wochtag[Voraus5]=wochtag[Voraus5]+"
(Heiligabend)"};
if(dat==26){if(Day==tag)wochtag[Voraus5]=wochtag[Voraus5]+"
(Silvester)"};
if(dat==20){if(Day==tag)wochtag[Voraus4]=wochtag[Voraus4]+"
(Heiligabend)",
wochtag[Voraus5]=wochtag[Voraus5]+"
(1.Weihnachtsfeiertag)" ;
else if(Day!=tag)wochtag[Voraus5]=wochtag[Voraus5]+"
(Heiligabend)",
wochtag[Voraus6]=wochtag[Voraus6]+"
(1.Weihnachtsfeiertag)"};
if(dat==27){if(Day==tag)wochtag[Voraus4]=wochtag[Voraus4]+"
(Silvester)",
wochtag[Voraus5]=wochtag[Voraus5]+"
(Neujahr)" ;
else if(Day!=tag)wochtag[Voraus5]=wochtag[Voraus5]+"
(Silvester)",
wochtag[Voraus6]=wochtag[Voraus6]+"
(Neujahr)"};
if(dat==21){if(Day==tag)wochtag[Voraus3]=wochtag[Voraus3]+"
(Heiligabend)",
wochtag[Voraus4]=wochtag[Voraus4]+"
(1.Weihnachtsfeiertag)",
wochtag[Voraus5]=wochtag[Voraus5]+"
(2.Weihnachtsfeiertag)";
else if(Day!=tag)wochtag[Voraus4]=wochtag[Voraus4]+"
(Heiligabend)",
wochtag[Voraus5]=wochtag[Voraus5]+"
(1.Weihnachtsfeiertag)",
wochtag[Voraus6]=wochtag[Voraus6]+"
(2.Weihnachtsfeiertag)"};
if(dat==28){if(Day==tag)wochtag[Voraus3]=wochtag[Voraus3]+"
(Silvester)",
wochtag[Voraus4]=wochtag[Voraus4]+"
(Neujahr)";
else if(Day!=tag)wochtag[Voraus4]=wochtag[Voraus5]+"
(Silvester)"};
if(dat==22){if(Day==tag)wochtag[Voraus2]=wochtag[Voraus2]+"
(Heiligabend)",
wochtag[Voraus3]=wochtag[Voraus3]+"
(1.Weihnachtsfeiertag)",
wochtag[Voraus4]=wochtag[Voraus4]+"
(2.Weihnachtsfeiertag)";
else if(Day!=tag)wochtag[Voraus3]=wochtag[Voraus3]+"
(Heiligabend)",
wochtag[Voraus4]=wochtag[Voraus4]+"
(1.Weihnachtsfeiertag)",
wochtag[Voraus5]=wochtag[Voraus5]+"
(2.Weihnachtsfeiertag)"};
if(dat==29){if(Day==tag)wochtag[Voraus2]=wochtag[Voraus2]+"
(Silvester)",
wochtag[Voraus3]=wochtag[Voraus3]+"
(Neujahr)";
else if(Day!=tag)wochtag[Voraus3]=wochtag[Voraus3]+"
(Silvester)",
wochtag[Voraus4]=wochtag[Voraus4]+"
(Neujahr)"};
if(dat==23){if(Day==tag)wochtag[Voraus2]=wochtag[Voraus2]+"
(1.Weihnachtsfeiertag)",
wochtag[Voraus3]=wochtag[Voraus3]+"
(2.Weihnachtsfeiertag)";
else if(Day!=tag)wochtag[Voraus2]=wochtag[Voraus2]+"
(Heiligabend)",
wochtag[Voraus3]=wochtag[Voraus3]+"
(1.Weihnachtsfeiertag)",
wochtag[Voraus4]=wochtag[Voraus4]+"
(2.Weihnachtsfeiertag)"};
if(dat==30){if(Day==tag)wochtag[Voraus2]=wochtag[Voraus2]+"
(Neujahr)";
else if(Day!=tag)wochtag[Voraus2]=wochtag[Voraus2]+"
(Silvester)",
wochtag[Voraus3]=wochtag[Voraus3]+"
(Neujahr)"};
if(dat==24){if(Day==tag)wochtag[Voraus2]=wochtag[Voraus2]+"
(2.Weihnachtsfeiertag)";
else if(Day!=tag)wochtag[Voraus2]=wochtag[Voraus2]+"
(1.Weihnachtsfeiertag)",
wochtag[Voraus3]=wochtag[Voraus3]+"
(2.Weihnachtsfeiertag)"};
if(dat==25){if(Day!=tag)wochtag[Voraus2]=wochtag[Voraus2]+"
(2.Weihnachtsfeiertag)"};
if(dat==31){if(Day!=tag)wochtag[Voraus2]=wochtag[Voraus2]+"
(Neujahr)"};
};
/*---Dreikönig------------------------------------------------------------------------------------------------*/
if(monat==1){
if(dat==1){if(Day==tag)wochtag[Voraus5]=wochtag[Voraus5]+"
(Dreikönig)"};
if(dat==2){if(Day==tag)wochtag[Voraus4]=wochtag[Voraus4]+"
(Dreikönig)";
else if(Day!=tag)wochtag[Voraus5]=wochtag[Voraus5]+"
(Dreikönig)"};
if(dat==3){if(Day==tag)wochtag[Voraus3]=wochtag[Voraus3]+"
(Dreikönig)";
else if(Day!=tag)wochtag[Voraus4]=wochtag[Voraus4]+"
(Dreikönig)"};
if(dat==4){if(Day==tag)wochtag[Voraus2]=wochtag[Voraus2]+"
(Dreikönig)";
else if(Day!=tag)wochtag[Voraus3]=wochtag[Voraus3]+"
(Dreikönig)"};
if(dat==5){if(Day!=tag)wochtag[Voraus2]=wochtag[Voraus2]+"
(Dreikönig)"};
};
/*---Fasching-------------------------------------------------------------------------------------------------------*/
vorher5=rosenmontag-5;
vorher4=rosenmontag-4;
vorher3=rosenmontag-3;
vorher2=rosenmontag-2;
vorher1=rosenmontag-1;
if(rosenmontagmonat==3){
if(vorher5<=0)vorher5=vorher5+28+schalttag;
if(vorher4<=0)vorher4=vorher4+28+schalttag;
if(vorher3<=0)vorher3=vorher3+28+schalttag;
if(vorher2<=0)vorher2=vorher2+28+schalttag;
if(vorher1<=0)vorher1=vorher1+28+schalttag;
};
if(rosenmontagmonat==2){
if(vorher5<=0)vorher5=vorher5+31
if(vorher4<=0)vorher4=vorher4+31
if(vorher3<=0)vorher3=vorher3+31
if(vorher2<=0)vorher2=vorher2+31
if(vorher1<=0)vorher1=vorher1+31
};
/*---Falls die 5-Tage-Vorschau über einen Monatswechsel hinweggeht---------------------------------------------------*/
monatvorher5=rosenmontagmonat; monatvorher4=rosenmontagmonat;
monatvorher3=rosenmontagmonat;monatvorher2=rosenmontagmonat;monatvorher1=rosenmontagmonat;
if(rosenmontagmonat==3 && rosenmontag<=5) monatvorher5=2;
if(rosenmontagmonat==3 && rosenmontag<=4) monatvorher4=2;
if(rosenmontagmonat==3 && rosenmontag<=3) monatvorher3=2;
if(rosenmontagmonat==3 && rosenmontag<=2) monatvorher2=2;
if(rosenmontagmonat==3 && rosenmontag==1) monatvorher1=2;
if(rosenmontagmonat==2 && rosenmontag<=5) monatvorher5=1;
if(rosenmontagmonat==2 && rosenmontag<=4) monatvorher4=1;
if(rosenmontagmonat==2 && rosenmontag<=3) monatvorher3=1;
if(rosenmontagmonat==2 && rosenmontag<=2) monatvorher2=1;
if(rosenmontagmonat==2 && rosenmontag==1) monatvorher1=1;
if(monat==monatvorher5){
if(dat==vorher5){if(Day==tag) wochtag[Voraus5]="Rosen-
Montag"};
};
if(monat==monatvorher4){
if(dat==vorher4){if(Day==tag)wochtag[Voraus4]="Rosen-
Montag",
wochtag[Voraus5]="Faschings-
Dienstag" ;
else if(Day!=tag)wochtag[Voraus5]="Rosen-
Montag",
wochtag[Voraus6]="Faschings-
Dienstag"};
};
if(monat==monatvorher3){
if(dat==vorher3){if(Day==tag)wochtag[Voraus3]="Rosen-
Montag",
wochtag[Voraus4]="Faschings-
Dienstag",
wochtag[Voraus5]="Ascher-
Mittwoch";
else if(Day!=tag)wochtag[Voraus4]="Rosen-
Montag",
wochtag[Voraus5]="Faschings-
Dienstag",
wochtag[Voraus6]="Ascher-
Mittwoch"};
};
if(monat==monatvorher2){
if(dat==vorher2){if(Day==tag)wochtag[Voraus2]="Rosen-
Montag",
wochtag[Voraus3]="Faschings-
Dienstag",
wochtag[Voraus4]="Ascher-
Mittwoch";
else if(Day!=tag)wochtag[Voraus3]="Rosen-
Montag",
wochtag[Voraus4]="Faschings-
Dienstag",
wochtag[Voraus5]="Ascher-
Mittwoch"};
};
if(monat==monatvorher1){
if(dat==vorher1){if(Day==tag)wochtag[Voraus2]="Faschings-
Dienstag",
wochtag[Voraus3]="Ascher-
Mittwoch";
else if(Day!=tag)wochtag[Voraus2]="Rosen-Rosenmontag",
wochtag[Voraus3]="Faschings-
Dienstag",
wochtag[Voraus4]="Ascher-
Mittwoch"};
};
rosenmontag_plus=rosenmontag+1;
if(schalttag==0){if(rosenmontag_plus==29)rosenmontag_plus=1};
if(schalttag==1){if(rosenmontag_plus==30)rosenmontag_plus=1};
if(monat==rosenmontagmonat){
if(dat==rosenmontag){if(Day==tag)wochtag[Voraus2]="Ascher-
Mittwoch";
else if(Day!=tag)wochtag[Voraus2]="Faschings-
Dienstag",
wochtag[Voraus3]="Ascher-
Mittwoch"};
if(dat==rosenmontag_plus){if(Day!=tag) wochtag[Voraus2]="Ascher-
Mittwoch"};
};
/*---Karfreitag und Ostern------------------------------------------------------------------------------------------*/
vorher5=karfreitag-5; if(vorher5<=0)vorher5=vorher5+31;
vorher4=karfreitag-4; if(vorher4<=0)vorher4=vorher4+31;
vorher3=karfreitag-3; if(vorher3<=0)vorher3=vorher3+31;
vorher2=karfreitag-2; if(vorher2<=0)vorher2=vorher2+31;
vorher1=karfreitag-1; if(vorher1<=0)vorher1=vorher1+31;
/*---Falls die 5-Tage-Vorschau über einen Monatswechsel hinweggeht---------------------------------------------------*/
monatvorher5=karfreitagmonat; monatvorher4=karfreitagmonat;
monatvorher3=karfreitagmonat;monatvorher2=karfreitagmonat;monatvorher1=karfreitagmonat;
if(karfreitagmonat==4 && karfreitag<=5) monatvorher5=3;
if(karfreitagmonat==4 && karfreitag<=4) monatvorher4=3;
if(karfreitagmonat==4 && karfreitag<=3) monatvorher3=3;
if(karfreitagmonat==4 && karfreitag<=2) monatvorher2=3;
if(karfreitagmonat==4 && karfreitag==1) monatvorher1=3;
if(monat==monatvorher5){
if(dat==vorher5){if(Day==tag) wochtag[Voraus5]="Karfreitag"};
};
if(monat==monatvorher4){
if(dat==vorher4){if(Day==tag)wochtag[Voraus4]="Karfreitag";
else if(Day!=tag)wochtag[Voraus5]="Karfreitag"};
};
if(monat==monatvorher3){
if(dat==vorher3){if(Day==tag)wochtag[Voraus3]="Karfreitag",
wochtag[Voraus5]="Ostersonntag";
else if(Day!=tag)wochtag[Voraus4]="Karfreitag",
wochtag[Voraus6]="Ostersonntag"};
};
if(monat==monatvorher2){
if(dat==vorher2){if(Day==tag)wochtag[Voraus2]="Karfreitag",
wochtag[Voraus4]="Ostersonntag",
wochtag[Voraus5]="Ostermontag";
else if(Day!=tag)wochtag[Voraus3]="Karfreitag",
wochtag[Voraus5]="Ostersonntag"};
};
if(monat==monatvorher1){
if(dat==vorher1){if(Day==tag)wochtag[Voraus1]="Karfreitag",
wochtag[Voraus3]="Ostersonntag",
wochtag[Voraus4]="Ostermontag";
else if(Day!=tag)wochtag[Voraus2]="Karfreitag",
wochtag[Voraus4]="Ostersonntag",
wochtag[Voraus5]="Ostermontag"};
};
if(monat==karfreitagmonat){
if(dat==karfreitag){if(Day==tag)wochtag[Voraus2]="Ostersonntag",
wochtag[Voraus3]="Ostermontag";
else if(Day!=tag)wochtag[Voraus3]="Ostersonntag",
wochtag[Voraus4]="Ostermontag"};
};
karfreitag_plus=karfreitag+1;
if(karfreitag_plus==32)karfreitag_plus=1;
if(monat==karfreitagmonat || monat==ostersonntagmonat){
if(dat==karfreitag_plus){if(Day==tag)wochtag[Voraus1]="Ostersonntag",
wochtag[Voraus2]="Ostermontag";
else if(Day!=tag)wochtag[Voraus2]="Ostersonntag",
wochtag[Voraus3]="Ostermontag"};
if(dat==ostersonntag){if(Day==tag)wochtag[Voraus1]="Ostermontag";
else if(Day!=tag)wochtag[Voraus2]="Ostermontag"};
};
/*---Maifeiertag---------------------------------------------------------------------------------------------------*/
if(monat==4){
if(dat==26){if(Day==tag) wochtag[Voraus5]=wochtag[Voraus5]+"
(Maifeiertag)"};
if(dat==27){if(Day==tag)wochtag[Voraus4]=wochtag[Voraus4]+"
(Maifeiertag)";
else if(Day!=tag)wochtag[Voraus5]=wochtag[Voraus5]+"
(Maifeiertag)"};
if(dat==28){if(Day==tag)wochtag[Voraus3]=wochtag[Voraus3]+"
(Maifeiertag)";
else if(Day!=tag)wochtag[Voraus4]=wochtag[Voraus4]+"
(Maifeiertag)"};
if(dat==29){if(Day==tag)wochtag[Voraus2]=wochtag[Voraus2]+"
(Maifeiertag)";
else if(Day!=tag)wochtag[Voraus3]=wochtag[Voraus3]+"
(Maifeiertag)"};
if(dat==30){if(Day!=tag) wochtag[Voraus2]=wochtag[Voraus2]+"
(Maifeiertag)"};
};
/*---Himmelfahrt ---------------------------------------------------------------------------------------------------*/
vorher5=himmelfahrt-5;
vorher4=himmelfahrt-4;
vorher3=himmelfahrt-3;
vorher2=himmelfahrt-2;
vorher1=himmelfahrt-1;
if(monat==himmelfahrtmonat){
if(dat==vorher5){if(Day==tag) wochtag[Voraus5]=wochtag[Voraus5]+"
(Himmelfahrt)"};
if(dat==vorher4){if(Day==tag)wochtag[Voraus4]=wochtag[Voraus4]+"
(Himmelfahrt)";
else if(Day!=tag)wochtag[Voraus5]=wochtag[Voraus5]+"
(Himmelfahrt)"};
if(dat==vorher3){if(Day==tag)wochtag[Voraus3]=wochtag[Voraus3]+"
(Himmelfahrt)";
else if(Day!=tag)wochtag[Voraus4]=wochtag[Voraus4]+"
(Himmelfahrt)"};
if(dat==vorher2){if(Day==tag)wochtag[Voraus2]=wochtag[Voraus2]+"
(Himmelfahrt)";
else if(Day!=tag)wochtag[Voraus3]=wochtag[Voraus3]+"
(Himmelfahrt)"};
if(dat==vorher1){if(Day!=tag) wochtag[Voraus2]=wochtag[Voraus2]+"
(Himmelfahrt)"};
};
/*---Pfingsten -----------------------------------------------------------------------------------------------------*/
vorher5=pfingstsonntag-5; if(vorher5<=0)vorher5=vorher5+31;
vorher4=pfingstsonntag-4; if(vorher4<=0)vorher4=vorher4+31;
vorher3=pfingstsonntag-3; if(vorher3<=0)vorher3=vorher3+31;
vorher2=pfingstsonntag-2; if(vorher2<=0)vorher2=vorher2+31;
vorher1=pfingstsonntag-1; if(vorher1<=0)vorher1=vorher1+31;
/*---Falls die 5-Tage-Vorschau über einen Monatswechsel hinweggeht---------------------------------------------------*/
monatvorher5=pfingstmonat; monatvorher4=pfingstmonat;
monatvorher3=pfingstmonat;monatvorher2=pfingstmonat;monatvorher1=pfingstmonat;
if(pfingstmonat==6 && pfingstsonntag<=5) monatvorher5=5;
if(pfingstmonat==6 && pfingstsonntag<=4) monatvorher4=5;
if(pfingstmonat==6 && pfingstsonntag<=3) monatvorher3=5;
if(pfingstmonat==6 && pfingstsonntag<=2) monatvorher2=5;
if(pfingstmonat==6 && pfingstsonntag==1) monatvorher1=5;
if(monat==monatvorher5){
if(dat==vorher5){if(Day==tag) wochtag[Voraus5]="Pfingstsonntag"}
};
if(monat==monatvorher4){
if(dat==vorher4){if(Day==tag)wochtag[Voraus4]="Pfingstsonntag",
wochtag[Voraus5]="Pfingstmontag";
else if(Day!=tag)wochtag[Voraus5]="Pfingstsonntag"};
};
if(monat==monatvorher3){
if(dat==vorher3){if(Day==tag)wochtag[Voraus3]="Pfingstsonntag",
wochtag[Voraus4]="Pfingstmontag";
else if(Day!=tag)wochtag[Voraus4]="Pfingstsonntag",
wochtag[Voraus5]="Pfingstmontag"};
};
if(monat==monatvorher2){
if(dat==vorher2){if(Day==tag)wochtag[Voraus2]="Pfingstsonntag",
wochtag[Voraus3]="Pfingstmontag";
else if(Day!=tag)wochtag[Voraus3]="Pfingstsonntag",
wochtag[Voraus4]="Pfingstmontag"};
};
if(monat==monatvorher1){
if(dat==vorher1){if(Day==tag)wochtag[Voraus1]="Pfingstsonntag",
wochtag[Voraus2]="Pfingstmontag";
else if(Day!=tag)wochtag[Voraus2]="Pfingstsonntag",
wochtag[Voraus3]="Pfingstmontag"};
};
if(monat==pfingstmonat){
if(dat==pfingstsonntag){if(Day!=tag)wochtag[Voraus2]="Pfingstmontag"};
};
/*---Fronleichnam---------------------------------------------------------------------------------------------------*/
vorher5=fronleichnam-5;
vorher4=fronleichnam-4;
vorher3=fronleichnam-3;
vorher2=fronleichnam-2;
vorher1=fronleichnam-1;
if(monat==fronleichnammonat){
if(dat==vorher5){if(Day==tag) wochtag[Voraus5]=wochtag[Voraus5]+"
(Fronleichnam)"};
if(dat==vorher4){if(Day==tag)wochtag[Voraus4]=wochtag[Voraus4]+"
(Fronleichnam)";
else if(Day!=tag)wochtag[Voraus5]=wochtag[Voraus5]+"
(Fronleichnam)"};
if(dat==vorher3){if(Day==tag)wochtag[Voraus3]=wochtag[Voraus3]+"
(Fronleichnam)";
else if(Day!=tag)wochtag[Voraus4]=wochtag[Voraus4]+"
(Fronleichnam)"};
if(dat==vorher2){if(Day==tag)wochtag[Voraus2]=wochtag[Voraus2]+"
(Fronleichnam)";
else if(Day!=tag)wochtag[Voraus3]=wochtag[Voraus3]+"
(Fronleichnam)"};
if(dat==vorher1){if(Day!=tag) wochtag[Voraus2]=wochtag[Voraus2]+"
(Fronleichnam)"};
};
/*---Tag der Einheit und Allerheiligen-------------------------------------------------------------------------------*/
if(monat==9){
if(dat==28){if(Day==tag) wochtag[Voraus5]=wochtag[Voraus5]+"
(Tag der Einheit)"};
if(dat==29){if(Day==tag)wochtag[Voraus4]=wochtag[Voraus4]+"
(Tag der Einheit)";
else if(Day!=tag)wochtag[Voraus5]=wochtag[Voraus5]+"
(Tag der Einheit)"};
if(dat==30){if(Day==tag)wochtag[Voraus3]=wochtag[Voraus3]+"
(Tag der Einheit)";
else if(Day!=tag)wochtag[Voraus4]=wochtag[Voraus4]+"
(Tag der Einheit)"};
};
if(monat==10){
if(dat==1){if(Day==tag)wochtag[Voraus2]=wochtag[Voraus2]+"
(Tag der Einheit)";
else if(Day!=tag)wochtag[Voraus3]=wochtag[Voraus3]+"
(Tag der Einheit)"};
if(dat==2){if(Day!=tag) wochtag[Voraus2]=wochtag[Voraus2]+"
(Tag der Einheit)"};
if(dat==27){if(Day==tag) wochtag[Voraus5]=wochtag[Voraus5]+"
(Allerheiligen)"};
if(dat==28){if(Day==tag)wochtag[Voraus4]=wochtag[Voraus4]+"
(Allerheiligen)";
else if(Day!=tag)wochtag[Voraus5]=wochtag[Voraus5]+"
(Allerheiligen)"};
if(dat==29){if(Day==tag)wochtag[Voraus3]=wochtag[Voraus3]+"
(Allerheiligen)";
else if(Day!=tag)wochtag[Voraus4]=wochtag[Voraus4]+"
(Allerheiligen)"};
if(dat==30){if(Day==tag)wochtag[Voraus2]=wochtag[Voraus2]+"
(Allerheiligen)";
else if(Day!=tag)wochtag[Voraus3]=wochtag[Voraus3]+"
(Allerheiligen)"};
if(dat==31){if(Day!=tag) wochtag[Voraus2]=wochtag[Voraus2]+"
(Allerheiligen)"};
};
/*---Frühlingsanfang---------------------------------------------------------------------------------------------------*/
if(monat==3){
if(dat==fruehling-5){if(Day==tag) wochtag[Voraus5]=wochtag[Voraus5]+"
(Frühlingsanfang)"};
if(dat==fruehling-4){if(Day==tag)wochtag[Voraus4]=wochtag[Voraus4]+"
(Frühlingsanfang)";
else if(Day!=tag)wochtag[Voraus5]=wochtag[Voraus5]+"
(Frühlingsanfang)"};
if(dat==fruehling-3){if(Day==tag)wochtag[Voraus3]=wochtag[Voraus3]+"
(Frühlingsanfang)";
else if(Day!=tag)wochtag[Voraus4]=wochtag[Voraus4]+"
(Frühlingsanfang)"};
if(dat==fruehling-2){if(Day==tag)wochtag[Voraus2]=wochtag[Voraus2]+"
(Frühlingsanfang)";
else if(Day!=tag)wochtag[Voraus3]=wochtag[Voraus3]+"
(Frühlingsanfang)"};
if(dat==fruehling-1){if(Day!=tag) wochtag[Voraus2]=wochtag[Voraus2]+"
(Frühlingsanfang)"};
};
/*---Sommeranfang---------------------------------------------------------------------------------------------------*/
if(monat==6){
if(dat==sommer-5){if(Day==tag) wochtag[Voraus5]=wochtag[Voraus5]+"
(Sommeranfang)"};
if(dat==sommer-4){if(Day==tag)wochtag[Voraus4]=wochtag[Voraus4]+"
(Sommeranfang)";
else if(Day!=tag)wochtag[Voraus5]=wochtag[Voraus5]+"
(Sommeranfang)"};
if(dat==sommer-3){if(Day==tag)wochtag[Voraus3]=wochtag[Voraus3]+"
(Sommeranfang)";
else if(Day!=tag)wochtag[Voraus4]=wochtag[Voraus4]+"
(Sommeranfang)"};
if(dat==sommer-2){if(Day==tag)wochtag[Voraus2]=wochtag[Voraus2]+"
(Sommeranfang)";
else if(Day!=tag)wochtag[Voraus3]=wochtag[Voraus3]+"
(Sommeranfang)"};
if(dat==sommer-1){if(Day!=tag) wochtag[Voraus2]=wochtag[Voraus2]+"
(Sommeranfang)"};
};
/*---Herbstanfang---------------------------------------------------------------------------------------------------*/
if(monat==9){
if(dat==herbst-5){if(Day==tag) wochtag[Voraus5]=wochtag[Voraus5]+"
(Herbstanfang)"};
if(dat==herbst-4){if(Day==tag)wochtag[Voraus4]=wochtag[Voraus4]+"
(Herbstanfang)";
else if(Day!=tag)wochtag[Voraus5]=wochtag[Voraus5]+"
(Herbstanfang)"};
if(dat==herbst-3){if(Day==tag)wochtag[Voraus3]=wochtag[Voraus3]+"
(Herbstanfang)";
else if(Day!=tag)wochtag[Voraus4]=wochtag[Voraus4]+"
(Herbstanfang)"};
if(dat==herbst-2){if(Day==tag)wochtag[Voraus2]=wochtag[Voraus2]+"
(Herbstanfang)";
else if(Day!=tag)wochtag[Voraus3]=wochtag[Voraus3]+"
(Herbstanfang)"};
if(dat==herbst-1){if(Day!=tag) wochtag[Voraus2]=wochtag[Voraus2]+"
(Herbstanfang)"};
};
/*---Winteranfang---------------------------------------------------------------------------------------------------*/
if(monat==12){
if(dat==winter-5){if(Day==tag) wochtag[Voraus5]=wochtag[Voraus5]+"
(Winteranfang)"};
if(dat==winter-4){if(Day==tag)wochtag[Voraus4]=wochtag[Voraus4]+"
(Winteranfang)";
else if(Day!=tag)wochtag[Voraus5]=wochtag[Voraus5]+"
(Winteranfang)"};
if(dat==winter-3){if(Day==tag)wochtag[Voraus3]=wochtag[Voraus3]+"
(Winteranfang)";
else if(Day!=tag)wochtag[Voraus4]=wochtag[Voraus4]+"
(Winteranfang)"};
if(dat==winter-2){if(Day==tag)wochtag[Voraus2]=wochtag[Voraus2]+"
(Winteranfang)";
else if(Day!=tag)wochtag[Voraus3]=wochtag[Voraus3]+"
(Winteranfang)"};
if(dat==winter-1){if(Day!=tag) wochtag[Voraus2]=wochtag[Voraus2]+"
(Winteranfang)"};
};