通达信公式:
{通达信K线高亮指标
指标配色优美,支持注册制前后的涨幅高亮,
涨幅大于10%也高亮,跌停、炸板也有提示
黄色:涨停,
橙色:涨幅大于10个点未涨停,
深橙色:涨幅大于20个点未封板,
绿色:跌停或跌幅大于10个点,
浅紫色:炸板阳线,
深紫色:炸板阴线,
白色虚线:现价线
竖线分割:创业板改革日期}
{均线,均线可以根据需要修改}
ZDJS:=IF(CODELIKE(‘880005‘), 1, 0);
M5:IF(ZDJS=0,MA(C,5),DRAWNULL);
M10:IF(ZDJS=0,MA(C,10),DRAWNULL);
M20:IF(ZDJS=0,MA(C,20),DRAWNULL);
M60:IF(ZDJS=0,MA(C,60),DRAWNULL);
{下一行是板块调用,也可以改为扩展数据调用,例如 EXTE
RNST R(0,1) }
DRAWTEXT_FIX(1,0.003,0.02,0, S
TRCA T(ZDBLOCK,ST
RCAT (‘ + ‘,
STRC AT(GNBLOCK,STRCAT(‘+ ‘,STRCAT(DYBLOCK,STRCAT(‘+ ‘,
HYBL OCK))))))),COLORWHITE;
{涨跌家数880005 指标:情绪高低潮分割线}
N1:DRAWSL(ZDJS=1,3200,0,1000,1), COLORWHITE;
N2:DRAWSL(ZDJS=1,720,0,1000,1), COLORWHITE;
{现价线}
N:CONST(C), COLORWHITE, POINTDOT;
{填充线宽度}
W1:=3;
W0:=0;
{判断涨跌幅限制,涨跌停价格}
CYB:=IF(INBLOCK(‘创业板‘), 1, 0);
ZDF:=IF(INBLOCK(‘科创板‘),0.2,IF(INBLOCK(‘
ST板块‘), 0.05, 0.1));
ZT:=ZTP
RICE (REF(CLOSE,1), ZDF);
DT:=DTPRICE(REF(CLOSE,1), ZDF);
ZT1:=ZTPRICE(REF(CLOSE,1), 0.1);
ZT2:=ZTPRICE(REF(CLOSE,1), 0.2);
DT1:=DTPRICE(REF(CLOSE,1), 0.1);
DT2:=DTPRICE(REF(CLOSE,1), 0.2);
{非创业板涨跌停}
NOCYB:=CYB=0 AND ZDJS=0;
STIC K
LINE ((NOCYB AND C>=ZT AND C=H), O, C, W1, 0),COLORY
ELLO W;
STICKLINE((NOCYB AND CL), L, C, 0, 0),COLOR
GREE N;{曾跌停阳线}
{炸板}
STICKLINE((NOCYB AND CDT AND CO), O, C, W1, 0), COLORFF4DFF;
{创业板改革日分割线}
GGR:=1200824;{改革日}
STICKLINE(
DATE =GGR AND (CYB=1 OR CODELIKE(‘8808‘)), CONST(LLV(L,120)), CONST(HHV(H,120)), W0, 0),COLOR5C979C;
{创业板涨停跌停}
STICKLINE((CYB=1 AND DATE>=GGR AND C>=ZT2 AND C=H), O, C, W1, 0), COLOR
YELL OW;
STICKLINE((CYB=1 AND DATE=ZT AND C=H), O, C, W1, 0), COLORYELLOW;
STICKLINE((CYB=1 AND DATEDT AND CO), O, C, W1, 0), COLORFF4DFF;
STICKLINE((CYB=1 AND DATE>=GGR AND CDT AND CZT1 AND CO AND ZDJS=0), O, C, W1, 0), COLOR00AAFF;
STICKLINE((CZT2 AND C>O AND ZDJS=0), O, C, W1, 0), COLOR0066CC;
STICKLINE((C<=DT1 AND C<O AND ZDJS=0), O, C, W1, 0), COLORGREEN;