#property copyright "Copyright © 2010, GPSForexRobot.com"
#property link      "http://gpsforexrobot.com/"

#import "ws2_32.dll"
   int WSAStartup(int a0, int& a1[]);
   int socket(int a0, int a1, int a2);
   int connect(int a0, int& a1[], int a2);
   int recv(int a0, int& a1[], int a2, int a3);
   int closesocket(int a0);
   int WSACleanup();   
#import "kernel32.dll"
   void GetSystemTime(int& a0[]);   
#import

extern string GPSForexRobotEURUSDv2 = " ";
extern string ____Size_Of_Lots____ = "---------------------------------------------";
extern bool UseMM = FALSE;
extern double Lots = 0.01;
extern double LotsRiskReductor = 10.0;
double gd_136 = 1000.0;
extern string ____Trading_Days____ = "---------------------------------------------";
extern bool AutoAnalysis = FALSE;
extern bool GPSEU_TradeMonday = TRUE;
extern bool GPSEU_TradeTuesday = TRUE;
extern bool GPSEU_TradeWednesday = TRUE;
extern bool GPSEU_TradeThursday = TRUE;
extern bool GPSEU_TradeFriday = TRUE;
extern string ____General_Options____ = "---------------------------------------------";
extern bool AutoGMTOffset = TRUE;
extern int GMTOffset = 1;
extern bool StealthMode = TRUE;
extern int Slippage = 2;
bool gi_200 = TRUE;
double gd_204 = 11.4;
double gd_212 = 15.8;
int gi_220 = 8;
int gi_224 = 0;
int gi_228 = -1;
int gi_232 = 0;
extern int GPSEU_MagicNumber = 20100106;
extern string __Recovery_Trade_Options__ = "---------------------------------------------";
extern bool GPSEU_UseRevAfterSL = TRUE;
double gd_252 = 14.3;
double gd_260 = 26.2;
extern double GPSEU_RevAfterSL_Multiplier = 5.9;
extern int GPSEU_RevAfterSL_MagNumber = 20100156;
extern string ____Trailing_Stop____ = "---------------------------------------------";
extern bool GPSEU_UseTrailingStop = FALSE;
extern double GPSEU_TrailingDistance = 6.0;
extern double GPSEU_TrailingStep = 1.0;
bool gi_308 = FALSE;
double gd_312 = 0.0;
double gd_320 = 0.0;
string gs_unused_328 = "---------------------------------------------";
bool gi_336 = FALSE;
extern string ____Others____ = "---------------------------------------------";
extern string ExpertComment = "GPSForexRobotEURUSDv2";
extern color ColorBuy = Blue;
extern color ColorSell = Red;
extern bool SendEmail = FALSE;
extern bool SoundAlert = FALSE;
extern string SoundFileAtOpen = "alert.wav";
extern string SoundFileAtClose = "alert.wav";
extern bool WriteLog = FALSE;
extern bool WriteDebugLog = FALSE;
bool gi_396 = TRUE;
int gi_400 = 2;
int gi_404 = 1;
string gs_unused_408 = "New Trade Information";
string gs_416 = "New Trade Information";
bool g_bool_424;
int gi_428;
int gi_432;
int g_slippage_436;
double gd_440;
double gd_448;
double gd_456;
int g_str2int_464;
int g_str2int_472;
double gd_476;
double gd_484;
double gd_492;
double gd_500;
double g_lotstep_508;
double gd_516;
string g_symbol_524;
string gs_532;
string g_dbl2str_540;
int g_year_548;
int g_day_556;
bool gba_560[1];
double gda_564[1];
double gda_568[1];
int gia_572[1];
int gia_576[1];
bool gba_580[1][5];
int gia_584[1];
int gia_588[1];
int gia_592[1];
bool gba_596[1];
double gda_600[1];
double gda_604[1];
double gda_608[1];
int gia_612[1];
bool gba_616[1];
double gda_620[1];
double gda_624[1];
int gia_628[1][5];
double gda_632[1][5];
double gda_636[1][5];
bool gba_640[1];
double gda_644[1];
double gda_648[1];
double gda_652[1];
double gda_656[1];
bool gba_660[1];
bool gi_664;
bool gi_668;
bool gi_676 = FALSE;
int gi_680 = 0;
double gda_684[26] = {1, 2, 91.9, 4, 22, 0, 0, 0, 0, 1, 0, 0, 0, -2, 0, 1, 220, 13.1, 5.3, 1, 120, 30, 1, 120, 30, 1};
string gs_688 = "";
string gs_696 = "";
string gs_704 = "";
bool gi_712 = FALSE;
//gmt vars
double gd_792;
bool AlreadyCalc = false;


int init() {
   gi_668 = TRUE;
   if (!IsDllsAllowed()) {
      Alert("WARNING: Set Parameter \"AllowDLL Imports\" ON in menu Tools -> Options -> ExpertAdvisors.");
      f0_8("WARNING: Set Parameter \"AllowDLL Imports\" ON in menu Tools -> Options -> ExpertAdvisors.", "comment");
      gi_668 = FALSE;
      return (0);
   }
   if (StringSubstr(Symbol(), 0, 6) != "EURUSD") {
      Alert("WARNING: Use GPS Forex Robot EURUSD only on EURUSD pair.");
      f0_8("WARNING: Use GPS Forex Robot EURUSD only on EURUSD pair.", "comment");
      gi_668 = FALSE;
      return (0);
   }
   if (IsTesting()) {
      if (AutoGMTOffset) {
         f0_8("WARNING: Automatic GMT offset calculation works only on live/demo trading " + "and should be set as FALSE for backtests - strategy testing.", "comment");
         gi_668 = FALSE;
         return (0);
      }
   }
   if (!UseMM)
      if (Lots > AccountBalance() / 100.0 / 100.0) Alert("WARNING: For every $100 of your account balance you should use a 0.01 lot size value. It is dangerous if you set too large a lot size value for your account balance. If you still want to trade with such a lot size, click OK.");
   if (WriteDebugLog) {
      WriteLog = TRUE;
      Print("*************************** Initialization ***************************");
   }
   g_symbol_524 = Symbol();
   gd_476 = MarketInfo(g_symbol_524, MODE_MAXLOT);
   gd_484 = MarketInfo(g_symbol_524, MODE_MINLOT);
   g_lotstep_508 = MarketInfo(g_symbol_524, MODE_LOTSTEP);
   gd_440 = 12.5;
   if (g_lotstep_508 == 0.01) gi_428 = 2;
   else {
      if (g_lotstep_508 == 0.1) gi_428 = 1;
      else {
         if (g_lotstep_508 == 1.0) gi_428 = 0;
         else {
            if (g_lotstep_508 == 0.001) gi_428 = 3;
            else gi_428 = 4;
         }
      }
   }
   double leverage_0 = AccountLeverage();
   gd_516 = NormalizeDouble(LotsRiskReductor * (100 / leverage_0), 2);
   gd_456 = 1605680.72 * gd_440;
   gs_532 = AccountCurrency();
   g_bool_424 = IsTesting();
   g_dbl2str_540 = DoubleToStr(gd_456, 0);
   if (Digits < 4) {
      gd_448 = 0.01;
      gi_432 = 2;
   } else {
      gd_448 = 0.0001;
      gi_432 = 4;
   }
   int li_8 = MathPow(10, Digits - gi_432);
   g_slippage_436 = Slippage * li_8;
   g_str2int_464 = StrToInteger(StringSubstr(g_dbl2str_540, 0, 4));
   gd_492 = MarketInfo(Symbol(), MODE_SPREAD) / MathPow(10, Digits - gi_432);
   gd_500 = gd_492;
   if (IsTesting()) {
      f0_13();
   }
   gi_664 = TRUE;
   f0_8("Waiting for tick.");
   return (0);
}

