Evolution I - Prehistoric Age (V 1.2)

Instructions: ~Evolution I - Prehistoric Age~\nThis is an easy platformer. also its not scientifically accurate i just made it for fun. controls are the normal ones, arrow keys or WASD. hope you guys enjoy it.\n\n~WOW! Featured?\nIts not everyday i get 3000 messages. Wow. Thank you all. 5,600<3?\n85,000 Views? OMG! 6,000 Favs? WOW.\nThank you, everyone who made this possible.

@Stage\n\nwhen flag clicked\nswitch backdrop to (costume1 v)\n\nwhen I receive [introdone v]\nset volume to (50) %\nforever\n    play sound [TheFatRat - Unity \(Instrumental\) v] until done\nend\n\nwhen I receive [introdone v]\nswitch backdrop to (blue sky v)\nforever\n    if <([costume # v] of [ground v]) = [9]> then\n        switch backdrop to (underground v)\n    else\n        if <([costume # v] of [ground v]) = [11]> then\n            switch backdrop to (pond v)\n        else\n            if <([costume # v] of [ground v]) = [12]> then\n                switch backdrop to (sea v)\n            else\n                if <([costume # v] of [ground v]) = [18]> then\n                    switch backdrop to (blue sky v)\n                else\n                    if <([costume # v] of [ground v]) = [19]> then\n                        switch backdrop to (mountains v)\n                    else\n                        if <([costume # v] of [ground v]) = [29]> then\n                            switch backdrop to (dino time v)\n                        else\n                            if <([costume # v] of [ground v]) = [35]> then\n                                switch backdrop to (dino ded v)\n                            else\n                                if <([costume # v] of [ground v]) = [36]> then\n                                    switch backdrop to (snow mountains v)\n                                else\n                                    if <([costume # v] of [ground v]) = [36]> then\n                                        switch backdrop to (snow mountains v)\n                                    else\n                                        if <([costume # v] of [ground v]) = [42]> then\n                                            switch backdrop to (blue sky v)\n                                        else\n                                        end\n                                    end\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\n\n@Player\n\nwhen flag clicked\nswitch costume to (bacteria v)\nhide\nset size to (60) %\n\nwhen flag clicked\nforever\n    if <not <touching (ground v)?>> then\n        change y by (1.5)\n    end\n    if <touching (next v)?> then\n        broadcast (next v)\n    end\n    if <not <([costume # v] of [ground v]) = [22]>> then\n        if <touching (lost 1 v)?> then\n            go to x: (-183) y: (-80)\n        end\n    else\n        if <touching (lost 1 v)?> then\n            broadcast (next v)\n        end\n    end\n    if <touching (lost 2 v)?> then\n        go to x: (-183) y: (-80)\n    end\nend\n\nwhen I receive [lizard v]\nswitch costume to (lizard v)\n\nwhen I receive [fish v]\nswitch costume to (fish v)\n\nwhen I receive [next v]\ngo to x: (-183) y: (-80)\n\nwhen I receive [bird v]\nswitch costume to (bird v)\n\nwhen I receive [dino v]\nswitch costume to (dino v)\n\nwhen I receive [mammoth v]\nswitch costume to (mammoth v)\n\nwhen I receive [monkey v]\nswitch costume to (monkey v)\n\nwhen I receive [message1 v]\nshow\ngo to x: (-183) y: (-80)\nset [gravity v] to [5]\nforever\n    change [y vel v] by (-0.5)\n    if <<key (right arrow v) pressed?> or <key (d v) pressed?>> then\n        change [x vel v] by (0.7)\n        point in direction (90)\n    end\n    if <<key (left arrow v) pressed?> or <key (a v) pressed?>> then\n        change [x vel v] by (-0.7)\n        point in direction (-90)\n    end\n    set [x vel v] to ((X vel) * (0.9))\n    change x by (X vel)\n    if <touching (ground v)?> then\n        change y by (1)\n        if <touching (ground v)?> then\n            change y by (1)\n            if <touching (ground v)?> then\n                change y by (1)\n                if <touching (ground v)?> then\n                    change y by (1)\n                    if <touching (ground v)?> then\n                        change y by (1)\n                        if <touching (ground v)?> then\n                            change x by ((X vel) * (-1))\n                            change x by (-1)\n                            change y by (-5)\n                            change x by (1)\n                            if <<key (up arrow v) pressed?> or <key (w v) pressed?>> then\n                                if <(X vel) > [0]> then\n                                    set [x vel v] to [-8]\n                                else\n                                    set [x vel v] to [8]\n                                end\n                                set [y vel v] to [8]\n                            else\n                                set [x vel v] to [0]\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\n    change y by (Y vel)\n    if <touching (ground v)?> then\n        change y by ((Y vel) * (-1))\n        set [y vel v] to [0]\n    end\n    change y by (-1)\n    if <touching (ground v)?> then\n        if <<key (up arrow v) pressed?> or <key (w v) pressed?>> then\n            set [y vel v] to [10]\n        end\n    end\n    if <key (r v) pressed?> then\n        go to x: (-183) y: (-80)\n    end\nend\n\nwhen I receive [human v]\ngo to x: (-183) y: (-80)\nhide\n\nwhen I receive [female v]\nswitch costume to (woman v)\nshow\n\nwhen I receive [male v]\nswitch costume to (man v)\nshow\n\nwhen I receive [worm v]\nswitch costume to (worm v)\n\nwhen I receive [end v]\nhide\n\n@Ground\n\nwhen flag clicked\ngo to x: (0) y: (0)\nswitch costume to (costume1 v)\nhide\n\nwhen I receive [next v]\nnext costume\n\nwhen I receive [message1 v]\nshow\n\nwhen I receive [end v]\nhide\n\n@Chats\n\nwhen flag clicked\ngo to x: (0) y: (0)\nhide\nswitch costume to (costume1 v)\n\nwhen I receive [next v]\nnext costume\nif <(costume [number v]) = [7]> then\n    broadcast (worm v)\nelse\n    if <(costume [number v]) = [12]> then\n        broadcast (fish v)\n    else\n        if <(costume [number v]) = [18]> then\n            broadcast (lizard v)\n        else\n            if <(costume [number v]) = [24]> then\n                broadcast (bird v)\n            else\n                if <(costume [number v]) = [29]> then\n                    broadcast (Dino v)\n                else\n                    if <(costume [number v]) = [36]> then\n                        broadcast (mammoth v)\n                    else\n                        if <(costume [number v]) = [42]> then\n                            broadcast (monkey v)\n                        else\n                            if <(costume [number v]) = [47]> then\n                                broadcast (human v)\n                            else\n                                if <(costume [number v]) = [1]> then\n                                    hide\n                                    broadcast (end v)\n                                else\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\n\nwhen I receive [message1 v]\nshow\n\n@next\n\nwhen flag clicked\nset [ghost v] effect to (100)\ngo to x: (0) y: (0)\n\n@lost 1\n\nwhen flag clicked\nset [ghost v] effect to (100)\ngo to x: (0) y: (0)\n\n@lost 2\n\nwhen flag clicked\ngo to x: (0) y: (0)\nhide\nforever\n    if <([costume # v] of [ground v]) = [7]> then\n        show\n        switch costume to (costume1 v)\n        go to [front v] layer\n    else\n        if <([costume # v] of [ground v]) = [12]> then\n            show\n            switch costume to (costume12 v)\n            go [backward v] (8) layers\n        else\n            if <([costume # v] of [ground v]) = [14]> then\n                show\n                switch costume to (costume2 v)\n                go [backward v] (8) layers\n            else\n                if <([costume # v] of [ground v]) = [17]> then\n                    show\n                    switch costume to (costume3 v)\n                    go [backward v] (8) layers\n                else\n                    if <([costume # v] of [ground v]) = [20]> then\n                        show\n                        switch costume to (costume4 v)\n                        go to [front v] layer\n                    else\n                        if <([costume # v] of [ground v]) = [21]> then\n                            show\n                            switch costume to (costume5 v)\n                            go to [front v] layer\n                        else\n                            if <([costume # v] of [ground v]) = [23]> then\n                                show\n                                switch costume to (costume6 v)\n                                go to [front v] layer\n                            else\n                                if <([costume # v] of [ground v]) = [27]> then\n                                    show\n                                    switch costume to (costume7 v)\n                                    go to [front v] layer\n                                else\n                                    if <([costume # v] of [ground v]) = [31]> then\n                                        show\n                                        switch costume to (costume8 v)\n                                        go to [front v] layer\n                                    else\n                                        if <([costume # v] of [ground v]) = [32]> then\n                                            show\n                                            switch costume to (costume9 v)\n                                            go to [front v] layer\n                                        else\n                                            if <([costume # v] of [ground v]) = [33]> then\n                                                show\n                                                switch costume to (costume10 v)\n                                                go to [front v] layer\n                                            else\n                                                if <([costume # v] of [ground v]) = [34]> then\n                                                    show\n                                                    switch costume to (costume11 v)\n                                                    go to [front v] layer\n                                                else\n                                                    hide\n                                                end\n                                            end\n                                        end\n                                    end\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\n\n@Choice1\n\nwhen flag clicked\nhide\ngo to x: (113) y: (0)\nset size to (200) %\nforever\n    if <touching (mouse-pointer v)?> then\n        set [brightness v] effect to (15)\n    else\n        set [brightness v] effect to (0)\n    end\nend\n\nwhen I receive [human v]\nshow\n\nwhen this sprite clicked\nbroadcast (male v)\nhide\n\nwhen I receive [female v]\nhide\n\n@Choice2\n\nwhen flag clicked\nhide\ngo to x: (-113) y: (0)\nset size to (200) %\nforever\n    if <touching (mouse-pointer v)?> then\n        set [brightness v] effect to (15)\n    else\n        set [brightness v] effect to (0)\n    end\nend\n\nwhen I receive [human v]\nshow\n\nwhen this sprite clicked\nbroadcast (female v)\nhide\n\nwhen I receive [male v]\nhide\n\n@Logo Part 1\n\nwhen I receive [message1 v]\nhide\n\nwhen I receive [introdone v]\ngo to x: (0) y: (30)\nshow\nset size to (100) %\nset [c v] to [0]\nforever\n    change [c v] by (8)\n    change size by ([cos v] of (c) )\nend\n\nwhen flag clicked\nhide\n\n@Logo part 2\n\nwhen I receive [message1 v]\nhide\n\nwhen I receive [introdone v]\nset size to (90) %\ngo to x: (0) y: (-60)\nshow\npoint in direction (90)\nset [d v] to [0]\nforever\n    change [d v] by (8)\n    turn right ([cos v] of (d) ) degrees\nend\n\nwhen flag clicked\nhide\n\n@press\n\nwhen [space v] key pressed\nbroadcast (message1 v)\nhide\n\nwhen I receive [introdone v]\ngo to x: (0) y: (-150)\nhide\nwait (1) seconds\nshow\n\nwhen flag clicked\nhide\n\n@cover\n\nwhen flag clicked\ngo to x: (0) y: (0)\nset [ghost v] effect to (100)\n\nset [ghost v] effect to (0)\n\n@Start\n\nwhen flag clicked\nset volume to (100) %\nstart sound [PokemonScratchIntro.mp3 v]\nset [dis v] to [0]\nset [costume v] to [0]\ngo to x: (0) y: (0)\npoint in direction (90)\nswitch costume to (logo \(1\) v)\nset size to (1) %\nhide\nrepeat (3)\n    change [costume v] by (1)\n    create clone of (_myself_ v)\n    wait (0.9) seconds\nend\nwait (0.1) seconds\nshow\nrepeat (22)\n    change size by (5)\n    turn left (16.36) degrees\nend\nstart sound [coin v]\nset [dis v] to [1]\nwait (0.25) seconds\nrepeat (22)\n    change size by (-5)\n    turn left (-16.36) degrees\nend\nhide\nwait (0.25) seconds\nstop all sounds\nbroadcast (introdone v)\n\nwhen I start as a clone\nshow\ngo to x: (0) y: (-180)\nif <(costume) = [1]> then\n    set size to (130) %\n    switch costume to (stuff v)\n    glide (0.85) secs to x: (0) y: (65)\n    start sound [gun_laser v]\n    wait (2.25) seconds\n    delete this clone\nelse\n    if <(costume) = [2]> then\n        set size to (130) %\n        switch costume to (stuff 2 v)\n        glide (0.85) secs to x: (0) y: (0)\n        start sound [gun_laser v]\n        wait (1.5) seconds\n        delete this clone\n    else\n        if <(costume) = [3]> then\n            set size to (130) %\n            switch costume to (stuff 3 v)\n            glide (0.85) secs to x: (0) y: (-60)\n            start sound [gun_laser v]\n            wait (0.75) seconds\n            delete this clone\n        end\n    end\nend\n\n@next lol\n\nwhen flag clicked\ngo to x: (0) y: (0)\nset [ghost v] effect to (0)\nhide\n\nwhen I receive [end v]\nshow\nwait (2.5) seconds\nhide\n\n