//+------------------------------------------------------------------+ //| PipZilla is generated by K. Barsoumian | //| | //| | //| In no event will author be liable for any damages whatsoever. | //| Use at your own risk. | //| | //+------------------- DO NOT REMOVE THIS HEADER --------------------+ #define SIGNAL_NONE 0 #define SIGNAL_BUY 1 #define SIGNAL_SELL 2 #define SIGNAL_CLOSEBUY 3 #define SIGNAL_CLOSESELL 4 #property copyright "K. Barsoumian - PipZilla" extern int MagicNumber = 1234567890; extern bool SignalMail = False; extern bool EachTickMode = True; extern double Lots = 1.0; extern int Slippage = 3; extern bool UseStopLoss = False; extern int StopLoss = 30; extern bool UseTakeProfit = False; extern int TakeProfit = 1; extern bool UseTrailingStop = True; extern int TrailingStop = 10; extern int MA_period=6; extern int MA_periodSM=14; extern double BVBuy=0.002; extern double BVClose=0.00; extern double NSClose=0.000; extern double NSBuy=0.00; extern string Envelopes_settings="----------------------------------------------------------------------"; extern int Env_ma_period=11; extern int Env_ma_method=0; extern double Env_deviation=0.26; extern string Money_management_settings="----------------------------------------------------------------------"; extern double LotDivider = 2; extern bool MoneyManagement = True; extern bool AllowMicro = True; extern double LeveragePercent = 2.0; extern bool Martingale = True; extern double LotMultiplier = 1.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; RefreshRates(); 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, 1, 0, MODE_EMA, PRICE_CLOSE, 0); double Base1 = iMA(NULL, 0, 1, 0, MODE_EMA, PRICE_CLOSE, 1); double Var1 = iMA(NULL, 0, MA_period, 0, MODE_EMA, PRICE_CLOSE, 0); double Var2 = iMA(NULL, 0, MA_period, 0, MODE_EMA, PRICE_CLOSE, 1); double Var3 = iMA(NULL, 0, MA_periodSM, 0, MODE_SMA, PRICE_CLOSE, Current + 0); double Var4 = iMA(NULL, 0, MA_periodSM, 0, MODE_SMA, PRICE_CLOSE, Current + 1); double Var5 = iEnvelopes(NULL, 0, Env_ma_period, Env_ma_method, 0, PRICE_CLOSE, Env_deviation, MODE_UPPER, Current + 0); double Var6 = iEnvelopes(NULL, 0, Env_ma_period, Env_ma_method, 0, PRICE_CLOSE, Env_deviation, MODE_LOWER, Current + 0); double NowSpace = Var1-Var3; double NowSpace2= Var2-Var4; double TripleCrossing = Base1+Var2+Var4; double Outcome = NowSpace-NowSpace2; double BaseVariance = Base-Var3; Comment ("\n","\n","###########################","\n","\n", "Space Between Moving Averages = ",NowSpace,"\n","\n", "Base Variance = ", BaseVariance,"\n","\n","###########################"); //+------------------------------------------------------------------+ //| 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>Var3 && BaseVariance>BVClose)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>Var1 && Var1>Var3 && Base>Base1 && Var1>Var2 && NowSpace>NSBuy)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) { 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, Red); 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); } //+------------------------------------------------------------------+