通达信主力進退指标

阅读作者：股海网时间 2012-12-27 通达信公式

通达信主力進退指标

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<D,K,D,2,0),COLORWHITE;
强弱分界线: 50,POINTDOT, COLORF00FF0;
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,LINETHICK2,COLORRED;
DRAWTEXT(CROSS(主力进退线,D),D,'B'),COLORRED;
DRAWTEXT(CROSS(D,主力进退线),D,'S'),COLORYELLOW;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<D,K,D,2,0),COLORWHITE;
强弱分界线: 50,POINTDOT, COLORF00FF0;
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,LINETHICK2,COLORRED;
DRAWTEXT(CROSS(主力进退线,D),D,'B'),COLORRED;
DRAWTEXT(CROSS(D,主力进退线),D,'S'),COLORYELLOW;

通达信主力進退指标