EA Woody 新型クローズシステム Ｒシステム搭載！

朝起きてみると京の町が真っ白です！

こんな日は金閣寺が素敵なのですが、今日はおとなしくＥＡの作成をｗ

サイトを旅しているとロシア語のサイトにたどり着きました。

私の写真とプロフィールとあるＥＡの名前が紹介されていました。

そのＥＡで使っていたのがＶシステム　残高実態をカラムとして負けた時には小さく、勝った時には大きくエントリーするシステムでした。

残念ながら、ロシア人にはＡＬＬ　ＩＮと理解されていたようですが・・・

さて今回はＲシステム。ある先生（名だしの許可をもらっていないのでここではＳ先生とさせていただきます）に教えていただいたラウンドナンバーを利用したエントリー決済システムです。

ドル円の場合、市場では少数第一位が０もしくは５が意識されるというものです。

例えば１１０．６円からドル高で１１０．９円まで来ましたが、１１１．０円（小数第一位が０）が意識され反転するといったことです。

そこで、ロングエントリーは少数第一位が１もしくは６の時にエントリーし４．５もしくは９．５でクローズします。ショートもそんな感じです。

ボラティリティと方向性の確認のためＲＳＩを使っています。

Ｒシステム搭載初ＥＡの結果はいかに！！

ＯＡＮＤＡ　ＪＡＰＡＮ　ＦＸ　５Ｍを意識して

スプレッド５、ロット０．１でのチャレンジです。

単にＲＳＩ　３０－７０で見ているだけですがＲシステム搭載でこのような結果にｗ

世界初　Ｒシステム搭載のＥＡ　Ｗｏｏｄｙのソースです。

無料なのになぜか限定１００本です（１００ビューを超えたらソースは消す予定ですｗ）

#property strict

#property description"TACA"

int c,d,i,PosNum;

double RSI,AskD,BidD;

extern int Magic=884;

extern int SpreadLim=5;

extern string Com="Woody";

extern double Lots=0.1;

void OnTick()

{

OrderCheck();

if(!PosNum&&MarketInfo(Symbol(),MODE_SPREAD)<=SpreadLim)

{

RSI=iRSI(Symbol(),PERIOD_M1,14,PRICE_CLOSE,1);

if(RSI<30){EntryLong();}

if(RSI>70){EntryShort();}

}

}

void EntryLong()

{

AskD=int((Ask-(int)Ask)*10);

if(AskD==1){d=OrderSend(Symbol(),OP_BUY,Lots,Ask,0,(int)Ask,(int)Ask+0.45,Com+"　Long",Magic);}

if(AskD==6){d=OrderSend(Symbol(),OP_BUY,Lots,Ask,0,(int)Ask+0.5,(int)Ask+0.95,Com+"　Long",Magic);}

}

void EntryShort()

{

BidD=int((Bid-(int)Bid)*10);

if(BidD==8){d=OrderSend(Symbol(),OP_SELL,Lots,Bid,0,(int)Bid+1,(int)Bid+0.55,Com+"　Short",Magic);}

if(BidD==3){d=OrderSend(Symbol(),OP_SELL,Lots,Bid,0,(int)Bid+0.5,(int)Bid+0.05,Com+"　Short",Magic);}

}

void OrderCheck(){PosNum=0;for(i=OrdersTotal()-1;i>=0;i--){d=OrderSelect(i,SELECT_BY_POS);if(OrderMagicNumber()==Magic){PosNum++;}}}