☁World - a platformer☁

Instructions: My new cloud project: World - a platformer\nArrow keys to move! Have Fun!\nWhat?! #5 on german trending and #2 on german tutorials??

@Stage\n\n@Figur1\n\nwhen flag clicked\ngo to x: (-200) y: (40)\nset [x v] to [0]\nset [y v] to [0]\nwait (3) seconds\nforever\n    switch costume to (kostüm2 v)\n    change y by (-1)\n    if <touching (figur10 v)?> then\n        set [y v] to [20]\n    end\n    if <touching (figur8 v)?> then\n        change y by (1)\n        change x by (go)\n    end\n    if <touching (figur6 v)?> then\n        broadcast (nachricht2 v)\n        wait (0.5) seconds\n        set [y v] to [0]\n        set [x v] to [0]\n        go to x: (-200) y: (40)\n        wait (0.5) seconds\n    end\n    if <touching (figur4 v)?> then\n        broadcast (nachricht2 v)\n        wait (0.5) seconds\n        set [y v] to [0]\n        set [x v] to [0]\n        go to x: (-200) y: (40)\n        wait (0.5) seconds\n    end\n    if <(x position) > [230]> then\n        broadcast (Nachricht1 v)\n        wait (0.5) seconds\n        change [level v] by (1)\n        set [y v] to [0]\n        set [x v] to [0]\n        go to x: (-200) y: (40)\n        show\n        wait (0.5) seconds\n    end\n    if <key (right arrow v) pressed?> then\n        change [x v] by (1)\n    end\n    if <key (left arrow v) pressed?> then\n        change [x v] by (-1)\n    end\n    set [x v] to ((x) * (0.9))\n    set [grounded v] to [0]\n    change x by (x)\n    if <touching (figur2 v)?> then\n        change y by (1)\n        if <touching (figur2 v)?> then\n            change y by (1)\n            if <touching (figur2 v)?> then\n                change y by (1)\n                if <touching (figur2 v)?> then\n                    change y by (1)\n                    if <touching (figur2 v)?> then\n                        change y by (1)\n                        if <touching (figur2 v)?> then\n                            change y by (1)\n                            if <touching (figur2 v)?> then\n                                change y by (1)\n                                if <touching (figur2 v)?> then\n                                    change y by (1)\n                                    if <touching (figur2 v)?> then\n                                        change y by (1)\n                                        if <touching (figur2 v)?> then\n                                            change y by (1)\n                                            if <touching (figur2 v)?> then\n                                                change y by (-10)\n                                                change x by ((x) * (-1))\n                                                if <key (up arrow v) pressed?> then\n                                                    set [y v] to [12]\n                                                    if <([abs v] of (x) ) = (x)> then\n                                                        set [x v] to [-7]\n                                                    else\n                                                        set [x v] to [7]\n                                                    end\n                                                else\n                                                    set [x v] to [0]\n                                                end\n                                            end\n                                        end\n                                    end\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\n    change [y v] by (-1)\n    change y by (y)\n    if <<touching (figur2 v)?> or <touching (figur8 v)?>> then\n        if <[0] < (y)> then\n            y2\n            y2\n            y2\n            y2\n            y2\n            y2\n            y2\n            y2\n            y2\n            y2\n            y2\n            y2\n            y2\n            y2\n            y2\n            y2\n        end\n        if <(y) < [0]> then\n            y\n            y\n            y\n            y\n            y\n            y\n            y\n            y\n            y\n            y\n            y\n            y\n            y\n            y\n            y\n            y\n            y\n            y\n            y\n            y\n            y\n            y\n            y\n            y\n            y\n            y\n            y\n            y\n            y\n            y\n            y\n            y\n        end\n        set [y v] to [0]\n    end\n    change y by (-1)\n    if <<key (up arrow v) pressed?> and <<touching (figur2 v)?> or <touching (figur8 v)?>>> then\n        set [y v] to [15]\n    end\n    change y by (1)\nend\n\ndefine y\nif <<touching (figur2 v)?> or <touching (figur8 v)?>> then\n    change y by (1)\nend\n\ndefine y2\nif <touching (figur2 v)?> then\n    change y by (-1)\nend\n\nwhen flag clicked\ndelete all of [cloud v]\ndelete all of [time v]\nadd [0] to [time v]\nadd [0] to [time v]\nadd [0] to [time v]\nadd [0] to [time v]\nadd [0] to [time v]\nadd [0] to [time v]\nadd [0] to [cloud v]\nadd [0] to [cloud v]\nadd [0] to [cloud v]\nadd [0] to [cloud v]\nadd [0] to [cloud v]\nadd [0] to [cloud v]\nforever\n    if <(☁ player1) = (item (1) of [cloud v])> then\n        replace item (1) of [time v] with ((item (1) of [time v]) + (1))\n    else\n        replace item (1) of [cloud v] with (☁ player1)\n        replace item (1) of [time v] with [0]\n    end\n    if <(☁ player2) = (item (2) of [cloud v])> then\n        replace item (2) of [time v] with ((item (2) of [time v]) + (1))\n    else\n        replace item (2) of [cloud v] with (☁ player2)\n        replace item (2) of [time v] with [0]\n    end\n    if <(☁ player3) = (item (3) of [cloud v])> then\n        replace item (3) of [time v] with ((item (3) of [time v]) + (1))\n    else\n        replace item (3) of [cloud v] with (☁ player3)\n        replace item (3) of [time v] with [0]\n    end\n    if <(☁ player4) = (item (4) of [cloud v])> then\n        replace item (4) of [time v] with ((item (4) of [time v]) + (1))\n    else\n        replace item (4) of [cloud v] with (☁ player4)\n        replace item (4) of [time v] with [0]\n    end\n    if <(☁ player5) = (item (5) of [cloud v])> then\n        replace item (5) of [time v] with ((item (5) of [time v]) + (1))\n    else\n        replace item (5) of [cloud v] with (☁ player5)\n        replace item (5) of [time v] with [0]\n    end\n    if <[] = (item (6) of [cloud v])> then\n        replace item (6) of [time v] with ((item (6) of [time v]) + (1))\n    else\n        replace item (6) of [cloud v] with [Ding]\n        replace item (6) of [time v] with [0]\n    end\nend\n\nset [☁ player1 v] to [0]\n\nwhen flag clicked\nset [player v] to [0]\nwait (2) seconds\nif <[20] < (item (1) of [time v])> then\n    set [player v] to [1]\nelse\n    if <[20] < (item (2) of [time v])> then\n        set [player v] to [2]\n    else\n        if <[20] < (item (3) of [time v])> then\n            set [player v] to [3]\n        else\n            if <[20] < (item (4) of [time v])> then\n                set [player v] to [4]\n            else\n                if <[20] < (item (5) of [time v])> then\n                    set [player v] to [5]\n                else\n                    broadcast (full v)\n                end\n            end\n        end\n    end\nend\n\nif <[] = [50]> then\n\ndefine cloud (text)\nset [give2 v] to [0]\ncloud2 (text)\ncloud2 (text)\ncloud2 (text)\ncloud2 (text)\ncloud2 (text)\ncloud2 (text)\ncloud2 (text)\ncloud2 (text)\nset [give v] to (join (give) [00])\n\ndefine cloud2 (text2)\nif <(give2) < (length of (text2))> then\n    change [give2 v] by (1)\n    set [give v] to (join (give) (item # of (letter (give2) of (text2)) in [numbers v]))\nend\n\nwhen flag clicked\nforever\n    reset timer\n    wait (1) seconds\nend\n\ndefine back (2)\nset [give-back v] to []\nback\nback\nback\nback\nback\nback\nback\nback\nif <(join (letter (give-back-number) of (what-back)) (letter ((give-back-number) + (1)) of (what-back))) = [00]> then\n    change [give-back-number v] by (2)\nend\n\ndefine what back (text)\nset [what-back v] to (text)\n\ndefine back\nif <not <(join (letter (give-back-number) of (what-back)) (letter ((give-back-number) + (1)) of (what-back))) = [00]>> then\n    set [give-back v] to (join (give-back) (item (join (letter (give-back-number) of (what-back)) (letter ((give-back-number) + (1)) of (what-back))) of [numbers v]))\n    change [give-back-number v] by (2)\nend\n\nchange [☁ player1 v] by (1)\n\nwhen flag clicked\nset [clone v] to [0]\nwait (2) seconds\nrepeat (5)\n    change [clone v] by (1)\n    create clone of (_myself_ v)\n    wait (0.1) seconds\nend\n\nwhen flag clicked\nforever\n    set [give v] to []\n    cloud (x position)\n    cloud (y position)\n    cloud (level)\n    cloud (timer)\n    if <(player) = [1]> then\n        set [☁ player1 v] to (give)\n    end\n    if <(player) = [2]> then\n        set [☁ player2 v] to (give)\n    end\n    if <(player) = [3]> then\n        set [☁ player3 v] to (give)\n    end\n    if <(player) = [4]> then\n        set [☁ player4 v] to (give)\n    end\n    if <(player) = [5]> then\n        set [☁ player5 v] to (give)\n    end\nend\n\nwhen I start as a clone\nif <(clone) = [3]> then\n    forever\n        switch costume to (kostüm3 v)\n        set [give-back-number v] to [1]\n        what back (☁ player3)\n        back []\n        set [x-clone v] to (give-back)\n        back []\n        set [y-clone v] to (give-back)\n        back []\n        show\n        if <(item (3) of [time v]) > [50]> then\n            hide\n        end\n        if <(player) = [3]> then\n            hide\n        end\n        if <not <(give-back) = (level)>> then\n            hide\n        end\n        glide (0.1) secs to x: (x-clone) y: (y-clone)\n    end\nend\nif <(clone) = [5]> then\n    forever\n        switch costume to (kostüm3 v)\n        set [give-back-number v] to [1]\n        what back (☁ player5)\n        back []\n        set [x-clone v] to (give-back)\n        back []\n        set [y-clone v] to (give-back)\n        back []\n        show\n        if <(item (5) of [time v]) > [50]> then\n            hide\n        end\n        if <(player) = [5]> then\n            hide\n        end\n        if <not <(give-back) = (level)>> then\n            hide\n        end\n        glide (0.1) secs to x: (x-clone) y: (y-clone)\n    end\nend\nif <(clone) = [4]> then\n    forever\n        switch costume to (kostüm3 v)\n        set [give-back-number v] to [1]\n        what back (☁ player4)\n        back []\n        set [x-clone v] to (give-back)\n        back []\n        set [y-clone v] to (give-back)\n        back []\n        show\n        if <(item (4) of [time v]) > [50]> then\n            hide\n        end\n        if <(player) = [4]> then\n            hide\n        end\n        if <not <(give-back) = (level)>> then\n            hide\n        end\n        glide (0.1) secs to x: (x-clone) y: (y-clone)\n    end\nend\nif <(clone) = [1]> then\n    forever\n        set [give-back-number v] to [1]\n        switch costume to (kostüm3 v)\n        what back (☁ player1)\n        back []\n        set [x-clone v] to (give-back)\n        back []\n        set [y-clone v] to (give-back)\n        back []\n        show\n        if <(item (1) of [time v]) > [50]> then\n            hide\n        end\n        if <(player) = [1]> then\n            hide\n        end\n        if <not <(give-back) = (level)>> then\n            hide\n        end\n        glide (0.1) secs to x: (x-clone) y: (y-clone)\n    end\nend\nif <(clone) = [2]> then\n    forever\n        switch costume to (kostüm3 v)\n        set [give-back-number v] to [1]\n        what back (☁ player2)\n        back []\n        set [x-clone v] to (give-back)\n        back []\n        set [y-clone v] to (give-back)\n        back []\n        show\n        if <(item (2) of [time v]) > [50]> then\n            hide\n        end\n        if <(player) = [2]> then\n            hide\n        end\n        if <not <(give-back) = (level)>> then\n            hide\n        end\n        glide (0.1) secs to x: (x-clone) y: (y-clone)\n    end\nend\n\nshow\n\nwhen I receive [skip v]\ngo to x: (234) y: (6)\n\n@Figur2\n\nwhen flag clicked\nset [level v] to [1]\nforever\n    switch costume to (level)\nend\n\n@Figur3\n\nwhen flag clicked\nset [ghost v] effect to (0)\ngo to x: (0) y: (0)\nwait (3) seconds\nrepeat (10)\n    change [ghost v] effect by (10)\nend\n\nwhen I receive [nachricht1 v]\ngo to [front v] layer\nrepeat (10)\n    change [ghost v] effect by (-10)\nend\nwait (0.2) seconds\nrepeat (10)\n    change [ghost v] effect by (10)\nend\n\n@Figur4\n\nwhen flag clicked\nset [level v] to [1]\nforever\n    switch costume to (level)\nend\n\n@Figur5\n\nwhen flag clicked\nset [ghost v] effect to (100)\ngo to x: (0) y: (0)\n\nwhen I receive [nachricht2 v]\ngo to [front v] layer\nrepeat (10)\n    change [ghost v] effect by (-10)\nend\nwait (0.1) seconds\nrepeat (10)\n    change [ghost v] effect by (10)\nend\n\n@Figur7\n\nwhen I receive [full v]\nshow\nstop [all v]\n\nwhen flag clicked\nhide\n\n@Figur6\n\nwhen flag clicked\nforever\n    hide\n    go to [back v] layer\n    turn right (15) degrees\n    if <(level) = [5]> then\n        show\n    end\n    if <(level) = [7]> then\n        show\n    end\nend\n\nwhen flag clicked\nforever\n    if <(level) = [5]> then\n        go to x: (0) y: (0)\n    end\n    if <(level) = [7]> then\n        go to x: (-100) y: (0)\n        glide (2) secs to x: (100) y: (0)\n        glide (2) secs to x: (-100) y: (0)\n    end\nend\n\n@Figur8\n\nwhen flag clicked\nset [level v] to [1]\nset [go v] to [4]\ngo to x: (0) y: (-90)\nforever\n    hide\n    change x by (go)\n    if <(level) = [9]> then\n        show\n    end\n    if <([abs v] of (round (x position)) ) = [80]> then\n        set [go v] to ((go) * (-1))\n    end\nend\n\n@Figur9\n\nwhen flag clicked\nforever\n    switch costume to (kostüm1 v)\n    if <touching (mouse-pointer v)?> then\n        switch costume to (kostüm3 v)\n    end\nend\n\nwhen this sprite clicked\nbroadcast (skip v)\n\n@Figur10\n\nwhen flag clicked\nset [level v] to [1]\nforever\n    hide\n    if <(level) = [13]> then\n        show\n        go to x: (-40) y: (7)\n    end\n    if <(level) = [14]> then\n        show\n        go to x: (-40) y: (7)\n    end\n    if <touching (figur1 v)?> then\n        repeat until <(costume [number v]) = [1]>\n            next costume\n        end\n    end\n    if <not <touching (figur1 v)?>> then\n        repeat until <(costume [number v]) = [3]>\n            next costume\n        end\n    end\nend\n\n@Figur11\n\nwhen flag clicked\nset [level v] to [1]\nforever\n    hide\n    if <(level) = [14]> then\n        show\n        go to x: (100) y: (7)\n    end\n    if <touching (figur1 v)?> then\n        repeat until <(costume [number v]) = [1]>\n            next costume\n        end\n    end\n    if <not <touching (figur1 v)?>> then\n        repeat until <(costume [number v]) = [3]>\n            next costume\n        end\n    end\nend\n\n