Write the ground platformer 地面を書くプラットフォーマー

Instructions: 地面を書いているときは動けません\nYou can't move when you are writing on the ground.\n鉛筆のボタンをもう一度押すと動けます\nPress the pencil button again to move.\n矢印キーで動かします\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 Lava!\n

@Stage\n\nwhen flag clicked\nswitch backdrop to (背景3 v)\nset volume to (100) %\nchange volume by (-70)\nforever\n    play sound [Starship v] until done\nend\n\n@地面\n\nwhen flag clicked\nset [ステージ v] to [1]\nforever\n    switch costume to (ステージ)\nend\n\nset pen color to (#00e01d)\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 <<not <(書いてる？) = [書いてる]>> and <<(mouse x) < (x position)> and <mouse down?>>>> then\n        switch costume to (左 v)\n        change [x2 v] by (-0.9)\n    end\n    if <<key (right arrow v) pressed?> or <<not <(書いてる？) = [書いてる]>> and <<(x position) < (mouse x)> and <mouse down?>>>> then\n        switch costume to (右 v)\n        change [x2 v] by (0.9)\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)?> or <touching color (#00e01d)?>> then\n        change y by (1)\n        if <<touching (地面 v)?> or <touching color (#00e01d)?>> then\n            change y by (1)\n            if <<touching (地面 v)?> or <touching color (#00e01d)?>> then\n                change y by (1)\n                if <<touching (地面 v)?> or <touching color (#00e01d)?>> then\n                    change y by (1)\n                    if <<touching (地面 v)?> or <touching color (#00e01d)?>> then\n                        change y by (1.0)\n                        if <<touching (地面 v)?> or <touching color (#00e01d)?>> then\n                            change x by ((X2) * (-1))\n                            change y by (-5)\n                            if <<not <(書いてる？) = [書いてる]>> and <<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 <<touching color (#00e01d)?> or <<touching (地面 v)?> or <touching (動く地面 v)?>>> then\n        if <<not <(書いてる？) = [書いてる]>> and <<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 <<touching color (#00e01d)?> or <<touching (地面 v)?> or <touching (動く地面 v)?>>> 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        erase all\n        set [x2 v] to [0]\n        go to x: (-201) y: (-100)\n        show\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        go to x: (-201) y: (-100)\n        repeat (10)\n            change [ghost v] effect by (-10)\n        end\n    end\n    if <touching (バネ v)?> then\n        set [y2 v] to [20]\n    end\nend\n\nif <touching color (#00e01d)?> then\n    repeat until <not <touching color (#00e01d)?>>\n        change y by (1)\n    end\nend\n\nwhen flag clicked\nset [タイム v] to [0]\nrepeat until <(ステージ) = [9]>\n    wait (1) seconds\n    change [タイム v] by (1)\nend\n\n@えんぺぃつ\n\nwhen flag clicked\nerase all\n\nwhen flag clicked\nhide\nset [書く？ v] to []\n\nforever\nend\n\nerase all\n\nwhen I receive [書く v]\nif <(書いてる？) = [書いていない]> then\n    set [書いてる？ v] to [書いてる]\n    forever\n        show\n        go to (mouse-pointer v)\n        if <mouse down?> then\n            set pen size to (5)\n            set pen color to (#00e01d)\n            pen down\n        else\n            pen up\n        end\n    end\nelse\n    hide\nend\n\nwhen I receive [書かない v]\nstop [other scripts in sprite v]\nhide\nset [書いてる？ v] to [書いていない]\n\n@スプライト1\n\nwhen this sprite clicked\nif <(書いてる？) = [書いていない]> then\n    broadcast (書く v)\nend\nif <(書いてる？) = [書いてる]> then\n    broadcast (書かない v)\nend\n\nwhen flag clicked\nset [書いてる？ v] to [書いていない]\nforever\n    go to [front v] layer\nend\n\n@スプライト3\n\nwhen this sprite clicked\nwait (0.1) seconds\nerase all\n\nwhen flag clicked\nforever\n    go to [front v] layer\nend\n\nwhen flag clicked\nforever\n    if <(書いてる？) = [書いてる]> then\n        show\n    else\n        hide\n    end\nend\n\n@動く当たったら死ぬやつ\n\nwhen flag clicked\nhide\nforever\n    if <(ステージ) = [8]> then\n        show\n    end\nend\n\nwhen I receive [レーザー消える v]\nstop [other scripts in sprite v]\nhide\n\n@スプライト6\n\nwhen flag clicked\nhide\ngo to [back v] layer\nswitch costume to (コスチューム1 v)\nforever\n    if <(ステージ) = [8]> then\n        show\n    end\n    if <touching (  v)?> then\n        switch costume to (コスチューム2 v)\n        broadcast (レーザー消える v)\n    end\n    if <(ステージ) = [9]> then\n        hide\n    end\nend\n\n@♡\n\nwhen flag clicked\nset [♡ v] to [0]\ngo to x: (0) y: (0)\nforever\n    if <touching (mouse-pointer v)?> then\n        if <(♡) = [1]> then\n            set [♡ v] to [0]\n        else\n            set [♡ v] to [1]\n        end\n    end\n    wait until <not <touching (mouse-pointer v)?>>\nend\n\nshow\n\n@☆\n\nwhen flag clicked\nset [☆ v] to [0]\ngo to x: (0) y: (0)\nforever\n    if <touching (mouse-pointer v)?> then\n        if <(☆) = [1]> then\n            set [☆ v] to [0]\n        else\n            set [☆ v] to [1]\n        end\n    end\n    wait until <not <touching (mouse-pointer v)?>>\nend\n\nshow\n\n@言葉\n\nwhen flag clicked\nset [☆ v] to [0]\nhide\ngo to x: (0) y: (187)\nforever\n    go to [front v] layer\n    if <((変数) + (☆)) = [2]> then\n        show\n        switch costume to (thank you!! v)\n        glide (1) secs to x: (0) y: (157)\n        wait (1) seconds\n        glide (1) secs to x: (0) y: (200)\n        hide\n        set [☆ v] to [0]\n    end\nend\n\n