Make creature update an external function

2022-07-20 01:22:17 +01:00
parent db44d5d6ce
commit 1f79fe157f
31 changed files with 562 additions and 462 deletions
@@ -0,0 +1,12 @@
+{-# LANGUAGE TemplateHaskell #-}
+{-# LANGUAGE StrictData #-}
+module Dodge.Data.TeslaArc where
+import Geometry.Data
+import Color
+import Control.Lens
+data TeslaArc = TeslaArc
+    { _taPoints :: [Point2]
+    , _taTimer :: Int
+    , _taColor :: Color
+    }
+makeLenses ''TeslaArc