//+------------------------------------------------------------------+ //| 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 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=4; extern int MA_periodSM=7; extern double BVBuy=0.000; extern double BVClose=0.0025; extern double MACDClose=0.000; 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_SMA, PRICE_CLOSE, Current + 0); double Var2 = iMA(NULL, 0, MA_period, 0, MODE_SMA, PRICE_CLOSE, Current + 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 = iMACD(NULL, 0, 12,26,9,PRICE_CLOSE, MODE_MAIN, Current+0); double Var5_1 = iMACD(NULL, 0, 12,26,9,PRICE_CLOSE, MODE_MAIN, Current+1); double Var6 = iMACD(NULL, 0, 12,26,9,PRICE_CLOSE, MODE_SIGNAL, Current+0); double Var7 = iMACD(NULL, 0, 12,26,9,PRICE_CLOSE, MODE_SIGNAL, Current+1); double Var8 = iHigh(0, PERIOD_D1,1); double Var9 = iHigh(0, PERIOD_W1, 0); double Var10 = iLow(0, PERIOD_D1, 1); double Var11 = iLow(0, PERIOD_W1, 0); double Var12 = iCustom(NULL,0,"QQEA",1,14,4.236, MODE_MAIN,0); double Var13 = iCustom(NULL,0,"QQEA",1,14,4.236, MODE_SIGNAL,0); double Var14 = iCustom(NULL,0,"QQEA",1,14,4.236, MODE_MAIN,1); double DailyRange = (Var8-Var10); double DailyMedian = (Var8-(DailyRange/2)); double WeekRange = (Var9-Var11)/2; double WeekMedian = (Var9-WeekRange); double NowSpace = Var1-Var3; double NowSpace2 = Var2-Var4; double Outcome = NowSpace-NowSpace2; double NoSellZone = Var10+(DailyRange/20); double NoBuyZone = Var8-(DailyRange/20); double BuyCloseZone = Var10+(DailyRange/20); double SellCloseZone = Var8-(DailyRange/20); double BaseVariance = Base-Var3; Comment ("\n","\n","###########################","\n","Space Between Moving Averages = ",NowSpace,"\n", "Daily Median = ",DailyMedian,"\n","Week Median = ",WeekMedian,"\n","Day High = ",Var8,"\n","Day Low = ",Var10,"\n","Base Variance = ", BaseVariance,"\n", "No Buy Zone = ",NoBuyZone,"\n","No Sell Zone = ",NoSellZone,"\n","Buy Close Zone = ",BuyCloseZone,"\n","Sell Close Zone =",SellCloseZone,"\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 && Var12>Var13)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>Var3 && BaseVariance>BVBuy && Var6>Var7 && BaseNoSellZone && Var12>Var13)Order=SIGNAL_BUY; if (BaseNoSellZone && BaseVar12)Order=SIGNAL_SELL; //+------------------------------------------------------------------+ //| Signal End | //+------------------------------------------------------------------+ //Buy if (Order == SIGNAL_BUY && ((EachTickMode && !TickCheck) || (!EachTickMode && (Bars != BarCount)))) { if(!IsTrade) { if (UseStopLoss) StopLossLevel = Ask - StopLoss * Point; else StopLossLevel = 0.0; if (UseTakeProfit) TakeProfitLevel = Ask + TakeProfit * Point; else TakeProfitLevel = 0.0; Ticket = OrderSend(Symbol(), OP_BUY, Lots, Ask, Slippage, StopLossLevel, TakeProfitLevel, "Buy(#" + MagicNumber + ")", MagicNumber, 0, LawnGreen); if(Ticket > 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); } //+------------------------------------------------------------------+