[Problem]Pet summon & unsummon

Hi i have a question. Do you know how to do it so as not resorted pet immediately after it recalled? A revered only by pressing the,, Cell,,?
Sorry for Google Translator ;x

Code:

when 53001.use or 53002.use or 53003.use or 53005.use or 53006.use or 53007.use or 53008.use or 53009.use begin
			if not PetSystem.IsActive() and
				item.select_cell(97) then
				local PetNumber = {[53001]=1,[53003]=2,[53002]=3,[53005]=4,[53006]=5,[53007]=6,[53008]=7,[53009]=8}
				local petIndex = PetNumber[item.get_vnum()]
				if horse.is_dead() then
					say_title("Informacja:")
					say("Nie można przywołać martwego zwierzęcia.")
					say("Ożyw zwierze.[ENTER]")
					return
				end			
				local horse_lev = horse.get_level()
				local horse_name = horse.get_name()
				PetSystem.SetActivePet(petIndex)
				PetSystem.AddBonus(petIndex)
				PetSystem.SetHorseData(PetSystem[petIndex].Level, "Lv"..PetSystem.GetLevel(petIndex).." "..PetSystem[petIndex].Name)
				pet.summon()
				PetSystem.SetHorseData(horse_lev, horse_name)
				cleartimer("give_exp")
				loop_timer("give_exp", PetSystem.UpdateFrequency)
				chat(""..PetSystem[petIndex].Name.." zostal przywolany.")
			end
			if item.get_cell(97) then
			pet.unsummon()
			end
end

Pet is summon and at once get unsummon ;x how to repair this. And unsummon pet only if i click seal in ,,cell,,?
@Deutsh translator:
pet wird aufgerufen und sofort entlassen, wie es zu beheben. Wie pet Z�hnen referenziert Dichtung auf die ,,cell,,