{Error Control}

Error_MacdShMaPeriods:= Error(perShort=0,'Input Error: "MACD Short MA Periods" cannot equal zero!');
Error_MacdLgMaPeriods:= Error(perLong=0,'Input Error: "MACD Long MA Periods" cannot equal zero!');
Error_MacdMaComparison:= Error(perShort>=perLong,'InputError: "MACD Short MA Periods" cannot be greater than or equal to "MACD Long MA Periods"!');
Error_MacdSignalMaPeriods:= Error(Sig=0,'Input Error: "MACD Signal MA Periods" cannot equal zero!');

{MACD}

Fast:= Mov(Pr,perShort,maTp) - Mov(Pr,perLong,maTp);
Signal:= Mov(Fast,Sig,TpS);
OsMA:= Fast-Signal;

{Trend Direction}

UpTrend:= Fast>Signal;
DownTrend:= Signal>Fast;

{Signal Long and Short}

LongSignal:= Cross(Fast,Signal);
ShortSignal:= Cross(Signal,Fast);

{Auto-Trading Functionality; Used in Auto-Trade Mode Only}

OpenBuy:= LongSignal AND (EventCount('OpenBuy') = EventCount('CloseBuy'));
CloseBuy:= ShortSignal AND (EventCount('OpenBuy') > EventCount('CloseBuy'));

OpenSell:= ShortSignal AND (EventCount('OpenSell') = EventCount('CloseSell'));
CloseSell:= LongSignal AND (EventCount('OpenSell') > EventCount('CloseSell'));