通达信简化版【连板高度】副图指标 源码

情绪:="880005$C"*0.01,COLORYELLOW;

情绪昨比:=情绪/REF(情绪,1),NODRAW;

涨停:="880006$C"COLORRED;

跌停:="880006$O"COLORGREEN;

连板家数:SCJYVALUE(23,2,0),COLORBROWN,NODRAW;

{STICKLINE(1,0,连板家数,1.5,0),COLORBROWN;}

连板昨比:=连板家数/REF(连板家数,1),NODRAW;

GD:=SCJYVALUE(30,1,0);

连板高度:GD,POINTDOT,COLORWHITE,LINETHICK3;

NOTEXT连板高:GD,COLORWHITE,LINETHICK1;

NOTEXT连板高1:GD,COLORWHITE,LINETHICK2,CIRCLEDOT;

DRAWNUMBER(GD>=6,IF(GD>REF(GD,1),GD*1.12,GD*0.95),GD),COLORRED,DRAWABOVE;

DRAWNUMBER(GD<6 AND GD>3,IF(GD>REF(GD,1),GD*1.08,GD*0.95),GD),COLORMAGENTA,DRAWABOVE;

DRAWNUMBER(GD<4 AND GD>0,IF(GD>REF(GD,1),GD*1.08,GD*0.95),GD),COLORYELLOW,DRAWABOVE;

FZ:=REF(连板高度,BARSLAST(连板高度>REFX(连板高度,1) AND 连板高度>REF(连板高度,1)));

QJD:=BARSLAST(BARSLAST(FZ<>REF(FZ,1))=0),NODRAW;

压力高度:REF(FZ,QJD+1)COLORLIMAGENTA;

{NOTEXT1:5,COLORFF9933,DOTLINE;

DRAWTEXT(ISLASTBAR=1,5,'冰点'),COLORFF9933;

NOTEXT2:12,COLORLIGREEN,DOTLINE;

DRAWTEXT(ISLASTBAR=1,12,'弱势'),COLORLIGREEN;

DRAWTEXT(ISLASTBAR=1,35,'强势'),COLORRED;

NOTEXT4:35,COLORRED,DOTLINE;

DRAWTEXT(ISLASTBAR=1,42,'过热'),COLORMAGENTA;

NOTEXT5:42,COLORFF00FF,DOTLINE;

NOTEXT6:"880005$C"*0.01,CIRCLEDOT,COLORYELLOW;

NOTEXT7:"880006$C"COLORRED,CIRCLEDOT;

NOTEXT8:"880006$O"COLORGREEN,CIRCLEDOT;};

原理解析：
情绪赋值:"880005$C"*0.01,画黄色
情绪昨比:=情绪/1日前的情绪,NODRAW
涨停赋值:"880006$C"画红色
跌停赋值:"880006$O"画绿色
输出连板家数:SCJYVALUE(23,2,0),COLORBROWN,NODRAW
当满足条件1时,在0和连板家数之间画柱状线
}
连板昨比赋值:连板家数/1日前的连板家数,NODRAW
GD赋值:SCJYVALUE(30,1,0)
输出连板高度:GD,POINTDOT,画白色, 线宽为3
输出NOTEXT连板高:GD,画白色,LINETHICK1
NOTEXT连板高1:GD,画白色, 线宽为2,CIRCLEDOT
DRAWNUMBER(GD>=6,IF(GD>1日前的GD,GD*1.12,GD*0.95),GD),画红色,DRAWABOVE
DRAWNUMBER(GD<6 AND GD>3,IF(GD>1日前的GD,GD*1.08,GD*0.95),GD),画洋红色,DRAWABOVE
DRAWNUMBER(GD<4 AND GD>0,IF(GD>1日前的GD,GD*1.08,GD*0.95),GD),画黄色,DRAWABOVE
FZ赋值:REF(连板高度,上次连板高度>REFX(连板高度,1距今天数 AND 连板高度>REF(连板高度,1)))
QJD赋值:上次BARSLAST(FZ<>1日前的FZ距今天数=0),NODRAW
输出压力高度:QJD+1日前的FZCOLORLIMAGENTA
输出{NOTEXT1:5,COLORFF9933,DOTLINE
当满足条件ISLASTBAR=1时,在5和'冰点'位置书写文字
输出NOTEXT2:12,COLORLIGREEN,DOTLINE
当满足条件ISLASTBAR=1时,在12和'弱势'位置书写文字
当满足条件ISLASTBAR=1时,在35和'强势'位置书写文字
输出NOTEXT4:35,画红色,DOTLINE
当满足条件ISLASTBAR=1时,在42和'过热'位置书写文字
输出NOTEXT5:42,COLORFF00FF,DOTLINE
输出NOTEXT6:"880005$C"*0.01,CIRCLEDOT,画黄色
输出NOTEXT7:"880006$C"画红色,CIRCLEDOT
输出NOTEXT8:"880006$O"画绿色,CIRCLEDOT
}