☁ Rickroll platformer ☁ (ft. Will_Wam)

Instructions: > Move - Arrows / WASD\n> Fast Fall - Down / S\n> Double Jump - Up key\n> Space - Throw explosives to destroy walls\n\njoin the #belugang clan by following this studio! https://scratch.mit.edu/studios/30985794/\n\nWASSUP #BELUGANG!!! this is a remix of will_wam's armenia rush!\nmost credit goes to @will_wam..!\nrickroll designs: @Belugaonline\n> Move - Arrows / WAD\n> Fast Fall - Down / S\n> Double Jump - Up / W\n> Space - Throw an exploding pomegranate!\n\nHow far can you get? :)\nMy personal best is 234 lol

@Stage\n\nwhen flag clicked\nbroadcast (Main Menu v)\n\nwhen I receive [fade into play v]\nset volume to (100) %\nrepeat (25)\n    change volume by (-4)\nend\nset volume to (0) %\n\nwhen flag clicked\nset [music v] to [1]\nbroadcast (Update Music v)\n\nwhen I receive [begin game! v]\nset volume to (0) %\nrepeat (25)\n    change volume by (4)\nend\nset volume to (100) %\n\nwhen I receive [update music v]\nstop all sounds\nset volume to (100) %\nforever\n    play sound (Music) until done\nend\n\nshow variable [distance v]\n\nwhen I receive [main menu v]\n\nhide variable [distance v]\n\nwhen flag clicked\nforever\n    wait (0.00000000000005) seconds\n    next backdrop\nend\n\n@Du\n\nset size to (100) %\nswitch costume to (armen run 1 v)\nchange y by (5)\n\nwhen I receive [begin game! v]\nclear graphic effects\nset [xv v] to [0]\nset [yv v] to [0]\nset [jump status v] to [1]\ngo to x: (-240) y: (-45)\nshow\nforever\n    switch costume to (hitbox v)\n    change [xv v] by (((x position) + (120)) * (-0.02))\n    set [xv v] to ((Xv) * (0.7))\n    if <<key (right arrow v) pressed?> or <key (d v) pressed?>> then\n        change [xv v] by (2)\n    end\n    if <<key (left arrow v) pressed?> or <key (a v) pressed?>> then\n        change [xv v] by (-1)\n    end\n    if <(Xv) < [-5]> then\n        set [xv v] to [-5]\n    end\n    change x by (Xv)\n    if <touching (getin v)?> then\n        change y by (1)\n        if <touching (getin v)?> then\n            change y by (1)\n            if <touching (getin v)?> then\n                change y by (1)\n                if <touching (getin v)?> then\n                    change y by (1)\n                    if <touching (getin v)?> then\n                        change y by (-4)\n                        change x by ((Xv) * (-1))\n                        Smooth X Collision\n                        set [xv v] to [-5]\n                        change x by (-5)\n                    end\n                end\n            end\n        end\n    end\n    if <<(Jump Status) = [2]> and <not <<key (w v) pressed?> or <key (up arrow v) pressed?>>>> then\n        change [jump status v] by (1)\n    end\n    change [yv v] by (-1.2)\n    if <<key (w v) pressed?> or <key (up arrow v) pressed?>> then\n        change [yv v] by (0)\n    end\n    change y by (Yv)\n    if <touching (getin v)?> then\n        change y by ((Yv) * (-1))\n        Smooth Y Collision\n        set [yv v] to [0]\n    end\n    change y by (-5)\n    if <touching (getin v)?> then\n        set [grounded? v] to [1]\n        if <(Jump Status) = [1]> then\n            if <<key (w v) pressed?> or <key (up arrow v) pressed?>> then\n                set [yv v] to [16]\n                set [jump status v] to [2]\n                start sound [Jump v]\n            end\n        else\n            if <not <<key (w v) pressed?> or <key (up arrow v) pressed?>>> then\n                set [jump status v] to [1]\n            end\n        end\n    else\n        set [grounded? v] to [0]\n        if <<key (down arrow v) pressed?> or <key (s v) pressed?>> then\n            set [yv v] to [-15]\n        else\n            if <(Jump Status) = [3]> then\n                if <<key (w v) pressed?> or <key (up arrow v) pressed?>> then\n                    set [yv v] to [10]\n                    set [jump status v] to [0]\n                    broadcast (Double Jump v)\n                    start sound [Jump2 v]\n                end\n            else\n                if <(Jump Status) = [1]> then\n                    set [jump status v] to [2]\n                end\n            end\n        end\n    end\n    change y by (5)\n    Costume\n    if <<(x position) < [-240]> or <(y position) < [-180]>> then\n        hide\n        stop [other scripts in sprite v]\n        wait (1) seconds\n        broadcast (Lose v)\n        stop [this script v]\n    end\nend\n\ndefine Smooth X Collision\n\ndefine Smooth Y Collision\nrepeat (10)\n    if <not <touching (getin v)?>> then\n        change y by ((Yv) * (0.1))\n    end\nend\nchange y by ((Yv) * (-0.1))\n\nif <((Xv) - (5)) > [0]> then\n    change x by (10)\n    repeat (10)\n        if <not <touching (getin v)?>> then\n            change x by (-1)\n        end\n    end\nelse\n    change x by (-10)\n    repeat (10)\n        if <not <touching (getin v)?>> then\n            change x by (1)\n        end\n    end\nend\n\nwhen I receive [main menu v]\nstop [other scripts in sprite v]\nhide\n\ndefine Costume\nchange [costume v] by ((0.5) + ((Xv) * (0.03)))\nif <(Costume) > [10]> then\n    set [costume v] to [3]\nend\nif <(Grounded?) = [1]> then\n    if <(Xv) < [-4.5]> then\n        switch costume to (armen v)\n    else\n        switch costume to (Costume)\n    end\nelse\n    if <(Yv) < [0]> then\n        switch costume to (armen jump down v)\n    else\n        switch costume to (armen jump up v)\n    end\nend\n\nwhen I receive [khpel v]\nchange [xv v] by (-8)\nset [yv v] to [5]\nset [brightness v] effect to (50)\nwait (0.1) seconds\nset [brightness v] effect to (0)\n\nstart sound [Jump v]\n\nforever\n    switch costume to (armen run 1 v)\n    repeat (7)\n        next costume\n        wait (0.1) seconds\n    end\nend\n\n@Getin\n\nwhen I start as a clone\nshow\nset [indiv. x pos v] to (x position)\nrepeat until <(x position) < [-240]>\n    switch costume to (costume1 v)\n    change [indiv. x pos v] by ((Speed) * (-1))\n    set x to (Indiv. X Pos)\n    switch costume to (Indiv. Costume)\n    if <touching (nurr v)?> then\n        repeat (5)\n            change [ghost v] effect by (20)\n            change [brightness v] effect by (0)\n            change size by (-10)\n        end\n        delete this clone\n    end\nend\ndelete this clone\n\ndefine Make Clones\nset y to (Y Pos)\nswitch costume to (costume1 v)\nset [indiv. costume v] to [2]\ncreate clone of (_myself_ v)\nrepeat (((y position) + (180)) / (40))\n    change y by (-45)\n    set [indiv. costume v] to [3]\n    create clone of (_myself_ v)\nend\n\nset [y pos v] to ((pick random (-4) to (1)) * (40))\n\ndefine Change Ground\nset [change type v] to (pick random (1) to (6))\nif <(Change Type) = [1]> then\n    change [y pos v] by ((45) * (pick random (1) to (2)))\nelse\n    if <(Change Type) = [2]> then\n        change [y pos v] by ((-45) * (pick random (1) to (2)))\n    else\n        if <(Change Type) = [3]> then\n            change [y pos v] by (90)\n            wait (0.26) seconds\n            change [y pos v] by (-90)\n        else\n            if <(Change Type) = [4]> then\n                change [y pos v] by (-1000)\n                wait ((0.26) * (pick random (2) to (3))) seconds\n                change [y pos v] by ((1000) + ((pick random (-2) to (2)) * (45)))\n            else\n                if <(Change Type) = [5]> then\n                    if <(Y Pos) > [0]> then\n                        change [y pos v] by (-165)\n                        wait ((0.26) * (pick random (3) to (6))) seconds\n                        change [y pos v] by (165)\n                    end\n                else\n                    if <(Change Type) = [6]> then\n                        if <(Y Pos) < [-45]> then\n                            change [y pos v] by (165)\n                            wait ((0.26) * (pick random (3) to (6))) seconds\n                            change [y pos v] by (-165)\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\nif <(Y Pos) < [-165]> then\n    set [y pos v] to [-165]\nend\nif <(Y Pos) > [15]> then\n    set [y pos v] to [15]\nend\n\ndefine Beginning Generation\nset [distance v] to [0]\nswitch costume to (costume1 v)\ngo to x: (-270) y: (Y Pos)\nrepeat (20)\n    Make Clones\n    change x by (45)\nend\n\nchange [y pos v] by (45)\n\nwhen I receive [begin game! v]\nset [speed v] to [5]\nset [distance v] to [0]\nset [y pos v] to [-120]\nset [game over? v] to [0]\nhide\nBeginning Generation\nforever\n    if <(Game Over?) = [0]> then\n        change [distance v] by (1)\n    end\n    Make Clones\n    wait (0.26) seconds\nend\n\nwhen I receive [begin game! v]\nforever\n    wait (0.26) seconds\n    Change Ground\n    wait (((400) - (Distance)) * (0.01)) seconds\nend\n\nwhen I receive [main menu v]\nstop [other scripts in sprite v]\nhide\ndelete this clone\n\nwhen I receive [fade into play v]\nstop [other scripts in sprite v]\nwait (0.5) seconds\ndelete this clone\n\nwhen I receive [lose v]\nset [game over? v] to [1]\nhide variable [distance v]\n\n@Nurr\n\nwhen I receive [main menu v]\nstop [other scripts in sprite v]\nhide\ndelete this clone\n\nwhen I start as a clone\nif <(costume [number v]) = [1]> then\n    set size to (75) %\n    switch costume to (pomegranate v)\n    show\n    go to (du v)\n    set [indiv. y pos v] to (y position)\n    set [indiv. xv v] to ((28) + (Xv))\n    set [indiv. yv v] to ((4) + ((Yv) / (2)))\n    point in direction (pick random (1) to (360))\n    repeat until <<<touching (nurr v)?> or <touching (getin v)?>> or <<(x position) > [235]> or <(y position) < [-175]>>>\n        if <(Indiv. Y Pos) > [180]> then\n            set y to (180)\n            switch costume to (odi mej v)\n            point in direction (90)\n        else\n            switch costume to (pomegranate v)\n            turn right (25) degrees\n            set y to (Indiv. Y Pos)\n        end\n        set [indiv. xv v] to ((Indiv. Xv) * (0.93))\n        change x by (Indiv. Xv)\n        change [indiv. yv v] by (-0.7)\n        change [indiv. y pos v] by (Indiv. Yv)\n    end\n    if <<touching (nurr v)?> or <touching (getin v)?>> then\n        change x by ((Indiv. Xv) * (-1))\n        change y by ((Indiv. Yv) * (-1))\n        Explode\n    end\n    delete this clone\nend\n\ndefine Explode\nstart sound [nurr v]\nswitch costume to (explosion v)\nrepeat (pick random (10) to (15))\n    create clone of (_myself_ v)\nend\n\nwhen I start as a clone\nif <<(costume [number v]) = [2]> or <(costume [number v]) = [7]>> then\n    set size to (25) %\n    show\n    if <(costume [number v]) = [7]> then\n        set [indiv. xv v] to (pick random (-7) to (7))\n        set [indiv. yv v] to (pick random (-15) to (7))\n    else\n        set [indiv. xv v] to (pick random (-20) to (20))\n        set [indiv. yv v] to (pick random (-20) to (20))\n    end\n    repeat (5)\n        turn right (Indiv. Xv) degrees\n        change x by (Indiv. Xv)\n        change y by (Indiv. Yv)\n        change [indiv. yv v] by (-0.7)\n        set [indiv. xv v] to ((Indiv. Xv) * (0.9))\n        set [indiv. yv v] to ((Indiv. Yv) * (0.9))\n        if <touching (du v)?> then\n            broadcast (Khpel v)\n        end\n        change [ghost v] effect by (10)\n    end\n    delete this clone\nend\n\nrepeat (3)\n\nchange x by (-5)\n\nwhen flag clicked\nswitch costume to (control v)\nhide\n\nwhen I receive [begin game! v]\nif <(costume [number v]) = [3]> then\n    forever\n        if <key (space v) pressed?> then\n            switch costume to (pomegranate v)\n            create clone of (_myself_ v)\n            switch costume to (control v)\n            start sound [Throw v]\n            wait (0.26) seconds\n        end\n    end\nend\n\nwhen I receive [lose v]\nif <(costume [number v]) = [3]> then\n    stop [other scripts in sprite v]\nend\n\nwhen I receive [begin game! v]\nif <(costume [number v]) = [3]> then\n    forever\n        wait ((0.26) * (pick random (1) to (4))) seconds\n        wait (((400) / ((Distance) + (50))) * (pick random (0.1) to (2))) seconds\n        switch costume to (incoming! v)\n        create clone of (_myself_ v)\n        switch costume to (control v)\n    end\nend\n\nwhen I start as a clone\nif <(costume [number v]) = [5]> then\n    set size to (115) %\n    switch costume to (incoming! v)\n    show\n    go to x: (240) y: (180)\n    point in direction (90)\n    set [indiv. y pos v] to (y position)\n    set [indiv. xv v] to [0]\n    set [indiv. yv v] to (pick random (-7) to (-15))\n    point in direction (90)\n    repeat (pick random (5) to (30))\n        change x by (-5)\n    end\n    repeat until <<touching (nurr v)?> or <<touching (getin v)?> or <<(x position) > [240]> or <(y position) < [-180]>>>>\n        switch costume to (odits v)\n        turn right (25) degrees\n        set y to (Indiv. Y Pos)\n        change x by (-5)\n        change [indiv. y pos v] by (Indiv. Yv)\n        change [indiv. yv v] by (-1)\n    end\n    if <<touching (nurr v)?> or <touching (getin v)?>> then\n        Mini Explode\n    end\n    delete this clone\nend\n\ndefine Mini Explode\nstart sound [odits v]\nswitch costume to (mini explosion v)\nrepeat (pick random (13) to (15))\n    create clone of (_myself_ v)\nend\n\nwait until <not <key (space v) pressed?>>\n\n@Yerkrord Tsatkman Ban@\n\nwhen I start as a clone\nif <(costume [number v]) = [2]> then\n    go to (du v)\n    change y by (-45)\n    show\n    set size to (100) %\n    repeat (5)\n        change x by (-5)\n        change y by (-3)\n        change [ghost v] effect by (20)\n        change size by (-5)\n    end\nend\ndelete this clone\n\nwhen I receive [double jump v]\nif <(costume [number v]) = [1]> then\n    switch costume to (ban@2 v)\n    create clone of (_myself_ v)\n    switch costume to (control v)\nend\n\nwhen flag clicked\nswitch costume to (control v)\nhide\n\nwhen I receive [main menu v]\nstop [other scripts in sprite v]\nhide\ndelete this clone\n\n@Menyu\n\nwhen I receive [main menu v]\nif <(costume [number v]) = [1]> then\n    stop [other scripts in sprite v]\n    go to x: (0) y: (30)\n    switch costume to (button1 v)\n    create clone of (_myself_ v)\n    go to x: (0) y: (-40)\n    switch costume to (button2 v)\n    create clone of (_myself_ v)\n    go to x: (0) y: (-110)\n    switch costume to (button3 v)\n    create clone of (_myself_ v)\n    switch costume to (control v)\n    go to x: (200) y: (-140)\n    switch costume to (button5 v)\n    create clone of (_myself_ v)\n    go to x: (-200) y: (-140)\n    switch costume to (yay v)\n    create clone of (_myself_ v)\n    go to x: (0) y: (115)\n    switch costume to (armeniarush v)\n    create clone of (_myself_ v)\n    switch costume to (control v)\n    hide\nelse\n    stop [other scripts in sprite v]\n    hide\n    delete this clone\nend\n\nwhen flag clicked\nswitch costume to (control v)\nhide\n\nwhen I start as a clone\nif <(costume [number v]) > [22]> then\n    show\n    set size to (90) %\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n        change size by (1)\n    end\nelse\n    if <(costume [number v]) > [10]> then\n        show\n        set size to (50) %\n        set [ghost v] effect to (100)\n        repeat (10)\n            change [ghost v] effect by (-10)\n            change size by (5)\n        end\n        wait (10) seconds\n        repeat (10)\n            change [ghost v] effect by (10)\n            change size by (-5)\n        end\n        delete this clone\n    else\n        if <(costume [number v]) = [10]> then\n            show\n            forever\n                set y to ((([sin v] of ((timer) * (300)) ) * (5)) + (115))\n            end\n        else\n            set [brightness v] effect to (0)\n            show\n            go to [front v] layer\n            forever\n                if <touching (mouse-pointer v)?> then\n                    wait until <not <mouse down?>>\n                    start sound [Button Hover v]\n                    repeat until <<not <touching (mouse-pointer v)?>> or <mouse down?>>\n                        set [brightness v] effect to (15)\n                        change [indiv. size v v] by (5)\n                    end\n                    set [brightness v] effect to (0)\n                    if <mouse down?> then\n                        if <(costume [number v]) = [2]> then\n                            broadcast (Fade into Play v)\n                        else\n                            if <(costume [number v]) = [3]> then\n                                broadcast (Fade into How to Play v)\n                            else\n                                if <(costume [number v]) = [4]> then\n                                    broadcast (Fade into About Armenia v)\n                                else\n                                    if <(costume [number v]) = [5]> then\n                                        broadcast (Fade into Main Menu v)\n                                    else\n                                        if <(costume [number v]) = [6]> then\n                                            change [music v] by (1)\n                                            if <(Music) > [4]> then\n                                                set [music v] to [1]\n                                            end\n                                            broadcast (Update Music v)\n                                        else\n                                            if <(costume [number v]) = [7]> then\n                                                broadcast (Fade into Play v)\n                                            else\n                                                if <(costume [number v]) = [8]> then\n                                                    broadcast (Fade into Main Menu v)\n                                                else\n                                                    if <(costume [number v]) = [9]> then\n                                                        broadcast (Fade into High Scores v)\n                                                    end\n                                                end\n                                            end\n                                        end\n                                    end\n                                end\n                            end\n                        end\n                        if <not <(costume [number v]) = [6]>> then\n                            stop [this script v]\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\n\nwhen I start as a clone\nif <(costume [number v]) < [10]> then\n    set [indiv. size v v] to [0]\n    forever\n        change size by (Indiv. Size V)\n        change [indiv. size v v] by (((size) - (100)) * (-1))\n        set [indiv. size v v] to ((Indiv. Size V) * (0.3))\n    end\nend\n\nbroadcast (Begin Game! v)\n\nwhen I receive [begin game! v]\nstop [other scripts in sprite v]\nhide\ndelete this clone\n\nwhen I receive [how to play v]\nif <(costume [number v]) = [1]> then\n    go to x: (0) y: (-140)\n    switch costume to (button4 v)\n    create clone of (_myself_ v)\n    switch costume to (control v)\n    go to x: (0) y: (0)\n    switch costume to (htp1 v)\n    create clone of (_myself_ v)\n    switch costume to (control v)\nelse\n    stop [other scripts in sprite v]\n    hide\n    delete this clone\nend\n\nwhen I receive [about armenia v]\nif <(costume [number v]) = [1]> then\n    go to x: (0) y: (0)\n    switch costume to (ff wait v)\n    create clone of (_myself_ v)\n    switch costume to (control v)\n    go to x: (0) y: (-140)\n    switch costume to (button4 v)\n    create clone of (_myself_ v)\n    switch costume to (control v)\n    forever\n        set [indiv. costume v] to [11]\n        repeat (4)\n            go to x: (0) y: (90)\n            repeat (3)\n                switch costume to (Indiv. Costume)\n                create clone of (_myself_ v)\n                switch costume to (control v)\n                change [indiv. costume v] by (1)\n                change y by (-70)\n                wait (0.5) seconds\n            end\n            wait (9.5) seconds\n        end\n    end\nelse\n    stop [other scripts in sprite v]\n    hide\n    delete this clone\nend\n\nwhen I receive [lose v]\nif <(costume [number v]) = [1]> then\n    go to x: (-140) y: (-140)\n    switch costume to (button6 v)\n    create clone of (_myself_ v)\n    go to x: (140) y: (-140)\n    switch costume to (button7 v)\n    create clone of (_myself_ v)\n    switch costume to (control v)\nelse\n    stop [other scripts in sprite v]\n    hide\n    delete this clone\nend\n\nwhen I start as a clone\n\nwhen I receive [high scores menu v]\nif <(costume [number v]) = [1]> then\n    go to x: (0) y: (-140)\n    switch costume to (button4 v)\n    create clone of (_myself_ v)\n    switch costume to (control v)\nelse\n    stop [other scripts in sprite v]\n    hide\n    delete this clone\nend\n\n@Sev Ekran\n\nwhen flag clicked\nhide\n\nwhen I receive [fade into play v]\ngo to x: (0) y: (0)\nset size to (100) %\nshow\nclear graphic effects\nset [ghost v] effect to (100)\ngo to [front v] layer\nrepeat (10)\n    change [ghost v] effect by (-10)\nend\nwait (1) seconds\nbroadcast (Begin Game! v)\nrepeat (10)\n    change [ghost v] effect by (10)\nend\n\nwhen I receive [fade into how to play v]\ngo to x: (0) y: (0)\nset size to (100) %\nshow\nclear graphic effects\nset [ghost v] effect to (100)\ngo to [front v] layer\nrepeat (10)\n    change [ghost v] effect by (-10)\nend\nbroadcast (How to Play v)\nrepeat (10)\n    change [ghost v] effect by (10)\nend\n\nwhen I receive [fade into about armenia v]\ngo to x: (0) y: (0)\nset size to (100) %\nshow\nclear graphic effects\nset [ghost v] effect to (100)\ngo to [front v] layer\nrepeat (10)\n    change [ghost v] effect by (-10)\nend\nbroadcast (About Armenia v)\nrepeat (10)\n    change [ghost v] effect by (10)\nend\n\nwhen I receive [fade into main menu v]\ngo to x: (0) y: (0)\nset size to (100) %\nshow\nclear graphic effects\nset [ghost v] effect to (100)\ngo to [front v] layer\nrepeat (10)\n    change [ghost v] effect by (-10)\nend\nbroadcast (Main Menu v)\nrepeat (10)\n    change [ghost v] effect by (10)\nend\n\nwhen I receive [lose v]\ngo to x: (0) y: (0)\nset size to (100) %\nshow\nclear graphic effects\nset [ghost v] effect to (100)\ngo to [front v] layer\nrepeat (20)\n    change [ghost v] effect by (-3.5)\nend\n\nwhen I receive [fade into high scores v]\ngo to x: (0) y: (0)\nset size to (100) %\nshow\nclear graphic effects\nset [ghost v] effect to (100)\ngo to [front v] layer\nrepeat (10)\n    change [ghost v] effect by (-10)\nend\nbroadcast (High Scores Menu v)\nrepeat (10)\n    change [ghost v] effect by (10)\nend\n\n@Grafiks\n\nwhen I start as a clone\nshow\n\nwhen flag clicked\nswitch costume to (control v)\nhide\n\nwhen I receive [main menu v]\nif <(costume [number v]) = [1]> then\n    stop [other scripts in sprite v]\n    go to x: (0) y: (0)\n    Quick Create\n    forever\n        set [indiv. x pos v] to [500]\n        switch costume to (blurmountain1 v)\n        set size to (pick random (120) to (200)) %\n        create clone of (_myself_ v)\n        switch costume to (control v)\n        wait (pick random (5) to (10)) seconds\n        switch costume to (blurmountain2 v)\n        set size to (pick random (120) to (200)) %\n        create clone of (_myself_ v)\n        switch costume to (control v)\n        wait (pick random (5) to (10)) seconds\n    end\nelse\n    stop [other scripts in sprite v]\n    hide\n    delete this clone\nend\n\nwhen I receive [begin game! v]\nif <(costume [number v]) = [1]> then\n    stop [other scripts in sprite v]\n    go to x: (0) y: (0)\n    Quick Create\n    forever\n        set [indiv. x pos v] to [500]\n        switch costume to (blurmountain1 v)\n        set size to (pick random (120) to (200)) %\n        create clone of (_myself_ v)\n        switch costume to (control v)\n        wait (pick random (5) to (10)) seconds\n        switch costume to (blurmountain2 v)\n        set size to (pick random (120) to (200)) %\n        create clone of (_myself_ v)\n        switch costume to (control v)\n        wait (pick random (5) to (10)) seconds\n    end\nelse\n    stop [other scripts in sprite v]\n    hide\n    delete this clone\nend\n\nwhen I start as a clone\nif <(costume [number v]) = [4]> then\n    show\n    forever\n        set x to (([sin v] of ((timer) * (30)) ) * (50))\n        go to [back v] layer\n    end\nend\n\nif <(costume [number v]) = [4]> then\n    forever\n        switch costume to (armenian flag3 v)\n        repeat (14)\n            next costume\n            wait (0) seconds\n        end\n    end\nend\n\nwhen I start as a clone\nset [indiv. costume v] to (costume [number v])\nif <<(costume [number v]) = [5]> or <(costume [number v]) = [6]>> then\n    go to [back v] layer\n    show\n    forever\n        change [indiv. x pos v] by (-0.5)\n        switch costume to (control v)\n        set x to (Indiv. X Pos)\n        switch costume to (Indiv. Costume)\n        if <(Indiv. X Pos) < [-500]> then\n            delete this clone\n        end\n    end\nend\n\ndefine Quick Create\nswitch costume to (blurmountain1 v)\nset size to (pick random (120) to (200)) %\nset [indiv. x pos v] to [-300]\ncreate clone of (_myself_ v)\nswitch costume to (blurmountain2 v)\nset size to (pick random (120) to (200)) %\nset [indiv. x pos v] to [0]\ncreate clone of (_myself_ v)\nswitch costume to (blurmountain1 v)\nset size to (pick random (120) to (200)) %\nset [indiv. x pos v] to [150]\ncreate clone of (_myself_ v)\nswitch costume to (blurmountain2 v)\nset size to (pick random (120) to (200)) %\nset [indiv. x pos v] to [350]\ncreate clone of (_myself_ v)\nswitch costume to (control v)\n\nif <(costume [number v]) = [1]> then\n    go to x: (0) y: (0)\n    point in direction (90)\n    switch costume to (blur v)\n    create clone of (_myself_ v)\n    switch costume to (control v)\nend\n\n@Bardzraguyn Miavor\n\ndefine Encode (username)\nset [encoded v] to []\nset [# v] to [1]\nrepeat (length of (username))\n    set [char index # v] to (item # of (letter (#) of (username)) in [characters v])\n    if <(length of (Char Index #)) < [2]> then\n        set [char index # v] to (join [0] (Char Index #))\n    end\n    set [encoded v] to (join (Encoded) (Char Index #))\n    change [# v] by (1)\nend\n\nwhen I receive [lose v]\nDecode to Local Vars\nif <not <(username) = []>> then\n    if <(Distance) > (☁ Daily Highscore)> then\n        Encode (username)\n        wait (0.1) seconds\n        set [☁ daily hs holder v] to (Encoded)\n        wait (0.1) seconds\n        set [☁ daily highscore v] to (Distance)\n        wait (0.1) seconds\n        if <(Distance) > (☁ Highscore)> then\n            Encode (username)\n            set [☁ hs holder v] to (Encoded)\n            wait (0.1) seconds\n            set [☁ highscore v] to (Distance)\n        end\n    end\nend\nwait (0.1) seconds\nDecode to Local Vars\n\ndefine Decode (encoded username)\nset [decoded v] to []\nset [# v] to [1]\nrepeat (length of ((encoded username) / (2)))\n    set [decoded v] to (join (Decoded) (item (join (letter (#) of (encoded username)) (letter ((#) + (1)) of (encoded username))) of [characters v]))\n    change [# v] by (2)\nend\n\nEncode (username)\nset [☁ hs holder v] to (Encoded)\nset [☁ highscore v] to (Distance)\n\ndefine Reset Daily HS\nEncode [None]\nwait (0.1) seconds\nset [☁ daily hs holder v] to (Encoded)\nwait (0.1) seconds\nset [☁ daily highscore v] to [0]\nwait (0.1) seconds\nset [☁ new day? counter v] to [0]\nwait (0.1) seconds\nset [☁ current day v] to ([floor v] of (days since 2000) )\n\ndefine Reset All-Time HS\nEncode [None]\nset [☁ hs holder v] to (Encoded)\nwait (0.1) seconds\nset [☁ highscore v] to [0]\n\ndefine Decode to Local Vars\nDecode (☁ HS Holder)\nset [highscore holder: v] to (Decoded)\nDecode (☁ Daily HS Holder)\nset [daily highscore holder: v] to (Decoded)\n\nwhen flag clicked\nif <(☁ Current Day) = ([floor v] of (days since 2000) )> then\n    if <(☁ New Day? Counter) > [0]> then\n        change [☁ new day? counter v] by (-1)\n    end\nelse\n    change [☁ new day? counter v] by (1)\n    if <(☁ New Day? Counter) > [4]> then\n        Reset Daily HS\n    end\nend\n\nset [☁ current day v] to ([floor v] of ((days since 2000) - (1)) )\n\nwhen flag clicked\nDecode to Local Vars\n\nwhen I receive [fade into high scores v]\nDecode to Local Vars\n\nrepeat (4)\n    Reset Daily HS\n    Reset All-Time HS\n    Decode to Local Vars\n    wait (0.3) seconds\nend\n\n@Speech/Text Normal Font\n\ndefine Speaker: (speaker) Costume: (costume name) Speech: (speech)\nset [person speaking v] to (speaker)\nswitch costume to (costume name)\ngo to x: (0) y: (0)\nset size to (100) %\ncreate clone of (_myself_ v)\nSay (speech) Right Border (1) X: [] Y: [] SIZE: [] BRIGHT? [] NOT SLOWAPPEAR? []\nwait until <not <key (z v) pressed?>>\nwait until <key (z v) pressed?>\nbroadcast (delete speech letters v)\n\ndefine Say (speech) Right Border (border x) X: (x) Y: (y) SIZE: (size) BRIGHT? (bright) NOT SLOWAPPEAR? (not appear)\nset [person speaking v] to [4]\nswitch costume to (a v)\ngo to x: (x) y: (y)\nhide\nset size to (size) %\nif <(bright) = [1]> then\n    set [brightness v] effect to (100)\nelse\n    set [brightness v] effect to (0)\nend\nset [speech scroll # v] to [1]\nrepeat ((length of (speech)) / (1))\n    switch costume to (join [] (letter (Speech Scroll #) of (speech)))\n    create clone of (_myself_ v)\n    change [speech scroll # v] by (1)\n    change x by ((item (costume [number v]) of [letter spacing \(by costume #\) v]) * ((size) / (70)))\n    switch costume to (control v)\n    if <(Game Going?) = [1]> then\n        switch costume to (join [] (letter (Speech Scroll #) of (speech)))\n        create clone of (_myself_ v)\n        change [speech scroll # v] by (1)\n        change x by ((item (costume [number v]) of [letter spacing \(by costume #\) v]) * ((size) / (70)))\n        switch costume to (control v)\n        if <(Game Going?) = [1]> then\n            switch costume to (join [] (letter (Speech Scroll #) of (speech)))\n            create clone of (_myself_ v)\n            change [speech scroll # v] by (1)\n            change x by ((item (costume [number v]) of [letter spacing \(by costume #\) v]) * ((size) / (70)))\n            switch costume to (control v)\n        end\n    end\nend\n\nwhen I start as a clone\nset [indiv. clone var v] to [100]\nset [ghost v] effect to (100)\ngo to [front v] layer\nshow\nset [indiv y v] to (y position)\nset [indiv x v] to (x position)\npoint in direction (90)\ngo to [front v] layer\nif <(Game Going?) = [1]> then\n    set [ghost v] effect to (0)\nelse\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\nforever\n    change [indiv. clone var v] by ((200) - ((distance to [mouse-pointer v]) * ((2) + <not <mouse down?>>)))\n    set [indiv. clone var v] to ((Indiv. Clone var) * (0.5))\n    if <(Indiv. Clone var) > [100]> then\n        set [indiv. clone var v] to [100]\n    end\n    set [ghost v] effect to (Indiv. Clone var)\nend\n\nwhen I start as a clone\nif <<(costume [number v]) > [56.9]> and <(costume [number v]) < [60.9]>> then\n    stop [other scripts in sprite v]\nend\n\nwhen flag clicked\nswitch costume to (control v)\nhide\n\nwhen I receive [lose v]\nif <(costume [number v]) = [54]> then\n    set [game going? v] to [0]\n    stop [other scripts in sprite v]\n    broadcast (#Delete Text Letters v)\n    wait (0.5) seconds\n    Say [GAME OVER] Right Border (200) X: [-100] Y: [130] SIZE: [150] BRIGHT? [1] NOT SLOWAPPEAR? []\n    Say (join [YOUR SCORE: ] (Distance)) Right Border (200) X: [-200] Y: [80] SIZE: [70] BRIGHT? [1] NOT SLOWAPPEAR? []\n    Say (join (join [HIGHSCORE: ] (☁ Highscore)) (join [ - ] (Highscore Holder:))) Right Border (200) X: [-200] Y: [50] SIZE: [70] BRIGHT? [1] NOT SLOWAPPEAR? []\n    Say (join (join [DAILY HIGHSCORE: ] (☁ Daily Highscore)) (join [ - ] (Daily Highscore Holder:))) Right Border (200) X: [-200] Y: [20] SIZE: [70] BRIGHT? [1] NOT SLOWAPPEAR? []\n    Say (join (join (join (current [month v]) [/]) (join (current [date v]) [/])) (current [year v])) Right Border (200) X: [-200] Y: [0] SIZE: [70] BRIGHT? [1] NOT SLOWAPPEAR? []\n    if <<(Daily Highscore Holder:) = (username)> or <(Highscore Holder:) = (username)>> then\n        Say [CONGRATS! YOU HOLD A HIGHSCORE] Right Border (200) X: [-160] Y: [-50] SIZE: [70] BRIGHT? [1] NOT SLOWAPPEAR? []\n    else\n        Say [THANKS FOR PLAYING!] Right Border (200) X: [-95] Y: [-50] SIZE: [70] BRIGHT? [1] NOT SLOWAPPEAR? []\n    end\nend\n\nwhen I receive [#delete text letters v]\ndelete this clone\n\npoint in direction ((((direction) - (90)) * (0.7)) + (90))\n\nwhen I receive [main menu v]\nstop [other scripts in sprite v]\nbroadcast (#Delete Text Letters v)\n\nwhen I receive [fade into play v]\nstop [other scripts in sprite v]\nbroadcast (#Delete Text Letters v)\n\nwhen I receive [high scores menu v]\nif <(costume [number v]) = [54]> then\n    stop [other scripts in sprite v]\n    broadcast (#Delete Text Letters v)\n    wait (0.1) seconds\n    Say [HIGH SCORES] Right Border (200) X: [-115] Y: [110] SIZE: [150] BRIGHT? [0] NOT SLOWAPPEAR? []\n    Say (join (join [HIGHSCORE: ] (☁ Highscore)) (join [ - ] (Highscore Holder:))) Right Border (200) X: [-200] Y: [30] SIZE: [70] BRIGHT? [0] NOT SLOWAPPEAR? []\n    Say (join (join [DAILY HIGHSCORE: ] (☁ Daily Highscore)) (join [ - ] (Daily Highscore Holder:))) Right Border (200) X: [-200] Y: [0] SIZE: [70] BRIGHT? [0] NOT SLOWAPPEAR? []\n    Say (join (join (join (current [month v]) [/]) (join (current [date v]) [/])) (current [year v])) Right Border (200) X: [-200] Y: [-20] SIZE: [70] BRIGHT? [0] NOT SLOWAPPEAR? []\n    if <<(Daily Highscore Holder:) = (username)> or <(Highscore Holder:) = (username)>> then\n        Say [CONGRATS! YOU HOLD A HIGHSCORE] Right Border (200) X: [-160] Y: [-70] SIZE: [70] BRIGHT? [0] NOT SLOWAPPEAR? []\n    else\n    end\nend\n\nwhen I receive [begin game! v]\nif <(costume [number v]) = [54]> then\n    wait (0.1) seconds\n    set [game going? v] to [1]\n    forever\n        broadcast (#Delete Text Letters v)\n        if <(length of (Distance)) < [2]> then\n            Say (Distance) Right Border (200) X: [225] Y: [150] SIZE: [125] BRIGHT? [1] NOT SLOWAPPEAR? [1]\n        else\n            if <(length of (Distance)) < [3]> then\n                Say (Distance) Right Border (200) X: [210] Y: [150] SIZE: [125] BRIGHT? [1] NOT SLOWAPPEAR? [1]\n            else\n                Say (Distance) Right Border (200) X: [195] Y: [150] SIZE: [125] BRIGHT? [1] NOT SLOWAPPEAR? [1]\n            end\n        end\n        wait (0.05) seconds\n    end\nend\n\nSay (join (join [HIGHSCORE: ] (☁ Highscore)) (join [ - ] (Highscore Holder:))) Right Border (200) X: [-200] Y: [30] SIZE: [70] BRIGHT? [0] NOT SLOWAPPEAR? []\nSay (join (join [DAILY HIGHSCORE: ] (☁ Daily Highscore)) (join [ - ] (Daily Highscore Holder:))) Right Border (200) X: [-200] Y: [0] SIZE: [70] BRIGHT? [0] NOT SLOWAPPEAR? []\nSay (join (join (join (current [month v]) [/]) (join (current [date v]) [/])) (current [year v])) Right Border (200) X: [-200] Y: [-20] SIZE: [70] BRIGHT? [0] NOT SLOWAPPEAR? []\nif <<(Daily Highscore Holder:) = (username)> or <(Highscore Holder:) = (username)>> then\n    Say [CONGRATS! YOU HOLD A HIGHSCORE] Right Border (200) X: [-160] Y: [-70] SIZE: [70] BRIGHT? [0] NOT SLOWAPPEAR? []\nend\n\n@Manrapatker\n\nwhen flag clicked\nhide\n\nshow\nswitch costume to (costume2 v)\nset size to (100) %\nswitch costume to (costume1 v)\ngo to x: (0) y: (0)\ngo to [front v] layer\nclear graphic effects\n\n