iOS 陽歷日期轉農歷的方法

-(NSString *)LunarForSolarYear:(int)wCurYear Month:(int)wCurMonth Day:(NSInteger)wCurDay{

//農歷日期名

NSArray *cDayName =? [NSArray arrayWithObjects:@"*",@"初一",@"初二",@"初三",@"初四",@"初五",@"初六",@"初七",@"初八",@"初九",@"初十",

@"十一",@"十二",@"十三",@"十四",@"十五",@"十六",@"十七",@"十八",@"十九",@"二十",

@"廿一",@"廿二",@"廿三",@"廿四",@"廿五",@"廿六",@"廿七",@"廿八",@"廿九",@"三十",nil];

//農歷月份名

NSArray *cMonName =? [NSArray arrayWithObjects:@"*",@"正",@"二",@"三",@"四",@"五",@"六",@"七",@"八",@"九",@"十",@"十一",@"臘",nil];

//公歷每月前面的天數

const int wMonthAdd[12] = {0,31,59,90,120,151,181,212,243,273,304,334};

//農歷數據

const int wNongliData[100] = {2635,333387,1701,1748,267701,694,2391,133423,1175,396438

,3402,3749,331177,1453,694,201326,2350,465197,3221,3402

,400202,2901,1386,267611,605,2349,137515,2709,464533,1738

,2901,330421,1242,2651,199255,1323,529706,3733,1706,398762

,2741,1206,267438,2647,1318,204070,3477,461653,1386,2413

,330077,1197,2637,268877,3365,531109,2900,2922,398042,2395

,1179,267415,2635,661067,1701,1748,398772,2742,2391,330031

,1175,1611,200010,3749,527717,1452,2742,332397,2350,3222

,268949,3402,3493,133973,1386,464219,605,2349,334123,2709

,2890,267946,2773,592565,1210,2651,395863,1323,2707,265877};

static int nTheDate,nIsEnd,m,k,n,i,nBit;

//計算到初始時間1921年2月8日的天數:1921-2-8(正月初一)

nTheDate = (wCurYear - 1921) * 365 + (wCurYear - 1921) / 4 + wCurDay + wMonthAdd[wCurMonth - 1] - 38;

if((!(wCurYear % 4)) && (wCurMonth > 2))

nTheDate = nTheDate + 1;

//計算農歷天干潭袱、地支、月驯遇、日

nIsEnd = 0;

m = 0;

while(nIsEnd != 1)

{

if(wNongliData[m] < 4095)

k = 11;

else

k = 12;

n = k;

while(n>=0)

{

//獲取wNongliData(m)的第n個二進制位的值

nBit = wNongliData[m];

for(i=1;i< n+1;i++)

nBit = nBit/2;

nBit = nBit % 2;

if (nTheDate <= (29 + nBit))

{

nIsEnd = 1;

break;

}

nTheDate = nTheDate - 29 - nBit;

n = n - 1;

}

if(nIsEnd)

break;

m = m + 1;

}

wCurYear = 1921 + m;

wCurMonth = k - n + 1;

wCurDay = nTheDate;

if (k == 12)

{

if (wCurMonth == wNongliData[m] / 65536 + 1)

wCurMonth = 1 - wCurMonth;

else if (wCurMonth > wNongliData[m] / 65536 + 1)

wCurMonth = wCurMonth - 1;

}

//生成農歷月

NSString *szNongliMonth;

if (wCurMonth < 1){

szNongliMonth = [NSString stringWithFormat:@"閏%@",(NSString *)[cMonName objectAtIndex:-1 * wCurMonth]];

}else{

szNongliMonth = (NSString *)[cMonName objectAtIndex:wCurMonth];

}

//生成農歷日

NSString *szNongliDay = [cDayName objectAtIndex:wCurDay];

//合并

NSString *lunarDate = [NSString stringWithFormat:@"農歷丙申年%@月%@",szNongliMonth,szNongliDay];

return lunarDate;

}

