Shades - A Platformer

Instructions: arrow or WAD keys to move. But remember this is mobile friendly!!!\n\nafter @-canCode- gets 500 followers I will make level 12. So please follow @-canCode-\n\nSorry if the game lags\n\nPC\ns to skip if you have to\nb to go back a level\nr to reset in that level\nf to show/hide fps\n\nMobile\nSorry, I had to take of the Mobile skip, back and reset button because of lag

@Stage\n\nwhen [m v] key pressed\nset [mouse v] to (join ((mouse x) + (SCROLLX)) (join [, ] ((mouse y) + (SCROLLY))))\n\nwhen flag clicked\nforever\n    play sound [music v] until done\nend\n\n@Player\n\nwhen flag clicked\nbroadcast (Green Flag v) and wait\nbroadcast (Play Game v) and wait\n\nwhen I receive [green flag v]\nhide\ngo to [front v] layer\n\nwhen I receive [play game v]\nset [level v] to [1]\nforever\n    broadcast (reset v) and wait\n    broadcast (setup v) and wait\n    game on\n    repeat until <<(EXIT) > []> or <<(mobile button) = [skip]> or <<<key (s v) pressed?> or <key (r v) pressed?>> or <<key (b v) pressed?> or <<(mobile button) = [back]> or <<(mobile button) = [reset]> or <key (r v) pressed?>>>>>>>\n        tick\n        broadcast (tick v) and wait\n        broadcast (frame v)\n    end\n    if <(EXIT) = [Win]> then\n        Game - Win\n    else\n        if <<key (s v) pressed?> or <(mobile button) = [skip]>> then\n            change [level v] by (1)\n            wait until <not <<key (s v) pressed?> or <(mobile button) = [skip]>>>\n        else\n            if <<key (b v) pressed?> or <(mobile button) = [back]>> then\n                if <(LEVEL) > [1]> then\n                    change [level v] by (-1)\n                    wait until <not <<key (b v) pressed?> or <(mobile button) = [back]>>>\n                end\n            else\n                if <not <<(mobile button) = [reset]> or <key (r v) pressed?>>> then\n                    game die\n                end\n            end\n        end\n    end\nend\n\ndefine game on\nset [scrollx v] to [0]\nset [scrolly v] to [0]\nset [x v] to [0]\nset [y v] to [0]\nset [sy v] to [0]\nset [exit v] to []\nset size to (100) %\nset [ghost v] effect to (0)\nshow\nswitch costume to (LEVEL)\n\ndefine tick\nif <<key (left arrow v) pressed?> or <<key (a v) pressed?> or <<mouse down?> and <(x position) > (mouse x)>>>> then\n    change player x by [-9]\nend\nif <<key (right arrow v) pressed?> or <<key (d v) pressed?> or <<mouse down?> and <(mouse x) > (x position)>>>> then\n    change player x by [9]\nend\nif <<key (up arrow v) pressed?> or <<key (w v) pressed?> or <<mouse down?> and <(mouse y) > ((y position) + (20))>>>> then\n    if <(in air) < [4]> then\n        set [sy v] to [16]\n    end\nend\nchange [sy v] by (-2)\nchange player y by (sy)\ntest - die/bounce\nset [scrollx v] to (x)\nif <(SCROLLX) < [0]> then\n    set [scrollx v] to [0]\nend\nchange [scrolly v] by (round (((y) - (SCROLLY)) / (8)))\nif <(SCROLLY) < [0]> then\n    set [scrolly v] to [0]\nend\nposition\nif <(y) < [-180]> then\n    set [exit v] to [die]\nend\n\ndefine change player y by (sy)\nchange [y v] by (sy)\nchange [in air v] by (1)\nposition\nrepeat until <not <touching (platform 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) - (SCROLLX)) y: ((y) - (SCROLLY))\n\ndefine change player x by (sx)\nchange [x v] by (sx)\nposition\nif <touching (platform v)?> then\n    repeat (8)\n        change [y v] by (1)\n        position\n        if <not <touching (platform v)?>> then\n            stop [this script v]\n        end\n    end\n    change [y v] by (-8)\n    repeat until <not <touching (platform 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 game die\nset [exit v] to []\nrepeat (5)\n    hide\n    wait (0.1) seconds\n    show\n    wait (0.1) seconds\nend\nhide\nwait (0.1) seconds\n\ndefine test - die/bounce\nif <touching (danger v)?> then\n    set [exit v] to [die]\nend\nif <touching (bouncy v)?> then\n    set [sy v] to [30]\nend\n\ndefine Game - Win\nrepeat (50)\n    point towards (exit v)\n    turn right (65) degrees\n    move ((distance to [exit v]) / (2)) steps\n    change size by (-1)\n    change [ghost v] effect by (2)\nend\nhide\nchange [level v] by (1)\nwait (1) seconds\n\nwhen I receive [frame v]\nchange [frame v] by (1)\n\nwhen flag clicked\nforever\n    set [frame v] to [0]\n    wait (1) seconds\n    set [fps v] to (frame)\nend\n\nwhen flag clicked\nforever\n    hide variable [fps v]\n    if <key (f v) pressed?> then\n        show variable [fps v]\n        wait until <not <key (f v) pressed?>>\n        wait until <key (f v) pressed?>\n        wait until <not <key (f v) pressed?>>\n    end\nend\n\n@platform\n\nwhen I receive [green flag v]\nhide\n\nwhen I receive [tick v]\nposition ((x) - (SCROLLX)) ((y) - (SCROLLY))\n\nwhen I receive [setup v]\nhide\nset [x v] to [0]\nset [y v] to [0]\nif <(LEVEL) = [1]> then\n    switch costume to (level 1 - 1 v)\n    clone at x: [400] y: [0]\n    clone at x: [460] y: [0]\nelse\n    if <(LEVEL) = [2]> then\n        switch costume to (level 2 -1 v)\n        clone at x: [400] y: [0]\n        clone at x: [460] y: [0]\n        clone at x: [0] y: [310]\n    else\n        if <(LEVEL) = [3]> then\n            switch costume to (level 3 - 1 v)\n            clone at x: [300] y: [0]\n            clone at x: [360] y: [0]\n        else\n            if <(LEVEL) = [4]> then\n                switch costume to (level 4 - 1 v)\n                clone at x: [360] y: [0]\n                clone at x: [480] y: [0]\n                clone at x: [460] y: [0]\n            else\n                if <(LEVEL) = [5]> then\n                    switch costume to (level 5-1 v)\n                    clone at x: [0] y: [150]\n                    clone at x: [0] y: [170]\n                    clone at x: [0] y: [170]\n                    clone at x: [0] y: [0]\n                    clone at x: [170] y: [60]\n                    clone at x: [200] y: [-300]\n                else\n                    if <(LEVEL) = [6]> then\n                        switch costume to (level 6 - 1 v)\n                        clone at x: [340] y: [0]\n                        clone at x: [340] y: [100]\n                        clone at x: [340] y: [100]\n                        clone at x: [340] y: [100]\n                        clone at x: [340] y: [-100]\n                    else\n                        if <(LEVEL) = [7]> then\n                            switch costume to (level 7 - 1 v)\n                            clone at x: [400] y: [0]\n                            clone at x: [400] y: [50]\n                            clone at x: [400] y: [-50]\n                        else\n                            if <(LEVEL) = [8]> then\n                                switch costume to (level 8 - 1 v)\n                                clone at x: [400] y: [0]\n                                clone at x: [0] y: [185]\n                            else\n                                if <(LEVEL) = [9]> then\n                                    switch costume to (level 9 - 1 v)\n                                    clone at x: [400] y: [0]\n                                    clone at x: [0] y: [240]\n                                else\n                                    if <(LEVEL) = [10]> then\n                                        switch costume to (level 10 - 1 v)\n                                        clone at x: [400] y: [200]\n                                        clone at x: [-200] y: [300]\n                                        clone at x: [-450] y: [-100]\n                                    else\n                                        if <(LEVEL) = [11]> then\n                                            switch costume to (level 11 - 1 v)\n                                            clone at x: [400] y: [0]\n                                            clone at x: [400] y: [0]\n                                        else\n                                            if <(LEVEL) = [12]> then\n                                                switch costume to (level 12 - 1 v)\n                                            end\n                                        end\n                                    end\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\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 [reset v]\ndelete this clone\n\ndefine clone at x: (x) y: (y)\ncreate clone of (_myself_ v)\nchange [x v] by (x)\nchange [y v] by (y)\nnext costume\n\n@danger\n\nwhen I receive [green flag v]\nhide\n\nwhen I receive [tick v]\nposition ((x) - (SCROLLX)) ((y) - (SCROLLY))\n\nwhen I receive [setup v]\nhide\nset [x v] to [0]\nset [y v] to [0]\nif <(LEVEL) = [1]> then\n    switch costume to (level 1 - 1 v)\n    clone at x: [400] y: [0]\n    clone at x: [460] y: [0]\nelse\n    if <(LEVEL) = [2]> then\n        switch costume to (level 2 - 1 v)\n        clone at x: [400] y: [0]\n        clone at x: [460] y: [0]\n    else\n        if <(LEVEL) = [3]> then\n            switch costume to (level 3 - 1 v)\n            clone at x: [300] y: [0]\n        else\n            if <(LEVEL) = [4]> then\n                switch costume to (level 4 - 1 v)\n                clone at x: [360] y: [0]\n                clone at x: [480] y: [0]\n                clone at x: [360] y: [0]\n            else\n                if <(LEVEL) = [5]> then\n                    switch costume to (level 5 - 1 v)\n                    clone at x: [0] y: [150]\n                    clone at x: [0] y: [170]\n                    clone at x: [0] y: [170]\n                    clone at x: [0] y: [0]\n                    clone at x: [170] y: [60]\n                    clone at x: [200] y: [-300]\n                else\n                    if <(LEVEL) = [6]> then\n                        switch costume to (level 6-1 v)\n                        clone at x: [340] y: [0]\n                        clone at x: [340] y: [100]\n                        clone at x: [340] y: [100]\n                        clone at x: [340] y: [100]\n                        clone at x: [340] y: [-100]\n                    else\n                        if <(LEVEL) = [7]> then\n                            switch costume to (level 7-1 v)\n                            clone at x: [400] y: [0]\n                            clone at x: [400] y: [50]\n                            clone at x: [400] y: [-50]\n                        else\n                            if <(LEVEL) = [8]> then\n                                switch costume to (level 8 - 1 v)\n                                clone at x: [400] y: [0]\n                                clone at x: [0] y: [185]\n                            else\n                                if <(LEVEL) = [9]> then\n                                    switch costume to (level 9 - 1 v)\n                                    clone at x: [400] y: [0]\n                                    clone at x: [0] y: [240]\n                                else\n                                    if <(LEVEL) = [10]> then\n                                        switch costume to (level 10 - 1 v)\n                                        clone at x: [400] y: [200]\n                                        clone at x: [-200] y: [300]\n                                        clone at x: [-450] y: [-100]\n                                    else\n                                        if <(LEVEL) = [11]> then\n                                            switch costume to (level 11 - 1 v)\n                                            clone at x: [400] y: [0]\n                                            clone at x: [400] y: [0]\n                                        else\n                                            if <(LEVEL) = [12]> then\n                                                switch costume to (level 12 - 1 v)\n                                            end\n                                        end\n                                    end\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\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 [reset v]\ndelete this clone\n\ndefine clone at x: (x) y: (y)\ncreate clone of (_myself_ v)\nchange [x v] by (x)\nchange [y v] by (y)\nnext costume\n\n@collectables\n\nwhen I receive [green flag v]\nhide\n\nwhen I receive [tick v]\nposition ((x) - (SCROLLX)) ((y) - (SCROLLY))\nif <touching (player v)?> then\n    change [collected v] by (1)\n    in game collected\n    if <(COLLECTED) = (COLLECTED MAX)> then\n        broadcast (Open Portal v)\n    end\n    delete this clone\nend\n\nwhen I receive [setup v]\nhide\nset [collected max v] to [0]\nset [collected v] to [0]\nset [x v] to [0]\nset [y v] to [0]\nif <(LEVEL) = [1]> then\n    switch costume to (dot v)\n    clone at x: [-150] y: [50]\n    clone at x: [390] y: [150]\n    clone at x: [381] y: [19]\n    clone at x: [870] y: [0]\n    clone at x: [958] y: [64]\nelse\n    if <(LEVEL) = [2]> then\n        switch costume to (dot v)\n        clone at x: [396] y: [72]\n        clone at x: [1012] y: [82]\n        clone at x: [1010] y: [217]\n        clone at x: [660] y: [349]\n        clone at x: [853] y: [418]\n    else\n        if <(LEVEL) = [3]> then\n            switch costume to (dot v)\n            clone at x: [252] y: [-35]\n            clone at x: [252] y: [44]\n            clone at x: [183] y: [104]\n            clone at x: [507] y: [-113]\n            clone at x: [608] y: [-49]\n        else\n            if <(LEVEL) = [4]> then\n                switch costume to (dot v)\n                clone at x: [344] y: [26]\n                clone at x: [478] y: [-86]\n                clone at x: [604] y: [-58]\n                clone at x: [674] y: [-53]\n                clone at x: [814] y: [91]\n            else\n                if <(LEVEL) = [5]> then\n                    switch costume to (dot v)\n                    clone at x: [72] y: [444]\n                    clone at x: [-203] y: [680]\n                    clone at x: [191] y: [541]\n                    clone at x: [284] y: [625]\n                    clone at x: [291] y: [258]\n                else\n                    if <(LEVEL) = [6]> then\n                        switch costume to (dot v)\n                        clone at x: [783] y: [146]\n                        clone at x: [1118] y: [267]\n                        clone at x: [1465] y: [342]\n                        clone at x: [1610] y: [375]\n                        clone at x: [1702] y: [267]\n                    else\n                        if <(LEVEL) = [7]> then\n                            switch costume to (dot v)\n                            clone at x: [538] y: [205]\n                            clone at x: [688] y: [32]\n                            clone at x: [810] y: [48]\n                            clone at x: [958] y: [35]\n                            clone at x: [1207] y: [-17]\n                        else\n                            if <(LEVEL) = [8]> then\n                                switch costume to (dot v)\n                                clone at x: [384] y: [21]\n                                clone at x: [479] y: [21]\n                                clone at x: [446] y: [207]\n                                clone at x: [336] y: [207]\n                                clone at x: [558] y: [348]\n                            else\n                                if <(LEVEL) = [9]> then\n                                    switch costume to (dot v)\n                                    clone at x: [393] y: [35]\n                                    clone at x: [393] y: [145]\n                                    clone at x: [393] y: [274]\n                                    clone at x: [393] y: [393]\n                                    clone at x: [292] y: [535]\n                                else\n                                    if <(LEVEL) = [10]> then\n                                        switch costume to (dot v)\n                                        clone at x: [123] y: [97]\n                                        clone at x: [453] y: [260]\n                                        clone at x: [275] y: [429]\n                                        clone at x: [91] y: [495]\n                                        clone at x: [-199] y: [164]\n                                    else\n                                        if <(LEVEL) = [11]> then\n                                            switch costume to (dot v)\n                                            clone at x: [99] y: [6]\n                                            clone at x: [436] y: [92]\n                                            clone at x: [503] y: [5]\n                                            clone at x: [566] y: [92]\n                                            clone at x: [957] y: [69]\n                                        end\n                                    end\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\nset [x v] to [-99999999]\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 [reset v]\ndelete this clone\n\ndefine clone at x: (x) y: (y)\nset [x v] to (x)\nset [y v] to (y)\nchange [collected max v] by (1)\ncreate clone of (_myself_ v)\nin game collected\n\ndefine in game collected\nset [in game collected v] to (join (COLLECTED) (join [ / ] (COLLECTED MAX)))\n\n@Exit\n\nwhen I receive [green flag v]\nhide\n\nwhen I receive [tick v]\nposition ((x) - (SCROLLX)) ((y) - (SCROLLY))\nif <<(costume [number v]) = [2]> and <touching (player v)?>> then\n    set [exit v] to [Win]\nend\n\nwhen I receive [setup v]\nhide\nset [collected v] to [0]\nset [x v] to [0]\nset [y v] to [0]\nif <(LEVEL) = [1]> then\n    switch costume to (closed v)\n    clone at x: [1113] y: [80]\nelse\n    if <(LEVEL) = [2]> then\n        switch costume to (closed v)\n        clone at x: [780] y: [462]\n    else\n        if <(LEVEL) = [3]> then\n            switch costume to (closed v)\n            clone at x: [752] y: [24]\n        else\n            if <(LEVEL) = [4]> then\n                switch costume to (closed v)\n                clone at x: [933] y: [166]\n            else\n                if <(LEVEL) = [5]> then\n                    switch costume to (closed v)\n                    clone at x: [531] y: [279]\n                else\n                    if <(LEVEL) = [6]> then\n                        switch costume to (closed v)\n                        clone at x: [1705] y: [50]\n                    else\n                        if <(LEVEL) = [7]> then\n                            switch costume to (closed v)\n                            clone at x: [1388] y: [-17]\n                        else\n                            if <(LEVEL) = [8]> then\n                                switch costume to (closed v)\n                                clone at x: [400] y: [415]\n                            else\n                                if <(LEVEL) = [9]> then\n                                    switch costume to (closed v)\n                                    clone at x: [124] y: [522]\n                                else\n                                    if <(LEVEL) = [10]> then\n                                        switch costume to (closed v)\n                                        clone at x: [-183] y: [-38]\n                                    else\n                                        if <(LEVEL) = [11]> then\n                                            switch costume to (closed v)\n                                            clone at x: [1113] y: [-70]\n                                        else\n                                            set [x v] to [99999999999]\n                                        end\n                                    end\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\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 [reset v]\ndelete this clone\n\ndefine clone at x: (x) y: (y)\nset [x v] to (x)\nset [y v] to (y)\n\nwhen I receive [open portal v]\nswitch costume to (open v)\n\n@Sprite1\n\nwhen flag clicked\nhide\n\n@bouncy\n\nwhen I receive [green flag v]\nhide\n\nwhen I receive [tick v]\nposition ((x) - (SCROLLX)) ((y) - (SCROLLY))\n\nwhen I receive [setup v]\nhide\nset [x v] to [0]\nset [y v] to [0]\nif <(LEVEL) = [1]> then\n    switch costume to (level 1 - 1 v)\n    clone at x: [400] y: [0]\n    clone at x: [460] y: [0]\nelse\n    if <(LEVEL) = [2]> then\n        switch costume to (level 2 - 1 v)\n        clone at x: [400] y: [0]\n        clone at x: [460] y: [0]\n    else\n        if <(LEVEL) = [3]> then\n            switch costume to (level 3 - 1 v)\n            clone at x: [300] y: [0]\n        else\n            if <(LEVEL) = [4]> then\n                switch costume to (level 4 - 1 v)\n                clone at x: [360] y: [0]\n                clone at x: [480] y: [0]\n                clone at x: [360] y: [0]\n            else\n                if <(LEVEL) = [5]> then\n                    switch costume to (level 5 - 1 v)\n                    clone at x: [0] y: [150]\n                    clone at x: [0] y: [170]\n                    clone at x: [0] y: [170]\n                    clone at x: [0] y: [0]\n                    clone at x: [170] y: [60]\n                    clone at x: [200] y: [-300]\n                else\n                    if <(LEVEL) = [6]> then\n                        switch costume to (level 6-1 v)\n                        clone at x: [340] y: [0]\n                        clone at x: [340] y: [100]\n                        clone at x: [340] y: [100]\n                        clone at x: [340] y: [100]\n                        clone at x: [340] y: [-100]\n                    else\n                        if <(LEVEL) = [7]> then\n                            switch costume to (level 7-1 v)\n                            clone at x: [400] y: [0]\n                            clone at x: [400] y: [50]\n                            clone at x: [400] y: [-50]\n                        else\n                            if <(LEVEL) = [8]> then\n                                switch costume to (level 8 - 1 v)\n                                clone at x: [400] y: [0]\n                                clone at x: [0] y: [185]\n                            else\n                                if <(LEVEL) = [9]> then\n                                    switch costume to (level 9 - 1 v)\n                                    clone at x: [400] y: [0]\n                                    clone at x: [0] y: [240]\n                                else\n                                    if <(LEVEL) = [10]> then\n                                        switch costume to (level 10 - 1 v)\n                                    end\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\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 [reset v]\ndelete this clone\n\ndefine clone at x: (x) y: (y)\ncreate clone of (_myself_ v)\nchange [x v] by (x)\nchange [y v] by (y)\nnext costume\n\n@mobile buttons\n\nwhen flag clicked\n\nset [mobile button v] to []\nhide\nswitch costume to (costume1 v)\ngo to x: (0) y: (0)\nset [clone id v] to [skip]\ncreate clone of (_myself_ v)\nwait (0.01) seconds\nswitch costume to (costume2 v)\nset [clone id v] to [back]\ncreate clone of (_myself_ v)\nwait (0.01) seconds\nswitch costume to (costume3 v)\nset [clone id v] to [reset]\ncreate clone of (_myself_ v)\n\nwhen I start as a clone\nshow\nif <(clone id) = [skip]> then\n    forever\n        if <touching (mouse-pointer v)?> then\n            set [brightness v] effect to (15)\n            if <mouse down?> then\n                set [mobile button v] to [skip]\n                wait until <not <mouse down?>>\n                set [mobile button v] to [0]\n            end\n        else\n            set [brightness v] effect to (0)\n        end\n        if <(LEVEL) = [1]> then\n            set [color v] effect to (0)\n        else\n            if <(LEVEL) = [2]> then\n                set [color v] effect to (70)\n            else\n                if <(LEVEL) = [3]> then\n                    set [color v] effect to (30)\n                else\n                    if <(LEVEL) = [4]> then\n                        set [color v] effect to (10)\n                    else\n                        if <(LEVEL) = [5]> then\n                            set [color v] effect to (15)\n                        else\n                            if <(LEVEL) = [6]> then\n                                set [color v] effect to (80)\n                            else\n                                if <(LEVEL) = [7]> then\n                                    set [color v] effect to (50)\n                                else\n                                    if <(LEVEL) = [8]> then\n                                        set [color v] effect to (9)\n                                    else\n                                        if <(LEVEL) = [10]> then\n                                            set [color v] effect to (30)\n                                        end\n                                    end\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\nif <(clone id) = [back]> then\n    forever\n        if <touching (mouse-pointer v)?> then\n            set [brightness v] effect to (15)\n            if <mouse down?> then\n                set [mobile button v] to [back]\n                wait until <not <mouse down?>>\n                set [mobile button v] to [0]\n            end\n        else\n            set [brightness v] effect to (0)\n        end\n        if <(LEVEL) = [1]> then\n            set [color v] effect to (0)\n        else\n            if <(LEVEL) = [2]> then\n                set [color v] effect to (70)\n            else\n                if <(LEVEL) = [3]> then\n                    set [color v] effect to (30)\n                else\n                    if <(LEVEL) = [4]> then\n                        set [color v] effect to (10)\n                    else\n                        if <(LEVEL) = [5]> then\n                            set [color v] effect to (15)\n                        else\n                            if <(LEVEL) = [6]> then\n                                set [color v] effect to (80)\n                            else\n                                if <(LEVEL) = [7]> then\n                                    set [color v] effect to (50)\n                                else\n                                    if <(LEVEL) = [8]> then\n                                        set [color v] effect to (9)\n                                    else\n                                        if <(LEVEL) = [10]> then\n                                            set [color v] effect to (30)\n                                        end\n                                    end\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\nif <(clone id) = [reset]> then\n    forever\n        if <touching (mouse-pointer v)?> then\n            set [brightness v] effect to (15)\n            if <mouse down?> then\n                set [mobile button v] to [reset]\n                wait until <not <mouse down?>>\n                set [mobile button v] to [0]\n            end\n        else\n            set [brightness v] effect to (0)\n        end\n        if <(LEVEL) = [1]> then\n            set [color v] effect to (0)\n        else\n            if <(LEVEL) = [2]> then\n                set [color v] effect to (70)\n            else\n                if <(LEVEL) = [3]> then\n                    set [color v] effect to (30)\n                else\n                    if <(LEVEL) = [4]> then\n                        set [color v] effect to (10)\n                    else\n                        if <(LEVEL) = [5]> then\n                            set [color v] effect to (15)\n                        else\n                            if <(LEVEL) = [6]> then\n                                set [color v] effect to (80)\n                            else\n                                if <(LEVEL) = [7]> then\n                                    set [color v] effect to (50)\n                                else\n                                    if <(LEVEL) = [8]> then\n                                        set [color v] effect to (9)\n                                    else\n                                        if <(LEVEL) = [10]> then\n                                            set [color v] effect to (30)\n                                        end\n                                    end\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\n\nif <not <(LEVEL) = [9]>> then\n    set [brightness v] effect to (0)\nend\n\nif  then\nend\nset [brightness v] effect to (0)\n\nset [brightness v] effect to (30)\nif <(LEVEL) = [9]> then\nelse\nend\n\n