?platformer?

Instructions: °˖✧✧˖°°˖✧✧˖°°˖✧✧˖°°˖✧✧˖°°˖✧✧˖°°˖✧✧˖°✧✧˖°✧✧˖\nhello.\nWelcome to my platformer.\nhave fun!\n*Be sure to press the flag twice.\n\nIt's a platformer that's a little different than usual.\n\n▶Description\nOperate with the arrow keys.\nIt can also be operated by tapping.\n\nThere are stages with gimmicks, so please be careful and conquer.\n\n°˖✧✧˖°°˖✧✧˖°°˖✧✧˖°°˖✧✧˖°°˖✧✧˖°°˖✧✧˖°✧✧˖°✧✧˖\n\nこんにちは。\n僕のプラットフォーマーへようこそ。\n楽しんでください!\n\n※旗を二回必ず押してください。\nいつもとは少し違ったプラットフォーマーです。\n\n▶説明\n矢印キーで操作します。\nタップでも操作可能です。\n\n仕掛けがあるステージがあるので気を付けて攻略してください。

@Stage\n\nwhen I receive [スタート v]\nforever\n    play sound [Radiant v] until done\nend\n\n@プレイヤー\n\ndefine 初期設定プログラム\nshow\nset [x v] to [0]\nset [y v] to [0]\nset rotation style [left-right v]\ngo to x: (-210) y: (-30)\nset size to (90) %\nswitch costume to (コスチューム1 v)\n\nwhen flag clicked\nhide\n\nwhen I receive [スタート v]\nshow\n初期設定プログラム\nforever\n    if <<key (right arrow v) pressed?> or <<<mouse down?> and <(x position) < (mouse x)>> or <key (d v) pressed?>>> then\n        switch costume to (コスチューム1 v)\n        change [x v] by (1)\n    end\n    if <<key (left arrow v) pressed?> or <<<mouse down?> and <(mouse x) < (x position)>> or <key (a v) pressed?>>> then\n        switch costume to (コスチューム2 v)\n        change [x v] by (-1)\n    end\n    set [x v] to ((X) * (0.89))\n    change x by (X)\n    if <<touching (地面 v)?> or <<touching (地面2 v)?> and <<(ステージ) = [2]> or <<(ステージ) = [5]> or <(ステージ) = [10]>>>>> then\n        change y by (1)\n        if <<touching (地面 v)?> or <<touching (地面2 v)?> and <<(ステージ) = [2]> or <<(ステージ) = [5]> or <(ステージ) = [10]>>>>> then\n            change y by (1)\n            if <<touching (地面 v)?> or <<touching (地面2 v)?> and <<(ステージ) = [2]> or <<(ステージ) = [5]> or <(ステージ) = [10]>>>>> then\n                change y by (1)\n                if <<touching (地面 v)?> or <<touching (地面2 v)?> and <<(ステージ) = [2]> or <<(ステージ) = [5]> or <(ステージ) = [10]>>>>> then\n                    change y by (1)\n                    if <<touching (地面 v)?> or <<touching (地面2 v)?> and <<(ステージ) = [2]> or <<(ステージ) = [5]> or <(ステージ) = [10]>>>>> then\n                        change y by (1)\n                        if <(ステージ) = [5]> then\n                            if <touching (地面2 v)?> then\n                                change y by (-5)\n                                change x by ((X) * (-1))\n                            end\n                        end\n                        if <touching (地面 v)?> then\n                            change y by (-5)\n                            change x by ((X) * (-1))\n                        end\n                        if <(ステージ) = [2]> then\n                            if <touching (地面2 v)?> then\n                                change y by (-5)\n                                change x by ((X) * (-1))\n                                broadcast (q v)\n                            end\n                        end\n                        if <(ステージ) = [10]> then\n                            if <touching (地面2 v)?> then\n                                change y by (-5)\n                                change x by ((X) * (-1))\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\n    change [y v] by (-1)\n    change y by (Y)\n    if <<touching (地面 v)?> or <<touching (地面2 v)?> and <<(ステージ) = [2]> or >>> then\n        change y by ((Y) * (-1))\n        set [y v] to [0]\n    end\n    change y by (-1)\n    if <<key (up arrow v) pressed?> or <<<mouse down?> and <(y position) < (mouse y)>> or <key (w v) pressed?>>> then\n        if <<touching (地面 v)?> or <touching (地面2 v)?>> then\n            set [y v] to [15]\n        end\n    end\n    change y by (1)\n    if <[242] < (x position)> then\n        if <not <<[10] = (ステージ)> or <<[11] = (ステージ)> or <[12] = (ステージ)>>>> then\n            初期設定プログラム\n            broadcast (ネクスト v)\n            wait (2.8) seconds\n        end\n    end\n    if <<[10] = (ステージ)> or <<[11] = (ステージ)> or <[12] = (ステージ)>>> then\n        if <(x position) < [-242]> then\n            set [y v] to [0]\n            set [x v] to [0]\n            go to x: (200) y: (0)\n            broadcast (ネクスト v)\n            wait (2.8) seconds\n        end\n    end\n    if <<(y position) < [-180]> and <not <<(ステージ) = [9]> or <<(ステージ) = [11]> or <(ステージ) = [12]>>>>> then\n        初期設定プログラム\n        broadcast (おわた v)\n    end\n    if <touching (トゲ v)?> then\n        初期設定プログラム\n    end\n    if <<(y position) < [-180]> and <(ステージ) = [9]>> then\n        初期設定プログラム\n        broadcast (隠し発見!! v)\n        broadcast (ネクスト v)\n        wait (1) seconds\n    end\n    if <<(y position) < [-180]> and <<(ステージ) = [11]> or <(ステージ) = [12]>>> then\n        set [y v] to [0]\n        set [x v] to [0]\n        go to x: (200) y: (0)\n    end\nend\n\nwhen flag clicked\nhide\n\nwhen flag clicked\nset [ステージ v] to [1]\n\n@地面\n\nwhen flag clicked\nhide\n\nwhen I receive [スタート v]\nshow\nset [ステージ v] to [1]\ngo to x: (0) y: (0)\nforever\n    switch costume to (ステージ)\nend\n\nwhen I receive [ネクスト v]\nchange [ステージ v] by (1)\n\n@地面2\n\nwhen flag clicked\nhide\nrepeat (10)\n    go to x: (0) y: (0)\nend\n\nwhen I receive [q v]\nrepeat until <(y position) < [-160]>\n    change y by (-5)\nend\n\nwhen I receive [ネクスト v]\ngo to x: (0) y: (0)\n\nwhen I receive [スタート v]\nforever\n    if <(ステージ) = [5]> then\n        go to x: (0) y: (0)\n        switch costume to (コスチューム2 v)\n        show\n        if <([y position v] of [プレイヤー v]) < [-140]> then\n            repeat (60)\n                wait () seconds\n                change y by (4.5)\n            end\n            stop [this script v]\n        end\n    end\nend\n\nwhen I receive [スタート v]\nforever\n    if <(ステージ) = [6]> then\n        hide\n    end\nend\n\nwhen I receive [おわた v]\ngo to x: (0) y: (0)\n\nwhen I receive [おわた v]\nforever\n    if <(ステージ) = [5]> then\n        go to x: (0) y: (0)\n        switch costume to (コスチューム2 v)\n        show\n        if <([y position v] of [プレイヤー v]) < [-140]> then\n            repeat (60)\n                wait () seconds\n                change y by (4.5)\n            end\n            stop [this script v]\n        end\n    end\nend\n\nwhen I receive [スタート v]\nforever\n    if <(ステージ) = [6]> then\n        show\n        go to x: (0) y: (0)\n        switch costume to (コスチューム3 v)\n        if <touching (プレイヤー v)?> then\n            change [ghost v] effect by (10)\n        else\n            change [ghost v] effect by (-10)\n        end\n    end\nend\n\nwhen I receive [スタート v]\nforever\n    if <(ステージ) = [7]> then\n        show\n        go to x: (0) y: (0)\n        switch costume to (コスチューム3 v)\n        if <touching (プレイヤー v)?> then\n            change [ghost v] effect by (5)\n        else\n            change [ghost v] effect by (-5)\n        end\n    end\nend\n\nwhen I receive [スタート v]\nforever\n    if <(ステージ) = [7]> then\n        show\n        go to x: (0) y: (0)\n        switch costume to (コスチューム4 v)\n        if <touching (プレイヤー v)?> then\n            change [ghost v] effect by (10)\n        else\n            change [ghost v] effect by (-10)\n        end\n    end\nend\n\nwhen I receive [スタート v]\nforever\n    if <(ステージ) = [8]> then\n        hide\n    end\nend\n\nwhen I receive [スタート v]\nhide\ngo to x: (0) y: (0)\nforever\n    if <(ステージ) = [2]> then\n        switch costume to (コスチューム1 v)\n        show\n    end\n    if <(ステージ) = [3]> then\n        hide\n        go to x: (0) y: (0)\n    end\nend\n\nwhen I receive [スタート v]\nhide\ngo to x: (0) y: (0)\nforever\n    if <(ステージ) = [12]> then\n        go to x: (0) y: (0)\n        switch costume to (コスチューム6 v)\n        show\n        if <touching (プレイヤー v)?> then\n            change [ghost v] effect by (10)\n        else\n            change [ghost v] effect by (-10)\n        end\n    end\nend\n\nwhen I receive [スタート v]\nhide\ngo to x: (0) y: (0)\nforever\n    if <(ステージ) = [13]> then\n        hide\n    end\nend\n\n@トゲ\n\nwhen flag clicked\nhide\n\nwhen I receive [スタート v]\nshow\nforever\n    switch costume to (ステージ)\nend\n\nwhen I receive [スタート v]\ngo to x: (0) y: (0)\nshow\nforever\n    if <(ステージ) = [7]> then\n        show\n    end\nend\n\nwhen I receive [ネクスト v]\nif <(ステージ) = [7]> then\n    go to x: (0) y: (0)\nend\n\nwhen flag clicked\nforever\n    if <(ステージ) = [8]> then\n        show\n        switch costume to (8 v)\n        if <[-85] < ([x position v] of [プレイヤー v])> then\n            repeat (50)\n                change y by (-11)\n            end\n            hide\n            stop [this script v]\n        end\n    end\nend\n\nwhen I receive [ネクスト v]\nif <(ステージ) = [8]> then\n    go to x: (0) y: (0)\nend\n\n@???\n\nwhen flag clicked\nhide\ngo to x: (0) y: (0)\n\nwhen I receive [スタート v]\nhide\n\nwhen I receive [プレイ v]\nshow\nswitch costume to (コスチューム2 v)\nclear graphic effects\nset [pixelate v] effect to (100)\nrepeat (34)\n    change [pixelate v] effect by (-3)\nend\nrepeat (25)\n    change [ghost v] effect by (4)\nend\nhide\nbroadcast (スタート v)\n\nwhen I receive [隠し発見!! v]\nshow\nswitch costume to (コスチューム1 v)\nclear graphic effects\nset [pixelate v] effect to (100)\nrepeat (34)\n    change [pixelate v] effect by (-3)\nend\nrepeat (25)\n    change [ghost v] effect by (4)\nend\nhide\n\n@プレイ\n\nwhen flag clicked\npoint in direction (90)\ngo to x: (0) y: (-80)\nset [角 v] to [0]\nforever\n    turn right ([cos v] of (角) ) degrees\n    change [角 v] by (5)\nend\n\nwhen flag clicked\nshow\nforever\n    if <<touching (mouse-pointer v)?> and <mouse down?>> then\n        start sound [決定ボタンを押す23 v]\n        broadcast (プレイ v)\n        hide\n        stop [this script v]\n    end\nend\n\nwhen flag clicked\nset volume to (100) %\nforever\n    play sound [neonpurple v] until done\nend\n\nwhen I receive [プレイ v]\nwait (0.3) seconds\nset volume to (0) %\n\n@タイトル\n\nwhen flag clicked\nshow\ngo to x: (0) y: (90)\nset [⇧ v] to [0]\nforever\n    change y by ([cos v] of (⇧) )\n    change [⇧ v] by (5)\nend\n\nwhen I receive [プレイ v]\nhide\n\n@サムネイル\n\nwhen flag clicked\nforever\n    go to [front v] layer\n    set [ghost v] effect to (100)\nend\n\n@ターボストップ\n\nwhen flag clicked\nforever\n    point in direction (0)\n    wait (1) seconds\nend\n\nwhen flag clicked\nforever\n    turn right (1) degrees\n    wait () seconds\n    if <(direction) > [39]> then\n        stop [all v]\n    end\nend\n\n@スプライト1\n\nwhen flag clicked\nshow\nswitch costume to (pick random (1) to (4))\ngo to x: (0) y: (0)\ngo to [back v] layer\n\nwhen I receive [プレイ v]\nhide\n\n@Next!\n\nwhen I receive [ネクスト v]\nif <(ステージ) = [9]> then\nelse\n    hide\n    go to [front v] layer\n    start sound [High Whoosh v]\n    clone [1]\n    wait (0.05) seconds\n    clone [2]\n    wait (0.05) seconds\n    clone [3]\n    wait (0.05) seconds\n    clone [4]\n    wait (0.05) seconds\n    clone [5]\nend\n\ndefine clone (cloneid)\nswitch costume to (cloneid)\ncreate clone of (_myself_ v)\n\nwhen I start as a clone\nshow\nif <<(costume [number v]) = [1]> or <<(costume [number v]) = [2]> or <<(costume [number v]) = [3]> or <<(costume [number v]) = [4]> or <(costume [number v]) = [5]>>>>> then\n    go to x: (468) y: (0)\n    repeat until <(round (x position)) = [0]>\n        change x by (((0) - (x position)) / (7))\n    end\nend\n\nwhen I start as a clone\nif <(costume [number v]) = [1]> then\n    wait (2.2) seconds\n    repeat until <[465] < (x position)>\n        change x by ((1) + ((x position) / (4)))\n    end\n    delete this clone\nend\nif <(costume [number v]) = [2]> then\n    wait (2.1) seconds\n    repeat until <[465] < (x position)>\n        change x by ((1) + ((x position) / (4)))\n    end\n    delete this clone\nend\nif <(costume [number v]) = [3]> then\n    wait (2) seconds\n    repeat until <[465] < (x position)>\n        change x by ((1) + ((x position) / (4)))\n    end\n    delete this clone\nend\nif <(costume [number v]) = [4]> then\n    wait (1.9) seconds\n    repeat until <[465] < (x position)>\n        change x by ((1) + ((x position) / (4)))\n    end\n    delete this clone\nend\nif <(costume [number v]) = [5]> then\n    wait (1.8) seconds\n    repeat until <[330] < (x position)>\n        change x by ((1) + ((x position) / (4)))\n    end\n    delete this clone\nend\n\n@スプライト2\n\nwhen flag clicked\nhide\nforever\n    if <(ステージ) = [10]> then\n        if <[175] < ([x position v] of [プレイヤー v])> then\n            show\n        else\n            hide\n        end\n    end\n    if <(ステージ) = [11]> then\n        hide\n    end\nend\n\n