Questiulimaniu007 scrie:Salut.
Mai am nevoie de un quest si poate ma poti ajuta tu. Stiu ca e cam complicat de facut dar cred ca te vei descurca.
Deci, uite in ce consta acest quest:
1. NPC-ul sa verifice rasa. ( nu conteaza codul la NPC )
2. Sa duci 55 carti ( cartea competentei secundara ) "x" si sa primesti skill-ul "x" sau sa duci 55 carti "y" si sa primesti skill-ul "y"
3. Cand duci cele 55 de carti sa primesti direct skill G.
4. Sa fie cate o optiune pt. fiecare skill: Vartejul Sabiei, Aura Sabiei.
Daca mai ai nevoie de ceva lamuriri, te rog lasa-mi un PM. Multumesc.
Cod: Selectaţi tot
--- ####################
--- ## Quest facut de DaRealPain ##
--- ###################
quest carti begin
state start begin
when NPC_VNUM.chat."Schimbul de carti" begin
say_title("Schimbul de carti")
if pc.get_skill_group() == 0 then
say("Nu ai ales nici o invatatura.")
say("Revoni mai tarziu.")
return
end
local result = buecher_npc.BuildPerfectMasterSkillList(pc.get_job(), pc.get_skill_group())
local vnum_list = result[1]
local name_list = result[2]
if table.getn(vnum_list) == 0 then
say("Nu ai nici un Skill M.")
return
end
local menu_list = {}
table.foreach(name_list, function(i, name) table.insert(menu_list, name) end)
table.insert(menu_list, "Inapoi")
say("Wähle deinen Skill.")
local s=select_table(menu_list)
if table.getn(menu_list) == s then
return
end
local skill_name=name_list[s]
local skill_vnum=vnum_list[s]
if pc.getqf("Skill_"..skill_vnum)>=55 then pc.setqf("Skill_"..skill_vnum, 0) end
say_title(skill_name)
say("Deci doresti sa dai carti pentru skillul "..skill_name)
say("")
say("Carti ramase: "..(55-pc.getqf("Skill_"..skill_vnum)).." ")
if select("Da","Nu")==2 then return end
local item_count = pc.count_item((50400+skill_vnum))
local item_rest = 55-pc.getqf("Skill_"..skill_vnum)
if item_rest<item_count then item_count = item_rest end
pc.setqf("Skill_"..skill_vnum, pc.getqf("Skill_"..skill_vnum) + item_count)
syschat(item_count.." Cartile au fost predate.")
pc.remove_item((50400+skill_vnum), item_count)
if pc.getqf("Skill_"..skill_vnum)>=55 then
pc.set_skill_level(skill_vnum, 30)
syschat(skill_name.." G")
end
end
function BuildPerfectMasterSkillList(job, group)
GRAND_MASTER_SKILL_LEVEL =20
PERFECT_MASTER_SKILL_LEVEL = 30
local skill_list = special.active_skill_list[job+1][group]
local ret_vnum_list = {}
local ret_name_list = {}
table.foreach(skill_list,
function(i, skill_vnum)
local skill_level = pc.get_skill_level(skill_vnum)
if skill_level >= GRAND_MASTER_SKILL_LEVEL and skill_level < PERFECT_MASTER_SKILL_LEVEL then
table.insert(ret_vnum_list, skill_vnum)
local name=locale.GM_SKILL_NAME_DICT[skill_vnum]
if name == nil then name=skill_vnum end
table.insert(ret_name_list, name)
end
end)
return {ret_vnum_list, ret_name_list}
end
end
endQuestMetin2Mirage scrie:Imi poti face un quest in cu care la lv 75 playerii sa trebuiasca sa omoare ingerul cu coasa si sa primeasca cal militar te rog?
Cod: Selectaţi tot
--- ####################
--- ## Quest facut de DaRealPain ##
--- ###################
quest Ingerul Negru begin
state start begin
when login or levelup or letter with pc.level >= 75 begin
set_state(information)
end
end
state information begin
when letter begin
send_letter("Ingerul Negru")
end
when info or button begin
say_title("Ingerul Negru")
say("Salutare.")
say("Ai auzit noile vesti aduse de mesager?")
say("O noua creatura s-a aratat in Turnul Demonilor in ultimul timp.")
say("Mesagerul a spus ca monstrul arata infricosator.")
say("E mare negru si tine o coasa uriasa in mana.")
say("De aceea i s-a dat numele Ingerul Negru, sau Ingerul cu Coasa.")
say("Dar decand a aparut nimeni nu mai este in siguranta.Bestia a ucis")
say("numerosi eroi. Si deoarece te vad puternic, asi vrea sa te rog sa ucizi")
say("bestia cat mai rapid posibil. Si daca vei reusi iti voi da o rasplata pe masura!")
say_reward("Omoara Ingerul cu Coasa")
say("")
end
when 1093.kill begin
say_title("Ingerul Negru")
say("Iti multumesc ca ai omorat Ingerul cu Coasa.")
say("Ca rasplata primesti Calul Militar!")
horse.set_level(11)
horse.summon()
horse.ride()
pc.give_item2(50052, 1)
clear_letter()
set_state(__COMPLETE__)
end
end
state __COMPLETE__ begin
end
end
Sper ca ai inteles 
de 
de