通达信变盘点指标

以下是通达信变盘点指标

通达信变盘点指标
 

{变盘点 副}

VAR1:=MA(CLOSE,5);
 VAR2:=MA(CLOSE,10);
 VAR3:=MA(CLOSE,30);
 VAR4:=MA(CLOSE,60);
 VAR5:=EMA(COST(85),7);
 VAR6:=EMA(COST(15),7);
 VAR7:=SUM(CLOSE*VOL*100,4)/SUM(VOL*100,4);
 VAR8:=INTPART(VAR7*100)/100;
 VAR9:=SUM(CLOSE*VOL*100,7)/SUM(VOL*100,7);
 VARA:=INTPART(VAR9*100)/100;
 VARB:=SUM(CLOSE*VOL*100,28)/SUM(VOL*100,28);
 VARC:=INTPART(VARB*100)/100;
 VARD:=EMA(CLOSE,5)-EMA(CLOSE,10);
 VARE:=EMA(CLOSE,5)-EMA(CLOSE,10);
 VARF:=EMA(VARD,9);
放空段: IF(VARD>VARF,VARF,VARE),COLOR00FF00,LINETHICK2;
持股段: IF(VARD< VARF,VARF,VARE),COLORRED,LINETHICK2;
 VAR10:=(-100)*(HHV(CLOSE,5)-CLOSE)/(HHV(CLOSE,5)-LLV(LOW,5))+100;
 VAR11:=(-100)*(HHV(CLOSE,10)-CLOSE)/(HHV(CLOSE,10)-LLV(LOW,10))+100;
 VAR12:=(-100)*(HHV(CLOSE,20)-CLOSE)/(HHV(CLOSE,20)-LLV(LOW,20))+100;
 VAR13:=(-100)*(HHV(CLOSE,30)-CLOSE)/(HHV(CLOSE,30)-LLV(LOW,30))+100;
 VAR14:=REF(VARF,1);
 VAR15:=VARF;
 VAR16:=VAR15-VAR14;
 VAR17:=REF(VARD,1);
 VAR18:=VARD;
 VAR19:=VAR18-VAR17;
 VAR1A:=OPEN;
 VAR1B:=CLOSE;
变盘点: IF(VAR1A<=VAR1 AND VAR1A<=VAR2 AND VAR1A<=VAR3 AND VAR1B>=VAR1 AND VAR1B>=VARC AND VAR16>0 AND VAR19>0,0.5,0), STICK,COLORWHITE;
 VAR1C:=IF(CROSS(VARD,VARF) AND VARD<0 AND VARF<-0.2 AND VAR11>45 AND VAR16>0,0.3,0);
买进1: IF(VAR1C,0.5,0),COLORYELLOW;
 DRAWICON(买进1,0.5,1);
 VAR1D:=(2*CLOSE+HIGH+LOW)/4;
 VAR1E:=LLV(LOW,34);
 VAR1F:=HHV(HIGH,34);
 VAR20:=EMA((VAR1D-VAR1E)/(VAR1F-VAR1E)*100,13);
 VAR21:=EMA(0.667*REF(VAR20,1)+0.333*VAR20,2);
 VAR22:=REF(CLOSE,1);
 VAR23:=SMA(MAX(CLOSE-VAR22,0),6,1)/SMA(ABS(CLOSE-VAR22),6,1)*100;
卖出: IF(CROSS(84,VAR23),0.5,0),COLOR00FF00;
 DRAWICON(卖出,0.5,2);
持仓:0,COLORFF00FF;
空仓:0,COLORGREEN;
 {持仓:}STICKLINE(VAR20>VAR21,0,-0.02,10,1),COLORFF00FF;
 {空仓:}STICKLINE(VAR20< VAR21,0,-0.02,10,1),COLORGREEN;