开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 行业应用 > 金融证券系统 > 查看源码
Pivot Point and Support and Resistance Points.afl
资源名称：AFL_collection.rar　[点击查看]
上传用户：shiqiang
上传日期：2009-06-12
资源大小：1289k
文件大小：2k
源码类别：

金融证券系统

开发平台：

Others

Pivot Point and Support and Resistance Points.afl：源码内容
  1. //------------------------------------------------------------------------------
  2. //
  3. //  Formula Name:    Pivot Point and Support and Resistance Points
  4. //  Author/Uploader: Anthony Faragasso 
  5. //  E-mail:          ajf1111@epix.net
  6. //  Date/Time Added: 2002-04-25 09:04:53
  7. //  Origin:          
  8. //  Keywords:        
  9. //  Level:           basic
  10. //  Flags:           commentary
  11. //  Formula URL:     http://www.amibroker.com/library/formula.php?id=186
  12. //  Details URL:     http://www.amibroker.com/library/detail.php?id=186
  13. //
  14. //------------------------------------------------------------------------------
  15. //
  16. //  Guru Commentary, provides Pivot and support and resistance
  17. //
  18. //  points for the Next trading day.
  19. //
  20. //------------------------------------------------------------------------------
  22. /* Pivot points and Support and Resistance Points*/
  23. /* for next day trading*/
  24. /* coded by Anthony Faragasso */
  27. MaxGraph =8;
  29. p = (H+L+C)/3;
  30. r1 = (2*p)-L;
  31. s1 = (2*p)-H;
  32. r2 = p +(r1 - s1);
  33. s2 = p -(r2 - s1);
  35. Graph0=p;
  36. Graph1=r1;
  37. Graph2 = s1;
  38. Graph3= r2;
  39. Graph4 = s2;
  41. Graph0Style = Graph1Style = Graph2Style = Graph3Style = Graph4Style = 16 + 8;
  42. Graph0Color = 2;
  43. Graph1Color = Graph2Color = 8;
  44. Graph3Color = Graph4Color = 6;
  45.  
  46. Graph5 = Close;
  47. Graph5Color = 3;
  48. Graph5Style = 128;
  49. "";
  50. "------------------------------------------------------------------------------------------------------------";
  51. "    PIVOT POINTS AND SUPPORT AND RESISTANCE POINTS ";
  52. "------------------------------------------------------------------------------------------------------------";
  53. "";
  54. "MARKET BEING EVALUATED :  " + Title = Name() + "      DATE : "  + Date();
  55. "";
  56. "TODAY'S CLOSE WAS : "+"( " +WriteVal(Close,format=1.2)+" )";
  57. "----------------------------------------------------------------------------------------------------------------------";
  58. "    *******  THESE POINTS ARE VALID FOR NEXT TRADING DAY ******";
  59. "-----------------------------------------------------------------------------------------------------------------------";
  60. "RESISTENCE POINT 2 : ----------------" +WriteVal(Graph3,format=1.2);
  61. "";
  62. "RESISTENCE POINT 1 : ----------------" +WriteVal(Graph1,format=1.2);
  63. "";
  64. " --------------------------------------------------------"+ "("+WriteVal(Graph0,format=1.2)+")" +"   PIVOT POINT--------";
  65. "";
  66. "SUPPORT POINT 1 : ----------------------" +WriteVal(Graph2,format=1.2);
  67. "";
  68. "SUPPORT POINT 2 : ----------------------" +WriteVal(Graph4,format=1.2);