Ver el código de «Widget:Mayan calendar»

<form name="dayForm" style="margin:0; padding:0">
<div style="text-align:left; background-color:#ffffff; width:734px">
<div style="padding:40px 15px 0 30px">
<span class="title">Calendario maya</span>
<!-- <img src="images/header_ancientMayan.png" title="Ancient Mayan Calendars" alt="Ancient Mayan Calendars" width="383" height="36" border="0">

<div style="background-image:url(images/calculator_bkgd.jpg); background-repeat: no-repeat; width:690px; height:294px"> -->
<div style="margin:20px 0 0 20px">
<table border="0" cellspacing="0" cellpadding="0" width="600" style="padding-top:30px">
	<tbody><tr>
		<td valign="top">
			<table border="0" cellspacing="4" width="280">
				<tbody><tr>
					<td valign="top" class="calc">Año</td>
					<td valign="top"><input type="text" name="year" value="2017" size="5"></td>

				</tr>
				<tr>
					<td valign="top" class="calc">Mes</td>
					<td valign="top">
						<select name="mes">
							<option>Enero</option>
							<option>Febrero</option>

							<option>Marzo</option>
							<option>Abril</option>
							<option>Mayo</option>
							<option>Junio</option>
							<option>Julio</option>
							<option>Agosto</option>

							<option>Septiembre</option>
							<option>Octubre</option>
							<option>Noviembre</option>
							<option>Diciembre</option>
						</select>
					</td>
				</tr>

				<tr>
					<td valign="top" class="calc">Día</td>
					<td valign="top">
						<select name="día">
							<option>1</option>
							<option>2</option>
							<option>3</option>

							<option>4</option>
			
							<option>5</option>
							<option>6</option>
							<option>7</option>
							<option>8</option>
							<option>9</option>

							<option>10</option>
			
							<option>11</option>
							<option>12</option>
							<option>13</option>
							<option>14</option>
							<option>15</option>

							<option>16</option>
			
							<option>17</option>
							<option>18</option>
							<option>19</option>
							<option>20</option>
							<option>21</option>

							<option>22</option>
			
							<option>23</option>
							<option>24</option>
							<option>25</option>
							<option>26</option>
							<option>27</option>

							<option>28</option>
			
							<option>29</option>
							<option>30</option>
							<option>31</option>
						</select>
					</td>
				</tr>

				<tr>
					<td valign="top" class="calc">Correlativo (calendario juliano)</td>
					<td>
					<select name="corrType">
						<option>584,283</option><!-- maya moderno -->
						<option>584,285</option><!-- académico -->
					</select>

					</td>
				</tr>
				<tr>
					<td colspan="2" style="padding:15px 0 0 0" align="center"><input type="button" style="color:#000000" value="Calcular" onclick="maya(document.dayForm)"></td>
				</tr>
			</tbody></table>
		</td>
		<td width="10">&nbsp;</td>
		<td valign="top">

			<table border="0" cellspacing="4" cellpadding="0" style="width: 280px; margin:0 0 0 0">
<!-- Sid Changes Start -->
 				<tbody><tr>	
					<td valign="top" align="right" nowrap=""><input type="button" name="ybrad" value="9" size="5"> 
					<input type="button" name="yb" value="Eb" size="9"></td>
					<td valign="top" class="calc2">Día</td>
					
				</tr>
