在公式（主力进退）的B点做个选股公式

编写条件：

VAR1:=((HHV(H,21)-C)/(HHV(H,21)-LLV(L,21)))*100-10; VAR2:=((C-LLV(L,21))/(HHV(H,21)-LLV(L,21)))*100; VAR3:=SMA(VAR2,13,8); VAR4:=SMA(VAR1,21,8); X:=CEILING(SMA(VAR3,13,8)); 底:IF((X-VAR4<(-65)),1,6),COLOR00FF00; 顶:IF((X-VAR4>85),95,100),COLORF0F000; RSV:= (CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*100; FASTK:=SMA(RSV,7,1); K:SMA(FASTK,7,1),LINETHICK5; D:SMA(K,9,1),COLORYELLOW; STICKLINE(K>D,K,D,6,0),COLORRED; STICKLINE(K编写方法：

&nbsp;RSV:=(CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*100;

FASTK:=SMA(RSV,7,1);

K:=SMA(FASTK,7,1),LINETHICK5;

D:=SMA(K,9,1),COLORYELLOW;

VAR1X:=IF(MONTH<12,1,1);

VAR3X:=(2*CLOSE+HIGH+LOW)/4;

VAR4X:=LLV(LOW,34);

VAR5X:=HHV(HIGH,34);

主力进退线:=EMA((VAR3X-VAR4X)/(VAR5X-VAR4X)*100,13)*VAR1X;

crOSS(主力进退线,D);