[OSASK 3090] from OSASK BOARD

[Itou_Tetsuya <mone !Atmark! imasy.or.jp>]

このメールは、OSASK伝言板に書き込まれた内容です。
この書き込みに返事を書く場合は、下のURLから書き込みを行なって下さい。


http://www.imasy.or.jp/~mone/osask/index.cgi?REFER=3c5814f5_7993

From: かりん
Message-ID: 3c5814f5_7993
Date: 2002/01/31 00:44
Subject: Re: Re: Re: Re: OSASKアプリ作りました。

>C言語FAQ(http://www.catnet.ne.jp/kouno/c_faq/)
>の20.31に日付から曜日を求める方法として
>以下が紹介されていました。これに差しかえるともう少し
>サイズが小さくなるかもしれません。
>
>   dayofweek(y, m, d)      /* 0 = Sunday */
>    int y, m, d;            /* 1 <= m <= 12, y > 1752 or so */
>    {
>        static int t[] = {0, 3, 2, 5, 0, 3, 5, 1, 4, 6, 2, 4};
>        y -= m < 3;
>        return (y + y/4 - y/100 + y/400 + t[m-1] + d) % 7;

差し替えてみました。少しばかり（14バイト）小さくなりました。
アドバイスありがとうございます。
差し替えたプログラムは今までと同じで，
http://home.catv.ne.jp/ff/karin/osask/calm2.lzh
に置いておきます。