Desert Platformer 砂漠のプラットフォーマー

Instructions: 矢印キーで動かします\nUse the arrow keys to move it.\n進みたい方向をタップしても動かせます\nYou can also move it by tapping in the direction you want to go.\nトゲに触れてはいけません\nDo not touch spikes or magma!

@Stage\n\nwhen flag clicked\nswitch backdrop to (背景2 v)\nset volume to (100) %\nchange volume by (-70)\nforever\n    play sound [Inferno v] until done\nend\n\n@地面\n\nwhen flag clicked\nset [ステージ v] to [1]\nforever\n    switch costume to (ステージ)\nend\n\n@当たったら死ぬやつ\n\nwhen flag clicked\nset [ステージ v] to [1]\nforever\n    switch costume to (ステージ)\nend\n\n@スプライト2\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\nswitch costume to (止まる v)\ngo to x: (-210) y: (-90)\nshow\nset size to (100) %\ngo to [front v] layer\nshow\nset [x v] to [0]\nset [y v] to [0]\npoint in direction (90)\ngo to x: (-201) y: (152)\ngo to x: (-213) y: (-34)\nforever\n    set rotation style [left-right v]\n    if <<key (left arrow v) pressed?> or <<(mouse x) < (x position)> and <mouse down?>>> then\n        switch costume to (左 v)\n        change [x2 v] by (-1)\n    end\n    if <<key (right arrow v) pressed?> or <<(x position) < (mouse x)> and <mouse down?>>> then\n        switch costume to (右 v)\n        change [x2 v] by (1)\n    end\n    if <not <<key (left arrow v) pressed?> or <key (right arrow v) pressed?>>> then\n        switch costume to (止まる v)\n    end\n    set [x2 v] to ((X2) * (0.9))\n    change x by (X2)\n    if <touching (地面 v)?> then\n        change y by (1)\n        if <touching (地面 v)?> then\n            change y by (1)\n            if <touching (地面 v)?> then\n                change y by (1)\n                if <touching (地面 v)?> then\n                    change y by (1)\n                    if <touching (地面 v)?> then\n                        change y by (1.0)\n                        if <touching (地面 v)?> then\n                            change x by ((X2) * (-1))\n                            change y by (-5)\n                            if <<key (up arrow v) pressed?> or <<[0] < (mouse y)> and <mouse down?>>> then\n                                if <(X2) > [0]> then\n                                    set [x2 v] to [-7]\n                                else\n                                    set [x2 v] to [7]\n                                end\n                                set [y2 v] to [10]\n                            else\n                                set [x2 v] to [0.0]\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\n    change y by (-1)\n    if  then\n        if <<key (up arrow v) pressed?> or <<(y position) < (mouse y)> and <mouse down?>>> then\n            start sound [ニュッ2 v]\n            set [y2 v] to [15]\n        end\n    end\n    change y by (1)\n    change [y2 v] by (-1)\n    change y by (Y2)\n    if  then\n        change y by ((Y2) * (-1))\n        set [y2 v] to [0]\n    end\n    if <(x position) > [230]> then\n        change [ステージ v] by (1)\n        broadcast (次！ v)\n        hide\n        wait (3) seconds\n        set [x2 v] to [0]\n        if <(ステージ) = [6]> then\n            go to x: (-201) y: (100)\n            show\n        end\n        if <not <(ステージ) = [6]>> then\n            go to x: (-201) y: (-100)\n            show\n        end\n    end\n    if <<touching (動く当たったら死ぬやつ2 v)?> or <<touching (動くちっちゃい当たったら死ぬやつ v)?> or <<<touching (当たったら死ぬやつ v)?> or <(y position) < [-174]>> or <touching (動く当たったら死ぬやつ v)?>>>> then\n        set [x2 v] to [0]\n        set [y2 v] to [0]\n        start sound [Oops v]\n        repeat (20)\n            change [ghost v] effect by (20)\n        end\n        if <(ステージ) = [6]> then\n            go to x: (-201) y: (100)\n            show\n        end\n        if <not <(ステージ) = [6]>> then\n            go to x: (-201) y: (-100)\n            show\n        end\n        repeat (10)\n            change [ghost v] effect by (-8)\n        end\n    end\n    if <touching (バネ v)?> then\n        set [y2 v] to [20]\n    end\nend\n\nwait (3) seconds\n\nwhen flag clicked\nforever\n    change [x2 v] by (-0.3)\nend\n\nwhen flag clicked\nset [タイム v] to [0]\nrepeat until <(ステージ) = [10]>\n    wait (1) seconds\n    change [タイム v] by (1)\nend\n\n@砂\n\nwhen flag clicked\ngo to x: (240) y: (0)\nforever\n    wait (pick random (0.2) to (0.3)) seconds\n    go to x: (230) y: (pick random (-180) to (180))\n    create clone of (_myself_ v)\nend\n\nwhen I start as a clone\nshow\ngo to [front v] layer\ngo [backward v] (1) layers\nforever\n    repeat until <touching (_edge_ v)?>\n        change x by (-10)\n    end\n    delete this clone\nend\n\n@砂2\n\nwhen flag clicked\ngo to x: (240) y: (0)\nforever\n    wait (pick random (0.2) to (0.3)) seconds\n    go to x: (230) y: (pick random (-180) to (180))\n    create clone of (_myself_ v)\nend\n\nwhen I start as a clone\nshow\ngo to [front v] layer\ngo [backward v] (1) layers\nforever\n    repeat until <touching (_edge_ v)?>\n        change x by (-10)\n    end\n    delete this clone\nend\n\n@砂3\n\nwhen flag clicked\ngo to x: (240) y: (0)\nforever\n    wait (pick random (0.2) to (0.3)) seconds\n    go to x: (230) y: (pick random (-180) to (180))\n    create clone of (_myself_ v)\nend\n\nwhen I start as a clone\nshow\ngo to [front v] layer\ngo [backward v] (1) layers\nforever\n    repeat until <touching (_edge_ v)?>\n        change x by (-10)\n    end\n    delete this clone\nend\n\n@Next!\n\nwhen I receive [次！ v]\ngo to [front v] layer\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\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@スプライト1\n\nwhen flag clicked\nforever\n    if <(ステージ) = [9]> then\n        show\n    end\nend\n\n