Dark - A Platformer


@Stage\n\nwhen flag clicked\nrepeat (50)\n    start sound [Owl-City-Fireflies-Instrumental-\(Remake-by-Mike-Kalombo\)-for-Spoofers-Parodies-Youtubecovers\[www.savevid.com\]\(1\) v]\nend\n\n@levels\n\ndefine start from (x) (y) go to (x2) (y2)\npen up\ngo to x: (x) y: (y)\npen down\ngo to x: (x2) y: (y2)\n\nwhen flag clicked\nhide variable [levl v]\nforever\n    if <(levl) = [1]> then\n        pen down\n        hide\n        set pen color to (#ffffff)\n        erase all\n        set pen size to (10)\n        start from (-240) (-128) go to (240) (-128)\n    end\n    if <(levl) = [2]> then\n        pen down\n        erase all\n        set pen color to (#ffffff)\n        set pen size to (10)\n        start from (-240) (-128) go to (-66) (-128)\n        start from (-66) (-128) go to (-66) (-100)\n        start from (-66) (-100) go to (-66) (50)\n        start from (-66) (50) go to (10) (50)\n        start from (10) (50) go to (10) (-128)\n        start from (10) (-128) go to (240) (-128)\n    end\n    if <(levl) = [3]> then\n        pen down\n        erase all\n        set pen color to (#ffffff)\n        set pen size to (10)\n        start from (-240) (-128) go to (-66) (-128)\n        start from (-66) (-128) go to (-66) (-100)\n        start from (-66) (-100) go to (-66) (50)\n        start from (-66) (50) go to (10) (50)\n        start from (10) (50) go to (10) (-128)\n        set pen color to (#ff0000)\n        start from (10) (-128) go to (240) (-128)\n    end\n    if <(levl) = [4]> then\n        pen down\n        hide\n        set pen color to (#ffffff)\n        erase all\n        set pen size to (10)\n        start from (-240) (-128) go to (240) (-128)\n        set pen color to (#ff9400)\n        start from (-70) (-128) go to (35) (-128)\n        set pen color to (#ff0000)\n        start from (35) (-128) go to (90) (43)\n        start from (90) (43) go to (134) (43)\n    end\n    if <(levl) = [5]> then\n        pen down\n        erase all\n        set pen color to (#ffffff)\n        set pen size to (10)\n        start from (-240) (-128) go to (-10) (-128)\n        start from (-10) (-128) go to (30) (-128)\n        set pen color to (#ff0000)\n        start from (30) (-128) go to (240) (-128)\n    end\n    if <(levl) = [6]> then\n        erase all\n        pen down\n        set pen color to (#ffffff)\n        start from (-240) (-128) go to (-50) (-128)\n        start from (-50) (-128) go to (-50) (80)\n        start from (237) (80) go to (70) (80)\n        start from (70) (80) go to (70) (-30)\n        start from (70) (-30) go to (240) (-30)\n        start from (240) (-107) go to (70) (-107)\n        start from (70) (-107) go to (70) (-180)\n        set pen color to (#ff0000)\n        start from (-43) (-124) go to (64) (-124)\n    end\n    if <(levl) = [7]> then\n        pen down\n        hide\n        set pen color to (#ffffff)\n        erase all\n        set pen size to (10)\n        start from (-240) (-128) go to (240) (-128)\n        set pen color to (#ff9400)\n        start from (-140) (-128) go to (-70) (-128)\n        start from (7) (-128) go to (77) (-128)\n        start from (152) (-128) go to (240) (-128)\n        set pen color to (#ff0000)\n        start from (-140) (45) go to (240) (45)\n    end\n    if <(levl) = [8]> then\n        broadcast (message1 v)\n        erase all\n    end\nend\n\nset pen color to (#ff9400)\n\nset pen color to (#ffffff)\n\nset pen color to (#ff0000)\n\n@Sprite1\n\nwhen flag clicked\nshow\nset [levl v] to [1]\nset [xv v] to [0]\nset [yv v] to [0]\ngo to x: (-216) y: (-86)\nforever\n    if <touching color (#ff9400)?> then\n        set [yv v] to [20]\n    end\n    if <touching color (#ff0000)?> then\n        go to x: (-216) y: (-86)\n    end\n    if <(x position) > [200]> then\n        go to x: (-216) y: (-86)\n        change [levl v] by (1)\n    end\n    if <key (right arrow v) pressed?> then\n        switch costume to (costume1 v)\n        change [xv v] by (1)\n    end\n    if <key (left arrow v) pressed?> then\n        switch costume to (costume2 v)\n        change [xv v] by (-1)\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 y by (-5)\n                            if <key (up arrow v) pressed?> then\n                                if <(Xv) > [0]> then\n                                    set [xv v] to [-5]\n                                else\n                                    set [xv v] to [5]\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 [yv v] by (-1)\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 color (#ffffff)?> then\n        if <key (up arrow v) pressed?> then\n            set [yv v] to [15]\n        end\n    end\n    change y by (1)\nend\n\nwhen I receive [message1 v]\nhide\n\n@Sprite2\n\nwhen flag clicked\nshow\ngo to x: (0) y: (-151)\nforever\n    switch costume to (levl)\nend\n\nwhen I receive [message1 v]\nhide\n\n@Sprite3\n\nwhen flag clicked\nshow\n\nwhen I receive [message1 v]\nhide\n\n@Sprite4\n\nwhen I receive [message1 v]\nshow\n\nwhen flag clicked\nhide\n\n@Thumbnail\n\nwhen flag clicked\nhide\n\n