super easy platformer(超！簡単！プラットフォーマー)

Instructions: 2回押し推奨、最近使い方を読まない人が増えています\n※最後までやらないと記録されません\n〜〜〜〜〜〜〜〜〜日本語は下です〜〜〜〜〜〜〜〜〜\n~~~~~~~~~~~~~~~~~~English~~~~~~~~~~~~~~~~~~~~~\nThis platformer is ridiculously easy.\nit's too easy i'm in tears.\nmobile compatible.\nYou can play with arrow keys or wasd keys, tap.\nThe number of deaths is saved in the cloud, not the goal time.\nAs a final tip, the last stage can be easily cleared with a mouse pointer or touch operation.\n＝＝＝＝＝＝＝＝＝＝＝日本語＝＝＝＝＝＝＝＝＝＝＝\nこのプラットフォーマーはとてつもなく簡単です。\n簡単すぎて涙が出ます。\nモバイル対応。\n矢印キーまたはwasdキー、タップで遊ぶことができます。\nrキーでリトライできます(またはタップ)\nゴールタイムではなく、死亡回数がクラウドに保存されます。\n「最後ステージのヒントとして、最後のステージはマウスポインターやタッチ操作でジャイアンを止めることができます。」\n\nなんか傾向とかにもプラットフォーマーとかあったから流行ってるのかな？って思って作りました。そんな難しいって事ﾅｲﾖ？\n最後らへん低クオ許して？\n裏技ありますが中は見ないでね？

