通达信A股避雷针特级副图指标及时识别持仓个股的风险远离退市垃圾上市公司

打开个股，副图自动显示个股所有雷区，包括“业绩爆雷”“带帽爆雷”“退市爆雷”“解禁爆雷”“增发爆雷”“减持爆雷”....

经测试，指标适用于通达信 7.602 以上版本，以下版本数据显示不完整

{板块划分}

行业成分:=BLOCKSETNUM(HYBLOCK); {行业成分股数}

STR:=VARCAT(VARCAT('(',VAR2STR(行业成分,0)),'家)');

行业:DRAWTEXT_FIX(ISLASTBAR,0.01,0.00,0,VARCAT(VARCAT(SUBSTR(DYBLOCK,1,4),VARCAT(':',HYBLOCK)),STR)),COLOR00FFFF;

STRGN:=IF(STRLEN(GNBLOCK)<90,GNBLOCK,SUBSTR(GNBLOCK,1,90));
STRGN1:=IF(STRLEN(GNBLOCK)>=90,SUBSTR(GNBLOCK,90,STRLEN(GNBLOCK)-90),'');

概念:DRAWTEXT_FIX(ISLASTBAR,0.01,0.13,0,VARCAT('概念:',STRGN)),COLOR00FFFF;
概念2:DRAWTEXT_FIX(ISLASTBAR AND STRLEN(GNBLOCK)>=90,0.03,0.21,0,STRGN1),COLOR00FFFF;

主营:DRAWTEXT_FIX(ISLASTBAR,0.01,0.32,0,VARCAT('主营:',MAINBUSINESS)),COLOR00FFFF;
{风格:DRAWTEXT_FIX(ISLASTBAR,0.01,0.90,0,VARCAT('风格:',FGBLOCK)),COLOR00FFFF;}

安全分1: DRAWTEXT_FIX(SAFESCORE<60,0.99,0.02,1,VARCAT('安全分:',VAR2STR(SAFESCORE,0))),COLOR00FF00;
安全分2: DRAWTEXT_FIX(RANGE(SAFESCORE,60,80),0.99,0.02,1,VARCAT('安全分:',VAR2STR(SAFESCORE,0))),COLOR00FFFF;
安全分3: DRAWTEXT_FIX(SAFESCORE>=80,0.99,0.02,1,VARCAT('安全分:',VAR2STR(SAFESCORE,0))),COLOR0000FF;

最近财报:DRAWTEXT_FIX(FINANCE(80)>0,0.68,0.0,0,VARCAT('最近财报:',VARCAT(VAR2STR(FINANCE(80),0),'天前'))),COLOR8080FF;

近期解禁:DRAWTEXT_FIX(GPONEDAT(27)>0,0.68,0.15,0,VARCAT(VARCAT('最新解禁日:',VARCAT(VAR2STR(GPONEDAT(26),0),'(')),VARCAT(VAR2STR(GPONEDAT(27),0),'万股)'))),COLOR00FF00;

上次解禁:DRAWTEXT_FIX(FINANCE(86)>0,0.68,0.30,0,VARCAT(VARCAT('上次解禁距今:',VAR2STR(FINANCE(86),0)),'天前')),COLOR8080FF;

上次定增:DRAWTEXT_FIX(FINANCE(87)>0,0.68,0.45,0,VARCAT(VARCAT('上次定增距今:',VAR2STR(FINANCE(87),0)),'天前')),COLOR8080FF;

上次停牌:DRAWTEXT_FIX(FINANCE(84)>0,0.68,0.60,0,VARCAT(VARCAT('上次停牌距今:',VAR2STR(FINANCE(84),0)),'天前')),COLOR8080FF;

STR08:=VARCAT( IF(FINDSTR(FGBLOCK,'定增预案'),'定增预案 ',''),IF(FINDSTR(FGBLOCK,'定增股'),'定增股',''));

定增:DRAWTEXT_FIX(ISLASTBAR,0.68,0.75,0,STR08),COLOR00FF00;

STR09:=VARCAT( IF(FINDSTR(FGBLOCK,'配股预案'),'配股预案 ',''),IF(FINDSTR(FGBLOCK,'配股股'),'配股股',''));

配股:DRAWTEXT_FIX(ISLASTBAR,0.68,0.85,0,STR09),COLOR00FF00;

STR10:=VARCAT( IF(FINDSTR(FGBLOCK,'重组预案'),'重组预案 ',''),IF(FINDSTR(FGBLOCK,'重组股'),'重组股',''));

重组:DRAWTEXT_FIX(ISLASTBAR,0.68,0.95,0,STR10),COLOR00FFFF;

{下一报告期:DRAWTEXT_FIX(FINANCE(85)>0,0.01,0.20,0,VARCAT(VARCAT('下一报告期:',VAR2STR(FINANCE(85),0)),'天')),COLOR00FFFF;};

实控人01:=EXTERNSTR(0,16);
实控人:DRAWTEXT_FIX(ISLASTBAR AND (FINDSTR(实控人01,'国') OR FINDSTR(实控人01,'政')),0.01,0.65,0,实控人01),COLOR0000FF;

实控人02:=EXTERNVALUE(0,16);
实控人比例:DRAWTEXT_FIX(ISLASTBAR AND (FINDSTR(实控人01,'国') OR FINDSTR(实控人01,'政')),0.11,0.65,0,VARCAT(VAR2STR(实控人02,2),'%')),COLOR0000FF;

{基金比例}

总市值_亿0:=CLOSE*FINANCE(1);

基金家数0:=FINVALUE(254);
基金持股0:=FINVALUE(255)*C/100000000;
基金比例0:=(FINVALUE(255)*C/总市值_亿0)*100;

STR21:=VARCAT(VARCAT(VARCAT('基金家数:',VAR2STR(基金家数0,0)),VARCAT(' 基金比例%:',VAR2STR(基金比例0,1))),VARCAT(' 基金持股_亿:',VAR2STR(基金持股0,1)));
基金持仓:DRAWTEXT_FIX(ISLASTBAR AND 基金比例0>0,0.01,0.80,0,STR21),COLORFF00FF;

