Flat Minded [platformer]

Instructions:                                    F L A T  M I N D E D\n\nA platformer with 10 levels!\n\nAll Levels Are 100% Possible!\n\nDon't do full screen! It lags!       DOUBLE CLICK GREEN FLAG!!!\n                                                   it's really important for the game!

@Stage\n\nwhen flag clicked\nswitch backdrop to (backdrop1 v)\n\nwhen I receive [begin to play v]\nrepeat (25)\n    change [ghost v] effect by (4)\nend\nswitch backdrop to (backdrop2 v)\nbroadcast (Play v)\n\nwhen flag clicked\nforever\n    play sound [H-Audio - Stroll.mp3 v] until done\nend\n\n@Sprite3\n\ndefine Physics\nif <key (right arrow v) pressed?> then\n    change [xv v] by (0.85)\nend\nif <key (left arrow v) pressed?> then\n    change [xv v] by (-0.85)\nend\nset [xv v] to ((Xv) * (0.87))\nchange x by (Xv)\nif <touching color (#7f7f7f)?> then\n    change x by ((Xv) * (-1))\n    set [xv v] to [0]\nend\nchange y by (Yv)\nif <touching color (#ff9999)?> then\n    broadcast (die v)\nend\nif <touching color (#99ffbb)?> then\n    broadcast (next level v)\nend\nif <touching color (#7f7f7f)?> then\n    change y by ((Yv) * (-1))\n    if <key (up arrow v) pressed?> then\n        if <(Yv) < [0.1]> then\n            if <not <touching color (#ff6642)?>> then\n                set [yv v] to [13]\n            end\n        end\n    else\n        if <(Yv) < [0.1]> then\n            set [yv v] to [0]\n        else\n            change [yv v] by (-1)\n        end\n    end\nend\nchange [yv v] by (-1)\nif <<touching color (#61e1ff)?> or <touching color (#ffc984)?>> then\n    if <key (up arrow v) pressed?> then\n        set [yv v] to [3]\n    end\nend\nif <touching color (#61e1ff)?> then\n    if <not <key (up arrow v) pressed?>> then\n        set [yv v] to [-3]\n    end\nend\n\nwhen I receive [play v]\nshow\ngo to [front v] layer\ngo [backward v] (2) layers\nforever\n    Physics\n    set [xpos v] to (x position)\n    set [ypos v] to (y position)\n    go to x: (0) y: (0)\nend\n\nwhen flag clicked\nhide\n\n@Sprite4\n\nwhen I receive [die v]\ngo to x: (0) y: (0)\nset [xv v] to [0]\nset [yv v] to [0]\n\nwhen I receive [next level v]\ngo to x: (0) y: (0)\nset [xv v] to [0]\nset [yv v] to [0]\nnext costume\n\nwhen I receive [play v]\nshow\nset [xv v] to [0]\nset [yv v] to [0]\nset [xpos v] to [0]\nset [ypos v] to [0]\nset [yvel v] to [0]\ngo to x: (0) y: (0)\nset size to (1500) %\nswitch costume to (costume1 v)\nforever\n    change x by ((xpos) * (-1))\n    change y by ((ypos) * (-1))\nend\n\nwhen flag clicked\nset size to (1500) %\nhide\n\n@Sprite5\n\nwhen flag clicked\nswitch costume to (costume1 v)\nhide\n\nwhen I start as a clone\nswitch costume to (costume2 v)\nset [ghost v] effect to (100)\nset size to (0) %\nrepeat (25)\n    change y by (2)\n    change size by (4)\n    change [ghost v] effect by (-4)\nend\nwait (2) seconds\nrepeat (10)\n    change [ghost v] effect by (10)\nend\ndelete this clone\n\nwhen I receive [menu v]\ngo to x: (0) y: (200)\nwait (1) seconds\nshow\nrepeat until <touching color (#7f7f7f)?>\n    change y by (-10)\nend\nchange y by (10)\nwait (1) seconds\ncreate clone of (_myself_ v)\nbroadcast (Title v)\n\nwhen I receive [begin to play v]\nrepeat (25)\n    change [ghost v] effect by (4)\nend\nhide\n\n@Sprite6\n\nwhen flag clicked\nhide\n\nwhen I receive [title v]\ngo to x: (-26) y: (208)\nset [ghost v] effect to (100)\nwait (2) seconds\nshow\nrepeat (25)\n    change [ghost v] effect by (-4)\n    change y by (-3)\nend\n\nwhen I receive [begin to play v]\nrepeat (25)\n    change [ghost v] effect by (4)\nend\nhide\n\n@Sprite7\n\nwhen flag clicked\ngo to x: (0) y: (30)\nhide\n\nwhen I receive [title v]\nset [ghost v] effect to (100)\nwait (4) seconds\nshow\nrepeat (25)\n    change [ghost v] effect by (-4)\nend\n\nwhen this sprite clicked\nbroadcast (begin to play v)\nrepeat (25)\n    change [ghost v] effect by (4)\nend\nhide\n\n@Sprite8\n\nwhen flag clicked\nhide\n\n@PI\n\nwhen flag clicked\nset [intro v] to [0]\ngo to [front v] layer\nhide\nset size to (100) %\nchange [intro v] by (1)\ncreate clone of (_myself_ v)\nwait (1.5) seconds\nchange [intro v] by (1)\ncreate clone of (_myself_ v)\n\nwhen I start as a clone\nif <(INTRO) = [1]> then\n    go to [front v] layer\n    go to x: (-118) y: (-262)\n    switch costume to (pi2 v)\n    show\n    Smooth Glide to X: (0) Y: (0) At speed (3)\n    wait (2) seconds\n    hide\n    delete this clone\nend\nif <(INTRO) = [2]> then\n    go to [front v] layer\n    go to x: (0) y: (0)\n    switch costume to (pi3 v)\n    show\n    set size to (1200) %\n    repeat (10)\n        change size by (((90) - (size)) * (0.2))\n    end\n    switch costume to (pi v)\n    wait (2) seconds\n    repeat (10)\n        change size by (-10)\n    end\n    broadcast (message1 v)\n    hide\n    delete this clone\nend\n\ndefine None\nrepeat until <<(round (x position)) = (x)> and <(round (y position)) = (y)>>\n    change x by (((x) - (x position)) / ([abs v] of ((-10) + (speed)) ))\n    change y by (((y) - (y position)) / ([abs v] of ((-10) + (speed)) ))\nend\ngo to x: (x) y: (y)\n\n@Sprite9\n\nwhen flag clicked\nshow\ngo to [front v] layer\ngo [backward v] (1) layers\ngo to x: (0) y: (0)\n\nwhen I receive [message1 v]\nrepeat until <(y position) > [342]>\n    change y by (((y position) + (7)) * (0.3))\nend\nhide\nbroadcast (menu v)\n\n@costume2\n\nwhen flag clicked\ngo to x: (0) y: (0)\ngo to [front v] layer\nhide\n\nshow\n\n