2016年11月7日月曜日

EA えれべーたーがーる♪

先日は短時間で作った雇用統計プログラム惨敗でした(;・∀・)
テストで動かすつもりだったのですがロットをなぜか1.0にしていたため、あぶら汗がたっぷり出ました。

そして、その反省を踏まえてアメリカ大統領選挙対策EAを開発しています。
また、BEEKS社から借りたVPS試験用のEAも開発中です。

そんな中、試行錯誤しているうちになぜかベッティングレートの探求をしてしまい
数時間たっぷりEXCELにハマってしまいました。
迷走しています。

両建てマーチンゲールから始まり両建てモンテカルロ、そして両建てイースト―コーストプログレと進み、両建てECBの改良で精根尽きました。

この時点でアメリカ大統領選挙のことは完全に忘れて、別のEAを作り始めていました。
以前エスカレーターボーイを作りながら思いついたシステムです。

なずけて「EA えれべーたーがーる♪」
この単語カタカナ表記は放送禁止用語だそうです><;


ボラティリティが0.01以上
でポジションが無ければ両建てエントリー
両建てとも幅0.3のシャンデリア・ストップで追っかけます。

トレーリングはボラティリティーが高い時に効果を発揮しやすいので、
0.01以上に限定しています。発注のタイミングは一切考えていません。




#property copyright"TACA 2016/11/7"
datetime t;int d,i;extern double LOTS=0.01,SL=0.3,Bnd=0.01;
void OnTick(){if(Time[0]!=t){t=Time[0];
if(iBands(Symbol(),PERIOD_CURRENT,14,1,0,PRICE_CLOSE,1,0)-iBands(Symbol(),PERIOD_CURRENT,14,1,0,PRICE_CLOSE,0,0)<Bnd)
{if(MarketInfo(Symbol(),13)<10 && OrdersTotal()==0){ORDSND();}if(OrdersTotal()!=0){ORDMDF();}}}}
void ORDSND(){d=OrderSend(Symbol(),OP_BUY, LOTS,Ask,1,Ask-1,0,"",11);d=OrderSend(Symbol(),OP_SELL,LOTS,Bid,1,Bid+1,0,"",11);}
void ORDMDF(){for(i=OrdersTotal()-1;i>=0;i--){d=OrderSelect(i,0);
if(OrderType()){if(OrderStopLoss()>Bid+SL){d=OrderModify(OrderTicket(),OrderOpenPrice(),Bid+SL,0,0);}}
else{if(OrderStopLoss()<Ask-SL){d=OrderModify(OrderTicket(),OrderOpenPrice(),Ask-SL,0,0);}}}}

月別で見ると試験の25ヵ月中15ヵ月がプラスです。
英国のA社のMT4で試験をしています。

大統領選挙は活性が高いので面白いかもしれませんね。



0 件のコメント:

コメントを投稿