Green - Platformer


@Stage\n\nwhen flag clicked\nswitch backdrop to (backdrop1 v)\nforever\n    play sound [Final Exploration - PaulRHJT.mp3 v] until done\nend\n\n@pufferfish\n\nwhen flag clicked\ngo to x: (-180) y: (-40)\nset [xv v] to [0]\nset [yv v] to [0]\nforever\n    if <<(y position) < [-175]> or <touching color (#00ff55)?>> then\n        go to x: (-180) y: (-40)\n        set [xv v] to [0]\n        set [yv v] to [0]\n    end\n    if <key (left arrow v) pressed?> then\n        change [xv v] by (-1)\n    end\n    if <key (right arrow v) pressed?> then\n        change [xv v] by (1)\n    end\n    set [xv v] to ((xv) * (0.85))\n    change x by (xv)\n    if <touching color (#009933)?> then\n        change y by (-2)\n        if <touching color (#009933)?> then\n            change y by (1)\n            if <touching color (#009933)?> then\n                change y by (1)\n                if <touching color (#009933)?> then\n                    change y by (1)\n                    if <touching color (#009933)?> then\n                        change y by (1)\n                        if <touching color (#009933)?> then\n                            change y by (1)\n                            if <touching color (#009933)?> then\n                                change y by (-5)\n                                change x by ((-1) * (xv))\n                                if <<key (up arrow v) pressed?> and <not <(xv) = [0]>>> then\n                                    set [mode v] to [walljump]\n                                    set [yv v] to [8]\n                                    set [xv v] to (((xv) / ([abs v] of (xv) )) * (-10))\n                                else\n                                    set [mode v] to [wallslide]\n                                    set [xv v] to [0]\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n        change y by (2)\n    end\n    change y by (-3)\n    if <touching color (#009933)?> then\n        if <(yv) = [-3]> then\n            if <<key (left arrow v) pressed?> or <key (right arrow v) pressed?>> then\n                set [mode v] to [run]\n            else\n                if <([abs v] of (xv) ) > [.1]> then\n                    set [mode v] to [skid]\n                else\n                    set [mode v] to [stand]\n                end\n            end\n        end\n        if <key (up arrow v) pressed?> then\n            set [mode v] to [jump]\n            set [yv v] to [9]\n        end\n    end\n    if <<<<(mode) = [jump]> or <(mode) = [walljump]>> and <(yv) < [0]>> or <<<(mode) = [run]> or <(mode) = [skid]>> and <(yv) < [-3]>>> then\n        set [mode v] to [fall]\n    end\n    change y by (3)\n    if <(yv) > [-15]> then\n        change [yv v] by (-0.5)\n    end\n    change y by (-2)\n    if <not <touching color (#009933)?>> then\n        change y by (-1)\n        if <not <touching color (#009933)?>> then\n            change y by (-1)\n            if <not <touching color (#009933)?>> then\n                change y by (-1)\n                if <not <touching color (#009933)?>> then\n                    change y by (-1)\n                    if <not <touching color (#009933)?>> then\n                        change y by (-1)\n                        if <not <touching color (#009933)?>> then\n                            change y by (5)\n                        end\n                    end\n                end\n            end\n        end\n    end\n    change y by (2)\n    change y by (yv)\n    if <touching color (#009933)?> then\n        change y by (-2)\n        if <touching color (#009933)?> then\n            change y by ((-1) * (yv))\n            set [yv v] to [-3]\n        end\n        change y by (2)\n    end\n    if <<(x position) > [200]> and <touching (_edge_ v)?>> then\n        go to x: (-180) y: (-11)\n        switch backdrop to (next backdrop v)\n    end\nend\n\n@Sprite1\n\nwhen backdrop switches to [movement v]\nshow\ngo to x: (92) y: (-122)\nforever\n    repeat (22)\n        change x by (-10)\n    end\n    repeat (22)\n        change x by (10)\n    end\nend\n\nwhen flag clicked\nhide\n\nwhen backdrop switches to [backdrop8 v]\nhide\n\n@Sprite2\n\nwhen flag clicked\nset [ghost v] effect to (0)\nshow\nwait (3) seconds\nrepeat (10)\n    change [ghost v] effect by (10)\nend\nhide\n\nshow\ngo to [front v] layer\ngo to x: (0) y: (0)\nset [ghost v] effect to (0)\n\n