/*****************************************************************************
                                   日期资料
*****************************************************************************/

var lunarInfo=new Array(
0x04bd8,0x04ae0,0x0a570,0x054d5,0x0d260,0x0d950,0x16554,0x056a0,0x09ad0,0x055d2,
0x04ae0,0x0a5b6,0x0a4d0,0x0d250,0x1d255,0x0b540,0x0d6a0,0x0ada2,0x095b0,0x14977,
0x04970,0x0a4b0,0x0b4b5,0x06a50,0x06d40,0x1ab54,0x02b60,0x09570,0x052f2,0x04970,
0x06566,0x0d4a0,0x0ea50,0x06e95,0x05ad0,0x02b60,0x186e3,0x092e0,0x1c8d7,0x0c950,
0x0d4a0,0x1d8a6,0x0b550,0x056a0,0x1a5b4,0x025d0,0x092d0,0x0d2b2,0x0a950,0x0b557,
0x06ca0,0x0b550,0x15355,0x04da0,0x0a5b0,0x14573,0x052b0,0x0a9a8,0x0e950,0x06aa0,
0x0aea6,0x0ab50,0x04b60,0x0aae4,0x0a570,0x05260,0x0f263,0x0d950,0x05b57,0x056a0,
0x096d0,0x04dd5,0x04ad0,0x0a4d0,0x0d4d4,0x0d250,0x0d558,0x0b540,0x0b6a0,0x195a6,
0x095b0,0x049b0,0x0a974,0x0a4b0,0x0b27a,0x06a50,0x06d40,0x0af46,0x0ab60,0x09570,
0x04af5,0x04970,0x064b0,0x074a3,0x0ea50,0x06b58,0x055c0,0x0ab60,0x096d5,0x092e0,
0x0c960,0x0d954,0x0d4a0,0x0da50,0x07552,0x056a0,0x0abb7,0x025d0,0x092d0,0x0cab5,
0x0a950,0x0b4a0,0x0baa4,0x0ad50,0x055d9,0x04ba0,0x0a5b0,0x15176,0x052b0,0x0a930,
0x07954,0x06aa0,0x0ad50,0x05b52,0x04b60,0x0a6e6,0x0a4e0,0x0d260,0x0ea65,0x0d530,
0x05aa0,0x076a3,0x096d0,0x04bd7,0x04ad0,0x0a4d0,0x1d0b6,0x0d250,0x0d520,0x0dd45,
0x0b5a0,0x056d0,0x055b2,0x049b0,0x0a577,0x0a4b0,0x0aa50,0x1b255,0x06d20,0x0ada0,
0x14b63);

