firstposts！platformer - 祝!初投稿プラットフォーマー！

Instructions: 初投稿傾向3Pありがとう！！もっと上がってくれ！\n矢印キーで操作\nモバ対応してません。（ごめんなさい）\nどんどんリミックス＆コメントしてね。（荒らしは✕）\n⭐と❤押してくれた人は、コメントしてくれれば返信できます（できないときもある）

@Stage\n\n@黒豆\n\nwhen flag clicked\nwait (3) seconds\nswitch backdrop to (背景1 v)\nswitch backdrop to (背景1 v)\nforever\n    if <(x position) = [50]> then\n        next backdrop\n    end\nend\n\nwhen flag clicked\nhide\nwait (0) seconds\nwait until <(ゲームスタート) = [1]>\nwait (3) seconds\nshow\nswitch costume to (主人公\(いつもの姿\) v)\ngo to x: (-220) y: (-50)\nset rotation style [left-right v]\npoint in direction (90)\nset [変数 v] to [0]\nset [ｘｖ v] to [0]\nset [ｙｖ v] to [0]\nforever\n    if <<key (left arrow v) pressed?> or <key (a v) pressed?>> then\n        change [ｘｖ v] by (-1)\n        point in direction (-90)\n    end\n    if <<key (right arrow v) pressed?> or <key (d v) pressed?>> then\n        change [ｘｖ v] by (1)\n        point in direction (90)\n    end\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 y by (1)\n                            if <touching (地面 v)?> then\n                                change y by (1)\n                                if <touching (地面 v)?> then\n                                    change x by ((ｘｖ) * (-1))\n                                    change y by (-7)\n                                    if <<key (up arrow v) pressed?> or <key (w v) pressed?>> then\n                                        if <[0] < (ｘｖ)> then\n                                            set [ｘｖ v] to [-10]\n                                        else\n                                            set [ｘｖ v] to [10]\n                                        end\n                                        set [ｙｖ v] to [15]\n                                    else\n                                        set [ｘｖ v] to [0]\n                                    end\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\n    change y by (-1)\n    if <touching (地面 v)?> then\n        if <<key (up arrow v) pressed?> or <key (w v) pressed?>> then\n            set [ｙｖ v] to [15]\n        end\n    end\n    change y by (1)\n    change [ｙｖ v] by (-1)\n    change y by (ｙｖ)\n    if <touching (地面 v)?> then\n        change y by ((ｙｖ) * (-1))\n        set [ｙｖ v] to [0]\n    end\n    if <(x position) > [230]> then\n        hide\n        go to x: (-220) y: (-50)\n        broadcast (NEXT v)\n        broadcast (とげよ変われっ‼ v)\n        wait (4) seconds\n        show\n    end\n    if <touching (針 v)?> then\n        go to x: (-220) y: (-50)\n        set [ｙｖ v] to [0]\n        set [ｘｖ v] to [0]\n    end\n    if <touching (バネ v)?> then\n        set [ｙｖ v] to [22]\n    end\n    if <[-180] > (y position)> then\n        go to x: (-220) y: (-40)\n        set [ｙｖ v] to [0]\n        set [ｘｖ v] to [0]\n    end\n    set [ｘｖ v] to ((ｘｖ) * (0.89))\n    change x by (ｘｖ)\n    if <touching (水 v)?> then\n        if <(ｙｖ) < [1]> then\n            change [ｙｖ v] by (0.5)\n        end\n    end\nend\n\nwhen I start as a clone\nset size to (110) %\nrepeat (10)\n    set [brightness v] effect to (-100)\n    change [ghost v] effect by (10)\n    change size by (-6)\n    switch costume to (主人公\(いつもの姿\) v)\nend\ndelete this clone\n\nwhen flag clicked\nset [ゲームスタート v] to [0]\nwait until <(ゲームスタート) = [1]>\nwait (0.5) seconds\nforever\n    play sound [RetroVision \[NCS____ Release\] v] until done\nend\n\nwhen I receive [ゲームスタート v]\nset [ゲームスタート v] to [1]\n\nwhen flag clicked\nswitch costume to (主人公\(いつもの姿\) v)\nshow\nforever\n    if <[17] < (backdrop [number v])> then\n        set size to (100) %\n        switch costume to (洞窟探検モード v)\n    end\n    if <[23] < (backdrop [number v])> then\n        set size to (110) %\n        switch costume to (主人公a v)\n        if <[28] < (backdrop [number v])> then\n            switch costume to (主人公\(いつもの姿\) v)\n            set size to (100) %\n        end\n    end\n    if <[33] < (backdrop [number v])> then\n        switch costume to (主人公\(いつもの姿\) v)\n        set size to (110) %\n    end\n    if <[38] < (backdrop [number v])> then\n        switch costume to (シュノーケルモード v)\n        set size to (100) %\n    end\n    if <[43] < (backdrop [number v])> then\n        switch costume to (主人公\(いつもの姿\) v)\n        set size to (100) %\n    end\n    if <[46] < (backdrop [number v])> then\n        switch costume to (主人公\(登山の姿\) v)\n        set size to (100) %\n    end\nend\n\nwhen flag clicked\nforever\n    if <touching (水 v)?> then\n        change x by (-2)\n    end\nend\n\n@地面\n\nwhen flag clicked\nwait (3) seconds\nshow\nswitch costume to (コスチューム10 v)\n\nwhen I receive [next v]\nnext costume\n\nwhen flag clicked\nwait (3) seconds\nswitch backdrop to (背景1 v)\nswitch backdrop to (背景1 v)\nforever\n    if <(x position) = [50]> then\n        next backdrop\n    end\nend\n\n@NEXT\n\ndefine NEXTのクローン作成\nswitch costume to (コスチューム1 v)\ncreate clone of (_myself_ v)\nswitch costume to (コスチューム2 v)\ncreate clone of (_myself_ v)\nswitch costume to (コスチューム3 v)\ncreate clone of (_myself_ v)\n\ndefine 幕を (明るさ) の明るさでクローンを作る\nswitch costume to (コスチューム2 v)\nset [brightness v] effect to (明るさ)\ncreate clone of (_myself_ v)\nswitch costume to (コスチューム3 v)\nset [brightness v] effect to (明るさ)\ncreate clone of (_myself_ v)\n\nwhen I receive [next v]\nset [next終了 v] to [0]\nset [みんな集まった？ v] to [0]\ngo to [front v] layer\nstart sound [文字表示の衝撃音2 v]\nNEXTのクローン作成\n幕を [-100] の明るさでクローンを作る\nwait (0.1) seconds\n幕を [-50] の明るさでクローンを作る\nwait (0.1) seconds\n幕を [-30] の明るさでクローンを作る\nwait (0.1) seconds\n幕を [0] の明るさでクローンを作る\n\nwhen I start as a clone\ngo to [front v] layer\nif <(costume [number v]) = [2]> then\n    show\n    clear graphic effects\n    go to [front v] layer\n    go [backward v] (1) layers\n    go to x: (228) y: (0)\n    repeat until <(x position) < [1]>\n        change x by (((0) - (x position)) / (7))\n    end\n    wait until <(みんな集まった？) = [1]>\n    change x by (1)\n    repeat until <[224] < (x position)>\n        change x by ((x position) / (7))\n    end\n    delete this clone\nend\nif <(costume [number v]) = [3]> then\n    show\n    go to [front v] layer\n    go [backward v] (1) layers\n    go to x: (-228) y: (0)\n    repeat until <[-1] < (x position)>\n        change x by (((0) - (x position)) / (7))\n    end\n    start sound [文字表示の衝撃音1 v]\n    wait until <(みんな集まった？) = [1]>\n    change x by (-1)\n    repeat until <(x position) < [-225]>\n        change x by ((x position) / (7))\n    end\n    delete this clone\nend\nif <(costume [number v]) = [1]> then\n    wait (0.5) seconds\n    go to [front v] layer\n    show\n    go to x: (0) y: (-381)\n    repeat until <[-1] < (y position)>\n        change y by (((0) - (y position)) / (5))\n    end\n    broadcast (みんな集まったよ v)\n    broadcast (隠す v)\n    change y by (1)\n    repeat until <[250] < (y position)>\n        change y by ((y position) / (5))\n    end\n    set [next終了 v] to [1]\n    delete this clone\nend\n\nwhen I receive [みんな集まったよ v]\nset [みんな集まった？ v] to [1]\n\nwhen I start as a clone\nif <(costume [number v]) = [1]> then\n    repeat (100)\n        go to [front v] layer\n        go [backward v] (1) layers\n    end\nend\n\n@たいよー\n\nwhen flag clicked\ngo to [back v] layer\nset size to (100) %\nforever\n    repeat until <[110] < (size)>\n        change size by (1)\n    end\n    repeat until <(size) < [99]>\n        change size by (-1)\n    end\nend\n\nwhen flag clicked\nhide variable [最高記録 v]\nswitch backdrop to (背景1 v)\nwait until <(ゲームスタート) = [1]>\nwait (3) seconds\nforever\n    go to [back v] layer\n    if <(backdrop [number v]) = [51]> then\n        show variable [タイム v]\n        show variable [最高記録 v]\n        if <(最高記録) > (タイム)> then\n            set [最高記録 v] to (タイム)\n        end\n    else\n        wait (1) seconds\n    end\nend\n\nwhen I receive [next v]\nnext backdrop\n\nwhen flag clicked\nshow\nforever\n    if <[17] < (backdrop [number v])> then\n        hide\n    end\n    if <[23] < (backdrop [number v])> then\n        show\n    end\n    if <[37] < (backdrop [number v])> then\n        hide\n    end\n    if <[42] < (backdrop [number v])> then\n        show\n    end\nend\n\n@サムネイル？\n\nwhen flag clicked\nwait (0) seconds\nwait until <(ゲームスタート) = [1]>\nhide variable [タイム v]\ngo to [front v] layer\nshow\nwait (3) seconds\nhide\nforever\n    reset timer\nend\n\nwhen [timer v] > (0)\nshow\nhide variable [☁ タイム v]\nhide variable [☁ 最高記録 v]\n\n@針\n\nwhen flag clicked\nswitch costume to (最初 v)\ngo to x: (0) y: (5)\nshow\nforever\n    if <(costume [number v]) = [16]> then\n        turn right (-5) degrees\n    else\n        point in direction (90)\n    end\nend\n\nwhen I receive [next v]\nnext costume\n\n@バネ\n\nwhen flag clicked\nhide\nforever\n    if <(backdrop [number v]) = [8]> then\n        show\n    end\n    if <(backdrop [number v]) = [9]> then\n        hide\n    end\nend\n\n@スプライト1\n\nwhen flag clicked\nswitch costume to (コスチューム1 v)\nhide\nforever\n    if <(backdrop [number v]) = [11]> then\n        show\n        if <touching (黒豆 v)?> then\n            switch costume to (コスチューム2 v)\n        else\n            switch costume to (コスチューム1 v)\n        end\n    else\n        hide\n    end\nend\n\n@スプライト2\n\nwhen flag clicked\nwait (0) seconds\ngo to [front v] layer\nhide\nforever\n    go to (黒豆 v)\n    if <(backdrop [number v]) = [18]> then\n        show\n    end\n    if <(backdrop [number v]) = [23]> then\n        hide\n    end\nend\n\n@水\n\nwhen flag clicked\nhide\nrepeat until <(backdrop [number v]) = [38]>\n    switch costume to (コスチューム1 v)\nend\nshow\nrepeat until <(backdrop [number v]) = [39]>\n    switch costume to (コスチューム1 v)\nend\nswitch costume to (コスチューム2 v)\nforever\n    if <(backdrop [number v]) > [39]> then\n        show\n        go to [front v] layer\n    else\n        hide\n    end\n    if <(backdrop [number v]) > [43]> then\n        hide\n    else\n        show\n        go to [front v] layer\n    end\nend\n\n@草\n\nwhen flag clicked\nswitch costume to (コスチューム1 v)\ngo to [front v] layer\nhide\nrepeat until <(backdrop [number v]) > [50]>\n    if <(backdrop [number v]) > [46]> then\n        show\n    end\nend\nhide\n\nwhen I receive [next v]\nif <<(backdrop [number v]) > [46]> and <(backdrop [number v]) < [51]>> then\n    next costume\nend\n\n@小岩\n\n@パラシュート\n\n@小道具作成所\n\nwhen flag clicked\nset [ゲームスタート v] to [1]\n\n@字幕\n\nwhen flag clicked\nwait until <(ゲームスタート) = [1]>\nswitch costume to (コスチューム1 v)\ngo to x: (0) y: (0)\nforever\n    go to [front v] layer\n    go [backward v] (4) layers\nend\n\nwhen I receive [next v]\nnext costume\n\n@新作サムネ\n\nwhen [timer v] > (0)\n\nshow\n\nwhen flag clicked\nforever\n    hide\n    reset timer\nend\n\n