function sacaLunaychakras(){

DiasSemana=new MakeArrays(6);
DiasSemana[0]="Domingo, "	
DiasSemana[1]="Lunes, "
DiasSemana[2]="Martes, "
DiasSemana[3]="Miércoles, "
DiasSemana[4]="Jueves, "
DiasSemana[5]="Viernes, "
DiasSemana[6]="Sábado, "
NombreMes=new MakeArrays(11);
NombreMes[0]="Enero"
NombreMes[1]="Febrero"
NombreMes[2]="Marzo"
NombreMes[3]="Abril"
NombreMes[4]="Mayo"
NombreMes[5]="Junio"
NombreMes[6]="Julio"
NombreMes[7]="Agosto"
NombreMes[8]="Septiembre"
NombreMes[9]="Octubre"
NombreMes[10]="Noviembre"
NombreMes[11]="Diciembre"


mesparaLuna=mesparaluna
diaparaLuna=diaparaluna

mesparaLuna=parseInt(mesparaLuna)
diaparaLuna=parseInt(diaparaLuna)

datevar = new Date(); 

if((mesparaLuna==7)&&(diaparaLuna>25)){
	Luna="Luna Magnerica del Murciélago" 
		Lunai="Luna01"
		finLuna="August 23, "}
if((mesparaLuna==8)&&(diaparaLuna<23)){
	Luna="Luna Magnetica del Murciélago" 
		Lunai="Luna01"
		finLuna="August 23, "}
	
if((mesparaLuna==8)&&(diaparaLuna>22)){
	Luna="Luna Lunar del Escorpión" 
        Lunai="Luna02"
        finLuna="September 20, "}
if((mesparaLuna==9)&&(diaparaLuna<20)){
	Luna="Luna Lunar del Escorpión" 
        Lunai="Luna02"
        finLuna="September 20, "}

if((mesparaLuna==9)&&(diaparaLuna>19)){
	Luna="Luna Eléctrica del Venado" 
        Lunai="Luna03"
        finLuna="October 18, "}
if((mesparaLuna==10)&&(diaparaLuna<18)){
	Luna="Luna Eléctrica del Venado" 
        Lunai="Luna03"
        finLuna="October 18, "}

if((mesparaLuna==10)&&(diaparaLuna>17)){
	Luna="Luna Autoexistente de la Lechuza" 
        Lunai="Luna04"
        finLuna="November 15, "}
if((mesparaLuna==11)&&(diaparaLuna<15)){
	Luna="Luna Autoexistente de la Lechuza" 
        Lunai="Luna04"
        finLuna="November 15, "}

if((mesparaLuna==11)&&(diaparaLuna>14)){
	Luna="Luna Armónica del Pavo Real" 
        Lunai="Luna05"
        finLuna="December 13, "}
if((mesparaLuna==12)&&(diaparaLuna<13)){
	Luna="Luna Armónica del Pavo Real" 
        Lunai="Luna05"
        finLuna="December 13, "}

if((mesparaLuna==12)&&(diaparaLuna>12)){
	Luna="Luna Rítmica del Lagarto" 
        Lunai="Luna06"
        finLuna="November 15, "}
if((mesparaLuna==1)&&(diaparaLuna<10)){
	Luna="Luna Rítmica del Lagarto" 
        Lunai="Luna06"
        finLuna="January 10, "}

if((mesparaLuna==1)&&(diaparaLuna>9)){
	Luna="Luna Resonante del Mono" 
        Lunai="Luna07"
        finLuna="February 7, "}
if((mesparaLuna==2)&&(diaparaLuna<7)){
	Luna="Luna Resonante del Mono" 
        Lunai="Luna07"
        finLuna="February 7, "}

if((mesparaLuna==2)&&(diaparaLuna>6)){
	Luna="Luna Galáctica del Halcón" 
        Lunai="Luna08"
        finLuna="March 7, "}
if((mesparaLuna==3)&&(diaparaLuna<7)){
	Luna="Luna Galáctica Halcón" 
        Lunai="Luna08"
        finLuna="March 7, "}

if((mesparaLuna==3)&&(diaparaLuna>6)){
	Luna="Luna Solar del Jaguar" 
        Lunai="Luna09"
        finLuna="April 4, "}
if((mesparaLuna==4)&&(diaparaLuna<4)){
	Luna="Luna Solar del Jaguar" 
        Lunai="Luna09"
        finLuna="April 4, "}

if((mesparaLuna==4)&&(diaparaLuna>3)){
	Luna="Luna Planetaria del Perro" 
        Lunai="Luna10"
        finLuna="May 2, "}
if((mesparaLuna==5)&&(diaparaLuna<2)){
	Luna="Luna Planetaria del Perro" 
        Lunai="Luna10"
        finLuna="May 2, "}

if((mesparaLuna==5)&&(diaparaLuna>1)){
	Luna="Luna Espectral de la Serpiente" 
        Lunai="Luna11"
        finLuna="May 30, "}
if((mesparaLuna==5)&&(diaparaLuna<30)){
	Luna="Luna Espectral de la Seripente" 
        Lunai="Luna11"
        finLuna="May 30, "}

if((mesparaLuna==5)&&(diaparaLuna>29)){
	Luna="Luna Cristal del Conejo" 
        Lunai="Luna12"
        finLuna="June 27, "}
if((mesparaLuna==6)&&(diaparaLuna<27)){
	Luna="Luna Cristal del Conejo" 
        Lunai="Luna12"
        finLuna="June 27, "}

if((mesparaLuna==6)&&(diaparaLuna>26)){
	Luna="Luna Cosmica de la Tortuga" 
        Lunai="Luna13"
        finLuna="July 25, "}
if((mesparaLuna==7)&&(diaparaLuna<25)){
	Luna="Luna Cosmica de la Tortuga" 
        Lunai="Luna13"
        finLuna="July 25, "}


if((mesparaLuna==7)&&(diaparaLuna==25)){
	Luna="DIA VERDE" 
	finLuna=""
	}


switch(mesparaLuna){
case 1: mesLuna="January"
break;
case 2: mesLuna="February"
break;
case 3: mesLuna="March"
break;
case 4: mesLuna="April"
break;
case 5: mesLuna="May"
break;
case 6: mesLuna="June"
break;
case 7: mesLuna="July"
break;
case 8: mesLuna="August"
break;
case 9: mesLuna="September"
break;
case 10: mesLuna="October"
break;
case 11: mesLuna="November"
break;
case 12: mesLuna="December"
break;
}

var el2000 = new Date(finLuna +"2009 00:00:00") //dia que termina la Luna + 1
var milisegundosPorDia = 86400*1000
var now = new Date(mesLuna +" " + diaparaLuna + ", 2009 00:00:00") // dia en que naci
var fecha = DiasSemana[now.getDay()]	+ now.getDate() + " de " + NombreMes[now.getMonth()] + " del " + now.getYear()
var restar = 0
dias = (el2000.getTime() - now.getTime() - restar)/milisegundosPorDia



sacardiaLunas()


if(Luna=="DIA VERDE"){
alert('DIA VERDE')}
else{
}


}

