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

金融证券系统

开发平台:

Others

  1. //------------------------------------------------------------------------------
  2. //
  3. //  Formula Name:    Ema bands
  4. //  Author/Uploader: dtholz 
  5. //  E-mail:          dtholz@bigpond.net.au
  6. //  Date/Time Added: 2002-03-11 04:00:54
  7. //  Origin:          
  8. //  Keywords:        ema trending bands
  9. //  Level:           basic
  10. //  Flags:           exploration,indicator
  11. //  Formula URL:     http://www.amibroker.com/library/formula.php?id=169
  12. //  Details URL:     http://www.amibroker.com/library/detail.php?id=169
  13. //
  14. //------------------------------------------------------------------------------
  15. //
  16. //  ema offset bands easy to change 5 bands and ema period
  17. //
  18. //  indicator and AA scan .
  19. //
  20. //  this produced excellent results on the ASX ( aussie exchange)
  21. //
  22. //------------------------------------------------------------------------------
  23. /* EMA offset bands ver 1_2
  24. I'd guess this is NOT much different to bbands except you can contol the per % offset and the periods ema to off set*/
  25. per=.10;//Percent placement
  26. periods=20;//time periods
  27. /*********************************/
  28. emaverage= EMA(C,periods);
  29. bandsAdjust=emaverage*per;
  30. upperband=emaverage+bandsAdjust;
  31. Lowerband=emaverage-bandsAdjust;
  32. Plot(EMA(C,periods),"ema",5,1);
  33. Plot(C,"EMA",15,64);// plots the close with candles
  34. Plot(upperband,"upperband",3,1);// upperband
  35. Plot(Lowerband,"lowerband",4,1);//lowerband
  36. bCond1=Ref(Cross(C,Lowerband),-1) AND C > lowerband ;
  37. bCond2= C > EMAverage ;// the "or" gets me into up trends 
  38. bCond3= C > EMA(C,65);// trend
  39. Buy = bcond1 AND bCond3 OR bCond2; 
  40. scond1= Ref( Cross(emaverage,C),-1)AND C < emaverage;// close days under ema 
  41. scond2=C < Lowerband;//failed trade drops below lowerband
  42. Sell = scond1 OR scond2;
  43. Buy = ExRem( Buy, Sell );// removes buy/sell arrows
  44. Sell = ExRem( Sell, Buy );