通达信筹码价格十等分主图指标公式
{使用说明:把全部筹码从大到小按价格十等分,同时将全部筹码按权重十等分,如果权重十等分需要的价格间隔远小于价格十等分数值,则筹码密集;同时如果半数筹码价格金叉价格半数,则有可能股价上行。}
高成本:COST(99.99),,COLORFFFF80,DOTLINE;
低成本:COST(0.01),COLOR808040,DOTLINE;
JC:=(高成本-低成本)/10;
DJG1:低成本+JC,COLOR808040,DOTLINE;
DJG2:低成本+JC*2,COLOR808040,DOTLINE;
DJG3:低成本+JC*3,COLOR808040,DOTLINE;
ZJG4:低成本+JC*4,COLORFF8080,DOTLINE;
ZJG5:低成本+JC*5,COLORFFFFFF,LINETHICK2;
ZJG6:低成本+JC*6,COLORFF8080,DOTLINE;
ZJG7:低成本+JC*7,COLORFF8080,DOTLINE;
GJG8:低成本+JC*8,COLORFFFF80,DOTLINE;
GJG9:低成本+JC*9,,COLORFFFF80,DOTLINE;
STICKLINE(EXIST(L<低成本,3) AND C>REF(C,1),0.99*L,L*0.98,3,0),COLORFFFFFF;
成本80:=COST(80),COLOR0000FF,LINETHICK2;
成本70:=COST(70),COLORFF00FF,LINETHICK2;
成本60:=COST(60),COLOR8000FF,LINETHICK2;
成本50:COST(50),COLOR00FFFF,LINETHICK2;
成本40:=COST(40),COLOR808080,LINETHICK1;
成本30:=COST(30),COLOR408080,LINETHICK1;
成本20:=COST(20),COLOR808080,LINETHICK1;
成本10:=COST(10),COLOR008000,LINETHICK1;
密集:(成本80-成本10)/JC,NODRAW;
STICKLINE((高成本-COST(90))/JC<0.3,COST(90),高成本,3,1),COLORC0C0C0;
STICKLINE((COST(90)-成本80)/JC<0.3,成本80,COST(90),3,1),COLORC0C0C0;
STICKLINE((成本80-成本70)/JC<0.3,成本80,成本70,3,1),COLORC0C0C0;
STICKLINE((成本70-成本60)/JC<0.3,成本70,成本60,3,1),COLORC0C0C0;
STICKLINE((成本60-成本50)/JC<0.3,成本50,成本60,3,1),COLORC0C0C0;
STICKLINE((成本50-成本40)/JC<0.3,成本50,成本40,3,1),COLORC0C0C0;
STICKLINE((成本40-成本30)/JC<0.3,成本30,成本40,3,1),COLORC0C0C0;
STICKLINE((成本30-成本20)/JC<0.3,成本30,成本20,3,1),COLORC0C0C0;
STICKLINE((成本20-成本10)/JC<0.3,成本10,成本20,3,1),COLORC0C0C0;
STICKLINE((成本10-低成本)/JC<0.3,成本10,低成本,3,1),COLORC0C0C0;