時系列と指標データへのアクセス

int copied=CopyBuffer(ma_handle,// 指標値
0,       // 指標バッファのインデックス
0,       // コピー開始位置
number,   // 複製する値の数
Buffer   // 値を受け取る配列
);
if(copied<0) return;
int k=0;
while(k<copied && !IsStopped())
{
//— k インデックスの値を取得する
double value=Buffer[k];
// …
// 値を操作する
k++;
}

input int per=10; // 指数の期間
int ma_handle;   // 指標ハンドル
//+——————————————————————+
//| エキスパート初期化に使用される関数                                        |
//+——————————————————————+
int OnInit()
{
//—
ma_handle=iMA(_Symbol,0,per,0,MODE_EMA,PRICE_CLOSE);
//—
return(INIT_SUCCEEDED);
}
//+——————————————————————+
//| エキスパートティック関数                                                 |
//+——————————————————————+
void OnTick()
{
//—
double ema[10];
int copied=CopyBuffer(ma_handle,// 指標ハンドル
0,       // 指標バッファのインデックス
0,       // コピー開始位置
10,       // 複製する値の数
ema       // 値を受け取る配列
);
if(copied<0) return;
// …. 更なるコード
}

int CheckLoadHistory(string symbol,ENUM_TIMEFRAMES period,datetime start_date)
{
}

  if(symbol==NULL || symbol==“”) symbol=Symbol();
if(period==PERIOD_CURRENT)     period=Period();

  if(!SymbolInfoInteger(symbol,SYMBOL_SELECT))
{f
if(GetLastError()==ERR_MARKET_UNKNOWN_SYMBOL) return(-1);
SymbolSelect(symbol,true);
}

  SeriesInfoInteger(symbol,period,SERIES_FIRSTDATE,first_date);
if(first_date>0 && first_date<=start_date) return(1);

  if(MQL5InfoInteger(MQL5_PROGRAM_TYPE)==PROGRAM_INDICATOR && Period()==period && Symbol()==symbol)
return(-4);

  if(SeriesInfoInteger(symbol,PERIOD_M1,SERIES_TERMINAL_FIRSTDATE,first_date))
{
//— 時系列を構築するために読み込まれたデータ
if(first_date>0)
{
//— 時系列の構築を強制する
CopyTime(symbol,period,first_date+PeriodSeconds(period),1,times);
//— 日にちをチェックする
if(SeriesInfoInteger(symbol,period,SERIES_FIRSTDATE,first_date))
if(first_date>0 && first_date<=start_date) return(2);
}
}

int max_bars=TerminalInfoInteger(TERMINAL_MAXBARS);

  datetime first_server_date=0;
while(!SeriesInfoInteger(symbol,PERIOD_M1,SERIES_SERVER_FIRSTDATE,first_server_date) && !IsStopped())
Sleep(5);

  if(first_server_date>start_date) start_date=first_server_date;
if(first_date>0 && first_date<first_server_date)
Print(“Warning: first server date “,first_server_date,” for “,
symbol,” does not match to first series date “,first_date);

  while(!IsStopped())
{
//1. HHC として再構築された時系列と中間の履歴との間の同期を待ちます。
//2. この時間軸での現在のバーの数を受け取ります。
//    バーの数が Max_bars_in_chart より多い場合、終了します。
//3. 再構築された時系列で first_date 開始日を取得して start_date と比較します。
//    first_date が start_date, より早い場合、作業が終わったので終了します。
//4. サーバから新しい期間の履歴をリクエストします。（「 bars」で番号図けられた最後の使用可能のバーから100 足
}

  while(!IsStopped())
{
//— 1．時系列の最構築が完成するまで待つ
while(!SeriesInfoInteger(symbol,period,SERIES_SYNCHRONIZED) && !IsStopped())
Sleep(5);
//— 2．存在するバーの数をリクエストする
int bars=Bars(symbol,period);
if(bars>0)
{
//— チャートに描画出来る以上のバーがあるので終了する
if(bars>=max_bars) return(-2);
//— 3. 時間軸での現在の開始日を返す
if(SeriesInfoInteger(symbol,period,SERIES_FIRSTDATE,first_date))
// 開始日がリクエストされたものより早いので、作業完了
if(first_date>0 && first_date<=start_date) return(0);
}
//4. サーバから新しい期間の履歴をリクエストします。（「 bars」で番号図けられた最後の使用可能のバーから100 足）。
}

  int copied=CopyTime(symbol,period,bars,100,times);

int fail_cnt=0;
…
int copied=CopyTime(symbol,period,bars,100,times);
if(copied>0)
{
//— データをチェックする
if(times[0]<=start_date) return(0); // 複製された値のほうが小さい。準備完了
if(bars+copied>=max_bars) return(-2); // バーの数がチャートに描画出来るより多い。準備完了
fail_cnt=0;
}
else
{
//— 100以上の失敗の試みが連続していない
fail_cnt++;
if(fail_cnt>=100) return(-5);
Sleep(10);
}

  int res=CheckLoadHistory(InpLoadedSymbol,InpLoadedPeriod,InpStartDate);
switch(res)
{
case -1 : Print(“Unknown symbol “,InpLoadedSymbol);                     break;
case -2 : Print(“More requested bars than can be drawn in the chart”); break;
case -3 : Print(“Execution stopped by user”);                         break;
case -4 : Print(“Indicator mustn’t load its own data”);               break;
case -5 : Print(“Loading failed”);                                     break;
case  0 : Print(“All data loaded”);                                   break;
case  1 : Print(“Already available data in timeseries are enough”);   break;
case  2 : Print(“Timeseries is built from available terminal data”);   break;
default : Print(“Execution result undefined”);
}

