-Blue- A Platformer

Instructions: update 28/0/2021: changed music because of copyright stuffs\nhttps://scratch.mit.edu/projects/407549571\n\nIMPORTANT: RESET IF THERE IS VOLUME PROBLEMS\n#6th on trending!\n98% by@yellowtrees\nStoryline: this land used to be full of joy. Now you have been pulled in the cave and the only way out is to unlock the courses. Can you surpass them all and go to the Land Of Joy again?\nSpam flag for no lag\nReload to clear glitches\nGet the key to open the lock/portal so you can get to the next level\n

@Stage\n\nwhen flag clicked\nset volume to (100) %\nwait (10) seconds\ngo to [back v] layer\nforever\n    play sound [Goodbye v] until done\nend\n\nwhen I receive [win v]\nset volume to (1) %\n\n@You\n\ndefine Player Move\nif <<key (d v) pressed?> or <<key (right arrow v) pressed?> or <<mouse down?> and <[50] < (mouse x)>>>> then\n    replace item (1) of [player v] with ((item (1) of [player v]) + (1))\n    replace item (3) of [player v] with [90]\nend\nif <<key (a v) pressed?> or <<key (left arrow v) pressed?> or <<mouse down?> and <(mouse x) < [-50]>>>> then\n    replace item (1) of [player v] with ((item (1) of [player v]) - (1))\n    replace item (3) of [player v] with [-90]\nend\nreplace item (1) of [player v] with ((item (1) of [player v]) * (0.88))\nchange x by (item (1) of [player v])\nswitch costume to (item (3) of [player v])\nrepeat (10)\n    if <touching (ground v)?> then\n        change y by (1)\n    end\nend\nif <touching (ground v)?> then\n    change x by (() - (item (1) of [player v]))\n    change y by (-10)\n    if <<key (w v) pressed?> or <<key (up arrow v) pressed?> or <<mouse down?> and <[50] < (mouse y)>>>> then\n        replace item (1) of [player v] with ((6) - ((12) * <not <(item (1) of [player v]) < [0]>>))\n        replace item (2) of [player v] with [10]\n    end\nend\nchange y by (-1)\nif <<touching (ground v)?> and <<key (w v) pressed?> or <<key (up arrow v) pressed?> or <<mouse down?> and <[50] < (mouse y)>>>>> then\n    replace item (2) of [player v] with [14]\nend\nchange y by (1)\nreplace item (2) of [player v] with ((item (2) of [player v]) - (1))\nchange y by (item (2) of [player v])\nif <touching (ground v)?> then\n    change y by (() - (item (2) of [player v]))\n    replace item (2) of [player v] with [0]\nend\nreplace item (4) of [player v] with ((item (4) of [player v]) + ((x position) - ((item (4) of [player v]) - (item (6) of [player v]))))\nreplace item (5) of [player v] with ((item (5) of [player v]) + ((y position) - (((item (5) of [player v]) - (item (7) of [player v])) - (50))))\nreplace item (6) of [player v] with ((item (6) of [player v]) + (((item (4) of [player v]) - (item (6) of [player v])) / (10)))\nreplace item (7) of [player v] with ((item (7) of [player v]) + (((item (5) of [player v]) - (item (7) of [player v])) / (5)))\nset x to ((item (4) of [player v]) - (item (6) of [player v]))\nset y to (((item (5) of [player v]) - (item (7) of [player v])) - (50))\nif <(item (7) of [player v]) < [-400]> then\n    Setting\nend\n\nbroadcast (Tick v)\n\ndefine Setting\nset size to (150) %\npoint in direction (90)\ngo to x: (0) y: (0)\ndelete (all) of [player v]\nadd [0] to [player v]\nadd [0] to [player v]\nadd [90] to [player v]\nadd [0] to [player v]\nadd [-100] to [player v]\nadd [0] to [player v]\nadd [-100] to [player v]\n\nwhen I receive [t v]\nSetting\nforever\n    Player Move\nend\n\nwhen flag clicked\nforever\n    if <touching (bad v)?> then\n        broadcast (T v)\n    end\nend\n\nwhen flag clicked\nforever\n    if <touching (bad2 v)?> then\n        broadcast (T v)\n    end\nend\n\nwhen flag clicked\nforever\n    if <touching (crown v)?> then\n        broadcast (Win v)\n    end\nend\n\n@Thumbnail\n\nwhen flag clicked\nshow\ngo to x: () y: ()\nset [ghost v] effect to (100)\nforever\n    go to [front v] layer\nend\n\n@Sprite2\n\nwhen flag clicked\nshow\ngo to [front v] layer\nwait (10) seconds\nhide\n\n@Clouds\n\nwhen I start as a clone\nshow\ngo to [front v] layer\nset [ghost v] effect to (pick random (20) to (30))\ngo to x: (-400) y: (pick random (-40) to (20))\nforever\n    repeat until <(x position) > [350]>\n        move (1) steps\n    end\n    delete this clone\nend\n\nwhen flag clicked\nhide\nforever\n    wait (pick random (10) to (15)) seconds\n    create clone of (_myself_ v)\nend\n\n@Notification\n\nwhen flag clicked\nforever\n    hide\n    go to [front v] layer\n    wait (pick random (10) to (50)) seconds\n    go to x: (0) y: (-110)\n    show\n    glide (0.2) secs to x: (0) y: (10)\n    glide (0.1) secs to x: (0) y: (0)\n    wait (2) seconds\n    glide (0.2) secs to x: (0) y: (-110)\n    next costume\nend\n\n@sky\n\nwhen flag clicked\ngo to [back v] layer\ngo to x: (0) y: (0)\nswitch costume to (dusk v)\nset [day v] to [1]\nforever\n    wait (20) seconds\n    fin stage\n    switch time period\n    wait (30) seconds\n    fin stage\n    wait (30) seconds\nend\n\nwhen I start as a clone\nrepeat (100)\n    change [ghost v] effect by (1)\nend\ndelete this clone\n\ndefine fin stage\ncreate clone of (_myself_ v)\ngo to [back v] layer\nnext costume\n\ndefine switch time period\nif <(day) = [1]> then\n    set [day v] to [0]\n    broadcast (dusk v)\nelse\n    set [day v] to [1]\n    broadcast (dawn v)\nend\n\n@Ground\n\nwhen I receive [tick v]\nif <(costume [name v]) = [NONE]> then\n    go to x: (0) y: (0)\n    hide\n    stop [this script v]\nelse\n    Move ((-x-) - (item (6) of [player v])) ((-y-) - (item (7) of [player v]))\nend\n\ndefine Move (x) (y)\nswitch costume to (none v)\ngo to x: (x) y: (y)\nif <<(x position) = (x)> and <(y position) = (y)>> then\n    show\nelse\n    hide\nend\nswitch costume to (-n-)\n\ndefine Clone (-x-) (-y-) (-n-)\nset [-x- v] to (-x-)\nset [-y- v] to (-y-)\nset [-n- v] to ((-n-) + (1))\nswitch costume to ((-n-) + (1))\ncreate clone of (_myself_ v)\n\nwhen I start as a clone\nshow\n\nrepeat (10)\n\nClone ((480) * ()) [-100] [4]\n\nwhen flag clicked\nhide\nClone ((480) * (0)) [-100] [1]\nClone ((480) * (1)) [-100] [2]\nClone ((480) * (2)) [-100] [3]\nClone ((480) * (3)) [-100] [4]\nClone ((480) * (4)) [-100] [5]\nClone ((480) * (5)) [-100] [6]\nClone ((480) * (6)) [-100] [7]\nforever\n    broadcast (Tick v)\nend\n\n@Intro\n\nwhen flag clicked\ngo to x: (-195) y: (-135)\nswitch costume to (username v)\ncreate clone of (_myself_ v)\nswitch costume to (backgroundblock v)\ncreate clone of (_myself_ v)\nrepeat (5)\n    switch costume to (backgroundblock v)\n    change x by (90)\n    create clone of (_myself_ v)\nend\nrepeat (3)\n    change y by (90)\n    set x to (-195)\n    repeat (6)\n        switch costume to (backgroundblock v)\n        create clone of (_myself_ v)\n        change x by (90)\n    end\nend\n\nwhen I start as a clone\nshow\nif <(costume [name v]) = [BackgroundBlock]> then\n    set size to (0) %\n    point in direction (-90)\n    repeat (40)\n        change size by (((101) - (size)) / (5))\n        turn right (((90) - (direction)) / (5)) degrees\n    end\nend\nif <(costume [name v]) = [Username]> then\n    go to x: (0) y: (0)\n    go to [front v] layer\n    set size to (0) %\n    point in direction (90)\n    repeat (25)\n        change size by (((150) - (size)) / (5))\n    end\n    \n        point in direction ((90) + (([sin v] of (((timer) * (5)) * (50)) ) * (5)))\n        switch costume to (empty v)\n        change size by (((introNameSize) - (size)) / (5))\n        switch costume to (username v)\n        set [color v] effect to (1)\n    end\nend\nif <(costume [name v]) = [Cool Square]> then\n    go to x: (0) y: (0)\n    go to [front v] layer\n    set size to (0) %\n    point in direction (90)\n    set [color v] effect to (1)\n    \n        repeat (33)\n            switch costume to (empty v)\n            change size by (((350) - (size)) / (5))\n            switch costume to (cool square v)\n        end\n        delete this clone\n    end\nend\n\nwhen flag clicked\nset [intronamesize v] to [150]\nwait (0.001) seconds\nrepeat until <(IntroOver) = [1]>\n    change [clonecoloreffect v] by (20)\n    switch costume to (cool square v)\n    create clone of (_myself_ v)\n    switch costume to (end v)\n    repeat (33)\n        change [intronamesize v] by (((150) - (introNameSize)) / (5))\n    end\n    set [intronamesize v] to [500]\nend\n\nwhen flag clicked\nreset timer\nplay sound [Rob Gasser - Ricochet \[NCS Release\] v] until done\n\nwhen flag clicked\nset [introover v] to [0]\nclear graphic effects\nhide\nwait (6.96) seconds\nset [introover v] to [1]\nshow\nswitch costume to (end v)\ngo to x: (1000000000000000000) y: (10000000000)\ngo to [front v] layer\nrepeat (80)\n    change x by (((0) - (x position)) / (15))\n    change y by (((0) - (y position)) / (15))\nend\nbroadcast (IntroOver v)\n\nwhen I receive [introover v]\nif <not <(costume [number v]) = [5]>> then\n    delete this clone\nend\nrepeat (25)\n    change [ghost v] effect by (5)\nend\nhide\nbroadcast (BEGIN NOW v)\n\n@Crown\n\nwhen I receive [tick v]\nif <(costume [name v]) = [NONE]> then\n    go to x: (0) y: (0)\n    hide\n    stop [this script v]\nelse\n    Move ((-x-) - (item (6) of [player v])) ((-y-) - (item (7) of [player v]))\nend\n\ndefine Move (x) (y)\nswitch costume to (none v)\ngo to x: (x) y: (y)\nif <<(x position) = (x)> and <(y position) = (y)>> then\n    show\nelse\n    hide\nend\nswitch costume to (-n-)\n\ndefine Clone (-x-) (-y-) (-n-)\nset [-x- v] to (-x-)\nset [-y- v] to (-y-)\nset [-n- v] to ((-n-) + (1))\nswitch costume to ((-n-) + (1))\ncreate clone of (_myself_ v)\n\nwhen I start as a clone\nshow\n\nwhen flag clicked\nhide\nClone ((480) * (0)) [-100] [1]\nClone ((480) * (1)) [-100] [2]\nClone ((480) * (2)) [-100] [3]\nClone ((480) * (3)) [-100] [4]\nClone ((480) * (4)) [-100] [5]\nClone ((480) * (5)) [-100] [6]\nClone ((480) * (6)) [-100] [7]\nforever\n    broadcast (Tick v)\nend\n\nwhen flag clicked\nforever\n    set size to ((([sin v] of (bounce) ) * (2)) + (100)) %\n    point in direction ((([sin v] of ((bounce) + (50)) ) * (2)) + (90))\n    change [bounce v] by (8)\nend\n\n@Sprite3\n\nwhen flag clicked\nhide\n\nwhen I receive [win v]\ngo to [front v] layer\nshow\ngo to x: (0) y: (0)\nforever\n    set size to ((([sin v] of (bounce) ) * (2)) + (100)) %\n    point in direction ((([sin v] of ((bounce) + (50)) ) * (2)) + (90))\n    change [bounce v] by (8)\nend\n\n@Bad\n\nwhen I receive [tick v]\nif <(costume [name v]) = [NONE]> then\n    go to x: (0) y: (0)\n    hide\n    stop [this script v]\nelse\n    Move ((-x-) - (item (6) of [player v])) ((-y-) - (item (7) of [player v]))\nend\n\ndefine Clone (-x-) (-y-) (-n-)\nset [-x- v] to (-x-)\nset [-y- v] to (-y-)\nset [-n- v] to ((-n-) + (1))\nswitch costume to ((-n-) + (1))\ncreate clone of (_myself_ v)\n\ndefine Move (x) (y)\nswitch costume to (none v)\ngo to x: (x) y: (y)\nif <<(x position) = (x)> and <(y position) = (y)>> then\n    show\nelse\n    hide\nend\nswitch costume to (-n-)\n\nwhen I start as a clone\nshow\n\nwhen flag clicked\nforever\n    if <touching (you v)?> then\n        broadcast (T v)\n    end\nend\n\nwhen flag clicked\nbroadcast (T v)\n\nwhen flag clicked\nhide\nClone ((480) * (0)) [-100] [1]\nClone ((480) * (1)) [-100] [2]\nClone ((480) * (2)) [-100] [3]\nClone ((480) * (3)) [-100] [4]\nClone ((480) * (4)) [-100] [5]\nClone ((480) * (5)) [-100] [6]\nforever\n    broadcast (Tick v)\nend\n\n