White Cube || A Cloud Platformer

Instructions: Read all\n\nYou have to have a somewhat fast computer for this to work!\n\nMay not be so smooth\n\nUse arrow keys to move and avoid spikes\n\nAll rude ad hateful comments and advertising will be reported immediately.

@Stage\n\nwhen I receive [fade v]\nwait (0.35) seconds\nrepeat (100)\n    change volume by (-1)\nend\nwait (1) seconds\nset volume to (100) %\n\nwhen flag clicked\nbroadcast (Start v)\nswitch backdrop to (backdrop2 v)\nset volume to (100) %\n\nplay sound [Zaza - Be Together.mp4 v] until done\nswitch backdrop to (backdrop1 v)\n\n@clouds\n\nwhen flag clicked\nhide\n\nwhen I start as a clone\nshow\ngo to [back v] layer\nset size to (pick random (50) to (70)) %\nswitch costume to (pick random (1) to (3))\nset [ghost v] effect to (pick random (30) to (45))\nset [cloud side v] to (pick random (1) to (2))\nif <(Cloud side) = [1]> then\n    go to x: (246) y: (pick random (131) to (0))\n    repeat until <(x position) < [-243]>\n        change x by ((0) - (pick random (0.5) to (2)))\n    end\nelse\n    go to x: (-246) y: (pick random (131) to (0))\n    repeat until <(x position) > [243]>\n        change x by (pick random (0.5) to (2))\n    end\nend\ndelete this clone\n\nwhen I receive [start v]\nforever\n    wait (pick random (2.5) to (5)) seconds\n    create clone of (_myself_ v)\nend\n\n@Levels\n\nwhen flag clicked\nset [level v] to [1]\nforever\n    switch costume to (Level)\nend\n\nwhen flag clicked\nhide\ngo to [front v] layer\n\nforever\n\nwhen I receive [start v]\nshow\n\nwhen flag clicked\nwait until <(Level) = [15]>\nbroadcast (end v)\nhide\n\n@die\n\nwhen flag clicked\ngo to x: (0) y: (0)\nset [ghost v] effect to (0)\ngo to [front v] layer\nhide\n\nwhen I receive [die v]\nshow\nrepeat (4)\n    change [ghost v] effect by (15)\nend\nhide\nbroadcast (Done dying v)\nset [ghost v] effect to (0)\n\nwhen I receive [die v]\nset volume to (200) %\nset volume to (100) %\n\n@Music\n\nwhen I receive [start v]\ngo to x: (-169) y: (-154)\nstop all sounds\nshow\nset [ghost v] effect to (100)\nswitch backdrop to (backdrop1 v)\nforever\n    set volume to (100) %\n    set [song randomizer v] to (pick random (1) to (5))\n    if <(Song Randomizer) = [1]> then\n        switch costume to (1 v)\n        repeat (100)\n            change [ghost v] effect by (-1)\n        end\n        broadcast (Mewsik v)\n        wait () seconds\n        repeat (100)\n            change [ghost v] effect by (1)\n            play sound [Vexento - Digital Kiss.mp3 v] until done\n        end\n    else\n        if <(Song Randomizer) = [2]> then\n            switch costume to (2 v)\n            repeat (100)\n                change [ghost v] effect by (-1)\n            end\n            broadcast (Mewsik v)\n            wait () seconds\n            repeat (109)\n                change [ghost v] effect by (1)\n            end\n            play sound [Vexento - Oh Look Aliens!.mp3 v] until done\n        else\n            if <(Song Randomizer) = [3]> then\n                switch costume to (3 v)\n                repeat (100)\n                    change [ghost v] effect by (-1)\n                end\n                broadcast (Mewsik v)\n                wait () seconds\n                repeat (100)\n                    change [ghost v] effect by (1)\n                end\n                play sound [the piano moosic v] until done\n            else\n                if <(Song Randomizer) = [4]> then\n                    switch costume to (4 v)\n                    repeat (100)\n                        change [ghost v] effect by (-1)\n                    end\n                    broadcast (Mewsik v)\n                    wait () seconds\n                    repeat (100)\n                        change [ghost v] effect by (1)\n                    end\n                    play sound [Vexento-Devotion v] until done\n                else\n                    if <(Song Randomizer) = [5]> then\n                        switch costume to (5 v)\n                        repeat (100)\n                            change [ghost v] effect by (-1)\n                        end\n                        broadcast (Mewsik v)\n                        wait () seconds\n                        repeat (100)\n                            change [ghost v] effect by (1)\n                        end\n                        play sound [Time Lapse v] until done\n                    end\n                end\n            end\n        end\n    end\nend\n\nwhen flag clicked\nbroadcast (Start v)\nforever\n    hide\nend\n\nwhen flag clicked\nforever\n    go to [front v] layer\nend\n\ncreate clone of (_myself_ v)\n\nbroadcast (die v)\n\n@Sprite1\n\nwhen flag clicked\nforever\n    if <<<< (letter (1) of (☁ Player 1)) contains [1]?> and < (letter (1) of (☁ Player 2)) contains [1]?>> and < (letter (1) of (☁ Player 3)) contains [1]?>> and << (letter (1) of (☁ Player 4)) contains [1]?> and < (letter (1) of (☁ Player 5)) contains [1]?>>> then\n        show\n    end\n    hide\nend\n\n@Sprite2\n\nwhen flag clicked\ngo to [front v] layer\ngo [backward v] (1) layers\n\nwhen flag clicked\nforever\n    if < (letter (1) of (☁ Player 2)) contains [0]?> then\n        hide\n    else\n        if <(join (letter (6) of (☁ Player 2)) (letter (7) of (☁ Player 2))) = (Level)> then\n            show\n        else\n            hide\n        end\n    end\nend\n\nshow\n\nwhen flag clicked\nforever\nend\n\nwhen flag clicked\nforever\n    wait (.1) seconds\n    go to x: (2x) y: (2y)\nend\n\nwhen flag clicked\nforever\n    if <(letter (join (letter (6) of (☁ Player 2)) (letter (7) of (☁ Player 2))) of [apple]) = [16]> then\n        hide\n    end\nend\n\n@End\n\nwhen I receive [end v]\ngo to x: (0) y: (0)\nshow\nrepeat (10)\n    change [ghost v] effect by (-10)\nend\ngo to [front v] layer\n\nwhen flag clicked\nset [ghost v] effect to (100)\nhide\n\n@Thumbnail\n\nwhen flag clicked\n\nwhen flag clicked\ngo to x: (0) y: (0)\nhide\n\nwhen flag clicked\nwait (1) seconds\nshow\nset [ghost v] effect to (100)\nforever\n    go to [front v] layer\nend\n\n@Sprite3\n\nwhen flag clicked\ngo to [front v] layer\ngo [backward v] (1) layers\n\nwhen flag clicked\nforever\n    if < (letter (1) of (☁ Player 3)) contains [0]?> then\n        hide\n    else\n        if <(join (letter (6) of (☁ Player 3)) (letter (7) of (☁ Player 3))) = (Level)> then\n            show\n        else\n            hide\n        end\n    end\nend\n\nshow\n\nwhen flag clicked\nforever\nend\n\nwhen flag clicked\nforever\n    wait (.1) seconds\n    go to x: (3x) y: (3y)\nend\n\nwhen flag clicked\nforever\n    if <(letter (join (letter (6) of (☁ Player 3)) (letter (7) of (☁ Player 3))) of [apple]) = [16]> then\n        hide\n    end\nend\n\n@Sprite4\n\nwhen flag clicked\nforever\n    if < (letter (1) of (☁ Player 4)) contains [0]?> then\n        hide\n    else\n        if <(join (letter (6) of (☁ Player 4)) (letter (7) of (☁ Player 4))) = (Level)> then\n            show\n        else\n            hide\n        end\n    end\nend\n\nwhen flag clicked\nforever\nend\n\nwhen flag clicked\ngo to [front v] layer\ngo [backward v] (1) layers\n\nwhen flag clicked\nforever\n    wait (.1) seconds\n    go to x: (4x) y: (4y)\nend\n\nwhen flag clicked\nforever\n    if <(letter (join (letter (6) of (☁ Player 4)) (letter (7) of (☁ Player 4))) of [apple]) = [16]> then\n        hide\n    end\nend\n\n@Sprite5\n\nwhen flag clicked\ngo to [front v] layer\ngo [backward v] (join (letter (6) of (☁ Player 5)) (letter (7) of (☁ Player 5))) layers\n\nwhen flag clicked\nhide\nforever\n    if <(letter (1) of (☁ Player 5)) = [1]> then\n        hide\n        if <(join (letter (6) of (☁ Player 5)) (letter (7) of (☁ Player 5))) = (Level)> then\n            show\n        else\n            hide\n        end\n    end\nend\n\nwhen flag clicked\nforever\nend\n\nwhen flag clicked\nforever\n    wait (.1) seconds\n    go to x: (5x) y: (5y)\nend\n\nglide (1) secs to x: (0) y: (0)\n\nwhen flag clicked\nforever\n    if <(letter (join (letter (6) of (☁ Player 5)) (letter (7) of (☁ Player 5))) of [apple]) = [16]> then\n        hide\n    end\nend\n\n@Sprite1 1\n\nwhen flag clicked\ngo to [front v] layer\ngo [backward v] (1) layers\n\nwhen flag clicked\nforever\n    if < (letter (1) of (☁ Player 1)) contains [0]?> then\n        hide\n    else\n        if <(join (letter (6) of (☁ Player 1)) (letter (7) of (☁ Player 1))) = (Level)> then\n            show\n        else\n            hide\n        end\n    end\nend\n\nwhen flag clicked\nforever\nend\n\nwhen flag clicked\nforever\n    wait (.1) seconds\n    go to x: (1x) y: (1y)\nend\n\nhide\n\nwhen flag clicked\nforever\n    if <(letter (join (letter (6) of (☁ Player 1)) (letter (7) of (☁ Player 1))) of [apple]) = [16]> then\n        hide\n    end\nend\n\n@Sprite7\n\nwhen flag clicked\nforever\n    if <(you are player) = [1]> then\n        if <(letter (1) of (☁ Player 2)) = [1]> then\n            show\n            broadcast (16 v)\n        end\n        if <(letter (1) of (☁ Player 3)) = [1]> then\n            show\n            broadcast (16 v)\n        end\n        if <(letter (1) of (☁ Player 4)) = [1]> then\n            show\n            broadcast (16 v)\n        end\n        if <(letter (1) of (☁ Player 5)) = [1]> then\n            show\n            broadcast (16 v)\n        end\n    end\n    if <(you are player) = [2]> then\n        if <(letter (1) of (☁ Player 1)) = [1]> then\n            show\n            broadcast (16 v)\n        end\n        if <(letter (1) of (☁ Player 3)) = [1]> then\n            show\n            broadcast (16 v)\n        end\n        if <(letter (1) of (☁ Player 4)) = [1]> then\n            show\n            broadcast (16 v)\n        end\n        if <(letter (1) of (☁ Player 5)) = [1]> then\n            show\n            broadcast (16 v)\n        end\n    end\n    if <(you are player) = [3]> then\n        if <(letter (1) of (☁ Player 1)) = [1]> then\n            show\n            broadcast (16 v)\n        end\n        if <(letter (1) of (☁ Player 2)) = [1]> then\n            show\n            broadcast (16 v)\n        end\n        if <(letter (1) of (☁ Player 4)) = [1]> then\n            show\n            broadcast (16 v)\n        end\n        if <(letter (1) of (☁ Player 5)) = [1]> then\n            show\n            broadcast (16 v)\n        end\n    end\n    if <(you are player) = [4]> then\n        if <(letter (1) of (☁ Player 1)) = [1]> then\n            show\n            broadcast (16 v)\n        end\n        if <(letter (1) of (☁ Player 2)) = [1]> then\n            show\n            broadcast (16 v)\n        end\n        if <(letter (1) of (☁ Player 3)) = [1]> then\n            show\n            broadcast (16 v)\n        end\n        if <(letter (1) of (☁ Player 5)) = [1]> then\n            show\n            broadcast (16 v)\n        end\n    end\n    if <(you are player) = [5]> then\n        if <(letter (1) of (☁ Player 1)) = [1]> then\n            show\n            broadcast (16 v)\n        end\n        if <(letter (1) of (☁ Player 2)) = [1]> then\n            show\n            broadcast (16 v)\n        end\n        if <(letter (1) of (☁ Player 3)) = [1]> then\n            show\n            broadcast (16 v)\n        end\n        if <(letter (1) of (☁ Player 4)) = [1]> then\n            show\n            broadcast (16 v)\n        end\n    end\n    hide\nend\n\nwhen I receive [16 v]\nwait (3) seconds\nstop [other scripts in sprite v]\n\n@Player\n\nwhen flag clicked\n\nwhen flag clicked\nwait (.01) seconds\nforever\n    if < (letter (1) of (☁ Player 1)) contains [0]?> then\n        set [☁ player 1 v] to (join (join [1] (x position)) (y position))\n        broadcast (1 v)\n        stop [this script v]\n    end\n    if < (letter (1) of (☁ Player 2)) contains [0]?> then\n        set [☁ player 2 v] to (join (join [1] (x position)) (y position))\n        broadcast (2 v)\n        stop [this script v]\n    end\n    if < (letter (1) of (☁ Player 3)) contains [0]?> then\n        set [☁ player 3 v] to (join (join [1] (x position)) (y position))\n        broadcast (3 v)\n        stop [this script v]\n    end\n    if < (letter (1) of (☁ Player 4)) contains [0]?> then\n        set [☁ player 4 v] to (join (join [1] (x position)) (y position))\n        broadcast (4 v)\n        stop [this script v]\n    end\n    if < (letter (1) of (☁ Player 5)) contains [0]?> then\n        set [☁ player 5 v] to (join (join [1] (x position)) (y position))\n        broadcast (5 v)\n        stop [this script v]\n    end\nend\n\nset [☁ player 1 v] to [0]\n\nwhen I receive [1 v]\nset [you are player v] to [1]\nwait (.1) seconds\nforever\n    set [☁ player 1 v] to (join (join (join [1] (1x)) (1y)) (Level))\nend\n\nwhen I receive [2 v]\nset [you are player v] to [2]\nwait (.1) seconds\nforever\n    set [☁ player 2 v] to (join (join (join [1] (2x)) (2y)) (Level))\nend\n\nwhen I receive [3 v]\nset [you are player v] to [3]\nwait (.1) seconds\nforever\n    set [☁ player 3 v] to (join (join (join [1] (3x)) (3y)) (Level))\nend\n\nwhen I receive [5 v]\nset [you are player v] to [5]\nwait (.1) seconds\nforever\n    set [☁ player 5 v] to (join (join (join [1] (5x)) (5y)) (Level))\nend\n\nwhen I receive [4 v]\nset [you are player v] to [4]\nwait (.1) seconds\nforever\n    set [☁ player 4 v] to (join (join (join [1] (4x)) (4y)) (Level))\nend\n\nwhen flag clicked\nset [☁ player 1 v] to [0]\nset [☁ player 2 v] to [0]\nset [☁ player 3 v] to [0]\nset [☁ player 4 v] to [0]\nset [☁ player 5 v] to [0]\n\nwhen flag clicked\nwait (.1) seconds\ngo to [front v] layer\n\nwhen flag clicked\nforever\n    if <(you are player) = [1]> then\n        if < (letter (2) of (x position)) contains [.]?> then\n            set [1x v] to (join [0] (letter (1) of (x position)))\n        end\n        if < (letter (3) of (x position)) contains [.]?> then\n            set [1x v] to (join (letter (1) of (x position)) (letter (2) of (x position)))\n        end\n        if < (letter (2) of (y position)) contains [.]?> then\n            set [1x v] to (join [0] (letter (1) of (y position)))\n        end\n        if < (letter (3) of (y position)) contains [.]?> then\n            set [1x v] to (join (letter (1) of (y position)) (letter (2) of (y position)))\n        end\n    end\nend\n\nwhen flag clicked\nforever\n    if <(you are player) = [2]> then\n        if < (letter (2) of (x position)) contains [.]?> then\n            set [1x v] to (join [0] (letter (1) of (x position)))\n        end\n        if < (letter (3) of (x position)) contains [.]?> then\n            set [1x v] to (join (letter (1) of (x position)) (letter (2) of (x position)))\n        end\n        if < (letter (2) of (y position)) contains [.]?> then\n            set [1x v] to (join [0] (letter (1) of (y position)))\n        end\n        if < (letter (3) of (y position)) contains [.]?> then\n            set [1x v] to (join (letter (1) of (y position)) (letter (2) of (y position)))\n        end\n    end\nend\n\nwhen flag clicked\nforever\n    if <(you are player) = [3]> then\n        if < (letter (2) of (x position)) contains [.]?> then\n            set [1x v] to (join [0] (letter (1) of (x position)))\n        end\n        if < (letter (3) of (x position)) contains [.]?> then\n            set [1x v] to (join (letter (1) of (x position)) (letter (2) of (x position)))\n        end\n        if < (letter (2) of (y position)) contains [.]?> then\n            set [1x v] to (join [0] (letter (1) of (y position)))\n        end\n        if < (letter (3) of (y position)) contains [.]?> then\n            set [1x v] to (join (letter (1) of (y position)) (letter (2) of (y position)))\n        end\n    end\nend\n\nwhen flag clicked\nforever\n    if <(you are player) = [5]> then\n        if < (letter (2) of (x position)) contains [.]?> then\n            set [1x v] to (join [0] (letter (1) of (x position)))\n        end\n        if < (letter (3) of (x position)) contains [.]?> then\n            set [1x v] to (join (letter (1) of (x position)) (letter (2) of (x position)))\n        end\n        if < (letter (2) of (y position)) contains [.]?> then\n            set [1x v] to (join [0] (letter (1) of (y position)))\n        end\n        if < (letter (3) of (y position)) contains [.]?> then\n            set [1x v] to (join (letter (1) of (y position)) (letter (2) of (y position)))\n        end\n    end\nend\n\nwhen flag clicked\nforever\n    if <(you are player) = [4]> then\n        if < (letter (2) of (x position)) contains [.]?> then\n            set [1x v] to (join [0] (letter (1) of (x position)))\n        end\n        if < (letter (3) of (x position)) contains [.]?> then\n            set [1x v] to (join (letter (1) of (x position)) (letter (2) of (x position)))\n        end\n        if < (letter (2) of (y position)) contains [.]?> then\n            set [1x v] to (join [0] (letter (1) of (y position)))\n        end\n        if < (letter (3) of (y position)) contains [.]?> then\n            set [1x v] to (join (letter (1) of (y position)) (letter (2) of (y position)))\n        end\n    end\nend\n\ndefine Physics (xv) (jumpheight) (friction)\nif <key (right arrow v) pressed?> then\n    switch costume to (costume1 v)\n    change [xmovement v] by (xv)\nelse\n    if <<key (left arrow v) pressed?> or <(item (1) of [xy mobile v]) > [0]>> then\n        switch costume to (costume2 v)\n        change [xmovement v] by (join [-] (xv))\n    end\nend\nset [xmovement v] to ((Xmovement) * ((0.88) - (friction)))\nchange x by (Xmovement)\nchange [yv v] by (-0.9)\nif <<touching color (#38b600)?> or <<touching color (#a05b00)?> or <touching color (#764300)?>>> then\n    change y by (1)\nend\nif <<touching color (#38b600)?> or <<touching color (#a05b00)?> or <touching color (#764300)?>>> then\n    change y by (1)\nend\nif <<touching color (#38b600)?> or <<touching color (#a05b00)?> or <touching color (#764300)?>>> then\n    change y by (1)\nend\nif <<touching color (#38b600)?> or <<touching color (#a05b00)?> or <touching color (#764300)?>>> then\n    change y by (1)\nend\nif <<touching color (#38b600)?> or <<touching color (#a05b00)?> or <touching color (#764300)?>>> then\n    change x by ((Xmovement) * (-1))\n    if <key (up arrow v) pressed?> then\n        set [yv v] to [10]\n        if <(Xmovement) > [0]> then\n            set [xmovement v] to [-5]\n        else\n            set [xmovement v] to [5]\n        end\n    else\n        set [xmovement v] to [0]\n    end\nend\nchange y by (Yv)\nif <<touching color (#38b600)?> or <<touching color (#a05b00)?> or <touching color (#764300)?>>> then\n    change y by ((Yv) - ((Yv) * (2)))\n    set [yv v] to [0]\nend\nchange y by (-1)\nif <<key (up arrow v) pressed?> and <<touching color (#38b600)?> or <<touching color (#a05b00)?> or <touching color (#764300)?>>>> then\n    set [yv v] to (jumpheight)\nend\nif <(x position) > [235]> then\n    change [level v] by (1)\n    set [xmovement v] to [0]\n    set [yv v] to [0]\n    go to x: (-198) y: (-45)\nend\nif <<touching color (#ff1818)?> or <touching color (#ce1515)?>> then\n    hide\n    broadcast (die v)\nend\n\nwhen flag clicked\nhide\n\nwait (0.2) seconds\n\nwhen I receive [done dying v]\nshow\ngo to x: (-198) y: (-45)\nset [xmovement v] to [0]\nset [yv v] to [0]\n\nwhen I receive [start v]\ndelete all of [stuff v]\nswitch costume to (costume1 v)\nshow\ngo to [front v] layer\nset [yv v] to [0]\ngo to x: (-198) y: (-45)\nset size to (80) %\nforever\n    Physics [.75] [13] [0]\nend\n\nwhen I receive [start v]\nforever\n    create clone of (_myself_ v)\nend\n\nwhen I start as a clone\nswitch costume to (costume3 v)\nset [ghost v] effect to (0)\nrepeat (5)\n    change [ghost v] effect by (20)\nend\ndelete this clone\n\nwhen I receive [end v]\nhide\n\n