公式网-网站导航


网站搜索:  

股票公式指标网 发表于2010/3/29 7:44:51

【交易护驾】通达信版

 

C/C++ www.gszb.com 股票公式指标网提供 Code复制内容到剪贴板
  1. Z_1:=C-REF(C,1);   
  2. 空:=EMA(EMA(Z_1,6),6)/EMA(EMA(ABS(Z_1),6),6)*20,LINETHICK0,COLOR00FF00;   
  3. 多:=(空*2-FORCAST(空,9)),LINETHICK0,COLORFF59FF;    
  4. {警报}   
  5. J1:=IF(多<=空,多,DRAWNULL);   
  6. J2:=IF(多<=空,多,REF(J1,1));   
  7. J3:=IF(多<=空,多,REF(J2,1));   
  8. J4:=IF(多<=空,多,REF(J3,1));   
  9. J5:=IF(多<=空,多,REF(J4,1));   
  10. J6:=IF(多<=空,多,REF(J5,1));   
  11. J7:=IF(多<=空,多,REF(J6,1));   
  12. J8:=IF(多<=空,多,REF(J7,1));   
  13. J9:=IF(多<=空,多,REF(J8,1));   
  14. J10:=IF(多<=空,多,REF(J9,1));   
  15. J11:=IF(多<=空,多,REF(J10,1));   
  16. J12:=IF(多<=空,多,REF(J11,1));   
  17. J13:=IF(多<=空,多,REF(J12,1));   
  18. J14:=IF(多<=空,多,REF(J13,1));   
  19. J15:=IF(多<=空,多,REF(J14,1));   
  20. JJ_1:=IF(多<=空,多,REF(J15,1));   
  21.   
  22. JJ1:=IF(多>空,空,DRAWNULL);   
  23. JJ2:=IF(多>空,空,REF(JJ1,1));   
  24. JJ3:=IF(多>空,空,REF(JJ2,1));   
  25. JJ4:=IF(多>空,空,REF(JJ3,1));   
  26. JJ5:=IF(多>空,空,REF(JJ4,1));   
  27. JJ6:=IF(多>空,空,REF(JJ5,1));   
  28. JJ7:=IF(多>空,空,REF(JJ6,1));   
  29. JJ8:=IF(多>空,空,REF(JJ7,1));   
  30. JJ9:=IF(多>空,空,REF(JJ8,1));   
  31. JJ10:=IF(多>空,空,REF(JJ9,1));   
  32. JJ11:=IF(多>空,空,REF(JJ10,1));   
  33. JJ12:=IF(多>空,空,REF(JJ11,1));   
  34. JJ13:=IF(多>空,空,REF(JJ12,1));   
  35. JJ14:=IF(多>空,空,REF(JJ13,1));   
  36. JJ15:=IF(多>空,空,REF(JJ14,1));   
  37. JJ_2:=IF(多>空,空,REF(JJ15,1));   
  38.   
  39. K1:=IF(多>空,1,IF(多<空,-1,0));   
  40. KJ1:=IF(K1!=0,K1,DRAWNULL);   
  41. KJ2:=IF(K1!=0,K1,REF(KJ1,1));   
  42. KJ3:=IF(K1!=0,K1,REF(KJ2,1));   
  43. KJ4:=IF(K1!=0,K1,REF(KJ3,1));   
  44. KJ5:=IF(K1!=0,K1,REF(KJ4,1));   
  45. KJ6:=IF(K1!=0,K1,REF(KJ5,1));   
  46. KJ7:=IF(K1!=0,K1,REF(KJ6,1));   
  47. KJ8:=IF(K1!=0,K1,REF(KJ7,1));   
  48. KJ9:=IF(K1!=0,K1,REF(KJ8,1));   
  49. KJ10:=IF(K1!=0,K1,REF(KJ9,1));   
  50. KJ11:=IF(K1!=0,K1,REF(KJ10,1));   
  51. KJ12:=IF(K1!=0,K1,REF(KJ11,1));   
  52. KJ13:=IF(K1!=0,K1,REF(KJ12,1));   
  53. KJ14:=IF(K1!=0,K1,REF(KJ13,1));   
  54. KJ15:=IF(K1!=0,K1,REF(KJ14,1));   
  55. K2:=IF(K1!=0,K1,REF(KJ15,1));   
  56. 警报:IF(K2>0,JJ_1,JJ_2),COLOR00B4FF;   
  57.   
  58. {-----------------【图解模板】---------------------}   
  59. DRAWBAND(空,RGB(0,158,0),多,RGB(180,0,0));   
  60. RSV:=(C-LLV(L,3))/(HHV(H,3)-LLV(L,3))*100;   
  61. K:=SMA(RSV,2,1);          D:=SMA(K,2,1);          J:=3*K-2*D;             
  62. 引力:SMA(J,2,1)-SMA(J,3,1),COLORSTICK;   
  63. {画各线}   
  64. 空头:空,COLOR00FF00;   
  65. 多头:多,COLORFF59FF;   
  66.   
  67. {近台比}   
  68. JT_B1:=(O+L+H+C*3)/6;   
  69. WMA:=(5*JT_B1+4*REF(JT_B1,1)+3*REF(JT_B1,2)+2*REF(JT_B1,3)+1*REF(JT_B1,4))/(5+4+3+2+1);   
  70. JT_B2:=REVERSE(JT_B1)+2*WMA;   
  71. JT_B3:=3*JT_B2-2*SMA(JT_B2,2,1);   
  72. JTB4:=IF(BARSLAST(C>JT_B3),JT_B3,DRAWNULL);   
  73. JT_B4:=IF(BARSLAST(C>JT_B3),JT_B3,REF(JTB4,1));   
  74. JTB5:=IF(BARSLAST(C<=JT_B3),JT_B3,DRAWNULL);   
  75. JT_B5:=IF(BARSLAST(C<=JT_B3),JT_B3,REF(JTB5,1));   
  76. JT_B6:=IF(C<=JT_B3,JT_B4,JT_B5);   
  77. 近台比:(C-JT_B6)/JT_B6*100,NODRAW,COLORYELLOW;   



网站搜索:  



Copyright © 2009-2010 gszb.com ™,All Rights Reserved. 
公式网-www.gszx.com.cn-股票指标公式网