通达信筹码分布数据副图指标 源码 贴图 平均成本: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);{爱股网 WWW.72GU.COM} 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;
|
