Salut, mă ajută cineva cu un quest de Biolog doar la misiunea cu dintii de orc ?
- Timpul în care să duci un dinte să fie de o oră.
- Bonusuriile:
Ai primit 3000k pv.
Ai primit 10% SemiOm.
Ai primit 10% Critică
Ai primit 10% Patrundere

Toate aceste bonusuri să fie date când termini doar misiunea cu dintii!

Ăsta: Sau ăsta: P.S: Nu le-am testat.

Natsu scrie:Ăsta:

Cod: Selectaţi tot

quest	biologist_sequence30  begin
        state start begin
                when login or levelup with pc.level >= 30 and pc.level <= 105 begin
                        set_state(information)
                end
        end
        state information begin
                when letter begin
                        local v = find_npc_by_vnum(20084)
                        if v != 0 then
                                target.vid("__TARGET__", v, "Cererea biologului")
                        end
                        send_letter("Cererea biologului")
                end
                when button or info begin
					say_title("Cererea biologului")
					say("Biologul are nevoie de ajutorul tãu dute ºi vezi ce") 
					say("vrea sã faci pentru el. Bineînþeles vei primi ºi ")
					say("o recompensã binemeritatã. ")
                end
                when __TARGET__.target.click or
                        20084.chat."Dinþii de Ork " begin
						target.delete("__TARGET__")
						say_title("Biologul Regatului:")
						say("Oh, ai venit sã mã ajuþi? ") 
						say("Ei bine eu sunt biologul acestui regat, ºi mã ocup") 
						say("cu studiul numeroaselor plante din regat.")
						say("Dacã mã ajuþi cu cercetarea eu te voi rãsplãti din")
						say("plin cu diferite obiecte sau experienþã. ") 
						wait() 
						say_title("Biologul Regatului:") 
						say("De aceastã datã eu mã ocup de dinþii de ork, dar ") 
						say("în acest moment mã ocup de un alt studiu ºi nu") 
						say("pot pleca în excursie de cercetare. Trebuie sã ") 
						say("mergi în valea dragonului.")
						wait() 
						say_title("Biologul Regatului:") 
						say("Odatã ce ai ajuns în valea dragonului va trebui") 
						say("sã colectezi zece dinþi de ork în perfectã ") 
						say("stare pentru cercetãrile mele.") 							
                        set_state(go_to_disciple)
                        pc.setqf("duration",0)
                        pc.setqf("collect_count",0)
                        pc.setqf("drink_drug",0)
                end
        end
        state go_to_disciple begin
                when letter begin
                        send_letter("Cercetãrile Dintilor de Orc")
                end
                when button or info begin
					say_title("Informaþie:") 
					say("Biologul te-a trimis în valea dragonului pentru") 
					say("a colecta zece dinþi de ork. Colecteazã-i pe") 
					say("toþi ºi dui biologului pe rând câte unul pentru")
					say("a finaliza cercetãrile actuale.")
					say_item_vnum(30006)  
					say_verde("Pânã acum ai "..pc.getqf("collect_count").." dinþi de ork.") 
                end
                when 71035.use begin
                        if get_time() < pc.getqf("duration") then
                                say("")
                                say("Puteti reduce timpul de asteptare.")
                                say("")
                                return
                        end
                        if pc.getqf("drink_drug")==1 then
                                say("")
                                say("You already used it.")
                                say("")
                                return
                        end
                        if pc.count_item(30006)==0 then
                                say_title("Biologul Regatului:")
                                say("")
                                say("Pana ce nu e gata dintele")
                                say("Acum il puteti folosi.")
                                say("")
                                return
                        end
                        item.remove()
                        pc.setqf("drink_drug",1)
                end

		when 20084.chat."Elimin limita de timp." with pc.count_item(30006) >0 and pc.is_gm() and get_time() <= pc.getqf("duration") begin
			say_title("Biologul Regatului:")
			say("Ai eliminat limita de timp.")
			pc.setqf("duration", get_time()-1)
			return
		end
		when 20084.chat."Elimin limita de timp." with pc.count_item(70251)>= 1 and get_time() <= pc.getqf("duration") begin
			say_title("Biologul Regatului:")
			say("Ai eliminat limita de timp datorita acestei flori.")
			say_item_vnum(70251)
			pc.setqf("duration", get_time()-1)
			pc.remove_item("70251",1)
			return
		end

            when 20084.chat."Am un dinte de ork." with pc.count_item(30006) >0   begin
                        if get_time() > pc.getqf("duration") then
							if  pc.count_item(30006) >0 then
								say("Dã-mi un moment te rog. Mulþumesc pentru")
								say("timpul acordat. Acum voi verifica sã vãd") 
								say("dacã dintele acesta este folositor.")  
								pc.remove_item("30006",1)
								if  is_test_server()  then 
								pc.setqf("duration",get_time()+0)
								else
								pc.setqf("duration",get_time()+0)
	end
                                wait()
                                local pass_percent
                                if pc.getqf("drink_drug")==0 then
                                        pass_percent=100
                                else
                                        pass_percent=0
                                end
                                local s= number(1,100)
                                if s<= pass_percent  then
                                   if pc.getqf("collect_count")< 9 then
                                                local index =pc.getqf("collect_count")+1
                                                pc.setqf("collect_count",index)
                                               
										say_title("Biologul Regatului:")
										say("Foarte bine, acest dinte este foarte bun.")
										say_verde("Ai pânã în prezent".." "..10-pc.getqf("collect_count").. " dint(e)þi colectaþi.")
                                               
											   pc.setqf("drink_drug",0)
                                                return
                                        end
                                        say_title("Biologul Regatului:")
										say("Se pare cã ai adunat toþi dinþii de ork.")
										say("Totuºi mai am o micã sarcinã. Am nevoie de")
										say("încã o bijuterie a sufletului.")		
                                        pc.setqf("collect_count",0)
                                        pc.setqf("drink_drug",0)
                                        pc.setqf("duration",60)
                                        set_state(key_item)
                                        return
                                else
								say_title("Biologul Regatului:")
								say("Aceastã dinte este de calitate proastã.")
								say("Adu-mi altu te rog frumos.") 
                                pc.setqf("drink_drug",0)
                                return
                                end
				else
                    say_title("Biologul Regatului:")
					say("Nu ai nici un "..item_name(30006).." !")
					return
				end
            else
					say_title("Biologul Regatului:")
					say("Studiile nu sunt terminate încã. ") 
					say("Te rog sã îmi aduci un alt dinte mai târziu.") 
                  return
                end
        end
