Cleanup
This commit is contained in:
+1
-1
@@ -29,7 +29,7 @@ updateFlame w pt
|
||||
damageInCircle (const $ Flaming 1) ep r w
|
||||
thit = List.safeHead $ thingsHit sp ep w
|
||||
sp = _flPos pt
|
||||
ep = sp +.+ _flVel pt
|
||||
ep = sp + _flVel pt
|
||||
mvflame = pt & flTimer -~ 1 & flPos .~ ep & flVel *~ 0.98
|
||||
r = max 0 $ flameSize pt - 1
|
||||
|
||||
|
||||
Reference in New Issue
Block a user