{---プログラム掲示板投稿フォーム--- 【ソフト名】RPGのマップ移動（マップに人がいて、きちんと会話ができます！！） 　　　　　　※マップ移動にキーボードを使いません※ 【作 成 者】田中　光(連絡先:メール持ってないです、ごめんなさい。) 【種　　別】フリーソフトウェア 【ひまわりのバージョン】ver.1.28 【転　　載】可(転載条件:自分のメールを持っていないので、この提示版に書き込んで下さい。) 【改変運用】可(全面的に歓迎します！　改変条件:上記通りです、どんどん改変してねっ！！） 【ひまわり本体への梱包】可 【実行時に利用作成するファイル】無し 【コメント】RPGのマップ移動、他の人に先をこされちゃったけれど 　　　　　私が作ったプログラムは　キーボードを使いません。 　　　　　見て欲しい所はずばり、マップに人がいて　会話ができる所です。 　　　　（上のソフト名と、ほとんど同じ事を書いてしまいました。すみません。） 　　　　　　けっこうがんばって作ったので、完成した後では　達成感があります。 　　　　　また、このプログラムを応用したら　けっこう本格的なRPGが作れるかも……と、 　　　　　いうわけで　参考にできる所はあると思います。 ---投稿フォームここまで---} {キーボードを使わないRPGのマップ移動} 母艦の、タイトルは、「キーボードを使わないRPGのマップ移動（タイトル長いです。）」 母艦の　幅を　500に　設定。 母艦の　高さを　300に　設定。 X=230 Y=95 (2,90)へ、移動。 ボタン37を、ボタンとして、作成。 その　テキストは　左 その　イベントは　左イベントに、飛ぶ (200,5)へ、移動。 ボタン38を、ボタンとして、作成。 その　テキストは　上 その　イベントは　上イベントに、飛ぶ (418,90)へ、移動。 ボタン39を、ボタンとして、作成。 その　テキストは　右 その　イベントは　右イベントに、飛ぶ (200,181)へ、移動。 ボタン40を、ボタンとして、作成。 その　テキストは　下 その　イベントは　下イベントに、飛ぶ (2,221)へ、移動。 ボタン1を、ボタンとして、作成。 その　テキストは　話す その　イベントは　会話に、飛ぶ。 ＊マップ 水色で　画面クリア 塗り色=灰色。 （80，35）から、（415，175）へ、四角形。 塗り色=白色。 （80，221）から、（410，279）へ、四角形。 塗り色=白色。 (8,8)から、(125,30)へ、四角形。 X=(X-65)/15 Y=(Y-20)/15} 「座標：({X},{Y})」と　表示。 X=X*15+65 Y=Y*15+20} (75,231)へ、移動。 「（人との会話）」と　表示。 文字サイズ=15' (X,Y)へ、移動。 「●」と　表示。 文字サイズ=13' (365,125)へ、移動。 「女」と　表示。 (80,35)へ、移動。 「男」と　表示。 文字サイズ=12' (10,10)へ、移動。 待機 ＊左イベント もし　X=380なら(もし　Y=125なら(マップに、飛ぶ ) ) もし　X=95なら(もし　Y=35なら(マップに、飛ぶ ) ) もし　X=80なら(マップに、飛ぶ ) X=X-15 マップに、飛ぶ ＊上イベント もし　X=365なら(もし　Y=140なら(マップに、飛ぶ ) ) もし　X=80なら(もし　Y=50なら(マップに、飛ぶ ) ) もし　Y=35なら(マップに、飛ぶ ) Y=Y-15 マップに、飛ぶ ＊右イベント もし　X=350なら(もし　Y=125なら(マップに、飛ぶ ) ) もし　X=395なら(マップに、飛ぶ ) X=X+15 マップに、飛ぶ ＊下イベント もし　X=365なら(もし　Y=110なら(マップに、飛ぶ ) ) もし　Y=155なら(マップに、飛ぶ ) Y=Y+15 マップに、飛ぶ ＊会話 もし　X=380なら(もし　Y=125なら(女との会話内容を、呼ぶ。 　　　　　　　　マップに、飛ぶ ) ) もし　X=365なら(もし　Y=140なら(女との会話内容を、呼ぶ。 　　　　　　　　マップに、飛ぶ ) ) もし　X=350なら(もし　Y=125なら(女との会話内容を、呼ぶ。 　　　　　　　　マップに、飛ぶ ) ) もし　X=365なら(もし　Y=110なら(女との会話内容を、呼ぶ。 　　　　　　　　マップに、飛ぶ ) ) もし　X= 95なら(もし　Y=35なら (男との会話内容を、呼ぶ。 　　　　　　　　マップに、飛ぶ ) ) もし　X= 80なら(もし　Y=50なら(男との会話内容を、呼ぶ。 　　　　　　　　マップに、飛ぶ ) ) (185,231)へ、移動。 「誰もいません。」と　表示。 0.8秒、待つ。 マップに、飛ぶ ＊女との会話内容 (185,231)へ、移動。 「私は、女よ。名もなき女よ。\n名前がないなんて悲しいわ。」と　表示。 1秒、待つ。 戻る。 ＊男との会話内容 (185,231)へ、移動。 「僕は、男だ。‘男‘はもちろん\n名前ではなく、性別の方だよ。」と　表示。 1秒、待つ。 戻る。