/* SSIGNORE
 Ignorieren dieser Datei beim Aufruf der Suchfunktion */
 
 function richtigesdatum(dateStr) {

var datePat = /^(\d{1,2})(\/|-)(\d{1,2})\2(\d{4})$/; // requires 4 digit year
var datePaty = /^(\d{1,2})(\/|-)(\d{1,2})(\/|-)(\d{4})$/; // requires 4 digit year

var matchArray = dateStr.match(datePat); // is the format ok?
if (matchArray == null) {
	var matchArray = dateStr.match(datePaty);
	if (matchArray == null) {
		alert("Datumseingabe ist ungültig!")
		return false;
     }
}
month = matchArray[1]; // parse date into variables
day = matchArray[3];
year = matchArray[4];
if (month < 1 || month > 12) { // check month range
alert("Monat muss zwischen 1 und 12 liegen!");
return false;
}
if (day < 1 || day > 31) {
alert("Tag muss zwischen 1 and 31 liegen!");
return false;
}
if ((month==4 || month==6 || month==9 || month==11) && day==31) {
alert("Der Monat "+month+" hat keine 31 Tage!")
return false;
}
if (month == 2) { // check for february 29th
var isleap = (year % 4 == 0 && (year % 100 != 0 || year % 400 == 0));
if (day>29 || (day==29 && !isleap)) {
alert("Der Februar im Jahr " + year + " hat keine " + day + " Tage!");
return false;
   }
}
return true;
}

function datumsanzeige(dateObj) {
month = dateObj.getMonth()+1;
month = (month < 10) ? "0" + month : month;

day   = dateObj.getDate();
day = (day < 10) ? "0" + day : day;

year  = dateObj.getYear();
if (year < 2000) year += 1900;

return (month + "/" + day + "/" + year);
}

function ssrechner(ssform) {
blutung = new Date(); // creates new date objects
eisprung = new Date();
schutz = new Date();
gebtermin = new Date();
heute = new Date();
zyklus = 0; // sets variables to invalid state ==> 0
if (richtigesdatum(ssform.blutung.value)) { // Validates menstual date 
blutunginput = new Date(ssform.blutung.value);
blutung.setTime(blutunginput.getTime())
}
else return false; // otherwise exits

zyklus = (ssform.zyklus.value == "" ? 28 : ssform.zyklus.value); // defaults to 28
// validates zyklus range, from 22 to 45
if (ssform.zyklus.value != "" && (ssform.zyklus.value < 22 || ssform.zyklus.value > 45)) {
alert("Ihre Zykluslänge ist entweder zu kurz oder zu lang \n"
+ "um Ihre Termine korrekt zu bestimmen! Die Berechnung \n"
+ "wird dennoch mit Ihren Angaben erfolgen. ");
}
// the '*86400000' is necessary because date objects track time
// in milliseconds;  86400000 milliseconds equals one day
eisprung.setTime(blutung.getTime() + (zyklus*86400000) - (14*86400000));
ssform.konzeption.value = datumsanzeige(eisprung);

// sets due date to ovulation date plus 267 days
gebtermin.setTime(eisprung.getTime() + 267*86400000);
ssform.gebtermin.value = datumsanzeige(gebtermin);

// sets gebtermin date minus 56 days
schutz.setTime(gebtermin.getTime() - 56*86400000);
ssform.schutz.value = datumsanzeige(schutz);

// sets fetal age to 14 + 267 (pregnancy time) - time left
var fetusalter = 281 - ((gebtermin - heute) / 86400000);
weeks = parseInt(fetusalter / 7); // sets weeks to whole number of weeks
days = Math.floor(fetusalter % 7); // sets days to the whole number remainder
// fetal age message, automatically includes 's' on week and day if necessary
fetusalter = (weeks > 0 ? (weeks + " Woche" + (weeks > 1 ? "n" : "")) + ", ":"" )+ days + " Tag" + (days != 1 ? "e" : "");
ssform.fetusalter.value = fetusalter;
return false; // form should never submit, returns false
}
