当前位置：分析家公式网 → 股票公式 → 通达信公式 → 一键转帖：动态筹码 筹码主图 彩色筹码 （通达信公式 主图 副图 源码 测试图）
软件名称：[B]动态筹码 筹码主图 彩色筹码 （通达信公式 主图 副图 源码 测试图）[/B]
软件类型：国产软件
运行环境：Win9X/Win2000/WinXP/Win2003/Win7/
软件语言：简体中文
授权方式：免费版
软件大小：6.00 KB
官方主页：Home Page
更新时间：2020-03-13 00:17:12
软件简介:
动态筹码等几个公式，以前发过加密的，这次是源码分享的。
{动态筹码}
现价获利比例: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.70822.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;
[url=http://www.70822.com/soft/sort013/sort05/down-145901.html]动态筹码 筹码主图 彩色筹码 （通达信公式 主图 副图 源码 测试图）[/url]