" + StarA1+ "
"+StarA2 + "
"+StarA3 + "
" +
122 | "" + StarB1+ "
"+StarB2 + "
" +
123 | "" + StarC1+ "
"+StarC2 + "
";
124 | }
125 | //大小限表
126 | var DS_Shian=ziwei.getDaShian();
127 | for (i=0;i<12;i++){
128 | document.getElementById("zw"+(i+1).toString()).innerHTML+=
129 | ""+ DS_Shian.DShian[i+1] + "
" +
130 | "" + DS_Shian.SShian[i+1] + "
" ;
131 | }
132 | }
133 | };
134 | window.addEventListener('load' ,function(){
135 | //開始使用
136 | ziweiUI.initial();
137 | document.getElementById("btnNowDate").addEventListener('click',function () {ziweiUI.genNowDateZiwei();});
138 | let s = document.querySelectorAll("select");
139 | for (i=0;i陰
272 | answer="陰曆"+lunar.y+"("+GanGB[gan.y]+ZhiGB[zhi.y]+")年"+(lunar.l?"閏":"")+lunar.m+"月"+lunar.d+"日,生肖屬"+ShengXiaoGB[zhi.y];
273 | // answer2="干支:"+GanGB[gan.y]+ZhiGB[zhi.y]+"年"+
274 | // GanGB[gan.m]+ZhiGB[zhi.m]+"月"+GanGB[gan.d]+ZhiGB[zhi.d]+"日";
275 | }
276 | else {
277 | answer="陽曆"+solar.y+"年"+solar.m+"月"+solar.d+"日,星期"+weekdayGB[solar.w];
278 | // answer2="干支:"+GanGB[gan.y]+ZhiGB[zhi.y]+"年"+
279 | // GanGB[gan.m]+ZhiGB[zhi.m]+"月"+GanGB[gan.d]+ZhiGB[zhi.d]+"日";
280 | }
281 | // answer2=title+lunar.y+"年"+lunar.m+"月"+lunar.d+"日,星期"+lunar.w;
282 | // alert(answer);
283 | ans.value=answer;
284 | // ans2.value=answer2;
285 | }
286 | ----------------------------------------------------------*/
287 | function LeapYear(y) {
288 | return ( ((y%4)==0) && ((y%100)!=0) || ((y%400)==0) );
289 | }
290 | function solar2Day1(d) {//d:MyDate type
291 | var offset,delta;
292 | var i;
293 | delta=d.y-BYEAR;//BYEAR
294 | if(delta<0) {
295 | alert("internal error:pick a larger constant for BYEAR");
296 | return -1;
297 | }
298 | offset=Math.floor(delta*365)+Math.floor(delta/4)-Math.floor(delta/100)+
299 | Math.floor(delta/400);
300 | for(i=1;i2) && (LeapYear(d.y))) offset++;
304 | offset+=d.d-1;
305 | if((d.m==2) && LeapYear(d.y)) {
306 | if(d.d>29) {
307 | alert("day1 out of range");
308 | return -1;
309 | }
310 | }
311 | else if(d.d>daysInSolarMonth[d.m]) {
312 | alert("day2 out of range");
313 | return -1;
314 | }
315 | return offset;
316 | }
317 | /*----------------------------------------------------------*/
318 | function solar2Day(d) {//MyDate type
319 | // alert("d="+d);
320 | // alert("1:"+solar2Day1(d)+"\n2:"+solar2Day1(solarFirstDate));
321 | return (solar2Day1(d)-solar2Day1(solarFirstDate));
322 | }
323 | /*----------------------------------------------------------*/
324 | /* Compute the number of days in each lunar year in the table */
325 | function make_yday()
326 | {
327 | var year, i, leap;
328 | var code;
329 |
330 | for (year = 0; year < Nyear; year++) {
331 | code = yearInfo[year];
332 | leap = code & 0xf;
333 | yday[year] = 0;
334 | if (leap != 0) {
335 | i = (code >> 16) & 0x1;
336 | yday[year] += moon[i];
337 | }
338 | code >>= 4;
339 | for (i = 0; i < Nmonth-1; i++) {
340 | yday[year] += moon[code&0x1];
341 | code >>= 1;
342 | }
343 | ymonth[year] = 12;
344 | if (leap != 0) ymonth[year]++;
345 | }
346 | return Nyear;
347 | }
348 | /*----------------------------------------------------------*/
349 | /* Compute the days of each month in the given lunar year */
350 | function make_mday(year)
351 | {
352 | var i, leapMonth,code;
353 |
354 | code = yearInfo[year];
355 | leapMonth = code & 0xf;
356 | /* leapMonth == 0 means no leap month */
357 | code >>= 4;
358 | if (leapMonth == 0)
359 | {
360 | mday[Nmonth] = 0;
361 | for (i = Nmonth-1; i >= 1; i--)
362 | {
363 | mday[i] = moon[code&0x1];
364 | code >>= 1;
365 | }
366 | }
367 | else
368 | {
369 | /*
370 | There is a leap month (run4 yue4) L in this year.
371 | mday[1] contains the number of days in the 1-st month;
372 | mday[L] contains the number of days in the L-th month;
373 | mday[L+1] contains the number of days in the L-th leap month;
374 | mday[L+2] contains the number of days in the L+1 month, etc.
375 |
376 | cf. yearInfo[]: info about the leap month is encoded differently.
377 | */
378 | i = (yearInfo[year] >> 16) & 0x1;
379 | mday[leapMonth+1] = moon[i];
380 | for (i = Nmonth; i >= 1; i--)
381 | {
382 | if (i == leapMonth+1) i--;
383 | mday[i] = moon[code&0x1];
384 | code >>= 1;
385 | }
386 | }
387 | return leapMonth;
388 | }
389 | /*----------------------------------------------------------*/
390 | function day2Lunar(offset,d) {
391 | var i,m,nYear,leapMonth;
392 |
393 | nYear = make_yday();
394 | for (i=0; i 0; i++) offset -= yday[i];
395 |
396 | if (offset<0) offset += yday[--i];
397 |
398 | if (i==Nyear) {
399 | alert("Year out of range.");
400 | return ;
401 | }
402 |
403 | d.y = i + LunarFirstDate.y;
404 |
405 | leapMonth = make_mday(i);
406 | for (m=1; m<=Nmonth && offset>0; m++) offset -= mday[m];
407 |
408 | if (offset<0) offset += mday[--m];
409 |
410 | d.l= 0; /* don't know leap or not yet */
411 |
412 | if (leapMonth>0) { /* has leap month */
413 | // if preceeding month number is the leap month, this month is the actual extra leap month
414 | d.l = (leapMonth == (m - 1));
415 | /* month > leapMonth is off by 1, so adjust it */
416 | if (m > leapMonth) --m;
417 | }
418 |
419 | d.m = m;
420 | d.d = offset + 1;
421 | }
422 | /*----------------------------------------------------------*/
423 | function CalGZ(offset, d, g, z)
424 | {
425 | var year, month;
426 |
427 | year = d.y - LunarFirstDate.y;
428 | month = year * 12 + d.m - 1; /* leap months do not count */
429 |
430 | // alert("year="+year+"month="+month);
431 | g.y = (GanFirstDate.y + year) % 10;
432 | z.y = (ZhiFirstDate.y + year) % 12;
433 | g.m = (GanFirstDate.m + month) % 10;
434 | z.m = (ZhiFirstDate.m + month) % 12;
435 | g.d = (GanFirstDate.d + offset) % 10;
436 | z.d = (ZhiFirstDate.d + offset) % 12;
437 | z.h = Math.floor((d.h + 1) / 2) % 12;
438 | g.h = (g.d * 12 + z.h) % 10;
439 | }
440 | /*----------------------------------------------------------*/
441 | /* Compare two dates and return <,=,> 0 if the 1st is <,=,> the 2nd */
442 | function CmpDate(month1, day1, month2, day2)
443 | {
444 | if (month1!=month2) return(month1-month2);
445 | if (day1!=day2) return(day1-day2);
446 | return(0);
447 | }
448 | /*----------------------------------------------------------*/
449 | /* Given a solar date, find the "lunar" date for the purpose of
450 | calculating the "4-columns" by taking jie into consideration.
451 | */
452 | function JieDate(ds, dl)//MyDate type
453 | {
454 | var m, flag;
455 |
456 | if (ds.m==1) {
457 | flag = CmpDate(ds.m, ds.d,
458 | 1, fest[(ds.y - solarFirstDate.y - 1)*12+11]);
459 | if (flag<0) dl.m = 11;
460 | else if (flag>0) dl.m = 12;
461 | dl.y = ds.y - 1;
462 | return(flag==0);
463 | }
464 | for (m=2; m<=12; m++) {
465 | flag = CmpDate(ds.m, ds.d,
466 | m, fest[(ds.y - solarFirstDate.y)*12+m-2]);
467 | if (flag==0) m++;
468 | if (flag<=0) break;
469 | }
470 | dl.m = (m-2) % 12;
471 | dl.y = ds.y;
472 | if ((dl.m)==0){
473 | dl.y = ds.y - 1;
474 | dl.m = 12;
475 | }
476 | return(flag==0);
477 | }
478 | /*----------------------------------------------------------*/
479 | function solar2Lunar() {
480 | var offset;
481 | offset=solar2Day(solar);
482 |
483 | solar.w=(offset+solarFirstDate.w)%7;
484 | //alert("offset="+offset+",w="+solar.w);
485 | //a lunar day begins at 11pm
486 | if(solar.h==23) offset++;
487 |
488 | day2Lunar(offset,lunar);
489 | lunar.h=solar.h;
490 | CalGZ(offset,lunar,gan,zhi);
491 |
492 | jieAlert = JieDate(solar, lunar2);
493 | lunar2.d = lunar.d;
494 | lunar2.hour = lunar.hour;
495 | CalGZ(offset, lunar2, gan2, zhi2);
496 | }
497 | /*----------------------------------------------------------*/
498 | /* Compute offset days of a lunar date from the beginning of the table */
499 | function Lunar2Day(d)
500 | {
501 | var offset = 0;
502 | var year, i, m, nYear, leapMonth;
503 |
504 | nYear = make_yday();
505 | year = d.y - LunarFirstDate.y;
506 | for (i=0; imonth, d->year);
513 | // exit(1);
514 | }
515 | for (m=1; mleapMonth) || (d.l && (d.m==leapMonth))))
517 | offset += mday[m++];
518 | offset += d.d- 1;
519 |
520 | if (d.d > mday[m]) Error("Day out of range.");
521 |
522 | return offset;
523 | }
524 | /*----------------------------------------------------------*/
525 | function Solar2Day(d)
526 | {
527 | return (Solar2Day1(d) - Solar2Day1(solarFirstDate));
528 | }
529 | /*----------------------------------------------------------*/
530 | /* Compute the number of days from the Solar date BYEAR.1.1 */
531 | function Solar2Day1(d)
532 | {
533 | var offset, delta;
534 | var i;
535 |
536 | delta = d.y - BYEAR;
537 | if (delta<0) {
538 | //Error("Internal error: pick a larger constant for BYEAR.");
539 | alert("Internal error: pick a larger constant for BYEAR.");
540 | return -1;
541 | }
542 | offset = delta * 365 + Math.floor(delta / 4) - Math.floor(delta / 100) +
543 | Math.floor(delta / 400);
544 | for (i=1; i< d.m; i++)
545 | offset += daysInSolarMonth[i];
546 | if ((d.m > 2) && LeapYear(d.y)) offset++;
547 | offset += d.d - 1;
548 |
549 | if ((d.m == 2) && LeapYear(d.y)) {
550 | if (d.d > 29){
551 | // Error("Day out of range.");
552 | alert("Day out of range.");
553 | return -1;
554 | }
555 | }
556 | else if (d.d > daysInSolarMonth[d.m]) {
557 | // Error("Day out of range.");
558 | alert("Day out of range.");
559 | return -1;
560 | }
561 | return offset;
562 | }
563 | /*----------------------------------------------------------*/
564 | function Day2Solar(offset, d)
565 | {
566 | var i, m, days;
567 |
568 | /* offset is the number of days from SolarFirstDate */
569 | offset -= Solar2Day(LunarFirstDate); /* the argument is negative */
570 | /* offset is now the number of days from SolarFirstDate.year.1.1 */
571 |
572 | for (i=solarFirstDate.y;(i 0); i++)
573 | offset -= 365 + LeapYear(i);
574 | if (offset<0) {
575 | --i; /* LeapYear is a macro */
576 | offset += 365 + LeapYear(i);
577 | }
578 | if (i==(solarFirstDate.y + Nyear)) {
579 | //Error("Year out of range.");
580 | alert("Year out of range.");
581 | return ;
582 | }
583 | d.y = i;
584 |
585 | /* assert(offset<(365+LeapYear(i))); */
586 | for (m=1; m<=12; m++) {
587 | days = daysInSolarMonth[m];
588 | if ((m==2) && LeapYear(i)) /* leap February */
589 | days++;
590 | if (offset陰
621 | //type=1,陰->陽
622 | function Lunar(type,my_y,my_m,my_d)
623 | {
624 | if(type==0) {//陽->陰
625 | solar.y=my_y;
626 | solar.m=my_m;
627 | solar.d=my_d;
628 | title="陰曆:";
629 | solar2Lunar();
630 | }
631 | else {//陰->陽
632 | lunar.y=my_y;
633 | lunar.m=my_m;
634 | lunar.d=my_d;
635 | title="陽曆:";
636 | Lunar2Solar();
637 | }
638 | }
639 |
--------------------------------------------------------------------------------