自用MACD经典指标(通达信),财务报表分析指标化(通达信)

自用MACD经典指标(通达信)

{macd实战0源码}difF:(ema(CLOSE,12) - Ema(CLOSE,26)),LINETHICK2,COLOR2A2AA5;

中DEA:EMA(中DIFF,9),COLORFFFF00;

MacD2:(2 * (中DIFF -中DEA)),LINETHICK0,COLORFFFF00;

stICKLINE((MACD2>=0),0,MACD2,1,1),COLORD700FF;

STICKLINE(((MACD2>=0) AND (MACD2 < REF(MACD2,1))),0,MACD2,1,0),COLOR0099FF;

STICKLINE((MACD2<0),0,MACD2,1,0),COLORFFC0CB;

STICKLINE(((MACD2<0) AND (MACD2 > REF(MACD2,1))),0,MACD2,1,1),COLORCYAN;

DU0:=crOSS(中DIFF,0);

UD0:=CROSS(0,中DIFF);

TDU0:=BArslAST(DU0);

TUD0:=BARSLAST(UD0);

DU3:=REF(DU0,1);

UD3:=REF(UD0,1);

TDU3:=BARSLAST(DU3);

TUD3:=BARSLAST(UD3);

UDGLINE:=IF((TDU3 < TUD3),REF(HHV(HIGH,2),TDU3),REF(LLV(LOW,2),TUD3));

JDU0:=(((REF(CLOSE,1) <= REF(UDGLINE,1)) AND (CLOSE > UDGLINE)) AND (TDU0 < TUD0));

JUD0:=(((REF(CLOSE,1) >= REF(UDGLINE,1)) AND (CLOSE < UDGLINE)) AND (TUD0 < TDU0));

JDU1:=(JDU0 AND (COUNT(JDU0,TDU0) = 1));

JUD1:=(JUD0 AND (COUNT(JUD0,TUD0) = 1));

JDU2:=(JDU1 AND (REF(BARSLAST(JUD1),1) < REF(BARSLAST(JDU1),1)));

JUD2:=(JUD1 AND (REF(BARSLAST(JUD1),1) > REF(BARSLAST(JDU1),1)));

JDU3:=(JDU1 AND (REF(BARSLAST(JUD1),1) > REF(BARSLAST(JDU1),1)));

JUD3:=(JUD1 AND (REF(BARSLAST(JUD1),1) < REF(BARSLAST(JDU1),1)));

bsLINE:=IF((BARSLAST(JDU2) <BARSLAST(JUD2)),IF(REF(CROSS(0,MACD2),1),LLV(LOW,2),REF(LLV(LOW,2),BARSLAST(REF(CROSS(0,MACD2),1)))),IF(REF(CROSS(MACD2,0),1),HHV(HIGH,2),REF(HHV(HIGH,2),BARSLAST(REF(CROSS(MACD2,0),1)))));

DEFUT:=BARSLAST(CROSS(MACD2,0));

DEFDT:=BARSLAST(CROSS(0,MACD2));

DEFUL:=IF((MACD2 >= 0),HHV(MACD2,(DEFUT + 1)),REF(HHV(MACD2,(DEFUT + 1)),(DEFDT + 1)));

DEFDL:=IF((MACD2 < 0),LLV(MACD2,(DEFDT + 1)),REF(LLV(MACD2,(DEFDT + 1)),(DEFUT + 1)));

DEFU2L:=REF(DEFUL,(DEFUT + 1));

DEFD2L:=REF(DEFDL,(DEFDT + 1));

STICKLINE(中DIFF>=中DEA,中DIFF,中DEA,6,0),COLOR00FFFF;

STICKLINE(中DIFF<中DEA,中DIFF,中DEA,6,0),COLORBLUE;

短DIFF:(EMA(C,3)-EMA(C,10)),LINETHICK2,COLORC0C0C0;

短DEA:EMA(短DIFF,9),LINETHICK2,COLOR33FF33;

IF(短DIFF>=短DEA,短DIFF,DRAWNULL),COLORRED,LINETHICK2;

D1:=EMA(C,3)-EMA(C,8);

D2:=EMA(O,3)-EMA(O,8);

D3:=EMA(H,3)-EMA(H,8);

D4:=EMA(L,3)-EMA(L,8);

