动态筹码 筹码主图 彩色筹码 （通达信公式 主图 副图 源码 测试图）(图文)

动态筹码等几个公式，以前发过加密的，这次是源码分享的。


 {动态筹码}

现价获利比例:WINNER(CLOSE)*100,NODRAW;

XA_1:=COST(0.1);

XA_2:=COST(99.900002);

XA_3:=(XA_2-XA_1)/10;

STICKLINE((WINNER(XA_1+XA_3)-WINNER(XA_1))*100>1,XA_1,XA_1+XA_3,3,0),COLOR000066;

STICKLINE((WINNER(XA_1+XA_3*2)-WINNER(XA_1+XA_3))*100>1,XA_1+XA_3,XA_1+XA_3*2,3,0),COLOR5533FF;

STICKLINE((WINNER(XA_1+XA_3*3)-WINNER(XA_1+XA_3*2))*100>1,XA_1+XA_3*2,XA_1+XA_3*3,3,0),COLOR7777FF;

STICKLINE((WINNER(XA_1+XA_3*4)-WINNER(XA_1+XA_3*3))*100>1,XA_1+XA_3*3,XA_1+XA_3*4,3,0),COLORWHITE;

STICKLINE((WINNER(XA_1+XA_3*5)-WINNER(XA_1+XA_3*4))*100>1,XA_1+XA_3*4,XA_1+XA_3*5,3,0),COLORFFCC00;

STICKLINE((WINNER(XA_1+XA_3*6)-WINNER(XA_1+XA_3*5))*100>1,XA_1+XA_3*5,XA_1+XA_3*6,3,0),COLORCC6600;

STICKLINE((WINNER(XA_1+XA_3*7)-WINNER(XA_1+XA_3*6))*100>1,XA_1+XA_3*6,XA_1+XA_3*7,3,0),COLOR663300;

STICKLINE((WINNER(XA_1+XA_3*8)-WINNER(XA_1+XA_3*7))*100>1,XA_1+XA_3*7,XA_1+XA_3*8,3,0),COLOR006633;

STICKLINE((WINNER(XA_1+XA_3*9)-WINNER(XA_1+XA_3*8))*100>1,XA_1+XA_3*8,XA_1+XA_3*9,3,0),COLOR009933;

STICKLINE((WINNER(XA_2)-WINNER(XA_1+XA_3*9))*100>1,XA_1+XA_3*9,XA_2,3,0),COLOR00DD33;

筹一:(WINNER(XA_1+XA_3)-WINNER(XA_1))*100,NODRAW;

筹二:(WINNER(XA_1+XA_3*2)-WINNER(XA_1+XA_3))*100,NODRAW;

筹三:(WINNER(XA_1+XA_3*3)-WINNER(XA_1+XA_3*2))*100,NODRAW;

筹四:(WINNER(XA_1+XA_3*4)-WINNER(XA_1+XA_3*3))*100,NODRAW;

筹五:(WINNER(XA_1+XA_3*5)-WINNER(XA_1+XA_3*4))*100,NODRAW;

筹六:(WINNER(XA_1+XA_3*6)-WINNER(XA_1+XA_3*5))*100,NODRAW;

筹七:(WINNER(XA_1+XA_3*7)-WINNER(XA_1+XA_3*6))*100,NODRAW;

筹八:(WINNER(XA_1+XA_3*8)-WINNER(XA_1+XA_3*7))*100,NODRAW;

筹九:(WINNER(XA_1+XA_3*9)-WINNER(XA_1+XA_3*8))*100,NODRAW;

筹十:(WINNER(XA_2)-WINNER(XA_1+XA_3*9))*100,NODRAW;

DRAWNUMBER(筹一>1,XA_1+XA_3,INTPART(筹一)),COLOR7777FF;

DRAWNUMBER(筹二>1,XA_1+XA_3*2,INTPART(筹二)),COLOR7777FF;

DRAWNUMBER(筹三>1,XA_1+XA_3*3,INTPART(筹三)),COLORWHITE;

DRAWNUMBER(筹四>1,XA_1+XA_3*4,INTPART(筹四)),COLOR7777FF;

DRAWNUMBER(筹五>1,XA_1+XA_3*5,INTPART(筹五)),COLORWHITE;

DRAWNUMBER(筹六>1,XA_1+XA_3*6,INTPART(筹六)),COLORFFCC00;

DRAWNUMBER(筹七>1,XA_1+XA_3*7,INTPART(筹七)),COLORFFCC00;

DRAWNUMBER(筹八>1,XA_1+XA_3*8,INTPART(筹八)),COLOR00DD33;

