<!--
function yearmore()
{
	var drop_year=curr_year-2002;
	for (count=1; count<=drop_year; count=count+1)
		{
		seal=seal+5;
		kin=kin+105;
		tone++;
		if (tone==14) 
			{
			tone=1;
			}
		if (seal>=20)
			{
			seal=4;
			}
		if (kin>260)
			{
			kin=kin-260;
			}
		}	
}
function dropyear()
{
	seal=seal-5;
	tone=tone-1;
	kin=kin-105;
	if (kin<=2)
		{
		kin=kin+260;
		}
	if (tone<=0)
		{
		tone=13;
		}
	if (seal<=3)
		{
		seal=19;
		}	
}
var codons=new Array(52)
	codons[0]="0";
	codons[1]="Codon 8, Unity of the People<br>Tree of Time Turns Heaven";
	codons[2]="Codon 3, Fresh Start<br>Tree Holds Form of Space";
	codons[3]="Codon 60, Measuring<br>Galactic Octave Limits Space";
	codons[4]="Codon 5, People Together<br>Tree Evolves Space";
	codons[5]="Codon 43, Indomitable<br>Principle of Dynamic Construction Evolves Space";
	codons[6]="Codon 34, Prayer<br>Mind Informed by Cosmic Order";
	codons[7]="Codon 14, Wisdom of the People<br>Conduct Defines the Way";
	codons[8]="Codon 50, Transformation of Time<br>Telepathy Transforms";
	codons[9]="Codon 56, Voyaging<br>Time Travel Unifies the Mind";
	codons[10]="Codon 35, Mind Expanding<br>Cosmic Order Enlightens Space";
	codons[11]="Codon 23, Mind's Release<br>Way of Wielding Power Descends to Earth";
	codons[12]="Codon 20, Wizard's Contemplation<br>Way of Wielding Power Tames Itself";
	codons[13]="Codon 8, Unity of the People<br>Tree of Time Turns Heaven";
	codons[14]="Codon 16, The People Triumph<br>Conduct Unifies the Way";
	codons[15]="Codon 51, Thunder/Arousing Being<br>Telepathy Arouses Energy of Space";
	codons[16]="Codon 54, Transcending<br>Temple Incorporates Telepathy";
	codons[17]="Codon 34, Prayer<br>Mind Informed by Cosmic Order";
	codons[18]="Codon 11, Dynamizing<br>Way of Conduct Shapes Space";
	codons[19]="Codon 5, People Together<br>Tree Evolves Space";
	codons[20]="Codon 9, Discipline<br>Genesis of Conduct";
	codons[21]="Codon 57, Mind of Breath<br>Penetration of the Galactic Octave";
	codons[22]="Codon 53, Evolving<br>Telepathy Evolves the Temple";
	codons[23]="Codon 20, Wizard's Contemplation<br>Way of Wielding Power Tames Itself";
	codons[24]="Codon 12, Stabilizing<br>Conduct Informed by Truth";
	codons[25]="Codon 35, Mind Expanding<br>Cosmic Order Enlightens Space";
	codons[26]="Codon 16, The People Triumph<br>Conduct Unifies the Way";
	codons[27]="Codon 56, Voyaging<br>Time Travel Unifies the Mind";
	codons[28]="Codon 30, Vision/Sun Crystal<br>Radiance of Space Defines Cosmic Awareness";
	codons[29]="Codon 14, Wisdom of the People<br>Conduct Defines the Way";
	codons[30]="Codon 38, Discriminating<br>Cosmic Order Holds Radiance of Space";
	codons[31]="Codon 41, Temple of Joy<br>Principle of Dynamic Construction";
	codons[32]="Codon 61, Inner Space<br>Galactic Octave Resounds as Mind";
	codons[33]="Codon 60, Measuring<br>Galactic Octave Limits Space";
	codons[34]="Codon 29, Heart/Moon Crystal<br>Space Flows as Cosmic Awareness";
	codons[35]="Codon 8, Unity of the People<br>Tree of Time Turns Heaven";
	codons[36]="Codon 39, Heart's Discipline<br>Cosmic Order Returns to Heart of Earth";
	codons[37]="Codon 31, Mind Attracting<br>Cosmic Awareness Establishes Binary Order";
	codons[38]="Codon 62, Inner Time<br>Galactic Octave Defines Evolution";
	codons[39]="Codon 56, Voyaging<br>Time Travel Unifies the Mind";
	codons[40]="Codon 64, Prepared<br>Galactic Octave Unifies the Dimensions";
	codons[41]="Codon 38, Discriminating<br>Cosmic Order Holds Radiance of Space";
	codons[42]="Codon 21, Arousing Vision<br>Way of Wielding Power Conforms to Truth";
	codons[43]="Codon 30, Vision/Sun Crystal";
	codons[44]="Codon 22, Temple of Vision<br>Way of Wielding Power Defines Radiance of Space";
	codons[45]="Codon 37, Power of the Home<br>Cosmic Order Informs Time";
	codons[46]="Codon 63, Accomplished<br>Galactic Octave Universalizes Space";
	codons[47]="Codon 39, Heart's Discipline<br>Cosmic Order Returns to Heart of Earth";
	codons[48]="Codon 48, Reaching the Source<br>Architectonics Releases Order of Whole";
	codons[49]="Codon 29, Heart/Moon Crystal<br>Space Flows as Cosmic Awareness";
	codons[50]="Codon 47, Calling the Source<br>Dynamism Resolved as Architectonics";
	codons[51]="Codon 40, Heart's Release<br>Cosmic Order Returns to Heart of Heaven";
	codons[52]="Codon 64, Prepared<br>Galactic Octave Unifies the Dimensions";

