diff options
| author | ubq323 <ubq323@ubq323.website> | 2022-05-02 01:05:25 +0100 |
|---|---|---|
| committer | ubq323 <ubq323@ubq323.website> | 2022-05-02 01:05:25 +0100 |
| commit | d6faf9716c167906c45deb099808d4d568e34c0d (patch) | |
| tree | 30de8b7c6ce5d4a74a48ead63822db258243eeff /src/player.fnl | |
| parent | ad03a0b0812bb8e15e5aa078d7c01eef5ebbdf2e (diff) | |
idfk
Diffstat (limited to 'src/player.fnl')
| -rw-r--r-- | src/player.fnl | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/src/player.fnl b/src/player.fnl index 68d4f27..9ba457a 100644 --- a/src/player.fnl +++ b/src/player.fnl @@ -5,7 +5,6 @@ (set C.__index C) (fn C.update [self dt ?world] - (print ((. (require :vendor.fennel) :view) self)) (let [speed (if (love.keyboard.isScancodeDown :lshift :rshift) SPRINT-SPEED SPEED) up (if (love.keyboard.isScancodeDown :w :up) 1 0) @@ -16,7 +15,7 @@ vx (- right left) sf (math.sqrt (+ (* vx vx) (* vy vy))) world (if ?world ?world - {:move (fn move [_2 tx ty] (values tx ty))})] + {:move (fn move [_1 _2 tx ty] (values tx ty))})] (when (not= sf 0) (let [vx (/ vx sf) vy (/ vy sf) |