[EVENTS e_niatirb_aristo]
ON=@NPCSeeNewPlayer
SAY If you can, please GET THIS FOOL OUT OF MY LABORATORY!

ON=@EnvironChange
DORAND 4
	SAY You're ruining my equipment!
	SAY You have no right to do this to my shop!
	SAY What are you babbling about, you fool!? Get thee hence!
	SAY Take thy madness... and thine lords... and thy beard... and leave!
ENDDO

EMOTE throws an explosion potion at Niatirb
NEWITEM i_potion_explosion
ACT.ATTR=010
ACT.P=1498,1657,27
ACT.UPDATEX
ACT.TIMER=0

//Used mainly for construction.
[EVENTS e_removestep]
ON=@ItemStep
IF (<ACT.Z>==<Z>)
	ACT.REMOVE
ENDIF

[EVENTS e_itemstep]
ON=@ItemStep
IF (<ACT.Z>==<Z>)
	TRYP 0 ACT.<TAG.ITEMFUNC>
ENDIF

[FUNCTION ITEMSTEP]
TAG.ITEMFUNC=<ARGS>
EVENTS=+e_itemstep

[FUNCTION REMOVEITEMSTEP]
TAG.ITEMFUNC=
EVENTS=-e_itemstep

[FUNCTION temp]
IF (<Z> >= 70)
	REMOVE
ENDIF

[FUNCTION fixspawn]
IF (<MEMORYFINDTYPE.memory_ispawned>)
	IF (<MEMORYFINDTYPE.memory_ispawned.LINK.MOREZ>==0)
		MEMORYFINDTYPE.memory_ispawned.LINK.MOREZ=120
		VAR.OLDP=<SRC.P>
		SRC.P=<MEMORYFINDTYPE.memory_ispawned.LINK.P>
		MEMORYFINDTYPE.memory_ispawned.LINK.DCLICK
		SRC.P=<VAR.OLDP>
		VAR.OLDP=
	ENDIF
ENDIF