☁Minecraft platformer  2 v1.1

Instructions: アップデートしました！\n\n\n訂正\nエンターキーまたはアイテムをタップしてエンダーパールが使用できます！1回まで\n\n⁂ ▶︎ᴍɪɴᴇᴄʀᴀғᴛ◀︎ ⁂\n\n日本語は下\n\nEnglish\n\n▶︎How to operate\n\n▶︎ How to control characters\nOperate with arrow keys or tap\n\n▶︎ How to use the sword\nSpacebar or tap "Attack"\n▶︎Enemies\n\nenemy list\n\n1. Zombies\n2. Skeleton\n3. Spider\n4. Chibisuke (self-made character)\n5. Warden\n6. Gust\n\n▶︎Settings\nThere are two settings, bgm and cloud\nIf you want to remove the BGM, set it to [OFF].\nIf you want to save to the cloud, please set it to [ON].\n\n\n▶︎Skins\nSkins can be changed by pressing the skin button and tapping the character\nCurrently there are only two types, but more will be added in the future.\n\n日本語\n\n▶︎操作方法\n\n▶︎キャラクターの操作方法\n矢印キーまたはタップで操作\n\n▶︎剣の使い方\nスペースキーまたは「攻撃」をタップ\n▶︎敵について\n\n敵一覧\n\n1.ゾンビ\n2.スケルトン\n3.クモ\n4.チビ助　(自作キャラクター)\n5.ウォーデン\n6.ガスト\n\n▶︎設定について\n設定ではbgm、cloudの2つがあります\nBGMをなくしたい方は[OFF]にしてください\ncloudに保存したい方は[ON]にしてください\n\n\n▶︎スキンについて\nスキンはスキンのボタンを押してキャラクターをタップすると変更が可能です\n現在は2種類しかありませんが今後追加予定です

