通达信维度筹码成本指标公式

{筹码顶:REFDATE(CONST(COST(99.999)),DATE),DOTLINE,COLORMAGENTA;
筹码底:REFDATE(CONST(COST(0.001)),DATE),DOTLINE,COLORCYAN;}
最高位:=REFDATE(REF(HHV(H,0),0),DATE),LINETHICK6;
最低位:=REFDATE(REF(LLV(L,0),0),DATE),LINETHICK6;
低点至今涨幅%:(C-最低位)/最低位*100,NODRAW,COLORRED;
高点至今跌幅%:(最高位-C)/CLOSE*100,NODRAW,COLORGREEN;
{上市距今天数:FINANCE(42),NODRAW,COLORMAGENTA;}
{STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,最高位,筹码顶,DATE,-1),COLORLIGREEN,LINETHICK2;
STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,最低位,筹码底,DATE,-1),COLORLIMAGENTA,LINETHICK2;}
{cyc成本线}
现价获利%:WINNER(CLOSE)*100,COLORCYAN,NODRAW;
{现价:CLOSE,COLOR99FFFF,LINETHICK2;}
{浮筹:(WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))/WINNER(HHV(HIGH,0))*100,NODRAW,COLOR99FFFF,LINETHICK3;}
{前段:筹一+筹二+筹三,NODRAW,COLORWHITE;
中段:筹四+筹五+筹六+筹七,NODRAW,COLORGREEN;
后段:筹八+筹九+筹十,NODRAW,COLORRED;}
换手:DYNAINFO(37)*100,NODRAW;
量比:DYNAINFO(17),NODRAW;
CYC5:0.01*EMA(AMOUNT,5)/EMA(vol,5)COLORWHITE;
CYC13:0.01*EMA(AMOUNT,13)/EMA(VOL,13)COLORYELLOW;
CYC34:0.01*EMA(AMOUNT,34)/EMA(VOL,34)COLORGREEN;
{CYC∞:DMA(AMOUNT/(100*VOL),VOL/(100*FINANCE(7)));}
CYC∞:DMA(CLOSE,VOL/CAPITAL)COLORCYAN,LINETHICK2;{当前流通股本}
MA60:MA(CLOSE,60)COLORLIMAGENTA;
{中价:=COST(50);
均价:=AMOUNT/VOL/100;{使用在日线上的真实的每天成交价}
{趋势线:(均价-中价)/100,LINETHICK2,COLORYELLOW;}
{筹码监控}
{获利比:WINNER(C)*100,NODRAW;}
{画横线，区分空间维度，间隔为10%比例}
DRAwrECTREL(000,001,999,000,000);
DRAWRECTREL(000,100,999,000,000);
DRAWRECTREL(000,200,999,000,000);
DRAWRECTREL(000,300,999,000,000);
DRAWRECTREL(000,400,999,000,000);
DRAWRECTREL(000,500,999,000,000);
DRAWRECTREL(000,600,999,000,000);
DRAWRECTREL(000,700,999,000,000);
DRAWRECTREL(000,800,999,000,000);
DRAWRECTREL(000,900,999,000,000);
DRAWRECTREL(000,999,999,000,000);
{标注10维度空间色块，区分空间维度，间隔为10%比例}
DRAWRECTREL(000,001,135,50,RGB(0,255,0));
DRAWRECTREL(000,100,135,150,RGB(50,205,50));
DRAWRECTREL(000,200,135,250,RGB(34,139,34));
DRAWRECTREL(000,300,135,350,RGB(0,0,255));
DRAWRECTREL(000,400,135,450,RGB(30,144,255));
DRAWRECTREL(000,500,135,550,RGB(0,191,255));
DRAWRECTREL(000,600,135,650,RGB(113,106,104));
DRAWRECTREL(000,700,135,750,RGB(255,106,106));
DRAWRECTREL(000,800,135,850,RGB(238,58,140));
DRAWRECTREL(000,900,135,950,RGB(205,0,0));
DRAWRECTREL(000,999,135,000,000);
ZQ:=CURRBARSCOUNT=1;
{DRAWRECTREL(0,0,135,999,IF(C,RGB(0,50,150),RGB(0,0,0)))NOFRAME;}
DRAWTEXT_FIX(ZQ,0.01,0.01,0,'前日')COLORRED;
DRAWTEXT_FIX(ZQ,0.05,0.01,0,' 昨日')COLORRED;
DRAWTEXT_FIX(ZQ,0.1,0.01,0,' 当日')COLORRED;
{前日10维度筹码成本分布数据}
DRAWNUMBER_FIX(ZQ,0.01,0.91,0,ROUND2(REF(((WINNER(COST(0.1)+(COST(99.9)-COST(0.1))/10)-WINNER(COST(0.1)))*100),2),3))COLORWHITE;
DRAWNUMBER_FIX(ZQ,0.01,0.81,0,ROUND2(REF(((WINNER(COST(0.1)+(COST(99.9)-COST(0.1))/10*2)-WINNER(COST(0.1)+(COST(99.9)-COST(0.1))/10))*100),2),3))COLORWHITE;
DRAWNUMBER_FIX(ZQ,0.01,0.71,0,ROUND2(REF(((WINNER(COST(0.1)+(COST(99.9)-COST(0.1))/10*3)-WINNER(COST(0.1)+(COST(99.9)-COST(0.1))/10*2))*100),2),3))COLORWHITE;
DRAWNUMBER_FIX(ZQ,0.01,0.61,0,ROUND2(REF(((WINNER(COST(0.1)+(COST(99.9)-COST(0.1))/10*4)-WINNER(COST(0.1)+(COST(99.9)-COST(0.1))/10*3))*100),2),3))COLORWHITE;
DRAWNUMBER_FIX(ZQ,0.01,0.51,0,ROUND2(REF(((WINNER(COST(0.1)+(COST(99.9)-COST(0.1))/10*5)-WINNER(COST(0.1)+(COST(99.9)-COST(0.1))/10*4))*100),2),3))COLORWHITE;
DRAWNUMBER_FIX(ZQ,0.01,0.41,0,ROUND2(REF(((WINNER(COST(0.1)+(COST(99.9)-COST(0.1))/10*6)-WINNER(COST(0.1)+(COST(99.9)-COST(0.1))/10*5))*100),2),3))COLORWHITE;
DRAWNUMBER_FIX(ZQ,0.01,0.31,0,ROUND2(REF(((WINNER(COST(0.1)+(COST(99.9)-COST(0.1))/10*7)-WINNER(COST(0.1)+(COST(99.9)-COST(0.1))/10*6))*100),2),3))COLORWHITE;
DRAWNUMBER_FIX(ZQ,0.01,0.21,0,ROUND2(REF(((WINNER(COST(0.1)+(COST(99.9)-COST(0.1))/10*8)-WINNER(COST(0.1)+(COST(99.9)-COST(0.1))/10*7))*100),2),3))COLORWHITE;
DRAWNUMBER_FIX(ZQ,0.01,0.11,0,ROUND2(REF(((WINNER(COST(0.1)+(COST(99.9)-COST(0.1))/10*9)-WINNER(COST(0.1)+(COST(99.9)-COST(0.1))/10*8))*100),2),3))COLORWHITE;
DRAWNUMBER_FIX(ZQ,0.01,0.05,0,ROUND2(REF(((WINNER(COST(99.9))-WINNER(COST(0.1)+(COST(99.9)-COST(0.1))/10*9))*100),2),3))COLORWHITE;
{昨日10维度筹码成本分布数据}
DRAWNUMBER_FIX(ZQ,0.05,0.91,0,ROUND2(REF(((WINNER(COST(0.1)+(COST(99.9)-COST(0.1))/10)-WINNER(COST(0.1)))*100),1),3))COLORWHITE;
DRAWNUMBER_FIX(ZQ,0.05,0.81,0,ROUND2(REF(((WINNER(COST(0.1)+(COST(99.9)-COST(0.1))/10*2)-WINNER(COST(0.1)+(COST(99.9)-COST(0.1))/10))*100),1),3))COLORWHITE;
DRAWNUMBER_FIX(ZQ,0.05,0.71,0,ROUND2(REF(((WINNER(COST(0.1)+(COST(99.9)-COST(0.1))/10*3)-WINNER(COST(0.1)+(COST(99.9)-COST(0.1))/10*2))*100),1),3))COLORWHITE;
DRAWNUMBER_FIX(ZQ,0.05,0.61,0,ROUND2(REF(((WINNER(COST(0.1)+(COST(99.9)-COST(0.1))/10*4)-WINNER(COST(0.1)+(COST(99.9)-COST(0.1))/10*3))*100),1),3))COLORWHITE;
DRAWNUMBER_FIX(ZQ,0.05,0.51,0,ROUND2(REF(((WINNER(COST(0.1)+(COST(99.9)-COST(0.1))/10*5)-WINNER(COST(0.1)+(COST(99.9)-COST(0.1))/10*4))*100),1),3))COLORWHITE;
DRAWNUMBER_FIX(ZQ,0.05,0.41,0,ROUND2(REF(((WINNER(COST(0.1)+(COST(99.9)-COST(0.1))/10*6)-WINNER(COST(0.1)+(COST(99.9)-COST(0.1))/10*5))*100),1),3))COLORWHITE;
DRAWNUMBER_FIX(ZQ,0.05,0.31,0,ROUND2(REF(((WINNER(COST(0.1)+(COST(99.9)-COST(0.1))/10*7)-WINNER(COST(0.1)+(COST(99.9)-COST(0.1))/10*6))*100),1),3))COLORWHITE;
DRAWNUMBER_FIX(ZQ,0.05,0.21,0,ROUND2(REF(((WINNER(COST(0.1)+(COST(99.9)-COST(0.1))/10*8)-WINNER(COST(0.1)+(COST(99.9)-COST(0.1))/10*7))*100),1),3))COLORWHITE;
DRAWNUMBER_FIX(ZQ,0.05,0.11,0,ROUND2(REF(((WINNER(COST(0.1)+(COST(99.9)-COST(0.1))/10*9)-WINNER(COST(0.1)+(COST(99.9)-COST(0.1))/10*8))*100),1),3))COLORWHITE;
DRAWNUMBER_FIX(ZQ,0.05,0.05,0,ROUND2(REF(((WINNER(COST(99.9))-WINNER(COST(0.1)+(COST(99.9)-COST(0.1))/10*9))*100),1),3))COLORWHITE;
{今日10维度筹码成本分布数据}
DRAWNUMBER_FIX(ZQ,0.1,0.91,0,ROUND2(((WINNER(COST(0.1)+(COST(99.9)-COST(0.1))/10)-WINNER(COST(0.1)))*100),3))COLORWHITE;
DRAWNUMBER_FIX(ZQ,0.1,0.81,0,ROUND2(((WINNER(COST(0.1)+(COST(99.9)-COST(0.1))/10*2)-WINNER(COST(0.1)+(COST(99.9)-COST(0.1))/10))*100),3))COLORWHITE;
DRAWNUMBER_FIX(ZQ,0.1,0.71,0,ROUND2(((WINNER(COST(0.1)+(COST(99.9)-COST(0.1))/10*3)-WINNER(COST(0.1)+(COST(99.9)-COST(0.1))/10*2))*100),3))COLORWHITE;
DRAWNUMBER_FIX(ZQ,0.1,0.61,0,ROUND2(((WINNER(COST(0.1)+(COST(99.9)-COST(0.1))/10*4)-WINNER(COST(0.1)+(COST(99.9)-COST(0.1))/10*3))*100),3))COLORWHITE;
DRAWNUMBER_FIX(ZQ,0.1,0.51,0,ROUND2(((WINNER(COST(0.1)+(COST(99.9)-COST(0.1))/10*5)-WINNER(COST(0.1)+(COST(99.9)-COST(0.1))/10*4))*100),3))COLORWHITE;
DRAWNUMBER_FIX(ZQ,0.1,0.41,0,ROUND2(((WINNER(COST(0.1)+(COST(99.9)-COST(0.1))/10*6)-WINNER(COST(0.1)+(COST(99.9)-COST(0.1))/10*5))*100),3))COLORWHITE;
DRAWNUMBER_FIX(ZQ,0.1,0.31,0,ROUND2(((WINNER(COST(0.1)+(COST(99.9)-COST(0.1))/10*7)-WINNER(COST(0.1)+(COST(99.9)-COST(0.1))/10*6))*100),3))COLORWHITE;
DRAWNUMBER_FIX(ZQ,0.1,0.21,0,ROUND2(((WINNER(COST(0.1)+(COST(99.9)-COST(0.1))/10*8)-WINNER(COST(0.1)+(COST(99.9)-COST(0.1))/10*7))*100),3))COLORWHITE;
DRAWNUMBER_FIX(ZQ,0.1,0.11,0,ROUND2(((WINNER(COST(0.1)+(COST(99.9)-COST(0.1))/10*9)-WINNER(COST(0.1)+(COST(99.9)-COST(0.1))/10*8))*100),3))COLORWHITE;
DRAWNUMBER_FIX(ZQ,0.1,0.05,0,ROUND2(((WINNER(COST(99.9))-WINNER(COST(0.1)+(COST(99.9)-COST(0.1))/10*9))*100),3))COLORWHITE;
{右侧解说性文字}
DRAWTEXT_FIX(1,0.999,0.999,1,'底筹'),COLORRED;
DRAWTEXT_FIX(1,0.999,0.909,1,'一筹'),COLORRED;
DRAWTEXT_FIX(1,0.999,0.808,1,'二筹'),COLORMAGENTA;
DRAWTEXT_FIX(1,0.999,0.707,1,'三筹'),COLORLIRED;
DRAWTEXT_FIX(1,0.999,0.606,1,'四筹'),COLORWHITE;
DRAWTEXT_FIX(1,0.999,0.505,1,'五筹'),COLORLIBLUE;
DRAWTEXT_FIX(1,0.999,0.404,1,'六筹'),COLORBLUE;
DRAWTEXT_FIX(1,0.999,0.303,1,'七筹'),COLORCYAN;
DRAWTEXT_FIX(1,0.999,0.202,1,'八筹'),COLORLIGREEN;
DRAWTEXT_FIX(1,0.999,0.101,1,'九筹'),COLORGREEN;
DRAWTEXT_FIX(1,0.999,0.001,1,'顶筹'),COLORGREEN;