Bread Platformer 2

Instructions: ARROW keys to move.\n\nCLICK GREEN FLAG 2X SERIOUSLY IT BREAKS IF YOU DON'T!!!\n\nIt might not be the best but you can remix it. \n\nPLS like and follow for more.

@Stage\n\nwhen flag clicked\nwait (5) seconds\nforever\n    play sound [Sound v] until done\nend\n\n@Player\n\nwhen flag clicked\nset [bounce v] to [14]\nshow\ngo to x: (-194) y: (10)\nset [yv v] to [0]\nset [xv v] to [0]\nset rotation style [left-right v]\nforever\n    Up/Down (Bounce) [-1]\n    Right/left movement [10] [0.6]\nend\n\ndefine Up/Down (jump height) (fall speed)\nchange y by (YV)\nif <touching (level v)?> then\n    repeat ([ceiling v] of ([abs v] of (YV) ) )\n        if <touching (level v)?> then\n            change y by (((YV) / ([abs v] of (YV) )) * (-1))\n        end\n    end\n    if <<not <(YV) > [0]>> and <<key (up arrow v) pressed?> or <key (w v) pressed?>>> then\n        set [yv v] to (jump height)\n    else\n        set [yv v] to [0]\n    end\nelse\n    change [yv v] by (fall speed)\nend\n\ndefine Right/left movement (move speed) (drag)\nchange x by (XV)\nif <touching (level v)?> then\n    repeat ([ceiling v] of ([abs v] of (XV) ) )\n        if <touching (level v)?> then\n            change x by (((XV) / ([abs v] of (XV) )) * (-1))\n        end\n    end\n    set [xv v] to [0]\nend\nif <<key (right arrow v) pressed?> or <key (d v) pressed?>> then\n    point in direction (90)\n    set [xv v] to (move speed)\nelse\n    if <<key (left arrow v) pressed?> or <key (a v) pressed?>> then\n        point in direction (-90)\n        set [xv v] to ((move speed) * (-1))\n    end\nend\nset [xv v] to ((XV) * (drag))\n\nwhen flag clicked\nset [next level v] to [0]\npoint in direction (90)\nforever\n    if <touching (next level v)?> then\n        change [next level v] by (1)\n        broadcast (Next level v)\n        go to x: (-194) y: (-42)\n    end\n    if <touching (sptkes/lava v)?> then\n        go to x: (-194) y: (-45)\n        play sound [oof v] until done\n    end\n    if <touching (trampoline  v)?> then\n        change [bounce v] by (15)\n        wait (1) seconds\n        set [bounce v] to [14]\n    end\nend\n\n@Level\n\nwhen flag clicked\nswitch costume to (level1-2 v)\nforever\n    if <(Next Level) = [2]> then\n        switch costume to (costume1 v)\n    end\n    if <(Next Level) = [3]> then\n        switch costume to (level1-2 v)\n    end\n    if <(Next Level) = [4]> then\n        switch costume to (costume2 v)\n    end\n    if <(Next Level) = [5]> then\n        switch costume to (costume3 v)\n    end\n    if <(Next Level) = [6]> then\n        switch costume to (level3 v)\n    end\n    if <(Next Level) = [7]> then\n        switch costume to (costume4 v)\n    end\nend\n\n@Thumbnail \n\nwhen flag clicked\nset [ghost v] effect to (100)\n\ngo to x: (0) y: (-8)\nset [ghost v] effect to (0)\ngo to [front v] layer\n\n@Sptkes/Lava\n\nwhen flag clicked\nhide\nforever\n    if <(Next Level) = [1]> then\n        show\n        switch costume to (spikes-1 v)\n    else\n        if <(Next Level) = [2]> then\n            hide\n        else\n            if <(Next Level) = [3]> then\n                switch costume to (lava-1 v)\n                show\n            else\n                if <(Next Level) = [4]> then\n                    hide\n                else\n                    if <(Next Level) = [5]> then\n                        show\n                        switch costume to (costume1 v)\n                    else\n                        if <(Next Level) = [6]> then\n                            switch costume to (spikes-2 v)\n                            show\n                        else\n                            hide\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\n\n@Intro\n\ndefine Name (name)\nset [cloneid v] to [name]\nset [control v] to [-1]\nset [my y v] to [0]\nset [namelength v] to [0]\nset [num v] to [0]\nrepeat (length of (name))\n    change [num v] by (1)\n    set [letter v] to (letter (Num) of (name))\n    if <<<<(Letter) = [1]> or <(Letter) = [I]>> or <(Letter) = [i]>> or <(Letter) = [-]>> then\n        change [namelength v] by (20)\n    else\n        if < or <<(Letter) = [w]> or <(Letter) = [W]>>> then\n            change [namelength v] by (40)\n        else\n            change [namelength v] by (30)\n        end\n    end\nend\nset [my x v] to ((NameLength) / (-2))\nset [num v] to [0]\nrepeat (length of (name))\n    change [control v] by (1)\n    change [num v] by (1)\n    set [letter v] to (letter (Num) of (name))\n    if <<<<(Letter) = [1]> or <(Letter) = [I]>> or <(Letter) = [i]>> or <(Letter) = [-]>> then\n        change [my x v] by (12.5)\n    else\n        if <<<(Letter) = [m]> or <(Letter) = [M]>> or <<(Letter) = [w]> or <(Letter) = [W]>>> then\n            change [my x v] by (20)\n        else\n            change [my x v] by (15)\n        end\n    end\n    create clone of (_myself_ v)\n    if <<<<(Letter) = [1]> or <(Letter) = [I]>> or <(Letter) = [i]>> or <(Letter) = [-]>> then\n        change [my x v] by (12.5)\n    else\n        if <<<(Letter) = [m]> or <(Letter) = [M]>> or <<(Letter) = [w]> or <(Letter) = [W]>>> then\n            change [my x v] by (20)\n        else\n            change [my x v] by (15)\n        end\n    end\nend\n\nwhen flag clicked\nPlay Intro [BreadrGood]\n\ndefine Shock Wave\nshow\nset size to (0) %\nset [var v] to [10]\nrepeat (50)\n    change size by (((100) - (size)) / (8))\n    change [fisheye v] effect by (Var)\n    change [var v] by ((Var) * (0.2))\nend\nhide\nclear graphic effects\n\ndefine clone (id) (count)\nset [control v] to [-1]\nrepeat (count)\n    set [cloneid v] to (id)\n    change [control v] by (1)\n    create clone of (_myself_ v)\nend\n\nwhen I start as a clone\nif <(cloneID) = [name]> then\n    change [my y v] by (-240)\n    show\n    set [color v] effect to (75)\n    switch costume to (Letter)\n    point in direction (90)\n    forever\n        switch costume to (poshack v)\n        set [text_size v] to (size)\n        set [text_dir v] to ((360) - (((direction) + ((360) * <(direction) < [0]>)) - (90)))\n        set x to (((([cos v] of (text_dir) ) * (My x)) - (([sin v] of (text_dir) ) * (My y))) * ((text_size) / (100)))\n        set y to (((([sin v] of (text_dir) ) * (My x)) + (([cos v] of (text_dir) ) * (My y))) * ((text_size) / (100)))\n        switch costume to (Letter)\n    end\nend\n\nwhen I start as a clone\nif <(cloneID) = [Bar]> then\n    wait ((1) + ((control) * (0.1))) seconds\n    show\n    switch costume to (bar v)\n    set [color v] effect to (0)\n    go to x: ((-160) + ((control) * (160))) y: (365)\n    repeat (50)\n        change y by (((0) - (y position)) / (8))\n    end\nend\nif <(cloneID) = [Arrow]> then\n    wait (1.5) seconds\n    show\n    switch costume to (arrow v)\n    set [brightness v] effect to (100)\n    go to x: (0) y: (365)\n    repeat (50)\n        change y by (((0) - (y position)) / (8))\n    end\nend\nif <(cloneID) = [Arrow2]> then\n    wait (6) seconds\n    show\n    set [color v] effect to (0)\n    switch costume to (arrow v)\n    go to x: (0) y: (365)\n    repeat (50)\n        change y by (((0) - (y position)) / (8))\n    end\nend\n\nwhen I start as a clone\nif <(cloneID) = [shockwave]> then\n    wait ((2) + ((control) * (0.2))) seconds\n    show\n    switch costume to (shockwave 1 v)\n    set [color v] effect to (0)\n    go to x: ((-100) + ((control) * (200))) y: ((-120) + ((control) * (240)))\n    Shock Wave\n    wait (3) seconds\n    show\n    switch costume to (shockwave 1 v)\n    set [brightness v] effect to (100)\n    go to x: ((-100) + ((control) * (200))) y: ((-120) + ((control) * (240)))\n    Shock Wave\nend\n\nwhen I start as a clone\nif <(cloneID) = [name]> then\n    wait ((2) + ((control) * (0.05))) seconds\n    set [var v] to [0]\n    repeat until <(timer) > [4]>\n        set [var v] to ((((0) - (y position)) / (5)) + ((Var) * (0.7)))\n        change [my y v] by (Var)\n    end\n    if <((control) mod (2)) = [0]> then\n        point in direction (91)\n        repeat until <(timer) > [6]>\n            turn right (([abs v] of ((90) - (direction)) ) / (5)) degrees\n        end\n    else\n        point in direction (89)\n        repeat until <(timer) > [6]>\n            turn left (([abs v] of ((90) - (direction)) ) / (5)) degrees\n        end\n    end\n    wait ((control) * (0.05)) seconds\n    set [var v] to [30]\n    repeat until <(timer) > [7.7]>\n        set [var v] to ((((0) - (y position)) / (5)) + ((Var) * (0.8)))\n        change [my y v] by (Var)\n    end\n    if <((control) mod (2)) = [0]> then\n        point in direction (89)\n        repeat until <(timer) > [9.7]>\n            turn left (([abs v] of ((90) - (direction)) ) / (5)) degrees\n        end\n    else\n        point in direction (91)\n        repeat until <(timer) > [9.7]>\n            turn right (([abs v] of ((90) - (direction)) ) / (5)) degrees\n        end\n    end\n    repeat (20)\n        change size by (((50) - (size)) / (6))\n    end\n    repeat (20)\n        change size by (((100) - (size)) / (6))\n        turn right (((105) - (direction)) / (6)) degrees\n    end\nend\n\nwhen I start as a clone\nif < (cloneID) contains [Bubble]?> then\n    wait ((2.5) + (pick random (0.0) to (8.0))) seconds\n    if <(timer) > [5.5]> then\n        set [brightness v] effect to (100)\n    else\n        set [color v] effect to (0)\n    end\n    switch costume to (square v)\n    set [ghost v] effect to (50)\n    show\n    point in direction (pick random (1) to (360))\n    repeat until <<([abs v] of (x position) ) > [300]> or <([abs v] of (y position) ) > [240]>>\n        set size to (([sqrt v] of (((x position) * (x position)) + ((y position) * (y position))) ) * (0.8)) %\n        move (3) steps\n    end\n    delete this clone\nend\n\nwhen I start as a clone\nif <(cloneID) = [Rotator]> then\n    wait (4) seconds\n    show\n    switch costume to (sizehack v)\n    set size to (100) %\n    switch costume to (rotator7 v)\n    set [color v] effect to (0)\n    set [brightness v] effect to (20)\n    point in direction (91)\n    repeat (7)\n        turn right (([abs v] of ((90) - (direction)) ) / (5)) degrees\n        switch costume to (join [Rotator] ((letter (8) of (costume [name v])) + (-1)))\n    end\n    repeat (32)\n        turn right (([abs v] of ((90) - (direction)) ) / (5)) degrees\n    end\n    repeat (7)\n        turn right (([abs v] of ((90) - (direction)) ) / (5)) degrees\n        switch costume to (join [Rotator] ((letter (8) of (costume [name v])) + (1)))\n    end\n    hide\n    wait (2.2) seconds\n    show\n    switch costume to (rotator7 v)\n    set [brightness v] effect to (100)\n    point in direction (91)\n    repeat (7)\n        turn right (([abs v] of ((90) - (direction)) ) / (5)) degrees\n        switch costume to (join [Rotator] ((letter (8) of (costume [name v])) + (-1)))\n    end\n    repeat (32)\n        turn right (([abs v] of ((90) - (direction)) ) / (5)) degrees\n    end\n    repeat (7)\n        turn right (([abs v] of ((90) - (direction)) ) / (5)) degrees\n        switch costume to (join [Rotator] ((letter (8) of (costume [name v])) + (1)))\n    end\n    hide\nend\n\nwhen I start as a clone\nif <(cloneID) = [name]> then\n    wait until <(timer) > [6.1]>\n    set [brightness v] effect to (100)\nend\n\nwhen I start as a clone\nif <(cloneID) = [End]> then\n    wait until <(timer) > [9.7]>\n    wait ((control) * (0.4)) seconds\n    show\n    set [brightness v] effect to (100)\n    set [ghost v] effect to (50)\n    switch costume to (arrow v)\n    if <(control) = [0]> then\n        point in direction (90)\n        go to x: (0) y: (365)\n    else\n        point in direction (-90)\n        go to x: (0) y: (-365)\n    end\n    repeat (50)\n        change y by (((0) - (y position)) / (8))\n    end\nend\n\nwhen I start as a clone\nwait until <(timer) > [10.5]>\nrepeat (10)\n    change [brightness v] effect by (10)\nend\nrepeat (10)\n    change [ghost v] effect by (10)\nend\ndelete this clone\n\ndefine Play Intro (name)\nset [var v] to [0]\nset [text_size v] to [100]\nset [text_dir v] to [0]\nhide\nswitch costume to (sizehack v)\nstart sound [Tobu - Pinball v]\nreset timer\nhide\nset size to (100) %\ngo to x: (0) y: (0)\npoint in direction (90)\nclone [Bar] [3]\nclone [Arrow] [1]\nclone [Arrow2] [1]\nclone [Bubble] [50]\nclone [shockwave] [2]\nclone [Rotator] [1]\nif <(username) = []> then\n    Name [Template]\nelse\n    Name (name)\nend\nclone [End] [2]\n\n@Next Level\n\nwhen flag clicked\nset [ghost v] effect to (100)\n\n@Trampoline \n\nwhen flag clicked\nhide\nforever\n    if <(Next Level) = [3]> then\n        switch costume to (costume1 v)\n        show\n    else\n        if <(Next Level) = [4]> then\n            switch costume to (costume2 v)\n            show\n        else\n            hide\n        end\n    end\nend\n\n