P skill azonnal (K)

[bakos1992]

Sziasztok valaki irjon már nekem szivárvány köhöz 1 Questet hogy P skilt adjon

[Virus]

Kód Kijelölés Kibont

quest regenbogen begin
state start begin
when 50512.use begin
say_title("Szivárvány Kõ:")
say("")
say("Üdvözöllek kalandor!")
say("Csak nem a hatalmas képességekért jöttél?!")
say("")
say("Rendben, akkor döntsd el, hogy melyik képességedet fejleszted ki.")
say("")
if pc.job == 0 then
local s = select("Testi","Mentális","Mégsem")
if s == 1 then
--Körper
pc.set_skill_group(1)
pc.remove_item(50512, 1)
pc.set_skill_level(1, 59)
pc.set_skill_level(2, 59)
pc.set_skill_level(3, 59)
pc.set_skill_level(4, 59)
pc.set_skill_level(5, 59)
pc.set_skill_level(6, 59)
say_title("Szivárvány Kõ:")
say("")
say("A tanításod ime befejezõdött megkaptad a nagymester képességeidet.")
say("")
elseif s == 2 then
--Mentalo
pc.set_skill_group(2)
pc.remove_item(50512, 1)
pc.set_skill_level(16, 59)
pc.set_skill_level(17, 59)
pc.set_skill_level(18, 59)
pc.set_skill_level(19, 59)
pc.set_skill_level(20, 59)
pc.set_skill_level(21, 59)
say_title("Szivárvány Kõ:")
say("")
say("A tanításod ime befejezõdött megkaptad a nagymester képességeidet.")
say("")
end
elseif pc.job ==1 then
say("Válaszd ki a képességet")
local s = select("Közelharc","Távharc","Mégsem")
if s == 1 then
--Nahkampf
pc.set_skill_group(3)
pc.remove_item(50512, 1)
pc.set_skill_level(31, 59)
pc.set_skill_level(32, 59)
pc.set_skill_level(33, 59)
pc.set_skill_level(34, 59)
pc.set_skill_level(35, 59)
pc.set_skill_level(36, 59)
say_title("Szivárvány Kõ:")
say("")
say("A tanításod ime befejezõdött megkaptad a nagymester képességeidet.")
say("")
elseif s == 2 then
--Fernkampf
pc.set_skill_group(4)
pc.remove_item(50512, 1)
pc.set_skill_level(46, 59)
pc.set_skill_level(47, 59)
pc.set_skill_level(48, 59)
pc.set_skill_level(49, 59)
pc.set_skill_level(50, 59)
pc.set_skill_level(51, 59)
say_title("Szivárvány Kõ:")
say("")
say("A tanításod ime befejezõdött megkaptad a nagymester képességeidet.")
say("")
end
elseif pc.job == 2 then
say("Válaszd ki a képességet")
local s = select("Mágia","Fegyver","Mégsem")
if s == 1 then
--Magie
pc.set_skill_group(5)
pc.remove_item(50512, 1)
pc.set_skill_level(76, 59)
pc.set_skill_level(77, 59)
pc.set_skill_level(78, 59)
pc.set_skill_level(79, 59)
pc.set_skill_level(80, 59)
pc.set_skill_level(81, 59)
say_title("Szivárvány Kõ:")
say("")
say("A tanításod ime befejezõdött megkaptad a nagymester képességeidet.")
say("")
elseif s == 2 then
--Waffe
pc.set_skill_group(6)
pc.remove_item(50512, 1)
pc.set_skill_level(61, 59)
pc.set_skill_level(62, 59)
pc.set_skill_level(63, 59)
pc.set_skill_level(64, 59)
pc.set_skill_level(65, 59)
pc.set_skill_level(66, 59)
say_title("Szivárvány Kõ:")
say("")
say("A tanításod ime befejezõdött megkaptad a nagymester képességeidet.")
say("")
end
elseif pc.job == 3 then
say("Válaszd ki a képességet")
local s = select("Gyógyulás","Sárkány","Mégsem")
if s == 1 then
--Heil
pc.set_skill_group(7)
pc.remove_item(50512, 1)
pc.set_skill_level(106, 59)
pc.set_skill_level(107, 59)
pc.set_skill_level(108, 59)
pc.set_skill_level(109, 59)
pc.set_skill_level(110, 59)
pc.set_skill_level(111, 59)
say_title("Szivárvány Kõ:")
say("")
say("A tanításod ime befejezõdött megkaptad a nagymester képességeidet.")
say("")
elseif s == 2 then
--Drachen
pc.set_skill_group(8)
pc.remove_item(50512, 1)
pc.set_skill_level(91, 59)
pc.set_skill_level(92, 59)
pc.set_skill_level(93, 59)
pc.set_skill_level(94, 59)
pc.set_skill_level(95, 59)
pc.set_skill_level(96, 59)
say_title("Szivárvány Kõ:")
say("")
say("A tanításod ime befejezõdött megkaptad a nagymester képességeidet.")
say("")
end
end
end
    end
end


[bakos1992]

köszönöm!