var defmeses = new Array(13)
var imameses = new Array(13)
var plastext = new Array(28)
var plasimag = new Array(28)
var meses = new Array(13)
var sellos = new Array(20)
var kinima = new Array(20)
var sellos2 = new Array(20)
var tonos = new Array(13)
var imatonos = new Array(13)
var tzolkin
var dife
var resto1
var div1
var div2
var val1
var suma1
var sello
var tono
var val2
var hoy = new Date()
var ini =new Date("jan 9 1900")
var d = hoy.getDate()
var m = hoy.getMonth()+1
var a = hoy.getYear()

dife = (hoy-ini)/(60*60*1000*24);
dife = Math.ceil(dife)

div1 = (dife/365)

div2 = div1/4

resto1 = div1 % 4

val1 = dife-div2



var nompre

var anopre

var mespre

var diapre

var hemis







var plastext = new Array(28)

var mesespre = new Array(12)

var podtono = new Array(13)



mesespre[1] = "Jan"

mesespre[2] = "Feb"

mesespre[3] = "Mar"

mesespre[4] = "Apr"

mesespre[5] = "May"

mesespre[6] = "Jun"

mesespre[7] = "Jul"

mesespre[8] = "Aug"

mesespre[9] = "Sep"

mesespre[10] = "Oct"

mesespre[11] = "Nov"

mesespre[12] = "Dec"


var harmo1= new Array(364)

var harmo2= new Array(364)

var harmo3= new Array(364)

var harmo4= new Array(364)


var cubo = new Array(16)

var armonicas =new Array(64)

var armonicasini =new Array(64)

var armonicasimag =new Array(64)

var tono1 = new Array(13)

var tono2 = new Array(13)

var selloinf2 = new Array(20)

var colorescas = new Array(20)

var selloinf = new Array(20)

var sellosn = new Array(20)

var castimag = new Array(20)

var plasimag = new Array(28)

var meses = new Array(13)

var sellos = new Array(20)

var sellos = new Array(21)

var sellos2 = new Array(20)

var tonos = new Array(13)

var tonos = new Array(14)

var sellos = new Array(21)

var tonos = new Array(13)

var tzolkin

var dife

var resto1

var div1

var div2

var val1

var suma1

var sello

var tono

var val2

var hoyantes

hoyantes = new Date()

diapre = hoyantes.getDate()

mespre = hoyantes.getMonth()+1

anopre = hoyantes.getYear()

if (anopre==101){anopre=2001}

if (anopre==102){anopre=2002}

if (anopre==103){anopre=2003}

if (anopre==104){anopre=2004}

if (anopre==105){anopre=2005}

if (anopre==106){anopre=2006}

if (anopre==107){anopre=2007}

if (anopre==108){anopre=2008}





if ((m==12) && (d>13) && (resto1 < 1))

{

var ini =new Date("jan 8 1900")

}



var hoy =new Date(mesespre[mespre]+" "+diapre+" "+anopre)

var ini =new Date("jan 9 1900")

var d = hoy.getDate()

var m = hoy.getMonth()+1

var a = hoy.getYear()

if ((m==12) && (d>13))

{

var ini =new Date("jan 8 1900")

}



var d = hoy.getDate()

var m = hoy.getMonth()+1

var a = hoy.getYear()



dife = (hoy-ini)/(60*60*1000*24);

dife = Math.ceil(dife)

div1 = (dife/365)

div2 = div1/4

resto1 = div1 % 4

val1 = dife-div2


var nompre
var anopre
var mespre
var diapre
var hemis


var plastext = new Array(28)
var mesespre = new Array(12)
var podtono = new Array(13)

mesespre[1] = "Jan"
mesespre[2] = "Feb"
mesespre[3] = "Mar"
mesespre[4] = "Apr"
mesespre[5] = "May"
mesespre[6] = "Jun"
mesespre[7] = "Jul"
mesespre[8] = "Aug"
mesespre[9] = "Sep"
mesespre[10] = "Oct"
mesespre[11] = "Nov"
mesespre[12] = "Dec"



