Online platformer[オンラインプラットフォーマー]  large grounnd

Instructions: @hayatiburusuのフォローよろしく\n❤️と⭐お願い！\nーーー日本語は下ーーーーMethod of operationーーーー\nBasic operation is wasd keys or arrow keys.\nIt is also mobile compatible.\nDon't be left alone with this game. Leave it for 2 minutes and it will kick you out.\nThis game is online. let's get along.\nーーーEnglish is aboveーーーー操作方法ーーーーーーー\n基本操作はwasdキーまたは矢印キーです。\nモバイルにも対応しています。\nこのゲームで放置しないでください。2分間放置すると追い出されます。\nこのゲームはオンラインです。仲良くしましょう。\nーーーーーーーーーーーーーーーーーーーーーーーーー\nチャットの種類今までの中で一番多いと思うたぶん\n傾向1pありがとう！\nーーーーーーーーーーーーーーーーーーーーーーーーー\n障害物がなくても10秒以内は不可能です。\n洞窟エリア激ムズだよ他の人と一緒に支え合ってクリアしよう！\nーーーーーーーーーーーーーーーーーーーーーーーーー\nネガティブなコメントとURLは除去します。あとこれは量産型ではなく毎週進化アプデをするオンラインプラットフォーマーと思っていただければ嬉しいです！要約：アプデ前のやつも残しておいてどれだけ作品が成長したか見てほしい。\nーーーーーーーーーーーーーーーーーーーーーーーーー\nアップグレード内容\n・水追加\n・コース延長\n・テクスチャ変更\nーーーーーーーーーーーーーーーーーーーーーーーーー

