指标编写学习论坛

标题: 怎样把飞狐指标叠加.如macd和kdj？ [打印本页]

作者: admin 时间: 2016-5-7 17:17
标题: 怎样把飞狐指标叠加.如macd和kdj？
怎样把飞狐指标叠加.如macd和kdj
正确答案：
   k:"kdj.k",COLORWHITE;
   d:"kdj.d",COLORYELLOW;
   j:"kdj.j",COLORGREEN;
   {以上为a指标,显示数值和画线.其数值和副图右侧的坐标对应}

   diff:"macd.diff",LINETHICK0,COLORCYAN;
   dea:"macd.dea",LINETHICK0,COLORRED;
   macd:"macd.macd",LINETHICK0,COLORMAGENTA;
   {以上为b指标,只显示数值,不画线.其数值和副图右侧的坐标不对应}

   {以下规定叠加区域-这里是显示区域}
   p:=SYSPARAM(3)-SYSPARAM(2);
   q:=SYSPARAM(3);
   {以下计算叠加比和平移量}
   ha:=hhv(max(max(k,ad),j),p);//显示区域内a指标最大值
   La:=LLv(min(min(k,d),j),p);//显示区域内a指标最小值
   hb:=hhv(max(max(diff,dea),macd),p);//显示区域内b指标最大值
   Lb:=LLv(min(min(diff,dea),macd),p);//显示区域内b指标最小值
   b:=(ha-La)/(hb-Lb);//叠加比
   y:=(ha+La-(hb+Lb)*b)/2;//平移量
   {以下画b指标的叠加线}
   PARTLINE(1,diff*b[q]+y[q]),COLORCYAN;//画b1线
   PARTLINE(1,dea*b[q]+y[q]),COLORRED;//画b2线
   STICKLINE(b3<0,macd*b[q]+y[q],y[q],0.1,0),COLORBLUE;//画b3的下竖线
   STICKLINE(b3>0,macd*b[q]+y[q],y[q],0.1,0),COLORMAGENTA;//画b3的上竖线

欢迎光临指标编写学习论坛 (http://www.shgm.net/)