顺水外汇EA交易网MT4

标题: [EA]Price Action V1 [打印本页]

作者: 奔富 时间: 2014-5-7 20:29
没法导入mql4里面去呀能直接上个mql4文件吗？谢谢

作者: jiuhongzhi 时间: 2014-5-7 20:59
你是个好人

作者: pantianqiong 时间: 2014-5-7 20:59

已经更新，谢谢，我把文件名改了，源码是一样的

作者: cxrwq 时间: 2014-5-7 21:04
无法测试

作者: 潇洒的微笑 时间: 2014-5-7 21:04
luntanhao

作者: lapneng 时间: 2014-5-7 21:44
无法测试哦, !!!! >.<

作者: 人民币 时间: 2014-5-7 22:20
路过。。看下这个

作者: pantianqiong 时间: 2014-5-7 23:32
lot size is 0.01 for each $100.

作者: zzpp05 时间: 2014-5-8 00:33
好像不能用啊

作者: 569250324 时间: 2014-5-8 03:20
这个看不到

作者: ahuang62 时间: 2014-5-8 13:05
呵呵，回测不能开单的EA

作者: pantianqiong 时间: 2014-5-8 14:15
标题: [EA]Price Action V1
//|$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$
//  Price Action V1
//
//|$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$
#define    NL "\n"

extern double Lots = 1;
extern double TP = 100;
extern int TradeType    = 0;       // 0 to follow the trend, 1 to force buy, 2 to force sell
extern int leverage = 5;
extern double MaximumLossinMoney = 1000;
extern int MagicNumber       = 250346;
extern bool UseAlerts = false;

//+-------------+
//| Custom init |
//|-------------+
int init()
  {

  }

//+----------------+
//| Custom DE-init |
//+----------------+
int deinit()
  {

  }

void sendEmail()
{
  if (UseAlerts==true) SendMail("YTF Alert", "New order has been added  "+OrdersTotal()+" Balance = " +AccountBalance() + " Equity = "+AccountEquity() +" Current Price: " + Close[0]);
  return;
}

void DrawHorizentalLine()
{
ObjectCreate("TProfit", OBJ_HLINE, 0, Time[1], Close[0]+500*Point);
         ObjectSet("Tprofit", OBJPROP_STYLE, STYLE_SOLID);
         ObjectSet("Tprofit", OBJPROP_COLOR, MediumSeaGreen);
}

//+------------------------------------------------------------------------+
//| Closes everything
//+------------------------------------------------------------------------+
void CloseAll()
{
  for(int i=OrdersTotal()-1;i>=0;i--)
{
OrderSelect(i, SELECT_BY_POS);
bool result = false;
      if ( OrderType() == OP_BUY && OrderMagicNumber()== MagicNumber)  result = OrderClose( OrderTicket(), OrderLots(), MarketInfo(OrderSymbol(), MODE_BID), 5, Red );
      if ( OrderType() == OP_SELL && OrderMagicNumber()==MagicNumber)  result = OrderClose( OrderTicket(), OrderLots(), MarketInfo(OrderSymbol(), MODE_ASK), 5, Red );
      if (UseAlerts) PlaySound("alert.wav");
}
  return;
}

void CloseAllBuy()
{
  for(int i=OrdersTotal()-1;i>=0;i--)
{
OrderSelect(i, SELECT_BY_POS);
bool result = false;
      if ( OrderType() == OP_BUY && OrderMagicNumber()==MagicNumber)  result = OrderClose( OrderTicket(), OrderLots(), MarketInfo(OrderSymbol(), MODE_BID), 5, Red );
      if (UseAlerts) PlaySound("alert.wav");
}
  return;
}

void CloseAllSell()
{
  for(int i=OrdersTotal()-1;i>=0;i--)
{
OrderSelect(i, SELECT_BY_POS);
bool result = false;
      if ( OrderType() == OP_SELL && OrderMagicNumber()==MagicNumber)  result = OrderClose( OrderTicket(), OrderLots(), MarketInfo(OrderSymbol(), MODE_ASK), 5, Red );
      if (UseAlerts) PlaySound("alert.wav");
}
  return;
}

//+------------------------------------------------------------------------+
//| cancels all orders that are in profit
//+------------------------------------------------------------------------+

//+------------------------------------------------------------------------+
//| cancels all pending orders
//+------------------------------------------------------------------------+

//+-----------+
//| Main    |
//+-----------+
int start()
  {
int    OrdersBUY, ticket;
int    OrdersSELL;
double BuyLots, SellLots, BuyProfit, SellProfit;

//+------------------------------------------------------------------+
//  Determine last order price                                     |
//-------------------------------------------------------------------+

   if(OrdersTotal()==0 && TradeType ==1 )
      {
      ticket=OrderSend(Symbol(),OP_BUY,Lots,Ask,3,Ask-TP*Point,Ask+leverage*TP*Point,"MLTrendETF",MagicNumber,0,Green);
      TradeType=2;

      if(ticket>0)
         {
         if(OrderSelect(ticket,SELECT_BY_TICKET,MODE_TRADES)) sendEmail();
         }
      else Print("Error opening BUY order : ",GetLastError());
      return(0);
      }

   if(OrdersTotal()==0 && TradeType ==2)
      {
      ticket=OrderSend(Symbol(),OP_SELL,Lots,Bid,3,Bid+TP*Point,Bid-TP*leverage*Point,"MLTrendETF",MagicNumber,0,Green);
      TradeType = 1;
      if(ticket>0)
         {
         if(OrderSelect(ticket,SELECT_BY_TICKET,MODE_TRADES)) sendEmail();
         }
      else Print("Error opening BUY order : ",GetLastError());
      return(0);
      }

  } // start()

作者: zhaoxj 时间: 2014-5-9 10:58
0FX有你更精彩

作者: tokio147 时间: 2014-5-9 15:19
回测不了？是不是缺少了DLL？

作者: .冰 时间: 2014-5-9 17:10
没介绍什么类型的啊，就不下了~~~~~~~~

欢迎光临顺水外汇EA交易网MT4 (http://waterforex.com/)