{-# LANGUAGE DeriveAnyClass #-} {-# LANGUAGE DeriveGeneric #-} {-# LANGUAGE StrictData #-} {-# LANGUAGE TemplateHaskell #-} module Dodge.Data.Item.Targeting where import Data.Aeson import Data.Aeson.TH data TargetType = TARGETLASER | TargetRBPress | TargetRBLine | TargetRBCreature | TargetCursor deriving (Eq, Ord, Show, Read, Enum, Bounded) --Generic, Flat) deriveJSON defaultOptions ''TargetType