function c9516003_On_Talk(MapID, InstanceID, TargetID, TargetTypeID, RoleID, TalkIndex)
	local FreeSize = role.GetBagFreeSize(TargetID)
	local MsgID = msg.BeginMsgEvent()
	if TalkIndex == -1 then
		msg.AddMsgEvent(MsgID, 20, 920061) 				
		msg.AddMsgEvent(MsgID, 24, TargetID)		
		msg.AddMsgEvent(MsgID, 21, 4)			
		msg.AddMsgEvent(MsgID, 1, 920053)				--Обменять плоды
		msg.AddMsgEvent(MsgID, 21, 99)
		msg.AddMsgEvent(MsgID, 1, 920009)				--Отмена
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
	elseif TalkIndex == 4 then 
		msg.AddMsgEvent(MsgID, 20, 920054) 				
		msg.AddMsgEvent(MsgID, 24, TargetID)		
		msg.AddMsgEvent(MsgID, 21, 10)		--id события варианта диалога тут 10
		msg.AddMsgEvent(MsgID, 1, 920055)				--Обменять Медонос
		msg.AddMsgEvent(MsgID, 21, 11)		--id события варианта диалога тут уже 11
		msg.AddMsgEvent(MsgID, 1, 920056)				--Обменять Огенный персик
		msg.AddMsgEvent(MsgID, 21, 12)		--id события варианта диалога тут уже 12
		msg.AddMsgEvent(MsgID, 1, 920057)				--Обменять Бурую кукурузу
		msg.AddMsgEvent(MsgID, 21, 13)		--id события варианта диалога тут уже 13
		msg.AddMsgEvent(MsgID, 1, 920058)				--Обменять Пшеницу
		msg.AddMsgEvent(MsgID, 21, 14)		--id события варианта диалога тут уже 14
		msg.AddMsgEvent(MsgID, 1, 920059)				--Обменять Сливы
		msg.AddMsgEvent(MsgID, 21, 15)		--id события варианта диалога тут уже 15
		msg.AddMsgEvent(MsgID, 1, 920060)				--Обменять Кокосы
		msg.AddMsgEvent(MsgID, 21, -1)
		msg.AddMsgEvent(MsgID, 1, 930314)				--Назад
		
	elseif TalkIndex == 10 then --- id события(обработчик) сдесь действия для выбранного поддиалога, т.е отдельно  для каждого обменять
		if role.GetRoleItemNum(RoleID, 4100201) >= 100 then
			role.RemoveFromRole(MapID, InstanceID,RoleID,4100201, 100, 400)
			role.AddRoleItem(MapID, InstanceID, RoleID, 7100101, 2, -1, 8, 420) -- За 100 медоносов = 2 думонов
		else
			msg.AddMsgEvent(MsgID, 20, 950329) --нехватает плодов
			msg.AddMsgEvent(MsgID, 24, TargetID) 
		end	
	elseif TalkIndex == 11 then 
		if role.GetRoleItemNum(RoleID, 4100202) >= 100 then
		role.RemoveFromRole(MapID, InstanceID,RoleID,4100202, 100, 400)
		role.AddRoleItem(MapID, InstanceID, RoleID, 7100101, 4, -1, 8, 420) -- За 100 Огненных персиков = 4 думонов
		else	
			msg.AddMsgEvent(MsgID, 20, 950329) --нехватает плодов
			msg.AddMsgEvent(MsgID, 24, TargetID) 
		end	
		
	elseif TalkIndex == 12 then 
		if role.GetRoleItemNum(RoleID, 4100203) >= 100 then
		role.RemoveFromRole(MapID, InstanceID,RoleID,4100203, 100, 400)
		role.AddRoleItem(MapID, InstanceID, RoleID, 7100101, 8, -1, 8, 420) -- За 100 Бурой кукурузы = 8 думонов
		else	
			msg.AddMsgEvent(MsgID, 20, 950329) --нехватает плодов
			msg.AddMsgEvent(MsgID, 24, TargetID) 
		end
	elseif TalkIndex == 13 then	
		if role.GetRoleItemNum(RoleID, 4100204) >= 100 then
		role.RemoveFromRole(MapID, InstanceID,RoleID,4100204, 100, 400)
		role.AddRoleItem(MapID, InstanceID, RoleID, 7100101, 16, -1, 8, 420) -- За 100 Пшеницы = 16 думонов
		else	
			msg.AddMsgEvent(MsgID, 20, 950329) --нехватает плодов
			msg.AddMsgEvent(MsgID, 24, TargetID) 
		end	
	elseif TalkIndex == 14 then		
		if role.GetRoleItemNum(RoleID, 4100205) >= 100 then
		role.RemoveFromRole(MapID, InstanceID,RoleID,4100205, 100, 400)
		role.AddRoleItem(MapID, InstanceID, RoleID, 7100101, 30, -1, 8, 420) -- За 100 Слив = 30 думонов
		else	
			msg.AddMsgEvent(MsgID, 20, 950329) --нехватает плодов
			msg.AddMsgEvent(MsgID, 24, TargetID) 
			end	
	elseif TalkIndex == 15 then			
		if role.GetRoleItemNum(RoleID, 4100206) >= 150 then
		role.RemoveFromRole(MapID, InstanceID,RoleID,4100206, 150, 400)
		role.AddRoleItem(MapID, InstanceID, RoleID, 7100101, 50, -1, 8, 420) -- За 150 Слив = 50 думонов
		else
			msg.AddMsgEvent(MsgID, 20, 950329) --нехватает плодов
			msg.AddMsgEvent(MsgID, 24, TargetID) 
		end	
	end	
		msg.DispatchRoleMsgEvent(RoleID, MsgID)
end

aux.RegisterCreatureEvent(9516003, 7, "c9516003_On_Talk")