int deinit() {
   if (WriteDebugLog) Print("************************** Deinitialization **************************");
   return (0);
}

int start() {
   int order_total_24;
   double ld_32;
   if (!gi_668) return (0);
   int li_0 = TimeCurrent();
   if (!IsTesting()) {
      if (gi_664) {
         if (AutoGMTOffset) {
            if (f0_6(GMTOffset)) gs_688 = GMTOffset + " (automatic)";
            else gs_688 = "Error";
         } else gs_688 = GMTOffset + " (manual)";
         f0_13();
         gi_676 = TRUE;
         gi_680 = li_0;
         gi_664 = FALSE;
      }
      if (gi_676 == TRUE && gi_680 < li_0 - 60) {
         gi_676 = FALSE;
         gi_680 = li_0 + 60 * (300 - f0_2(120));
      }
      if (gi_676 == FALSE && li_0 >= gi_680) {
         if (AutoGMTOffset) {
            if (f0_6(GMTOffset)) gs_688 = GMTOffset + " (automatic)";
            else gs_688 = "Error";
         } else gs_688 = GMTOffset + " (manual)";
         f0_13();
         gi_676 = TRUE;
      }
      f0_1();
   }
   gd_492 = MarketInfo(Symbol(), MODE_SPREAD) / MathPow(10, Digits - gi_432);
   if (gd_492 > gd_500) gd_500 = gd_492;
   int datetime_4 = TimeCurrent();
   int li_8 = datetime_4 - 3600 * GMTOffset;
   g_year_548 = TimeYear(TimeCurrent());
   int day_of_week_12 = TimeDayOfWeek(datetime_4);
   int datetime_16 = iTime(NULL, PERIOD_D1, 0);
   for (int index_20 = 0; index_20 < 1; index_20++) {
      if (gba_560[index_20]) {
         if (!StealthMode) {
            f0_7(index_20, 0);
            if (gba_596[index_20]) f0_7(index_20, 1);
         }
         if (gba_616[index_20]) {
            order_total_24 = OrdersTotal();
            for (int pos_28 = 0; pos_28 <= order_total_24; pos_28++) {
               if (OrderSelect(pos_28, SELECT_BY_POS, MODE_TRADES))
                  if (OrderMagicNumber() == gia_588[index_20]) f0_3(OrderTicket(), index_20, 0);
            }
         }
         if (gba_640[index_20] && gba_596[index_20]) {
            order_total_24 = OrdersTotal();
            for (pos_28 = 0; pos_28 <= order_total_24; pos_28++) {
               if (OrderSelect(pos_28, SELECT_BY_POS, MODE_TRADES))
                  if (OrderMagicNumber() == gia_612[index_20]) f0_3(OrderTicket(), index_20, 1);
            }
         }
         f0_10(index_20, 0);
         if (gba_596[index_20]) f0_10(index_20, 1);
         if (gba_596[index_20])
            if (f0_9(-2, gia_612[index_20], datetime_16) == 0) f0_5(index_20);
            
            
         if (day_of_week_12 <= 0 || day_of_week_12 > 5) continue;
         
         g_day_556 = TimeDay(TimeCurrent());
         
         
         if ((gba_580[index_20][day_of_week_12 - 1])) {
            if (gia_572[index_20] != TimeHour(datetime_4) || gia_576[index_20] != TimeMinute(datetime_4)) continue;
            if (f0_9(-2, gia_588[index_20], datetime_16) <= 0) {
               if (f0_9(-1, gia_588[index_20], datetime_16, gd_440) <= 0) {
                  ld_32 = f0_18(gia_592[index_20]);
                  if (gia_584[index_20] >= 0)
                     if (day_of_week_12 == gia_584[index_20]) ld_32 = NormalizeDouble(2.0 * ld_32, gi_428);
                  if ((gba_660[index_20] && f0_19()) || (!gba_660[index_20])) f0_4(index_20, 0, gia_592[index_20], gia_588[index_20], ExpertComment, ld_32);
               }
            }
         }
      }
   }
   return (0);
}

