platformer Minigame プラットフォーマーミニゲーム

Instructions: 日本語は下にあります! \n~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\n@takuno3 The first mini game !!\n\nAvoid the needles falling from the sky !!!\nThis player can also jump !!!\n\nUse jumps to keep avoiding for a long time! !! !!\n~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~\n@takuno3初のミニゲーム!!\n\n空から降ってくる針をよけろ!!!\nこのプレイヤーはジャンプもできるぞ!!!\n\nジャンプを使って長い時間よけ続けよう！！！

@Stage\n\n@プレイ\n\nwhen flag clicked\nbroadcast (ホーム v)\n\nwhen flag clicked\nforever\n    change [変数 v] by (7)\nend\n\nwhen I receive [ホーム v]\npoint in direction (90)\ngo to x: (0) y: (-190)\nset size to (100) %\nset [変数 v] to [0]\nhide\nwait (1) seconds\nshow\nrepeat (6)\n    change y by (([abs v] of (y position) ) / (4.8))\nend\nforever\n    turn right ([cos v] of (変数) ) degrees\n    if <touching (mouse-pointer v)?> then\n        change size by (((size) - (110)) / (-2))\n        if <mouse down?> then\n            start sound [決定 v]\n            broadcast (ゲームスタート v)\n            repeat (5)\n                change y by (([abs v] of (y position) ) / (-2))\n            end\n            hide\n        end\n    else\n        change size by (((size) - (95)) / (-2))\n    end\nend\n\n@タイトル\n\nwhen flag clicked\ngo to x: (0) y: (174)\nshow\nrepeat (10)\n    change y by (([abs v] of (y position) ) / (-10))\nend\n\nwhen I receive [ゲームスタート v]\nrepeat (10)\n    change y by (([abs v] of (y position) ) / (5))\nend\nhide\n\n@BGM\n\nwhen I receive [ホーム v]\nstart sound [ホーム v]\n\nwhen I receive [ゲームスタート v]\nstop all sounds\nwait (1) seconds\nstart sound [Nebula v]\n\n@player\n\nwhen flag clicked\nhide\ngo to x: (0) y: (-130)\nwait (1) seconds\npoint in direction (90)\nset size to (200) %\nshow\n\nwhen I receive [ゲームスタート v]\nshow\nset size to (100) %\nrepeat (10)\n    go to x: (0) y: (0)\n    set rotation style [left-right v]\nend\nforever\n    if <<key (right arrow v) pressed?> or <<mouse down?> and <(x position) < (mouse x)>>> then\n        point in direction (90)\n        change [x v] by (1)\n    end\n    if <<key (left arrow v) pressed?> or <<mouse down?> and <(mouse x) < (x position)>>> then\n        point in direction (-90)\n        change [x v] by (-1)\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                        end\n                    end\n                end\n            end\n        end\n    end\n    change y by (-1)\n    if <<key (up arrow v) pressed?> or <<mouse down?> and <(mouse y) > (y position)>>> then\n        if <touching (地面 v)?> then\n            set [y v] to [15]\n            start sound [ニュッ v]\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 <touching (トゲ v)?> then\n        broadcast (ゲームオーバー v)\n    end\nend\n\nwhen I receive [ゲームオーバー v]\nhide\n\nwhen flag clicked\nforever\n    switch costume to (コスチューム)\nend\n\n@地面\n\nwhen flag clicked\nshow\nswitch costume to (1 v)\n\nwhen I receive [ゲームスタート v]\nset [ﾀﾋんだ?? v] to [いいえ]\nswitch costume to (2 v)\n\nwhen I receive [ゲームオーバー v]\nset [ﾀﾋんだ?? v] to [はい]\nhide\n\n@トゲ\n\nwhen flag clicked\nhide\n\nwhen I receive [ゲームスタート v]\nhide\nwait (1) seconds\nset [score v] to [0]\nrepeat until <(ﾀﾋんだ??) = [はい]>\n    wait (pick random (0.7) to (0.5)) seconds\n    create clone of (_myself_ v)\nend\n\nwhen I start as a clone\nshow\ngo to [back v] layer\ngo to x: ([x position v] of [player v]) y: (153)\nset [ghost v] effect to (100)\nrepeat (10)\n    change [ghost v] effect by (-10)\nend\nrepeat until <(y position) < [-200]>\n    change y by (-12)\nend\nif <(ﾀﾋんだ??) = [いいえ]> then\n    change [score v] by (1)\nend\ndelete this clone\n\nwhen I receive [ゲームスタート v]\nif <(ﾀﾋんだ??) = [はい]> then\n    delete this clone\nend\n\n@結果\n\nwhen I receive [ゲームオーバー v]\nshow\ngo to [front v] layer\nshow variable [score v]\nset [ghost v] effect to (100)\ngo to x: (0) y: (0)\nif <[] < (score)> then\nend\nrepeat (34)\n    change [ghost v] effect by (-3)\nend\n\nwhen flag clicked\nhide variable [score v]\nset [ﾀﾋんだ?? v] to [いいえ]\nhide\n\n@コスチューム替え\n\nwhen flag clicked\nhide\nset [コスチューム v] to [1]\nwait (1) seconds\nshow\ngo to x: (64) y: (-134)\nswitch costume to (コスチューム1 v)\ncreate clone of (_myself_ v)\nforever\n    if <touching (mouse-pointer v)?> then\n        if <mouse down?> then\n            change [コスチューム v] by (1)\n            wait until <not <mouse down?>>\n        end\n    end\nend\n\nwhen I start as a clone\ngo to x: (-65) y: (-133)\nswitch costume to (コスチューム2 v)\nforever\n    if <touching (mouse-pointer v)?> then\n        if <mouse down?> then\n            change [コスチューム v] by (-1)\n            wait until <not <mouse down?>>\n        end\n    end\nend\n\nwhen I receive [ゲームスタート v]\nhide\n\nwhen I receive [ゲームスタート v]\ndelete this clone\n\n@スプライト1\n\nwhen flag clicked\nforever\n    show\n    go to x: (0) y: (0)\n    go to [front v] layer\n    set [ghost v] effect to (100)\nend\n\n@スプライト2\n\nwhen flag clicked\nhide\n\nwhen I receive [ゲームスタート v]\nshow\nset size to (100) %\nset [大きさ v] to [0]\nforever\n    change size by ([cos v] of (大きさ) )\nend\n\nwhen I receive [ゲームスタート v]\nforever\n    change [大きさ v] by (5)\nend\n\n