function MakeArrays(n){
	this.length=n;
	for(var i=0; i<n; i++){
		this[i]=0
	}
	return this
}


function sacardiaLunas(){


if(dias<0){dias=(dias-dias)-dias+1}

switch(parseInt(dias)-1){
case 0: diaLuna="28"
break;
case 1: diaLuna="27"
break;
case 2: diaLuna="26"
break;
case 3: diaLuna="25"
break;
case 4: diaLuna="24"
break;
case 5: diaLuna="23"
break;
case 6: diaLuna="22"
break;
case 7: diaLuna="21"
break;
case 8: diaLuna="20"
break;
case 9: diaLuna="19"
break;
case 10: diaLuna="18"
break;
case 11: diaLuna="17"
break;
case 12: diaLuna="16"
break;
case 13: diaLuna="15"
break;
case 14: diaLuna="14"
break;
case 15: diaLuna="13"
break;
case 16: diaLuna="12"
break;
case 17: diaLuna="11"
break;
case 18: diaLuna="10"
break;
case 19: diaLuna="9"
break;
case 20: diaLuna="8"
break;
case 21: diaLuna="7"
break;
case 22: diaLuna="6"
break;
case 23: diaLuna="5"
break;
case 24: diaLuna="4"
break;
case 25: diaLuna="3"
break;
case 26: diaLuna="2"
break;
case 27: diaLuna="1"
break;
case 28: diaLuna="1"
break;
case 29: diaLuna="2"
break;
case 30: diaLuna="3"
break;
case 31: diaLuna="4"
break;
case 32: diaLuna="5"
break;
case 33: diaLuna="6"
break;
case 34: diaLuna="7"
break;
case 35: diaLuna="8"
break;
case 36: diaLuna="9"
break;
case 37: diaLuna="10"
break;
case 38: diaLuna="11"
break;
case 39: diaLuna="12"
break;
case 40: diaLuna="13"
break;
case 41: diaLuna="14"
break;
case 42: diaLuna="15"
break;
case 43: diaLuna="16"
break;
case 44: diaLuna="17"
break;
case 45: diaLuna="18"
break;
case 46: diaLuna="19"
break;


default :diaLuna="0"
break;
}


diaLuna=parseInt(diaLuna)

dialuna=diaLuna
if((dialuna==1)||(dialuna==8)||(dialuna==15)||(dialuna==22)){chakra="Dali"; imgchakra="<img src=1/1.gif>"}
if((dialuna==2)||(dialuna==9)||(dialuna==16)||(dialuna==23)){chakra="Seli"; imgchakra="<img src=1/2.gif>"}
if((dialuna==3)||(dialuna==10)||(dialuna==17)||(dialuna==24)){chakra="Gamma"; imgchakra="<img src=1/3.gif>"}
if((dialuna==4)||(dialuna==11)||(dialuna==18)||(dialuna==25)){chakra="Kali"; imgchakra="<img src=1/4.gif>"}
if((dialuna==5)||(dialuna==12)||(dialuna==19)||(dialuna==26)){chakra="Alfa"; imgchakra="<img src=1/5.gif>"}
if((dialuna==6)||(dialuna==13)||(dialuna==20)||(dialuna==27)){chakra="Limi"; imgchakra="<img src=1/6.gif>"}
if((dialuna==7)||(dialuna==14)||(dialuna==21)||(dialuna==28)){chakra="Silio"; imgchakra="<img src=1/7.gif>"}


if((kin>=0)&&(kin<=52)){castillotxt="Castillo ROJO Este del girar"}
if((kin>=53)&&(kin<=104)){castillotxt="Castillo BLANCO Norte del Cruzar"}
if((kin>=105)&&(kin<=156)){castillotxt="Castillo AZUL Oeste del Quemar"}
if((kin>=157)&&(kin<=208)){castillotxt="Castillo AMARILLO Sur del Dar"}
if((kin>=209)&&(kin<=260)){castillotxt="Castillo VERDE Central del Encantar"}


textoluna="Día <b>" + diaLuna + " " + imgchakra + chakra + "</b><br> de la " + Luna + "<br>" + castillotxt
dialunatxt.innerHTML="<center>" + textoluna + "</center>"

tortugaamarilla()
tortugablanco()
tortugaverde()
cubo()
}



