通达信筹码通道、情绪周期、筹码交错三合一主副图指标 源码 附图

{筹码通道源码如下}
筹码集中度:=(COST(90+(100-90)/2)-COST((100-90)/2))/(COST(90+(100-90)/2)+COST((100-90)/2))+C;

超短筹:MA(EXPMA(筹码集中度,10),3);

短筹:MA(EXPMA(筹码集中度,20),3),COLORBLUE;

中筹:MA(EXPMA(筹码集中度,60),3);

长筹:MA(EXPMA(筹码集中度,120),3);

DRAWBAND(中筹,RGB(0,100,0),长筹,RGB(0,100,0));

DRAWBAND(短筹,RGB(100,0,100),中筹,RGB(100,0,100));

DRAWBAND(超短筹,RGB(0,0,100),短筹,RGB(0,0,100));

DRAWKLINE(H,O,L,C);

{涨停变黄颜色}

STICKLINE(C>1.09*REF(C,1) AND C=H,C,O,2.5,0),COLORYELLOW;

{跌停变绿颜色}

STICKLINE(C<0.905*REF(C,1) AND C=L,C,O,2.5,0),COLORGREEN;

{炸板}

C22:=REF(C,1);

炸板:=IF((H-C22)*100/C22>=(10-0.01*100/C22),1,0);

涨停10:=IF((C-C22)*100/C22>=(10-0.01*100/C22),1,0);

IF(炸板 AND NOT(涨停10),H*1,DRAWNULL),CIRCLEDOT,COLORFF00FF,LINETHICK1;

高价天数:TOPRANGE(C),COLORLIRED,NODRAW;

IF(高价天数>60,C*1,DRAWNULL),CIRCLEDOT,COLORGREEN,LINETHICK1;

{筹码交错副图如下}


HSL:=EMA(V/CAPITAL,3);

ZDL:=HHV(HSL,240);

ZXL:=LLV(HSL,240);

XS:=MA(C,33);

HL10:=WINNER(C/1.1)*100,STICK,COLORRED;

STICKLINE(((C/1.1)*100),HL10,0,2.7,0),COLOR000055;

STICKLINE(((C/1.1)*100),HL10,0,1.7,0),COLOR000077;

STICKLINE(((C/1.1)*100),HL10,0,0.7,0),COLOR0000BB;

STICKLINE(((C/1.1)*100),HL10,0,0.2,0),COLOR0000FF;

HL20:=WINNER(C/1.2)*100,STICK,COLORYELLOW;

STICKLINE(((C/1.2)*100),HL20,0,2.7,0)COLOR009999;

STICKLINE(((C/1.2)*100),HL20,0,1.7,0)COLOR00BBBB;

STICKLINE(((C/1.2)*100),HL20,0,0.7,0)COLOR00DDDD;

STICKLINE(((C/1.2)*100),HL20,0,0.2,0)COLOR00FFFF;

HL30:=WINNER(C/1.3)*100,STICK,COLORFF00FF;

STICKLINE(((C/1.3)*100),HL30,0,2.7,0),COLORFF1100;

STICKLINE(((C/1.3)*100),HL30,0,1.7,0),COLORFF5500;

STICKLINE(((C/1.3)*100),HL30,0,0.7,0),COLORFF9900;

STICKLINE(((C/1.3)*100),HL30,0,0.2,0),COLORFFDD00;

BB:=100,POINTDOT,LINETHICK2,COLORRED;

AA:=15,COLORYELLOW;

DD:=70,COLORYELLOW;

CC:=300,POINTDOT,LINETHICK2,COLORGREEN;

X4:=EMA(C,20);

二十日斜率:(X4-REF(X4,1))/REF(X4,1)*100,LINETHICK0;

十日换手率:SUM(VOL,10)/CAPITAL*100,LINETHICK1;

锁定筹码:EMA((HSL-ZXL)/ZXL*XS,13),LINETHICK2;

浮动筹码:EMA((ZDL-HSL)/HSL*XS,13),LINETHICK2;

力量对比:锁定筹码-浮动筹码,COLORSTICK;

