通达信缠论指标公式

1、通达信缠论指标公式通达信缠论指标公式n1:1,100,10;n2:1,100,10;disp:=1,3,2;n1:=10;n2:=10;disp:=2;k:=if(period=5,1,日if(period=6,1,周if(period=7,1,月if(period=8,1,多分钟if(period=9,1,多日if(period=10,1,季if(period=11,2,年if(period=4,1,60fif(period=3,1,30fif(period=2,1,15fif(period=1,15f,11f)/10;p1:=peak(1,k*n1,1);p2:=peak(1,k*n1,2

2、);wp1:=peakbars(1,k*n1,1);wp2:=peakbars(1,k*n1,2);t1:=trough(2,k*n2,1);t2:=trough(2,k*n2,2);wt1:=troughbars(2,k*n2,1);wt2:=troughbars(2,k*n2,2);tj1:=p1>t1 and p2>t2 ;zd:=max(t1,t2);zg:=min(p1,p2);ll:=min(t1,t2);hh:=max(p1,p2);tj2:=filter(zg>zd,2);tj3:=zg=ref(zg,barslast(tj2) or zd=ref(zd,ba

3、rslast(tj2);tj4:=tj1tj5:=between(zd,ref(zd,ref(barslast(tj4),1),ref(zg,ref(barslast(tj4),1); tj6:=between(zg,ref(zd,ref(barslast(tj4),1),ref(zg,ref(barslast(tj4),1); tj7:=zg>ref(zg,ref(barslast(tj4),1)tj8:=tj4zsd:=if(tj8,zd,drawnull);zsg:=if(tj8,zg,drawnull);zsh:=if(tj8,hh,drawnull);zsl:=if(tj8,l

4、l,drawnull);stickline(tj8,zsh,zsl,0,-1),colormagenta;stickline(tj8,zsd,zsg,if(disp=1,3,0),1),colormagenta;drawtext(disp=2,zsh,'中枢'),colorwhite;中枢高:ployline(disp=2,ref(zsd,barslast(tj8),circledot,colorlired;中枢低:ployline(disp=2,ref(zsg,barslast(tj8),circledot,colorligreen;中枢最高:ployline(disp=2,

5、ref(zsh,barslast(tj8),pointdot,colorred;中枢最低:ployline(disp=2,ref(zsl,barslast(tj8),pointdot,colorgreen;趋势高:ployline(disp=3,zig(1,k*n1),colorliblue;趋势低:ployline(disp=3,zig(2,k*n2),colorliblue;部分低点预选a:=backset(llv(l,5)ref(hhv(h,4),1),4);部分高点预选b:=backset(部分高点预选a=0 and ref(部分高点预选a,1)=1,2);部分高点预选c:=if(部分

6、高点预选b=1 and ref(部分高点预选b,1)=0,1,0);缺口推断:=if(l>ref(h,1),1,if(href(距前低天,1) and llv(l,距前高天+1)=4 or llv(缺口推断,距前高天)=-1 or llv(l,距前低天+2)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),

7、1,0);高保存b:=if(部分高点预选c=1 and ref(距前低天,1)=4 or hhv(缺口推断,距前低天)=1),1,0);高保存:=if(高保存a=1 or 高保存b=1 or 推断=1) and h>ref(l,距前低天+1),1,0);预判a:=if(距前高天ref(大值周期,距前高天+1) and 小值周期>ref(大值周期,距前高天) and 小值周期>ref(小值周期,距前低天),-1,0);低保存a:=if(部分低点预选c=-1 and ref(距前高天,1)>ref(距前低天,1) and llv(l,距前高天+1)=4 or llv(缺口推

8、断,距前高天)=-1 or 推断a=-1),-1,0);低保存:=if(低保存a=-1 or 低保存b=-1) and lref(小值周期,距前低天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)=4 or hhv(缺口推断,距前低天a)=

9、1),1,0);高保存x:=if(高保存xa=1 or 高保存xb=1 or 推断x=1) and h>ref(l,距前低天a+1),1,0); 预判xa:=if(距前高天aref(大值周期,距前高天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)=4 or llv(缺口推断,距前高天a)=-1 or 推断xa=-1),-1,0);低保存x:=if(低保存xa=

10、-1 or 低保存xb=-1) and lref(小值周期,距前低天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)=4 or hhv(缺口推断,距前低天ya)=1),1,0);高保存yx:=if(高保存yxa=1 or

11、 高保存yxb=1 or 推断yx=1) and h>ref(l,距前低天ya+1),1,0);预判yxa:=if(距前高天yaref(大值周期,距前高天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)=4 or llv(缺口推断,距前高天ya)=-1 or 推断yxa=-1),-1,0);低保存yx:=if(低保存yxa=-1 or 低保存yxb

12、=-1) and lref(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; drawline(极点保存=-1,部分极点,极点保存=1,部分极点,0)colorlired;drawline(极点保存=1,部分极点,极点保存=-1,部分极点,0)coloryellow;dd1:=barslast(abs(极点保存)!=