
//-----rӋ---//
var ykche=new Array(///ʷƽM1
'1640650.479938','1642476.703182','1683430.515601','1752157.640664','1807675.003759','1883627.765182','1907369.128100','1936603.140413','1939145.524180','1947180.798300','1964362.041824','1987372.340971',
'1999653.819126','2007445.469786','2021324.917146','2047257.232342','2070282.898213','2073204.872850','2080144.500926','2086703.688963','2110033.182763','2111190.300888','2113731.271005','2120670.840263','2123973.309063',
'2125068.997336','2136026.312633','2156099.495538','2159021.324663','2162308.575254','2178485.706538','2178759.662849','2185334.020800','2187525.481425','2188621.191481')

var kche=new Array(///ʷƽM2
'-221','-216','-104','84','236','444','509','589','596','618','665','728','761','783','821','892','955','963','982','1000','1064','1067','1074','1093','1102','1105','1135','1190','1198','1207',
'1251','1252','1270','1276','1279');
var jkche=new Array(////ʷƽM3
'15.21842500','15.21874996',' 15.218750011','15.218749978','15.218620279','15.218612292','15.218449176','15.218425000','15.218466998',' 15.218524844','15.218533526','15.218513908','15.218530782',
'15.218535181','15.218526248','15.218519654','15.218425000','15.218515221','15.218530782','15.218523776','15.218425000','15.218425000','15.218515671','15.218425000','15.218425000','15.218477932','15.218472436',
'15.218425000','15.218425000','15.218461742','15.218425000','15.218445786','15.218425000','15.218425000','15.218437484');
var jkche2=new Array(///ʷƽM4
-3,-3,0,4,4,3,3,4,3,3,4,4,19,3,3,3,4,4,4,3,0,4,3,3,4,4,4,3,3,3,10,4,4,4,4);
////
function S(y,n,pd){  //pdȡֵ01քeʾƽͶ,ԓعD0ֵ
  var yk=365.2423112;var jjk=0.00000001;///yk=365.2422226;
  var jk=y-2200;var j=(0.000084275/3300)*jk;if(y<=2219)j=0;
  var jk5=y-5500;var j5=(0.00001232/1860)*jk5;if(y<5500)j5=0;
  var jk2=y-900;var j2=0.000252155/3600*jk2;if(1001<y)j2=0;
  var jk3=0.000100121/2012*(y-(-4712));var j3=0.000100121-jk3;if(y>=-2700)j3=0;
  var yk2=yk-j-j2-j3-j5-jjk;
  var juD=y*(yk2-6.4e-14*(y-100)*(y-100)-3.047e-8*(y-100))+15.218427*n+1721050.71301;//
  var tht=3e-4*y-0.372781384-0.2617913325*n;//Ƕ
  var yrD=(1.945*sin(tht)-0.01206*sin(2*tht))*(1.048994-2.583e-5*y);//
  var shuoD=-18e-4*sin(2.313908653*y-0.439822951-3.0443*n);//˷
  //ʷM
  var jkk=0;if(y>-216||y==-216&&n>=21)jkk=1;if(y>=-103)jkk=2;if(y>85||y==85&&n>=4)jkk=3;
  if(y>237||y==237&&n>=4)jkk=4;if(y>445||y==445&&n>=3)jkk=5;if(y>510||y==510&&n>=3)jkk=6;if(y>590||y==590&&n>=4)jkk=7;
  if(y>597||y==597&&n>=3)jkk=8;if(y>619||y==619&&n>=3)jkk=9;if(y>666||y==666&&n>=4)jkk=10;if(y>729||y==729&&n>=4)jkk=11;
  if(y>762||y==762&&n>=19)jkk=12;if(y>784||y==784&&n>=3)jkk=13;if(y>822||y==822&&n>=3)jkk=14;if(y>893||y==893&&n>=3)jkk=15;
  if(y>956||y==956&&n>=4)jkk=16;if(y>964||y==964&&n>=4)jkk=17;if(y>983||y==983&&n>=4)jkk=18;if(y>1001||y==1001&&n>=3)jkk=19;
  if(y>1064||y==1064&&n>=24)jkk=20;if(y>1068||y==1068&&n>=4)jkk=21;
  if(y>1075||y==1075&&n>=3)jkk=22;if(y>1094||y==1094&&n>=3)jkk=23;if(y>1103||y==1103&&n>=4)jkk=24;
  if(y>1106||y==1106&&n>=4)jkk=25;if(y>1136||y==1136&&n>=4)jkk=26;if(y>1191||y==1191&&n>=3)jkk=27;if(y>1199||y==1199&&n>=3)jkk=28;
  if(y>1208||y==1208&&n>=3)jkk=29;if(y>1252||y==1252&&n>=10)jkk=30;if(y>1253||y==1253&&n>=4)jkk=31;if(y>1271||y==1271&&n>=4)jkk=32;
  if(y>1277||y==1277&&n>=4)jkk=33;if(y>1280||y==1280&&n>=4)jkk=34;
  var yk2=ykche[jkk];///
  var k=kche[jkk];//
  var jk=jkche[jkk];////L
  var jk9=jkche2[jkk];///
  //ʷӋ
  var ykd=(erJD(y,1,1))-1;
  var yk3=jk*(jk9*1);
  var yk=(yk2*1)-(yk3*1);
  var jq=jk*(n+(24*(y-k-1)));
  var vj=jq+yk-ykd+0.5;if(y<-220||y>1646||y==1646&&n>=3)vj='';
  var vs=(pd)?(juD+yrD+shuoD-erD(y,1,0)-1721425):vj;//vjŴƽ⣬F⡮(juD+yrD+shuoD-erD(y,1,0)-1721425)Fƽ⣺(juD-erD(y,1,0)-1721425)
  return vs;
}
function jqi(y,m,d,a){
  var mL=D0(y,m+1,1)-D0(y,m,1);if(y==1582&&m==10)mL=31;
  var yr2=yearStr(y);
  var sT00='';var sT0='';var sT1='';var sT2='';var sT3='';var sT4='';  var qSt='';var sDsStr1='';var ifsj1='';////
  var sN00=2*m-3;
  var sDt00=S(y,sN00,1);if(a==3)sDt00=S(y,sN00);
  var sD00=antiD0(y,floor(sDt00));
  var sM00=floor(sD00/100);   ///⽻ӹ¡
  sDate00=sD00%100;
  var sN0=2*m-2;
  var sDt0=S(y,sN0,1);if(a==3)sDt0=S(y,sN0);
  var sD0=antiD0(y,floor(sDt0));
  var sM0=floor(sD0/100); 
  sDate0=sD0%100;
  sN1=2*m-1;
  var sDt1=S(y,sN1,1);if(a==3)sDt1=S(y,sN1);
  var sD1=antiD0(y,floor(sDt1));
  var sM1=floor(sD1/100); 
  sDate1=sD1%100;
  sN2=2*m;
  var sDt2=S(y,sN2,1);if(a==3)sDt2=S(y,sN2);
  var sD2=antiD0(y,floor(sDt2));
  var sM2=floor(sD2/100);
  sDate2=sD2%100;if(y==1582&&m==10)sDate2=sDate2+10;
  var sN3=2*m+1;
  if(sN3>24)
  sN3=25;
  var sDt3=S(y,sN3,1);if(a==3)sDt3=S(y,sN3);
  var sD3=antiD0(y,floor(sDt3));
  var sM3=floor(sD3/100);
  sDate3=sD3%100;

  sN00=rem(sN00-1,24)+1;sN0=rem(sN0-1,24)+1;sN1=rem(sN1-1,24)+1; sN2=rem(sN2-1,24)+1; sN3=rem(sN3-1,24)+1;
  if(sDate2>mL) sDate2-=mL; var jqk=D0(y,m,d);var qk00=floor(sDt00);
  var qk0=floor(sDt0);var qk1=floor(sDt1);var qk2=floor(sDt2);var qk3=floor(sDt3);
  if(qk00<D0(y,m,1)||qk00>D0(y,m,mL)) sN00='';
  if(qk0<D0(y,m,1)||qk0>D0(y,m,mL)) sN0='';
  if(qk1<D0(y,m,1)||qk1>D0(y,m,mL)) sN1='';
  if(qk2<D0(y,m,1)||qk2>D0(y,m,mL)) sN2='';
  if(qk3<D0(y,m,1)||qk3>D0(y,m,mL)) sN3='';//
  sT00='%'+yr2+sM00+''+sDate00+''+'|8^'+dToStr(tail(sDt00))+' '+sStr(sN00)+'<br>';if(sN00=='') sT00='';
  sT0='*'+yr2+sM0+''+sDate0+''+'|8^'+dToStr(tail(sDt0))+' '+sStr(sN0)+'<br>';if(sN0=='') sT0='';
  sT1='&'+yr2+sM1+''+sDate1+''+'|8^'+dToStr(tail(sDt1))+' '+sStr(sN1)+'<br>';if(sN1=='') sT1='';
  sT2='$'+yr2+sM2+''+sDate2+''+'|8^'+dToStr(tail(sDt2))+' '+sStr(sN2);if(sN2=='')sT2=''; 
  sT3='<br>'+'#'+yr2+sM3+''+sDate3+''+'|8^'+dToStr(tail(sDt3))+' '+sStr(sN3);if(sN3=='')sT3=''; 
  var qSt5='';if(a==1)qSt5='';if(a==2)qSt5='<font color=#808000>'+'</font>';
  if(jqk==qk00)if(sT00==''){sDsStr1='|'}else{sDsStr1=qSt5+sStr(sN00)+':|8^'+dToStr(tail(sDt00));}
  if(jqk==qk0)if(sT0==''){sDsStr1='|'}else{sDsStr1=qSt5+sStr(sN0)+':|8^'+dToStr(tail(sDt0));}
  if(jqk==qk1)if(sN1==''){sDsStr1='|'}else{sDsStr1=qSt5+sStr(sN1)+':|8^'+dToStr(tail(sDt1));}
  if(jqk==qk2)if(sN2==''){sDsStr1='|'}else{ sDsStr1=qSt5+sStr(sN2)+':|8^'+dToStr(tail(sDt2));} ///
  if(jqk==qk3)if(sT3==''){sDsStr1='|'}else{sDsStr1=qSt5+sStr(sN3)+':|8^'+dToStr(tail(sDt3));}
  
  if(jqk==qk00)if(sT00==''){qSt=''}else{qSt=qSt5+sStr(sN00);}
  if(jqk==qk0)if(sT0==''){qSt=''}else{qSt=qSt5+sStr(sN0);}
  if(jqk==qk1)if(sT1==''){qSt=''}else{qSt=qSt5+sStr(sN1);}
  if(jqk==qk2)if(sT2==''){qSt=''}else{ qSt=qSt5+sStr(sN2);} 
  if(jqk==qk3)if(sT3==''){qSt=''}else{qSt=qSt5+sStr(sN3);}
  if(a==1){return sDsStr1;}else{
  if(a==2){return qSt;}else{
  if(a==3){return qSt;}else{
  return sT00+sT0+sT1+sT2+sT3;}}}
  }
