dungeon platformer
@Stage\n\nwhen flag clicked\nforever\n    play sound [Odesong v] until done\nend\n\n@Player\n\nwhen flag clicked\nhide variable [deaths v]\nset [ghost v] effect to (0)\nhide\nshow\nstart \n\nwhen I receive [next level v]\nbroadcast (restart v)\nset volume to (100) %\n\nwhen I receive [restart v]\nset [x_velocity v] to [0]\nset [y_velocity v] to [0]\ngo to x: (-213) y: (-59)\n\ndefine Respawn\nbroadcast (restart v)\nstart sound (pick random (1) to (2))\n\nwhen [timer v] > (0.1)\nhide\nhide variable [deaths v]\n\nwhen flag clicked\nif <(L_eve_l) = [11]> then\n    show variable [deaths v]\nend\n\ndefine start \nset [deaths v] to [0]\nset [l_eve_l v] to [1]\nbroadcast (restart v)\nforever\n    if <<key (left arrow v) pressed?> or <<key (a v) pressed?> or <<mouse down?> and <(mouse x) < (x position)>>>> then\n        if <<(Love) = [1]> and <(Fave) = [1]>> then\n            switch costume to (cube type 2 v)\n        else\n            switch costume to ( v)\n        end\n        change [x_velocity v] by (-1)\n    end\n    if <<key (right arrow v) pressed?> or <<key (d v) pressed?> or <<mouse down?> and <(x position) < (mouse x)>>>> then\n        change [x_velocity v] by (1)\n    end\n    set [x_velocity v] to ((X_VELOCITY) * (0.9))\n    if <<(Love) = [1]> and <(Fave) = [1]>> then\n        switch costume to (cube type 2 v)\n    else\n        switch costume to ( v)\n    end\n    change x by (X_VELOCITY)\n    if <<touching (flying platform v)?> or <touching (platform v)?>> then\n        change y by (1)\n    end\n    if <<touching (platform v)?> or <touching (flying platform v)?>> then\n        change y by (1)\n    end\n    if <<touching (platform v)?> or <touching (flying platform v)?>> then\n        change y by (1)\n    end\n    if <<touching (platform v)?> or <touching (flying platform v)?>> then\n        change y by (1)\n    end\n    if <<touching (platform v)?> or <touching (flying platform v)?>> then\n        change y by (-4)\n        change x by ((X_VELOCITY) * (-1))\n        if <<key (up arrow v) pressed?> or <<key (w v) pressed?> or <<mouse down?> and <(y position) < ((mouse y) - (30))>>>> then\n            if <(X_VELOCITY) > [0]> then\n                set [x_velocity v] to [-10]\n            else\n                set [x_velocity v] to [10]\n            end\n            set [y_velocity v] to [15]\n        else\n            set [x_velocity v] to [0]\n        end\n    end\n    change [y_velocity v] by (-1)\n    change y by (Y_VELOCITY)\n    if <<touching (platform v)?> or <touching (flying platform v)?>> then\n        change y by ((Y_VELOCITY) - ((Y_VELOCITY) * (2)))\n        set [y_velocity v] to [0]\n    end\n    change y by (-1)\n    if <<<key (up arrow v) pressed?> or <<key (w v) pressed?> or <<mouse down?> and <(y position) < ((mouse y) - (30))>>>> and <<touching (platform v)?> or <touching (flying platform v)?>>> then\n        set [y_velocity v] to [15]\n    end\n    change y by (1)\n    if <(x position) > [239]> then\n        change [l_eve_l v] by (1)\n        broadcast (next level v) and wait\n    end\n    if <<<touching (spikes v)?> or <touching (spike player?? v)?>> or <touching (lava v)?>> then\n        Respawn\n        change [deaths v] by (1)\n    end\nend\n\nwhen I start as a clone\nset [ghost v] effect to (50)\nif <<(Love) = [1]> and <(Fave) = [1]>> then\n    switch costume to (cube effect type 2 v)\nelse\n    switch costume to (cube effect type 1 v)\nend\nrepeat (10)\n    change size by (-10)\n    change [ghost v] effect by (5)\nend\ndelete this clone\n\nwhen flag clicked\nforever\n    create clone of (_myself_ v)\nend\n\nwhen flag clicked\nforever\n    if <<(Love) = [1]> and <(Fave) = [1]>> then\n        switch costume to (cube type 2 v)\n        change [color v] effect by (1)\n    else\n        switch costume to ( v)\n        set [color v] effect to (0)\n    end\nend\n\n@platform\n\nwhen flag clicked\nset [win? v] to [0]\ngo to x: (6) y: (-65)\nhide\nshow\nforever\n    switch costume to (L_eve_l)\nend\n\nwhen [timer v] > (0.1)\nhide\n\nwhen flag clicked\nif <(L_eve_l) = [11]> then\n    go to [front v] layer\nend\n\nwhen flag clicked\nforever\n    if <(costume [number v]) = [11]> then\n        set [win? v] to [1]\n    end\nend\n\nstop [all v]\n\nbroadcast (next level v)\n\nset [l_eve_l v] to [11]\n\n@spikes\n\nwhen flag clicked\ngo to [back v] layer\ngo to x: (42) y: (28)\nshow\nforever\n    switch costume to (L_eve_l)\nend\n\nwhen [timer v] > (0.1)\nhide\n\n@lava\n\nwhen flag clicked\ngo to [back v] layer\ngo to x: (42) y: (28)\nshow\nforever\n    switch costume to (L_eve_l)\nend\n\nwhen [timer v] > (0.1)\nhide\n\nwhen flag clicked\nforever\n    glide (1) secs to x: (42) y: (18)\n    glide (1) secs to x: (42) y: (28)\nend\n\n@screen2\n\nwhen flag clicked\nset [ghost v] effect to (100)\ngo to x: (0) y: (15)\nforever\n    go to [front v] layer\n    reset timer\nend\n\ngo to [front v] layer\n\nwhen [timer v] > (0.04)\ngo to x: (0) y: (15)\nswitch costume to (size hack v)\nset size to (500) %\nswitch costume to (by katana gaming5 v)\nset [mosaic v] effect to (0)\nset [brightness v] effect to (0)\nset [pixelate v] effect to (80)\nset [brightness v] effect to (80)\nrepeat (10)\n    switch costume to (size hack v)\n    change size by (() - ((size) / (10)))\n    switch costume to (by katana gaming5 v)\n    change [brightness v] effect by (-8)\n    change [pixelate v] effect by (-8)\nend\nrepeat (10)\n    switch costume to (size hack v)\n    change size by (() - ((size) / (10)))\n    switch costume to (by katana gaming5 v)\nend\n\n@Love\n\nwhen flag clicked\nhide variable [fave v]\nhide variable [love v]\nset [fave v] to [0]\nset [love v] to [0]\nforever\n    if <touching (mouse-pointer v)?> then\n        set [love v] to [1]\n    end\nend\n\n@Fav\n\nwhen flag clicked\nset [fave v] to [0]\nset [love v] to [0]\nforever\n    if <touching (mouse-pointer v)?> then\n        set [fave v] to [1]\n    end\nend\n\n@Like&fav pls\n\nwhen flag clicked\nshow\ngo to x: (170) y: (146)\nset y to (202)\nrepeat (10)\n    change y by (-3)\nend\nrepeat (10)\n    change y by (-1.5)\nend\nrepeat (10)\n    change y by (-0.5)\nend\nwait (2) seconds\nif <<(Love) = [1]> and <(Fave) = [1]>> then\nbroadcast (back v)\nrepeat (10)\n    change y by (3)\nend\nrepeat (10)\n    change y by (1.5)\nend\nrepeat (10)\n    change y by (0.5)\nend\n\nhide\n\nwhen flag clicked\nplay sound [High Whoosh v] until done\n\nwhen I receive [back v]\nplay sound [High Whoosh v] until done\n\n@spike player??\n\nwhen flag clicked\nforever\n    if <(L_eve_l) = [1]> then\n        show\n        go to x: (70) y: (-100)\n        repeat (25)\n            change x by (5)\n        end\n        repeat (25)\n            change x by (-5)\n        end\n    end\nend\n\nwhen flag clicked\nforever\n    if <(L_eve_l) = [2]> then\n        hide\n    end\nend\n\nwhen flag clicked\nforever\n    if <(L_eve_l) = [3]> then\n        hide\n    end\nend\n\nwhen flag clicked\nforever\n    if <(L_eve_l) = [4]> then\n        hide\n    end\nend\n\nwhen flag clicked\nforever\n    if <(L_eve_l) = [5]> then\n        hide\n    end\nend\n\nwhen flag clicked\nforever\n    if <(L_eve_l) = [6]> then\n        hide\n    end\nend\n\nwhen flag clicked\nforever\n    if <(L_eve_l) = [7]> then\n        hide\n    end\nend\n\nwhen flag clicked\nforever\n    if <(L_eve_l) = [8]> then\n        show\n        go to x: (92) y: (-37)\n        repeat (20)\n            change x by (3)\n        end\n        wait (0.5) seconds\n        repeat (20)\n            change x by (-3)\n        end\n        wait (0.5) seconds\n    end\nend\n\nwhen flag clicked\nforever\n    if <(L_eve_l) = [9]> then\n        hide\n    end\nend\n\nwhen flag clicked\nforever\n    if <(L_eve_l) = [11]> then\n        hide\n    end\nend\n\nwhen flag clicked\nforever\n    if <(L_eve_l) = [10]> then\n        hide\n    end\nend\n\nset [l_eve_l v] to [9]\n\nset [l_eve_l v] to [8]\n\n@flying platform\n\nwhen flag clicked\nforever\n    if <(L_eve_l) = [1]> then\n        hide\n    end\nend\n\ngo to x: (70) y: (-100)\nrepeat (25)\n    change x by (5)\nend\nrepeat (25)\n    change x by (-5)\nend\n\nwhen flag clicked\nforever\n    if <(L_eve_l) = [2]> then\n        hide\n    end\nend\n\nwhen flag clicked\nforever\n    if <(L_eve_l) = [3]> then\n        hide\n    end\nend\n\nwhen flag clicked\nforever\n    if <(L_eve_l) = [4]> then\n        hide\n    end\nend\n\nwhen flag clicked\nset size to (90) %\nforever\n    if <(L_eve_l) = [6]> then\n        show\n        go to x: (91) y: (-28)\n        repeat (30)\n            change x by (3)\n        end\n        repeat (30)\n            change x by (-3)\n        end\n    end\nend\n\nwhen flag clicked\nforever\n    if <(L_eve_l) = [5]> then\n        hide\n    end\nend\n\nbroadcast (restart v)\nset [l_eve_l v] to [7]\n\nwhen flag clicked\nforever\n    if <(L_eve_l) = [7]> then\n        show\n        go to x: (85) y: (53)\n        repeat (30)\n            change x by (3)\n        end\n        repeat (30)\n            change x by (-3)\n        end\n    end\nend\n\nwhen flag clicked\nforever\n    if <(L_eve_l) = [8]> then\n        hide\n    end\nend\n\nwhen flag clicked\nforever\n    if <(L_eve_l) = [9]> then\n        hide\n    end\nend\n\nwhen flag clicked\nforever\n    if <(L_eve_l) = [10]> then\n        hide\n    end\nend\n\nwhen flag clicked\nforever\n    if <(L_eve_l) = [11]> then\n        hide\n    end\nend\n\n@-\n\nset [l_eve_l v] to [11]\n\nwhen flag clicked\nhide\nforever\n    if <(L_eve_l) = [11]> then\n        create clone of (_myself_ v)\n    end\nend\n\nwhen I start as a clone\nshow\nset [ghost v] effect to (pick random (0) to (50))\nset size to (50) %\npoint in direction (180)\ngo to x: (pick random (-200) to (170)) y: (200)\nrepeat until <<touching (platform v)?> or <touching (spikes v)?>>\n    move (5) steps\nend\nchange y by (5)\nwait (2) seconds\ndelete this clone\n\nwhen I receive [next level v]\ndelete this clone\n\nwhen I start as a clone\nrepeat until <<touching (platform v)?> or <touching (spikes v)?>>\n    repeat (pick random (1) to (10))\n        turn right (pick random (1) to (10)) degrees\n    end\n    repeat (pick random (1) to (10))\n        turn left (pick random (1) to (10)) degrees\n    end\nend\n\n@Xmas textures\n\nwhen flag clicked\nhide\n\n@Xmas hat\n\nwhen flag clicked\nswitch costume to (костюм 2 v)\ngo to [front v] layer\nset size to (150) %\nswitch costume to (костюм 1 v)\nforever\n    go to (player v)\nend\n\n@candy\n\nwhen flag clicked\nshow\nset size to (100) %\ngo to x: (0) y: (120)\nset [candy v] to [0]\nset [special/sweet v] to [0]\ngo to [front v] layer\nforever\n    if <touching (player v)?> then\n        hide\n        set size to (50) %\n        glide (0.1) secs to (player v)\n        set [special/sweet v] to [100]\n        change [candy v] by (1)\n        broadcast (take v)\n        start sound [Finger Snap v]\n    end\nend\n\nwhen flag clicked\nforever\n    point in direction (90)\n    repeat (10)\n        turn right (1) degrees\n    end\n    repeat (10)\n        turn left (1) degrees\n    end\nend\n\nwhen flag clicked\nforever\n    set [ghost v] effect to (special/sweet)\nend\n\nwhen I receive [next level v]\nset [special/sweet v] to [0]\nshow\nset size to (100) %\nif <(L_eve_l) = [2]> then\n    set [special/sweet v] to [0]\n    go to x: (-112) y: (146)\nend\nif <(L_eve_l) = [3]> then\n    set [special/sweet v] to [0]\n    go to x: (-84) y: (120)\nend\nif <(L_eve_l) = [4]> then\n    set [special/sweet v] to [0]\n    go to x: (15) y: (100)\nend\nif <(L_eve_l) = [5]> then\n    set [special/sweet v] to [0]\n    go to x: (-150) y: (100)\nend\nif <(L_eve_l) = [6]> then\n    go to x: (5) y: (115)\n    set [special/sweet v] to [0]\nend\nif <(L_eve_l) = [7]> then\n    go to x: (153) y: (-55)\n    set [special/sweet v] to [0]\nend\nif <(L_eve_l) = [8]> then\n    go to x: (200) y: (45)\n    set [special/sweet v] to [0]\nend\nif <(L_eve_l) = [9]> then\n    go to x: (190) y: (-95)\n    set [special/sweet v] to [0]\nend\nif <(L_eve_l) = [10]> then\n    go to x: (20) y: (58)\n    set [special/sweet v] to [0]\nend\nif <(L_eve_l) = [11]> then\n    hide\n    go to x: (400) y: (200)\n    set [special/sweet v] to [0]\nend\n\nset [l_eve_l v] to [7]\n\n@lightning\n\nwhen flag clicked\nset size to (100) %\nforever\n    set size to (100) %\n    go to (candy v)\n    change y by (10)\n    repeat (10)\n        turn right (5) degrees\n        change size by (-2)\n    end\n    repeat (10)\n        turn right (5) degrees\n        change size by (2)\n    end\nend\n\nwhen flag clicked\nforever\n    set [ghost v] effect to (special/sweet)\nend\n\n@candy count\n\nwhen flag clicked\ngo to x: (305) y: (-145)\nhide\n\nwhen I receive [take v]\nshow\nswitch costume to (candy)\nset [ghost v] effect to (20)\ngo to x: (305) y: (-145)\nrepeat (10)\n    change x by (-10)\nend\nrepeat (10)\n    change x by (-5)\nend\nrepeat (5)\n    change x by (-1)\nend\nwait (0.3) seconds\nrepeat (5)\n    change x by (2.5)\nend\nrepeat (10)\n    change x by (5)\nend\nrepeat (10)\n    change x by (10)\nend\nhide\n\nwhen I receive [take v]\nif <(candy) = [10]> then\n    play sound [Coin v] until done\nend\n\nbroadcast (take v)\nset [candy v] to [10]\n\n
credit to @-Katana_Gaming- for the og    \n1500 views!