| Excelでぷよぷよ |
| エクセルVBAを使ってぷよぷよをつくってみました。 | |||
| まだバグがありますが、とりあえずUPします。 | |||
| windowsVistaヘルプサイト | ↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓ | ||
| download | |||
| ↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑ | |||
| ロジックの説明 | |||
| 1.ぷよぷよを落とす処理 |
![]() |
||
| ぷよぷよを一段ずつ下まで落ちるプログラムを作成します。 | |||
| タイマーはWin32APIを使っています。 | |||
| この処理はぷよぷよが色のついたセル | |||
| (床かほかのぷよぷよ)につくまで続きます。 | |||
| やさしくわかるExcel関数・マクロ (Excel徹底活用シリーズ) |
|||
| 2.浮いているぷよぷよを下に落とす処理をします。 | |||
![]() |
|||
| 下のセルが白色の場合、一段落とす処理をくりかえします。 | |||
| すべてのセルが下についたら次の処理を行います。 | |||
| 3.ぷよぷよを消す処理 | |||
| 対象のセルの上下左右に同じ色のセルがあった場合 | |||
| フラグを立てていきます、フラグが4つ以上たった場合 | |||
| そのセルを白色に塗っていきます。 | |||
| すべてのセルにその処理をし「2.浮いているセルを下に落す」 | |||
| 処理に戻ります。 | |||
| 「3.」「2.」の処理を繰り返し、もう消えるぷよぷよが | |||
| なくなったら、「1.」の処理に戻ります。 | |||
| 作者のメールアドレス:excelpuyo(アット)yahoo.co.jp | |||
| ダウンロード | |||