プチコン3号＆BIGまとめWiki

サンプルプログラム集

パンくずリスト

初心者にも役に立つかもしれないサンプル的、および部品的なプログラムをここに集積しましょう。

BASIC の基本

こんにちは、世界

最初の一歩。文字列を表示する場合はダブルクォーテーションで囲む必要があります。
なお、ダブルクォーテーションはコンソールに表示されません。

  1. ＰＲＩＮＴ　”Ｈｅｌｌｏ，　プチコン３ごう　ｗｏｒｌｄ！”

ダブルクォーテーションの表示

ダブルクォーテーションをコンソールに表示する場合はCHR$()関数を使用する必要があります。

  1. ＰＲＩＮＴ　ＣＨＲ＄（３４）

個人情報を抽出

プチコンが個人情報を抽出して喜ぶプログラムです。

  1. ＩＮＰＵＴ　”あなたの　なまえは”　；　ＮＡＭＥ＄
  2. ＩＮＰＵＴ　”おとしは　いくつですか”　；　ＡＧＥ
  3. ＰＲＩＮＴ　”あなたの　なまえは　”　；　ＮＡＭＥ＄　；　”　で”
  4. ＰＲＩＮＴ　”おとしは　”　；　ＡＧＥ　；　”　さい　ですね”
  5. ＰＲＩＮＴ　”こじんじょうほうを　おいしく　いただきました、　ククク”
  6. ＷＡＩＴ　３０

無限ループ

数え上げ

  1. Ａ＝０
  2. ＠ＣＯＵＮＴ
  3. 　ＰＲＩＮＴ　Ａ
  4. 　Ａ＝Ａ＋１
  5. ＧＯＴＯ＠ＣＯＵＮＴ

コンソール時計

  1. ＣＬＳ
  2. ＠ＴＩＭＥ
  3. 　ＬＯＣＡＴＥ　０，０
  4. 　ＰＲＩＮＴ　”Р”；ＴＩＭＥ＄
  5. 　ＶＳＹＮＣ　６０
  6. ＧＯＴＯ＠ＴＩＭＥ

BGMが終わるまで待つ

  1. ＠ＬＯＯＰ
  2. ＶＳＶＮＣ　１
  3. ＩＦ　ＢＧＭＣＨＫ（）＝＝０　ＴＨＥＮ　＠ＯＵＴ
  4. ＧＯＴＯ　＠ＬＯＯＰ
  5. ＠ＯＵＴ

再帰

階乗

  1. ＤＥＦ　Ｆ（Ｎ）
  2. 　ＩＦ　Ｎ＜＝０　ＴＨＥＮ
  3. 　　ＲＥＴＵＲＮ　１
  4. 　ＥＬＳＥ
  5. 　　ＲＥＴＵＲＮ　Ｎ＊Ｆ（Ｎ−１）
  6. 　ＥＮＤＩＦ
  7. ＥＮＤ
  9. ＰＲＩＮＴ　Ｆ（１０）　’３６２８８００
  1. ＤＥＦ　ＦＩＢ（Ｌ）
  2. 　ＩＦ　Ｌ＜＝０　ＴＨＥＮ　ＲＥＴＵＲＮ　１
  3. 　ＲＥＴＵＲＮ　ＦＩＢ（Ｌ−１）＋ＦＩＢ（Ｌ−２）
  4. ＥＮＤ
  5. ＰＲＩＮＴ　ＦＩＢ（１）　’２

その他

STICK命令

  1. ＠Ａ
  2. ＶＳＹＮＣ　１
  3. ＳＴＩＣＫ　ＯＵＴ　ＳＸ，ＳＹ
  4. Ｘ＝ＳＸ＊１００＋２００
  5. Ｙ＝ＳＹ＊−１００＋１００
  6. ＧＣＬＳ
  7. ＧＬＩＮＥ　２００，１００，Ｘ，Ｙ，ＲＧＢ（２５５，２５５，２５５）
  8. ＧＯＴＯ　＠Ａ

BGの配置

１〜６行を変更して好きな配置ができます

  1. ＤＡＴＡ”０１”，１，２
  2. ＤＡＴＡ”０１０１０”
  3. ＤＡＴＡ”１０１０１”
  4. ＤＡＴＡ”０１０１０”
  5. ＤＡＴＡ”１０１０１”
  6. ＤＡＴＡ”０１０１０”
  8. ＲＥＡＤ　Ｕ＄
  9. ＤＩＭ　ＣＯＤＥ［ＬＥＮ（Ｕ＄）］
  10. ＦＯＲ　Ｉ＝０ＴＯ　ＬＥＮ（Ｕ＄）−１
  11. 　ＲＥＡＤ　ＣＯＤＥ［Ｉ］
  12. ＮＥＸＴ
  14. Ｙ＝０
  15. ＲＥＰＥＡＴ
  16. 　ＲＥＡＤ　Ｃ＄
  17. 　ＩＦ　Ｃ＄＝＝””ＴＨＥＮ　ＢＲＥＡＫ
  18. 　Ｌ＝ＬＥＮ（Ｃ＄）−１
  19. ＦＯＲ　Ｘ＝０　ＴＯＬ
  20. 　　ＢＧＰＵＴ　０，Ｘ，Ｙ，ＣＯＤＥ［ＩＮＳＴＲ（Ｕ＄，Ｃ＄［Ｘ］）］
  21. 　ＮＥＸＴ
  22. 　ＩＮＣ　Ｘ
  23. ＵＮＴＩＬ　０

