Cerere quest
Are cineva un quest de genul ? de exemplu sa primesti la un anumit nivel o misiune sa te duci la un npc . acel npc sa te puna sa omori x mobi de un fel si cand te intorci la el sa primesti ceva. Dau THX
----------------------------------
-- LvL 40 / Fluchsammlung
----------------------------------
state collect_quest_lv40 begin
when login or levelup with pc.level>39 begin
set_state(talk_to_disciple_lv40)
end
end
state talk_to_disciple_lv40 begin
when letter begin
local v = find_npc_by_vnum(20084)
if v != 0 then target.vid("__TARGET__", v, "Biologe")
end
send_letter("Cercetarea biologului nr 2")
end
when button or info begin
say_title("Cercetarea biologului nr 2")
say("")
say("Biologul are nevoie de ajutor")
say("Spune ca doreste sa il ajuti in cautarea ")
say("elementelor de constructie")
say("Dute si vorbeste cu el,")
say("Pentru a obtine mai multe amanunte")
say("")
say_reward("Vorbeste cu biologul")
say("")
end
when __TARGET__.target.click or 20084.chat."Fluchbücher" begin
target.delete("__TARGET__")
say("Biologul:")
say("Ei bine ai ajuns...")
say("Investigatia privind Orcii")
say("S-a terminat.")
say("Acum am descoperit noi obiecte,")
say("As vrea sa investighezi")
wait()
say("Biologul:")
say("As putea sa le colectez eu dar,")
say("am prea multe de facut.")
say("Ar fi foarte frumos")
say("daca a-i face asta pentru mine.")
wait()
say("Biologul:")
say("Vreau sa examinezi cartile blesteme.")
say("Am nevoie de 15 carti")
say("Cartile sunt destul de vechi,")
say("acestea cad uneori in afara templului!")
say("")
set_state(collect_cursebook)
pc.setqf("duration",0)
pc.setqf("collect_count",0)
end
end
state collect_cursebook begin
when letter begin
send_letter("Cercetarea biologului nr 2")
end
when button or info begin
say_title("Colectionarea Blestemelor")
say("")
say("Biologul ti-a dat un loc de munca,")
say("Pentru a obtine 15 carti blesteme.")
say("Acest lucru se poate si pe intuneric")
say("Colectionarea cartilor blesteme")
say("")
say_item_vnum(30047)
say_reward("Ai in prezent "..pc.getqf("collect_count").." colectionate!")
say("")
end
when 20084.chat."Cercetarea cartilor blesteme" with pc.count_item(30047)>0 begin
if get_time()>pc.getqf("duration") then
say("Ateapta un minut ...")
say("Multumesc,")
say("lasa-ma sa ma uit")
say("In cazul in care aceasta carte este buna ...")
say("")
pc.remove_item("30047", 1)
pc.setqf("duration",get_time()+300)
wait()
local rand = number(0,99)
if rand<50 then
local count = pc.getqf("collect_count")+1
if count<15 then
pc.setqf("collect_count", count)
say("Biologul:")
say("Excelent aceasta carte este in ordine.")
say("Mai adu-mi deoarece ")
say("Am nevoie de mai multe.")
say("")
say_reward("In prezent ai "..pc.getqf("collect_count").." colectionate!")
say("")
else
say("Biologul:")
say("Ai adus 15 carti .")
say("Ei bine mai am o cercetare.")
say("Am nevoie de piatra sufletului din templu,")
say("Aceasta pica langa templul,")
say("Luptator precum Ork Sef te poate invinge")
say("Cred ca esti suficient de puternic")
say("")
pc.setqf("collect_count",0)
pc.setqf("duration",0)
set_state(collect_templekey)
end
else
say("Biologul:")
say("Imi pare rau aceasta carte,")
say("S-a deteriorat pe parcusul investigatiei")
say("Te rog adu-mi alta.")
end
else
say("Biologul:")
say("Imi pare rau ")
say("nu am terminat studiile inca ...")
say("Te rog sa imi aduci Fluchsammmlung mai tarziu...")
end
end
end
state collect_templekey begin
when letter begin
send_letter("Piatra sufletului din Templu")
end
when button or info begin
say_title("Piatra sufletului din Templu")
say("")
say("Tu ai adus toate cele 15 carti blestem.")
say("Iar acum ai Piatra sufletului din Templu.")
say("")
say_item_vnum(30221)
say("Stiai ca aceasta piatra contine")
say("Sufletul urmasilor din templu?")
say("")
end
when 635.kill or 636.kill or 637.kill begin
if pc.count_item(30221)<1 then
local rand = number(0,99)
if rand<5 then pc.give_item2(30221, 1)
end
end
end
when 20084.chat."Piatra sufletului din Templu" begin
if pc.count_item(30221)>0 then
say("Biologul:")
say("Pentru a primii recompensa ")
say("In urma cautarii de informatii despre.")
say("Cartile blesteme si Piatra sufletului din Templu.")
say("Dute si cauta-l pe Baek-Go,")
say("Acesta se afla in oras.")
say("")
pc.remove_item(30221,1)
set_state(templekey_reward)
else
say("Biologul:")
say("Ai adus 15 carti .")
say("Ei bine mai am o cercetare.")
say("Am nevoie de piatra sufletului din templu,")
say("Aceasta pica langa templul,")
say("Luptator precum Ork Sef te poate invinge")
say("Cred ca esti suficient de puternic")
say("")
end
end
state templekey_reward begin
when letter begin
send_letter("Dute si vorbeste cu Baek-GO")
local v = find_npc_by_vnum(20018)
if v != 0 then target.vid("__TARGET__", v, "Doktor")
end
end
when button or info begin
say_title("Vorbeste cu Baek-Go")
say(Pentru a primi recompensa,")
say("In urma colecatrii de informatii")
say("despre cartile blestem si piatra sufletului din templu")
say("Dute in oras la Baek-Go.")
say("")
end
when __TARGET__.target.click or 20018.chat."Belohnung des Biologen" begin
target.delete("__TARGET__")
say_title("Baek-Go:")
say("Sa vedem, zici ca biologul te-a trimis la mine ...")
say("Biologul te-a trimis la mine")
say("Uite rasplata ta")
say("")
say_reward("Primesti:")
say_reward("+5% Viteza de atac (Permanent)")
say("")
affect.add_collect(apply.ATT_SPEED,5,60*60*24*365*60)
set_state(collect_quest_lv50)
end
end- Pentru acest mesaj, Pongo A.K.A Titan for the post:
- Ionuț Daniel
Cod: Selectaţi tot
---------------------------------------------
-- Quest » Main quest lv. 110 -
-- Created by Mandi -
-- Language » Româna - -
---------------------------------------------
quest main_quest_lv_110 begin
state start begin
when login or levelup with pc.get_level() >= 110 begin
send_letter("Suprematia Bosilor")
end
when button or info begin
say_title("Suprematia Bosilor")
say("")
say("Bine-ai revenit, "..pc.get_name().."!")
say("De data aceasta va trebui sa omori pentru mine")
say("niste bosi care ameninta orasele noastre!")
say("")
say("Lista bosilor:")
say_reward("Beran | Azrael | Reaper | Regina Arahnidelor | Gargoyle | Wubba")
say("")
pc.setqf("kill_beran", 0)
pc.setqf("kill_azrael", 0)
pc.setqf("kill_reaper", 0)
pc.setqf("kill_spider_queen", 0)
pc.setqf("kill_gargoyle", 0)
pc.setqf("kill_wubba", 0)
set_state(kill_boss)
end
end
state kill_boss begin
when letter begin
send_letter("Suprematia Bosilor - Distrugere")
end
when button or info begin
say_title("Distrugere:")
say("")
say("Distruge-i fara remuscari sau sentimente!")
say("")
say("Beran: "..pc.getqf("kill_beran")..".")
say("Azrael: "..pc.getqf("kill_azrael")..".")
say("Reaper: "..pc.getqf("kill_reaper")..".")
say("Regina Arahnidelor: "..pc.getqf("kill_spider_queen")..".")
say("Gargoyle: "..pc.getqf("kill_gargoyle")..".")
say("Wubba: "..pc.getqf("kill_wubba")..".")
say("")
wait()
if pc.getqf("kill_beran") == 1 and pc.getqf("kill_azrael") == 1 and pc.getqf("kill_reaper") == 1 and pc.getqf("kill_spider_queen") == 1 and pc.getqf("kill_gargoyle") == 1 and pc.getqf("kill_wubba") == 1 then
set_state(succeed)
else
send_letter("Suprematia Bosilor - Distrugere")
end
end
when 2493.kill with pc.getqf("kill_beran") == 0 begin
pc.setqf("kill_beran", 1)
syschat("Beran Setaou a fost distrus!")
end
when 2598.kill with pc.getqf("kill_azrael") == 0 begin
pc.setqf("kill_azrael", 1)
syschat("Azrael a fost distrus!")
end
when 1093.kill with pc.getqf("kill_reaper") == 0 begin
pc.setqf("kill_reaper", 1)
syschat("Reaper-ul a fost distrus!")
end
when 2092.kill with pc.getqf("kill_spider_queen") == 0 begin
pc.setqf("kill_spider_queen", 1)
syschat("Regina Paianjenilor a fost distrusa!")
end
when 3790.kill with pc.getqf("kill_gargoyle") == 0 begin
pc.setqf("kill_gargoyle", 1)
syschat("Gargoyle a fost distrus!")
end
when 3791.kill with pc.getqf("kill_wubba") == 0 begin
pc.setqf("kill_wubba", 1)
syschat("Wubba a fost distrus!")
end
when 2493.kill or 2598.kill or 1093.kill or 2092.kill or 41022.kill or 2620.kill with pc.getqf("kill_beran") == 1 and pc.getqf("kill_azrael") == 1 and pc.getqf("kill_reaper") == 1 and pc.getqf("kill_spider_queen") == 1 and pc.getqf("kill_gargoyle") == 1 and pc.getqf("kill_wubba") == 1 begin
syschat("Misiunea ta a fost incheiata cu succes!")
set_state(succeed)
end
end
state succeed begin
when letter begin
send_letter("Suprematia Bosilor - Terminat")
end
when button or info begin
say_title("Suprematia Bosilor - Terminat:")
say("")
say("Foarte bine, sobolane... Acum orasul este")
say("un loc mai sigur pentru toata lumea!")
say("")
say("Poftim si recompensa ta:")
say_reward("Tare impotriva warrior + 10")
say_reward("Tare impotriva assassin + 10")
say_reward("Tare impotriva sura + 10")
say_reward("Tare impotriva shaman + 10")
say("")
affect.add_collect(apply.ATTBONUS_WARRIOR, 10, 60*60*24*365*60)
affect.add_collect(apply.ATTBONUS_ASSASSIN, 10, 60*60*24*365*60)
affect.add_collect(apply.ATTBONUS_SURA, 10, 60*60*24*365*60)
affect.add_collect(apply.ATTBONUS_SHAMAN, 10, 60*60*24*365*60)
clear_letter()
set_state(__COMPLETE__)
end
end
state __COMPLETE__ begin
end
end- Pentru acest mesaj, iNooB for the post:
- Ionuț Daniel
Site: http://www.VDSHost.ro
Servicii complete de găzduire, mentenanță și promovare online, utilizăm doar software licențiat și echipamente bare metal.
Afișează semnătura
După cum spuneam pe chat , nu vreau să duci nimic . Doar să te pună să omori. Asa puteam prin quest direct , dar vreau sa fie la un NPC. Am primit mai sus un raspuns , o sa-l incercPongo scrie:---------------------------------- -- LvL 40 / Fluchsammlung ---------------------------------- state collect_quest_lv40 begin when login or levelup with pc.level>39 begin set_state(talk_to_disciple_lv40) end end state talk_to_disciple_lv40 begin when letter begin local v = find_npc_by_vnum(20084) if v != 0 then target.vid("__TARGET__", v, "Biologe") end send_letter("Cercetarea biologului nr 2") end when button or info begin say_title("Cercetarea biologului nr 2") say("") say("Biologul are nevoie de ajutor") say("Spune ca doreste sa il ajuti in cautarea ") say("elementelor de constructie") say("Dute si vorbeste cu el,") say("Pentru a obtine mai multe amanunte") say("") say_reward("Vorbeste cu biologul") say("") end when __TARGET__.target.click or 20084.chat."Fluchbücher" begin target.delete("__TARGET__") say("Biologul:") say("Ei bine ai ajuns...") say("Investigatia privind Orcii") say("S-a terminat.") say("Acum am descoperit noi obiecte,") say("As vrea sa investighezi") wait() say("Biologul:") say("As putea sa le colectez eu dar,") say("am prea multe de facut.") say("Ar fi foarte frumos") say("daca a-i face asta pentru mine.") wait() say("Biologul:") say("Vreau sa examinezi cartile blesteme.") say("Am nevoie de 15 carti") say("Cartile sunt destul de vechi,") say("acestea cad uneori in afara templului!") say("") set_state(collect_cursebook) pc.setqf("duration",0) pc.setqf("collect_count",0) end end state collect_cursebook begin when letter begin send_letter("Cercetarea biologului nr 2") end when button or info begin say_title("Colectionarea Blestemelor") say("") say("Biologul ti-a dat un loc de munca,") say("Pentru a obtine 15 carti blesteme.") say("Acest lucru se poate si pe intuneric") say("Colectionarea cartilor blesteme") say("") say_item_vnum(30047) say_reward("Ai in prezent "..pc.getqf("collect_count").." colectionate!") say("") end when 20084.chat."Cercetarea cartilor blesteme" with pc.count_item(30047)>0 begin if get_time()>pc.getqf("duration") then say("Ateapta un minut ...") say("Multumesc,") say("lasa-ma sa ma uit") say("In cazul in care aceasta carte este buna ...") say("") pc.remove_item("30047", 1) pc.setqf("duration",get_time()+300) wait() local rand = number(0,99) if rand<50 then local count = pc.getqf("collect_count")+1 if count<15 then pc.setqf("collect_count", count) say("Biologul:") say("Excelent aceasta carte este in ordine.") say("Mai adu-mi deoarece ") say("Am nevoie de mai multe.") say("") say_reward("In prezent ai "..pc.getqf("collect_count").." colectionate!") say("") else say("Biologul:") say("Ai adus 15 carti .") say("Ei bine mai am o cercetare.") say("Am nevoie de piatra sufletului din templu,") say("Aceasta pica langa templul,") say("Luptator precum Ork Sef te poate invinge") say("Cred ca esti suficient de puternic") say("") pc.setqf("collect_count",0) pc.setqf("duration",0) set_state(collect_templekey) end else say("Biologul:") say("Imi pare rau aceasta carte,") say("S-a deteriorat pe parcusul investigatiei") say("Te rog adu-mi alta.") end else say("Biologul:") say("Imi pare rau ") say("nu am terminat studiile inca ...") say("Te rog sa imi aduci Fluchsammmlung mai tarziu...") end end end state collect_templekey begin when letter begin send_letter("Piatra sufletului din Templu") end when button or info begin say_title("Piatra sufletului din Templu") say("") say("Tu ai adus toate cele 15 carti blestem.") say("Iar acum ai Piatra sufletului din Templu.") say("") say_item_vnum(30221) say("Stiai ca aceasta piatra contine") say("Sufletul urmasilor din templu?") say("") end when 635.kill or 636.kill or 637.kill begin if pc.count_item(30221)<1 then local rand = number(0,99) if rand<5 then pc.give_item2(30221, 1) end end end when 20084.chat."Piatra sufletului din Templu" begin if pc.count_item(30221)>0 then say("Biologul:") say("Pentru a primii recompensa ") say("In urma cautarii de informatii despre.") say("Cartile blesteme si Piatra sufletului din Templu.") say("Dute si cauta-l pe Baek-Go,") say("Acesta se afla in oras.") say("") pc.remove_item(30221,1) set_state(templekey_reward) else say("Biologul:") say("Ai adus 15 carti .") say("Ei bine mai am o cercetare.") say("Am nevoie de piatra sufletului din templu,") say("Aceasta pica langa templul,") say("Luptator precum Ork Sef te poate invinge") say("Cred ca esti suficient de puternic") say("") end end state templekey_reward begin when letter begin send_letter("Dute si vorbeste cu Baek-GO") local v = find_npc_by_vnum(20018) if v != 0 then target.vid("__TARGET__", v, "Doktor") end end when button or info begin say_title("Vorbeste cu Baek-Go") say(Pentru a primi recompensa,") say("In urma colecatrii de informatii") say("despre cartile blestem si piatra sufletului din templu") say("Dute in oras la Baek-Go.") say("") end when __TARGET__.target.click or 20018.chat."Belohnung des Biologen" begin target.delete("__TARGET__") say_title("Baek-Go:") say("Sa vedem, zici ca biologul te-a trimis la mine ...") say("Biologul te-a trimis la mine") say("Uite rasplata ta") say("") say_reward("Primesti:") say_reward("+5% Viteza de atac (Permanent)") say("") affect.add_collect(apply.ATT_SPEED,5,60*60*24*365*60) set_state(collect_quest_lv50) end end
Va dau THX la amandoi.Cod: Selectaţi tot
quest nume.quest begin
state start begin
when login or levelup with pc.get_level() >= 70 begin
set_state("go_to_disciple")
end
end
state go_to_disciple begin
when letter begin
local v = find_npc_by_vnum(cod npc )
if v != 0 then
target.vid("capitan", v, "Capitan")
end
send_letter("*nume.quest")
endSite: http://www.VDSHost.ro
Servicii complete de găzduire, mentenanță și promovare online, utilizăm doar software licențiat și echipamente bare metal.
Afișează semnătura
Mutat în cereri rezolvate.
de
Răspunsuri
6 Vizualizări
350
6 Vizualizări
350
de
Răspunsuri
2 Vizualizări
463
2 Vizualizări
463
de
Răspunsuri
2 Vizualizări
177
2 Vizualizări
177
de
Răspunsuri
5 Vizualizări
1777
5 Vizualizări
1777
-
- Informaţie
-
Cine este conectat
Utilizatori ce ce navighează pe acest forum: Niciun utilizator înregistrat și 5 vizitatori