//+------------------------------------------------------------------+
//|                                                      his_chk.mq4 |
//|                                      Copyright ｩ 2011, Gamaushi. |
//|                                  http://gamaushi.blog81.fc2.com/ |
//+------------------------------------------------------------------+
#property copyright "Copyright ｩ 2011, Gamaushi."
#property link      "http://gamaushi.blog81.fc2.com/"

//+------------------------------------------------------------------+
//| script program start function                                    |
//+------------------------------------------------------------------+
int start()
{
//----

    int forex_count = 13;
    string forex_name[13]= {
        "EURUSD","USDJPY","USDCHF","GBPUSD","USDCAD","AUDUSD","NZDUSD",
        "EURJPY","CHFJPY","GBPJPY","CADJPY","AUDJPY","NZDJPY"
    };

    string add_symbol;
    int symbol_len=StringLen(Symbol());
    if(symbol_len >6) {
        add_symbol = StringSubstr(Symbol(),6,symbol_len);
    }
    for(int i=0; i<forex_count; i++) {
        forex_name[i]=forex_name[i]+add_symbol;
        MarketInfo(forex_name[i],MODE_BID);
        //Print(forex_name[i]," bar_count=  ",iBars(forex_name[i],0));
    }
    //Print(Symbol()," bar_count=  ",iBars(Symbol(),0));
    int bar_count=Bars;
    for(i=0; i<forex_count; i++) {
        if(bar_count>iBars(forex_name[i],0)) {
            bar_count=iBars(forex_name[i],0);
        }
    }
    // Print("min bar_count=  ",bar_count);
    Print("  ",TimeToStr(iTime(Symbol(),0,bar_count),TIME_DATE|TIME_MINUTES),"からの欠落チェックをします。");

    for(i=0; i<forex_count; i++) {
        for(int j=0; j<bar_count; j++) {
            datetime tm_symbol = iTime(Symbol(),0,j);
            datetime tm = iTime(forex_name[i],0,iBarShift(forex_name[i],0,tm_symbol,false));
            //Print(TimeToStr(tm_symbol,TIME_DATE|TIME_MINUTES)," ",TimeToStr(tm,TIME_DATE|TIME_MINUTES));
            if(tm_symbol !=tm) {
                Alert("  ",forex_name[i],":  ",TimeToStr(tm_symbol,TIME_DATE|TIME_MINUTES)," のデータが見つかりません。　");
            }
        }
    }

//----
    return(0);
}
//+------------------------------------------------------------------+