//--⌍H@ʾ--//
 function jqi1(y,m,d){//@ʾʽ1rgĳաĳվ@ʾrg
 return jqi(y,m,d,1);
 }

 function jqi2(y,m,d){//@ʾʽ2ÿµăɂe⽻rg
 return jqi(y,m,d);
 }
 function jqi3(y,m,d){//@ʾʽ3Ѹ
  var sjq2='';var sjq0=jqi(y,m,d,2);
  if(y>=-220&&y<1646&&sjq0>''||y==1646&&m<=1&&sjq0>'')sjq0='<font color=#808000>'+'</font>';
  var sjq1=jqi(y,m,d,3); var sjq=sjq0+sjq1;
 return sjq;
 }/////ӋY
function siju(y,m,d,h,mi){///ļ
 var mi=abs(mi);
 var djr=(D0(y,m,d)+(h+(mi+1)/60)/24);
 if(djr>=(y,3,1)&&djr<S(y,9,1))
   var gzM=0;
 if(djr>=S(y,9,1)&&djr<S(y,15,1))
   var gzM=1;
 if(djr>=S(y,15,1)&&djr<S(y,21,1))
   var gzM=2;
 if(djr>=S(y,21,1)||djr<S(y,3,1))
   var gzM=3;
 return gzM;
}
  function qisiehou(y1,m1,d1){//72
        var djt=D0(y1,m1,d1);var xs1='';
        var a=1;if(y1>=-220&&y1<1646||y1==1646&&m1==1&&d1<30)a='';
	if(djt>floor(S(y1,-2,a))+3 && djt<=floor(S(y1,-2,a))+8){xs1='vؚ⽵';}
	else if(djt>floor(S(y1,-2,a))+8 && djt<floor(S(y1,-1,a))-1){xs1=']ɶ';}			
	else if(djt>=floor(S(y1,-1,a))-1 && djt<=floor(S(y1,-1,a))+3){xs1='i}Q';}
	else if(djt>floor(S(y1,-1,a))+3 && djt<=floor(S(y1,-1,a))+8){xs1='ʼ';}
	else if(djt>floor(S(y1,-1,a))+8 && djt<floor(S(y1,0,a))-1){xs1='ͦ';}
	else if(djt>=floor(S(y1,0,a))-1 && djt<=floor(S(y1,0,a))+3){xs1='Y';}
	else if(djt>floor(S(y1,0,a))+3 && djt<=floor(S(y1,0,a))+8){xs1='¹';}
	else if(djt>floor(S(y1,0,a))+8 && djt<floor(S(y1,1,a))-1){xs1='ˮȪ';}
	else if(djt>=floor(S(y1,1,a))-1 && djt<=floor(S(y1,1,a))+3) {xs1='㱱l';}
	else if(djt>floor(S(y1,1,a))+3 && djt<=floor(S(y1,1,a))+8) {xs1='oʼ';}
	else if(djt>floor(S(y1,1,a))+8 && djt<floor(S(y1,2,a))-1){xs1='Wʼz';}
	else if(djt>=floor(S(y1,2,a))-1 && djt<=floor(S(y1,2,a))+3){xs1='uʼ';}
	else if(djt>floor(S(y1,2,a))+3 && djt<=floor(S(y1,2,a))+8){xs1='B';}
	else if(djt>floor(S(y1,2,a))+8 && djt<floor(S(y1,3,a))-1){xs1='ˮɸ';}
	else if(djt>=floor(S(y1,3,a))-1 && djt<=floor(S(y1,3,a))+3){xs1='|L';}
	else if(djt>floor(S(y1,3,a))+3 && djt<=floor(S(y1,3,a))+8){xs1='Uxʼ';}
	else if(djt>floor(S(y1,3,a))+8 && djt<floor(S(y1,4,a))-1){xs1='~ϱ';}
	else if(djt>=floor(S(y1,4,a))-1 && djt<=floor(S(y1,4,a))+3){xs1='H~';}
	else if(djt>floor(S(y1,4,a))+3 && djt<=floor(S(y1,4,a))+8){xs1='㱱';}
	else if(djt>floor(S(y1,4,a))+8 && djt<floor(S(y1,5,a))-1){xs1='ľȄ';}
	else if(djt>=floor(S(y1,5,a))-1 && djt<=floor(S(y1,5,a))+3){xs1='ʼA';}
	else if(djt>floor(S(y1,5,a))+3 && djt<=floor(S(y1,5,a))+8){xs1='}Q';}
	else if(djt>floor(S(y1,5,a))+8 && djt<floor(S(y1,6,a))-1){xs1='F';}
	else if(djt>=floor(S(y1,6,a))-1 && djt<=floor(S(y1,6,a))+3){xs1='B';}
	else if(djt>floor(S(y1,6,a))+3 && djt<=floor(S(y1,6,a))+8){xs1='˰l';}
	else if(djt>floor(S(y1,6,a))+8 && djt<floor(S(y1,7,a))-1){xs1='ʼ';}		
	else if(djt>=floor(S(y1,7,a))-1 && djt<=floor(S(y1,7,a))+3){xs1='ͩʼA';}
	else if(djt>floor(S(y1,7,a))+3 && djt<=floor(S(y1,7,a))+8){xs1='󻯠';}
	else if(djt>floor(S(y1,7,a))+8 && djt<floor(S(y1,8,a))-1){xs1='ʼҊ';}
	else if(djt>=floor(S(y1,8,a))-1 && djt<=floor(S(y1,8,a))+3){xs1='Ƽʼ';}
	else if(djt>floor(S(y1,8,a))+3 && djt<=floor(S(y1,8,a))+8){xs1='QF';}
	else if(djt>floor(S(y1,8,a))+8 && djt<floor(S(y1,9,a))-1){xs1='ٽɣ';}		
	else if(djt>=floor(S(y1,9,a))-1 && djt<=floor(S(y1,9,a))+3){xs1='NXQ';}
	else if(djt>floor(S(y1,9,a))+3 && djt<=floor(S(y1,9,a))+8){xs1='';}
	else if(djt>floor(S(y1,9,a))+8 && djt<floor(S(y1,10,a))-1){xs1='';}
	else if(djt>=floor(S(y1,10,a))-1 && djt<=floor(S(y1,10,a))+3){xs1='';}
	else if(djt>floor(S(y1,10,a))+3 && djt<=floor(S(y1,10,a))+8){xs1='Ҳ';}
	else if(djt>floor(S(y1,10,a))+8 && djt<floor(S(y1,11,a))-1){xs1='';}			
	else if(djt>=floor(S(y1,11,a))-1 && djt<=floor(S(y1,11,a))+3){xs1='';}
	else if(djt>floor(S(y1,11,a))+3 && djt<=floor(S(y1,11,a))+8){xs1='VʼQ';}
	else if(djt>floor(S(y1,11,a))+8 && djt<floor(S(y1,12,a))-1){xs1='o';}
	else if(djt>=floor(S(y1,12,a))-1 && djt<=floor(S(y1,12,a))+3){xs1='¹ǽ';}
	else if(djt>floor(S(y1,12,a))+3 && djt<=floor(S(y1,12,a))+8){xs1='ʼQ';}
	else if(djt>floor(S(y1,12,a))+8 && djt<floor(S(y1,13,a))-1){xs1='';}			
	else if(djt>=floor(S(y1,13,a))-1 && djt<=floor(S(y1,13,a))+3){xs1='L';}
	else if(djt>floor(S(y1,13,a))+3 && djt<=floor(S(y1,13,a))+8){xs1='ӱ';}
	else if(djt>floor(S(y1,13,a))+8 && djt<floor(S(y1,14,a))-1){xs1='v';}
	else if(djt>=floor(S(y1,14,a))-1 && djt<=floor(S(y1,14,a))+3){xs1='ݠΞ';}
	else if(djt>floor(S(y1,14,a))+3 && djt<=floor(S(y1,14,a))+8){xs1='';}
	else if(djt>floor(S(y1,14,a))+8 && djt<floor(S(y1,15,a))-1){xs1='r';}			
	else if(djt>=floor(S(y1,15,a))-1 && djt<=floor(S(y1,15,a))+3){xs1='L';}
	else if(djt>floor(S(y1,15,a))+3 && djt<=floor(S(y1,15,a))+8){xs1='¶';}
	else if(djt>floor(S(y1,15,a))+8 && djt<floor(S(y1,16,a))-1){xs1='sQ';}
	else if(djt>=floor(S(y1,16,a))-1 && djt<=floor(S(y1,16,a))+3){xs1='˼B';}
	else if(djt>floor(S(y1,16,a))+3 && djt<=floor(S(y1,16,a))+8){xs1='ʼC';}
	else if(djt>floor(S(y1,16,a))+8 && djt<floor(S(y1,17,a))-1){xs1='˵';}			
	else if(djt>=floor(S(y1,17,a))-1 && djt<=floor(S(y1,17,a))+3){xs1='';}
	else if(djt>floor(S(y1,17,a))+3 && djt<=floor(S(y1,17,a))+8){xs1='Bw';}
	else if(djt>floor(S(y1,17,a))+8 && djt<floor(S(y1,18,a))-1){xs1='ȺBB';}
	else if(djt>=floor(S(y1,18,a))-1 && djt<=floor(S(y1,18,a))+3){xs1='';}
	else if(djt>floor(S(y1,18,a))+3 && djt<=floor(S(y1,18,a))+8){xs1='Ux';}
	else if(djt>floor(S(y1,18,a))+8 && djt<floor(S(y1,19,a))-1){xs1='ˮʼ';}			
	else if(djt>=floor(S(y1,19,a))-1 && djt<=floor(S(y1,19,a))+3){xs1='e';}
	else if(djt>floor(S(y1,19,a))+3 && djt<=floor(S(y1,19,a))+8){xs1='ȸˮ';}
	else if(djt>floor(S(y1,19,a))+8 && djt<floor(S(y1,20,a))-1){xs1='S';}
	else if(djt>=floor(S(y1,20,a))-1 && djt<=floor(S(y1,20,a))+3){xs1='˼F';}
	else if(djt>floor(S(y1,20,a))+3 && djt<=floor(S(y1,20,a))+8){xs1='ľS';}
	else if(djt>floor(S(y1,20,a))+8 && djt<floor(S(y1,21,a))-1){xs1='Uxy';}			
	else if(djt>=floor(S(y1,21,a))-1 && djt<=floor(S(y1,21,a))+3){xs1='ˮʼ';}
	else if(djt>floor(S(y1,21,a))+3 && djt<=floor(S(y1,21,a))+8){xs1='ʼ';}
	else if(djt>floor(S(y1,21,a))+8 && djt<floor(S(y1,22,a))-1){xs1='ˮ';}
	else if(djt>=floor(S(y1,22,a))-1 && djt<=floor(S(y1,22,a))+3){xs1='زҊ';}
	else if(djt>floor(S(y1,22,a))+3 && djt<=floor(S(y1,22,a))+8){xs1='vؚ⽵';}
	else if(djt>floor(S(y1,22,a))+8 && djt<floor(S(y1,23,a))-1){xs1=']ɶ';}			
	else if(djt>=floor(S(y1,23,a))-1 && djt<=floor(S(y1,23,a))+3){xs1='i}Q';}
	else if(djt>floor(S(y1,23,a))+3 && djt<=floor(S(y1,23,a))+8){xs1='ʼ';}
	else if(djt>floor(S(y1,23,a))+8 && djt<floor(S(y1,24,a))-1){xs1='ͦ';}
	else if(djt>=floor(S(y1,24,a))-1 && djt<=floor(S(y1,24,a))+3){xs1='Y';}
	else if(djt>floor(S(y1,24,a))+3 && djt<=floor(S(y1,24,a))+8){xs1='¹';}
	else if(djt>floor(S(y1,24,a))+8  && djt<floor(S(y1,25,a))-1){xs1='ˮȪ';}  
	else if(djt>=floor(S(y1,25,a))-1 && djt<=floor(S(y1,25,a))+3) {xs1='㱱l';}
	else if(djt>floor(S(y1,25,a))+3) {xs1='oʼ';}
return xs1;
}


