修改的飞狐版,但飞狐不能用“drawline”做变量,只能改作“linevalue”趋势线,造成的后果就是只能显示最后一组图形,无法观看历史,算是个半成品吧
通达信原版地址:【简睿角力】—简单呈现回调法则{源码 主图}
飞狐源码:
{[简睿角力]--飞狐版--loy518改---“壹瓣杺埖”原创}
{缠论高低点}
局部低点预选a:=backset(llv(l,5)<ref(llv(l,4),1),4);
局部低点预选b:=backset(局部低点预选a=0 and ref(局部低点预选a,1)=1,2);
局部低点预选c:=if(局部低点预选b=1 and ref(局部低点预选b,1)=0,-1,0);
局部高点预选a:=backset(hhv(h,5)>ref(hhv(h,4),1),4);
局部高点预选b:=backset(局部高点预选a=0 and ref(局部高点预选a,1)=1,2);
局部高点预选c:=if(局部高点预选b=1 and ref(局部高点预选b,1)=0,1,0);
缺口判断:=if(l>ref(h,1),1,if(h<ref(l,1),-1,0));
距前高天:=barslast(局部高点预选c=1);
距前低天:=barslast(局部低点预选c=-1);
{小值周期:lowrange(l),nodraw;
大值周期:toprange(h),nodraw;}
最低:=l;
低价:=最低[sysparam(1)];
最高:=h;
高价:=最高[sysparam(1)];
小值周期:barslast(l<低价)-1,linethick;
大值周期:barslast(h>高价)-1,linethick;
低保留aa:=if(局部低点预选c=-1 and ref(距前高天,1)>ref(距前低天,1) and llv(l,距前高天+1)<ref(llv(l,距前高天+1),1),-1,0);
低保留ab:=if(局部低点预选c=-1 and ref(距前高天,1)<=ref(距前低天,1) and (距前高天>=4 or llv(缺口判断,距前高天)=-1 or llv(l,距前低天+2)<ref(llv(l,距前低天+1),1)),-1,0);
低保留s:=if((低保留aa=-1 or 低保留ab=-1) and l<ref(h,距前高天+1),-1,0);
预判:=if((距前低天<4 and hhv(缺口判断,距前低天)<>1) or ref(低保留s,距前低天)=0,1,0);
判断:=if(局部高点预选c=1 and ref(距前低天,1)<=ref(距前高天,1) and 预判=1 and 大值周期>ref(小值周期,距前低天+1) and 大值周期>ref(小值周期,距前低天) and 大值周期>ref(大值周期,距前高天),1,0);
高保留a:=if(局部高点预选c=1 and ref(距前低天,1)>ref(距前高天,1) and hhv(h,距前低天+1)>ref(hhv(h,距前低天+1),1),1,0);
高保留b:=if(局部高点预选c=1 and ref(距前低天,1)<=ref(距前高天,1) and ref(低保留s,距前低天)=-1 and (距前低天>=4 or hhv(缺口判断,距前低天)=1),1,0);
高保留:=if((高保留a=1 or 高保留b=1 or 判断=1) and h>ref(l,距前低天+1),1,0);
预判a:=if((距前高天<4 and hhv(缺口判断,距前高天)<>1) or ref(高保留,距前高天)=0,1,0);
判断a:=if(局部低点预选c=-1 and ref(距前高天,1)<=ref(距前低天,1) and 预判a=1 and 小值周期>ref(大值周期,距前高天+1) and 小值周期>ref(大值周期,距前高天) and 小值周期>ref(小值周期,距前低天),-1,0);
低保留a:=if(局部低点预选c=-1 and ref(距前高天,1)>ref(距前低天,1) and llv(l,距前高天+1)<ref(llv(l,距前高天+1),1),-1,0);
低保留b:=if(局部低点预选c=-1 and ref(距前高天,1)<=ref(距前低天,1) and (距前高天>=4 or llv(缺口判断,距前高天)=-1 or 判断a=-1),-1,0);
低保留:=if((低保留a=-1 or 低保留b=-1) and l<ref(h,距前高天+1),-1,0);
距前高天a:=barslast(高保留=1);
距前低天a:=barslast(低保留=-1);
预判x:=if((距前低天a<4 and hhv(缺口判断,距前低天a)<>1) or ref(低保留,距前低天a)=0,1,0);
判断x:=if(局部高点预选c=1 and ref(距前低天a,1)<=ref(距前高天a,1) and 预判x=1 and 大值周期>ref(小值周期,距前低天a+1) and 大值周期>ref(小值周期,距前低天a) and 大值周期>ref(大值周期,距前高天a),1,0);
高保留xa:=if(局部高点预选c=1 and ref(距前低天a,1)>ref(距前高天a,1) and hhv(h,距前低天a+1)>ref(hhv(h,距前低天a+1),1),1,0);
高保留xb:=if(局部高点预选c=1 and ref(距前低天a,1)<=ref(距前高天a,1) and ref(低保留,距前低天a)=-1 and (距前低天a>=4 or hhv(缺口判断,距前低天a)=1),1,0);
高保留x:=if((高保留xa=1 or 高保留xb=1 or 判断x=1) and h>ref(l,距前低天a+1),1,0);
预判xa:=if((距前高天a<4 and hhv(缺口判断,距前高天a)<>1) or ref(高保留xa,距前高天a)=0,1,0);
判断xa:=if(局部低点预选c=-1 and ref(距前高天a,1)<=ref(距前低天a,1) and 预判xa=1 and 小值周期>ref(大值周期,距前高天a+1) and 小值周期>ref(大值周期,距前高天a) and 小值周期>ref(小值周期,距前低天a),-1,0);
低保留xa:=if(局部低点预选c=-1 and ref(距前高天a,1)>ref(距前低天a,1) and llv(l,距前高天a+1)<ref(llv(l,距前高天a+1),1),-1,0);
低保留xb:=if(局部低点预选c=-1 and ref(距前高天a,1)<=ref(距前低天a,1) and (距前高天a>=4 or llv(缺口判断,距前高天a)=-1 or 判断xa=-1),-1,0);
低保留x:=if((低保留xa=-1 or 低保留xb=-1) and l<ref(h,距前高天a+1),-1,0);
距前高天ya:=barslast(高保留x=1);
距前低天ya:=barslast(低保留x=-1);
预判yx:=if((距前低天ya<4 and hhv(缺口判断,距前低天ya)<>1) or ref(低保留x,距前低天ya)=0,1,0);
判断yx:=if(局部高点预选c=1 and ref(距前低天ya,1)<=ref(距前高天ya,1) and 预判yx=1 and 大值周期>ref(小值周期,距前低天ya+1) and 大值周期>ref(小值周期,距前低天ya) and 大值周期>ref(大值周期,距前高天ya),1,0);
高保留yxa:=if(局部高点预选c=1 and ref(距前低天ya,1)>ref(距前高天ya,1) and hhv(h,距前低天ya+1)>ref(hhv(h,距前低天ya+1),1),1,0);
高保留yxb:=if(局部高点预选c=1 and ref(距前低天ya,1)<=ref(距前高天ya,1) and ref(低保留x,距前低天ya)=-1 and (距前低天ya>=4 or hhv(缺口判断,距前低天ya)=1),1,0);
高保留yx:=if((高保留yxa=1 or 高保留yxb=1 or 判断yx=1) and h>ref(l,距前低天ya+1),1,0);
预判yxa:=if((距前高天ya<4 and hhv(缺口判断,距前高天ya)<>1) or ref(高保留yxa,距前高天ya)=0,1,0);
判断yxa:=if(局部低点预选c=-1 and ref(距前高天ya,1)<=ref(距前低天ya,1) and 预判yxa=1 and 小值周期>ref(大值周期,距前高天ya+1) and 小值周期>ref(大值周期,距前高天ya) and 小值周期>ref(小值周期,距前低天ya),-1,0);
低保留yxa:=if(局部低点预选c=-1 and ref(距前高天ya,1)>ref(距前低天ya,1) and llv(l,距前高天ya+1)<ref(llv(l,距前高天ya+1),1),-1,0);
低保留yxb:=if(局部低点预选c=-1 and ref(距前高天ya,1)<=ref(距前低天ya,1) and (距前高天ya>=4 or llv(缺口判断,距前高天ya)=-1 or 判断yxa=-1),-1,0);
低保留yx:=if((低保留yxa=-1 or 低保留yxb=-1) and l<ref(h,距前高天ya+1),-1,0);
aaad:=if(高保留yx=1 and 低保留yx=-1 and h>ref(h,ref(距前高天ya,1)+2),1,if(高保留yx=1 and 低保留yx=-1 and l<ref(l,ref(距前低天ya,1)+2),-1,0));
极点保留:=if(aaad=0,高保留yx+低保留yx,aaad);
xa:=linevalue(极点保留=-1,l,ref(极点保留,1)=-1,ref(l,1),0,0);
xb:=linevalue(极点保留=1,h,ref(极点保留,1)=1,ref(h,1),0,0);
xas:=linevalue(极点保留=-1,xb,ref(极点保留,1)=-1,ref(xb,1),0,0);
xbs:=linevalue(极点保留=1,xa,ref(极点保留,1)=1,ref(xa,1),0,0);
xa45:=(xa+xas)/2; xb45:=(xb+xbs)/2;
xa63:=(xas-xa)*3/4+xa; xb63:=xb-(xb-xbs)*3/4;
//drawband(xa45,rgb(0,150,100),xa63,rgb(0,150,100));
fillrgn(xa45>xa63,xa45,xa63),color649600;
fillrgn(xa45<xa63,xa45,xa63),color649600;
//drawband(xb45,rgb(185,96,9),xb63,rgb(185,96,9));
fillrgn(xb45>xb63,xb45,xb63),color0960b9;
fillrgn(xb45<xb63,xb45,xb63),color0960b9;
局部极点:if(极点保留=-1,l,if(极点保留=1,h,0)),circledot,coloryellow,linethick;
partline(极点保留=-1,l),circledot,coloryellow,linethick5;
partline(极点保留=1,h),circledot,coloryellow,linethick5;
压1:if(between(xa45,xb45,xb63),xa45,0),color008800,linethick;
partline(between(xa45,xb45,xb63),xa45),color008800;
压2:if(between(xa63,xb45,xb63),xa63,0),color008800,linethick;
partline(between(xa63,xb45,xb63),xa63),color008800;
kline(o,h,l,c,0);
上一指标公式:艾尔德射线界面真漂亮公式 飞狐射线艾尔指标 源码
☉ 好公式网发布的指标公式主要用于软件技术面分析,仅供参考,勿用于实际操作,据此操作风险自负!
☉ 解压密码:www.goodgongshi.com 就是好公式网域名,希望大家看清楚,切勿输错。
☉ tnc和tni格式指标公式,仅可以用通达信软件引入使用,例如可以用通达信软件引入使用指标公式;
☉ tne格式指标公式,仅可以用通达信软件公式编辑器5.0版导入,高版本兼容低版本;
☉ fnc格式指标公式,可以用大智慧软件新一代高速行情分析系统股票软件使用,少部分可以用分析家软件引入使用;
☉ alg格式指标公式,仅仅可以用飞狐交易师软件引入使用;exp格式指标公式,仅可以用大智慧经典版软件引入使用;
☉ hxf格式指标公式,仅可以用同花顺软件引入使用。
☉ 如果您发现下载软件链接错误,请联系管理员报告错误。
☉ 好公式网欢迎各位网友帮忙宣传转发本站网址,有您的支持,我们会做得更好!
☉ 本文简睿角力版公式 飞狐指标 源码仅供学习研究。