通达信筹码突破指标公式源码副图

通达信筹码突破指标公式源码副图

筹码密集度:(COST(90+(100-90)/2)-COST((100-90)/2))/(COST(90+(100-90)/2)+COST((100-90)/2))+CLOSE,COLORYELLOW,LINETHICK1;筹码线:EMA(COST(99),181),POINTDOT,COLORMAGENTA,LINETHICK2;筹码集中点:LONGcrOSS(筹码密集度,筹码线,60),NODRAW;DRAWICON(筹码集中点,筹码线,42);箱顶:MA(REF(HHV(C,30),1),2),COLOR0000FF,LINETHICK2;箱底:MA(REF(LLV(C,30),1),2),COLOR00FF00,LINETHICK2;{股价N日内从最高价到最低价,或最高价至目前股价的跌幅计算公式}N:=20{N自定};高低跌幅%:IF(HHVBARS(H,N)>0,LLV(L,HHVBARS(H,N)+1)/HHV(H,N)*100-100,0),NODRAW;高至今跌幅%:IF(HHVBARS(H,N)>0,C/HHV(H,N)*100-100,0),NODRAW;{股价N日内从最低价到最高价,或最低价至目前股价的涨幅计算公式}低高涨幅%:IF(LLVBARS(L,N)>0,HHV(H,LLVBARS(L,N)+1)/LLV(L,N)*100-100,0),NODRAW;低至今涨幅%:IF(LLVBARS(L,N)>0,C/LLV(L,N)*100-100,0),NODRAW;{营收四率}BGQ:=FINVALUE(0);Z111:=STRCAT(公告日期:20,CON2STR(BGQ,0));DRAWTEXT_FIX(1,0.12,0.01,0,Z111),COLORWHITE;净资收益率:(FINANCE(33)/FINANCE(34)*100),COLORWHITE,NODRAW;主营利润率:(FINANCE(23)/FINANCE(20)*100),COLORYELLOW,NODRAW;主营业增长率:FINANCE(44),COLORMAGENTA,NODRAW;{44 营业收入同比%}净利润增长率:FINANCE(43),COLORRED,NODRAW;{43 净利润同比%}利润扣非同比%:FINONE(191,0,0),NODRAW,,COLORYELLOW;{扣非增长率};DRAWTEXT_FIX(1,0.01,0,0,STRCAT(STRCAT(净资收益 ,CON2STR(净资收益率,0)),％)),COLORWHITE;DRAwrECTREL(10,85,110,155,RGB(120,120,120));DRAWRECTREL(10,100,(10+CONST(Abs(净资收益率)*100/100)),140,IF(CONST(净资收益率)>0,RGB(250,0,0),RGB(0,200,0)));DRAWTEXT_FIX(1,0.01,0.18,0,STRCAT(STRCAT(主营利润 ,CON2STR(主营利润率,0)),％)),COLORYELLOW;DRAWRECTREL(10,280,(10+CONST(ABS(主营利润率)*100/100)),320,IF(CONST(主营利润率)>0,RGB(250,0,0),RGB(0,200,0)));DRAWTEXT_FIX(1,0.01,0.36,0,STRCAT(STRCAT(主营业增长 ,CON2STR(主营业增长率,0)),％)),COLORMAGENTA;DRAWRECTREL(10,460,(10+CONST(ABS(主营业增长率)*100/100)),500,IF(CONST(主营业增长率)>0,RGB(200,0,200),RGB(0,200,0)));Q1W1:=STRCAT(STRCAT(净利润增长 ,CON2STR(净利润增长率,0)),％● );Q2W2:=STRCAT(STRCAT(扣非同比 ,CON2STR(利润扣非同比%,0)),％ );Q3W3:=STRCAT(Q1W1,Q2W2);DRAWTEXT_FIX(1,0.01,0.54,0,Q3W3),COLORRED;DRAWRECTREL(10,645,(10+CONST(ABS(净利润增长率)*100/100)),695,IF(CONST(净利润增长率)>0,RGB(180,0,0),RGB(0,200,0)));DRAWRECTREL(10,658,(10+CONST(ABS(利润扣非同比%)*100/100)),682,IF(CONST(利润扣非同比%)>0,RGB(250,0,0),RGB(0,200,200)));{显示业绩预告柱}预告日期:=FINVALUE(313),COLOR0080FF,NODRAW;KSK:=STRCAT(STRCAT(预告日期 ,CON2STR(预告日期,0)), ●);DRAWTEXT_FIX(FINONE(285,0,0)<>0,0.01,0.74,0,KSK),COLORYELLOW;下限:=FINONE(285,0,0),COLOR0080FF,NODRAW;上限:=FINONE(286,0,0),COLOR0080FF,NODRAW;YG101:=(FINONE(285,0,0)>0 OR FINONE(285,0,0)<0);预101:=IF(YG101,业绩预告增幅 ,DRAWNULL);A101:=STRCAT(预101,STRCAT(CON2STR(FINONE(285,0,0),0), %));B101:=STRCAT(～,STRCAT(CON2STR(FINONE(286,0,0),0), %　));C101:=STRCAT(A101,B101);DRAWTEXT_FIX(FINONE(285,0,0)>0,0.085,0.74,0,C101),COLORYELLOW;DRAWTEXT_FIX(FINONE(285,0,0)<0,0.085,0.74,0,C101),COLOR00FF00;DRAWRECTREL(10,854,(10+CONST(ABS(上限)*100/100)),915,IF(CONST(上限)>0,RGB(250,0,0),RGB(0,200,0)));DRAWRECTREL(10,864,(10+CONST(ABS(下限)*100/100)),906,IF(CONST(下限)>0,RGB(180,0,0),RGB(0,200,200)));