Pirate

//EA交易 => …\MT4\MQL4\Experts

#property copyright “2018, LUKA-FX.”
#property link “https://www.mql5.com/en/users/luka-fx/seller”
#property version “1.20”
#property strict
#property description “Expert Pirate Intended for trading with MT4 at Forex market,\n it is recommended use currency pairs:\n CHFJPY, EURCHF, EURAUD, USDCHF, USDCAD.”
//#property icon “PIRATE_02.04.18_bmp\\PIRATE_02.04.18.ico”

//——————
extern bool DisplayTable=false ; //DISPLAY_TABLE
extern string оooooooooooooooooo=”=== MONEY_MANAGEMENT ===” ;
extern bool MoneyManagement=true ; //MONEY_MANAGEMENT
extern double Risk=3 ; //RISK
extern double OriginalLot=0.1 ; //ORIGINAL_LOT
extern string ооoooooooooooooooo=”=== SETTINGS_TRADES ===” ;
extern int CountBuy=1 ; //ORDERS_BUY
extern int CountSell=1 ; //ORDERS_SELL
extern int TakeProfitClose=5 ; //TAKE_PROFIT_CLOSE
extern int StopLoss=35 ; //STOP_LOSS
extern int TakeProfit=20 ; //TAKE_PROFIT
extern int MaxSpreadOpen=30 ; //MAX_SPREAD_OPEN
extern string оооooooooooooooooo=”=== TRADE_TIME ===” ;
extern int StartHour=0 ; //START_HOUR
extern int StopHour=1 ; //STOP_HOUR
bool 总_1_bo = false;
int 总_2_in = 1;
bool 总_3_bo = true;
bool 总_4_bo = true;
bool 总_5_bo = true;
bool 总_6_bo = true;
int 总_7_in = 0;
int 总_8_in = 0;
int 总_9_in = 1;
int 总_10_in = 0;
string 总_11_st = “00:00”;
string 总_12_st = “01:00”;
string 总_13_st = “=== SETTINGS_CLOSE_POSITIONS ===”;
bool 总_14_bo = true;
bool 总_15_bo = true;
int 总_16_in = 0;
int 总_17_in = 15;
bool 总_18_bo = false;
bool 总_19_bo = false;
bool 总_20_bo = true;
bool 总_21_bo = true;
bool 总_22_bo = true;
double 总_23_do = 0.01;
double 总_24_do = 0.06;
double 总_25_do = 1.5;
double 总_26_do = 0.0;
double 总_27_do = 0.0;
double 总_28_do = 0.0;
double 总_29_do = 0.0;
double 总_30_do = 0.0;
double 总_31_do = 0.0;
double 总_32_do = 0.0;
double 总_33_do = 0.0;
double 总_34_do = 0.0;
double 总_35_do = 0.0;
double 总_36_do = 0.0;
double 总_37_do = 0.0;
double 总_38_do = 0.0;
double 总_39_do = 0.0;
double 总_40_do = 0.0;
double 总_41_do = 0.0;
double 总_42_do = 0.0;
double 总_43_do = 0.0;
int 总_44_in = 0;
int 总_45_in = 0;
int 总_46_in = 100;
int 总_47_in = 0;
int 总_48_in = 0;
int 总_49_in = 0;
int 总_50_in = 0;
int 总_51_in = 0;
int 总_52_in = 0;
bool 总_53_bo = false;
bool 总_54_bo = false;
bool 总_55_bo = true;
double 总_56_do = 0.0;
bool 总_57_bo = false;
bool 总_58_bo = false;
int 总_59_in = 0;
int 总_60_in = 0;
int 总_61_in_si43[43];
int 总_62_in_si6[6];
int 总_63_in_si6[6];
double 总_64_do = 0.0;
bool 总_65_bo = false;
string 总_66_st = “”;

