var yy,mm,dd,kk;
function kabataro(form){

	if ((parseInt(form.yy.value) == 0)||(parseInt(form.yy.value) >9999)){
		alert('¶‚Ü‚ê‚½¼—ï‚ð³‚µ‚­“ü—Í‚µ‚Ä‚­‚¾‚³‚¢(1`9999‚Ü‚Å‚Ì”Žš)B');
		return;
	}
	else {true;}
	if ((parseInt(form.mm.value) == 0)||(parseInt(form.mm.value) >12)){
		alert('¶‚Ü‚ê‚½ŒŽ‚ð³‚µ‚­“ü—Í‚µ‚Ä‚­‚¾‚³‚¢(1`12‚Ü‚Å‚Ì”Žš)B');
		return;
		}
	else {true;}
	if ((parseInt(form.dd.value) == 0)||(parseInt(form.dd.value) >31)){
		alert('¶‚Ü‚ê‚½“ú‚ð³‚µ‚­“ü—Í‚µ‚Ä‚­‚¾‚³‚¢(1`31‚Ü‚Å‚Ì”Žš)B');
		return;
	}
	else {true;}

	      with (Math) {
		//---year--
		y1 = floor (parseInt(form.yy.value) / 1000);
		y2 = floor ((parseInt(form.yy.value) - y1*1000)/ 100);
		y3 = floor ((parseInt(form.yy.value) - y1*1000 -y2*100)/ 10);
		y4 = floor (parseInt(form.yy.value) - y1*1000 -y2*100 - y3*10);
		y5 = y1 + y2 + y3 + y4;
			if ((y5 == 11)||(y5 == 22)) {
		 		yy = y5;
				}
			else {
		 		y6 = floor (y5 /10);
		 		y7 = y5 - y6*10;
		 		yy = y6 + y7;
					if (yy == 10) {
						yy = 1
					}
				}
		//---month---
		m1 = floor (parseInt(form.mm.value) / 10);
		m2 = floor (parseInt(form.mm.value) - m1*10);
			if (parseInt(form.mm.value) == 11) {
		 		mm = parseInt(form.mm.value);
				}
			else {
		 		mm = m1 + m2;
					if (mm == 10) {
						mm = 1
					}
				}
		//---day---
		d1 = floor (parseInt(form.dd.value) / 10);
		d2 = floor (parseInt(form.dd.value) - d1*10);
			if ((parseInt(form.dd.value) == 11)||	(parseInt(form.dd.value)) == 22) {
		 		dd = parseInt(form.dd.value);
				}
			else {
		 		dd = d1 + d2;
					if (dd == 10) {
						dd = 1
					}
				}
		//---kabbalah---
		kk = yy + mm + dd;
			if (kk < 10 ){
				true;
				}
			else {
				if ((kk == 11)||(kk == 22)) {
					true;
					}
				else {		
		 			k1 = floor (kk / 10);
		 			k2 = floor (kk - k1*10);
		 			kk = k1 + k2;
						if (kk == 10) {
							kk = 1
						}
					}
				}

			}

	if (kk == 1) {
            kk = 1
         	newwindow(kk);
	}


		else if(kk == 2) {
            kk = 2
         	newwindow(kk);
	}

		else if(kk == 3) {
            kk = 3
         	newwindow(kk);
	}

		else if (kk == 4) {
            kk = 4
         	newwindow(kk);
	}

		else if (kk == 5) {
            kk = 5
         	newwindow(kk);
	}

		else if (kk == 6) {
            kk = 6
         	newwindow(kk);
	}

		else if (kk == 7) {
            kk = 7
         	newwindow(kk);
	}

		else if (kk == 8) { 
            kk = 8
         	newwindow(kk);
	}

		else if (kk == 9) {
            kk = 9
         	newwindow(kk);
	}

		else if (kk == 11) {
            kk = 10
         	newwindow(kk);
	}

		else if (kk == 22) {
            kk = 11
         	newwindow(kk);
	}
		else {
			alert('¶”NŒŽ“ú‚ð“ü—Í‚µ‚Ä‚­‚¾‚³‚¢BŒvŽZ‚Å‚«‚È‚¢ê‡‚ÍŒvŽZ•û–@‚ð‚²——‰º‚³‚¢B');
		}
		}


