オンライン　プラットフォーマー　　Online platformer

Instructions: バグってると思ったそこのあなた！だいじょーぶ\nよーくみてみな！\n難しくしてほしいと依頼がありましたので追加ステージを作りマシタ\nちなみにタブを複製してやっても意味ないし\nNEW scratcherは無理です\nオンラインです！ついにできました！！\n矢印きーで移動です！\nハートが50!\n1キーを押しながらチャットです\nMove with the arrow keys!\nThe smartphone is about to start!\n間違っているなら教えてー！！\n#game#online

@Stage\n\nwhen flag clicked\nif <not <(☁ 1p) = [1]>> then\n    set [じぶん v] to [1]\n    set [☁ 1p v] to [1]\nelse\n    set [☁ 2p v] to [1]\n    set [じぶん v] to [2]\n    if <(☁ 2p) = [1]> then\n        stop [all v]\n    end\nend\nforever\n    reset timer\nend\n\nwhen [timer v] > (0)\nif <(じぶん) = [1]> then\n    set [☁ 1p v] to [0]\nelse\n    set [☁ 2p v] to [0]\nend\n\nwhen [timer v] > (0)\nbroadcast (as v)\n\nwhen flag clicked\n\nwhen flag clicked\ndelete all of [チャット v]\ninsert [a こんにちは！] at (1) of [チャット v] \ninsert [b おはよう！] at (2) of [チャット v] \ninsert [c こんばんは] at (3) of [チャット v] \ninsert [d ♥と★を押そうぜ] at (4) of [チャット v] \ninsert [e 抜けるね] at (5) of [チャット v] \ninsert [f　うんわかった！] at (6) of [チャット v] \ninsert [b　競争だー！] at (7) of [チャット v] \ninsert [h　よーいドン！] at (8) of [チャット v] \n\nwhen flag clicked\nset [☁ 1チャ v] to [0]\nshow list [チャット v]\nset [☁ ２チャ v] to [0]\nforever\n    if <key (1 v) pressed?> then\n        hide list [チャット v]\n        if <(じぶん) = [1]> then\n            if <key (a v) pressed?> then\n                set [☁ 1チャ v] to [1]\n            end\n            if <key (b v) pressed?> then\n                set [☁ 1チャ v] to [2]\n            end\n            if <key (c v) pressed?> then\n                set [☁ 1チャ v] to [3]\n            end\n            if <key (d v) pressed?> then\n                set [☁ 1チャ v] to [4]\n            end\n            if <key (e v) pressed?> then\n                set [☁ 1チャ v] to [5]\n            end\n            if <key (f v) pressed?> then\n                set [☁ 1チャ v] to [6]\n            end\n            if <key (g v) pressed?> then\n                set [☁ 1チャ v] to [7]\n            end\n            if <key (h v) pressed?> then\n                set [☁ 1チャ v] to [8]\n            end\n            wait (0.1) seconds\n            set [☁ 1チャ v] to [0]\n        else\n            if <key (a v) pressed?> then\n                set [☁ ２チャ v] to [1]\n            end\n            if <key (b v) pressed?> then\n                set [☁ ２チャ v] to [2]\n            end\n            if <key (c v) pressed?> then\n                set [☁ ２チャ v] to [3]\n            end\n            if <key (d v) pressed?> then\n                set [☁ ２チャ v] to [4]\n            end\n            if <key (e v) pressed?> then\n                set [☁ ２チャ v] to [5]\n            end\n            if <key (f v) pressed?> then\n                set [☁ ２チャ v] to [6]\n            end\n            if <key (g v) pressed?> then\n                set [☁ ２チャ v] to [7]\n            end\n            if <key (h v) pressed?> then\n                set [☁ ２チャ v] to [8]\n            end\n            wait (0.1) seconds\n            set [☁ ２チャ v] to [0]\n        end\n    else\n        show list [チャット v]\n    end\nend\n\n@白いやつ\n\nwhen flag clicked\nset [x v] to [0]\nset [y v] to [0]\npoint in direction (90)\nset size to (30) %\nswitch costume to (コスチューム1 v)\ngo to x: (-177) y: (-100)\nshow\nforever\n    change [y v] by (-1)\n    set drag mode [not draggable v]\n    set rotation style [left-right v]\n    if <<key (right arrow v) pressed?> or > then\n        point in direction (90)\n        change [x v] by (0.6)\n    end\n    if <<key (left arrow v) pressed?> or > then\n        point in direction (-90)\n        change [x v] by (-0.6)\n    end\n    set [x v] to ((x) * (0.95))\n    change x by (x)\n    if <touching (地面 v)?> then\n        change y by (1)\n    end\n    if <touching (地面 v)?> then\n        change y by (1)\n    end\n    if <touching (地面 v)?> then\n        change y by (1)\n    end\n    if <touching (地面 v)?> then\n        change y by (1)\n    end\n    if <touching (地面 v)?> then\n        change y by (-4)\n        change x by ((x) * (-1))\n        if <key (up arrow v) pressed?> then\n            set [y v] to [14]\n            start sound [ニュッ1 v]\n            if <([abs v] of (x) ) = (x)> then\n                set [x v] to [-10]\n            else\n                set [x v] to [10]\n            end\n        else\n            set [x v] to [0]\n        end\n    end\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 (-1)\n    if <<touching (地面 v)?> and <key (up arrow v) pressed?>> then\n        set [y v] to [14]\n        start sound [ニュッ1 v]\n    end\n    if <(x position) > [240]> then\n        broadcast (ネクスト v)\n        if <not <(変数) = [6]>> then\n            change [変数 v] by (1)\n        end\n        go to x: (-177) y: (-100)\n    end\n    if <<[-170] > (y position)> or <touching (とげ v)?>> then\n        start sound [しょげる v]\n        go to x: (-177) y: (-100)\n        set [x v] to [0]\n        set [y v] to [0]\n    end\n    change y by (1)\nend\n\nwhen flag clicked\nforever\n    wait (0.025) seconds\n    create clone of (_myself_ v)\nend\n\nwhen I start as a clone\nset [ghost v] effect to (50)\nset size to (30) %\nrepeat (8)\n    change [ghost v] effect by (-2.3)\n    change size by (-1.25)\nend\ndelete this clone\n\nwhen flag clicked\nset [変数 v] to [1]\n\nwhen I receive [１ v]\ngo to x: (-177) y: (-154)\n\nwhen flag clicked\nset [☁ s1 v] to [1]\nset [☁ s2 v] to [1]\nforever\n    if <(じぶん) = [1]> then\n        set [☁ 1x v] to (x position)\n        set [☁ 1y v] to (y position)\n        set [☁ s1 v] to ([costume # v] of [地面 v])\n    else\n        set [☁ 2x v] to (x position)\n        set [☁ 2y v] to (y position)\n        set [☁ s2 v] to ([costume # v] of [地面 v])\n    end\nend\n\nwhen flag clicked\nforever\n    if <(じぶん) = [1]> then\n        if <[0] < (☁ 1チャ)> then\n            say (item (☁ 1チャ) of [チャット v]) for (4) seconds\n        end\n    else\n        if <[0] < (☁ ２チャ)> then\n            say (item (☁ ２チャ) of [チャット v]) for (4) seconds\n        end\n    end\nend\n\n@地面\n\nwhen flag clicked\nswitch costume to (コスチューム1 v)\ngo to x: (0) y: (0)\nforever\n    set drag mode [not draggable v]\nend\n\nwhen I receive [ネクスト v]\nif <not <(costume [number v]) = [11]>> then\n    next costume\nend\n\nwhen I receive [as v]\nswitch costume to (コスチューム7 v)\n\nwhen flag clicked\nset [time v] to [0]\nset [☁ time v] to [0]\nforever\n    wait (1) seconds\n    if <not <(costume [number v]) = [11]>> then\n        change [time v] by (1)\n        set [☁ time v] to (time)\n    else\n        if <<(☁ WR) = [0]> or <(time) < (☁ WR)>> then\n            set [☁ wr v] to (time)\n        end\n    end\nend\n\n@白いやつ2\n\nwhen flag clicked\nforever\n    if <(じぶん) = [2]> then\n        if <(☁ 1チャ) > [0]> then\n            say (item (☁ 1チャ) of [チャット v]) for (4) seconds\n        end\n    else\n        if <(☁ ２チャ) > [0]> then\n            say (item (☁ ２チャ) of [チャット v]) for (4) seconds\n        end\n    end\nend\n\nwhen flag clicked\nhide\nwait (1) seconds\nforever\n    if <(☁ s1) = (☁ s2)> then\n        if <(☁ 1p) = (☁ 2p)> then\n            show\n        end\n        if <(じぶん) = [1]> then\n            set x to (☁ 2x)\n            set y to (☁ 2y)\n        else\n            set x to (☁ 1x)\n            set y to (☁ 1y)\n        end\n    else\n        hide\n    end\nend\n\nwhen flag clicked\nforever\n    wait (0.025) seconds\n    create clone of (_myself_ v)\nend\n\nwhen I start as a clone\nset size to (30) %\nrepeat (8)\n    change size by (-1.25)\nend\ndelete this clone\n\nwhen flag clicked\nset [変数 v] to [1]\n\nwhen I receive [１ v]\ngo to x: (-177) y: (-154)\n\n@とげ\n\nwhen flag clicked\ngo to x: (0) y: (0)\nshow\nforever\n    switch costume to ([costume # v] of [地面 v])\nend\n\n