Rainbow // Platformer

Instructions: Move:Arrow key or tap\nReset:R key\n\n最後のステージはモバイルだとクリアが厳しいらしいです

@Stage\n\nwhen flag clicked\nforever\n    play sound [Water blue v] until done\nend\n\n@:D\n\nwhen I start as a clone\nrepeat (10)\n    change size by (-5)\n    change [ghost v] effect by (7)\nend\ndelete this clone\n\nwhen flag clicked\nforever\n    create clone of (_myself_ v)\nend\n\nwhen flag clicked\nset [move v] to [y]\ngo to [front v] layer\ngo [backward v] (1) layers\nshow\nset size to (100) %\ngo to x: (-201) y: (-50)\npoint in direction (90)\nset [xvel v] to [0]\nset [yvel v] to [0]\nforever\n    if <(move) = [y]> then\n        set rotation style [left-right v]\n        if <<<mouse down?> and <(x position) > (mouse x)>> or <key (left arrow v) pressed?>> then\n            change [xv v] by (-1)\n            point in direction (-90)\n        end\n        if <<<mouse down?> and <(x position) < (mouse x)>> or <key (right arrow v) pressed?>> then\n            change [xv v] by (1)\n            point in direction (90)\n        end\n        set [xv v] to ((Xv) * (0.9))\n        change x by (Xv)\n        if <touching (stage v)?> then\n            change y by (1)\n            if <touching (stage v)?> then\n                change y by (1)\n                if <touching (stage v)?> then\n                    change y by (1)\n                    if <touching (stage v)?> then\n                        change y by (1)\n                        if <touching (stage v)?> then\n                            change y by (1)\n                            if <touching (stage v)?> then\n                                change x by ((Xv) * (-1))\n                                change y by (-5)\n                                if <<<mouse down?> and <(y position) < (mouse y)>> or <key (up arrow v) pressed?>> then\n                                    start sound [ジャンプ v]\n                                    if <(Xv) > [0]> then\n                                        set [xv v] to [-7]\n                                    else\n                                        set [xv v] to [7]\n                                    end\n                                    set [yv v] to [10]\n                                else\n                                    set [xv 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 (stage v)?> then\n            if <<<mouse down?> and <(y position) < (mouse y)>> or <key (up arrow v) pressed?>> then\n                set [yv v] to [12]\n                start sound [ジャンプ v]\n            end\n        end\n        change y by (1)\n        change [yv v] by (-1)\n        change y by (Yv)\n        if <touching (stage v)?> then\n            change y by ((Yv) * (-1))\n            set [yv v] to [0]\n        end\n        if <(x position) > [230]> then\n            broadcast (next level v)\n            start sound [次のステージ v]\n        end\n        if <(y position) < [-170]> then\n            go to x: (-201) y: (-50)\n        end\n        if <touching (ばね v)?> then\n            set [yv v] to [20]\n        end\n    end\nend\n\nwhen I receive [v\(￣д￣\)v ｲｴｲ v]\ngo to x: (-201) y: (-50)\n\nwhen flag clicked\nset [stage v] to [1]\nset [初期 v] to [1]\nforever\n    if <<key (down arrow v) pressed?> or <<mouse down?> and <(mouse y) < [-50]>>> then\n        switch costume to (join (初期) [2])\n    else\n        switch costume to (初期)\n    end\nend\n\nwhen flag clicked\nforever\n    if <touching (障害物 v)?> then\n        start sound [障害物に触れた v]\n        go to x: (-201) y: (-50)\n        set [yv v] to [0]\n        set [xv v] to [0]\n    end\nend\n\nwhen [r v] key pressed\ngo to x: (-201) y: (-50)\n\nwhen flag clicked\nforever\n    if <(stage) = [1]> then\n        clear graphic effects\n    end\n    if <(stage) = [2]> then\n        wait (0.5) seconds\n        set [color v] effect to (30)\n    end\n    if <(stage) = [3]> then\n        wait (0.5) seconds\n        set [color v] effect to (50)\n    end\n    if <(stage) = [4]> then\n        wait (0.5) seconds\n        set [color v] effect to (100)\n    end\n    if <(stage) = [5]> then\n        wait (0.5) seconds\n        set [color v] effect to (120)\n    end\n    if <(stage) = [6]> then\n        wait (0.5) seconds\n        set [color v] effect to (150)\n    end\n    if <(stage) = [7]> then\n        wait (0.5) seconds\n        set [初期 v] to [2]\n        set [color v] effect to (0)\n    end\n    if <(stage) = [8]> then\n        wait (0.5) seconds\n        set [初期 v] to [3]\n        set [color v] effect to (0)\n    end\n    if <(stage) = [9]> then\n        wait (0.5) seconds\n        set [初期 v] to [4]\n        set [color v] effect to (0)\n    end\n    if <(stage) = [10]> then\n        wait (0.5) seconds\n        set [初期 v] to [5]\n        set [color v] effect to (0)\n    end\n    if <(stage) = [11]> then\n        wait (0.5) seconds\n        set [初期 v] to [6]\n        set [color v] effect to (0)\n    end\n    if <(stage) = [12]> then\n        wait (0.5) seconds\n        set [初期 v] to [7]\n        set [color v] effect to (0)\n    end\n    if <(stage) = [13]> then\n        wait (0.5) seconds\n        set [初期 v] to [1]\n        set [color v] effect to (180)\n    end\n    if <(stage) = [14]> then\n        wait (0.5) seconds\n        set [初期 v] to [8]\n        set [color v] effect to (0)\n    end\n    if <(stage) = [15]> then\n        set [初期 v] to [1]\n        change [color v] effect by (1)\n    end\n    if <(stage) = [16]> then\n        change [color v] effect by (1)\n        set [初期 v] to [1]\n    end\nend\n\n@stage\n\nwhen flag clicked\nset [stage v] to [1]\nswitch costume to (コスチューム1 v)\nswitch backdrop to (背景1 v)\n\nwhen I receive [next level v]\nchange [stage v] by (1)\n\nwhen I receive [v\(￣д￣\)v ｲｴｲ v]\nnext costume\n\n@ばね\n\nwhen flag clicked\nforever\n    if <(stage) = [6]> then\n        wait (1.1) seconds\n        switch costume to (コスチューム1 v)\n        show\n    else\n        if <(stage) = [7]> then\n            wait (1.1) seconds\n            switch costume to (コスチューム2 v)\n            show\n        else\n            hide\n        end\n    end\nend\n\n@next\n\nwhen I receive [next level v]\nset [move v] to [n]\nwait (0) seconds\ngo to [front v] layer\ngo to x: (800) y: (0)\nshow\nswitch costume to (join [コスチューム] (stage))\nglide (0.3) secs to x: (500) y: (0)\nwait (0.01) seconds\nglide (0.3) secs to x: (0) y: (0)\nbroadcast (v\(￣Д￣\)v ｲｴｲ v)\nnext backdrop\nwait (0.3) seconds\nglide (0.3) secs to x: (-16) y: (0)\nwait (0.01) seconds\nglide (0.5) secs to x: (-800) y: (0)\nhide\nset [move v] to [y]\ngo to x: (800) y: (0)\n\nwhen flag clicked\nhide\n\nwhen flag clicked\nhide\n\n@障害物\n\nwhen flag clicked\nforever\n    if <(stage) = [5]> then\n        wait (1.1) seconds\n        switch costume to (コスチューム1 v)\n        show\n    else\n        if <(stage) = [6]> then\n            wait (1.1) seconds\n            switch costume to (コスチューム2 v)\n            show\n        else\n            if <(stage) = [7]> then\n                wait (1.1) seconds\n                switch costume to (コスチューム3 v)\n                show\n            else\n                if <(stage) = [12]> then\n                    wait (1.1) seconds\n                    switch costume to (コスチューム4 v)\n                    show\n                else\n                    hide\n                end\n            end\n        end\n    end\nend\n\n@親指の爪\n\nwhen flag clicked\nhide\nforever\n    reset timer\nend\n\nwhen [timer v] > (0)\ngo to [front v] layer\nset [ghost v] effect to (100)\nshow\nrepeat (10)\n    change [ghost v] effect by (-10)\nend\n\n