-The Winter World- A Platformer #Games #All
@Stage\n\nwhen flag clicked\nwait (5) seconds\nforever\n    play sound [Endlessfields Music v] until done\n    wait (0) seconds\nend\n\nwhen flag clicked\nswitch backdrop to ( v)\n\nwhen I receive [next level v]\nnext backdrop\n\nnext backdrop\n\nstop [all v]\n\n@Next Level\n\n@Level\n\nwhen I receive [next level v]\nnext costume\n\nwhen flag clicked\nswitch costume to (costume1 v)\n\nwhen flag clicked\nforever\n    if <(costume [number v]) = [11]> then\n        broadcast (End v)\n    end\nend\n\n@Spikes\n\nwhen flag clicked\nswitch costume to (costume1 v)\n\nwhen I receive [next level v]\nnext costume\n\n@BouncePad\n\nwhen flag clicked\nswitch costume to (costume1 v)\n\nwhen I receive [next level v]\nnext costume\n\n@Thumbnail\n\nwhen flag clicked\nhide\nbroadcast (Green Flag clicked v)\n\nset [ghost v] effect to (0)\nwait (0) seconds\nrepeat (10)\n    change [ghost v] effect by (10)\nend\nforever\n    show\n    go to [front v] layer\n    go [forward v] (100) layers\n    set [ghost v] effect to (100)\nend\n\nwhen I receive [done v]\nforever\n    show\n    set [ghost v] effect to (0)\n    go to [front v] layer\nend\n\n@Intro white\n\nwhen flag clicked\nforever\n    show\n    wait (.5) seconds\n    forever\n        hide\n    end\nend\n\n@Player\n\nwhen flag clicked\ngo to x: (-201) y: (-70)\nset [x velocity v] to [0]\nset [y velocity v] to [0]\nset [x v] to [1]\nforever\n    Platform Gravity: [-1] Jump Height: [12.5] Movement Speed: [3] Friction: [.7] Slopes: [8]\nend\n\ndefine Platform Gravity: (gravity) Jump Height: (jump height) Movement Speed: (side movement speed) Friction: (friction) Slopes: (slope)\nchange [y velocity v] by (gravity)\nchange y by (Y Velocity)\nif <touching (level v)?> then\n    repeat until <not <touching (level v)?>>\n        change y by ((([abs v] of (Y Velocity) ) / (Y Velocity)) * (-1))\n    end\n    set [y velocity v] to (<<<key (w v) pressed?> or <key (up arrow v) pressed?>> and <(([abs v] of (Y Velocity) ) / (Y Velocity)) = [-1]>> * (jump height))\nend\nset [x velocity v] to (((X Velocity) + ((<<key (a v) pressed?> or <key (left arrow v) pressed?>> * ((side movement speed) * (-1))) + (<<key (d v) pressed?> or <key (right arrow v) pressed?>> * (side movement speed)))) * (friction))\nchange x by (X Velocity)\nset [slope v] to [0]\nrepeat until <<(Slope) = ((slope) * (-1))> or <not <touching (level v)?>>>\n    change y by (1)\n    change [slope v] by (-1)\nend\nif <touching (level v)?> then\n    change y by (Slope)\n    repeat until <not <touching (level v)?>>\n        change x by ((([abs v] of (X Velocity) ) / (X Velocity)) * (-1))\n    end\nend\n\nwhen flag clicked\nforever\n    if <<key (d v) pressed?> or <key (right arrow v) pressed?>> then\n        switch costume to (right v)\n    else\n        if <<key (a v) pressed?> or <key (left arrow v) pressed?>> then\n            switch costume to (left v)\n        end\n    end\nend\n\nwhen flag clicked\nforever\n    if <touching (spikes v)?> then\n        change [lives v] by (-1)\n        go to x: (-201) y: (-70)\n    end\nend\n\nwhen flag clicked\nforever\n    if <touching (flags v)?> then\n        set x to (-175)\n        set y to (-33)\n        broadcast (Next Level v)\n    end\nend\n\ngo to x: (-175) y: (-100)\n\nbroadcast (Next Level v)\n\nwhen flag clicked\nswitch costume to (right v)\n\nwhen flag clicked\nforever\n    if <touching (bouncepad v)?> then\n        set [y velocity v] to [18]\n    end\nend\n\nwhen flag clicked\nset [lives v] to [3]\nforever\n    if <(lives) = [0]> then\n        broadcast (DOne v)\n    end\nend\n\nstop [all v]\n\ngo to x: (-175) y: (-100)\n\nchange [y velocity v] by (9)\n\n@Snow\n\nwhen I start as a clone\nshow\nset [ghost v] effect to (0)\nset size to (pick random (1.01) to (400)) %\nset [ghost v] effect to (pick random (0) to (100))\ngo to x: (500) y: (pick random (-180.01) to (180))\nglide (pick random (1.01) to (5)) secs to x: (-240) y: (pick random (-180.01) to (180))\nrepeat (10)\n    change [ghost v] effect by (10)\nend\ndelete this clone\n\nwhen flag clicked\nif <(boop) < [4]> then\n    change [boop v] by (-1)\nend\n\nwhen flag clicked\nif <(boop) = [1]> then\n    switch costume to (costume1 v)\nend\n\nwhen [space v] key pressed\nif <(boop) < [5]> then\n    change [boop v] by (1)\nend\n\nwhen flag clicked\nif <(boop) = [4]> then\n    switch costume to (costume4 v)\nend\n\nwhen flag clicked\nif <(boop) = [3]> then\n    switch costume to (costume3 v)\nend\n\nwhen flag clicked\nhide\n\nwhen [space v] key pressed\nchange [boop v] by (1)\n\nwhen flag clicked\nset [boop v] to [0]\n\nwhen flag clicked\nif <(boop) = [2]> then\n    switch costume to (costume2 v)\nend\n\nif <(boop) = [5]> then\n    switch costume to (costume1 v)\nend\n\nwhen I receive [snow v]\n\nwhen flag clicked\nforever\n    create clone of (_myself_ v)\nend\n\n@Snow2\n\nwhen I start as a clone\nshow\nset [ghost v] effect to (0)\nset size to (pick random (1.01) to (400)) %\nset [ghost v] effect to (pick random (0) to (20))\ngo to x: (500) y: (pick random (-180.01) to (180))\nglide (pick random (1.01) to (5)) secs to x: (-240) y: (pick random (-180.01) to (180))\nrepeat (10)\n    change [ghost v] effect by (10)\nend\ndelete this clone\n\nwhen flag clicked\nif <(boop) < [4]> then\n    change [boop v] by (-1)\nend\n\nwhen flag clicked\nif <(boop) = [1]> then\n    switch costume to (costume1 v)\nend\n\nwhen [space v] key pressed\nif <(boop) < [5]> then\n    change [boop v] by (1)\nend\n\nwhen flag clicked\nif <(boop) = [4]> then\n    switch costume to (costume4 v)\nend\n\nwhen flag clicked\nif <(boop) = [3]> then\n    switch costume to (costume3 v)\nend\n\nwhen flag clicked\nhide\n\nwhen [space v] key pressed\nchange [boop v] by (1)\n\nwhen flag clicked\nset [boop v] to [0]\n\nwhen flag clicked\nif <(boop) = [2]> then\n    switch costume to (costume2 v)\nend\n\nif <(boop) = [5]> then\n    switch costume to (costume1 v)\nend\n\nwhen I receive [snow v]\n\nwhen flag clicked\nforever\n    create clone of (_myself_ v)\nend\n\n@Sound\n\nwhen flag clicked\nforever\n    play sound [Plugged \(post mastering\) v] until done\nend\n\nwhen this sprite clicked\nnext costume\nif <(costume [number v]) = [2]> then\n    set volume to (0) %\nelse\n    set volume to (100) %\nend\n\nwhen flag clicked\nwait (0.5) seconds\nset volume to (150) %\nset drag mode [not draggable v]\nswitch costume to (costume1 v)\nset [brightness v] effect to (0)\ngo to [front v] layer\n\n@Flags\n\nwhen I receive [next level v]\nnext costume\n\nwhen flag clicked\nswitch costume to (costume1 v)\n\nwhen flag clicked\nforever\n    if <(costume [number v]) = [11]> then\n        broadcast (End v)\n    end\nend\n\n@Decor\n\nwhen I receive [next level v]\nnext costume\n\nwhen flag clicked\nswitch costume to (costume1 v)\n\nwhen flag clicked\nforever\n    if <(costume [number v]) = [11]> then\n        broadcast (End v)\n    end\nend\n\n@detector\n\nwhen flag clicked\nhide\nset [clone id v] to [0]\ncreate clone of (_myself_ v)\nwait (0.2) seconds\nset [clone id v] to [1]\ncreate clone of (_myself_ v)\nwait until <<(LOVED__) = [1]> and <(FAVED___) = [1]>>\nwait (0.5) seconds\nshow\ngo to x: (0) y: (-100)\nreset timer\nswitch costume to (pick random (1) to (4))\nset [ghost v] effect to (100)\nrepeat until <(timer) > [3.5]>\n    change y by ((y position) / (-15))\n    change [ghost v] effect by (-3)\nend\nreset timer\nrepeat until <(timer) > [3.5]>\n    change y by (((y position) - (-100)) / (-15))\n    change [ghost v] effect by (10)\nend\n\nwhen I start as a clone\nif <(clone id) = [0]> then\n    go to x: (-15) y: (0)\n    set [loved__ v] to [0]\n    switch costume to (love v)\n    forever\n        set [love? v] to <touching (mouse-pointer v)?>\n        if <touching (mouse-pointer v)?> then\n            wait (0.2) seconds\n            if <touching (mouse-pointer v)?> then\n                set [loved__ v] to [1]\n            end\n        end\n    end\nend\nif <(clone id) = [1]> then\n    go to x: (0) y: (0)\n    switch costume to (fave v)\n    set [faved___ v] to [0]\n    forever\n        set [fav v] to <touching (mouse-pointer v)?>\n        if <touching (mouse-pointer v)?> then\n            wait (0.2) seconds\n            if <touching (mouse-pointer v)?> then\n                set [faved___ v] to [1]\n            end\n        end\n    end\nend\n\n@Sprite2\n\nwhen flag clicked\nshow\nforever\n    if <(lives) = [1]> then\n        switch costume to (heart red6 v)\n    end\n    if <(lives) = [2]> then\n        switch costume to (heart red5 v)\n    end\n    if <(lives) = [3]> then\n        switch costume to (heart red v)\n    end\n    if <(lives) = [0]> then\n        switch costume to (heart red7 v)\n    end\n    if <<(LOVED__) = [1]> and <(FAVED___) = [1]>> then\n        if <<touching (mouse-pointer v)?> and <mouse down?>> then\n            set [lives v] to [10000]\n            hide\n            stop [this script v]\n        end\n    end\nend\n\n@Sprite1\n\nwhen flag clicked\nshow\n\nwhen I receive [message1 v]\n\nwhen I receive [message2 v]\n\nwhen I receive [messagem v]\nshow\n\nwhen I receive [messagenom v]\nhide\n\n@Red\n\nwhen I receive [message1 v]\n\nwhen flag clicked\nswitch costume to (costume1 v)\ngo to x: (-20) y: (400)\nrepeat (5)\n    next costume\n    create clone of (_myself_ v)\nend\nswitch costume to (costume1 v)\n\nchange x by (-20)\n\nwait (1) seconds\n\nwait (1) seconds\n\nwhen I receive [messagenom v]\nwait ((costume [number v]) / (5)) seconds\nrepeat until <(y position) = [-380]>\n    change y by (-20)\nend\ngo to x: (-20) y: (400)\n\ngo to x: (-20) y: (400)\n\nwhen I receive [messagem v]\ngo to [front v] layer\nwait (0) seconds\nwait ((costume [number v]) / (5)) seconds\nrepeat until <(y position) = [0]>\n    change y by (-20)\nend\n\n@M\n\nwhen flag clicked\ngo to [front v] layer\nset [mxv v] to [0]\nshow\nset size to (100) %\ngo to x: (0) y: (0)\nset rotation style [left-right v]\npoint in direction (-90)\nforever\n    set [my variable v] to [1]\n    wait (1) seconds\n    repeat (17)\n        change [my variable v] by (1)\n    end\n    repeat (20)\n        change size by (-.5)\n        wait (0) seconds\n    end\n    broadcast (messageM v)\n    repeat (20)\n        change size by (-.5)\n        wait (0) seconds\n    end\n    wait (2) seconds\n    broadcast (messageNoM v)\n    set size to (100) %\n    set [my variable v] to [1]\n    wait (1) seconds\nend\n\nwhen flag clicked\nforever\n    switch costume to (my variable)\nend\n\nwait (0) seconds\n\nchange size by (0)\nwait (0) seconds\n\nwhen I start as a clone\ngo to x: (0) y: (0)\nswitch costume to (m16 v)\n\ngo [backward v] (1) layers\n\nwhen flag clicked\n\n\n\n\n    show\nelse\n    hide\nend\n\nwait (.5) seconds\nforever\n\nwhen I receive [messagenom v]\nhide\nstop [other scripts in sprite v]\n\ncreate clone of (_myself_ v)\n\nbroadcast (messageNoM v)\n\n