<!-- Sid Changes End -->				
				<tr>
					<td valign="top" align="right"><input type="button" name="baktun" value="12" size="4"></td>
					<td valign="top" class="calc2">Baktun</td>
					
				</tr>
				<tr>
					<td valign="top" align="right"><input type="button" name="katun" value="19" size="4"></td>
					<td valign="top" class="calc2">Katun</td>

					
				</tr>
				<tr>
					<td valign="top" align="right"><input type="button" name="tun" value="15" size="4"></td>		
					<td valign="top" class="calc2">Tun</td>
					
				</tr>
				<tr>		
					<td valign="top" align="right"><input type="button" name="uinal" value="2" size="4"></td>
					<td valign="top" class="calc2">Uinal</td>
					
				</tr>

				<tr>
					<td valign="top" align="right"><input type="button" name="kin" value="2" size="4"></td>		
					<td valign="top" class="calc2">Kin</td>
					
				</tr>
				<tr>
					<td valign="top" align="right" nowrap=""><input type="button" name="tzolrad" value="1" size="5">, 
					<input type="button" name="tzolkin" value="Ik" size="9"></td>		
					<td valign="top" class="calc2">Tzolkin</td>
					
				</tr>

				<tr>	
					<td valign="top" align="right" nowrap=""><input type="button" name="haabrad" value="10" size="5">, 
					<input type="button" name="haab" value="Kayab" size="9"></td>
					<td valign="top" class="calc2">Haab'</td>
					
				</tr>
                               
				<tr>
					<td valign="top" align="right" nowrap=""><input type="button" name="lon" value="6" size="4"></td>	
					<td valign="top" class="calc2">Señor de la noche<!-- <img src="../images/calc_lord.gif" alt="Lord of the Night" width="115" height="18" /> --> 
				</td></tr>				
			</tbody></table>

			</td>
		</tr>
	</tbody></table>
	</div>
</div>



</div>

</div></form>

