DRAWTEXT_FIX(1,0.0,10.0,0,'减持信息：'),COLORWHITE;
DRAWTEXT_FIX(1,0.05,10.0,0,EXTERNSTR(0,3)),COLORWHITE;

年开盘:CONST(O#YEAR),NODRAW;
年最高:CONST(H#YEAR),COLORRED,NODRAW;
年最低:CONST(L#YEAR),COLORCYAN,NODRAW;
年最新:DYNAINFO(7),DOTLINE,NODRAW;
年开盘后净差:ABS(DYNAINFO(7)-O#YEAR),NODRAW,COLORMAGENTA;
年开盘后涨跌幅:(DYNAINFO(7)-O#YEAR)/O#YEAR*100,NODRAW,COLORCYAN;
年低点至今涨幅%:(C-(L#YEAR))/(L#YEAR)*100,NODRAW,COLORRED;
年高点至今跌幅%:((H#YEAR)-C)/(H#YEAR)*100,NODRAW,COLORGREEN;
{年涨跌}
年O:=O#YEAR,NODRAW;
年C:=C#YEAR,NODRAW;
年H:=H#YEAR,NODRAW;
年L:=L#YEAR,NODRAW;
高:=REFDATE(CONST(REF(HHV(H,DATE),DATE)),DATE),DOTLINE;
低:=REFDATE(CONST(REF(LLV(L,DATE),DATE)),DATE),DOTLINE;
GD:=CONST(FINDHIGH(H,0,高*DATE,1));
DB:=CONST(FINDLOW(L,0,低*DATE,1));
GT:=CONST(BARSLAST(GD=H))+1;
DT:=CONST(BARSLAST(DB=L))+1;
上:=CONST(HHV(H,0));
下:=CONST(LLV(L,0));
STICKLINE(CURRBARSCOUNT=DT,上,下,0,0),COLORWHITE;
STICKLINE(CURRBARSCOUNT=GT,上,下,0,0),COLORWHITE;

MID:=(3*C+L+O+H)/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;
线:=MA(牛,2);
STICKLINE(牛>=线 AND C STICKLINE(牛>=线 AND C>O,C,O,3,1),COLORFF00CC;
STICKLINE(牛>=线,H,MAX(C,O),0,0),COLORFF00CC;
STICKLINE(牛>=线,L,MIN(C,O),0,0),COLORFF00CC;
STICKLINE(牛<线 AND C STICKLINE(牛<线 AND C>O,C,O,3,1),COLORCYAN;
STICKLINE(牛<线,H,MAX(C,O),0,0),COLORCYAN;
STICKLINE(牛<线,L,MIN(C,O),0,0),COLORCYAN;
DRAWTEXT(YEAR!=REF(YEAR,1),H+0.3,VARCAT(VAR2STR(YEAR,0),' 年 ')),COLORWHITE;
STICKLINE(YEAR!=REF(YEAR,1)=1,CONST(HHV(H,0)),CONST(LLV(L,0)),0,0),COLORRED;
成本:DMA(AMOUNT/(100*VOL),VOL/CAPITAL),COLORYELLOW,LINETHICK1;
DRAWTEXT(CURRBARSCOUNT=1,成本,STRCAT(' ',CON2STR(成本,2))),COLORLIRED;
涨停:=IF(REF(C,1)*1.095-C<0.01,1,0);
STICKLINE(涨停,O,C,3,0),COLORLIRED;
STICKLINE(涨停,O,C,3,0),COLORLIRED;
C3:=REF(C,1);
跌停:=IF((C3-C)*100/C3>=(10-0.01*100/C3),1,0);
STICKLINE(跌停,O,C,3,0),COLORGREEN;
STICKLINE(跌停,O,C,3,0),COLORGREEN;

天:MA(C,10),COLOR008000,LINETHICK3;
人:HHV(天,5),COLOR007AAA,LINETHICK3;
地:天-(人-天),COLOR000088,LINETHICK3;
DRAWTEXT(人=地 AND REF(人,1)>REF(地,1),地,'进'),COLORYELLOW;
DRAWTEXT(人>地 AND REF(人,1)=REF(地,1),人*1.02,'抛'),COLORYELLOW;
DRAWTEXT(CURRBARSCOUNT=1,天,STRCAT('  ',CON2STR(天,2))),COLORGREEN;
DRAWTEXT(CURRBARSCOUNT=1,人,STRCAT('  ',CON2STR(人,2))),COLOR007FFF;
DRAWTEXT(CURRBARSCOUNT=1,地,STRCAT('  ',CON2STR(地,2))),COLORRED;

P1:=C>REF(C,4);
P2:=BARSLASTCOUNT(P1);
DRAWTEXT(P2=9,H+H*0.02,'★9'),COLORYELLOW;
Z1:=C Z2:=BARSLASTCOUNT(Z1);
DRAWTEXT(Z2=9,L-L*0.02,'★9'),COLORYELLOW;

T:=FINDHIGHBARS(H,30,30,1);
A:DRAWLINE(CURRBARSCOUNT=CONST(T)+1,H,ISLASTBAR,REF(H,T),0),COLORGRAY,LINETHICK1;
DRAWTEXT(CURRBARSCOUNT=1,A,STRCAT(' ',CON2STR(A,2))),COLORYELLOW;
TT:=BARSLAST(C>A*1.014 AND L TA:=BARSLAST(CROSS(A!=DRAWNULL,0.5));
TJ:=VOL=HHV(VOL,T+1) AND TA>28;
T1:=COUNT(EXPMA(C,2)>=A,TA+1)=1 AND EXPMA(C,2)>=A*1.01;
E1:=EXPMA(C,TA+1);
CJ:=(A/E1-1) *100 ;
HH:=HHV(CJ,10);
XG:=COUNT(TT=0,T+1)=1 AND TT=0 AND TJ AND T1 AND HH<20;
STICKLINE(XG,H,L,0,0),COLORFF00FF;
STICKLINE(XG,C,O,3,0),COLOR990099;
STICKLINE(XG,C,O,2,0),COLORBB00BB;
STICKLINE(XG,C,O,1,0),COLORDD00DD;
STICKLINE(XG,C,O,0.3,0),COLORFF00FF;

N:=13;
AA:=REF(H,N)=HHV(H,2*N+1);
BB:=BACKSET(AA,N+1);
CC:=FILTER(BB,N) AND H=HHV(H,N+1);
DD:=BARSLAST(CC);
EE:=IF(CC,CURRBARSCOUNT,0);
AA1:=REF(L,N)=LLV(L,2*N+1);
BB1:=BACKSET(AA1,N+1);
CC1:=FILTER(BB1,N) AND L=LLV(L,N+1);
DD1:=BARSLAST(CC1);
EE1:=IF(CC1,CURRBARSCOUNT,0);
FF1:=IF(DD1,REF(EE1,DD1),EE1);
GG1:=IF(DD,REF(EE,DD),EE);
SS1:=REF(GG1,DD+1);
SS