筹码转移与股价拉升 主力的阳谋 筹码主图指标 源码
股价拉升，筹码却减少，筹码峰上移，如没有新的主力来承接，就危险了，尽量找主力真金白银投入的拉升才有确定性。
DRAWGBK(C>0,RGB(0,150,150),RGB(0,00,100),0,' ',0),LINETHICK2;
{主力筹码主图}
{价格定义}
AMAP:=(C*3+O+H+L)/6;
AMA0:=AMA(AMAP,1/3);
AMA1:=AMA(AMA0,1/9);
AMA2:=AMA(AMA0,1/21);
AMA3:=AMA(AMA0,1/60);
{多空透明}
DRAWBAND(COST(00.01),RGB(10,10,10),COST(99.99),RGB(10,10,10));
DRAWBAND(COST(1),RGB(13,13,13),COST(99),RGB(13,13,13));
DRAWBAND(COST(2),RGB(16,16,16),COST(98),RGB(16,16,16));
DRAWBAND(COST(4),RGB(19,19,19),COST(96),RGB(19,19,19));
DRAWBAND(COST(6),RGB(22,22,22),COST(94),RGB(22,22,22));
DRAWBAND(COST(8),RGB(25,25,25),COST(92),RGB(25,25,25));
DRAWBAND(COST(10),RGB(25,25,25),COST(90),RGB(25,25,25));
STICKLINE(H>=L,COST(00.01),COST(99.99),0,0),COLOR101010;
STICKLINE(H>=L,COST(1),COST(99),0,0),COLOR131313;
STICKLINE(H>=L,COST(2),COST(98),0,0),COLOR161616;
STICKLINE(H>=L,COST(4),COST(96),0,0),COLOR191919;
STICKLINE(H>=L,COST(6),COST(94),0,0),COLOR1C1C1C;
STICKLINE(H>=L,COST(8),COST(92),0,0),COLOR1F1F1F;
STICKLINE(H>=L,COST(10),COST(90),0,0),COLOR222222;
DRAWBAND(AMAP,RGB(60,30,30),AMA3,RGB(20,40,40));
DRAWBAND(AMAP,RGB(90,20,20),AMA2,RGB(15,60,60));
{筹码散线}
GZB1:COST(1),COLOR202020;
GZB2:COST(2),COLOR202020;
GZB3:COST(4),COLOR202020;
GZB4:COST(6),COLOR202020;
GZB5:COST(8),COLOR202020;
GZB6:COST(10),COLOR282828;
GZB7:COST(12),COLOR282828;
GZB8:COST(14),COLOR282828;
GZB9:COST(16),COLOR282828;
GZB10:COST(18),COLOR282828;
GZB11:COST(20),COLOR303030;
GZB12:COST(22),COLOR303030;
GZB13:COST(24),COLOR303030;
GZB14:COST(26),COLOR303030;
GZB15:COST(28),COLOR303030;
GZB16:COST(30),COLOR303030;
GZB17:COST(32),COLOR303030;
GZB18:COST(34),COLOR303030;
GZB19:COST(36),COLOR303030;
GZB20:COST(38),COLOR303030;
GZB21:COST(40),COLOR303030;
GZB22:COST(42),COLOR303030;
GZB23:COST(44),COLOR303030;
GZB24:COST(46),COLOR303030;
GZB25:COST(48),COLOR303030;
GZB26:COST(50),COLOR303030;
GZB27:COST(52),COLOR303030;
GZB28:COST(54),COLOR303030;
GZB29:COST(56),COLOR303030;
GZB30:COST(58),COLOR303030;
GZB31:COST(60),COLOR303030;
GZB32:COST(62),COLOR303030;
GZB33:COST(64),COLOR303030;
GZB34:COST(66),COLOR303030;
GZB35:COST(68),COLOR303030;
GZB36:COST(70),COLOR303030;
GZB37:COST(72),COLOR303030;
GZB38:COST(74),COLOR303030;
GZB39:COST(76),COLOR303030;
GZB40:COST(78),COLOR303030;
GZB41:COST(80),COLOR303030;
GZB42:COST(82),COLOR282828;
GZB43:COST(84),COLOR282828;
GZB44:COST(86),COLOR282828;
GZB45:COST(88),COLOR282828;
GZB46:COST(90),COLOR282828;
GZB47:COST(92),COLOR282828;
GZB48:COST(94),COLOR282828;
GZB49:COST(96),COLOR202020;
GZB50:COST(98),COLOR202020;
GZB51:COST(99),COLOR202020;
{多空不透明}
DRAWBAND(AMAP,RGB(120,0,0),AMA1,RGB(0,100,100));
DRAWBAND(AMA0,RGB(100,0,0),AMA1,RGB(0,80,80));
{均线绘制}
NOTEXTA3:AMA3,COLOR3C3C4C;
NOTEXTA3K:IF(AMA3>AMAP,AMA3,DRAWNULL),COLOR3C3C2C;
NOTEXTA2:AMA2,COLOR4C4C8C;
NOTEXTA2K:IF(AMA2>AMAP,AMA2,DRAWNULL),COLOR6C6C2C;
NOTEXTA1:AMA1,COLOR4C4CFC;
NOTEXTA1K:IF(AMA1>AMAP,AMA1,DRAWNULL),COLORBCBC2C;
NOTEXTA0:AMA0,COLORC8C8C8;
DRAWKLINE(H,O,L,C);