<script>
<!-- Hide the code from non-compliant browsers.

       function maya(date) {
		year = Number(date.year.value);
		month = date.month.selectedIndex+1;
		day = date.day.selectedIndex+1;

		julianday = getjulian(year,month,day);

                if (date.corrType.selectedIndex == 1) {
	         corrNumber=584285;
                 } else {corrNumber=584283;
                 }


		days=julianday-corrNumber;
		xdays=days;

		baktun=Math.floor(xdays/144000);
		date.baktun.value=baktun;
		xdays-=baktun*144000;
		katun=Math.floor(xdays/7200);
		date.katun.value=katun;
		xdays-=katun*7200;
		tun=Math.floor(xdays/360);
		date.tun.value=tun;
		xdays-=tun*360;
		uinal=Math.floor(xdays/20);
		date.uinal.value=uinal;
		kin=xdays-(uinal*20);
		date.kin.value=kin;

		xdays=days-(260*(Math.floor(days/260)));
	
		tzolradical=4+xdays-(13*(Math.floor((xdays+3)/13)));
		date.tzolrad.value=tzolradical;
		tzolkin=xdays-(20*(Math.floor((xdays)/20)));
		
		if (tzolkin==1)date.tzolkin.value ="Imix"; 
			else if (tzolkin==2) date.tzolkin.value ="Ik"; 
			else if (tzolkin==3) date.tzolkin.value ="Ak'bal"; 
			else if (tzolkin==4) date.tzolkin.value ="K'an"; 
			else if (tzolkin==5) date.tzolkin.value ="Chikchan"; 
			else if (tzolkin==6) date.tzolkin.value ="Kimi"; 
			else if (tzolkin==7) date.tzolkin.value ="Manik"; 
			else if (tzolkin==8) date.tzolkin.value ="Lamat"; 
			else if (tzolkin==9) date.tzolkin.value ="Muluk"; 
			else if (tzolkin==10) date.tzolkin.value ="Ok"; 
			else if (tzolkin==11) date.tzolkin.value ="Chuen"; 
			else if (tzolkin==12) date.tzolkin.value ="Eb"; 
			else if (tzolkin==13) date.tzolkin.value ="Ben"; 
			else if (tzolkin==14) date.tzolkin.value ="Ix"; 
			else if (tzolkin==15) date.tzolkin.value ="Men"; 
			else if (tzolkin==16) date.tzolkin.value ="Kib"; 
			else if (tzolkin==17) date.tzolkin.value ="Kaban"; 
			else if (tzolkin==18) date.tzolkin.value ="Etz'nab"; 
			else if (tzolkin==19) date.tzolkin.value ="Kawak"; 
			else if (tzolkin==0) date.tzolkin.value ="Ajau"; 
			else if (tzolkin>19) date.tzolkin.value = "error";
		
		xdays=days+348-(365*(Math.floor((days+348)/365)));

		haabradical=xdays-(20*(Math.floor(xdays/20)));
		date.haabrad.value=haabradical;

		if(xdays > 360) date.haab.value ="Uayeb";
		
		haabkin=Math.floor(xdays/20);

		if(haabkin==0) date.haab.value = "Pop";
			else if(haabkin==1) date.haab.value ="Uo" ;
			else if(haabkin==2) date.haab.value ="Zip";
			else if(haabkin==3) date.haab.value ="Zotz";
			else if(haabkin==4) date.haab.value ="Tzec" ;
			else if(haabkin==5) date.haab.value ="Xul";
			else if(haabkin==6) date.haab.value ="Yaxkin" ;
			else if(haabkin==7) date.haab.value ="Mol" ;
			else if(haabkin==8) date.haab.value ="Chen";
			else if(haabkin==9) date.haab.value ="Yax" ;
			else if(haabkin==10) date.haab.value ="Zac" ;
			else if(haabkin==11) date.haab.value ="Ceh" ;
			else if(haabkin==12) date.haab.value ="Mac" ;
			else if(haabkin==13) date.haab.value ="Kankin";
			else if(haabkin==14) date.haab.value ="Muwan" ;
			else if(haabkin==15) date.haab.value ="Pax" ;
			else if(haabkin==16) date.haab.value ="Kayab";
			else if(haabkin==17) date.haab.value ="Cumkú";
			else date.haab.value ="Uayeb";

	
		lonight=days-(9*(Math.floor((days-1)/9)));
			date.lon.value=lonight;


<!-- Sid Code Start --> 
            yb=(tzolkin-haabradical)%20;
            if(yb <=0) yb=yb + 20;

		if (yb==1)date.yb.value ="Imix"; 
			else if (yb==2) date.yb.value ="Ik"; 
			else if (yb==3) date.yb.value ="Ak'bal"; 
			else if (yb==4) date.yb.value ="Kan"; 
			else if (yb==5) date.yb.value ="Chikchan"; 
			else if (yb==6) date.yb.value ="Kimi"; 
			else if (yb==7) date.yb.value ="Manik"; 
			else if (yb==8) date.yb.value ="Lamat"; 
			else if (yb==9) date.yb.value ="Muluk"; 
			else if (yb==10) date.yb.value ="Ok"; 
			else if (yb==11) date.yb.value ="Chuen"; 
			else if (yb==12) date.yb.value ="Eb"; 
			else if (yb==13) date.yb.value ="Ben"; 
			else if (yb==14) date.yb.value ="Ix"; 
			else if (yb==15) date.yb.value ="Men"; 
			else if (yb==16) date.yb.value ="Kib"; 
			else if (yb==17) date.yb.value ="Kaban"; 
			else if (yb==18) date.yb.value ="Etz'nab"; 
			else if (yb==19) date.yb.value ="Kawac"; 
			else if (yb==0) date.yb.value ="Ahau"; 
			else if (yb>19) date.yb.value = "error";






       		ybrad = (tzolradical-haabradical-(haabkin * 7))%13

            	if(ybrad <=0) ybrad=ybrad + 13;
            	date.ybrad.value =ybrad;

<!-- Sid Code End -->


		}

	function getjulian(year,month,day){

		if (month < 3) {month += 12; year -= 1};
		
		a = Math.floor(year/100);
		b = 2-a+Math.floor(a/4);
		j = Math.floor(365.25*(year+4716))+
		Math.floor(30.6001*(month+1))+
		day+b-1524;
		
		return j;

 	}
   // -->
<!--

//A required global variable for the loadImages() function
loadedImages = null
/**
 * loadImages() accepts a list of file names to load into cache.
 * For each file name it creates a new image object and begins
 * downloading the file into the browser's cache. 
 **/
function loadImages(){
   var img
   if (document.images){
      if (!loadedImages) loadedImages = new Array()
      for (var i=0; i < arguments.length; i++){
         img = new Image()
         img.src = arguments[i]
         loadedImages[loadedImages.length] = img
      }
   }   
}

/**
 * flip(imgName, imgSrc) sets the src attribute of a named
 * image in the current document. The function must be passed
 * two strings. The first is the name of the image in the document
 * and the second is the source to set it to.
 **/
function flip(imgName, imgSrc){
   if (document.images){
      document[imgName].src = imgSrc
   }
}

//-->


</script>