常に上下に相場は動いている。
その動きを細かく取ることは出来ないだろうか！
一切の指標を否定し、ただひたすら両建てを繰り返すことで
それを可能にすることができた。
EA THE T3を紹介しよう。
#property copyright "CopyRight 2017/04/30,TACA"
#property version "1.00"
#property strict
int d,i,OCL,OCS;
datetime OldTime;
string S;
extern double lot=0.1;//ロット
extern int M=3;//MAGIC NUMBER
extern double CSP=0.27;
void OnInit(){S=Symbol();}
void OnTick()
{
if(Time[0]!=OldTime)
{
OldTime=Time[0];
CS();
OrderCheck();
if(!OCL)EntryLong();
if(!OCS)EntrySell();
}
}
void EntryLong(){d=OrderSend(S,0,lot,Ask,0,Ask-CSP,0,"T3",M);d=OrderSelect(0,0);}
void EntrySell(){d=OrderSend(S,1,lot,Bid,0,Bid+CSP,0,"T3",M);d=OrderSelect(0,0);}
double RSI(int P){return(iRSI(S,P,14,0,0));}
void OrderCheck(){OCL=0;OCS=0;for(i=OrdersTotal()-1;i>=0;i--){d=OrderSelect(i,0);
if(OrderMagicNumber()==M){if(!OrderType()){OCL++;}else{OCS++;}}}}
void CS(){
if(!OrderType()&&OrderStopLoss()+0.3<Ask){d=OrderModify(OrderTicket(),OrderOpenPrice(),Ask-CSP,0,0,0);}
if( OrderType()&&OrderStopLoss()-0.3>Bid){d=OrderModify(OrderTicket(),OrderOpenPrice(),Bid+CSP,0,0,0);}
}
チャートを見ると一回で大きく勝っただけに見えるので、月別のプロフィットも参考までに作りました。どじゃ～！
| 行ラベル | 合計 / Profit |
| 2016 | 99,530 |
| 01 | -8,780 |
| 02 | 1,890 |
| 03 | -8,200 |
| 04 | -11,480 |
| 05 | 21,280 |
| 06 | 94,080 |
| 07 | 3,340 |
| 08 | 5,030 |
| 09 | -10,140 |
| 10 | -3,480 |
| 11 | 12,230 |
| 12 | 3,760 |
| 総計 | 99,530 |