string f0_16(int ai_0) {
   string ls_ret_8;
   switch (ai_0) {
   case 0:
   case 1:
      ls_ret_8 = "no error";
      break;
   case 2:
      ls_ret_8 = "common error";
      break;
   case 3:
      ls_ret_8 = "invalid trade parameters";
      break;
   case 4:
      ls_ret_8 = "trade server is busy";
      break;
   case 5:
      ls_ret_8 = "old version of the client terminal";
      break;
   case 6:
      ls_ret_8 = "no connection with trade server";
      break;
   case 7:
      ls_ret_8 = "not enough rights";
      break;
   case 8:
      ls_ret_8 = "too frequent requests";
      break;
   case 9:
      ls_ret_8 = "malfunctional trade operation (never returned error)";
      break;
   case 64:
      ls_ret_8 = "account disabled";
      break;
   case 65:
      ls_ret_8 = "invalid account";
      break;
   case 128:
      ls_ret_8 = "trade timeout";
      break;
   case 129:
      ls_ret_8 = "invalid price";
      break;
   case 130:
      ls_ret_8 = "invalid stops";
      break;
   case 131:
      ls_ret_8 = "invalid trade volume";
      break;
   case 132:
      ls_ret_8 = "market is closed";
      break;
   case 133:
      ls_ret_8 = "trade is disabled";
      break;
   case 134:
      ls_ret_8 = "not enough money";
      break;
   case 135:
      ls_ret_8 = "price changed";
      break;
   case 136:
      ls_ret_8 = "off quotes";
      break;
   case 137:
      ls_ret_8 = "broker is busy (never returned error)";
      break;
   case 138:
      ls_ret_8 = "requote";
      break;
   case 139:
      ls_ret_8 = "order is locked";
      break;
   case 140:
      ls_ret_8 = "long positions only allowed";
      break;
   case 141:
      ls_ret_8 = "too many requests";
      break;
   case 145:
      ls_ret_8 = "modification denied because order too close to market";
      break;
   case 146:
      ls_ret_8 = "trade context is busy";
      break;
   case 147:
      ls_ret_8 = "expirations are denied by broker";
      break;
   case 148:
      ls_ret_8 = "amount of open and pending orders has reached the limit";
      break;
   case 149:
      ls_ret_8 = "hedging is prohibited";
      break;
   case 150:
      ls_ret_8 = "prohibited by FIFO rules";
      break;
   case 4000:
      ls_ret_8 = "no error (never generated code)";
      break;
   case 4001:
      ls_ret_8 = "wrong function pointer";
      break;
   case 4002:
      ls_ret_8 = "array index is out of range";
      break;
   case 4003:
      ls_ret_8 = "no memory for function call stack";
      break;
   case 4004:
      ls_ret_8 = "recursive stack overflow";
      break;
   case 4005:
      ls_ret_8 = "not enough stack for parameter";
      break;
   case 4006:
      ls_ret_8 = "no memory for parameter string";
      break;
   case 4007:
      ls_ret_8 = "no memory for temp string";
      break;
   case 4008:
      ls_ret_8 = "not initialized string";
      break;
   case 4009:
      ls_ret_8 = "not initialized string in array";
      break;
   case 4010:
      ls_ret_8 = "no memory for array\' string";
      break;
   case 4011:
      ls_ret_8 = "too long string";
      break;
   case 4012:
      ls_ret_8 = "remainder from zero divide";
      break;
   case 4013:
      ls_ret_8 = "zero divide";
      break;
   case 4014:
      ls_ret_8 = "unknown command";
      break;
   case 4015:
      ls_ret_8 = "wrong jump (never generated error)";
      break;
   case 4016:
      ls_ret_8 = "not initialized array";
      break;
   case 4017:
      ls_ret_8 = "dll calls are not allowed";
      break;
   case 4018:
      ls_ret_8 = "cannot load library";
      break;
   case 4019:
      ls_ret_8 = "cannot call function";
      break;
   case 4020:
      ls_ret_8 = "expert function calls are not allowed";
      break;
   case 4021:
      ls_ret_8 = "not enough memory for temp string returned from function";
      break;
   case 4022:
      ls_ret_8 = "system is busy (never generated error)";
      break;
   case 4050:
      ls_ret_8 = "invalid function parameters count";
      break;
   case 4051:
      ls_ret_8 = "invalid function parameter value";
      break;
   case 4052:
      ls_ret_8 = "string function internal error";
      break;
   case 4053:
      ls_ret_8 = "some array error";
      break;
   case 4054:
      ls_ret_8 = "incorrect series array using";
      break;
   case 4055:
      ls_ret_8 = "custom indicator error";
      break;
   case 4056:
      ls_ret_8 = "arrays are incompatible";
      break;
   case 4057:
      ls_ret_8 = "global variables processing error";
      break;
   case 4058:
      ls_ret_8 = "global variable not found";
      break;
   case 4059:
      ls_ret_8 = "function is not allowed in testing mode";
      break;
   case 4060:
      ls_ret_8 = "function is not confirmed";
      break;
   case 4061:
      ls_ret_8 = "send mail error";
      break;
   case 4062:
      ls_ret_8 = "string parameter expected";
      break;
   case 4063:
      ls_ret_8 = "integer parameter expected";
      break;
   case 4064:
      ls_ret_8 = "double parameter expected";
      break;
   case 4065:
      ls_ret_8 = "array as parameter expected";
      break;
   case 4066:
      ls_ret_8 = "requested history data in update state";
      break;
   case 4099:
      ls_ret_8 = "end of file";
      break;
   case 4100:
      ls_ret_8 = "some file error";
      break;
   case 4101:
      ls_ret_8 = "wrong file name";
      break;
   case 4102:
      ls_ret_8 = "too many opened files";
      break;
   case 4103:
      ls_ret_8 = "cannot open file";
      break;
   case 4104:
      ls_ret_8 = "incompatible access to a file";
      break;
   case 4105:
      ls_ret_8 = "no order selected";
      break;
   case 4106:
      ls_ret_8 = "unknown symbol";
      break;
   case 4107:
      ls_ret_8 = "invalid price parameter for trade function";
      break;
   case 4108:
      ls_ret_8 = "invalid ticket";
      break;
   case 4109:
      ls_ret_8 = "trade is not allowed in the expert properties";
      break;
   case 4110:
      ls_ret_8 = "longs are not allowed in the expert properties";
      break;
   case 4111:
      ls_ret_8 = "shorts are not allowed in the expert properties";
      break;
   case 4200:
      ls_ret_8 = "object is already exist";
      break;
   case 4201:
      ls_ret_8 = "unknown object property";
      break;
   case 4202:
      ls_ret_8 = "object is not exist";
      break;
   case 4203:
      ls_ret_8 = "unknown object type";
      break;
   case 4204:
      ls_ret_8 = "no object name";
      break;
   case 4205:
      ls_ret_8 = "object coordinates error";
      break;
   case 4206:
      ls_ret_8 = "no specified subwindow";
      break;
   default:
      ls_ret_8 = "unknown error";
   }
   return (ls_ret_8);
}

string f0_20(int ai_0) {
   string ls_ret_8;
   switch (ai_0) {
   case 0:
      ls_ret_8 = "Buy";
      break;
   case 1:
      ls_ret_8 = "Sell";
      break;
   case 2:
      ls_ret_8 = "BuyLimit";
      break;
   case 3:
      ls_ret_8 = "SellLimit";
      break;
   case 4:
      ls_ret_8 = "BuyStop";
      break;
   case 5:
      ls_ret_8 = "SellStop";
      break;
   default:
      ls_ret_8 = "Unknown";
   }
   return (ls_ret_8);
}

int f0_17(int ai_0) {
   ai_0 += GMTOffset;
   while (true) {
      if (ai_0 >= 24) {
         ai_0 -= 24;
         continue;
      }
      if (ai_0 >= 0) break;
      ai_0 += 24;
   }
   g_str2int_472 = StrToInteger(StringSubstr(g_dbl2str_540, 6, 2));
   return (ai_0);
}

void f0_7(int ai_0, int ai_4) {
   double ld_8;
   double ld_16;
   double magic_24;
   int cmd_48;
   double ld_52;
   double price_60;
   double price_68;
   double price_76;
   bool li_84;
   double price_88;
   bool li_96;
   double price_100;
   bool bool_108;
   if (ai_4 == 0) {
      ld_8 = gda_568[ai_0];
      ld_16 = gda_564[ai_0];
      magic_24 = gia_588[ai_0];
   } else {
      ld_8 = gda_604[ai_0];
      ld_16 = gda_600[ai_0];
      magic_24 = gia_612[ai_0];
   }
   double ld_32 = NormalizeDouble(MarketInfo(g_symbol_524, MODE_STOPLEVEL) * Point, Digits);
   int li_40 = OrdersTotal() - 1;
   for (int pos_44 = li_40; pos_44 >= 0; pos_44--) {
      if (!OrderSelect(pos_44, SELECT_BY_POS, MODE_TRADES)) {
         if (WriteLog) Print(StringConcatenate("SetOrderLevels: OrderSelect() error = ", f0_16(GetLastError())));
      } else {
         if (OrderMagicNumber() == magic_24) {
            if (OrderSymbol() == g_symbol_524) {
               cmd_48 = OrderType();
               ld_52 = NormalizeDouble(OrderClosePrice(), Digits);
               price_60 = NormalizeDouble(OrderOpenPrice(), Digits);
               if (cmd_48 > OP_SELL)
                  if (NormalizeDouble(MathAbs(price_60 - ld_52), Digits) <= ld_32) continue;
               price_68 = NormalizeDouble(OrderStopLoss(), Digits);
               price_76 = NormalizeDouble(OrderTakeProfit(), Digits);
               li_84 = FALSE;
               if (price_68 == 0.0) {
                  if (ld_16 < 0.0) {
                     if (cmd_48 % 2 == 0) {
                        price_88 = NormalizeDouble(price_60 + ld_16, Digits);
                        if (NormalizeDouble(ld_52 - price_88, Digits) > ld_32) li_84 = TRUE;
                        else price_88 = price_68;
                     } else {
                        price_88 = NormalizeDouble(price_60 - ld_16, Digits);
                        if (NormalizeDouble(price_88 - ld_52, Digits) > ld_32) li_84 = TRUE;
                        else price_88 = price_68;
                     }
                  } else price_88 = price_68;
               } else price_88 = price_68;
               li_96 = FALSE;
               if (price_76 == 0.0 && (!gba_616[ai_0] && ai_4 == 0) || (!gba_640[ai_0] && ai_4 == 1) || (gba_616[ai_0] && gda_620[ai_0] < ld_8) || (gba_640[ai_0] && gda_644[ai_0] < ld_8)) {
                  if (ld_8 > 0.0) {
                     if (cmd_48 % 2 == 0) {
                        price_100 = NormalizeDouble(price_60 + ld_8, Digits);
                        if (NormalizeDouble(price_100 - ld_52, Digits) > ld_32) li_96 = TRUE;
                        else price_100 = price_76;
                     } else {
                        price_100 = NormalizeDouble(price_60 - ld_8, Digits);
                        if (NormalizeDouble(ld_52 - price_100, Digits) > ld_32) li_96 = TRUE;
                        else price_100 = price_76;
                     }
                  } else price_100 = price_76;
               } else price_100 = price_76;
               if (li_84 || li_96 || (gba_616[ai_0] && ai_4 == 0) || (gba_640[ai_0] && ai_4 == 1)) {
                  while (!IsTradeAllowed()) Sleep(1000);
                  if (NormalizeDouble(OrderStopLoss(), Digits) != price_88 || NormalizeDouble(OrderTakeProfit(), Digits) != price_100) {
                     bool_108 = OrderModify(OrderTicket(), price_60, price_88, price_100, 0, CLR_NONE);
                     if (!bool_108)
                        if (WriteLog) Print(StringConcatenate("SetOrderLevels: OrderModify(", f0_20(OrderType()), ") error = ", f0_16(GetLastError())));
                  }
               }
            }
         }
      }
   }
}

