EA T2

母国アメリカではＴ２と言えば近未来ロボット戦争映画ですが、
第三の母国スコットランドではＴ２と言えばトレインスポッティング！

見てきましたＴ２！トレインスポッティングの意味をにおわせるシーンなどありましたが内容は・・・

しかしトレスポには敬意を払う必要があります！！（なぜ？）

そこでＥＡ　Ｔ２を作りました。
オシレーターと上足の　！オシレーターをもちいてエントリーのトレーディングストップです。
似たようなのを何十回か作成しましたが、こいつはバランスがいいですね。
トレスポのような激しい展開を繰り返します。

#property copyright  "CopyRight 2017/04/30,TACA"
#property version    "1.00"
#property strict
int d,i;
datetime OldTime;
string S;
extern double lot=0.01;//ロット
extern int M=2;//MAGIC NUMBER
void OnInit(){S=Symbol();}
void OnTick()
{
if(Time[0]!=OldTime)
{
OldTime=Time[0];
if(OrdTtl()){CS();}
else
{
if(RSI(1)>70&&RSI(5)<60){EntrySell();}
if(RSI(1)<30&&RSI(5)>40){EntryLong();}
}
}
}
void EntryLong(){d=OrderSend(S,0,lot,Ask,0,Ask-0.3,0,"T2",M);d=OrderSelect(0,0);}
void EntrySell(){d=OrderSend(S,1,lot,Bid,0,Bid+0.3,0,"T2",M);d=OrderSelect(0,0);}
double RSI(int P){return(iRSI(S,P,14,0,0));}
int OrdTtl(){int OT=0;for(i=OrdersTotal()-1;i>=0;i--){if(OrderMagicNumber()==M){OT++;}}return(OT);}
void CS(){
if(!OrderType()&&OrderStopLoss()+0.3<Ask){d=OrderModify(OrderTicket(),OrderOpenPrice(),Ask-0.3,0,0,0);}
if( OrderType()&&OrderStopLoss()-0.3>Bid){d=OrderModify(OrderTicket(),OrderOpenPrice(),Bid+0.3,0,0,0);}
}

ちなみにＯｌｄＴｉｍｅで足ごとの動きに制限していますが、ここを外してＶシステムを載せると・・・・