⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 main.js

📁 超强的万年历 阴阳历日期时间,生肖,节气,月相,历史今天等
💻 JS
📖 第 1 页 / 共 5 页
字号:
	if (num==11) return(jcName11[num2]); 
} 

function calendar(y,m) {

   var sDObj, lDObj, lY, lM, lD=1, lL, lX=0, tmp1, tmp2,lM2,lY2,lD2,tmp3,dayglus,bsg,xs,xs1,fs,fs1,cs,cs1
   var lDPOS = new Array(3)
   var n = 0
   var firstLM = 0

   sDObj = new Date(y,m,1,0,0,0,0);           
   this.length    = solarDays(y,m)    
   this.firstWeek = sDObj.getDay()   
	if(m<2) {
		cY=cyclical(y-1900+36-1);lY2=(y-1900+36-1);
	} else { 
		cY=cyclical(y-1900+36);lY2=(y-1900+36);
	}
	var term2=sTerm(y,2);
	var firstNode = sTerm(y,m*2)
	cM = cyclical((y-1900)*12+m+12);
	lM2= (y-1900)*12+m+12;
	var dayCyclical = Date.UTC(y,m,1,0,0,0,0)/86400000+25567+10;

	for(var i=0;i<this.length;i++) {
		if(lD>lX) {     	
			sDObj = new Date(y,m,i+1)   
			lDObj = new Lunar(sDObj)    
			lY    = lDObj.year          
			lM    = lDObj.month         
			lD    = lDObj.day          
			lL    = lDObj.isLeap        
			lX    = lL? leapDays(lY): monthDays(lY,lM) 
			if(n==0) firstLM = lM
			lDPOS[n++] = i-lD+1
		}
		if(m==1 && (i+1)==term2){ 
			cY=cyclical(y-1900+36);
			lY2=(y-1900+36);
		}
		if((i+1)==firstNode) {
			cM = cyclical((y-1900)*12+m+13);
			lM2=(y-1900)*12+m+13;
		}
		cD = cyclical(dayCyclical+i);
		lD2=(dayCyclical+i);
		this[i] = new calElement(y, m+1, i+1, nStr1[(i+this.firstWeek)%7], lY, lM, lD++, lL, cY ,cM, cD );
		bsg=(lD2)%12;
		cs1=i+1;
		if(m==0){
			if(cs1<sTerm(y,m*2  )-1){xs1='水泉动';}
			else if(cs1>=sTerm(y,m*2  )-1 && cs1<=sTerm(y,m*2  )+3) {xs1='雁北乡';}
			else if(cs1>sTerm(y,m*2  )+3 && cs1<=sTerm(y,m*2  )+8) {xs1='鹊始巢';}
			else if(cs1>sTerm(y,m*2  )+8 && cs1<sTerm(y,m*2+1)-1){xs1='鳺始鴝';}
			else if(cs1>=sTerm(y,m*2+1)-1 && cs1<=sTerm(y,m*2+1)+3){xs1='鸡始乳';}
			else if(cs1>sTerm(y,m*2+1)+3 && cs1<=sTerm(y,m*2+1)+8){xs1='征鸟厉疾';}
			else if(cs1>sTerm(y,m*2+1)+8){xs1='水泽腹坚';}
		}
		if(m==1){
			if(cs1<sTerm(y,m*2  )-1){xs1='水泽腹坚';}
			else if(cs1>=sTerm(y,m*2  )-1 && cs1<=sTerm(y,m*2  )+3){xs1='东风解冻';}
			else if(cs1>sTerm(y,m*2  )+3 && cs1<=sTerm(y,m*2  )+8){xs1='蛰虫始振';}
			else if(cs1>sTerm(y,m*2  )+8 && cs1<sTerm(y,m*2+1)-1){xs1='鱼上冰';}
			else if(cs1>=sTerm(y,m*2+1)-1 && cs1<=sTerm(y,m*2+1)+3){xs1='獭祭鱼';}
			else if(cs1>sTerm(y,m*2+1)+3 && cs1<=sTerm(y,m*2+1)+8){xs1='候雁北';}
			else if(cs1>sTerm(y,m*2+1)+8){xs1='草木萌动';}
		}
		if(m==2){
			if(cs1<sTerm(y,m*2  )-1){xs1='草木萌动';}
			else if(cs1>=sTerm(y,m*2  )-1 && cs1<=sTerm(y,m*2  )+3){xs1='桃始华';}
			else if(cs1>sTerm(y,m*2  )+3 && cs1<=sTerm(y,m*2  )+8){xs1='仓庚鸣';}
			else if(cs1>sTerm(y,m*2  )+8 && cs1<sTerm(y,m*2+1)-1){xs1='鹰化为鸠';}
			else if(cs1>=sTerm(y,m*2+1)-1 && cs1<=sTerm(y,m*2+1)+3){xs1='玄鸟至';}
			else if(cs1>sTerm(y,m*2+1)+3 && cs1<=sTerm(y,m*2+1)+8){xs1='雷乃发声';}
			else if(cs1>sTerm(y,m*2+1)+8){xs1='始电';}
		}
		if(m==3){
			if(cs1<sTerm(y,m*2  )-1){xs1='始电';}
			else if(cs1>=sTerm(y,m*2  )-1 && cs1<=sTerm(y,m*2  )+3){xs1='桐始华';}
			else if(cs1>sTerm(y,m*2  )+3 && cs1<=sTerm(y,m*2  )+8){xs1='田鼠化为鴽';}
			else if(cs1>sTerm(y,m*2  )+8 && cs1<sTerm(y,m*2+1)-1){xs1='虹始见';}
			else if(cs1>=sTerm(y,m*2+1)-1 && cs1<=sTerm(y,m*2+1)+3){xs1='萍始生';}
			else if(cs1>sTerm(y,m*2+1)+3 && cs1<=sTerm(y,m*2+1)+8){xs1='鸣鸠拂其羽';}
			else if(cs1>sTerm(y,m*2+1)+8){xs1='戴胜降于桑';}
		}
		if(m==4){
			if(cs1<sTerm(y,m*2  )-1){xs1='戴胜降于桑';}
			else if(cs1>=sTerm(y,m*2  )-1 && cs1<=sTerm(y,m*2  )+3){xs1='蝼蝈鸣';}
			else if(cs1>sTerm(y,m*2  )+3 && cs1<=sTerm(y,m*2  )+8){xs1='蚯蚓出';}
			else if(cs1>sTerm(y,m*2  )+8 && cs1<sTerm(y,m*2+1)-1){xs1='王瓜生';}
			else if(cs1>=sTerm(y,m*2+1)-1 && cs1<=sTerm(y,m*2+1)+3){xs1='苦菜秀';}
			else if(cs1>sTerm(y,m*2+1)+3 && cs1<=sTerm(y,m*2+1)+8){xs1='靡草死';}
			else if(cs1>sTerm(y,m*2+1)+8){xs1='麦秋至';}
		}
		if(m==5){
			if(cs1<sTerm(y,m*2  )-1){xs1='麦秋至';}
			else if(cs1>=sTerm(y,m*2  )-1 && cs1<=sTerm(y,m*2  )+3){xs1='螳螂生';}
			else if(cs1>sTerm(y,m*2  )+3 && cs1<=sTerm(y,m*2  )+8){xs1='鵙始鸣';}
			else if(cs1>sTerm(y,m*2  )+8 && cs1<sTerm(y,m*2+1)-1){xs1='反舌无声';}
			else if(cs1>=sTerm(y,m*2+1)-1 && cs1<=sTerm(y,m*2+1)+3){xs1='鹿角解';}
			else if(cs1>sTerm(y,m*2+1)+3 && cs1<=sTerm(y,m*2+1)+8){xs1='蜩始鸣';}
			else if(cs1>sTerm(y,m*2+1)+8){xs1='半夏生';}
		}
		if(m==6){
			if(cs1<sTerm(y,m*2  )-1){xs1='半夏生';}
			else if(cs1>=sTerm(y,m*2  )-1 && cs1<=sTerm(y,m*2  )+3){xs1='温风至';}
			else if(cs1>sTerm(y,m*2  )+3 && cs1<=sTerm(y,m*2  )+8){xs1='蟀蟋居壁';}
			else if(cs1>sTerm(y,m*2  )+8 && cs1<sTerm(y,m*2+1)-1){xs1='鹰如鸷';}
			else if(cs1>=sTerm(y,m*2+1)-1 && cs1<=sTerm(y,m*2+1)+3){xs1='腐草为萤';}
			else if(cs1>sTerm(y,m*2+1)+3 && cs1<=sTerm(y,m*2+1)+8){xs1='土润溽暑';}
			else if(cs1>sTerm(y,m*2+1)+8){xs1='大雨时行';}
		}
		if(m==7){
			if(cs1<sTerm(y,m*2  )-1){xs1='大雨时行';}
			else if(cs1>=sTerm(y,m*2  )-1 && cs1<=sTerm(y,m*2  )+3){xs1='凉风至';}
			else if(cs1>sTerm(y,m*2  )+3 && cs1<=sTerm(y,m*2  )+8){xs1='白露降';}
			else if(cs1>sTerm(y,m*2  )+8 && cs1<sTerm(y,m*2+1)-1){xs1='寒蝉鸣';}
			else if(cs1>=sTerm(y,m*2+1)-1 && cs1<=sTerm(y,m*2+1)+3){xs1='鹰乃祭鸟';}
			else if(cs1>sTerm(y,m*2+1)+3 && cs1<=sTerm(y,m*2+1)+8){xs1='天地始肃';}
			else if(cs1>sTerm(y,m*2+1)+8){xs1='禾乃登';}
		}
		if(m==8){
			if(cs1<sTerm(y,m*2  )-1){xs1='禾乃登';}
			else if(cs1>=sTerm(y,m*2  )-1 && cs1<=sTerm(y,m*2  )+3){xs1='鸿雁来';}
			else if(cs1>sTerm(y,m*2  )+3 && cs1<=sTerm(y,m*2  )+8){xs1='玄鸟归';}
			else if(cs1>sTerm(y,m*2  )+8 && cs1<sTerm(y,m*2+1)-1){xs1='群鸟养羞';}
			else if(cs1>=sTerm(y,m*2+1)-1 && cs1<=sTerm(y,m*2+1)+3){xs1='雷乃收声';}
			else if(cs1>sTerm(y,m*2+1)+3 && cs1<=sTerm(y,m*2+1)+8){xs1='蛰虫坯户';}
			else if(cs1>sTerm(y,m*2+1)+8){xs1='水始涸';}
		}
		if(m==9){
			if(cs1<sTerm(y,m*2  )-1){xs1='水始涸';}
			else if(cs1>=sTerm(y,m*2  )-1 && cs1<=sTerm(y,m*2  )+3){xs1='鸿雁来宾';}
			else if(cs1>sTerm(y,m*2  )+3 && cs1<=sTerm(y,m*2  )+8){xs1='雀入大水为蛤';}
			else if(cs1>sTerm(y,m*2  )+8 && cs1<sTerm(y,m*2+1)-1){xs1='菊有黄花';}
			else if(cs1>=sTerm(y,m*2+1)-1 && cs1<=sTerm(y,m*2+1)+3){xs1='豺乃祭兽';}
			else if(cs1>sTerm(y,m*2+1)+3 && cs1<=sTerm(y,m*2+1)+8){xs1='草木黄落';}
			else if(cs1>sTerm(y,m*2+1)+8){xs1='蛰虫咸俯';}
		}
		if(m==10){
			if(cs1<sTerm(y,m*2  )-1){xs1='蛰虫咸俯';}
			else if(cs1>=sTerm(y,m*2  )-1 && cs1<=sTerm(y,m*2  )+3){xs1='水始冰';}
			else if(cs1>sTerm(y,m*2  )+3 && cs1<=sTerm(y,m*2  )+8){xs1='地始冻';}
			else if(cs1>sTerm(y,m*2  )+8 && cs1<sTerm(y,m*2+1)-1){xs1='雉入大水为蜃';}
			else if(cs1>=sTerm(y,m*2+1)-1 && cs1<=sTerm(y,m*2+1)+3){xs1='虹藏不见';}
			else if(cs1>sTerm(y,m*2+1)+3 && cs1<=sTerm(y,m*2+1)+8){xs1='天气腾地气降';}
			else if(cs1>sTerm(y,m*2+1)+8){xs1='闭塞成冬';}
		}
		if(m==11){
			if(cs1<sTerm(y,m*2  )-1){xs1='闭塞成冬';}
			else if(cs1>=sTerm(y,m*2  )-1 && cs1<=sTerm(y,m*2  )+3){xs1='鹖鴠不鸣';}
			else if(cs1>sTerm(y,m*2  )+3 && cs1<=sTerm(y,m*2  )+8){xs1='虎始交';}
			else if(cs1>sTerm(y,m*2  )+8 && cs1<sTerm(y,m*2+1)-1){xs1='荔挺出';}
			else if(cs1>=sTerm(y,m*2+1)-1 && cs1<=sTerm(y,m*2+1)+3){xs1='蚯蚓结';}
			else if(cs1>sTerm(y,m*2+1)+3 && cs1<=sTerm(y,m*2+1)+8){xs1='麋鹿解';}
			else if(cs1>sTerm(y,m*2+1)+8){xs1='水泉动';}
		}
		if(bsg==0){dayglus=Gan[9]+'命进禄 ';}
		else if(bsg==2){dayglus=Gan[0]+'命进禄 ';}
		else if(bsg==3){dayglus=Gan[1]+'命进禄 ';}
		else if(bsg==5){dayglus=Gan[2]+','+Gan[4]+'命进禄 ';}
		else if(bsg==6){dayglus=Gan[3]+','+Gan[5]+'命进禄 ';}
		else if(bsg==8){dayglus=Gan[6]+'命进禄 ';}
		else if(bsg==9){dayglus=Gan[7]+'命进禄 ';}
		else if(bsg==11){dayglus=Gan[8]+'命进禄 ';}
		else {dayglus='';}
		if((lD2)%10==0 || (lD2)%10==5){xs='东北';}
		else if((lD2)%10==1 || (lD2)%10==6){xs='西北';}
		else if((lD2)%10==2 || (lD2)%10==7){xs='西南';}
		else if((lD2)%10==3 || (lD2)%10==8){xs='正南';}
		else if((lD2)%10==4 || (lD2)%10==9){xs='东南';}
		if((lD2)%10==0 || (lD2)%10==1){fs='东南';}
		else if((lD2)%10==2 || (lD2)%10==3){fs='正东';}
		else if((lD2)%10==4){fs='正北';}
		else if((lD2)%10==5){fs='正南';}
		else if((lD2)%10==6 || (lD2)%10==7){fs='西南';}
		else if((lD2)%10==8){fs='西北';}
		else if((lD2)%10==9){fs='正西';}
		if((lD2)%10==0 || (lD2)%10==1){cs='东北';}
		else if((lD2)%10==2 || (lD2)%10==3){cs='西南';}
		else if((lD2)%10==4 || (lD2)%10==5){cs='正北';}
		else if((lD2)%10==6 || (lD2)%10==7){cs='正东';}
		else if((lD2)%10==8 || (lD2)%10==9){cs='正南';}
		this[i].pgday =cyclical3(lD2);
		this[i].dGz = '时辰:'+cyclical4(lD2);
		this[i].sgz ='<FONT color=#FF8C1A>吉</font><FONT color=#0000A0>凶</font>:'+ cyclical5(lD2);
		this[i].sgz2 =jzny([lD2]%10+''+[lD2]%12);
		this[i].sgz4 =CalConv((lD2)%10,(lD2)%12);
		this[i].sgz5 =CalConv2(lY2%12,lM2%12,(lD2)%12,lY2%10,(lD2)%10,lM,lD-1,m+1,cs1);
		this[i].sgz6 =cyclical7(lM2%12,(lD2)%12);
		this[i].sgz7 =jznyy([lD2]%10+''+[lD2]%12);

		this[i].sgz8 =jznyy([lM2]%10+''+[lM2]%12);
		this[i].sgz9 =jznyy([lY2]%10+''+[lY2]%12);
		this[i].sgz3 =cyclical6(lM2%12,(lD2)%12);
		this[i].dayglu ='◇是日命禄:<font color=red>'+dayglk[(lD2)%10]+'命互禄 '+dayglus+'</font>';
		this[i].ssfw ='◇喜神:<font color=red>'+xs+'</font> ◇福神:<font color=red>'+fs+'</font> ◇财神:<font color=red>'+cs;
		this[i].fs1 ='本日物候:'+xs1
		if((i+this.firstWeek)%7==0)   this[i].color = 'red'
		if((i+this.firstWeek)%14==13) this[i].color = 'red'
		this[i].sgzzm2 = '◆'+sTerm(y,m*2  )+'日'+ solarTerm[m*2]+'  '+'◆'+sTerm(y,m*2+1)+'日'+ solarTerm[m*2+1]
	}
	if(y==tY && m==tM) this[tD-1].solarTerms +='今天'

	tmp1=sTerm(y,m*2  )-1
	tmp2=sTerm(y,m*2+1)-1
	this[tmp1].solarTerms = solarTerm[m*2]
	this[tmp2].solarTerms = solarTerm[m*2+1]

	if(m==3) this[tmp1].color = '#CC4AF7'
	for(i in sFtv)
		if(sFtv[i].match(/^(\d{2})(\d{2})([\s\*])(.+)$/))
			if(Number(RegExp.$1)==(m+1)) {
				this[Number(RegExp.$2)-1].solarFestival += RegExp.$4 + ' '
				if(RegExp.$3=='*') this[Number(RegExp.$2)-1].color = '#BC02D7'

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -