qq_v2.1_gbpusd_MM

Author: RamilT
Profit factor:
0.33
Price Data Components
Series array that contains open prices of each barSeries array that contains close prices for each bar
Orders Execution
It automatically opens orders when conditions are reachedChecks for the total of open ordersIt Closes Orders by itself
1 Views
0 Downloads
0 Favorites
qq_v2.1_gbpusd_MM
// Because of my dismal stupidity not even named this EA 
#property copyright "RamilT" 
#property link "RamilT@bk.ru" 


//-----------------------------------Òèïà ïåðåìåííûå----------------------------------------------------------- 
extern int Magic = 2222;
extern int pr=12; 
extern int sl=30; 
extern int tp=100; 
extern int tz=50; 
extern int mm=1; 
extern int qq=10; 
extern int chas1=5; 
extern int chas2=17; 
extern double Lots=1;
extern double TrailingStop = 0;

double BuyStop=0, PrevBuyStop=0, SellStop=0, PrevSellStop=0;
double Slippage =3, TakeProfit=0, StopLoss =0; 
//------------------------------------------------------------------------------------------------------------- 


int start() 
{ 
   if(Hour()<=chas1||Hour()>=chas2)return(0); 
   if(Bars<100) 
   { 
   Print("bars less than 100"); 
   return(0); 
   } 
//-----------------------------------Ìîíýé ìåíäæìåíò----------------------------------------------------------- 
   
   if (ScanTrades()>0 ) HideTrailStop();
   
   if (mm==1) 
   { 
   if(Lots<(MathCeil((AccountFreeMargin()/1000)*qq)/10)){Lots=(MathCeil((AccountFreeMargin()/10000)*qq)/10);if(Lots>100){Lots=100;}} 
   } 
//------------------------------------------------------------------------------------------------------------- 


//----------------------------------Ãëàâíûé àëãîðèòì----------------------------------------------------------- 
   if(ScanTrades()<1)
   { 
      if (((iOpen(NULL,5,1)-iClose(NULL,5,pr))>(Point*tz))&&(Ask>iOpen(NULL,5,1))) 
      { 
      if( tp>0 ) TakeProfit = Ask+tp*Point; else TakeProfit = 0;
      if( sl>0 ) StopLoss =  Ask-sl*Point;  else StopLoss = 0;
      OrderSend(Symbol(),OP_BUY,Lots,Ask,3,0,0,"qq-buy60",Magic,0,Blue); 
      BuyStop=0; PrevBuyStop=StopLoss;
      } 


      if (((iOpen(NULL,5,1)-iClose(NULL,5,pr))<(-Point*tz))&&(Bid<iOpen(NULL,5,1))) 
      { 
      if( tp>0 ) TakeProfit = Bid-tp*Point; else TakeProfit = 0;
      if( sl>0 ) StopLoss =  Bid+sl*Point;  else StopLoss = 0;
      OrderSend(Symbol(),OP_SELL,Lots,Bid,3,0,0,"qq-sell60",Magic,0,Red); 
      SellStop=0; PrevSellStop=StopLoss;
  
      } 
   } 
   
   

} 
//------------------------------------------------------------------------------------------------------------- 


 

int ScanTrades()
{   
   int total = OrdersTotal();
   int numords = 0;
      
   for(int cnt=0; cnt<total; cnt++) 
   {        
   OrderSelect(cnt, SELECT_BY_POS);            
   if(OrderSymbol() == Symbol() && OrderType()<=OP_SELLSTOP && OrderMagicNumber() == Magic) 
   numords++;
   }
   return(numords);
}  


void HideTrailStop()
{
   for (int cnt=0;cnt<OrdersTotal();cnt++)
   { 
   OrderSelect(cnt, SELECT_BY_POS);   
   int mode=OrderType();    
      if ( OrderSymbol()==Symbol() && OrderMagicNumber()==Magic) 
      {
         if (mode==OP_BUY) 
         {
			   if ( TrailingStop >0 )
			   {
			   BuyStop = Bid - TrailingStop*Point;
			   if (BuyStop < PrevBuyStop ) BuyStop = PrevBuyStop;       
               if( OrderOpenPrice() <= BuyStop ) 
               {   
			         if ( Bid <= BuyStop || (Bid >= TakeProfit && TakeProfit>0) || Bid <= StopLoss)
			         {
			         OrderClose(OrderTicket(),OrderLots(),Bid,Slippage,Yellow);
			         return(0);
			         }
               }            
            }
            else
            if ( (Bid >= TakeProfit && TakeProfit>0) || Bid <= StopLoss)
			   {
			   Print("BUY: TP = ",TakeProfit," SL=", StopLoss);
			   OrderClose(OrderTicket(),OrderLots(),Bid,Slippage,Yellow);
			   return(0);
			   }
         }   
// - SELL Orders          
         if (mode==OP_SELL)
         {
            Print("SEll: TP = ",TakeProfit," SL=", StopLoss," Ask=", Ask);
            if ( TrailingStop >0 )
			   {
            SellStop = Ask + Point * TrailingStop;   
            if (SellStop > PrevSellStop && PrevSellStop > 0) SellStop = PrevSellStop; 
         
               if( OrderOpenPrice() >= SellStop) 
               {
                  if ( Ask >= SellStop || Ask <= TakeProfit || ( Ask >= StopLoss && StopLoss > 0))
                  {
                  OrderClose(OrderTicket(),OrderLots(),Ask,Slippage,White);
                  return(0);
                  }
   			   }	    
            }
            else
               if ( Ask <= TakeProfit || ( Ask >= StopLoss && StopLoss > 0))
               {
               Print("SEll: TP = ",TakeProfit," SL=", StopLoss);
               OrderClose(OrderTicket(),OrderLots(),Ask,Slippage,White);
               return(0);
               }
            }   
         }
      }     
   PrevBuyStop  = BuyStop;
   PrevSellStop = SellStop;
}

Profitability Reports

NZD/USD Oct 2024 - Jan 2025
0.00
Total Trades 765
Won Trades 0
Lost trades 765
Win Rate 0.00 %
Expected payoff -13.05
Gross Profit 0.00
Gross Loss -9985.40
Total Net Profit -9985.40
-100%
-50%
0%
50%
100%
GBP/USD Oct 2024 - Jan 2025
0.56
Total Trades 2340
Won Trades 344
Lost trades 1996
Win Rate 14.70 %
Expected payoff -4.26
Gross Profit 12609.20
Gross Loss -22571.70
Total Net Profit -9962.50
-100%
-50%
0%
50%
100%
AUD/USD Oct 2024 - Jan 2025
0.42
Total Trades 1233
Won Trades 0
Lost trades 0
Win Rate 0.00 %
Expected payoff -7.35
Gross Profit 6531.80
Gross Loss -15588.30
Total Net Profit -9056.50
-100%
-50%
0%
50%
100%

Comments