とげとげプラットフォーマー　～Spike platformer～

Instructions: 日本語は下。\n\n〈English〉\nWelcome to my platformer!\nClick on the player and it will change color.\nMove with the arrow keys.\nIf you hit a thorn, you will have to start over from the beginning of the stage.\n\n〈日本語〉\nkisanakaのプラットフォーマーへようこそ！\nプラフォ君をクリックすると、色が変わります。\n矢印キーで操作します。\nとげに触れるとそのステージの最初からやり直しになります。

@Stage\n\nwhen flag clicked\nhide variable [x v]\nhide variable [y v]\nhide variable [ステージ v]\nforever\n    play sound [MEDIUM-037_T132B05A08_Yuoq6vh8aXQ v] until done\nend\n\n@プレイヤー\n\nwhen flag clicked\nswitch costume to (コスチューム1 v)\nset [ステージ v] to [1]\n初期位置\nforever\n    if <key (right arrow v) pressed?> then\n        change [x v] by (1.75)\n        point in direction (90)\n    end\n    if <key (left arrow v) pressed?> then\n        change [x v] by (-1.75)\n        point in direction (-90)\n    end\n    set [x v] to ((x) * (0.8))\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 (up arrow v) pressed?> then\n                                if <(x) > [0]> then\n                                    set [x v] to [-15]\n                                else\n                                    set [x v] to [15]\n                                end\n                                set [y v] to [14.5]\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 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    change y by (-1)\n    if <<touching (ステージ v)?> and <key (up arrow v) pressed?>> then\n        start sound [ニュッ2 v]\n        change [y v] by (16)\n    end\n    change y by (1)\n    if <<<touching (とげ・マグマ v)?> or <(y position) < [-175]>> or <touching (スプライト1 v)?>> then\n        start sound [キャンセル5 v]\n        wait (0.05) seconds\n        初期位置\n    end\n    if <not <(ステージ) = [11]>> then\n        if <(x position) > [200]> then\n            start sound [成功音 v]\n            change [ステージ v] by (1)\n            wait (0.05) seconds\n            初期位置\n            broadcast (メッセージ1 v) and wait\n        end\n    end\nend\n\ndefine 初期位置\nset size to (100) %\ngo to x: (-207) y: (-81)\nset rotation style [left-right v]\nset [x v] to [0]\nset [y v] to [0]\nshow\n\nwhen this sprite clicked\nnext costume\nbroadcast (メッセージ2 v)\nstart sound [カーソル移動11 v]\n\n@ステージ\n\nwhen flag clicked\nswitch costume to (ステージ1 v)\ngo to x: (0) y: (0)\nset size to (100) %\nforever\n    switch costume to (ステージ)\nend\n\n@とげ・マグマ\n\nwhen flag clicked\ngo to x: (0) y: (0)\nshow\ngo to [back v] layer\nforever\n    switch costume to (ステージ)\nend\n\n@NEXT\n\nwhen I receive [メッセージ1 v]\nset [next v] to [1]\ngo to [front v] layer\nshow\nrepeat until <(x position) < [.1]>\n    change x by (((x position) / (3)) * (-1))\nend\nrepeat until <(x position) < [-464]>\n    change x by (((([abs v] of (x position) ) + (1)) / (3)) * (-1))\nend\nset [next v] to [0]\nhide\ngo to x: (465) y: (0)\n\nwhen flag clicked\ngo to x: (465) y: (0)\nswitch costume to (コスチューム1 v)\nhide\n\nwhen I receive [メッセージ2 v]\nnext costume\n\n@サムネ\n\nwhen flag clicked\nset [ghost v] effect to (100)\n\n@スプライト1\n\nwhen flag clicked\nhide\ngo to x: (-1) y: (0)\nforever\n    repeat until <(ステージ) = [8]>\n        if <(ステージ) = [7]> then\n            go to x: (-1) y: (0)\n            show\n            repeat until <(y position) = [160]>\n                change y by (10)\n            end\n            wait (1) seconds\n            repeat until <(y position) = [0]>\n                change y by (-10)\n            end\n            wait (1) seconds\n        end\n        hide\n    end\nend\n\n