勝てば官軍! ~ 日経225システムトレード編 -23ページ目

【検証】【5分足】R2ブレイク

http://secret.ameba.jp/traderssystem/amemberentry-10145478870.html



DT2101_1

デフォルトパラメータでの結果です。

マイナスとなっており、いまいちな結果です。


DT2101_2

最適化の結果です。

若干のプラスとなりますが、運用はちょっと厳しいかと思います。


【実装】ギャップ検出プログラム

ギャップ検出プログラム(注目点)


-----------------------------

If Close[1] * 0.95 > CloseThen

Begin

Plot1(High,“DDD", MAGENTA);

Alert("");

End;

-----------------------------


トレイダーズ証券のオンラインセミナー で紹介されていた

ソースコードをそのまま貼り付けています。


注目点(既存では3ファイルのみ)のプログラムは

戦略を検証するときに活用できると思います。




日経225

【実装】R2ブレイク

【検証】【日足】柳谷OOPS

http://secret.ameba.jp/traderssystem/amemberentry-10145478411.html



SW7801_1

いまいちの結果となっています。


【実装】柳谷OOPS

当ブログの位置づけ

システムトレーディングの裾野の拡大には以下の2つが重要と考えています。

・シストレ(≒ルールに基づく売買)の重要性の啓蒙

・シストレ(≒自動売買)を実践するための知識


当ブログでは後者に力点を置いています。

そのなかでも以下の点を重視しています。


自動売買の方法

 自力でのシグナル作成、発注 > 業者によるシグナル配信

ツール

 TradeStadium > エクセル、TradeStation、TradeSignal …

言語

 YesLanguage > EasyLanguage、エキーラ、エクセル関数、VBA…




【検証】【日足】2日ギャップトレード

http://ameblo.jp/traderssystem/entry-10145478016.html



SW7701_1

パラメータのない戦略です。

成績は良好ですが回数が少なすぎます。


【実装】2日ギャップトレード

http://ameblo.jp/traderssystem/entry-10136747571.html

を元に作成しました。


-------------------------------------------------

//ギャップアップ(L[0]>H[1])の翌日、翌々日の安値が
//ギャップ日の高値より高い
//→OnClose

If Low[0] > High[2] and
Low[1] > High[2] and
Low[2] > High[3] Then {


Buy();
}


If High[0] < Low[2] and
High[1] < Low[2] and
High[2] < Low[3] Then {


Sell();
}

-------------------------------------------------


高値、安値だけで売買を決定しています。


【検証】【日足】8本足の移動平均

http://ameblo.jp/traderssystem/entry-10145477535.html



AtMarket注文での結果です。

収益はプラスですが勝率の低さ、DDの大きさがネックです。


SW7601_2

OnClose注文での結果です

AtMarketのときと同じような感じです。


SW7601_3

AtMarket注文で

売買を逆転させてみました。

かなりいい成績となっています。

(151000で日計決済としています)


SW7601_5

上の結果から大引け決済を無しにしたものです。

オーバーナイトのリスクを背負っているにもかかわらず

収益を大きく損ねています。



一番利益が出た戦略のコードを再掲しておきます

最適化により35日の結果となっています

-------------------------------------

Input : period(8);

If CrossUp(Ma(Close, period), Ma(Open, period)) Then {
Sell("売", AtMarket);
}

If CrossDown(Ma(Close, period), Ma(Open, period)) Then {
Buy("買", AtMarket);
}

SetStopEndofday(151000);

-------------------------------------


実装代行業

今のところそんな予定はないですが

実装代行業をやるとしたら課金方法は

2段階にしたほうがいいのかなと休暇中に考えてみました。


1.要件定義~戦略構築まで

定額制(一律X円)


2.依頼者の運用開始

プログラムの規模・難度または戦略の有効性による課金



1.では依頼者の要望に基づいて戦略の実装を行い、

対面(業者側オフィス)で検証結果の確認 または

依頼者へソースコードの配布


2.で依頼者はその戦略で運用するかを判断、

するときは入金を行う。

入金がない場合は業者側が自由に戦略を公開してよいとする。



こういう形ならば有効性が確認できていない戦略に対して

業者を活用するということがしやすくなるのかなと考えてみました。