Winter | A Mobile Friendly 80% Pen Platformer
@Stage\n\nwhen [m v] key pressed\nset [mouse v] to (join (mouse x) (join [ . ] (mouse y)))\nshow variable [mouse v]\n\nwhen flag clicked\nswitch backdrop to (intro v)\n\nwhen I receive [intro over v]\nswitch backdrop to (backround v)\n\nwhen flag clicked\nwait (8.5) seconds\nbroadcast (intro over v)\n\n@Blank\n\n@Player\n\nwhen flag clicked\nset size to (70) %\nset [xval v] to [0]\nset [☁ deaths v] to [0]\nset [yval v] to [0]\nforever\n    clear graphic effects\n    set [xval v] to ((xval) * (0.85))\n    change x by (xval)\n    if <<touching color (#ffffff)?> or <touching color (#b45a2e)?>> then\n        change y by (-2)\n        if <<touching color (#ffffff)?> or <touching color (#b45a2e)?>> then\n            change y by (1)\n            if <<touching color (#ffffff)?> or <touching color (#b45a2e)?>> then\n                change y by (1)\n                if <<touching color (#ffffff)?> or <touching color (#b45a2e)?>> then\n                    change y by (1)\n                    if <<touching color (#ffffff)?> or <touching color (#b45a2e)?>> then\n                        change y by (1)\n                        if <<touching color (#ffffff)?> or <touching color (#b45a2e)?>> then\n                            change y by (1)\n                            if <<touching color (#ffffff)?> or <touching color (#b45a2e)?>> then\n                                change y by (-5)\n                                change x by ((-1) * (xval))\n                                if <<<<key (up arrow v) pressed?> or <key (w v) pressed?>> or <<<mouse down?> and <(mouse x) > (x position)>> or <<mouse down?> and <(mouse x) < (x position)>>>> and <not <(xval) = [0]>>> then\n                                    set [yval v] to [8]\n                                    set [xval v] to (((xval) / ([abs v] of (xval) )) * (-10))\n                                else\n                                    set [xval v] to [0]\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n        change y by (2)\n    end\n    if <<<key (left arrow v) pressed?> or <key (a v) pressed?>> or <<mouse down?> and <(mouse x) < (x position)>>> then\n        change [xval v] by (-1)\n    end\n    if <<<key (right arrow v) pressed?> or <key (d v) pressed?>> or <<mouse down?> and <(mouse x) > (x position)>>> then\n        change [xval v] by (1)\n    end\n    change y by (-3)\n    if <touching color (#faff00)?> then\n        change [xval v] by (-7)\n    end\n    if <touching color (#658bce)?> then\n        change [yval v] by (1.07)\n    end\n    if <touching color (#d26767)?> then\n        change [yval v] by (1)\n    end\n    if <touching color (#808080)?> then\n        change [yval v] by (7)\n    end\n    if <touching color (#ff0000)?> then\n        go to x: (-216) y: (-10)\n        change [☁ deaths v] by (1)\n    end\n    if <touching color (#005dff)?> then\n        change [xval v] by (5)\n    end\n    if <touching color (#ffffff)?> then\n        if <<<key (up arrow v) pressed?> or <key (w v) pressed?>> or <<mouse down?> and <(mouse y) > (y position)>>> then\n            set [yval v] to [7.5]\n        end\n    end\n    change y by (3)\n    if <(yval) > [-15]> then\n        change [yval v] by (-0.5)\n    end\n    change y by (-2)\n    if <not <touching color (#ffffff)?>> then\n        change y by (-1)\n        if <not <touching color (#fbfbfb)?>> then\n            change y by (-1)\n            if <not <touching color (#ffffff)?>> then\n                change y by (-1)\n                if <not <touching color (#ffffff)?>> then\n                    change y by (-1)\n                    if <not <touching color (#ffffff)?>> then\n                        change y by (-1)\n                        if <not <touching color (#ffffff)?>> then\n                            change y by (5)\n                        end\n                    end\n                end\n            end\n        end\n    end\n    change y by (2)\n    change y by (yval)\n    if <touching color (#ffffff)?> then\n        change y by (-2)\n        if <touching color (#ffffff)?> then\n            change y by ((-1) * (yval))\n            set [yval v] to [-3]\n        end\n        change y by (2)\n    end\nend\n\nwhen I receive [next v]\nset [xval v] to [0]\nset [yval v] to [0]\nchange [level v] by (1)\n\nwhen I receive [intro over v]\nforever\n    show\nend\n\nwhen I receive [intro over v]\nforever\n    if <(Level) = [11]> then\n        say [That's it! Like, Favorite, and follow for more amazing games!]\n    else\n        say []\n    end\nend\n\nwhen I receive [intro over v]\nhide\ngo to x: (-216) y: (-35)\nforever\n    PlayerRender\nend\n\nwhen I receive [intro over v]\nforever\n    wait until <(x position) > [228]>\n    broadcast (Next v) and wait\n    wait until <not <(x position) > [228]>>\nend\n\ndefine PlayerRender\nif <touching color (#f00707)?> then\n    go to x: (-216) y: (-35)\n    set [xval v] to [0]\n    set [yval v] to [0]\nend\nif <touching color (#fa00ff)?> then\n    set [yval v] to [13]\nend\nerase all\nbroadcast (PlayerRenderDone v)\n\nwhen I receive [next v]\ngo to x: (-200) y: (0)\n\nwhen flag clicked\nhide\n\nwhen flag clicked\nforever\n    if <[-180] > (y position)> then\n        go to x: (-200) y: (0)\n    end\nend\n\nwhen flag clicked\nif <(Level) = [6]> then\n    repeat (2)\n        go to x: (-200) y: (0)\n    end\n    set [yval v] to [0]\n    set [xval v] to [0]\nend\n\nset [level v] to [5]\n\n@Pen\n\nDraw line from [-237] [-114] to [237] [-114] with size [13]\n\nwhen flag clicked\nerase all\n\ndefine Draw line from (x1) (y1) to (x2) (y2) with size (pen size)\nset pen size to (pen size)\npen up\ngo to x: (x1) y: (y1)\npen down\ngo to x: (x2) y: (y2)\n\nset [level v] to [11]\n\ndefine DRAW LEVELS\nforever\n    if <(Level) = [1]> then\n        pen up\n        set pen color to (#b35a2e)\n        Draw line from [-232] [-167] to [232] [-167] with size [100]\n        set pen color to (#ffffff)\n        Draw line from [-237] [-114] to [237] [-114] with size [13]\n        set pen color to (#d26767)\n        Draw line from [-50] [-93] to [-50] [999] with size [30]\n    else\n        if <(Level) = [2]> then\n            pen up\n            set pen color to (#b35a2e)\n            Draw line from [-232] [-167] to [232] [-167] with size [100]\n            set pen color to (#ffffff)\n            Draw line from [-237] [-114] to [237] [-114] with size [13]\n            Draw line from [-30] [-50] to [30] [-50] with size [15]\n            set pen color to (#658bce)\n            Draw line from [-1700] [-150] to [100] [-150] with size [90]\n        else\n            if <(Level) = [3]> then\n                pen up\n                set pen color to (#b35a2e)\n                Draw line from [-232] [-167] to [232] [-167] with size [100]\n                set pen color to (#ffffff)\n                Draw line from [-237] [-125] to [237] [-125] with size [13]\n                set pen color to (#ff0000)\n                Draw line from [-237] [-114] to [237] [-114] with size [13]\n                set pen color to (#d26767)\n                Draw line from [-207] [-93] to [-207] [9999] with size [30]\n                Draw line from [-100] [-93] to [-100] [9999] with size [30]\n                Draw line from [10] [-93] to [10] [9999] with size [30]\n                Draw line from [110] [-93] to [110] [9999] with size [30]\n            else\n                if <(Level) = [4]> then\n                    pen up\n                    set pen color to (#b35a2e)\n                    Draw line from [-232] [-167] to [232] [-167] with size [100]\n                    set pen color to (#ffffff)\n                    Draw line from [-237] [-114] to [237] [-114] with size [13]\n                    Draw line from [-35] [-107] to [30] [10] with size [20]\n                    Draw line from [30] [10] to [80] [-107] with size [20]\n                    Draw line from [28] [-77] to [28] [-77] with size [80]\n                    Draw line from [28] [-50] to [28] [-50] with size [65]\n                    Draw line from [-10] [-93] to [54] [-93] with size [40]\n                    Draw line from [-26] [-108] to [28] [-7] with size [24]\n                    set pen color to (#ff0000)\n                    Draw line from [92] [-105] to [999] [-105] with size [5]\n                else\n                    if <(Level) = [5]> then\n                        pen up\n                        set pen color to (#b35a2e)\n                        Draw line from [-232] [-167] to [232] [-167] with size [100]\n                        set pen color to (#ffffff)\n                        Draw line from [-237] [-114] to [237] [-114] with size [13]\n                        set pen color to (#d26767)\n                        Draw line from [-999] [50] to [999] [50] with size [314]\n                        set pen color to (#ff0000)\n                        Draw line from [999] [-105] to [999] [100] with size [13]\n                    else\n                        if <(Level) = [6]> then\n                            pen up\n                            set pen color to (#b35a2e)\n                            Draw line from [-232] [-167] to [232] [-167] with size [100]\n                            set pen color to (#ffffff)\n                            Draw line from [-237] [-114] to [237] [-114] with size [13]\n                            set pen color to (#648acc)\n                            Draw line from [-100] [-150] to [50] [-150] with size [100]\n                            set pen color to (#ff0000)\n                            Draw line from [100] [-110] to [999] [-110] with size [5]\n                        else\n                            if <(Level) = [7]> then\n                                pen up\n                                set pen color to (#b35a2e)\n                                Draw line from [-232] [-167] to [232] [-167] with size [100]\n                                set pen color to (#ffffff)\n                                Draw line from [-237] [-114] to [237] [-114] with size [13]\n                                Draw line from [25] [-95] to [25] [30] with size [50]\n                                Draw line from [20] [-95] to [20] [30] with size [50]\n                                Draw line from [37] [30] to [999] [30] with size [80]\n                                Draw line from [50] [-56] to [999] [-56] with size [104]\n                                Draw line from [25] [42] to [100] [42] with size [5]\n                                Draw line from [-4] [-50] to [-50] [-50] with size [13]\n                                Draw line from [-4] [25] to [-50] [25] with size [13]\n                            else\n                                if <(Level) = [8]> then\n                                    pen up\n                                    set pen color to (#b35a2e)\n                                    Draw line from [-999] [-170] to [-100] [-170] with size [115]\n                                    Draw line from [-48] [-182] to [-48] [-152] with size [85]\n                                    Draw line from [200] [-182] to [200] [-115] with size [140]\n                                    Draw line from [140] [-182] to [140] [-80] with size [65]\n                                    set pen color to (#ffffff)\n                                    Draw line from [-237] [-114] to [-20] [-114] with size [13]\n                                    Draw line from [118] [-50] to [999] [-50] with size [13]\n                                else\n                                    if <(Level) = [9]> then\n                                        pen up\n                                        set pen color to (#b35a2e)\n                                        Draw line from [-232] [-167] to [15] [-167] with size [118]\n                                        set pen color to (#ffffff)\n                                        Draw line from [-237] [-114] to [70] [-114] with size [13]\n                                        set pen color to (#668bcc)\n                                        Draw line from [73] [-154] to [99999] [-154] with size [100]\n                                        set pen color to (#ff0000)\n                                        Draw line from [238] [-182] to [238] [-55] with size [5]\n                                    else\n                                        if <(Level) = [10]> then\n                                            pen up\n                                            set pen color to (#658bce)\n                                            Draw line from [-232] [-150] to [-110] [-150] with size [100]\n                                            Draw line from [-118] [-125] to [-85] [-125] with size [50]\n                                            Draw line from [-70] [-182] to [-70] [-110] with size [21]\n                                            set pen color to (#ff0000)\n                                            Draw line from [-61] [-182] to [-61] [-30] with size [5]\n                                            Draw line from [100] [30] to [100] [70] with size [5]\n                                            set pen color to (#ffffff)\n                                            Draw line from [-61] [-30] to [-10] [-30] with size [5]\n                                            Draw line from [55] [30] to [100] [30] with size [5]\n                                            Draw line from [130] [55] to [170] [55] with size [5]\n                                        else\n                                            if <(Level) = [11]> then\n                                                pen up\n                                                set pen color to (#b35a2e)\n                                                Draw line from [-232] [-167] to [232] [-167] with size [100]\n                                                set pen color to (#ffffff)\n                                                Draw line from [-237] [-114] to [237] [-114] with size [13]\n                                                Draw line from [999] [-110] to [999] [999] with size [13]\n                                            end\n                                        end\n                                    end\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\n\nDraw line from [-237] [-114] to [-30] [-114] with size [13]\n\nset [level v] to [9]\n\nset [level v] to [10]\n\nwhen I receive [intro over v]\nset [level v] to [1]\nhide\nforever\n    DRAW LEVELS\nend\n\nset [level v] to [8]\n\nset pen color to (#b35a2e)\nDraw line from [-232] [-167] to [999] [-170] with size [106]\n\npen up\n\n@Snow\n\nwhen I start as a clone\nset size to (10) %\nset [clouds: cos# v] to (pick random (1) to (3))\nset [clouds: speed v] to (pick random (-4.5) to (-5.5))\nset [ghost v] effect to (pick random (10) to (20))\nset [brightness v] effect to (pick random (-2) to (2))\nset size to (10) %\ngo to [back v] layer\nshow\ngo to x: (pick random (-242) to (228)) y: (180)\nrepeat until <(y position) < [-95]>\n    change y by (Clouds: speed)\nend\nrepeat (55)\n    change [ghost v] effect by (8)\nend\ndelete this clone\n\nwhen flag clicked\nhide\n\nwhen I receive [intro over v]\nforever\n    hide\n    wait (.4) seconds\n    go to (clouds v)\n    create clone of (_myself_ v)\nend\n\n@TN\n\nwhen flag clicked\ngo to [front v] layer\nset [ghost v] effect to (100)\n\nwhen flag clicked\nforever\n    set [timer v] to ((timer) + (0.1))\nend\n\nwhen [timer v] > (Timer)\nbroadcast (TN v)\n\n@White Barrier\n\nwhen flag clicked\nset size to (100) %\ngo to x: (0) y: (0)\nforever\n    point in direction ((([sin v] of ((timer) * (100)) ) * (2)) + (90))\nend\n\nwhen flag clicked\nshow\ngo to [front v] layer\nwait until <(timer) > [149]>\nrepeat until <(timer) > [182]>\n    repeat (20)\n        change size by (((130) - (size)) / (6))\n    end\n    wait (1) seconds\n    repeat (20)\n        change size by (((100) - (size)) / (6))\n    end\n    wait (1) seconds\nend\nrepeat (20)\n    change size by (((100) - (size)) / (6))\nend\n\nwhen flag clicked\nwait (17) seconds\nhide\n\nwhen I receive [intro over v]\nhide\n\nwhen I receive [tn v]\nhide\n\n@Scratchlogo\n\nwhen flag clicked\nshow\nset size to (100) %\nswitch costume to (intro v)\nforever\n    go to x: ([tan v] of ((timer) * (20)) ) y: (([sin v] of ((timer) * (20)) ) * (20))\n    point in direction ((([sin v] of ((timer) * (100)) ) * (6)) + (90))\n    if <touching (blank v)?> then\n        change [vel v] by (((95) - (size)) / (5))\n        set [vel v] to ((vel) * (0.8))\n        change [size v] by (vel)\n        set size to (size) %\n    else\n        change [vel v] by (((90) - (size)) / (5))\n        set [vel v] to ((vel) * (0.8))\n        change [size v] by (vel)\n        set size to (size) %\n    end\nend\n\nwhen flag clicked\nforever\n    go to [front v] layer\nend\n\nwhen I receive [intro over v]\nhide\n\nwhen flag clicked\nstart sound [clarx_-_hay_1 v]\nwait (8.5) seconds\nbroadcast (intro over v)\n\nwhen I receive [intro over v]\nstop all sounds\nstart sound [BoxCat_Games_-_01_-_Breaking_In v]\n\nwhen I receive [tn v]\nforever\n    hide\nend\n\n
Instructions:\nWAD, arrow keys, or touch if you are on mobile. \nDONT'T FALL INTO THE HOLE\nRED: Lava, Avoid At all Costs.\nYELLOW: Pushes you backward (to the left)\nBLUE: Pushes you forwards (to the right)\nGREY: A trampoline, pushes you up.\nMAROON: Jump while your touching pushes you up\nBLUE: Water\n\nStoryline:\nin a world where you can stay in whatever season you want for the rest of your life and the only way to move to a different season is to complete an obstacle course or, a platformer, Player, is stuck in Winter and wants to move to Spring. Can you help him?\n\nLog:\n11/18/20: Released!\n==========================================\nTags:\n#Games #all #Pen #Platformer #PenPlatformer #art #Clouds # Sky #naterose1 #SIAF #trending #popular #like #favorite #follow #Griffpatch