筹码交错:CROSS(锁定筹码,浮动筹码);

DRAWICON(筹码交错,L,15);


{筹码情绪周期源码如下}
\
ZJ:=MA("KDJ.J#WEEK"(9,3,3) ,5);

AAA:=ZJ<0 AND ZJ<REF(ZJ,1);

BB:=ZJ<0 AND ZJ>=REF(ZJ,1);

DD:=ZJ>=0 AND ZJ>=REF(ZJ,1);

EE:= ZJ>85;

FF:=ZJ<REF(ZJ,1) AND ZJ>0;

TT:=IF(ISLASTBAR,240/FROMOPEN,1);

NN:=120;

HH:=HHV(V*TT,NN);

LL:=LLV(V,NN);

最高:=CONST(HH);

最低:=CONST(LL);

最高2:=CONST(HHV(H,NN));

最低2:=CONST(LLV(L,NN));

PP:=IF((最高2*0.9-(最高2-最低2)*0.5)>CONST(LLV(L,20)),0.9,IF((最高2*0.9-(最高2-最低2)*0.5)>CONST(LLV(L,50)),0.7,0.6)),NODRAW;

RCC1:=最高2*0.9-(最高2-最低2)*PP;

最低3:=MIN(RCC1,最低2);

AA:=最低3;

STICKLINE(AAA,AA-0.000*AA,AA-0.040*AA,2.5,0),COLOR3EA6FF;

STICKLINE(BB,AA-0.000*AA,AA-0.040*AA,2.5,0),COLORFF00FF;

STICKLINE(DD,AA-0.000*AA,AA-0.040*AA,2.5,0),COLOR0000FF;

STICKLINE(EE,AA-0.000*AA,AA-0.040*AA,2.5,1),COLOR00FFFF;

STICKLINE(FF,AA-0.000*AA,AA-0.040*AA,2.5,1),COLORFFFF00;

DRAWTEXT_FIX(1,0.2,0.86,0,'★★ 橘红色--周J<0--底部警示★★粉色--周J拐头--买入★★红色--周J向上--加仓★★黄色--周J>85--风险提示★★青色--周J下跌--持币★★'),COLOR00FFFF;

