PLATFORMER PART 2
@Stage\n\nwhen flag clicked\nswitch backdrop to (backdrop1 v)\n\nwhen I receive [タイトルが〜めん v]\nswitch backdrop to (背景 v)\nforever\n    play sound [idk song v] until done\nend\n\nwhen I start as a clone\nif <(clone ID) = [#1]> then\n    switch costume to (90checkershot_2 v)\n    go to [front v] layer\n    x [0] y [0] size [1] ⤵ [n]\n    repeat (16)\n        change size by (((750) - (size)) / (8))\n        next costume\n        Movement x [-70] Movement y [70] speed [8] count [n]\n    end\n    delete this clone\nend\n\n@Hero\n\nwhen I receive [タイトルが〜めん v]\ngo to [front v] layer\nshow\nset size to (110) %\ngo to [front v] layer\ngo [backward v] (3) layers\nswitch costume to (normal v)\nset drag mode [not draggable v]\ngo to x: (-190) y: (-50)\npoint in direction (90)\nset [ステージ v] to [1]\nset [xvel v] to [0]\nset [yvel v] to [0]\nforever\n    set rotation style [left-right v]\n    if <(Move ok?) = [1]> then\n        if <<<mouse down?> and <(x position) > (mouse x)>> or <<key (left arrow v) pressed?> or <key (a v) pressed?>>> then\n            change [xv v] by (-1)\n            switch costume to (left v)\n            if <<<<(y position) < (mouse y)> and <mouse down?>> or <<key (up arrow v) pressed?> or <key (w v) pressed?>>> and <<<(mouse x) < (x position)> and <mouse down?>> or <<key (left arrow v) pressed?> or <key (a v) pressed?>>>> then\n                switch costume to (left up v)\n            end\n        end\n        if <<<mouse down?> and <(x position) < (mouse x)>> or <<key (right arrow v) pressed?> or <key (d v) pressed?>>> then\n            change [xv v] by (1)\n            switch costume to (right v)\n            if <<<<(y position) < (mouse y)> and <mouse down?>> or <<key (up arrow v) pressed?> or <key (w v) pressed?>>> and <<<(x position) < (mouse x)> and <mouse down?>> or <<key (right arrow v) pressed?> or <key (d v) pressed?>>>> then\n                switch costume to (right up v)\n            end\n        end\n        if <not <key (any v) pressed?>> then\n            switch costume to (normal v)\n        end\n        set [xv v] to ((Xv) * (0.9))\n        change x by (Xv)\n        if <touching (stage v)?> then\n            change y by (1)\n            if <touching (stage v)?> then\n                change y by (1)\n                if <touching (stage v)?> then\n                    change y by (1)\n                    if <touching (stage v)?> then\n                        change y by (1)\n                        if <touching (stage v)?> then\n                            change y by (1)\n                            if <touching (stage v)?> then\n                                change x by ((Xv) * (-1))\n                                change y by (-5)\n                                if <<<mouse down?> and <(y position) < (mouse y)>> or <<key (up arrow v) pressed?> or <key (w v) pressed?>>> then\n                                    if <(Xv) > [0]> then\n                                        set [xv v] to [-7]\n                                    else\n                                        set [xv v] to [7]\n                                    end\n                                    set [yv v] to [10]\n                                else\n                                    set [xv v] to [0]\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n        change y by (-1)\n        if <touching (stage v)?> then\n            if <<<mouse down?> and <(y position) < (mouse y)>> or <<key (up arrow v) pressed?> or <key (w v) pressed?>>> then\n                set [yv v] to [15]\n                point in direction ((Yv) * (0.5))\n            end\n        end\n        change y by (1)\n        change [yv v] by (-1)\n        change y by (Yv)\n        if <touching (stage v)?> then\n            change y by ((Yv) * (-1))\n            set [yv v] to [0]\n        end\n        hide variable [xv v]\n        if <(x position) > [230]> then\n            broadcast (next level v)\n            change [level v] by (1)\n            set [yv v] to [0]\n            set [xv v] to [0]\n            go to x: (-190) y: (-50)\n        end\n        if <(y position) < [-170]> then\n            set [xv v] to [0]\n            set [yv v] to [0]\n            go to x: (-190) y: (-50)\n        end\n        if <touching (out v)?> then\n            set [xv v] to [0]\n            set [yv v] to [0]\n            go to x: (-190) y: (-50)\n        end\n    end\nend\n\nset [xv v] to <<<<mouse down?> and <(y position) < (mouse y)>> or <key (up arrow v) pressed?>> or <key (w v) pressed?>>\n\nwhen flag clicked\nhide\n\nwhen flag clicked\nhide\n\n@stage\n\nwhen flag clicked\nhide\ngo to x: (0) y: (0)\nforever\n    set drag mode [not draggable v]\nend\n\nwhen I receive [タイトルが〜めん v]\nset [level v] to [1]\nshow\nswitch costume to (1 v)\n\nwhen I receive [next level v]\nshow\nswitch costume to (LEVEL)\n\n@Love fave\n\nwhen flag clicked\nforever\n    set drag mode [not draggable v]\nend\n\nwhen flag clicked\nhide\n\nwhen I receive [タイトルが〜めん v]\nset [costume v] to [0]\nhide\nforever\n    if <not <<(LOVED__) = [1]> and <(FAVED___) = [1]>>> then\n        wait (pick random (30) to (40)) seconds\n        switch costume to (costume1 v)\n        go to x: (0) y: (50)\n        show\n        go to [front v] layer\n        start sound [pop v]\n        repeat (9)\n            change y by (-6)\n        end\n        repeat (5)\n            change y by (3)\n        end\n        repeat (5)\n            change y by (-1)\n        end\n        wait (2) seconds\n        repeat (15)\n            change y by (7)\n        end\n        hide\n    end\n    if <(Costume) > [0]> then\n        hide\n        stop [this script v]\n    end\nend\n\n@out\n\nwhen flag clicked\nhide\nforever\n    set drag mode [not draggable v]\nend\n\nwhen I receive [タイトルが〜めん v]\nshow\ngo to x: (0) y: (0)\nswitch costume to (1 v)\n\nwhen I receive [next level v]\ngo to x: (0) y: (0)\npoint in direction (90)\nshow\ngo to [back v] layer\nswitch costume to (LEVEL)\nif <(costume [number v]) = [2]> then\n    go to x: (0) y: (0)\nelse\n    if <(costume [number v]) = [3]> then\n        go to x: (0) y: (-100)\n        forever\n            turn right (1) degrees\n        end\n    else\n        if <(costume [number v]) = [4]> then\n            go to x: (75) y: (-115)\n            forever\n                turn right (1) degrees\n            end\n        else\n            if <(costume [number v]) = [5]> then\n                go to x: (122) y: (41)\n                forever\n                    turn right (1) degrees\n                end\n            end\n        end\n    end\nend\n\ngo to x: (122) y: (40)\n\n@sign\n\nwhen flag clicked\nhide\n\nwhen I receive [タイトルが〜めん v]\nshow\ngo to x: (0) y: (0)\nswitch costume to (1 v)\n\nwhen I receive [next level v]\ngo to x: (0) y: (0)\nshow\ngo to [back v] layer\nswitch costume to (LEVEL)\n\n@intro\n\nwhen flag clicked\nset [sin v] to [0]\nhide\nwait (0.35) seconds\nbroadcast (intro v)\n\nwhen I start as a clone\nif <(clone ID) = [1]> then\n    switch costume to (icon v)\n    x [0] y [0] size [1] ⤵ [90]\n    size [100] speed [4] count [15]\n    repeat (20)\n        go to [front v] layer\n        switch costume to (size  v)\n        change size by (((400) - (size)) / (4))\n        switch costume to (icon v)\n        change [ghost v] effect by (6)\n    end\nend\n\ndefine x (x) y (y) size (size) ⤵ (⤵)\nshow\nif <not <(x) = [n]>> then\n    set x to (x)\nend\nif <not <(y) = [n]>> then\n    set y to (y)\nend\nif <not <(size) = [n]>> then\n    set size to (size) %\nend\nif <not <(⤵) = [n]>> then\n    point in direction (⤵)\nend\n\ndefine clone (id)\nset [clone id v] to (id)\ncreate clone of (_myself_ v)\nwait () seconds\n\ndefine Movement x (x) Movement y (y) speed (s) count (c)\nif <not <(c) = [n]>> then\n    repeat (c)\n        if <not <(x) = [n]>> then\n            change x by (((x) - (x position)) / (s))\n        end\n        if <not <(y) = [n]>> then\n            change y by (((y) - (y position)) / (s))\n        end\n    end\nelse\n    if <not <(x) = [n]>> then\n        change x by (((x) - (x position)) / (s))\n    end\n    if <not <(y) = [n]>> then\n        change y by (((y) - (y position)) / (s))\n    end\nend\n\ndefine size (size) speed (s) count (c)\nif <not <(c) = [n]>> then\n    repeat (c)\n        if <not <(size) = [n]>> then\n            change size by (((size) - (size)) / (s))\n        end\n    end\nelse\n    if <(c) = [n]> then\n        change size by (((size) - (size)) / (s))\n    end\nend\n\nwhen I start as a clone\nif <(clone ID) = [2]> then\n    switch costume to (name v)\n    go to [front v] layer\n    x [0] y [0] size [155] ⤵ [90]\n    wait (.9) seconds\n    x [0] y [0] size [155] ⤵ [90]\n    wait (.8) seconds\n    x [0] y [0] size [155] ⤵ [90]\n    wait (2.7) seconds\n    x [0] y [0] size [155] ⤵ [90]\n    repeat until <(y position) < [-180]>\n        change y by (((y position) - (0.1)) / (3))\n    end\n    delete this clone\nend\n\nwhen I start as a clone\nif <(clone ID) = [3]> then\n    switch costume to (コスチューム1 v)\n    x [0] y [400] size [100] ⤵ [90]\n    Movement x [0] Movement y [0] speed [4] count [30]\n    wait until <[5.8] < (timer)>\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) = [2]> then\n    repeat until <[7] < (timer)>\n        size [100] speed [4] count [n]\n    end\nend\n\nwhen I start as a clone\nif <(clone ID) = [2]> then\n    repeat until <[7] < (timer)>\n        change [sin v] by (6)\n        point in direction ((90) + (([sin v] of (sin) ) * (4)))\n    end\nend\n\nwhen I start as a clone\nif <(clone ID) = [4]> then\n    switch costume to (pinwheel v)\n    go to [back v] layer\n    x [0] y [0] size [100] ⤵ [90]\n    switch costume to (size  v)\n    set size to (150) %\n    switch costume to (pinwheel v)\n    repeat until <[5.8] < (timer)>\n        turn right (2) degrees\n    end\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) = [3]> then\n    repeat until <[9] < (timer)>\n        go to [back v] layer\n    end\nend\n\nwhen I start as a clone\nif <(clone ID) = [5]> then\n    show\n    set size to (250) %\n    go to [front v] layer\n    go to x: (0) y: (0)\n    point in direction (value)\n    switch costume to (● v)\n    set [value v] to [25]\n    repeat (10)\n        go to [front v] layer\n        change size by (((25) - (size)) / (4))\n        turn right (-90) degrees\n        move (value) steps\n        change [value v] by ((value) / (-7))\n        turn right ((90) + ((value) / (2))) degrees\n    end\n    repeat (20)\n        go to [front v] layer\n        change size by (((25) - (size)) / (12))\n        turn right (-90) degrees\n        move (value) steps\n        change [value v] by ((value) / (-12))\n        turn right ((90) + ((value) / (2))) degrees\n        change [ghost v] effect by (5)\n    end\n    delete this clone\nend\n\ndefine Dots\nset [clone id v] to [5]\nset [value v] to [90]\nrepeat (10)\n    change [value v] by (36)\n    create clone of (_myself_ v)\nend\nclear graphic effects\ngo to x: (0) y: (0)\n\nwhen I start as a clone\nif <(clone ID) = [◇1]> then\n    switch costume to (◇ v)\n    go to [front v] layer\n    x [20] y [0] size [100] ⤵ [90]\n    repeat (30)\n        switch costume to (size2 v)\n        Movement x [330] Movement y [n] speed [10] count [n]\n        switch costume to (◇ v)\n    end\n    delete this clone\nend\n\nwhen I start as a clone\nif <(clone ID) = [shockwave]> then\n    switch costume to (shockwave10 v)\n    go to [front v] layer\n    x [0] y [0] size [1] ⤵ [90]\n    set [brightness v] effect to (100)\n    repeat (13)\n        change size by (((250) - (size)) / (9))\n        next costume\n    end\n    delete this clone\nend\n\ndefine kira (1234)\nset [brightness v] effect to (100)\nif < (1234) contains [1]?> then\n    point in direction (-90)\n    clone [#1]\nend\nif < (1234) contains [2]?> then\n    point in direction (0)\n    clone [#2]\nend\nif < (1234) contains [3]?> then\n    point in direction (180)\n    clone [#3]\nend\nif < (1234) contains [4]?> then\n    point in direction (90)\n    clone [#4]\nend\n\nwhen I start as a clone\nif <(clone ID) = [#1]> then\n    switch costume to (90checkershot_2 v)\n    go to [front v] layer\n    x [0] y [0] size [1] ⤵ [n]\n    repeat (16)\n        change size by (((750) - (size)) / (8))\n        next costume\n        Movement x [-70] Movement y [70] speed [8] count [n]\n    end\n    delete this clone\nend\n\nwhen I start as a clone\nif <(clone ID) = [#2]> then\n    switch costume to (90checkershot_2 v)\n    go to [front v] layer\n    x [30] y [30] size [1] ⤵ [n]\n    repeat (16)\n        change size by (((750) - (size)) / (8))\n        next costume\n        Movement x [70] Movement y [70] speed [8] count [n]\n    end\n    delete this clone\nend\n\nwhen I start as a clone\nif <(clone ID) = [#3]> then\n    switch costume to (90checkershot_2 v)\n    go to [front v] layer\n    x [-30] y [-30] size [1] ⤵ [n]\n    repeat (16)\n        change size by (((750) - (size)) / (8))\n        next costume\n        Movement x [-70] Movement y [-70] speed [8] count [n]\n    end\n    delete this clone\nend\n\nwhen I start as a clone\nif <(clone ID) = [#4]> then\n    switch costume to (90checkershot_2 v)\n    go to [front v] layer\n    x [30] y [-30] size [1] ⤵ [n]\n    repeat (16)\n        change size by (((750) - (size)) / (8))\n        next costume\n        Movement x [70] Movement y [-70] speed [8] count [n]\n    end\n    delete this clone\nend\n\nkira [14]\n\ndefine Lines\nset [clone id v] to [line]\nrepeat (20)\n    turn right (18) degrees\n    create clone of (_myself_ v)\nend\nclear graphic effects\ngo to x: (0) y: (0)\n\nwhen I start as a clone\nif <(clone ID) = [line]> then\n    go to x: (0) y: (0)\n    show\n    set size to (100) %\n    go to [front v] layer\n    turn right (90) degrees\n    switch costume to (line anim1 v)\n    set [brightness v] effect to (100)\n    set [value. v] to [14]\n    repeat (10)\n        go to [front v] layer\n        turn right (-90) degrees\n        next costume\n        move (value.) steps\n        change [value. v] by ((value.) / (-12))\n        turn right (90) degrees\n    end\n    repeat (20)\n        go to [front v] layer\n        change [ghost v] effect by (5)\n        turn right (-90) degrees\n        move (value.) steps\n        change [value. v] by ((value.) / (-12))\n        turn right (90) degrees\n    end\n    delete this clone\nend\n\ndefine 4◯\ngo to x: (-200) y: (200)\nclone [#◯]\ngo to x: (200) y: (200)\nclone [#◯]\ngo to x: (-200) y: (-200)\nclone [#◯]\ngo to x: (200) y: (-200)\nclone [#◯]\n\nwhen I start as a clone\nif <(clone ID) = [#◯]> then\n    switch costume to (shockwave10 v)\n    go to [front v] layer\n    x [n] y [n] size [1] ⤵ [90]\n    set [brightness v] effect to (100)\n    repeat (13)\n        change size by (((250) - (size)) / (9))\n        next costume\n    end\n    delete this clone\nend\n\ndefine ◇\nclone [◇1]\nclone [◇2]\n\nwhen I start as a clone\nif <(clone ID) = [◇2]> then\n    switch costume to (◇ v)\n    go to [front v] layer\n    x [-20] y [0] size [100] ⤵ [-90]\n    repeat (30)\n        switch costume to (size2 v)\n        Movement x [-330] Movement y [n] speed [10] count [n]\n        switch costume to (◇ v)\n    end\n    delete this clone\nend\n\nwhen I receive [intro v]\nstart sound [Vexento - Forever v]\nwait (.7) seconds\nclone [1]\nwait (.5) seconds\nclone [2]\nclone [3]\nclone [4]\nwait (.8) seconds\nLines\nwait (0.8) seconds\n◇\nwait (.1) seconds\nclone [shockwave]\nwait () seconds\n4◯\nwait (.55) seconds\nDots\nwait (.6) seconds\nkira [1]\nwait (.2) seconds\nkira [2]\nwait (.2) seconds\nkira [4]\nwait (.2) seconds\nkira [3]\nwait (.25) seconds\nDots\nwait () seconds\nLines\nwait (1.25) seconds\nbroadcast (タイトルが〜めん v)\n\nwhen I receive [intro v]\nreset timer\n\nwhen I receive [intro v]\nreset timer\n\nwhen I receive [intro v]\nreset timer\n\n@next level\n\nwhen flag clicked\nset [move ok? v] to [0]\nset [なし v] to [0]\nhide\ngo to [front v] layer\nforever\n    set drag mode [not draggable v]\nend\n\nwhen I receive [next level v]\n\nswitch costume to (! v)\nset [ghost v] effect to (0)\ngo to [front v] layer\ngo to x: (-17) y: (0)\nset [move ok? v] to [0]\nshow\nrepeat (15)\n    change x by (-30)\nend\nbroadcast (next next level v)\n\nwhen I receive [next next level v]\ngo to [front v] layer\nwait (0.5) seconds\nrepeat (20)\n    change x by (-40)\n    change [ghost v] effect by (5)\nend\nhide\nset [move ok? v] to [1]\n\ngo to [front v] layer\nrepeat (15)\n    switch costume to (costume2 v)\n    change size by (-70)\n    switch costume to (costume1 v)\nend\nhide\n\nwhen I receive [title v]\nforever\n    change [color v] effect by (1)\nend\n\nset [勢い v] to ((勢い) * (0.9))\n\nwhen I receive [タイトルが〜めん v]\nset [move ok? v] to [1]\n\n@!!\n\nwhen flag clicked\ngo to x: (0) y: (0)\nshow\nset [ghost v] effect to (100)\ngo to [front v] layer\n\n
Disfrutarlo