Christmas Platformer 
@Stage\n\n@オープニング\n\nwhen flag clicked\nwait (0.01) seconds\nset [オープニング準備① v] to [1]\nset [オープニング準備② v] to [0]\nshow\nclear graphic effects\nset size to (100) %\nswitch costume to (タイトル-1 v)\ngo to x: (0) y: (215)\ncreate clone of (_myself_ v)\nset [y v] to [0]\nrepeat (14)\n    change [y v] by (-2)\n    change y by (Y)\nend\nstart sound [効果音-1 v]\ngo to x: (0) y: (0)\nset [y v] to [20]\nset [オープニング準備② v] to [1]\nrepeat (18)\n    change [y v] by (-2)\n    change y by (Y)\nend\nstart sound [効果音-1 v]\nset [y v] to [10]\nrepeat (9)\n    change [y v] by (-2)\n    change y by (Y)\nend\nstart sound [効果音-1 v]\ncreate clone of (_myself_ v)\nwait until <(オープニング準備①) = [0]>\nwait (0.2) seconds\nstart sound [効果音-2 v]\nswitch costume to (タイトル-2 v)\nrepeat (2)\n    change size by (5)\nend\nrepeat (2)\n    change size by (-5)\nend\nwait (0.5) seconds\nset [オープニング準備① v] to [^_^]\nbroadcast (START v)\nrepeat (25)\n    change [ghost v] effect by (4)\nend\nhide\n\nwhen I start as a clone\nif <(オープニング準備②) = [0]> then\n    go to x: (0) y: (0)\n    set size to (100) %\n    go to [back v] layer\n    switch costume to (クローン-幕 v)\n    wait until <(オープニング準備①) = [^_^]>\n    repeat (25)\n        change [ghost v] effect by (4)\n    end\n    delete this clone\nend\nif <(オープニング準備②) = [1]> then\n    set size to (85) %\n    go to [front v] layer\n    switch costume to (クローン-プレイヤー v)\n    go to x: (-115) y: (215)\n    set [y v] to [-5]\n    repeat (9)\n        change y by (Y)\n        change [y v] by (-1.1)\n    end\n    wait (0.5) seconds\n    start sound [効果音-3 v]\n    set [y v] to [10]\n    repeat (21)\n        change y by (Y)\n        change [y v] by (-1)\n    end\n    set [オープニング準備① v] to [0]\n    wait until <(オープニング準備①) = [^_^]>\n    repeat (25)\n        change [ghost v] effect by (4)\n    end\n    delete this clone\nend\n\n@プレイヤー\n\nwhen flag clicked\nhide\nset [ステージ v] to [1]\nset [プレイヤーx v] to [0]\nset [プレイヤーy v] to [0]\nset [やられた回数 v] to [0]\nforever\n    go to [front v] layer\n    if <(プレイヤーY) > [0]> then\n        switch costume to (ジャンプ v)\n    else\n        switch costume to (普通 v)\n    end\nend\n\nwhen I receive [start v]\nbroadcast (敵の配置 v)\nbroadcast (コインの配置 v)\nbroadcast (START•Gole地点の位置 v)\nset [時間\(全スプライト\) v] to [1]\nwait (2) seconds\ngo to x: (-300) y: (-80)\nrepeat (30)\n    show\n    point in direction (90)\n    set rotation style [left-right v]\n    change x by (((-150) - (x position)) / (10))\nend\nset [時間\(全スプライト\) v] to [0]\nforever\n    if <(時間\(全スプライト\)) = [0]> then\n        if <<key (right arrow v) pressed?> or <<mouse down?> and <(x position) < (mouse x)>>> then\n            change [プレイヤーx v] by (0.8)\n            point in direction (90)\n        end\n        if <<key (left arrow v) pressed?> or <<mouse down?> and <(mouse x) < (x position)>>> then\n            change [プレイヤーx v] by (-0.8)\n            point in direction (-90)\n        end\n        change x by (プレイヤーX)\n        set [プレイヤーx v] to ((プレイヤーX) * (0.9))\n        if <touching (ステージ v)?> then\n            change y by (1)\n            if <touching (ステージ v)?> then\n                change y by (1)\n                if <touching (ステージ v)?> then\n                    change y by (1)\n                    if <touching (ステージ v)?> then\n                        change y by (1)\n                        if <touching (ステージ v)?> then\n                            change y by (1)\n                            if <touching (ステージ v)?> then\n                                change x by ((プレイヤーX) * (-1.2))\n                                change y by (-5)\n                                if <(プレイヤーX) > [0]> then\n                                    set [プレイヤーx v] to [0]\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 by (-1)\n        if <<key (up arrow v) pressed?> or <<mouse down?> and <(y position) < (mouse y)>>> then\n            if <touching (ステージ v)?> then\n                start sound [ジャンプ v]\n                set [プレイヤーy v] to [15]\n            end\n        end\n        change y by (プレイヤーY)\n        change [プレイヤーy v] by (-1)\n        if <touching (ステージ v)?> then\n            change y by ((プレイヤーY) * (-1))\n            set [プレイヤーy v] to [0]\n        end\n    end\n    if <touching (start･gole 地点 v)?> then\n        start sound [ステージ v]\n        set [時間\(全スプライト\) v] to [1]\n        change [ステージ v] by (1)\n        wait (0.1) seconds\n        broadcast (敵の配置 v)\n        broadcast (コインの配置 v)\n        broadcast (START•Gole地点の位置 v)\n        point in direction (90)\n        go to x: (-195) y: (-65)\n        set [プレイヤーx v] to [0]\n        set [プレイヤーy v] to [0]\n        set [やられた回数 v] to [0]\n        set [時間\(全スプライト\) v] to [0]\n    end\n    if <(y position) < [-182]> then\n        broadcast (やられた v)\n        set [時間\(全スプライト\) v] to [1]\n        change [やられた回数 v] by (1)\n        set [プレイヤーx v] to [0]\n        set [プレイヤーy v] to [0]\n        start sound [ダメージ v]\n        repeat (20)\n            change [ghost v] effect by (5)\n        end\n        point in direction (90)\n        set rotation style [left-right v]\n        go to x: (-195) y: (-65)\n        clear graphic effects\n        set [時間\(全スプライト\) v] to [0]\n    end\n    if <<<touching (棘 v)?> or <touching (敵 v)?>> or <touching (鉄球 v)?>> then\n        broadcast (やられた v)\n        set [時間\(全スプライト\) v] to [1]\n        change [やられた回数 v] by (1)\n        set [プレイヤーx v] to [0]\n        set [プレイヤーy v] to [0]\n        start sound [ダメージ v]\n        set rotation style [all around v]\n        set [プレイヤーy v] to [8]\n        repeat (25)\n            turn right (20) degrees\n            change y by (プレイヤーY)\n            change [プレイヤーy v] by (-1)\n            change [ghost v] effect by (1)\n        end\n        point in direction (90)\n        set rotation style [left-right v]\n        go to x: (-195) y: (-65)\n        clear graphic effects\n        set [時間\(全スプライト\) v] to [0]\n    end\nend\n\nwhen I receive [start v]\nforever\n    if <(時間\(全スプライト\)) = [0]> then\n        if <key (space v) pressed?> then\n            set [プレイヤーx v] to [0]\n            change [溜め技 v] by (1)\n            change size by (0.1)\n            change [brightness v] effect by (1)\n            if <[50] < (溜め技)> then\n                create clone of (_myself_ v)\n                set [溜め技 v] to [0]\n                clear graphic effects\n                wait until <not <key (space v) pressed?>>\n            end\n        else\n            set [溜め技 v] to [0]\n            clear graphic effects\n            set size to (85) %\n        end\n    end\nend\n\nwhen I start as a clone\nstart sound [氷 v]\nswitch costume to (氷 v)\nset rotation style [all around v]\nrepeat (20)\n    set [x v] to (x position)\n    set [y v] to (y position)\n    if <(direction) = [90]> then\n        change [ghost v] effect by (1)\n        change x by (10)\n    else\n        change [ghost v] effect by (1)\n        change x by (-10)\n    end\n    if <touching (敵 v)?> then\n        broadcast (倒した v)\n    end\n    if <touching (木箱 v)?> then\n        broadcast (壊した v)\n    end\n    create clone of (波紋 v)\n    set [波紋の大きさ v] to [0]\nend\nset [波紋の大きさ v] to [1]\ncreate clone of (波紋 v)\nstart sound [氷壊れる v]\ndelete this clone\n\n@ステージ\n\nwhen I receive [start v]\nshow\nforever\n    go to [back v] layer\n    switch costume to (ステージ)\n    go to x: (0) y: (0)\nend\n\nwhen flag clicked\nhide\n\n@ダミーステージ\n\nwhen I receive [start v]\nshow\nforever\n    go to [back v] layer\n    switch costume to (ステージ)\n    go to x: (0) y: (0)\nend\n\nwhen flag clicked\nhide\n\n@コイン\n\ndefine コインの配置 (x) (y)\ngo to x: (x) y: (y)\ncreate clone of (_myself_ v)\n\ndefine 削除\ndelete this clone\n\nwhen I receive [コインの配置 v]\n削除\nif <(ステージ) = [1]> then\n    コインの配置 [60] [0]\n    コインの配置 [90] [0]\n    コインの配置 [120] [0]\n    コインの配置 [-85] [30]\n    コインの配置 [115] [110]\nend\nif <(ステージ) = [2]> then\n    コインの配置 [-35] [15]\n    コインの配置 [-5] [15]\n    コインの配置 [-165] [110]\nend\nif <(ステージ) = [3]> then\n    コインの配置 [-25] [-30]\n    コインの配置 [-25] [0]\n    コインの配置 [-25] [30]\n    コインの配置 [-25] [60]\nend\nif <(ステージ) = [4]> then\n    コインの配置 [-30] [60]\n    コインの配置 [0] [60]\n    コインの配置 [165] [60]\n    コインの配置 [195] [60]\nend\nif <(ステージ) = [5]> then\n    コインの配置 [5] [105]\n    コインの配置 [25] [105]\n    コインの配置 [45] [105]\n    コインの配置 [65] [105]\n    コインの配置 [85] [105]\n    コインの配置 [105] [105]\n    コインの配置 [125] [105]\n    コインの配置 [145] [105]\nend\nif <(ステージ) = [7]> then\n    コインの配置 [-185] [70]\n    コインの配置 [-165] [70]\n    コインの配置 [-145] [70]\nend\nif <(ステージ) = [8]> then\n    コインの配置 [-30] [120]\nend\n\nwhen I start as a clone\nshow\nrepeat until <touching (プレイヤー v)?>\n    next costume\nend\nstart sound [Coin v]\ndelete this clone\n\nwhen I start as a clone\nclear graphic effects\nrepeat until <touching (プレイヤー v)?>\n    repeat (10)\n        change [brightness v] effect by (2)\n        wait (0.05) seconds\n    end\n    repeat (10)\n        change [brightness v] effect by (-2)\n        wait (0.05) seconds\n    end\nend\n\n@雪\n\nwhen flag clicked\nforever\n    hide\n    go to x: (pick random (240) to (-240)) y: (200)\n    create clone of (_myself_ v)\nend\n\nwhen I start as a clone\nshow\nset size to (pick random (50) to (120)) %\nset [ghost v] effect to (pick random (20) to (50))\nset [雪の落下速度 v] to (pick random (-2) to (-5))\nrepeat until <<touching (ステージ v)?> or <(y position) < [-175]>>\n    go [forward v] (1) layers\n    change y by (雪の落下速度)\nend\nrepeat (10)\n    change [ghost v] effect by (10)\nend\ndelete this clone\n\n@雲\n\nwhen I start as a clone\nshow\nset [雲の移動速度 v] to (pick random (1) to (2))\nrepeat until <[240] < (x position)>\n    change x by (雲の移動速度)\nend\nrepeat (5)\n    change [ghost v] effect by (20)\nend\ndelete this clone\n\nwhen I receive [start v]\nset [ghost v] effect to (pick random (20) to (50))\nforever\n    hide\n    go to [back v] layer\n    set size to (pick random (80) to (120)) %\n    wait (pick random (2) to (5)) seconds\n    create clone of (_myself_ v)\n    switch costume to (pick random (1) to (2))\n    go to x: (-275) y: (pick random (80) to (150))\nend\n\n@その他\n\nwhen flag clicked\ngo to x: (165) y: (200)\nforever\n    hide\n    wait (10) seconds\n    show\n    start sound [♡ ☆ Follow-1 v]\n    set [♡､☆ follow \(y\) v] to [-3]\n    repeat (8)\n        change y by (♡､☆ Follow \(Y\))\n        change [♡､☆ follow \(y\) v] by (-1)\n    end\n    wait (2) seconds\n    start sound [♡ ☆ Follow-2 v]\n    set [♡､☆ follow \(y\) v] to [2]\n    repeat (10)\n        change y by (♡､☆ Follow \(Y\))\n        change [♡､☆ follow \(y\) v] by (1)\n    end\n    hide\nend\n\n@ジャンプ台\n\nwhen I receive [start v]\nforever\n    if <touching (プレイヤー v)?> then\n        wait (0.02) seconds\n        switch costume to (1 v)\n        wait (0.02) seconds\n        switch costume to (2 v)\n        wait (0.02) seconds\n        switch costume to (3 v)\n        wait (0.02) seconds\n        switch costume to (4 v)\n        set [プレイヤーy v] to [20]\n        start sound [バネ v]\n        wait until <not <touching (プレイヤー v)?>>\n        switch costume to (3 v)\n        wait (0.02) seconds\n        switch costume to (2 v)\n        wait (0.02) seconds\n        switch costume to (1 v)\n    end\nend\n\nwhen flag clicked\nforever\n    if <<(ステージ) = [3]> or <(ステージ) = [7]>> then\n        show\n    else\n        hide\n    end\n    if <(ステージ) = [3]> then\n        go to x: (-25) y: (-85)\n    end\n    if <(ステージ) = [7]> then\n        go to x: (-35) y: (-10)\n    end\nend\n\n@BGM\n\nwhen I receive [start v]\nwait (1) seconds\nstop all sounds\nforever\n    play sound [BGM-1 v] until done\nend\n\nwhen I receive [start v]\nwait (1) seconds\nset volume to (0) %\nrepeat (50)\n    change volume by (1)\nend\n\nwhen flag clicked\nhide\nset volume to (50) %\nstart sound [BGM-2 v]\n\nwhen flag clicked\nwait (2) seconds\nrepeat (100)\n    change volume by (-1)\nend\n\nwhen I receive [コインの配置 v]\nif <(ステージ) = [10]> then\n    repeat (100)\n        change volume by (-1)\n    end\n    forever\n        play sound [BGM-2 v] until done\n    end\nend\n\n@START･GOLE 地点\n\nwhen I receive [start v]\nshow\nforever\n    go to [front v] layer\n    repeat (10)\n        change y by (1)\n        wait (0.05) seconds\n    end\n    repeat (10)\n        change y by (-1)\n        wait (0.05) seconds\n    end\nend\n\nwhen flag clicked\nhide\n\nwhen flag clicked\nforever\n    turn right (2) degrees\nend\n\nwhen I receive [start•gole地点の位置 v]\nif <(ステージ) = [1]> then\n    go to x: (220) y: (-65)\nend\nif <(ステージ) = [2]> then\n    go to x: (220) y: (80)\nend\nif <(ステージ) = [3]> then\n    go to x: (220) y: (120)\nend\nif <(ステージ) = [4]> then\n    go to x: (220) y: (-60)\nend\nif <(ステージ) = [5]> then\n    go to x: (220) y: (80)\nend\nif <(ステージ) = [6]> then\n    go to x: (220) y: (50)\nend\nif <(ステージ) = [7]> then\n    go to x: (220) y: (120)\nend\nif <(ステージ) = [8]> then\n    go to x: (220) y: (-55)\nend\nif <(ステージ) = [10]> then\n    hide\nend\n\n@棘\n\nwhen flag clicked\nforever\n    go to [front v] layer\n    switch costume to (ステージ)\n    go to x: (0) y: (0)\nend\n\nwhen flag clicked\nforever\n    repeat (10)\n        change [brightness v] effect by (1)\n        wait (0.02) seconds\n    end\n    repeat (10)\n        change [brightness v] effect by (-1)\n        wait (0.02) seconds\n    end\nend\n\n@ステージ番号\n\nwhen I receive [start v]\nshow\n\nwhen flag clicked\nhide\nforever\n    switch costume to (ステージ)\nend\n\n@敵\n\nwhen I start as a clone\n敵を生産する\nforever\n    if <(時間\(敵用\)) = [0]> then\n        if <(位置リセット) = [0]> then\n        if <(x position) < ([x position v] of [プレイヤー v])> then\n            change [敵x v] by (0.2)\n            point in direction (90)\n        end\n        if <([x position v] of [プレイヤー v]) < (x position)> then\n            change [敵x v] by (-0.2)\n            point in direction (-90)\n        end\n        change x by (敵X)\n        set [敵x v] to ((敵X) * (0.9))\n        if <touching (ステージ v)?> then\n            change y by (1)\n            if <touching (ステージ v)?> then\n                change y by (1)\n                if <touching (ステージ v)?> then\n                    change y by (1)\n                    if <touching (ステージ v)?> then\n                        change y by (1)\n                        if <touching (ステージ v)?> then\n                            change y by (1)\n                            if <touching (ステージ v)?> then\n                                change x by ((敵X) * (-1.2))\n                                change y by (-5)\n                                if <(敵X) > [0]> then\n                                    set [敵x v] to [0]\n                                    change [敵y v] by (2)\n                                else\n                                    set [敵x v] to [0]\n                                    change [敵y v] by (2)\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n        change y by (-1)\n        change y by (敵Y)\n        change [敵y v] by (-1)\n        if <touching (ステージ v)?> then\n            change y by ((敵Y) * (-1))\n            set [敵y v] to [0]\n        end\n    end\n    if <(y position) < [-182]> then\n        set [時間\(敵用\) v] to [1]\n        set [敵x v] to [0]\n        set [敵y v] to [0]\n        start sound [ダメージ v]\n        repeat (20)\n            change [ghost v] effect by (5)\n        end\n        delete this clone\n    end\n    if <touching (波紋 v)?> then\n        set [敵x v] to [0]\n        set [敵y v] to [0]\n        start sound [やられた v]\n        set rotation style [all around v]\n        set [敵y v] to [8]\n        repeat (25)\n            turn right (20) degrees\n            change y by (敵Y)\n            change [敵y v] by (-1)\n            change [ghost v] effect by (1)\n        end\n        set rotation style [left-right v]\n        set [時間\(敵用\) v] to [0]\n        delete this clone\n    end\nend\n\ndefine 敵を生産する\nshow\nclear graphic effects\nset size to (85) %\n\nwhen I receive [敵の配置 v]\n削除\nif <(ステージ) = [7]> then\n    敵の配置 [120] [110] (pick random (1) to (2))\nend\nif <(ステージ) = [8]> then\n    敵の配置 [-15] [105] [3]\nend\n\ndefine 敵の配置 (x) (y) (コスチューム番号)\ngo to x: (x) y: (y)\nswitch costume to (コスチューム番号)\ncreate clone of (_myself_ v)\n\ndefine 削除\ndelete this clone\n\ndefine 位置リセット (x) (y)\ngo to x: (x) y: (y)\n\nwhen I receive [やられた v]\nset [位置リセット v] to [1]\nwait (0.1) seconds\nset [位置リセット v] to [0]\n\n@波紋\n\nwhen flag clicked\nforever\n    hide\nend\n\nwhen I start as a clone\ngo to x: (x) y: (y)\nif <(波紋の大きさ) = [0]> then\n    set size to (100) %\n    switch costume to (波紋 v)\nelse\n    set size to (200) %\n    switch costume to (弾ける v)\nend\nrepeat (20)\n    show\n    change [ghost v] effect by (5)\nend\ndelete this clone\n\n@鉄球\n\nwhen flag clicked\nset [鉄球x v] to [0]\nset [鉄球y v] to [0]\n\ngo to x: (248) y: (5)\n\nwhen I start as a clone\nstart sound [鉄球 v]\nstart sound [転がる v]\nset [鉄球x v] to [0]\nset [鉄球y v] to [0]\nrepeat until <(x position) < [-249]>\n    show\n    change x by (鉄球X)\n    set [鉄球x v] to ((0.9) * (鉄球X))\n    change [鉄球x v] by (-1.5)\n    turn left (15) degrees\nend\ndelete this clone\n\nwhen I start as a clone\nrepeat until <(x position) < [-249]>\n    change y by (鉄球Y)\n    change [鉄球y v] by (-2)\n    if <touching (ステージ v)?> then\n        set [鉄球y v] to [0]\n    end\nend\n\nwhen flag clicked\nforever\n    if <(ステージ) = [6]> then\n        set [鉄球の演出 v] to [0]\n    else\n        set [鉄球の演出 v] to [1]\n    end\n    if <(鉄球の演出) = [0]> then\n        create clone of (_myself_ v)\n        wait (2.5) seconds\n    end\nend\n\nwhen I start as a clone\nforever\n    if <(鉄球の演出) = [1]> then\n        delete this clone\n    end\nend\n\nset volume to (0) %\n\n@サムネ\n\nwhen flag clicked\nhide\n\n
◀︎日本語説明▶︎\n-----操作方法-----\n･移動…十字キー、マウス\n･ジャンプ…十字キーの▲、マウス(プレイヤーの上辺り)\nスペースキーで攻撃　敵を倒したり、コインを取れます\n-----障害物-----\n･棘\n･敵\n･鉄球\n･落下ﾀﾋなど\n白いゴールを目指します。\n-----------------------------------------------------------------\n◀ ︎ English explanation▶︎\n-----Method of operation-----\n･ Move ... Cross key, mouse\n･ Jump ... Cross key ▲, mouse (above the player)\nAttack with the space key: Defeat enemies and get coins\n-----Obstacle-----\n·thorn\n·enemy\n･ Iron ball\n･ Falling Tahi etc.\nAim for a white goal.