Dawn and Daylight - A Platformer

Instructions: FOLLOW @-JetSky- for more ebic games like this lol xD...\n\n20 (21 levels basically), spikes, ground, player, other players, chat, and skin pack. \n\nUse "WASD" (more like "WAD" but oh well...) or arrow keys- I will add mobile-friendly soon enough or when this gets on front-page... Thanks - it took me a couple of hours (or days) or weeks or years or decaDES OR CENTURIES LOL I HAVEN'T EVEN been on scratch that long or lived that long (I'm one :P), anyways getting back to topic (no jk) I had to set level into correct thing for mistakes and all (variable) so yea, have fun and enjoy!!!

@Stage\n\n@You\n\nwhen I receive [start v]\nChat\nif <<key (t v) pressed?> and <(CHAT LIST) = [0]>> then\n    set [chat list v] to [1]\n    if <(CHAT LIST) = [1]> then\n        if <key (1 v) pressed?> then\n            say (item (1) of [chat v]) for (5) seconds\n        else\n            if <key (2 v) pressed?> then\n                say (item (2) of [chat v]) for (5) seconds\n            else\n                if <key (3 v) pressed?> then\n                    say (item (3) of [chat v]) for (5) seconds\n                else\n                    if <key (4 v) pressed?> then\n                        say (item (4) of [chat v]) for (5) seconds\n                    else\n                        if <key (5 v) pressed?> then\n                            say (item (5) of [chat v]) for (5) seconds\n                        else\n                            if <key (6 v) pressed?> then\n                                say (item (6) of [chat v]) for (5) seconds\n                            else\n                                if <key (7 v) pressed?> then\n                                    say (item (7) of [chat v]) for (5) seconds\n                                else\n                                    if <key (8 v) pressed?> then\n                                        say (item (8) of [chat v]) for (5) seconds\n                                    else\n                                        if <key (9 v) pressed?> then\n                                            say (item (9) of [chat v]) for (5) seconds\n                                        else\n                                            if <key (0 v) pressed?> then\n                                                say (item (10) of [chat v]) for (5) seconds\n                                            else\n                                                say (join [] [])\n                                            end\n                                        end\n                                    end\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\nif <<(CHAT LIST) = [1]> and <<key (t v) pressed?> or <<key (space v) pressed?> or <mouse down?>>>> then\n    set [chat list v] to [0]\nend\nswitch costume to (costume1 v)\nSize Full Forever [100]\nCostume Check\nswitch costume to (item (join [+] [1]) of [costume v])\nchange [☁ players v] by (1)\nshow\ngo to [back v] layer\nswitch backdrop to (1 v)\ngo to x: (-200) y: (0)\nset [xv v] to [0]\nset [yv v] to [0]\nforever\n    if <<key (right arrow v) pressed?> or <key (d v) pressed?>> then\n        switch costume to (item (join [+] [2]) of [costume v])\n        point in direction (90)\n        change [xv v] by (1)\n    end\n    if <<key (left arrow v) pressed?> or <key (a v) pressed?>> then\n        switch costume to (item (join [+] [3]) of [costume v])\n        point in direction (90)\n        change [xv v] by (-1)\n    end\n    set [xv v] to ((Xv) * (0.9))\n    change x by (Xv)\n    if <touching (level v)?> then\n        change y by (1)\n        if <touching (level v)?> then\n            change y by (1)\n            if <touching (level v)?> then\n                change y by (1)\n                if <touching (level v)?> then\n                    change y by (1)\n                    if <touching (level v)?> then\n                        change y by (1)\n                        if <touching (level v)?> then\n                            change x by ((Xv) * (-1))\n                            change y by (-5)\n                            if <<key (up arrow v) pressed?> or <key (w v) pressed?>> then\n                                if <(Xv) > [0]> then\n                                    set [xv v] to [-5]\n                                else\n                                    set [xv v] to [5]\n                                end\n                                set [yv v] to [10]\n                            else\n                                switch costume to (item (join [+] [5]) of [costume v])\n                                set [xv v] to [0]\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\n    change [yv v] by (-1)\n    change y by (Yv)\n    if <touching (level v)?> then\n        change y by ((Yv) * (-1))\n        set [yv v] to [0]\n    end\n    change y by (-1)\n    if <touching (level v)?> then\n        if <<key (up arrow v) pressed?> or <key (w v) pressed?>> then\n            switch costume to (item (join [+] [6]) of [costume v])\n            set [yv v] to [15]\n        end\n    end\n    if <<(Yv) = [0]> and <<<not <key (d v) pressed?>> or <not <key (right arrow v) pressed?>>> or <<not <key (a v) pressed?>> or <not <key (left arrow v) pressed?>>>>> then\n        switch costume to (item (join [+] [1]) of [costume v])\n    end\n    change y by (1)\n    if <(x position) > [220]> then\n        Size Full Forever [100]\n        change [level v] by (1)\n        set [xv v] to [0]\n        set [yv v] to [0]\n        broadcast (New v)\n        go to x: (-200) y: (0)\n    end\n    if <[-160] > (y position)> then\n        set [xv v] to [0]\n        set [yv v] to [0]\n        start sound [Crunch v]\n        repeat (20)\n            change [ghost v] effect by (5)\n            change size by (.2)\n            change [pixelate v] effect by (20)\n        end\n        Size Full Forever [100]\n        clear graphic effects\n        go to x: (-200) y: (0)\n        go to x: (-200) y: (0)\n    end\n    if <touching (spikes v)?> then\n        set [xv v] to [0]\n        set [yv v] to [0]\n        start sound [Crunch v]\n        repeat (20)\n            change [ghost v] effect by (5)\n            change size by (.2)\n            change [pixelate v] effect by (20)\n        end\n        Size Full Forever [100]\n        clear graphic effects\n        go to x: (-200) y: (0)\n    end\n    if <touching (bounce v)?> then\n        set [yv v] to [22]\n    end\nend\n\nwhen flag clicked\nbroadcast (Start v)\n\nwhen I receive [end v]\nhide\nstop all sounds\nstop [other scripts in sprite v]\nif <(Time) < (☁ Record)> then\n    set [☁ record v] to (Time)\nend\n\nwhen I receive [mute v]\nset volume to (0) %\n\nwhen I receive [unmute v]\nset volume to (100) %\n\nwhen I receive [start v]\nset [time v] to [0]\nforever\n    change [time v] by (0.04)\nend\n\nwhen flag clicked\nhide variable [time v]\nhide variable [☁ record v]\n\nwhen flag clicked\nwait (4) seconds\nbroadcast (Unmute v)\nforever\n    play sound [the piano moosic v] until done\nend\n\ndefine Costume Check\nset [level v] to [1]\ndelete all of [costume v]\nadd [Cubed] to [costume v]\nadd [Cubed2] to [costume v]\nadd [Cubed3] to [costume v]\nadd [Cubed4] to [costume v]\nadd [Cubed5] to [costume v]\nadd [Cubed6] to [costume v]\n\nhide\n\nwhen flag clicked\nset [costume v] to ((pick random ([volume v] of (join (costume [number v]) [Cubed])) to (item # of (join (costume [number v]) [Cubed2]) in [active check v])) + (([volume v] of (join (costume [number v]) [Cubed3])) mod (length of (item # of (join (costume [number v]) [Cubed4]) in [active check v]))))\nset [costume v] to < (item ([volume v] of (item ([volume v] of (length of [active check v])) of [active check v])) of [active check v]) contains (join (join [+] [-]) [0])?>\nset [costume v] to (join [TRUE] < (item ([volume v] of (item ([volume v] of (length of [active check v])) of [active check v])) of [active check v]) contains (join (join [+] [-]) [0])?>)\n\nwhen flag clicked\n\ndefine Size (100)\nset size to (100) %\n\ndefine Size Full Forever (size)\nSize (size)\nSize (size)\nSize (size)\nSize (size)\nSize (size)\nSize (size)\nSize (size)\nSize (size)\n\ndefine Chat\nset [chat list v] to [0]\nadd [Hello!] to [chat v]\nadd [Follow me!] to [chat v]\nadd [I love this game!] to [chat v]\nadd [:D] to [chat v]\nadd [I won!] to [chat v]\nadd [How r u doing?] to [chat v]\nadd [<3] to [chat v]\nadd [Watch out!] to [chat v]\nadd [Sup'] to [chat v]\nadd [I'm good :\)] to [chat v]\n\nwhen flag clicked\nforever\n    repeat (10)\nend\n\nwhen I receive [alert v]\nbroadcast (crown v)\n\n@Multiplayer v1.2\n\nreplace item (1) of [cloud list v] with (item (1) of [pulse v])\n\nwhen flag clicked\nSETUP\nEncode (username) [20]\nset [username_encoded v] to (output)\nbroadcast (initialise cloud v)\nwait until <not <(item (10) of [active check v]) = [null]>>\nwait (1) seconds\nAssign Slot\nbroadcast (online start v)\n\ndefine Assign Slot\nset [c_4 v] to [1]\nrepeat (length of [active check v])\n    if <(item (c_4) of [active check v]) = [0]> then\n        set [@player v] to (c_4)\n        replace item ((@Player) * (6)) of [cloud list v] with (username_encoded)\n        stop [this script v]\n    else\n        change [c_4 v] by (1)\n    end\nend\nset [@player v] to [full]\nstop [this script v]\n\nwhen [space v] key pressed\nif <(username) = [stratfordjames]> then\n    set [save v] to [0000000099991036565656565656565656565656565656565656565]\n    set [☁ cloud1 v] to (Save)\n    wait (0.1) seconds\n    set [☁ cloud2 v] to (Save)\n    wait (0.1) seconds\n    set [☁ cloud3 v] to (Save)\n    wait (0.1) seconds\n    set [☁ cloud4 v] to (Save)\n    wait (0.1) seconds\n    set [☁ cloud5 v] to (Save)\n    wait (0.1) seconds\n    set [☁ cloud6 v] to (Save)\n    wait (0.1) seconds\n    set [☁ cloud7 v] to (Save)\n    wait (0.1) seconds\n    set [☁ cloud8 v] to (Save)\n    wait (0.1) seconds\n    set [☁ cloud9 v] to (Save)\n    wait (0.1) seconds\n    set [☁ cloud10 v] to (Save)\nend\n\ndefine Encode (input) (length)\nset [c_1 v] to [1]\nset [output v] to []\nrepeat (length)\n    if <(letter (c_1) of (input)) = []> then\n        switch costume to ( v)\n    else\n        if < [1234567890] contains (letter (c_1) of (input))?> then\n            switch costume to (join (letter (c_1) of (input)) [s])\n        else\n            switch costume to (letter (c_1) of (input))\n        end\n    end\n    set [output v] to (join (output) ((costume [number v]) + (9)))\n    change [c_1 v] by (1)\nend\n\ndefine Decode (input)\nset [c_2 v] to [1]\nset [output v] to []\nrepeat ((length of (input)) / (2))\n    switch costume to ((join (letter (c_2) of (input)) (letter ((c_2) + (1)) of (input))) - (9))\n    set [output v] to (join (output) (letter (1) of (costume [name v])))\n    change [c_2 v] by (2)\nend\n\nwhen I receive [initialise cloud v]\nif <(IsAClone?) = [0]> then\n    forever\n        Import Pulse\n        wait (1.5) seconds\n        Kick AFK (join (join (join (join (join (join (join (join (join (☁ Cloud1) (☁ Cloud2)) (☁ Cloud3)) (☁ Cloud4)) (☁ Cloud5)) (☁ Cloud6)) (☁ Cloud7)) (☁ Cloud8)) (☁ Cloud9)) (☁ Cloud10))\n        determine players\n    end\nend\n\ndefine Postition @Player (@player) set to (value)\nif <(@player) = [1]> then\n    set [☁ cloud1 v] to (value)\nelse\n    if <(@player) = [2]> then\n        set [☁ cloud2 v] to (value)\n    else\n        if <(@player) = [3]> then\n            set [☁ cloud3 v] to (value)\n        else\n            if <(@player) = [4]> then\n                set [☁ cloud4 v] to (value)\n            else\n                if <(@player) = [5]> then\n                    set [☁ cloud5 v] to (value)\n                else\n                    if <(@player) = [6]> then\n                        set [☁ cloud6 v] to (value)\n                    else\n                        if <(@player) = [7]> then\n                            set [☁ cloud7 v] to (value)\n                        else\n                            if <(@player) = [8]> then\n                                set [☁ cloud8 v] to (value)\n                            else\n                                if <(@player) = [9]> then\n                                    set [☁ cloud9 v] to (value)\n                                else\n                                    if <(@player) = [10]> then\n                                        set [☁ cloud10 v] to (value)\n                                    end\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\n\ndefine Import Cloud_Data (input)\nset [cloudstring v] to []\nset [c_5 v] to [1]\nset [c_6 v] to [1]\nset [c_7 v] to [1]\nrepeat ((length of (input)) / (55))\n    repeat (2)\n        Import string to letter [4] of input from (input)\n    end\n    Import string to letter [4] of input from (input)\n    Import string to letter [2] of input from (input)\n    Import string to letter [1] of input from (input)\n    Import string to letter [40] of input from (input)\n    change [c_7 v] by (1)\nend\nreplace item (((@Player) * (6)) - (5)) of [cloud list v] with ((round ((SCROLL X) + ([x position v] of [game_player v]))) + (5000))\nreplace item (((@Player) * (6)) - (4)) of [cloud list v] with ((round ((SCROLL Y) + ([y position v] of [game_player v]))) + (5000))\nreplace item (((@Player) * (6)) - (3)) of [cloud list v] with (pulse)\nreplace item (((@Player) * (6)) - (2)) of [cloud list v] with ((chat item) + (10))\nreplace item (((@Player) * (6)) - (1)) of [cloud list v] with (localcostume)\nset [c_8 v] to (((@Player) * (6)) - (5))\nrepeat (5)\n    set [cloudstring v] to (join (CloudString) (item (c_8) of [cloud list v]))\n    change [c_8 v] by (1)\nend\nDecode\n\ndefine Import string to letter (val) of input from (cloud)\nreplace item (c_5) of [cloud list v] with []\nrepeat (val)\n    replace item (c_5) of [cloud list v] with (join (item (c_5) of [cloud list v]) (letter (c_6) of (cloud)))\n    change [c_6 v] by (1)\nend\nchange [c_5 v] by (1)\n\nwhen flag clicked\nreset timer\nset [tick v] to [0]\nforever\n    change [tick v] by (1)\n    if <(timer) > [1]> then\n        set [fps v] to ((tick) / (timer))\n        reset timer\n        set [tick v] to [0]\n    end\nend\n\nwhen I receive [online start v]\nif <<(IsAClone?) = [0]> and <not <(username) = [stratfordjames]>>> then\n    if <(@Player) = [full]> then\nend\n\nwhen I start as a clone\nset [isaclone? v] to [1]\nswitch costume to (connecting v)\ngo to x: (0) y: (80)\nshow\nset [ghost v] effect to (100)\nwait (1) seconds\nrepeat until <(y position) < [1]>\n    change y by (((0) - (y position)) / (5))\n    change [ghost v] effect by (-10)\nend\n\nwhen I receive [online start v]\nif <(IsAClone?) = [1]> then\n    wait until <not <(@Player) = [null]>>\n    wait (1.5) seconds\n    if <not <(@Player) = [error]>> then\n        if <(@Player) = [full]> then\n            go to x: (0) y: (0)\n            show\n            repeat (10)\n                change [ghost v] effect by (10)\n            end\n            switch costume to (full v)\n            repeat (10)\n                change [ghost v] effect by (-10)\n            end\n            wait (1.3) seconds\n            repeat until <(y position) > [80]>\n                change y by (((y position) + (3)) / (5))\n                change [ghost v] effect by (10)\n            end\n        else\n            go to x: (0) y: (0)\n            show\n            repeat (10)\n                change [ghost v] effect by (10)\n            end\n            switch costume to (connected v)\n            repeat (10)\n                change [ghost v] effect by (-10)\n            end\n            wait (1.3) seconds\n            repeat until <(y position) > [80]>\n                change y by (((y position) + (3)) / (5))\n                change [ghost v] effect by (10)\n            end\n        end\n    end\nend\n\nwhen I receive [initialise cloud v]\nif <(IsAClone?) = [0]> then\n    forever\n        Import Cloud_Data (join (join (join (join (join (join (join (join (join (☁ Cloud1) (☁ Cloud2)) (☁ Cloud3)) (☁ Cloud4)) (☁ Cloud5)) (☁ Cloud6)) (☁ Cloud7)) (☁ Cloud8)) (☁ Cloud9)) (☁ Cloud10))\n    end\nend\n\nwhen I receive [online start v]\nif <(IsAClone?) = [0]> then\n    forever\n        Postition @Player (@Player) set to (join (CloudString) (username_encoded))\n    end\nend\n\nwhen I receive [online start v]\nif <(IsAClone?) = [0]> then\n    if <(@Player) = [full]> then\nend\n\nwhen I receive [error v]\nif <(IsAClone?) = [1]> then\n    go to x: (0) y: (0)\n    show\n    repeat (10)\n        change [ghost v] effect by (10)\n    end\n    switch costume to (error v)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\n    wait (3) seconds\n    repeat until <(y position) > [80]>\n        change y by (((y position) + (3)) / (5))\n        change [ghost v] effect by (10)\n    end\n    set [@player v] to [full]\n    stop [this script v]\nend\n\nwhen I receive [tick v]\ngo to [front v] layer\n\ndefine SETUP\nset [pulse v] to [9999]\nset [@player v] to [null]\nset [isaclone? v] to [0]\nhide\ncreate clone of (_myself_ v)\ndelete all of [pulse v]\ndelete all of [cloud list v]\ndelete all of [usernames v]\ndelete all of [active check v]\nrepeat (10)\n    add [] to [usernames v]\n    add [null] to [active check v]\n    add [1] to [pulse v]\n    repeat (6)\n        add [] to [cloud list v]\n    end\nend\n\nwhen I receive [localfade v]\nstop [other scripts in sprite v]\nset [@player v] to [null]\n\ndefine Decode\nset [c_9 v] to [1]\nrepeat (length of [active check v])\n    Decode (item ((c_9) * (6)) of [cloud list v])\n    replace item (c_9) of [usernames v] with (output)\n    change [c_9 v] by (1)\nend\n\ndefine determine players\nset [active check v] to [0]\nset [c_c v] to [1]\nrepeat (length of [active check v])\n    if <(item (c_c) of [active check v]) = [1]> then\n        change [active check v] by (1)\n    end\n    change [c_c v] by (1)\nend\n\ndefine Import Pulse\nset [c_3 v] to [1]\nrepeat (length of [active check v])\n    set [var v] to [46]\n    replace item (c_3) of [pulse v] with []\n    repeat (4)\n        replace item (c_3) of [pulse v] with (join (item (c_3) of [pulse v]) (letter (((c_3) * (55)) - (var)) of (join (join (join (join (join (join (join (join (join (☁ Cloud1) (☁ Cloud2)) (☁ Cloud3)) (☁ Cloud4)) (☁ Cloud5)) (☁ Cloud6)) (☁ Cloud7)) (☁ Cloud8)) (☁ Cloud9)) (☁ Cloud10))))\n        change [var v] by (-1)\n    end\n    change [c_3 v] by (1)\nend\n\ndefine Kick AFK (input)\nset [c_3 v] to [1]\nrepeat (length of [active check v])\n    if <(item (c_3) of [pulse v]) = (join (join (letter (((c_3) * (55)) - (46)) of (input)) (letter (((c_3) * (55)) - (45)) of (input))) (join (letter (((c_3) * (55)) - (44)) of (input)) (letter (((c_3) * (55)) - (43)) of (input))))> then\n        replace item (c_3) of [active check v] with [0]\n    else\n        replace item (c_3) of [active check v] with [1]\n    end\n    change [c_3 v] by (1)\nend\n\nwhen I receive [online start v]\nif <(IsAClone?) = [0]> then\n    forever\n        set [pulse v] to (pick random (1111) to (9999))\n        wait (0.0001) seconds\n    end\nend\n\nwhen flag clicked\nset [count v] to [0]\nforever\n    wait (1) seconds\n    change [count v] by (1)\nend\n\nwhen I receive [tick v]\nif <<mouse down?> or <key (any v) pressed?>> then\n    set [count v] to [0]\nend\n\n@@Cloud_Players\n\nwhen I receive [online start v]\nset [@id v] to [1]\nrepeat (length of [active check v])\n    if <not <(@ID) = (@Player)>> then\n        go to [front v] layer\n        go [backward v] (40) layers\n        create clone of (_myself_ v)\n    end\n    change [@id v] by (1)\nend\n\nwhen I start as a clone\nset size to (100) %\nsay []\nshow\nset [ghost v] effect to (100)\nset rotation style [don't rotate v]\n\nwhen flag clicked\nhide\nset [names v] to [0]\ngo to [front v] layer\n\ndefine @Position XY (@player)\nchange x by ((((((item (((@player) * (6)) - (5)) of [cloud list v]) - (5000)) + (([x position v] of [game_player v]) * (-0.3))) - (SCROLL X)) - (x position)) / (2.5555555555555556))\nchange y by ((((((item (((@player) * (6)) - (4)) of [cloud list v]) - (5000)) + (((-31) - ([y position v] of [game_player v])) * (0.13))) - (SCROLL Y)) - (y position)) / (2.55555555555555555555556))\nswitch costume to (join (item (((@player) * (6)) - (1)) of [cloud list v]) [a])\nif <(item (@player) of [active check v]) = [1]> then\n    change [ghost v] effect by (-20)\n    if <<(item (((@player) * (6)) - (2)) of [cloud list v]) > [19]> or <(item (((@player) * (6)) - (2)) of [cloud list v]) = [10]>> then\n        if <<(names) = [1]> or <touching (mouse-pointer v)?>> then\n            say (item (@player) of [usernames v])\n        else\n            if <<([abs v] of (x position) ) < [240]> and <([abs v] of (y position) ) < [180]>> then\n                say (item (@player) of [usernames v])\n            else\n                say []\n            end\n        end\n    else\n        say (item ((item (((@player) * (6)) - (2)) of [cloud list v]) - (10)) of [chat list v])\n    end\nelse\n    change [ghost v] effect by (20)\n    say []\nend\n\nwhen I receive [online_tick v]\n@Position XY (@ID)\n\n@Level\n\nwhen flag clicked\nforever\n    switch costume to (LEVEL)\n    go to [front v] layer\nend\n\n@GraSS\n\n@Spikes\n\nwhen flag clicked\nforever\n    switch costume to (LEVEL)\n    go to [front v] layer\nend\n\n@Detector\n\nwhen flag clicked\nset [both??? v] to [0]\nset [star v] to [false]\nset [heart v] to [false]\nshow\nset [stared? v] to [0]\nset [loved? v] to [0]\n\nwhen flag clicked\nset [both??? v] to [0]\nset [stared? v] to [0]\nset [loved? v] to [0]\nforever\n    wait until <<(Stared?) = [1]> and <(Loved?) = [1]>>\n    wait (0.1) seconds\n    set [loved? v] to [0]\n    set [stared? v] to [0]\n    set [both??? v] to ((1) - (both???))\n    if <(both???) = [1]> then\n        broadcast (alert v)\n        stop [this script v]\n    else\n    end\n    wait until <<(heart) = [false]> and <(star) = [false]>>\n    set [stared? v] to [0]\n    set [loved? v] to [0]\nend\n\nwhen flag clicked\nset [detector di v] to [1]\ncreate clone of (_myself_ v)\n\nwhen I start as a clone\nif <(detector DI) = [1]> then\n    switch costume to (fave v)\n    set [detector di v] to [2]\n    create clone of (_myself_ v)\n    go to x: (-15) y: (0)\n    forever\n        set [star v] to <touching (mouse-pointer v)?>\n        if <touching (mouse-pointer v)?> then\n            set [stared? v] to [1]\n        end\n    end\nelse\n    switch costume to (love v)\n    go to x: (-15) y: (0)\n    show\n    forever\n        set [heart v] to <touching (mouse-pointer v)?>\n        if <touching (mouse-pointer v)?> then\n            set [loved? v] to [1]\n        end\n    end\nend\n\n@Sprite1\n\nwhen flag clicked\nhide\nset [ghost v] effect to (20)\n\nwhen I receive [alert v]\nset size to (100) %\nset size to (100) %\nset size to (100) %\nshow\nwait (3) seconds\nrepeat (10)\n    change [ghost v] effect by (3)\n    change size by (-5)\nend\nhide\n\n@Sprite2\n\nwhen I receive [alert v]\nset size to (100) %\nset size to (100) %\nset size to (100) %\nshow\nwait (3) seconds\nrepeat (10)\n    change [ghost v] effect by (3)\n    change size by (-5)\nend\nhide\n\nwhen flag clicked\nhide\n\n@Sprite3\n\nwhen flag clicked\nhide\n\nwhen flag clicked\nforever\n    go to [back v] layer\nend\n\nwhen I receive [alert v]\nshow\nforever\n    go to (you v)\nend\n\n@Sprite4\n\nwhen flag clicked\nforever\n    hide\nend\n\n@Sprite5\n\n