プチコンまとめArchive

投稿プログラム : 太陽近傍の星々

パンくずリスト

このページの最終更新 : 2022/09/20 (火) 12:43:57
公式アーカイブのリンク:http://wiki.hosiken.jp/petc/html/Toukou/C2-C0-CD-DB-B6-E1-CB-B5-A4-CE-C0-B1-A1-B9-.html

2012年08月15日投稿 / 投稿者 : バイカウントメルビル / タグ : 投稿プログラム QRコード 鑑賞プログラム mkII専用 / 検索用→【メルビル】

概要

我々のいるこの星から、近い恒星50個を表示します。
下画面を横にスライドさせて360度どの方角からも見ることができます。
ただし、縦方向の角度は変えられません。ごめんなさい

また、十字ボタンで太陽の位置を動かすことができ、
XYボタンでズームイン＆ズームアウトできます

ちなみに、24行目のコメントを外すと太陽近傍の星々の名前が、
27行目のコメントを外すと「タイヨウ」が表示されます

※あまり期待しすぎないでください

写真

(24、27行目コメントアウトを外したもの)

P1040210.JPG

参考文献

Wikipedia-近い恒星の一覧
NEARBY STARS 2006 A

QR コード

プチコンmkII 向けの QR コードです。

qr.png

プログラムリスト

  1. ＣＬＥＡＲ：ＡＣＬＳ：ＰＮＬＴＹＰＥ　”ＯＦＦ”
  3. ＤＩＭ　Ｂ＿ＲＡ（１０００），Ｂ＿ＤＥＣ（１０００），ＬＹ（１０００），ＮＡＭＥ＄（１０００）
  4. ＤＩＭ　ＲＡ（１０００），ＤＥＣ（１０００）
  6. ＳＣＬ＝１０：ＣＸ＝１２８：ＣＹ＝９６
  8. ＠ＲＥＡＤＬＯＯＰ
  9. ＲＥＡＤ　Ｂ＿ＲＡ（Ｓ），Ｂ＿ＤＥＣ（Ｓ），ＬＹ（Ｓ），ＮＡＭＥ＄（Ｓ）
  10. ＩＦ　Ｂ＿ＲＡ（Ｓ）＜０　ＴＨＥＮ　＠ＤＲＡＷ
  11. ＲＡ（Ｓ）＝ＲＡＤ（Ｂ＿ＲＡ（Ｓ）＊１５％３６０）
  12. ＤＥＣ（Ｓ）＝ＲＡＤ（（Ｂ＿ＤＥＣ（Ｓ）＋３６０）％３６０）
  13. Ｓ＝Ｓ＋１
  14. ＧＯＴＯ＠ＲＥＡＤＬＯＯＰ
  16. ＠ＤＲＡＷ
  17. ＣＬＳ：ＧＣＬＳ　０
  18. ＦＯＲ　Ｉ＝０　ＴＯ　Ｓ－１
  19. 　Ｘ＝ＣＯＳ（ＲＡ（Ｉ）＋Ａ）＊ＣＯＳ（ＤＥＣ（Ｉ））＊ＬＹ（Ｉ）
  20. 　Ｙ＝ＳＩＮ（ＲＡ（Ｉ）＋Ａ）＊ＣＯＳ（ＤＥＣ（Ｉ））＋ＳＩＮ（ＤＥＣ（Ｉ））＊ＬＹ（Ｉ）
  21. 　ＤＸ＝　Ｘ＊ＳＣＬ＋ＣＸ
  22. 　ＤＹ＝－Ｙ＊ＳＣＬ＋ＣＹ
  23. 　ＧＰＳＥＴ　ＤＸ，ＤＹ，１５
  24. ’　ＩＦ　０＜ＤＸ　ＡＮＤ　ＤＸ＜２４８　ＡＮＤ　０＜ＤＹ　ＡＮＤ　ＤＹ＜１８４　ＴＨＥＮ　ＬＯＣＡＴＥ　ＤＸ／８＋１，ＤＹ／８－１：ＰＲＩＮＴ　ＮＡＭＥ＄（Ｉ）；
  25. ＮＥＸＴ
  26. ＧＰＳＥＴ　ＣＸ，ＣＹ，１５
  27. ’ＩＦ　０＜＝ＣＸ　ＡＮＤ　ＣＸ＜２４８　ＡＮＤ　８＜＝ＣＹ　ＡＮＤ　ＣＹ＜１９２　ＴＨＥＮ　ＬＯＣＡＴＥ　ＣＸ／８＋１，ＣＹ／８－１：ＰＲＩＮＴ　”タイヨウ”
  28. ＶＳＹＮＣ　２
  29. ＠ＬＯＯＰ
  30. Ａ＝ＲＡＤ（ＴＣＨＸ／２５６＊３６０）
  31. ＩＦ　ＢＵＴＴＯＮ（）　ＡＮＤ　１　ＴＨＥＮ　ＣＹ＝ＣＹ－１
  32. ＩＦ　ＢＵＴＴＯＮ（）　ＡＮＤ　２　ＴＨＥＮ　ＣＹ＝ＣＹ＋１
  33. ＩＦ　ＢＵＴＴＯＮ（）　ＡＮＤ　４　ＴＨＥＮ　ＣＸ＝ＣＸ－１
  34. ＩＦ　ＢＵＴＴＯＮ（）　ＡＮＤ　８　ＴＨＥＮ　ＣＸ＝ＣＸ＋１
  35. ＩＦ　ＢＵＴＴＯＮ（）　ＡＮＤ　６４　ＴＨＥＮ　ＳＣＬ＝ＳＣＬ＋１
  36. ＩＦ　ＢＵＴＴＯＮ（）　ＡＮＤ　１２８　ＴＨＥＮ　ＳＣＬ＝ＳＣＬ－１
  37. ＩＦ　ＳＣＬ＜０　ＴＨＥＮ　ＳＣＬ＝０
  38. ＩＦ　ＴＣＨＳＴ　ＯＲ　ＢＵＴＴＯＮ（）　ＴＨＥＮ　＠ＤＲＡＷ
  39. ＧＯＴＯ　＠ＬＯＯＰ
  41. ’┌───────────────────────┐
  42. ’│И　ホシ　テ゛－タ　И　　　　　　　　　　　　│
  43. ’├──┬──────┬───────┬─────┤
  44. ’│л　│セキケイ　　│セキイ　　　　│キョリ　　│
  45. ’│　л│　　　（ｈ）│　　　　（゜）│（コウネン）
  46. ’├──┼──────┼───────┼─────┤
  47. ’│　　│　　　　　　│　　　　　　　│　　　　　│
  49. ＤＡＴＡ　１４．４９５，－６２．６７９，　４．２４
  50. ＤＡＴＡ”フ゜ロキシマ・ケンタウリ”
  52. ＤＡＴＡ　１４．６６０，－６０．８３５，　４．３６
  53. ＤＡＴＡ”アルファ・ケンタウリ”
  55. ＤＡＴＡ　１７．９２３，　　４．５５５，　５．９６
  56. ＤＡＴＡ”ハ゛－ナ－ト゛セイ”
  58. ＤＡＴＡ　１０．９４１，　　７．０１１，　７．７８
  59. ＤＡＴＡ”ウォルフ３５９”
  61. ＤＡＴＡ　１１．０１０，　３６．３０６，　８．２９
  62. ＤＡＴＡ”ララント゛２１１８５”
  64. ＤＡＴＡ　　６．７７５，－１６．７１６，　８．５８
  65. ＤＡＴＡ”シリウス”
  67. ＤＡＴＡ　　１．６５０，　１７．９５０，　８．７２
  68. ＤＡＴＡ”ルイテン７２６－８
  70. ＤＡＴＡ　１８．８３０，　２３．８３６，　９．６８
  71. ＤＡＴＡ”ロス１５４”
  73. ＤＡＴＡ　２３．６９８，　４４．１５９，１０．３２
  74. ＤＡＴＡ”ロス２４８”
  76. ＤＡＴＡ　　３．５４９，　－９．４５８，１０．５２
  77. ＤＡＴＡ”エリタ゛ヌスサ゛イフ゜シロンセイ”
  79. ＤＡＴＡ　２３．０９５，－３５．８５３，１０．７４
  80. ＤＡＴＡ”ラカ－ユ９３５２”
  82. ＤＡＴＡ　１１．７９６，　　０．８０４，１０．９４
  83. ＤＡＴＡ”ロス１２８”
  85. ＤＡＴＡ　２２．６４３，－１５．３００，１１．２６
  86. ＤＡＴＡ”ミス゛カ゛メサ゛ＥＺセイ”
  88. ＤＡＴＡ　　７．６５５，　　５．２２５，１１．４０
  89. ＤＡＴＡ”フ゜ロキオン”
  91. ＤＡＴＡ　２１．１４８，　３８．９４７，１１．４０
  92. ＤＡＴＡ”ハクチョウサ゛６１ハ゛ンセイ”
  94. ＤＡＴＡ　　０．３０６，　４４．０２３，１１．５２
  95. ＤＡＴＡ”シュトル－フェ２３９８”
  97. ＤＡＴＡ　１８．７１３，　５９．６３０，１１．６２
  98. ＤＡＴＡ”ク゛ル－ムフ゛リッシ゛３４”
  100. ＤＡＴＡ　２２．０５６，－５６．７８６，１１．８２
  101. ＤＡＴＡ”インテ゛ィアンサ゛イフ゜シロンセイ”
  103. ＤＡＴＡ　　８．４９７，　２６．７７７，１１．８２
  104. ＤＡＴＡ”カニサ゛ＤＸセイ”
  106. ＤＡＴＡ　　１．７３４，－１５．９３７，１１．８８
  107. ＤＡＴＡ”クシ゛ラサ゛タウセイ”
  109. ＤＡＴＡ　　３．５９９，－４４．５１３，１１．９２
  110. ＤＡＴＡ”ＧＪ１０６１”
  112. ＤＡＴＡ　　１．２０８，－１６．９９９，１２．１３
  113. ＤＡＴＡ”クシ゛ラサ゛ＹＺセイ”
  115. ＤＡＴＡ　　７．４５７，　　５．２２６，１２．３６
  116. ＤＡＴＡ”ルイテンセイ”
  118. ＤＡＴＡ　　２．８８３，　１６．８８２，１２．４６
  119. ＤＡＴＡ”ティ－カ゛－テ゛ンセイ”
  121. ＤＡＴＡ　１８．７５０，－４５．０１８，１２．５７
  122. ＤＡＴＡ”ＳＣＲ１８４５－６３５７”
  124. ＤＡＴＡ　　５．１９４，－４５．０１８，１２．７７
  125. ＤＡＴＡ　”カフ゜タインセイ”
  127. ＤＡＴＡ　２１．２８７，－３８．８６７，１２．８６
  128. ＤＡＴＡ　”ラカ－ユ８７６０”
  130. ＤＡＴＡ　２２．４６７，　５７．６９６，１３．１４
  131. ＤＡＴＡ　”クリュ－ケ゛ル６０”
  133. ＤＡＴＡ　１０．８０４，－３９．９３５，１３．１７
  134. ＤＡＴＡ　”ＤＥＮ１０４８－３９５６”
  136. ＤＡＴＡ　　６．４９０，　－２．８１３，１３．３４
  137. ＤＡＴＡ　”ロス６１４”
  139. ＤＡＴＡ　１６．５０５，－１２．６５４，１３．８１
  140. ＤＡＴＡ　”ウォルフ１０６１”
  142. ＤＡＴＡ　　０．８１９，　　５．３８８，１４．０６
  143. ＤＡＴＡ　”ウ゛ァン・マ－ネンセイ”
  145. ＤＡＴＡ　　０．０９０，－３７．３５７，１４．２２
  146. ＤＡＴＡ　”ク゛リ－セ゛１”
  148. ＤＡＴＡ　１７．５５４，　　９．０２１，１４．３０
  149. ＤＡＴＡ　”ウォルフ４２４”
  151. ＤＡＴＡ　　２．００３，　１３．０５２，１４．５１
  152. ＤＡＴＡ　”オヒツシ゛サ゛ＴＺセイ”
  154. ＤＡＴＡ　１７．６０７，　６８．３３９，１４．７９
  155. ＤＡＴＡ　”ク゛リ－セ゛６８７”
  157. ＤＡＴＡ　１０．８０３，－１１．３３４，１４．８１
  158. ＤＡＴＡ　”ＬＨＳ２９２”
  160. ＤＡＴＡ　１７．４７８，－４６．８９５，１４．８１
  161. ＤＡＴＡ　”ク゛リ－セ゛６７４”
  163. ＤＡＴＡ　１９．８９８，－４４．４１５，１４．８１
  164. ＤＡＴＡ　”ＧＪ１２４５”
  166. ＤＡＴＡ　１１．７６２，－６４．８４１，１５．０６
  167. ＤＡＴＡ　”ク゛リ－セ゛４４０”
  169. ＤＡＴＡ　　０．１１２，　－７．５３９，１５．３１
  170. ＤＡＴＡ　”ＧＪ１００２”
  172. ＤＡＴＡ　２２．８８８，－１４．２６３，１５．３４
  173. ＤＡＴＡ　”ク゛リ－セ゛８７６”
  175. ＤＡＴＡ　１１．０９１，　４３．５２６，１５．８３
  176. ＤＡＴＡ　”ク゛リ－セ゛４１２”
  178. ＤＡＴＡ　１０．１８９，　４９．４５４，１５．８５
  179. ＤＡＴＡ　”ク゛ル－ムフ゛リッシ゛１６１８”
  181. ＤＡＴＡ　１０．３２６，　１９．８６９，１５．９４
  182. ＤＡＴＡ　”ク゛リ－セ゛３８８”
  184. ＤＡＴＡ　１０．７４２，－６４．１９４，１５．９４
  185. ＤＡＴＡ　”ＬＨＳ２８８”
  187. ＤＡＴＡ　２１．５５９，－４９．００９，１６．０８
  188. ＤＡＴＡ　”ク゛リ－セ゛８３２”
  190. ＤＡＴＡ　　３．６５９，－３５．４２８，１６．１９
  191. ＤＡＴＡ　”ＬＰ９４４－２０”
  193. ＤＡＴＡ　１７．６１７，－４４．３２０，１６．３４
  194. ＤＡＴＡ　”ＣＤ－４４゜１１９０９”
  196. ＤＡＴＡ　　４．２５４，　－７．６５３，１６．３９
  197. ＤＡＴＡ　”エリタ゛ヌスサ゛４０ハ゛ンセイ”
  199. ＤＡＴＡ　－１，　０，０，””