function newwindow(unmeisu) {
var msgkaba = new Array();

msgkaba[0]="<h3>‰^–½”‚P@1/28(“y)`2/3(‹à)</h3>ˆÓŠO‚È˜A—‚ª“ü‚é‚©‚àB‚µ‚Á‚©‚è‹x—{‚µ‚ÄƒVƒbƒJƒŠÄƒXƒ^[ƒgI<br><font color='#ff80ff'>K‰^“x‚Rššš</font>™™";
msgkaba[1]="<h3>‰^–½”‚Q@1/28(“y)`2/3(‹à)</h3>Žv‚¢‚ª‚¯‚È‚¢ŽdŽ–‚â˜A—‚ÍŠˆ—pIŽÐŒð‚à‘OŒü‚«OK(*^_^*)<br><font color='#ff80ff'>K‰^“x‚Sšššš</font>™";
msgkaba[2]="<h3>‰^–½”‚R@1/28(“y)`2/3(‹à)</h3>Œ’N‘æˆê‚Å–³—‚¹‚¸IS‚Ì—]—T‚ª‘åØ‚Å‚·‚æd(^-^)<br><font color='#ff80ff'>K‰^“x‚Rššš</font>™™";
msgkaba[3]="<h3>‰^–½”‚S@1/28(“y)`2/3(‹à)</h3>ŽdŽ–‚â‹à‘K–Ê‚ÅÅ‚ç‚¸Td‚É‰ß‚²‚µ‚Ä‹gB‹¦—Í‚ð‚à‚ç‚¨‚¤I<BR><font color='#ff80ff'>K‰^“x‚Qšš</font>™™™";
msgkaba[4]="<h3>‰^–½”‚T@1/28(“y)`2/3(‹à)</h3>ŽdŽ–‚Å‚ÍŽüˆÍ‚ðˆø‚Á‚Ï‚é–ð–Ú‚ð‚µ‚æ‚¤IŽÐŒð‚Í­‚µ‚¨‹x‚ÝB<br><font color='#ff80ff'>K‰^“x‚Qšš</font>™™™";
msgkaba[5]="<h3>‰^–½”‚U@1/28(“y)`2/3(‹à)</h3>‘ÎlŠÖŒW‚Åƒnƒvƒjƒ“ƒO‚ªo‚»‚¤BTd‚ÉŠm”F‚µ‚ÄIŽ©‘î‹gB<br><font color='#ff80ff'>K‰^“x‚Qšš</font>™™™";
msgkaba[6]="<h3>‰^–½”‚V@1/28(“y)`2/3(‹à)</h3>o”ï‚Í‰ä–‚Ì“úBŽüˆÍ‚Ö‚Ì˜A—‚â‰ž“š‚ÍƒLƒ`ƒ“‚Æ(^-^)<br><font color='#ff80ff'>K‰^“x‚Rššš</font>™™";
msgkaba[7]="<h3>‰^–½”‚W@1/28(“y)`2/3(‹à)</h3>e‚µ‚¢l‚ÍƒAƒe‚É‚¹‚¸BŽ©‘R‘Ì‚ÅˆÀ‚ç‚¬dŽ‹‚É‰ß‚²‚»‚¤B<br><font color='#ff80ff'>K‰^“x‚Qšš</font>™™™";
msgkaba[8]="<h3>‰^–½”‚X@1/28(“y)`2/3(‹à)</h3>Žv‚¢—§‚Á‚½‚çr•q‚ÉIŽdŽ–‚Í•—Í‚ª‚ ‚è‚»‚¤BæÒ‘òƒ_ƒI<br><font color='#ff80ff'>K‰^“x‚Rššš</font>™™";
msgkaba[9]="<h3>‰^–½”‚P‚P@1/28(“y)`2/3(‹à)</h3>l‚¦‚·‚¬‚¸ƒˆ‚Å‘f’¼‚È“w—Í‚Å’B¬BŠwK‹gB<br><font color='#ff80ff'>K‰^“x‚Rššš</font>™™";
msgkaba[10]="<h3>‰^–½”‚Q‚Q@1/28(“y)`2/3(‹à)</h3>ŽdŽ–‚Í–Ü˜_A‘S‘Ì‚ÉÏ‹ÉŽp¨‚Å”S‚è‚à”­ŠöIŠy‚µ‚­s“®B<br><font color='#ff80ff'>K‰^“x‚Sšššš</font>™";

	nwin = window.open("", "Newwindow","width=400,height=60");
	nwin.document.open();
	nwin.document.write("<HTML><HEAD>");
	nwin.document.write("<TITLE>ƒJƒoƒ‰TarotTŠÔ‰^¨</TITLE>");
	nwin.document.writeln("<body bgcolor='#000000' text='#ffffff' leftmargin='10' topmargin='10'>");
	nwin.document.writeln(msgkaba[unmeisu - 1]);
	nwin.document.write("<div align='right'>by Active Tarot Reading</div>");
	nwin.document.write("</body></HTML>");
	nwin.document.close();

	return false;
}