@Stage\n\nwhen I receive [start v]\n\nset [音楽 v] to [0]\nforever\n    set [音楽 v] to (pick random (1) to (4))\n    play sound (音楽) until done\nend\n\n@プレーヤー\n\nwhen flag clicked\nset [xx v] to [0]\nset [yy v] to [25]\nhide\n\ndefine prayer\npoint in direction (90)\nif <(！) = [0]> then\n    if <not <(username) = []>> then\n        if <(チャット) = []> then\n            say (username)\n        else\n            say (join (username) (join [:] (item (チャット) of [chat v])))\n        end\n    end\n    if <<<mouse down?> and <[50] < (mouse x)>> or <<key (right arrow v) pressed?> or <key (d v) pressed?>>> then\n        change [x v] by (xの動き)\n    end\n    if <<<not <<[130] < (mouse y)> and <(mouse x) < [-100]>>> and <<mouse down?> and <(mouse x) < [-50]>>> or <<key (left arrow v) pressed?> or <key (a v) pressed?>>> then\n        change [x v] by (() - (xの動き))\n    end\n    set [x v] to ((x) * (0.87))\n    change x by (round (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                        end\n                    end\n                end\n            end\n        end\n    end\n    if <touching (ステージ v)?> then\n        壁\n    end\n    change [y v] by (-1.5)\n    change y by (y)\n    if <touching (ステージ v)?> then\n        床\n    end\n    change [スクロールｘ v] by (round ((x position) / (10)))\n    change x by ((0) - ((round ((x position) / (10))) * <not <<(スクロールｘ) < [0]> or <[8300] < (スクロールｘ)>>>))\n    if <(スクロールｘ) < [0]> then\n        set [スクロールｘ v] to [0]\n    end\n    if <[8300] < (スクロールｘ)> then\n        set [スクロールｘ v] to [8300]\n    end\n    change [スクロールｙ v] by (round ((y position) / (10)))\n    change y by ((0) - ((round ((y position) / (10))) * <not <(スクロールｙ) < [0]>>))\n    if <(スクロールｙ) < [0]> then\n        set [スクロールｙ v] to [0]\n    end\n    if <(y) < [-21]> then\n        change [y v] by (1.5)\n    end\nend\nset y to (round (y position))\n\ndefine 初期化\nstart sound [Rip v]\nhide\nrepeat until <<([abs v] of ((スクロールｙ) - (YY)) ) < [3]> and <([abs v] of ((スクロールｘ) - (XX)) ) < [3]>>\n    change [スクロールｘ v] by (round (((XX) - (スクロールｘ)) / (5)))\n    change [スクロールｙ v] by (round (((YY) - (スクロールｙ)) / (5)))\nend\nset [x v] to [0]\nset [y v] to [0]\ngo to x: (0) y: (0)\nbroadcast (monster v)\nshow\n\ndefine 壁\nset [？ v] to [0]\nchange y by (-4.5)\nrepeat until <<[100] < (？)> or <not <touching (ステージ v)?>>>\n    change [？ v] by (1)\n    change x by ((-1) * ((x) / ([abs v] of (x) )))\nend\nif <[100] < (？)> then\n    repeat (？)\n        change x by ((1) * ((x) / ([abs v] of (x) )))\n    end\nelse\n    if <<<mouse down?> and <[0] < (mouse y)>> or <<key (up arrow v) pressed?> or <key (w v) pressed?>>> then\n        start sound [壁キック v]\n        set [y v] to [18]\n        set [x v] to ((-15) * ((x) / ([abs v] of (x) )))\n    else\n        set [x v] to [0]\n    end\nend\n\ndefine 床\nrepeat until <not <touching (ステージ v)?>>\n    change y by ((-1.5) * ((y) / ([abs v] of (y) )))\nend\nif <<(y) < [0]> and <<<not <<[130] < (mouse y)> and <(mouse x) < [-100]>>> and <<mouse down?> and <[0] < (mouse y)>>> or <<key (up arrow v) pressed?> or <key (w v) pressed?>>>> then\n    start sound [ニュッ2 v]\n    set [y v] to (yの動き)\nelse\n    set [y v] to [0]\nend\n\nwhen I receive [start v]\nset size to (42) %\nshow\nset [！ v] to [0]\nset [スクロールｘ v] to [0]\nset [スクロールｙ v] to [25]\ngo to x: (0) y: (0)\nset [x v] to [0]\nset [y v] to [0]\nforever\n    prayer\nend\n\nwhen I receive [start v]\nforever\n    switch costume to (コスチューム1 v)\n    if <not <<<mouse down?> and <[0] < (mouse y)>> or <<key (up arrow v) pressed?> or <key (w v) pressed?>>>> then\n        if <<<mouse down?> and <[50] < (mouse x)>> or <<key (right arrow v) pressed?> or <key (d v) pressed?>>> then\n            switch costume to (コスチューム2 v)\n        end\n        if <<<mouse down?> and <(mouse x) < [-50]>> or <<key (left arrow v) pressed?> or <key (a v) pressed?>>> then\n            switch costume to (コスチューム3 v)\n        end\n    else\n        if <not <<mouse down?> and <<[130] < (mouse y)> and <(mouse x) < [-100]>>>> then\n            switch costume to (コスチューム6 v)\n            if <<<mouse down?> and <[50] < (mouse x)>> or <<key (right arrow v) pressed?> or <key (d v) pressed?>>> then\n                switch costume to (コスチューム4 v)\n            end\n            if <<<mouse down?> and <(mouse x) < [-50]>> or <<key (left arrow v) pressed?> or <key (a v) pressed?>>> then\n                switch costume to (コスチューム5 v)\n            end\n        end\n    end\nend\n\nwhen I receive [start v]\nset [！ v] to [0]\nforever\n    if <<<(y position) < [-180]> or <touching (はり v)?>> or <touching (はり2 v)?>> then\n        set [！ v] to [1]\n        初期化\n        set [！ v] to [0]\n    end\nend\n\nwhen I receive [初期化 v]\nset [！ v] to [1]\n初期化\nset [！ v] to [0]\n\nwhen I receive [yes,i do! v]\nforever\n    if <touching (水 v)?> then\n        set [y v] to [-1]\n        if <<<mouse down?> and <(mouse x) < [-50]>> or <<key (left arrow v) pressed?> or <key (a v) pressed?>>> then\n            set [x v] to [-5]\n        end\n        if <<<mouse down?> and <[50] < (mouse x)>> or <<key (right arrow v) pressed?> or <key (d v) pressed?>>> then\n            set [x v] to [5]\n        end\n        if <<<mouse down?> and <[0] < (mouse y)>> or <<key (up arrow v) pressed?> or <key (w v) pressed?>>> then\n            set [y v] to [5]\n        end\n    end\nend\n\nwhen this sprite clicked\nchange [color v] effect by (10)\n\nwhen flag clicked\nset [color v] effect to (0)\n\n@プレーヤー２\n\nwhen I receive [オンライン！ v]\nhide\n配置\n\ndefine 配置\nset [prayer2 v] to [0]\nrepeat (10)\n    change [prayer2 v] by (1)\n    create clone of (_myself_ v)\nend\n\nwhen I start as a clone\nforever\n    set size to (42) %\n    show\n    set [ghost v] effect to (0)\n    if <<(1p？) = (prayer2)> or <<(item (prayer2) of [p1〜10 v]) = [0]> or <[1] = (letter (54) of (item (prayer2) of [p1〜10 v]))>>> then\n        hide\n    end\n    switch costume to (コスチューム7 v)\n    xy (((join (letter (41) of (item (prayer2) of [p1〜10 v])) (join (letter (42) of (item (prayer2) of [p1〜10 v])) (join (letter (43) of (item (prayer2) of [p1〜10 v])) (letter (44) of (item (prayer2) of [p1〜10 v]))))) - (1500)) - (スクロールｘ)) (((join (letter (45) of (item (prayer2) of [p1〜10 v])) (join (letter (46) of (item (prayer2) of [p1〜10 v])) (join (letter (47) of (item (prayer2) of [p1〜10 v])) (letter (48) of (item (prayer2) of [p1〜10 v]))))) - (1500)) - (スクロールｙ))\n    point in direction (join (letter (55) of (item (prayer2) of [p1〜10 v])) (letter (56) of (item (prayer2) of [p1〜10 v])))\n    switch costume to ((join (letter (49) of (item (prayer2) of [p1〜10 v])) (letter (50) of (item (prayer2) of [p1〜10 v]))) - (10))\n    if <((join (letter (51) of (item (prayer2) of [p1〜10 v])) (letter (52) of (item (prayer2) of [p1〜10 v]))) - (10)) = [0]> then\n        say (item (prayer2) of [user v])\n    else\n        say (join (item (prayer2) of [user v]) (join [:] (item ((join (letter (51) of (item (prayer2) of [p1〜10 v])) (letter (52) of (item (prayer2) of [p1〜10 v]))) - (10)) of [chat v])))\n    end\nend\n\ndefine xy (x) (y)\ngo to x: (x) y: (y)\nif <not <<(x position) = (x)> and <(y position) = (y)>>> then\n    set [ghost v] effect to (100)\nend\n\n@はり\n\nwhen flag clicked\nhide\n配置 [0] [0] [1]\n配置 [480] [0] [2]\n配置 [960] [0] [3]\n配置 [1400] [100] [4]\n配置 [1800] [200] [5]\n配置 [2300] [200] [6]\n配置 ((2300) + (400)) [200] [7]\n配置 ((2300) + (500)) [200] [8]\n配置 ((2300) + (900)) [150] [9]\n配置 ((2300) + (01800)) [200] [10]\n配置 ((2300) + (2200)) [200] [11]\n配置 ((2300) + (2600)) [200] [12]\n配置 ((2300) + (3000)) [100] [13]\n配置 ((2300) + (3400)) [100] [14]\n配置 ((2300) + (4000)) [200] [15]\n配置 ((2300) + (4400)) [200] [16]\n配置 ((2300) + (4850)) [200] [17]\n配置 ((2300) + (5300)) [200] [18]\n配置 ((2300) + (5750)) [200] [19]\n\ndefine 配置 (1) (2) (3)\nset [1 v] to (1)\nset [2 v] to (2)\nset [3 v] to ((3) + (1))\ncreate clone of (_myself_ v)\n\nwhen I start as a clone\ngo to [back v] layer\nshow\nforever\n    switch costume to (なし v)\n    go to x: ((1) - (スクロールｘ)) y: ((2) - (スクロールｙ))\n    show\n    switch costume to (3)\nend\n\nset [スクロールｙ v] to [200]\nset [スクロールｘ v] to [8000]\n\n@チャット\n\nwhen flag clicked\nset [ghost v] effect to (30)\nset [チャット表示 v] to [0]\nshow\nswitch costume to (コスチューム1 v)\ncreate clone of (_myself_ v)\nswitch costume to (コスチューム2 v)\ncreate clone of (_myself_ v)\nhide\n\nwhen I receive [チャット v]\nif <(costume [number v]) = [1]> then\n    wait (5) seconds\n    set [チャット v] to []\nend\n\nwhen I start as a clone\nif <(costume [number v]) = [1]> then\n    forever\n        go to x: (-170) y: (150)\n        if <<<touching (mouse-pointer v)?> and <mouse down?>> or <key (t v) pressed?>> then\n            start sound [Muted Conga v]\n            set [チャット表示 v] to [1]\n            ask [] and wait\n            set [チャット表示 v] to [0]\n            if <<[0] < (answer)> and <(answer) < [24]>> then\n                set [チャット v] to (answer)\n                broadcast (チャット v)\n            else\n                show variable [ホイ国 v]\n                set [ホイ国 v] to [そのチャットは存在しません。]\n                wait (3) seconds\n                hide variable [ホイ国 v]\n            end\n        end\n    end\nend\n\nwhen I start as a clone\nif <(costume [number v]) = [2]> then\n    forever\n        go to x: (0) y: (0)\n        if <(チャット表示) = [1]> then\n            go to [front v] layer\n            show\n        else\n            hide\n        end\n    end\nend\n\n@オンライン\n\nwhen I receive [オンライン v]\nset [オンライン v] to [1]\nwait (1) seconds\nset [☁ p1 v] to [0]\nset [☁ p2 v] to [0]\nset [☁ p3 v] to [0]\nset [☁ p4 v] to [0]\nset [☁ p5 v] to [0]\nset [☁ p6 v] to [0]\nset [☁ p6 v] to [0]\nset [☁ p8 v] to [0]\nset [☁ p9 v] to [0]\nset [☁ p10 v] to [0]\nset [1p？ v] to [0]\nwait (1) seconds\nbroadcast (オンライン！ v)\nforever\n    if <(☁ p1) = [0]> then\n        ユーザー名数値化\n        forever\n            set [1p？ v] to [1]\n            set [☁ p1 v] to (join (プレーヤー2) (join (join ((1500) + ((スクロールｘ) + ([x position v] of [プレーヤー v]))) (((スクロールｙ) + ([y position v] of [プレーヤー v])) + (1500))) (join (([costume # v] of [プレーヤー v]) + (10)) (join ((チャット) + (10)) (join (letter (length of ([floor v] of (timer) )) of ([floor v] of (timer) )) (join (！) ([direction v] of [プレーヤー v])))))))\n        end\n    else\n        if <(☁ p2) = [0]> then\n            ユーザー名数値化\n            forever\n                set [1p？ v] to [2]\n                set [☁ p2 v] to (join (プレーヤー2) (join (join ((1500) + ((スクロールｘ) + ([x position v] of [プレーヤー v]))) (((スクロールｙ) + ([y position v] of [プレーヤー v])) + (1500))) (join (([costume # v] of [プレーヤー v]) + (10)) (join ((チャット) + (10)) (join (letter (length of ([floor v] of (timer) )) of ([floor v] of (timer) )) (join (！) ([direction v] of [プレーヤー v])))))))\n            end\n        else\n            if <(☁ p3) = [0]> then\n                ユーザー名数値化\n                forever\n                    set [1p？ v] to [3]\n                    set [☁ p3 v] to (join (プレーヤー2) (join (join ((1500) + ((スクロールｘ) + ([x position v] of [プレーヤー v]))) (((スクロールｙ) + ([y position v] of [プレーヤー v])) + (1500))) (join (([costume # v] of [プレーヤー v]) + (10)) (join ((チャット) + (10)) (join (letter (length of ([floor v] of (timer) )) of ([floor v] of (timer) )) (join (！) ([direction v] of [プレーヤー v])))))))\n                end\n            else\n                if <(☁ p4) = [0]> then\n                    ユーザー名数値化\n                    forever\n                        set [1p？ v] to [4]\n                        set [☁ p4 v] to (join (プレーヤー2) (join (join ((1500) + ((スクロールｘ) + ([x position v] of [プレーヤー v]))) (((スクロールｙ) + ([y position v] of [プレーヤー v])) + (1500))) (join (([costume # v] of [プレーヤー v]) + (10)) (join ((チャット) + (10)) (join (letter (length of ([floor v] of (timer) )) of ([floor v] of (timer) )) (join (！) ([direction v] of [プレーヤー v])))))))\n                    end\n                else\n                    if <(☁ p5) = [0]> then\n                        ユーザー名数値化\n                        forever\n                            set [1p？ v] to [5]\n                            set [☁ p5 v] to (join (プレーヤー2) (join (join ((1500) + ((スクロールｘ) + ([x position v] of [プレーヤー v]))) (((スクロールｙ) + ([y position v] of [プレーヤー v])) + (1500))) (join (([costume # v] of [プレーヤー v]) + (10)) (join ((チャット) + (10)) (join (letter (length of ([floor v] of (timer) )) of ([floor v] of (timer) )) (join (！) ([direction v] of [プレーヤー v])))))))\n                        end\n                    else\n                        if <(☁ p6) = [0]> then\n                            ユーザー名数値化\n                            forever\n                                set [1p？ v] to [6]\n                                set [☁ p6 v] to (join (プレーヤー2) (join (join ((1500) + ((スクロールｘ) + ([x position v] of [プレーヤー v]))) (((スクロールｙ) + ([y position v] of [プレーヤー v])) + (1500))) (join (([costume # v] of [プレーヤー v]) + (10)) (join ((チャット) + (10)) (join (letter (length of ([floor v] of (timer) )) of ([floor v] of (timer) )) (join (！) ([direction v] of [プレーヤー v])))))))\n                            end\n                        else\n                            if <(☁ p7) = [0]> then\n                                ユーザー名数値化\n                                forever\n                                    set [1p？ v] to [7]\n                                    set [☁ p7 v] to (join (プレーヤー2) (join (join ((1500) + ((スクロールｘ) + ([x position v] of [プレーヤー v]))) (((スクロールｙ) + ([y position v] of [プレーヤー v])) + (1500))) (join (([costume # v] of [プレーヤー v]) + (10)) (join ((チャット) + (10)) (join (letter (length of ([floor v] of (timer) )) of ([floor v] of (timer) )) (join (！) ([direction v] of [プレーヤー v])))))))\n                                end\n                            else\n                                if <(☁ p8) = [0]> then\n                                    ユーザー名数値化\n                                    forever\n                                        set [1p？ v] to [8]\n                                        set [☁ p8 v] to (join (プレーヤー2) (join (join ((1500) + ((スクロールｘ) + ([x position v] of [プレーヤー v]))) (((スクロールｙ) + ([y position v] of [プレーヤー v])) + (1500))) (join (([costume # v] of [プレーヤー v]) + (10)) (join ((チャット) + (10)) (join (letter (length of ([floor v] of (timer) )) of ([floor v] of (timer) )) (join (！) ([direction v] of [プレーヤー v])))))))\n                                    end\n                                else\n                                    if <(☁ p9) = [0]> then\n                                        ユーザー名数値化\n                                        forever\n                                            set [1p？ v] to [9]\n                                            set [☁ p9 v] to (join (プレーヤー2) (join (join ((1500) + ((スクロールｘ) + ([x position v] of [プレーヤー v]))) (((スクロールｙ) + ([y position v] of [プレーヤー v])) + (1500))) (join (([costume # v] of [プレーヤー v]) + (10)) (join ((チャット) + (10)) (join (letter (length of ([floor v] of (timer) )) of ([floor v] of (timer) )) (join (！) ([direction v] of [プレーヤー v])))))))\n                                        end\n                                    else\n                                        if <(☁ p10) = [0]> then\n                                            ユーザー名数値化\n                                            forever\n                                                set [1p？ v] to [10]\n                                                set [☁ p10 v] to (join (プレーヤー2) (join (join ((1500) + ((スクロールｘ) + ([x position v] of [プレーヤー v]))) (((スクロールｙ) + ([y position v] of [プレーヤー v])) + (1500))) (join (([costume # v] of [プレーヤー v]) + (10)) (join ((チャット) + (10)) (join (letter (length of ([floor v] of (timer) )) of ([floor v] of (timer) )) (join (！) ([direction v] of [プレーヤー v])))))))\n                                            end\n                                        end\n                                    end\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\n\ndefine ユーザー名数値化\nset [プレーヤー v] to [0]\nset [プレーヤー2 v] to []\nrepeat (length of (username))\n    change [プレーヤー v] by (1)\n    switch costume to (letter (プレーヤー) of (username))\n    set [プレーヤー2 v] to (join (プレーヤー2) (costume [number v]))\nend\nrepeat ((40) - (length of (プレーヤー2)))\n    set [プレーヤー2 v] to (join (プレーヤー2) [0])\nend\n\nwhen I receive [オンライン v]\nbroadcast (言う v)\nforever\n    復元1\nend\n\ndefine 復元1\ndelete all of [user v]\nset [% v] to [0]\nrepeat (10)\n    switch costume to ( v)\n    change [% v] by (1)\n    set [〜 v] to [0]\n    set [4 v] to []\n    repeat (20)\n        if <not <(join (letter ((〜) + (1)) of (item (%) of [p1〜10 v])) (letter ((〜) + (2)) of (item (%) of [p1〜10 v]))) = [00]>> then\n            change [〜 v] by (2)\n            switch costume to (join (letter ((〜) - (1)) of (item (%) of [p1〜10 v])) (letter (〜) of (item (%) of [p1〜10 v])))\n            set [4 v] to (join (4) (costume [name v]))\n        end\n    end\n    add (4) to [user v]\nend\n\nwhen flag clicked\nforever\n    delete all of [p1〜10 v]\n    add (☁ p1) to [p1〜10 v]\n    add (☁ p2) to [p1〜10 v]\n    add (☁ p3) to [p1〜10 v]\n    add (☁ p4) to [p1〜10 v]\n    add (☁ p5) to [p1〜10 v]\n    add (☁ p6) to [p1〜10 v]\n    add (☁ p7) to [p1〜10 v]\n    add (☁ p8) to [p1〜10 v]\n    add (☁ p9) to [p1〜10 v]\n    add (☁ p10) to [p1〜10 v]\nend\n\nwhen I receive [オンライン！ v]\nforever\n    delete all of [1〜10 2 v]\n    add (☁ p1) to [1〜10 2 v]\n    add (☁ p2) to [1〜10 2 v]\n    add (☁ p3) to [1〜10 2 v]\n    add (☁ p4) to [1〜10 2 v]\n    add (☁ p5) to [1〜10 2 v]\n    add (☁ p6) to [1〜10 2 v]\n    add (☁ p7) to [1〜10 2 v]\n    add (☁ p8) to [1〜10 2 v]\n    add (☁ p9) to [1〜10 2 v]\n    add (☁ p10) to [1〜10 2 v]\n    wait (1.5) seconds\n    if <(letter (53) of (item (1) of [p1〜10 v])) = (letter (53) of (item (1) of [1〜10 2 v]))> then\n        set [☁ p1 v] to [0]\n    end\n    if <(letter (53) of (item (2) of [p1〜10 v])) = (letter (53) of (item (2) of [1〜10 2 v]))> then\n        set [☁ p2 v] to [0]\n    end\n    if <(letter (53) of (item (3) of [p1〜10 v])) = (letter (53) of (item (3) of [1〜10 2 v]))> then\n        set [☁ p3 v] to [0]\n    end\n    if <(letter (53) of (item (4) of [p1〜10 v])) = (letter (53) of (item (4) of [1〜10 2 v]))> then\n        set [☁ p4 v] to [0]\n    end\n    if <(letter (53) of (item (5) of [p1〜10 v])) = (letter (53) of (item (5) of [1〜10 2 v]))> then\n        set [☁ p5 v] to [0]\n    end\n    if <(letter (53) of (item (6) of [p1〜10 v])) = (letter (53) of (item (6) of [1〜10 2 v]))> then\n        set [☁ p6 v] to [0]\n    end\n    if <(letter (53) of (item (7) of [p1〜10 v])) = (letter (53) of (item (7) of [1〜10 2 v]))> then\n        set [☁ p7 v] to [0]\n    end\n    if <(letter (53) of (item (8) of [p1〜10 v])) = (letter (53) of (item (8) of [1〜10 2 v]))> then\n        set [☁ p8 v] to [0]\n    end\n    if <(letter (53) of (item (9) of [p1〜10 v])) = (letter (53) of (item (9) of [1〜10 2 v]))> then\n        set [☁ p9 v] to [0]\n    end\n    if <(letter (53) of (item (10) of [p1〜10 v])) = (letter (53) of (item (10) of [1〜10 2 v]))> then\n        set [☁ p10 v] to [0]\n    end\nend\n\nwhen I receive [start v]\nbroadcast (オンライン v)\n\nwhen flag clicked\n\n@コイン\n\ndefine 配置 (x) (y) (コスチューム)\nset [1 v] to (x)\nset [2 v] to (y)\nset [3 v] to (コスチューム)\ncreate clone of (_myself_ v)\nswitch costume to (コスチューム1 v)\n\nwhen I start as a clone\nforever\n    go to x: ((1) - (スクロールｘ)) y: ((2) - (スクロールｙ))\n    if <<(x position) = ((1) - (スクロールｘ))> and <<(OK？) = [0]> and <(y position) = ((2) - (スクロールｙ))>>> then\n        show\n    else\n        hide\n        set [ghost v] effect to (0)\n        set size to (100) %\n    end\nend\n\nwhen I receive [monster v]\nset [ok？ v] to [0]\n\nwhen flag clicked\nset [コイン v] to [0]\n\nwhen I receive [monster coin v]\nwait (0.5) seconds\nif <(costume [number v]) = [1]> then\n    set [monster coin？ v] to [1]\nend\n\nwhen I start as a clone\nif <(monster coin？) = [1]> then\n    wait until <<(！) = [1]> and <(OK？) = [1]>>\n    wait until <(！) = [0]>\n    delete this clone\nend\n\nwhen flag clicked\ngo to [back v] layer\nset [コインでｔｙ v] to [0]\n配置 [150] [10] [1]\n配置 [275] [140] [1]\n配置 [335] [140] [1]\n配置 [774] [-29] [1]\n配置 [834] [-29] [1]\n配置 [1900] [240] [1]\n配置 [1960] [240] [1]\n配置 [2400] [240] [1]\n配置 [2460] [240] [1]\n配置 [3607] [150] [1]\n配置 [3607] [200] [1]\n配置 [4580] [300] [1]\n配置 [6826] [200] [1]\n配置 [7062] [200] [1]\n配置 [7120] [200] [1]\n\nwhen flag clicked\nhide\nset [monster coin？ v] to [0]\n\nswitch costume to ((1) + (3))\n\nswitch costume to (コスチューム1 v)\n\nwhen I start as a clone\nforever\n    next costume\n    wait (0.03) seconds\n    if <touching (プレーヤー v)?> then\n        start sound [coin001 v]\n        change [コインの数 v] by (1)\n        broadcast (いえい v)\n        set [ok？ v] to [1]\n        change [コイン v] by (1)\n        delete this clone\n    end\nend\n\n配置 (モンコｘ) ((モンコｙ) + (10)) [1]\n\nwhen flag clicked\nset [コインの数 v] to [0]\n\n@はた\n\ndefine 配置 (x) (y) (コスチューム)\nset [1 v] to (x)\nset [2 v] to (y)\nset [3 v] to (コスチューム)\ncreate clone of (_myself_ v)\n\nwhen I start as a clone\nforever\n    go to x: ((1) - (スクロールｘ)) y: ((2) - (スクロールｙ))\n    if <<(x position) = ((1) - (スクロールｘ))> and <(y position) = ((2) - (スクロールｙ))>> then\n        show\n    else\n        hide\n    end\nend\n\nwhen I start as a clone\nforever\n    if <touching (プレーヤー v)?> then\n        set [！ v] to [1]\n        switch costume to (コスチューム2 v)\n        change [3 v] by (1)\n        wait (1) seconds\n        broadcast (finish v)\n        stop [this script v]\n    end\nend\n\nwhen flag clicked\nswitch costume to (コスチューム3 v)\nhide\n配置 [8500] [365] [1]\n\n@スプライト1\n\n@サムネ\n\nwhen flag clicked\nswitch costume to (コスチューム1 v)\nhide\nforever\n    reset timer\nend\n\nwhen [timer v] > (0.1)\nswitch costume to (コスチューム1 v)\ngo to [front v] layer\nset [brightness v] effect to (100)\nset [ghost v] effect to (100)\nshow\nrepeat (10)\n    change [brightness v] effect by (-10)\n    change [ghost v] effect by (-10)\nend\n\nwhen I receive [finish v]\nswitch costume to (コスチューム3 v)\ngo to [front v] layer\nset [brightness v] effect to (100)\nset [ghost v] effect to (100)\nshow\nbroadcast (いい v)\nrepeat (10)\n    change volume by (-10)\n    change [brightness v] effect by (-10)\n    change [ghost v] effect by (-8)\nend\n\nwhen I receive [ban! v]\nswitch costume to (コスチューム2 v)\ngo to [front v] layer\nset [brightness v] effect to (100)\nset [ghost v] effect to (100)\nshow\nrepeat (10)\n    change volume by (-10)\n    change [brightness v] effect by (-10)\n    change [ghost v] effect by (-10)\nend\nstop [all v]\n\nwhen I receive [start v]\nhide\n\n@ステージ\n\nwhen flag clicked\nset [チャット v] to []\nhide\n配置 [0] [0] [1]\n配置 [480] [0] [2]\n配置 [960] [0] [3]\n配置 [1440] [100] [4]\n配置 [1915] [265] [5]\n配置 [2390] [265] [6]\n配置 ((2400) + (450)) [265] [7]\n配置 ((2400) + (900)) [210] [8]\n配置 ((2400) + (1350)) [200] [9]\n配置 ((2400) + (1800)) [250] [10]\n配置 ((2850) + (1850)) [250] [11]\n配置 ((2850) + (2300)) [250] [12]\n配置 ((2850) + (2750)) [200] [13]\n配置 ((3300) + (2750)) [200] [14]\n配置 (((3300) + (2750)) + (550)) [250] [15]\n配置 (((3300) + (2750)) + (1010)) [250] [16]\n配置 (((3300) + (2750)) + (1500)) [250] [17]\n配置 (((3300) + (2750)) + (1920)) [250] [18]\n配置 (((3300) + (2750)) + (2320)) [250] [19]\n\ndefine 配置 (1) (2) (3)\nset [1 v] to (1)\nset [2 v] to (2)\nset [3 v] to ((3) + (1))\ncreate clone of (_myself_ v)\nhide\n\nwhen I start as a clone\ngo to [back v] layer\ngo [forward v] (8) layers\nshow\nforever\n    switch costume to (なし v)\n    go to x: ((1) - (スクロールｘ)) y: ((2) - (スクロールｙ))\n    show\n    switch costume to (3)\nend\n\n配置 ((1920) + (500)) [300] [8]\n配置 ((1920) + (1000)) [300] [9]\n配置 (((2600) + (450)) + (1500)) [300] [10]\n配置 (((2600) + (450)) + (2000)) [300] [11]\n配置 (((2600) + (450)) + (2500)) [300] [12]\n配置 (((2600) + (450)) + (3000)) [300] [13]\n配置 (((2600) + (450)) + (3500)) [300] [14]\n配置 (((2600) + (450)) + (4000)) [300] [15]\n\nset [スクロールｘ v] to [7000]\nset [スクロールｙ v] to [300]\n\nwhen flag clicked\nforever\n    broadcast (yes,I do! v)\nend\n\n@はた２2\n\ndefine 配置 (x) (y) (コスチューム)\nset [1 v] to (x)\nset [2 v] to (y)\nset [3 v] to (コスチューム)\ncreate clone of (_myself_ v)\n\nwhen I start as a clone\nforever\n    show\n    go to x: ((1) - (スクロールｘ)) y: ((2) - (スクロールｙ))\n    if <<(x position) = ((1) - (スクロールｘ))> and <(y position) = ((2) - (スクロールｙ))>> then\n        show\n    else\n        hide\n    end\nend\n\nwhen I receive [start v]\n\nwhen I start as a clone\ngo to [back v] layer\nforever\n    if <touching (プレーヤー v)?> then\n        start sound [きらーん2 v]\n        set [xx v] to (1)\n        set [yy v] to (2)\n        change [3 v] by (1)\n        forever\n            switch costume to (コスチューム2 v)\n            wait (0.05) seconds\n            switch costume to (コスチューム4 v)\n            wait (0.05) seconds\n            switch costume to (コスチューム5 v)\n            wait (0.05) seconds\n            switch costume to (コスチューム6 v)\n            wait (0.05) seconds\n            switch costume to (コスチューム5 v)\n            wait (0.05) seconds\n            switch costume to (コスチューム4 v)\n            wait (0.05) seconds\n        end\n    end\nend\n\nwhen flag clicked\nswitch costume to (コスチューム3 v)\nhide\n配置 [1668] [226] [1]\n配置 [4345] [224] [1]\n配置 [6560] [198] [1]\n\n@時間表記\n\nwhen I start as a clone\ngo to [front v] layer\nshow\nforever\n    if <(letter (1) of (時間)) = [-]> then\n        switch costume to (コスチューム10 v)\n    end\n    switch costume to (letter (i) of (時間))\n    if <(letter (i) of (時間)) = [.]> then\n        switch costume to (コスチューム12 v)\n    end\n    if <(letter (i) of (時間)) = [e]> then\n        switch costume to (コスチューム13 v)\n    end\n    if <(letter (i) of (時間)) = [+]> then\n        switch costume to (コスチューム14 v)\n    end\n    if <(letter (i) of (時間)) = [G]> then\n        switch costume to (コスチューム15 v)\n    end\n    if <(length of (時間)) < (i)> then\n        hide\n    else\n        show\n    end\n    go to [front v] layer\nend\n\nwhen I receive [start v]\nset [color v] effect to (0)\nset size to (150) %\nset [時間 v] to [0]\nhide\nset [i v] to [0]\ngo to x: (150) y: (150)\nrepeat (37)\n    change [i v] by (1)\n    create clone of (_myself_ v)\n    change x by (((size) / (100)) * (12))\nend\n\nwhen I receive [start v]\nforever\n    wait (1) seconds\n    change [時間 v] by (1)\nend\n\nwhen I receive [いい v]\ngo to [front v] layer\nset [brightness v] effect to (100)\nstop [other scripts in sprite v]\nset size to (300) %\nhide\nset [i v] to [0]\ngo to x: (-200) y: (0)\nrepeat (37)\n    change [i v] by (1)\n    create clone of (_myself_ v)\n    change x by (((size) / (100)) * (12))\nend\n\n@スプライト4\n\nwhen flag clicked\nhide\ngo to x: (0) y: (0)\nswitch costume to (コスチューム3 v)\ncreate clone of (_myself_ v)\ngo to x: (0) y: (0)\nswitch costume to (コスチューム1 v)\ncreate clone of (_myself_ v)\nswitch costume to (コスチューム2 v)\ncreate clone of (_myself_ v)\ngo to x: (0) y: (240)\nswitch costume to (コスチューム4 v)\ncreate clone of (_myself_ v)\n\nswitch costume to (コスチューム5 v)\ncreate clone of (_myself_ v)\n\nwhen I start as a clone\nstart sound [ホーム v]\nset [ui v] to [ 1]\nshow\nforever\n    if <(ui) = [0]> then\n        delete this clone\n    end\n    if <(costume [number v]) = [2]> then\n        change [動き v] by (7)\n        change y by ([sin v] of (動き) )\n    end\n    if <(costume [number v]) = [3]> then\n        change y by ([cos v] of (動き) )\n    end\n    if <(costume [number v]) = [4]> then\n        set [動き２ v] to [-30]\n        repeat until <(y position) < [-80]>\n            change [動き２ v] by (1.93)\n            change y by (動き２)\n        end\n        forever\n            change y by ([cos v] of (動き) )\n            if <<mouse down?> and <touching (mouse-pointer v)?>> then\n                start sound [選択 v]\n                repeat (10)\n                    change [ghost v] effect by (10)\n                end\n                stop all sounds\n                broadcast (START v)\n                set [ui v] to [0]\n                delete this clone\n            end\n        end\n    end\nend\n\nstop [this script v]\n\nset y to (0)\n\nwhen flag clicked\nset [説明表示 v] to [0]\n\n@スプライト6\n\nwhen flag clicked\ngo to x: (0) y: (0)\ngo to [front v] layer\nhide\n\nwhen I receive [start v]\nshow\n\nwhen I receive [start v]\nset [banまで v] to [0]\nforever\n    if <<key (any v) pressed?> or <mouse down?>> then\n        set [banまで v] to [0]\n    else\n        wait (1) seconds\n        change [banまで v] by (1)\n    end\n    if <(BANまで) = [120]> then\n        broadcast (BAN! v)\n    end\nend\n\nwhen I receive [finish v]\nstop [other scripts in sprite v]\n\n@はり2\n\nwhen flag clicked\nhide\n配置 [6950] [160] [1]\n配置 [8100] [180] [1]\n\ndefine 配置 (1) (2) (3)\nset [1 v] to (1)\nset [2 v] to (2)\nset [3 v] to ((3) + (1))\ncreate clone of (_myself_ v)\n\nwhen I start as a clone\ngo to [back v] layer\nset size to (80) %\nshow\nforever\n    turn right (-5) degrees\n    switch costume to (なし v)\n    go to x: ((1) - (スクロールｘ)) y: ((2) - (スクロールｙ))\n    show\n    switch costume to (3)\nend\n\n配置 ((1920) + (1000)) [0] [7]\n配置 ((1920) + (1500)) [300] [8]\n配置 ((1920) + (2000)) [300] [9]\n配置 ((1920) + (2500)) [300] [10]\n\n配置 [480] [0] [2]\n配置 [960] [0] [3]\n配置 [1400] [300] [4]\n配置 [2300] [400] [5]\n配置 ((1920) + (500)) [300] [6]\n配置 (((1920) + (500)) + (500)) [300] [7]\n配置 (((1920) + (500)) + (1500)) [300] [8]\n配置 (((1920) + (500)) + (2000)) [300] [9]\n配置 (((1920) + (500)) + (2500)) [300] [10]\n配置 (((1920) + (500)) + (3000)) [300] [11]\n配置 (((1920) + (500)) + (3500)) [300] [12]\n配置 (((1920) + (500)) + (4000)) [300] [13]\n配置 (((1920) + (500)) + (4500)) [300] [14]\n\n@水\n\ndefine 配置 (1) (2) (3)\nset [1 v] to (1)\nset [2 v] to (2)\nset [3 v] to ((3) + (1))\ncreate clone of (_myself_ v)\nhide\n\nwhen I start as a clone\nset [ghost v] effect to (30)\ngo to [back v] layer\ngo [backward v] (5) layers\nshow\nforever\n    switch costume to (なし v)\n    go to x: ((1) - (スクロールｘ)) y: ((2) - (スクロールｙ))\n    show\n    switch costume to (3)\nend\n\nwhen flag clicked\nset [チャット v] to []\nhide\n配置 ((2850) + (2600)) [200] [1]\n配置 ((3323) + (2600)) [200] [1]\n配置 ((3323) + (3000)) [200] [2]\n\n配置 ((1920) + (1150)) [250] [7]\n配置 (((1920) + (1150)) + (500)) [250] [8]\n配置 (((1920) + (1150)) + (1000)) [250] [9]\n配置 (((1920) + (1150)) + (1000)) [250] [10]\n配置 (((1920) + (1150)) + (1500)) [250] [11]\n配置 (((1920) + (1150)) + (2000)) [250] [12]\n\n配置 [960] [150] [3]\n配置 [1440] [350] [4]\n配置 [2000] [350] [5]\n配置 [3700] [350] [6]\n配置 [3900] [350] [7]\n配置 [6438] [350] [8]\n配置 [7050] [350] [9]\n\n@背景\n\nwhen flag clicked\nset [チャット v] to []\nhide\n配置 [0] [0] [1]\n配置 [480] [0] [2]\n配置 [960] [0] [3]\n配置 [1440] [100] [4]\n配置 [1915] [265] [5]\n配置 [2390] [265] [6]\n配置 ((2400) + (450)) [265] [7]\n配置 ((2400) + (900)) [210] [8]\n配置 ((2400) + (1350)) [200] [9]\n配置 ((2400) + (1800)) [250] [10]\n配置 ((2850) + (1850)) [250] [11]\n配置 ((2850) + (2300)) [250] [12]\n配置 ((2850) + (2750)) [200] [13]\n配置 ((3300) + (2750)) [200] [14]\n配置 (((3300) + (2750)) + (550)) [250] [15]\n配置 (((3300) + (2750)) + (1010)) [250] [16]\n配置 (((3300) + (2750)) + (1500)) [250] [17]\n配置 (((3300) + (2750)) + (1920)) [250] [18]\n配置 (((3300) + (2750)) + (2320)) [250] [19]\n\ndefine 配置 (1) (2) (3)\nset [1 v] to (1)\nset [2 v] to (2)\nset [3 v] to ((3) + (1))\ncreate clone of (_myself_ v)\nhide\n\nwhen I start as a clone\nshow\nforever\n    go to [back v] layer\n    switch costume to (なし v)\n    go to x: ((1) - (スクロールｘ)) y: ((2) - (スクロールｙ))\n    show\n    switch costume to (3)\nend\n\n配置 ((1920) + (500)) [300] [8]\n配置 ((1920) + (1000)) [300] [9]\n配置 (((2600) + (450)) + (1500)) [300] [10]\n配置 (((2600) + (450)) + (2000)) [300] [11]\n配置 (((2600) + (450)) + (2500)) [300] [12]\n配置 (((2600) + (450)) + (3000)) [300] [13]\n配置 (((2600) + (450)) + (3500)) [300] [14]\n配置 (((2600) + (450)) + (4000)) [300] [15]\n\nset [スクロールｘ v] to [8000]\nset [スクロールｙ v] to [300]\ngo [backward v] (8) layers\n\n@スプライト3\n\nwhen flag clicked\nset [shop表示 v] to [0]\nhide\nforever\n    set [ghost v] effect to (30)\n    if <(shop表示) = [1]> then\n        show\n    else\n        hide\n    end\nend\n\n@shop\n\nwhen I receive [start v]\nshow\n\nwhen I receive [ban! v]\nhide\n\nwhen I receive [finish v]\nhide\n\nwhen I start as a clone\nset [y増加 v] to [0]\nset [x増加 v] to [0]\nset [ghost v] effect to (0)\nforever\n    show\n    if <(costume [number v]) = [2]> then\n        go to x: (155) y: (-50)\n        if <(y増加) = [1]> then\n            switch costume to (コスチューム5 v)\n        end\n        if <<<<touching (mouse-pointer v)?> and <mouse down?>> and <(y増加) = [0]>> and <<[10] < (コインの数)> or <(コインの数) = [10]>>> then\n            start sound [ポップ2 v]\n            set [y増加 v] to [1]\n            set [yの動き v] to [24]\n            set [shop表示 v] to [0]\n            change [コインの数 v] by (-10)\n            broadcast (hu v)\n        end\n        if <<<<touching (mouse-pointer v)?> and <mouse down?>> and <(y増加) = [0]>> and <(コインの数) < [10]>> then\n            broadcast (まずい v)\n        end\n    end\n    if <(costume [number v]) = [3]> then\n        go to x: (155) y: (-90)\n        if <(x増加) = [1]> then\n            switch costume to (コスチューム5 v)\n        end\n        if <<<<touching (mouse-pointer v)?> and <mouse down?>> and <(x増加) = [0]>> and <<[5] < (コインの数)> or <(コインの数) = [5]>>> then\n            start sound [ポップ2 v]\n            set [x増加 v] to [1]\n            set [xの動き v] to [2.5]\n            set [shop表示 v] to [0]\n            change [コインの数 v] by (-5)\n            broadcast (hahu v)\n        end\n        if <<<<touching (mouse-pointer v)?> and <mouse down?>> and <(x増加) = [0]>> and <(コインの数) < [5]>> then\n            broadcast (まずい v)\n        end\n    end\n    if <(costume [number v]) = [4]> then\n        go to x: (155) y: (-130)\n        if <<touching (mouse-pointer v)?> and <mouse down?>> then\n            set [shop表示 v] to [0]\n        end\n    end\n    if <(shop表示) = [0]> then\n        delete this clone\n    end\nend\n\nwhen I receive [start v]\ngo to [front v] layer\nswitch costume to (コスチューム1 v)\ngo to x: (-180) y: (-141)\nhide\nset [ghost v] effect to (30)\nforever\n    go to [front v] layer\n    if <<touching (mouse-pointer v)?> and <mouse down?>> then\n        set [shop表示 v] to [1]\n        hide\n        switch costume to (コスチューム2 v)\n        create clone of (_myself_ v)\n        switch costume to (コスチューム3 v)\n        create clone of (_myself_ v)\n        switch costume to (コスチューム4 v)\n        create clone of (_myself_ v)\n    end\n    if <(shop表示) = [0]> then\n        switch costume to (コスチューム1 v)\n        show\n    end\nend\n\nstart sound [ポップ v]\n\nwhen flag clicked\nset [yの動き v] to [21]\nset [xの動き v] to [2]\nhide\n\nwhen I receive [まずい v]\nshow variable [ホイ国 v]\nset [ホイ国 v] to [ not enough coins//コインが足りない]\nwait (2) seconds\nhide variable [ホイ国 v]\nset [ホイ国 v] to []\n\nwhen flag clicked\nhide variable [ホイ国 v]\n\nset [yの動き v] to [0]\n\nwhen I receive [hu v]\nforever\n    set [y増加 v] to [1]\nend\n\nwhen I receive [hahu v]\nforever\n    set [x増加 v] to [1]\nend\n\nwhen I receive [finish v]\nhide\nstop [other scripts in sprite v]\n\n@音響\n\nwhen I receive [start v]\nset [音楽 v] to [0]\nforever\n    set [音楽 v] to (pick random (1) to (4))\n    play sound (音楽) until done\nend\n\nwhen flag clicked\nset [pan left/right v] effect to (-300)\n\n@音響2\n\nwhen I receive [start v]\nforever\n    play sound (音楽) until done\nend\n\nwhen flag clicked\nset [pan left/right v] effect to (300)\n\n@コイン表記\n\nwhen I receive [start v]\nswitch costume to (コスチューム16 v)\nshow\n\nwhen I receive [yes,i do! v]\ngo to [front v] layer\nswitch costume to ((コインの数) + (1))\n\nwhen flag clicked\nset [コインの数 v] to [0]\nhide\n\n