Twilight Island -A Scrolling Platformer-

Instructions: Instructions in-game, but I'll post them here too.\n-Arrow keys/wad/mobile to move\n-Avoid spikes and enemies\n-To kill enemies, jump on their heads\n-Bounce on trampolines\n-Collect coins to open the portal\n-Go in the portal to go to the next level\n-Collect skins to buy things from the shop\n-Change skins in the shop\nDON'T EVEN THINK ABOUT COPYING THIS\n\n\n\n\n\n\n\n\n\n\n\n\n\n\nbtw there is an easter egg ;)

@Stage\n\nwhen I receive [start v]\nforever\n    play sound [vexento-masked-heroes-1-AHM56EBq6 \(1\) v] until done\nend\n\n@Player\n\ndefine Change Player y by (sy)\nchange [y v] by (sy)\nchange [in air v] by (1)\nPosition\nwater?\nDie?\nrepeat until <not <<<touching (platforms v)?> or <touching (platforms2 v)?>> or <touching (platforms3 v)?>>>\n    if <(sy) > [0]> then\n        change [y v] by (-1)\n    else\n        change [y v] by (1)\n        set [in air v] to [0]\n    end\n    Position\n    set [sy v] to [0]\nend\n\ndefine Position\ngo to x: ((x) - (SCROLL X)) y: ((y) - (SCROLL Y))\n\ndefine Change Player x by (sx)\nchange [x v] by (sx)\nPosition\nwater?\nDie?\nif <<<touching (platforms v)?> or <touching (platforms2 v)?>> or <touching (platforms3 v)?>> then\n    repeat (12)\n        change [y v] by (1)\n        Position\n        if <not <<<touching (platforms v)?> or <touching (platforms2 v)?>> or <touching (platforms3 v)?>>> then\n            stop [this script v]\n        end\n    end\n    change [y v] by (-12)\n    if <<<key (up arrow v) pressed?> or <key (w v) pressed?>> or <<<mouse down?> and <(mouse y) > ((y position) + (20))>> and <<(Button Clicked?) = [0]> and <(Shop) = [0]>>>> then\n        if <(sx) > [0]> then\n            set [sx v] to [-16]\n        else\n            set [sx v] to [16]\n        end\n        set [in air v] to [0]\n    else\n        set [sx v] to [0]\n    end\n    repeat until <not <<<touching (platforms v)?> or <touching (platforms2 v)?>> or <touching (platforms3 v)?>>>\n        if <(sx) > [0]> then\n            change [x v] by (-1)\n        else\n            change [x v] by (1)\n        end\n        Position\n    end\nend\n\ndefine Tick\nif <<<key (left arrow v) pressed?> or <key (a v) pressed?>> or <<<mouse down?> and <(mouse x) < (x position)>> and <<(Button Clicked?) = [0]> and <(Shop) = [0]>>>> then\n    point in direction (-90)\n    if <(Water) = [0]> then\n        change [sx v] by (-2)\n    end\n    if <(Water) = [1]> then\n        change [sx v] by (-1.5)\n    end\nend\nif <<<key (right arrow v) pressed?> or <key (d v) pressed?>> or <<<mouse down?> and <(mouse x) > (x position)>> and <<(Button Clicked?) = [0]> and <(Shop) = [0]>>>> then\n    point in direction (90)\n    if <(Water) = [0]> then\n        change [sx v] by (2)\n    end\n    if <(Water) = [1]> then\n        change [sx v] by (1.5)\n    end\nend\nset [sx v] to ((sx) * (0.8))\nif <([abs v] of (sx) ) > [0.9]> then\n    Change Player x by (round (sx))\nend\nif <(Water) = [0]> then\n    if <<<key (up arrow v) pressed?> or <key (w v) pressed?>> or <<<mouse down?> and <(mouse y) > ((y position) + (20))>> and <<(Button Clicked?) = [0]> and <(Shop) = [0]>>>> then\n        if <[4] > (in air)> then\n            set [sy v] to [16]\n        end\n    end\n    if <(sy) > [-20]> then\n        change [sy v] by (-1.5)\n    end\nend\nif <(Water) = [1]> then\n    if <<<key (up arrow v) pressed?> or <key (w v) pressed?>> or <<<mouse down?> and <(mouse y) > ((y position) + (20))>> and <<(Button Clicked?) = [0]> and <(Shop) = [0]>>>> then\n        set [sy v] to [5]\n    else\n        set [sy v] to [-1.5]\n    end\nend\nChange Player y by (sy)\nset [scroll x v] to (x)\nif <(SCROLL X) < [0]> then\n    set [scroll x v] to [0]\nend\nchange [scroll y v] by (round (((y) - (SCROLL Y)) / (10)))\nif <(SCROLL Y) < [0]> then\n    set [scroll y v] to [0]\nend\nPosition\nif <(y) < [-180]> then\n    set [exit v] to [die]\nend\nif <touching (bounce v)?> then\n    start sound [Big Boing v]\n    set [sy v] to [28]\nend\n\nwhen flag clicked\nset [skip? v] to [0]\nset [shades bought? v] to [no]\nset [crown bought v] to [no]\nswitch costume to (dark v)\nset rotation style [left-right v]\nbroadcast (green flag v) and wait\n\nwhen I receive [green flag v]\nhide\ngo to [front v] layer\ngo [backward v] (10) layers\n\nwhen I receive [playgame v]\nset [loading v] to [1]\nset [level v] to [1]\nforever\n    set [loading v] to [1]\n    set [ghost of player v] to [100]\n    set [start v] to [0]\n    broadcast (reset v) and wait\n    broadcast (setup v) and wait\n    wait until <(start) = [1]>\n    Game on\n    repeat until <(EXIT) > []>\n        Tick\n        broadcast (tick v)\n    end\n    if <(EXIT) = [win]> then\n        win\n    else\n        die\n    end\nend\n\ndefine Game on\nset [sx v] to [0]\nset [sy v] to [0]\nset [x v] to [-150]\nset [y v] to [0]\nset [in air v] to [0]\nset [exit v] to []\nset [scroll y v] to [0]\nset [scroll x v] to [0]\nset [ghost of player v] to [0]\npoint in direction (90)\nset size to (100) %\nset [ghost v] effect to (0)\nshow\n\ndefine win\nif <(Skip?) = [1]> then\n    change [level v] by (1)\n    hide\n    set [ghost of player v] to [100]\n    set [skip? v] to [0]\nelse\n    show\n    set size to (100) %\n    set [ghost v] effect to (0)\n    set [ghost of player v] to [0]\n    set rotation style [all around v]\n    repeat (50)\n        point towards (portal v)\n        turn right (65) degrees\n        move ((distance to [portal v]) / (2)) steps\n        change size by (-1)\n        change [ghost v] effect by (2)\n        change [ghost of player v] by (2)\n    end\n    set [ghost of player v] to [100]\n    change [level v] by (1)\n    set rotation style [left-right v]\n    hide\nend\n\ndefine die\nset [ghost of player v] to [0]\nset [exit v] to []\nset rotation style [all around v]\nrepeat (15)\n    change [ghost v] effect by (2)\n    change [ghost of player v] by (2)\n    turn right (18) degrees\n    change y by (8)\nend\nset [ghost of player v] to [100]\nset rotation style [left-right v]\nhide\nwait (.5) seconds\nset [exit v] to []\nset [ghost of player v] to [0]\n\ndefine water?\nif <touching (water v)?> then\n    set [water v] to [1]\nelse\n    set [water v] to [0]\nend\n\ndefine Die?\nif <touching (danger v)?> then\n    start sound [Crunch v]\n    set [exit v] to [die]\nend\n\nwhen I receive [red v]\nswitch costume to (red v)\n\nwhen I receive [blue v]\nswitch costume to (blue v)\n\nwhen I receive [yellow v]\nswitch costume to (yellow v)\n\nwhen I receive [dark v]\nswitch costume to (dark v)\n\nwhen I receive [enemy killed v]\nset [sy v] to [20]\n\nwhen I receive [green v]\nswitch costume to (green v)\n\nwhen I receive [twilight v]\nswitch costume to (twilight v)\n\nwhen I receive [start v]\nbroadcast (playgame v) and wait\n\n@Platforms\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\ngo to [front v] layer\ngo [backward v] (8) layers\n\nwhen I receive [reset v]\ndelete this clone\n\nwhen I receive [setup v]\nset [x v] to [0]\nset [y v] to [0]\nwait (0) seconds\nif <(LEVEL) = [1]> then\n    switch costume to (level 1 1 v)\n    Clone at x: [482] y: [0]\n    Clone at x: [482] y: [0]\nelse\n    if <(LEVEL) = [2]> then\n        switch costume to (level 2 1 v)\n        Clone at x: [482] y: [0]\n        Clone at x: [482] y: [0]\n    else\n        if <(LEVEL) = [3]> then\n            switch costume to (level 3 1 v)\n            Clone at x: [482] y: [0]\n            Clone at x: [482] y: [0]\n            Clone at x: [482] y: [0]\n            Clone at x: [482] y: [0]\n        else\n            if <(LEVEL) = [4]> then\n                switch costume to (level 4 1 v)\n                Clone at x: [482] y: [0]\n                Clone at x: [482] y: [0]\n                Clone at x: [500] y: [0]\n                Clone at x: [700] y: [0]\n                Clone at x: [482] y: [0]\n            else\n                if <(LEVEL) = [5]> then\n                    wait (0) seconds\n                    switch costume to (level 5 1 v)\n                    Clone at x: [482] y: [0]\n                    Clone at x: [482] y: [0]\n                    Clone at x: [482] y: [0]\n                    Clone at x: [482] y: [0]\n                else\n                    if <(LEVEL) = [6]> then\n                        switch costume to (level 6 1 v)\n                        Clone at x: [482] y: [0]\n                        Clone at x: [482] y: [0]\n                        Clone at x: [482] y: [0]\n                        Clone at x: [482] y: [0]\n                    else\n                        if <(LEVEL) = [7]> then\n                            switch costume to (level 7 1 v)\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\n\ndefine Clone at x: (x) y: (y)\nhide\ncreate clone of (_myself_ v)\nchange [x v] by (x)\nchange [y v] by (y)\nnext costume\n\n@Deco\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\ngo to [front v] layer\ngo [backward v] (7) layers\n\nwhen I receive [reset v]\ndelete this clone\n\nwhen I receive [setup v]\nset [x v] to [0]\nset [y v] to [0]\nwait (0) seconds\nif <(LEVEL) = [1]> then\n    switch costume to (level 1 1 v)\n    Clone at x: [482] y: [0]\n    Clone at x: [482] y: [0]\nelse\n    if <(LEVEL) = [2]> then\n        switch costume to (level 2 1 v)\n        Clone at x: [482] y: [0]\n        Clone at x: [482] y: [0]\n    else\n        if <(LEVEL) = [3]> then\n            switch costume to (level 3 1 v)\n            Clone at x: [482] y: [0]\n            Clone at x: [482] y: [0]\n            Clone at x: [482] y: [0]\n            Clone at x: [482] y: [0]\n        else\n            if <(LEVEL) = [4]> then\n                switch costume to (level 4 1 v)\n                Clone at x: [482] y: [0]\n                Clone at x: [482] y: [0]\n                Clone at x: [500] y: [0]\n                Clone at x: [700] y: [0]\n                Clone at x: [482] y: [0]\n            else\n                if <(LEVEL) = [5]> then\n                    switch costume to (level 5 1 v)\n                    Clone at x: [482] y: [0]\n                    Clone at x: [482] y: [0]\n                    Clone at x: [482] y: [0]\n                    Clone at x: [482] y: [0]\n                else\n                    if <(LEVEL) = [6]> then\n                        switch costume to (level 6 1 v)\n                        Clone at x: [482] y: [0]\n                        Clone at x: [482] y: [0]\n                        Clone at x: [482] y: [0]\n                        Clone at x: [482] y: [0]\n                    else\n                        if <(LEVEL) = [7]> then\n                            switch costume to (level 7 1 v)\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\n\ndefine Clone at x: (x) y: (y)\nhide\ncreate clone of (_myself_ v)\nchange [x v] by (x)\nchange [y v] by (y)\nnext costume\n\n@Water\n\nwhen I receive [tick v]\nposition ((x) - (SCROLL X)) ((y) - (SCROLL Y))\nset [y v] to (([sin v] of ((timer) * (100)) ) * (10))\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\ngo to [back v] layer\n\nwhen I receive [green flag v]\nhide\ngo to [back v] layer\nset [ghost v] effect to (0)\n\nwhen I receive [reset v]\ndelete this clone\n\nwhen I receive [setup v]\nset [x v] to [0]\nset [y v] to [0]\nwait (0) seconds\nif <(LEVEL) = [1]> then\n    switch costume to (level 1 1 v)\n    Clone at x: [482] y: [0]\n    Clone at x: [482] y: [0]\n    Clone at x: [482] y: [0]\n    Clone at x: [482] y: [0]\nelse\n    if <(LEVEL) = [2]> then\n        switch costume to (level 2 1 v)\n        Clone at x: [482] y: [0]\n        Clone at x: [482] y: [0]\n        Clone at x: [482] y: [0]\n        Clone at x: [482] y: [0]\n    else\n        if <(LEVEL) = [3]> then\n            switch costume to (level 3 1 v)\n            Clone at x: [482] y: [0]\n            Clone at x: [482] y: [0]\n            Clone at x: [482] y: [0]\n            Clone at x: [482] y: [0]\n            Clone at x: [482] y: [0]\n            Clone at x: [482] y: [0]\n        else\n            if <(LEVEL) = [4]> then\n                switch costume to (level 4 1 v)\n                Clone at x: [482] y: [0]\n                Clone at x: [482] y: [0]\n                Clone at x: [500] y: [0]\n                Clone at x: [700] y: [0]\n                Clone at x: [482] y: [0]\n                Clone at x: [482] y: [0]\n                Clone at x: [482] y: [0]\n                Clone at x: [482] y: [0]\n                Clone at x: [482] y: [0]\n                Clone at x: [482] y: [0]\n            else\n                if <(LEVEL) = [5]> then\n                    switch costume to (level 5 1 v)\n                    Clone at x: [482] y: [0]\n                    Clone at x: [482] y: [0]\n                    Clone at x: [482] y: [0]\n                    Clone at x: [482] y: [0]\n                    Clone at x: [482] y: [0]\n                    Clone at x: [482] y: [0]\n                else\n                    if <(LEVEL) = [6]> then\n                        switch costume to (level 5 1 v)\n                        Clone at x: [482] y: [0]\n                        Clone at x: [482] y: [0]\n                        Clone at x: [482] y: [0]\n                        Clone at x: [482] y: [0]\n                        Clone at x: [482] y: [0]\n                        Clone at x: [482] y: [0]\n                    else\n                        if <(LEVEL) = [7]> then\n                            switch costume to (level 5 1 v)\n                            Clone at x: [482] y: [0]\n                            Clone at x: [482] y: [0]\n                            Clone at x: [482] y: [0]\n                            Clone at x: [482] y: [0]\n                            Clone at x: [482] y: [0]\n                            Clone at x: [482] y: [0]\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\n\ndefine Clone at x: (x) y: (y)\nhide\ncreate clone of (_myself_ v)\nchange [x v] by (x)\nchange [y v] by (y)\nnext costume\n\n@coins\n\nwhen I receive [tick v]\nposition ((x) - (SCROLL X)) ((y) - (SCROLL Y))\nif <touching (player v)?> then\n    start sound [Coin v]\n    change [collected v] by (1)\n    delete this clone\nend\n\ndefine position (x) (y)\ngo to x: (x) y: (y)\nif <<(x) = (x position)> and <(y) = (y position)>> then\n    show\nelse\n    hide\nend\n\nwhen I receive [green flag v]\nhide\ngo to [front v] layer\n\nwhen I receive [reset v]\ndelete this clone\n\nwhen I receive [setup v]\nset [x v] to [0]\nset [y v] to [0]\nset [collected v] to [0]\nset [max collected v] to [0]\nwait (0) seconds\nif <(LEVEL) = [1]> then\n    Clone at x: [150] y: [0]\n    Clone at x: [250] y: [100]\n    Clone at x: [400] y: [0]\n    Clone at x: [150] y: [100]\nelse\n    if <(LEVEL) = [2]> then\n        Clone at x: [530] y: [140]\n        Clone at x: [500] y: [-100]\n        Clone at x: [100] y: [200]\n    else\n        if <(LEVEL) = [3]> then\n            Clone at x: [-50] y: [200]\n            Clone at x: [550] y: [0]\n            Clone at x: [250] y: [-50]\n            Clone at x: [1025] y: [-250]\n            Clone at x: [300] y: [300]\n            Clone at x: [200] y: [-100]\n        else\n            if <(LEVEL) = [4]> then\n                Clone at x: [300] y: [300]\n                Clone at x: [600] y: [-150]\n                Clone at x: [375] y: [-100]\n                Clone at x: [250] y: [100]\n                Clone at x: [670] y: [0]\n                Clone at x: [300] y: [-75]\n            else\n                if <(LEVEL) = [5]> then\n                    Clone at x: [300] y: [70]\n                    Clone at x: [300] y: [80]\n                    Clone at x: [1000] y: [70]\n                    Clone at x: [390] y: [0]\n                else\n                    if <(LEVEL) = [6]> then\n                        Clone at x: [-180] y: [175]\n                        Clone at x: [275] y: [70]\n                        Clone at x: [575] y: [0]\n                        Clone at x: [320] y: [-50]\n                        Clone at x: [375] y: [-90]\n                        Clone at x: [200] y: [70]\n                        Clone at x: [400] y: [135]\n                    end\n                end\n            end\n        end\n    end\nend\nset [y v] to [9999999999999]\n\ndefine Clone at x: (x) y: (y)\nhide\nchange [x v] by (x)\nchange [y v] by (y)\nchange [max collected v] by (1)\ncreate clone of (_myself_ v)\n\nClone at x: [550] y: [0]\nClone at x: [250] y: [-50]\nClone at x: [1025] y: [-250]\nClone at x: [300] y: [300]\nClone at x: [200] y: [-100]\n\nClone at x: [400] y: [-100]\n\n@danger\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\ngo to [front v] layer\ngo [backward v] (10) layers\n\nwhen I receive [reset v]\ndelete this clone\n\nwhen I receive [setup v]\nset [x v] to [0]\nset [y v] to [0]\nwait (0) seconds\nif <(LEVEL) = [1]> then\n    switch costume to (level 1 1 v)\n    Clone at x: [482] y: [0]\n    Clone at x: [482] y: [0]\nelse\n    if <(LEVEL) = [2]> then\n        switch costume to (level 2 1 v)\n        Clone at x: [482] y: [0]\n        Clone at x: [482] y: [0]\n    else\n        if <(LEVEL) = [3]> then\n            switch costume to (level 3 1 v)\n            Clone at x: [482] y: [0]\n            Clone at x: [482] y: [0]\n            Clone at x: [482] y: [0]\n            Clone at x: [482] y: [0]\n        else\n            if <(LEVEL) = [4]> then\n                switch costume to (level 4 1 v)\n                Clone at x: [482] y: [0]\n                Clone at x: [482] y: [0]\n                Clone at x: [500] y: [0]\n                Clone at x: [700] y: [0]\n                Clone at x: [482] y: [0]\n            else\n                if <(LEVEL) = [5]> then\n                    switch costume to (level 5 1 v)\n                    Clone at x: [482] y: [0]\n                    Clone at x: [482] y: [0]\n                    Clone at x: [482] y: [0]\n                    Clone at x: [482] y: [0]\n                else\n                    if <(LEVEL) = [6]> then\n                        switch costume to (level 6 1 v)\n                        Clone at x: [482] y: [0]\n                        Clone at x: [482] y: [0]\n                    else\n                        if <(LEVEL) = [7]> then\n                            switch costume to (level 1 1 v)\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\n\ndefine Clone at x: (x) y: (y)\nhide\ncreate clone of (_myself_ v)\nchange [x v] by (x)\nchange [y v] by (y)\nnext costume\n\n@Deco2\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\n\nwhen I receive [reset v]\ndelete this clone\n\nwhen I receive [setup v]\nset [x v] to [0]\nset [y v] to [0]\nwait (0) seconds\nif <(LEVEL) = [1]> then\n    switch costume to (level 1 1 v)\n    Clone at x: [482] y: [0]\n    Clone at x: [482] y: [0]\nelse\n    if <(LEVEL) = [2]> then\n        switch costume to (level 2 1 v)\n        Clone at x: [482] y: [0]\n        Clone at x: [482] y: [0]\n    else\n        if <(LEVEL) = [3]> then\n            switch costume to (level 3 1 v)\n            Clone at x: [482] y: [0]\n            Clone at x: [482] y: [0]\n            Clone at x: [482] y: [0]\n            Clone at x: [482] y: [0]\n        else\n            if <(LEVEL) = [4]> then\n                switch costume to (level 4 1 v)\n                Clone at x: [482] y: [0]\n                Clone at x: [482] y: [0]\n                Clone at x: [500] y: [0]\n                Clone at x: [700] y: [0]\n                Clone at x: [482] y: [0]\n            else\n                if <(LEVEL) = [5]> then\n                    switch costume to (level 5 1 v)\n                    Clone at x: [482] y: [0]\n                    Clone at x: [482] y: [0]\n                    Clone at x: [482] y: [0]\n                    Clone at x: [482] y: [0]\n                else\n                    if <(LEVEL) = [6]> then\n                        switch costume to (level 6 1 v)\n                        Clone at x: [482] y: [0]\n                        Clone at x: [482] y: [0]\n                        Clone at x: [482] y: [0]\n                        Clone at x: [482] y: [0]\n                    else\n                        if <(LEVEL) = [7]> then\n                            switch costume to (level 7 1 v)\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\n\ndefine Clone at x: (x) y: (y)\nhide\ncreate clone of (_myself_ v)\nchange [x v] by (x)\nchange [y v] by (y)\nnext costume\n\nwhen flag clicked\nforever\n    go to [back v] layer\nend\n\n@Platforms2\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\ngo to [front v] layer\ngo [backward v] (1) layers\n\nwhen I receive [reset v]\nset [x v] to [0]\nset [y v] to [0]\nset [ghost v] effect to (100)\ndelete this clone\n\ndefine Clone at x: (x) y: (y)\nhide\nset [x v] to (x)\nset [y v] to (y)\n\nwhen flag clicked\nset [loading v] to [1]\nset [level v] to [1]\n\nwhen I receive [setup v]\nset [x v] to [0]\nset [y v] to [0]\nset [ghost v] effect to (100)\nwait (0) seconds\nif <(LEVEL) = [1]> then\n    switch costume to (moving platform v)\n    Clone at x: [482] y: [0]\n    set [ghost v] effect to (0)\n    set [loading v] to [0]\nelse\n    if <(LEVEL) = [2]> then\n        set [y v] to [999999999]\n        set [ghost v] effect to (0)\n        set [loading v] to [0]\n    else\n        if <(LEVEL) = [3]> then\n            switch costume to (moving platform2 v)\n            Clone at x: [482] y: [0]\n            set [ghost v] effect to (0)\n            set [loading v] to [0]\n        else\n            if <(LEVEL) = [4]> then\n                set [y v] to [999999999]\n                set [ghost v] effect to (0)\n                set [loading v] to [0]\n            else\n                if <(LEVEL) = [5]> then\n                    set [y v] to [999999999]\n                    set [ghost v] effect to (0)\n                    set [loading v] to [0]\n                else\n                    if <(LEVEL) = [6]> then\n                        switch costume to (moving platform2 v)\n                        Clone at x: [360] y: [50]\n                        set [ghost v] effect to (0)\n                        set [loading v] to [0]\n                    else\n                        if <(LEVEL) = [7]> then\n                            set [y v] to [999999999]\n                            set [ghost v] effect to (0)\n                            set [loading v] to [0]\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\nbroadcast (moving platforms go v)\n\nwhen I receive [moving platforms go v]\nrepeat until <(loading) = [1]>\n    if <(LEVEL) = [1]> then\n        switch costume to (moving platform v)\n        Clone at x: [482] y: [0]\n        set [ghost v] effect to (0)\n        set [loading v] to [0]\n        repeat (100)\n            change [y v] by (1.5)\n        end\n        wait (.3) seconds\n        repeat (100)\n            change [y v] by (-1.5)\n        end\n        wait (.3) seconds\n    else\n        if <(LEVEL) = [2]> then\n            set [y v] to [999999999]\n            set [ghost v] effect to (0)\n            set [loading v] to [0]\n        else\n            if <(LEVEL) = [3]> then\n                switch costume to (moving platform2 v)\n                Clone at x: [482] y: [0]\n                set [ghost v] effect to (0)\n                set [loading v] to [0]\n                repeat (150)\n                    change [x v] by (1.5)\n                end\n                wait (.3) seconds\n                repeat (150)\n                    change [x v] by (-1.5)\n                end\n                wait (.3) seconds\n            else\n                if <(LEVEL) = [4]> then\n                    set [y v] to [999999999]\n                    set [ghost v] effect to (0)\n                    set [loading v] to [0]\n                else\n                    if <(LEVEL) = [5]> then\n                        set [y v] to [999999999]\n                        set [ghost v] effect to (0)\n                        set [loading v] to [0]\n                    else\n                        if <(LEVEL) = [6]> then\n                            switch costume to (moving platform2 v)\n                            Clone at x: [360] y: [50]\n                            set [ghost v] effect to (0)\n                            set [loading v] to [0]\n                            repeat (150)\n                                change [x v] by (1.5)\n                            end\n                            wait (.3) seconds\n                            repeat (150)\n                                change [x v] by (-1.5)\n                            end\n                            wait (.3) seconds\n                        else\n                            if <(LEVEL) = [7]> then\n                                set [y v] to [999999999]\n                                set [ghost v] effect to (0)\n                                set [loading v] to [0]\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\n\n@Blank\n\n@Platformsdeco\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\ngo to [front v] layer\n\nwhen I receive [reset v]\nset [x v] to [0]\nset [y v] to [0]\nset [ghost v] effect to (100)\ndelete this clone\n\ndefine Clone at x: (x) y: (y)\nhide\nset [x v] to (x)\nset [y v] to (y)\n\nwhen flag clicked\nset [loading v] to [1]\nset [level v] to [1]\n\nwhen I receive [setup v]\nset [x v] to [0]\nset [y v] to [0]\nset [ghost v] effect to (100)\n\nwhen I receive [setup v]\nset [x v] to [0]\nset [y v] to [0]\nset [ghost v] effect to (100)\nwait (0) seconds\nif <(LEVEL) = [1]> then\n    switch costume to (moving platform v)\n    Clone at x: [482] y: [0]\n    set [ghost v] effect to (0)\n    set [loading v] to [0]\nelse\n    if <(LEVEL) = [2]> then\n        set [y v] to [999999999]\n        set [ghost v] effect to (0)\n        set [loading v] to [0]\n    else\n        if <(LEVEL) = [3]> then\n            switch costume to (moving platform2 v)\n            Clone at x: [482] y: [0]\n            set [ghost v] effect to (0)\n            set [loading v] to [0]\n        else\n            if <(LEVEL) = [4]> then\n                set [y v] to [999999999]\n                set [ghost v] effect to (0)\n                set [loading v] to [0]\n            else\n                if <(LEVEL) = [5]> then\n                    set [y v] to [999999999]\n                    set [ghost v] effect to (0)\n                    set [loading v] to [0]\n                else\n                    if <(LEVEL) = [6]> then\n                        switch costume to (moving platform2 v)\n                        Clone at x: [360] y: [50]\n                        set [ghost v] effect to (0)\n                        set [loading v] to [0]\n                    else\n                        if <(LEVEL) = [7]> then\n                            set [y v] to [999999999]\n                            set [ghost v] effect to (0)\n                            set [loading v] to [0]\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\nbroadcast (moving platforms go v)\n\nwhen I receive [moving platforms go v]\nrepeat until <(loading) = [1]>\n    if <(LEVEL) = [1]> then\n        switch costume to (moving platform v)\n        Clone at x: [482] y: [0]\n        set [ghost v] effect to (0)\n        set [loading v] to [0]\n        repeat (100)\n            change [y v] by (1.5)\n        end\n        wait (.3) seconds\n        repeat (100)\n            change [y v] by (-1.5)\n        end\n        wait (.3) seconds\n    else\n        if <(LEVEL) = [2]> then\n            set [y v] to [999999999]\n            set [ghost v] effect to (0)\n            set [loading v] to [0]\n        else\n            if <(LEVEL) = [3]> then\n                switch costume to (moving platform2 v)\n                Clone at x: [482] y: [0]\n                set [ghost v] effect to (0)\n                set [loading v] to [0]\n                repeat (150)\n                    change [x v] by (1.5)\n                end\n                wait (.3) seconds\n                repeat (150)\n                    change [x v] by (-1.5)\n                end\n                wait (.3) seconds\n            else\n                if <(LEVEL) = [4]> then\n                    set [y v] to [999999999]\n                    set [ghost v] effect to (0)\n                    set [loading v] to [0]\n                else\n                    if <(LEVEL) = [5]> then\n                        set [y v] to [999999999]\n                        set [ghost v] effect to (0)\n                        set [loading v] to [0]\n                    else\n                        if <(LEVEL) = [6]> then\n                            switch costume to (moving platform2 v)\n                            Clone at x: [360] y: [50]\n                            set [ghost v] effect to (0)\n                            set [loading v] to [0]\n                            repeat (150)\n                                change [x v] by (1.5)\n                            end\n                            wait (.3) seconds\n                            repeat (150)\n                                change [x v] by (-1.5)\n                            end\n                            wait (.3) seconds\n                        else\n                            if <(LEVEL) = [7]> then\n                                set [y v] to [999999999]\n                                set [ghost v] effect to (0)\n                                set [loading v] to [0]\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\n\n@portal\n\nwhen I receive [tick v]\nposition ((x) - (SCROLL X)) ((y) - (SCROLL Y))\nif <(COLLECTED) = (MAX COLLECTED)> then\n    switch costume to (open v)\nelse\n    switch costume to (closed v)\nend\nif <<(costume [number v]) = [1]> and <touching (player v)?>> then\n    set [exit v] to [win]\nend\n\ndefine position (x) (y)\ngo to x: (x) y: (y)\nif <<(x) = (x position)> and <(y) = (y position)>> then\n    show\nelse\n    hide\nend\n\nwhen I receive [green flag v]\nhide\ngo to [back v] layer\n\nwhen I receive [reset v]\ndelete this clone\n\nwhen I receive [setup v]\nset [x v] to [0]\nset [y v] to [0]\nwait (0) seconds\nif <(LEVEL) = [1]> then\n    Clone at x: [1050] y: [200]\nelse\n    if <(LEVEL) = [2]> then\n        Clone at x: [1300] y: [200]\n    else\n        if <(LEVEL) = [3]> then\n            Clone at x: [2500] y: [50]\n        else\n            if <(LEVEL) = [4]> then\n                Clone at x: [2700] y: [230]\n            else\n                if <(LEVEL) = [5]> then\n                    Clone at x: [2350] y: [75]\n                else\n                    if <(LEVEL) = [6]> then\n                        Clone at x: [2350] y: [250]\n                    else\n                        if <(LEVEL) = [7]> then\n                            Clone at x: [2360] y: [120]\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\n\ndefine Clone at x: (x) y: (y)\nhide\nchange [x v] by (x)\nchange [y v] by (y)\n\n@Blank2\n\n@Blank3\n\n@Blank4\n\n@Blank5\n\n@bounce\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\ngo to [front v] layer\n\nwhen I receive [reset v]\ndelete this clone\n\nwhen I receive [setup v]\nset [x v] to [0]\nset [y v] to [0]\nwait (0) seconds\nif <(LEVEL) = [1]> then\nset [y v] to [9999999999999]\n\ndefine Clone at x: (x) y: (y)\nhide\nchange [x v] by (x)\nchange [y v] by (y)\ncreate clone of (_myself_ v)\n\nwhen I start as a clone\nset size to (100) %\nswitch costume to (bouncy10 v)\ngo to [front v] layer\nforever\n    if <touching (player v)?> then\n        switch costume to (bouncy10 v)\n        repeat (5)\n            next costume\n        end\n        wait (0) seconds\n        repeat (5)\n            switch costume to ((costume [number v]) - (1))\n        end\n        switch costume to (bouncy10 v)\n        wait (0) seconds\n    end\nend\n\n@red\n\nwhen I receive [tick v]\nposition ((x) - (SCROLL X)) ((y) - (SCROLL Y))\nif <touching (player v)?> then\n    broadcast (red v)\n    set [red v] to [1]\n    set [y v] to [99999999]\nend\n\nchange size by (-10)\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\ngo to [back v] layer\n\nwhen I receive [reset v]\ndelete this clone\n\nwhen I receive [setup v]\nset [x v] to [0]\nset [y v] to [0]\nswitch costume to (red v)\nset size to (100) %\nwait (0) seconds\nif <(LEVEL) = [2]> then\n    if <(red) = [0]> then\n        Clone at x: [750] y: [100]\n    else\n        set [y v] to [99999999]\n    end\nelse\n    set [y v] to [9999999999999]\nend\n\ndefine Clone at x: (x) y: (y)\nhide\nchange [x v] by (x)\nchange [y v] by (y)\n\nwhen flag clicked\nset [red v] to [0]\n\n@red glow\n\nwhen I receive [tick v]\nposition ((x) - (SCROLL X)) ((y) - (SCROLL Y))\nturn right (3) degrees\nif <(red) = [1]> then\n    set [y v] to [9999999999999]\nend\n\ndefine position (x) (y)\ngo to x: (x) y: (y)\nif <<(x) = (x position)> and <(y) = (y position)>> then\n    show\nelse\n    hide\nend\n\nwhen I receive [green flag v]\nhide\ngo to [back v] layer\n\nwhen I receive [reset v]\ndelete this clone\n\nwhen I receive [setup v]\nset [x v] to [0]\nset [y v] to [0]\nswitch costume to (glow v)\nset size to (100) %\nwait (0) seconds\nif <(LEVEL) = [2]> then\n    if <(red) = [0]> then\n        Clone at x: [750] y: [100]\n    else\n        set [y v] to [99999999]\n    end\nelse\n    set [y v] to [9999999999999]\nend\n\ndefine Clone at x: (x) y: (y)\nhide\nchange [x v] by (x)\nchange [y v] by (y)\n\n@Sprite1\n\nwhen flag clicked\nhide\nset [ghost v] effect to (100)\ngo to [back v] layer\ngo to x: (-195) y: (144)\nset size to (100) %\nrepeat until <(loading) = [0]>\n    hide\n    go to [back v] layer\nend\nrepeat (2)\n    go to [front v] layer\nend\n\nwhen flag clicked\nset [ghost v] effect to (100)\ngo to [back v] layer\ngo to x: (-195) y: (144)\nset size to (100) %\nrepeat until <(loading) = [0]>\n    hide\n    go to [back v] layer\nend\n\nwhen I receive [start v]\nshow\nset [ghost v] effect to (0)\nforever\n    if <<touching (mouse-pointer v)?> and <mouse down?>> then\n        set [button clicked? v] to [1]\n    else\n        if <(Button Clicked?) = [1]> then\n            wait (.2) seconds\n            set [button clicked? v] to [0]\n        end\n    end\n    show\n    if <touching (mouse-pointer v)?> then\n        set [touching button v] to [1]\n        repeat until <(size) = [120]>\n            change size by (5)\n        end\n    else\n        set [touching button v] to [0]\n        repeat until <(size) = [100]>\n            change size by (-5)\n        end\n    end\n    if <<touching (mouse-pointer v)?> and <mouse down?>> then\n        set [skip? v] to [1]\n        set [exit v] to [win]\n        wait (2) seconds\n    end\nend\n\nwhen I receive [start v]\nforever\n    point in direction ((([sin v] of ((timer) * (100)) ) * (10)) + (90))\nend\n\n@Sprite2\n\nwhen flag clicked\ngo to x: (0) y: (0)\nswitch costume to (costume1 v)\nshow\nset [ghost v] effect to (100)\nforever\n    go to [front v] layer\nend\n\n@blue\n\nwhen I receive [tick v]\nposition ((x) - (SCROLL X)) ((y) - (SCROLL Y))\nif <touching (player v)?> then\n    broadcast (blue v)\n    set [blue v] to [1]\n    set [y v] to [99999999]\nend\n\nchange size by (-10)\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\ngo to [back v] layer\n\nwhen I receive [reset v]\ndelete this clone\n\nwhen I receive [setup v]\nset [x v] to [0]\nset [y v] to [0]\nswitch costume to (blue v)\nset size to (100) %\nwait (0) seconds\nif <(LEVEL) = [3]> then\n    if <(blue) = [0]> then\n        Clone at x: [1100] y: [200]\n    else\n        set [y v] to [99999999]\n    end\nelse\n    set [y v] to [9999999999999]\nend\n\ndefine Clone at x: (x) y: (y)\nhide\nchange [x v] by (x)\nchange [y v] by (y)\n\nwhen flag clicked\nset [blue v] to [0]\n\n@blue glow\n\nwhen I receive [tick v]\nposition ((x) - (SCROLL X)) ((y) - (SCROLL Y))\nturn right (3) degrees\nif <(blue) = [1]> then\n    set [y v] to [9999999999999]\nend\n\ndefine position (x) (y)\ngo to x: (x) y: (y)\nif <<(x) = (x position)> and <(y) = (y position)>> then\n    show\nelse\n    hide\nend\n\nwhen I receive [green flag v]\nhide\ngo to [back v] layer\n\nwhen I receive [reset v]\ndelete this clone\n\nwhen I receive [setup v]\nset [x v] to [0]\nset [y v] to [0]\nswitch costume to (glow v)\nset size to (100) %\nwait (0) seconds\nif <(LEVEL) = [3]> then\n    if <(blue) = [0]> then\n        Clone at x: [1100] y: [200]\n    else\n        set [y v] to [99999999]\n    end\nelse\n    set [y v] to [9999999999999]\nend\n\ndefine Clone at x: (x) y: (y)\nhide\nchange [x v] by (x)\nchange [y v] by (y)\n\n@shop\n\nwhen flag clicked\nset [shop v] to [0]\ngo to x: (0) y: (-275)\nhide\n\nwhen I receive [no shop v]\nglide (1) secs to x: (0) y: (-275)\nhide\nset [shop v] to [0]\n\nwhen I receive [shop v]\nshow\nglide (1) secs to x: (0) y: (0)\n\nwhen flag clicked\nswitch costume to (shop v)\nforever\n    if <(Shop) = [1]> then\n        go to [front v] layer\n        if <mouse down?> then\n            if <not <<touching (mouse-pointer v)?> and <(touching button) = [0]>>> then\n                broadcast (no shop v)\n            end\n        end\n    end\nend\n\nwhen flag clicked\nrepeat (15)\n    go to [front v] layer\nend\n\nwhen flag clicked\nset [clone id v] to [0]\nrepeat (10)\n    create clone of (_myself_ v)\n    change [clone id v] by (1)\nend\n\nwhen I start as a clone\nif <(Clone ID) = [0]> then\n    switch costume to (costume2 v)\n    go to [front v] layer\n    repeat (16)\n        go to [front v] layer\n    end\n    forever\n        if <(Shop) = [1]> then\n            go to [front v] layer\n            if <<touching (mouse-pointer v)?> and <mouse down?>> then\n                if <(shades bought?) = [no]> then\n                    if <<(red) = [1]> and <(blue) = [1]>> then\n                        set [shades bought? v] to [yes]\n                    end\n                end\n            end\n            if <(shades bought?) = [yes]> then\n                switch costume to (costume3 v)\n            else\n                switch costume to (costume2 v)\n            end\n        end\n    end\nelse\n    if <(Clone ID) = [1]> then\n        switch costume to (shop2 v)\n        go to [front v] layer\n        repeat (17)\n            go to [front v] layer\n        end\n        forever\n            if <(Shop) = [1]> then\n                go to [front v] layer\n                if <([costume # v] of [player v]) = [1]> then\n                    switch costume to (shop3 v)\n                else\n                    switch costume to (shop2 v)\n                end\n                if <<touching (mouse-pointer v)?> and <mouse down?>> then\n                    if <not <([costume # v] of [player v]) = [1]>> then\n                        broadcast (dark v)\n                    end\n                end\n            end\n        end\n    else\n        if <(Clone ID) = [2]> then\n            switch costume to (shop5 v)\n            go to [front v] layer\n            repeat (18)\n                go to [front v] layer\n            end\n            forever\n                if <(Shop) = [1]> then\n                    go to [front v] layer\n                    if <(red) = [1]> then\n                        show\n                    else\n                        hide\n                    end\n                    if <([costume # v] of [player v]) = [2]> then\n                        switch costume to (shop4 v)\n                    else\n                        switch costume to (shop5 v)\n                    end\n                    if <<touching (mouse-pointer v)?> and <mouse down?>> then\n                        if <not <([costume # v] of [player v]) = [2]>> then\n                            if <(red) = [1]> then\n                                broadcast (red v)\n                            end\n                        end\n                    end\n                end\n            end\n        else\n            if <(Clone ID) = [3]> then\n                switch costume to (costume4 v)\n                go to [front v] layer\n                repeat (16)\n                    go to [front v] layer\n                end\n                forever\n                    if <(Shop) = [1]> then\n                        go to [front v] layer\n                        if <<touching (mouse-pointer v)?> and <mouse down?>> then\n                            if <(Crown bought) = [no]> then\n                                if <<(red) = [1]> and <<(blue) = [1]> and <(yellow) = [1]>>> then\n                                    set [crown bought v] to [yes]\n                                end\n                            end\n                        end\n                        if <(Crown bought) = [yes]> then\n                            switch costume to (costume5 v)\n                        else\n                            switch costume to (costume4 v)\n                        end\n                    end\n                end\n            else\n                if <(Clone ID) = [4]> then\n                    switch costume to (shop6 v)\n                    go to [front v] layer\n                    repeat (18)\n                        go to [front v] layer\n                    end\n                    forever\n                        if <(Shop) = [1]> then\n                            go to [front v] layer\n                            if <(blue) = [1]> then\n                                show\n                            else\n                                hide\n                            end\n                            if <([costume # v] of [player v]) = [3]> then\n                                switch costume to (shop7 v)\n                            else\n                                switch costume to (shop6 v)\n                            end\n                            if <<touching (mouse-pointer v)?> and <mouse down?>> then\n                                if <not <([costume # v] of [player v]) = [3]>> then\n                                    if <(blue) = [1]> then\n                                        broadcast (blue v)\n                                    end\n                                end\n                            end\n                        end\n                    end\n                else\n                    if <(Clone ID) = [5]> then\n                        switch costume to (shop8 v)\n                        go to [front v] layer\n                        repeat (18)\n                            go to [front v] layer\n                        end\n                        forever\n                            if <(Shop) = [1]> then\n                                go to [front v] layer\n                                if <(yellow) = [1]> then\n                                    show\n                                else\n                                    hide\n                                end\n                                if <([costume # v] of [player v]) = [4]> then\n                                    switch costume to (shop9 v)\n                                else\n                                    switch costume to (shop8 v)\n                                end\n                                if <<touching (mouse-pointer v)?> and <mouse down?>> then\n                                    if <not <([costume # v] of [player v]) = [4]>> then\n                                        if <(yellow) = [1]> then\n                                            broadcast (yellow v)\n                                        end\n                                    end\n                                end\n                            end\n                        end\n                    else\n                        if <(Clone ID) = [6]> then\n                            switch costume to (shop10 v)\n                            go to [front v] layer\n                            repeat (18)\n                                go to [front v] layer\n                            end\n                            forever\n                                if <(Shop) = [1]> then\n                                    go to [front v] layer\n                                    if <(green) = [1]> then\n                                        show\n                                    else\n                                        hide\n                                    end\n                                    if <([costume # v] of [player v]) = [5]> then\n                                        switch costume to (shop11 v)\n                                    else\n                                        switch costume to (shop10 v)\n                                    end\n                                    if <<touching (mouse-pointer v)?> and <mouse down?>> then\n                                        if <not <([costume # v] of [player v]) = [5]>> then\n                                            if <(green) = [1]> then\n                                                broadcast (green v)\n                                            end\n                                        end\n                                    end\n                                end\n                            end\n                        else\n                            if <(Clone ID) = [7]> then\n                                switch costume to (costume6 v)\n                                go to [front v] layer\n                                repeat (18)\n                                    go to [front v] layer\n                                end\n                                forever\n                                    if <(Shop) = [0]> then\n                                        hide\n                                    end\n                                    if <(Shop) = [1]> then\n                                        go to [front v] layer\n                                        if <(Crown bought) = [yes]> then\n                                            show\n                                            if <(crown equipped) = [1]> then\n                                                switch costume to (costume7 v)\n                                            else\n                                                switch costume to (costume6 v)\n                                            end\n                                            if <<mouse down?> and <touching (mouse-pointer v)?>> then\n                                                if <(crown equipped) = [1]> then\n                                                    set [crown equipped v] to [0]\n                                                    wait (.1) seconds\n                                                else\n                                                    set [crown equipped v] to [1]\n                                                    wait (.1) seconds\n                                                end\n                                            end\n                                        else\n                                            hide\n                                        end\n                                    end\n                                end\n                            else\n                                if <(Clone ID) = [8]> then\n                                    switch costume to (costume8 v)\n                                    go to [front v] layer\n                                    repeat (18)\n                                        go to [front v] layer\n                                    end\n                                    forever\n                                        if <(Shop) = [0]> then\n                                            hide\n                                        end\n                                        if <(Shop) = [1]> then\n                                            go to [front v] layer\n                                            if <(shades bought?) = [yes]> then\n                                                show\n                                                if <(shades equipped) = [1]> then\n                                                    switch costume to (costume9 v)\n                                                else\n                                                    switch costume to (costume8 v)\n                                                end\n                                                if <<mouse down?> and <touching (mouse-pointer v)?>> then\n                                                    if <(shades equipped) = [1]> then\n                                                        set [shades equipped v] to [0]\n                                                        wait (.1) seconds\n                                                    else\n                                                        set [shades equipped v] to [1]\n                                                        wait (.1) seconds\n                                                    end\n                                                end\n                                            else\n                                                hide\n                                            end\n                                        end\n                                    end\n                                else\n                                    if <(Clone ID) = [9]> then\n                                        switch costume to (shop13 v)\n                                        go to [front v] layer\n                                        repeat (18)\n                                            go to [front v] layer\n                                        end\n                                        forever\n                                            if <(Shop) = [1]> then\n                                                go to [front v] layer\n                                                if <(OP Twilight) = [1]> then\n                                                    show\n                                                else\n                                                    hide\n                                                end\n                                                if <([costume # v] of [player v]) = [6]> then\n                                                    switch costume to (shop14 v)\n                                                else\n                                                    switch costume to (shop13 v)\n                                                end\n                                                if <<touching (mouse-pointer v)?> and <mouse down?>> then\n                                                    if <not <([costume # v] of [player v]) = [6]>> then\n                                                        if <(OP Twilight) = [1]> then\n                                                            broadcast (twilight v)\n                                                        end\n                                                    end\n                                                end\n                                            end\n                                        end\n                                    else\n                                    end\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\n\n@Sprite3\n\nwhen flag clicked\nset [ghost v] effect to (100)\ngo to [back v] layer\ngo to x: (-115) y: (144)\nset size to (100) %\nhide\nrepeat until <(loading) = [0]>\n    hide\n    go to [back v] layer\nend\n\nwhen flag clicked\nhide\nset [ghost v] effect to (100)\ngo to [back v] layer\ngo to x: (-115) y: (144)\nset size to (100) %\nhide\nrepeat until <(loading) = [0]>\n    hide\n    go to [back v] layer\nend\nrepeat (2)\n    go to [front v] layer\nend\n\nwhen I receive [start v]\nshow\nset [ghost v] effect to (0)\nforever\n    if <<touching (mouse-pointer v)?> and <mouse down?>> then\n        set [button clicked? v] to [1]\n    else\n        if <(Button Clicked?) = [1]> then\n            wait (.2) seconds\n            set [button clicked? v] to [0]\n        end\n    end\n    show\n    if <touching (mouse-pointer v)?> then\n        set [touching button v] to [1]\n        repeat until <(size) = [120]>\n            change size by (5)\n        end\n    else\n        set [touching button v] to [0]\n        repeat until <(size) = [100]>\n            change size by (-5)\n        end\n    end\n    if <<touching (mouse-pointer v)?> and <mouse down?>> then\n        if <(Shop) = [0]> then\n            broadcast (shop v)\n            wait until <not <mouse down?>>\n            set [shop v] to [1]\n        end\n    end\n    if <(Shop) = [1]> then\n        hide\n        go to x: (5000000000000000) y: (144)\n    else\n        show\n        go to x: (-115) y: (144)\n    end\nend\n\nwhen I receive [start v]\nforever\n    point in direction ((([sin v] of ((timer) * (100)) ) * (10)) + (90))\nend\n\n@Sprite4\n\nwhen flag clicked\nswitch costume to (costume1 v)\nhide\ngo to x: (0) y: (0)\ndelete all of [lvls done v]\ndelete all of [first time reading costume v]\nrepeat (20)\n    go to [back v] layer\nend\nshow\n\nwhen I receive [start v]\nwait (.5) seconds\n\nwhen I receive [menu over v]\nrepeat (20)\n    go to [front v] layer\nend\nset [loading v] to [1]\nforever\n    if <(loading) = [1]> then\n        set [start v] to [0]\n        if <(LEVEL) = [1]> then\n            if <[first time reading costume v] contains [1]?> then\n                add [1] to [lvls done v]\n            end\n            switch costume to (costume1 v)\n            add [1] to [first time reading costume v]\n        else\n            if <(LEVEL) = [2]> then\n                if <[first time reading costume v] contains [2]?> then\n                    add [2] to [lvls done v]\n                end\n                switch costume to (costume2 v)\n                add [2] to [first time reading costume v]\n            else\n                if <(LEVEL) = [3]> then\n                    if <[first time reading costume v] contains [3]?> then\n                        add [3] to [lvls done v]\n                    end\n                    switch costume to (costume3 v)\n                    add [3] to [first time reading costume v]\n                else\n                    if <(LEVEL) = [4]> then\n                        if <[first time reading costume v] contains [4]?> then\n                            add [4] to [lvls done v]\n                        end\n                        switch costume to (costume4 v)\n                        add [4] to [first time reading costume v]\n                    else\n                        if <(LEVEL) = [5]> then\n                            if <[first time reading costume v] contains [5]?> then\n                                add [5] to [lvls done v]\n                            end\n                            switch costume to (costume5 v)\n                            add [5] to [first time reading costume v]\n                        else\n                            if <(LEVEL) = [6]> then\n                                if <[first time reading costume v] contains [6]?> then\n                                    add [6] to [lvls done v]\n                                end\n                                switch costume to (costume6 v)\n                                add [6] to [first time reading costume v]\n                            else\n                                if <(LEVEL) = [7]> then\n                                    if <[first time reading costume v] contains [7]?> then\n                                        add [7] to [lvls done v]\n                                    end\n                                    switch costume to (costume7 v)\n                                    add [7] to [first time reading costume v]\n                                else\n                                    if <(LEVEL) = [8]> then\n                                        switch costume to (costume8 v)\n                                    end\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n        if <(LEVEL) = [1]> then\n            if <not <[lvls done v] contains [1]?>> then\n                show\n                set [ghost v] effect to (0)\n                wait (.3) seconds\n                wait until <mouse down?>\n                set [loading v] to [0]\n                set [start v] to [1]\n            else\n                hide\n            end\n        else\n            if <(LEVEL) = [2]> then\n                if <not <[lvls done v] contains [2]?>> then\n                    show\n                    set [ghost v] effect to (0)\n                    wait (.3) seconds\n                    wait until <mouse down?>\n                    set [start v] to [1]\n                else\n                    hide\n                end\n            else\n                if <(LEVEL) = [3]> then\n                    if <not <[lvls done v] contains [3]?>> then\n                        show\n                        set [ghost v] effect to (0)\n                        wait (.3) seconds\n                        wait until <mouse down?>\n                        set [start v] to [1]\n                    else\n                        hide\n                    end\n                else\n                    if <(LEVEL) = [4]> then\n                        if <not <[lvls done v] contains [4]?>> then\n                            show\n                            set [ghost v] effect to (0)\n                            wait (.3) seconds\n                            wait until <mouse down?>\n                            set [start v] to [1]\n                        else\n                            hide\n                        end\n                    else\n                        if <(LEVEL) = [5]> then\n                            if <not <[lvls done v] contains [5]?>> then\n                                show\n                                set [ghost v] effect to (0)\n                                wait (.3) seconds\n                                wait until <mouse down?>\n                                set [start v] to [1]\n                            else\n                                hide\n                            end\n                        else\n                            if <(LEVEL) = [6]> then\n                                if <not <[lvls done v] contains [6]?>> then\n                                    show\n                                    set [ghost v] effect to (0)\n                                    wait (.3) seconds\n                                    wait until <mouse down?>\n                                    set [start v] to [1]\n                                else\n                                    hide\n                                end\n                            else\n                                if <(LEVEL) = [7]> then\n                                    if <not <[lvls done v] contains [7]?>> then\n                                        show\n                                        set [ghost v] effect to (0)\n                                        wait (.3) seconds\n                                        wait until <mouse down?>\n                                        set [start v] to [1]\n                                    else\n                                        hide\n                                    end\n                                else\n                                    if <(LEVEL) = [8]> then\n                                        show\n                                        set [ghost v] effect to (0)\n                                        forever\n                                            wait (1) seconds\n                                        end\n                                    end\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n        set [start v] to [1]\n    else\n        hide\n    end\nend\n\n@enemy\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\ngo to [front v] layer\n\nwhen I receive [reset v]\ndelete this clone\n\nwhen I receive [setup v]\nset [x v] to [0]\nset [y v] to [0]\nwait (0) seconds\nif <(LEVEL) = [1]> then\nset [y v] to [9999999999999]\n\ndefine Clone at x: (x) y: (y)\nhide\nchange [x v] by (x)\nchange [y v] by (y)\ncreate clone of (_myself_ v)\n\nwhen I start as a clone\nset rotation style [left-right v]\nset size to (100) %\nswitch costume to (enemy v)\ngo to [back v] layer\ngo [forward v] (13) layers\nforever\n    point in direction (90)\n    switch costume to (enemy v)\n    repeat (19)\n        next costume\n    end\n    wait (.3) seconds\n    switch costume to (enemy20 v)\n    repeat (19)\n        next costume\n    end\n    switch costume to (enemy v)\n    wait (.3) seconds\nend\n\nwhen I start as a clone\nforever\n    if <touching (player v)?> then\n        if <(([y position v] of [player v]) - (10)) > (y position)> then\n            broadcast (enemy killed v)\n            repeat (7)\n                change [y v] by (-2)\n            end\n            delete this clone\n        else\n            start sound [Crunch v]\n            set [exit v] to [die]\n        end\n    end\nend\n\n@yellow\n\nwhen I receive [tick v]\nposition ((x) - (SCROLL X)) ((y) - (SCROLL Y))\nif <touching (player v)?> then\n    broadcast (yellow v)\n    set [yellow v] to [1]\n    set [y v] to [99999999]\nend\n\nchange size by (-10)\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\ngo to [back v] layer\n\nwhen I receive [reset v]\ndelete this clone\n\nwhen I receive [setup v]\nset [x v] to [0]\nset [y v] to [0]\nswitch costume to (yellow v)\nset size to (100) %\nwait (0) seconds\nif <(LEVEL) = [4]> then\n    if <(yellow) = [0]> then\n        Clone at x: [1735] y: [-90]\n    else\n        set [y v] to [99999999]\n    end\nelse\n    set [y v] to [9999999999999]\nend\n\ndefine Clone at x: (x) y: (y)\nhide\nchange [x v] by (x)\nchange [y v] by (y)\n\nwhen flag clicked\nset [yellow v] to [0]\n\n@yellow glow\n\nwhen I receive [tick v]\nposition ((x) - (SCROLL X)) ((y) - (SCROLL Y))\nturn right (3) degrees\nif <(yellow) = [1]> then\n    set [y v] to [9999999999999]\nend\n\ndefine position (x) (y)\ngo to x: (x) y: (y)\nif <<(x) = (x position)> and <(y) = (y position)>> then\n    show\nelse\n    hide\nend\n\nwhen I receive [green flag v]\nhide\ngo to [back v] layer\n\nwhen I receive [reset v]\ndelete this clone\n\nwhen I receive [setup v]\nset [x v] to [0]\nset [y v] to [0]\nswitch costume to (glow v)\nset size to (100) %\nwait (0) seconds\nif <(LEVEL) = [4]> then\n    if <(yellow) = [0]> then\n        Clone at x: [1735] y: [-90]\n    else\n        set [y v] to [99999999]\n    end\nelse\n    set [y v] to [9999999999999]\nend\n\ndefine Clone at x: (x) y: (y)\nhide\nchange [x v] by (x)\nchange [y v] by (y)\n\n@shades\n\nwhen flag clicked\nset rotation style [left-right v]\ngo to [front v] layer\nforever\n    go to player\nend\n\ndefine go to player\ngo to (player v)\npoint in direction ([direction v] of [player v])\nset [ghost v] effect to (ghost of player)\nset size to ([size v] of [player v]) %\ngo to [front v] layer\nif <(shades bought?) = [yes]> then\n    if <(shades equipped) = [1]> then\n        show\n    else\n        hide\n    end\nelse\n    hide\nend\n\nwhen flag clicked\nset [shades equipped v] to [1]\n\n@crown\n\nwhen flag clicked\nset rotation style [left-right v]\ngo to [front v] layer\nforever\n    go to player\nend\n\ndefine go to player\ngo to (player v)\npoint in direction ([direction v] of [player v])\nset [ghost v] effect to (ghost of player)\nset size to ([size v] of [player v]) %\ngo to [front v] layer\nif <(Crown bought) = [yes]> then\n    if <(crown equipped) = [1]> then\n        show\n    else\n        hide\n    end\nelse\n    hide\nend\n\nwhen flag clicked\nset [crown equipped v] to [1]\n\n@green\n\nwhen I receive [tick v]\nposition ((x) - (SCROLL X)) ((y) - (SCROLL Y))\nif <touching (player v)?> then\n    broadcast (green v)\n    set [green v] to [1]\n    set [y v] to [99999999]\nend\n\nchange size by (-10)\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\ngo to [back v] layer\n\nwhen I receive [reset v]\ndelete this clone\n\nwhen I receive [setup v]\nset [x v] to [0]\nset [y v] to [0]\nswitch costume to (green v)\nset size to (100) %\nwait (0) seconds\nif <(LEVEL) = [5]> then\n    if <(green) = [0]> then\n        Clone at x: [1400] y: [250]\n    else\n        set [y v] to [99999999]\n    end\nelse\n    set [y v] to [9999999999999]\nend\n\ndefine Clone at x: (x) y: (y)\nhide\nchange [x v] by (x)\nchange [y v] by (y)\n\nwhen flag clicked\nset [green v] to [0]\n\n@green glow\n\nwhen I receive [tick v]\nposition ((x) - (SCROLL X)) ((y) - (SCROLL Y))\nturn right (3) degrees\nif <(green) = [1]> then\n    set [y v] to [9999999999999]\nend\n\ndefine position (x) (y)\ngo to x: (x) y: (y)\nif <<(x) = (x position)> and <(y) = (y position)>> then\n    show\nelse\n    hide\nend\n\nwhen I receive [green flag v]\nhide\ngo to [back v] layer\n\nwhen I receive [reset v]\ndelete this clone\n\nwhen I receive [setup v]\nset [x v] to [0]\nset [y v] to [0]\nswitch costume to (glow v)\nset size to (100) %\nwait (0) seconds\nif <(LEVEL) = [5]> then\n    if <(green) = [0]> then\n        Clone at x: [1400] y: [250]\n    else\n        set [y v] to [99999999]\n    end\nelse\n    set [y v] to [9999999999999]\nend\n\ndefine Clone at x: (x) y: (y)\nhide\nchange [x v] by (x)\nchange [y v] by (y)\n\n@Platforms3\n\nwhen I receive [tick v]\nposition ((x) - (SCROLL X)) ((y) - (SCROLL Y))\n\ndefine position (x) (y)\ngo to x: (x) y: (y)\ngo to [front v] layer\nif <<(x) = (x position)> and <(y) = (y position)>> then\n    if <(LEVEL) = [6]> then\n        show\n    else\n        hide\n    end\nelse\n    hide\nend\n\nwhen I receive [green flag v]\nhide\n\nwhen I receive [reset v]\ndelete this clone\n\nwhen I receive [setup v]\nset [x v] to [0]\nset [y v] to [0]\nwait (0) seconds\nif <(LEVEL) = [6]> then\n    switch costume to (level 6 1 v)\n    Clone at x: [482] y: [0]\n    if <<<(red) = [1]> and <(blue) = [1]>> and <<(yellow) = [1]> and <(green) = [1]>>> then\n        clone 2 [482] [0]\n    else\n        clone 1 [482] [0]\n    end\nend\n\ndefine Clone at x: (x) y: (y)\nhide\ncreate clone of (_myself_ v)\nchange [x v] by (x)\nchange [y v] by (y)\nnext costume\n\ndefine clone 1 (x) (y)\nhide\ncreate clone of (_myself_ v)\nchange [x v] by (x)\nchange [y v] by (y)\nswitch costume to (level 6 3 v)\n\ndefine clone 2 (x) (y)\nhide\ncreate clone of (_myself_ v)\nchange [x v] by (x)\nchange [y v] by (y)\nswitch costume to (level 6 4 v)\n\n@OP Twilight\n\nwhen I receive [tick v]\nposition ((x) - (SCROLL X)) ((y) - (SCROLL Y))\nif <touching (player v)?> then\n    broadcast (twilight v)\n    set [op twilight v] to [1]\n    set [y v] to [99999999]\nend\n\ndefine position (x) (y)\ngo to x: (x) y: (y)\nif <<(x) = (x position)> and <(y) = (y position)>> then\n    show\nelse\n    hide\nend\n\nwhen I receive [green flag v]\nhide\ngo to [back v] layer\n\nwhen I receive [reset v]\ndelete this clone\n\nwhen I receive [setup v]\nset [x v] to [0]\nset [y v] to [0]\nswitch costume to (twilight v)\nset size to (100) %\nwait (0) seconds\nif <(LEVEL) = [6]> then\n    if <(OP Twilight) = [0]> then\n        Clone at x: [1010] y: [50]\n    else\n        set [y v] to [99999999]\n    end\nelse\n    set [y v] to [9999999999999]\nend\n\ndefine Clone at x: (x) y: (y)\nhide\nchange [x v] by (x)\nchange [y v] by (y)\n\nwhen flag clicked\nset [op twilight v] to [0]\n\n@twilight glow\n\nwhen I receive [tick v]\nposition ((x) - (SCROLL X)) ((y) - (SCROLL Y))\nturn right (3) degrees\nif <(OP Twilight) = [1]> then\n    set [y v] to [9999999999999]\nend\n\ndefine position (x) (y)\ngo to x: (x) y: (y)\nif <<(x) = (x position)> and <(y) = (y position)>> then\n    show\nelse\n    hide\nend\n\nwhen I receive [green flag v]\nhide\ngo to [back v] layer\n\nwhen I receive [reset v]\ndelete this clone\n\nwhen I receive [setup v]\nset [x v] to [0]\nset [y v] to [0]\nswitch costume to (glow v)\nset size to (100) %\nwait (0) seconds\nif <(LEVEL) = [6]> then\n    if <(OP Twilight) = [0]> then\n        Clone at x: [1010] y: [50]\n    else\n        set [y v] to [99999999]\n    end\nelse\n    set [y v] to [9999999999999]\nend\n\ndefine Clone at x: (x) y: (y)\nhide\nchange [x v] by (x)\nchange [y v] by (y)\n\n@intro\n\nwhen flag clicked\nset [clone pos v] to [150]\nset [clone id v] to [1]\ncreate clone of (_myself_ v)\nset volume to (100) %\nstart sound [OST-Xenogen v]\nswitch costume to (costume1 v)\nset [ghost v] effect to (0)\nset size to (35) %\ngo to [front v] layer\nshow\ngo to x: (0) y: (-160)\npoint in direction (120)\nrepeat (14)\n    turn left (30) degrees\n    change y by (12)\n    change size by (2)\nend\nrepeat (2)\n    change y by (1)\n    turn right (12) degrees\nend\nswitch costume to (costume2 v)\nset [clone id v] to [0]\ncreate clone of (_myself_ v)\nchange size by (80)\npoint in direction (90)\nwait (2) seconds\nset [clone id v] to [3]\ngo to x: (0) y: (0)\nswitch costume to (costume1 v)\nrepeat (10)\n    change x by (10)\n    turn right (36) degrees\nend\nwait (.05) seconds\nrepeat (20)\n    change x by (-12)\n    turn right (18) degrees\n    change size by (-5)\n    create clone of (_myself_ v)\n    change [clone id v] by (1)\n    change [clone pos v] by (-50)\nend\nwait (1) seconds\nset [clone id v] to [-1]\ncreate clone of (_myself_ v)\nrepeat (10)\n    go to [front v] layer\n    change x by (15)\n    turn right (-36) degrees\n    change size by (10)\nend\npoint in direction (90)\ngo to x: (0) y: (0)\nset size to (143) %\nwait (.1) seconds\nrepeat (14)\n    turn left (10) degrees\n    change y by (-12)\n    change size by (-3)\n    change [ghost v] effect by (5)\nend\nhide\nswitch costume to (costume4 v)\ngo to x: (-50000000) y: (0)\npoint in direction (90)\nset [ghost v] effect to (0)\nshow\ngo to [front v] layer\nrepeat until <<(x position) = [0]> or <(x position) > [0]>>\n    change x by (30)\nend\nset [clone id v] to [2]\ncreate clone of (_myself_ v)\nswitch costume to (costume5 v)\ngo to x: (0) y: (500000000000)\npoint in direction (90)\nset [ghost v] effect to (0)\nshow\ngo to [front v] layer\nrepeat until <<(y position) = [0]> or <[0] > (y position)>>\n    change y by (-30)\nend\nbroadcast (start v)\nhide\nrepeat (10)\n    change volume by (-10)\nend\n\nwhen I start as a clone\nif <(Clone ID) = [0]> then\n    set size to (120) %\n    go to x: (0) y: (0)\n    go to [front v] layer\n    switch costume to (poof-0 v)\n    repeat (13)\n        wait (0.01) seconds\n        next costume\n    end\n    delete this clone\nend\nif <(Clone ID) = [1]> then\n    set [ghost v] effect to (0)\n    set size to (100) %\n    go to x: (0) y: (0)\n    point in direction (90)\n    go to [back v] layer\n    switch costume to (costume3 v)\n    show\n    repeat (10)\n        go to [back v] layer\n    end\nend\nif <(Clone ID) = [2]> then\n    set [ghost v] effect to (0)\n    set size to (100) %\n    go to x: (0) y: (0)\n    point in direction (90)\n    go to [back v] layer\n    go [forward v] (1) layers\n    switch costume to (costume4 v)\n    show\nend\nif <(Clone ID) = [3]> then\n    set [ghost v] effect to (0)\n    set size to (100) %\n    point in direction (90)\n    go to x: (Clone Pos) y: (0)\n    go to [back v] layer\n    go [forward v] (5) layers\n    switch costume to (costume11 v)\n    show\n    repeat (10)\n        turn right (36) degrees\n    end\nend\nif <(Clone ID) = [4]> then\n    set [ghost v] effect to (0)\n    set size to (100) %\n    point in direction (90)\n    go to x: (Clone Pos) y: (0)\n    go to [back v] layer\n    go [forward v] (5) layers\n    switch costume to (costume10 v)\n    show\n    repeat (10)\n        turn right (36) degrees\n    end\nend\nif <(Clone ID) = [5]> then\n    set [ghost v] effect to (0)\n    set size to (100) %\n    point in direction (90)\n    go to x: (Clone Pos) y: (0)\n    go to [back v] layer\n    go [forward v] (5) layers\n    switch costume to (costume9 v)\n    show\n    repeat (10)\n        turn right (36) degrees\n    end\nend\nif <(Clone ID) = [6]> then\n    set [ghost v] effect to (0)\n    set size to (100) %\n    point in direction (90)\n    go to x: (Clone Pos) y: (0)\n    go to [back v] layer\n    go [forward v] (5) layers\n    switch costume to (costume8 v)\n    show\n    repeat (10)\n        turn right (36) degrees\n    end\nend\nif <(Clone ID) = [7]> then\n    set [ghost v] effect to (0)\n    set size to (100) %\n    point in direction (90)\n    go to x: (Clone Pos) y: (0)\n    go to [back v] layer\n    go [forward v] (5) layers\n    switch costume to (costume7 v)\n    show\n    repeat (10)\n        turn right (36) degrees\n    end\nend\nif <(Clone ID) > [7]> then\n    delete this clone\nend\nif <(Clone ID) = [-1]> then\n    switch costume to (costume3 v)\n    set size to (100) %\n    go to x: (-50000000) y: (0)\n    point in direction (90)\n    set [ghost v] effect to (0)\n    show\n    go to [front v] layer\n    repeat until <<(x position) = [0]> or <(x position) > [0]>>\n        change x by (30)\n    end\nend\n\nwhen I receive [start v]\ndelete this clone\n\n@Sprite5\n\nwhen flag clicked\ngo to x: (0) y: (0)\npoint in direction (90)\nhide\nswitch costume to (costume1 v)\nforever\n    go to [front v] layer\nend\n\nwhen I receive [start v]\nshow\ncreate clone of (_myself_ v)\n\nwhen I start as a clone\nswitch costume to (costume2 v)\ngo to x: (0) y: (-50)\nshow\nforever\n    if <touching (mouse-pointer v)?> then\n        repeat until <(size) = [120]>\n            go to [front v] layer\n            change size by (5)\n        end\n    else\n        repeat until <(size) = [100]>\n            go to [front v] layer\n            change size by (-5)\n        end\n    end\n    point in direction ((([sin v] of ((timer) * (100)) ) * (10)) + (90))\n    go to [front v] layer\nend\n\nwhen I start as a clone\nforever\n    if <<touching (mouse-pointer v)?> and <mouse down?>> then\n        broadcast (menu over v)\n    end\nend\n\nwhen I receive [menu over v]\nforever\n    hide\n    delete this clone\nend\n\ngo to [front v] layer\n\n