Yoshi platformer!【Yoshi's Island】<モバイル対応>

Instructions: 矢印で操作。 (モバイルはタップ)\n\nsキーを押しながら旗を押してイントロスキップ。\n\nスペースキーでタイム確認。\n\n敵は踏めません。

@Stage\n\n@床\n\nwhen I receive [next v]\nnext costume\n\nwhen I receive [honntouno end v]\nshow\nswitch costume to (level1 v)\ngo to x: (0) y: (-20)\n\nwhen flag clicked\nset [ステージ v] to [0]\nhide\n\n@ヒットボックス\n\ndefine 初期\ngo to [back v] layer\nshow\ngo to x: (-200) y: (-10)\npoint in direction (90)\nset [ghost v] effect to (100)\nset size to (75) %\nset [x v] to [0]\nset [y v] to [0]\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    else\n        if <not <<key (left arrow v) pressed?> or <<mouse down?> and <(mouse x) < (x position)>>>> then\n            set [x v] to ((x) * (0.8))\n        end\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 (リフト \(上下\) v)?>>>> then\n        change y by (1)\n        if <<touching (床 v)?> or <<touching (回転丸太 v)?> or <<touching (リフト \(左右\) v)?> or <touching (リフト \(上下\) v)?>>>> then\n            change y by (1)\n            if <<touching (床 v)?> or <<touching (回転丸太 v)?> or <<touching (リフト \(左右\) v)?> or <touching (リフト \(上下\) v)?>>>> then\n                change y by (1)\n                if <<touching (床 v)?> or <<touching (回転丸太 v)?> or <<touching (リフト \(左右\) v)?> or <touching (リフト \(上下\) v)?>>>> then\n                    change y by (1)\n                    if <<touching (床 v)?> or <<touching (回転丸太 v)?> or <<touching (リフト \(左右\) v)?> or <touching (リフト \(上下\) v)?>>>> then\n                        change y by (1)\n                    end\n                    if <<touching (床 v)?> or <<touching (リフト \(左右\) v)?> or <<touching (回転丸太 v)?> or <touching (リフト \(上下\) 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 <<touching (回転丸太 v)?> or <<touching (リフト \(左右\) v)?> or <touching (リフト \(上下\) v)?>>>> 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    重力 <[0] < (y)>\n    if <<[230] < (x position)> and <(backdrop [number v]) = [1]>> then\n        初期\n        broadcast (next v)\n        change [ステージ v] by (1)\n    end\n    if <<(y position) < [-183.5]> 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\ndefine 重力 <重力>\nrepeat until <not <<touching (床 v)?> or <<touching (回転丸太 v)?> or <<touching (リフト \(左右\) v)?> or <touching (リフト \(上下\) v)?>>>>>\n    if <重力> then\n        change y by (-1)\n    else\n        change y by (1)\n    end\n    set [y v] to [0]\nend\n\n@ヨッシー！\n\ndefine 初期\ngo to [front v] layer\nshow\ngo to x: (-200) y: (-30)\npoint in direction (90)\nset size to (75) %\nset [x v] to [0]\nset [y v] to [0]\nset [ヨッシーアニメーション v] to [0]\n\nwhen I receive [death v]\nrepeat (10)\n    change [ghost v] effect by (10)\n    change y by (25)\nend\nclear graphic effects\n初期\n\nwhen I receive [honntouno end v]\nforever\n    switch costume to (ヨッシーアニメーション)\nend\n\nwhen I receive [honntouno end v]\nhide\n\nwhen I receive [honntouno end v]\nforever\n    if <not <(y) > [1]>> then\n        set [ヨッシーアニメーション v] to [1]\n        if <<(x) > [3]> or <(x) < [-3]>> then\n            repeat (2)\n                change [ヨッシーアニメーション v] by (1)\n            end\n        else\n            set [ヨッシーアニメーション v] to [1]\n        end\n    else\n        set [ヨッシーアニメーション v] to [4]\n    end\nend\n\nwhen I receive [honntouno end v]\n初期\nset rotation style [left-right v]\nforever\n    go to (ヒットボックス 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\nhide\n\n@回転丸太\n\nwhen flag clicked\nforever\n    if <<(ステージ) = [7]> or <(ステージ) = [10]>> then\n        show\n    else\n        hide\n    end\nend\n\nwhen I receive [honntouno end v]\nforever\n    if <<(ステージ) = [7]> or <(ステージ) = [10]>> then\n        repeat (30)\n            turn right (50) degrees\n            broadcast (回転 v)\n        end\n        point in direction (90)\n        wait (2) seconds\n    end\nend\n\nwhen I receive [honntouno end v]\nforever\n    if <(ステージ) = [7]> then\n        go to x: (47) y: (-20)\n    end\n    if <(ステージ) = [10]> then\n        go to x: (100) y: (-40)\n    end\nend\n\nwhen I receive [回転 v]\nif <<(ステージ) = [7]> or <(ステージ) = [10]>> then\n    if <(distance to [ヨッシー！ v]) < [60]> then\n        set [y v] to [10]\n        set [x v] to ((x) * (1.6))\n    end\nend\n\n@音楽\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]\nwait (0.1) seconds\nplay sound [17_Athletic v] until done\nwait (0.08) seconds\nforever\n    play sound [17_Athletic2 v] until done\nend\n\n@パックン\n\nwhen I receive [honntouno end v]\nset rotation style [all around v]\nset size to (60) %\ngo to [front v] layer\nforever\n    if <([x position v] of [ヒットボックス v]) < (x position)> then\n        switch costume to (パックンフラワー v)\n        wait (0.04) seconds\n        switch costume to (パックンフラワー2 v)\n        wait (0.04) seconds\n    else\n        switch costume to (パックンフラワー4 v)\n        wait (0.04) seconds\n        switch costume to (パックンフラワー3 v)\n        wait (0.04) seconds\n    end\nend\n\nwhen I receive [honntouno end v]\nforever\n    go to (パックン草 v)\n    point towards (ヨッシー！ v)\n    if <<(ステージ) = [3]> or <<(ステージ) = [4]> or <<(ステージ) = [5]> or <<(ステージ) = [6]> or <<(ステージ) = [10]> or <<(ステージ) = [11]> or <<(ステージ) = [12]> or <(ステージ) = [15]>>>>>>>> then\n        show\n    else\n        hide\n    end\nend\n\nwhen flag clicked\nhide\n\nwhen I receive [next v]\npoint towards (ヨッシー！ v)\n\n@パックン草\n\nwhen I receive [honntouno end v]\nset size to (60) %\nset rotation style [left-right v]\nforever\n    if <<(ステージ) = [3]> or <<(ステージ) = [4]> or <<(ステージ) = [5]> or <<(ステージ) = [6]> or <<(ステージ) = [10]> or <<(ステージ) = [11]> or <<(ステージ) = [12]> or <(ステージ) = [15]>>>>>>>> then\n        start sound [パクパク... v]\n        wait (0.2) seconds\n    end\nend\n\nwhen I receive [honntouno end v]\nforever\n    if <<(ステージ) = [3]> or <<(ステージ) = [4]> or <<(ステージ) = [5]> or <<(ステージ) = [6]> or <<(ステージ) = [10]> or <<(ステージ) = [11]> or <<(ステージ) = [12]> or <(ステージ) = [15]>>>>>>>> then\n        show\n    else\n        hide\n    end\nend\n\nwhen I receive [honntouno end v]\nforever\n    point towards (ヒットボックス v)\n    if <(ステージ) = [3]> then\n        go to x: (70) y: (-24)\n    end\n    if <(ステージ) = [4]> then\n        go to x: (50) y: (122)\n    end\n    if <(ステージ) = [5]> then\n        go to x: (12) y: (-69)\n    end\n    if <(ステージ) = [6]> then\n        go to x: (40) y: (-85)\n    end\n    if <(ステージ) = [10]> then\n        go to x: (-70) y: (-50)\n    end\n    if <(ステージ) = [11]> then\n        go to x: (-30) y: (-105)\n    end\n    if <(ステージ) = [12]> then\n        go to x: (-90) y: (-45)\n    end\n    if <(ステージ) = [14]> then\n        go to x: (0) y: (-23)\n    end\n    if <(ステージ) = [15]> then\n        go to x: (-20) y: (-30)\n    end\nend\n\nwhen flag clicked\nhide\n\n@時間\n\nwhen I receive [honntouno end v]\nreset timer\nforever\n    if <not <(ステージ) = [17]>> then\n        set [タイマー v] to ((round ((timer) * (10))) / (10))\n    end\n    if <(ステージ) = [17]> then\n        show variable [☁ 世界記録 v]\n        show variable [タイマー v]\n        if <(タイマー) < (☁ 世界記録)> then\n            set [☁ 世界記録 v] to (タイマー)\n        end\n    end\nend\n\nwhen flag clicked\nset [タイマー v] to [0]\nforever\n    if <not <(ステージ) = [17]>> then\n        if <key (space v) pressed?> then\n            show variable [☁ 世界記録 v]\n            show variable [タイマー v]\n        else\n            hide variable [☁ 世界記録 v]\n            hide variable [タイマー v]\n        end\n    end\nend\n\nwhen I receive [next v]\n\nset [ステージ v] to [17]\n\nset [タイマー v] to [17]\n\n@回る棘\n\nwhen I receive [honntouno end v]\ngo to [front v] layer\nforever\n    if <<(ステージ) = [9]> or <(ステージ) = [15]>> then\n        turn left (0.8) degrees\n        show\n    else\n        hide\n        point in direction (-150)\n    end\nend\n\nwhen I receive [honntouno end v]\nforever\n    if <<(ステージ) = [9]> or <(ステージ) = [15]>> 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) %\nhide\n\nwhen I receive [honntouno end v]\nforever\n    if <(ステージ) = [9]> then\n        go to x: (-130) y: (115)\n    end\n    if <(ステージ) = [15]> then\n        go to x: (-20) y: (150)\n    end\nend\n\n@当たり判定なしぃ\n\nwhen flag clicked\nhide\n\nwhen I receive [next v]\nif <[17] = (ステージ)> then\n    show\nelse\n    hide\nend\n\n@リフト (左右)\n\nwhen flag clicked\nset [plat x v] to [0]\nhide\n\nwhen I receive [honntouno end v]\nset [plat x v] to [0]\nforever\n    if <(ステージ) = [8]> then\n        show\n        change [plat x v] by (2)\n        change x by (([sin v] of (plat x) ) * (2))\n        if <touching (ヨッシー！ v)?> then\n            if <not <<key (right arrow v) pressed?> or <key (left arrow v) pressed?>>> then\n                set [x v] to (([sin v] of (plat x) ) * (3))\n            end\n        end\n    else\n        hide\n    end\nend\n\nwhen I receive [next v]\nif <(ステージ) = [8]> then\n    go to x: (30) y: (-71)\nend\n\n@イントロ\n\nwhen flag clicked\nif <key (s v) pressed?> then\n    broadcast (honntouno end v)\nelse\n    set volume to (100) %\n    hide\n    start sound [Intro music v]\n    switch costume to (拝啓 v)\n    create clone of (_myself_ v)\n    switch costume to (ひゅんてなるやつ v)\n    set [変数 v] to [-90]\n    create clone of (_myself_ v)\n    wait (0.3) seconds\n    set [変数 v] to [0]\n    wait (0.3) seconds\n    set [変数 v] to [90]\n    wait (0.3) seconds\n    set [変数 v] to [180]\n    wait (0.3) seconds\n    set [変数 v] to [0]\n    wait (1.3) seconds\n    switch costume to (font v)\n    create clone of (_myself_ v)\n    switch costume to (枠2 v)\n    create clone of (_myself_ v)\n    switch costume to (枠 v)\n    create clone of (_myself_ v)\n    repeat (11)\n        switch costume to (ダイヤマン v)\n        create clone of (_myself_ v)\n        wait (1.12) seconds\n    end\nend\n\ndefine (向き) 向き (回数) 回数 (速度) 速度\nset [> v] to (速度)\npoint in direction (向き)\nclear graphic effects\nrepeat (回数)\n    switch costume to (ひゅんてなるやつ v)\n    create clone of (_myself_ v)\n    change [brightness v] effect by (20)\n    change [color v] effect by (10)\n    wait (0) seconds\nend\n\nwhen I start as a clone\nif <(costume [number v]) = [1]> then\n    go to x: (0) y: (0)\n    move (-500) steps\n    set size to (1000) %\n    switch costume to (1 v)\n    go to [front v] layer\n    show\n    repeat (15)\n        move (>) steps\n        change [> v] by ((0) - (round ((>) / (15))))\n    end\n    repeat (5)\n        move (>) steps\n        change [> v] by ((0) - (round ((>) / (15))))\n        change [ghost v] effect by (20)\n    end\n    delete this clone\nend\n\nwhen flag clicked\nif <key (s v) pressed?> then\n\nwhen I start as a clone\nif <(costume [number v]) = [2]> then\n    set size to (100) %\n    clear graphic effects\n    point in direction (90)\n    show\nend\n\ndefine 大きさ () ～ () 回数 () 戻す ()\nset size to () %\nrepeat ()\n    change size by ()\nend\nset size to () %\n\nwhen I start as a clone\nif <(costume [number v]) = [5]> then\n    set [cos v] to [0]\n    clear graphic effects\n    show\n    point in direction (-45)\n    repeat (450)\n        change size by ([cos v] of (cos) )\n        turn right (2) degrees\n    end\nend\n\nwhen I start as a clone\nif <(costume [name v]) = [font]> then\n    clear graphic effects\n    go to x: (0) y: (0)\n    point in direction (120)\n    go to [front v] layer\n    set size to (100) %\n    show\n    repeat (25)\n        turn right ([abs v] of (((90) - (direction)) / (3)) ) degrees\n    end\n    point in direction (90)\n    WAIT [3.8]\n    shake [r]\n    WAIT [4.25]\n    shake [l]\n    WAIT [4.7]\n    shake [r]\n    WAIT [5.15]\n    shake [l]\n    WAIT [5.6]\n    shake [r]\n    WAIT [6.05]\n    shake [l]\n    WAIT [6.5]\n    shake [r]\n    WAIT [6.95]\n    shake [l]\n    WAIT [7.4]\n    shake [r]\n    WAIT [7.85]\n    shake [l]\n    WAIT [8.3]\n    shake [r]\n    WAIT [8.75]\n    shake [l]\n    WAIT [9.2]\n    shake [r]\n    WAIT [9.65]\n    shake [l]\n    WAIT [10.1]\n    shake [r]\n    WAIT [10.55]\n    shake [l]\n    WAIT [11.1]\n    shake [l]\n    WAIT [11.55]\n    shake [r]\n    WAIT [12.1]\n    shake [l]\n    WAIT [12.55]\n    shake [r]\n    WAIT [13.1]\n    shake [l]\n    WAIT [13.55]\n    shake [l]\n    WAIT [14.1]\n    shake [r]\n    WAIT [14.55]\n    shake [l]\n    WAIT [15.1]\n    shake [r]\n    WAIT [15.55]\n    shake [l]\n    WAIT [16.1]\n    shake [l]\n    WAIT [16.55]\n    shake [r]\n    WAIT [17.1]\n    broadcast (end v)\nend\n\ndefine WAIT (time)\nwait until <(time) < (timer)>\n\ndefine shake (lr)\nif <(lr) = [R]> then\n    set [s1 v] to [20]\n    set [s2 v] to [20]\nelse\n    set [s1 v] to [-20]\n    set [s2 v] to [-20]\nend\nrepeat (13)\n    turn right (S1) degrees\n    change x by (S2)\n    change [s1 v] by ((((90) - (direction)) / (3)) - ((S1) / (3)))\n    change [s2 v] by ((((0) - (x position)) / (5)) - ((S2) / (5)))\n    insert (x position) at (1) of [x v] \n    insert (direction) at (1) of [direction v] \n    if <(timer) < [10.7]> then\n        go to [front v] layer\n    end\nend\ngo to x: (0) y: (0)\npoint in direction (90)\n\nwhen I receive [end v]\ndelete this clone\n\nwhen I receive [end v]\nwait (.1) seconds\nswitch costume to (end v)\ncreate clone of (_myself_ v)\n\nwhen I start as a clone\nif <(costume [name v]) = [end]> then\n    clear graphic effects\n    go to x: (0) y: (0)\n    point in direction (90)\n    go to [front v] layer\n    set size to (0) %\n    show\n    repeat (25)\n        switch costume to (白ボール v)\n        change size by (((115) - (size)) / (8))\n        switch costume to (end v)\n    end\n    broadcast (honntouno end v)\n    repeat (20)\n        change size by (((5) - (size)) / (4))\n    end\n    set [n v] to [13]\n    repeat until <touching (_edge_ v)?>\n        change [n v] by (-1)\n        change y by (N)\n    end\n    delete this clone\nend\n\nwhen I start as a clone\nif <(costume [number v]) = [4]> then\n    go to [front v] layer\n    go [backward v] (1) layers\n    set size to (200) %\n    show\n    repeat (420)\n        clear graphic effects\n        turn right (3) degrees\n    end\nend\n\nwhen I start as a clone\nif <(costume [number v]) = [7]> then\n    clear graphic effects\n    set size to (1) %\n    go to x: (0) y: (0)\n    show\n    repeat (30)\n        switch costume to (ダイヤマン v)\n        change size by (((300) - (size)) / (10))\n        switch costume to (コスチューム2 v)\n        change [ghost v] effect by (2)\n        if <[300] < (size)> then\n            delete this clone\n        end\n    end\n    repeat (100)\n        switch costume to (ダイヤマン v)\n        change size by (((670) - (size)) / (10))\n        switch costume to (コスチューム2 v)\n        if <[300] < (size)> then\n            delete this clone\n        end\n    end\n    delete this clone\nend\n\nwhen I receive [honntouno end v]\nstop all sounds\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 <<(ステージ) = [4]> or <<(ステージ) = [12]> or <(ステージ) = [13]>>> then\n        repeat (60)\n            if <<touching (_edge_ v)?> or <touching (床 v)?>> then\n                if <(direction) = [90]> then\n                    point in direction (-90)\n                else\n                    point in direction (90)\n                end\n                if <(direction) = [90]> then\n                    change x by (-1)\n                else\n                    change x by (1)\n                end\n            end\n            if <(direction) = [90]> then\n                change x by (-2.5)\n            else\n                change x by (2.5)\n            end\n            wait (0) seconds\n            next costume\n        end\n        switch costume to (ヘイホウ v)\n        repeat (3)\n            point in direction (90)\n            wait (0.3) seconds\n            point in direction (-90)\n            wait (0.3) seconds\n        end\n    end\nend\n\nwhen flag clicked\nforever\n    if <<(ステージ) = [4]> or <<(ステージ) = [12]> or <(ステージ) = [13]>>> then\n        show\n    else\n        hide\n    end\nend\n\nwhen I receive [next v]\nwait () seconds\nif <(ステージ) = [4]> then\n    go to x: (-50) y: (-33)\n    create clone of (_myself_ v)\nelse\n    delete this clone\nend\nif <(ステージ) = [12]> then\n    go to x: (200) y: (16)\nend\nif <(ステージ) = [13]> then\n    go to x: (200) y: (33)\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 <(ステージ) = [4]> then\n        repeat (3)\n            point in direction (90)\n            wait (0.3) seconds\n            point in direction (-90)\n            wait (0.3) seconds\n        end\n        repeat (60)\n            if <<touching (_edge_ v)?> or <touching (床 v)?>> then\n                if <(direction) = [90]> then\n                    point in direction (-90)\n                else\n                    point in direction (90)\n                end\n            end\n            if <(direction) = [90]> then\n                change x by (-2.5)\n            else\n                change x by (2.5)\n            end\n            wait (0) seconds\n            next costume\n        end\n        switch costume to (ヘイホウ v)\n    end\nend\n\nwhen I start as a clone\nif <(ステージ) = [4]> then\n    go to x: (163) y: (-35)\nend\n\n@プチプチ\n\nwhen flag clicked\nhide\n\nwhen I receive [next v]\nset rotation style [left-right v]\npoint in direction (-90)\nforever\n    if  then\n        if <<touching (_edge_ v)?> or <touching (床 v)?>> then\n            if <(direction) = [90]> then\n                point in direction (-90)\n            else\n                point in direction (90)\n            end\n            if <(direction) = [90]> then\n                change x by (-4)\n            else\n                change x by (4)\n            end\n        end\n        if <(direction) = [90]> then\n            change x by (-1.5)\n        else\n            change x by (1.5)\n        end\n    end\nend\n\nwhen flag clicked\nforever\n    if  then\n        show\n    else\n        hide\n    end\nend\n\nwhen I receive [next v]\nif <(ステージ) = [13]> then\n    go to x: (-50) y: (-36)\nelse\n    delete this clone\nend\n\nwhen I start as a clone\nset rotation style [left-right v]\npoint in direction (-90)\nforever\n    if <(ステージ) = [4]> then\n        repeat (60)\n            if <<touching (_edge_ v)?> or <touching (床 v)?>> then\n                if <(direction) = [90]> then\n                    point in direction (-90)\n                else\n                    point in direction (90)\n                end\n            end\n            if <(direction) = [90]> then\n                change x by (-2.5)\n            else\n                change x by (2.5)\n            end\n            wait (0) seconds\n            next costume\n        end\n        switch costume to (プチプチ v)\n        repeat (2)\n            point in direction (90)\n            wait (0.5) seconds\n            point in direction (-90)\n            wait (0.5) seconds\n        end\n    end\nend\n\nwhen I start as a clone\nif <(ステージ) = [4]> then\n    go to x: (163) y: (-35)\nend\n\nwhen I receive [next v]\nforever\n    wait (0.07) seconds\n    next costume\nend\n\n@つむじくん\n\nwhen I receive [honntouno end v]\nhide\nset size to (50) %\nset x to (280)\nforever\n    if <(ステージ) = [14]> then\n        set y to (pick random (100) to (-40))\n        create clone of (_myself_ v)\n        wait (pick random (1) to (2.5)) seconds\n    end\nend\n\nwhen I start as a clone\nshow\nset [x speed v] to [-5]\nforever\n    change [x speed v] by (-0.1)\n    change x by (x speed)\n    if <<[-250] > (x position)> or <not <(ステージ) = [14]>>> then\n        delete this clone\n    end\nend\n\nchange y by (-5)\n\nwhen I start as a clone\nforever\n    wait (0.01) seconds\n    next costume\nend\n\n@リフト (上下)\n\nwhen flag clicked\nset [plat x v] to [0]\nhide\n\nwhen I receive [honntouno end v]\nforever\n    if <(ステージ) = [16]> then\n        show\n        change [plat y v] by (2)\n        change y by ([cos v] of (plat y) )\n        if <touching (ヨッシー！ v)?> then\n            change [y v] by (-2)\n        end\n    else\n        hide\n    end\nend\n\nwhen I receive [next v]\nif <(ステージ) = [16]> then\n    go to x: (-20) y: (-60)\nend\n\n@ターボを対策\n\nwhen flag clicked\nhide\nforever\n    set [ターボ対策 v] to [0]\n    wait (0.01) seconds\nend\n\nwhen flag clicked\nhide\nforever\n    if <(ターボ対策) > [20]> then\n        broadcast (ターボ v)\n    else\n        hide\n        go to [back v] layer\n    end\nend\n\nwhen I receive [ターボ v]\nshow\ngo to [front v] layer\nstop [all v]\n\nwhen flag clicked\nhide\nset [ターボ対策 v] to [0]\nforever\n    change [ターボ対策 v] by (10)\nend\n\n