以下是通达信黄蓝带与黄蓝中带(源码主图/副图贴图)(无源码的请下载附件导入)
{黄蓝带}
JJ:=(C+H+L)/3;
A:=MA(JJ,7),COLOR00DDFF;
B:=MA(JJ,10),COLORFF0099;
STICKLINE((A<B AND C<A) OR C<MIN(A,B) OR (C<MAX(A,B) AND A<B),A,B,4,0),COLORFF1100;
STICKLINE((A>B AND C>B) OR C>MAX(A,B),A,B,4,0),COLOR00DDFF;
STICKLINE(C>O,H,L,0,0),COLOR0000FF;
STICKLINE(C>O,C,O,2,1),COLOR0000FF;
STICKLINE(C<O,H,L,0,0),COLORFFFF00;
STICKLINE(C<O,C,O,2,0),COLORFFFF00;
{黄蓝中带}
JJ:=(C+H+L)/3;
A2:=MA(JJ,34),NODRAW;
B2:=MA(JJ,44),NODRAW;
STICKLINE(A2>B2,A2,B2,4,0),COLOR00DDFF;
STICKLINE(A2<=B2,A2,B2,4,0),COLORFF1100;
STICKLINE(C<=B2 AND A2>B2,A2,B2,4,0),COLORFF1100;
STICKLINE(C>=MAX(A2,B2) AND B2>A2,A2,B2,4,0),COLOR00DDFF;
STICKLINE(C>O,H,L,0,0),COLOR0000FF;
STICKLINE(C>O,C,O,2,1),COLOR0000FF;
STICKLINE(C<O,H,L,0,0),COLORFFFF00;
641333059.jpg
|