Tweak twisting when aiming

src/Dodge/Item/Weapon/Launcher.hs

@@ -57,7 +57,6 @@ launcher = defaultGun
         & useAim . aimSpeed .~ 0.2
         & useAim . aimRange .~ 0.5
         & useAim . aimStance .~ TwoHandTwist
-    , _itFloorPict = launcherPic
     , _itEffect = NoItEffect
     , _itParams = ShellLauncher
         { _shellSpinDrag        = 1
@@ -70,7 +69,23 @@ launcher = defaultGun
         }
     , _itInvSize = 3
     , _itInvDisplay = basicItemDisplay
+    , _itDimension = ItemDimension
+        { _dimRad = 9
+        , _dimCenter = V3 10 0 0
+        , _dimPortage = HeldItem
+            {_handlePos =  5
+            ,_muzPos    = 20
+            }
+        , _dimSPic = launcherPic
+        }
     }
+launcherPic :: Item -> SPic
+launcherPic _ = 
+    ( colorSH cyan $ prismPoly
+        (map (+.+.+ V3 20 0 5) $ polyCircx 4 5)
+        (map (+.+.+ V3 0  0 5) $ polyCircx 4 5)
+    , mempty
+    )
 
 defaultShellAmmo :: AmmoType
 defaultShellAmmo = ProjectileAmmo
@@ -79,13 +94,6 @@ defaultShellAmmo = ProjectileAmmo
     , _amPjDraw = const mempty
     }
 
-launcherPic :: Item -> SPic
-launcherPic _ = 
-    ( colorSH cyan $ prismPoly
-        (map (+.+.+ V3 10 0 4.5) $ polyCircx 4 5)
-        (map (+.+.+ V3 (-10) 0 4.5) $ polyCircx 4 5)
-    , mempty
-    )
 
 basicAmPjMoves :: IM.IntMap TweakParam
 basicAmPjMoves = IM.fromList . zip [0..] $
@@ -254,7 +262,7 @@ trySpinByCID cid i pj w = w & props . ix pjid . pjSpin .~ newSpin
 
 
 remoteLauncher :: Item
-remoteLauncher = defaultGun 
+remoteLauncher = launcher 
     { _itName = "ROCKO-REM"
     , _itType = LAUNCHER
     , _itConsumption = defaultAmmo 
@@ -274,7 +282,6 @@ remoteLauncher = defaultGun
         & useAim . aimSpeed .~ 0.2
         & useAim . aimRange .~ 0.5
         & useAim . aimStance .~ TwoHandTwist
-    , _itFloorPict = launcherPic
     , _itAttachment = ItScope (V2 0 0) 0 1 True
 --    , _itParams = ShellLauncher
 --        { _tweakSel = 0