このプログラムは下記のサイトの方が開発されたのですが、
優れている点は炎の長さが変えられるというところです。
参考プログラムサイト：http://mot3601.blog20.fc2.com/blog-entry-928.html
できあがりはこちらをクリック。（BGM、効果音にご注意）
実行結果
BGM,効果音をお借りしたサイトです。
http://www.skipmore.com/
http://koukaongen.com/cgi/se_search/herodb.cgi?table=sound&search=%94%9A%94%AD
このゲームに使用されている素材です。
画像を使用する場合はドット絵専門家のアルテミス職人の許可を取ってください。
アルテミス職人のサイト：
↓は爆弾の素材です。
http://ameblo.jp/yukineko-altemis/entry-11016380157.html
↓は壁と炎の素材です。
http://secret.ameba.jp/yukineko-altemis/amemberentry-11041239304.html