根据壹瓣杺埖和棋盘法则老师原创改编的自动画线主图指标下载 通达信自动画线源码

指标公式详细说明

组合画线的一个主图 感谢壹瓣杺埖老师的源码还有棋盘法则原做的源码
如果有不妥的地方版主删贴
看的明白就用 用的时候顶下帖谢谢

源码:

局部低点预选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);
大值周期:=toprange(h);
低保留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);
高低点:if(极点保留=-1,l,if(极点保留=1,h,drawnull)),circledot,coloryellow,linethick5;
xa:=drawline(极点保留=-1,l,ref(极点保留,1)=-1,ref(l,1),1);
xb:=drawline(极点保留=1,h,ref(极点保留,1)=1,ref(h,1),1);
xas:=drawline(极点保留=-1,xb,ref(极点保留,1)=-1,ref(xb,1),1);
xbs:=drawline(极点保留=1,xa,ref(极点保留,1)=1,ref(xa,1),1);
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));
drawband(xb45,rgb(185,96,9),xb63,rgb(185,96,9));
drawkline(high,open,low,close);
curr:=currbarscount;
tch:=const(findhigh(h,0,hday*10,1));
gtt:=const(barslast(tch=h))+1;
sx跌h:=const(if(gtt=1,h,ref(h,gtt-1)));
bcl:=const(findlow(l,0,lday*10,1));
dtt:=const(barslast(bcl=l))+1;
sx涨l:=const(if(dtt=1,l,ref(l,dtt-1)));
涨点:=barssince(backset(islastbar,barslast(l=sx涨l)+1));
跌点:=barssince(backset(islastbar,barslast(h=sx跌h)+1));
最低:=if(调点=1,跌点,if(调点=2,涨点,if(调点=3,涨点,跌点)));
l斜率:=角度/if(c<300,1000,10);
最高:=if(调点=1,跌点,if(调点=2,涨点,if(调点=3,跌点,涨点)));
h斜率:=角度/if(c<300,1000,10);
im68:=((sx跌h-sx涨l)/6-(sx跌h-sx涨l)/8);
gh跌x:=sx跌h+(sx跌h-sx涨l)/8;
dl涨x:=sx涨l-(sx跌h-sx涨l)/8;
gtht:=if(dtt>gtt,dtt,gtt);
r:=abs(gtt-dtt);
drawband(if(curr<=gtht+r/8,sx跌h,drawnull),rgb(8,168,168),sx跌h,rgb(8,168,168));
drawband(if(curr<=gtht+r/8,sx涨l,drawnull),rgb(8,168,168),sx涨l,rgb(8,168,168));
drawband(if(curr<=gtht+r/8,(sx跌h+sx涨l)/2,drawnull),rgb(8,168,168),(sx跌h+sx涨l)/2,rgb(8,168,168));
{drawtext(curr=gtht,sx涨l-im68,'牛金画线'),color8899aa;}
天线:=sx跌h;
地线:=sx涨l;
k:=(天线-地线)/(if(跌点>=涨点,跌点,涨点)-if(跌点>=涨点,涨点,跌点));
上斜线1:=if(地线+const(l斜率*1.618)*最低>=地线,地线+const(l斜率*1.618)*最低,drawnull);
上斜线2:=if(地线+const(l斜率*1.000)*最低>=地线,地线+const(l斜率*1.000)*最低,drawnull);
上斜线3:=if(地线+const(l斜率*0.618)*最低>=地线,地线+const(l斜率*0.618)*最低,drawnull);
上斜线4:=if(地线+const(l斜率*0.382)*最低>=地线,地线+const(l斜率*0.382)*最低,drawnull);
上斜线5:=if(地线+const(l斜率*0.316)*最低>=地线,地线+const(l斜率*0.316)*最低,drawnull);
上斜线6:=if(地线+const(l斜率*0.250)*最低>=地线,地线+const(l斜率*0.250)*最低,drawnull);
上斜线7:=if(地线+const(l斜率*0.156)*最低>=地线,地线+const(l斜率*0.156)*最低,drawnull);
上斜线8:=if(地线+const(l斜率*0.092)*最低>=地线,地线+const(l斜率*0.092)*最低,drawnull);
上斜线9:=if(地线+const(l斜率*0.055)*最低>=地线,地线+const(l斜率*0.055)*最低,drawnull);
上9:if(上斜线9<=天线*1.05,上斜线9,drawnull)color8b2368;
上8:if(上斜线8<=天线*1.05,上斜线8,drawnull)color8b2368;
上7:if(上斜线7<=天线*1.05,上斜线7,drawnull)color8b2368;
上6:if(上斜线6<=天线*1.05,上斜线6,drawnull)color8b2368;
上5:if(上斜线5<=天线*1.05,上斜线5,drawnull)coloryellow;
上4:if(上斜线4<=天线*1.05,上斜线4,drawnull)color8b2368;
上3:if(上斜线3<=天线*1.05,上斜线3,drawnull)color8b2368;
上2:if(上斜线2<=天线*1.05,上斜线2,drawnull)color8b2368;
上1:if(上斜线1<=天线*1.05,上斜线1,drawnull)color8b2368;
下斜线1:=if(天线-const(h斜率*1.618)*最高<=天线,天线-const(h斜率*1.618)*最高,drawnull);
下斜线2:=if(天线-const(h斜率*1.000)*最高<=天线,天线-const(h斜率*1.000)*最高,drawnull);
下斜线3:=if(天线-const(h斜率*0.618)*最高<=天线,天线-const(h斜率*0.618)*最高,drawnull);
下斜线4:=if(天线-const(h斜率*0.382)*最高<=天线,天线-const(h斜率*0.382)*最高,drawnull);
下斜线5:=if(天线-const(h斜率*0.316)*最高<=天线,天线-const(h斜率*0.316)*最高,drawnull);
下斜线6:=if(天线-const(h斜率*0.250)*最高<=天线,天线-const(h斜率*0.250)*最高,drawnull);
下斜线7:=if(天线-const(h斜率*0.156)*最高<=天线,天线-const(h斜率*0.156)*最高,drawnull);
下斜线8:=if(天线-const(h斜率*0.092)*最高<=天线,天线-const(h斜率*0.092)*最高,drawnull);
下斜线9:=if(天线-const(h斜率*0.055)*最高<=天线,天线-const(h斜率*0.055)*最高,drawnull);
下9:if(下斜线9>=地线*0.95,下斜线9,drawnull),color996600;
下8:if(下斜线8>=地线*0.95,下斜线8,drawnull),color996600;
下7:if(下斜线7>=地线*0.95,下斜线7,drawnull),color996600;
下6:if(下斜线6>=地线*0.95,下斜线6,drawnull),color996600;
下5:if(下斜线5>=地线*0.95,下斜线5,drawnull),coloryellow;
下4:if(下斜线4>=地线*0.95,下斜线4,drawnull),color996600;
下3:if(下斜线3>=地线*0.95,下斜线3,drawnull),color996600;
下2:if(下斜线2>=地线*0.95,下斜线2,drawnull),color996600;
下1:if(下斜线1>=地线*0.95,下斜线1,drawnull),color996600;
最低1:=troughbars(l,之字幅度,1);
p:=横向调节;
n:=最低1;
数列:=intpart(log((1/sqrt(5))*(pow((1+sqrt(5))/2,n)-pow((1-sqrt(5))/2,n)))/pow(n*p,1/5)),nodraw;
低价:=ref(l,barslast(最低1=0));
高价:=const(hhv(h,最低1))*1.05;
前低:drawline(最低1=0,l,islastbar,低价,0)colorlimagenta,dotline;
前高低:=hhv(h,最低1+1)=h;
统计:=cross(count(前高低,最低1)=4,0.5);
kk:=barslast(统计);
pp:=if(ref(c,barslast(cross(count(前高低,最低1)=3,0.5)))>c,ref(c,barslast(cross(count(前高低,最低)=3,0.5))),h);
基线:=ref(pp,barslast(统计)),nodraw;
基差:=基线-低价,nodraw;
{横线加字}
一0:=低价+(基差*0.618*1*pow(1.1,1-1));
一:if(currbarscount<=const(kk) and 一0<=高价,一0,drawnull),dotline,coloraaaaaa;
drawtext(currbarscount=const(kk)+5,const(一),'一'),colorffffff;
二0:=低价+(基差*0.618*2*pow(1.1,2-1));
二:if(currbarscount<=const(kk) and 二0<=高价,二0,drawnull),dotline,coloraaaaaa;
{drawtext(currbarscount=const(kk)+5,const(二),'二'),colorffffff;}
三0:=低价+(基差*0.618*3*pow(1.1,3-1));
三:if(currbarscount<=const(kk) and 三0<=高价,三0,drawnull),dotline,coloraaaaaa;
drawtext(currbarscount=const(kk)+5,const(三),'三'),colorffffff;
四0:=低价+(基差*0.618*4*pow(1.1,4-1));
四:if(currbarscount<=const(kk) and 四0<=高价,四0,drawnull),dotline,coloraaaaaa;
{drawtext(currbarscount=const(kk)+5,const(四),'四'),colorffffff;}
五0:=低价+(基差*0.618*5*pow(1.1,5-1));
五:if(currbarscount<=const(kk) and 五0<=高价,五0,drawnull),dotline,coloraaaaaa;
drawtext(currbarscount=const(kk)+5,const(五),'五'),colorffffff;
六0:=低价+(基差*0.618*6*pow(1.1,6-1));
六:if(currbarscount<=const(kk) and 六0<=高价,六0,drawnull),dotline,coloraaaaaa;
{drawtext(currbarscount=const(kk)+5,const(六),'六'),colorffffff;}
七0:=低价+(基差*0.618*7*pow(1.1,7-1));
七:if(currbarscount<=const(kk) and 七0<=高价,七0,drawnull),dotline,coloraaaaaa;
drawtext(currbarscount=const(kk)+5,const(七),'七'),colorffffff;
八0:=低价+(基差*0.618*8*pow(1.1,8-1));
八:if(currbarscount<=const(kk) and 八0<=高价,八0,drawnull),dotline,coloraaaaaa;
{drawtext(currbarscount=const(kk)+5,const(八),'八'),colorffffff;}
九0:=低价+(基差*0.618*9*pow(1.1,9-1));
九:if(currbarscount<=const(kk) and 九0<=高价,九0,drawnull),dotline,coloraaaaaa;
drawtext(currbarscount=const(kk)+5,const(九),'九'),colorffffff;
十0:=低价+(基差*0.618*10*pow(1.1,10-1));
十:if(currbarscount<=const(kk) and 十0<=高价,十0,drawnull),dotline,coloraaaaaa;
{drawtext(currbarscount=const(kk)+5,const(十),'十'),colorffffff;}
ii0:=低价+(基差*0.618*11*pow(1.1,11-1));
ii:if(currbarscount<=const(kk) and ii0<=高价,ii0,drawnull),dotline,coloraaaaaa;{竖线加字}
stickline(currbarscount<=const(kk) and 数列!=ref(数列,1),低价,高价,0.00001,-1),coloraaaaaa;
drawtext(currbarscount=const(kk)+5,const(ii),'ii'),colorffffff;
drawtext(currbarscount<=const(kk) and 数列!=ref(数列,1)
and 数列=1 ,高价*0.98,'一'),colorffff00;
{drawtext(currbarscount<=const(kk) and 数列!=ref(数列,1)
and 数列=2 ,高价*0.98,'二'),colorffff00;}
drawtext(currbarscount<=const(kk) and 数列!=ref(数列,1)
and 数列=3 ,高价*0.98,'三'),colorffff00;
{drawtext(currbarscount<=const(kk) and 数列!=ref(数列,1)
and 数列=4 ,高价*0.98,'四'),colorffff00;}
drawtext(currbarscount<=const(kk) and 数列!=ref(数列,1)
and 数列=5 ,高价*0.98,'五'),colorffff00;
{drawtext(currbarscount<=const(kk) and 数列!=ref(数列,1)
and 数列=6 ,高价*0.98,'六'),colorffff00;}
drawtext(currbarscount<=const(kk) and 数列!=ref(数列,1)
and 数列=7 ,高价*0.98,'七'),colorffff00;
{drawtext(currbarscount<=const(kk) and 数列!=ref(数列,1)
and 数列=8 ,高价*0.98,'八'),colorffff00;}
drawtext(currbarscount<=const(kk) and 数列!=ref(数列,1)}
and 数列=9 ,高价*0.98,'九'),colorffff00;
{drawtext(currbarscount<=const(kk) and 数列!=ref(数列,1)
and 数列=10 ,高价*0.98,'十'),colorffff00;}
{drawtext(currbarscount<=const(kk) and 数列!=ref(数列,1)}
{and 数列=11 ,高价*0.98,'十一'),colorffff00;
{drawtext(currbarscount<=const(kk) and 数列!=ref(数列,1)
and 数列=12 ,高价*0.98,'十二'),colorffff00;};
 

指标公式下载地址

上一指标公式：每次都抄底指标附效果图下载 通达信抄底

下一指标公式：共振点选股副图附图指标下载 通达信选股源码

相关通达信公式推荐

指标公式下载注意

☉ 好公式网发布的指标公式主要用于软件技术面分析，仅供参考，勿用于实际操作，据此操作风险自负！

☉ 解压密码：www.goodgongshi.com 就是好公式网域名，希望大家看清楚，切勿输错。

☉ tnc和tni格式指标公式，仅可以用通达信软件引入使用，例如可以用通达信软件引入使用指标公式；

☉ tne格式指标公式，仅可以用通达信软件公式编辑器5.0版导入，高版本兼容低版本；

☉ fnc格式指标公式，可以用大智慧软件新一代高速行情分析系统股票软件使用，少部分可以用分析家软件引入使用；

☉ alg格式指标公式，仅仅可以用飞狐交易师软件引入使用；exp格式指标公式，仅可以用大智慧经典版软件引入使用；

☉ hxf格式指标公式，仅可以用同花顺软件引入使用。

☉ 如果您发现下载软件链接错误，请联系管理员报告错误。

☉ 好公式网欢迎各位网友帮忙宣传转发本站网址，有您的支持，我们会做得更好！

☉ 本文根据壹瓣杺埖和棋盘法则老师原创改编的自动画线主图指标下载 通达信自动画线源码仅供学习研究。