プラットフォーマー(Platformer)

Instructions: ❤＆⭐\n日本語はしたです。 \n~English~ ~Method of operation~ It can also be operated with the arrow key wasd key tap. 〜Project Description〜 This game is a no-scroll platformer. ~日本語~ 〜操作方法〜 矢印キーwasdキータップでも操作可能です。 〜プロジェクト説明〜 このゲームは、スクロールなしのプラットフォーマーです。

@Stage\n\nwhen flag clicked\nforever\n    play sound [Inferno \(1\) v] until done\nend\n\n@プレイヤー\n\nwhen I receive [スタート v]\ngo to [front v] layer\nhide\nhide variable [x v]\nhide variable [y v]\nshow\npoint in direction (90)\nswitch costume to (右 v)\nset rotation style [left-right v]\ngo to x: (-200) y: (2)\npoint in direction (90)\nset [x v] to [0]\nset [y v] to [0]\nforever\n    create clone of (_myself_ v)\n    if <<key (d v) pressed?> or <<key (right arrow v) pressed?> or <<[0] < (mouse x)> and <mouse down?>>>> then\n        switch costume to (右 v)\n        point in direction (90)\n        change [x v] by (0.7)\n    end\n    if <<key (a v) pressed?> or <<key (left arrow v) pressed?> or <<(mouse x) < [0]> and <mouse down?>>>> then\n        point in direction (-90)\n        change [x v] by (-0.7)\n    end\n    set [x v] to ((x) * (0.9))\n    change x by (x)\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)\n                        if <touching (地面 v)?> then\n                            change x by ((x) * (-1))\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                                if <(x) < [0]> then\n                                    start sound [ジャンプ v]\n                                    set [x v] to [10]\n                                else\n                                    start sound [ジャンプ v]\n                                    set [x v] to [-10]\n                                end\n                                set [y v] to [15]\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 <<key (up arrow v) pressed?> or <<[0] < (mouse y)> and <mouse down?>>>> then\n        if <touching (地面 v)?> then\n            start sound [ジャンプ v]\n            set [y v] to [13.5]\n        end\n    end\n    change y by (1)\n    change [y v] by (-1)\n    change y by (y)\n    if <touching (地面 v)?> then\n        change y by ((y) * (-1))\n        set [y v] to [0]\n    end\n    if <(x position) > [219]> then\n        set size to (100) %\n        go to x: (-200) y: (2)\n        broadcast (Next v)\n    end\n    if <<touching (針 v)?> or <[-185] > (y position)>> then\n        set [x v] to [0]\n        set [y v] to [0]\n        repeat (20)\n            change [ghost v] effect by (5)\n        end\n        point in direction (90)\n        set [ghost v] effect to (0)\n        go to x: (-180) y: (2)\n        if <([costume # v] of [地面 v]) = [7]> then\n            go to x: (-194) y: (111)\n        end\n    end\n    if <<<key (s v) pressed?> or <key (down arrow v) pressed?>> or <<(y position) < [0]> and <mouse down?>>> then\n        switch costume to (player \(3\)2 v)\n    else\n        switch costume to (player \(3\) v)\n    end\nend\n\nwhen I start as a clone\nrepeat (30)\n    change size by (-10)\n    change [ghost v] effect by (25)\nend\ndelete this clone\n\nwhen flag clicked\nbroadcast (スタート v)\n\nset size to (70) %\n\nwhen I receive [next v]\nrepeat (87)\n    go to x: (-200) y: (-26)\n    set [y v] to [0]\n    set [x v] to [0]\n    if <([costume # v] of [地面 v]) = [7]> then\n        go to x: (-194) y: (111)\n    end\nend\n\n@地面\n\nwhen flag clicked\nswitch costume to (コスチューム1 v)\n\nwhen I receive [next v]\nnext costume\n\n@Next!\n\nwhen I receive [next v]\nset [color v] effect to (pick random (-250) to (250))\nhide\nstart sound [High Whoosh v]\nclone [1]\nwait (0.05) seconds\nclone [2]\nwait (0.05) seconds\nclone [3]\nwait (0.05) seconds\nclone [4]\nwait (0.05) seconds\nclone [5]\n\ndefine clone (cloneid)\nswitch costume to (cloneid)\ncreate clone of (_myself_ v)\n\nwhen I start as a clone\ngo to [front v] layer\nshow\nif <<(costume [number v]) = [1]> or <<(costume [number v]) = [2]> or <<(costume [number v]) = [3]> or <<(costume [number v]) = [4]> or <(costume [number v]) = [5]>>>>> then\n    go to x: (468) y: (0)\n    repeat until <(round (x position)) = [0]>\n        change x by (((0) - (x position)) / (7))\n    end\nend\n\nwhen I start as a clone\nif <(costume [number v]) = [1]> then\n    wait (2.2) seconds\n    repeat until <[465] < (x position)>\n        change x by ((1) + ((x position) / (4)))\n    end\n    delete this clone\nend\nif <(costume [number v]) = [2]> then\n    wait (2.1) seconds\n    repeat until <[465] < (x position)>\n        change x by ((1) + ((x position) / (4)))\n    end\n    delete this clone\nend\nif <(costume [number v]) = [3]> then\n    wait (2) seconds\n    repeat until <[465] < (x position)>\n        change x by ((1) + ((x position) / (4)))\n    end\n    delete this clone\nend\nif <(costume [number v]) = [4]> then\n    wait (1.9) seconds\n    repeat until <[465] < (x position)>\n        change x by ((1) + ((x position) / (4)))\n    end\n    delete this clone\nend\nif <(costume [number v]) = [5]> then\n    wait (1.8) seconds\n    repeat until <[330] < (x position)>\n        change x by ((1) + ((x position) / (4)))\n    end\n    delete this clone\nend\n\n@針\n\nwhen flag clicked\ngo to [back v] layer\nforever\n    switch costume to ([costume # v] of [地面 v])\nend\n\n@青と赤 イラスト バーチャル はがき Flipgrid背景 (3600 × 2500 px)\n\nwhen flag clicked\nhide\nforever\n    reset timer\nend\n\nwhen [timer v] > (0.01)\ngo to [front v] layer\nshow\n\n@スプライト1\n\n