;'[Church Door]' - NPC script

KEY = 331

DIR = GetUserDirection(#USERID)

If DIR <> #DIR_UP
	GoTo END
EndIf

If HasItem(#USERID,KEY) = 1
	SendMessageToUser(#USERID,"You used the Church Basement Key.",#MSG_EMOTE)
	TakeItem(#USERID,KEY)
	WarpUser(#USERID,1103,15,10)
Else
	SendMessageToUser(#USERID,"This door is locked.",#MSG_CRITICAL)
	GoTo END
EndIf

Label END

Continue = 1