Adventure Platformer WIP
@Stage\n\n@platformer\n\nwhen flag clicked\nset [invisible v] to [0]\nhide variable [x v]\nhide variable [y v]\nset [x v] to [0]\nset [y v] to [0]\nset [level v] to [1]\nset [yy v] to [-1]\nset [xx v] to [1]\nset [v v] to [0]\nset [startpointx v] to [-165]\nset [startpointy v] to [-133]\nset [deaths v] to [0]\nhide variable [deaths v]\nhide variable [level v]\nswitch backdrop to (backdrop1 v)\nshow\ngo to x: (startpointx) y: (startpointy)\nset [xv v] to [0]\nset [yv v] to [0]\nset [ehee v] to [0]\nforever\n    go to [front v] layer\n    change [yv v] by (-1)\n    if <<key (right arrow v) pressed?> or <key (d v) pressed?>> then\n        change [xv v] by (3)\n    end\n    if <<key (left arrow v) pressed?> or <key (a v) pressed?>> then\n        change [xv v] by (-3)\n    end\n    set [xv v] to ((Xv) * (0.7))\n    if <touching (secret v)?> then\n        set [ghost v] to [1]\n    else\n        set [ghost v] to [0]\n    end\n    change x by (Xv)\n    if <touching (secret v)?> then\n        set [ghost v] to [1]\n    else\n        set [ghost v] to [0]\n    end\n    if <touching color (#000008)?> then\n        change y by (1)\n        if <touching color (#000008)?> then\n            change y by (1)\n            if <touching color (#000008)?> then\n                change y by (1)\n                if <touching color (#000008)?> then\n                    change y by (1)\n                    if <touching color (#000008)?> then\n                        change y by (1)\n                        if <touching color (#000008)?> then\n                            change x by ((Xv) * (-1))\n                            change x by (-1)\n                            change y by (-5)\n                            change x by (1)\n                        end\n                    end\n                end\n            end\n        end\n    end\n    change y by (Yv)\n    if <touching color (#000008)?> then\n        change y by ((Yv) * (-1))\n        set [yv v] to [0]\n    end\n    change y by (-1)\n    if <touching color (#000008)?> then\n        if <<key (up arrow v) pressed?> or <key (w v) pressed?>> then\n            set [yv v] to [15]\n        end\n    end\n    change y by (1)\n    if <touching (invisible v)?> then\n        change y by (1)\n        if <touching (invisible v)?> then\n            change y by (1)\n            if <touching (invisible v)?> then\n                change y by (1)\n                if <touching (invisible v)?> then\n                    change y by (1)\n                    if <touching (invisible v)?> then\n                        change y by (1)\n                        if <touching (invisible v)?> then\n                            change x by ((Xv) * (-1))\n                            change x by (-1)\n                            change y by (-5)\n                            change x by (1)\n                        end\n                    end\n                end\n            end\n        end\n    end\n    if <touching (invisible v)?> then\n        change y by ((Yv) * (-1))\n        set [yv v] to [0]\n    end\n    change y by (-1)\n    if <touching (invisible v)?> then\n        if <<key (up arrow v) pressed?> or <key (w v) pressed?>> then\n            set [yv v] to [15]\n        end\n    end\n    change y by (1)\n    if <touching color (#ff0000)?> then\n        if <touching (secret v)?> then\n            set [ghost v] to [1]\n        else\n            set [ghost v] to [0]\n            set [ghost v] to [0]\n            change [deaths v] by (1)\n            go to x: (startpointx) y: (startpointy)\n            set [xv v] to [0]\n            set [yy v] to [0]\n        end\n    end\n    if <touching color (#400000)?> then\n        set [ghost v] to [0]\n        set [ghost v] to [0]\n        change [deaths v] by (1)\n        go to x: (startpointx) y: (startpointy)\n        set [xv v] to [0]\n        set [yy v] to [0]\n    end\n    if <(y position) < [-210]> then\n        go to x: (startpointx) y: (startpointy)\n    end\n    if <[241] < (x position)> then\n        go to x: (startpointx) y: (startpointy)\n        set [xv v] to [0]\n        set [yy v] to [0]\n        broadcast (next v)\n        if <(invisible) = [0]> then\n            change [level v] by (1)\n            switch backdrop to (next backdrop v)\n        end\n        if <(invisible) = [1]> then\n            switch backdrop to (backdrop21 v)\n            change [level v] by (1)\n        end\n    end\n    if <(backdrop [number v]) = [18]> then\n        set [invisible v] to [1]\n    end\n    if <touching color (#00ffff)?> then\n        if <key (up arrow v) pressed?> then\n            set [yv v] to [8]\n        else\n            set [yv v] to [-1.5]\n        end\n    end\n    if <touching color (#ff00ce)?> then\n        set [yv v] to [22]\n    end\n    if <touching color (#ff4f00)?> then\n        set [yv v] to [-22]\n    end\n    if <touching color (#00ff1c)?> then\n        set [xv v] to [80]\n    end\n    if <touching color (#4f00ff)?> then\n        set [xv v] to [-80]\n    end\nend\n\n@volcano\n\nwhen flag clicked\nhide\nwait until <(backdrop [number v]) = [3]>\nrepeat (100)\n    create clone of (_myself_ v)\nend\n\nwhen I start as a clone\ngo to (random position v)\nset y to (200)\nrepeat (80)\n    show\n    go to [back v] layer\n    change y by (-5)\nend\ndelete this clone\n\n@invisible\n\nwhen flag clicked\ngo to x: (0) y: (0)\nhide\nwait until <(invisible) = [1]>\nwait until <(costume [number v]) = [8]>\nset [invisible v] to [0]\nhide\nnext backdrop\n\nwhen I receive [next v]\nif <(backdrop [number v]) = [18]> then\n    switch backdrop to (backdrop20 v)\n    show\n    switch costume to (costume1 v)\n    wait (1) seconds\n    next costume\n    switch costume to (costume2 v)\nelse\n    go to [front v] layer\n    next costume\n    wait (1) seconds\n    next costume\nend\n\n@SECRET\n\nwhen flag clicked\ngo to x: (0) y: (0)\nhide\nwait until <(ghost) = [1]>\nwait until <(ghost) = [0]>\nwait until <(costume [number v]) = [6]>\nhide\n\nwhen I receive [next v]\ngo to [front v] layer\nnext costume\nif <(backdrop [number v]) = [21]> then\n    switch costume to (1 v)\n    show\nend\n\nwhen flag clicked\nforever\n    go to [front v] layer\n    if <<touching (platformer v)?> or <(ghost) = [1]>> then\n        set [ghost v] effect to (25)\n    else\n        set [ghost v] effect to (0)\n    end\nend\n\n@Backdrop 3\n\nwhen flag clicked\ngo to x: (0) y: (0)\nhide\nforever\n    if <(backdrop [number v]) = [3]> then\n        show\n        go to [front v] layer\n    else\n        hide\n    end\nend\n\n@platformSTUFF\n\nwhen flag clicked\nhide\nswitch costume to (purple_easter_egg_with_flowers_png_picture v)\ngo to x: (0) y: (0)\nforever\n    if <(backdrop [number v]) = [26]> then\n        wait until <key (e v) pressed?>\n        wait until <key (a v) pressed?>\n        wait until <key (s v) pressed?>\n        wait until <key (t v) pressed?>\n        wait until <key (e v) pressed?>\n        wait until <key (r v) pressed?>\n        switch costume to (purple_easter_egg_with_flowers_png_picture2 v)\n        show\n        change [color v] effect by (5)\n        go to [front v] layer\n    else\n        hide\n    end\nend\n\n
WIP Work in progress\nSPAM FLAG BEFORE STARTING!