{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DeriveAnyClass #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE TemplateHaskell #-}

module Dodge.Data.CamouflageStatus where

import Data.Aeson
import Data.Aeson.TH

data CamouflageStatus
    = FullyVisible
    | Invisible
    deriving (Eq, Ord, Enum, Show, Bounded, Read) --Generic, Flat)

deriveJSON defaultOptions ''CamouflageStatus