{涨家:INDEXADV,NODRAW,COLORRED;
跌家:INDEXDEC,NODRAW,COLOR00FFFF;}A:=(3*C+L+O+H)/6;X:=(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;主力成本:EMA(X,13),COLORFF00FF,LINETHICK1;N10:=3;N20:=6;N3:=12;N4:=24;BBI:(MA(CLOSE,N10)+MA(CLOSE,N20)+MA(CLOSE,N3)+MA(CLOSE,N4))/4,COLORRED,LINETHICK2;BB:=BBI<REF(BBI,1);IF(BB,BBI,DRAWNULL)COLORGREEN,LINETHICK2;DRAWICON(REF(BB,1)=1 AND BBI>REF(BBI,1),BBI*0.99,23);DRAWKLINE(H,O,L,C);AH:=HHV(H,60);AL:=LLV(L,60);A0:=(AH-AL)/21;{JJR5}均价:=(2*C+(C+H+L+O)/4+O)/4;JJR1:=(2*L+3*均价)/5;JJR2:=(2*H+3*均价)/5;JJR3:=ABS(均价-MA((JJR1+JJR2)/2,20))/MA((JJR1+JJR2)/2,20);JJR4:=DMA(均价,JJR3);JJR5:(1+7/100)*JJR4,COLORRED,LINETHICK2;IF(JJR5<REF(JJR5,1),JJR5,DRAWNULL),LINETHICK2,COLORWHITE;C7:=REF(C,1);ZT:=IF((C-C7)*100/C7>=(10-0.01*100/C7),1,0);STICKLINE(ZT,OPEN,CLOSE,2.0,0) ,COLORYELLOW;{堆量}V5:=MA(V,5);V10:=MA(V,10);D1:=V>REF(HHV(V,2),1) AND RANGE(V5,V10,V) AND UPNDAY(V5,2) AND UPNDAY(V10,2);D2:=H>REF(HHV(H,2),1);KMAX:=MAX(C,O);D3:=KMAX>REF(HHV(KMAX,2),1);DA:=D1 AND D2 AND D3;P1:=BARSLAST(DA=1);P2:=REF(REF(H,1),P1);DB:=IF(DA,0,IF(C<P2,1,0));{堆量确定};LJ:=REF(HHV(H,P1+1),BARSLAST(DB));NOTEXT:LJ;DRAWICON(IF(C>LJ,IF(REF(KMAX<LJ,1),1,0),0),L,18);{趋势评分}X01:=IF(MA(C,5)>MA(C,10),20,0);X02:=IF(MA(C,20)>MA(C,60),10,0);X3:=IF(KDJ.J>KDJ.K,10,0);X4:=IF(MACD.DIF>MACD.DEA,10,0);X05:=IF(MACD.MACD>0,10,0);X6:=IF(V>MA(V,60),10,0);X7:=IF(WINNER(C)>0.5,10,0);X8:=IF(C/REF(C,1)>1.03,10,0);XX:=X01+X02+X3+X4+X05+X6+X7+X8;DRAWTEXT_FIX(V>O,0.4,0.05,0,STRCAT('趋势评分： ',STRCAT(CON2STR(XX,0),' '))),COLORYELLOW;{主力洗盘线:MA(C,170),LINETHICK2;}资金异动线:MA(C,136),COLORGREEN,LINETHICK2;{擒龙跟庄}主力攻击线:MA(C,5),DOTLINE,COLORWHITE;主力控盘线:MA(CLOSE,18),COLORYELLOW,LINETHICK2;IF(主力攻击线<主力控盘线 OR 主力攻击线<=MA(主力攻击线,5),主力攻击线,DRAWNULL),COLORYELLOW;HJ_1:=C/REF(C,1)>=1.038 AND C=H;HJ_22:=COUNT(HJ_1,2)>=1 AND NOT(COUNT(HJ_1,3)>=2);启:=FILTER(HJ_22,13),COLORDDDDDD;HJ_23:=COUNT(HJ_1,3)>=2 AND NOT(COUNT(HJ_1,4)>=3);升:=FILTER(HJ_23,13),COLORGREEN;龙头启动:=启 AND COUNT(启,18)=1,COLORWHITE;主升:=升 AND COUNT(升,18)=1;龙头主升:主升,COLORYELLOW,NODRAW;STICKLINE(HJ_1 AND C>主力攻击线,C,O,2,0),COLORFF00FF;STICKLINE(HJ_1 AND C>主力攻击线,C,O,2.5,0),COLORDA70D6;STICKLINE(HJ_1 AND C>主力攻击线,C,O,2,0),COLOREE82EE;STICKLINE(HJ_1 AND C>主力攻击线,C,O,1.2,0),COLORD8BFD8;STICKLINE(HJ_1 AND C>主力攻击线,C,O,0.5,0),COLORF8F8FF;STICKLINE(HJ_1 AND C>主力攻击线,C,O,0.05,0),COLORFFFFFF;STICKLINE(启 AND COUNT(启,18)=1,O,C,2,0),COLORYELLOW;STICKLINE(启 AND COUNT(启,18)=1,O,C,0.8,0),COLORF8F8FF;STICKLINE(启 AND COUNT(启,18)=1,O,C,0.2,0),COLORFFFFFF;DRAWICON(龙头启动,L,34);LC:=REF(CLOSE,1);VAR28:=SMA(MAX(CLOSE-LC,0),5.5,1)/SMA(ABS(CLOSE-LC),6,1)*100;DRAWTEXT(CROSS(84,RSI) AND CROSS(76,VAR28),H*1.01,'卖出'),LINETHICK4,COLORGREEN;DRAWTEXT(龙头主升,L*0.99,'★'),COLORYELLOW,LINETHICK2;{补仓卖}VAB0:=531;VAB1:=1510000;VAB2:=VAB0 + VAB1;VAB3:=IF(DATE > VAB2,0,1);VARA12:=SMA(H,10,9)*VAB3;VARA13:=SMA(L,10,9)*VAB3;卖价:VARA12,COLORRED,NODRAW;补仓:VARA13,COLORGREEN,NODRAW;DRAWTEXT_FIX(1,0.75,0.05,0,STRCAT('补仓:',STRCAT(CON2STR(补仓,2),' '))),COLORRED;DRAWTEXT_FIX(1,1,0.05,0,STRCAT('卖价:',STRCAT(CON2STR(卖价,2),' '))),COLORGREEN;竞价额:=DYNAINFO(15)/10000;{万元}DRAWTEXT_FIX(C>0,0.59,0.05,0,VARCAT(VARCAT('竞价: ',VAR2STR(竞价额,0)),' 万')),COLORMAGENTA;DRAWTEXT_FIX(V>O,0,0,0,STRCAT('属概念板块： ',GNBLOCK)),COLORRED;
