My Journey || A Platformer

Instructions: This my journey. Sorry if it is too short. I may make another one if you want to carry on.\n\nArrow keys to move.

@Stage\n\nwhen I receive [start v]\nswitch backdrop to (sky v)\nforever\n    if <(Level) = [7]> then\n        switch backdrop to (castle v)\n    end\n    if <(Level) = [8]> then\n        switch backdrop to (sky v)\n    end\nend\n\n@Player\n\nwhen flag clicked\nhide\n\nwhen I receive [start v]\nset size to (100) %\nswitch costume to (player1 v)\nset [level v] to [1]\nReset Level\nforever\n    if <key (right arrow v) pressed?> then\n        change [x v] by (.9)\n    end\n    if <key (left arrow v) pressed?> then\n        change [x v] by (-.9)\n    end\n    set [x v] to ((x) * (.9))\n    change x by (x)\n    if <touching (ground v)?> then\n        change y by (1)\n        if <touching (ground v)?> then\n            change y by (1)\n            if <touching (ground v)?> then\n                change y by (1)\n                if <touching (ground v)?> then\n                    change y by (1)\n                    if <touching (ground v)?> then\n                        change y by (1)\n                        if <touching (ground v)?> then\n                            change x by ((x) * (-1))\n                            change y by (-5)\n                            if <key (up arrow v) pressed?> then\n                                if <(x) > [0]> then\n                                    set [x v] to [-5]\n                                else\n                                    set [x v] to [5]\n                                end\n                                set [y v] to [13]\n                            else\n                                set [x v] to [0]\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\n    change [y v] by (-0.8)\n    change y by (y)\n    if <touching (ground v)?> then\n        change y by ((y) * (-1))\n        set [y v] to [0]\n    end\n    change y by (-1)\n    if <touching (ground v)?> then\n        if <key (up arrow v) pressed?> then\n            set [y v] to [12]\n        end\n    end\n    change y by (1)\n    if <touching (spikes v)?> then\n        Die\n    end\nend\n\ndefine Reset Level\nclear graphic effects\ngo to x: (-200) y: (0)\nset [x v] to [0]\nset [y v] to [0]\nshow\n\ndefine Die\nrepeat (5)\n    hide\n    wait (0.1) seconds\n    show\n    wait (0.1) seconds\nend\nhide\nwait (0.5) seconds\nReset Level\n\nwhen flag clicked\nforever\n    if <(x position) > [236]> then\n        Reset Level\n        change [level v] by (1)\n    end\nend\n\nwhen [r v] key pressed\nReset Level\n\nwhen I start as a clone\nswitch costume to (player2 v)\nshow\nif <(Level) > [8]> then\n    hide\nend\nrepeat (10)\n    change size by (-5)\n    change [ghost v] effect by (5)\nend\ndelete this clone\n\nwhen I receive [start v]\nforever\n    if <(Level) < [8]> then\n        switch costume to (blob1 v)\n        if <key (right arrow v) pressed?> then\n            switch costume to (blob1 v)\n        end\n        if <key (left arrow v) pressed?> then\n            switch costume to (blob2 v)\n        end\n    end\n    if <(Level) = [8]> then\n        switch costume to (player1 v)\n        forever\n            create clone of (_myself_ v)\n        end\n    end\nend\n\nwhen flag clicked\nforever\n    if <(Level) = [9]> then\n        switch costume to (player3 v)\n    end\n    if <(Level) = [10]> then\n        set size to (340) %\n        switch costume to (player4 v)\n    end\n    if <(Level) = [11]> then\n        set size to (100) %\n        switch costume to (player v)\n    end\nend\n\nstop [this script v]\n\n@Ground\n\nwhen I receive [start v]\nshow\nforever\n    switch costume to (Level)\nend\n\nwhen flag clicked\nhide\n\n@Spikes\n\nwhen flag clicked\nhide\n\nwhen I receive [start v]\nshow\ngo to [back v] layer\nforever\n    switch costume to (Level)\nend\n\n@Words\n\nwhen flag clicked\nhide\n\nwhen I receive [start v]\nshow\ngo to [front v] layer\nforever\n    switch costume to (Level)\nend\n\n@Logo\n\nwhen I receive [start v]\nrepeat (10)\n    change [ghost v] effect by (10)\nend\n\nwhen flag clicked\nshow\ngo to [front v] layer\ngo to x: (0) y: (30)\npoint in direction (90)\nset [ghost v] effect to (0)\nset size to (0) %\nrepeat (20)\n    change [ghost v] effect by (-5)\n    turn right (18) degrees\n    change size by (7)\nend\nwait (2) seconds\nbroadcast (Start v)\n\n@Screen\n\nwhen flag clicked\nshow\ngo to x: (0) y: (0)\n\nwhen I receive [start v]\nrepeat (10)\n    change [ghost v] effect by (10)\nend\n\nhide\n\n@Name\n\nwhen I receive [start v]\nrepeat (10)\n    change [ghost v] effect by (10)\nend\n\nwhen flag clicked\nshow\nclear graphic effects\ngo to x: (-240) y: (-100)\nset size to (200) %\npoint in direction (90)\nreset timer\nrepeat (40)\n    move ((timer) * (9)) steps\nend\n\n@TN\n\nwhen flag clicked\nforever\n    show\n    go to [front v] layer\n    set [ghost v] effect to (100)\nend\n\n