pickupConsumbale :: Consumable -> Player -> Player
pickupConsumbale BombBox  = bombs +~ 12
pickupConsumbale :: Consumable -> Player -> Player
pickupConsumbale BombBox  = bombs +~ 12
pickupConsumbale BombBox  = bombs +~ 12