通达信筹码锁定副图指标 追踪主力动向 源码附图
紫色为买入参考 绿色为卖出减仓参考，重点注意：本指标适合牛市，超短线 短线主浪暴发点行情
公司净收入:=FINANCE(30);
股东的股本:=FINANCE(1)*DYNAINFO(11);
股本收益率%:=公司净收入/股东的股本*100,COLOR00FF00,NODRAW;
每股收益:=FINVALUE(1);
市净率:=DYNAINFO(7)/FINANCE(34);
当期的净利润:=FINANCE(30);
净资产:=FINANCE(34)*FINANCE(1);
净益率:=当期的净利润/净资产*100;
净利润率:=FINANCE(30)/FINANCE(20)*100;
净利润率1:=STRCAT(' 净利润率 ',STRCAT(CON2STR(净利润率,2),' % '));
股本收益:=STRCAT(' 股本收益率 ',STRCAT(CON2STR(股本收益率%,2),' % '));
每股收益1:=STRCAT(' 每股收益 ',STRCAT(CON2STR(每股收益,3),' 元 '));
市净率1:=STRCAT(' 市净率 ',STRCAT(CON2STR(市净率,2),' 倍 '));
当期的净利润1:=STRCAT(' 当期的净利润 ',STRCAT(CON2STR(当期的净利润/10000,2),' 万元 '));
当期的净利润2:=STRCAT(' 当期的净利润 ',STRCAT(CON2STR(当期的净利润/100000000,2),' 亿元 '));
净益率1:=STRCAT(' 净益率 ',STRCAT(CON2STR(净益率,2),' % '));
资产负债率1:=STRCAT(' 资产负债率 ',STRCAT(CON2STR(FINVALUE(63)/FINVALUE(40)*100,3),' % '));
资产负债率2:=STRCAT(' 资产负债率 ',STRCAT(CON2STR(FINVALUE(63)/FINVALUE(40)*100,3),' %，危险！'));
资产负债率3:=STRCAT(' 资产负债率 ',STRCAT(CON2STR(FINVALUE(63)/FINVALUE(40)*100,3),' %，安全！'));
股息率%:=FINANCE(45),COLORFF00FF,NODRAW;
股息率:=STRCAT(' 股息率 ',STRCAT(CON2STR(股息率%,2),' % '));
市盈率1%:=DYNAINFO(39) ,COLORFF00FF,NODRAW;
市盈率1:=STRCAT(' 市盈率 ',STRCAT(CON2STR(市盈率1%,2),' % '));
DRAWTEXT_FIX(1,0.07,0.25,0,股息率),COLORFFFFFF;
DRAWTEXT_FIX(1,0.07,0.25,0,' 股息率 '),COLORFFFF00;
DRAWTEXT_FIX(1,0.07,0.40,0, 市盈率1 ),COLORFFFF00;
DRAWTEXT_FIX(1,0.07,0.40,0,' 市盈率 '),COLORFFFF00;
DRAWTEXT_FIX(1 AND 股本收益率%> 0,0.15,0.25,0,股本收益),COLOR0000FF;
DRAWTEXT_FIX(1 AND 股本收益率%<=0,0.15,0.25,0,股本收益),COLOR00FF00;
DRAWTEXT_FIX(1,0.15,0.25,0,' 股本收益率 '),COLOR00FFFF;
DRAWTEXT_FIX(1 AND 每股收益> 0,0.25,0.50,0,每股收益1),COLOR0000FF;
DRAWTEXT_FIX(1 AND 每股收益<=0,0.25,0.50,0,每股收益1),COLOR00FF00;
DRAWTEXT_FIX(1,0.15,0.40,0,' 每股收益 '),COLOR00FFFF;
量化3:=MA(CLOSE,13);
量化4:=100-ABS((CLOSE-量化3)/量化3*100);
筹码:MA(WINNER(CLOSE*0.95)*100,1),COLORRED;
量化D:=筹码>量化4;
DRAWNUMBER(量化D AND 量化4>REF(量化4,1) AND REF(量化D,1)>0,量化4+20,ROUND(量化4)) COLORCYAN;
DRAWNUMBER(量化D,量化4+20,ROUND(量化4)) COLORCYAN;
STICKLINE(量化D,量化4,0,2,0),COLORMAGENTA;
STICKLINE(量化D AND 量化4>REF(量化4,1) AND REF(量化D,1)>0,量化4,0,2,0),COLORGREEN;
DRAWTEXT(量化D AND 量化4>REF(量化4,1) AND REF(量化D,1)>0,量化4+30,'风险'),COLORGREEN;
DRAWTEXT(量化D AND 量化4>REF(量化4,1) AND REF(量化D,1)>0,量化4+60,'注意'),COLORGREEN;
