mountain platformer
@Stage\n\nwhen I receive [次のステージ v]\nnext backdrop\n\nwhen flag clicked\nswitch backdrop to (背景1 v)\n\n@地面\n\nwhen flag clicked\nswitch costume to ( v)\n\nwhen I receive [次のステージ v]\nnext costume\n\nwhen flag clicked\nforever\n    play sound [Kozah - Heavens \[NCS Release\] v] until done\nend\n\n@プレイヤー\n\nwhen I receive [動け v]\nset [動力\(x\) v] to [0]\nset [動力\(y\) v] to [0]\nshow\nset size to (40) %\ngo to x: (-201) y: (-80)\npoint in direction (90)\nforever\n    set [動力\(x\) v] to ((動力\(x\)) * (0.9))\n    if <key (any v) pressed?> then\n        change [動力\(x\) v] by (<key (right arrow v) pressed?> - <key (left arrow v) pressed?>)\n        point in direction ((<key (right arrow v) pressed?> - <key (left arrow v) pressed?>) * (90))\n    else\n        change [動力\(x\) v] by (<<mouse down?> and <(mouse x) > [0]>> - <<mouse down?> and <[0] > (mouse x)>>)\n        point in direction ((<<mouse down?> and <(mouse x) > [0]>> - <<mouse down?> and <[0] > (mouse x)>>) * (90))\n    end\n    change x by (動力\(x\))\n    if <touching (地面 v)?> then\n        change y by (1)\n    end\n    if <touching (地面 v)?> then\n        change y by (1)\n    end\n    if <touching (地面 v)?> then\n        change y by (1)\n    end\n    if <touching (地面 v)?> then\n        change y by (1)\n    end\n    if <touching (地面 v)?> then\n        change y by (1)\n    end\n    if <touching (地面 v)?> then\n        change y by (1)\n    end\n    if <touching (地面 v)?> then\n        change x by ((動力\(x\)) * (-1))\n        change y by (-6)\n        if <<key (up arrow v) pressed?> or <<mouse down?> and <(mouse y) > [0]>>> then\n            if <(動力\(x\)) > [0]> then\n                set [動力\(x\) v] to [-7]\n            else\n                set [動力\(x\) v] to [7]\n            end\n            set [動力\(y\) v] to [10]\n        else\n            set [動力\(x\) v] to [0]\n        end\n    end\n    change y by (-1)\n    if <touching (地面 v)?> then\n        if <<key (up arrow v) pressed?> or <<mouse down?> and <(mouse y) > [0]>>> then\n            set [動力\(y\) v] to [15]\n        end\n    end\n    if <touching (ジャンプ台 v)?> then\n        set [動力\(y\) v] to [10]\n        if <<key (up arrow v) pressed?> or <<mouse down?> and <(mouse y) > [0]>>> then\n            set [動力\(y\) v] to [25]\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 <(x position) > [230]> then\n        初期設定\n        broadcast (次のステージ v)\n    end\n    if <(y position) < [-170]> then\n        初期設定\n    end\nend\n\nwhen flag clicked\nswitch backdrop to (背景1 v)\nbroadcast (動け v)\n\ndefine 初期設定\nset [動力\(y\) v] to [0]\nset [動力\(x\) v] to [0]\ngo to x: (-201) y: (-80)\n\nwhen flag clicked\nforever\n    create clone of (_myself_ v)\nend\n\nwhen I start as a clone\nset [brightness v] effect to (-25)\nrepeat (20)\n    change [ghost v] effect by (7)\nend\ndelete this clone\n\n@Love fave\n\nwhen flag clicked\nforever\n    show\nend\n\n@カーソル\n\nwhen flag clicked\nset [ghost v] effect to (50)\nforever\n    go to [front v] layer\n    go to (mouse-pointer v)\nend\n\ndefine エフェクト1\nset [ghost v] effect to (0)\nwait until <not <mouse down?>>\nrepeat (10)\n    change [ghost v] effect by (5)\nend\n\nwhen flag clicked\nshow\nforever\n    if <mouse down?> then\n        エフェクト1\n    end\nend\n\n@スプライト1\n\nwhen flag clicked\nhide\ngo to x: (294) y: (160)\nforever\n    wait (pick random (0.5) to (0.2)) seconds\n    create clone of (_myself_ v)\nend\n\nwhen I start as a clone\nset [ghost v] effect to (pick random (0) to (20))\nset [brightness v] effect to (pick random (0) to (-5))\nset y to (pick random (160) to (110))\nshow\nrepeat (30)\n    move (pick random (-5) to (-30)) steps\nend\ndelete this clone\n\n@スプライト2\n\nwhen flag clicked\nforever\n    go to (プレイヤー v)\n    move (-20) steps\n    change y by (15)\nend\n\n@スプライト3\n\nwhen flag clicked\nhide\n\n
スマホ対応！\nマウス操作か矢印キー操作です\n\nなぜ斧を持たせたかって？\n雰囲気だよ(๑•ૅㅁ•๑)//