sunset Platformer 100 Stage! 夕暮れ
@Stage\n\nwhen I receive [開始 v]\nswitch backdrop to (背景 v)\n\nwhen flag clicked\nswitch backdrop to (背景2 v)\n\nwhen I receive [よし v]\nswitch backdrop to (背景2 v)\n\n@プラフォ君\n\ndefine fast\nrepeat (6)\n    if <touching (地面 v)?> then\n        change y by (1)\n    end\nend\n\ndefine 横移動\nrepeat until <not <touching (地面 v)?>>\n    if <(x) > [0]> then\n        change x by (-1)\n    else\n        change x by (1)\n    end\nend\n\ndefine 縦移動\nrepeat until <not <touching (地面 v)?>>\n    if <(y) > [0]> then\n        change y by (-1)\n    else\n        change y by (1)\n    end\nend\n\nwhen I receive [開始 v]\nset rotation style [left-right v]\n初期化\nswitch costume to (コスチューム変更)\nforever\n    change [y v] by (-1)\n    if <<key (left arrow v) pressed?> or <<key (a v) pressed?> or <<mouse down?> and <(x position) > (mouse x)>>>> then\n        change [x v] by (-1)\n        point in direction (-90)\n    end\n    if <<key (right arrow v) pressed?> or <<key (d v) pressed?> or <<mouse down?> and <(mouse x) > (x position)>>>> 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    if <touching (地面 v)?> then\n        fast\n        if <touching (地面 v)?> then\n            change y by (-5)\n            横移動\n        end\n        if <<key (up arrow v) pressed?> or <<key (w v) pressed?> or <<mouse down?> and <(mouse y) > (y position)>>>> then\n            start sound [壁 v]\n            set [y v] to [13]\n            if <([abs v] of (x) ) = (x)> then\n                set [x v] to [-4]\n            else\n                set [x v] to [4]\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        縦移動\n        if <<key (up arrow v) pressed?> or <<key (w v) pressed?> or <<mouse down?> and <(mouse y) > (y position)>>>> then\n            start sound [ジャンプ v]\n            set [y v] to [13.5]\n        else\n            set [y v] to [0]\n        end\n    end\nend\n\nwhen I receive [開始 v]\nforever\n    if <touching (障害物 v)?> then\n        go to x: (-200) y: (30)\n        start sound [空気 v]\n        set [x v] to [0]\n        set [y v] to [0]\n    end\n    if <[-182] > (y position)> then\n        go to x: (-200) y: (30)\n        start sound [空気 v]\n        set [x v] to [0]\n        set [y v] to [0]\n    end\n    if <touching (回転 v)?> then\n        go to x: (-200) y: (30)\n        start sound [空気 v]\n        set [x v] to [0]\n        set [y v] to [0]\n    end\n    if <touching (回転2 v)?> then\n        go to x: (-200) y: (30)\n        start sound [空気 v]\n        set [x v] to [0]\n        set [y v] to [0]\n    end\n    if <touching (回転3 v)?> then\n        go to x: (-200) y: (30)\n        start sound [空気 v]\n        set [x v] to [0]\n        set [y v] to [0]\n    end\n    if <touching (回転4 v)?> then\n        go to x: (-200) y: (30)\n        start sound [空気 v]\n        set [x v] to [0]\n        set [y v] to [0]\n    end\n    if <touching (トゲ v)?> then\n        go to x: (-200) y: (30)\n        start sound [空気 v]\n        set [x v] to [0]\n        set [y v] to [0]\n    end\nend\n\nwhen I receive [開始 v]\nrepeat until <([costume # v] of [地面 v]) = [100]>\n    if <(x position) > [239]> then\n        go to x: (-200) y: (30)\n        broadcast (level v)\n    end\nend\n\nwhen flag clicked\nhide\n\ndefine 初期化\nset [x v] to [0]\nset [y v] to [0]\npoint in direction (90)\nshow\nset size to (100) %\ngo to x: (-200) y: (30)\n\nwhen I receive [開始 v]\nset volume to (volume) %\n\nwhen I receive [よし v]\nstop [other scripts in sprite v]\nhide\n\nwhen I receive [開始 v]\nclear graphic effects\nforever\n    if <(costume [number v]) = [7]> then\n        change [color v] effect by (1)\n    else\n        clear graphic effects\n    end\nend\n\n@地面\n\nwhen flag clicked\nset [brightness v] effect to (-15)\nhide\nswitch costume to (ステージ1 v)\n\nwhen I receive [level v]\nnext costume\n\nwhen I receive [開始 v]\nshow\nforever\n    go to x: (46) y: (5)\nend\n\nwhen I receive [よし v]\nhide\n\n@障害物\n\nwhen flag clicked\nswitch costume to (1 v)\nhide\n\nwhen I receive [開始 v]\nshow\n\nwhen flag clicked\nforever\n    switch costume to ([costume # v] of [地面 v])\nend\n\n@秒数\n\nwhen I start as a clone\nforever\n    if <[22] < (length of (秒))> then\n        hide\n        show variable [秒 v]\n    else\n        show\n        switch costume to (letter (数字番号) of (秒))\n        hide variable [秒 v]\n    end\nend\n\ndefine 配置\ngo to x: (-250) y: (155)\nhide\nset [数字番号 v] to [0]\nrepeat (22)\n    change [数字番号 v] by (1)\n    change x by (20)\n    create clone of (_myself_ v)\nend\nswitch costume to (+ v)\nshow\ngo to x: (-250) y: (135)\n\nwhen I receive [開始 v]\nset [秒 v] to [0]\nrepeat until <([costume # v] of [地面 v]) = [100]>\n    wait (1) seconds\n    change [秒 v] by (1)\nend\nif <(☁ world) > (秒)> then\n    set [☁ world v] to (秒)\nend\n\nwhen I receive [開始 v]\n配置\n\n@次\n\nwhen I receive [level v]\nstart sound [ふっ v]\n\n@ぷれい\n\nwhen flag clicked\nset [ok1 v] to [0]\nswitch costume to (コスチューム1 v)\nhide\nrepeat until <(ok1) = [1]>\n    if <touching (mouse-pointer v)?> then\n        set size to (110) %\n        set [brightness v] effect to (20)\n    else\n        clear graphic effects\n        set size to (100) %\n    end\nend\n\nwhen this sprite clicked\nif <<not <([costume # v] of [プラフォ君表示用の v]) = [7]>> or <<([costume # v] of [プラフォ君表示用の v]) = [7]> and <(鍵) = [1]>>> then\n    play sound [決定 v] until done\n    set [ok1 v] to [1]\n    switch costume to (コスチューム1 v)\n    set volume to (volume) %\n    broadcast (引退 v)\n    broadcast (演出 v)\n    hide\nend\n\nwhen I receive [ホーム画面 v]\nshow\nforever\n    set volume to (volume) %\nend\n\n@曲の管理\n\nwhen I receive [開始 v]\nset [音楽の管理 v] to [1]\nset volume to (volume) %\nstop all sounds\nforever\n    play sound [Jim Yosef - Eclipse v] until done\nend\n\nwhen I receive [ホーム画面 v]\nrepeat until <(音楽の管理) = [1]>\n    play sound [yt1s v] until done\nend\nstop all sounds\n\nwhen I receive [引退 v]\nset [音楽の管理 v] to [1]\nstop all sounds\n\nwhen flag clicked\nset [音楽の管理 v] to [0]\n\n@サムネイル\n\nwhen flag clicked\nhide\nforever\n    reset timer\nend\n\nwhen [timer v] > (0.0001)\nbroadcast (上がりません v)\nset [サムネの動き v] to [-25]\ngo to [front v] layer\nshow\ngo to x: (0) y: (287)\nrepeat (10)\n    change y by (サムネの動き)\n    change [サムネの動き v] by (1.5)\nend\nrepeat (20)\n    change y by (サムネの動き)\n    change [サムネの動き v] by (0.5)\nend\n\n@ホーム\n\nwhen I receive [黒く v]\nhide\n\nwhen I receive [演出 v]\nbroadcast (黒く v)\n\nwhen I receive [ホーム画面 v]\nclear graphic effects\nshow\nforever\n    go to [back v] layer\n    go to x: (0) y: (0)\nend\n\nwhen flag clicked\nhide\n\nwhen flag clicked\nswitch costume to (コスチューム1 v)\n\n@スプライト2\n\nwhen flag clicked\nshow\nset [ghost v] effect to (100)\n\nwhen I receive [黒く v]\nshow\nrepeat (10)\n    change [ghost v] effect by (-10)\nend\nwait (0.5) seconds\nrepeat (10)\n    change [ghost v] effect by (10)\nend\nhide\nbroadcast (開始 v)\n\nwhen this sprite clicked\nhide\nbroadcast (開始 v)\n\n@スプライト3\n\nwhen I receive [level v]\nswitch costume to (pick random (1) to (6))\nset [ghost v] effect to (100)\nshow\nrepeat (10)\n    change [ghost v] effect by (-10)\nend\nwait (0.1) seconds\nrepeat (10)\n    change [ghost v] effect by (10)\nend\nhide\n\nwhen flag clicked\ngo to [front v] layer\nhide\n\n@イントロバージョン2\n\nwhen flag clicked\nhide\nwait (0.5) seconds\nswitch costume to (コスチューム1 v)\ngo to x: (0) y: (212)\nshow\nglide (0.1) secs to x: (0) y: (0)\nstart sound [金属ロゴ表示1 v]\nrepeat (12)\n    next costume\nend\nrepeat (20)\n    change [ghost v] effect by (5)\nend\nbroadcast (ホーム画面 v)\n\nwhen flag clicked\ngo to x: (0) y: (212)\nwait (0.3) seconds\nset [ghost v] effect to (100)\nrepeat (25)\n    change [ghost v] effect by (-4)\nend\n\n@タボ-\n\nwhen flag clicked\nforever\n    set [turbo v] to [0]\n    wait (0.00001) seconds\n    if <[5] < (Turbo)> then\n        broadcast (ターボやめてね v)\n    end\nend\n\nwhen flag clicked\ngo to [front v] layer\ngo to x: (0) y: (0)\nforever\n    change [turbo v] by (2)\nend\n\nwhen I receive [ターボやめてね v]\nstop [all v]\n\n@回転\n\nwhen flag clicked\nforever\n    if <([costume # v] of [地面 v]) = [13]> then\n        turn right (-5) degrees\n        show\n    else\n        if <([costume # v] of [地面 v]) = [97]> then\n            turn right (-5) degrees\n            show\n        else\n            hide\n        end\n    end\nend\n\n@回転2\n\nwhen flag clicked\nforever\n    go to [back v] layer\n    if <([costume # v] of [地面 v]) = [14]> then\n        turn right (5) degrees\n        show\n    else\n        hide\n    end\nend\n\n@回転3\n\nwhen flag clicked\nforever\n    go to [back v] layer\n    if <([costume # v] of [地面 v]) = [19]> then\n        go to x: (111) y: (-101)\n        turn right (5) degrees\n        show\n    else\n        if <([costume # v] of [地面 v]) = [96]> then\n            go to x: (141) y: (-90)\n            turn right (5) degrees\n            show\n        else\n            hide\n        end\n    end\nend\n\n@雲\n\nwhen I start as a clone\nset [ghost v] effect to (50)\nshow\ngo to x: (400) y: (0)\nglide (5) secs to x: (-100) y: (0)\nhide\ndelete this clone\n\nwhen I receive [開始 v]\nhide\nforever\n    switch costume to (pick random (1) to (3))\n    create clone of (_myself_ v)\n    wait (4) seconds\nend\n\nwhen flag clicked\nhide\n\n@ガイド役\n\nwhen flag clicked\nforever\n    if <([costume # v] of [地面 v]) = [100]> then\n        show\n    else\n        hide\n    end\nend\n\n@回転4\n\nwhen flag clicked\nforever\n    go to [back v] layer\n    if <([costume # v] of [地面 v]) = [40]> then\n        turn right (5) degrees\n        show\n    else\n        hide\n    end\nend\n\n@バネ\n\nwhen flag clicked\nhide\nforever\n    if <([costume # v] of [地面 v]) = [43]> then\n        go to x: (-80) y: (-101)\n        ジャンプ\n    else\n        if <([costume # v] of [地面 v]) = [44]> then\n            go to x: (-200) y: (-155)\n            ジャンプ\n        else\n            if <([costume # v] of [地面 v]) = [54]> then\n                go to x: (-200) y: (-155)\n                ジャンプ\n            else\n                if <([costume # v] of [地面 v]) = [57]> then\n                    go to x: (0) y: (-155)\n                    ジャンプ\n                else\n                    if <([costume # v] of [地面 v]) = [91]> then\n                        go to x: (0) y: (-155)\n                        ジャンプ\n                    else\n                        hide\n                    end\n                end\n            end\n        end\n    end\nend\n\ndefine ジャンプ\nshow\nif <touching (プラフォ君 v)?> then\n    switch costume to (2 v)\n    set [y v] to [22]\n    start sound [ジャンプ v]\nelse\n    switch costume to (1 v)\nend\n\n@バネ2\n\nwhen flag clicked\nhide\nforever\n    if <([costume # v] of [地面 v]) = [44]> then\n        go to x: (50) y: (-155)\n        ジャンプ\n    else\n        if <([costume # v] of [地面 v]) = [57]> then\n            go to x: (50) y: (-155)\n            ジャンプ\n        else\n            hide\n        end\n    end\nend\n\ndefine ジャンプ\nshow\nif <touching (プラフォ君 v)?> then\n    switch costume to (2 v)\n    set [y v] to [22]\n    start sound [ジャンプ v]\nelse\n    switch costume to (1 v)\nend\n\nif <([costume # v] of [地面 v]) = [9]> then\n    hide\nend\n\n@トゲ\n\nwhen flag clicked\ngo to x: (100) y: (50)\nforever\n    go to [back v] layer\n    if <([costume # v] of [地面 v]) = [99]> then\n        show\n        repeat (26)\n            change y by (-5)\n        end\n        repeat (26)\n            change y by (5)\n        end\n    else\n        hide\n    end\nend\n\n
【How to operate】\nUse the arrow keys or tap, or the w, a, and d keys. \n\n【操作方法】\n十字キー、wad、タップで操作。\n拡散してね^^