通达信最佳买点 源码

涨时重势，跌时重资，送给大家两指标，帮股友们分别以下估值合理的股票，高手飘过，别撇鞋；新手可以交流............
图1（低估高估）
有未来也没关系，参考估值，不涉及买卖点。
该指标的思想是根据个股的财务指标计算出个股的一个参考的合理定价，将其与个股当前的股价进行对比，用来看该股当前的股价是被低估了还是高估了。

最新价:C;{牛牛指标网提供：www.tdx001.com}
市盈率:=IF(FINANCE(33)>0,DYNAINFO(39),0)*0.35;
每股收益:=IF(FINANCE(33)>0.01,FINANCE(33)*0.65,0);
参考定价:每股收益*市盈率*4;
图2（最佳短线买点）
  短线买点，看箭头。
 

复制内容到剪贴板

1. {最佳短线买入}       
2.      
3. LC:=REF(CLOSE,1);       
4. RSI5:=((SMA(MAX((CLOSE - LC),0),5,1) / SMA(ABS((CLOSE - LC)),5,1)) * 100);       
5. TR1:=SUM(MAX(MAX((HIGH - LOW),ABS((HIGH - REF(CLOSE,1)))),ABS((LOW - REF(CLOSE,1)))),10);       
6. HD:=(HIGH - REF(HIGH,1));       
7. LD:=(REF(LOW,1) - LOW);       
8. DMP:=SUM(IF(((HD > 0) AND (HD > LD)),HD,0),10);       
9. DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),10);       
10. PDI:=((DMP * 100) / TR1);       
11. MDI:=((DMM * 100) / TR1);       
12. ADX:=MA(((ABS((MDI - PDI)) / (MDI + PDI)) * 100),5);       
13. AV:=(RSI5 + ADX);       
14. DXR:=(((ADX + REF(ADX,5)) / 2) + RSI5);       
15. WR10:=((100 * (HHV(HIGH,10) - CLOSE)) / (HHV(HIGH,10) - LLV(LOW,10)));  NEWVOL:=(RSI5 - WR10);       
16. 最佳买入:=(AV + NEWVOL);       
17. 最佳买入选股:=(CROSS(最佳买入,0));       
18. STICKLINE(最佳买入选股,L*0.992,L*0.986,6,0),COLOR33FFFF;       
19. RSV:=(((CLOSE - LLV(LOW,9)) / (HHV(HIGH,9) - LLV(LOW,9))) * 50);        
20. K:=SMA(RSV,3,1);        
21. D:=SMA(K,3,1);        
22. J:=3*K-2*D;        
23. X:=LLV(J,2)=LLV(J,8);        
24. 最佳买入时机:= (CROSS(J,3));       
25. DRAWICON(最佳买入时机,L*0.993,1);       
26. 机构建仓:=(最佳买入<5);        
27. DRAWTEXT(机构建仓,L*0.98,'*'),COLORA244FF;{信号为粉色*};    
28.   
29. K2:=EMA(C,5),COLORFFFF00;   
30. K3:=EMA(C,10),COLORFFFF00;   
31. K5:=EMA(C,30),COLORFFFF00;   
32. KK5:=EMA(INDEXC,30),COLORFFFF00;   
33. K6:=2*(K2-K5);   
34. K7:=2*(K2-K3);   
35. K8:=2*(K7+K6),COLORRED;   
36. STICKLINE(CROSS(K8,0),0,6,3,0) ,COLORRED;   
37. K1:=IF(K8>REF(K8,5) AND K3<REF(K3,5) ,1,0 ),COLORYELLOW;   
38. K21:=IF(K8>REF(K8,7) AND K3<REF(K3,7) ,1,0 ),COLORYELLOW;   
39. K31:=IF(K8>REF(K8,9) AND K3<REF(K3,9) ,1,0 ),COLORYELLOW;   
40. K4:=IF(K8>REF(K8,11) AND K3<REF(K3,11) ,1,0 ),COLORYELLOW;   
41. 底部:STICKLINE((K1 OR K21 OR K31 OR K4) AND K8<0 AND K8>REF(K8,1),4,0,8,0) ,COLORYELLOW;   
42. 0;   

DA75439186.png