spacepaste

Paste details

reply | raw

  1.  
  2. //+------------------------------------------------------------------+
  3. //| Dirty_Rat.mq4 |
  4. //| Agent86's Dirty Rat Trade |
  5. //| http://www.iclbiz.com/joomla |
  6. //+------------------------------------------------------------------+
  7. #property copyright "Agent86"
  8. #property link "www.iclbiz.com/joomla"
  10. //---- input parameters
  11. extern double TakeProfit=300.0;
  12. extern double Lots=0.1;
  13. extern double StopLoss=40.0;
  14. //++++ These are adjusted for 5 digit brokers.
  16. int pips2points; // slippage 3 pips 3=points 30=points
  17. double pips2dbl; // Stoploss 15 pips 0.0015 0.00150
  18. int Digits.pips; // DoubleToStr(dbl/pips2dbl, Digits.pips)
  20. // OrderSend(... Slippage.Pips * pips2points, Bid - StopLossPips * pips2dbl
  21. //+------------------------------------------------------------------+
  22. //| expert initialization function |
  23. //+------------------------------------------------------------------+
  24. int init()
  25. {
  26. if (Digits == 5 || Digits == 3)
  27. { // Adjust for five (5) digit brokers.
  28. pips2dbl = Point*10; pips2points = 10; Digits.pips = 1;
  29. }
  30. else
  31. {
  32. pips2dbl = Point; pips2points = 1; Digits.pips = 0;
  33. }
  34. // OrderSend(... Slippage.Pips * pips2points, Bid - StopLossPips * pips2dbl
  35. //----
  37. //----
  38. return(0);
  39. }
  40. //+------------------------------------------------------------------+
  41. //| expert deinitialization function |
  42. //+------------------------------------------------------------------+
  43. int deinit()
  44. {
  45. //----
  47. //----
  48. return(0);
  49. }
  52. //+------------------------------------------------------------------+
  53. //| expert start function |
  54. //+------------------------------------------------------------------+
  55. int start()
  56. {
  57. //----
  59. int ticket,i,total,result;
  61. double faster = iMACD(NULL,0,12,26,9,PRICE_CLOSE,MODE_MAIN,1), //MODE_MAIN
  62. slower = iMACD(NULL,0,12,26,9,PRICE_CLOSE,MODE_SIGNAL,1), //MODE_SIGNAL
  63. faster_2 = iMACD(NULL,PERIOD_H4,12,26,9,PRICE_CLOSE,MODE_MAIN,1), //MODE_MAIN
  64. slower_2 = iMACD(NULL,PERIOD_H4,12,26,9,PRICE_CLOSE,MODE_SIGNAL,1); //MODE_SIGNAL
  66. //I'm going to have to create some loop
  69. total = OrdersTotal();
  70. if(total < 1){
  71. if(faster > slower)
  72. OrderSend(Symbol(),OP_BUY,Lots,Ask,3*pips2points,Bid-StopLoss*pips2dbl,Bid+TakeProfit*pips2dbl,"My EA",12345,0,Green);
  73. }
  75. /*
  76. if(total > 0){
  77. if(faster < slower)
  78. OrderSelect(SELECT_BY_POS, MODE_TRADES);
  79. if(OrderType() == OP_BUY && Symbol() == OrderSymbol()){
  80. result = OrderClose(OrderTicket(), OrderLots(), Bid*pips2dbl,3*pips2points, Red);
  81. if(result == false){
  82. Print("Order",OrderTicket()," failed to close Error ",GetLastError());
  83. return(0);
  84. }
  85. }
  86. }
  87. }
  89. */
  91. for(i = 0; i < OrdersTotal(); i++)
  92. OrderSelect(i, SELECT_BY_POS, MODE_TRADES);
  93. if(OrderType() == OP_BUY && Symbol() == OrderSymbol()){
  94. if(faster < slower)
  95. result = OrderClose( OrderTicket(), OrderLots(), Bid,3, Red);
  96. if(result == false){
  97. Print("Order", OrderTicket()," failed to close Error ",GetLastError());
  98. return(0);
  99. }
  100. }
  101. }
  106. //+------------------------------------------------------------------+
  107.  
Powered by spacepaste. Paste removal.