以下是通达信黑马大黑马源码副图(无源码的请下载附件导入)
RV:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100;
RG:=(CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100;
J0:=(HIGH+LOW)/2;QJ:=EMA(J0,3);
J1:=IF(CLOSE>QJ,VOL,0);
J2:=IF(CLOSE
量能:=IF(CAPITAL<1,MA(VOL,74),MA(SUM(J1-J2,22),3));
趋势:=IF(CAPITAL<1,EMA(量能,360),EMA(量能,21));
VAR3:=(量能-趋势);
VAR44:=SMA(RV,3,1);
VAR55:=SMA(VAR44,3,1);
KK:=EMA(SMA(RG,3,1),2);
DD:=SMA(KK,3,1);
共振点:=(CROSS(VAR44,VAR55) AND CROSS(KK,DD));
TTJ1:=共振点;
VAR200:=(CLOSE-LLV(LOW,20))/(HHV(HIGH,20)-LLV(LOW,20))*100;
VAR300:=SMA(SMA(VAR200,3,1),3,1)/28.57;
VAR400:=EMA(VAR300,5);
操盘:=3*VAR300-2*VAR400;
TTJ2:=CROSS(操盘,VAR300) AND VAR300<2.1 AND C>O;
TT1:=COUNT(TTJ1 OR TTJ2,2)=2;
VAR1:=1;
VAR2:=((((2*CLOSE)+HIGH)+LOW) / 4);
VAR4:=LLV(LOW,5);
VAR5:=HHV(HIGH,4);
C1:=(EMA((((VAR2-VAR4)/(VAR5-VAR4))*100),4)*VAR1);
C2:=(EMA(((0.667*REF(C1,1))+(0.333*C1)),2)*VAR1);
TJ3:=CROSS(C1,C2) AND C1<40;
XG:=TT1 OR TJ3;
STICKLINE(TJ3,0,15,4,0),COLORFF00FF;
STICKLINE(TT1,0,20,4,0),COLOR0000FF;
DRAWTEXT(TJ3,15,'黑马'),COLORFF00FF;
DRAWTEXT(TT1,17,'大黑马'),COLOR0000FF;
85655777.jpg
|