Sistem_vetsher





//+------------------------------------------------------------------+
//|                                               Sistem_vetsher.mq4 |
//|                      Copyright © 2006, MetaQuotes Software Corp. |
//|                                        http://www.metaquotes.net |
//+------------------------------------------------------------------+
#property copyright "Copyright © 2006, MetaQuotes Software Corp."
#property link      "http://www.metaquotes.net"
#define MAGIC 130306

extern double        Lots=0.1;         // Êîëè÷åñòâî ëîòîâ äëÿ òîðãîâ
extern int           Profit=35;        // Âåëè÷èíà òåéêïðîôèòà, åñëè 0 - èãðàåì áåç ïðîôèòà
extern int           Stop=55;          // Âåëè÷èíà ñòîïëîññà, åñëè 0 - èãðàåì áåç ñòîïà
extern int           Slippage=5;       // Ïðîñêàëüçûâàíèå
extern string        Symb="*";         // Ñèìâîë äëÿ òîðãîâ. Åñëè * òî ïî òåêóùåìó ñèìâîëó ãðàôèêà
                                       // èíà÷å íóæíî âïèñàòü èíñòðóìåíò òèïà EURUSD
extern string        StartTime="16:00";// Âðåìÿ ñòàðòà ïî ãðèíâè÷ó

datetime             TimeStart;
double               stoplevel,profitlevel;
string               SMB;
bool                 trade=false;

//+------------------------------------------------------------------+
//| Îñíîâíàÿ ôóíêöèÿ                                                 |
//+------------------------------------------------------------------+
int start()
{
   int      i,b;
   
   // Ïåðåâîäèì âðåìÿ èç ñòðî÷íîé âåëè÷èíû StartTime âî âðåìåííÓþ TimeStart
   TimeStart=StrToTime(StartTime);
   // Åñëè òåêóùåå âðåìÿ ìåíüøå ñòàðòîâîãî èëè áîëüøå åãî íà 5 ìèíóò, òî âûõîäèì è íè÷åãî íå äåëàåì.
   // Íî ïðåäâàðèòåëüíî äåëàåì ïåðåìåííóþ trade ëîæíîé. Ïðîñòî ñáðàñûâàåì èíôîðìàöèþ î òîì, ÷òî óæå îòêðûâàëèñü.
   if(CurTime()<TimeStart || CurTime()>TimeStart+300) { trade=false; return(0); }
   // Åñëè trade èñòèííà, çíà÷èò óæå óñïåëè îòêðûòüñÿ.
   if(trade) return(0);
   // Åñëè öåíà îòêðûòèÿ â÷åðà áûëà áîëüøå öåíû çàêðûòèÿ, çíà÷èò ïîêóïàåì èíà÷å ïðîäà¸ì
   if(((iClose(SMB,PERIOD_D1,1)+iHigh(SMB,PERIOD_D1,1)+iLow(SMB,PERIOD_D1,1))/3)>iClose(SMB,PERIOD_D1,1)) b=OP_BUY; else b=OP_SELL;
   // Åñëè ïîêóïàåì
   if(b==OP_BUY)
   {
      // Åñëè Stop áûë çàäàí 0, òî â ñòîïóðîâåíü çàãîíÿåì 0, èíà÷å Ask-Stop
      if(Stop==0) stoplevel=0; else stoplevel=MarketInfo(SMB,MODE_ASK)-Stop*MarketInfo(SMB,MODE_POINT);
      // Òî æå è ñ ïðîôèò óðîâíåì
      if(Profit==0) profitlevel=0; else profitlevel=MarketInfo(SMB,MODE_ASK)+Profit*MarketInfo(SMB,MODE_POINT);
      // Îòêðûâàåìñÿ â ïîêóïêó îò öåíû Ask ñî ñòîïîì stoplevel è ïðîôèòîì profitlevel
      i=OrderSend(SMB,OP_BUY,Lots,MarketInfo(SMB,MODE_ASK),Slippage,stoplevel,profitlevel,NULL,MAGIC,0,Red);
      // Åñëè îðäåð óäà÷íî îòêðûëñÿ, òî èíäèêàòîð torg âçâîäèì â èñòèíó, ÷òîáû áîëüøå ïîêà íå òîðãîâàòü
      if(i!=-1) trade=true;
   }
   // Ñ ïðîäàæåé òî æå ñàìîå, ÷òî è ñ ïîêóïêîé.
   if(b==OP_SELL)
   {
      if(Stop==0) stoplevel=0; else stoplevel=MarketInfo(SMB,MODE_BID)+Stop*MarketInfo(SMB,MODE_POINT);
      if(Profit==0) profitlevel=0; else profitlevel=MarketInfo(SMB,MODE_BID)-Profit*MarketInfo(SMB,MODE_POINT);
      i=OrderSend(SMB,OP_SELL,Lots,MarketInfo(SMB,MODE_BID),Slippage,stoplevel,profitlevel,NULL,MAGIC,0,Blue);
      if(i!=-1) trade=true;
   }
   return(0);
}
//+------------------------------------------------------------------+
//| Ôóíêöèÿ èíèöèàëèçàöèè ñîâåòíèêà                                  |
//+------------------------------------------------------------------+
int init()
{
   int i;
   // Îïðåäåëÿåì ïàðó äëÿ òîðãîâëè
   if(Symb=="*") SMB=Symbol(); else SMB=Symb;
   return(0);
}
//+------------------------------------------------------------------+
//| Ôóíêöèÿ äåèíèöèàëèçàöèè ñîâåòíèêà                                |
//+------------------------------------------------------------------+
int deinit() { return(0); }
//+------------------------------------------------------------------+



Sample





Analysis



Market Information Used:

Series array that contains the highest prices of each bar
Series array that contains the lowest prices of each bar
Series array that contains close prices for each bar


Indicator Curves created:


Indicators Used:



Custom Indicators Used:

Order Management characteristics:
It automatically opens orders when conditions are reached

Other Features:

BackTest : EURUSD on H1

From 2009-08-01 to 2009-10-01 Profit Factor:0.50 Total Net Profit:-65.50

BackTest : EURUSD on H1

From 2009-12-01 to 2010-01-17 Profit Factor:0.64 Total Net Profit:-32.00

BackTest : EURUSD on H1

From 2010-04-01 to 2010-04-30 Profit Factor:0.00 Total Net Profit:0.00

BackTest : EURUSD on H1

From 2010-05-01 to 2010-05-31 Profit Factor:0.00 Total Net Profit:0.00

BackTest : EURUSD on H1

From 2010-06-01 to 2010-06-30 Profit Factor:0.00 Total Net Profit:0.00

BackTest : GBPUSD on H1

From 2010-01-01 to 2010-02-27 Profit Factor:0.42 Total Net Profit:-76.00

BackTest : USDCAD on H1

From 2009-12-01 to 2010-01-01 Profit Factor:0.00 Total Net Profit:0.00

BackTest : USDCHF on H1

From 2009-12-01 to 2010-01-01 Profit Factor:0.00 Total Net Profit:0.00

BackTest : USDJPY on H1

From 2009-11-01 to 2009-11-30 Profit Factor:0.30 Total Net Profit:-56.22

Request Backtest for Sistem_vetsher


From : (yyyy/mm/dd) To: (yyyy/mm/dd)

Pair: Period: