通达信神偷牵牛源码
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;
