DN:=5;
CJ:=(H+L+2*O+3*C)/7;
KN:=POW(HHV(H,18)/HHV(H,0),0.9);
短筹:SMA(SMA((PWINNER(36,0.66*CJ)+0.618*PWINNER(18,0.86*CJ))*61.8,1.2*DN,0.41*DN),2.2*DN,2.2*DN-1),COLORYELLOW;
抢筹:=IF(SLOPE(短筹,0.4*DN)>=0,SLOPE(短筹,0.4*DN)*POW(0.61*DN,1.5),0);
活筹:=0.28*短筹+4.62*抢筹-3;
上涨角:=HHV(ATAN(SLOPE(活筹,0.6*DN)*0.58)*180/3.14159,0.6*DN);
TT:=(上涨角+1.11*短筹)/1.916;
屯:=SMA(TT,2.4*DN,0.6*DN);
屯筹:(2.28*HHV(屯,1.6*DN)+SMA(屯,2.4*DN,1))/2.801,COLORRED;
QL:=(抢筹*0.8+SLOPE(短筹,0.4*DN)*(60-短筹)*0.8+SLOPE(屯筹,0.6*DN)*(88-屯筹)*0.55+SLOPE(屯,0.6*DN)*(屯-100)*0.2)*POW(DN/4.2,0.4)*KN;
潜筹:IF(SLOPE(QL,1.6*DN)>0,0.22*SMA(QL,2.4*DN,2.4*DN-1)+0.44*HHV(QL,1.6*DN)-4,0),COLORFF9977;
DBL:=IF(SLOPE(C,2)>0,SLOPE(C,2)*SLOPE(潜筹,2)/C,0)*1.5;
短背离:=0.618*HHV(DBL,9)+DBL;
QF:=BARSLAST(CROSS(75*KN,潜筹))+1;
潜伏期:=IF(QF=1,REF(QF,1)+1,QF);
潜深:=0.5*HHV(潜伏期,3.6*DN)+0.5*SMA(潜伏期,3.6*DN,1);
上浮力:IF(SLOPE(潜深,2)<0,KN*50*POW(-SLOPE(潜深,2),0.2),0),COLORMAGENTA,LINETHICK2;
KP:=BARSLAST(CROSS(短筹,屯筹*(KN-0.0495)))+1;
活跃期:BARSLAST(CROSS(上浮力,0.1))+1,LINETHICK0;
ZP:=SMA(MA(115*KN-屯筹*(KN-0.0495),KP)*0.6,1.8*DN,2);
庄筹派发:ZP+25,COLORWHITE;
背离:SMA(WINNER(0.993*C)*100-屯筹,3.6*DN,1.6*DN),LINETHICK2,COLORCYAN;
回马枪:=0.618*HHV(SLOPE(背离,2),9)+SLOPE(背离,2);
势:抢筹+SLOPE(屯筹,8)+POW(ABS(50-短筹)/39,3),COLORB0AFFF;
法:0.3*IF(回马枪*势>0,POW(回马枪*势,0.9),-POW(-回马枪*势,0.6)),LINETHICK0;
术:势*0.66+1.1*IF(短背离>0,POW(短背离,0.9),-POW(-短背离,0.6)),LINETHICK0;
潜筹涌动:=SMA(潜筹,1.8*DN,2);
XG:=SMA(V,4,3)<1.421*SMA(V,24,1);
牛市粗选:屯筹>88 AND 庄筹派发<46.7 AND 0.495*潜筹涌动+潜伏期>18.2 AND XG ,LINETHICK0;
熊市粗选:((回马枪>0 AND ABS(背离+3)>21) OR 法>2.07 OR 术>16) AND C/REF(C,1)>=1.048 AND 潜筹涌动>0 AND XG,LINETHICK0;
STICKLINE(术>0,术,0,2,0),COLOR0000FF;
STICKLINE(法>0,法,0,1,0),COLORWHITE;
IF(SLOPE(屯筹,2)<=0,屯筹,DRAWNULL),COLORBLUE;
DRAWICON(熊市粗选,-5,1);