random a pen platformer - with cloud scores!
@Stage\n\n@Sprite1\n\ndefine glide (x) (y)\npen down\nglide (0.0001) secs to x: (x) y: (y)\n\ndefine relocate (x) (y)\npen up\ngo to x: (x) y: (y)\n\nwhen flag clicked\nhide\nforever\n    set [loading v] to [1]\n    erase all\n    set pen color to (#00e654)\n    set pen size to (20)\n    relocate [-239] [-81]\n    glide (pick random (-239) to (100)) [-81]\n    glide (x position) (pick random (-81) to (100))\n    relocate [-239] [-81]\n    glide (pick random (x position) to ((x position) + (500))) [-81]\n    relocate (x position) [-81]\n    glide (x position) (pick random (y position) to ((y position) + (100)))\n    relocate (x position) [-81]\n    repeat until <touching (_edge_ v)?>\n        glide ((x position) + (1000)) (y position)\n    end\n    set [loading v] to [0]\n    broadcast (stop loading v)\n    wait until <(next) = [1]>\nend\n\nwhen flag clicked\nset [☁ level v] to [1]\n\nwhen I receive [next v]\nchange [☁ level v] by (1)\n\nwhen I receive [next v]\nset [next v] to [1]\nwait (0.3) seconds\nset [next v] to [0]\n\nwhen flag clicked\nset [next v] to [0]\n\n@Sprite2\n\n@Basketball\n\ndefine Platform (jump height) (friction) (running speed)\nswitch costume to (hitbox v)\nif <<key (right arrow v) pressed?> or <key (d v) pressed?>> then\n    point in direction (90)\n    change [x velocity v] by (running speed)\nend\nif <<key (left arrow v) pressed?> or <key (a v) pressed?>> then\n    point in direction (-90)\n    change [x velocity v] by ((running speed) * (-1))\nend\nset [x velocity v] to ((X Velocity) * (friction))\nchange x by (X Velocity)\nif <touching color (#00e654)?> then\n    set [slope v] to [0]\n    repeat until <<(Slope) = [8]> or <not <touching color (#00e654)?>>>\n        change [slope v] by (1)\n        change y by (1)\n    end\n    if <touching color (#00e654)?> then\n        change y by ((Slope) * (-1))\n        repeat ([ceiling v] of ([abs v] of (X Velocity) ) )\n            if <touching color (#00e654)?> then\n                change x by (([abs v] of (X Velocity) ) / ((X Velocity) * (-1)))\n            end\n        end\n        if <key (up arrow v) pressed?> then\n            set [y velocity v] to [10]\n            if <(X Velocity) > [0]> then\n                set [x velocity v] to [-15]\n            else\n                set [x velocity v] to [15]\n            end\n        else\n            set [x velocity v] to [0]\n        end\n    end\nend\nchange y by (Y Velocity)\nif <touching color (#00e654)?> then\n    repeat ([ceiling v] of ([abs v] of (Y Velocity) ) )\n        if <touching color (#00e654)?> then\n            change y by (([abs v] of (Y Velocity) ) / ((Y Velocity) * (-1)))\n        end\n    end\n    if <<(([abs v] of (Y Velocity) ) / (Y Velocity)) = [-1]> and <<key (up arrow v) pressed?> or <key (w v) pressed?>>> then\n        set [y velocity v] to (jump height)\n    else\n        set [y velocity v] to [0]\n        switch costume to (idle v)\n    end\nelse\n    change [y velocity v] by (-1)\nend\n\nwhen flag clicked\nbroadcast (start loading v)\nrepeat until <(loading) = [0]>\nend\ngo to x: (-216) y: (157)\nset [x velocity v] to [0]\nset [y velocity v] to [0]\nforever\n    Platform [12] [0.7] [3]\nend\n\nwhen flag clicked\nforever\n    wait until <touching (sprite3 v)?>\n    broadcast (start loading v)\n    broadcast (next v)\n    repeat until <(loading) = [0]>\n    end\n    go to x: (-216) y: (157)\n    wait (0.5) seconds\nend\n\nwhen flag clicked\nrepeat (3)\n    wait until <touching color (#d40000)?>\n    go to x: (-216) y: (157)\nend\nbroadcast (game over v)\nstop [all v]\n\nwhen I receive [retry v]\ngo to x: (-216) y: (157)\n\n@Sprite3\n\n@Sprite4\n\nwhen I receive [start loading v]\nshow\n\nwhen I receive [stop loading v]\nhide\n\n@Sprite5\n\nwhen flag clicked\ngo to x: (pick random (-131) to (213)) y: (-52)\n\nwhen I receive [next v]\ngo to x: (pick random (-131) to (213)) y: (-52)\n\nwhen flag clicked\nforever\n    if <<touching color (#d40000)?> or <touching color (#00e654)?>> then\n        move (-10) steps\n    end\nend\n\n@Sprite6\n\nwhen flag clicked\ngo to x: (pick random (-131) to (213)) y: (-52)\n\nwhen I receive [next v]\ngo to x: (pick random (-131) to (213)) y: (-52)\n\nwhen flag clicked\nforever\n    if <<touching color (#d40000)?> or <touching color (#00e654)?>> then\n        move (10) steps\n    end\nend\n\n@Sprite7\n\nwhen flag clicked\ngo to x: (pick random (-131) to (213)) y: (-52)\n\nwhen I receive [next v]\ngo to x: (pick random (-131) to (213)) y: (-52)\n\nwhen flag clicked\nforever\n    if <<touching color (#d40000)?> or <touching color (#00e654)?>> then\n        move (0) steps\n    end\nend\n\nwhen I receive [next v]\nnext costume\n\n@Sprite8\n\nwhen flag clicked\nforever\n    if <touching (mouse-pointer v)?> then\n        set size to (110) %\n    else\n        set size to (100) %\n    end\nend\n\nwhen this sprite clicked\nbroadcast (retry v)\n\n@Sprite9\n\n@Sprite10\n\nwhen flag clicked\nswitch costume to (costume1 v)\n\nwhen I receive [next v]\nnext costume\n\n@Sprite11\n\nwhen flag clicked\nhide\n\nwhen I receive [game over v]\nshow\n\n@Sprite12\n\nwhen flag clicked\nhide\nforever\n    play sound [Mind-the-Moment v] until done\nend\n\n@leaderboard\n\nwhen I receive [game over v]\nhide list [leaderboard v]\nadd (username) to [leaderboard v]\nadd (☁ level) to [leaderboard v]\n\nwhen flag clicked\nshow list [leaderboard v]\n\n
this is an endless, 80% pen and random level platformer! and what i mean with random? when you click the green flag  the project automatically loads you a level. \nalso, now with leaderboards!\n_____________________________________________\nif you are stuck in a wall, press the play again button on the right top screen. arrow keys to move, and of course don't touch the red.\n_______________________________\npls love and fave for more nice games!\n___________________________________\n#games #tutorials #all #art #stories #music #aniamtions\n#pen #100% #random #endless #platformer #with #a #lot #of #hashtags #lol #JOBRA #KING #studio\n#JOBRA-KING-studio