最后編輯于
?著作權歸作者所有,轉載或內容合作請聯系作者
  • 序言:七十年代末,一起剝皮案震驚了整個濱河市稼稿,隨后出現的幾起案子拆融,更是在濱河造成了極大的恐慌,老刑警劉巖梧税,帶你破解...
    沈念sama閱讀 218,546評論 6 507
  • 序言:濱河連續(xù)發(fā)生了三起死亡事件部默,死亡現場離奇詭異侵蒙,居然都是意外死亡,警方通過查閱死者的電腦和手機傅蹂,發(fā)現死者居然都...
    沈念sama閱讀 93,224評論 3 395
  • 文/潘曉璐 我一進店門纷闺,熙熙樓的掌柜王于貴愁眉苦臉地迎上來,“玉大人份蝴,你說我怎么就攤上這事犁功。” “怎么了婚夫?”我有些...
    開封第一講書人閱讀 164,911評論 0 354
  • 文/不壞的土叔 我叫張陵浸卦,是天一觀的道長。 經常有香客問我案糙,道長限嫌,這世上最難降的妖魔是什么? 我笑而不...
    開封第一講書人閱讀 58,737評論 1 294
  • 正文 為了忘掉前任时捌,我火速辦了婚禮怒医,結果婚禮上,老公的妹妹穿的比我還像新娘匣椰。我一直安慰自己裆熙,他們只是感情好,可當我...
    茶點故事閱讀 67,753評論 6 392
  • 文/花漫 我一把揭開白布禽笑。 她就那樣靜靜地躺著入录,像睡著了一般。 火紅的嫁衣襯著肌膚如雪佳镜。 梳的紋絲不亂的頭發(fā)上僚稿,一...
    開封第一講書人閱讀 51,598評論 1 305
  • 那天,我揣著相機與錄音蟀伸,去河邊找鬼蚀同。 笑死缅刽,一個胖子當著我的面吹牛芽丹,可吹牛的內容都是我干的榄融。 我是一名探鬼主播,決...
    沈念sama閱讀 40,338評論 3 418
  • 文/蒼蘭香墨 我猛地睜開眼无切,長吁一口氣:“原來是場噩夢啊……” “哼刹孔!你這毒婦竟也來了啡省?” 一聲冷哼從身側響起,我...
    開封第一講書人閱讀 39,249評論 0 276
  • 序言:老撾萬榮一對情侶失蹤髓霞,失蹤者是張志新(化名)和其女友劉穎卦睹,沒想到半個月后,有當地人在樹林里發(fā)現了一具尸體方库,經...
    沈念sama閱讀 45,696評論 1 314
  • 正文 獨居荒郊野嶺守林人離奇死亡结序,尸身上長有42處帶血的膿包…… 初始之章·張勛 以下內容為張勛視角 年9月15日...
    茶點故事閱讀 37,888評論 3 336
  • 正文 我和宋清朗相戀三年,在試婚紗的時候發(fā)現自己被綠了纵潦。 大學時的朋友給我發(fā)了我未婚夫和他白月光在一起吃飯的照片徐鹤。...
    茶點故事閱讀 40,013評論 1 348
  • 序言:一個原本活蹦亂跳的男人離奇死亡,死狀恐怖酪穿,靈堂內的尸體忽然破棺而出凳干,到底是詐尸還是另有隱情,我是刑警寧澤被济,帶...
    沈念sama閱讀 35,731評論 5 346
  • 正文 年R本政府宣布,位于F島的核電站涧团,受9級特大地震影響只磷,放射性物質發(fā)生泄漏。R本人自食惡果不足惜泌绣,卻給世界環(huán)境...
    茶點故事閱讀 41,348評論 3 330
  • 文/蒙蒙 一钮追、第九天 我趴在偏房一處隱蔽的房頂上張望。 院中可真熱鬧阿迈,春花似錦元媚、人聲如沸。這莊子的主人今日做“春日...
    開封第一講書人閱讀 31,929評論 0 22
  • 文/蒼蘭香墨 我抬頭看了看天上的太陽。三九已至待逞,卻和暖如春甥角,著一層夾襖步出監(jiān)牢的瞬間,已是汗流浹背识樱。 一陣腳步聲響...
    開封第一講書人閱讀 33,048評論 1 270
  • 我被黑心中介騙來泰國打工嗤无, 沒想到剛下飛機就差點兒被人妖公主榨干…… 1. 我叫王不留震束,地道東北人。 一個月前我還...
    沈念sama閱讀 48,203評論 3 370
  • 正文 我出身青樓当犯,卻偏偏與公主長得像,于是被迫代替她去往敵國和親嚎卫。 傳聞我的和親對象是個殘疾皇子,可洞房花燭夜當晚...
    茶點故事閱讀 44,960評論 2 355

推薦閱讀更多精彩內容