<html>
<head>
<meta http-equiv="Content-Type" content="text/htmlcharset=gb2312">
<title>单行带农历的日期时间代码</title>
</head>
<body>
<SCRIPT language=JavaScript>
<!--
function CalConv()
{
FIRSTYEAR = 1998
LASTYEAR = 2031
today = new Date()
SolarYear = today.getFullYear()
SolarMonth = today.getMonth() + 1
SolarDate = today.getDate()
Weekday = today.getDay()
LunarCal = [
new tagLunarCal( 27, 5, 3, 43, 1, 0, 0, 1, 0, 0, 1, 1, 0, 1, 1, 0, 1 ),
new tagLunarCal( 46, 0, 4, 48, 1, 0, 0, 1, 0, 0, 1, 0, 1, 1, 1, 0, 1 ),
new tagLunarCal( 35, 0, 5, 53, 1, 1, 0, 0, 1, 0, 0, 1, 0, 1, 1, 0, 1 ),
new tagLunarCal( 23, 4, 0, 59, 1, 1, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 1 ),
new tagLunarCal( 42, 0, 1, 4, 1, 1, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 1 ),
new tagLunarCal( 31, 0, 2, 9, 1, 1, 0, 1, 1, 0, 1, 0, 0, 1, 0, 1, 0 ),
new tagLunarCal( 21, 2, 3, 14, 0, 1, 0, 1, 1, 0, 1, 0, 1, 0, 1, 0, 1 ),
new tagLunarCal( 39, 0, 5, 20, 0, 1, 0, 1, 0, 1, 1, 0, 1, 0, 1, 0, 1 ),
new tagLunarCal( 28, 7, 6, 25, 1, 0, 1, 0, 1, 0, 1, 0, 1, 1, 0, 1, 1 ),
new tagLunarCal( 48, 0, 0, 30, 0, 0, 1, 0, 0, 1, 0, 1, 1, 1, 0, 1, 1 ),
new tagLunarCal( 37, 0, 1, 35, 1, 0, 0, 1, 0, 0, 1, 0, 1, 1, 0, 1, 1 ),
new tagLunarCal( 25, 5, 3, 41, 1, 1, 0, 0, 1, 0, 0, 1, 0, 1, 0, 1, 1 ),
new tagLunarCal( 44, 0, 4, 46, 1, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 1, 1 ),
new tagLunarCal( 33, 0, 5, 51, 1, 0, 1, 1, 0, 1, 0, 0, 1, 0, 1, 0, 1 ),
new tagLunarCal( 22, 4, 6, 56, 1, 0, 1, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0 ),
new tagLunarCal( 40, 0, 1, 2, 1, 0, 1, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0 ),
new tagLunarCal( 30, 9, 2, 7, 0, 1, 0, 1, 0, 1, 0, 1, 1, 0, 1, 0, 1 ),
new tagLunarCal( 49, 0, 3, 12, 0, 1, 0, 0, 1, 0, 1, 1, 1, 0, 1, 0, 1 ),
new tagLunarCal( 38, 0, 4, 17, 1, 0, 1, 0, 0, 1, 0, 1, 1, 0, 1, 1, 0 ),
new tagLunarCal( 27, 6, 6, 23, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 1, 1, 1 ),
new tagLunarCal( 46, 0, 0, 28, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 1, 1, 0 ),
new tagLunarCal( 35, 0, 1, 33, 0, 1, 1, 0, 1, 0, 0, 1, 0, 0, 1, 1, 0 ),
new tagLunarCal( 24, 4, 2, 38, 0, 1, 1, 1, 0, 1, 0, 0, 1, 0, 1, 0, 1 ),
new tagLunarCal( 42, 0, 4, 44, 0, 1, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1 ),
new tagLunarCal( 31, 0, 5, 49, 1, 0, 1, 0, 1, 1, 0, 1, 0, 1, 0, 1, 0 ),
new tagLunarCal( 21, 2, 6, 54, 0, 1, 0, 1, 0, 1, 0, 1, 1, 0, 1, 0, 1 ),
new tagLunarCal( 40, 0, 0, 59, 0, 1, 0, 0, 1, 0, 1, 1, 0, 1, 1, 0, 1 ),
new tagLunarCal( 28, 6, 2, 5, 1, 0, 1, 0, 0, 1, 0, 1, 0, 1, 1, 1, 0 ),
new tagLunarCal( 47, 0, 3, 10, 1, 0, 1, 0, 0, 1, 0, 0, 1, 1, 1, 0, 1 ),
new tagLunarCal( 36, 0, 4, 15, 1, 1, 0, 1, 0, 0, 1, 0, 0, 1, 1, 0, 1 ),
new tagLunarCal( 25, 5, 5, 20, 1, 1, 1, 0, 1, 0, 0, 1, 0, 0, 1, 1, 0 ),
new tagLunarCal( 43, 0, 0, 26, 1, 1, 0, 1, 0, 1, 0, 1, 0, 0, 1, 0, 1 ),
new tagLunarCal( 32, 0, 1, 31, 1, 1, 0, 1, 1, 0, 1, 0, 1, 0, 1, 0, 0 ),
new tagLunarCal( 22, 3, 2, 36, 0, 1, 1, 0, 1, 0, 1, 1, 0, 1, 0, 1, 0 ) ]
SolarCal = [ 31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31 ]
SolarDays = [ 0, 31, 59, 90, 120, 151, 181, 212, 243, 273, 304, 334, 365, 396, 0, 31, 60, 91, 121, 152, 182, 213, 244, 274, 305, 335, 366, 397 ]
if ( SolarYear <= FIRSTYEAR || SolarYear >LASTYEAR ) return 1
sm = SolarMonth - 1
if ( sm <0 || sm >11 ) return 2
leap = GetLeap( SolarYear )
if ( sm == 1 )
d = leap + 28
else
d = SolarCal[sm]
if ( SolarDate <1 || SolarDate >d ) return 3
y = SolarYear - FIRSTYEAR
acc = SolarDays[ leap*14 + sm ] + SolarDate
kc = acc + LunarCal[y].BaseKanChih
Kan = kc % 10
Chih = kc % 12
Age = kc % 60
if ( Age <22 )
Age = 22 - Age
else
Age = 82 - Age
if ( acc <= LunarCal[y].BaseDays ) {
y--
LunarYear = SolarYear - 1
leap = GetLeap( LunarYear )
sm += 12
acc = SolarDays[leap*14 + sm] + SolarDate
}
else
LunarYear = SolarYear
l1 = LunarCal[y].BaseDays
for ( i=0i<13i++ ) {
l2 = l1 + LunarCal[y].MonthDays[i] + 29
if ( acc <= l2 ) break
l1 = l2
}
LunarMonth = i + 1
LunarDate = acc - l1
im = LunarCal[y].Intercalation
if ( im != 0 &&LunarMonth >im ) {
LunarMonth--
if ( LunarMonth == im ) LunarMonth = -im
}
if ( LunarMonth >12 ) LunarMonth -= 12
today=new Date()
function initArray(){
this.length=initArray.arguments.length
for(var i=0i<this.lengthi++)
this[i+1]=initArray.arguments[i] }
var d=new initArray("星期日","星期一","星期二","星期三","星期四","星期五","星期六")
document.write("", today.getYear(),"年",today.getMonth()+1,"月",today.getDate(),"日 ",d[today.getDay()+1],"")
months = ["一","二","三","四","五","六","七","八","九","十","十一","十二"]
days = ["初一","初二","初三","初四","初五","初六","初七","初八","初九","初十","十一","十二","十三","十四","十五","十六","十七","十八","十九","二十","廿一","廿二","廿三","廿四","廿五","廿六","廿七","廿八","廿九","三十"]
document.write( " 农历"+months[LunarMonth-1]+"月" + days[LunarDate-1] + "")
return 0
}
function GetLeap( year )
{
if ( year % 400 == 0 )
return 1
else if ( year % 100 == 0 )
return 0
else if ( year % 4 == 0 )
return 1
else
return 0
}
function tagLunarCal( d, i, w, k, m1, m2, m3, m4, m5, m6, m7, m8, m9, m10, m11, m12, m13) {
this.BaseDays = d
this.Intercalation = i
this.BaseWeekday = w
this.BaseKanChih = k
this.MonthDays = [ m1, m2, m3, m4, m5, m6, m7, m8, m9, m10, m11, m12, m13 ]
}
//-->
</SCRIPT>
<a target=_blank href=http://www.qpsh.com><FONT color=#2b68a7><SCRIPT>CalConv()</SCRIPT></FONT></a>
</body>
</html>
I wish you a happy women's day！祝你妇女节快乐！
Women's day, I wish you a real "rich" women, spirit rich: no reflections, optimistic, cheerful, love richer: often has a sweet, confident selfrich: and dream company, takes sole charge of. Have a happy women's day! 妇女节到了，祝你成为真正的“富”女，精神富：不顾影自怜，乐观开朗爱情富：常拥有甜蜜，自信自我事业富：与梦想做伴，独挡一面。祝妇女节快乐!
A beautiful woman is a diamond, a good woman is a treasure. 一个美丽的女人是一颗钻石，一个好的女人是一个宝库。、
Women's day, SMS alerts and we wish you health: bread and keep the stomach and cheerful physical healththe Sun is still shining and catch some rays back, sweet sleep sleep sleepmaybe a lot tired all forget that good luck will accompany you! fun! 妇女节将到，短信提醒愿你健康：粗茶淡饭养养胃，心情愉快身体健灿烂阳光晒晒背，甜蜜梦乡睡一睡凡尘疲惫全忘记，吉祥好运伴随你!愿开心!
Don't let your busy life full of you, don't let your space, don't let little things just your time, don't let yourself not panting. 38 women's day today, remember to rest, take care of yourself. 别让忙碌充满你的生活，别让工作占据你的空间，别让琐事排满你的时间，别让自己没有喘气的时间。今天三八妇女节，记得多休息，照顾好自己。
If there are no women, men can run around naked!Thanks to the female compatriots, to let the society become civilized and polite!Women's day, I wish female friends happy holidays! 如果没有女同胞，男同胞们可以不 穿衣服到处跑!幸亏有了女同胞，才让社会变 得文明礼貌!妇女节了，祝女性朋友节日快乐!
欢迎分享，转载请注明来源：内存溢出
微信扫一扫
支付宝扫一扫
评论列表（0条）