Lava Planet|| A  Platformer #Games

Instructions: Welcome to my biggest game I have ever made till now\n!!!!!!!!!!!  If the project doesnt work in starting click flag again !!!!!!!!\n✦✦✦Instruction✦✦✦\n1.WASD or arrow keys\n3.Down to end\n2.Avoid Spikes\n3. 6 Levels try to win\n4.Game ends if you are in last level\n5.If the game doesn't work properly or lags double click the green flag\n✦✦✦Story✦✦✦\nYou are Rocky a astronaut of a random galaxy  who falls in a planet full of lava while exploring in space....Now you gotta escape for your life\n✦✦✦Credits✦✦✦\n15% to @-UltraProgrammer- for art idea\n15% to @rishav300 for the intro\ncooltetx.com for text\nRemaining 70% code and art by me\nTrying to reply to comments

@Stage\n\nwhen flag clicked\nwait (10) seconds\nforever\n    play sound [Open Secrets v] until done\nend\n\n@Blank3\n\n@Blank2\n\n@Blank\n\n@Player\n\ndefine You are out , mb Nl\nset [x velocity v] to [0]\nset [y velocity v] to [0]\ngo to x: (-189) y: (-53)\n\ndefine GP\nif <<key (right arrow v) pressed?> or <key (s v) pressed?>> then\n    change [x velocity v] by (2)\n    switch costume to (right v)\nend\nif <<key (left arrow v) pressed?> or <key (a v) pressed?>> then\n    change [x velocity v] by (-2)\n    switch costume to (left v)\nend\nchange x by (X Velocity)\nDTCT\nif <touching (level v)?> then\n    change x by ((X Velocity) * (-1))\n    if <<key (up arrow v) pressed?> or <<key (w v) pressed?> or <key (space v) pressed?>>> then\n        if <(X Velocity) > [0]> then\n            set [x velocity v] to [-15]\n            set [y velocity v] to [10]\n        else\n            set [x velocity v] to [15]\n            set [y velocity v] to [10]\n        end\n    end\nelse\n    set [x velocity v] to ((X Velocity) * (0.8))\nend\nchange y by (Y Velocity)\nif <touching (level v)?> then\n    change y by ((Y Velocity) * (-1))\n    set [y velocity v] to [0]\n    if <<key (up arrow v) pressed?> or <<key (w v) pressed?> or <key (space v) pressed?>>> then\n        switch costume to (up v)\n        if <(Jump) = [y]> then\n            set [y velocity v] to [12]\n            set [jump v] to [n]\n        end\n    end\nelse\n    change [y velocity v] by (-1)\n    set [jump v] to [y]\nend\nif <(x position) > [207]> then\n    change [level v] by (1)\n    You are out , mb Nl\nend\nif <touching (spikes v)?> then\n    go to x: (-189) y: (-90)\nend\nif <not <key (any v) pressed?>> then\n    switch costume to (middle v)\nend\nif <<<key (space v) pressed?> or <<key (up arrow v) pressed?> or <key (w v) pressed?>>> and <<key (right arrow v) pressed?> or <key (s v) pressed?>>> then\n    switch costume to (upright v)\nend\nif <<<key (space v) pressed?> or <<key (up arrow v) pressed?> or <key (w v) pressed?>>> and <<key (left arrow v) pressed?> or <key (a v) pressed?>>> then\n    switch costume to (upleft v)\nend\nif <touching (trampoline v)?> then\n    set [y velocity v] to [15]\nend\nif <<key (down arrow v) pressed?> or <key (d v) pressed?>> then\n    switch costume to (bent down v)\nend\nif <<(Level) = [6]> and > then\n    stop [all v]\nend\nif <<(Level) = [7]> and <(x position) > [207]>> then\n    set [level v] to [0]\n    stop [all v]\nend\n\nwhen flag clicked\nhide\nwait (10) seconds\ngo to x: (-194) y: (-90)\nswitch costume to (middle v)\nYou are out , mb Nl\nshow\nset [level v] to [1]\nforever\n    play sound [Open Secrets v] until done\n    GP\nend\n\ndefine DTCT\nset [sliding/slide ? v] to [0]\nrepeat until <<(Sliding/Slide ?) = [8]> or <not <touching (level v)?>>>\n    change y by (1)\n    change [sliding/slide ? v] by (1)\nend\nif <touching (level v)?> then\n    change y by (-8)\nend\n\ngo to x: (-209) y: (-111)\n\nwait (0.1) seconds\n\nset [y velocity v] to [15]\n\nswitch costume to (green v)\n\nif <<key (down arrow v) pressed?> or <key (d v) pressed?>> then\n    switch costume to (bent down v)\nend\nif <<key (up arrow v) pressed?> or <<key (w v) pressed?> or <key (space v) pressed?>>> then\n    if <(X Velocity) > [0]> then\n        set [x velocity v] to [-15]\n        set [y velocity v] to [10]\n    else\n        set [x velocity v] to [15]\n        set [y velocity v] to [10]\n    end\nend\n\ngo to x: (-213) y: (-102)\nshow\n\nwhen flag clicked\n\n@Level\n\nwhen flag clicked\nhide\nwait (10) seconds\nif <(costume [number v]) = [7]> then\n    switch costume to (costume1 v)\nend\nswitch costume to (costume1 v)\nforever\n    show\n    switch costume to (Level)\n    if <(costume [number v]) = [7]> then\n        wait (4) seconds\n        stop [all v]\n    end\nend\n\nwait (0.1) seconds\nstop [all v]\n\n@Spikes\n\nwhen flag clicked\nhide\nwait (10) seconds\nshow\nswitch costume to (costume1 v)\nforever\n    switch costume to (Level)\nend\n\n@Intro1\n\nwhen flag clicked\ngo to x: (0) y: (0)\npoint in direction (90)\nset size to (100) %\nset volume to (100) %\nstart sound [MDK- Press Start v]\nset [broadcast v] to []\nset [clone id v] to []\nset [var v] to [0]\nhide\nswitch costume to (blank v)\nclear graphic effects\nset [clone id v] to [Top]\ncreate clone of (_myself_ v)\nset [clone id v] to [Bottom]\ncreate clone of (_myself_ v)\nwait (2) seconds\nset [clone id v] to [Name]\ncreate clone of (_myself_ v)\nset [clone id v] to [Real]\nwait until <(Broadcast) = [End]>\nrepeat (50)\n    change volume by (-2)\nend\nstop all sounds\n\nwhen I start as a clone\nif <(Clone ID) = [Top]> then\n    go to x: (0) y: (0)\n    switch costume to (top v)\n    show\n    wait (2) seconds\n    repeat (10)\n        change y by (((140) - (y position)) / (4))\n    end\n    wait until <(Broadcast) = [End]>\n    repeat (20)\n        change y by (((0) - (y position)) / (4))\n        go to [front v] layer\n    end\n    wait (0.2) seconds\n    repeat (20)\n        change [ghost v] effect by (5)\n        go to [front v] layer\n    end\n    delete this clone\nend\nif <(Clone ID) = [Bottom]> then\n    go to x: (0) y: (0)\n    switch costume to (bottom v)\n    show\n    wait (2) seconds\n    repeat (10)\n        change y by (((-140) - (y position)) / (4))\n    end\n    wait until <(Broadcast) = [End]>\n    repeat (20)\n        change y by (((0) - (y position)) / (4))\n        go to [front v] layer\n    end\n    wait (0.2) seconds\n    repeat (20)\n        change [ghost v] effect by (5)\n        go to [front v] layer\n    end\n    delete this clone\nend\nif <(Clone ID) = [Name]> then\n    go to x: (0) y: (0)\n    set [var v] to [0]\n    switch costume to (yourname v)\n    show\n    set size to (0) %\n    repeat (30)\n        set [var v] to (((Var) * (0.8)) + (((50) - (size)) / (5)))\n        change size by (Var)\n    end\n    set [check v] to [0]\n    repeat (10)\n        Bar\n        change [check v] by (1)\n        set size to (100) %\n        repeat (10)\n            change size by (((50) - (size)) / (5))\n            set [frame v] to ((size) - (50))\n            go to x: (pick random (-2) to (2)) y: (pick random (-2) to (2))\n        end\n        go to x: (0) y: (0)\n        wait (0.2) seconds\n    end\n    set [broadcast v] to [End]\n    wait (0.6) seconds\n    delete this clone\nend\nif <(Clone ID) = [Bar]> then\n    go to x: (0) y: (0)\n    set [var v] to [0]\n    switch costume to (yourname v)\n    show\n    set size to (0) %\n    go to [back v] layer\n    repeat (30)\n        switch costume to (blank v)\n        change size by (Frame)\n        switch costume to (bar v)\n        change [ghost v] effect by (2.5)\n    end\n    delete this clone\nend\nif <(Clone ID) = [Circle]> then\n    go to x: (0) y: (0)\n    set [var v] to [0]\n    switch costume to (yourname v)\n    show\n    set size to (0) %\n    go to [back v] layer\n    repeat (30)\n        switch costume to (blank v)\n        change size by ((Frame) * (2))\n        switch costume to (circle v)\n        change [ghost v] effect by (2.5)\n        go to [back v] layer\n    end\n    delete this clone\nend\n\ndefine Bar\nset [clone id v] to [Bar]\ncreate clone of (_myself_ v)\nif <((Check) mod (2)) = [1]> then\n    set [clone id v] to [Circle]\n    create clone of (_myself_ v)\nend\nset [clone id v] to [Name]\n\n@Trampoline\n\nwhen flag clicked\nhide\nwait (10) seconds\nrepeat until <(Level) = [4]>\n    TC\nend\nrepeat until <(Level) = [5]>\n    Tc(L4)\nend\nrepeat until <(Level) = [6]>\n    Tc(L5)\nend\nhide\n\nswitch costume to (costume1 v)\ngo to x: (36) y: (28)\n\ndefine TC\nif <(Level) = [3]> then\n    show\n    go to x: (36) y: (28)\nelse\n    hide\nend\nif <touching (player v)?> then\n    repeat (9)\n        next costume\n    end\nend\n\nswitch costume to (Level)\n\ngo to x: (36) y: (28)\n\ndefine Tc(L4)\nif <(Level) = [4]> then\n    show\nelse\n    go to x: (138) y: (24)\n    hide\nend\nif <touching (player v)?> then\n    repeat (9)\n        next costume\n    end\nend\n\nhide\n\nshow\n\nwhen flag clicked\n\nforever\n\nforever\n    TC\nend\n\n\n    \nend\n\nwait (10) seconds\nforever\n\ngo to x: (141) y: (32)\n\ndefine Tc(L5)\nif <(Level) = [5]> then\n    show\n    go to x: (133) y: (29)\nelse\n    hide\nend\nif <touching (player v)?> then\n    repeat (9)\n        next costume\n    end\nend\n\nTc(L4)\n\n@Thumbnail\n\nwhen flag clicked\ngo to x: (0) y: (0)\ngo [forward v] (99) layers\nhide\nset [stop timer v] to [0.1]\nforever\n    set [stop timer v] to ((timer) + (0.1))\nend\n\nwhen [timer v] > (STOP TIMER)\nhide variable [level v]\nhide variable [timer v]\nhide variable [deaths v]\ngo to x: (0) y: (300)\nshow\nglide (0.5) secs to x: (0) y: (0)\n\nwhen I receive [start game v]\n\n