以下是通达信红线持股指标(源码副图贴图)
红线持股指标
0,DOTLINE;
B1:=(HHV(H,8)-C)/(HHV(H,8)-LLV(LOW,8))*100-70;
B2:=SMA(B1,8,1)+100;
B3:=(C-LLV(L,9))/(HHV(H,9)- LLV(L,9))*100;
B4:=SMA(B3,3,1);
B5:=SMA(B4,3,1)+100;
B6:=B5-B2;
B7:IF(B6>60,B6-60,0),COLOR00FF00,LINETHICK2;
IF(B7>REF(B7,1),B7,DRAWNULL),COLOR0000FF,LINETHICK2;
STICKLINE(REF(B7,1)<B7,B7,REF(B7,1),3,0 ),COLOR0022FF;
STICKLINE(REF(B7,1)<B7,B7,REF(B7,1),2,0 ),COLOR0055FF;
STICKLINE(REF(B7,1)<B7,B7,REF(B7,1),1,0 ),COLOR0077FF;
STICKLINE(REF(B7,1)<B7,B7,REF(B7,1),0,0 ),COLOR0099FF;
{小于零部分}
B8:B6-60,COLOR00FF00,DOTLINE;
IF(B8<REF(B8,1),B8,DRAWNULL),COLOR00FF00,DOTLINE;
IF(B8>REF(B8,1),B8,DRAWNULL),COLOR0000FF,DOTLINE;
