通达信主力雷达源码有附图

通达信主力雷达源码有附图

 {牛牛指标网提供：www.tdx001.com}

1. {主力雷达}   
2.   
3. LC:=REF(CLOSE,1);   
4. RSI1:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;   
5. AR:=SUM(HIGH-OPEN,26)/SUM(OPEN-LOW,26)*100;   
6. 卖点雷达:CROSS(85,RSI1)*30;   
7. DRAWTEXT(CROSS(85,RSI1),80,'顶');    
8. VARB:=SMA(MAX(CLOSE-LC,0),7,1)/SMA(ABS(CLOSE-LC),7,1)*100;    
9. VARC:=SMA(MAX(CLOSE-LC,0),13,1)/SMA(ABS(CLOSE-LC),13,1)*100;    
10. VARD:=BARSCOUNT(CLOSE);    
11. 买点雷达:(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;   
12. DRAWTEXT(CROSS(RSI1,25),-100,'底');   
13. 主力:EMA( (CLOSE-MA(CLOSE,7))/MA(CLOSE,7)*480,2)*5;    
14. 散户:EMA( (CLOSE-MA(CLOSE,11))/MA(CLOSE,11)*480,7)*5;    
15. DRAWTEXT(CROSS(主力,散户) AND 主力<-10,-60,'升');      
16. DRAWICON(CROSS(主力,散户) AND 主力<-10 AND 散户>REF(散户,1) OR CROSS(主力,散户) AND 散户<-35 ,-15,1);   
17. DRAWTEXT(CROSS(RSI1,20)AND 散户<-20 AND 买点雷达 ,-60,'底');   
18. {正负量比:=1200*(WINNER(C)-WINNER(O));    
19. STICKLINE(100*V/CAPITAL>= 3 AND 100*V/CAPITAL<7,100*V/CAPITAL*2,100,0.1,0),COLORRED;    
20. STICKLINE(100*V/CAPITAL>= 7,100,100*V/CAPITAL*2,0.1,0),COLORBLUE;};   

 

1843411385.jpg