以下是通达信发现黑马副图指标 不加密 没未来 源码(无源码的请下载附件导入)
{发现黑马}
趋势:EMA((CLOSE-MA((2*CLOSE+HIGH+LOW)/4,30))/MA((2*CLOSE+HIGH+LOW)/4,30)*100,3),COLORMAGENTA,LINETHICK1;
界线:0,COLORRED;
STICKLINE(趋势<-10,0,趋势,0.8,0),COLORRED;
STICKLINE(趋势>10,0,趋势,0.8,0),COLORLICYAN;
RSV:=(((CLOSE - LLV(LOW,9)) / (HHV(HIGH,9) - LLV(LOW,9))) * 100);
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=((3 * K) - (2 * D));
VARA1:=(((CLOSE - MA(CLOSE,6)) / MA(CLOSE,6)) * 100);
VARA2:=(((CLOSE - MA(CLOSE,12)) / MA(CLOSE,12)) * 100);
VARA3:=(((CLOSE - MA(CLOSE,24)) / MA(CLOSE,24)) * 100);
VARA4:=(((VARA1 + (2 * VARA2)) + (3 * VARA3)) / 6);
VARA5:=MA(VARA4,3);
STICKLINE((CROSS(J,0) AND (VARA5 <= (0 - 7))),0,35,3,0),COLORMAGENTA;
{DRAWTEXT((CROSS(J,0) AND (VARA5 <= (0 - 7))),15,'←黑马'),COLORRED;}
DRAWTEXT((CROSS(J,0) AND (VARA5 <= (0 - 7))),33.5,'发'),COLOR4080FF;
DRAWTEXT((CROSS(J,0) AND (VARA5 <= (0 - 7))),25.5,'现'),COLOR4080FF;
DRAWTEXT((CROSS(J,0) AND (VARA5 <= (0 - 7))),17.5,'黑'),COLOR4080FF;
DRAWTEXT((CROSS(J,0) AND (VARA5 <= (0 - 7))),9.5,'马'),COLOR4080FF;
发现黑马:CROSS(J,0) AND (VARA5 <= (0 - 7)),COLORMAGENTA,NODRAW;
LC:=REF(CLOSE,1);
RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
顶部:=CROSS(80,RSI)*1,LINETHICK2 ,COLORGREEN;
DRAWTEXT(CROSS(80,RSI),-1,'顶 '),COLOR408000;
STICKLINE(CROSS(80,RSI),0,趋势,0.8,0),COLOR408000;
顶:顶部,COLOR408000,NODRAW;
顶顶:=IF(顶>REF(顶,1),1,0),COLOR7AB500;
{DRAWTEXT(顶=35,35,'←逃顶'),COLORGREEN;};
165233721.png
|