通达信停复牌指标公式

通达信停复牌指标
 

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,'复牌');