查看完整版本: 交流学习不收费,随便取用

yhy_318 2007-7-19 20:27

交流学习不收费,随便取用

交流学习不收费,随便取用

都在搞悬念,在交流的地方为何这样?不大好吧,我来给大家一个公式:八卦六爻;本人以修改过一目了然,不收费,随便取用.
fi1:=求模运算(各位数字之和(取整(开盘价),0),8);
ss:=条件函数(fi1=0,8,fi1);  fi2:=求模运算(各位数字之和(四舍五入为整数(取小数部分(开盘价)*100),0),8);
xx:=条件函数(fi2=0,8,fi2);  yui:=求模运算(成交量,6);
dd:=条件函数(yui=0,6,yui);

no:=条件函数(ss=5,2,条件函数(ss=6,2,0))+条件函数(ss<=2,2,条件函数(ss>=7,0,0));
nk:=条件函数(xx=5,2,条件函数(xx=6,2,0))+条件函数(xx<=2,2,条件函数(xx>=7,0,0));
ni:=(ss-(取整((ss)/2))*2)*4;np:=条件函数(ss>4,0,1);
nl:=(xx-(取整((xx)/2))*2)*4;nj:=条件函数(xx>4,0,1);
xxx:=条件函数(nk=no,2,0)+条件函数(nj=np,1,0)+条件函数(nl=ni,4,0);
l6:=条件函数(dd=6,条件函数(dd=6 and ni=0,4,0),ni);
l5:=条件函数(dd=5,条件函数(dd=5 AND no=0,2,0),no);
l2:=条件函数(dd=2,条件函数(dd=2 AND nk=0,2,0),nk);l4:=条件函数(dd=4,条件函数(dd=4 AND np=0,1,0),np);
l3:=条件函数(dd=3,条件函数(dd=3 AND nl=0,4,0),nl);l1:=条件函数(dd=1,条件函数(dd=1 AND nj=0,1,0),nj);
la:=l6+l5+l4;  lb:=l3+l2+l1;dl1:=条件函数(la=4,7,条件函数(la=0,8,0));
bl1:=条件函数(la=5,3,条件函数(la=1,4,0));al1:=条件函数(la=7,1,条件函数(la=3,2,0));
cl:=条件函数(lb=6,5,条件函数(lb=2,6,0));dl:=条件函数(lb=4,7,条件函数(lb=0,8,0));
cl1:=条件函数(la=6,5,条件函数(la=2,6,0));al:=条件函数(lb=7,1,条件函数(lb=3,2,0));
bl:=条件函数(lb=5,3,条件函数(lb=1,4,0));
xxs:=al+bl+cl+dl;
ssx:=al1+bl1+cl1+dl1;

