#include <profile.c>
#define H24 (1440/BarPeriod)
#define H4 (240/BarPeriod)
#define H1 (60/BarPeriod)
function run()
{
   BarPeriod = 60;	
	LookBack = 200;	
	StartDate = 20170620;
	EndDate = 20170706; 	
	//StartWeek=10000;
	//EndWeek=52350;
	static bool LongOp,LongSignal,ShortOp,ShortSignal;
   static int counter;	
	if(is(INITRUN))
	 { 
	 ShortOp=false;
	 LongOp=false;
	 ShortSignal=false;
	 LongSignal=false;
	 counter=0;
	 }

	vars Price=series(price());
	vars D1Close = series(priceClose());
	var Lowx,Highx;
	Lowx=dayLow(UTC,1);
	Highx=dayHigh(UTC,1);

   print(TO_LOG,"D1High= %f ,D1Low= %f",Highx,Lowx);
  
	if(crossOver(Price,Highx) and LongOp==false)
	{LongOp=true;ShortOp=false;counter=0;  plot("Dotted",1.01*price(),DOT,GREEN);}
	
	if(crossUnder(Price,Lowx) and ShortOp==false)
	{ShortOp=true;LongOp=false;counter=0;  plot("shorted",1.01*price(),DOT,RED);}
	
	plot("D1High",Highx,MAIN,BLUE);
	plot("D1Low",Lowx,MAIN,RED);
	set(PLOTNOW+TESTNOW+LOGFILE);
  }