推しの子プラットフォーマー（platformer）

Instructions: #推しの子\n#プラットフォーマー\n#platformer

@Stage\n\nwhen flag clicked\nswitch backdrop to (背景1 v)\n\nwhen I receive [1 v]\nswitch backdrop to (背景2 v)\n\n@スプライト5\n\nwhen flag clicked\ngo to [back v] layer\ngo [forward v] (3) layers\nforever\n    turn right (15) degrees\nend\n\nwhen flag clicked\ngo to x: (0) y: (-120)\ngo to [back v] layer\ngo [forward v] (3) layers\nrepeat (10)\n    wait (0.01) seconds\n    change x by (20)\nend\nforever\n    repeat (10)\n        wait (0.01) seconds\n        change x by (40)\n    end\n    repeat (10)\n        wait (0.01) seconds\n        change x by (-40)\n    end\nend\n\nwhen flag clicked\nforever\n    if <(ステージ) = [10]> then\n        show\n    else\n        hide\n    end\nend\n\n@バーンって降りてきてぶっ刺さったら死んでまうやつ4\n\nwhen flag clicked\ngo to [back v] layer\ngo [forward v] (4) layers\nforever\n    glide (0.3) secs to x: (100) y: (200)\n    wait (0.5) seconds\n    glide (0.3) secs to x: (100) y: (0)\n    wait (0.5) seconds\nend\n\nwhen flag clicked\nforever\n    if <(ステージ) = [9]> then\n        show\n    else\n        hide\n    end\nend\n\n@バーンって降りてきてぶっ刺さったら死んでまうやつ3\n\nwhen flag clicked\ngo to [back v] layer\ngo [forward v] (4) layers\nforever\n    glide (0.3) secs to x: (0) y: (200)\n    wait (0.5) seconds\n    glide (0.3) secs to x: (0) y: (0)\n    wait (0.5) seconds\nend\n\nwhen flag clicked\nforever\n    if <(ステージ) = [9]> then\n        show\n    else\n        hide\n    end\nend\n\n@バーンって降りてきてぶっ刺さったら死んでまうやつ2\n\nwhen flag clicked\ngo to [back v] layer\ngo [forward v] (4) layers\nforever\n    glide (0.3) secs to x: (-100) y: (200)\n    wait (0.5) seconds\n    glide (0.3) secs to x: (-100) y: (0)\n    wait (0.5) seconds\nend\n\nwhen flag clicked\nforever\n    if <(ステージ) = [9]> then\n        show\n    else\n        hide\n    end\nend\n\n@バーンって降りてきてぶっ刺さったら死んでまうやつ\n\nwhen flag clicked\ngo to [back v] layer\ngo [forward v] (4) layers\nforever\n    glide (0.3) secs to x: (0) y: (200)\n    wait (0.5) seconds\n    glide (0.3) secs to x: (0) y: (0)\n    wait (0.5) seconds\nend\n\nwhen flag clicked\nforever\n    if <(ステージ) = [8]> then\n        show\n    else\n        hide\n    end\nend\n\n@障害物\n\nwhen flag clicked\nforever\n    switch costume to (ステージ)\nend\n\n@ \n\nwhen flag clicked\nset [ステージ v] to [1]\nswitch costume to (止まる v)\ngo to x: (-210) y: (-90)\nshow\nset size to (100) %\ngo to [front v] layer\nhide\nset [x v] to [0]\nset [y v] to [0]\npoint in direction (90)\ngo to x: (-201) y: (152)\ngo to x: (-213) y: (-34)\nforever\n    set rotation style [left-right v]\n    if <<key (left arrow v) pressed?> or <<(mouse x) < (x position)> and <mouse down?>>> then\n        switch costume to (左 v)\n        change [x2 v] by (-1)\n    end\n    if <<key (right arrow v) pressed?> or <<(x position) < (mouse x)> and <mouse down?>>> then\n        switch costume to (右 v)\n        change [x2 v] by (1)\n    end\n    set [x2 v] to ((X2) * (0.9))\n    change x by (X2)\n    if <touching (地面 v)?> then\n        change y by (1)\n        if <touching (地面 v)?> then\n            change y by (1)\n            if <touching (地面 v)?> then\n                change y by (1)\n                if <touching (地面 v)?> then\n                    change y by (1)\n                    if <touching (地面 v)?> then\n                        change y by (1.0)\n                        if <touching (地面 v)?> then\n                            change x by ((X2) * (-1))\n                            change y by (-5)\n                            if <<key (up arrow v) pressed?> or <<[0] < (mouse y)> and <mouse down?>>> then\n                                if <(X2) > [0]> then\n                                    set [x2 v] to [-5]\n                                else\n                                    set [x2 v] to [5]\n                                end\n                                set [y2 v] to [10]\n                            else\n                                set [x2 v] to [0.0]\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\n    change y by (-1)\n    if <touching (地面 v)?> then\n        if <<key (up arrow v) pressed?> or <<(y position) < (mouse y)> and <mouse down?>>> then\n            start sound [ニュッ2 v]\n            set [y2 v] to [13]\n        end\n    end\n    change y by (1)\n    change [y2 v] by (-1)\n    change y by (Y2)\n    if <touching (地面 v)?> then\n        change y by ((Y2) * (-1))\n        set [y2 v] to [0]\n    end\n    if <(x position) > [230]> then\n        broadcast (次 v)\n        hide\n        change [ステージ v] by (1)\n        set [x2 v] to [0]\n        go to x: (-201) y: (-100)\n        show\n    end\n    if <<touching (スプライト5 v)?> or <<touching (障害物 v)?> or <<touching (バーンって降りてきてぶっ刺さったら死んでまうやつ v)?> or <<touching (バーンって降りてきてぶっ刺さったら死んでまうやつ2 v)?> or <<touching (バーンって降りてきてぶっ刺さったら死んでまうやつ3 v)?> or <touching (バーンって降りてきてぶっ刺さったら死んでまうやつ4 v)?>>>>>> then\n        set [x2 v] to [0]\n        set [y2 v] to [0]\n        start sound [crash v]\n        repeat (20)\n            change [ghost v] effect by (20)\n        end\n        go to x: (-201) y: (-100)\n        repeat (20)\n            change [ghost v] effect by (-8)\n        end\n    end\n    if <touching (バネ v)?> then\n        set [y2 v] to [20]\n    end\nend\n\nwhen I receive [1 v]\nwait (5.5) seconds\nshow\n\nwhen I receive [1 v]\nwait (5.5) seconds\nstart sound [YOASOBI「アイドル」 Official Music Video 2023-04-12 11_30 - from YouTube v]\n\n@スプライト1\n\nwhen flag clicked\nforever\n    wait (0.5) seconds\n    next costume\nend\n\nwhen flag clicked\nforever\n    repeat (10)\n        wait (0.1) seconds\n        change y by (変数)\n    end\n    repeat (10)\n        wait (0.1) seconds\n        change y by (変数)\n    end\nend\n\nwhen flag clicked\nhide\nset [変数 v] to [0]\ngo to x: (-5) y: (-30)\nrepeat (10)\n    wait (0.1) seconds\n    change [変数 v] by (0.15)\nend\nforever\n    repeat (20)\n        wait (0.1) seconds\n        change [変数 v] by (-0.15)\n    end\n    wait (0.1) seconds\n    repeat (20)\n        wait (0.1) seconds\n        change [変数 v] by (0.15)\n    end\nend\n\nwhen I receive [1 v]\nshow\n\n@地面\n\nwhen flag clicked\nhide\nforever\n    switch costume to (ステージ)\nend\n\nwhen I receive [1 v]\nshow\n\n@スプライト4\n\nwhen flag clicked\ngo to [back v] layer\n\nwhen flag clicked\nforever\n    wait (pick random (3) to (5)) seconds\n    create clone of (_myself_ v)\nend\n\nwhen I start as a clone\nshow\nrepeat (50)\n    change x by (-10)\n    change y by (-10)\nend\ndelete this clone\n\ngo to x: (144) y: (105)\n\ngo to x: (218) y: (151)\n\n@スプライト3\n\nwhen flag clicked\ngo to [back v] layer\n\nwhen flag clicked\nforever\n    wait (pick random (2) to (3)) seconds\n    create clone of (_myself_ v)\nend\n\nwhen I start as a clone\nshow\nrepeat (50)\n    change x by (-10)\n    change y by (-10)\nend\ndelete this clone\n\ngo to x: (144) y: (105)\n\n@スプライト2\n\ngo to x: (218) y: (151)\n\n@スプライト6\n\nwhen flag clicked\nhide\n\n@cooltext438907239390756\n\nwhen flag clicked\nhide\n\n@スプライト7\n\nwhen flag clicked\nhide\n\n@z_6395d9a45c56c-removebg-preview\n\nwhen flag clicked\nhide\n\n@cooltext438908360501825\n\nwhen flag clicked\nhide\n\n@intro\n\ndefine intro proglam\nintro reset switch\nset [色 v] to (pick random (1) to (200))\nstart sound [Avicii - Broken Arrows v]\nclear graphic effects\nswitch costume to (card1 v)\nset [intro v] to [-195]\nrepeat (5)\n    create clone of (_myself_ v)\n    change [intro v] by (100)\nend\nwait [0.9]\nswitch costume to (card2 v)\nset [intro v] to [-185]\nrepeat (4)\n    create clone of (_myself_ v)\n    change [intro v] by (125)\n    wait (0.025) seconds\nend\nwait [1.3]\nswitch costume to (card3 v)\nset [intro v] to [-160]\nrepeat (4)\n    create clone of (_myself_ v)\n    change [intro v] by (100)\n    wait (0.025) seconds\nend\nwait [1.85]\nswitch costume to (card4 v)\nset [intro v] to [-160]\nrepeat (4)\n    create clone of (_myself_ v)\n    change [intro v] by (100)\n    wait (0.025) seconds\nend\nwait [2.3]\nswitch costume to (card5 v)\nset [intro v] to [185]\nrepeat (4)\n    create clone of (_myself_ v)\n    change [intro v] by (-125)\n    wait (0.025) seconds\nend\nwait [2.85]\nswitch costume to (card6 v)\ncreate clone of (_myself_ v)\nswitch costume to (name v)\ncreate clone of (_myself_ v)\nwait [3.35]\nswitch costume to (card7 v)\ncreate clone of (_myself_ v)\nswitch costume to (card8 v)\ncreate clone of (_myself_ v)\nwait [4]\ndust\nwait [5]\nswitch costume to (icon v)\ncreate clone of (_myself_ v)\nwait [9]\nswitch costume to (last v)\ncreate clone of (_myself_ v)\n\ndefine wait (time)\nwait until <(time) < (timer)>\n\ndefine clone proglam\nset [color v] effect to (色)\nshow\nif <(costume [number v]) = [1]> then\n    set [ghost v] effect to (100)\n    set x: [-500] y: [-500] direction: [0] size: [0]\n    repeat (30)\n        move x: (intro) y: [0] direction: [90] size: [100] speed: [4]\n        change [ghost v] effect by (-7.5)\n    end\n    wait (3) seconds\n    delete this clone\nelse\n    if <(costume [number v]) = [2]> then\n        set x: (intro) y: [-500] direction: [90] size: [100]\n        repeat (30)\n            move x: (intro) y: [0] direction: [90] size: [100] speed: [4]\n        end\n        wait (2) seconds\n        delete this clone\n    else\n        if <(costume [number v]) = [3]> then\n            set x: [-500] y: (intro) direction: [90] size: [100]\n            repeat (30)\n                move x: [0] y: (intro) direction: [90] size: [100] speed: [4]\n            end\n            wait (2) seconds\n            delete this clone\n        else\n            if <(costume [number v]) = [4]> then\n                clear graphic effects\n                set x: [0] y: (intro) direction: [90] size: [0]\n                repeat (30)\n                    move x: [0] y: (intro) direction: [90] size: [100] speed: [4]\n                end\n                wait (2) seconds\n                delete this clone\n            else\n                if <(costume [number v]) = [5]> then\n                    set x: (intro) y: [0] direction: [90] size: [0]\n                    repeat (30)\n                        move x: (intro) y: [0] direction: [90] size: [100] speed: [4]\n                    end\n                    wait (2) seconds\n                    delete this clone\n                else\n                    if <(costume [number v]) = [6]> then\n                        set x: [0] y: [-500] direction: [90] size: [0]\n                        repeat (30)\n                            move x: [0] y: [0] direction: [90] size: [100] speed: [4]\n                        end\n                        wait (1.5) seconds\n                        delete this clone\n                    else\n                        if <(costume [number v]) = [7]> then\n                            set x: [0] y: [-500] direction: [0] size: [100]\n                            repeat (30)\n                                move x: [0] y: [0] direction: [90] size: [100] speed: [4]\n                            end\n                            wait (0.5) seconds\n                            hide\n                            wait [7]\n                            go to [front v] layer\n                            show\n                            set x: [5000] y: [] direction: [90] size: [100]\n                            set [intro v] to [0]\n                            forever\n                                set [intro v] to (((intro) * (0.8)) + ((((([cos v] of ((timer) * (350)) ) * (4)) + (75)) - (x position)) / (6)))\n                                change x by (intro)\n                                set y to (([sin v] of ((timer) * (450)) ) * (4))\n                                point in direction ((([cos v] of ((timer) * (400)) ) * (3)) + (90))\n                            end\n                        else\n                            if <(costume [number v]) = [8]> then\n                                set x: [0] y: [-500] direction: [560] size: [100]\n                                repeat (65)\n                                    move x: [0] y: (([sin v] of ((timer) * (175)) ) * (10)) direction: ((([cos v] of ((timer) * (175)) ) * (7)) + (90)) size: [100] speed: [5]\n                                end\n                                forever\n                                    move x: ((([cos v] of ((timer) * (125)) ) * (5)) - (100)) y: (([sin v] of ((timer) * (175)) ) * (10)) direction: ((([cos v] of ((timer) * (175)) ) * (7)) + (90)) size: [100] speed: [5]\n                                end\n                            else\n                                if <(costume [number v]) = [9]> then\n                                    set x: [-500] y: [0] direction: [90] size: [100]\n                                    repeat (27)\n                                        move x: [0] y: [0] direction: [90] size: [100] speed: [3.5]\n                                    end\n                                    switch costume to (card7 v)\n                                    repeat (8)\n                                        set [brightness v] effect to (100)\n                                        wait (0.02) seconds\n                                        set [brightness v] effect to (0)\n                                        wait (0.02) seconds\n                                    end\n                                    set [brightness v] effect to (100)\n                                else\n                                    if <(costume [number v]) = [10]> then\n                                        set x: [500] y: [0] direction: [90] size: [100]\n                                        repeat (27)\n                                            move x: [0] y: [0] direction: [90] size: [100] speed: [3.5]\n                                        end\n                                        repeat (8)\n                                            set [brightness v] effect to (100)\n                                            wait (0.02) seconds\n                                            set [brightness v] effect to (0)\n                                            wait (0.02) seconds\n                                        end\n                                        set [brightness v] effect to (100)\n                                    else\n                                        if << (costume [name v]) contains [dust]?> = [true]> then\n                                            go to (random position v)\n                                            point in direction (pick random (1) to (360))\n                                            set [ghost v] effect to (pick random (5) to (50))\n                                            set size to (pick random (50) to (100)) %\n                                            forever\n                                                move (0.2) steps\n                                                if <(pick random (1) to (2)) = [1]> then\n                                                    turn right (1) degrees\n                                                else\n                                                    turn right (-1) degrees\n                                                end\n                                            end\n                                        else\n                                            set x: [] y: [-500] direction: [560] size: []\n                                            repeat until <[100] < (size)>\n                                                go to [front v] layer\n                                                turn right (((90) - (direction)) / (5)) degrees\n                                                change y by (((0) - (y position)) / (5))\n                                                go to [front v] layer\n                                                change size by (((size) - (-1)) / (4))\n                                                go to [front v] layer\n                                            end\n                                            repeat (4)\n                                                switch costume to (blank v)\n                                                go to [front v] layer\n                                                turn right (((90) - (direction)) / (5)) degrees\n                                                change y by (((0) - (y position)) / (5))\n                                                go to [front v] layer\n                                                change size by (((size) - (-1)) / (4))\n                                                go to [front v] layer\n                                                switch costume to (last v)\n                                                go to [front v] layer\n                                            end\n                                            wait (1) seconds\n                                            repeat (20)\n                                                change [ghost v] effect by (5)\n                                            end\n                                            delete this clone\n                                        end\n                                    end\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\nbroadcast (1 v)\n\ndefine set x: (x) y: (y) direction: (di) size: (size)\ngo to x: (x) y: (y)\npoint in direction (di)\nset size to (size) %\n\ndefine move x: (xx) y: (yy) direction: (didi) size: (sisi) speed: (spd)\nchange x by (((xx) - (x position)) / (spd))\nchange y by (((yy) - (y position)) / (spd))\nturn right (((didi) - (direction)) / (spd)) degrees\nchange size by (((sisi) - (size)) / (spd))\n\nchange x by ((() - (x position)) / ())\nchange y by ((() - (y position)) / ())\nturn right ((() - (direction)) / ()) degrees\nchange size by ((() - (size)) / ())\n\ndefine intro reset switch\nreset timer\nhide\nset x: [0] y: [0] direction: [90] size: [100]\n\nwhen flag clicked\nwait (1) seconds\nintro proglam\nwait (4) seconds\nbroadcast (outro start!! v)\n\nwhen I start as a clone\nclone proglam\n\ndefine dust\nrepeat (10)\n    switch costume to (pick random (11) to (12))\n    create clone of (_myself_ v)\nend\n\nwhen I start as a clone\nforever\n    if <not <[12] < (costume [number v])>> then\n        wait [10]\n        delete this clone\n    end\nend\n\n