function c9010638_On_Talk(MapID, InstanceID, TargetID, TargetTypeID, RoleID, TalkIndex)

	if TalkIndex == -1 then
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950989)				
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, 4)
		msg.AddMsgEvent(MsgID, 1, 100001)	 --"ОК"				
		msg.AddMsgEvent(MsgID, 21, 5)
		msg.AddMsgEvent(MsgID, 1, 100002)	--"Отмена"		
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
	elseif TalkIndex == 4 then

	role.RoleGotoNewMap(MapID, InstanceID, RoleID, 3440849960, 200, 3378, 120)
	
end
end
aux.RegisterCreatureEvent(9010638, 7, "c9010638_On_Talk")

function c9010637_On_Talk(MapID, InstanceID, TargetID, TargetTypeID, RoleID, TalkIndex)

	if TalkIndex == -1 then
		local MsgID = msg.BeginMsgEvent()
		msg.AddMsgEvent(MsgID, 20, 950988)				
		msg.AddMsgEvent(MsgID, 24, TargetID)
		msg.AddMsgEvent(MsgID, 21, 4)
		msg.AddMsgEvent(MsgID, 1, 100001)	 --"ОК"				
		msg.AddMsgEvent(MsgID, 21, 5)
		msg.AddMsgEvent(MsgID, 1, 100002)	--"Отмена"		
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
	elseif TalkIndex == 4 then

	role.RoleGotoNewMap(MapID, InstanceID, RoleID, 3424074792, 1080, 7095, 300) 
	
end
end
aux.RegisterCreatureEvent(9010637, 7, "c9010637_On_Talk")