|
以下是通达信黛蛾背驰主图源码（无源码的请下载附件导入）
上轨:MA(REF(HHV(CLOSE,30),1),2),COLORLIRED,LINETHICK2;
下轨:MA(REF(LLV(CLOSE,30),1),2),COLORCD6C32,LINETHICK2;
XA_1:=IF(CLOSE>REF(CLOSE,1),(2*CLOSE+2*HIGH+OPEN+LOW)/6,(2*OPEN+2*LOW+CLOSE+HIGH)/6);
XA_2:=SMA(CLOSE,3,1);
趋势:SMA(XA_2,3,1),COLORCYAN;
短线:MA(SMA(XA_1,5,1),3),COLOR60A9B9,LINETHICK2;
XA_3:=MA(SMA(XA_1,21,1),8);
长线:MA(SMA(XA_1,60,1),11),POINTDOT,COLORWHITE,LINETHICK3;
IF(XA_3<REF(XA_3,1),XA_3,DRAWNULL),CROSSDOT,COLORBLUE;
均角:ATAN((短线/REF(短线,1)-1)*100)*180/3.141159,NODRAW;
XA_4:=LLV(LOW,10);
XA_5:=HHV(HIGH,25);
XA_6:=EMA((CLOSE-XA_4)/(XA_5-XA_4)*4,4)*20;
XA_7:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
XA_8:=SMA(XA_7,3,1);
XA_9:=SMA(XA_8,3,1);
XA_10:=3*XA_8-2*XA_9;
XA_11:=CLOSE-REF(CLOSE,1);
XA_12:=100*EMA(EMA(XA_11,6),6)/EMA(EMA(ABS(XA_11),6),6);
XA_13:=LLV(XA_12,2)=LLV(XA_12,7) AND COUNT(XA_12<0,2) AND CROSS(XA_12,MA(XA_12,2));
STICKLINE(XA_13,OPEN,CLOSE,2,0),COLORYELLOW;
XA_14:=(CLOSE-MA(CLOSE,5))/MA(CLOSE,5)*100;
XA_15:=(CLOSE-MA(CLOSE,1))/MA(CLOSE,1)*100;
DRAWICON(CROSS(XA_14,XA_15),LOW,17);
XA_16:=SMA(MAX(CLOSE-REF(CLOSE,1),0),5,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),5,1)*100;
XA_17:=SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),10);
XA_18:=HIGH-REF(HIGH,1);
XA_19:=REF(LOW,1)-LOW;
XA_20:=SUM(IF(XA_18>0 AND XA_18>XA_19,XA_18,0),10);
XA_21:=SUM(IF(XA_19>0 AND XA_19>XA_18,XA_19,0),10);
XA_22:=XA_20*100/XA_17;
XA_23:=XA_21*100/XA_17;
XA_24:=MA(ABS(XA_23-XA_22)/(XA_23+XA_22)*100,5);
XA_25:=XA_16+XA_24;
XA_26:=(XA_24+REF(XA_24,5))/2+XA_16;
XA_27:=100*(HHV(HIGH,10)-CLOSE)/(HHV(HIGH,10)-LLV(LOW,10));
XA_28:=XA_16-XA_27;
XA_29:=XA_25+XA_28;
XA_30:=CROSS(XA_29,0) AND 下轨<REF(下轨,1) AND 均角<(-30) AND XA_6<15;
DRAWTEXT(XA_30,LOW-0.05,11),COLORYELLOW;
635366433.png
|
