週に１度ランダムにトレードするEA

Code

昨日のUSDCHFの動きのせいで、風邪を引いてしまったようです...。orz
書くネタも無いので、週に１度ランダムに仕掛けるEA をおいておきます。

int init()
{
   MathSrand(GetTickCount());
   return(0);
}
int start()
{
   static datetime LastTrade = 0;
   if(TimeCurrent() - LastTrade < 60*60*24*5 ) return(0);
   LastTrade = TimeCurrent();
   
   if(OrderSelect(0,SELECT_BY_POS)){
      double price;
      if(OrderType()==OP_BUY) price = Bid; else price = Ask;
      OrderClose(OrderTicket(),OrderLots(),price,0,Green);
   }
   if(MathRand()/32767.0 > 0.5){
      OrderSend(Symbol(),OP_BUY,1,Ask,0,Bid-500*Point,0,"",1,0,Blue);
   }else{
      OrderSend(Symbol(),OP_SELL,1,Bid,0,Ask+500*Point,0,"",1,0,Red);
   }
   return(0);
}