void f0_10(int ai_0, int ai_4) {
   double ld_16;
   double ld_24;
   double magic_32;
   double ld_unused_40;
   double ld_48;
   int li_56;
   double ld_60;
   double ld_68;
   double ld_76;
   int li_8 = OrdersTotal() - 1;
   for (int pos_12 = li_8; pos_12 >= 0; pos_12--) {
      if (!OrderSelect(pos_12, SELECT_BY_POS, MODE_TRADES)) {
         if (WriteLog) Print(StringConcatenate("WatchOrderLevels: OrderSelect() error = ", f0_16(GetLastError())));
      } else {
         if (ai_4 == 0) {
            ld_16 = gda_568[ai_0];
            ld_24 = gda_564[ai_0];
            magic_32 = gia_588[ai_0];
            ld_unused_40 = 0;
            ld_48 = 0;
            if (gba_616[ai_0]) {
               if (gda_620[ai_0] >= ld_16) ld_16 = 0;
               li_56 = f0_11(ai_0, OrderTicket());
               if (StealthMode && gda_632[ai_0][li_56] != 0.0) {
                  ld_24 = 0;
                  ld_unused_40 = gda_632[ai_0][li_56];
                  ld_48 = gda_636[ai_0][li_56];
               }
            }
         } else {
            ld_16 = gda_604[ai_0];
            ld_24 = gda_600[ai_0];
            magic_32 = gia_612[ai_0];
            ld_unused_40 = 0;
            ld_48 = 0;
            if (gba_640[ai_0]) {
               if (gda_644[ai_0] >= ld_16) ld_16 = 0;
               if (StealthMode && gda_652[ai_0] != 0.0) {
                  ld_24 = 0;
                  ld_unused_40 = gda_652[ai_0];
                  ld_48 = gda_656[ai_0];
               }
            }
         }
         if (ld_16 <= 0.0 && ld_24 >= 0.0 && ld_48 == 0.0) break;
         if (OrderMagicNumber() == magic_32) {
            if (OrderType() <= OP_SELL) {
               if (OrderSymbol() == g_symbol_524) {
                  ld_60 = NormalizeDouble(OrderClosePrice(), Digits);
                  ld_68 = NormalizeDouble(OrderOpenPrice(), Digits);
                  if (OrderType() == OP_BUY) {
                     ld_76 = NormalizeDouble(ld_60 - ld_68, Digits);
                     if (!((ld_16 > 0.0 && ld_76 >= ld_16) || (ld_24 < 0.0 && ld_76 <= ld_24) || (ld_48 != 0.0 && ld_76 <= ld_48))) continue;
                     if (WriteLog) Print("WatchOrderLevels: level for close BUY");
                     f0_15(OrderTicket(), OrderLots(), 0, g_slippage_436);
                     if (ai_4 == 0) {
                        f0_0(ai_0, OrderTicket());
                        gda_632[ai_0][li_56] = 0;
                        gda_636[ai_0][li_56] = 0;
                        continue;
                     }
                     gda_652[ai_0] = 0;
                     gda_656[ai_0] = 0;
                     continue;
                  }
                  ld_76 = NormalizeDouble(ld_68 - ld_60, Digits);
                  if ((ld_16 > 0.0 && ld_76 >= ld_16) || (ld_24 < 0.0 && ld_76 <= ld_24) || (ld_48 != 0.0 && ld_76 <= ld_48)) {
                     if (WriteLog) Print("WatchOrderLevels: level for close SELL");
                     f0_15(OrderTicket(), OrderLots(), 1, g_slippage_436);
                     if (ai_4 == 0) {
                        f0_0(ai_0, OrderTicket());
                        gda_632[ai_0][li_56] = 0;
                        gda_636[ai_0][li_56] = 0;
                        continue;
                     }
                     gda_652[ai_0] = 0;
                     gda_656[ai_0] = 0;
                  }
               }
            }
         }
      }
   }
}

double f0_18(int ai_unused_0) {
   double ld_ret_4;
   double ld_12;
   double ld_20;
   if (!UseMM) ld_ret_4 = Lots;
   else {
      ld_12 = AccountFreeMargin() * gd_516 / 100.0;
      ld_20 = MarketInfo(g_symbol_524, MODE_MARGINREQUIRED) * g_lotstep_508;
      ld_ret_4 = NormalizeDouble(MathFloor(ld_12 / ld_20) * g_lotstep_508, gi_428);
   }
   if (ld_ret_4 > gd_136) ld_ret_4 = gd_136;
   if (ld_ret_4 < gd_484) ld_ret_4 = gd_484;
   if (ld_ret_4 > gd_476) ld_ret_4 = gd_476;
   return (ld_ret_4);
}

