Советники, эксперты, форекс роботы Обсуждение, поиск и тестирование форекс советников, роботов, экспертов и МТС

Ответить
17.01.2015, 14:28
Регистрация: 15.08.2012 / Адрес: wwwleningradspb.ru / Сообщений: 1,353
Поблагодарили 2,103 раз(а) / Репутация: 2134

По умолчанию Price Action EA

Нашёл на забугорном форуме. Советник вроде как не использует индикаторы. Тест проведён с 1995 по 2014.



Настройки по дефолту рассчитаны на 10 000$

Работает вроде только на дневном графике.

Price Action EA

PHP код:
//|$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$
//  Price Action V1
//  hodhabi@gmail.com
//|$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$
#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==trueSendMail("YTF Alert""New order has been added  "+OrdersTotal()+"   Balance = " +AccountBalance() + " Equity = "+AccountEquity() +" Current Price: " Close[0]);
  return;
}
 
void DrawHorizentalLine()
{
ObjectCreate("TProfit"OBJ_HLINE0Time[1], Close[0]+500*Point);            
            
ObjectSet("Tprofit"OBJPROP_STYLESTYLE_SOLID);
            
ObjectSet("Tprofit"OBJPROP_COLORMediumSeaGreen); 
}
 
 
//+------------------------------------------------------------------------+
//| Closes everything
//+------------------------------------------------------------------------+
void CloseAll()
{
  for(
int i=OrdersTotal()-1;i>=0;i--)
 {
    
OrderSelect(iSELECT_BY_POS);
    
bool result false;
        if ( 
OrderType() == OP_BUY && OrderMagicNumber()== MagicNumber)  result OrderCloseOrderTicket(), OrderLots(), MarketInfo(OrderSymbol(), MODE_BID), 5Red );
        if ( 
OrderType() == OP_SELL && OrderMagicNumber()==MagicNumber)  result OrderCloseOrderTicket(), OrderLots(), MarketInfo(OrderSymbol(), MODE_ASK), 5Red );
        if (
UseAlertsPlaySound("alert.wav");
 }
  return; 
}
 
 
void CloseAllBuy()
{
  for(
int i=OrdersTotal()-1;i>=0;i--)
 {
    
OrderSelect(iSELECT_BY_POS);
    
bool result false;
        if ( 
OrderType() == OP_BUY && OrderMagicNumber()==MagicNumber)  result OrderCloseOrderTicket(), OrderLots(), MarketInfo(OrderSymbol(), MODE_BID), 5Red );
        if (
UseAlertsPlaySound("alert.wav");
 }
  return; 
}
 
void CloseAllSell()
{
  for(
int i=OrdersTotal()-1;i>=0;i--)
 {
    
OrderSelect(iSELECT_BY_POS);
    
bool result false;
        if ( 
OrderType() == OP_SELL && OrderMagicNumber()==MagicNumber)  result OrderCloseOrderTicket(), OrderLots(), MarketInfo(OrderSymbol(), MODE_ASK), 5Red );
        if (
UseAlertsPlaySound("alert.wav");
 }
  return; 
}
   
//+------------------------------------------------------------------------+
//| cancels all orders that are in profit
//+------------------------------------------------------------------------+

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

 
//+-----------+
//| Main      |
//+-----------+
int start()
  {
   
int      OrdersBUYticket;
   
int      OrdersSELL;
   
double   BuyLotsSellLotsBuyProfitSellProfit;
 
//+------------------------------------------------------------------+
//  Determine last order price                                       |
//-------------------------------------------------------------------+
 
 
      
if(OrdersTotal()==&& TradeType ==)
        {
         
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()==&& 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() 
[свернуть]


_http://www.indicatorsmt4.com/expert-advisors/price-action-ea/ для тех, кто захочет оставить свой отзыв "автору".
17.01.2015, 14:47
Аватар для slav0n
slav0n slav0n вне форума Почётный гражданин
Регистрация: 05.11.2014 / Сообщений: 491
Поблагодарили 423 раз(а) / Репутация: 459
Тиковый советник, тестерный грааль, запазуха бога. Называй как хочешь, обычный сливатор, который открывает сделки в тесте, но НЕ сможет этого сделать на реале.
Bullra 
17.01.2015, 21:47
Аватар для ILL1
ILL1 ILL1 на форуме Интересующийся
Регистрация: 11.04.2014 / Сообщений: 18
Поблагодарили 2 раз(а) / Репутация: 3
Тиковый советник, тестерный грааль, запазуха бога. Называй как хочешь, обычный сливатор, который открывает сделки в тесте, но НЕ сможет этого сделать на реале.
Не знаю чем люди тестируют, но на 99% качестве теста, сова сливает и очень жестко.
Люди выкладывают граальные отчеты с советниками и сетами, но на нормальном тестере всегда сливают.
Ответить


Опции темы

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Trackbacks are Выкл.
Pingbacks are Выкл.
Refbacks are Выкл.



Текущее время: 01:39. Часовой пояс GMT.


Перевод: zCarot
Copyright ©2000 - 2017, Jelsoft Enterprises Ltd.
SEO by vBSEO