プチコンまとめWiki (初代/mkII)

パンくずリスト

• トップ
• Toukou
• プチコちゃんとレーダーバトル

2014年8月10日投稿 / 投稿者 : まげ / タグ : 投稿プログラム ゲーム QRコード mkII専用 海戦ゲーム プチコちゃん

今日のアクセス：1　　トータルアクセス：2067

概要

いわゆる「海戦ゲーム」です。見えない敵艦を、レーダーの反応を頼りに発見し、撃沈してください。
従来はターン制ですが、本作ではお互いの攻撃が同時に行われるため、「引き分け」もあります。敵艦数も1隻だけなので、気軽に遊べると思います。

元々のルールをご存知ない方は、「海戦ゲーム」で検索すると詳しく知ることができます。…手抜きでゴメンなさい(^^;)。

※「プチコちゃん」はオリジナルキャラであり、同名の他のキャラとは無関係です。

遊び方

タイトル画面

Aボタンでゲーム開始、Ｘボタンで終了します。

ゲーム画面

方向ボタンの上下左右で、攻撃するポイントを指定し、Aボタンで決定します。
攻撃の結果が「○」ならハズレ、「◎」ならその線上に敵艦がいる印で、敵艦に命中した時は「＊」となります。

Yボタンを押すと、ゲームを中断できます。

戯れ言

コンソール表現の魅力は、ダンボーの魅力に通じるような。実はMZ-700の実機を見たことがありません…。

プチコちゃんシリーズ作品です。リアルタイムじゃない、ゆっくりと考えて遊べるゲームにしたくて作りました。学生時代によく遊んだものです（紙とペンで）。
このテのゲームは敵アルゴリズムをどーするかが勝負です。その昔、ゲームボーイソフトとして発売されたこのテのは、最低でした（定価で購入したので断言しました）。なるべく「人」の考え方に基づくようにしたかったのですが、一部ズルしてます。せめて、理不尽さはないようにしたつもりです。

よろしければ拙HP・【プチコＲｏｏｍ】へもお越しください。こちらには絶対に載せられない作品もあります(^^;)。

アンケート

海戦ゲームで遊んだことはありますか？（アナログ、デジタル問わず）

選択肢	投票
ある	10
ない	4

QR コード

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

プログラムリスト

+

プログラムリスト／530行