po:=系统参数(1)=数据位置;  0.75  点状线  COLORBLACK;
显示文字((xx=1 OR xx=4 )>0  AND po,(xx=1 OR xx=4),'子                                  '),COLORGRAY,ALIGN2;
shul:=条件函数(ss=7,5,条件函数(ss=6,6,0));
显示文字(shul>0  AND po,shul,'子                                  '),COLORGRAY,ALIGN2;
hul:=条件函数(xx=1,2,条件函数(xx=4,2,0))+条件函数(xx=6,1,0);
显示文字(hul>0  AND po,hul,'寅                                  '),COLORCYAN,ALIGN2;
hl9:=条件函数(ss=7,6,0);lwu:=条件函数(ss=1,4,条件函数(ss=4,4,0));
显示文字(hl9>0  AND po,hl9,'寅                                  '),COLORCYAN,ALIGN2;
cln:=条件函数(xx=1,3,条件函数(xx=4,3,0))+条件函数(xx=6,2,条件函数(xx=7,1,0));
显示文字(cln>0  AND po,cln,'辰                                  '),COLORYELLOW,ALIGN2;
显示文字(lwu>0  AND po,lwu,'午                                  '),COLORRED,ALIGN2;
lk:=条件函数(xx=6,3,条件函数(xx=7,2,0));
显示文字(lk>0  AND po,lk,'午                                  '),COLORRED,ALIGN2;
venA:=条件函数(sSX=1,5,条件函数(sSX=4,5,0))+条件函数(sSX=6,4,0);
显示文字(venA>0  AND po,venA,'                 申                 '),COLORWHITE,ALIGN2;
nhenk:=条件函数(xxS=7,3,0);
显示文字(nhenk>0  AND po,nhenk,'                 申                 '),COLORWHITE,ALIGN2;
qvk:=条件函数(ssX=1,6,条件函数(ssX=4,6,0))+条件函数(sSX=6,5,条件函数(ssX=7,4,0));
显示文字(qvk>0  AND po,qvk,'                 戌                 '),COLORYELLOW,ALIGN2;
khouA:=条件函数(xXS=2,3,条件函数(xXS=5,1,0))+条件函数(xxS=3,2,0);
显示文字(khouA>0  AND po,khouA,'                 丑                 '),COLORYLLOW,ALIGN2;
khou2A:=条件函数(ssX=8,4,0);
显示文字(khou2A>0  AND po,khou2A,'                 丑                 '),COLORYELLOW,ALIGN2;
kaoA:=条件函数(xxS=8,3,条件函数(xxS=3,1,0))+条件函数(xxS=2,2,0);
显示文字(kaoA>0  AND po,kaoA,'                 卯                 '),COLORCYAN,ALIGN2;
mk:=条件函数(ssX=5,6,0);wez:=条件函数(xxS=8,1,0);
显示文字(mk>0  AND po,mk,'                 卯                 '),COLORCYAN,ALIGN2;
kA:=条件函数(xxS=8,2,条件函数(xxS=2,1,0));
显示文字(kA>0  AND po,kA,'                 巳                 '),COLORRED,ALIGN2;
si2A:=条件函数(ssX=3,6,条件函数(ssX=5,5,0));
显示文字(si2A>0  AND po,si2A,'                 巳                 '),COLORRED,ALIGN2;
zeiA:=条件函数(ssX=5,4,条件函数(ssX=3,5,0))+条件函数(ssX=2,6,0);
显示文字(zeiA>0  AND po,zeiA,'                 未                 '),COLORYELLOW,ALIGN2;
显示文字(wez>0  AND po,wez,'                 未                 '),COLORYELLOW,ALIGN2;
zuA:=条件函数(ssX=8,6,条件函数(ssX=3,4,0))+条件函数(ssX=2,5,0);
显示文字(zuA>0  AND po,zuA,'                 酉                 '),COLORWHITE,ALIGN2;
su2A:=条件函数(xxS=5,3,0);faix:=条件函数(ssX=8,5,条件函数(ssX=2,4,0));
显示文字(su2A>0  AND po,su2A,'                 酉                 '),COLORWHITE,ALIGN2;
显示文字(faix>0  AND po,faix,'                 亥                 '),COLORGRAY,ALIGN2;
i2b:=条件函数(xxS=5,2,条件函数(xxS=3,3,0));
显示文字(i2b>0  AND po,i2b,'                 亥                 '),COLORGRAY,ALIGN2;
len:=条件函数(ss=1,5,条件函数(ss=4,5,0))+条件函数(ss=6,4,0);
显示文字(len>0  AND po,len,'申                                  '),COLORWHITE,ALIGN2;
en2:=条件函数(xx=7,3,0);
显示文字(en2>0  AND po,en2,'申                                  '),COLORWHITE,ALIGN2;
qv:=条件函数(ss=1,6,条件函数(ss=4,6,0))+条件函数(ss=6,5,条件函数(ss=7,4,0));
显示文字(qv>0  AND po,qv,'戌                                  '),COLORYELLOW,ALIGN2;
lhiu:=条件函数(xx=2,3,条件函数(xx=5,1,0))+条件函数(xx=3,2,0);
显示文字(lhiu>0  AND po,lhiu,'丑                                  '),COLORYELLOW,ALIGN2;
su2:=条件函数(ss=8,4,0);wi2:=条件函数(xx=8,1,0);
显示文字(su2>0  AND po,su2,'丑                                  '),COLORYELLOW,ALIGN2;
llo:=条件函数(xx=8,3,条件函数(XX=3,1,0))+条件函数(xx=2,2,0);
显示文字(llo>0  AND po,llo,'卯                                  '),COLORCYAN,ALIGN2;
lau2:=条件函数(ss=5,6,0);
显示文字(lau2>0  AND po,lau2,'卯                                  '),COLORCYAN,ALIGN2;
pi:=条件函数(xx=8,2,条件函数(xx=2,1,0));si2:=条件函数(ss=3,6,条件函数(ss=5,5,0));
显示文字(pi>0  AND po,pi,'巳                                  '),COLORRED,ALIGN2;
显示文字(si2>0  AND po,si2,'巳                                  '),COLORRED,ALIGN2;
ppi:=条件函数(ss=5,4,条件函数(ss=3,5,0))+条件函数(ss=2,6,0);
显示文字(ppi>0  AND po,ppi,'未                                  '),COLORYELLOW,ALIGN2;
显示文字(wi2>0  AND po,wi2,'未                                  '),COLORYELLOW,ALIGN2;
oou:=条件函数(ss=8,6,条件函数(ss=3,4,0))+条件函数(ss=2,5,0);
显示文字(oou>0  AND po,oou,'酉                                  '),COLORWHITE,ALIGN2;
ju2:=条件函数(xx=5,3,0);hl:=条件函数(ss=8,5,条件函数(ss=2,4,0));
显示文字(ju2>0  AND po,ju2,'酉                                  '),COLORWHITE,ALIGN2;
显示文字(hl>0  AND po,hl,'亥                                  '),COLORGRAY,ALIGN2;
i2:=条件函数(xx=5,2,条件函数(xx=3,3,0));
显示文字(i2>0  AND po,i2,'亥                                  '),COLORGRAY,ALIGN2;
rtq:=(xxS=1 OR xxS=4);
显示文字(rtq>0  AND po,rtq,'                 子                 '),COLORGRAY,ALIGN2;
tr:=条件函数(ssX=7,5,条件函数(ssX=6,6,0));
显示文字(tr>0  AND po,tr,'                 子                 '),COLORGRAY,ALIGN2;
huy:=条件函数(xxS=1,2,条件函数(xxS=4,2,0))+条件函数(xxS=6,1,0);
显示文字(huy>0  AND po,huy,'                 寅                 '),COLORCYAN,ALIGN2;
hu2A:=条件函数(ssX=7,6,0);
显示文字(hu2A>0  AND po,hu2A,'                 寅                 '),COLORCYAN,ALIGN2;
fey:=条件函数(xxS=1,3,条件函数(xxS=4,3,0))+条件函数(xxS=6,2,条件函数(xXS=7,1,0));
显示文字(fey>0  AND po,fey,'                 辰                 '),COLORYELLOW,ALIGN2;
tuA:=条件函数(sSX=1,4,条件函数(sSX=4,4,0));
显示文字(tuA>0  AND po,tuA,'                 午                 '),COLORRED,ALIGN2;
gutA:=条件函数(xxS=6,3,条件函数(xxS=7,2,0));
显示文字(gutA>0  AND po,gutA,'                 午                 '),COLORRED,ALIGN2;
w:=(条件函数(ss=1,4,0)+条件函数(ss=4,4,0)+条件函数(ss=5,5,0)+条件函数(ss=3,6,0));
q2:=(条件函数(ss=6,6,0)+条件函数(ss=7,5,0)+条件函数(ss=8,5,0)+条件函数(ss=2,4,0));
q:=(条件函数(xx=1,1,0)+条件函数(xx=4,1,0)+条件函数(xx=5,2,0)+条件函数(xx=3,3,0));
j:=(条件函数(xx=1,2,0)+条件函数(xx=4,2,0)+条件函数(xx=6,1,0)+条件函数(xx=8,3,0)+条件函数(xx=3,1,0)+条件函数(xx=2,2,0));
j2:=(条件函数(ss=5,6,0)+条件函数(ss=7,6,0));
m:=(条件函数(ss=1,5,0)+条件函数(ss=6,4,0)+条件函数(ss=8,6,0)+条件函数(ss=4,5,0)+条件函数(ss=3,4,0)+条件函数(ss=2,5,0));
m2:=(条件函数(xx=7,3,0)+条件函数(xx=5,3,0));
ov:=(条件函数(xxx=0,3,条件函数(xxx=7,6,0))+条件函数(xxx=4,2,条件函数(xxx=1,4,0))+条件函数(xxx=6,1,条件函数(xxx=5,3,0))+条件函数(xxx=2,4,条件函数(xxx=3,5,0)));
vo:=条件函数(ov=1,4,条件函数(ov=2,5,0))+条件函数(ov=3,6,条件函数(ov=4,1,0))+条件函数(ov=5,2,条件函数(ov=6,3,0));

