希望高手通达信薛斯通道主图改成大智慧薛斯通道主图先感谢!
[大智慧] 3355 0
先感谢
{参数 mm:2 120 13 n:80,120,102 m:2,20,7 n2: 2 90 14} aa:=ma((2*close+high+low)/4,5); 短顶:=aa*n/100,linethick1; 短底:aa*(200-n)/100,linethick1,colorff00ff; drawtext(currbarscount=1,短底,'__短底'),colorff00ff; cc:=abs((2*close+high+low)/4-ma(close,20))/ma(close,20); dd:=dma(close,cc); 中顶:(1+m/100)*dd,linethick1,colorff9150; 中底:(1-m/100)*dd,linethick1,coloryellow; drawtext(currbarscount=1,中顶,'__中顶'),colorff9150; drawtext(currbarscount=1,中底,'__中底'),coloryellow; var4x:=expma(close,9); 长底:expma(var4x*0.86,5),colorgreen; drawtext(currbarscount=1,长底,'__长底'),colorgreen; {dmi} mtr:=expmema(max(max(high-low,abs(high-ref(close,1))),abs(ref(close,1)-low)),n2); hd :=high-ref(high,1); ld :=ref(low,1)-low; dmp:=expmema(if(hd>0&&hd>ld,hd,0),n2); dmm:=expmema(if(ld>0&&ld>hd,ld,0),n2); pdi:= dmp*100/mtr; mdi:= dmm*100/mtr; adx:= expmema(abs(mdi-pdi)/(mdi+pdi)*100,mm); adxr:=expmema(adx,mm); {cci} typ:=(high+low+close)/3; ccia:=(typ-ma(typ,n2))/(0.015*avedev(typ,n2)); {金币} drawtext(cross(mdi,25),l,'★信号'),coloryellow; 跌穿中轨:=o<短底 and o<中底 and o>长底; 跌穿长规:=o<长底; 红k线:=c>o; 带上下影线:=h>o and h>c and l<o and l<c; 山包:=adx>60; 低位拐弯:=ccia<-10 and ccia-ref(ccia,1)>1; drawtext(跌穿中轨 and 红k线 and 低位拐弯,l,'___¥小金币'),colormagenta; drawtext(跌穿长规 and 红k线 and 低位拐弯,l,'___$大金币'),colorred; |