var solarMonth=new Array(31,28,31,30,31,30,31,31,30,31,30,31);
var Gan=new Array("甲","乙","丙","丁","戊","己","庚","辛","壬","癸");
var Zhi=new Array("子","丑","寅","卯","辰","巳","午","未","申","酉","戌","亥");
var Animals=new Array("鼠","牛","虎","兔","龙","蛇","马","羊","猴","鸡","狗","猪");
var solarTerm = new Array("小寒","大寒","立春","雨水","惊蛰","春分","清明","谷雨","立夏","小满","芒种","夏至","小暑","大暑","立秋","处暑","白露","秋分","寒露","霜降","立冬","小雪","大雪","冬至");
var sTermInfo = new Array(0,21208,42467,63836,85337,107014,128867,150921,173149,195551,218072,240693,263343,285989,308563,331033,353350,375494,397447,419210,440795,462224,483532,504758);
var nStr1 = new Array('日','一','二','三','四','五','六','七','八','九','十');
var nStr2 = new Array('初','十','廿','卅','□');
var nStr3 = new Array('正','二','三','四','五','六','七','八','九','十','十一','腊');
//公历节日 *表示放假日
var sFtv = new Array(
"0101*新年来临，祝大家元旦快乐！",
"0202 世界湿地日",
"0210 国际气象节",
"0214 祝天下有情人终成眷属！",
"0301 国际海豹日",
"0303 全国爱耳日",
"0305 学雷锋纪念日",
"0308 祝所有女同胞三八妇女节快乐！",
"0312 植树节 孙中山逝世纪念日",
"0314 国际警察日",
"0315 理性消费，依法维权！",
"0317 中国国医节 国际航海日",
"0321 世界森林日 消除种族歧视国际日 世界儿歌日",
"0322 世界水日",
"0323 世界气象日",
"0324 世界防治结核病日",
"0325 全国中小学生安全教育日",
"0330 巴勒斯坦国土日",
"0401 今天是愚人节，小心上当~",
"0407 世界卫生日",
"0422 世界地球日",
"0423 世界图书和版权日",
"0424 亚非新闻工作者日",
"0501*国际劳动节-祝劳动者节日快乐！",
"0502*劳动节假日",
"0503*劳动节假日",
"0504 祝青年节快乐",
"0505 碘缺乏病防治日",
"0508 世界红十字日",
"0512 深切哀悼汶川地震遇难同胞！ 国际护士节",
"0515 国际家庭日",
"0517 世界电信日",
"0518 国际博物馆日",
"0520 全国学生营养日",
"0523 国际牛奶日",
"0531 今天是世界无烟日，吸烟有害健康！", 
"0601 祝天下儿童茁壮成长！",
"0605 世界环境保护日",
"0606 全国爱眼日",
"0617 防治荒漠化和干旱日",
"0623 国际奥林匹克日",
"0625 全国土地日",
"0626 今天是国际禁毒日，远离毒品！",
"0701 今天是党的生日",
"0702 国际体育记者日",
"0707 今天是中国人民抗日战争纪念日",
"0711 世界人口日",
"0730 非洲妇女日",
"0801 建军节",
"0808 中国男子节(爸爸节)",
"0815 1945年的今天日本正式宣布无条件投降",
"0908 国际扫盲日 国际新闻工作者日",
"0909 毛泽东逝世纪念",
"0910 祝辛勤的园丁节日快乐！", 
"0914 世界清洁地球日",
"0915 新疆维吾尔自治区老人节",
"0916 国际臭氧层保护日",
"0918 永记9.18，勿忘国耻！",
"0920 国际爱牙日",
"0927 世界旅游日",
"0928 孔子诞辰",
"1001*国庆节 世界音乐日 国际老人节",
"1002*国庆节假日 国际和平与民主自由斗争日",
"1003*国庆节假日",
"1004 世界动物日",
"1006 老人节",
"1008 全国高血压日 世界视觉日",
"1009 世界邮政日 万国邮联日",
"1010 辛亥革命纪念日 世界精神卫生日",
"1013 世界保健日 国际教师节",
"1014 世界标准日",
"1015 国际盲人节(白手杖节)",
"1016 世界粮食日",
"1017 世界消除贫困日",
"1022 世界传统医药日",
"1024 联合国日",
"1031 世界勤俭日",
"1107 十月社会主义革命纪念日",
"1108 中国记者日",
"1109 全国消防安全宣传教育日",
"1110 世界青年节",
"1111 国际科学与和平周(本日所属的一周)",
"1112 孙中山诞辰纪念日",
"1114 世界糖尿病日",
"1117 国际大学生节 世界学生节",
"1121 世界问候日 世界电视日",
"1129 国际声援巴勒斯坦人民国际日",
"1201 世界爱滋病日-关爱生命，享受健康",
"1203 世界残疾人日",
"1205 国际经济和社会发展志愿人员日",
"1208 国际儿童电视日",
"1209 世界足球日",
"1210 世界人权日",
"1212 西安事变纪念日",
"1213 南京大屠杀(1937年)纪念日！谨记血泪史！",
"1220 澳门回归纪念",
"1221 国际篮球日",
"1224 平安夜",
"1225 圣诞节",
"1226 毛泽东诞辰纪念")

//农历节日 *表示放假日
var lFtv = new Array(
"0101*祝春节快乐！",
"0102*春节",
"0103*春节",
"0115 祝元宵佳节快乐！",
"0505 祝大家端午节快乐！",
"0707 祝大家七七中国情人节快乐！",
"0715 中元节(盂兰盆节、鬼节)",
"0815 中秋节-海上升明月，天涯共此时",
"0909 重阳节-祝天下老人健康快乐！",
"1208 腊八粥,吃不完,吃了腊八粥便丰收",
"1223 过小年喽~ ",
"1230 祝大家除夕夜平安快乐！")

