【android源码结构分析】【国家朔源码】【反码得源码】节气源码

【android源码结构分析】【国家朔源码】【反码得源码】节气源码_节气起源

2024-11-18 22:52:58 来源：红黄蓝水果机源码

1.编写一份我国的节气节气农历
2.ç¨VBå¦ä½åä¸å¹´å?
3.fullcalendar显示当月日历方法
4.求网页日历代码

节气源码_节气起源

编写一份我国的农历

1网上有现成的代码超级多

2代码有jsp的也有C的或java的一般差不多

3基本都是查表计算农历

4因为表的都差不多所以基本都有年代限制，不能无限计算各个年代

5要想写出完美的源码农历计算方法请学习牛顿力学和天体物理学等以通过太阳的黄经位置（阳历）计算月亮的视位置（农历），如果LZ能计算出来那我佩服之至并麻烦楼主将计算方法的起源源码发给我一份（dongbeirenlaguna@.com），我之前已一直求索这个问题

ç¨VBå¦ä½åä¸å¹´å?节气节气android源码结构分析

ç»ä½ ä¸ªååçVBæºç .

curTime = MaskEdBox1

'ææå

WeekName(0) = " * "

WeekName(1) = "æææ¥"

WeekName(2) = "ææä¸"

WeekName(3) = "ææäº"

WeekName(4) = "ææä¸"

WeekName(5) = "ææå"

WeekName(6) = "ææäº"

WeekName(7) = "ææå"

'å¤©å¹²åç§°

TianGan(0) = "ç²"

TianGan(1) = "ä¹"

TianGan(2) = "ä¸"

TianGan(3) = "ä¸"

TianGan(4) = "æ"

TianGan(5) = "å·±"

TianGan(6) = "åº"

TianGan(7) = "è¾"

TianGan(8) = "å£¬"

TianGan(9) = "ç¸"

'å°æ¯åç§°

DiZhi(0) = "å"

DiZhi(1) = "ä¸"

DiZhi(2) = "å¯"

DiZhi(3) = "å¯"

DiZhi(4) = "è¾°"

DiZhi(5) = "å·³"

DiZhi(6) = "å"

DiZhi(7) = "æª"

DiZhi(8) = "ç³"

DiZhi(9) = "é"

DiZhi() = "æ"

DiZhi() = "äº¥"

'å±ç¸åç§°

ShuXiang(0) = "é¼ "

ShuXiang(1) = "ç"

ShuXiang(2) = "è"

ShuXiang(3) = "å"

ShuXiang(4) = "é¾"

ShuXiang(5) = "è"

ShuXiang(6) = "é©¬"

ShuXiang(7) = "ç¾"

ShuXiang(8) = "ç´"

ShuXiang(9) = "é¸¡"

ShuXiang() = "ç"

ShuXiang() = "çª"

'ååæ¥æå

DayName(0) = "*"

DayName(1) = "åä¸"

DayName(2) = "åäº"

DayName(3) = "åä¸"

DayName(4) = "åå"

DayName(5) = "åäº"

DayName(6) = "åå"

DayName(7) = "åä¸"

DayName(8) = "åå«"

DayName(9) = "åä¹"

DayName() = "åå"

DayName() = "åä¸"

DayName() = "åäº"

DayName() = "åä¸"

DayName() = "åå"

DayName() = "åäº"

DayName() = "åå"

DayName() = "åä¸"

DayName() = "åå«"

DayName() = "åä¹"

DayName() = "äºå"

DayName() = "å»¿ä¸"

DayName() = "å»¿äº"

DayName() = "å»¿ä¸"

DayName() = "å»¿å"

DayName() = "å»¿äº"

DayName() = "å»¿å"

DayName() = "å»¿ä¸"

DayName() = "å»¿å«"

DayName() = "å»¿ä¹"

DayName() = "ä¸å"

'ååæä»½å

MonName(0) = "*"

MonName(1) = "æ£"

MonName(2) = "äº"

MonName(3) = "ä¸"

MonName(4) = "å"

MonName(5) = "äº"

MonName(6) = "å"

MonName(7) = "ä¸"

MonName(8) = "å«"

MonName(9) = "ä¹"

MonName() = "å"

MonName() = "åä¸"

MonName() = "è"

'å¬åæ¯æåé¢çå¤©æ°

