ZZ_TimeWinter 1-1000.mq4 - MetaTrader 4のためのライブラリ

////////////////////////////////////////////////////////////// 
//
// YURAZ yzh mail ru
//
// 関数が返す 
// true   -  夏時間
// false  -  冬時間
// 
//  10月最後の日曜日の夜に冬時間への移行
//  3月最後の日曜日の夜に夏時間への移行
// 
bool TimeWinter(datetime dt) 
{
   int i;
 
   if (   TimeMonth(dt) >= 11 || TimeMonth(dt) <= 2 ) // 冬
   {
      return(false); //    冬
   }
   if (   TimeMonth(dt) >= 4 && TimeMonth(dt) <= 9) // 夏
   {
      return(true); //    夏
   }
 
// 仕方ないね～判断しよう 
   datetime tSeek;
   string sTIM;
   if ( TimeMonth(dt) == 10 ) // 10月
   {
      if ( TimeDay(dt) >= 20 ) // 10月最後の日曜日の夜に冬時間への移行
      {
         tSeek = StrToTime( StringTrimRight(StringTrimLeft(DoubleToStr(TimeYear(dt),0)))+".10.31");  // 10月最後の日を指定する
         // 10月最後の日曜日を検索する
         for ( i = 31; i >= 20; i-- )
         {
            if ( TimeDayOfWeek(tSeek) == 0 ) 
            {
               break;   // 10月最後の日曜日を見つけた
            }
            tSeek = tSeek - 86400; // もう一日
         }
         if ( dt >= tSeek  ) // もう冬となった
         {
            return(false); // うん、冬だね
         }
      }
      return(true);
   }
   if ( TimeMonth(dt) == 3 ) // 3月
   {
      if ( TimeDay(dt) >= 20 ) // 3月最後の日曜日の夜に夏時間への移行
      {
         tSeek = StrToTime( StringTrimRight(StringTrimLeft(DoubleToStr(TimeYear(dt),0)))+".03.31");  // 3月最後の日を指定する
        
         for ( i = 31; i >= 20; i-- )
         {
            if ( TimeDayOfWeek(tSeek) == 0 ) // 月最後の日曜日を検索する
            {
               break; // 月最後の日曜日を見つけた
            }
            tSeek = tSeek - 86400; // もう一日
         }
         if ( dt >= tSeek  ) // もう夏となる
         {
            return(true); //  夏
         }
      }
      return(false);
   }
}