通达信筹码底顶主图指标公式源码副图

总股本:=STRCAT(STRCAT(' 总股本:',CON2STR(TOTALCAPITAL/1000000,2)),'亿');
流通盘:=STRCAT(STRCAT(' 流通盘:',CON2STR(CAPITAL/1000000,2)),'亿');
全流通:=STRCAT(STRCAT(' 流通比:',CON2STR(CAPITAL/TOTALCAPITAL*100,2)),'％');
市值:=STRCAT(STRCAT(' 流通市值:',CON2STR((CAPITAL/1000000)*C,2)),'亿');
股本市值:=STRCAT('【股本市值】：',STRCAT(STRCAT(STRCAT(总股本,流通盘),全流通),市值));
市盈率:=STRCAT(' 市盈率:',CON2STR(C/FINANCE(33),2));
净资收益率:=STRCAT(' 净资收益率:',CON2STR(FINANCE(33)/FINANCE(34)*100,2));
主营利润率:=STRCAT(' 主营利润率:',CON2STR(FINANCE(23)/FINANCE(20)*100,2));
当前业绩:=STRCAT('【当前业绩】：',STRCAT(STRCAT(市盈率,净资收益率),主营利润率));
DRAWTEXT_FIX(ISLASTBAR,0.005,0.12,0,股本市值),COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0.005,0.17,0,当前业绩),COLORMAGENTA;
筹码顶:REFDATE(CONST(COST(99.999)),DATE),DOTLINE,COLORMAGENTA,LINETHICK2;
筹码底:REFDATE(CONST(COST(0.001)),DATE),DOTLINE,COLORCYAN,LINETHICK2;
CTA1:=((筹码顶-筹码底)/2)+筹码底;CTA2:=(筹码顶-筹码底)/10;
CTA3:=(CTA2*9)+筹码底;
CTA4:=(CTA2*7)+筹码底;
CTA5:=(CTA2*3)+筹码底;
CTA6:=(CTA2*1)+筹码底;
CTA7:=(CTA2*-1)+筹码底;
CTA8:=(EMA(CLOSE,5)*7+EMA(CLOSE,10)*3)/10;
CTA9:=IF(YEAR>=2025,0,1);
CTA10:=EMA(EMA(LOW,21)+6.8*STD(LOW,2),55);
CTA11:=EMA(CLOSE/CTA10*(1.88*CLOSE+LOW+OPEN)/2.75,3);
CTA16:=(CTA11-CTA10)/CTA10/2;
CTA18:=EMA(CTA11-CTA16*CTA11,5)*CTA9;
DRAWTEXT(CURRBARSCOUNT=1,CTA3*0.998,' 90'),COLORWHITE;
DRAWTEXT(CURRBARSCOUNT=1,筹码顶*0.998,' 100'),COLORWHITE;
DRAWTEXT(CURRBARSCOUNT=1,CTA4*0.998,' 70'),COLORWHITE;
DRAWTEXT(CURRBARSCOUNT=1,CTA1*0.998,' 50'),COLORWHITE;
DRAWTEXT(CURRBARSCOUNT=1,CTA5*0.998,' 30'),COLORWHITE;
DRAWTEXT(CURRBARSCOUNT=1,CTA6*0.998,' 10'),COLORWHITE;
DRAWTEXT(CURRBARSCOUNT=1,筹码底*0.998,' 0'),COLORWHITE;
DRAWTEXT(CURRBARSCOUNT=1,CTA7*0.998,'-10'),COLORWHITE;
漏斗下:IF(CTA8>CTA18,CTA8,CTA18)*CTA9,COLORYELLOW,LINETHICK2;
漏斗上:IF(CTA18<CTA8 AND CTA18<C*0.15,EMA(C,300)-3*STD(C,300),CTA18),COLORYELLOW,LINETHICK2;
漏:IF(CTA18>CTA8,漏斗上,DRAWNULL),COLORGREEN,LINETHICK2;
开口XG:BARSLASTCOUNT(漏斗下!=漏斗上)=1,NODRAW;
生命线:IF(CURRBARSCOUNT<13,CONST(COST(67.5)),DRAWNULL),COLORWHITE,DOTLINE;