Nature  - A platformer game - （スマホ対応）

Instructions: >>>My studio\n◇hiron0413's platformer◇\nhttps://scratch.mit.edu/studios/27006005/\n\n---------------操作方法---------------\n\n　　〔パソコン〕\nA,Dキー or ←,→キー で移動\nWキー or ↑キーでジャンプ\nUse A,D keys or ←,→ keys to move\nUse W key or ↑key to jump\n\n〔スマホ・タブレット〕\n左側・右側をタップして移動、\n上側をタップしてジャンプ\nTap left / right side to move\nTap on the top to jump\n

@Stage\n\nwhen flag clicked\nforever\n    play sound [inaka no daisougen v] until done\nend\n\n@Player\n\nwhen flag clicked\npoint in direction (90)\nswitch costume to (a v)\nset [xの力 v] to [0]\nset [yの力 v] to [0]\ngo to x: (-200) y: (-50)\n動作\n\ndefine 動作\nforever\n    change [yの力 v] by (-1)\n    if <<<key (d v) pressed?> or <key (right arrow v) pressed?>> or <<<<(mouse x) > (x position)> and <not <[-200] > (mouse x)>>> or <(mouse x) > [200]>> and <mouse down?>>> then\n        change [xの力 v] by (0.9)\n        point in direction (90)\n    end\n    if <<<key (a v) pressed?> or <key (left arrow v) pressed?>> or <<<<(x position) > (mouse x)> and <not <(mouse x) > [200]>>> or <[-200] > (mouse x)>> and <mouse down?>>> then\n        change [xの力 v] by (-0.9)\n        point in direction (-90)\n    end\n    set [xの力 v] to ((xの力) * (0.88))\n    change x by (xの力)\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 (-4)\n                        change x by ((xの力) * (-1))\n                        if <<<<key (w v) pressed?> or <key (up arrow v) pressed?>> or <key (space v) pressed?>> or <<(mouse y) > [0]> and <mouse down?>>> then\n                            set [yの力 v] to [10]\n                            if <(xの力) > [0]> then\n                                set [xの力 v] to [-7]\n                            else\n                                set [xの力 v] to [7]\n                            end\n                        else\n                            set [xの力 v] to [0]\n                        end\n                    end\n                end\n            end\n        end\n    end\n    change y by (yの力)\n    if <<touching (ステージ v)?> or <touching (岩 v)?>> then\n        change y by ((yの力) * (-1))\n        set [yの力 v] to [0]\n    end\n    change y by (-1)\n    if <<<touching (ステージ v)?> or <touching (岩 v)?>> and <<<<key (w v) pressed?> or <key (up arrow v) pressed?>> or <key (space v) pressed?>> or <<(mouse y) > [0]> and <mouse down?>>>> then\n        set [yの力 v] to [13]\n    end\n    change y by (1)\n    if <<<(y position) < [-179]> or <touching (マグマ v)?>> or <key (r v) pressed?>> then\n        go to x: (-200) y: (-50)\n        set [xの力 v] to [0]\n        set [yの力 v] to [0]\n    end\nend\n\nwhen flag clicked\nforever\n    create clone of (_myself_ v)\nend\n\nwhen I start as a clone\nswitch costume to (b v)\nclear graphic effects\nset [ghost v] effect to (60)\nshow\nrepeat (5)\n    change [ghost v] effect by (8)\nend\ndelete this clone\n\nwhen flag clicked\nswitch backdrop to (背景1 v)\nset [level v] to [1]\nforever\n    if <<[239] < (x position)> and <not <(Level) = [12]>>> then\n        Next >>\n    end\n    if <(restart) = [1]> then\n        go to x: (-200) y: (-50)\n        point in direction (90)\n        set [xの力 v] to [0]\n        set [yの力 v] to [0]\n        set [restart v] to [0]\n    end\nend\n\ndefine Next >>\nbroadcast (next >> v)\nwait (0.3) seconds\nchange [level v] by (1)\nset [xの力 v] to [0]\nset [yの力 v] to [0]\nswitch backdrop to (Level)\ngo to x: (-200) y: (-50)\n\nwhen I receive [ok v]\ngo to x: (-200) y: (-50)\npoint in direction (90)\n\n@ステージ\n\nwhen flag clicked\nforever\n    switch costume to (Level)\nend\n\n@草\n\nwhen flag clicked\nset [草 v] to [1]\nset [level v] to [1]\nhide\nforever\n    set [a v] to (Level)\n    クローン生成\n    wait until <not <(Level) = (A)>>\nend\n\ndefine クローン生成\npoint in direction (120)\ngo to x: (-240) y: (-110)\nset [my_num v] to (Level)\nrepeat (100)\n    set [θ v] to (pick random (0) to (100))\n    create clone of (_myself_ v)\n    change x by (5)\nend\nif <(Level) = [7]> then\n    point in direction (120)\n    go to x: (-100) y: (-50)\n    set [my_num v] to (Level)\n    repeat (40)\n        set [θ v] to (pick random (0) to (100))\n        create clone of (_myself_ v)\n        change x by (5)\n    end\nelse\n    if <(Level) = [8]> then\n        point in direction (120)\n        go to x: (20) y: (-50)\n        set [my_num v] to (Level)\n        repeat (10)\n            set [θ v] to (pick random (0) to (100))\n            create clone of (_myself_ v)\n            change x by (5)\n        end\n        go to x: (-100) y: (150)\n        repeat (10)\n            set [θ v] to (pick random (0) to (100))\n            create clone of (_myself_ v)\n            change x by (5)\n        end\n        go to x: (100) y: (140)\n        repeat (10)\n            set [θ v] to (pick random (0) to (100))\n            create clone of (_myself_ v)\n            change x by (5)\n        end\n    else\n        if <(Level) = [9]> then\n            point in direction (120)\n            go to x: (-200) y: (140)\n            set [my_num v] to (Level)\n            repeat (2)\n                repeat (10)\n                    set [θ v] to (pick random (0) to (100))\n                    create clone of (_myself_ v)\n                    change x by (5)\n                end\n                change x by (60)\n            end\n        else\n            if <(Level) = [10]> then\n                point in direction (120)\n                go to x: (-240) y: (0)\n                set [my_num v] to (Level)\n                repeat (50)\n                    set [θ v] to (pick random (0) to (100))\n                    create clone of (_myself_ v)\n                    change x by (7)\n                end\n                point in direction (120)\n                go to x: (-180) y: (120)\n                set [my_num v] to (Level)\n                repeat (50)\n                    set [θ v] to (pick random (0) to (100))\n                    create clone of (_myself_ v)\n                    change x by (7)\n                end\n            else\n            end\n        end\n    end\nend\n\nwhen I start as a clone\nswitch costume to (pick random (1) to (3))\nset size to (pick random (15) to (25)) %\nchange x by (pick random (-3) to (3))\nchange y by (pick random (-5) to (5))\nset [brightness v] effect to (pick random (-30) to (10))\nset [ghost v] effect to (pick random (20) to (30))\ngo to [front v] layer\ngo [backward v] (pick random (10) to (200)) layers\nshow\nif <<not <touching (ステージ v)?>> or <touching (スイッチ v)?>> then\n    delete this clone\nend\n位置補正\nforever\n    point in direction ((([sin v] of (θ) ) * (10)) + (90))\n    change [θ v] by (pick random (15) to (30))\n    if <not <(Level) = (My_num)>> then\n        delete this clone\n    end\n    if <(草) = [0]> then\n        hide\n    else\n        show\n    end\nend\n\ndefine 位置補正\nrepeat until <not <touching (ステージ v)?>>\n    change y by (5)\nend\nchange y by (pick random (-15) to (-5))\n\n@幕\n\nwhen flag clicked\nclear graphic effects\nshow\nrepeat (10)\n    change [ghost v] effect by (10)\nend\nhide\n\nwhen I receive [next >> v]\nshow\nset [ghost v] effect to (100)\nrepeat (10)\n    change [ghost v] effect by (-10)\nend\nwait (1) seconds\nbroadcast (ok v)\nrepeat (10)\n    change [ghost v] effect by (10)\nend\nhide\n\n@リスタート\n\nwhen this sprite clicked\nset [restart v] to [1]\n\n@スイッチ\n\nwhen flag clicked\nswitch costume to (on v)\n\nwhen this sprite clicked\nset [草 v] to ((1) - (草))\nswitch costume to (草)\n\n@マグマ\n\nwhen flag clicked\nforever\n    switch costume to (Level)\nend\n\n@サムネ\n\nwhen flag clicked\nhide\n\n