Snow  Platformer

Instructions: 借りた人\njinkungamesさん\nYY-Hさん\nryy_dayoさん\n111111noさん

@Stage\n\nwhen flag clicked\nforever\n    play sound [プラフォの音\(多分\) v] until done\nend\n\nwhen flag clicked\nswitch backdrop to (blue sky 2 2 v)\n\n@スプライト1\n\nwhen [timer v] > (タイマー)\ngo to [front v] layer\nset size to (100) %\nshow\nif <(costume [number v]) = [1]> then\n    go to x: (-40) y: (0)\n    set [brightness v] effect to (100)\n    set [縦 v] to [35]\n    set [横 v] to [20]\n    repeat (10)\n        change [brightness v] effect by (-10)\n        change size by (((130) - (size)) / (5))\n        set [縦 v] to (((縦) * (0.75)) + (((0) - (x position)) / (8.5)))\n        set [横 v] to (((横) * (0.75)) + (((0) - (y position)) / (7)))\n        change x by (縦)\n        change y by (横)\n    end\n    repeat (20)\n        change size by (((100) - (size)) / (5))\n        set [縦 v] to (((縦) * (0.75)) + (((0) - (x position)) / (8.5)))\n        set [横 v] to (((横) * (0.75)) + (((0) - (y position)) / (5)))\n        change x by (縦)\n        change y by (横)\n    end\n    go to x: (0) y: (0)\n    set size to (100) %\nend\n\nwhen I receive [タイムアウト v]\ngo to x: (0) y: (0)\nswitch costume to (タイムアウト v)\nstop [all v]\n\nwhen [timer v] > (タイマー)\nif <not <(♡&☆) = [11]>> then\n    broadcast (♡&☆ v)\nend\n\nwhen flag clicked\nforever\n    set [タイマー v] to (timer)\nend\n\nwhen flag clicked\nhide\nswitch costume to (サムネ v)\n\nwhen flag clicked\nset size to (100) %\n\n@地面\n\nwhen I receive [メッセージ1 v]\nnext costume\n\nwhen flag clicked\ngo to x: (-5) y: (0)\nswitch costume to (1 v)\n\nwhen I receive [ｈ v]\n\n@プレイヤー\n\nwhen I start as a clone\nrepeat (9)\n    change [ghost v] effect by (7)\n    change size by (-5.2)\nend\ndelete this clone\n\nwhen flag clicked\nforever\n    if <touching color (#ff2929)?> then\n        broadcast (A v)\n    end\nend\n\nwhen I receive [a v]\nstart sound [やられる v]\nhide\nrepeat until <<([abs v] of ((スクロールy) - (YY)) ) < [3]> and <([abs v] of ((スクロール x) - (XX)) ) < [3]>>\n    change [スクロール x v] by (round (((XX) - (スクロール x)) / (5)))\n    change [スクロールy v] by (round (((YY) - (スクロールy)) / (5)))\nend\nset [x v] to [0]\nset [y v] to [0]\ngo to x: (-220) y: (0)\nshow\n\nwhen flag clicked\nset size to (100) %\n\nwhen flag clicked\nforever\n    if <touching color (#b70000)?> then\n        broadcast (A v)\n    end\nend\n\nwhen flag clicked\nforever\n    if <touching (_edge_ v)?> then\n        broadcast (ｆ v)\n    end\nend\n\nwhen flag clicked\nset [ユーザー名 v] to (username)\n\nwhen flag clicked\nclear graphic effects\nset size to (65) %\nwait (0.01) seconds\nset rotation style [left-right v]\npoint in direction (90)\ngo to [front v] layer\nset [x v] to [0]\nset [y v] to [0]\nset [ステージ v] to [1]\nclear graphic effects\ngo to x: (-200) y: (0)\nshow\nforever\n    if <<<key (a v) pressed?> or <key (left arrow v) pressed?>> or <<(mouse x) < (x position)> and <mouse down?>>> then\n        change [x v] by (-1)\n        point in direction (-90)\n    end\n    if <<<key (d v) pressed?> or <key (right arrow v) pressed?>> or <<(x position) < (mouse x)> and <mouse down?>>> then\n        change [x v] by (1)\n        point in direction (90)\n    end\n    if <<<(x position) > (mouse x)> and <mouse down?>> or <key (left arrow v) pressed?>> then\n        create clone of (_myself_ v)\n        change [xのやつ v] by (-1)\n        point in direction (-90)\n    end\n    if <<<(mouse x) > (x position)> and <mouse down?>> or <key (right arrow v) pressed?>> then\n        create clone of (_myself_ v)\n        change [xのやつ v] by (1)\n        point in direction (90)\n    end\n    set [x v] to ((x) * (0.92))\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 x by ((0) - (x))\n                                change y by (-5)\n                                if <<<key (w v) pressed?> or <key (up arrow v) pressed?>> or <<[0] < (mouse y)> and <mouse down?>>> then\n                                    if <[0] < (x)> then\n                                        set [x v] to [-10]\n                                    else\n                                        set [x v] to [10]\n                                    end\n                                    set [y v] to [15]\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    change [y v] by (-1)\n    change y by (y)\n    if <touching (地面 v)?> then\n        change y by ((0) - (y))\n        set [y v] to [0]\n    end\n    change y by (-2)\n    if <<<<key (w v) pressed?> or <key (up arrow v) pressed?>> or <<[0] < (mouse y)> and <mouse down?>>> and <touching (地面 v)?>> then\n        start sound [jump-cute1 v]\n        set [y v] to [15]\n    end\n    change y by (1)\n    if <<<<<<(y position) < [-165]> or <touching (マグマ v)?>> or <touching (マグマ2 v)?>> or <touching (マグマ3 v)?>> or <touching (マグマ4 v)?>> or <touching (マグマ5 v)?>> then\n        start sound [やられる v]\n        repeat (15)\n            change [ghost v] effect by (5)\n            change [brightness v] effect by (5)\n        end\n        hide\n        clear graphic effects\n        go to x: (-200) y: (0)\n        set [x v] to [0]\n        set [y v] to [0]\n        show\n    end\n    if <[239] < (x position)> then\n        if <not <(ステージ) = [20]>> then\n            broadcast (メッセージ1 v)\n            hide\n            clear graphic effects\n            go to x: (-200) y: (0)\n            set [x v] to [0]\n            set [y v] to [0]\n            change [ステージ v] by (1)\n            show\n        end\n    end\nend\n\nwhen flag clicked\nforever\n    if <touching (ばね v)?> then\n        start sound [jump-anime1 v]\n        set [y v] to [22.5]\n    end\nend\n\nwhen flag clicked\nforever\n    reset timer\n    if <<<key (down arrow v) pressed?> or <key (s v) pressed?>> or <<mouse down?> and <(mouse y) < [0]>>> then\n        switch costume to (コスチューム1 v)\n    else\n        switch costume to (コスチューム2 v)\n    end\nend\n\nwhen [timer v] > (0)\nhide\n\nwhen flag clicked\nforever\n    if <touching color (#66f4ff)?> then\n        broadcast (A v)\n    end\nend\n\nwhen flag clicked\nforever\n    if <touching color (#00eeff)?> then\n        broadcast (A v)\n    end\nend\n\nwhen flag clicked\nset size to (80) %\n\n@トゲ\n\nwhen I receive [メッセージ1 v]\nnext costume\n\nwhen flag clicked\nswitch costume to (コスチューム2 v)\n\nwhen flag clicked\ngo to x: (35) y: (35)\n\n@NEXTだお\n\nwhen I start as a clone\nif <<(costume [name v]) = [1]> or <<(costume [name v]) = [2]> or <<(costume [name v]) = [3]> or <(costume [name v]) = [next]>>>> then\n    set [brightness v] effect to (0)\n    go to [front v] layer\n    set x to (-465)\n    set y to (0)\n    show\n    repeat until <(round (x position)) = [0]>\n        change x by (((0) - (x position)) / (4))\n    end\n    wait (0.9) seconds\n    delete this clone\nend\nif <<(costume [name v]) = [4]> or <<(costume [name v]) = [5]> or <(costume [name v]) = [6]>>> then\n    go to [front v] layer\n    change [color v] effect by (10)\n    set x to (0)\n    set y to (345)\n    show\n    repeat until <(round (y position)) = [0]>\n        change y by (((0) - (y position)) / (4))\n    end\nend\nif <<(costume [name v]) = [☆]> or <<(costume [name v]) = [♡]> or <(costume [name v]) = [👤]>>> then\n    set [color v] effect to (0)\n    go to [front v] layer\n    set x to (0)\n    set y to (345)\n    show\n    repeat until <(round (y position)) = [0]>\n        change y by (((0) - (y position)) / (4))\n    end\nend\nif <(costume [name v]) = [4]> then\n    wait (0.3) seconds\n    repeat until <[464] < (x position)>\n        change x by ((1) + ((x position) / (3)))\n    end\n    delete this clone\nend\nif <(costume [name v]) = [5]> then\n    wait (0.2) seconds\n    repeat until <[464] < (x position)>\n        change x by ((1) + ((x position) / (3)))\n    end\n    delete this clone\nend\nif <(costume [name v]) = [6]> then\n    wait (0.1) seconds\n    repeat until <[464] < (x position)>\n        change x by ((1) + ((x position) / (3)))\n    end\n    delete this clone\nend\nif <(costume [name v]) = [♡]> then\n    wait (0.2) seconds\n    repeat until <[319] < (x position)>\n        change x by ((1) + ((x position) / (3)))\n    end\n    delete this clone\nend\nif <(costume [name v]) = [👤]> then\n    wait (0.125) seconds\n    repeat until <[360] < (x position)>\n        change x by ((1) + ((x position) / (3)))\n    end\n    delete this clone\nend\nif <(costume [name v]) = [☆]> then\n    wait (0.2) seconds\n    repeat until <[185] < (x position)>\n        change x by ((1) + ((x position) / (3)))\n    end\n    delete this clone\nend\nbroadcast (ｊｊｊｊｊｊｊｊｊｊｊｊｊｊｊｊｊｊｊｊｊｊｊ v)\n\ndefine クローン (名前)\nswitch costume to (名前)\ncreate clone of (_myself_ v)\n\nwhen I receive [メッセージ1 v]\nhide\nstart sound [High Whoosh v]\nクローン [1]\nwait (0.15) seconds\nクローン [2]\nwait (0.15) seconds\nクローン [3]\nwait (0.15) seconds\nクローン [next]\nwait (0.45) seconds\nクローン [5]\nwait (0.15) seconds\nクローン [6]\nstart sound [Finger Snap v]\nwait (0.15) seconds\nクローン [7]\nクローン [☆]\nクローン [♡]\nクローン [👤]\nchange [color v] effect by (15)\n\nwhen flag clicked\nset [color v] effect to (pick random (-200) to (200))\n\n@スプライト3\n\nwhen flag clicked\nhide\nforever\n    wait (pick random (0.2) to (0.7)) seconds\n    create clone of (_myself_ v)\nend\n\nwhen I start as a clone\nset size to (30) %\ngo to x: (pick random (224) to (-224)) y: (173)\nset [ghost v] effect to (15)\nshow\nforever\n    change y by (-5)\n    change [ghost v] effect by (1)\nend\n\nwhen flag clicked\nset [確率 v] to [0]\nforever\n    set [確率 v] to (pick random (1) to (4))\nend\n\nwhen I start as a clone\nif <<(確率) = [1]> or <(確率) = [3]>> then\n    set size to (30) %\n    go to [back v] layer\nend\nif <<(確率) = [2]> or <(確率) = [4]>> then\n    set size to (40) %\n    go to [front v] layer\nend\n\nwhen flag clicked\ngo to [back v] layer\n\nwhen flag clicked\nbroadcast (start v)\n\nwhen I receive [ｊｊｊｊｊｊｊｊｊｊｊｊｊｊｊｊｊｊｊｊｊｊｊ v]\nhide\nwait (4) seconds\nshow\n\n