Forest! ll A Multiplayer Scrolling Platformer!  #Games #All 

Instructions: •Forests!•\n•A Multiplayer Scrolling Platformer•\nBiraz kısa oldu farkındayım zamanım yoktu\n✦✦ How to play ✦✦\n➜ Collect coins, use them to buy items in the shop\n➜ [T] to chat, click the player on moble.\n➜ [N] to turn on/off names\n➜ Jump on Monsters\n➜Press Space to use parashoot or jetpack. [Z] to switch\n\n✦✦ Less lag ✦✦\n➜ https://turbowarp.org/523102512\n\n✦✦ Credits ✦✦\n➜ @TheCactusMaster \n➜ @stradfordjames \n➜ @uvbeach\n➜ @-InfinityCloud- for shop and entitys\n➜ @susbiberi adam takip et\n➜@-xaf-\n\n #Games #art #all #platformer #Multiplayer #Scrolling #MultiplayerScrollingplatformer # trend

@Stage\n\nwhen flag clicked\nswitch backdrop to (backdrop1 v)\n\nwhen flag clicked\nforever\n    set [timer v] to ((join (letter (10) of (days since 2000)) (letter (11) of (days since 2000))) mod (50))\nend\n\nwhen I receive [green flag v]\nforever\n    play sound [Tobu & Itro - Sunburst.mp3 v] until done\nend\n\nwhen I receive [start v]\nbroadcast (Green flag v) and wait\nbroadcast (Play Game v) and wait\n\n@Blank\n\n@Connnect\n\nwhen flag clicked\nhide\n\nwhen I receive [timeout v]\ngo to x: (0) y: (0)\nclear graphic effects\nswitch costume to (timeout v)\nshow\ngo to [front v] layer\nstop [all v]\n\nwhen I receive [done v]\nclear graphic effects\nswitch costume to (connecting2 v)\ngo to x: (10) y: (10)\nforever\n    wait (1) seconds\n    if <(CONNECT) = [Connected]> then\n        switch costume to (connected!2 v)\n        wait (2) seconds\n        repeat (50)\n            change [ghost v] effect by (2)\n        end\n        stop [this script v]\n    else\n        if <(CONNECT) = [Full]> then\n            switch costume to (fail2 v)\n        else\n            switch costume to (connecting2 v)\n        end\n    end\nend\n\n@Platforms\n\nwhen I receive [green flag v]\ngo to [back v] layer\nhide\nset [x v] to [0]\nset [y v] to [0]\nswitch costume to (1 v)\nClone at [480] [0]\nClone at [480] [0]\nClone at [480] [0]\nClone at [480] [0]\nClone at [480] [0]\nClone at [480] [250]\nClone at [480] [400]\nClone at [-480] [0]\nClone at [-480] [0]\nClone at [480] [400]\nClone at [480] [0]\nClone at [480] [0]\n\nwhen I receive [tick v]\nposition ((x) - (SCROLL X)) ((y) - (SCROLL Y))\nset [ghost v] effect to (99)\n\ndefine position (x) (y)\ngo to x: (x) y: (y)\nif <<(x) = (x position)> and <(y) = (y position)>> then\n    go [backward v] (1) layers\n    go to [back v] layer\n    show\nelse\n    hide\nend\n\ndefine Clone at (x) (y)\ncreate clone of (_myself_ v)\nchange [x v] by (x)\nchange [y v] by (y)\nnext costume\n\n@Checkpoint\n\nwhen [m v] key pressed\nset [mouse v] to (join ((mouse x) + (SCROLL X)) (join [,] (join [ ] ((mouse y) + (SCROLL Y)))))\nshow variable [mouse v]\n\nwhen I receive [green flag v]\nhide\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\ndefine Clone at (x) (y)\nset [x v] to (x)\nset [y v] to (y)\ncreate clone of (_myself_ v)\n\nwhen flag clicked\nhide\nset [checkpoint v] to [0]\nset [x v] to [0]\nset [y v] to [0]\nswitch costume to (closed v)\nClone at [1500] [180]\nClone at [3150] [580]\nset [x v] to [-99999]\n\nClone at [4000] [160]\nClone at [5000] [160]\n\nwhen I receive [tick v]\nposition ((x) - (SCROLL X)) ((y) - (SCROLL Y))\nif <(costume [number v]) = [1]> then\n    if <touching (2 . game_player v)?> then\n        switch costume to (open v)\n        change [coins v] by (10)\n        change [checkpoint v] by (1)\n    end\nend\ngo to [front v] layer\n\nClone at [] []\n\n@Saws\n\nwhen I receive [tick v]\nposition ((x) - (SCROLL X)) ((y) - (SCROLL Y))\ngo to [back v] layer\nturn right (6) degrees\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 [green flag v]\nhide\nset [x v] to [0]\nset [y v] to [0]\nswitch costume to (1 v)\nClone at [-240] [-85]\nClone at [2100] [152]\nClone at [2250] [152]\nClone at [2400] [152]\nClone at [3100] [-90]\nClone at [4200] [130]\nClone at [5100] [130]\nset [x v] to [-99999]\n\nClone at [3100] [-90]\nClone at [4200] [130]\nClone at [5100] [130]\nset [x v] to [-99999]\n\ndefine Clone at (x) (y)\nset [x v] to (x)\nset [y v] to (y)\ncreate clone of (_myself_ v)\n\nwhen flag clicked\nforever\n    hide variable [mouse v]\nend\n\n@Danger\n\nwhen I receive [green flag v]\nhide\nset [x v] to [0]\nset [y v] to [0]\nswitch costume to (1 v)\nClone at [480] [0]\nClone at [480] [0]\nClone at [480] [0]\nClone at [480] [0]\nClone at [480] [0]\nClone at [480] [300]\nClone at [480] [400]\nClone at [480] [0]\nClone at [480] [0]\nClone at [480] [0]\n\nwhen I receive [tick v]\nposition ((x) - (SCROLL X)) ((y) - (SCROLL Y))\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\ndefine Clone at (x) (y)\ncreate clone of (_myself_ v)\nchange [x v] by (x)\nchange [y v] by (y)\nnext costume\n\n@Chat\n\nwhen flag clicked\nhide\ngo to x: (0) y: (0)\nshow\nset [ghost v] effect to (100)\nforever\n    set size to (0) %\n    wait until <(is the chat open) = [1]>\n    repeat (10)\n        set size to ((size) + (((100) - (size)) / (3))) %\n        change [ghost v] effect by (-10)\n    end\n    wait until <(is the chat open) = [0]>\n    repeat (10)\n        set size to ((size) + (((0) - (size)) / (3))) %\n        change [ghost v] effect by (10)\n    end\nend\n\ndefine GO\ngo [forward v] (111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111) layers\ngo to [front v] layer\ngo to [front v] layer\n\nwhen flag clicked\nhide\ngo to x: (0) y: (0)\nshow\nset [ghost v] effect to (100)\nforever\n    GO\nend\n\n@Ladder\n\nwhen I receive [green flag v]\ngo [backward v] (1) layers\nhide\n\nwhen I receive [tick v]\nposition ((x) - (SCROLL X)) ((y) - (SCROLL Y))\n\nwhen I receive [setup v]\nset [x v] to [0]\nset [y v] to [0]\nswitch costume to (1 v)\nClone at [480] [0]\nClone at [480] [0]\nClone at [480] [0]\nClone at [480] [0]\nClone at [480] [0]\nClone at [480] [0]\nClone at [480] [0]\nClone at [480] [0]\nClone at [480] [0]\nClone at [480] [0]\nClone at [4000] [160]\n\ndefine position (x) (y)\ngo to x: (x) y: (y)\nif <<(x) = (x position)> and <(y) = (y position)>> then\n    show\n    go to [back v] layer\n    go [forward v] (1) layers\nelse\n    hide\nend\n\nwhen I receive [reset v]\ndelete this clone\n\ndefine Clone at (x) (y)\ncreate clone of (_myself_ v)\nchange [x v] by (x)\nchange [y v] by (y)\nnext costume\n\n@Platforms_Art\n\nwhen I receive [green flag v]\nhide\nset [x v] to [0]\nset [y v] to [0]\nswitch costume to (1 v)\nClone at [480] [0]\nClone at [480] [0]\nClone at [480] [0]\nClone at [480] [0]\nClone at [480] [0]\nClone at [480] [250]\nClone at [480] [400]\nClone at [-480] [0]\nClone at [-480] [0]\nClone at [480] [400]\nClone at [480] [0]\nClone at [480] [0]\n\nwhen I receive [tick v]\nposition ((x) - (SCROLL X)) ((y) - (SCROLL Y))\n\ndefine position (x) (y)\ngo to x: (x) y: (y)\nif <<(x) = (x position)> and <(y) = (y position)>> then\n    go [forward v] (1) layers\n    go to [back v] layer\n    show\nelse\n    hide\nend\n\ndefine Clone at (x) (y)\ncreate clone of (_myself_ v)\nchange [x v] by (x)\nchange [y v] by (y)\nnext costume\n\n@Clouds\n\nwhen flag clicked\nset [ghost v] effect to (0)\nforever\n    hide\n    create clone of (_myself_ v)\n    wait (pick random (1.5) to (3)) seconds\nend\n\nwhen I start as a clone\nshow\nswitch costume to (pick random (1) to (5))\nif <(pick random (1) to (2)) = [2]> then\n    set [d v] to [-250]\nelse\n    set [d v] to [250]\nend\ngo to x: (d) y: (pick random (-130) to (170))\nset [ghost v] effect to (pick random (40) to (70))\nif <(d) = [250]> then\n    repeat until <(x position) < [-267]>\n        change x by (pick random (-1) to (-3))\n        go to [back v] layer\n        go to [back v] layer\n        go [backward v] (999) layers\n    end\nelse\n    repeat until <(x position) > [267]>\n        change x by (pick random (1) to (3))\n        go to [back v] layer\n        go to [back v] layer\n        go [backward v] (999) layers\n    end\nend\ndelete this clone\n\nwhen I receive [setup v]\ndelete this clone\n\nwhen flag clicked\ngo to [back v] layer\nforever\n    go to [back v] layer\n    go [backward v] (10000000000) layers\nend\n\n@Coin_counter\n\nwhen flag clicked\nhide\n\nwhen I start as a clone\nforever\n    go to x: (((clone#) * (15)) - (111)) y: (150)\n    if <(length of (COINS)) < (clone#)> then\n        hide\n    else\n        show\n        switch costume to (letter (clone#) of (COINS))\n    end\nend\n\nwhen I receive [green flag v]\ngo to [front v] layer\nshow\nset size to (140) %\nset [clone# v] to [1]\nrepeat (30)\n    create clone of (_myself_ v)\n    change [clone# v] by (1)\nend\nhide\n\n@26 . Water\n\nwhen I receive [green flag v]\nset [swing amount v] to [19]\nset [swing amount v] to ((round ((swing amount) / (2))) * (2))\nset [water tick v] to [-12]\nset [x v] to [0]\nset [y v] to [0]\nset [sy v] to [0]\nhide\nswitch costume to (1 v)\nClone at [1000] [-145]\nClone at [1000] [-145]\nClone at [1000] [-145]\nClone at [1000] [-145]\nClone at [1000] [-145]\nClone at [1000] [-145]\nClone at [4000] [100]\nClone at [1000] [-145]\nClone at [1000] [-145]\nClone at [1000] [-145]\nClone at [1000] [-145]\n\nwhen I receive [tick v]\nposition ((x) - (SCROLL X)) ((y) - (SCROLL Y))\nif <(water tick) > [0]> then\n    change [sy v] by (0.7)\nelse\n    change [sy v] by (-0.7)\nend\nif <(water tick) > ((swing amount) - (1))> then\n    set [water tick v] to ((swing amount) * (-1))\nend\nchange [water tick v] by (1)\nchange y by (sy)\n\ndefine Clone at (x) (y)\ncreate clone of (_myself_ v)\nset [x v] to (x)\nset [y v] to (y)\nnext costume\n\nwhen I receive [reset v]\nset [sy v] to [0]\nset [water tick v] to ((swing amount) * (-1))\n\nwhen flag clicked\ngo to [back v] layer\n\ndefine position (x) (y)\ngo to x: (x) y: (y)\nif <<(x) = (x position)> and <(y) = (y position)>> then\n    show\n    go [backward v] (1) layers\n    go to [back v] layer\nelse\n    hide\nend\n\n@2 . Game_Player\n\nwhen flag clicked\ndelete all of [chat v]\ninsert [Hi!] at (1) of [chat v] \ninsert [Come With Me!] at (2) of [chat v] \ninsert [Ok!] at (3) of [chat v] \ninsert [Nice!] at (4) of [chat v] \ninsert [Look At Me!] at (5) of [chat v] \ninsert [Be Careful!] at (6) of [chat v] \ninsert [Lol!] at (7) of [chat v] \ninsert [Bye!] at (8) of [chat v] \ninsert [This Is Cool!] at (9) of [chat v] \ninsert [Whats  Up!] at (10) of [chat v] \ninsert [Go To My Profile!] at (11) of [chat v] \ninsert [Lets Play!] at (12) of [chat v] \ninsert [Lets Chat!] at (13) of [chat v] \ninsert [Lets Be Friends!] at (14) of [chat v] \ninsert [Yes!] at (15) of [chat v] \ninsert [😀] at (16) of [chat v] \ninsert [😂] at (17) of [chat v] \ninsert [😎] at (18) of [chat v] \ninsert [🥰] at (19) of [chat v] \ninsert [😁] at (20) of [chat v] \ninsert [😨] at (21) of [chat v] \ninsert [🤭] at (22) of [chat v] \ninsert [🤯] at (23) of [chat v] \ninsert [😲] at (24) of [chat v] \n\nwhen flag clicked\nshow list [chat v]\nset [is the chat open v] to [0]\nforever\n    if <<key (t v) pressed?> or <<touching (mouse-pointer v)?> and <mouse down?>>> then\n        if <(is the chat open) = [1]> then\n            set [is the chat open v] to [0]\n        else\n            set [is the chat open v] to [1]\n        end\n        wait until <<not <<touching (mouse-pointer v)?> and <mouse down?>>> and <not <key (t v) pressed?>>>\n    end\n    Chat\nend\n\nwhen flag clicked\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 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 send cloud data\nset [encoded v] to []\nwrite (costume [number v]) to encoded\nwrite (username) to encoded\nwrite (round ((timer) * (10))) to encoded\nwrite (x) to encoded\nwrite (y) to encoded\nwrite (CHAT) to encoded\nset cloud # (MY PLAYER #) to (encoded)\n\nwhen flag clicked\n\nwhen I receive [green flag v]\nshow\ngo to [front v] layer\n\nhide\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    Reset\n    repeat until <(EXIT) > []>\n        Tick\n        broadcast (Tick v)\n    end\n    if <(EXIT) = [win]> then\n        Game - Win\n    else\n        set [exit v] to []\n    end\nend\n\ndefine Tick\nif <(is the chat open) = [0]> then\n    if <(TS \(mouse touching shop\)) = [0]> then\n        if <(TSB \(mouse touching shop button\)) = [0]> then\n            if <(Speed boost) = [1]> then\n                if <touching (26 . water v)?> then\n                    change [sx v] by ((1.3) * ((2) * (<<<key (right arrow v) pressed?> or <key (d v) pressed?>> or <<((mouse x) - (20)) > (x position)> and <mouse down?>>> - <<<key (left arrow v) pressed?> or <key (a v) pressed?>> or <<((mouse x) + (20)) < (x position)> and <mouse down?>>>)))\n                    set [sx v] to ((sx) * (1.0))\n                else\n                    if <touching (ladder v)?> then\n                        change [sx v] by ((1.3) * ((2) * (<<<key (right arrow v) pressed?> or <key (d v) pressed?>> or <<((mouse x) - (20)) > (x position)> and <mouse down?>>> - <<<key (left arrow v) pressed?> or <key (a v) pressed?>> or <<((mouse x) + (20)) < (x position)> and <mouse down?>>>)))\n                        set [sx v] to ((sx) * (1.0))\n                    else\n                        change [sx v] by ((1.3) * ((1.8) * (<<<key (right arrow v) pressed?> or <key (d v) pressed?>> or <<((mouse x) - (20)) > (x position)> and <mouse down?>>> - <<<key (left arrow v) pressed?> or <key (a v) pressed?>> or <<((mouse x) + (20)) < (x position)> and <mouse down?>>>)))\n                        set [sx v] to ((sx) * (0.75))\n                    end\n                end\n            else\n                if <touching (26 . water v)?> then\n                    change [sx v] by ((1.8) * (<<<key (right arrow v) pressed?> or <key (d v) pressed?>> or <<((mouse x) - (20)) > (x position)> and <mouse down?>>> - <<<key (left arrow v) pressed?> or <key (a v) pressed?>> or <<((mouse x) + (20)) < (x position)> and <mouse down?>>>))\n                    set [sx v] to ((sx) * (0.7))\n                else\n                    if <touching (ladder v)?> then\n                        change [sx v] by ((3) * (<<<key (right arrow v) pressed?> or <key (d v) pressed?>> or <<((mouse x) - (20)) > (x position)> and <mouse down?>>> - <<<key (left arrow v) pressed?> or <key (a v) pressed?>> or <<((mouse x) + (20)) < (x position)> and <mouse down?>>>))\n                        set [sx v] to ((sx) * (0.65))\n                    else\n                        change [sx v] by ((1.8) * (<<<key (right arrow v) pressed?> or <key (d v) pressed?>> or <<((mouse x) - (20)) > (x position)> and <mouse down?>>> - <<<key (left arrow v) pressed?> or <key (a v) pressed?>> or <<((mouse x) + (20)) < (x position)> and <mouse down?>>>))\n                        set [sx v] to ((sx) * (0.75))\n                    end\n                end\n            end\n        end\n    end\nend\nif <([abs v] of (sx) ) > [0.9]> then\n    Change Player x by (round (sx))\nend\nif <(TS \(mouse touching shop\)) = [0]> then\n    if <(TSB \(mouse touching shop button\)) = [0]> then\n        if <(is the chat open) = [0]> then\n            if <<<key (up arrow v) pressed?> or <key (w v) pressed?>> or <<((mouse y) + (-20)) > (y position)> and <mouse down?>>> then\n                if <(in air) < [3]> then\n                    if <(sy) > [-2]> then\n                        if <(Jump boost) = [1]> then\n                            set [sy v] to [15]\n                        else\n                            set [sy v] to [12]\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\nif <touching (26 . water v)?> then\n    if <(TS \(mouse touching shop\)) = [0]> then\n        if <(TSB \(mouse touching shop button\)) = [0]> then\n            if <(is the chat open) = [0]> then\n                if <<<key (up arrow v) pressed?> or <key (w v) pressed?>> or <<((mouse y) + (-20)) > (y position)> and <mouse down?>>> then\n                    change [y v] by (2)\n                end\n                if <<<key (down arrow v) pressed?> or <key (s v) pressed?>> or <<((mouse y) - (20)) < (y position)> and <mouse down?>>> then\n                    change [y v] by (-2)\n                end\n            end\n        end\n    end\n    if <(water tick) > [0]> then\n        change [sy v] by (-0.9)\n    else\n        change [sy v] by (0.9)\n    end\n    if <(water tick) > [15]> then\n        set [water tick v] to [-15]\n    end\n    change [water tick v] by (0.0000001)\nelse\n    set [water tick v] to [-15]\n    if <touching (ladder v)?> then\n        if <(TS \(mouse touching shop\)) = [0]> then\n            if <(TSB \(mouse touching shop button\)) = [0]> then\n                if <(is the chat open) = [0]> then\n                    if <<<key (up arrow v) pressed?> or <key (w v) pressed?>> or <<((mouse y) + (-20)) > (y position)> and <mouse down?>>> then\n                        change [y v] by (6)\n                    end\n                    if <<<key (down arrow v) pressed?> or <key (s v) pressed?>> or <<((mouse y) - (20)) < (y position)> and <mouse down?>>> then\n                        change [y v] by (-6)\n                    end\n                end\n            end\n        end\n        set [sy v] to [0]\n    else\n        if <(sy) > [-20]> then\n            change [sy v] by (-1.3)\n        end\n    end\nend\nChange player y by (sy)\n Test - Die\nset [scroll x v] to (x)\nif <(SCROLL X) < [0]> then\n    set [scroll x v] to [0]\nend\nPosition\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 <<<<<key (right arrow v) pressed?> or <key (d v) pressed?>> or <<((mouse x) - (20)) > (x position)> and <mouse down?>>> or <<<key (left arrow v) pressed?> or <key (a v) pressed?>> or <<((mouse x) + (20)) < (x position)> and <mouse down?>>>> or <<<<key (up arrow v) pressed?> or <key (w v) pressed?>> or <<((mouse y) - (20)) > (y position)> and <mouse down?>>> or <<<key (down arrow v) pressed?> or <key (s v) pressed?>> or <<((mouse y) + (20)) > (y position)> and <mouse down?>>>>> then\n    set [timeout v] to [1000]\nelse\n    change [timeout v] by (-1)\nend\nif <(Timeout) < [1]> then\n    if <not <<(username) = [kimj12]> or <(username) = [-InfinityCloud-]>>> then\n        broadcast (timeout v)\n        hide\n    end\nend\nif <(parashoot) = [1]> then\n    if <(Para or Jet?) = [p]> then\n        if <<key (space v) pressed?> and <<not <touching (platforms v)?>> and <not <touching (26 . water v)?>>>> then\n            set [sy v] to [-1]\n        else\n            if <<key (space v) pressed?> and <<key (right arrow v) pressed?> and <<not <touching (platforms v)?>> and <not <touching (26 . water v)?>>>>> then\n                set [sy v] to [-1]\n            else\n                if <<key (space v) pressed?> and <<key (left arrow v) pressed?> and <<not <touching (platforms v)?>> and <not <touching (26 . water v)?>>>>> then\n                    set [sy v] to [-1]\n                end\n            end\n        end\n    end\nend\nif <(jetpack) = [1]> then\n    if <(Para or Jet?) = [j]> then\n        if <key (space v) pressed?> then\n            change [sy v] by (1.8)\n            broadcast (Jetpack v)\n        end\n    end\nend\n\ndefine Change Player x by (sx)\nchange [x v] by (sx)\nPosition\nif <touching (platforms v)?> then\n    repeat (8)\n        change [y v] by (1)\n        Position\n        if <not <touching (platforms v)?>> then\n            stop [this script v]\n        end\n    end\n    change [y v] by (-8)\n    if <touching (platforms v)?> then\n        if <<<key (up arrow v) pressed?> or <key (w v) pressed?>> or <<((mouse y) - (5)) > (y position)> and <mouse down?>>> then\n            if <(sx) > [0]> then\n                set [sx v] to [-16]\n            else\n                set [sx v] to [16]\n            end\n            set [sy v] to [12]\n        end\n        Position\n    end\n    repeat until <not <touching (platforms v)?>>\n        change [x v] by ((([abs v] of (sx) ) / (sx)) * (-1))\n        Position\n    end\nend\n\ndefine Change player y by (sy)\nchange [y v] by (sy)\nchange [in air v] by (1)\nPosition\nrepeat until <not <touching (platforms v)?>>\n    change [y v] by ((([abs v] of (sy) ) / (sy)) * (-1))\n    if <(sy) < [0]> then\n        set [in air v] to [0]\n    end\n    Position\n    set [sy v] to [0]\nend\n\ndefine Position\ngo to x: ((x) - (SCROLL X)) y: ((y) - (SCROLL Y))\n\ndefine  Test - Die\nif <<touching (saws v)?> or <<touching (lava v)?> or <touching (danger v)?>>> then\n    set [exit v] to [die]\n    Reset\nend\n\ndefine Game - Win\nrepeat (50)\n    point towards (exit v)\n    turn right (65) degrees\n    move ((distance to [exit v]) / (2)) steps\n    change size by (-1)\n    change [ghost v] effect by (2)\nend\nhide\nchange [level v] by (1)\nwait (1) seconds\nset [ghost v] effect to (0)\n\nwhen flag clicked\nforever\n    go to [front v] layer\n    go [forward v] (2) layers\n    set size to (120) %\n    if <<<<key (up arrow v) pressed?> or <key (w v) pressed?>> or <<((mouse y) + (-20)) > (y position)> and <mouse down?>>> and <<<key (right arrow v) pressed?> or <key (d v) pressed?>> or <<((mouse x) + (15)) > (x position)> and <mouse down?>>>> then\n        switch costume to (right up v)\n    else\n        if <<<<key (up arrow v) pressed?> or <key (w v) pressed?>> or <<((mouse y) + (-20)) > (y position)> and <mouse down?>>> and <<<key (left arrow v) pressed?> or <key (a v) pressed?>> or <<((mouse x) - (15)) < (x position)> and <mouse down?>>>> then\n            switch costume to (left up v)\n        else\n            if <<<key (up arrow v) pressed?> or <key (w v) pressed?>> or <<((mouse y) + (-20)) > (y position)> and <mouse down?>>> then\n                switch costume to (up v)\n            else\n                if <<not <key (space v) pressed?>> and <<<key (right arrow v) pressed?> or <key (d v) pressed?>> or <<((mouse x) - (-20)) > (x position)> and <mouse down?>>>> then\n                    switch costume to (right v)\n                else\n                    if <<not <key (space v) pressed?>> and <<<key (left arrow v) pressed?> or <key (a v) pressed?>> or <<((mouse x) + (-20)) < (x position)> and <mouse down?>>>> then\n                        switch costume to (left v)\n                    else\n                        switch costume to (middle v)\n                        if <(parashoot) = [1]> then\n                            if <(Para or Jet?) = [p]> then\n                                if <<not <key (left arrow v) pressed?>> and <<not <key (right arrow v) pressed?>> and <<key (space v) pressed?> and <<not <touching (platforms v)?>> and <not <touching (26 . water v)?>>>>>> then\n                                    switch costume to (3b v)\n                                else\n                                    if <<key (space v) pressed?> and <<key (right arrow v) pressed?> and <<not <touching (platforms v)?>> and <not <touching (26 . water v)?>>>>> then\n                                        switch costume to (2b v)\n                                    else\n                                        if <<key (space v) pressed?> and <<key (left arrow v) pressed?> and <<not <touching (platforms v)?>> and <not <touching (26 . water v)?>>>>> then\n                                            switch costume to (1b v)\n                                        else\n                                            switch costume to (middle v)\n                                        end\n                                    end\n                                end\n                            end\n                        end\n                        if <(jetpack) = [1]> then\n                            if <(Para or Jet?) = [j]> then\n                                if <<key (space v) pressed?> and <<not <key (right arrow v) pressed?>> and <not <key (left arrow v) pressed?>>>> then\n                                    switch costume to (jetpack v)\n                                else\n                                    if <<key (space v) pressed?> and <<key (right arrow v) pressed?> and <not <key (left arrow v) pressed?>>>> then\n                                        switch costume to (jetpack2 v)\n                                    else\n                                        if <<key (space v) pressed?> and <<key (left arrow v) pressed?> and <not <key (right arrow v) pressed?>>>> then\n                                            switch costume to (jetpack3 v)\n                                        else\n                                            switch costume to (middle v)\n                                        end\n                                    end\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\n\nwhen I receive [timeout v]\nhide\n\ndefine Reset\nif <(CHECKPOINT) = [0]> then\n    set [x v] to [-100]\n    set [y v] to [-60]\n    set [scroll y v] to (y)\n    set [scroll x v] to (x)\nelse\n    if <(CHECKPOINT) = [1]> then\n        set [x v] to [1500]\n        set [y v] to [185]\n        set [scroll y v] to (y)\n        set [scroll x v] to (x)\n    else\n        if <(CHECKPOINT) = [2]> then\n            set [x v] to [3150]\n            set [y v] to [600]\n            set [scroll y v] to (y)\n            set [scroll x v] to (x)\n        else\n            if <(CHECKPOINT) = [3]> then\n                set [x v] to [5000]\n                set [y v] to [160]\n                set [scroll y v] to (y)\n                set [scroll x v] to (x)\n            end\n        end\n    end\nend\nset [sx v] to [0]\nset [sy v] to [0]\nset [water tick v] to [-7]\nset [in air v] to [10]\nset [timeout v] to [1000]\nset [exit v] to []\nset size to (100) %\nshow\nset rotation style [left-right v]\n\nset [sy v] to [0]\n\nset [sy v] to [0]\n\nwhen I receive [small_bounce v]\nset [sy v] to [15]\n\nwhen I receive [die v]\nset [exit v] to [die]\nReset\n\nwhen I receive [boucne v]\nset [sy v] to [20]\n\ndefine Chat\nif <(is the chat open) = [1]> then\n    if <key (1 v) pressed?> then\n        set [chat v] to [1]\n        say (item (1) of [chat v])\n        set [is the chat open v] to [0]\n        wait (5) seconds\n        say []\n        set [chat v] to [0]\n    else\n        if <key (2 v) pressed?> then\n            set [chat v] to [2]\n            say (item (2) of [chat v])\n            set [is the chat open v] to [0]\n            wait (5) seconds\n            say []\n            set [chat v] to [0]\n        else\n            if <key (3 v) pressed?> then\n                set [chat v] to [3]\n                say (item (3) of [chat v])\n                set [is the chat open v] to [0]\n                wait (5) seconds\n                say []\n                set [chat v] to [0]\n            else\n                if <key (4 v) pressed?> then\n                    set [chat v] to [4]\n                    say (item (4) of [chat v])\n                    set [is the chat open v] to [0]\n                    wait (5) seconds\n                    say []\n                    set [chat v] to [0]\n                else\n                    if <key (5 v) pressed?> then\n                        set [chat v] to [5]\n                        say (item (5) of [chat v])\n                        set [is the chat open v] to [0]\n                        wait (5) seconds\n                        say []\n                        set [chat v] to [0]\n                    else\n                        if <key (6 v) pressed?> then\n                            set [chat v] to [6]\n                            say (item (6) of [chat v])\n                            set [is the chat open v] to [0]\n                            wait (5) seconds\n                            say []\n                            set [chat v] to [0]\n                        else\n                            if <key (7 v) pressed?> then\n                                set [chat v] to [7]\n                                say (item (7) of [chat v])\n                                set [is the chat open v] to [0]\n                                wait (5) seconds\n                                say []\n                                set [chat v] to [0]\n                            else\n                                if <key (8 v) pressed?> then\n                                    set [chat v] to [8]\n                                    set [is the chat open v] to [0]\n                                    say (item (8) of [chat v])\n                                    wait (5) seconds\n                                    say []\n                                    set [chat v] to [0]\n                                else\n                                    if <key (9 v) pressed?> then\n                                        set [chat v] to [9]\n                                        say (item (9) of [chat v])\n                                        set [is the chat open v] to [0]\n                                        wait (5) seconds\n                                        say []\n                                        set [chat v] to [0]\n                                    else\n                                        if <key (b v) pressed?> then\n                                            set [chat v] to [10]\n                                            say (item (10) of [chat v])\n                                            set [is the chat open v] to [0]\n                                            wait (5) seconds\n                                            say []\n                                            set [chat v] to [0]\n                                        else\n                                            if <key (c v) pressed?> then\n                                                set [chat v] to [11]\n                                                say (item (11) of [chat v])\n                                                set [is the chat open v] to [0]\n                                                wait (5) seconds\n                                                say []\n                                                set [chat v] to [0]\n                                            else\n                                                if <key (e v) pressed?> then\n                                                    set [chat v] to [12]\n                                                    say (item (12) of [chat v])\n                                                    set [is the chat open v] to [0]\n                                                    wait (5) seconds\n                                                    say []\n                                                    set [chat v] to [0]\n                                                else\n                                                    if <key (f v) pressed?> then\n                                                        set [chat v] to [13]\n                                                        say (item (13) of [chat v])\n                                                        set [is the chat open v] to [0]\n                                                        wait (5) seconds\n                                                        say []\n                                                        set [chat v] to [0]\n                                                    else\n                                                        if <key (d v) pressed?> then\n                                                            set [chat v] to [14]\n                                                            say (item (14) of [chat v])\n                                                            set [is the chat open v] to [0]\n                                                            wait (5) seconds\n                                                            say []\n                                                            set [chat v] to [0]\n                                                        else\n                                                            if <key (a v) pressed?> then\n                                                                set [chat v] to [15]\n                                                                say (item (15) of [chat v])\n                                                                set [is the chat open v] to [0]\n                                                                wait (5) seconds\n                                                                say []\n                                                                set [chat v] to [0]\n                                                            else\n                                                                if <key (i v) pressed?> then\n                                                                    set [chat v] to [16]\n                                                                    say (item (16) of [chat v])\n                                                                    set [is the chat open v] to [0]\n                                                                    wait (5) seconds\n                                                                    say []\n                                                                    set [chat v] to [0]\n                                                                else\n                                                                    if <key (j v) pressed?> then\n                                                                        set [chat v] to [17]\n                                                                        say (item (17) of [chat v])\n                                                                        set [is the chat open v] to [0]\n                                                                        wait (5) seconds\n                                                                        say []\n                                                                        set [chat v] to [0]\n                                                                    else\n                                                                        if <key (k v) pressed?> then\n                                                                            set [chat v] to [18]\n                                                                            say (item (18) of [chat v])\n                                                                            set [is the chat open v] to [0]\n                                                                            wait (5) seconds\n                                                                            say []\n                                                                            set [chat v] to [0]\n                                                                        else\n                                                                            if <key (l v) pressed?> then\n                                                                                set [chat v] to [19]\n                                                                                say (item (19) of [chat v])\n                                                                                set [is the chat open v] to [0]\n                                                                                wait (5) seconds\n                                                                                say []\n                                                                                set [chat v] to [0]\n                                                                            else\n                                                                                if <key (m v) pressed?> then\n                                                                                    set [chat v] to [20]\n                                                                                    say (item (20) of [chat v])\n                                                                                    set [is the chat open v] to [0]\n                                                                                    wait (5) seconds\n                                                                                    say []\n                                                                                    set [chat v] to [0]\n                                                                                else\n                                                                                    if <key (n v) pressed?> then\n                                                                                        set [chat v] to [21]\n                                                                                        say (item (21) of [chat v])\n                                                                                        set [is the chat open v] to [0]\n                                                                                        wait (5) seconds\n                                                                                        say []\n                                                                                        set [chat v] to [0]\n                                                                                    else\n                                                                                        if <key (o v) pressed?> then\n                                                                                            set [chat v] to [22]\n                                                                                            say (item (22) of [chat v])\n                                                                                            set [is the chat open v] to [0]\n                                                                                            wait (5) seconds\n                                                                                            say []\n                                                                                            set [chat v] to [0]\n                                                                                        else\n                                                                                            if <key (p v) pressed?> then\n                                                                                                set [chat v] to [23]\n                                                                                                say (item (23) of [chat v])\n                                                                                                set [is the chat open v] to [0]\n                                                                                                wait (5) seconds\n                                                                                                say []\n                                                                                                set [chat v] to [0]\n                                                                                            else\n                                                                                                if <key (q v) pressed?> then\n                                                                                                    set [chat v] to [24]\n                                                                                                    say (item (24) of [chat v])\n                                                                                                    set [is the chat open v] to [0]\n                                                                                                    wait (5) seconds\n                                                                                                    say []\n                                                                                                    set [chat v] to [0]\n                                                                                                end\n                                                                                            end\n                                                                                        end\n                                                                                    end\n                                                                                end\n                                                                            end\n                                                                        end\n                                                                    end\n                                                                end\n                                                            end\n                                                        end\n                                                    end\n                                                end\n                                            end\n                                        end\n                                    end\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\n\nwhen flag clicked\nswitch costume to (costume1 v)\nhide\n\nwhen I receive [start v]\nset [my player # v] to [0]\nset [max players v] to [10]\nbroadcast (setup opponents v) and wait\nbroadcast (join game v) and wait\nset [connect v] to [Connecting]\nif <(MY PLAYER #) > [0]> then\n    set [connect v] to [Connected]\nelse\n    set [connect v] to [Full]\nend\nbroadcast (begin v)\n\nwait (0.1) seconds\n\nwhen I receive [start v]\nbroadcast (Green flag v) and wait\nbroadcast (Play Game v) and wait\n\n@Coins\n\nwhen I receive [tick v]\nposition ((x) - (SCROLL X)) ((y) - (SCROLL Y))\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 [green flag v]\nhide\npoint in direction (90)\nset [coins v] to [0]\nset [x v] to [0]\nset [tick v] to [0]\nset [y v] to [0]\nswitch costume to (1 v)\nClone at [0] [0]\nClone at [0] [0]\nClone at [0] [0]\nClone at [0] [0]\nClone at [0] [0]\nClone at [0] [0]\nClone at [0] [0]\nClone at [0] [0]\nClone at [80] [-60]\nClone at [120] [-60]\nClone at [160] [-60]\nClone at [250] [200]\nClone at [300] [200]\nClone at [450] [200]\nClone at [560] [200]\nClone at [670] [200]\nClone at [] []\nClone at [800] [200]\nClone at [900] [200]\nClone at [1000] [200]\nClone at [1900] [200]\nClone at [2000] [200]\nClone at [2300] [200]\nClone at [2900] [440]\nClone at [2950] [440]\nClone at [2650] [320]\nClone at [2700] [320]\nClone at [2650] [600]\nClone at [2700] [600]\nClone at [2500] [600]\nClone at [2600] [600]\nClone at [2550] [600]\nClone at [3200] [600]\nClone at [3200] [600]\nClone at [3200] [600]\nClone at [3200] [600]\nClone at [3150] [603]\nset [x v] to [9999999999999999]\n\ndefine Clone at (x) (y)\nset [x v] to (x)\nset [y v] to (y)\ncreate clone of (_myself_ v)\n\nwhen I receive [tick v]\nif <touching (2 . game_player v)?> then\n    change [coins v] by (1)\n    delete this clone\nend\n\nClone at [-200] [40]\n\n@3 . Opponents_Cloud\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\nhide\nset [offline v] to [100]\nset [player # v] to [1]\npoint in direction (90)\nrepeat ((MAX PLAYERS) - (1))\n    create clone of (_myself_ v)\n    change [player # v] by (1)\nend\n\nwhen I receive [begin v]\nforever\n    if <(MY PLAYER #) = (player #)> then\n        set [offline v] to [100]\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                            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\ndefine tick\nset size to (120) %\nvalue = cloud # (player #)\nif <(join (value) [A]) = (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 (value) [A])\n    if <(offline) > [99]> then\n        show\n    end\n    set [offline v] to [0]\nend\nbegin decode of (value)\nvalue = read from encoded\nswitch costume to (value)\nvalue = read from encoded\nset [_username v] to (value)\nif <<<(y position) < [-160]> or <[160] < (y position)>> or <<(x position) < [-220]> or <[220] < (x position)>>> then\n    set [ghost v] effect to (0)\n    go to [front v] layer\n    if on edge, bounce\n    set rotation style [all around v]\n    switch costume to (arrow v)\n    point towards (player v)\nelse\n    set [ghost v] effect to (10)\n    set rotation style [don't rotate v]\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))\nif <(costume [name v]) = [Arrow]> then\n    if on edge, bounce\n    set rotation style [all around v]\n    point towards (2 . game_player v)\nend\nvalue = read from encoded\nif <<<(y position) < [-160]> or <[160] < (y position)>> or <<(x position) < [-220]> or <[220] < (x position)>>> then\n    think []\n    if <(value) = [0]> then\nelse\n    if <(value) = [0]> then\n        think (_username)\n    else\n        think (join (join (_username) [: ]) (item (value) of [chat v]))\n    end\nend\n\nwhen I receive [join game v]\nvalue = cloud # (player #)\nset [last value v] to (join (value) [A])\nwait (3) seconds\nvalue = cloud # (player #)\nif <(join (value) [A]) = (last value)> then\n    set [my player # v] to (player #)\nend\n\nwhen I receive [setup opponents v]\nsetup players\n\nif <(#) = [0]> then\n\n@art\n\nwhen I receive [start v]\nshow\n\nwhen flag clicked\nhide\n\n@Enemy\n\nwhen flag clicked\nset [bounce???? v] to [0]\nhide\n\ndefine CLONE @ (x) (y) (type) (change)\nswitch costume to (type)\nset [@change v] to (change)\nset [@offsetx v] to (x)\nset [@offsety v] to (y)\ncreate clone of (_myself_ v)\n\nwhen I receive [tick v]\nGO_TO (((@offsetx) - (SCROLL X)) + (@Change_OFFSET)) ((Y_SHAKE) + ((@offsety) - (SCROLL Y)))\n\ndefine GO_TO (x) (y)\ngo to x: (x) y: (y)\nif <<([abs v] of (x position) ) < [240]> and <([abs v] of (y position) ) < [180]>> then\n    show\nelse\n    hide\nend\nif <(timer) > [25]> then\n    set [@change_offset v] to ((((((100) - ((timer) * (2))) * ((@Change) / (50))) - (@Change_OFFSET)) / (5)) + (@Change_OFFSET))\n    point in direction (-90)\nend\nif <(timer) < [26]> then\n    set [@change_offset v] to ((@Change_OFFSET) + (((((timer) * (2)) * ((@Change) / (50))) - (@Change_OFFSET)) / (5)))\n    point in direction (90)\nend\n\nwhen I start as a clone\nset size to (30) %\nset rotation style [left-right v]\nif <(costume [name v]) = [red1]> then\n    wait (1) seconds\n    forever\n        if <touching (2 . game_player v)?> then\n            if <<([sy v] of [2 . game_player v]) > (y position)> and <([sy v] of [2 . game_player v]) < [-1]>> then\n                stop [other scripts in sprite v]\n                broadcast (small_bounce v)\n                switch costume to (costume1 v)\n                change [coins v] by (3)\n                repeat (6)\n                    next costume\n                    change [ghost v] effect by (0)\n                end\n                repeat (5)\n                    change [ghost v] effect by (20)\n                end\n                set [lootxy v] to (join (round (((@offsetx) + (@Change_OFFSET)) + (5000))) (round ((@offsety) + (5000))))\n                delete this clone\n            else\n                broadcast (die v)\n            end\n            wait (4) seconds\n        end\n    end\nelse\n    if <(costume [name v]) = [bot1]> then\n        forever\n            if <touching (2 . game_player v)?> then\n                if <<([y position v] of [2 . game_player v]) > (y position)> and <([sy v] of [2 . game_player v]) < [-1]>> then\n                    broadcast (boucne v)\n                    switch costume to (bot1 v)\n                    repeat (4)\n                        next costume\n                    end\n                    wait (0.02) seconds\n                    repeat (4)\n                        switch costume to ((costume [number v]) - (1))\n                    end\n                end\n                wait (0.1) seconds\n            end\n        end\n    end\nend\n\nwhen I start as a clone\ngo to [front v] layer\ngo [backward v] (125) layers\nif <(costume [name v]) = [red1]> then\n    forever\n        if <touching (_edge_ v)?> then\n            switch costume to (blank v)\n            hide\n        end\n        if <<([abs v] of ((y position) - ([y position v] of [game_player v])) ) < [200]> and <<(([x position v] of [game_player v]) + (80)) > ((x position) - (@Change_OFFSET))> and <(([x position v] of [game_player v]) - (80)) < (((x position) - (@Change_OFFSET)) + (@Change))>>> then\n            switch costume to (red1 v)\n            repeat (6)\n                next costume\n            end\n            wait (0.01) seconds\n            repeat (6)\n                switch costume to ((costume [number v]) - (1))\n                wait (0.01) seconds\n            end\n        end\n    end\nend\n\nwhen I receive [play game v]\nrepeat (1)\n    delete this clone\nend\nswitch costume to (blank v)\nCLONE @ [200] [-70] [bot1] [0]\nCLONE @ [3300] [583] [red1] [250]\nCLONE @ [9999999999999999999] [-70] [bot1] [0]\n\nwhen I start as a clone\n\nforever\n\nwhen flag clicked\nforever\n    set [hide when touchig edge v] to (touching edge?)\n    Hide when touching edge [True] Not touching edge? [Fasle]\nend\n\ndefine Hide when touching edge (touching edge?) Not touching edge? (not touching edge)\nforever\n    if <(Hide when touchig edge) = (touching edge?)> then\n        if <touching (_edge_ v)?> then\n            hide\n        end\n    else\n        if <not <touching (_edge_ v)?>> then\n            show\n        end\n    end\nend\n\n@Love fave\n\nwhen flag clicked\nhide\n\nwhen I receive [start v]\nset [costume v] to [0]\nswitch costume to (pick random (30) to (40))\nforever\n    switch costume to (pick random (30) to (40))\n    set [ghost v] effect to (100)\n    show\n    go to [front v] layer\n    go to x: (-93) y: (-3)\n    repeat (10)\n        change [ghost v] effect by (-1)\n    end\n    repeat (20)\n        change [ghost v] effect by (-2)\n    end\n    repeat (20)\n        change [ghost v] effect by (-2)\n    end\n    repeat (10)\n        change [ghost v] effect by (-1)\n    end\n    wait (pick random (30) to (40)) seconds\n    repeat (10)\n        change [ghost v] effect by (1)\n    end\n    repeat (20)\n        change [ghost v] effect by (2)\n    end\n    repeat (20)\n        change [ghost v] effect by (2)\n    end\n    repeat (10)\n        change [ghost v] effect by (1)\n    end\nend\n\n@23 . Shop\n\nwhen I receive [green flag v]\nset [jump boost v] to [0]\nset [speed boost v] to [0]\nset [jetpack v] to [0]\nset [parashoot v] to [0]\n\nwhen I receive [tick v]\nif <(costume [name v]) = [Shop Button]> then\n    go to [front v] layer\n    if <<touching (mouse-pointer v)?> and <mouse down?>> then\n        set [tsb \(mouse touching shop button\) v] to [1]\n    else\n        set [tsb \(mouse touching shop button\) v] to [0]\n    end\nelse\n    if <(costume [name v]) = [Shop]> then\n        if <<touching (mouse-pointer v)?> and <mouse down?>> then\n            set [ts \(mouse touching shop\) v] to [1]\n        else\n            set [ts \(mouse touching shop\) v] to [0]\n        end\n    else\n        if <(costume [name v]) = [Buy jump boost]> then\n            go to [front v] layer\n            go [forward v] (11) layers\n            if <touching (mouse-pointer v)?> then\n                set [bounce v] to (((Bounce) * (.8)) + (((115) - (size)) / (5)))\n                change size by (Bounce)\n                if <mouse down?> then\n                    if <(Jump boost) = [0]> then\n                        if <(COINS) > [19]> then\n                            set [jump boost v] to [1]\n                            change [coins v] by (-20)\n                        else\n                            if <not <touching (mouse-pointer v)?>> then\n                                set [bounce v] to (((Bounce) * (.8)) + (((100) - (size)) / (5)))\n                                change size by (Bounce)\n                            end\n                        end\n                    end\n                end\n            end\n        else\n            if <(costume [name v]) = [Buy speed boost]> then\n                go to [front v] layer\n                go [forward v] (11) layers\n                if <touching (mouse-pointer v)?> then\n                    set [bounce v] to (((Bounce) * (.8)) + (((115) - (size)) / (5)))\n                    change size by (Bounce)\n                    if <mouse down?> then\n                        if <(Speed boost) = [0]> then\n                            if <(COINS) > [14]> then\n                                set [speed boost v] to [1]\n                                change [coins v] by (-15)\n                            else\n                                set [bounce v] to (((Bounce) * (.8)) + (((100) - (size)) / (5)))\n                                change size by (Bounce)\n                            end\n                        end\n                    end\n                end\n            else\n                if <(costume [name v]) = [Buy jet]> then\n                    go to [front v] layer\n                    go [forward v] (11) layers\n                    if <touching (mouse-pointer v)?> then\n                        set [bounce v] to (((Bounce) * (.8)) + (((115) - (size)) / (5)))\n                        change size by (Bounce)\n                        if <mouse down?> then\n                            if <(jetpack) = [0]> then\n                                if <(COINS) > [29]> then\n                                    set [jetpack v] to [1]\n                                    change [coins v] by (-30)\n                                else\n                                    set [bounce v] to (((Bounce) * (.8)) + (((100) - (size)) / (5)))\n                                    change size by (Bounce)\n                                end\n                            end\n                        end\n                    end\n                else\n                    if <(costume [name v]) = [Buy para]> then\n                        go to [front v] layer\n                        go [forward v] (11) layers\n                        if <touching (mouse-pointer v)?> then\n                            set [bounce v] to (((Bounce) * (.8)) + (((115) - (size)) / (5)))\n                            change size by (Bounce)\n                            if <mouse down?> then\n                                if <(parashoot) = [0]> then\n                                    if <(COINS) > [24]> then\n                                        set [parashoot v] to [1]\n                                        change [coins v] by (-25)\n                                    else\n                                        set [bounce v] to (((Bounce) * (.8)) + (((100) - (size)) / (5)))\n                                        change size by (Bounce)\n                                    end\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\n\nwhen I receive [play game v]\ngo to x: (-190) y: (145)\nswitch costume to (shop button v)\nset [shop v] to [0]\n\nwhen flag clicked\nhide\n\nwhen I receive [delete clone v]\ndelete this clone\n\nwhen [timer v] > (0.01)\n\nhide\n\ndefine Open shop\nset [shop v] to [1]\ngo to x: (0) y: (0)\nswitch costume to (shop v)\ncreate clone of (_myself_ v)\nswitch costume to (buy jump boost v)\ncreate clone of (_myself_ v)\nswitch costume to (buy speed boost v)\ncreate clone of (_myself_ v)\nswitch costume to (buy jet v)\ncreate clone of (_myself_ v)\nswitch costume to (buy para v)\ncreate clone of (_myself_ v)\nswitch costume to (shop button v)\ngo to x: (-190) y: (145)\n\nset [jump boost v] to [0]\nset [speed boost v] to [0]\n\nwhen flag clicked\nhide\nset size to (100) %\nforever\n    if <touching (mouse-pointer v)?> then\n        set [bounce v] to (((Bounce) * (.8)) + (((115) - (size)) / (5)))\n        change size by (Bounce)\n    else\n        set [bounce v] to (((Bounce) * (.8)) + (((100) - (size)) / (5)))\n        change size by (Bounce)\n    end\nend\n\nwhen I receive [start v]\nshow\nset size to (100) %\nforever\n    if <touching (mouse-pointer v)?> then\n        if <mouse down?> then\n            start sound [click v]\n            if <(SHOP) = [0]> then\n                Open shop\n            else\n                set [shop v] to [0]\n                broadcast (Delete clone v)\n                go to x: (-190) y: (145)\n                switch costume to (shop button v)\n            end\n            wait until <not <mouse down?>>\n        end\n    end\nend\n\n@lava\n\nwhen I receive [green flag v]\nset [swing amount v] to [19]\nset [swing amount v] to ((round ((swing amount) / (2))) * (2))\nset [water tick v] to [-12]\nset [x v] to [0]\nset [y v] to [0]\nset [sy v] to [0]\nhide\nswitch costume to (1 v)\nClone at [1000] [-145]\nClone at [1700] [-145]\nClone at [1700] [-145]\nClone at [1700] [-145]\nClone at [1700] [-145]\nClone at [1700] [-145]\nClone at [1700] [-145]\nClone at [1700] [-145]\nClone at [1700] [-145]\nClone at [1700] [-145]\nClone at [3000] [-145]\n\nwhen I receive [tick v]\nposition ((x) - (SCROLL X)) ((y) - (SCROLL Y))\nif <(water tick) > [0]> then\n    change [sy v] by (0.7)\nelse\n    change [sy v] by (-0.7)\nend\nif <(water tick) > ((swing amount) - (1))> then\n    set [water tick v] to ((swing amount) * (-1))\nend\nchange [water tick v] by (1)\nchange y by (sy)\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\ndefine Clone at (x) (y)\ncreate clone of (_myself_ v)\nset [x v] to (x)\nset [y v] to (y)\nnext costume\n\nwhen I receive [reset v]\nset [sy v] to [0]\nset [water tick v] to ((swing amount) * (-1))\n\nwhen flag clicked\ngo to [back v] layer\n\n@Game\n\nwhen flag clicked\nforever\n    if <<(parashoot) = [1]> and <(jetpack) = [1]>> then\n        if <(Para or Jet?) = [p]> then\n            if <key (z v) pressed?> then\n                set [para or jet? v] to [j]\n                wait until <not <key (z v) pressed?>>\n            end\n        else\n            if <key (z v) pressed?> then\n                set [para or jet? v] to [p]\n                wait until <not <key (z v) pressed?>>\n            end\n        end\n    else\n        if <<(parashoot) = [1]> and <(jetpack) = [0]>> then\n            set [para or jet? v] to [p]\n        else\n            if <<(parashoot) = [0]> and <(jetpack) = [1]>> then\n                set [para or jet? v] to [j]\n            else\n                set [para or jet? v] to []\n            end\n        end\n    end\nend\n\n@Thumb\n\nwhen flag clicked\ngo to x: (0) y: (0)\nforever\n    show\n    set [ghost v] effect to (100)\n    go to [front v] layer\nend\n\n@intro\n\nwhen I start as a clone\nif <(intro: clone id) = [1]> then\n    show\n    go to [front v] layer\n    set size to (0) %\n    switch costume to (new oc!! v)\n    go to x: (-700) y: (0)\n    smooth glide x [0] y [0] speed [5] smooth size [100] speed [6]\n    Particles\n    Particles\n    wait (1) seconds\n    smooth glide x [700] y [0] speed [30] smooth size [0] speed [20]\nend\n\nwhen I start as a clone\nif <(intro: clone id) = [2]> then\n    switch costume to (pick random (3) to (5))\n    set size to (pick random (50) to (150)) %\n    set [ghost v] effect to (pick random (0.) to (5.))\n    set [brightness v] effect to (pick random (-25.) to (100.))\n    go to x: (0) y: (0)\n    point in direction (pick random (-180) to (180))\n    set [x v] to (pick random (10.) to (12.))\n    set [i v] to (pick random (2.) to (9.))\n    go to [front v] layer\n    show\n    repeat until <touching (_edge_ v)?>\n        move (X) steps\n        change y by (I)\n        change [i v] by (-0.4)\n        set [x v] to ((X) * (0.95))\n    end\n    delete this clone\nend\n\ndefine Smooth Glide x (x) y (y) Speed (speed)\nrepeat until <<(round (x)) = (round (x position))> and <(round (y)) = (round (y position))>>\n    change x by (((x) - (x position)) / (speed))\n    change y by (((y) - (y position)) / (speed))\nend\ngo to x: (x) y: (y)\n\nwhen flag clicked\nstart sound (pick random (2) to (5))\nhide\nset [intro: clone id v] to [0]\ncreate clone of (_myself_ v)\nwait (0.5) seconds\nset [intro: clone id v] to [1]\ncreate clone of (_myself_ v)\nwait (1.5) seconds\nset [intro: clone id v] to [3]\ncreate clone of (_myself_ v)\nwait (0.2) seconds\nset [intro: clone id v] to [4]\ncreate clone of (_myself_ v)\nwait (0.2) seconds\nset [intro: clone id v] to [5]\ncreate clone of (_myself_ v)\nwait (1) seconds\nset [intro: clone id v] to [6]\ncreate clone of (_myself_ v)\nwait (0.2) seconds\nset [intro: clone id v] to [7]\ncreate clone of (_myself_ v)\nwait (1) seconds\nset [intro: clone id v] to [8]\ncreate clone of (_myself_ v)\nwait (0.2) seconds\nset [intro: clone id v] to [9]\ncreate clone of (_myself_ v)\nwait (1) seconds\nset [intro: clone id v] to [10]\ncreate clone of (_myself_ v)\nwait (0.2) seconds\n\ndefine smooth size change (size) speed (speed)\nrepeat until <(round (size)) = (round (size))>\n    change size by (((size) - (size)) / (speed))\nend\nset size to (size) %\n\ndefine bounce finish size (size)\nset [size v] to [0]\nrepeat (40)\n    set [size v] to (((Size) * (0.8)) + (((size) - (size)) / (2)))\n    change size by (Size)\nend\n\nwhen I start as a clone\nif <(intro: clone id) = [0]> then\n    show\n    go to [back v] layer\n    set size to (100) %\n    switch costume to (costume2 v)\n    go to x: (-700) y: (0)\n    Smooth Glide x [0] y [0] Speed [9]\nend\n\ndefine smooth glide x (x) y (y) speed (speed) smooth size (size) speed (speed)\nrepeat until <<(round (size)) = (round (size))> and <<(round (x)) = (round (x position))> and <(round (y)) = (round (y position))>>>\n    change x by (((x) - (x position)) / (speed))\n    change y by (((y) - (y position)) / (speed))\n    change size by (((size) - (size)) / (speed))\nend\ngo to x: (x) y: (y)\nset size to (size) %\n\ndefine Particles\nset [intro: clone id v] to [2]\nrepeat (50)\n    create clone of (_myself_ v)\nend\n\ndefine Spiral spline explosion\nset [intro: clone id v] to [Bursts]\nrepeat (5)\n    create clone of (_myself_ v)\nend\n\ndefine Size: (s) speed: (spd)\nchange size by (((round (size)) - (round (s))) / (spd))\n\nwhen I start as a clone\n\ndefine Rect\nset [intro: clone id v] to [Rect]\ncreate clone of (_myself_ v)\n\ncreate clone of (_myself_ v)\n\nwhen I receive [message1 v]\nrepeat (10)\n    delete this clone\nend\n\nwhen I start as a clone\nif <(intro: clone id) = [3]> then\n    show\n    go to [front v] layer\n    set size to (0) %\n    switch costume to (costume3 v)\n    go to x: (0) y: (0)\n    smooth glide x [0] y [0] speed [5] smooth size [100] speed [6]\nelse\n    if <(intro: clone id) = [4]> then\n        show\n        go to [front v] layer\n        set size to (0) %\n        switch costume to (costume4 v)\n        go to x: (0) y: (0)\n        smooth glide x [0] y [0] speed [5] smooth size [100] speed [6]\n    else\n        if <(intro: clone id) = [5]> then\n            show\n            go to [front v] layer\n            set size to (0) %\n            switch costume to (costume5 v)\n            go to x: (0) y: (0)\n            smooth glide x [0] y [0] speed [5] smooth size [100] speed [6]\n        end\n    end\nend\n\n\n\nsmooth glide x [700] y [0] speed [30] smooth size [0] speed [20]\n\nwhen I start as a clone\nif <(intro: clone id) = [6]> then\n    show\n    go to [front v] layer\n    set size to (100) %\n    switch costume to (costume6 v)\n    go to x: (-700) y: (0)\n    Smooth Glide x [0] y [0] Speed [9]\nend\n\nwhen I start as a clone\nif <(intro: clone id) = [7]> then\n    show\n    go to [front v] layer\n    set size to (100) %\n    switch costume to (costume7 v)\n    go to x: (-700) y: (0)\n    Smooth Glide x [0] y [0] Speed [9]\nend\n\nwhen I start as a clone\nif <(intro: clone id) = [8]> then\n    show\n    go to [front v] layer\n    set size to (100) %\n    switch costume to (t1 v)\n    go to x: (0) y: (300)\n    Smooth Glide x [0] y [-70] Speed [9]\nend\n\nwhen I start as a clone\nif <(intro: clone id) = [9]> then\n    show\n    go to [front v] layer\n    set size to (0) %\n    switch costume to (new oc!! v)\n    go to x: (0) y: (300)\n    smooth glide x [0] y [0] speed [7] smooth size [100] speed [8]\n    wait (0.1) seconds\nend\n\nwhen I start as a clone\nif <(intro: clone id) = [10]> then\n    show\n    go to [front v] layer\n    set size to (100) %\n    switch costume to (t2 v)\n    go to x: (300) y: (300)\n    Smooth Glide x [0] y [0] Speed [5]\n    wait (1) seconds\n    broadcast (start v)\nend\n\nwhen flag clicked\nwait (7) seconds\nrepeat (10)\n    change [ghost v] effect by (10)\n    wait (0.01) seconds\n    delete this clone\nend\nhide\ndelete this clone\n\nwhen I receive [start v]\nrepeat (111)\n    delete this clone\nend\n\n