Cod: Selectaţi tot

quest cal begin
	state start begin
		when 20349.chat."Calul meu" with horse.get_level()==0 begin
			say_title("Grajdar")
			say("Buna "..pc.get_name())
			say("Pentru a obtine un cal de la mine")
			say("trebuie doar sa imi aduci 10 medalii ")
			say("De Cal,pe care le poti obtine.")
			say("Omorand Monstri din Temnita Maimutelor.")
			say_item_vnum(50050)			
			if pc.count_item("50050")==0 then
				say("Atunci cand imi vei aduce 10 Medalii")
				say("eu iti voi da un cal.")
				return
			end
			say("Vrei un cal de la mine?")
			local s=select("Da", "Nu")
			if s==2 then
				say_title("Grajdar")
				say("Pacat, va rugam sa mai treceti pe aici.")
				return
			end
			if pc.count_item("50050")==0 then
				chat("ERROR!!!!")
				return
			end
			pc.remove_item("50050", 10)
			pc.give_item2("50051", 1)			
			say_title("Grajdar")
			say("Ooo iti multumesc uite calul")
			say("Pe care il doreai de la mine!")
			say("Deasemenea primesti 2 puncte la Abilitatea")
			say("De a Chema Calul")
			pc.set_skill_level(131, 2)
			horse.set_level(1)
			horse.summon()	
			horse.ride()				
		end
		when 20349.chat."Calul meu de Lupta" with horse.get_level()==1 and pc.get_level()>=35 begin
			say_title("Grajdar")
			say("Buna "..pc.get_name())
			say("Vrei sa ai un calde lupta?")
			say("Pentru a obtine un astfel de cal")
			say("trebuie doar sa imi aduci 25 medalii ")
			say("De Cal,pe care le poti obtine.")
			say("Omorand Monstri din Temnita Maimutelor.")
			if pc.count_item("50050")==0 then
				say("Atunci cand imi vei aduce 25 Medalii")
				say("eu iti voi da un cal.")
				return
			end
			say("Vrei un cal de la mine?")
			local s=select("Da", "Nu am chef sa le caut")
			if s==2 then
				say_title("Grajdar")
				say("Pacat, va rugam sa mai treceti pe aici.")
				return
			end
			if pc.count_item("50050")==0 then
				chat("ERROR!!!!")
				return
			end
			pc.remove_item("50050", 25)
			pc.give_item2("50053", 1)			
			say_title("Grajdar")
			say("Ooo iti multumesc uite calul")
			say("Pe care il doreai de la mine!")
			horse.set_level(11)
			horse.summon()	
			horse.ride()				
		end
		when 20349.chat."Calul meu Militar" with horse.get_level()==11 and pc.get_level()>=50 begin
			say_title("Grajdar")
			say("Buna "..pc.get_name())
			say("Pentru a obtine calul militar")
			say("trebuie sa imi faci o mare favoare.")
			say("Marele Oberork ca sa se razbune pe mine")
			say("mi-a omort unul dintre cei mai frumosi cai.")
			say("Tot ce vreau eu e sa il omori")
			say_reward("Vrei sa faci asta pentru mine?")
			local s=select("Da", "Nu")
			if s==2 then return	end
			say_title("Grajdar")
			say("Multumesc, vino inapoi atunci cand ai terminat")
			say("")
			set_state(obi)
		end
	end
	state obi begin
		when 691.kill begin
			691.kill begin
			691.kill begin
			691.kill begin
			691.kill begin
			pc.setqf("obi",1)
		end
		when 20349.chat."Calul meu Militar" begin	
			if pc.getqf("obi")==0 then
				say_title("Grajdar")
				say("Buna "..pc.get_name())
				say("Pentru a obtine calul militar")
			    say("trebuie sa imi faci o mare favoare.")
			    say("Marele Oberork ca sa se razbune pe mine")
			    say("mi-a omort unul dintre cei mai frumosi cai.")
			    say("Tot ce vreau eu e sa omori 5 Ork Sef")
			    say_reward("Vrei sa faci asta pentru mine?")
				local s=select("Da", "Nu")
				if s==2 then
					return
				end			
				say_title("Grajdar")
				say("Multumesc, vino inapoi atunci cand ai terminat")
			    say("")
				return
			end
			say_title("Grajdar")
			say("Oh multumesc ca l-ai omorat!")
			say("Asa cum am spus ma tin de promisiune")
			say("Si iti voi da calul Militar!")							
			pc.give_item2("50053", 1)
			pc.remove_item("50052", 1)
			horse.unride()
			horse.set_level(21)
			horse.summon()
			horse.ride()
			set_state(ende)			
		end
	end
	state ende begin
	end
end