//某月的第几个星期几
var wFtv = new Array(
"0150 世界麻风日", //一月的最后一个星期日（月倒数第一个星期日）
"0520 国际母亲节",
"0530 全国助残日",
"0630 父亲节",
"0730 被奴役国家周",
"0932 国际和平日",
"0940 国际聋人节 世界儿童日",
"0950 世界海事日",
"1011 国际住房日",
"1013 国际减轻自然灾害日(减灾日)",
"1144 感恩节")

//var TitleStr;

/*****************************************************************************
日期计算
*****************************************************************************/

//====================================== 返回农历 y年的总天数
function lYearDays(y) {
var i, sum = 348;
for(i=0x8000; i>0x8; i>>=1) sum += (lunarInfo[y-1900] & i)? 1: 0;
return(sum+leapDays(y));
}

//====================================== 返回农历 y年闰月的天数
function leapDays(y) {
if(leapMonth(y))  return((lunarInfo[y-1900] & 0x10000)? 30: 29);
else return(0);
}

//====================================== 返回农历 y年闰哪个月 1-12 , 没闰返回 0
function leapMonth(y) {
return(lunarInfo[y-1900] & 0xf);
}

//====================================== 返回农历 y年m月的总天数
function monthDays(y,m) {
return( (lunarInfo[y-1900] & (0x10000>>m))? 30: 29 );
}


//====================================== 算出农历, 传入日期控件, 返回农历日期控件
//                                       该控件属性有 .year .month .day .isLeap
function Lunar(objDate) {

var i, leap=0, temp=0;
var offset   = (Date.UTC(objDate.getFullYear(),objDate.getMonth(),objDate.getDate()) - Date.UTC(1900,0,31))/86400000;

for(i=1900; i<2050 && offset>0; i++) { temp=lYearDays(i); offset-=temp; }

if(offset<0) { offset+=temp; i--; }

this.year = i;

leap = leapMonth(i); //闰哪个月
this.isLeap = false;

for(i=1; i<13 && offset>0; i++) {
//闰月
if(leap>0 && i==(leap+1) && this.isLeap==false)
{ --i; this.isLeap = true; temp = leapDays(this.year); }
else
{ temp = monthDays(this.year, i); }

//解除闰月
if(this.isLeap==true && i==(leap+1)) this.isLeap = false;

offset -= temp;
}

if(offset==0 && leap>0 && i==leap+1)
if(this.isLeap)
{ this.isLeap = false; }
else
{ this.isLeap = true; --i; }

if(offset<0){ offset += temp; --i; }

this.month = i;
this.day = offset + 1;
}

//==============================返回公历 y年某m+1月的天数
function solarDays(y,m) {
if(m==1)
return(((y%4 == 0) && (y%100 != 0) || (y%400 == 0))? 29: 28);
else
return(solarMonth[m]);
}
//============================== 传入 offset 返回干支, 0=甲子
function cyclical(num) {
return(Gan[num%10]+Zhi[num%12]);
}

//============================== 阴历属性
function calElement(sYear,sMonth,sDay,week,lYear,lMonth,lDay,isLeap,cYear,cMonth,cDay,AniYear) {

this.isToday    = false;
//瓣句
this.sYear      = sYear;   //公元年4位数字
this.sMonth     = sMonth;  //公元月数字
this.sDay       = sDay;    //公元日数字
this.week       = week;    //星期, 1个中文
//农历
this.lYear      = lYear;   //公元年4位数字
this.lMonth     = lMonth;  //农历月数字
this.lDay       = lDay;    //农历日数字
this.isLeap     = isLeap;  //是否为农历闰月?
//八字
this.cYear      = cYear;   //年柱, 2个中文
this.cMonth     = cMonth;  //月柱, 2个中文
this.cDay       = cDay;    //日柱, 2个中文

//属相
this.AniYear    = AniYear

this.color      = '';

this.lunarFestival = ''; //农历节日
this.solarFestival = ''; //公历节日
this.solarTerms    = ''; //节气
}

//===== 某年的第n个节气为几日(从0小寒起算)
function sTerm(y,n) {
var offDate = new Date( ( 31556925974.7*(y-1900) + sTermInfo[n]*60000  ) + Date.UTC(1900,0,6,2,5) );
return(offDate.getUTCDate());
}