int f0_4(int ai_0, int ai_4, int a_cmd_8, int a_magic_12, string a_comment_16, double ad_24, double a_price_32 = 0.0) {
   color color_44;
   int ticket_80;
   int error_84;
   double price_88;
   if (a_cmd_8 > OP_SELL && a_price_32 == 0.0) return (-1);
   int cmd_40 = a_cmd_8 % 2;
   if (ad_24 < gd_484) ad_24 = gd_484;
   else
      if (ad_24 > gd_476) ad_24 = gd_476;
   if (AccountFreeMarginCheck(g_symbol_524, cmd_40, ad_24) <= 0.0 || GetLastError() == 134/* NOT_ENOUGH_MONEY */) {
      if (!(WriteLog)) return (-1);
      Print("OpenOrder: you don\'t have free margin.");
      return (-1);
   }
   if (cmd_40 == OP_BUY) color_44 = ColorBuy;
   else color_44 = ColorSell;
   RefreshRates();
   double ld_48 = NormalizeDouble(MarketInfo(g_symbol_524, MODE_STOPLEVEL) * Point, Digits);
   double price_56 = NormalizeDouble(Ask, Digits);
   double price_64 = NormalizeDouble(Bid, Digits);
   switch (a_cmd_8) {
   case OP_BUY:
      a_price_32 = price_56;
      break;
   case OP_SELL:
      a_price_32 = price_64;
      break;
   case OP_BUYLIMIT:
      if (a_price_32 >= price_56) {
         a_price_32 = price_56;
         a_cmd_8 = 0;
      } else
         if (NormalizeDouble(price_56 - a_price_32, Digits) < ld_48) return (-1);
      break;
   case OP_SELLLIMIT:
      if (a_price_32 <= price_64) {
         a_price_32 = price_64;
         a_cmd_8 = 1;
      } else
         if (NormalizeDouble(a_price_32 - price_64, Digits) < ld_48) return (-1);
      break;
   case OP_BUYSTOP:
      if (a_price_32 <= price_56) {
         a_price_32 = price_56;
         a_cmd_8 = 0;
      } else
         if (NormalizeDouble(a_price_32 - price_56, Digits) < ld_48) return (-1);
      break;
   case OP_SELLSTOP:
      if (a_price_32 >= price_64) {
         a_price_32 = price_64;
         a_cmd_8 = 1;
      } else
         if (NormalizeDouble(price_64 - a_price_32, Digits) < ld_48) return (-1);
      break;
   default:
      return (-1);
   }
   int li_76 = gi_400;
   while (li_76 > 0) {
      while (!IsTradeAllowed()) Sleep(1000);
      ticket_80 = OrderSend(g_symbol_524, a_cmd_8, ad_24, a_price_32, g_slippage_436, 0, 0, a_comment_16, a_magic_12, 0, color_44);
      Sleep(MathRand() / 1000);
      if (ticket_80 < 0) {
         error_84 = GetLastError();
         if (WriteLog) {
            Print("OpenOrder: OrderSend(", f0_20(a_cmd_8), ") error = ", f0_16(error_84));
            Print("OpenOrder: order ", g_symbol_524, " ", f0_20(a_cmd_8), " lot = ", DoubleToStr(ad_24, 8), " op = ", DoubleToStr(a_price_32, 8), " slippage = ", g_slippage_436);
         }
         if (error_84 != 136/* OFF_QUOTES */) break;
         if (!(gi_396)) break;
         Sleep(6000);
         RefreshRates();
         if (a_cmd_8 == OP_BUY) price_88 = NormalizeDouble(Ask, Digits);
         else price_88 = NormalizeDouble(Bid, Digits);
         if (NormalizeDouble(MathAbs((price_88 - a_price_32) / gd_448), 0) > gi_404) break;
         a_price_32 = price_88;
         li_76--;
         if (li_76 > 0)
            if (WriteLog) Print("... Possible to open order.");
         ad_24 = NormalizeDouble(ad_24 / 2.0, gi_428);
         if (ad_24 < gd_484) ad_24 = gd_484;
      } else {
         if (OrderSelect(ticket_80, SELECT_BY_TICKET)) a_price_32 = OrderOpenPrice();
         if (SendEmail) {
            SendMail(gs_416, StringConcatenate("GPS Forex Robot trade Information\nCurrency Pair: ", StringSubstr(g_symbol_524, 0, 6), 
               "\nTime: ", TimeToStr(TimeCurrent(), TIME_DATE|TIME_MINUTES|TIME_SECONDS), 
               "\nOrder Type: ", f0_20(a_cmd_8), 
               "\nPrice: ", DoubleToStr(a_price_32, Digits), 
               "\nLot size: ", DoubleToStr(ad_24, gi_428), 
               "\nEvent: Trade Opened", 
               "\n\nCurrent Balance: ", DoubleToStr(AccountBalance(), 2), " ", gs_532, 
            "\nCurrent Equity: ", DoubleToStr(AccountEquity(), 2), " ", gs_532));
         }
         if (!(SoundAlert)) break;
         PlaySound(SoundFileAtOpen);
         break;
      }
   }
   if (ai_4 == 0) f0_12(ai_0, ticket_80);
   return (ticket_80);
}

int f0_15(int a_ticket_0, double a_lots_4, int ai_12, int a_slippage_16) {
   color color_20;
   double price_40;
   bool is_closed_48;
   int error_52;
   bool li_56;
   if (ai_12 == 0) color_20 = ColorBuy;
   else color_20 = ColorSell;
   int count_24 = 0;
   int count_28 = 0;
   int count_32 = 0;
   int count_36 = 0;
   while (true) {
      while (!IsTradeAllowed()) Sleep(1000);
      RefreshRates();
      if (ai_12 == 0) price_40 = NormalizeDouble(Bid, Digits);
      else price_40 = NormalizeDouble(Ask, Digits);
      is_closed_48 = OrderClose(a_ticket_0, a_lots_4, price_40, a_slippage_16, color_20);
      if (!is_closed_48) {
         error_52 = GetLastError();
         if (WriteLog) Print(StringConcatenate("OrderClose(", f0_20(ai_12), ",", DoubleToStr(a_ticket_0, 0), ") error = ", f0_16(error_52)));
         li_56 = FALSE;
         switch (error_52) {
         case 0/* NO_ERROR */:
            Sleep(10000);
            if (!(OrderSelect(a_ticket_0, SELECT_BY_TICKET))) break;
            if (OrderCloseTime() != 0) break;
            li_56 = TRUE;
            break;
         case 1/* NO_RESULT */: break;
         case 2/* COMMON_ERROR */: break;
         case 3/* INVALID_TRADE_PARAMETERS */: break;
         case 4/* SERVER_BUSY */: break;
         case 5/* OLD_VERSION */: break;
         case 6/* NO_CONNECTION */:
            Sleep(10000);
            if (!(IsConnected())) break;
            li_56 = TRUE;
            break;
         case 7/* NOT_ENOUGH_RIGHTS */: break;
         case 8/* TOO_FREQUENT_REQUESTS */: break;
         case 9/* MALFUNCTIONAL_TRADE */: break;
         case 64/* ACCOUNT_DISABLED */: break;
         case 65/* INVALID_ACCOUNT */: break;
         case 128/* TRADE_TIMEOUT */:
            Sleep(70000);
            if (!(OrderSelect(a_ticket_0, SELECT_BY_TICKET))) break;
            if (OrderCloseTime() != 0) break;
            li_56 = TRUE;
            break;
         case 129/* INVALID_PRICE */:
            Sleep(6000);
            count_24++;
            if (count_24 > 3) break;
            li_56 = TRUE;
            break;
         case 130/* INVALID_STOPS */:
            Sleep(6000);
            count_28++;
            if (count_28 > 3) break;
            li_56 = TRUE;
            break;
         case 131/* INVALID_TRADE_VOLUME */: break;
         case 132/* MARKET_CLOSED */: break;
         case 133/* TRADE_DISABLED */: break;
         case 134/* NOT_ENOUGH_MONEY */: break;
         case 135/* PRICE_CHANGED */:
            li_56 = TRUE;
            break;
         case 136/* OFF_QUOTES */:
            Sleep(6000);
            li_56 = TRUE;
            break;
         case 137/* BROKER_BUSY */:
            Sleep(20000);
            count_32++;
            if (count_32 > 3) break;
            li_56 = TRUE;
            break;
         case 138/* REQUOTE */:
            count_36++;
            if (count_36 > 3) break;
            li_56 = TRUE;
            break;
         case 139/* ORDER_LOCKED */: break;
         case 140/* LONG_POSITIONS_ONLY_ALLOWED */: break;
         case 141/* TOO_MANY_REQUESTS */: break;
         case 142:
            Sleep(70000);
            if (!(OrderSelect(a_ticket_0, SELECT_BY_TICKET))) break;
            if (OrderCloseTime() != 0) break;
            li_56 = TRUE;
            break;
         case 143:
            Sleep(70000);
            if (!(OrderSelect(a_ticket_0, SELECT_BY_TICKET))) break;
            if (OrderCloseTime() != 0) break;
            li_56 = TRUE;
            break;
         case 144: break;
         case 145/* TRADE_MODIFY_DENIED */:
            Sleep(20000);
            li_56 = TRUE;
            break;
         case 146/* TRADE_CONTEXT_BUSY */:
            while (IsTradeContextBusy()) Sleep(1000);
            li_56 = TRUE;
            break;
         case 147/* TRADE_EXPIRATION_DENIED */: break;
         case 148/* TRADE_TOO_MANY_ORDERS */: break;
         case 149/* TRADE_HEDGE_PROHIBITED */: break;
         case 150/* TRADE_PROHIBITED_BY_FIFO */: break;
         case 4000/* NO_MQLERROR */:
            Sleep(10000);
            if (!(OrderSelect(a_ticket_0, SELECT_BY_TICKET))) break;
            if (OrderCloseTime() != 0) break;
            li_56 = TRUE;
         case 4051/* INVALID_FUNCTION_PARAMETER_VALUE */: break;
         case 4062/* STRING_PARAMETER_EXPECTED */: break;
         case 4063/* INTEGER_PARAMETER_EXPECTED */: break;
         case 4064/* DOUBLE_PARAMETER_EXPECTED */: break;
         case 4105/* NO_ORDER_SELECTED */: break;
         case 4106/* UNKNOWN_SYMBOL */: break;
         case 4107/* INVALID_PRICE_PARAM */: break;
         case 4108/* INVALID_TICKET */: break;
         case 4109/* TRADE_NOT_ALLOWED */: break;
         case 4110/* LONGS__NOT_ALLOWED */: break;
         case 4111/* SHORTS_NOT_ALLOWED */: break;
         }
         if (!(li_56)) break;
         continue;
      }
      if (OrderSelect(a_ticket_0, SELECT_BY_TICKET)) price_40 = OrderClosePrice();
      if (SendEmail) {
         SendMail(gs_416, StringConcatenate("GPS Forex Robot trade Information\nCurrency Pair: ", StringSubstr(g_symbol_524, 0, 6), 
            "\nTime: ", TimeToStr(TimeCurrent(), TIME_DATE|TIME_MINUTES|TIME_SECONDS), 
            "\nOrder Type: ", f0_20(ai_12), 
            "\nPrice: ", DoubleToStr(price_40, Digits), 
            "\nLot size: ", DoubleToStr(a_lots_4, gi_428), 
            "\nEvent: Trade Closed", 
            "\n\nCurrent Balance: ", DoubleToStr(AccountBalance(), 2), " ", gs_532, 
         "\nCurrent Equity: ", DoubleToStr(AccountEquity(), 2), " ", gs_532));
      }
      if (!(SoundAlert)) break;
      PlaySound(SoundFileAtClose);
      break;
   }
   return (is_closed_48);
}

