the seasons        |#genric#Platformer #games #all

Instructions: new platformer! \narrow keys ,WASD or mobile controls to move\n,go to the right--> \n\n\n\n---------------------------------------------------------------------------\n--almost 500 views in 2 days?!\n\nGENERIC

@Stage\n\nwhen flag clicked\nswitch backdrop to (spring v)\nset [level v] to [1]\nbroadcast (setup  v) and wait\nbroadcast (next level v)\nbroadcast (Play v)\n\nwhen I receive [mute music v]\nif <(volume) < [50]> then\n    set volume to (100) %\nelse\n    set volume to (0) %\nend\n\n@platformer guy\n\ndefine Platformer engine up <up> left <left> right <right>\ngo to [back v] layer\ngo [forward v] (1) layers\nswitch costume to (lol v)\nif <right> then\n    change [x v] by (1)\nend\nif <left> then\n    change [x v] by (-1)\nend\nset [x v] to ((x) * (((0.9) * <not <touching (ground dekoration v)?>>) + ((0.8) * <touching (ground dekoration v)?>)))\nchange x by (x)\nif <touching (hitbox ground  v)?> then\n    change y by (1)\nend\nif <touching (hitbox ground  v)?> then\n    change y by (1)\nend\nif <touching (hitbox ground  v)?> then\n    change y by (1)\nend\nif <touching (hitbox ground  v)?> then\n    change y by (1)\nend\nif <touching (hitbox ground  v)?> then\n    change y by (1)\nend\nif <touching (hitbox ground  v)?> then\n    change y by (-5)\n    change x by ((x) * (-1))\nend\nif <touching (water v)?> then\n    change [y v] by (-.2)\nelse\n    change [y v] by (-1)\nend\nchange y by (y)\nif <touching (hitbox ground  v)?> then\n    change y by ((y) * (-1))\n    set [y v] to [0]\nend\nchange y by (-1)\nif <touching (water v)?> then\n    if <up> then\n        set [y v] to [2]\n    end\nelse\n    if <touching (hitbox ground  v)?> then\n        if <up> then\n            set [y v] to [12]\n        end\n    end\nend\nchange y by (1)\npoint in direction ((x) + (90))\nif <(x position) > [238]> then\n    change [level v] by (1)\n    broadcast (next level v)\nend\nif <<touching (danger v)?> or <(y position) < [-175]>> then\n    broadcast (restart player v)\nend\nif <touching (bouncpads v)?> then\n    set [y v] to ((15) + ((5) * <up>))\nend\ncreate clone of (_myself_ v)\n\nbroadcast (next level v) and wait\n\nwhen I receive [play v]\n\n    Platformer engine up <<<key (up arrow v) pressed?> or <key (w v) pressed?>> or <<mouse down?> and <((mouse y) - (30)) > (y position)>>> left <<<key (left arrow v) pressed?> or <key (a v) pressed?>> or <<mouse down?> and <(x position) > (mouse x)>>> right <<<key (right arrow v) pressed?> or <key (d v) pressed?>> or <<mouse down?> and <(mouse x) > (x position)>>>\nend\n\nwhen I receive [setup  v]\nset [x v] to [0]\nset [y v] to [0]\ngo to x: (-210) y: (-105)\n\nwhen I receive [restart player v]\nset [x v] to [0]\nset [y v] to [0]\ngo to x: (-210) y: (-105)\n\nwhen I receive [next level v]\nbroadcast (restart player v)\n\nwhen I start as a clone\ngo to [back v] layer\nrepeat (5)\n    change size by (-.5)\n    change [ghost v] effect by (20)\nend\ndelete this clone\n\n@hitbox ground \n\nwhen I receive [setup  v]\ngo to x: (0) y: (0)\n\nwhen I receive [play v]\nforever\n    switch costume to (Level)\n    set [ghost v] effect to (100)\n    go to [back v] layer\nend\n\n@sign\n\ndefine Clone sign at x (x) y (y) with text (text) type (type)\nswitch costume to (type)\nset [text v] to (text)\nhide\ngo to x: (x) y: (y)\ncreate clone of (_myself_ v)\n\nwhen I start as a clone\nforever\n    show\n    go to [front v] layer\n    if <touching (platformer guy v)?> then\n        set [say v] to []\n        set [ghost v] effect to (20)\n        say (text)\n        wait until <not <touching (platformer guy v)?>>\n    else\n        say []\n        clear graphic effects\n    end\nend\n\nwhen I receive [next level v]\nif  then\n    delete this clone\nend\nif <(Level) = [1]> then\n    Clone sign at x [-200] y [-140] with text [arrow keys or WASD or mobile controls to move] type [1]\n    Clone sign at x [-80] y [45] with text [don´t touch spikes] type [1]\nend\nif <(Level) = [3]> then\n    Clone sign at x [-200] y [-140] with text [press ^arrow ,W or tap over the player while touching a bouncpad to jump higher!] type [1]\nend\nif <(Level) = [5]> then\n    Clone sign at x [-170] y [-130] with text [it´s summer!] type [2]\n    next backdrop\nend\nif <(Level) = [6]> then\n    Clone sign at x [-174] y [-117] with text [sandcastle!] type [2]\nend\nif <(Level) = [8]> then\n    switch backdrop to (fall v)\n    Clone sign at x [-174] y [-110] with text [it`s fall] type [2]\nend\nif <(Level) = [11]> then\n    switch backdrop to (fall v)\n    Clone sign at x [-174] y [-110] with text [it´s getting colder......] type [2]\nend\nif <(Level) = [12]> then\n    switch backdrop to (winter v)\nend\nif <(Level) = [15]> then\n    switch backdrop to (all seasons v)\nend\n\ndefine say (text)\nset [# v] to [1]\nrepeat (length of (text))\n    if <touching (platformer guy v)?> then\n        set [say v] to (join (say) (letter (#) of (text)))\n        say (say)\n        change [# v] by (1)\n        wait (0) seconds\n    else\n        say []\n        stop [this script v]\n    end\nend\n\nwhen I start as a clone\nforever\n    show\n    go to [front v] layer\n    go [forward v] (1) layers\nend\n\nset [level v] to [11]\nbroadcast (next level v)\n\n@ground or whatever\n\nwhen I receive [setup  v]\ngo to x: (0) y: (0)\n\nwhen I receive [play v]\nforever\n    switch costume to (Level)\nend\n\nbroadcast (next level v)\nset [level v] to [6]\n\n@ground dekoration\n\ndefine grass from x (x) y (y) to x (x2) y (y2) type (type)\nhide\nswitch costume to (type)\ngo to x: (x) y: (y)\nrepeat until <<(x2) = (x position)> and <(y2) = (y position)>>\n    change x by (((5) * <(x2) > (x position)>) + ((-5) * <(x position) > (x2)>))\n    change y by (((1) * <(y2) > (y position)>) + ((-1) * <(y position) > (y2)>))\n    create clone of (_myself_ v)\nend\n\nwhen I start as a clone\nchange [brightness v] effect by (pick random (-1) to (1))\nset size to (pick random (80) to (120)) %\nforever\n    go to [back v] layer\n    go [backward v] (3) layers\n    show\n    if <touching (platformer guy v)?> then\n        turn right ((((([x v] of [platformer guy v]) * (5)) + (90)) - (direction)) / (20)) degrees\n    else\n        turn right (((90) - (direction)) / (20)) degrees\n    end\nend\n\nwhen I receive [next level v]\nif  then\n    delete this clone\nend\nif <(Level) = [1]> then\n    grass from x [-205] y [-160] to x [45] y [-160] type [1]\n    grass from x [90] y [-70] to x [-25] y [-70] type [1]\nend\nif <(Level) = [2]> then\n    grass from x [-205] y [-160] to x [45] y [-160] type [1]\n    grass from x [-20] y [-70] to x [50] y [-70] type [1]\nend\nif <(Level) = [4]> then\n    grass from x [25] y [-170] to x [200] y [-170] type [1]\nend\n\n@water\n\nwhen I receive [setup  v]\ngo to x: (0) y: (0)\n\nwhen I receive [play v]\nforever\n    go to x: (0) y: (([sin v] of (s) ) * (10))\n    switch costume to (Level)\n    go to [back v] layer\n    set [ghost v] effect to (10)\n    change [s v] by (1)\nend\n\nset [level v] to [5]\nbroadcast (next level v) and wait\n\n@bouncpads\n\nwhen I receive [setup  v]\ngo to x: (0) y: (0)\n\nwhen I receive [play v]\nforever\n    switch costume to (Level)\n    set [ghost v] effect to (0)\n    go to [back v] layer\nend\n\n@danger\n\nwhen I receive [setup  v]\ngo to x: (0) y: (0)\n\nwhen I receive [play v]\nforever\n    switch costume to (Level)\n    set [ghost v] effect to (0)\n    go to [back v] layer\nend\n\n@skip button\n\nwhen flag clicked\nset [sin v] to [20]\nforever\n    if <(Level) = [15]> then\n        hide\n    else\n        show\n        go to x: (90) y: (140)\n        point in direction ((([cos v] of (sin) ) * (20)) + (90))\n        if <touching (mouse-pointer v)?> then\n            change size by (((120) - (size)) / (5))\n        else\n            change size by (((100) - (size)) / (5))\n        end\n        if <touching (platformer guy v)?> then\n            set [ghost v] effect to (80)\n        else\n            set [ghost v] effect to (0)\n        end\n        change [sin v] by (5)\n    end\nend\n\nwhen this sprite clicked\nchange [level v] by (1)\nbroadcast (next level v)\n\n@retry\n\nwhen flag clicked\nset [sin v] to [0]\nforever\n    go to x: (200) y: (140)\n    point in direction ((([sin v] of (sin) ) * (20)) + (90))\n    if <touching (mouse-pointer v)?> then\n        change size by (((120) - (size)) / (5))\n    else\n        change size by (((100) - (size)) / (5))\n    end\n    if <touching (platformer guy v)?> then\n        set [ghost v] effect to (80)\n    else\n        set [ghost v] effect to (0)\n    end\n    change [sin v] by (5)\nend\n\nwhen this sprite clicked\nbroadcast (next level v)\n\n@thumbnail\n\nwhen flag clicked\nshow\ngo to [front v] layer\nset [ghost v] effect to (100)\ngo to x: (0) y: (0)\n\n@mute music button \n\nwhen flag clicked\n\nwhen flag clicked\nset [sin v] to [120]\nforever\n    show\n    go to x: (0) y: (140)\n    point in direction ((([sin v] of (sin) ) * (20)) + (90))\n    if <touching (mouse-pointer v)?> then\n        change size by (((120) - (size)) / (5))\n    else\n        change size by (((100) - (size)) / (5))\n    end\n    if <touching (platformer guy v)?> then\n        set [ghost v] effect to (80)\n    else\n        set [ghost v] effect to (0)\n    end\n    change [sin v] by (5)\nend\n\nwhen this sprite clicked\nbroadcast (mute music v)\nif <(volume) < [50]> then\n    set volume to (100) %\n    switch costume to ( v)\nelse\n    set volume to (0) %\n    switch costume to (2 v)\nend\n\nwhen flag clicked\nset volume to (100) %\nswitch costume to (2 v)\nforever\n    play sound [Treenan v] until done\nend\n\n