通达信神偷牵牛源码

N:=5;N1:=13;N2:=70;N3:=21;
 M2:=EMA(CLOSE,8),COLORCC6600;
 M3:=EMA(M2,12),LINETHICK2,COLORCC99FF;

DRAWBAND(M2,RGB(180,0,100),M3,RGB(0,80,120));
 M4:EMA(M2,45),COLORWHITE;
 VAR1:=EMA(M3,45);
 VAR2:=(CLOSE+HIGH+LOW)/3;
 VAR3:=EMA(VAR2,10);
 VAR4:=REF(VAR3,1);
 VAR5:=(REF(HIGH,1)+REF(LOW,1))/2;
 VAR6:=MA(CLOSE,N)+2*STD(CLOSE,N);
 VAR7:=REF(CLOSE,1);
 VAR8:=(SMA(MAX(CLOSE-VAR7,0),N1,1))/(SMA(ABS(CLOSE-VAR7),N1,1))*100;
 VAR9:=CROSS(N2,VAR8);
 VARA:=FILTER(VAR9,4);
 {DRAWICON(VARA,HIGH*1.043,3);}
 DRAWICON(CROSS(VAR8,30),L*0.96,9);
 DRAWTEXT(VARA,HIGH*1.05,' ←卖'),COLORGREEN ;

TTR:=MAX(MAX(HIGH-LOW,ABS(REF(M3,1)-HIGH)),ABS(REF(M3,1)-LOW));
 VAR0:=EMA(EMA(EMA(CLOSE,2),2),2);
 ATR:=MA(TTR,13);
 VAR11:=REF(CLOSE,1)-REF(ATR,1);
牵牛线:HHV(VAR0,13)*0.98,LINETHICK2,COLOR004080;
 HHV(VAR0,3)*0.98,LINETHICK2,COLORYELLOW;
下降通道阻击线:EMA(牵牛线,99)*0.91,COLORBLUE ;
下降通道阻击线2:EMA(牵牛线,89)*0.72,COLORGREEN ;
 DRAWTEXT(ISLASTBAR,下降通道阻击线,'【阻击线1】'),COLORBLUE;
 DRAWTEXT(ISLASTBAR,下降通道阻击线2,'【阻击线2】'),COLORGREEN ;
 {涨停}
STICKLINE(CLOSE>REF(CLOSE,1)*1.0985 AND CLOSE=HIGH,CLOSE,OPEN,4,-1),COLOR00FFFF;
 {跌停}
STICKLINE(CLOSE<REF(CLOSE,1)*0.9015 AND CLOSE=LOW,CLOSE,OPEN,4,-1),COLORGREEN;
 STICKLINE(OPEN>CLOSE ,CLOSE ,OPEN,3,0 ),COLORFF2020;
 STICKLINE(OPEN>CLOSE ,CLOSE ,OPEN,3,0 ),COLORFF2020;
 STICKLINE(OPEN>CLOSE ,CLOSE ,OPEN,2,0 ),COLORFFFF00;
 STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,2 ,0 ),COLOR2020FF;
 STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,1 ,0 ),COLORB0B0FF;
 STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,0.5 ,0 ),COLOR00FFFF;
 STICKLINE(CLOSE>=OPEN,OPEN,LOW,0,0 ),COLOR00FFFF;
 STICKLINE(CLOSE>=OPEN,CLOSE,HIGH,0,0 ),COLOR00FFFF;
 STICKLINE(OPEN>=CLOSE,CLOSE,LOW,0,0 ),COLORFFFF80;
 STICKLINE(OPEN>=CLOSE,OPEN,HIGH,0,0 ),COLORFFFF80;
 {2}
 STICKLINE(C>O,C,O,3,0),COLOR0000AA;
 STICKLINE(C<O,C,O,3,0),COLOR998855;
 STICKLINE(C>O,C,O,1,0),COLOR0000CC;
 STICKLINE(C>O,C,O,3,0),COLOR0000DD;
 STICKLINE(C>O,H,L,0,0),COLOR0000FF;
 STICKLINE(C<O,C,O,3,0),COLORBBAA77;
 STICKLINE(C<O,C,O,1,0),COLORDDCC99;
 STICKLINE(C<O,H,L,0,0),COLORFFEEBB;