var harmo1= new Array(364)
var harmo2= new Array(364)
var harmo3= new Array(364)
var harmo4= new Array(364)



var cubo = new Array(16)
var armonicas =new Array(64)
var armonicasini =new Array(64)
var armonicasimag =new Array(64)
var tono1 = new Array(13)
var tono2 = new Array(13)
var selloinf2 = new Array(20)
var colorescas = new Array(20)
var selloinf = new Array(20)
var sellosn = new Array(20)
var castimag = new Array(20)
var plasimag = new Array(28)
var meses = new Array(13)
var sellos = new Array(20)
var kinima = new Array(21)
var sellos2 = new Array(20)
var tonos = new Array(13)
var imatonos = new Array(14)
var kinimap = new Array(21)
var imatonosp = new Array(13)
var tzolkin
var dife
var resto1
var div1
var div2
var val1
var suma1
var sello
var tono
var val2
var hoyantes
hoyantes = new Date()
diapre = hoyantes.getDate()
mespre = hoyantes.getMonth()+1
anopre = hoyantes.getYear()
if (anopre==101){anopre=2001}
if (anopre==102){anopre=2002}
if (anopre==103){anopre=2003}
if (anopre==104){anopre=2004}
if (anopre==105){anopre=2005}
if (anopre==106){anopre=2006}
if (anopre==107){anopre=2007}
if (anopre==108){anopre=2008}

ondas =new Array(20)

ondas[1]=1
ondas[2]=18
ondas[3]=15
ondas[4]=12
ondas[5]=9
ondas[6]=6
ondas[7]=3
ondas[8]=20
ondas[9]=17
ondas[10]=14
ondas[11]=11
ondas[12]=8
ondas[13]=5
ondas[14]=2
ondas[15]=19
ondas[16]=16
ondas[17]=13
ondas[18]=10
ondas[19]=7
ondas[20]=4



var hoy =new Date(mesespre[mespre]+" "+diapre+" "+anopre)
var ini =new Date("jan 9 1900")
var d = hoy.getDate()
var m = hoy.getMonth()+1
var a = hoy.getYear()

dife = (hoy-ini)/(60*60*1000*24);
dife = Math.ceil(dife)
div1 = (dife/365)
div2 = div1/4
resto1 = div1 % 4
val1 = dife-div2




if ((m==12) && (d>13) && (resto1 < 1))
{
var ini =new Date("jan 8 1900")
}

var d = hoy.getDate()
var m = hoy.getMonth()+1
var a = hoy.getYear()

dife = (hoy-ini)/(60*60*1000*24);
dife = Math.ceil(dife)
div1 = (dife/365)
div2 = div1/4
resto1 = div1 % 4
val1 = dife-div2

runas = new Array(27)

runasimag = new Array(27)

runasluna = new Array(12)

coloreskinesn = new Array(20)

coloreskiness = new Array(20)

colkinn = new Array(20)

colkins = new Array(20)



runasini = new Array(27)

ma = new Array(20)

mb = new Array(20)

mc= new Array(20)

md = new Array(20)

mee = new Array(20)

mf = new Array(20)

mg = new Array(20)

mh = new Array(20)

tonosmagni = new Array(13)

hp = new Array(20)

hh = new Array(28)

padma = new Array(28)

cubocodon = new Array(37)

cubosemana = new Array(53)


plasimag[1] = "<img src='plasgrandes/1.gif'>"

plasimag[2] = "<img src='plasgrandes/2.gif'>"

plasimag[3] = "<img src='plasgrandes/3.gif'>"

plasimag[4] = "<img src='plasgrandes/4.gif'>"

plasimag[5] = "<img src='plasgrandes/5.gif'>"

plasimag[6] = "<img src='plasgrandes/6.gif'>"

plasimag[7] = "<img src='plasgrandes/7.gif'>"

plasimag[8] = "<img src='plasgrandes/1.gif'>"

plasimag[9] = "<img src='plasgrandes/2.gif'>"

