通达信新创一个《个股评分》可用于排序选股(有图有代码)

[复制链接]
查看104 | 回复0 | 2022-7-8 12:42:26 | 显示全部楼层 |阅读模式

通达信新创一个《个股评分》可用于排序选股(有图有代码)

本指标根据形态、量能、量比、供求平衡四个方面进行综合评分,
得出总分,可用于排序选出强势股。

A1:=IF(C>REF(C,1) AND CROSS(C,MA(C,24)),30,5);
A2:=IF(C>REF(C,1) AND CROSS(C,MA(C,60)),30,5);
A3:=IF(C>REF(C,1) AND CROSS(C,MA(C,120)),30,5);
A4:=IF(C>REF(C,1) AND CROSS(C,MA(C,240)),30,5);
A5:=IF(C>REF(C,1) AND MA(C,5)>=MA(C,10),20,5);
A6:=MAX(MAX(A1,A2),MAX(A3,A4));
A7:=MAX(A6,A5);
B1:=IF(V/CAPITAL*100>1,20,5);
B2:=IF(V/CAPITAL*100>2,25,5);
B3:=IF(V/CAPITAL*100>3,30,5);
B4:=IF(V/CAPITAL*100<1,-10,5);
B5:=MAX(MAX(B1,B2),MAX(B3,B4));
C1:=IF(DYNAINFO(17)>1.5,20,5);
C2:=IF(DYNAINFO(17)>2,25,5);
C3:=IF(DYNAINFO(17)>5,30,5);
C4:=IF(DYNAINFO(17)<1,-10,5);
C5:=MAX(MAX(C1,C2),MAX(C3,C4));
D1:=IF((DYNAINFO(23)/DYNAINFO(22))>1,5,0);
D2:=IF((DYNAINFO(23)/DYNAINFO(22))>1.2,10,0);
D3:=IF((DYNAINFO(23)/DYNAINFO(22))<1,-5,0);
D4:=MAX(MAX(D1,D2),D3);
E1:=IF(C<REF(C,1) AND CROSS(MA(C,10),MA(C,5)),-20,5);
总分:A7+B5+C5+D4+E1,NODRAW;
STICKLINE(总分>=40,总分,40,3,1),COLORRED;
STICKLINE(总分<40,总分,40,0,0),COLORCYAN;
STICKLINE(1,50,40,2,0),COLORYELLOW;
M5:=MA(总分,5);
M20:MA(总分,20);
M28:MA(M20,8);

 

 

 

 

图效
 

06155603.jpg

06155603.jpg

 

06222916.jpg

06222916.jpg

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则