15 lines
293 B
Haskell
15 lines
293 B
Haskell
module Dodge.Item.Equipment.Booster (
|
|
boosterGun,
|
|
) where
|
|
|
|
import Control.Lens
|
|
import Dodge.Data.Item
|
|
import Dodge.Default.Item
|
|
|
|
boosterGun :: Item
|
|
boosterGun =
|
|
defaultLeftItem
|
|
& itUse . leftUse .~ LBoost
|
|
& itUse . leftDelay .~ NoDelay
|
|
& itType .~ LEFT BOOSTER
|