end
        state key_item begin
                when letter begin
                        send_letter("P. sufletului Jinunggyi")
                        if pc.count_item(30220)>0 then
                                local v = find_npc_by_vnum(20084)
                                if v != 0 then
                                        target.vid("__TARGET__", v, "")
                                end
                        end
                end
                when button or info begin
                        if pc.count_item(30220) >0 then
                                say_title("P. sufletului Jinunggyi")
								---                                                   l
								say("Ai gãsit piatra întoarcete la Biologul Regatului.")
								say("Pentru a primi recompensa.")
                                return
                        end
                        say_title("P. sufletului Jinunggyi") 
						say("Felicitãri! Ai toþi cei 10 dinþi de ork ") 
						say("Acum ai nevoie sã capturaþi piatra Jinunggyis")  
						say_item_vnum(30220) 
						say_reward("Aceastã piatrã de fapt conþine un suflet.") 
                end
                when 635.kill or
                        636.kill or
                        637.kill  begin
                        local s = number(1, 100)
                        if s == 1 and pc.count_item(30220)==0 then
                                pc.give_item2(30220, 1)
                                send_letter("Ai primit: P. sufletului Jinunggyi.")
                        end
                end
                when __TARGET__.target.click  or
                        20084.chat."P. sufletului Jinunggyi." with pc.count_item(30220) > 0  begin
                        target.delete("__TARGET__")
						if pc.count_item(30220) > 0 then 
                        say_title("Biologe Chaegirab")
						say("Felicitãrile mele ucenicule, se pare cã ai la")
						say("tine P. sufletului Jinunggyi.")
						say("Cãutare noastrã este pe sfârºit acum mergi la")
						say("Baek-Go, ºi dui aceastã reþetã.")
                        pc.remove_item(30220,1)
                        set_state(__reward)
			else
                say_title("Biologul Regatului")
				say("Nu ai gãsit "..item_name(30220).." !")
				say("")
				return
                end
        end

		end
        state __reward begin
                when letter begin
                        send_letter("Gãseºtel pe Baek-Go.")
                        local v = find_npc_by_vnum(20018)
                        if v != 0 then
                                target.vid("__TARGET__", v, "Baek-Go")
                        end
                end
                when button or info begin
                        say_title("Gãseºtel pe Baek-Go:")
						say("La-i ajutat pe Biolog sã studieze dinþii de")
						say("Ork. Acum mergi la Baek-Go.")
                end
                when __TARGET__.target.click  or
                        20018.chat."Reþeta secretã."  begin
                        target.delete("__TARGET__")
						say_title("Baek-Go:")
						say("Bun venit la mine strãine(ã) Ce este cu aceastã ")
						say("reþetã ? Oh, biologul te-a trimis la mine ?")
						wait()
						say_title("Baek-Go:")
						say("Aceastã reþetã trimisã de biolog trebuie sã o")
						say("procur pentru tine. Este deja gata.")
						say("")
						say_verde("Ai primit 15% vitezã de miºcare (permanent")
						wait()
			-----------                                                   l
						affect.add_collect(apply.ATTBONUS_HUMAN, 10, 60*60*24*365*60)
						affect.add_collect(apply.Max_HP, 3000, 60*60*24*365*60) 
						affect.add_collect(apply.CRITICAL_PCT, 10, 60*60*24*365*60)
						affect.add_collect(apply.PENETRATE_PCT, 10, 60*60*24*365*60)
						
                        clear_letter()
                        set_quest_state("biologist_sequence40", "run")
                        set_state(__complete)
                end
        end
        state __giveup__ begin
                when 20084.chat."Un alt progres." begin
                        say_title("Biologul Regatului:")
                        say("Mai am ceva misiuni pentru tine. revino la un")
						say("nivel mai mare.")
                        set_state(start)
             end
         end
        state __complete begin
        end
