编程思路破译
输出获利比例:以收盘价计算的获利盘比例*100
输出平均成本:获利盘为50%的成本分布
C95赋值:获利盘为95%的成本分布
C5赋值:获利盘为5%的成本分布
C85赋值:获利盘为85%的成本分布
C15赋值:获利盘为15%的成本分布
输出成本集中90:(C95-C5)/0日内最高价的最高值的最后一日取值设为常数*100
输出成本集中70:(C85-C15)/0日内最高价的最高值的最后一日取值设为常数*100
A1赋值:字符串相加
A2赋值:字符串相加
AA赋值:字符串相加
B1赋值:字符串相加
BB赋值:字符串相加
C1赋值:字符串相加
C2赋值:字符串相加
C3赋值:字符串相加
CC赋值:字符串相加
D1赋值:字符串相加
D2赋值:字符串相加
D3赋值:字符串相加
DD赋值:字符串相加
当满足条件是否最后一个周期时,在横轴0.8纵轴0位置书写文字
当满足条件是否最后一个周期时,在横轴0.8纵轴0.08位置书写文字
当满足条件是否最后一个周期时,在横轴0.8纵轴0.16位置书写文字
当满足条件是否最后一个周期时,在横轴0.8纵轴0.24位置书写文字
流通A股赋值:专业财务数据(指定日期)
十大流通A股赋值:专业财务数据(指定日期)
衰减系数赋值:流通A股/(流通A股-十大流通A股),NODRAW
当满足条件是否最后一个周期时,在横轴0.2纵轴0.4位置书写文字,画黄色
程序源码
获利比例: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
未发现:LWINNER...
未发现:PWINNER...
该公式包含未来函数:COST
注：
馆内各种公式为学习编程而保存，实战使用前一定要看其中是否有未来函数并自己亲自测试成功率，决不能依据公式名称的描述和形容去投资，据此入市造成投资损失由投资者自己承担。
发文不易，如获益，欢迎赞赏，赞赏必复！
联系客服
