Start projectile refactor

This commit is contained in:
2022-07-20 01:44:16 +01:00
parent 6e901d3086
commit 9daf872878
6 changed files with 56 additions and 38 deletions
+4 -3
View File
@@ -1,8 +1,9 @@
module Dodge.Projectile where
import Dodge.Data
--createProjectile :: ProjectileType -> Item -> Creature -> World -> World
--createProjectile pt = case pt of
-- ShellType -> fireShell
createProjectile :: ProjectileCreate -> Item -> Creature -> World -> World
createProjectile pt = case pt of
CreateShell -> undefined
--
--fireShell :: Item -> Creature -> World -> World
--fireShell it cr = makeShell it cr $ \pj -> pjEffAtTime 35 (trySpinByCID (_crID cr) spinamount) pj