//+——————————————————————+
//|                                              TestLoadHistory.mq5 |
//|                        Copyright 2009, MetaQuotes Software Corp. |
//|                                             https://www.MQL5.com |
//+——————————————————————+
#property copyright “2009, MetaQuotes Software Corp.”
#property link     “https://www.mql5.com”
#property version   “1.02”
#property script_show_inputs
//— 入力パラメータ
input string          InpLoadedSymbol=“NZDUSD”;   // 読み込まれるシンボル
input ENUM_TIMEFRAMES InpLoadedPeriod=PERIOD_H1; // Period to be loaded
input datetime        InpStartDate=D’2006.01.01′; // 開始日
//+——————————————————————+
//| スクリプトプログラムを開始する関数                                          |
//+——————————————————————+
void OnStart()
{
Print(“Start load”,InpLoadedSymbol+“,”+GetPeriodName(InpLoadedPeriod),“from”,InpStartDate);
//—
int res=CheckLoadHistory(InpLoadedSymbol,InpLoadedPeriod,InpStartDate);
switch(res)
{
case -1 : Print(“Unknown symbol “,InpLoadedSymbol);             break;
case -2 : Print(“Requested bars more than max bars in chart”); break;
case -3 : Print(“Program was stopped”);                       break;
case -4 : Print(“Indicator shouldn’t load its own data”);     break;
case -5 : Print(“Load failed”);                               break;
case  0 : Print(“Loaded OK”);                                 break;
case  1 : Print(“Loaded previously”);                         break;
case  2 : Print(“Loaded previously and built”);               break;
default : Print(“Unknown result”);
}
//—
datetime first_date;
SeriesInfoInteger(InpLoadedSymbol,InpLoadedPeriod,SERIES_FIRSTDATE,first_date);
int bars=Bars(InpLoadedSymbol,InpLoadedPeriod);
Print(“First date “,first_date,” – “,bars,” bars”);
//—
}
//+——————————————————————+
//|                                                                  |
//+——————————————————————+
int CheckLoadHistory(string symbol,ENUM_TIMEFRAMES period,datetime start_date)
{
datetime first_date=0;
datetime times[100];
//— 銘柄と期間をチェックする
if(symbol==NULL || symbol==“”) symbol=Symbol();
if(period==PERIOD_CURRENT)     period=Period();
//— シンボルが「気配値表示」で選ばれているかをチェックする
if(!SymbolInfoInteger(symbol,SYMBOL_SELECT))
{
if(GetLastError()==ERR_MARKET_UNKNOWN_SYMBOL) return(-1);
SymbolSelect(symbol,true);
}
//— データがあるかをチェックする
SeriesInfoInteger(symbol,period,SERIES_FIRSTDATE,first_date);
if(first_date>0 && first_date<=start_date) return(1);
//— 指標の場合自身のデータの読み込みはリクエストしない
if(MQL5InfoInteger(MQL5_PROGRAM_TYPE)==PROGRAM_INDICATOR && Period()==period && Symbol()==symbol)
return(-4);
//— 2 回目の試み
if(SeriesInfoInteger(symbol,PERIOD_M1,SERIES_TERMINAL_FIRSTDATE,first_date))
{
//— 時系列を構築するために読み込まれたデータ
if(first_date>0)
{
//— 時系列の構築を強制する
CopyTime(symbol,period,first_date+PeriodSeconds(period),1,times);
//— 日にちをチェックする
if(SeriesInfoInteger(symbol,period,SERIES_FIRSTDATE,first_date))
if(first_date>0 && first_date<=start_date) return(2);
}
}
//— 端末オプションでのチャートのバーの最大数
int max_bars=TerminalInfoInteger(TERMINAL_MAXBARS);
//— シンボル履歴情報を読み込む
datetime first_server_date=0;
while(!SeriesInfoInteger(symbol,PERIOD_M1,SERIES_SERVER_FIRSTDATE,first_server_date) && !IsStopped())
Sleep(5);
//— 読み込み開始日を治す
if(first_server_date>start_date) start_date=first_server_date;
if(first_date>0 && first_date<first_server_date)
Print(“Warning: first server date “,first_server_date,” for “,symbol,
           ” does not match to first series date “,first_date);
//— ステップごとにデータを読み込む
int fail_cnt=0;
while(!IsStopped())
{
//— 時系列の構築を待つ
while(!SeriesInfoInteger(symbol,period,SERIES_SYNCHRONIZED) && !IsStopped())
Sleep(5);
//— 構築されたバーをリクエストする
int bars=Bars(symbol,period);
if(bars>0)
{
if(bars>=max_bars) return(-2);
//— 初日をリクエストする
if(SeriesInfoInteger(symbol,period,SERIES_FIRSTDATE,first_date))
if(first_date>0 && first_date<=start_date) return(0);
}
//— 次の部分のコピーはデータ読み込みを強制する
int copied=CopyTime(symbol,period,bars,100,times);
if(copied>0)
{
//— データをチェックする
if(times[0]<=start_date) return(0);
if(bars+copied>=max_bars) return(-2);
fail_cnt=0;
}
else
{
//— 100 以下の失敗の試み
fail_cnt++;
if(fail_cnt>=100) return(-5);
Sleep(10);
}
}
//— 停止した
return(-3);
}
//+——————————————————————+
//| 期間の文字列値を返す                                                 |
//+——————————————————————+
string GetPeriodName(ENUM_TIMEFRAMES period)
{
if(period==PERIOD_CURRENT) period=Period();
//—
switch(period)
{
case PERIOD_M1: return(“M1”);
case PERIOD_M2: return(“M2”);
case PERIOD_M3: return(“M3”);
case PERIOD_M4: return(“M4”);
case PERIOD_M5: return(“M5”);
case PERIOD_M6: return(“M6”);
case PERIOD_M10: return(“M10”);
case PERIOD_M12: return(“M12”);
case PERIOD_M15: return(“M15”);
case PERIOD_M20: return(“M20”);
case PERIOD_M30: return(“M30”);
case PERIOD_H1: return(“H1”);
case PERIOD_H2: return(“H2”);
case PERIOD_H3: return(“H3”);
case PERIOD_H4: return(“H4”);
case PERIOD_H6: return(“H6”);
case PERIOD_H8: return(“H8”);
case PERIOD_H12: return(“H12”);
case PERIOD_D1: return(“Daily”);
case PERIOD_W1: return(“Weekly”);
case PERIOD_MN1: return(“Monthly”);
}
//—
return(“unknown period”);
}

long  SeriesInfoInteger(
string                    symbol_name,    // 銘柄名
ENUM_TIMEFRAMES            timeframe,      // 期間
ENUM_SERIES_INFO_INTEGER  prop_id,        // プロパティ識別子
);

bool  SeriesInfoInteger(
string                    symbol_name,    // 銘柄名
ENUM_TIMEFRAMES            timeframe,      // 期間
ENUM_SERIES_INFO_INTEGER  prop_id,        // プロパティ識別子
long&                      long_var        // 情報を受け取る変数
);

void OnStart()
{
//—
Print(“Total number of bars for the symbol-period at this moment = “,
SeriesInfoInteger(Symbol(),Period(),SERIES_BARS_COUNT));

Print(“The first date for the symbol-period at this moment = “,
(datetime)SeriesInfoInteger(Symbol(),Period(),SERIES_FIRSTDATE));

Print(“The first date in the history for the symbol-period on the server = “,
(datetime)SeriesInfoInteger(Symbol(),Period(),SERIES_SERVER_FIRSTDATE));

Print(“Symbol data are synchronized = “,
(bool)SeriesInfoInteger(Symbol(),Period(),SERIES_SYNCHRONIZED));
}

int  Bars(
string          symbol_name,    // 銘柄名
ENUM_TIMEFRAMES  timeframe       // 期間
);

int  Bars(
string          symbol_name,    // 銘柄名
ENUM_TIMEFRAMES  timeframe,      // 期間
datetime        start_time,      // 開始日付と時刻
datetime        stop_time        // 終了日付と時刻
);

  int bars=Bars(_Symbol,_Period);
if(bars>0)
{
Print(“Number of bars in the terminal history for the symbol-period at the moment = “,bars);
}
else // バーが存在しない
{
//— シンボル上のデータがサーバ上のデータと同期されていない可能性がある
bool synchronized=false;
//— ループカウンタ
int attempts=0;
// 同期を待つ試みを 5 回
while(attempts<5)
{
if(SeriesInfoInteger(Symbol(),0,SERIES_SYNCHRONIZED))
{
//— 同期完了。終了する。
synchronized=true;
break;
}
//— カウンタを増加する
attempts++;
//— 次の反復まで 10 ミリ秒待つ
Sleep(10);
}
//— 同期化の後ループを終了する
if(synchronized)
{
Print(“Number of bars in the terminal history for the symbol-period at the moment = “,bars);
Print(“The first date in the terminal history for the symbol-period at the moment = “,
(datetime)SeriesInfoInteger(Symbol(),0,SERIES_FIRSTDATE));
Print(“The first date in the history for the symbol on the server = “,
(datetime)SeriesInfoInteger(Symbol(),0,SERIES_SERVER_FIRSTDATE));
}
//— データの同期が実現しなかった
else
{
Print(“Failed to get number of bars for “,_Symbol);
}
}

  int n;
datetime date1 = D‘2016.09.02 23:55’; // 金曜日
datetime date2 = D‘2016.09.05 00:00’; // 月曜日
datetime date3 = D‘2016.09.08 00:00’; // 木曜日
//—
n=Bars(_Symbol,PERIOD_H1,D‘2016.09.02 02:05’,D‘2016.09.02 10:55’);
Print(“バーの数: “,n); // 『バーの数：8』を出力、計算されたものには２時間バーが含まれ、11時間バーは含まれません
n=Bars(_Symbol,PERIOD_D1,date1,date2);
Print(“バーの数: “,n); // 『バーの数：1』を出力、範囲内に一つの日足バー（月曜日のもの）の開始時刻のみ入っている為
n=Bars(_Symbol,PERIOD_W1,date2,date3);
Print(“バーの数: “,n); // 『バーの数：0』を出力、範囲内に一つの日足バーの開始時刻も入らなかった為

int  BarsCalculated(
int      indicator_handle,    // 指標ハンドル
);

void OnStart()
{
double Ups[];
//— 配列に時系列の索引付けを設定する
ArraySetAsSeries(Ups,true);
//— フラクタル指標のハンドルを作成する
int FractalsHandle=iFractals(NULL,0);
//— エラーコードをリセットする
ResetLastError();
//— 指標値をコピーを試みる
int i,copied=CopyBuffer(FractalsHandle,0,0,1000,Ups);
if(copied<=0)
{
Sleep(50);
for(i=0;i<100;i++)
{
if(BarsCalculated(FractalsHandle)>0)
break;
Sleep(50);
}
copied=CopyBuffer(FractalsHandle,0,0,1000,Ups);
if(copied<=0)
{
Print(“Failed to copy upper fractals. Error = “,GetLastError(),
“i = “,i,”    copied = “,copied);
return;
}
else
Print(“Upper fractals copied”,
“i = “,i,”    copied = “,copied);
}
else Print(“Upper fractals copied. ArraySize = “,ArraySize(Ups));
}

