;Technological Site - NPC Script
;Map 1457 (Under the mist valley)

If #MAPID = 1457
	If #XPOS = 3
		SendMessageToUser(#USERID,"The message reads, 'All employees must work 60 hour weeks until we are back on track to reach our projected deadlines.'",#MSG_SAY)
	ElseIf #XPOS = 9
		SendMessageToUser(#USERID,"The message reads, 'Today we mourn the loss of two of our coworkers: Dr Grant and Dr Harding. They will be missed.'",#MSG_SAY)
	ElseIf #XPOS = 12
		SendMessageToUser(#USERID,"The message reads, 'Used towels for sale, contact Jeremy if interested.'",#MSG_SAY)
	ElseIf #XPOS = 13
		SendMessageToUser(#USERID,"The message reads, 'Due to unforseen consequences, our labs are being reviewed by military agents, to ensure all safety precautions are being followed.'",#MSG_SAY)
	EndIf
EndIf

If #MAPID = 1453
	If #YPOS = 5
		If #XPOS = 3
			SendMessageToUser(#USERID,"The message reads, 'The administrator requests that all employees be made aware of the inherant danger in this work.'",#MSG_SAY)
		ElseIf #XPOS = 4
			SendMessageToUser(#USERID,"The message reads, 'The administrator requests that all employees proceed with caution on their work.'",#MSG_SAY)
		ElseIf #XPOS = 5
			SendMessageToUser(#USERID,"The message reads, 'The adminsitrator wishes to welcome our new coworker, Dr Sattler, to our team.'",#MSG_SAY)
		EndIf
	EndIf
	
	If #YPOS = 11
		If #XPOS = 14
			SendMessageToUser(#USERID,"The message reads, 'John Ray Arnold has been taken on as our new Security Manager.'",#MSG_SAY)
		ElseIf #XPOS = 17
			SendMessageToUser(#USERID,"The message reads, 'Dr. Guitierrez has been promoted to manager of this experiment.'",#MSG_SAY)
		EndIf
	EndIf
	
	If #XPOS = 3
		If #YPOS = 9
			SendMessageToUser(#USERID,"This book is entitled, 'The Dynamics of an Asteroid'",#MSG_SAY)
		EndIf
	EndIf
	If #XPOS = 7
		If #YPOS = 7
			SendMessageToUser(#USERID,"The title of this book is, 'A Treatise on the Binomial Theorem'",#MSG_SAY)
		EndIf
	EndIf
	If #XPOS = 14
		If #YPOS = 13
			If HasItem(#USERID,748) = 1
				SendMessageToUser(#USERID,"This book was written by a 'J. Moriarty', PHD.",#MSG_SAY)
			Else
				SendMessageToUser(#USERID,"You find a object being used as a bookmark in the book!",#MSG_EMOTE)
				GiveItem(#USERID,748)
				SendMessageToUser(#USERID,"A "+GetItemName(748)+" has been added to your inventory.",#MSG_TELL)
			EndIf
		EndIf
	EndIf
EndIf

Continue = 1