Party - Multiplayer Scrolling Platformer

Instructions: Find a fun platformer I also made at https://scratch.mit.edu/projects/596561537/\nDon't scroll down for the hacks ;)\nThanks for playing with me, @Ugly_Rat_Boy, @shapey100, @PlatformDude101, @kawaii_loverfreak, @llLeo999, @mufinman22, @avery_alicorn, @SuperKateHelps, and @gami52.\nArrow keys, WASD, or touchscreen.\nYou have enough coins to buy all the presents if you collect all of them and love and fave.\nHas only 7 levels! No official end.\nHow To Play:\nUse Arrow Keys Or WASD To Move Or Mobile\nThere Is Wall Jump On Mobile And PC\nSaws And Spikes and Vents = Death\nCoins = Good\nLandscape = Good\nHit 'p' to throw pillows. Beds are bouncy.\nAlso, collect all coins to pass the level.\nTo see the gifts you have purchased and which key to press to deliver it, hit 'g'. Then, hit the key that goes with the present if you can see the birthday child.\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n#games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games #games\n#all #all #all #all #all #all #all #all #all #all #all #all #all\n#all #all #all #all #all #all #all #all #all #all #all #all #all\n#all #all #all #all #all #all #all #all #all #all #all #all #all\n#all #all #all #all #all #all #all #all #all #all #all #all #all\n#all #all #all #all #all #all #all #all #all #all #all #all #all\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\nPillows destroy saws and hit y to skip.

