List Platformer (Scrolling)


@Stage\n\nwhen I receive [level 2 geschafft v]\nswitch backdrop to (galaxy v)\n\nwhen I receive [level 4 geschafft v]\nswitch backdrop to (desert v)\n\nwhen I receive [level 6 geschafft v]\nswitch backdrop to (bühnenbild2 v)\n\nwhen I receive [intro vorbei v]\nswitch backdrop to (mountain v)\nset [color v] effect to (0)\nreset timer\nset volume to (80) %\nforever\n    play sound [Elektronomia - Sky High \[NCS Release\] \(1\) v] until done\nend\n\nwhen I receive [intro start v]\nswitch backdrop to (bühnenbild1 v)\n\nwhen I receive [level 8 geschafft v]\nswitch backdrop to (spaceship v)\n\n@Spieler\n\nwhen I receive [level 8 geschafft v]\nwait (1) seconds\nif <(Score) < (☁ Worldrecord)> then\n    set [☁ worldrecord v] to (Score)\nend\n\nwhen I receive [intro start v]\nhide variable [☁ worldrecord v]\n\nwhen flag clicked\ngo to x: (-189) y: (-79)\nset [speed x v] to [0]\nset [speed y v] to [0]\n\nwhen I receive [level 1 geschafft v]\ngo to x: (-138) y: (-140)\n\nwhen I receive [level 2 geschafft v]\ngo to x: (-189) y: (-79)\n\nwhen I receive [level 3 geschafft v]\ngo to x: (-189) y: (-79)\n\nwhen I receive [level 1 geschafft v]\nforever\n    if <touching (figur1 v)?> then\n        broadcast (level 2 geschafft v)\n    end\nend\n\nwhen flag clicked\nhide variable [score v]\nforever\n    if <touching (figur1 v)?> then\n        broadcast (level 1 geschafft v)\n    end\nend\n\nwhen flag clicked\nhide\nhide\nswitch costume to (kostüm1 v)\n\nwhen I receive [level 2 geschafft v]\nforever\n    if <touching (figur1 v)?> then\n        broadcast (level 3 geschafft v)\n    end\nend\n\nwhen I receive [level 4 geschafft v]\ngo to x: (-189) y: (-79)\n\nwhen I receive [level 3 geschafft v]\nforever\n    if <touching (figur1 v)?> then\n        broadcast (level 4 geschafft v)\n    end\nend\n\nwhen I receive [level 4 geschafft v]\nforever\n    if <touching (figur1 v)?> then\n        broadcast (level 5 geschafft v)\n    end\nend\n\nwhen I receive [level 5 geschafft v]\nforever\n    if <touching (figur1 v)?> then\n        broadcast (level 6 geschafft v)\n    end\nend\n\nwhen I receive [level 8 geschafft v]\nhide\n\nwhen flag clicked\nhide variable [time v]\n\nwait (11.8) seconds\nreset timer\n\nwhen I receive [level 8 geschafft v]\nshow variable [score v]\nset [score v] to (Time)\nhide variable [time v]\n\nwhen I receive [intro vorbei v]\nforever\n    if <key (right arrow v) pressed?> then\n        change [speed x v] by (1)\n    end\n    if <key (left arrow v) pressed?> then\n        change [speed x v] by (-1)\n    end\n    change x by (Speed X)\n    if <touching (figur2 v)?> then\n        change x by ((Speed X) * (-1))\n        set [speed x v] to [0]\n    else\n        set [speed x v] to ((Speed X) * (0.8))\n    end\n    change y by (Speed Y)\n    if <<touching (figur2 v)?> or <touching (figur3 v)?>> then\n        change y by ((Speed Y) * (-1))\n        set [speed y v] to [0]\n        if <(Lock) = [0]> then\n            if <key (up arrow v) pressed?> then\n                set [speed y v] to [10]\n                set [lock v] to [1]\n            end\n        end\n    else\n        change [speed y v] by (-1)\n        set [lock v] to [0]\n    end\nend\n\nwhen I receive [intro vorbei v]\nshow\ngo to x: (-189) y: (-79)\n\nwhen I receive [nach links v]\nforever\n    if <touching (figur3 v)?> then\n        repeat until <not <touching (figur3 v)?>>\n            change x by (-6)\n        end\n    end\nend\n\nwhen I receive [level 1 geschafft v]\nforever\n    if <key (r v) pressed?> then\n        broadcast (Level 2 Start v)\n    end\nend\n\nwhen I receive [level 2 geschafft v]\nforever\n    if <key (r v) pressed?> then\n        broadcast (Level 3 Start v)\n    end\nend\n\nwhen I receive [level 4 geschafft v]\nforever\n    if <key (r v) pressed?> then\n        broadcast (Level 5 Start v)\n    end\nend\n\nwhen I receive [level 3 geschafft v]\nforever\n    if <key (r v) pressed?> then\n        broadcast (Level4 Start v)\n    end\nend\n\nwhen I receive [level 5 geschafft v]\nforever\n    if <key (r v) pressed?> then\n        broadcast (Level 6 Start v)\n    end\nend\n\nwhen flag clicked\nwait (12) seconds\nshow variable [time v]\nforever\n    set [time v] to (timer)\nend\n\nwhen I receive [level 2 start v]\ngo to x: (-138) y: (-140)\n\nwhen I receive [level 3 start v]\ngo to x: (-189) y: (-79)\n\nwhen I receive [level4 start v]\ngo to x: (-189) y: (-79)\n\nwhen I receive [level 5 start v]\ngo to x: (-189) y: (-100)\n\nwhen I receive [level 5 geschafft v]\ngo to x: (-189) y: (-100)\n\nwhen I receive [intro vorbei v]\nsay [Hello. Arrow Keys to move and s to open the Shop and c to close it.] for (7) seconds\n\nwhen I receive [kostüm 1! v]\nchange y by (0)\nswitch costume to (kostüm2 v)\n\nwhen I receive [kostüm 2! v]\nchange y by (0)\nswitch costume to (kostüm3 v)\n\nwhen I receive [kostüm 3! v]\nchange y by (0)\nswitch costume to (kostüm4 v)\n\nwhen I receive [kostüm 4! v]\nchange y by (0)\nswitch costume to (kostüm5 v)\n\nwhen I receive [kostüm 5! v]\nchange y by (0)\nswitch costume to (kostüm6 v)\n\nwhen I receive [level 6 geschafft v]\nforever\n    if <touching (figur1 v)?> then\n        broadcast (Level 7 geschafft v)\n    end\nend\n\nwhen I receive [level 7 geschafft v]\nforever\n    if <touching (figur1 v)?> then\n        broadcast (Level 8 geschafft v)\n    end\nend\n\nwhen I receive [level 6 start v]\ngo to x: (-189) y: (-100)\n\nwhen I receive [level 6 geschafft v]\ngo to x: (-189) y: (-100)\n\nwhen I receive [level 7 start v]\ngo to x: (-189) y: (-100)\n\nwhen I receive [level 7 geschafft v]\ngo to x: (-189) y: (-90)\n\nwhen I receive [level 8 start v]\ngo to x: (-189) y: (-90)\n\nwhen I receive [kostüm 6! v]\nchange y by (0)\nswitch costume to (kostüm7 v)\n\nwhen I receive [kostüm 6! v]\nchange y by (0)\nswitch costume to (kostüm7 v)\n\nwhen I receive [level 7 geschafft v]\nforever\n    if <key (r v) pressed?> then\n        broadcast (Level 8 Start v)\n    end\nend\n\nwhen I receive [level 6 geschafft v]\nforever\n    if <key (r v) pressed?> then\n        broadcast (Level 7 start v)\n    end\nend\n\nwhen I receive [intro vorbei v]\nshow variable [☁ worldrecord v]\n\nset [☁ worldrecord v] to [1000.145]\n\nwhen flag clicked\nforever\n    set drag mode [not draggable v]\nend\n\n@Figur1\n\nwhen flag clicked\nswitch costume to (kostüm1 v)\n\nwhen I receive [level 1 geschafft v]\nswitch costume to (kostüm2 v)\n\nwhen flag clicked\ngo to x: (0) y: (0)\n\nwhen I receive [level 2 geschafft v]\nswitch costume to (kostüm3 v)\n\nwhen flag clicked\nhide\n\nwhen I receive [level 1 geschafft v]\nforever\n    if <touching (spieler v)?> then\n        broadcast (level 2 geschafft v)\n    end\nend\n\nwhen I receive [level 2 geschafft v]\nforever\n    if <touching (spieler v)?> then\n        broadcast (level 3 geschafft v)\n    end\nend\n\nwhen I receive [level 3 geschafft v]\nswitch costume to (kostüm4 v)\n\nwhen I receive [level 3 geschafft v]\nforever\n    if <touching (spieler v)?> then\n        broadcast (level 4 geschafft v)\n    end\nend\n\nwhen I receive [level 4 geschafft v]\nforever\n    if <touching (spieler v)?> then\n        broadcast (level 5 geschafft v)\n    end\nend\n\nwhen I receive [level 5 geschafft v]\nforever\n    if <touching (spieler v)?> then\n        broadcast (level 6 geschafft v)\n    end\nend\n\nwhen I receive [level 8 geschafft v]\nhide\n\nwhen I receive [intro vorbei v]\nshow\nforever\n    if <touching color (#ff0000)?> then\n        broadcast (level 1 geschafft v)\n    end\nend\n\nwhen I receive [level 6 geschafft v]\nforever\n    if <touching (spieler v)?> then\n        broadcast (Level 7 geschafft v)\n    end\nend\n\nwhen I receive [level 7 geschafft v]\nforever\n    if <touching (spieler v)?> then\n        broadcast (Level 8 geschafft v)\n    end\nend\n\n@Figur2\n\nwhen flag clicked\nhide\n\nwhen I receive [level 1 geschafft v]\nswitch costume to (kostüm2 v)\n\nwhen I receive [level 2 geschafft v]\nswitch costume to (kostüm3 v)\n\nwhen I receive [level 3 geschafft v]\nswitch costume to (kostüm4 v)\n\nwhen I receive [level 4 geschafft v]\nswitch costume to (kostüm5 v)\n\nwhen I receive [level 5 geschafft v]\nswitch costume to (kostüm6 v)\n\nwhen I receive [level 6 geschafft v]\nswitch costume to (kostüm7 v)\n\nwhen I receive [intro vorbei v]\nshow\nswitch costume to (kostüm1 v)\ngo to x: (0) y: (0)\n\nwhen I receive [level 7 geschafft v]\nswitch costume to (kostüm8 v)\n\nwhen I receive [level 8 geschafft v]\nhide\nhide variable [sterne v]\n\n@Figur3\n\nwhen I receive [level 3 geschafft v]\nshow\nswitch costume to (kostüm1 v)\ngo to x: (31) y: (25)\nbroadcast (nach links v)\nwait (1) seconds\nrepeat until <(Level...) = [1]>\n    go to x: (31) y: (25)\n    glide (5) secs to x: (-345) y: (25)\nend\n\nwhen flag clicked\nhide\n\nwhen I receive [level 4 geschafft v]\nhide\nstop [this script v]\n\n@Figur4\n\nwhen flag clicked\nhide\n\nwhen I receive [level 2 geschafft v]\nhide\n\nwhen I receive [level 3 geschafft v]\nforever\n    if <touching (spieler v)?> then\n        broadcast (Level4 Start v)\n    end\nend\n\nwhen I receive [level 4 geschafft v]\nswitch costume to (kostüm2 v)\n\nwhen I receive [level 5 geschafft v]\nforever\n    if <touching (spieler v)?> then\n        broadcast (Level 6 Start v)\n    end\nend\n\nwhen I receive [level 3 geschafft v]\nswitch costume to (kostüm1 v)\nshow\n\nwhen I receive [level 5 geschafft v]\nswitch costume to (kostüm3 v)\n\nwhen I receive [level 4 geschafft v]\nshow\nforever\n    if <touching (spieler v)?> then\n        broadcast (Level 5 Start v)\n    end\nend\n\nwhen I receive [level 8 geschafft v]\nhide\n\nwhen I receive [level 6 geschafft v]\nswitch costume to (kostüm4 v)\nforever\n    if <touching (spieler v)?> then\n        broadcast (Level 7 start v)\n    end\nend\n\nwhen I receive [level 7 geschafft v]\nswitch costume to (kostüm5 v)\nforever\n    if <touching (spieler v)?> then\n        broadcast (Level 8 Start v)\n    end\nend\n\n@Figur5\n\nwhen flag clicked\nhide\n\nwhen I receive [level 1 geschafft v]\nswitch costume to (kostüm2 v)\n\nwhen I receive [level 2 geschafft v]\nswitch costume to (kostüm3 v)\n\nwhen I receive [level 3 geschafft v]\nswitch costume to (kostüm4 v)\n\nwhen I receive [level 5 geschafft v]\nswitch costume to (kostüm6 v)\n\nwhen I receive [level 4 geschafft v]\nswitch costume to (kostüm5 v)\n\nwhen I receive [level 8 geschafft v]\nhide\n\nwhen I receive [intro vorbei v]\nshow\nswitch costume to (kostüm1 v)\n\nwhen I receive [intro vorbei v]\nwait (1) seconds\nif <(Level...2) = [1]> then\n    set [codex v] to [0]\n    create clone of (figur7 v)\n    wait (0.1) seconds\n    set [codex v] to [1]\n    create clone of (figur7 v)\n    wait (0.1) seconds\n    set [codex v] to [2]\n    create clone of (figur7 v)\nend\n\nwhen I receive [level 2 geschafft v]\nwait (1) seconds\nif <(Level...2) = [3]> then\n    wait (0.3) seconds\n    set [codex v] to [6]\n    create clone of (figur7 v)\n    wait (0.1) seconds\n    set [codex v] to [7]\n    create clone of (figur7 v)\n    wait (0.1) seconds\n    set [codex v] to [8]\n    create clone of (figur7 v)\nend\n\nwhen I receive [level 1 geschafft v]\nwait (1) seconds\nif <(Level...2) = [2]> then\n    wait (0.3) seconds\n    set [codex v] to [3]\n    create clone of (figur7 v)\n    wait (0.1) seconds\n    set [codex v] to [4]\n    create clone of (figur7 v)\n    wait (0.1) seconds\n    set [codex v] to [5]\n    create clone of (figur7 v)\nend\n\nwhen I receive [level 3 geschafft v]\nwait (1) seconds\nif <(Level...2) = [4]> then\n    wait (0.3) seconds\n    set [codex v] to [9]\n    create clone of (figur7 v)\n    wait (0.1) seconds\n    set [codex v] to [10]\n    create clone of (figur7 v)\n    wait (0.1) seconds\n    set [codex v] to [11]\n    create clone of (figur7 v)\nend\n\nwhen I receive [level 4 geschafft v]\nwait (1) seconds\nif <(Level...2) = [5]> then\n    wait (0.3) seconds\n    set [codex v] to [12]\n    create clone of (figur7 v)\n    wait (0.1) seconds\n    set [codex v] to [13]\n    create clone of (figur7 v)\n    wait (0.1) seconds\n    set [codex v] to [14]\n    create clone of (figur7 v)\nend\n\nwhen I receive [level 6 geschafft v]\nswitch costume to (kostüm7 v)\n\nwhen I receive [level 7 geschafft v]\nswitch costume to (kostüm8 v)\n\nwhen I receive [intro start v]\nset [level...2 v] to [1]\n\nwhen I receive [level 1 geschafft v]\nset [level...2 v] to [2]\n\nwhen I receive [level 2 geschafft v]\nset [level...2 v] to [3]\n\nwhen I receive [level 3 geschafft v]\nset [level...2 v] to [4]\n\nwhen I receive [level 4 geschafft v]\nset [level...2 v] to [5]\n\nwhen I receive [level 5 geschafft v]\nset [level...2 v] to [6]\n\nwhen I receive [level 6 geschafft v]\nset [level...2 v] to [7]\n\nwhen I receive [level 7 geschafft v]\nset [level...2 v] to [8]\n\nwhen I receive [level 5 geschafft v]\nwait (1) seconds\nif <(Level...2) = [6]> then\n    wait (0.3) seconds\n    set [codex v] to [15]\n    create clone of (figur7 v)\n    wait (0.1) seconds\n    set [codex v] to [16]\n    create clone of (figur7 v)\n    wait (0.1) seconds\n    set [codex v] to [17]\n    create clone of (figur7 v)\nend\n\nwhen I receive [level 6 geschafft v]\nwait (1) seconds\nif <(Level...2) = [7]> then\n    wait (0.3) seconds\n    set [codex v] to [21]\n    create clone of (figur7 v)\n    wait (0.1) seconds\n    set [codex v] to [22]\n    create clone of (figur7 v)\n    wait (0.1) seconds\n    set [codex v] to [23]\n    create clone of (figur7 v)\nend\n\nwhen I receive [level 7 geschafft v]\nwait (1) seconds\nif <(Level...2) = [8]> then\n    wait (0.3) seconds\n    set [codex v] to [18]\n    create clone of (figur7 v)\n    wait (0.1) seconds\n    set [codex v] to [19]\n    create clone of (figur7 v)\n    wait (0.1) seconds\n    set [codex v] to [20]\n    create clone of (figur7 v)\nend\n\n@Figur19\n\nwhen flag clicked\nhide\n\nshow\n\n@Intro\n\nwhen I start as a clone\nif <(Clone ID) = [Logo+Name]> then\n    point in direction (0)\n    hide\n    set [ghost v] effect to (0)\n    switch costume to (logo v)\n    go to x: (0) y: (0)\n    wait (.3) seconds\n    show\n    repeat (40)\n        go to [front v] layer\n        go [backward v] (2) layers\n        change size by (((130) - (size)) / (8))\n        turn right (((90) - (direction)) / (8)) degrees\n    end\n    set [i v] to [-1]\n    repeat (20)\n        go to [front v] layer\n        go [backward v] (1) layers\n        change size by ((I) / (3))\n        change [i v] by (join [-] (([abs v] of (I) ) / (4)))\n        turn right ((I) / (-3)) degrees\n    end\n    switch costume to (name v)\n    set size to (150) %\n    point in direction (90)\n    go to x: (0) y: (1000)\n    Smooth Glide x: [0] y: [0] speed: [4]\n    wait (1.2) seconds\n    repeat (100)\n        point in direction ((([sin v] of ((timer) * (350)) ) * (20)) + (90))\n        set y to ((([abs v] of ([sin v] of ((timer) * (360)) ) ) * (100)) + (-50))\n    end\n    Smooth Glide x: [0] y: [0] speed: [2]\n    go to [front v] layer\n    go [backward v] (2) layers\n    repeat (20)\n        switch costume to (size hack v)\n        change size by (300)\n        switch costume to (name v)\n    end\n    delete this clone\nend\n\nwhen flag clicked\nset [color v] effect to (0)\nswitch costume to (blank v)\nforever\n    reset timer\n    start sound [Domastic - Weird Dream NCS Release v]\n    hide\n    set [clone id v] to [Logo+Name]\n    create clone of (_myself_ v)\n    set [clone id v] to [Arrows]\n    create clone of (_myself_ v)\n    set [clone id v] to [Black1]\n    create clone of (_myself_ v)\n    set [clone id v] to [Black2]\n    create clone of (_myself_ v)\n    set [clone id v] to [End]\n    create clone of (_myself_ v)\n    set [clone id v] to [Background]\n    create clone of (_myself_ v)\n    set [clone id v] to [Arrow2]\n    create clone of (_myself_ v)\n    set [clone id v] to [Arrow1]\n    create clone of (_myself_ v)\n    Explode\n    wait (14) seconds\nend\n\ndefine Smooth Glide x: (x) y: (y) speed: (speed)\nrepeat until <<(round (x)) = (round (x position))> and <(round (y)) = (round (y position))>>\n    change x by (((x) - (x position)) / (speed))\n    change y by (((y) - (y position)) / (speed))\nend\ngo to x: (x) y: (y)\n\ndefine bounce finished size (size) bounciness (bounciness) elasticity (elasticity)\nset [size v] to [0]\nrepeat (40)\n    set [size v] to (((size) * (bounciness)) + (((size) - (size)) / (elasticity)))\n    change size by (size)\nend\n\ndefine Smooth Size: (size) speed: (speed)\nrepeat until <(round (size)) = (round (size))>\n    change size by (((size) - (size)) / (speed))\nend\nset size to (size) %\n\nwhen I start as a clone\nif <(Clone ID) = [Arrows]> then\n    point in direction (90)\n    wait (3) seconds\n    show\n    switch costume to (size hack v)\n    set size to (80) %\n    switch costume to (arrows v)\n    go to [back v] layer\n    go [forward v] (1) layers\n    set [ghost v] effect to (0)\n    go to x: (0) y: (-600)\n    set [clone y v] to [-360]\n    repeat (8)\n        change [clone y v] by (100)\n        repeat (14)\n            change y by (((Clone Y) - (y position)) / (6))\n            change [ghost v] effect by (-20)\n        end\n    end\n    repeat (6)\n        change [clone y v] by (100)\n        repeat (13)\n            change y by (((Clone Y) - (y position)) / (6))\n            change [ghost v] effect by (-20)\n        end\n    end\n    repeat (10)\n        change y by (((Clone Y) - (y position)) / (6))\n        change [ghost v] effect by (10)\n    end\n    delete this clone\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Black1]> then\n    go to [front v] layer\n    switch costume to (black up v)\n    go [forward v] (100) layers\n    point in direction (90)\n    set size to (100) %\n    show\n    go to x: (0) y: (0)\n    Smooth Glide x: [0] y: [300] speed: [7]\n    wait (7.3) seconds\n    repeat (25)\n        change y by (3)\n        change [ghost v] effect by (4)\n    end\n    wait (.2) seconds\n    delete this clone\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Black2]> then\n    set [ghost v] effect to (0)\n    go to [front v] layer\n    switch costume to (black down v)\n    go [forward v] (100) layers\n    point in direction (90)\n    set size to (100) %\n    show\n    go to x: (0) y: (0)\n    Smooth Glide x: [0] y: [-300] speed: [7]\n    wait (7.3) seconds\n    repeat (25)\n        change y by (-3)\n        change [ghost v] effect by (4)\n    end\n    wait (.2) seconds\n    delete this clone\nend\n\nwhen I start as a clone\nif <(Clone ID) = [End]> then\n    wait (8.2) seconds\n    go to [front v] layer\n    go [forward v] (5) layers\n    switch costume to (dot v)\n    set [ghost v] effect to (0)\n    point in direction (90)\n    go to x: (0) y: (-300)\n    show\n    set size to (120) %\n    set [1 v] to [35]\n    repeat until <[0] < (y position)>\n        change size by (((30) - (size)) / (8))\n        change [1 v] by (-2.1)\n        change y by (1)\n    end\n    repeat until <(y position) < [3]>\n        change size by (((30) - (size)) / (6))\n        change [1 v] by (-2.1)\n        change y by (1)\n    end\n    go to x: (0) y: (0)\n    repeat (50)\n        switch costume to (size hack v)\n        change size by (120)\n        switch costume to (dot v)\n    end\n    wait (.01) seconds\n    repeat (10)\n        change [ghost v] effect by (10)\n    end\n    delete this clone\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Background]> then\n    wait (2.3) seconds\n    go to [front v] layer\n    go [forward v] (5) layers\n    switch costume to (back dot v)\n    point in direction (90)\n    go to x: (0) y: (-300)\n    show\n    set size to (120) %\n    set [1 v] to [35]\n    repeat until <[0] < (y position)>\n        change size by (((30) - (size)) / (8))\n        change [1 v] by (-2.1)\n        change y by (1)\n    end\n    repeat until <(y position) < [3]>\n        change size by (((30) - (size)) / (6))\n        change [1 v] by (-2.1)\n        change y by (1)\n    end\n    go to x: (0) y: (0)\n    go to [back v] layer\n    repeat (20)\n        switch costume to (size hack v)\n        change size by (120)\n        switch costume to (back dot v)\n    end\n    wait (7) seconds\n    delete this clone\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Arrow2]> then\n    go to [front v] layer\n    switch costume to (size hack v)\n    go [backward v] (2) layers\n    point in direction (90)\n    set size to (100) %\n    switch costume to (blue2 v)\n    go to x: (0) y: (0)\n    wait (4.5) seconds\n    show\n    repeat (2)\n        show\n        repeat (20)\n            switch costume to (size hack v)\n            change x by (-25)\n            switch costume to (blue2 v)\n        end\n        hide\n        set size to (100) %\n        wait (.8) seconds\n        go to x: (0) y: (0)\n    end\n    delete this clone\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Arrow1]> then\n    go to [front v] layer\n    switch costume to (size hack v)\n    go [backward v] (2) layers\n    point in direction (90)\n    set size to (100) %\n    switch costume to (blue v)\n    go to x: (0) y: (0)\n    wait (4.5) seconds\n    show\n    repeat (2)\n        show\n        repeat (20)\n            switch costume to (size hack v)\n            change x by (25)\n            switch costume to (blue v)\n        end\n        hide\n        set size to (100) %\n        wait (.8) seconds\n        go to x: (0) y: (0)\n    end\n    delete this clone\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Circle]> then\n    hide\n    clear graphic effects\n    switch costume to (costume1 v)\n    go to [front v] layer\n    go [backward v] (2) layers\n    set size to (0) %\n    show\n    repeat (5)\n        change size by (((120) - (size)) / (5))\n    end\n    repeat (11)\n        next costume\n        change size by (((120) - (size)) / (5))\n        change [ghost v] effect by (10)\n    end\n    delete this clone\nend\n\nwhen flag clicked\ngo to x: (0) y: (0)\nhide\nwait (4.75) seconds\nforever\n    repeat (2)\n        set [clone id v] to [Circle]\n        go to x: (0) y: (0)\n        create clone of (_myself_ v)\n        wait (.6) seconds\n    end\n    wait (.4) seconds\n    set [clone id v] to [Circle]\n    go to x: (0) y: (0)\n    create clone of (_myself_ v)\n    wait (12.4) seconds\nend\n\ndefine Explode\ngo to x: (0) y: (0)\nset [clone id v] to [Explode]\nset [clone x v] to [100]\nset [clone y v] to [100]\ncreate clone of (_myself_ v)\nset [clone id v] to [Explode]\nset [clone x v] to [100]\nset [clone y v] to [-100]\ncreate clone of (_myself_ v)\nset [clone id v] to [Explode]\nset [clone x v] to [-100]\nset [clone y v] to [100]\ncreate clone of (_myself_ v)\nset [clone id v] to [Explode]\nset [clone x v] to [-100]\nset [clone y v] to [-100]\ncreate clone of (_myself_ v)\n\nwhen I start as a clone\nif <(Clone ID) = [Explode]> then\n    hide\n    clear graphic effects\n    switch costume to (explode v)\n    go to [front v] layer\n    go [backward v] (2) layers\n    set size to (100) %\n    go to x: (Clone X) y: (Clone Y)\n    wait (6) seconds\n    show\n    set size to (0) %\n    repeat (5)\n        change size by (((120) - (size)) / (5))\n    end\n    repeat (11)\n        change size by (((120) - (size)) / (5))\n        change [ghost v] effect by (10)\n    end\n    delete this clone\nend\n\nwhen flag clicked\nset [screenshake_x v] to [0]\nset [screenshake_y v] to [0]\n\ndefine Move with ScreenShake | amount (0 to 1) (amount)\nforever\n    change x by (((_lastSCX) * (-1)) * (amount))\n    change y by (((_lastSCY) * (-1)) * (amount))\n    set [_lastscx v] to (ScreenShake_X)\n    set [_lastscy v] to (ScreenShake_Y)\n    change x by ((_lastSCX) * (amount))\n    change y by ((_lastSCY) * (amount))\nend\n\ndefine Screen Shake | strengthX (strengthx) strengthY (strengthy) interval (interval) duration (duration)\nset [_screenshake_starttime v] to (timer)\nset [screenshake_x v] to ((((pick random (0) to (1)) * (2)) - (1)) * (strengthx))\nset [screenshake_y v] to ((((pick random (0) to (1)) * (2)) - (1)) * (strengthy))\nset [_screenshake_lasttime v] to (timer)\nrepeat until <(timer) > ((_screenShake_startTime) + (duration))>\n    wait ((interval) - ((timer) - (_screenShake_lastTime))) seconds\n    set [_screenshake_fraction v] to ((1) - (((timer) - (_screenShake_startTime)) / (duration)))\n    set [screenshake_x v] to ((((ScreenShake_X) / ([abs v] of (ScreenShake_X) )) * (-1)) * ((_screenShake_fraction) * ((pick random (0.7) to (1.2)) * (strengthx))))\n    set [screenshake_y v] to ((((ScreenShake_Y) / ([abs v] of (ScreenShake_Y) )) * (-1)) * ((_screenShake_fraction) * ((pick random (0.7) to (1.2)) * (strengthy))))\n    set [_screenshake_lasttime v] to (timer)\nend\nset [screenshake_x v] to [0]\nset [screenshake_y v] to [0]\n\nwhen flag clicked\nwait (6) seconds\nforever\n    repeat (10)\n        set [animate v] to [26]\n        wait (0) seconds\n        set [animate v] to [28]\n        wait (0) seconds\n        set [animate v] to [29]\n        wait (0) seconds\n        set [animate v] to [30]\n        wait (0) seconds\n        set [animate v] to [29]\n        wait (0) seconds\n        set [animate v] to [28]\n        wait (0) seconds\n    end\n    wait (14) seconds\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Stars]> then\n    wait (3.8) seconds\n    go to x: (pick random (-70) to (70)) y: (pick random (-35) to (35))\n    go to [front v] layer\n    go [backward v] (2) layers\n    set size to (100) %\n    set [ghost v] effect to (100)\n    set size to (pick random (60) to (120)) %\n    set [clone x v] to ((x position) * (3.6))\n    set [clone y v] to ((y position) * (3.6))\n    go to [front v] layer\n    go [backward v] (2) layers\n    set [brightness v] effect to (100)\n    set [clone size v] to (pick random (2) to (40))\n    show\n    repeat (pick random (35) to (45))\n        go to [front v] layer\n        go [backward v] (2) layers\n        change x by (((Clone X) - (x position)) / (Clone Size))\n        change y by (((Clone Y) - (y position)) / (Clone Size))\n        switch costume to (Animate)\n        change [ghost v] effect by (-20)\n        if <touching (_edge_ v)?> then\n            hide\n            go to [front v] layer\n            go [backward v] (2) layers\n        else\n            show\n            go to [front v] layer\n            go [backward v] (2) layers\n        end\n    end\n    repeat (20)\n        change x by (((Clone X) - (x position)) / (Clone Size))\n        change y by (((Clone Y) - (y position)) / (Clone Size))\n        go to [front v] layer\n        go [backward v] (2) layers\n        switch costume to (Animate)\n        change [ghost v] effect by (5)\n        if <touching (_edge_ v)?> then\n            hide\n            go to [front v] layer\n            go [backward v] (2) layers\n        else\n            show\n        end\n    end\n    delete this clone\nend\n\nwhen flag clicked\nbroadcast (Intro Start v)\nforever\n    repeat (15)\n        set [clone id v] to [Stars]\n        create clone of (_myself_ v)\n    end\n    wait (14) seconds\nend\n\nwhen flag clicked\nwait (.9) seconds\nforever\n    Explode\n    wait (14) seconds\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Logoo]> then\n    point in direction (0)\n    hide\n    set [ghost v] effect to (0)\n    switch costume to (logo v)\n    go to x: (0) y: (0)\n    wait (.3) seconds\n    show\n    repeat (40)\n        go to [front v] layer\n        go [backward v] (2) layers\n        change size by (((130) - (size)) / (8))\n        turn right (((90) - (direction)) / (8)) degrees\n    end\n    set [i v] to [-1]\n    repeat (20)\n        go to [front v] layer\n        go [backward v] (1) layers\n        change size by ((I) / (3))\n        change [i v] by (join [-] (([abs v] of (I) ) / (4)))\n        turn right ((I) / (-3)) degrees\n    end\n    switch costume to (name v)\n    set size to (150) %\n    point in direction (90)\n    go to x: (0) y: (1000)\n    Smooth Glide x: [0] y: [0] speed: [4]\n    wait (1.2) seconds\n    repeat (100)\n        point in direction ((([sin v] of ((timer) * (350)) ) * (20)) + (90))\n        set y to ((([abs v] of ([sin v] of ((timer) * (360)) ) ) * (100)) + (-50))\n    end\n    Smooth Glide x: [0] y: [0] speed: [2]\n    go to [front v] layer\n    go [backward v] (2) layers\n    repeat (20)\n        switch costume to (size hack v)\n        change size by (300)\n        switch costume to (name v)\n    end\n    delete this clone\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Explode-2]> then\n    hide\n    clear graphic effects\n    switch costume to (explode v)\n    go to [front v] layer\n    go [backward v] (2) layers\n    set size to (100) %\n    go to x: (Clone X) y: (Clone Y)\n    wait (6) seconds\n    show\n    set size to (0) %\n    repeat (5)\n        change size by (((120) - (size)) / (5))\n    end\n    repeat (11)\n        change size by (((120) - (size)) / (5))\n        change [ghost v] effect by (10)\n    end\n    delete this clone\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Circle-2]> then\n    hide\n    clear graphic effects\n    switch costume to (costume1 v)\n    go to [front v] layer\n    go [backward v] (2) layers\n    set size to (0) %\n    show\n    repeat (5)\n        change size by (((120) - (size)) / (5))\n    end\n    repeat (11)\n        next costume\n        change size by (((120) - (size)) / (5))\n        change [ghost v] effect by (10)\n    end\n    delete this clone\nend\n\nwhen I start as a clone\nif <(Clone ID) = [Stars2]> then\n    wait (3.8) seconds\n    go to x: (pick random (-70) to (70)) y: (pick random (-35) to (35))\n    go to [front v] layer\n    go [backward v] (2) layers\n    set size to (100) %\n    set [ghost v] effect to (100)\n    set size to (pick random (60) to (120)) %\n    set [clone x v] to ((x position) * (3.6))\n    set [clone y v] to ((y position) * (3.6))\n    go to [front v] layer\n    go [backward v] (2) layers\n    set [brightness v] effect to (100)\n    set [clone size v] to (pick random (2) to (40))\n    show\n    repeat (pick random (35) to (45))\n        go to [front v] layer\n        go [backward v] (2) layers\n        change x by (((Clone X) - (x position)) / (Clone Size))\n        change y by (((Clone Y) - (y position)) / (Clone Size))\n        switch costume to (Animate)\n        change [ghost v] effect by (-20)\n        if <touching (_edge_ v)?> then\n            hide\n            go to [front v] layer\n            go [backward v] (2) layers\n        else\n            show\n            go to [front v] layer\n            go [backward v] (2) layers\n        end\n    end\n    repeat (20)\n        change x by (((Clone X) - (x position)) / (Clone Size))\n        change y by (((Clone Y) - (y position)) / (Clone Size))\n        go to [front v] layer\n        go [backward v] (2) layers\n        switch costume to (Animate)\n        change [ghost v] effect by (5)\n        if <touching (_edge_ v)?> then\n            hide\n            go to [front v] layer\n            go [backward v] (2) layers\n        else\n            show\n        end\n    end\n    delete this clone\nend\n\nwhen flag clicked\nshow\nwait (12) seconds\nbroadcast (intro vorbei v)\n\nwhen I receive [intro vorbei v]\ngo to [back v] layer\nstop [other scripts in sprite v]\n\n@Figur7\n\nwhen flag clicked\ngo to x: (299) y: (113)\nhide variable [sterne v]\nhide\n\nwhen I receive [intro vorbei v]\nshow variable [sterne v]\nset [sterne v] to [0]\nset [codex v] to [0]\n\nwhen I start as a clone\nif <(Codex) = [0]> then\n    go to x: (-417) y: (-24)\nend\n\nwhen I start as a clone\nif <(Codex) = [1]> then\n    go to x: (-142) y: (147)\nend\n\nwhen I start as a clone\nif <(Codex) = [2]> then\n    go to x: (-183) y: (-105)\nend\n\nwhen I start as a clone\nforever\n    if <touching (spieler v)?> then\n        change [sterne v] by (1)\n        delete this clone\n    end\nend\n\nwhen I receive [level 2 geschafft v]\nset [level... v] to [1]\nwait (0.1) seconds\nset [level... v] to [0]\nstop [this script v]\n\nwhen I receive [level 5 geschafft v]\nset [level... v] to [1]\nwait (0.1) seconds\nset [level... v] to [0]\nstop [this script v]\n\nwhen I receive [level 3 geschafft v]\nset [level... v] to [1]\nwait (0.1) seconds\nset [level... v] to [0]\nstop [this script v]\n\nwhen I receive [level 4 geschafft v]\nset [level... v] to [1]\nwait (0.1) seconds\nset [level... v] to [0]\nstop [this script v]\n\nwhen I receive [level 1 geschafft v]\nset [level... v] to [1]\nwait (0.1) seconds\nset [level... v] to [0]\nstop [this script v]\n\nwhen I start as a clone\nforever\n    if <(Level...) = [1]> then\n        delete this clone\n    end\nend\n\nwhen I start as a clone\nif <(Codex) = [3]> then\n    go to x: (-480) y: (26)\nend\n\nwhen I start as a clone\nif <(Codex) = [4]> then\n    go to x: (-139) y: (-110)\nend\n\nwhen I start as a clone\nif <(Codex) = [5]> then\n    go to x: (-366) y: (-21)\nend\n\nshow\n\nwhen I start as a clone\nshow\n\nbroadcast (level 1 geschafft v)\n\nwhen I start as a clone\nif <(Codex) = [6]> then\n    go to x: (-126) y: (112)\nend\n\nwhen I start as a clone\nif <(Codex) = [7]> then\n    go to x: (-135) y: (-62)\nend\n\nwhen I start as a clone\nif <(Codex) = [8]> then\n    go to x: (-118) y: (173)\nend\n\nwhen I start as a clone\nif <(Codex) = [9]> then\n    go to x: (-253) y: (-67)\nend\n\nwhen I start as a clone\nif <(Codex) = [10]> then\n    go to x: (-346) y: (148)\nend\n\nwhen I start as a clone\nif <(Codex) = [11]> then\n    go to x: (-230) y: (166)\nend\n\nwhen I start as a clone\nif <(Codex) = [12]> then\n    go to x: (-276) y: (-47)\nend\n\nwhen I start as a clone\nif <(Codex) = [13]> then\n    go to x: (-570) y: (-10)\nend\n\nwhen I start as a clone\nif <(Codex) = [14]> then\n    go to x: (-448) y: (189)\nend\n\nwhen I start as a clone\nif <(Codex) = [15]> then\n    go to x: (-290) y: (122)\nend\n\nwhen I start as a clone\nif <(Codex) = [16]> then\n    go to x: (-386) y: (-13)\nend\n\nwhen I start as a clone\nif <(Codex) = [17]> then\n    go to x: (-566) y: (-15)\nend\n\nwhen I start as a clone\nwait (3) seconds\nwait until <[1] = (Level...)>\ndelete this clone\n\nwhen I start as a clone\nif <(Codex) = [18]> then\n    go to x: (-546) y: (36)\nend\n\nwhen I start as a clone\nif <(Codex) = [19]> then\n    go to x: (-119) y: (-81)\nend\n\nwhen I start as a clone\nif <(Codex) = [20]> then\n    go to x: (-258) y: (166)\nend\n\nwhen I start as a clone\nif <(Codex) = [23]> then\n    go to x: (-349) y: (112)\nend\n\nwhen I start as a clone\nif <(Codex) = [22]> then\n    go to x: (-403) y: (-83)\nend\n\nwhen I start as a clone\nif <(Codex) = [21]> then\n    go to x: (-346) y: (-5)\nend\n\n@Figur6\n\nwhen I receive [intro vorbei v]\nforever\n    if <key (s v) pressed?> then\n        set [kostüm... v] to [0]\n        show\n        broadcast (Shop öffnen v)\n        go to [front v] layer\n        switch costume to (kostüm1 v)\n    end\n    if <key (c v) pressed?> then\n        hide\n    end\nend\n\nwhen flag clicked\nhide\n\nwhen I receive [shop öffnen v]\nforever\n    if <(Kostüm...) = [1]> then\n        if <key (space v) pressed?> then\n            if <not <(Kostüm 1 gekauft) = [1]>> then\n                if <(Sterne) > [0]> then\n                    change [sterne v] by (-1)\n                    set [kostüm 1 gekauft v] to [1]\n                    broadcast (Kostüm 1! v)\n                    wait (1) seconds\n                    hide\n                end\n            else\n                broadcast (Kostüm 1! v)\n            end\n        end\n    end\nend\n\nwhen I receive [shop öffnen v]\nforever\n    if <(Kostüm...) = [7]> then\n        set [kostüm... v] to [0]\n    end\nend\n\nwhen I receive [shop öffnen v]\nforever\n    if <(Kostüm...) = [2]> then\n        if <key (space v) pressed?> then\n            if <not <(Kostüm 2 gekauft) = [1]>> then\n                if <(Sterne) > [1]> then\n                    change [sterne v] by (-2)\n                    set [kostüm 2 gekauft v] to [1]\n                    broadcast (Kostüm 2! v)\n                    wait (1) seconds\n                    hide\n                end\n            else\n                broadcast (Kostüm 2! v)\n            end\n        end\n    end\nend\n\nwhen I receive [shop öffnen v]\nforever\n    if <(Kostüm...) = [3]> then\n        if <key (space v) pressed?> then\n            if <not <(Kostüm 3 gekauft) = [1]>> then\n                if <(Sterne) > [1]> then\n                    change [sterne v] by (-2)\n                    set [kostüm 3 gekauft v] to [1]\n                    broadcast (Kostüm 3! v)\n                    wait (1) seconds\n                    hide\n                end\n            else\n                broadcast (Kostüm 3! v)\n            end\n        end\n    end\nend\n\nwhen I receive [shop öffnen v]\nforever\n    if <(Kostüm...) = [4]> then\n        if <key (space v) pressed?> then\n            if <not <(Kostüm 4 gekauft) = [1]>> then\n                if <(Sterne) > [3]> then\n                    change [sterne v] by (-4)\n                    set [kostüm 4 gekauft v] to [1]\n                    broadcast (Kostüm 4! v)\n                    wait (1) seconds\n                    hide\n                end\n            else\n                broadcast (Kostüm 4! v)\n            end\n        end\n    end\nend\n\nwhen I receive [shop öffnen v]\nforever\n    if <(Kostüm...) = [5]> then\n        if <key (space v) pressed?> then\n            if <not <(Kostüm 5 gekauft) = [1]>> then\n                if <(Sterne) > [5]> then\n                    change [sterne v] by (-6)\n                    set [kostüm 5 gekauft v] to [1]\n                    broadcast (Kostüm 5! v)\n                    wait (1) seconds\n                    hide\n                end\n            else\n                broadcast (Kostüm 5! v)\n            end\n        end\n    end\nend\n\nwhen I receive [intro vorbei v]\nset [kostüm 1 gekauft v] to [0]\nset [kostüm 2 gekauft v] to [0]\nset [kostüm 3 gekauft v] to [0]\nset [kostüm 4 gekauft v] to [0]\nset [kostüm 5 gekauft v] to [0]\nforever\n    if <key (d v) pressed?> then\n        next costume\n        change [kostüm... v] by (1)\n        wait (0.3) seconds\n    end\nend\n\nwhen I receive [shop öffnen v]\nforever\n    if <(Kostüm...) = [6]> then\n        if <key (space v) pressed?> then\n            if <not <(Kostüm...) = [1]>> then\n                if <(Sterne) > [9]> then\n                    change [sterne v] by (-10)\n                    set [kostüm 6 gekauft v] to [1]\n                    broadcast (Kostüm 6! v)\n                    wait (1) seconds\n                    hide\n                end\n            else\n                broadcast (Kostüm 6! v)\n            end\n        end\n    end\nend\n\n