Expert Advisor Programming by Andrew R. Young

Appendix D
// Modify Stop
if(OrderMagicNumber() == argMagicNumber && OrderSymbol() == argSymbol
&& OrderType() == OP_SELL && (CurrentStop > MaxStopLoss || CurrentStop == 0)
&& PipsProfit >= MinProfit)
{
bool Trailed = OrderModify(OrderTicket(),OrderOpenPrice(),MaxStopLoss,
OrderTakeProfit(),0);
// Error Handling
if(Trailed == false)
{
int ErrorCode = GetLastError();
string ErrDesc = ErrorDescription(ErrorCode);
string ErrAlert = StringConcatenate("Sell Trailing Stop - Error ",
ErrorCode,": ",ErrDesc);
Alert(ErrAlert);
}
}
}
}
string ErrLog = StringConcatenate("Ask: ",
MarketInfo(argSymbol,MODE_ASK), " Ticket: ",OrderTicket()," Stop: ",
OrderStopLoss()," Trail: ",MaxStopLoss);
Print(ErrLog);
197