DRAWICON(((((LLV(MACD2,4) > 0) AND (MACD2 < REF(MACD2,1))) AND (REF(MACD2,1) > REF(MACD2,2))) AND (REF(MACD2,2) > REF(MACD2,3))),MACD2,6);

DRAWICON(((((HHV(MACD2,4) < 0) AND (MACD2 > REF(MACD2,1))) AND (REF(MACD2,1) < REF(MACD2,2))) AND (REF(MACD2,2) < REF(MACD2,3))),MACD2,4);

DRAWICON(CROSS(中DIFF,D1) AND 中DIFF>0.1 ,D3+0.1,2);

EE:=CROSS(中DIFF,中DEA) AND MACD2>REF(MACD2,1) AND 短DIFF>=REF(短DIFF,1) AND 中DEA>=REF(中DEA,1);

出来:=FILTER(EE,10);

DRAWICON(出来,中DEA,1);

财务报表分析指标化(通达信)

市盈率:=DYNAINFO(39);

市净率:=FINANCE(34)/C;

每股收益:=FINANCE(33);

资产报酬率:=FINANCE(29)/FINANCE(10)*100;

股本报酬率:=FINANCE(29)/FINANCE(1)*100;

净值报酬率:=FINANCE(29)/FINANCE(19)*100;

营业纯益率:=FINANCE(29)/FINANCE(20)*100;

主营业务利润率:=FINANCE(21)/FINANCE(20)*100;

负债比率:=(FINANCE(15)+FINANCE(16))/FINANCE(10)*100;

存货周转率:=(FINANCE(20)-FINANCE(23))/FINANCE(27);

固定资产周转率:=FINANCE(20)/FINANCE(12);

市盈率评分:=IF(市盈率<20 AND 市盈率>0,10,IF(市盈率<40 AND 市盈率>20,9,

IF(市盈率<60 AND 市盈率>40,8,IF(市盈率<80 AND 市盈率>60,7,

IF(市盈率<100 AND 市盈率>80,6,IF(市盈率<130AND 市盈率>100,5,

IF(市盈率<160 AND 市盈率>130,4,IF(市盈率<190 AND 市盈率>160,3,

IF(市盈率<220 AND 市盈率>190,2,IF(市盈率<250AND 市盈率>220,1,0))))))))));

市净率评分:=IF(市净率>1,10,IF(市净率<1 AND 市净率>0.9,9,

IF(市净率<0.9 AND 市净率>0.8,8,IF(市净率<0.8 AND 市净率>0.7,7,

IF(市净率<0.7 AND 市净率>0.6,6,IF(市净率<0.6 AND 市净率>0.5,5,

IF(市净率<0.5 AND 市净率>0.4,4,IF(市净率<0.4 AND 市净率>0.3,3,

IF(市净率<0.3 AND 市净率>0.2,2,IF(市净率<0.2 AND 市净率>0,1,0))))))))));

每股收益评分:=IF(每股收益>2.7,10,IF(每股收益<2.7 AND 每股收益>2.4,9,

IF(每股收益<2.4 AND 每股收益>2.1,8,IF(每股收益<2.1 AND 每股收益>1.8,7,

IF(每股收益<1.8 AND 每股收益>1.5,6,IF(每股收益<1.5 AND 每股收益>1.2,5,

IF(每股收益<1.2 AND 每股收益>0.9,4,IF(每股收益<0.9 AND 每股收益>0.6,3,

IF(每股收益<0.6 AND 每股收益>0.3,2,IF(每股收益<0.3 AND 每股收益>0,1,0))))))))));

资产报酬率评分:=IF(资产报酬率>27,10,IF(资产报酬率<27 AND 资产报酬率>24,9,

IF(资产报酬率<24 AND 资产报酬率>21,8,IF(资产报酬率<21 AND 资产报酬率>18,7,

IF(资产报酬率<18 AND 资产报酬率>15,6,IF(资产报酬率<15 AND 资产报酬率>12,5,

IF(资产报酬率<12 AND 资产报酬率>9,4,IF(资产报酬率<9 AND 资产报酬率>6,3,

IF(资产报酬率<6 AND 资产报酬率>3,2,IF(资产报酬率<3 AND 资产报酬率>0,1,0))))))))));

