Monochrome Platformer
@Stage\n\n@player\n\nwhen flag clicked\nset [stage v] to [1]\nbroadcast (next v)\nswitch costume to (plat v)\n初期\nforever\n    if <<<key (left arrow v) pressed?> or <key (a v) pressed?>> or <<(mouse x) < (x position)> and <mouse down?>>> then\n        change [ｘ v] by (-1)\n        point in direction (-90)\n    end\n    if <<<key (right arrow v) pressed?> or <key (d v) pressed?>> or <<(x position) < (mouse x)> and <mouse down?>>> then\n        change [ｘ v] by (1)\n        point in direction (90)\n    end\n    set [ｘ v] to ((ｘ) * (0.9))\n    change x by (ｘ)\n    if <(x position) < [-215]> then\n        change x by ((ｘ) * (-1))\n        set [ｘ v] to [0]\n    else\n        if <<[215] < (x position)> and <(stage) = [13]>> then\n            change x by ((ｘ) * (-1))\n            set [ｘ v] to [0]\n        else\n            if <<touching color (#000000)?> or <touching color (#6aff00)?>> then\n                change y by (1)\n                if <<touching color (#000000)?> or <touching color (#6aff00)?>> then\n                    change y by (1)\n                    if <<touching color (#000000)?> or <touching color (#6aff00)?>> then\n                        change y by (1)\n                        if <<touching color (#000000)?> or <touching color (#6aff00)?>> then\n                            change y by (1)\n                            if <<touching color (#000000)?> or <touching color (#6aff00)?>> then\n                                change y by (1)\n                                if <<touching color (#000000)?> or <touching color (#6aff00)?>> then\n                                    change x by ((ｘ) * (-1))\n                                    change y by (-5)\n                                    if <<<key (up arrow v) pressed?> or <key (w v) pressed?>> or <<[-45] < (mouse y)> and <mouse down?>>> then\n                                        if <(ｘ) > [0]> then\n                                            set [ｘ v] to [-6]\n                                        else\n                                            set [ｘ v] to [6]\n                                        end\n                                        set [ｙ v] to [10]\n                                    else\n                                        set [ｘ v] to [0]\n                                    end\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\n    change y by (-1)\n    if <<<key (up arrow v) pressed?> or <key (w v) pressed?>> or <<[-45] < (mouse y)> and <mouse down?>>> then\n        if <<touching color (#000000)?> or <touching color (#6aff00)?>> then\n            set [ｙ v] to [15]\n        end\n    end\n    change y by (ｙ)\n    change [ｙ v] by (-1)\n    if <<touching color (#000000)?> or <touching color (#6aff00)?>> then\n        change y by ((ｙ) * (-1))\n        set [ｙ v] to [0]\n    end\n    if <touching color (#0e0e0e)?> then\n        reset\n    end\n    if <(y position) < [-180]> then\n        reset\n    end\n    if <(x position) > [210]> then\n        if <(stage) = [13]> then\n    end\n    if <(stage) = [13]> then\n        switch costume to (plat4 v)\n        change [color v] effect by (1)\n    end\nend\n\nwhen flag clicked\nset [stage v] to [1]\nreset\n\ndefine reset\nbroadcast (リフト初期化 v)\ngo to x: (-205) y: (90)\nset rotation style [left-right v]\nset [ｘ v] to [0]\nset [ｙ v] to [0]\nset size to (35) %\npoint in direction (90)\n\nwhen I receive [end v]\nreset\n\nwhen flag clicked\nwait (1) seconds\nforever\n    if <(stage) = [13]> then\n        wait (2) seconds\n        forever\n            create clone of (_myself_ v)\n            wait (0.01) seconds\n        end\n    else\n        create clone of (_myself_ v)\n        wait (0.01) seconds\n    end\nend\n\nwhen I start as a clone\nif <(stage) = [13]> then\n    switch costume to (plat3 v)\n    set [color v] effect to (pick random (1) to (100))\n    set [brightness v] effect to (10)\nelse\n    switch costume to (plat2 v)\n    set [color v] effect to (0)\n    set [brightness v] effect to (0)\nend\nset [ghost v] effect to (5)\nset size to (35) %\nshow\nrepeat (10)\n    change size by (-4)\n    change [ghost v] effect by (8)\n    wait (0.01) seconds\nend\ndelete this clone\n\n@lift\n\nwhen flag clicked\nhide\n\nwhen I receive [リフト初期化 v]\nwait (0.12) seconds\ngo [forward v] (1) layers\nset [lift reset v] to [0]\nwait () seconds\nset [lift reset v] to [1]\nif <(stage) = [9]> then\n    wait until <not <<(stage) = [9]> or <(stage) = [1]>>>\n    hide\nelse\n    if <(stage) = [10]> then\n        wait until <not <<(stage) = [10]> or <(stage) = [1]>>>\n        hide\n    else\n        if <(stage) = [12]> then\n            wait until <not <<(stage) = [12]> or <(stage) = [1]>>>\n            hide\n        else\n            hide\n        end\n    end\nend\n\nwhen I receive [リフト初期化 v]\nhide\nwait (0.13) seconds\nif <(stage) = [9]> then\n    show\n    repeat until <not <(stage) = [9]>>\n        set x to (-100)\n        repeat (60)\n            change x by (3)\n        end\n        wait (0.1) seconds\n        repeat (60)\n            change x by (-3)\n        end\n        wait (0.1) seconds\n    end\nelse\n    if <(stage) = [10]> then\n        show\n        set x to (-100)\n        repeat until <not <(stage) = [10]>>\n            repeat (140)\n                change x by (1.5)\n            end\n            wait (0.1) seconds\n            repeat (140)\n                change x by (-1.5)\n            end\n            wait (0.1) seconds\n        end\n    else\n        repeat until <not <(stage) = [12]>>\n            show\n            set x to (-100)\n            repeat (140)\n                change x by (1.5)\n            end\n            wait (0.1) seconds\n            repeat (140)\n                change x by (-1.5)\n            end\n            wait (0.1) seconds\n        end\n    end\nend\n\nwhen flag clicked\nhide\nforever\n    if <(stage) = [9]> then\n        show\n        set y to ((-35) - (([y position v] of [player v]) / (4)))\n    else\n        if <(stage) = [10]> then\n            show\n            set y to ((-125) - (([y position v] of [player v]) / (4)))\n        else\n            if <(stage) = [12]> then\n                show\n                set y to ((-125) - (([y position v] of [player v]) / (4)))\n            else\n                hide\n            end\n        end\n    end\nend\n\n@end\n\nwhen flag clicked\ngo to [back v] layer\ngo to x: () y: ()\nshow\nset [brightness v] effect to (0)\nforever\n    if <(stage) = [13]> then\n        wait (2) seconds\n        forever\n            show\n            set [brightness v] effect to (8)\n            set x to (0)\n            if <not <[-29] < ([y position v] of [player v])>> then\n                set y to (0)\n            end\n        end\n    else\n        hide\n    end\nend\n\nwhen flag clicked\nforever\n    point in direction ((([cos v] of ((timer) * (300)) ) * (8)) + (90))\n    set size to ((90) + (([cos v] of ((timer) * (600)) ) * (15))) %\nend\n\n@cabar\n\nwhen flag clicked\ngo to x: () y: ()\nshow\nwait (1) seconds\nset [ghost v] effect to (0)\nrepeat (10)\n    change [ghost v] effect by (10)\nend\nforever\n    set [ghost v] effect to (100)\nend\n\nwhen flag clicked\nforever\n    go to [front v] layer\nend\n\n@ground\n\nwhen flag clicked\nshow\nforever\n    go to [back v] layer\n    go to x: (0) y: (() - (([y position v] of [player v]) / (8)))\n    if <(stage) = [13]> then\n        wait (2) seconds\n        forever\n            switch costume to (コスチューム2 v)\n            go to x: (0) y: (() - (([y position v] of [player v]) / (8)))\n        end\n    else\n        switch costume to (コスチューム1 v)\n    end\nend\n\nwhen flag clicked\nforever\n    play sound [spectre by Alan walker v] until done\n    wait (5) seconds\nend\n\nset [stage v] to [12]\n\n@Back\n\nwhen flag clicked\nhide\nforever\n    if <(stage) = [13]> then\n        wait (2) seconds\n        forever\n            wait (0.3) seconds\n            create clone of (_myself_ v)\n            create clone of (_myself_ v)\n        end\n    else\n        wait (0.3) seconds\n        create clone of (_myself_ v)\n        create clone of (_myself_ v)\n    end\nend\n\nwhen I start as a clone\ngo [forward v] (1) layers\nset [ghost v] effect to (50)\ngo to x: (pick random (-200) to (200)) y: (-180)\nset size to (pick random (15) to (25)) %\nshow\nset [ghost v] effect to (0)\nif <(stage) = [13]> then\n    change [color v] effect by (pick random (1) to (100))\n    switch costume to (コスチューム2 v)\n    set [brightness v] effect to (10)\nelse\n    set [brightness v] effect to (0)\n    switch costume to (コスチューム1 v)\nend\nif <(pick random (1) to (2)) = [1]> then\n    repeat until <[175] < (y position)>\n        change y by (10)\n        turn right (8) degrees\n        change [ghost v] effect by (2.8)\n    end\nelse\n    repeat until <[175] < (y position)>\n        change y by (10)\n        turn right (-8) degrees\n        change [ghost v] effect by (2.8)\n    end\nend\ndelete this clone\n\n@演出\n\nwhen flag clicked\nhide\nset [stage v] to [1]\nwait until <(stage) = [13]>\nbroadcast (演出 v)\n\nwhen I receive [演出 v]\ngo [forward v] (3) layers\ngo to x: (0) y: (0)\nset [brightness v] effect to (-100)\nset [color v] effect to (0)\nset [48 v] to [0]\nrepeat (12)\n    wait (0.05) seconds\n    change [48 v] by (1)\n    create clone of (_myself_ v)\n    change [brightness v] effect by (10)\nend\nrepeat (12)\n    wait (0.05) seconds\n    change [48 v] by (1)\n    create clone of (_myself_ v)\n    change [color v] effect by (10)\nend\n\nwhen I start as a clone\nshow\nset size to (50) %\nrepeat (20)\n    switch costume to (コスチューム2 v)\n    set size to ((size) * (1.2)) %\n    switch costume to (コスチューム1 v)\nend\nif <(48) = [24]> then\n    wait (0.2) seconds\n    broadcast (end v)\n    repeat (10)\n        switch costume to (コスチューム2 v)\n        set size to ((size) * (0.7)) %\n        switch costume to (コスチューム1 v)\n    end\n    repeat (10)\n        change size by (-10)\n    end\nend\ndelete this clone\n\nset [stage v] to [12]\n\n@stage\n\nwhen flag clicked\ngo to x: () y: ()\nset [brightness v] effect to (0)\nclear graphic effects\nforever\n    go to x: (0) y: ((-30) - (([y position v] of [player v]) / (4)))\nend\n\nwhen I receive [next v]\nwait (0.2) seconds\nif <(stage) = [13]> then\n    wait (2) seconds\n    forever\n        switch costume to (stage)\n    end\nelse\n    switch costume to (stage)\nend\n\n@sun\n\nwhen I receive [演出 v]\ngo to x: (-220) y: (155)\nwait (2) seconds\nshow\nforever\n    set size to ((90) + (([cos v] of ((timer) * (600)) ) * (3))) %\nend\n\nwhen flag clicked\nhide\n\n@Hide\n\nwhen flag clicked\nhide\n\nwhen I receive [next v]\nif <(stage) = [13]> then\nelse\n    go to x: (500) y: (0)\n    go [forward v] (1) layers\n    set [ghost v] effect to (0)\n    show\n    glide (0.1) secs to x: (0) y: (0)\n    repeat (10)\n        point in direction ((([cos v] of ((timer) * (300)) ) * (15)) + (90))\n        change x by (-1)\n    end\n    repeat (10)\n        change [ghost v] effect by (10)\n    end\n    hide\nend\n\n
-----------------日本語の説明は下にあります---------------\n\nDefficulty:Easy~Normal\nMobile compatible.\n☆How to Play☆\n                           ・WASD key\n〇Move with       ・Arrow key\n                           ・Swipe\n☆Hi!☆\nHi, this is Arcade_Creator0123.\nI'm translating with Google Translate, so I'm sorry if my English goes wrong.I tried moving the stage with a platformer for the first time, how was it?But only when the character jumps.(lol)\n----------------------ここから日本語-----------------------------\n\n難易度:Easy~Normal\nモバイル対応\n☆操作☆\nWASDキーか矢印キーかスワイプ\n\n☆ハロー！☆\nどうもArcade_Creator0123です。\nモノクロをテーマにプラットフォーマーを作って\nみましたけどいろんなことに挑戦できて楽しかったです。というか普段ゲーム作ってないんだよなぁ。