社保家数0:=FINVALUE(256);
社保持股0:=FINVALUE(257)*C/100000000;
社保比例0:=(FINVALUE(257)*C/总市值_亿0)*100;

STR22:=VARCAT(VARCAT(VARCAT('社保家数:',VAR2STR(社保家数0,0)),VARCAT(' 社保比例%:',VAR2STR(社保比例0,1))),VARCAT(' 社保持股_亿:',VAR2STR(社保持股0,1)));
社保持仓:DRAWTEXT_FIX(ISLASTBAR AND 社保比例0>0,0.01,0.72,0,STR22),COLOR4080FF;

{基金家数:DRAWTEXT_FIX(ISLASTBAR AND 基金家数0>0,0.01,0.80,0,VARCAT('基金家数:',VAR2STR(基金家数0,0))),COLORFF00FF;
基金比例%:DRAWTEXT_FIX(ISLASTBAR AND 基金比例0>0,0.11,0.80,0,VARCAT('基金比例%:',VAR2STR(基金比例0,1))),COLORFF00FF;
基金持股_亿:DRAWTEXT_FIX(ISLASTBAR AND 基金持股0>0,0.21,0.80,0,VARCAT('基金持股_亿:',VAR2STR(基金持股0,1))),COLORFF00FF;}

STR12:=VARCAT(VARCAT( IF(FINDSTR(FGBLOCK,'保险重仓'),'保险重仓 ',''),IF(FINDSTR(FGBLOCK,'保险新进'),'保险新进 ','')),VARCAT(IF(FINDSTR(FGBLOCK,'北上重仓'),'北上重仓 ',''),IF(FINDSTR(FGBLOCK,'券商重仓'),'券商重仓','')));

DRAWTEXT_FIX(ISLASTBAR,0.01,0.90,0,STR12),COLOR00FFFF;

STR13:=VARCAT(VARCAT( IF(FINDSTR(FGBLOCK,'参股金融'),'参股金融 ',''),IF(FINDSTR(FGBLOCK,'被举牌'),'被举牌 ','')),VARCAT(IF(FINDSTR(FGBLOCK,'回购计划'),'回购计划 ',''),IF(FINDSTR(FGBLOCK,'发可转债'),'发可转债','')));

DRAWTEXT_FIX(ISLASTBAR,0.11,0.90,0,STR13),COLOR00FFFF;

STR14:=IF(FINDSTR(FGBLOCK,'社保重仓'),'社保重仓',IF(FINDSTR(FGBLOCK,'社保新进'),'社保新进',''));

DRAWTEXT_FIX(ISLASTBAR,0.21,0.90,0,STR14),COLOR00FFFF;

STR15:=VARCAT(VARCAT( IF(FINDSTR(FGBLOCK,'基金重仓'),'基金重仓 ',''),IF(FINDSTR(FGBLOCK,'基金增仓'),'基金增仓 ','')),VARCAT(IF(FINDSTR(FGBLOCK,'基金减仓'),'*基金减仓',''),IF(FINDSTR(FGBLOCK,'密集调研'),'密集调研','')));

基金:DRAWTEXT_FIX(ISLASTBAR,0.25,0.80,0,STR15),COLORFFFFFF;

STR16:=VARCAT(VARCAT( IF(FINDSTR(FGBLOCK,'证金汇金'),'证金汇金 ',''),IF(FINDSTR(FGBLOCK,'国开持股'),'国开持股 ','')),VARCAT(IF(FINDSTR(FGBLOCK,'养老金持股'),'养老金持股',''),IF(FINDSTR(FGBLOCK,'个人持股'),'个人持股','')));

持股:DRAWTEXT_FIX(ISLASTBAR,0.01,0.55,0,STR16),COLOR0000FF;

{近期风格}

{绘制利润表格框，白色}
DRAWRECTREL(810,10,997,999,0);
DRAWRECTREL(870,130,997,999,0);
DRAWRECTREL(930,130,997,999,0);

DRAWRECTREL(810,10,997,130,0);

昨日上榜0:=IF(FINDSTR(FGBLOCK,'昨日上榜'),1,0);
昨日上榜:DRAWTEXT_FIX(ISLASTBAR AND 昨日上榜0,0.82,0.15,0,'昨日上榜'),COLOR00FFFF;

最近多板0:=IF(FINDSTR(FGBLOCK,'最近多板'),1,0);
最近多板:DRAWTEXT_FIX(ISLASTBAR AND 最近多板0,0.82,0.25,0,'最近多板'),COLOR00FFFF;

昨高换手0:=IF(FINDSTR(FGBLOCK,'昨高换手'),1,0);
昨高换手:DRAWTEXT_FIX(ISLASTBAR AND 昨高换手0,0.82,0.35,0,'昨高换手'),COLOR00FF00;

昨日跌停0:=IF(FINDSTR(FGBLOCK,'昨日跌停'),1,0);
昨日跌停:DRAWTEXT_FIX(ISLASTBAR AND 昨日跌停0,0.82,0.45,0,'昨日跌停'),COLOR00FF00;

{风险}
摘帽0:=FINDSTR(FGBLOCK,'摘帽');
摘帽:DRAWTEXT_FIX(ISLASTBAR AND 摘帽0,0.90,0.02,0,'ST摘帽'),COLOR00FFFF;

风险提示0:=FINDSTR(FGBLOCK,'风险提示');
风险提示:DRAWTEXT_FIX(ISLASTBAR AND 风险提示0,0.94,0.15,0,'风险提示'),COLORFF8080;

行业龙头0:=FINDSTR(FGBLOCK,'行业龙头');
行业龙头:DRAWTEXT_FIX(ISLASTBAR AND 行业龙头0,0.13,0.00,0,'行业龙头'),COLOR0000FF;

高股息股0:=FINDSTR(FGBLOCK,'高股息股');
高股息股:DRAWTEXT_FIX(ISLASTBAR AND 高股息股0,0.82,0.02,0,'高股息股'),COLOR0000FF;

STR01:=IF(FINDSTR(FGBLOCK,'亏损股'),'亏损股',IF(FINDSTR(FGBLOCK,'微利股'),'微利股',''));

