通达信画线主图公式附贴图而源码无加密下载

指标公式类型：通达信公式
公式推荐星级：
指标公式安全：已通过5款杀毒软件查杀，请放心下载！
公式更新时间：2020-03-09 09:04:08
指标公式标签：画线主图
公式运行环境： WinXP/Win7/Win8/Win10/Win All
指标公式语言：用简体中文编写

指标公式详细说明

好公式网（www.goodgongshi.com）告诉您：当前正要下载：通达信画线主图公式附贴图而源码无加密下载

通达信画线主图公式附贴图而源码无加密

懒人一个，不想一个一个手工画，自己写了一个，论坛里有好多同类的，喜欢的自己看吧，通达信的！

ur:=if(周期=1,13,if(周期=2,55,if(周期=3,144,5)));
lr:=if(周期=1,13,if(周期=2,55,if(周期=3,144,5)));
tc1:=if(h=hhv(h,8*ur),h,drawnull);
tc2:=const(barslast(tc1=h))+1;
upper:=const(if(tc2=1,h,ref(h,tc2-1)));
bc1:=if(l=llv(l,8*lr),l,drawnull);
bc2:=const(barslast(bc1=l))+1;
lower:=const(if(bc2=1,l,ref(l,bc2-1)));
lp:=currbarscount<=bc2 and l=lower;{低点定位}
hp:=currbarscount<=tc2 and h=upper;{高点定位}
nod:=(if(tc2>bc2,tc2,bc2)-if(tc2>bc2,bc2,tc2));{用时}
lr1:=forcast(c,nod+1);
np:=if(currbarscount<=max(bc2,tc2),const(if(min(tc2,bc2)=1,lr1,ref(lr1,min(tc2,bc2)-1))),drawnull),pointdot,color93bda8;{近点}
lr2:=slope(c,nod+1);
lr3:=const(if(min(tc2,bc2)=1,lr2,ref(lr2,min(tc2,bc2)-1)));
fp:=np-lr3*(nod),pointdot,color93bda8;{远点}
equ:=(np+fp)/2,pointdot,color93bda8;
ad:=abs(np-fp);{高差};
dbl:=barslast(bc1!=drawnull)+1;
dbh:=barslast(tc1!=drawnull)+1;
bsp:=if(bc2>tc2,dbl,dbh)-1;
lrl:=if(np>fp,fp+ad/nod*bsp,fp-ad/nod*bsp);
at1:=if(between(currbarscount,bc2,tc2) and h>lrl,h,lrl);
at2:=hhv(at1-lrl,max(bc2,tc2));
at3:=const(barslast(at1-lrl=at2));
at4:=const(if(at3=0,h,ref(h,at3)));
at5:=const(if(at3=0,at1-lrl,ref(at1-lrl,at3)));
atl:=lrl+at5;
ut1:=if(between(currbarscount,bc2,tc2) and l<lrl,l,lrl);
ut2:=hhv(lrl-ut1,max(bc2,tc2));
ut3:=const(barslast(lrl-ut1=ut2));
ut4:=const(if(ut3=0,h,ref(h,ut3)));
ut5:=const(if(ut3=0,lrl-ut1,ref(lrl-ut1,ut3)));
utl:=lrl-ut5;{好公式网-最好的股票公式网站 www.goodgongshi.com}
rh:=if(currbarscount>=min(bc2,tc2)-10,atl,const(ref(atl,min(bc2,tc2)-11)));{限制高}
rl:=if(currbarscount>=min(bc2,tc2)-10,utl,const(ref(utl,min(bc2,tc2)-11)));{限制低}
中轨:if(np>fp and 线控=1,if(lrl<=rh,lrl,drawnull),if(lrl>=rl,lrl,drawnull)),coloryellow,dotline;
上轨:if(np>fp and 线控=1,if(atl<=rh,atl,drawnull),if(atl>=rl,atl,drawnull)),colorcyan,dotline;
下轨:if(np>fp and 线控=1,if(utl<=rh,utl,drawnull),if(utl>=rl,utl,drawnull)),colorbrown,dotline;
n10:=if(大小压力切换=1,13,if(大小压力切换=2,55,if(大小压力切换=3,89,if(大小压力切换=0,144,drawnull))));
m:=intpart(3*n10/5);
aaa:=ref(h,m)=hhv(h,2*m+1);
qyy:=backset(aaa,m+1);
ccc:=filter(qyy,m) and h=hhv(h,m+1);
dddd:=barslast(ccc),nodraw;
gdtss:=if(ccc,currbarscount,0);
dingbutss:=if(dddd,ref(gdtss,dddd),gdtss);
gdcs11:=const(dingbutss);
dingbuts11:=ref(dingbutss,dddd+1);
gdcs22:=const(dingbuts11);
aa11:=ref(l,m)=llv(l,2*m+1);
qy11:=backset(aa11,m+1);
cc11:=filter(qy11,m) and l=llv(l,m+1);
dd11:=barslast(cc11);
ddtss:=if(cc11,currbarscount,0);
ddts11:=if(dd11,ref(ddtss,dd11),ddtss);
ddcs11:=const(ddts11);
ddts22:=ref(ddts11,dd11+1);
ddcs22:=const(ddts22);
fjtj:=ref(h,currbarscount=gdcs22)-ref(l,currbarscount=ddcs22);
fjtj2:=ref(h,currbarscount=gdcs11)-fjtj;
顶:drawline(currbarscount=gdcs22 and 线控=1,h,currbarscount=gdcs11,h,1),colorb48246,linethick1;
底:drawline(currbarscount=ddcs22 and 线控=1,l,currbarscount=ddcs11,fjtj2,1) color0000c0,linethick1;
n:=if(原点控制=1,21,if(原点控制=2,55,if(原点控制=3,144,if(原点控制=0,drawnull,13))));
a1:=ref(h,n)=hhv(h,2*n+1);
b1:=filter(a1,n);
c1:=backset(b1,n+1);
d1:=filter(c1,n);{高点}
r11:=backset(islastbar,barslast(d1)+1);
s11:=r11>ref(r11,1);
a2:=ref(l,n)=llv(l,2*n+1);
b2:=filter(a2,n);
c2:=backset(b2,n+1);
d2:=filter(c2,n);{低点}
t11:=backset(islastbar,barslast(d2)+1);
u11:=t11>ref(t11,1);
mm:=intpart(3*n/5);
a12:=ref(h,mm)=hhv(h,2*mm+1);
b12:=filter(a12,mm);
c12:=backset(b12,mm+1);
d12:=filter(c12,mm);{高点}
r112:=backset(islastbar,barslast(d12)+1); s112:=r112>ref(r112,1);
a22:=ref(l,mm)=llv(l,2*mm+1);
b22:=filter(a22,mm);
c22:=backset(b22,mm+1);
d22:=filter(c22,mm);{低点}
线1:drawline(d1 and 线控=1,h,s112,h,1),color00ff00,linethick1;
线2:drawline(d2 and 线控=1,l,s112,h,1),coloryellow,linethick1;
线3:drawline(d22 and 线控=1,l,s112,h,1),color0000ff,linethick1;
线4:drawline(d12 and 线控=1,h,s112,h,1),color808000,linethick1;
drawtext(s112 and 线控=1,h*1.01,'◎'),coloryellow;