カービィプラットフォーマー/Kirby Platformer
@Stage\n\nwhen flag clicked\nforever\n    switch backdrop to (ステージ)\nend\n\nwhen flag clicked\nforever\n    play sound [Foxsky - Kirby Smash v] until done\nend\n\n@カービィ\n\nwhen flag clicked\nhide\nshow variable [☁ 世界最高 v]\nshow variable [タイム v]\nset [タイム v] to [0]\nset [ステージ v] to [1]\nswitch costume to (コスチューム5 v)\nclear graphic effects\nset size to (100) %\nwait (0.01) seconds\npoint in direction (90)\ngo to [front v] layer\nset [x v] to [0]\nset [y v] to [0]\nclear graphic effects\ngo to x: (-225) y: (-80)\nshow\nforever\n    set rotation style [left-right v]\n    if <<<key (a v) pressed?> or <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 <<<key (d v) pressed?> or <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 <<(ステージ) = [11]> and <<touching color (#00ff15)?> or <touching color (#e68700)?>>> then\n        set [x v] to ((x) * (0.92))\n    else\n        set [x v] to ((x) * (0.88))\n    end\n    change x by (x)\n    if <<touching color (#00ff15)?> or <touching color (#e68700)?>> then\n        change y by (1)\n        if <<touching color (#00ff15)?> or <touching color (#e68700)?>> then\n            change y by (1)\n            if <<touching color (#00ff15)?> or <touching color (#e68700)?>> then\n                change y by (1)\n                if <<touching color (#00ff15)?> or <touching color (#e68700)?>> then\n                    change y by (1)\n                    if <<touching color (#00ff15)?> or <touching color (#e68700)?>> then\n                        change y by (1)\n                        if <<touching color (#00ff15)?> or <touching color (#e68700)?>> then\n                            change y by (1)\n                            if <<touching color (#00ff15)?> or <touching color (#e68700)?>> then\n                                change x by ((0) - (x))\n                                change y by (-5)\n                                if <<<key (w v) pressed?> or <key (up arrow v) pressed?>> or <<[0] < (mouse y)> and <mouse down?>>> then\n                                    broadcast (メッセージ1 v)\n                                    if <[0] < (x)> then\n                                        set [x v] to [-3]\n                                    else\n                                        set [x v] to [3]\n                                    end\n                                    set [y v] to [8]\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    if <<(costume [number v]) = [8]> or <(costume [number v]) = [9]>> then\n        change [y v] by (-0.2)\n    else\n        change [y v] by (-1)\n    end\n    change y by (y)\n    if <<touching color (#00ff15)?> or <touching color (#e68700)?>> then\n        change y by ((0) - (y))\n        set [y v] to [0]\n    end\n    change y by (-2)\n    if <<<<<key (w v) pressed?> or <key (up arrow v) pressed?>> or <<[0] < (mouse y)> and <mouse down?>>> and <<touching color (#00ff15)?> or <touching color (#e68700)?>>> and <not <key (down arrow v) pressed?>>> then\n        if <<(costume [number v]) = [9]> or <(costume [number v]) = [10]>> then\n            change [y v] by (2)\n        else\n            start sound [Jump v]\n            set [y v] to [13]\n        end\n    end\n    change y by (1)\n    if <<<<(y position) < [-175]> or <(y position) > [177]>> or <<touching color (#ff0000)?> or <touching color (#b30000)?>>> or <key (space v) pressed?>> then\n        start sound [ニュッ3 v]\n        repeat (20)\n            change [ghost v] effect by (5)\n            change [brightness v] effect by (5)\n            set rotation style [all around v]\n            turn right (15) degrees\n        end\n        hide\n        clear graphic effects\n        go to x: (-225) y: (-80)\n        set [x v] to [0]\n        set [y v] to [0]\n        point in direction (90)\n        show\n    end\n    if <<[230] < (x position)> and <not <(ステージ) = [9]>>> then\n        hide\n        clear graphic effects\n        go to x: (-225) y: (-80)\n        set [x v] to [0]\n        set [y v] to [0]\n        change [ステージ v] by (1)\n        show\n    end\n    if <(ステージ) = [6]> then\n        if <(タイム) < (☁ 世界最高)> then\n            set [☁ 世界最高 v] to (タイム)\n        end\n    end\nend\n\nwhen flag clicked\nforever\n    if <<<key (left arrow v) pressed?> or <key (right arrow v) pressed?>> and <not <<<key (w v) pressed?> or <key (up arrow v) pressed?>> or <<[0] < (mouse y)> and <mouse down?>>>>> then\n        wait (0.1) seconds\n        switch costume to (コスチューム5 v)\n        wait (0.1) seconds\n        switch costume to (コスチューム6 v)\n    end\nend\n\nwhen flag clicked\nforever\n    if <<<<key (w v) pressed?> or <key (up arrow v) pressed?>> or <<[0] < (mouse y)> and <mouse down?>>> and <not <key (down arrow v) pressed?>>> then\n        broadcast (2 v)\n        wait (0.1) seconds\n        switch costume to (コスチューム19 v)\n        wait (0.1) seconds\n        switch costume to (コスチューム7 v)\n    end\nend\n\nwhen flag clicked\nforever\n    if <not <key (any v) pressed?>> then\n        switch costume to (コスチューム3 v)\n    end\nend\n\nwhen flag clicked\nrepeat until <(ステージ) = [9]>\n    wait (1) seconds\n    change [タイム v] by (1)\nend\n\nwhen flag clicked\nforever\n    if <<<<<<key (w v) pressed?> or <key (up arrow v) pressed?>> or <<[0] < (mouse y)> and <mouse down?>>> and <<touching color (#00ff15)?> or <touching color (#e68700)?>>> and <not <key (down arrow v) pressed?>>> and <<key (left arrow v) pressed?> or <key (right arrow v) pressed?>>> then\n        wait (0.1) seconds\n        switch costume to (コスチューム19 v)\n        wait (0.1) seconds\n        switch costume to (コスチューム7 v)\n    end\nend\n\nwhen I receive [メッセージ1 v]\nwait (0.1) seconds\nswitch costume to (コスチューム5 v)\nwait (0.1) seconds\nswitch costume to (コスチューム6 v)\n\nwhen I receive [2 v]\nif <<(costume [number v]) = [8]> or <(costume [number v]) = [9]>> then\n    start sound [Jump2 v]\nend\n\n
※カービィは自分の書いたものではないです。((こんなにうまく書けません()\n日本語は下\n～～～～～～～～～～～～～～～～～～～～～～～～\nThis time I tried to make Kirby a character! Picture, please operate with the XD arrow keys that are too good. You can hover by pressing and holding the upper key. Sometimes when you hit the ground with hovering, it blows up XD (it is a specification)\nTry your best! Then click on the flag!\n～～～～～～～～～～～～～～～～～～～～～～～～\n今回はカービィをキャラにしてみました！絵、上手すぎるww矢印キーで操作してください。上キー長押しするとホバリングできます。たまにホバリングで地面に当たると上に吹っ飛んでいきますw(それでﾀﾋんだ方ごめんなさい)壁にめり込むのもw((仕様です\n頑張ってみてください！それでは旗をクリック！