･:*+.\ cooperation platformer /.:+
@Stage\n\nwhen flag clicked\nswitch backdrop to (背景1 v)\n\nwhen I receive [ten v]\nnext backdrop\n\n@PIN\n\nwhen flag clicked\npoint in direction (90)\nset rotation style [left-right v]\nset size to (100) %\nshow\ngo to x: (-205) y: (100)\nset [x🧨 v] to [0]\nset [y💣 v] to [0]\nset rotation style [left-right v]\n\nwhen I receive [スタート v]\nforever\n    say [1p]\n    set [x🧨 v] to ((x🧨) * (0.9))\n    change x by (x🧨)\n    if <<key (right arrow v) pressed?> or <<(x position) < (mouse x)> and <mouse down?>>> then\n        change [x🧨 v] by (1)\n        point in direction (90)\n    end\n    if <<key (left arrow v) pressed?> or <<(mouse x) < (x position)> and <mouse down?>>> then\n        change [x🧨 v] by (-1)\n        point in direction (-90)\n    end\n    if <touching color (#000000)?> then\n        change y by (1)\n        if <touching color (#000000)?> then\n            change y by (1)\n            if <touching color (#000000)?> then\n                change y by (1)\n                if <touching color (#000000)?> then\n                    change y by (1)\n                    if <touching color (#000000)?> then\n                        change y by (1)\n                        if <touching color (#000000)?> then\n                            change x by ((x🧨) * (-1))\n                            change y by (-5)\n                            if <<key (up arrow v) pressed?> or <<[-45] < (mouse y)> and <mouse down?>>> then\n                                if <(x🧨) > [0]> then\n                                    set [x🧨 v] to [-6]\n                                else\n                                    set [x🧨 v] to [6]\n                                end\n                                set [y💣 v] to [10]\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 by (-1)\n    if <<key (up arrow v) pressed?> or <<[-45] < (mouse y)> and <mouse down?>>> then\n        if <touching color (#000000)?> then\n            set [y💣 v] to [15]\n        end\n    end\n    if <(y position) < [-190]> then\n        hide\n        go to x: (-205) y: (100)\n        show\n    end\n    change y by (y💣)\n    change [y💣 v] by (-1)\n    if <touching color (#000000)?> then\n        change y by ((y💣) * (-1))\n        set [y💣 v] to [0]\n    end\n    if <(x position) > [240]> then\n        change [クリア v] by (1)\n        repeat until <(クリア) = [0]>\n            set [x🧨 v] to [0]\n            set [y💣 v] to [0]\n            say []\n        end\n    end\nend\n\nwhen I receive [ten v]\ngo to x: (-205) y: (100)\nrepeat (50)\n    say []\nend\n\n@PON\n\nwhen flag clicked\npoint in direction (90)\nset rotation style [left-right v]\nset size to (100) %\nshow\ngo to x: (-205) y: (30)\nset [x⭐️ v] to [0]\nset [y❤️ v] to [0]\nset rotation style [left-right v]\n\nwhen I receive [ten v]\ngo to x: (-205) y: (30)\nrepeat (50)\n    say []\nend\n\nwhen I receive [スタート v]\nforever\n    say [2p]\n    set [x⭐️ v] to ((x⭐️) * (0.9))\n    change x by (x⭐️)\n    if <<key (d v) pressed?> or <<(x position) < (mouse x)> and <mouse down?>>> then\n        change [x⭐️ v] by (1)\n        point in direction (90)\n    end\n    if <<key (a v) pressed?> or <<(mouse x) < (x position)> and <mouse down?>>> then\n        change [x⭐️ v] by (-1)\n        point in direction (-90)\n    end\n    if <touching color (#000000)?> then\n        change y by (1)\n        if <touching color (#000000)?> then\n            change y by (1)\n            if <touching color (#000000)?> then\n                change y by (1)\n                if <touching color (#000000)?> then\n                    change y by (1)\n                    if <touching color (#000000)?> then\n                        change y by (1)\n                        if <touching color (#000000)?> then\n                            change x by ((x⭐️) * (-1))\n                            change y by (-5)\n                            if <<key (w v) pressed?> or <<[-45] < (mouse y)> and <mouse down?>>> then\n                                if <(x⭐️) > [0]> then\n                                    set [x⭐️ v] to [-6]\n                                else\n                                    set [x⭐️ v] to [6]\n                                end\n                                set [y❤️ v] to [10]\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 by (-1)\n    if <<key (w v) pressed?> or <<[-45] < (mouse y)> and <mouse down?>>> then\n        if <touching color (#000000)?> then\n            set [y❤️ v] to [15]\n        end\n    end\n    if <(y position) < [-190]> then\n        hide\n        go to x: (-205) y: (100)\n        show\n    end\n    change y by (y❤️)\n    change [y❤️ v] by (-1)\n    if <touching color (#000000)?> then\n        change y by ((y❤️) * (-1))\n        set [y❤️ v] to [0]\n    end\n    if <(x position) > [240]> then\n        change [クリア v] by (1)\n        repeat until <(クリア) = [0]>\n            say []\n            set [x⭐️ v] to [0]\n            set [y❤️ v] to [0]\n        end\n    end\nend\n\n@審判\n\nwhen flag clicked\nforever\n    if <<[240] < ([x position v] of [pin v])> and <[240] < ([x position v] of [pon v])>> then\n        broadcast (NEXT v)\n    end\nend\n\n@NEXT\n\nwhen flag clicked\nset [動く v] to [15]\ngo to x: (0) y: (800)\nhide\n\nwhen I receive [next v]\nshow\nrepeat until <(y position) < [0]>\n    change [動く v] by (-1)\n    change y by (((動く) * (-3)) / (-5))\nend\nbroadcast (Ten v)\nset [動く v] to [15]\nset [クリア v] to [0]\nwait (0.5) seconds\nrepeat until <(y position) < [-350]>\n    change [動く v] by (-1)\n    change y by (((動く) * (-3)) / (-5))\nend\nhide\ngo to x: (0) y: (500)\nset [動く v] to [15]\n\n@ボタン\n\nwhen flag clicked\ngo to [back v] layer\nswitch costume to (コスチューム1 v)\nforever\n    if <(backdrop [number v]) = [3]> then\n        go to x: (140) y: (110)\n        show\n        if <<touching (pin v)?> or <touching (pon v)?>> then\n            switch costume to (コスチューム3 v)\n            broadcast (起動 v)\n            wait (1) seconds\n            hide\n        else\n            switch costume to (コスチューム1 v)\n        end\n    else\n        hide\n    end\nend\n\n@ギミック\n\nwhen flag clicked\ngo to [back v] layer\ngo to x: (143) y: (86)\nhide\nwait until <(backdrop [number v]) = [3]>\nshow\nwait until <(backdrop [number v]) = [4]>\nhide\n\nwhen I receive [起動 v]\nglide (5) secs to x: (143) y: (-110)\n\n@Intro\n\nwhen I start as a clone\nset [aid v] to [0]\nwait until <(Aid) = [1]>\ndelete this clone\n\nwhen flag clicked\nshow\nset [aid v] to [0]\nset [kai v] to [0]\nset [to v] to [0]\npoint in direction (90)\nset size to (100) %\ngo to x: (0) y: (-800)\nswitch costume to (コスチューム2 v)\nstart sound [Panda Eyes - Radiate \[NCS Release\] v]\nrepeat until <[-5] < (y position)>\n    change [kai v] by (1)\n    change y by (((Kai) * (3)) / (5))\nend\ncreate clone of (_myself_ v)\nwait (0.3) seconds\ngo to x: (0) y: (-250)\nswitch costume to (コスチューム3 v)\nset [kai v] to [35]\nrepeat (15)\n    change [kai v] by (-1)\n    change y by (((Kai) * (1)) / (2))\nend\nwait (0.6) seconds\nset size to (100) %\nswitch costume to (コスチューム3 v)\nrepeat (200)\n    change [ん v] by (2.9)\n    change size by ([cos v] of ((ん) * (10)) )\n    turn right ([cos v] of ((ん) * (10)) ) degrees\nend\ncreate clone of (_myself_ v)\nswitch costume to (コスチューム4 v)\ngo to x: (0) y: (-800)\npoint in direction (90)\nset size to (100) %\nrepeat until <[360] < (y position)>\n    change [to v] by (1)\n    change y by ((To) * (1))\n    if <[0] < (y position)> then\n        set [aid v] to [1]\n    end\nend\nhide\nbroadcast (スタート v)\n\n@バグって音出ないからここで\n\nwhen flag clicked\nwait (11) seconds\nforever\n    play sound [Inferno v] until done\nend\n\n@サムネ\n\nwhen flag clicked\nset [ghost v] effect to (100)\ngo to [front v] layer\n\n@スプライト1\n\nwhen flag clicked\ngo to [front v] layer\nhide\nset [2 v] to [0]\nforever\n    set [1 v] to (timer)\nend\n\nwhen [timer v] > (お正月)\nif <[0] = (節分)> then\n    change [節分 v] by (1)\n    broadcast (終わりんご v)\nend\n\nwhen I receive [終わりんご v]\ngo to [front v] layer\nshow\n\n
2体の主人公をWASDと十字キーで操作しよう！\n1p:十字キー\n2p:WASD\n\nさんしょうすう20000とっぱ！？\nはーととほし300とっぱ！？