【ｶｸｻﾝｷﾎﾞｳ!】火山のplatformer！

Instructions: 元傾向5p！？\n拡散してくださった優しい方々\n@pokoi-taisa様\n@123SCRATCH1234567U様\n@siayuosiayuo様\n\n【操作方法！】\n↑または上をタップ　ジャンプ\n→または右をタップ　右に移動\n←または左をタップ　左に移動\n【説明】\n火山のプラットフォーマーです！\nちょっと難しいと思います！\n当たり判定おかしいです！(例えばトゲに触れてるのにやられなかったり)\n効果音少ないです！\n世界記録とタイムがあります！\nモバイル対応です！\nskipすると世界記録は更新されません！\n※skipを連打するとおかしくなります！ご注意！\n\n【Method of operation! ]\n↑ or tap above to jump\n→ or tap right move right\nTap ← or left Move left\n【explanation】\nIt's a volcano platformer!\nI think it's a little difficult!\nThe hit judgment is strange! (For example, touching a thorn but not being hit)\nThere are few sound effects!\nWe have world records and times!\nMobile compatible!\nIf you skip, the world record will not be updated!\n*If you hit skip repeatedly, things will go wrong! please note!\n\n\n\n\n\n\n【タグ】\n#all  #game  #games  #English  #mobile