CHECKER FLAG (ひとことコメント)

この作品に対するコメントがあれば一言どうぞ。(作品に直接関係ない質問や雑談は掲示板へ)

  • 名無しさん : バグ発見！コメントアウト外して、うんとちっちゃくして、点を、画面の外に出るぐらい左にやると、文字がたくさん (2012/08/15 (水) 16:35:06)
  • バイカウントメルビル : それは対処がめんどくさかったのでほっといてあります。また今度対処するかもしれません (2012/08/15 (水) 16:57:38)
  • バイカウントメルビル : ↑↑どうやらこちらの勘違いだったようです。数値が間違ってたので直しました報告ありがとうございました (2012/08/15 (水) 20:08:37)
  • バイカウントメルビル : 赤いところが今回直した部分です。 (2012/08/15 (水) 20:13:24)
  • 燻製 : すごっ！！でも星そのものはズームしたとき拡大しないのか・・・、名前表示した状態で縮小しまくると「タイヨウヌスザ４０バンセイセイ」になるww (2012/08/15 (水) 21:03:58)
  • バイカウントメルビル : 星そのものが拡大っていっても1pixel自体が相当でかいので (2012/08/15 (水) 21:51:43)
  • バイカウントメルビル : あとコメント外したバージョンはおまけ的な感じなので動作は保証しません(´・ω・｀) (2012/08/15 (水) 21:52:48)
  • 名無しさん : タイヨウヌスザ４０バンセイセイ　づごい名前だWWセンスなさ過ぎＷＷ (2012/08/16 (木) 08:03:51)
  • 名無しさん : タイヨウが画面外に出ると真っ暗になる (2012/08/16 (木) 08:07:18)
  • メルビル : 1pixel自体相当でかいってこの前言ったけど、よく考えてみたらそんなことなかった (2012/08/30 (木) 22:44:54)
  • バグ発見! : 太陽を24文字目まで動かすと、「プロキシマ・ケンタウリアルファ・ケンタウリバーナードセイウォルフ359ラランド21185シリウスルイテン726-8ロス154ロス248エリダヌスザイプシロンセイラカーユ9352ロス128ミズガメザEZセイプロキオンハクチョウザ61バンセイシュトルーフェ2398」(本当はくそ長いです)　長文サーセン (2014/10/04 (土) 08:37:43)