Purple-a Platformer
@Stage\n\nwhen flag clicked\nswitch backdrop to (giphy v)\n\n@Player\n\ndefine Define Gravity\nchange y by (fallspeed)\nif <<touching (ground v)?> and <touching color (#74009c)?>> then\n    if <(fallspeed) < [0]> then\n        set [reversestep v] to [1]\n    else\n        set [reversestep v] to [-1]\n    end\n    repeat until <not <<touching (ground v)?> and <touching color (#74009c)?>>>\n        change y by (reversestep)\n    end\n    set [fallspeed v] to [0]\nelse\n    change [fallspeed v] by (gravity)\nend\n\ndefine RUNControls\nif <key (right arrow v) pressed?> then\n    switch costume to (costume1 v)\n    change x by (RUNSPEED)\n    if <<touching (ground v)?> and <touching color (#74009c)?>> then\n        change x by ((0) - (RUNSPEED))\n    end\nend\nif <key (left arrow v) pressed?> then\n    switch costume to (costume2 v)\n    change x by ((0) - (RUNSPEED))\n    if <<touching (ground v)?> and <touching color (#74009c)?>> then\n        change x by (RUNSPEED)\n    end\nend\n\ndefine starting position\nset [fallspeed v] to [0]\ngo to x: (-140) y: (25)\n\nwhen flag clicked\nstarting position\nshow\nset [runspeed v] to [5]\nset [gravity v] to [-1]\nset [fallspeed v] to [0]\nset [takeoffspeed v] to [15]\nforever\n    RUNControls\n    Jump Control\n    Define Gravity\n    if <touching (jumping pads v)?> then\n        set [takeoffspeed v] to [21]\n        set [fallspeed v] to (takeoffspeed)\n        set [takeoffspeed v] to [15]\n    end\n    if <(x position) > [232]> then\n        starting position\n        broadcast (next v)\n    end\n    if <(y position) < [-170]> then\n        starting position\n    end\nend\n\ndefine Jump Control\nif <key (up arrow v) pressed?> then\n    change y by (-1)\n    if <<touching (ground v)?> and <touching color (#74009c)?>> then\n        set [fallspeed v] to (takeoffspeed)\n    end\n    change y by (1)\nend\n\nbroadcast (\[arty v)\n\nbroadcast (\[arty v)\n\nwhen flag clicked\nforever\n    play sound [Kronos v] until done\nend\n\n@Ground\n\nwhen I receive [next v]\nnext costume\n\nwhen flag clicked\nswitch costume to (1 v)\nshow\n\nwhen flag clicked\nset [time v] to [0]\nhide variable [time v]\nrepeat until <(costume [number v]) = [5]>\n    wait (0.1) seconds\n    change [time v] by (0.1)\nend\nshow variable [time v]\n\n@Backdrop\n\nwhen flag clicked\ngo to x: (0) y: (0)\nshow\ngo to [back v] layer\nforever\n    next costume\nend\n\n@Trail\n\nwhen flag clicked\nforever\n    go to (player v)\n    create clone of (_myself_ v)\nend\n\nwhen I start as a clone\nset [ghost v] effect to (0)\nrepeat (20)\n    change [ghost v] effect by (5)\nend\ndelete this clone\n\n@Jumping Pads\n\nwhen I receive [next v]\nnext costume\n\nwhen flag clicked\ngo to x: (0) y: (0)\nswitch costume to (1 v)\nshow\ngo to [front v] layer\n\n@Thumbnail\n\nwhen flag clicked\ngo to x: (0) y: (0)\nshow\nwait (0.1) seconds\ngo to [front v] layer\nset [ghost v] effect to (100)\n\n
*****************************Purple***********************************\n___________________________________________________\n-Love!\n-Favourite!\n-Follow!