ooo:=条件函数(xx=1,8,条件函数(xx=2,7,0))+条件函数(xx=3,6,条件函数(xx=4,5,0))+条件函数(xx=5,4,条件函数(xx=6,3,0))+条件函数(xx=7,8,条件函数(xx=8,1,0));
g1:=条件函数(ov<3,ss,0)+条件函数(ov=6,ss,0)+条件函数(ov=4,ooo,0)+条件函数(ov=5,ooo,0);
g:=条件函数(条件函数(g1>8,xx,g1)=0,ss,条件函数(g1>8,xx,g1));
gwx:=(g=1 OR g=2)+条件函数(g>=7,5,0)+条件函数(g=3,4,0)+条件函数(g=4,3,0)+条件函数(g=5,3,0)+条件函数(g=6,2,0);
e:=(条件函数(ss=1,6,0)+条件函数(ss=4,6,0)+条件函数(ss=7,4,0)+条件函数(ss=6,5,0)+条件函数(ss=8,4,0)+条件函数(ss=5,4,0)+条件函数(ss=2,6,0)+条件函数(ss=3,5,0));
e2:=(条件函数(xx=6,2,0)+条件函数(xx=7,1,0)+条件函数(xx=2,3,0)+条件函数(xx=1,3,0)+条件函数(xx=4,3,0)+条件函数(xx=8,1,0)+条件函数(xx=3,2,0)+条件函数(xx=5,1,0));
w2:=(条件函数(xx=6,3,0)+条件函数(xx=8,2,0)+条件函数(xx=2,1,0)+条件函数(xx=7,2,0));
so:=((m=3 OR m2=3)+条件函数(j=3,3,0)+条件函数(j2=3,3,0)+条件函数(w=3,4,0)+条件函数(w2=3,4,0)+
      条件函数(q=3,2,0)+条件函数(q2=3,2,0)+条件函数(e=3,5,0)+条件函数(e2=3,5,0))-gwx;
eo:=((m=2 OR m2=2)+条件函数(j=2,3,0)+条件函数(j2=2,3,0)+条件函数(w=2,4,0)+条件函数(w2=2,4,0)+
    条件函数(q=2,2,0)+条件函数(q2=2,2,0)+条件函数(e=2,5,0)+条件函数(e2=2,5,0))-gwx;
yo:=((m=1 OR m2=1)+条件函数(j=1,3,0)+条件函数(j2=1,3,0)+条件函数(w=1,4,0)+条件函数(w2=1,4,0)+
    条件函数(q=1,2,0)+条件函数(q2=1,2,0)+条件函数(e=1,5,0)+条件函数(e2=1,5,0))-gwx;
up:=(yo=-1 OR yo=4)+条件函数(eo=-1,2,0)+条件函数(eo=4,2,0)+条件函数(so=-1,3,0)+条件函数(so=4,3,0);
显示文字(up>0  AND po,up,' 父                                '),COLORMAGENTA,ALIGN2;
ui:=(yo=-3 OR yo=2)+条件函数(eo=-3,2,0)+条件函数(eo=2,2,0)+条件函数(so=-3,3,0)+条件函数(so=2,3,0);
显示文字(ui>0  AND po,ui,' 财                                '),COLORMAGENTA,ALIGN2;
gu:=(yo=-2 OR yo=3)+条件函数(eo=-2,2,0)+条件函数(eo=3,2,0)+条件函数(so=-2,3,0)+条件函数(so=3,3,0);
显示文字(gu>0  AND po,gu,' 官                                '),COLORMAGENTA,ALIGN2;
iu:=(yo=-4 OR yo=1)+条件函数(eo=-4,2,0)+条件函数(eo=1,2,0)+条件函数(so=-4,3,0)+条件函数(so=1,3,0);
显示文字(iu>0  AND po,iu,' 子                                '),COLORMAGENTA,ALIGN2;
ux:=条件函数(yo=0,1,0)+条件函数(eo=0,2,0)+条件函数(so=0,3,0);asdi:=(xx=1 OR xx=2 OR xx=3 OR xx=4 );
显示文字(ux>0  AND po,ux,' 兄                                '),COLORMAGENTA,ALIGN2;
e2A:=(条件函数(xxS=6,2,0)+条件函数(xxS=7,1,0)+条件函数(xxS=2,3,0)+条件函数(xxS=1,3,0)+条件函数(xxS=4,3,0)+
      条件函数(xxS=8,1,0)+条件函数(xxS=3,2,0)+条件函数(xxS=5,1,0));sdfr:=(xx=1 OR xx=2 OR xx=5 OR xx=6 );
eA:=(条件函数(ssX=1,6,0)+条件函数(ssX=4,6,0)+条件函数(ssX=7,4,0)+条件函数(ssX=6,5,0)+条件函数(ssX=8,4,0)+
     条件函数(ssX=5,4,0)+条件函数(ssX=2,6,0)+条件函数(ssX=3,5,0));
giA:=(xxS=1 OR xxS=2 OR xxS=3 OR xxS=4 );
w2A:=(条件函数(xxS=6,3,0)+条件函数(xxS=8,2,0)+条件函数(xxS=2,1,0)+条件函数(xxS=7,2,0));
wA:=(tuA+条件函数(ssX=5,5,0)+条件函数(ssX=3,6,0));
q2A:=(条件函数(ssX=6,6,0)+条件函数(ssX=7,5,0)+条件函数(ssX=8,5,0)+条件函数(ssX=2,4,0));
qA:=(rtq+条件函数(xxS=5,2,0)+条件函数(xxS=3,3,0));
jA:=(条件函数(xxS=1,2,0)+条件函数(xxS=4,2,0)+条件函数(xxS=6,1,0)+条件函数(xxS=8,3,0)+条件函数(xxS=3,1,0)+条件函数(xxS=2,2,0));
m2h:=(条件函数(xxS=7,3,0)+条件函数(xxS=5,3,0));j2A:=(条件函数(ssX=5,6,0)+条件函数(ssX=7,6,0));
mAl:=(条件函数(ssX=1,5,0)+条件函数(ssX=6,4,0)+条件函数(ssX=8,6,0)+条件函数(ssX=4,5,0)+条件函数(ssX=3,4,0)+条件函数(ssX=2,5,0));
anya:=((mAl=3 OR m2h=3)+条件函数(jA=3,3,0)+条件函数(j2A=3,3,0)+条件函数(wA=3,4,0)+条件函数(w2A=3,4,0)+
   条件函数(qA=3,2,0)+条件函数(q2A=3,2,0)+条件函数(eA=3,5,0)+条件函数(e2A=3,5,0))-gwx;
