以下是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,不设变卦,需要的朋友可以自己添加。
 

声明:本站所有文章,如无特殊说明或标注,均为本站原创发布。任何个人或组织,在未征得本站同意时,禁止复制、盗用、采集、发布本站内容到任何网站、书籍等各类媒体平台。如若本站内容侵犯了原著者的合法权益,可联系我们进行处理。