股资源-股票学习站-学炒股-股票课程-炒股教程-分析选股指标-入门基础知识

 找回密码
 注册昵称

QQ登录

只需一步,快速开始

搜索
上一主题 下一主题

[通达信] 半成品64卦周易预测指标


    [-----复制链接-----]
楼主
 通达信源码安装路径:1,工具栏点击公式选项。2,弹出公式窗口点击新建。3,把源码复制到指标编辑器保存。4,回到K线图界面安装建立好的公式 || 2024-3-10 19:22:46
半成品64卦周易预测指标介绍

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


 




 



gd15496

回复

举报

QQ|

GMT+8, 2024-12-26 03:22

快速回复 返回顶部 返回列表