rya:=((mAl=2 OR m2h=2)+条件函数(jA=2,3,0)+条件函数(j2A=2,3,0)+条件函数(wA=2,4,0)+条件函数(w2A=2,4,0)+
  条件函数(qA=2,2,0)+条件函数(q2A=2,2,0)+条件函数(eA=2,5,0)+条件函数(e2A=2,5,0))-gwx;
iya:=((mAl=1 OR m2h=1)+条件函数(jA=1,3,0)+条件函数(j2A=1,3,0)+条件函数(wA=1,4,0)+条件函数(w2A=1,4,0)+
   条件函数(qA=1,2,0)+条件函数(q2A=1,2,0)+条件函数(eA=1,5,0)+条件函数(e2A=1,5,0))-gwx;
ups:=(iya=-1 OR iya=4)+条件函数(rya=-1,2,0)+条件函数(rya=4,2,0)+条件函数(anya=-1,3,0)+条件函数(anya=4,3,0);
显示文字(ups>0  AND po,ups,'                   父              '),COLORMAGENTA,ALIGN2;
uis:=(iya=-3 OR iya=2)+条件函数(rya=-3,2,0)+条件函数(rya=2,2,0)+条件函数(anya=-3,3,0)+条件函数(anya=2,3,0);
显示文字(uis>0  AND po,uis,'                   财              '),COLORMAGENTA,ALIGN2;
gus:=(iya=-2 OR iya=3)+条件函数(rya=-2,2,0)+条件函数(rya=3,2,0)+条件函数(anya=-2,3,0)+条件函数(anya=3,3,0);
显示文字(gus>0  AND po,gus,'                   官              '),COLORMAGENTA,ALIGN2;
ius:=(iya=-4 OR iya=1)+条件函数(rya=-4,2,0)+条件函数(rya=1,2,0)+条件函数(anya=-4,3,0)+ 条件函数(anya=1,3,0);
显示文字(ius>0  AND po,ius,'                   子              '),COLORMAGENTA,ALIGN2;
on:=条件函数(iya=0,1,0)+条件函数(rya=0,2,0)+条件函数(anya=0,3,0);
显示文字(on>0  AND po,on,'                   兄              '),COLORMAGENTA,ALIGN2;
lo:=((m=6 OR m2=6)+条件函数(j=6,3,0)+条件函数(j2=6,3,0)+条件函数(w=6,4,0)+条件函数(w2=6,4,0)+
    条件函数(q=6,2,0)+条件函数(q2=6,2,0)+条件函数(e=6,5,0)+条件函数(e2=6,5,0))-gwx;
wo:=((m=5 OR m2=5)+条件函数(j=5,3,0)+条件函数(j2=5,3,0)+条件函数(w=5,4,0)+条件函数(w2=5,4,0)+
   条件函数(q=5,2,0)+条件函数(q2=5,2,0)+条件函数(e=5,5,0)+条件函数(e2=5,5,0))-gwx;
ho:=((m=4 OR m2=4)+条件函数(j=4,3,0)+条件函数(j2=4,3,0)+条件函数(w=4,4,0)+条件函数(w2=4,4,0)+
   条件函数(q=4,2,0)+条件函数(q2=4,2,0)+条件函数(e=4,5,0)+条件函数(e2=4,5,0))-gwx;
jui:=条件函数(ho=-1,4,0)+条件函数(ho=4,4,0)+条件函数(wo=-1,5,0)+条件函数(wo=4,5,0)+条件函数(lo=-1,6,0)+条件函数(lo=4,6,0);
显示文字(jui>0  AND po,jui,' 父                                '),COLORMAGENTA,ALIGN2;
jhaii:=条件函数(ho=-3,4,0)+条件函数(ho=2,4,0)+条件函数(wo=-3,5,0)+条件函数(wo=2,5,0)+条件函数(lo=-3,6,0)+条件函数(lo=2,6,0);
显示文字(jhaii>0  AND po,jhaii,' 财                                '),COLORMAGENTA,ALIGN2;
juani:=条件函数(ho=-2,4,0)+条件函数(ho=3,4,0)+条件函数(wo=-2,5,0)+条件函数(wo=3,5,0)+条件函数(lo=-2,6,0)+条件函数(lo=3,6,0);
显示文字(juani>0  AND po,juani,' 官                                '),COLORMAGENTA,ALIGN2;
jzii:=条件函数(ho=-4,4,0)+条件函数(ho=1,4,0)+条件函数(wo=-4,5,0)+条件函数(wo=1,5,0)+条件函数(lo=-4,6,0)+条件函数(lo=1,6,0);
显示文字(jzii>0  AND po,jzii,' 子                                '),COLORMAGENTA,ALIGN2;
iuya:=((mAl=6 OR m2h=6)+条件函数(jA=6,3,0)+条件函数(j2A=6,3,0)+条件函数(wA=6,4,0)+条件函数(w2A=6,4,0)+
条件函数(qA=6,2,0)+条件函数(q2A=6,2,0)+条件函数(eA=6,5,0)+条件函数(e2A=6,5,0))-gwx;
uya:=((mAl=5 OR m2h=5)+条件函数(jA=5,3,0)+条件函数(j2A=5,3,0)+条件函数(wA=5,4,0)+条件函数(w2A=5,4,0)+
   条件函数(qA=5,2,0)+条件函数(q2A=5,2,0)+条件函数(eA=5,5,0)+条件函数(e2A=5,5,0))-gwx;
