| |
こんにちは。横から失礼いたします。
秀丸エディタユーザーのヒラメと申します。
私も以前興味があってツェラーの公式で曜日を計算するマクロを組んだことがありま
したので、そのマクロの抜粋を記載してみます。よろしければご参考にしてみてくだ
さい。（浮動小数点モードである必要はありません）
call Zeller "2019", "2", "27";
message str(##return); // 3 が表示される
endmacro;
Zeller:
//ツェラーの公式により日付から曜日を計算する
// call Zeller $1,$2,$3
// $1: 年
// $2: 月
// $3: 日
// 戻り値 ##return: 0: 日 1: 月 2: 火 3: 水 4: 木 5: 金 6: 土
// 使用方法
// call Zeller $year, $month, $day;
// message str(##return);
##y = val($$1);
##m = val($$2);
##d = val($$3);
if(##m < 3){
##y = ##y - 1;
##m = ##m + 12;
}
##w = (##y + ##y / 4 - ##y / 100 + ##y / 400 + (13 * ##m + 8) / 5 + ##d) % 7;
//message str(##y)+"/"+str(##m)+"/"+str(##d)+"="+str(##w);
return ##w;
|
|