//============================== 返回阴历控件 (y年,m+1月)
/*
功能说明: 返回整个月的日期资料控件

使用方式: OBJ = new calendar(年,零起算月,零起算日);

OBJ.length      返回当月最大日
OBJ.firstWeek   返回当月一日星期

由 OBJ[日期].属性名称 即可取得各项值

OBJ[日期].isToday  返回是否为今日 true 或 false

其他 OBJ[日期] 属性参见 calElement() 中的注解
*/
function calendar(y,m,d) {

var sDObj, lDObj, lY, lM, lD, lL, tmp1, tmp2, tmp3,i,j;
var cY, cM, cD; //年柱,月柱,日柱
var AniYear; //属相 2010.1.7增加，原属相计算有误，以公历年为参考计算，现改为依据年柱计算属相年
var n = 0;


sDObj = new Date(y,m,1,0,0,0,0);    //当月一日日期

this.length    = solarDays(y,m);    //公历当月天数
this.firstWeek = sDObj.getDay();    //公历当月1日星期几

//=======================================================================
//--以下计算日期八字、属相
var term2=sTerm(y,2); //立春日期
////////年柱 1900年立春后为庚子年(60进制36)
if(m<2) {
	cY=cyclical(y-1900+36-1);
	AniYear=Animals[(y-1900+36-1)%12];
	//依节气调整二月分的年柱, 以立春为界
	if(m==1 && (d+1)>=term2) {
		cY=cyclical(y-1900+36);
		AniYear=Animals[(y-1900+36)%12];
	}
}
else {
	cY=cyclical(y-1900+36);
	AniYear=Animals[(y-1900+36)%12];
}

////////月柱 1900年1月小寒以前为 丙子月(60进制12)
var firstNode = sTerm(y,m*2) //返回当月「节」为几日开始
cM = cyclical((y-1900)*12+m+12);
//依节气月柱, 以「节」为界
if((d+1)>=firstNode) cM = cyclical((y-1900)*12+m+13);

//当月一日与 1900/1/1 相差天数
//1900/1/1与 1970/1/1 相差25567日, 1900/1/1 日柱为甲戌日(60进制10)
var dayCyclical = Date.UTC(y,m,1,0,0,0,0)/86400000+25567+10;
//日柱
cD = cyclical(dayCyclical+d);

//--------End
//=======================================================================

sDObj = new Date(y,m,d+1);    //当日日期
lDObj = new Lunar(sDObj);     //农历
lY    = lDObj.year;           //农历年
lM    = lDObj.month;          //农历月
lD    = lDObj.day;            //农历日
lL    = lDObj.isLeap;         //农历是否闰月


this[0] = new calElement(y, m+1, d+1, nStr1[(d+this.firstWeek)%7],
lY, lM, lD, lL,
cY ,cM, cD ,AniYear);
//}

//匹配节气，每个月有两个节气
tmp1=sTerm(y,m*2  )-1;
tmp2=sTerm(y,m*2+1)-1;
if (tmp1==d)this[0].solarTerms = solarTerm[m*2];
if (tmp2==d)this[0].solarTerms = solarTerm[m*2+1];


//公历节日,匹配月、日
for(i in sFtv)
	if(sFtv[i].match(/^(\d{2})(\d{2})([\s\*])(.+)$/))
		if(Number(RegExp.$1)==(m+1) && Number(RegExp.$2)==(d+1)) 
			this[0].solarFestival += RegExp.$4 + ' ';



//月周节日
for(i in wFtv)
	if(wFtv[i].match(/^(\d{2})(\d)(\d)([\s\*])(.+)$/))
		if(Number(RegExp.$1)==(m+1)) {
			tmp1=Number(RegExp.$2);
			tmp2=Number(RegExp.$3);
			if(tmp1<5){
				j=((this.firstWeek>tmp2)?7:0) + 7*(tmp1-1) + tmp2 - this.firstWeek
				if (d==j)this[0].solarFestival += RegExp.$5 + ' ';
			}
			else {
				tmp1 -= 5;
				tmp3 = (this.firstWeek+this.length-1)%7; //当月最后一天星期?
				j=this.length - tmp3 - 7*tmp1 + tmp2 - (tmp2>tmp3?7:0) - 1 
				if (d==j)this[0].solarFestival += RegExp.$5 + ' ';
			}
		}


//农历节日，匹配月、日，闰月不算
//有个问题：除夕是大年二十九时不能匹配。原作者用0100代表除夕，当春节不是2月1日时可以正确匹配，但
//如果春节刚好是2月1日，也不能正确匹配除夕。只好偷懒了~~ 毕竟廿九除夕少之又少  否则每次都要根据
//明天是不是春节来判断今天是不是除夕，很麻烦~~~
for(i in lFtv)
	if(lFtv[i].match(/^(\d{2})(\d{2})([\s\*])(.+)$/))
		if(Number(RegExp.$1)==lM && Number(RegExp.$2)==lD && this[0].isLeap!=true) 
			this[0].lunarFestival += RegExp.$4 + ' ';



//复活节只出现在3或4月
if(m==2 || m==3) {
var estDay = new easter(y);
if(m == estDay.m && d == estDay.d-1)
this[0].solarFestival = this[0].solarFestival+' 复活节';
}

//黑色星期五
//--13号又是星期五
if((this.firstWeek+12)%7==5 && d==12)
this[0].solarFestival += '黑色星期五';

}

