2025/10/1(水)
N88-BASICでLemmon(C/2025 A6)
https://ulprojectmail.blogspot.com/2021/10/n88-basic-2.html
N88-BASICで天体の軌道 (2回目)
のDATA文を変更し表示しています
火星までの表示の場合のDATA文の書き換えと
冥王星まで表示する場合はそのDATA文の書き換えが必要です
(別々のデータを書くことで2種類の軌道を表示可能です)
lemmon025.bas for NL-BASIC, N88-BASIC(PC-98DOS版)
lemmon025.basの書き換え場所(火星まで)
4320 DATA 2025, 9,15.0 '--- 元期d=0(表示開始日)
4350 DATA 2025,11, 8.0 '--- 元期d=3(C/2025 A6)
4360 DATA 55, 1 '--- 表示期間(日),経過時間(日)
4370 DATA 7, 3 '--- 惑星数, 地球番号
4460 '--- c,d, q , e , i , Ω+ω , Ω , Mo , P
4470 DATA 4 ,3, 0.5298, 0.9958, 143.66, 241.05,108.10, 0 , -1 'C/2025 A6
他(別途冥王星までも同じように書き換えています)
ネットで拾ったデータを使用しています
正しいかどうか分かりませんので自己責任でご使用ください
NL-BASICとnl~.zip(lemmon025.bas)は
以下のリンクからダウンロードできます
https://ulprojectmail.blogspot.com
Readme.txtを読んで遊んで下さい