function tortugaamarilla(){
switch(dialuna){
case 1: form1.x4img08.src="tortugaamarilla1.gif"
break;
case 2: form1.x4img16.src="tortugaamarilla1.gif"
break;
case 3: form1.x4img22.src="tortugaamarilla1.gif"
break;
case 4: form1.x4img28.src="tortugaamarilla1.gif"
break;
case 5: form1.x4img34.src="tortugaamarilla1.gif"
break;
case 6: form1.x4img42.src="tortugaamarilla2.gif"
break;
case 7: form1.x4img50.src="tortugaamarilla1.gif"
break;
case 8: form1.x4img56.src="tortugaamarilla1.gif"
break;
case 9: form1.x4img62.src="tortugaamarilla1.gif"
break;
case 10: form1.x4img68.src="tortugaamarilla1.gif"
break;
case 11: form1.x4img74.src="tortugaamarilla1.gif"
break;
case 12: form1.x4img80.src="tortugaamarilla2.gif"
break;
case 13: form1.x4img79.src="tortugaamarilla2.gif"
break;
case 14: form1.x4img78.src="tortugaamarilla2.gif"
break;
case 15: form1.x4img77.src="tortugaamarilla2.gif"
break;
case 16: form1.x4img76.src="tortugaamarilla2.gif"
break;
case 17: form1.x4img75.src="tortugaamarilla3.gif"
break;
case 18: form1.x4img69.src="tortugaamarilla3.gif"
break;
case 19: form1.x4img63.src="tortugaamarilla3.gif"
break;
case 20: form1.x4img57.src="tortugaamarilla3.gif"
break;
case 21: form1.x4img51.src="tortugaamarilla3.gif"
break;
case 22: form1.x4img45.src="tortugaamarilla3.gif"
break;
case 23: form1.x4img37.src="tortugaamarilla3.gif"
break;
case 24: form1.x4img29.src="tortugaamarilla3.gif"
break;
case 25: form1.x4img23.src="tortugaamarilla3.gif"
break;
case 26: form1.x4img17.src="tortugaamarilla3.gif"
break;
case 27: form1.x4img11.src="tortugaamarilla3.gif"
break;
case 28: form1.x4img03.src="tortugaamarilla3.gif"
break;
	}
}

