【拡散希望】UNDERTALE PLATFORMER

Instructions: モバイル対応！サンズ戦がありますからね！\n「これはプラットフォーマーなのか？」とか思っても言わないでくださいね^^\n作者のタイムは189秒です！\n【操作方法】\n矢印キーまたはタップで動く\nMobile friendly!\nPlease don't say "Is this a platformer?" ^^\n[How to operate]\nMove with arrow keys or tap\n\n拡散してくれた人↓（先着50人）\n@OR135　様\n@aiai929　様\n@yukkuri-marisa0630　様\n@fydfy 　様\n@yu_ga_0118_　様\n\n\n\n\n\n\n\n\n✳︎この作者プラットフォーマーの意味わかっているのか？\n✳︎Do you understand the meaning of this author platformer?

@Stage\n\n@スプライト5\n\nwhen I receive [英語 v]\nshow variable [時間／time v]\nforever\n    repeat until <(勝ち地) = [1]>\n        wait (1) seconds\n        change [時間／time v] by (1)\n        if <(HP) < [0]> then\n            forever\n                set [時間／time v] to [0]\n            end\n        end\n    end\nend\n\nwhen I receive [日本語 v]\nshow variable [時間／time v]\nforever\n    repeat until <(勝ち地) = [1]>\n        wait (1) seconds\n        change [時間／time v] by (1)\n        if <(HP) < [0]> then\n            forever\n                set [時間／time v] to [0]\n            end\n        end\n    end\nend\n\nwhen flag clicked\nset [時間／time v] to [0]\nhide variable [時間／time v]\nset [勝ち地 v] to [0]\n\n@player\n\nwait (2.4) seconds\n\nwhen flag clicked\nset [プレイス v] to [1]\n\nwhen flag clicked\nforever\n    if <(プレイス) = [10]> then\n        glide (1) secs to x: (5) y: (-72)\n        stop [this script v]\n    end\nend\n\nwhen flag clicked\nforever\n    if <touching (collar bone2 v)?> then\n        start sound [ダメージ v]\n        point in direction (90)\n        change [hp v] by (-1)\n    end\nend\n\nwhen I receive [suta-to  v]\nset volume to (100) %\n\nwhen I start as a clone\nrepeat (9)\n    change [ghost v] effect by (7)\n    change size by (-5.2)\nend\ndelete this clone\n\nwhen [z v] key pressed\n\nwhen flag clicked\nshow\nrepeat (20)\n    change [ghost v] effect by (-5)\nend\nset rotation style [left-right v]\npoint in direction (90)\nset [x v] to [0]\nset [y v] to [0]\nforever\n    if <touching (spike v)?> then\n        repeat (10)\n            change [ghost v] effect by (7)\n        end\n        clear graphic effects\n        go to x: (-210) y: (-30)\n    end\n    if <<<(x position) > (mouse x)> and <mouse down?>> or <key (left arrow v) pressed?>> then\n        create clone of (_myself_ v)\n        change [xのやつ v] by (-1)\n        point in direction (-90)\n    end\n    if <<<(mouse x) > (x position)> and <mouse down?>> or <key (right arrow v) pressed?>> then\n        create clone of (_myself_ v)\n        change [xのやつ v] by (1)\n    end\n    set [xのやつ v] to ((xのやつ) * (0.9))\n    change x by (xのやつ)\n    if <touching (rode- v)?> then\n        change y by (1)\n        if <touching (rode- v)?> then\n            change y by (1)\n            if <touching (rode- v)?> then\n                change y by (1)\n                if <touching (rode- v)?> then\n                    change y by (1)\n                    if <touching (rode- v)?> then\n                        change y by (1)\n                        if <touching (rode- v)?> then\n                            change x by ((xのやつ) * (-1))\n                            change y by (-5)\n                            if <<key (up arrow v) pressed?> or <<(mouse y) > (y position)> and <mouse down?>>> then\n                                start sound [ニュッ v]\n                                if <(xのやつ) > [0]> then\n                                    set [xのやつ v] to [-7]\n                                else\n                                    set [xのやつ v] to [7]\n                                end\n                                set [ｙだー v] to [15]\n                            else\n                                set [xのやつ v] to [0]\n                            end\n                        end\n                    end\n                end\n            end\n        end\n    end\n    change y by (-1)\n    if <touching (rode- v)?> then\n        if <<key (up arrow v) pressed?> or <<(mouse y) > (y position)> and <mouse down?>>> then\n            set [ｙだー v] to [16.3]\n            start sound [ニュッ v]\n        end\n    end\n    change y by (1)\n    change [ｙだー v] by (-1)\n    change y by (ｙだー)\n    if <touching (rode- v)?> then\n        change y by ((ｙだー) * (-1))\n        set [ｙだー v] to [0]\n    end\n    if <(x position) > [230]> then\n        broadcast (next v)\n        start sound [Rip v]\n        wait (0.5) seconds\n        go to x: (-210) y: (-30)\n        change [プレイス v] by (1)\n    end\nend\n\nwhen flag clicked\ngo to x: (-210) y: (-30)\n\nwhen flag clicked\nforever\n    if <touching (collar bone3 v)?> then\n        start sound [ダメージ v]\n        point in direction (90)\n        change [hp v] by (-1)\n    end\nend\n\nwhen flag clicked\nforever\n    if <touching (スプライト2 v)?> then\n        start sound [ダメージ v]\n        point in direction (90)\n        change [hp v] by (-1)\n    end\nend\n\nwhen flag clicked\nforever\n    if <touching (スプライト3 v)?> then\n        start sound [ダメージ v]\n        point in direction (90)\n        change [hp v] by (-1)\n    end\nend\n\nwhen flag clicked\nforever\n    if <touching (スプライト10 v)?> then\n        start sound [ダメージ v]\n        point in direction (90)\n        change [hp v] by (-1)\n    end\nend\n\nwhen flag clicked\nforever\n    if <touching (スプライト11 v)?> then\n        start sound [ダメージ v]\n        point in direction (90)\n        change [hp v] by (-1)\n    end\nend\n\nwhen flag clicked\nforever\n    if <touching (スプライト12 v)?> then\n        start sound [ダメージ v]\n        point in direction (90)\n        change [hp v] by (-1)\n    end\nend\n\nwhen flag clicked\nforever\n    if <touching (スプライト18 v)?> then\n        start sound [ダメージ v]\n        point in direction (90)\n        change [hp v] by (-0.1)\n    end\nend\n\nwhen flag clicked\nforever\n    if <touching (スプライト17 v)?> then\n        start sound [ダメージ v]\n        point in direction (90)\n        change [hp v] by (-0.1)\n    end\nend\n\n@いろいろ\n\nwhen flag clicked\ngo to x: (-35) y: (50)\n\nwhen flag clicked\nforever\n    if <(プレイス) = [10]> then\n        show\n    else\n        hide\n    end\nend\n\n@スプライト1\n\nwhen flag clicked\nswitch costume to (logo v)\nshow\ngo to [front v] layer\nset [ghost v] effect to (100)\n\nwhen flag clicked\ngo to x: (36) y: (28)\n\n@HP数字\n\nwhen flag clicked\nhide\n\nwhen I start as a clone\nforever\n    if <(HP) = (KR2)> then\n        set [brightness v] effect to (102)\n    else\n        set [brightness v] effect to (0)\n    end\nend\n\nwhen flag clicked\nforever\n    if <(HP) = (KR2)> then\n        set [brightness v] effect to (102)\n    else\n        set [brightness v] effect to (0)\n    end\nend\n\nbroadcast (これをつくったのは v)\nbroadcast (WASAI0123です v)\nbroadcast (もしクレジットせずに借りている人がいたら v)\nbroadcast (注意してください v)\n\ndefine クローン (x) (y)\ngo to x: ((x) - (66)) y: (y)\nset [tabunhpda v] to [2]\nrepeat (3)\n    create clone of (_myself_ v)\n    change x by (13)\n    change [tabunhpda v] by (-1)\nend\nswitch costume to (数字横 v)\ngo to x: (180) y: (50)\nif <(プレイス) = [10]> then\n    show\nend\n\nwhen I start as a clone\nforever\n    if <(length of (KR2)) > (tabunHPda)> then\n        switch costume to ((letter ((length of (KR2)) - (tabunHPda)) of (KR2)) + (1))\n        if <(プレイス) = [10]> then\n            show\n        end\n    else\n        hide\n    end\nend\n\nwhen flag clicked\nクローン [200] [50]\n\nwhen flag clicked\nforever\n    set [kr2 v] to ([floor v] of (KR) )\nend\n\nwhen flag clicked\nset [プレイス v] to [1]\n\n@HPバー\n\nwhen flag clicked\nforever\n    描画 [] X [50] Y\nend\n\nwhen flag clicked\nset [hp v] to [92]\nset [maxhp v] to [92]\n\nwhen flag clicked\nset [kr v] to (HP)\nforever\n    if <not <(KR) = (HP)>> then\n        if <(HP) < (KR)> then\n            change [kr v] by (((HP) - (KR)) / (50))\n        else\n            set [kr v] to (HP)\n        end\n    else\n        set [kr v] to (HP)\n    end\nend\n\ndefine 描画 (x) X (y) Y\nif <<(HP) < [0]> or <(HP) = [0]>> then\n    pen up\n    go to x: (x) y: ((y) - (10))\n    erase all\n    set pen color to (#b20000)\n    set pen size to (1)\n    go to x: (x) y: ((y) - (10))\n    pen down\n    repeat (MAXHP)\n        go to x: (x position) y: ((y) - (10))\n        go to x: (x position) y: ((y) + (10))\n        change x by (1)\n        go to x: (x position) y: ((y) - (10))\n    end\n    pen up\nelse\n    pen up\n    go to x: (x) y: ((y) - (10))\n    erase all\n    set pen color to (#b20000)\n    set pen size to (1)\n    go to x: (x) y: ((y) - (10))\n    pen down\n    repeat (MAXHP)\n        go to x: (x position) y: ((y) - (10))\n        go to x: (x position) y: ((y) + (10))\n        change x by (1)\n        go to x: (x position) y: ((y) - (10))\n    end\n    pen up\n    if <(HP) = [0]> then\n        if <(HP) = (KR2)> then\n            set pen color to (#b20000)\n        else\n            set pen color to (#b20000)\n        end\n    else\n        set pen color to (#ff00f6)\n    end\n    set pen size to (1)\n    go to x: (x) y: ((y) - (10))\n    pen down\n    repeat (KR)\n        go to x: (x position) y: ((y) - (10))\n        go to x: (x position) y: ((y) - (-10))\n        change x by (1)\n        go to x: (x position) y: ((y) - (10))\n    end\n    pen up\n    if <(HP) = [0]> then\n        if <(HP) = (KR)> then\n            set pen color to (#b20000)\n        else\n            set pen color to (#ff00f6)\n        end\n    else\n        set pen color to (#f6ff00)\n    end\n    set pen size to (1)\n    go to x: (x) y: ((y) - (10))\n    pen down\n    repeat (HP)\n        go to x: (x position) y: ((y) - (10))\n        go to x: (x position) y: ((y) - (-10))\n        change x by (1)\n        go to x: (x position) y: ((y) - (10))\n    end\nend\n\nwhen flag clicked\nforever\n    if <(プレイス) = [10]> then\nend\n\n@spike\n\nwhen flag clicked\nhide\nset [プレイス v] to [1]\ngo to x: (228) y: (-76)\nwait (1) seconds\nswitch costume to (costume3 v)\ncreate clone of (_myself_ v)\n\nwhen I start as a clone\nshow\nforever\n    move (-10) steps\n    if <(x position) = [-240]> then\n        broadcast (次 v)\n        delete this clone\n    end\n    if <(x position) = [-367]> then\n        broadcast (次 v)\n        delete this clone\n    end\n    if <(x position) = [-335]> then\n        broadcast (次 v)\n        delete this clone\n    end\n    if <(x position) = [-665]> then\n        broadcast (次 v)\n        delete this clone\n    end\nend\n\nwhen I receive [次 v]\nif <(プレイス) = [1]> then\n    create clone of (_myself_ v)\nend\nif <(プレイス) = [2]> then\n    switch costume to (costume2 v)\n    create clone of (_myself_ v)\nend\nif <(プレイス) = [3]> then\n    switch costume to (costume4 v)\n    create clone of (_myself_ v)\nend\nif <(プレイス) = [4]> then\n    switch costume to (costume5 v)\n    create clone of (_myself_ v)\nend\nif <(プレイス) = [5]> then\n    switch costume to (costume6 v)\n    create clone of (_myself_ v)\nend\nif <(プレイス) = [6]> then\n    switch costume to (costume8 v)\n    create clone of (_myself_ v)\nend\nif <(プレイス) = [7]> then\n    switch costume to (costume9 v)\n    create clone of (_myself_ v)\nend\nif <(プレイス) = [8]> then\n    switch costume to (costume9 v)\n    create clone of (_myself_ v)\nend\nif <(プレイス) = [9]> then\n    switch costume to (pick random (1) to (8))\n    create clone of (_myself_ v)\nend\nif <(プレイス) = [10]> then\n    hide\nend\n\nwhen I start as a clone\nforever\n    if <<(プレイス) = [7]> or <(プレイス) = [8]>> then\n        repeat (10)\n            change y by (10)\n        end\n        repeat (10)\n            change y by (-10)\n        end\n    end\nend\n\nwhen I start as a clone\nforever\n    if <(プレイス) = [10]> then\n        hide\n        delete this clone\n    end\nend\n\n@rode-\n\nwhen flag clicked\nswitch costume to (コスチューム1 v)\nforever\n    if <(プレイス) = [3]> then\n        switch costume to (コスチューム2 v)\n    end\n    if <(プレイス) = [8]> then\n        switch costume to (コスチューム1 v)\n    end\n    if <(プレイス) = [9]> then\n        switch costume to (コスチューム2 v)\n    end\n    if <(プレイス) = [10]> then\n        switch costume to (コスチューム3 v)\n    end\nend\n\nwhen flag clicked\ngo to x: (34) y: (30)\ngo to [back v] layer\n\nwhen I receive [アンダイン戦 v]\nswitch costume to (コスチューム4 v)\n\n@SANS\n\nwhen flag clicked\nset [ghost v] effect to (100)\nhide\nforever\n    wait (0.04) seconds\n    next costume\nend\n\nwhen flag clicked\nforever\n    go to x: (-125) y: (102)\n    if <(プレイス) = [10]> then\n        show\n        repeat (20)\n            change [ghost v] effect by (-5)\n        end\n        if <(言語種類) = [日本語]> then\n            say [よくここまできたな] for (3) seconds\n            say [今からが本番だけどな] for (3) seconds\n            say [え？] for (2) seconds\n            say [これは本当にプラットフォーマーかって？] for (3) seconds\n            think [痛いところついてくるな] for (3) seconds\n            say [タイトルにもある通りこれは正真正銘（多分）プラットフォーマーだ] for (5) seconds\n            say [そんなことはどうでもいい......] for (3) seconds\n            say [決着をつけるぞ！] for (3) seconds\n            broadcast (最終勝負 v)\n            stop [this script v]\n        end\n        if <(言語種類) = [英語]> then\n            say [You've come this far] for (3) seconds\n            say [The real thing starts now though.] for (3) seconds\n            say [what?] for (2) seconds\n            say [Is this really a platformer?] for (3) seconds\n            think [I hope you don't say that] for (3) seconds\n            say [As the title says, this is a genuine \(probably\) platformer.] for (5) seconds\n            say [It doesn't matter....] for (3) seconds\n            say [Let's settle it!] for (3) seconds\n            broadcast (最終勝負 v)\n            stop [this script v]\n        end\n    end\nend\n\nwhen I receive [しぶといな v]\nif <(言語種類) = [日本語]> then\n    say [はぁ　はぁ] for (2) seconds\n    say [しぶといな..........。] for (2) seconds\n    say [疲れたからそろそろ] for (3) seconds\n    say [次の人にバトンタッチだな...........。] for (4) seconds\nend\nif <(言語種類) = [英語]> then\n    say [he he he] for (2) seconds\n    say [Stubborn..........] for (2) seconds\n    say [I'm tired so it's about time] for (3) seconds\n    say [It's a baton touch] for (4) seconds\nend\nstart sound [healsound v]\nset [hp v] to [100]\nrepeat (20)\n    change [ghost v] effect by (5)\nend\nbroadcast (アズゴア v)\n\nwhen flag clicked\nset volume to (100) %\nforever\n    play sound [メガロバニア　サンズ3 v] until done\nend\n\nwhen I receive [しぶといな v]\nrepeat (10)\n    change volume by (-10)\nend\n\nwhen flag clicked\nforever\n    if <(HP) < [0]> then\n        forever\n            set volume to (0) %\n        end\n    end\nend\n\n@collar bone2\n\nwhen flag clicked\nhide\ngo to x: (-186) y: (-158)\npoint in direction (90)\nforever\n    next costume\n    wait (1) seconds\nend\n\ndefine bone sx sy di (sx) (sy) (di) speed x y (x) (y) size (s) costume (c)\n\nwhen I receive [最終勝負 v]\nset [攻撃1 v] to [1]\nrepeat (10)\n    create clone of (_myself_ v)\n    wait (1) seconds\nend\nset [攻撃1 v] to [2]\nwait (3) seconds\nrepeat (5)\n    wait (1) seconds\n    repeat (10)\n        create clone of (_myself_ v)\n    end\n    wait (3) seconds\nend\nset [攻撃1 v] to [3]\nwait (1) seconds\nrepeat (3)\n    repeat (10)\n        create clone of (_myself_ v)\n    end\n    wait (3) seconds\nend\ngo to x: (-186) y: (-158)\nset [攻撃1 v] to [4]\nwait (1) seconds\nrepeat (5)\n    create clone of (_myself_ v)\n    change y by (30)\nend\nwait (3) seconds\ngo to x: (-186) y: (-158)\nbroadcast (全体 v)\n\nwhen I start as a clone\nshow\nif <(攻撃1) = [1]> then\n    repeat (50)\n        move (8) steps\n    end\n    delete this clone\nend\nif <(攻撃1) = [2]> then\n    change y by (10)\n    repeat (50)\n        turn right (-15) degrees\n        change x by (8)\n    end\n    delete this clone\nend\nif <(攻撃1) = [3]> then\n    change y by (50)\n    repeat (20)\n        change x by (15)\n        repeat (4)\n            change y by (-10)\n        end\n        repeat (4)\n            change y by (10)\n        end\n    end\n    delete this clone\nend\nif <(攻撃1) = [4]> then\n    point in direction (180)\n    repeat (20)\n        change x by (10)\n    end\n    repeat (20)\n        change x by (-10)\n    end\n    delete this clone\nend\nif <(攻撃1) = [5]> then\n    repeat (50)\n        point towards (player v)\n    end\n    repeat (50)\n        move (25) steps\n    end\n    delete this clone\nend\n\nwhen flag clicked\nforever\n    if <(HP) < [1]> then\n        broadcast (ゲームオーバー v)\n    end\nend\n\nwhen I receive [全体 v]\nset [攻撃1 v] to [5]\nrepeat (10)\n    wait (1) seconds\n    go to x: (-186) y: (150)\n    create clone of (_myself_ v)\nend\nbroadcast (しぶといな v)\n\n@collar bone3\n\nwhen flag clicked\nhide\ngo to x: (197) y: (-158)\npoint in direction (90)\nforever\n    next costume\n    wait (1) seconds\nend\n\ndefine bone sx sy di (sx) (sy) (di) speed x y (x) (y) size (s) costume (c)\n\nwhen I receive [最終勝負 v]\nset [攻撃1 v] to [1]\nrepeat (10)\n    create clone of (_myself_ v)\n    wait (1) seconds\nend\nset [攻撃1 v] to [2]\nrepeat (5)\n    wait (1) seconds\n    repeat (10)\n        create clone of (_myself_ v)\n    end\n    wait (3) seconds\nend\nset [攻撃1 v] to [3]\nwait (5) seconds\nrepeat (3)\n    repeat (10)\n        create clone of (_myself_ v)\n    end\n    wait (3) seconds\nend\nset [攻撃1 v] to [4]\nwait (5) seconds\nrepeat (5)\n    create clone of (_myself_ v)\n    change y by (30)\nend\ngo to x: (197) y: (-158)\n\nwhen I start as a clone\npoint in direction (90)\nshow\nif <(攻撃1) = [1]> then\n    repeat (50)\n        move (-8) steps\n    end\n    delete this clone\nend\nif <(攻撃1) = [2]> then\n    change y by (10)\n    repeat (50)\n        turn right (15) degrees\n        change x by (-8)\n    end\n    delete this clone\nend\nif <(攻撃1) = [3]> then\n    change y by (50)\n    repeat (20)\n        change x by (-15)\n        repeat (4)\n            change y by (-10)\n        end\n        repeat (4)\n            change y by (10)\n        end\n    end\n    delete this clone\nend\nif <(攻撃1) = [4]> then\n    point in direction (180)\n    repeat (20)\n        change x by (-10)\n    end\n    repeat (20)\n        change x by (10)\n    end\n    delete this clone\nend\nif <(攻撃1) = [5]> then\n    repeat (50)\n        point towards (player v)\n    end\n    repeat (50)\n        move (25) steps\n    end\n    delete this clone\nend\n\nwhen flag clicked\nforever\n    if <touching (player v)?> then\n        change [hp v] by (-1)\n    end\nend\n\nwhen I receive [全体 v]\nset [攻撃1 v] to [5]\nrepeat (10)\n    wait (1) seconds\n    go to x: (197) y: (150)\n    create clone of (_myself_ v)\nend\n\n@スプライト2\n\nwhen flag clicked\nforever\n    if <(プレイス) = [10]> then\n        show\n    else\n        hide\n    end\nend\n\n@スプライト3\n\nwhen flag clicked\nforever\n    if <(プレイス) = [10]> then\n        show\n    else\n        hide\n    end\nend\n\n@スプライト4\n\nwhen flag clicked\nset size to (0) %\nhide\nset [変数数 v] to [0]\n\nwhen flag clicked\nforever\n    if <(HP) < [0]> then\n        stop all sounds\n        set volume to (100) %\n        go to [front v] layer\n        show\n        set size to (変数数) %\n        repeat (15)\n            change size by (変数数)\n            change [変数数 v] by (1)\n        end\n        play sound [UnderTale Demo  Game Over Theme.mp3 v] until done\n        set [時間／time v] to [0]\n        stop [all v]\n    end\nend\n\n@アズゴア2\n\nwhen flag clicked\ngo to x: (-125) y: (108)\nset size to (180) %\nset [ghost v] effect to (100)\n\nwhen I receive [しぶといな v]\nset volume to (100) %\nstart sound [ベルゲントラックン　アズゴア v]\n\nwhen I receive [アズゴア v]\nshow\nrepeat (20)\n    change [ghost v] effect by (-5)\nend\nif <(言語種類) = [日本語]> then\n    say [次は私の番だ] for (3) seconds\n    think [本当は戦いたくないが仕方ない...........。] for (4) seconds\nend\nif <(言語種類) = [英語]> then\n    say [it's my turn next] for (3) seconds\n    think [I don't really want to fight, but I have no choice....] for (4) seconds\nend\nrepeat (20)\n    change [ghost v] effect by (5)\nend\nbroadcast (アズゴアチャンジ v)\n\nrepeat (20)\n    change [ghost v] effect by (5)\nend\n\n@アズゴア\n\nwhen flag clicked\ngo to x: (-91) y: (95)\nhide\nset size to (180) %\nset [ghost v] effect to (100)\n\nset size to (110) %\n\nwhen I receive [アズゴアチャンジ v]\nset volume to (100) %\nshow\nrepeat (20)\n    change [ghost v] effect by (-5)\nend\nif <(言語種類) = [日本語]> then\n    say [では戦おうか] for (3) seconds\nend\nif <(言語種類) = [英語]> then\n    say [Shall we fight ！] for (3) seconds\nend\nbroadcast (アズゴア戦開始 v)\n\nwhen I receive [アズゴアチャンジ v]\nshow\nforever\n    play sound [アズゴア v] until done\nend\n\nwhen I receive [さすがだな v]\nset volume to (0) %\nif <(言語種類) = [日本語]> then\n    say [つ、強い...................] for (2) seconds\n    say [流石だな] for (2) seconds\n    say [次の人に変わるしかなさそうだ] for (4) seconds\nend\nif <(言語種類) = [英語]> then\n    say [Strong......] for (2) seconds\n    say [As expected] for (2) seconds\n    say [Looks like I'll have no choice but to change to the next person.] for (4) seconds\nend\nrepeat (20)\n    change [ghost v] effect by (5)\nend\nbroadcast (アンダイン戦 v)\n\nwhen flag clicked\nforever\n    if <(HP) < [0]> then\n        forever\n            set volume to (0) %\n        end\n    end\nend\n\n@スプライト6\n\nwhen flag clicked\nshow\n\nwhen I receive [英語 v]\nhide\n\nwhen I receive [日本語 v]\nhide\n\n@スプライト7\n\nwhen flag clicked\nshow\n\nwhen this sprite clicked\nplay sound [change　ぴ v] until done\nbroadcast (日本語 v)\nhide\nforever\n    set volume to (0) %\nend\n\nwhen I receive [英語 v]\nhide\n\nwhen flag clicked\nforever\n    if <touching (mouse-pointer v)?> then\n        switch costume to (コスチューム2 v)\n        set size to (110) %\n        play sound [erabu v] until done\n        set volume to (0) %\n    else\n        switch costume to (コスチューム1 v)\n        set size to (100) %\n        set volume to (100) %\n    end\nend\n\n@スプライト8\n\nwhen flag clicked\nshow\n\nwhen I receive [日本語 v]\nhide\n\nwhen this sprite clicked\nbroadcast (英語 v)\nhide\nplay sound [change　ぴ v] until done\nforever\n    set volume to (0) %\nend\n\nwhen flag clicked\nforever\n    if <touching (mouse-pointer v)?> then\n        switch costume to (コスチューム2 v)\n        set size to (110) %\n        play sound [erabu v] until done\n        set volume to (0) %\n    else\n        switch costume to (コスチューム1 v)\n        set size to (100) %\n        set volume to (100) %\n    end\nend\n\n@スプライト9\n\nwhen flag clicked\nshow\n\nwhen I receive [日本語 v]\nhide\nset [言語種類 v] to [日本語]\n\nwhen I receive [英語 v]\nhide\nset [言語種類 v] to [英語]\n\n@スプライト10\n\nwhen flag clicked\nhide\ngo to x: (-155) y: (20)\nforever\n    repeat (35)\n        move (10) steps\n    end\n    repeat (35)\n        move (-10) steps\n    end\nend\n\nwhen I receive [アズゴア戦開始 v]\nrepeat (30)\n    wait (pick random (0.5) to (0.8)) seconds\n    create clone of (_myself_ v)\nend\nbroadcast (攻撃2アズゴア v)\n\nwhen I start as a clone\nshow\nrepeat (30)\n    change y by (-10)\nend\ndelete this clone\n\nwhen I receive [ラストカズゴア前 v]\nrepeat (30)\n    wait (pick random (0.5) to (0.8)) seconds\n    create clone of (_myself_ v)\nend\n\n@スプライト11\n\nwhen flag clicked\nhide\ngo to x: (-188) y: (15)\nforever\n    repeat (15)\n        change y by (-10)\n    end\n    repeat (15)\n        change y by (10)\n    end\nend\n\nwhen I receive [攻撃2アズゴア v]\nrepeat (30)\n    create clone of (_myself_ v)\n    wait (0.2) seconds\nend\nbroadcast (ラストカズゴア前 v)\n\nwhen I start as a clone\nshow\nrepeat (35)\n    move (10) steps\nend\ndelete this clone\n\nwhen I receive [ラストカズゴア前 v]\nrepeat (30)\n    create clone of (_myself_ v)\n    wait (0.2) seconds\nend\nwait (1) seconds\nbroadcast (最終奥義アズゴア v)\n\n@スプライト12\n\nwhen flag clicked\nhide\ngo to x: (1) y: (140)\npoint in direction (-150)\nforever\n    repeat (15)\n        turn left (5) degrees\n    end\n    point in direction (-150)\nend\n\nwhen I start as a clone\nshow\nrepeat (30)\n    move (10) steps\nend\ndelete this clone\n\nwhen I receive [最終奥義アズゴア v]\nrepeat (2)\n    repeat (10)\n        create clone of (_myself_ v)\n        wait (0.2) seconds\n    end\nend\nrepeat (10)\n    repeat (10)\n        create clone of (_myself_ v)\n        wait (0.01) seconds\n    end\nend\nbroadcast (さすがだな v)\n\n@不死身のアンダイン\n\nwhen flag clicked\nhide\nset size to (70) %\nset [ghost v] effect to (100)\nswitch costume to (undyne_\(genocide_armor\)\[1\]-0 v)\nforever\n    next costume\n    wait (0.000004) seconds\nend\n\nwhen I receive [さすがだな v]\nset volume to (100) %\nforever\n    play sound [mus_x_undyne v] until done\nend\n\nwhen I receive [アンダイン戦 v]\n\nshow\nrepeat (20)\n    change [ghost v] effect by (-5)\nend\nsay [アズゴアとサンズを疲れさせた人間は貴様か] for (5) seconds\nsay [手加減はしない] for (3) seconds\nsay [戦おうじゃないか‼︎] for (3) seconds\nbroadcast (アンダイン戦開始 v)\n\nwhen flag clicked\nforever\n    if <(HP) < [0]> then\n        forever\n            set volume to (0) %\n        end\n    end\nend\n\n@攻撃エフェクト\n\nwhen I receive [アタック v]\ncreate clone of (_myself_ v)\n\nwhen flag clicked\nhide\n\nwhen I start as a clone\ngo to [front v] layer\nshow\nswitch costume to (1 v)\nstart sound [00002a1d v]\nrepeat (5)\n    next costume\n    wait (0.1) seconds\nend\nhide\nbroadcast (次の攻撃 v)\n\nwhen I receive [gamemovera v]\nstop [other scripts in sprite v]\n\n@スプライト13\n\nwhen flag clicked\nhide\n\nwhen I receive [アンダイン戦 v]\nshow\nset [勝ち地 v] to [1]\n\n@スプライト14\n\nwhen flag clicked\nhide\n\nwhen I receive [日本語 v]\nshow\nswitch costume to (コスチューム1 v)\n\nwhen I receive [英語 v]\nshow\nswitch costume to (コスチューム2 v)\n\nwhen flag clicked\nforever\n    if <[1] < (プレイス)> then\n        hide\n    end\nend\n\n@スプライト15\n\nwhen flag clicked\nset [ghost v] effect to (40)\nset [ghost v] effect to (100)\n\n@スプライト16\n\nwhen flag clicked\nset [ghost v] effect to (10)\nset [ghost v] effect to (100)\n\n@スプライト17\n\nwhen flag clicked\nhide\nset [ghost v] effect to (100)\n\nwhen I start as a clone\nshow\ngo to (player v)\nrepeat (5)\n    change [ghost v] effect by (-20)\nend\nrepeat (10)\n    change y by (10)\nend\ndelete this clone\n\nwhen I receive [アンダイン戦開始 v]\nrepeat (10)\n    create clone of (_myself_ v)\n    wait (1.5) seconds\nend\nwait (1) seconds\nbroadcast (アンダイン攻撃2 v)\n\n@スプライト18\n\nwhen flag clicked\nhide\nset [ghost v] effect to (100)\n\nwhen I start as a clone\nshow\ngo to (random position v)\npoint towards (player v)\nrepeat (5)\n    change [ghost v] effect by (-20)\nend\nrepeat (10)\n    turn left (36) degrees\nend\nglide (1) secs to (player v)\nrepeat (10)\n    move (10) steps\nend\ndelete this clone\n\nwhen I receive [アンダイン攻撃2 v]\nrepeat (5)\n    repeat (5)\n        create clone of (_myself_ v)\n    end\n    wait (1.5) seconds\nend\nwait (1) seconds\nbroadcast (アンダイン攻撃3 v)\n\n@スプライト19\n\nwhen flag clicked\ngo to x: (-96) y: (69)\nhide\nset [ghost v] effect to (100)\n\nwhen I receive [アンダイン攻撃3 v]\nrepeat (19)\n    move (10) steps\n    create clone of (_myself_ v)\nend\nmove (20) steps\n\nwhen I start as a clone\nwait (0.2) seconds\nshow\nrepeat (5)\n    change [ghost v] effect by (-20)\nend\nrepeat (30)\n    change y by (-10)\nend\ndelete this clone\n\n