@Stage\n\nchange [stage v] by (1)\n\nwhen flag clicked\nswitch backdrop to (blue sky v)\n\nwhen I receive [endロール v]\nswitch backdrop to (blue sky2 v)\n\n@プレイヤー\n\nwhen flag clicked\nset [死んだ回数 v] to [0]\nhide\n\nwhen flag clicked\nforever\n    if <<<key (any v) pressed?> or <mouse down?>> and <(Lock) = [0]>> then\n        wait (0.01) seconds\n        create clone of (_myself_ v)\n    end\nend\n\nwhen I start as a clone\nrepeat (20)\n    change [ghost v] effect by (5)\n    change size by (-1.5)\nend\ndelete this clone\n\ndefine 当たり判定\nswitch costume to (当たり判定 v)\nchange x by (x)\nswitch costume to (ｺﾞｺﾞｺﾞ☆ｺﾞﾎﾞ v)\n\nwhen I receive [スタート v]\nset [復活してない v] to [0]\nswitch costume to (ｺﾞｺﾞｺﾞ☆ｺﾞﾎﾞ v)\nclear graphic effects\nset size to (50) %\nwait (0.01) seconds\nset rotation style [left-right v]\npoint in direction (90)\ngo to [front v] layer\nset [変数 v] to [0]\nset [x v] to [0]\nset [y v] to [0]\nset [stage v] to [1]\nclear graphic effects\ngo to x: (-200) y: (0)\nshow\nforever\n    if <(Lock) = [0]> then\n        if <<<key (a v) pressed?> or <key (left arrow v) pressed?>> or <<(mouse x) < (x position)> and <mouse down?>>> then\n            change [x v] by (-1)\n            point in direction (-90)\n        end\n        if <<<key (d v) pressed?> or <key (right arrow v) pressed?>> or <<(x position) < (mouse x)> and <mouse down?>>> then\n            change [x v] by (1)\n            point in direction (90)\n        end\n        set [x v] to ((x) * (0.92))\n        当たり判定\n        if <touching (地面 v)?> then\n            change y by (1)\n            if <touching (地面 v)?> then\n                change y by (1)\n                if <touching (地面 v)?> then\n                    change y by (1)\n                    if <touching (地面 v)?> then\n                        change y by (1)\n                        if <touching (地面 v)?> then\n                            change y by (1)\n                            if <touching (地面 v)?> then\n                                change y by (1)\n                                if <touching (地面 v)?> then\n                                    change x by ((0) - (x))\n                                    change y by (-5)\n                                    if <<<key (w v) pressed?> or <key (up arrow v) pressed?>> or <<[0] < (mouse y)> and <mouse down?>>> then\n                                        if <[0] < (x)> then\n                                            set [x v] to [-10]\n                                        else\n                                            set [x v] to [10]\n                                        end\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            end\n        end\n        change [y v] by (-1)\n        change y by (y)\n        if <touching (地面 v)?> then\n            change y by ((0) - (y))\n            set [y v] to [0]\n        end\n        change y by (-2)\n        if <<<<key (w v) pressed?> or <key (up arrow v) pressed?>> or <<[0] < (mouse y)> and <mouse down?>>> and <touching (地面 v)?>> then\n            start sound [ジャンプ v]\n            set [y v] to [16]\n        end\n        change y by (1)\n    end\n    if <<(y position) < [-165]> or <touching (針など v)?>> then\n        if <(無敵時間) = [0]> then\n            change [死んだ回数 v] by (1)\n            broadcast (game over v)\n            repeat (15)\n                change [ghost v] effect by (5)\n                change [brightness v] effect by (5)\n            end\n            hide\n            clear graphic effects\n            set [復活してない v] to [1]\n            wait until <<key (r v) pressed?> or <mouse down?>>\n            set [復活してない v] to [0]\n            go to x: (-200) y: (0)\n            set [x v] to [0]\n            set [y v] to [0]\n            show\n        end\n    end\n    if <[239] < (x position)> then\n        hide\n        clear graphic effects\n        go to x: (-200) y: (0)\n        set [x v] to [0]\n        set [y v] to [0]\n        change [stage v] by (1)\n        broadcast (次のステージ v)\n        show\n    end\nend\n\nwhen I receive [endロール v]\nstop [other scripts in sprite v]\nstop all sounds\ngo to x: (-200) y: (-120)\nglide (38) secs to x: (252) y: (-120)\nhide\nwait (1) seconds\nbroadcast (Thank you for playing v)\n\nwhen flag clicked\nforever\n    if <key (s v) pressed?> then\n        if <key (k v) pressed?> then\n            if <key (7 v) pressed?> then\n                if <key (4 v) pressed?> then\n                    if <key (0 v) pressed?> then\n                        hide\n                        clear graphic effects\n                        go to x: (-200) y: (0)\n                        set [x v] to [0]\n                        set [y v] to [0]\n                        set [stage v] to [12]\n                        broadcast (次のステージ v)\n                        show\n                        set [変数 v] to [1]\n                        stop [this script v]\n                    end\n                end\n            end\n        end\n    end\nend\n\nwhen flag clicked\nclear graphic effects\nforever\n    if <key (u v) pressed?> then\n        set [無敵時間 v] to [1]\n        set [ghost v] effect to (30)\n        wait (0.1) seconds\n        set [無敵時間 v] to [0]\n        set [ghost v] effect to (0)\n        wait (1) seconds\n    end\nend\n\nwait (1) seconds\n\n@地面\n\nwhen flag clicked\nset [stage v] to [0]\nhide\n\nwhen I receive [次のステージ v]\nswitch costume to (stage)\n\nstop all sounds\n\nwhen I receive [game over v]\nset volume to (0) %\nwait (0.45) seconds\nwait until <<key (r v) pressed?> or <mouse down?>>\nset volume to (100) %\nswitch costume to (stage)\n\nwhen I receive [スタート v]\nshow\nswitch costume to (1 v)\ngo to [back v] layer\ngo to x: (0) y: (0)\nforever\n    if <(stage) = [1]> then\n        if <([x position v] of [プレイヤー v]) > [-50]> then\n            switch costume to (1.5 v)\n        end\n    end\n    if <(stage) = [2]> then\n        if <([x position v] of [プレイヤー v]) > [50]> then\n            switch costume to (2.5 v)\n        end\n    end\n    if <(stage) = [7]> then\n        if <([x position v] of [プレイヤー v]) > [20]> then\n            switch costume to (7.5 v)\n            wait (0.01) seconds\n            switch costume to (7 v)\n            wait (0.5) seconds\n        end\n    end\n    if <(stage) = [8]> then\n        if <([x position v] of [プレイヤー v]) > [-50]> then\n            switch costume to (8.4 v)\n            if <([x position v] of [プレイヤー v]) > [100]> then\n                switch costume to (8.8 v)\n            end\n        end\n    end\n    if <(stage) = [13]> then\n        broadcast (六なる v)\n        stop [this script v]\n    end\nend\n\nwhen I receive [スタート v]\nset volume to (100) %\nforever\n    if <[5] > (stage)> then\n        play sound [激突！グルメレース v] until done\n    end\n    if <<[12] > (stage)> and <(stage) > [4]>> then\n        play sound [戦艦ハルバード 甲板 v] until done\n    end\n    if <(stage) > [11]> then\n        play sound [星のカービィ 王位の復権.mp3 v] until done\n    end\nend\n\nchange [stage v] by (1)\n\nwhen I receive [クリア‼！ v]\nrepeat until <(stage) = [13]>\n    switch costume to (12.5 v)\nend\nforever\n    switch costume to (13 v)\nend\n\nwhen I receive [endロール v]\nstop [other scripts in sprite v]\nwait (0.5) seconds\nplay sound [あしたはあしたのかぜがふく v] until done\n\n@針など\n\nwhen flag clicked\nset [lock v] to [0]\nhide\ngo to x: (0) y: (-115)\n\nwhen I receive [次のステージ v]\nset size to (100) %\nhide\npoint in direction (90)\nif <(stage) = [3]> then\n    switch costume to (針 v)\n    show\n    repeat until <([x position v] of [プレイヤー v]) > [-70]>\n        glide (0) secs to x: (1) y: (-115)\n        glide (0.00001) secs to x: (-1) y: (-115)\n    end\n    set [lock v] to [1]\n    set [x v] to [0]\n    set [y v] to [0]\n    say (translate [今あなた、こう思いましたね?] to ((language::translate) v)::translate) for (2) seconds\n    say (translate [動く系の針あるじゃーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーん] to ((language::translate) v)::translate) for (3) seconds\n    say (translate [いやー、本当に、] to ((language::translate) v)::translate) for (2) seconds\n    say (translate [そういう偏見やめたほうがいいよ] to ((language::translate) v)::translate) for (2) seconds\n    say (translate [君だって今こうやって生きてるじゃん?] to ((language::translate) v)::translate) for (1) seconds\n    say (translate [だからさ、そうやって生きるんじゃなくて、] to ((language::translate) v)::translate) for (2) seconds\n    say (translate [一回くらい人\(針\)を信じてみようよ、ね?] to ((language::translate) v)::translate) for (1) seconds\n    say (translate [わかったならいいんだ] to ((language::translate) v)::translate) for (1) seconds\n    say (translate [僕も怒ってないからさ?] to ((language::translate) v)::translate) for (1) seconds\n    set [lock v] to [0]\n    wait until <([x position v] of [プレイヤー v]) > [-20]>\n    start sound [Crazy Laugh v]\n    glide (0.1) secs to x: (0) y: (200)\n    hide\n    wait until <<key (r v) pressed?> or <mouse down?>>\n    wait until <([x position v] of [プレイヤー v]) > [-30]>\n    point in direction (-90)\n    show\n    start sound [Crowd Laugh v]\n    glide (0.1) secs to x: (0) y: (-115)\n    wait until <([x position v] of [プレイヤー v]) > [100]>\n    point in direction (180)\n    wait until <([x position v] of [プレイヤー v]) > [180]>\n    start sound [Crazy Laugh v]\n    glide (0.1) secs to x: (200) y: (-115)\n    hide\nend\nif <(stage) = [4]> then\n    go to x: (0) y: (0)\n    switch costume to (マグマ1 v)\n    show\n    wait until <([x position v] of [プレイヤー v]) > [-90]>\n    start sound [Movie 1 v]\n    glide (0.3) secs to x: (0) y: (-275)\n    glide (1) secs to x: (0) y: (0)\nend\nif <(stage) = [5]> then\n    switch costume to (匿名 v)\n    wait (0.5) seconds\n    set [lock v] to [1]\n    go to x: (300) y: (-100)\n    show\n    say (translate [おいのび太！野球しようぜ！] to ((language::translate) v)::translate) for (2) seconds\n    say (translate [ちゃんと取れよ！] to ((language::translate) v)::translate) for (1) seconds\n    set [lock v] to [0]\n    set y to ([y position v] of [プレイヤー v])\n    switch costume to (baseball v)\n    start sound [Basketball Bounce v]\n    glide (0.3) secs to x: (-240) y: (y position)\n    hide\n    go to x: (300) y: (-100)\n    wait until <([x position v] of [プレイヤー v]) > [120]>\n    show\n    set y to ([y position v] of [プレイヤー v])\n    switch costume to (baseball v)\n    start sound [Basketball Bounce v]\n    glide (0.3) secs to x: (-240) y: (y position)\n    hide\nend\nif <(stage) = [6]> then\n    switch costume to (匿名 v)\n    wait (0.5) seconds\n    set [lock v] to [1]\n    go to x: (300) y: (-100)\n    show\n    say (translate [何やってんだよのび太！お前が取ってこい！] to ((language::translate) v)::translate) for (2) seconds\n    set [lock v] to [0]\n    set x to (0)\n    set y to (-240)\n    wait until <([x position v] of [プレイヤー v]) > [-10]>\n    switch costume to (baseball v)\n    start sound [Basketball Bounce v]\n    glide (0.4) secs to x: (0) y: (240)\n    hide\nend\nif <(stage) = [9]> then\n    point in direction (90)\n    switch costume to (baseball v)\n    hide\n    repeat until <(stage) = [10]>\n        create clone of (_myself_ v)\n        wait (pick random (0.1) to (0.8)) seconds\n    end\nend\nif <(stage) = [10]> then\n    point in direction (90)\n    switch costume to (針 v)\n    hide\n    repeat until <(stage) = [11]>\n        create clone of (_myself_ v)\n        wait (pick random (0.5) to (2)) seconds\n    end\nend\nif <(stage) = [11]> then\n    go to x: (0) y: (0)\n    point in direction (90)\n    switch costume to (boss!? v)\n    show\n    wait until <([x position v] of [プレイヤー v]) > [100]>\n    start sound [Movie 1 v]\n    glide (5) secs to x: (0) y: (299)\n    hide\nend\nif <(stage) = [12]> then\n    set size to (50) %\n    go to x: (300) y: (0)\n    point in direction (90)\n    switch costume to (匿名 v)\n    show\n    set [lock v] to [1]\n    say (translate [やっと来たようだな] to ((language::translate) v)::translate) for (2) seconds\n    switch costume to (takeshi v)\n    glide (2) secs to x: (150) y: (0)\n    say (translate [おいのび太\(？\)かけっこしようぜ] to ((language::translate) v)::translate) for (2) seconds\n    set [lock v] to [0]\n    broadcast (カウントダウン v)\n    repeat until <(time left\(残り時間\)) < [10]>\n        change x by ((([x position v] of [プレイヤー v]) - (x position)) / (50))\n        change y by ((([y position v] of [プレイヤー v]) - (y position)) / (50))\n        point towards (プレイヤー v)\n        if <touching (mouse-pointer v)?> then\n            move (-3) steps\n        end\n    end\n    if <(time left\(残り時間\)) < [10]> then\n        repeat until <(time left\(残り時間\)) < [-1]>\n            change x by ((([x position v] of [プレイヤー v]) - (x position)) / (10))\n            change y by ((([y position v] of [プレイヤー v]) - (y position)) / (10))\n            point towards (プレイヤー v)\n            if <touching (mouse-pointer v)?> then\n                move (-10) steps\n            end\n        end\n    end\n    set [lock v] to [1]\n    glide (2) secs to x: (150) y: (0)\n    point in direction (90)\n    say (translate [ハァハァ、] to ((language::translate) v)::translate) for (1) seconds\n    say (translate [なかなかやるじゃねぇか…] to ((language::translate) v)::translate) for (1) seconds\n    say (translate [でも、俺様が負けたわけじゃねぇ…] to ((language::translate) v)::translate) for (1) seconds\n    say (translate [まだ、] to ((language::translate) v)::translate) for (1) seconds\n    repeat (20)\n        say (translate [お前復活するし] to ((language::translate) v)::translate) for (0.01) seconds\n        say (translate [お前ずっと逃げてただけだし、] to ((language::translate) v)::translate) for (0.01) seconds\n        say (translate [お前なんか能力持ってるし、] to ((language::translate) v)::translate) for (0.01) seconds\n        say (translate [時間もあるし、] to ((language::translate) v)::translate) for (0.01) seconds\n    end\n    say (translate [ああああああああああああああああああ] to ((language::translate) v)::translate) for (1) seconds\n    start sound [Crazy Laugh v]\n    repeat (15)\n        point in direction (pick random (1) to (360))\n        go to x: (150) y: (0)\n        move (pick random (50) to (200)) steps\n    end\n    hide\n    set [lock v] to [0]\n    broadcast (クリア‼！ v)\nend\n\nwhen I start as a clone\nif < (costume [name v]) contains [Base]?> then\n    start sound [Basketball Bounce v]\n    set [a v] to [0]\n    switch costume to (baseball v)\n    show\n    go to x: (pick random (240) to (-240)) y: (180)\n    repeat until <touching (地面 v)?>\n        change y by (a)\n        change [a v] by (-1)\n    end\n    set [a v] to [5]\n    change y by (a)\n    repeat until <touching (地面 v)?>\n        change y by (a)\n        change [a v] by (-1)\n    end\n    set [a v] to [2]\n    change y by (a)\n    repeat until <touching (地面 v)?>\n        change y by (a)\n        change [a v] by (-1)\n    end\nend\nif < (costume [name v]) contains [針]?> then\n    switch costume to (針 v)\n    show\n    go to x: (pick random (240) to (-240)) y: (-200)\n    start sound [Hey v]\n    glide (0.5) secs to x: (x position) y: (-150)\n    glide (0.5) secs to x: (x position) y: (-200)\nend\ndelete this clone\n\nwhen I receive [カウントダウン v]\nrepeat until <(time left\(残り時間\)) < [-1]>\n    if <(復活してない) = [0]> then\n        change [time left\(残り時間\) v] by (-1)\n        wait (1) seconds\n    end\nend\n\nchange [stage v] by (1)\n\nwhen I receive [endロール v]\nstop [other scripts in sprite v]\n\n@gameover\n\nwhen I receive [game over v]\nshow\nstart sound [やられた v]\nstart sound [落ち v]\nwait (0.45) seconds\nwait until <<key (r v) pressed?> or <mouse down?>>\nstop all sounds\nhide\n\nwhen flag clicked\nhide\n\nwhen I receive [endロール v]\nstop [other scripts in sprite v]\n\n@PixelMplus\n\ndefine 🖌 PDTE ( x= (x) , y= (y) , size= (size) , penSize= (pens) , color= (color) , L-C-R= (lcr) , text= (text) )\nset [len v] to [0]\nif < [lc] contains (lcr)?> then\n    set [counter-x v] to [0]\n    repeat (length of (text))\n        change [counter-x v] by (1)\n        if < [!"#$%&'\(\)*+,-./0123456789:;<=>?@\[\\]^_`abcdefghijklmnopqrstuvwxyz{|}~ ] contains (letter (counter-x) of (text))?> then\n            change [len v] by (1)\n        end\n    end\nend\nif <(lcr) = [l]> then\n    go to x: ((x) - (((((length of (text)) - (len)) * (13)) + ((len) * (7))) * (size))) y: ((y) + ((size) * (6)))\nelse\n    if <(lcr) = [c]> then\n        go to x: (((x) + (size)) - ((((((length of (text)) - (len)) * (13)) + ((len) * (7))) * (size)) / (2))) y: ((y) + ((size) * (6)))\n    else\n        go to x: (x) y: ((y) + ((size) * (6)))\n    end\nend\nset pen size to (pens)\nset pen color to (color)\nset [pointer v] to [0]\nrepeat (length of (text))\n    change [pointer v] by (1)\n    set [in v] to (letter (pointer) of (text))\n    if <not < [ 　] contains (in)?>> then\n        set [l v] to [0]\n        set [r v] to [2420]\n        repeat until <(l) = (r)>\n            if <(letter ([floor v] of (((l) + (r)) / (2)) ) of (文字表)) < (in)> then\n                set [l v] to (([floor v] of (((l) + (r)) / (2)) ) + (1))\n            else\n                set [r v] to ([floor v] of (((l) + (r)) / (2)) )\n            end\n        end\n        set [out v] to (l)\n    else\n        if <(in) = [　]> then\n            set [out v] to [-1]\n        else\n            set [out v] to [0]\n        end\n    end\n    if <[32] < (out)> then\n        if <(out) < [65]> then\n            switch costume to (null v)\n            switch costume to (in)\n            if <(costume [name v]) = (in)> then\n                change [out v] by (26)\n            else\n                change [out v] by (-6)\n            end\n        else\n            change [out v] by (26)\n        end\n    end\n    if < [\[\\]^_`] contains (in)?> then\n        set [out v] to ((58) + (item # of (in) in [_p v]))\n    end\n    if <[0] < (out)> then\n        set [cn v] to (out)\n        if <(cn) < [95]> then\n            set [half v] to [True]\n        else\n            set [half v] to [False]\n        end\n        set [tmp v] to (item (cn) of [フォントデータ v])\n        set [counter-x v] to [1]\n        set [stack v] to []\n        set [switch v] to (letter (counter-x) of (tmp))\n        repeat until <(length of (tmp)) = (counter-x)>\n            change [counter-x v] by (1)\n            if <(letter (counter-x) of (tmp)) = [,]> then\n                change [counter-x v] by (1)\n                set [switch v] to (letter (counter-x) of (tmp))\n                change y by ((size) * (-1))\n                if <(cn) < [95]> then\n                    change x by ((size) * (-6))\n                else\n                    change x by ((size) * (-12))\n                end\n            else\n                if <(switch) = [1]> then\n                    pen down\n                else\n                    pen up\n                end\n                change x by ((join [0x] (letter (counter-x) of (tmp))) * (size))\n                if <(switch) = [1]> then\n                    set [switch v] to [0]\n                else\n                    set [switch v] to [1]\n                end\n            end\n        end\n        pen up\n        change y by ((size) * (11))\n        change x by ((size) * (1))\n    else\n        if <(out) = [-1]> then\n            change x by ((size) * (13))\n        else\n            change x by ((size) * (7))\n        end\n    end\nend\n\nwhen flag clicked\nset [time left\(残り時間\) v] to [30]\nerase all\nset RGB ( R= [00] , G= [0] , B= [0] )\n🖌 PDTE ( x= [0] , y= [160] , size= [2] , penSize= [2] , color= (RGB) , L-C-R= [c] , text= [世界記録\(world record\)] )\n🖌 PDTE ( x= [0] , y= [130] , size= [2] , penSize= [2] , color= (RGB) , L-C-R= [c] , text= (☁ number of times dead\(死んだ回数\)) )\nset RGB ( R= [ff] , G= [0] , B= [0] )\n🖌 PDTE ( x= [0] , y= [80] , size= [4] , penSize= [4] , color= (RGB) , L-C-R= [c] , text= [！超簡単！] )\nset RGB ( R= [00] , G= [0] , B= [0] )\n🖌 PDTE ( x= [0] , y= [20] , size= [2] , penSize= [3] , color= (RGB) , L-C-R= [c] , text= [プラットフォーマー] )\nset RGB ( R= [dd] , G= [0] , B= [0] )\n🖌 PDTE ( x= [0] , y= [-60] , size= [6] , penSize= [6] , color= (RGB) , L-C-R= [c] , text= [START] )\nset RGB ( R= [00] , G= [0] , B= [0] )\n🖌 PDTE ( x= [0] , y= [-120] , size= [1] , penSize= [1] , color= (RGB) , L-C-R= [c] , text= [タップ or スペースキー] )\n🖌 PDTE ( x= [0] , y= [-140] , size= [1] , penSize= [1] , color= (RGB) , L-C-R= [c] , text= [tap or space key] )\nwait until <not <<key (space v) pressed?> or <mouse down?>>>\nwait until <<key (space v) pressed?> or <mouse down?>>\nerase all\nbroadcast (スタート v)\n\ndefine test\nset [pixelmplus: y v] to [0]\nrepeat (13)\n    change [pixelmplus: y v] by (1)\n    set [stack v] to []\n    repeat (20)\n        if <(pick random (0) to (1)) = [0]> then\n            set [stack v] to (join (stack) (letter (pick random (1) to (length of (文字表))) of (文字表)))\n        else\n            set [stack v] to (join (stack) (letter (pick random (95) to (271)) of (文字表)))\n        end\n    end\n    🖌 PDTE ( x= [-135] , y= ((140) + (() - ((PixelMplus: y) * (18)))) , size= [1] , penSize= [1] , color= ((pick random (0) to (255)) + (((256) * (pick random (0) to (255))) + ((65536) * (pick random (0) to (255))))) , L-C-R= [] , text= (stack) )\nend\n\ndefine set RGB ( R= (r) , G= (g) , B= (b) )\nset [rgb v] to ((join [0x] (b)) + (((256) * (join [0x] (g))) + ((65536) * (join [0x] (r)))))\n\nwhen I receive [次のステージ v]\nif <(stage) = [12]> then\n    set RGB ( R= [00] , G= [0] , B= [0] )\n    repeat until <(time left\(残り時間\)) < [-1]>\n        erase all\n        if <(time left\(残り時間\)) > [9]> then\n            🖌 PDTE ( x= [-200] , y= [140] , size= [4] , penSize= [4] , color= (RGB) , L-C-R= [c] , text= (join (letter (1) of (time left\(残り時間\))) (letter (2) of (time left\(残り時間\)))) )\n            🖌 PDTE ( x= [-100] , y= [130] , size= [2] , penSize= [2] , color= (RGB) , L-C-R= [c] , text= [second\(秒\)] )\n        else\n            🖌 PDTE ( x= [-200] , y= [140] , size= [4] , penSize= [4] , color= (RGB) , L-C-R= [c] , text= (letter (1) of (time left\(残り時間\))) )\n            🖌 PDTE ( x= [-100] , y= [130] , size= [2] , penSize= [2] , color= (RGB) , L-C-R= [c] , text= [second\(秒\)] )\n        end\n    end\nend\nerase all\n\n@白\n\nwhen flag clicked\nhide variable [☁ number of times dead\(死んだ回数\) v]\nhide\n\nwhen I receive [六なる v]\nswitch costume to (コスチューム1 v)\ngo to [front v] layer\nset [lock v] to [1]\nshow\nset [ghost v] effect to (100)\nrepeat (20)\n    change [ghost v] effect by (-5)\nend\nwait (1) seconds\nbroadcast (endロール v)\nwait (0.5) seconds\nrepeat (20)\n    change [ghost v] effect by (5)\nend\n\nwhen I receive [thank you for playing v]\nshow variable [☁ number of times dead\(死んだ回数\) v]\nswitch costume to (コスチューム2 v)\ngo to [front v] layer\nshow\nset [ghost v] effect to (100)\nrepeat (20)\n    change [ghost v] effect by (-5)\nend\nset [☁ あなたの記録\(記録用\) v] to (死んだ回数)\nif <(変数) = [0]> then\n    if <(☁ number of times dead\(死んだ回数\)) > (死んだ回数)> then\n        set [☁ number of times dead\(死んだ回数\) v] to (死んだ回数)\n    end\nend\n\n@最後の草むら\n\nwhen flag clicked\ngo to [back v] layer\nhide\n\nwhen I receive [endロール v]\nhide\ncreate clone of (_myself_ v)\n\nwhen I start as a clone\nshow\ngo to x: (535) y: (0)\ngo to [back v] layer\nglide (3) secs to x: (0) y: (0)\ncreate clone of (_myself_ v)\nglide (3.2) secs to x: (-535) y: (0)\ndelete this clone\n\n@end roll\n\nwhen flag clicked\nhide\n\nwhen I receive [endロール v]\nswitch costume to (コスチューム1 v)\nhide\nrepeat (6)\n    create clone of (_myself_ v)\n    next costume\n    wait (6) seconds\nend\n\nwhen I start as a clone\nshow\ngo to x: (0) y: (-205)\nglide (8) secs to x: (0) y: (205)\ndelete this clone\n\n@サムネ\n\nwhen flag clicked\nhide\n\n@タボモは禁止ぃ\n\nwhen flag clicked\nswitch costume to (コスチューム1 v)\nforever\n    reset timer\n    repeat (10)\n        switch costume to (コスチューム1 v)\n    end\n    if <[0.1] > (timer)> then\n        point in direction (90)\n        switch costume to (コスチューム2 v)\n        stop [all v]\n    else\n        switch costume to (コスチューム1 v)\n    end\nend\n\n@みんなのコメント！\n\nwhen flag clicked\nset [stage v] to [0]\nclear graphic effects\nhide\nset size to (100) %\npoint in direction (90)\nwait until <(stage) = [1]>\nif <(stage) = [1]> then\n    go to x: (0) y: (-150)\n    switch costume to (最初 v)\n    wait until <([x position v] of [プレイヤー v]) > [0]>\n    show\n    set [重力 v] to [10]\n    repeat until <(重力) = [0]>\n        change y by (重力)\n        change [重力 v] by (-0.5)\n    end\n    wait (1) seconds\n    repeat (50)\n        change [ghost v] effect by (2)\n    end\n    hide\nend\n\nwhen I receive [次のステージ v]\nstop [other scripts in sprite v]\nclear graphic effects\nhide\nif <(stage) = [2]> then\n    go to x: (60) y: (-180)\n    switch costume to (2ステージ目 v)\n    wait until <([x position v] of [プレイヤー v]) > [50]>\n    show\n    set [重力 v] to [10]\n    repeat until <(重力) = [0]>\n        change y by (重力)\n        change [重力 v] by (-0.5)\n    end\n    wait (1) seconds\n    repeat (50)\n        change [ghost v] effect by (2)\n    end\n    hide\nend\nif <(stage) = [3]> then\n    go to x: (100) y: (-150)\n    switch costume to (針があるとこ\(多分最初\) v)\n    wait until <([x position v] of [プレイヤー v]) > [-10]>\n    show\n    set [重力 v] to [10]\n    repeat until <(重力) = [0]>\n        change y by (重力)\n        change [重力 v] by (-0.5)\n    end\n    wait (1) seconds\n    repeat (50)\n        change [ghost v] effect by (2)\n    end\n    hide\nend\nclear graphic effects\nif <(stage) = [3]> then\n    go to x: (100) y: (-150)\n    switch costume to (針\(2回目\) v)\n    wait until <([x position v] of [プレイヤー v]) > [10]>\n    create clone of (_myself_ v)\n    show\n    set [重力 v] to [10]\n    repeat until <(重力) = [0]>\n        change y by (重力)\n        change [重力 v] by (-0.5)\n    end\n    wait (1) seconds\n    repeat (50)\n        change [ghost v] effect by (2)\n    end\n    hide\nend\nclear graphic effects\nif <(stage) = [3]> then\n    go to x: (50) y: (-150)\n    switch costume to (針\(3回目\) v)\n    wait until <([x position v] of [プレイヤー v]) > [160]>\n    show\n    set [重力 v] to [10]\n    repeat until <(重力) = [0]>\n        change y by (重力)\n        change [重力 v] by (-0.5)\n    end\n    wait (1) seconds\n    repeat (50)\n        change [ghost v] effect by (2)\n    end\n    hide\nend\nif <(stage) = [4]> then\n    go to x: (50) y: (-150)\n    switch costume to (マグマ v)\n    wait until <([x position v] of [プレイヤー v]) > [-90]>\n    show\n    set [重力 v] to [10]\n    repeat until <(重力) = [0]>\n        change y by (重力)\n        change [重力 v] by (-0.5)\n    end\n    wait (1) seconds\n    repeat (50)\n        change [ghost v] effect by (2)\n    end\n    hide\nend\nif <(stage) = [5]> then\n    go to x: (-50) y: (-150)\n    switch costume to (ボール1回目 v)\n    show\n    set [重力 v] to [10]\n    repeat until <(重力) = [0]>\n        change y by (重力)\n        change [重力 v] by (-0.5)\n    end\n    wait (1) seconds\n    repeat (50)\n        change [ghost v] effect by (2)\n    end\n    hide\nend\nclear graphic effects\nif <(stage) = [5]> then\n    go to x: (50) y: (-150)\n    switch costume to (ボール2回目 v)\n    wait until <([x position v] of [プレイヤー v]) > [120]>\n    show\n    set [重力 v] to [10]\n    repeat until <(重力) = [0]>\n        change y by (重力)\n        change [重力 v] by (-0.5)\n    end\n    wait (1) seconds\n    repeat (50)\n        change [ghost v] effect by (2)\n    end\n    hide\nend\nif <(stage) = [8]> then\n    go to x: (0) y: (-150)\n    switch costume to (2回連続穴 v)\n    wait until <([x position v] of [プレイヤー v]) > [130]>\n    show\n    set [重力 v] to [10]\n    repeat until <(重力) = [0]>\n        change y by (重力)\n        change [重力 v] by (-0.5)\n    end\n    wait (1) seconds\n    repeat (50)\n        change [ghost v] effect by (2)\n    end\n    hide\nend\nif <(stage) = [10]> then\n    go to x: (0) y: (-150)\n    switch costume to (針大量 v)\n    wait until <([x position v] of [プレイヤー v]) > [-60]>\n    show\n    set [重力 v] to [10]\n    repeat until <(重力) = [0]>\n        change y by (重力)\n        change [重力 v] by (-0.5)\n    end\n    wait (1) seconds\n    repeat (50)\n        change [ghost v] effect by (2)\n    end\n    hide\nend\nif <(stage) = [11]> then\n    go to x: (30) y: (-150)\n    switch costume to (boss v)\n    wait until <([x position v] of [プレイヤー v]) > [100]>\n    show\n    set [重力 v] to [10]\n    repeat until <(重力) = [0]>\n        change y by (重力)\n        change [重力 v] by (-0.5)\n    end\n    wait (1) seconds\n    repeat (50)\n        change [ghost v] effect by (2)\n    end\n    hide\nend\nif <(stage) = [12]> then\n    go to x: (30) y: (-150)\n    switch costume to (ジャイアン1 v)\n    wait until <[0] > ([x position v] of [針など v])>\n    show\n    set [重力 v] to [10]\n    repeat until <(重力) = [0]>\n        change y by (重力)\n        change [重力 v] by (-0.5)\n    end\n    wait (1) seconds\n    repeat (50)\n        change [ghost v] effect by (2)\n    end\n    hide\nend\n\nwhen I start as a clone\ngo to x: (-100) y: (-150)\nswitch costume to (針\(2回目\)2 v)\nshow\nset [重力 v] to [10]\nrepeat until <(重力) = [0]>\n    change y by (重力)\n    change [重力 v] by (-0.5)\nend\nwait (1) seconds\nrepeat (50)\n    change [ghost v] effect by (2)\nend\nhide\n\n