The Impossible Platformer

Instructions: Very Hard but just about Possible\ncontrols :\nWASD \nArrow Keys And/Or Space Bar\n\nFIND THE GREY DOT FOR EXTRA LVL\n

@Stage\n\nwhen I receive [next level v]\nnext backdrop\nwait (1) seconds\n\nwhen I receive [start v]\nswitch backdrop to (backdrop1 v)\n\nwhen flag clicked\nswitch backdrop to (backdrop6 v)\n\n@PLAYER\n\ndefine walk (direction) (speed)\npoint in direction (direction)\nchange [xv v] by (speed)\nset [slope v] to [0]\nrepeat until <<(slope) = [7.5   ]> or <not <touching color (#009999)?>>>\n    change y by (1)\n    change [slope v] by (1)\nend\nif <(slope) = [7.5]> then\n    change x by ((0) - (speed))\n    change y by ((0) - (slope))\nend\n\ndefine touch ground <up?>\nchange [falling v] by (1)\nrepeat until <not <touching color (#009999)?>>\n    set [yv v] to [0]\n    if <up?> then\n        change y by (-1)\n    else\n        change y by (1)\n        set [falling v] to [0]\n    end\nend\n\nwhen I receive [start v]\nshow\nset size to (40) %\nswitch backdrop to (backdrop2 v)\ngo to x: (0) y: (0)\ngo to x: (-225) y: (-95)\nset [xv v] to [0]\nset [yv v] to [0]\nforever\n    set [xv v] to ((xv) * (0.92))\n    change x by (xv)\n    Controls\nend\n\nwhen flag clicked\nhide\n\ndefine Controls\nchange [yv v] by (-0.5)\nchange y by (yv)\ntouch ground <(yv) > [0]>\nif <<key (right arrow v) pressed?> or <key (d v) pressed?>> then\n    walk (90) (1)\nend\nif <<key (left arrow v) pressed?> or <key (a v) pressed?>> then\n    walk (-90) (-1)\nend\nif <<<key (space v) pressed?> or <<key (up arrow v) pressed?> or <key (w v) pressed?>>> and <(falling) < [3]>> then\n    set [yv v] to [10]\nend\nif <touching color (#ffff00)?> then\n    broadcast (next level v)\n    go to x: (-225) y: (10)\n    set [xv v] to [0]\n    set [yv v] to [0]\nend\nif <touching color (#ff0000)?> then\n    if <(hardness) = [Normal]> then\n        go to x: (-225) y: (-95)\n        set [xv v] to [0]\n        set [yv v] to [0]\n    else\n        switch backdrop to (backdrop1 v)\n        go to x: (-225) y: (-95)\n        set [xv v] to [0]\n        set [yv v] to [0]\n    end\nend\n\n\n\n@Sprite1\n\nwhen flag clicked\ngo to x: (0) y: (0)\nset [ghost v] effect to (0)\nshow\nwait (1.5) seconds\nrepeat (10)\n    change [ghost v] effect by (10)\nend\nhide\n\n@Sprite2\n\nwhen flag clicked\nhide\nwait (1.5) seconds\ngo to x: (-130) y: (30)\nset [ghost v] effect to (0)\nshow\nswitch costume to (costume1 v)\nforever\n    if <<touching (mouse-pointer v)?> and <mouse down?>> then\n        repeat (10)\n            change [ghost v] effect by (10)\n        end\n        hide\n        set [hardness v] to [Normal]\n        broadcast (START v)\n    else\n    end\nend\n\nwhen I receive [start v]\nrepeat (10)\n    change [ghost v] effect by (10)\nend\nhide\n\n@Sprite3\n\nwhen flag clicked\nhide\nwait (1.5) seconds\ngo to x: (130) y: (30)\nset [ghost v] effect to (0)\nshow\nswitch costume to (costume1 v)\nforever\n    if <<touching (mouse-pointer v)?> and <mouse down?>> then\n        repeat (10)\n            change [ghost v] effect by (10)\n        end\n        hide\n        set [hardness v] to [Hard]\n        broadcast (START v)\n    else\n    end\nend\n\nwhen I receive [start v]\nrepeat (10)\n    change [ghost v] effect by (10)\nend\nhide\n\n