Tweak gibs

2022-06-04 11:19:14 +01:00
parent 4f4c039fec
commit 2b9ad58f6f
16 changed files with 79 additions and 33 deletions
@@ -323,6 +323,7 @@ data Creature = Creature
    , _crTwist          :: Float
    , _crID             :: Int
    , _crPict           :: Creature -> Configuration -> World -> SPic
+    , _crSkinColor      :: Color
    , _crUpdate         :: Creature -> World -> World
    , _crRad            :: Float
    , _crMass           :: Float
@@ -849,6 +850,7 @@ data Prop
        , _pjTimer :: Int
        , _pjQuat  :: Q.Quaternion Float
        , _pjQuatSpin  :: Q.Quaternion Float
+        , _pjColor :: Color
        }
    | Drone
        { _pjPos :: Point2