%>
M 82 2 100 1
VAR1:=1;
VAR55:=LLV(LOW,8);
VAR66:=HHV(HIGH,8);
VAR77:=(VAR66-VAR55)/10;
VAR88:=SMA((CLOSE-VAR55)/VAR77,20,1);
VARA:=3*VAR88-2*SMA(VAR88,15,1);
散户筹码集中度: (10-VARA)*VAR1*6,COLORGREEN,LINETHICK2;
VAR100:=(CLOSE-MA(CLOSE,34))/MA(CLOSE,34)*(10);
增减力度:VAR100*16,COLORMAGENTA,LINETHICK2;
散筹估算:EMA((WINNER(C*1.1)-WINNER(C*0.9))*70,3),COLORFFFFFF;
主持仓:=EMA(100*(CLOSE-LLV(LOW,30))/(HHV(HIGH,30)-LLV(LOW,30)),9);
庄筹集中度:=EMA(主持仓,1);
庄筹集中监控线:EMA(庄筹集中度,1), COLORCYAN;
主力持仓:EMA(100*(CLOSE- LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34)),3),COLORFF00FF;
主力筹码集中度:WINNER(C)*100,COLORRED;
机构筹码集中度:EMA(WINNER(C)*70,3),LINETHICK2,COLORRED;
V1:=LLV(LOW,10);
V2:=HHV(HIGH,20);
lyf1:=EMA(((CLOSE-V1)/(V2-V1))*((-100)),3);
VARg5:=((CLOSE)/(REF(CLOSE,5))>=1.15);
VARg6:=BACKSET(VARg5,5);
入市日:=IF((VARg6 AND (COUNT(VARg6,5)=1) or (CLOSE>=HHV(HIGH,HIGH))
AND ((CLOSE)/(REF(CLOSE,1))>1.098) AND (REF(VOL,LOW)>REF(VOL,34))
AND (REF(VOL,LOW)>REF(VOL,1)) AND (LYF1>(-93))
AND (REF(VOL,LOW)>REF(VOL,8))),60,0);
DRAWTEXT(cross(入市日 ,(58)),20,'十年不败 '),colorgreen;
TYP:=(HIGH+LOW+CLOSE)/3;
C2:=(TYP-MA(TYP,M))/(0.015*AVEDEV(TYP,M));
DRAWTEXT(cross(C2,-70),5,'CCI牛启动 '),colorgreen;
庄筹线:=EMA(WINNER(C)*50,4);
散筹线:=EMA((WINNER(C*1.1)-WINNER(C*0.9))*50,4);
AA:= REF(庄筹线,30)>40 OR REF(庄筹线,20)>40;
DRAWTEXT(cross(庄筹线,散筹线),15,'庄筹 '),colorgreen;
K1:=CLOSE/REF(CLOSE,3)>=1.1;
D1:=BACKSET(K1,3);
加仓买:=IF((D1 AND COUNT(D1,13)=1),58,0);
D2:=CLOSE/REF(CLOSE,3)>=1.1;
D3:=BACKSET(D2,3);
短线买:=IF((D3 AND COUNT(D3,3)=1),45,0);
D4:=CLOSE/REF(CLOSE,3)>=1.1;
D5:=BACKSET(D4,3);
易涨停:=IF((D5 AND COUNT(D5,15)=1),30,0);
XG:=加仓买 AND 短线买 AND 易涨停;
DRAWTEXT(cross(XG,0),35,'加仓买 '),colorgreen;
参考低7:IF(TROUGHBARS(3,7,1)=0 AND HIGH>LOW+0.04,10,0);
VAR1:=(INDEXC-MA(INDEXC,58))/MA(INDEXC,58)<-0.152;
VAR2:=(C-EMA(C,58))/EMA(C,58)<-0.19;
底区:COUNT(VAR2 AND VAR1,2) ;
抄底:参考低7 AND 底区>1,COLORBLUE;
DRAWTEXT(抄底,1,'抄底'),COLORBLUE;
VAR3:=PEAKBARS(3,15,1)<10;
VAR5:=IF(VAR3=1,2,0);
顶:= IF(VAR5=2,2,0);
顶A:IF(顶>REF(顶,1),90,100),COLORGREEN;
DRAWTEXT(顶A=90,90,'卖'),COLORGREEN;