@Stage\n\n@スプライト1(消される恐怖がすごいらしい)\n\n@主人公\n\nwhen flag clicked\nshow\nswitch costume to (player v)\ngo to x: (-204) y: (-64)\npoint in direction (90)\nset size to (60) %\nforever\n    if <(待機) = [0]> then\n        if <<key (left arrow v) pressed?> or <<mouse down?> and <(mouse x) < [0]>>> then\n            change [x座標 v] by (-1)\n            if <(X座標) < [-9]> then\n                set [x座標 v] to [-10]\n            end\n            change x by (X座標)\n            if <(進めない2) = [1]> then\n                change x by ((X座標) * (-1))\n            end\n        end\n        ブロック名\n        if <<key (right arrow v) pressed?> or <<mouse down?> and <[0] < (mouse x)>>> then\n            change [x座標 v] by (1)\n            if <[9] < (X座標)> then\n                set [x座標 v] to [10]\n            end\n            change x by (X座標)\n            if <(進めない) = [1]> then\n                change x by ((X座標) * (-1))\n            end\n        end\n        if <[239] < (x position)> then\n            hide\n            go to x: (-204) y: (-64)\n            set [待機 v] to [1]\n            broadcast (Next v) and wait\n            change [ステージ数 v] by (1)\n            リスポーン\n        end\n    end\nend\n\ndefine ブロック名\nif <not <<<key (right arrow v) pressed?> or <key (left arrow v) pressed?>> or <mouse down?>>> then\n    set [x座標 v] to [0]\nend\n\ndefine 落ちるぅぅぅ\nif <not <touching (ステージ v)?>> then\n    change y by (-6)\n    if <<<touching color (#ff7777)?> or <touching color (#ff4242)?>> and <(待機) = [0]>> then\n        broadcast (トゲに触れた v)\n    end\nend\nif <touching (ステージ v)?> then\n    set [着地 v] to [1]\n    repeat until <<not <touching (ステージ v)?>> or <<(進めない) = [1]> or <(進めない2) = [1]>>>\n        change y by (6)\n        if <<<touching color (#ff7777)?> or <touching color (#ff4242)?>> and <(待機) = [0]>> then\n            broadcast (トゲに触れた v)\n        end\n    end\nend\n\nwhen flag clicked\nset [待機 v] to [0]\nforever\n    if <(待機) = [0]> then\n        落ちるぅぅぅ\n        if <<key (up arrow v) pressed?> or <<mouse down?> and <[0] < (mouse y)>>> then\n            if <(着地) = [1]> then\n                set [着地 v] to [0]\n                set [y座標 v] to [20]\n                change y by (y座標)\n                repeat (10)\n                    change [y座標 v] by (-2)\n                    change y by (y座標)\n                end\n            end\n        end\n    end\nend\n\ndefine リスポーン\nwait (0.25) seconds\nshow\nstart sound [Chirp v]\nswitch costume to (player v)\nset rotation style [all around v]\npoint in direction (180)\ngo to x: (-204) y: (-64)\nset size to (10) %\nset [ghost v] effect to (80)\nrepeat (10)\n    turn right (27) degrees\n    change [ghost v] effect by (-8)\n    change size by (5)\nend\nwait (0.1) seconds\nset [待機 v] to [0]\n\nwhen I receive [トゲに触れた v]\nset [待機 v] to [1]\nstart sound [Tambura v]\nswitch costume to (player2 v)\nrepeat (10)\n    change [ghost v] effect by (10)\n    change y by (5)\nend\nリスポーン\n\nwhen flag clicked\nhide variable [☁ world record v]\nhide variable [time v]\nset [time v] to [0]\nrepeat until <(ステージ数) = [11]>\n    wait (0.1) seconds\n    change [time v] by (0.1)\nend\nif <<(Time) < (☁ World record)> and <(skip) = [0]>> then\n    set [☁ world record v] to (Time)\nend\nshow variable [☁ world record v]\nshow variable [time v]\n\nwhen I receive [skip v]\nchange [ステージ数 v] by (1)\nリスポーン\n\nwhen I receive [next v]\nhide\n\n@ステージ\n\nwhen flag clicked\nswitch costume to (コスチューム1 v)\ngo to x: (0) y: (0)\n\nwhen I receive [変更 v]\nnext costume\n\n@地面の当たり判定\n\nwhen flag clicked\nset [進めない v] to [0]\nforever\n    go to (主人公 v)\n    if <color (#010000) is touching (#a36b41)?> then\n        set [進めない v] to [1]\n    else\n        set [進めない v] to [0]\n    end\n    if <color (#212121) is touching (#a36b41)?> then\n        set [進めない2 v] to [1]\n    else\n        set [進めない2 v] to [0]\n    end\nend\n\n@動くやつ\n\nwhen flag clicked\nhide\n\nwhen I start as a clone\nswitch costume to (コスチューム2 v)\ngo to [front v] layer\ngo to x: (0) y: (261)\nset [y1 v] to [-10]\nrepeat (12)\n    change [y1 v] by (-2)\n    change y by (Y1)\nend\nrepeat (6)\n    wait (0.05) seconds\n    change y by (-3)\n    turn right (30) degrees\n    change size by (10)\nend\nrepeat (6)\n    wait (0.05) seconds\n    change y by (3)\n    turn right (30) degrees\n    change size by (-10)\nend\nwait (0.2) seconds\nset [y1 v] to [-10]\nrepeat (12)\n    change [y1 v] by (-2)\n    change y by (Y1)\nend\nset [漢字 v] to [1]\ndelete this clone\n\nwhen I receive [next v]\nstart sound [Coin v]\ngo to [front v] layer\nshow\nswitch costume to (コスチューム1 v)\ngo to x: (-1238) y: (0)\nset [x1 v] to [10]\nrepeat (30)\n    change [x1 v] by (2)\n    change x by (X1)\nend\nwait (0.2) seconds\nbroadcast (変更 v)\nset [漢字 v] to [0]\ncreate clone of (_myself_ v)\nwait until <[1] = (漢字)>\nset [x1 v] to [10]\nrepeat (30)\n    change [x1 v] by (2)\n    change x by (X1)\nend\nhide\nwait (1.5) seconds\n\n@当たり判定\n\nwhen flag clicked\nforever\n    go to (主人公 v)\n    change y by (-8)\n    change x by (3)\n    if <<touching color (#ff7777)?> or <touching color (#ff4242)?>> then\n        broadcast (トゲに触れた v)\n    end\nend\n\n@サムネ!\n\nwhen flag clicked\ngo to x: (0) y: (0)\ngo to [front v] layer\nhide\n\n@ハート星探知機\n\nwhen I start as a clone\nshow\nset [ghost v] effect to (100)\nif <(costume [number v]) = [1]> then\n    forever\n        if <touching (mouse-pointer v)?> then\n            set [ハート v] to [1]\n            start sound [決定ボタンを押す v]\n            stop [this script v]\n        end\n    end\nend\nif <(costume [number v]) = [2]> then\n    forever\n        if <touching (mouse-pointer v)?> then\n            set [星 v] to [1]\n            start sound [決定ボタンを押す v]\n            stop [this script v]\n        end\n    end\nend\nif <(costume [number v]) = [3]> then\n    clear graphic effects\n    go to x: (60) y: (208)\n    glide (0.8) secs to x: (60) y: (120)\n    wait (0.8) seconds\n    glide (0.8) secs to x: (60) y: (208)\n    delete this clone\nend\n\nwhen flag clicked\nhide\nset [ハート v] to [0]\nset [星 v] to [0]\ngo to x: (0) y: (0)\nswitch costume to (ハート v)\ncreate clone of (_myself_ v)\nswitch costume to (星 v)\ncreate clone of (_myself_ v)\nforever\n    if <((ハート) + (星)) = [2]> then\n        switch costume to (コスチューム3 v)\n        create clone of (_myself_ v)\n        stop [this script v]\n    end\nend\n\n@☆と♡要求\n\nwhen flag clicked\nhide\nforever\n    set [id v] to [マウス]\n    create clone of (_myself_ v)\n    set [id v] to [コスチューム]\n    create clone of (_myself_ v)\n    wait (40) seconds\nend\n\nwhen I start as a clone\nshow\nif <(ID) = [コスチューム]> then\n    go to [front v] layer\n    go [backward v] (1) layers\n    switch costume to (コスチューム1 v)\n    go to x: (144) y: (100000)\n    glide (1) secs to x: (144) y: (132)\n    switch costume to (コスチューム2 v)\n    wait (1) seconds\n    switch costume to (コスチューム3 v)\n    glide (0.9) secs to x: (144) y: (210)\n    delete this clone\nend\nif <(ID) = [マウス]> then\n    go to [front v] layer\n    switch costume to (マウス v)\n    go to x: (144) y: (1000000)\n    滑らか： [126] [105] [7]\n    滑らか： [196] [116] [7]\n    滑らか： [220] [180] [5]\n    delete this clone\nend\n\ndefine 滑らか： (x) (y) (スピード)\nrepeat until <<(round (x position)) = (x)> and <(round (y position)) = (y)>>\n    change x by (((x) - (x position)) / (スピード))\n    change y by (((y) - (y position)) / (スピード))\nend\n\n@Skip\n\nwhen flag clicked\ngo to x: (-188) y: (-147)\nset [ステージ数 v] to [1]\nset [skip v] to [0]\nshow\nforever\n    if <(ステージ数) = [11]> then\n        hide\n    end\nend\n\nwhen this sprite clicked\nif <(待機) = [0]> then\n    set [待機 v] to [1]\n    set [skip v] to [1]\n    broadcast (Next v) and wait\n    broadcast (skip v)\nend\n\n