end

Sau ăsta:

Cod: Selectaţi tot

quest	biologist_sequence30  begin
        state start begin
                when login or levelup with pc.level >= 30 and pc.level <= 105 begin
                        set_state(information)
                end
        end
        state information begin
                when letter begin
                        local v = find_npc_by_vnum(20084)
                        if v != 0 then
                                target.vid("__TARGET__", v, "Cererea biologului")
                        end
                        send_letter("Cererea biologului")
                end
                when button or info begin
					say_title("Cererea biologului")
					say("Biologul are nevoie de ajutorul tãu dute ºi vezi ce") 
					say("vrea sã faci pentru el. Bineînþeles vei primi ºi ")
					say("o recompensã binemeritatã. ")
                end
                when __TARGET__.target.click or
                        20084.chat."Dinþii de Ork " begin
						target.delete("__TARGET__")
						say_title("Biologul Regatului:")
						say("Oh, ai venit sã mã ajuþi? ") 
						say("Ei bine eu sunt biologul acestui regat, ºi mã ocup") 
						say("cu studiul numeroaselor plante din regat.")
						say("Dacã mã ajuþi cu cercetarea eu te voi rãsplãti din")
						say("plin cu diferite obiecte sau experienþã. ") 
						wait() 
						say_title("Biologul Regatului:") 
						say("De aceastã datã eu mã ocup de dinþii de ork, dar ") 
						say("în acest moment mã ocup de un alt studiu ºi nu") 
						say("pot pleca în excursie de cercetare. Trebuie sã ") 
						say("mergi în valea dragonului.")
						wait() 
						say_title("Biologul Regatului:") 
						say("Odatã ce ai ajuns în valea dragonului va trebui") 
						say("sã colectezi zece dinþi de ork în perfectã ") 
						say("stare pentru cercetãrile mele.") 							
                        set_state(go_to_disciple)
                        pc.setqf("duration",0)
                        pc.setqf("collect_count",0)
                        pc.setqf("drink_drug",0)
                end
        end
        state go_to_disciple begin
                when letter begin
                        send_letter("Cercetãrile Dintilor de Orc")
                end
                when button or info begin
					say_title("Informaþie:") 
					say("Biologul te-a trimis în valea dragonului pentru") 
					say("a colecta zece dinþi de ork. Colecteazã-i pe") 
					say("toþi ºi dui biologului pe rând câte unul pentru")
					say("a finaliza cercetãrile actuale.")
					say_item_vnum(30006)  
					say_verde("Pânã acum ai "..pc.getqf("collect_count").." dinþi de ork.") 
                end
                when 71035.use begin
                        if get_time() < pc.getqf("duration") then
                                say("")
                                say("Puteti reduce timpul de asteptare.")
                                say("")
                                return
                        end
                        if pc.getqf("drink_drug")==1 then
                                say("")
                                say("You already used it.")
                                say("")
                                return
                        end
                        if pc.count_item(30006)==0 then
                                say_title("Biologul Regatului:")
                                say("")
                                say("Pana ce nu e gata dintele")
                                say("Acum il puteti folosi.")
                                say("")
                                return
                        end
                        item.remove()
                        pc.setqf("drink_drug",1)
                end

		when 20084.chat."Elimin limita de timp." with pc.count_item(30006) >0 and pc.is_gm() and get_time() <= pc.getqf("duration") begin
			say_title("Biologul Regatului:")
			say("Ai eliminat limita de timp.")
			pc.setqf("duration", get_time()-1)
			return
		end
		when 20084.chat."Elimin limita de timp." with pc.count_item(70251)>= 1 and get_time() <= pc.getqf("duration") begin
			say_title("Biologul Regatului:")
			say("Ai eliminat limita de timp datorita acestei flori.")
			say_item_vnum(70251)
			pc.setqf("duration", get_time()-1)
			pc.remove_item("70251",1)
			return
		end

            when 20084.chat."Am un dinte de ork." with pc.count_item(30006) >0   begin
                        if get_time() > pc.getqf("duration") then
							if  pc.count_item(30006) >0 then
								say("Dã-mi un moment te rog. Mulþumesc pentru")
								say("timpul acordat. Acum voi verifica sã vãd") 
								say("dacã dintele acesta este folositor.")  
								pc.remove_item("30006",1)
								if  is_test_server()  then 
								pc.setqf("duration",get_time()+0)
								else
								pc.setqf("duration",get_time()+0)
	end
                                wait()
                                local pass_percent
                                if pc.getqf("drink_drug")==0 then
                                        pass_percent=100
                                else
                                        pass_percent=0
                                end
                                local s= number(1,100)
                                if s<= pass_percent  then
                                   if pc.getqf("collect_count")< 9 then
                                                local index =pc.getqf("collect_count")+1
                                                pc.setqf("collect_count",index)
                                               
										say_title("Biologul Regatului:")
										say("Foarte bine, acest dinte este foarte bun.")
										say_verde("Ai pânã în prezent".." "..10-pc.getqf("collect_count").. " dint(e)þi colectaþi.")
                                               
											   pc.setqf("drink_drug",0)
                                                return
                                        end
                                        say_title("Biologul Regatului:")
										say("Se pare cã ai adunat toþi dinþii de ork.")
										say("Totuºi mai am o micã sarcinã. Am nevoie de")
										say("încã o bijuterie a sufletului.")		
                                        pc.setqf("collect_count",0)
                                        pc.setqf("drink_drug",0)
                                        pc.setqf("duration",3600)
                                        set_state(key_item)
                                        return
                                else
								say_title("Biologul Regatului:")
								say("Aceastã dinte este de calitate proastã.")
								say("Adu-mi altu te rog frumos.") 
                                pc.setqf("drink_drug",0)
                                return
                                end
				else
                    say_title("Biologul Regatului:")
					say("Nu ai nici un "..item_name(30006).." !")
					return
				end
            else
					say_title("Biologul Regatului:")
					say("Studiile nu sunt terminate încã. ") 
					say("Te rog sã îmi aduci un alt dinte mai târziu.") 
                  return
                end
        end
