「翔博精选指标」五彩筹码云图,筹码类公式（通达信公式 主图 源

{五彩筹码云图}

 

NOTEXTC:C,COLORYELLOW,LINETHICK2;

获利盘:WINNER(C)*100,NODRAW;

十日均获:MA(WINNER(C),10)*100,NODRAW;

浮筹比例:100*(WINNER(C*1.1)-WINNER(C*0.9)),NODRAW;

十日均浮:MA(浮筹比例,10),NODRAW;

STICKLINE(1,C,H,0.1,0),COLOR00DDDD;

STICKLINE(1,C,L,0.1,0),COLOR00DDDD;

今日击穿:(C-O)/ABS(C-O)*(WINNER(H)-WINNER(L)),NODRAW;

 

十日击穿集中率:(WINNER(C)-REF(WINNER(C),10))/(HHV(WINNER(C),10)-LLV(WINNER(C),10))*100,NODRAW;

 

AJ1:=(COST(85)+COST(15))/2;AJ2:=(COST(75)+COST(25))/2;AJ3:=(COST(65)+COST(35))/2;AJ4:=(COST(55)+COST(45))/2;AJ5:=(COST(95)+COST(5))/2;AJ6:=(COST(99.99)-COST(0.01)*0.5)/2;

AJ:=(AJ1+AJ2+AJ3+AJ4+AJ5+AJ6)/6;

BJ1:=(COST(90)+COST(10))/2;BJ2:=(COST(80)+COST(20))/2;BJ3:=(COST(70)+COST(30))/2;BJ4:=(COST(60)+COST(40))/2;BJ5:=(COST(50));BJ6:=(COST(99.99)+COST(0.01)*0.5)/2;

BJ:=(BJ1+BJ2+BJ3+BJ4+BJ5+BJ6)/6;

平均成本:EMA((AJ+BJ)/2,1),COLORWHITE,COLORFFC0FF,LINETHICK2;

生命中枢:=(COST(99.999)+COST(0.001)*0.5)/2,COLOR9900FF,LINETHICK3;

 

IF(C>=(平均成本),平均成本,DRAWNULL),COLORRED;

IF(C>=REF(生命中枢,1),生命中枢,DRAWNULL)COLORYELLOW;

IF(C<REF(生命中枢,1),生命中枢,DRAWNULL),COLORCYAN;

天界:=CONST(EMA((平均成本+COST(99.999))/2,1)),COLORMAGENTA,LINETHICK3;

地界:=CONST(EMA((平均成本+COST(0.001)*0.5)/2,1)),COLORCYAN,LINETHICK3;

 

 

{黄金分割  普通 等系坐标}

DRAWRECTREL(990,2,998,188,RGB(0,150,180)),NOFRAME;

DRAWRECTREL(990,188,998,375,RGB(200,200,0)),NOFRAME;

DRAWRECTREL(990,375,998,491,RGB(100,200,0)),NOFRAME;

DRAWRECTREL(990,491,998,607,RGB(200,10,80)),NOFRAME;

DRAWRECTREL(990,607,998,794,RGB(150,0,0)),NOFRAME;

DRAWRECTREL(990,794,998,982,RGB(150,150,150)),NOFRAME;

 

 

AF:=(COST(99.999)-COST(0.001))/20*0.7;

STICKLINE(COST(99)-COST(95)<AF,COST(99),COST(95),10,0),COLOR0000EE;

STICKLINE(COST(95)-COST(90)<AF ,COST(90),COST(95),10,0),COLOR0000AA;

STICKLINE(COST(90)-COST(85)<AF ,COST(90),COST(85),10,0),COLOR000077;

STICKLINE(COST(85)-COST(80)<AF ,COST(80),COST(85),10,0),COLOR003377;

STICKLINE(COST(80)-COST(75)<AF ,COST(80),COST(75),10,0),COLOR007777;

STICKLINE(COST(75)-COST(70)<AF ,COST(70),COST(75),10,0),COLOR00AA77;

STICKLINE(COST(70)-COST(65)<AF ,COST(70),COST(65),10,0),COLOR00DD77;

STICKLINE(COST(65)-COST(60)<AF ,COST(60),COST(65),10,0),COLOR00FF44;

STICKLINE(COST(60)-COST(55)<AF,COST(60),COST(55),10,0),COLOR00FF00;

