通达信买卖雷达指标源码

通达信买卖雷达指标

{买卖雷达}
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)*30,COLOR00FF00,LINETHICK2;   
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)*200,LINETHICK2,COLOR00FF00;   
BT1:=CROSS(RSI1,25);   
主力:=EMA( (CLOSE-MA(CLOSE,7))/MA(CLOSE,7)*480,2)*5,LINETHICK1,COLOR0000FF;    
小股民:EMA( (CLOSE-MA(CLOSE,11))/MA(CLOSE,11)*480,7)*5,LINETHICK2,COLORA607C0; 
买点:IF(CROSS(小股民,-30),30,0);  
BT2:=CROSS(主力,小股民) AND 主力<-10;      
BT:=FILTER(COUNT(BT1 OR BT2,3)>=2,3);   
买:IF(BT2,200,0),STICK,COLOR0000FF,LINETHICK3;   
卖:IF(卖点,-200,0),STICK,COLORFF9150,LINETHICK3;   
DRAWICON(买=200,220,13);   
DRAWICON(卖=-200,-220,14);