易语言天文算法万年历源码

系统结构:返回星期几,显示日历,子程序1,changeYear,changeMonth,宜忌,解压缩,地区经纬度查询,本地时间计算,rad,pi2,int2,gxc_sunLon,gxc_sunLat,gxc_moonLon,gxc_moonLat,nutationLon,Enn,E_Lon,E_coord,Mnn,M_Lon,M_coord,E_v,M_v,MS_aLon,S_aLon,MS_aLon_t,S_aLon_t,MS_aLon_t2,S_aLon_t2,dt_ext,dt_calc,dt_T,JD,toJD,DD2str,DD,JD2str,timeStr,timeStr2hour,qi_accurate,so_accurate,qi_high,so_high,qi_low,so_low,calc,calcY,公历节日,农历节日,回历计算,农历计算,公历干支,年号,日十二建,反正切2,反正弦,反余弦,llrConv,rad2str2,rad2mrad,rad2rrad,pty_zty,时间计算,hcjj,GdipFillRectangleI,

======_启动窗口程序集
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ 返回星期几
           |  |
           |  |------ 显示日历
           |  |
           |  |------ 子程序1
           |  |
           |  |------ _画板1_鼠标左键被按下
           |  |
           |  |------ _组合框1_编辑内容被改变
           |  |
           |  |------ _组合框2_编辑内容被改变
           |  |
           |  |------ _组合框3_编辑内容被改变
           |  |
           |  |------ _组合框1_列表项被选择
           |  |
           |  |------ _组合框2_列表项被选择
           |  |
           |  |------ _组合框3_列表项被选择
           |  |
           |  |------ changeYear
           |  |
           |  |------ changeMonth
           |  |
           |  |------ _上一年_被单击
           |  |
           |  |------ _下一年_被单击
           |  |
           |  |------ _上一月_被单击
           |  |
           |  |------ _下一月_被单击
           |  |
           |  |------ _回今天_被单击
           |  |
           |  |------ 宜忌
           |  |
           |  |------ 解压缩
           |  |
           |  |------ 地区经纬度查询
           |  |
           |  |------ _省_列表项被选择
           |  |
           |  |------ _市_列表项被选择
           |  |
           |  |------ _时钟1_周期事件
           |  |
           |  |------ 本地时间计算
           |  |
           |  |
======星历函数程序集
           |  |
           |  |------ rad
           |  |
           |  |------ pi2
           |  |
           |  |------ int2
           |  |
           |  |------ gxc_sunLon
           |  |
           |  |------ gxc_sunLat
           |  |
           |  |------ gxc_moonLon
           |  |
           |  |------ gxc_moonLat
           |  |
           |  |------ nutationLon
           |  |
           |  |------ Enn
           |  |
           |  |------ E_Lon
           |  |
           |  |------ E_coord
           |  |
           |  |------ Mnn
           |  |
           |  |------ M_Lon
           |  |
           |  |------ M_coord
           |  |
           |  |------ E_v
           |  |
           |  |------ M_v
           |  |
           |  |------ MS_aLon
           |  |
           |  |------ S_aLon
           |  |
           |  |------ MS_aLon_t
           |  |
           |  |------ S_aLon_t
           |  |
           |  |------ MS_aLon_t2
           |  |
           |  |------ S_aLon_t2
           |  |
           |  |
======农历节气计算
           |  |
           |  |------ dt_ext
           |  |
           |  |------ dt_calc
           |  |
           |  |------ dt_T
           |  |
           |  |------ JD
           |  |
           |  |------ toJD
           |  |
           |  |------ DD2str
           |  |
           |  |------ DD
           |  |
           |  |------ JD2str
           |  |
           |  |------ timeStr
           |  |
           |  |------ timeStr2hour
           |  |
           |  |------ qi_accurate
           |  |
           |  |------ so_accurate
           |  |
           |  |------ qi_high
           |  |
           |  |------ so_high
           |  |
           |  |------ qi_low
           |  |
           |  |------ so_low
           |  |
           |  |------ calc
           |  |
           |  |------ calcY
           |  |
           |  |------ 公历节日
           |  |
           |  |------ 农历节日
           |  |
           |  |------ 回历计算
           |  |
           |  |------ 农历计算
           |  |
           |  |------ 公历干支
           |  |
           |  |------ 年号
           |  |
           |  |------ 日十二建
           |  |
           |  |
======程序集1
           |  |
           |  |------ 反正切2
           |  |
           |  |------ 反正弦
           |  |
           |  |------ 反余弦
           |  |
           |  |------ llrConv
           |  |
           |  |------ rad2str2
           |  |
           |  |------ rad2mrad
           |  |
           |  |------ rad2rrad
           |  |
           |  |------ pty_zty
           |  |
           |  |------ 时间计算
           |  |
           |  |------ hcjj
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   GdipFillRectangleI

调用的DLL命令:

.DLL命令 GdipFillRectangleI, 整数型, "gdiplus", "GdipFillRectangleI"
    .参数 graphics, 整数型
    .参数 Brush, 整数型
    .参数 x, 整数型
    .参数 y, 整数型
    .参数 Width, 整数型
    .参数 Height, 整数型