cave Platformer

Instructions: 日本語は下\nUsage\nMove with left and right arrow keys\nJump with the up arrow key\nThis time it's a platformer and you can't see the surroundings\n\n使い方\n左、右向き矢印キーで移動、\n上向き矢印キーでジャンプできます。\n今回のPlatformerは周囲が見えないです。

@Stage\n\nwhen I receive [let's go v]\nforever\n    if <(stage) = [2]> then\n        set volume to (100) %\n        repeat (50)\n            change volume by (-2)\n        end\n        stop [this script v]\n    end\nend\n\nwhen I receive [let's go v]\nforever\n    if <(stage) = [3]> then\n        wait (2) seconds\n        stop [other scripts in sprite v]\n        wait (0) seconds\n        stop all sounds\n        set volume to (100) %\n        forever\n            play sound [cave v] until done\n        end\n    end\nend\n\nwhen I receive [let's go v]\nset volume to (100) %\nforever\n    play sound [夏 v] until done\nend\n\nwhen I receive [let's go v]\nforever\n    if <(stage) = [2]> then\n        set volume to (100) %\n        repeat (50)\n            change volume by (-2)\n        end\n        stop [this script v]\n    end\nend\n\nwhen I receive [タピオカ食べたい（？） v]\nset volume to (100) %\nrepeat (50)\n    change volume by (-2)\nend\nstop [this script v]\n\nwhen I receive [タピオカ食べたい（？） v]\nset volume to (100) %\nforever\n    if <(stage) = [13]> then\n        wait (2) seconds\n        stop [other scripts in sprite v]\n        wait (0) seconds\n        stop all sounds\n        set volume to (100) %\n        forever\n            play sound [夏 v] until done\n        end\n    end\nend\n\n@Player\n\nwhen I receive [let's go v]\nset [stage v] to [1]\npoint in direction (90)\nshow\n初期位置\nforever\n    if <<<key (right arrow v) pressed?> or <key (d v) pressed?>> or <<(mouse x) > [60]> and <mouse down?>>> then\n        point in direction (90)\n        change [x v] by (1.75)\n    end\n    if <<<key (left arrow v) pressed?> or <key (a v) pressed?>> or <<(mouse x) < [-60]> and <mouse down?>>> then\n        point in direction (-90)\n        change [x v] by (-1.75)\n    end\n    set [x v] to ((X) * (0.8))\n    change x by (X)\n    if <touching (stage v)?> then\n        change y by (1)\n        if <touching (stage v)?> then\n            change y by (1)\n            if <touching (stage v)?> then\n                change y by (1)\n                if <touching (stage v)?> then\n                    change y by (1)\n                    if <touching (stage v)?> then\n                        change y by (1)\n                        if <touching (stage 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 v] by (-1)\n    change y by (Y)\n    if <touching (stage v)?> then\n        change y by ((Y) * (-1))\n        set [y v] to [0]\n    end\n    change y by (-5)\n    if <<touching (stage v)?> and <<<key (up arrow v) pressed?> or <key (w v) pressed?>> or <<(mouse y) > [60]> and <mouse down?>>>> then\n        switch costume to (立つ v)\n        set [y v] to [13]\n        start sound [ジャンプ2 v]\n    end\n    change y by (5)\n    if <<<touching (障害物 v)?> or <touching (マグマ v)?>> or <<<(stage) = [9]> or <<(stage) = [11]> or <<(stage) = [12]> or <(stage) = [13]>>>> and <(y position) < [-163]>>> then\n        wait (0.05) seconds\n        start sound [Rip v]\n        初期位置\n    end\n    if <not <(stage) = [ゴールのステージの番号]>> then\n        if <<<not <<(stage) = [9]> or <<(stage) = [11]> or <<(stage) = [12]> or <(stage) = [13]>>>>> and <(y position) < [-163]>> or <<<<<(stage) = [6]> or <(stage) = [7]>> and <(x position) < [-230]>> or <<<(stage) = [8]> or <<(stage) = [10]> or <<(stage) = [11]> or <(stage) = [12]>>>> and <[180] < (y position)>>> or <<<(stage) = [9]> or <(stage) = [13]>> and <(x position) > [230]>>>> then\n            set [next v] to [1]\n            broadcast (NEXT v)\n            hide\n            wait (1) seconds\n            change [stage v] by (1)\n            初期位置\n            show\n            switch costume to (立つ2 v)\n            wait until <(NEXT) = [0]>\n            switch costume to (立つ v)\n        end\n    end\n    if <touching (バネ強 v)?> then\n        set [y v] to [23]\n        start sound [Whiz v]\n    end\n    if <<touching (バネ弱 v)?> or <touching (バネ弱2 v)?>> then\n        set [y v] to [15]\n        start sound [Whiz v]\n    end\n    create clone of (_myself_ v)\nend\n\nwhen I start as a clone\nset [ghost v] effect to (0)\nshow\nrepeat (6)\n    change size by (-4)\n    change [ghost v] effect by (8)\nend\ndelete this clone\n\ndefine 初期位置\nswitch costume to (立つ v)\nset size to (100) %\nif <<(stage) = [1]> or <<(stage) = [13]> or <(stage) = [14]>>> then\n    go to x: (-200) y: (-30)\nend\nif <(stage) = [13]> then\n    go to x: (-200) y: (-60)\nend\nif <<(stage) = [2]> or <(stage) = [3]>> then\n    go to x: (0) y: (150)\nend\nif <<(stage) = [4]> or <(stage) = [6]>> then\n    go to x: (160) y: (150)\nend\nif <(stage) = [5]> then\n    go to x: (-185) y: (150)\nend\nif <<(stage) = [7]> or <(stage) = [8]>> then\n    go to x: (200) y: (-30)\nend\nif <<(stage) = [9]> or <(stage) = [５０]>> then\n    go to x: (-180) y: (-20)\nend\nif <(stage) = [10]> then\n    go to x: (-205) y: (70)\nend\nif <<(stage) = [11]> or <(stage) = [12]>> then\n    go to x: (130) y: (-60)\nend\nset rotation style [left-right v]\nset [x v] to [0]\nset [y v] to [0]\nshow\n\nwhen flag clicked\nhide\n\nwhen I receive [autro v]\nstop [other scripts in sprite v]\nhide\n\nif <<<key (up arrow v) pressed?> or <key (w v) pressed?>> or <<(mouse y) > [60]> and <mouse down?>>> then\n    switch costume to (立つ v)\n    start sound [壁キック v]\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 [10]\nelse\n    set [x v] to [0]\nend\n\n@stage\n\nwhen flag clicked\nhide\n\nwhen I receive [let's go v]\ngo to x: (0) y: (0)\nshow\nforever\n    switch costume to (stage)\nend\n\nwhen I receive [let's go v]\nwait (0) seconds\nforever\n    if <(stage) = [12]> then\n        broadcast (タピオカ食べたい（？） v)\n        stop [this script v]\n    end\nend\n\n@飾達\n\nwhen flag clicked\nhide\n\nwhen I receive [let's go v]\ngo to [back v] layer\nshow\nforever\n    switch costume to (stage)\nend\n\n@NEXT\n\nwhen I receive [next v]\nstart sound [High Whoosh v]\nset [next v] to [1]\nset size to (100) %\nset [brightness v] effect to (-50)\nコスチューム [半透明1]\nclear graphic effects\nwait (0.05) seconds\nコスチューム [半透明1]\nwait (0.08) seconds\nコスチューム [1]\nwait (0.5) seconds\nコスチューム [半透明2]\nコスチューム [半透明3]\nwait (0.15) seconds\nコスチューム [2]\nコスチューム [3]\nコスチューム [NEXT]\nwait (2) seconds\nset [next v] to [0]\n\ndefine コスチューム (内容)\nswitch costume to (内容)\ncreate clone of (_myself_ v)\n\nwhen I start as a clone\ngo to [front v] layer\nshow\nif <(costume [name v]) = [1]> then\n    go to x: (0) y: (0)\n    set size to (100) %\n    repeat (15)\n        switch costume to ( v)\n        change size by (((size) - (75)) * (0.8))\n        switch costume to (1 v)\n    end\n    wait (1) seconds\n    delete this clone\nend\nif < (costume [name v]) contains [2]?> then\n    go to x: (0) y: (-300)\n    repeat (45)\n        set y to ((y position) / (1.25))\n    end\n    repeat (10)\n        change [ghost v] effect by (10)\n    end\n    delete this clone\nend\nif < (costume [name v]) contains [3]?> then\n    go to x: (0) y: (300)\n    repeat (45)\n        set y to ((y position) / (1.25))\n    end\n    repeat (10)\n        change [ghost v] effect by (10)\n    end\n    delete this clone\nend\nif <(costume [name v]) = [NEXT]> then\n    wait (1.4) seconds\n    repeat (10)\n        change [ghost v] effect by (10)\n    end\n    delete this clone\nend\nif <(costume [name v]) = [半透明1]> then\n    go to x: (0) y: (0)\n    set size to (100) %\n    repeat (15)\n        switch costume to ( v)\n        change size by (((size) - (75)) * (0.8))\n        switch costume to (半透明1 v)\n    end\n    wait (1) seconds\n    delete this clone\nend\n\nwhen flag clicked\nset [next v] to [0]\nhide\n\nwhen I receive [next v]\ndelete this clone\n\n@samune\n\nwhen flag clicked\nwait (0.5) seconds\nbroadcast (Let's go v)\ngo to [front v] layer\nswitch costume to (サムネ（仮） v)\ngo to x: (0) y: (0)\nset [ghost v] effect to (100)\nshow\nforever\n    go to [front v] layer\nend\n\n@黒\n\nwhen I receive [let's go v]\nhide\nwait (0) seconds\ngo to [front v] layer\nforever\n    if <[1] < (stage)> then\n        show\n        go to (player v)\n        if <(stage) > [12]> then\n            hide\n        end\n    end\nend\n\n@荷物\n\nwhen I receive [let's go v]\nwait (0) seconds\nshow\nswitch costume to (1 v)\nforever\n    go to (player v)\n    if <([direction v] of [player v]) = [90]> then\n        switch costume to (1 v)\n    else\n        switch costume to (2 v)\n    end\n    if <(NEXT) = [1]> then\n        hide\n    else\n        show\n    end\nend\n\n@荷物2\n\nwhen I receive [let's go v]\nwait (0) seconds\nswitch costume to (1 v)\nforever\n    go to (player v)\n    if <([direction v] of [player v]) = [90]> then\n        switch costume to (1 v)\n    else\n        switch costume to (2 v)\n    end\n    if <(NEXT) = [1]> then\n        hide\n    else\n        show\n    end\nend\n\n@障害物\n\nwhen I receive [let's go v]\nshow\ngo to x: (0) y: (0)\nforever\n    switch costume to (stage)\nend\n\n@マグマ\n\nwhen flag clicked\nhide\n\nwhen I receive [let's go v]\nset [上下 v] to [0]\nforever\n    change [上下 v] by (7)\n    change y by ([sin v] of (上下) )\nend\n\nwhen I receive [let's go v]\nhide\ngo to x: (0) y: (-10)\nforever\n    switch costume to (マグマ v)\n    if <(stage) = [6]> then\n        show\n    else\n        if <(stage) = [8]> then\n            show\n        else\n            if <(stage) = [9]> then\n                switch costume to (マグマ2 v)\n                show\n            else\n                hide\n            end\n        end\n    end\nend\n\nif <not <(stage) = [6]>> then\n    hide\nend\n\n@バネ強\n\nwhen I receive [let's go v]\nforever\n    if <touching (player v)?> then\n        switch costume to (1 v)\n        repeat (4)\n            next costume\n            wait (0) seconds\n        end\n        repeat (4)\n            switch costume to ((costume [name v]) - (1))\n            wait (0) seconds\n        end\n    end\nend\n\nwhen flag clicked\nset size to (110) %\nhide\n\nwhen I receive [let's go v]\nhide\nforever\n    if <<(stage) = [10]> or <(stage) = [12]>> then\n        show\n        if <(stage) = [10]> then\n            go to x: (180) y: (-87)\n        end\n        if <(stage) = [12]> then\n            go to x: (-140) y: (-88)\n        end\n    else\n        hide\n    end\nend\n\n@バネ弱\n\nwhen I receive [let's go v]\nforever\n    if <touching (player v)?> then\n        switch costume to (1 v)\n        repeat (4)\n            next costume\n            wait (0) seconds\n        end\n        repeat (4)\n            switch costume to ((costume [name v]) - (1))\n            wait (0) seconds\n        end\n    end\nend\n\nwhen flag clicked\nset size to (110) %\nhide\n\nwhen I receive [let's go v]\nhide\nforever\n    if <(stage) = [11]> then\n        show\n        if <(stage) = [11]> then\n            go to x: (-168) y: (-87)\n        end\n    else\n        hide\n    end\nend\n\n@バネ弱2\n\nwhen I receive [let's go v]\nforever\n    if <touching (player v)?> then\n        switch costume to (1 v)\n        repeat (4)\n            next costume\n            wait (0) seconds\n        end\n        repeat (4)\n            switch costume to ((costume [name v]) - (1))\n            wait (0) seconds\n        end\n    end\nend\n\nwhen flag clicked\nset size to (110) %\nhide\n\nwhen I receive [let's go v]\nhide\nforever\n    if <(stage) = [11]> then\n        show\n        if <(stage) = [11]> then\n            go to x: (182) y: (47)\n        end\n    else\n        hide\n    end\nend\n\n@結果発表の主\n\nwhen I start as a clone\nset [ghost v] effect to (100)\nshow\nrepeat (10)\n    change [ghost v] effect by (10)\nend\nclear graphic effects\n\nwhen I receive [let's go v]\nwait (0) seconds\nforever\n    if <(stage) = [14]> then\n        broadcast (結果発表だドン！（？） v)\n        stop [this script v]\n    end\nend\n\nwhen I receive [let's go v]\nwait (0) seconds\nset [結果発表 v] to [0]\nforever\n    wait (1) seconds\n    change [結果発表 v] by (1)\nend\n\nwhen I receive [結果発表だドン！（？） v]\nwait (0) seconds\nstop [other scripts in sprite v]\nset size to (85) %\nif <(length of (結果発表)) = [2]> then\n    switch costume to (join [数字] (letter (1) of (結果発表)))\n    go to x: (5) y: (0)\n    create clone of (_myself_ v)\n    switch costume to (join [数字] (letter (2) of (結果発表)))\n    go to x: (28) y: (0)\n    create clone of (_myself_ v)\nend\nif <(length of (結果発表)) = [3]> then\n    switch costume to (join [数字] (letter (1) of (結果発表)))\n    go to x: (5) y: (0)\n    create clone of (_myself_ v)\n    switch costume to (join [数字] (letter (2) of (結果発表)))\n    go to x: (28) y: (0)\n    create clone of (_myself_ v)\n    switch costume to (join [数字] (letter (3) of (結果発表)))\n    go to x: (51) y: (0)\n    create clone of (_myself_ v)\nend\nif <(length of (結果発表)) = [4]> then\n    switch costume to (join [数字] (letter (1) of (結果発表)))\nend\n\nwhen flag clicked\nhide\n\nwhen I receive [autro v]\nstop [other scripts in sprite v]\nhide\ndelete this clone\n\n