防雷成交量，预防业绩暴雷（源码 副图 通达信 贴图）

 

不少股票业绩暴雷，所以我们就需要有防雷公式。
本公式，本来就是一个成交量公式，增加一个防雷的提示，根据不良基本面，将背景变为黑色，让自己一眼就能看出这是一个问题公司。

记住：黑色背景，就有可能是雷区，要防！！

 

 

 

我这里的基本面，只列举了几种不良：

如代码段：

ZD1:=STRCAT('风格：',FGBLOCK); ZD2:=STRCAT(ZD1,'概念：'); ZD3:=STRCAT(ZD2,GNBLOCK);

TARGET:=FINDSTR(ZD3,'减持') OR FINDSTR(ZD3,'预降') OR FINDSTR(ZD3,'减值') OR FINDSTR(ZD3,'质押');

DRAWGBK(TARGET,RGB(90,90,90),RGB(30,30,30),0,'背景图',0);

这段代码是说，如果有减持公告或预期的，资产减值的，质押的，业绩预降的，丫的，不分理由，一律把背景变黑！！！

 

当然，你还可以增加一些自己不喜欢的，比如ROE是负数，净资产是负数，现金流是负数等等等。只需这样加在后面即可

TARGET:=FINDSTR(ZD3,'减持') OR FINDSTR(ZD3,'预降') OR FINDSTR(ZD3,'减值') OR FINDSTR(ZD3,'质押') or FINVALUE(4)<0 or FINVALUE(281)<0 or .....;

 

源码如下，可显示，其它的信息就不贴出来了，因为需要引用我另外的指标数据，贴了你们通不过。

 

ZD1:=STRCAT('风格：',FGBLOCK); ZD2:=STRCAT(ZD1,'概念：'); ZD3:=STRCAT(ZD2,GNBLOCK);

TARGET:=FINDSTR(ZD3,'减持') OR FINDSTR(ZD3,'预降') OR FINDSTR(ZD3,'减值') OR FINDSTR(ZD3,'质押');

DRAWGBK(TARGET,RGB(90,90,90),RGB(30,30,30),0,'背景图',0);

TOTAL:=IF(PERIOD=1,5,IF(PERIOD=2,15,IF(PERIOD=3,30,IF(PERIOD=4,60,IF(PERIOD=5,TOTALFZNUM,1)))));

MTIME:=MOD(FROMOPEN,TOTAL);

CTIME:=IF(MTIME<0.5,TOTAL,MTIME);

VAMO:IF((CURRBARSCOUNT=1 AND DYNAINFO(8)>1),AMOUNT/100000000.0*TOTAL/CTIME,DRAWNULL),NODRAW;

STICKLINE((CURRBARSCOUNT=1 AND DYNAINFO(8)>1),VAMO,0,-1,-1),COLOR00C0C0;

AMOW:AMOUNT/100000000.0,VOLSTICK;

MA3:EMA(AMOW,3),COLORLIRED;