STICKLINE(COST(55)-COST(50)<AF,COST(50),COST(55),10,0),COLOR44FF00;

STICKLINE(COST(50)-COST(45)<AF,COST(50),COST(45),10,0),COLOR88FF00;

STICKLINE(COST(45)-COST(40)<AF,COST(40),COST(45),10,0),COLORCCFF00;

STICKLINE(COST(40)-COST(35)<AF,COST(40),COST(35),10,0),COLORFFFF00;

STICKLINE(COST(35)-COST(30)<AF,COST(30),COST(35),10,0),COLORFFBB00;

STICKLINE(COST(30)-COST(25)<AF,COST(30),COST(25),10,0),COLORFF7700;

STICKLINE(COST(25)-COST(20)<AF,COST(20),COST(25),10,0),COLORFF3300;

STICKLINE(COST(20)-COST(15)<AF,COST(20),COST(15),10,0),COLORFF0022;

STICKLINE(COST(15)-COST(10)<AF,COST(10),COST(15),10,0),COLORFF0066;

STICKLINE(COST(10)-COST(5)<AF ,COST(10),COST(5),10,0),COLORFF00AA;

STICKLINE(COST(5)-COST(1)<AF ,COST(1),COST(5),10,0),COLORFF00FF;

STICKLINE(COST(99)-COST(95)>AF AND COST(99)-COST(95)<1.3*AF,COST(99),COST(95),0.1,1),COLOR0000EE;

STICKLINE(COST(95)-COST(90)>AF AND COST(95)-COST(90)<1.3*AF,COST(90),COST(95),0.1,1),COLOR0000AA;

STICKLINE(COST(90)-COST(85)>AF AND COST(90)-COST(85)<1.3*AF,COST(90),COST(85),0.1,1),COLOR000077;

STICKLINE(COST(85)-COST(80)>AF AND COST(85)-COST(80)<1.3*AF,COST(80),COST(85),0.1,1),COLOR003377;

STICKLINE(COST(80)-COST(75)>AF AND COST(80)-COST(75)<1.3*AF,COST(80),COST(75),0.1,1),COLOR007777;

STICKLINE(COST(75)-COST(70)>AF AND COST(75)-COST(70)<1.3*AF,COST(70),COST(75),0.1,1),COLOR00AA77;

STICKLINE(COST(70)-COST(65)>AF AND COST(70)-COST(65)<1.3*AF,COST(70),COST(65),0.1,1),COLOR00DD77;

STICKLINE(COST(65)-COST(60)>AF AND COST(65)-COST(60)<1.3*AF,COST(60),COST(65),0.1,1),COLOR00FF44;

STICKLINE(COST(60)-COST(55)>AF AND COST(60)-COST(55)<1.3*AF,COST(60),COST(55),0.1,1),COLOR00FF00;

STICKLINE(COST(55)-COST(50)>AF AND COST(55)-COST(50)<1.3*AF,COST(50),COST(55),0.1,1),COLOR44FF00;

STICKLINE(COST(50)-COST(45)>AF AND COST(50)-COST(45)<1.3*AF,COST(50),COST(45),0.1,1),COLOR88FF00;

STICKLINE(COST(45)-COST(40)>AF AND COST(45)-COST(40)<1.3*AF,COST(40),COST(45),0.1,1),COLORCCFF00;

STICKLINE(COST(40)-COST(35)>AF AND COST(40)-COST(35)<1.3*AF,COST(40),COST(35),0.1,1),COLORFFFF00;

STICKLINE(COST(35)-COST(30)>AF AND COST(35)-COST(30)<1.3*AF,COST(30),COST(35),0.1,1),COLORFFBB00;

STICKLINE(COST(30)-COST(25)>AF AND COST(30)-COST(25)<1.3*AF,COST(30),COST(25),0.1,1),COLORFF7700;

STICKLINE(COST(25)-COST(20)>AF AND COST(25)-COST(20)<1.3*AF,COST(20),COST(25),0.1,1),COLORFF3300;

STICKLINE(COST(20)-COST(15)>AF AND COST(20)-COST(15)<1.3*AF,COST(20),COST(15),0.1,1),COLORFF0022;

STICKLINE(COST(15)-COST(10)>AF AND COST(15)-COST(10)<1.3*AF,COST(10),COST(15),0.1,1),COLORFF0066;

STICKLINE(COST(10)-COST(5)>AF AND COST(10)-COST(5)<1.3*AF ,COST(10),COST(5) ,0.1,1),COLORFF00AA;

 

