通达信筹码转移与股价拉升主图指标公式源码

　　通达信筹码转移与股价拉升主图指标公式源码

　　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));

　　{筹码散线}

　　VAR1:COST(1),COLOR202020;

　　VAR2:COST(2),COLOR202020;

　　VAR3:COST(4),COLOR202020;

　　VAR4:COST(6),COLOR202020;

　　VAR5:COST(8),COLOR202020;

　　VAR6:COST(10),COLOR282828;

　　VAR7:COST(12),COLOR282828;

　　VAR8:COST(14),COLOR282828;

　　VAR9:COST(16),COLOR282828;

　　VAR10:COST(18),COLOR282828;

　　VAR11:COST(20),COLOR303030;

　　VAR12:COST(22),COLOR303030;

　　VAR13:COST(24),COLOR303030;

　　VAR14:COST(26),COLOR303030;

　　VAR15:COST(28),COLOR303030;

　　VAR16:COST(30),COLOR303030;

　　VAR17:COST(32),COLOR303030;

　　VAR18:COST(34),COLOR303030;

　　VAR19:COST(36),COLOR303030;

　　VAR20:COST(38),COLOR303030;

　　VAR21:COST(40),COLOR303030;

　　VAR22:COST(42),COLOR303030;

　　VAR23:COST(44),COLOR303030;

　　VAR24:COST(46),COLOR303030;

　　VAR25:COST(48),COLOR303030;

　　VAR26:COST(50),COLOR303030;

　　VAR27:COST(52),COLOR303030;

　　VAR28:COST(54),COLOR303030;

　　VAR29:COST(56),COLOR303030;

　　VAR30:COST(58),COLOR303030;

　　VAR31:COST(60),COLOR303030;

　　VAR32:COST(62),COLOR303030;

　　VAR33:COST(64),COLOR303030;

　　VAR34:COST(66),COLOR303030;

　　VAR35:COST(68),COLOR303030;

　　VAR36:COST(70),COLOR303030;

　　VAR37:COST(72),COLOR303030;

　　VAR38:COST(74),COLOR303030;

　　VAR39:COST(76),COLOR303030;

　　VAR40:COST(78),COLOR303030;

　　VAR41:COST(80),COLOR303030;

　　VAR42:COST(82),COLOR282828;

　　VAR43:COST(84),COLOR282828;

　　VAR44:COST(86),COLOR282828;

　　VAR45:COST(88),COLOR282828;

　　VAR46:COST(90),COLOR282828;

　　VAR47:COST(92),COLOR282828;

　　VAR48:COST(94),COLOR282828;

　　VAR49:COST(96),COLOR202020;

　　VAR50:COST(98),COLOR202020;

　　VAR51: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);