- Journey - platformer

Instructions: -- ★ Journey platformer ★ --\n■ぜっく/Zeck村■\nhttps://scratch.mit.edu/studios/33649172\n\n[English]\n✎For starters\nl This is a great work from a long time ago. (It's not like that now.)\nl It's a big old work, so there are many bugs. (The flame thing and other things move. \n  The ground doesn't disappear.)\n\n✎About the game\nl You can set with or without sound in the home setting (maybe (((())))))\nl hink I know how to operate it.\n\n[日本語]\n✎はじめに\nl 大昔の大作です。(今はそんなことないです)\nl 昔の大作なのでバグが多いのです。(炎のやつとか動く \n  地面が消えないです)\n\n✎ゲームについて\nl ホームの設定で音あり,なしに設定できます(多分(()))\nl 操作方法はわかると思います。\nl Enjoy yourse!!\n\n✎クレジット\nl 音楽:@-Xaf-様\nl 音:効果音ラボ\nl 数字表示@zohsama様\nl あとはわかんないです(((\n\n✎タグ\n#game #games #Journey #platformer #Zeck028\n\nlov&fav\n@Crimson-Code lov?!?!?!:oo\n@mzpr lov&fav?!?!\n@game-Creator10 lov?!?!\n@Donguri_sg lov&fav?!!\n@tanabe14 lov!!\n@-hamumu- lov&fav!\n@Halljuck lov&fav!

