platformer _素材

Instructions: https://scratch.mit.edu/projects/730900912/\n\n＊platformer素材\n＊クレジット表記はお願いします。\n＊背景はもう1つ入っています。

@Stage\n\nwhen flag clicked\nswitch backdrop to (背景1 v)\n\n@1\n\nwhen flag clicked\npoint in direction (90)\nforever\n    next costume\n    wait (0.1) seconds\nend\n\nwhen flag clicked\ngo to [front v] layer\nforever\n    go to x: ([x position v] of [player v]) y: (([y position v] of [player v]) + (35))\nend\n\n@2\n\n@4\n\n@5\n\n@8\n\nwhen flag clicked\nforever\n    set rotation style [left-right v]\n    point in direction (90)\n    repeat (3)\n        switch costume to (コスチューム1 v)\n        repeat (6)\n            next costume\n            wait (0.035) seconds\n        end\n    end\n    switch costume to (コスチューム8 v)\n    wait (0.1) seconds\n    point in direction (-90)\n    repeat (3)\n        switch costume to (コスチューム1 v)\n        repeat (6)\n            next costume\n            wait (0.035) seconds\n        end\n    end\n    switch costume to (コスチューム8 v)\n    wait (0.1) seconds\nend\n\n@9\n\nwhen flag clicked\nforever\n    set rotation style [left-right v]\n    point in direction (90)\n    repeat (3)\n        switch costume to (コスチューム1 v)\n        repeat (6)\n            next costume\n            wait (0.05) seconds\n        end\n    end\n    switch costume to (コスチューム8 v)\n    wait (0.1) seconds\n    point in direction (-90)\n    repeat (3)\n        switch costume to (コスチューム1 v)\n        repeat (6)\n            next costume\n            wait (0.05) seconds\n        end\n    end\n    switch costume to (コスチューム8 v)\n    wait (0.1) seconds\nend\n\n@11\n\nwhen flag clicked\nforever\n    repeat (5)\n        switch costume to (コスチューム1 v)\n        wait (0.2) seconds\n        switch costume to (コスチューム10 v)\n        wait (0.2) seconds\n    end\n    repeat (8)\n        next costume\n        wait (0.1) seconds\n    end\nend\n\n@10\n\nwhen flag clicked\nforever\n    next costume\n    wait (0.1) seconds\nend\n\nwhen flag clicked\npoint in direction (90)\n\nwhen flag clicked\nset [変数 v] to [0]\nforever\n    change [変数 v] by (1)\nend\n\n@❤︎\n\n@15\n\nwhen flag clicked\nforever\n    next costume\nend\n\nwhen flag clicked\nset rotation style [don't rotate v]\nforever\n    turn right (-15) degrees\n    move (1) steps\nend\n\n@12\n\n@スプライト1\n\n@スプライト4\n\nwhen flag clicked\nforever\n    point towards (mouse-pointer v)\n    turn left (([sin v] of ((変数) * (50)) ) * (5)) degrees\n    create clone of (_myself_ v)\nend\n\nwhen I start as a clone\nswitch costume to (コスチューム2 v)\nset [ghost v] effect to (pick random (1) to (100))\nset size to (pick random (10) to (100)) %\nrepeat (10)\n    move (pick random (-1) to (-10)) steps\n    point towards (mouse-pointer v)\nend\ndelete this clone\n\n@13\n\n@14\n\nwhen flag clicked\nset size to (100) %\nforever\n    set rotation style [left-right v]\n    point in direction (90)\n    repeat until <(distance to [mouse-pointer v]) < [50]>\n        repeat (5)\n            change size by (1)\n        end\n        repeat (5)\n            change size by (-1)\n        end\n    end\nend\n\n@スプライト2\n\nforever\n    switch costume to (コスチューム26 v)\n    change y by (2)\n    wait (0.1) seconds\n    switch costume to (コスチューム27 v)\n    change y by (-2)\n    wait (0.25) seconds\n    switch costume to (コスチューム26 v)\n    change y by (2)\n    wait (0.1) seconds\n    switch costume to (コスチューム28 v)\n    change y by (-2)\n    wait (0.25) seconds\nend\n\nswitch costume to (コスチューム26 v)\nrepeat (10)\n    change y by (10)\nend\nswitch costume to (コスチューム31 v)\nwait (0.1) seconds\nswitch costume to (コスチューム29 v)\nwait (0.25) seconds\nswitch costume to (コスチューム28 v)\nrepeat (10)\n    change y by (-10)\nend\nwait (0.1) seconds\nswitch costume to (コスチューム26 v)\n\n@16\n\nwhen flag clicked\nforever\n    repeat (5)\n        switch costume to (コスチューム1 v)\n        wait (0.2) seconds\n        switch costume to (コスチューム10 v)\n        wait (0.2) seconds\n    end\n    repeat (8)\n        next costume\n        wait (0.1) seconds\n    end\nend\n\n@Player\n\nwhen flag clicked\nset [ghost v] effect to (99)\ngo to x: (0) y: (-20)\nset [進むスピード v] to [0]\nset [ジャンプスピード v] to [0]\nset [x3 v] to [-200]\nset [y3 v] to [-20]\nset [x v] to [-200]\nset [y v] to [-20]\n\ndefine 動作\nchange [ジャンプスピード v] by (-1)\nif <<key (right arrow v) pressed?> or <<key (d v) pressed?> or <<(mouse x) > [0]> and <mouse down?>>>> then\n    change [進むスピード v] by (1)\nend\nif <<key (left arrow v) pressed?> or <<key (a v) pressed?> or <<[0] > (mouse x)> and <mouse down?>>>> then\n    change [進むスピード v] by (-1)\nend\nset [進むスピード v] to ((進むスピード) * (0.88))\nchange x by (進むスピード)\nrepeat (6)\n    if <touching (ステージ v)?> then\n        change y by (1)\n    end\nend\nif <touching (ステージ v)?> then\n    change y by (-6)\n    位置補正x (() - ((進むスピード) / ([abs v] of (進むスピード) ))) ([ceiling v] of ([abs v] of (進むスピード) ) )\n    if <<key (up arrow v) pressed?> or <<key (w v) pressed?> or <<(mouse y) > [0]> and <mouse down?>>>> then\n        set [ジャンプスピード v] to [12]\n        set [進むスピード v] to ((7) - (<(進むスピード) > [0]> * (14)))\n    else\n        set [進むスピード v] to [0]\n    end\nend\nchange y by (ジャンプスピード)\nif <touching (ステージ v)?> then\n    位置補正y (() - ((ジャンプスピード) / ([abs v] of (ジャンプスピード) ))) ([ceiling v] of ([abs v] of (ジャンプスピード) ) )\nend\nchange y by (-1.1)\nif <<touching (ステージ v)?> and <<key (up arrow v) pressed?> or <<key (w v) pressed?> or <<(mouse y) > [0]> and <mouse down?>>>>> then\n    set [ジャンプスピード v] to [15]\nend\nchange y by (1.1)\nif  then\n    初期位置\nend\n処理\nbroadcast (プログラム2 v)\n\nwhen I receive [プログラム v]\n動作\n\ndefine 処理\nchange [x v] by ((x position) - ((X) - (x3)))\nchange [y v] by ((y position) - (((Y) - (y3)) - (20)))\nchange [x3 v] by ([floor v] of (((X) - (x3)) * (0.1)) )\nchange [y3 v] by ([floor v] of (((Y) - (y3)) * (0.2)) )\nset x to ((X) - (x3))\nset y to (((Y) - (y3)) - (20))\n\ndefine 位置補正x (向き) (回数)\nif <(進むスピード) = [0]> then\n    stop [this script v]\nend\nset [i v] to [0]\nrepeat until <<not <touching (ステージ v)?>> or <(i) = ((回数) + (1))>>\n    change [i v] by (1)\n    change x by (向き)\nend\nchange x by (() - ((向き) * (((回数) + (1)) * <<(i) = ((回数) + (1))> and <touching (ステージ v)?>>)))\n\ndefine 位置補正y (向き) (回数)\nif <(ジャンプスピード) = [0]> then\n    stop [this script v]\nend\nset [i v] to [0]\nrepeat until <<not <touching (ステージ v)?>> or <(i) = ((回数) + (1))>>\n    change [i v] by (1)\n    change y by (向き)\nend\nchange y by (() - ((向き) * (((回数) + (1)) * <<(i) = ((回数) + (1))> and <touching (ステージ v)?>>)))\nset [ジャンプスピード v] to [0]\n\ndefine 初期位置\ngo to x: (0) y: (-20)\nset [進むスピード v] to [0]\nset [ジャンプスピード v] to [0]\nset [x3 v] to [0]\nset [y3 v] to [0]\nset [x v] to [0]\nset [y v] to [0]\n\n@ステージ\n\nwhen flag clicked\nhide\nステージ配置 [0] [0] [1]\nステージ配置 [480] [0] [2]\nステージ配置 [960] [0] [3]\nステージ配置 [1440] [0] [4]\nステージ配置 [1920] [0] [5]\nステージ配置 [2400] [0] [6]\nswitch costume to (none v)\nbroadcast (プログラム v)\n\ndefine ステージ配置 (x座標) (y座標) (ステージ番号)\nswitch costume to (none v)\nset [my_x v] to (x座標)\nset [my_y v] to (y座標)\nswitch costume to ((ステージ番号) + (1))\nset [my_n v] to ((ステージ番号) + (1))\ncreate clone of (_myself_ v)\n\ndefine 移動 (x) (y)\nswitch costume to (none v)\ngo to x: (x) y: (y)\nif <<([abs v] of (x) ) > ([abs v] of (x position) )> or <([abs v] of (y) ) > ([abs v] of (y position) )>> then\n    hide\nelse\n    show\nend\nswitch costume to (My_n)\n\nwhen I receive [プログラム2 v]\nif <(costume [number v]) = [1]> then\n    broadcast (プログラム v)\nelse\n    移動 ((My_x) - (x3)) ((My_y) - (y3))\nend\n\nwhen I start as a clone\nshow\n\n@ステージ2\n\nwhen flag clicked\nhide\nステージ配置 [0] [0] [1]\nステージ配置 [480] [0] [2]\nステージ配置 [960] [0] [3]\nステージ配置 [1440] [0] [4]\nステージ配置 [1920] [0] [5]\nステージ配置 [2400] [0] [6]\nswitch costume to (none v)\nbroadcast (プログラム v)\n\ndefine ステージ配置 (x座標) (y座標) (ステージ番号)\nswitch costume to (none v)\nset [my_x v] to (x座標)\nset [my_y v] to (y座標)\nswitch costume to ((ステージ番号) + (1))\nset [my_n v] to ((ステージ番号) + (1))\ncreate clone of (_myself_ v)\n\ndefine 移動 (x) (y)\nswitch costume to (none v)\ngo to x: (x) y: (y)\nif <<([abs v] of (x) ) > ([abs v] of (x position) )> or <([abs v] of (y) ) > ([abs v] of (y position) )>> then\n    hide\nelse\n    show\nend\nswitch costume to (My_n)\n\nwhen I receive [プログラム2 v]\nif <(costume [number v]) = [1]> then\n    broadcast (プログラム v)\nelse\n    移動 ((My_x) - (x3)) ((My_y) - (y3))\nend\n\nwhen flag clicked\ngo to [back v] layer\n\n@スプライト3\n\n@スプライト5\n\nwhen flag clicked\n\n