Quest Reset Skill

[JustChips]

Salut. Caut si eu un quest pentru resetare skilluri cat mai simplu.(fara sa iti scada toate punctele de status si fara sa aiba 1000 de intrebari de exemplu cu lvl si alte chestii cum am vazut la alte questuri)
Stie cineva vreun quest ca acesta sau poate sa il faca?

[JustChips]

Salut. Caut si eu un quest pentru resetare skilluri cat mai simplu.(fara sa iti scada toate punctele de status si fara sa aiba 1000 de intrebari de exemplu cu lvl si alte chestii cum am vazut la alte questuri)
Stie cineva vreun quest ca acesta sau poate sa il faca?

Poftim:

Cod: Selectaţi tot

quest reset_scroll begin
	state start begin
	when 71002.use begin
	say_title("Resetare status")
	say("")
	say("Deci vrei sa iti resetezi statusul!")
	say("Poti trece la starea ta initiala, dar si")
	say("competentele tale se vor reseta .")
	say("Vei primi inapoi toate punctele obtinute !")
	say("")
	say_reward("Ce doriti sa resetati ?")
	local s = select("Punctele de status si de indemanare", "Punctele de status", "Înapoi")
	if 1 == s then
	say_title("Indemanari si puncte de status")
	say("")
	say("Vrei sa iti ")
	say("resetezi cu siguranta ")
	say("abilitatile si statusul .")
	say("")
	say_reward("Esti sigur ?")
	say("")
	local c = select("Da", "Nu")
	if 1 == c then
	char_log(0, "RESET_ALL", "RESET_SKILL_POINTS")
	char_log(0, "RESET_ALL", "USE_ITEM(71002)")
	pc.reset_point()
	pc.clear_skill()
	pc.set_skill_group(0)
	pc.remove_item(71002)
	say_title("Finalizat ")
	say("")
	say("Punctele au fost")
	say("resetate.")
	end
	elseif 2 == s then
	say_title("Puncte de status")
	say("")
	say("Ai cerut ")
	say("sa resetezi")
	say("punctele de status")
	say("")
	say_reward("Esti sigur ?")
	say("")
	local c = select("Da", "Nu")
	if 1 == c then
	char_log(0, "RESET_ALL", "RESET_STAT_POINTS")
	pc.reset_point()
	char_log(0, "RESET_ALL", "USE_ITEM(71002)")
	pc.remove_item(71002)
	say_title("Puncte resetate")
	say("")
	say("Punctele au fost ")
	say("resetate cu succes.")
	end
	end
end

----------------------------------------------------
--Redistribuire
----------------------------------------------------
when 71003.use begin
say_title("Redistribuire indemanari ")
say_reward("Nu vei primi mai mult de 17 puncte")
say_reward("de calificare inapoi !")
say_reward("Doar in caz ca pe o calificare sunt puse mai multe puncte ! ")

local result = BuildSkillList(pc.get_job(), pc.get_skill_group())

local vnum_list = result[1]
local name_list = result[2]

if table.getn(vnum_list) < 2 then
say("Nu exista competente !")
say("")
return
end

say("Indemanare pe care doriti sa o resetati ?")
say("")

local i = select_table(name_list)

if table.getn(name_list) == i then
return
end

local name = name_list[i]
local vnum = vnum_list[i]

say_title("Redistribuire indemanare")
say_reward("Nu veti primi mai mult de 17 puncte")
say_reward("Inapoi daca pe un skill sunt puse mai multe puncte .")
say_reward("Esti sigur ?")
say(string.format("Resetezi %s?", name))
say("")

local s = select("Da", "Nu")
if 2 == s then
return
end

say_title("Redistribuirea competentelor")
say("Odata ce resetarea se face acest lucru nu se mai poate anula.")
say("Continuati ?")
say("")

local c = select("Da", "Nu")

if 2 == c then
return
end

--
--local val = pc.getqf("force_to_master_skill")
--if val > 0 then
--- l
-- say_title("Reditribuire cu succes!")
-- say("Au fost  ")
-- say("redistribuite 17 puncte.")
-- say("Puteti obtine punctele in apoi ..")
-- say("")
-- say_reward("daca")
-- say_reward("resetati din nou .")
-- say("")
-- return
--end

char_log(0, "RESET_ONE_SKILL", "USE_ITEM(71003)")
pc.remove_item(71003)

char_log(0, "RESET_ONE_SKILL", string.format("RESET_SKILL[%s]", name))
pc.clear_one_skill(vnum)

char_log(0, "RESET_ONE_SKILL", "APPLY_17MASTER_BONUS")
pc.setqf("force_to_master_skill", 1)

say_title("Resetare skilluri: Terminat!")
say(string.format("Resetare %s.", name))
say("")

--- l
say_reward("Redistribuire completa ")
say("")
end
end
end

Nu stiu cat de complicat ti se pare....

[JustChips]

