Realms - A platformer MOBILE FRIENDLY

Instructions: OK STOP ASKING FOR SKIPS I WON'T ADD THEM BECAUSE I WANT YOU TO USE SKILL.\nTHIS IS MY FINAL REALMS.\n\nP for shop\nv to change volume\nT to check your time for speedrunning\narrows or wasd or mobile to move\nS to save\nL to load\nyes, it saves.\ncan you find how to get skins?\n(to use skins press numbers 0 to 9)\nhint: skins by levels deaths levels in a row.\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n>:( AHH! YOU FOUND ME!

@Stage\n\nwhen flag clicked\nhide variable [time v]\nforever\n    if <(level) < [31]> then\n        switch backdrop to (mainland v)\n    else\n        if <(level) < [61]> then\n            switch backdrop to (cave v)\n        else\n            if <(level) < [91]> then\n                switch backdrop to (desert v)\n            else\n                if <(level) < [121]> then\n                    switch backdrop to (ocean v)\n                else\n                    switch backdrop to (jungle v)\n                end\n            end\n        end\n    end\nend\n\nwhen [v v] key pressed\nask [volume?] and wait\nset volume to (answer) %\n\nwhen [m v] key pressed\nstop all sounds\n\nwhen I receive [finish intro v]\nset volume to (67) %\nforever\n    if <(level) < [31]> then\n        stop all sounds\n        play sound [bensound-anewbeginning \(1\) v] until done\n    else\n        if <(level) < [61]> then\n            stop all sounds\n            play sound [Secret Loop 01 v] until done\n        else\n            if <(level) < [91]> then\n                stop all sounds\n                play sound [The Desert v] until done\n            else\n                if <(level) < [121]> then\n                    stop all sounds\n                    play sound [seven seas v] until done\n                else\n                    if <(level) < [151]> then\n                        stop all sounds\n                        play sound [Elucidate - PaulRHJT v] until done\n                    else\n                        stop all sounds\n                        show variable [time v]\n                        play sound [Fingerbang v] until done\n                    end\n                end\n            end\n        end\n    end\nend\n\nchange [level v] by (1)\n\nwhen I receive [finish intro v]\nforever\n    if <key (t v) pressed?> then\n        show variable [time v]\n    else\n        if <(level) < [151]> then\n            hide variable [time v]\n        end\n    end\nend\n\nset [level v] to [130]\n\nwhen I receive [finish intro v]\nset [time v] to [0]\nforever\n    if <(level) < [151]> then\n        wait (1) seconds\n        change [time v] by (1)\n    end\nend\n\n@intro\n\nwhen I start as a clone\nshow\nif <(clone id) = [blur1]> then\n    switch costume to (supercatl v)\n    set [ghost v] effect to (75)\n    set size to (50) %\n    go to x: (160) y: (180)\n    point in direction (-135)\n    glide (0.15) secs to x: (0) y: (0)\n    glide (0.15) secs to x: (-240) y: (-140)\nelse\n    if <(clone id) = [blur2]> then\n        switch costume to (pfp v)\n        set [ghost v] effect to (50)\n        set size to (50) %\n        go to x: (-160) y: (180)\n        point in direction (135)\n        glide (0.15) secs to x: (0) y: (0)\n        glide (0.15) secs to x: (240) y: (-140)\n    else\n        if <(clone id) = [blur3]> then\n            switch costume to (supercat1 v)\n            set [ghost v] effect to (25)\n            set size to (75) %\n            go to x: (0) y: (180)\n            point in direction (90)\n            repeat (3)\n                glide (0.15) secs to x: (0) y: ((((y position) - (50)) / (2)) + (50))\n            end\n            glide (0.15) secs to x: (0) y: (50)\n            wait until <(timer) < [0.1]>\n        else\n            if <(clone id) = [particles]> then\n                go to x: (0) y: (-50)\n                point in direction (pick random (1) to (359))\n                set [vel v] to [20]\n                clear graphic effects\n                set size to (pick random (50) to (150)) %\n                switch costume to (join [particle] (pick random (1) to (3)))\n                repeat (50)\n                    move (vel) steps\n                    set [vel v] to ((vel) * (0.9))\n                    change [ghost v] effect by (2)\n                    turn right ((2) * ((direction) / ([abs v] of (direction) ))) degrees\n                end\n            else\n                if <(clone id) = [name]> then\n                    go to x: (0) y: (-50)\n                    point in direction (45)\n                    clear graphic effects\n                    set [ghost v] effect to (100)\n                    set size to (15) %\n                    switch costume to (supercat v)\n                    repeat (10)\n                        turn right (5) degrees\n                        change size by (15)\n                        change [ghost v] effect by (-10)\n                    end\n                    repeat (10)\n                        turn right (-0.5) degrees\n                        change size by (-5)\n                    end\n                    wait until <[0.1] > (timer)>\n                    set [vel v] to [10]\n                    repeat (20)\n                        change [ghost v] effect by (5)\n                        change x by (vel)\n                        set [vel v] to ((vel) * (0.9))\n                    end\n                else\n                    if <(clone id) = [back]> then\n                        go to x: (0) y: (0)\n                        point in direction (-45)\n                        clear graphic effects\n                        go to [back v] layer\n                        set [ghost v] effect to (100)\n                        set size to (100) %\n                        switch costume to (back v)\n                        repeat (10)\n                            turn right (-5) degrees\n                            change [ghost v] effect by (-5)\n                        end\n                        repeat (10)\n                            turn right (0.5) degrees\n                        end\n                        wait until <[0.1] > (timer)>\n                        set [vel v] to [10]\n                        repeat (20)\n                            change [ghost v] effect by (5)\n                            change x by (vel)\n                            set [vel v] to ((vel) * (0.9))\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\ndelete this clone\n\nwhen flag clicked\nclear graphic effects\nhide\nset [clone id v] to [blur1]\nset volume to (25) %\nstart sound [good woosh v]\nrepeat (3)\n    create clone of (_myself_ v)\nend\nwait (1) seconds\nset [clone id v] to [blur2]\nset volume to (50) %\nstart sound [good woosh v]\nrepeat (3)\n    create clone of (_myself_ v)\nend\nwait (1) seconds\nset [clone id v] to [blur3]\nset volume to (100) %\nstart sound [good woosh v]\nrepeat (3)\n    create clone of (_myself_ v)\nend\nwait (1) seconds\ngo to x: (0) y: (50)\nshow\nswitch costume to (supercat1 v)\nset size to (75) %\nreset timer\nsupercat [1]\nsupercat [2]\nsupercat [3]\nsupercat [4]\nstart sound [music v]\ncreate name & particles\nrepeat (4)\n    supercat [1]\n    supercat [2]\n    supercat [3]\n    supercat [4]\nend\nreset timer\nset [vel v] to [10]\nrepeat (20)\n    change [ghost v] effect by (5)\n    change x by (vel)\n    set [vel v] to ((vel) * (0.9))\nend\nbroadcast (finish intro v)\n\ndefine supercat (#)\nswitch costume to (join [supercat] (#))\nwait (0.15) seconds\n\ndefine create name & particles\nset [clone id v] to [particles]\nrepeat (20)\n    create clone of (_myself_ v)\nend\nset [clone id v] to [name]\ncreate clone of (_myself_ v)\nset [clone id v] to [back]\ncreate clone of (_myself_ v)\n\n@platformer extras\n\nwhen flag clicked\nswitch costume to (level 1 v)\ngo to x: (0) y: (0)\nforever\n    show\n    switch costume to (level)\n    go to [back v] layer\nend\n\nstop all sounds\nset [level v] to [109]\n\nset [level v] to [135]\n\n@platformer level\n\nwhen flag clicked\nhide\n\nchange [level v] by (1)\n\nwhen I receive [finish intro v]\nswitch costume to (level 1 v)\nrepeat (10)\n    go to [back v] layer\nend\nforever\n    show\n    switch costume to (level)\n    go to x: (0) y: (0)\nend\n\nset [level v] to [119]\n\n@Player\n\nwhen flag clicked\nhide\nset [deaths v] to [0]\nset [level v] to [0001]\nset [wins in a row v] to [0]\nset [highest wins in a row v] to [0]\nswitch costume to (happy v)\nset size to (40) %\ngo to x: (-223) y: (-35)\ngo [backward v] (1) layers\n\nwhen I receive [next level v]\ngo to x: (-223) y: (-35)\nset size to (40) %\n\ndefine platformer\nif <<<key (right arrow v) pressed?> or <key (d v) pressed?>> or <<mouse down?> and <(mouse x) > (x position)>>> then\n    if <not <touching color (#ffa700)?>> then\n        change [xv v] by (0.75)\n    else\n        change [xv v] by (0.3)\n    end\nend\nif <<<key (left arrow v) pressed?> or <key (a v) pressed?>> or <<mouse down?> and <(mouse x) < (x position)>>> then\n    if <not <touching color (#ffa700)?>> then\n        change [xv v] by (-0.75)\n    else\n        change [xv v] by (-0.3)\n    end\nend\nset [xv v] to ((xV) * (0.9))\nchange x by (xV)\nif <touching (platformer level v)?> then\n    change y by (1)\n    if <touching (platformer level v)?> then\n        change y by (1)\n        if <touching (platformer level v)?> then\n            change y by (1)\n            if <touching (platformer level v)?> then\n                change y by (1)\n                if <touching (platformer level v)?> then\n                    change y by (1)\n                    if <touching (platformer level v)?> then\n                        change x by ((xV) * (-1))\n                        change y by (-5)\n                        if <<<key (up arrow v) pressed?> or <key (w v) pressed?>> or <<mouse down?> and <(mouse y) > (y position)>>> then\n                            if <(xV) > [0]> then\n                                if <not <touching color (#ffa700)?>> then\n                                    set [xv v] to [-5]\n                                else\n                                    set [xv v] to [-3]\n                                end\n                            else\n                                if <not <touching color (#ffa700)?>> then\n                                    set [xv v] to [5]\n                                else\n                                    set [xv v] to [3]\n                                end\n                            end\n                            if <not <touching color (#ffa700)?>> then\n                                set [yv v] to [13]\n                            else\n                                set [yv v] to [7]\n                            end\n                        else\n                            set [xv v] to [0]\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\nchange [yv v] by (-1)\nif <touching color (#f300ff)?> then\n    set [yv v] to [21]\nend\nif <<touching color (#1c00ff)?> or <touching color (#3fb90b)?>> then\n    if <touching color (#1c00ff)?> then\n        set [yv v] to [-4]\n        if <<<key (s v) pressed?> or <key (down arrow v) pressed?>> or <<mouse down?> and <(mouse y) < (y position)>>> then\n            if <not <touching color (#ffa700)?>> then\n                set [yv v] to [-4]\n            else\n                set [yv v] to [-2]\n            end\n        end\n        if <<<key (w v) pressed?> or <key (up arrow v) pressed?>> or <<mouse down?> and <(mouse y) > (y position)>>> then\n            if <not <touching color (#ffa700)?>> then\n                set [yv v] to [6]\n            else\n                set [yv v] to [3]\n            end\n        end\n    else\n        if <touching color (#3fb90b)?> then\n            set [yv v] to [1]\n            if <<<key (s v) pressed?> or <key (down arrow v) pressed?>> or <<mouse down?> and <(mouse y) < (y position)>>> then\n                if <not <touching color (#ffa700)?>> then\n                    set [yv v] to [-4]\n                else\n                    set [yv v] to [-2]\n                end\n            end\n            if <<<key (w v) pressed?> or <key (up arrow v) pressed?>> or <<mouse down?> and <(mouse y) > (y position)>>> then\n                if <not <touching color (#ffa700)?>> then\n                    set [yv v] to [6]\n                else\n                    set [yv v] to [3]\n                end\n            end\n        end\n    end\nend\nchange y by (yV)\nif <touching (platformer level v)?> then\n    change y by ((yV) * (-1))\n    set [yv v] to [0]\nend\nchange y by (-1)\nif <touching (platformer level v)?> then\n    if <<<key (up arrow v) pressed?> or <key (w v) pressed?>> or <<mouse down?> and <(mouse y) > (y position)>>> then\n        set [yv v] to [15]\n    end\n    change y by (1)\n    if <(y position) < [-174]> then\n        repeat (4)\n            change size by (-10)\n        end\n        broadcast (die v)\n        go to x: (-223) y: (-35)\n        set size to (40) %\n        set [xv v] to [0]\n        change [deaths v] by (1)\n        set [wins in a row v] to [0]\n        wait (0.1) seconds\n    end\nend\nif <touching color (#ff0000)?> then\n    broadcast (die v)\n    repeat (4)\n        change size by (-10)\n    end\n    go to x: (-223) y: (-35)\n    set size to (40) %\n    set [xv v] to [0]\n    change [deaths v] by (1)\n    set [wins in a row v] to [0]\n    wait (0.1) seconds\nend\nif <touching color (#bd00ff)?> then\n    set y to (300)\nend\nif <(y position) < [-174]> then\n    repeat (4)\n        change size by (-10)\n    end\n    go to x: (-223) y: (-35)\n    set size to (40) %\n    set [xv v] to [0]\n    change [deaths v] by (1)\n    set [wins in a row v] to [0]\nend\nif <touching color (#fffd00)?> then\n    set size to (20) %\nend\nif <touching color (#02ff00)?> then\n    set size to (75) %\nend\nif <(x position) > [237]> then\n    go to x: (-223) y: (-35)\n    set [xv v] to [0]\n    broadcast (next level v)\n    change [level v] by (1)\n    change [wins in a row v] by (1)\n    if <(length of (level)) = [1]> then\n        set [level v] to (join [000] (level))\n    else\n        if <(length of (level)) = [2]> then\n            set [level v] to (join [00] (level))\n        else\n            if <(length of (level)) = [3]> then\n                set [level v] to (join [0] (level))\n            else\n                set [level v] to (level)\n            end\n        end\n    end\nend\n\nif <touching (move v)?> then\n    set [yv v] to [0]\n    set [xv v] to [18]\nend\n\nwhen [r v] key pressed\ngo to x: (-223) y: (-35)\nset size to (40) %\n\nwhen I receive [start v]\nshow\nforever\n    if <(doing realm?) = [no]> then\n        go to [front v] layer\n        platformer\n    else\n        go to [back v] layer\n    end\nend\n\nwhen I receive [reset v]\ngo to x: (-223) y: (-35)\nset size to (40) %\n\nwhen flag clicked\nforever\n    if <(wins in a row) > (highest wins in a row)> then\n        set [highest wins in a row v] to (wins in a row)\n    end\nend\n\nset [yv v] to [1]\n\nwhen flag clicked\nforever\n    switch costume to (skin)\nend\n\ngo to x: (px) y: (py)\n\n@REALMS\n\nwhen flag clicked\nhide\ngo to [back v] layer\n\nwhen flag clicked\nshow list [save code: v]\ndelete all of [save code: v]\n\ndefine new REALM (realm)\nstop all sounds\nswitch costume to ((realm) + (2))\nwait (2) seconds\nrepeat (50)\n    change [ghost v] effect by (2)\nend\nswitch costume to (none v)\nclear graphic effects\n\nwhen I receive [next level v]\nif <(level) = [0001]> then\n    set [doing realm? v] to [yes]\n    new REALM [1]\n    set [doing realm? v] to [no]\nend\nif <(level) = [0031]> then\n    set [doing realm? v] to [yes]\n    new REALM [2]\n    set [doing realm? v] to [no]\nend\nif <(level) = [0061]> then\n    set [doing realm? v] to [yes]\n    new REALM [3]\n    set [doing realm? v] to [no]\nend\nif <(level) = [0091]> then\n    set [doing realm? v] to [yes]\n    new REALM [4]\n    set [doing realm? v] to [no]\nend\nif <(level) = [0121]> then\n    set [doing realm? v] to [yes]\n    new REALM [5]\n    set [doing realm? v] to [no]\nend\nif <(level) = [0151]> then\n    set [doing realm? v] to [yes]\n    new REALM [6]\n    set [doing realm? v] to [no]\nend\n\nwhen [s v] key pressed\ndelete all of [save code: v]\nadd [copy all below] to [save code: v]\nadd (join (letter (1) of (level)) (join (letter (2) of (level)) (join (letter (3) of (level)) (join (letter (4) of (level)) [3765278519784265781247531275645923891237581835732785961732675836120785623708659728356])))) to [save code: v]\nadd [press space to exit] to [save code: v]\nhide list [save code: v]\nwait until <key (space v) pressed?>\nshow list [save code: v]\n\nwhen [l v] key pressed\nask [input your code] and wait\nif < (answer) contains [3765278519784265781247531275645923891237581835732785961732675836120785623708659728356]?> then\n    set [level v] to (join (letter (1) of (answer)) (join (letter (2) of (answer)) (join (letter (3) of (answer)) (letter (4) of (answer)))))\n    broadcast (reset v)\n    stop all sounds\nelse\n    say [sorry, couldn't find a code that matches] for (2) seconds\nend\n\nrepeat (letter (1) of (answer))\n    if <[] = [0]> then\n        set [level v] to (letter ((letter (1) of (answer)) + ((1) + ())) of (answer))\n    else\n        set [level v] to (join (level) (letter ((letter (1) of (answer)) + ((1) + ())) of (answer)))\n    end\nend\n\ndefine entrance (1)\nswitch costume to ((1) + (2))\nwait (2) seconds\nrepeat (50)\n    change [ghost v] effect by (2)\nend\nswitch costume to (none v)\nclear graphic effects\n\nset [level v] to [100]\n\nwhen I receive [finish intro v]\nset [doing realm? v] to [no]\nset size to (100) %\nclear graphic effects\ngo to x: (0) y: (0)\nforever\n    show\n    go to [front v] layer\nend\n\nwhen I receive [finish intro v]\nswitch costume to (introduce v)\nwait (2) seconds\nrepeat (5)\n    change size by (-5)\nend\nrepeat (5)\n    change size by (5)\nend\nentrance [1]\nbroadcast (start v)\n\n@costumes\n\nwhen flag clicked\nforever\n    hide\nend\n\n@Thumb\n\nwhen flag clicked\nhide\ngo to [front v] layer\nclear graphic effects\nforever\n    reset timer\nend\n\nshow\ngo to [front v] layer\n\nset [level v] to [87]\nset [level v] to [119]\n\nwhen flag clicked\nforever\n    if <(timer) > [0]> then\n        show\n        go to [front v] layer\n    end\nend\n\n@Sprite1\n\nwhen flag clicked\nshow\nforever\n    go to x: (0) y: (0)\n    go to [back v] layer\nend\n\nwhen I receive [finish intro v]\nhide\n\n@color touch\n\nwhen flag clicked\nforever\n    hide\nend\n\n@Sprite2\n\nwhen flag clicked\nset [shop v] to [0]\nhide\ngo to [back v] layer\nforever\n    if <(shop) = [1]> then\n        show\n    else\n        hide\n    end\nend\n\nwhen [p v] key pressed\nif <(shop) = [1]> then\n    set [shop v] to [0]\nelse\n    set [shop v] to [1]\nend\n\n@skims\n\nwhen flag clicked\nhide\nset [skin v] to [1]\nswitch costume to (happy v)\ngo to x: (-24) y: (34)\nset size to (100) %\nforever\n    switch costume to (skin)\n    if <(shop) = [1]> then\n        show\n        go to [front v] layer\n    else\n        hide\n    end\nend\n\nif <touching (move v)?> then\n    set [yv v] to [0]\n    set [xv v] to [18]\nend\n\nforever\n    if <touching color (#3fbe13)?> then\n        say [Hello!] for (2) seconds\n    end\nend\n\nset [yv v] to [1]\n\n@arrows\n\nwhen flag clicked\nhide\nset size to (100) %\nset [skin v] to [1]\ngo to x: (150) y: (39)\nswitch costume to (positive v)\ncreate clone of (_myself_ v)\ngo to x: (-155) y: (37)\nswitch costume to (negative v)\ncreate clone of (_myself_ v)\n\nif <touching (move v)?> then\n    set [yv v] to [0]\n    set [xv v] to [18]\nend\n\nforever\n    if <touching color (#3fbe13)?> then\n        say [Hello!] for (2) seconds\n    end\nend\n\nset [yv v] to [1]\n\nwhen I start as a clone\nforever\n    go to [front v] layer\n    if <(shop) = [1]> then\n        show\n        go to [front v] layer\n    else\n        hide\n    end\nend\n\nwhen I start as a clone\nforever\n    if <<touching (mouse-pointer v)?> and <mouse down?>> then\n        if <(costume [number v]) = [1]> then\n            change [skin v] by (1)\n        else\n            change [skin v] by (-1)\n        end\n        wait until <not <mouse down?>>\n    end\nend\n\n@deaths\n\nwhen flag clicked\nhide\nset [skin v] to [1]\nswitch costume to (happy v)\ngo to x: (-24) y: (-43)\nset size to (100) %\nforever\n    switch costume to (effectdie)\n    if <(shop) = [1]> then\n        show\n        go to [front v] layer\n    else\n        hide\n    end\nend\n\nif <touching (move v)?> then\n    set [yv v] to [0]\n    set [xv v] to [18]\nend\n\nforever\n    if <touching color (#3fbe13)?> then\n        say [Hello!] for (2) seconds\n    end\nend\n\nset [yv v] to [1]\n\n@death\n\nwhen flag clicked\nhide\nset [effectdie v] to [1]\nforever\n    switch costume to (effectdie)\nend\n\nif <touching (move v)?> then\n    set [yv v] to [0]\n    set [xv v] to [18]\nend\n\nforever\n    if <touching color (#3fbe13)?> then\n        say [Hello!] for (2) seconds\n    end\nend\n\nset [yv v] to [1]\n\nwhen I receive [die v]\nhide\nset size to (100) %\nif <(costume [number v]) = [1]> then\n    hide\nelse\n    if <(costume [number v]) = [2]> then\n        make\n        repeat (20)\n            create clone of (_myself_ v)\n        end\n    else\n        if <(costume [number v]) = [3]> then\n            make\n            repeat (8)\n                create clone of (_myself_ v)\n            end\n        else\n            if <(costume [number v]) = [4]> then\n                set size to (100) %\n                go to (player v)\n                show\n                repeat (13)\n                    change size by (10)\n                end\n                hide\n            else\n                if <(costume [number v]) = [5]> then\n                    go to x: ([x position v] of [player v]) y: (3343434)\n                    show\n                    repeat (13)\n                        change y by (-25)\n                    end\n                    hide\n                else\n                    if <(costume [number v]) = [6]> then\n                        make\n                        repeat (3)\n                            create clone of (_myself_ v)\n                        end\n                    else\n                        if <(costume [number v]) = [7]> then\n                            make\n                            repeat (3)\n                                create clone of (_myself_ v)\n                            end\n                        else\n                            if <(costume [number v]) = [8]> then\n                                make\n                                set size to (50) %\n                                create clone of (_myself_ v)\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\n\nwhen I start as a clone\ngo to x: (px) y: (py)\ngo to [front v] layer\npoint in direction (pick random (180) to (-180))\nshow\nrepeat (pick random (1) to (20))\n    move (2) steps\nend\nrepeat (5)\n    change [ghost v] effect by (20)\nend\ndelete this clone\n\ndefine make\nset [px v] to ([x position v] of [player v])\nset [py v] to ([y position v] of [player v])\n\n@arrows2\n\nwhen flag clicked\nhide\nset size to (100) %\nset [skin v] to [1]\ngo to x: (150) y: (-36)\nswitch costume to (positive v)\ncreate clone of (_myself_ v)\ngo to x: (-155) y: (-36)\nswitch costume to (negative v)\ncreate clone of (_myself_ v)\n\nif <touching (move v)?> then\n    set [yv v] to [0]\n    set [xv v] to [18]\nend\n\nforever\n    if <touching color (#3fbe13)?> then\n        say [Hello!] for (2) seconds\n    end\nend\n\nset [yv v] to [1]\n\nwhen I start as a clone\nforever\n    go to [front v] layer\n    if <(shop) = [1]> then\n        show\n        go to [front v] layer\n    else\n        hide\n    end\nend\n\nwhen I start as a clone\nforever\n    if <<touching (mouse-pointer v)?> and <mouse down?>> then\n        if <(costume [number v]) = [1]> then\n            change [effectdie v] by (1)\n        else\n            change [effectdie v] by (-1)\n        end\n        wait until <not <mouse down?>>\n    end\nend\n\n@trails\n\nwhen flag clicked\nhide\nset [trail v] to [1]\nswitch costume to (happy v)\ngo to x: (-24) y: (-120)\nset size to (100) %\nforever\n    switch costume to (trail)\n    if <(shop) = [1]> then\n        show\n        go to [front v] layer\n    else\n        hide\n    end\nend\n\nif <touching (move v)?> then\n    set [yv v] to [0]\n    set [xv v] to [18]\nend\n\nforever\n    if <touching color (#3fbe13)?> then\n        say [Hello!] for (2) seconds\n    end\nend\n\nset [yv v] to [1]\n\nwhen flag clicked\nhide\nset [trail v] to [1]\nswitch costume to (happy v)\ngo to x: (-24) y: (-120)\nset size to (100) %\nforever\n    if <<(costume [number v]) = [7]> or <(trail) = [-7]>> then\n        change [color v] effect by (2)\n    else\n        clear graphic effects\n    end\nend\n\n@arrows3\n\nwhen flag clicked\nhide\nset size to (100) %\nset [skin v] to [1]\ngo to x: (150) y: (-120)\nswitch costume to (positive v)\ncreate clone of (_myself_ v)\ngo to x: (-155) y: (-120)\nswitch costume to (negative v)\ncreate clone of (_myself_ v)\n\nif <touching (move v)?> then\n    set [yv v] to [0]\n    set [xv v] to [18]\nend\n\nforever\n    if <touching color (#3fbe13)?> then\n        say [Hello!] for (2) seconds\n    end\nend\n\nset [yv v] to [1]\n\nwhen I start as a clone\nforever\n    go to [front v] layer\n    if <(shop) = [1]> then\n        show\n        go to [front v] layer\n    else\n        hide\n    end\nend\n\nwhen I start as a clone\nforever\n    if <<touching (mouse-pointer v)?> and <mouse down?>> then\n        if <(costume [number v]) = [1]> then\n            change [trail v] by (1)\n        else\n            change [trail v] by (-1)\n        end\n        wait until <not <mouse down?>>\n    end\nend\n\n@trail\n\nwhen flag clicked\nclear graphic effects\nhide\nset [trail v] to [1]\ngo to x: (-24) y: (-120)\nset size to (100) %\nforever\n    switch costume to (trail)\n    create clone of (_myself_ v)\nend\n\nif <touching (move v)?> then\n    set [yv v] to [0]\n    set [xv v] to [18]\nend\n\nforever\n    if <touching color (#3fbe13)?> then\n        say [Hello!] for (2) seconds\n    end\nend\n\nset [yv v] to [1]\n\nwhen flag clicked\nhide\nset [trail v] to [1]\nswitch costume to (happy v)\ngo to x: (-24) y: (-120)\nset size to (100) %\nforever\n    if <<(costume [number v]) = [7]> or <(trail) = [-7]>> then\n        change [color v] effect by (5)\n    else\n        set [color v] effect to (0)\n    end\nend\n\nwhen I start as a clone\nset [brightness v] effect to (-3)\ngo to (player v)\nif <(costume [number v]) = [11]> then\n    set [color v] effect to (pick random (-200) to (200))\nend\ngo to [back v] layer\nshow\nwait (0.5) seconds\nrepeat (20)\n    change [ghost v] effect by (5)\nend\ndelete this clone\n\nwhen I start as a clone\ngo to (player v)\nforever\n    show\nend\n\n