通达信涨跌停变色2个公式分享源码

公式1

{涨跌停显示}

BK:=IF(INBLOCK('创业板'),0.2,IF(INBLOCK('科创板'),0.2,IF(INBLOCK('ST板块'),0.05,0.1)));

BF:=IF(DATE<=1200823,1,0);

STICKLINE((C=ZTPRICE(REF(C,1),BK) AND C=H),C,O,1.5,0),COLORYELLOW;

STICKLINE((C=DTPRICE(REF(C,1),BK) AND C=L),C,O,-1,0),COLORGREEN;

STICKLINE((C>=ZTPRICE(REF(C,1),0.1) AND C=H) AND BF=1,C,O,1.5,0),COLORYELLOW;

STICKLINE((C<=DTPRICE(REF(C,1),0.1) AND C=L) AND BF=1,C,O,-1,0),COLORGREEN;

STICKLINE((H>=ZTPRICE(REF(C,1),BK) AND C<H) OR (H>=ZTPRICE(REF(CLOSE,1),0.1) AND C<H AND BF=1),H,MAX(C,O),0.1,0),COLORMAGENTA;

STICKLINE((L<=DTPRICE(REF(C,1),BK) AND C>L) OR (L<=DTPRICE(REF(CLOSE,1),0.1) AND C>L AND BF=1),L,MIN(C,O),0.1,0),COLORGREEN;

公式2

涨板:=IFF(NAMEINCLUDE('*')||NAMEINCLUDE('*S')||NAMEINCLUDE('ST'),

C>=ZTPRICE(REF(C,1),0.05) AND C=H AND H>0,

IFF((DATE>=1200824 AND FINANCE(3)=3)||FINANCE(3)=4,

C>=ZTPRICE(REF(C,1),0.20) AND C=H AND H>0,

C>=ZTPRICE(REF(C,1),0.10) AND C=H AND H>0));

跌板:=IFF(NAMEINCLUDE('*')||NAMEINCLUDE('*S')||NAMEINCLUDE('ST'),

C<=DTPRICE(REF(C,1),0.05) AND C=L AND L>0,

IFF((DATE>=1200824 AND FINANCE(3)=3)||FINANCE(3)=4,

C<=DTPRICE(REF(C,1),0.20) AND C=L AND L>0,

C<=DTPRICE(REF(C,1),0.10) AND C=L AND L>0));

DRAWKLINE(H,O,L,C);

STICKLINE(涨板,O,C,3.0,0),COLOR0099FF;

STICKLINE(涨板,O,C,2.0,0),COLOR33BBFF;

STICKLINE(涨板,O,C,0.5,0),COLOR55DDFF;

STICKLINE(涨板,O,C,0.0,0),COLOR99FFFF;

STICKLINE(跌板,O,C,3.0,0),COLOR00AA00;

STICKLINE(跌板,O,C,2.0,0),COLOR00CC00;

STICKLINE(跌板,O,C,0.5,0),COLOR00EE00;

STICKLINE(跌板,O,C,0.0,0),COLOR00FF00;