キャラクターの移動、ジャンプ

5行目のC、7行目のT、10、11行目を変更してキャラクター、アニメーション速度、ジャンプ力、重力を変えられます。

  1. ＡＣＬＳ
  2. ・
  3. ・
  4. ・
  5. Ｃ＝４９６
  6. ＳＰＳＥＴ　０，Ｃ
  7. Ｘ＝１００：Ｙ＝１５０：Ｔ＝２．５
  8. Ｊ＝０
  9. Ｖ＝０
  10. Ａ＝０．１
  11. ＪＰＯＷ＝４
  13. ＷＨＩＬＥ　１
  14. Ｂ＝ＢＵＴＴＯＮ（２）
  15. Ｂ２＝ＢＵＴＴＯＮ（０）
  16. Ｂ３＝ＢＵＴＴＯＮ（３）
  17. ＮＸ＝Ｘ
  18. ＳＰＤ＝１
  19. ＩＦ　Ｂ２　ＡＮＤ　＃Ｙ　ＴＨＥＮ　ＳＰＤ＝２
  20. ＩＦ　Ｂ２　ＡＮＤ　＃ＬＥＦＴ　ＴＨＥＮ　ＮＸ＝Ｘ−ＳＰＤ：ＣＣ＝８
  21. ＩＦ　Ｂ２　ＡＮＤ　＃ＲＩＧＨＴ　ＴＨＥＮ　ＮＸ＝Ｘ＋ＳＰＤ：ＣＣ＝０
  22. ＩＦ　Ｊ＝＝１　ＴＨＥＮ　＠ＳＫＩＰ
  23. ＩＦ　Ｂ　ＡＮＤ　１５　ＯＲ　Ｂ３　ＡＮＤ　１５　ＴＨＥＮ
  24. 　ＳＰＣＨＲ　０，Ｃ＋ＣＣ
  25. 　ＩＦ　Ｂ　ＡＮＤ　１５　ＴＨＥＮ
  26. 　ＳＰＡＮＩＭ　０，”Ｉ＋”，Ｔ，１，Ｔ，２，Ｔ，３，Ｔ，０，０
  27. 　ＥＮＤＩＦ
  28. ＥＮＤＩＦ
  29. ＠ＳＫＩＰ
  30. ＩＦ　Ｊ＝＝１　ＴＨＥＮ　ＳＰＣＨＲ　０，４９９＋ＣＣ：ＪＣＮＴ＝１
  31. ＩＦ　Ｊ＝＝０　＆＆　ＪＣＮＴ＝＝！　ＴＨＥＮ　ＳＰＣＨＲ　０，Ｃ＋ＣＣ：ＪＣＮＴ＝０
  33. ＩＦ　ＮＸ＞＝０　＆＆　ＮＸ＜＝３８４　ＴＨＥＮ　Ｘ＝ＮＸ
  34. ＩＦ　Ｊ＝＝０　＆＆　Ｂ　ＡＮＤ　＃Ａ　ＴＨＥＮ　ＢＥＥＰ　８：Ｊ＝０：Ｖ＝−ＪＰＯＷ
  35. Ｙ＝Ｙ＋Ｖ
  36. Ｖ＝Ｖ＋Ａ
  37. ＩＦ　Ｙ＞１４９　ＴＨＥＮ　Ｙ＝１５０：Ｊ＝０：Ｖ＝０
  38. ＳＰＯＦＳ　０，Ｘ，Ｙ　
  39. ＰＲＩＮＴ　Ｘ，Ｙ　←ここは無しでもおｋ
  40. ＶＳＹＮＣ
  41. ＷＥＮＤ

ボイスチャットで声を漏らしたくない人のために

  1. ＠ＳＴＡＲＴ
  2. ＩＮＰＵＴ　”しゃべってもらうことばを入力”　；　Ａ＄
  3. ＴＡＬＫ　Ａ＄
  4. ＧＯＴＯ　＠ＳＴＡＲＴ

主にオンラインゲームなどで使えます しゃべったあとまた戻るので便利です

DATファイルの生データを見る

  1. ＥＸＥＣ　”ＰＲＧ１：＜ＤＡＴの名前＞”

これはEXECが誤動作するものを利用しています。
未だに直されていないようで・・・。GRPはできるか不明です。

メニュー 【3号】

ヘルプ

リンク

最近の更新

最近の人気ページ

オンライン情報

  • 現在同時に 1 人がこのサイトを見ています
  • このページはこれまでに 8777 回、本日は 1 回、昨日は 0 回閲覧されました

ページの先頭に戻る

表示モード : [ スマホ・3DS対応表示 | クラシック表示 ]
PukiWiki 1.4.7 Copyright © 2001-2006 PukiWiki Developers Team. License is GPL. Based on "PukiWiki" 1.3 by yu-ji
ページの処理時間 : 0.161 秒 | このページの最終更新 : 2022/09/20 (火) 12:49:27 (565d) | ログイン
Copyright(C) 2011-2014 プチコンまとめWiki ◆1sxkymI8ji30