#define SIGNAL_NONE 0 #define SIGNAL_BUY 1 #define SIGNAL_SELL 2 #define SIGNAL_CLOSEBUY 3 #define SIGNAL_CLOSESELL 4 #property copyright "2009 BOSS EA" #property link "http://www.forex-expert-advisor-free.com" extern string Website="www.forex-expert-advisor-free.com"; extern string Note="2/4 decimal pricing -- Trailing Stop = 10"; extern string Note2="3/5 decimal pricing -- Trailing Stop = 30"; extern int MagicNumber = 0; extern bool SignalMail = False; extern bool EachTickMode = FALSE; extern double Lots = 1.0; extern int Slippage = 3; extern bool UseStopLoss = False; extern int StopLoss = 30; extern bool UseTakeProfit = False; extern int TakeProfit = 60; extern bool UseTrailingStop = True; extern int TrailingStop = 10; extern string Moving_average_settings="-----------------------------------------------------------------"; extern int BaseLine=1; extern string MACD="------------------------------------------------------------------------------------"; extern int Macd_Fast=3; extern int Macd_Slow=14; extern int Macd_SMA=5; extern string BOSS="------------------------------------------------------------------------------------"; extern double SF=6; extern double RSIPeriod=4; extern double DARFACTOR=2.5; extern string Ultimate_Predictor="----------------------------------------------------------------------"; extern int SMOOTH=4; extern int PROG=4; extern int LENS=4; extern int SENS=4; extern int exit=75; extern string Money_management_settings="----------------------------------------------------------------------"; extern bool MoneyManagement = True; extern bool AllowMicro = True; extern double LeveragePercent = 1.0; extern bool Martingale = True; extern double LotMultiplier = 3; extern int MaxProgression = 3; int d; string AccountType; string OLots[4]; int BarCount; int Current; bool TickCheck = False; //+------------------------------------------------------------------+ //| expert initialization function | //+------------------------------------------------------------------+ int init() { BarCount = Bars; if (EachTickMode) Current = 0; else Current = 1; if(MarketInfo(Symbol(), MODE_LOTSIZE) == 10000) {AccountType = "Mini";} if(MarketInfo(Symbol(), MODE_LOTSIZE) == 100000) {AccountType = "Standard";} if (MarketInfo(Symbol(),MODE_LOTSTEP)==0.01) d=2; if (MarketInfo(Symbol(),MODE_LOTSTEP)==0.1) d=1; return(0); } //+------------------------------------------------------------------+ //| expert deinitialization function | //+------------------------------------------------------------------+ int deinit() { return(0); } //+------------------------------------------------------------------+ //| expert start function | //+------------------------------------------------------------------+ int start() { int Order = SIGNAL_NONE; int Total, Ticket; double StopLossLevel, TakeProfitLevel; if (EachTickMode && Bars != BarCount) TickCheck = False; Total = OrdersTotal(); Order = SIGNAL_NONE; // Money Management *********************************************************************************************** if(MoneyManagement) {if (AccountType=="Standard") {if (AllowMicro) Lots = MathMax(0.01,NormalizeDouble(AccountEquity()*LeveragePercent/100000.0,2)); else Lots = MathMax(0.1,NormalizeDouble(AccountEquity()*LeveragePercent/100000.0,1));} else if (AccountType=="Mini") {if (AllowMicro) Lots = MathMax(0.01,NormalizeDouble(AccountEquity()*LeveragePercent/10000.0,2)); else Lots = MathMax(0.1,NormalizeDouble(AccountEquity()*LeveragePercent/10000.0,1));}} Lots=MathMin(Lots,MarketInfo(Symbol(),MODE_MAXLOT)); OLots[3]=Lots; //+------------------------------------------------------------------+ //| Variable Begin | //+------------------------------------------------------------------+ double Base = iMA(NULL, 0, BaseLine, 0, MODE_EMA, PRICE_CLOSE, Current + 0); double Base1 = iMA(NULL, 0, 5, 0, MODE_EMA, PRICE_CLOSE, Current + 0); double Base1_1 = iMA(NULL, 0, 5, 0, MODE_EMA, PRICE_CLOSE, Current + 1); double Base2 = iMA(NULL, 0, 10, 0, MODE_EMA, PRICE_CLOSE, Current + 0); double Base2_1 = iMA(NULL, 0, 10, 0, MODE_EMA, PRICE_CLOSE, Current + 1); double Base3 = iMA(NULL, 0, 25, 0, MODE_EMA, PRICE_CLOSE, Current + 0); double Base3_1 = iMA(NULL, 0, 25, 0, MODE_EMA, PRICE_CLOSE, Current + 1); double Base4 = iMA(NULL, 0, 50, 0, MODE_EMA, PRICE_CLOSE, Current + 0); double Base4_1 = iMA(NULL, 0, 50, 0, MODE_EMA, PRICE_CLOSE, Current + 1); double MAC = iMACD(NULL, 0, Macd_Fast, Macd_Slow, Macd_SMA, PRICE_CLOSE, MODE_SIGNAL, Current + 0); double MAC1 = iMACD(NULL, 0, Macd_Fast, Macd_Slow, Macd_SMA, PRICE_CLOSE, MODE_SIGNAL, Current + 1); double MAC2 = iMACD(NULL, 0, Macd_Fast, Macd_Slow, Macd_SMA, PRICE_CLOSE, MODE_SIGNAL, Current + 2); double QQE = iCustom(NULL,0,"BOSS",SF,RSIPeriod,DARFACTOR, MODE_MAIN,0); double QQE1 = iCustom(NULL,0,"BOSS",SF,RSIPeriod,DARFACTOR, MODE_MAIN,1); double QQESig = iCustom(NULL,0,"BOSS",SF,RSIPeriod,DARFACTOR, MODE_SIGNAL,0); double ULTRA = iCustom(0,0,"BOSS_ULTIMATE",7777,SMOOTH,5000,PROG,LENS,SENS,MODE_MAIN,0); double ULTRA1 = iCustom(0,0,"BOSS_ULTIMATE",7777,SMOOTH,5000,PROG,LENS,SENS,MODE_MAIN,1); double ULTRASig= iCustom(0,0,"BOSS_ULTIMATE",7777,SMOOTH,5000,PROG,LENS,SENS,MODE_SIGNAL,0); //+------------------------------------------------------------------+ //| Variable End | //+------------------------------------------------------------------+ //Check position bool IsTrade = False; for (int i = 0; i < Total; i ++) { OrderSelect(i, SELECT_BY_POS, MODE_TRADES); if(OrderType() <= OP_SELL && OrderSymbol() == Symbol()) { IsTrade = True; if(OrderType() == OP_BUY) { //Close //+------------------------------------------------------------------+ //| Signal Begin(Exit Buy) | //+------------------------------------------------------------------+ if ((Base 0) { if(Bid - OrderOpenPrice() > Point * TrailingStop) { if(OrderStopLoss() < Bid - Point * TrailingStop) { OrderModify(OrderTicket(), OrderOpenPrice(), Bid - Point * TrailingStop, OrderTakeProfit(), 0, MediumSeaGreen); if (!EachTickMode) BarCount = Bars; continue; } } } } else { //Close //+------------------------------------------------------------------+ //| Signal Begin(Exit Sell) | //+------------------------------------------------------------------+ if ((Base>Base1 && Base1>Base2 && Base2>Base3 && Base3>Base4)&&(Base1>Base1_1 && Base2>Base2_1 && Base3>Base3_1 && Base4>Base4_1)) Order = SIGNAL_CLOSESELL; //+------------------------------------------------------------------+ //| Signal End(Exit Sell) | //+------------------------------------------------------------------+ if (Order == SIGNAL_CLOSESELL && ((EachTickMode && !TickCheck) || (!EachTickMode && (Bars != BarCount)))) { OrderClose(OrderTicket(), OrderLots(), Ask, Slippage, DarkOrange); if (SignalMail) SendMail("[Signal Alert]", "[" + Symbol() + "] " + DoubleToStr(Ask, Digits) + " Close Sell"); if (!EachTickMode) BarCount = Bars; IsTrade = False; continue; } //Trailing stop if(UseTrailingStop && TrailingStop > 0) { if((OrderOpenPrice() - Ask) > (Point * TrailingStop)) { if((OrderStopLoss() > (Ask + Point * TrailingStop)) || (OrderStopLoss() == 0)) { OrderModify(OrderTicket(), OrderOpenPrice(), Ask + Point * TrailingStop, OrderTakeProfit(), 0, DarkOrange); if (!EachTickMode) BarCount = Bars; continue; } } } } } } //+------------------------------------------------------------------+ //| Signal Begin(Entry) | //+------------------------------------------------------------------+ if ((Base>Base1 && Base1>Base2 && Base2>Base3 && Base3>Base4)&&(Base1>Base1_1 && Base2>Base2_1 && Base3>Base3_1 && Base4>Base4_1)) Order = SIGNAL_BUY; if ((Base 0) { if (OrderSelect(Ticket, SELECT_BY_TICKET, MODE_TRADES)) { Print("BUY order opened : ", OrderOpenPrice()); if (SignalMail) SendMail("[Signal Alert]", "[" + Symbol() + "] " + DoubleToStr(Ask, Digits) + " Open Buy"); } else { Print("Error opening BUY order : ", GetLastError()); } } if (EachTickMode) TickCheck = True; if (!EachTickMode) BarCount = Bars; return(0); } } //Sell if (Order == SIGNAL_SELL && ((EachTickMode && !TickCheck) || (!EachTickMode && (Bars != BarCount)))) { if(!IsTrade) { //Check free margin if (AccountFreeMargin() < (1000 * Lots)) { Print("We have no money. Free Margin = ", AccountFreeMargin()); return(0); } if (UseStopLoss) StopLossLevel = Bid + StopLoss * Point; else StopLossLevel = 0.0; if (UseTakeProfit) TakeProfitLevel = Bid - TakeProfit * Point; else TakeProfitLevel = 0.0; Ticket = OrderSend(Symbol(), OP_SELL, Lots, Bid, Slippage, StopLossLevel, TakeProfitLevel, "Sell(#" + MagicNumber + ")", MagicNumber, 0, DeepPink); if(Ticket > 0) { if (OrderSelect(Ticket, SELECT_BY_TICKET, MODE_TRADES)) { Print("SELL order opened : ", OrderOpenPrice()); if (SignalMail) SendMail("[Signal Alert]", "[" + Symbol() + "] " + DoubleToStr(Bid, Digits) + " Open Sell"); } else { Print("Error opening SELL order : ", GetLastError()); } } if (EachTickMode) TickCheck = True; if (!EachTickMode) BarCount = Bars; return(0); } } if (!EachTickMode) BarCount = Bars; return(0); } //+------------------------------------------------------------------+