原理解析：
{筹码通道源码如下}筹码集中度赋值:(获利盘为90+(100-90%的成本分布/2)-COST((100-90)/2))/(获利盘为90+(100-90%的成本分布/2)+COST((100-90)/2))+C
输出超短筹:筹码集中度的10日指数移动平均的3日简单移动平均
输出短筹:筹码集中度的20日指数移动平均的3日简单移动平均, 画蓝色
输出中筹:筹码集中度的60日指数移动平均的3日简单移动平均
输出长筹:筹码集中度的120日指数移动平均的3日简单移动平均
DRAWBAND(中筹,RGB(0,100,0),长筹,RGB(0,100,0))
DRAWBAND(短筹,RGB(100,0,100),中筹,RGB(100,0,100))
DRAWBAND(超短筹,RGB(0,0,100),短筹,RGB(0,0,100))
DRAWKLINE(H,O,L,C)
{涨停变黄颜色}STICKLINE(C>1.09*1日前的C AND C=H,C,O,2.5,0),COLORYELLOW
{跌停变绿颜色}STICKLINE(C<0.905*1日前的C AND C=L,C,O,2.5,0),COLORGREEN
{炸板}C22赋值:1日前的C
炸板赋值:IF((H-C22)*100/C22>=(10-0.01*100/C22),1,0)
涨停10赋值:IF((C-C22)*100/C22>=(10-0.01*100/C22),1,0)
IF(炸板 AND NOT(涨停10),H*1,DRAWNULL),CIRCLEDOT,COLORFF00FF,LINETHICK1
输出高价天数:TOPRANGE(C),COLORLIRED,NODRAW
如果高价天数>60返回C*1否则返回DRAWNULL
{筹码交错副图如下}HSL赋值:V/当前流通股本的3日指数移动平均
ZDL赋值:240日内HSL最高值
ZXL赋值:240日内HSL最低值
XS赋值:C的33日简单移动平均
HL10赋值:C/1.1计算的获利盘比例*100,STICK,画红色
STICKLINE(((C/1.1)*100),HL10,0,2.7,0),COLOR000055
STICKLINE(((C/1.1)*100),HL10,0,1.7,0),COLOR000077
STICKLINE(((C/1.1)*100),HL10,0,0.7,0),COLOR0000BB
STICKLINE(((C/1.1)*100),HL10,0,0.2,0),COLOR0000FF
HL20赋值:C/1.2计算的获利盘比例*100,STICK,COLORYELLOW
STICKLINE(((C/1.2)*100),HL20,0,2.7,0)COLOR009999
STICKLINE(((C/1.2)*100),HL20,0,1.7,0)COLOR00BBBB
STICKLINE(((C/1.2)*100),HL20,0,0.7,0)COLOR00DDDD
STICKLINE(((C/1.2)*100),HL20,0,0.2,0)COLOR00FFFF
HL30赋值:C/1.3计算的获利盘比例*100,STICK,COLORFF00FF
STICKLINE(((C/1.3)*100),HL30,0,2.7,0),COLORFF1100
STICKLINE(((C/1.3)*100),HL30,0,1.7,0),COLORFF5500
STICKLINE(((C/1.3)*100),HL30,0,0.7,0),COLORFF9900
STICKLINE(((C/1.3)*100),HL30,0,0.2,0),COLORFFDD00
BB赋值:100,POINTDOT, 线宽为2,画红色
AA赋值:15,COLORYELLOW
DD赋值:70,COLORYELLOW
CC赋值:300,POINTDOT, 线宽为2,COLORGREEN
X4赋值:C的20日指数移动平均
输出二十日斜率:(X4-1日前的X4)/1日前的X4*100,LINETHICK0
输出十日换手率:10的成交量日累和/当前流通股本*100,LINETHICK1
输出锁定筹码:EMA((HSL-ZXL)/ZXL*XS,13), 线宽为2
输出浮动筹码:EMA((ZDL-HSL)/HSL*XS,13), 线宽为2
输出力量对比:锁定筹码-浮动筹码,COLORSTICK
输出筹码交错:锁定筹码上穿浮动筹码
当满足条件筹码交错时,在L和15之间画图标
{筹码情绪周期源码如下}\ZJ赋值:MA("KDJ.J#WEEK"(9,3,3) ,5)
AAA赋值:ZJ<0 AND ZJ<1日前的ZJ
BB赋值:ZJ<0 AND ZJ>=1日前的ZJ
DD赋值:ZJ>=0 AND ZJ>=1日前的ZJ
EE赋值: ZJ>85
FF赋值:ZJ<1日前的ZJ AND ZJ>0
如果ISLASTBAR返回240/FROM开盘价否则返回1
NN赋值:120
HH赋值:NN日内V*TT最高值
LL赋值:NN日内V最低值
最高赋值:CONST(HH)
最低赋值:CONST(LL)
最高2:=CONST(NN日内H最高值)
最低2:=CONST(NN日内L最低值)
PP赋值:IF((最高2*0.9-(最高2-最低2)*0.5)>CONST(20日内L最低值),0.9,IF((最高2*0.9-(最高2-最低2)*0.5)>CONST(50日内L最低值),0.7,0.6)),NODRAW
RCC1:=最高2*0.9-(最高2-最低2)*PP
最低3:=RCC1和最低2的较小值
AA赋值:最低3
当满足条件AAA时,在AA-0.000*AA和AA-0.040*AA之间画柱状线
当满足条件BB时,在AA-0.000*AA和AA-0.040*AA之间画柱状线
当满足条件DD时,在AA-0.000*AA和AA-0.040*AA之间画柱状线
当满足条件EE时,在AA-0.000*AA和AA-0.040*AA之间画柱状线
当满足条件FF时,在AA-0.000*AA和AA-0.040*AA之间画柱状线
当满足条件1时,在横轴0.2纵轴0.86位置书写文字