软件名称:[B]六联体(易学 原码)[/B]
软件类型:国产软件
运行环境:Win9X/Win2000/WinXP/Win2003/
软件语言:简体中文
授权方式:免费版
软件大小:26.0 KB
官方主页:Home Page
更新时间:2010-02-04 03:46:11
软件简介:
六联体原码
NG:=MOD(GANZHI(DATE,0,0),10);
-0.7,POINTDOT,color10000;
PO:=SYSPARAM(1)=BARPOS;
DRAWTEXT(NG=0 AND PO,9,'甲 '),ALIGN2,colorFF;
DRAWTEXT(NG=1 AND PO,9,'乙 '),ALIGN2,colorFF;
DRAWTEXT(NG=2 AND PO,9,'丙 '),ALIGN2,colorFF;
DRAWTEXT(NG=3 AND PO,9,'丁 '),ALIGN2,colorFF;
DRAWTEXT(NG=4 AND PO,9,'戊 '),ALIGN2,colorFF;
DRAWTEXT(NG=5 AND PO,9,'己 '),ALIGN2,colorFF;
DRAWTEXT(NG=6 AND PO,9,'庚 '),ALIGN2,colorFF;
DRAWTEXT(NG=7 AND PO,9,'辛 '),ALIGN2,colorFF;
DRAWTEXT(NG=8 AND PO,9,'壬 '),ALIGN2,colorFF;
DRAWTEXT(NG=9 AND PO,9,'癸 '),ALIGN2,colorFF;
NZ:=MOD(GANZHI(DATE,0,0),12);
DRAWTEXT(NZ=0 AND PO,9,'子 '),ALIGN2,colorFF;
DRAWTEXT(NZ=1 AND PO,9,'丑 '),ALIGN2,colorFF;
DRAWTEXT(NZ=2 AND PO,9,'寅 '),ALIGN2,colorFF;
DRAWTEXT(NZ=3 AND PO,9,'卯 '),ALIGN2,colorFF;
DRAWTEXT(NZ=4 AND PO,9,'辰 '),ALIGN2,colorFF;
DRAWTEXT(NZ=5 AND PO,9,'巳 '),ALIGN2,colorFF;
DRAWTEXT(NZ=6 AND PO,9,'午 '),ALIGN2,colorFF;
DRAWTEXT(NZ=7 AND PO,9,'未 '),ALIGN2,colorFF;
DRAWTEXT(NZ=8 AND PO,9,'申 '),ALIGN2,colorFF;
DRAWTEXT(NZ=9 AND PO,9,'酉 '),ALIGN2,colorFF;
DRAWTEXT(NZ=10 AND PO,9,'戌 '),ALIGN2,colorFF;
DRAWTEXT(NZ=11 AND PO,9,'亥 '),ALIGN2,colorFF;
YG:=MOD(GANZHI(DATE,0,1),10);
DRAWTEXT(YG=0 AND PO,9,'甲 '),ALIGN2,colorFF;
DRAWTEXT(YG=1 AND PO,9,'乙 '),ALIGN2,colorFF;
DRAWTEXT(YG=2 AND PO,9,'丙 '),ALIGN2,colorFF;
DRAWTEXT(YG=3 AND PO,9,'丁 '),ALIGN2,colorFF;
DRAWTEXT(YG=4 AND PO,9,'戊 '),ALIGN2,colorFF;
DRAWTEXT(YG=5 AND PO,9,'己 '),ALIGN2,colorFF;
DRAWTEXT(YG=6 AND PO,9,'庚 '),ALIGN2,colorFF;
DRAWTEXT(YG=7 AND PO,9,'辛 '),ALIGN2,colorFF;
DRAWTEXT(YG=8 AND PO,9,'壬 '),ALIGN2,colorFF;
DRAWTEXT(YG=9 AND PO,9,'癸  
[url=http://www.70822.com/soft/sort013/sort02/down-14527.html]六联体(易学 原码)[/url]