MQL4による自動売買プログラムがうまく動きません

前提・実現したいこと

MT4を使用する自動売買システムのプログラムを
試しに作成しています。
コンパイルは通るのですが、
バックテストをしてもうまくいかず、
実際に稼働させてみても、想定した場面でポジションをとってくれません。

前の足の高値、安値を、現在地が超えた瞬間に
ポジションをとることを想定しています。
正確に書くと下記のようになります。

＜前の足の高値を現在値が上抜いた場合＞
売りポジションを持っている場合は決済
新規買いポジションをとる

＜前の足の安値を現在値が下回った場合＞
上と逆です。

どうすればよいのかおしえていただけないでしょうか。

該当のソースコード

MQL4
1//+------------------------------------------------------------------+
2//|                                                         Test.mq4 |
3//|                        Copyright 2019, MetaQuotes Software Corp. |
4//|                                             https://www.mql5.com |
5//+------------------------------------------------------------------+
6#property copyright "Copyright 2019, MetaQuotes Software Corp."
7#property link      "https://www.mql5.com"
8#property version   "1.00"
9#property strict
10input double Lots =1;
11int Ticket = 0;   //チケット番号
12//+------------------------------------------------------------------+
13//| Expert initialization function                                   |
14//+------------------------------------------------------------------+
15int OnInit()
16  {
17//---
18   
19//---
20   return(INIT_SUCCEEDED);
21  }
22//+------------------------------------------------------------------+
23//| Expert deinitialization function                                 |
24//+------------------------------------------------------------------+
25void OnDeinit(const int reason)
26  {
27//---
28   
29  }
30//+------------------------------------------------------------------+
31//| Expert tick function                                             |
32//+------------------------------------------------------------------+
33void OnTick()
34  {
35//---
36   bool ret;
37   int pos = 0;
38   
39   if(OrderSelect(Ticket,SELECT_BY_TICKET) && OrderCloseTime() == 0)
40   {
41      if(OrderType() == OP_BUY) pos = 1;
42      if(OrderType() == OP_SELL) pos = 1;
43   } 
44   
45   if(Bid<Low[1])
46   {
47      if(pos<0)   //売りポジ持ちの場合は決済
48      {
49         ret = OrderClose(Ticket,OrderLots(),OrderClosePrice(),0);
50         if(ret) pos = 0;
51      }
52      
53      if(pos ==0) Ticket = OrderSend(_Symbol,OP_BUY,Lots,Ask,0,0,0);
54   }
55   
56      if(Ask>High[1])
57   {
58      if(pos>0)   //買いポジ持ちの場合は決済
59      {
60         ret = OrderClose(Ticket,OrderLots(),OrderClosePrice(),0);
61         if(ret) pos = 0;
62      }
63      
64      if(pos ==0) Ticket = OrderSend(_Symbol,OP_SELL,Lots,Bid,0,0,0);
65   }
66   
67  }
68//+------------------------------------------------------------------+
69

行動規範の内容に同意します

回答2件

上記のようなやり方をするならば、Ticketやposはそれぞれ売りと買いで２つ作らないといけませんね。
buy_ticket,sell_ticket
buy_pos,sell_pos
とするなど……。
あとOnTick()の中身は、ティックが変動するごと（価格が変動するごと）に一回処理されます。
ですのでOnTick()内で定義されたretやposの変数も、価格が動くたびにリセットされてしまいます。
常にpos=0になるかと。

投稿2019/08/02 18:29