Expert Advisor Programming by Andrew R. Young

Working with Functions
double BuyStopLoss = CalcBuyStopLoss(Symbol(),StopLoss,OpenPrice);
if(BuyStopLoss > 0)
{
BuyStopLoss = AdjustBelowStopLevel(Symbol(),BuyStopLoss,5);
}
double BuyTakeProfit = CalcBuyTakeProfit(Symbol(),TakeProfit,OpenPrice);
if(BuyTakeProfit > 0)
{
BuyTakeProfit = AdjustAboveStopLevel(Symbol(),BuyTakeProfit,5);
}
}
}
AddStopProfit(BuyTicket,BuyStopLoss,BuyTakeProfit);
// Sell Order
if(FastMA < SlowMA && SellTicket == 0)
{
if(BuyTicket > 0) Closed = CloseBuyOrder(Symbol(),BuyTicket,Slippage);
BuyTicket = 0;
SellTicket = OpenSellOrder(Symbol(),LotSize,UseSlippage,MagicNumber);
if(SellTicket > 0 && (StopLoss > 0 || TakeProfit > 0))
{
OrderSelect(SellTicket,SELECT_BY_TICKET);
OpenPrice = OrderOpenPrice();
double SellStopLoss = CalcSellStopLoss(Symbol(),StopLoss,OpenPrice);
if(SellStopLoss > 0)
{
SellStopLoss = AdjustAboveStopLevel(Symbol(),SellStopLoss,5);
}
double SellTakeProfit = CalcSellTakeProfit(Symbol(),TakeProfit,OpenPrice);
if(SellTakeProfit > 0)
{
SellTakeProfit = AdjustBelowStopLevel(Symbol(),SellTakeProfit,5);
}
AddStopProfit(SellTicket,SellStopLoss,SellTakeProfit);
}
}
return(0);
}
77