-- invent.i
-- Library version 0.3

-- 0.3 
--      added worn container to implement clothing
--      added weight default attribute
--      weight LIMIT added to the inventory and worn containers


DEFAULT ATTRIBUTES
	weight 5.

ACTOR ATTRIBUTES
	weight 50. 


SYNONYMS
	i, inventory = invent.

SYNTAX
	invent = invent.

VERB invent
	DOES
		LIST inventory.
		LIST worn.
END VERB invent.


CONTAINER inventory
	LIMITS
		COUNT 10 THEN
			"You can't carry anything more. You have to drop something 
			first."
		weight 50 THEN
			"You can't carry anything more. You have to drop something 
			first."
	HEADER
		"You are carrying"
	ELSE
		"You are empty-handed."
END CONTAINER.


CONTAINER worn
	LIMITS
		COUNT 10 THEN
			"You can't wear anything more. You have to remove something 
			first."
		weight 50 THEN
			"You can't wear anything more. You have to remove something 
			first."
	HEADER
		"You are wearing"
	ELSE
		""
END CONTAINER.