function tortugablanco(){
switch(dialuna){
case 1: form1.x2img03.src="tortugablanca1.gif"
break;
case 2: form1.x2img11.src="tortugablanca1.gif"
break;
case 3: form1.x2img17.src="tortugablanca1.gif"
break;
case 4: form1.x2img23.src="tortugablanca1.gif"
break;
case 5: form1.x2img29.src="tortugablanca1.gif"
break;
case 6: form1.x2img37.src="tortugablanca2.gif"
break;
case 7: form1.x2img37.src="tortugablanca1.gif"
break;
case 8: form1.x2img37.src="tortugablanca1.gif"
break;
case 9: form1.x2img37.src="tortugablanca1.gif"
break;
case 10: form1.x2img37.src="tortugablanca1.gif"
break;
case 11: form1.x2img37.src="tortugablanca1.gif"
break;
case 12: form1.x2img37.src="tortugablanca1.gif"
break;
case 13: form1.x2img37.src="tortugablanca1.gif"
break;
case 14: form1.x2img37.src="tortugablanca1.gif"
break;
case 15: form1.x2img37.src="tortugablanca1.gif"
break;
case 16: form1.x2img37.src="tortugablanca1.gif"
break;
case 17: form1.x2img37.src="tortugablanca1.gif"
break;
case 18: form1.x2img37.src="tortugablanca1.gif"
break;
case 19: form1.x2img37.src="tortugablanca1.gif"
break;
case 20: form1.x2img37.src="tortugablanca1.gif"
break;
case 21: form1.x2img37.src="tortugablanca1.gif"
break;
case 22: form1.x2img37.src="tortugablanca1.gif"
break;
case 23: form1.x2img37.src="tortugablanca3.gif"
break;
case 24: form1.x2img29.src="tortugablanca3.gif"
break;
case 25: form1.x2img23.src="tortugablanca3.gif"
break;
case 26: form1.x2img17.src="tortugablanca3.gif"
break;
case 27: form1.x2img11.src="tortugablanca3.gif"
break;
case 28: form1.x2img03.src="tortugablanca3.gif"
break;
	}
}


function tortugaverde(){


switch(dialuna){
case 7: form1.x4img33.src="tortugaverde1.gif"
break;
case 8: form1.x4img32.src="tortugaverde1.gif"
break;
case 9: form1.x4img31.src="tortugaverde1.gif"
break;
case 10: form1.x4img30.src="tortugaverde2.gif"
break;
case 11: form1.x4img24.src="tortugaverde2.gif"
break;
case 12: form1.x4img18.src="tortugaverde2.gif"
break;
case 13: form1.x4img12.src="tortugaverde3.gif"
break;
case 14: form1.x4img13.src="tortugaverde3.gif"
break;
case 15: form1.x4img14.src="tortugaverde3.gif"
break;
case 16: form1.x4img15.src="tortugaverde4.gif"
break;
case 17: form1.x4img21.src="tortugaverde4.gif"
break;
case 18: form1.x4img27.src="tortugaverde1.gif"
break;
case 19: form1.x4img26.src="tortugaverde1.gif"
break;
case 20: form1.x4img25.src="tortugaverde2.gif"
break;
case 21: form1.x4img19.src="tortugaverde3.gif"
break;
case 22: form1.x4img20.src="tortugaverde4.gif"
break;
case 23: form1.x3img37.src="tortugaverde4.gif"
break;
	}

}



