Worlds: Underwater a platformer

Instructions: Welcome to worlds a platformer! The first adventure you'll have is underwater.\n----------------------------------------------------------------\nControls: Arrow keys to move ( Sorry this is not mobile friendly) \n\nNOTE: the underwater part is the 3rd level\nAdvertisements will be reported!!!

@Stage\n\nwhen flag clicked\nswitch backdrop to (backdrop1 v)\nforever\n    play sound [\[YT2mp3 v] until done\nend\n\nwhen flag clicked\nforever\n    switch backdrop to (LEVEL)\nend\n\n@Danger\n\nwhen flag clicked\ngo [backward v] (1) layers\nforever\n    switch costume to (LEVEL)\nend\n\n@key\n\nwhen flag clicked\nhide\n\nwhen backdrop switches to [backdrop6 v]\ngo to x: (36) y: (28)\nshow\ngo to [back v] layer\nforever\n    glide (1) secs to x: (34) y: (-2)\n    wait (0.05) seconds\n    glide (1) secs to x: (36) y: (28)\nend\n\n@Sprite1\n\nwhen flag clicked\nhide\n\nwhen backdrop switches to [backdrop3 v]\nshow\nswitch costume to (fish-a v)\nset size to (70) %\ngo to x: (-145) y: (70)\nglide (1) secs to x: (171) y: (71)\n\nwhen backdrop switches to [backdrop4 v]\nshow\nswitch costume to (fish-c v)\nset size to (70) %\ngo to x: (-145) y: (70)\nglide (1) secs to x: (171) y: (71)\n\nwhen backdrop switches to [backdrop5 v]\nshow\nswitch costume to (fish-a v)\nset size to (70) %\ngo to x: (-145) y: (70)\nglide (1) secs to x: (171) y: (71)\n\nwhen backdrop switches to [backdrop9 v]\nshow\nswitch costume to (fish-c v)\nset size to (70) %\ngo to x: (-145) y: (70)\nglide (1) secs to x: (171) y: (71)\n\nwhen backdrop switches to [backdrop8 v]\nshow\nswitch costume to (fish-a v)\nset size to (70) %\ngo to x: (-145) y: (70)\nglide (1) secs to x: (171) y: (71)\n\nwhen backdrop switches to [backdrop7 v]\nshow\nswitch costume to (fish-c v)\nset size to (70) %\ngo to x: (-145) y: (70)\nglide (1) secs to x: (171) y: (71)\n\nwhen backdrop switches to [backdrop6 v]\nhide\n\n@Thumbnail2\n\nwhen flag clicked\ngo to [front v] layer\nwait (1) seconds\nset [ghost v] effect to (100)\n\n@Player\n\nwhen flag clicked\nset size to (120) %\nset [level v] to [1]\nswitch costume to (normal v)\ngo to x: (-198) y: (-42)\nforever\n    change [y vel. v] by (-1)\n    if <key (right arrow v) pressed?> then\n        switch costume to (right v)\n        change [x vel. v] by (1.2)\n    end\n    if <key (left arrow v) pressed?> then\n        switch costume to (left v)\n        change [x vel. v] by (-1.2)\n    end\n    set [x vel. v] to ((x vel.) * (0.87))\n    change x by (x vel.)\n    if <touching (level v)?> then\n        change y by (1)\n    end\n    if <touching (level v)?> then\n        change y by (1)\n    end\n    if <touching (level v)?> then\n        change y by (1)\n    end\n    if <touching (level v)?> then\n        change y by (1)\n    end\n    if <touching (level v)?> then\n        change y by (1)\n    end\n    if <touching (level v)?> then\n        change y by (1)\n    end\n    if <touching (level v)?> then\n        change y by (-6)\n        change x by ((x vel.) * (-1))\n        set [x vel. v] to [0]\n    end\n    change y by (y vel.)\n    if <touching (level v)?> then\n        change y by ((y vel.) * (-1))\n        set [y vel. v] to [0]\n    end\n    change y by (-1)\n    if <<key (up arrow v) pressed?> and <touching (level v)?>> then\n        switch costume to (up v)\n        set [y vel. v] to [13]\n    end\n    change y by (1)\n    if <(x position) > [240]> then\n        broadcast (New LEVEL v)\n    end\n    if <touching (danger v)?> then\n        go to x: (-198) y: (-98)\n    end\n    if <[-180] > (y position)> then\n        go to x: (-198) y: (-42)\n    end\nend\n\nwhen flag clicked\nforever\n    if <not <key (any v) pressed?>> then\n        switch costume to (normal v)\n    end\n    if <<key (up arrow v) pressed?> and <key (right arrow v) pressed?>> then\n        switch costume to (up right v)\n    end\n    if <<key (up arrow v) pressed?> and <key (left arrow v) pressed?>> then\n        switch costume to (up left v)\n    end\nend\n\nwhen I receive [new level v]\ngo to x: (-198) y: (-94)\nchange [level v] by (1)\n\n@Level\n\nwhen flag clicked\nswitch costume to (1 v)\nforever\n    switch costume to (LEVEL)\nend\n\nwhen flag clicked\nforever\n    if <(LEVEL) = [2]> then\n        broadcast (Level 2 v)\n        stop [this script v]\n    end\nend\n\nwhen I receive [new level v]\nforever\n    if <(LEVEL) = [3]> then\n        broadcast (Level 3 v)\n        stop [this script v]\n    end\n    if <(LEVEL) = [4]> then\n        broadcast (Level 4 v)\n        stop [this script v]\n    end\n    if <(LEVEL) = [5]> then\n        broadcast (Level 5 v)\n        stop [this script v]\n    end\n    if <(LEVEL) = [6]> then\n        broadcast (Level 6 v)\n        stop [this script v]\n    end\n    if <(LEVEL) = [7]> then\n        broadcast (Level 7 v)\n        stop [this script v]\n    end\nend\n\n