JavaScript实现有农历和节气节假日的日历
运行效果：
源代码:
1 <!DOCTYPE html>
2 <html>
3 <head>
4 <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
5 <title>带农历的日历</title>
6
7 <body onload=initial()>
8 <center>
9 <form name=CLD>
10 <table>
11 <tr>
12 <td align=middle>
13 <table border=1 cellpadding="0" cellspacing="0" bordercolordark="#FFFFFF" bordercolor="#ffffff"
14 bordercolorlight="#EEEEEE">
15 <tr bgcolor="#006600">
16 <td colspan=7>
17 <font color=#ffffff style="FONT-SIZE: 9pt">公历
18 <select name=SY onchange=changeCld() style="FONT-SIZE: 9pt">
19 <script language="JavaScript">
20 for (i = 1900; i < 2050; i++) document.write('<option>' + i);
21 </script>
22 </select> 年 <select name=SM onchange=changeCld() style="FONT-SIZE: 9pt">
23 <script language="JavaScript">
24 for (i = 1; i < 13; i++) document.write('<option>' + i);
25 </script>
26 </select> 月 </font>
27 <font color=#ffffff face=宋体 id=GZ style="FONT-SIZE: 12pt"></font><BR>
28 </td>
29 </tr>
30 <tr align=middle bgColor=#e0e0e0>
31 <td width=54 style="font-size:9pt; padding:5pt;">日</td>
32 <td width=54 style="font-size:9pt ">一</td>
33 <td width=54 style="font-size:9pt ">二</td>
34 <td width=54 style="font-size:9pt ">三</td>
35 <td width=54 style="font-size:9pt ">四</td>
36 <td width=54 style="font-size:9pt ">五</td>
37 <td width=54 style="font-size:9pt ">六</td>
38 </tr>
39 <script type="text/javascript">
40 var gNum;
41 for (i = 0; i < 6; i++) {
42 document.write('<tr align=center>');
43 for (j = 0; j < 7; j++) {
44 gNum = i * 7 + j;
45 document.write('<td id="GD' + gNum + '"><font id="SD' + gNum + '" size=2 face="Arial Black"');
46 if (j == 0) {
47 document.write('color=red');
48 }
49 if (j == 6) {
50 document.write('color=#000080');
51 }
52 document.write(' title=""></font><br><font id="LD' + gNum + '" size=2 style="font-size:9pt"> </font></td>');
53 }
54 document.write('</tr>');
55 }
56 </script>
57 </table>
58 </td>
59 </tr>
60 </table>
61 </form>
62 </center>
63
64 <script type="text/javascript">
65 var lunarInfo = new Array(
66 0x04bd8, 0x04ae0, 0x0a570, 0x054d5, 0x0d260, 0x0d950, 0x16554, 0x056a0, 0x09ad0, 0x055d2,
67 0x04ae0, 0x0a5b6, 0x0a4d0, 0x0d250, 0x1d255, 0x0b540, 0x0d6a0, 0x0ada2, 0x095b0, 0x14977,
68 0x04970, 0x0a4b0, 0x0b4b5, 0x06a50, 0x06d40, 0x1ab54, 0x02b60, 0x09570, 0x052f2, 0x04970,
69 0x06566, 0x0d4a0, 0x0ea50, 0x06e95, 0x05ad0, 0x02b60, 0x186e3, 0x092e0, 0x1c8d7, 0x0c950,
70 0x0d4a0, 0x1d8a6, 0x0b550, 0x056a0, 0x1a5b4, 0x025d0, 0x092d0, 0x0d2b2, 0x0a950, 0x0b557,
71 0x06ca0, 0x0b550, 0x15355, 0x04da0, 0x0a5d0, 0x14573, 0x052d0, 0x0a9a8, 0x0e950, 0x06aa0,
72 0x0aea6, 0x0ab50, 0x04b60, 0x0aae4, 0x0a570, 0x05260, 0x0f263, 0x0d950, 0x05b57, 0x056a0,
73 0x096d0, 0x04dd5, 0x04ad0, 0x0a4d0, 0x0d4d4, 0x0d250, 0x0d558, 0x0b540, 0x0b5a0, 0x195a6,
74 0x095b0, 0x049b0, 0x0a974, 0x0a4b0, 0x0b27a, 0x06a50, 0x06d40, 0x0af46, 0x0ab60, 0x09570,
75 0x04af5, 0x04970, 0x064b0, 0x074a3, 0x0ea50, 0x06b58, 0x055c0, 0x0ab60, 0x096d5, 0x092e0,
76 0x0c960, 0x0d954, 0x0d4a0, 0x0da50, 0x07552, 0x056a0, 0x0abb7, 0x025d0, 0x092d0, 0x0cab5,
77 0x0a950, 0x0b4a0, 0x0baa4, 0x0ad50, 0x055d9, 0x04ba0, 0x0a5b0, 0x15176, 0x052b0, 0x0a930,
78 0x07954, 0x06aa0, 0x0ad50, 0x05b52, 0x04b60, 0x0a6e6, 0x0a4e0, 0x0d260, 0x0ea65, 0x0d530,
79 0x05aa0, 0x076a3, 0x096d0, 0x04bd7, 0x04ad0, 0x0a4d0, 0x1d0b6, 0x0d250, 0x0d520, 0x0dd45,
80 0x0b5a0, 0x056d0, 0x055b2, 0x049b0, 0x0a577, 0x0a4b0, 0x0aa50, 0x1b255, 0x06d20, 0x0ada0)
81
82 var solarMonth = new Array(31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31);
83 var Animals = new Array("鼠", "牛", "虎", "兔", "龙", "蛇", "马", "羊", "猴", "鸡", "狗", "猪");
84 var solarTerm = new Array("小寒", "大寒", "立春", "雨水", "惊蛰", "春分", "清明", "谷雨", "立夏", "小满", "芒种", "夏至", "小暑", "大暑", "立秋", "处暑", "白露", "秋分", "寒露", "霜降", "立冬", "小雪", "大雪", "冬至");
85 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);
86 var nStr1 = new Array('日', '一', '二', '三', '四', '五', '六', '七', '八', '九', '十');
87 var nStr2 = new Array('初', '十', '廿', '卅');
88 //公历节日
89 var sFtv = new Array(
90 "0101 元旦",
91 "0214 情人节",
92 "0308 妇女节",
93 "0312 植树节",
94 "0315 消费者权益日",
95 "0401 愚人节",
96 "0501 劳动节",
97 "0504 青年节",
98 "0512 护士节",
99 "0601 儿童节",
100 "0701 建党节",
101 "0801 建军节",
102 "0910 教师节",
103 "0928 孔子诞辰",
104 "1001 国庆节",
105 "1006 老人节",
106 "1024 联合国日",
107 "1224 平安夜",
108 "1225 圣诞节")
109 //农历节日
110 var lFtv = new Array(
111 "0101 春节",
112 "0115 元宵节",
113 "0505 端午节",
114 "0707 七夕情人节",
115 "0715 中元节",
116 "0815 中秋节",
117 "0909 重阳节",
118 "1208 腊八节",
119 "1224 小年")
120 //返回农历y年的总天数
121 function lYearDays(y) {
122 var i, sum = 348;
123 for (i = 0x8000; i > 0x8; i >>= 1)sum += (lunarInfo[y - 1900] & i) ? 1 : 0;
124 return (sum + leapDays(y));
125 }
126 //返回农历y年闰月的天数
127 function leapDays(y) {
128 if (leapMonth(y)) return ((lunarInfo[y - 1900] & 0x10000) ? 30 : 29);
129 else return (0);
130 }
131 //判断y年的农历中那个月是闰月,不是闰月返回0
132 function leapMonth(y) {
133 return (lunarInfo[y - 1900] & 0xf);
134 }
135 //返回农历y年m月的总天数
136 function monthDays(y, m) {
137 return ((lunarInfo[y - 1900] & (0x10000 >> m)) ? 30 : 29);
138 }
139 //算出当前月第一天的农历日期和当前农历日期下一个月农历的第一天日期
140 function Dianaday(objDate) {
141 var i, leap = 0, temp = 0;
142 var baseDate = new Date(1900, 0, 31);
143 var offset = (objDate - baseDate) / 86400000;
144 this.dayCyl = offset + 40;
145 this.monCyl = 14;
146 for (i = 1900; i < 2050 && offset > 0; i++) {
147 temp = lYearDays(i)
148 offset -= temp;
149 this.monCyl += 12;
150 }
151 if (offset < 0) {
152 offset += temp;
153 i--;
154 this.monCyl -= 12;
155 }
156 this.year = i;
157 this.yearCyl = i - 1864;
158 leap = leapMonth(i); //闰哪个月
159 this.isLeap = false;
160 for (i = 1; i < 13 && offset > 0; i++) {
161 if (leap > 0 && i == (leap + 1) && this.isLeap == false) { //闰月
162 --i; this.isLeap = true; temp = leapDays(this.year);
163 }
164 else {
165 temp = monthDays(this.year, i);
166 }
167 if (this.isLeap == true && i == (leap + 1)) this.isLeap = false; //解除闰月
168 offset -= temp;
169 if (this.isLeap == false) this.monCyl++;
170 }
171 if (offset == 0 && leap > 0 && i == leap + 1)
172 if (this.isLeap) { this.isLeap = false; }
173 else { this.isLeap = true; --i; --this.monCyl; }
174 if (offset < 0) { offset += temp; --i; --this.monCyl; }
175 this.month = i;
176 this.day = offset + 1;
177 }
178 //返回公历y年m+1月的天数
179 function solarDays(y, m) {
180 if (m == 1)
181 return (((y % 4 == 0) && (y % 100 != 0) || (y % 400 == 0)) ? 29 : 28);
182 else
183 return (solarMonth[m]);
184 }
185 //记录公历和农历某天的日期
186 function calElement(sYear, sMonth, sDay, week, lYear, lMonth, lDay, isLeap) {
187 this.isToday = false;
188 //公历
189 this.sYear = sYear;
190 this.sMonth = sMonth;
191 this.sDay = sDay;
192 this.week = week;
193 //农历
194 this.lYear = lYear;
195 this.lMonth = lMonth;
196 this.lDay = lDay;
197 this.isLeap = isLeap;
198 //节日记录
199 this.lunarFestival = ''; //农历节日
200 this.solarFestival = ''; //公历节日
201 this.solarTerms = ''; //节气
202 }
203 //返回某年的第n个节气为几日(从0小寒起算)
204 function sTerm(y, n) {
205 var offDate = new Date((31556925974.7 * (y - 1900) + sTermInfo[n] * 60000) + Date.UTC(1900, 0, 6, 2, 5));
206 return (offDate.getUTCDate())
207 }
208 //保存y年m+1月的相关信息
209 var fat = mat = 9;
210 var eve = 0;
211 function calendar(y, m) {
212 fat = mat = 0;
213 var sDObj, lDObj, lY, lM, lD = 1, lL, lX = 0, tmp1, tmp2;
214 var lDPOS = new Array(3);
215 var n = 0;
216 var firstLM = 0;
217 sDObj = new Date(y, m, 1); //当月第一天的日期
218 this.length = solarDays(y, m); //公历当月天数
219 this.firstWeek = sDObj.getDay(); //公历当月1日星期几
220 if ((m + 1) == 5) { fat = sDObj.getDay() }
221 if ((m + 1) == 6) { mat = sDObj.getDay() }
222 for (var i = 0; i < this.length; i++) {
223 if (lD > lX) {
224 sDObj = new Date(y, m, i + 1); //当月第一天的日期
225 lDObj = new Dianaday(sDObj); //农历
226 lY = lDObj.year; //农历年
227 lM = lDObj.month; //农历月
228 lD = lDObj.day; //农历日
229 lL = lDObj.isLeap; //农历是否闰月
230 lX = lL ? leapDays(lY) : monthDays(lY, lM); //农历当月最后一天
231 if (lM == 12) { eve = lX }
232 if (n == 0) firstLM = lM;
233 lDPOS[n++] = i - lD + 1;
234 }
235 this[i] = new calElement(y, m + 1, i + 1, nStr1[(i + this.firstWeek) % 7], lY, lM, lD++, lL);
236 if ((i + this.firstWeek) % 7 == 0) {
237 this[i].color = 'red'; //周日颜色
238 }
239 }
240 //节气
241 tmp1 = sTerm(y, m * 2) - 1;
242 tmp2 = sTerm(y, m * 2 + 1) - 1;
243 this[tmp1].solarTerms = solarTerm[m * 2];
244 this[tmp2].solarTerms = solarTerm[m * 2 + 1];
245 if ((this.firstWeek + 12) % 7 == 5) {//黑色星期五
246 this[12].solarFestival += '黑色星期五';
247 }
248 if (y == tY && m == tM) {
249 this[tD - 1].isToday = true; //今日
250 }
251 }
252 //用中文显示农历的日期
253 function cDay(d) {
254 var s;
255 switch (d) {
256 case 10:
257 s = '初十';
258 break;
259 case 20:
260 s = '二十';
261 break;
262 case 30:
263 s = '三十';
264 break;
265 default:
266 s = nStr2[Math.floor(d / 10)];
267 //s += nStr1[d % 10];
268 s += nStr1[parseInt(d % 10)];
269 break;
270 }
271 return (s);
272 }
273 //在表格中显示公历和农历的日期,以及相关节日
274 var cld;
275 function drawCld(SY, SM) {
276 var TF = true;
277 var p1 = p2 = "";
278 var i, sD, s, size;
279 cld = new calendar(SY, SM);
280 GZ.innerHTML = ' 【' + Animals[(SY - 4) % 12] + '】'; //生肖
281 for (i = 0; i < 42; i++) {
282 sObj = eval('SD' + i);
283 lObj = eval('LD' + i);
284 sObj.className = '';
285 sD = i - cld.firstWeek;
286 if (sD > -1 && sD < cld.length) { //日期内
287 sObj.innerHTML = sD + 1;
288 if (cld[sD].isToday) {
289 sObj.style.color = '#9900FF'; //今日颜色
290 } else {
291 sObj.style.color = '';
292 }
293 if (cld[sD].lDay == 1) { //显示农历月
294 lObj.innerHTML = '<b>' + (cld[sD].isLeap ? '闰' : '') + cld[sD].lMonth + '月' + (monthDays(cld[sD].lYear, cld[sD].lMonth) == 29 ? '小' : '大') + '</b>';
295 }
296 else { //显示农历日
297 lObj.innerHTML = cDay(cld[sD].lDay);
298 }
299 var Slfw = Ssfw = null;
300 s = cld[sD].solarFestival;
301 for (var ipp = 0; ipp < lFtv.length; ipp++) { //农历节日
302 if (parseInt(lFtv[ipp].substr(0, 2)) === parseInt(cld[sD].lMonth)) {
303 if (parseInt(lFtv[ipp].substr(2, 4)) === parseInt(cld[sD].lDay)) {
304 lObj.innerHTML = lFtv[ipp].substr(5);
305 Slfw = lFtv[ipp].substr(5);
306 }
307 }
308 if (12 == (cld[sD].lMonth)) { //判断是否为除夕
309 if (eve == (cld[sD].lDay)) { lObj.innerHTML = "除夕"; Slfw = "除夕"; }
310 }
311 }
312 for (var ipp = 0; ipp < sFtv.length; ipp++) { //公历节日
313 if (parseInt(sFtv[ipp].substr(0, 2)) == (SM + 1)) {
314 if (parseInt(sFtv[ipp].substr(2, 4)) == (sD + 1)) {
315 lObj.innerHTML = sFtv[ipp].substr(5);
316 Ssfw = sFtv[ipp].substr(5);
317 }
318 }
319 }
320 if ((SM + 1) == 5) { //母亲节
321 if (fat == 0) {
322 if ((sD + 1) == 7) { Ssfw = "母亲节"; lObj.innerHTML = "母亲节" }
323 }
324 else if (fat < 9) {
325 if ((sD + 1) == ((7 - fat) + 8)) { Ssfw = "母亲节"; lObj.innerHTML = "母亲节" }
326 }
327 }
328 if ((SM + 1) == 6) { //父亲节
329 if (mat == 0) {
330 if ((sD + 1) == 14) { Ssfw = "父亲节"; lObj.innerHTML = "父亲节" }
331 }
332 else if (mat < 9) {
333 if ((sD + 1) == ((7 - mat) + 15)) { Ssfw = "父亲节"; lObj.innerHTML = "父亲节" }
334 }
335 }
336 if (s.length <= 0) { //设置节气的颜色
337 s = cld[sD].solarTerms;
338 if (s.length > 0) s = s.fontcolor('limegreen');
339 }
340 if (s.length > 0) { lObj.innerHTML = s; Slfw = s; } //节气
341 if ((Slfw != null) && (Ssfw != null)) {
342 lObj.innerHTML = Slfw + "/" + Ssfw;
343 }
344 }
345 else { //非日期
346 sObj.innerHTML = '';
347 lObj.innerHTML = '';
348 }
349 }
350 }
351 //在下拉列表中选择年月时,调用自定义函数drawCld(),显示公历和农历的相关信息
352 function changeCld() {
353 var y, m;
354 y = CLD.SY.selectedIndex + 1900;
355 m = CLD.SM.selectedIndex;
356 drawCld(y, m);
357 }
358 //用自定义变量保存当前系统中的年月日
359 var Today = new Date();
360 var tY = Today.getFullYear();
361 var tM = Today.getMonth();
362 var tD = Today.getDate();
363 //打开页时,在下拉列表中显示当前年月,并调用自定义函数drawCld(),显示公历和农历的相关信息
364 function initial() {
365 CLD.SY.selectedIndex = tY - 1900;
366 CLD.SM.selectedIndex = tM;
367 drawCld(tY, tM);
368 }
369 </script>
370 </body>
371
372 </html>
JavaScript实现有农历和节气节假日的日历的更多相关文章
- 从.net复制源代码中国农历阵列，必要做日历
从.net复制源代码中国农历阵列,必要做日历 const { 闰月的月份.春节的阳历日期(农历正月初一).农历的每一个月天数 } c_arrLunarInfo: array [1900 .. 2100 ...
- C#实现万年历(农历、节气、节日、星座、属相、生肖、闰年等)
C# 万年历 农历 节气 节日 星座 星宿 属相 生肖 闰年月 时辰等,代码如下: using System.Collections.Generic; using System.Text; using ...
- javascript 公历与农历相互转换工具类
/** * 公历[1900-1-31,2100-12-31]时间区间内的公历.农历互转 * @charset UTF-8 * @Author Jea杨(JJonline@JJonline.Cn) * ...
- C#实现万年历(农历、节气、节日、星座、星宿、属相、生肖、闰年月、时辰)
C# 万年历 农历 节气 节日 星座 星宿 属相 生肖 闰年月 时辰地址:http://www.cnblogs.com/txw1958/archive/2013/01/27/csharp-calend ...
- python3实现万年历（包括公历、农历、节气、节日）
#!/usr/local/bin/python3 # coding=utf-8 # Created: 20/07/2012 # Copyright: http://www.cnblogs.com/tx ...
- FullCalendar应用——整合农历节气和节日
FullCalendar用来做日程管理功能非常强大,但是唯一不足的地方是没有将中国农历历法加进去,今天我将结合实例和大家分享如何将中国农历中的节气和节日整合到FullCalendar中,从而增强其实用 ...
- [转]显示农历日期的JS
本文转自:http://blog.sina.com.cn/s/blog_47377e77010009xc.html <!DOCTYPE HTML PUBLIC "-//W3C//DTD ...
- JavaScript日期组件的实现
旅游频道的开发中需要定义各种日期组件,有的是基本的日期选择, 这个基本日期只包含如下功能 左右翻(月) 点击天回填到输入域 点击“今天”,回填今天的日期到输入域 点击“关闭”,日期控件关闭 有的同时显 ...
- Google日历添加农历、节日和天气插件（步骤）
Google日历添加农历.节日和天气插件(步骤) Google功能非常多,Google日历只是其中一个,而且支持Exchange账户(iPhone,WP7,诺基亚等)和Google账户登录(andro ...
随机推荐
- U3D破解方法
文件我的云盘里面有,然后操作如下:Win版破解方法:1.安装Unity后(联网破解不成功就断网试试),运行破解补丁.2.点击Browse选择Unity所在路径 例如我的Unity安装路径 F:\Sof ...
- SpringBoot接入轻量级分布式日志框架（GrayLog）
我是3y,一年CRUD经验用十年的markdown程序员常年被誉为优质八股文选手 前两天我不是发了一篇数据链路追踪的文章嘛,在末尾也遗留了TODO:运行应用的服务器一般是集群,日志数据会记录到不同的 ...
- 解决 Vue 项目 invalid host header 问题（两种方案）
问题出现背景 做微信H5网页时,使用花生壳内网穿透进行调试时,打开网页显示:invalid host header 分析问题 这句话的意思是:无效的Host请求头: 因为在vue在调试时相当于启动了一 ...
- CF437C题解
思路很妙/youl 题目大意见翻译,说得很清楚/youl 首先,这个图到最后所有点都会被删除,所以所有边都会被删除. 但是考虑点的贡献会很麻烦,所以在这里我们考虑边的贡献. 边的贡献就是,左端点和右端 ...
- 这个好玩又实用的jupyter插件我真的爱了
1 简介 最近在逛github的时候偶然发现一款特别的jupyter插件stickyland,通过它我们可以在jupyter中以一种非常特别的交互操作方式,对我们的的代码单元格进行组织和展示,今天的文 ...
- Net中异步
同步和异步1.同步是指只启动一个线程2.异步是指同时启动多个线程3.同步方法会卡界面,异步方法不会卡界面 原因:异步方法启动了子线程执行任务,主线程得到释放4.同步方法会慢.异步方法会快 原因:异步启 ...
- SpringMVC工作流程 --通透较详细
SpringMVC工作流程 SpringMVC工作流程 流程说明(重要): (1)客户端发送一个http请求给前端控制器(DispatcherServlet): (2)前端控制器(DispacherS ...
- JAVA 线上问题排查方法
CPU 磁盘 内存 GC问题 网络 线上故障主要会包括cpu.磁盘.内存以及网络问题,而大多数故障可能会包含不止一个层面的问题,所以进行排查时候尽量四个方面依次排查一遍. 同时例如jstack.jma ...
- ASP.NET Core 6 Minimal API的模拟实现
Minimal API仅仅是在基于IHost/IHostBuilder的服务承载系统上作了小小的封装而已,它利用WebApplication和WebApplicationBuilder这两个类型提供了 ...
- 绕过CDN找到⽬标站点真实IP
一.判断目标网站是否使用CDN 在渗透测试中,如果连真实 IP 都没有找到的话,相当于连门都没有找到.所以,如何验证目标网站是否使用了 CDN 呢? 1.多地 ping 法(一般情况下使用多地 pin ...