int f0_9(int a_cmd_0, int a_magic_4, int ai_8, double ad_12 = 0.0) {
   int str2int_28;
   int month_32;
   int cmd_40;
   int count_20 = 0;
   int li_24 = OrdersTotal() - 1;
   if (ad_12 == gd_440) {
      if (g_year_548 < g_str2int_464) return (1);
      if (g_year_548 != g_str2int_464) return (0);
      str2int_28 = StrToInteger(StringSubstr(g_dbl2str_540, 4, 2));
      month_32 = TimeMonth(TimeCurrent());
      if (month_32 < str2int_28) return (1);
      if (month_32 != str2int_28) return (0);
      if (g_day_556 < g_str2int_472) return (1);
      return (0);
   }
   for (int pos_36 = li_24; pos_36 >= 0; pos_36--) {
      if (!OrderSelect(pos_36, SELECT_BY_POS, MODE_TRADES)) {
         if (WriteLog) Print(StringConcatenate("HaveOrdersInDay: OrderSelect() error = ", f0_16(GetLastError())));
      } else {
         if (OrderMagicNumber() == a_magic_4) {
            if (OrderSymbol() == g_symbol_524) {
               cmd_40 = OrderType();
               if (a_cmd_0 == -4) {
                  if (cmd_40 % 2 != 0) continue;
               } else {
                  if (a_cmd_0 == -5) {
                     if (cmd_40 % 2 != 1) continue;
                  } else {
                     if (a_cmd_0 == -3) {
                        if (cmd_40 <= OP_SELL) continue;
                     } else {
                        if (a_cmd_0 == -2) {
                           if (cmd_40 > OP_SELL) continue;
                        } else {
                           if (a_cmd_0 >= OP_BUY)
                              if (cmd_40 != a_cmd_0) continue;
                        }
                     }
                  }
               }
               if (OrderOpenTime() >= ai_8) count_20++;
            }
         }
      }
   }
   if (count_20 == 0) {
      li_24 = OrdersHistoryTotal() - 1;
      for (pos_36 = li_24; pos_36 >= 0; pos_36--) {
         if (!OrderSelect(pos_36, SELECT_BY_POS, MODE_HISTORY)) {
            if (WriteLog) Print(StringConcatenate("HaveOrdersInDay: OrderSelect_2() error = ", f0_16(GetLastError())));
         } else {
            if (OrderMagicNumber() == a_magic_4) {
               if (OrderSymbol() == g_symbol_524) {
                  cmd_40 = OrderType();
                  if (a_cmd_0 == -4) {
                     if (cmd_40 % 2 != 0) continue;
                  } else {
                     if (a_cmd_0 == -5) {
                        if (cmd_40 % 2 != 1) continue;
                     } else {
                        if (a_cmd_0 == -3) {
                           if (cmd_40 <= OP_SELL) continue;
                        } else {
                           if (a_cmd_0 == -2) {
                              if (cmd_40 > OP_SELL) continue;
                           } else {
                              if (a_cmd_0 >= OP_BUY)
                                 if (cmd_40 != a_cmd_0) continue;
                           }
                        }
                     }
                  }
                  if (OrderOpenTime() < ai_8) break;
                  count_20++;
               }
            }
         }
      }
   }
   return (count_20);
}

void f0_5(int ai_0) {
   int magic_12;
   int datetime_16;
   double ld_20;
   double ld_28;
   double ld_36;
   double ld_44;
   double ld_52;
   int li_4 = OrdersHistoryTotal() - 1;
   for (int pos_8 = li_4; pos_8 >= 0; pos_8--) {
      if (!OrderSelect(pos_8, SELECT_BY_POS, MODE_HISTORY)) {
         if (WriteLog) Print(StringConcatenate("WatchReverseAfterSL: OrderSelect() error = ", f0_16(GetLastError())));
      } else {
         magic_12 = OrderMagicNumber();
         if (magic_12 == gia_612[ai_0]) break;
         if (magic_12 == gia_588[ai_0]) {
            if (OrderSymbol() == g_symbol_524) {
               if (OrderProfit() >= 0.0) break;
               datetime_16 = OrderCloseTime();
               if (TimeHour(datetime_16) != Hour()) break;
               if (TimeMinute(datetime_16) != Minute()) break;
               if (TimeDay(datetime_16) != Day()) break;
               if (TimeMonth(datetime_16) != Month()) break;
               ld_20 = NormalizeDouble(OrderOpenPrice(), Digits);
               ld_28 = NormalizeDouble(OrderClosePrice(), Digits);
               ld_36 = gda_564[ai_0];
               ld_44 = NormalizeDouble(ld_28 - ld_20, Digits);
               if (MathAbs(ld_20 - ld_28) < MathAbs(ld_36) - g_slippage_436 * (1 / MathPow(10, Digits))) break;
               ld_52 = NormalizeDouble(OrderLots() * gda_608[ai_0], gi_428);
               if (ld_52 > gd_136) ld_52 = gd_136;
               if (ld_52 < gd_484) ld_52 = gd_484;
               if (ld_52 > gd_476) ld_52 = gd_476;
               f0_4(ai_0, 1, MathAbs(gia_592[ai_0] - 1), gia_612[ai_0], ExpertComment, ld_52);
               return;
            }
         }
      }
   }
}

int f0_6(int &ai_0) {
   int li_4 = AUGMT();
   //if (li_4 < 0) return (0);
   //int li_8 = TimeCurrent() - li_4;
   ai_0 = gd_792;//MathFloor((li_8 + 1800) / 3600.0);
   return (1);
}

