🚀 go-pugleaf

Masanori Sugawara wrote:
> 初めて投書します、菅原と申します。
> 以下のことで悩んでいます。
> １）日付より六曜の求め方
> ２）春分の日、秋分の日の求め方

とりあえず、２）の方ですが、天文計算をするわけにも
行きませんし、年毎に日が変わることもありますから、
ファイルなどに日付を持たせ、表示する際にファイルを
参照するようにしたら良いかと思います。そうすれば、
同一の処理で、他の祝日も簡単に表示可能となるでしょう。

＃六曜というのは知りません。カレンダーだと思えるので、
＃もしかしたら大安とか仏滅とかのアレかなぁ、としか。

----- Takeshi  Shigihara
      Office   cygnus@masternet.or.jp
      Home     cygnus@po.jah.ne.jp -----

Masanori Sugawara wrote in message <01bd40e0$0a8e6cc0$LocalHost@mebius>...
>初めて投書します、菅原と申します。
>
>以下のことで悩んでいます。
>
>１）日付より六曜の求め方
>２）春分の日、秋分の日の求め方
>
>E-Mail：KFE03774@niftyserve.or.jp

海老原といいます。

私も以前カレンダーソフト作ったときに、２）で悩みました。
分かる方いましたらぜひよろしくお願いします。（便乗質問 ^^;）

とりあえず、国立天文台のホームページ（ＵＲＬ忘れた。検索してください）
に行くと今後５年分の日付が出てます。

面白かったのは、その５年分の日付はあくまで天文学的な日付であって、
政治的なものではないと注意書きがされていました。
正式には総務省？？が決定するので、その５年分の日付も決定ではないそうです。

＃ちなみに、春分の日・秋分の日に関する問い合わせは多いので当面受け付けない
って書いてあったのが面白かった。

-----------------------------------------------------
海老原 祐太郎  (Yutarou Ebihara)
E-mail : ebichan@mtj.biglobe.ne.jp
http://spock.vector.co.jp/authors/VA008912/index.html

  金子＠仙台電波です。

    Followup-To: fj.sci.astro

してあります。

<01bd40e0$0a8e6cc0$LocalHost@mebius>の記事において
sugayan@interlink.or.jpさんは書きました。
>> 初めて投書します、菅原と申します。

>> １）日付より六曜の求め方

  日付をいわゆる旧暦の日付に変換できれば一意に決まります。
  で、旧暦ですが、まずは二十四節季(春分とか、雨水とか)と、新
月になる日時を求めて、それから計算することになります。
  二十四節季や月の動きは、9惑星を考慮した運動方程式を解いて
求める(正しくは推定するだけ)しかないんですが、解法自体はいく
つかの本に掲載されています(理解するの大変だけど)。

  でまじめにやりすぎると大変なので

    「暦の便利帳」(出版社等は、家に帰ればわかるんだけど)

という本をおすすめします。B5判(だと思った)の青い本です。BASI
Cでのサンプルプログラムが載っているので多少は役に立つでしょ
う。
  過去の旧暦日付については、一覧表を手に入れるしかないでしょ
う。現在の計算式とは異なる式で計算しているので狂ってくる可能
性がある。なにかいい文献知りませんかね(便乗質問)。占い系の本
に換算表が載っていたりするんだけど、過去数十年分しかないんで
すよ。

>> ２）春分の日、秋分の日の求め方

  厳密には、国立天文台だったかの計算に基づいて、前年の官報で
公表されるまでは日付は確定しません。でも、それでは大変なので、
太陽その他がいまのまま運動しつづけたと仮定して計算した結果か
ら導出された近似式が上記の文献に書いてあります。

  ま、適度に近似式を求めて、それでお茶を濁した方がいいですよ。
まじめにやろうとすると、奥が深すぎます。

double x,y,z=1.8;main(a,b){x=(time( /*       金子 裕(Yutaka Kaneko)          */
0)%935)/472;while(!0){y=x;x=2-z*(x- /* Sendai National College of Technology */
1)*(x-1);a=(x*631);a%=78;b=(y*95);b /*     kaneko@cc.sendai-ct.ac.jp         */
%=24;printf("\033[%d;%dHx\n",b,a);}}/*Evanx08,Megax05,Escax07,Fushx16,WedPx07*/

初めまして。椎名と申します。

Masanori Sugawara wrote in message <01bd40e0$0a8e6cc0$LocalHost@mebius>...
>初めて投書します、菅原と申します。
>
>以下のことで悩んでいます。
>
>１）日付より六曜の求め方
>２）春分の日、秋分の日の求め方
>
>E-Mail：KFE03774@niftyserve.or.jp

１）については、Format()関数を実行することにより文字列として取得可能
だと思います。

例：

Dim st As String              　　　　　'求めた曜日が入る変数

st = Format("98/02/24","aaa")     '月～土という表記の文字列が戻る

英語表記にさせる方法もありました。
詳しくはヘルプのFormat()関数と日付/時刻表示書式指定文字 (Format 関数)
を参照してください。

２）については、そのものを求める関数は無いようです。（あるかもしれないけど）
データファイルなどに日付の配列を持っていた方が安全確実だと思いますが。

参考になったでしょうか？以上です。

海老原です。自己フォローです。

Yutarou Ebihara wrote in message <6ctppo$61g@mspc200.pc.mei.melco.co.jp>...
>面白かったのは、その５年分の日付はあくまで天文学的な日付であって、
>政治的なものではないと注意書きがされていました。
>正式には総務省？？が決定するので、その５年分の日付も決定ではないそうです。


総務省？？あんまり聞かないなあ (^^; ＞恥ずかしい自分...
と思って調べたら「総理府」でした。あはははは。

それから、最初の疑問も探したら見つかりました。

http://www.obs.misato.wakayama.jp/kyoiku/faq/qk101.html

--以下抜粋--

1980年から2099年に適用する。

春分日（３月X日のXが答えとして得られる）
　　　X=INT(20.8431+0.242194*(Year-1980)-INT((Year-1980)/4))
秋分日（９月X日のXが答えとして得られる）
　　　X=INT(23.2488+0.242194*(Year-1980)-INT((Year-1980)/4))

（得られる値は正式なものではない）

結構簡単に見つかりました。

あと、国立天文台のホームページ(www.nao.ac.jp)は見てて面白いですね。
一般質問のコーナーにこんな事書いてありました。（要約）

○星占いは天文学ではありませんのでお応えできません。
○金星は未確認飛行物体ではありません。
○宿題は自分で調べましょう。

-----------------------------------------------------
海老原 祐太郎  (Yutarou Ebihara)
E-mail : ebichan@mtj.biglobe.ne.jp
http://spock.vector.co.jp/authors/VA008912/index.html

こん○○は！
モーリ＠ＩＴＣシステムですぅ～。

この件に付いて、私は前にＤｅｌｐｈｉのコンポーネントを見ました。
そしてその作者がいうには、その資料が、ＮＩｆｔｙにあるといってました。
グレゴリオ暦とかについても．．．

はっきりとしたら、またＲＥＳします。

毛利邦是 mouri@itc-system.co.jp