SUMMER PLATFORMER!/夏のプラットフォーマー！

Instructions: Please do not comment on irrelevant matters. Do not advertise. If you do this, we may close the comment section.\nEnglish is below↓\n傾向1Pを取り返せ！！！！\n@5-2kaitoのプラットフォーマー第二作！\n今回は、夏のプラットフォーマーです。\n(((季節ずれてて草\n操作方法\n矢印キー、WASDキー、進みたい方向にタップで操作。\nしゃがむときは、下矢印キーなどで。\nWelcome to my platformer!\nSummer Platformer.\nHow to operate\nMove with the arrow keys, WASD keys, or tap the direction you want to go.\nEnjoy!\n

@Stage\n\nwhen flag clicked\nforever\n    play sound [Nebula v] until done\nend\n\nwhen flag clicked\nhide variable [ゴールしたか v]\nset [ゴールしたか v] to [0]\nforever\n    if <(ゴールしたか) = [0]> then\n        set [タイマー（仮） v] to (timer)\n    end\n    if <(ゴールしたか) = [1]> then\n        set [タイマー v] to ((タイマー（仮）) - (無駄な時間))\n    end\nend\n\nwhen flag clicked\nreset timer\nhide variable [タイマー v]\n\n@プラフォ君\n\nwhen flag clicked\nset [ステージ v] to [1]\n初期位置\nforever\n    if <(NEXT) = [0]> then\n        if <<key (right arrow v) pressed?> or <<key (d v) pressed?> or <<mouse down?> and <(x position) < (mouse x)>>>> then\n            create clone of (_myself_ v)\n            change [x v] by (1.75)\n            point in direction (90)\n        end\n        if <<key (left arrow v) pressed?> or <<key (a v) pressed?> or <<mouse down?> and <(mouse x) < (x position)>>>> then\n            create clone of (_myself_ v)\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 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 (-7)\n                                        if <<key (up arrow v) pressed?> or <<key (w v) pressed?> or <<mouse down?> and <(y position) < (mouse y)>>>> 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            end\n        end\n    end\n    if <not <touching (水 v)?>> then\n        change [y v] by (-1)\n    end\n    if <touching (水 v)?> then\n        change [y v] by (-0.05)\n    end\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 <not <touching (水 v)?>> then\n        change y by (-1)\n        if <<touching (ステージ v)?> and <<key (up arrow v) pressed?> or <<key (w v) pressed?> or <<mouse down?> and <(y position) < (mouse y)>>>>> then\n            start sound [ジャンプ v]\n            create clone of (_myself_ v)\n            change [y v] by (15)\n        end\n        change y by (1)\n    end\n    if <touching (水 v)?> then\n        change y by (-1)\n        if <<key (up arrow v) pressed?> or <<key (w v) pressed?> or <<mouse down?> and <(y position) < (mouse y)>>>> then\n            create clone of (_myself_ v)\n            change [y v] by (0.05)\n        end\n        change y by (1)\n    end\n    if <<touching (とげ・マグマ v)?> or <(y position) < [-175]>> then\n        wait (0.05) seconds\n        初期位置\n    end\n    if <not <(ステージ) = [24]>> then\n        if <(x position) > [215]> then\n            change [ステージ v] by (1)\n            wait (0.05) seconds\n            初期位置\n            start sound [NEXT v]\n            broadcast (NEXT v)\n        end\n    else\n        set [ゴールしたか v] to [1]\n        broadcast (ゴールした v)\n    end\n    if <touching (バネ v)?> then\n        set [y v] to [20]\n        broadcast (バネ発動！ v)\n    end\n    if <<<key (down arrow v) pressed?> or <key (s v) pressed?>> or <<mouse down?> and <(y position) > (mouse y)>>> then\n        switch costume to (しゃがむ v)\n        if <<touching (とげ・マグマ v)?> or <(y position) < [-175]>> then\n            初期位置\n        end\n    else\n        switch costume to (普通 v)\n    end\nend\n\ndefine 初期位置\nswitch costume to (普通 v)\nset size to (65) %\nif <not <(ステージ) = [16]>> then\n    go to x: (-217) y: (60)\nelse\n    go to x: (-212) y: (35)\nend\nset rotation style [left-right v]\nset [x v] to [0]\nset [y v] to [0]\nshow\n\nwhen I start as a clone\nset [brightness v] effect to (-100)\nrepeat (9)\n    change [ghost v] effect by (7)\n    change size by (-5.2)\nend\ndelete this clone\n\nwhen [down arrow v] key pressed\nforever\n    if <<(y position) < [-165]> and <key (down arrow v) pressed?>> then\n        初期位置\n    end\nend\n\nwhen [down arrow v] key pressed\nforever\n    if <(y position) < [-180]> then\n        初期位置\n    end\nend\n\n@ステージ\n\nwhen flag clicked\nshow\nswitch costume to (コスチューム1 v)\ngo to x: (-2) y: (2)\nset size to (100) %\nforever\n    switch costume to (ステージ)\nend\n\n@とげ・マグマ\n\nwhen flag clicked\npoint in direction (90)\ngo to x: (0) y: (0)\nshow\n\nwhen flag clicked\nforever\n    switch costume to (ステージ)\nend\n\nwhen flag clicked\nforever\n    if <(ステージ) = [21]> then\n        turn right (5) degrees\n    else\n        point in direction (90)\n    end\nend\n\n@無駄なスプライト\n\n@バネ\n\nwhen flag clicked\ngo to x: (0) y: (0)\nset size to (200) %\nhide\n\nwhen I receive [バネ発動！ v]\nswitch costume to (1 v)\nwait (0) seconds\nswitch costume to (3 v)\nwait (0) seconds\nswitch costume to (4 v)\nwait (0) seconds\nswitch costume to (1 v)\n\nwhen flag clicked\nforever\n    if <<(ステージ) = [7]> or <(ステージ) = [6]>> then\n        if <(ステージ) = [6]> then\n            glide (0) secs to x: (-92) y: (-87)\n            show\n        end\n        if <(ステージ) = [7]> then\n            glide (0) secs to x: (-38) y: (-93)\n            show\n        end\n    else\n        hide\n    end\nend\n\n@解説\n\nwhen flag clicked\nshow\nforever\n    go to [front v] layer\nend\n\nwhen flag clicked\nforever\n    switch costume to (ステージ)\nend\n\nwhen flag clicked\nforever\n    if <(NEXT) = [1]> then\n        hide\n        wait until <(NEXT) = [0]>\n        show\n    end\nend\n\n@NEXT\n\nwhen I receive [next v]\nset [next v] to [1]\nshow\nglide (0.5) secs to x: (34) y: (25)\nchange [無駄な時間 v] by (0.5)\nwait (1) seconds\nchange [無駄な時間 v] by (1)\nglide (0.5) secs to x: (499) y: (28)\nchange [無駄な時間 v] by (0.5)\nset [next v] to [0]\nhide\n\nwhen flag clicked\nset [next v] to [0]\nhide\nglide (0) secs to x: (499) y: (28)\ngo to [front v] layer\n\nwhen flag clicked\nset [無駄な時間 v] to [0]\nhide variable [無駄な時間 v]\n\n@スコア表示\n\nwhen I start as a clone\nset [クローン番号 v] to (x position)\nshow\nforever\n    switch costume to (letter (クローン番号) of (タイマー))\n    set size to (大きさ) %\n    go to x: ((ｘ（タイマー用）) + (((クローン番号) - (1)) * ((size) * (0.25)))) y: (ｙ（タイマー用）)\nend\n\nwhen flag clicked\nset [ゴールしたか v] to [0]\nhide variable [大きさ v]\nhide variable [クローン番号 v]\nhide variable [ｘ（タイマー用） v]\nhide variable [ｙ（タイマー用） v]\nhide variable [クローン作ったか v]\nset [クローン作ったか v] to [0]\n\nwhen flag clicked\nwait until <(ゴールしたか) = [1]>\nset x to (0)\nrepeat (10)\n    change x by (1)\n    create clone of (_myself_ v)\nend\nshow\nset [クローン作ったか v] to [1]\n\n@スプライト1\n\nwhen flag clicked\nhide\n\n