金股网,有趣实用股票资讯网站!

最近更新文章排行

当前位置:首页 > 股票资讯 > 通达信筹码突破指标公式源码副图

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

时间:2023-12-27 21:32:11 人气: 作者: 金股网

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

  筹码密集度:(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)));

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

最新文章

随便看看