module Dodge.Item.Craftable where
import Dodge.Data
import Dodge.Default.Weapon
import Dodge.Picture.Layer
import Picture
import Geometry

pipe :: Item
pipe = Craftable
    { _itIdentity = Generic
    , _itDimension = defaultItemDimension
    , _itCurseStatus = Uncursed
    , _itName = "PIPE"
    , _itMaxStack = 3
    , _itAmount = 3
    , _itFloorPict = \_ -> (,) mempty 
        $ onLayer FlItLayer $ polygon $ map toV2 [(-3,-3),(-3,3),(3,3),(3,-3)]
    , _itEquipPict = \_ _ -> mempty
    , _itID = Nothing
    , _itInvDisplay = _itName
    , _itInvColor = green
    , _itAimStance = LeaveHolstered
    }
