Scrolling Platformer

Instructions: Instructions are in-game \nIf anything glitches press r\nAll levels are possible (except level 6 its the end)\nIf you enjoyed then please leave a love, Fave and maybe a follow!\nMaking part two!\n

@Stage\n\n@player\n\nwhen flag clicked\nbroadcast (Green Flag Clicked v)\nbroadcast (Play Game v) and wait\n\nwhen I receive [play game v]\nset [level v] to [1]\nforever\n    broadcast (Reset v) and wait\n    broadcast (Setup v) and wait\n    Game on\n    repeat until <(EXIT) > []>\n        Tick\n        set [scroll x v] to (x)\n        Position\n        broadcast (Tick v) and wait\n        go to [front v] layer\n        if <([costume name v] of [door v]) = [Open]> then\n            if <touching (door v)?> then\n                broadcast (Press space v)\n                if <key (space v) pressed?> then\n                    switch costume to (player back v)\n                    broadcast (Press space hide v)\n                    repeat (10)\n                        change [ghost v] effect by (10)\n                    end\n                    change [level v] by (1)\n                    set [exit v] to [next level]\n                end\n            else\n                broadcast (Press space hide v)\n            end\n        end\n    end\n    Game - die\nend\n\ndefine Game on\nset [exit v] to []\nswitch costume to (player v)\nif <(LEVEL) = [1]> then\n    set [x v] to [0]\n    set [y v] to [0]\nend\nif <(LEVEL) = [2]> then\n    set [x v] to [130]\n    set [y v] to [0]\nend\nif <(LEVEL) = [3]> then\n    set [x v] to [-130]\n    set [y v] to [-100]\nend\nif <(LEVEL) = [4]> then\n    set [x v] to [0]\n    set [y v] to [130]\nend\nif <(LEVEL) = [5]> then\n    set [x v] to [-150]\n    set [y v] to [-75]\nend\nif <(LEVEL) = [6]> then\n    set [x v] to [-15]\n    set [y v] to [0]\nend\nPosition\nset [sy v] to [0]\nset [in air v] to [0]\nshow\nclear graphic effects\n\ndefine Tick\nif <key (left arrow v) pressed?> then\n    change player x by [-8]\nend\nif <key (right arrow v) pressed?> then\n    change player x by [8]\nend\nif <(in air) < [4]> then\n    if <key (up arrow v) pressed?> then\n        set [sy v] to [16]\n    end\nend\nchange [sy v] by (-2)\nchange player y by (sy)\n\ndefine change player y by (sy)\nchange [y v] by (sy)\nchange [in air v] by (1)\nPosition\nrepeat until <not <touching (platforms v)?>>\n    if <(sy) > [0]> then\n        change [y v] by (-1)\n    else\n        change [y v] by (1)\n        set [in air v] to [0]\n    end\n    Position\n    set [sy v] to [0]\n    Test - die\nend\nif <[-179] > (y position)> then\n    set [exit v] to [die]\nend\n\ndefine Position\ngo to x: ((x) - (SCROLL X)) y: ((y) - (SCROLL Y))\n\ndefine change player x by (sx)\nchange [x v] by (sx)\nPosition\nrepeat until <not <touching (platforms v)?>>\n    if <(sx) > [0]> then\n        change [x v] by (-1)\n    else\n        change [x v] by (1)\n    end\n    Position\n    Test - die\nend\nif <[-179] > (y position)> then\n    set [exit v] to [die]\nend\n\ndefine Test - die\nif <touching color (#ff3333)?> then\n    set [exit v] to [die]\nend\nif <[-179] > (y position)> then\n    set [exit v] to [die]\nend\n\ndefine Game - die\nrepeat (5)\n    hide\n    wait (0.1) seconds\n    show\n    wait (0.1) seconds\nend\nhide\nwait (0.5) seconds\n\nwhen I receive [play game v]\nstop all sounds\nforever\n    play sound [Wake Me Up - Avicii \(violincellobass cover\) - Simply Three.mp3 v] until done\n    play sound [Counting Stars - OneRepublic \(violincellobass cover\) Simply Three.mp3 v] until done\n    play sound [Alan Walker - Faded \(Violin Cover by Robert Mendoza\) \[OFFICIAL VIDEO\].mp3 v] until done\n    play sound [Titanium - Violin  Piano Cover - David Guetta feat. Sia - Daniel Jang.mp3 v] until done\nend\n\nwhen [r v] key pressed\nset [exit v] to [die]\n\nwhen flag clicked\nwait until <(LEVEL) = [6]>\nadd (username) to [shoutouts v]\n\n@thumbnail\n\nwhen I receive [green flag clicked v]\nhide\n\n@text\n\nwhen I receive [setup v]\nset [x v] to [0]\nset [y v] to [0]\nif <(LEVEL) = [1]> then\n    switch costume to (level 1 1 v)\n    create clone of (_myself_ v)\n    change [x v] by (480)\n    next costume\n    create clone of (_myself_ v)\n    change [x v] by (480)\n    next costume\nend\nif <(LEVEL) = [2]> then\n    switch costume to (level 2 1 v)\nend\nif <(LEVEL) = [3]> then\n    switch costume to (level 3 1 v)\nend\nif <(LEVEL) = [4]> then\n    switch costume to (level 4 1 v)\nend\nif <(LEVEL) = [5]> then\n    switch costume to (level 5 1 v)\nend\nif <(LEVEL) = [6]> then\n    switch costume to (level 6 1 v)\nend\n\nwhen I receive [green flag clicked v]\nshow\n\nwhen I receive [tick v]\nPosition ((x) - (SCROLL X)) ((y) - (SCROLL Y))\n\ndefine Position (x) (y)\ngo to x: (x) y: (y)\nif <<(x position) = (x)> and <(y position) = (y)>> then\n    show\nelse\n    hide\nend\n\nwhen I receive [reset v]\ndelete this clone\n\n@door\n\nwhen I receive [green flag clicked v]\nshow\n\nwhen I receive [setup v]\nif <(LEVEL) = [1]> then\n    set [x v] to [1179.25]\n    set [y v] to [8]\n    set [coins in all v] to [0]\nend\nif <(LEVEL) = [2]> then\n    set [x v] to [-130]\n    set [y v] to [-113]\n    set [coins in all v] to [6]\nend\nif <(LEVEL) = [3]> then\n    set [x v] to [-130]\n    set [y v] to [-114]\n    set [coins in all v] to [7]\nend\nif <(LEVEL) = [4]> then\n    set [x v] to [91]\n    set [y v] to [107]\n    set [coins in all v] to [2]\nend\nif <(LEVEL) = [5]> then\n    set [x v] to [800]\n    set [y v] to [-53]\n    set [coins in all v] to [0]\nend\nif <(LEVEL) = [6]> then\n    set [x v] to [1400]\n    set [y v] to [-10]\n    set [coins in all v] to [1]\nend\nset [coins collected v] to [0]\n\nwhen I receive [tick v]\nPosition ((x) - (SCROLL X)) ((y) - (SCROLL Y))\nif <(COINS COLLECTED) = (COINS IN ALL)> then\n    switch costume to (open v)\nelse\n    switch costume to (closed v)\nend\n\ndefine Position (x) (y)\ngo to x: (x) y: (y)\nif <<(x position) = (x)> and <(y position) = (y)>> then\n    show\nelse\n    hide\nend\n\nswitch costume to (open v)\n\n@Coins\n\nwhen I receive [setup v]\nhide\nset [x v] to [0]\nset [y v] to [0]\nif <(LEVEL) = [1]> then\n    switch costume to (spin1 v)\n    set [x v] to [-9999]\nend\nif <(LEVEL) = [2]> then\n    switch costume to (spin1 v)\n    Clone at x: [18] y: [-70]\n    Clone at x: [68] y: [-70]\n    Clone at x: [-70] y: [0]\n    Clone at x: [-120] y: [0]\n    Clone at x: [20] y: [69]\n    Clone at x: [70] y: [69]\nend\nif <(LEVEL) = [3]> then\n    switch costume to (spin1 v)\n    Clone at x: [0] y: [-4]\n    Clone at x: [50] y: [-4]\n    Clone at x: [100] y: [-4]\n    Clone at x: [1167] y: [50]\n    Clone at x: [1119] y: [50]\n    Clone at x: [1072] y: [50]\n    Clone at x: [-294] y: [-42]\nend\nif <(LEVEL) = [4]> then\n    switch costume to (spin1 v)\n    Clone at x: [0] y: [-120]\n    Clone at x: [-190] y: [130]\nend\nif <(LEVEL) = [6]> then\n    switch costume to (spin1 v)\n    Clone at x: [978] y: [70]\nend\nset [x v] to [-9999]\n\nwhen I receive [tick v]\nPosition x: ((x) - (SCROLL X)) y: ((y) - (SCROLL Y))\n\ndefine Position x: (x) y: (y)\ngo to x: (x) y: (y)\nif <<(x position) = (x)> and <(y position) = (y)>> then\n    show\nelse\n    hide\nend\n\ndefine Clone at x: (x) y: (y)\nset [x v] to (x)\nset [y v] to (y)\ncreate clone of (_myself_ v)\n\nwhen I receive [reset v]\nset [coins collected v] to [0]\ndelete this clone\n\nwhen I start as a clone\nforever\n    next costume\n    wait (0.1) seconds\nend\n\nwhen I start as a clone\nwait until <touching (player v)?>\nchange [coins collected v] by (1)\nstart sound [Coin v]\ndelete this clone\n\nwhen I receive [setup v]\nhide\n\n@press space\n\nwhen I receive [tick v]\ngo to (player v)\n\nwhen I receive [press space v]\ngo to [front v] layer\nshow\n\nwhen I receive [press space hide v]\nhide\n\n@platforms\n\nwhen I receive [green flag clicked v]\nshow\n\nwhen I receive [tick v]\nPosition ((x) - (SCROLL X)) ((y) - (SCROLL Y))\n\nwhen I receive [setup v]\nRender\n\ndefine Position (x) (y)\ngo to x: (x) y: (y)\nif <<(x position) = (x)> and <(y position) = (y)>> then\n    show\nelse\n    hide\nend\n\nwhen I receive [reset v]\ndelete this clone\n\ndefine Render\nset [x v] to [0]\nset [y v] to [0]\nif <(LEVEL) = [1]> then\n    switch costume to (level 1 1 v)\n    create clone of (_myself_ v)\n    change [x v] by (480)\n    next costume\n    create clone of (_myself_ v)\n    change [x v] by (480)\n    next costume\nend\nif <(LEVEL) = [2]> then\n    switch costume to (level 2 1 v)\n    set [y v] to [-57]\nend\nif <(LEVEL) = [3]> then\n    switch costume to (level 3 1 v)\n    set [y v] to [-95]\n    create clone of (_myself_ v)\n    change [x v] by (480)\n    next costume\n    set [y v] to [-118.5000001]\n    create clone of (_myself_ v)\n    change [x v] by (480)\n    set [y v] to [-30]\n    next costume\nend\nif <(LEVEL) = [4]> then\n    switch costume to (level 4 1 v)\nend\nif <(LEVEL) = [5]> then\n    switch costume to (level 5 1 v)\n    create clone of (_myself_ v)\n    change [x v] by (480)\n    next costume\nend\nif <(LEVEL) = [6]> then\n    switch costume to (level 6 1 v)\n    create clone of (_myself_ v)\n    change [x v] by (480)\n    next costume\n    create clone of (_myself_ v)\n    change [x v] by (480)\n    next costume\nend\n\n@fake platform\n\nwhen I receive [tick v]\nif <(LEVEL) = [5]> then\n    Position ((x) - (SCROLL X)) ((y) - (SCROLL Y))\nelse\n    hide\nend\n\nPosition ((x) - (SCROLL X)) ((y) - (SCROLL Y))\n\nwhen I receive [green flag clicked v]\n\nwhen I receive [reset v]\ndelete this clone\n\nwhen I receive [setup v]\nRender\n\ndefine Render\nif <(LEVEL) = [5]> then\n    set [x v] to [0]\n    set [y v] to [0]\n    switch costume to (level 5 1 v)\n    create clone of (_myself_ v)\n    next costume\n    change [x v] by (480)\n    show\nelse\n    hide\nend\n\ndefine Position (x) (y)\ngo to x: (x) y: (y)\nif <<(x position) = (x)> and <(y position) = (y)>> then\n    show\nelse\n    hide\nend\n\nwhen I receive [tick v]\ngo to [front v] layer\ngo [backward v] (1) layers\n\n