|| ☁ Scratchland™️ ☁ || Amusement Park || Multiplayer Scrolling Platformer ||

Instructions: ▬▬▬▬▬▬▬▬▬▬Welcome!▬▬▬▬▬▬▬▬▬▬▬\nWelcome to Scratchland™️, an amusement park based on Scratch! I had this idea because one of my favorite things to do is go to amusement parks with my family/friends. Lately, we haven't been able to do that because of quarantine, so I programmed this alternative on Scratch! Enjoy!\n\n▬▬▬▬▬▬▬▬▬▬Directions▬▬▬▬▬▬▬▬▬▬▬\n<<Arrow Keys/AWSD/Mouse to move>>\n<<To open the menu, hover over it.>>\n<<Use the mouse to click the buttons>>\n<<Collect coins by touching them>>\n<<Chat by clicking the chat button>>\n<<Open the map by clicking the map button>>\n<<Have Fun!!>>\n*Most of the instructions are self-explanatory, but if you have any questions, just comment them. :)\n\n▬▬▬▬▬▬▬▬▬Contest Entry▬▬▬▬▬▬▬▬▬▬\nTHIS WON THE CONTEST OMG :DD\n\n▬▬▬▬▬▬▬Also, please scroll down▬▬▬▬▬▬▬\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\n\n\n\n\n\n--If you're reading this, comment "Scratchland Rocks!"--

