CCT Coppock Curve.afl
上传用户:shiqiang
上传日期:2009-06-12
资源大小:1289k
文件大小:2k
源码类别:

金融证券系统

开发平台:

Others

  1. //------------------------------------------------------------------------------
  2. //
  3. //  Formula Name:    CCT Coppock Curve
  4. //  Author/Uploader: Peter Gialames 
  5. //  E-mail:          investor@bluescafe.com
  6. //  Date/Time Added: 2001-07-20 12:09:23
  7. //  Origin:          Originally developed by Steve Karnish, http://www.cedarcreektrading.com
  8. //  Keywords:        
  9. //  Level:           basic
  10. //  Flags:           indicator
  11. //  Formula URL:     http://www.amibroker.com/library/formula.php?id=77
  12. //  Details URL:     http://www.amibroker.com/library/detail.php?id=77
  13. //
  14. //------------------------------------------------------------------------------
  15. //
  16. //  The CCT Coppock Curve is a formula that was introduced in
  17. //  Barron’s in 1962. It was devised by a San Antonio, TX
  18. //  –based technician named Edwin Sedgwick Coppock. Since then, the
  19. //  Coppock momentum oscillator has been adopted and adapted by technicians
  20. //  around the world.
  21. //
  22. //------------------------------------------------------------------------------
  23. /* CCT Coppock Curve
  24. **
  25. ** Originally developed by Steve Karnish 
  26. ** http://www.cedarcreektrading.com
  27. **
  28. ** AFL translation by Peter Gialames
  29. **
  30. ** Set scaling: Automatic
  31. ** Grid: Middle, Level 0
  32. */
  33. graph0=(ROC(CLOSE,14 )*10 + ROC(CLOSE,11)*10 +   
  34. ROC(Ref(CLOSE,-1),14)*9 +   ROC(Ref(CLOSE,-1),11)*9 +  
  35. ROC(Ref(CLOSE,-2),14)*8 +   ROC(Ref(CLOSE,-2),11)*8 +  
  36. ROC(Ref(CLOSE,-3),14)*7 +   ROC(Ref(CLOSE,-3),11)*7 +  
  37. ROC(Ref(CLOSE,-4),14)*6 +   ROC(Ref(CLOSE,-4),11)*6 +  
  38. ROC(Ref(CLOSE,-5),14)*5 +   ROC(Ref(CLOSE,-5),11)*5 +  
  39. ROC(Ref(CLOSE,-6),14)*4 +   ROC(Ref(CLOSE,-6),11)*4 +  
  40. ROC(Ref(CLOSE,-7),14)*3 +   ROC(Ref(CLOSE,-7),11)*3 +  
  41. ROC(Ref(CLOSE,-8),14)*2 +   ROC(Ref(CLOSE,-8),11)*2 +  
  42. ROC(Ref(CLOSE,-9),14) +   ROC(Ref(CLOSE,-9),11))/2;