股本报酬率评分:=IF(股本报酬率>135,10,IF(股本报酬率<135 AND 股本报酬率>120,9,

IF(股本报酬率<120 AND 股本报酬率>105,8,IF(股本报酬率<105 AND 股本报酬率>90,7,

IF(股本报酬率<90 AND 股本报酬率>75,6,IF(股本报酬率<75 AND 股本报酬率>60,5,

IF(股本报酬率<60 AND 股本报酬率>45,4,IF(股本报酬率<45 AND 股本报酬率>30,3,

IF(股本报酬率<30 AND 股本报酬率>15,2,IF(股本报酬率<15 AND 股本报酬率>0,1,0))))))))));

净值报酬率评分:=IF(净值报酬率>100,10,IF(净值报酬率<100 AND 净值报酬率>80,9,

IF(净值报酬率<80 AND 净值报酬率>70,8,IF(净值报酬率<70 AND 净值报酬率>60,7,

IF(净值报酬率<60 AND 净值报酬率>50,6,IF(净值报酬率<50 AND 净值报酬率>40,5,

IF(净值报酬率<40 AND 净值报酬率>30,4,IF(净值报酬率<30 AND 净值报酬率>20,3,

IF(净值报酬率<20 AND 净值报酬率>10,2,IF(净值报酬率<10 AND 净值报酬率>0,1,0))))))))));

营业纯益率评分:=IF(营业纯益率>60,10,IF(营业纯益率<60 AND 营业纯益率>50,9,

IF(营业纯益率<50 AND 营业纯益率>40,8,IF(营业纯益率<40 AND 营业纯益率>30,7,

IF(营业纯益率<30 AND 营业纯益率>20,6,IF(营业纯益率<20 AND 营业纯益率>15,5,

IF(营业纯益率<15 AND 营业纯益率>10,4,IF(营业纯益率<10 AND 营业纯益率>5,3,

IF(营业纯益率<5 AND 营业纯益率>3,2,IF(营业纯益率<3 AND 营业纯益率>0,1,0))))))))));

主营利润率评分:=IF(主营业务利润率>60,10,IF(主营业务利润率<60 AND 主营业务利润率>50,9,

IF(主营业务利润率<50 AND 主营业务利润率>45,8,IF(主营业务利润率<45 AND 主营业务利润率>40,7,

IF(主营业务利润率<40 AND 主营业务利润率>35,6,IF(主营业务利润率<35 AND 主营业务利润率>30,5,

IF(主营业务利润率<30 AND 主营业务利润率>25,4,IF(主营业务利润率<25 AND 主营业务利润率>20,3,

IF(主营业务利润率<20 AND 主营业务利润率>10,2,IF(主营业务利润率<10 AND 主营业务利润率>0,1,0))))))))));

负债比率评分:=IF(负债比率<0,10,IF(负债比率>0 AND 负债比率<10,9,

IF(负债比率>10 AND 负债比率<20,8,IF(负债比率>20 AND 负债比率<30,7,

IF(负债比率>30 AND 负债比率<40,6,IF(负债比率>40 AND 负债比率<50,5,

IF(负债比率>50 AND 负债比率<60,4,IF(负债比率>60 AND 负债比率<70,3,

IF(负债比率>70 AND 负债比率<80,2,IF(负债比率>80 AND 负债比率<100,1,0))))))))));

存货周转率评分:=IF(存货周转率>80,5,IF(存货周转率<80 AND 存货周转率>60,4,

IF(存货周转率<60 AND 存货周转率>40,3,IF(存货周转率<40 AND 存货周转率>20,2,

IF(存货周转率<20 AND 存货周转率>0,1,0)))));

资产周转率评分:=IF(固定资产周转率>20,5,IF(固定资产周转率<20 AND 固定资产周转率>15,4,

IF(固定资产周转率<15 AND 固定资产周转率>10,3,IF(固定资产周转率<10 AND 固定资产周转率>5,2,

IF(固定资产周转率<5 AND 固定资产周转率>0,1,0)))));

财务优势:(市盈率评分+市净率评分+每股收益评分)+(资产报酬率评分+股本报酬率评分+

净值报酬率评分+营业纯益率评分+主营利润率评分)+负债比率评分+存货周转率评分+

资产周转率评分;