int  IndicatorCreate(
string          symbol,                            // 銘柄名
ENUM_TIMEFRAMES  period,                            // 時間軸
ENUM_INDICATOR   indicator_type,                    // ENUM_INDICATOR 列挙からの指標の種類
int              parameters_cnt=0,                  // パラメータ数
const MqlParam& parameters_array[]=NULL,          // パラメータの配列
);

#property tester_indicator “indicator_name.ex5”

void OnStart()
{
MqlParam params[];
int      h_MA,h_MACD;
//— iMA(“EURUSD”,PERIOD_M15,8,0,MODE_EMA,PRICE_CLOSE); iを作成する
ArrayResize(params,4);
//— ma_period を設定する
params[0].type         =TYPE_INT;
params[0].integer_value=8;
//— ma_shift を設定する
params[1].type         =TYPE_INT;
params[1].integer_value=0;
//— ma_method を設定する
params[2].type         =TYPE_INT;
params[2].integer_value=MODE_EMA;
//— applied_price を設定する
params[3].type         =TYPE_INT;
params[3].integer_value=PRICE_CLOSE;
//— MA を作成する
h_MA=IndicatorCreate(“EURUSD”,PERIOD_M15,IND_MA,4,params);
//— iMACD(“EURUSD”,PERIOD_M15,12,26,9,h_MA); を作成する
ArrayResize(params,4);
//— 高速 ma_period を設定する
params[0].type         =TYPE_INT;
params[0].integer_value=12;
//— 低速 ma_period を設定する
params[1].type         =TYPE_INT;
params[1].integer_value=26;
//— 差の平滑期間を設定する
params[2].type         =TYPE_INT;
params[2].integer_value=9;
//— 指標ハンドルを applied_price として設定する
params[3].type         =TYPE_INT;
params[3].integer_value=h_MA;
//— 移動平均に基づいて MACD を作成する
h_MACD=IndicatorCreate(“EURUSD”,PERIOD_M15,IND_MACD,4,params);
//— 指標を使用する
//— . にて。にて。
//— 指標を解放する（初めの h_MACD）
IndicatorRelease(h_MACD);
IndicatorRelease(h_MA);
}

int  IndicatorParameters(
int              indicator_handle,    // 指標ハンドル
ENUM_INDICATOR&   indicator_type,      // 指標の種類を受け取る変数
MqlParam&        parameters[]         // パラメータを受け取る配列
);

