Salut!
Am si eu nevoie de 2 questuri. Unul cu reset skill-uri si puncte si unul cu reset pentru fiecare skill in parte.
Cerere quest
- .Hades
-

- Mesaje: 211
- Membru din: 27 Iun 2015, 14:24
- Server: http://old-nr.eu/
- Regat: Jinno
- Aprecieri: 37
- Mulţumiri: 28
- Contact:
- Robert
-

- Mesaje: 1376
- Membru din: 19 Feb 2015, 10:29
- Server: Scorpions2
- Regat: Chunjo
- Aprecieri: 125
- Mulţumiri: 476
- Discord: Copiază ID
.lua = .quest !IceCool scrie:Lasa aici questulIn primul rand acolo fisierul este .lua ... deci el trebuia sa fie .quest
P.S.: Mi se pare a fi un keylogger.
Pentru toate:
Cod: Selectaţi tot
quest reset_scroll begin
state start begin
when 71002.use begin
say_title("Resetare competenþe:")
say("")
say("Gândeºte-te bine înainte sã faci asta!")
say("Cu acest pergament iþi vei reseta toate")
say("competenþele." )
say("" )
say("Eºti sigur cã vrei acest lucru?")
say("" )
local s = select("Da", "Nu")
if 2 == s then
return
end
say_title("Resetare competenþe:")
say("")
say("Aceastã acþiune este ireversibilã.")
say("Esti sigur?")
say("")
local c = select("Da, reseteazã ","Nu")
if 2 == c then
return
end
say_title("Resetare competenþe:")
say("")
say("Competenþele tale au fost resetate.")
say("")
pc.remove_item(71002)
pc.clear_skill()
pc.set_skill_group(0)
end
end
endCod: Selectaţi tot
quest reset_scroll1 begin
state start begin
when 71003.use begin
say_title("Resetare competenþã:")
say("")
say("Acest pergament iþi permite sã resetezi")
say("o competenþã la 0 puncte.")
say("Acestã acþiune este ireversibilã.")
say("")
wait ()
say("Alege competenþa:")
say("")
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_reward("Nu ai competenþe pe care sã le poþi reseta.")
say("")
return
end
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("Resetare competenþã:")
say("")
say(string.format("Eºti sigur cã vrei sã restezi %s ?", name))
say("")
local s = select("Da", "Nu")
if 2 == s then
return
end
pc.remove_item(71003)
pc.clear_one_skill(vnum)
pc.setqf("force_to_master_skill", 1)
say_title("Resetare competenþã:")
say("")
say("Competenþa a fost resetatã cu succes.")
say("")
end
end
end- .Hades
-

- Mesaje: 211
- Membru din: 27 Iun 2015, 14:24
- Server: http://old-nr.eu/
- Regat: Jinno
- Aprecieri: 37
- Mulţumiri: 28
- Contact:
N-am ce keylogger sa iti las , incerc doar sa ajut ,e scos din sv meu , oricum , ti-l las aici cum zici
il puneam si eu asa frumusel ca cel de mai sus
si sper sa nu par idiot, dar nu stiu cum
edit: rezolvat cu incadrarea lui 
Cod: Selectaţi tot
quest reset_scroll begin
state start begin
when 71002.use begin
say("Gândeºte-te bine înainte sã faci asta!")
say("Cu acest pergament iþi vei reseta toate")
say("competenþele." )
say("" )
say("Eºti sigur cã vrei acest lucru?")
say("" )
local s = select("Da", "Nu")
if 2 == s then
return
end
say("Aceastã acþiune este ireversibilã.")
say("Esti sigur?")
say("")
local c = select("Da, reseteazã ","Nu")
if 2 == c then
return
end
say("Competenþele tale au fost resetate.")
say("")
pc.remove_item(71002)
pc.clear_skill()
pc.set_skill_group(0)
end
when 71003.use begin
say("Acest pergament iþi permite sã resetezi")
say("o competenþã la 0 puncte.")
say("Acestã acþiune este ireversibilã.")
say("")
wait ()
say("Alege competenþa:")
say("")
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_reward("Nu ai competenþe pe care sã le poþi reseta.")
say("")
return
end
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(string.format("Eºti sigur cã vrei sã restezi %s ?", name))
say("")
local s = select("Da", "Nu")
if 2 == s then
return
end
pc.remove_item(71003)
pc.clear_one_skill(vnum)
pc.setqf("force_to_master_skill", 1)
say("Competenþa a fost resetatã cu succes.")
say("")
end
end
end
Răspunsuri
6 Vizualizări
352
6 Vizualizări
352
Răspunsuri
2 Vizualizări
463
2 Vizualizări
463
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




