SHADOW _ A Platformer ☽

Instructions: MOBILE FRIENDLY\n6K+ views  WOW I never knew I could get this many\n---------\nUse arrow keys or WASD keys to move\n\nDon't Touch LAVA

@Stage\n\nwhen flag clicked\nswitch backdrop to (backdrop1 v)\nwait (12) seconds\nbroadcast (Show v)\nswitch backdrop to (backdrop2 v)\n\nwhen I receive [show v]\nforever\n    wait (1) seconds\n    play sound [Alan Walker, AuRa, Tomine Harket - Darkside.mp3 v] until done\nend\n\n@Intro2\n\ndefine Smooth Glide x: (x) y (y) speed (spd)\nrepeat until <<(round (x position)) = (round (x))> and <(round (y position)) = (round (y))>>\n    change x by (((x) - (x position)) / (spd))\n    change y by (((y) - (y position)) / (spd))\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Shockwave]> then\n    shockwave\n    wait (1) seconds\n    shockwave\n    wait (0.5) seconds\n    shockwave\n    wait (2) seconds\n    shockwave\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Line boom]> then\n    go to x: (0) y: (0)\n    line boom\n    wait (1) seconds\n    line boom\n    wait (2) seconds\n    line boom\n    wait (2) seconds\n    line boom\nend\n\nwhen I start as a clone\nshow\n\nwhen flag clicked\nstart sound [Marshmello - Chasing Stars v]\nwait (1) seconds\nclear graphic effects\ngo to x: (0) y: (0)\npoint in direction (90)\nhide\nset size to (100) %\nset [clone id v] to [Line boom]\ncreate clone of (_myself_ v)\nwait (0.2) seconds\nset [clone id v] to [pinwheel]\ncreate clone of (_myself_ v)\nwait (0.1) seconds\nset [clone id v] to [shockwave]\ncreate clone of (_myself_ v)\nwait (0.1) seconds\nset [clone id v] to [W]\ncreate clone of (_myself_ v)\nwait (0.07) seconds\nset [clone id v] to [O]\ncreate clone of (_myself_ v)\nwait (0.07) seconds\nset [clone id v] to [L]\ncreate clone of (_myself_ v)\nwait (0.07) seconds\nset [clone id v] to [T]\ncreate clone of (_myself_ v)\nwait (0.07) seconds\nset [clone id v] to [H]\ncreate clone of (_myself_ v)\nwait (0.07) seconds\nset [clone id v] to [E]\ncreate clone of (_myself_ v)\nwait (0.07) seconds\nset [clone id v] to [R]\ncreate clone of (_myself_ v)\nwait (1) seconds\nset [clone id v] to [flash]\ncreate clone of (_myself_ v)\nwait (7.5) seconds\nset [clone id v] to [end slide]\ncreate clone of (_myself_ v)\nset [clone id v] to [end slide2]\ncreate clone of (_myself_ v)\n\nwhen I start as a clone\nif <(Clone ID) = [pinwheel]> then\n    go to x: (0) y: (0)\n    show\n    switch costume to (pinwheel v)\n    set [ghost v] effect to (100)\n    set size to (140) %\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\n    repeat (3)\n        turn right (30) degrees\n    end\n    repeat until <(round (direction)) = (round (90))>\n        turn right (((90) - (direction)) / (5)) degrees\n    end\n    wait (1) seconds\n    repeat (3)\n        turn right (30) degrees\n    end\n    repeat until <(round (direction)) = (round (90))>\n        turn right (((90) - (direction)) / (5)) degrees\n    end\nend\nwait (1) seconds\n\nwhen I start as a clone\nif <(Clone ID) = [W]> then\n    show\n    switch costume to (wreal v)\n    repeat (5)\n        change [ghost v] effect by (-20)\n    end\n    set [ghost v] effect to (0)\n    Smooth Glide x: [-160] y [0] speed [4]\n    wait (0.58) seconds\n    repeat (5)\n        change [brightness v] effect by (2)\n    end\n    Smooth Glide x: [0] y [0] speed [4]\n    repeat (5)\n        change [brightness v] effect by (-2)\n    end\n    Smooth Glide x: [-160] y [0] speed [4]\n    wait (0.2) seconds\n    Smooth Glide x: (x position) y [100] speed [2]\n    set [brightness v] effect to (10)\n    Smooth Glide x: (x position) y [-100] speed [2]\n    wait (0.1) seconds\n    Smooth Glide x: (x position) y [0] speed [2]\n    Full Spin\n    wait (0.2) seconds\n    growing [50] speed [5]\nend\n\nwhen I start as a clone\nif <(Clone ID) = [O]> then\n    set size to (100) %\n    show\n    switch costume to (o v)\n    repeat (5)\n        change [ghost v] effect by (-20)\n    end\n    set [ghost v] effect to (0)\n    Smooth Glide x: [-100] y [0] speed [4]\n    wait (0.58) seconds\n    repeat (5)\n        change [brightness v] effect by (2)\n    end\n    Smooth Glide x: [0] y [0] speed [4]\n    repeat (5)\n        change [brightness v] effect by (-2)\n    end\n    Smooth Glide x: [-100] y [0] speed [4]\n    wait (0.2) seconds\n    Smooth Glide x: (x position) y [100] speed [2]\n    set [brightness v] effect to (10)\n    Smooth Glide x: (x position) y [-100] speed [2]\n    wait (0.1) seconds\n    Smooth Glide x: (x position) y [0] speed [2]\n    Full Spin\n    growing [50] speed [5]\nend\n\nwhen I start as a clone\nif <(Clone ID) = [L]> then\n    set size to (100) %\n    show\n    switch costume to (l v)\n    repeat (5)\n        change [ghost v] effect by (-20)\n    end\n    set [ghost v] effect to (0)\n    Smooth Glide x: [-50] y [0] speed [4]\n    wait (0.58) seconds\n    repeat (5)\n        change [brightness v] effect by (2)\n    end\n    Smooth Glide x: [0] y [0] speed [4]\n    repeat (5)\n        change [brightness v] effect by (-2)\n    end\n    Smooth Glide x: [-50] y [0] speed [4]\n    wait (0.2) seconds\n    Smooth Glide x: (x position) y [100] speed [2]\n    set [brightness v] effect to (10)\n    Smooth Glide x: (x position) y [-100] speed [2]\n    wait (0.1) seconds\n    Smooth Glide x: (x position) y [0] speed [2]\n    Full Spin\n    growing [50] speed [5]\nend\n\nwhen I start as a clone\nif <(Clone ID) = [T]> then\n    set size to (100) %\n    show\n    switch costume to (t v)\n    repeat (5)\n        change [ghost v] effect by (-20)\n    end\n    set [ghost v] effect to (0)\n    Smooth Glide x: [0] y [0] speed [4]\n    wait (0.58) seconds\n    Full Spin\n    wait (1) seconds\n    Smooth Glide x: (x position) y [100] speed [2]\n    set [brightness v] effect to (10)\n    Smooth Glide x: (x position) y [-100] speed [2]\n    wait (0.1) seconds\n    Smooth Glide x: [0] y [0] speed [2]\n    growing [125] speed [5]\n    growing [150] speed [5]\n    set size to (100) %\n    Full Spin\n    growing [50] speed [5]\nend\n\nwhen I start as a clone\nif <(Clone ID) = [H]> then\n    set size to (100) %\n    show\n    switch costume to (h v)\n    repeat (5)\n        change [ghost v] effect by (-20)\n    end\n    set [ghost v] effect to (0)\n    Smooth Glide x: [50] y [0] speed [4]\n    wait (0.58) seconds\n    repeat (5)\n        change [brightness v] effect by (2)\n    end\n    Smooth Glide x: [0] y [0] speed [4]\n    repeat (5)\n        change [brightness v] effect by (-2)\n    end\n    Smooth Glide x: [50] y [0] speed [4]\n    wait (0.2) seconds\n    Smooth Glide x: (x position) y [100] speed [2]\n    set [brightness v] effect to (10)\n    Smooth Glide x: (x position) y [-100] speed [2]\n    wait (0.1) seconds\n    Smooth Glide x: (x position) y [0] speed [2]\n    Full Spin\n    growing [50] speed [5]\nend\n\nwhen I start as a clone\nif <(Clone ID) = [E]> then\n    set size to (100) %\n    show\n    switch costume to (e v)\n    repeat (5)\n        change [ghost v] effect by (-20)\n    end\n    set [ghost v] effect to (0)\n    Smooth Glide x: [100] y [0] speed [4]\n    wait (0.58) seconds\n    repeat (5)\n        change [brightness v] effect by (2)\n    end\n    Smooth Glide x: [0] y [0] speed [4]\n    repeat (5)\n        change [brightness v] effect by (-2)\n    end\n    Smooth Glide x: [100] y [0] speed [4]\n    wait (0.2) seconds\n    Smooth Glide x: (x position) y [100] speed [2]\n    set [brightness v] effect to (10)\n    Smooth Glide x: (x position) y [-100] speed [2]\n    wait (0.1) seconds\n    Smooth Glide x: (x position) y [0] speed [2]\n    Full Spin\n    growing [50] speed [5]\nend\n\nwhen I start as a clone\nif <(Clone ID) = [R]> then\n    set size to (100) %\n    show\n    switch costume to (r v)\n    repeat (5)\n        change [ghost v] effect by (-20)\n    end\n    set [ghost v] effect to (0)\n    Smooth Glide x: [150] y [0] speed [4]\n    wait (0.58) seconds\n    repeat (5)\n        change [brightness v] effect by (2)\n    end\n    Smooth Glide x: [0] y [0] speed [4]\n    repeat (5)\n        change [brightness v] effect by (-2)\n    end\n    Smooth Glide x: [150] y [0] speed [4]\n    wait (0.2) seconds\n    Smooth Glide x: (x position) y [100] speed [2]\n    set [brightness v] effect to (10)\n    Smooth Glide x: (x position) y [-100] speed [2]\n    wait (0.1) seconds\n    Smooth Glide x: (x position) y [0] speed [2]\n    Full Spin\n    growing [50] speed [5]\nend\n\nwhen I start as a clone\nif <(Clone ID) = [pinwheel]> then\n    wait (1.2) seconds\n    set size to (100) %\n    repeat (5)\n        change [pixelate v] effect by (10)\n        change [brightness v] effect by (3)\n        go to x: (pick random (-5) to (5)) y: (pick random (-5) to (5))\n    end\n    repeat (5)\n        change [brightness v] effect by (-3)\n        change [pixelate v] effect by (-10)\n        go to x: (pick random (-5) to (5)) y: (pick random (-5) to (5))\n    end\n    go to x: (0) y: (0)\n    wait (0.5) seconds\n    Full Spin\n    wait (0.5) seconds\n    Full Spin\n    wait (3) seconds\n    Full Spin\n    repeat (10)\n        change [ghost v] effect by (10)\n    end\nend\n\ndefine Full Spin\nrepeat (3)\n    turn right (32) degrees\nend\nrepeat until <(round (direction)) = (round (90))>\n    turn right (((90) - (direction)) / (5)) degrees\nend\n\ndefine shockwave\nswitch costume to (shock v)\nset [color v] effect to (0)\nset size to (0) %\nset [ghost v] effect to (0)\nrepeat (16)\n    next costume\n    change size by (((300) - (size)) / (5))\nend\nrepeat (10)\n    change [ghost v] effect by (10)\n    change size by (((300) - (size)) / (3))\nend\n\ndefine line boom\ngo to x: (0) y: (0)\nshow\nswitch costume to (line v)\nset [color v] effect to (0)\nset size to (0) %\nset [brightness v] effect to (30)\nset [ghost v] effect to (0)\nrepeat (8)\n    next costume\n    change size by (((200) - (size)) / (4))\nend\nrepeat (5)\n    change [ghost v] effect by (10)\n    next costume\n    change size by (((200) - (size)) / (4))\n    wait (.05) seconds\nend\n\nwhen I start as a clone\nif <(Clone ID) = [flash]> then\n    set size to (100) %\n    switch costume to (flash v)\n    repeat (10)\n        change [ghost v] effect by (10)\n    end\n    wait (2) seconds\n    set [ghost v] effect to (0)\n    repeat (10)\n        change [ghost v] effect by (10)\n    end\n    wait (2) seconds\n    set [ghost v] effect to (0)\n    repeat (10)\n        change [ghost v] effect by (10)\n    end\nend\n\nwhen I start as a clone\nif <(Clone ID) = [W]> then\n    set size to (100) %\n    go to x: (x position) y: (0)\nend\n\nwhen I start as a clone\nif <(Clone ID) = [O]> then\n    set size to (100) %\n    go to x: (x position) y: (0)\nend\n\nwhen I start as a clone\nif <(Clone ID) = [L]> then\n    set size to (100) %\n    go to x: (x position) y: (0)\nend\n\nwhen I start as a clone\nif <(Clone ID) = [T]> then\n    set size to (100) %\n    go to x: (x position) y: (0)\nend\n\nwhen I start as a clone\nif <(Clone ID) = [H]> then\n    set size to (100) %\n    go to x: (x position) y: (0)\nend\n\nwhen I start as a clone\nif <(Clone ID) = [E]> then\n    set size to (100) %\n    go to x: (x position) y: (0)\nend\n\nwhen I start as a clone\nif <(Clone ID) = [R]> then\n    set size to (100) %\n    go to x: (x position) y: (0)\nend\n\nwhen I start as a clone\nif <(Clone ID) = [flash]> then\n    go to x: (0) y: (0)\n    set size to (100) %\nend\n\ndefine growing (size) speed (speed)\nrepeat until <(round (size)) = (round (size))>\n    change size by (((size) - (size)) / (speed))\nend\n\nwhen I start as a clone\nif <(Clone ID) = [W]> then\n    wait (7) seconds\n    growing [100] speed [5]\n    repeat (10)\n        change [brightness v] effect by (-1)\n    end\n    wait (0.3) seconds\n    growing [15] speed [5]\n    repeat (10)\n        change [ghost v] effect by (10)\n    end\nend\n\nwhen I start as a clone\nif <(Clone ID) = [O]> then\n    wait (7) seconds\n    growing [100] speed [5]\n    repeat (10)\n        change [brightness v] effect by (-1)\n    end\n    wait (0.3) seconds\n    growing [15] speed [5]\n    repeat (10)\n        change [ghost v] effect by (10)\n    end\nend\n\nwhen I start as a clone\nif <(Clone ID) = [L]> then\n    wait (7) seconds\n    growing [100] speed [5]\n    repeat (10)\n        change [brightness v] effect by (-1)\n    end\n    wait (0.3) seconds\n    growing [15] speed [5]\n    repeat (10)\n        change [ghost v] effect by (10)\n    end\nend\n\nwhen I start as a clone\nif <(Clone ID) = [T]> then\n    wait (7) seconds\n    growing [100] speed [5]\n    repeat (10)\n        change [brightness v] effect by (-1)\n    end\n    wait (0.3) seconds\n    growing [15] speed [5]\n    repeat (10)\n        change [ghost v] effect by (10)\n    end\nend\n\nwhen I start as a clone\nif <(Clone ID) = [H]> then\n    wait (7) seconds\n    growing [100] speed [5]\n    repeat (10)\n        change [brightness v] effect by (-1)\n    end\n    wait (0.3) seconds\n    growing [15] speed [5]\n    repeat (10)\n        change [ghost v] effect by (10)\n    end\nend\n\nwhen I start as a clone\nif <(Clone ID) = [E]> then\n    wait (7) seconds\n    growing [100] speed [5]\n    repeat (10)\n        change [brightness v] effect by (-1)\n    end\n    wait (0.3) seconds\n    growing [15] speed [5]\n    repeat (10)\n        change [ghost v] effect by (10)\n    end\nend\n\nwhen I start as a clone\nif <(Clone ID) = [R]> then\n    wait (7) seconds\n    growing [100] speed [5]\n    repeat (10)\n        change [brightness v] effect by (-1)\n    end\n    wait (0.3) seconds\n    growing [15] speed [5]\n    repeat (10)\n        change [ghost v] effect by (10)\n    end\nend\n\nwhen I start as a clone\nif <(Clone ID) = [L]> then\n    wait (5) seconds\n    repeat (5)\n        next costume\n    end\n    wait (1) seconds\n    switch costume to (l v)\n    Full Spin\nend\n\nwhen I start as a clone\nif <(Clone ID) = [W]> then\n    wait (5) seconds\n    repeat (5)\n        next costume\n    end\n    wait (1) seconds\n    switch costume to (wreal v)\n    Full Spin\nend\n\nwhen I start as a clone\nif <(Clone ID) = [O]> then\n    wait (5) seconds\n    repeat (5)\n        next costume\n    end\n    wait (1) seconds\n    switch costume to (o v)\n    Full Spin\nend\n\nwhen I start as a clone\nif <(Clone ID) = [H]> then\n    wait (5) seconds\n    repeat (5)\n        next costume\n    end\n    wait (1) seconds\n    switch costume to (h v)\n    Full Spin\nend\n\nwhen I start as a clone\nif <(Clone ID) = [T]> then\n    wait (5) seconds\n    repeat (5)\n        next costume\n    end\n    wait (1) seconds\n    switch costume to (t v)\n    Full Spin\nend\n\nwhen I start as a clone\nif <(Clone ID) = [R]> then\n    wait (5) seconds\n    repeat (5)\n        next costume\n    end\n    wait (1) seconds\n    switch costume to (r v)\n    Full Spin\nend\n\nwhen I start as a clone\nif <(Clone ID) = [E]> then\n    wait (5) seconds\n    repeat (5)\n        next costume\n    end\n    wait (1) seconds\n    switch costume to (e v)\n    Full Spin\nend\n\nwhen I start as a clone\nif <(Clone ID) = [end slide]> then\n    start sound [Slice SFX v]\n    show\n    go to x: (0) y: (0)\n    switch costume to (end v)\n    Smooth Glide x: [0] y [-265] speed [9]\n    wait (0.8) seconds\n    repeat (10)\n        change [ghost v] effect by (10)\n    end\nend\n\nwhen I start as a clone\nif <(Clone ID) = [end slide2]> then\n    show\n    go to x: (0) y: (0)\n    switch costume to (end2 v)\n    Smooth Glide x: [0] y [265] speed [9]\n    wait (0.8) seconds\n    repeat (10)\n        change [ghost v] effect by (10)\n    end\nend\n\nwhen I start as a clone\nif <(Clone ID) = [pinwheel]> then\n    go to x: (0) y: (0)\nend\n\nwhen flag clicked\nif <(Clone ID) = [Shockwave]> then\n    go to x: (0) y: (0)\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Line boom]> then\n    go to x: (0) y: (0)\nend\n\nwhen I start as a clone\ngo to x: (0) y: (0)\n\nwhen I start as a clone\nif <(Clone ID) = [W]> then\n    wait (1) seconds\n    repeat (7)\n        go to x: (pick random (-155) to (-165)) y: (pick random (-5) to (5))\n    end\n    go to x: (-160) y: (0)\nend\n\nwhen I start as a clone\nif <(Clone ID) = [O]> then\n    wait (1) seconds\n    repeat (7)\n        go to x: (pick random (-105) to (-95)) y: (pick random (-5) to (5))\n    end\n    go to x: (-100) y: (0)\nend\n\nwhen I start as a clone\nif <(Clone ID) = [L]> then\n    wait (1) seconds\n    repeat (7)\n        go to x: (pick random (-55) to (-45)) y: (pick random (-5) to (5))\n    end\n    go to x: (-50) y: (0)\nend\n\nwhen I start as a clone\nif <(Clone ID) = [T]> then\n    wait (0.9) seconds\n    repeat (7)\n        go to x: (pick random (-5) to (5)) y: (pick random (-5) to (5))\n    end\n    go to x: (0) y: (0)\nend\n\nwhen I start as a clone\nif <(Clone ID) = [H]> then\n    wait (0.8) seconds\n    repeat (7)\n        go to x: (pick random (55) to (45)) y: (pick random (-5) to (5))\n    end\n    go to x: (50) y: (0)\nend\n\nwhen I start as a clone\nif <(Clone ID) = [E]> then\n    wait (0.5) seconds\n    repeat (7)\n        go to x: (pick random (105) to (95)) y: (pick random (-5) to (5))\n    end\n    go to x: (100) y: (0)\nend\n\nwhen I start as a clone\nif <(Clone ID) = [R]> then\n    wait (0.4) seconds\n    repeat (7)\n        go to x: (pick random (155) to (145)) y: (pick random (-5) to (5))\n    end\n    go to x: (150) y: (0)\nend\n\nwhen I start as a clone\nif <(Clone ID) = [end slide]> then\n    set size to (100) %\nend\n\nwhen I start as a clone\nif <(Clone ID) = [end slide2]> then\n    set size to (100) %\nend\n\nwhen I receive [show v]\ndelete this clone\n\n@Player\n\nwhen I receive [show v]\nshow\nrepeat (1)\n    go to x: (-156) y: (-26)\nend\n\nwhen flag clicked\nset [player: x velocity v] to [0]\nset [player: y velocity v] to [0]\nset [animation v] to [0]\ngo to x: (-200) y: (0)\nforever\n    set [ghost v] effect to (0)\n    switch costume to (1 v)\n    if <<<key (left arrow v) pressed?> or <key (a v) pressed?>> or <<mouse down?> and <(mouse x) < (x position)>>> then\n        change [player: x velocity v] by (-0.8)\n        switch costume to (2 v)\n    end\n    if <<<key (right arrow v) pressed?> or <key (d v) pressed?>> or <<mouse down?> and <(mouse x) > (x position)>>> then\n        change [player: x velocity v] by (0.8)\n        switch costume to (3 v)\n    end\n    set [player: x velocity v] to ((Player: x velocity) * (0.9))\n    change x by (round (Player: x velocity))\n    if <touching (ground v)?> then\n        change y by (1)\n        if <touching (ground v)?> then\n            change y by (1)\n        end\n        if <touching (ground v)?> then\n            change y by (1)\n            if <touching (ground v)?> then\n                change y by (1)\n            end\n            if <touching (ground v)?> then\n                change y by (1)\n                if <touching (ground v)?> then\n                    change y by (1)\n                    if <touching (ground v)?> then\n                        change y by (-6)\n                        change x by (round ((Player: x velocity) * (-1)))\n                    end\n                end\n            end\n            set [player: x velocity v] to [0]\n        end\n    end\n    if <<<key (up arrow v) pressed?> or <key (w v) pressed?>> or <<mouse down?> and <(mouse y) > (y position)>>> then\n        change y by (-1)\n        if <touching (ground v)?> then\n            set [player: y velocity v] to [12]\n        end\n        change y by (1)\n    end\n    change [player: y velocity v] by (-1)\n    change y by (Player: y velocity)\n    if <touching (ground v)?> then\n        change y by ((Player: y velocity) * (-1))\n        set [player: y velocity v] to [0]\n    end\n    if <<touching (danger v)?> or <touching (lava3 v)?>> then\n        start sound [recording3 v]\n        set [animation v] to [0]\n        repeat (4)\n            create clone of (_myself_ v)\n            change [ghost v] effect by (10)\n        end\n        repeat (6)\n            change [ghost v] effect by (10)\n        end\n        wait until <(Animation) = [4]>\n        set [player: x velocity v] to [0]\n        set [player: y velocity v] to [0]\n        set [animation v] to [0]\n        go to x: (-200) y: (0)\n    end\n    if <(x position) > [240]> then\n        broadcast (Next v) and wait\n    end\nend\n\nwhen I start as a clone\nswitch costume to (4 v)\npoint in direction (pick random (-45) to (45))\nchange y by (10)\nrepeat (14)\n    move (3) steps\nend\nchange [animation v] by (1)\ndelete this clone\n\nwhen I receive [next v]\nset [player: x velocity v] to [0]\nset [player: y velocity v] to [0]\nset [animation v] to [0]\ngo to x: (-200) y: (0)\n\nwhen flag clicked\nforever\n    if <key (r v) pressed?> then\n        go to x: (-200) y: (0)\n    end\nend\n\nwhen I receive [intro v]\n\nwhen flag clicked\nforever\n    if <touching (lava v)?> then\n        go to x: (-200) y: (0)\n    end\nend\n\nwhen flag clicked\nhide\n\n@Ground\n\nwhen flag clicked\nswitch costume to (1 v)\n\nwhen I receive [next v]\nnext costume\n\nwhen flag clicked\ngo to [back v] layer\n\nwhen flag clicked\nrepeat (1)\n    go to [back v] layer\n    hide\nend\n\nwhen I receive [show v]\nshow\ngo to [front v] layer\n\nwhen I receive [show v]\nforever\n    show\n    go to [front v] layer\nend\n\n@LAVA\n\nwhen I receive [show v]\nswitch costume to (costume1 v)\n\nwhen I receive [next v]\nshow\nnext costume\n\nwhen flag clicked\ngo to [back v] layer\nhide\n\n@rolling fog\n\nwhen flag clicked\nhide\nforever\n    create clone of (_myself_ v)\n    wait (5) seconds\nend\n\nwhen I start as a clone\nset size to (pick random (100) to (300)) %\nset [ghost v] effect to (pick random (40) to (70))\ngo to x: (450) y: (pick random (50) to (-200))\nshow\nglide (15) secs to x: (-450) y: (y position)\n\ndelete this clone\n\n@Thumbnail\n\nwhen flag clicked\nshow\ngo to [front v] layer\nshow\ngo to [front v] layer\ngo to [front v] layer\nset [ghost v] effect to (100)\ngo to x: (0) y: (0)\n\nwhen [timer v] > (Stop Time)\nshow\nswitch costume to (2 v)\nset size to (100) %\ngo to x: (49) y: (18)\nset [ghost v] effect to (0)\ngo to [front v] layer\nswitch costume to (1 v)\n\nwhen flag clicked\nhide variable [stop time v]\nhide\nforever\n    set [stop time v] to ((0.01) + (timer))\nend\n\n@Player Light\n\nwhen flag clicked\n\nwhen I start as a clone\nshow\nswitch costume to (Clone #)\nforever\n    change [size v] by (5)\n    go to (player v)\n    set size to ((100) + (([cos v] of (size) ) * (10))) %\n    set [brightness v] effect to ([sin v] of ((size) * (5)) )\n    go to [back v] layer\nend\n\nwhen I receive [outside v]\nhide\n\nwhen I receive [show v]\nhide\nset [size v] to [0]\nset [clone # v] to [1]\ncreate clone of (_myself_ v)\nset [size v] to [22]\nset [clone # v] to [2]\ncreate clone of (_myself_ v)\nset [size v] to [45]\nset [clone # v] to [3]\ncreate clone of (_myself_ v)\nset [size v] to [67]\nset [clone # v] to [4]\ncreate clone of (_myself_ v)\n\nhide\n\n