Questprobleme, Bitten

----------------------------------------------------
--Eine neue Quest 
--erstellt mit dem Biologen Quest Editor 
--Made by _DownTime from elitepvpers.com
----------------------------------------------------
quest Order of the Zero Mage Part one  begin
	state start begin
        when login or levelup with pc.get_level() >=10  begin
			set_state(information)
		end	
	end

	state information begin
		when letter begin
			local v = find_npc_by_vnum(20014)
			if v != 0 then
				target.vid("__TARGET__", v, "Quest")
			end
			send_letter("Order of The Zero Mage Parte 1")
		end

		when button or info begin
			say_title("Order of The Zero Mage Parte 1")
			say("")
			say("Finde 50 Baerengallen ")
			say("fur Zauberin Lava,")
			say("für ihren Erinnermich-Trank")
			say("dieser trank hilft ihr sich in ihre")
			say("erinnerung zurueck zu versetzen")
			say("um herauszufinden wie weit der Orden")
			say("noch aktiv ist")
		end

		when __TARGET__.target.click or
			20014.chat."Quest" begin
			target.delete("__TARGET__")
			say("Lavana:")
			---                                                   l
			say("Hallo, du scheinst eine große Zukunft zu haben...")
			say("Mein Vater war einst ein großer Magier, bis er starb...")
			say("ich glaube er war einen Orden beigetreten der nicht gerade...")
			say("viel von Nichtmagiern haelt, er hieß Orden der Nullmagier.....")
			say("Dieser Orden wollte einst die Welt unterwerfen....")
			say("doch sie wurden von den Legendaeren Sura SKEDAR aufgehalten..")
			say("er hatte eine große Macht, die macht der Zauberrueckkehr..")	
			say("sie schien grenzenlos zu sein.und der Orden verschwand..")
			say("dahher will ich herausfinden ob sie wieder aktiv sind...")
			say("da ich dunkle Kraefte spuere, finde 50 Baerengallen fuer...")
			say("meinen Erinner-mich Trank...")
			set_state(go_to_disciple)
			pc.setqf("collect_count",0)
			pc.setqf("drink_drug",0) 
		end
	end

	state go_to_disciple begin
		when letter begin
			send_letter("Auftrag von Lavana")

		end
		when button or info begin
			say_title("Quest")
			---                                                   l
			say("")
			say("Lavana gab euch den Auftrag")
			say("Anzahl Bärengalle zu sammeln!")
			say("Das Item bekommt ihr von Bär.")
			say("Viel Glueck!")
			say("")
			say_item_vnum(30010)
			say_reward("   Du hast".." "..pc.getqf("collect_count").." bis jetzt gesammelt!")
			say("")
		end

		when 71035.use begin --°g´bÃĤô
			if pc.getqf("drink_drug")==1 then
				say("")
				say("Bessere Droppchance!")
				say("")

				return
			end
			if pc.count_item(30010)==0 then
				say("")
				say("Du hast keine!")
				say("Lauf los und besorg mir welche!")
				say("")
				return
			end
			item.remove()	
			pc.setqf("drink_drug",1)
		end


		when 110.kill begin
			if pc.count_item(30010)<Anzahl-pc.getqf("collect_count") then
				pc.give_item2(30010, 1)
			end
		end

    	when 20014.chat."Quest" with pc.count_item(30010) >0   begin
				say("Einen Moment!")
				---                                                   l
				say("Ich werde das Item")
				say("schnell mal ueberpruefen.")
				say("Hoffentlich klappt alles!")
				say("")
				pc.remove_item(30010, 1)
				wait()

				local pass_percent
				if pc.getqf("drink_drug")==0 then
					pass_percent=71080
				else		
					pass_percent=71080
				end

				local s= number(1,100)
			if s<= pass_percent  then
			   if pc.getqf("collect_count")< -1 then     --5*Ó¥H¤U 
						local index =pc.getqf("collect_count")+1 
						pc.setqf("collect_count",index)     --¨ú±o¤@* +1
						say("Lavana:")
						say("Perfekt! Das Item ist in Ordnung")
						say("Du hast bis jetzt ".." "..Anzahl-pc.getqf("collect_count").. " abgegeben!")
						say("Bring mir die restlichen!")
						say("")
						pc.setqf("drink_drug",0)	 --ÃĤôªì©l¤Æ
						return
					end
					say("Lavana:")
					say("Yuhu! Du hast mir")
					say("alles gebracht!")
					say("endlich kann ich den Erinner-mich Trank")
					say("brauen!")
					say("alectura sidozium...!")
					say("Dafür werde ich dich wie versprochen")
				    say("belohnen!")
					say("")
					say_reward("Du bekommst ein Metin Rufrolle!")
					say_reward("Du bekommst ein Truhe!")
					say_reward("Du bekommst ein Emo Maske!")
					say_reward("Du bekommst 50000000 Yang!")
					say_reward("Du bekommst 2000 Erfahrung!")
					pc.setqf("collect_count",0)
					pc.setqf("drink_drug",0)
					clear_letter()
					set_state(__complete)

					pc.give_item2(71080)
					pc.give_item2(50081)
					pc.give_item2(71011)
					pc.change_money(50000000)
					pc.give_exp2(2000)
					set_quest_state("levelup","run")


					return
				else								
				say("Lavana:")
				say("Dieses Item ist von schlechter Qualität!")
				say("Es kann nicht verwendet werden.")
				say("Hole mir ein neues!")
				say("")
				pc.setqf("drink_drug",0)	 --ÃĤôªì©l¤Æ
				return
				end
	end
end


		
	state __complete begin
	end
end