业绩分类:DRAWTEXT_FIX(ISLASTBAR ,0.82,0.65,0,STR01),COLOR00FF00;

STR07:=VARCAT(VARCAT( IF(FINDSTR(FGBLOCK,'破净资产'),'*破净 ',''),IF(FINDSTR(FGBLOCK,'破发行价'),'*破发 ','')),IF(FINDSTR(FGBLOCK,'破增发价'),'*破增发',''));

破净:DRAWTEXT_FIX(ISLASTBAR,0.82,0.75,0,STR07),COLOR00FF00;

STR02:=IF(FINDSTR(FGBLOCK,'连续亏损'),'*连续亏损',IF(FINDSTR(FGBLOCK,'持续增长'),'持续增长',''));

连续业绩:DRAWTEXT_FIX(ISLASTBAR,0.88,0.25,0,STR02),COLOR00FFFF;

业绩预升0:=IF(FINDSTR(FGBLOCK,'业绩预升'),1,0);
业绩预升:DRAWTEXT_FIX(ISLASTBAR AND 业绩预升0,0.94,0.15,0,'业绩预升'),COLOR0000FF;

STR03:=VARCAT(IF(FINDSTR(FGBLOCK,'业绩预增'),'业绩预增',IF(FINDSTR(FGBLOCK,'业绩预降'),'*业绩预降','')),IF(FINDSTR(FGBLOCK,'预计扭亏'),'预计扭亏',IF(FINDSTR(FGBLOCK,'预计转亏'),'*预计转亏','')));
业绩:DRAWTEXT_FIX(ISLASTBAR,0.88,0.35,0,STR03),COLOR00FFFF;

券商金股0:=IF(FINDSTR(FGBLOCK,'券商金股'),1,0);
券商金股:DRAWTEXT_FIX(ISLASTBAR AND 券商金股0,0.94,0.25,0,'券商金股'),COLOR00FFFF;

STR17:=VARCAT( IF(FINDSTR(FGBLOCK,'沪股通标的'),'沪股通标的 ',''),IF(FINDSTR(FGBLOCK,'深股通标的'),'深股通标的 ',''));
沪深股通:DRAWTEXT_FIX(ISLASTBAR,0.94,0.35,0,STR17),COLOR00FFFF;

STR19:=VARCAT( IF(FINDSTR(FGBLOCK,'预计扭亏'),'预计扭亏 ',''),IF(FINDSTR(FGBLOCK,'预计转亏'),'*预计转亏',''));

扭亏转亏:DRAWTEXT_FIX(ISLASTBAR ,0.94,0.55,0,STR19),COLOR00FFFF;

STR20:=VARCAT( IF(FINDSTR(FGBLOCK,'即将解禁'),'*即将解禁 ',''),IF(FINDSTR(FGBLOCK,'近已解禁'),'近已解禁',''));

解禁:DRAWTEXT_FIX(ISLASTBAR,0.88,0.45,0,STR20),COLOR00FFFF;

戴帽风险0:=IF(INBLOCK('戴帽风险'),1,0);
戴帽风险:DRAWTEXT_FIX(ISLASTBAR AND 戴帽风险0,0.93,0.55,0,'戴帽爆雷'),COLOR00FF00;

STR18:=VARCAT(VARCAT( IF(FINDSTR(FGBLOCK,'股东增持'),'股东增持 ',''),IF(FINDSTR(FGBLOCK,'股东减持'),'*股东减持 ','')),VARCAT(IF(FINDSTR(FGBLOCK,'拟增持'),' 拟增持',''),IF(FINDSTR(FGBLOCK,'拟减持'),' *拟减持','')));

股东持股:DRAWTEXT_FIX(ISLASTBAR ,0.88,0.65,0,STR18),COLOR00FFFF;

{股东增持0:=IF(FINDSTR(FGBLOCK,'股东增持'),1,0);
股东增持:DRAWTEXT_FIX(ISLASTBAR AND 股东增持0,0.88,0.65,0,'股东增持'),COLOR00FF00;

股东减持0:=IF(FINDSTR(FGBLOCK,'股东减持'),1,0);
股东减持:DRAWTEXT_FIX(ISLASTBAR AND 股东减持0,0.88,0.65,0,'股东减持'),COLOR00FF00;

拟增持0:=IF(FINDSTR(FGBLOCK,'拟增持'),1,0);
拟增持:DRAWTEXT_FIX(ISLASTBAR AND 拟增持0,0.93,0.65,0,'拟增持'),COLOR00FFFF;

拟减持0:=IF(FINDSTR(FGBLOCK,'拟减持'),1,0);
拟减持:DRAWTEXT_FIX(ISLASTBAR AND 拟减持0,0.94,0.65,0,' *拟减持'),COLOR00FF00;}

STR11:=VARCAT(VARCAT( IF(FINDSTR(FGBLOCK,'已高送转'),'已高送转 ',''),IF(FINDSTR(FGBLOCK,'送转潜力'),'送转潜力 ','')),IF(FINDSTR(FGBLOCK,'预高送转'),'预高送转',''));

已高送转:DRAWTEXT_FIX(ISLASTBAR,0.88,0.75,0,STR11),COLOR0000FF;

STR04:=IF(FINDSTR(FGBLOCK,'户数增加'),'户数增加',IF(FINDSTR(FGBLOCK,'户数减少'),'*户数减少',''));

户数:DRAWTEXT_FIX(ISLASTBAR,0.94,0.85,0,STR04),COLOR00FFFF;

高质押股0:=IF(FINDSTR(FGBLOCK,'高质押股'),1,0);
高质押股:DRAWTEXT_FIX(ISLASTBAR AND 高质押股0,0.88,0.85,0,'高质押股'),COLOR00FF00;

高负债率0:=IF(FINDSTR(FGBLOCK,'高负债率'),1,0);
高负债率:DRAWTEXT_FIX(ISLASTBAR AND 高负债率0,0.88,0.95,0,'高负债率'),COLOR00FF00;

