%>
M1:=13;
M2:=50;
M3:=120;
M4:=250;
MA1:=MA(CLOSE,M1);
MA2:MA(CLOSE,M2),COLOR40FF00;
MA3:MA(CLOSE,M3),COLORFF00FF,DOTLINE;
MA4:MA(CLOSE,M4),COLORFF8080,LINETHICK2;
MA250:=MA(C,250);
跌穿250:=CROSS(MA250,C);
年线之下天数:BARSLAST(跌穿250),NODRAW;
C2:=REF(C,1),NODRAW;
涨停:=REF(C,1)*1.1-C<0.01 AND H=C,NODRAW;
STICKLINE(涨停,OPEN,CLOSE,-1,0),COLORYELLOW;
STICKLINE(涨停,H,L,0,0),COLORYELLOW;
跌停:=IF((C2-C)*100/C2>=(10-0.01*100/C2) AND L=C,1,0),NODRAW;
STICKLINE(跌停,OPEN,CLOSE,-1,0),COLORFF0000;
STICKLINE(跌停,H,L,0,0),COLORFF0000;
所属地域:DRAWTEXT_FIX(ISLASTBAR ,0.93,0,1,DYBLOCK),COLORWHITE;
所属行业:DRAWTEXT_FIX(ISLASTBAR ,0.89,0,1,HYBLOCK),COLORWHITE;
所属概念:DRAWTEXT_FIX(ISLASTBAR ,0.85,0,1,GNBLOCK),COLORWHITE;
SSTS:=STRCAT(CON2STR(FINANCE(42)/1,0),'天');
LTSZ:=STRCAT(CON2STR(FINANCE(40)/100000000,0),'亿');
YSTB:=STRCAT(CON2STR(FINANCE(44)/1,2),'%');
LRTB:=STRCAT(CON2STR(FINANCE(43)/1,2),'%');
DRAWTEXT_FIX(1,0.02,0,0,'上市:'),COLORWHITE;
DRAWTEXT_FIX(1,0.04,0,0,SSTS),COLORWHITE;
DRAWTEXT_FIX(1,0.08,0,0,'流通市值:'),COLORWHITE;
DRAWTEXT_FIX(1,0.12,0,0,LTSZ),COLORWHITE;
DRAWTEXT_FIX(1,0.16,0,0,'营收同比:'),COLORWHITE;
DRAWTEXT_FIX(1,0.20,0,0,YSTB),COLORWHITE;
DRAWTEXT_FIX(1,0.24,0,0,'利润同比:'),COLORWHITE;
DRAWTEXT_FIX(1,0.28,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.43,0,0,'综合评估基本面:优秀!'),COLORMAGENTA;
DRAWTEXT_FIX(较好,0.43,0,0,'综合评估基本面:较好!'),COLORRED;
DRAWTEXT_FIX(一般,0.43,0,0,'综合评估基本面:一般!'),COLORGREEN;
DRAWTEXT_FIX(SY17,0.55,0,0,'是否具备高送转潜力:是!'),COLORMAGENTA;
DRAWTEXT_FIX(SY18,0.55,0,0,'是否具备高送转潜力:否!'),COLORGREEN;
VAR11:=3*SMA((C-LLV(L,180))/(HHV(H,180)-LLV(L,180))*100,5,1)
-2*SMA(SMA((C-LLV(L,180))/(HHV(H,180)-LLV(L,180))*100,180,1),15,1);
超级主升:=EMA(VAR11,5);
XG1:=CROSS(超级主升,100);
DRAWICON(XG1,0.98*LOW,1);
FL:=MA(CLOSE,17)+ABS(MA(CLOSE,17)-REF(MA(CLOSE,17),1));
FS:=MA(CLOSE,17)+MA(CLOSE,17)-REF(MA(CLOSE,17),1);
BB:=IF(MA(CLOSE,17)<FS,FS,MA(CLOSE,17));
NX:=EMA(C,250);
A:=BB-(EMA(C,3)-BB);
DIFF:=EMA((NX-(EMA(C,3)-NX)),5);
CC:=IF(BB=FS,BB,BB);
止损线:=EMA(COST(81),10);
牛熊线:=EMA(COST(27),120);
XG2:=CROSS(CC,DIFF);
DRAWICON(XG2,0.99*LOW,38);
{股票教程网-http://cgjcw.net承接通达信软件和公式破解,普通加密破解,完全加密破解,导入密码破解,时间限制破解,公式编写,可按您的要求写公式指标,价格按难度不同报价,有需要可以找我们}