氷と炎のプラットフォーマー[platformer] [fire][ice]

Instructions: ※世界記録がちゃんと作動していなかったので、それを治すために一旦非共有にしました。（直すことができました)\n矢印キーで操作する\n炎と氷の壁ととげに当たったら駄目\nzキーで火の玉を出す。xキーで氷の玉を出す。\nモバイル対応です。モバイルの人火の玉をタップしてください。氷の玉をタップしてください。\n大画面でお願いします。リミックスおkです。無変更はやめてください。コメント入りません。

@Stage\n\n@player\n\nwhen I receive [suta-to  v]\nset volume to (100) %\n\nwhen flag clicked\nhide\nset size to (60) %\ngo to x: (-220) y: (50)\nforever\n    change [color v] effect by (25)\nend\n\nwhen I start as a clone\nrepeat (9)\n    change [ghost v] effect by (7)\n    change size by (-5.2)\nend\ndelete this clone\n\nwhen [z v] key pressed\n\nwait (1) seconds\nrepeat (20)\n    change [ghost v] effect by (-5)\nend\n\nstart sound [Anna Yvette - Waves \[Xaf Remix\] v]\n\nwhen I receive [ge-musota-to v]\ngo to [front v] layer\nshow\nset rotation style [left-right v]\npoint in direction (90)\nset [x v] to [0]\nset [y v] to [0]\nforever\n    if <<<touching (素材 v)?> or <touching (アイスブロック v)?>> or <touching (spike v)?>> then\n        start sound [crashed oof v]\n        repeat (10)\n            change [ghost v] effect by (7)\n        end\n        clear graphic effects\n        go to x: (-210) y: (40)\n    end\n    if <<<(x position) > (mouse x)> and <mouse down?>> or <key (left arrow v) pressed?>> then\n        create clone of (_myself_ v)\n        change [xのやつ v] by (-1)\n        point in direction (-90)\n    end\n    if <<<(mouse x) > (x position)> and <mouse down?>> or <key (right arrow v) pressed?>> then\n        create clone of (_myself_ v)\n        change [xのやつ v] by (1)\n        point in direction (90)\n    end\n    set [xのやつ v] to ((xのやつ) * (0.9))\n    change x by (xのやつ)\n    if <touching (road- v)?> then\n        change y by (1)\n        if <touching (road- v)?> then\n            change y by (1)\n            if <touching (road- v)?> then\n                change y by (1)\n                if <touching (road- v)?> then\n                    change y by (1)\n                    if <touching (road- v)?> then\n                        change y by (1)\n                        if <touching (road- v)?> then\n                            change x by ((xのやつ) * (-1))\n                            change y by (-5)\n                            if <<key (up arrow v) pressed?> or <<(mouse y) > (y position)> and <mouse down?>>> then\n                                start sound [ニュッ v]\n                                if <(xのやつ) > [0]> then\n                                    set [xのやつ v] to [-7]\n                                else\n                                    set [xのやつ v] to [7]\n                                end\n                                set [ｙだー v] to [15]\n                            else\n                                set [xのやつ v] to [0]\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\n    change y by (-1)\n    if <touching (road- v)?> then\n        if <<key (up arrow v) pressed?> or <<(mouse y) > (y position)> and <mouse down?>>> then\n            set [ｙだー v] to [16.3]\n            start sound [ニュッ v]\n        end\n    end\n    change y by (1)\n    change [ｙだー v] by (-1)\n    change y by (ｙだー)\n    if <touching (road- v)?> then\n        change y by ((ｙだー) * (-1))\n        set [ｙだー v] to [0]\n    end\n    if <touching (ドア v)?> then\n        if <(x position) > [200]> then\n            broadcast (えー v)\n            start sound [Rip v]\n            wait (0.5) seconds\n            go to x: (-216) y: (50)\n        end\n    end\n    if <<key (down arrow v) pressed?> or <<mouse down?> and <(mouse y) < [0]>>> then\n        switch costume to (player2 v)\n    else\n        switch costume to (player v)\n    end\n    if <touching (ばね v)?> then\n        set [ｙだー v] to [22]\n    end\nend\n\nwhen I receive [ge-musota-to v]\nforever\n    play sound [Anna Yvette - Waves \[Xaf Remix\] v] until done\nend\n\nwhen I receive [ge-musota-to v]\nset [タイム v] to [0]\nforever\n    if <(ステージ) < [11]> then\n        wait (1) seconds\n        change [タイム v] by (1)\n        wait (1) seconds\n        change [タイム v] by (1)\n    end\n    if <(ステージ) > [10]> then\n        stop [this script v]\n    end\nend\n\nwhen I receive [ge-musota-to v]\nshow variable [☁ 世界記録 v]\nforever\n    if <[10] < (ステージ)> then\n        if <(タイム) < (☁ 世界記録)> then\n            set [☁ 世界記録 v] to (タイム)\n        end\n    end\nend\n\nset [☁ 世界記録 v] to [100]\n\n@スプライト1\n\nwhen flag clicked\nhide\ngo to [front v] layer\nchange [ghost v] effect by (50)\nforever\n    go to x: (114) y: (27)\nend\n\nwhen I receive [ge-musota-to v]\nshow\n\n@スプライト2\n\nwhen flag clicked\nhide\nforever\n    go to x: (-122) y: (-148)\n    go to [front v] layer\nend\n\nwhen this sprite clicked\nbroadcast (pwpspspspsps v)\n\nwhen I receive [えー v]\nhide\nwait (0.8) seconds\nshow\n\nwhen I receive [ge-musota-to v]\nshow\n\n@スプライト4\n\nwhen I receive [pwpspspspsps v]\nhide\nstart sound [Suction Cup v]\nset size to (25) %\ngo to (player v)\npoint in direction (90)\nshow\nrepeat until <[239] < (x position)>\n    move (10) steps\n    create clone of (_myself_ v)\nend\nhide\n\nwhen I start as a clone\n\nwhen I start as a clone\nrepeat (9)\n    change [ghost v] effect by (7)\n    change size by (-2)\nend\ndelete this clone\n\nwhen flag clicked\nhide\n\nwhen I receive [ge-musota-to v]\nshow\n\nwhen I receive [ge-musota-to v]\nforever\n    if <key (z v) pressed?> then\n        play sound [Suction Cup v] until done\n        set size to (25) %\n        go to (player v)\n        point in direction (90)\n        show\n        repeat until <[239] < (x position)>\n            move (10) steps\n            create clone of (_myself_ v)\n        end\n        hide\n    end\n    if <touching (幽霊2 v)?> then\n        broadcast (2 v)\n    end\nend\n\n@スプライト6\n\nwhen flag clicked\nhide\n\nwhen I receive [k v]\nhide\nstart sound [Water Drop v]\nset size to (25) %\ngo to (player v)\npoint in direction (90)\nshow\nrepeat until <[239] < (x position)>\n    move (10) steps\n    create clone of (_myself_ v)\nend\nhide\n\nwhen I start as a clone\nrepeat (9)\n    change [ghost v] effect by (7)\n    change size by (-2)\nend\ndelete this clone\n\nwhen I receive [ge-musota-to v]\nshow\n\nwhen I receive [ge-musota-to v]\nforever\n    if <key (x v) pressed?> then\n        hide\n        start sound [Water Drop v]\n        set size to (25) %\n        go to (player v)\n        point in direction (90)\n        show\n        repeat until <[239] < (x position)>\n            move (10) steps\n            create clone of (_myself_ v)\n        end\n        hide\n    end\n    if <touching (幽霊2 v)?> then\n        broadcast (3 v)\n    end\nend\n\n@road-\n\nwhen flag clicked\nhide\ngo to x: (36) y: (28)\nset [ステージ v] to [1]\nforever\n    switch costume to (ステージ)\nend\n\nwhen I receive [えー v]\nchange [ステージ v] by (1)\n\nwhen I receive [ge-musota-to v]\nshow\n\nwhen flag clicked\nhide variable [タイム v]\n\n@素材\n\nwhen flag clicked\nshow\n\nwhen flag clicked\nforever\n    if <(ステージ) = [1]> then\n        hide\n    end\n    if <(ステージ) = [8]> then\n        go to x: (-12) y: (29)\n        show\n        if <touching (スプライト6 v)?> then\n            repeat (30)\n                hide\n            end\n        end\n    end\n    if <(ステージ) = [9]> then\n        hide\n    end\n    if <(ステージ) = [10]> then\n        go to x: (121) y: (30)\n        show\n        if <touching (スプライト6 v)?> then\n            repeat (30)\n                hide\n            end\n        end\n    end\n    if <(ステージ) = [11]> then\n        hide\n    end\nend\n\n@スプライト3\n\nwhen flag clicked\nhide\nforever\n    set size to (105) %\n    go to [front v] layer\n    go to x: (220) y: (-172)\nend\n\nwhen this sprite clicked\nbroadcast (k v)\n\nwhen I receive [えー v]\nhide\nwait (0.8) seconds\nshow\n\nwhen I receive [ge-musota-to v]\nshow\n\n@アイスブロック\n\nwhen flag clicked\nforever\n    if <(ステージ) = [1]> then\n        hide\n    end\n    if <(ステージ) = [7]> then\n        go to x: (-17) y: (-48)\n        show\n        if <touching (スプライト4 v)?> then\n            repeat (30)\n                hide\n            end\n        end\n    end\n    if <(ステージ) = [8]> then\n        hide\n    end\n    if <(ステージ) = [9]> then\n        go to x: (-17) y: (-48)\n        show\n        if <touching (スプライト4 v)?> then\n            repeat (40)\n                hide\n            end\n        end\n    end\n    if <(ステージ) = [10]> then\n        go to x: (-123) y: (-49)\n        show\n        if <touching (スプライト4 v)?> then\n            repeat (40)\n                hide\n            end\n        end\n    end\n    if <(ステージ) = [11]> then\n        hide\n    end\nend\n\nwhen I receive [ge-musota-to v]\nshow\n\n@spike\n\nwhen flag clicked\nhide\ngo to [back v] layer\ngo to x: (8) y: (98)\nforever\n    if <(ステージ) = [1]> then\n        hide\n    end\n    if <(ステージ) = [2]> then\n        switch costume to (spike^-^ v)\n        show\n    end\n    if <(ステージ) = [3]> then\n        show\n        switch costume to (spike^-^9 v)\n    end\n    if <(ステージ) = [4]> then\n        switch costume to (spike^-^2 v)\n    end\n    if <(ステージ) = [5]> then\n        switch costume to (spike^-^10 v)\n    end\n    if <(ステージ) = [6]> then\n        switch costume to (spike^-^11 v)\n    end\n    if <(ステージ) = [7]> then\n        hide\n    end\n    if <(ステージ) = [9]> then\n        switch costume to (spike^-^12 v)\n        show\n    end\n    if <(ステージ) = [10]> then\n        switch costume to (spike^-^13 v)\n        show\n    end\n    if <(ステージ) = [11]> then\n        hide\n    end\nend\n\nwhen I receive [4 v]\n\nwhen I receive [10 v]\nhide\n\nwhen I receive [ge-musota-to v]\nshow\n\n@ドア\n\nwhen flag clicked\nhide\ngo to x: (219) y: (-43)\nswitch costume to (ドア v)\nforever\n    if <touching (player v)?> then\n        switch costume to (ドア\(開\) v)\n    else\n        switch costume to (ドア v)\n    end\nend\n\nwhen I receive [えー v]\nswitch costume to (ドア\(開\) v)\n\nwhen flag clicked\nforever\n    if <(ステージ) = [11]> then\n        hide\n    end\nend\n\nwhen I receive [ge-musota-to v]\nshow\n\n@スプライト5\n\nwhen flag clicked\nhide\n\nwhen I receive [えー v]\ngo to [front v] layer\nshow\nwait (0.8) seconds\nhide\n\n@ハート\n\nwhen flag clicked\nreset timer\ngo to x: (166) y: (160)\nforever\n    if <(timer) < [20]> then\n        show\n    end\nend\n\nwhen I receive [ge-musota-to v]\nshow\n\n@星\n\nwhen flag clicked\ngo to x: (211) y: (160)\nhide\nforever\n    if <(timer) < [20]> then\n        show\n    end\nend\n\nwhen I receive [ge-musota-to v]\nshow\n\n@ばね\n\nwhen flag clicked\nhide\nforever\n    if <touching (player v)?> then\n        switch costume to (コスチューム2 v)\n    else\n        switch costume to (コスチューム1 v)\n    end\nend\n\nwhen flag clicked\nforever\n    if <(ステージ) = [9]> then\n        go to x: (-89) y: (-64)\n        show\n    end\n    if <(ステージ) = [10]> then\n        hide\n    end\nend\n\n@スプライト7\n\nwhen flag clicked\nhide\nforever\n    if <(ステージ) = [1]> then\n        switch costume to (コスチューム2 v)\n    end\n    if <(ステージ) = [2]> then\n        switch costume to (コスチューム3 v)\n    end\n    if <(ステージ) = [3]> then\n        switch costume to (コスチューム4 v)\n    end\n    if <(ステージ) = [4]> then\n        switch costume to (コスチューム5 v)\n    end\n    if <(ステージ) = [5]> then\n        switch costume to (コスチューム6 v)\n    end\n    if <(ステージ) = [6]> then\n        switch costume to (コスチューム7 v)\n    end\n    if <(ステージ) = [7]> then\n        switch costume to (コスチューム8 v)\n    end\n    if <(ステージ) = [8]> then\n        switch costume to (コスチューム9 v)\n    end\n    if <(ステージ) = [9]> then\n        switch costume to (コスチューム10 v)\n    end\n    if <(ステージ) = [10]> then\n        switch costume to (コスチューム11 v)\n    end\n    if <(ステージ) = [11]> then\n        hide\n    end\nend\n\nwhen I receive [ge-musota-to v]\nshow\n\n@road-2\n\nwhen flag clicked\nhide\ngo to x: (36) y: (28)\nset [ステージ v] to [1]\nforever\n    switch costume to (ステージ)\nend\n\nwhen flag clicked\nhide variable [タイム v]\n\nwhen I receive [ge-musota-to v]\nshow variable [タイム v]\n\nwhen flag clicked\nbroadcast (Ge-Musota-to v)\n\n@player2\n\nwhen I receive [suta-to  v]\nset volume to (100) %\n\nwhen flag clicked\nhide\nset size to (60) %\n\nwhen I start as a clone\nrepeat (9)\n    change [ghost v] effect by (7)\n    change size by (-5.2)\nend\ndelete this clone\n\nwhen flag clicked\nhide variable [☁ 世界記録 v]\n\nwhen flag clicked\nhide\n\nwhen flag clicked\nhide\n\n@スプライト8\n\nwhen flag clicked\nhide\n\n@スプライト9\n\nwhen flag clicked\nhide\n\nwhen flag clicked\nhide\n\n@アイスブロック2\n\nwhen flag clicked\nhide\n\n@素材2\n\nwhen flag clicked\nhide\n\n@スプライト10\n\nwhen flag clicked\nhide\n\n@スプライト11\n\nwhen flag clicked\nhide\n\n@スプライト12\n\nwhen flag clicked\nhide\n\n