2025/10/5(日)

VL-BASICでLemmon(C/2025 A6)

 

https://ulprojectmail.blogspot.com/2024/10/vl-basic-3.html

VL-BASICで惑星の軌道 (3回目)

 

DATA文を変更し表示しています

 

火星までの表示の場合のDATA文の書き換えと

冥王星まで表示する場合はそのDATA文の書き換えが必要です

(別々のデータを書くことで2種類の軌道を表示可能です)

 

lemmon025v.bas for VL-BASIC

 

lemmon025.basの書き換え場所

3100 DATA 2025, 3, 1.0       '--- 元期d=0(表示開始日)

3130 DATA 2025,11, 8.0       '--- 元期d=3(C/2025 A6)

3140 DATA 366 , 1            '--- 表示期間(日),経過時間(日)

3240 '---   c,d, q     , e     , i     , Ω+ω , Ω   , Mo  ,  P

3250 DATA  4 ,3, 0.5298, 0.9958, 143.66, 241.05,108.10,  0  , -1 'C/2025 A6

(別途冥王星までも同じように書き換えています)

 

ネットで拾ったデータを使用しています

正しいかどうか分かりませんので自己責任でご使用ください

 

VL-BASICとnl~.zip(lemmon025v.bas)は

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

https://ulprojectmail.blogspot.com

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