∂ɐɐρ รρǝcɐ — Adventure Platformer


@Stage\n\nwhen flag clicked\nswitch backdrop to (start v)\n\nwhen I receive [message1 v]\nswitch backdrop to (game v)\n\nwhen flag clicked\nforever\n    play sound [middle school ft v] until done\nend\n\n@player\n\nwhen flag clicked\nforever\n    if <<(y position) < [-180]> or <<touching (danger 1 v)?> or <touching (danger 2 v)?>>> then\n        change [dead? v] by (1)\n    end\nend\n\nwhen flag clicked\nset [dead? v] to [0]\ngo to x: (-230) y: (0)\nforever\n    set size to (150) %\n    set rotation style [left-right v]\n    if <<key (r v) pressed?> or <(dead?) > [0]>> then\n        repeat (5)\n            change [ghost v] effect by (20)\n        end\n        wait (0.3) seconds\n        set [ghost v] effect to (0)\n        set [dead? v] to [0]\n    end\nend\n\nwhen I receive [message1 v]\nrepeat (5)\n    change [ghost v] effect by (20)\nend\ngo to x: (-230) y: (0)\nset [jump v] to [0]\nrepeat (5)\n    change [ghost v] effect by (-20)\nend\n\nwhen flag clicked\nforever\n    set y to (round ([y position v] of [hitbox v]))\n    move (distance) steps\n    point towards (hitbox v)\n    set [distance v] to (round ((distance to [hitbox v]) / (3)))\nend\n\n@hitbox\n\ndefine checkGround\nif <touching (level v)?> then\n    repeat until <not <touching (level v)?>>\n        change y by (1)\n        set [y.vel v] to [0]\n        set [jump v] to [1]\n    end\nend\n\nwhen I receive [message1 v]\nrepeat (5)\ngo to x: (-230) y: (0)\nset [jump v] to [0]\nset [y.vel v] to [0]\nrepeat (5)\n\nwhen flag clicked\nset [debug v] to [0]\ngo to x: (-230) y: (0)\nset [y.vel v] to [0]\nset [jump v] to [0]\nset rotation style [left-right v]\nforever\n    set size to (150) %\n    if <<key (d v) pressed?> or <key (right arrow v) pressed?>> then\n        point in direction (90)\n        move (6) steps\n        if <<(x position) > [228]> or <touching (level v)?>> then\n            move (-6) steps\n        end\n    end\n    if <<key (a v) pressed?> or <key (left arrow v) pressed?>> then\n        point in direction (-90)\n        move (6) steps\n        if <<(x position) < [-231]> or <touching (level v)?>> then\n            move (-6) steps\n        end\n    end\n    if <<<key (space v) pressed?> or <key (up arrow v) pressed?>> or <key (w v) pressed?>> then\n        if <(Jump) = [1]> then\n            set [y.vel v] to [10]\n            set [jump v] to [0]\n        end\n    end\n    if <<key (r v) pressed?> or <(dead?) > [0]>> then\n        repeat (5)\n        go to x: (-230) y: (0)\n        set y to (20)\n        set [y.vel v] to [0]\n        wait (0.3) seconds\n    end\n    change y by (y.vel)\n    change [y.vel v] by (-0.5)\n    checkGround\nend\n\ndefine Debug\nif <<(username) = [npjensen]> and <key (i v) pressed?>> then\n    if <(Debug) = [0]> then\n        wait until <not <key (i v) pressed?>>\n        hide variable [debug v]\n        hide variable [dead? v]\n        hide variable [distance v]\n        hide variable [jump v]\n        hide variable [y.vel v]\n        set [ghost v] effect to (100)\n        change [debug v] by (1)\n    else\n        wait until <not <key (i v) pressed?>>\n        show variable [debug v]\n        show variable [dead? v]\n        show variable [distance v]\n        show variable [jump v]\n        show variable [y.vel v]\n        set [ghost v] effect to (50)\n        set [debug v] to [0]\n    end\nend\n\nwhen flag clicked\nResetDebug\nforever\n    Debug\nend\n\ndefine ResetDebug\nhide variable [debug v]\nhide variable [dead? v]\nhide variable [distance v]\nhide variable [jump v]\nhide variable [y.vel v]\nset [ghost v] effect to (100)\n\n@portal\n\nwhen flag clicked\ngo to x: (200) y: (-50)\nforever\n    point in direction (([sin v] of ((timer) * (100)) ) * (50))\nend\n\nwhen flag clicked\nset [lvl v] to [1]\nforever\n    if <touching (player v)?> then\n        broadcast (message1 v)\n        change [lvl v] by (1)\n        wait (0.5) seconds\n    end\nend\n\n@background\n\nwhen flag clicked\nforever\n    set size to (120) %\n    go to x: (() - (([x position v] of [player v]) / (5))) y: (() - (([y position v] of [player v]) / (5)))\nend\n\nwhen I receive [message1 v]\nrepeat (5)\n    change [ghost v] effect by (20)\nend\nrepeat (5)\n    change [ghost v] effect by (-20)\nend\n\n@level\n\nwhen flag clicked\nswitch costume to (start v)\nforever\n    set size to (100) %\nend\n\nwhen I receive [message1 v]\nnext costume\n\n@thumbnail + time\n\nwhen flag clicked\nforever\n    show\n    set [ghost v] effect to (100)\n    go to [front v] layer\nend\n\nwhen flag clicked\nshow variable [lvl v]\nhide variable [time v]\nhide variable [☁ wr v]\nset [time v] to [0]\nwait until <([costume name v] of [level v]) = [lvl1]>\nrepeat until <([costume name v] of [level v]) = [lvl7]>\n    set [time v] to (timer)\nend\nshow variable [time v]\nshow variable [☁ wr v]\nif <<(☁ WR) > (Time)> and <not <(username) = [npjensen]>>> then\n    set [☁ wr v] to (Time)\nend\n\nshow variable [lvl v]\nshow variable [time v]\nshow variable [☁ wr v]\n\nhide variable [lvl v]\nhide variable [time v]\nhide variable [☁ wr v]\n\nset [☁ wr v] to [100000]\n\n