|
以下是通达信主力增减仓副图指标源码（无源码的请下载附件导入）
DRAWGBK(C>0, RGB(0,30,30),RGB(53,154,255),0,'11',0);
{主力增减仓------------------------}
C1:=10000*C/INDEXC;
O1:=10000*O/INDEXO;
主力动向:=MA(C1,5),LINETHICK2,COLOR666666;
水平线:0;
增减仓:C1-主力动向,NODRAW;
{主力增仓----}
STICKLINE(C1>=O1 AND C1>主力动向,增减仓,水平线,3,0),COLOR0000AA;
STICKLINE(C1>=O1 AND C1>主力动向,增减仓,水平线,2.5,0),COLOR0000BB;
STICKLINE(C1>=O1 AND C1>主力动向,增减仓,水平线,2,0),COLOR0000CC;
STICKLINE(C1>=O1 AND C1>主力动向,增减仓,水平线,1.5,0),COLOR0000DD;
STICKLINE(C1>=O1 AND C1>主力动向,增减仓,水平线,1,0),COLOR0000EE;
STICKLINE(C1>=O1 AND C1>主力动向,增减仓,水平线,0.5,0),COLOR0000FF;
{主力减仓-----}
STICKLINE(C1<O1 AND C1<=主力动向,增减仓,水平线,3.0,0),COLOR009600;
STICKLINE(C1<O1 AND C1<=主力动向,增减仓,水平线,2.5,0),COLOR00A500;
STICKLINE(C1<O1 AND C1<=主力动向,增减仓,水平线,2.0,0),COLOR00B400;
STICKLINE(C1<O1 AND C1<=主力动向,增减仓,水平线,1.7,0),COLOR00C300;
STICKLINE(C1<O1 AND C1<=主力动向,增减仓,水平线,1.3,0),COLOR00D200;
STICKLINE(C1<O1 AND C1<=主力动向,增减仓,水平线,1.0,0),COLOR00E100;
STICKLINE(C1<O1 AND C1<=主力动向,增减仓,水平线,0.8,0),COLOR00F000;
STICKLINE(C1<O1 AND C1<=主力动向,增减仓,水平线,0.5,0),COLOR00FF00;
DRAWTEXT(CURRBARSCOUNT=1,0,STRCAT(STRCAT(' ',CON2STR(增减仓*100,0)),'')),COLORWHITE;
6522365.jpg
|
