From 40378d3de4d04e36c5574ba291b21b551b8a00f4 Mon Sep 17 00:00:00 2001
From: justin <justin.g.kruger@gmail.com>
Date: Mon, 16 Sep 2024 19:27:49 +0100
Subject: [PATCH] Add file

---
 src/Dodge/Data/MuzzleEffect.hs | 17 +++++++++++++++++
 1 file changed, 17 insertions(+)
 create mode 100644 src/Dodge/Data/MuzzleEffect.hs

diff --git a/src/Dodge/Data/MuzzleEffect.hs b/src/Dodge/Data/MuzzleEffect.hs
new file mode 100644
index 000000000..9f65c93e9
--- /dev/null
+++ b/src/Dodge/Data/MuzzleEffect.hs
@@ -0,0 +1,17 @@
+{-# LANGUAGE DeriveGeneric #-}
+{-# LANGUAGE DeriveAnyClass #-}
+{-# LANGUAGE StrictData #-}
+{-# LANGUAGE TemplateHaskell #-}
+module Dodge.Data.MuzzleEffect where
+import Control.Lens
+--import Data.Aeson
+--import Data.Aeson.TH
+--import Dodge.Data.Item.Use.Consumption.Ammo
+
+data CumulativeMuzzleEffect = CME
+    { _cmeRecoil :: Float
+    , _cmeTorque :: Float
+    , _cmeSound :: Bool
+    }
+    deriving (Eq,Ord,Show,Read)
+makeLenses ''CumulativeMuzzleEffect