[ITEMDEF i_graving_tool]
ID=i_tinker_tools
NAME=Engraving Tool
TYPE=T_NORMAL
SKILLMAKE=SKILL_CARPENTRY 62.1
RESOURCES=8 i_log

ON=@Create
COLOR=55

ON=@DClick
IF (<CONT>)
	IF (<TOPOBJ.UID> == <SRC>)
	TARGET @946,3,1 In wich container do you wish to write?
	RETURN 1
	ENDIF
ENDIF

ON=@Targon_Item
IF (<SRC.TARG.TYPE>==T_CONTAINER)
	IF (<UID.<SRC.TARG.REGION.UID>.ISAMULTI>) || (<SRC.TARG.TOPOBJ.UID> == <SRC>)
		IF (<UID.<SRC.TARG.REGION.UID>.MORE1> == <SRC>) || (<SRC.TARG.TOPOBJ.UID> == <SRC>)
		SRC.CTAG.GRAVING_FUNC_CHEST=<SRC.TARG>
		SRC.PROMPTCONSOLE GRAVING_FUNC,Type the container carving.
		ENDIF
	ENDIF
ENDIF
RETURN 1

[ITEMDEF i_metal_graving_tool]
ID=i_tinker_tools
NAME=Engraving Tool
TYPE=T_NORMAL
SKILLMAKE=SKILL_TINKERING 62.1
RESOURCES=8 i_ingot_iron

ON=@Create
COLOR=55

ON=@DClick
IF (<CONT>)
	IF (<TOPOBJ.UID> == <SRC>)
	TARGET @946,3,1 In wich container do you wish to write?
	RETURN 1
	ENDIF
ENDIF

ON=@Targon_Item
IF (<SRC.TARG.TYPE>==T_CONTAINER)
	IF (<UID.<SRC.TARG.REGION.UID>.ISAMULTI>) || (<SRC.TARG.TOPOBJ.UID> == <SRC>)
		IF (<UID.<SRC.TARG.REGION.UID>.MORE1> == <SRC>) || (<SRC.TARG.TOPOBJ.UID> == <SRC>)
		SRC.CTAG.GRAVING_FUNC_CHEST=<SRC.TARG>
		SRC.PROMPTCONSOLE GRAVING_FUNC,Type the container carving.
		ENDIF
	ENDIF
ENDIF
RETURN 1

[FUNCTION GRAVING_FUNC]
REF1=<SRC.CTAG0.GRAVING_FUNC_CHEST>
SRC.CTAG.GRAVING_FUNC_CHEST
IF !(<ISBADSTR <ARGS>>)
REF1.TAG.CONTAINER_LABELED=<ARGS>
REF1.EVENTS +T_CONTAINER_LABELED
REF1.UPDATE
ENDIF

[TYPEDEF T_CONTAINER_LABELED]
ON=@ClientToolTip
SRC.ADDCLILOC 1072305,<TAG0.CONTAINER_LABELED>

[EOF]