player.bite(файл создан)
| @@ -0,0 +1,40 @@ | |||
| 1 | + | for #player when ["right" key is pressed] do | |
| 2 | + | set [$my vx is 250] | |
| 3 | + | end | |
| 4 | + | ||
| 5 | + | for #player when ["left" key is pressed] do | |
| 6 | + | set [$my vy is 200] | |
| 7 | + | end | |
| 8 | + | ||
| 9 | + | for #player when ["space" key is pressed] [$i can jump] do | |
| 10 | + | forget [$i can jump] | |
| 11 | + | forget [$i am on ground] | |
| 12 | + | set [$my vy is -325] | |
| 13 | + | end | |
| 14 | + | ||
| 15 | + | for #player when [update] do | |
| 16 | + | $my vx is $vx; $my vy is $vy | |
| 17 | + | $my x is $x; $my y is $y | |
| 18 | + | ||
| 19 | + | set [$my x is ($x + $vx * $dt)] | |
| 20 | + | set [$my y is ($y - $vy * $dt)] | |
| 21 | + | end | |
| 22 | + | ||
| 23 | + | for #player when [update] do | |
| 24 | + | $my vy is $vy | |
| 25 | + | set [$my vy is ($vy + 980 * $dt)] | |
| 26 | + | forget [$i am on ground] | |
| 27 | + | end | |
| 28 | + | ||
| 29 | + | for #player when [hit "ground"] do | |
| 30 | + | set [$my y is 0] | |
| 31 | + | remember [$i am on ground] | |
| 32 | + | remember [$i can jump] | |
| 33 | + | end | |
| 34 | + | ||
| 35 | + | #player $p, | |
| 36 | + | $p x is 400, | |
| 37 | + | $p y is 300, | |
| 38 | + | $p vx is 0, | |
| 39 | + | $p vy is 0, | |
| 40 | + | $p speed is 250. | |
Новее
Позже