仓酷云

 找回密码
 立即注册
搜索
热搜: 活动 交友 discuz
查看: 685|回复: 14
打印 上一主题 下一主题

[学习教程] 来看java完成阴阳历算法

[复制链接]
深爱那片海 该用户已被删除
跳转到指定楼层
#
发表于 2015-1-18 11:19:00 | 只看该作者 回帖奖励 |正序浏览 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
你通过从书的数量和开发周期及运行速度来证明:net网页编程和ruby要比java简单。
程序为:
/*
西历夏历转换程式黄晓叫1995,7,25
prototype:intcalconv(structconvdate*);
structconvdate
{
intsource;==0则输出日期为西历,!=0则输出为夏历
intsolaryear;输入或输出之西积年份
intsolarmonth;西历月
intsolardate;西历日
intlunaryear;输入或输出之夏历年份
intlunarmonth;夏历月
intlunardate;夏历日
intweekday;该日为礼拜几(0==日曜日,1==礼拜一,...)
intkan;该日天干(0==甲,1==乙,...,9==癸)
intchih;该日地支(0==子,1==丑,...,11==亥)
};
呼唤时须设定souce的值,若为0则为西历转夏历,不然为夏历转西历.然後视
输出为西历或夏历来设定西历或夏历的年代日.转换後的年代日会填进布局中(农
历或西历),和该日为礼拜几,天干地支.
若函式的前往值为0暗示没有毛病,1为输出之年份毛病,2为输出之月份毛病,
3为输出之日期毛病.
输出之西积年须在1937-2031间
输出之夏历年须在1936-2030间
若须扩大,则增添lunarcal[]
*/
#definefirstyear1936/*thefirstyearinlunarcal[]*/
structconvdate
{
intsource;
intsolaryear;
intsolarmonth;
intsolardate;
intlunaryear;
intlunarmonth;
intlunardate;
intweekday;
intkan;
intchih;
};
structtaglunarcal
{
intbasedays;/*到西历1月1日到夏历正月月朔的积累日数*/
intintercalation;/*闰月月份.0==此年没有闰月*/
intbaseweekday;/*此年西历1月1日为礼拜几再减1*/
intbasekanchih;/*此年西历1月1日之干支序号减1*/
intmonthdays[13];/*此夏历年每个月之巨细,0==小月(29日),1==年夜月(30日)*/
};
structtaglunarcallunarcal[]={
{23,3,2,17,1,0,0,1,0,0,1,1,0,1,1,1,0},/*1936*/
{41,0,4,23,1,0,0,1,0,0,1,0,1,1,1,0,1},
{30,7,5,28,1,1,0,0,1,0,0,1,0,1,1,0,1},
{49,0,6,33,1,1,0,0,1,0,0,1,0,1,0,1,1},
{38,0,0,38,1,1,0,1,0,1,0,0,1,0,1,0,1},/*1940*/
{26,6,2,44,1,1,0,1,1,0,1,0,0,1,0,1,0},
{45,0,3,49,1,0,1,1,0,1,0,1,0,1,0,1,0},
{35,0,4,54,0,1,0,1,0,1,1,0,1,0,1,0,1},
{24,4,5,59,1,0,1,0,1,0,1,0,1,1,0,1,1},/*1944*/
{43,0,0,5,0,0,1,0,0,1,0,1,1,1,0,1,1},
{32,0,1,10,1,0,0,1,0,0,1,0,1,1,0,1,1},
{21,2,2,15,1,1,0,0,1,0,0,1,0,1,0,1,1},
{40,0,3,20,1,0,1,0,1,0,0,1,0,1,0,1,1},/*1948*/
{28,7,5,26,1,0,1,1,0,1,0,0,1,0,1,0,1},
{47,0,6,31,0,1,1,0,1,1,0,0,1,0,1,0,1},
{36,0,0,36,1,0,1,1,0,1,0,1,0,1,0,1,0},
{26,5,1,41,0,1,0,1,0,1,0,1,1,0,1,0,1},/*1952*/
{44,0,3,47,0,1,0,0,1,1,0,1,1,0,1,0,1},
{33,0,4,52,1,0,1,0,0,1,0,1,1,0,1,1,0},
{23,3,5,57,0,1,0,1,0,0,1,0,1,0,1,1,1},
{42,0,6,2,0,1,0,1,0,0,1,0,1,0,1,1,1},/*1956*/
{30,8,1,8,1,0,1,0,1,0,0,1,0,1,0,1,0},
{48,0,2,13,1,1,1,0,1,0,0,1,0,1,0,1,0},
{38,0,3,18,0,1,1,0,1,0,1,0,1,0,1,0,1},
{27,6,4,23,1,0,1,0,1,1,0,1,0,1,0,1,0},/*1960*/
{45,0,6,29,1,0,1,0,1,0,1,1,0,1,0,1,0},
{35,0,0,34,0,1,0,0,1,0,1,1,0,1,1,0,1},
{24,4,1,39,1,0,1,0,0,1,0,1,0,1,1,1,0},
{43,0,2,44,1,0,1,0,0,1,0,1,0,1,1,1,0},/*1964*/
{32,0,4,50,0,1,0,1,0,0,1,0,0,1,1,0,1},
{20,3,5,55,1,1,1,0,1,0,0,1,0,0,1,1,0},
{39,0,6,0,1,1,0,1,1,0,0,1,0,1,0,1,0},
{29,7,0,5,0,1,0,1,1,0,1,0,1,0,1,0,1},/*1968*/
{47,0,2,11,0,1,0,1,0,1,1,0,1,0,1,0,1},
{36,0,3,16,1,0,0,1,0,1,1,0,1,1,0,1,0},
{26,5,4,21,0,1,0,0,1,0,1,0,1,1,1,0,1},
{45,0,5,26,0,1,0,0,1,0,1,0,1,1,0,1,1},/*1972*/
{33,0,0,32,1,0,1,0,0,1,0,0,1,1,0,1,1},
{22,4,1,37,1,1,0,1,0,0,1,0,0,1,1,0,1},
{41,0,2,42,1,1,0,1,0,0,1,0,0,1,0,1,1},
{30,8,3,47,1,1,0,1,0,1,0,1,0,0,1,0,1},/*1976*/
{48,0,5,53,1,0,1,1,0,1,0,1,0,1,0,0,1},
{37,0,6,58,1,0,1,1,0,1,1,0,1,0,1,0,1},
{27,6,0,3,1,0,0,1,0,1,1,0,1,1,0,1,0},
{46,0,1,8,1,0,0,1,0,1,0,1,1,0,1,1,0},/*1980*/
{35,0,3,14,0,1,0,0,1,0,0,1,1,0,1,1,1},
{24,4,4,19,1,0,1,0,0,1,0,0,1,0,1,1,1},
{43,0,5,24,1,0,1,0,0,1,0,0,1,0,1,1,1},
{32,10,6,29,1,0,1,1,0,0,1,0,0,1,0,1,1},/*1984*/
{50,0,1,35,0,1,1,0,1,0,1,0,0,1,0,1,0},
{39,0,2,40,0,1,1,0,1,1,0,1,0,1,0,0,1},
{28,6,3,45,1,0,1,0,1,1,0,1,1,0,1,0,0},
{47,0,4,50,1,0,1,0,1,0,1,1,0,1,1,0,1},/*1988*/
{36,0,6,56,1,0,0,1,0,0,1,1,0,1,1,1,0},
{26,5,0,1,0,1,0,0,1,0,0,1,0,1,1,1,1},
{45,0,1,6,0,1,0,0,1,0,0,1,0,1,1,1,0},
{34,0,2,11,0,1,1,0,0,1,0,0,1,0,1,1,0},/*1992*/
{22,3,4,17,0,1,1,0,1,0,1,0,0,1,0,1,0},
{40,0,5,22,1,1,1,0,1,0,1,0,0,1,0,1,0},
{30,8,6,27,0,1,1,0,1,0,1,1,0,0,1,0,1},
{49,0,0,32,0,1,0,1,1,0,1,0,1,1,0,0,1},/*1996*/
{37,0,2,38,1,0,1,0,1,0,1,1,0,1,1,0,1},
{27,5,3,43,1,0,0,1,0,0,1,1,0,1,1,0,1},
{46,0,4,48,1,0,0,1,0,0,1,0,1,1,1,0,1},
{35,0,5,53,1,1,0,0,1,0,0,1,0,1,1,0,1},/*2000*/
{23,4,0,59,1,1,0,1,0,1,0,0,1,0,1,0,1},
{42,0,1,4,1,1,0,1,0,1,0,0,1,0,1,0,1},
{31,0,2,9,1,1,0,1,1,0,1,0,0,1,0,1,0},
{21,2,3,14,0,1,0,1,1,0,1,0,1,0,1,0,1},/*2004*/
{39,0,5,20,0,1,0,1,0,1,1,0,1,0,1,0,1},
{28,7,6,25,1,0,1,0,1,0,1,0,1,1,0,1,1},
{48,0,0,30,0,0,1,0,0,1,0,1,1,1,0,1,1},
{37,0,1,35,1,0,0,1,0,0,1,0,1,1,0,1,1},/*2008*/
{25,5,3,41,1,1,0,0,1,0,0,1,0,1,0,1,1},
{44,0,4,46,1,0,1,0,1,0,0,1,0,1,0,1,1},
{33,0,5,51,1,0,1,1,0,1,0,0,1,0,1,0,1},
{22,4,6,56,1,0,1,1,0,1,0,1,0,1,0,1,0},/*2012*/
{40,0,1,2,1,0,1,1,0,1,0,1,0,1,0,1,0},
{30,9,2,7,0,1,0,1,0,1,0,1,1,0,1,0,1},
{49,0,3,12,0,1,0,0,1,0,1,1,1,0,1,0,1},
{38,0,4,17,1,0,1,0,0,1,0,1,1,0,1,1,0},/*2016*/
{27,6,6,23,0,1,0,1,0,0,1,0,1,0,1,1,1},
{46,0,0,28,0,1,0,1,0,0,1,0,1,0,1,1,0},
{35,0,1,33,0,1,1,0,1,0,0,1,0,0,1,1,0},
{24,4,2,38,0,1,1,1,0,1,0,0,1,0,1,0,1},/*2020*/
{42,0,4,44,0,1,1,0,1,0,1,0,1,0,1,0,1},
{31,0,5,49,1,0,1,0,1,1,0,1,0,1,0,1,0},
{21,2,6,54,0,1,0,1,0,1,0,1,1,0,1,0,1},
{40,0,0,59,0,1,0,0,1,0,1,1,0,1,1,0,1},/*2024*/
{28,6,2,5,1,0,1,0,0,1,0,1,0,1,1,1,0},
{47,0,3,10,1,0,1,0,0,1,0,0,1,1,1,0,1},
{36,0,4,15,1,1,0,1,0,0,1,0,0,1,1,0,1},
{25,5,5,20,1,1,1,0,1,0,0,1,0,0,1,1,0},/*2028*/
{43,0,0,26,1,1,0,1,0,1,0,1,0,0,1,0,1},
{32,0,1,31,1,1,0,1,1,0,1,0,1,0,1,0,0},
{22,3,2,36,0,1,1,0,1,0,1,1,0,1,0,1,0}};
#definelastyear(firstyear+sizeof(lunarcal)/sizeof(structtaglunarcal)-1)
/*西积年每个月之日数*/
intsolarcal[12]={31,28,31,30,31,30,31,31,30,31,30,31};
/*西积年每个月之积累日数,闰年与闰年*/
intsolardays[2][14]={
{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}};
/*求此西积年是不是为闰年,前往0为闰年,1为闰年*/
intgetleap(intyear)
{
if(year%400==0)
return1;
elseif(year%100==0)
return0;
elseif(year%4==0)
return1;
else
return0;
}
/*西历夏历转换*/
intcalconv(structconvdate*cd)
{
intleap,d,sm,y,im,l1,l2,acc,i,lm,kc;
if(cd->source==0)/*solar*/
{
if(cd->solaryear<=firstyear||cd->solaryear>lastyear)
return1;
sm=cd->solarmonth-1;
if(sm<0||sm>11)
return2;
leap=getleap(cd->solaryear);
if(sm==1)
d=leap+28;
else
d=solarcal[sm];
if(cd->solardate<1||cd->solardate>d)
return3;
y=cd->solaryear-firstyear;
acc=solardays[leap][sm]+cd->solardate;
cd->weekday=(acc+lunarcal[y].baseweekday)%7;
kc=acc+lunarcal[y].basekanchih;
cd->kan=kc%10;
cd->chih=kc%12;
if(acc<=lunarcal[y].basedays)
{
y--;
cd->lunaryear=cd->solaryear-1;
leap=getleap(cd->lunaryear);
sm+=12;
acc=solardays[leap][sm]+cd->solardate;
}
else
cd->lunaryear=cd->solaryear;
l1=lunarcal[y].basedays;
for(i=0;i<13;i++)
{
l2=l1+lunarcal[y].monthdays[i]+29;
if(acc<=l2)
break;
l1=l2;
}
cd->lunarmonth=i+1;
cd->lunardate=acc-l1;
im=lunarcal[y].intercalation;
if(im!=0&&cd->lunarmonth>im)
{
cd->lunarmonth--;
if(cd->lunarmonth==im)
cd->lunarmonth=-im;
}
if(cd->lunarmonth>12)
cd->lunarmonth-=12;
}
else/*lunar*/
{
if(cd->lunaryear<firstyear||cd->lunaryear>=lastyear)
return1;
y=cd->lunaryear-firstyear;
im=lunarcal[y].intercalation;
lm=cd->lunarmonth;
if(lm<0)
{
if(lm!=-im)
return2;
}
elseif(lm<1||lm>12)
return2;
if(im!=0)
{
if(lm>im)
lm++;
elseif(lm==-im)
lm=im+1;
}
lm--;
if(cd->lunardate>lunarcal[y].monthdays[lm]+29)
return3;
acc=lunarcal[y].basedays;
for(i=0;iacc+=lunarcal[y].monthdays[i]+29;
acc+=cd->lunardate;
leap=getleap(cd->lunaryear);
for(i=13;i>=0;i--)
if(acc>solardays[leap][i])
break;
cd->solardate=acc-solardays[leap][i];
if(i<=11)
{
cd->solaryear=cd->lunaryear;
cd->solarmonth=i+1;
}
else
{
cd->solaryear=cd->lunaryear+1;
cd->solarmonth=i-11;
}
leap=getleap(cd->solaryear);
y=cd->solaryear-firstyear;
acc=solardays[leap][cd->solarmonth-1]+cd->solardate;
cd->weekday=(acc+lunarcal[y].baseweekday)%7;
kc=acc+lunarcal[y].basekanchih;
cd->kan=kc%10;
cd->chih=kc%12;
}
return0;
}

JAVA学习必须明确这是一项投资,对于大多数的人来说,学习JAVA是为了就业,还有就是刚走向工作位置的朋友想尽快赶上工作的节奏。
因胸联盟 该用户已被删除
14#
发表于 2015-3-22 01:09:31 | 只看该作者
是一种为 Internet发展的计算机语言
飘灵儿 该用户已被删除
13#
发表于 2015-3-22 01:09:30 | 只看该作者
一般学编程语言都是从C语开始学的,我也不例外,但还是可能不学过程语言而直接学面向对象语言的,你是刚接触语言,还是从C开始学比较好,基础会很深点,如果你直接学习JAVA也能上手,一般大家在学语言的时候都记一些语言的关键词,常有的包和接口等。再去做逻辑代码的编写,以后的学习过程都是从逻辑代码编写中提升的,所以这方面都是经验积累的。你要开始学习就从
12#
发表于 2015-3-22 01:09:30 | 只看该作者
是一种由美国SUN计算机公司(Sun Microsystems, Inc.)所研究而成的语言
再现理想 该用户已被删除
11#
发表于 2015-3-22 01:09:29 | 只看该作者
那么我书也看了,程序也做了,别人问我的问题我都能解决了,是不是就成为高手了呢?当然没那么简单,这只是万里长征走完了第一步。不信?那你出去接一个项目,你知道怎么下手吗,你知道怎么设计吗,你知道怎么组织人员进行开发吗?你现在脑子里除了一些散乱的代码之外,可能再没有别的东西了吧!
小魔女 该用户已被删除
10#
发表于 2015-3-15 13:05:57 | 只看该作者
是一种使网页(Web Page)产生生动活泼画面的语言
柔情似水 该用户已被删除
9#
发表于 2015-3-7 20:27:15 | 只看该作者
科学超级计算机、移动电话和互联网,同时拥有全球最大的开发者专业社群。
简单生活 该用户已被删除
8#
发表于 2015-2-25 12:37:54 | 只看该作者
如果要向java web方向发展也要吧看看《Java web从入门到精通》学完再到《Struts2.0入门到精通》这样你差不多就把代码给学完了。有兴趣可以看一些设计模块和框架的包等等。
再见西城 该用户已被删除
7#
发表于 2015-2-10 09:31:18 | 只看该作者
让你能够真正掌握接口或抽象类的应用,从而在原来的Java语言基础上跃进一步,更重要的是,设计模式反复向你强调一个宗旨:要让你的程序尽可能的可重用。
不帅 该用户已被删除
6#
发表于 2015-2-4 20:57:50 | 只看该作者
是一种由美国SUN计算机公司(Sun Microsystems, Inc.)所研究而成的语言
蒙在股里 该用户已被删除
5#
发表于 2015-1-24 18:20:41 | 只看该作者
我大二,Java也只学了一年,觉得还是看thinking in java好,有能力的话看英文原版(中文版翻的不怎么好),还能提高英文文档阅读能力。
冷月葬花魂 该用户已被删除
地板
发表于 2015-1-24 16:18:58 | 只看该作者
Java是一个纯的面向对象的程序设计语言,它继承了 C++语言面向对象技术的核心。Java舍弃了C ++语言中容易引起错误的指针(以引用取代)、运算符重载(operator overloading)
山那边是海 该用户已被删除
板凳
发表于 2015-1-24 15:10:31 | 只看该作者
Java自面世后就非常流行,发展迅速,对C++语言形成了有力冲击。Java 技术具有卓越的通用性、高效性、平台移植性和安全性,广泛应用于个人PC、数据中心、游戏控制台
海妖 该用户已被删除
沙发
发表于 2015-1-21 13:20:35 | 只看该作者
你快去找一份Java的编程工作来做吧(如果是在校学生可以去做兼职啊),在实践中提高自己,那才是最快的。不过你得祈祷在公司里碰到一个高手,而且他 还愿意不厌其烦地教你,这样好象有点难哦!还有一个办法就是读开放源码的程序了。我们知道开放源码大都出自高手,他们设计合理,考虑周到,再加上有广大的程序员参与,代码的价值自然是字字珠叽,铿锵有力(对不起,偶最近《金装四大才子》看多了)。
只想知道 该用户已被删除
楼主
发表于 2015-1-18 22:50:38 来自手机 | 只看该作者
是一种将安全性(Security)列为第一优先考虑的语言
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|仓酷云 鄂ICP备14007578号-2

GMT+8, 2024-11-14 22:18

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表