?? 日歷.htm.bak
字號(hào):
"Africa 非洲": { //----------------------------------------------
"Algeria 阿爾及利亞":["+0100","","阿爾及爾"],
"Angola 安哥拉 ":["+0100","","羅安達(dá)"],
"Benin 貝南 ":["+0100","","新港"],
"Botswana 博茨瓦納":["+0200","","哈博羅內(nèi)"],
"Burundi 布隆迪 ":["+0200","","布瓊布拉"],
"Cameroon 喀麥隆 ":["+0100","","雅溫得"],
"Cape Verde 佛德角 ":["-0100","","普拉亞"],
"Central African 中非共和國":["+0100","","班吉"],
"Chad 乍得 ":["+0100","","恩賈梅納市"],
"Congo 剛果(布)":["+0100","","布拉柴維爾"],
"Djibouti 吉布提 ":["+0300","","吉布提"],
"Egypt 埃及 ":["+0200","04L53|09L43","開羅"],
"Equatorial Guinea 赤道幾內(nèi)亞":["+0100","","馬博托"],
"Ethiopia 埃塞俄比亞":["+0300","","亞的斯亞貝巴"],
"Gabon 加蓬 ":["+0100","","利伯維爾"],
"Gambia 岡比亞 ":["+0000","","班珠爾"],
"Ghana 加納 ":["+0000","","阿克拉"],
"Guinea 幾內(nèi)亞 ":["+0000","","科納克里"],
"Ivory Coast 象牙海岸":["+0000","","阿比讓、雅穆索戈"],
"Kenya 肯尼亞 ":["+0300","","內(nèi)羅畢"],
"Lesotho 萊索托 ":["+0200","","馬塞盧"],
"Liberia 利比里亞":["+0000","","蒙羅維亞"],
"Madagascar 馬達(dá)加斯加":["+0300","","塔那那利佛"],
"Malawi 馬拉維 ":["+0200","","利隆圭"],
"Mali 馬里 ":["+0000","","巴馬科"],
"Mauritania 毛里塔尼亞":["+0000","","努瓦克肖特"],
"Mauritius 毛里求斯":["+0400","","路易港"],
"Morocco 摩洛哥 ":["+0000","","卡薩布蘭卡"],
"Mozambique 莫桑比克":["+0200","","馬普托"],
"Namibia 納米比亞":["+0200","09F03|04F03","溫得和克"],
"Niger 尼日爾 ":["+0100","","尼亞美"],
"Nigeria 尼日利亞":["+0100","","阿布賈"],
"Rwanda 盧旺達(dá) ":["+0200","","基加利"],
"Sao Tome 圣多美 ":["+0000","","圣多美"],
"Senegal 塞內(nèi)加爾":["+0000","","達(dá)卡爾"],
"Sierra Leone 獅子山國":["+0000","","自由城"],
"Somalia 索馬里 ":["+0300","","摩加迪沙"],
"South Africa 南非 ":["+0200","","開普敦、普利托里亞"],
"Sudan 蘇丹 ":["+0200","","喀土穆"],
"Tanzania 坦桑尼亞":["+0300","","達(dá)累斯薩拉姆"],
"Togo 多哥 ":["+0000","","洛美隆"],
"Tunisia 突尼斯 ":["+0100","","突尼斯市"],
"Uganda 烏干達(dá) ":["+0300","","坎帕拉"],
"Zaire 扎伊爾(剛果金) ":["+0100","","金沙薩"],
"Zambia 贊比亞 ":["+0200","","盧薩卡"],
"Zimbabwe 津巴布韋":["+0200","","哈拉雷"]
},
"Oceania 大洋洲": { //----------------------------------------------
"American Samoa(US) 美屬薩摩亞(美)":["-1100","","帕果帕果港"],
"Aus.(Adelaide) 澳大利亞 ":["+0930","10F03|03F03","阿得雷德"],
"Aus.(Brisbane) 澳大利亞 ":["+1000","10F03|03F03","布里斯班"],
"Aus.(Darwin) 澳大利亞 ":["+0930","10F03|03F03","達(dá)爾文"],
"Aus.(Hobart) 澳大利亞 ":["+1000","10F03|03F03","荷伯特"],
"Aus.(Perth) 澳大利亞 ":["+0800","10F03|03F03","佩思"],
"Aus.(Sydney) 澳大利亞 ":["+1000","10F03|03F03","悉尼"],
"Cook Islands(NZ) 庫克群島(新西蘭) ":["-1000","","阿瓦魯阿"],
"Eniwetok 埃尼威托克島":["-1200","","埃尼威托克島"],
"Fiji 斐濟(jì) ":["+1200","11F03|02L03","蘇瓦"],
"Guam 關(guān)島 ":["+1000","","阿加尼亞"],
"Hawaii(US) 夏威夷(美)":["-1000","","檀香山"],
"Kiribati 基里巴斯 ":["+1100","","塔拉瓦"],
//"Mariana Islands 塞班島 ":["","","塞班島"],
"Marshall Is. 馬紹爾群島":["+1200","","馬朱羅"],
"Micronesia 密克羅尼西亞聯(lián)邦":["+1000","","帕利基爾(Palikir)"],
"Midway Is.(US) 中途島(美)":["-1100","","中途島"],
"Nauru Rep. 瑙魯共和國":["+1200","","亞倫"],
"New Calednia(FR) 新克里多尼亞(法)":["+1100","","努美阿"],
"New Zealand 新西蘭 ":["+1200","10F03|04F63","奧克蘭"],
"New Zealand(CHADT) 新西蘭 ":["+1245","10F03|04F63","惠靈頓"],
"Niue(NZ) 紐埃(新) ":["-1100","","阿洛菲(Alofi)"],
"Nor. Mariana Is. 北馬里亞納群島(美)":["+1000","","塞班島"],
"Palau 帕勞群島(帛琉群島) ":["+0900","","科羅爾"],
"Papua New Guinea 巴布亞新幾內(nèi)亞":["+1000","","莫爾斯比港"],
"Pitcairn Is.(UK) 皮特克恩群島(英)":["-0830","","亞當(dāng)斯敦"],
"Polynesia(FR) 玻利尼西亞(法)":["-1000","","巴比蒂、塔希提"],
"Solomon Is. 所羅門群島":["+1100","","霍尼亞拉"],
"Tahiti 塔希提 ":["-1000","","帕佩特"],
"Tokelau(NZ) 托克勞群島(新)":["-1100","","努庫諾努、法考福、阿塔富"],
"Tonga 湯加 ":["+1300","10F63|04F63","努庫阿洛法"],
"Tuvalu 圖瓦盧 ":["+1200","","富納富提"],
"Vanuatu 瓦努阿圖(新赫布里底群島)":["+1100","","維拉港"],
"Western Samoa 西薩摩亞":["-1100","","阿皮亞"],
"國際換日線 ":["-1200","","國際換日線"]
}
};
/*****************************************************************************
日期計(jì)算
*****************************************************************************/
//====================================== 返回農(nóng)歷 y年的總天數(shù)
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));
}
//====================================== 返回農(nóng)歷 y年閏月的天數(shù)
function leapDays(y) {
if(leapMonth(y)) return( (lunarInfo[y-1899]&0xf)==0xf? 30: 29);
else return(0);
}
//====================================== 返回農(nóng)歷 y年閏哪個(gè)月 1-12 , 沒閏返回 0
function leapMonth(y) {
var lm = lunarInfo[y-1900] & 0xf;
return(lm==0xf?0:lm);
}
//====================================== 返回農(nóng)歷 y年m月的總天數(shù)
function monthDays(y,m) {
return( (lunarInfo[y-1900] & (0x10000>>m))? 30: 29 );
}
//====================================== 算出農(nóng)歷, 傳入日期控件, 返回農(nóng)歷日期控件
// 該控件屬性有 .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<2100 && offset>0; i++) { temp=lYearDays(i); offset-=temp; }
if(offset<0) { offset+=temp; i--; }
this.year = i;
leap = leapMonth(i); //閏哪個(gè)月
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月的天數(shù)
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) {
this.isToday = false;
//瓣句
this.sYear = sYear; //公元年4位數(shù)字
this.sMonth = sMonth; //公元月數(shù)字
this.sDay = sDay; //公元日數(shù)字
this.week = week; //星期, 1個(gè)中文
//農(nóng)歷
this.lYear = lYear; //公元年4位數(shù)字
this.lMonth = lMonth; //農(nóng)歷月數(shù)字
this.lDay = lDay; //農(nóng)歷日數(shù)字
this.isLeap = isLeap; //是否為農(nóng)歷閏月?
//八字
this.cYear = cYear; //年柱, 2個(gè)中文
this.cMonth = cMonth; //月柱, 2個(gè)中文
this.cDay = cDay; //日柱, 2個(gè)中文
this.color = '';
this.lunarFestival = ''; //農(nóng)歷節(jié)日
this.solarFestival = ''; //公歷節(jié)日
this.solarTerms = ''; //節(jié)氣
}
//===== 某年的第n個(gè)節(jié)氣為幾日(從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月)
/*
功能說明: 返回整個(gè)月的日期資料控件
使用方式: OBJ = new calendar(年,零起算月);
OBJ.length 返回當(dāng)月最大日
OBJ.firstWeek 返回當(dāng)月一日星期
由 OBJ[日期].屬性名稱 即可取得各項(xiàng)值
OBJ[日期].isToday 返回是否為今日 true 或 false
其他 OBJ[日期] 屬性參見 calElement() 中的注解
*/
function calendar(y,m) {
var sDObj, lDObj, lY, lM, lD=1, lL, lX=0, tmp1, tmp2, tmp3, BMjqFtvl;
var cY, cM, cD; //年柱,月柱,日柱
var lDPOS = new Array(3);
var n = 0;
var firstLM = 0;
sDObj = new Date(y,m,1,0,0,0,0); //當(dāng)月一日日期
this.length = solarDays(y,m); //公歷當(dāng)月天數(shù)
this.firstWeek = sDObj.getDay(); //公歷當(dāng)月1日星期幾
////////年柱 1900年立春后為庚子年(60進(jìn)制36)
if(m<2) cY=cyclical(y-1900+36-1);
else cY=cyclical(y-1900+36);
var term2=sTerm(y,2); //立春日期
////////月柱 1900年1月小寒以前為 丙子月(60進(jìn)制12)
var firstNode = sTerm(y,m*2) //返回當(dāng)月「節(jié)」為幾日開始
cM = cyclical((y-1900)*12+m+12);
//當(dāng)月一日與 1900/1/1 相差天數(shù)
//1900/1/1與 1970/1/1 相差25567日, 1900/1/1 日柱為甲戌日(60進(jìn)制10)
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -