/*[[
      Name := RunRabbit
      Author := 
      Lots := 1.00
      Stop Loss := 30
      Take Profit := 999
      Trailing Stop := 30
]]*/

var: alerttime(0),alerttime2(0),profitpoint(0),mode(0),cnt(0);
var: LongPoint(0), ShortPoint(0),TPlong(0),TPshort(0);


LongPoint  = abs(H[1]-(0.4*(H[1]-L[1])));
ShortPoint = abs(L[1]+(0.4*(H[1]-L[1])));
TPlong=abs(longpoint-(l[1]-1*point))+longpoint);
TPshort=abs(shortpoint+(h[1]+1*point))-shortpoint);


Comment("Place buy order at ",longpoint," SL at ",l[1]-1*point," TP at ",TPlong,"\n",
            "Place sell order at ",shortpoint," SL at ",h[1]+1*point," TP at ",TPshort);

if CurTime > AlertTime then
{
	If high[2]>=iBands(20,2,mode_high,2) then
	{
		If low[2]-10*point>=iBands(20,2,MODE_MAIN,2) then
		{
			If close[1]<open[1] then
			{
				Alert(symbol,hour,":",minute," Look for short entry on Gimee chart");
				AlertTime = CurTime + (Period - mod(Minute, Period))*60;
			};
		};
	};
};

if CurTime > AlertTime2 then
{
	If low[2]<=iBands(20,2,MODE_LOW,2)then
	{
		If high[2]+10*point<=iBands(20,2,MODE_MAIN,2) then
		{
			If close[1]>open[1] then
			{
				Alert(hour,":",minute," Look for long entry on Gimee chart");
				AlertTime2 = CurTime + (Period - mod(Minute, Period))*60;
			};
		};
	};
};

profitpoint=iBands(20,2,MODE_MAIN,1);

for cnt=1 to TotalTrades
{
	mode=Ord(cnt,VAL_TYPE);

	//Modify Stop Order---------------------------------
	If mode==OP_BUY and Ord(cnt,VAL_SYMBOL)==Symbol and Ord(cnt,VAL_STOPLOSS)==0 then
  	{
      ModifyOrder(Ord(cnt,VAL_TICKET),Ord(cnt,VAL_OPENPRICE),l[1]-1*Point,Ord(cnt,VAL_TAKEPROFIT),DarkBlue);
      //print( "Run, run, rabbit run ", Bid );
	};

	If mode==OP_SELL and Ord(cnt,VAL_SYMBOL)==Symbol and Ord(cnt,VAL_STOPLOSS)==0 then
  	{
      ModifyOrder(Ord(cnt,VAL_TICKET),Ord(cnt,VAL_OPENPRICE),h[1]+1*Point,Ord(cnt,VAL_TAKEPROFIT),DarkRed);
      //print( "Run, run, rabbit run ", Ask );
  	};

	If mode==OP_BUY and Ord(cnt,VAL_SYMBOL)==Symbol and l[1]>l[2] then
  	{
      ModifyOrder(Ord(cnt,VAL_TICKET),Ord(cnt,VAL_OPENPRICE),l[1]-1*Point,profitpoint-5*Point,DarkBlue);
      //print( "Run, run, rabbit run ", Bid );
	};

	If mode==OP_SELL and Ord(cnt,VAL_SYMBOL)==Symbol and h[1]<h[2] then
  	{
      ModifyOrder(Ord(cnt,VAL_TICKET),Ord(cnt,VAL_OPENPRICE),h[1]+1*Point,profitpoint+5*Point,DarkRed);
      //print( "Run, run, rabbit run ", Ask );
  	};
 };