DRAWGBK(C>0,RGB(150,100,0),RGB(50,100,0),0,'',0);{盖世英雄}AA:=EMA(INDEXC,300)/EMA(C,300);XC:=(INDEXC/AA);大盘:EMA(XC,10),COLORWHITE;BB:=(H+L+2*C)/4,COLORBLUE;DRAWBAND(大盘,RGB(50,150,0),LLV(L,600),RGB(250,200,0));
{牛线}A:=(20 * H) + 19 * (REF(H,1)) + 18 * (REF(H,2)) + 17 * (REF(H,3)) + 16 * (REF(H,4)) + 15 * (REF(H,5)) + 14 * (REF(H,6)) + 13 * (REF(H,7)) + 12 * (REF(H,8)) + 11 * (REF(H,9));B:=10 * (REF(H,10)) + 9 * (REF(H,11)) + 8 * (REF(H,12)) + 7 * (REF(H,13)) + 6 * (REF(H,14)) + 5 * (REF(H,15)) + 4 * (REF(H,16)) + 3 * (REF(H,17)) + 2 * (REF(H,18)) + REF(H,20);AAAR5:=(A+ B) / 210;DRAWBAND(IF(((EMA(AAAR5,90)) - ((((C - (EMA(AAAR5,90))) * C) - (EMA(AAAR5,90))) / (EMA(AAAR5,90))))>(EMA(AAAR5,90)),((EMA(AAAR5,90)) - ((((C - (EMA(AAAR5,90))) * C) - (EMA(AAAR5,90))) / (EMA(AAAR5,90)))),(EMA(AAAR5,90))),RGB(0,0,0),(EMA(AAAR5,90)),RGB(250,200,0));龙线:MA(C,240),COLOR00FF00,LINETHICK2;牛线:EMA(AAAR5,90),LINETHICK1,COLORYELLOW;相对:=(牛线-(((C-牛线)*C)-牛线)/牛线),COLORYELLOW;缠牛线:IF(相对>牛线,相对,牛线),COLOR00AAAA;重心:=(C+0.618*REF(C,1)+0.382*REF(C,2)+0.236*REF(C,3)+0.146*REF(C,4))/2.382,COLORRED,LINETHICK1;GAO:=HHV(C,60)-LLV(C,60);RSI:=SMA(MAX(重心-REF(重心,1),0),5,1)/SMA(ABS(重心-REF(重心,1)),5,1);准线:EMA(((SLOPE(CLOSE,22) * 20) + CLOSE),55),COLORFFAA00,LINETHICK1;缠准:=重心+GAO*(RSI-0.5),COLOR999900,LINETHICK1;缠准线:IF(准线>REF(准线,1) AND C>牛线,缠准,准线),COLOR999900;EMA(AAAR5,90),LINETHICK2,COLORYELLOW;DRAWKLINE(HIGH,OPEN,LOW,CLOSE);
{彩K}XG1:=C/REF(C,1)>1.0618;STICKLINE(XG1,L,H,0,1),COLOR0088EE;STICKLINE(XG1,CLOSE,OPEN,3,0),COLOR0055AA;STICKLINE(XG1,CLOSE,OPEN,2.8,0),COLOR0066BB;STICKLINE(XG1,CLOSE,OPEN,2.5,0),COLOR0077CC;STICKLINE(XG1,CLOSE,OPEN,2.2,0),COLOR0088DD;STICKLINE(XG1,CLOSE,OPEN,1.7,0),COLOR0099EE;STICKLINE(XG1,CLOSE,OPEN,1.2,0),COLOR00AAFF;STICKLINE(XG1,CLOSE,OPEN,0.7,0),COLOR00CCFF;STICKLINE(XG1,CLOSE,OPEN,0.2,0),COLOR00FFFF;涨停:=BETWEEN(CLOSE/REF(CLOSE,1),1.0989,1.110) AND C=H AND C>=O;STICKLINE(涨停,H,L,0,1),COLORRED;IF(准线>=REF(准线,1) AND C>牛线,缠准,准线),COLOR999900;IF(准线< REF(准线,1),准线,DRAWNULL),COLORFFAA00,LINETHICK2;IF(准线>=REF(准线,1),准线,DRAWNULL),COLOR0000FF,LINETHICK2;
{周KDJ}
RSV周:=(CLOSE-LLV(LOW,45))/(HHV(HIGH,45)-LLV(LOW,45));K周:=SMA(RSV周,15,1),COLORFF00FF,LINETHICK1;D周:=SMA(K周,15,1),COLORWHITE,LINETHICK3;J周:=3*K周-2*D周;DRAWICON(CROSS(C,缠牛线) AND (牛线>龙线 OR (C>龙线 AND C>牛线)),牛线*1.05,14);DRAWICON(CROSS(C,大盘) AND C>缠牛线,牛线,31);{走强};
{所属板块、概念}DRAWTEXT_FIX(1,0.005,0,0,'所属风格:'),COLORRED;DRAWTEXT_FIX(1,0.06,0,0,FGBLOCK),COLORRED;DRAWTEXT_FIX(1,0.005,0.06,0,'所属概念:'),COLORMAGENTA;DRAWTEXT_FIX(1,0.06,0.06,0,GNBLOCK),COLORMAGENTA;DRAWTEXT_FIX(1,0.005,0.12,0,'所属板块:'),COLORYELLOW;DRAWTEXT_FIX(1,0.06,0.12,0,DYBLOCK),COLORYELLOW;DRAWTEXT_FIX(1,0.11,0.12,0,HYBLOCK),COLORYELLOW;
{流通盘} DRAWTEXT_FIX(1,0.42,0.05,0,'流通股'),COLORYELLOW;DRAWNUMBER_FIX(1,0.47,0.05,0,CONST(FINANCE(7)/100000000)),COLORYELLOW;DRAWTEXT_FIX(1,0.42,0.0,0,STRCAT(STRCAT('流通盘：',CON2STR((FINANCE(46)*C/100000000),2)),'亿')),COLORYELLOW;YSTB:=STRCAT(CON2STR(FINANCE(44)/1,2),'%');LRTB:=STRCAT(CON2STR(FINANCE(43)/1,2),'%');DRAWTEXT_FIX(1,0.6,0,0,'营收同比：'),COLORWHITE;DRAWTEXT_FIX(1,0.66,0,0,YSTB),COLORWHITE;DRAWTEXT_FIX(1,0.74,0,0,'利润同比：'),COLORWHITE;DRAWTEXT_FIX(1,0.8,0,0,LRTB),COLORWHITE;净资收益率:=(FINANCE(33)/FINANCE(34)*100);主营利润率:=(FINANCE(23)/FINANCE(20)*100);主营业增长率:=FINANCE(44);每股净资产:=CONST(FINANCE(34));每股收益:=CONST(FINANCE(38));净利润增长率:=FINANCE(43);市销率:=CONST(FINANCE(1)*DYNAINFO(7)/FINANCE(20));现金负债比:=(FINANCE(25)/FINANCE(15));每股未分配:=CONST(FINANCE(32));每股公积金:=CONST(FINANCE(18));SY01:=净资收益率>3;SY02:=净资收益率>0.01 AND 净资收益率<=3;SY03:=主营利润率>2;SY04:=主营利润率>0;SY05:=主营业增长率>1;SY06:=主营业增长率>0;SY07:=净利润增长率>2;SY08:=净利润增长率>0.2;SY09:=每股收益>0.01;SY10:= 每股收益>0.001;SY11:=每股净资产>2;SY12:=每股净资产>0.01;SY13:=每股未分配>0.5;SY14:=每股未分配>0.001;SY15:=每股公积金>0.5;SY16:=每股公积金>0.002;SY17:=每股未分配>=2 AND 每股公积金>=2;SY18:=每股未分配< 2 OR 每股公积金< 2;优秀:=SY01 AND SY03 AND SY05 AND SY07 AND SY09 AND SY11 AND SY13 AND SY15;较好:=SY02 AND SY04 AND SY06 AND SY08 AND SY10 AND SY12 AND SY14 AND SY16;一般:=NOT(优秀) AND NOT(较好);DRAWTEXT_FIX(优秀 AND 较好=0,0.6,0.05,0,'综合评估基本面：优秀！'),COLORMAGENTA;DRAWTEXT_FIX(较好,0.6,0.05,0,'综合评估基本面：较好！'),COLORRED;DRAWTEXT_FIX(一般,0.6,0.05,0,'综合评估基本面：一般！'),COLORGREEN;DRAWTEXT_FIX(SY17,0.74,0.05,0,'是否具备高送转潜力：是！'),COLORMAGENTA;DRAWTEXT_FIX(SY18,0.74,0.05,0,'是否具备高送转潜力：否！'),COLORGREEN;{DRAWTEXT_FIX(1,0,5,0,'~☆~ 买入不下准线涨个不停个股=买点在60KD金叉且缠准线V型反转时 ~☆~'),COLORRED;};