//+——————————————————————+
//| スクリプトプログラムを開始する関数                                          |
//+——————————————————————+
void OnStart()
{

//— チャート上のウィンドウの数（少なくとも1つのメインウィンドウは常に存在する)
int windows=(int)ChartGetInteger(0,CHART_WINDOWS_TOTAL);
//— チャートウィンドウを全部見る
for(int w=0;w<windows;w++)
{
//— このウィンドウ/サブウィンドウ内の指標の数
int total=ChartIndicatorsTotal(0,w);
//— ウィンドウ内の指標を全て取る
for(int i=0;i<total;i++)
{
//— 指標の短縮名を取得する
string name=ChartIndicatorName(0,w,i);
//— 指標ハンドルを取得する
int handle=ChartIndicatorGet(0,w,name);
//— ログに加える
PrintFormat(“Window=%d,  indicator #%d,  handle=%d”,w,i,handle);
//—
MqlParam parameters[];
ENUM_INDICATOR indicator_type;
int params=IndicatorParameters(handle,indicator_type,parameters);
//— メッセージヘッダー
string par_info=“Short name “+name+“, type “
+EnumToString(ENUM_INDICATOR(indicator_type))+“rn”;
//—
for(int p=0;p<params;p++)
{
par_info+=StringFormat(“parameter %d: type=%s, long_value=%d, double_value=%G,string_value=%srn”,
p,
EnumToString((ENUM_DATATYPE)parameters[p].type),
parameters[p].integer_value,
parameters[p].double_value,
parameters[p].string_value
);
}
Print(par_info);
}
//— ウィンドウの全ての指標で完成
}
//—    
}

bool  IndicatorRelease(
int      indicator_handle    // 指標ハンドル
);

//+——————————————————————+
//|                                        Test_IndicatorRelease.mq5 |
//|                        Copyright 2010, MetaQuotes Software Corp. |
//|                                             https://www.MQL5.com |
//+——————————————————————+
#property copyright “2010, MetaQuotes Software Corp.”
#property link     “https://www.mql5.com”
#property version   “1.00”
//— 入力パラメータ
input int               MA_Period=15;
input int               MA_shift=0;
input ENUM_MA_METHOD     MA_smooth=MODE_SMA;
input ENUM_APPLIED_PRICE price=PRICE_CLOSE;
//— 指標ハンドルを格納する
int MA_handle=INVALID_HANDLE;
//+——————————————————————+
//| エキスパート初期化に使用される関数                                        |
//+——————————————————————+
int OnInit()
{
//— 指標ハンドルを作成する
MA_handle=iMA(Symbol(),0,MA_Period,MA_shift,MA_smooth,PRICE_CLOSE);
//— グローバル変数を削除する
if(GlobalVariableCheck(“MA_value”))
GlobalVariableDel(“MA_value”);
//—
return(INIT_SUCCEEDED);
}
//+——————————————————————+
//| エキスパートティック関数                                                 |
//+——————————————————————+
void OnTick()
{
//— グローバル変数の値が存在しない場合
if(!GlobalVariableCheck(“MA_value”))
{
//— 最後の 2 つのバーの指標値を取得する
if(MA_handle!=INVALID_HANDLE)
{
//— 指標値の動的配列
double values[];
if(CopyBuffer(MA_handle,0,0,2,values)==2 && values[0]!=EMPTY_VALUE)
{
//— 最後から2 番目のバーをグローバル変数の値に保存する
if(GlobalVariableSet(“MA_value”,values[0]))
{
//— 指標ハンドルを解放する
if(!IndicatorRelease(MA_handle))
Print(“IndicatorRelease() failed. Error “,GetLastError());
else MA_handle=INVALID_HANDLE;
}
else
Print(“GlobalVariableSet failed. Error “,GetLastError());
}
}
}
//—
}

int  CopyBuffer(
int      indicator_handle,    // 指標ハンドル
int      buffer_num,          // 指標バッファ番号
int      start_pos,            // 開始位置
int      count,                // 複製する量
double    buffer[]              // 受け取り側の配列
);

int  CopyBuffer(
int      indicator_handle,    // 指標ハンドル
int      buffer_num,          // 指標バッファ番号
datetime  start_time,          // 開始日と時刻
int      count,                // 複製する量
double    buffer[]             // 受け取り側の配列
);

int  CopyBuffer(
int      indicator_handle,    // 指標ハンドル
int      buffer_num,          // 指標バッファ番号
datetime  start_time,          // 開始日と時刻
datetime  stop_time,            // 終了日と時刻
double   buffer[]             // 受け取り側の配列
);

//+——————————————————————+
//|                                              TestCopyBuffer3.mq5 |
//|                        Copyright 2009, MetaQuotes Software Corp. |
//|                                             https://www.MQL5.com |
//+——————————————————————+
#property copyright “2009, MetaQuotes Software Corp.”
#property link     “https://www.mql5.com”
#property version   “1.00”

#property indicator_separate_window
#property indicator_buffers 1
#property indicator_plots   1
//—- MA をプロットする
#property indicator_label1 “MA”
#property indicator_type1   DRAW_LINE
#property indicator_color1 clrRed
#property indicator_style1 STYLE_SOLID
#property indicator_width1  1
//— 入力パラメータ
input bool               AsSeries=true;
input int               period=15;
input ENUM_MA_METHOD     smootMode=MODE_EMA;
input ENUM_APPLIED_PRICE price=PRICE_CLOSE;
input int                shift=0;
//— 指標バッファ
double                   MABuffer[];
int                      ma_handle;
//+——————————————————————+
//| カスタム指標を初期化する関数                                            |
//+——————————————————————+
int OnInit()
{
//— 指標バッファマッピング
SetIndexBuffer(0,MABuffer,INDICATOR_DATA);
Print(“Parameter AsSeries = “,AsSeries);
Print(“Indicator buffer after SetIndexBuffer() is a timeseries = “,
ArrayGetAsSeries(MABuffer));
//— 指標短縮名を設定する
IndicatorSetString(INDICATOR_SHORTNAME,“MA(“+period+“)”+AsSeries);
//— AsSeries を設定する（入力パラメータによる）
ArraySetAsSeries(MABuffer,AsSeries);
Print(“Indicator buffer after ArraySetAsSeries(MABuffer,true); is a timeseries = “,
ArrayGetAsSeries(MABuffer));
//—
ma_handle=iMA(Symbol(),0,period,shift,smootMode,price);
return(INIT_SUCCEEDED);
}
//+——————————————————————+
//| カスタム指標の反復関数                                                |
//+——————————————————————+
int OnCalculate(const int rates_total,
const int prev_calculated,
const datetime &time[],
const double &open[],
const double &high[],
const double &low[],
const double &close[],
const long &tick_volume[],
const long &volume[],
const int &spread[])
{
//— データが全て計算されたかをチェックする
if(BarsCalculated(ma_handle)<rates_total) return(0);
//— 全てのデータのコピーは出来ない
int to_copy;
if(prev_calculated>rates_total || prev_calculated<=0) to_copy=rates_total;
else
{
to_copy=rates_total-prev_calculated;
//— 最終値は常に複製される
to_copy++;
}
//— コピーを試みる
if(CopyBuffer(ma_handle,0,0,to_copy,MABuffer)<=0) return(0);
//— 次の呼び出しのために prev_calculated の値を返す
return(rates_total);
}
//+——————————————————————+

int  CopyRates(
string          symbol_name,      // 銘柄名
ENUM_TIMEFRAMES  timeframe,        // 期間
int              start_pos,        // 開始位置
int              count,            // 複製するデータ数
MqlRates         rates_array[]      // 受け取り側の配列
);

int  CopyRates(
string          symbol_name,      // 銘柄名
ENUM_TIMEFRAMES  timeframe,        // 期間
datetime        start_time,        // 開始日と時刻
int              count,            // 複製するデータ数
MqlRates         rates_array[]      // 受け取り側の配列
);

int  CopyRates(
string          symbol_name,      // 銘柄名
ENUM_TIMEFRAMES  timeframe,        // 期間
datetime        start_time,        // 開始日と時刻
datetime        stop_time,        // 終了日と時刻
MqlRates         rates_array[]      // 受け取り側の配列
);

void OnStart()
{
//—
MqlRates rates[];
ArraySetAsSeries(rates,true);
int copied=CopyRates(Symbol(),0,0,100,rates);
if(copied>0)
{
Print(“Bars copied: “+copied);
string format=“open = %G, high = %G, low = %G, close = %G, volume = %d”;
string out;
int size=fmin(copied,10);
for(int i=0;i<size;i++)
{
out=i+“:”+TimeToString(rates[i].time);
out=out+” “+StringFormat(format,
rates[i].open,
rates[i].high,
rates[i].low,
rates[i].close,
rates[i].tick_volume);
Print(out);
}
}
else Print(“Failed to get history data for the symbol “,Symbol());
}

int  CopyTime(
string          symbol_name,    // 銘柄名
ENUM_TIMEFRAMES  timeframe,      // 期間
int              start_pos,      // 開始位置
int              count,          // 複製するデータ数
datetime        time_array[]     // 開始時刻を複製する受け取り側の配列
);

int  CopyTime(
string          symbol_name,    // 銘柄名
ENUM_TIMEFRAMES  timeframe,      // 期間
datetime        start_time,      // 開始日付と時刻
int              count,          // 複製するデータ数
datetime        time_array[]     // 開始時刻を複製する受け取り側の配列
);

int  CopyTime(
string          symbol_name,    // 銘柄名
ENUM_TIMEFRAMES  timeframe,      // 期間
datetime        start_time,      // 開始日付と時刻
datetime        stop_time,      // 終了日と時刻
datetime        time_array[]     // 開始時刻を複製する受け取り側の配列
);

int  CopyOpen(
string          symbol_name,    // 銘柄名
ENUM_TIMEFRAMES  timeframe,      // 期間
int              start_pos,      // 開始位置
int              count,          // 複製するデータ数
double          open_array[]     // 始値の複製先の配列
);

int  CopyOpen(
string          symbol_name,    // 銘柄名
ENUM_TIMEFRAMES  timeframe,      // 期間
datetime        start_time,      // 開始日付と時刻
int              count,          // 複製するデータ数
double          open_array[]     // バーの始値の複製先の配列
);

int  CopyOpen(
string          symbol_name,    // 銘柄名
ENUM_TIMEFRAMES  timeframe,      // 期間
datetime        start_time,      // 開始日付と時刻
datetime        stop_time,      // 終了日と時刻
double          open_array[]     // バーの始値の複製先の配列
);

int  CopyHigh(
string          symbol_name,      // 銘柄名
ENUM_TIMEFRAMES  timeframe,        // 期間
int              start_pos,        // 開始位置
int              count,            // 複製するデータ数
double          high_array[]      // 受け取り側の配列
);

int  CopyHigh(
string          symbol_name,      // 銘柄名
ENUM_TIMEFRAMES  timeframe,        // 期間
datetime        start_time,      // 開始日と時刻
int              count,            // 複製するデータ数
double          high_array[]      // 受け取り側の配列
);

int  CopyHigh(
string          symbol_name,      // 銘柄名
ENUM_TIMEFRAMES  timeframe,        // 期間
datetime        start_time,      // 開始日と時刻
datetime        stop_time,        // 終了日と時刻
double          high_array[]      // 受け取り側の配列
);

#property copyright “2009, MetaQuotes Software Corp.”
#property link     “https://www.mql5.com”
#property version   “1.00”

#property description “An example for output of the High[i] and Low[i]”
#property description “for a random chosen bars”

double High[],Low[];
//+——————————————————————+
//| 指定されたバーインデックスの安値を取得する                                   |
//+——————————————————————+
double iLow(string symbol,ENUM_TIMEFRAMES timeframe,int index)
{
double low=0;
ArraySetAsSeries(Low,true);
int copied=CopyLow(symbol,timeframe,0,Bars(symbol,timeframe),Low);
if(copied>0 && index<copied) low=Low[index];
return(low);
}
//+——————————————————————+
//| 指定されたバーインデックスの高値を取得する                                   |
//+——————————————————————+
double iHigh(string symbol,ENUM_TIMEFRAMES timeframe,int index)
{
double high=0;
ArraySetAsSeries(High,true);
int copied=CopyHigh(symbol,timeframe,0,Bars(symbol,timeframe),High);
if(copied>0 && index<copied) high=High[index];
return(high);
}
//+——————————————————————+
//| エキスパートティック関数                                                 |
//+——————————————————————+
void OnTick()
{
//— ティックごとにティックが到着した秒に等しいバーインデックスの
//— 高値と安値を出力する
datetime t=TimeCurrent();
int sec=t%60;
printf(“High[%d] = %G  Low[%d] = %G”,
sec,iHigh(Symbol(),0,sec),
sec,iLow(Symbol(),0,sec));
}

int  CopyLow(
string          symbol_name,    // 銘柄名
ENUM_TIMEFRAMES  timeframe,      // 期間
int              start_pos,      // 開始位置
int              count,          // 複製するデータ数
double          low_array[]     // 受け取り側の配列
);

int  CopyLow(
string          symbol_name,    // 銘柄名
ENUM_TIMEFRAMES  timeframe,      // 期間
datetime        start_time,      // 開始日付と時刻
int              count,          // 複製するデータ数
double          low_array[]      // 受け取り側の配列
);

int  CopyLow(
string          symbol_name,    // 銘柄名
ENUM_TIMEFRAMES  timeframe,      // 期間
datetime        start_time,      // 開始日付と時刻
datetime        stop_time,      // 終了日と時刻
double          low_array[]     // 受け取り側の配列
);

int  CopyClose(
string          symbol_name,      // 銘柄名
ENUM_TIMEFRAMES  timeframe,        // 期間
int              start_pos,        // 開始位置
int              count,            // 複製するデータ数
double          close_array[]      // 受け取り側の配列
);

int  CopyClose(
string          symbol_name,      // 銘柄名
ENUM_TIMEFRAMES  timeframe,        // 期間
datetime        start_time,        // 開始日と時刻
int              count,            // 複製するデータ数
double          close_array[]      // 受け取り側の配列
);

int  CopyClose(
string          symbol_name,      // 銘柄名
ENUM_TIMEFRAMES  timeframe,        // 期間
datetime        start_time,        // 開始日と時刻
datetime        stop_time,        // 終了日と時刻
double          close_array[]      // 受け取り側の配列
);

int  CopyTickVolume(
string          symbol_name,      // 銘柄名
ENUM_TIMEFRAMES  timeframe,        // 期間
int              start_pos,        // 開始位置
int              count,            // 複製するデータ数
long            volume_array[]   // ティックボリュームを受け取る配列
);

int  CopyTickVolume(
string          symbol_name,      // 銘柄名
ENUM_TIMEFRAMES  timeframe,        // 期間
datetime        start_time,      // 開始日と時刻
int              count,            // 複製するデータ数
long            volume_array[]   // ティックボリュームを受け取る配列
);

int  CopyTickVolume(
string          symbol_name,      // 銘柄名
ENUM_TIMEFRAMES  timeframe,        // 期間
datetime        start_time,      // 開始日と時刻
datetime        stop_time,        // 終了日と時刻
long            volume_array[]   // ティックボリュームを受け取る配列
);

#property indicator_separate_window
#property indicator_buffers 1
#property indicator_plots   1
//—- TickVolume をプロットする
#property indicator_label1 “TickVolume”
#property indicator_type1   DRAW_HISTOGRAM
#property indicator_color1  C’143,188,139′
#property indicator_style1 STYLE_SOLID
#property indicator_width1  1
//— 入力パラメータ
input int     bars=3000;
//— 指標バッファ
double         TickVolumeBuffer[];
//+——————————————————————+
//| カスタム指標を初期化する関数                                            |
//+——————————————————————+
void OnInit()
{
//— 指標バッファマッピング
SetIndexBuffer(0,TickVolumeBuffer,INDICATOR_DATA);
IndicatorSetInteger(INDICATOR_DIGITS,0);
//—
}
//+——————————————————————+
//| カスタム指標の反復関数                                                |
//+——————————————————————+
int OnCalculate(const int rates_total,
const int prev_calculated,
const datetime &time[],
const double &open[],
const double &high[],
const double &low[],
const double &close[],
const long &tick_volume[],
const long &volume[],
const int &spread[])
{
//—
if(prev_calculated==0)
{
long timeseries[];
ArraySetAsSeries(timeseries,true);
int prices=CopyTickVolume(Symbol(),0,0,bars,timeseries);
for(int i=0;i<rates_total-prices;i++) TickVolumeBuffer[i]=0.0;
for(int i=0;i<prices;i++) TickVolumeBuffer[rates_total-1-i]=timeseries[prices-1-i];
Print(“We have received the following number of TickVolume values: “+prices);
}
else
{
long timeseries[];
int prices=CopyTickVolume(Symbol(),0,0,1,timeseries);
TickVolumeBuffer[rates_total-1]=timeseries[0];
}
//— 次の呼び出しのために prev_calculated の値を返す
return(rates_total);
}

int  CopyRealVolume(
string          symbol_name,      // 銘柄名
ENUM_TIMEFRAMES  timeframe,        // 期間
int              start_pos,        // 開始位置
int              count,            // 複製するデータ数
long            volume_array[]   // ボリューム値を受け取る配列
);

int  CopyRealVolume(
string          symbol_name,      // 銘柄名
ENUM_TIMEFRAMES  timeframe,        // 期間
datetime        start_time,      // 開始日と時刻
int              count,            // 複製するデータ数
long            volume_array[]   // ボリューム値を受け取る配列
);

int  CopyRealVolume(
string          symbol_name,      // 銘柄名
ENUM_TIMEFRAMES  timeframe,        // 期間
datetime        start_time,      // 開始日と時刻
datetime        stop_time,        // 終了日と時刻
long            volume_array[]   // ボリューム値を受け取る配列
);

int  CopySpread(
string          symbol_name,      // 銘柄名
ENUM_TIMEFRAMES  timeframe,        // 期間
int              start_pos,        // 開始位置
int              count,            // 複製するデータ数
int              spread_array[]   // スプレッド値を受け取る配列
);

int  CopySpread(
string          symbol_name,      // 銘柄名
ENUM_TIMEFRAMES  timeframe,        // 期間
datetime        start_time,      // 開始日と時刻
int              count,            // 複製するデータ数
int              spread_array[]   // スプレッド値を受け取る配列
);

int  CopySpread(
string          symbol_name,      // 銘柄名
ENUM_TIMEFRAMES  timeframe,        // 期間
datetime        start_time,      // 開始日と時刻
datetime        stop_time,        // 終了日と時刻
int              spread_array[]   // スプレッド値を受け取る配列
);

#property indicator_separate_window
#property indicator_buffers 1
#property indicator_plots   1
//—- スプレッドをプロットする
#property indicator_label1 “Spread”
#property indicator_type1   DRAW_HISTOGRAM
#property indicator_color1 clrRed
#property indicator_style1 STYLE_SOLID
#property indicator_width1  1
//— 入力パラメータ
input int     bars=3000;
//— 指標バッファ
double         SpreadBuffer[];
//+——————————————————————+
//| カスタム指標を初期化する関数                                            |
//+——————————————————————+
void OnInit()
{
//— 指標バッファマッピング
SetIndexBuffer(0,SpreadBuffer,INDICATOR_DATA);
IndicatorSetInteger(INDICATOR_DIGITS,0);
//—
}
//+——————————————————————+
//| カスタム指標の反復関数                                                |
//+——————————————————————+
int OnCalculate(const int rates_total,
const int prev_calculated,
const datetime &time[],
const double &open[],
const double &high[],
const double &low[],
const double &close[],
const long &tick_volume[],
const long &volume[],
const int &spread[])
{
//—
if(prev_calculated==0)
{
int spread_int[];
ArraySetAsSeries(spread_int,true);
int spreads=CopySpread(Symbol(),0,0,bars,spread_int);
Print(“We have received the following number of Spread values: “,spreads);
for (int i=0;i<spreads;i++)
{
SpreadBuffer[rates_total-1-i]=spread_int[i];
if(i<=30) Print(“spread[“+i+“] = “,spread_int[i]);
}
}
else
{
double Ask,Bid;
Ask=SymbolInfoDouble(Symbol(),SYMBOL_ASK);
Bid=SymbolInfoDouble(Symbol(),SYMBOL_BID);
Comment(“Ask = “,Ask,”  Bid = “,Bid);
SpreadBuffer[rates_total-1]=(Ask-Bid)/Point();
}
//— 次の呼び出しのために prev_calculated の値を返す
return(rates_total);
}

int  CopyTicks(
string          symbol_name,          // 銘柄名
MqlTick&         ticks_array[],        // ティックを受け取る配列
uint            flags=COPY_TICKS_ALL,  // 受け取られたティックの種類を定義するフラグ
ulong           from=0,                // ティックがリクエストされた日
uint            count=0                // 受け取りたいティックの数
);

#property copyright “Copyright 2016, MetaQuotes Software Corp.”
#property link     “https://www.mql5.com”
#property version   “1.00”
#property script_show_inputs
//— Requesting 100 million ticks to be sure we receive the entire tick history
input int     getticks=100000000; // The number of required ticks
//+——————————————————————+
//| Script program start function                                    |
//+——————————————————————+
void OnStart()
{
//—  
int     attempts=0;     // Count of attempts
bool    success=false; // The flag of a successful copying of ticks
MqlTick tick_array[];   // Tick receiving array
MqlTick lasttick;       // To receive last tick data
SymbolInfoTick(_Symbol,lasttick);
//— Make 3 attempts to receive ticks
while(attempts<3)
{
//— Measuring start time before receiving the ticks
uint start=GetTickCount();
//— Requesting the tick history since 1970.01.01 00:00.001 (parameter from=1 ms)
int received=CopyTicks(_Symbol,tick_array,COPY_TICKS_ALL,1,getticks);
if(received!=-1)
{
//— Showing information about the number of ticks and spent time
PrintFormat(“%s: received %d ticks in %d ms”,_Symbol,received,GetTickCount()-start);
//— If the tick history is synchronized, the error code is equal to zero
if(GetLastError()==0)
{
success=true;
break;
}
else
PrintFormat(“%s: Ticks are not synchronized yet, %d ticks received for %d ms. Error=%d”,
_Symbol,received,GetTickCount()-start,_LastError);
}
//— Counting attempts
attempts++;
//— A one-second pause to wait for the end of synchronization of the tick database
Sleep(1000);
}
//— Receiving the requested ticks from the beginning of the tick history failed in three attempts
if(!success)
{
PrintFormat(“Error! Failed to receive %d ticks of %s in three attempts”,getticks,_Symbol);
return;
}
int ticks=ArraySize(tick_array);
//— Showing the time of the first tick in the array
datetime firstticktime=tick_array[ticks-1].time;
PrintFormat(“Last tick time = %s.%03I64u”,
TimeToString(firstticktime,TIME_DATE|TIME_MINUTES|TIME_SECONDS),tick_array[ticks-1].time_msc%1000);
//— выведем время последнего тика в массиве
datetime lastticktime=tick_array[0].time;
PrintFormat(“First tick time = %s.%03I64u”,
TimeToString(lastticktime,TIME_DATE|TIME_MINUTES|TIME_SECONDS),tick_array[0].time_msc%1000);

//—                                                          
MqlDateTime today;
datetime current_time=TimeCurrent();
TimeToStruct(current_time,today);
PrintFormat(“current_time=%s”,TimeToString(current_time));
today.hour=0;
today.min=0;
today.sec=0;
datetime startday=StructToTime(today);
datetime endday=startday+24*60*60;
if((ticks=CopyTicksRange(_Symbol,tick_array,COPY_TICKS_ALL,startday*1000,endday*1000))==-1)
{
PrintFormat(“CopyTicksRange(%s,tick_array,COPY_TICKS_ALL,%s,%s) failed, error %d”,
_Symbol,TimeToString(startday),TimeToString(endday),GetLastError());
return;
}
ticks=MathMax(100,ticks);
//— Showing the first 100 ticks of the last day
int counter=0;
for(int i=0;i<ticks;i++)
{
datetime time=tick_array[i].time;
if((time>=startday) && (time<endday) && counter<100)
{
counter++;
PrintFormat(“%d. %s”,counter,GetTickDescription(tick_array[i]));
}
}
//— Showing the first 100 deals of the last day
counter=0;
for(int i=0;i<ticks;i++)
{
datetime time=tick_array[i].time;
if((time>=startday) && (time<endday) && counter<100)
{
if(((tick_array[i].flags&TICK_FLAG_BUY)==TICK_FLAG_BUY) || ((tick_array[i].flags&TICK_FLAG_SELL)==TICK_FLAG_SELL))
{
counter++;
PrintFormat(“%d. %s”,counter,GetTickDescription(tick_array[i]));
}
}
}
}
//+——————————————————————+
//| Returns the string description of a tick                         |
//+——————————————————————+
string GetTickDescription(MqlTick &tick)
{
string desc=StringFormat(“%s.%03d “,
TimeToString(tick.time),tick.time_msc%1000);
//— Checking flags
bool buy_tick=((tick.flags&TICK_FLAG_BUY)==TICK_FLAG_BUY);
bool sell_tick=((tick.flags&TICK_FLAG_SELL)==TICK_FLAG_SELL);
bool ask_tick=((tick.flags&TICK_FLAG_ASK)==TICK_FLAG_ASK);
bool bid_tick=((tick.flags&TICK_FLAG_BID)==TICK_FLAG_BID);
bool last_tick=((tick.flags&TICK_FLAG_LAST)==TICK_FLAG_LAST);
bool volume_tick=((tick.flags&TICK_FLAG_VOLUME)==TICK_FLAG_VOLUME);
//— Checking trading flags in a tick first
if(buy_tick || sell_tick)
{
//— Forming an output for the trading tick
desc=desc+(buy_tick?StringFormat(“Buy Tick: Last=%G Volume=%d “,tick.last,tick.volume):“”);
desc=desc+(sell_tick?StringFormat(“Sell Tick: Last=%G Volume=%d “,tick.last,tick.volume):“”);
desc=desc+(ask_tick?StringFormat(“Ask=%G “,tick.ask):“”);
desc=desc+(bid_tick?StringFormat(“Bid=%G “,tick.ask):“”);
desc=desc+“(Trade tick)”;
}
else
{
//— Form a different output for an info tick
desc=desc+(ask_tick?StringFormat(“Ask=%G “,tick.ask):“”);
desc=desc+(bid_tick?StringFormat(“Bid=%G “,tick.ask):“”);
desc=desc+(last_tick?StringFormat(“Last=%G “,tick.last):“”);
desc=desc+(volume_tick?StringFormat(“Volume=%d “,tick.volume):“”);
desc=desc+“(Info tick)”;
}
//— Returning tick description
return desc;
}
//+——————————————————————+
/* Example of the output
Si-12.16: received 11048387 ticks in 4937 ms
Last tick time = 2016.09.26 18:32:59.775
First tick time = 2015.06.18 09:45:01.000
1.  2016.09.26 09:45.249 Ask=65370 Bid=65370 (Info tick)
2.  2016.09.26 09:47.420 Ask=65370 Bid=65370 (Info tick)
3.  2016.09.26 09:50.893 Ask=65370 Bid=65370 (Info tick)
4.  2016.09.26 09:51.827 Ask=65370 Bid=65370 (Info tick)
5.  2016.09.26 09:53.810 Ask=65370 Bid=65370 (Info tick)
6.  2016.09.26 09:54.491 Ask=65370 Bid=65370 (Info tick)
7.  2016.09.26 09:55.913 Ask=65370 Bid=65370 (Info tick)
8.  2016.09.26 09:59.350 Ask=65370 Bid=65370 (Info tick)
9.  2016.09.26 09:59.678 Bid=65370 (Info tick)
10. 2016.09.26 10:00.000 Sell Tick: Last=65367 Volume=3 (Trade tick)
11. 2016.09.26 10:00.000 Sell Tick: Last=65335 Volume=45 (Trade tick)
12. 2016.09.26 10:00.000 Sell Tick: Last=65334 Volume=95 (Trade tick)
13. 2016.09.26 10:00.191 Sell Tick: Last=65319 Volume=1 (Trade tick)
14. 2016.09.26 10:00.191 Sell Tick: Last=65317 Volume=1 (Trade tick)
15. 2016.09.26 10:00.191 Sell Tick: Last=65316 Volume=1 (Trade tick)
16. 2016.09.26 10:00.191 Sell Tick: Last=65316 Volume=10 (Trade tick)
17. 2016.09.26 10:00.191 Sell Tick: Last=65315 Volume=5 (Trade tick)
18. 2016.09.26 10:00.191 Sell Tick: Last=65313 Volume=3 (Trade tick)
19. 2016.09.26 10:00.191 Sell Tick: Last=65307 Volume=25 (Trade tick)
20. 2016.09.26 10:00.191 Sell Tick: Last=65304 Volume=1 (Trade tick)
21. 2016.09.26 10:00.191 Sell Tick: Last=65301 Volume=1 (Trade tick)
22. 2016.09.26 10:00.191 Sell Tick: Last=65301 Volume=10 (Trade tick)
23. 2016.09.26 10:00.191 Sell Tick: Last=65300 Volume=5 (Trade tick)
24. 2016.09.26 10:00.191 Sell Tick: Last=65300 Volume=1 (Trade tick)
25. 2016.09.26 10:00.191 Sell Tick: Last=65300 Volume=6 (Trade tick)
26. 2016.09.26 10:00.191 Sell Tick: Last=65299 Volume=1 (Trade tick)
27. 2016.09.26 10:00.191 Bid=65370 (Info tick)
28. 2016.09.26 10:00.232 Ask=65297 (Info tick)
29. 2016.09.26 10:00.276 Sell Tick: Last=65291 Volume=31 (Trade tick)
30. 2016.09.26 10:00.276 Sell Tick: Last=65290 Volume=1 (Trade tick)
*/

int  CopyTicksRange(
const string    symbol_name,          // 銘柄名
MqlTick&         ticks_array[],        // ティックを受け取る配列
uint            flags=COPY_TICKS_ALL,  // 受け取るティックの種類を定義するフラグ
ulong           from_msc=0,            // ティックがリクエストされた初めの日
ulong            to_msc=0              // ティックがリクエストされた最後の日
);

int  iBars(
const string          symbol,         // 銘柄
ENUM_TIMEFRAMES       timeframe       // 期間
);

Print(“Bar count on the ‘EURUSD,H1’ is “,iBars(“EURUSD”,PERIOD_H1));

int  iBarShift(
const string        symbol,         // 銘柄
ENUM_TIMEFRAMES     timeframe,      // 期間
datetime            time,           // 時間
bool                exact=false     // モード
);

//+——————————————————————+
//| スクリプトプログラムを開始する関数                                          |
//+——————————————————————+
void OnStart()
{
//— 日曜日
datetime time=D’2002.04.25 12:00′;
string symbol=“GBPUSD”;
ENUM_TIMEFRAMES tf=PERIOD_H1;
bool exact=false;
//— 指定された時間に対応するバーがない場合、iBarShiftは一番近いバーのインデックスを返す
int bar_index=iBarShift(symbol,tf,time,exact);
//— iBarShift()呼び出しの後でエラーコードを確認する
int error=GetLastError();
if(error!=0)
{
PrintFormat(“iBarShift(): GetLastError=%d – The requested date %s “+
“for %s %s is not found in the available history”,
error,TimeToString(time),symbol,EnumToString(tf));
return;
}
//— iBarShift()関数が正常に実行されて、exact=falseの結果を返す
PrintFormat(“1. %s %s %s(%s): bar index is %d (exact=%s)”,
symbol,EnumToString(tf),TimeToString(time),
DayOfWeek(time),bar_index,string(exact));
datetime bar_time=iTime(symbol,tf,bar_index);
PrintFormat(“Time of bar #%d is %s (%s)”,
bar_index,TimeToString(bar_time),DayOfWeek(bar_time));
//— 指定された時間でバーのインデックスを要求し、バーがない場合は-1を返す
exact=true;
bar_index=iBarShift(symbol,tf,time,exact);
//— iBarShift()関数が正常に実行されて、exact=trueの結果を返す
PrintFormat(“2. %s %s %s (%s):bar index is %d (exact=%s)”,
symbol,EnumToString(tf),TimeToString(time)
,DayOfWeek(time),bar_index,string(exact));
}
//+——————————————————————+
//| 曜日名を返す                                                        |
//+——————————————————————+
string DayOfWeek(const datetime time)
{
MqlDateTime dt;
string day=“”;
TimeToStruct(time,dt);
switch(dt.day_of_week)
{
case 0: day=EnumToString(SUNDAY);
break;
case 1: day=EnumToString(MONDAY);
break;
case 2: day=EnumToString(TUESDAY);
break;
case 3: day=EnumToString(WEDNESDAY);
break;
case 4: day=EnumToString(THURSDAY);
break;
case 5: day=EnumToString(FRIDAY);
break;
default:day=EnumToString(SATURDAY);
break;
}
//—
return day;
}
//+——————————————————————+
/* 実行結果
1. GBPUSD PERIOD_H1 2018.06.10 12:00(SUNDAY): bar index is 64 (exact=false)
Time of bar #64 is 2018.06.08 23:00 (FRIDAY)
2. GBPUSD PERIOD_H1 2018.06.10 12:00 (SUNDAY):bar index is -1 (exact=true)
*/

double  iClose(
const string        symbol,         // 銘柄
ENUM_TIMEFRAMES     timeframe,      // 期間
int                shift           // シフト
);

input int shift=0;
//+——————————————————————+
//| “tick” 関数イベントハンドラ                                            |
//+——————————————————————+
void OnTick()
{
datetime time  = iTime(Symbol(),Period(),shift);
double   open  = iOpen(Symbol(),Period(),shift);
double   high  = iHigh(Symbol(),Period(),shift);
double   low   = iLow(Symbol(),Period(),shift);
double   close = iClose(NULL,PERIOD_CURRENT,shift);
long     volume= iVolume(Symbol(),0,shift);
int     bars  = iBars(NULL,0);

Comment(Symbol(),“,”,EnumToString(Period()),“n”,
“Time: ” ,TimeToString(time,TIME_DATE|TIME_SECONDS),“n”,
“Open: ” ,DoubleToString(open,Digits()),“n”,
“High: ” ,DoubleToString(high,Digits()),“n”,
“Low: ”   ,DoubleToString(low,Digits()),“n”,
“Close: ” ,DoubleToString(close,Digits()),“n”,
“Volume: “,IntegerToString(volume),“n”,
“Bars: ” ,IntegerToString(bars),“n”
);
}

double  iHigh(
const string        symbol,         // 銘柄
ENUM_TIMEFRAMES     timeframe,      // 期間
int                shift           // シフト
);

input int shift=0;
//+——————————————————————+
//| “tick” 関数イベントハンドラ                                            |
//+——————————————————————+
void OnTick()
{
datetime time  = iTime(Symbol(),Period(),shift);
double   open  = iOpen(Symbol(),Period(),shift);
double   high  = iHigh(Symbol(),Period(),shift);
double   low   = iLow(Symbol(),Period(),shift);
double   close = iClose(NULL,PERIOD_CURRENT,shift);
long     volume= iVolume(Symbol(),0,shift);
int     bars  = iBars(NULL,0);

Comment(Symbol(),“,”,EnumToString(Period()),“n”,
“Time: ” ,TimeToString(time,TIME_DATE|TIME_SECONDS),“n”,
“Open: ” ,DoubleToString(open,Digits()),“n”,
“High: ” ,DoubleToString(high,Digits()),“n”,
“Low: ”   ,DoubleToString(low,Digits()),“n”,
“Close: ” ,DoubleToString(close,Digits()),“n”,
“Volume: “,IntegerToString(volume),“n”,
“Bars: ” ,IntegerToString(bars),“n”
);
}

int  iHighest(
const string        symbol,             // 銘柄
ENUM_TIMEFRAMES     timeframe,          // 期間
ENUM_SERIESMODE     type,               // 時系列識別子
int                count=WHOLE_ARRAY,   // 要素数
int                start=0             // インデックス
);

  double val;
//— 連続する20本のバーの中で最も高い終値の計算
//— 現在の期間のインデックス4からインデックス23まで
int val_index=iHighest(NULL,0,MODE_CLOSE,20,4);
if(val_index!=-1)
val=High[val_index];
else
     PrintFormat(“iHighest() call error. Error code=%d”,GetLastError());

double  iLow(
const string        symbol,         // 銘柄
ENUM_TIMEFRAMES     timeframe,      // 期間
int                shift           // シフト
);

input int shift=0;
//+——————————————————————+
//| “tick” 関数イベントハンドラ                                            |
//+——————————————————————+
void OnTick()
{
datetime time  = iTime(Symbol(),Period(),shift);
double   open  = iOpen(Symbol(),Period(),shift);
double   high  = iHigh(Symbol(),Period(),shift);
double   low   = iLow(Symbol(),Period(),shift);
double   close = iClose(NULL,PERIOD_CURRENT,shift);
long     volume= iVolume(Symbol(),0,shift);
int     bars  = iBars(NULL,0);

Comment(Symbol(),“,”,EnumToString(Period()),“n”,
“Time: ” ,TimeToString(time,TIME_DATE|TIME_SECONDS),“n”,
“Open: ” ,DoubleToString(open,Digits()),“n”,
“High: ” ,DoubleToString(high,Digits()),“n”,
“Low: ”   ,DoubleToString(low,Digits()),“n”,
“Close: ” ,DoubleToString(close,Digits()),“n”,
“Volume: “,IntegerToString(volume),“n”,
“Bars: ” ,IntegerToString(bars),“n”
);
}

int  iLowest(
const string        symbol,             // 銘柄
ENUM_TIMEFRAMES     timeframe,          // 期間
ENUM_SERIESMODE     type,               // 時系列識別子
int                count=WHOLE_ARRAY,   // 要素数
int                start=0             // インデックス
);

  double val;
//—連続する15のバーの中で実ボリュームの最小値を持つバーを検索する
//— 現在の期間のインデックス10からインデックス24まで
int val_index=iLowest(NULL,0,MODE_REAL_VOLUME,15,10);
if(val_index!=-1)
val=Low[val_index];
else
     PrintFormat(“iLowest() call error. Error code=%d”,GetLastError());

double  iOpen(
const string        symbol,         // 銘柄
ENUM_TIMEFRAMES     timeframe,      // 期間
int                shift           // シフト
);

input int shift=0;
//+——————————————————————+
//| “tick” 関数イベントハンドラ                                            |
//+——————————————————————+
void OnTick()
{
datetime time  = iTime(Symbol(),Period(),shift);
double   open  = iOpen(Symbol(),Period(),shift);
double   high  = iHigh(Symbol(),Period(),shift);
double   low   = iLow(Symbol(),Period(),shift);
double   close = iClose(NULL,PERIOD_CURRENT,shift);
long     volume= iVolume(Symbol(),0,shift);
int     bars  = iBars(NULL,0);

Comment(Symbol(),“,”,EnumToString(Period()),“n”,
“Time: ” ,TimeToString(time,TIME_DATE|TIME_SECONDS),“n”,
“Open: ” ,DoubleToString(open,Digits()),“n”,
“High: ” ,DoubleToString(high,Digits()),“n”,
“Low: ”   ,DoubleToString(low,Digits()),“n”,
“Close: ” ,DoubleToString(close,Digits()),“n”,
“Volume: “,IntegerToString(volume),“n”,
“Bars: ” ,IntegerToString(bars),“n”
);
}

datetime  iTime(
const string        symbol,         // 銘柄
ENUM_TIMEFRAMES     timeframe,      // 期間
int                shift           // シフト
);

//+——————————————————————+
//| スクリプトプログラムを開始する関数                                          |
//+——————————————————————+
void OnStart()
{
//— 日曜日
datetime time=D’2018.06.10 12:00′;
string symbol=“GBPUSD”;
ENUM_TIMEFRAMES tf=PERIOD_H1;
bool exact=false;
//— 指定された時間に対応するバーがない場合、iBarShiftは一番近いバーのインデックスを返す
int bar_index=iBarShift(symbol,tf,time,exact);
PrintFormat(“1. %s %s %s(%s): bar index is %d (exact=%s)”,
symbol,EnumToString(tf),TimeToString(time),DayOfWeek(time),bar_index,string(exact));
datetime bar_time=iTime(symbol,tf,bar_index);
PrintFormat(“Time of bar #%d is %s (%s)”,
bar_index,TimeToString(bar_time),DayOfWeek(bar_time));
//PrintFormat(iTime(symbol,tf,bar_index));
//— 指定された時間でバーのインデックスを要求し、バーがない場合は-1を返す
exact=true;
bar_index=iBarShift(symbol,tf,time,exact);
PrintFormat(“2. %s %s %s (%s):bar index is %d (exact=%s)”,
symbol,EnumToString(tf),TimeToString(time),DayOfWeek(time),bar_index,string(exact));
}
//+——————————————————————+
//| 曜日名を返す                         |
//+——————————————————————+
string DayOfWeek(const datetime time)
{
MqlDateTime dt;
string day=“”;
TimeToStruct(time,dt);
switch(dt.day_of_week)
{
case 0: day=EnumToString(SUNDAY);
break;
case 1: day=EnumToString(MONDAY);
break;
case 2: day=EnumToString(TUESDAY);
break;
case 3: day=EnumToString(WEDNESDAY);
break;
case 4: day=EnumToString(THURSDAY);
break;
case 5: day=EnumToString(FRIDAY);
break;
default:day=EnumToString(SATURDAY);
break;
}
//—
return day;
}
/* 結果:
1. GBPUSD PERIOD_H1 2018.06.10 12:00(SUNDAY): bar index is 64 (exact=false)
Time of bar #64 is 2018.06.08 23:00 (FRIDAY)
2. GBPUSD PERIOD_H1 2018.06.10 12:00 (SUNDAY):bar index is -1 (exact=true)
*/

long  iTickVolume(
const string        symbol,         // 銘柄
ENUM_TIMEFRAMES     timeframe,      // 期間
int                shift           // シフト
);

input int shift=0;
//+——————————————————————+
//| “tick” 関数イベントハンドラ                                            |
//+——————————————————————+
void OnTick()
{
datetime time  = iTime(Symbol(),Period(),shift);
double   open  = iOpen(Symbol(),Period(),shift);
double   high  = iHigh(Symbol(),Period(),shift);
double   low   = iLow(Symbol(),Period(),shift);
double   close = iClose(NULL,PERIOD_CURRENT,shift);
long     volume= iVolume(Symbol(),0,shift);
int     bars  = iBars(NULL,0);

Comment(Symbol(),“,”,EnumToString(Period()),“n”,
“Time: ” ,TimeToString(time,TIME_DATE|TIME_SECONDS),“n”,
“Open: ” ,DoubleToString(open,Digits()),“n”,
“High: ” ,DoubleToString(high,Digits()),“n”,
“Low: ”   ,DoubleToString(low,Digits()),“n”,
“Close: ” ,DoubleToString(close,Digits()),“n”,
“Volume: “,IntegerToString(volume),“n”,
“Bars: ” ,IntegerToString(bars),“n”
);
}

long  iRealVolume(
const string        symbol,         // 銘柄
ENUM_TIMEFRAMES     timeframe,      // 期間
int                shift           // シフト
);

input int shift=0;
//+——————————————————————+
//| “tick” 関数イベントハンドラ                                            |
//+——————————————————————+
void OnTick()
{
datetime time  = iTime(Symbol(),Period(),shift);
double   open  = iOpen(Symbol(),Period(),shift);
double   high  = iHigh(Symbol(),Period(),shift);
double   low   = iLow(Symbol(),Period(),shift);
double   close = iClose(NULL,PERIOD_CURRENT,shift);
long     volume= iVolume(Symbol(),0,shift);
int     bars  = iBars(NULL,0);

nbsp; Comment(Symbol(),“,”,EnumToString(Period()),“n”,
“Time: ” ,TimeToString(time,TIME_DATE|TIME_SECONDS),“n”,
“Open: ” ,DoubleToString(open,Digits()),“n”,
“High: ” ,DoubleToString(high,Digits()),“n”,
“Low: ”   ,DoubleToString(low,Digits()),“n”,
“Close: ” ,DoubleToString(close,Digits()),“n”,
“Volume: “,IntegerToString(volume),“n”,
“Bars: ” ,IntegerToString(bars),“n”
);
}

long  iVolume(
const string        symbol,         // 銘柄
ENUM_TIMEFRAMES     timeframe,      // 期間
int                shift           // シフト
);

input int shift=0;
//+——————————————————————+
//| “tick” 関数イベントハンドラ                                            |
//+——————————————————————+
void OnTick()
{
datetime time  = iTime(Symbol(),Period(),shift);
double   open  = iOpen(Symbol(),Period(),shift);
double   high  = iHigh(Symbol(),Period(),shift);
double   low   = iLow(Symbol(),Period(),shift);
double   close = iClose(NULL,PERIOD_CURRENT,shift);
long     volume= iVolume(Symbol(),0,shift);
int     bars  = iBars(NULL,0);

Comment(Symbol(),“,”,EnumToString(Period()),“n”,
“Time: ” ,TimeToString(time,TIME_DATE|TIME_SECONDS),“n”,
“Open: ” ,DoubleToString(open,Digits()),“n”,
“High: ” ,DoubleToString(high,Digits()),“n”,
“Low: ”   ,DoubleToString(low,Digits()),“n”,
“Close: ” ,DoubleToString(close,Digits()),“n”,
“Volume: “,IntegerToString(volume),“n”,
“Bars: ” ,IntegerToString(bars),“n”
);
}

long iSpread(
const string        symbol,         // 銘柄
ENUM_TIMEFRAMES     timeframe,      // 期間
int                shift           // シフト
);

input int shift=0;
//+——————————————————————+
//| “tick” 関数イベントハンドラ                                            |
//+——————————————————————+
void OnTick()
{
datetime time  = iTime(Symbol(),Period(),shift);
double   open  = iOpen(Symbol(),Period(),shift);
double   high  = iHigh(Symbol(),Period(),shift);
double   low   = iLow(Symbol(),Period(),shift);
double   close = iClose(NULL,PERIOD_CURRENT,shift);
long     volume= iVolume(Symbol(),0,shift);
int     bars  = iBars(NULL,0);

Comment(Symbol(),“,”,EnumToString(Period()),“n”,
“Time: ” ,TimeToString(time,TIME_DATE|TIME_SECONDS),“n”,
“Open: ” ,DoubleToString(open,Digits()),“n”,
“High: ” ,DoubleToString(high,Digits()),“n”,
“Low: ”   ,DoubleToString(low,Digits()),“n”,
“Close: ” ,DoubleToString(close,Digits()),“n”,
“Volume: “,IntegerToString(volume),“n”,
“Bars: ” ,IntegerToString(bars),“n”
);
}