hiya:=((mAl=4 OR m2h=4)+条件函数(jA=4,3,0)+条件函数(j2A=4,3,0)+条件函数(wA=4,4,0)+条件函数(w2A=4,4,0)+
   条件函数(qA=4,2,0)+条件函数(q2A=4,2,0)+条件函数(eA=4,5,0)+条件函数(e2A=4,5,0))-gwx;
jxigi:=条件函数(ho=0,4,0)+条件函数(wo=0,5,0)+条件函数(lo=0,6,0);
显示文字(jxigi>0  AND po,jxigi,' 兄                                '),COLORMAGENTA,ALIGN2;
jjf:=条件函数(hiya=-1,4,0)+条件函数(hiya=4,4,0)+条件函数(uya=-1,5,0)+条件函数(uya=4,5,0)+条件函数(iuya=-1,6,0)+条件函数(iuya=4,6,0);
显示文字(jjf>0  AND po,jjf,'                   父              '),COLORMAGENTA,ALIGN2;
jha:=条件函数(hiya=-3,4,0)+条件函数(hiya=2,4,0)+条件函数(uya=-3,5,0)+条件函数(uya=2,5,0)+条件函数(iuya=-3,6,0)+条件函数(iuya=2,6,0);
显示文字(jha>0  AND po,jha,'                   财              '),COLORMAGENTA,ALIGN2;
jga:=条件函数(hiya=-2,4,0)+条件函数(hiya=3,4,0)+条件函数(uya=-2,5,0)+条件函数(uya=3,5,0)+条件函数(iuya=-2,6,0)+条件函数(iuya=3,6,0);
显示文字(jga>0  AND po,jga,'                   官              '),COLORMAGENTA,ALIGN2;
jzi:=条件函数(hiya=-4,4,0)+条件函数(hiya=1,4,0)+条件函数(uya=-4,5,0)+条件函数(uya=1,5,0)+条件函数(iuya=-4,6,0)+条件函数(iuya=1,6,0);
显示文字(jzi>0  AND po,jzi,'                   子              '),COLORMAGENTA,ALIGN2;
jxi:=条件函数(hiya=0,4,0)+条件函数(uya=0,5,0)+条件函数(iuya=0,6,0);
显示文字(jxi>0  AND po,jxi,'                   兄              '),COLORMAGENTA,ALIGN2;
显示文字(po,ov,'世                      '),COLORMAGENTA,ALIGN2;
显示文字(po,vo,' 应                      '),COLORMAGENTA,ALIGN2;
xxss:=ss*10+xx;
xsxs:=条件函数(xxss=12,5,0)+条件函数(xxss=15,2,0)+条件函数(xxss=17,2,0)+条件函数(xxss=23,3,0)+条件函数(xxss=27,2,0)+
      条件函数(xxss=32,5,0)+条件函数(xxss=47,2,0)+条件函数(xxss=52,5,0)+条件函数(xxss=56,4,0)+条件函数(xxss=57,5,0)+条件函数(xxss=63,3,0)+
      条件函数(xxss=64,3,0)+条件函数(xxss=67,2,0)+条件函数(xxss=76,4,0)+条件函数(xxss=83,3,0)+条件函数(xxss=87,2,0);