@Stage\n\nwhen flag clicked\nswitch backdrop to (backdrop1 v)\n\n@Blank\n\n@TN\n\nwhen flag clicked\nforever\n    show\n    go to x: (0) y: (0)\n    switch costume to (tb v)\n    set [ghost v] effect to (100)\nend\n\nwhen flag clicked\nforever\n    go [forward v] (10000000000) layers\nend\n\n@Characters//Player\n\nwhen I receive [begin v]\nset [chat v] to [0]\nshow list [chat v]\nforever\n    Chat\nend\n\nwhen I receive [play game v]\nset [connected? v] to [0]\n\ndefine Position\ngo to x: ((x) - (SCROLL X)) y: ((y) - (SCROLL Y))\n\nwhen I receive [green flag v]\nhide\ngo to [front v] layer\n\ndefine Change Player x by (sx)\npoint in direction (90)\nchange [x v] by (sx)\nPosition\nif <touching (elements//platforms v)?> then\n    repeat (12)\n        change [y v] by (1)\n        Position\n        if <not <touching (elements//platforms v)?>> then\n            stop [this script v]\n        end\n    end\n    change [y v] by (-12)\n    if <<<(y position) < (mouse y)> and <mouse down?>> or <<key (up arrow v) pressed?> or <key (w v) pressed?>>> 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 (elements//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    end\nend\n\nwhen flag clicked\npoint in direction (90)\nbroadcast (Green Flag v) and wait\nbroadcast (Play Game v) and wait\n\ndefine Change Player y by (sy)\nchange [y v] by (sy)\nchange [in air v] by (1)\nPosition\nrepeat until <not <touching (elements//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]\nend\n\ndefine Game On\nset [y v] to [0]\nset [x v] to [0]\nset [sx v] to [0]\nset [sy v] to [0]\nset [in air v] to [0]\nset [exit v] to []\nset [ghost v] effect to (0)\nset size to (100) %\n\ndefine Test - Die\nif <touching (elements//danger v)?> then\n    set [exit v] to [die]\nend\nif <touching (elements//saws v)?> then\n    set [exit v] to [die]\nend\n\ndefine Game - Die\nset [exit v] to []\nchange [lives v] by (-1)\n\ndefine Game - Win\ngo to (elements//exit v)\nchange x by (5)\nchange y by (-75)\nrepeat (50)\n    change [ghost v] effect by (2)\nend\nhide\nchange [level v] by (1)\nwait (1) seconds\nclear graphic effects\nshow\n\nwhen flag clicked\nhide\nset [max players v] to [8]\nset [my player # v] to [0]\nbroadcast (Connecting v)\nbroadcast (Setup Others v) and wait\nbroadcast (Join Game v) and wait\nif <(MY PLAYER #) > [0]> then\n    broadcast (Connected v)\nelse\n    broadcast (Full v)\nend\nbroadcast (Begin v)\n\ndefine set cloud # (player) to (value)\nif <(player) = [1]> then\n    set [☁ p1 v] to (value)\nelse\n    if <(player) = [2]> then\n        set [☁ p2 v] to (value)\n    else\n        if <(player) = [3]> then\n            set [☁ p3 v] to (value)\n        else\n            if <(player) = [4]> then\n                set [☁ p4 v] to (value)\n            else\n                if <(player) = [5]> then\n                    set [☁ p5 v] to (value)\n                else\n                    if <(player) = [6]> then\n                        set [☁ p6 v] to (value)\n                    else\n                        if <(player) = [7]> then\n                            set [☁ p7 v] to (value)\n                        else\n                            if <(player) = [8]> then\n                                set [☁ p8 v] to (value)\n                            else\n                                if <(player) = [9]> then\n                                    set [☁ p9 v] to (value)\n                                else\n                                    if <(player) = [10]> then\n                                        set [☁ p10 v] to (value)\n                                    end\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\n\ndefine write (val) to encoded\nset [letter # v] to [1]\nrepeat (length of (val))\n    set [encoded v] to (join (encoded) (item # of (letter (letter #) of (val)) in [code v]))\n    change [letter # v] by (1)\nend\nset [encoded v] to (join (encoded) [00])\n\nwhen I receive [begin v]\nforever\n    if <(MY PLAYER #) > [0]> then\n        send cloud data\n    end\nend\n\ndefine send cloud data\nset [encoded v] to []\nwrite (username) to encoded\nwrite (round ((timer) * (10))) to encoded\nwrite (x) to encoded\nwrite (y) to encoded\nwrite (Chat Words) to encoded\nset cloud # (MY PLAYER #) to (encoded)\n\ndefine Chat\nif <(Chat) = [1]> then\n    if <key (1 v) pressed?> then\n        set [chat words v] to [1]\n        say (item (1) of [chat v])\n        wait (2) seconds\n        say []\n        set [chat words v] to [0]\n    else\n        if <key (2 v) pressed?> then\n            set [chat words v] to [2]\n            say (item (2) of [chat v])\n            wait (2) seconds\n            say []\n            set [chat words v] to [0]\n        else\n            if <key (3 v) pressed?> then\n                set [chat words v] to [3]\n                say (item () of [chat v])\n                wait (2) seconds\n                say []\n                set [chat v] to [0]\n            else\n                if <key (4 v) pressed?> then\n                    set [chat words v] to [4]\n                    say (item (4) of [chat v])\n                    wait (2) seconds\n                    say []\n                    set [chat words v] to [0]\n                else\n                    if <key (5 v) pressed?> then\n                        set [chat words v] to [5]\n                        say (item (5) of [chat v])\n                        wait (2) seconds\n                        say []\n                        set [chat words v] to [0]\n                    else\n                        if <key (6 v) pressed?> then\n                            set [chat words v] to [6]\n                            say (item (6) of [chat v])\n                            wait (2) seconds\n                            say []\n                            set [chat words v] to [0]\n                        else\n                            if <key (7 v) pressed?> then\n                                set [chat words v] to [7]\n                                say (item (7) of [chat v])\n                                wait (2) seconds\n                                say []\n                                set [chat words v] to [0]\n                            else\n                                if <key (8 v) pressed?> then\n                                    set [chat words v] to [8]\n                                    say (item (8) of [chat v])\n                                    wait (2) seconds\n                                    say []\n                                    set [chat words v] to [0]\n                                else\n                                    if <key (9 v) pressed?> then\n                                        set [chat words v] to [9]\n                                        say (item (9) of [chat v])\n                                        wait (2) seconds\n                                        say []\n                                        set [chat words v] to [0]\n                                    else\n                                        set [chat words v] to [0]\n                                    end\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\n\nwhen flag clicked\ngo to [front v] layer\n\nwhen I receive [connected v]\nset [connected? v] to [1]\nshow\n\nwhen I receive [connecting v]\nhide\n\nwhen I receive [play game v]\nforever\n    if <(Connected?) = [1]> then\n        broadcast (Reset v) and wait\n        broadcast (Setup v) and wait\n        Game On\n        repeat until <(EXIT) > []>\n            Tick\n            broadcast (Tick v)\n        end\n        if <(EXIT) = [win]> then\n            Game - Win\n        else\n            Game - Die\n        end\n    end\nend\n\nwhen I receive [connected v]\nset [level v] to [1]\n\ndefine Tick\nswitch costume to (hitbox v)\nset [sx v] to ((sx) * (0.8))\nif <([abs v] of (sx) ) > [0.9]> then\n    Change Player x by (round (sx))\nend\nif <<<(y position) < (mouse y)> and <mouse down?>> or <<key (up arrow v) pressed?> or <key (w v) pressed?>>> then\n    if <(in air) < [4]> then\n        set [sy v] to [16]\n    end\nend\nif <(sy) > [-20]> then\n    change [sy v] by (-2)\nend\nChange Player y by (sy)\nTest - Die\nset [scroll x v] to (x)\nif <(SCROLL X) < [0]> then\n    set [scroll x v] to [0]\nend\nchange [scroll y v] by (round (((y) - (SCROLL Y)) / (10)))\nif <(SCROLL Y) < [0]> then\n    set [scroll y v] to [0]\nend\nPosition\nif <(y) < [-180]> then\n    set [exit v] to [die]\nend\nif <(x) < [-220]> then\n    set [x v] to [-220]\nend\nif <touching color (#444cff)?> then\n    change [sy v] by (5)\nend\nif <key (y v) pressed?> then\n    set [exit v] to [WIN]\nend\nswitch costume to (normal v)\nif <<<(mouse x) < (x position)> and <mouse down?>> or <<key (left arrow v) pressed?> or <key (a v) pressed?>>> then\n    switch costume to (left v)\n    change [sx v] by (-2)\nend\nif <<<(x position) < (mouse x)> and <mouse down?>> or <<key (right arrow v) pressed?> or <key (d v) pressed?>>> then\n    switch costume to (right v)\n    change [sx v] by (2)\nend\nif <<<(y position) < (mouse y)> and <mouse down?>> or <<key (up arrow v) pressed?> or <key (w v) pressed?>>> then\n    switch costume to (up v)\nend\nif <<<<(y position) < (mouse y)> and <mouse down?>> or <<key (up arrow v) pressed?> or <key (w v) pressed?>>> and <<<(mouse x) < (x position)> and <mouse down?>> or <<key (left arrow v) pressed?> or <key (a v) pressed?>>>> then\n    switch costume to (left up v)\nend\nif <<<<(y position) < (mouse y)> and <mouse down?>> or <<key (up arrow v) pressed?> or <key (w v) pressed?>>> and <<<(x position) < (mouse x)> and <mouse down?>> or <<key (right arrow v) pressed?> or <key (d v) pressed?>>>> then\n    switch costume to (right up v)\nend\n\n@Characters//Others\n\nwhen I receive [begin v]\nset [names v] to [1]\nforever\n    if <key (n v) pressed?> then\n        if <(names) = [1]> then\n            wait until <not <key (n v) pressed?>>\n            set [names v] to [0]\n        else\n            wait until <not <key (n v) pressed?>>\n            set [names v] to [1]\n        end\n    end\nend\n\nwhen I receive [setup others v]\nsetup players\n\ndefine setup players\nhide\nset [offline v] to [100]\nset [player # v] to [1]\nrepeat ((MAX PLAYERS) - (1))\n    create clone of (_myself_ v)\n    change [player # v] by (1)\nend\n\ndefine value = cloud # (player)\nif <(player) = [1]> then\n    set [value v] to (☁ P1)\nelse\n    if <(player) = [2]> then\n        set [value v] to (☁ P2)\n    else\n        if <(player) = [3]> then\n            set [value v] to (☁ P3)\n        else\n            if <(player) = [4]> then\n                set [value v] to (☁ P4)\n            else\n                if <(player) = [5]> then\n                    set [value v] to (☁ P5)\n                else\n                    if <(player) = [6]> then\n                        set [value v] to (☁ P6)\n                    else\n                        if <(player) = [7]> then\n                            set [value v] to (☁ P7)\n                        else\n                            if <(player) = [8]> then\n                                set [value v] to (☁ P8)\n                            else\n                                if <(player) = [9]> then\n                                    set [value v] to (☁ P9)\n                                else\n                                    if <(player) = [10]> then\n                                        set [value v] to (☁ P10)\n                                    end\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\n\nwhen I receive [begin v]\nforever\n    if <(MY PLAYER #) = (player #)> then\n        set [offline v] to [100]\n        hide\n    else\n        Tick\n    end\nend\n\ndefine Tick\nvalue = cloud # (player #)\nif <(join [A] (value)) = (last value)> then\n    change [offline v] by (1)\n    if <(offline) = [100]> then\n        hide\n    end\nelse\n    set [last value v] to (join [A] (value))\n    if <(offline) > [99]> then\n        show\n    end\n    set [offline v] to [0]\nend\nbegin decode of (value)\nvalue = read from encoded\nif <(names) = [1]> then\n    say (join (player #) (join [:] (value)))\nelse\n    say []\nend\nvalue = read from encoded\nvalue = read from encoded\nset x to ((value) - (SCROLL X))\nvalue = read from encoded\nset y to (((value) - (SCROLL Y)) + (8))\nvalue = read from encoded\nbroadcast (Decode Chat v)\n\ndefine begin decode of (encoded)\nset [encoded v] to (encoded)\nset [letter # v] to [1]\n\ndefine value = read from encoded\nset [value v] to []\nforever\n    set [idx v] to (join (letter (letter #) of (encoded)) (letter ((letter #) + (1)) of (encoded)))\n    change [letter # v] by (2)\n    if <(idx) < [1]> then\n        stop [this script v]\n    end\n    set [value v] to (join (value) (item (idx) of [code v]))\nend\n\nwhen I receive [join game v]\nvalue = cloud # (player #)\nset [last value v] to (join [A] (value))\nwait (3) seconds\nvalue = cloud # (player #)\nif <(join [A] (value)) = (last value)> then\n    set [my player # v] to (player #)\nend\n\ndefine Decode Chat (chat)\nif <(chat) = [1]> then\n    say (item (1) of [chat v]) for (2) seconds\nelse\n    if <(chat) = [2]> then\n        say (item (2) of [chat v]) for (2) seconds\n    else\n        if <(chat) = [3]> then\n            say (item (3) of [chat v]) for (2) seconds\n        else\n            if <(chat) = [4]> then\n                say (item (4) of [chat v]) for (2) seconds\n            else\n                if <(chat) = [5]> then\n                    say (item (5) of [chat v]) for (2) seconds\n                else\n                    if <(chat) = [6]> then\n                        say (item (6) of [chat v]) for (2) seconds\n                    else\n                        if <(chat) = [7]> then\n                            say (item (7) of [chat v]) for (2) seconds\n                        else\n                            if <(chat) = [8]> then\n                                say (item (8) of [chat v]) for (2) seconds\n                            else\n                                if <(chat) = [9]> then\n                                    say (item (9) of [chat v]) for (2) seconds\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\n\nwhen I receive [decode chat v]\nDecode Chat (value)\n\nreplace item (4) of [chat v] with [PARTY!!!]\n\n@Shop//USER_INTERFACE\n\nwhen flag clicked\nSETUP\nforever\n    if <<<touching (mouse-pointer v)?> and <mouse down?>> and <(openmenu?) = [0]>> then\n        set [clickshop v] to [1]\n        repeat (7)\n            change [ghost v] effect by (15)\n        end\n        set [clickshop v] to [0]\n        set [shop_ghost v] to [100]\n        switch costume to (shop v)\n        set [y_shop v] to [-105]\n        set [openmenu? v] to [1]\n        repeat until <(y_shop) > [-1]>\n            change [y_shop v] by (((4) - (y_shop)) / (8))\n            change [ghost v] effect by (-10)\n            if <(shop_ghost) > [9]> then\n                change [shop_ghost v] by (-10)\n            end\n        end\n        repeat until <(close#) = [1]>\n            switch costume to (b1 v)\n            if <touching (mouse-pointer v)?> then\n                switch costume to (shopb v)\n                if <mouse down?> then\n                    set [close# v] to [1]\n                end\n            else\n                switch costume to (shop v)\n            end\n            if <<touching (mouse-pointer v)?> and <mouse down?>> then\n                set [clickshop v] to [1]\n            else\n                set [clickshop v] to [0]\n            end\n        end\n        set [openmenu? v] to [0]\n        set [close# v] to [0]\n        repeat until <(y_shop) < [-99]>\n            change [y_shop v] by (((y_shop) - (21)) / (7))\n            change [ghost v] effect by (8.5)\n            if <(shop_ghost) < [91]> then\n                change [shop_ghost v] by (10)\n            end\n            if <(y_shop) < [-30]> then\n                set [clickshop v] to [0]\n            end\n        end\n        switch costume to (button v)\n        set [y_shop v] to [0]\n        repeat (7)\n            change [ghost v] effect by (-15)\n        end\n    end\nend\n\nwhen I start as a clone\nset [ghost v] effect to (100)\nshow\nif <(costume [name v]) = [coins]> then\n    go to x: (0) y: (0)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nelse\n    if <(letter (1) of (@clone)) = [v]> then\n        set [ghost v] effect to (100)\n        set [brightness v] effect to (100)\n        forever\n            if <(letter (4) of (@clone)) = [1]> then\n                switch costume to (join (letter (1) of (coins)) [a])\n            else\n                if <(letter (4) of (@clone)) = [2]> then\n                    switch costume to (join (letter (2) of (coins)) [a])\n                    if <(letter (1) of (coins)) = [1]> then\n                        set x to (202)\n                    else\n                        set x to (205)\n                    end\n                else\n                    if <(letter (4) of (@clone)) = [3]> then\n                        switch costume to (join (letter (3) of (coins)) [a])\n                        if <<(letter (2) of (coins)) = [1]> or <(letter (1) of (coins)) = [1]>> then\n                            if <<(letter (1) of (coins)) = [1]> and <(letter (2) of (coins)) = [1]>> then\n                                set x to (214)\n                            else\n                                set x to (217)\n                            end\n                        else\n                            set x to (220)\n                        end\n                    end\n                end\n            end\n        end\n    else\n        if <(costume [name v]) = [heart]> then\n            forever\n                if <(win) = [1]> then\n                    change [ghost v] effect by (10)\n                else\n                    if <(@clone) > (lives)> then\n                        change [ghost v] effect by (25)\n                    else\n                        change [ghost v] effect by (-25)\n                    end\n                end\n            end\n        else\n            if <(letter (1) of (@clone)) = [d]> then\n                go to x: (0) y: (0)\n                set size to (100) %\n            end\n        end\n        if <(letter (2) of (@clone)) = [1]> then\n            switch costume to (c1 v)\n            forever\n                set [ghost v] effect to (shop_ghost)\n                if <<<mouse down?> and <touching (mouse-pointer v)?>> and <(openmenu?) = [1]>> then\n                    if <<(coins) > [4]> and <(mousewait) = [0]>> then\n                        change [total coins v] by (-5)\n                        set [mousewait v] to [1]\n                        add [Red - Laser Tag Set] to [gifts v]\n                        broadcast (purch v)\n                        repeat (5)\n                            change [ghost v] effect by (20)\n                        end\n                        switch costume to (c1b v)\n                        repeat (10)\n                            change [ghost v] effect by (-10)\n                        end\n                    end\n                end\n            end\n        else\n            if <(letter (2) of (@clone)) = [2]> then\n                switch costume to (c2 v)\n                forever\n                    set [ghost v] effect to (shop_ghost)\n                    if <<<mouse down?> and <touching (mouse-pointer v)?>> and <(openmenu?) = [1]>> then\n                        if <<(coins) > [9]> and <(mousewait) = [0]>> then\n                            change [total coins v] by (-10)\n                            set [mousewait v] to [1]\n                            add [Yellow - Costume] to [gifts v]\n                            broadcast (purch v)\n                            repeat (5)\n                                change [ghost v] effect by (20)\n                            end\n                            switch costume to (c2a v)\n                            repeat (10)\n                                change [ghost v] effect by (-10)\n                            end\n                        end\n                    end\n                end\n            else\n                if <(letter (2) of (@clone)) = [3]> then\n                    switch costume to (c3 v)\n                    forever\n                        set [ghost v] effect to (shop_ghost)\n                        if <<<mouse down?> and <touching (mouse-pointer v)?>> and <(openmenu?) = [1]>> then\n                            if <<(mousewait) = [0]> and <(coins) > [19]>> then\n                                change [total coins v] by (-20)\n                                set [mousewait v] to [1]\n                                add [Blue - Camera] to [gifts v]\n                                broadcast (purch v)\n                                repeat (5)\n                                    change [ghost v] effect by (20)\n                                end\n                                switch costume to (c3a v)\n                                repeat (10)\n                                    change [ghost v] effect by (-10)\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\n\nwhen I receive [tick v]\nif <(@clone) = [shop]> then\n    set y to (y_shop)\n    if <not <mouse down?>> then\n        set [mousewait v] to [0]\n    end\nelse\n    go to [front v] layer\n    if <<(costume [name v]) = [coins]> or <(costume [name v]) = [heart]>> then\n        set y to (Y_SHAKE)\n    else\n        if <(letter (1) of (@clone)) = [v]> then\n            set y to ((Y_SHAKE) + (147))\n        else\n            if <(letter (1) of (@clone)) = [d]> then\n                set y to (y_shop)\n                if <touching (mouse-pointer v)?> then\n                    set [brightness v] effect to (5)\n                else\n                    set [brightness v] effect to (0)\n                end\n            end\n        end\n    end\nend\n\nwhen I receive [win!! v]\nrepeat (30)\n    change [ghost v] effect by (10)\nend\nhide\n\nwhen I receive [hide v]\nshow\nif <<<(costume [name v]) = [coins]> or <(@clone) = [shop]>> or <(letter (1) of (@clone)) = [v]>> then\n    repeat (30)\n        change [ghost v] effect by (-10)\n    end\nend\n\ndefine SETUP\ngo to x: (0) y: (0)\nset size to (100) %\nhide\nset [@clone v] to [1]\nswitch costume to (coins v)\nset [@clone v] to [coins]\ncreate clone of (_myself_ v)\nset [openmenu? v] to [0]\nset size to (35) %\nswitch costume to (3a v)\ngo to x: (190) y: (147)\nset [@clone v] to [val1]\nrepeat (3)\n    create clone of (_myself_ v)\n    set [@clone v] to (join [val] ((letter (4) of (@clone)) + (1)))\n    change x by (15)\nend\nset [@clone v] to [d1]\nrepeat (3)\n    create clone of (_myself_ v)\n    set [@clone v] to (join [d] ((letter (2) of (@clone)) + (1)))\nend\nswitch costume to (button v)\nset size to (100) %\nshow\ngo to x: (0) y: (0)\nclear graphic effects\nset [close# v] to [0]\nset [@clone v] to [shop]\nset [clickshop v] to [0]\nset [mousewait v] to [0]\nset [emojichat? v] to [0]\nset [parachute v] to [0]\nset [shop_ghost v] to [100]\n\nwhen flag clicked\nforever\n    go to [front v] layer\nend\n\nwhen I start as a clone\nif <(letter (1) of (@clone)) = [v]> then\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\n\nwhen flag clicked\nforever\n    set [coins v] to (TOTAL COINS)\nend\n\nwhen flag clicked\nset [total coins v] to [0]\n\nwhen flag clicked\ndelete all of [gifts v]\n\n@Shop//Gifts\n\nwhen flag clicked\nforever\n    hide\n    if <(LEVEL) > [6]> then\n        if <<key (r v) pressed?> or <<key (s v) pressed?> or <key (b v) pressed?>>> then\n            create clone of (_myself_ v)\n        end\n    end\nend\n\nwhen I start as a clone\nshow\nif <<key (r v) pressed?> and <[gifts v] contains [Red - Laser Tag Set]?>> then\n    switch costume to (costume1 v)\n    Quick Check [Red - Laser Tag Set]\n    go to (characters//player v)\n    glide (0.5) secs to (shop//birthday boy \(or girl\) v)\n    delete this clone\nend\nif <<key (s v) pressed?> and <[gifts v] contains [Yellow - Costume]?>> then\n    switch costume to (costume2 v)\n    Quick Check [Yellow - Costume]\n    go to (characters//player v)\n    glide (0.5) secs to (shop//birthday boy \(or girl\) v)\n    delete this clone\nend\nif <<key (b v) pressed?> and <[gifts v] contains [Blue - Camera]?>> then\n    switch costume to (costume3 v)\n    Quick Check [Blue - Camera]\n    go to (characters//player v)\n    glide (0.5) secs to (shop//birthday boy \(or girl\) v)\n    delete this clone\nend\ndelete this clone\n\ndefine Quick Check (color of gift)\nset [quick check # v] to [0]\nrepeat (3)\n    change [quick check # v] by (1)\n    if <(item (Quick Check #) of [gifts v]) = (color of gift)> then\n        delete (Quick Check #) of [gifts v]\n    end\nend\n\nset [total coins v] to [35]\nset [level v] to [6]\n\n@Shop//Birthday Boy (Or Girl)\n\nwhen I receive [green flag v]\nhide\n\nwhen I receive [tick v]\nPosition ((Birthday Cube: X) - (SCROLL X)) ((Birthday Cube: Y) - (SCROLL Y))\n\nwhen I receive [setup v]\nhide\nset [birthday cube: x v] to [0]\nset [birthday cube: y v] to [0]\nif <(LEVEL) > [6]> then\n    switch costume to (costume1 v)\n    Clone at x: [150] y: [-50]\nelse\n    set [birthday cube: x v] to [-999999999999]\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\nif <<touching (characters//player v)?> and <(costume [number v]) = [1]>> then\n    say [Do you have any presents for me? You can buy some in the shop.]\nelse\n    say []\nend\n\nwhen I receive [reset v]\ndelete this clone\n\ndefine Clone at x: (x) y: (y)\nset [birthday cube: x v] to (x)\nset [birthday cube: y v] to (y)\n\nwhen flag clicked\nwait until <[gifts v] contains [Red - Laser Tag Set]?>\nwait until <not <[gifts v] contains [Red - Laser Tag Set]?>>\nset [#clone v] to [1]\ncreate clone of (_myself_ v)\n\nwhen I start as a clone\nif <(#clone) = [1]> then\n    wait (0.5) seconds\n    go to [front v] layer\n    switch costume to (costume2 v)\n    Clone at x: [150] y: [-50]\nelse\n    if <(#clone) = [2]> then\n        wait (0.5) seconds\n        go to [front v] layer\n        switch costume to (costume3 v)\n        Clone at x: [150] y: [-50]\n    else\n        wait (0.5) seconds\n        go to [front v] layer\n        switch costume to (costume4 v)\n        Clone at x: [150] y: [-50]\n    end\nend\n\nwhen flag clicked\nwait until <[gifts v] contains [Yellow - Costume]?>\nwait until <not <[gifts v] contains [Yellow - Costume]?>>\nset [#clone v] to [2]\ncreate clone of (_myself_ v)\n\nwhen flag clicked\nwait until <[gifts v] contains [Blue - Camera]?>\nwait until <not <[gifts v] contains [Blue - Camera]?>>\nset [#clone v] to [3]\ncreate clone of (_myself_ v)\n\n@Shop//gifts\n\nwhen flag clicked\nswitch costume to (costume1 v)\nforever\n    if <key (g v) pressed?> then\n        show\n    else\n        hide\n    end\nend\n\nwhen flag clicked\nforever\n    wait until <key (g v) pressed?>\n    go to [front v] layer\nend\n\nwhen flag clicked\nwait until <[gifts v] contains [Red - Laser Tag Set]?>\nset [#clone v] to [R]\ncreate clone of (_myself_ v)\n\nwhen I start as a clone\ngo to [front v] layer\nif <(#clone) = [R]> then\n    switch costume to (costume2 v)\nend\nif <(#clone) = [Y]> then\n    switch costume to (costume4 v)\nend\nif <(#clone) = [B]> then\n    switch costume to (costume3 v)\nend\nforever\n    if <key (g v) pressed?> then\n        go to [front v] layer\n        show\n    else\n        hide\n    end\nend\n\nwhen flag clicked\nwait until <[gifts v] contains [Yellow - Costume]?>\nset [#clone v] to [Y]\ncreate clone of (_myself_ v)\n\nwhen flag clicked\nwait until <[gifts v] contains [Blue - Camera]?>\nset [#clone v] to [B]\ncreate clone of (_myself_ v)\n\n@Elements//Platforms\n\nwhen I receive [green flag v]\nhide\n\nwhen I receive [tick v]\nPosition ((Platforms: x) - (SCROLL X)) ((Platforms: y) - (SCROLL Y))\n\nwhen I receive [setup v]\nhide\nset [platforms: x v] to [0]\nset [platforms: y v] to [0]\nif <(LEVEL) = [1]> then\n    switch costume to (level 1 1 v)\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\nelse\n    if <(LEVEL) = [2]> then\n        switch costume to (level 2 1 v)\n        Clone at x: [480] y: [0]\n        Clone at x: [480] y: [0]\n        Clone at x: [480] y: [0]\n    else\n        if <(LEVEL) = [3]> then\n            switch costume to (level 3 1 v)\n            Clone at x: [480] y: [0]\n            Clone at x: [600] y: [0]\n        else\n            if <(LEVEL) = [4]> then\n                switch costume to (level 4 1 v)\n                Clone at x: [480] y: [0]\n                Clone at x: [480] y: [0]\n            else\n                if <(LEVEL) = [5]> then\n                    switch costume to (level 5 1 v)\n                    Clone at x: [480] y: [0]\n                    Clone at x: [-480] y: [480]\n                else\n                    if <(LEVEL) = [6]> then\n                        switch costume to (level 6 1 v)\n                        Clone at x: [480] y: [0]\n                        Clone at x: [480] y: [0]\n                        Clone at x: [480] y: [0]\n                    else\n                        switch costume to (level 7 1 v)\n                    end\n                end\n            end\n        end\n    end\nend\n\ndefine Position (x) (y)\nset size to (100) %\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 [platforms: x v] by (x)\nchange [platforms: y v] by (y)\nnext costume\n\nnext costume\nnext costume\n\ncreate clone of (_myself_ v)\n\n@Elements//DANGER\n\nwhen I receive [green flag v]\nhide\n\nwhen I receive [tick v]\nPosition ((DANGER: x) - (SCROLL X)) ((DANGER: y) - (SCROLL Y))\n\nwhen I receive [setup v]\nhide\nset [danger: x v] to [0]\nset [danger: y v] to [0]\nif <(LEVEL) = [1]> then\n    switch costume to (level 1 1 v)\n    Clone at x: [360] y: [0]\nelse\n    if <(LEVEL) = [2]> then\n        switch costume to (level 2 1 v)\n        Clone at x: [480] y: [0]\n    else\n        if <(LEVEL) = [4]> then\n            switch costume to (level 4 1 v)\n        else\n            if <(LEVEL) = [5]> then\n                switch costume to (level 5 1 v)\n                Clone at x: [480] y: [0]\n            else\n                if <(LEVEL) = [6]> then\n                    switch costume to (level 6 1 v)\n                    Clone at x: [480] y: [0]\n                else\n                    switch costume to (level 1 1 v)\n                end\n            end\n        end\n    end\nend\n\ndefine Position (x) (y)\ngo to [back v] layer\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 [danger: x v] by (x)\nchange [danger: y v] by (y)\nnext costume\n\n@Elements//Landscape\n\nwhen I receive [green flag v]\nhide\n\nwhen I receive [tick v]\nPosition ((Platforms: x) - (SCROLL X)) ((Platforms: y) - (SCROLL Y))\n\nwhen I receive [setup v]\nhide\nset [platforms: x v] to [0]\nset [platforms: y v] to [0]\nif <(LEVEL) = [1]> then\n    switch costume to (level 1 1 v)\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\n    Clone at x: [480] y: [0]\nelse\n    if <(LEVEL) = [2]> then\n        switch costume to (level 2 1 v)\n        Clone at x: [480] y: [0]\n        Clone at x: [480] y: [0]\n    else\n        if <(LEVEL) = [3]> then\n            switch costume to (level 3 1 v)\n            Clone at x: [480] y: [0]\n        else\n            if <(LEVEL) = [4]> then\n                switch costume to (level 4 1 v)\n            else\n                if <(LEVEL) = [5]> then\n                    switch costume to (level 5 1 v)\n                    Clone at x: [480] y: [0]\n                    Clone at x: [-480] y: [480]\n                    Clone at x: [480] y: [0]\n                else\n                    if <(LEVEL) = [6]> then\n                        switch costume to (level 6 1 v)\n                        Clone at x: [480] y: [0]\n                        Clone at x: [480] y: [0]\n                    else\n                        switch costume to (level 7 1 v)\n                    end\n                end\n            end\n        end\n    end\nend\n\ndefine Position (x) (y)\ngo to [back v] layer\nset size to (100) %\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 [platforms: x v] by (x)\nchange [platforms: y v] by (y)\nnext costume\n\nnext costume\nnext costume\n\ncreate clone of (_myself_ v)\n\n@Elements//Joining\n\nwhen flag clicked\nhide\n\nwhen I receive [begin v]\nwait (1) seconds\nhide\n\nwhen I receive [connecting v]\nswitch costume to (joining v)\nshow\n\nwhen I receive [connected v]\ngo to [front v] layer\nswitch costume to (connected v)\nshow\nwait (1) seconds\nrepeat (10)\n    change [ghost v] effect by (10)\nend\n\nwhen I receive [full v]\ngo to [front v] layer\nswitch costume to (full  v)\nshow\n\n@Elements//Saws\n\nwhen I receive [green flag v]\nhide variable [mouse v]\nhide\n\nwhen I receive [tick v]\nturn right (10) degrees\nPosition ((Saws: x) - (SCROLL X)) ((Saws: y) - (SCROLL Y))\nif <touching (elements//pillow v)?> then\n    delete this clone\nend\ngo to [back v] layer\n\nwhen I receive [setup v]\nhide\nset [collected v] to [0]\nset [saws: x v] to [0]\nset [saws: y v] to [0]\nif <(LEVEL) = [1]> then\n    Clone at x: [-150] y: [-50]\n    Clone at x: [530] y: [-50]\nelse\n    if <(LEVEL) = [2]> then\n        Clone at x: [-250] y: [-50]\n        Clone at x: [500] y: [-50]\n    else\n        if <(LEVEL) = [4]> then\n            Clone at x: [120] y: [-10]\n            Clone at x: [200] y: [-120]\n            Clone at x: [350] y: [-120]\n            Clone at x: [430] y: [-120]\n            Clone at x: [510] y: [-120]\n            Clone at x: [590] y: [-120]\n            Clone at x: [670] y: [-120]\n            Clone at x: [750] y: [-120]\n        else\n            if <(LEVEL) = [6]> then\n                Clone at x: [694] y: [105]\n                Clone at x: [549] y: [105]\n            else\n                if <(LEVEL) = [7]> then\n                    Clone at x: [-150] y: [105]\n                    Clone at x: [-150] y: [55]\n                    Clone at x: [-150] y: [5]\n                    Clone at x: [-150] y: [-55]\n                    Clone at x: [-150] y: [-105]\n                else\n                end\n            end\n        end\n    end\nend\nset [saws: x v] to [-999999]\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 [saws: x v] to (x)\nset [saws: y v] to (y)\ncreate clone of (_myself_ v)\n\nClone at x: [340] y: [27]\nClone at x: [530] y: [27]\nClone at x: [786] y: [27]\nClone at x: [1124] y: [27]\nClone at x: [1331] y: [245]\nClone at x: [1065] y: [345]\nClone at x: [825] y: [272]\nClone at x: [392] y: [245]\nClone at x: [197] y: [335]\n\nClone at x: [631] y: [11]\n\n@Elements//Collectables\n\nwhen I receive [green flag v]\nhide\n\nwhen I receive [tick v]\nnext costume\nPosition ((Collectables: x) - (SCROLL X)) ((Collectables: y) - (SCROLL Y))\nif <touching (characters//player v)?> then\n    change [collected v] by (1)\n    change [total coins v] by (1)\n    delete this clone\nend\n\nwhen I receive [setup v]\nset [collected max v] to [0]\nset [coins v] to [0]\nhide\nset [collectables: x v] to [0]\nset [collectables: y v] to [0]\nif <(LEVEL) = [1]> then\n    switch costume to (pick random (1) to (11))\n    Clone at x: [140] y: [50]\n    switch costume to (pick random (1) to (11))\n    Clone at x: [-220] y: [83]\nelse\n    if <(LEVEL) = [2]> then\n        switch costume to (pick random (1) to (11))\n        Clone at x: [-170] y: [70]\n        switch costume to (pick random (1) to (11))\n        Clone at x: [-170] y: [-10]\n        switch costume to (pick random (1) to (11))\n        Clone at x: [295] y: [55]\n        switch costume to (pick random (1) to (11))\n        Clone at x: [500] y: [55]\n    else\n        if <(LEVEL) = [3]> then\n            switch costume to (pick random (1) to (11))\n            Clone at x: [-170] y: [70]\n            switch costume to (pick random (1) to (11))\n            Clone at x: [295] y: [70]\n            switch costume to (pick random (1) to (11))\n            Clone at x: [700] y: [70]\n        else\n            if <(LEVEL) = [4]> then\n                switch costume to (pick random (1) to (11))\n                Clone at x: [-180] y: [-70]\n                switch costume to (pick random (1) to (11))\n                Clone at x: [-100] y: [-70]\n            else\n                if <(LEVEL) = [5]> then\n                    switch costume to (pick random (1) to (11))\n                    Clone at x: [-133] y: [66]\n                    switch costume to (pick random (1) to (11))\n                    Clone at x: [159] y: [69]\n                else\n                    if <(LEVEL) = [6]> then\n                        switch costume to (pick random (1) to (11))\n                        Clone at x: [-200] y: [200]\n                        switch costume to (pick random (1) to (11))\n                        Clone at x: [523] y: [84]\n                        switch costume to (pick random (1) to (11))\n                        Clone at x: [708] y: [90]\n                    else\n                        if <(LEVEL) = [7]> then\n                            switch costume to (pick random (1) to (11))\n                            Clone at x: [-200] y: [70]\n                            switch costume to (pick random (1) to (11))\n                            Clone at x: [-200] y: [-10]\n                            switch costume to (pick random (1) to (11))\n                            Clone at x: [-200] y: [30]\n                            switch costume to (pick random (1) to (11))\n                            Clone at x: [-200] y: [-50]\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\nset [collectables: x v] to [-9999999999]\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 [collectables: x v] to (x)\nset [collectables: y v] to (y)\ncreate clone of (_myself_ v)\nchange [collected max v] by (1)\n\nwhen flag clicked\nforever\n    if <(COLLECTED MAX) = (COLLECTED)> then\n        broadcast (Open Portal v)\n    end\nend\n\n@Elements//Exit\n\nwhen I receive [green flag v]\nhide\n\nwhen I receive [tick v]\nPosition ((Exit: x) - (SCROLL X)) ((Exit: y) - (SCROLL Y))\nif <<(distance to [characters//player v]) < [100]> and <(costume [number v]) = [1]>> then\n    set [exit v] to [win]\nend\n\nwhen I receive [setup v]\nhide\nset [collected v] to [0]\nset [exit: x v] to [0]\nset [exit: y v] to [0]\nif <(LEVEL) = [1]> then\n    switch costume to (closed v)\n    Clone at x: [1898] y: [240]\nelse\n    if <(LEVEL) = [2]> then\n        switch costume to (closed v)\n        Clone at x: [916] y: [50]\n    else\n        if <(LEVEL) = [3]> then\n            switch costume to (closed v)\n            Clone at x: [900] y: [-30]\n        else\n            if <(LEVEL) = [4]> then\n                switch costume to (closed v)\n                Clone at x: [916] y: [50]\n            else\n                if <(LEVEL) = [5]> then\n                    switch costume to (closed v)\n                    Clone at x: [-100] y: [360]\n                else\n                    if <(LEVEL) = [6]> then\n                        switch costume to (closed v)\n                        Clone at x: [1250] y: [20]\n                    else\n                        Clone at x: [3148734] y: [3273459]\n                    end\n                end\n            end\n        end\n    end\nend\n\ndefine Position (x) (y)\ngo to [back v] layer\ngo [forward v] (7) layers\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 [exit: x v] to (x)\nset [exit: y v] to (y)\n\nwhen I receive [open portal v]\nswitch costume to (open v)\n\n@Elements//Pillow\n\nwhen I start as a clone\nwait until <not <key (p v) pressed?>>\ngo to x: ([x position v] of [characters//player v]) y: (([y position v] of [characters//player v]) + (10))\ngo to [front v] layer\nshow\nset [ghost v] effect to (0)\nforever\n    move (15) steps\n    if <touching (_edge_ v)?> then\n        delete this clone\n    end\nend\n\nwhen I receive [connected v]\nset rotation style [left-right v]\nshow\nforever\n    if <key (left arrow v) pressed?> then\n        point in direction (-90)\n    end\n    if <key (right arrow v) pressed?> then\n        point in direction (90)\n    end\n    hide\n    if <key (p v) pressed?> then\n        create clone of (_myself_ v)\n    end\nend\n\n@Multiplayer//Chat\n\nwhen I receive [tick v]\nif <(Chat) = [1]> then\n    show\n    go to [front v] layer\nelse\n    hide\n    go to [back v] layer\nend\nif <key (space v) pressed?> then\n    broadcast (Chat Close v)\n    hide\n    go to [back v] layer\n    wait until <not <key (space v) pressed?>>\nend\n\nwhen I receive [green flag v]\nhide\n\nwhen flag clicked\nhide\n\nwhen I receive [chat open v]\nset [chat v] to [1]\n\nwhen I receive [chat close v]\nset [chat v] to [0]\n\n@Multiplayer//Loading\n\nwhen flag clicked\ngo [forward v] (213) layers\nset size to (100) %\nhide\npoint in direction (90)\nclear graphic effects\ngo to x: (0) y: (-80)\n\nwhen I receive [connecting v]\nrepeat (11)\n    create clone of (_myself_ v)\n    turn right (40) degrees\nend\n\nwhen I receive [connected v]\nrepeat (10)\n    change [ghost v] effect by (10)\nend\ndelete this clone\n\nwhen I start as a clone\nshow\nset [ghost v] effect to (100)\nforever\n    repeat (20)\n        turn right (7.5) degrees\n        change [ghost v] effect by (-6)\n        change size by (1)\n    end\n    repeat (20)\n        turn right (7.5) degrees\n        change [ghost v] effect by (6)\n        change size by (-1)\n    end\nend\n\n@Multiplayer//Chat Button\n\nwhen I receive [tick v]\nif <touching (mouse-pointer v)?> then\n    repeat until <(size) > [119]>\n        change [size v] by (.9)\n        change size by (size)\n    end\n    if <mouse down?> then\n        broadcast (Chat Open v)\n        hide\n        wait until <not <mouse down?>>\n    end\nelse\n    repeat until <(size) < [101]>\n        set [size v] to [-.8]\n        change [size v] by (-.9)\n        change size by (size)\n    end\nend\n\nwhen I receive [chat close v]\nset size to (100) %\nset [ghost v] effect to (100)\nshow\nrepeat (10)\n    change [ghost v] effect by (-10)\nend\n\nwhen I receive [begin v]\nset [size v] to [.8]\nshow\nrepeat (40)\n    change [ghost v] effect by (-3)\nend\n\nwhen flag clicked\ngo to [front v] layer\nhide\ngo to x: (0) y: (0)\nchange [ghost v] effect by (100)\n\nwhen flag clicked\ngo to x: (-193) y: (-156)\nset size to (100) %\n\n@Multiplayer//Detector\n\nwhen flag clicked\nhide\nset [faved___ v] to [0]\nset [loved__ v] to [0]\nset [clone id v] to [0]\ncreate clone of (_myself_ v)\nwait (0.2) seconds\nset [clone id v] to [1]\ncreate clone of (_myself_ v)\nwait until <<(LOVED__) = [1]> and <(FAVED___) = [1]>>\nwait (1) seconds\nbroadcast (Thanks v)\n\ngo to x: (0) y: (0)\nshow\nreset timer\nswitch costume to (pick random (1) to (4))\nset [ghost v] effect to (100)\nrepeat until <(timer) > [3.5]>\n    change y by ((y position) / (-15))\n    change [ghost v] effect by (-3)\nend\nreset timer\nrepeat until <(timer) > [3.5]>\n    change y by (((y position) - (-100)) / (-15))\n    change [ghost v] effect by (10)\nend\n\nwhen I start as a clone\nif <(clone id) = [0]> then\n    go to x: (-15) y: (0)\n    set [loved__ v] to [0]\n    switch costume to (love v)\n    forever\n        set [love? v] to <touching (mouse-pointer v)?>\n        if <touching (mouse-pointer v)?> then\n            set [loved__ v] to [1]\n        end\n    end\nend\nif <(clone id) = [1]> then\n    go to x: (0) y: (0)\n    switch costume to (fave v)\n    set [faved___ v] to [0]\n    forever\n        set [fav v] to <touching (mouse-pointer v)?>\n        if <touching (mouse-pointer v)?> then\n            set [faved___ v] to [1]\n        end\n    end\nend\n\n@Love and Fave//Thanks\n\nwhen I receive [thanks v]\nswitch costume to (costume2 v)\ngo to x: (-210) y: (50)\nshow\ngo to [front v] layer\nrepeat (9)\n    change y by (-6)\nend\nrepeat (5)\n    change y by (3)\nend\nrepeat (5)\n    change y by (-3)\nend\nwait (1) seconds\nrepeat (10)\n    change y by (6)\nend\nhide\n\nwhen I start as a clone\ngo to x: (0) y: (-50)\nshow\ngo to [front v] layer\nrepeat (12)\n    change y by (-9)\nend\nrepeat (5)\n    change y by (3)\nend\nrepeat (5)\n    change y by (-1)\nend\nforever\n    if <touching (mouse-pointer v)?> then\n        set [ghost v] effect to (50)\n        if <(costume [number v]) = [2]> then\n            if <mouse down?> then\n                set [costume v] to [2]\n                repeat (25)\n                    change y by (10)\n                end\n                hide\n                delete this clone\n            end\n        else\n            if <(costume [number v]) = [3]> then\n                if <mouse down?> then\n                    set [costume v] to [1]\n                    repeat (25)\n                        change y by (15)\n                    end\n                    hide\n                    delete this clone\n                end\n            end\n        end\n    else\n        set [ghost v] effect to (0)\n    end\n    if <(Costume) > [0.99]> then\n        repeat (25)\n            change y by (15)\n        end\n        hide\n        delete this clone\n    end\n    hide\n    delete this clone\nend\n\nwhen flag clicked\nhide\nset [costume v] to [0.9]\n\nwhen I receive [begin v]\nset [costume v] to [0.9]\nwait (0.1) seconds\nset [costume v] to [0.9]\nwait (0.2) seconds\nset [costume v] to [0.9]\n\nwhen I receive [thanks v]\nchange [total coins v] by (15)\n\n@Love and Fave//Love fave\n\nwhen flag clicked\nset [costume v] to [0]\nhide\nforever\n    if <not <<(LOVED__) = [1]> and <(FAVED___) = [1]>>> then\n        wait (pick random (30) to (40)) seconds\n        switch costume to (costume1 v)\n        go to x: (0) y: (50)\n        show\n        go to [front v] layer\n        repeat (9)\n            change y by (-6)\n        end\n        repeat (5)\n            change y by (3)\n        end\n        repeat (5)\n            change y by (-1)\n        end\n        wait (2) seconds\n        repeat (15)\n            change y by (7)\n        end\n        hide\n    end\n    if <(Costume) > [0]> then\n        hide\n        stop [this script v]\n    end\nend\n\n@Mute//Mute\n\nwhen flag clicked\nswitch costume to (costume2 v)\nshow\ngo to x: (180) y: (-140)\ngo to [front v] layer\nforever\n    point in direction ((([sin v] of ((timer) * (300)) ) * (5)) + (90))\n    if <touching (mouse-pointer v)?> then\n        change size by (((100) - (size)) / (3))\n        set [ghost v] effect to (0)\n    else\n        change size by (((60) - (size)) / (3))\n        set [ghost v] effect to (60)\n    end\n    if <(costume [number v]) = [1]> then\n        set volume to (0) %\n    else\n        set volume to (100) %\n    end\nend\n\nwhen this sprite clicked\nnext costume\nif <(costume [number v]) = [1]> then\n    broadcast (Never Mute v)\nend\n\nwhen flag clicked\nplay sound [Nebula v] until done\nforever\n    play sound ["Nebula" v] until done\nend\n\nif <not <(username) = [AfterShowerandLunch]>> then\n\n@Mute//Hey you! -Xaf- is awesome!!!\n\nwhen flag clicked\ngo to x: (0) y: (0)\nhide\n\nwhen I receive [never mute v]\nshow\ngo to [front v] layer\nswitch costume to (costume1 v)\nrepeat (50)\n    go to x: (pick random (-5) to (5)) y: (pick random (-5) to (5))\nend\nnext costume\nwait (3) seconds\nhide\n\n