Mapper, ARHUD, radar sweeps update. Add dropper items

src/Dodge/Item.hs

@@ -29,6 +29,8 @@ itemFromBase = \case
     INTROSCAN t -> introScan t
     MAPPER -> mapper
     DETECTOR d -> detector d
+    ARHUD -> arHUD
+    DROPPER x -> dropper x
 
 itemFromAmmoMag :: AmmoMagType -> Item
 itemFromAmmoMag at = case at of
@@ -52,7 +54,6 @@ itemFromAttachType at = case at of
     SMOKEREDUCER -> smokeReducer
     --    ROCKETHOMER -> rocketHomer
     HOMINGMODULE -> homingModule
-    AUGMENTEDHUD -> augmentedHUD
     SHELLPAYLOAD p -> shellModule p
 
 itemFromEquipType :: EquipItemType -> Item