B&W | a platformer (All) (Games)
@Stage\n\nwhen [9 v] key pressed\nbroadcast (Next level v)\n\nwhen flag clicked\nforever\n    play sound [the piano moosic v] until done\nend\n\n@Player\n\nwhen flag clicked\nforever\n    wait until <touching (danger v)?>\n    create clone of (_myself_ v)\n    go to x: (-204) y: (-120)\n    wait until <not <touching (danger v)?>>\nend\n\nwhen flag clicked\nforever\n    if <touching color (#66c0ff)?> then\n        set [ghost v] effect to (50)\n        if <key (up arrow v) pressed?> then\n            set [y v] to [5]\n        else\n            if <key (down arrow v) pressed?> then\n                set [y v] to [-5]\n            else\n                set [y v] to [-1]\n            end\n        end\n    end\nend\n\nwhen flag clicked\nforever\n    if <touching color (#ffdc66)?> then\n        change x by (25)\n    end\nend\n\nwhen flag clicked\nforever\n    if <touching color (#00ff55)?> then\n        set [y v] to [-15]\n    end\nend\n\nwhen flag clicked\nforever\n    if <touching (bouncy v)?> then\n        set [y v] to [15]\n    end\nend\n\nwhen flag clicked\nforever\n    if <not <touching color (#66c0ff)?>> then\n        set [ghost v] effect to (0)\n    end\nend\n\nwhen [timer v] > (0.1)\nhide\n\nwhen flag clicked\nset [level v] to [1]\nshow\nset [ghost v] effect to (0)\npoint in direction (90)\nswitch costume to (player v)\ngo to [front v] layer\ngo [backward v] (1) layers\nshow\ngo to x: (-204) y: (-120)\nforever\n    change [y v] by (-0.5)\n    if <key (left arrow v) pressed?> then\n        switch costume to (player2 v)\n        change [x v] by (-1)\n    end\n    if <key (right arrow v) pressed?> then\n        switch costume to (player v)\n        change [x v] by (1)\n    end\n    set [x v] to ((x) * (0.9))\n    change x by (x)\n    if <<touching (platforms v)?> or <touching (mv platforms v)?>> then\n        change y by (1)\n        if <<touching (platforms v)?> or <touching (mv platforms v)?>> then\n            change y by (1)\n            if <<touching (platforms v)?> or <touching (mv platforms v)?>> then\n                change y by (1)\n                if <<touching (platforms v)?> or <touching (mv platforms v)?>> then\n                    change y by (1)\n                    if <<touching (platforms v)?> or <touching (mv platforms v)?>> then\n                        change y by (1)\n                        if <<touching (platforms v)?> or <touching (mv platforms v)?>> then\n                            change y by (1)\n                            if <<touching (platforms v)?> or <touching (mv platforms v)?>> then\n                                change y by (-6)\n                                if <key (up arrow v) pressed?> then\n                                    set [y v] to [10]\n                                    change x by ((x) * (-1))\n                                    if <(x) > [0]> then\n                                        set [x v] to [-10]\n                                    else\n                                        set [x v] to [10]\n                                    end\n                                else\n                                    change x by ((x) * (-1))\n                                    set [x v] to [0]\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\n    change y by (y)\n    if <<touching (platforms v)?> or <touching (mv platforms v)?>> then\n        change y by ((y) * (-1))\n        set [y v] to [0]\n    end\n    change y by (-0.5)\n    if <<<touching (platforms v)?> or <touching (mv platforms v)?>> and <key (up arrow v) pressed?>> then\n        set [y v] to [10]\n    end\n    change y by (0.5)\nend\n\nwhen flag clicked\nforever\n    if <(x position) > [235]> then\n        broadcast (Next level v)\n    end\nend\n\nwhen flag clicked\nforever\n    set drag mode [not draggable v]\n    show\nend\n\nwhen I receive [next level v]\ngo to x: (-204) y: (-120)\nchange [level v] by (1)\n\nwhen I start as a clone\nrepeat (10)\n    change size by (10)\n    change [ghost v] effect by (10)\nend\ndelete this clone\n\nwhen flag clicked\nforever\n    wait until <(y position) < [-175]>\n    create clone of (_myself_ v)\n    go to x: (-204) y: (-120)\n    wait until <not <(y position) < [-175]>>\nend\n\nwhen flag clicked\nforever\n    wait until <touching (moving danger v)?>\n    create clone of (_myself_ v)\n    go to x: (-204) y: (-120)\n    wait until <not <touching (moving danger v)?>>\nend\n\n@Platforms\n\nwhen flag clicked\nswitch costume to (costume1 v)\n\nwhen I receive [next level v]\nnext costume\n\n@Danger\n\nwhen flag clicked\nswitch costume to (costume1 v)\n\nwhen I receive [next level v]\nnext costume\n\n@Moving Danger\n\ndefine Mv (x) (y) (xvs) (yvs) (xvc) (yvc) (xrad) (yrad) (turn) (lv) (costu)\nswitch costume to (costu)\npoint in direction (90)\ngo to x: (x) y: (y)\nset [xv v] to (xvs)\nset [yv v] to (yvs)\nrepeat until <not <(LEVEL) = (lv)>>\n    if <(xrad) = [0]> then\n        set x to (x)\n    else\n        set x to (([cos v] of (xv) ) * (xrad))\n    end\n    if <(yrad) = [0]> then\n        set y to (y)\n    else\n        set y to ((([cos v] of (yv) ) * (yrad)) + (y))\n    end\n    turn right (turn) degrees\n    change [xv v] by (xvc)\n    change [yv v] by (yvc)\nend\n\nwhen flag clicked\nset [level v] to [1]\nhide\nwait until <(LEVEL) = [8]>\nshow\nMv [0] [-150] [0] [0] [8] [0] [90] [0] [5] [8] [1]\nhide\nset [clone v] to [0]\nrepeat (3)\n    change [clone v] by (1)\n    create clone of (_myself_ v)\nend\nwait until <(LEVEL) = [10]>\nrepeat (2)\n    change [clone v] by (1)\n    create clone of (_myself_ v)\nend\nwait until <(LEVEL) = [11]>\nshow\nMv [0] [-50] [90] [0] [12] [12] [80] [80] [15] [11] [1]\nhide\nrepeat (2)\n    change [clone v] by (1)\n    create clone of (_myself_ v)\nend\nwait until <(LEVEL) = [19]>\nshow\nMv [0] [0] [0] [0] [0] [12] [0] [90] [15] [19] [1]\nhide\n\nwhen I start as a clone\nshow\nif <(clone) = [1]> then\n    Mv [-125] [0] [0] [0] [0] [5] [0] [60] [0] [9] [2]\n    delete this clone\nend\nif <(clone) = [2]> then\n    Mv [25] [0] [0] [90] [0] [5] [0] [60] [0] [9] [2]\n    delete this clone\nend\nif <(clone) = [3]> then\n    Mv [175] [0] [0] [0] [0] [5] [0] [60] [0] [9] [2]\n    delete this clone\nend\nif <(clone) = [4]> then\n    Mv [0] [0] [0] [90] [0] [4] [0] [130] [5] [10] [1]\n    delete this clone\nend\nif <(clone) = [5]> then\n    Mv [0] [0] [0] [-90] [0] [4] [0] [130] [5] [10] [1]\n    delete this clone\nend\nif <(clone) = [6]> then\n    Mv [-100] [0] [90] [0] [12] [0] [44] [0] [0] [12] [3]\n    delete this clone\nend\nif <(clone) = [7]> then\n    Mv [100] [0] [-90] [0] [12] [0] [44] [0] [0] [12] [4]\n    delete this clone\nend\n\n@Text\n\nwhen flag clicked\nswitch costume to (costume1 v)\n\nwhen I receive [next level v]\nnext costume\n\n@Bouncy\n\nwhen flag clicked\nswitch costume to (costume1 v)\ngo to x: (0) y: (0)\nforever\n    if <touching (player v)?> then\n        glide (0.1) secs to x: (0) y: (-10)\n        glide (0.1) secs to x: (0) y: (12)\n        glide (0.1) secs to x: (0) y: (0)\n    end\nend\n\nwhen I receive [next level v]\nnext costume\n\n@TN\n\nwhen flag clicked\nset [ghost v] effect to (100)\nforever\n    go to [front v] layer\nend\n\n
Please LOVE FAV FOLLOW as I spent months working on this...\n\nPRESS GREEN FLAG TWICE! AND B&W STANDS FOR BLACK & WHITE. PRESS 9 TO SKIP.\n\nAND... NO MOBILE. YOU CAN'T EVEN BEAT THE FIRST FEW LEVEL WITH MOBILE.