//+------------------------------------------------------------------+ //| HedgeHog | //| Copyright 2006, Milan Volf | //| milan@mmtop.info | //+------------------------------------------------------------------+ //---- input parameters extern int Start=15; extern int StopLoss=50; extern int TakeProfit=10; extern double Lots=1; //+------------------------------------------------------------------+ //| expert start function | //+------------------------------------------------------------------+ int start() { //---- int i,j,Ticket,StartTime,Bought=0,Sold=0,Closed; double Vol; string Text; //Count time StartTime= StrToTime(Start+":53"); //Setup comment Text="HH"+Symbol(); //Set orders if(CurTime()>= StartTime && CurTime()CurTime()-3600) Bought++; if(OrderComment()==Text && OrderType()==OP_SELL && OrderOpenTime()>CurTime()-3600) Sold++; } if(Bought==0){ //no buy order if(GlobalVariableGet("Closed")==1) Vol=2*Lots; else Vol=Lots; Ticket=OrderSend(Symbol(),OP_BUY,Vol,Ask,3,Ask-StopLoss*Point,Ask+TakeProfit*Point,Text,0,0,Green); PlaySound("expert.wav"); Sleep(10000); } if(Sold==0){ //no sell order if(GlobalVariableGet("Closed")==2) Vol=2*Lots; else Vol=Lots; Ticket=OrderSend(Symbol(),OP_SELL,Vol,Bid,3,Bid+StopLoss*Point,Bid-TakeProfit*Point,Text,0,0,Green); PlaySound("expert.wav"); Sleep(10000); } if(GlobalVariableCheck("Closed")) GlobalVariableDel("Closed"); } //Manage opened orders for (i=0;i=OrderOpenTime()+2*24*3600-300){ if(OrderType()==OP_BUY){ OrderClose(OrderTicket(),OrderLots(),Bid,3,Red); PlaySound("expert.wav"); GlobalVariableSet("Closed",1); Sleep(10000); } if(OrderType()==OP_SELL){ OrderClose(OrderTicket(),OrderLots(),Ask,3,Red); PlaySound("expert.wav"); GlobalVariableSet("Closed",2); Sleep(10000); } } } return(0); } //+------------------------------------------------------------------+