var months=new Array(13)
	months[0]="0";
	months[1]="31";
	months[2]="28";
	months[3]="31";
	months[4]="30";
	months[5]="31";
	months[6]="30";
	months[7]="31";
	months[8]="31";
	months[9]="30";
	months[10]="31";
	months[11]="30";
	months[12]="31";
var sol_seals=new Array(20)
	sol_seals[0]="Sun";
	sol_seals[1]="Dragon";
	sol_seals[2]="Wind";
	sol_seals[3]="Night";
	sol_seals[4]="Seed";
	sol_seals[5]="Serpent";
	sol_seals[6]="World-bridger";
	sol_seals[7]="Hand";
	sol_seals[8]="Star";
	sol_seals[9]="Moon";
	sol_seals[10]="Dog";
	sol_seals[11]="Monkey";
	sol_seals[12]="Human";
	sol_seals[13]="Skywalker";
	sol_seals[14]="Wizard";
	sol_seals[15]="Eagle";
	sol_seals[16]="Warrior";
	sol_seals[17]="Earth";
	sol_seals[18]="Mirror";
	sol_seals[19]="Storm";
var seal_color=new Array(20)
	seal_color[0]="Yellow";
	seal_color[1]="Red";
	seal_color[2]="White";
	seal_color[3]="Blue";
	seal_color[4]="Yellow";
	seal_color[5]="Red";
	seal_color[6]="White";
	seal_color[7]="Blue";
	seal_color[8]="Yellow";
	seal_color[9]="Red";
	seal_color[10]="White";
	seal_color[11]="Blue";
	seal_color[12]="Yellow";
	seal_color[13]="Red";
	seal_color[14]="White";
	seal_color[15]="Blue";
	seal_color[16]="Yellow";
	seal_color[17]="Red";
	seal_color[18]="White";
	seal_color[19]="Blue";
var gal_tones=new Array(14)
	gal_tones[0]="errorincode";
	gal_tones[1]="Magnetic";
	gal_tones[2]="Lunar";
	gal_tones[3]="Electric";
	gal_tones[4]="Self-Existing";
	gal_tones[5]="Overtone";
	gal_tones[6]="Rhythmic";
	gal_tones[7]="Resonant";
	gal_tones[8]="Galactic";
	gal_tones[9]="Solar";
	gal_tones[10]="Planetary";
	gal_tones[11]="Spectral";
	gal_tones[12]="Crystal";
	gal_tones[13]="Cosmic";
	
	
	
var d = new Date();
var start_year = 10;
var seal=9;
var tone=10;
var kin=49;
var curr_date = d.getDate();
var curr_month = d.getMonth();
curr_month++;
var curr_year = d.getFullYear();
var xx = 7;
var xy = 26;
var moon=1;
var mday=1;
var wday=1;
var week=1;

if (curr_year>2002)
	{
	yearmore();
	}
if (curr_month<7)
	{
	dropyear();
	}
if ((curr_month==7) && (curr_day<26))
	{
	dropyear();
	}
while ((xx!=curr_month) || (xy!=curr_date))
	{
	kin++;
	xy++;
	seal++;
	tone++;
	mday++;
	wday++;
	if (wday>7)
		{
		wday=1;
		week++;
		}
	if (mday>28)
		{
		mday=1;
		moon++;
		}
	if (seal==20)
		{
		seal=0;
		}
	if (tone==14)
		{
		tone=1;
		}
	if (kin==261)
		{
		kin=1;
		}
	if (xy>months[xx])
		{
		xx++;
		xy=1;
		if (xx==13)
			{
			xx=1;
			}
		}
	}
document.write('<a href="http://www.tortuga.com/findkin"><img src="http://www.tortuga.com/dreamspell/sealstones/kin/small/'+kin+'.gif" border=0 align=left hspace=5></a>');	
document.write("<b>Today: </b>"+curr_month + "-" + curr_date + "-" + curr_year);
document.write("<br>Moon "+moon+" day "+mday); 
document.write('. '+seal_color[seal]+' '+gal_tones[tone]+' '+sol_seals[seal]+'<br>');
document.write("Week: "+week+' '+codons[week]);

//-->