@Stage\n\nwhen flag clicked\nswitch backdrop to (背景3 v)\nwait until <(STAGE) = [8]>\nswitch backdrop to (背景2 v)\nwait until <(STAGE) = [15]>\nswitch backdrop to (背景4 v)\n\nwhen I receive [音1 v]\n\nwhen flag clicked\nrepeat until <(STAGE) = [7]>\n    if <(音ボタン) = [0]> then\n        play sound [風が吹く1 v] until done\n    end\nend\n\nrepeat until <(STAGE) = [14]>\n\nwhen flag clicked\nforever\n    if <(音ボタン) = [0]> then\n        set volume to (100) %\n    else\n        set volume to (0) %\n    end\nend\n\nwhen flag clicked\nforever\n    play sound [Starship v] until done\nend\n\n@目玉くん\n\ndefine y (y)\nrepeat until <not <<touching (ステージ v)?> or <<touching (1 v)?> or <<touching (2 v)?> or <<touching (とげ v)?> or >>>>>\n    change y by (y)\nend\n\ndefine 初期位置\nif <not <(STAGE) = [3]>> then\n    set [動作 v] to [◯]\n    point in direction (90)\n    set [x v] to [0]\n    set [y v] to [0]\n    go to x: (-200) y: (0)\n    show\nend\nif <(STAGE) = [3]> then\n    set [動作 v] to [◯]\n    point in direction (90)\n    set [x v] to [0]\n    set [y v] to [0]\n    go to x: (-200) y: (50)\n    show\nend\n\nwhen I receive [プラフォ v]\nswitch costume to (通常 v)\nset size to (150) %\nset [動作 v] to [◯]\nif <not <(STAGE) = [21]>> then\n    初期位置\nend\nforever\n    if <(動作) = [◯]> then\n        set rotation style [don't rotate v]\n        if <not <touching (水 v)?>> then\n            change [x v] by (<<key (right arrow v) pressed?> or <<key (d v) pressed?> or <<mouse down?> and <(x position) < (mouse x)>>>> - <<key (left arrow v) pressed?> or <<key (a v) pressed?> or <<mouse down?> and <(mouse x) < (x position)>>>>)\n            if <touching (水 v)?> then\n                switch costume to (水中 v)\n            end\n        end\n        set [x v] to ((x) * (0.85))\n        change x by (x)\n        if <touching (動く地面 v)?> then\n            change y by (2)\n        end\n        if <<touching (ステージ v)?> or <<touching (1 v)?> or <<touching (2 v)?> or <<touching (とげ v)?> or >>>> then\n            x (((x) / ([abs v] of (x) )) * (-1))\n        end\n        if <not > then\n            change [y v] by (-1)\n            change y by (y)\n            if <(y) < [-19]> then\n                set [y v] to [-20]\n            end\n        end\n        if <<touching (ステージ v)?> or <<touching (1 v)?> or <<touching (2 v)?> or <<touching (とげ v)?> or >>>> then\n            y (((y) / ([abs v] of (y) )) * (-1))\n            if <(y) < [0]> then\n                set [y v] to [0]\n                if <not <touching (水 v)?>> then\n                    if <<key (up arrow v) pressed?> or <<key (w v) pressed?> or <<mouse down?> and <(y position) < (mouse y)>>>> then\n                        if <(y) = [0]> then\n                            if <(音ボタン) = [0]> then\n                                start sound [JUMP v]\n                            end\n                            set [y v] to [13]\n                        end\n                    end\n                end\n            else\n                set [y v] to [-1]\n            end\n        end\n        if <touching (旗 v)?> then\n            if <(音ボタン) = [0]> then\n                start sound [next v]\n            end\n            初期位置\n            broadcast (next v)\n            初期位置\n            wait (0.1) seconds\n            初期位置\n            wait (0) seconds\n            初期位置\n        end\n        if <touching (バネ v)?> then\n            if <(音ボタン) = [0]> then\n                start sound [JUMP v]\n            end\n            set [y v] to [14]\n            if <<key (up arrow v) pressed?> or <<key (w v) pressed?> or <<mouse down?> and <(x position) < (mouse x)>>>> then\n                if <(音ボタン) = [0]> then\n                    start sound [JUMP v]\n                end\n                set [y v] to [20]\n            end\n        end\n        point in direction ((90) + ((x) * (1)))\n        set rotation style [all around v]\n        if <<touching (針くん v)?> or <<touching (溶岩 v)?> or <<touching (溶岩から出るやつ v)?> or <<touching (回るやつ v)?> or <<touching (針 v)?> or >>>>> then\n            set [動作 v] to [×]\n            broadcast (死 v)\n            stop [this script v]\n        end\n        if <(y position) < [-170]> then\n            if <(音ボタン) = [0]> then\n                start sound [死 v]\n            end\n            set [動作 v] to [×]\n            broadcast (死2 v)\n            stop [this script v]\n        end\n    end\nend\n\nwhen I receive [死 v]\nif <(90:) = [90]> then\n    repeat (10)\n        turn left ((死*y) / (3)) degrees\n    end\nend\n\nwhen I receive [死 v]\nif <(90:) = [-90]> then\n    repeat (10)\n        turn right ((死*y) / (3)) degrees\n    end\nend\n\nwhen I receive [死 v]\nif <(音ボタン) = [0]> then\n    start sound [死 v]\nend\nset [動作 v] to [×]\nset [90: v] to [90]\nif <(90:) = [90]> then\n    if <touching (水 v)?> then\n        switch costume to (水中死 v)\n    else\n        if <not <touching (水 v)?>> then\n            switch costume to (死 v)\n        end\n    end\n    set rotation style [left-right v]\n    point in direction (90)\n    set rotation style [all around v]\n    set [死:x v] to [0]\n    set [死*y v] to [0]\n    set [死*y v] to [12]\n    clear graphic effects\n    set rotation style [don't rotate v]\n    set rotation style [left-right v]\n    point in direction (90)\n    set rotation style [all around v]\n    repeat (20)\n        change [死*y v] by (-1)\n        change y by (死*y)\n        change [死:x v] by (-0.2)\n        change x by (死:x)\n        change [ghost v] effect by (5)\n    end\n    wait (0.5) seconds\n    初期位置\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\n    clear graphic effects\n    set [動作 v] to [◯]\n    broadcast (プログラム v)\nend\n\nwhen I receive [死2 v]\nswitch costume to (死 v)\nclear graphic effects\nset [ghost v] effect to (100)\n初期位置\nwait (0.5) seconds\nswitch costume to (通常 v)\nrepeat (10)\n    change [ghost v] effect by (-10)\nend\nshow\nset [動作 v] to [◯]\nbroadcast (プログラム v)\n\nwhen flag clicked\nforever\n    if <touching (水 v)?> then\n        wait (0.5) seconds\n        create clone of (泡 v)\n    end\nend\n\nwhen I receive [死 v]\nif <(90:) = [90]> then\n    if <touching (水 v)?> then\n        repeat (10)\n            wait (0.01) seconds\n            create clone of (泡 v)\n        end\n    end\nend\n\nwhen I receive [死 v]\nif <(90:) = [-90]> then\n    if <touching (水 v)?> then\n        repeat (10)\n            wait (0.01) seconds\n            create clone of (泡 v)\n        end\n    end\nend\n\nwhen flag clicked\nset [水検知 v] to [0]\nforever\n    wait until <touching (水 v)?>\n    broadcast (水 v)\n    set [水検知 v] to [1]\n    wait until <not <touching (水 v)?>>\n    set [水検知 v] to [0]\n    broadcast (水ではない v)\nend\n\nwhen I receive [next v]\nchange [stage v] by (1)\n\nstart sound [死 v]\n\nwhen I receive [プラフォ v]\nforever\n    set [プレイヤーx v] to (x position)\n    set [プレイヤーy v] to (y position)\nend\n\ndefine x (x)\nrepeat until <not <<touching (ステージ v)?> or <<touching (1 v)?> or <<touching (2 v)?> or <<touching (とげ v)?> or >>>>>\n    change x by (x)\nend\n\nwhen I receive [プログラム v]\n\nif <(y) = [0]> then\n    y [1]\nend\n\nwhen I receive [初期 v]\n初期位置\n\nset [stage v] to [21]\n\nwhen I receive [止まる v]\nstop [other scripts in sprite v]\nwait (1) seconds\nbroadcast (プラフォ v)\n\nwhen I receive [プログラム v]\nbroadcast (プラフォ v)\n\nset [stage v] to [21]\n\nwhen I receive [ネクストやんけ v]\n\nwhen I receive [プログラム v]\nforever\n    if <(STAGE) = [21]> then\n        if <[160] < (x position)> then\n            repeat (10)\n                change [ghost v] effect by (10)\n                go to x: (160) y: (y position)\n            end\n            hide\n            set [動作 v] to [×]\n            broadcast (ネクストやんけ v)\n            go to x: (160) y: (y position)\n            stop [this script v]\n        end\n    end\nend\n\nwhen flag clicked\nset [time v] to [0]\nrepeat (10)\n    hide\nend\n\nwhen I receive [プログラム v]\nrepeat until <(STAGE) = [21]>\n    wait (1) seconds\n    change [time v] by (1)\nend\nif <(time) < (☁ time世界記録)> then\n    set [☁ time世界記録 v] to (time)\nend\n\nwhen flag clicked\n\n@敵\n\nwhen I start as a clone\ngo to x: (敵 x.) y: (敵 y.)\nclear graphic effects\nswitch costume to (敵 v)\nset size to (150) %\nshow\nforever\n    set rotation style [left-right v]\n    if <(プレイヤーx) < (x position)> then\n        point in direction (-90)\n        change [敵:x v] by (-0.8)\n    end\n    if <(x position) < (プレイヤーx)> then\n        point in direction (90)\n        change [敵:x v] by (0.8)\n    end\n    set [敵:x v] to ((敵:x) * (0.81))\n    change x by (敵:x)\n    if <<touching (ステージ v)?> or <<<touching (水 v)?> or <touching (溶岩 v)?>> or <<touching (1 v)?> or >>> then\n        change x by (() - (敵:x))\n        set [敵:x v] to [0]\n        if <<touching (ステージ v)?> or <<touching (水 v)?> or <<touching (溶岩 v)?> or <<touching (1 v)?> or >>>> then\n            set [敵y v] to [10]\n        else\n            set [敵:x v] to [0]\n        end\n    end\n    if <not <<touching (水 v)?> or <touching (溶岩 v)?>>> then\n        change [敵y v] by (-1)\n    end\n    change y by (敵y)\n    if <<touching (ステージ v)?> or <<touching (水 v)?> or <<touching (溶岩 v)?> or <<touching (1 v)?> or >>>> then\n        change y by (() - (敵y))\n        set [敵y v] to [0]\n        if <(敵y) > [0]> then\n            set [敵y v] to [-1]\n        else\n            set [敵y v] to [0]\n        end\n    end\n    if <(y position) < [-183]> then\n        delete this clone\n    end\n    if <<touching (水 v)?> or <touching (溶岩 v)?>> then\n        change y by (1)\n    end\n    if <touching (目玉くん v)?> then\n        if <[20] < (([y position v] of [目玉くん v]) - (y position))> then\n            if <(音ボタン) = [0]> then\n                start sound [小パンチ v]\n            end\n            if <<key (up arrow v) pressed?> or <<key (w v) pressed?> or <<mouse down?> and <(x position) < (mouse x)>>>> then\n                set [y v] to [16]\n            else\n                set [y v] to [10]\n            end\n            clear graphic effects\n            switch costume to (コスチューム1 v)\n            repeat (10)\n                change [ghost v] effect by (10)\n            end\n            hide\n            delete this clone\n        else\n            broadcast (死 v)\n            delete this clone\n        end\n    end\n    if <touching (バネ v)?> then\n        set [敵y v] to [15]\n    end\nend\n\ndefine クローン (回数) (x) (y)\nset [敵 x. v] to (x)\nset [敵 y. v] to (y)\nset [敵:x v] to [0]\nset [敵y v] to [0]\ngo to x: (x) y: (y)\nrepeat (回数)\n    wait (0.5) seconds\n    create clone of (_myself_ v)\nend\n\nwhen flag clicked\nhide\nwait (0) seconds\nrepeat (1)\n    delete this clone\nend\nwait until <(STAGE) = [9]>\nwait (1) seconds\nクローン [1] [200] [100]\nwait until <(STAGE) = [10]>\nwait until <(STAGE) = [11]>\nwait (1) seconds\nクローン [1] [200] [100]\nwait (2) seconds\nクローン [1] [200] [100]\nwait until <(STAGE) = [12]>\nwait (1) seconds\nクローン [1] [200] [100]\nwait until <(STAGE) = [13]>\nwait (1) seconds\nクローン [1] [200] [0]\nwait until <(STAGE) = [17]>\nwait (2) seconds\nクローン [1] [100] [100]\nwait until <(STAGE) = [20]>\nwait (2) seconds\nクローン [1] [100] [100]\n\nwhen flag clicked\n\nwhen I receive [死 v]\nhide\nwait (0) seconds\nrepeat (1)\n    delete this clone\nend\nif <(STAGE) = [9]> then\n    wait (2) seconds\n    クローン [1] [200] [100]\nend\nif <(STAGE) = [11]> then\n    wait (2) seconds\n    クローン [1] [200] [100]\n    wait (2) seconds\n    クローン [1] [200] [100]\nend\nif <(STAGE) = [12]> then\n    wait (2) seconds\n    クローン [1] [200] [100]\nend\nif <(STAGE) = [13]> then\n    wait (2) seconds\n    クローン [1] [200] [0]\nend\nif <(STAGE) = [17]> then\n    wait (2) seconds\n    クローン [1] [100] [100]\nend\nif <(STAGE) = [20]> then\n    wait (2) seconds\n    クローン [1] [100] [100]\nend\n\nwhen I receive [死2 v]\nhide\nwait (0) seconds\nrepeat (1)\n    delete this clone\nend\nif <(STAGE) = [9]> then\n    wait (2) seconds\n    クローン [1] [200] [100]\nend\nif <(STAGE) = [11]> then\n    wait (2) seconds\n    クローン [1] [200] [100]\n    wait (2) seconds\n    クローン [1] [200] [100]\nend\nif <(STAGE) = [12]> then\n    wait (2) seconds\n    クローン [1] [200] [100]\nend\nif <(STAGE) = [13]> then\n    wait (2) seconds\n    クローン [1] [200] [0]\nend\nif <(STAGE) = [17]> then\n    wait (2) seconds\n    クローン [1] [100] [100]\nend\nif <(STAGE) = [20]> then\n    wait (2) seconds\n    クローン [1] [100] [100]\nend\n\nwhen I receive [next v]\ndelete this clone\n\nif <<touching (水 v)?> or <touching (溶岩 v)?>> then\n    set [敵y v] to [1]\nend\n\nwhen I receive [初期 v]\nhide\nwait (0) seconds\nrepeat (1)\n    delete this clone\nend\nif <(STAGE) = [9]> then\n    クローン [1] [200] [100]\nend\nif <(STAGE) = [11]> then\n    クローン [1] [200] [100]\n    wait (2) seconds\n    クローン [1] [200] [100]\nend\nif <(STAGE) = [12]> then\n    クローン [1] [200] [100]\nend\nif <(STAGE) = [13]> then\n    クローン [1] [200] [0]\nend\nif <(STAGE) = [17]> then\n    クローン [1] [100] [100]\nend\nif <(STAGE) = [20]> then\n    クローン [1] [100] [100]\nend\n\nset [stage v] to [16]\n\nwhen I receive [受け取る v]\nif <(STAGE) = [16]> then\n    repeat (1)\n        delete this clone\n    end\n    クローン [1] [-200] [100]\nend\n\nwhen I receive [受け取る2 v]\nif <(STAGE) = [16]> then\n    repeat (1)\n        delete this clone\n    end\n    クローン [1] [150] [100]\nend\n\n@針くん\n\nwhen flag clicked\nhide\npoint in direction (90)\ngo to x: (0) y: (0)\nrepeat (2)\n    go to [back v] layer\nend\n\nwhen I receive [死 v]\nrepeat (5)\n    go to x: (pick random (2) to (-2)) y: (pick random (2) to (-2))\nend\ngo to x: (0) y: (0)\n\nwhen I receive [死2 v]\nrepeat (5)\n    go to x: (pick random (2) to (-2)) y: (pick random (2) to (-2))\nend\ngo to x: (0) y: (0)\n\nwhen I receive [死 v]\nrepeat (5)\n    go to x: (pick random (2) to (-2)) y: (pick random (2) to (-2))\nend\ngo to x: (0) y: (0)\n\nwhen I receive [死 v]\nrepeat (5)\n    go to x: (pick random (2) to (-2)) y: (pick random (2) to (-2))\nend\ngo to x: (0) y: (0)\n\nwhen I receive [スタート v]\nshow\nforever\n    switch costume to (STAGE)\nend\n\n@旗\n\nwhen flag clicked\nhide\nforever\n    switch costume to (STAGE)\nend\n\nwhen I receive [死 v]\nrepeat (5)\n    go to x: (pick random (35) to (37)) y: (pick random (27) to (29))\nend\ngo to x: (36) y: (28)\n\nwhen I receive [死2 v]\nrepeat (5)\n    go to x: (pick random (35) to (37)) y: (pick random (27) to (29))\nend\ngo to x: (36) y: (28)\n\nwhen I receive [スタート v]\nshow\n\n@ステージ\n\nwhen flag clicked\nhide\n\nwhen I receive [死 v]\nrepeat (5)\n    go to x: (pick random (2) to (-2)) y: (pick random (2) to (-2))\nend\ngo to x: (0) y: (0)\n\nwhen I receive [死2 v]\nrepeat (5)\n    go to x: (pick random (2) to (-2)) y: (pick random (2) to (-2))\nend\ngo to x: (0) y: (0)\n\nwhen I receive [スタート v]\nset [stage v] to [1]\nshow\ngo to x: (0) y: (0)\nswitch costume to (コスチューム1 v)\nforever\n    switch costume to (STAGE)\nend\n\n@タヒ\n\nwhen flag clicked\ngo to x: (0) y: (0)\nhide\nforever\n    go to [front v] layer\nend\n\nwhen I receive [死 v]\nshow\nclear graphic effects\nswitch costume to (コスチューム1 v)\nrepeat (10)\n    change [ghost v] effect by (10)\nend\nhide\n\nwhen I receive [死2 v]\nshow\nclear graphic effects\nswitch costume to (コスチューム1 v)\nrepeat (10)\n    change [ghost v] effect by (10)\nend\nhide\n\n@さむね\n\nwhen flag clicked\nforever\n    switch costume to (コスチューム4 v)\n    go to x: (0) y: (0)\n    go to [front v] layer\n    point in direction (90)\n    set [ghost v] effect to (100)\n    show\nend\n\n@溶岩\n\nwhen flag clicked\nset [stage v] to [1]\ngo to x: (0) y: (0)\nclear graphic effects\ngo to [back v] layer\nset [溶岩 v] to [0]\nforever\n    switch costume to (STAGE)\n    change y by ([sin v] of ((溶岩) * (3)) )\n    change [溶岩 v] by (-3)\nend\n\n@バネ\n\nwhen flag clicked\nforever\n    switch costume to (STAGE)\nend\n\nwhen I receive [死 v]\nrepeat (5)\n    go to x: (pick random (2) to (-2)) y: (pick random (2) to (-2))\nend\ngo to x: (0) y: (0)\n\nwhen I receive [死2 v]\nrepeat (5)\n    go to x: (pick random (2) to (-2)) y: (pick random (2) to (-2))\nend\ngo to x: (0) y: (0)\n\n@泡\n\nwhen I start as a clone\nset size to (pick random (50) to (60)) %\ngo to (目玉くん v)\nshow\nrepeat until <[140] < (y position)>\n    if <touching (水 v)?> then\n        change y by (5)\n    else\n        delete this clone\n    end\nend\ndelete this clone\n\nwhen flag clicked\nhide\n\nwhen flag clicked\nset rotation style [left-right v]\nforever\n    if <([direction v] of [目玉くん v]) = [90]> then\n        point in direction (90)\n    end\n    if <([direction v] of [目玉くん v]) = [-90]> then\n        point in direction (-90)\n    end\nend\n\n@ぺん\n\nwhen I receive [水 v]\nforever\n    if <(水検知) = [1]> then\n        repeat until <<(水検知) = [0]> or <(pen) = [0]>>\n            wait (0.01) seconds\n            change [pen v] by (-1)\n        end\n        if <(pen) = [0]> then\n            broadcast (死 v)\n            erase all\n        end\n    else\n        erase all\n    end\n    if <(水検知) = [0]> then\n        erase all\n    end\nend\n\nwhen I receive [水ではない v]\nrepeat until <<(水検知) = [1]> or <(pen) = [100]>>\n    wait (0.01) seconds\n    change [pen v] by (1)\nend\nstop [this script v]\n\nwhen I receive [水 v]\nforever\n    erase all\n    if <(水検知) = [1]> then\n        set pen size to (10)\n        pen down\n        set pen color to (#52b4ff)\n        go to x: (-220) y: (160)\n        go to x: ((pen) + (-220)) y: (160)\n        pen up\n    end\nend\n\nwhen flag clicked\nset [pen v] to [100]\nerase all\n\nwhen I receive [死2 v]\nrepeat (25)\n    erase all\n    set [pen v] to [100]\nend\n\nwhen I receive [死 v]\nrepeat (50)\n    erase all\n    set [pen v] to [100]\nend\n\nwhen I receive [next v]\nrepeat (130)\n    set [pen v] to [100]\nend\n\n@鍵\n\nwhen flag clicked\nhide\nset [なめらかあ v] to [0]\nforever\n    change y by ([sin v] of ((なめらかあ) * (10)) )\n    change [なめらかあ v] by (1)\nend\n\nwhen flag clicked\nclear graphic effects\nwait until <(STAGE) = [5]>\nclear graphic effects\nshow\ngo to x: (0) y: (100)\nwait until <(STAGE) = [6]>\nclear graphic effects\nshow\ngo to x: (200) y: (0)\nwait until <(STAGE) = [10]>\nclear graphic effects\nshow\ngo to x: (200) y: (0)\nwait until <(STAGE) = [11]>\nclear graphic effects\nshow\ngo to x: (200) y: (80)\nwait until <(STAGE) = [12]>\nclear graphic effects\nshow\ngo to x: (200) y: (80)\nwait until <(STAGE) = [13]>\ngo to x: (-50) y: (130)\nclear graphic effects\nshow\nwait until <(STAGE) = [16]>\ngo to x: (200) y: (130)\nclear graphic effects\nshow\nwait until <(STAGE) = [17]>\ngo to x: (0) y: (150)\nclear graphic effects\nshow\n\nwhen flag clicked\nhide\nset [なめらかあ v] to [0]\nforever\n    if <touching (目玉くん v)?> then\n        if <(動作) = [◯]> then\n            broadcast (受け取る v)\n            if <(音ボタン) = [0]> then\n                start sound [ビープ音1 v]\n            end\n            repeat (10)\n                change [ghost v] effect by (10)\n            end\n            hide\n        end\n    end\nend\n\nwhen I receive [死 v]\nhide\nwait (1) seconds\nif <(STAGE) = [5]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\nif <(STAGE) = [6]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\nif <(STAGE) = [10]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\nif <(STAGE) = [11]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\nif <(STAGE) = [12]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\nif <(STAGE) = [13]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\nif <(STAGE) = [16]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\nif <(STAGE) = [17]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\n\nwhen I receive [死2 v]\nhide\nwait (1) seconds\nif <(STAGE) = [5]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\nif <(STAGE) = [6]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\nif <(STAGE) = [10]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\nif <(STAGE) = [11]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\nif <(STAGE) = [12]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\nif <(STAGE) = [13]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\nif <(STAGE) = [16]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\nif <(STAGE) = [17]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\n\nwhen I receive [初期 v]\nhide\nif <(STAGE) = [5]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\nif <(STAGE) = [6]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\nif <(STAGE) = [10]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\nif <(STAGE) = [11]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\nif <(STAGE) = [12]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\nif <(STAGE) = [13]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\nif <(STAGE) = [16]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\nif <(STAGE) = [17]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\n\n@1\n\nwhen flag clicked\ngo to x: (0) y: (0)\nhide\nclear graphic effects\nhide\nwait until <(STAGE) = [5]>\nclear graphic effects\nshow\nswitch costume to (コスチューム1 v)\nwait until <(STAGE) = [6]>\nclear graphic effects\nshow\nswitch costume to (コスチューム2 v)\nwait until <(STAGE) = [10]>\nclear graphic effects\nshow\nswitch costume to (コスチューム3 v)\nwait until <(STAGE) = [11]>\nclear graphic effects\nshow\nswitch costume to (コスチューム4 v)\nwait until <(STAGE) = [12]>\nclear graphic effects\nshow\nswitch costume to (コスチューム5 v)\nwait until <(STAGE) = [13]>\nclear graphic effects\nshow\nswitch costume to (コスチューム6 v)\nwait until <(STAGE) = [16]>\nclear graphic effects\nshow\nswitch costume to (コスチューム7 v)\nwait until <(STAGE) = [17]>\nclear graphic effects\nshow\nswitch costume to (コスチューム8 v)\n\nwhen I receive [受け取る v]\nrepeat (10)\n    change [ghost v] effect by (10)\nend\nhide\n\nwhen I receive [死 v]\nhide\nwait (1) seconds\nif <(STAGE) = [5]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\nif <(STAGE) = [6]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\nif <(STAGE) = [10]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\nif <(STAGE) = [11]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\nif <(STAGE) = [12]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\nif <(STAGE) = [13]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\nif <(STAGE) = [16]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\nif <(STAGE) = [17]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\n\nwhen I receive [死2 v]\nhide\nwait (1) seconds\nif <(STAGE) = [5]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\nif <(STAGE) = [6]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\nif <(STAGE) = [10]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\nif <(STAGE) = [11]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\nif <(STAGE) = [12]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\nif <(STAGE) = [13]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\nif <(STAGE) = [16]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\nif <(STAGE) = [17]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\n\nwhen I receive [初期 v]\nhide\nif <(STAGE) = [5]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\nif <(STAGE) = [6]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\nif <(STAGE) = [10]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\nif <(STAGE) = [11]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\nif <(STAGE) = [12]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\nif <(STAGE) = [13]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\nif <(STAGE) = [16]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\nif <(STAGE) = [17]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\n\n@飾り\n\nwhen flag clicked\nhide\n\nwhen I receive [スタート v]\nshow\ngo to x: (0) y: (0)\nforever\n    go to [back v] layer\n    switch costume to (STAGE)\nend\n\n@スプライト2\n\nwhen this sprite clicked\nif <(音ボタン) = [0]> then\n    start sound [チーン1 v]\nend\nbroadcast (初期 v)\n\nwhen I receive [プログラム v]\nshow\nreset timer\nreset timer\npoint in direction (90)\nforever\n    go to x: (-220) y: (-160)\n    point in direction ((([sin v] of ((timer) * (100)) ) * (10)) + (90))\nend\n\nwhen flag clicked\nhide\n\n@溶岩から出るやつ\n\nwhen flag clicked\nhide\nwait until <(STAGE) = [4]>\nshow\nrepeat until <(STAGE) = [5]>\n    if <(STAGE) = [4]> then\n        go to [back v] layer\n        switch costume to (コスチューム1 v)\n        go to x: (0) y: (-100)\n        set [yざひょう！ v] to [0]\n        repeat (10)\n            create clone of (_myself_ v)\n            set [yざひょう！ v] to [10]\n            change y by (yざひょう！)\n        end\n        repeat (8)\n            create clone of (_myself_ v)\n            change [yざひょう！ v] by (-1)\n            change y by (yざひょう！)\n        end\n        switch costume to (コスチューム3 v)\n        repeat (18)\n            create clone of (_myself_ v)\n            change [yざひょう！ v] by (-1)\n            change y by (yざひょう！)\n        end\n        hide\n        wait (1) seconds\n        show\n    end\nend\nwait until <(STAGE) = [5]>\nhide\nwait until <(STAGE) = [14]>\nshow\nrepeat until <(STAGE) = [15]>\n    if <(STAGE) = [14]> then\n        go to [back v] layer\n        switch costume to (コスチューム1 v)\n        go to x: (-10) y: (-100)\n        set [yざひょう！ v] to [0]\n        repeat (10)\n            create clone of (_myself_ v)\n            set [yざひょう！ v] to [10]\n            change y by (yざひょう！)\n        end\n        repeat (8)\n            create clone of (_myself_ v)\n            change [yざひょう！ v] by (-1)\n            change y by (yざひょう！)\n        end\n        switch costume to (コスチューム3 v)\n        repeat (18)\n            create clone of (_myself_ v)\n            change [yざひょう！ v] by (-1)\n            change y by (yざひょう！)\n        end\n        hide\n        wait (1) seconds\n        show\n    end\nend\nwait until <(STAGE) = [15]>\nshow\nrepeat until <(STAGE) = [16]>\n    if <(STAGE) = [15]> then\n        go to [back v] layer\n        switch costume to (コスチューム1 v)\n        go to x: (-15) y: (-125)\n        set [yざひょう！ v] to [0]\n        repeat (10)\n            create clone of (_myself_ v)\n            set [yざひょう！ v] to [10]\n            change y by (yざひょう！)\n        end\n        repeat (8)\n            create clone of (_myself_ v)\n            change [yざひょう！ v] by (-1)\n            change y by (yざひょう！)\n        end\n        switch costume to (コスチューム3 v)\n        repeat (18)\n            create clone of (_myself_ v)\n            change [yざひょう！ v] by (-1)\n            change y by (yざひょう！)\n        end\n        hide\n        wait (1) seconds\n        show\n    end\nend\nwait until <(STAGE) = [16]>\nshow\nrepeat until <(STAGE) = [17]>\n    if <(STAGE) = [16]> then\n        show\n        go to [back v] layer\n        clear graphic effects\n        switch costume to (コスチューム1 v)\n        go to x: (60) y: (0)\n        set [yざひょう！ v] to [0]\n        repeat (10)\n            create clone of (_myself_ v)\n            set [yざひょう！ v] to [10]\n            change y by (yざひょう！)\n        end\n        repeat (8)\n            create clone of (_myself_ v)\n            change [yざひょう！ v] by (-1)\n            change y by (yざひょう！)\n        end\n        switch costume to (コスチューム3 v)\n        repeat (18)\n            create clone of (_myself_ v)\n            change [yざひょう！ v] by (-1)\n            change y by (yざひょう！)\n        end\n        hide\n        wait (0) seconds\n        show\n        go to [back v] layer\n        switch costume to (コスチューム1 v)\n        go to x: (-45) y: (-50)\n        set [yざひょう！ v] to [0]\n        repeat (10)\n            create clone of (_myself_ v)\n            set [yざひょう！ v] to [10]\n            change y by (yざひょう！)\n        end\n        repeat (8)\n            create clone of (_myself_ v)\n            change [yざひょう！ v] by (-1)\n            change y by (yざひょう！)\n        end\n        switch costume to (コスチューム3 v)\n        repeat (18)\n            create clone of (_myself_ v)\n            change [yざひょう！ v] by (-1)\n            change y by (yざひょう！)\n        end\n        hide\n        wait (0) seconds\n        show\n    end\nend\nhide\nwait until <(STAGE) = [18]>\nshow\nrepeat until <(STAGE) = [19]>\n    show\n    go to [back v] layer\n    clear graphic effects\n    switch costume to (コスチューム1 v)\n    go to x: (-100) y: (-120)\n    set [yざひょう！ v] to [0]\n    repeat (10)\n        create clone of (_myself_ v)\n        set [yざひょう！ v] to [10]\n        change y by (yざひょう！)\n    end\n    repeat (8)\n        create clone of (_myself_ v)\n        change [yざひょう！ v] by (-1)\n        change y by (yざひょう！)\n    end\n    switch costume to (コスチューム3 v)\n    repeat (18)\n        create clone of (_myself_ v)\n        change [yざひょう！ v] by (-1)\n        change y by (yざひょう！)\n    end\n    hide\n    wait (0) seconds\n    show\n    go to [back v] layer\n    switch costume to (コスチューム1 v)\n    go to x: (0) y: (-120)\n    set [yざひょう！ v] to [0]\n    repeat (10)\n        create clone of (_myself_ v)\n        set [yざひょう！ v] to [10]\n        change y by (yざひょう！)\n    end\n    repeat (8)\n        create clone of (_myself_ v)\n        change [yざひょう！ v] by (-1)\n        change y by (yざひょう！)\n    end\n    switch costume to (コスチューム3 v)\n    repeat (18)\n        create clone of (_myself_ v)\n        change [yざひょう！ v] by (-1)\n        change y by (yざひょう！)\n    end\n    hide\n    wait (0) seconds\n    show\n    show\n    go to [back v] layer\n    switch costume to (コスチューム1 v)\n    go to x: (100) y: (-120)\n    set [yざひょう！ v] to [0]\n    repeat (10)\n        create clone of (_myself_ v)\n        set [yざひょう！ v] to [10]\n        change y by (yざひょう！)\n    end\n    repeat (8)\n        create clone of (_myself_ v)\n        change [yざひょう！ v] by (-1)\n        change y by (yざひょう！)\n    end\n    switch costume to (コスチューム3 v)\n    repeat (18)\n        create clone of (_myself_ v)\n        change [yざひょう！ v] by (-1)\n        change y by (yざひょう！)\n    end\n    hide\n    wait (0) seconds\n    show\nend\nshow\nrepeat until <(STAGE) = [20]>\n    if <(STAGE) = [19]> then\n        show\n        go to [back v] layer\n        clear graphic effects\n        switch costume to (コスチューム1 v)\n        go to x: (-100) y: (-120)\n        set [yざひょう！ v] to [0]\n        repeat (10)\n            create clone of (_myself_ v)\n            set [yざひょう！ v] to [10]\n            change y by (yざひょう！)\n        end\n        repeat (8)\n            create clone of (_myself_ v)\n            change [yざひょう！ v] by (-1)\n            change y by (yざひょう！)\n        end\n        switch costume to (コスチューム3 v)\n        repeat (18)\n            create clone of (_myself_ v)\n            change [yざひょう！ v] by (-1)\n            change y by (yざひょう！)\n        end\n        hide\n        wait (0) seconds\n        show\n        go to [back v] layer\n        switch costume to (コスチューム1 v)\n        go to x: (0) y: (-120)\n        set [yざひょう！ v] to [0]\n        repeat (10)\n            create clone of (_myself_ v)\n            set [yざひょう！ v] to [10]\n            change y by (yざひょう！)\n        end\n        repeat (8)\n            create clone of (_myself_ v)\n            change [yざひょう！ v] by (-1)\n            change y by (yざひょう！)\n        end\n        switch costume to (コスチューム3 v)\n        repeat (18)\n            create clone of (_myself_ v)\n            change [yざひょう！ v] by (-1)\n            change y by (yざひょう！)\n        end\n        hide\n        wait (0) seconds\n        show\n        show\n        go to [back v] layer\n        switch costume to (コスチューム1 v)\n        go to x: (100) y: (-120)\n        set [yざひょう！ v] to [0]\n        repeat (10)\n            create clone of (_myself_ v)\n            set [yざひょう！ v] to [10]\n            change y by (yざひょう！)\n        end\n        repeat (8)\n            create clone of (_myself_ v)\n            change [yざひょう！ v] by (-1)\n            change y by (yざひょう！)\n        end\n        switch costume to (コスチューム3 v)\n        repeat (18)\n            create clone of (_myself_ v)\n            change [yざひょう！ v] by (-1)\n            change y by (yざひょう！)\n        end\n        hide\n        wait (0) seconds\n        show\n    end\nend\nrepeat until <(STAGE) = [20]>\n    show\n    go to [back v] layer\n    clear graphic effects\n    switch costume to (コスチューム1 v)\n    go to x: (-100) y: (-120)\n    set [yざひょう！ v] to [0]\n    repeat (10)\n        create clone of (_myself_ v)\n        set [yざひょう！ v] to [10]\n        change y by (yざひょう！)\n    end\n    repeat (8)\n        create clone of (_myself_ v)\n        change [yざひょう！ v] by (-1)\n        change y by (yざひょう！)\n    end\n    switch costume to (コスチューム3 v)\n    repeat (18)\n        create clone of (_myself_ v)\n        change [yざひょう！ v] by (-1)\n        change y by (yざひょう！)\n    end\n    hide\n    wait (0) seconds\n    show\n    go to [back v] layer\n    switch costume to (コスチューム1 v)\n    go to x: (0) y: (-120)\n    set [yざひょう！ v] to [0]\n    repeat (10)\n        create clone of (_myself_ v)\n        set [yざひょう！ v] to [10]\n        change y by (yざひょう！)\n    end\n    repeat (8)\n        create clone of (_myself_ v)\n        change [yざひょう！ v] by (-1)\n        change y by (yざひょう！)\n    end\n    switch costume to (コスチューム3 v)\n    repeat (18)\n        create clone of (_myself_ v)\n        change [yざひょう！ v] by (-1)\n        change y by (yざひょう！)\n    end\n    hide\n    wait (0) seconds\n    show\n    show\n    go to [back v] layer\n    switch costume to (コスチューム1 v)\n    go to x: (100) y: (-120)\n    set [yざひょう！ v] to [0]\n    repeat (10)\n        create clone of (_myself_ v)\n        set [yざひょう！ v] to [10]\n        change y by (yざひょう！)\n    end\n    repeat (8)\n        create clone of (_myself_ v)\n        change [yざひょう！ v] by (-1)\n        change y by (yざひょう！)\n    end\n    switch costume to (コスチューム3 v)\n    repeat (18)\n        create clone of (_myself_ v)\n        change [yざひょう！ v] by (-1)\n        change y by (yざひょう！)\n    end\n    hide\n    wait (0) seconds\n    show\nend\nrepeat until <(STAGE) = [21]>\n    if <(STAGE) = [20]> then\n        show\n        go to [back v] layer\n        clear graphic effects\n        switch costume to (コスチューム1 v)\n        go to x: (-100) y: (-150)\n        set [yざひょう！ v] to [0]\n        repeat (10)\n            create clone of (_myself_ v)\n            set [yざひょう！ v] to [10]\n            change y by (yざひょう！)\n        end\n        repeat (8)\n            create clone of (_myself_ v)\n            change [yざひょう！ v] by (-1)\n            change y by (yざひょう！)\n        end\n        switch costume to (コスチューム3 v)\n        repeat (18)\n            create clone of (_myself_ v)\n            change [yざひょう！ v] by (-1)\n            change y by (yざひょう！)\n        end\n        hide\n        wait (0) seconds\n        show\n        go to [back v] layer\n        switch costume to (コスチューム1 v)\n        go to x: (0) y: (-150)\n        set [yざひょう！ v] to [0]\n        repeat (10)\n            create clone of (_myself_ v)\n            set [yざひょう！ v] to [10]\n            change y by (yざひょう！)\n        end\n        repeat (8)\n            create clone of (_myself_ v)\n            change [yざひょう！ v] by (-1)\n            change y by (yざひょう！)\n        end\n        switch costume to (コスチューム3 v)\n        repeat (18)\n            create clone of (_myself_ v)\n            change [yざひょう！ v] by (-1)\n            change y by (yざひょう！)\n        end\n        hide\n        wait (0) seconds\n        show\n        show\n        go to [back v] layer\n        switch costume to (コスチューム1 v)\n        go to x: (100) y: (-150)\n        set [yざひょう！ v] to [0]\n        repeat (10)\n            create clone of (_myself_ v)\n            set [yざひょう！ v] to [10]\n            change y by (yざひょう！)\n        end\n        repeat (8)\n            create clone of (_myself_ v)\n            change [yざひょう！ v] by (-1)\n            change y by (yざひょう！)\n        end\n        switch costume to (コスチューム3 v)\n        repeat (18)\n            create clone of (_myself_ v)\n            change [yざひょう！ v] by (-1)\n            change y by (yざひょう！)\n        end\n        hide\n        wait (0) seconds\n        show\n    end\nend\nshow\nrepeat (10)\n    hide\nend\n\nwhen flag clicked\nwait until <(STAGE) = [21]>\nrepeat (10)\n    hide\n    delete this clone\nend\n\nwhen I start as a clone\nclear graphic effects\nshow\nswitch costume to (コスチューム2 v)\nrepeat (5)\n    change [ghost v] effect by (20)\nend\nhide\ndelete this clone\n\n@回るやつ\n\nwhen flag clicked\nhide\nwait until <(STAGE) = [7]>\nswitch costume to (コスチューム1 v)\ngo to [back v] layer\nrepeat until <(STAGE) = [8]>\n    show\n    turn right (3) degrees\n    go to x: (0) y: (-30)\nend\nhide\nswitch costume to (コスチューム2 v)\nset size to (100) %\nrepeat until <(STAGE) = [9]>\n    show\n    turn right (10) degrees\n    go to x: (0) y: (-80)\nend\nhide\nwait until <(STAGE) = [12]>\nrepeat until <(STAGE) = [13]>\n    show\n    turn right (10) degrees\n    go to x: (0) y: (-80)\nend\nhide\nwait until <(STAGE) = [14]>\nrepeat until <(STAGE) = [15]>\n    show\n    turn right (10) degrees\n    go to x: (90) y: (-75)\nend\nhide\nwait until <(STAGE) = [19]>\nset size to (80) %\nrepeat until <(STAGE) = [20]>\n    show\n    turn right (10) degrees\n    go to x: (0) y: (-90)\nend\nhide\n\n@鍵2\n\nwhen flag clicked\nhide\nset [なめらかあ v] to [0]\nforever\n    change y by ([sin v] of ((なめらかあ) * (10)) )\n    change [なめらかあ v] by (1)\nend\n\nwhen flag clicked\nclear graphic effects\nwait until <(STAGE) = [10]>\nclear graphic effects\nshow\ngo to x: (-200) y: (40)\nwait until <(STAGE) = [16]>\nclear graphic effects\nshow\ngo to x: (-220) y: (-130)\n\nwhen flag clicked\nhide\nset [なめらかあ v] to [0]\nforever\n    if <touching (目玉くん v)?> then\n        if <(動作) = [◯]> then\n            broadcast (受け取る2 v)\n            if <(音ボタン) = [0]> then\n                start sound [ビープ音1 v]\n            end\n            repeat (10)\n                change [ghost v] effect by (10)\n            end\n            hide\n        end\n    end\nend\n\nwhen I receive [死 v]\nhide\nwait (1) seconds\nif <(STAGE) = [10]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\nif <(STAGE) = [16]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\n\nwhen I receive [死2 v]\nhide\nwait (1) seconds\nif <(STAGE) = [10]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\nif <(STAGE) = [16]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\n\nwhen I receive [初期 v]\nhide\nif <(STAGE) = [10]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\nif <(STAGE) = [16]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\n\n@2\n\nwhen flag clicked\nhide\ngo to x: (0) y: (0)\nwait until <(STAGE) = [10]>\nclear graphic effects\nshow\nswitch costume to (コスチューム1 v)\nwait until <(STAGE) = [16]>\nclear graphic effects\nshow\nswitch costume to (コスチューム2 v)\n\nwhen I receive [受け取る2 v]\nrepeat (10)\n    change [ghost v] effect by (10)\nend\nhide\n\nwhen I receive [死 v]\nhide\nwait (1) seconds\nif <(STAGE) = [10]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\nif <(STAGE) = [16]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\n\nwhen I receive [死2 v]\nhide\nwait (1) seconds\nif <(STAGE) = [10]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\nif <(STAGE) = [16]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\n\nwhen I receive [初期 v]\nhide\nif <(STAGE) = [10]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\nif <(STAGE) = [16]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\n\n@針\n\nwhen flag clicked\nhide\ngo to x: (0) y: (0)\nwait until <(STAGE) = [10]>\nclear graphic effects\nshow\nswitch costume to (コスチューム1 v)\n\nwhen I receive [受け取る2 v]\nrepeat (10)\n    change [ghost v] effect by (10)\nend\nhide\n\nwhen I receive [死 v]\nhide\nwait (1) seconds\nif <(STAGE) = [10]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\n\nwhen I receive [死2 v]\nhide\nwait (1) seconds\nif <(STAGE) = [10]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\n\nwhen I receive [初期 v]\nhide\nif <(STAGE) = [10]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\n\nwhen I receive [死 v]\nrepeat (5)\n    go to x: (pick random (2) to (-2)) y: (pick random (2) to (-2))\nend\ngo to x: (0) y: (0)\n\nwhen I receive [死2 v]\nrepeat (5)\n    go to x: (pick random (2) to (-2)) y: (pick random (2) to (-2))\nend\ngo to x: (0) y: (0)\n\n@輝き\n\nwhen flag clicked\nhide\nwait until <(STAGE) = [8]>\nrepeat until <(STAGE) = [15]>\n    wait (1) seconds\n    create clone of (_myself_ v)\nend\n\nwhen I start as a clone\npoint in direction (90)\ngo to x: (pick random (-240) to (240)) y: (pick random (-240) to (240))\nset size to (100) %\nshow\nrepeat (10)\n    change size by (-10)\nend\ndelete this clone\n\n@とげ\n\nwhen flag clicked\nhide\ngo to x: (0) y: (0)\nwait until <(STAGE) = [13]>\nclear graphic effects\nshow\nswitch costume to (コスチューム1 v)\n\nwhen I receive [受け取る v]\nrepeat (10)\n    change [ghost v] effect by (10)\nend\nhide\n\nwhen I receive [死 v]\nhide\nwait (1) seconds\nif <(STAGE) = [13]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\n\nwhen I receive [死2 v]\nhide\nwait (1) seconds\nif <(STAGE) = [13]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\n\nwhen I receive [初期 v]\nhide\nif <(STAGE) = [13]> then\n    clear graphic effects\n    show\n    set [ghost v] effect to (100)\n    repeat (10)\n        change [ghost v] effect by (-10)\n    end\nend\n\nwhen flag clicked\nrepeat (10)\n    hide\nend\n\nwhen I receive [死 v]\nrepeat (5)\n    go to x: (pick random (2) to (-2)) y: (pick random (2) to (-2))\nend\ngo to x: (0) y: (0)\n\nwhen I receive [死2 v]\nrepeat (5)\n    go to x: (pick random (2) to (-2)) y: (pick random (2) to (-2))\nend\ngo to x: (0) y: (0)\n\n@動く地面\n\nwhen flag clicked\nswitch costume to (コスチューム1 v)\nhide\nhide\nwait until <(STAGE) = [18]>\nshow\ngo to x: (-100) y: (-97)\nrepeat until <(STAGE) = [19]>\n    go to x: (-100) y: (-97)\n    wait (1) seconds\n    repeat (100)\n        change x by (2)\n    end\n    wait (1) seconds\n    repeat (100)\n        change x by (-2)\n    end\nend\nhide\nwait until <(STAGE) = [19]>\nshow\ngo to x: (-100) y: (-97)\nrepeat until <(STAGE) = [20]>\n    go to x: (-100) y: (-97)\n    wait (1) seconds\n    repeat (100)\n        change x by (2)\n    end\n    repeat (75)\n        change y by (2)\n    end\n    wait (1) seconds\n    repeat (75)\n        change y by (-2)\n    end\n    repeat (100)\n        change x by (-2)\n    end\nend\nhide\n\nwhen flag clicked\nwait until <(STAGE) = [20]>\nstop [other scripts in sprite v]\nhide\nswitch costume to (コスチューム2 v)\nrepeat until <(STAGE) = [21]>\n    if <(STAGE) = [20]> then\n        show\n        go to x: (-100) y: (120)\n        wait (1) seconds\n        repeat (100)\n            change x by (2)\n        end\n        wait (1) seconds\n        repeat (100)\n            change x by (-2)\n        end\n    end\nend\nhide\n\nwhen flag clicked\nswitch costume to (コスチューム1 v)\nhide\nhide\nwait until <(STAGE) = [21]>\nforever\n    hide\nend\n\n@オープニング2\n\nwhen flag clicked\nif <(音ボタン) = [0]> then\n    start sound [ロゴアニメーション1 v]\nend\nset size to (100) %\npoint in direction (90)\ngo to x: (0) y: (0)\nclear graphic effects\nshow\nswitch costume to (通常 v)\nrepeat (6)\n    next costume\nend\nrepeat (5)\n    switch costume to ((costume [number v]) - (1))\nend\nswitch costume to (コスチューム1 v)\nwait (0.5) seconds\nrepeat (11)\n    next costume\nend\nif <(音ボタン) = [0]> then\n    start sound [和太鼓でドン v]\nend\nrepeat (7)\n    next costume\nend\nwait (0) seconds\nrepeat (7)\n    next costume\nend\ncreate clone of (_myself_ v)\nshow\nswitch costume to (コスチューム9 v)\nrepeat (10)\n    change [ghost v] effect by (10)\nend\nbroadcast (home v)\nhide\n\nwhen I start as a clone\npoint in direction (90)\nswitch costume to (コスチューム8 v)\nshow\nrepeat (15)\n    change size by (((150) - (size)) / (3))\n    change x by (((-50) - (x position)) / (3))\n    change y by (((120) - (y position)) / (3))\n    turn right (((85) - (direction)) / (5)) degrees\nend\nforever\n    change [変数 v] by (1)\n    point in direction (([sin v] of ((変数) * (10)) ) + (85))\n    change y by ([sin v] of ((変数) * (5)) )\nend\n\nwhen I receive [スタート v]\nhide\ndelete this clone\n\n@オープニング\n\nwhen I receive [home v]\nhide\ngo to x: (0) y: (0)\nswitch costume to (コスチューム1 v)\ncreate clone of (_myself_ v)\nswitch costume to (コスチューム2 v)\ncreate clone of (_myself_ v)\nswitch costume to (コスチューム4 v)\ncreate clone of (_myself_ v)\nswitch costume to (コスチューム4 v)\ncreate clone of (_myself_ v)\nswitch costume to (コスチューム5 v)\ncreate clone of (_myself_ v)\nswitch costume to (コスチューム6 v)\ncreate clone of (_myself_ v)\n\nwhen flag clicked\nhide\n\nwhen I start as a clone\nif <(costume [number v]) = [1]> then\n    switch costume to (コスチューム1 v)\n    go to x: (-200) y: (-45)\n    set size to (50) %\n    show\n    set [home x v] to [0]\n    forever\n        set [home x v] to [0]\n        set [home y v] to [0]\n        go to x: (-200) y: (-45)\n        repeat (25)\n            change [home x v] by (1)\n            set [home x v] to ((home x) * (0.85))\n            change x by (home x)\n        end\n        if <(音ボタン) = [0]> then\n            start sound [ジャンプ v]\n        end\n        set [home y v] to [15]\n        repeat (29)\n            change [home y v] by (-1)\n            change y by (home y)\n            change [home x v] by (1)\n            set [home x v] to ((home x) * (0.85))\n            change x by (home x)\n        end\n        repeat (15)\n            change [home x v] by (1)\n            set [home x v] to ((home x) * (0.85))\n            change x by (home x)\n        end\n        set [こすちぃーむ v] to (pick random (2) to (3))\n    end\nend\nif <(costume [number v]) = [2]> then\n    set size to (100) %\n    show\n    forever\n        switch costume to (こすちぃーむ)\n    end\nend\nif <(costume [number v]) = [4]> then\n    switch costume to (コスチューム4 v)\n    go to x: (-145) y: (20)\n    set size to (100) %\n    show\n    set [home y v] to [0]\n    forever\n        point in direction (([sin v] of ((home y) * (10)) ) + (90))\n        change y by ([sin v] of ((home y) * (10)) )\n        change [home y v] by (1)\n    end\nend\nif <(costume [number v]) = [5]> then\n    switch costume to (コスチューム5 v)\n    go to x: (-130) y: (-50)\n    set size to (100) %\n    show\n    set [home y v] to [0]\n    forever\n        point in direction (([sin v] of ((home y) * (10)) ) + (90))\n        change y by ([sin v] of ((home y) * (8)) )\n        change [home y v] by (1)\n        if <<touching (mouse-pointer v)?> and <mouse down?>> then\n            if <(音ボタン) = [0]> then\n                start sound [決定ボタンを押す4 \(2\) v]\n            end\n            broadcast (なんか v)\n            switch costume to (コスチューム7 v)\n            wait (0.1) seconds\n            switch costume to (コスチューム5 v)\n            wait (0.9) seconds\n            broadcast (スタート v)\n        end\n    end\nend\nif <(costume [number v]) = [7]> then\n    switch costume to (コスチューム6 v)\n    go to x: (-130) y: (-105)\n    set size to (100) %\n    show\n    set [home y v] to [0]\n    forever\n        point in direction (([sin v] of ((home y) * (10)) ) + (90))\n        change y by ([sin v] of ((home y) * (7)) )\n        change [home y v] by (1)\n        if <<touching (mouse-pointer v)?> and <mouse down?>> then\n            if <(音ボタン) = [0]> then\n                start sound [決定ボタンを押す4 \(2\) v]\n            end\n            broadcast (なんか v)\n            switch costume to (コスチューム8 v)\n            wait (0.1) seconds\n            switch costume to (コスチューム6 v)\n            wait (0.9) seconds\n            broadcast (設定 v)\n        end\n    end\nend\n\nwhen I receive [home v]\n\nwhen I receive [スタート v]\nhide\ndelete this clone\n\nwhen I receive [スタート v]\nwait (0.1) seconds\nbroadcast (プログラム v)\n\n@スタートor設定\n\nwhen I receive [なんか v]\nhide\nswitch costume to (コスチューム1 v)\ncreate clone of (_myself_ v)\nwait (0.1) seconds\nswitch costume to (コスチューム2 v)\ncreate clone of (_myself_ v)\n\nwhen I start as a clone\ngo to x: (0) y: (0)\nclear graphic effects\nshow\nif <(costume [number v]) = [2]> then\n    go to [front v] layer\n    set size to (0) %\n    set [z v] to [0]\n    repeat (20)\n        switch costume to (コスチューム3 v)\n        change size by (z)\n        change [z v] by (8)\n        switch costume to (コスチューム1 v)\n    end\n    repeat (15)\n        switch costume to (コスチューム3 v)\n        change size by (((1950) - (size)) / (5))\n        switch costume to (コスチューム1 v)\n    end\n    repeat (10)\n        change [ghost v] effect by (10)\n    end\n    hide\n    delete this clone\nend\nif <(costume [number v]) = [3]> then\n    go to [front v] layer\n    set size to (0) %\n    set [z v] to [0]\n    repeat (20)\n        switch costume to (コスチューム3 v)\n        change size by (z)\n        change [z v] by (8)\n        switch costume to (コスチューム2 v)\n    end\n    repeat (15)\n        switch costume to (コスチューム3 v)\n        change size by (((1950) - (size)) / (5))\n        switch costume to (コスチューム2 v)\n    end\n    repeat (10)\n        change [ghost v] effect by (10)\n    end\n    hide\n    delete this clone\nend\n\nwhen flag clicked\nhide\n\n@設定\n\nwhen flag clicked\nhide\ngo to x: (0) y: (0)\n\nwhen I start as a clone\nif <(costume [number v]) = [3]> then\n    switch costume to (コスチューム3 v)\n    go to [front v] layer\n    go [backward v] (3) layers\n    show\n    forever\n        if <<touching (mouse-pointer v)?> and <mouse down?>> then\n            broadcast (戻る v)\n            if <(音ボタン) = [0]> then\n                start sound [決定ボタンを押す3 v]\n            end\n        end\n    end\nend\nif <(costume [number v]) = [4]> then\n    switch costume to (コスチューム4 v)\n    go to [front v] layer\n    go [backward v] (3) layers\n    show\n    forever\n        if <<touching (mouse-pointer v)?> and <mouse down?>> then\n            if <(音ボタン) = [1]> then\n                switch costume to (コスチューム4 v)\n                set [音ボタン v] to [0]\n                broadcast (音1 v)\n                set volume to (100) %\n                start sound [決定ボタンを押す3 v]\n                wait until <not <<touching (mouse-pointer v)?> and <mouse down?>>>\n            else\n                switch costume to (コスチューム5 v)\n                set [音ボタン v] to [1]\n                broadcast (音2 v)\n                set volume to (0) %\n                start sound [決定ボタンを押す3 v]\n                wait until <not <<touching (mouse-pointer v)?> and <mouse down?>>>\n            end\n        end\n    end\nend\n\nwhen I receive [設定 v]\nshow\nswitch costume to (コスチューム3 v)\ncreate clone of (_myself_ v)\nswitch costume to (コスチューム4 v)\ncreate clone of (_myself_ v)\nswitch costume to (コスチューム1 v)\n\nwhen I receive [戻る v]\nhide\ndelete this clone\n\nbroadcast (音1 v)\n\nwhen I receive [プラフォ v]\n\nwhen flag clicked\nforever\n    if <(音ボタン) = [1]> then\n        set volume to (100) %\n    else\n        set volume to (0) %\n    end\nend\n\nset [音ボタン v] to [0]\n\n@数字表示システム\n\nwhen I start as a clone\nset [ナンバー保存用 v] to (ナンバー)\nshow\nforever\n    if <(ナンバー保存用) > (length of (☁ time世界記録))> then\n        hide\n    else\n        show\n        switch costume to (letter ((length of (☁ time世界記録)) - ((ナンバー保存用) - (1))) of (☁ time世界記録))\n    end\nend\n\ndefine セット\nset size to (75) %\nset [ナンバー v] to [0]\ngo to x: (190) y: (79)\nrepeat (5)\n    change [ナンバー v] by (1)\n    create clone of (_myself_ v)\n    change x by (-20)\nend\n\nwhen I receive [設定 v]\nhide\nset [↓ v] to [12345]\nset [ナンバー v] to [0]\nset [クローン数 v] to [5]\nセット\nforever\n    wait until <(クローン数) < (length of (☁ time世界記録))>\n    change [ナンバー v] by (1)\n    change [クローン数 v] by (1)\n    create clone of (_myself_ v)\n    change x by (-30)\nend\n\nwhen I receive [home v]\n\nwhen I receive [戻る v]\nhide\ndelete this clone\n\nwait until <(クローン数) < (length of (☁ time世界記録))>\n\n@数字表示システム2\n\nwhen I start as a clone\nset [ナンバー保存用 v] to (ナンバー)\nshow\nforever\n    if <(ナンバー保存用) > (length of (time))> then\n        hide\n    else\n        show\n        switch costume to (letter ((length of (time)) - ((ナンバー保存用) - (1))) of (time))\n    end\nend\n\ndefine セット\nset size to (75) %\nset [ナンバー v] to [0]\ngo to x: (220) y: (160)\nrepeat (10)\n    change [ナンバー v] by (1)\n    create clone of (_myself_ v)\n    change x by (-20)\nend\n\nwhen I receive [スタート v]\nhide\nset [↓ v] to [12345]\nset [ナンバー v] to [0]\nset [クローン数 v] to [5]\nセット\nforever\n    wait until <(クローン数) < (length of (time))>\n    change [ナンバー v] by (1)\n    change [クローン数 v] by (1)\n    create clone of (_myself_ v)\n    change x by (-30)\nend\n\nwhen I receive [home v]\n\n