MA資金 (MAAveragingEURJPY M1)

M氏からのもうひとつのオーダーMA　Averaging　EURJPY。

MAのセッティングは非常にデリケートです。

Profit:9

FastP:4

SlowP:13

MMode:2

最大ベットは32本です。

10万円が+101,469 

セッティングで＋30万まで増やせます。

初期証拠金が豊富にある場合はトライしてみるのもいいかもしれません。

LOTは０．０１のみです。

もう少し最大ベット数を減らせるといいですね。

#property copyright "Copyright 2016/2/26,TACA&M"

#property link      "http://mt4kyoto.blogspot.jp/"

datetime TimeOld;

int Ticket;

extern int Profit=9;

extern int FastP=4;

extern int SlowP=13;

extern int MMode=2;

double PrSub;

double PosAve;

int Mode=0;

extern double Lots=0.01;

int start(){if(Time[0]!=TimeOld){TimeOld=Time[0];

if(OrdersTotal()==0){Mode=0;}

if(Mode>=0)

{if(iMA(NULL,1,FastP,0,MMode,0,2)<=iMA(NULL,1,SlowP,0,MMode,0,2))

{if(iMA(NULL,1,FastP,0,MMode,0,1)>iMA(NULL,1,SlowP,0,MMode,0,1))

{int b=OrderSend(NULL,0,Lots,Ask,3,0,Bid+Profit*Point,"Long",1231,0,Red);Mode=1;}}}

if(Mode<=0)

{if(iMA(NULL,1,FastP,0,MMode,0,2)>=iMA(NULL,1,SlowP,0,MMode,0,2))

{if(iMA(NULL,1,FastP,0,MMode,0,1)<iMA(NULL,1,SlowP,0,MMode,0,1))

{int c=OrderSend(NULL,1,Lots,Bid,3,0,Bid-Profit*Point,"Short",1231,0,Blue);Mode=-1;}}}    

Averaging();    

}return(0);}

int Averaging()

{ double LastPrice=0;double PosAll=0;double PosNum=0;

  for(int i=0;i<OrdersTotal();i++)

  {int d=OrderSelect(i,SELECT_BY_POS,MODE_TRADES);

    LastPrice=OrderOpenPrice();

    PosAll+=LastPrice*OrderLots();

    PosNum+=OrderLots();

  }

  if(PosNum==0){PosAve=0;}

  else{ PosAve=PosAll/PosNum;}   

  for(i=0;i<OrdersTotal();i++)

  { if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES)==True)

    { Ticket=OrderTicket();

      if(OrderType()==0)

      {PrSub=PosAve+Profit*Point;}

      else

      {PrSub=PosAve-Profit*Point;} 

    int e=OrderModify(Ticket,OrderOpenPrice(),0,PrSub,0,CLR_NONE);

    }

  }

return(0);

}