MonthAdd(0) = 0

MonthAdd(1) =

MonthAdd(2) =

MonthAdd(3) =

MonthAdd(4) =

MonthAdd(5) =

MonthAdd(6) =

MonthAdd(7) =

MonthAdd(8) =

MonthAdd(9) =

MonthAdd() =

'ååæ°æ®

NongliData(0) =

NongliData(1) =

NongliData(2) =

NongliData(3) =

NongliData(4) =

NongliData(5) =

NongliData(6) =

NongliData(7) =

NongliData(8) =

NongliData(9) =

NongliData() =

'çæå½åå¬åå¹´ãæãæ¥ ==> GongliStr

curYear = Year(curTime)

curMonth = Month(curTime)

curDay = Day(curTime)

GongliStr = curYear & "å¹´"

If curMonth < Then

GongliStr = GongliStr & "0" & curMonth & "æ"

Else

GongliStr = GongliStr & curMonth & "æ"

End If

If curDay < Then

GongliStr = GongliStr & "0" & curDay & "æ¥"

Else

GongliStr = GongliStr & curDay & "æ¥"

End If

'çæå½åå¬åææ ==> WeekdayStr

curWeekday = Weekday(curTime)

WeekdayStr = WeekName(curWeekday)

'è®¡ç®å°åå§æ¶é´å¹´2æ8æ¥çå¤©æ°ï¼-2-8(æ£æåä¸)

TheDate = (curYear - ) * + Int((curYear - ) / 4) + curDay + MonthAdd(curMonth - 1) -

If curYear Mod 4 = 0 And curMonth > 2 Then

TheDate = TheDate + 1

End If

'è®¡ç®ååå¤©å¹²ãå°æ¯ãæãæ¥

isEnd = 0

m = 0

If NongliData(m) < Then

k =

Else

k =

End If

n = k

If n < 0 Then

Exit Do

End If

'è·åNongliData(m)çç¬¬nä¸ªäºè¿å¶ä½çå¼

bit = NongliData(m)

For i = 1 To n Step 1

bit = Int(bit / 2)

bit = bit Mod 2

If TheDate <= + bit Then

isEnd = 1

Exit Do

End If

TheDate = TheDate - - bit

n = n - 1

Loop

If isEnd = 1 Then

Exit Do

End If

m = m + 1

Loop

curYear = + m

curMonth = k - n + 1

curDay = TheDate

If k = Then

If curMonth = (Int(NongliData(m) / ) + 1) Then

curMonth = 1 - curMonth

ElseIf curMonth > Int(NongliData(m) / ) + 1 Then

curMonth = curMonth - 1

End If

NongliStr = "åå" & TianGan(((curYear - 4) Mod ) Mod ) & DiZhi(((curYear - 4) Mod ) Mod ) & "å¹´"

NongliStr = NongliStr & "(" & ShuXiang(((curYear - 4) Mod ) Mod ) & ")"

'çæååæãæ¥ ==> NongliDayStr

If curMonth < 1 Then

NongliDayStr = "é°" & MonName(-1 * curMonth)

Else

NongliDayStr = MonName(curMonth)

End If

NongliDayStr = NongliDayStr & "æ"

NongliDayStr = NongliDayStr & DayName(curDay)

Label2 = NongliStr & NongliDayStr

fullcalendar显示当月日历方法

切图网专注于前端开发，包括fullcalendar日历改造，源码最近项目就遇到了，起源国家朔源码项目中日期插件用的节气节气是fullcalendar，需要显示农历、源码阴历、起源节气、节气节气当前是源码第几周、星期几、起源天干地支、节气节气反码得源码生肖年等等，源码实现的起源demo效果如下：

由于插件本身不支持使用农历、节日展示所以对fullcalendar进行了修改，j站源码当你重新安装是需要手动去修改源码,修改内容如下

* 1、在fullcalendar.js之前引入lunar.js

lunar.js是一个计算农历和各种节假日的第三方js，需在fullcalendar前引用。源码码云

* 2、修改fullcalendar.js

正常生成的日历只是包含一个日期，想要显示农历就需要手动修改源码，目前我使用的版本是3.9.0，改动仅有一处。