//======================================= 返回该年的复活节(春分后第一次满月周后的第一主日)
function easter(y) {

var term2=sTerm(y,5); //取得春分日期
var dayTerm2 = new Date(Date.UTC(y,2,term2,0,0,0,0)); //取得春分的公历日期控件(春分一定出现在3月)
var lDayTerm2 = new Lunar(dayTerm2); //取得取得春分农历

if(lDayTerm2.day<15) //取得下个月圆的相差天数
var lMlen= 15-lDayTerm2.day;
else
var lMlen= (lDayTerm2.isLeap? leapDays(y): monthDays(y,lDayTerm2.month)) - lDayTerm2.day + 15;

//一天等于 1000*60*60*24 = 86400000 毫秒
var l15 = new Date(dayTerm2.getTime() + 86400000*lMlen ); //求出第一次月圆为公历几日
var dayEaster = new Date(l15.getTime() + 86400000*( 7-l15.getUTCDay() ) ); //求出下个周日

this.m = dayEaster.getUTCMonth();
this.d = dayEaster.getUTCDate();

}

//====================== 农历转换为中文日期
function cDay(d){
var s;

switch (d) {
case 10:
s = '初十'; break;
case 20:
s = '二十'; break;
break;
case 30:
s = '三十'; break;
break;
default :
s = nStr2[Math.floor(d/10)];
s += nStr1[d%10];
}
return(s);
}

function cMonth(m){
var s;
s = nStr3[m-1];
return(s);
}

///////////////////////////////////////////////////////////////////////////////
var Today = new Date();
var tY = Today.getFullYear();
var tM = Today.getMonth();
var tD = Today.getDate();

var cld,GlDate,NlDate,AniDate,BaziDate,WeekDate,JieQi;
var i,sD,s,size,festival;

cld = new calendar(tY,tM,tD-1);
JieQi = '';

if(cld.solarTerms != '') JieQi = cld[0].solarTerms + ' '


if(tY>1911) yDisplay = '建国' + (((tY-1949)==1)?'元':tY-1949) + '年 '; //建国年数

if( cld[0].solarFestival == '' && cld[0].lunarFestival == '')
	festival = '';
else
	festival =  cld[0].solarFestival + ' ' + cld[0].lunarFestival ; //公历和农历节日

GlDate =  tY + "年" + (tM+1) + "月" + tD + "日 " //公历日期
NlDate = (cld[0].isLeap?'闰':'')+cMonth(cld[0].lMonth)+'月'+cDay(cld[0].lDay)+'  '  //农历日期
//AniDate = cld[0].cYear + '【'+Animals[(tY-4)%12]+'】年'  //年柱 属相
AniDate = cld[0].cYear + '【'+cld[0].AniYear+'】年'  //年柱 属相
BaziDate = cld[0].cYear+'年 '+cld[0].cMonth+'月 '+cld[0].cDay + '日 ' //八字日期
WeekDate = '星期'+cld[0].week + ' ' //日期
//////////////////////////////////////////////////////////////////////////////

if (document.all)
document.title="克拉玛依-油城信息港　"+ festival + "农历" + AniDate + NlDate + " " + JieQi + WeekDate ;