VA:=IF(CLOSE>REF(CLOSE,1),VOL,-VOL);
ZLCM:=EMA(WINNER(CLOSE)*70,3);{//主力筹码估算}
SHCM:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,3);{//散户筹码估算}
ZSHTL:=SHCM/(ZLCM+SHCM)*100;{//散户套牢筹码比率}
ZZLKP:=ZLCM/(ZLCM+SHCM)*100;{//主力控盘筹码比率}
主力控盘系数:INTPART(ZZLKP),COLORYELLOW,NODRAW;
XXB:=CLOSE*VOL;
XXBYM:EMA((EMA(XXB,3)/EMA(VOL,3)+EMA(XXB,6)/EMA(VOL,6)+EMA(XXB,12)/EMA(VOL,12)+EMA(XXB,24)/EMA(VOL,24))/4,13),COLORFF00FF,NODRAW;
主力筹码集中度:=WINNER(C)*100;
STICKLINE(主力筹码集中度>50,0.88, 1.08,5,0),COLOR000099;
STICKLINE(主力筹码集中度>50,0.88, 1.08, 3,0),COLOR0000CC;
STICKLINE(主力筹码集中度>50,0.88, 1.08,2,0),COLOR0000FF;
STICKLINE(主力筹码集中度>50,0.88, 1.08,1,0),COLORCC66FF;
AFA:=EMA(-100*(HHV(HIGH,34)-CLOSE)/(HHV(HIGH,34)-LLV(LOW,34)),13);
BBB:=-100*(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14));
DF:=EMA(-100*(HHV(HIGH,34)-CLOSE)/(HHV(HIGH,34)-LLV(LOW,34)),4);
向上:=AFA+99,COLORCYAN;
短线:=BBB+100,COLORGREEN;
中线:=DF+100,COLORYELLOW;
A1:=EMA(C,14);
A1X:=(A1-REF(A1,1))/REF(A1,1)*100;
休假:=IF(A1X<0,REF(EMA(C,14),BARSLAST(CROSS(0,A1X))+1),1);
春上:=IF(A1X<0,(C-休假)/休假*100,0);
MA2:=EMA(CLOSE,2);
DIRECTION:=ABS(CLOSE-REF(CLOSE,20));
VOLATILITY0:=SUM(ABS(CLOSE-REF(CLOSE,1)),20);
ER:=DIRECTION/VOLATILITY0;
FSC:=2/(2+1);
SSC:=2/(30+1);
SC:=ER*(FSC-SSC)+SSC;
SCSQ:=SC*SC;
MA3:=DMA(CLOSE,SCSQ),COLORCYAN,LINETHICK1;
中轴线:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4,COLORYELLOW;
MID:=(3*CLOSE+LOW+OPEN+HIGH)/6;
红线:=(20*MID+19*REF(MID,1)+18*REF(MID,2)+17*REF(MID,3)+16*REF(MID,4)+15*REF(MID,5)+14*REF(MID,6)+13*REF(MID,7)+12*REF(MID,8)+11*REF(MID,9)+10*REF(MID,10)+9*REF(MID,11)+8*REF(MID,12)+7*REF(MID,13)+6*REF(MID,14)+5*REF(MID,15)+4*REF(MID,16)+3*REF(MID,17)+2*REF(MID,18)+REF(MID,20))/210,COLORRED,LINETHICK2;
EA:=EMA((EMA(CLOSE*VOL,27)/EMA(VOL,27)+EMA(CLOSE*VOL,54)/EMA(VOL,54)+EMA(CLOSE*VOL,108)/EMA(VOL,108)+EMA(CLOSE*VOL,316)/EMA(VOL,316))/4,34);
设值:=REF(EMA(C,10),1);
MB1:=(EMA(C,10)-设值)/设值*100;
侦测:=REF(EMA(C,10),1);
MB2:=EMA(侦测,10);
MB3:=100*(设值-MB2);
柱线:=MB3,COLORCCCCCC;
MB4:=EMA(MB3,10),COLOR009000,LINETHICK2;
AGL:=EMA((4*C+O+H+L)/7,2);
乖离2:=(AGL-EMA(AGL,89))/EMA(AGL,421)*500-100;
ZISE:=柱线>MB4 AND 乖离2>REF(乖离2,1) AND MA2>MA3 AND 春上=0;
STICKLINE(ZISE,0.80, 0.38,9,0),COLORGRAY;
主升线:=1.06*EA;
牛熊线:=EA*0.94;
AN1:=MA(C,3);
AN2:=MA(C,21);
AN3:=(AN1+AN2)/2;
BR:=MA(CLOSE,8)+MA(CLOSE,8)-REF(MA(CLOSE,8),1);{原13}
分水岭R:=IF(MA(CLOSE,13)<BR,BR,MA(CLOSE,13)),COLORFF00FF;{原17}
YR:=分水岭R-(EMA(C,3)-分水岭R),COLORRED,LINETHICK2;
A80:=(L+H+C*2)/20;
A81:=EMA(A80,21)COLORBLUE,LINETHICK2;
A1X8:=(A81-REF(A81,1))/REF(A81,1)*50;
OK:=中轴线>=红线 AND A1X8>0 AND YR<AN3;
STICKLINE(OK AND EMA(C,5)>XXBYM,-0.1,0.20,7,0)COLORMAGENTA;
OBV1:=SUM(IF(CLOSE=REF(CLOSE,1),0,VA),0);
OBV2:=EMA(OBV1,3)-MA(OBV1,9);
OBV3:=EMA(IF(OBV2>0,OBV2,0),3);
MAC3:=MA(C,3);
选股:=CROSS(OBV3,REF(OBV3,1)) AND MAC3>REF(MAC3,1) AND EMA(C,5)>XXBYM;
DRAWTEXT(REF(选股,1) AND ZISE AND C>O,0.65,'加'),COLORWHITE;
DRAWTEXT(REF(选股,1) AND ZISE AND C>O,0.5,'2'),COLORWHITE;
DRAWTEXT(REF(选股,1) AND ZISE AND C>O,0.35,'成'),COLORWHITE;
DRAWTEXT(选股 AND H>REF(O,1) AND ZISE,0.65,'买'),COLORWHITE;
DRAWTEXT(选股 AND H>REF(O,1) AND ZISE,0.5,'1'),COLORWHITE;
DRAWTEXT(选股 AND H>REF(O,1) AND ZISE,0.35,'成'),COLORWHITE;
LC:=REF(CLOSE,1);
VAR28:=SMA(MAX(CLOSE-LC,0),5,1)/SMA(ABS(CLOSE-LC),6,1)*100;
DRAWICON(CROSS(76,VAR28) ,0.980 ,27 ),COLORYELLOW;
DRAWTEXT(CROSS(向上,中线) AND L<中轴线,0.70,'清'),COLORGREEN;
DRAWTEXT(CROSS(向上,中线) AND L<中轴线,0.55,'仓'),COLORGREEN;
DRAWTEXT(CROSS(中线,向上) AND REF(CROSS(向上,中线),1) AND 主力筹码集中度>60,0.70,'反'),COLORRED;
DRAWTEXT(CROSS(中线,向上) AND REF(CROSS(向上,中线),1) AND 主力筹码集中度>60,0.550,'转'),COLORRED;
XG3:= 春上=0;
爱心:=EMA(CLOSE,13)-EMA(CLOSE,55);
无价:=EMA(爱心,3);
VARBB2:=LLV(LOW,6);
VARBB3:=HHV(HIGH,12);
G:=EMA((CLOSE-VARBB2)/(VARBB3-VARBB2)*4,4);
AB1:=EMA(C,14);
X_6:=-(HHV(HIGH,36)-CLOSE)/(HHV(HIGH,36)-LLV(LOW,36))*10;
X_7:=SMA(X_6,5,1);
X_8:=SMA(X_7,8,1);
CJJJ:=AMOUNT/V,LINETHICK2;
ROC:=(CJJJ-REF(CJJJ,12))/REF(CJJJ,12)*100,LINETHICK2;
ROCMA:=MA(ROC,6);
OK2:= ROC>=ROCMA AND G>1 AND X_6>=X_8 AND 爱心>=无价 AND 春上=0;
LC2 := REF(CLOSE,1);
RSI:=SMA(MAX(CLOSE-LC2,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
DRAWTEXT(CROSS(80,RSI),0.50,' ● '),COLORGREEN;
DRAWTEXT(CROSS(80,RSI),0.40,' ● '),COLORGREEN;
DRAWTEXT(CROSS(80,RSI),0.30,' ● '),COLORGREEN;
STICKLINE(CROSS(80,RSI) AND CROSS(76,VAR28),-0.1,1.08,4,1)COLORGREEN,LINETHICK2;
五日线:=MA(C,4),LINETHICK2;
五日线1:=MA(C,7),LINETHICK2;
VR1X:=CROSS(五日线,五日线1) AND C>O AND H/C<1.025 AND C>REF(C,1);
XXGG:=VR1X AND OK2,COLORGREEN;
DRAWTEXT(REF(XXGG,1) AND L>REF(L,1) AND C>O,0.15,'确'),COLORWHITE;
DRAWTEXT(REF(XXGG,1) AND L>REF(L,1) AND C>O,0,'立'),COLORWHITE;
MTM:=C-REF(C,1);
DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6);
卖:=HHV(DX,2)=HHV(DX,7) AND COUNT(DX>50,2) AND CROSS(MA(DX,2),DX);
DRAWTEXT(卖 AND CROSS(76,VAR28),0.8,'出'),COLORGREEN;
DRAWTEXT(卖 AND CROSS(76,VAR28),0.7,'一'),COLORWHITE;
DRAWTEXT(卖 AND CROSS(76,VAR28),0.6,'半'),COLORGREEN;
DRAWTEXT(卖 AND 主力筹码集中度<60 AND EMA(C,5)> XXBYM,0.8,'出'),COLORGREEN;
DRAWTEXT(卖 AND 主力筹码集中度<60 AND EMA(C,5)> XXBYM,0.7,'大'),COLORGREEN;
DRAWTEXT(卖 AND 主力筹码集中度<60 AND EMA(C,5)> XXBYM,0.6,'半'),COLORGREEN;
DRAWTEXT(卖 AND 主力筹码集中度>60 AND OK,0.8,'出'),COLORGREEN;
DRAWTEXT(卖 AND 主力筹码集中度>60 AND OK,0.7,'小'),COLORGREEN;
DRAWTEXT(卖 AND 主力筹码集中度>60 AND OK,0.6,'半'),COLORGREEN;
F:=100*(C-REF(C,1))/REF(C,1);
VAR51:=IF(C<REF(O,1) AND F<0,1,0);
VARR52:=IF(C<REF(O,2) AND F<0,1,0);
VAR53:=(VAR51=0 AND REF(VAR51,1)=1 AND VARR52=0 AND REF(VARR52,1)=1 );
DRAWTEXT(VAR53 AND L>中轴线,0.6,'补'),COLORYELLOW;
DRAWTEXT(VAR53 AND L>中轴线,0.5,'仓'),COLORYELLOW;
A:=(3*C+L+O+H)/6;
VAR4:=(20*A+19*REF(A,1)+18*REF(A,2)+17*REF(A,3)+16*REF(A,4)+15*REF(A,5)+
14*REF(A,6)+13*REF(A,7)+12*REF(A,8)+11*REF(A,9)+10*REF(A,10)+9*REF(A,11)+8*REF(A,12)
+7*REF(A,13)+6*REF(A,14)+5*REF(A,15)+4*REF(A,16)+3*REF(A,17)+2*REF(A,18)+REF(A,20))/210;
CB:=EMA(VAR4,20);
买:=LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND CROSS(DX,MA(DX,2));
加仓:=SMA(EMA((C-REF(C,1))/REF(C,1),5)*100,3,1)*10;
DRAWTEXT((CROSS(加仓,0) OR CROSS(CLOSE,CB)) AND 买=1,1.06,'加'),COLORWHITE;
DRAWTEXT((CROSS(加仓,0) OR CROSS(CLOSE,CB)) AND 买=1,0.95,'仓'),COLORWHITE;
建仓:=VR1X AND OK2 AND ZISE;
DRAWTEXT(建仓,0.15,'建'),COLORWHITE;
DRAWTEXT(建仓,0,'仓'),COLORWHITE;
STICKLINE(VR1X AND OK2,0.3,0.60,3,0)COLORYELLOW;
{DRAWTEXT(REF(CROSS(0,CPX),1) AND CROSS(CPX,0),0.30,'SB'),COLORCYAN;}
MA05:=MA(CLOSE,5);
MA010:=MA(CLOSE,10);
MA020:=MA(CLOSE,20);
AW1:=IF(C>=MA05,1,-1);
AW2:=IF(C>=MA010,1,-1);
AW3:=IF(C>=MA020,1,-1);
AW4:=IF(MA05>=REF(MA05,1),1,-1);
AW5:=IF(MA010>=REF(MA010,1),1,-1);
AW6:=IF(MA020>=REF(MA020,1),1,-1);
趋势:=(AW1+AW2+AW3+AW4+AW5+AW6)/6*100,COLOR00FF00;
VAR1B:=(HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100-70;
VAR2B:=SMA(VAR1B,9,1)+100;
VAR3B:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
VAR4B:=SMA(VAR3B,3,1);
VAR5B:=SMA(VAR4B,3,1)+100;
VAR6B:=VAR5B-VAR2B;
趋势1:=IF(VAR6B>45,VAR6B-45,0);
虎:=ZISE AND CROSS(趋势>=50 AND REF(趋势1,1)< 趋势1,0.1);
STICKLINE(虎,1.080, -0.12,7,1),COLORRED,LINETHICK2;