{配股风险0:=IF(INBLOCK('配股风险'),1,0);
配股风险:DRAWTEXT_FIX(ISLASTBAR AND 配股风险0,0.93,0.90,0,'配股爆雷'),COLOR00FF00;}

STR05:=IF(FINDSTR(FGBLOCK,'商誉减值'),'商誉减值',IF(FINDSTR(FGBLOCK,'高商誉'),'*高商誉',''));

商誉:DRAWTEXT_FIX(ISLASTBAR ,0.88,0.15,0,STR05),COLOR00FF00;

{标注数值}

年净益X:=0;

XA_1:=0;
XA_2:=5;
XA_3:=FINVALUE(0);
XA_4:=INTPART(XA_3/10000);
XA_5:=XA_3-XA_4*10000;
XA_6:=IF(XA_5=1231,XA_4,XA_4-1);
XA_7:=FINONE(96,XA_6,1231)/10000;
XA_8:=FINONE(96,XA_6-1,1231)/10000;
XA_9:=FINONE(96,XA_6-2,1231)/10000;
XA_10:=FINONE(96,XA_6-3,1231)/10000;
XA_11:=FINONE(96,XA_6-4,1231)/10000;
XA_12:=FINONE(96,XA_6-5,1231)/10000;
XA_13:=FINONE(96,XA_6-6,1231)/10000;
XA_14:=FINONE(96,XA_6-7,1231)/10000;
XA_15:=IF(XA_8>0,(XA_7/XA_8-1)*100,0);
XA_16:=IF(XA_9>0,(XA_8/XA_9-1)*100,0);
XA_17:=IF(XA_10>0,(XA_9/XA_10-1)*100,0);
XA_18:=(XA_7+XA_8+XA_9)/3;
XA_19:=FINONE(96,0,0)/10000;
XA_20:=IF(XA_19>0 AND XA_18>0,IF(XA_5=331,XA_19>XA_18*1/4,IF(XA_5=630,XA_19>XA_18*1/2,IF(XA_5=930,XA_19>XA_18*3/4,XA_19>XA_18*1))),0);
XA_21:=FINONE(6,0,0);

R:=XA_21,NODRAW,COLORRED;

R1:=FINONE(6,XA_6,1231),NODRAW,COLORWHITE;
R2:=FINONE(6,XA_6-1,1231),NODRAW,COLORWHITE;
R3:=FINONE(6,XA_6-2,1231),NODRAW,COLORWHITE;
R4:=FINONE(6,XA_6-3,1231),NODRAW,COLORWHITE;

XA_22:=FINONE(6,XA_6-4,1231);
XA_23:=FINONE(6,XA_6-5,1231);
XA_24:=FINONE(6,XA_6-6,1231);
XA_25:=FINONE(6,XA_6-7,1231);

XA_26:=(R1+R2+R3+R4)/4;
XA_27:=POW(1+XA_26/100,7);
XA_28:=年净益X;
XA_29:=XA_15>XA_1 AND XA_16>XA_1 AND XA_17>XA_1 AND XA_21>0 AND XA_20 AND R1>=XA_28 AND R2>=XA_28 AND R3>=XA_28;
XA_30:=XA_21>0 AND XA_15>XA_1 AND XA_16>XA_1 AND XA_17>XA_1;

净益XG:=R>0 AND R1>XA_28 AND R2>XA_28 AND R3>XA_28 AND BARSCOUNT(CLOSE)>500,NODRAW,COLORRED;

净收益合格: DRAWTEXT_FIX(净益XG=1 AND ISLASTBAR,0.62,0.15,0,'净收益合格'),COLORFFFFFF;

每股收益:FINVALUE(1),NODRAW,COLORYELLOW;

XA_31:=FINVALUE(4);

PB:=CLOSE/FINVALUE(4);
市净率PB:PB,NODRAW,COLORMAGENTA;

市净:DRAWTEXT_FIX(ISLASTBAR,0.87,0.02,0,VARCAT('市净率PE:',VAR2STR(PB,2))),COLOR00FFFF;

HPE:=CLOSE/FINVALUE(1);
静态市盈率PE:HPE,NODRAW,COLORMAGENTA;

XA_32:=FINVALUE(1);
XA_33:=IF(XA_5=331,PB*4,IF(XA_5=630,PB/2*4,IF(XA_5=930,PB/3*4,PB)));

PEG:=CLOSE/FINANCE(33)/(FINANCE(21)/FINANCE(20)+0.038)/100;
市盈增长率PEG:PEG,NODRAW,COLORMAGENTA; {市盈增长比率}

XA_34:=DYNAINFO(39);
XA_35:=FINONE(0,0,0)+20000000;
XA_36:=FINANCE(1)/100000000;

总市值_亿:CLOSE*XA_36,NODRAW,COLORWHITE;

流通率%:FINANCE(7)/FINANCE(1)*100,NODRAW,COLORWHITE;

股东数:=FINVALUE(242)/100,NODRAW,COLORWHITE;

十大流通股东%:(FINVALUE(244)/FINVALUE(239))*100,NODRAW,COLORWHITE;

XA_37:=0.5;
XA_38:=0.55;
XA_39:=0.58;
XA_40:=0.65;

XA_41:=0.15;

{绘制矩形框}
DRAWRECTREL(430,10,670,999,0);
DRAWRECTREL(430,10,670,130,0);

DRAWTEXT_FIX(ISLASTBAR,XA_37,0.02,1,'年报净利润_万'),COLORFFFFFF;
DRAWTEXT_FIX(ISLASTBAR,XA_38+0.01,0.02,1,'净益率%'),COLORFFFFFF;
DRAWTEXT_FIX(ISLASTBAR,XA_39-0.01,0.02,0,'年度'),COLOR00FFFF;
DRAWTEXT_FIX(ISLASTBAR,XA_40-0.05,0.02,0,'净益率增长率%'),COLOR00FFFF;

DRAWNUMBER_FIX(XA_6!=XA_4 AND XA_19>=0,XA_37 ,XA_41*1,2,XA_19),COLOR0000FF;
DRAWNUMBER_FIX(XA_6!=XA_4 AND XA_19<0,XA_37 ,XA_41*1,2,XA_19),COLOR00FF00;

