/* * GMMA Long Period Group. */ // a link to the company website #property link "" // the company name #property copyright "" // チャートウィンドウ上に指標を表示する. #property indicator_chart_window // 表示する指標の数. #property indicator_buffers 6 // 線の色 #property indicator_color1 Red #property indicator_color2 Red #property indicator_color3 Red #property indicator_color4 Red #property indicator_color5 Red #property indicator_color6 Red // 線の太さ #property indicator_width1 1 #property indicator_width2 1 #property indicator_width3 1 #property indicator_width4 1 #property indicator_width5 1 #property indicator_width6 1 // 線のスタイル #property indicator_style1 STYLE_SOLID #property indicator_style2 STYLE_SOLID #property indicator_style3 STYLE_SOLID #property indicator_style4 STYLE_SOLID #property indicator_style5 STYLE_SOLID #property indicator_style6 STYLE_SOLID /* * 外部変数. */ // Averaging period for calculation. extern int MA_PERIOD1 = 30; extern int MA_PERIOD2 = 35; extern int MA_PERIOD3 = 40; extern int MA_PERIOD4 = 45; extern int MA_PERIOD5 = 50; extern int MA_PERIOD6 = 60; // Timeframes. extern int MA_TIMEFRAME = 0; // Timeframe used on the chart. // MA shift. Indicators line offset relate to the chart by timeframe. extern int MA_SHIFT = 0; // Moving Average methods. extern int MA_METHOD = MODE_EMA; // Price constants. extern int MA_APPLIED_PRICE = PRICE_CLOSE; // output file name. extern string OUTPUT_FILE_NAME = "SampleGMMALongPeriodGroup.log"; // debug extern bool DEBUG = false; // チャート表示用のバッファ. double BUFFER_MA1[]; double BUFFER_MA2[]; double BUFFER_MA3[]; double BUFFER_MA4[]; double BUFFER_MA5[]; double BUFFER_MA6[]; /* * 初期化処理. * チャートを表示するときに実行する. */ int init() { output("start 'init' function"); SetIndexBuffer(0, BUFFER_MA1); SetIndexBuffer(1, BUFFER_MA2); SetIndexBuffer(2, BUFFER_MA3); SetIndexBuffer(3, BUFFER_MA4); SetIndexBuffer(4, BUFFER_MA5); SetIndexBuffer(5, BUFFER_MA6); output("finish 'init' function"); return(0); } /* * 後処理. * チャートから削除するときに実行する. */ int deinit() { output("start 'deinit' function"); output("finish 'deinit' function"); return(0); } /* * 基本処理. * 次の tick が決まるたびに実行する. */ int start() { output("start 'start' function"); int countingBars = getCountingBars(); datetime currentPeriodTime; int specifiedPeriodIndex; // 過去から現在に向かってバーのインデックスを移動する. for (int i = countingBars - 1; i >= 0; i--) { currentPeriodTime = currentPeriodIndex2Time(i); specifiedPeriodIndex = time2SpecifiedPeriodIndex(currentPeriodTime); output(createDatetimeMessage(i, currentPeriodTime)); // 移動平均線の値を取得して指標バッファに設定する. BUFFER_MA1[i] = getMA(specifiedPeriodIndex, MA_PERIOD1); BUFFER_MA2[i] = getMA(specifiedPeriodIndex, MA_PERIOD2); BUFFER_MA3[i] = getMA(specifiedPeriodIndex, MA_PERIOD3); BUFFER_MA4[i] = getMA(specifiedPeriodIndex, MA_PERIOD4); BUFFER_MA5[i] = getMA(specifiedPeriodIndex, MA_PERIOD5); BUFFER_MA6[i] = getMA(specifiedPeriodIndex, MA_PERIOD6); output(createValueMessage(i, BUFFER_MA1[i])); output(createValueMessage(i, BUFFER_MA2[i])); output(createValueMessage(i, BUFFER_MA3[i])); output(createValueMessage(i, BUFFER_MA4[i])); output(createValueMessage(i, BUFFER_MA5[i])); output(createValueMessage(i, BUFFER_MA6[i])); } output("finish 'start' function"); return(0); } double getMA(int index, int period) { double value = iMA( Symbol(), // 通貨ペア名 MA_TIMEFRAME, // 時間枠 period, // 移動平均線を計算する期間 MA_SHIFT, // MA_METHOD, // 移動平均線を計算する方式 MA_APPLIED_PRICE, // 移動平均線を計算する際に使う値の種類 index); // 設定するインデックス return(value); } /* * 指定した時刻、時間枠からインデックスを返す. */ int time2SpecifiedPeriodIndex(datetime time) { int index = iBarShift( Symbol(), // Symbol the data of which should be used to calculate indicator. NULL means the current symbol. MA_TIMEFRAME, // Timeframe. It can be any of Timeframe enumeration values. 0 means the current chart timeframe. time, // value to find (bar's open time). false); // Return mode when bar not found. false - iBarShift returns nearest. true - iBarShift returns -1. datetime specifiedPeriodTime = iTime(Symbol(), MA_TIMEFRAME, index); string message = StringConcatenate( "specified period time:", datetime2String(specifiedPeriodTime)); output(message); return(index); } /* * 現在の時間枠でのインデックスから対応する時刻を返す. */ datetime currentPeriodIndex2Time(int index) { datetime currentTime = iTime(Symbol(), 0, index); string currentTimeString = datetime2String(currentTime); string message = StringConcatenate( "current period time:", currentTimeString); output(message); return(currentTime); } /* * メッセージを作る. * format * symbol, datetime, price */ string createValueMessage(int index, double price) { string symbolString = Symbol(); string datetimeString = datetime2String( iTime(symbolString, 0, index)); string priceString = DoubleToStr( price, Digits); string message = StringConcatenate( symbolString, ",", datetimeString, ",", priceString); return(message); } string createDatetimeMessage(int index, datetime dt) { string symbolString = Symbol(); string datetimeString = datetime2String( iTime(symbolString, 0, index)); string targetDatetimeString = TimeToStr(dt, TIME_DATE) + "_" + TimeToStr(dt, TIME_MINUTES); string message = StringConcatenate( symbolString, ",", datetimeString, ",", targetDatetimeString); return(message); } /* * 日時から文字列に変換する */ string datetime2String(datetime dt) { string value = TimeToStr(dt, TIME_DATE | TIME_SECONDS); return(value); } /* * ファイルに出力する. */ void output(string message) { if (!DEBUG) { return; } int handle = openFile(); if (handle == -1) { return; } writeFile(handle, "info", message); closeFile(handle); } /* * 今回計算するバーの数を返す. */ int getCountingBars() { // チャート上のバーの数. int bars = Bars; // 変化のなかったバーの数. int countedBars = IndicatorCounted(); if (countedBars < 0) { return(0); } // 今回計算するバーの数. int countingBars = bars - countedBars - 1; return(countingBars); } /* * ファイルを開く. * return file handle. * not -1 : opened file * -1 : fail */ int openFile() { /* * FileOpen. * http://docs.mql4.com/files/FileOpen */ int handle = FileOpen(OUTPUT_FILE_NAME, FILE_CSV|FILE_READ|FILE_WRITE, ","); if (handle != -1) { FileSeek(handle, 0, SEEK_END); } else { int errorCode = GetLastError(); Print("Cannot open file. [name:", OUTPUT_FILE_NAME, "][errorCode:", errorCode, "]"); } return(handle); } /* * ファイルを閉じる. */ void closeFile(int handle) { FileClose(handle); } /* * ファイルに文字列を書く. */ void writeFile(int handle, string typeName, string message) { datetime current = TimeCurrent(); int result = FileWrite( handle, datetime2String(current), typeName, message); if (result >= 0) { FileFlush(handle); return; } int errorCode = GetLastError(); Print("Cannot write file. [name:", OUTPUT_FILE_NAME, "][errorCode:", errorCode, "]"); return; }