if (isDayNumberVisible) { html += view.buildGotoAnchorHtml(date, , date.format(D) // inner HTML);//此处可以搜索fc-day-number，在下面添加以下代码var cTerm = lunar(date).term;if(cTerm){ html+=div class=fc-day-cnTerm+cTerm+/div;}var fes = lunar(date).festival();if(fesfes.length0){ html += div class=fc-day-cnTerm + $.trim(fes

.desc)+/div;}if(!cTerm (!fes || fes.length == 0)){ html += div class=fc-day-cnDate+lunar(date).lMonth+月+lunar(date).lDate+/div;}

结语

至此就都改完了，剩下就是样式了，随便你怎么调可以自由发挥。

来源：t = 0;

var dStyle;

document.onmousemove = mEvn;

//显示详细日期资料

function mOvr(v) {

var s,festival;

var sObj=eval('SD'+ v);

var d=sObj.innerHTML-1;

//sYear,sMonth,sDay,week,

//lYear,lMonth,lDay,isLeap,

//cYear,cMonth,cDay

if(sObj.innerHTML!='') {

sObj.style.cursor = 's-resize';

if(cld[d].solarTerms == '' && cld[d].solarFestival == '' && cld[d].lunarFestival == '')

festival = '';

else

festival = '<TABLE WIDTH=% BORDER=0 CELLPADDING=2 CELLSPACING=0 BGCOLOR="#CCFFCC"><TR><TD>'+

'<FONT COLOR="#" STYLE="font-size:9pt;">'+cld[d].solarTerms + ' ' + cld[d].solarFestival + ' ' + cld[d].lunarFestival+'</FONT></TD>'+

'</TR></TABLE>';

s= '<TABLE WIDTH="" BORDER=0 CELLPADDING="2" CELLSPACING=0 BGCOLOR="#"><TR><TD>' +

'<TABLE WIDTH=% BORDER=0 CELLPADDING=0 CELLSPACING=0><TR><TD ALIGN="right"><FONT COLOR="#ffffff" STYLE="font-size:9pt;">'+

cld[d].sYear+' 年 '+cld[d].sMonth+' 月 '+cld[d].sDay+' 日<br>星期'+cld[d].week+'<br>'+

'<font color="violet">农历'+(cld[d].isLeap?'闰 ':' ')+cld[d].lMonth+' 月 '+cld[d].lDay+' 日</font><br>'+

'<font color="yellow">'+cld[d].cYear+'年 '+cld[d].cMonth+'月 '+cld[d].cDay + '日</font>'+

'</FONT></TD></TR></TABLE>'+ festival +'</TD></TR></TABLE>';

document.all["detail"].innerHTML = s;

if (snow == 0) {

dStyle.left = x+offsetx-(width/2);

dStyle.top = y+offsety;

dStyle.visibility = "visible";

snow = 1;

}

今日关注

源码商铺

2024-11-18 21:26
劉憶如請辭！「租稅正義」為何這麼難？｜天下雜誌

2024-11-18 20:35
美官員：美國務卿布林肯本周將再訪以色列

2024-11-18 20:23
南京江北新区：开展春节期间白酒市场“双打”专项执法检查

2024-11-18 20:15

热点快讯

imessenger源码
2024-11-18 22:49
《我不想活得正確，只想活得像自己》：即使生命是團渣，我都能是個越分手、過越好的女人
2024-11-18 22:43
涉嫌多项违法违规 “莆鑫医疗”合计被罚91.06万元
2024-11-18 22:43
下月起泉州省际、市际客运班线实行实名制
2024-11-18 21:42
ejavashops 源码
2024-11-18 21:17
速讀今日國際財經日誌（04/10）｜天下雜誌
2024-11-18 21:15
山貓隊23連敗！喬丹給老闆們上了一課｜天下雜誌
2024-11-18 20:35
涉嫌多项违法违规 “莆鑫医疗”合计被罚91.06万元
2024-11-18 20:14

【android源码结构分析】【国家朔源码】【反码得源码】节气源码_节气 起源

相关文章

今日关注

源码商铺

劉憶如請辭！「租稅正義」為何這麼難？｜天下雜誌

美官員：美國務卿布林肯本周將再訪以色列

南京江北新区：开展春节期间白酒市场“双打”专项执法检查

热点快讯

【android源码结构分析】【国家朔源码】【反码得源码】节气源码_节气起源