DRAWNUMBER_FIX(1,XA_37,XA_41*2,1,XA_7),COLORWHITE;
DRAWNUMBER_FIX(1,XA_37,XA_41*3,1,XA_8),COLORWHITE;
DRAWNUMBER_FIX(1,XA_37,XA_41*4,1,XA_9),COLORWHITE;
DRAWNUMBER_FIX(1,XA_37,XA_41*5,1,XA_10),COLORWHITE;
DRAWNUMBER_FIX(1,XA_37,XA_41*6,1,XA_11),COLORWHITE;
{DRAWNUMBER_FIX(XA_2>5,XA_37,XA_41*6,1,XA_12),COLORWHITE;
DRAWNUMBER_FIX(XA_2>5,XA_37,XA_41*7,1,XA_13),COLORWHITE;
DRAWNUMBER_FIX(XA_2>5,XA_37,XA_41*8,1,XA_14),COLORWHITE;}

{DRAWNUMBER_FIX(XA_6!=XA_4,XA_38,0,1,R),COLORWHITE;}
DRAWNUMBER_FIX(XA_6!=XA_4 AND R>=0,XA_38 ,XA_41*1,1,R),COLOR0000FF;
DRAWNUMBER_FIX(XA_6!=XA_4 AND R<0,XA_38 ,XA_41*1,1,R),COLOR00FF00;

DRAWNUMBER_FIX(1,XA_38,XA_41*2,1,R1),COLORWHITE;
DRAWNUMBER_FIX(1,XA_38,XA_41*3,1,R2),COLORWHITE;
DRAWNUMBER_FIX(1,XA_38,XA_41*4,1,R3),COLORWHITE;
DRAWNUMBER_FIX(1,XA_38,XA_41*5,1,R4),COLORWHITE;
DRAWNUMBER_FIX(1,XA_38,XA_41*6,1,XA_22),COLORWHITE;
{DRAWNUMBER_FIX(XA_2>5,XA_38,XA_41*6,1,XA_23),COLORWHITE;
DRAWNUMBER_FIX(XA_2>5,XA_38,XA_41*7,1,XA_24),COLORWHITE;
DRAWNUMBER_FIX(XA_2>5,XA_38,XA_41*8,1,XA_25),COLORWHITE;}

DRAWTEXT_FIX(1,XA_39,XA_41*2,0,CON2STR(XA_4-1,0)),COLORYELLOW;
DRAWTEXT_FIX(1,XA_39,XA_41*3,0,CON2STR(XA_4-2,0)),COLORYELLOW;
DRAWTEXT_FIX(1,XA_39,XA_41*4,0,CON2STR(XA_4-3,0)),COLORYELLOW;
DRAWTEXT_FIX(1,XA_39,XA_41*5,0,CON2STR(XA_4-4,0)),COLORYELLOW;
DRAWTEXT_FIX(1,XA_39,XA_41*6,0,CON2STR(XA_4-5,0)),COLORYELLOW;
{DRAWTEXT_FIX(XA_2>5,XA_39,XA_41*7,0,CON2STR(XA_4-6,0)),COLORYELLOW;
DRAWTEXT_FIX(XA_2>5,XA_39,XA_41*8,0,CON2STR(XA_4-7,0)),COLORYELLOW;
DRAWTEXT_FIX(XA_2>5,XA_39,XA_41*9,0,CON2STR(XA_4-8,0)),COLORYELLOW;}

XA_42:=R1/R2-1;
XA_43:=R2/R3-1;
XA_44:=R3/R4-1;
XA_45:=R4/XA_22-1;
XA_46:=XA_22/XA_23-1;
XA_47:=XA_23/XA_24-1;
XA_48:=XA_24/XA_25-1;

DRAWTEXT_FIX(1,XA_40,XA_41*2,1,CON2STR(XA_42,2)),COLORYELLOW;
DRAWTEXT_FIX(1,XA_40,XA_41*3,1,CON2STR(XA_43,2)),COLORYELLOW;
DRAWTEXT_FIX(1,XA_40,XA_41*4,1,CON2STR(XA_44,2)),COLORYELLOW;
DRAWTEXT_FIX(1,XA_40,XA_41*5,1,CON2STR(XA_45,2)),COLORYELLOW;
DRAWTEXT_FIX(XA_2>5,XA_40,XA_41*6,1,CON2STR(XA_46,2)),COLORYELLOW;
DRAWTEXT_FIX(XA_2>5,XA_40,XA_41*7,1,CON2STR(XA_47,2)),COLORYELLOW;
DRAWTEXT_FIX(XA_2>5,XA_40,XA_41*8,1,CON2STR(XA_48,2)),COLORYELLOW;

XA_49:=0.6;

稳定性:=ABS(XA_42)<=XA_49 AND ABS(XA_43)<=XA_49 AND ABS(XA_44)<=XA_49 AND ABS(XA_45)<=XA_49 AND ABS(XA_46)<=XA_49;

DRAWTEXT_FIX(ISLASTBAR,0.62,0.21,0,'稳定性合格'),COLORFFFFFF;

来函数检测结果如下：
该公式包含未来函数:DYNAINFO
该公式包含未来函数:FINANCE

解密、定制、编写公式指标请联系QQ或微信同号：88652583

置顶指标

相关指标公式

