// Code written by Natalie V. Zubar, revised by Willy De Roeck. Translate by kwebbel.net
// Author claims no responsibility for esoteric method of past-life calculations and its results.
// If you decided to use it you were a thief in your past life and you will cheat forever!

function mod(x, x_div){
    for (var i=x; i>=x_div; i -= x_div);
    return i;
}

function checkNum(str, min, max) {
    if (str == "") {
        alert("Μην αφήνετε κενό!");
        return false;    }

    for (var i = 0; i < str.length; i++) {
        var ch = str.substring(i, i + 1);
        if (ch < "0" || ch > "9") {
            alert("Αριθμό, παρακαλώ!");
            return false;
        }
    }

    var val = parseInt(str, 10);
    if ((val < min) || (val > max)) {
        alert("Γράψτε έναν αριθμό από το 1 έως το "+max+".");
        return false;
    }

    return true;
}



function pastlife(form){
	var sex; 

//Check for a valid date			

     if ((checkNum(form.day.value,1,31)) && (checkNum(form.month.value,1,12)) &&
        (checkNum(form.year.value,0,99)))  {	
	var day = parseInt(form.day.value,10);
	var cur_month = parseInt(form.month.value,10);
	var cur_year = parseInt(form.year.value,10);

// define past life sex

	if (cur_month-2*(parseInt(cur_month/2)) == 0){
		if (cur_year - 4*(parseInt(cur_year/4)) == 0)
			sex = 1; else sex = 2} 
  	      else if (cur_year - 4*(parseInt(cur_year/4)) == 0)
			sex = 0; else sex = 1};


msgWindow=window.open("","diagnosis","width=900,height=700,screenX=50,screenY=50,toolbar=no,location=no,directories=no,status=no,scrollbars=yes,resizable=yes,copyhistory=no");
msgWindow.document.open(); 
msgWindow.document.bgColor="black";
msgWindow.document.writeln("<BODY BACKGROUND=starsglow1.gif LINK=#FFB401 VLINK=#FFB401>");
msgWindow.document.write("<div align=center><img src=http://users.pandora.be/gad/re/uvijnklein.jpg></div>");	
msgWindow.document.write("<FONT Color=red Face=Arial><B><I>Πρόβλεψη:</I></B></FONT><FONT Color=white Face=Arial>"); 
msgWindow.document.write("<P>Ανεξάρτητα το πώς νοιώθεις, ήσουν ");



	var yearString = "ZYXWOTZYQVUTSXWVNZYXPQTZRWVUMYXWOTZYQVUTSXWVNZYXPUTZRWVUMYXWOTZYQVUTSXWVNZYXPUTZRWVUMYXWOTZYQVUTSXWV";

	var ys; ys = yearString.charAt(cur_year);

	var p1; var p2; var place;
	if (sex == 1){

		msgWindow.document.write("<FONT color=yellow>άντρας.</FONT>");



	//for males	



	var indexString = "VTWZXYURPSOMNQYWZVTUXOMPSQRNWUXTYZVMRNQOPSUZVYWXTRPSOMNQTYUXVWZPNQMRSOYWZVTUXNSORPQM";

	

	var profString = "CDBADCABBACD";

		

	p1 = profString.charAt(cur_month-1);

	

	for (i=0;i<=6;i++){

		if (ys == indexString.charAt((cur_month-1)*7+i)) break}



	p2 = i+1;




	//PLACE OF BIRTH Male




	if (p2 == 1){

		if (day < 3) place=5;

		else if (day < 10) place=46;

		else if (day < 17) place=37;

		else if (day < 24) place=48;

		else if (day < 31) place=65;

		else place=6};



	if (p2 == 2){

		if (day < 8) place=28;

		else if (day < 15) place=58;

		else if (day < 22) place=10;

		else if (day < 29) place=38;

		else place=11};



	if (p2 == 3){

		if (day < 4) place=29;

		else if (day < 11) place=53;

		else if (day < 18) place=30;

		else if (day < 25) place=69;

		else place=1};



	if (p2 == 4){

		if (day < 7) place=74;

		else if (day < 14) place=4;

		else if (day < 21) place=47;

		else if (day < 28) place=20;

		else place=26};



	if (p2 == 5){

		if (day < 5) place=23;

		else if (day < 12) place=21;

		else if (day < 19) place=44;

		else if (day < 26) place=16;

		else place=43};



	if (p2 == 6){

		if (day < 6) place=34;

		else if (day < 13) place=27;

		else if (day < 20) place=14;

		else if (day < 27) place=41;

		else place=50};



	if (p2 == 7){

		if (day < 2) place=73;

		else if (day < 9) place=63;

		else if (day < 16) place=66;

		else if (day < 23) place=54;

		else if (day < 30) place=61;

		else place=72}

}

	else {

	//for females



   		msgWindow.document.write("<FONT color=yellow>γυναίκα.</FONT>");



	var indexString = "OMPSQRNYWZVTUXSQMPNORUZVYWXTQORNSMPZXTWUVYOMPSQRNXVYUZTWNSORPQMVTWZXYUSQMPNORTYUXVWZ";

	

	var profString = "ACDBCABDDBCA";

		

	p1 = profString.charAt(cur_month-1);

	

	for (i=0;i<=6;i++){

		if (ys == indexString.charAt((cur_month-1)*7+i)) break}



	p2 = i+1;

 
		//PLACE OF BIRTH Female



	if (p2 == 1){

		if (day < 3) place=22;

		else if (day < 10) place=17;

		else if (day < 17) place=36;

		else if (day < 24) place=59;

		else if (day < 31) place=51;

		else place=9};



	if (p2 == 2){

		if (day < 8) place=40;

		else if (day < 15) place=2;

		else if (day < 22) place=64;

		else if (day < 29) place=56;

		else place=35};



	if (p2 == 3){

		if (day < 4) place=19;

		else if (day < 11) place=67;

		else if (day < 18) place=13;

		else if (day < 25) place=32;

		else place=31};



	if (p2 == 4){

		if (day < 7) place=15;

		else if (day < 14) place=49;

		else if (day < 21) place=12;

		else if (day < 28) place=39;

		else place=33};



	if (p2 == 5){

		if (day < 5) place=42;

		else if (day < 12) place=60;

		else if (day < 19) place=24;

		else if (day < 26) place=3;

		else place=52};



	if (p2 == 6){

		if (day < 6) place=18;

		else if (day < 13) place=25;

		else if (day < 20) place=57;

		else if (day < 27) place=45;

		else place=62};



	if (p2 == 7){

		if (day < 2) place=8;

		else if (day < 9) place=55;

		else if (day < 16) place=70;


		else if (day < 23) place=68;

		else if (day < 30) place=71;

		else place=7}

}

	

	var pro; pro=p1+p2;



	msgWindow.document.write(" " + "<BR>");

	

	//msgWindow.document.write("month=" + cur_month + " place=" + place + " ys=" + ys + " pro=" + pro + "<BR>");



	

	//countries data

	var countryString="";

	if (place == 1) countryString="Αλάσκα"; 

	else if (place == 2) countryString="Γιούκον"; 

	else if (place == 3) countryString="Βόρειο Καναδά"; 

	else if (place == 4) countryString="Οντάριο"; 

	else if (place == 5) countryString="Κεμπέκ";

	else if (place == 6) countryString="Λαμπραντόρ"; 

	else if (place == 7) countryString="Νέα Γη"; 

	else if (place == 8) countryString="Γροιλανδία"; 

	else if (place == 9) countryString="ΗΠΑ, Βόρειο-Δυτικά"; 

	else if (place == 10) countryString="ΗΠΑ, Νότιο-Δυτικά";

	else if (place == 11) countryString="ΗΠΑ, Βόρειο-Κεντρική"; 

	else if (place == 12) countryString="ΗΠΑ, Νότιο-Κεντρική"; 

	else if (place == 13) countryString="ΗΠΑ, Βόρειο-Ανατολικά"; 

	else if (place == 14) countryString="ΗΠΑ, Νότιο-Ανατολικά"; 

	else if (place == 15) countryString="Αρκτική"; 

	else if (place == 16) countryString="Σκωτία"; 

	else if (place == 17) countryString="Βόρεια Αγγλία"; 

	else if (place == 18) countryString="Κεντρική Αγγλία"; 

	else if (place == 19) countryString="Νότια Αγγλία";

	else if (place == 20) countryString="Ουαλία"; 

	else if (place == 21) countryString="Ιρλανδία"; 

	else if (place == 22) countryString="Βόρεια Ευρώπη"; 

	else if (place == 23) countryString="Γαλλία"; 

	else if (place == 24) countryString="Ισπανία"; 

	else if (place == 25) countryString="Πορτογαλία"; 

	else if (place == 26) countryString="Αυστρία"; 

	else if (place == 27) countryString="Γερμανία"; 

	else if (place == 28) countryString="Ουκρανία"; 

	else if (place == 29) countryString="Ιταλία"; 

	else if (place == 30) countryString="Τουρκία"; 

	else if (place == 31) countryString="Δυτική Ρωσία"; 

	else if (place == 32) countryString="Σιβηρία"; 

	else if (place == 33) countryString="Κεντρική Ρωσία"; 

	else if (place == 34) countryString="Ελλάδα"; 

	else if (place == 35) countryString="Περσία"; 

	else if (place == 36) countryString="Σαουδική Αραβία"; 

	else if (place == 37) countryString="Πολωνία"; 

	else if (place == 38) countryString="Ουγγαρία"; 

	else if (place == 39) countryString="Γιουγκοσλαβία"; 

	else if (place == 40) countryString="Ρουμανία"; 

	else if (place == 41) countryString="Βουλγαρία"; 

	else if (place == 42) countryString="Ιζραήλ"; 

	else if (place == 43) countryString="Θιβέτ"; 

	else if (place == 44) countryString="Βιρμανία"; 

	else if (place == 45) countryString="Ταϊλάνδη"; 

	else if (place == 46) countryString="Νότια Κίνα"; 

	else if (place == 47) countryString="Μογγολία"; 

	else if (place == 48) countryString="Βόρεια Κίνα"; 

	else if (place == 49) countryString="Κορέα"; 

	else if (place == 50) countryString="Βόρεια Ιαπωνία"; 

	else if (place == 51) countryString="Νότια Ιαπωνία"; 

	else if (place == 52) countryString="Σουμάτρα"; 

	else if (place == 53) countryString="Βόρνεο"; 

	else if (place == 54) countryString="Φιλιππίνες"; 

	else if (place == 55) countryString="Νέα Γουϊνέα"; 

	else if (place == 56) countryString="Βόρεια Αυστραλία"; 

	else if (place == 57) countryString="Δυτική Αυστραλία"; 

	else if (place == 58) countryString="Ανατολική Αυστραλία";

	else if (place == 59) countryString="Νότια Αυστραλία"; 

	else if (place == 60) countryString="Βόρεια Νέα Ζηλανδία"; 

	else if (place == 61) countryString="Νότια Νέα Ζηλανδία"; 

	else if (place == 62) countryString="Ωκεανία";

	else if (place == 63) countryString="Βόρεια Ινδία"; 

	else if (place == 64) countryString="Κεντρική Ινδία"; 

	else if (place == 65) countryString="Νότια Ινδία"; 

	else if (place == 66) countryString="Αίγυπτος"; 

	else if (place == 67) countryString="Βόρεια Αφρική"; 

	else if (place == 68) countryString="Δυτική Αφρική"; 

	else if (place == 69) countryString="Κεντρική Αφρική"; 

	else if (place == 70) countryString="Νότια Αφρική"; 

	else if (place == 71) countryString="Μεξικό"; 

	else if (place == 72) countryString="Κύπρος";

	else if (place == 73) countryString="Βόρεια Λατινική Αμερική"; 

	else countryString="Νότια Λατινική Αμερική";



	//year of past life calculation

	

	var ys1;



	     if (ys == "M") var mString = "185014001125102507000700180014751800130011751100";

	else if (ys == "N") var mString = "092518750425185017501350080006750825182515250875";

	else if (ys == "O") var mString = "172516750875070013251825177508001075165009001625";

	else if (ys == "P") var mString = "145005001800100008000550165017001325072511001550";

	else if (ys == "Q") var mString = "100014500950042517001525135011001625122517251025";

	else if (ys == "R") var mString = "097513751200127504500825137513500700092509250725";

	else if (ys == "S") var mString = "122506251250142509251150147507501300157506001125";

	else if (ys == "T") var mString = "117514001825127517500975185011501600187515251850";

	else if (ys == "U") var mString = "090009000775105013751675107515000825072510251500";

	else if (ys == "V") var mString = "122507501825140011501325167512751475160009501200";

	else if (ys == "W") var mString = "057516750775047517001450085017251775102517750400";

	else if (ys == "X") var mString = "180015751425157515501200160012001300037507751250";

	else if (ys == "Y") var mString = "107512501000165009501825155014250800175010750875";

	else                    var mString = "097505251175085015751125177513500700065013501050";

	

	ys1 = mString.charAt((cur_month-1)*4); 

	if (ys1 == "0") ys1 = ""; {

	ys1 += mString.charAt((cur_month-1)*4+1);

		ys1 += mString.charAt((cur_month-1)*4+2); ys1 += mString.charAt((cur_month-1)*4+3)} ;

		
	//past life profession



           if (pro == "A1") var proString = "νεκροθάφτης";

	else if (pro == "A2") var proString = " φιλόσοφος, διανοούμενος";

	else if (pro == "A3") var proString = " σχεδιαστής, τεχνίτης, μηχανικός";

	else if (pro == "A4") var proString = " χημικός, φαρμακοποιός, αλχημιστής";

	else if (pro == "A5") var proString = " ναυτικός, ξυλουργός, μάγειρας";

	else if (pro == "A6") var proString = " ωρολογοποιός, χρυσοχόος";

	else if (pro == "A7") var proString = " γιατρός, χειρούργος, βοτανολόγος";

	else if (pro == "C1") var proString = " ξυλοκόπος, ιππέας, βοσκός";

	else if (pro == "C2") var proString = " διοικητής, καπετάνιος, αρχηγός";

	else if (pro == "C3") var proString = " βιβλιοθηκάριος, ιερέας, φύλακας κειμηλίων";

	else if (pro == "C4") var proString = " ποιητής, διασκεδαστής, μουσικός";

	else if (pro == "C5") var proString = "χρηματιστής, έμπορος, ναυτικός";

	else if (pro == "C6") var proString = " δολοφόνος, μελισσοκόμος, καλόγερος";

	else if (pro == "C7") var proString = " συγγραφέας, διοργανωτής τελετών, δραματουργός";

	else if (pro == "B1") var proString = " χτίστης σε δρόμους, λιμάνια και γέφυρες";

	else if (pro == "B2") var proString = " αστρολόγος, αστρονόμος, χαρτογράφος";

	else if (pro == "B3") var proString = " χειροτέχνης, μηχανικός";

	else if (pro == "B4") var proString = " κυνηγός, πολεμιστής, εκτελεστής σε θυσίες";

	else if (pro == "B5") var proString = " καλλιτέχνης, μάγος, γυρολόγος";

	else if (pro == "B6") var proString = " τσαγκάρης, ναύτης";

	else if (pro == "B7") var proString = " χτίστης σπιτιών, εκκλησιών, καθεδρικών ναών";

	else if (pro == "D1") var proString = " εκπαιδευτής ή κάτοχος εκλεκτών ζώων, πουλιών";

	else if (pro == "D2") var proString = " ιεροκήρυκας, εκδότης, γραφέας αρχαίων κειμένων";

	else if (pro == "D3") var proString = " γεωργός, ράφτης, υφαντής";

	else if (pro == "D4") var proString = " δραματουργός, μουσικός, σκηνοθέτης, βάρδος";

	else if (pro == "D5") var proString = " τραπεζίτης, τοκογλύφος, δανειστής χρημάτων, δικαστής";

	else if (pro == "D6") var proString = " δάσκαλος, γεωλόγος, μαθηματικός";

	else var proString = " χορευτής, ηθοποιός, τραγουδιστής";

	 

	//characteristics




	if (p2 == 1) {

		if (place-2*(parseInt(place/2)) > 0) var charString = "Άτομο με πολύ ενέργεια, με ικανότητες στην εποπτεία και το σχεδιασμό πλάνων. Ακόμη και σκουπιδιάρης να ήσουν θα ήσουν σίγουρα ο αρχηγός. ";	else var charString = "Επαναστατικό πνεύμα. Εμπνέετε αλλαγές σε κάθε τομέα της ζωής - πολιτική, θρησκεία, επιχειρήσεις, νοικοκυριό. Θα μπορούσες να ήσουν ο αρχηγός."

};

if (p2 == 2) {	if (place-2*(parseInt(place/2)) > 0) var charString = "Καλλιτεχνική προσωπικότητα που μετατρέπει τα άσχημα σε ωραία και τα γκρι σε φωτεινά χρώματα. Σε κάθε κατάσταση μπορείτε να εκφραστείτε δημιουργικά.";else var charString = "Ντροπαλό, συγκρατημένο, σιωπηλό άτομο. Είχατε δημιουργικά ταλέντα, αλλά περιμένατε μέχρι την τωρινή σας ζωή για να τα εκφράσετε. Μερικές φορές το περιβάλλον σας, σας αντιμετώπισε παράξενα."

};

if (p2 == 3) {	if (place-2*(parseInt(place/2)) > 0) var charString = "Αναζητητής της σοφίας και της αλήθειας. Θα μπορούσατε να έχετε δει τις μελλοντικές ζωές σας. Οι άλλοι σας έβλεπαν σαν ιδεαλιστή και πρωτοπόρο που φωτίζει το δρόμο για το μέλλον.";else var charString = "Πάντα σας άρεσε να ταξιδεύετε και να ερευνάτε. Θα μπορούσατε να είστε ντέτεκτιβ ή κατάσκοπος."

};

if (p2 == 4) {	if (place-2*(parseInt(place/2)) > 0) var charString = "Ήσασταν ένα πρακτικό άτομο, υλιστής χωρίς ιδιαίτερες πνευματικές ανησυχίες. Αυτή η απλή φιλοσοφία της ζωής σας, βοήθησε όμως τους φτωχούς και τους αδύναμους.";	else var charString = "Πάντα σας άρεσε να ταξιδεύετε και να ερευνάτε. Θα μπορούσατε να είστε ντέτεκτιβ ή κατάσκοπος."

};

if (p2 == 5) {if (place-2*(parseInt(place/2)) > 0) var charString = "μποέμ προσωπικότητα, μυστηριώδης, με πολλά χαρίσματα, με την ικανότητα αποκρυπτογράφησης των αρχαίων βιβλίων. Είχατε ικανότητες μάγου και ίσως ήσασταν στην υπηρεσία σκοτεινών δυνάμεων.";else var charString = "Σαν αυθεντικό ταλέντο στην ψυχολογία, γνωρίζατε πως να επωφεληθείτε από τις ευκαιρίες. Ψύχραιμος και ήρεμος σε κάθε περίπτωση."

};

if (p2 == 6) {if (place-2*(parseInt(place/2)) > 0) var charString = "Ερευνητικός και εφευρετικός, σας άρεσε να αναλύετε βαθιά τα πράγματα και να χάνεστε μέσα σε βιβλία. Ταλέντο στο δράμα, γεννημένος ηθοποιός."	

		else var charString = "Αυτοί οι άνθρωποι είναι πάντα ανακατεμένοι σε οτιδήποτε καινούργιο. Λάτρης των αλλαγών, κυρίως στην τέχνη, την μουσική και την μαγειρική."

};

if (p2 == 7) {if (place-2*(parseInt(place/2)) > 0) var charString = "Είχατε μυαλό επιστήμονα, αναζητώντας πάντα νέες ερμηνείες. Το περιβάλλον σας συχνά σας παρεξηγούσε αλλά σεβόταν τις γνώσεις σας.";

		else var charString = "Αδίστακτος χαρακτήρας , που ζύγιζε πάντα προσεκτικά τις αποφάσεις του σε κρίσιμες στιγμές, με εξαιρετικό αυτοέλεγχο και δυνατή θέληση. Τέτοιοι άνθρωποι γενικά είναι αρεστοί, αλλά δεν τους αγαπούν συχνά."

		};



	// past life lesson



	if (p2 == 1){

 		     if (day < 12) var lesString = "Είσαι προορισμένος να λύσεις προβλήματα μόλυνσης του περιβάλλοντος, κακής χρήσης πρώτων υλών, ανακύκλωσης και εξαφάνισης της ραδενέργειας με κάθε μέσο, ακόμα και ψυχολογικό.";

		else if (day < 22) var lesString = "Το δίδαγμα σου είναι να μάθεις την ταπεινότητα και την πίστη στις αρχές της πνευματικότητας. Θα έπρεπε να πιστεύεις στην υψηλή λογική.";

		             else  var lesString = "Είσαι προορισμένος να μάθεις να κατανοείς τους άλλους ανθρώπους και να ανταπεξέρχεσαι στις δυσκολίες της ζωής με χαρούμενη καρδιά. Θα βοηθήσεις τους άλλους, δίνοντας τους αισιοδοξία και χαρά."};

	if (p2 == 2) {

		     if (day < 12) var lesString = "Πάντα ένιωθες πως είχες διαφορετικές αντιλήψεις για τον κόσμο από ότι είχαν οι άλλοι άνθρωποι. Το δίδαγμα σου είναι να εμπιστεύεσαι σ' αυτή τη ζωή το ένστικτο σου, σαν τον καλύτερο οδηγό.";

		else if (day < 22) var lesString = "Ο βασικός σκοπός σου είναι να κάνεις πιο όμορφο τον κόσμο. Φυσικές και πνευματικές έρημοι περιμένουν το άγγιγμα σου. Χαμογέλα!";

		              else var lesString = "Το βασικό σου δίδαγμα τώρα είναι να γίνεις μεγαλόψυχος και να μάθεις την έννοια της συμπόνιας. Προσπάθησε να είσαι λιγότερο προσκολλημένος στα υλικά αγαθά και μάθε να έχεις μόνο τόσα όσα θα μπορούσες να δώσεις."};

	if (p2 == 3) {

		     if (day < 12) var lesString = "Το δίδαγμα σου τώρα είναι να γίνεις πιο ευγενικός με τους ανθρώπους, και να νιώσεις τις χαρές της κατανόησης και της αλληλεγγύης";

		else if (day < 22) var lesString = "Το δίδαγμα σου τώρα είναι η καλλιέργεια και η ανάπτυξη της πνευματικότητας και της συνείδησης. Βρες ένα καλό δάσκαλο και ξόδεψε ένα μέρος της ζωής και της ενέργειας σου μαθαίνοντας από τη σοφία του";

		              else var lesString = "Θα εκπληρώσεις το δίδαγμα σου για τώρα αν βοηθώντας τους ηλικιωμένους και τα παιδιά. Ήρθες σ' αυτή τη ζωή για να μάθεις να νοιάζεσαι τους αδύναμους και τους αβοήθητους."};

	if (p2 == 4) {

		     if (day < 12) var lesString = "Το δίδαγμα σου είναι να καλλιεργήσεις τη φυσική προδιάθεση σου για αγάπη, χαρά κι ενθουσιασμό και να μοιράσεις αυτά τα συναισθήματα και σε άλλους ανθρώπους.";

		else if (day < 22) var lesString = "Το δίδαγμα σου είναι να καλλιεργήσεις την αυτοεκτίμηση σου και να αναπτύξεις την ικανότητα να δίνεις ελπίδα στις καρδιές των ανθρώπων. Η φιλοδοξία δεν είναι το παν. Ο αληθινός πλούτος βρίσκεται στην ψυχή.";

		              else var lesString = "Το δίδαγμα σου είναι να καταφέρεις να νικάς την ζήλια και τον θυμό που έχεις μέσα σου αλλά και σε αυτούς που θα σε επιλέξουν για οδηγό τους. Θα πρέπει να καταλάβεις ότι αυτές οι αδυναμίες οφείλονται σε έλλειψη αυτοπεποίθησης και φόβο."};

	if (p2 == 5) {

		     if (day < 12) var lesString = "Το δίδαγμα σου είναι να μάθεις να αγαπάς και να εμπιστεύεσαι το Σύμπαν. Είσαι προορισμένος να μελετάς, να σκέφτεσαι, να αναλύεις και να αναπτύξεις την εσωτερική σου γνώση και σοφία.";

		else if (day < 22) var lesString = "Το δίδαγμα σου είναι να μάθεις να είσαι αποφασιστικός και επίμονος. Δεν πρέπει να αφήνεις τις μικροατυχίες να έχουν ισχύ πάνω στην ισχυρή σου θέληση.";

		              else var lesString = "Οι ντροπαλοί, μοναχικοί και με αυτοπεποίθηση άνθρωποι είναι παντού, και το δίδαγμα σου είναι να ξεπεράσεις αυτές τις τάσεις του εαυτού σου και κατόπιν να βοηθήσεις και τους άλλους."};

	if (p2 == 6) {

		     if (day < 12) var lesString = "Ο κόσμος είναι γεμάτος από άρρωστους και μοναχικούς ανθρώπους. Θα πρέπει να βοηθήσεις αυτούς που είχαν λιγότερο τύχη από εσένα.";

		else if (day < 22) var lesString = "Υπάρχει μια αόρατη σύνδεση ανάμεσα στον υλικό και τον πνευματικό κόσμο. Το δίδαγμα σου είναι να βρεις και να μάθεις να χρησιμοποιείς αυτή τη μαγική γέφυρα.";

		              else var lesString = "Το δίδαγμα σου είναι να αναπτύξεις την ορθή κρίση, τη σύνεση, τη μετριοπάθεια και τη λογική και μετά να διδάξεις και τους άλλους να το κάνουν. Η ζωή σου θα είναι πιο χαρούμενη όταν βοηθάς αυτούς που σκέπτονται με έλλειψη ορθού συλλογισμού."};

	if (p2 == 7) {

		     if (day < 12) var lesString = "Το δίδαγμα σου είναι να μάθεις, να εξασκηθείς και να χρησιμοποιήσεις την σοφία που κρύβεται στις επιστήμες ψυχολογίας και στα αρχαία κείμενα. Με ισχυρή πίστη και σκληρή δουλειά θα κατακτήσεις τον πραγματικό προορισμό σου σε αυτή τη ζωή.";

		else if (day < 22) var lesString = "Το δίδαγμα σου είναι να πολεμήσεις την βία και τη δυσαρμονία στον κόσμο, και να κατανοήσεις τις ρίζες τους. 'Ολα τα παγκόσμια προβλήματα έχουν την ίδια καταγωγή.";

		              else var lesString = "Η μαγεία βρίσκεται παντού γύρω σου, ακόμη και στις πιο συνηθισμένες καταστάσεις. Το δίδαγμα σου είναι να κατανοήσεις αυτή τη μαγεία και να βοηθήσεις και τους άλλους ανθρώπους να τη δουν. Είσαι Μάγος! "};	

				

	//message composition



	msgWindow.document.write("<p>Γεννήθηκες στην περιοχή που σήμερα ονομάζεται " + countryString.fontcolor("yellow"));

	msgWindow.document.write(" περίπου το " + ys1.fontcolor("yellow") + ".<p>");

	msgWindow.document.write("Το επάγγελμα σου ήταν " + proString.fontcolor("yellow") + ".<p><HR><p>");

	msgWindow.document.write("Σύντομο ψυχολογικό προφίλ στην προηγούμενη ζωή σου:<p>" + charString.fontcolor("yellow") + "<p><HR><p>");

	msgWindow.document.write("<p>Το δίδαγμα που η τελευταία προηγούμενη ζωή σου φέρνει στην παρούσα ζωή σου:<p>" + lesString.fontcolor("yellow") + "<p><HR><p><div align=center>Hi, can you translate <a href=http://www.kwebbel.net/translate>this sites</a> in Greek ?</div><p><HR></FONT> ");


msgWindow.document.write("<P><DIV align=center><iframe scrolling=no frameborder=no src=pubreincarnatiegr.html style=width:728px; height: 150px; border:0; overflow:hidden;></iframe></DIV><P>");



msgWindow.document.write("<P><DIV align=right><FONT COLOR=#ff0000 SIZE=+1>More ...  </FONT> <A HREF=http://www.kwebbel.net/other.html><IMG SRC=pijl.gif border=0></A><P></DIV>");




//

      
}

 