@Stage\n\nwhen flag clicked\nswitch backdrop to (white v)\nset [music? v] to [1]\nset volume to (100) %\nforever\n    play sound [Vexento - Norway \(128 kbps\) v] until done\nend\n\nwhen I receive [joined! v]\nstart sound [Connect v]\nswitch backdrop to (connected v)\nwait (2) seconds\nswitch backdrop to (white v)\n\nwhen I receive [full v]\nstart sound [Disconnect v]\nswitch backdrop to (game full v)\nwait (2) seconds\nswitch backdrop to (white v)\n\nwhen I receive [new scratcher v]\nstart sound [Disconnect v]\nswitch backdrop to (new scratcher v)\nwait (2) seconds\nswitch backdrop to (white v)\n\nwhen I receive [not signed in v]\nstart sound [Disconnect v]\nswitch backdrop to (not signed in v)\nwait (2) seconds\nswitch backdrop to (white v)\n\nwhen I receive [connecting... v]\nswitch backdrop to (connecting v)\n\nwhen I receive [tick v]\nif <(Music?) = [1]> then\n    set volume to (100) %\nelse\n    set volume to (0) %\nend\n\nwhen I receive [food chat v]\nstart sound [Bite v]\n\n@Player\n\ndefine Scratcher Status Detector\nset [scratcher status v] to []\nif <(username) = []> then\n    set [scratcher status v] to [Not Signed In]\nelse\n    set [scratcher status detector 2 v] to (☁ Scratcher Status Detector)\n    change [☁ scratcher status detector v] by (1)\n    if <(☁ Scratcher Status Detector) = (Scratcher Status Detector 2)> then\n        set [scratcher status v] to [New Scratcher]\n    else\n        set [scratcher status v] to [Scratcher]\n    end\nend\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    Setup\n    forever\n        if <(Pause?) = [yes]> then\n            Send Cloud Data\n            broadcast (Update Cloud v) and wait\n        else\n            set [pause? v] to [no]\n            Tick\n            broadcast (Tick v) and wait\n        end\n    end\nend\n\ndefine Setup\npoint in direction (90)\nset rotation style [left-right v]\nset [player_x v] to [-122]\nset [player_y v] to [0]\nset [speed_y v] to [0]\nset [speed_x v] to [0]\nset [>>> player in air v] to [0]\nset [pause? v] to []\nset [scroll x v] to [0]\nset [scroll y v] to [0]\nset [>>> player frame v] to [0]\nset [ticket bought? v] to [0]\nset size to (35) %\nclear graphic effects\nshow\n\ndefine Tick\nswitch costume to (hitbox v)\nif <touching (water v)?> then\n    change [>>> player frame v] by ([abs v] of ((Speed_X) / (30)) )\nelse\n    change [>>> player frame v] by ([abs v] of ((Speed_X) / (15)) )\nend\nif <<<key (left arrow v) pressed?> or <key (a v) pressed?>> or <<mouse down?> and <(mouse x) < (x position)>>> then\n    point in direction (-90)\n    if <touching (water v)?> then\n        change [speed_x v] by (-0.5)\n    else\n        change [speed_x v] by (-2)\n    end\nelse\n    if <<<key (right arrow v) pressed?> or <key (d v) pressed?>> or <<mouse down?> and <(mouse x) > (x position)>>> then\n        point in direction (90)\n        if <touching (water v)?> then\n            change [speed_x v] by (0.5)\n        else\n            change [speed_x v] by (2)\n        end\n    else\n        set [>>> player frame v] to [0]\n    end\nend\nif <touching (water v)?> then\n    set [speed_x v] to ((Speed_X) * (0.9))\nelse\n    set [speed_x v] to ((Speed_X) * (0.8))\nend\nif <([abs v] of (Speed_X) ) > [0.9]> then\n    Change Player X by (round (Speed_X))\nend\nif <touching (water v)?> then\n    if <<<key (up arrow v) pressed?> or <key (w v) pressed?>> or <<mouse down?> and <(mouse y) > (y position)>>> then\n        set [player falling? v] to [6]\n        change [speed_y v] by (2)\n        if <(Speed_Y) > [5]> then\n            set [speed_y v] to [5]\n        end\n    end\n    if <<<key (down arrow v) pressed?> or <key (s v) pressed?>> or <<mouse down?> and <(y position) > (mouse y)>>> then\n        set [player falling? v] to [6]\n        change [speed_y v] by (-2)\n        if <(Speed_Y) < [-5]> then\n            set [speed_y v] to [-5]\n        end\n    end\n    if <(Speed_Y) < [5]> then\n        change [speed_y v] by (0.5)\n    end\nelse\n    if <<<key (up arrow v) pressed?> or <key (w v) pressed?>> or <<mouse down?> and <(mouse y) > (y position)>>> then\n        if <(>>> Player In Air) < [4]> then\n            set [player falling? v] to [6]\n            set [speed_y v] to [16]\n        end\n    end\n    if <(Speed_Y) > [-20]> then\n        set [player falling? v] to [6]\n        change [speed_y v] by (-2)\n    end\nend\nChange Player Y by (Speed_Y)\nset [scroll x v] to (Player_X)\nset [scroll y v] to (Player_Y)\nif <(Scroll X) < [0]> then\n    set [scroll x v] to [0]\nend\nif <(Player_X) < [-240]> then\n    set [player_x v] to [-240]\nend\nif <touching (bounce v)?> then\n    set [speed_y v] to [26]\nend\nPosition\nSet Correct Costume\n\ndefine Change Player Y by (speed y)\nchange [player_y v] by (speed y)\nchange [>>> player in air v] by (1)\nPosition\nrepeat until <not <touching (level v)?>>\n    if <(speed y) > [0]> then\n        change [player_y v] by (-1)\n    else\n        change [player_y v] by (1)\n        set [>>> player in air v] to [0]\n        set [player falling? v] to [0]\n    end\n    Position\n    set [speed_y v] to [0]\nend\n\ndefine Position\ngo to x: ((Player_X) - (Scroll X)) y: ((Player_Y) - (Scroll Y))\n\ndefine Change Player X by (speed x)\nchange [player_x v] by (speed x)\nPosition\nif <touching (level v)?> then\n    repeat (12)\n        change [player_y v] by (1)\n        Position\n        if <not <touching (level v)?>> then\n            stop [this script v]\n        end\n    end\n    change [player_y v] by (-12)\n    set [speed_x v] to [0]\n    repeat until <not <touching (level v)?>>\n        if <(speed x) > [0]> then\n            change [player_x v] by (-1)\n        else\n            change [player_x v] by (1)\n        end\n        Position\n    end\nend\n\nwhen I receive [die v]\nstop [other scripts in sprite v]\nrepeat (20)\n    change y by (10)\n    turn right (15) degrees\n    change size by (-0.1)\n    change [ghost v] effect by (5)\nend\nbroadcast (Play Game 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                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\n\ndefine Send Cloud Data\nif <(MY PLAYER NUMBER!) < [1]> then\n    stop [this script v]\nend\nadd (Player_X) to [buffer v]\nadd (Player_Y) to [buffer v]\nadd (costume [number v]) to [buffer v]\nadd (direction) to [buffer v]\nchange [cloud timer v] by (1)\nif <(cloud timer) < [3]> then\n    stop [this script v]\nend\nset [cloud timer v] to [0]\nset [encoded v] to []\nWrite (username) To Encoded\nWrite (round ((timer) * (10))) To Encoded\nWrite (Chat) To Encoded\nif <(Chat) = [0]> then\n    say (join (MY PLAYER NUMBER!) (join [: ] (username)))\nelse\n    say (Chat)\nend\nrepeat (length of [buffer v])\n    Write (item (1) of [buffer v]) To Encoded\n    delete (1) of [buffer v]\nend\nSet Cloud # (MY PLAYER NUMBER!) to (Encoded)\nreplace item (MY PLAYER NUMBER!) of [players online v] with (username)\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 [tick v]\nSend Cloud Data\nbroadcast (Update Cloud v) and wait\n\nwhen flag clicked\nhide\n\ndefine Setup Lists\ndelete all of [players online v]\ndelete all of [code v]\ndelete all of [buffer v]\ndelete all of [achievements v]\nrepeat (8)\n    add [0] to [achievements v]\nend\nadd [] to [players online v]\nadd [] to [players online v]\nadd [] to [players online v]\nadd [] to [players online v]\nadd [] to [players online v]\nadd [] to [players online v]\nadd [] to [players online v]\nadd [] to [players online v]\nrepeat (9)\n    add [qwerty17] to [code v]\nend\nadd [a] to [code v]\nadd [b] to [code v]\nadd [c] to [code v]\nadd [d] to [code v]\nadd [e] to [code v]\nadd [f] to [code v]\nadd [g] to [code v]\nadd [h] to [code v]\nadd [i] to [code v]\nadd [j] to [code v]\nadd [k] to [code v]\nadd [l] to [code v]\nadd [m] to [code v]\nadd [n] to [code v]\nadd [o] to [code v]\nadd [p] to [code v]\nadd [q] to [code v]\nadd [r] to [code v]\nadd [s] to [code v]\nadd [t] to [code v]\nadd [u] to [code v]\nadd [v] to [code v]\nadd [w] to [code v]\nadd [x] to [code v]\nadd [y] to [code v]\nadd [z] to [code v]\nadd [0] to [code v]\nadd [1] to [code v]\nadd [2] to [code v]\nadd [3] to [code v]\nadd [4] to [code v]\nadd [5] to [code v]\nadd [6] to [code v]\nadd [7] to [code v]\nadd [8] to [code v]\nadd [9] to [code v]\nadd [+] to [code v]\nadd [-] to [code v]\nadd [.] to [code v]\nadd [ ] to [code v]\nadd [_] to [code v]\nadd [!] to [code v]\nadd [?] to [code v]\nadd [/] to [code v]\nadd ['] to [code v]\nadd [:] to [code v]\nadd [;] to [code v]\nadd [,] to [code v]\nadd [l] to [code v]\nset [max players v] to [8]\nset [my player number! v] to [0]\n\nwhen I receive [connecting... v]\nSetup Lists\nadd ['] to [code v]\nScratcher Status Detector\nset [cloud on? v] to [0]\nbroadcast (Green Flag v) and wait\nif <(Scratcher Status) = [Scratcher]> then\n    broadcast (Join Game v) and wait\n    if <(MY PLAYER NUMBER!) > [0]> then\n        set [cloud on? v] to [Yes]\n        broadcast (Joined! v) and wait\n    else\n        set [cloud on? v] to [No]\n        broadcast (Full v) and wait\n    end\nelse\n    if <(Scratcher Status) = [Not Signed In]> then\n        broadcast (Not Signed In v) and wait\n    end\n    if <(Scratcher Status) = [New Scratcher]> then\n        broadcast (New Scratcher v) and wait\n    end\nend\nbroadcast (Play Game v)\n\nif <(Scroll Y) < [0]> then\n    set [scroll y v] to [0]\nend\nif <(Scroll X) > [1600]> then\n    set [scroll x v] to [1600]\nend\n\ndefine Set Correct Costume\nif <(Player Falling?) < [6]> then\n    if <(Speed_X) = [0]> then\n        switch costume to (stand_1 v)\n    else\n        switch costume to ([floor v] of ((4) + ((>>> Player Frame) mod (8))) )\n    end\nelse\n    if <(Speed_Y) > [0]> then\n        switch costume to (jump_1 v)\n    else\n        switch costume to (fall_1 v)\n    end\nend\n\n@Opponents\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\ndefine Setup Players\ndelete all of [buffer v]\nset [ghost v] effect to (50)\nset rotation style [left-right v]\nhide\nset size to (35) %\nset [offline v] to [50]\nset [player # v] to [1]\nrepeat ((Max Players) - (1))\n    create clone of (_myself_ v)\n    change [player # v] by (1)\nend\n\nwhen I receive [update cloud v]\nif <(Cloud On?) > [0]> then\n    if <(MY PLAYER NUMBER!) = (Player #)> then\n        set [offline v] to [50]\n        hide\n    else\n        Tick\n    end\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                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\n\nwhen I receive [green flag v]\nSetup Players\n\ndefine Tick\nValue = Cloud # (Player #)\nif <(join [twonerdsrocks] (Value)) = (Last Value)> then\n    change [offline v] by (1)\n    if <(Offline) = [50]> then\n        hide\n        Begin Decode of (Value)\n        Value = Read From Encoded\n        replace item (Player #) of [players online v] with []\n    end\nelse\n    set [last value v] to (join [twonerdsrocks] (Value))\n    if <(Offline) > [49]> then\n        show\n    end\n    set [offline v] to [0]\n    Begin Decode of (Value)\n    Value = Read From Encoded\n    set [username v] to (Value)\n    replace item (Player #) of [players online v] with (Value)\n    say (Value)\n    Value = Read From Encoded\n    Value = Read From Encoded\n    if <(Value) = [0]> then\n        say (join (Player #) (join [: ] (Username)))\n    else\n        say (Value)\n    end\n    Value = Read From Encoded\n    repeat until <(Value) = []>\n        add (Value) to [buffer v]\n        Value = Read From Encoded\n    end\nend\nif <(length of [buffer v]) > [0]> then\n    set [>>> opponent x v] to (item (1) of [buffer v])\n    delete (1) of [buffer v]\n    set [>>> opponent y v] to (item (1) of [buffer v])\n    delete (1) of [buffer v]\n    Position ((>>> Opponent X) - (Scroll X)) ((>>> Opponent Y) - (Scroll Y))\n    switch costume to (item (1) of [buffer v])\n    delete (1) of [buffer v]\n    point in direction (item (1) of [buffer v])\n    delete (1) of [buffer v]\nend\n\nwhen I receive [join game v]\nValue = Cloud # (Player #)\nset [last value v] to (join [twonerdsrocks] (Value))\nwait (3) seconds\nValue = Cloud # (Player #)\nif <(join [twonerdsrocks] (Value)) = (Last Value)> then\n    set [my player number! v] to (Player #)\nend\n\ndefine Position (x) (y)\ngo to x: (x) y: (y)\nif <<(x) = (x position)> and <(y) = (y position)>> then\n    set [ghost v] effect to (50)\nelse\n    set [ghost v] effect to (100)\nend\n\n@Level\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 [reset v]\ndelete this clone\n\ndefine Position (x) (y)\nset [brightness v] effect to (0)\ngo to x: (x) y: (y)\nif <<(x) = (x position)> and <(y) = (y position)>> then\n    show\nelse\n    hide\nend\nif <<(costume [name v]) = [Lock]> and <(Ticket Bought?) = [1]>> then\n    switch costume to (unlock v)\nend\n\nwhen I receive [setup v]\nhide\nswitch costume to (1-1 v)\n(Set) Clone at X: [0] Y: [0]\nrepeat (20)\n    (Change) Clone at X: [480] Y: [0]\nend\nswitch costume to (2-20 v)\n(Set) Clone at X: [9120] Y: [360]\nrepeat (6)\n    (Change) Clone at X: [0] Y: [360]\nend\nswitch costume to (0-1 v)\n(Set) Clone at X: [0] Y: [-360]\nrepeat (20)\n    (Change) Clone at X: [480] Y: [0]\nend\nswitch costume to (-1-1 v)\n(Set) Clone at X: [0] Y: [-720]\nrepeat (20)\n    (Change) Clone at X: [480] Y: [0]\nend\nswitch costume to (1-23 v)\n(Set) Clone at X: [9600] Y: [-720]\nrepeat (8)\n    switch costume to (1-23 v)\n    (Change) Clone at X: [0] Y: [360]\nend\nswitch costume to (8-24 v)\n(Change) Clone at X: [0] Y: [360]\nswitch costume to (nothing v)\n\ndefine (Set) Clone at X: (x) Y: (y)\nset [x v] to (x)\nset [y v] to (y)\ncreate clone of (_myself_ v)\nnext costume\n\ndefine (Change) Clone at X: (x) Y: (y)\nchange [x v] by (x)\nchange [y v] by (y)\ncreate clone of (_myself_ v)\nnext costume\n\n@Decoration\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 [reset v]\ndelete this clone\n\ndefine Position (x) (y)\nset [brightness v] effect to (0)\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 [setup v]\nhide\nswitch costume to (1-1 v)\n(Set) Clone at X: [0] Y: [0]\nrepeat (21)\n    (Change) Clone at X: [480] Y: [0]\nend\nswitch costume to (2-20 v)\n(Set) Clone at X: [9120] Y: [360]\nrepeat (6)\n    (Change) Clone at X: [0] Y: [360]\nend\nswitch costume to (0-15 v)\n(Set) Clone at X: [6720] Y: [-360]\nrepeat (3)\n    (Change) Clone at X: [480] Y: [0]\nend\nswitch costume to (super shaker v)\n(Set) Clone at X: [2400] Y: [360]\nswitch costume to (roller coaster 1 v)\n(Set) Clone at X: [6720] Y: [360]\nrepeat (3)\n    (Change) Clone at X: [480] Y: [0]\nend\n(Set) Clone at X: [6720] Y: [720]\nrepeat (3)\n    (Change) Clone at X: [480] Y: [0]\nend\n(Set) Clone at X: [6720] Y: [1080]\nrepeat (3)\n    (Change) Clone at X: [480] Y: [0]\nend\nswitch costume to (nothing v)\n\ndefine (Set) Clone at X: (x) Y: (y)\nset [x v] to (x)\nset [y v] to (y)\ncreate clone of (_myself_ v)\nnext costume\n\ndefine (Change) Clone at X: (x) Y: (y)\nchange [x v] by (x)\nchange [y v] by (y)\ncreate clone of (_myself_ v)\nnext costume\n\nwhen flag clicked\nhide\n\n@Water\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 [reset v]\ndelete this clone\n\ndefine Position (x) (y)\ngo to [back v] layer\nset [ghost v] effect to (50)\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 [setup v]\nhide\nswitch costume to (-1-21 v)\n(Set) Clone at X: [9600] Y: [-720]\nrepeat (3)\n    (Change) Clone at X: [0] Y: [360]\nend\nswitch costume to (nothing v)\n\ndefine (Set) Clone at X: (x) Y: (y)\nset [x v] to (x)\nset [y v] to (y)\ncreate clone of (_myself_ v)\nnext costume\n\ndefine (Change) Clone at X: (x) Y: (y)\nchange [x v] by (x)\nchange [y v] by (y)\ncreate clone of (_myself_ v)\nnext costume\n\n@Speed Boost\n\nwhen I receive [tick v]\nPosition ((X) - (Scroll X)) ((Y) - (Scroll Y))\n\nwhen I receive [reset v]\ndelete this clone\n\ndefine Position (x) (y)\nif <(costume [number v]) = [3]> then\n    set [ghost v] effect to (50)\nend\nif <(costume [number v]) = [4]> then\n    set [ghost v] effect to (100)\nend\ngo to x: (x) y: (y)\nif <<(x) = (x position)> and <(y) = (y position)>> then\n    show\nelse\n    hide\nend\nif <touching (player v)?> then\n    if <not <(([sin v] of (direction) ) * (>>> Speed Boost Speed)) = [0]>> then\n        set [speed_x v] to (([sin v] of (direction) ) * (>>> Speed Boost Speed))\n    end\n    if <not <(([cos v] of (direction) ) * (>>> Speed Boost Speed)) = [0]>> then\n        set [speed_y v] to (([cos v] of (direction) ) * (>>> Speed Boost Speed))\n    end\nend\n\ndefine (Set) Clone at X: (x) Y: (y) Direction: (direction) Speed: (speed)\nset [x v] to (x)\nset [y v] to (y)\npoint in direction (direction)\nset [>>> speed boost speed v] to (speed)\ncreate clone of (_myself_ v)\n\nwhen I receive [setup v]\nhide\nswitch costume to (long v)\n(Set) Clone at X: [2251] Y: [140] Direction: [0] Speed: [10]\n(Set) Clone at X: [2553] Y: [140] Direction: [-180] Speed: [10]\n(Set) Clone at X: [8925] Y: [140] Direction: [0] Speed: [10]\n(Set) Clone at X: [8925] Y: [500] Direction: [0] Speed: [10]\n(Set) Clone at X: [8925] Y: [860] Direction: [0] Speed: [10]\n(Set) Clone at X: [8925] Y: [1220] Direction: [0] Speed: [10]\n(Set) Clone at X: [8925] Y: [1580] Direction: [0] Speed: [10]\n(Set) Clone at X: [8925] Y: [1940] Direction: [0] Speed: [10]\n(Set) Clone at X: [8925] Y: [2300] Direction: [0] Speed: [10]\n(Set) Clone at X: [9313] Y: [140] Direction: [180] Speed: [10]\n(Set) Clone at X: [9313] Y: [500] Direction: [180] Speed: [10]\n(Set) Clone at X: [9313] Y: [860] Direction: [180] Speed: [10]\n(Set) Clone at X: [9313] Y: [1220] Direction: [180] Speed: [10]\n(Set) Clone at X: [9313] Y: [1580] Direction: [180] Speed: [10]\n(Set) Clone at X: [9313] Y: [1940] Direction: [180] Speed: [10]\n(Set) Clone at X: [9313] Y: [2300] Direction: [180] Speed: [10]\nswitch costume to (long2 v)\n(Set) Clone at X: [6600] Y: [-75] Direction: [90] Speed: [10]\n(Set) Clone at X: [6700] Y: [50] Direction: [45] Speed: [10]\n(Set) Clone at X: [6950] Y: [300] Direction: [45] Speed: [10]\n(Set) Clone at X: [7262] Y: [400] Direction: [75] Speed: [10]\n(Set) Clone at X: [7550] Y: [300] Direction: [135] Speed: [20]\n(Set) Clone at X: [7725] Y: [100] Direction: [0] Speed: [15]\n(Set) Clone at X: [7725] Y: [500] Direction: [0] Speed: [15]\n(Set) Clone at X: [7600] Y: [720] Direction: [-85] Speed: [15]\n(Set) Clone at X: [7350] Y: [700] Direction: [-85] Speed: [15]\n(Set) Clone at X: [7100] Y: [680] Direction: [-85] Speed: [15]\n(Set) Clone at X: [6900] Y: [800] Direction: [15] Speed: [15]\n(Set) Clone at X: [7100] Y: [1000] Direction: [85] Speed: [15]\n(Set) Clone at X: [7400] Y: [950] Direction: [85] Speed: [15]\n(Set) Clone at X: [7700] Y: [950] Direction: [85] Speed: [15]\n(Set) Clone at X: [8000] Y: [800] Direction: [135] Speed: [20]\n(Set) Clone at X: [8200] Y: [500] Direction: [135] Speed: [25]\n(Set) Clone at X: [8400] Y: [200] Direction: [135] Speed: [30]\n(Set) Clone at X: [8600] Y: [50] Direction: [-180] Speed: [10]\nswitch costume to (speed boost v)\nswitch costume to (master v)\n\nwhen flag clicked\nhide\n\n@Start Screen\n\nwhen flag clicked\nhide\n\nwhen I start as a clone\ngo to x: (0) y: (40)\nset size to (100) %\nset [var 1 v] to (costume [number v])\nforever\n    if <touching (mouse-pointer v)?> then\n        change size by (((110) - (size)) / (5))\n        switch costume to ((Var 1) + (1))\n    else\n        change size by (((100) - (size)) / (5))\n        switch costume to (Var 1)\n    end\nend\n\ndefine Setup\nshow\nswitch costume to (sign 1 v)\nrepeat (6)\n    create clone of (_myself_ v)\n    next costume\n    next costume\nend\nswitch costume to (play v)\nset size to (60) %\ngo to x: (0) y: (-135)\n\nwhen I receive [connecting... v]\nstop [other scripts in sprite v]\nhide\ndelete this clone\n\nwhen I receive [start project v]\nSetup\nforever\n    if <touching (mouse-pointer v)?> then\n        change size by (((75) - (size)) / (5))\n        if <mouse down?> then\n            broadcast (Connecting... v)\n        end\n    else\n        change size by (((60) - (size)) / (5))\n    end\nend\n\n@Loading\n\nwhen flag clicked\nbroadcast (Start Project v)\n\nwhen I start as a clone\nif <(costume [number v]) = [1]> then\n    set size to (100) %\n    clear graphic effects\n    repeat (50)\n        change size by (-2)\n        change [ghost v] effect by (2)\n    end\n    delete this clone\nend\nif <(costume [number v]) = [2]> then\n    point in direction (90)\n    show\n    go to [back v] layer\n    go to x: (0) y: (14)\n    change y by (-1)\n    forever\n        repeat (28)\n            change y by (-1)\n            change x by (1)\n        end\n        change y by (28)\n        change x by (-28)\n    end\nend\n\nwhen I receive [play game v]\nbroadcast (Delete Clones v)\nstop [other scripts in sprite v]\nhide\ndelete this clone\n\nwhen I receive [delete clones v]\nstop [other scripts in sprite v]\nhide\ndelete this clone\n\nwhen I receive [connecting... v]\nif <(costume [number v]) = [1]> then\n    switch costume to (costume1 v)\n    show\n    go to x: (68) y: (0)\n    point in direction (150)\n    forever\n        move (-14) steps\n        turn left (10) degrees\n        create clone of (_myself_ v)\n    end\nelse\n    delete this clone\nend\n\nwhen I receive [start project v]\nswitch costume to (background v)\ncreate clone of (_myself_ v)\nswitch costume to (costume1 v)\nhide\n\n@Chat\n\ndefine Smooth Glide X: (x) Y: (y) Speed: (speed) Ghost: (ghost)\nrepeat until <<(round (x position)) = (round (x))> and <(round (y position)) = (round (y))>>\n    change x by (((round (x)) - (round (x position))) / (speed))\n    change y by (((round (y)) - (round (y position))) / (speed))\n    change [ghost v] effect by (ghost)\nend\ngo to x: (x) y: (y)\n\ndefine Bounce with (bounciness) , (speed) and (finishing size)\nset [var 1 v] to [0]\nrepeat until <<(finishing size) = (size)> and <(Var 1) = (size)>>\n    set [var 2 v] to (((Var 2) * ((bounciness) / (100))) + (((finishing size) - (size)) * ((speed) / (20))))\n    set [var 1 v] to (size)\n    change size by (Var 2)\nend\nset size to (finishing size) %\n\nwhen flag clicked\nhide\nSetup Lists\n\nwhen I receive [tick v]\nif <(costume [name v]) = [Chat]> then\n    if <(Chat #3) > [100]> then\n        set [chat v] to [0]\n    else\n        change [chat #3 v] by (1)\n    end\n    go to x: (90) y: (y position)\n    if <(Menu Touching?) = [yes]> then\n        change y by (((150) - (y position)) / (5))\n    else\n        change y by (((210) - (y position)) / (5))\n    end\n    show\n    go to [front v] layer\n    if <(y position) > [184]> then\n        hide\n    end\n    if <touching (mouse-pointer v)?> then\n        change size by (((110) - (size)) / (5))\n    else\n        change size by (((100) - (size)) / (5))\n    end\n    if <<mouse down?> and <touching (mouse-pointer v)?>> then\n        if <<(Chat #2) = [0]> and <(Pause?) = [no]>> then\n            broadcast (Chat v)\n        end\n    end\nend\n\nwhen I receive [reset v]\nswitch costume to (chat v)\nset size to (100) %\nset [chat #3 v] to [0]\nset [chat v] to [0]\nset [chat category v] to [0]\nset [chat #2 v] to [0]\n\nwhen I receive [chat v]\nset [pause? v] to [yes]\nSetup Chat\n\nwhen I start as a clone\nif <(costume [name v]) = [Chat Title]> then\n    show\n    set size to (0) %\n    go to x: (0) y: (125)\n    Bounce with (65) , (10) and (90)\nend\nif <(costume [name v]) = [Choose: Category]> then\n    show\n    set size to (0) %\n    go to x: (0) y: (85)\n    Bounce with (65) , (10) and (75)\nend\nif < (costume [name v]) contains [Category:]?> then\n    show\n    set size to (75) %\n    set [var 1 v] to (x position)\n    if <(Var 1) < [0]> then\n        go to x: (-300) y: (y position)\n    else\n        go to x: (300) y: (y position)\n    end\n    Smooth Glide X: (Var 1) Y: (y position) Speed: [7] Ghost: [0]\nend\nif < (costume [name v]) contains [Message]?> then\n    show\n    set size to (75) %\n    set [var 1 v] to (x position)\n    if <(Var 1) < [0]> then\n        go to x: (-300) y: (y position)\n    else\n        go to x: (300) y: (y position)\n    end\n    Smooth Glide X: (Var 1) Y: (y position) Speed: [7] Ghost: [0]\nend\nif <(costume [name v]) = [Chat Hider]> then\n    show\n    go to [front v] layer\n    set [ghost v] effect to (50)\n    set size to (100) %\n    go to x: (0) y: (500)\n    Smooth Glide X: [0] Y: [0] Speed: [5] Ghost: [0]\n    forever\n        if <key (space v) pressed?> then\n            broadcast (>>> Chat Sent! v) and wait\n        end\n    end\nend\n\nwhen I start as a clone\nif <<not <(costume [name v]) = [Chat Hider]>> and <not <(costume [name v]) = [Chat Title]>>> then\n    forever\n        go to [front v] layer\n        if <touching (mouse-pointer v)?> then\n            change size by (((80) - (size)) / (5))\n        else\n            change size by (((75) - (size)) / (5))\n        end\n    end\nelse\n    if <(costume [name v]) = [Chat Title]> then\n        forever\n            go to [front v] layer\n        end\n    end\nend\n\nwhen this sprite clicked\nif <(costume [name v]) = [Chat Hider]> then\n    if <(round (y position)) = [0]> then\n        broadcast (>>> Chat Sent! v)\n    end\nend\nif < (costume [name v]) contains [Category:]?> then\n    set [chat #3 v] to [0]\n    set [chat category v] to (item ((costume [number v]) - (5)) of [chat categories v])\n    broadcast (>>> Chat Category Chosen v)\nend\n\nwhen I receive [>>> chat category chosen v]\nif < (costume [name v]) contains [Category:]?> then\n    set [var 1 v] to (x position)\n    if <(Var 1) < [0]> then\n        Smooth Glide X: [-200] Y: (y position) Speed: [7] Ghost: [10]\n    else\n        Smooth Glide X: [200] Y: (y position) Speed: [7] Ghost: [10]\n    end\nend\nif <(costume [name v]) = [Choose: Category]> then\n    turn right (2) degrees\n    set [var 1 v] to [5]\n    repeat (20)\n        go to [front v] layer\n        point in direction ((([tan v] of (Var 1) ) * (10)) + (90))\n        change [var 1 v] by (4)\n    end\n    switch costume to (choose: chat v)\n    repeat until <(round (direction)) = [90]>\n        go to [front v] layer\n        point in direction ((([tan v] of (Var 1) ) * (10)) + (90))\n        change [var 1 v] by (4)\n    end\n    point in direction (90)\nend\nif <(costume [name v]) = [Chat]> then\n    if <(Chat Category) = [Yes/No]> then\n        switch costume to (message 1 v)\n    end\n    if <(Chat Category) = [Thanks/No Problem]> then\n        switch costume to (message 11 v)\n    end\n    if <(Chat Category) = [Nice!]> then\n        switch costume to (message 21 v)\n    end\n    if <(Chat Category) = [Sorry...]> then\n        switch costume to (message 31 v)\n    end\n    if <(Chat Category) = [Emoticons...]> then\n        switch costume to (message 41 v)\n    end\n    if <(Chat Category) = [Where is this?]> then\n        switch costume to (message 51 v)\n    end\n    if <(Chat Category) = [It is over here...]> then\n        switch costume to (message 61 v)\n    end\n    if <(Chat Category) = [Hello/Goodbye]> then\n        switch costume to (message 71 v)\n    end\n    if <(Chat Category) = [Text Abbreviations]> then\n        switch costume to (message 91 v)\n    end\n    if <(Chat Category) = [Other]> then\n        switch costume to (message 81 v)\n    end\n    wait (1) seconds\n    Setup Chat Messages\nend\n\ndefine Setup Lists\ndelete all of [chat categories v]\ndelete all of [chat messages v]\nadd [Yes/No] to [chat categories v]\nadd [Thanks/No Problem] to [chat categories v]\nadd [Nice!] to [chat categories v]\nadd [Sorry...] to [chat categories v]\nadd [Emoticons...] to [chat categories v]\nadd [Where is this?] to [chat categories v]\nadd [It is over here...] to [chat categories v]\nadd [Hello/Goodbye] to [chat categories v]\nadd [Text Abbreviations] to [chat categories v]\nadd [Other] to [chat categories v]\nadd [Yes] to [chat messages v]\nadd [Of course!] to [chat messages v]\nadd [Maybe...] to [chat messages v]\nadd [Ok] to [chat messages v]\nadd [K] to [chat messages v]\nadd [Alright] to [chat messages v]\nadd [Sure!] to [chat messages v]\nadd [Not now...] to [chat messages v]\nadd [No] to [chat messages v]\nadd [No thank you] to [chat messages v]\nadd [Thanks!] to [chat messages v]\nadd [Thx!] to [chat messages v]\nadd [Thank you!] to [chat messages v]\nadd [I owe you one!] to [chat messages v]\nadd [Thanks anyway] to [chat messages v]\nadd [My pleasure] to [chat messages v]\nadd [Your welcome] to [chat messages v]\nadd [No problem] to [chat messages v]\nadd [My pleasure] to [chat messages v]\nadd [It was nothing!] to [chat messages v]\nadd [Nice!] to [chat messages v]\nadd [Great!] to [chat messages v]\nadd [Good!] to [chat messages v]\nadd [Awesome!] to [chat messages v]\nadd [Amazing!] to [chat messages v]\nadd [Cool!] to [chat messages v]\nadd [Impressive!] to [chat messages v]\nadd [Wonderful!] to [chat messages v]\nadd [Unbelievable!] to [chat messages v]\nadd [Astonishing!] to [chat messages v]\nadd [Sorry] to [chat messages v]\nadd [Pardon Me] to [chat messages v]\nadd [Excuse Me] to [chat messages v]\nadd [Oops] to [chat messages v]\nadd [Whoops] to [chat messages v]\nadd [My bad...] to [chat messages v]\nadd [My fault!] to [chat messages v]\nadd [My mistake...] to [chat messages v]\nadd [My apologies. ] to [chat messages v]\nadd [Forgive me?] to [chat messages v]\nadd [:\)] to [chat messages v]\nadd [:\(] to [chat messages v]\nadd [:D] to [chat messages v]\nadd [XD] to [chat messages v]\nadd [:b] to [chat messages v]\nadd [;\)] to [chat messages v]\nadd [=\)] to [chat messages v]\nadd [:0] to [chat messages v]\nadd [>:\(] to [chat messages v]\nadd [ ,:-l] to [chat messages v]\nadd [Where is Tera s Ultimate Avalanche?] to [chat messages v]\nadd [Where is Nano s Super Shaker?] to [chat messages v]\nadd [Where is Tera s Taco Truck?] to [chat messages v]\nadd [Where are the autograph booths?] to [chat messages v]\nadd [Where is Pico s Pizza Palace?] to [chat messages v]\nadd [Where is Batty s Burger Bonanza?] to [chat messages v]\nadd [Where is Gobo s Wild Ride?] to [chat messages v]\nadd [Where are the food stands?] to [chat messages v]\nadd [If you saw this, comment scratchland rocks!] to [chat messages v]\nadd [Which way?] to [chat messages v]\nadd [Tera s Ultimate Avalanche is this way!] to [chat messages v]\nadd [Nano s Super Shaker is this way!] to [chat messages v]\nadd [Tera s Taco Truck is this way!] to [chat messages v]\nadd [The autograph booths are this way!] to [chat messages v]\nadd [Pico s Pizza Palace is this way!] to [chat messages v]\nadd [Batty s Burger Bonanza is this way!] to [chat messages v]\nadd [Gobo s Wild Ride is this way!] to [chat messages v]\nadd [The Food Stands are this way!] to [chat messages v]\nadd [If you saw this, comment scratchland rocks!] to [chat messages v]\nadd [This way!] to [chat messages v]\nadd [Hi!] to [chat messages v]\nadd [Hello!] to [chat messages v]\nadd [How s it going?] to [chat messages v]\nadd [What s up?] to [chat messages v]\nadd [Howdy partner!] to [chat messages v]\nadd [Bye!] to [chat messages v]\nadd [Goodbye!] to [chat messages v]\nadd [See you later!] to [chat messages v]\nadd [Got to go bye!] to [chat messages v]\nadd [Later!] to [chat messages v]\nadd [Good] to [chat messages v]\nadd [Bad] to [chat messages v]\nadd [RU ok?] to [chat messages v]\nadd [I m busy...] to [chat messages v]\nadd [Where s the park map?] to [chat messages v]\nadd [EPIC!] to [chat messages v]\nadd [I m lagging!] to [chat messages v]\nadd [Everyone this way!] to [chat messages v]\nadd [Please!] to [chat messages v]\nadd [In the top right corner!] to [chat messages v]\nadd [LOL] to [chat messages v]\nadd [OMG] to [chat messages v]\nadd [IDK] to [chat messages v]\nadd [IKR] to [chat messages v]\nadd [ROTFL] to [chat messages v]\nadd [BRB] to [chat messages v]\nadd [BTW] to [chat messages v]\nadd [NVM] to [chat messages v]\nadd [LMK] to [chat messages v]\nadd [TGIF] to [chat messages v]\n\nwhen I receive [>>> chat sent! v]\nif <(costume [name v]) = [Chat]> then\n    go to x: (-200) y: (150)\n    replace item (2) of [achievements v] with [1]\n    set [chat #2 v] to [0]\n    set [pause? v] to [no]\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nelse\n    repeat (10)\n        change [ghost v] effect by (10)\n    end\n    delete this clone\nend\n\ndefine Setup Chat\nset [chat #2 v] to [1]\npoint in direction (90)\nhide\nswitch costume to (chat title v)\ncreate clone of (_myself_ v)\nswitch costume to (choose: category v)\ncreate clone of (_myself_ v)\nswitch costume to (choose: category v)\ncreate clone of (_myself_ v)\nswitch costume to (chat hider v)\ncreate clone of (_myself_ v)\ngo to x: (-60) y: (45)\nswitch costume to (category: yes/no v)\nrepeat (5)\n    create clone of (_myself_ v)\n    change y by (-40)\n    next costume\nend\ngo to x: (60) y: (45)\nrepeat (5)\n    create clone of (_myself_ v)\n    change y by (-40)\n    next costume\nend\nswitch costume to (chat v)\n\ndefine Setup Chat Messages\nset [ghost v] effect to (0)\ngo to x: (-60) y: (45)\nrepeat (5)\n    create clone of (_myself_ v)\n    change y by (-40)\n    next costume\nend\ngo to x: (60) y: (45)\nrepeat (5)\n    create clone of (_myself_ v)\n    change y by (-40)\n    next costume\nend\nswitch costume to (chat v)\nset [ghost v] effect to (100)\n\nwhen I receive [cool chat v]\nset [pause? v] to [yes]\nask [What would u like to chat?] and wait\nset [chat v] to (answer)\nset [pause? v] to [no]\nset [chat #2 v] to [0]\nset [chat #3 v] to [0]\n\nwhen I receive [food chat v]\nset [chat v] to (>>> Food Chat)\nset [chat #2 v] to [0]\nset [chat #3 v] to [0]\n\nwhen I start as a clone\nforever\n    if <<touching (mouse-pointer v)?> and <mouse down?>> then\n        if < (costume [name v]) contains [Message]?> then\n            set [chat v] to (item ((costume [number v]) - (15)) of [chat messages v])\n            broadcast (>>> Chat Sent! v)\n        end\n    end\nend\n\n@Menu\n\nwhen I receive [tick v]\nshow\nset [ghost v] effect to (20)\ngo to x: (0) y: (y position)\nif <(mouse y) > [178]> then\n    set [menu touching? v] to [no]\n    change y by (((60) - (y position)) / (5))\nelse\n    if <touching (mouse-pointer v)?> then\n        set [menu touching? v] to [yes]\n        change y by (((0) - (y position)) / (5))\n    else\n        set [menu touching? v] to [no]\n        change y by (((60) - (y position)) / (5))\n    end\nend\n\nwhen flag clicked\nhide\n\n@Menu Options\n\nwhen flag clicked\nhide\n\nwhen I receive [tick v]\nif <(costume [name v]) = [Coin]> then\n    set size to (75) %\n    go to x: (-210) y: (y position)\n    if <(Menu Touching?) = [yes]> then\n        change y by (((150) - (y position)) / (5))\n    else\n        change y by (((210) - (y position)) / (5))\n    end\n    if <(y position) > [180]> then\n        hide\n    else\n        show\n        go to [front v] layer\n    end\nend\nif <(costume [name v]) = [Ach]> then\n    go to x: (10) y: (y position)\n    if <(Menu Touching?) = [yes]> then\n        change y by (((150) - (y position)) / (5))\n    else\n        change y by (((210) - (y position)) / (5))\n    end\n    if <(y position) > [180]> then\n        hide\n    else\n        show\n        go to [front v] layer\n    end\n    if <touching (mouse-pointer v)?> then\n        change size by (((110) - (size)) / (5))\n    else\n        change size by (((100) - (size)) / (5))\n    end\nend\nif <<(costume [number v]) > [1]> and <(costume [number v]) < [12]>> then\n    set size to (200) %\n    if <(Menu Touching?) = [yes]> then\n        change y by (((147) - (y position)) / (5))\n    else\n        change y by (((210) - (y position)) / (5))\n    end\n    if <(y position) > [186]> then\n        hide\n    else\n        show\n        go to [front v] layer\n    end\n    if <(x position) = [-175]> then\n        switch costume to (letter (2) of (>>> Coins))\n    else\n        switch costume to (letter (3) of (>>> Coins))\n    end\nend\nif < (costume [name v]) contains [Volume]?> then\n    go to x: (147) y: (y position)\n    if <(Menu Touching?) = [yes]> then\n        change y by (((150) - (y position)) / (5))\n    else\n        change y by (((210) - (y position)) / (5))\n    end\n    if <(y position) > [179]> then\n        hide\n    else\n        show\n        go to [front v] layer\n    end\n    if <touching (mouse-pointer v)?> then\n        change size by (((40) - (size)) / (5))\n    else\n        change size by (((30) - (size)) / (5))\n    end\nend\nif <(costume [name v]) = [Map 1]> then\n    go to x: (200) y: (y position)\n    if <(Menu Touching?) = [yes]> then\n        change y by (((150) - (y position)) / (5))\n    else\n        change y by (((210) - (y position)) / (5))\n    end\n    if <(y position) > [180]> then\n        hide\n    else\n        show\n        go to [front v] layer\n    end\n    if <touching (mouse-pointer v)?> then\n        change size by (((50) - (size)) / (5))\n    else\n        change size by (((40) - (size)) / (5))\n    end\nend\n\nwhen I receive [setup v]\nbroadcast (>>> Menu Delete Clones v) and wait\nswitch costume to (1 v)\ngo to x: (-175) y: (300)\ncreate clone of (_myself_ v)\nswitch costume to (1 v)\ngo to x: (-150) y: (300)\ncreate clone of (_myself_ v)\nswitch costume to (volume on v)\ncreate clone of (_myself_ v)\nswitch costume to (map 1 v)\ncreate clone of (_myself_ v)\nswitch costume to (ach v)\ncreate clone of (_myself_ v)\nswitch costume to (coin v)\n\nwhen this sprite clicked\nif <(costume [number v]) = [12]> then\n    set [music? v] to [0]\n    switch costume to (volume off v)\nelse\n    if <(costume [number v]) = [13]> then\n        set [music? v] to [1]\n        switch costume to (volume on v)\n    end\n    if <(costume [number v]) = [14]> then\n        switch costume to (map 2 v)\n        replace item (8) of [achievements v] with [1]\n        set [pause? v] to [yes]\n        go to x: (0) y: (5000)\n        set size to (100) %\n        go to [front v] layer\n        repeat until <<not <mouse down?>> and <not <key (space v) pressed?>>>\n            change y by (((0) - (y position)) / (5))\n        end\n        repeat until <<mouse down?> or <key (space v) pressed?>>\n            change y by (((0) - (y position)) / (5))\n        end\n        go to x: (200) y: (150)\n        switch costume to (map 1 v)\n        set [pause? v] to [no]\n    end\n    if <(costume [number v]) = [15]> then\n        stop [other scripts in sprite v]\n        set size to (75) %\n        go to x: (200) y: (150)\n        switch costume to (map 1 v)\n        set [pause? v] to [no]\n    end\n    if <(costume [number v]) = [16]> then\n        stop [other scripts in sprite v]\n        set [pause? v] to [yes]\n        broadcast (Achieve v)\n    end\nend\n\nwhen I receive [>>> menu delete clones v]\ndelete this clone\n\nwhen I start as a clone\nif <(costume [name v]) = [Ach]> then\n    go to x: (10) y: (30000)\n    hide\n    set size to (100) %\nend\n\n@Clouds\n\ndefine Position (x) (y)\nset [ghost v] effect to (50)\ngo to x: (x) y: (y)\nif <<(x) = (x position)> and <(y) = (y position)>> then\n    show\nelse\n    hide\nend\ngo to [back v] layer\n\nwhen I receive [tick v]\nchange [x v] by (Var 1)\nPosition ((X) - (Scroll X)) ((Y) - (Scroll Y))\nif <(X) > [10000]> then\n    set [var 1 v] to (pick random (-3) to (-7))\nend\nif <(X) < [-300]> then\n    set [var 1 v] to (pick random (3) to (7))\nend\n\nwhen I receive [setup v]\nswitch costume to (cloud v)\nrepeat (30)\n    set [x v] to (pick random (-300) to (9000))\n    set [y v] to (pick random (100) to (500))\n    set [var 1 v] to (pick random (-3) to (-7))\n    create clone of (_myself_ v)\nend\nswitch costume to (master v)\n\n@End\n\nwhen flag clicked\nhide\nset [played? v] to [0]\nforever\n    set [check timer v] to (timer)\nend\n\nwhen I receive [tick v]\nstop [other scripts in sprite v]\nset [check timer v] to (timer)\n\nwhen [timer v] > ((Check Timer) + (0.5))\nif <(Played?) = [0]> then\n    Setup\n    switch costume to (back2 v)\n    set size to (500) %\n    Smooth Glide X: [0] Y: [0] Speed: [5] Ghost: [0] [-5]\n    set [played? v] to [1]\n    repeat (20)\n        go to [front v] layer\n        switch costume to (back2 v)\n        repeat (3)\n            next costume\n            change size by (((size) / (40)) * (-1))\n        end\n        change size by (((size) / (40)) * (-1))\n    end\n    repeat (10)\n        go to [front v] layer\n        switch costume to (back2 v)\n        repeat (3)\n            next costume\n            change size by (((size) / (40)) * (-1))\n        end\n        change size by (((size) / (40)) * (-1))\n        change [ghost v] effect by (10)\n    end\n    hide\n    switch costume to (hider v)\n    create clone of (_myself_ v)\n    wait (0.5) seconds\n    switch costume to (thumbnail v)\n    create clone of (_myself_ v)\n    forever\n        switch costume to (pick random (8) to (11))\n        create clone of (_myself_ v)\n        wait (0.01) seconds\n    end\nend\n\ndefine Smooth Glide X: (x) Y: (y) Speed: (speed) Ghost: (ghost) (size)\nrepeat until <<(round (x position)) = (round (x))> and <(round (y position)) = (round (y))>>\n    change x by (((round (x)) - (round (x position))) / (speed))\n    change y by (((round (y)) - (round (y position))) / (speed))\n    change [ghost v] effect by (ghost)\n    change size by (size)\nend\ngo to x: (x) y: (y)\n\nwhen I start as a clone\nif <(costume [name v]) = [Back]> then\n    go to x: (-5000) y: (0)\n    show\n    go to [front v] layer\n    go [backward v] (1) layers\n    Smooth Glide X: [0] Y: [0] Speed: [5] Ghost: [0] []\nend\nif <(costume [name v]) = [Back3]> then\n    go to x: (0) y: (5000)\n    show\n    go to [front v] layer\n    go [backward v] (1) layers\n    Smooth Glide X: [0] Y: [0] Speed: [5] Ghost: [0] []\nend\nif <(costume [name v]) = [Hider]> then\n    clear graphic effects\n    go to x: (0) y: (5000)\n    set size to (100) %\n    show\n    go to [front v] layer\n    Smooth Glide X: [0] Y: [0] Speed: [5] Ghost: [0] [0]\n    repeat (10)\n        change [ghost v] effect by (10)\n    end\nend\nif <(costume [name v]) = [Thumbnail]> then\n    clear graphic effects\n    go to x: (0) y: (0)\n    set size to (100) %\n    show\n    go to [front v] layer\n    go [backward v] (1) layers\nend\nif < (costume [name v]) contains [Item]?> then\n    clear graphic effects\n    go to x: (pick random (-240) to (240)) y: (-5000)\n    set size to (50) %\n    show\n    go to [front v] layer\n    set [var 1 v] to (pick random (20) to (25))\n    repeat until <(y position) > [-50]>\n        change y by (Var 1)\n        change [var 1 v] by (-1)\n        change size by (-1)\n    end\n    repeat until <(y position) < [-50]>\n        change y by (Var 1)\n        change [var 1 v] by (-1)\n        change size by (-1)\n    end\n    repeat (5)\n        change y by (Var 1)\n        change [var 1 v] by (-1)\n        change [ghost v] effect by (20)\n        change size by (-1)\n    end\n    delete this clone\nend\n\nwhen [timer v] > ((Check Timer) + (0.5))\nforever\n    set [check timer v] to (timer)\nend\n\nwhen I receive [update cloud v]\nset [check timer v] to (timer)\n\nwhen I receive [chat v]\nset [check timer v] to (timer)\n\nwhen I receive [chat v]\nset [check timer v] to (timer)\n\nwhen [timer v] > ((Check Timer) + (0.5))\nif <(Played?) = [1]> then\n    switch costume to (thumbnail v)\n    set size to (100) %\n    show\n    go to x: (0) y: (0)\n    set [ghost v] effect to (100)\n    go to [front v] layer\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\n\ndefine Setup\nclear graphic effects\nswitch costume to (back v)\nset size to (100) %\ncreate clone of (_myself_ v)\nswitch costume to (back3 v)\ncreate clone of (_myself_ v)\ngo to x: (5000) y: (-5000)\nshow\ngo to [front v] layer\nswitch costume to (back2 v)\nset size to (500) %\n\n@Coins\n\ndefine Position (x) (y)\nif <not <(costume [name v]) = [Nothing]>> then\n    set [brightness v] effect to (0)\n    go to x: (x) y: (y)\n    if <<(x) = (x position)> and <(y) = (y position)>> then\n        show\n        if <touching (player v)?> then\n            hide\n            set [x v] to [-3000]\n            change [>>> coins v] by (1)\n            if <(Music?) = [1]> then\n                start sound [Collect v]\n            end\n        end\n    else\n        hide\n    end\nend\n\ndefine (Set) Clone at X: (x) Y: (y)\nset [x v] to (x)\nset [y v] to (y)\ncreate clone of (_myself_ v)\nnext costume\n\ndefine (Change) Clone at X: (x) Y: (y)\nchange [x v] by (x)\nchange [y v] by (y)\ncreate clone of (_myself_ v)\nnext costume\n\nwhen I receive [setup v]\nhide\nswitch costume to (1 v)\n(Set) Clone at X: [-100] Y: [-70]\n(Set) Clone at X: [-50] Y: [-70]\n(Set) Clone at X: [0] Y: [-70]\n(Set) Clone at X: [50] Y: [-70]\n(Set) Clone at X: [100] Y: [-70]\n(Set) Clone at X: [9479] Y: [2400]\n(Set) Clone at X: [9479] Y: [2300]\n(Set) Clone at X: [9479] Y: [2200]\n(Set) Clone at X: [9419] Y: [2000]\n(Set) Clone at X: [9419] Y: [1900]\n(Set) Clone at X: [9419] Y: [1800]\n(Set) Clone at X: [9479] Y: [1600]\n(Set) Clone at X: [9479] Y: [1500]\n(Set) Clone at X: [9479] Y: [1400]\n(Set) Clone at X: [9544] Y: [1200]\n(Set) Clone at X: [9544] Y: [1100]\n(Set) Clone at X: [9544] Y: [1000]\n(Set) Clone at X: [9479] Y: [800]\n(Set) Clone at X: [9479] Y: [700]\n(Set) Clone at X: [9479] Y: [600]\n(Set) Clone at X: [9479] Y: [500]\n(Set) Clone at X: [9479] Y: [400]\n(Set) Clone at X: [9479] Y: [300]\n(Set) Clone at X: [9479] Y: [200]\n(Set) Clone at X: [9479] Y: [100]\n(Set) Clone at X: [830] Y: [-70]\n(Set) Clone at X: [973] Y: [-70]\n(Set) Clone at X: [1110] Y: [-70]\n(Set) Clone at X: [1209] Y: [70]\n(Set) Clone at X: [1209] Y: [0]\n(Set) Clone at X: [1209] Y: [-70]\n(Set) Clone at X: [3228] Y: [0]\n(Set) Clone at X: [3228] Y: [-70]\n(Set) Clone at X: [3484] Y: [0]\n(Set) Clone at X: [3484] Y: [-70]\n(Set) Clone at X: [4665] Y: [0]\n(Set) Clone at X: [4665] Y: [-70]\n(Set) Clone at X: [4920] Y: [0]\n(Set) Clone at X: [4920] Y: [-70]\n(Set) Clone at X: [6053] Y: [-154]\n(Set) Clone at X: [6145] Y: [-238]\n(Set) Clone at X: [6240] Y: [-299]\n(Set) Clone at X: [6333] Y: [-374]\n(Set) Clone at X: [8549] Y: [-374]\n(Set) Clone at X: [8641] Y: [-299]\n(Set) Clone at X: [8743] Y: [-238]\n(Set) Clone at X: [8822] Y: [-154]\n(Set) Clone at X: [9419] Y: [-570]\n(Set) Clone at X: [9479] Y: [-570]\n(Set) Clone at X: [9544] Y: [-570]\n(Set) Clone at X: [-3000] Y: [0]\n\nwhen I receive [reset v]\ndelete this clone\n\nwhen I receive [tick v]\nPosition ((X) - (Scroll X)) (((Y) - (Scroll Y)) + (([cos v] of ((timer) * (200)) ) * (4)))\nnext costume\n\nwhen I receive [green flag v]\nset [>>> coins v] to [100]\nhide\n\nwhen flag clicked\nhide\n\n@Buy Food?\n\nwhen flag clicked\nhide\nset [timer v] to [0]\nset [touching v] to [0]\ngo to x: (-150) y: (-132)\nswitch costume to (pretzel v)\n\nwhen I receive [tick v]\nif <<<not <(costume [name v]) = [:\(]>> and <not <(costume [name v]) = [:\)2]>>> and <<not <(costume [name v]) = [:\)]>> and <not <(costume [name v]) = [:D]>>>> then\n    if <touching (mouse-pointer v)?> then\n        change size by (((80) - (size)) / (5))\n    else\n        change size by (((70) - (size)) / (5))\n    end\n    set [touching v] to [0]\n    if <<<(Player_X) < [3028]> and <(Player_X) > [2738]>> and <<(Player_Y) < [200]> and <(Player_Y) > [-80]>>> then\n        Burger\n        set [touching v] to [1]\n    end\n    if <<<(Player_X) < [4448]> and <(Player_X) > [3731]>> and <<(Player_Y) < [200]> and <(Player_Y) > [-80]>>> then\n        Pizza\n        set [touching v] to [1]\n    end\n    if <<<(Player_X) < [5427]> and <(Player_X) > [5134]>> and <<(Player_Y) < [200]> and <(Player_Y) > [-80]>>> then\n        Taco\n        set [touching v] to [1]\n    end\n    if <<<(Player_X) < [9217]> and <(Player_X) > [9028]>> and <<(Player_Y) < [450]> and <(Player_Y) > [220]>>> then\n        Lemonade\n        set [touching v] to [1]\n    end\n    if <<<(Player_X) < [9217]> and <(Player_X) > [9028]>> and <<(Player_Y) < [1150]> and <(Player_Y) > [940]>>> then\n        Pretzel\n        set [touching v] to [1]\n    end\n    if <<<(Player_X) < [9217]> and <(Player_X) > [9028]>> and <<(Player_Y) < [1900]> and <(Player_Y) > [1660]>>> then\n        Churro\n        set [touching v] to [1]\n    end\n    if <<<(Player_X) < [629]> and <(Player_X) > [259]>> and <<(Player_Y) < [200]> and <(Player_Y) > [-80]>>> then\n        Ticket\n        if <(Ticket Bought?) = [0]> then\n            set [touching v] to [1]\n        end\n    end\n    if <<<(Player_X) < [3484]> and <(Player_X) > [3227]>> and <<(Player_Y) < [200]> and <(Player_Y) > [-80]>>> then\n        Autograph\n        set [touching v] to [1]\n    end\n    if <<<(Player_X) < [4913]> and <(Player_X) > [4665]>> and <<(Player_Y) < [200]> and <(Player_Y) > [-80]>>> then\n        Autograph\n        set [touching v] to [1]\n    end\n    if <<<(Player_X) < [2500]> and <(Player_X) > [2290]>> and <<(Player_Y) < [450]> and <(Player_Y) > [290]>>> then\n        Super Shaker\n        set [touching v] to [1]\n    end\n    if <<<(Player_X) < [7300]> and <(Player_X) > [7100]>> and <<(Player_Y) < [450]> and <(Player_Y) > [400]>>> then\n        replace item (4) of [achievements v] with [1]\n    end\n    if <(Touching) = [1]> then\n        change y by (((-132) - (y position)) / (5))\n        change [ghost v] effect by (-10)\n    else\n        change y by (((-200) - (y position)) / (5))\n        change [ghost v] effect by (10)\n    end\n    if <(y position) < [-199]> then\n        hide\n    end\n    change [timer v] by (1)\nelse\n    change y by (((0) - (y position)) / (5))\n    if <(round (y position)) = [0]> then\n        change [ghost v] effect by (10)\n        change [timer v] by (1)\n        if <(Timer) > [10]> then\n            delete this clone\n        end\n    end\nend\n\ndefine Lemonade\nshow\nswitch costume to (lemonade v)\nif <<touching (mouse-pointer v)?> and <mouse down?>> then\n    if <(Timer) > [5]> then\n        set [timer v] to [0]\n        if <(>>> Coins) > [104]> then\n            change [>>> coins v] by (-5)\n            switch costume to (:\) v)\n            create clone of (_myself_ v)\n            replace item (3) of [achievements v] with [1]\n            if <(pick random (1) to (2)) = [1]> then\n                if <(pick random (1) to (2)) = [1]> then\n                    set [>>> food chat v] to [Very tart!]\n                else\n                    set [>>> food chat v] to [I love lemonade!]\n                end\n            else\n                if <(pick random (1) to (2)) = [1]> then\n                    set [>>> food chat v] to [This lemonade is amazing!]\n                else\n                    set [>>> food chat v] to [Delicious!]\n                end\n            end\n            broadcast (Food Chat v)\n        else\n            switch costume to (:\( v)\n            create clone of (_myself_ v)\n        end\n        switch costume to (pretzel v)\n    end\nend\n\ndefine Pretzel\nshow\nswitch costume to (pretzel v)\nif <<touching (mouse-pointer v)?> and <mouse down?>> then\n    if <(Timer) > [5]> then\n        set [timer v] to [0]\n        if <(>>> Coins) > [104]> then\n            change [>>> coins v] by (-5)\n            switch costume to (:\) v)\n            create clone of (_myself_ v)\n            if <(pick random (1) to (2)) = [1]> then\n                if <(pick random (1) to (2)) = [1]> then\n                    set [>>> food chat v] to [Yum!]\n                else\n                    set [>>> food chat v] to [I love pretzels!]\n                end\n            else\n                if <(pick random (1) to (2)) = [1]> then\n                    set [>>> food chat v] to [These pretzels are amazing!]\n                else\n                    set [>>> food chat v] to [Scrumptious!]\n                end\n            end\n            broadcast (Food Chat v)\n        else\n            switch costume to (:\( v)\n            create clone of (_myself_ v)\n        end\n        switch costume to (pretzel v)\n    end\nend\n\ndefine Churro\nshow\nswitch costume to (churro v)\nif <<touching (mouse-pointer v)?> and <mouse down?>> then\n    if <(Timer) > [5]> then\n        set [timer v] to [0]\n        if <(>>> Coins) > [102]> then\n            change [>>> coins v] by (-3)\n            switch costume to (:\) v)\n            create clone of (_myself_ v)\n            if <(pick random (1) to (2)) = [1]> then\n                if <(pick random (1) to (2)) = [1]> then\n                    set [>>> food chat v] to [Tasty!]\n                else\n                    set [>>> food chat v] to [I love churros!]\n                end\n            else\n                if <(pick random (1) to (2)) = [1]> then\n                    set [>>> food chat v] to [These churros are amazing!]\n                else\n                    set [>>> food chat v] to [Mouthwatering!]\n                end\n            end\n            broadcast (Food Chat v)\n        else\n            switch costume to (:\( v)\n            create clone of (_myself_ v)\n        end\n        switch costume to (pretzel v)\n    end\nend\n\nwhen I start as a clone\nshow\nset [ghost v] effect to (0)\ngo to [front v] layer\ngo to x: (0) y: (-200)\nset [timer v] to [0]\n\ndefine Pizza\nshow\nswitch costume to (pizza v)\nif <<touching (mouse-pointer v)?> and <mouse down?>> then\n    if <(Timer) > [5]> then\n        set [timer v] to [0]\n        if <(>>> Coins) > [109]> then\n            change [>>> coins v] by (-10)\n            switch costume to (:\) v)\n            create clone of (_myself_ v)\n            replace item (1) of [achievements v] with [1]\n            if <(pick random (1) to (2)) = [1]> then\n                if <(pick random (1) to (2)) = [1]> then\n                    set [>>> food chat v] to [Flavorful!]\n                else\n                    set [>>> food chat v] to [This pizza is so good that I'm going to follow twonerds! XD]\n                end\n            else\n                if <(pick random (1) to (2)) = [1]> then\n                    set [>>> food chat v] to [This pizza is amazing!]\n                else\n                    set [>>> food chat v] to [Yummy!]\n                end\n            end\n            broadcast (Food Chat v)\n        else\n            switch costume to (:\( v)\n            create clone of (_myself_ v)\n        end\n        switch costume to (pretzel v)\n    end\nend\n\ndefine Burger\nshow\nswitch costume to (burger v)\nif <<touching (mouse-pointer v)?> and <mouse down?>> then\n    if <(Timer) > [5]> then\n        set [timer v] to [0]\n        if <(>>> Coins) > [114]> then\n            change [>>> coins v] by (-15)\n            switch costume to (:\) v)\n            create clone of (_myself_ v)\n            replace item (6) of [achievements v] with [1]\n            if <(pick random (1) to (2)) = [1]> then\n                if <(pick random (1) to (2)) = [1]> then\n                    set [>>> food chat v] to [Delectable!]\n                else\n                    set [>>> food chat v] to [This burger is so good that I'm going to follow twonerds! XD]\n                end\n            else\n                if <(pick random (1) to (2)) = [1]> then\n                    set [>>> food chat v] to [This burger is amazing!]\n                else\n                    set [>>> food chat v] to [Luscious!]\n                end\n            end\n            broadcast (Food Chat v)\n        else\n            switch costume to (:\( v)\n            create clone of (_myself_ v)\n        end\n        switch costume to (pretzel v)\n    end\nend\n\ndefine Taco\nshow\nswitch costume to (taco v)\nif <<touching (mouse-pointer v)?> and <mouse down?>> then\n    if <(Timer) > [5]> then\n        set [timer v] to [0]\n        if <(>>> Coins) > [109]> then\n            change [>>> coins v] by (-10)\n            switch costume to (:\) v)\n            create clone of (_myself_ v)\n            if <(pick random (1) to (2)) = [1]> then\n                if <(pick random (1) to (2)) = [1]> then\n                    set [>>> food chat v] to [Tacos are the best!]\n                else\n                    set [>>> food chat v] to [This taco is so good that I'm going to follow twonerds! XD]\n                end\n            else\n                if <(pick random (1) to (2)) = [1]> then\n                    set [>>> food chat v] to [This taco is amazing!]\n                else\n                    set [>>> food chat v] to [Finger-lickin good!]\n                end\n            end\n            broadcast (Food Chat v)\n        else\n            switch costume to (:\( v)\n            create clone of (_myself_ v)\n        end\n        switch costume to (pretzel v)\n    end\nend\n\ndefine Ticket\nshow\nswitch costume to (ticket v)\nif <<touching (mouse-pointer v)?> and <mouse down?>> then\n    if <(Timer) > [5]> then\n        if <(Ticket Bought?) = [0]> then\n            set [timer v] to [0]\n            if <(>>> Coins) > [104]> then\n                change [>>> coins v] by (-5)\n                set [ticket bought? v] to [1]\n                switch costume to (:d v)\n                create clone of (_myself_ v)\n                set [>>> food chat v] to [I'm in!]\n                broadcast (Food Chat v)\n            else\n                switch costume to (:\( v)\n                create clone of (_myself_ v)\n            end\n            switch costume to (pretzel v)\n        end\n    end\nend\n\ndefine Autograph\nshow\nswitch costume to (autograph v)\nif <<touching (mouse-pointer v)?> and <mouse down?>> then\n    if <(Timer) > [5]> then\n        set [timer v] to [0]\n        if <(>>> Coins) > [101]> then\n            change [>>> coins v] by (-2)\n            switch costume to (:\)2 v)\n            create clone of (_myself_ v)\n            replace item (5) of [achievements v] with [1]\n            if <(pick random (1) to (2)) = [1]> then\n                if <(pick random (1) to (2)) = [1]> then\n                    set [>>> food chat v] to [Yay!]\n                else\n                    set [>>> food chat v] to [Awesome!]\n                end\n            else\n                if <(pick random (1) to (2)) = [1]> then\n                    set [>>> food chat v] to [I love autographs!]\n                else\n                    set [>>> food chat v] to [Your signature is so neat!]\n                end\n            end\n            broadcast (Food Chat v)\n        else\n            switch costume to (:\( v)\n            create clone of (_myself_ v)\n        end\n        switch costume to (pretzel v)\n    end\nend\n\ndefine Super Shaker\nset [player_x v] to (pick random (2291) to (2499))\nset [player_y v] to (pick random (293) to (449))\nset [>>> food chat v] to [AAAAAAHHH!!]\nbroadcast (Food Chat v)\nshow\nswitch costume to (get off v)\nif <<touching (mouse-pointer v)?> and <mouse down?>> then\n    if <(Timer) > [5]> then\n        replace item (7) of [achievements v] with [1]\n        set [timer v] to [0]\n        set [player_x v] to [2599]\n        set [player_y v] to [294]\n    end\nend\n\n@Autograph Booths\n\ndefine (Set) Clone at X: (x) Y: (y)\nset [x v] to (x)\nset [y v] to (y)\ncreate clone of (_myself_ v)\nnext costume\n\ndefine Position (x) (y)\nset [brightness v] effect to (0)\ngo to x: (x) y: (y)\nif <<(x) = (x position)> and <(y) = (y position)>> then\n    show\nelse\n    hide\nend\nif <(costume [name v]) = [81]> then\n    if <touching (player v)?> then\n        say [Hello! Want an autograph?]\n    else\n        say []\n    end\nend\nif <(costume [name v]) = [82]> then\n    if <touching (player v)?> then\n        say [Wassup, you look like you want an autograph!]\n    else\n        say []\n    end\nend\nif <(costume [name v]) = [111]> then\n    if <touching (player v)?> then\n        say [Hey, Hey, want an autograph?]\n    else\n        say []\n    end\nend\nif <(costume [name v]) = [112]> then\n    if <touching (player v)?> then\n        say [Autographs, anyone? Only $2!]\n    else\n        say []\n    end\nend\n\nwhen I receive [reset v]\ndelete this clone\n\nwhen I receive [tick v]\nPosition ((X) - (Scroll X)) ((Y) - (Scroll Y))\n\nwhen I receive [green flag v]\nhide\n\nwhen I receive [setup v]\nhide\nswitch costume to (81 v)\n(Set) Clone at X: [3354] Y: [0]\n(Set) Clone at X: [3354] Y: [0]\n(Set) Clone at X: [4791] Y: [0]\n(Set) Clone at X: [4791] Y: [0]\nswitch costume to (costume1 v)\n\nwhen flag clicked\nhide\n\n@Achievements\n\nwhen flag clicked\nhide\n\nwhen I receive [achieve v]\nSetup\nwait until <not <mouse down?>>\nrepeat until <mouse down?>\n    change y by (((0) - (y position)) / (5))\nend\nset [pause? v] to [no]\nrepeat (10)\n    change [ghost v] effect by (10)\nend\n\nwhen I start as a clone\nshow\nswitch costume to (item (ID) of [achievements v])\nclear graphic effects\nset [y v] to (y position)\ngo to x: (-165) y: (180)\nrepeat until <(Pause?) = [no]>\n    change y by (((Y) - (y position)) / (10))\n    go to [front v] layer\nend\nrepeat (10)\n    change [ghost v] effect by (10)\nend\ndelete this clone\n\ndefine Setup\nset [id v] to [1]\ngo to x: (-165) y: (70)\nrepeat (4)\n    create clone of (_myself_ v)\n    change [id v] by (1)\n    change y by (-21)\nend\nrepeat (2)\n    create clone of (_myself_ v)\n    change [id v] by (1)\n    change y by (-42)\nend\ncreate clone of (_myself_ v)\nchange [id v] by (1)\nchange y by (-21)\ncreate clone of (_myself_ v)\nshow\nswitch costume to (list v)\ngo to x: (0) y: (5000)\ngo to [front v] layer\nclear graphic effects\nset size to (100) %\n\n