行业成分赋值:板块股个数
STR赋值:字符串相加(序列)
输出行业:当满足条件是否最后一个周期时,在横轴0.01纵轴0.00位置书写文字,COLOR00FFFF
STRGN赋值:如果得到字符串的长度<90,返回所属概念板块(字串),否则返回字符串中取一部分
STRGN1赋值:如果得到字符串的长度>=90,返回字符串中取一部分,否则返回''
输出概念:当满足条件是否最后一个周期时,在横轴0.01纵轴0.13位置书写文字,COLOR00FFFF
输出概念2:当满足条件ISLASTBARANDSTRLEN(所属概念板块(字串))>=90时,在横轴0.03纵轴0.21位置书写文字,COLOR00FFFF
输出主营:当满足条件是否最后一个周期时,在横轴0.01纵轴0.32位置书写文字,COLOR00FFFF
输出安全分1: 当满足条件安全分<60时,在横轴0.99纵轴0.02位置书写文字,COLOR00FF00
输出安全分2: 当满足条件安全分位于60和80之间时,在横轴0.99纵轴0.02位置书写文字,COLOR00FFFF
输出安全分3: 当满足条件安全分>=80时,在横轴0.99纵轴0.02位置书写文字,COLOR0000FF
输出最近财报:当满足条件最近财报公告离现在的天数>0时,在横轴0.68纵轴0.0位置书写文字,COLOR8080FF
输出近期解禁:当满足条件引用27号ID的序列数据>0时,在横轴0.68纵轴0.15位置书写文字,COLOR00FF00
输出上次解禁:当满足条件最近股份解禁离现在的天数>0时,在横轴0.68纵轴0.30位置书写文字,COLOR8080FF
输出上次定增:当满足条件最近定增股上市离现在的天数>0时,在横轴0.68纵轴0.45位置书写文字,COLOR8080FF
输出上次停牌:当满足条件最近停牌离现在的天数>0时,在横轴0.68纵轴0.60位置书写文字,COLOR8080FF
STR08赋值:字符串相加(序列)
输出定增:当满足条件是否最后一个周期时,在横轴0.68纵轴0.75位置书写文字,COLOR00FF00
STR09赋值:字符串相加(序列)
输出配股:当满足条件是否最后一个周期时,在横轴0.68纵轴0.85位置书写文字,COLOR00FF00
STR10赋值:字符串相加(序列)
输出重组:当满足条件是否最后一个周期时,在横轴0.68纵轴0.95位置书写文字,COLOR00FFFF

