Glowing | A Platformer

Instructions: My first game is finally here!\n\nSubscribe to Max The Coder!

@Stage\n\nwhen flag clicked\nswitch backdrop to (backdrop1 v)\n\nwhen flag clicked\nforever\n    play sound [ParagonX9 - Chaoz Fantasy v] until done\nend\n\n@P.L.A.Y.E.R\n\nwhen [space v] key pressed\nswitch costume to (red v)\nforever\n    wait (0.5) seconds\n    change [color v] effect by (25)\nend\n\nwhen flag clicked\nset [y-velocity v] to [0]\nset [x-velocity v] to [0]\nforever\n    Platform [11.5] [-2] [0.7] [3]\nend\n\nwhen [r v] key pressed\ngo to x: (-200) y: (-131)\n\nwhen I start as a clone\nrepeat (15)\n    change size by (-1)\n    change [ghost v] effect by (8)\nend\ndelete this clone\n\nwhen flag clicked\nforever\n    if <touching (d a n g e r v)?> then\n        go to x: (-200) y: (-131)\n    end\nend\n\nwhen flag clicked\nforever\n    wait (0.005) seconds\n    create clone of (_myself_ v)\nend\n\nwhen flag clicked\ngo to x: (-200) y: (-131)\nswitch costume to (player v)\nshow\n\nwhen I receive [fineshed v]\nset [x-velocity v] to [0]\nset [y-velocity v] to [0]\n\nwhen flag clicked\nforever\n    if <touching (goal v)?> then\n        go to x: (-200) y: (-131)\n        broadcast (Fineshed v)\n    end\nend\n\ndefine Platform (jump height) (gravity) (friction) (running speed)\nif <<key (right arrow v) pressed?> or <key (d v) pressed?>> then\n    point in direction (90)\n    change [x-velocity v] by (running speed)\nend\nif <<key (left arrow v) pressed?> or <key (a v) pressed?>> then\n    point in direction (90)\n    change [x-velocity v] by ((running speed) * (-1))\nend\nset [x-velocity v] to ((X-velocity) * (friction))\nchange x by (X-velocity)\nif <touching (ground v)?> then\n    set [sprite2: slope v] to [0]\n    repeat until <<(Sprite2: Slope) = [8]> or <not <touching (ground v)?>>>\n        change [sprite2: slope v] by (1)\n        change y by (1)\n    end\nend\nif <touching (ground v)?> then\n    change y by ((Sprite2: Slope) * (-1))\n    repeat ([ceiling v] of ([abs v] of (X-velocity) ) )\n        if <touching (ground v)?> then\n            change x by ((([abs v] of (X-velocity) ) / (X-velocity)) * (-1))\n        end\n    end\n    set [x-velocity v] to [0]\nend\nchange y by (Y-velocity)\nif <touching (ground v)?> then\n    repeat ([ceiling v] of ([abs v] of (Y-velocity) ) )\n        if <touching (ground v)?> then\n            change y by ((([abs v] of (Y-velocity) ) / (Y-velocity)) * (-1))\n        end\n    end\n    if <<(([abs v] of (Y-velocity) ) / (Y-velocity)) = [-1]> and <<key (up arrow v) pressed?> or <key (w v) pressed?>>> then\n        set [y-velocity v] to (jump height)\n    else\n        set [y-velocity v] to [0]\n    end\nelse\n    if <touching (tranpoline v)?> then\n        set [y-velocity v] to [20]\n    end\n    change [y-velocity v] by (-1)\nend\n\n@Ground\n\nwhen flag clicked\nshow\n\nwhen flag clicked\nshow\nswitch costume to (costume1 v)\n\nwhen I receive [fineshed v]\nnext costume\n\nwhen flag clicked\nforever\n    if <(costume [number v]) = [21]> then\n        broadcast (End v)\n    end\nend\n\n@Neon Light\n\nwhen I receive [fineshed v]\nnext costume\n\nwhen flag clicked\nshow\nswitch costume to (level 1 v)\n\n@Tranpoline\n\nwhen I receive [fineshed v]\nnext costume\n\nwhen flag clicked\nswitch costume to (costume1 v)\n\nwhen flag clicked\nshow\n\n@D A N G E R\n\nwhen flag clicked\nshow\n\nwhen flag clicked\nswitch costume to (costume1 v)\n\nwhen I receive [fineshed v]\nnext costume\n\n@Goal\n\nwhen flag clicked\nshow\n\nwhen flag clicked\nforever\n    if <touching (player v)?> then\n        broadcast (Fineshed v)\n        wait (0.5) seconds\n    end\nend\n\nwhen I receive [end v]\nforever\n    hide\nend\n\n@Player Light\n\n@Skip\n\nwhen flag clicked\ngo to x: (-198) y: (152)\nshow\n\nwhen this sprite clicked\nbroadcast (Fineshed v)\n\n@Thanks For Playing\n\nwhen flag clicked\nhide\n\nwhen I receive [end v]\nshow\n\n@Text\n\nwhen flag clicked\nshow\nswitch costume to (level 1 v)\n\nwhen I receive [fineshed v]\nnext costume\n\n@Thumbnail\n\nwhen flag clicked\nforever\n    show\n    change [ghost v] effect by (100)\n    go to [front v] layer\nend\n\n