plasimag[10] = "<img src='plasgrandes/3.gif'>"

plasimag[11] = "<img src='plasgrandes/4.gif'>"

plasimag[12] = "<img src='plasgrandes/5.gif'>"

plasimag[13] = "<img src='plasgrandes/6.gif'>"

plasimag[14] = "<img src='plasgrandes/7.gif'>"

plasimag[15] = "<img src='plasgrandes/1.gif'>"

plasimag[16] = "<img src='plasgrandes/2.gif'>"

plasimag[17] = "<img src='plasgrandes/3.gif'>"

plasimag[18] = "<img src='plasgrandes/4.gif'>"

plasimag[19] = "<img src='plasgrandes/5.gif'>"

plasimag[20] = "<img src='plasgrandes/6.gif'>"

plasimag[21] = "<img src='plasgrandes/7.gif'>"

plasimag[22] = "<img src='plasgrandes/1.gif'>"

plasimag[23] = "<img src='plasgrandes/2.gif'>"

plasimag[24] = "<img src='plasgrandes/3.gif'>"

plasimag[25] = "<img src='plasgrandes/4.gif'>"

plasimag[26] = "<img src='plasgrandes/5.gif'>"

plasimag[27] = "<img src='plasgrandes/6.gif'>"

plasimag[28] = "<img src='plasgrandes/7.gif'>"


plastext[1] = "Dali "

plastext[2] = "Seli "

plastext[3] = "Gama "

plastext[4] = "Kali "

plastext[5] = "Alfa "

plastext[6] = "Limi"

plastext[7] = "Silio "

plastext[8] = "Dali "

plastext[9] = "Seli "

plastext[10] = "Gama "

plastext[11] = "Kali "

plastext[12] = "Alfa "

plastext[13] = "Limi"

plastext[14] = "Silio "

plastext[15] = "Dali "

plastext[16] = "Seli "

plastext[17] = "Gama "

plastext[18] = "Kali "

plastext[19] = "Alfa "

plastext[20] = "Limi"

plastext[21] = "Silio "

plastext[22] = "Dali "

plastext[23] = "Seli "

plastext[24] = "Gama "

plastext[25] = "Kali "

plastext[26] = "Alfa "

plastext[27] = "Limi"

plastext[28] = "Silio "


sellos[1] = "Dragón "

sellos[2] = "Viento "

sellos[3] = "Noche "

sellos[4] = "Semilla "

sellos[5] = "Serpiente "

sellos[6] = "Enlazador de Mundos "

sellos[7] = "Mano "

sellos[8] = "Estrella "

sellos[9] = "Luna "

sellos[10] = "Perro "

sellos[11] = "Mono "

sellos[12] = "Humano "

sellos[13] = "Caminante del Cielo "

sellos[14] = "Mago "

sellos[15] = "Aguila "

sellos[16] = "Guerrero "

sellos[17] = "Tierra "

sellos[18] = "Espejo "

sellos[19] = "Tormenta "

sellos[20] = "Sol "



kinima[1] = "<img src='kines/1b.gif'>"

kinima[2] = "<img src='kines/2b.gif'>"

kinima[3] = "<img src='kines/3b.gif'>"

kinima[4] = "<img src='kines/4b.gif'>"

kinima[5] = "<img src='kines/5b.gif'>"

kinima[6] = "<img src='kines/6b.gif'>"

kinima[7] = "<img src='kines/7b.gif'>"

kinima[8] = "<img src='kines/8b.gif'>"

kinima[9] = "<img src='kines/9b.gif'>"

kinima[10] = "<img src='kines/10b.gif'>"

kinima[11] = "<img src='kines/11b.gif'>"

kinima[12] = "<img src='kines/12b.gif'>"

kinima[13] = "<img src='kines/13b.gif'>"

kinima[14] = "<img src='kines/14b.gif'>"

kinima[15] = "<img src='kines/15b.gif'>"

kinima[16] = "<img src='kines/16b.gif'>"

