【#9】rain platformer Japanese 【モバイル対応】

Instructions: 重い人はタボワ推奨\n___________________________________________\n【操作方法】\n矢印キー、WASDキー（モバイル対応）\n\n【難易度】\n★★☆☆☆\n\n【ストーリー】\n主人公（君）は晴れを目指して雨の中の散歩に行きます！主人公（君）に晴れを見せてあげましょう！\n\n【コメント】\nいやぁ、前作ではかなりの人気で傾向1位・コミュ好き・人気5Pなど一気にいろんなことを成し遂げることができました！ありがとうございます！

@Stage\n\nwhen flag clicked\nswitch backdrop to (black v)\n\nwhen I receive [スタート v]\nset volume to (50) %\nswitch backdrop to (rainy v)\nforever\n    play sound [Water v] until done\nend\n\nwhen I receive [nextステージ v]\nif <([costume # v] of [地面 v]) = [10]> then\n    switch backdrop to (sunny v)\nend\n\nwhen flag clicked\nhide variable [タイム v]\nset [タイム v] to [0]\n\nwhen I receive [スタート v]\nshow variable [タイム v]\nrepeat until <([costume # v] of [地面 v]) = [10]>\n    wait (1) seconds\n    change [タイム v] by (1)\nend\n\n@君\n\nwhen I receive [nextステージ v]\nswitch costume to (1 v)\ngo to x: (-180) y: (30)\nset [x v] to [0]\nset [y v] to [0]\n\nwhen I receive [スタート v]\nwait (0.02) seconds\nswitch costume to (1 v)\nshow\ngo to [front v] layer\ngo to x: (-180) y: (0)\npoint in direction (90)\nset rotation style [left-right v]\nset [x v] to [0]\nset [y v] to [0]\nforever\n    動作\nend\n\nwhen flag clicked\nhide\n\ndefine 動作\nif <(操作判定) = [0]> then\n    go to [front v] layer\n    set [マグマ v] to [0]\n    if <<<key (right arrow v) pressed?> or <key (d v) pressed?>> or <<mouse down?> and <(x position) < (mouse x)>>> then\n        switch costume to (2 v)\n        change [x v] by (1)\n    else\n        if <<<key (left arrow v) pressed?> or <key (a v) pressed?>> or <<mouse down?> and <(x position) > (mouse x)>>> then\n            switch costume to (3 v)\n            change [x v] by (-1)\n        else\n            switch costume to (1 v)\n        end\n    end\n    set [x v] to ((X) * (0.9))\n    change x by (X)\n    if <touching color (#3500ff)?> then\n        set [y v] to [20]\n    end\n    if <<touching color (#808080)?> or <touching color (#404040)?>> then\n        set [マグマ v] to [1]\n    end\n    if <<touching color (#00ff1e)?> or <<touching color (#00b315)?> or <<touching color (#ff9d00)?> or <touching color (#ffffff)?>>>> then\n        change x by ((X) * (-1))\n        if <<<key (up arrow v) pressed?> or <key (w v) pressed?>> or <<mouse down?> and <(mouse y) > (y position)>>> then\n            start sound [High Whoosh v]\n            if <(X) < [0]> then\n                set [x v] to [10]\n            else\n                set [x v] to [-10]\n            end\n            set [y v] to [13]\n        else\n            set [x v] to [0]\n        end\n    end\n    change [y v] by (-1)\n    change y by (Y)\n    if <touching color (#3500ff)?> then\n        set [y v] to [20]\n    end\n    if <<touching color (#808080)?> or <touching color (#404040)?>> then\n        set [マグマ v] to [1]\n    end\n    if <<touching color (#00ff1e)?> or <<<touching color (#ff9d00)?> or <touching color (#00b315)?>> or <touching color (#ffffff)?>>> then\n        change y by ((Y) * (-1))\n        set [y v] to [0]\n    end\n    change y by (-1)\n    if <<<<touching color (#00ff1e)?> or <<touching color (#ffffff)?> or <touching color (#ff9d00)?>>> and <key (up arrow v) pressed?>> or <<<<touching color (#00ff1e)?> or <<touching color (#ffffff)?> or <touching color (#ff9d00)?>>> and <key (w v) pressed?>> or <<<touching color (#00ff1e)?> or <<touching color (#ffffff)?> or <touching color (#ff9d00)?>>> and <<mouse down?> and <(mouse y) > (y position)>>>>> then\n        start sound [High Whoosh v]\n        set [y v] to [13]\n    end\n    change y by (1)\n    if <<(マグマ) = [1]> or <(y position) < [-160]>> then\n        再挑戦\n    end\n    if <(x position) > [230]> then\n        broadcast (NEXT v)\n        start sound [Magic Spell v]\n    end\nend\n\ndefine 再挑戦\nswitch costume to (1 v)\nstart sound [Oops v]\ngo to x: (-180) y: (30)\nset [x v] to [0]\nset [y v] to [0]\n\n@地面\n\nwhen flag clicked\nswitch costume to (コスチューム1 v)\nhide\n\nwhen I receive [スタート v]\nwait (0.01) seconds\ngo to x: (0) y: (0)\nshow\ngo to [front v] layer\n\nwhen I receive [nextステージ v]\nnext costume\n\n@ネクスト\n\nwhen flag clicked\nhide\n\nwhen I receive [next v]\nset [操作判定 v] to [1]\ngo to [front v] layer\ngo to x: (-400) y: (0)\nshow\nglide (0.5) secs to x: (0) y: (0)\nbroadcast (NEXTステージ v)\nwait (0.5) seconds\nglide (0.5) secs to x: (400) y: (0)\nset [操作判定 v] to [0]\nhide\n\n@AXTUKUN intro\n\nwhen flag clicked\nclear graphic effects\nhide\nswitch costume to (背景 v)\nset [intro v] to [0]\nreset timer\nrepeat (6)\n    change [intro v] by (1)\n    create clone of (_myself_ v)\n    next costume\nend\n\nwhen I start as a clone\nif <(intro) = [1]> then\n    set [ghost v] effect to (100)\n    show\n    wait until <(timer) > [2]>\n    go to [back v] layer\n    repeat (25)\n        change [ghost v] effect by (-4)\n    end\n    wait until <(timer) > [10.5]>\n    delete this clone\nelse\n    if <(intro) = [2]> then\n        go to x: (0) y: (-70)\n        wait until <(timer) > [3.3]>\n        go to [front v] layer\n        show\n        point in direction (90)\n        set [m v] to [0]\n        set size to (0) %\n        repeat (46)\n            set [m v] to (((m) * (0.75)) + (((130) - (size)) * (0.3)))\n            change size by (m)\n        end\n        repeat (145)\n            set x to ((([sin v] of (((timer) - (1)) * (100)) ) * (6)) + (0))\n            point in direction ((([sin v] of (((timer) - (1)) * (1000)) ) * (4)) + (90))\n        end\n        point in direction (90)\n        wait until <(timer) > [10.5]>\n        delete this clone\n    else\n        if <(intro) = [3]> then\n            go to x: (0) y: (60)\n            wait until <(timer) > [3.3]>\n            go to [front v] layer\n            show\n            point in direction (90)\n            set [m v] to [0]\n            set size to (0) %\n            repeat (46)\n                set [m v] to (((m) * (0.75)) + (((130) - (size)) * (0.3)))\n                change size by (m)\n            end\n            repeat (3)\n                set [m v] to [0]\n                set size to (130) %\n                point in direction (-90)\n                repeat (46)\n                    set [m v] to (((m) * (0.75)) + (((90) - (direction)) * (0.3)))\n                    turn right (m) degrees\n                end\n            end\n            wait until <(timer) > [10.5]>\n            delete this clone\n        else\n            if <(intro) = [4]> then\n                go to x: (0) y: (0)\n                set [ghost v] effect to (10)\n                wait until <(timer) > [3.3]>\n                show\n                repeat until <(timer) > [10.5]>\n                    set x to ((([sin v] of (((timer) - (1)) * (100)) ) * (6)) + (0))\n                    point in direction ((([sin v] of (((timer) - (1)) * (1000)) ) * (4)) + (90))\n                end\n                delete this clone\n            else\n                if <(intro) = [5]> then\n                    go to x: (0) y: (-300)\n                    wait until <(timer) > [10]>\n                    go to [front v] layer\n                    show\n                    glide (0.4) secs to x: (0) y: (0)\n                    wait (0.1) seconds\n                    glide (0.4) secs to x: (0) y: (-300)\n                    delete this clone\n                else\n                    if <(intro) = [6]> then\n                        go to x: (0) y: (300)\n                        wait until <(timer) > [10]>\n                        go to [front v] layer\n                        show\n                        glide (0.4) secs to x: (0) y: (0)\n                        wait (0.1) seconds\n                        broadcast (タイトル v)\n                        glide (0.4) secs to x: (0) y: (-300)\n                        delete this clone\n                    end\n                end\n            end\n        end\n    end\nend\n\nwhen flag clicked\nplay sound [TheFatRat - Monody v] until done\n\n@サムネ\n\nwhen flag clicked\nhide\n\nwhen I receive [タイトル v]\nswitch costume to (コスチューム2 v)\nshow\nwait until <<mouse down?> and <touching (mouse-pointer v)?>>\nhide\nbroadcast (スタート v)\n\n@雨\n\nwhen flag clicked\nhide\n\nwhen I receive [スタート v]\nrepeat until <([costume # v] of [地面 v]) = [10]>\n    wait (pick random (0.1) to (0.5)) seconds\n    create clone of (_myself_ v)\nend\n\nwhen I start as a clone\ngo to x: (pick random (-200) to (200)) y: (150)\nset [ghost v] effect to (50)\nshow\nglide (pick random (1) to (2)) secs to x: (pick random (-200) to (200)) y: (-30)\ndelete this clone\n\n