Superfires platformer: Part 2

Instructions: please heart star and follow!\nTHIS IS NOT A COPY I CHANGED BACKDROP PLAYER AND PORTAL TO NEXT LEVEL

@Stage\n\nwhen flag clicked\nforever\n    play sound [Dance Chill Out v] until done\nend\n\n@Player\n\nwhen flag clicked\nswitch costume to (right v)\nhide\nbroadcast (Green Flag v) and wait\n\nwhen I receive [green flag v]\nhide\ngo to [front v] layer\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)\n    end\n    if <(Exit) = [w i n]> then\n        Game- WIN HOORAY\n    else\n        Game- Death :(\n    end\nend\n\ndefine Game On\nset [x v] to [0]\nset [y v] to [0]\nset [sy v] to [0]\nset [sx v] to [0]\nset [in air v] to [0]\nset [exit v] to []\nset size to (100) %\nset [ghost v] effect to (0)\npoint in direction (90)\nshow\n\ndefine Tick\nif <<key (left arrow v) pressed?> or <<key (a v) pressed?> or <<mouse down?> and <(mouse x) < (x position)>>>> then\n    switch costume to (left2 v)\n    change [sx v] by (-2)\nend\nif <<key (right arrow v) pressed?> or <<key (d v) pressed?> or <<mouse down?> and <(mouse x) > (x position)>>>> then\n    switch costume to (right2 v)\n    change [sx v] by (2)\nend\nset [sx v] to ((sx) * (0.8))\nif <([abs v] of (sx) ) > [0.9]> then\n    Change Player X By (round (sx))\nend\nif <<key (up arrow v) pressed?> or <<key (w v) pressed?> or <<mouse down?> and <(y position) < (mouse y)>>>> then\n    if <(In Air) < [5]> then\n        set [sy v] to [21]\n        switch costume to (up2 v)\n    end\n    if <<key (down arrow v) pressed?> or <<key (s v) pressed?> or <<mouse down?> and <(y position) < (mouse y)>>>> then\n        if <(In Air) < [5]> then\n            change y by (-1)\n            switch costume to (down v)\n        end\n    end\n    change [sy v] by (-2)\n    Change Player Y By (sy)\n    set [scroll x v] to (X)\n    Position\n    if <(Y) < [-180]> then\n        set [exit v] to [dieeee]\n    end\nend\nchange [sy v] by (-2)\nChange Player Y By (sy)\nset [scroll x v] to (X)\nPosition\nif <(Y) < [-180]> then\n    set [exit v] to [dieeee]\nend\n\ndefine Change Player Y By (sy)\nchange [y v] by (sy)\nchange [in air v] by (1)\nPosition\nDeath\nrepeat until <not <touching (plataforma 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]\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\nDeath\nif <touching (plataforma v)?> then\n    repeat (8)\n        change [y v] by (1)\n        Position\n        if <not <touching (plataforma v)?>> then\n            stop [this script v]\n        end\n    end\n    change [y v] by (-12)\n    if <<key (up arrow v) pressed?> or <<key (w v) pressed?> or <<mouse down?> and <(y position) < (mouse y)>>>> then\n        if <(sx) > [0]> then\n            set [sx v] to [-16]\n        else\n            set [sx v] to [16]\n        end\n        set [in air v] to [0]\n    else\n        set [sx v] to [0]\n    end\n    repeat until <not <touching (plataforma 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    end\nend\n\ndefine Game- Death :(\nset [exit v] to []\nrepeat (5)\n    hide\n    wait (0.09) seconds\n    show\nend\n\ndefine Game- WIN HOORAY\nrepeat (50)\n    go to (exit v)\n    move ((distance to [exit v]) / (2)) steps\n    turn right (50) degrees\n    change size by (-1)\n    change [ghost v] effect by (2)\nend\nhide\nchange [level v] by (1)\nwait (1) seconds\n\nwhen I receive [start project v]\nshow\nbroadcast (GO v)\n\nwhen I receive [go v]\n\nwhen flag clicked\nforever\n    if <<touching color (#fff100)?> or <touching color (#e8dd00)?>> then\n        set [y v] to [15]\n    end\nend\n\nwhen flag clicked\nbroadcast (Play Game v) and wait\nshow\n\nwhen flag clicked\ngo to x: (☁ 0) y: (25)\n\nwhen I receive [miauuuuuuuu v]\nswitch costume to (left v)\n\nwhen flag clicked\nforever\n    change [color v] effect by (25)\n    wait (0.1) seconds\n    if <touching (plataforma v)?> then\n        switch backdrop to (backdrop v)\n        broadcast (GO v)\n    end\nend\n\nwhen flag clicked\nforever\n    \nend\n\ndefine Death\n\n@Exit\n\nwhen I receive [tick v]\nPosition ((X) - (SCROLL X)) ((Y) - (SCROLL Y))\nif <touching (player v)?> then\n    set [exit v] to [w i n]\nend\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 (portal v)\n    Clone at x: [1331] y: [63]\nelse\n    Clone at x: [1962] y: [69]\nend\nif <(LEVEL) = [3]> then\n    Clone at x: [2139] y: [103]\nend\nif <(LEVEL) = [5]> then\n    Clone at x: [2236] y: [60]\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 [reset v]\ndelete this clone\n\ndefine Clone at x: (x) y: (y)\nset [x v] to (x)\nset [y v] to (y)\n\nwhen flag clicked\nhide\n\n@assets\n\n@plataforma\n\nwhen I receive [green flag v]\nhide\n\nwhen I receive [tick v]\nPosition ((X) - (SCROLL X)) ((Y) - (SCROLL Y))\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 (level 1 1 v)\n    Clone at x: [450] y: [0]\n    Clone at x: [450] y: [0]\nelse\n    if <(LEVEL) = [2]> then\n        switch costume to (level 2 1 v)\n        Clone at x: [500] y: [0]\n        Clone at x: [550] y: [0]\n        Clone at x: [634] y: [0]\n    else\n        if <(LEVEL) = [3]> then\n            switch costume to (level 3 1 v)\n            Clone at x: [500] y: [0]\n            Clone at x: [550] y: [0]\n            Clone at x: [634] y: [0]\n        else\n            if <(LEVEL) = [4]> then\n                switch costume to (level 4 1 v)\n                Clone at x: [500] y: [0]\n                Clone at x: [550] y: [0]\n                Clone at x: [634] y: [0]\n            else\n                if <(LEVEL) = [5]> then\n                    switch costume to (level 5 1 v)\n                    Clone at x: [600] y: [0]\n                    Clone at x: [634] y: [0]\n                    Clone at x: [638] y: [0]\n                else\n                    if <(LEVEL) = [6]> then\n                        switch costume to (game end win! v)\n                    end\n                end\n            end\n        end\n    end\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 [reset v]\ndelete this clone\n\ndefine Clone at x: (x) y: (y)\ncreate clone of (_myself_ v)\nchange [x v] by (x)\nchange [y v] by (y)\nnext costume\n\ncreate clone of (_myself_ v)\nchange [x v] by (450)\nnext costume\ncreate clone of (_myself_ v)\nchange [x v] by (450)\nnext costume\n\nwhen I receive [miauuuuuuuu v]\nhide\n\nwhen flag clicked\nset [crowns v] to [0]\n\n@=)\n\ndefine Movement (movement v.1)\nforever\n    if <(movement v.1) = [1]> then\n        start sound [Low Whoosh v]\n        show\n        go to [front v] layer\n        glide (1) secs to x: (106) y: (150)\n        repeat (2)\n            point in direction (90)\n            wait (0.1) seconds\n            turn right (4) degrees\n            wait (0.1) seconds\n            turn left (6) degrees\n            wait (0.1) seconds\n            turn right (8) degrees\n            wait (0.1) seconds\n        end\n        set [ghost v] effect to (999999)\n        wait (1) seconds\n        clear graphic effects\n        go to [back v] layer\n        hide\n    end\n    if <(movement v.1) = [2]> then\n        go to x: (106) y: (206)\n        point in direction (90)\n        go to [front v] layer\n        show\n        start sound [Low Whoosh v]\n        glide (1) secs to x: (106) y: (150)\n        repeat (2)\n            point in direction (90)\n            wait (0.1) seconds\n            turn right (4) degrees\n            wait (0.1) seconds\n            turn left (6) degrees\n            wait (0.1) seconds\n            turn right (8) degrees\n            wait (0.1) seconds\n        end\n        point in direction (90)\n        set [ghost v] effect to (999)\n        wait (1) seconds\n        go to [back v] layer\n        hide\n    end\n    wait (15) seconds\nend\n\nwhen flag clicked\nclear graphic effects\ngo to x: (106) y: (206)\npoint in direction (90)\nhide\nwait (pick random (15) to (25)) seconds\nMovement [1]\nwait (pick random (15) to (25)) seconds\nMovement [2]\n\n@Sprite1\n\nwhen this sprite clicked\nask [What's the code?] and wait\nif <<(answer) = [griffpatch]> or <<(answer) = [SuperFire87654321]> or <<(answer) = [Reborn]> or <<(answer) = [kamehameha]> or <(answer) = [Scratch]>>>>> then\n    change [crowns v] by (100)\nend\n\nwhen this sprite clicked\nask [Answer code.] and wait\nif <(answer) = [turquoisetreats]> then\n    broadcast (donut v)\nend\n\n@Sprite2\n\nwhen flag clicked\nhide\n\n@Player2\n\nwhen flag clicked\nhide\n\n@Donut\n\nwhen flag clicked\nhide\n\nwhen I receive [donut v]\nshow\nplay sound [Chomp v] until done\n\n