「翔博精选指标」筹码穿透率（通达信公式 副图 源码 测试图）
2022-05-03原创 编 辑：翔博软件
{筹码穿透率}
A:=100*V/CAPITAL;
B:=100*(WINNER(C)-REF(WINNER(C),1));
筹码穿透率:B/A,COLORSTICK;
累计换手:SUM(VOL,0)*100/CAPITAL,NODRAW;
当日换手:IF((SETCODE==0||SETCODE==1),100*VOL,VOL)/(FINANCE(7)/100),NODRAW;
...........
DA:=YEAR AND MONTH AND DAY;
AA1:=STRCAT(CON2STR(YEAR,0),'年');
AA2:=STRCAT(CON2STR(MONTH,0),'月');
AA3:=STRCAT(CON2STR(DAY,0),'日');
AA4:=STRCAT('【',IF(WEEKDAY=1,'星期一',IF(WEEKDAY=2,'星期二',
IF(WEEKDAY=3,'星期三',IF(WEEKDAY=4,'星期四',IF
(WEEKDAY=5,'星期五',IF(WEEKDAY=6,'星期六','星期日')))))));
AA:=STRCAT(STRCAT(STRCAT(AA1,AA2),STRCAT(AA3,AA4)),'】');
DRAWTEXT_FIX(DA,0.88,0.01,0,AA),COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR=1,0.0100,0,0,STKNAME),COLORWHITE ;
DRAWTEXT_FIX(ISLASTBAR=1,0.0880,0,0,CODE) COLOR0000FF;
ASDF:=STRCAT(STRCAT('当前获利盘比例: ',CON2STR(WINNER(CLOSE)*100,2)),'％');
DRAWTEXT_FIX(ISLASTBAR,0.200,0.010,0,ASDF),COLORWHITE;
A111:=FINANCE(42);
A211:=DATETODAY(CONST(DATE));
A311:=A211-A111;
XDATE:=DAYTODATE(A311)+19000000;
上市日期:=STRCAT(' 上市日期: ',CON2STR(XDATE,0));
DRAWTEXT_FIX(ISLASTBAR,0.5,0,0,上市日期),COLORMAGENTA;
SSTS1:=STRCAT('上市',CON2STR(FINANCE(42),0));
SSTS2:=STRCAT(SSTS1,'天');
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.618,0.0,0,SSTS2),COLORCYAN;
{涨停统计}
W11:=EMA(C,1);
涨停:=W11/REF(W11,1)>=1.095;
ZTCS:=COUNT(涨停,BARSSINCE(涨停)+1);
NTZZT1:=STRCAT(' 距今',CON2STR(CONST(BARSLAST(涨停)),0));
NTZZT2:=STRCAT(NTZZT1,'天有涨停');
GZT1:=STRCAT(' 共涨停',CON2STR(ZTCS,0));GZT2:=STRCAT(GZT1,'次');
ZTTJ1:=STRCAT(SSTS2,GZT2);
ZTTJ2:=STRCAT(ZTTJ1,NTZZT2);ZTTJ:=STRCAT('【涨停统计】',ZTTJ2);
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.618,0.99,0,ZTTJ),COLORCYAN;
Z1:=STRCAT(HYBLOCK,' ');
Z2:=STRCAT(Z1,FGBLOCK);
Z3:=STRCAT(Z2,DYBLOCK);
Z4:=STRCAT(Z3,' ');
HSL11:=V/CAPITAL*100;
DRAWNUMBER(CURRBARSCOUNT=1 AND HSL11,C,HSL11),COLOR00FFFF;
DRAWTEXT_FIX(ISLASTBAR,0.00,0.99,0,STRCAT(Z4,GNBLOCK)),COLORGREEN;
DRAWTEXT_FIX(1,0.88,0.99,0,STRCAT('【自定板块】：',ZDBLOCK)),COLORMAGENTA;