@Stage\n\nwhen flag clicked\nforever\n    play sound [１ v] until done\n    play sound [２ v] until done\nend\n\nwhen flag clicked\nbroadcast (|| Intro Start Message v)\n\nwhen I receive [|| intro start message v]\nswitch backdrop to (2 v)\nset [...bgm オンオフ v] to [1]\nset [...効果音　オンオフ v] to [1]\nwait until <([costume # v] of [壁 v]) = [6]>\nswitch backdrop to (3 v)\nwait until <([costume # v] of [壁 v]) = [15]>\nswitch backdrop to (2 v)\n\nwhen I receive [|| intro start message v]\nforever\n    if <(...BGM オンオフ) = [0]> then\n        set volume to (0) %\n    else\n        set volume to (100) %\n    end\nend\n\nwhen I receive [|| intro start message v]\nset [持ち物 v] to [1]\nwait until <(Stage) = [9]>\nset [持ち物 v] to [5]\nwait until <(Stage) = [10]>\n\n@軽量化\n\nwhen I receive [無敵 v]\nadd [プレイヤーが無敵になりました] to [1 v]\nset [無敵 v] to [1]\nwait ((無敵団) + (1)) seconds\nset [無敵 v] to [0]\n\nset [持ち物 v] to [13]\nadd [剣がMAXになりました] to [1 v]\n\nwhen flag clicked\nchange [☁ 参照数 v] by (1)\n\nadd ["\(-""-\)"] to [チャット v]\n\n@1\n\ndefine クローン ()\nswitch costume to ()\nif <[0] = ()> then\n    clear graphic effects\n    go to [front v] layer\n    go to x: (0) y: (0)\n    show\n    set size to (100) %\n    wait (1) seconds\n    repeat (20)\n        change [ghost v] effect by (5)\n    end\n    add [0] to [0 v]\n    delete this clone\nend\nif <[遊ぶ] = ()> then\n    create clone of (_myself_ v)\nend\nif <[設定] = ()> then\n    create clone of (_myself_ v)\nend\nif <[スキン] = ()> then\n    create clone of (_myself_ v)\nend\nif <[サムネイル] = ()> then\n    add [プロジェクトが停止] to [1 v]\n    add [サムネイル作成] to [1 v]\n    set [サムネ変数 v] to [0]\n    set size to (100) %\n    clear graphic effects\n    go to [front v] layer\n    go to x: (0) y: (500)\n    show\n    repeat (25)\n        change [サムネ変数 v] by (-1)\n        change y by (サムネ変数)\n    end\n    set y to (0)\n    stop [all v]\nend\n\nwhen [timer v] > (0.01)\nクローン [サムネイル]\nbroadcast (サムネ　ステージ作成 v)\ndelete all of [0 v]\nadd [000] to [0 v]\n\nwhen I start as a clone\ngo to [front v] layer\nif <(clone数) = [1]> then\n    add [あそぶのクローンを作成] to [1 v]\n    set size to (5) %\n    clear graphic effects\n    go to [front v] layer\n    go to x: (0) y: (0)\n    show\n    add [遊ぶ] to [0 v]\n    forever\n        if <(どこの画面？) = [0]> then\n            show\n            if <touching (mouse-pointer v)?> then\n                change size by ((0.2) * ((115) - (size)))\n                if <mouse down?> then\n                    set [どこの画面？ v] to [ゲーム]\n                    add [ゲームを開始] to [1 v]\n                    broadcast (スタート v)\n                    if <[1] = (...効果音　オンオフ)> then\n                        start sound [Click v]\n                    end\n                end\n            else\n                change size by ((0.2) * ((100) - (size)))\n            end\n        else\n            hide\n        end\n    end\nend\nif <(clone数) = [2]> then\n    add [設定のクローンを作成] to [1 v]\n    set size to (5) %\n    clear graphic effects\n    go to [front v] layer\n    go to x: (0) y: (-50)\n    show\n    add [設定] to [0 v]\n    forever\n        if <(どこの画面？) = [0]> then\n            show\n            if <touching (mouse-pointer v)?> then\n                change size by ((0.2) * ((115) - (size)))\n                if <mouse down?> then\n                    add [設定画面] to [1 v]\n                    set [どこの画面？ v] to [設定]\n                    if <[1] = (...効果音　オンオフ)> then\n                        start sound [Click v]\n                    end\n                end\n            else\n                change size by ((0.2) * ((100) - (size)))\n            end\n        else\n            hide\n        end\n    end\nend\nif <(clone数) = [3]> then\n    add [スキンのクローンを作成] to [1 v]\n    set size to (5) %\n    clear graphic effects\n    go to [front v] layer\n    go to x: (0) y: (-100)\n    show\n    add [スキン] to [0 v]\n    forever\n        if <(どこの画面？) = [0]> then\n            show\n            if <touching (mouse-pointer v)?> then\n                change size by ((0.2) * ((115) - (size)))\n                if <mouse down?> then\n                    if <[1] = (...効果音　オンオフ)> then\n                        set [どこの画面？ v] to [スキン]\n                        add [スキン画面] to [1 v]\n                        start sound [Click v]\n                        broadcast (スキン　☺ v)\n                    end\n                end\n            else\n                change size by ((0.2) * ((100) - (size)))\n            end\n        else\n            hide\n        end\n    end\nend\n\nwhen flag clicked\ndelete all of [1 v]\nadd [旗を押した] to [1 v]\nset [clone数 v] to [0]\nset [確認 v] to [0]\nhide\ndelete all of [0 v]\nクローン [0]\nwait until <(0) = [0]>\nクローン [遊ぶ]\nchange [clone数 v] by (1)\nwait until <[0 v] contains [遊ぶ]?>\nchange [clone数 v] by (1)\nクローン [設定]\nwait until <[0 v] contains [設定]?>\nchange [clone数 v] by (1)\nクローン [スキン]\n\n@online\n\nwhen flag clicked\ndelete all of [ユーザー名素材 v]\nadd [a] to [ユーザー名素材 v]\nadd [b] to [ユーザー名素材 v]\nadd [c] to [ユーザー名素材 v]\nadd [d] to [ユーザー名素材 v]\nadd [e] to [ユーザー名素材 v]\nadd [f] to [ユーザー名素材 v]\nadd [g] to [ユーザー名素材 v]\nadd [h] to [ユーザー名素材 v]\nadd [i] to [ユーザー名素材 v]\nadd [j] to [ユーザー名素材 v]\nadd [k] to [ユーザー名素材 v]\nadd [l] to [ユーザー名素材 v]\nadd [m] to [ユーザー名素材 v]\nadd [n] to [ユーザー名素材 v]\nadd [o] to [ユーザー名素材 v]\nadd [p] to [ユーザー名素材 v]\nadd [q] to [ユーザー名素材 v]\nadd [r] to [ユーザー名素材 v]\nadd [s] to [ユーザー名素材 v]\nadd [t] to [ユーザー名素材 v]\nadd [u] to [ユーザー名素材 v]\nadd [v] to [ユーザー名素材 v]\nadd [w] to [ユーザー名素材 v]\nadd [x] to [ユーザー名素材 v]\nadd [y] to [ユーザー名素材 v]\nadd [z] to [ユーザー名素材 v]\nadd [0] to [ユーザー名素材 v]\nadd [1] to [ユーザー名素材 v]\nadd [2] to [ユーザー名素材 v]\nadd [3] to [ユーザー名素材 v]\nadd [4] to [ユーザー名素材 v]\nadd [5] to [ユーザー名素材 v]\nadd [6] to [ユーザー名素材 v]\nadd [7] to [ユーザー名素材 v]\nadd [8] to [ユーザー名素材 v]\nadd [9] to [ユーザー名素材 v]\nadd [-] to [ユーザー名素材 v]\nadd [_] to [ユーザー名素材 v]\ndelete all of [ユーザー名 v]\nrepeat (9)\n    add [] to [ユーザー名 v]\nend\nset [i2 v] to [1]\nset [ユーザー名数値 v] to []\nrepeat (length of (username))\n    set [ユーザー名数値 v] to (join (ユーザー名数値) ((item # of (letter (i2) of (username)) in [ユーザー名素材 v]) + (10)))\n    change [i2 v] by (1)\nend\nforever\n    ユーザー名 (☁ ☁ 1P) [1]\n    ユーザー名 (☁ ☁ 2P) [2]\n    ユーザー名 (☁ ☁ 3P) [3]\n    ユーザー名 (☁ ☁ 4P) [4]\n    ユーザー名 (☁ ☁ 5P) [5]\n    ユーザー名 (☁ ☁ 6P) [6]\n    ユーザー名 (☁ ☁ 7P) [7]\n    ユーザー名 (☁ ☁ 8P) [8]\n    ユーザー名 (☁ ☁ 9P) [9]\n    wait (20) seconds\nend\n\nwhen I receive [スタート v]\nforever\n    if <(自分は何Pか？) = [1]> then\n        set [☁ ☁ 1p v] to (join (プレイヤーデータ) (ユーザー名数値))\n    end\n    if <(自分は何Pか？) = [2]> then\n        set [☁ ☁ 2p v] to (join (プレイヤーデータ) (ユーザー名数値))\n    end\n    if <(自分は何Pか？) = [3]> then\n        set [☁ ☁ 3p v] to (join (プレイヤーデータ) (ユーザー名数値))\n    end\n    if <(自分は何Pか？) = [4]> then\n        set [☁ ☁ 4p v] to (join (プレイヤーデータ) (ユーザー名数値))\n    end\n    if <(自分は何Pか？) = [5]> then\n        set [☁ ☁ 5p v] to (join (プレイヤーデータ) (ユーザー名数値))\n    end\n    if <(自分は何Pか？) = [6]> then\n        set [☁ ☁ 6p v] to (join (プレイヤーデータ) (ユーザー名数値))\n    end\n    if <(自分は何Pか？) = [7]> then\n        set [☁ ☁ 7p v] to (join (プレイヤーデータ) (ユーザー名数値))\n    end\n    if <(自分は何Pか？) = [8]> then\n        set [☁ ☁ 8p v] to (join (プレイヤーデータ) (ユーザー名数値))\n    end\n    if <(自分は何Pか？) = [9]> then\n        set [☁ ☁ 9p v] to (join (プレイヤーデータ) (ユーザー名数値))\n    end\nend\n\nwhen flag clicked\nset [自分は何pか？ v] to [0]\nhide\nif <(username) = []> then\n    wait (1) seconds\n    show\n    switch costume to (サインインして v)\n    go to [front v] layer\n    wait (2) seconds\n    hide\nelse\n    if <(☁ ☁ 1P) = [0]> then\n        set [自分は何pか？ v] to [1]\n    else\n        if <(☁ ☁ 2P) = [0]> then\n            set [自分は何pか？ v] to [2]\n        else\n            if <(☁ ☁ 3P) = [0]> then\n                set [自分は何pか？ v] to [3]\n            else\n                if <(☁ ☁ 4P) = [0]> then\n                    set [自分は何pか？ v] to [4]\n                else\n                    if <(☁ ☁ 5P) = [0]> then\n                        set [自分は何pか？ v] to [5]\n                    else\n                        if <(☁ ☁ 6P) = [0]> then\n                            set [自分は何pか？ v] to [6]\n                        else\n                            if <(☁ ☁ 7P) = [0]> then\n                                set [自分は何pか？ v] to [7]\n                            else\n                                if <(☁ ☁ 8P) = [0]> then\n                                    set [自分は何pか？ v] to [8]\n                                else\n                                    if <(☁ ☁ 9P) = [0]> then\n                                        set [自分は何pか？ v] to [9]\n                                    else\n                                        switch costume to (サーバーがいっぱい v)\n                                        go to [front v] layer\n                                        wait (1) seconds\n                                        hide\n                                    end\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\nend\n\nif <[] = [0]> then\n    set [自分は何pか？ v] to [9]\nelse\nend\n\ndefine ユーザー名 (データ) (何p)\nset [復元 v] to (length of (プレイヤーデータ))\nreplace item (何p) of [ユーザー名 v] with []\nrepeat ((length of (データ)) - (length of (プレイヤーデータ)))\n    replace item (何p) of [ユーザー名 v] with (join (item (何p) of [ユーザー名 v]) (item ((join (letter ((復元) - (1)) of (データ)) (letter (復元) of (データ))) - (10)) of [ユーザー名素材 v]))\n    change [復元 v] by (2)\nend\n\nwhen I start as a clone\nswitch costume to (キャラ v)\nset rotation style [left-right v]\nforever\n    if <(クローンID) = (自分は何Pか？)> then\n        delete this clone\n    else\n        if <(クローンID) = [1]> then\n            他のプレイヤー (☁ ☁ 1P) [1]\n        end\n        if <(クローンID) = [2]> then\n            他のプレイヤー (☁ ☁ 2P) [2]\n        end\n        if <(クローンID) = [3]> then\n            他のプレイヤー (☁ ☁ 3P) [3]\n        end\n        if <(クローンID) = [4]> then\n            他のプレイヤー (☁ ☁ 4P) [4]\n        end\n        if <(クローンID) = [5]> then\n            他のプレイヤー (☁ ☁ 5P) [5]\n        end\n        if <(クローンID) = [6]> then\n            他のプレイヤー (☁ ☁ 6P) [6]\n        end\n        if <(クローンID) = [7]> then\n            他のプレイヤー (☁ ☁ 7P) [7]\n        end\n        if <(クローンID) = [8]> then\n            他のプレイヤー (☁ ☁ 8P) [8]\n        end\n        if <(クローンID) = [9]> then\n            他のプレイヤー (☁ ☁ 9P) [9]\n        end\n    end\nend\n\ndefine 他のプレイヤー (データ) (何p)\nif <[0] < (データ)> then\n    show\n    set [ghost v] effect to (50)\n    switch costume to ((join (letter (13) of (データ)) (letter (14) of (データ))) - (8))\n    go to x: ((join (letter (2) of (データ)) (join (letter (3) of (データ)) (letter (4) of (データ)))) - (500)) y: ((join (letter (5) of (データ)) (join (letter (6) of (データ)) (letter (7) of (データ)))) - (500))\n    point in direction ((join (letter (8) of (データ)) (join (letter (9) of (データ)) (letter (10) of (データ)))) - (500))\n    say (join (letter (2) of (item (何p) of [ユーザー名 v])) (join (letter (3) of (item (何p) of [ユーザー名 v])) (join (letter (4) of (item (何p) of [ユーザー名 v])) (join (letter (5) of (item (何p) of [ユーザー名 v])) (join (letter (6) of (item (何p) of [ユーザー名 v])) (join (letter (7) of (item (何p) of [ユーザー名 v])) (join (letter (8) of (item (何p) of [ユーザー名 v])) (join (letter (9) of (item (何p) of [ユーザー名 v])) (join (letter (10) of (item (何p) of [ユーザー名 v])) (join (letter (11) of (item (何p) of [ユーザー名 v])) (join (letter (12) of (item (何p) of [ユーザー名 v])) (join (letter (13) of (item (何p) of [ユーザー名 v])) (join (letter (14) of (item (何p) of [ユーザー名 v])) (join (letter (15) of (item (何p) of [ユーザー名 v])) (join (letter (16) of (item (何p) of [ユーザー名 v])) (join (letter (17) of (item (何p) of [ユーザー名 v])) (join (letter (18) of (item (何p) of [ユーザー名 v])) (join (letter (19) of (item (何p) of [ユーザー名 v])) []))))))))))))))))))\n    if <((join (letter (11) of (データ)) (letter (12) of (データ))) - (10)) = (Stage)> then\n        show\n    else\n        switch costume to (コスチューム3 v)\n        if <((join (letter (11) of (データ)) (letter (12) of (データ))) - (10)) < (Stage)> then\n            go to x: (-20000) y: ((join (letter (5) of (データ)) (join (letter (6) of (データ)) (letter (7) of (データ)))) - (500))\n        else\n            go to x: (20000) y: ((join (letter (5) of (データ)) (join (letter (6) of (データ)) (letter (7) of (データ)))) - (500))\n        end\n    end\nelse\n    hide\nend\n\nwhen flag clicked\nforever\n    set [プレイヤーデータ v] to (join (join (join (letter (2) of (current [second v])) (join ((round ([x position v] of [プレイヤー v])) + (500)) (join ((round ([y position v] of [プレイヤー v])) + (500)) ((round ([direction v] of [プレイヤー v])) + (500))))) ((Stage) + (10))) (([costume # v] of [プレイヤー v]) + (10)))\nend\n\nwhen flag clicked\nforever\n    set [1p抜けた？ v] to (letter (1) of (☁ ☁ 1P))\n    set [2p抜けた？ v] to (letter (1) of (☁ ☁ 2P))\n    set [3p抜けた？ v] to (letter (1) of (☁ ☁ 3P))\n    set [4p抜けた？ v] to (letter (1) of (☁ ☁ 4P))\n    set [5p抜けた？ v] to (letter (1) of (☁ ☁ 5P))\n    set [6p抜けた？ v] to (letter (1) of (☁ ☁ 6P))\n    set [7p抜けた？ v] to (letter (1) of (☁ ☁ 7P))\n    set [8p抜けた？ v] to (letter (1) of (☁ ☁ 8P))\n    set [9p抜けた？ v] to (letter (1) of (☁ ☁ 9P))\n    set [何人参加してる？ v] to (join ((((<[0] = (☁ ☁ 1P)> + (0)) + (<[0] = (☁ ☁ 2P)> + (0))) + (((<[0] = (☁ ☁ 3P)> + (0)) + (<[0] = (☁ ☁ 4P)> + (0))) + (((<[0] = (☁ ☁ 5P)> + (0)) + (<[0] = (☁ ☁ 6P)> + (0))) + (((<[0] = (☁ ☁ 7P)> + (0)) + (<[0] = (☁ ☁ 8P)> + (0))) + (((<[0] = (☁ ☁ 9P)> + (0)) + (<[0] = [50]> + (0))) + ()))))) - (10)) [人が参加中])\n    wait (1.5) seconds\n    if <(letter (1) of (☁ ☁ 1P)) = (1P抜けた？)> then\n        set [☁ ☁ 1p v] to [0]\n    end\n    if <(letter (1) of (☁ ☁ 2P)) = (2P抜けた？)> then\n        set [☁ ☁ 2p v] to [0]\n    end\n    if <(letter (1) of (☁ ☁ 3P)) = (3P抜けた？)> then\n        set [☁ ☁ 3p v] to [0]\n    end\n    if <(letter (1) of (☁ ☁ 4P)) = (4P抜けた？)> then\n        set [☁ ☁ 4p v] to [0]\n    end\n    if <(letter (1) of (☁ ☁ 5P)) = (5P抜けた？)> then\n        set [☁ ☁ 5p v] to [0]\n    end\n    if <(letter (1) of (☁ ☁ 6P)) = (6P抜けた？)> then\n        set [☁ ☁ 6p v] to [0]\n    end\n    if <(letter (1) of (☁ ☁ 7P)) = (7P抜けた？)> then\n        set [☁ ☁ 7p v] to [0]\n    end\n    if <(letter (1) of (☁ ☁ 8P)) = (8P抜けた？)> then\n        set [☁ ☁ 8p v] to [0]\n    end\n    if <(letter (1) of (☁ ☁ 9P)) = (9P抜けた？)> then\n        set [☁ ☁ 9p v] to [0]\n    end\nend\n\nwhen I receive [スタート v]\nset [クローンid v] to [0]\nrepeat (9)\n    change [クローンid v] by (1)\n    create clone of (_myself_ v)\nend\n\nset [☁ みんなで倒せ！ v] to [10000]\n\n@2\n\ndefine 常時実行\ngo to x: (0) y: (0)\ngo to [front v] layer\nchange [三角関数用 v] by (5)\nreset timer\nif <[Nan％] = (join ((☁ 世界のclear数) / (☁ 世界の旗が押された回数)) [％])> then\n    set [クリア率 v] to [不明...]\nelse\n    set [クリア率 v] to (round (((☁ 世界のclear数) / (☁ 世界の旗が押された回数)) * (100)))\nend\n\nwhen I receive [音を鳴らして v]\nif <[1] = (...効果音　オンオフ)> then\n    start sound [Click v]\nend\n\nwhen flag clicked\nchange [☁ 世界の旗が押された回数 v] by (1)\nset [どこの画面？ v] to [0]\nforever\n    常時実行\nend\n\nwhen flag clicked\ncreate clone of (_myself_ v)\nswitch costume to ( v)\nhide\nwait (2) seconds\nshow\nset [世界記録保存の許可 v] to [0]\nset [...bgm オンオフ v] to [1]\nset [...効果音　オンオフ v] to [1]\n\nwhen [timer v] > (0.01)\nhide\n\nwhen I start as a clone\nset [天候 v] to [晴れ]\nset [三角関数用 v] to [0]\nadd [エフェクト/太陽] to [1 v]\ngo to x: (177) y: (124)\nset size to (100) %\nshow\nswitch costume to (2 v)\nforever\n    change [▶︎ v] by (5)\n    go to [back v] layer\n    change size by ([sin v] of (三角関数用) )\n    if <(天候) = [晴れ]> then\n        clear graphic effects\n    else\n        set [ghost v] effect to (30)\n    end\n    if <<[9] < (Stage)> and <(Stage) < [15]>> then\n        hide\n    else\n        show\n    end\nend\n\nwhen flag clicked\nwait (1) seconds\nforever\n    if <(どこの画面？) = [0]> then\n        show\n    else\n        hide\n    end\nend\n\n@saisyo\n\nwhen I receive [スタート v]\nhide\ndelete this clone\n\nwhen [timer v] > (0.01)\nhide\n\nwhen flag clicked\nswitch costume to ( v)\ncreate clone of (_myself_ v)\nshow\nforever\n    go to x: (0) y: (0)\n    go [forward v] (1) layers\n    go [backward v] (6) layers\nend\n\nwhen I start as a clone\nrepeat (10)\n    switch costume to (pick random (2) to (3))\nend\nforever\n    change y by ([sin v] of ("三角関数) )\n    change ["三角関数 v] by (5)\nend\n\n@Weather\n\nwhen I receive [layer sort v]\nif <(cloud_num) = [-1]> then\n    Z-index Sprite by [999]\nend\nif <(cloud_num) > [0]> then\n    Z-index Sprite by [998]\nend\n\ndefine Z-index Sprite by (z-index)\nset [i v] to [1]\nrepeat until <not <(z-index) < (item (i) of [z-index v])>>\n    change [i v] by (1)\nend\ninsert (z-index) at (i) of [z-index v] \ngo [forward v] ((i) - (1)) layers\n\nwhen I start as a clone\nif <(cloud_num) = [-1]> then\n    show\n    forever\n        if <<[9] < (Stage)> and <(Stage) < [15]>> then\n            delete this clone\n        else\n            show\n        end\n        go to [back v] layer\n        go [backward v] (1) layers\n        if <(#Daylight cycle) = [Day]> then\n            switch costume to (sun v)\n            go to x: ((140) + ((4) * ([cos v] of (#Frame) ))) y: ((100) + ((4) * ([sin v] of (#Frame) )))\n        end\n        if <(#Daylight cycle) = [Sunset]> then\n            switch costume to (sunset v)\n            go to x: ((140) + ((4) * ([cos v] of (#Frame) ))) y: ((100) + ((4) * ([sin v] of (#Frame) )))\n        end\n        if <(#Daylight cycle) = [Night]> then\n            switch costume to (moon v)\n            go to x: ((0) + ((220) * ([cos v] of (((#Frame) / (30)) + (180)) ))) y: ((-250) + ((380) * ([sin v] of ((#Frame) / (30)) )))\n        end\n    end\nend\nif <(cloud_num) > [0]> then\n    set [cloud y v] to (pick random (100) to (170))\n    if <(#Biome) = [2]> then\n        go [backward v] (5) layers\n        set [cloud y v] to (pick random (-80) to (0))\n        set [ghost v] effect to (50)\n    end\n    switch costume to ((1) + (pick random (1) to (11)))\n    set y to (cloud y)\n    repeat until <(cloud x) < [-400]>\n        show\n        set x to (cloud x)\n        if <(#Daylight cycle) = [Night]> then\n            set [ghost v] effect to (90)\n        else\n            set [ghost v] effect to (20)\n        end\n        if <(#Gamemode) = (item (1) of [#gamemode v])> then\n    end\n    change [cloud_num v] by (-1)\n    delete this clone\nend\n\nwhen flag clicked\nhide\nset [cloud_num v] to [-1]\ncreate clone of (_myself_ v)\nadd [雲のクローンを作成] to [1 v]\nset [cloud_num v] to [1]\nset [cloud x v] to [-100]\ncreate clone of (_myself_ v)\nadd [雲のクローンを作成] to [1 v]\nchange [cloud_num v] by (1)\nset [cloud x v] to [100]\ncreate clone of (_myself_ v)\nadd [雲のクローンを作成] to [1 v]\nchange [cloud_num v] by (1)\nforever\n    if <(cloud_num) < [10]> then\n        if <(pick random (1) to (5)) = [1]> then\n            set [cloud x v] to [300]\n            change [cloud_num v] by (1)\n            create clone of (_myself_ v)\n            add [雲のクローンを作成] to [1 v]\n        end\n        wait (3) seconds\n    end\nend\n\n@オンオフ1\n\nwhen this sprite clicked\nadd [オンオフが押された] to [1 v]\nif <(...BGM オンオフ) = [0]> then\n    broadcast (音を鳴らして v)\n    repeat until <(costume [number v]) = [5]>\n        next costume\n    end\n    set [...bgm オンオフ v] to [1]\nelse\n    broadcast (音を鳴らして v)\n    repeat until <(costume [number v]) = [1]>\n        switch costume to ((costume [number v]) - (1))\n    end\n    set [...bgm オンオフ v] to [0]\nend\n\nwhen flag clicked\nforever\n    if <[設定] = (どこの画面？)> then\n        show\n    else\n        hide\n    end\nend\n\nset [世界記録保存の許可 v] to [0]\n\n@オンオフ3\n\nwhen this sprite clicked\nadd [オンオフ3が押された] to [1 v]\nif <not <(username) = []>> then\n    if <(世界記録保存の許可) = [0]> then\n        broadcast (音を鳴らして v)\n        repeat until <(costume [number v]) = [5]>\n            next costume\n        end\n        set [世界記録保存の許可 v] to [1]\n    else\n        broadcast (音を鳴らして v)\n        repeat until <(costume [number v]) = [1]>\n            switch costume to ((costume [number v]) - (1))\n        end\n        set [世界記録保存の許可 v] to [0]\n    end\nelse\n    switch costume to (6 v)\nend\n\nwhen flag clicked\nforever\n    if <[設定] = (どこの画面？)> then\n        show\n    else\n        hide\n    end\n    if <not <(username) = []>> then\n        go to x: (174) y: (-80)\n    else\n        go to x: (96) y: (-110)\n        switch costume to (6 v)\n    end\nend\n\n@設定画面\n\nwhen flag clicked\ngo to x: (0) y: (0)\nforever\n    if <(どこの画面？) = [設定]> then\n        show\n    else\n        hide\n    end\nend\n\n@戻る\n\nwhen flag clicked\ngo to x: (-154) y: (-154)\nhide\nforever\n    if <<(どこの画面？) = [設定]> or <(どこの画面？) = [スキン]>> then\n        show\n        if <touching (mouse-pointer v)?> then\n            change size by ((0.2) * ((115) - (size)))\n        else\n            change size by ((0.2) * ((100) - (size)))\n        end\n    else\n        hide\n    end\nend\n\nwhen this sprite clicked\nadd [戻が押された] to [1 v]\nset [どこの画面？ v] to [0]\nbroadcast (音を鳴らして v)\n\nwhen I receive [スキン　☺ v]\nshow\n\n@壁\n\nwhen flag clicked\nswitch costume to (1 v)\nhide\n\nwhen I receive [スタート v]\nset [stage v] to [1]\nshow\nforever\n    go to [back v] layer\n    go to x: (0) y: (0)\n    switch costume to (Stage)\n    if <[20] = (Stage)> then\n        set [brightness v] effect to (-50)\n    else\n        clear graphic effects\n    end\nend\n\n@Health2\n\nwhen flag clicked\ngo to x: (0) y: (-114)\nset [ライフ v] to [20]\ngo to [front v] layer\nhide\nforever\n    switch costume to ((ライフ) + (1))\nend\n\nwhen flag clicked\nforever\n    set [前ライフ v] to (ライフ)\n    wait (0.2) seconds\nend\n\nwhen flag clicked\nforever\n    if <(ライフ) < [4]> then\n        change y by (3)\n        wait (0.07) seconds\n        change y by (-3)\n    end\nend\n\nwhen [timer v] > (1)\nhide\n\nwhen I receive [スタート v]\nshow\n\n@ゾンビ\n\nwhen I start as a clone\nadd [ゾンビ/クローン] to [1 v]\nclear graphic effects\nset size to (100) %\nwait (0.2) seconds\npoint in direction (90)\nset [ゾンビx v] to [0]\nset [ゾンビy v] to [0]\nclear graphic effects\nshow\nforever\n    show\n    if <(位置リセット) = [1]> then\n        go to x: (200) y: (0)\n    end\n    if <(clone削除して) = [1]> then\n        forever\n            delete this clone\n        end\n    end\n    if <([x position v] of [プレイヤー v]) < (x position)> then\n        point in direction (-90)\n        if <touching (水 v)?> then\n            change [ゾンビx v] by (-0.14)\n        else\n            change [ゾンビx v] by (-0.2)\n        end\n    end\n    if <(x position) < ([x position v] of [プレイヤー v])> then\n        point in direction (90)\n        if <touching (水 v)?> then\n            change [ゾンビx v] by (0.14)\n        else\n            change [ゾンビx v] by (0.2)\n        end\n    end\n    set [ゾンビx v] to ((ゾンビx) * (0.9))\n    change x by (ゾンビx)\n    if <<touching (壁 v)?> or <<touching (壁 v)?> or <touching (壁 v)?>>> then\n        change y by (1)\n        if <<touching (壁 v)?> or <<touching (壁 v)?> or <touching (壁 v)?>>> then\n            change y by (1)\n            if <<touching (壁 v)?> or <<touching (壁 v)?> or <touching (壁 v)?>>> then\n                change y by (1)\n                if <<touching (壁 v)?> or <<touching (壁 v)?> or <touching (壁 v)?>>> then\n                    change y by (1)\n                    if <<touching (壁 v)?> or <<touching (壁 v)?> or <touching (壁 v)?>>> then\n                        change y by (1)\n                        if <<touching (壁 v)?> or <<touching (壁 v)?> or <touching (壁 v)?>>> then\n                            change y by (1)\n                            if <<touching (壁 v)?> or <<touching (壁 v)?> or <touching (壁 v)?>>> then\n                                change x by ((0) - (ゾンビx))\n                                change y by (-5)\n                                if <not <(y position) < ([y position v] of [プレイヤー v])>> then\n                                    set [ゾンビx v] to [0]\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\n    change [ゾンビy v] by (-0.9)\n    if <<touching (水 v)?> and <(ゾンビy) < [-2]>> then\n        set [ゾンビy v] to [-2]\n    end\n    change y by (ゾンビy)\n    if <<touching (壁 v)?> or <<touching (壁 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    if <<touching (水 v)?> and <<key (up arrow v) pressed?> or <key (w v) pressed?>>> then\n        set [ゾンビy v] to [4]\n    else\n        if <<touching (壁 v)?> or <<touching (壁 v)?> or <touching (壁 v)?>>> then\n            if <(y position) < ([y position v] of [プレイヤー v])> then\n                if <[1] = (pick random (1) to (15))> then\n                    set [ゾンビy v] to [12]\n                end\n            end\n        end\n    end\n    change y by (1)\nend\n\nwhen I start as a clone\nforever\n    set [モブの位置x v] to (x position)\n    set [モブの位置y v] to (y position)\nend\n\nwhen I receive [やられた v]\ndelete this clone\n\nwhen I start as a clone\nif <(item (2) of [#gamemode v]) = [12]> then\n    set [hp v] to [18]\nelse\n    set [hp v] to [22]\nend\nswitch costume to (player v)\nforever\n    if <touching (マグマ v)?> then\n        ダメージ [-4]\n        wait (0.25) seconds\n        switch costume to (player v)\n    end\n    if <touching (サボテン v)?> then\n        ダメージ [-4]\n        wait (0.25) seconds\n        switch costume to (player v)\n    end\n    if <<touching (剣 v)?> and <(攻撃) = [1]>> then\n        if <([x position v] of [プレイヤー v]) < (x position)> then\n            ノックバック [10] [10]\n        else\n            ノックバック [-10] [10]\n        end\n        if <(結果) = [クリティカル攻撃可能]> then\n            ダメージ ([floor v] of (([costume name v] of [剣 v]) * (1.5)) )\n            set [攻撃位置x v] to (x position)\n            set [攻撃位置y v] to (y position)\n            broadcast (クリティカル v)\n        else\n            ダメージ ([costume name v] of [剣 v])\n        end\n        wait until <(攻撃) = [0]>\n        wait (0.3) seconds\n        switch costume to (player v)\n    end\n    if <touching (爆発 v)?> then\n        ダメージ [-15]\n        if <(item (4) of [適用 v]) < (x position)> then\n            ノックバック [15] [12]\n        else\n            ノックバック [-15] [12]\n        end\n        wait (0.3) seconds\n        switch costume to (player v)\n    end\n    if <touching (ソニックブーム補完用4 v)?> then\n        ダメージ [-16]\n        if <([x position v] of [プレイヤー v]) < (x position)> then\n            ノックバック [10] [10]\n        else\n            ノックバック [-10] [10]\n        end\n        wait (0.3) seconds\n        switch costume to (player v)\n        wait (1) seconds\n    end\n    if <touching (爆発2 v)?> then\n        ダメージ [-16]\n        if <([x position v] of [プレイヤー v]) < (x position)> then\n            ノックバック [14] [12]\n        else\n            ノックバック [-14] [12]\n        end\n        wait (0.3) seconds\n        switch costume to (player v)\n    end\n    if <(y position) < [-160]> then\n        ダメージ [-100]\n        wait (0.3) seconds\n    end\nend\n\ndefine ダメージ (ダメージ量)\nchange [hp v] by (ダメージ量)\nif <(pick random (1) to (2)) = [1]> then\n    if <[1] = (...効果音　オンオフ)> then\n        start sound [攻撃 v]\n    end\n    switch costume to (player2 v)\nelse\n    if <[1] = (...効果音　オンオフ)> then\n        start sound [攻撃2 v]\n    end\n    switch costume to (player2 v)\nend\nif <(HP) < [0.01]> then\n    switch costume to (player2 v)\n    if <[1] = (...効果音　オンオフ)> then\n        start sound [倒した v]\n    end\n    set [ウィ v] to (x position)\n    set [ウィ２ v] to (y position)\n    repeat (4)\n        change [ghost v] effect by (25)\n    end\n    broadcast (ゾンビ v)\n    delete this clone\nend\n\nwhen I receive [スタート v]\ngo to x: (250) y: (0)\ngo to [front v] layer\nhide\nwait (0.1) seconds\nwait until <(Stage) = [1]>\nゾンビ召喚魔法 [1] [200] [0] [0.1] 秒待つ [1] 回繰り返す\nwait until <(Stage) = [2]>\nゾンビ召喚魔法 [2] [200] [0] [0.1] 秒待つ [1] 回繰り返す\nwait until <(Stage) = [15]>\nゾンビ召喚魔法 [2] [200] [0] [0.1] 秒待つ [5] 回繰り返す\n\ndefine ノックバック (x) (y)\nset [ゾンビx v] to (x)\nset [ゾンビy v] to (y)\n\ndefine ゾンビ召喚魔法 (ステージ) (x) (y) (n) 秒待つ (a) 回繰り返す\nrepeat (a)\n    wait (n) seconds\n    go to x: (x) y: (y)\n    create clone of (_myself_ v)\nend\n\nwhen I receive [next v]\ndelete this clone\n\n@剣\n\nwhen flag clicked\nhide\nforever\n    if <[100] < (direction)> then\n        point in direction (100)\n    end\n    if <(direction) < [-100]> then\n        point in direction (-100)\n    end\nend\n\nwhen I receive [スタート v]\nset [攻撃 v] to [0]\nforever\n    switch costume to (持ち物)\n    if <[0] < ([direction v] of [プレイヤー v])> then\n        set [右左 v] to [右]\n        go to x: (([x position v] of [プレイヤー v]) + (30)) y: (([y position v] of [プレイヤー v]) + (-5))\n        if <(攻撃) = [0]> then\n            point in direction (-100)\n        end\n    else\n        set [右左 v] to [左]\n        go to x: (([x position v] of [プレイヤー v]) + (-30)) y: (([y position v] of [プレイヤー v]) + (-5))\n        if <(攻撃) = [0]> then\n            point in direction (100)\n        end\n    end\nend\n\nwhen I receive [スタート v]\nset [持ち物 v] to [5]\nshow\nforever\n    set size to (120) %\n    if <(item (1) of [#gamemode v]) = [10]> then\n        hide\n    end\n    if <(右左) = [右]> then\n        switch costume to ((持ち物) + (1))\n    else\n        switch costume to (持ち物)\n    end\nend\n\nwhen I receive [attack v]\nif <[0] < ([direction v] of [プレイヤー v])> then\n    point in direction (-100)\nelse\n    point in direction (100)\nend\nset [攻撃 v] to [1]\nif <(右左) = [右]> then\n    repeat (4)\n        turn right (15) degrees\n    end\nelse\n    repeat (4)\n        turn left (15) degrees\n    end\nend\nset [攻撃 v] to [0]\n\nwhen flag clicked\nforever\n    if <<key (space v) pressed?> or <<touching (mouse-pointer v)?> and <mouse down?>>> then\n        broadcast (attack v)\n        if <(item (1) of [#gamemode v]) = [15]> then\n            broadcast (爆発剣 v)\n        end\n    end\n    wait until <not <<key (space v) pressed?> or <<touching (mouse-pointer v)?> and <mouse down?>>>>\nend\n\nwhen I receive [リスポーン v]\nwait () seconds\nshow\n\nwhen I receive [やられた v]\nhide\n\nwhen I receive [スタート v]\nset [持ち物 v] to [5]\nwait until <(Stage) = [23]>\nset [持ち物 v] to [13]\n\n@弓\n\nwhen flag clicked\nset size to (80) %\ngo to [front v] layer\nswitch costume to (1 v)\n\nwhen I start as a clone\nif <(costume [name v]) = [4]> then\n    go to [front v] layer\n    set [ghost v] effect to (0)\n    set rotation style [all around v]\n    show\n    repeat (2)\n        if <(スケルトンの方向) = [90]> then\n            change x by (20)\n        end\n        if <(スケルトンの方向) = [-90]> then\n            change x by (-20)\n        end\n    end\n    repeat until <<<<touching (_edge_ v)?> or <touching (プレイヤー v)?>> or <<touching (サボテン v)?> or <<touching (マグマ v)?> or <<touching (壁 v)?> or <<touching (地面ー石 v)?> or <touching (地面ー砂 v)?>>>>>> or <<touching (剣 v)?> and <(攻撃) = [1]>>>\n        if <(スケルトンの方向) = [90]> then\n            change x by (22)\n        end\n        if <(スケルトンの方向) = [-90]> then\n            change x by (-22)\n        end\n        change [ghost v] effect by (2)\n        change y by (-1.5)\n        turn left (0.5) degrees\n    end\n    repeat (2)\n        change [ghost v] effect by (50)\n    end\n    delete this clone\nend\nset rotation style [all around v]\n\nwhen I start as a clone\nforever\n    if <(clone削除して) = [1]> then\n        forever\n            delete this clone\n        end\n    end\n    if <not <(costume [name v]) = [4]>> then\n        if <(スケルトンの存在) = [0]> then\n            delete this clone\n        end\n    end\nend\n\nwhen I start as a clone\nclear graphic effects\nif <(costume [name v]) = [4]> then\n    add [矢] to [1 v]\n    if <(...効果音　オンオフ) = [1]> then\n        start sound [弓矢射撃音 v]\n    end\n    wait until <touching (プレイヤー v)?>\n    broadcast (弓矢 v)\nend\n\nwhen I start as a clone\nshow\nif <not <(costume [name v]) = [4]>> then\n    forever\n        switch costume to (1 v)\n        wait (1.5) seconds\n        switch costume to (2 v)\n        wait (1) seconds\n        switch costume to (3 v)\n        wait (1) seconds\n        switch costume to (4 v)\n        create clone of (_myself_ v)\n    end\nend\n\nwhen I start as a clone\nif <not <(costume [name v]) = [4]>> then\n    forever\n        if <(スケルトンの方向) = [90]> then\n            point in direction (-135)\n            go to x: ((スケルトン位置x) + (20)) y: ((スケルトン位置y) + (-2))\n        end\n        if <(スケルトンの方向) = [-90]> then\n            point in direction (45)\n            go to x: ((スケルトン位置x) + (-20)) y: ((スケルトン位置y) + (-2))\n        end\n    end\nend\n\n@スケルトン\n\nwhen I receive [スタート v]\ngo to x: (250) y: (0)\ngo to [front v] layer\nhide\nwait (0.01) seconds\nスケルトン召喚魔法 [1] [200] [0] [1] 秒待つ\n\nwhen I receive [スタート v]\nforever\n    set [スケルトン v] to ((round ([x position v] of [プレイヤー v])) - (round (スケルトン位置x)))\nend\n\nwhen I receive [next v]\nset [スケルトンの存在 v] to [0]\ndelete this clone\n\nwhen I start as a clone\nadd [スケルトン/クローン] to [1 v]\nswitch costume to (スケルトン v)\nset [スケルトンの存在 v] to [1]\nclear graphic effects\nset size to (65) %\nwait (0.01) seconds\npoint in direction (-90)\nset [スケルトンx v] to [0]\nset [スケルトンy v] to [0]\nclear graphic effects\nshow\nforever\n    if <(位置リセット) = [1]> then\n        go to x: (200) y: (0)\n    end\n    if <([x position v] of [プレイヤー v]) < (スケルトン位置x)> then\n        set [スケルトンの方向 v] to [-90]\n        point in direction (-90)\n    else\n        set [スケルトンの方向 v] to [90]\n        point in direction (90)\n    end\n    set size to (100) %\n    set [スケルトン位置x v] to (x position)\n    set [スケルトン位置y v] to (y position)\n    if <(clone削除して) = [1]> then\n        forever\n            delete this clone\n        end\n    end\n    if <<((round ([x position v] of [プレイヤー v])) - (round (スケルトン位置x))) < [-200]> and <((round ([x position v] of [プレイヤー v])) - (round (スケルトン位置x))) < [0]>> then\n        if <touching (水 v)?> then\n            change [スケルトンx v] by (-0.2)\n        else\n            change [スケルトンx v] by (-0.3)\n        end\n    end\n    if <<[-170] < ((round ([x position v] of [プレイヤー v])) - (round (スケルトン位置x)))> and <((round ([x position v] of [プレイヤー v])) - (round (スケルトン位置x))) < [0]>> then\n        if <touching (水 v)?> then\n            change [スケルトンx v] by (0.2)\n        else\n            change [スケルトンx v] by (0.3)\n        end\n    end\n    if <<[0] < ((round ([x position v] of [プレイヤー v])) - (round (スケルトン位置x)))> and <((round ([x position v] of [プレイヤー v])) - (round (スケルトン位置x))) < [170]>> then\n        if <touching (水 v)?> then\n            change [スケルトンx v] by (-0.2)\n        else\n            change [スケルトンx v] by (-0.3)\n        end\n    end\n    if <[200] < ((round ([x position v] of [プレイヤー v])) - (round (スケルトン位置x)))> then\n        if <touching (水 v)?> then\n            change [スケルトンx v] by (0.2)\n        else\n            change [スケルトンx v] by (0.3)\n        end\n    end\n    set [スケルトンx v] to ((スケルトンx) * (0.9))\n    change x by (スケルトンx)\n    if <<touching (壁 v)?> or <<touching (地面ー砂 v)?> or <touching (地面ー石 v)?>>> then\n        change y by (1)\n        if <<touching (壁 v)?> or <<touching (地面ー砂 v)?> or <touching (地面ー石 v)?>>> then\n            change y by (1)\n            if <<touching (壁 v)?> or <<touching (地面ー砂 v)?> or <touching (地面ー石 v)?>>> then\n                change y by (1)\n                if <<touching (壁 v)?> or <<touching (地面ー砂 v)?> or <touching (地面ー石 v)?>>> then\n                    change y by (1)\n                    if <<touching (壁 v)?> or <<touching (地面ー砂 v)?> or <touching (地面ー石 v)?>>> then\n                        change y by (1)\n                        if <<touching (壁 v)?> or <<touching (地面ー砂 v)?> or <touching (地面ー石 v)?>>> then\n                            change y by (1)\n                            if <<touching (壁 v)?> or <<touching (地面ー砂 v)?> or <touching (地面ー石 v)?>>> then\n                                change x by ((0) - (スケルトンx))\n                                change y by (-5)\n                                if <not <(y position) < ([y position v] of [プレイヤー v])>> then\n                                    set [スケルトンx v] to [0]\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\n    change [スケルトンy v] by (-0.9)\n    if <<touching (水 v)?> and <(スケルトンy) < [-2]>> then\n        set [スケルトンy v] to [-2]\n    end\n    change y by (スケルトンy)\n    if <<touching (壁 v)?> or <<touching (地面ー砂 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    if <<touching (水 v)?> and <<key (up arrow v) pressed?> or <key (w v) pressed?>>> then\n        set [スケルトンy v] to [4]\n    else\n        if <<touching (壁 v)?> or <<touching (地面ー砂 v)?> or <touching (地面ー石 v)?>>> then\n            if <(y position) < ([y position v] of [プレイヤー v])> then\n                if <[1] = (pick random (1) to (15))> then\n                    set [スケルトンy v] to [12]\n                end\n            end\n        end\n    end\n    change y by (1)\nend\n\nwhen I start as a clone\nforever\n    set [モブの位置x v] to (x position)\n    set [モブの位置y v] to (y position)\nend\n\ndefine ダメージ (ダメージ量)\nswitch costume to (スケルトン2 v)\nchange [hp v] by (ダメージ量)\nif <(HP) < [0.01]> then\n    replace item (12) of [適用 v] with ((item (12) of [適用 v]) + (1))\n    replace item (9) of [適用 v] with [0]\n    replace item (4) of [適用 v] with (x position)\n    replace item (5) of [適用 v] with (y position)\n    if <(...効果音　オンオフ) = [1]> then\n        start sound [Skeleton_death v]\n    end\n    set [sukeruton keikenti v] to (x position)\n    set [sukeruton keikenti2 v] to (y position)\n    broadcast (スケルトン v)\n    repeat (5)\n        change [ghost v] effect by (20)\n    end\n    set [スケルトンの存在 v] to [0]\n    delete this clone\nelse\n    if <(...効果音　オンオフ) = [1]> then\n        if <(pick random (1) to (2)) = [1]> then\n            start sound [skeletonhurt2 v]\n        else\n            start sound [skeletondeath v]\n        end\n    end\nend\nwait (0.25) seconds\nswitch costume to (スケルトン v)\n\ndefine ノックバック (x) (y)\nset [スケルトンx v] to (x)\nset [スケルトンy v] to (y)\n\nwhen I start as a clone\nif <(item (2) of [#gamemode v]) = [12]> then\n    set [hp v] to [18]\nelse\n    set [hp v] to [22]\nend\nforever\n    if <touching (マグマ v)?> then\n        ダメージ [-4]\n        wait (0.25) seconds\n    end\n    if <touching (サボテン v)?> then\n        ダメージ [-3]\n        wait (0.3) seconds\n    end\n    if <<touching (剣 v)?> and <(攻撃) = [1]>> then\n        if <([x position v] of [プレイヤー v]) < (x position)> then\n            ノックバック [10] [10]\n        else\n            ノックバック [-10] [10]\n        end\n        if <(結果) = [クリティカル攻撃可能]> then\n            ダメージ ([floor v] of (([costume name v] of [剣 v]) * (1.5)) )\n            set [攻撃位置x v] to (x position)\n            set [攻撃位置y v] to (y position)\n            broadcast (クリティカル v)\n        else\n            ダメージ ([costume name v] of [剣 v])\n        end\n        wait until <(攻撃) = [0]>\n        wait (0.3) seconds\n        switch costume to (スケルトン v)\n    end\n    if <touching (ソニックブーム補完用4 v)?> then\n        if <([x position v] of [プレイヤー v]) < (x position)> then\n            ノックバック [10] [10]\n        else\n            ノックバック [-10] [10]\n        end\n        ダメージ [-16]\n        wait (0.3) seconds\n        switch costume to (スケルトン v)\n        wait (1) seconds\n    end\n    if <touching (爆発 v)?> then\n        ダメージ [-16]\n        if <(item (4) of [適用 v]) < (x position)> then\n            ノックバック [15] [12]\n        else\n            ノックバック [-15] [12]\n        end\n        wait (0.3) seconds\n    end\n    if <touching (爆発2 v)?> then\n        ダメージ [-14]\n        if <([x position v] of [プレイヤー v]) < (x position)> then\n            ノックバック [14] [12]\n        else\n            ノックバック [-14] [12]\n        end\n        wait (0.3) seconds\n        switch costume to (スケルトン v)\n    end\n    if <(y position) < [-160]> then\n        ダメージ [-100]\n        wait (0.3) seconds\n    end\nend\n\ndefine スケルトン召喚魔法 (ステージ) (x) (y) (n) 秒待つ\nwait (n) seconds\ngo to x: (x) y: (y)\ncreate clone of (_myself_ v)\nadd [弓] to [1 v]\ncreate clone of (弓 v)\n\nwhen I receive [next v]\ndelete this clone\n\nwhen I receive [やられた v]\nset [スケルトンの存在 v] to [0]\ndelete this clone\n\n@ちび助\n\nwhen I receive [スタート v]\ngo to x: (250) y: (0)\ngo to [front v] layer\nhide\nwait (3) seconds\nwait until <[5] = (Stage)>\nrepeat (4)\n    スケルトン召喚魔法 [1] [200] [100] [0.2] 秒待つ\nend\nwait until <[7] = (Stage)>\nrepeat (2)\n    スケルトン召喚魔法 [1] [200] [100] [0.2] 秒待つ\nend\n\nwhen I receive [スタート v]\nforever\n    set [スケルトン v] to ((round ([x position v] of [プレイヤー v])) - (round (スケルトン位置x)))\nend\n\nwhen I receive [next v]\nset [スケルトンの存在 v] to [0]\ndelete this clone\n\nwhen I start as a clone\nadd [スケルトン/クローン] to [1 v]\nswitch costume to (スケルトン v)\nset [スケルトンの存在 v] to [1]\nclear graphic effects\nset size to (65) %\nwait (0.01) seconds\npoint in direction (-90)\nset [ちびx v] to [0]\nset [ちびy v] to [0]\nclear graphic effects\nshow\nforever\n    if <(位置リセット) = [1]> then\n        go to x: (200) y: (0)\n    end\n    if <([x position v] of [プレイヤー v]) < (スケルトン位置x)> then\n        set [スケルトンの方向 v] to [-90]\n        point in direction (-90)\n    else\n        set [スケルトンの方向 v] to [90]\n        point in direction (90)\n    end\n    if <(clone削除して) = [1]> then\n        forever\n            delete this clone\n        end\n    end\n    set [スケルトン位置x v] to (x position)\n    set [スケルトン位置y v] to (y position)\n    if <<((round ([x position v] of [プレイヤー v])) - (round (スケルトン位置x))) < [-200]> and <((round ([x position v] of [プレイヤー v])) - (round (スケルトン位置x))) < [0]>> then\n        if <touching (水 v)?> then\n            change [ちびx v] by (-0.2)\n        else\n            change [ちびx v] by (-1)\n        end\n    end\n    if <<[-170] < ((round ([x position v] of [プレイヤー v])) - (round (スケルトン位置x)))> and <((round ([x position v] of [プレイヤー v])) - (round (スケルトン位置x))) < [0]>> then\n        if <touching (水 v)?> then\n            change [ちびx v] by (0.2)\n        else\n            change [ちびx v] by (1)\n        end\n    end\n    if <<[0] < ((round ([x position v] of [プレイヤー v])) - (round (スケルトン位置x)))> and <((round ([x position v] of [プレイヤー v])) - (round (スケルトン位置x))) < [170]>> then\n        if <touching (水 v)?> then\n            change [ちびx v] by (-0.2)\n        else\n            change [ちびx v] by (-1)\n        end\n    end\n    if <[200] < ((round ([x position v] of [プレイヤー v])) - (round (スケルトン位置x)))> then\n        if <touching (水 v)?> then\n            change [ちびx v] by (0.2)\n        else\n            change [ちびx v] by (1)\n        end\n    end\n    set [ちびx v] to ((ちびx) * (0.9))\n    change x by (ちびx)\n    if <<touching (壁 v)?> or <<touching (地面ー砂 v)?> or <touching (地面ー石 v)?>>> then\n        change y by (1)\n        if <<touching (壁 v)?> or <<touching (地面ー砂 v)?> or <touching (地面ー石 v)?>>> then\n            change y by (1)\n            if <<touching (壁 v)?> or <<touching (地面ー砂 v)?> or <touching (地面ー石 v)?>>> then\n                change y by (1)\n                if <<touching (壁 v)?> or <<touching (地面ー砂 v)?> or <touching (地面ー石 v)?>>> then\n                    change y by (1)\n                    if <<touching (壁 v)?> or <<touching (地面ー砂 v)?> or <touching (地面ー石 v)?>>> then\n                        change y by (1)\n                        if <<touching (壁 v)?> or <<touching (地面ー砂 v)?> or <touching (地面ー石 v)?>>> then\n                            change y by (1)\n                            if <<touching (壁 v)?> or <<touching (地面ー砂 v)?> or <touching (地面ー石 v)?>>> then\n                                change x by ((0) - (ちびx))\n                                change y by (-5)\n                                if <not <(y position) < ([y position v] of [プレイヤー v])>> then\n                                    set [ちびx v] to [0]\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\n    change [ちびy v] by (-0.9)\n    if <<touching (水 v)?> and <(ちびy) < [-2]>> then\n        set [ちびy v] to [-2]\n    end\n    change y by (ちびy)\n    if <<touching (壁 v)?> or <<touching (地面ー砂 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    if <<touching (水 v)?> and <<key (up arrow v) pressed?> or <key (w v) pressed?>>> then\n        set [ちびy v] to [4]\n    else\n        if <<touching (壁 v)?> or <<touching (地面ー砂 v)?> or <touching (地面ー石 v)?>>> then\n            if <(y position) < ([y position v] of [プレイヤー v])> then\n                if <[1] = (pick random (1) to (15))> then\n                    set [ちびy v] to [9]\n                end\n            end\n        end\n    end\n    change y by (1)\nend\n\nwhen I start as a clone\nforever\n    set [モブの位置x v] to (x position)\n    set [モブの位置y v] to (y position)\nend\n\ndefine ダメージ (ダメージ量)\nswitch costume to (スケルトン2 v)\nchange [hp v] by (ダメージ量)\nif <(HP) < [0.01]> then\n    replace item (12) of [適用 v] with ((item (12) of [適用 v]) + (1))\n    replace item (9) of [適用 v] with [0]\n    if <[1] = (...効果音　オンオフ)> then\n        start sound [Skeleton_death v]\n    end\n    replace item (4) of [適用 v] with (x position)\n    replace item (5) of [適用 v] with (y position)\n    set [tibisuke keikenti v] to (x position)\n    set [tibisuke keikenti 2 v] to (y position)\n    broadcast (チビ助 v)\n    repeat (5)\n        change [ghost v] effect by (20)\n    end\n    set [スケルトンの存在 v] to [0]\n    delete this clone\nelse\n    if <(...効果音　オンオフ) = [1]> then\n        if <(pick random (1) to (2)) = [1]> then\n            start sound [skeletonhurt2 v]\n        else\n            start sound [skeletondeath v]\n        end\n    end\nend\nwait (0.25) seconds\nswitch costume to (スケルトン v)\n\ndefine ノックバック (x) (y)\nset [ちびx v] to (x)\nset [ちびy v] to (y)\n\nwhen I start as a clone\nif <(item (2) of [設定 v]) = [12]> then\n    set [hp v] to [18]\nelse\n    set [hp v] to [22]\nend\nforever\n    if <touching (マグマ v)?> then\n        ダメージ [-4]\n        wait (0.25) seconds\n    end\n    if <touching (サボテン v)?> then\n        ダメージ [-3]\n        wait (0.3) seconds\n    end\n    if <<touching (剣 v)?> and <(攻撃) = [1]>> then\n        if <([x position v] of [プレイヤー v]) < (x position)> then\n            ノックバック [10] [10]\n        else\n            ノックバック [-10] [10]\n        end\n        if <(結果) = [クリティカル攻撃可能]> then\n            ダメージ ([floor v] of (([costume name v] of [剣 v]) * (1.5)) )\n            set [攻撃位置x v] to (x position)\n            set [攻撃位置y v] to (y position)\n            broadcast (クリティカル v)\n        else\n            ダメージ ([costume name v] of [剣 v])\n        end\n        wait until <(攻撃) = [0]>\n        wait (0.3) seconds\n        switch costume to (スケルトン v)\n    end\n    if <touching (ソニックブーム補完用4 v)?> then\n        if <([x position v] of [プレイヤー v]) < (x position)> then\n            ノックバック [10] [10]\n        else\n            ノックバック [-10] [10]\n        end\n        ダメージ [-16]\n        wait (0.3) seconds\n        switch costume to (スケルトン v)\n        wait (1) seconds\n    end\n    if <touching (爆発 v)?> then\n        ダメージ [-16]\n        if <(item (4) of [適用 v]) < (x position)> then\n            ノックバック [15] [12]\n        else\n            ノックバック [-15] [12]\n        end\n        wait (0.3) seconds\n    end\n    if <touching (爆発2 v)?> then\n        ダメージ [-14]\n        if <([x position v] of [プレイヤー v]) < (x position)> then\n            ノックバック [14] [12]\n        else\n            ノックバック [-14] [12]\n        end\n        wait (0.3) seconds\n        switch costume to (スケルトン v)\n    end\n    if <(y position) < [-160]> then\n        ダメージ [-100]\n        wait (0.3) seconds\n    end\nend\n\ndefine スケルトン召喚魔法 (ステージ) (x) (y) (n) 秒待つ\nwait (n) seconds\ngo to x: (x) y: (y)\ncreate clone of (_myself_ v)\nadd [弓] to [1 v]\ncreate clone of (弓 v)\n\nwhen I receive [next v]\ndelete this clone\n\nwhen I receive [やられた v]\nset [スケルトンの存在 v] to [0]\ndelete this clone\n\n@ちび弓\n\nwhen flag clicked\nset size to (80) %\ngo to [front v] layer\nswitch costume to (1 v)\n\nwhen I start as a clone\nif <(costume [name v]) = [4]> then\n    go to [front v] layer\n    set [ghost v] effect to (0)\n    set rotation style [all around v]\n    show\n    repeat (2)\n        if <(スケルトンの方向) = [90]> then\n            change x by (20)\n        end\n        if <(スケルトンの方向) = [-90]> then\n            change x by (-20)\n        end\n    end\n    repeat until <<<<touching (_edge_ v)?> or <touching (プレイヤー v)?>> or <<touching (サボテン v)?> or <<touching (マグマ v)?> or <<touching (壁 v)?> or <<touching (地面ー石 v)?> or <touching (地面ー砂 v)?>>>>>> or <<touching (剣 v)?> and <(攻撃) = [1]>>>\n        if <(スケルトンの方向) = [90]> then\n            change x by (22)\n        end\n        if <(スケルトンの方向) = [-90]> then\n            change x by (-22)\n        end\n        change [ghost v] effect by (2)\n        change y by (-1.5)\n        turn left (0.5) degrees\n    end\n    repeat (2)\n        change [ghost v] effect by (50)\n    end\n    delete this clone\nend\nset rotation style [all around v]\n\nwhen I start as a clone\nforever\n    if <(clone削除して) = [1]> then\n        forever\n            delete this clone\n        end\n    end\n    if <not <(costume [name v]) = [4]>> then\n        if <(スケルトンの存在) = [0]> then\n            delete this clone\n        end\n    end\nend\n\nwhen I start as a clone\nclear graphic effects\nif <(costume [name v]) = [4]> then\n    add [矢] to [1 v]\n    if <(...効果音　オンオフ) = [1]> then\n        start sound [弓矢射撃音 v]\n    end\n    wait until <touching (プレイヤー v)?>\n    broadcast (弓矢 v)\nend\n\nwhen I start as a clone\nshow\nif <not <(costume [name v]) = [4]>> then\n    forever\n        switch costume to (1 v)\n        wait (1.5) seconds\n        switch costume to (2 v)\n        wait (1) seconds\n        switch costume to (3 v)\n        wait (1) seconds\n        switch costume to (4 v)\n        create clone of (_myself_ v)\n    end\nend\n\nwhen I start as a clone\nif <not <(costume [name v]) = [4]>> then\n    forever\n        if <(スケルトンの方向) = [90]> then\n            point in direction (-135)\n            go to x: ((スケルトン位置x) + (20)) y: ((スケルトン位置y) + (-2))\n        end\n        if <(スケルトンの方向) = [-90]> then\n            point in direction (45)\n            go to x: ((スケルトン位置x) + (-20)) y: ((スケルトン位置y) + (-2))\n        end\n    end\nend\n\n@エフェクト　ゾンビ\n\nwhen I start as a clone\nswitch costume to (pick random (1) to (4))\nrepeat (20)\n    change x by (xspeed)\n    go to [front v] layer\n    change y by (vel)\n    change [ghost v] effect by (5)\n    change [vel v] by (-2)\n    turn right ((xspeed) / (3)) degrees\nend\ndelete this clone\n\n@ウィザー\n\nwhen I start as a clone\nadd [ウィザー] to [1 v]\nclear graphic effects\nset size to (100) %\nwait (0.2) seconds\npoint in direction (90)\nset [ウィザーx v] to [0]\nset [ウィザーy v] to [0]\nset [ウィザー攻撃方 v] to [0]\nclear graphic effects\nshow\nchange [brightness v] effect by (100)\nwait (3) seconds\nset [brightness v] effect to (0)\nset [ウィザードこx v] to (x position)\nset [ウィザードこ2 v] to (y position)\ncreate clone of (爆発！ v)\nforever\n    if <<[1] = (pick random (1) to (10))> and <(distance to [プレイヤー v]) < [150]>> then\n        set [ウィザー攻撃方 v] to [0]\n        change [ウィザーx v] by (5)\n        if <[270] < (x position)> then\n            change [ウィザーx v] by (-50)\n        end\n        set [ウィザードこx v] to (x position)\n        set [ウィザードこ2 v] to (y position)\n        create clone of (爆発！ v)\n    end\n    if <<[1] = (pick random (1) to (10))> and <not <(distance to [プレイヤー v]) < [150]>>> then\n        set [ウィザー攻撃方 v] to [1]\n        change [ウィザーx v] by (5)\n        if <[270] < (x position)> then\n            change [ウィザーx v] by (-30)\n        end\n        set [ウィザードこx v] to (x position)\n        set [ウィザードこ2 v] to (y position)\n        create clone of (爆発！ v)\n    end\n    set [ウィザー v] to (HP)\n    if <(位置リセット) = [1]> then\n        go to x: (200) y: (0)\n    end\n    if <(clone削除して) = [1]> then\n        forever\n            delete this clone\n        end\n    end\n    if <([x position v] of [プレイヤー v]) < (x position)> then\n        point in direction (-90)\n        if <touching (水 v)?> then\n            change [ウィザーx v] by (-0.14)\n        else\n            change [ウィザーx v] by (-0.2)\n        end\n    end\n    if <(x position) < ([x position v] of [プレイヤー v])> then\n        point in direction (90)\n        if <touching (水 v)?> then\n            change [ウィザーx v] by (0.14)\n        else\n            change [ウィザーx v] by (0.2)\n        end\n    end\n    set [ウィザーx v] to ((ウィザーx) * (0.9))\n    change x by (ウィザーx)\n    if <<touching (壁 v)?> or <<touching (壁 v)?> or <touching (壁 v)?>>> then\n        change y by (1)\n        if <<touching (壁 v)?> or <<touching (壁 v)?> or <touching (壁 v)?>>> then\n            change y by (1)\n            if <<touching (壁 v)?> or <<touching (壁 v)?> or <touching (壁 v)?>>> then\n                change y by (1)\n                if <<touching (壁 v)?> or <<touching (壁 v)?> or <touching (壁 v)?>>> then\n                    change y by (1)\n                    if <<touching (壁 v)?> or <<touching (壁 v)?> or <touching (壁 v)?>>> then\n                        change y by (1)\n                        if <<touching (壁 v)?> or <<touching (壁 v)?> or <touching (壁 v)?>>> then\n                            change y by (1)\n                            if <<touching (壁 v)?> or <<touching (壁 v)?> or <touching (壁 v)?>>> then\n                                change x by ((0) - (ウィザーx))\n                                change y by (-5)\n                                if <not <(y position) < ([y position v] of [プレイヤー v])>> then\n                                    set [ウィザーx v] to [0]\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\n    change [ウィザーy v] by (-0.9)\n    if <<touching (水 v)?> and <(ウィザーy) < [-2]>> then\n        set [ウィザーy v] to [-2]\n    end\n    change y by (ウィザーy)\n    if <<touching (壁 v)?> or <<touching (壁 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    if <<touching (水 v)?> and <<key (up arrow v) pressed?> or <key (w v) pressed?>>> then\n        set [ウィザーy v] to [4]\n    else\n        set y to (120)\n    end\n    change y by (1)\nend\n\nwhen I start as a clone\nforever\n    set [モブの位置x v] to (x position)\n    set [モブの位置y v] to (y position)\nend\n\nwhen I receive [やられた v]\ndelete this clone\n\nwhen I start as a clone\nset [ウィザー ｈｐ v] to [50]\nset [ウィザー v] to [50]\nswitch costume to (player v)\nforever\n    show\n    if <touching (マグマ v)?> then\n        ダメージ [-2]\n        wait (0.25) seconds\n        switch costume to (player v)\n    end\n    if <touching (サボテン v)?> then\n        ダメージ [-1]\n        wait (0.25) seconds\n        switch costume to (player v)\n    end\n    if <<touching (剣 v)?> and <(攻撃) = [1]>> then\n        if <([x position v] of [プレイヤー v]) < (x position)> then\n            ノックバック [2] [0]\n        else\n            ノックバック [-2] [0]\n        end\n        if <(結果) = [クリティカル攻撃可能]> then\n            ダメージ ([floor v] of (([costume name v] of [剣 v]) * (1.5)) )\n            set [攻撃位置x v] to (x position)\n            set [攻撃位置y v] to (y position)\n            broadcast (クリティカル v)\n        else\n            ダメージ ([costume name v] of [剣 v])\n        end\n        wait until <(攻撃) = [0]>\n        wait (0.3) seconds\n        switch costume to (player v)\n    end\n    if <touching (爆発 v)?> then\n        ダメージ [-1]\n        if <(item (4) of [適用 v]) < (x position)> then\n            ノックバック [3] [0]\n        else\n            ノックバック [3] [0]\n        end\n        wait (0.3) seconds\n        switch costume to (player v)\n    end\n    if <touching (ソニックブーム補完用4 v)?> then\n        ダメージ [-16]\n        if <([x position v] of [プレイヤー v]) < (x position)> then\n            ノックバック [10] [10]\n        else\n            ノックバック [-10] [10]\n        end\n        wait (0.3) seconds\n        switch costume to (player v)\n        wait (1) seconds\n    end\nend\n\ndefine ダメージ (ダメージ量)\nchange [hp v] by (ダメージ量)\nif <(pick random (1) to (2)) = [1]> then\n    if <[1] = (...効果音　オンオフ)> then\n        start sound [攻撃 v]\n    end\n    switch costume to (player2 v)\nelse\n    if <[1] = (...効果音　オンオフ)> then\n        start sound [攻撃2 v]\n    end\n    switch costume to (player2 v)\nend\nif <(HP) < [0.01]> then\n    switch costume to (player2 v)\n    if <[1] = (...効果音　オンオフ)> then\n        start sound [倒した v]\n    end\n    set [ウィ v] to (x position)\n    set [ウィ２ v] to (y position)\n    broadcast (ウィザー v)\n    repeat (4)\n        set [ウィザー v] to [0]\n        change [ghost v] effect by (25)\n    end\n    delete this clone\nend\n\nwhen I receive [スタート v]\ngo to x: (250) y: (0)\ngo to [front v] layer\nhide\nwait (5) seconds\nwait until <(Stage) = [9]>\n\nゾンビ召喚魔法 [1] [200] [100] [0.1] 秒待つ [1] 回繰り返す\n\ndefine ノックバック (x) (y)\nset [ウィザーx v] to (x)\nset [ウィザーy v] to (y)\n\ndefine ゾンビ召喚魔法 (ステージ) (x) (y) (n) 秒待つ (a) 回繰り返す\nrepeat (a)\n    wait (n) seconds\n    go to x: (x) y: (y)\n    create clone of (_myself_ v)\nend\n\nwhen I receive [next v]\ndelete this clone\n\n@エフェクト　sukeru ti\n\nwhen I start as a clone\nswitch costume to (pick random (1) to (4))\nrepeat (20)\n    change x by (xspeed)\n    go to [front v] layer\n    change y by (vel)\n    change [ghost v] effect by (5)\n    change [vel v] by (-2)\n    turn right ((xspeed) / (3)) degrees\nend\ndelete this clone\n\nwhen I receive [スケルトン v]\nadd [スケルトンのエフェクト] to [1 v]\nh [1]\n\nwhen I receive [チビ助 v]\nadd [スケルトンのエフェクト] to [1 v]\nh [???]\n\ndefine h (1)\nif <(1) = [1]> then\n    go to x: (sukeruton keikenti) y: (sukeruton keikenti2)\n    switch costume to (costume1 v)\n    repeat (20)\n        set [vel v] to (pick random (10) to (20))\n        set [xspeed v] to (pick random (-8) to (8))\n        show\n        set size to (pick random (40) to (86)) %\n        create clone of (_myself_ v)\n    end\n    hide\nelse\n    if <(1) = [2]> then\n        go to x: (ウィ) y: (ウィ２)\n        switch costume to (costume1 v)\n        repeat (20)\n            set [vel v] to (pick random (10) to (20))\n            set [xspeed v] to (pick random (-8) to (8))\n            show\n            set size to (pick random (40) to (86)) %\n            create clone of (_myself_ v)\n        end\n        hide\n    else\n        go to x: (tibisuke keikenti) y: (tibisuke keikenti 2)\n        switch costume to (costume1 v)\n        repeat (20)\n            set [vel v] to (pick random (10) to (20))\n            set [xspeed v] to (pick random (-8) to (8))\n            show\n            set size to (pick random (40) to (86)) %\n            create clone of (_myself_ v)\n        end\n        hide\n    end\nend\n\nwhen I receive [ウィザー v]\nadd [ウィザーのエフェクト] to [1 v]\nh [2]\n\n@Info\n\nwhen flag clicked\nwait (0.01) seconds\nadd [Infoを表示] to [1 v]\nset [位置リセット v] to [0]\nhide\nwait (1) seconds\ngo to x: (0) y: (-45)\nswitch costume to (1 v)\nshow\nrepeat (30)\n    change y by ((0.25) * ((0) - (y position)))\nend\ngo to [front v] layer\nwait (3) seconds\nrepeat (9)\n    change y by (-5)\nend\nswitch costume to (2 v)\nrepeat (30)\n    change y by ((0.25) * ((0) - (y position)))\nend\nwait (3) seconds\nrepeat (9)\n    change y by (-5)\nend\nswitch costume to (3 v)\nrepeat (30)\n    change y by ((0.25) * ((0) - (y position)))\nend\nwait (4) seconds\nrepeat (9)\n    change y by (-5)\nend\nhide\n\nwhen I receive [スタート v]\nhide\n\nwhen [timer v] > (0.01)\nhide\n\n@サボテン\n\nwhen flag clicked\nhide\n\nwhen I receive [スタート v]\nset [stage v] to [1]\nshow\nforever\n    go to x: (0) y: (0)\n    switch costume to (Stage)\n    go to [back v] layer\nend\n\nset [...bgm オンオフ v] to [0]\n\nforever\n    set [clone削除して v] to [1]\nend\n\n@マグマ\n\nwhen flag clicked\nhide\n\nwhen I receive [スタート v]\nset [stage v] to [1]\nshow\nforever\n    go to x: (0) y: (0)\n    switch costume to (Stage)\n    go to [back v] layer\nend\n\n@水\n\nwhen flag clicked\nhide\n\nwhen I receive [スタート v]\nset [stage v] to [1]\nshow\nforever\n    switch costume to (Stage)\n    go to [back v] layer\n    go to x: (0) y: (0)\nend\n\n@クモ\n\nwhen I start as a clone\nclear graphic effects\nset size to (100) %\nwait (0.2) seconds\npoint in direction (90)\nset [クモx v] to [0]\nset [クモy v] to [0]\nclear graphic effects\nshow\nforever\n    if <(位置リセット) = [1]> then\n        go to x: (200) y: (0)\n    end\n    if <(clone削除して) = [1]> then\n        forever\n            delete this clone\n        end\n    end\n    if <([x position v] of [プレイヤー v]) < (x position)> then\n        point in direction (-90)\n        if <touching (水 v)?> then\n            change [クモx v] by (-0.1)\n        else\n            change [クモx v] by (-0.18)\n        end\n    end\n    if <(x position) < ([x position v] of [プレイヤー v])> then\n        point in direction (90)\n        if <touching (水 v)?> then\n            change [クモx v] by (0.1)\n        else\n            change [クモx v] by (0.18)\n        end\n    end\n    set [クモx v] to ((クモx) * (0.9))\n    change x by (クモx)\n    if <<touching (壁 v)?> or <<touching (壁 v)?> or <touching (壁 v)?>>> then\n        change y by (1)\n        if <<touching (壁 v)?> or <<touching (壁 v)?> or <touching (壁 v)?>>> then\n            change y by (1)\n            if <<touching (壁 v)?> or <<touching (壁 v)?> or <touching (壁 v)?>>> then\n                change y by (1)\n                if <<touching (壁 v)?> or <<touching (壁 v)?> or <touching (壁 v)?>>> then\n                    change y by (1)\n                    if <<touching (壁 v)?> or <<touching (壁 v)?> or <touching (壁 v)?>>> then\n                        change y by (1)\n                        if <<touching (壁 v)?> or <<touching (壁 v)?> or <touching (壁 v)?>>> then\n                            change y by (1)\n                            if <<touching (壁 v)?> or <<touching (壁 v)?> or <touching (壁 v)?>>> then\n                                change x by ((0) - (クモx))\n                                change y by (-5)\n                                if <not <(y position) < ([y position v] of [プレイヤー v])>> then\n                                    set [クモx v] to [0]\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\n    change [クモy v] by (-0.9)\n    if <<touching (水 v)?> and <(クモy) < [-2]>> then\n        set [クモy v] to [-2]\n    end\n    change y by (クモy)\n    if <<touching (壁 v)?> or <<touching (壁 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    if <<touching (水 v)?> and <<key (up arrow v) pressed?> or <key (w v) pressed?>>> then\n        set [クモy v] to [4]\n    else\n        if <<touching (壁 v)?> or <<touching (壁 v)?> or <touching (壁 v)?>>> then\n            if <(y position) < ([y position v] of [プレイヤー v])> then\n                if <[1] = (pick random (1) to (15))> then\n                    set [クモy v] to [12]\n                end\n            end\n        end\n    end\n    change y by (1)\nend\n\nwhen I start as a clone\nforever\n    set [モブの位置x v] to (x position)\n    set [モブの位置y v] to (y position)\nend\n\nwhen I receive [やられた v]\ndelete this clone\n\nwhen I start as a clone\nif <(item (2) of [#gamemode v]) = [12]> then\n    set [hp v] to [18]\nelse\n    set [hp v] to [22]\nend\nswitch costume to (player v)\nforever\n    if <touching (マグマ v)?> then\n        ダメージ [-4]\n        wait (0.25) seconds\n        switch costume to (player v)\n    end\n    if <touching (サボテン v)?> then\n        ダメージ [-4]\n        wait (0.25) seconds\n        switch costume to (player v)\n    end\n    if <<touching (剣 v)?> and <(攻撃) = [1]>> then\n        if <([x position v] of [プレイヤー v]) < (x position)> then\n            ノックバック [10] [10]\n        else\n            ノックバック [-10] [10]\n        end\n        if <(結果) = [クリティカル攻撃可能]> then\n            ダメージ ([floor v] of (([costume name v] of [剣 v]) * (1.5)) )\n            set [攻撃位置x v] to (x position)\n            set [攻撃位置y v] to (y position)\n            broadcast (クリティカル v)\n        else\n            ダメージ ([costume name v] of [剣 v])\n        end\n        wait until <(攻撃) = [0]>\n        wait (0.3) seconds\n        switch costume to (player v)\n    end\n    if <touching (爆発 v)?> then\n        ダメージ [-15]\n        if <(item (4) of [適用 v]) < (x position)> then\n            ノックバック [15] [12]\n        else\n            ノックバック [-15] [12]\n        end\n        wait (0.3) seconds\n        switch costume to (player v)\n    end\n    if <touching (ソニックブーム補完用4 v)?> then\n        ダメージ [-16]\n        if <([x position v] of [プレイヤー v]) < (x position)> then\n            ノックバック [10] [10]\n        else\n            ノックバック [-10] [10]\n        end\n        wait (0.3) seconds\n        switch costume to (player v)\n        wait (1) seconds\n    end\n    if <touching (爆発2 v)?> then\n        ダメージ [-16]\n        if <([x position v] of [プレイヤー v]) < (x position)> then\n            ノックバック [14] [12]\n        else\n            ノックバック [-14] [12]\n        end\n        wait (0.3) seconds\n        switch costume to (player v)\n    end\n    if <(y position) < [-160]> then\n        ダメージ [-100]\n        wait (0.3) seconds\n    end\nend\n\ndefine ダメージ (ダメージ量)\nchange [hp v] by (ダメージ量)\nif <(pick random (1) to (2)) = [1]> then\n    if <[1] = (...効果音　オンオフ)> then\n        start sound [攻撃 v]\n    end\n    switch costume to (player2 v)\nelse\n    if <[1] = (...効果音　オンオフ)> then\n        start sound [攻撃2 v]\n    end\n    switch costume to (player2 v)\nend\nif <(HP) < [0.01]> then\n    switch costume to (player2 v)\n    if <[1] = (...効果音　オンオフ)> then\n        start sound [倒した v]\n    end\n    set [ウィ v] to (x position)\n    set [ウィ２ v] to (y position)\n    broadcast (ゾンビ v)\n    repeat (4)\n        change [ghost v] effect by (25)\n    end\n    delete this clone\nend\n\nwhen I receive [スタート v]\ngo to x: (250) y: (0)\ngo to [front v] layer\nhide\nwait (0.01) seconds\nゾンビ召喚魔法 [1] [200] [0] [0.1] 秒待つ [1] 回繰り返す\nwait until <[2] = (Stage)>\nゾンビ召喚魔法 [1] [200] [0] [0.1] 秒待つ [1] 回繰り返す\nwait until <[3] = (Stage)>\nゾンビ召喚魔法 [1] [200] [0] [0.1] 秒待つ [3] 回繰り返す\nwait until <[4] = (Stage)>\nゾンビ召喚魔法 [1] [200] [0] [0.1] 秒待つ [3] 回繰り返す\nwait until <[5] = (Stage)>\n\ndefine ノックバック (x) (y)\nset [クモx v] to (x)\nset [クモy v] to (y)\n\ndefine ゾンビ召喚魔法 (ステージ) (x) (y) (n) 秒待つ (a) 回繰り返す\nrepeat (a)\n    wait (n) seconds\n    go to x: (x) y: (y)\n    create clone of (_myself_ v)\nend\n\nwhen I receive [next v]\ndelete this clone\n\n@ペン\n\ndefine 最大HPを (最大hp) に設定し、現在のHPを (現在のhp) にする\nset [最大hp v] to (最大hp)\nerase all\npen up\nset pen size to (15)\nset pen color to (#000000)\nset y to (-120)\nset x to (-225)\npen down\nset x to (225)\npen up\nset pen color to (#ff80f8)\nset pen size to (10)\nset x to (-225)\npen down\nchange x by ((450) / ((最大HP) / (ウィザー)))\npen up\nset pen color to (#ffffff)\nset pen size to (3)\nset x to (-225)\npen down\nchange x by ((450) / ((最大HP) / (ウィザー)))\n\nwhen flag clicked\nforever\nend\n\nif <([costume # v] of [壁 v]) = [10]> then\n    最大HPを [25] に設定し、現在のHPを (ウィザー) にする\nelse\n    erase all\nend\n\nwhen flag clicked\nwait until <([costume # v] of [壁 v]) = [10]>\nrepeat (10)\n    set [ウィザー v] to [25]\nend\n\n@爆発\n\nwhen I receive [ウィザー攻撃 v]\nadd [ウィザー攻撃] to [1 v]\ncreate clone of (_myself_ v)\n\nwhen flag clicked\nhide\n\nwhen I start as a clone\nstart sound [get4 v]\ngo to x: (ウィザー爆発x) y: (ウィザー爆発y)\nswitch costume to (explosion_0 v)\nshow\nrepeat (7)\n    wait () seconds\n    next costume\nend\nhide\ndelete this clone\n\n@スキン\n\nwhen flag clicked\nset size to (200) %\nhide\ncreate clone of (_myself_ v)\nwait (1) seconds\nswitch costume to (スキン)\nforever\n    go to x: (0) y: (0)\n    if <[スキン] = (どこの画面？)> then\n        set [スキン v] to (costume [name v])\n        show\n        if <<touching (mouse-pointer v)?> and <mouse down?>> then\n            broadcast (音を鳴らして v)\n            if <(costume [number v]) = [3]> then\n                switch costume to (スティーブ v)\n            else\n                next costume\n            end\n            wait (1) seconds\n        end\n    else\n        hide\n    end\nend\n\nwhen I start as a clone\nswitch costume to (変更 v)\nset size to (100) %\nforever\n    go to x: (0) y: (100)\n    if <[スキン] = (どこの画面？)> then\n        show\n    else\n        hide\n    end\nend\n\n@爆発！\n\nwhen flag clicked\nhide\n\nwhen I start as a clone\nshow\nif <[0] = (ウィザー攻撃方)> then\n    switch costume to (1 v)\n    go to x: (ウィザードこx) y: (ウィザードこ2)\n    glide (1) secs to x: (([x position v] of [プレイヤー v]) + (pick random (-10) to (10))) y: (([y position v] of [プレイヤー v]) - (pick random (-30) to (-40)))\n    set [ウィザー爆発x v] to (x position)\n    set [ウィザー爆発y v] to (y position)\nelse\n    switch costume to (2 v)\n    go to x: (ウィザードこx) y: (ウィザードこ2)\n    glide (1) secs to (random position v)\n    set [ウィザー爆発x v] to (x position)\n    set [ウィザー爆発y v] to (y position)\nend\nif <[0] = (ウィザー攻撃方)> then\n    broadcast (ウィザー攻撃 v)\nelse\n    broadcast (ウィザー青頭 v)\nend\ndelete this clone\n\nwhen I start as a clone\nforever\n    if <touching (壁 v)?> then\n        set [ウィザー爆発x v] to (x position)\n        set [ウィザー爆発y v] to (y position)\n        broadcast (ウィザー攻撃 v)\n        delete this clone\n    end\n    if <(clone削除して) = [1]> then\n        delete this clone\n    end\nend\n\n@cloud\n\ndefine ランキング追加 (スコア)\nhide list [ランキング v]\nset [値1 v] to [abcdefghijklmnopqrstuvwxyz-_1234567890:]\nset [値2 v] to [1234567890:]\ndelete all of [数値 v]\ndelete all of [ユーザー v]\ndelete all of [ランキング v]\nif <not <(length of (☁ 記録)) = [0]>> then\n    set [順番1 v] to [0]\n    repeat until <(length of (☁ 記録)) = (順番1)>\n        set [保存2 v] to []\n        set [保存1 v] to []\n        repeat until <(letter (保存1) of (値2)) = [:]>\n            set [保存1 v] to []\n            repeat (2)\n                change [順番1 v] by (1)\n                set [保存1 v] to (join (保存1) (letter (順番1) of (☁ 記録)))\n            end\n            set [保存2 v] to (join (保存2) (letter (保存1) of (値2)))\n        end\n        add (保存2) to [数値 v]\n    end\n    set [順番1 v] to [0]\n    repeat until <(length of (☁ ユーザー)) = (順番1)>\n        set [保存2 v] to []\n        set [保存1 v] to []\n        repeat until <(letter (保存1) of (値1)) = [:]>\n            set [保存1 v] to []\n            repeat (2)\n                change [順番1 v] by (1)\n                set [保存1 v] to (join (保存1) (letter (順番1) of (☁ ユーザー)))\n            end\n            set [保存2 v] to (join (保存2) (letter (保存1) of (値1)))\n        end\n        add (保存2) to [ユーザー v]\n    end\nend\nset [順番1 v] to [0]\nrepeat (length of [ユーザー v])\n    change [順番1 v] by (1)\n    set [数値 v] to []\n    set [順番2 v] to [0]\n    repeat ((length of (item (順番1) of [数値 v])) - (1))\n        change [順番2 v] by (1)\n        set [数値 v] to (join (数値) (letter (順番2) of (item (順番1) of [数値 v])))\n    end\n    add (join (item (順番1) of [ユーザー v]) (数値)) to [ランキング v]\nend\nset [順番1 v] to [0]\nadd (join (username) [:]) to [ユーザー v]\nadd (join (round (スコア)) [:]) to [数値 v]\nrepeat ((length of [数値 v]) - (1))\n    change [順番1 v] by (1)\n    if <(item (順番1) of [数値 v]) < (item (length of [数値 v]) of [数値 v])> then\n        set [保存1 v] to (item (length of [数値 v]) of [数値 v])\n        set [保存2 v] to (item (length of [ユーザー v]) of [ユーザー v])\n        replace item (length of [数値 v]) of [数値 v] with (item (順番1) of [数値 v])\n        replace item (順番1) of [数値 v] with (保存1)\n        replace item (length of [ユーザー v]) of [ユーザー v] with (item (順番1) of [ユーザー v])\n        replace item (順番1) of [ユーザー v] with (保存2)\n    end\nend\ndelete all of [ランキング v]\nset [順番1 v] to [0]\nrepeat (length of [ユーザー v])\n    change [順番1 v] by (1)\n    add (join (item (順番1) of [ユーザー v]) (item (順番1) of [数値 v])) to [ランキング v]\nend\nif <[10] < (length of [ランキング v])> then\n    delete (length of [数値 v]) of [数値 v]\n    delete (length of [ユーザー v]) of [ユーザー v]\n    delete (length of [ランキング v]) of [ランキング v]\nend\nset [順番1 v] to [0]\nset [保存1 v] to []\nrepeat until <(順番1) = (length of [数値 v])>\n    change [順番1 v] by (1)\n    set [順番2 v] to [0]\n    repeat (length of (item (順番1) of [数値 v]))\n        change [順番2 v] by (1)\n        set [順番3 v] to [0]\n        repeat until <(letter (順番3) of (値2)) = (letter (順番2) of (item (順番1) of [数値 v]))>\n            change [順番3 v] by (1)\n        end\n        if <(length of (順番3)) = [1]> then\n            set [保存1 v] to (join (保存1) (join [0] (順番3)))\n        else\n            set [保存1 v] to (join (保存1) (順番3))\n        end\n    end\nend\nset [順番1 v] to [0]\nset [保存2 v] to []\nrepeat (length of [ランキング v])\n    change [順番1 v] by (1)\n    set [順番2 v] to [0]\n    repeat (length of (item (順番1) of [ユーザー v]))\n        change [順番2 v] by (1)\n        set [順番3 v] to [0]\n        repeat until <(letter (順番2) of (item (順番1) of [ユーザー v])) = (letter (順番3) of (値1))>\n            change [順番3 v] by (1)\n        end\n        if <(length of (順番3)) = [1]> then\n            set [保存2 v] to (join (保存2) (join [0] (順番3)))\n        else\n            set [保存2 v] to (join (保存2) (順番3))\n        end\n    end\nend\nset [☁ 記録 v] to (保存1)\nset [☁ ユーザー v] to (保存2)\n\nwhen [0 v] key pressed\nif <(username) = [bakky_game]> then\n    set [☁ ユーザー v] to []\n    set [☁ 記録 v] to []\nend\n\nwhen I receive [クリア v]\nset [保存中？ v] to [1]\nif <(世界記録保存の許可) = [0]> then\n    ランキング追加 [11]\nend\nset [保存中？ v] to [0]\n\n@スプライト2\n\nwhen flag clicked\nhide\nforever\n    change [ghost v] effect by ([sin v] of (▶︎) )\nend\n\nwhen I receive [クリア v]\ngo to x: (0) y: (0)\nswitch costume to ( v)\nshow\nwait (1) seconds\nrepeat until <(保存中？) = [0]>\nswitch costume to (2 v)\nwait (1) seconds\nhide\n\n@爆発2\n\nwhen I receive [ウィザー青頭 v]\nadd [ウィザー攻撃] to [1 v]\ncreate clone of (_myself_ v)\n\nwhen flag clicked\nhide\n\nwhen I start as a clone\nstart sound [get4 v]\ngo to x: (ウィザー爆発x) y: (ウィザー爆発y)\nswitch costume to (explosion_0 v)\nshow\nrepeat (7)\n    wait () seconds\n    next costume\nend\nhide\ndelete this clone\n\n@kazari\n\nwhen flag clicked\nswitch costume to (1 v)\nhide\n\nwhen I receive [スタート v]\nset [stage v] to [1]\nshow\nforever\n    go to x: (0) y: (0)\n    switch costume to (Stage)\nend\n\n@ウォーデン\n\nwhen I start as a clone\nadd [ウォーデン/クローン] to [1 v]\nclear graphic effects\nset size to (100) %\nwait (0.2) seconds\npoint in direction (90)\nset [ウォーデンx v] to [0]\nset [ウォーデンy v] to [0]\nclear graphic effects\nshow\nforever\n    set size to (100) %\n    switch backdrop to (5 v)\n    if <[20] = (Stage)> then\n        set [brightness v] effect to (-50)\n    else\n        clear graphic effects\n    end\n    show\n    set size to (80) %\n    if <(位置リセット) = [1]> then\n        go to x: (240) y: (100)\n    end\n    if <(clone削除して) = [1]> then\n        forever\n            delete this clone\n        end\n    end\n    if <([x position v] of [プレイヤー v]) < (x position)> then\n        point in direction (-90)\n        if <touching (水 v)?> then\n            change [ウォーデンx v] by (-0.14)\n        else\n            change [ウォーデンx v] by (-0.2)\n        end\n    end\n    if <(x position) < ([x position v] of [プレイヤー v])> then\n        point in direction (90)\n        if <touching (水 v)?> then\n            change [ウォーデンx v] by (0.14)\n        else\n            change [ウォーデンx v] by (0.2)\n        end\n    end\n    set [ウォーデンx v] to ((ウォーデンx) * (0.9))\n    change x by (ウォーデンx)\n    if <<touching (壁 v)?> or <<touching (壁 v)?> or <touching (壁 v)?>>> then\n        change y by (1)\n        if <<touching (壁 v)?> or <<touching (壁 v)?> or <touching (壁 v)?>>> then\n            change y by (1)\n            if <<touching (壁 v)?> or <<touching (壁 v)?> or <touching (壁 v)?>>> then\n                change y by (1)\n                if <<touching (壁 v)?> or <<touching (壁 v)?> or <touching (壁 v)?>>> then\n                    change y by (1)\n                    if <<touching (壁 v)?> or <<touching (壁 v)?> or <touching (壁 v)?>>> then\n                        change y by (1)\n                        if <<touching (壁 v)?> or <<touching (壁 v)?> or <touching (壁 v)?>>> then\n                            change y by (1)\n                            if <<touching (壁 v)?> or <<touching (壁 v)?> or <touching (壁 v)?>>> then\n                                change x by ((0) - (ウォーデンx))\n                                change y by (-5)\n                                if <not <(y position) < ([y position v] of [プレイヤー v])>> then\n                                    set [ウォーデンx v] to [0]\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\n    change [ウォーデンy v] by (-0.9)\n    if <<touching (水 v)?> and <(ウォーデンy) < [-2]>> then\n        set [ウォーデンy v] to [-2]\n    end\n    change y by (ウォーデンy)\n    if <<touching (壁 v)?> or <<touching (壁 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    if <<touching (水 v)?> and <<key (up arrow v) pressed?> or <key (w v) pressed?>>> then\n        set [ウォーデンy v] to [4]\n    else\n        if <<touching (壁 v)?> or <<touching (壁 v)?> or <touching (壁 v)?>>> then\n            if <(y position) < ([y position v] of [プレイヤー v])> then\n                if <[1] = (pick random (1) to (15))> then\n                    set [ウォーデンy v] to [12]\n                end\n            end\n        end\n    end\n    change y by (1)\nend\n\nwhen I start as a clone\nforever\n    set [モブの位置x v] to (x position)\n    set [モブの位置y v] to (y position)\nend\n\nwhen I receive [やられた v]\ndelete this clone\n\nwhen I start as a clone\nset [hpda v] to [100]\nswitch costume to (player v)\nforever\n    if <touching (マグマ v)?> then\n        ダメージ [-4]\n        wait (0.25) seconds\n        switch costume to (player v)\n    end\n    if <touching (サボテン v)?> then\n        ダメージ [-4]\n        wait (0.25) seconds\n        switch costume to (player v)\n    end\n    if <<touching (剣 v)?> and <(攻撃) = [1]>> then\n        if <([x position v] of [プレイヤー v]) < (x position)> then\n            ノックバック [10] [10]\n        else\n            ノックバック [-10] [10]\n        end\n        if <(結果) = [クリティカル攻撃可能]> then\n            ダメージ ([floor v] of (([costume name v] of [剣 v]) * (1.5)) )\n            set [攻撃位置x v] to (x position)\n            set [攻撃位置y v] to (y position)\n            broadcast (クリティカル v)\n        else\n            ダメージ ([costume name v] of [剣 v])\n        end\n        wait until <(攻撃) = [0]>\n        wait (0.3) seconds\n        switch costume to (player v)\n    end\n    if <touching (爆発 v)?> then\n        ダメージ [-15]\n        if <(item (4) of [適用 v]) < (x position)> then\n            ノックバック [15] [12]\n        else\n            ノックバック [-15] [12]\n        end\n        wait (0.3) seconds\n        switch costume to (player v)\n    end\n    if <touching (ソニックブーム補完用4 v)?> then\n        ダメージ [-16]\n        if <([x position v] of [プレイヤー v]) < (x position)> then\n            ノックバック [10] [10]\n        else\n            ノックバック [-10] [10]\n        end\n        wait (0.3) seconds\n        switch costume to (player v)\n        wait (1) seconds\n    end\n    if <touching (爆発2 v)?> then\n        ダメージ [-16]\n        if <([x position v] of [プレイヤー v]) < (x position)> then\n            ノックバック [14] [12]\n        else\n            ノックバック [-14] [12]\n        end\n        wait (0.3) seconds\n        switch costume to (player v)\n    end\n    if <(y position) < [-160]> then\n        ダメージ [-100]\n        wait (0.3) seconds\n    end\nend\n\ndefine ダメージ (ダメージ量)\nchange [hpda v] by (ダメージ量)\nif <(pick random (1) to (2)) = [1]> then\n    if <[1] = (...効果音　オンオフ)> then\n        start sound [攻撃 v]\n    end\n    switch costume to (player2 v)\nelse\n    if <[1] = (...効果音　オンオフ)> then\n        start sound [攻撃2 v]\n    end\n    switch costume to (player2 v)\nend\nif <(HPda) < [0.01]> then\n    switch costume to (player2 v)\n    if <[1] = (...効果音　オンオフ)> then\n        start sound [倒した v]\n    end\n    set [ウィ v] to (x position)\n    set [ウィ２ v] to (y position)\n    repeat (4)\n        change [ghost v] effect by (25)\n    end\n    broadcast (ウォーデン v)\n    switch backdrop to (2 v)\n    delete this clone\nend\n\nwhen I receive [スタート v]\ngo to x: (250) y: (0)\ngo to [front v] layer\nhide\nwait (0.1) seconds\nwait until <(Stage) = [20]>\nゾンビ召喚魔法 [300] [100] [2] [0] 秒待つ [1] 回繰り返す\n\ndefine ノックバック (x) (y)\nset [ウォーデンx v] to (x)\nset [ウォーデンy v] to (y)\n\ndefine ゾンビ召喚魔法 (ステージ) (x) (y) (n) 秒待つ (a) 回繰り返す\nrepeat (a)\n    wait (n) seconds\n    go to x: (240) y: (100)\n    create clone of (_myself_ v)\nend\n\nwhen I receive [next v]\ndelete this clone\n\nwhen I start as a clone\nforever\n    wait (0.1) seconds\n    next costume\nend\n\n@壁2\n\nwhen flag clicked\nswitch costume to (1 v)\nhide\n\nwhen I receive [スタート v]\nset [stage v] to [1]\nshow\nforever\n    go to x: (0) y: (-30)\n    switch costume to (1 v)\n    if <<(Stage) = [9]> or <(Stage) = [14]>> then\n        show\n    else\n        hide\n    end\nend\n\n@ゾンビ2\n\nwhen I start as a clone\nadd [ガスと/クローン] to [1 v]\nclear graphic effects\nset size to (100) %\nwait (0.2) seconds\npoint in direction (90)\nset [ゾンビx v] to [0]\nset [ゾンビy v] to [0]\nclear graphic effects\nshow\nforever\n    show\n    if <(位置リセット) = [1]> then\n        go to x: (200) y: (0)\n    end\n    if <(clone削除して) = [1]> then\n        forever\n            delete this clone\n        end\n    end\n    if <([x position v] of [プレイヤー v]) < (x position)> then\n        point in direction (-90)\n        if <touching (水 v)?> then\n            change [ゾンビx v] by (-0.14)\n        else\n            change [ゾンビx v] by (-0.2)\n        end\n    end\n    if <(x position) < ([x position v] of [プレイヤー v])> then\n        point in direction (90)\n        if <touching (水 v)?> then\n            change [ゾンビx v] by (0.14)\n        else\n            change [ゾンビx v] by (0.2)\n        end\n    end\n    set [ゾンビx v] to ((ゾンビx) * (0.9))\n    change x by (ゾンビx)\n    if <<touching (壁 v)?> or <<touching (壁 v)?> or <touching (壁 v)?>>> then\n        change y by (1)\n        if <<touching (壁 v)?> or <<touching (壁 v)?> or <touching (壁 v)?>>> then\n            change y by (1)\n            if <<touching (壁 v)?> or <<touching (壁 v)?> or <touching (壁 v)?>>> then\n                change y by (1)\n                if <<touching (壁 v)?> or <<touching (壁 v)?> or <touching (壁 v)?>>> then\n                    change y by (1)\n                    if <<touching (壁 v)?> or <<touching (壁 v)?> or <touching (壁 v)?>>> then\n                        change y by (1)\n                        if <<touching (壁 v)?> or <<touching (壁 v)?> or <touching (壁 v)?>>> then\n                            change y by (1)\n                            if <<touching (壁 v)?> or <<touching (壁 v)?> or <touching (壁 v)?>>> then\n                                change x by ((0) - (ゾンビx))\n                                change y by (-5)\n                                if <not <(y position) < ([y position v] of [プレイヤー v])>> then\n                                    set [ゾンビx v] to [0]\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\n    change [ゾンビy v] by (-0.9)\n    if <<touching (水 v)?> and <(ゾンビy) < [-2]>> then\n        set [ゾンビy v] to [-2]\n    end\n    change y by (ゾンビy)\n    if <<touching (壁 v)?> or <<touching (壁 v)?> or <touching (壁 v)?>>> then\n        change y by ((0) - (ゾンビy))\n        set [ゾンビy v] to [0]\n    end\n    if <<touching (水 v)?> and <<key (up arrow v) pressed?> or <key (w v) pressed?>>> then\n        set [ゾンビy v] to [4]\n    else\n        if <<touching (壁 v)?> or <<touching (壁 v)?> or <touching (壁 v)?>>> then\n            if <(y position) < ([y position v] of [プレイヤー v])> then\n                if <[1] = (pick random (1) to (15))> then\n                    set [ゾンビy v] to [12]\n                end\n            end\n        end\n    end\n    set y to (100)\nend\n\nwhen I start as a clone\nforever\n    set [モブの位置x v] to (x position)\n    set [モブの位置y v] to (y position)\nend\n\nwhen I receive [やられた v]\ndelete this clone\n\nwhen I start as a clone\nif <(item (2) of [#gamemode v]) = [12]> then\n    set [hp v] to [18]\nelse\n    set [hp v] to [22]\nend\nswitch costume to (player v)\nforever\n    set y to (100)\n    if <touching (マグマ v)?> then\n        ダメージ [-4]\n        wait (0.25) seconds\n        switch costume to (player v)\n    end\n    if <touching (サボテン v)?> then\n        ダメージ [-4]\n        wait (0.25) seconds\n        switch costume to (player v)\n    end\n    if <<touching (剣 v)?> and <(攻撃) = [1]>> then\n        if <([x position v] of [プレイヤー v]) < (x position)> then\n            ノックバック [10] [10]\n        else\n            ノックバック [-10] [10]\n        end\n        if <(結果) = [クリティカル攻撃可能]> then\n            ダメージ ([floor v] of (([costume name v] of [剣 v]) * (1.5)) )\n            set [攻撃位置x v] to (x position)\n            set [攻撃位置y v] to (y position)\n            broadcast (クリティカル v)\n        else\n            ダメージ ([costume name v] of [剣 v])\n        end\n        wait until <(攻撃) = [0]>\n        wait (0.3) seconds\n        switch costume to (player v)\n    end\n    if <touching (爆発 v)?> then\n        ダメージ [-5]\n        if <(item (4) of [適用 v]) < (x position)> then\n            ノックバック [15] [0]\n        else\n            ノックバック [-15] [0]\n        end\n        wait (0.3) seconds\n        switch costume to (player v)\n    end\n    if <touching (ソニックブーム補完用4 v)?> then\n        ダメージ [-16]\n        if <([x position v] of [プレイヤー v]) < (x position)> then\n            ノックバック [10] [0]\n        else\n            ノックバック [-10] [0]\n        end\n        wait (0.3) seconds\n        switch costume to (player v)\n        wait (1) seconds\n    end\n    if <touching (爆発2 v)?> then\n        ダメージ [-16]\n        if <([x position v] of [プレイヤー v]) < (x position)> then\n            ノックバック [14] [12]\n        else\n            ノックバック [-14] [12]\n        end\n        wait (0.3) seconds\n        switch costume to (player v)\n    end\n    if <(y position) < [-160]> then\n        ダメージ [-100]\n        wait (0.3) seconds\n    end\nend\n\ndefine ダメージ (ダメージ量)\nchange [hp v] by (ダメージ量)\nif <(pick random (1) to (2)) = [1]> then\n    if <[1] = (...効果音　オンオフ)> then\n        start sound [攻撃 v]\n    end\n    switch costume to (player2 v)\nelse\n    if <[1] = (...効果音　オンオフ)> then\n        start sound [攻撃2 v]\n    end\n    switch costume to (player2 v)\nend\nif <(HP) < [0.01]> then\n    switch costume to (player2 v)\n    if <[1] = (...効果音　オンオフ)> then\n        start sound [倒した v]\n    end\n    set [ウィ v] to (x position)\n    set [ウィ２ v] to (y position)\n    repeat (4)\n        change [ghost v] effect by (25)\n    end\n    broadcast (ゾンビ v)\n    delete this clone\nend\n\nwhen I receive [スタート v]\ngo to x: (250) y: (0)\ngo to [front v] layer\nhide\nwait (0.1) seconds\nwait until <(Stage) = [13]>\nゾンビ召喚魔法 [13] [0] [100] [1] 秒待つ [2] 回繰り返す\n\ndefine ノックバック (x) (y)\nset y to (100)\nset [ゾンビx v] to (x)\n\ndefine ゾンビ召喚魔法 (ステージ) (x) (y) (n) 秒待つ (a) 回繰り返す\nrepeat (a)\n    wait (n) seconds\n    go to x: (x) y: (y)\n    create clone of (_myself_ v)\nend\n\nwhen I receive [next v]\ndelete this clone\n\nwhen I start as a clone\nforever\n    wait (3) seconds\n    if <not <touching (_edge_ v)?>> then\n        switch costume to (２ v)\n        play sound [ガスト v] until done\n        set [gasuto_x v] to (x position)\n        set [gasuto_y v] to (y position)\n        create clone of (球 v)\n        wait (０) seconds\n        if <(x position) < [1]> then\n            change [ゾンビx v] by (30)\n        else\n            change [ゾンビx v] by (-30)\n        end\n        wait (1) seconds\n        switch costume to (player v)\n    end\nend\n\n@球\n\nwhen flag clicked\nhide\n\nwhen I start as a clone\nshow\ngo to x: (GASUTO_X) y: (GASUTO_Y)\npoint towards (プレイヤー v)\nrepeat until <<touching (_edge_ v)?> or <<(distance to [プレイヤー v]) < [40]> or <touching (壁 v)?>>>\n    move (5) steps\nend\nif <<<<touching (プレイヤー v)?> or <touching (剣 v)?>> or <(distance to [剣 v]) < [40]>> and <not <<([direction v] of [剣 v]) = [-100]> or <([direction v] of [剣 v]) = [100]>>>> then\n    turn right (180) degrees\n    repeat until <<touching (_edge_ v)?> or <touching color (#ffffff)?>>\n        move (5) steps\n    end\nend\ncreate clone of (爆発 v)\nset [ウィザー爆発x v] to (x position)\nset [ウィザー爆発y v] to (y position)\ndelete this clone\n\n@エフェクト\n\ndefine particles\ngo to x: (ウィ) y: (ウィ２)\nswitch costume to (costume1 v)\nrepeat (20)\n    set [vel v] to (pick random (10) to (20))\n    set [xspeed v] to (pick random (-8) to (8))\n    show\n    set size to (pick random (40) to (86)) %\n    create clone of (エフェクト　ゾンビ v)\nend\nhide\n\nwhen I receive [ゾンビ v]\nswitch costume to (1 v)\nadd [ゾンビのエフェクト] to [1 v]\nparticles\n\n@円パ\n\nwhen flag clicked\nhide\n\ndefine ブロック名 (s) (n) (x) (y)\nwait until <(s) = (Stage)>\nrepeat (n)\n    go to x: (x) y: (y)\n    create clone of (_myself_ v)\nend\n\nwhen I start as a clone\nset size to (100) %\nrepeat until <touching (プレイヤー v)?>\n    switch costume to ( v)\n    show\n    go to [front v] layer\n    change size by ([sin v] of ("三角関数) )\nend\nadd [エンダーパール] to [持ち物 v]\nrepeat (20)\n    change [ghost v] effect by (5)\n    change size by (2)\nend\nclear graphic effects\nset size to (60) %\ngo to x: (-160) y: (-156)\ngo to [front v] layer\nwait until <<<<key (enter v) pressed?> and <([costume # v] of [experience bar2 v]) = [1]>> or <<mouse down?> and <touching (mouse-pointer v)?>>> and <<not <(Stage) = [23]>> and <not <(Stage) = [11]>>>>\ndelete (item # of [エンダーパール] in [持ち物 v]) of [持ち物 v]\nwait until <not <[持ち物 v] contains [エンダーパール]?>>\ngo to (プレイヤー v)\nset [円パ　重力 v] to [9]\nstart sound [dye v]\nif <([direction v] of [プレイヤー v]) = [-90]> then\n    repeat until <touching (壁 v)?>\n        move (-6) steps\n        change y by (円パ　重力)\n        change [円パ　重力 v] by (-0.33)\n    end\nelse\n    repeat until <touching (壁 v)?>\n        move (6) steps\n        change y by (円パ　重力)\n        change [円パ　重力 v] by (-0.33)\n    end\nend\nset [warp_x v] to (x position)\nset [warp_y v] to (y position)\nbroadcast (わ v)\nrepeat (30)\n    switch costume to (2 v)\n    change [fisheye v] effect by (100)\nend\ndelete this clone\n\nwhen I receive [スタート v]\ndelete all of [持ち物 v]\nブロック名 [1] [1] [-200] [0]\nforever\n    change ["三角関数 v] by (5)\nend\n\n@Experience Bar2\n\nwhen flag clicked\nset [経験値 v] to [0]\ngo to x: (0) y: (-157)\nhide\n\nwhen I receive [スタート v]\nshow\nswitch costume to (1 v)\ngo to [back v] layer\ngo [forward v] (8) layers\nforever\n    if <<key (1 v) pressed?> or <<<[-136] > (mouse y)> and <<(mouse x) > [-180]> and <[-140] > (mouse x)>>> and <mouse down?>>> then\n        broadcast (止まって v)\n        switch costume to (1 v)\n    end\n    if <<key (2 v) pressed?> or <<<[-136] > (mouse y)> and <<(mouse x) > [-140]> and <[-100] > (mouse x)>>> and <mouse down?>>> then\n        broadcast (止まって v)\n        switch costume to (2 v)\n    end\n    if <<key (3 v) pressed?> or <<<[-136] > (mouse y)> and <<(mouse x) > [-100]> and <[-60] > (mouse x)>>> and <mouse down?>>> then\n        broadcast (止まって v)\n        switch costume to (3 v)\n    end\n    if <<key (4 v) pressed?> or <<<[-136] > (mouse y)> and <<(mouse x) > [-60]> and <[-20] > (mouse x)>>> and <mouse down?>>> then\n        broadcast (止まって v)\n        switch costume to (4 v)\n    end\n    if <<key (5 v) pressed?> or <<<[-136] > (mouse y)> and <<(mouse x) > [-20]> and <[20] > (mouse x)>>> and <mouse down?>>> then\n        broadcast (止まって v)\n        switch costume to (5 v)\n    end\n    if <<key (6 v) pressed?> or <<<[-136] > (mouse y)> and <<(mouse x) > [20]> and <[60] > (mouse x)>>> and <mouse down?>>> then\n        broadcast (止まって v)\n        switch costume to (6 v)\n    end\n    if <<key (7 v) pressed?> or <<<[-136] > (mouse y)> and <<(mouse x) > [60]> and <[100] > (mouse x)>>> and <mouse down?>>> then\n        broadcast (止まって v)\n        switch costume to (7 v)\n    end\n    if <<key (8 v) pressed?> or <<<[-136] > (mouse y)> and <<(mouse x) > [100]> and <[140] > (mouse x)>>> and <mouse down?>>> then\n        broadcast (止まって v)\n        switch costume to (8 v)\n    end\n    if <<key (9 v) pressed?> or <<<[-136] > (mouse y)> and <<(mouse x) > [140]> and <[180] > (mouse x)>>> and <mouse down?>>> then\n        broadcast (止まって v)\n        switch costume to (9 v)\n    end\nend\n\nwhen I receive [止まって v]\nif <(PC?) = [0]> then\n    set [動いてよろしい? v] to [0]\n    wait (0.3) seconds\n    wait until <not <mouse down?>>\n    set [動いてよろしい? v] to [1]\nend\n\n@攻撃\n\nwhen flag clicked\nhide\n\nwhen I receive [スタート v]\nset [pc? v] to [0]\nshow\nwait until <key (space v) pressed?>\nset [pc? v] to [1]\nhide\n\nwhen this sprite clicked\nbroadcast (止まって v)\nbroadcast (attack v)\nwait (0.3) seconds\n\n@ミニゲーム\n\ndefine 動き (始点:x) (始点:y) (到着点:x) (到着点:y) (速度) (始点:向き) (到着点:向き) (精度)\ngo to x: (始点:x) y: (始点:y)\npoint in direction (始点:向き)\nif <<(始点:x) < (到着点:x)> or <(始点:y) < (到着点:y)>> then\n    repeat until <<((到着点:x) - (round (x position))) < (精度)> and <((到着点:y) - (round (y position))) < (精度)>>\n        change y by (((到着点:y) - (y position)) / (速度))\n        change x by (((到着点:x) - (x position)) / (速度))\n        turn right (((到着点:向き) - (direction)) / (速度)) degrees\n    end\nelse\n    repeat until <<((x position) - (round (到着点:x))) < (精度)> and <((y position) - (round (到着点:y))) < (精度)>>\n        change y by (((到着点:y) - (y position)) / (速度))\n        change x by (((到着点:x) - (x position)) / (速度))\n        turn right (((到着点:向き) - (direction)) / (速度)) degrees\n    end\nend\n\nwhen I receive [ミニゲーム v]\nshow\nswitch costume to (ミニゲーム！ v)\n動き [-2000] [100] [0] [100] [5] [90] [90] [1]\nwait (1) seconds\n動き [0] [100] [422] [100] [5] [90] [90] [1]\nswitch costume to (ルール v)\n動き [-2000] [100] [0] [100] [5] [90] [90] [1]\nwait (1) seconds\n動き [0] [100] [455] [100] [5] [90] [90] [1]\nswitch costume to (スタート v)\n動き [-2000] [100] [0] [100] [5] [90] [90] [1]\nwait (1) seconds\n動き [0] [100] [366] [100] [5] [90] [90] [1]\nhide\nbroadcast (ミニゲーム　開始 v)\n\nwhen flag clicked\nhide\n\nwhen I receive [ミニゲーム　クリア v]\nshow\nswitch costume to (クリア！！ v)\n動き [-2000] [100] [0] [100] [5] [90] [90] [1]\nwait (1) seconds\n動き [0] [100] [366] [100] [5] [90] [90] [1]\nswitch costume to (前に進もう！ v)\n動き [-2000] [100] [0] [100] [5] [90] [90] [1]\nwait (1) seconds\n動き [0] [100] [396] [100] [5] [90] [90] [1]\nhide\nset [動いてよろしい? v] to [1]\nwait until <(Stage) = [20]>\nshow\nswitch costume to (ボス出現！ v)\n動き [-2000] [100] [0] [100] [5] [90] [90] [1]\nwait (1) seconds\n動き [0] [100] [389] [100] [5] [90] [90] [1]\nhide\nset [動いてよろしい? v] to [1]\n\n@敵　見逃げ\n\nwhen I receive [ミニゲーム　開始 v]\nset [倒した敵 v] to [0]\nrepeat until <[9] < (倒した敵)>\n    wait (3) seconds\n    create clone of (_myself_ v)\nend\nbroadcast (ミニゲーム　クリア v)\n\nwhen I start as a clone\nshow\ngo to x: (10000) y: (100)\nrepeat until <<touching (トライデント v)?> or <(x position) < [-100]>>\n    change x by (-1)\nend\nif <(x position) < [-100]> then\n    glide (1) secs to x: (-300) y: (100)\nelse\n    repeat (20)\n        change [ghost v] effect by (5)\n    end\n    change [倒した敵 v] by (1)\nend\ndelete this clone\n\nwhen flag clicked\nhide\n\nwhen I start as a clone\nforever\n    set [敵　乱数 v] to (pick random (1) to (2))\n    if <(pick random (1) to (2)) = [1]> then\n        repeat (10)\n            change y by (敵　乱数)\n            if <[9] < (倒した敵)> then\n                delete this clone\n            end\n        end\n    else\n        repeat (10)\n            change y by (join [-] (敵　乱数))\n            if <[9] < (倒した敵)> then\n                delete this clone\n            end\n        end\n    end\nend\n\n@トライデント\n\nwhen flag clicked\nhide\n\nwhen I receive [ミニゲーム　開始 v]\nset [倒した敵 v] to [0]\nrepeat until <[9] < (倒した敵)>\n    if <(倒した敵) < [10]> then\n        wait until <mouse down?>\n        if <(倒した敵) < [10]> then\n            create clone of (_myself_ v)\n            if <(倒した敵) < [10]> then\n                wait until <not <mouse down?>>\n            end\n        end\n    end\nend\n\nwhen I start as a clone\npoint in direction (90)\nstart sound [弓矢射撃音 v]\nset [トライデント　重力 v] to [12]\nset rotation style [all around v]\nswitch costume to (トライデント v)\ngo to (プレイヤー v)\nchange y by (10)\npoint towards (mouse-pointer v)\nshow\nrepeat until <<touching (敵　見逃げ v)?> or <touching (壁 v)?>>\n    move (10) steps\n    change y by (トライデント　重力)\n    change [トライデント　重力 v] by (-0.5)\n    turn right (3) degrees\nend\nrepeat (20)\n    change [ghost v] effect by (5)\nend\ndelete this clone\n\n@プレイヤー\n\nwhen I receive [スタート v]\nset [無敵 v] to [0]\nset [動いてよろしい? v] to [1]\ngo to [front v] layer\nshow\nset size to (100) %\nswitch costume to (usually v)\nset drag mode [not draggable v]\ngo to x: (-201) y: (60)\npoint in direction (90)\nset [xvel v] to [0]\nset [yvel v] to [0]\nset [now v] to [1]\nforever\n    if <touching (ウォーデン v)?> then\n        change [ライフ v] by (-10)\n        if <(direction) = [-90]> then\n            broadcast (damezi v)\n            set [xv v] to [12]\n            set [yv v] to [20]\n            無敵判定 [0.2] 秒\n        else\n            broadcast (damezi v)\n            set [xv v] to [-12]\n            set [yv v] to [20]\n            無敵判定 [0.2] 秒\n        end\n    end\n    if <touching (ゾンビ v)?> then\n        if <[90] = (direction)> then\n            broadcast (damezi v)\n            change [ライフ v] by (-1)\n            set [xv v] to [-10]\n            set [yv v] to [5]\n            無敵判定 [0.2] 秒\n        else\n            broadcast (damezi v)\n            change [ライフ v] by (-1)\n            set [xv v] to [10]\n            set [yv v] to [5]\n            無敵判定 [0.2] 秒\n        end\n    end\n    if <touching (マグマ v)?> then\n        set [yv v] to [-2]\n    end\n    if <touching (クモ v)?> then\n        if <[90] = (direction)> then\n            broadcast (damezi v)\n            change [ライフ v] by (-1)\n            set [xv v] to [-10]\n            set [yv v] to [5]\n            無敵判定 [0.2] 秒\n        else\n            broadcast (damezi v)\n            change [ライフ v] by (-1)\n            set [xv v] to [10]\n            set [yv v] to [5]\n            無敵判定 [0.2] 秒\n        end\n    end\n    if <touching (爆発 v)?> then\n        if <(無敵) = [0]> then\n            change [ライフ v] by (-2.5)\n            broadcast (damezi v)\n            無敵判定 [0.3] 秒\n        end\n    end\n    if <(timer) = [0]> then\n        if <(動いてよろしい?) = [1]> then\n            set size to (100) %\n            set rotation style [left-right v]\n            if <<<mouse down?> and <(x position) > (mouse x)>> or <key (left arrow v) pressed?>> then\n                if <touching (水 v)?> then\n                    change [xv v] by (-0.6)\n                    point in direction (-90)\n                else\n                    change [xv v] by (-1)\n                    point in direction (-90)\n                end\n            end\n            if <<<mouse down?> and <(x position) < (mouse x)>> or <key (right arrow v) pressed?>> then\n                if <touching (水 v)?> then\n                    change [xv v] by (0.6)\n                    point in direction (90)\n                else\n                    change [xv v] by (1)\n                    point in direction (90)\n                end\n            end\n            if <<<mouse down?> and <(mouse y) < (y position)>> or <key (down arrow v) pressed?>> then\n                set [xv v] to ((Xv) * (1.02))\n            end\n            set [xv v] to ((Xv) * (0.9))\n            change x by (Xv)\n        end\n    end\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 ((Xv) * (-1))\n                            change y by (-5)\n                        end\n                    end\n                end\n            end\n        end\n    end\n    if <<<<mouse down?> and <(y position) < (mouse y)>> or <key (up arrow v) pressed?>> and <<touching (マグマ v)?> or <touching (水 v)?>>> then\n        if <touching (マグマ v)?> then\n            set [yv v] to [3]\n        else\n            set [yv v] to [10]\n        end\n        if <[1] = (世界記録保存の許可)> then\n            change [☁ 世界のジャンプ数 v] by (1)\n        end\n    end\n    if <touching (水 v)?> then\n        change y by (-0.7)\n    else\n        change y by (-1)\n    end\n    if <<<mouse down?> and <(y position) < (mouse y)>> or <key (up arrow v) pressed?>> then\n        if <(動いてよろしい?) = [1]> then\n            if <touching (壁 v)?> then\n                set [yv v] to [15]\n            end\n        end\n    end\n    if <touching (水 v)?> then\n        change [yv v] by (-0.5)\n    else\n        change [yv v] by (-1)\n    end\n    change y by (1)\n    change y by (Yv)\n    if <touching (壁 v)?> then\n        change y by ((Yv) * (-1))\n        set [yv v] to [0]\n    end\n    hide variable [xv v]\n    if <touching (壁2 v)?> then\n        repeat (20)\n            change [ghost v] effect by (5)\n        end\n        broadcast (neza-a-z-az-a v)\n        wait (1) seconds\n        clear graphic effects\n        switch backdrop to (4 v)\n        broadcast (位置リセット v)\n        change [stage v] by (1)\n        go to x: (-201) y: (60)\n        set [動いてよろしい? v] to [1]\n        set [clone削除して v] to [1]\n        wait (0.2) seconds\n        set [clone削除して v] to [0]\n        broadcast (next level v)\n        change [now v] by (1)\n        set [yv v] to [0]\n        set [xv v] to [0]\n    end\n    if <(x position) > [230]> then\n        if <(Stage) = [20]> then\n            if <(HPda) < [1]> then\n                broadcast (位置リセット v)\n                change [stage v] by (1)\n                go to x: (-201) y: (60)\n                set [動いてよろしい? v] to [1]\n                set [clone削除して v] to [1]\n                wait (0.2) seconds\n                set [clone削除して v] to [0]\n                broadcast (next level v)\n                change [now v] by (1)\n                set [yv v] to [0]\n                set [xv v] to [0]\n            end\n        else\n            broadcast (位置リセット v)\n            change [stage v] by (1)\n            go to x: (-201) y: (60)\n            set [動いてよろしい? v] to [1]\n            set [clone削除して v] to [1]\n            wait (0.2) seconds\n            set [clone削除して v] to [0]\n            broadcast (next level v)\n            change [now v] by (1)\n            set [yv v] to [0]\n            set [xv v] to [0]\n        end\n    end\n    if <<(y position) < [-170]> or <(ライフ) < [0.5]>> then\n        broadcast (位置リセット v)\n        set [円ダメ v] to [0]\n        if <[1] = (世界記録保存の許可)> then\n            change [☁ みんなで倒せ！ v] by (1)\n        end\n        set [ライフ v] to [0]\n        broadcast (死 v)\n        repeat (10)\n            change [brightness v] effect by (-10)\n            change [ghost v] effect by (5)\n        end\n        clear graphic effects\n        go to x: (-201) y: (60)\n        set [ライフ v] to [20]\n    end\n    if <(無敵) = [0]> then\n        if <touching (マグマ v)?> then\n            if <(direction) = [-90]> then\n                broadcast (円ダメ v)\n                broadcast (damezi v)\n                change [ライフ v] by (-2)\n                set [xv v] to [3]\n                set [yv v] to [5]\n                無敵判定 [0.2] 秒\n            else\n                broadcast (円ダメ v)\n                broadcast (damezi v)\n                change [ライフ v] by (-2)\n                set [xv v] to [-3]\n                set [yv v] to [5]\n                無敵判定 [0.2] 秒\n            end\n        end\n        if <touching (スケルトン v)?> then\n            change [ライフ v] by (-0.5)\n            if <(direction) = [-90]> then\n                broadcast (damezi v)\n                set [xv v] to [3]\n                set [yv v] to [5]\n                無敵判定 [0.2] 秒\n            else\n                broadcast (damezi v)\n                set [xv v] to [-3]\n                set [yv v] to [5]\n                無敵判定 [0.2] 秒\n            end\n        end\n        if <touching (ちび助 v)?> then\n            change [ライフ v] by (-1)\n            if <(direction) = [-90]> then\n                broadcast (damezi v)\n                set [xv v] to [3]\n                set [yv v] to [5]\n                無敵判定 [0.2] 秒\n            else\n                broadcast (damezi v)\n                set [xv v] to [-3]\n                set [yv v] to [5]\n                無敵判定 [0.2] 秒\n            end\n        end\n        if <touching (ちび弓 v)?> then\n            change [ライフ v] by (-0.5)\n            if <(direction) = [-90]> then\n                broadcast (damezi v)\n                set [xv v] to [3]\n                set [yv v] to [5]\n                無敵判定 [0.2] 秒\n            else\n                broadcast (damezi v)\n                set [xv v] to [-3]\n                set [yv v] to [5]\n                無敵判定 [0.2] 秒\n            end\n            if <touching (弓 v)?> then\n                change [ライフ v] by (-1)\n                if <(direction) = [-90]> then\n                    broadcast (damezi v)\n                    set [xv v] to [3]\n                    set [yv v] to [5]\n                    無敵判定 [0.2] 秒\n                else\n                    broadcast (damezi v)\n                    set [xv v] to [-3]\n                    set [yv v] to [5]\n                    無敵判定 [0.2] 秒\n                end\n            end\n        end\n    end\n    if <touching (ちび弓 v)?> then\n        change [ライフ v] by (-1)\n        if <(direction) = [-90]> then\n            broadcast (damezi v)\n            set [xv v] to [3]\n            set [yv v] to [5]\n            無敵判定 [0.2] 秒\n        else\n            broadcast (damezi v)\n            set [xv v] to [-3]\n            set [yv v] to [5]\n            無敵判定 [0.2] 秒\n        end\n    end\n    if <touching (ウォーデン2 v)?> then\n        change [ライフ v] by (-1)\n        if <(direction) = [-90]> then\n            broadcast (damezi v)\n            set [xv v] to [12]\n            set [yv v] to [12]\n            無敵判定 [0.2] 秒\n        else\n            broadcast (damezi v)\n            set [xv v] to [-12]\n            set [yv v] to [12]\n            無敵判定 [0.2] 秒\n        end\n    end\nend\n\nif <(動いてよろしい?) = [1]> then\n\nif <touching (壁 v)?> then\n\nif <<<mouse down?> and <(y position) < (mouse y)>> or <key (up arrow v) pressed?>> then\n\nwhen flag clicked\nset [clone削除して v] to [0]\nhide\nswitch costume to (スティーブ1 v)\nif <[1] = (pick random (1) to (4))> then\n    set [スキン v] to [スティーブ]\nelse\n    if <[1] = (pick random (1) to (2))> then\n        set [スキン v] to [マイケル]\n    else\n        set [スキン v] to [アレックス]\n    end\nend\nadd [プレイヤーが正常に動作] to [1 v]\nforever\n    if <[スティーブ] = (スキン)> then\n        switch costume to (スティーブ1 v)\n        wait (0.5) seconds\n        switch costume to (スティーブ2 v)\n        wait (0.5) seconds\n    else\n        if <[アレックス] = (スキン)> then\n            switch costume to (alex v)\n            wait (0.5) seconds\n            switch costume to (alex2 v)\n            wait (0.5) seconds\n        else\n            switch costume to (1 v)\n            wait (0.5) seconds\n            switch costume to (2 v)\n            wait (0.5) seconds\n        end\n    end\nend\n\nwhen I receive [damezi v]\nswitch costume to (damezi v)\n\nwhen [timer v] > (0.01)\nhide\n\nwhen I receive [位置リセット v]\nset [位置リセット v] to [1]\nwait (1) seconds\nset [位置リセット v] to [0]\n\nwhen I receive [damezi v]\nif <[1] = (...効果音　オンオフ)> then\n    play sound [ダメージ v] until done\nend\n\nwhen I receive [円ダメ v]\nset [円ダメ v] to [5]\nrepeat until <(円ダメ) < [1]>\n    wait (1) seconds\n    broadcast (damezi v)\n    change [円ダメ v] by (-1)\n    change [ライフ v] by (-4)\nend\nset [円ダメ v] to [0]\n\ndefine 無敵判定 (何) 秒\nset [無敵団 v] to (何)\nbroadcast (無敵 v)\n\nwhen I receive [わ v]\nhide\ngo to x: (Warp_x) y: ((Warp_y) + (50))\nrepeat until <not <touching (壁 v)?>>\n    change y by (10)\nend\nshow\n\nwhen I receive [位置リセット v]\nif <(Stage) = [12]> then\n    repeat (10)\n        go to x: (-198) y: (-115)\n        set [動いてよろしい? v] to [0]\n    end\n    start sound [和太鼓でドドン v]\n    broadcast (ミニゲーム v)\nend\n\nwhen I receive [スタート v]\nforever\n\n@HP\n\nwhen flag clicked\nforever\n    if <(Stage) = [20]> then\n        ;\n    else\n        erase all\n    end\nend\n\ndefine ;\nerase all\npen up\ngo to x: (-100) y: (150)\nset pen size to (30)\nset pen color to (#929292)\npen down\nrepeat (1)\n    change x by (200)\nend\npen up\ngo to x: (-100) y: (150)\nif <[0] < (HPda)> then\n    set pen (color v) to ((HPda) / (3))\n    set pen (saturation v) to (100)\n    set pen (brightness v) to (1000)\n    set pen size to (20)\n    pen down\nend\nrepeat (HPda)\n    change x by (2)\nend\n\n@minnnadetaose\n\nwhen flag clicked\ngo to x: (0) y: (30)\nhide\nhide variable [☁ みんなで倒せ！ v]\n\nwhen I receive [スタート v]\nhide variable [☁ みんなで倒せ！ v]\nwait until <(Stage) = [23]>\nshow variable [☁ みんなで倒せ！ v]\nswitch costume to (コスチューム1 v)\nshow\nforever\n    change y by ([sin v] of ("三角関数) )\n    if <<not <<([direction v] of [剣 v]) = [-100]> or <([direction v] of [剣 v]) = [100]>>> and <touching (剣 v)?>> then\n        change [☁ みんなで倒せ！ v] by (-1)\n        start sound [Boing v]\n        broadcast (pe v)\n    end\nend\n\nwhen I receive [pe v]\nswitch costume to (コスチューム2 v)\nwait (0.1) seconds\nswitch costume to (コスチューム1 v)\n\nwhen I receive [スタート v]\nwait until <(Stage) = [23]>\nforever\n    if <(☁ みんなで倒せ！) < [1]> then\n        play sound [Sneeze2 v] until done\n        repeat (10)\n            turn right (36) degrees\n        end\n        point in direction (90)\n        next costume\n        switch costume to (コスチューム1 v)\n        set [☁ みんなで倒せ！ v] to [100000]\n    end\nend\n\n@ウォーデン2\n\nwhen I start as a clone\nadd [ウォーデン/クローン] to [1 v]\nclear graphic effects\nset size to (200) %\nwait (0.2) seconds\npoint in direction (90)\nset [ウォーデンx v] to [0]\nset [ウォーデンy v] to [0]\nclear graphic effects\nshow\nforever\n    set size to (100) %\n    switch backdrop to (5 v)\n    if <[20] = (Stage)> then\n        set [brightness v] effect to (-50)\n    else\n        clear graphic effects\n    end\n    show\n    set size to (80) %\n    if <(位置リセット) = [1]> then\n        go to x: (240) y: (100)\n    end\n    if <(clone削除して) = [1]> then\n        forever\n            delete this clone\n        end\n    end\n    if <([x position v] of [プレイヤー v]) < (x position)> then\n        point in direction (-90)\n        if <touching (水 v)?> then\n            change [ウォーデンx v] by (-0.14)\n        else\n            change [ウォーデンx v] by (-0.2)\n        end\n    end\n    if <(x position) < ([x position v] of [プレイヤー v])> then\n        point in direction (90)\n        if <touching (水 v)?> then\n            change [ウォーデンx v] by (0.14)\n        else\n            change [ウォーデンx v] by (0.2)\n        end\n    end\n    set [ウォーデンx v] to ((ウォーデンx) * (0.9))\n    change x by (ウォーデンx)\n    if <<touching (壁 v)?> or <<touching (壁 v)?> or <touching (壁 v)?>>> then\n        change y by (1)\n        if <<touching (壁 v)?> or <<touching (壁 v)?> or <touching (壁 v)?>>> then\n            change y by (1)\n            if <<touching (壁 v)?> or <<touching (壁 v)?> or <touching (壁 v)?>>> then\n                change y by (1)\n                if <<touching (壁 v)?> or <<touching (壁 v)?> or <touching (壁 v)?>>> then\n                    change y by (1)\n                    if <<touching (壁 v)?> or <<touching (壁 v)?> or <touching (壁 v)?>>> then\n                        change y by (1)\n                        if <<touching (壁 v)?> or <<touching (壁 v)?> or <touching (壁 v)?>>> then\n                            change y by (1)\n                            if <<touching (壁 v)?> or <<touching (壁 v)?> or <touching (壁 v)?>>> then\n                                change x by ((0) - (ウォーデンx))\n                                change y by (-5)\n                                if <not <(y position) < ([y position v] of [プレイヤー v])>> then\n                                    set [ウォーデンx v] to [0]\n                                end\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\n    change [ウォーデンy v] by (-0.9)\n    if <<touching (水 v)?> and <(ウォーデンy) < [-2]>> then\n        set [ウォーデンy v] to [-2]\n    end\n    change y by (ウォーデンy)\n    if <<touching (壁 v)?> or <<touching (壁 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    if <<touching (水 v)?> and <<key (up arrow v) pressed?> or <key (w v) pressed?>>> then\n        set [ウォーデンy v] to [4]\n    else\n        if <<touching (壁 v)?> or <<touching (壁 v)?> or <touching (壁 v)?>>> then\n            if <(y position) < ([y position v] of [プレイヤー v])> then\n                if <[1] = (pick random (1) to (15))> then\n                    set [ウォーデンy v] to [12]\n                end\n            end\n        end\n    end\n    change y by (1)\nend\n\nwhen I start as a clone\nforever\n    set [モブの位置x v] to (x position)\n    set [モブの位置y v] to (y position)\n    set size to (300) %\nend\n\nwhen I receive [やられた v]\ndelete this clone\n\nwhen I start as a clone\nset [hpda v] to [100]\nswitch costume to (player v)\nforever\n    if <touching (マグマ v)?> then\n        ダメージ [-4]\n        wait (0.25) seconds\n        switch costume to (2 v)\n    end\n    if <touching (サボテン v)?> then\n        ダメージ [-4]\n        wait (0.25) seconds\n        switch costume to (2 v)\n    end\n    if <<touching (剣 v)?> and <(攻撃) = [1]>> then\n        if <([x position v] of [プレイヤー v]) < (x position)> then\n            ノックバック [10] [10]\n        else\n            ノックバック [-10] [10]\n        end\n        if <(結果) = [クリティカル攻撃可能]> then\n            ダメージ ([floor v] of (([costume name v] of [剣 v]) * (1.5)) )\n            set [攻撃位置x v] to (x position)\n            set [攻撃位置y v] to (y position)\n            broadcast (クリティカル v)\n        else\n            ダメージ ([costume name v] of [剣 v])\n        end\n        wait until <(攻撃) = [0]>\n        wait (0.3) seconds\n        switch costume to (2 v)\n    end\n    if <touching (爆発 v)?> then\n        ダメージ [-15]\n        if <(item (4) of [適用 v]) < (x position)> then\n            ノックバック [15] [12]\n        else\n            ノックバック [-15] [12]\n        end\n        wait (0.3) seconds\n        switch costume to (2 v)\n    end\n    if <touching (ソニックブーム補完用4 v)?> then\n        ダメージ [-16]\n        if <([x position v] of [プレイヤー v]) < (x position)> then\n            ノックバック [10] [10]\n        else\n            ノックバック [-10] [10]\n        end\n        wait (0.3) seconds\n        switch costume to (2 v)\n        wait (1) seconds\n    end\n    if <touching (爆発2 v)?> then\n        ダメージ [-16]\n        if <([x position v] of [プレイヤー v]) < (x position)> then\n            ノックバック [14] [12]\n        else\n            ノックバック [-14] [12]\n        end\n        wait (0.3) seconds\n        switch costume to (2 v)\n    end\n    if <(y position) < [-160]> then\n        ダメージ [-100]\n        wait (0.3) seconds\n    end\nend\n\ndefine ダメージ (ダメージ量)\nchange [hpda v] by (ダメージ量)\nif <(pick random (1) to (2)) = [1]> then\n    if <[1] = (...効果音　オンオフ)> then\n        start sound [攻撃 v]\n    end\n    switch costume to (1 v)\nelse\n    if <[1] = (...効果音　オンオフ)> then\n        start sound [攻撃2 v]\n    end\n    switch costume to (1 v)\nend\nif <(HPda) < [0.01]> then\n    switch costume to (1 v)\n    if <[1] = (...効果音　オンオフ)> then\n        start sound [倒した v]\n    end\n    set [ウィ v] to (x position)\n    set [ウィ２ v] to (y position)\n    repeat (4)\n        change [ghost v] effect by (25)\n    end\n    broadcast (ウォーデン v)\n    switch backdrop to (2 v)\n    delete this clone\nend\n\nwhen I receive [スタート v]\ngo to x: (250) y: (0)\ngo to [front v] layer\nhide\nwait (0.1) seconds\nwait until <(Stage) = [8]>\nゾンビ召喚魔法 [300] [100] [2] [0] 秒待つ [1] 回繰り返す\nwait until <(Stage) = [9]>\nswitch backdrop to (2 v)\n\ndefine ノックバック (x) (y)\nset [ウォーデンx v] to (x)\nset [ウォーデンy v] to (y)\n\ndefine ゾンビ召喚魔法 (ステージ) (x) (y) (n) 秒待つ (a) 回繰り返す\nrepeat (a)\n    wait (n) seconds\n    go to x: (240) y: (100)\n    create clone of (_myself_ v)\nend\n\nwhen I receive [next v]\ndelete this clone\n\nwhen I start as a clone\nforever\n    wait (0.1) seconds\n    next costume\nend\n\n