Paper World - A Pen Platformer

Instructions: After Days and Months of thinking and making, WayanProductions presents you with Paper World.\nA short and fun pen platformer!\nEvery level is drawn out.\nAbout 75% it's pen\nControls\n<^> or WAD for movement.\nBlue makes you bounce high\nRed Kills You!\nSpace to Skip a Level\nHAVE FUN!!!!!\nDon't forget to love, fav, and follow :)

@Stage\n\nwhen flag clicked\nswitch backdrop to (backdrop1 v)\n\nwhen I receive [show and hide v]\nswitch backdrop to (paper v)\n\nwhen I receive [next level v]\nforever\n    if <(Level) = [9]> then\n        switch backdrop to (ending v)\n    end\nend\n\n@Intro 1\n\nwhen flag clicked\nstart sound [Noisestorm - Crab Rave \(Official Music Video\) v]\nshow\npoint in direction (90)\ngo to x: (-300) y: (0)\nswitch costume to (costume1 v)\nrepeat (60)\n    change x by (10)\n    turn right (7.5) degrees\nend\npoint in direction (90)\nhide\nwait (0.25) seconds\nshow\nrepeat (20)\n    change x by (-14)\nend\nMove\ngo to x: (13) y: (0)\npoint in direction (90)\n\ndefine Move\nforever\n    switch costume to (costume2 v)\n    wait (0.05) seconds\n    switch costume to (costume3 v)\n    wait (0.05) seconds\n    switch costume to (costume5 v)\n    wait (0.05) seconds\n    switch costume to (costume4 v)\n    wait (0.05) seconds\n    switch costume to (costume6 v)\n    wait (0.05) seconds\n    switch costume to (costume7 v)\n    wait (0.05) seconds\n    switch costume to (costume8 v)\nend\n\nwhen flag clicked\nwait (3.8) seconds\nforever\n    repeat (5)\n        turn right (1) degrees\n    end\n    repeat (5)\n        turn left (1) degrees\n    end\n    repeat (5)\n        turn left (1) degrees\n    end\n    repeat (5)\n        turn right (1) degrees\n    end\nend\n\nwhen flag clicked\nwait (8) seconds\nbroadcast (Transition v)\n\nwhen I receive [show and hide v]\nhide\nstop all sounds\nforever\n    play sound [Tobu - Hope \(Original Mix\) v] until done\nend\n\n@Intro 2\n\nwhen flag clicked\nhide\nforever\n    create clone of (_myself_ v)\n    wait (0.5) seconds\nend\n\nwhen I start as a clone\nshow\ngo to [back v] layer\nset [ghost v] effect to (50)\nset size to (pick random (40) to (100)) %\ngo to x: (-234) y: (pick random (140) to (-140))\nforever\n    if <<(x position) > [240]> or <not <(backdrop [number v]) = [1]>>> then\n        stop [other scripts in sprite v]\n        delete this clone\n    end\n    change x by (10)\nend\n\nwhen I start as a clone\nforever\n    repeat (10)\n        change y by (2)\n    end\n    wait (0.01) seconds\n    repeat (10)\n        change y by (-2)\n    end\nend\n\n@Intro 3\n\nwhen flag clicked\nset [ghost v] effect to (0)\ngo to x: (-488) y: (16)\ngo to [front v] layer\nhide\n\nwhen I receive [transition v]\nshow\nrepeat (20)\n    change x by (24)\nend\nwait (3) seconds\nbroadcast (Show and Hide v)\nrepeat (50)\n    change [ghost v] effect by (2)\nend\nbroadcast (Draw Level v)\n\n@Levels\n\nwhen I receive [draw level v]\npoint in direction (90)\nchange [level v] by (1)\nwait (2) seconds\nerase all\nset pen size to (10)\nPlatform Drawing\npen up\nDanger\npen up\nBoing\nwait (1) seconds\nFlag\npen up\nwait (1) seconds\nbroadcast (Start v)\n\nwhen flag clicked\nset [level v] to [0]\nerase all\npen up\n\ndefine Platform Drawing\nset pen color to (#000000)\nif <<(Level) = [1]> or <(Level) = [3]>> then\n    go to x: (-130) y: (-127)\n    pen down\n    repeat (40)\n        move (7) steps\n    end\nend\nif <(Level) = [2]> then\n    go to x: (-130) y: (-127)\n    pen down\n    repeat (15)\n        move (7) steps\n    end\n    pen up\n    move (90) steps\n    wait (1) seconds\n    pen down\n    repeat (15)\n        move (7) steps\n    end\nend\nif <(Level) = [4]> then\n    go to x: (-190) y: (-127)\n    pen down\n    repeat (50)\n        move (8) steps\n    end\n    pen up\n    go to x: (100) y: (-127)\n    pen down\n    repeat (16)\n        change y by (10)\n    end\n    repeat (22)\n        change x by (5)\n    end\n    repeat (16)\n        change y by (-10)\n    end\n    pen up\nend\nif <(Level) = [5]> then\n    go to x: (-240) y: (-160)\n    pen down\n    repeat (48)\n        change x by (10)\n    end\n    pen up\nend\nif <(Level) = [6]> then\n    go to x: (-240) y: (-127)\n    pen down\n    repeat (15)\n        change x by (10)\n    end\n    pen up\n    change x by (100)\n    pen down\n    repeat (23)\n        change x by (10)\n    end\n    pen up\n    change y by (165)\n    change x by (-50)\n    pen down\n    repeat (10)\n        change x by (-10)\n    end\n    pen up\n    change x by (-125)\n    pen down\n    repeat (21)\n        change x by (-10)\n    end\n    pen up\nend\nif <(Level) = [7]> then\n    go to x: (-240) y: (-160)\n    pen down\n    repeat (48)\n        change x by (10)\n    end\n    pen up\n    go to x: (100) y: (-160)\n    pen down\n    repeat (16)\n        change y by (10)\n    end\n    repeat (22)\n        change x by (6)\n    end\n    repeat (16)\n        change y by (-10)\n    end\n    pen up\nend\nif <(Level) = [8]> then\n    go to x: (-240) y: (-127)\n    pen down\n    repeat (48)\n        change x by (10)\n    end\n    pen up\n    go to x: (-240) y: (-33)\n    pen down\n    repeat (40)\n        change x by (10)\n    end\n    pen up\n    go to x: (-180) y: (66)\n    pen down\n    repeat (45)\n        change x by (10)\n    end\n    pen up\nend\n\ndefine Flag\nset pen color to (#00ff2e)\nif <<(Level) = [1]> or <(Level) = [3]>> then\n    go to x: (140) y: (-120)\nend\nif <(Level) = [2]> then\n    go to x: (160) y: (-127)\nend\nif <(Level) = [4]> then\n    go to x: (180) y: (33)\nend\nif <(Level) = [5]> then\n    go to x: (190) y: (-160)\nend\nif <(Level) = [6]> then\n    go to x: (-220) y: (38)\nend\nif <(Level) = [7]> then\n    go to x: (190) y: (0)\nend\nif <(Level) = [8]> then\n    go to x: (180) y: (66)\nend\npen down\nrepeat (7)\n    change y by (10)\nend\nwait (0.25) seconds\nrepeat (4)\n    change x by (10)\nend\nwait (0.25) seconds\nrepeat (4)\n    change y by (-10)\nend\nwait (0.25) seconds\nrepeat (4)\n    change x by (-10)\nend\npen up\n\nwhen I receive [next level v]\nerase all\n\ndefine Danger\nset pen color to (#ff0000)\nif <(Level) = [3]> then\n    go to x: (0) y: (-127)\n    Draw Spike\nend\nif <(Level) = [4]> then\n    go to x: (-100) y: (-127)\n    Draw Spike\nend\nif <(Level) = [5]> then\n    go to x: (-240) y: (70)\n    pen down\n    repeat (48)\n        change x by (10)\n    end\nend\nif <(Level) = [6]> then\n    go to x: (-180) y: (-127)\n    Draw Spike\n    go to x: (93) y: (-127)\n    Draw Spike\n    go to x: (70) y: (38)\n    Draw Spike\n    go to x: (-160) y: (38)\n    Draw Spike\nend\nif <(Level) = [7]> then\n    go to x: (-100) y: (-160)\n    Draw Spike\n    go to x: (60) y: (-20)\n    Draw Spike\nend\nif <(Level) = [8]> then\n    go to x: (-100) y: (-120)\n    pen down\n    repeat (8)\n        move (3) steps\n    end\n    pen up\n    go to x: (60) y: (-120)\n    pen down\n    repeat (8)\n        move (3) steps\n    end\n    pen up\n    go to x: (-170) y: (-27)\n    pen down\n    repeat (8)\n        move (3) steps\n    end\n    pen up\n    go to x: (40) y: (-27)\n    pen down\n    repeat (8)\n        move (3) steps\n    end\n    pen up\n    go to x: (-70) y: (73)\n    pen down\n    repeat (8)\n        move (3) steps\n    end\n    pen up\n    go to x: (100) y: (73)\n    pen down\n    repeat (8)\n        move (3) steps\n    end\nend\npen up\n\ndefine Boing\nset pen color to (#0006ca)\nif <(Level) = [4]> then\n    go to x: (50) y: (-120)\n    pen down\n    repeat (5)\n        change x by (10)\n    end\n    pen up\nend\nif <(Level) = [5]> then\n    go to x: (-130) y: (-150)\n    pen down\n    repeat (10)\n        change x by (5)\n    end\n    pen up\n    go to x: (-20) y: (-150)\n    pen down\n    repeat (10)\n        change x by (5)\n    end\n    pen up\n    go to x: (90) y: (-150)\n    pen down\n    repeat (10)\n        change x by (5)\n    end\nend\nif <(Level) = [6]> then\n    go to x: (195) y: (-120)\n    pen down\n    repeat (10)\n        change x by (5)\n    end\nend\nif <(Level) = [7]> then\n    go to x: (60) y: (-150)\n    pen down\n    repeat (10)\n        change x by (3.5)\n    end\nend\nif <(Level) = [8]> then\n    go to x: (170) y: (-120)\n    pen down\n    repeat (10)\n        change x by (5)\n    end\n    pen up\n    go to x: (-230) y: (-25)\n    pen down\n    repeat (10)\n        change x by (5)\n    end\n    pen up\nend\npen up\n\ndefine Draw Spike\npoint in direction (29)\npen down\nrepeat (10)\n    move (5) steps\nend\npoint in direction (151)\nrepeat (10)\n    move (5) steps\nend\npoint in direction (90)\nrepeat (9)\n    move (-5) steps\nend\npen up\n\nwhen flag clicked\nforever\n    if <(Level) = [9]> then\n        erase all\n        stop [other scripts in sprite v]\n    end\nend\n\n@Player\n\nwhen flag clicked\nswitch costume to (costume1 v)\nhide\n\nwhen I receive [start v]\nshow\nif <<(Level) = [1]> or <(Level) = [3]>> then\n    go to x: (-113) y: (-103)\nend\nif <(Level) = [2]> then\n    go to x: (-111) y: (-104)\nend\nif <(Level) = [4]> then\n    go to x: (-170) y: (-101)\nend\nif <(Level) = [5]> then\n    go to x: (-217) y: (-134)\nend\nif <(Level) = [6]> then\n    go to x: (-217) y: (-103)\nend\nif <(Level) = [7]> then\n    go to x: (-206) y: (-134)\nend\nif <(Level) = [8]> then\n    go to x: (-206) y: (-103)\nend\n\nwhen I receive [start v]\nset [xv v] to [0]\nset [yv v] to [0]\nforever\n    change [yv v] by (-1)\n    change y by (Yv)\n    if <touching color (#000000)?> then\n        change y by ((Yv) * (-1))\n        set [yv v] to [0]\n    end\n    change y by (-1)\n    if <touching color (#000000)?> then\n        if <<key (up arrow v) pressed?> or <key (w v) pressed?>> then\n            set [yv v] to [12]\n            start sound [High Whoosh v]\n        end\n    end\n    change y by (1)\n    if <<touching color (#00ff2e)?> or <key (space v) pressed?>> then\n        broadcast (Next Level v)\n        hide\n        start sound [Children Yay! Sound Effect v]\n        go to x: (-113) y: (-103)\n        stop [other scripts in sprite v]\n        stop [this script v]\n    end\n    if <touching color (#0006ca)?> then\n        start sound [Drum Boing v]\n        set [yv v] to [20]\n    end\n    if <<[-180] > (y position)> or <touching color (#ff0000)?>> then\n        hide\n        start sound [Crunch v]\n        broadcast (Restart v)\n    end\nend\n\nwhen I receive [start v]\nforever\n    if <<key (right arrow v) pressed?> or <key (d v) pressed?>> then\n        change [xv v] by (1)\n    end\n    if <<key (left arrow v) pressed?> or <key (a v) pressed?>> then\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 (#000000)?> then\n        change y by (1)\n        if <touching color (#000000)?> then\n            change y by (1)\n            if <touching color (#000000)?> then\n                change y by (1)\n                if <touching color (#000000)?> then\n                    change y by (1)\n                    if <touching color (#000000)?> then\n                        change y by (1)\n                        if <touching color (#000000)?> then\n                            change x by ((Xv) * (-1))\n                            change y by (-5)\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\n\nwhen I start as a clone\nswitch costume to (costume2 v)\nrepeat (40)\n    change [ghost v] effect by (15)\nend\ndelete this clone\n\nwhen I receive [start v]\nforever\n    create clone of (_myself_ v)\nend\n\nwhen I receive [restart v]\nshow\nif <<(Level) = [1]> or <(Level) = [3]>> then\n    go to x: (-113) y: (-103)\nend\nif <(Level) = [2]> then\n    go to x: (-111) y: (-104)\nend\nif <(Level) = [4]> then\n    go to x: (-170) y: (-101)\nend\nif <(Level) = [5]> then\n    go to x: (-217) y: (-134)\nend\nif <(Level) = [6]> then\n    go to x: (-217) y: (-103)\nend\nif <(Level) = [7]> then\n    go to x: (-206) y: (-134)\nend\nif <(Level) = [8]> then\n    go to x: (-206) y: (-103)\nend\n\nwhen flag clicked\nforever\n    if <(Level) = [9]> then\n        hide\n        stop [other scripts in sprite v]\n    end\nend\n\n@Level Transition\n\nwhen flag clicked\ngo to [front v] layer\nhide\n\nwhen I receive [next level v]\nif <not <(Level) = [9]>> then\n    go to x: (26) y: (396)\n    show\n    repeat (30)\n        change y by (-12)\n    end\n    wait (1) seconds\n    repeat (30)\n        change y by (-13)\n    end\n    hide\n    broadcast (Draw Level v)\nend\n\n@Joe\n\nwhen flag clicked\nswitch costume to (costume0 v)\ngo to x: (57) y: (61)\nhide\n\nwhen backdrop switches to [paper v]\nshow\n\nwhen I receive [draw level v]\nnext costume\n\nwhen flag clicked\nforever\n    if <(Level) = [6]> then\n        hide\n    end\nend\n\n@Lava Rising\n\nwhen flag clicked\ngo to x: (0) y: (-344)\nhide\n\nwhen I receive [restart v]\ngo to x: (0) y: (-344)\n\nwhen I receive [start v]\ngo to x: (0) y: (-344)\nforever\n    if <<(Level) = [6]> or <(Level) = [8]>> then\n        show\n        forever\n            change y by (0.5)\n        end\n    end\nend\n\nwhen I receive [next level v]\ngo to x: (0) y: (-344)\nhide\nstop [other scripts in sprite v]\n\n@Thumbnail\n\nwhen flag clicked\nhide\n\n