Erased- A Platformer

Instructions: Use the arrow keys to move. Hold up arrow on a wall to wall jump. Avoid red. Get to the goal.

@Stage\n\n@Arse\n\nwhen flag clicked\nswitch costume to (costume2 v)\ngo to x: (-215) y: (137)\nset [delete v] to [0]\nset [yv v] to [0]\nset [xv v] to [0]\nbroadcast (reset lock v)\nwait (1) seconds\nforever\n    switch costume to (costume3 v)\n    change [yv v] by (-0.5)\n    if <<key (right arrow v) pressed?> or <key (d v) pressed?>> then\n        change [xv v] by (0.7)\n    end\n    if <<key (left arrow v) pressed?> or <key (a v) pressed?>> then\n        change [xv v] by (-0.7)\n    end\n    set [xv v] to ((Xv) * (0.9))\n    change x by (Xv)\n    if <touching color (#ffffff)?> then\n        change y by (1)\n        if <touching color (#ffffff)?> then\n            change y by (1)\n            if <touching color (#ffffff)?> then\n                change y by (1)\n                if <touching color (#ffffff)?> then\n                    change y by (1)\n                    if <touching color (#ffffff)?> then\n                        change y by (1)\n                        if <touching color (#ffffff)?> then\n                            change x by ((Xv) * (-1))\n                            change x by (-1)\n                            change y by (-5)\n                            change x by (1)\n                            if <touching (platform v)?> then\n                                change x by (Change)\n                            end\n                            if <<key (up arrow v) pressed?> or <key (w v) pressed?>> then\n                                if <(Xv) > [0]> then\n                                    set [xv v] to [-8]\n                                else\n                                    set [xv v] to [8]\n                                end\n                                set [yv v] to [10]\n                            else\n                                set [xv v] to [0]\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\n    change y by (Yv)\n    if <touching color (#ffffff)?> then\n        change y by ((Yv) * (-1))\n        set [yv v] to [0]\n    end\n    change y by (-1)\n    if <touching (platform v)?> then\n        change x by (Change)\n    end\n    if <touching color (#ffffff)?> then\n        if <<key (up arrow v) pressed?> or <key (w v) pressed?>> then\n            set [yv v] to [10]\n        end\n    end\n    change y by (1)\n    if <touching (teleporter 1 v)?> then\n        set [yv v] to [10]\n        go to x: ([x position v] of [teleporter 2 v]) y: (([y position v] of [teleporter 2 v]) + (20))\n    end\n    if <touching (teleporter 2 v)?> then\n        set [yv v] to [10]\n        go to x: ([x position v] of [teleporter 1 v]) y: (([y position v] of [teleporter 1 v]) + (20))\n    end\n    if <touching (teleporter 3 v)?> then\n        set [yv v] to [10]\n        go to x: ([x position v] of [teleporter 4 v]) y: (([y position v] of [teleporter 4 v]) + (20))\n    end\n    if <touching (teleporter 4 v)?> then\n        set [yv v] to [10]\n        go to x: ([x position v] of [teleporter 3 v]) y: (([y position v] of [teleporter 3 v]) + (20))\n    end\n    if <touching color (#ff0000)?> then\n        set [yv v] to [0]\n        set [xv v] to [0]\n        switch costume to (costume2 v)\n        go to x: (-215) y: (137)\n        broadcast (reset lock v)\n        set [delete v] to [1]\n        wait (1) seconds\n        set [delete v] to [0]\n    end\n    if <<touching (goal v)?> and <(lock) = [unlocked]>> then\n        broadcast (next level v) and wait\n    end\n    switch costume to (costume2 v)\nend\n\nwhen flag clicked\nforever\n    change [color v] effect by (1)\nend\n\nwhen I receive [next level v]\nchange [level v] by (1)\nset [yv v] to [0]\nset [xv v] to [0]\nswitch costume to (costume2 v)\ngo to x: (-215) y: (137)\nbroadcast (reset lock v)\nset [delete v] to [1]\nwait (1) seconds\nset [delete v] to [0]\n\n@Sprite2\n\nwhen flag clicked\nforever\n    hide\n    go to x: ([x position v] of [arse v]) y: (([y position v] of [arse v]) - (17))\n    if <touching color (#ffffff)?> then\n        create clone of (_myself_ v)\n    end\nend\n\nwhen I start as a clone\nset [ghost v] effect to (100)\nwait (0.03) seconds\nshow\nrepeat (10)\n    change [ghost v] effect by (-10)\nend\nwait until <(delete) = [1]>\ndelete this clone\n\n@Sprite1\n\nwhen flag clicked\nset [brightness v] effect to (0)\ngo [backward v] (999) layers\ngo to x: (0) y: (0)\nshow\nforever\n    switch costume to (level)\nend\n\nset [level v] to [1]\n\nset [level v] to [7]\n\nset [level v] to [6]\n\nset [level v] to [5]\n\nset [level v] to [10]\n\nset [level v] to [11]\n\n@Goal\n\nwhen flag clicked\nforever\n    turn right (1) degrees\n    go to x: (item (level) of [goal x v]) y: (item (level) of [goal y v])\nend\n\ndelete (last) of [goal x v]\ndelete (last) of [goal y v]\n\nadd (x position) to [goal x v]\nadd (y position) to [goal y v]\n\nwhen flag clicked\nforever\n    repeat (50)\n        if <(lock) = [locked]> then\n            switch costume to (costume3 v)\n            set [color v] effect to (0)\n        else\n            switch costume to (costume2 v)\n            change [color v] effect by (1)\n        end\n    end\n    repeat (50)\n        if <(lock) = [locked]> then\n            switch costume to (costume3 v)\n            set [color v] effect to (0)\n        else\n            switch costume to (costume2 v)\n            change [color v] effect by (-1)\n        end\n    end\nend\n\n@Key\n\nwhen flag clicked\nforever\n    turn right (1) degrees\nend\n\nwhen I receive [reset lock v]\nset [ghost v] effect to (0)\nif <(level) = [5]> then\n    set [lock v] to [locked]\n    go to x: (223) y: (17)\n    show\n    wait until <touching (arse v)?>\n    set [lock v] to [unlocked]\n    repeat (10)\n        change [ghost v] effect by (10)\n    end\n    hide\n    set [ghost v] effect to (0)\n    wait until <not <(level) = [5]>>\n    wait (0.08) seconds\nelse\n    hide\n    set [lock v] to [unlocked]\nend\nif <(level) = [6]> then\n    set [lock v] to [locked]\n    go to x: (227) y: (-102)\n    show\n    wait until <touching (arse v)?>\n    set [lock v] to [unlocked]\n    repeat (10)\n        change [ghost v] effect by (10)\n    end\n    hide\n    set [ghost v] effect to (0)\n    wait until <not <(level) = [6]>>\n    wait (0.08) seconds\nelse\n    hide\n    set [lock v] to [unlocked]\nend\nif <(level) = [8]> then\n    set [lock v] to [locked]\n    go to x: (218) y: (-112)\n    show\n    wait until <touching (arse v)?>\n    set [lock v] to [unlocked]\n    repeat (10)\n        change [ghost v] effect by (10)\n    end\n    hide\n    set [ghost v] effect to (0)\n    wait until <not <(level) = [8]>>\n    wait (0.08) seconds\n    set [lock v] to [unlocked]\nelse\n    hide\n    set [lock v] to [unlocked]\nend\nif <(level) = [9]> then\n    set [lock v] to [locked]\n    go to x: (223) y: (120)\n    show\n    wait until <touching (arse v)?>\n    set [lock v] to [unlocked]\n    repeat (10)\n        change [ghost v] effect by (10)\n    end\n    hide\n    set [ghost v] effect to (0)\n    wait until <not <(level) = [9]>>\n    wait (0.08) seconds\n    set [lock v] to [unlocked]\nelse\n    hide\n    set [lock v] to [unlocked]\nend\nif <(level) = [10]> then\n    set [lock v] to [locked]\n    go to x: (38) y: (-9)\n    show\n    wait until <touching (arse v)?>\n    set [lock v] to [unlocked]\n    repeat (10)\n        change [ghost v] effect by (10)\n    end\n    hide\n    set [ghost v] effect to (0)\n    wait until <not <(level) = [10]>>\n    wait (0.08) seconds\n    set [lock v] to [unlocked]\nelse\n    hide\n    set [lock v] to [unlocked]\nend\nif <(level) = [11]> then\n    set [lock v] to [locked]\n    go to x: (212) y: (-69)\n    show\n    wait until <touching (arse v)?>\n    set [lock v] to [unlocked]\n    repeat (10)\n        change [ghost v] effect by (10)\n    end\n    hide\n    set [ghost v] effect to (0)\n    wait until <not <(level) = [11]>>\n    wait (0.08) seconds\n    set [lock v] to [unlocked]\nelse\n    hide\n    set [lock v] to [unlocked]\nend\nif <(level) = [12]> then\n    set [lock v] to [locked]\n    go to x: (206) y: (-55)\n    show\n    wait until <touching (arse v)?>\n    set [lock v] to [unlocked]\n    repeat (10)\n        change [ghost v] effect by (10)\n    end\n    hide\n    set [ghost v] effect to (0)\n    wait until <not <(level) = [11]>>\n    wait (0.08) seconds\n    set [lock v] to [unlocked]\nelse\n    hide\n    set [lock v] to [unlocked]\nend\nif <(level) = [15]> then\n    set [lock v] to [locked]\n    go to x: (212) y: (-93)\n    show\n    wait until <touching (arse v)?>\n    set [lock v] to [unlocked]\n    repeat (10)\n        change [ghost v] effect by (10)\n    end\n    hide\n    set [ghost v] effect to (0)\n    wait until <not <(level) = [11]>>\n    wait (0.08) seconds\n    set [lock v] to [unlocked]\nelse\n    hide\n    set [lock v] to [unlocked]\nend\n\n@Teleporter 1\n\nwhen flag clicked\nhide\nforever\n    repeat (50)\n        change [color v] effect by (1)\n    end\n    repeat (50)\n        change [color v] effect by (-1)\n    end\nend\n\nwhen flag clicked\nforever\n    next costume\n    wait (0.08) seconds\nend\n\nwhen flag clicked\nforever\n    if <(level) = [7]> then\n        go to x: (-156) y: (-127)\n        show\n    else\n        if <(level) = [8]> then\n            go to x: (174) y: (61)\n            show\n        else\n            if <(level) = [9]> then\n                go to x: (-214) y: (-159)\n                show\n            else\n                if <(level) = [10]> then\n                    go to x: (-129) y: (15)\n                    show\n                else\n                    if <(level) = [12]> then\n                        go to x: (220) y: (108)\n                        show\n                    else\n                        if <(level) = [14]> then\n                            go to x: (-146) y: (-143)\n                            show\n                        else\n                            if <(level) = [15]> then\n                                go to x: (219) y: (34)\n                                show\n                            else\n                                hide\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\n\n@Teleporter 2\n\nwhen flag clicked\nhide\nforever\n    repeat (50)\n        change [color v] effect by (1)\n    end\n    repeat (50)\n        change [color v] effect by (-1)\n    end\nend\n\nwhen flag clicked\nforever\n    next costume\n    wait (0.08) seconds\nend\n\nwhen flag clicked\nforever\n    if <(level) = [7]> then\n        go to x: (200) y: (115)\n        show\n    else\n        if <(level) = [8]> then\n            go to x: (-204) y: (-158)\n            show\n        else\n            if <(level) = [9]> then\n                go to x: (-102) y: (-160)\n                show\n            else\n                if <(level) = [10]> then\n                    go to x: (115) y: (80)\n                    show\n                else\n                    if <(level) = [12]> then\n                        go to x: (-222) y: (-100)\n                        show\n                    else\n                        if <(level) = [14]> then\n                            go to x: (198) y: (102)\n                            show\n                        else\n                            if <(level) = [15]> then\n                                go to x: (-222) y: (-148)\n                                show\n                            else\n                                hide\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\n\n@Teleporter 3\n\nwhen flag clicked\nhide\nforever\n    repeat (50)\n        change [color v] effect by (1)\n    end\n    repeat (50)\n        change [color v] effect by (-1)\n    end\nend\n\nwhen flag clicked\nforever\n    next costume\n    wait (0.08) seconds\nend\n\nwhen flag clicked\nforever\n    if <(level) = [7]> then\n        go to x: (-68) y: (55)\n        show\n    else\n        if <(level) = [9]> then\n            go to x: (206) y: (-117)\n            show\n        else\n            if <(level) = [10]> then\n                go to x: (37) y: (-94)\n                show\n            else\n                if <(level) = [14]> then\n                    go to x: (-168) y: (-9)\n                    show\n                else\n                    hide\n                end\n            end\n        end\n    end\nend\n\n@Teleporter 4\n\nwhen flag clicked\nhide\nforever\n    repeat (50)\n        change [color v] effect by (1)\n    end\n    repeat (50)\n        change [color v] effect by (-1)\n    end\nend\n\nwhen flag clicked\nforever\n    next costume\n    wait (0.08) seconds\nend\n\nwhen flag clicked\nforever\n    if <(level) = [7]> then\n        go to x: (0) y: (-103)\n        show\n    else\n        if <(level) = [9]> then\n            go to x: (-106) y: (114)\n            show\n        else\n            if <(level) = [10]> then\n                go to x: (209) y: (79)\n                show\n            else\n                if <(level) = [14]> then\n                    go to x: (142) y: (-163)\n                    show\n                else\n                    hide\n                end\n            end\n        end\n    end\nend\n\n@Sprite3\n\nwhen flag clicked\ngo to x: (0) y: (0)\nswitch costume to (backdrop2 v)\nrepeat (10)\n    change [ghost v] effect by (10)\nend\nforever\n    if <(level) = [16]> then\n        switch costume to (backdrop3 v)\n        repeat (10)\n            change [ghost v] effect by (-10)\n        end\n        set [level v] to [1]\n        stop [all v]\n    end\nend\n\n