外汇教育圈
加入本圈
收藏本贴

求EA高手帮提取个脚本

楼主  收藏   举报   帖子创建时间:  2019-05-05 05:25 回复：0 关注量：416
  1. #property copyright "MDP"
  2. #property link      ""
  3. #property show_inputs

  5. //#include <stdlib.mqh>
  6. #import "stdlib.ex4"
  7.    string ErrorDescription(int a0);

  9. #import

  11. extern string Configuration = "==== Configuration ====";
  12. extern int Magic = 0;
  13. extern string OrderCmt = "";
  14. extern string Suffix = "";
  15. extern bool NDDmode = FALSE;
  16. extern bool Show_Debug = FALSE;
  17. extern bool Verbose = FALSE;
  18. extern string TradingSettings = "==== Trade settings ====";
  19. extern bool TradeALLCurrencyPairs = FALSE;
  20. extern double MaxSpread = 26.0;
  21. extern double TakeProfit = 5.0;
  22. extern double StopLoss = 30.0;
  23. extern double TrailingStart = 0.0;
  24. extern double Commission = 7.0;
  25. extern bool UseDynamicVolatilityLimit = TRUE;
  26. extern double VolatilityMultiplier = 125.0;
  27. extern double VolatilityLimit = 180.0;
  28. extern bool UseVolatilityPercentage = TRUE;
  29. extern double VolatilityPercentageLimit = 60.0;
  30. extern bool UseMovingAverage = TRUE;
  31. extern bool UseBollingerBands = TRUE;
  32. extern double Deviation = 1.5;
  33. extern int OrderExpireSeconds = 3600;
  34. extern string Money_Management = "==== Money Management ====";
  35. extern double MinLots = 0.01;
  36. extern double MaxLots = 1000.0;
  37. extern double Risk = 2.0;
  38. extern string Screen_Shooter = "==== Screen Shooter ====";
  39. extern bool TakeShots = FALSE;
  40. extern int DelayTicks = 1;
  41. extern int ShotsPerBar = 1;
  42. string gsa_272[26] = {"EURUSD", "USDJPY", "GBPUSD", "USDCHF", "USDCAD", "AUDUSD", "NZDUSD", "EURJPY", "GBPJPY", "CHFJPY", "CADJPY", "AUDJPY", "NZDJPY", "EURCHF", "EURGBP", "EURCAD", "EURAUD",
  43.       "EURNZD", "GBPCHF", "GBPAUD", "GBPCAD", "GBPNZD", "AUDCHF", "AUDCAD", "AUDNZD", "NZDCHF",
  44.    "NZDCAD", "CADCHF"};
  45. string gsa_276[];
  46. bool gi_unused_284 = FALSE;
  47. bool gi_288 = TRUE;
  48. bool gi_292 = FALSE;
  49. int g_period_296 = 3;
  50. int gi_300 = 0;
  51. int g_digits_304 = 0;
  52. int g_slippage_308 = 3;
  53. int gia_312[30];
  54. int gi_316 = 0;
  55. int g_time_320 = 0;
  56. int g_count_324 = 0;
  57. int gi_328 = 0;
  58. int gi_332 = 0;
  59. int gi_336 = 0;
  60. double g_pips_340 = 0.0;
  61. double gd_unused_348 = 0.0;
  62. double g_lots_356 = 0.1;
  63. double gd_unused_364 = 0.4;
  64. double gd_372 = 1.0;
  65. double g_pips_380 = 5.0;
  66. double g_pips_388 = 10.0;
  67. double g_pips_396 = 20.0;
  68. double gda_404[30];
  69. double gda_408[30];
  70. double gda_412[30];
  71. double gd_416;
  72. double gd_424;
  73. int gi_440;
  74. int gi_444 = -1;
  75. int gi_448 = 3000000;
  76. int gi_452 = 0;

  78. int init() {
  79.    VolatilityPercentageLimit = VolatilityPercentageLimit / 100.0 + 1.0;
  80.    VolatilityMultiplier /= 10.0;
  81.    ArrayInitialize(gda_412, 0);
  82.    VolatilityLimit *= Point;
  83.    Commission = f0_12(Commission * Point);
  84.    g_digits_304 = Digits;
  85.    int li_0 = MathMax(MarketInfo(Symbol(), MODE_FREEZELEVEL), MarketInfo(Symbol(), MODE_STOPLEVEL));
  86.    if (TakeProfit < li_0) TakeProfit = li_0;
  87.    if (StopLoss < li_0) StopLoss = li_0;
  88.    if (gi_300 < li_0) gi_300 = li_0;
  89.    if (MathMod(Digits, 2) == 0.0) g_slippage_308 = 0;
  90.    else gi_316 = -1;
  91.    if (MaxLots > MarketInfo(Symbol(), MODE_MAXLOT)) MaxLots = MarketInfo(Symbol(), MODE_MAXLOT);
  92.    if (MinLots < MarketInfo(Symbol(), MODE_MINLOT)) MinLots = MarketInfo(Symbol(), MODE_MINLOT);
  93.    if (TradeALLCurrencyPairs == TRUE) f0_6();
  94.    if (Magic < 0) f0_13();
  95.    start();
  96.    return (0);
  97. }

  99. int deinit() {
  100.    return (0);
  101. }

  103. int start() {
  104.    if (g_digits_304 == 0) return (init());
  105.    f0_1(gda_404, gda_408, gia_312, gd_372);
  106.    f0_8();
  107.    return (0);
  108. }

  110. void f0_8() {
  111.    string ls_0;
  112.    string symbol_8;
  113.    bool bool_16;
  114.    bool li_20;
  115.    int li_unused_24;
  116.    bool li_28;
  117.    int li_32;
  118.    int li_unused_36;
  119.    int ticket_40;
  120.    int datetime_44;
  121.    int li_48;
  122.    int li_52;
  123.    int li_56;
  124.    int pos_60;
  125.    int li_68;
  126.    int index_72;
  127.    int count_76;
  128.    double price_84;
  129.    double price_92;
  130.    double ld_100;
  131.    double ld_108;
  132.    double ld_116;
  133.    double ld_124;
  134.    double order_stoploss_140;
  135.    double order_takeprofit_148;
  136.    double ld_156;
  137.    double ihigh_164;
  138.    double ilow_172;
  139.    double ld_180;
  140.    double ld_188;
  141.    double ld_196;
  142.    double ibands_204;
  143.    double ibands_212;
  144.    double ld_220;
  145.    double ld_228;
  146.    double ld_236;
  147.    double ld_244;
  148.    double ld_252;
  149.    double ld_260;
  150.    double ld_268;
  151.    double ld_276;
  152.    double ld_284;
  153.    double ld_292;
  154.    if (g_time_320 < Time[0]) {
  155.       g_time_320 = Time[0];
  156.       g_count_324 = 0;
  157.    } else g_count_324++;
  158.    if (TradeALLCurrencyPairs == FALSE) {
  159.       gi_336 = 1;
  160.       symbol_8 = Symbol();
  161.    }
  162.    for (int count_80 = 0; count_80 != gi_336; count_80++) {
  163.       symbol_8 = gsa_276[index_72];
  164.       ihigh_164 = iHigh(symbol_8, PERIOD_M1, 0);
  165.       ilow_172 = iLow(symbol_8, PERIOD_M1, 0);
  166.       ld_228 = ihigh_164 - ilow_172;
  167.       ld_180 = iMA(symbol_8, PERIOD_M1, g_period_296, 0, MODE_LWMA, PRICE_LOW, 0);
  168.       ld_188 = iMA(symbol_8, PERIOD_M1, g_period_296, 0, MODE_LWMA, PRICE_HIGH, 0);
  169.       ld_196 = ld_188 - ld_180;
  170.       li_28 = Bid >= ld_180 + ld_196 / 2.0;
  171.       ibands_204 = iBands(symbol_8, PERIOD_M1, g_period_296, Deviation, 0, PRICE_OPEN, MODE_UPPER, 0);
  172.       ibands_212 = iBands(symbol_8, PERIOD_M1, g_period_296, Deviation, 0, PRICE_OPEN, MODE_LOWER, 0);
  173.       ld_220 = ibands_204 - ibands_212;
  174.       li_32 = Bid >= ibands_212 + ld_220 / 2.0;
  175.       li_unused_36 = 0;
  176.       if (UseMovingAverage == FALSE && UseBollingerBands == TRUE && li_32 == 1) {
  177.          li_unused_36 = 1;
  178.          gd_416 = ibands_204;
  179.          gd_424 = ibands_212;
  180.       } else {
  181.          if (UseMovingAverage == TRUE && UseBollingerBands == FALSE && li_28 == 1) {
  182.             li_unused_36 = 1;
  183.             gd_416 = ld_188;
  184.             gd_424 = ld_180;
  185.          } else {
  186.             if (UseMovingAverage == TRUE && UseBollingerBands == TRUE && li_28 == 1 && li_32 == 1) {
  187.                li_unused_36 = 1;
  188.                gd_416 = MathMax(ibands_204, ld_188);
  189.                gd_424 = MathMin(ibands_212, ld_180);
  190.             }
  191.          }
  192.       }
  193.       ld_236 = MathMax(MarketInfo(symbol_8, MODE_FREEZELEVEL), MarketInfo(symbol_8, MODE_STOPLEVEL)) * Point;
  194.       ld_244 = Ask - Bid;
  195.       if (ld_236 > 1.0 * Point) {
  196.          li_20 = FALSE;
  197.          ld_108 = MaxSpread * Point;
  198.          ld_252 = g_pips_388 * Point;
  199.          ld_116 = g_pips_380 * Point;
  200.       } else {
  201.          li_20 = TRUE;
  202.          ld_108 = g_pips_396 * Point;
  203.          ld_252 = g_pips_340 * Point;
  204.          ld_116 = TrailingStart * Point;
  205.       }
  206.       ld_108 = MathMax(ld_108, ld_236);
  207.       if (li_20) ld_252 = MathMax(ld_252, ld_236);
  208.       ArrayCopy(gda_412, gda_412, 0, 1, 29);
  209.       gda_412[29] = ld_244;
  210.       if (gi_328 < 30) gi_328++;
  211.       ld_260 = 0;
  212.       pos_60 = 29;
  213.       for (int count_64 = 0; count_64 < gi_328; count_64++) {
  214.          ld_260 += gda_412[pos_60];
  215.          pos_60--;
  216.       }
  217.       ld_268 = ld_260 / gi_328;
  218.       ld_276 = f0_12(Ask + Commission);
  219.       ld_284 = f0_12(Bid - Commission);
  220.       ld_292 = ld_268 + Commission;
  221.       if (UseDynamicVolatilityLimit == TRUE) VolatilityLimit = ld_292 * VolatilityMultiplier;
  222.       li_68 = 0;
  223.       if (ld_228 && VolatilityLimit && gd_424 && gd_416) {
  224.          if (ld_228 > VolatilityLimit) {
  225.             ld_100 = ld_228 / VolatilityLimit;
  226.             if (UseVolatilityPercentage == FALSE || (UseVolatilityPercentage == TRUE && ld_100 > VolatilityPercentageLimit)) {
  227.                if (Bid < gd_424) li_68 = -1;
  228.                else
  229.                   if (Bid > gd_416) li_68 = 1;
  230.             }
  231.          } else ld_100 = 0;
  232.       }
  233.       ld_124 = MathMax(ld_236, ld_124);
  234.       if (Bid == 0.0 || MarketInfo(symbol_8, MODE_LOTSIZE) == 0.0) ld_124 = 0;
  235.       datetime_44 = TimeCurrent() + OrderExpireSeconds;
  236.       if (MarketInfo(symbol_8, MODE_LOTSTEP) == 0.0) li_48 = 5;
  237.       else li_48 = f0_3(0.1, MarketInfo(symbol_8, MODE_LOTSTEP));
  238.       if (Risk < 0.001 || Risk > 100.0) {
  239.          Comment("ERROR -- Invalid Risk Value.");
  240.          return;
  241.       }
  242.       if (AccountBalance() <= 0.0) {
  243.          Comment("ERROR -- Account Balance is " + DoubleToStr(MathRound(AccountBalance()), 0));
  244.          return;
  245.       }
  246.       g_lots_356 = f0_10(symbol_8);
  247.       index_72 = 0;
  248.       count_76 = 0;
  249.       for (pos_60 = 0; pos_60 < OrdersTotal(); pos_60++) {
  250.          OrderSelect(pos_60, SELECT_BY_POS, MODE_TRADES);
  251.          if (OrderMagicNumber() == Magic && OrderCloseTime() == 0) {
  252.             if (OrderSymbol() != symbol_8) {
  253.                count_76++;
  254.                continue;
  255.             }
  256.             switch (OrderType()) {
  257.             case OP_BUY:
  258.                if (gi_288) {
  259.                   order_stoploss_140 = OrderStopLoss();
  260.                   order_takeprofit_148 = OrderTakeProfit();
  261.                   if ((order_takeprofit_148 < f0_12(ld_276 + ld_108) && ld_276 + ld_108 - order_takeprofit_148 > ld_116)) {
  262.                      order_stoploss_140 = f0_12(Bid - ld_108);
  263.                      order_takeprofit_148 = f0_12(ld_276 + ld_108);
  264.                      gi_332 = GetTickCount();
  265.                      bool_16 = OrderModify(OrderTicket(), 0, order_stoploss_140, order_takeprofit_148, datetime_44, Lime);
  266.                      gi_332 = GetTickCount() - gi_332;
  267.                      if (bool_16 > FALSE && TakeShots && (!IsTesting()) && (!gi_292)) f0_7();
  268.                   }
  269.                }
  270.                index_72++;
  271.                continue;
  272.                break;
  273.             case OP_SELL:
  274.                if (gi_288) {
  275.                   order_stoploss_140 = OrderStopLoss();
  276.                   order_takeprofit_148 = OrderTakeProfit();
  277.                   if ((order_takeprofit_148 > f0_12(ld_284 - ld_108) && order_takeprofit_148 - ld_284 + ld_108 > ld_116)) {
  278.                      order_stoploss_140 = f0_12(Ask + ld_108);
  279.                      order_takeprofit_148 = f0_12(ld_284 - ld_108);
  280.                      gi_332 = GetTickCount();
  281.                      bool_16 = OrderModify(OrderTicket(), 0, order_stoploss_140, order_takeprofit_148, datetime_44, Orange);
  282.                      gi_332 = GetTickCount() - gi_332;
  283.                      if (bool_16 > FALSE && TakeShots && (!IsTesting()) && (!gi_292)) f0_7();
  284.                   }
  285.                }
  286.                index_72++;
  287.                continue;
  288.                break;
  289.             case OP_BUYSTOP:
  290.                if (!li_28) {
  291.                   ld_156 = OrderTakeProfit() - OrderOpenPrice() - Commission;
  292.                   if ((f0_12(Ask + ld_252) < OrderOpenPrice() && OrderOpenPrice() - Ask - ld_252 > ld_116)) {
  293.                      gi_332 = GetTickCount();
  294.                      bool_16 = OrderModify(OrderTicket(), f0_12(Ask + ld_252), f0_12(Bid + ld_252 - ld_156), f0_12(ld_276 + ld_252 + ld_156), 0, Lime);
  295.                      gi_332 = GetTickCount() - gi_332;
  296.                   }
  297.                   index_72++;
  298.                   continue;
  299.                }
  300.                OrderDelete(OrderTicket());
  301.                continue;
  302.                break;
  303.             case OP_SELLSTOP: break;
  304.             }
  305.             if (li_28) {
  306.                ld_156 = OrderOpenPrice() - OrderTakeProfit() - Commission;
  307.                if ((f0_12(Bid - ld_252) > OrderOpenPrice() && Bid - ld_252 - OrderOpenPrice() > ld_116)) {
  308.                   gi_332 = GetTickCount();
  309.                   bool_16 = OrderModify(OrderTicket(), f0_12(Bid - ld_252), f0_12(Ask - ld_252 + ld_156), f0_12(ld_284 - ld_252 - ld_156), 0, Orange);
  310.                   gi_332 = GetTickCount() - gi_332;
  311.                }
  312.                index_72++;
  313.                continue;
  314.             }
  315.             OrderDelete(OrderTicket());
  316.          }
  317.       }
  318.       li_unused_24 = 0;
  319.       if (gi_316 >= 0 || gi_316 == -2) {
  320.          li_52 = NormalizeDouble(Bid / Point, 0);
  321.          li_56 = NormalizeDouble(Ask / Point, 0);
  322.          if (li_52 % 10 != 0 || li_56 % 10 != 0) gi_316 = -1;
  323.          else {
  324.             if (gi_316 >= 0 && gi_316 < 10) gi_316++;
  325.             else gi_316 = -2;
  326.          }
  327.       }
  328.       if (index_72 == 0 && li_68 != 0 && f0_12(ld_292) <= f0_12(MaxSpread * Point) && gi_316 == -1) {
  329.          if (li_68 < 0) {
  330.             gi_332 = GetTickCount();
  331.             if (li_20) {
  332.                price_84 = Ask + gi_300 * Point;
  333.                if (NDDmode) {
  334.                   ticket_40 = OrderSend(symbol_8, OP_BUYSTOP, g_lots_356, price_84, g_slippage_308, 0, 0, OrderCmt, Magic, 0, Lime);
  335.                   if (OrderSelect(ticket_40, SELECT_BY_TICKET)) OrderModify(OrderTicket(), OrderOpenPrice(), price_84 - StopLoss * Point, price_84 + TakeProfit * Point, datetime_44, Lime);
  336.                } else {
  337.                   ticket_40 = OrderSend(symbol_8, OP_BUYSTOP, g_lots_356, price_84, g_slippage_308, price_84 - StopLoss * Point, price_84 + TakeProfit * Point, OrderCmt, Magic, datetime_44,
  338.                      Lime);
  339.                }
  340.                if (ticket_40 < 0) {
  341.                   li_unused_24 = 1;
  342.                   Print("ERROR BUYSTOP : " + f0_4(Ask + ld_252) + " SL:" + f0_4(Bid + ld_252 - ld_124) + " TP:" + f0_4(ld_276 + ld_252 + ld_124));
  343.                   gi_332 = 0;
  344.                } else {
  345.                   gi_332 = GetTickCount() - gi_332;
  346.                   PlaySound("news.wav");
  347.                   Print("BUYSTOP : " + f0_4(Ask + ld_252) + " SL:" + f0_4(Bid + ld_252 - ld_124) + " TP:" + f0_4(ld_276 + ld_252 + ld_124));
  348.                }
  349.             } else {
  350.                if (Bid - ilow_172 > 0.0) {
  351.                   ticket_40 = OrderSend(symbol_8, OP_BUY, g_lots_356, Ask, g_slippage_308, 0, 0, OrderCmt, Magic, datetime_44, Lime);
  352.                   if (ticket_40 < 0) {
  353.                      li_unused_24 = 1;
  354.                      Print("ERROR BUY Ask:" + f0_4(Ask) + " SL:" + f0_4(Bid - ld_124) + " TP:" + f0_4(ld_276 + ld_124));
  355.                      gi_332 = 0;
  356.                   } else {
  357.                      bool_16 = OrderModify(ticket_40, 0, f0_12(Bid - ld_124), f0_12(ld_276 + ld_124), datetime_44, Lime);
  358.                      gi_332 = GetTickCount() - gi_332;
  359.                      PlaySound("news.wav");
  360.                      Print("BUY Ask:" + f0_4(Ask) + " SL:" + f0_4(Bid - ld_124) + " TP:" + f0_4(ld_276 + ld_124));
  361.                   }
  362.                }
  363.             }
  364.          } else {
  365.             if (li_68 > 0) {
  366.                if (li_20) {
  367.                   price_92 = Bid - gi_300 * Point;
  368.                   gi_332 = GetTickCount();
  369.                   if (NDDmode) {
  370.                      ticket_40 = OrderSend(symbol_8, OP_SELLSTOP, g_lots_356, price_92, g_slippage_308, 0, 0, OrderCmt, Magic, 0, Orange);
  371.                      if (OrderSelect(ticket_40, SELECT_BY_TICKET)) OrderModify(OrderTicket(), OrderOpenPrice(), price_92 + StopLoss * Point, price_92 - TakeProfit * Point, datetime_44, Orange);
  372.                   } else {
  373.                      ticket_40 = OrderSend(symbol_8, OP_SELLSTOP, g_lots_356, price_92, g_slippage_308, price_92 + StopLoss * Point, price_92 - TakeProfit * Point, OrderCmt, Magic, datetime_44,
  374.                         Orange);
  375.                   }
  376.                   if (ticket_40 < 0) {
  377.                      li_unused_24 = 1;
  378.                      Print("ERROR SELLSTOP : " + f0_4(Bid - ld_252) + " SL:" + f0_4(Ask - ld_252 + ld_124) + " TP:" + f0_4(ld_284 - ld_252 - ld_124));
  379.                      gi_332 = 0;
  380.                   } else {
  381.                      gi_332 = GetTickCount() - gi_332;
  382.                      PlaySound("news.wav");
  383.                      Print("SELLSTOP : " + f0_4(Bid - ld_252) + " SL:" + f0_4(Ask - ld_252 + ld_124) + " TP:" + f0_4(ld_284 - ld_252 - ld_124));
  384.                   }
  385.                } else {
  386.                   if (ihigh_164 - Bid < 0.0) {
  387.                      ticket_40 = OrderSend(symbol_8, OP_SELL, g_lots_356, Bid, g_slippage_308, 0, 0, OrderCmt, Magic, datetime_44, Orange);
  388.                      if (ticket_40 < 0) {
  389.                         li_unused_24 = 1;
  390.                         Print("ERROR SELL Bid:" + f0_4(Bid) + " SL:" + f0_4(Ask + ld_124) + " TP:" + f0_4(ld_284 - ld_124));
  391.                         gi_332 = 0;
  392.                      } else {
  393.                         bool_16 = OrderModify(ticket_40, 0, f0_12(Ask + ld_124), f0_12(ld_284 - ld_124), datetime_44, Orange);
  394.                         gi_332 = GetTickCount() - gi_332;
  395.                         PlaySound("news.wav");
  396.                         Print("SELL Bid:" + f0_4(Bid) + " SL:" + f0_4(Ask + ld_124) + " TP:" + f0_4(ld_284 - ld_124));
  397.                      }
  398.                   }
  399.                }
  400.             }
  401.          }
  402.       }
  403.       if (gi_316 >= 0) Comment("Robot is initializing...");
  404.       else {
  405.          if (gi_316 == -2) Comment("ERROR -- Instrument " + symbol_8 + " prices should have " + g_digits_304 + " fraction digits on broker account");
  406.          else {
  407.             ls_0 = TimeToStr(TimeCurrent()) + " Tick: " + f0_9(g_count_324);
  408.             if (Show_Debug || Verbose) {
  409.                ls_0 = ls_0
  410.                + "n*** DEBUG MODE *** nVolatility: " + f0_4(ld_228) + ", VolatilityLimit: " + f0_4(VolatilityLimit) + ", VolatilityPercentage: " + f0_4(ld_100);
  411.                ls_0 = ls_0
  412.                + "nPriceDirection: " + StringSubstr("BUY NULLSELL", li_68 * 4 + 4, 4) + ", ImaHigh: " + f0_4(ld_188) + ", ImaLow: " + f0_4(ld_180) + ", BBandUpper: " + f0_4(ibands_204);
  413.                ls_0 = ls_0 + ", BBandLower: " + f0_4(ibands_212) + ", Expire: " + TimeToStr(datetime_44, TIME_MINUTES) + ", NnumOrders: " + index_72;
  414.                ls_0 = ls_0
  415.                + "nTrailingLimit: " + f0_4(ld_252) + ", TrailingDist: " + f0_4(ld_108) + "; TrailingStart: " + f0_4(ld_116) + ", UseStopOrders: " + li_20;
  416.             }
  417.             ls_0 = ls_0
  418.             + "nBid: " + f0_4(Bid) + ", Ask: " + f0_4(Ask) + ", AvgSpread: " + f0_4(ld_268) + ", Commission: " + f0_4(Commission) + ", RealAvgSpread: " + f0_4(ld_292) + ", Lots: " + f0_11(g_lots_356,
  419.                li_48) + ", Execution: " + gi_332 + " ms";
  420.             if (f0_12(ld_292) > f0_12(MaxSpread * Point)) {
  421.                ls_0 = ls_0
  422.                   + "n"
  423.                + "The current spread (" + f0_4(ld_292) + ") is higher than what has been set as MaxSpread (" + f0_4(MaxSpread * Point) + ") so no trading is allowed right now on this currency pair!";
  424.             }
  425.             Comment(ls_0);
  426.             if (index_72 != 0 || li_68 != 0 || Verbose) f0_2(ls_0);
  427.          }
  428.       }
  429.    }
  430. }

  432. void f0_1(double &ada_0[30], double &ada_4[30], int &aia_8[30], double a_pips_12) {
  433.    if (aia_8[0] == 0 || MathAbs(Bid - ada_0[0]) >= a_pips_12 * Point) {
  434.       for (int li_20 = 29; li_20 > 0; li_20--) {
  435.          ada_0[li_20] = ada_0[li_20 - 1];
  436.          ada_4[li_20] = ada_4[li_20 - 1];
  437.          aia_8[li_20] = aia_8[li_20 - 1];
  438.       }
  439.       ada_0[0] = Bid;
  440.       ada_4[0] = Ask;
  441.       aia_8[0] = GetTickCount();
  442.    }
  443. }

  445. string f0_4(double ad_0) {
  446.    return (DoubleToStr(ad_0, g_digits_304));
  447. }

  449. string f0_11(double ad_0, int ai_8) {
  450.    return (DoubleToStr(ad_0, ai_8));
  451. }

  453. double f0_12(double ad_0) {
  454.    return (NormalizeDouble(ad_0, g_digits_304));
  455. }

  457. string f0_9(int ai_0) {
  458.    if (ai_0 < 10) return ("00" + ai_0);
  459.    if (ai_0 < 100) return ("0" + ai_0);
  460.    return ("" + ai_0);
  461. }

  463. double f0_3(double ad_0, double ad_8) {
  464.    return (MathLog(ad_8) / MathLog(ad_0));
  465. }

  467. void f0_2(string as_0) {
  468.    int li_8;
  469.    int li_12 = -1;
  470.    while (li_12 < StringLen(as_0)) {
  471.       li_8 = li_12 + 1;
  472.       li_12 = StringFind(as_0,
  473.       "n", li_8);
  474.       if (li_12 == -1) {
  475.          Print(StringSubstr(as_0, li_8));
  476.          return;
  477.       }
  478.       Print(StringSubstr(as_0, li_8, li_12 - li_8));
  479.    }
  480. }

  482. void f0_6() {
  483.    string ls_unused_0;
  484.    string ls_8;
  485.    double ask_28;
  486.    gi_336 = 0;
  487.    for (int index_16 = 0; index_16 != gi_336; index_16++) {
  488.       ls_8 = gsa_272[index_16];
  489.       ask_28 = MarketInfo(ls_8 + Suffix, MODE_ASK);
  490.       if (ask_28 != 0.0) {
  491.          gi_336++;
  492.          ArrayResize(gsa_276, gi_336);
  493.          gsa_276[gi_336 - 1] = ls_8;
  494.       } else Print("The broker does not support ", ls_8);
  495.    }
  496. }

  498. int f0_13() {
  499.    string ls_0 = Symbol();
  500.    int str_len_8 = StringLen(ls_0);
  501.    int li_12 = 0;
  502.    for (int li_16 = 0; li_16 < str_len_8 - 1; li_16++) li_12 += StringGetChar(ls_0, li_16);
  503.    Magic = AccountNumber() + li_12;
  504.    return (0);
  505. }

  507. void f0_7() {
  508.    int li_0;
  509.    if (ShotsPerBar > 0) li_0 = MathRound(60 * Period() / ShotsPerBar);
  510.    else li_0 = 60 * Period();
  511.    int li_4 = MathFloor((TimeCurrent() - Time[0]) / li_0);
  512.    if (Time[0] != gi_440) {
  513.       gi_440 = Time[0];
  514.       gi_444 = DelayTicks;
  515.    } else
  516.       if (li_4 > gi_448) f0_0("i");
  517.    gi_448 = li_4;
  518.    if (gi_444 == 0) f0_0("");
  519.    if (gi_444 >= 0) gi_444--;
  520. }

  522. string f0_5(int ai_0, int ai_4) {
  523.    for (string dbl2str_8 = DoubleToStr(ai_0, 0); StringLen(dbl2str_8) < ai_4; dbl2str_8 = "0" + dbl2str_8) {
  524.    }
  525.    return (dbl2str_8);
  526. }

  528. void f0_0(string as_0 = "") {
  529.    gi_452++;
  530.    string ls_8 = "SnapShot" + Symbol() + Period() + "" + Year() + "-" + f0_5(Month(), 2) + "-" + f0_5(Day(), 2) + " " + f0_5(Hour(), 2) + "_" + f0_5(Minute(), 2) + "_" + f0_5(Seconds(),
  531.       2) + " " + gi_452 + as_0 + ".gif";
  532.    if (!WindowScreenShot(ls_8, 640, 480)) Print("ScreenShot error: ", ErrorDescription(GetLastError()));
  533. }

  535. double f0_10(string a_symbol_0) {
  536.    double lotstep_8 = MarketInfo(a_symbol_0, MODE_LOTSTEP);
  537.    double ld_ret_16 = AccountFreeMargin() * Risk / StopLoss / 100.0;
  538.    ld_ret_16 = MathFloor(ld_ret_16 / lotstep_8) * lotstep_8;
  539.    if (g_lots_356 > MaxLots) g_lots_356 = MaxLots;
  540.    if (g_lots_356 < MinLots) g_lots_356 = MinLots;
  541.    return (ld_ret_16);
  542. }
打赏
分享到：

本文作者

Ta的圈贴

更多

最新创建圈子

最新话题

我要发帖