int f0_8(string as_0, string as_8 = "") {
   Comment("\n\n" + "GPS FOREX ROBOT V2" 
      + "\n" 
      + "www.gpsforexrobot.com" 
   + "\n\n" + as_0);
   if (as_8 != "") {
      if (as_8 == "comment") Print(as_0);
      else Print(as_8);
   }
   return (1);
}

int f0_1() {
   string ls_0;
   string ls_8;

      if (IsDemo()) ls_0 = "Demo";
      else ls_0 = "Real";
      if (AutoAnalysis) ls_8 = "Enable";
      else ls_8 = "Disable";
      f0_8("AUTHENTICATION STATUS: " 
         + "\n" 
         + gs_696 
         + "\n" 
         + "---------------------------------------------------" 
         + "\n" 
         + "GENERAL INFORMATION:" 
         + "\n" 
         + "Broker Company:            " + AccountCompany() 
         + "\n" 
         + "Terminal Company:         " + TerminalCompany() 
         + "\n" 
         + "Server Name:                 " + AccountServer() 
         + "\n" 
         + "Current Server Time:       " + TimeToStr(TimeCurrent(), TIME_SECONDS) 
         + "\n" 
         + "---------------------------------------------------" 
         + "\n" 
         + "ACCOUNT INFORMATION:" 
         + "\n" 
         + "Account Name:               " + AccountName() 
         + "\n" 
         + "Account Number:             " + AccountNumber() 
         + "\n" 
         + "Account Type:                " + ls_0 
         + "\n" 
         + "Account Leverage:           1:" + DoubleToStr(AccountLeverage(), 0) 
         + "\n" 
         + "Account Balance:             " + DoubleToStr(AccountBalance(), 2) 
         + "\n" 
         + "Account Equity:               " + DoubleToStr(AccountEquity(), 2) 
         + "\n" 
         + "Account Floating P/L:        " + DoubleToStr(AccountProfit(), 2) 
         + "\n" 
         + "Account Currency:           " + AccountCurrency() 
         + "\n" 
         + "---------------------------------------------------" 
         + "\n" 
         + "ADDITIONAL INFORMATION:" 
         + "\n" 
         + "Current Spread:               " + DoubleToStr(gd_492, Digits - gi_432) 
         + "\n" 
         + "Maximum Spread:            " + DoubleToStr(gd_500, Digits - gi_432) 
         + "\n" 
         + "Free Margin:                   " + DoubleToStr(AccountFreeMargin(), 2) 
         + "\n" 
         + "Used Margin:                   " + DoubleToStr(AccountMargin(), 2) 
         + "\n" 
         + "Auto Analysis:                " + ls_8 
         + "\n" 
         + "---------------------------------------------------" 
         + "\n" 
         + "GMT SETTINGS:" 
         + "\n" 
      + "GMT Offset:                   " + gs_688);
   return (0);
}

int f0_14() {
   gd_204 = gda_684[2];
   gd_212 = gda_684[3];
   gi_220 = gda_684[4];
   gi_224 = gda_684[5];
   gd_252 = gda_684[16];
   gd_260 = gda_684[17];
   if (AutoAnalysis) {
      if (gda_684[6] == 0.0) GPSEU_TradeMonday = FALSE;
      else GPSEU_TradeMonday = TRUE;
      if (gda_684[7] == 0.0) GPSEU_TradeTuesday = FALSE;
      else GPSEU_TradeTuesday = TRUE;
      if (gda_684[9] == 0.0) GPSEU_TradeWednesday = FALSE;
      else GPSEU_TradeWednesday = TRUE;
      if (gda_684[10] == 0.0) GPSEU_TradeThursday = FALSE;
      else GPSEU_TradeThursday = TRUE;
      if (gda_684[11] == 0.0) GPSEU_TradeFriday = FALSE;
      else GPSEU_TradeFriday = TRUE;
   }
   gba_560[0] = gi_200;
   gda_564[0] = NormalizeDouble((-1.0 * gd_204) * gd_448, Digits);
   gda_568[0] = NormalizeDouble(gd_212 * gd_448, Digits);
   gia_572[0] = f0_17(gi_220);
   gia_576[0] = gi_224;
   gba_580[0][0] = GPSEU_TradeMonday;
   gba_580[0][1] = GPSEU_TradeTuesday;
   gba_580[0][2] = GPSEU_TradeWednesday;
   gba_580[0][3] = GPSEU_TradeThursday;
   gba_580[0][4] = GPSEU_TradeFriday;
   gia_584[0] = gi_228;
   gia_592[0] = gi_232;
   gia_588[0] = GPSEU_MagicNumber;
   gba_596[0] = GPSEU_UseRevAfterSL;
   gda_600[0] = NormalizeDouble((-1.0 * gd_252) * gd_448, Digits);
   gda_604[0] = NormalizeDouble(gd_260 * gd_448, Digits);
   gda_608[0] = GPSEU_RevAfterSL_Multiplier;
   gia_612[0] = GPSEU_RevAfterSL_MagNumber;
   gba_616[0] = GPSEU_UseTrailingStop;
   gda_620[0] = NormalizeDouble(GPSEU_TrailingDistance * gd_448, Digits);
   gda_624[0] = NormalizeDouble(GPSEU_TrailingStep * gd_448, Digits);
   gba_640[0] = gi_308;
   gda_644[0] = NormalizeDouble(gd_312 * gd_448, Digits);
   gda_648[0] = NormalizeDouble(gd_320 * gd_448, Digits);
   gda_652[0] = 0;
   gda_656[0] = 0;
   gba_660[0] = gi_336;
   return (1);
}

int f0_13() {
   f0_14();
   gs_696 = "Authenticated [Trades are available]\nThank you for joining the GPS Robot Team!";
   gs_704 = "Authenticatd: [Trades are available]";
   return (1);
}

int f0_2(int ai_0) {
   MathSrand(TimeLocal());
   return (MathRand() % ai_0);
}

int f0_19() {
   double ichimoku_0 = iIchimoku(NULL, 0, 9, 26, 52, MODE_SENKOUSPANA, 0);
   double ichimoku_8 = iIchimoku(NULL, 0, 9, 26, 52, MODE_SENKOUSPANB, 0);
   if ((Bid < ichimoku_0 && Bid > ichimoku_8) || (Bid > ichimoku_0 && Bid < ichimoku_8)) return (0);
   if (Ask < ichimoku_0 && Ask < ichimoku_8) return (0);
   if (Bid > ichimoku_0 && Bid > ichimoku_8) return (1);
   return (0);
}

