通达信5%10%20%及改制前后自适应涨跌停变色源码
{涨停颜色粉色,完美区分20%10%5%,创业板20200823前10%照样变色}
BK:=IF(INBLOCK('科创板'),0.2,IF(INBLOCK('创业板'),0.2,IF(INBLOCK('ST板块'),0.05,0.1)));
XA_1:=IF(DATE<=1200823,1,0);
STICKLINE((C>=ZTPRICE(REF(CLOSE,1),0.1) AND C=H) AND XA_1=1,O,C,4,0),COLORRED;
STICKLINE((C<=DTPRICE(REF(CLOSE,1),0.1) AND C=L) AND XA_1=1,O,C,4,0),COLORBLUE;
STICKLINE((C>=ZTPRICE(REF(C,1),BK) AND C=H),C,O,4,0),COLORRED;
STICKLINE((C<=DTPRICE(REF(C,1),BK) AND C=L),C,O,4,0),COLORBLUE;
STICKLINE((H>=ZTPRICE(REF(C,1),BK) AND C<H) OR (H>=ZTPRICE(REF(CLOSE,1),0.1) AND C<H AND XA_1=1),H,MAX(C,O),0.1,0),COLORRED;{涨停后回落}
STICKLINE((L<=DTPRICE(REF(C,1),BK) AND C>L) OR (L<=DTPRICE(REF(CLOSE,1),0.1) AND C>L AND XA_1=1),L,MIN(C,O),0.1,0),COLORBLUE;{跌停后回升}
来函数检测结果如下:
该公式没有未来函数
定制、编写公式指标请联系QQ或微信同号:88652583
BK赋值:如果属于某板块,返回0.2,否则返回如果属于某板块,返回0.2,否则返回如果属于某板块,返回0.05,否则返回0.1
XA_1赋值:如果日期<=1200823,返回1,否则返回0
当满足条件(收盘价>=计算涨停价ANDC=最高价)ANDXA_1=1时,在开盘价和收盘价位置之间画柱状线,宽度为4,0不为0则画空心柱.,画红色
当满足条件(收盘价<=计算跌停价ANDC=最低价)ANDXA_1=1时,在开盘价和收盘价位置之间画柱状线,宽度为4,0不为0则画空心柱.,画蓝色
当满足条件(收盘价>=计算涨停价ANDC=最高价)时,在收盘价和开盘价位置之间画柱状线,宽度为4,0不为0则画空心柱.,画红色
当满足条件(收盘价<=计算跌停价ANDC=最低价)时,在收盘价和开盘价位置之间画柱状线,宽度为4,0不为0则画空心柱.,画蓝色
当满足条件(最高价>=计算涨停价ANDC<最高价)OR(最高价>=计算涨停价ANDC当满足条件(最低价<=计算跌停价ANDC>最低价)OR(最低价<=计算跌停价ANDC>LANDXA_1=1)时,在最低价和收盘价和开盘价的较小值位置之间画柱状线,宽度为0.1,0不为0则画空心柱.,画蓝色