公式网-网站导航


网站搜索:  

股票公式指标网 发表于2011/9/14 7:13:17

64卦周易预测指标

源码如下:
h1:=if((h-ref(h,1))>0,1,0);
h2:=if((ref(h,1)-ref(h,2))>0,1,0);
h3:=if((ref(h,2)-ref(h,3))>0,1,0);
h4:=if((ref(h,3)-ref(h,4))>0,1,0);
h5:=if((ref(h,4)-ref(h,5))>0,1,0);
h6:=if((ref(h,5)-ref(h,6))>0,1,0);

jj:=amount/v/100;
jj1:=if((jj-ref(jj,1))>0,1,0);
jj2:=if((ref(jj,1)-ref(jj,2))>0,1,0);
jj3:=if((ref(jj,2)-ref(jj,3))>0,1,0);
jj4:=if((ref(jj,3)-ref(jj,4))>0,1,0);
jj5:=if((ref(jj,4)-ref(jj,5))>0,1,0);
jj6:=if((ref(jj,5)-ref(jj,6))>0,1,0);

l1:=if((l-ref(l,1))>0,1,0);
l2:=if((ref(l,1)-ref(l,2))>0,1,0);
l3:=if((ref(l,2)-ref(l,3))>0,1,0);
l4:=if((ref(l,3)-ref(l,4))>0,1,0);
l5:=if((ref(l,4)-ref(l,5))>0,1,0);
l6:=if((ref(l,5)-ref(l,6))>0,1,0);

x1:=l6+jj6+h6;
x2:=l5+jj5+h5;
x3:=l4+jj4+h4;
x4:=l3+jj3+h3;
x5:=l2+jj2+h2;
x6:=l1+jj1+h1;

泽山咸:=(x1=0 or x1=2) and (x2=0 or x2=2) and (x3=1 or x3=3) and (x4=1 or x4=3)
and (x5=1 or x5=3) and (x6=0 or x6=2);

a1:=if(泽山咸=1,DRAWTEXTABS(10,10,' 兑宫:泽山咸         兑宫:泽山咸 '),0);
a2:=if(泽山咸=1,DRAWTEXTABS(10,20,'六神 伏神    本    卦          变    卦 '),0);
a3:=if(泽山咸=1,DRAWTEXTABS(10,30,'螣蛇      父母未土 ▅▅ ▅▅ 应    父母未土 ▅▅ ▅▅ 应 '),0);
a4:=if(泽山咸=1,DRAWTEXTABS(10,40,'勾陈      兄弟酉金 ▅▅▅▅▅      兄弟酉金 ▅▅▅▅▅   '),0);
a5:=if(泽山咸=1,DRAWTEXTABS(10,50,'朱雀      子孙亥水 ▅▅▅▅▅      子孙亥水 ▅▅▅▅▅   '),0);
a6:=if(泽山咸=1,DRAWTEXTABS(10,60,'青龙      兄弟申金 ▅▅▅▅▅ 世    兄弟申金 ▅▅▅▅▅ 世 '),0);
a7:=if(泽山咸=1,DRAWTEXTABS(10,70,'玄武 妻财卯木 官鬼午火 ▅▅ ▅▅      官鬼午火 ▅▅ ▅▅   '),0);
a8:=if(泽山咸=1,DRAWTEXTABS(10,80,'白虎      父母辰土 ▅▅ ▅▅      父母辰土 ▅▅ ▅▅   '),0);


其中x(n)是指六爻,x1为初爻,x6为六爻,每爻的值:阴0,2,阳1,3,不设变卦,需要的朋友可以自己添加。
 



网站搜索:  



Copyright © 2009-2010 gszb.com ™,All Rights Reserved. 
公式网-www.gszx.com.cn-股票指标公式网