[Platformer]Vertical!/縦！

Instructions: 日本語の説明は下へ\n\nI've never seen such a platformer!\nNormally, it goes horizontally, but it goes vertically…\n\nUp / down / left / right keys, tap operation\nDon't hit thorns and magma\nA big jump when it hits the spring!\nThe last one's first look\n\nこんなプラットフォーマー、見たことない！\nふつうは横に進むのに、縦に進むなんて…\n\n上下左右キー、タップ操作\nトゲとマグマには当たってはいけない\nばねに当たると大ジャンプ！\n最後の方初見殺し\n朝、昼、夜　時間帯によって背景が変わる？

@Stage\n\nwhen flag clicked\nforever\n    play sound [firefly - jim yosef v] until done\nend\n\nwhen flag clicked\nforever\n    if <[12] > (current [hour v])> then\n        switch backdrop to (背景1 v)\n    else\n        if <[16] > (current [hour v])> then\n            switch backdrop to (背景2 v)\n        else\n            switch backdrop to (背景3 v)\n        end\n    end\nend\n\n@ばね\n\nwhen I receive [次へ v]\nhide\nwait (2) seconds\nif <(ステージ) = [4]> then\n    go to x: (-77) y: (-119)\n    show\nend\nif <(ステージ) = [8]> then\n    go to x: (-77) y: (-146)\n    show\nend\nif <(ステージ) = [9]> then\n    go to x: (71) y: (-64)\n    show\nend\n\nwhen flag clicked\nhide\n\n@とげ\n\nwhen flag clicked\nshow\nforever\n    set size to (60) %\n    go to x: (0) y: (-10)\n    switch costume to (ステージ)\nend\n\nwhen I receive [次へ v]\nhide\nwait (1.5) seconds\nshow\n\n@主人公\n\nwhen flag clicked\nset size to (40) %\nset [止まる？ v] to [0]\nset rotation style [left-right v]\nswitch costume to (コスチューム1 v)\ngo to x: (-60) y: (161)\npoint in direction (90)\nshow\nset [x v] to [0]\nset [y v] to [0]\nforever\n    if <<<mouse down?> and <(mouse x) > (x position)>> or <key (right arrow v) pressed?>> then\n        point in direction (90)\n        change [x v] by (1)\n    end\n    if <<key (left arrow v) pressed?> or <<mouse down?> and <(x position) > (mouse x)>>> then\n        point in direction (-90)\n        change [x v] by (-1)\n    end\n    set [x v] to ((x) * (0.9))\n    change x by (x)\n    if <<touching (地面 v)?> or <touching (地面2 v)?>> then\n        change y by (1)\n        if <<touching (地面 v)?> or <touching (地面2 v)?>> then\n            change y by (1)\n            if <<touching (地面 v)?> or <touching (地面2 v)?>> then\n                change y by (1)\n                if <<touching (地面 v)?> or <touching (地面2 v)?>> then\n                    change y by (1)\n                    if <<touching (地面 v)?> or <touching (地面2 v)?>> then\n                        change y by (1)\n                        if <<touching (地面 v)?> or <touching (地面2 v)?>> then\n                            change x by ((x) * (-1))\n                            change y by (-3)\n                            if <<key (up arrow v) pressed?> or <<mouse down?> and <(mouse y) > (y position)>>> then\n                                if <(x) > [0]> then\n                                    set [x v] to [-5]\n                                else\n                                    set [x v] to [5]\n                                end\n                                set [y v] to [12.5]\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 v] by (-1)\n    change y by (y)\n    if <<touching (地面 v)?> or <touching (地面2 v)?>> then\n        change y by ((y) * (-1))\n        set [y v] to [0]\n        if <<key (up arrow v) pressed?> or <<mouse down?> and <(mouse y) > (y position)>>> then\n            set [y v] to [12.5]\n        end\n    end\n    if <[-179] > (y position)> then\n        go to x: (-60) y: (161)\n        set [y v] to [0]\n        set [x v] to [0]\n        broadcast (次へ v) and wait\n    end\n    if <<touching (とげ v)?> or <touching (赤い棒 v)?>> then\n        go to x: (-60) y: (161)\n        broadcast (ダメージ v)\n    end\nend\n\nwhen flag clicked\nforever\n    reset timer\nend\n\nwhen flag clicked\nforever\n    if <touching (ばね v)?> then\n        set [y v] to [20]\n    end\nend\n\nwhen flag clicked\nset [ステージ v] to [1]\nclear graphic effects\ngo to [front v] layer\ngo [backward v] (0) layers\nshow\n\nwhen I receive [次へ v]\nhide\nset [次へ？ v] to [1]\nwait (1.5) seconds\nset [次へ？ v] to [0]\nchange [ステージ v] by (1)\nshow\n\nwhen flag clicked\nshow variable [タイマー v]\nhide variable [☁ 世界記録 v]\nreset timer\nset [タイマー v] to [0]\nset [次へ？ v] to [0]\nforever\n    if <(次へ？) = [0]> then\n        if <not <(backdrop [number v]) = [9]>> then\n            change [タイマー v] by (0.05)\n            wait (0.05) seconds\n        end\n    end\nend\n\nwhen flag clicked\nwait until <(ステージ) = [10]>\nshow variable [タイマー v]\nshow variable [☁ 世界記録 v]\nset [次へ？ v] to [2]\nif <(タイマー) < (☁ 世界記録)> then\n    set [☁ 世界記録 v] to (タイマー)\n    set [タイマー v] to [世界記録更新！]\nend\nif <not <(タイマー) = [世界記録更新！]>> then\n    set [タイマー v] to []\nend\n\n@地面\n\nwhen flag clicked\nshow\nforever\n    go to [front v] layer\n    go [backward v] (1) layers\n    switch costume to (ステージ)\nend\n\n@next level\n\nwhen I receive [次へ v]\ngo to [front v] layer\nshow\ngo to x: (0) y: (403)\nglide (0.1) secs to x: (0) y: (20)\nglide (1) secs to x: (0) y: (13)\nglide (0.1) secs to x: (0) y: (-400)\nhide\n\nwhen flag clicked\nhide\n\n@地面2\n\nwhen flag clicked\nhide\nwait until <(ステージ) = [6]>\nshow\n\nwhen I receive [次へ v]\nhide\n\nwhen I receive [ダメージ v]\nhide\n\n@赤い棒\n\nwhen flag clicked\nhide\nset [向き v] to [0]\nwait until <(ステージ) = [8]>\ngo to x: (150) y: (0)\ncreate clone of (_myself_ v)\nwait until <(ステージ) = [9]>\ngo to x: (150) y: (0)\ncreate clone of (_myself_ v)\nset [向き v] to [1]\ngo to x: (-150) y: (0)\ncreate clone of (_myself_ v)\n\nwhen I start as a clone\nshow\ngo to [front v] layer\nrepeat until <(次へ？) = [1]>\n    if <(向き) = [0]> then\n        repeat (300)\n            move (-1) steps\n            if <(次へ？) = [1]> then\n                delete this clone\n            end\n        end\n        repeat (300)\n            move (1) steps\n            if <(次へ？) = [1]> then\n                delete this clone\n            end\n        end\n    else\n        repeat (300)\n            move (1) steps\n            if <(次へ？) = [1]> then\n                delete this clone\n            end\n        end\n        repeat (300)\n            move (-1) steps\n            if <(次へ？) = [1]> then\n                delete this clone\n            end\n        end\n    end\nend\n\n@スプライト1\n\nwhen flag clicked\nhide\n\n