kinima[17] = "<img src='kines/17b.gif'>"

kinima[18] = "<img src='kines/18b.gif'>"

kinima[19] = "<img src='kines/19b.gif'>"

kinima[20] = "<img src='kines/20b.gif'>"



imatonos[1]= "<img src='tonos/Tono01.jpg'>"

imatonos[2]= "<img src='tonos/Tono02.jpg'>"

imatonos[3]= "<img src='tonos/Tono03.jpg'>"

imatonos[4]= "<img src='tonos/Tono04.jpg'>"

imatonos[5]= "<img src='tonos/Tono05.jpg'>"

imatonos[6]= "<img src='tonos/Tono06.jpg'>"

imatonos[7]= "<img src='tonos/Tono07.jpg'>"

imatonos[8]= "<img src='tonos/Tono08.jpg'>"

imatonos[9]= "<img src='tonos/Tono09.jpg'>"

imatonos[10]= "<img src='tonos/Tono10.jpg'>"

imatonos[11]= "<img src='tonos/Tono11.jpg'>"

imatonos[12]= "<img src='tonos/Tono12.jpg'>"

imatonos[13]= "<img src='tonos/Tono13.jpg'>"



imameses[1]= "<img src='imameses/1b.gif' alt='Unificar - Atraer => ¿Cual es mi proposito?'>"

imameses[2]= "<img src='imameses/2b.gif'alt='Polarizar - Estabilizar => ¿Cual es mi reto?'>"

imameses[3]= "<img src='imameses/3b.gif'alt='Activar - Vincular => ¿Como puedo servir mejor?'>"

imameses[4]= "<img src='imameses/4b.gif'alt='Definir - Medir => ¿Cual es la forma de mi accion?'>"

imameses[5]= "<img src='imameses/5b.gif'alt='Facultar - Mandar => ¿Cómo puedo mejorar mi propio potencial?'>"

imameses[6]= "<img src='imameses/6b.gif'alt='Organizar - Balancear => ¿Como puedo organizar para la igualdad?'>"

imameses[7]= "<img src='imameses/7b.gif'alt='Canalizar - Inspirar => ¿Como puedo sintonizar mi servicio a los demás?'>"

imameses[8]= "<img src='imameses/8b.gif'alt='Armonizar - Modelar => ¿Vivo lo que creo?'>"

imameses[9]= "<img src='imameses/9b.gif'alt='Mandar la Pulsacion - Realizar => ¿Como puedo alcanzar mi proposito?'>"

imameses[10]= "<img src='imameses/10b.gif'alt='Perfeccionar - Producir => ¿Como puedo perfeccionar lo que hago?'>"

imameses[11]= "<img src='imameses/11b.gif'alt='Disolver - Liberar => ¿Como libero y suelto?'>"

imameses[12]= "<img src='imameses/12b.gif'alt='Dedicar - Universalizar => ¿Como puedo dedicar mi Ser a todo aquello que vive?'>"

imameses[13]= "<img src='imameses/13b.gif'alt='Perdurar - Trascender => ¿Como puedo incrementar mi alegria y Amor?'>"


sellos2[1] = "Rojo"

sellos2[2] = "Blanco"

sellos2[3] = "Azul"

sellos2[4] = "Amarilla"

sellos2[5] = "Roja"

sellos2[6] = "Blanco"

sellos2[7] = "Azul"

sellos2[8] = "Amarilla"

sellos2[9] = "Roja"

sellos2[10] = "Blanco"

sellos2[11] = "Azul"

sellos2[12] = "Amarillo"

sellos2[13] = "Rojo"

sellos2[14] = "Blanco"

sellos2[15] = "Azul"

sellos2[16] = "Amarillo"

sellos2[17] = "Roja"

sellos2[18] = "Blanco"

sellos2[19] = "Azul"

sellos2[20] = "Amarillo"


tonos[1] = "Magnético"

tonos[2] = "Lunar"

tonos[3] = "Eléctrico"

tonos[4] = "Auto-Existente"

