通达信一根线搞定DMI指标公式,通达信文字主图指标公式

通达信一根线搞定DMI指标公式,通达信文字主图指标公式

通达信一根线搞定DMI指标公式

MTR:=EXPMEMA(MAX(MAX(HIGH-LOW,Abs(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),14);HD :=HIGH-REF(HIGH,1);

LD :=REF(LOW,1)-LOW;

DMP:=EXPMEMA(IF(HD>0&&HD>LD,HD,0),14);

DMM:=EXPMEMA(IF(LD>0&&LD>HD,LD,0),14);

pdi:= DMP*100/MTR;

mdi:= DMM*100/MTR;

DM:=PDI-MDI,NODRAW;

TRR1:=EMA(MAX(MAX(H-L,ABS(H-REF(C,1))),ABS(REF(C,1)-L)),14);

DMP1:=EMA(IF(HD>0 && HD>LD,HD,0),14);

DMM1:=EMA(IF(LD>0 && LD>HD,LD,0),14);

ADX0:=EMA((DMP1-DMM1)/(DMP1+DMM1)*100,6);

ADXR0:=EMA(ADX0,6);

PDI1:=DMP1/TRR1*100;

MDI1:=DMM1/TRR1*100;

DM1:=PDI1-MDI1;

AAJ:=(3*ADX0-2*ADXR0);

MAAD:=(ADX0-ADXR0),NODRAW;

ADX:=EXPMEMA(ABS(MDI-PDI)/(MDI+PDI)*100,6),COLORFF00FF;

ADXR:EXPMEMA(ADX,6),POINTDOT,LINETHICK7,COLORGREEN;

IF(DM>0,ADXR,DRAWNULL),POINTDOT,LINETHICK7,COLORRED

助涨:DRAWICON(DM>0 AND ADX>ADXR AND ADX>20,ADXR,15);

助跌:DRAWICON(DM<0 AND ADX>ADXR AND ADX>20,ADXR,12);

DRAWICON(crOSS(ADXR0,ADX0) AND ADXR0>60 ,ADXR*1.2,8);

DRAWICON(CROSS(ADXR0,ADX0) AND ADXR0<60 ,ADXR*1.4,2);

20,COLORYELLOW,DOTLINE;

60,COLORGREEN,DOTLINE;

通达信文字主图指标公式

DRAWTEXT_FIX(1,0.7,0,0,'所属板块:'),COLORFF6000;

DRAWTEXT_FIX(1,0.77,0,0,HYBLOCK),COLORRED;

DRAWTEXT_FIX(1,0.835,0,0,DYBLOCK),COLORYELLOW;

总股本:=stRCAT(STRCAT('总股本: ',CON2STR(TOTALCAPITAL/1000000,2)),'亿');

流通盘:=STRCAT(STRCAT(' 流通盘: ',CON2STR(CAPITAL/1000000,2)),'亿');

全流通:=STRCAT(' 全流通: ',CON2STR((CAPITAL/1000000)/(TOTALCAPITAL/1000000),2));

市值:=STRCAT(STRCAT('流通市值: ',CON2STR((CAPITAL/1000000)*C,2)),'亿');

上市日期:=STRCAT(' 上市日期: ',CON2STR(FINANCE(42),0));

股本市值:=STRCAT('股本市值: ',STRCAT(STRCAT(STRCAT(STRCAT(总股本,流通盘),全流通),市值),上市日期));

{}市盈率:=STRCAT('市盈率: ',CON2STR(C/FINANCE(33),2));

市销率:=STRCAT(' 市销率: ',CON2STR(C/(FINANCE(20)/FINANCE(1)),2));

市净率:=STRCAT(' 市净率: ',CON2STR(C/FINANCE(34),2));

净资收益率:=STRCAT(' 净资收益率: ',CON2STR(FINANCE(33)/FINANCE(34)*100,2));

毛利率:=STRCAT(' 毛利率: ',CON2STR((FINANCE(20)-FINANCE(21))/FINANCE(20)*100,2));

净利润率:=STRCAT(' 净利润率 ',CON2STR(FINANCE(30)/FINANCE(20)*100,2));

主营利润率:=STRCAT(' 主营利润率 ',CON2STR(FINANCE(23)/FINANCE(20)*100,2));

当前业绩:=STRCAT('当前业绩: ',STRCAT(STRCAT(STRCAT(STRCAT(STRCAT(STRCAT(市盈率,市销率),市净率),净资收益率),毛利率),净利润率),主营利润率));

{}X1:=(FINANCE(11)-FINANCE(15))/FINANCE(10)*1.2;

X2:=(FINANCE(31)+FINANCE(17))/FINANCE(10)*1.4;

{盈余公积用资本公积金代替};

X3:=FINANCE(23)/FINANCE(10)*3.3;

X4:=FINANCE(19)/FINANCE(15)*0.6;

{缺长期负债或负债总额}X5:=FINANCE(20)/FINANCE(15)*0.999;

Z值:=X1+X2+X3+X4+X5;

预警:=IF(Z值<1.2,'重警',IF(Z值>=1.2 AND Z值<2.6,'轻警','无警'));

财务预警:=STRCAT('财务预警: ',STRCAT(预警,STRCAT('-Z值: ',CON2STR(Z值,3))));

优质资产率:=STRCAT(' 优质资产率: ',CON2STR((FINANCE(19)-FINANCE(22)-FINANCE(27))/FINANCE(19),2));

{理论上越大越好但不同行业有不同标准};

现金负债比:=STRCAT(' 现金负债比: ',CON2STR(FINANCE(25)/FINANCE(15),3));

{缺长期负债或负债总额，理论上越大越好但不同行业有不同标准};

财务系数:=STRCAT('风险系数: ',STRCAT(STRCAT(财务预警,优质资产率),现金负债比));

{}DRAWTEXT_FIX(ISLASTBAR,0.005,0.01,0,财务系数),COLOR888888;

DRAWTEXT_FIX(ISLASTBAR,0.005,0.06,0,当前业绩),COLOR888888;

DRAWTEXT_FIX(ISLASTBAR,0.005,0.115,0,股本市值),COLOR888888;

牛市通网是一个牛股推荐网与低风险投资知识网，可以在线联系客服领取牛股。牛市通网从权威的投资专家、金融分析师等投资信息中挑选优质的文章进行发布。牛市通网主要为投资者提供股票知识、股票观点、股票分析和明智金融投资讨论等信息。