通达信接近筹码分布图数据的股票指标副图
获利比例:WINNER(C)*100;
平均成本:COST(50);
C95:=COST(95);
C5:=COST(5);
C85:=COST(85);
C15:=COST(15);
成本集中90:(C95-C5)/CONST(HHV(H,0))*100;
成本集中70:(C85-C15)/CONST(HHV(H,0))*100;
A1:=STRCAT('获利比例',': ');
A2:=STRCAT(CON2STR(获利比例,1),'%');
AA:=STRCAT(A1,A2);
B1:=STRCAT('平均成本',': ');
BB:=STRCAT(B1,CON2STR(平均成本,2));
C1:=STRCAT('90%成本',CON2STR(C5,2));
C2:=STRCAT('-',CON2STR(C95,2));
C3:=STRCAT('集中',CON2STR(成本集中90,1));
CC:=STRCAT(STRCAT(STRCAT(C1,C2),C3),'%');
D1:=STRCAT('70%成本',CON2STR(C15,2));
D2:=STRCAT('-',CON2STR(C85,2));
D3:=STRCAT('集中',CON2STR(成本集中70,1));
DD:=STRCAT(STRCAT(STRCAT(D1,D2),D3),'%');
DRAWTEXT_FIX(ISLASTBAR,0.8,0,0,AA);
DRAWTEXT_FIX(ISLASTBAR,0.8,0.08,0,BB);
DRAWTEXT_FIX(ISLASTBAR,0.8,0.16,0,CC);
DRAWTEXT_FIX(ISLASTBAR,0.8,0.24,0,DD);
流通A股:=FINONE(239,0,0);{已上市流通A股（最新的财报）}
十大流通A股:=FINONE(264,0,0);{十大流通股东持有的流通A股（最新的财报）}
衰减系数:=流通A股/(流通A股-十大流通A股),NODRAW;
DRAWTEXT_FIX(ISLASTBAR,0.2,0.4,0,STRCAT('历史换手衰减系数：',CON2STR(衰减系数,2))),COLORYELLOW;
未来函数检测结果如下：
该公式包含未来函数:WINNER
该公式包含未来函数:COST
解密、编写股票、期货策略请联系QQ或微信同号：88652583
相关股票指标公式
原理解析：
输出获利比例:C计算的获利盘比例*100
输出平均成本:获利盘为50%的成本分布
C95赋值:获利盘为95%的成本分布
C5赋值:获利盘为5%的成本分布
C85赋值:获利盘为85%的成本分布
C15赋值:获利盘为15%的成本分布
输出成本集中90:(C95-C5)/CONST(0日内H最高值)*100
输出成本集中70:(C85-C15)/CONST(0日内H最高值)*100
A1:=STRCAT('获利比例',': ')
A2赋值:STRCAT(CON2STR(获利比例,1),'%')
AA赋值:STRCAT(A1,A2)
B1:=STRCAT('平均成本',': ')
BB赋值:STRCAT(B1,CON2STR(平均成本,2))
C1赋值:STRCAT('90%成本',CON2STR(C5,2))
C2赋值:STRCAT('-',CON2STR(C95,2))
C3赋值:STRCAT('集中',CON2STR(成本集中90,1))
CC赋值:STRCAT(STRCAT(STRCAT(C1,C2),C3),'%')
D1赋值:STRCAT('70%成本',CON2STR(C15,2))
D2赋值:STRCAT('-',CON2STR(C85,2))
D3赋值:STRCAT('集中',CON2STR(成本集中70,1))
DD赋值:STRCAT(STRCAT(STRCAT(D1,D2),D3),'%')
当满足条件ISLASTBAR时,在横轴0.8纵轴0位置书写文字
当满足条件ISLASTBAR时,在横轴0.8纵轴0.08位置书写文字
当满足条件ISLASTBAR时,在横轴0.8纵轴0.16位置书写文字
当满足条件ISLASTBAR时,在横轴0.8纵轴0.24位置书写文字
流通A股赋值:FINONE(239,0,0)
{已上市流通A股（最新的财报）}十大流通A股赋值:FINONE(264,0,0)
{十大流通股东持有的流通A股（最新的财报）}衰减系数:=流通A股/(流通A股-十大流通A股),NODRAW
DRAWTEXT_FIX(ISLASTBAR,0.2,0.4,0,STRCAT('历史换手衰减系数：',CON2STR(衰减系数,2))),画黄色