显示文字(xsxs>0  AND po,xsxs,'财伏                                      '),COLORMAGENTA,ALIGN2;
sxio:=条件函数(xsxs=5,1,0)+条件函数(xsxs=3,7,0)+条件函数(xsxs=4,10,0)+条件函数(xsxs=2,4,0)+条件函数(xxss=15,-1,0)+条件函数(xxss=17,-1,0);
显示文字(sxio=1  AND po,xsxs,'子                                           '),COLORRED,ALIGN2;
显示文字(sxio=3  AND po,xsxs,'寅                                           '),COLORCYAN,ALIGN2;
显示文字(sxio=4  AND po,xsxs,'卯                                           '),COLORCYAN,ALIGN2;
显示文字(sxio=7  AND po,xsxs,'午                                           '),COLORRED,ALIGN2;
显示文字(sxio=10  AND po,xsxs,'酉                                           '),COLORWHITE,ALIGN2;
显示文字(asdi>0  AND po,1,'   ▄▄▄                         '),COLORGREEN,ALIGN2;
显示文字(asdi=0  AND po,1,'  ▄  ▄                         '),COLORGREEN,ALIGN2;
显示文字(sdfr>0  AND po,2,'   ▄▄▄                         '),COLORGREEN,ALIGN2;
显示文字(sdfr=0  AND po,2,'  ▄  ▄                         '),COLORGREEN,ALIGN2;
dfgn:=(xx=1 OR xx=3 OR xx=5 OR xx=7 );
显示文字(dfgn>0  AND po,3,' ▄▄▄                         '),COLORGREEN,ALIGN2;
显示文字(dfgn=0  AND po,3,'  ▄  ▄                         '),COLORGREEN,ALIGN2;
fgh:=(ss=1 OR ss=2 OR ss=3 OR ss=4 );
显示文字(fgh>0  AND po,4,'   ▄▄▄                         '),COLORGREEN,ALIGN2;
显示文字(fgh=0  AND po,4,'  ▄  ▄                         '),COLORGREEN,ALIGN2;
ghj:=(ss=1 OR ss=2 OR ss=5 OR ss=6 );
显示文字(ghj>0  AND po,5,'   ▄▄▄                         '),COLORGREEN,ALIGN2;
显示文字(ghj=0  AND po,5,'  ▄  ▄                         '),COLORGREEN,ALIGN2;
hjk:=(ss=1 OR ss=3 OR ss=5 OR ss=7 );
显示文字(hjk>0  AND po,6,'  ▄▄▄                         '),COLORGREEN,ALIGN2;
显示文字(hjk=0  AND po,6,'   ▄  ▄                         '),COLORGREEN,ALIGN2;
显示文字(giA>0  AND po,1,'   ▄▄▄       '),COLORGREEN,ALIGN2;
显示文字(giA=0  AND po,1,'   ▄  ▄       '),COLORGREEN,ALIGN2;
trA:=(xxS=1 OR xxS=2 OR xxS=5 OR xxS=6 );
显示文字(trA>0  AND po,2,'  ▄▄▄       '),COLORGREEN,ALIGN2;
显示文字(trA=0  AND po,2,'   ▄  ▄       '),COLORGREEN,ALIGN2;
hanA:=(xxS=1 OR xxS=3 OR xxS=5 OR xxS=7 );
显示文字(hanA>0  AND po,3,'  ▄▄▄       '),COLORGREEN,ALIGN2;
显示文字(hanA=0  AND po,3,'  ▄  ▄       '),COLORGREEN,ALIGN2;
soiA:=(ssX=1 OR ssX=2 OR ssX=3 OR ssX=4 );
显示文字(soiA>0  AND po,4,'  ▄▄▄       '),COLORGREEN,ALIGN2;
显示文字(soiA=0  AND po,4,'  ▄  ▄       '),COLORGREEN,ALIGN2;
iop:=(ssX=1 OR ssX=2 OR ssX=5 OR ssX=6 );
显示文字(iop>0  AND po,5,'  ▄▄▄       '),COLORGREEN,ALIGN2;
显示文字(iop=0  AND po,5,'   ▄  ▄       '),COLORGREEN,ALIGN2;
yui:=(ssX=1 OR ssX=3 OR ssX=5 OR ssX=7 );
显示文字(yui>0  AND po,6,'  ▄▄▄       '),COLORGREEN,ALIGN2;
显示文字(yui=0  AND po,6,'  ▄  ▄       '),COLORGREEN,ALIGN2;
ddd:=条件函数(dd=1,asdi,0)+条件函数(dd=2,sdfr,0)+条件函数(dd=3,dfgn,0)+条件函数(dd=4,fgh,0)+条件函数(dd=5,ghj,0)+条件函数(dd=6,hjk,0);
显示文字(ddd+dd>dd  AND po,dd,'  ▄▄▄    o                    '),COLORRED,ALIGN2;
显示文字(ddd+dd=dd  AND po,dd,' ▄  ▄    x                    '),colorffff00,ALIGN2;
显示文字(po,8,'月   日(        )  空        '),COLORFFFFCC,ALIGN2;
显示文字(po,7,'主卦                    变卦         '),COLORFFFFCC,ALIGN2;
lc:=条件函数(年月日>节气日期(3),1,0);a:=lc+条件函数(年月日>节气日期(5),1,0)+条件函数(年月日>节气日期(7),1,0);   
a3:=条件函数(年月日>节气日期(9),1,0)+条件函数(年月日>节气日期(11),1,0)+条件函数(年月日>节气日期(13),1,0);
a6:=条件函数(年月日>节气日期(15),1,0)+条件函数(年月日>节气日期(17),1,0)+条件函数(年月日>节气日期(19),1,0);
a9:=条件函数(年月日>节气日期(21),1,0)+条件函数(年月日>节气日期(23),1,0)+条件函数(lc=0,12,0);
yl:=a3+a6+a9+a  ;
显示文字(yl=11  AND po,8,'  (11)子                              '),COLORRED,ALIGN2;
显示文字(yl=12  AND po,8,'  (12)丑                              '),COLORRED,ALIGN2;
显示文字(yl=1  AND po,8,'   (1)寅                              '),COLORRED,ALIGN2;
显示文字(yl=2  AND po,8,'   (2)卯                              '),COLORRED,ALIGN2;
显示文字(yl=3  AND po,8,'   (3)辰                              '),COLORRED,ALIGN2;
显示文字(yl=4  AND po,8,'   (4)巳                              '),COLORRED,ALIGN2;
显示文字(yl=5  AND po,8,' (5)午                              '),COLORRED,ALIGN2;
显示文字(yl=6  AND po,8,' (6)未                             '),COLORRED,ALIGN2;
显示文字(yl=7  AND po,8,'  (7)申                              '),COLORRED,ALIGN2;
显示文字(yl=8  AND po,8,'  (8)酉                              '),COLORRED,ALIGN2;
显示文字(yl=9  AND po,8,' (9)戌                              '),COLORRED,ALIGN2;
显示文字(yl=10  AND po,8,'(10)亥                              '),COLORRED,ALIGN2;
qq:=干支(年月日, 时分秒, 2)+1;xy3:=求模运算(qq,10);tg:=条件函数(xy3=0,10,xy3);
显示文字(tg=1  AND po,8,' 甲                         '),COLORRED,ALIGN2;
显示文字(tg=2  AND po,8,' 乙                         '),COLORRED,ALIGN2;
显示文字(tg=3  AND po,8,' 丙                         '),COLORRED,ALIGN2;
显示文字(tg=4  AND po,8,' 丁                         '),COLORRED,ALIGN2;
显示文字(tg=5  AND po,8,' 戊                         '),COLORRED,ALIGN2;
显示文字(tg=6  AND po,8,' 己                         '),COLORRED,ALIGN2;
显示文字(tg=7  AND po,8,'庚                         '),COLORRED,ALIGN2;
显示文字(tg=8  AND po,8,' 辛                         '),COLORRED,ALIGN2;
显示文字(tg=9  AND po,8,'壬                         '),COLORRED,ALIGN2;
显示文字(tg=10 AND po,8,'     癸                         '),COLORRED,ALIGN2;
i3:=求模运算(qq,12);dz:=条件函数(i3=0,12,i3);
显示文字(dz=1  AND po,8,'          子                       '),COLORRED,ALIGN2;
显示文字(dz=2  AND po,8,'         丑                       '),COLORRED,ALIGN2;
显示文字(dz=3  AND po,8,'          寅                       '),COLORRED,ALIGN2;
显示文字(dz=4  AND po,8,'          卯                       '),COLORRED,ALIGN2;
显示文字(dz=5  AND po,8,'          辰                       '),COLORRED,ALIGN2;
显示文字(dz=6  AND po,8,'          巳                       '),COLORRED,ALIGN2;
显示文字(dz=7  AND po,8,'          午                       '),COLORRED,ALIGN2;
显示文字(dz=8  AND po,8,'          未                       '),COLORRED,ALIGN2;
显示文字(dz=9  AND po,8,'          申                       '),COLORRED,ALIGN2;
显示文字(dz=10 AND po,8,'          酉                       '),COLORRED,ALIGN2;
显示文字(dz=11 AND po,8,'          戌                       '),COLORRED,ALIGN2;
显示文字(dz=12 AND po,8,'          亥                       '),COLORRED,ALIGN2;
km:=条件函数(qq>10,1,0)+条件函数(qq>20,1,0)+条件函数(qq>30,1,0)+条件函数(qq>40,1,0)+条件函数(qq>50,1,0)+1;
显示文字(km=6  AND po,8,'11-12子丑              '),COLORRED,ALIGN2;
显示文字(km=5  AND po,8,'1-2寅卯              '),COLORRED,ALIGN2;
显示文字(km=4  AND po,8,'3-4辰巳              '),COLORRED,ALIGN2;
显示文字(km=3  AND po,8,'5-6午未              '),COLORRED,ALIGN2;
显示文字(km=2 AND po,8,' 7-8申酉              '),COLORRED,ALIGN2;
显示文字(km=1  AND po,8,'9-10戌亥              '),COLORRED,ALIGN2;
niq:=(ssx-(取整((ssx)/2))*2)*4; npq:=条件函数(ssx>4,0,1);noq:=条件函数(ssx=5,2,条件函数(ssx=6,2,0))+条件函数(ssx<=2,2,条件函数(ssx>=7,0,0));  
nlq:=(xxs-(取整((xxs)/2))*2)*4; njq:=条件函数(xxs>4,0,1); nkq:=条件函数(xxs=5,2,条件函数(xxs=6,2,0))+条件函数(xxs<=2,2,条件函数(xxs>=7,0,0)) ;  
xxxQ:=条件函数(nkq=noq,2,0)+条件函数(njq=npq,1,0)+条件函数(nlq=niq,4,0);
ovq:=条件函数(xxxQ=0,3,条件函数(xxxQ=7,6,0))+条件函数(xxxQ=4,2,条件函数(xxxQ=1,4,0))+条件函数(xxxQ=6,1,条件函数(xxxQ=5,3,0))+条件函数(xxxQ=2,4,条件函数(xxxQ=3,5,0));
显示文字(po,ovq,'                                世    '),COLORMAGENTA,ALIGN2;
voq:=(条件函数(ovq=1,4,条件函数(ovq=2,5,0))+条件函数(ovq=3,6,条件函数(ovq=4,1,0))+条件函数(ovq=5,2,条件函数(ovq=6,3,0)));
显示文字(po,voq,'                               应    '),COLORMAGENTA,ALIGN2;
ql:=(条件函数(tg<=2,1,0)+条件函数(tg=3,6,0)+条件函数(tg=4,6,0)+条件函数(tg=5,5,0)+条件函数(tg=6,4,0)+条件函数(tg=7,3,0)+条件函数(tg=8,3,0)+条件函数(tg>=9,2,0));
显示文字(po,ql,'                                                                            龙-木'),COLORCYAN,ALIGN2;
显示文字(po,条件函数(ql+1<7,ql+1,条件函数(ql+1>6,ql-5,0)),'                                  雀-火'),COLORRED,ALIGN2;
显示文字(po,条件函数(ql+2<7,ql+2,条件函数(ql+2>6,ql-4,0)),'                                  勾-土'),COLORYELLOW,ALIGN2;
显示文字(po,条件函数(ql+3<7,ql+3,条件函数(ql+3>6,ql-3,0)),'                                  蛇-土火'),COLORYELLOW,ALIGN2;
显示文字(po,条件函数(ql+4<7,ql+4,条件函数(ql+4>6,ql-2,0)),'                                  虎-金'),COLORWHITE,ALIGN2;
显示文字(po,条件函数(ql+5<7,ql+5,条件函数(ql+5>6,ql-1,0)),'                                  武-水'),COLORGRAY,ALIGN2;