void f0_3(int a_ticket_0, int ai_4, int ai_8) {
   double ld_12;
   double ld_20;
   int li_28;
   double ld_32;
   if (ai_8 == 0) {
      ld_12 = gda_620[ai_4];
      ld_20 = gda_624[ai_4];
      li_28 = f0_11(ai_4, a_ticket_0);
      ld_32 = gda_632[ai_4][li_28];
   } else {
      ld_12 = gda_644[ai_4];
      ld_20 = gda_648[ai_4];
      ld_32 = gda_652[ai_4];
   }
   if (OrderSelect(a_ticket_0, SELECT_BY_TICKET, MODE_TRADES)) {
      if (OrderType() == OP_BUY) {
         if (Bid - OrderOpenPrice() <= NormalizeDouble(ld_12, Digits)) return;
         if (StealthMode) {
            if (!(OrderStopLoss() == 0.0 || OrderStopLoss() < Bid - NormalizeDouble(ld_12 + ld_20, Digits))) return;
            if (!OrderModify(a_ticket_0, OrderOpenPrice(), Bid - NormalizeDouble(ld_12, Digits), OrderTakeProfit(), OrderExpiration())) {
               Print("Error Trailing: OrderModify function can not modify the order. Error Number: #", GetLastError());
               return;
            }
            if (ai_8 == 0) {
               gda_632[ai_4][li_28] = Bid - NormalizeDouble(ld_12, Digits);
               gda_636[ai_4][li_28] = NormalizeDouble(Bid - ld_12 - OrderOpenPrice(), Digits);
               return;
            }
            gda_652[ai_4] = Bid - NormalizeDouble(ld_12, Digits);
            gda_656[ai_4] = NormalizeDouble(Bid - ld_12 - OrderOpenPrice(), Digits);
            return;
         }
         if (!(ld_32 == 0.0 || ld_32 < Bid - NormalizeDouble(ld_12 + ld_20, Digits))) return;
         if (ai_8 == 0) {
            gda_632[ai_4][li_28] = Bid - NormalizeDouble(ld_12, Digits);
            gda_636[ai_4][li_28] = NormalizeDouble(Bid - ld_12 - OrderOpenPrice(), Digits);
            return;
         }
         gda_652[ai_4] = Bid - NormalizeDouble(ld_12, Digits);
         gda_656[ai_4] = NormalizeDouble(Bid - ld_12 - OrderOpenPrice(), Digits);
         return;
      }
      if (OrderType() == OP_SELL) {
         if (OrderOpenPrice() - Ask > NormalizeDouble(ld_12, Digits)) {
            if (!StealthMode) {
               if (!(OrderStopLoss() == 0.0 || OrderStopLoss() > Ask + NormalizeDouble(ld_12 + ld_20, Digits))) return;
               if (!OrderModify(a_ticket_0, OrderOpenPrice(), Ask + NormalizeDouble(ld_12, Digits), OrderTakeProfit(), OrderExpiration())) {
                  Print("Error Trailing: OrderModify function can not modify the order. Error Number: #", GetLastError());
                  return;
               }
               if (ai_8 == 0) {
                  gda_632[ai_4][li_28] = Ask + NormalizeDouble(ld_12, Digits);
                  gda_636[ai_4][li_28] = NormalizeDouble(OrderOpenPrice() - (Ask + ld_12), Digits);
                  return;
               }
               gda_652[ai_4] = Ask + NormalizeDouble(ld_12, Digits);
               gda_656[ai_4] = NormalizeDouble(OrderOpenPrice() - (Ask + ld_12), Digits);
               return;
            }
            if (ld_32 == 0.0 || ld_32 > Ask + NormalizeDouble(ld_12 + ld_20, Digits)) {
               if (ai_8 == 0) {
                  gda_632[ai_4][li_28] = Ask + NormalizeDouble(ld_12, Digits);
                  gda_636[ai_4][li_28] = NormalizeDouble(OrderOpenPrice() - (Ask + ld_12), Digits);
                  return;
               }
               gda_652[ai_4] = Ask + NormalizeDouble(ld_12, Digits);
               gda_656[ai_4] = NormalizeDouble(OrderOpenPrice() - (Ask + ld_12), Digits);
            }
         }
      }
   }
}

int f0_11(int ai_0, int ai_4) {
   for (int count_8 = 0; count_8 < 5; count_8++)
      if (gia_628[ai_0][count_8] == ai_4) return (count_8);
   return (-1);
}

void f0_12(int ai_0, int ai_4) {
   for (int count_8 = 0; count_8 < 5; count_8++) {
      if (gia_628[ai_0][count_8] == 0) {
         gia_628[ai_0][count_8] = ai_4;
         return;
      }
   }
}

void f0_0(int ai_0, int ai_4) {
   for (int count_8 = 0; count_8 < 5; count_8++)
      if (gia_628[ai_0][count_8] == ai_4) gia_628[ai_0][count_8] = 0;
}

int AUGMT() {
   int li_0;
   int li_12;
   int li_16;
   bool li_24;
   int li_28;
   int lia_32[16];
   int lia_44[100];
   string str_concat_48;
   int str2time_56;
   double ld_60;
   int lia_68[4];
   string ls_72;
   string ls_80;
   double ld_4 = -100;
   if (AlreadyCalc==true) return(0);
   gd_792 = NormalizeDouble(GMTOffset, 1);
   while (ld_4 < -12.0 || ld_4 > 13.0 && li_0 < 10) {
      li_12 = 9;
      li_24 = FALSE;
      li_28 = 0;
      int lia_36[5] = {218103810};
      int lia_40[8] = {317991872, 1694802820, 895544384, 487523969, 1711580036, 747408000, 1728357252, 1901185231,
   470746753};
      while (li_16 < li_12) {
         if (WSAStartup(514, lia_44) == 0) {
            li_28 = socket(2, 1, 0);
            if (li_28 >= 0) {
               lia_36[1] = lia_40[li_16];
               if (connect(li_28, lia_36, 20) >= 0) {
                  ArrayInitialize(lia_32, 0);
                  if (recv(li_28, lia_32, 64, 0) >= 0) {
                     str_concat_48 = "";
                     str2time_56 = 0;
                     for (int index_20 = 0; index_20 < 16; index_20++) {
                        str_concat_48 = StringConcatenate(str_concat_48, CharToStr(lia_32[index_20] & 255), CharToStr(lia_32[index_20] >> 8 & 255), CharToStr(lia_32[index_20] >> 16 & 255),
                           CharToStr(lia_32[index_20] >> 24 & 255));
                     }
                     if (StringLen(str_concat_48) > 22) {
                        str2time_56 = StrToTime(StringConcatenate("20", StringSubstr(str_concat_48, 7, 2), ".", StringSubstr(str_concat_48, 10, 2), ".", StringSubstr(str_concat_48, 13, 2),
                           StringSubstr(str_concat_48, 15, 9)));
                     }
                  }
               }
            }
            if (li_28 > 0) closesocket(li_28);
            WSACleanup();
         }
         if (str2time_56 != 0) break;
         li_16++;
         Sleep(500);
      }
      if (str2time_56 == 0) {
         li_24 = TRUE;
         GetSystemTime(lia_68);
         ls_72 = lia_68[0] & 65535;
         ls_80 = lia_68[0] >> 16 + 100;
         ls_72 = ls_72 + "." + StringSubstr(ls_80, 1);
         ls_80 = lia_68[1] >> 16 + 100;
         ls_72 = ls_72 + "." + StringSubstr(ls_80, 1);
         ls_80 = lia_68[2] & 65535 + 100;
         ls_72 = ls_72 + " " + StringSubstr(ls_80, 1);
         ls_80 = lia_68[2] >> 16 + 100;
         ls_72 = ls_72 + ":" + StringSubstr(ls_80, 1);
         ls_80 = lia_68[3] & 65535 + 100;
         ls_72 = ls_72 + ":" + StringSubstr(ls_80, 1);
         str2time_56 = StrToTime(ls_72);
      }
      ld_60 = TimeCurrent() - str2time_56;
      ld_60 /= 3600.0;
      ld_4 = NormalizeDouble(ld_60, 1);
      li_0++;
   }
   if (li_0 < 10) gd_792 = ld_4;
   if (li_24 == TRUE) Print("Can not reach time servers, GMT offset (" + DoubleToStr(gd_792, 1) + ") was calculated using local Windows settings (may be inaccurate).");
    else Print("GMT offset (" + DoubleToStr(gd_792, 1) + ") was obtained from a time server at " + TimeToStr(TimeLocal()));
   //string time2str_20 = TimeToStr(TimeCurrent() - 3600.0 * gd_792, TIME_MINUTES);
   AlreadyCalc = true;
   return (0);
}