软件名称:[B]二十四节气提醒[/B]
软件类型:国产软件
运行环境:Win9X/Win2000/WinXP/Win2003/
软件语言:简体中文
授权方式:免费版
软件大小:3.00 KB
官方主页:Home Page
更新时间:2011-03-01 06:02:35
软件简介:
小玩意一个,也算一个思路
请熟悉江恩理论的继续发扬光大。
{二十四节气提醒}
PLH:=CONST(HHV(H,130));
PLL:=CONST(LLV(L,130));
DRAWTEXT(CURRBARSCOUNT=105,PLH-(PLH-PLL)*0.191,'■本月农历节气'),COLOR0079F1;
DRAWTEXT(REFDATE(MONTH,DATE)=1 AND CURRBARSCOUNT=102,PLH-(PLH-PLL)*0.251,'小寒5日-7日'),COLORWHITE;
DRAWTEXT(REFDATE(MONTH,DATE)=1 AND CURRBARSCOUNT=102,PLH-(PLH-PLL)*0.308,'大寒20日-22日'),COLORWHITE;
DRAWTEXT(REFDATE(MONTH,DATE)=2 AND CURRBARSCOUNT=102,PLH-(PLH-PLL)*0.251,'立春3日-5日'),COLORWHITE;
DRAWTEXT(REFDATE(MONTH,DATE)=2 AND CURRBARSCOUNT=102,PLH-(PLH-PLL)*0.308,'雨水18日-20日'),COLORWHITE;
DRAWTEXT(REFDATE(MONTH,DATE)=3 AND CURRBARSCOUNT=102,PLH-(PLH-PLL)*0.251,'惊蛰5日-7日'),COLORWHITE;
DRAWTEXT(REFDATE(MONTH,DATE)=3 AND CURRBARSCOUNT=102,PLH-(PLH-PLL)*0.308,'春分20日-22日'),COLORWHITE;
DRAWTEXT(REFDATE(MONTH,DATE)=4 AND CURRBARSCOUNT=102,PLH-(PLH-PLL)*0.251,'清明4日-6日'),COLORWHITE;
DRAWTEXT(REFDATE(MONTH,DATE)=4 AND CURRBARSCOUNT=102,PLH-(PLH-PLL)*0.308,'谷雨19日-21日'),COLORWHITE;
DRAWTEXT(REFDATE(MONTH,DATE)=5 AND CURRBARSCOUNT=102,PLH-(PLH-PLL)*0.251,'立夏5日-7日'),COLORWHITE;
DRAWTEXT(REFDATE(MONTH,DATE)=5 AND CURRBARSCOUNT=102,PLH-(PLH-PLL)*0.308,'小满20日-22日'),COLORWHITE;
DRAWTEXT(REFDATE(MONTH,DATE)=6 AND CURRBARSCOUNT=102,PLH-(PLH-PLL)*0.251,'芒种5日-7日'),COLORWHITE;
DRAWTEXT(REFDATE(MONTH,DATE)=6 AND CURRBARSCOUNT=102,PLH-(PLH-PLL)*0.308,'夏至21日-23日'),COLORWHITE;
DRAWTEXT(REFDATE(MONTH,DATE)=7 AND CURRBARSCOUNT=102,PLH-(PLH-PLL)*0.251,'小暑6日-8日'),COLORWHITE;
DRAWTEXT(REFDATE(MONTH,DATE)=7 AND CURRBARSCOUNT=102,PLH-(PLH-PLL)*0.308,'大暑22日-24日'),COLORWHITE;
DRAWTEXT(REFDATE(MONTH,DATE)=8 AND CURRBARSCOUNT=102,PLH-(PLH-PLL)*0.251,'立秋7日-9日'),COLORWHITE;
DRAWTEXT(REFDATE(MONTH,DATE)=8 AND CURRBARSCOUNT=102,PLH-(PLH-PLL)*0.308,'处暑22日-24日'),COLORWHITE;
DRAWTEXT(REFDATE(MONTH,DATE)=9 AND CURRBARSCOUNT=102,PLH-(PLH-PLL)*0.251,'白露7日-9日'),COLORWHITE;
DRAWTEXT(REFDATE(MONTH,DATE)=9 AND CURRBARSCOUNT=102,PLH-(PLH-PLL)*0.308,'秋分22日-24日'),COLORWHITE;
DRAWTEXT(REFDATE(MONTH,DATE)=10 AND CURRBARSCOUNT=102,PLH-(PLH-PLL)*0.251,'寒露8日-10日'),COLORWHITE;
DRAWTEXT(REFDATE(MONTH,DATE)=10 AND CURRBARSCOUNT=102,PLH-(PLH-PLL)*0.308,'霜降23日-25日'),COLORWHITE;
DRAWTEXT(REFDATE(MONTH,DATE)=11 AND CURRBARSCOUNT=102,PLH-(PLH-PLL)*0.251,'立冬7日-9日'),COLORWHITE;
DRAWTEXT(REFDATE(MONTH,DATE)=11 AND CURRBARSCOUNT=102,PLH-(PLH-PLL)*0.308,'小雪22日-24日'),COLORWHITE;
DRAWTEXT(REFDATE(MONTH,DATE)=12 AND CURRBARSCOUNT=102,PLH-(PLH-PLL)*0.251,'大雪6日-8日'),COLORWHITE;
DRAWTEXT(REFDATE(MONTH,DATE)=12 AND CURRBARSCOUNT=102,PLH-(PLH-PLL)*0.308,'冬至21日-23日'),COLORWHITE;
[url=http://www.70822.com/soft/sort013/sort05/down-31060.html]二十四节气提醒[/url]