返回
外汇指标
TrillionStrategySessions
回复:0  浏览:843
  • 楼主admin 圈主
  • 2019-05-05 05:03
GBPUSDH1.png

  1. //+-------------------------------------------------------------------+
  2. //|                                                                   |
  3. //|                       Copyright ?2004, metaQuotes Software Corp. |
  4. //|                                         http://www.metaquotes.net |
  5. //|                  tweaked by accrete at accrete.com                |
  6. //+-------------------------------------------------------------------+
  7. #property copyright "Copyright ?2004, metaQuotes Software Corp."
  8. #property link      "http://www.metaquotes.net"

  10. #property indicator_chart_window

  12. extern int Time_Shift=0;//set to = 16:00 New York on your broker feed

  14. extern bool Previous_Session_H_M_L = true;
  15. extern bool Show_Yesterdays_Close = false;
  16. extern bool Show_Yesterdays_Open = false;

  18. extern color        LineColorOpen        =CornflowerBlue;
  19. extern int Line_Width_Open  =2;
  20. extern color   LineColorClose = SandyBrown;
  21. extern int Line_Width_Close  =2;


  24. double Session_HML=0;
  25. double day_high=0;
  26. double day_low=0;
  27. double yesterday_high=0;
  28. double yesterday_open=0;
  29. double yesterday_low=0;
  30. double yesterday_close=0;
  31. double today_open=0;
  32. double today_high=0;
  33. double today_low=0;
  34. double P=0;//Prior Session Open
  35. double Q=0;
  36. double Y1; //Prior Session Close
  37. double R1,R2,R3;
  38. double M0,M1,M2,M3,M4,M5;
  39. double S1,S2,S3;
  40. double HBu6,HBu5,HBu4,HBu3,HBu2,HBu1;
  41. double HBd6,HBd5,HBd4,HBd3,HBd2,HBd1;
  42. double L4,L3;
  43. double nQ=0;
  44. double nD=0;
  45. double D=0;
  46. double rates_h1[2][6];
  47. double rates_d1[2][6];

  49. //+------------------------------------------------------------------+
  50. //| Custom indicator initialization function                         |
  51. //+------------------------------------------------------------------+
  52. int init()
  53.   {
  54. //---- indicators
  55. R1=0; R2=0; R3=0;
  56. M0=0; M1=0; M2=0; M3=0; M4=0; M5=0;
  57. S1=0; S2=0; S3=0;
  58. HBu6=0; HBu5=0; HBu4=0; HBu3=0; HBu2=0; HBu1=0;
  59. HBd6=0; HBd5=0; HBd4=0; HBd3=0; HBd2=0; HBd1=0;
  60. L4=0; L3=0;
  61. Y1=0;


  64. //----
  65.    return(0);
  66.   }
  67. //+------------------------------------------------------------------+
  68. //| Custor indicator deinitialization function                       |
  69. //+------------------------------------------------------------------+
  70. int deinit()
  71.   {
  72. //---- TODO: add your code here
  73. ObjectDelete("R1 Label");
  74. ObjectDelete("R1 Line");
  75. ObjectDelete("R2 Label");
  76. ObjectDelete("R2 Line");
  77. ObjectDelete("R3 Label");
  78. ObjectDelete("R3 Line");
  79. ObjectDelete("S1 Label");
  80. ObjectDelete("S1 Line");
  81. ObjectDelete("S2 Label");
  82. ObjectDelete("S2 Line");
  83. ObjectDelete("S3 Label");
  84. ObjectDelete("S3 Line");
  85. ObjectDelete("P Label");
  86. ObjectDelete("P Line");
  87. ObjectDelete("Y1 Label");
  88. ObjectDelete("Y1 Line");




  93. ObjectDelete("L3 Label");
  94. ObjectDelete("L3 Line");
  95. ObjectDelete("L4 Label");
  96. ObjectDelete("L4 Line");
  97. ObjectDelete("M5 Label");
  98. ObjectDelete("M5 Line");
  99. ObjectDelete("M4 Label");
  100. ObjectDelete("M4 Line");
  101. ObjectDelete("M3 Label");
  102. ObjectDelete("M3 Line");
  103. ObjectDelete("M2 Label");
  104. ObjectDelete("M2 Line");
  105. ObjectDelete("M1 Label");
  106. ObjectDelete("M1 Line");
  107. ObjectDelete("M0 Label");
  108. ObjectDelete("M0 Line");
  109. //----
  110.    return(0);
  111.   }
  112. //+------------------------------------------------------------------+
  113. //| Custom indicator iteration function                              |
  114. //+------------------------------------------------------------------+
  115. int start()
  116.   {
  117.       int i=0, j=0;
  118. //---- TODO: add your code here

  120. //---- exit if period is greater than daily charts
  121. if(Period() > 1440)
  122. {
  123. Print("Error - Chart period is greater than 1 day.");
  124. return(-1); // then exit
  125. }

  127. //---- Get new daily prices

  129. ArrayCopyRates(rates_d1, Symbol(), PERIOD_D1);
  130. yesterday_high = rates_d1[1][3];
  131. yesterday_low = rates_d1[1][2];
  132. day_high = rates_d1[0][3];
  133. day_low = rates_d1[0][2];

  135. ArrayCopyRates(rates_h1, Symbol(), PERIOD_H1);
  136. for (i=0;i<=25;i++)
  137. {
  138.    if (TimeMinute(rates_h1[i][0])==0 && (TimeHour(rates_h1[i][0])-Time_Shift)==0)
  139.    {
  140.       yesterday_close = rates_h1[i+1][4];      
  141.       yesterday_open = rates_h1[i+24][1];
  142.       today_open = rates_h1[i][1];      
  143.       break;
  144.    }
  145. }

  147. //---- Calculate ATM_Pivots

  149. D = (day_high - day_low);
  150. Q = (yesterday_high - yesterday_low);
  151. // P = yesterday_close;
  152. R2 = yesterday_close+(Q*0.50);
  153. R1 = yesterday_close+(Q*0.35);
  154. S1 = yesterday_close-(Q*0.35);
  155. S2 = yesterday_close-(Q*0.50);
  156. //P = (yesterday_high + yesterday_low + yesterday_close) / 3; //original pivot code

  158. // Previous Days High, Median, and Low:
  159. M3 = (yesterday_high + yesterday_low)/2;
  160. M2 = yesterday_low;
  161. M1 = yesterday_high;
  162. P = yesterday_open;
  163. Y1 = yesterday_close;


  166. //H4 = (Q*0.55)+yesterday_close;
  167. // H3 = yesterday_close+(Q*0.125);
  168. //R3 = (2*P)+(yesterday_high-(2*yesterday_low));
  169.        
  170.        
  171.        
  172.        
  173.        
  174. //M5 = (R2+R3)/2;
  175. //        R2 = P-S1+R1;
  176. //M4 = (R1+R2)/2;
  177. //        R1 = (2*P)-yesterday_low;
  178. //M3 = (P+R1)/2;
  179. //        P = (yesterday_high + yesterday_low + yesterday_close)/3;
  180. //M2 = (P+S1)/2;
  181. //        S1 = (2*P)-yesterday_high;
  182. //M1 = (S1+S2)/2;
  183. //        S2 = P-R1+S1;
  184. //S3 = (2*P)-((2* yesterday_high)-yesterday_low);
  185. //L3 = yesterday_close-(Q*0.27);       
  186. //L4 = yesterday_close-(Q*0.55);       
  187. //M0 = (S2+S3)/2;

  189. if (Q > 5)
  190. {
  191.         nQ = Q;
  192. }
  193. else
  194. {
  195.         nQ = Q*10000;
  196. }

  198. if (D > 5)
  199. {
  200.         nD = D;
  201. }
  202. else
  203. {
  204.         nD = D*10000;
  205. }
  206. //Comment("$TrillionStrategy           Prior Range = ",nQ,"        Current Range = ",nD, "nSession Open = ", yesterday_open,"      Session Close = ",yesterday_close);

  208. //---- Set line labels on chart window


  211. //------ Midpoints ATM_Pivots

  213.    if (Previous_Session_H_M_L==true)
  214.    {

  216.       if(ObjectFind("M3 label") != 0)
  217.       {
  218.       ObjectCreate("M3 label", OBJ_TEXT, 0, CurTime(), M3);
  219.       ObjectSetText("M3 label", "                                              sM", 8, "Arial", Violet);
  220.       }
  221.       else
  222.       {
  223.       ObjectMove("M3 label", 0, CurTime(), M3);
  224.       }

  226.       if(ObjectFind("M2 label") != 0)
  227.       {
  228.       ObjectCreate("M2 label", OBJ_TEXT, 0, CurTime(), M2);
  229.       ObjectSetText("M2 label", "                                              sL", 8, "Arial", Red);
  230.       }
  231.       else
  232.       {
  233.       ObjectMove("M2 label", 0, CurTime(), M2);
  234.       }

  236.       if(ObjectFind("M1 label") != 0)
  237.       {
  238.       ObjectCreate("M1 label", OBJ_TEXT, 0, CurTime(), M1);
  239.       ObjectSetText("M1 label", "                                              sH", 8, "Arial", Lime);
  240.       }
  241.       else
  242.       {
  243.       ObjectMove("M1 label", 0, CurTime(), M1);
  244.       }
  245.    
  246.       if(ObjectFind("M3 line") != 0)
  247.       {
  248.       ObjectCreate("M3 line", OBJ_HLINE, 0, Time[40], M3);
  249.       ObjectSet("M3 line", OBJPROP_STYLE, STYLE_DASH);
  250.       ObjectSet("M3 line", OBJPROP_COLOR, Violet);
  251.       }
  252.       else
  253.       {
  254.       ObjectMove("M3 line", 0, Time[40], M3);
  255.       }

  257.       if(ObjectFind("M2 line") != 0)
  258.       {
  259.       ObjectCreate("M2 line", OBJ_HLINE, 0, Time[40], M2);
  260.       ObjectSet("M2 line", OBJPROP_STYLE, STYLE_DASH);
  261.       ObjectSet("M2 line", OBJPROP_COLOR, Red);
  262.       }
  263.       else
  264.       {
  265.       ObjectMove("M2 line", 0, Time[40], M2);
  266.       }

  268.       if(ObjectFind("M1 line") != 0)
  269.       {
  270.       ObjectCreate("M1 line", OBJ_HLINE, 0, Time[40], M1);
  271.       ObjectSet("M1 line", OBJPROP_STYLE, STYLE_DASH);
  272.       ObjectSet("M1 line", OBJPROP_COLOR, Lime);
  273.       }
  274.       else
  275.       {
  276.       ObjectMove("M1 line", 0, Time[40], M1);
  277.       }
  278. }

  280.     if (Show_Yesterdays_Close==true)
  281.    {
  282.            if(ObjectFind("P label") != 0)
  283.       {
  284.       ObjectCreate("P label", OBJ_TEXT, 0, CurTime(), P);
  285.       ObjectSetText("P label", "                       Open", 12, "Arial", LineColorOpen);
  286.       }
  287.       else
  288.       {
  289.       ObjectMove("P label", 0, CurTime(), P);
  290.       }   
  291.             if(ObjectFind("P line") != 0)
  292.       {
  293.       ObjectCreate("P line", OBJ_HLINE, 0, Time[40], P);
  294.       ObjectSet("P line", OBJPROP_STYLE, STYLE_SOLID);
  295.       ObjectSet("P line", OBJPROP_WIDTH, Line_Width_Open);
  296.       ObjectSet("P line", OBJPROP_COLOR, LineColorOpen);
  297.       }
  298.       else
  299.       {
  300.       ObjectMove("P line", 0, Time[40], P);
  301.       }  

  303. }
  304. //------ Show Yesterday's Open:

  306. if ( Show_Yesterdays_Open==true)
  307.    {
  308.            if(ObjectFind("Y1 label") != 0)
  309.       {
  310.       ObjectCreate("Y1 label", OBJ_TEXT, 0, CurTime(), Y1);
  311.       ObjectSetText("Y1 label", "                        Close", 12, "Arial", LineColorClose);
  312.       }
  313.       else
  314.       {
  315.       ObjectMove("Y1 label", 0, CurTime(), Y1);
  316.       }   
  317.             if(ObjectFind("Y1 line") != 0)
  318.       {
  319.       ObjectCreate("Y1 line", OBJ_HLINE, 0, Time[40], Y1);
  320.       ObjectSet("Y1 line", OBJPROP_STYLE, STYLE_SOLID);
  321.        ObjectSet("Y1 line", OBJPROP_WIDTH, Line_Width_Close);
  322.       ObjectSet("Y1 line", OBJPROP_COLOR, LineColorClose);
  323.       }
  324.       else
  325.       {
  326.       ObjectMove("Y1 line", 0, Time[40], Y1);
  327.       }  

  329. }
  330. //----End of Midpoint Pivots Draw

  332. //---- End Of Program
  333.    return(0);
  334.   }
  335. //+------------------------------------------------------------------+
打赏