Magenta - A Platformer (For SDS Monochromatic)

Instructions: In the world of Magenta, everything is a shade of that color. Sometimes, magenta will help you. Sometimes, eh... not.\n\nThe Rules:\nUse the arrow keys to move\nTouch the light magenta ball to continue\nDon't touch dark magenta, it teleports you back to the start of the level

@Stage\n\nwhen flag clicked\nforever\n    switch backdrop to (Level)\nend\n\nwhen flag clicked\nset [level v] to [0]\nrepeat until <(Level) > [10]>\n    change [level v] by (1)\n    broadcast (Laad v) and wait\n    broadcast (GO!!! v) and wait\nend\nbroadcast (Game Clear v)\n\nwhen flag clicked\nforever\n    play sound [The Show Must Be Go v] until done\nend\n\n@Doeblok\n\nwhen I receive [laad v]\nshow\nset size to (35) %\nset [ghost v] effect to (100)\ngo to x: (item (Level) of [spawn x v]) y: (item (Level) of [spawn y v])\nset [valsnelheid v] to [0]\n\ndefine sprongbesturing\nif <key (up arrow v) pressed?> then\n    change y by (-1)\n    if <touching (platform v)?> then\n        set [valsnelheid v] to (vertreksnelheid)\n    end\n    change y by (1)\nend\n\ndefine uitvoeren besturing\nif <key (right arrow v) pressed?> then\n    point in direction (90)\n    broadcast (rechts v)\n    change x by (uitvoersnelheid)\n    if <touching (platform v)?> then\n        change x by ((0) - (uitvoersnelheid))\n    end\nend\nif <key (left arrow v) pressed?> then\n    point in direction (-90)\n    broadcast (links v)\n    change x by ((0) - (uitvoersnelheid))\n    if <touching (platform v)?> then\n        change x by (uitvoersnelheid)\n    end\nend\n\ndefine nabootsen zwaartekracht\nchange y by (valsnelheid)\nif <touching (platform v)?> then\n    if <(valsnelheid) < [0]> then\n        set [omdraaistap v] to [1]\n    else\n        set [omdraaistap v] to [-1]\n    end\n    repeat until <not <touching (platform v)?>>\n        change y by (omdraaistap)\n    end\n    set [valsnelheid v] to [0]\nelse\n    change [valsnelheid v] by (zwaartekracht)\nend\n\nwhen I receive [go!!! v]\nset [vertreksnelheid v] to [12]\nset [uitvoersnelheid v] to [5]\nset [zwaartekracht v] to [-1]\nforever\n    hit Dark Magenta?\n    nabootsen zwaartekracht\n    uitvoeren besturing\n    sprongbesturing\nend\n\nwhen I receive [finish! v]\nstop [other scripts in sprite v]\n\nwhen [r v] key pressed\nchange y by (-1)\nif <touching (platform v)?> then\n    go to x: (item (Level) of [spawn x v]) y: (item (Level) of [spawn y v])\nend\nchange y by (1)\n\nwhen I receive [game clear v]\nhide\n\nwhen flag clicked\nshow\n\ndefine hit Dark Magenta?\nif <touching (dark magenta v)?> then\n    go to x: (item (Level) of [spawn x v]) y: (item (Level) of [spawn y v])\nend\n\n@Sprite1\n\nwhen flag clicked\nforever\n    set size to (35) %\n    go to [front v] layer\n    go to (doeblok v)\n    point in direction ([direction v] of [doeblok v])\nend\n\nwhen I receive [game clear v]\nhide\n\nwhen flag clicked\nshow\n\n@Platform\n\nwhen I receive [game clear v]\nhide\n\nwhen flag clicked\nshow\n\nwhen flag clicked\nforever\n    switch costume to (Level)\n    go to x: (0) y: (0)\n    go to [back v] layer\nend\n\n@Dark Magenta\n\nwhen I receive [game clear v]\nhide\n\nwhen flag clicked\nshow\n\nwhen flag clicked\nforever\n    switch costume to (Level)\n    go to x: (0) y: (0)\n    go to [back v] layer\nend\n\n@Sprite2\n\nwhen I receive [go!!! v]\ngo to x: (item (Level) of [goal x v]) y: (item (Level) of [goal y v])\nwait until <touching (doeblok v)?>\nbroadcast (Finish! v)\n\nwhen I receive [game clear v]\nhide\n\nwhen flag clicked\nshow\n\n@Sprite3\n\nwhen flag clicked\nhide\nforever\n    set [timeswitch v] to ((timer) + (0.1))\nend\n\nwhen [timer v] > (TimeSwitch)\ngo to x: (0) y: (0)\ngo to [front v] layer\nshow\n\n