quest skilluri L

soVine · 04 Apr 2020, 16:14

Salut, vreau si eu sa modific acest quest "Piatra Curcubeu" pentru skilluri, si sa nu o poti folosii sub nivelul 90. Adica sa ai nivel 90 sau peste ca sa poti sa o folosesti.

Multumesc!

Cod: Selectaţi tot

----------------------------------------------
-- Piatra Curcubeu.
-- Quest creat de RealJ4Zz (Don't edit this line)
----------------------------------------------
       quest regenbogen begin
        state start begin
                when 50512.use  begin
                pc.removeitem("50512", 1)
             
                    say_title("Cartea Magicianului")
                    say("Aceasta carte va poate face")
                    say("magiile perfecte.")
                   
                    if pc.job ==0 then
                    say("Alegeti competentele dvs.")
                   
                    local s=select("Corp","Mental")
                   
                    if s==1 then
                    --Corp
                    pc.set_skill_group(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)
                    say("Competentele dvs. sunt perfecte")
                    end
                   
                    if s==2 then
                    --Mental
                    pc.set_skill_group(2)
                    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)
                    say("Competentele dvs. sunt perfecte")
                    end
                   
                    elseif pc.job ==1 then
                    say("Alegeti competentele dvs.")
                   
                    local s=select("Lame","Arc")
                   
                    if s==1 then
                    --Lame
                    pc.set_skill_group(3)
                    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)
                    say("Competentele dvs. sunt perfecte")
                    end
                   
                    if s==2 then
                    --Arc
                    pc.set_skill_group(4)
                    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)
                    say("Competentele dvs. sunt perfecte")
                    end
                   
                    elseif pc.job ==2 then
                    say("Alegeti competentele dvs.")
                    local s=select("Magie","Arme")
                   
                    if s==1 then
                    --Magie
                    pc.set_skill_group(5)
                    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("Competentele dvs. sunt perfecte")
                    end
                   
                    if s==2 then
                    --Arme
                    pc.set_skill_group(6)
                    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("Competentele dvs. sunt perfecte")
                    end
                   
                    elseif pc.job ==3 then
                    say("Alegeti competentele dvs.")
                    local s=select("Vindecare","Dragon")
                   
                    if s==1 then
                    --Vindecare
                    pc.set_skill_group(7)
                    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("Competentele dvs. sunt perfecte")
                    end
                   
                    if s==2 then
                    --Dragon
                    pc.set_skill_group(8)
                    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("Competentele dvs. sunt perfecte")
                    end
                end
            end
        end
    end

YouTube · 04 Apr 2020, 19:22

soVine scrie: ↑04 Apr 2020, 16:14 Salut, vreau si eu sa modific acest quest "Piatra Curcubeu" pentru skilluri, si sa nu o poti folosii sub nivelul 90. Adica sa ai nivel 90 sau peste ca sa poti sa o folosesti.

Multumesc!

Cod: Selectaţi tot

----------------------------------------------
-- Piatra Curcubeu.
-- Quest creat de RealJ4Zz (Don't edit this line)
----------------------------------------------
       quest regenbogen begin
        state start begin
                when 50512.use  begin
                pc.removeitem("50512", 1)
             
                    say_title("Cartea Magicianului")
                    say("Aceasta carte va poate face")
                    say("magiile perfecte.")
                   
                    if pc.job ==0 then
                    say("Alegeti competentele dvs.")
                   
                    local s=select("Corp","Mental")
                   
                    if s==1 then
                    --Corp
                    pc.set_skill_group(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)
                    say("Competentele dvs. sunt perfecte")
                    end
                   
                    if s==2 then
                    --Mental
                    pc.set_skill_group(2)
                    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)
                    say("Competentele dvs. sunt perfecte")
                    end
                   
                    elseif pc.job ==1 then
                    say("Alegeti competentele dvs.")
                   
                    local s=select("Lame","Arc")
                   
                    if s==1 then
                    --Lame
                    pc.set_skill_group(3)
                    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)
                    say("Competentele dvs. sunt perfecte")
                    end
                   
                    if s==2 then
                    --Arc
                    pc.set_skill_group(4)
                    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)
                    say("Competentele dvs. sunt perfecte")
                    end
                   
                    elseif pc.job ==2 then
                    say("Alegeti competentele dvs.")
                    local s=select("Magie","Arme")
                   
                    if s==1 then
                    --Magie
                    pc.set_skill_group(5)
                    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("Competentele dvs. sunt perfecte")
                    end
                   
                    if s==2 then
                    --Arme
                    pc.set_skill_group(6)
                    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("Competentele dvs. sunt perfecte")
                    end
                   
                    elseif pc.job ==3 then
                    say("Alegeti competentele dvs.")
                    local s=select("Vindecare","Dragon")
                   
                    if s==1 then
                    --Vindecare
                    pc.set_skill_group(7)
                    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("Competentele dvs. sunt perfecte")
                    end
                   
                    if s==2 then
                    --Dragon
                    pc.set_skill_group(8)
                    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("Competentele dvs. sunt perfecte")
                    end
                end
            end
        end
    end

