通达信主力雷达副图源码

以下是通达信主力雷达副图源码

{主力雷达}
DTJJ:=(CLOSE+HIGH+LOW)/3;
 DTA:=EMA(DTJJ,10);
 DTB:=REF(DTA,1);
 STICKLINE(DTA>DTB,-20,-25,5,0),COLORYELLOW;
 STICKLINE(DTA<DTB,-20,-25,5,0),COLORBLUE;
 LC:=REF(CLOSE,1);
 RSI1:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
 AR:=SUM(HIGH-OPEN,26)/SUM(OPEN-LOW,26)*100;
卖点雷达:CROSS(85,RSI1)*130;
 DRAWTEXT(CROSS(85,RSI1),80,'顶');
VARB:=SMA(MAX(CLOSE-LC,0),7,1)/SMA(ABS(CLOSE-LC),7,1)*100;
 VARC:=SMA(MAX(CLOSE-LC,0),13,1)/SMA(ABS(CLOSE-LC),13,1)*100;
 VARD:=BARSCOUNT(CLOSE);
买点雷达:(VARB< 20 AND VARC< 25 AND VARD> 50 AND AR<70 AND VOL<REF( VOL,1) AND REF( VOL,1)<REF( VOL,2) AND REF( VOL,2)<REF( VOL,3))*30,COLOR00FFFF;
 DRAWTEXT(CROSS(RSI1,25),-100,'底');
STICKLINE(100*V/CAPITAL>= 3 AND 100*V/CAPITAL<5,100*V/CAPITAL*2,100,0.2,0),COLORC0C0C0;
 STICKLINE(100*V/CAPITAL>= 7,100,100*V/CAPITAL*2,0.2,0),COLOR00FFFF;
 STICKLINE(100*V/CAPITAL>= 10,100,100*V/CAPITAL*2,0.2,0),,COLORC08000;
主力:EMA( (CLOSE-MA(CLOSE,7))/MA(CLOSE,7)*480,2)*5,COLOR0000FF;
散户:EMA( (CLOSE-MA(CLOSE,11))/MA(CLOSE,11)*480,7)*5,COLOR00FF00;
 DRAWTEXT(CROSS(主力,散户) AND 主力<-10,-60,'升');
DRAWICON(CROSS(主力,散户) AND 主力<-10 AND 散户>REF(散户,1) OR CROSS(主力,散户) AND 散户<-35 ,-15,1);
 DRAWTEXT(CROSS(RSI1,20)AND 散户<-20 AND 买点雷达 ,-60,'底');