实控人01赋值:引用16号记录的字符串
输出实控人:当满足条件ISLASTBARAND(字符串查找ORFINDSTR(实控人01,'政'))时,在横轴0.01纵轴0.65位置书写文字,COLOR0000FF
实控人02赋值:引用16号记录的数值
输出实控人比例:当满足条件ISLASTBARAND(字符串查找ORFINDSTR(实控人01,'政'))时,在横轴0.11纵轴0.65位置书写文字,COLOR0000FF
总市值_亿0赋值:收盘价*总股本(股)
基金家数0赋值:引用254号ID的序列数据
基金持股0赋值:引用255号ID的序列数据*收盘价/100000000
基金比例0赋值:(引用255号ID的序列数据*收盘价/总市值_亿0)*100
STR21赋值:字符串相加(序列)
输出基金持仓:当满足条件ISLASTBARAND基金比例0>0时,在横轴0.01纵轴0.80位置书写文字,COLORFF00FF
社保家数0赋值:引用256号ID的序列数据
社保持股0赋值:引用257号ID的序列数据*收盘价/100000000
社保比例0赋值:(引用257号ID的序列数据*收盘价/总市值_亿0)*100
STR22赋值:字符串相加(序列)
输出社保持仓:当满足条件ISLASTBARAND社保比例0>0时,在横轴0.01纵轴0.72位置书写文字,COLOR4080FF
STR12赋值:字符串相加(序列)
当满足条件是否最后一个周期时,在横轴0.01纵轴0.90位置书写文字,COLOR00FFFF
STR13赋值:字符串相加(序列)
当满足条件是否最后一个周期时,在横轴0.11纵轴0.90位置书写文字,COLOR00FFFF
STR14赋值:如果字符串查找,返回'社保重仓',否则返回如果字符串查找,返回'社保新进',否则返回''
当满足条件是否最后一个周期时,在横轴0.21纵轴0.90位置书写文字,COLOR00FFFF
STR15赋值:字符串相加(序列)
输出基金:当满足条件是否最后一个周期时,在横轴0.25纵轴0.80位置书写文字,COLORFFFFFF
STR16赋值:字符串相加(序列)
输出持股:当满足条件是否最后一个周期时,在横轴0.01纵轴0.55位置书写文字,COLOR0000FF
相对位置上画矩形
相对位置上画矩形
相对位置上画矩形
相对位置上画矩形
昨日上榜0赋值:如果字符串查找,返回1,否则返回0
输出昨日上榜:当满足条件ISLASTBARAND昨日上榜0时,在横轴0.82纵轴0.15位置书写文字,COLOR00FFFF
最近多板0赋值:如果字符串查找,返回1,否则返回0
输出最近多板:当满足条件ISLASTBARAND最近多板0时,在横轴0.82纵轴0.25位置书写文字,COLOR00FFFF
昨高换手0赋值:如果字符串查找,返回1,否则返回0
输出昨高换手:当满足条件ISLASTBARAND昨高换手0时,在横轴0.82纵轴0.35位置书写文字,COLOR00FF00
昨日跌停0赋值:如果字符串查找,返回1,否则返回0
输出昨日跌停:当满足条件ISLASTBARAND昨日跌停0时,在横轴0.82纵轴0.45位置书写文字,COLOR00FF00
摘帽0赋值:字符串查找
输出摘帽:当满足条件ISLASTBARAND摘帽0时,在横轴0.90纵轴0.02位置书写文字,COLOR00FFFF
风险提示0赋值:字符串查找
输出风险提示:当满足条件ISLASTBARAND风险提示0时,在横轴0.94纵轴0.15位置书写文字,COLORFF8080
行业龙头0赋值:字符串查找
输出行业龙头:当满足条件ISLASTBARAND行业龙头0时,在横轴0.13纵轴0.00位置书写文字,COLOR0000FF
高股息股0赋值:字符串查找
输出高股息股:当满足条件ISLASTBARAND高股息股0时,在横轴0.82纵轴0.02位置书写文字,COLOR0000FF
STR01赋值:如果字符串查找,返回'亏损股',否则返回如果字符串查找,返回'微利股',否则返回''
输出业绩分类:当满足条件是否最后一个周期时,在横轴0.82纵轴0.65位置书写文字,COLOR00FF00
STR07赋值:字符串相加(序列)
输出破净:当满足条件是否最后一个周期时,在横轴0.82纵轴0.75位置书写文字,COLOR00FF00
STR02赋值:如果字符串查找,返回'*连续亏损',否则返回如果字符串查找,返回'持续增长',否则返回''
输出连续业绩:当满足条件是否最后一个周期时,在横轴0.88纵轴0.25位置书写文字,COLOR00FFFF
业绩预升0赋值:如果字符串查找,返回1,否则返回0
输出业绩预升:当满足条件ISLASTBARAND业绩预升0时,在横轴0.94纵轴0.15位置书写文字,COLOR0000FF
STR03赋值:字符串相加(序列)
输出业绩:当满足条件是否最后一个周期时,在横轴0.88纵轴0.35位置书写文字,COLOR00FFFF
券商金股0赋值:如果字符串查找,返回1,否则返回0
输出券商金股:当满足条件ISLASTBARAND券商金股0时,在横轴0.94纵轴0.25位置书写文字,COLOR00FFFF
STR17赋值:字符串相加(序列)
输出沪深股通:当满足条件是否最后一个周期时,在横轴0.94纵轴0.35位置书写文字,COLOR00FFFF
STR19赋值:字符串相加(序列)
输出扭亏转亏:当满足条件是否最后一个周期时,在横轴0.94纵轴0.55位置书写文字,COLOR00FFFF
STR20赋值:字符串相加(序列)
输出解禁:当满足条件是否最后一个周期时,在横轴0.88纵轴0.45位置书写文字,COLOR00FFFF
戴帽风险0赋值:如果属于某板块,返回1,否则返回0
输出戴帽风险:当满足条件ISLASTBARAND戴帽风险0时,在横轴0.93纵轴0.55位置书写文字,COLOR00FF00
STR18赋值:字符串相加(序列)
输出股东持股:当满足条件是否最后一个周期时,在横轴0.88纵轴0.65位置书写文字,COLOR00FFFF
STR11赋值:字符串相加(序列)
输出已高送转:当满足条件是否最后一个周期时,在横轴0.88纵轴0.75位置书写文字,COLOR0000FF
STR04赋值:如果字符串查找,返回'户数增加',否则返回如果字符串查找,返回'*户数减少',否则返回''
输出户数:当满足条件是否最后一个周期时,在横轴0.94纵轴0.85位置书写文字,COLOR00FFFF
高质押股0赋值:如果字符串查找,返回1,否则返回0
输出高质押股:当满足条件ISLASTBARAND高质押股0时,在横轴0.88纵轴0.85位置书写文字,COLOR00FF00
高负债率0赋值:如果字符串查找,返回1,否则返回0
输出高负债率:当满足条件ISLASTBARAND高负债率0时,在横轴0.88纵轴0.95位置书写文字,COLOR00FF00
STR05赋值:如果字符串查找,返回'商誉减值',否则返回如果字符串查找,返回'*高商誉',否则返回''
输出商誉:当满足条件是否最后一个周期时,在横轴0.88纵轴0.15位置书写文字,COLOR00FF00
年净益X赋值:0
XA_1赋值:0
XA_2赋值:5
XA_3赋值:引用0号ID的序列数据
XA_4赋值:XA_3/10000的整数部分
XA_5赋值:XA_3-XA_4*10000
XA_6赋值:如果XA_5=1231,返回XA_4,否则返回XA_4-1
XA_7赋值:专业财务数据(指定日期)/10000
XA_8赋值:专业财务数据(指定日期)/10000
XA_9赋值:专业财务数据(指定日期)/10000
XA_10赋值:专业财务数据(指定日期)/10000
XA_11赋值:专业财务数据(指定日期)/10000
XA_12赋值:专业财务数据(指定日期)/10000
XA_13赋值:专业财务数据(指定日期)/10000
XA_14赋值:专业财务数据(指定日期)/10000
XA_15赋值:如果XA_8>0,返回(XA_7/XA_8-1)*100,否则返回0
XA_16赋值:如果XA_9>0,返回(XA_8/XA_9-1)*100,否则返回0
XA_17赋值:如果XA_10>0,返回(XA_9/XA_10-1)*100,否则返回0
XA_18赋值:(XA_7+XA_8+XA_9)/3
XA_19赋值:专业财务数据(指定日期)/10000
XA_20赋值:如果XA_19>0ANDXA_18>0,返回如果XA_5=331,返回XA_19>XA_18*1/4,否则返回如果XA_5=630,返回XA_19>XA_18*1/2,否则返回如果XA_5=930,返回XA_19>XA_18*3/4,否则返回XA_19>XA_18*1,否则返回0
XA_21赋值:专业财务数据(指定日期)
R赋值:XA_21,NODRAW,画红色
R1赋值:专业财务数据(指定日期),NODRAW,画白色
R2赋值:专业财务数据(指定日期),NODRAW,画白色
R3赋值:专业财务数据(指定日期),NODRAW,画白色
R4赋值:专业财务数据(指定日期),NODRAW,画白色
XA_22赋值:专业财务数据(指定日期)
XA_23赋值:专业财务数据(指定日期)
XA_24赋值:专业财务数据(指定日期)
XA_25赋值:专业财务数据(指定日期)
XA_26赋值:(R1+R2+R3+R4)/4
XA_27赋值:1+XA_26/100的7乘幂
XA_28赋值:年净益X
XA_29赋值:XA_15>XA_1 AND XA_16>XA_1 AND XA_17>XA_1 AND XA_21>0 AND XA_20 AND R1>=XA_28 AND R2>=XA_28 AND R3>=XA_28
XA_30赋值:XA_21>0 AND XA_15>XA_1 AND XA_16>XA_1 AND XA_17>XA_1
净益XG赋值:R>0 AND R1>XA_28 AND R2>XA_28 AND R3>XA_28 AND 收盘价的有效数据周期数>500,NODRAW,画红色
输出净收益合格: 当满足条件净益XG=1ANDISLASTBAR时,在横轴0.62纵轴0.15位置书写文字,COLORFFFFFF
输出每股收益:引用1号ID的序列数据,NODRAW,画黄色
XA_31赋值:引用4号ID的序列数据
PB赋值:收盘价/引用4号ID的序列数据
输出市净率PB:PB,NODRAW,画洋红色
输出市净:当满足条件是否最后一个周期时,在横轴0.87纵轴0.02位置书写文字,COLOR00FFFF
HPE赋值:收盘价/引用1号ID的序列数据
输出静态市盈率PE:HPE,NODRAW,画洋红色
XA_32赋值:引用1号ID的序列数据
XA_33赋值:如果XA_5=331,返回PB*4,否则返回如果XA_5=630,返回PB/2*4,否则返回如果XA_5=930,返回PB/3*4,否则返回PB
PEG赋值:收盘价/每股收益(全年折算)/(营业成本/营业收入+0.038)/100
输出市盈增长率PEG:PEG,NODRAW,画洋红色
XA_34赋值:市盈(动)
XA_35赋值:专业财务数据(指定日期)+20000000
XA_36赋值:总股本(股)/100000000
输出总市值_亿:收盘价*XA_36,NODRAW,画白色
输出流通率%:流通股本(股)/总股本(股)*100,NODRAW,画白色
股东数赋值:引用242号ID的序列数据/100,NODRAW,画白色
输出十大流通股东%:(引用244号ID的序列数据/引用239号ID的序列数据)*100,NODRAW,画白色
XA_37赋值:0.5
XA_38赋值:0.55
XA_39赋值:0.58
XA_40赋值:0.65
XA_41赋值:0.15
相对位置上画矩形
相对位置上画矩形
当满足条件是否最后一个周期时,在横轴XA_37纵轴0.02位置书写文字,COLORFFFFFF
当满足条件是否最后一个周期时,在横轴XA_38+0.01纵轴0.02位置书写文字,COLORFFFFFF
当满足条件是否最后一个周期时,在横轴XA_39-0.01纵轴0.02位置书写文字,COLOR00FFFF
当满足条件是否最后一个周期时,在横轴XA_40-0.05纵轴0.02位置书写文字,COLOR00FFFF
当满足条件XA_6不等于XA_4ANDXA_19>=0时,在横轴XA_37纵轴XA_41*1位置书写数字,COLOR0000FF
当满足条件XA_6不等于XA_4ANDXA_19<0时,在横轴XA_37纵轴XA_41*1位置书写数字,COLOR00FF00
当满足条件1时,在横轴XA_37纵轴XA_41*2位置书写数字,画白色
当满足条件1时,在横轴XA_37纵轴XA_41*3位置书写数字,画白色
当满足条件1时,在横轴XA_37纵轴XA_41*4位置书写数字,画白色
当满足条件1时,在横轴XA_37纵轴XA_41*5位置书写数字,画白色
当满足条件1时,在横轴XA_37纵轴XA_41*6位置书写数字,画白色
当满足条件XA_6不等于XA_4ANDR>=0时,在横轴XA_38纵轴XA_41*1位置书写数字,COLOR0000FF
当满足条件XA_6不等于XA_4ANDR<0时,在横轴XA_38纵轴XA_41*1位置书写数字,COLOR00FF00
当满足条件1时,在横轴XA_38纵轴XA_41*2位置书写数字,画白色
当满足条件1时,在横轴XA_38纵轴XA_41*3位置书写数字,画白色
当满足条件1时,在横轴XA_38纵轴XA_41*4位置书写数字,画白色
当满足条件1时,在横轴XA_38纵轴XA_41*5位置书写数字,画白色
当满足条件1时,在横轴XA_38纵轴XA_41*6位置书写数字,画白色
当满足条件1时,在横轴XA_39纵轴XA_41*2位置书写文字,画黄色
当满足条件1时,在横轴XA_39纵轴XA_41*3位置书写文字,画黄色
当满足条件1时,在横轴XA_39纵轴XA_41*4位置书写文字,画黄色
当满足条件1时,在横轴XA_39纵轴XA_41*5位置书写文字,画黄色
当满足条件1时,在横轴XA_39纵轴XA_41*6位置书写文字,画黄色
XA_42赋值:R1/R2-1
XA_43赋值:R2/R3-1
XA_44赋值:R3/R4-1
XA_45赋值:R4/XA_22-1
XA_46赋值:XA_22/XA_23-1
XA_47赋值:XA_23/XA_24-1
XA_48赋值:XA_24/XA_25-1
当满足条件1时,在横轴XA_40纵轴XA_41*2位置书写文字,画黄色
当满足条件1时,在横轴XA_40纵轴XA_41*3位置书写文字,画黄色
当满足条件1时,在横轴XA_40纵轴XA_41*4位置书写文字,画黄色
当满足条件1时,在横轴XA_40纵轴XA_41*5位置书写文字,画黄色
当满足条件XA_2>5时,在横轴XA_40纵轴XA_41*6位置书写文字,画黄色
当满足条件XA_2>5时,在横轴XA_40纵轴XA_41*7位置书写文字,画黄色
当满足条件XA_2>5时,在横轴XA_40纵轴XA_41*8位置书写文字,画黄色
XA_49赋值:0.6
稳定性赋值:XA_42的绝对值<=XA_49 AND XA_43的绝对值<=XA_49 AND XA_44的绝对值<=XA_49 AND XA_45的绝对值<=XA_49 AND XA_46的绝对值<=XA_49
当满足条件是否最后一个周期时,在横轴0.62纵轴0.21位置书写文字,COLORFFFFFF

定制、找人做指标公式联系我们

QQ：88652583
邮箱：88652583@qq.com
工作时间：7:30-21:00
微信：88652583或扫描如下二维码

近30天指标公式排行

@2005-2023 粤ICP备2023063687号-2 股朋指标网别名指标网均来源互联网收集整理，如不慎侵犯了你的权益，请联系我们告知，我们将做删除处理
免责声明：股朋指标网所有指标公式及文章由网络收集，不保障实时性和真实性, 仅供学习研究并不构成投资建议，请勿以此为依据进行股票交易，由此引起的投资亏损与本站无关。

QQ：88652583 微信 88652583

通达信A股避雷针特级副图指标 及时识别持仓个股的风险 远离退市垃圾上市公司

通达信A股避雷针特级副图指标及时识别持仓个股的风险远离退市垃圾上市公司