simple platformer

Instructions: There is an explanation in English.\n^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^\notori2010の記念すべき初投稿！！（？）\nとにかく頑張ったから星とハートよろしく！！\n一番参照数多い。\nSimple platformerの人気4Pありがとう！！！\n^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^\nThank you for watching. This time, I made a simple platformer. It's my first platformer, so please look at it with warm eyes.\n\n矢印キーで操作\nモバイル対応。\nはじめて作ったから暖かい目で見てね！\n下矢印キーでしゃがむ\nバグ多い

@Stage\n\nwhen flag clicked\nhide variable [タイム v]\nswitch backdrop to (鳥居 v)\nforever\n    switch backdrop to (背景制御変数)\nend\n\nwhen flag clicked\nhide variable [☁ 世界記録 v]\nset [タイム v] to [0]\nrepeat until <(クリア) = [した]>\n    wait (1) seconds\n    change [タイム v] by (1)\nend\n\nwhen I receive [クリア v]\nshow variable [タイム v]\nshow variable [☁ 世界記録 v]\nif <(タイム) < (☁ 世界記録)> then\n    set [☁ 世界記録 v] to (タイム)\nend\n\nwhen flag clicked\nplay sound [IMG_1163 \(online-audio-converter v] until done\n\nwhen flag clicked\nset [☁ play time v] to (current [hour v])\n\n@キャラ\n\nwhen flag clicked\nhide\nswitch costume to (1 v)\nset rotation style [left-right v]\nset [y v] to [0]\nset [x v] to [0]\ngo to x: (-209) y: (-19)\nset size to (100) %\nshow\nforever\n    if <<key (down arrow v) pressed?> or <<key (s v) pressed?> or <<mouse down?> and <(mouse y) < [0]>>>> then\n        switch costume to (2 v)\n    else\n        switch costume to (1 v)\n    end\n    if <(x position) > [200]> then\n        broadcast (Next v)\n        wait (2.4) seconds\n        初期化\n    end\n    if <<key (right arrow v) pressed?> or <<key (d v) pressed?> or <<mouse down?> and <(mouse x) > [0]>>>> then\n        point in direction (90)\n        change [x v] by (2)\n    end\n    if <<key (left arrow v) pressed?> or <<key (a v) pressed?> or <<mouse down?> and <[0] > (mouse x)>>>> then\n        point in direction (-90)\n        change [x v] by (-2)\n    end\n    set [x v] to ((x) * (0.8))\n    change x by (x)\n    change y by (y)\n    change [y v] by (-1)\n    change y by (-1)\n    if <touching (ステージ v)?> then\n        change y by ((y) * (−1))\n        set [y v] to [0]\n    end\n    if <<touching color (#ff0000)?> or <touching (針 v)?>> then\n        start sound [crashed oof v]\n        初期化\n    end\n    if <[-180] > (y position)> then\n        初期化\n    end\n    if <<touching (ステージ v)?> and <<key (up arrow v) pressed?> or <<key (w v) pressed?> or <<mouse down?> and <(mouse y) > [0]>>>>> then\n        set [y v] to [15]\n        start sound [Jump v]\n    end\n    if <<touching (ステージ v)?> or <touching (進撃の壁 v)?>> then\n        change y by (1)\n        if <<touching (ステージ v)?> or <touching (進撃の壁 v)?>> then\n            change y by (1)\n            if <<touching (ステージ v)?> or <touching (進撃の壁 v)?>> then\n                change y by (1)\n                if <<touching (ステージ v)?> or <touching (進撃の壁 v)?>> then\n                    change y by (1)\n                    if <<touching (ステージ v)?> or <touching (進撃の壁 v)?>> then\n                        change y by (1)\n                        if <<touching (ステージ v)?> or <touching (進撃の壁 v)?>> then\n                            change y by (1)\n                            if <<touching (ステージ v)?> or <touching (進撃の壁 v)?>> then\n                                change y by (1)\n                                if <<touching (ステージ v)?> or <touching (進撃の壁 v)?>> then\n                                    change y by (1)\n                                    if <<touching (ステージ v)?> or <touching (進撃の壁 v)?>> then\n                                        change y by (1)\n                                        if <<touching (ステージ v)?> or <touching (進撃の壁 v)?>> then\n                                            change y by (6)\n                                        end\n                                        if <<touching (ステージ v)?> or <touching (進撃の壁 v)?>> then\n                                            change x by ((x) * (-1))\n                                            change x by (-5)\n                                            set [y v] to [0]\n                                            if <key (up arrow v) pressed?> then\n                                                start sound [Jump v]\n                                                if <(x) > [0]> then\n                                                    set [x v] to [-14.5]\n                                                else\n                                                    set [x v] to [14.5]\n                                                end\n                                                set [y v] to [14.5]\n                                            else\n                                                set [x v] to [0]\n                                            end\n                                        end\n                                    end\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\n\ndefine 初期化\nset [x v] to [0]\nset [y v] to [0]\ngo to x: (-200) y: (-59)\n\nwhen flag clicked\nforever\n    create clone of (_myself_ v)\nend\n\nwhen I start as a clone\nrepeat (10)\n    change [ghost v] effect by (10)\n    change size by (-5)\nend\ndelete this clone\n\nwhen I receive [敵発射 v]\nforever\n    if <(x position) > [200]> then\n        broadcast (敵終了 v)\n    end\nend\n\nwhen I receive [ジャンパ出現 v]\nforever\n    if <(x position) > [200]> then\n        broadcast (ジャンパ終了 v)\n    end\nend\n\nwhen flag clicked\nforever\n    if <touching (ジャンパ v)?> then\n        start sound [Boing v]\n        change [y v] by (30)\n    end\n    if <touching color (#009cff)?> then\n        start sound [Boing v]\n        change [y v] by (30)\n    end\nend\n\n@フォロー星ハート\n\nwhen flag clicked\nhide\n\nwhen flag clicked\ngo to [front v] layer\ngo [backward v] (1) layers\nhide\nforever\n    go to x: (145) y: (195)\n    show\n    repeat (9)\n        change y by (-6)\n    end\n    repeat (5)\n        change y by (3)\n    end\n    repeat (5)\n        change y by (-1)\n    end\n    wait (5) seconds\n    repeat (15)\n        change y by (7)\n    end\n    hide\n    wait (pick random (30) to (35)) seconds\nend\n\n@ステージ\n\nwhen flag clicked\nshow\nset [クリア v] to [0]\ngo to x: (25) y: (13)\nset [next v] to [1]\nswitch costume to (1 v)\nforever\n\nwhen I receive [next v]\nwait (1) seconds\nnext costume\n\nwhen I receive [鍵表示制御変数解除 v]\nforever\n    set [鍵表示制御変数 v] to [0]\nend\n\nwhen I receive [ジャンパ表示制御変数解除 v]\nforever\n    set [ジャンパ表示制御変数 v] to [0]\nend\n\nwhen flag clicked\nforever\n    set [背景制御変数 v] to (costume [number v])\nend\n\nwhen flag clicked\nset [針制御変数 v] to [0]\n\nwhen I receive [next v]\nchange [針制御変数 v] by (1)\n\n@針\n\nwhen flag clicked\ngo to x: (36) y: (26)\nhide\nforever\n    if <(針制御変数) = [1]> then\n        show\n    end\nend\n\nwhen flag clicked\nforever\n    wait (1.7) seconds\n    switch costume to (針制御変数)\nend\n\nshow\n\n@サムネ\n\nwhen flag clicked\nset [ghost v] effect to (100)\ngo to x: (0) y: (0)\n\nshow\n\ngo to [front v] layer\n\n@Next!\n\nwhen I receive [next v]\nset [color v] effect to (pick random (-250) to (250))\nhide\nstart sound [High Whoosh v]\nclone [1]\nwait (0.05) seconds\nclone [2]\nwait (0.05) seconds\nclone [3]\nwait (0.05) seconds\nclone [4]\nwait (0.05) seconds\nclone [5]\n\ndefine clone (cloneid)\nswitch costume to (cloneid)\ncreate clone of (_myself_ v)\n\nwhen I start as a clone\nshow\ngo to [front v] layer\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@ハート　星　フォロー\n\nwhen flag clicked\nset [ghost v] effect to (100)\n\n@雲\n\nwhen flag clicked\ngo to x: (425) y: (120)\ngo to [back v] layer\nforever\n    move (-0.2) steps\n    if <(x position) < [-396]> then\n        go to x: (425) y: (120)\n    end\nend\n\n