Expert Advisor Programming by Andrew R. Young

Appendix D
}
}
string ErrLog = StringConcatenate("Ticket: ",argCloseTicket," Bid: ",
MarketInfo(argSymbol,MODE_BID));
Print(ErrLog);
}
return(Closed);
bool CloseSellOrder(string argSymbol, int argCloseTicket, double argSlippage)
{
OrderSelect(argCloseTicket,SELECT_BY_TICKET);
if(OrderCloseTime() == 0)
{
double CloseLots = OrderLots();
while(IsTradeContextBusy()) Sleep(10);
double ClosePrice = MarketInfo(argSymbol,MODE_ASK);
bool Closed = OrderClose(argCloseTicket,CloseLots,ClosePrice,argSlippage,Red);
if(Closed == false)
{
int ErrorCode = GetLastError();
string ErrDesc = ErrorDescription(ErrorCode);
string ErrAlert = StringConcatenate("Close Sell Order - Error: ",ErrorCode,
": ",ErrDesc);
Alert(ErrAlert);
string ErrLog = StringConcatenate("Ticket: ",argCloseTicket,
" Ask: ",MarketInfo(argSymbol,MODE_ASK));
Print(ErrLog);
}
}
return(Closed);
}
bool ClosePendingOrder(string argSymbol, int argCloseTicket)
{
OrderSelect(argCloseTicket,SELECT_BY_TICKET);
if(OrderCloseTime() == 0)
{
while(IsTradeContextBusy()) Sleep(10);
bool Deleted = OrderDelete(argCloseTicket,Red);
if(Deleted == false)
{
int ErrorCode = GetLastError();
185