STICKLINE(1,COST(5),COST(20),0.1,-1),COLORRED;

STICKLINE(1,COST(80),COST(95),0.1,1),COLORMAGENTA;

 

 

DRAWTEXT(CROSS(COST(20)-COST(1),4*AF),COST(20)*0.9,'20'),COLORLIGRAY;

DRAWTEXT(CROSS(COST(40)-COST(20),4*AF),COST(40)*0.8,'40'),COLORLIGRAY;

DRAWTEXT(CROSS(COST(60)-COST(40),4*AF),COST(60)*1.3,'60'),COLORLIGRAY;

DRAWTEXT(CROSS(COST(80)-COST(60),4*AF),COST(80)*1.2,'80'),COLORLIGRAY;

DRAWTEXT(CROSS(COST(99)-COST(80),4*AF),COST(99)*1.1,'100'),COLORLIGRAY;

DRAWTEXT(CROSS(4*AF,COST(20)-COST(1)),COST(20)*0.9,'20'),COLORRED;

DRAWTEXT(CROSS(4*AF,COST(40)-COST(20)),COST(40)*0.8,'40'),COLORRED;

DRAWTEXT(CROSS(4*AF,COST(60)-COST(40)),COST(60)*1.3,'60'),COLORRED;

DRAWTEXT(CROSS(4*AF,COST(80)-COST(60)),COST(80)*1.2,'80'),COLORRED;

DRAWTEXT(CROSS(4*AF,COST(99)-COST(80)),COST(99)*1.1,'100'),COLORRED;

 

 

 

最高点:=REFDATE(CONST(REF(HHV(H,0),0)),DATE),LINETHICK3,COLORRED;

最低点:=REFDATE(CONST(REF(LLV(L,0),0)),DATE),LINETHICK3,COLORGREEN;

 

筹码顶:=REFDATE(CONST(COST(99.999)),DATE),LINETHICK3,COLORMAGENTA;

筹码底:=REFDATE(CONST(COST(0.001)),DATE),LINETHICK3,COLORCYAN;

 

高低价差:=(筹码顶-筹码底),DOTLINE;

区间1:筹码顶-高低价差*0.90,DOTLINE;

区间2:筹码顶-高低价差*0.80,DOTLINE;

区间3:筹码顶-高低价差*0.70,DOTLINE;

区间4:筹码顶-高低价差*0.60,DOTLINE;

区间5:筹码顶-高低价差*0.50,DOTLINE;

区间6:筹码顶-高低价差*0.40,DOTLINE;

区间7:筹码顶-高低价差*0.30,DOTLINE;

区间8:筹码顶-高低价差*0.20,DOTLINE;

区间9:筹码顶-高低价差*0.10,DOTLINE;

 

 

{画K线} 

DRAWKLINE(HIGH,OPEN,LOW,CLOSE);

 

{用文字来描述空间位置，便于快速识别}

DRAWTEXT(CURRBARSCOUNT=6,筹码底,'筹码底位'),COLORWHITE;

DRAWTEXT(CURRBARSCOUNT=6,筹码顶,'筹码顶位'),COLORWHITE;

 

DRAWTEXT(CURRBARSCOUNT=1,区间1,'低位一区'),COLORWHITE;

DRAWTEXT(CURRBARSCOUNT=1,区间2,'低位二区'),COLORWHITE;

DRAWTEXT(CURRBARSCOUNT=1,区间3,'低位三区'),COLORWHITE;

DRAWTEXT(CURRBARSCOUNT=1,区间4,'中位四区'),COLORWHITE;

DRAWTEXT(CURRBARSCOUNT=1,区间5,'中位五区'),COLORWHITE;

DRAWTEXT(CURRBARSCOUNT=1,区间6,'中位六区'),COLORWHITE;

DRAWTEXT(CURRBARSCOUNT=1,区间7,'高位七区'),COLORWHITE;

DRAWTEXT(CURRBARSCOUNT=1,区间8,'高位八区'),COLORWHITE;

DRAWTEXT(CURRBARSCOUNT=1,区间9,'高位九区'),COLORWHITE;

 

DRAWTEXT(CURRBARSCOUNT=1,最低点,'最低点位'),COLORWHITE;

DRAWTEXT(CURRBARSCOUNT=1,最高点,'最高点位'),COLORWHITE;