end
        state key_item begin
                when letter begin
                        send_letter("P. sufletului Jinunggyi")
                        if pc.count_item(30220)>0 then
                                local v = find_npc_by_vnum(20084)
                                if v != 0 then
                                        target.vid("__TARGET__", v, "")
                                end
                        end
                end
                when button or info begin
                        if pc.count_item(30220) >0 then
                                say_title("P. sufletului Jinunggyi")
								---                                                   l
								say("Ai gãsit piatra întoarcete la Biologul Regatului.")
								say("Pentru a primi recompensa.")
                                return
                        end
                        say_title("P. sufletului Jinunggyi") 
						say("Felicitãri! Ai toþi cei 10 dinþi de ork ") 
						say("Acum ai nevoie sã capturaþi piatra Jinunggyis")  
						say_item_vnum(30220) 
						say_reward("Aceastã piatrã de fapt conþine un suflet.") 
                end
                when 635.kill or
                        636.kill or
                        637.kill  begin
                        local s = number(1, 100)
                        if s == 1 and pc.count_item(30220)==0 then
                                pc.give_item2(30220, 1)
                                send_letter("Ai primit: P. sufletului Jinunggyi.")
                        end
                end
                when __TARGET__.target.click  or
                        20084.chat."P. sufletului Jinunggyi." with pc.count_item(30220) > 0  begin
                        target.delete("__TARGET__")
						if pc.count_item(30220) > 0 then 
                        say_title("Biologe Chaegirab")
						say("Felicitãrile mele ucenicule, se pare cã ai la")
						say("tine P. sufletului Jinunggyi.")
						say("Cãutare noastrã este pe sfârºit acum mergi la")
						say("Baek-Go, ºi dui aceastã reþetã.")
                        pc.remove_item(30220,1)
                        set_state(__reward)
			else
                say_title("Biologul Regatului")
				say("Nu ai gãsit "..item_name(30220).." !")
				say("")
				return
                end
        end

		end
        state __reward begin
                when letter begin
                        send_letter("Gãseºtel pe Baek-Go.")
                        local v = find_npc_by_vnum(20018)
                        if v != 0 then
                                target.vid("__TARGET__", v, "Baek-Go")
                        end
                end
                when button or info begin
                        say_title("Gãseºtel pe Baek-Go:")
						say("La-i ajutat pe Biolog sã studieze dinþii de")
						say("Ork. Acum mergi la Baek-Go.")
                end
                when __TARGET__.target.click  or
                        20018.chat."Reþeta secretã."  begin
                        target.delete("__TARGET__")
						say_title("Baek-Go:")
						say("Bun venit la mine strãine(ã) Ce este cu aceastã ")
						say("reþetã ? Oh, biologul te-a trimis la mine ?")
						wait()
						say_title("Baek-Go:")
						say("Aceastã reþetã trimisã de biolog trebuie sã o")
						say("procur pentru tine. Este deja gata.")
						say("")
						say_verde("Ai primit 15% vitezã de miºcare (permanent")
						wait()
			-----------                                                   l
						affect.add_collect(apply.ATTBONUS_HUMAN, 10, 60*60*24*365*60)
						affect.add_collect(apply.Max_HP, 3000, 60*60*24*365*60) 
						affect.add_collect(apply.CRITICAL_PCT, 10, 60*60*24*365*60)
						affect.add_collect(apply.PENETRATE_PCT, 10, 60*60*24*365*60)
						
                        clear_letter()
                        set_quest_state("biologist_sequence40", "run")
                        set_state(__complete)
                end
        end
        state __giveup__ begin
                when 20084.chat."Un alt progres." begin
                        say_title("Biologul Regatului:")
                        say("Mai am ceva misiuni pentru tine. revino la un")
						say("nivel mai mare.")
                        set_state(start)
             end
         end
        state __complete begin
        end
end

P.S: Nu le-am testat.

Timp 1h ?

da