int OnInit()
{
datetime 子_2_da;
//—– —–
bool 临_bo_1;
bool 临_bo_2;

if ( TerminalInfoString(13) == “Russian” )
{
总_57_bo = true ;
}
else
{
总_57_bo = false ;
}
总_19_bo = false ;
if ( !(IsTradeAllowed()) )
{
if ( StringLen(“For work necessary\nTo allow the Expert to trade”) > 0 && 总_20_bo && ( 总_21_bo || 总_66_st != “For work necessary\nTo allow the Expert to trade” ) )
{
总_66_st = “For work necessary\nTo allow the Expert to trade” ;
Print(总_66_st);
}
总_19_bo = true ;
return(0);
}
if ( !(IsTesting()) )
{
if ( IsExpertEnabled() )
{
if ( StringLen(“Expert will be launched next tick”) > 0 && 总_20_bo && ( 总_21_bo || 总_66_st != “Expert will be launched next tick” ) )
{
总_66_st = “Expert will be launched next tick” ;
Print(总_66_st);
}}
else
{
if ( StringLen(“Pressed button \”Allow start expert\””) > 0 && 总_20_bo && ( 总_21_bo || 总_66_st != “Pressed button \”Allow start expert\”” ) )
{
总_66_st = “Pressed button \”Allow start expert\”” ;
Print(总_66_st);
}}}
else
{
Comment(“”);
}
if ( !(TerminalInfoInteger(8)) )
{
Alert(” Check the terminal settings permit automatic trading!”);
}
if ( !(MQLInfoInteger(4)) )
{
Alert(” Automated trading is prohibited in the program properties to “,”Pirate.mq4″,” “,Symbol());
}
if ( !(AccountInfoInteger(34)) )
{
Alert(” Automated trading is prohibited for the account “,AccountInfoInteger(0),” on the trading server side”);
}
if ( !(AccountInfoInteger(33)) )
{
Comment(” Trade banned account “,AccountInfoInteger(0),”.\n Perhaps the connection to the trading account produced by the invest password.”,”\n Check the terminal log, if there is such a record:”,”\n\'”,AccountInfoInteger(0),”\’: trading has been disabled – investor mode.”);
}
if ( Bars < 100 )
{
Print(” bars less than 100″);
return(0);
}
if ( 总_19_bo )
{
if ( StringLen(“Failed to initialize the EA!”) > 0 && 总_20_bo && ( 总_21_bo || 总_66_st != “Failed to initialize the EA!” ) )
{
总_66_st = “Failed to initialize the EA!” ;
Print(总_66_st);
}
return(1);
}
总_47_in = 181818 ;
总_44_in = SymbolInfoInteger(Symbol(),17) ;
总_33_do = SymbolInfoDouble(Symbol(),16) ;
总_34_do = SymbolInfoDouble(Symbol(),35) ;
总_35_do = SymbolInfoDouble(Symbol(),34) ;
总_37_do = SymbolInfoDouble(Symbol(),36) ;
总_40_do = SymbolInfoDouble(Symbol(),26) ;
if ( ( 总_44_in == 2 || 总_44_in == 4 ) )
{
总_33_do = Point() ;
总_46_in = 10 ;
}
if ( ( 总_44_in == 3 || 总_44_in == 5 ) )
{
总_33_do = NormalizeDouble(Point() * 10.0,总_44_in) ;
总_2_in=总_2_in * 10;
}
if ( ( 总_44_in == 3 || 总_44_in == 5 ) && ( StringFind(Symbol(),”XAU”,0) != -1 || Symbol() == “GOLD” || Symbol() == “GLD” ) )
{
总_46_in = 1000 ;
总_33_do = NormalizeDouble(Point() * 10.0,总_44_in) ;
}
if ( ( 总_44_in == 2 || 总_44_in == 4 ) && ( StringFind(Symbol(),”XAU”,0) != -1 || Symbol() == “GOLD” || Symbol() == “GLD” ) )
{
总_46_in = 1000 ;
总_33_do = Point() ;
}
总_56_do = NormalizeDouble(总_33_do * 2.0,总_44_in) ;
总_48_in = 5400 ;
总_49_in = 8700 ;
总_50_in = 10800 ;
总_51_in = 12300 ;
总_52_in = 15000 ;
总_62_in_si6[1] = 3600;
总_62_in_si6[2] = 8400;
总_62_in_si6[3] = 10200;
总_62_in_si6[4] = 12000;
总_62_in_si6[5] = 14400;
总_63_in_si6[1] = 3;
总_63_in_si6[2] = 0;
总_63_in_si6[3] = -3;
总_63_in_si6[4] = -6;
总_63_in_si6[5] = -15;
总_53_bo = true ;
总_54_bo = true ;
Print(“MAGIC_NUMBER = 181818”);
Print(“TERMINAL_PATH = “,TerminalInfoString(2));
Print(“TERMINAL_DATA_PATH = “,TerminalInfoString(3));
Print(“TERMINAL_COMMONDATA_PATH = “,TerminalInfoString(4));
if ( ( !(IsTesting()) || IsVisualMode() ) && !(IsOptimization()) )
{
临_bo_1 = true;
}
else
{
临_bo_1 = false;
}
if ( 临_bo_1 && TimeCurrent() > StringToTime(“2018.04.02 00:00″) )
{
// Alert(” Period of usage has expired!”);
// Comment(“Period of usage has expired!”);
// Print(“Period of usage has expired!”);
// return(0);
}
Comment(“”);
子_2_da = AccountInfoInteger(0) ;
if ( ( !(IsTesting()) || IsVisualMode() ) && !(IsOptimization()) )
{
临_bo_2 = true;
}
else
{
临_bo_2 = false;
}
if ( 临_bo_2 && 子_2_da != D’2001.09.09 10:00:16′ )
{
// Alert(” Trading on the account is ” + string(子_2_da) + ” PROHIBITED “);
// Print(” Trading on the account is ” + string(子_2_da) + ” PROHIBITED “);
// Comment(” Trading on the account is ” + string(子_2_da) + ” PROHIBITED “);
// return(0);
}
Comment(“”);
ObjectDelete(“swa”);
if ( ( !(IsTesting()) || IsVisualMode() ) && DisplayTable )
{
lizong_17();
}
if ( 总_14_bo )
{
PlaySound(“\\Sounds\\GOOD.wav”);
}
OnTick();
return(0);
}
//OnInit <<==——– ——–
void OnTick()
{
string 临_st_1;
bool 临_bo_2;
bool 临_bo_3;
bool 临_bo_4;
string 临_st_5;
int 临_in_6;
int 临_in_7;
int 临_in_8;
int 临_in_9;
int 临_in_10;
uint 临_ui_11;
string 临_st_12;
bool 临_bo_13;
bool 临_bo_14;
string 临_st_15;
int 临_in_16;
int 临_in_17;
int 临_in_18;
int 临_in_19;
int 临_in_20;
uint 临_ui_21;
string 临_st_22;
int 临_in_23;
int 临_in_24;
int 临_in_25;
int 临_in_26;
int 临_in_27;
int 临_in_28;
double 临_do_29;
double 临_do_30;
double 临_do_31;
double 临_do_32;
double 临_do_33;
int 临_in_34;
string 临_st_35;

if ( 总_18_bo )
{
if ( 总_57_bo ) return;
临_st_1 = “Critical error! EA STOPPED!”;
if ( StringLen(“Critical error! EA STOPPED!”) <= 0 || !(总_20_bo) ) return;

if ( ( !(总_21_bo) && 总_66_st == “Critical error! EA STOPPED!” ) ) return;
总_66_st = 临_st_1 ;
Print(总_66_st);
return;
}
总_45_in = SymbolInfoInteger(Symbol(),18) ;
if ( ( !(IsTesting()) || IsVisualMode() ) && !(IsOptimization()) )
{
临_bo_2 = true;
}
else
{
临_bo_2 = false;
}
if ( 临_bo_2 )
{
if ( DisplayTable )
{
lizong_17();
}
lizong_16();
if ( 总_45_in > MaxSpreadOpen && lizong_12() )
{
Print(” The current SPREAD exceeds the allowable value !”);
临_bo_3 = false;
临_bo_4 = false;
临_st_5 = “Arial”;
临_in_6 = 2;
临_in_7 = 8;
临_in_8 = 2;
临_in_9 = 30;
临_in_10 = 5;
临_ui_11 = Yellow;
临_st_12 = “The current SPREAD exceeds the allowable value !”;
if ( ObjectFind(“spr”) < 0 )
{
ObjectCreate(“spr”,OBJ_LABEL,0,0,0.0,0,0.0,0,0.0);
}
ObjectSet(“spr”,OBJPROP_COLOR,临_ui_11);
ObjectSet(“spr”,OBJPROP_XDISTANCE,临_in_10);
ObjectSet(“spr”,OBJPROP_YDISTANCE,临_in_9);
ObjectSet(“spr”,OBJPROP_CORNER,临_in_8);
ObjectSet(“spr”,1011,临_in_6);
ObjectSet(“spr”,OBJPROP_BACK,临_bo_4);
ObjectSet(“spr”,1000,临_bo_3);
ObjectSet(“spr”,17,临_bo_3);
ObjectSetText(“spr”,临_st_12,临_in_7,临_st_5,0xFFFFFFFF);
}
else
{
ObjectDelete(“spr”);
}
if ( lizong_12() )
{
临_bo_13 = false;
临_bo_14 = false;
临_st_15 = “Arial”;
临_in_16 = 2;
临_in_17 = 8;
临_in_18 = 2;
临_in_19 = 45;
临_in_20 = 5;
临_ui_21 = Aqua;
临_st_22 = “Trading is permitted !”;
if ( ObjectFind(“tim”) < 0 )
{
ObjectCreate(“tim”,OBJ_LABEL,0,0,0.0,0,0.0,0,0.0);
}
ObjectSet(“tim”,OBJPROP_COLOR,临_ui_21);
ObjectSet(“tim”,OBJPROP_XDISTANCE,临_in_20);
ObjectSet(“tim”,OBJPROP_YDISTANCE,临_in_19);
ObjectSet(“tim”,OBJPROP_CORNER,临_in_18);
ObjectSet(“tim”,1011,临_in_16);
ObjectSet(“tim”,OBJPROP_BACK,临_bo_14);
ObjectSet(“tim”,1000,临_bo_13);
ObjectSet(“tim”,17,临_bo_13);
ObjectSetText(“tim”,临_st_22,临_in_17,临_st_15,0xFFFFFFFF);
}
else
{
ObjectDelete(“tim”);
ObjectDelete(“Tn”);
ObjectDelete(“Tc”);
}
临_in_23 = 0;
临_in_24 = 0;
for (临_in_25 = 0 ; 临_in_25 < OrdersTotal() ; 临_in_25=临_in_25 + 1)
{
if ( !(OrderSelect(临_in_25,SELECT_BY_POS,MODE_TRADES)) || OrderSymbol() != Symbol() || OrderType() > 1 || OrderMagicNumber() != 总_47_in || OrderType() != 临_in_23 ) continue;
临_in_24=临_in_24 + 1;

}
if ( 临_in_24 == 0 )
{
ObjectDelete(“TpBuy”);
ObjectDelete(“TakeProfit_Buyn”);
}
临_in_26 = 1;
临_in_27 = 0;
for (临_in_28 = 0 ; 临_in_28 < OrdersTotal() ; 临_in_28=临_in_28 + 1)
{
if ( !(OrderSelect(临_in_28,SELECT_BY_POS,MODE_TRADES)) || OrderSymbol() != Symbol() || OrderType() > 1 || OrderMagicNumber() != 总_47_in || OrderType() != 临_in_26 ) continue;
临_in_27=临_in_27 + 1;

}
if ( 临_in_27 == 0 )
{
ObjectDelete(“TpSell”);
ObjectDelete(“TakeProfit_Selln”);
}}
if ( ( IsTesting() || !(IsVisualMode()) ) && 总_45_in > MaxSpreadOpen && lizong_12() )
{
Print(” The current SPREAD exceeds the allowable value !”);
}
if ( 总_4_bo )
{
临_do_29 = 0.0;
临_do_30 = 0.0;
临_do_31 = 0.0;
临_do_32 = NormalizeDouble(总_33_do * (-150.0),总_44_in);
临_do_33 = NormalizeDouble(TakeProfitClose * 总_33_do,总_44_in);
for (临_in_34 = OrdersTotal() – 1 ; 临_in_34 >= 0 ; 临_in_34=临_in_34 – 1)
{
if ( !(OrderSelect(临_in_34,SELECT_BY_POS,MODE_TRADES)) || OrderSymbol() != Symbol() || OrderType() > 1 || OrderMagicNumber() != 总_47_in ) continue;
临_do_29 = NormalizeDouble(OrderClosePrice(),总_44_in);
临_do_30 = NormalizeDouble(OrderOpenPrice(),总_44_in);
if ( OrderType() == 0 )
{
临_do_31 = 临_do_29 – 临_do_30;
}
else
{
临_do_31 = 临_do_30 – 临_do_29;
}
if ( ( ( !(临_do_33>0.0) || !(临_do_31>=临_do_33) ) && (!(临_do_32<0.0) || !(临_do_31<=临_do_32)) ) ) continue;
lizong_9();
临_st_35 = “WatchLevels # Close a position”;
if ( StringLen(“WatchLevels # Close a position”) <= 0 || !(总_20_bo) ) continue;

if ( ( !(总_21_bo) && 总_66_st == “WatchLevels # Close a position” ) ) continue;
总_66_st = 临_st_35 ;
Print(总_66_st);

}
}
if ( 总_5_bo )
{
lizong_13();
}
if ( ( ( IsExpertEnabled() && IsTradeAllowed() ) || IsTesting() ) && 总_45_in <= MaxSpreadOpen && lizong_12() )
{
lizong_6(StopLoss,TakeProfit);
}
if ( 总_6_bo )
{
lizong_14();
}
if ( !(总_1_bo) || lizong_10() != true ) return;
lizong_11();
}
//OnTick <<==——– ——–
void OnDeinit( const int 木_0_in)
{
string 临_st_1;
string 临_st_2;
int 临_in_3;

if ( IsTesting() ) return;
Comment(“”);
ObjectDelete(“Tn”);
ObjectDelete(“Tc”);
ObjectDelete(“spr”);
ObjectDelete(“tim”);
ObjectDelete(“swa”);
ObjectDelete(“bal”);
ObjectDelete(“pr1”);
ObjectDelete(“pr2”);
ObjectDelete(“TpBuy”);
ObjectDelete(“TpSell”);
临_st_1 = “ban”;
for (临_in_3 = ObjectsTotal(-1) – 1 ; 临_in_3 >= 0 ; 临_in_3=临_in_3 – 1)
{
临_st_2 = ObjectName(临_in_3);
if ( StringFind(临_st_2,临_st_1,0) == -1 ) continue;
ObjectDelete(临_st_2);

}
if ( !(总_14_bo) ) return;
PlaySound(“\\Sounds\\CASHREG.wav”);
}
//OnDeinit <<==——– ——–
void lizong_6( int 木_0_in,int 木_1_in)
{
double 子_1_do;
double 子_2_do;
double 子_3_do;
double 子_4_do;
double 子_5_do;
double 子_6_do;
double 子_7_do;
double 子_8_do;
//—– —–
double 临_do_1;
double 临_do_2;
string 临_st_3;
bool 临_bo_4;
string 临_st_5;
bool 临_bo_6;
int 临_in_7;
bool 临_bo_8;
int 临_in_9;
int 临_in_10;
int 临_in_11;
int 临_in_12;
int 临_in_13;
int 临_in_14;
datetime 临_da_15;
bool 临_bo_16;
bool 临_bo_17;
bool 临_bo_18;
int 临_in_19;
int 临_in_20;
uint 临_ui_21;
double 临_do_22;
int 临_in_23;
string 临_st_24;
datetime 临_da_25;
uint 临_ui_26;
double 临_do_27;
int 临_in_28;
int 临_in_29;
int 临_in_30;
int 临_in_31;
int 临_in_32;
int 临_in_33;
datetime 临_da_34;
bool 临_bo_35;
bool 临_bo_36;
bool 临_bo_37;
int 临_in_38;
int 临_in_39;
uint 临_ui_40;
double 临_do_41;
int 临_in_42;
string 临_st_43;
datetime 临_da_44;
uint 临_ui_45;
double 临_do_46;

子_7_do = MarketInfo(Symbol(),14) ;
临_do_1 = MathFloor(AccountFreeMargin() * Risk / 100.0 / (总_46_in * 总_40_do) / 总_37_do) * 总_37_do;
if ( 临_do_1<总_35_do )
{
临_do_1 = 总_35_do;
}
if ( 临_do_1>总_34_do )
{
临_do_1 = 总_34_do;
}
if ( !(MoneyManagement) )
{
临_do_1 = OriginalLot;
if ( OriginalLot<总_35_do )
{
临_do_1 = 总_35_do;
}
if ( 临_do_1>总_34_do )
{
临_do_1 = 总_34_do;
}}
if ( OriginalLot<总_35_do )
{
Print(” Set Minimum lot: ” + string(总_35_do));
}
if ( OriginalLot>总_34_do )
{
Print(” Set Maximum lot: ” + string(总_34_do));
}
临_do_2 = NormalizeDouble(临_do_1 / 总_37_do,0) * 总_37_do;
临_do_2 = MathMax(临_do_2,总_35_do);
临_do_2 = MathMin(临_do_2,总_34_do);
子_8_do = 临_do_2 ;
if ( 总_1_bo && lizong_10() == true )
{
子_8_do = lizong_11() ;
}
子_1_do = iRSI(NULL,15,6,0,0) ;
子_2_do = iRSI(NULL,1,20,0,0) ;
子_3_do = iMA(NULL,15,8,0,MODE_SMA,PRICE_MEDIAN,1) ;
HideTestIndicators(true);
if ( AccountFreeMarginCheck(Symbol(),0,子_8_do)<0.0 )
{
临_st_3 = (lizong_10()) ?”Buy”:”Sell” ;
Print(“”,临_st_3,” “,子_8_do,” “,Symbol(),” ERROR # “,lizong_20(GetLastError()));
临_bo_4 = false;
}
else
{
临_bo_4 = true;
}
if ( !(临_bo_4) ) return;

if ( AccountFreeMarginCheck(Symbol(),1,子_8_do)<0.0 )
{
临_st_5 = (lizong_10()) ?”Buy”:”Sell” ;
Print(“”,临_st_5,” “,子_8_do,” “,Symbol(),” ERROR # “,lizong_20(GetLastError()));
临_bo_6 = false;
}
else
{
临_bo_6 = true;
}
if ( !(临_bo_6) ) return;
临_in_7 = AccountInfoInteger(47);
if ( 临_in_7 == 0 )
{
临_bo_8 = true;
}
else
{
临_bo_8 = OrdersTotal()<临_in_7;
}
if ( !(临_bo_8) ) return;
临_in_9 = 0;
临_in_10 = 0;
for (临_in_11 = 0 ; 临_in_11 < OrdersTotal() ; 临_in_11=临_in_11 + 1)
{
if ( !(OrderSelect(临_in_11,SELECT_BY_POS,MODE_TRADES)) || OrderSymbol() != Symbol() || OrderType() > 1 || OrderMagicNumber() != 总_47_in || OrderType() != 临_in_9 ) continue;
临_in_10=临_in_10 + 1;

}
if ( ( 临_in_10 < CountBuy || CountBuy == -1 ) )
{
总_27_do = SymbolInfoDouble(Symbol(),4) ;
总_26_do = SymbolInfoDouble(Symbol(),1) ;
if ( 总_53_bo && ( 子_1_do<30.0 || 子_2_do<36.0 ) && 子_3_do>=总_27_do + 总_56_do )
{
if ( 木_0_in > 0 && 总_26_do – 木_0_in * 总_33_do<总_26_do – 子_7_do * 总_33_do )
{
子_5_do = 总_26_do – 木_0_in * 总_33_do ;
}
else
{
子_5_do = 总_26_do – 子_7_do * 总_33_do ;
}
if ( 木_0_in <= 0 )
{
子_5_do = 0.0 ;
}
if ( 木_1_in > 0 && 木_1_in * 总_33_do + 总_27_do>子_7_do * 总_33_do + 总_27_do )
{
子_6_do = 木_1_in * 总_33_do + 总_27_do ;
}
else
{
子_6_do = 子_7_do * 总_33_do + 总_27_do ;
}
if ( 木_1_in <= 0 )
{
子_6_do = 0.0 ;
}
if ( !(lizong_18(0,子_5_do,子_6_do)) )
{
Print(” The level of StopLoss or TakeProfit is incorrect !”);
}
lizong_7(0,子_8_do,子_5_do,子_6_do,总_47_in);
if ( CountBuy )
{
临_in_12 = 0;
临_in_13 = 0;
for (临_in_14 = 0 ; 临_in_14 < OrdersTotal() ; 临_in_14=临_in_14 + 1)
{
if ( !(OrderSelect(临_in_14,SELECT_BY_POS,MODE_TRADES)) || OrderSymbol() != Symbol() || OrderType() > 1 || OrderMagicNumber() != 总_47_in || OrderType() != 临_in_12 ) continue;
临_in_13=临_in_13 + 1;

}
if ( 临_in_13 == 1 )
{
子_4_do = NormalizeDouble(TakeProfitClose * 总_33_do + OrderOpenPrice(),总_44_in) ;
临_da_15 = 0;
临_bo_16 = true;
临_bo_17 = false;
临_bo_18 = false;
临_in_19 = 1;
临_in_20 = 2;
临_ui_21 = DeepSkyBlue;
临_do_22 = 子_4_do;
临_in_23 = 0;
临_st_24 = “TpBuy”;
临_da_25 = 0;
if ( !(临_do_22) )
{
临_do_22 = SymbolInfoDouble(Symbol(),1);
}
ResetLastError();
if ( ObjectCreate(临_da_25,临_st_24,1,临_in_23,0,临_do_22) )
{
ObjectSetInteger(临_da_25,临_st_24,OBJPROP_COLOR,临_ui_21);
ObjectSetInteger(临_da_25,临_st_24,OBJPROP_STYLE,临_in_20);
ObjectSetInteger(临_da_25,临_st_24,OBJPROP_WIDTH,临_in_19);
ObjectSetInteger(临_da_25,临_st_24,OBJPROP_BACK,临_bo_18);
ObjectSetInteger(临_da_25,临_st_24,OBJPROP_SELECTABLE,临_bo_17);
ObjectSetInteger(临_da_25,临_st_24,OBJPROP_SELECTED,临_bo_17);
ObjectSetInteger(临_da_25,临_st_24,OBJPROP_HIDDEN,临_bo_16);
ObjectSetInteger(临_da_25,临_st_24,OBJPROP_ZORDER,临_da_15);
}
临_ui_26 = DeepSkyBlue;
临_do_27 = 子_4_do;
WindowFirstVisibleBar();
if ( ObjectFind(StringConcatenate(“TakeProfit_Buy”,”n”)) < 0 )
{
ObjectCreate(StringConcatenate(“TakeProfit_Buy”,”n”),OBJ_TEXT,0,0,0.0,0,0.0,0,0.0);
}
ObjectDelete(StringConcatenate(“TakeProfit_Buy”,”n”));
ObjectCreate(StringConcatenate(“TakeProfit_Buy”,”n”),OBJ_TEXT,0,Time[30],临_do_27,0,0.0,0,0.0);
ObjectSetText(StringConcatenate(“TakeProfit_Buy”,”n”),”TakeProfit_Buy”,8,”Arial”,0xFFFFFFFF);
ObjectSet(StringConcatenate(“TakeProfit_Buy”,”n”),OBJPROP_COLOR,临_ui_26);
}}
总_53_bo = false ;
总_54_bo = true ;
return;
}}
临_in_28 = 1;
临_in_29 = 0;
for (临_in_30 = 0 ; 临_in_30 < OrdersTotal() ; 临_in_30=临_in_30 + 1)
{
if ( !(OrderSelect(临_in_30,SELECT_BY_POS,MODE_TRADES)) || OrderSymbol() != Symbol() || OrderType() > 1 || OrderMagicNumber() != 总_47_in || OrderType() != 临_in_28 ) continue;
临_in_29=临_in_29 + 1;

}
if ( ( 临_in_29 < CountSell || CountSell == -1 ) )
{
总_27_do = SymbolInfoDouble(Symbol(),4) ;
总_26_do = SymbolInfoDouble(Symbol(),1) ;
if ( 总_54_bo && ( 子_1_do>70.0 || 子_2_do>64.0 ) && 子_3_do<=总_26_do – 总_56_do )
{
if ( 木_0_in > 0 && 木_0_in * 总_33_do + 总_27_do>子_7_do * 总_33_do + 总_27_do )
{
子_5_do = 木_0_in * 总_33_do + 总_27_do ;
}
else
{
子_5_do = 子_7_do * 总_33_do + 总_27_do ;
}
if ( 木_0_in <= 0 )
{
子_5_do = 0.0 ;
}
if ( 木_1_in > 0 && 总_26_do – 木_1_in * 总_33_do<总_26_do – 子_7_do * 总_33_do )
{
子_6_do = 总_26_do – 木_1_in * 总_33_do ;
}
else
{
子_6_do = 总_26_do – 子_7_do * 总_33_do ;
}
if ( 木_1_in <= 0 )
{
子_6_do = 0.0 ;
}
if ( !(lizong_18(1,子_5_do,子_6_do)) )
{
Print(” The level of StopLoss or TakeProfit is incorrect !”);
}
lizong_7(1,子_8_do,子_5_do,子_6_do,总_47_in);
if ( CountSell )
{
临_in_31 = 1;
临_in_32 = 0;
for (临_in_33 = 0 ; 临_in_33 < OrdersTotal() ; 临_in_33=临_in_33 + 1)
{
if ( !(OrderSelect(临_in_33,SELECT_BY_POS,MODE_TRADES)) || OrderSymbol() != Symbol() || OrderType() > 1 || OrderMagicNumber() != 总_47_in || OrderType() != 临_in_31 ) continue;
临_in_32=临_in_32 + 1;

}
if ( 临_in_32 == 1 )
{
子_4_do = NormalizeDouble(OrderOpenPrice() – TakeProfitClose * 总_33_do,总_44_in) ;
临_da_34 = 0;
临_bo_35 = true;
临_bo_36 = false;
临_bo_37 = false;
临_in_38 = 1;
临_in_39 = 2;
临_ui_40 = DeepPink;
临_do_41 = 子_4_do;
临_in_42 = 0;
临_st_43 = “TpSell”;
临_da_44 = 0;
if ( !(临_do_41) )
{
临_do_41 = SymbolInfoDouble(Symbol(),1);
}
ResetLastError();
if ( ObjectCreate(临_da_44,临_st_43,1,临_in_42,0,临_do_41) )
{
ObjectSetInteger(临_da_44,临_st_43,OBJPROP_COLOR,临_ui_40);
ObjectSetInteger(临_da_44,临_st_43,OBJPROP_STYLE,临_in_39);
ObjectSetInteger(临_da_44,临_st_43,OBJPROP_WIDTH,临_in_38);
ObjectSetInteger(临_da_44,临_st_43,OBJPROP_BACK,临_bo_37);
ObjectSetInteger(临_da_44,临_st_43,OBJPROP_SELECTABLE,临_bo_36);
ObjectSetInteger(临_da_44,临_st_43,OBJPROP_SELECTED,临_bo_36);
ObjectSetInteger(临_da_44,临_st_43,OBJPROP_HIDDEN,临_bo_35);
ObjectSetInteger(临_da_44,临_st_43,OBJPROP_ZORDER,临_da_34);
}
临_ui_45 = DeepPink;
临_do_46 = 子_4_do;
WindowFirstVisibleBar();
if ( ObjectFind(StringConcatenate(“TakeProfit_Sell”,”n”)) < 0 )
{
ObjectCreate(StringConcatenate(“TakeProfit_Sell”,”n”),OBJ_TEXT,0,0,0.0,0,0.0,0,0.0);
}
ObjectDelete(StringConcatenate(“TakeProfit_Sell”,”n”));
ObjectCreate(StringConcatenate(“TakeProfit_Sell”,”n”),OBJ_TEXT,0,Time[30],临_do_46,0,0.0,0,0.0);
ObjectSetText(StringConcatenate(“TakeProfit_Sell”,”n”),”TakeProfit_Sell”,8,”Arial”,0xFFFFFFFF);
ObjectSet(StringConcatenate(“TakeProfit_Sell”,”n”),OBJPROP_COLOR,临_ui_45);
}}
总_54_bo = false ;
总_53_bo = true ;
return;
}}
if ( !(子_1_do<60.0) || !(子_1_do>40.0) ) return;
总_54_bo = true ;
总_53_bo = true ;
}
//lizong_6 <<==——– ——–
int lizong_7( int 木_0_in,double 木_1_do,double 木_2_do,double 木_3_do,int 木_4_in)
{
string 子_2_st;
uint 子_3_ui;
string 子_4_st;
int 子_5_in;
double 子_6_do;
double 子_7_do;
double 子_8_do;
int 子_9_in;
int 子_10_in;
//—– —–
double 临_do_1;
string 临_st_2;
bool 临_bo_3;
bool 临_bo_4;
int 临_in_5;
int 临_in_6;
bool 临_bo_7;
int 临_in_8;
bool 临_bo_9;
bool 临_bo_10;
bool 临_bo_11;

临_do_1 = 木_1_do;
if ( AccountFreeMarginCheck(Symbol(),木_0_in,木_1_do)<0.0 )
{
临_st_2 = (木_0_in == 0) ?”Buy”:”Sell” ;
Print(“”,临_st_2,” “,临_do_1,” “,Symbol(),” ERROR # “,lizong_20(GetLastError()));
临_bo_3 = false;
}
else
{
临_bo_3 = true;
}
if ( !(临_bo_3) )
{
return(0);
}
子_2_st = “Incorrect value of the volume” ;
if ( 木_1_do<SymbolInfoDouble(Symbol(),34) )
{
子_2_st = StringFormat(“The volume is less than the minimum SYMBOL_VOLUME_MIN=%.2f”,SymbolInfoDouble(Symbol(),34)) ;
临_bo_4 = false;
}
else
{
if ( 木_1_do>SymbolInfoDouble(Symbol(),35) )
{
子_2_st = StringFormat(“The volume is greater than the maximum SYMBOL_VOLUME_MAX=%.2f”,SymbolInfoDouble(Symbol(),35)) ;
临_bo_4 = false;
}
else
{
if ( MathAbs(int(MathRound(木_1_do / SymbolInfoDouble(Symbol(),36))) * SymbolInfoDouble(Symbol(),36) – 木_1_do)>0.0000001 )
{
子_2_st = StringFormat(“The volume is not a multiple of the minimum gradation SYMBOL_VOLUME_STEP=%.2f,\n nthe closest to the correct amount %.2f”,SymbolInfoDouble(Symbol(),36),int(MathRound(木_1_do / SymbolInfoDouble(Symbol(),36))) * SymbolInfoDouble(Symbol(),36)) ;
临_bo_4 = false;
}
else
{
子_2_st = “The correct value of the volume” ;
临_bo_4 = true;
}}}
if ( !(临_bo_4) )
{
return(0);
}
子_3_ui = 0 ;
子_5_in = 0 ;
子_6_do = 0.0 ;
子_7_do = 0.0 ;
子_8_do = 0.0 ;
for (子_9_in = 1 ; 子_9_in <= 3 ; 子_9_in = 子_9_in + 1)
{
if ( !(IsTesting()) && ( !(IsExpertEnabled()) || IsStopped() ) )
{
Print(“OpenPosition”,” # Stopping the function”);
break;
}
while (!(IsTradeAllowed()))
{
Sleep(5000);
}
RefreshRates();
子_7_do = SymbolInfoDouble(Symbol(),4) ;
子_8_do = SymbolInfoDouble(Symbol(),1) ;
if ( 木_0_in == 0 )
{
子_6_do = 子_7_do ;
子_3_ui = DarkBlue ;
子_4_st = string(总_47_in) ;
}
else
{
子_6_do = 子_8_do ;
子_3_ui = Maroon ;
子_4_st = string(总_47_in) ;
}
if ( 总_3_bo )
{
子_5_in = OrderSend(Symbol(),木_0_in,木_1_do,NormalizeDouble(子_6_do,总_44_in),总_2_in,0.0,0.0,子_4_st,木_4_in,0,子_3_ui) ;
}
else
{
子_5_in = OrderSend(Symbol(),木_0_in,木_1_do,NormalizeDouble(子_6_do,总_44_in),总_2_in,木_2_do,木_3_do,子_4_st,木_4_in,0,子_3_ui) ;
}
if ( 子_5_in > 0 )
{
if ( !(总_14_bo) ) break;
PlaySound(“\\Sounds\\Monkey.wav”);
break;
}
if ( 子_5_in == -1 )
{
Print(” ERROR: in OpenPosition()”);
Print(” ERROR: # could not open order”);
if ( GetLastError() != 0 )
{
Print(” ERROR: code= ” + string(GetLastError()) + ” – ” + lizong_20(GetLastError()));
}}
子_10_in = lizong_19() ;
if ( 子_10_in == 1 )
{
Sleep(5000);
RefreshRates();
}
ResetLastError();
ResetLastError();
子_10_in = 0 ;
if ( 子_7_do==0.0 && 子_8_do==0.0 && StringLen(” Check the market Watch for a symbol ” + Symbol()) > 0 && 总_20_bo && ( 总_21_bo || 总_66_st != ” Check the market Watch for a symbol ” + Symbol() ) )
{
总_66_st = ” Check the market Watch for a symbol ” + Symbol() ;
Print(总_66_st);
}
Print(“OpenPosition”,” # ERROR # “,lizong_20(子_10_in),”, ATTEMPT “,子_9_in);
Print(“OpenPosition”,” # Ask=”,子_7_do,” Bid=”,子_8_do,” sy=”,Symbol(),” ll=”,木_1_do,” op=”,lizong_15(木_0_in),” pp=”,子_6_do,” sl=”,木_2_do,” tp=”,木_3_do,” mn=”,木_4_in);
if ( ( 子_10_in == 2 || 子_10_in == 64 || 子_10_in == 65 || 子_10_in == 133 ) )
{
总_18_bo = true ;
break;
}
if ( ( 子_10_in == 4 || 子_10_in == 131 || 子_10_in == 132 ) )
{
Sleep(300000);
break;
}
if ( ( 子_10_in == 128 || 子_10_in == 142 || 子_10_in == 143 ) )
{
Sleep(66666);
临_in_5 = -1;
int w1=9;while(w1>8){w1=0;
for (临_in_6 = 0 ; 临_in_6 < OrdersTotal() ; 临_in_6=临_in_6 + 1)
{
if ( !(OrderSelect(临_in_6,SELECT_BY_POS,MODE_TRADES)) || OrderSymbol() != Symbol() || OrderType() > 1 || OrderMagicNumber() != 总_47_in || OrderType() != 临_in_5 ) continue;
临_bo_7 = true;
w1=1; break;

}
if(w1==0)
临_bo_7 = false;
}
if ( 临_bo_7 )
{
if ( !(总_14_bo) ) break;
PlaySound(“timeout.wav”);
break;
}}
if ( 子_10_in == 140 || 子_10_in == 148 || 子_10_in == 4110 || 子_10_in == 4111 ) break;
if ( 子_10_in == 141 )
{
Sleep(100000);
}
if ( 子_10_in == 145 )
{
Sleep(17000);
}
if(子_10_in == 146 && IsTradeContextBusy()){
do
{
Sleep(11000);
}
while(IsTradeContextBusy());
}
if ( 子_10_in == 135 ) continue;
Sleep(7700);

}

for(;;){
if ( 总_3_bo && 子_5_in > 0 && ( 木_2_do>0.0 || 木_3_do>0.0 ) && OrderSelect(子_5_in,SELECT_BY_TICKET,MODE_TRADES) )
{
if ( OrderSelect(子_5_in,SELECT_BY_TICKET,MODE_TRADES) )
{
临_in_8 = OrderType();
if ( !((临_in_8==0 || 临_in_8==1)) )
{
临_bo_9 = MathAbs(OrderOpenPrice() – 木_0_in)>SymbolInfoDouble(OrderSymbol(),16);
}
if ( ( 临_bo_9 || MathAbs(OrderStopLoss() – 木_2_do)>SymbolInfoDouble(OrderSymbol(),16) || MathAbs(OrderTakeProfit() – 木_2_do)>木_3_do ) )
{
break;
}
PrintFormat(“Ордер #%d уже имеет уровни Open=%.5f SL=%.5f TP=%.5f”,子_5_in,OrderOpenPrice(),OrderStopLoss(),OrderTakeProfit());
}
临_bo_11 = false;
break;}
if ( 临_bo_11 )
{
lizong_8(-1.0,木_2_do,木_3_do,Red);
if ( StringLen(“OpenPosition # Modify the position by setting SL and TP”) > 0 && 总_20_bo && ( 总_21_bo || 总_66_st != “OpenPosition # Modify the position by setting SL and TP” ) )
{
总_66_st = “OpenPosition # Modify the position by setting SL and TP” ;
Print(总_66_st);
}}}
return(子_5_in);
}
//lizong_7 <<==——– ——–
void lizong_8( double 木_0_do,double 木_1_do,double 木_2_do,uint 木_3_ui)
{
double 子_1_do;
double 子_2_do;
double 子_3_do;
int 子_4_in;
bool 子_5_bo;
int 子_6_in;
//—– —–

if ( 木_0_do<=0.0 )
{
木_0_do = OrderOpenPrice() ;
}
if ( 木_1_do<0.0 )
{
木_1_do = OrderStopLoss() ;
}
if ( 木_2_do<0.0 )
{
木_2_do = OrderTakeProfit() ;
}
木_0_do = NormalizeDouble(木_0_do,总_44_in) ;
木_1_do = NormalizeDouble(木_1_do,总_44_in) ;
木_2_do = NormalizeDouble(木_2_do,总_44_in) ;
子_1_do = NormalizeDouble(OrderOpenPrice(),总_44_in) ;
子_2_do = NormalizeDouble(OrderStopLoss(),总_44_in) ;
子_3_do = NormalizeDouble(OrderTakeProfit(),总_44_in) ;
if ( ( !(木_0_do!=子_1_do) && !(木_1_do!=子_2_do) && !(木_2_do!=子_3_do) ) ) return;
for (子_4_in = 1 ; 子_4_in <= 3 ; 子_4_in = 子_4_in + 1)
{
if ( ( !(IsTesting()) && (!(IsExpertEnabled()) || IsStopped()) ) ) return;

while (!(IsTradeAllowed()))
{
Sleep(5000);
}
RefreshRates();
子_5_bo = OrderModify(OrderTicket(),木_0_do,木_1_do,木_2_do,0,木_3_ui) ;
ResetLastError();
ResetLastError();
子_6_in = 0 ;
if ( !(子_5_bo) )
{
Print(” ERROR: in ModifyOrder()”);
Print(” ERROR: # failed to modify order”);
ResetLastError();
}
if ( 子_6_in == 130 )
{
Print(“ModifyOrder”,” # SL or TP is very small, check the incoming parameters. !”);
return;
}
if ( 子_5_bo )
{
if ( !(总_14_bo) ) return;
PlaySound(“expert.wav”);
return;
}
Print(“ModifyOrder”,” # ERROR # “,lizong_20(子_6_in),”, ATTEMPT “,子_4_in);
if ( 总_14_bo )
{
PlaySound(“timeout.wav”);
}
Sleep(1000);
}
}
//lizong_8 <<==——– ——–
void lizong_9()
{
uint 子_1_ui;
double 子_2_do;
double 子_3_do;
double 子_4_do;
double 子_5_do;
int 子_6_in;
bool 子_7_bo;
int 子_8_in;
//—– —–

if ( OrderType() <= 1 )
{
for (子_6_in = 1 ; 子_6_in <= 3 ; 子_6_in = 子_6_in + 1)
{
if ( ( !(IsTesting()) && (!(IsExpertEnabled()) || IsStopped()) ) ) return;

while (!(IsTradeAllowed()))
{
Sleep(5000);
}
RefreshRates();
子_2_do = SymbolInfoDouble(Symbol(),4) ;
子_3_do = SymbolInfoDouble(Symbol(),1) ;
if ( OrderType() == 0 )
{
子_4_do = 子_3_do ;
子_1_ui = Gold ;
}
else
{
子_4_do = 子_2_do ;
子_1_ui = Gold ;
}
子_5_do = OrderLots() ;
子_7_bo = OrderClose(OrderTicket(),子_5_do,子_4_do,总_2_in,子_1_ui) ;
子_8_in = lizong_19() ;
if ( 子_8_in > 1 )
{
Print(“ClosePosBySelect”,” # Requires manual closing of the order №”,OrderTicket());
return;
}
if ( 子_7_bo )
{
if ( !(总_14_bo) ) return;
PlaySound(“\\Sounds\\close.wav”);
return;
}
ResetLastError();
ResetLastError();
子_8_in = 0 ;
if(1==0) //条件不成立
{
do
{
Sleep(11000);
}
while(IsTradeContextBusy());

}
Print(“ClosePosBySelect”,” # ERROR # “,lizong_15(OrderType()),” “,lizong_20(子_8_in),”, ATTEMPT “,子_6_in);
Print(“ClosePosBySelect”,” #”,OrderTicket(),” Ask=”,子_2_do,” Bid=”,子_3_do,” pp=”,子_4_do);
Print(“ClosePosBySelect”,” # sy=”,OrderSymbol(),” ll=”,子_5_do,” sl=”,OrderStopLoss(),” tp=”,OrderTakeProfit(),” mn=”,OrderMagicNumber());
Sleep(5000);
}
return;
}
Print(“ClosePosBySelect”,” # Incorrect trading operation”,lizong_15(OrderType()));
}
//lizong_9 <<==——– ——–
bool lizong_10()
{
double 子_2_do;
double 子_3_do;
//—– —–
double 临_do_1;
double 临_do_2;

总_65_bo = false ;
子_2_do = 0.0 ;
临_do_1 = MathFloor(AccountFreeMargin() * Risk / 100.0 / (总_46_in * 总_40_do) / 总_37_do) * 总_37_do;
if ( 临_do_1<总_35_do )
{
临_do_1 = 总_35_do;
}
if ( 临_do_1>总_34_do )
{
临_do_1 = 总_34_do;
}
if ( !(MoneyManagement) )
{
临_do_1 = OriginalLot;
if ( OriginalLot<总_35_do )
{
临_do_1 = 总_35_do;
}
if ( 临_do_1>总_34_do )
{
临_do_1 = 总_34_do;
}}
if ( OriginalLot<总_35_do )
{
Print(” Set Minimum lot: ” + string(总_35_do));
}
if ( OriginalLot>总_34_do )
{
Print(” Set Maximum lot: ” + string(总_34_do));
}
临_do_2 = NormalizeDouble(临_do_1 / 总_37_do,0) * 总_37_do;
临_do_2 = MathMax(临_do_2,总_35_do);
临_do_2 = MathMin(临_do_2,总_34_do);
子_3_do = 临_do_2 ;
if ( AccountEquity()>总_64_do )
{
总_64_do = AccountEquity() ;
}
子_2_do = NormalizeDouble((总_64_do – AccountEquity()) / 总_64_do,2) ;
if ( 子_2_do>=总_23_do )
{
子_3_do = NormalizeDouble(子_3_do * 总_25_do,2) ;
总_65_bo = true ;
}
else
{
if ( 总_65_bo == true && 子_2_do>=总_24_do )
{
子_3_do = NormalizeDouble(子_3_do * 总_25_do,2) ;
}
else
{
总_65_bo = false ;
}}
return(总_65_bo);
}
//lizong_10 <<==——– ——–
double lizong_11()
{
double 子_2_do;
double 子_3_do;
//—– —–
double 临_do_1;
double 临_do_2;
double 临_do_3;

临_do_1 = MathFloor(AccountFreeMargin() * Risk / 100.0 / (总_46_in * 总_40_do) / 总_37_do) * 总_37_do;
if ( 临_do_1<总_35_do )
{
临_do_1 = 总_35_do;
}
if ( 临_do_1>总_34_do )
{
临_do_1 = 总_34_do;
}
if ( !(MoneyManagement) )
{
临_do_1 = OriginalLot;
if ( OriginalLot<总_35_do )
{
临_do_1 = 总_35_do;
}
if ( 临_do_1>总_34_do )
{
临_do_1 = 总_34_do;
}}
if ( OriginalLot<总_35_do )
{
Print(” Set Minimum lot: ” + string(总_35_do));
}
if ( OriginalLot>总_34_do )
{
Print(” Set Maximum lot: ” + string(总_34_do));
}
临_do_2 = NormalizeDouble(临_do_1 / 总_37_do,0) * 总_37_do;
临_do_2 = MathMax(临_do_2,总_35_do);
临_do_2 = MathMin(临_do_2,总_34_do);
子_3_do = 临_do_2 ;
if ( AccountEquity()>总_64_do )
{
总_64_do = AccountEquity() ;
}
子_2_do = NormalizeDouble((总_64_do – AccountEquity()) / 总_64_do,2) ;
if ( 子_2_do>=总_23_do )
{
子_3_do = NormalizeDouble(子_3_do * 总_25_do,2) ;
总_65_bo = true ;
}
else
{
if ( 总_65_bo == true && 子_2_do>=总_24_do )
{
子_3_do = NormalizeDouble(子_3_do * 总_25_do,2) ;
}
else
{
总_65_bo = false ;
}}
临_do_3 = NormalizeDouble(子_3_do / 总_37_do,0) * 总_37_do;
临_do_3 = MathMax(临_do_3,总_35_do);
临_do_3 = MathMin(临_do_3,总_34_do);
return(临_do_3);
}
//lizong_11 <<==——– ——–
bool lizong_12()
{
if ( ( ( DayOfWeek() == 5 && Hour() >= StopHour ) || DayOfWeek() == 0 || DayOfWeek() == 6 ) )
{
return(false);
}
if ( DayOfWeek() == 1 && Hour() < StartHour )
{
return(false);
}
if ( StartHour < StopHour && ( Hour() < StartHour || Hour() >= StopHour ) )
{
return(false);
}
if ( StartHour > StopHour && Hour() < StartHour && Hour() >= StopHour )
{
return(false);
}
if ( Hour() == StopHour – 1 && Minute() >= 59 )
{
return(false);
}
return(true);
}
//lizong_12 <<==——– ——–
void lizong_13()
{
int 子_1_in;
int 子_2_in;
datetime 子_3_da;
double 子_4_do;
double 子_5_do;
double 子_6_do;
//—– —–
datetime 临_da_1;
string 临_st_2;

子_4_do = 0.0 ;
子_5_do = 0.0 ;
子_6_do = 0.0 ;
for (子_1_in = OrdersTotal() – 1 ; 子_1_in >= 0 ; 子_1_in = 子_1_in – 1)
{
if ( !(OrderSelect(子_1_in,SELECT_BY_POS,MODE_TRADES)) || OrderSymbol() != Symbol() || OrderType() > 1 || OrderMagicNumber() != 总_47_in ) continue;
子_3_da = TimeCurrent() – OrderOpenTime();
临_da_1 = 总_48_in;
if ( 子_3_da <= 临_da_1 ) continue;
子_4_do = NormalizeDouble(OrderClosePrice(),总_44_in) ;
子_5_do = NormalizeDouble(OrderOpenPrice(),总_44_in) ;
if ( OrderType() == 0 )
{
子_6_do = 子_4_do – 子_5_do ;
}
else
{
子_6_do = 子_5_do – 子_4_do ;
}
临_da_1 = 总_49_in;
if ( 子_3_da < 临_da_1 && 子_6_do>=总_28_do )
{
子_2_in = 1 ;
}
else
{
if ( 子_3_da > 总_49_in && 子_3_da < 总_50_in && 子_6_do>=总_29_do )
{
子_2_in = 2 ;
}
else
{
if ( 子_3_da > 总_50_in && 子_3_da < 总_51_in && 子_6_do>=总_30_do )
{
子_2_in = 3 ;
}
else
{
if ( 子_3_da > 总_51_in && 子_3_da < 总_52_in && 子_6_do>=总_31_do )
{
子_2_in = 4 ;
}
else
{
if ( 子_3_da > 总_52_in && 子_6_do>=总_32_do )
{
子_2_in = 5 ;
}}}}}
if ( 子_2_in == 0 ) continue;
lizong_9();
临_st_2 = “NoiseFilter # Close a position”;
if ( StringLen(“NoiseFilter # Close a position”) <= 0 || !(总_20_bo) ) continue;

if ( ( !(总_21_bo) && 总_66_st == “NoiseFilter # Close a position” ) ) continue;
总_66_st = 临_st_2 ;
Print(总_66_st);

}
}
//lizong_13 <<==——– ——–
void lizong_14()
{
datetime 子_1_da;
datetime 子_2_da;
double 子_3_do;
int 子_4_in;
//—– —–
datetime 临_da_1;
string 临_st_2;

子_2_da = 0 ;
子_3_do = 0.0 ;
for (子_4_in = 0 ; 子_4_in < OrdersTotal() ; 子_4_in = 子_4_in + 1)
{
if ( !(OrderSelect(子_4_in,SELECT_BY_POS,MODE_TRADES)) || OrderSymbol() != Symbol() || OrderMagicNumber() != 总_47_in ) continue;
子_1_da = TimeCurrent() ;
子_2_da = OrderOpenTime() ;
子_3_do = OrderOpenPrice() ;
if ( OrderType() == 0 )
{
RefreshRates();
总_26_do = SymbolInfoDouble(Symbol(),1) ;
if ( 子_1_da – 子_2_da > 总_62_in_si6[1] && 子_1_da – 子_2_da <= 总_62_in_si6[2] && 总_26_do>总_63_in_si6[1] * 总_33_do + 子_3_do )
{
lizong_9();
if ( StringLen(“CloseTime # Closing a position by idle time”) > 0 && 总_20_bo && ( 总_21_bo || 总_66_st != “CloseTime # Closing a position by idle time” ) )
{
总_66_st = “CloseTime # Closing a position by idle time” ;
Print(总_66_st);
}}
if ( 子_1_da – 子_2_da > 总_62_in_si6[2] && 子_1_da – 子_2_da <= 总_62_in_si6[3] && 总_26_do>总_63_in_si6[2] * 总_33_do + 子_3_do )
{
lizong_9();
if ( StringLen(“CloseTime # Closing a position by idle time”) > 0 && 总_20_bo && ( 总_21_bo || 总_66_st != “CloseTime # Closing a position by idle time” ) )
{
总_66_st = “CloseTime # Closing a position by idle time” ;
Print(总_66_st);
}}
if ( 子_1_da – 子_2_da > 总_62_in_si6[3] && 子_1_da – 子_2_da <= 总_62_in_si6[4] && 总_26_do>总_63_in_si6[3] * 总_33_do + 子_3_do )
{
lizong_9();
if ( StringLen(“CloseTime # Closing a position by idle time”) > 0 && 总_20_bo && ( 总_21_bo || 总_66_st != “CloseTime # Closing a position by idle time” ) )
{
总_66_st = “CloseTime # Closing a position by idle time” ;
Print(总_66_st);
}}
if ( 子_1_da – 子_2_da > 总_62_in_si6[4] && 子_1_da – 子_2_da <= 总_62_in_si6[5] && 总_26_do>总_63_in_si6[4] * 总_33_do + 子_3_do )
{
lizong_9();
if ( StringLen(“CloseTime # Closing a position by idle time”) > 0 && 总_20_bo && ( 总_21_bo || 总_66_st != “CloseTime # Closing a position by idle time” ) )
{
总_66_st = “CloseTime # Closing a position by idle time” ;
Print(总_66_st);
}}
if ( 子_1_da – 子_2_da > 总_62_in_si6[5] && 总_26_do>总_63_in_si6[5] * 总_33_do + 子_3_do )
{
lizong_9();
if ( StringLen(“CloseTime # Closing a position by idle time”) > 0 && 总_20_bo && ( 总_21_bo || 总_66_st != “CloseTime # Closing a position by idle time” ) )
{
总_66_st = “CloseTime # Closing a position by idle time” ;
Print(总_66_st);
}}}
if ( OrderType() != 1 ) continue;
RefreshRates();
总_27_do = SymbolInfoDouble(Symbol(),4) ;
if ( 子_1_da – 子_2_da > 总_62_in_si6[1] && 子_1_da – 子_2_da <= 总_62_in_si6[2] && 总_27_do<子_3_do – 总_63_in_si6[1] * 总_33_do )
{
lizong_9();
if ( StringLen(“CloseTime # Closing a position by idle time”) > 0 && 总_20_bo && ( 总_21_bo || 总_66_st != “CloseTime # Closing a position by idle time” ) )
{
总_66_st = “CloseTime # Closing a position by idle time” ;
Print(总_66_st);
}}
if ( 子_1_da – 子_2_da > 总_62_in_si6[2] && 子_1_da – 子_2_da <= 总_62_in_si6[3] && 总_27_do<子_3_do – 总_63_in_si6[2] * 总_33_do )
{
lizong_9();
if ( StringLen(“CloseTime # Closing a position by idle time”) > 0 && 总_20_bo && ( 总_21_bo || 总_66_st != “CloseTime # Closing a position by idle time” ) )
{
总_66_st = “CloseTime # Closing a position by idle time” ;
Print(总_66_st);
}}
if ( 子_1_da – 子_2_da > 总_62_in_si6[3] && 子_1_da – 子_2_da <= 总_62_in_si6[4] && 总_27_do<子_3_do – 总_63_in_si6[3] * 总_33_do )
{
lizong_9();
if ( StringLen(“CloseTime # Closing a position by idle time”) > 0 && 总_20_bo && ( 总_21_bo || 总_66_st != “CloseTime # Closing a position by idle time” ) )
{
总_66_st = “CloseTime # Closing a position by idle time” ;
Print(总_66_st);
}}
if ( 子_1_da – 子_2_da > 总_62_in_si6[4] && 子_1_da – 子_2_da <= 总_62_in_si6[5] && 总_27_do<子_3_do – 总_63_in_si6[4] * 总_33_do )
{
lizong_9();
if ( StringLen(“CloseTime # Closing a position by idle time”) > 0 && 总_20_bo && ( 总_21_bo || 总_66_st != “CloseTime # Closing a position by idle time” ) )
{
总_66_st = “CloseTime # Closing a position by idle time” ;
Print(总_66_st);
}}
临_da_1 = 总_62_in_si6[5];
if ( 子_1_da – 子_2_da <= 临_da_1 || !(总_27_do<子_3_do – 总_63_in_si6[5] * 总_33_do) ) continue;
lizong_9();
临_st_2 = “CloseTime # Closing a position by idle time”;
if ( StringLen(“CloseTime # Closing a position by idle time”) <= 0 || !(总_20_bo) ) continue;

if ( ( !(总_21_bo) && 总_66_st == “CloseTime # Closing a position by idle time” ) ) continue;
总_66_st = 临_st_2 ;
Print(总_66_st);

}
}
//lizong_14 <<==——– ——–
string lizong_15( int 木_0_in)
{
string 临_st_1;

switch(木_0_in)
{
case 0 :
临_st_1 = “Buy”;
return(临_st_1);
case 1 :
临_st_1 = “Sell”;
return(临_st_1);
case 2 :
临_st_1 = “Buy Limit”;
return(临_st_1);
case 3 :
临_st_1 = “Sell Limit”;
return(临_st_1);
case 4 :
临_st_1 = “Buy Stop”;
return(临_st_1);
case 5 :
临_st_1 = “Sell Stop”;
return(临_st_1);
}
临_st_1 = “Unknown Operation”;
return(临_st_1);
}
//lizong_15 <<==——– ——–
void lizong_16()
{
datetime 子_1_da;
double 子_2_do;
//—– —–
datetime 临_da_1;
double 临_do_2;
int 临_in_3;
bool 临_bo_4;
bool 临_bo_5;
string 临_st_6;
int 临_in_7;
int 临_in_8;
int 临_in_9;
int 临_in_10;
int 临_in_11;
uint 临_ui_12;
string 临_st_13;
bool 临_bo_14;
bool 临_bo_15;
string 临_st_16;
int 临_in_17;
int 临_in_18;
int 临_in_19;
int 临_in_20;
int 临_in_21;
double 临_do_22;
uint 临_ui_23;
uint 临_ui_24;
uint 临_ui_25;
uint 临_ui_26;
string 临_st_27;

子_1_da = StringToTime(TimeToString(TimeCurrent(),TIME_DATE)) ;
临_da_1 = 子_1_da;
临_do_2 = 0.0;
for (临_in_3 = 0 ; 临_in_3 < OrdersHistoryTotal() ; 临_in_3=临_in_3 + 1)
{
if ( !(OrderSelect(临_in_3,SELECT_BY_POS,MODE_HISTORY)) || OrderSymbol() != Symbol() || OrderType() > 1 || OrderMagicNumber() != 总_47_in || 临_da_1 >= OrderCloseTime() ) continue;
临_do_2 = OrderProfit() + OrderCommission() + OrderSwap() + 临_do_2;

}
子_2_do = 临_do_2 ;
for ( ; (TimeDayOfWeek(子_1_da) < 1 || TimeDayOfWeek(子_1_da) > 5) ; 子_1_da = 子_1_da – 86400)
{
}
临_bo_4 = false;
临_bo_5 = false;
临_st_6 = “Arial”;
临_in_7 = 2;
临_in_8 = 10;
临_in_9 = 2;
临_in_10 = 5;
临_in_11 = 10;
临_ui_12 = Silver;
临_st_13 = “Profit for today”;
if ( ObjectFind(“pr1”) < 0 )
{
ObjectCreate(“pr1”,OBJ_LABEL,0,0,0.0,0,0.0,0,0.0);
}
ObjectSet(“pr1”,OBJPROP_COLOR,临_ui_12);
ObjectSet(“pr1”,OBJPROP_XDISTANCE,临_in_11);
ObjectSet(“pr1”,OBJPROP_YDISTANCE,临_in_10);
ObjectSet(“pr1”,OBJPROP_CORNER,临_in_9);
ObjectSet(“pr1”,1011,临_in_7);
ObjectSet(“pr1”,OBJPROP_BACK,临_bo_5);
ObjectSet(“pr1”,1000,临_bo_4);
ObjectSet(“pr1”,17,临_bo_4);
ObjectSetText(“pr1”,临_st_13,临_in_8,临_st_6,0xFFFFFFFF);
临_bo_14 = false;
临_bo_15 = false;
临_st_16 = “Arial”;
临_in_17 = 2;
临_in_18 = 9;
临_in_19 = 2;
临_in_20 = 5;
临_in_21 = 160;
临_do_22 = 子_2_do;
临_ui_23 = 0xFFFFFFFF;
临_ui_24 = 0xFFFFFFFF;
临_ui_25 = 0xFFFFFFFF;

临_ui_23 = White;
临_ui_24 = Aqua;
临_ui_25 = Wheat;

if ( 临_do_22>0.0 )
{
临_ui_23 = 临_ui_24;
}
if ( 临_do_22<0.0 )
{
临_ui_23 = 临_ui_25;
}
临_ui_26 = 临_ui_23;
临_st_27 = DoubleToString(子_2_do,2);
if ( ObjectFind(“pr2”) < 0 )
{
ObjectCreate(“pr2”,OBJ_LABEL,0,0,0.0,0,0.0,0,0.0);
}
ObjectSet(“pr2”,OBJPROP_COLOR,临_ui_26);
ObjectSet(“pr2”,OBJPROP_XDISTANCE,临_in_21);
ObjectSet(“pr2”,OBJPROP_YDISTANCE,临_in_20);
ObjectSet(“pr2”,OBJPROP_CORNER,临_in_19);
ObjectSet(“pr2”,1011,临_in_17);
ObjectSet(“pr2”,OBJPROP_BACK,临_bo_15);
ObjectSet(“pr2”,1000,临_bo_14);
ObjectSet(“pr2”,17,临_bo_14);
ObjectSetText(“pr2″,临_st_27,临_in_18,临_st_16,0xFFFFFFFF);
}
//lizong_16 <<==——– ——–
void lizong_17()
{
double 子_1_do;
string 子_2_st;
string 子_3_st;
int 子_4_in;
//—– —–
double 临_do_1;
double 临_do_2;
int 临_in_3;
int 临_in_4;
bool 临_bo_5;
bool 临_bo_6;
string 临_st_7;
int 临_in_8;
int 临_in_9;
int 临_in_10;
int 临_in_11;
int 临_in_12;
uint 临_ui_13;
string 临_st_14;
bool 临_bo_15;
bool 临_bo_16;
string 临_st_17;
int 临_in_18;
int 临_in_19;
int 临_in_20;
int 临_in_21;
int 临_in_22;
uint 临_ui_23;
string 临_st_24;
bool 临_bo_25;
bool 临_bo_26;
string 临_st_27;
int 临_in_28;
int 临_in_29;
int 临_in_30;
int 临_in_31;
int 临_in_32;
uint 临_ui_33;
string 临_st_34;

if ( !(MoneyManagement) )
{
子_1_do = OriginalLot ;
}
else
{
临_do_1 = MathFloor(AccountFreeMargin() * Risk / 100.0 / (总_46_in * 总_40_do) / 总_37_do) * 总_37_do;
if ( 临_do_1<总_35_do )
{
临_do_1 = 总_35_do;
}
if ( 临_do_1>总_34_do )
{
临_do_1 = 总_34_do;
}
if ( !(MoneyManagement) )
{
临_do_1 = OriginalLot;
if ( OriginalLot<总_35_do )
{
临_do_1 = 总_35_do;
}
if ( 临_do_1>总_34_do )
{
临_do_1 = 总_34_do;
}}
if ( OriginalLot<总_35_do )
{
Print(” Set Minimum lot: ” + string(总_35_do));
}
if ( OriginalLot>总_34_do )
{
Print(” Set Maximum lot: ” + string(总_34_do));
}
临_do_2 = NormalizeDouble(临_do_1 / 总_37_do,0) * 总_37_do;
临_do_2 = MathMax(临_do_2,总_35_do);
临_do_2 = MathMin(临_do_2,总_34_do);
子_1_do = 临_do_2 ;
}
if ( 总_1_bo && lizong_10() == true )
{
子_1_do = lizong_11() ;
}
总_42_do = NormalizeDouble(SymbolInfoDouble(Symbol(),38),2) ;
总_43_do = NormalizeDouble(SymbolInfoDouble(Symbol(),39),2) ;
总_27_do = SymbolInfoDouble(Symbol(),4) ;
总_26_do = SymbolInfoDouble(Symbol(),1) ;
总_45_in = SymbolInfoInteger(Symbol(),18) ;
if ( 总_15_bo == 0 )
{
总_59_in = 总_16_in ;
总_60_in = TimeCurrent() – 总_16_in * 3600 ;
}
else
{
临_in_3 = -420;
临_in_4 = int(TimeToString(TimeGMTOffset(),总_61_in_si43[0]));
if ( 临_in_4 != 0 )
{
临_in_3 = 总_61_in_si43[0];
}
if ( 临_in_4 == 2 )
{
临_in_3=临_in_3 + 总_61_in_si43[42];
}
总_60_in = TimeLocal() + 临_in_3 * 60 ;
总_59_in = (TimeCurrent() – 总_60_in) / 3500 ;
}
子_4_in = (TimeLocal() – 总_60_in) / 3500 ;
if ( 子_4_in > 0 )
{
子_2_st = “\n :: PC : +” + string(子_4_in);
}
else
{
子_2_st = “\n :: PC : ” + string(子_4_in);
}
if ( 总_59_in > 0 )
{
子_3_st = “\n :: Broker : +” + string(总_59_in);
}
else
{
子_3_st = “\n :: Broker : ” + string(总_59_in);
}
Comment(“\n :: Date: “,Year(),”.”,Month(),”.”,Day(),” :: Day: “,DayOfWeek(),” :: Time: “,TimeToString(TimeCurrent(),TIME_SECONDS),”\n\n\n ~~~~~~~~~~~~~~~~~~~~~~~~~~~~”,”\n :: Broker : “,TerminalCompany(),”\n :: Ac. Name : “,AccountName(),”\n :: Ac. Number : “,AccountNumber(),”\n :: Ac. Leverage : 1:”,AccountLeverage(),”\n\n ~~~~~~~~~~~~~~~~”,”\n :: Equity : “,DoubleToString(AccountEquity(),2),”\n :: Balans : “,DoubleToString(AccountBalance(),2),”\n :: Currency : “,AccountCurrency(),”\n :: Symbol : “,Symbol(),”\n :: MagicNumber : “,181818,”\n ~~~~~~~~~~~~~~~~”,”\n :: Spread : “,DoubleToString(总_45_in,0),” pips”,”\n :: Swap Long : “,DoubleToString(总_42_do,2),”\n :: Swap Short : “,DoubleToString(总_43_do,2),”\n :: Next Lots : “,DoubleToString(子_1_do,2),”\n ~~~~~~~~~~~~~~~~”,”\n :: TimeZone: “,子_2_st,”\n :: GMT : “,TimeToString(TimeGMT(),TIME_MINUTES),”\n :: Server : “,TimeToString(TimeCurrent(),TIME_MINUTES),子_3_st,”\n ~~~~~~~~~~~~~~~~”);
临_bo_5 = false;
临_bo_6 = false;
临_st_7 = “Arial”;
临_in_8 = 0;
临_in_9 = 14;
临_in_10 = 0;
临_in_11 = 40;
临_in_12 = 18;
临_ui_13 = Yellow;
临_st_14 = ” S P”;
if ( ObjectFind(“ban” + Symbol() + “2”) < 0 )
{
ObjectCreate(“ban” + Symbol() + “2”,OBJ_LABEL,0,0,0.0,0,0.0,0,0.0);
}
ObjectSet(“ban” + Symbol() + “2”,OBJPROP_COLOR,临_ui_13);
ObjectSet(“ban” + Symbol() + “2”,OBJPROP_XDISTANCE,临_in_12);
ObjectSet(“ban” + Symbol() + “2”,OBJPROP_YDISTANCE,临_in_11);
ObjectSet(“ban” + Symbol() + “2”,OBJPROP_CORNER,临_in_10);
ObjectSet(“ban” + Symbol() + “2”,1011,临_in_8);
ObjectSet(“ban” + Symbol() + “2”,OBJPROP_BACK,临_bo_6);
ObjectSet(“ban” + Symbol() + “2”,1000,临_bo_5);
ObjectSet(“ban” + Symbol() + “2”,17,临_bo_5);
ObjectSetText(“ban” + Symbol() + “2”,临_st_14,临_in_9,临_st_7,0xFFFFFFFF);
临_bo_15 = false;
临_bo_16 = false;
临_st_17 = “Arial”;
临_in_18 = 0;
临_in_19 = 14;
临_in_20 = 0;
临_in_21 = 41;
临_in_22 = 19;
临_ui_23 = Red;
临_st_24 = ” S P”;
if ( ObjectFind(“ban” + Symbol() + “3”) < 0 )
{
ObjectCreate(“ban” + Symbol() + “3”,OBJ_LABEL,0,0,0.0,0,0.0,0,0.0);
}
ObjectSet(“ban” + Symbol() + “3”,OBJPROP_COLOR,临_ui_23);
ObjectSet(“ban” + Symbol() + “3”,OBJPROP_XDISTANCE,临_in_22);
ObjectSet(“ban” + Symbol() + “3”,OBJPROP_YDISTANCE,临_in_21);
ObjectSet(“ban” + Symbol() + “3”,OBJPROP_CORNER,临_in_20);
ObjectSet(“ban” + Symbol() + “3”,1011,临_in_18);
ObjectSet(“ban” + Symbol() + “3”,OBJPROP_BACK,临_bo_16);
ObjectSet(“ban” + Symbol() + “3”,1000,临_bo_15);
ObjectSet(“ban” + Symbol() + “3”,17,临_bo_15);
ObjectSetText(“ban” + Symbol() + “3”,临_st_24,临_in_19,临_st_17,0xFFFFFFFF);
临_bo_25 = false;
临_bo_26 = false;
临_st_27 = “Arial”;
临_in_28 = 0;
临_in_29 = 12;
临_in_30 = 0;
临_in_31 = 42;
临_in_32 = 17;
临_ui_33 = DarkBlue;
临_st_34 = “** calper irate EA **”;
if ( ObjectFind(“ban” + Symbol() + “1”) < 0 )
{
ObjectCreate(“ban” + Symbol() + “1”,OBJ_LABEL,0,0,0.0,0,0.0,0,0.0);
}
ObjectSet(“ban” + Symbol() + “1”,OBJPROP_COLOR,临_ui_33);
ObjectSet(“ban” + Symbol() + “1”,OBJPROP_XDISTANCE,临_in_32);
ObjectSet(“ban” + Symbol() + “1”,OBJPROP_YDISTANCE,临_in_31);
ObjectSet(“ban” + Symbol() + “1”,OBJPROP_CORNER,临_in_30);
ObjectSet(“ban” + Symbol() + “1”,1011,临_in_28);
ObjectSet(“ban” + Symbol() + “1”,OBJPROP_BACK,临_bo_26);
ObjectSet(“ban” + Symbol() + “1”,1000,临_bo_25);
ObjectSet(“ban” + Symbol() + “1”,17,临_bo_25);
ObjectSetText(“ban” + Symbol() + “1”,临_st_34,临_in_29,临_st_27,0xFFFFFFFF);
}
//lizong_17 <<==——– ——–
bool lizong_18( int 木_0_in,double 木_1_do,double 木_2_do)
{
int 子_2_in;
bool 子_3_bo;
bool 子_4_bo;
//—– —–

子_2_in = SymbolInfoInteger(Symbol(),31) ;
if ( 子_2_in != 0 )
{
PrintFormat(“SYMBOL_TRADE_STOPS_LEVEL=%d: StopLoss and TakeProfit must be must be not close %d points from the closing price”,子_2_in,子_2_in);
}
子_3_bo = false ;
子_4_bo = false ;
switch(木_0_in)
{
case 0 :
总_26_do = SymbolInfoDouble(Symbol(),1) ;
子_3_bo=总_26_do – 木_1_do>子_2_in * 总_33_do;
if ( !(子_3_bo) )
{
PrintFormat(“For order %s StopLoss=%.5f must be less than %.5f (Bid=%.5f – SYMBOL_TRADE_STOPS_LEVEL=%d paragraphs\’)”,EnumToString(ENUM_ORDER_TYPE(木_0_in)),木_1_do,总_26_do – 子_2_in * 总_33_do,总_26_do,子_2_in);
}
子_4_bo=木_2_do – 总_26_do>子_2_in * 总_33_do;
if ( !(子_4_bo) )
{
PrintFormat(“For order %s TakeProfit=%.5f must be greater than %.5f (Bid=%.5f + SYMBOL_TRADE_STOPS_LEVEL=%d paragraphs\’)”,EnumToString(ENUM_ORDER_TYPE(木_0_in)),木_2_do,子_2_in * 总_33_do + 总_26_do,总_26_do,子_2_in);
}
return(子_3_bo && 子_4_bo);
case 1 :
总_27_do = SymbolInfoDouble(Symbol(),4) ;
子_3_bo=木_1_do – 总_27_do>子_2_in * 总_33_do;
if ( !(子_3_bo) )
{
PrintFormat(“For order %s StopLoss=%.5f must be greater than %.5f (Ask=%.5f + SYMBOL_TRADE_STOPS_LEVEL=%d paragraphs\’)”,EnumToString(ENUM_ORDER_TYPE(木_0_in)),木_1_do,子_2_in * 总_33_do + 总_27_do,总_27_do,子_2_in);
}
子_4_bo=总_27_do – 木_2_do>子_2_in * 总_33_do;
if ( !(子_4_bo) )
{
PrintFormat(“For order %s TakeProfit=%.5f must be less than %.5f (Ask=%.5f – SYMBOL_TRADE_STOPS_LEVEL=%d paragraphs\’)”,EnumToString(ENUM_ORDER_TYPE(木_0_in)),木_2_do,总_27_do – 子_2_in * 总_33_do,总_27_do,子_2_in);
}
return(子_4_bo && 子_3_bo);
}
return(false);
}
//lizong_18 <<==——– ——–
int lizong_19()
{
int 子_2_in;
bool 子_3_bo;
int 子_4_in;
//—– —–

子_2_in = GetLastError() ;
switch(子_2_in)
{
case 0 :
return(0);
case 2 :
Print(” System failure. Restart computer/check the server”);
总_55_bo = false ;
return(3);
case 3 :
Print(” Error in logic of the expert”);
总_55_bo = false ;
return(3);
case 4 :
Print(” Trade server is busy. Waiting for 2 minutes”);
Sleep(120000);
return(2);
case 6 :
子_3_bo = false ;
子_4_in = 0 ;
Print(” Disconnect “);
Sleep(10000);
Print(” The connection is not restored, it took “,子_4_in * 10,” seconds\'”);
子_3_bo = IsConnected() ;
if ( 子_3_bo )
{
Print(” The connection was restored”);
return(2);
}
子_4_in = 子_4_in + 1;

总_55_bo = false ;
Print(” Connection issues”);
return(3);
case 8 :
Print(” Frequent queries”);
总_55_bo = false ;
return(3);
case 64 :
Print(” Account is blocked !”);
总_55_bo = false ;
return(3);
case 65 :
Print(” Incorrect account number ???”);
总_55_bo = false ;
return(3);
case 128 :
Print(” Expired expectations of the transaction”);
return(2);
case 129 :
Print(” The wrong price”);
return(1);
case 130 :
Print(” Wrong stop”);
return(1);
case 131 :
Print(” Incorrectly calculated the amount of the transaction”);
总_55_bo = false ;
return(3);
case 132 :
Print(” The market is closed”);
总_55_bo = false ;
return(2);
case 134 :
Print(” Not enough margin for the operation”);
总_55_bo = false ;
return(2);
case 135 :
Print(” The prices have changed”);
return(1);
case 136 :
Print(” Prices do not !”);
return(2);
case 138 :
Print(” Re-quoting again !”);
return(1);
case 139 :
Print(” The order is in processing. Software glitch”);
return(2);
case 141 :
Print(” Too many requests”);
总_55_bo = false ;
return(2);
case 148 :
Print(” Too much transaction volume”);
总_55_bo = false ;
return(2);
}
return(0);
}
//lizong_19 <<==——– ——–
string lizong_20( int 木_0_in)
{
string 子_1_st;
//—– —–

switch(木_0_in)
{
case 0 :
子_1_st = ” No error” ;
break;
case 1 :
子_1_st = ” No error, trade conditions not changed” ;
break;
case 2 :
子_1_st = ” Common error” ;
break;
case 3 :
子_1_st = ” Invalid trade parameters” ;
break;
case 4 :
子_1_st = ” Trade server is busy” ;
break;
case 5 :
子_1_st = ” Old version of the client terminal” ;
break;
case 6 :
子_1_st = ” No connection with trade server” ;
break;
case 7 :
子_1_st = ” Not enough rights” ;
break;
case 8 :
子_1_st = ” Too frequent requests” ;
break;
case 9 :
子_1_st = ” Malfunctional trade operation (never returned error)” ;
break;
case 64 :
子_1_st = ” Account disabled” ;
break;
case 65 :
子_1_st = ” Invalid account” ;
break;
case 128 :
子_1_st = ” Trade timeout” ;
break;
case 129 :
子_1_st = ” Invalid price” ;
break;
case 130 :
子_1_st = ” Invalid stops” ;
break;
case 131 :
子_1_st = ” Invalid trade volume” ;
break;
case 132 :
子_1_st = ” Market is closed” ;
break;
case 133 :
子_1_st = ” Trade is disabled” ;
break;
case 134 :
子_1_st = ” Not enough money” ;
break;
case 135 :
子_1_st = ” Price changed” ;
break;
case 136 :
子_1_st = ” Off quotes” ;
break;
case 137 :
子_1_st = ” Broker is busy (never returned error)” ;
break;
case 138 :
子_1_st = ” Requote” ;
break;
case 139 :
子_1_st = ” Order is locked” ;
break;
case 140 :
子_1_st = ” Long positions only allowed” ;
break;
case 141 :
子_1_st = ” Too many requests” ;
break;
case 145 :
子_1_st = ” Modification denied because order is too close to market” ;
break;
case 146 :
子_1_st = ” Trade context is busy” ;
break;
case 147 :
子_1_st = ” Expirations are denied by broker” ;
break;
case 148 :
子_1_st = ” Amount of open and pending orders has reached the limit” ;
break;
case 149 :
子_1_st = ” Hedging is prohibited” ;
break;
case 150 :
子_1_st = ” Prohibited by FIFO rules” ;
break;
case 4000 :
子_1_st = ” No error (never generated code)” ;
break;
case 4001 :
子_1_st = ” Wrong function pointer” ;
break;
case 4002 :
子_1_st = ” Array index is out of range” ;
break;
case 4003 :
子_1_st = ” No memory for function call stack” ;
break;
case 4004 :
子_1_st = ” Recursive stack overflow” ;
break;
case 4005 :
子_1_st = ” Not enough stack for parameter” ;
break;
case 4006 :
子_1_st = ” No memory for parameter string” ;
break;
case 4007 :
子_1_st = ” No memory for temp string” ;
break;
case 4008 :
子_1_st = ” Non-initialized string” ;
break;
case 4009 :
子_1_st = ” Non-initialized string in array” ;
break;
case 4010 :
子_1_st = ” No memory for array\’ string” ;
break;
case 4011 :
子_1_st = ” Too long string” ;
break;
case 4012 :
子_1_st = ” Remainder from zero divide” ;
break;
case 4013 :
子_1_st = ” Zero divide” ;
break;
case 4014 :
子_1_st = ” Unknown command” ;
break;
case 4015 :
子_1_st = ” Wrong jump (never generated error)” ;
break;
case 4016 :
子_1_st = ” Non-initialized array” ;
break;
case 4017 :
子_1_st = ” Dll calls are not allowed” ;
break;
case 4018 :
子_1_st = ” Cannot load library” ;
break;
case 4019 :
子_1_st = ” Cannot call function” ;
break;
case 4020 :
子_1_st = ” Expert function calls are not allowed” ;
break;
case 4021 :
子_1_st = ” Not enough memory for temp string returned from function” ;
break;
case 4022 :
子_1_st = ” System is busy (never generated error)” ;
break;
case 4023 :
子_1_st = ” Dll-function call critical error” ;
break;
case 4024 :
子_1_st = ” Internal error” ;
break;
case 4025 :
子_1_st = ” Out of memory” ;
break;
case 4026 :
子_1_st = ” Invalid pointer” ;
break;
case 4027 :
子_1_st = ” Too many formatters in the format function” ;
break;
case 4028 :
子_1_st = ” Parameters count is more than formatters count” ;
break;
case 4029 :
子_1_st = ” Invalid array” ;
break;
case 4030 :
子_1_st = ” No reply from chart” ;
break;
case 4050 :
子_1_st = ” Invalid function parameters count” ;
break;
case 4051 :
子_1_st = ” Invalid function parameter value” ;
break;
case 4052 :
子_1_st = ” String function internal error” ;
break;
case 4053 :
子_1_st = ” Some array error” ;
break;
case 4054 :
子_1_st = ” Incorrect series array usage” ;
break;
case 4055 :
子_1_st = ” Custom indicator error” ;
break;
case 4056 :
子_1_st = ” Arrays are incompatible” ;
break;
case 4057 :
子_1_st = ” Global variables processing error” ;
break;
case 4058 :
子_1_st = ” Global variable not found” ;
break;
case 4059 :
子_1_st = ” Function is not allowed in testing mode” ;
break;
case 4060 :
子_1_st = ” Function is not confirmed” ;
break;
case 4061 :
子_1_st = ” Send mail error” ;
break;
case 4062 :
子_1_st = ” String parameter expected” ;
break;
case 4063 :
子_1_st = ” Integer parameter expected” ;
break;
case 4064 :
子_1_st = ” Double parameter expected” ;
break;
case 4065 :
子_1_st = ” Array as parameter expected” ;
break;
case 4066 :
子_1_st = ” Requested history data is in update state” ;
break;
case 4067 :
子_1_st = ” Internal trade error” ;
break;
case 4068 :
子_1_st = ” Resource not found” ;
break;
case 4069 :
子_1_st = ” Resource not supported” ;
break;
case 4070 :
子_1_st = ” Duplicate resource” ;
break;
case 4071 :
子_1_st = ” Cannot initialize custom indicator” ;
break;
case 4072 :
子_1_st = ” Cannot load custom indicator” ;
break;
case 4073 :
子_1_st = ” No history data” ;
break;
case 4074 :
子_1_st = ” Not enough memory for history data” ;
break;
case 4075 :
子_1_st = ” Not enough memory for indicator” ;
break;
case 4099 :
子_1_st = ” End of file” ;
break;
case 4100 :
子_1_st = ” Some file error” ;
break;
case 4101 :
子_1_st = ” Wrong file name” ;
break;
case 4102 :
子_1_st = ” Too many opened files” ;
break;
case 4103 :
子_1_st = ” Cannot open file” ;
break;
case 4104 :
子_1_st = ” Incompatible access to a file” ;
break;
case 4105 :
子_1_st = ” No order selected” ;
break;
case 4106 :
子_1_st = ” Unknown symbol” ;
break;
case 4107 :
子_1_st = ” Invalid price parameter for trade function” ;
break;
case 4108 :
子_1_st = ” Invalid ticket” ;
break;
case 4109 :
子_1_st = ” Trade is not allowed in the expert properties” ;
break;
case 4110 :
子_1_st = ” Longs are not allowed in the expert properties” ;
break;
case 4111 :
子_1_st = ” Shorts are not allowed in the expert properties” ;
break;
case 4200 :
子_1_st = ” Object already exists” ;
break;
case 4201 :
子_1_st = ” Unknown object property” ;
break;
case 4202 :
子_1_st = ” Object does not exist” ;
break;
case 4203 :
子_1_st = ” Unknown object type” ;
break;
case 4204 :
子_1_st = ” No object name” ;
break;
case 4205 :
子_1_st = ” Object coordinates error” ;
break;
case 4206 :
子_1_st = ” No specified subwindow” ;
break;
case 4207 :
子_1_st = ” Graphical object error” ;
break;
case 4210 :
子_1_st = ” Unknown chart property” ;
break;
case 4211 :
子_1_st = ” Chart not found” ;
break;
case 4212 :
子_1_st = ” Chart subwindow not found” ;
break;
case 4213 :
子_1_st = ” Chart indicator not found” ;
break;
case 4220 :
子_1_st = ” Symbol select error” ;
break;
case 4250 :
子_1_st = ” Notification error” ;
break;
case 4251 :
子_1_st = ” Notification parameter error” ;
break;
case 4252 :
子_1_st = ” Notifications disabled” ;
break;
case 4253 :
子_1_st = ” Notification send too frequent” ;
break;
case 4260 :
子_1_st = ” Ftp server is not specified” ;
break;
case 4261 :
子_1_st = ” Ftp login is not specified” ;
break;
case 4262 :
子_1_st = ” Ftp connect failed” ;
break;
case 4263 :
子_1_st = ” Ftp connect closed” ;
break;
case 4264 :
子_1_st = ” Ftp change path error” ;
break;
case 4265 :
子_1_st = ” Ftp file error” ;
break;
case 4266 :
子_1_st = ” Ftp error” ;
break;
case 5001 :
子_1_st = ” Too many opened files” ;
break;
case 5002 :
子_1_st = ” Wrong file name” ;
break;
case 5003 :
子_1_st = ” Too long file name” ;
break;
case 5004 :
子_1_st = ” Cannot open file” ;
break;
case 5005 :
子_1_st = ” Text file buffer allocation error” ;
break;
case 5006 :
子_1_st = ” Cannot delete file” ;
break;
case 5007 :
子_1_st = ” Invalid file handle (file closed or was not opened)” ;
break;
case 5008 :
子_1_st = ” Wrong file handle (handle index is out of handle table)” ;
break;
case 5009 :
子_1_st = ” File must be opened with FILE_WRITE flag” ;
break;
case 5010 :
子_1_st = ” File must be opened with FILE_READ flag” ;
break;
case 5011 :
子_1_st = ” File must be opened with FILE_BIN flag” ;
break;
case 5012 :
子_1_st = ” File must be opened with FILE_TXT flag” ;
break;
case 5013 :
子_1_st = ” File must be opened with FILE_TXT or FILE_CSV flag” ;
break;
case 5014 :
子_1_st = ” File must be opened with FILE_CSV flag” ;
break;
case 5015 :
子_1_st = ” File read error” ;
break;
case 5016 :
子_1_st = ” File write error” ;
break;
case 5017 :
子_1_st = ” String size must be specified for binary file” ;
break;
case 5018 :
子_1_st = ” Incompatible file (for string arrays-TXT, for others-BIN)” ;
break;
case 5019 :
子_1_st = ” File is directory, not file” ;
break;
case 5020 :
子_1_st = ” File does not exist” ;
break;
case 5021 :
子_1_st = ” File cannot be rewritten” ;
break;
case 5022 :
子_1_st = ” Wrong directory name” ;
break;
case 5023 :
子_1_st = ” Directory does not exist” ;
break;
case 5024 :
子_1_st = ” Specified file is not directory” ;
break;
case 5025 :
子_1_st = ” Cannot delete directory” ;
break;
case 5026 :
子_1_st = ” Cannot clean directory” ;
break;
case 5027 :
子_1_st = ” Array resize error” ;
break;
case 5028 :
子_1_st = ” String resize error” ;
break;
case 5029 :
子_1_st = ” Structure contains strings or dynamic arrays” ;
break;
default :
子_1_st = ” Unknown error” ;
}
return(子_1_st);
}
//<<==lizong_20 <<==