tonos[5] = "Entonado"

tonos[6] = "Rítmico"

tonos[7] = "Resonante"

tonos[8] = "Galáctico"

tonos[9] = "Solar"

tonos[10] = "Planetario"

tonos[11] = "Espectral"

tonos[12] = "Cristal"

tonos[13] = "Cósmico"



meses[1] = "Murciélago"

meses[2] = "Escorpión"

meses[3] = "Venado"

meses[4] = "Lechuza"

meses[5] = "Pavo Real"

meses[6] = "Lagarto"

meses[7] = "Mono"

meses[8] = "Halcon"

meses[9] = "Jaguar"

meses[10] = "Perro"

meses[11] = "Serpiente"

meses[12] = "Conejo"

meses[13] = "Tortuga"



defmeses[1] = "¿CUAL ES MI PROPOSITO?"

defmeses[2] = "¿CUAL ES MI RETO?"

defmeses[3] = "¿COMO PUEDO SERVIR MEJOR?"

defmeses[4] = "¿CUAL ES LA FORMA DE MI ACCIÓN?"

defmeses[5] = "¿COMO PUEDO MEJORAR MI PROPIO POTENCIAL?"

defmeses[6] = "¿COMO PUEDO ORGANIZAR PARA LA IGUALDAD?"

defmeses[7] = "¿COMO PUEDO SINTONIZAR MI SERVICIO CON LOS DEMÁS?"

defmeses[8] = "¿VIVO REALMENTE LO QUE CREO?"

defmeses[9] = "¿COMO LOGRO MI PROPOSITO?"

defmeses[10] = "¿COMO PUEDO PERFECCIONAR LO QUE HAGO?"

defmeses[11] = "¿COMO PUEDO LIBERO Y SUELTO?"

defmeses[12] = "¿COMO PUEDO DEDICAR MI SER A TODO AQUELLO QUE VIVE?"

defmeses[13] = "¿COMO PUEDO INCREMENTAR MI ALEGRIA Y MI AMOR?"











var dia1

var fin1

var mes1 = 1

var plas = 1

me= parseInt(m)

di= parseInt(d)

an= parseInt(a)

a= parseInt(a)





if ((me == 7) && (di>25))

{

mes1=1;

plas= (di-26)+1;

}

if ((me == 8) && (di<23))

{

mes1=1

plas = di + 6

}



if ((me == 8) && (di>22))

{

mes1=2

plas= (di-23)+1

}

if ((me == 9) && (di<20))

{

mes1=2

plas= (di+9)

}



if ((me == 9) && (di>19))

{

mes1=3

plas= (di-20)+1

}

if ((me == 10) && (di<18))

{

mes1=3

plas= (di+11)

}









if ((me == 10) && (di>17))

{

mes1=4

plas= (di-18)+1

}

if ((me == 11) && (di<15))

{

mes1=4

plas= (di+14)

}

if ((me == 11) && (di>14))

{

mes1=5

plas= (di-15)+1

}

if ((me == 12) && (di<13))

{

mes1=5

plas= (di+16)

}



if ((me == 12) && (di>12))

{

mes1=6

plas= (di-13)+1

}

if ((me == 1) && (di<10))

{

mes1=6

plas= (di+19)

}









if ((me == 1) && (di>9))

{

mes1=7

plas= (di-10)+1

}

if ((me == 2) && (di<7))

{

mes1=7

plas= (di+22)

}



if ((me == 2) && (di>6))

{

mes1=8

plas= (di-7)+1

}

if ((me == 3) && (di<7))

{

mes1=8

plas= (di+22)

}



















if ((me == 3) && (di>6))

{

mes1=9

plas= (di-7)+1

}

if ((me == 4) && (di<4))

{

mes1=9

plas= (di+25)

}



if ((me == 4) && (di>3))

{

mes1=10

plas= (di-4)+1

}

if ((me == 5) && (di<2))

{

mes1=10

plas= (di+27)

}











if ((me == 5) && (di>1))

{

mes1=11

plas= (di-2)+1

}

