通达信三箭齐发主图指标(源码)

DRAWGBK(O>C,RGB(0,0,80),RGB(0,40,0),0,'01',0);
{K线}
STICKLINE(CLOSE>OPEN OR CLOSE=OPEN AND CLOSE>REF(CLOSE,1),LOW,HIGH,0.0,0),COLORRED;
STICKLINE(CLOSE<OPEN OR CLOSE=OPEN AND CLOSE<=REF(CLOSE,1),LOW,HIGH,0.0,0),COLORCYAN;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,3,0 ),COLOR008800;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,2,0 ),COLOR00AA00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,1,0 ),COLOR00DD00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,0,0 ),COLOR00FF00;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0) ,COLOR000088;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2,0) ,COLOR0000AA;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1,0) ,COLOR0000DD;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,0,0) ,COLOR0000FF;
{1.MA5趋势}
MA5:MA(C,5),COLOR00FF00,DOTLINE;
IF(MA5>REF(MA5,1),MA5,DRAWNULL),COLORRED,LINETHICK3;
{2.MACD改版-12.26}
DIF1:=WMA(CLOSE,12);
DIF2:=WMA(CLOSE,26);
MACDG:(3*DIF1-2*DIF2),COLOR00FFFF,DOTLINE;
IF(MACDG>REF(MACDG,1),MACDG,DRAWNULL),COLOR00FFFF,LINETHICK3;
{MACD升势}
{3.KDJ-18.3.3}
RSV:=(CLOSE-LLV(LOW,18))/(HHV(HIGH,18)-LLV(LOW,18))*MA5/10;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J18:=(3*K-2*D);
J:FORCAST(J18,18)+MA5,COLOR0000FF,DOTLINE;
IF(J>REF(J,1),J,DRAWNULL),COLORFF00FF,LINETHICK3;
{4.买卖}
KC:=FORCAST(((2*C+H+L)/4*0.618+C*0.382),3);
AAX:=(KC-MA(KC,9))/MA(KC,9)*100;
VAR0:=MIN(EXIST(KC,55),9);
AAX1:=EMA(AAX,VAR0)*VAR0;
AAX2:=MA(AAX1,3);
AAX3:=MA(AAX1,5);
DRAWTEXT(AAX3>10 AND AAX1<REF(AAX1,1) AND CROSS(AAX2,AAX1) ,H*1.12,'卖'),COLOR00FFFF,LINETHICK1;
DRAWTEXT(AAX3>10 AND AAX1<REF(AAX1,1) AND CROSS(AAX2,AAX1) ,H*1.1,'◆'),COLOR0000FF,LINETHICK1;
DRAWTEXT(AAX3>10 AND AAX1<REF(AAX1,1) AND CROSS(AAX2,AAX1),HIGH*1.08,'◇'),LINETHICK3,COLOR00FF00;
AA05:=MA(C,5);
MM5:=(C-AA05)/AA05*100;
BB05:=ATAN((AA05/REF(AA05,1)-1)*100)*180/3.1416;
NN5:=SMA(EMA((AA05-REF(AA05,1))/REF(AA05,1),3)*100,3,1);
NNNN5:=EMA((NN5-REF(NN5,1)),3),LINETHICK0;
AA10:=MA(C,10);
AA20:=MA(C,20);
BB10:=ATAN((AA10/REF(AA10,1)-1)*100)*180/3.1416;
AA30:=MA(C,30);
MM30:=(C-AA30)/AA30*100;
VAR1:=(AA20-AA30)>REF((AA20-AA30),1) AND AA20>REF(AA20,1) AND AA30>REF(AA30,1);
VAR2:=(AA30-AA20)<REF((AA30-AA20),1) AND AA20<REF(AA20,1) AND AA30<REF(AA30,1);
BB30:=ATAN((AA30/REF(AA30,1)-1)*100)*180/3.1416;
强势:=FILTER(BB30>30 AND BB10>45 AND CROSS(BB05,60),10);
加仓:=FILTER(COUNT(CROSS(BB05,30),5)>=1 AND AA05>REF(AA05,1) AND MM30>REF(MM30,1) AND AA10>REF(AA10,1)
AND NNNN5>REF(NN5,1) AND NN5>REF(NN5,1) ,10) ;
MR:=COUNT(CROSS(MM30,0),3)>=1 AND MM30>REF(MM30,1) AND AA05>REF(AA05,1) AND (C/REF(C,1)-1)*100>5 AND REF(C,1)<AA30;
买入:=FILTER(MR,10);
DRAWTEXT((买入),LOW*0.945,'⊙'),LINETHICK2,COLORYELLOW;
DRAWTEXT((买入),LOW*0.965,'⊙'),LINETHICK2,COLORYELLOW;
DRAWTEXT((买入),LOW*0.985,'⊙'),LINETHICK2,COLORYELLOW;
DRAWTEXT((加仓),LOW*0.985,'⊙'),LINETHICK2,COLORWHITE;
DRAWTEXT((加仓),LOW*0.965,'⊙'),LINETHICK2,COLOR00FF00;
DRAWTEXT((加仓),LOW*0.945,'⊙'),LINETHICK2,COLORWHITE;
DRAWTEXT((强势),LOW*0.985,'⊙'),LINETHICK2,COLORRED;
DRAWTEXT((强势),LOW*0.965,'⊙'),LINETHICK2,COLORRED;