Naturistic- A scrolling Platformer

Instructions: R to restart\n\nFollow @theworldsdumb0 and @Deep_thoughts\n\nIM SHOWING OF THE GRAPHICS :3\nAdvertising gets reported

@Stage\n\n@level\n\nswitch costume to (1 v)\n\nwhen [f v] key pressed\n\ngo to x: (-240) y: (-86)\n\nwhen flag clicked\nplay sound [Alan Walker - Play \(Lyrics\) ft v] until done\n\nwhen flag clicked\nswitch costume to (1 v)\nhide\nset [level x v] to [0]\nrepeat (12)\n    create clone of (_myself_ v)\n    change [level x v] by (470)\n    next costume\nend\n\nwhen I start as a clone\nshow\nforever\n    go to x: (((sx) * (-1)) + (level X)) y: ((sy) * (-1))\nend\n\n@Player\n\nwhen flag clicked\nset rotation style [left-right v]\nforever\n    if <key (right arrow v) pressed?> then\n        point in direction (90)\n    end\n    if <key (left arrow v) pressed?> then\n        point in direction (-90)\n    end\nend\n\ndefine go\nswitch costume to (hitbox v)\nchange [my variable v] by (-1)\nchange y by (my variable)\nif <<touching color (#23ba00)?> or <touching color (#6f2400)?>> then\n    repeat until <not <<touching color (#23ba00)?> or <touching color (#6f2400)?>>>\n        change y by ((([abs v] of (my variable) ) / (my variable)) * (-1))\n    end\n    set [my variable v] to (<<key (up arrow v) pressed?> and <(([abs v] of (my variable) ) / (my variable)) = [-1]>> * (12))\nend\nchange x by ((<key (right arrow v) pressed?> * (6)) + (<key (left arrow v) pressed?> * (-6)))\nset [slope v] to [0]\nrepeat until <<(slope) = [-8]> or <not <<touching color (#23ba00)?> or <touching color (#6f2400)?>>>>\n    change y by (1)\n    change [slope v] by (-1)\nend\nif <<touching color (#23ba00)?> or <touching color (#6f2400)?>> then\n    change y by (slope)\n    repeat until <not <<touching color (#23ba00)?> or <touching color (#6f2400)?>>>\n        change x by ((<key (right arrow v) pressed?> * (-6)) + (<key (left arrow v) pressed?> * (6)))\n    end\nend\nchange [sx v] by (x position)\nchange [sy v] by (y position)\ngo to x: (0) y: (0)\nif <<<(sy) < [-500]> or <key (r v) pressed?>> or <touching (poison ivy v)?>> then\n    set [my variable v] to [0]\n    set [sx v] to [0]\n    set [sy v] to [0]\nend\nswitch costume to (state)\n\nwhen flag clicked\nshow\nset [sx v] to [0]\nset [sy v] to [0]\nset [my variable v] to [0]\ngo to x: (0) y: (100)\nforever\n    go\nend\n\nwhen flag clicked\nset [state v] to [3]\nforever\n    if <not <(my variable) = [0]>> then\n        if <(my variable) > [0]> then\n            set [state v] to [11]\n        else\n            set [state v] to [12]\n        end\n    else\n        if <<key (right arrow v) pressed?> or <key (left arrow v) pressed?>> then\n            change [state v] by (1)\n            if <(state) > [10]> then\n                set [state v] to [3]\n            end\n            wait (.05) seconds\n        else\n            set [state v] to [2]\n        end\n    end\nend\n\nwhen flag clicked\nforever\n    if <<touching color (#087800)?> or <touching color (#e1e1e1)?>> then\n        change [my variable v] by (1)\n    end\nend\n\nwhen [r v] key pressed\ngo to x: (0) y: (100)\n\n@Border\n\nwhen I receive [engine_start v]\n\nwhen flag clicked\nwait (0.01) seconds\ngo to x: (0) y: (0)\ngo to [front v] layer\nshow\n\ngo to x: (0) y: (0)\n\nhide\n\n@level3\n\nwhen flag clicked\ngo to [back v] layer\nswitch costume to (1 v)\nhide\nset [level x v] to [0]\nrepeat (11)\n    create clone of (_myself_ v)\n    change [level x v] by (470)\n    next costume\nend\n\nwhen I start as a clone\nshow\nforever\n    go to x: (((sx) * (-1)) + (level X)) y: ((sy) * (-1))\nend\n\n@Poison Ivy\n\nwhen flag clicked\n\nforever\n    glide (1) secs to x: (-30) y: (10)\n    wait (1) seconds\n    glide (1) secs to x: (-30) y: (-86)\nend\n\ngo to x: (-30) y: (86)\n\nwhen flag clicked\nswitch costume to (1 v)\nhide\nset [level x v] to [0]\nrepeat (11)\n    create clone of (_myself_ v)\n    change [level x v] by (470)\n    next costume\nend\n\nwhen I start as a clone\nshow\nforever\n    go to x: (((sx) * (-1)) + (level X)) y: ((sy) * (-1))\nend\n\n@level2\n\nwhen flag clicked\nset [ghost v] effect to (50)\n\nforever\n    \nend\n\nwhen flag clicked\nswitch costume to (1 v)\nhide\nset [level x v] to [0]\nrepeat (11)\n    create clone of (_myself_ v)\n    change [level x v] by (470)\n    next costume\nend\n\nwhen I start as a clone\nshow\nforever\n    go to x: (((sx) * (-1)) + (level X)) y: ((sy) * (-1))\nend\n\n@Sprite1\n\nwhen flag clicked\nforever\n    show\n    go to [front v] layer\n    set [ghost v] effect to (100)\nend\n\n