if ((me == 5) && (di<30))

{

mes1=11

plas= (di-1)

}



if ((me == 5) && (di>29))

{

mes1=12

plas= (di-30)+1

}

if ((me == 6) && (di<27))

{

mes1=12

plas= (di+2)

}



if ((me == 6) && (di>26))

{

mes1=13

plas= (di-27)+1

}

if ((me == 7) && (di<25))

{

mes1=13

plas= (di+4)

}













if ((m < 3) && ((a % 4) == 0)) {



suma1=1

}

else {

suma1=0

}





if (resto1 != 0) {

	tzolkin = (val1-200) % 260

	sello = val1 % 20

	tono = ((val1-5) % 13)

}

else {



	sello = (val1 % 20) +1

	tono = ((val1-5) % 13) +1

	tzolkin = (val1-200) % 260 +1

}





tzolkin = tzolkin +suma1

tono =tono + suma1

sello = sello +suma1

sello = Math.ceil(sello)

tono = Math.ceil(tono)

tzolkin = Math.ceil(tzolkin)

var numen



sello = sello +1



if (sello > 20)

{

sello= sello - 20

}



tzolkin = tzolkin +1



if (tzolkin == 261)

{

tzolkin =1

}





tono = tono +1



if (tono > 13)

{

tono=tono - 13

}





if (tzolkin < 10) {



numen = "00"+tzolkin



}



else {



if (tzolkin < 100) {



numen = "0"+tzolkin



}

else {



if (tzolkin < 300) {



numen = tzolkin



}

}

}

var salto



onda = sello -tono+1

if ( onda <1)

{



if (onda == 0)

{

onda = 20

}

else

{

onda = (20 + onda)

}

}

var guia

var analogo

var oculto

var antipoda



analogo = 19 - sello

if (analogo == 0)

{

analogo = 20

}

if (analogo == -1)

{

analogo = 19

}

oculto = 21 - sello

antipoda = sello +10

if (antipoda > 20)

{

antipoda = antipoda - 20

}



guia = onda + 13*(tono-1)



guia = guia % 20



if (guia==0)

{

guia = 20

}

var armonico = tzolkin



var sellocon

var tonocon

var mesano

var tonoano

var ajuste

var psi

ajuste = mes1-1

sellocon = sello

tonocon = tono

mesano = ((ajuste)*28)+plas

psi = mesano

while (mesano > 1)

{

	mesano = mesano -1

	sellocon = sellocon -1

	if (sellocon==0) {sellocon = 20}

}

mesano = sellocon



tonoano = ((ajuste)*28)+plas



while (tonoano > 1)

{

	tonoano = tonoano -1

	tonocon = tonocon -1

	if (tonocon ==0) {tonocon = 13}

}

tonoano = tonocon 


salto = "http://club.telepolis.com/hun_ab_ku/Kin"+numen+".html"


document.write("<table style='font-variant: serif; font-size: 5pt; color: rgb(0,0,128); font-weight: bold'><tr><td align='center'><small> "+"Anillo "+"<br>"+sellos[mesano]+" "+tonos[tonoano]+ "  "+sellos2[mesano]+"<br>"+imatonos[tonoano]+"<br>"+kinima[mesano]+ "<td align='center'>"+"PLASMA  -  "+plastext[plas]+" "+plas+ "<br>"+plasimag[plas]+"<td align='center'>"+mes1+"ª Luna "+meses[mes1]+ "  "+tonos[mes1]+"<br>"+ defmeses[mes1]+"<br>"+ imameses[mes1]+"<td align='center'>"+"Kin "+tzolkin+"<br>"+sellos[sello]+" "+tonos[tono]+" "+sellos2[sello]+"<br>"+imatonos[tono]+"<br>"+kinima[sello]+"<td align='center'><small>Fecha gregoriana:  "+d+"/"+m+"/"+a+"<td align='center'> <a href=" + salto + " target=blank> Pagina para ver el detalle del Kin </a> </td></tr></table>" )