主力持仓量 自用MACD＋KDI指标

主力持仓量 自用MACD＋KDI指标

DIFF:=EMA(CLOSE,12)-EMA(CLOSE,26),COLORWHITE;
DEA:=EMA(DIFF,5),COLORYELLOW;
MACD1:=2*(DIFF-DEA);
STICKLINE(MACD1>=0,0,MACD1,2,0),COLOR2D2DFF,LINETHICK2;
STICKLINE(MACD1<0,0,MACD1,2,0),COLORFFFF00,LINETHICK2;
波段:IF(DIFF>DEA,-0.03,0),COLORYELLOW;
金叉:IF(CROSS(DIFF,EMA(DIFF,9)),0.01,0),COLORGRAY;
DRAWTEXT(CROSS(DIFF,EMA(DIFF,9)),0,'★'),COLORRED;
DRAWTEXT(CROSS(0,2*(DIFF-EMA(DIFF,9))),0,'*'),COLOR00FF00;

{主力持仓量}
换手:=V*100/CAPITAL;
主力:=MA(换手,4);
大户:=MA(换手,9);
中户:=MA(换手,17);
散户:=MA(换手,34);
均量:=(主力+大户+中户+散户)/4;
主力能量:=(主力-均量);
STICKLINE(主力能量>=0 AND 主力能量>=REF(主力能量,1),0,MACD1,2,0),COLORRED,LINETHICK2;
STICKLINE(主力能量<0 AND 主力能量>=REF(主力能量,1),0,MACD1,2,0),COLOR005555,LINETHICK2;
STICKLINE(主力能量>=0 AND 主力能量<REF(主力能量,1),0,MACD1,2,0),COLOR00CC20,LINETHICK2;

RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1),COLORWHITE;
KR:=MA(K,2),COLORWHITE;
D:=SMA(K,3,1),COLORYELLOW;
J:=3*K-2*D,COLORFF00FF;
JR:=MA(J,2),COLORWHITE;
STICKLINE(J>JR,0,MACD1/1.4,2,0),COLORYELLOW,LINETHICK2;
STICKLINE(K>KR,0,MACD1/2.4,2,0),COLORFF00FF,LINETHICK2;

DIFR:=EMA(CLOSE,3)-EMA(CLOSE,8);
动能B:=EMA(DIFR,5)*100;
动能A:=((EMA(CLOSE,3)-EMA(CLOSE,8)))*100;
STICKLINE(动能A<动能B AND MACD1>0,0,MACD1/4,2,0),COLORBLUE,LINETHICK2;{持股}
MACD:MACD1,COLORWHITE;

BIAS1:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100;
BIAS2:=(CLOSE-MA(CLOSE,12))/MA(CLOSE,12)*100;
BIAS3:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;
BIAS:=(BIAS1+2*BIAS2+3*BIAS3)/6;
综合乖离:=MA(BIAS,3),COLORFFFF00;
BIAS底A:IF(综合乖离<-18,0.001,0),COLORFF00FF;
BIAS底B:IF(综合乖离<-12,0.001,0), COLOR0000CC;
BIAS底C:IF(综合乖离<-6,0.001,0),COLORFFFF00;

STICKLINE(综合乖离<-6,0,MACD1/4,2,0),COLORWHITE,LINETHICK2;
STICKLINE(综合乖离<-12,0,MACD1/4.8,2,0),COLORBLUE,LINETHICK2;
STICKLINE(综合乖离<-18,0,MACD1/5.4,2,0),COLOR4D4DFF,LINETHICK2;
DRAWTEXT(CROSS(综合乖离,0),0,'☆'),COLORYELLOW;
BB:=EMA(100*(C-LLV(LOW,34))/(HHV(H,34)-LLV(LOW,34)),3),COLOR1010FF;
DRAWTEXT(CROSS(BB,9),0.12,'＊'),COLOR00FFFF;{底部}

{MACD空中加油}
DIFY:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEAY:=EMA(DIFY,9);
A:=2*(DIFY-DEAY),COLORSTICK;
A1:=REF(A,1);
A2:=REF(A,2);
A3:=REF(A,3);
A4:=REF(A,4);
A5:=REF(A,5);
A6:=REF(A,6);
B:=DIFY>=0;
B1:=DIFY>DEAY;
B2:=A>=A1;
B3:=A2>A1;
B4:=A3>A2;
B5:=A4>A2;
B6:=A5>A3;
加油:IF((B AND B1 AND B2 AND B3 AND B4 AND (B5 OR B6)),0.001,0),COLORYELLOW;
DRAWTEXT(加油=0.001,0,'加'),COLORRED;

{突破盘整}
W1:=C=HHV(C,20);
W2:=BARSLAST(W1);
W3:=IF(W2>0,REF(C,W2),REF(C,W2));
W4:=CROSS(C,REF(W3,1));
突破盘整:=W4 AND COUNT(W4,5)=1;
DRAWTEXT(W4 AND COUNT(W4,5)=1,-0.01,'＊'),COLORFF00FF;