Volcano platformer

Instructions: ---------------------------------------------------------------------  \n       Mobile friendly! WASD and mouse controls.\n                   Put like and star, if you like it!\n----------------------------------------------------------------------

@Stage\n\nwhen flag clicked\nswitch backdrop to (фон 2 v)\n\nwhen I receive [start v]\nswitch backdrop to (фон 1 v)\nforever\n    play sound [TheFatRat  JJD - Prelude VIP Edit.mp3 v] until done\nend\n\n@Player\n\ndefine reset\nif <<<mouse down?> and <(mouse x) > (x position)>> or <<key (d v) pressed?> or <key (right arrow v) pressed?>>> then\n    change [x v] by (2)\n    switch costume to (right v)\nend\nif <<<mouse down?> and <(mouse x) < (x position)>> or <<key (a v) pressed?> or <key (left arrow v) pressed?>>> then\n    switch costume to (left v)\n    change [x v] by (-2)\nend\nset [x v] to ((x) * (0.8))\nchange x by (round (x))\nif <touching (level v)?> then\n    change x by (round ((x) * (-1)))\n    if <<<mouse down?> and <(mouse y) > (y position)>> or <<key (w v) pressed?> or <key (up arrow v) pressed?>>> then\n        switch costume to (up v)\n        if <(x) > [0]> then\n            set [x v] to [-13]\n        else\n            set [x v] to [13]\n        end\n        set [y v] to [14]\n    else\n        set [x v] to [0]\n    end\nend\nchange [y v] by (-1)\nchange y by (y)\nif <touching (level v)?> then\n    change y by ((y) * (-1))\n    set [y v] to [0]\nend\nchange y by (-1)\nif <<touching (level v)?> and <<<mouse down?> and <(mouse y) > (y position)>> or <<key (w v) pressed?> or <key (up arrow v) pressed?>>>> then\n    set [y v] to [12]\nend\nchange y by (1)\nif <(x position) > [233]> then\n    go to x: (-211) y: (-53)\n    broadcast (next level v)\nend\nif <<<touching (danger v)?> or <touching (lava v)?>> or <(y position) < [-180]>> then\n    change [ghost v] effect by (50)\n    go to x: (-206) y: (-30)\n    wait (0.05) seconds\n    set [ghost v] effect to (0)\nend\nif <touching (bounce v)?> then\n    set [y v] to [21]\nend\n\nwhen flag clicked\nhide\n\nwhen I receive [reset v]\nset [music v] to [1]\nforever\n    reset\n    if <(music) = [2]> then\n        stop [this script v]\n    end\nend\n\nwhen I receive [start v]\nshow\ngo to x: (-154) y: (0)\nset [x v] to [0]\nset [y v] to [0]\nforever\n    switch costume to (player v)\n    go to [front v] layer\nend\n\nwhen I receive [start v]\nforever\n    reset\n    if <(music) = [2]> then\n        stop [this script v]\n    end\nend\n\nwhen flag clicked\nset [music v] to [1]\n\n@Level\n\nwhen I receive [next level v]\nnext costume\n\nwhen flag clicked\nhide\nswitch costume to (костюм 1 v)\n\nwhen I receive [start v]\nshow\n\n@Danger\n\nwhen flag clicked\nhide\nswitch costume to (костюм 1 v)\n\nwhen I receive [next level v]\nnext costume\n\nwhen I receive [start v]\nshow\n\n@Bounce\n\nwhen I receive [next level v]\nnext costume\n\nwhen flag clicked\nswitch costume to (костюм 1 v)\n\n@Спрайт 1\n\nwhen flag clicked\nhide\nswitch costume to (костюм 1 v)\n\nwhen I receive [next level v]\nnext costume\n\nwhen I receive [start v]\nshow\n\n@Спрайт 2\n\nwhen flag clicked\nset [ghost v] effect to (100)\nshow\n\n@Интро ,_,\n\nwhen flag clicked\ngo to x: (11) y: (-5)\nswitch costume to (костюм 1 v)\n\nwhen flag clicked\ncreate clone of (_myself_ v)\nplay drum (12 v) for (0.25) beats\nwait (1) seconds\nnext costume\nplay drum (10 v) for (0.3) beats\nset [& v] to [1]\nwait (0.05) seconds\nnext costume\nplay drum (10 v) for (0.25) beats\nwait (0.05) seconds\nnext costume\nplay drum (10 v) for (0.2) beats\nrepeat (4)\n    wait (0.5) seconds\n    switch costume to (костюм 3 v)\n    wait (0.5) seconds\n    switch costume to (костюм 5 v)\nend\nrepeat (10)\n    change [ghost v] effect by (10)\nend\nclear graphic effects\nbroadcast (start v)\n\nwhen I start as a clone\nswitch costume to (костюм 6 v)\ngo to x: (-3) y: (72)\nforever\n    if <(&) = [1]> then\n        set [ghost v] effect to (100)\n        show\n        repeat (10)\n            change [ghost v] effect by (-10)\n        end\n        stop [this script v]\n    end\nend\n\nwhen flag clicked\nshow\n\nwhen I receive [start v]\nhide\ndelete this clone\n\n