通达信主力控盘，简约而不简单公式

通达信主力控盘，简约而不简单公式

主力控盘源码：

VAR1:=1;
 VAR2:=1/WINNER(CLOSE);
 VAR3:=MA(CLOSE,13);
 VAR4:=100-ABS((CLOSE-VAR3)/VAR3*100);
 VAR5:=LLV(LOW,75);
 VAR6:=HHV(HIGH,75);
 VAR7:=(VAR6-VAR5)/100;
 VAR8:=SMA((CLOSE-VAR5)/VAR7,21,1);
 VAR9:=SMA((OPEN-VAR5)/VAR7,21,1);
 VARA:=3*VAR8-2*SMA(VAR8,13,1);
 VARB:=3*VAR9-2*SMA(VAR9,13,1);
 VARC:=100-VARB;
 散户: (100-VARA)*VAR1,COLOR0099FF;
 主力: MA(WINNER(CLOSE*0.95)*100,3)*VAR1,COLORYELLOW;
 VARD:=散户>VAR4;
 VARE:=REF(LOW,1)*0.9;
 VARF:=LOW*0.9;
 VAR10:=(VARF*VOL+VARE*(CAPITAL-VOL))/CAPITAL;
 VAR11:=EMA(VAR10,34);
 VAR12:=CLOSE-REF(CLOSE,1);
 VAR13:=MAX(VAR12,0);
 VAR14:=ABS(VAR12);
 VAR15:=SMA(VAR13,8,1)/SMA(VAR14,8,1)*100;
 VAR16:=SMA(VAR13,13,1)/SMA(VAR14,13,1)*100;
 VAR17:=BARSCOUNT(CLOSE);
 VAR18:=SMA(MAX(VAR12,0),5,1)/SMA(ABS(VAR12),5,1)*100;
 VAR19:=(-200)*(HHV(HIGH,55)-CLOSE)/(HHV(HIGH,55)-LLV(LOW,55))+100;
 VAR1A:=(CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*100;
 VAR1B:=SMA((SMA(VAR1A,5,1)-50)*2,3,1);
 VAR1C:=(INDEXC-LLV(INDEXL,13))/(HHV(INDEXH,13)-LLV(INDEXL,13))*100;
 VAR1D:=SMA(VAR1C,5,1);
 VAR1E:=SMA(VAR1D,3,1);
 VAR1F:=(HHV(HIGH,34)-CLOSE)/CLOSE*100;
 VAR20:=VAR18<=25 AND VAR19<-95 AND VAR1F>20 AND VAR1B<-30 AND VAR1E<30 AND VAR11-CLOSE>=-0.25 AND VAR15<22 AND VAR16<28 AND VAR17>50;