module Dodge.Default.Item
    ( defaultItem
    ) where
import Dodge.Data
import Picture
import Shape

defaultItem :: Item
defaultItem = Item
    { _itCurseStatus = Uncursed
    , _itType = defaultItemType
    , _itEquipPict = \_ _ -> (,) emptySH blank
    , _itEffect = NoItEffect
    , _itID = Nothing
    , _itIsHeld = False
    , _itInvColor = yellow
    , _itInvSize = 1
    , _itInvPos = Nothing
    , _itDimension = ItemDimension 0 0 NoPortage (const mempty)
    , _itConsumption = NoConsumption
    , _itUse = NoUse
    , _itAttachment = NoItAttachment
    , _itParams = NoParams
    , _itTweaks = NoTweaks
    , _itScope = NoScope
    , _itTargeting = NoTargeting
    , _itValue = ItemValue 0 MundaneItem
    }

defaultItemType :: ItemType
defaultItemType = ItemType NOTDEFINED mempty NoStack