Night  platfomer［platformer］#Nightplatformer
@Stage\n\nwhen flag clicked\nrepeat until <<key (r v) pressed?> or <key (s v) pressed?>>\n    set volume to (100) %\n    play sound (pick random (1) to (8)) until done\nend\n\nif <(音楽) = [1]> then\n    stop all sounds\nend\n\nwhen [r v] key pressed\nstop all sounds\nstart sound (pick random (1) to (10))\nset [音楽 v] to [1]\n\nwhen [s v] key pressed\nstop all sounds\nset [音楽 v] to [1]\n\nset [jかうんと v] to [10]\n\n@スプライト2\n\nwhen flag clicked\nwait (0.000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000001) seconds\n\nwhen flag clicked\nforever\n    hide\nend\n\nwhen flag clicked\nif <not <(username) = [DMk-7g8140]>> then\n    set [☁ 見た v] to [1]\nend\n\n@スプライト1\n\nwhen flag clicked\nスタート（リスタート）\nforever\n    if <(OK) = [0]> then\n        if <<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 <<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        set [x v] to ((x) * (0.9))\n        change x by (x)\n        change y by (1)\n        if <<<<touching (地面 v)?> or <touching (障害物 v)?>> or <touching (ugokuzimen v)?>> or <touching (文字 v)?>> then\n            change y by (1)\n            if <<<<touching (地面 v)?> or <touching (障害物 v)?>> or <touching (ugokuzimen v)?>> or <touching (文字 v)?>> then\n                change y by (1)\n                if <<<<touching (地面 v)?> or <touching (障害物 v)?>> or <touching (ugokuzimen v)?>> or <touching (文字 v)?>> then\n                    change y by (1)\n                    if <<<<touching (地面 v)?> or <touching (障害物 v)?>> or <touching (ugokuzimen v)?>> or <touching (文字 v)?>> then\n                        change y by (1)\n                        if <<<<touching (地面 v)?> or <touching (障害物 v)?>> or <touching (ugokuzimen v)?>> or <touching (文字 v)?>> then\n                            change y by (1)\n                            if <<<<touching (地面 v)?> or <touching (障害物 v)?>> or <touching (ugokuzimen v)?>> or <touching (文字 v)?>> then\n                                change x by ((0) - (x))\n                                change y by (-5)\n                                if <<not <<(jかうんと) = [5]> or <(jかうんと) = [9]>>> and <<key (up arrow v) pressed?> or <<[-50] < (mouse y)> and <mouse down?>>>> then\n                                    if <[0] < (x)> then\n                                        start sound [suck1 v]\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        change [y v] by (-1)\n        change y by (y)\n        if <<<<touching (地面 v)?> or <touching (障害物 v)?>> or <touching (ugokuzimen v)?>> or <touching (文字 v)?>> then\n            change y by ((0) - (y))\n            set [y v] to [0]\n        end\n        change y by (-2)\n        上名\n        if <<<touching (maguma v)?> or <<touching (マシーン1号 v)?> or <[-106] > (y position)>>> and <(落ちる) = [0]>> then\n            set [x v] to [0]\n            set [you died v] to [1]\n            set [y v] to [0]\n            change [ghost v] effect by (65)\n            broadcast (it v)\n            repeat (25)\n                change y by (2)\n            end\n            スタート（リスタート）\n        end\n        if <<<touching (マシーン1号 v)?> or <[-160] > (y position)>> and <(落ちる) = [1]>> then\n            set [x v] to [0]\n            set [you died v] to [1]\n            set [y v] to [0]\n            change [ghost v] effect by (65)\n            broadcast (it v)\n            repeat (25)\n                change y by (2)\n            end\n            スタート（リスタート）\n        end\n    end\nend\n\nwhen flag clicked\nforever\n    if <(x position) > [200]> then\n        broadcast (メッセージ1 v)\n        set x to (-175)\n        switch costume to (通常 v)\n        set [y v] to [0]\n        change [jかうんと v] by (1)\n    end\nend\n\nwhen I start as a clone\nrepeat (20)\n    change [ghost v] effect by (6)\n    change size by (-3.5)\nend\ndelete this clone\n\nwhen flag clicked\nforever\n    wait (0.01) seconds\n    create clone of (_myself_ v)\nend\n\nwhen flag clicked\nforever\n    if <(YOU DIED) = [1]> then\n        repeat until <(YOU DIED) = [0]>\n            switch costume to (あの世へw v)\n        end\n    end\n    if <<not <key (down arrow v) pressed?>> or > then\n        switch costume to (通常 v)\n    end\n    if <<<key (down arrow v) pressed?> or <<(mouse y) < [-50]> and <mouse down?>>> and <(YOU DIED) = [0]>> then\n        repeat until <<<not <key (down arrow v) pressed?>> or <not <<(mouse y) < [-50]> and <mouse down?>>>> or <not <(YOU DIED) = [0]>>>\n            switch costume to (しゃがみ v)\n        end\n    end\nend\n\ndefine 上名\nif <<<key (up arrow v) pressed?> or <<[-50] < (mouse y)> and <mouse down?>>> and <<touching (地面 v)?> or <touching (障害物 v)?>>> then\n    start sound [suck1 v]\n    set [y v] to [14]\nend\n\nwhen flag clicked\nset [いたい v] to [0]\nforever\n    if <touching (maguma v)?> then\n        set [いたい v] to [1]\n    end\nend\n\nwhen I receive [メッセージ1 v]\nset [いたい v] to [0]\nset [y v] to [0]\n\ndefine スタート（リスタート）\nset [y v] to [0]\nset [x v] to [0]\nset x to (-175)\nset [ghost v] effect to (0)\nset size to (100) %\nswitch costume to (通常 v)\nset rotation style [left-right v]\nset [いたい v] to [0]\nset [you died v] to [0]\nif <(落ちる) = [0]> then\n    set y to (-50)\nend\nif <(落ちる) = [1]> then\n    set y to (60)\nend\nshow\n\nwhen I receive [it v]\nif <not <(いたい) = [1]>> then\n    start sound [crashed oof v]\nend\n\nwhen I receive [it v]\nstart sound [crashed oof v]\n\nwhen I receive [メッセージ1 v]\nスタート（リスタート）\n\nwhen flag clicked\nset [ok v] to [0]\ngo [forward v] (1) layers\n\nwhen flag clicked\nforever\n    if <(x position) > [175]> then\n        if <<(jかうんと) = [4]> or <(jかうんと) = [8]>> then\n            broadcast (メッセージ2 v)\n        end\n        if <<(jかうんと) = [5]> or <(jかうんと) = [9]>> then\n            broadcast (メッセージ3 v)\n        end\n    end\n    if <[175] > (x position)> then\n        if <<(jかうんと) = [5]> or <(jかうんと) = [9]>> then\n            broadcast (メッセージ2 v)\n        end\n    end\nend\n\n@マシーン1号\n\nwhen flag clicked\ngo [backward v] (1) layers\nhide\n\nwhen I receive [メッセージ1 v]\nwait (1) seconds\nif <not <<<(jかうんと) < [4]> or <<(jかうんと) = [3]> or <(jかうんと) = [6]>>> or <<(jかうんと) = [7]> or >>> then\n    hide\nend\nif <(jかうんと) = [4]> then\n    go to x: (110) y: (178)\n    show\nend\nif <(jかうんと) = [3]> then\n    switch costume to (コスチューム1 v)\n    go to x: (39) y: (26)\n    show\nend\nif <(jかうんと) = [6]> then\n    switch costume to (コスチューム2 v)\n    go to x: (30) y: (20)\n    show\nend\nif <(jかうんと) = [7]> then\n    switch costume to (コスチューム3 v)\n    go to x: (-30) y: (-36)\n    show\nend\nif <(jかうんと) = [10]> then\n    go to [back v] layer\n    switch costume to (コスチューム1 v)\n    go to x: (180) y: (208)\n    show\nend\n\n@ugokuzimen\n\nwhen flag clicked\ngo to [front v] layer\nset x to (50)\nhide\n\nwhen I receive [メッセージ1 v]\nwait (1) seconds\nif <(jかうんと) = [9]> then\n    show\n    repeat until <not <(jかうんと) = [9]>>\n        repeat (32)\n            change x by (2.5)\n        end\n        repeat (32)\n            change x by (-2.5)\n        end\n    end\nelse\n    hide\nend\n\n@障害物\n\nwhen flag clicked\nset [jかうんと v] to [0]\ngo to [back v] layer\nhide\n\nwhen I receive [メッセージ1 v]\nwait (1) seconds\ngo to x: (27) y: (18)\nif <<(jかうんと) = [2]> or <<(jかうんと) = [4]> or <<(jかうんと) = [7]> or <(jかうんと) = [10]>>>> then\n    next costume\n    show\nelse\n    hide\nend\nif <(jかうんと) = [1]> then\n    switch costume to (コスチューム1 v)\n    show\nend\n\n@スプライト3\n\nwhen flag clicked\ngo to [front v] layer\npoint in direction (30)\ngo to x: (-170) y: (100)\nset size to (100) %\nset [tuki v] to [100]\nforever\n    change size by ([cos v] of (tuki) )\n    change [tuki v] by (4)\nend\n\nwhen I receive [メッセージ1 v]\nwait (0.8) seconds\nif <(jかうんと) > [6]> then\n    change x by (10)\nend\nif <[6] > (jかうんと)> then\n    move (10) steps\nend\nif <(jかうんと) > [25]> then\n    point in direction (135)\n    move (10) steps\nend\nif <(jかうんと) = [11]> then\n    go to x: (-170) y: (100)\nend\n\n@LB Dance\n\nwhen flag clicked\nset size to (100) %\npoint in direction (30)\nset [new v] to [100]\ngo to x: (-170) y: (100)\ngo to [back v] layer\nforever\n    change size by ([cos v] of (new) )\n    change [new v] by (4)\nend\n\nwhen I receive [メッセージ1 v]\nwait (0.8) seconds\nif <[6] < (jかうんと)> then\n    change x by (10)\nend\nif <[25] < (jかうんと)> then\n    point in direction (135)\n    move (10) steps\nend\nif <(jかうんと) < [6]> then\n    move (10) steps\nend\nif <(jかうんと) = [11]> then\n    go to x: (-170) y: (100)\nend\n\n@サムネイル\n\nwhen flag clicked\nhide\n\nchange [ghost v] effect by (80)\nwait (1) seconds\n\n@文字\n\nwhen flag clicked\nswitch costume to (コスチューム1 v)\nshow\nset [ghost v] effect to (100)\nwait (0.3) seconds\nrepeat (60)\n    change [ghost v] effect by (-3)\nend\n\nwhen I receive [メッセージ1 v]\nwait (0.5) seconds\nif <(jかうんと) = [11]> then\n    go to [front v] layer\nend\nif <<<(jかうんと) = [8]> or <(jかうんと) = [11]>> or <<(jかうんと) = [3]> or <(jかうんと) = [6]>>> then\n    next costume\n    show\n    set [ghost v] effect to (100)\n    wait (1.6) seconds\n    repeat (50)\n        change [ghost v] effect by (-7.7)\n    end\nelse\n    hide\nend\n\n@maguma\n\nwhen flag clicked\nhide\n\nwhen I receive [メッセージ1 v]\nwait (1) seconds\nif <(jかうんと) = [8]> then\n    set y to (30)\n    go [forward v] (5) layers\n    switch costume to (コスチューム1 v)\n    show\nelse\n    hide\nend\nif <(jかうんと) = [10]> then\n    switch costume to (コスチューム2 v)\n    set y to (120)\n    go to [back v] layer\n    show\n    repeat until <not <(jかうんと) = [10]>>\n        repeat (20)\n            change y by (1)\n        end\n        repeat (20)\n            change y by (-1)\n        end\n    end\nend\n\n@スプライト5\n\nwhen I receive [メッセージ1 v]\nstart sound [決定、ボタン押下33 v]\nset [ok v] to [1]\ngo to [front v] layer\nshow\ngo to x: (-1000) y: (10000)\nrepeat (25)\n    change x by ((1) - ((x position) / (4)))\n    change y by ((-1) - ((y position) / (4)))\nend\nrepeat (30)\n    change x by ((x position) / (5))\n    change y by ((y position) / (5))\nend\nset [ok v] to [0]\nset [y v] to [0]\nhide\n\nwhen flag clicked\nhide\n\n@スプライト6\n\nwhen I receive [r v]\ngo to x: (141) y: (28)\nshow\nset [変数 v] to [0]\nset [ghost v] effect to (100)\nwait (0.5) seconds\nrepeat (50)\n    change [ghost v] effect by (-7.7)\nend\nforever\n    set [変数 v] to (((変数) + (4)) mod (360))\n    change x by (([cos v] of (変数) ) * (10))\nend\n\nwhen flag clicked\nhide\n\n@薄力粉\n\nwhen I start as a clone\nshow\nswitch costume to (pick random (1) to (4))\nset size to (pick random (10) to (25)) %\nset [ghost v] effect to (pick random (20) to (50))\ngo to x: (pick random (-180) to (180)) y: (-180)\npoint in direction (pick random (1) to (360))\nset [粉末 v] to (size)\nset [薄力粉 v] to (pick random (-5) to (5))\nrepeat (粉末)\n    change x by (薄力粉)\n    change y by (粉末)\n    turn right (薄力粉) degrees\n    change [粉末 v] by (-1)\nend\nrepeat until <touching (_edge_ v)?>\n    change x by (薄力粉)\n    change y by (粉末)\n    turn right (薄力粉) degrees\n    change [粉末 v] by (-1)\nend\ndelete this clone\n\ndefine Particle\nrepeat (100)\n    create clone of (_myself_ v)\nend\n\nwhen I receive [薄力粉 v]\nrepeat (20)\n    create clone of (_myself_ v)\nend\n\nwhen I receive [薄力粉！ v]\nParticle\n\n@地面\n\nwhen flag clicked\nshow\nswitch costume to (コスチューム2 v)\nswitch backdrop to (背景1 v)\n\nwhen backdrop switches to [背景2 v]\nset [落ちる v] to [1]\n\nwhen backdrop switches to [背景1 v]\nset [落ちる v] to [0]\n\nwhen I receive [メッセージ1 v]\nwait (0.5) seconds\nif <(jかうんと) = [5]> then\n    switch costume to (コスチューム3 v)\n    switch backdrop to (背景2 v)\nend\nif <(jかうんと) = [9]> then\n    switch costume to (コスチューム4 v)\n    switch backdrop to (背景2 v)\nend\nif <not <<(jかうんと) = [5]> or <(jかうんと) = [9]>>> then\n    switch costume to (コスチューム2 v)\n    switch backdrop to (背景1 v)\nend\nif <(jかうんと) = [11]> then\n    switch costume to (コスチューム5 v)\n    switch backdrop to (背景2 v)\n    broadcast (さあ！ v)\nend\n\nwhen I receive [メッセージ2 v]\nset [落ちる v] to [1]\n\nwhen I receive [メッセージ3 v]\nset [落ちる v] to [0]\n\nwhen I receive [さあ！ v]\nwait (1) seconds\nbroadcast (r v)\nwait (1) seconds\nforever\n    broadcast (薄力粉！ v)\n    wait (2.5) seconds\nend\n\nrepeat (10)\n\n
矢印移動。move with arrow\nモバイル対応。mobile✅\n曲はランダムです。music is randomly\n「R」keyで変えられる。change with R key\n自分が好きな曲を入れました！\n色々試して下さい！d(^_^o)！\n\n⭐️と❤️押してね！！！\n\nちなみにこれ自身初プラットフォーマーです。\n我ながらいいと思う。