白？黒？ White or Black?  Platformer

Instructions: English is below!\n一応タイムあるから速くゴールしてね！\nステージ少なくてごめん。\nちなみにスキップ使うとクラウド変数に\n保存されないよ。\n作成のやる気を起こすために❤️と⭐️を押しましょう！\nI have time, so please finish immediately!\nI'm sorry I didn't have enough stages.\nPress ❤️ and ⭐️ to motivate the author!

@Stage\n\nwhen flag clicked\nbroadcast (スタート v)\n\nwhen I receive [スタート v]\nset volume to (75) %\nforever\n    play sound [Vexento - Where We Belong v] until done\nend\n\nwhen I receive [スタート v]\nset [ステージ v] to [1]\nset [敵キャラ召喚 v] to [1]\nset [乙返し v] to [0]\nwait (0) seconds\nforever\n    if <<(ステージ) = [6]> and <(敵キャラ召喚) < [6]>> then\n        set [敵キャラ召喚 v] to [6]\n        create clone of (敵キャラ v)\n    else\n        if <<(ステージ) = [7]> and <(敵キャラ召喚) < [7]>> then\n            set [敵キャラ召喚 v] to [7]\n            create clone of (敵キャラ v)\n        else\n            if <<(ステージ) = [9]> and <(敵キャラ召喚) < [9]>> then\n                set [敵キャラ召喚 v] to [9]\n                create clone of (敵キャラ v)\n            end\n        end\n    end\nend\n\nwhen I receive [スタート v]\nforever\n    if <(モード) = [White]> then\n        switch backdrop to (背景2 v)\n    else\n        switch backdrop to (背景1 v)\n    end\nend\n\n@空白\n\n@プレイヤー\n\nwhen I receive [スタート v]\ngo to x: (-200) y: (-50)\nset rotation style [don't rotate v]\nswitch costume to (black上前向き v)\nset drag mode [not draggable v]\ngo to [front v] layer\ngo [forward v] (1) layers\nset [x v] to [0]\nset [y v] to [0]\nset size to (100) %\npoint in direction (90)\nwait until <<mouse down?> or <key (any v) pressed?>>\nforever\n    if <<touching (障害物 v)?> and <<(モード) = [Flame]> and <touching color (#d80000)?>>> then\n        change [y v] by (-0.25)\n    else\n        change [y v] by (-1)\n    end\n    すぐやろうか。\n    if <(動けない？) = [0]> then\n        if <<key (right arrow v) pressed?> or <<key (d v) pressed?> or <<[50] < (mouse x)> and <mouse down?>>>> then\n            set [左右 v] to [右]\n            change [x v] by (1)\n            point in direction (90)\n        else\n            if <<key (left arrow v) pressed?> or <<key (a v) pressed?> or <<(mouse x) < [-50]> and <mouse down?>>>> then\n                set [左右 v] to [左]\n                change [x v] by (-1)\n                point in direction (-90)\n            else\n                set [左右 v] to [前]\n            end\n        end\n    else\n        set [左右 v] to [前]\n    end\n    change x by (x)\n    set [x v] to ((x) * (0.9))\n    if <touching (地面 v)?> then\n        x座標補正 [地面]\n    end\n    change y by (y)\n    if <touching (地面 v)?> then\n        y座標補正 [地面]\n    end\n    if <touching (バネ v)?> then\n        set [y v] to [22]\n    end\n    if <<<<<(リトライ) = [1]> or <touching (障害物 v)?>> or <<<touching (敵キャラ v)?> and <[-0.01] < (y)>> or <touching (ビーム v)?>>> or <(乙返し) = [1]>> or <<<(costume [number v]) < [4]> and <(y position) < [-180]>> or <<[3] < (costume [number v])> and <(y position) < [-165]>>>> then\n        set [x v] to [0]\n        set [y v] to [0]\n        set [乙返し v] to [0]\n        change [敵キャラ召喚 v] by (-1)\n        if <(リトライ) = [0]> then\n            start sound [crashed oof 2 v]\n        end\n        go to x: (-200) y: (-50)\n        point in direction (90)\n        set [判定 v] to [1]\n        wait until <(判定) = [0]>\n        set [リトライ v] to [0]\n    end\n    if <[240] < (x position)> then\n        set [x v] to [0]\n        set [y v] to [0]\n        change [ステージ v] by (1)\n        start sound [High Whoosh v]\n        go to x: (-200) y: (-50)\n        point in direction (90)\n        if <(ステージ) < [10]> then\n            set [判定 v] to [1]\n            wait until <(判定) = [0]>\n        end\n    end\nend\n\ndefine y座標補正 (誰)\nif <[0] < (y)> then\n    repeat until <not <touching ((誰) v)?>>\n        change y by (-1)\n    end\nelse\n    repeat until <not <touching ((誰) v)?>>\n        change y by (1)\n    end\nend\nすぐやろうか。\nset [y v] to [0]\nif <<<<key (up arrow v) pressed?> or <key (w v) pressed?>> or <<[0] < (mouse y)> and <mouse down?>>> and <(動けない？) = [0]>> then\n    set [y v] to [15]\nend\n\ndefine x座標補正 (誰)\nif <[0] < (x)> then\n    repeat until <not <touching ((誰) v)?>>\n        change x by (-1)\n    end\nelse\n    repeat until <not <touching ((誰) v)?>>\n        change x by (1)\n    end\nend\nすぐやろうか。\nif <<<<key (up arrow v) pressed?> or <key (w v) pressed?>> or <<[0] < (mouse y)> and <mouse down?>>> and <(動けない？) = [0]>> then\n    set [y v] to [14]\n    if <(x) < [0]> then\n        set [x v] to [10]\n    else\n        set [x v] to [-10]\n    end\nelse\n    set [x v] to [0]\nend\n\nwhen I receive [スタート v]\nforever\n    create clone of (_myself_ v)\nend\n\nwhen I start as a clone\nshow\nrepeat (10)\n    change size by (-5)\n    change [ghost v] effect by (10)\nend\ndelete this clone\n\nwhen I start as a clone\nset [固有ステージ v] to (ステージ)\nwait until <not <(固有ステージ) = (ステージ)>>\nrepeat (2)\n    change size by (-10)\n    change [ghost v] effect by (30)\nend\ndelete this clone\n\nwhen I receive [スタート v]\nforever\n    switch costume to (join (モード) (join (join (上下) (左右)) [向き]))\nend\n\nwhen I receive [スタート v]\nforever\n    if <<<<key (down arrow v) pressed?> or <key (s v) pressed?>> or <<(mouse y) < [-120]> and <mouse down?>>> and <(動けない？) = [0]>> then\n        set [上下 v] to [下]\n    else\n        set [上下 v] to [上]\n    end\nend\n\nwhen I receive [スタート v]\nset [モード v] to [Black]\nforever\n    if <<<touching (mouse-pointer v)?> and <mouse down?>> or <key (space v) pressed?>> then\n        if <(モード) = [Black]> then\n            set [モード v] to [White]\n        else\n            set [モード v] to [Black]\n        end\n        wait until <not <<mouse down?> or <key (space v) pressed?>>>\n    end\nend\n\nwhen I receive [スタート v]\nclear graphic effects\nforever\n    set [brightness v] effect to ()\nend\n\nwhen I receive [スタート v]\nforever\n    if <touching (敵キャラ v)?> then\n        broadcast (乙ベイベー v)\n    end\nend\n\nwhen I receive [スタート v]\nset [動けない？ v] to [0]\nforever\n    wait until <not <mouse down?>>\n    wait until <mouse down?>\n    if <<<[135] < (mouse y)> and <mouse down?>> or <touching (mouse-pointer v)?>> then\n        set [動けない？ v] to [1]\n    else\n        set [動けない？ v] to [0]\n    end\nend\n\nwhen I receive [スタート v]\nforever\n    if <<touching (障害物 v)?> and <<(モード) = [Flame]> and <touching color (#d80000)?>>> then\n        if <<[0] < (mouse y)> and <mouse down?>> then\n            set [y v] to [8]\n        end\n    end\nend\n\nwhen I receive [スタート v]\nforever\n    すぐやろうか。\nend\n\ndefine すぐやろうか。\nif <<<<<[135] < (mouse y)> and <([abs v] of (mouse x) ) < [240]>> or <touching (mouse-pointer v)?>> and <mouse down?>> and <(ステージ) < [10]>> then\n    set [動けない？ v] to [1]\nelse\n    set [動けない？ v] to [0]\nend\n\n@地面\n\nwhen I receive [スタート v]\ngo to x: (0) y: (0)\nswitch costume to (1 v)\nset size to (100) %\npoint in direction (90)\nshow\nforever\n    switch costume to (ステージ)\nend\n\n@障害物\n\nwhen I receive [スタート v]\ngo to x: (0) y: (0)\nswitch costume to (1 v)\nset size to (100) %\npoint in direction (90)\nshow\nforever\n    switch costume to (ステージ)\nend\n\n@バネ\n\nwhen I receive [スタート v]\ngo to x: (0) y: (5)\nswitch costume to (1 v)\nset size to (100) %\npoint in direction (90)\nshow\nforever\n    switch costume to (ステージ)\nend\n\n@敵キャラ\n\nwhen flag clicked\ngo to x: (0) y: (0)\nset [クローンか v] to [0]\nswitch costume to (1 v)\nset size to (100) %\nhide\n\nwhen I start as a clone\nset [クローンか v] to [1]\nset [クローン v] to (敵キャラ召喚)\nset [固有召喚番号 v] to (召喚番号)\nset [動けないぜ v] to [0]\ngo [forward v] (5) layers\nwait (0) seconds\nwait until <(判定) = [0]>\ngo to x: (200) y: (-100)\nif <(ステージ) = [9]> then\n    switch costume to (トゲ v)\nelse\n    if <(ステージ) = [7]> then\n        switch costume to (白 v)\n    else\n        switch costume to (普通 v)\n    end\nend\n記憶喪失w\nshow\nforever\n    point in direction (-90)\n    repeat until <(x position) < [-156]>\n        change x by (-4)\n        確認！\n    end\n    point in direction (90)\n    repeat until <[196] < (x position)>\n        change x by (4)\n        確認！\n    end\nend\n\nwhen I start as a clone\nwait (0) seconds\nwait until <(判定) = [0]>\nwait until <<not <(ステージ) = (クローン)>> or <(判定) = [1]>>\ndelete this clone\n\nwhen I start as a clone\nset [俺様y v] to [0]\nwait (0) seconds\nwait until <(判定) = [0]>\nforever\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    if <touching (バネ v)?> then\n        set [俺様y v] to [20]\n    end\n    if <(y position) < [-180]> then\n        delete this clone\n    end\nend\n\nwhen I receive [乙ベイベー v]\nif <(クローンか) = [1]> then\n    if <touching (プレイヤー v)?> then\n        if <(costume [number v]) = [3]> then\n            set [乙返し v] to [1]\n        else\n            if <<<key (w v) pressed?> or <key (up arrow v) pressed?>> or <<[0] < (mouse y)> and <mouse down?>>> then\n                set [y v] to [14]\n            else\n                set [y v] to [10]\n            end\n            start sound [Coin v]\n            delete this clone\n        end\n    end\nend\n\ndefine 確認！\nwait until <(動けないぜ) = [0]>\n\ndefine 記憶喪失w\nset [君の名は v] to (costume [name v])\n\n@背景\n\nwhen I receive [スタート v]\ngo to x: (0) y: (0)\nswitch costume to (1 v)\ngo to [front v] layer\ngo [backward v] (1) layers\nset size to (100) %\npoint in direction (90)\nshow\n言語は？\nforever\n    switch costume to ((ステージ) + (<(言語) = [English]> * (10)))\nend\n\ndefine 言語は？\nif <(language::translate) = [日本語]> then\n    set [言語 v] to [日本語]\nelse\n    set [言語 v] to [English]\nend\n\n@太陽\n\nwhen I receive [スタート v]\ngo to x: (210) y: (140)\nswitch costume to (太陽 v)\nset [cos v] to [0]\ngo to [back v] layer\nset size to (90) %\npoint in direction (90)\nforever\n    change [cos v] by (8)\n    change size by ([cos v] of (cos) )\nend\n\n@クローン\n\nwhen I receive [スタート v]\nswitch costume to (click to start v)\ngo to x: (0) y: (0)\nset drag mode [not draggable v]\nset size to (100) %\npoint in direction (90)\nhide\nset [id v] to [1]\n\nwhen I start as a clone\nif <(ID) = [1]> then\n    set [雑用 v] to [0]\n    go to [front v] layer\n    show\n    forever\n        change [雑用 v] by (8)\n        turn right ([cos v] of (雑用) ) degrees\n        change size by ([sin v] of (雑用) )\n    end\nend\n\nwhen I start as a clone\nif <(ID) = [1]> then\n    set [ghost v] effect to (100)\n    repeat (2)\n        change [ghost v] effect by (-50)\n    end\n    wait until <<mouse down?> or <key (any v) pressed?>>\n    stop [other scripts in sprite v]\n    set [判定 v] to [0]\n    repeat (10)\n        change [ghost v] effect by (10)\n    end\n    hide\n    delete this clone\nelse\n    show\nend\n\nwhen I receive [スタート v]\nset [判定 v] to [1]\nforever\n    wait until <(判定) = [1]>\n    create clone of (_myself_ v)\n    wait until <(判定) = [0]>\nend\n\nwhen I receive [スタート v]\nset [time v] to [0]\nforever\n    if <(判定) = [0]> then\n        change [time v] by (1)\n        wait (1) seconds\n    end\nend\n\nwhen I receive [スタート v]\nwait (0) seconds\nwait until <(ステージ) = [10]>\nstop [other scripts in sprite v]\nif <<(Time) < (☁ Best Time)> and <(ハイスコアに掲載されないよ君) = [0]>> then\n    set [☁ best time v] to (Time)\nend\nset [id v] to [2]\nクローン (Time) [-155] [160]\nクローン (☁ Best Time) [-155] [138]\ngo to x: (-200) y: (160)\nswitch costume to ((11) + <(言語) = [English]>)\nset size to (60) %\nshow\n\ndefine クローン (何？) (x) (y)\ngo to x: (x) y: (y)\nset [雑用 v] to [0]\nset size to (50) %\nrepeat (length of (何？))\n    change [雑用 v] by (1)\n    switch costume to (letter (雑用) of (何？))\n    create clone of (_myself_ v)\n    change x by (13)\nend\n\n@色々カウンター\n\nwhen I receive [スタート v]\nset [ハイスコアに掲載されないよ君 v] to [0]\nset [リトライ v] to [0]\nforever\n    if <<<<[135] < (mouse y)> and <([abs v] of (mouse x) ) < [240]>> and <mouse down?>> and <(ステージ) < [10]>> then\n        wait until <<not <mouse down?>> or <not <[135] < (mouse y)>>>\n        if <[135] < (mouse y)> then\n            if <<(mouse x) < [-140]> and <[-220] < (mouse x)>> then\n                set [リトライ v] to [1]\n            else\n                if <<(mouse x) < [-40]> and <[-120] < (mouse x)>> then\n                    set [ハイスコアに掲載されないよ君 v] to [1]\n                    change [敵キャラ召喚 v] by (1)\n                    change [ステージ v] by (1)\n                    set [リトライ v] to [1]\n                end\n            end\n        end\n    end\nend\n\nwhen I receive [スタート v]\ngo to x: (0) y: (0)\nswitch costume to (色々カウンター v)\nset [ghost v] effect to (5)\nset size to (100) %\nhide\nforever\n    if <<<<[135] < (mouse y)> and <([abs v] of (mouse x) ) < [240]>> and <mouse down?>> and <(ステージ) < [10]>> then\n        show\n    else\n        hide\n    end\nend\n\nwhen I receive [スタート v]\ngo to [back v] layer\nforever\n    go [forward v] (1) layers\nend\n\n@雲\n\nwhen I receive [スタート v]\nforever\n    create clone of (_myself_ v)\n    wait (pick random (1.5) to (2)) seconds\nend\n\nwhen flag clicked\nhide\n\nwhen I start as a clone\nset [必需品 v] to (pick random (50) to (120))\ngo to x: (280) y: ((170) - (必需品))\nswitch costume to (pick random (1) to (2))\nset [ghost v] effect to (pick random (0) to (50))\ngo to [back v] layer\ngo [forward v] (5) layers\nset rotation style [left-right v]\npoint in direction (pick random (-90) to (90))\nset size to ((85) + ((必需品) / (2))) %\nshow\nrepeat until <(x position) < [-260]>\n    change x by ((0) - (round ((必需品) / (15))))\nend\nrepeat (5)\n    change [ghost v] effect by (20)\n    change x by ((0) - (round ((必需品) / (15))))\nend\ndelete this clone\n\n@サムネ\n\nwhen flag clicked\nset [ghost v] effect to (100)\ngo to x: (0) y: (0)\nswitch costume to (サムネ v)\nset size to (100) %\nshow\nforever\n    go to [front v] layer\nend\n\n