Excel でパックマン
というわけで何もなかったように再開するわけですが、
Excel で作ったインベーダーがあったよなぁと思って
探してみたら同じ作者さんのでパックマンもあって、そっちのが楽しそうだったんで両方ダウンロードして遊びました。
確か以前にインベーダーやらせてもらった時は、パックマン作成中とかって書いてあったのを思い出しました。完成したんですね。
そして、途中でカーソルキーがぶっ壊れるんじゃないかと思いました。

しかしまぁ、凄いです。素晴らしすぎます。
表示倍率を100%にしたのが下の画像です(クリックで拡大)。
これだけ見てもクラクラしてきます。

オートシェイプとか使わずに、セルの背景色で全部やってるんですね。
そしてこの人、パックマンもインベーダーもVBAのコードをロックしてません。
偉いです。
座標の設定とか、ヤラレる時の判定とか、なんつーかもう、
「わかった。まかせる。」くらいしか言葉が出てきませんw
あ、ReadMe にコードの改変は自由って書いてあったんで、
Sub Auto_Close()
If Application.ReferenceStyle = xlR1C1 Then _
Application.ReferenceStyle = xlA1
End Sub
とか勝手に書き加えちゃいました。
Excelゲーセン クラシックアーケードゲーム館
懐かしいゲームがいっぱいいっぱいあります。
今度はラリーX やりたいなぁ。
Excel で作ったインベーダーがあったよなぁと思って
探してみたら同じ作者さんのでパックマンもあって、そっちのが楽しそうだったんで両方ダウンロードして遊びました。
確か以前にインベーダーやらせてもらった時は、パックマン作成中とかって書いてあったのを思い出しました。完成したんですね。
そして、途中でカーソルキーがぶっ壊れるんじゃないかと思いました。
しかしまぁ、凄いです。素晴らしすぎます。
表示倍率を100%にしたのが下の画像です(クリックで拡大)。
これだけ見てもクラクラしてきます。
オートシェイプとか使わずに、セルの背景色で全部やってるんですね。
そしてこの人、パックマンもインベーダーもVBAのコードをロックしてません。
偉いです。
座標の設定とか、ヤラレる時の判定とか、なんつーかもう、
「わかった。まかせる。」くらいしか言葉が出てきませんw
あ、ReadMe にコードの改変は自由って書いてあったんで、
Sub Auto_Close()
If Application.ReferenceStyle = xlR1C1 Then _
Application.ReferenceStyle = xlA1
End Sub
とか勝手に書き加えちゃいました。
Excelゲーセン クラシックアーケードゲーム館
懐かしいゲームがいっぱいいっぱいあります。
今度はラリーX やりたいなぁ。
