Order Taker EA

Quoting scottyfromau

Disliked

Trying to make an EA that will autocalculate how many lots I should trade for a given risk amount.

e.g.

say I want to long euro/usd at 1.35, TP at 1.36 with a stop loss at 1.33. I only want to risk 3.5% of my account on this trade and my account has $10,000.

so 10,000*0.035 = 350, 350/200 = 1.75. Thus each pip needs to be worth $1.75 dollars, equivalent to 1.75 mini lots (17,500 euro's).

Once I nominate how much risk (percentage wise) I want to take, what my entry price is and my stop level. I want the ea to autocalculate the rest....

Ignored

//+------------------------------------------------------------------+
//|                                                  Order Taker.mq4 |
//|                      Copyright © 2011, MetaQuotes Software Corp. |
//|                                        http://www.metaquotes.net |
//+------------------------------------------------------------------+
#property copyright "Copyright © 2011, MetaQuotes Software Corp."
#property link      "http://www.metaquotes.net"

//--- input parameters
extern double STHigh=0.0;
extern double STLow=0.0;
extern string type;
extern double risk = 3.5;

int ticket;

int init()
  {

   return(0);
  }

int deinit()
  {

   return(0);
  }

int start()
  {
  
  double Targetlong = STHigh + (STHigh-STLow) + 0.002;
  double Targetshort = STLow - (STHigh-STLow) + 0.002;
  double EntryHigh = STHigh + 0.0001;
  double EntryLow = STLow - 0.0001;
  double LongStop = STLow - 0.003;
  double ShortStop = STHigh + 0.003;
  double Lots = (AccountEquity()*(risk/100))/(STHigh-STLow+0.004);
  
  double dSlippageAllowed;
  
  dSlippageAllowed = Point * 10;  //number of points allowed for slippage on orders sent
  
  if(OrdersTotal()==0) {
    OrderSelect(ticket, SELECT_BY_TICKET);
      
    if(type=="short") {
      if(Bid==EntryLow) {
        ticket=OrderSend(Symbol(), OP_SELLLIMIT, Lots, Bid, dSlippageAllowed, ShortStop, 0);
      } 
         
      if((OrdersTotal()!=0) && (type=="short")) {
        if(Ask==Targetshort) {
          ticket=OrderSend(Symbol(), OP_BUY, Lots*0.7, Bid, dSlippageAllowed, 0, 0); 
        }
      }  
    }         
         
    OrderSelect(ticket, SELECT_BY_TICKET);
      
    if(type=="long") {
      if(Ask==EntryHigh) {
        ticket=OrderSend(Symbol(), OP_BUYLIMIT, Lots, Ask, dSlippageAllowed, LongStop,0); 
      }  
      if((OrdersTotal()!=0) && (type=="long")) {
        if(Ask==Targetlong) {
          ticket=OrderSend(Symbol(), OP_SELL, Lots*0.7, Ask, dSlippageAllowed, 0, 0);
        }
      }
    }            
  }      

  return(0);
}

Quoting nubcake

Disliked

omg this is fuggin MESSY!!!!!!!!!!!!!!!!!!!!

Ignored

Quoting Iamfx

Disliked

Try this --its excellent.

Ignored