通达信涨跌停变色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

跌板:=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

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;