bb:=ss*10+xx;
显示文字(bb=68 AND po,7,' 水地比-坤;(土阴)                 '),Color5659FF,ALIGN2;
显示文字(bb=61 AND po,7,' 水天需-坤;(土阴)                '),Color5659FF,ALIGN2;
显示文字(bb=21 AND po,7,'  泽天夬-坤;(土阴)                '),Color5659FF,ALIGN2;
显示文字(bb=41 AND po,7,'  雷天大壮-坤;(土阴)              '),Color5659FF,ALIGN2;
显示文字(bb=81 AND po,7,'  地天泰-坤;(土阴)                '),Color5659FF,ALIGN2;
显示文字(bb=82 AND po,7,'  地泽临-坤;(土阴)                '),Color5659FF,ALIGN2;
显示文字(bb=84 AND po,7,'  地雷复-坤;(土阴)                '),Color5659FF,ALIGN2;
显示文字(bb=88 AND po,7,'  坤为地-坤;(土阴)                 '),Color5659FF,ALIGN2;
显示文字(bb=57 AND po,7,'  风山渐-艮;(土阳)                 '),Color5659FF,ALIGN2;
显示文字(bb=52 AND po,7,'  风泽中孚-艮;(土阳)               '),Color5659FF,ALIGN2;
显示文字(bb=12 AND po,7,'  天泽履-艮;(土阳)                 '),Color5659FF,ALIGN2;
显示文字(bb=32 AND po,7,'  火泽睽-艮;(土阳)                '),Color5659FF,ALIGN2;
显示文字(bb=72 AND po,7,'  山泽损-艮;(土阳)                  '),Color5659FF,ALIGN2;
显示文字(bb=71 AND po,7,'  山天大畜-艮;(土阳)                '),Color5659FF,ALIGN2;
显示文字(bb=73 AND po,7,'  山火贲-艮;(土阳)                 '),Color5659FF,ALIGN2;
显示文字(bb=77 AND po,7,'  艮为山-艮;(土阳)                  '),Color5659FF,ALIGN2;
显示文字(bb=86 AND po,7,'  地水师-坎;(水阳)                  '),Color5659FF,ALIGN2;
显示文字(bb=83 AND po,7,'  地火明夷-坎;(水阳)                 '),Color5659FF,ALIGN2;
显示文字(bb=43 AND po,7,'  雷火丰-坎;(水阳)                  '),Color5659FF,ALIGN2;
显示文字(bb=23 AND po,7,'  泽火革-坎;(水阳)                  '),Color5659FF,ALIGN2;
显示文字(bb=63AND po,7,'   水火既济-坎;(水阳)                '),Color5659FF,ALIGN2;
显示文字(bb=64 AND po,7,'  水雷屯-坎;(水阳)                  '),Color5659FF,ALIGN2;
显示文字(bb=62 AND po,7,'  水泽节-坎;(水阳)                 '),Color5659FF,ALIGN2;
显示文字(bb=66 AND po,7,'  坎为水-坎;(水阳)                  '),Color5659FF,ALIGN2;
显示文字(bb=75 AND po,7,'  山风蛊-巽;(木阴)                  '),Color5659FF,ALIGN2;
显示文字(bb=74 AND po,7,'  山雷颐-巽;(木阴)                 '),Color5659FF,ALIGN2;
显示文字(bb=34 AND po,7,'  火雷噬嗑-巽;(木阴)               '),Color5659FF,ALIGN2;
显示文字(bb=14 AND po,7,'  天雷无妄-巽;(木阴)               '),Color5659FF,ALIGN2;
显示文字(bb=54 AND po,7,'  风雷益-巽;(木阴)                 '),Color5659FF,ALIGN2;
显示文字(bb=53 AND po,7,'     风火家人-巽;(木阴)             '),Color5659FF,ALIGN2;
显示文字(bb=51 AND po,7,'  风天小畜-巽;(木阴)                '),Color5659FF,ALIGN2;
显示文字(bb=55 AND po,7,'  巽为风-巽;(木阴)                   '),Color5659FF,ALIGN2;
显示文字(bb=24 AND po,7,'  泽雷随-震;(木阳)                   '),Color5659FF,ALIGN2;
显示文字(bb=25 AND po,7,'  泽风大过-震;(木阳)                  '),Color5659FF,ALIGN2;
显示文字(bb=65AND po,7,'   水风井-震;(木阳)                   '),Color5659FF,ALIGN2;
显示文字(bb=85 AND po,7,'  地风升-震;(木阳)                   '),Color5659FF,ALIGN2;
显示文字(bb=45 AND po,7,'  雷风恒-震;(木阳)                    '),Color5659FF,ALIGN2;
显示文字(bb=46 AND po,7,'  雷水解-震;(木阳)                    '),Color5659FF,ALIGN2;
显示文字(bb=48 AND po,7,'  雷地豫-震;(木阳)                    '),Color5659FF,ALIGN2;
显示文字(bb=44 AND po,7,'  震为雷-震;(木阳)                   '),Color5659FF,ALIGN2;
显示文字(bb=13 AND po,7,'  天火同人-离;(火阴)                 '),Color5659FF,ALIGN2;
显示文字(bb=16 AND po,7,'  天水讼-离;(火阴)                   '),Color5659FF,ALIGN2;
显示文字(bb=56 AND po,7,'  风水涣-离;(火阴)                   '),Color5659FF,ALIGN2;
显示文字(bb=76 AND po,7,'  山水蒙-离;(火阴)                   '),Color5659FF,ALIGN2;
显示文字(bb=36 AND po,7,'  火水未济-离;(火阴)                  '),Color5659FF,ALIGN2;
显示文字(bb=35 AND po,7,'  火风鼎-离;(火阴)                   '),Color5659FF,ALIGN2;
显示文字(bb=37 AND po,7,'  火山旅-离;(火阴)                   '),Color5659FF,ALIGN2;
显示文字(bb=33 AND po,7,'  离为火-离;(火阴)                   '),Color5659FF,ALIGN2;
显示文字(bb=42 AND po,7,'  雷泽归妹-兑;(金阴)                 '),Color5659FF,ALIGN2;
显示文字(bb=47 AND po,7,'  雷山小过-兑;(金阴)                  '),Color5659FF,ALIGN2;
显示文字(bb=87 AND po,7,'  地山谦-兑;(金阴)                   '),Color5659FF,ALIGN2;
显示文字(bb=67 AND po,7,'  水山蹇-兑;(金阴)                    '),Color5659FF,ALIGN2;
显示文字(bb=27 AND po,7,'  泽山咸-兑;(金阴)                    '),Color5659FF,ALIGN2;
显示文字(bb=28 AND po,7,'  泽地萃-兑;(金阴)                    '),Color5659FF,ALIGN2;
显示文字(bb=26 AND po,7,'  泽水困-兑;(金阴)                    '),Color5659FF,ALIGN2;
显示文字(bb=22 AND po,7,'  兑为泽-兑;(金阴)                    '),Color5659FF,ALIGN2;
显示文字(bb=31 AND po,7,'  火天大有-乾;(金阳)                 '),Color5659FF,ALIGN2;
显示文字(bb=38 AND po,7,'  火地晋-乾;(金阳)                    '),Color5659FF,ALIGN2;
显示文字(bb=78 AND po,7,'  山地剥-乾;(金阳)                   '),Color5659FF,ALIGN2;
显示文字(bb=58 AND po,7,'  风地观-乾;(金阳)                   '),Color5659FF,ALIGN2;
显示文字(bb=18 AND po,7,'  天地否-乾;(金阳)                    '),Color5659FF,ALIGN2;
显示文字(bb=17 AND po,7,'  天山遁-乾;(金阳)                    '),Color5659FF,ALIGN2;
显示文字(bb=15 AND po,7,'  天风姤-乾;(金阳)                    '),Color5659FF,ALIGN2;
显示文字(bb=11 AND po,7,'  乾为天-乾;(金阳)                   '),Color5659FF,ALIGN2;
bbb:=ssx*10+xxs;
显示易学文字(年月日 AND po,7,bbb,1),Color5659FF,ALIGN2;

ljq 2007-7-19 22:31

ok;ok

shangjing558 2007-7-20 13:46

谢谢提供!!

alanzang 2007-7-20 13:57

谢谢提供!!

谢谢提供!!

chenjiaq 2007-7-20 15:06

谢谢支持原码分享

o学习o 2007-7-21 09:03

支持!!!!

黑马驰盘 2007-10-24 19:18

谢谢支持原码分享

天高任鸟飞 2007-10-26 19:22

谢谢提供!!

花子 2007-10-27 11:46

谢谢分享

rxhui168 2007-10-27 12:47

谢谢
页: [1]
查看完整版本: 交流学习不收费,随便取用