Into The Unknown - a platformer

Instructions: if you play this game please take some time to visit:\n\nthis is an organization promoting

@Stage\n\nwhen flag clicked\nswitch backdrop to (backdrop1 v)\n\nwhen I receive [instructions v]\nswitch backdrop to (backdrop2 v)\nforever\n    if <key (b v) pressed?> then\n        broadcast (hide  v)\n        switch backdrop to (backdrop1 v)\n    end\nend\n\nwhen I receive [l14 v]\nswitch backdrop to (backdrop3 v)\n\nwhen I receive [start v]\nswitch backdrop to (backdrop1 v)\n\nwhen flag clicked\n\n@DUDE\n\nwhen flag clicked\nforever\n    if <key (right arrow v) pressed?> then\n        switch costume to (costume3 v)\n    end\n    if <key (left arrow v) pressed?> then\n        switch costume to (costume2 v)\n    end\nend\n\nwhen I receive [l14 v]\nif <(☁ Scratch Record:) > (Your Time)> then\n    set [☁ scratch record: v] to (Your Time)\nend\nstop [this script v]\n\ndefine platform physics (jump height) (gravity) (friction) (movement speed) (wall jump vm) (wall jump hm)\nchange y by (y vel)\nif <touching (ground v)?> then\n    repeat ([abs v] of (y vel) )\n        if <touching (ground v)?> then\n            change y by ((-1) * (([abs v] of (y vel) ) / (y vel)))\n        end\n    end\n    if <<key (up arrow v) pressed?> and <not <(y vel) > [0]>>> then\n        set [y vel v] to (jump height)\n    else\n        set [y vel v] to [0]\n    end\nelse\n    change [y vel v] by (gravity)\nend\nif <key (right arrow v) pressed?> then\n    change [x vel v] by (movement speed)\nend\nif <key (left arrow v) pressed?> then\n    change [x vel v] by ((-1) * (movement speed))\nend\nchange x by (x vel)\nif <touching (ground v)?> then\n    set [old y v] to (y position)\n    repeat (([abs v] of (x vel) ) + (1))\n        if <touching (ground v)?> then\n            change y by (1)\n        end\n    end\n    if <touching (ground v)?> then\n        set y to (old y)\n        repeat ([ceiling v] of ([abs v] of (x vel) ) )\n            if <touching (ground v)?> then\n                change x by ((-1) * (([abs v] of (x vel) ) / (x vel)))\n            end\n        end\n        if <key (up arrow v) pressed?> then\n            if <(x vel) < [0]> then\n                set [x vel v] to [0]\n                if <key (left arrow v) pressed?> then\n                    set [x vel v] to (wall jump hm)\n                    set [y vel v] to (wall jump vm)\n                end\n            else\n                set [x vel v] to [0]\n                if <key (right arrow v) pressed?> then\n                    set [x vel v] to ((-1) * (wall jump hm))\n                    set [y vel v] to (wall jump vm)\n                end\n            end\n        end\n    end\nend\nset [x vel v] to ((x vel) * (friction))\n\nwhen I receive [start v]\nshow\ngo to x: (-183) y: (-105)\nshow\nset [y vel v] to [0]\nset [x vel v] to [0]\nforever\n    platform physics (12) (-1) (0.9) (1) (8) (8)\nend\n\nwhen flag clicked\ngo to x: (-214) y: (-85)\nhide\n\nwhen flag clicked\nset [your time v] to [0]\nforever\n    play sound [Celtic Mystery Music - Forest of Forgetfulness v] until done\nend\n\nwhen flag clicked\nforever\n    if <touching (sprite1 v)?> then\n        go to x: (-190) y: (-80)\n    end\nend\n\nhide\n\nwhen I receive [start v]\nforever\n    if <touching (sprite5 v)?> then\n        broadcast (Next Level v)\n        go to x: (-190) y: (-80)\n        stop [this script v]\n    end\nend\n\nwhen I receive [start v]\ngo to x: (-190) y: (-50)\n\nwhen I receive [next level v]\ngo to x: (-190) y: (-50)\n\nwhen I receive [next level v]\nforever\n    if <touching (sprite5 v)?> then\n        broadcast (L3 v)\n        go to x: (-190) y: (-80)\n        stop [this script v]\n    end\nend\n\nwhen I receive [l3 v]\nforever\n    if <touching (sprite5 v)?> then\n        go to x: (-190) y: (-80)\n        broadcast (L4 v)\n        stop [this script v]\n    end\nend\n\nwhen I receive [l4 v]\nforever\n    if <touching (sprite5 v)?> then\n        broadcast (L5 v)\n        go to x: (-190) y: (-80)\n        stop [this script v]\n    end\nend\n\nwhen I receive [l5 v]\nforever\n    if <touching (sprite5 v)?> then\n        broadcast (L6 v)\n        go to x: (-190) y: (-80)\n        stop [this script v]\n    end\nend\n\nwhen I receive [l6 v]\nforever\n    if <touching (sprite5 v)?> then\n        broadcast (L7 v)\n        go to x: (-190) y: (-80)\n        stop [this script v]\n    end\nend\n\nwhen I receive [l7 v]\nforever\n    if <touching (sprite5 v)?> then\n        broadcast (L8 v)\n        go to x: (-190) y: (-80)\n        stop [this script v]\n    end\nend\n\nwhen I receive [l8 v]\nforever\n    if <touching (sprite5 v)?> then\n        broadcast (L9 v)\n        go to x: (-190) y: (-80)\n        stop [this script v]\n    end\nend\n\nwhen I receive [l9 v]\nforever\n    if <touching (sprite5 v)?> then\n        broadcast (L10 v)\n        go to x: (-213) y: (-85)\n        stop [this script v]\n    end\nend\n\nwhen I receive [l10 v]\nforever\n    if <touching (sprite5 v)?> then\n        broadcast (11 v)\n        go to x: (-213) y: (-85)\n        stop [this script v]\n    end\nend\n\nwhen I receive [11 v]\nforever\n    if <touching (sprite5 v)?> then\n        broadcast (L12 v)\n        go to x: (-213) y: (-85)\n        stop [this script v]\n    end\nend\n\nwhen I receive [l12 v]\nforever\n    if <touching (sprite5 v)?> then\n        broadcast (L13 v)\n        go to x: (-213) y: (-85)\n        stop [this script v]\n    end\nend\n\nwhen I receive [l13 v]\nforever\n    if <touching (sprite5 v)?> then\n        broadcast (L14 v)\n        go to x: (-213) y: (-85)\n        stop [this script v]\n    end\nend\n\nwhen I receive [l14 v]\nforever\n    if <touching (sprite5 v)?> then\n        broadcast (L15 v)\n        go to x: (-213) y: (-85)\n        stop [this script v]\n    end\nend\n\nwhen I receive [l15 v]\nforever\n    if <touching (sprite5 v)?> then\n        broadcast (L16 v)\n        go to x: (-213) y: (-85)\n        stop [this script v]\n    end\nend\n\nwhen flag clicked\nforever\n    switch costume to (costume2 v)\n    wait (4) seconds\n    next costume\n    wait (.3) seconds\n    next costume\nend\n\nwhen I receive [l14 v]\nhide\n\nwhen I receive [start v]\nset [your time v] to [0]\nforever\n    change [your time v] by (1)\n    wait (1) seconds\nend\n\ngo to x: (-190) y: (-80)\n\nwhen I receive [l14 v]\nforever\n    set [your time v] to (Your Time)\nend\n\nwhen flag clicked\n\nset [☁ scratch record: v] to [36]\n\nwhen flag clicked\nforever\n    set [☁ scratch record: v] to [is broken]\nend\n\n@Overlay\n\nwhen flag clicked\nhide\nforever\n    go to [front v] layer\n    go to (dude v)\nend\n\nwhen I receive [start v]\nshow\n\nwhen I receive [l14 v]\nhide\n\ngo to x: (-190) y: (-80)\n\nwhen I receive [start v]\nrepeat (4)\n    change [ghost v] effect by (25)\nend\nwait (.1) seconds\nrepeat (4)\n    change [ghost v] effect by (-25)\nend\n\nhide\n\nshow\n\nforever\n    \n    end\nend\n\nwhen I receive [start v]\nforever\n    if <(x position) = [-190]> then\n        broadcast (Flash v)\n    end\nend\n\nwhen I receive [start v]\nforever\n    if <(x position) = [-190]> then\n        broadcast (Flash v)\n    end\nend\n\nbroadcast (START v)\nstop [this script v]\n\n@ground\n\nwhen flag clicked\nhide\n\nwhen I receive [start v]\nshow\n\nwhen flag clicked\nswitch costume to (costume1 v)\n\nwhen I receive [next level v]\nnext costume\n\nwhen I receive [l3 v]\nnext costume\n\nwhen I receive [l4 v]\nnext costume\n\nwhen I receive [l5 v]\nnext costume\n\nwhen I receive [l6 v]\nnext costume\n\nwhen I receive [l7 v]\nnext costume\n\nwhen I receive [l8 v]\nnext costume\n\nwhen I receive [l9 v]\nnext costume\n\nwhen I receive [l10 v]\nnext costume\n\nwhen I receive [11 v]\nnext costume\n\nwhen I receive [l12 v]\nnext costume\n\nwhen I receive [l13 v]\nnext costume\n\nwhen I receive [l13 v]\nnext costume\n\nwhen I receive [l14 v]\nhide\n\nnext costume\n\nwhen I receive [start v]\nswitch costume to (costume1 v)\n\n@Sprite1\n\nwhen flag clicked\nhide\nforever\n    set [ghost v] effect to (100)\n    go to x: (-75) y: (-187)\nend\n\nwhen I receive [start v]\nshow\n\n@Sprite2\n\nwhen flag clicked\nshow\nforever\n    if <touching (mouse-pointer v)?> then\n        set [brightness v] effect to (20)\n        change size by (((120) - (size)) / (3))\n    else\n        set [brightness v] effect to (0)\n        set size to (100) %\n    end\nend\n\nwhen this sprite clicked\nhide\nbroadcast (Start v)\nstop [this script v]\n\nwhen I receive [instructions v]\nhide\n\nwhen I receive [hide  v]\nshow\n\n@Sprite3\n\nwhen flag clicked\nshow\nforever\n    if <touching (mouse-pointer v)?> then\n        set [brightness v] effect to (20)\n        change size by (((120) - (size)) / (3))\n    else\n        set [brightness v] effect to (0)\n        set size to (100) %\n    end\nend\n\nset x to (36)\nset y to (28)\n\nchange size by (10)\n\nwhen I receive [start v]\nhide\n\nwhen this sprite clicked\nbroadcast (instructions v)\nhide\n\nwhen I receive [hide  v]\nshow\n\n@Sprite4\n\nwhen flag clicked\nshow\nforever\n    change [turn v] by (5)\n    point in direction ((([cos v] of (Turn) ) * (8)) - (-90))\nend\n\nwhen I receive [start v]\nhide\n\nwhen I receive [instructions v]\nhide\n\nwhen I receive [hide  v]\nshow\n\n@Sprite5\n\nwhen flag clicked\nswitch costume to (costume1 v)\ngo to x: (-153) y: (50)\nhide\n\nwhen I receive [start v]\nshow\n\nwhen I receive [next level v]\ngo to x: (-67) y: (32)\n\nwhen I receive [l3 v]\ngo to x: (5) y: (47)\n\nwhen I receive [l4 v]\ngo to x: (41) y: (20)\n\nwhen I receive [l5 v]\ngo to x: (76) y: (-94)\n\nwhen I receive [l6 v]\ngo to x: (-20) y: (-21)\n\nwhen I receive [l7 v]\ngo to x: (93) y: (17)\n\nwhen I receive [l8 v]\ngo to x: (-68) y: (84)\n\nwhen I receive [l9 v]\ngo to x: (85) y: (-68)\n\nwhen I receive [l10 v]\ngo to x: (209) y: (-137)\n\nwhen I receive [11 v]\ngo to x: (-132) y: (72)\n\nwhen I receive [l12 v]\ngo to x: (198) y: (-108)\n\nwhen I receive [l13 v]\ngo to x: (189) y: (46)\n\nwhen I receive [l15 v]\nhide\ngo to x: (203) y: (96)\n\nwhen I receive [l14 v]\nhide\n\n@Sprite6\n\nwhen flag clicked\ngo to x: (0) y: (0)\nhide\n\nforever\n    if <touching (mouse-pointer v)?> then\n        set [brightness v] effect to (20)\n        change size by (((120) - (size)) / (3))\n    else\n        set [brightness v] effect to (0)\n        set size to (100) %\n    end\nend\n\nwhen this sprite clicked\nhide\nbroadcast (Start v)\n\nwhen I receive [instructions v]\nhide\n\nwhen I receive [l14 v]\nshow\n\n@Sprite7\n\nwhen flag clicked\nshow\nforever\n    if <touching (mouse-pointer v)?> then\n        set [brightness v] effect to (20)\n        change size by (((120) - (size)) / (3))\n    else\n        set [brightness v] effect to (0)\n        set size to (100) %\n    end\nend\n\nset x to (36)\nset y to (28)\nchange size by (10)\n\nwhen I receive [start v]\nhide\n\nwhen this sprite clicked\nbroadcast (instructions v)\nhide\n\nwhen I receive [hide  v]\nshow\n\n