|
以下是通达信停复牌指标公式（无源码的请下载附件导入）
通达信停复牌指标
MA55:MA(C,55),COLORMAGENTA,LINETHICK2;
ZTB:=C/REF(C,1)>=1.098 AND C=H;
STICKLINE(ZTB,OPEN,CLOSE,1.5,0),COLORYELLOW;
FZTB:=C/REF(C,1)>=1.098 AND C<H;
STICKLINE(FZTB,OPEN,CLOSE,1.5,0),COLOR0099FF;
DTB:=C/REF(C,1)<=0.902 AND C=L;
STICKLINE(DTB,OPEN,CLOSE,1.5,0),COLORBLUE;
DRAWTEXT_FIX(1,0.00,0,0,'所属行业:'),COLORWHITE;
DRAWTEXT_FIX(1,0.08,0,0,HYBLOCK),COLORYELLOW;
DRAWTEXT_FIX(1,0.15,0,0,'所属地区:'),COLORWHITE;
DRAWTEXT_FIX(1,0.25,0,0,DYBLOCK),COLORYELLOW;
DRAWTEXT_FIX(1,0.00,0.05,0,'主题投资:'),COLORWHITE;
DRAWTEXT_FIX(1,0.07,0.05,0,EXTERNSTR(0,1)),COLORYELLOW;
DRAWTEXT_FIX(1,0.00,0.10,0,'业绩报告:'),COLORYELLOW;
DRAWTEXT_FIX(1,0.08,0.10,0,EXTERNSTR(0,2)),COLORWHITE;
复牌:=DAY-IF(WEEKOFYEAR=REF(WEEKOFYEAR,1),1,3)>REF(DAY,1) OR WEEKOFYEAR-1>REF(WEEKOFYEAR,1);
FT:=BARSLAST(复牌);
停牌:=REFX(复牌,1);
TT:=BARSLAST(停牌);
TJ:=DATETODAY(REF(DATE,FT))-DATETODAY(REF(DATE,TT));
DRAWNUMBER(FT=0,H*1.05,TJ)COLORYELLOW;
DRAWTEXT(停牌,H,'停牌')COLORYELLOW;
DRAWTEXT(复牌,L,'复牌');
443300709.png
443155985.rar
(3.05 KB, 下载次数: 0, 售价: 1 金钱)
|
