Cleanup tesla arcs

src/Dodge/Item/Held/BatteryGuns.hs

@@ -5,11 +5,11 @@ module Dodge.Item.Held.BatteryGuns
     , tractorGun
     ) where
 
+import Dodge.Data.ArcStep
 import Dodge.SoundLogic.ExternallyGeneratedSounds
 import Dodge.Default.Item
 import Control.Lens
 import Dodge.Data.Item
-import Dodge.Tesla.ItemParams
 import Geometry.Data
 
 sparkGun :: Item
@@ -34,6 +34,16 @@ teslaGun =
         & itAmmoSlots .~ singleAmmo ElectricalAmmo
         & itUse . heldTriggerType .~ AutoTrigger
 
+teslaParams :: ItemParams
+teslaParams =
+    Arcing
+        { _currentArc = []
+        , _arcSize = 20
+        , _arcNumber = 10
+        , _newArcStep = DefaultArcStep --defaultArcStep
+        , _previousArcEffect = NoPreviousArcEffect
+        }
+
 -- previous phaseV parameters: 0.2, 1, 5
 laser :: Item
 laser =