软件名称:[B]开市八卦六亲动变解盘(易学公式 源码)[/B]
软件类型:国产软件
运行环境:Win9X/Win2000/WinXP/Win2003/
软件语言:简体中文
授权方式:免费版
软件大小:20.0 KB
官方主页:Home Page
更新时间:2011-03-14 05:00:43
软件简介:
LC:=IF(DATE>LSOLARTERMDATE(3),1,0);
A:=LC+IF(DATE>LSOLARTERMDATE(5),1,0)+IF(DATE>LSOLARTERMDATE(7),1,0);
A3:=IF(DATE>LSOLARTERMDATE(9),1,0)+IF(DATE>LSOLARTERMDATE(11),1,0)+IF(DATE>LSOLARTERMDATE(13),1,0);
A6:=IF(DATE>LSOLARTERMDATE(15),1,0)+IF(DATE>LSOLARTERMDATE(17),1,0)+IF(DATE>LSOLARTERMDATE(19),1,0);
A9:=IF(DATE>LSOLARTERMDATE(21),1,0)+IF(DATE>LSOLARTERMDATE(23),1,0)+IF(LC=0,12,0);
YLV:=A3+A6+A9+A;
YL:=IF(YLV>10,YLV-10,IF(YLV<=10,YLV+2,0));
QQ:=GANZHI(DATE,TIME,2)+1;
I3:=MOD(QQ,12);
DZ:=IF(I3=0,12,I3);
YYL:=DZ+GANZHI(DATE,TIME,0)-INTPART(GANZHI(DATE,TIME,0)/12)*12+1+IF(CLOSE>100,ZQDMSUM+5,ZQDMSUM)+YL;
FI1:=MOD(YYL,8);
PO:=SYSPARAM(1)=BARPOS;
SS:=IF(FI1=0,8,FI1);
FI2:=MOD(时辰+YYL,8);
-0.7,POINTDOT,color10000;
XX:=IF(FI2=0,8,FI2);
YUI:=MOD(时辰+YYL,6);
DD:=IF(YUI=0,6,YUI);
NO:=IF(SS=5,2,IF(SS=6,2,0))+IF(SS<=2,2,IF(SS>=7,0,0));
NP:=IF(SS>4,0,1);
NK:=IF(XX=5,2,IF(XX=6,2,0))+IF(XX<=2,2,IF(XX>=7,0,0));
NJ:=IF(XX>4,0,1);
NI:=(SS-INTPART(SS/2)*2)*4;
NL:=(XX-INTPART(XX/2)*2)*4;
XXX:=IF(NK=NO,2,0)+IF(NJ=NP,1,0)+IF(NL=NI,4,0);
L6:=IF(DD=6,IF(DD=6 AND NI=0,4,0),NI);
L5:=IF(DD=5,IF(DD=5 AND NO=0,2,0),NO);
L2:=IF(DD=2,IF(DD=2 AND NK=0,2,0),NK);
L4:=IF(DD=4,IF(DD=4 AND NP=0,1,0),NP);
L3:=IF(DD=3,IF(DD=3 AND NL=0,4,0),NL);
L1:=IF(DD=1,IF(DD=1 AND NJ=0,1,0),NJ);
LA:=L6+L5+L4;
LB:=L3+L2+L1;
DL1:=IF(LA=4,7,IF(LA=0,8,0));
BL1:=IF(LA=5,3,IF(LA=1,4,0));
AL1:=IF(LA=7,1,IF(LA=3,2,0));
CL:=IF(LB=6,5,IF(LB=2,6,0));
DL:=IF(LB=4,7,IF(LB=0,8,0));
CL1:=IF(LA=6,5,IF(LA=2,6,0));
AL:=IF(LB=7,1,IF(LB=3,2,0));
BL:=IF(LB=5,3,IF(LB=1,4,0));
XXS:=AL+BL+CL+DL;
SSX:=AL1+BL1+CL1+DL1;
DRAWTEXT(YLV=11 AND PO,8,'子 '),ALIGN2,colorFF;
DRAWTEXT(YLV=12 AND PO,8,'丑 '),ALIGN2,colorFF;
DRAWTEXT(YLV=1 AND PO,8,'寅 '),ALIGN2,colorFF;
DRAWTEXT(YLV=2 AND PO,8,'卯 '),ALIGN2,colorFF;
DRAWTEXT(YLV=3 AND PO,8,'辰 '),ALIGN2,colorFF;
DRAWTEXT(YLV=4 AND PO,8,'巳 '),ALIGN2,colorFF;
DRAWTEXT(YLV=5 AND PO,8,'午 '),ALIGN2,colorFF;
DRAWTEXT(YLV=6 AND PO,8,'未 '),ALIGN2,colorFF;
DRAWTEXT(YLV=7 AND PO,8,'申 '),ALIGN2,colorFF;
DRAWTEXT(YLV=8 AND PO,8,'酉 '),ALIGN2,colorFF;
DRAWTEXT(YLV=9 AND PO,8,'戌 '),ALIGN2,colorFF;
DRAWTEXT(YLV=10 AND PO,8,'亥 '),ALIGN2,colorFF;
DRAWTEXT(XX=1 OR XX=4>0 AND PO,XX=1 OR XX=4,'子 '),ALIGN2,color808080;
SHUL:=IF(SS=7,5,IF(SS=6,6,0));
DRAWTEXT(SHUL>0 AND PO,SHUL,'子 '),ALIGN2,color808080;
HUL:=IF(XX=1,2,IF(XX=4,2,0))+IF(XX=6,1,0);
DRAWTEXT(HUL>0 AND PO,HUL,'寅 '),ALIGN2,colorFFFF00;
HL9:=IF(SS=7,6,0);
LWU:=IF(SS=1,4,IF(SS=4,4,0));
DRAWTEXT(HL9>0 AND PO,HL9,'寅 '),ALIGN2,colorFFFF00;
CLN:=IF(XX=1,3,IF(XX=4,3,0))+IF(XX=6,2,IF(XX=7,1,0));
DRAWTEXT(CLN>0 AND PO,CLN,'辰 '),ALIGN2,colorFFFF;
DRAWTEXT(LWU>0 AND PO,LWU,'午 '),ALIGN2,colorFF;
LK:=IF(XX=6,3,IF(XX=7,2,0));
DRAWTEXT(LK>0 AND PO,LK,'午 '),ALIGN2,colorFF;
VENA:=IF(SSX=1,5,IF(SSX=4,5,0))+IF(SSX=6,4,0);
DRAWTEXT(VENA>0 AND PO,VENA,'申 '),ALIGN2,colorFFFFFF;
NHENK:=IF(XXS=7,3,0);
DRAWTEXT(NHENK>0 AND PO,NHENK,'申 '),ALIGN2,colorFFFFFF;
QVK:=IF(SSX=1,6,IF(SSX=4,6,0))+IF(SSX=6,5,IF(SSX=7,4,0));
DRAWTEXT(QVK>0 AND PO,QVK,'戌 '),ALIGN2,colorFFFF;
KHOUA:=IF(XXS=2,3,IF(XXS=5,1,0))+IF(XXS=3,2,0);
DRAWTEXT(KHOUA>0 AND PO,KHOUA,'丑 '),ALIGN2,colorFFFF;
KHOU2A:=IF(SSX=8,4,0);
DRAWTEXT(KHOU2A>0 AND PO,KHOU2A,'丑 '),ALIGN2,colorFFFF;
KAOA:=IF(XXS=8,3,IF(XXS=3,1,0))+IF(XXS=2,2,0);
DRAWTEXT(KAOA>0 AND PO,KAOA,'卯 '),ALIGN2,colorFFFF00;
MK:=IF(
[url=http://www.70822.com/soft/sort013/sort02/down-31544.html]开市八卦六亲动变解盘(易学公式 源码)[/url]