EA 往復ビンタ CS

往復ビンタ君　というEAがあります。
前足が上昇した時は下降にベットするＥＡなのですが、過去データーから見ると４時間足以上で有意差があるという結果がでました。

しかしクローズをシャンデリアストップにすると１分足でも稼げるようになりました。
複利なしで１０万　⇒五か月⇒　１００万
うーん我ながらすごいｗ


しかし最近エントリーＥ（）とＴＳ（）の関数ばかり使っている気がします・・・

#property copyright "Copyright 2016/5/20,TACA"
#property link      "http://mt4kyoto.blogspot.jp/"
extern int TSProfit=20;
extern int MAGIC=12;
extern int Spread=4;
extern double Lots=0.2;
datetime TimeOld;
int d,i;
double TSL,OTSL,SL;

void OnTick()
{
TS();
if(OrdersTotal()==0){
if(MarketInfo(Symbol(),MODE_SPREAD)<=Spread){
if(Time[0]!=TimeOld){TimeOld=Time[0];
if(Close[2]>Close[1]){E(0);}
if(Close[2]<Close[1]){E(1);}
}}}}

void E(int BoS){
if(BoS==0){TSL=Ask;SL=TSL-TSProfit*Point;}
else{TSL=Bid;SL=TSL+TSProfit*Point;}
d=OrderSend(Symbol(),BoS,Lots,TSL,2,SL,0,NULL,MAGIC,0,0);}

void TS()
{d=OrderSelect(0,SELECT_BY_POS);if(OrderType()==0)
{if(TSL<Close[0]){TSL=Close[0];SL=TSL-TSProfit*Point;}}
  else
{if(TSL>Close[0]){TSL=Close[0];SL=TSL+TSProfit*Point;}}
if(TSL!=OTSL)
{OTSL=TSL;for(i=OrdersTotal()-1;i>=0;i--)
{d=OrderSelect(i,SELECT_BY_POS);
 d=OrderModify(OrderTicket(),OrderOpenPrice(),SL,0,0,0);}}}