Cod: Selectaţi tot

----------------------------------------------
-- Piatra Curcubeu.
-- Quest creat de RealJ4Zz (Don't edit this line)
----------------------------------------------
quest regenbogen begin
	state start begin
		when 50512.use begin
			if pc.get_level() < 90 then
				say("Nivelul tau este prea mic.[ENTER]Acest item se poate folosi[ENTER]incepand cu nivelul 90")
				return
			else
				pc.removeitem("50512", 1)
				say_title("Cartea Magicianului")
				say("Aceasta carte va poate face")
				say("magiile perfecte.")
				if pc.job ==0 then
				say("Alegeti competentele dvs.")
				local s=select("Corp","Mental")
				if s==1 then
				--Corp
				pc.set_skill_group(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)
				say("Competentele dvs. sunt perfecte")
				end
				if s==2 then
				--Mental
				pc.set_skill_group(2)
				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)
				say("Competentele dvs. sunt perfecte")
				end
				elseif pc.job ==1 then
				say("Alegeti competentele dvs.")
				local s=select("Lame","Arc")
				if s==1 then
				--Lame
				pc.set_skill_group(3)
				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)
				say("Competentele dvs. sunt perfecte")
				end
				if s==2 then
				--Arc
				pc.set_skill_group(4)
				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)
				say("Competentele dvs. sunt perfecte")
				end
				elseif pc.job ==2 then
				say("Alegeti competentele dvs.")
				local s=select("Magie","Arme")
				if s==1 then
				--Magie
				pc.set_skill_group(5)
				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("Competentele dvs. sunt perfecte")
				end
				if s==2 then
				--Arme
				pc.set_skill_group(6)
				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("Competentele dvs. sunt perfecte")
				end
				elseif pc.job ==3 then
				say("Alegeti competentele dvs.")
				local s=select("Vindecare","Dragon")
				if s==1 then
				--Vindecare
				pc.set_skill_group(7)
				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("Competentele dvs. sunt perfecte")
				end
				if s==2 then
				--Dragon
				pc.set_skill_group(8)
				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("Competentele dvs. sunt perfecte")
				end
			end
		end
	end
end

sau:

Cod: Selectaţi tot

quest curcubeu begin
	state start begin
		when 50512.use begin
			if pc.get_level() < 90 then
				say("Nivelul tau este prea mic.[ENTER]Acest item se poate folosi[ENTER]incepand cu nivelul 90")
				return
			else
				table.foreachi(special.active_skill_list[pc.get_job()+1][pc.get_skill_group()],function(r,skill) pc.set_skill_level(skill,59) end)
			end
		end
	end
end

soVine · 04 Apr 2020, 20:03

[RaffaeL] scrie: ↑04 Apr 2020, 19:22

soVine scrie: ↑04 Apr 2020, 16:14 Salut, vreau si eu sa modific acest quest "Piatra Curcubeu" pentru skilluri, si sa nu o poti folosii sub nivelul 90. Adica sa ai nivel 90 sau peste ca sa poti sa o folosesti.

Multumesc!

Cod: Selectaţi tot

----------------------------------------------
-- Piatra Curcubeu.
-- Quest creat de RealJ4Zz (Don't edit this line)
----------------------------------------------
       quest regenbogen begin
        state start begin
                when 50512.use  begin
                pc.removeitem("50512", 1)
             
                    say_title("Cartea Magicianului")
                    say("Aceasta carte va poate face")
                    say("magiile perfecte.")
                   
                    if pc.job ==0 then
                    say("Alegeti competentele dvs.")
                   
                    local s=select("Corp","Mental")
                   
                    if s==1 then
                    --Corp
                    pc.set_skill_group(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)
                    say("Competentele dvs. sunt perfecte")
                    end
                   
                    if s==2 then
                    --Mental
                    pc.set_skill_group(2)
                    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)
                    say("Competentele dvs. sunt perfecte")
                    end
                   
                    elseif pc.job ==1 then
                    say("Alegeti competentele dvs.")
                   
                    local s=select("Lame","Arc")
                   
                    if s==1 then
                    --Lame
                    pc.set_skill_group(3)
                    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)
                    say("Competentele dvs. sunt perfecte")
                    end
                   
                    if s==2 then
                    --Arc
                    pc.set_skill_group(4)
                    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)
                    say("Competentele dvs. sunt perfecte")
                    end
                   
                    elseif pc.job ==2 then
                    say("Alegeti competentele dvs.")
                    local s=select("Magie","Arme")
                   
                    if s==1 then
                    --Magie
                    pc.set_skill_group(5)
                    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("Competentele dvs. sunt perfecte")
                    end
                   
                    if s==2 then
                    --Arme
                    pc.set_skill_group(6)
                    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("Competentele dvs. sunt perfecte")
                    end
                   
                    elseif pc.job ==3 then
                    say("Alegeti competentele dvs.")
                    local s=select("Vindecare","Dragon")
                   
                    if s==1 then
                    --Vindecare
                    pc.set_skill_group(7)
                    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("Competentele dvs. sunt perfecte")
                    end
                   
                    if s==2 then
                    --Dragon
                    pc.set_skill_group(8)
                    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("Competentele dvs. sunt perfecte")
                    end
                end
            end
        end
    end