Salut. Caut si eu un quest pentru resetare skilluri cat mai simplu.(fara sa iti scada toate punctele de status si fara sa aiba 1000 de intrebari de exemplu cu lvl si alte chestii cum am vazut la alte questuri)
Stie cineva vreun quest ca acesta sau poate sa il faca?

Poftim:

Cod: Selectaţi tot

quest reset_scroll begin
	state start begin
	when 71002.use begin
	say_title("Resetare status")
	say("")
	say("Deci vrei sa iti resetezi statusul!")
	say("Poti trece la starea ta initiala, dar si")
	say("competentele tale se vor reseta .")
	say("Vei primi inapoi toate punctele obtinute !")
	say("")
	say_reward("Ce doriti sa resetati ?")
	local s = select("Punctele de status si de indemanare", "Punctele de status", "Înapoi")
	if 1 == s then
	say_title("Indemanari si puncte de status")
	say("")
	say("Vrei sa iti ")
	say("resetezi cu siguranta ")
	say("abilitatile si statusul .")
	say("")
	say_reward("Esti sigur ?")
	say("")
	local c = select("Da", "Nu")
	if 1 == c then
	char_log(0, "RESET_ALL", "RESET_SKILL_POINTS")
	char_log(0, "RESET_ALL", "USE_ITEM(71002)")
	pc.reset_point()
	pc.clear_skill()
	pc.set_skill_group(0)
	pc.remove_item(71002)
	say_title("Finalizat ")
	say("")
	say("Punctele au fost")
	say("resetate.")
	end
	elseif 2 == s then
	say_title("Puncte de status")
	say("")
	say("Ai cerut ")
	say("sa resetezi")
	say("punctele de status")
	say("")
	say_reward("Esti sigur ?")
	say("")
	local c = select("Da", "Nu")
	if 1 == c then
	char_log(0, "RESET_ALL", "RESET_STAT_POINTS")
	pc.reset_point()
	char_log(0, "RESET_ALL", "USE_ITEM(71002)")
	pc.remove_item(71002)
	say_title("Puncte resetate")
	say("")
	say("Punctele au fost ")
	say("resetate cu succes.")
	end
	end
end

----------------------------------------------------
--Redistribuire
----------------------------------------------------
when 71003.use begin
say_title("Redistribuire indemanari ")
say_reward("Nu vei primi mai mult de 17 puncte")
say_reward("de calificare inapoi !")
say_reward("Doar in caz ca pe o calificare sunt puse mai multe puncte ! ")

local result = BuildSkillList(pc.get_job(), pc.get_skill_group())

local vnum_list = result[1]
local name_list = result[2]

if table.getn(vnum_list) < 2 then
say("Nu exista competente !")
say("")
return
end

say("Indemanare pe care doriti sa o resetati ?")
say("")

local i = select_table(name_list)

if table.getn(name_list) == i then
return
end

local name = name_list[i]
local vnum = vnum_list[i]

say_title("Redistribuire indemanare")
say_reward("Nu veti primi mai mult de 17 puncte")
say_reward("Inapoi daca pe un skill sunt puse mai multe puncte .")
say_reward("Esti sigur ?")
say(string.format("Resetezi %s?", name))
say("")

local s = select("Da", "Nu")
if 2 == s then
return
end

say_title("Redistribuirea competentelor")
say("Odata ce resetarea se face acest lucru nu se mai poate anula.")
say("Continuati ?")
say("")

local c = select("Da", "Nu")

if 2 == c then
return
end

--
--local val = pc.getqf("force_to_master_skill")
--if val > 0 then
--- l
-- say_title("Reditribuire cu succes!")
-- say("Au fost  ")
-- say("redistribuite 17 puncte.")
-- say("Puteti obtine punctele in apoi ..")
-- say("")
-- say_reward("daca")
-- say_reward("resetati din nou .")
-- say("")
-- return
--end

char_log(0, "RESET_ONE_SKILL", "USE_ITEM(71003)")
pc.remove_item(71003)

char_log(0, "RESET_ONE_SKILL", string.format("RESET_SKILL[%s]", name))
pc.clear_one_skill(vnum)

char_log(0, "RESET_ONE_SKILL", "APPLY_17MASTER_BONUS")
pc.setqf("force_to_master_skill", 1)

say_title("Resetare skilluri: Terminat!")
say(string.format("Resetare %s.", name))
say("")

--- l
say_reward("Redistribuire completa ")
say("")
end
end
end

Nu stiu cat de complicat ti se pare....

L-am incercat si imi da urmatoarea eroare:

Cum se poate rezolva?

EDIT: trebuia sters un end de la sfarsit. Acum este problema ca atunci cand dau click dreapta pe pergamentul de reset skill nu face nimic... I-am dat permisiunea 777 si ./qc in putty... De ce nu vrea?

EDIT:Problema rezolvata. Multumesc. T/C