function cubo(){
switch(dialuna){
case 1: cubotxt=""
break;
case 2: cubotxt=""
break;
case 3: cubotxt=""
break;
case 4: cubotxt=""
break;
case 5: cubotxt=""
break;
case 6: cubotxt=""
break;
case 7: cubotxt="AFIRMACIÓN DIARIA DEL CUBO<BR><BR>Memoria: 'Por mi libre albedrío profético elijo ser uno de los 144.000. Por mi poder supraconsciente de la memoria del guerrero dragón ¡ Hago el voto de liberar a la Tierra de la prisión del Planeta Babilonia!'."
break;
case 8: cubotxt="AFIRMACIÓN DIARIA DEL CUBO<BR><BR>Espíritu: 'Por mi poder supraconsciente del espíritu de guerrero viento, reivindico al Ungido como a mí mismo. ¡Que los Magos de la Paz Prevalezcan!'."
break;
case 9: cubotxt="AFIRMACIÓN DIARIA DEL CUBO<BR><BR>Abundancia: 'Por mi poder supraconsciente de abundancia del guerrero noche, recupero el poder telepático de videncia 13:20, en plenitud. ¡Que la Verdad y la Paz Prevalezcan!'."
break;
case 10: cubotxt="AFIRMACIÓN DIARIA DEL CUBO<BR><BR>Florecimiento: 'Por mi poder supraconsciente de florecimiento del guerrero semilla, ¡que la facultad de iluminación solar de la flor maya sea la realización de la Profecía para todos!'."
break;
case 11: cubotxt="AFIRMACIÓN DIARIA DEL CUBO<BR><BR>Sexo: 'Por mi poder consciente-continuo sexual del guerrero serpiente, guiado por el poder de la Profecía, que la fuerza agresiva de la guerra sea trascendida por la fuerza sexual vital. ¡Que la paz y el amor prevalezcan para todos!'."
break;
case 12: cubotxt="AFIRMACIÓN DIARIA DEL CUBO<BR><BR>Muerte: 'Por mi poder consciente mortal del guerrero enlazador de mundos, que lo oculto sea revelado. ¡Que la paz de las 13 Lunas prevalezca!'."
break;
case 13: cubotxt="AFIRMACIÓN DIARIA DEL CUBO<BR><BR>Realización: 'Por mi poder autogenerador de la Profecía guerrero mano que la divina verdad prevalezca. Por mi fuerza telepática inconsciente, ¡que sea capaz de retirar al Planeta Babilonia de la biosfera!'."
break;
case 14: cubotxt="AFIRMACIÓN DIARIA DEL CUBO<BR><BR>Arte: 'Por mi poder inconsciente almacenado de la estrella de arte, ¡que la profecía alcance la victoria de los justos! ¡Que la bestia de la ignorancia muera! ¡Que el libre albedrío, la paz, el arte y la armonía prevalezcan!'."
break;
case 15: cubotxt="AFIRMACIÓN DIARIA DEL CUBO<BR><BR>Purificación: 'Por mi poder inconsciente de purificación de la Luna, que la Profecía conduzca la victoria de los justos! ¡Que el terror de la equivocación kármica del Planeta Babilonia se limpie para siempre! ¡Que el Águila Cósmica vuele de nuevo!'."
break;
case 16: cubotxt="AFIRMACIÓN DIARIA DEL CUBO<BR><BR>Amor: 'Por mi poder inconsciente de amor del perro, ¡que la Profecía pacifique la victoria de los justos! ¡Que el regreso del guerrero sagrado traiga la paz, la verdad y el amor a esta afligida Tierra!'."
break;
case 17: cubotxt="AFIRMACIÓN DIARIA DEL CUBO<BR><BR>Magia: 'Por mi poder consciente de magia del mono, que la Profecía establezca la victoria de las 13 Lunas como el camino de los justos del Cielo en la Tierra. ¡Que la paz prevalezca!'."
break;
case 18: cubotxt="AFIRMACIÓN DIARIA DEL CUBO<BR><BR>Libre Albedrío: 'Por mi poder consciente-continuo de libre albedrío del humano, ¡que la Profecía desencadene la victoria de las 13 Lunas como el poder de la humanidad para regenerar la biosfera! ¡Que la paz prevalezca!'."
break;
case 19: cubotxt="AFIRMACIÓN DIARIA DEL CUBO<BR><BR>Profecía: 'Por mi poder consciente-continuo de Profecía del caminante del cielo, que la profecía purifique la victoria del camino de las 13 Lunas, como el triunfo de la religión de la verdad. ¡Que la paz regenere la biosfera!'."
break;
case 20: cubotxt="AFIRMACIÓN DIARIA DEL CUBO<BR><BR>Atemporalidad: 'Por mi poder consciente-continuo de atemporalidad del mago, que la victoria libre la profecía del camino de las 13 Lunas como el Reino del Cielo en la Tierra. ¡Que la paz universal prevalezca!'."
break;
case 21: cubotxt="AFIRMACIÓN DIARIA DEL CUBO<BR><BR>Visión: 'Por mi poder consciente telepático de visión del águila, ¡que el camino de paz de las 13 Lunas restauren el Reino del Cielo en la Tierra como la segunda creación prometida! '¡Paz!'."
break;
case 22: cubotxt="AFIRMACIÓN DIARIA DEL CUBO<BR><BR>Inteligencia: 'Por mi poder consciente instintivo de inteligencia del guerrero, que pueda yo ayudar a toda la humanidad, para que llegue a la Nueva Jerusalén de la vida universal. ¡Por el del Cubo, que la paz prevalezca!'."
break;
case 23: cubotxt=""
break;
case 24: cubotxt=""
break;
case 25: cubotxt=""
break;
case 26: cubotxt=""
break;
case 27: cubotxt=""
break;
case 28: cubotxt=""
break;

	}

cuboafirmacion.innerHTML="<i>" + cubotxt + "</i>"

document.cartadia.src="cartas/" + dialuna + ".jpg"
}