Help on writing simple program for backtesting with graphics

[rachit]

Hello Friends,

I am new to this site and dont know writing any programs for backtesting.

I shall be thankful if somebody writes a simple program for me. I think some good programmer shall only take half - day to write it. If anybody is interested to do it, please reply.

[Tjipke de Vries]

https://www.mql5.com/en/code and more in Code Base

//+------------------------------------------------------------------+
//|                                                    neroTrade.mq4 |
//|                                  Copyright © 2008 Gryb Alexander |
//|                                                                  |
//+------------------------------------------------------------------+
#property copyright "Copyright © 2008 Gryb Alexander"
#property link      ""

extern int stop = 120;
extern double lots = 1;

int slippage = 3;

datetime curTime;
//+------------------------------------------------------------------+
//| expert initialization function                                   |
//+------------------------------------------------------------------+
int init()
  {
//----
   
//----
   return(0);
  }
//+------------------------------------------------------------------+
//| expert deinitialization function                                 |
//+------------------------------------------------------------------+
int deinit()
  {
//----
   
//----
   return(0);
  }
//+------------------------------------------------------------------+
//| expert start function                                            |
//+------------------------------------------------------------------+
int start()
  {
//----
if((Time[0]!=curTime))
{   
   curTime=Time[0];
   
   if(OrdersTotal()==0)
   {
     if(Open[0]>Open[3])  OrderSend(Symbol(),OP_BUY,lots,Ask,slippage,Ask-stop*Point,0);    
     if(Open[0]<=Open[3])   OrderSend(Symbol(),OP_SELL,lots,Bid,slippage,Bid+stop*Point,0); 
   }
   else
   {
     OrderSelect(0,SELECT_BY_POS);
     if(OrderType()==OP_BUY)
       OrderClose(OrderTicket(),OrderLots(),Bid,3);
     if(OrderType()==OP_SELL)
       OrderClose(OrderTicket(),OrderLots(),Ask,3);
     if(Open[0]>Open[3])  OrderSend(Symbol(),OP_BUY,lots,Ask,slippage,Ask-stop*Point,0);    
     if(Open[0]<=Open[3])   OrderSend(Symbol(),OP_SELL,lots,Bid,slippage,Bid+stop*Point,0); 

   }
}

//----
   return(0);
  }
//+------------------------------------------------------------------+

For practise, Testing and working on a very simple program...