☁Grassland platformer　(Normal difficulty）# platformer

Instructions: モバイル対応‼\n\n←↑→キーで操作\n← ↑ → Operate with keys\n\n(遊び方は、ゲームの中にもあります）

@Stage\n\nwhen flag clicked\nhide variable [☁ 世界記録 v]\nhide variable [☁ タイム v]\n\nwhen I receive [イントロ終わり v]\nwait (1) seconds\nforever\n    play sound [Treenan2 v] until done\nend\n\nwhen I receive [スタート v]\nshow variable [☁ タイム v]\nset [☁ タイム v] to [0]\nforever\n    repeat until <([costume # v] of [ステージ v]) = [12]>\n        change [☁ タイム v] by (1)\n        wait (1) seconds\n    end\n    show variable [☁ タイム v]\n    if <(☁ タイム) < (☁ 世界記録)> then\n        set [☁ 世界記録 v] to (☁ タイム)\n        show variable [☁ 世界記録 v]\n        stop [this script v]\n    else\n        show variable [☁ 世界記録 v]\n        stop [this script v]\n    end\nend\n\n@スプライト1\n\ndefine reset  X (x) Y (y)\nreset timer\ngo to x: (x) y: (y)\nset [y v] to [0]\nset [x v] to [0]\nset rotation style [left-right v]\npoint in direction (90)\nclear graphic effects\n\ndefine (フレーム) フレームでx (x) y (y) にする\nset [差 v] to (フレーム)\nrepeat until <(差) < [1]>\n    change x by ((((x) - (x position)) / (フレーム)) * ((フレーム) - (差)))\n    change y by ((((y) - (y position)) / (フレーム)) * ((フレーム) - (差)))\n    change [差 v] by (-1)\nend\ngo to x: (x) y: (y)\n\nwhen flag clicked\npoint in direction (90)\ngo to x: (0) y: (25)\n\nwhen flag clicked\nforever\n    if <[240] < (x position)> then\n        broadcast (変わる v)\n        go to x: (-214) y: (50)\n        wait (1) seconds\n    end\n    if <(y position) < [-180]> then\n        start sound [ナイフを投げる \(1\) v]\n        (15) フレームでx (-214) y (50) にする\n        show\n    end\nend\n\nwhen I receive [スタート v]\ngo to [front v] layer\nshow\npoint in direction (90)\nstart sound [ナイフを投げる \(1\) v]\n(15) フレームでx (-214) y (151) にする\nset [変数 v] to [0]\nset [y v] to [0]\nforever\n    change x by (変数)\n    if <<key (right arrow v) pressed?> or <<key (d v) pressed?> or <<mouse down?> and <[0] < (mouse x)>>>> then\n        change [変数 v] by (1)\n        switch costume to (右 v)\n    end\n    if <<key (left arrow v) pressed?> or <<key (a v) pressed?> or <<mouse down?> and <(mouse x) < [0]>>>> then\n        change [変数 v] by (-1)\n        switch costume to (左 v)\n    end\n    set [変数 v] to ((変数) * (0.9))\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 ((変数) * (-1))\n                            change y by (-5)\n                            if <key (up arrow v) pressed?> then\n                                if <(変数) > [0]> then\n                                    set [変数 v] to [-7]\n                                else\n                                    set [変数 v] to [7]\n                                end\n                                set [y v] to [-2]\n                            else\n                                set [変数 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 (ステージ v)?> then\n        if <<key (up arrow v) pressed?> or <<key (w v) pressed?> or <<mouse down?> and <[0] < (mouse y)>>>> then\n            start sound [se_jump1 \(1\) v]\n            set [y v] to [15]\n        end\n    end\n    change y by (1)\n    change [y v] by (-1)\n    change y by (y)\n    if <touching (ステージ v)?> then\n        change y by ((y) * (-1))\n        set [y v] to [0]\n    end\n    if <not <<key (right arrow v) pressed?> or <key (left arrow v) pressed?>>> then\n        switch costume to (正面 v)\n    end\n    if <<touching (障害物 v)?> or <touching (障害ブ2 v)?>> then\n        start sound [Crunch v]\n        set [ok v] to [1]\n        set rotation style [all around v]\n        set [y v] to [10]\n        repeat (20)\n            change [y v] by (-1)\n            change [ghost v] effect by (5)\n            turn right (8) degrees\n            change y by (Y)\n        end\n        set [ok v] to [0]\n        reset  X [-200] Y [0]\n    end\n    if <key (up arrow v) pressed?> then\n        switch costume to (上 v)\n    end\n    if <key (down arrow v) pressed?> then\n        switch costume to (下 v)\n    end\nend\n\nwhen I receive [2 v]\ngo to [front v] layer\n\n@ステージ\n\nwhen flag clicked\nswitch costume to (コスチューム1 v)\ngo to [back v] layer\n\nwhen I receive [変わる v]\nnext costume\n\nwhen I receive [イントロ終わり v]\n\n@背景\n\nwhen flag clicked\nswitch costume to (コスチューム1 v)\nwait (1) seconds\ngo to [back v] layer\n\nwhen I receive [変わる v]\nnext costume\n\n@障害物\n\nwhen I receive [変わる v]\nnext costume\n\nwhen flag clicked\nswitch costume to (コスチューム2 v)\ngo to [back v] layer\n\n@障害ブ2\n\nwhen flag clicked\ngo to x: (0) y: (-78)\nhide\nforever\n    turn right (5) degrees\nend\n\nwhen flag clicked\nforever\n    if <([costume name v] of [ステージ v]) = [aa]> then\n        show\n    else\n        hide\n    end\nend\n\n@スプライト11\n\nwhen I receive [2 v]\ngo to [front v] layer\nshow\nrepeat (20)\n    change [ghost v] effect by (-5)\nend\nclear graphic effects\nforever\n    if <touching (mouse-pointer v)?> then\n        set [ghost v] effect to (30)\n    else\n        clear graphic effects\n    end\nend\n\nwhen flag clicked\nswitch costume to (コスチューム1 v)\ngo to x: (0) y: (-6)\nset [ghost v] effect to (100)\nhide\n\nwhen this sprite clicked\nstart sound [決定、ボタン押下2 v]\ngo to [front v] layer\nnext costume\n\nwhen I receive [スタート v]\nhide\n\n@スプライト3\n\nwhen flag clicked\nset [speed v] to [5]\nset [範囲 v] to [10]\ngo to x: (0) y: (0)\nshow\nset [変数 v] to [0]\n\nwhen flag clicked\ngo to [front v] layer\n\nwhen flag clicked\nshow\n\ndefine (フレーム) フレームでx (x) y (y) にする\nset [差 v] to (フレーム)\nrepeat until <(差) < [1]>\n    change x by ((((x) - (x position)) / (フレーム)) * ((フレーム) - (差)))\n    change y by ((((y) - (y position)) / (フレーム)) * ((フレーム) - (差)))\n    change [差 v] by (-1)\nend\n\nwhen this sprite clicked\nstart sound [決定、ボタン押下3 \(1\) v]\nrepeat (20)\n    change [ghost v] effect by (5)\nend\nhide\nbroadcast (2 v)\n\nwhen flag clicked\nforever\n    set y to (([sin v] of (あひ) ) * (範囲))\n    change [あひ v] by ((speed) / (2))\nend\n\n@スプライト5\n\nwhen flag clicked\nshow\n\nwhen I receive [2 v]\nrepeat (20)\n    change [ghost v] effect by (5)\nend\n\n@スプライト4\n\nwhen flag clicked\nset size to (100) %\ngo to [back v] layer\nforever\n    wait (0.1) seconds\n    repeat (10)\n        change size by (-1)\n    end\n    wait (0.1) seconds\n    repeat (10)\n        change size by (1)\n    end\n    wait (0.1) seconds\nend\n\n@スプライト6\n\nwhen I receive [2 v]\nshow\nrepeat (20)\n    change [ghost v] effect by (-5)\nend\nclear graphic effects\nforever\n    if <touching (mouse-pointer v)?> then\n        set [ghost v] effect to (30)\n    else\n        clear graphic effects\n    end\nend\n\nwhen flag clicked\ngo to [front v] layer\ngo to x: (0) y: (-76)\nset [ghost v] effect to (100)\nhide\n\nwhen this sprite clicked\nstart sound [決定、ボタン押下3 \(2\) v]\nbroadcast (スタート v)\nhide\n\n@スプライト12\n\nwhen I receive [2 v]\ngo to [front v] layer\nshow\nrepeat (20)\n    change [ghost v] effect by (-5)\nend\nclear graphic effects\nforever\n    if <touching (mouse-pointer v)?> then\n        set [ghost v] effect to (30)\n    else\n        clear graphic effects\n    end\nend\n\nwhen flag clicked\nswitch costume to (コスチューム1 v)\ngo to x: (0) y: (-6)\nset [ghost v] effect to (100)\nhide\n\nwhen this sprite clicked\nstart sound [決定、ボタン押下2 v]\ngo to [front v] layer\nnext costume\n\nwhen I receive [スタート v]\nhide\n\n@スプライト7\n\nwhen flag clicked\nshow\nset [ghost v] effect to (50)\n\nwhen I receive [スタート v]\nhide\n\n@スプライト8\n\nwhen flag clicked\nhide\n\nwhen I receive [スタート v]\nshow\n\n@ターボを対策\n\nwhen flag clicked\nforever\n    wait (0.01) seconds\n    set [ターボ対策 v] to [0]\nend\n\nwhen flag clicked\nhide\nforever\n    if <(ターボ対策) > [10000]> then\n        broadcast (最後 v)\n    end\nend\n\nwhen I receive [最後 v]\nshow\ngo to [front v] layer\nstop [all v]\n\nwhen flag clicked\nset [ターボ対策 v] to [0]\nforever\n    change [ターボ対策 v] by (10)\nend\n\n@スプライト10\n\nwhen flag clicked\nchange [ghost v] effect by (100)\n\nwhen flag clicked\nforever\n    go to [front v] layer\nend\n\nshow\n\n@intro\n\nwhen flag clicked\ngo to [front v] layer\nbroadcast (intro v)\n\nwhen I start as a clone\nif <(clone name) = [背景]> then\n    show\n    point in direction (90)\n    clear graphic effects\n    set size to (100) %\n    go to x: (0) y: (0)\n    switch costume to (背景 v)\n    wait (4) seconds\n    repeat (10)\n        change [ghost v] effect by (10)\n    end\n    delete this clone\nend\nif <(clone name) = [ユーザーネーム]> then\n    show\n    set size to (100) %\n    go to x: (0) y: (180)\n    switch costume to (kutytya v)\n    go [forward v] (5) layers\n    point in direction (90)\n    repeat (20)\n        change y by (((6) - (y position)) / (3))\n    end\n    repeat (13)\n        change y by (-1)\n    end\n    repeat (11)\n        change y by ((y position) / (3))\n    end\n    delete this clone\nend\nif <(clone name) = [線]> then\n    show\n    set size to (100) %\n    go to x: (300) y: (150)\n    switch costume to (線 v)\n    go [forward v] (5) layers\n    point in direction (90)\n    repeat (20)\n        change x by (((0) - (x position)) / (3))\n    end\n    repeat (13)\n        change x by (-1)\n    end\n    repeat (11)\n        set x to ((x position) / (0.7))\n    end\n    delete this clone\nend\nif <(clone name) = [線1]> then\n    show\n    set size to (100) %\n    go to x: (-300) y: (-150)\n    switch costume to (線 v)\n    go [forward v] (5) layers\n    point in direction (90)\n    repeat (20)\n        change x by (((0) - (x position)) / (3))\n    end\n    repeat (13)\n        change x by (1)\n    end\n    repeat (11)\n        set x to ((x position) / (0.7))\n    end\n    delete this clone\nend\n\ndefine クローン\nset [clone name v] to [ユーザーネーム]\ncreate clone of (_myself_ v)\nset [clone name v] to [線]\ncreate clone of (_myself_ v)\nset [clone name v] to [線1]\ncreate clone of (_myself_ v)\n\nwhen I receive [intro v]\nset [clone name v] to [背景]\ncreate clone of (_myself_ v)\ngo to x: (0) y: (0)\ngo to [front v] layer\nshow\nswitch costume to (サイズ無制限 v)\nset size to (1000) %\nswitch costume to (なにか v)\npoint in direction (-45)\nrepeat (15)\n    turn right (((90) - (direction)) / (3)) degrees\n    switch costume to (サイズ無制限 v)\n    change size by (((100) - (size)) / (3))\n    switch costume to (なにか v)\nend\nset size to (100) %\npoint in direction (90)\nrepeat (10)\n    change size by (-1)\nend\nrepeat (15)\n    switch costume to (サイズ無制限 v)\n    change size by ((size) / (3))\n    turn right ((direction) / (20)) degrees\n    switch costume to (なにか v)\nend\nクローン\nswitch costume to (サイズ無制限 v)\nset size to (5000) %\nswitch costume to (なにか v)\nwait (1.5) seconds\nset [a v] to [0]\nrepeat (20)\n    switch costume to (サイズ無制限 v)\n    change size by (((100) - (size)) / (3))\n    switch costume to (なにか v)\n    change [a v] by (1)\n    change y by (join [-] (a))\n    turn right (((90) - (direction)) / (3)) degrees\nend\nhide\nbroadcast (イントロ終わり v)\n\nwhen I receive [intro v]\nwait (0.1) seconds\nstart sound [birdland1 v]\n\n@Love fave\n\nwhen I receive [スタート v]\nhide\nforever\n    wait (pick random (10) to (15)) seconds\n    switch costume to (costume1 v)\n    go to x: (0) y: (50)\n    show\n    go to [front v] layer\n    start sound [pop v]\n    repeat (9)\n        change y by (-6)\n    end\n    repeat (5)\n        change y by (3)\n    end\n    repeat (5)\n        change y by (-1)\n    end\n    wait (2) seconds\n    repeat (15)\n        change y by (7)\n    end\n    hide\nend\n\n