Salut , cine are questuri pentru :
1. Cal la nivel 25 (ca pe ro) iar la 35 cand ai nivelul 10 la cal sau cat e , sa iti poti lua armat.
2.Misiune de genul : Omoara x ursi sau alt mob , si primesti un item /2 .
Dau thx !
Cerere questuri
Salut, Incearcale pe astea!
Cod: Selectaţi tot
----------------------------------------------------
----- Author: [DEV]TWIX - SoLuS -----
----------------------------------------------------
quest horse_new begin
state start begin
when login or levelup with pc.level >= 25 begin
send_letter("Du-te la Grăjdar")
local v = find_npc_by_vnum(20349)
target.vid("_TINTA_", v, "20349")
end
when info or button begin
say_title("Grăjdar:")
say(" ")
say("A venit momentul să îţi iei calul. Du-te până la ")
say("grăjdar şi vorbeşte cu el despre armăsarul tău. ")
say(" ")
return
end
when _TINTA_.target.click begin
say_title("Grăjdar:")
say(" ")
say("Salutare! Îţi voi da şi ţie un armăsar de nivel 1")
say("pentru a-ţi fi mai uşor să înfrunţi în luptă mon-")
say("ştrii şi inamicii tăi. Pentru a urca nivelul ca- ")
say("lului va trebui să îmi aduci câte o medalie de ")
say("cal pe care le poţi obţine în Peştera Maimuţelor.")
say(" ")
pc.give_item2(50051, 1)
horse.set_level(1)
horse.summon()
horse.ride()
clear_letter()
target.delete("_TINTA_")
set_state(completcal)
end
end
state completcal begin
end
endCod: Selectaţi tot
----------------------------------------------------
----- Author: [DEV]TWIX - SoLuS -----
----------------------------------------------------
quest horse_level begin
state start begin
when 20349.chat."Măreşte nivelul armăsarului" with horse.get_level() >= 1 and horse.get_level() <= 9 begin
say_title("Grăjdar:")
say("")
say("Poţi să măreşti nivelul armăsarului tău cu ajutorul")
say("unei medalii de cal. Grăjdarul are nevoie de ele")
say("pentru a înregistra rezultatele calificărilor.[ENTER]")
say("Vrei să măreşti nivelul armăsarului?[ENTER]")
local cal = select("Da","Nu")
if cal == 1 then
if pc.count_item(50050) < 1 then
say_title("Grăjdar:")
say("")
say("Revin-o când ai o Medalie de cal.[ENTER]")
return
end
if horse.get_level() < 1 then
say_title("Grăjdar:")
say("")
say("Nivelul armăsarului tău este prea mic.[ENTER]")
return
end
if horse.get_level() > 9 then
say_title("Grăjdar:")
say("")
say("Nivelul armăsarului tău este prea mare.[ENTER]")
return
end
if horse.get_level() >= 1 and horse.get_level() <= 9 and pc.count_item(50050) >= 1 then
pc.remove_item(50050,1)
horse.unride ()
horse.ride ()
horse.advance ()
syschat("Armăsarul tău a ajuns la nivelul "..horse.get_level()..".")
end
end
end
end
endCod: Selectaţi tot
---------------------------------------------------
----- Author: [DEV]TWIX - SoLuS -----
----------------------------------------------------
quest horse_summon begin
state start begin
function get_horse_summon_prob_pct() local skill_level=pc.get_skill_level(131) if skill_level==1 then return 15 elseif skill_level==2 then return 20 elseif skill_level==3 then return 30 elseif skill_level==4 then return 40 elseif skill_level==5 then return 50 elseif skill_level==6 then return 60 elseif skill_level==7 then return 70 elseif skill_level==8 then return 80 elseif skill_level==9 then return 90 elseif skill_level>=10 then return 100 end return 10 end
when 20349.chat."Am pierdut imaginea de cal" with horse.get_grade()==1 and pc.countitem("50051")<1 begin
say_title("Grăjdar:")
say("")
say("Din câte văd ai pierdut imaginea de cal")
say("Eu îţi pot fabrica altă imagine de cal dar te va costa 5k.")
say("")
local b=select("Vreau altă carte", "Nu-mi trebuie")
if 1==b then
if pc.money>=5000 then
pc.changemoney(-5000)
say_title("Grăjdar:")
say("")
say("Uite aici noua ta imagine de cal.")
say("De acum fi mai atent.")
say("")
pc.give_item2("50051", 1)
else
say_title("Grăjdar:")
say("")
say("Nu ai suficienţi Yang.")
say("")
end
elseif 2==b then
else
say("UNKNOWN BUTTON ["..b.."]")
end
end
when 20349.chat."Am pierdut cartea calului armat" with horse.get_grade()==2 and pc.countitem("50052")<1 begin
say_title("Grăjdar:")
say("")
say("Din câte văd ai pierdut cartea calului armat.")
say("Eu îţi pot fabrica altă carte dar te va costa 100k.")
say("")
local b=select("Vreau altă carte", "Nu-mi trebuie")
if 1==b then
if pc.money>=100000 then
pc.changemoney(-100000)
say_title("Grăjdar:")
say("")
say("Uite aici noua ta carte pentru calul armat.")
say("De acum fi mai atent.")
say("")
pc.give_item2("50052", 1)
else
say_title("Grăjdar:")
say("")
say("Nu ai suficienţi Yang.")
say("")
end
elseif 2==b then
else
say("UNKNOWN BUTTON ["..b.."]")
end
end
when 20349.chat."Am pierdut cartea calului militar" with horse.get_grade()==3 and pc.countitem("50053")<1 begin
say_title("Grăjdar:")
say("")
say("Din câte văd ai pierdut cartea calului militar")
say("Eu îţi pot fabrica altă carte dar te va costa 150k.")
say("")
local b=select("Vreau altă carte", "Nu-mi trebuie")
if 1==b then
if pc.money>=150000 then
pc.changemoney(-150000)
say_title("Grăjdar:")
say("")
say("Uite aici noua ta carte pentru calul militar.")
say("De acum fi mai atent.")
say("")
pc.give_item2("50053", 1)
else
say_title("Grăjdar:")
say("")
say("Nu ai suficienţi Yang.")
say("")
end
elseif 2==b then
else
say("UNKNOWN BUTTON ["..b.."]")
end
end
when 50051.use with horse.get_grade()==0 begin
say_title("Grăjdar:")
say("")
say("Nu deţii nici un cal!")
say("")
end
when 50051.use with horse.get_grade()==1 begin
if pc.getsp()>=250 then
if number(1, 100)<=horse_summon.get_horse_summon_prob_pct() then
say_title("Informaţie:")
say("")
say_reward("Calul nu a putut fi chemat!")
say("")
horse.summon()
else
say_title("Informaţie:")
say("")
say_reward("Calul nu a putut fi chemat!")
say_reward("Pentru a putea chema calul mai repede în situaţii de urgenţă")
say_reward("trebuie să citeşti manualul Chemarea Calului.")
say("")
end
pc.change_sp(-250)
else
say_title("Informaţie:")
say("")
say_reward("Nu ai reuşit să-ţi chemi calul!")
say_reward("Pentru a chema calul ai nevoie de 250 mana!")
say("")
end
end
when 50051.use with horse.get_grade()==2 begin
say("Calul nu a putut să vină.")
end
when 50051.use with horse.get_grade()==3 begin
say("Calul nu a putut să vină.")
end
when 50052.use with horse.get_grade()==0 begin
say("Calul nu a putut să vină.")
end
when 50052.use with horse.get_grade()==1 begin
say("Calul nu a putut să vină.")
end
when 50052.use with horse.get_grade()==2 begin
if pc.getsp()>=300 then
if number(1, 100)<=horse_summon.get_horse_summon_prob_pct() then
say_title("Informaţie:")
say("")
say_reward("Calul a fost chemat cu succes.")
say("")
horse.summon()
else
say_title("Informaţie:")
say("")
say_reward("Calul nu a putut fi chemat!")
say_reward("Pentru a putea chema calul mai repede în situaţii de urgenţă")
say_reward("trebuie să citeşti manualul Chemarea Calului.")
say("")
end
pc.change_sp(-300)
else
say_title("Informaţie:")
say("")
say_reward("Nu ai reuşit să-ţi chemi calul!")
say_reward("Pentru a chema calul ai nevoie de 300 mana!")
say("")
end
end
when 50052.use with horse.get_grade()==3 begin
say("Calul nu a putut să vină.")
end
when 50053.use with horse.get_grade()==0 begin
say("Calul nu a putut să vină.")
end
when 50053.use with horse.get_grade()==1 begin
say("Calul nu a putut să vină.")
end
when 50053.use with horse.get_grade()==2 begin
say("Calul nu a putut să vină.")
end
when 50053.use with horse.get_grade()==3 begin
if pc.getsp()>=500 then
if number(1, 100)<=horse_summon.get_horse_summon_prob_pct() then
say_title("Informaţie:")
say("")
say_reward("Calul a fost chemat cu succes.")
say("")
horse.summon()
else
say_title("Informaţie:")
say("")
say_reward("Calul nu a putut fi chemat!")
say_reward("Pentru a putea chema calul mai repede în situaţii de urgenţă")
say_reward("trebuie să citeşti manualul Chemarea Calului.")
say("")
end
pc.change_sp(-500)
else
say_title("Informaţie:")
say("")
say_reward("Nu ai reuşit să-ţi chemi calul!")
say_reward("Pentru a chema calul ai nevoie de 500 mana!")
say("")
end
end
end
state __COMPLETE__ begin
when enter begin
q.done()
end
end
end
Mutat în cereri rezolvate.
-
- Informaţie
-
Cine este conectat
Utilizatori ce ce navighează pe acest forum: Niciun utilizator înregistrat și 6 vizitatori


