//+------------------------------------------------------------------+
//|                                             H8_time_open_001.mq4 |
//|                                  Copyright ｩ 2009, Aki           |
//+------------------------------------------------------------------+

#define     OrderStr "H8_time_open_001"
#property   copyright "Copyright ｩ 2009, Aki"

//始値を取る時間
extern int iAM9 = 9;
extern int iPM5 = 17;
extern int iAM1 = 1;

//月曜朝用
extern int iMonAM = 7;
extern int iMon = 1;

// 時間足用
datetime dtTimeFrame = 0;

//+------------------------------------------------------------------+
//| expert initialization function                                   |
//+------------------------------------------------------------------+
int init()
{
//---- 
//----
    return(0);
}

//+------------------------------------------------------------------+
//| expert deinitialization function                                 |
//+------------------------------------------------------------------+
int deinit()
{
//---- 
   
//----
    return(0);
}

//+------------------------------------------------------------------+
//| expert start function                                            |
//+------------------------------------------------------------------+
int start()
{

    // 今の時間を取得時間足に変化があると中に入る
    if(dtTimeFrame<iTime(NULL,0,0)) {
        dtTimeFrame=iTime(NULL,0,0);

        // 現在の始値を取得
        double dOpen = iOpen(NULL, 0, 0);

        // 曜日と現在の時間を取得
        int iHour = TimeHour(TimeCurrent());
        int iDayOfWeek = TimeDayOfWeek(TimeCurrent());

        // 月曜朝7時か判定
        if(iMon == iDayOfWeek && iMonAM == iHour){
            Print("月曜朝:",TimeToStr(TimeCurrent(),TIME_DATE|TIME_SECONDS)," :始値:" ,dOpen);
            SendMail("システムC","月曜朝:"+TimeToStr(TimeCurrent(),TIME_DATE|TIME_SECONDS)+" :始値:" +dOpen);
        }

        // 1時か9時か17時か判定
        if((iAM1 == iHour || iAM9 == iHour || iPM5 == iHour)){
            Print("取得時:",TimeToStr(TimeCurrent(),TIME_DATE|TIME_SECONDS)," :始値:" ,dOpen);
            SendMail("システムC","取得時:"+TimeToStr(TimeCurrent(),TIME_DATE|TIME_SECONDS)+" :始値:"+dOpen);
        }

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