Cod: Selectaţi tot

----------------------------------------------
-- Piatra Curcubeu.
-- Quest creat de RealJ4Zz (Don't edit this line)
----------------------------------------------
quest regenbogen begin
	state start begin
		when 50512.use begin
			if pc.get_level() < 90 then
				say("Nivelul tau este prea mic.[ENTER]Acest item se poate folosi[ENTER]incepand cu nivelul 90")
				return
			else
				pc.removeitem("50512", 1)
				say_title("Cartea Magicianului")
				say("Aceasta carte va poate face")
				say("magiile perfecte.")
				if pc.job ==0 then
				say("Alegeti competentele dvs.")
				local s=select("Corp","Mental")
				if s==1 then
				--Corp
				pc.set_skill_group(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)
				say("Competentele dvs. sunt perfecte")
				end
				if s==2 then
				--Mental
				pc.set_skill_group(2)
				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)
				say("Competentele dvs. sunt perfecte")
				end
				elseif pc.job ==1 then
				say("Alegeti competentele dvs.")
				local s=select("Lame","Arc")
				if s==1 then
				--Lame
				pc.set_skill_group(3)
				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)
				say("Competentele dvs. sunt perfecte")
				end
				if s==2 then
				--Arc
				pc.set_skill_group(4)
				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)
				say("Competentele dvs. sunt perfecte")
				end
				elseif pc.job ==2 then
				say("Alegeti competentele dvs.")
				local s=select("Magie","Arme")
				if s==1 then
				--Magie
				pc.set_skill_group(5)
				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("Competentele dvs. sunt perfecte")
				end
				if s==2 then
				--Arme
				pc.set_skill_group(6)
				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("Competentele dvs. sunt perfecte")
				end
				elseif pc.job ==3 then
				say("Alegeti competentele dvs.")
				local s=select("Vindecare","Dragon")
				if s==1 then
				--Vindecare
				pc.set_skill_group(7)
				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("Competentele dvs. sunt perfecte")
				end
				if s==2 then
				--Dragon
				pc.set_skill_group(8)
				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("Competentele dvs. sunt perfecte")
				end
			end
		end
	end
end

sau:

Cod: Selectaţi tot

quest curcubeu begin
	state start begin
		when 50512.use begin
			if pc.get_level() < 90 then
				say("Nivelul tau este prea mic.[ENTER]Acest item se poate folosi[ENTER]incepand cu nivelul 90")
				return
			else
				table.foreachi(special.active_skill_list[pc.get_job()+1][pc.get_skill_group()],function(r,skill) pc.set_skill_level(skill,59) end)
			end
		end
	end
end

Multumesc frumos, merge. Poti sa imi pui te rog si functia "Iesi"?

YouTube · 04 Apr 2020, 21:07

Cod: Selectaţi tot

quest curcubeu begin
	state start begin
		when 50512.use begin
			if select("Vreau skill-urile", "Anulare") == 1 then
				if pc.get_level() < 90 then
					say("Nivelul tau este prea mic.[ENTER]Acest item se poate folosi[ENTER]incepand cu nivelul 90")
					return
				else
					table.foreachi(special.active_skill_list[pc.get_job()+1][pc.get_skill_group()],function(r,skill) pc.set_skill_level(skill,59) end)
				end
			end
		end
	end
end

soVine · 04 Apr 2020, 23:33

Bun. Multumesc!

Ionuţ M. · 18 Apr 2020, 13:51

Mutat in Probleme Rezolvate.

quest skilluri L

Quest skilluri secundare

QUEST-SKILLURI SECUNDARE LA NPC

Quest gardian skilluri.

Cerere quest skilluri G

Cine este conectat