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

金融证券系统

开发平台:

Others

  1. //------------------------------------------------------------------------------
  2. //
  3. //  Formula Name:    nikhil
  4. //  Author/Uploader: ng 
  5. //  E-mail:          
  6. //  Date/Time Added: 2005-06-12 17:43:16
  7. //  Origin:          
  8. //  Keywords:        
  9. //  Level:           basic
  10. //  Flags:           indicator
  11. //  Formula URL:     http://www.amibroker.com/library/formula.php?id=469
  12. //  Details URL:     http://www.amibroker.com/library/detail.php?id=469
  13. //
  14. //------------------------------------------------------------------------------
  15. //
  16. //  I am a student.Recently started trading and wanna learn how to use trading
  17. //  systems.
  18. //
  19. //------------------------------------------------------------------------------
  20. /* %B of Bollinger Bands With Adaptive Zones */
  21. /* Gives Percentage of where the close is in relation to the bands.*/
  22. /* High reading ( Upper band ) , Low reading (Lower band )
  23. /* AFL code by Anthony Faragasso*/
  24. //Inputs 
  25. Lookback=60;
  26. Baseline=50;/*Do not Change*/
  27. PerCent=95;
  28. Pds =14;
  29. b=( ( C+2 * StDev( C,20 ) - MA( C,20 ) ) / ( 4 * StDev( C,20 ) ) ) * 100;
  30. /*Input */
  31. Osc=b;
  32. /*Value of Osc*/
  33. Value1 = Osc;
  34. /*Highest AND Lowest Values of Osc during Lookback Period*/
  35. Value2 = HHV(Value1,Lookback);
  36. Value3 = LLV(Value1,Lookback);
  37. /*Range of Osc during Lookback Period*/
  38. Value4 = Value2 - Value3;
  39. /*Define PerCent of Range to determine OB AND OS levels*/
  40. Value5 = Value4 * (PerCent / 100);
  41. /*Calculate OB AND OS levels*/
  42. Value6 = Value3 + Value5;
  43. Value7 = Value2 - Value5;
  44. baseline=IIf( Osc < 100 ,50 ,IIf( Osc < 0  ,0,0));
  45. Plot(Baseline," Baseline",7,1+4); /* yellow*/
  46. Plot(Value1,"( Adaptive Zones OSC )",6,1+4); /*BLUE*/
  47. Plot(Value6,"O/B",4,1+4);  /*RED -TOP(SELL)*/
  48. Plot(Value7,"O/S",5,1+4);  /*GREEN-BOT(BUY)*/
  49. Plot(b,"( % B  )" ,4,1);