trailingator

/*
Generated by EX4-TO-MQ4 decompiler V4.0.224.1 []
Website: http://purebeam.biz
E-mail : purebeam@gmail.com
*/
#property copyright “Copyright @ Rita Lasker”
#property link “http://www.ritalasker.com”

extern bool ProfitTrailing = TRUE;
extern double TrailingStop = 15.0;
extern double TrailingStep = 2.0;
extern int MagicNumber = -1;
double gd_100;

int init() {
gd_100 = Point;
if (Digits == 5 || Digits == 3) gd_100 = 10.0 * gd_100;
return (0);
}

void start() {
if (TrailingStop > 0.0 && OrdersTotal() > 0) RealTrailOrder();
}

void RealTrailOrder() {
double l_ord_open_price_20;
double l_ord_stoploss_28;
double l_price_36;
double ld_0 = MarketInfo(Symbol(), MODE_STOPLEVEL) * Point / gd_100;
double ld_8 = MathMax(TrailingStop, ld_0);
for (int l_pos_16 = OrdersTotal() – 1; l_pos_16 >= 0; l_pos_16–) {
if (OrderSelect(l_pos_16, SELECT_BY_POS, MODE_TRADES) == TRUE) {
if (OrderMagicNumber() == MagicNumber || MagicNumber < 0 && OrderSymbol() == Symbol()) {
l_ord_open_price_20 = OrderOpenPrice();
l_ord_stoploss_28 = OrderStopLoss();
while (IsTradeContextBusy()) Sleep(500);
RefreshRates();
if (OrderType() == OP_BUY) {
l_price_36 = ND(Bid – ld_8 * gd_100);
if (Bid > l_ord_open_price_20 + ld_8 * gd_100 || !ProfitTrailing && l_price_36 >= l_ord_stoploss_28 + TrailingStep * gd_100 && ld_8 * gd_100 > ld_0 * gd_100) {
if (!OrderModify(OrderTicket(), OrderOpenPrice(), l_price_36, OrderTakeProfit(), 0, Blue))
if (!IsOptimization()) Print(“BUY OrderModify Error ” + GetLastError());
}
}
if (OrderType() == OP_SELL) {
l_price_36 = ND(Ask + ld_8 * gd_100);
if (Ask < l_ord_open_price_20 – ld_8 * gd_100 || !ProfitTrailing && l_price_36 <= l_ord_stoploss_28 – TrailingStep * gd_100 || l_ord_stoploss_28 == 0.0 && ld_8 * gd_100 > ld_0 * gd_100) {
if (!OrderModify(OrderTicket(), OrderOpenPrice(), l_price_36, OrderTakeProfit(), 0, Red))
if (!IsOptimization()) Print(“Sell OrderModify Error ” + GetLastError());
}
}
}
}
}
}

double ND(double ad_0) {
return (NormalizeDouble(ad_0, Digits));
}