Yoshi Platformer 2!!【Yoshi island】〈モバイル対応〉

Instructions: 日本語：\n　　　　　　　   ～操作方法～\n右矢印: 右へ進む\n左矢印: 左へ進む\n上矢印: ジャンプ\n\n〈モバイルの方〉\nタップで操作。\n\n-------------------------------------------------------------------------\nEnglish:\n　　　　　　　   ~Operations~.\nRight arrow: go right\nLeft arrow: go left\nUp arrow: Jump\n\nFor mobile users\nTap to control.

@Stage\n\nwhen I receive [honntouno end v]\nswitch backdrop to (平原 v)\nforever\n    if <(ステージ) = [1]> then\n        switch backdrop to (城 v)\n    end\n    if <(ステージ) = [12]> then\n        switch backdrop to (曇 v)\n    end\nend\n\n@ヨッシー！\n\ndefine 初期\ngo to [front v] layer\nshow\npoint in direction (90)\nset size to (150) %\nset [x v] to [0]\nset [y v] to [0]\nset [yoshi animations v] to [1]\n\nwhen I receive [death v]\nrepeat (10)\n    change y by (25)\n    change [ghost v] effect by (10)\nend\nclear graphic effects\n初期\n\nwhen I receive [honntouno end v]\n初期\nset rotation style [left-right v]\nforever\n    go to (hitbox v)\n    if <<key (right arrow v) pressed?> or <<mouse down?> and <(x position) < (mouse x)>>> then\n        point in direction (90)\n    end\n    if <<key (left arrow v) pressed?> or <<mouse down?> and <(mouse x) < (x position)>>> then\n        point in direction (-90)\n    end\nend\n\nwhen flag clicked\npoint in direction (90)\ngo to x: (-260) y: (-92)\ngo to [front v] layer\nshow\nchange [x v] by (9)\nrepeat (20)\n    change x by (x)\n    set [x v] to ((x) * (0.9))\nend\n\nwhen flag clicked\nrepeat (6)\n    switch costume to (走る1 v)\n    wait () seconds\n    switch costume to (走る2 v)\n    broadcast (暇 v)\nend\nswitch costume to (止まる v)\n\nwhen I receive [honntouno end v]\nforever\n    if <not <(y) > [0]>> then\n        if <not <touching (床 v)?>> then\n            switch costume to (ヒュー... \(落下\) v)\n        end\n        if <<key (right arrow v) pressed?> or <<<mouse down?> and <(x position) < (mouse x)>> or <<key (left arrow v) pressed?> or <<mouse down?> and <(mouse x) < (x position)>>>>> then\n            switch costume to (走る1 v)\n            wait (0) seconds\n            switch costume to (走る2 v)\n            broadcast (暇 v)\n        end\n    else\n        switch costume to (ジャンプ！ v)\n        broadcast (暇 v)\n    end\nend\n\nwhen I receive [暇 v]\nwait () seconds\nset [yoshi animations v] to (pick random (1) to (2))\nwait () seconds\nforever\n    if <(yoshi animations) = [1]> then\n        switch costume to (止まる v)\n        wait (0.09) seconds\n        switch costume to (暇 v)\n        wait (0.09) seconds\n        switch costume to (暇2 v)\n        wait (0.09) seconds\n        switch costume to (暇3 v)\n        wait (0.09) seconds\n        switch costume to (暇4 v)\n        wait (0.09) seconds\n        switch costume to (暇5 v)\n        wait (0.09) seconds\n        switch costume to (暇6 v)\n        wait (0.09) seconds\n        switch costume to (暇7 v)\n        broadcast (暇 v)\n    end\n    if <(yoshi animations) = [2]> then\n        switch costume to (暇 \(カリカリ\) v)\n        repeat (3)\n            switch costume to (暇 \(カリカリ\)2 v)\n            wait (0.1) seconds\n            switch costume to (暇 \(カリカリ\)3 v)\n            wait (0.1) seconds\n        end\n        switch costume to (暇 \(カリカリ\)4 v)\n        wait (0.1) seconds\n        switch costume to (止まる v)\n        broadcast (暇 v)\n    end\nend\n\n@hitbox\n\ndefine 初期\ngo to [back v] layer\nshow\npoint in direction (90)\nset [ghost v] effect to (100)\nset size to (75) %\nset [x v] to [0]\nset [y v] to [0]\nif <(ステージ) = [0]> then\n    go to x: (-165) y: (-92)\nelse\n    go to x: (-200) y: (-40)\nend\n\nwhen I receive [honntouno end v]\n初期\nset rotation style [left-right v]\nforever\n    if <<key (right arrow v) pressed?> or <<mouse down?> and <(x position) < (mouse x)>>> then\n        point in direction (90)\n        change [x v] by (1)\n    end\n    if <<key (left arrow v) pressed?> or <<mouse down?> and <(mouse x) < (x position)>>> then\n        point in direction (-90)\n        change [x v] by (-1)\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)?> or <touching (シーソー2 v)?>>>> then\n        change y by (1)\n        if <<touching (床 v)?> or <<touching (シーソー v)?> or <<touching (バネ v)?> or <touching (シーソー2 v)?>>>> then\n            change y by (1)\n            if <<touching (床 v)?> or <<touching (シーソー v)?> or <<touching (バネ v)?> or <touching (シーソー2 v)?>>>> then\n                change y by (1)\n                if <<touching (床 v)?> or <<touching (シーソー v)?> or <<touching (バネ v)?> or <touching (シーソー2 v)?>>>> then\n                    change y by (1)\n                    if <<touching (床 v)?> or <<touching (シーソー v)?> or <<touching (バネ v)?> or <touching (シーソー2 v)?>>>> then\n                        change y by (1)\n                    end\n                    if <<touching (床 v)?> or <<touching (バネ v)?> or <<touching (シーソー v)?> or <touching (シーソー2 v)?>>>> then\n                        set [地面 v] to [0]\n                        change x by ((x) * (-1))\n                        change y by (-5)\n                        if <<key (up arrow v) pressed?> or <<mouse down?> and <(y position) < (mouse y)>>> then\n                            if <(x) < [0]> then\n                                set [x v] to [10]\n                                start sound [ジャンプ！ v]\n                            else\n                                set [x v] to [-10]\n                            end\n                            start sound [ジャンプ！ v]\n                            set [y v] to [15]\n                        else\n                            set [x v] to [0]\n                        end\n                    end\n                end\n            end\n        end\n    end\n    change y by (-1)\n    if <<key (up arrow v) pressed?> or <<mouse down?> and <(y position) < (mouse y)>>> then\n        if <<touching (床 v)?> or > then\n            start sound [ジャンプ！ v]\n            set [y v] to [14]\n        end\n    end\n    change y by (1)\n    change [y v] by (-1)\n    change y by (y)\n    if <<touching (床 v)?> or <<touching (シーソー v)?> or <<touching (バネ v)?> or <touching (シーソー2 v)?>>>> then\n        change y by ((y) * (-1))\n        set [y v] to [0]\n    end\n    if <[239] < (x position)> then\n        初期\n        broadcast (next v)\n        change [ステージ v] by (1)\n    end\n    if <<(y position) < [-182]> or <<touching (ダメージの当たり判定 v)?> or <<touching (回る棘 v)?> or <<touching (カチカチくん v)?> or <<touching (ミット君 v)?> or <<touching (🌵 v)?> or <touching (卵 v)?>>>>>>> then\n        broadcast (death v)\n        start sound [痛い！ v]\n        repeat (10)\n            change [ghost v] effect by (10)\n            change y by (25)\n        end\n        clear graphic effects\n        初期\n    end\nend\n\nwhen I receive [chomp wanwan! v]\nforever\n    if <<touching (ワンワン v)?> and <([size v] of [ワンワン v]) > [84]>> then\n        broadcast (death v)\n        start sound [痛い！ v]\n        repeat (10)\n            change [ghost v] effect by (10)\n            change y by (25)\n        end\n        clear graphic effects\n        初期\n    end\nend\n\nwhen flag clicked\nset [x v] to [8]\n\n@床\n\nwhen I receive [next v]\nnext costume\n\nwhen I receive [honntouno end v]\nshow variable [☁ 赤コイン v]\nshow variable [コイン v]\nshow\nswitch costume to (level1 v)\ngo to x: (0) y: (-20)\n\nwhen flag clicked\nset [ステージ v] to [0]\nhide variable [コイン v]\nhide variable [☁ 赤コイン v]\nhide\n\ngo to [front v] layer\n\n@music\n\nwhen flag clicked\ngo to x: (0) y: (0)\nset [ghost v] effect to (100)\nforever\n    go to [front v] layer\nend\n\nwhen I receive [honntouno end v]\nset volume to (100) %\nwait (0.1) seconds\nplay sound [アスレチック v] until done\nforever\n    if <(ステージ) = [0]> then\n        play sound [アスレチック2 v] until done\n    end\nend\n\nwhen I receive [honntouno end v]\nforever\n    if <(ステージ) = [1]> then\n        set volume to (0) %\n    end\nend\n\n@回る棘\n\nwhen I receive [honntouno end v]\nforever\n    if <<(ステージ) = [2]> or <(ステージ) = [4]>> then\n        turn left (0.8) degrees\n        show\n        go to [front v] layer\n    else\n        hide\n        point in direction (-150)\n    end\nend\n\nwhen I receive [honntouno end v]\nforever\n    if <<(ステージ) = [2]> or <(ステージ) = [4]>> then\n        play sound [maceOnAStick v] until done\n        set volume to (100) %\n    else\n        set volume to (0) %\n    end\nend\n\nwhen flag clicked\nset size to (100) %\nset size to (80) %\ngo to [front v] layer\nhide\n\nwhen I receive [honntouno end v]\nforever\n    if <(ステージ) = [2]> then\n        go to x: (-5) y: (85)\n    end\n    if <(ステージ) = [4]> then\n        go to x: (102) y: (-85)\n    end\nend\n\n@敵の壁当たり判定\n\nwhen I receive [next v]\nset [ghost v] effect to (100)\nnext costume\nif <(ステージ) = [12]> then\n    clear graphic effects\n    switch costume to (ゴール v)\nend\n\nwhen I receive [honntouno end v]\nclear graphic effects\nswitch costume to (level wall1 v)\nshow\ngo to x: (0) y: (-20)\n\nwhen flag clicked\nhide\n\n@music (castle)\n\nwhen I receive [honntouno end v]\nstop all sounds\n\nwhen I receive [next v]\nset volume to (100) %\nif <(ステージ) = [1]> then\n    broadcast (music next v)\n    wait (0.1) seconds\n    play sound [2 v] until done\nend\n\nwhen I receive [music next v]\nwait (18.5) seconds\nforever\n    if <not <(ステージ) = [12]>> then\n        play sound [10 v] until done\n    else\n        set volume to (0) %\n    end\nend\n\n@ワンワン\n\nwhen I receive [chomp wanwan! v]\nwait (0.5) seconds\nforever\n    next costume\n    wait () seconds\nend\n\nwhen I receive [chomp wanwan! v]\nshow\nwait (0.5) seconds\nglide (0.7) secs to x: (14) y: (220)\nforever\n    change y by (-20)\n    if <[-200] > (y position)> then\n        hide\n    end\nend\n\nwhen I receive [chomp wanwan! v]\nwait (0.5) seconds\nrepeat (17)\n    change size by (4)\nend\n\nwhen I receive [honntouno end v]\nswitch costume to (ぐ v)\nset size to (17) %\ngo to x: (175) y: (-30)\nhide\n\nwhen I receive [next v]\nif <(ステージ) = [0]> then\n    show\nelse\n    hide\nend\n\nwhen I receive [chomp wanwan! v]\nwait (1.1) seconds\nstart sound [ほーわーんぅ... v]\n\nwhen flag clicked\nhide\n\n@カチカチくん\n\nwhen flag clicked\nhide\n\nwhen I receive [next v]\nset rotation style [left-right v]\npoint in direction (90)\nswitch costume to (カチカチくん v)\nforever\n    if <<(ステージ) = [3]> or <<(ステージ) = [6]> or <(ステージ) = [7]>>> then\n        if <<touching (_edge_ v)?> or <touching (敵の壁当たり判定 v)?>> then\n            if <(direction) = [90]> then\n                change x by (7)\n                point in direction (-90)\n            else\n                change x by (-7)\n                point in direction (90)\n            end\n        else\n            if <(direction) = [90]> then\n                change x by (-2)\n            else\n                change x by (2)\n            end\n        end\n    end\nend\n\nwhen flag clicked\nforever\n    if <<(ステージ) = [3]> or <<(ステージ) = [6]> or <(ステージ) = [7]>>> then\n        show\n    else\n        hide\n    end\nend\n\nwhen I receive [next v]\nwait () seconds\nif <(ステージ) = [3]> then\n    go to x: (0) y: (-110)\n    create clone of (_myself_ v)\nelse\n    delete this clone\nend\nif <(ステージ) = [6]> then\n    go to x: (0) y: (-85)\n    create clone of (_myself_ v)\nelse\n    delete this clone\nend\nif <(ステージ) = [7]> then\n    go to x: (105) y: (86)\nend\n\nwhen I start as a clone\nset rotation style [left-right v]\npoint in direction (90)\nswitch costume to (カチカチくん v)\nforever\n    if <<(ステージ) = [3]> or <<(ステージ) = [6]> or <(ステージ) = [7]>>> then\n        if <<touching (_edge_ v)?> or <touching (敵の壁当たり判定 v)?>> then\n            if <(direction) = [90]> then\n                change x by (7)\n                point in direction (-90)\n            else\n                change x by (-7)\n                point in direction (90)\n            end\n        else\n            if <(direction) = [90]> then\n                change x by (-2)\n            else\n                change x by (2)\n            end\n        end\n    end\nend\n\nwhen I start as a clone\nif <(ステージ) = [3]> then\n    go to x: (30) y: (-110)\nend\nif <(ステージ) = [6]> then\n    go to x: (30) y: (-85)\nend\n\nwhen I receive [honntouno end v]\nset [katikati y v] to [0]\nforever\n    if <<(ステージ) = [3]> or <<(ステージ) = [6]> or <(ステージ) = [7]>>> then\n        if <touching (床 v)?> then\n            change y by (1)\n        end\n        change y by (-1)\n        change y by (1)\n        change [katikati y v] by (-1)\n        change y by (katikati y)\n        if <touching (床 v)?> then\n            change y by ((katikati y) * (-1))\n            set [katikati y v] to [0]\n        end\n    end\nend\n\nwhen I receive [honntouno end v]\nforever\n    if <<(ステージ) = [3]> or <<(ステージ) = [6]> or <(ステージ) = [7]>>> then\n        next costume\n    end\nend\n\nwhen I start as a clone\nforever\n    next costume\nend\n\nset [katikati y v] to [0]\n\nset [katikati y v] to [-20]\n\nwhen I start as a clone\nset [katikati y clone v] to [0]\nforever\n    if <<(ステージ) = [3]> or <<(ステージ) = [6]> or <(ステージ) = [7]>>> then\n        if <touching (床 v)?> then\n            change y by (1)\n        end\n        change y by (-1)\n        change y by (1)\n        change [katikati y clone v] by (-1)\n        change y by (katikati y clone)\n        if <touching (床 v)?> then\n            change y by ((katikati y clone) * (-1))\n            set [katikati y clone v] to [0]\n        end\n    end\nend\n\nwhen I receive [honntouno end v]\nforever\n    if <<(ステージ) = [3]> or <<(ステージ) = [6]> or <(ステージ) = [7]>>> then\n        start sound [カタカタ... v]\n        wait (0.2) seconds\n    end\nend\n\n@ワンワンがぶがぶ\n\nwhen I receive [honntouno end v]\nset [ghost v] effect to (100)\nwait () seconds\nforever\n    if <touching (ヨッシー！ v)?> then\n        broadcast (chomp wanwan! v)\n        stop [this script v]\n    end\nend\n\n@影\n\nwhen I receive [chomp wanwan! v]\nwait (1) seconds\ngo to x: (12) y: (-43)\nset size to (1) %\nshow\nrepeat (15)\n    change size by (3.5)\nend\nwait (0.1) seconds\nhide\n\nwhen I receive [honntouno end v]\nhide\n\nwhen I receive [next v]\nif <(ステージ) = [0]> then\n    show\nelse\n    hide\nend\n\n@よいしょー！\n\nwhen I receive [honntouno end v]\nset size to (73) %\nforever\n    next costume\n    wait (0.1) seconds\nend\n\nwhen I receive [honntouno end v]\nforever\n    if <<(ステージ) = [2]> or <(ステージ) = [4]>> then\n        show\n    else\n        hide\n    end\nend\n\nwhen I receive [honntouno end v]\nforever\n    if <(ステージ) = [2]> then\n        go to x: (-6) y: (113)\n    end\n    if <(ステージ) = [4]> then\n        go to x: (103) y: (-140)\n    end\nend\n\n@卵\n\nwhen I receive [honntouno end v]\npoint in direction (90)\nset rotation style [don't rotate v]\nhide\n\nwhen I receive [shot v]\nif <(ステージ) = [5]> then\n    create clone of (_myself_ v)\nend\n\nwhen I start as a clone\nswitch costume to (卵 v)\nshow\ngo to (ミット君 v)\npoint towards (ヨッシー！ v)\nforever\n    move (27) steps\n    if <<touching (床 v)?> or <touching (_edge_ v)?>> then\n        next costume\n        start sound ((costume [number v]) + (-1))\n        turn right ((direction) * (-1)) degrees\n    end\n    if <(costume [number v]) > [3]> then\n        delete this clone\n    end\nend\n\n@ミット君\n\nwhen I receive [next v]\nset rotation style [left-right v]\nset size to (80) %\nforever\n    if <(ステージ) = [5]> then\n        switch costume to (コスチューム1 v)\n        wait (0.7) seconds\n        repeat (2)\n            next costume\n            wait (0.02) seconds\n        end\n        repeat (10)\n            broadcast (keihou v)\n            next costume\n            if <(costume [number v]) > [6]> then\n                switch costume to (コスチューム3 v)\n            end\n            wait () seconds\n        end\n        switch costume to (コスチューム7 v)\n        repeat (2)\n            next costume\n            wait (0.02) seconds\n        end\n        broadcast (shot v)\n        wait (3) seconds\n        next costume\n        wait () seconds\n    end\nend\n\nwhen I receive [keihou v]\nstart sound [警報！ v]\n\nwhen I receive [honntouno end v]\nforever\n    if <(ステージ) = [5]> then\n        show\n    else\n        hide\n    end\nend\n\nwhen I receive [next v]\nforever\n    point towards (ヨッシー！ v)\n    if <(ステージ) = [5]> then\n        go to x: (215) y: (-100)\n    end\nend\n\n@🌵\n\nwhen I receive [honntouno end v]\nset size to (200) %\nforever\n    next costume\n    if <(ステージ) = [6]> then\n        show\n    else\n        hide\n    end\nend\n\nwhen I receive [honntouno end v]\nforever\n    if <(ステージ) = [6]> then\n        go to x: (5) y: (-80)\n    end\nend\n\n@シーソー\n\nwhen I receive [honntouno end v]\nforever\n    if <(ステージ) = [5]> then\n        set [シーソー回る v] to ((シーソー回る) * (0.9))\n        turn left (シーソー回る) degrees\n        if <touching (ヨッシー！ v)?> then\n            if <([x position v] of [ヨッシー！ v]) < [0]> then\n                change [シーソー回る v] by (0.6)\n            else\n                change [シーソー回る v] by (-0.6)\n            end\n        end\n        if <[50] > (direction)> then\n            point in direction (50.1)\n        else\n            if <not <(direction) > [90]>> then\n                turn right (0.3) degrees\n            end\n        end\n        if <(direction) > [130]> then\n            point in direction (129.9)\n        else\n            if <not <[90] > (direction)>> then\n                turn left (0.3) degrees\n            end\n        end\n    end\nend\n\nwhen I receive [honntouno end v]\nforever\n    if <(ステージ) = [5]> then\n        show\n    else\n        hide\n    end\nend\n\nwhen I receive [honntouno end v]\nset [シーソー回る v] to [0]\npoint in direction (90)\nforever\n    if <(ステージ) = [5]> then\n        go to x: (6) y: (-85)\n    end\nend\n\n@ワンワン地面当たり判定\n\nwhen I receive [honntouno end v]\nset [ghost v] effect to (100)\n\nclear graphic effects\n\n@ダメージの当たり判定\n\nwhen I receive [next v]\nnext costume\n\nwhen I receive [honntouno end v]\nswitch costume to (level damage v)\nshow\ngo to x: (0) y: (-20)\n\nwhen flag clicked\nhide\n\n@スタート\n\nwhen flag clicked\nset [start x v] to [0]\ngo to x: (0) y: (0)\nstart sound [スタート v]\nshow\nwait ((length of [castle,again...]) / (6)) seconds\nbroadcast (honntouno end v)\nrepeat (20)\n    change [start x v] by (-3)\n    change x by (start x)\nend\nhide\n\n@コイン\n\ndefine 横: (横) 縦: (縦) オブジェクトの名前: (名前)\nrepeat (3)\n    delete this clone\nend\nset [object name v] to (名前)\nset x to (横)\nset y to (縦)\ncreate clone of (_myself_ v)\n\nwhen I receive [honntouno end v]\nhide\nif <(ステージ) = [0]> then\n    横: [-150] 縦: [150] オブジェクトの名前: [coin]\n    横: [-210] 縦: [150] オブジェクトの名前: [coin]\n    wait (0) seconds\n    横: [-180] 縦: [150] オブジェクトの名前: [red coin]\nend\n\nwhen I start as a clone\nset size to (80) %\nshow\nif <(Object name) = [red coin]> then\n    forever\n        if <touching (ヨッシー！ v)?> then\n            start sound [赤コイン v]\n            change [☁ 赤コイン v] by (1)\n            delete this clone\n        end\n    end\nend\n\nwhen flag clicked\nset [☁ 赤コイン v] to [0]\nset [コイン v] to [0]\nhide\n\nwhen I start as a clone\nif <(Object name) = [red coin]> then\n    switch costume to (赤コイン v)\n    forever\n        wait (0.07) seconds\n        switch costume to (赤コイン2 v)\n        wait (0.07) seconds\n        switch costume to (赤コイン3 v)\n        wait (0.07) seconds\n        switch costume to (赤コイン4 v)\n        wait (0.07) seconds\n        switch costume to (赤コイン v)\n    end\nend\n\nwhen I receive [next v]\nhide\nif <(ステージ) = [1]> then\n    横: [-220] 縦: [50] オブジェクトの名前: [red coin]\nend\nif <(ステージ) = [2]> then\n    横: [-10] 縦: [55] オブジェクトの名前: [red coin]\nend\nif <(ステージ) = [3]> then\n    横: [50] 縦: [0] オブジェクトの名前: [coin]\n    wait () seconds\n    横: [20] 縦: [0] オブジェクトの名前: [red coin]\nend\nif <(ステージ) = [4]> then\n    横: [60] 縦: [60] オブジェクトの名前: [coin]\n    横: [85] 縦: [80] オブジェクトの名前: [coin]\n    横: [110] 縦: [80] オブジェクトの名前: [coin]\n    wait () seconds\n    横: [50] 縦: [-60] オブジェクトの名前: [red coin]\n    横: [20] 縦: [-60] オブジェクトの名前: [red coin]\nend\nif <(ステージ) = [5]> then\n    横: [220] 縦: [-80] オブジェクトの名前: [red coin]\n    wait () seconds\n    横: [-20] 縦: [0] オブジェクトの名前: [coin]\n    横: [10] 縦: [0] オブジェクトの名前: [coin]\n    横: [40] 縦: [0] オブジェクトの名前: [coin]\nend\nif <(ステージ) = [6]> then\n    横: [-20] 縦: [0] オブジェクトの名前: [coin]\n    横: [10] 縦: [0] オブジェクトの名前: [coin]\n    横: [40] 縦: [0] オブジェクトの名前: [coin]\nend\nif <(ステージ) = [8]> then\n    横: [-100] 縦: [60] オブジェクトの名前: [coin]\n    横: [-70] 縦: [30] オブジェクトの名前: [coin]\nend\nif <(ステージ) = [9]> then\n    横: [-100] 縦: [0] オブジェクトの名前: [red coin]\n    横: [-100] 縦: [-30] オブジェクトの名前: [red coin]\n    wait () seconds\n    横: [-100] 縦: [30] オブジェクトの名前: [coin]\nend\nif <(ステージ) = [12]> then\n    横: [-100] 縦: [0] オブジェクトの名前: [red coin]\n    横: [-130] 縦: [0] オブジェクトの名前: [red coin]\nend\n\nwhen I start as a clone\nif <(Object name) = [coin]> then\n    switch costume to (赤コイン v)\n    forever\n        wait (0.07) seconds\n        switch costume to (コイン2 v)\n        wait (0.07) seconds\n        switch costume to (コイン3 v)\n        wait (0.07) seconds\n        switch costume to (コイン4 v)\n        wait (0.07) seconds\n        switch costume to (コイン v)\n    end\nend\n\nwhen I start as a clone\nset size to (80) %\nshow\nif <(Object name) = [coin]> then\n    forever\n        if <touching (ヨッシー！ v)?> then\n            start sound [コイン v]\n            change [コイン v] by (1)\n            delete this clone\n        end\n    end\nend\n\n@ワンワンきょろきょろ\n\nwhen I receive [honntouno end v]\npoint in direction (90)\nswitch costume to (ワン\(左\) v)\nset size to (15) %\ngo to x: (185) y: (-33)\nset rotation style [left-right v]\nshow\n\nwhen I receive [chomp wanwan! v]\nhide\n\nwhen I receive [honntouno end v]\nset [chomp y v] to [0]\nforever\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                    end\n                end\n            end\n        end\n    end\n    change y by (-1)\n    if <touching (ワンワン地面当たり判定 v)?> then\n        set [chomp y v] to [1.5]\n    end\n    change y by (1)\n    change [chomp y v] by (-0.2)\n    change y by (chomp y)\n    if <touching (ワンワン地面当たり判定 v)?> then\n        change y by ((chomp y) * (-1))\n        set [chomp y v] to [0]\n    end\nend\n\nwhen I receive [honntouno end v]\nforever\n    repeat (30)\n        change x by (-0.6)\n    end\n    repeat (3)\n        wait (0.1) seconds\n        next costume\n    end\n    repeat (30)\n        change x by (0.6)\n    end\n    repeat (3)\n        wait (0.1) seconds\n        next costume\n    end\nend\n\n@バネ\n\nwhen I receive [honntouno end v]\nforever\n    if <touching (ヨッシー！ v)?> then\n        if <[1] < (([y position v] of [ヨッシー！ v]) - (y position))> then\n            set [y v] to [25]\n            start sound [ジャンプ！ v]\n            broadcast (jamp v)\n        end\n    end\nend\n\nwhen I receive [honntouno end v]\nforever\n    if <(ステージ) = [9]> then\n        show\n    else\n        hide\n    end\nend\n\nwhen I receive [honntouno end v]\nforever\n    if <(ステージ) = [9]> then\n        go to x: (-106) y: (-143)\n    end\nend\n\nwhen flag clicked\nhide\n\nwhen I receive [jamp v]\nswitch costume to (コスチューム1 v)\nrepeat (5)\n    next costume\nend\nset [jump pad y v] to [40]\nrepeat (5)\n    next costume\n    wait () seconds\nend\nwait (0.05) seconds\nswitch costume to (コスチューム1 v)\n\nwhen I receive [jamp v]\nrepeat (20)\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                    end\n                end\n            end\n        end\n    end\n    change y by (-1)\n    change y by (1)\n    change [jump pad y v] by (-3)\n    change y by (jump pad y)\n    if <touching (床 v)?> then\n        change y by ((jump pad y) * (-1))\n        set [jump pad y v] to [0]\n    end\nend\n\n@music (castle)2\n\nwhen I receive [next v]\nif <(ステージ) = [12]> then\n    stop all sounds\n    broadcast (music next 11 v)\n    wait (0.1) seconds\n    play sound [2 v] until done\nend\n\nwhen I receive [music next 11 v]\nwait (10) seconds\nforever\n    play sound [07 v] until done\nend\n\n