DRAWNUMBER(筹九>1,XA_1+XA_3*9,INTPART(筹九)),COLOR00DD33;

DRAWNUMBER(筹十>1,XA_2,INTPART(筹十)),COLORWHITE;

DRAWKLINE(HIGH,OPEN,LOW,CLOSE);

现价: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;

{筹码主图}

成交量显示:=1;

MA5:MA(CLOSE,5);

MA10:MA(CLOSE,10);

MA20:MA(CLOSE,20);

MA60:MA(CLOSE,60);

VAR1:=COST(90);

VAR2:=COST(70);

VAR3:=COST(50);

VAR4:=COST(30);

VAR5:=COST(2);

VAR6:=INTPART(COST(2)*100)/100;

VAR7:=INTPART(COST(0.01)*100)/100;

筹码牛熊:EMA((VAR1+VAR2+VAR3+VAR4+VAR5)/5,3),COLORYELLOW,LINETHICK3;

VAR8:=COST(90)>REF(COST(90),1) AND COST(70)>REF(COST(70),1) AND COST(50)>REF(COST(50),1) AND COST(30)>REF(COST(30),1);

VAR9:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100>6 AND VAR8 AND CLOSE>COST(90) AND LOW<COST(90) AND (LOW-筹码牛熊)/筹码牛熊*100<5;

STICKLINE(VAR9,OPEN,CLOSE,2.4,0),COLORYELLOW;

DRAWICON(VAR9,LOW*0.97,26);

VAR10:=FILTER((CLOSE-COST(2))/COST(2)*100<3 AND CLOSE>VAR6 AND VAR6>=REF(VAR6,1),3);

DRAWICON(VAR10,LOW*0.97,38);

VAR11:=BARSLAST(VAR10);

VAR12:=BARSLAST(VAR7<REF(VAR7,1) AND REF(VAR7,1)>=REF(VAR7,2));

DRAWICON(VAR7<REF(VAR7,1) AND REF(VAR7,1)>=REF(VAR7,2) AND REF(VAR11,1)<REF(VAR12,1),HIGH*1.01,39);

STICKLINE(VAR10,OPEN,CLOSE,2,0),COLORYELLOW;

DRAWNUMBER(CURRBARSCOUNT=1 AND CLOSE>0,筹码牛熊,(CLOSE-筹码牛熊)/筹码牛熊*100),COLORWHITE;

VAR13:=48;

VAR14:=48;

VAR15:=CONST(LLV(LOW,VAR13))*0.85;

VAR16:=VOL/(EMA(VOL,250)/EMA(CLOSE,250)*VAR14);

VAR17:=CLOSE/VAR16;

VAR18:=HIGH/VAR16;

VAR19:=LOW/VAR16;

VAR20:=OPEN/VAR16;

VAR21:=VAR16/((VAR18-VAR19)*2-ABS(VAR17-VAR20));

VAR22:=IF(VAR17>VAR20,VAR21*(VAR18-VAR19),IF(VAR17<VAR20,VAR21*(VAR18-VAR20+(VAR17-VAR19)),VAR16/2));

VAR23:=IF(VAR17>VAR20,0-VAR21*(VAR18-VAR17+(VAR20-VAR19)),IF(VAR17<VAR20,0-VAR21*(VAR18-VAR19),0-VAR16/2));

STICKLINE(CLOSE>OPEN AND 成交量显示=1,VAR16+VAR15,VAR22+VAR15,0.5,0),COLOR7777FF;

STICKLINE(CLOSE>OPEN AND 成交量显示=1,VAR15,VAR22+VAR15,0.5,0),COLOR7777FF;

STICKLINE(CLOSE<OPEN AND 成交量显示=1,VAR16+VAR15,VAR22+VAR15,0.5,0),COLOR00DD33;

STICKLINE(CLOSE<OPEN AND 成交量显示=1,VAR15,VAR22+VAR15,0.5,0),COLOR00DD33;

 

{彩色筹码}

HJ_1:=COST(0.1);

HJ_2:=COST(99.900002);

HJ_3:=(HJ_2-HJ_1)/10;

{WWW.88GS.COM}

红色筹码:INTPART((WINNER(HJ_1+HJ_3*3)-WINNER(HJ_1))*100),COLOR5533FF,LINETHICK3;

蓝色筹码:INTPART((WINNER(HJ_1+HJ_3*7)-WINNER(HJ_1+HJ_3*4))*100),COLORCC6600,LINETHICK3;

绿色筹码:INTPART((WINNER(HJ_2)-WINNER(HJ_1+HJ_3*7))*100),COLOR009933,LINETHICK3;