Sunset - a scrolling platformer

Instructions: =========Sunset - a scrolling platformer===========\n\n3-D MAZE!!!! https://scratch.mit.edu/projects/425172301/\n\nUse arrow keys to move!\neat the food and reach the portal.\nDon't touch the red\nmy newest platformer!!!!!\nhttps://scratch.mit.edu/projects/421208804/\n30th trending games????\n@ griffpatch\n\n\n\n\n\n\n\n\n\nThere are infinity 

@Stage\n\nwhen flag clicked\nforever\n    play sound (pick random (1) to (2)) until done\n    wait (1) seconds\nend\n\nwhen [space v] key pressed\n\n@you\n\nwhen flag clicked\nbroadcast (on v) and wait\nbroadcast (start game v) and wait\n\nwhen I receive [on v]\nhide\ngo to [front v] layer\n\nwhen I receive [on v]\nset [level v] to [1]\nforever\n    broadcast (ded v) and wait\n    broadcast (start game v) and wait\n    game started???\n    repeat until <(EXIT) > []>\n        tock\n        broadcast (toc k v) and wait\n    end\n    if <(EXIT) = [win]> then\n        win game next level\n    else\n        game-ded\n    end\nend\n\ndefine game started???\nset [platformer x v] to [0]\nset [platform y v] to [0]\nset [player x v] to [0]\nset [player y v] to [0]\nset [xs v] to [0]\nset [sy v] to [0]\nset [in air v] to [0]\nset [exit v] to []\npoint in direction (90)\nset [ghost v] effect to (0)\nset size to (100) %\nshow\n\ndefine tock\nif <key (left arrow v) pressed?> then\n    change [xs v] by (-2)\nend\nif <key (right arrow v) pressed?> then\n    change [xs v] by (2)\nend\nset [xs v] to ((xs) * (0.8))\nif <([abs v] of (xs) ) > [0.9]> then\n    change X by 1800354 (round (xs))\nend\nif <key (up arrow v) pressed?> then\n    if <(in air) < [4]> then\n        set [sy v] to [16]\n    end\nend\nchange [sy v] by (-2)\nchange  y by (sy)\ntest ded\nset [platformer x v] to (player X)\nif <(platformer X) < [0]> then\n    set [platformer x v] to [0]\nend\nchange [platform y v] by (round (((player Y) - (platform Y)) / (10)))\nif <(platform Y) < [0]> then\n    set [platform y v] to [0]\nend\nposition\nif <(player Y) < [-180]> then\n    game-ded\nend\n\ndefine change  y by (xy)\nchange [player y v] by (xy)\nchange [in air v] by (1)\nposition\nyellow screww\nrepeat until <not <touching (sprite1 v)?>>\n    if <(xy) > [0]> then\n        change [player y v] by (-1)\n    else\n        change [player y v] by (1)\n        set [in air v] to [0]\n    end\n    position\n    set [sy v] to [0]\nend\n\ndefine position\ngo to x: ((player X) - (platformer X)) y: ((player Y) - (platform Y))\n\ndefine change X by 1800354 (180053xs)\nchange [player x v] by (180053xs)\nposition\nyellow screww\nif <touching (sprite1 v)?> then\n    repeat (8)\n        change [player y v] by (1)\n        position\n        if <not <touching (sprite1 v)?>> then\n            stop [this script v]\n        end\n    end\n    change [player y v] by (-8)\n    repeat until <not <touching (sprite1 v)?>>\n        if <(180053xs) > [0]> then\n            change [player x v] by (-1)\n        else\n            change [player x v] by (1)\n            set [in air v] to [0]\n        end\n        position\n    end\nend\n\ndefine game-ded\nset [exit v] to [nothing]\nbroadcast (os v) and wait\nrepeat (50)\n    create clone of (_myself_ v)\n    change [ghost v] effect by (2)\nend\nwait until <(clone) = [0]>\n\ndefine test ded\nif <touching (danger v)?> then\n    set [exit v] to [ded again]\nend\n\ndefine win game next level\nrepeat (50)\n    point towards (exit v)\n    turn right (60) degrees\n    move ((distance to [exit v]) / (2)) steps\n    change size by (-1)\n    change [ghost v] effect by (2)\nend\nhide\n\nwhen flag clicked\nswitch costume to (costume1 v)\n\ndefine yellow screww\n\nwhen I receive [start game v]\nswitch costume to (costume1 v)\n\nwhen flag clicked\ngo to [back v] layer\n\nwhen I start as a clone\nswitch costume to (costume3 v)\nchange [clone v] by (1)\nglide (4) secs to (random position v)\nrepeat until <(y position) = [-180]>\n    change y by (-7)\n    change [ghost v] effect by (1)\nend\nchange [clone v] by (-1)\ndelete this clone\n\nwhen flag clicked\nset [clone v] to [0]\n\n@Sprite1\n\nwhen I receive [on v]\nhide\n\nwhen I receive [toc k v]\nposition ((plat Y) - (platformer X)) ((plat X) - (platform Y))\n\nwhen I receive [start game v]\nhide\nset [plat x v] to [0]\nset [plat y v] to [0]\nif <(level) = [1]> then\n    switch costume to (costume5 v)\n    clone at x [300] y [0]\n    clone at x [300] y [0]\n    clone at x [300] y [0]\n    clone at x [300] y [0]\n    clone at x [300] y [0]\n    clone at x [300] y [0]\n    clone at x [300] y [0]\n    clone at x [300] y [0]\n    clone at x [300] y [0]\n    clone at x [300] y [0]\n    clone at x [300] y [0]\n    clone at x [300] y [0]\n    clone at x [300] y [0]\n    clone at x [300] y [0]\n    clone at x [300] y [0]\n    clone at x [300] y [0]\n    clone at x [300] y [0]\n    clone at x [300] y [0]\n    clone at x [300] y [0]\n    clone at x [300] y [0]\n    clone at x [300] y [0]\n    clone at x [300] y [0]\n    clone at x [300] y [0]\n    clone at x [300] y [0]\n    clone at x [300] y [0]\n    clone at x [300] y [0]\nend\n\ndefine position (x) (y)\ngo to x: (x) y: (y)\nif <<(x) = (x position)> and <(y) = (y position)>> then\n    show\nelse\n    hide\nend\n\nwhen I receive [ded v]\ndelete this clone\n\nwhen I receive [moveie v]\nchange [plat x v] by (1)\n\nwhen flag clicked\nset [plat x v] to [0]\nset [plat y v] to [0]\n\ndefine clone at x (x) y (y)\ncreate clone of (_myself_ v)\nchange [plat y v] by (x)\nchange [plat x v] by (y)\nswitch costume to (pick random (1) to (13))\n\nwhen flag clicked\nforever\n    set [win v] to (join (got) (join (/) (?)))\nend\n\nwhen flag clicked\nset [/ v] to [/]\n\nwhen I receive [start game v]\ndelete this clone\n\n@danger\n\nwhen I receive [on v]\nhide\n\nwhen I receive [toc k v]\nposition ((plat Y) - (platformer X)) ((plat X) - (platform Y))\n\nwhen I receive [start game v]\nhide\nset [plat x v] to [0]\nset [plat y v] to [0]\nif <(level) = [1]> then\n    switch costume to (costume5 v)\n    clone at x [300] y [0]\n    clone at x [300] y [0]\n    clone at x [300] y [0]\n    clone at x [300] y [0]\n    clone at x [300] y [0]\n    clone at x [300] y [0]\n    clone at x [300] y [0]\n    clone at x [300] y [0]\n    clone at x [300] y [0]\n    clone at x [300] y [0]\n    clone at x [300] y [0]\n    clone at x [300] y [0]\n    clone at x [300] y [0]\n    clone at x [300] y [0]\n    clone at x [300] y [0]\n    clone at x [300] y [0]\n    clone at x [300] y [0]\n    clone at x [300] y [0]\n    clone at x [300] y [0]\n    clone at x [300] y [0]\n    clone at x [300] y [0]\n    clone at x [300] y [0]\n    clone at x [300] y [0]\n    clone at x [300] y [0]\n    clone at x [300] y [0]\n    clone at x [300] y [0]\nend\n\ndefine position (x) (y)\ngo to x: (x) y: (y)\nif <<(x) = (x position)> and <(y) = (y position)>> then\n    show\nelse\n    hide\nend\n\nwhen I receive [ded v]\ndelete this clone\n\nwhen I receive [moveie v]\nchange [plat x v] by (1)\n\nwhen flag clicked\nset [plat x v] to [0]\nset [plat y v] to [0]\n\ndefine clone at x (x) y (y)\ncreate clone of (_myself_ v)\nchange [plat y v] by (x)\nchange [plat x v] by (y)\nswitch costume to (pick random (1) to (7))\n\ncreate clone of (_myself_ v)\nchange [plat y v] by (360)\nnext costume\ncreate clone of (_myself_ v)\nchange [plat y v] by (360)\nnext costume\n\nwhen flag clicked\ngo to [front v] layer\n\n@exit\n\nwhen I receive [on v]\nhide\n\nwhen I receive [toc k v]\nposition ((plat Y) - (platformer X)) ((plat X) - (platform Y))\nif <<(costume [number v]) = [2]> and <touching (you v)?>> then\n    set [exit v] to [win]\n    start sound [Connect v]\nend\n\nwhen I receive [start game v]\ngo to [back v] layer\nhide\nset [got v] to [0]\nset [plat x v] to [0]\nset [plat y v] to [0]\nif <(level) = [1]> then\n    switch costume to (costume1 v)\n    clone at x [8071] y [23]\nend\n\ndefine position (x) (y)\ngo to x: (x) y: (y)\nif <<(x) = (x position)> and <(y) = (y position)>> then\n    show\nelse\n    hide\nend\n\nwhen I receive [ded v]\ndelete this clone\n\nwhen flag clicked\nset [plat x v] to [0]\nset [plat y v] to [0]\n\ndefine clone at x (x) y (y)\nset [plat x v] to (y)\nset [plat y v] to (x)\n\nwhen flag clicked\nhide\n\nwhen I receive [change color v]\nswitch costume to (costume2 v)\n\n@Sprite2\n\nwhen I receive [on v]\nhide\n\nwhen I receive [toc k v]\nposition ((plat Y) - (platformer X)) ((plat X) - (platform Y))\nif <touching (you v)?> then\n    start sound [Coin v]\n    change [got v] by (1)\n    if <(got) = (?)> then\n        broadcast (change color v)\n    end\n    delete this clone\nend\n\nwhen I receive [start game v]\ngo to [front v] layer\nhide\nset [got v] to [0]\nset [plat x v] to [0]\nset [plat y v] to [0]\nif <(level) = [1]> then\n    switch costume to (pick random (1) to (3))\n    clone at x [60] y [33]\n    switch costume to (pick random (1) to (3))\n    clone at x [355] y [5]\n    switch costume to (pick random (1) to (3))\n    clone at x [720] y [23]\n    switch costume to (pick random (1) to (3))\n    clone at x [967] y [7]\n    switch costume to (pick random (1) to (3))\n    clone at x [1204] y [37]\n    switch costume to (pick random (1) to (3))\n    clone at x [1490] y [23]\n    switch costume to (pick random (1) to (3))\n    clone at x [1773] y [43]\n    switch costume to (pick random (1) to (3))\n    clone at x [1895] y [82]\n    switch costume to (pick random (1) to (3))\n    clone at x [2201] y [82]\n    switch costume to (pick random (1) to (3))\n    clone at x [2556] y [82]\n    clone at x [-500] y [0]\nend\nset [plat x v] to [0]\n\ndefine position (x) (y)\ngo to x: (x) y: (y)\nif <<(x) = (x position)> and <(y) = (y position)>> then\n    show\nelse\n    hide\nend\n\nwhen I receive [ded v]\ndelete this clone\n\nwhen flag clicked\nset [plat x v] to [0]\nset [plat y v] to [0]\n\ndefine clone at x (x) y (y)\nset [plat x v] to (y)\nset [plat y v] to (x)\ncreate clone of (_myself_ v)\n\nwhen flag clicked\nhide\n\n@Sprite3\n\nwhen flag clicked\ngo to [front v] layer\n\nwhen flag clicked\nset [ghost v] effect to (1000)\n\nwhen [right arrow v] key pressed\n\n