{-# LANGUAGE TemplateHaskell #-}
{-# LANGUAGE StrictData #-}
module Dodge.Data.RadarBlip where
import Color
import Geometry
import Control.Lens

data RadarBlip = RadarBlip
    { _rbColor      :: Color
    , _rbTime       :: Int
    , _rbMaxTime    :: Int
    , _rbRad        :: Float
    , _rbPos        :: Point2
    }

makeLenses ''RadarBlip