N88-BASICで冬至(2023)

2023/12/22(金)

N88-BASICで冬至(2023)

 

https://ulprojectmail.blogspot.com/2021/10/n88-basic-2.html

N88-BASICで天体の軌道 (2回目)

 

の日付と表示日数を変更し表示しています

 

火星までの表示の場合

4320 DATA 2023,12, 1.0       '--- 元期d=0(表示開始日)

4360 DATA   22, 1            '--- 表示期間(日),経過時間(日)

 

冥王星まで表示する場合

4550 DATA 2023,12, 1.0       '--- 元期d=0(表示開始日)

4590 DATA   22, 1            '--- 表示期間(日),経過時間(日)

 

2023/12/1～2023/12/22(冬至)までの

22日間を1日ずつ表示しています

 

青軌跡が惑星で水色の点が地球です

 

「08 N88-BASICで宇宙」フォルダに入っています

 

NL-BASICとnl～.zip(toji023.bas)は

以下のリンクからダウンロードできます

https://ulprojectmail.blogspot.com

Readme.txtを読んで遊んで下さい