Cod: Selectaţi tot

quest vrajitor begin
	state start begin
	end
	state run begin
		when letter begin
			send_letter("Status loc de munca")
		end
		when button or info begin
			say_title("Status loc de munca")
			say("Meseria ta:")			
			say_reward("Vrajitor")
			say("Rangul tau:")
			if pc.getqf("promovare")==1 then
				say_reward("Invatacel")
				say("Beneficiile tale:")
				say_reward("+10 la toate Statusurile")
				say_reward("+5% Viteza de Farmec")
			elseif pc.getqf("promovare")==2 then
				say_reward("Invatat")
				say("Beneficiile tale:")
				say_reward("+12 la toate Statusurile")
				say_reward("+10% Viteza de Farmec")
			elseif pc.getqf("promovare")==3 then
				say_reward("Vrajitor")
				say("Beneficiile tale:")
				say_reward("+15 la toate Statusurile")
				say_reward("+15% Viteza de Farmec")
			end			
		end
		when login or levelup begin
			if pc.get_level()>=65 and pc.getqf("promovare")==1 then
				set_state(heiligererste)
			elseif pc.get_level()>=80 and pc.getqf("promovare")==2 then
				set_state(heiligerzweite)
			end
		end
	end
	state heiligererste begin
		when letter begin
			send_letter("Promovare!")
			local v=find_npc_by_vnum(20355)
			if 0!=v then
				target.vid("__TARGET__", v, "Căpitan")
			end
		end
		when button or info begin
			say_title("Promovare!")
			say("")
			say("Du-te la Căpitan. El are o sarcina")
			say("speciala pentru tine.")
		end
		when __TARGET__.target.click begin
			say_title("Căpitan")
			say("Hey ho "..pc.get_name())
			say("In sarsit a sosit timpul.")
			say("Ai reusit sa strangi destula experienta")
			say("incat sa fii promovat.")
			say("Pentru a putea fi promovat, trebuie sa")
			say("le arati monstrilor de pe aceasta planeta.")
			say("omorand 100 dintre monstrii din Padurea Fantomelor.")
			say("Mult succes!")
			say("")
			say("")
			pc.setqf("painfant", 0)
			target.delete("__TARGET__")
			set_state(heiligererste_kill)
		end
	end
	
	state heiligererste_kill begin
		when letter begin
			send_letter("Status loc de munca")
		end
		
		when button or info begin
			local a = 100 - pc.getqf("painfant")
			say_title("Status loc de munca")
			say("Meseria ta:")
			say_reward("Vrajitor")
			say("Rangul tau:")
			say_reward("Invatacel")
			say("Beneficiile tale:")
			say_reward("+10 la toate Statusurile")
			say_reward("+5% Viteza de Farmec")
			say("")
			say("")
			wait()
			say_title("Promovare")
			say("")
			say("Mai trebuie sa omori "..a.." monstrii,")
			say("pentru a putea fi promovat.")
			say("")
			say("")
		end
		when 2301.kill or 2302.kill or 2303.kill or 2304.kill or 2305.kill or 2306.kill or 2307.kill or 2311.kill begin
			local a = 100 - pc.getqf("painfant")
			if pc.getqf("painfant")<99 then
				pc.setqf("painfant", pc.getqf("painfant")+1)
				chat("Acesta a fost monstrul numarul "..pc.getqf("painfant")..". Mai ai nevoie de inca "..a..".")
			elseif pc.getqf("painfant") == 99 then
				set_state(heiligererste_end)
			end
		end
	end
	
	state heiligererste_end begin
		when letter begin
			send_letter("Promovare")
		end
		
		when button or info begin
			say_title("Promovare")
			say("")
			say("Ai omorat destui monstrii. Du-te la Căpitan")
			say("pentru a fi promovat.")
			say("")
			say("")
			local v = find_npc_by_vnum(20355)
			if v != 0 then
				target.vid("__TARGET__", v, "Căpitan")
			end
		end
			
		when __TARGET__.target.click begin
			say_title("Căpitan")
			say("")
			say("Wow, ti mi-ai demonstrat ca meriti")
			say("sa fii promovat. Atunci asa sa fie!")
			say("De acum porti Rangul:")
			say_reward("Invatat")
			say("Felicitari!")
			say("Continua sa iti faci treaba asa, si")
			say("candva vei deveni un adevarat Vrajitor.")
			say("")
			say("")
			affect.add_collect(apply.STR,2,60*60*24*365*4)	
			affect.add_collect(apply.CON,2,60*60*24*365*4)	
			affect.add_collect(apply.INT,2,60*60*24*365*4)	
			affect.add_collect(apply.DEX,2,60*60*24*365*4)
			affect.add_collect(apply.CAST_SPEED,5,60*60*24*365*4)
			chat("Ai primit cate doua puncte la fiecare status.")
			chat("Viteza Farmecului s-a marit cu inca 5%.")
			pc.setqf("promovare", 2)
			set_state(run)
		end
	end
	
	state heiligerzweite begin
		when letter begin
			send_letter("Promovare!")
			local v=find_npc_by_vnum(20355)
			if 0!=v then
				target.vid("__TARGET__", v, "Căpitan")
			end
		end
		when button or info begin
			say_title("Promovare!")
			say("")
			say("Du-te la Căpitan. El are o sarcina")
			say("speciala pentru tine.")
		end
		when __TARGET__.target.click begin
			say_title("Căpitan")
			say("Hey ho "..pc.get_name())
			say("A sosit din nou timpul!")
			say("Ai reusit sa strangi destula experienta")
			say("incat sa fii promovat din nou.")
			say("Pentru a putea fi promovat, trebuie sa le")
			say("demonstrezi trimisilor Zeului Dragon ca noi")
			say("nu ne temem de el!")
			say("Omoara 250 monstrii Setaou din Grota.")
			say("Mult succes!")
			say("")
			say("")
			pc.setqf("paingro", 0)
			target.delete("__TARGET__")
			set_state(heiligerzweite_kill)
		end
	end
	
	state heiligerzweite_kill begin
		when letter begin
			send_letter("Status loc de munca")
		end
		
		when button or info begin
			local a = 250 - pc.getqf("paingro")
			say_title("Status loc de munca")
			say("Meseria ta:")
			say_reward("Vrajitor")
			say("Rangul tau:")
			say_reward("Invatat")
			say("Beneficiile tale:")
			say_reward("+12 la toate Statusurile")
			say_reward("+10% Viteza de Farmec")
			say("")
			say("")
			wait()
			say_title("Promovare")
			say("")
			say("Mai ai de omorat inca "..a.." de Trimisi,")
			say("pentru a putea fi promovat.")
			say("")
			say("")
		end
		when 2401.kill or 2402.kill or 2403.kill begin
			local a = 250 - pc.getqf("paingro")
			if pc.getqf("paingro")<249 then
				pc.setqf("paingro", pc.getqf("paingro")+1)
				chat("Acesta a fost monstrul numarul "..pc.getqf("paingro")..". Mai trebuie sa omori inca "..a..".")
			elseif pc.getqf("paingro") == 249 then
				set_state(heiligerzweite_end)
			end
		end
	end
	
	state heiligerzweite_end begin
		when letter begin
			send_letter("Promovare")
		end
		
		when button or info begin
			say_title("Promovare")
			say("")
			say("Ai omorat destui monstrii. Du-te la Căpitan")
			say("pentru a fi promovat.")
			say("")
			say("")
			local v = find_npc_by_vnum(20355)
			if v != 0 then
				target.vid("__TARGET__", v, "Căpitan")
			end
		end
			
		when __TARGET__.target.click begin
			say_title("Căpitan")
			say("")
			say("Wow, tu mi-ai demonstrat ca meriti")
			say("sa fii promovat. Atunci asa sa fie!")
			say("De acum porti Rangul:")
			say_reward("Vrajitor")
			say("")
			say("")
			affect.add_collect(apply.STR,3,60*60*24*365*4)	
			affect.add_collect(apply.CON,3,60*60*24*365*4)	
			affect.add_collect(apply.INT,3,60*60*24*365*4)	
			affect.add_collect(apply.DEX,3,60*60*24*365*4)
			affect.add_collect(apply.CAST_SPEED,5,60*60*24*365*4)
			chat("Ai primit cate trei puncte la fiecare status.")
			chat("Viteza Farmecului s-a marit cu inca 5%")
			pc.setqf("promovare", 3)
			set_state(run)
		end
	end
end