ＣＬＥＡＲ：ＣＯＬＯＲ　０，０：ＡＣＬＳ：ＰＮＬＴＹＰＥ　”ＯＦＦ”：ＢＧＭＳＴＯＰ ＴＢ＄＝”＠Ｓ９＠Ｅ１０＠Ｎ２４５０＠Ｔ７０” ＤＩＭ　ＭＭ＄（２，９），ＰＭ＄（９，９），ＭＩ＄（２，２） ＤＩＭ　ＰＣＫ＄（１１，１１），ＰＭＥＳ＄（１１） ＲＸ（０）＝２２：ＲＹ（０）＝１ ＲＸ（１）＝０：ＲＹ（１）＝１ ＭＩ＄（０，０）＝”▲”：ＭＩ＄（０，１）＝”・” ＭＩ＄（１，０）＝”・”：ＭＩ＄（１，１）＝”▼” ＢＳ（０）＝１２７：ＢＳ（１）＝０ ＲＥＳＴＯＲＥ　＠ＰＣＫ ＦＯＲ　Ｙ＝０　ＴＯ　１０：ＦＯＲ　Ｘ＝０　ＴＯ　１０ ＲＥＡＤ　ＰＣＫ＄（Ｙ，Ｘ） ＮＥＸＴ　Ｘ：ＲＥＡＤ　ＰＭＥＳ＄（Ｙ）：ＮＥＸＴ　Ｙ ’タイトル＜−−−−−−−−−−−−−−−−−−−−− ＠ＴＩＴＬＥ ＩＦ　ＢＵＴＴＯＮ（）！＝０　ＴＨＥＮ　＠ＴＩＴＬＥ ＣＬＳ ＢＧＭＳＴＯＰ ＧＯＳＵＢ　＠ＰＣＫＭＯＶＥ ＣＯＬＯＲ　１２ ＬＯＣＡＴＥ　０，３：？”フ゜チコチャン　ト” ＣＯＬＯＲ　９：ＬＯＣＡＴＥ　０，４ ？”　　　　　┝┸л　” ？”　　　　┝┸　　л　　　　┝┿┿┿┸л┫л” ？”　　　┝┸　　　　　　　┝┸　┝┸　　　　л” ？”　　┝┸　　　┝┿┿┸лл┝┿┸┝┿┿┸л　” ？”　┝┸　┝┸лл　　　　　┝┸　л　　　　л” ？”┝┿┿┿┸　　лл　　┝┿┸　　　л　　　　” ？”л　　　　　　　　　　л　　　　　　” ？”　л　　　　　　　　　　　┝┸┝┸л┫　┝┸л　　┝┸┝┸л　” ？”　　　　　　　　　　　　┝┸┝┸　　　┝┸　　　┝┸┝┸　　л” ？”　　ＲＡＤＥＲ　　　　┝┸┝┸　　　┝┿┿┿┸┝┸┝┸┝┸л　” ？”　　　　　　　　　　┝┸　┿　　　┝┸　　　┝┸┝┸┝┸　　л” ？”ＢＡＴＴＬＥ　　┝┿┸　　┿┿┸┝┸　　┝┿┸┝┿┿┸　　　　” ？”　　　　　　　　л　　　　　　　л　　　л　　　　　　　　　　” ？”　　　　　　　　　л　　　　　　　л　　　л　　　　　　　　　” ＣＯＬＯＲ　１４ ＬＯＣＡＴＥ　３，０：？”（Ｃ）ＭＡＧＥ／Ｓｔｕｄｉｏ　ＬＯＶＥＭＡＲＩＮＥ” ＩＭ＄＝”Аスタ−ト　　Фエント゛” ＧＯＳＵＢ　＠ＩＮＦＯ ＠ＴＩＬＯＯＰ ＩＦ　ＢＵＴＴＯＮ（）　ＡＮＤ　１６　ＧＯＴＯ　＠ＳＴＡＲＴ ＩＦ　ＢＵＴＴＯＮ（）　ＡＮＤ　６４　ＧＯＴＯ　＠ＱＵＩＴ ＷＡＩＴ　１ ＧＯＴＯ　＠ＴＩＬＯＯＰ ’セットアッフ゜＜−−−−−−−−−−−−−−−−−− ＠ＳＴＡＲＴ ＩＦ　ＢＵＴＴＯＮ（）！＝０　ＴＨＥＮ　＠ＳＴＡＲＴ ＢＧＭＳＴＯＰ　０，１ ＧＯＳＵＢ　＠ＦＡＤＥ ＷＡＩＴ　４０ ＦＯＲ　Ｑ＝０　ＴＯ　１ Ｘ＝ＲＮＤ（７）：Ｙ＝ＲＮＤ（７）：ＳＭ＝ＲＮＤ（２） ＭＸ＝７：ＭＹ＝７ ＩＦ　ＳＭ＝＝０　ＴＨＥＮ　ＭＸ＝ＭＸ−１　ＥＬＳＥ　ＭＹ＝ＭＹ−１ ＩＦ　Ｘ＞＝ＭＸ　ＴＨＥＮ　Ｘ＝ＭＸ ＩＦ　Ｙ＞＝ＭＹ　ＴＨＥＮ　Ｙ＝ＭＹ ＦＯＲ　ＶＹ＝０　ＴＯ　８ ＭＰ＄＝”” ＦＯＲ　ＶＸ＝０　ＴＯ　８ ＭＰＰ＄＝”С” ＩＦ　ＶＹ＞＝Ｙ　ＡＮＤ　ＶＹ＜＝Ｙ＋２−（１−ＳＭ）　ＡＮＤ　ＶＸ＞＝Ｘ　ＡＮＤ　ＶＸ＜＝Ｘ＋２−ＳＭ　ＴＨＥＮ　ＭＰＰ＄＝”■” ＭＰ＄＝ＭＰ＄＋ＭＰＰ＄ ＮＥＸＴ　ＶＸ ＭＭ＄（Ｑ，ＶＹ）＝ＭＰ＄ ＮＥＸＴ　ＶＹ ＮＥＸＴ　Ｑ ＦＯＲ　Ｙ＝０　ＴＯ　８：ＦＯＲ　Ｘ＝０　ＴＯ　８ ＰＭ＄（Ｘ，Ｙ）＝”С” ＮＥＸＴ　Ｘ：ＮＥＸＴ　Ｙ ＣＯＬＯＲ　１２ ＬＯＣＡＴＥ　２３，０：？”フ゜チコノＭＡＰ”； ＣＯＬＯＲ　７ ＬＯＣＡＴＥ　０，０：？”アナタノＭＡＰ”； ＣＯＬＯＲ　４ ＴＮ＝０：ＧＯＳＵＢ　＠ＳＴＡＧＥ ＴＮ＝１：ＧＯＳＵＢ　＠ＳＴＡＧＥ ＰＮ＝０：ＧＯＳＵＢ　＠ＰＣＫＶＩＥＷ ＳＸ（０）＝４：ＳＹ（０）＝４ ＧＣ（０）＝６：ＧＣ（１）＝ＧＣ（０） ＢＴ＝０ ’メイン＜−−−−−−−−−−−−−−−−−−−−−− ＠ＬＯＯＰ ＩＦ　ＢＵＴＴＯＮ（）！＝０　ＴＨＥＮ　＠ＬＯＯＰ ＰＮ＝０：ＧＯＳＵＢ　＠ＰＣＫＶＩＥＷ：ＧＯＳＵＢ　＠ＰＣＫＭＥＳ ＢＥＥＰ　３ ＩＭ＄＝”←↑→↓カ−ソルイト゛ウ　　Аケッテイ　　Хコウサン” ＧＯＳＵＢ　＠ＩＮＦＯ ’フ゜レイヤ−　コウケ゛キ＜−−−− ＠ＳＬＯＯＰ ＴＮ＝０：ＧＯＳＵＢ　＠ＳＴＡＧＥ ＣＯＬＯＲ　０ ＬＯＣＡＴＥ　ＲＸ（０）＋ＳＸ（０），ＲＹ（０）＋ＳＹ（０）：？”П” ＠ＳＷＡＩＴ ＢＮ＝ＢＵＴＴＯＮ（） ＷＡＩＴ　１ ＩＦ　ＢＮ＝＝ＢＴ　ＴＨＥＮ　＠ＳＷＡＩＴ ＢＴ＝ＢＮ ＩＦ　ＢＴ　ＡＮＤ　１２８　ＴＨＥＮ　ＧＯＳＵＢ　＠ＧＩＶＥ：ＧＯＴＯ　＠ＥＮＤＳＵＢ ＩＦ　ＢＴ　ＡＮＤ　１６　ＴＨＥＮ　＠ＳＰＡＳＳ ＩＦ　（ＢＴ　ＡＮＤ　１）！＝０　ＡＮＤ　ＳＹ（０）＞０　ＴＨＥＮ　ＳＹ（０）＝ＳＹ（０）−１ ＩＦ　（ＢＴ　ＡＮＤ　２）！＝０　ＡＮＤ　ＳＹ（０）＜８　ＴＨＥＮ　ＳＹ（０）＝ＳＹ（０）＋１ ＩＦ　（ＢＴ　ＡＮＤ　４）！＝０　ＡＮＤ　ＳＸ（０）＞０　ＴＨＥＮ　ＳＸ（０）＝ＳＸ（０）−１ ＩＦ　（ＢＴ　ＡＮＤ　８）！＝０　ＡＮＤ　ＳＸ（０）＜８　ＴＨＥＮ　ＳＸ（０）＝ＳＸ（０）＋１ ＧＯＴＯ　＠ＳＬＯＯＰ ＠ＳＰＡＳＳ ＭＣＫ＄＝ＭＩＤ＄（ＭＭ＄（０，ＳＹ（０）），ＳＸ（０），１） ＩＦ　ＭＣＫ＄！＝”С”　ＡＮＤ　ＭＣＫ＄！＝”■”　ＴＨＥＮ　＠ＳＬＯＯＰ ’フ゜チコ　コウケ゛キ＜−−−− ＠ＰＬＯＯＰ ＳＸ（１）＝ＲＮＤ（９）：ＳＹ（１）＝ＲＮＤ（９） ＦＭＣ＄＝ＰＭ＄（ＳＸ（１），ＳＹ（１）） ＩＦ　ＦＭＣ＄！＝”С”　ＡＮＤ　ＦＭＣ＄！＝”■”　ＡＮＤ　ＦＭＣ＄！＝”╂”　ＴＨＥＮ　＠ＰＬＯＯＰ ＭＣＫ＄＝ＭＩＤ＄（ＭＭ＄（１，ＳＹ（１）），ＳＸ（１），１） ＩＦ　ＭＣＫ＄！＝”С”　ＡＮＤ　ＭＣＫ＄！＝”■”　ＴＨＥＮ　＠ＰＬＯＯＰ ＧＯＳＵＢ　＠ＩＮＦＯＤＥＬ ’セントウ＜−−−−−−−−−−−−−−−−−−−−−− ＰＮ＝１：ＧＯＳＵＢ　＠ＰＣＫＶＩＥＷ：ＧＯＳＵＢ　＠ＰＣＫＭＥＳ ＩＦ　ＦＭＣ＄＝＝”╂”　ＴＨＥＮ　ＧＯＳＵＢ　＠ＡＳＥ ＢＥＥＰ　１０ ＦＯＲ　ＶＹ＝８　ＴＯ　０　ＳＴＥＰ　−１ ＦＯＲ　ＴＮ＝０　ＴＯ　１ ＧＯＳＵＢ　＠ＳＴＡＧＥ ＣＯＬＯＲ　１３ ＬＯＣＡＴＥ　ＲＸ（０）＋ＳＸ（０），ＲＹ（０）＋ＳＹ（０）：？”П” ＣＯＬＯＲ　２ ＬＯＣＡＴＥ　ＲＸ（ＴＮ）＋ＳＸ（ＴＮ），ＲＹ（ＴＮ）＋ＶＹ：？　ＭＩ＄（ＴＮ，０） ’ＷＡＩＴ　１ ＮＥＸＴ　ＴＮ ＮＥＸＴ　ＶＹ ＴＮ＝０：ＧＯＳＵＢ　＠ＳＴＡＧＥ ＴＮ＝１：ＧＯＳＵＢ　＠ＳＴＡＧＥ ＷＡＩＴ　１０ ＦＯＲ　ＶＹ＝０　ＴＯ　８ ＦＯＲ　ＴＮ＝０　ＴＯ　１ ＧＯＳＵＢ　＠ＳＴＡＧＥ ＩＦ　ＶＹ＞ＳＹ（ＴＮ）　ＴＨＥＮ　＠ＭＰＡＳＳ ＣＯＬＯＲ　２ ＬＯＣＡＴＥ　ＲＸ（ＴＮ）＋ＳＸ（ＴＮ），ＲＹ（ＴＮ）＋ＶＹ：？　ＭＩ＄（ＴＮ，１） ＠ＭＰＡＳＳ ’ＷＡＩＴ　１ ＮＥＸＴ　ＴＮ ＮＥＸＴ　ＶＹ ’セントウ　ケッカ＜−−−−−−−−−−−−−−−−− ＦＯＲ　ＴＮ＝０　ＴＯ　１ ＣＫ＄（ＴＮ）＝”○” ＦＯＲ　Ｃ＝０　ＴＯ　８ ＩＦ　ＭＩＤ＄（ＭＭ＄（ＴＮ，Ｃ），ＳＸ（ＴＮ），１）＝＝”■”　ＴＨＥＮ　ＣＫ＄（ＴＮ）＝”◎” ＩＦ　ＭＩＤ＄（ＭＭ＄（ＴＮ，ＳＹ（ＴＮ）），Ｃ，１）＝＝”■”　ＴＨＥＮ　ＣＫ＄（ＴＮ）＝”◎” ＮＥＸＴ　Ｃ ＩＦ　ＭＩＤ＄（ＭＭ＄（ＴＮ，ＳＹ（ＴＮ）），ＳＸ（ＴＮ），１）＝＝”■”　ＴＨＥＮ　ＣＫ＄（ＴＮ）＝”＊” ＩＦ　ＣＫ＄（ＴＮ）＝＝”○”　ＴＨＥＮ　ＢＥＥＰ　５９，０，６４，ＢＳ（ＴＮ）：ＲＮ（ＴＮ）＝３ ＩＦ　ＣＫ＄（ＴＮ）＝＝”◎”　ＴＨＥＮ　ＢＥＥＰ　３６，０，６４，ＢＳ（ＴＮ）：ＲＮ（ＴＮ）＝４ ＩＦ　ＣＫ＄（ＴＮ）＝＝”＊”　ＴＨＥＮ　ＢＥＥＰ　１３，０，６４，ＢＳ（ＴＮ）：ＲＮ（ＴＮ）＝５：ＧＣ（ＴＮ）＝ＧＣ（ＴＮ）−１ ＭＭ＄（ＴＮ，ＳＹ（ＴＮ））＝ＳＵＢＳＴ＄（ＭＭ＄（ＴＮ，ＳＹ（ＴＮ）），ＳＸ（ＴＮ），１，ＣＫ＄（ＴＮ）） ＧＯＳＵＢ　＠ＳＴＡＧＥ ＮＥＸＴ　ＴＮ ’フ゜チコ　リアクション＜−−−−−−−−−−−−−− ＩＦ　ＲＮ（０）＞ＲＮ（１）　ＴＨＥＮ　ＲＮＮ＝０　ＥＬＳＥ　ＲＮＮ＝１ ＩＦ　ＲＮ（０）＝＝ＲＮ（１）　ＴＨＥＮ　ＲＮＮ＝ＲＮＤ（２） ＩＦ　ＲＮ（０）＝＝５　ＡＮＤ　ＲＮ（１）＝＝５　ＴＨＥＮ　ＩＦ　ＧＣ（０）＜ＧＣ（１）　ＴＨＥＮ　ＲＮＮ＝０　ＥＬＳＥ　ＲＮＮ＝１ ＰＮ＝ＲＮ（ＲＮＮ）＋ＲＮＮ＊４ ＧＯＳＵＢ　＠ＰＣＫＶＩＥＷ：ＧＯＳＵＢ　＠ＰＣＫＭＥＳ ’ケッカ　フ゜チコ　メモ＜−−−−−−−−−−−−−− ＰＭ＄（ＳＸ（１），ＳＹ（１））＝ＣＫ＄（１） ＩＦ　ＣＫ＄（１）！＝”○”　ＴＨＥＮ　＠ＫＭ２ ＦＯＲ　Ｃ＝０　ＴＯ　８ ＰＭ＄（ＳＸ（１），Ｃ）＝”○” ＰＭ＄（Ｃ，ＳＹ（１））＝”○” ＮＥＸＴ　Ｃ ＩＦ　ＳＸ（１）＝＝１　ＴＨＥＮ　ＦＯＲ　Ｃ＝０　ＴＯ　８：ＰＭ＄（０，Ｃ）＝”○”：ＮＥＸＴ　Ｃ ＩＦ　ＳＸ（１）＝＝７　ＴＨＥＮ　ＦＯＲ　Ｃ＝０　ＴＯ　８：ＰＭ＄（８，Ｃ）＝”○”：ＮＥＸＴ　Ｃ ＩＦ　ＳＹ（１）＝＝１　ＴＨＥＮ　ＦＯＲ　Ｃ＝０　ＴＯ　８：ＰＭ＄（Ｃ，０）＝”○”：ＮＥＸＴ　Ｃ ＩＦ　ＳＹ（１）＝＝７　ＴＨＥＮ　ＦＯＲ　Ｃ＝０　ＴＯ　８：ＰＭ＄（Ｃ，８）＝”○”：ＮＥＸＴ　Ｃ ＧＯＴＯ　＠ＫＭＰＡＳＳ ＠ＫＭ２ ＩＦ　ＣＫ＄（１）！＝”◎”　ＴＨＥＮ　＠ＫＭ３ ＦＯＲ　Ｃ＝０　ＴＯ　８ ＩＦ　ＰＭ＄（ＳＸ（１），Ｃ）！＝”○”　ＡＮＤ　ＰＭ＄（ＳＸ（１），Ｃ）！＝”◎”　ＴＨＥＮ　ＰＭ＄（ＳＸ（１），Ｃ）＝”■” ＩＦ　ＰＭ＄（Ｃ，ＳＹ（１））！＝”○”　ＡＮＤ　ＰＭ＄（Ｃ，ＳＹ（１））！＝”◎”　ＴＨＥＮ　ＰＭ＄（Ｃ，ＳＹ（１））＝”■” ＮＥＸＴ　Ｃ ＦＯＲ　Ｙ＝０　ＴＯ　８：ＦＯＲ　Ｘ＝０　ＴＯ　８ Ｋ＄＝ＰＭ＄（Ｘ，Ｙ） ＩＦ　Ｘ！＝ＳＸ（１）　ＡＮＤ　Ｙ！＝ＳＹ（１）　ＡＮＤ　Ｋ＄！＝”◎”　ＡＮＤ　Ｋ＄！＝”■”　ＴＨＥＮ　ＰＭ＄（Ｘ，Ｙ）＝”○” ＮＥＸＴ　Ｘ：ＮＥＸＴ　Ｙ ＧＯＴＯ　＠ＫＭＰＡＳＳ ＠ＫＭ３ ＩＦ　ＣＫ＄（１）！＝”＊”　ＴＨＥＮ　＠ＫＭＰＡＳＳ ＦＯＲ　Ｙ＝０　ＴＯ　８：ＦＯＲ　Ｘ＝０　ＴＯ　８ ＩＦ　ＭＩＤ＄（ＭＭ＄（１，Ｙ），Ｘ，１）！＝”■”　ＴＨＥＮ　ＡＷ＄＝”○”　ＥＬＳＥ　ＡＷ＄＝”■” ＰＭ＄（Ｘ，Ｙ）＝ＡＷ＄ ＮＥＸＴ　Ｘ：ＮＥＸＴ　Ｙ ＠ＫＭ３Ｂ Ｘ＝ＲＮＤ（８）：Ｙ＝ＲＮＤ（８） ＩＦ　ＰＭ＄（Ｘ，Ｙ）＝＝”■”　ＴＨＥＮ　＠ＫＭ３Ｂ ＰＭ＄（Ｘ，Ｙ）＝”╂” ＠ＫＭＰＡＳＳ ’ＦＯＲ　Ｙ＝０　ＴＯ　８：ＦＯＲ　Ｘ＝０　ＴＯ　８ ’ＬＯＣＡＴＥ　１５＋Ｘ，１２＋Ｙ：？　ＰＭ＄（Ｘ，Ｙ） ’ＮＥＸＴ　Ｘ：ＮＥＸＴ　Ｙ ＷＡＩＴ　６０ ’シュウリョウ　ハンテイ＜−−−−−−−−−−−−−− ＦＯＲ　Ｉ＝０　ＴＯ　１ ＩＦ　ＧＣ（Ｉ）＝＝０　ＴＨＥＮ　＠ＥＮＤ ＮＥＸＴ　Ｉ ＧＯＴＯ　＠ＬＯＯＰ ’エント゛＜−−−−−−−−−−−−−−−−−−−−− ＠ＥＮＤ ＩＦ　ＢＵＴＴＯＮ（）！＝０　ＴＨＥＮ　＠ＥＮＤ ＷＡＩＴ　３０ ＢＧＭＰＬＡＹ　６ ＩＦ　ＧＣ（０）＝＝０　ＴＨＥＮ　ＭＥＳ＄＝”アナタ　ノ　カチ”：ＰＮ＝６ ＩＦ　ＧＣ（１）＝＝０　ＴＨＥＮ　ＭＥＳ＄＝”フ゜チコ　ノ　カチ”：ＰＮ＝１０ ＩＦ　ＧＣ（０）＝＝ＧＣ（１）　ＴＨＥＮ　ＭＥＳ＄＝”ヒキワケ　テ゛ス”：ＰＮ＝２ ＧＯＳＵＢ　＠ＰＣＫＶＩＥＷ：ＧＯＳＵＢ　＠ＰＣＫＭＥＳ ＬＯＣＡＴＥ　０，１１：ＣＯＬＯＲ　３：？　ＭＥＳ＄ ＠ＥＮＤＳＵＢ ＩＭ＄＝”Аスタ−ト　　Бタイトル” ＧＯＳＵＢ　＠ＩＮＦＯ ＠ＥＷＡＩＴ ＩＦ　ＢＵＴＴＯＮ（２）　ＡＮＤ　１６　ＧＯＴＯ　＠ＳＴＡＲＴ ＩＦ　ＢＵＴＴＯＮ（２）！＝３２　ＧＯＴＯ　＠ＥＷＡＩＴ ＧＯＴＯ　＠ＴＩＴＬＥ ’オワリ−−−−−−−−−−−−−−−−−−−−−−− ＠ＱＵＩＴ ＣＯＬＯＲ　０，０：ＣＬＳ ＢＧＭＳＴＯＰ　０，１ ＷＡＩＴ　３０ ＣＯＬＯＲ　０：ＬＯＣＡＴＥ　０，８ ？”　　　　　┌─────────┐　　┝┿┿┿┰　　　　” ？”　　　　　│　　　　　　　　　│　　┸┥┥┥┥　　　　” ？”　　　　　│　マ　タ　ネ　♪　├　┝│＾　＾│┰　　　” ？”　　　　　│　　　　　　　　　│　┸└　▽　┘┥　　　” ？”　　　　　└─────────┘　　к　　　л”；：ＣＯＬＯＲ　１２：？”フ゜チコ” ＣＯＬＯＲ　０ ＴＡＬＫ　ＴＢ＄＋”マタ’ネ−？” ＷＡＩＴ　６０ ＥＮＤ ’┿┿┿┿┿　サフ゛ル−チン　┿┿┿┿┿┿┿┿┿┿┿┿ ’マッフ゜　ヒョウシ゛＜−−−−−−−−−−−−−−− ＠ＳＴＡＧＥ ＦＯＲ　ＶＶＹ＝０　ＴＯ　８ ＭＶＢ＄＝ＭＭ＄（ＴＮ，ＶＶＹ） ＦＯＲ　ＶＶＸ＝０　ＴＯ　８ ＭＶＶ＄＝ＭＩＤ＄（ＭＶＢ＄，ＶＶＸ，１） ＣＯＬＯＲ　４ ＩＦ　ＭＶＶ＄＝＝”■”　ＡＮＤ　ＴＮ＝＝０　ＴＨＥＮ　ＭＶＶ＄＝”С” ＩＦ　ＭＶＶ＄＝＝”○”　ＴＨＥＮ　ＣＯＬＯＲ　１１ ＩＦ　ＭＶＶ＄＝＝”◎”　ＴＨＥＮ　ＣＯＬＯＲ　９ ＩＦ　ＭＶＶ＄＝＝”＊”　ＴＨＥＮ　ＣＯＬＯＲ　１３ ＩＦ　ＭＶＶ＄＝＝”■”　ＴＨＥＮ　ＣＯＬＯＲ　７ ＬＯＣＡＴＥ　ＲＸ（ＴＮ）＋ＶＶＸ，ＲＹ（ＴＮ）＋ＶＶＹ：？　ＭＶＶ＄； ＮＥＸＴ　ＶＶＸ ＣＯＬＯＲ　４：？”У”； ＮＥＸＴ　ＶＶＹ ＬＯＣＡＴＥ　ＲＸ（ＴＮ），ＲＹ（ＴＮ）＋９：ＣＯＬＯＲ　４：？”Т”＊９； ＲＥＴＵＲＮ ’フ゜チコ　ヒョウシ゛＜−−−−−−−−−−−−−−− ＠ＰＣＫＶＩＥＷ ＣＯＬＯＲ　１２ ＦＯＲ　ＶＶＣ＝０　ＴＯ　１０ ＬＯＣＡＴＥ　１０，７＋ＶＶＣ：？　ＰＣＫ＄（ＰＮ，ＶＶＣ） ＮＥＸＴ　ＶＶＣ ＲＥＴＵＲＮ ＠ＰＣＫＭＥＳ ＣＯＬＯＲ　１２ ＬＯＣＡＴＥ　１０，５：？”　”＊１１ ＬＯＣＡＴＥ　１６−（ＬＥＮ（ＰＭＥＳ＄（ＰＮ））／２），５：？　ＰＭＥＳ＄（ＰＮ） ＲＥＴＵＲＮ ＠ＡＳＥ ＣＯＬＯＲ　１２ ＬＯＣＡＴＥ　１０，５：？”　ア、シマッタ・・・” ＬＯＣＡＴＥ　１５，９：？”　−；” ＲＥＴＵＲＮ ’インフォメ−　ヒョウシ゛＜−−−−−−−−−−−−− ＠ＩＮＦＯ ＩＬ＝ＬＥＮ（ＩＭ＄） ＧＯＳＵＢ　＠ＩＮＦＯＤＥＬ ＣＯＬＯＲ　２ ＬＯＣＡＴＥ　１５−ＩＬ／２，２１：？”─”＊（ＩＬ＋２） ＷＡＩＴ　５ ＬＯＣＡＴＥ　１５−ＩＬ／２，２０：？”┌”；”─”＊（ＩＬ）；”┐” ＬＯＣＡＴＥ　１５−ＩＬ／２，２１：？”│”；ＩＭ＄；”│” ＬＯＣＡＴＥ　１５−ＩＬ／２，２２：？”└”；”─”＊（ＩＬ）；”┘” ＲＥＴＵＲＮ ＠ＩＮＦＯＤＥＬ ＬＯＣＡＴＥ　０，２０：？”　”＊３２； ＬＯＣＡＴＥ　０，２１：？”　”＊３２； ＬＯＣＡＴＥ　０，２２：？”　”＊３２； ＲＥＴＵＲＮ ’フェ−ト゛＜−−−−−−−−−−−−−−−−−−−− ＠ＦＡＤＥ ＣＯＬＯＲ　４ ＦＯＲ　Ｃ＝０　ＴＯ　１ ＦＯＲ　Ｘ＝０　ＴＯ　３０　ＳＴＥＰ　２ ＦＯＲ　Ｙ＝０　ＴＯ　２３ ＬＯＣＡＴＥ　Ｘ，Ｙ：？　ＭＩＤ＄（”С　”，Ｃ，１）； ＮＥＸＴ　Ｙ ＷＡＩＴ　１ ＮＥＸＴ　Ｘ ＦＯＲ　Ｙ＝０　ＴＯ　２２　ＳＴＥＰ　２ ＬＯＣＡＴＥ　０，Ｙ：？　ＭＩＤ＄（”С　”，Ｃ，１）＊３２； ＷＡＩＴ　１ ＮＥＸＴ　Ｙ ＮＥＸＴ　Ｃ ＣＬＳ ＲＥＴＵＲＮ ’フ゜チコ　タイトルアニメ＜−−−−−−−−−−−−− ＠ＰＣＫＭＯＶＥ ＷＴ＝１０ ＢＧＭＰＬＡＹ　１８ ＣＯＬＯＲ　１２ ＬＯＣＡＴＥ　２３，３：？”　　┝┿┿┿┰　　” ＬＯＣＡＴＥ　２３，４：？”　　┿┸┸┸┸　　” ＬＯＣＡＴＥ　２３，５：？”　┝┸　・　│　　” ＬＯＣＡＴＥ　２３，６：？”　┸└йй＾┘┰　” ＬＯＣＡＴＥ　２３，７：？”　　и　й○з　　” ＬＯＣＡＴＥ　２３，８：？”　　и　　▲）　　” ＬＯＣＡＴＥ　２３，９：？”　　　з　и○　　” ＬＯＣＡＴＥ　２３，１０：？”　　┝┿┿┿┰　　” ＬＯＣＡＴＥ　２３，１１：？”　　┿┿┿┿┿　　” ＬＯＣＡＴＥ　２３，１２：？”　　ии　зз　　” ＬＯＣＡＴＥ　２３，１３：？”　　　┿　┿　　　” ＬＯＣＡＴＥ　２３，１４：？”　　　╂　╂　　　” ＷＡＩＴ　ＷＴ ＬＯＣＡＴＥ　２３，３：？”　　┝┿┿┿┰　　” ＬＯＣＡＴＥ　２３，４：？”　　┸┥┥┥┥　　” ＬＯＣＡＴＥ　２３，５：？”┝┿│・　・│┿┰” ＬＯＣＡＴＥ　２３，６：？”　　к○−й┘　　” ＬＯＣＡＴＥ　２３，７：？”　　ллмкл　　” ＬＯＣＡＴＥ　２３，８：？”　　（　▲　）з　” ＬＯＣＡＴＥ　２３，９：？”　　　з　и○　　” ＬＯＣＡＴＥ　２３，１０：？”　┝┿┿┿┿┿┰　” ＬＯＣＡＴＥ　２３，１１：？”　　ии　зз　　” ＬＯＣＡＴＥ　２３，１２：？”　　ии　зз　　” ＬＯＣＡＴＥ　２３，１３：？”　　　┿　┿　　　” ＬＯＣＡＴＥ　２３，１４：？”　　　╂　╂　　　” ＷＡＩＴ　ＷＴ ＬＯＣＡＴＥ　２３，３：？”　　┝┿┿┿┰　　” ＬＯＣＡＴＥ　２３，４：？”　　┥┥┥┥┿　　” ＬＯＣＡＴＥ　２３，５：？”　○│　・　┥┰　” ＬＯＣＡＴＥ　２３，６：？”　л└▽　　┘┥　” ＬＯＣＡＴＥ　２３，７：？”　　лмкжл　　” ＬＯＣＡＴＥ　２３，８：？”　　（▲　　зз　” ＬＯＣＡＴＥ　２３，９：？”　　　з　○к　　” ＬＯＣＡＴＥ　２３，１０：？”　　┝┿┿┿┰　　” ＬＯＣＡＴＥ　２３，１１：？”　　┿┿┿┿┿　　” ＬＯＣＡＴＥ　２３，１２：？”　　ии　зз　　” ＬＯＣＡＴＥ　２３，１３：？”　　　┿　┿　　　” ＬＯＣＡＴＥ　２３，１４：？”　　　╂　╂　　　” ＷＡＩＴ　ＷＴ ＣＯＬＯＲ　３：ＬＯＣＡＴＥ　２２，４：？”И” ＢＥＥＰ　７ ＷＡＩＴ　２ ＬＯＣＡＴＥ　２２，４：？”　” ＷＡＩＴ　２ ＣＯＬＯＲ　１２ ＦＯＲ　Ｘ＝１３　ＴＯ　０　ＳＴＥＰ　−１ ＬＯＣＡＴＥ　Ｘ，３：？”フ゜チコチャン　ト　” ＷＡＩＴ　２ ＮＥＸＴ　Ｘ ＷＡＩＴ　１０ ＣＯＬＯＲ　９ ＬＯＣＡＴＥ　０，６ ？”　　　　　　　┝┸” ？”　　　　　　┝┸　　　　　　　┝┿┿┿┸　┫” ？”　　　　　┝┸　　　　　　　┝┸　┝┸” ？”　　　　┝┸　　　┝┿┿┸　　┝┿┸┝┿┿┸” ？”　　　┝┸　┝┸　　　　　　　┝┸” ？”　　┝┿┿┿┸　　　　　　┝┿┸” ？ ？”　　　　　　　　　　　　　　　┝┸┝┸　┫　┝┸　　　┝┸┝┸” ？”　　　　　　　　　　　　　　┝┸┝┸　　　┝┸　　　┝┸┝┸” ？”　　　　　　　　　　　　　┝┸┝┸　　　┝┿┿┿┸┝┸┝┸┝┸” ？”　　　　　　　　　　　　┝┸　┿　　　┝┸　　　┝┸┝┸┝┸” ？”　　　　　　　　　　┝┿┸　　┿┿┸┝┸　　┝┿┸┝┿┿┸” ＷＡＩＴ　５ ＬＯＣＡＴＥ　０，５ ？”　　　　　　┝┸л　” ？”　　　　　┝┸　　　　　　　┝┿┿┿┸л┫л　” ？”　　　　┝┸　　　　　　　┝┸　┝┸　　　　　” ？”　　　┝┸　　　┝┿┿┸лл┝┿┸┝┿┿┸л　” ？”　　┝┸　┝┸лл　　　　　┝┸　л　　　　　” ？”　┝┿┿┿┸　　　　　　┝┿┸　　　　　　　　” ？”　л　　　　　　　　　　л　　　　　” ？”　　　　　　　　　　　　　　┝┸┝┸л┫　┝┸л　　┝┸┝┸л” ？”　　　　　　　　　　　　　┝┸┝┸　　　┝┸　　　┝┸┝┸　　” ？”　　　　　　　　　　　　┝┸┝┸　　　┝┿┿┿┸┝┸┝┸┝┸л” ？”　　　　　　　　　　　┝┸　┿　　　┝┸　　　┝┸┝┸┝┸　　” ？”　　　　　　　　　┝┿┸　　┿┿┸┝┸　　┝┿┸┝┿┿┸　　　” ？”　　　　　　　　　л　　　　　　　л　　　л　　　　　　　　　” ＷＡＩＴ　５ ＬＯＣＡＴＥ　０，４ ？”　　　　　┝┸л　” ？”　　　　┝┸　　л　　　　┝┿┿┿┸л┫л　” ？”　　　┝┸　　　　　　　┝┸　┝┸　　　　л” ？”　　┝┸　　　┝┿┿┸лл┝┿┸┝┿┿┸л　” ？”　┝┸　┝┸лл　　　　　┝┸　л　　　　л” ？”┝┿┿┿┸　　лл　　┝┿┸　　　л　　　　” ？”л　　　　　　　　　　л　　　　　　” ？”　л　　　　　　　　　　　┝┸┝┸л┫　┝┸л　　┝┸┝┸л　” ？”　　　　　　　　　　　　┝┸┝┸　　　┝┸　　　┝┸┝┸　　л” ？”　　　　　　　　　　　┝┸┝┸　　　┝┿┿┿┸┝┸┝┸┝┸л　” ？”　　　　　　　　　　┝┸　┿　　　┝┸　　　┝┸┝┸┝┸　　л” ？”　　　　　　　　┝┿┸　　┿┿┸┝┸　　┝┿┸┝┿┿┸　　　　” ？”　　　　　　　　л　　　　　　　л　　　л　　　　　　　　　　” ？”　　　　　　　　　л　　　　　　　л　　　л　　　　　　　　　” ＢＥＥＰ　５５ ＲＥＴＵＲＮ ＠ＧＩＶＥ ＣＯＬＯＲ　１２ ＬＯＣＡＴＥ　１２，５：？”エ〜−・・・” ＬＯＣＡＴＥ　１６，９：？”●” ＬＯＣＡＴＥ　１５，１０：？”□” ＲＥＴＵＲＮ ’┿┿┿┿┿　テ゛−タ　┿┿┿┿┿┿┿┿┿┿┿┿┿┿┿ ＠ＰＣＫ ＤＡＴＡ　”　　　　┝┿┿┿┰　　”，”　　　　┥┥┥┥┿　　”，”　　　　│　．　┥┰　” ＤＡＴＡ　”　　　　└−　─┘┥　”，”　╂╂╂ймк　л┛　”，”　╂╂╂　▲　○к┛　” ＤＡＴＡ　”┬───────┬─┬”，”│　│　┝┿┿┿│┛│”，”│　│иии┏╋│┛│” ＤＡＴＡ　”│　│　┿┿┛┻│┛│”，”│　│　╂╂┛┻│┛│”，”エ−ット・・・” ＤＡＴＡ　”　　　　┝┿┿┿┰　　”，”　　　　┥┥┥┥┿　　”，”　　　　│　．　┥┰　” ＤＡＴＡ　”　　　　└・　─┘┥　”，”　╂╂╂　мк　л┛　”，”　╂╂╂○▲　○к┛　” ＤＡＴＡ　”┬───────┬─┬”，”│　│　┝┿┿┿│┛│”，”│　│иии┏╋│┛│” ＤＡＴＡ　”│　│　┿┿┛┻│┛│”，”│　│　╂╂┛┻│┛│”，”・・・・・・” ＤＡＴＡ　”　　　　┝┿┿┿┰　　”，”　　　　○┥┥┥┿　　”，”　　　кк　・；┥┰　” ＤＡＴＡ　”　　　л└▽　─┘┥　”，”　╂╂╂　мк　з┛　”，”　╂╂╂（▲ккз┛　” ＤＡＴＡ　”┬───────┬─┬”，”│　│　┝○┿┿│┛│”，”│　│иии┏╋│┛│” ＤＡＴＡ　”│　│　┿┿┛┻│┛│”，”│　│　╂╂┛┻│┛│”，”フ−・・・” ＤＡＴＡ　”　　　　┝┿┿┿┰　　”，”　　　　┥┥┥┥┿　　”，”　　　　│　＿　┥┰　” ＤＡＴＡ　”　　　　└・　─┘┥　”，”　╂╂╂　мк　л┛　”，”　╂╂╂○▲　○к┛　” ＤＡＴＡ　”┬───────┬─┬”，”│　│　┝┿┿┿│┛│”，”│　│иии┏╋│┛│” ＤＡＴＡ　”│　│　┿┿┛┻│┛│”，”│　│　╂╂┛┻│┛│”，”・・・セ−フ” ＤＡＴＡ　”　　　　┝┿┿┿┰　　”，”　　　　┥┥┥┥┿　　”，”　　　　│　．；┥┰　” ＤＡＴＡ　”　　　　└−　─┘┥　”，”　╂╂╂　мк　л┛　”，”　╂╂╂○▲　○к┛　” ＤＡＴＡ　”┬───────┬─┬”，”│　│　┝┿┿┿│┛│”，”│　│иии┏╋│┛│” ＤＡＴＡ　”│　│　┿┿┛┻│┛│”，”│　│　╂╂┛┻│┛│”，”ア、ヤハ゛ ＤＡＴＡ　”　　　　┝┿┿┿┰　　”，”　　　　┥┥┥┥┿　　”，”　　　　│　＜；┿　　” ＤＡＴＡ　”　　　　└＾○┝┸　　”，”　╂╂╂　мллз┛　”，”　╂╂╂○▲　　з┛　” ＤＡＴＡ　”┬───────┬─┬”，”│　│　┝┿┿┿│┛│”，”│　│иии┏╋│┛│” ＤＡＴＡ　”│　│╂┸┥╂┻│┛│”，”│　│　　┛┛┻│┛│”，”アウ−ン！” ＤＡＴＡ　”　　　　　　　　　　　”，”　　　　┝┿┿┿┰　　”，”　　　　┿┿┿┿┿　　” ＤＡＴＡ　”　　　　┥┥┥┥┿┰　”，”　╂╂╂└───┸┥　”，”　╂╂╂＜○○йк┛　” ＤＡＴＡ　”┬───────┬─┬”，”│　│　┝┿┿┿│┛│”，”│　│иии┏╋│┛│” ＤＡＴＡ　”│　│　┿┿┛┻│┛│”，”│　│　╂╂┛┻│┛│”，”マケチャッタ・・・” ＤＡＴＡ　”　　　　┝┿┿┿┰　　”，”　　　　┥┥┥┥┿　　”，”　　　　│　＿　┥┰　” ＤＡＴＡ　”　　　　└・　─┘┥　”，”　╂╂╂　мк　л┛　”，”　╂╂╂○▲　○к┛　” ＤＡＴＡ　”┬───────┬─┬”，”│　│　┝┿┿┿│┛│”，”│　│иии┏╋│┛│” ＤＡＴＡ　”│　│　┿┿┛┻│┛│”，”│　│　╂╂┛┻│┛│”，”タ゛メカ−・・・” ＤＡＴＡ　”　　　　┝┿┿┿┰　　”，”　　　　┥┥┥┥┿　　”，”　　　　│　・　┥┰　” ＤＡＴＡ　”　　　　└▽　─┘┥　”，”　╂╂╂　мк　л┛　”，”　╂╂╂○▲　○к┛　” ＤＡＴＡ　”┬───────┬─┬”，”│　│　┝┿┿┿│┛│”，”│　│иии┏╋│┛│” ＤＡＴＡ　”│　│　┿┿┛┻│┛│”，”│　│　╂╂┛┻│┛│”，”ミッケ！” ＤＡＴＡ　”　　　　┝┿┿┿┰　　”，”　　　　┥┥┥┥┿┝　”，”　　　○│　＾　┥┸　” ＤＡＴＡ　”　　　л└▽　─┘　　”，”　╂╂╂　мк　л┛　”，”　╂╂╂（▲　○к┛　” ＤＡＴＡ　”┬───────┬─┬”，”│　│　┝┿┿┿│┛│”，”│　│иии┏╋│┛│” ＤＡＴＡ　”│　│　┿┥╂┻│┛│”，”│　│　╂┛┛┻│┛│”，”ヤッタ−♪” ＤＡＴＡ　”　　　　┝┿┿┿┰　　”，”　　　　┸┥┥┥┥　　”，”　　　┝│＾　＾│┰　” ＤＡＴＡ　”　　　┸└　▽й┘Ｖ　”，”　╂╂╂　мк　л○　”，”　╂╂╂（▲　илк　” ＤＡＴＡ　”┬───────┬─┬”，”│　│　┝┿┿┿│┛│”，”│　│иии┏╋│┛│” ＤＡＴＡ　”│　│╂┸┥╂┻│┛│”，”│　│　　┛┛┻│┛│”，”フ゛イッа”

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

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

• かつみ : 俺もやったことあります。俺も作ったけどかなり出来が悪い…あと、DSiウェアに「レーダーウォー」という名前で海戦ゲームが楽しめます。是非一度でもやってみては？(^^) (2014/08/10 (日) 22:33:04)
• 投稿者 : ＞かつみさん：レーダーウォー、HPを見てみました。まぁ…これが本当ですよね(^^;)。 (2014/08/10 (日) 23:48:18)

お名前: