antiblock
Elveron
  • Chatbox

    You don't have permission to chat.
    Load More
Sign in to follow this  
UnWork

[Tutorial]Npc pra PvP ;

11 posts in this topic

antiblock
Rodnia | Alpha & Omega

Bom topico so nao gosto da parte de dar nivel, Resto e bem util...

Obrigado por contribuires com Comunidade.

Continua Cumprimentos http://cyber-gamers.org/public/style_emoticons/default/biggrin.png

Share this post


Link to post
Share on other sites
Sim . Eu vou continuar, ao caso do Level Se não gostarem da pra tirarem ^^.

Share this post


Link to post
Share on other sites

Sim e verdade

Share this post


Link to post
Share on other sites

Link down --" que porcaria..

Share this post


Link to post
Share on other sites

Ganhou  :+1: ^^Vlw me ajudou muito, agora só procuro as coisas pros meu serve aqui :3 :fap:

Share this post


Link to post
Share on other sites

Algum mais recente? link off

Share this post


Link to post
Share on other sites
2 horas atrás, tetecow disse:

Algum mais recente? link off

 

Nome da quest: (   npc_multi_funcao.lua )

 

quest npc_multi_funcao begin
	state start begin
	when 20407.chat."Ganhar Experiência" begin
		say_title(mob_name(20407))
		say("")
		say("Olá, posso lhe dar Experiência")
		say("Após aceitar você pode levar um DC")
		say("só entra novamente que você ganhou a EXP.")
		say("")
		say_reward("Você deseja continuar?")
		say("")
		local s = select ( "Sim" , "Não")
		if s == 1 then
		if pc.gold >= 0 then
		pc.changegold(0)
		pc.give_exp2(2000000000)
		pc.give_exp2(200000000)
	else
		say_title(mob_name(20407))
		say ( "" )
		say("Não conseguiu? Fale com um Administrador")
		say("")
		say("")
		say("")
		say("")
		say("")
		say("")
	end
	elseif s == 2 then
		say_title(mob_name(20407))
		say ("")
		say ("Quando precisar de experiência é só chamar.")
		say ("")
		say ("")
		say ("")
		say ("")
		say ("")
		say ("")

		end
	end

	when 20407.chat."Receber Gold" begin
		say_title(mob_name(20407))
		say("")
		say("Olá, posso lhe dar Gold.")
		say("Após aceitar você ira receber")
		say("999.999.999 de Gold.")
		say("")
		say_reward("Você deseja continuar?")
		say("")
		local s = select ( "Sim" , "Não")
		if s == 1 then
		if pc.gold >= 0 then
		pc.change_gold("999999999")
	else
		say_title(mob_name(20407))
		say ( "" )
		say("Não conseguiu? Fale com um Administrador")
		say("")
		say("")
		say("")
		say("")
		say("")
		say("")
	end
	elseif s == 2 then
		say_title(mob_name(20407))
		say ("")
		say ("Quando precisar de gold é só chamar.")
		say ("")
		say ("")
		say ("")
		say ("")
		say ("")
		say ("")

		end
	end

	when 20407.chat."Maximo de Honra Positiva" begin
		say_title(mob_name(20407))
		say ("")
		pc.changealignment (200000000)
		say ("")
		say_reward ( "Você conseguiu o Máximo de Honra Positiva." )
		say ("")

		end

		when 20407.chat."Maximo de Honra Negativa" begin
		say_title(mob_name(20407))
		say ("")
		pc.changealignment (-200000000)
		say ("")
		say_reward ( "Você conseguiu o Máximo de Honra Negativa" )
		say ("")

		end

	when 20407.chat."Ganhar Esfera da Bênçao" begin
		pc.give_item2(70024,200)
		say_title(mob_name(20407))
		say("")
		say_reward("Você recebeu 200x Esfera da Benção em seu inventario." )
		say("")
	end

	when 20407.chat."Skills Secundárias" begin 
		say_title(mob_name(20407))
		say("")
		say("Posso dar-lhe todas as Skills Secundárias P.")
		say("")
		say_reward("Você deseja continuar?")
		say("") 
		local s = select ("Sim" , "Não")
		if s==1 then
		pc.set_skill_level(121 ,59)
		pc.set_skill_level(122 ,59)
		pc.set_skill_level(123 ,59)
		pc.set_skill_level(124 ,59)
		pc.set_skill_level(125 ,59)
		pc.set_skill_level(126 ,59)
		pc.set_skill_level(127 ,59)
		pc.set_skill_level(128 ,59)
		pc.set_skill_level(129 ,59)
		pc.set_skill_level(130 ,59)
		pc.set_skill_level(131 ,59)
		pc.set_skill_level(132 ,59)
		pc.set_skill_level(133 ,59)
		pc.set_skill_level(134 ,59)
		pc.set_skill_level(135 ,59)
		pc.set_skill_level(136 ,59)
		pc.set_skill_level(137 ,59)
		pc.set_skill_level(138 ,59)
		say_title(mob_name(20407))
		say("")
		say_reward("Parabéns você conseguiu todas as Skills Secundárias P.")
		say("")
	end
end

	when 20407.chat."Skills Perfect Master" begin
		if pc . get_skill_group ( ) == 0 then 
		say_title(mob_name(20407))
		say("") 
		say("Primeiro você deve escolhe suas habilidades") 
		say("nos professores de skills , depois podem treinar.")
		return 
		end 
		if pc . job == 0 then
		if pc . get_skill_group ( ) == 1 then 
		pc.set_skill_level(1,40) 
		pc.set_skill_level(2,40) 
		pc.set_skill_level(3,40) 
		pc.set_skill_level(4,40) 
		pc.set_skill_level(5,40)
		pc.set_skill_level(6,40) 
		notice_all ( "Parabéns! " .. pc . name .. " suas habilidades estão Perfect Master!" )
		setskin ( NOWINDOW )
		elseif pc . get_skill_group ( ) == 2 then 
		pc.set_skill_level(16,40) 
		pc.set_skill_level(17,40) 
		pc.set_skill_level(18,40) 
		pc.set_skill_level(19,40) 
		pc.set_skill_level(20,40)
		pc.set_skill_level(21,40) 
		notice_all ( "Parabéns! " .. pc . name .. " suas habilidades estão Perfect Master!" )
		setskin ( NOWINDOW )
		end
	end
	
		if pc . job == 1 then
		if pc . get_skill_group ( ) == 1 then 
		pc.set_skill_level(31,40) 
		pc.set_skill_level(32,40) 
		pc.set_skill_level(33,40) 
		pc.set_skill_level(34,40) 
		pc.set_skill_level(35,40)
		pc.set_skill_level(36,40) 
		notice_all ( "Parabéns! " .. pc . name .. " suas habilidades estão Perfect Master!" )
		setskin ( NOWINDOW )
		elseif pc . get_skill_group ( ) == 2 then 
		pc.set_skill_level(46,40) 
		pc.set_skill_level(47,40) 
		pc.set_skill_level(48,40) 
		pc.set_skill_level(49,40) 
		pc.set_skill_level(50,40)
		pc.set_skill_level(51,40) 
		notice_all ( "Parabéns! " .. pc . name .. " suas habilidades estão Perfect Master!" )
		setskin ( NOWINDOW )
		end
	end
	
		if pc . job == 2 then
		if pc . get_skill_group ( ) == 1 then 
		pc.set_skill_level(61,40) 
		pc.set_skill_level(62,40) 
		pc.set_skill_level(63,40) 
		pc.set_skill_level(64,40) 
		pc.set_skill_level(65,40) 
		pc.set_skill_level(66,40) 
		notice_all ( "Parabéns! " .. pc . name .. " suas habilidades estão Perfect Master!" )
		setskin ( NOWINDOW )
		elseif pc . get_skill_group ( ) == 2 then 
		pc.set_skill_level(76,40) 
		pc.set_skill_level(77,40) 
		pc.set_skill_level(78,40) 
		pc.set_skill_level(79,40) 
		pc.set_skill_level(80,40) 
		pc.set_skill_level(81,40) 
		notice_all ( "Parabéns! " .. pc . name .. " suas habilidades estão Perfect Master!" )
		setskin ( NOWINDOW )
		end
	end
	
		if pc . job == 3 then
		if pc . get_skill_group ( ) == 1 then 
		pc.set_skill_level(91,40) 
		pc.set_skill_level(92,40) 
		pc.set_skill_level(93,40) 
		pc.set_skill_level(94,40) 
		pc.set_skill_level(95,40) 
		pc.set_skill_level(96,40) 
		notice_all ( "Parabéns! " .. pc . name .. " suas habilidades estão Perfect Master!" )
		setskin ( NOWINDOW )
		elseif pc . get_skill_group ( ) == 2 then 
		pc.set_skill_level(106,40) 
		pc.set_skill_level(107,40) 
		pc.set_skill_level(108,40) 
		pc.set_skill_level(109,40) 
		pc.set_skill_level(110,40) 
		pc.set_skill_level(111,40) 
		notice_all ( "Parabéns! " .. pc . name .. " suas habilidades estão Perfect Master!" )
		setskin ( NOWINDOW )
		end
	end

		if pc . job == 4 then
		if pc . get_skill_group ( ) == 1 then 
		pc.set_skill_level(170,40) 
		pc.set_skill_level(171,40) 
		pc.set_skill_level(172,40) 
		pc.set_skill_level(173,40) 
		pc.set_skill_level(174,40) 
		pc.set_skill_level(175,40) 
		notice_all ( "Parabéns! " .. pc . name .. " suas habilidades estão Perfect Master!" )
		setskin ( NOWINDOW )
		end
	end
end
end
end

Boa sorte / bom uso.

Share this post


Link to post
Share on other sites
20 horas atrás, x0thon disse:

 

Nome da quest: (   npc_multi_funcao.lua )

 


quest npc_multi_funcao begin
	state start begin
	when 20407.chat."Ganhar Experiência" begin
		say_title(mob_name(20407))
		say("")
		say("Olá, posso lhe dar Experiência")
		say("Após aceitar você pode levar um DC")
		say("só entra novamente que você ganhou a EXP.")
		say("")
		say_reward("Você deseja continuar?")
		say("")
		local s = select ( "Sim" , "Não")
		if s == 1 then
		if pc.gold >= 0 then
		pc.changegold(0)
		pc.give_exp2(2000000000)
		pc.give_exp2(200000000)
	else
		say_title(mob_name(20407))
		say ( "" )
		say("Não conseguiu? Fale com um Administrador")
		say("")
		say("")
		say("")
		say("")
		say("")
		say("")
	end
	elseif s == 2 then
		say_title(mob_name(20407))
		say ("")
		say ("Quando precisar de experiência é só chamar.")
		say ("")
		say ("")
		say ("")
		say ("")
		say ("")
		say ("")

		end
	end

	when 20407.chat."Receber Gold" begin
		say_title(mob_name(20407))
		say("")
		say("Olá, posso lhe dar Gold.")
		say("Após aceitar você ira receber")
		say("999.999.999 de Gold.")
		say("")
		say_reward("Você deseja continuar?")
		say("")
		local s = select ( "Sim" , "Não")
		if s == 1 then
		if pc.gold >= 0 then
		pc.change_gold("999999999")
	else
		say_title(mob_name(20407))
		say ( "" )
		say("Não conseguiu? Fale com um Administrador")
		say("")
		say("")
		say("")
		say("")
		say("")
		say("")
	end
	elseif s == 2 then
		say_title(mob_name(20407))
		say ("")
		say ("Quando precisar de gold é só chamar.")
		say ("")
		say ("")
		say ("")
		say ("")
		say ("")
		say ("")

		end
	end

	when 20407.chat."Maximo de Honra Positiva" begin
		say_title(mob_name(20407))
		say ("")
		pc.changealignment (200000000)
		say ("")
		say_reward ( "Você conseguiu o Máximo de Honra Positiva." )
		say ("")

		end

		when 20407.chat."Maximo de Honra Negativa" begin
		say_title(mob_name(20407))
		say ("")
		pc.changealignment (-200000000)
		say ("")
		say_reward ( "Você conseguiu o Máximo de Honra Negativa" )
		say ("")

		end

	when 20407.chat."Ganhar Esfera da Bênçao" begin
		pc.give_item2(70024,200)
		say_title(mob_name(20407))
		say("")
		say_reward("Você recebeu 200x Esfera da Benção em seu inventario." )
		say("")
	end

	when 20407.chat."Skills Secundárias" begin 
		say_title(mob_name(20407))
		say("")
		say("Posso dar-lhe todas as Skills Secundárias P.")
		say("")
		say_reward("Você deseja continuar?")
		say("") 
		local s = select ("Sim" , "Não")
		if s==1 then
		pc.set_skill_level(121 ,59)
		pc.set_skill_level(122 ,59)
		pc.set_skill_level(123 ,59)
		pc.set_skill_level(124 ,59)
		pc.set_skill_level(125 ,59)
		pc.set_skill_level(126 ,59)
		pc.set_skill_level(127 ,59)
		pc.set_skill_level(128 ,59)
		pc.set_skill_level(129 ,59)
		pc.set_skill_level(130 ,59)
		pc.set_skill_level(131 ,59)
		pc.set_skill_level(132 ,59)
		pc.set_skill_level(133 ,59)
		pc.set_skill_level(134 ,59)
		pc.set_skill_level(135 ,59)
		pc.set_skill_level(136 ,59)
		pc.set_skill_level(137 ,59)
		pc.set_skill_level(138 ,59)
		say_title(mob_name(20407))
		say("")
		say_reward("Parabéns você conseguiu todas as Skills Secundárias P.")
		say("")
	end
end

	when 20407.chat."Skills Perfect Master" begin
		if pc . get_skill_group ( ) == 0 then 
		say_title(mob_name(20407))
		say("") 
		say("Primeiro você deve escolhe suas habilidades") 
		say("nos professores de skills , depois podem treinar.")
		return 
		end 
		if pc . job == 0 then
		if pc . get_skill_group ( ) == 1 then 
		pc.set_skill_level(1,40) 
		pc.set_skill_level(2,40) 
		pc.set_skill_level(3,40) 
		pc.set_skill_level(4,40) 
		pc.set_skill_level(5,40)
		pc.set_skill_level(6,40) 
		notice_all ( "Parabéns! " .. pc . name .. " suas habilidades estão Perfect Master!" )
		setskin ( NOWINDOW )
		elseif pc . get_skill_group ( ) == 2 then 
		pc.set_skill_level(16,40) 
		pc.set_skill_level(17,40) 
		pc.set_skill_level(18,40) 
		pc.set_skill_level(19,40) 
		pc.set_skill_level(20,40)
		pc.set_skill_level(21,40) 
		notice_all ( "Parabéns! " .. pc . name .. " suas habilidades estão Perfect Master!" )
		setskin ( NOWINDOW )
		end
	end
	
		if pc . job == 1 then
		if pc . get_skill_group ( ) == 1 then 
		pc.set_skill_level(31,40) 
		pc.set_skill_level(32,40) 
		pc.set_skill_level(33,40) 
		pc.set_skill_level(34,40) 
		pc.set_skill_level(35,40)
		pc.set_skill_level(36,40) 
		notice_all ( "Parabéns! " .. pc . name .. " suas habilidades estão Perfect Master!" )
		setskin ( NOWINDOW )
		elseif pc . get_skill_group ( ) == 2 then 
		pc.set_skill_level(46,40) 
		pc.set_skill_level(47,40) 
		pc.set_skill_level(48,40) 
		pc.set_skill_level(49,40) 
		pc.set_skill_level(50,40)
		pc.set_skill_level(51,40) 
		notice_all ( "Parabéns! " .. pc . name .. " suas habilidades estão Perfect Master!" )
		setskin ( NOWINDOW )
		end
	end
	
		if pc . job == 2 then
		if pc . get_skill_group ( ) == 1 then 
		pc.set_skill_level(61,40) 
		pc.set_skill_level(62,40) 
		pc.set_skill_level(63,40) 
		pc.set_skill_level(64,40) 
		pc.set_skill_level(65,40) 
		pc.set_skill_level(66,40) 
		notice_all ( "Parabéns! " .. pc . name .. " suas habilidades estão Perfect Master!" )
		setskin ( NOWINDOW )
		elseif pc . get_skill_group ( ) == 2 then 
		pc.set_skill_level(76,40) 
		pc.set_skill_level(77,40) 
		pc.set_skill_level(78,40) 
		pc.set_skill_level(79,40) 
		pc.set_skill_level(80,40) 
		pc.set_skill_level(81,40) 
		notice_all ( "Parabéns! " .. pc . name .. " suas habilidades estão Perfect Master!" )
		setskin ( NOWINDOW )
		end
	end
	
		if pc . job == 3 then
		if pc . get_skill_group ( ) == 1 then 
		pc.set_skill_level(91,40) 
		pc.set_skill_level(92,40) 
		pc.set_skill_level(93,40) 
		pc.set_skill_level(94,40) 
		pc.set_skill_level(95,40) 
		pc.set_skill_level(96,40) 
		notice_all ( "Parabéns! " .. pc . name .. " suas habilidades estão Perfect Master!" )
		setskin ( NOWINDOW )
		elseif pc . get_skill_group ( ) == 2 then 
		pc.set_skill_level(106,40) 
		pc.set_skill_level(107,40) 
		pc.set_skill_level(108,40) 
		pc.set_skill_level(109,40) 
		pc.set_skill_level(110,40) 
		pc.set_skill_level(111,40) 
		notice_all ( "Parabéns! " .. pc . name .. " suas habilidades estão Perfect Master!" )
		setskin ( NOWINDOW )
		end
	end

		if pc . job == 4 then
		if pc . get_skill_group ( ) == 1 then 
		pc.set_skill_level(170,40) 
		pc.set_skill_level(171,40) 
		pc.set_skill_level(172,40) 
		pc.set_skill_level(173,40) 
		pc.set_skill_level(174,40) 
		pc.set_skill_level(175,40) 
		notice_all ( "Parabéns! " .. pc . name .. " suas habilidades estão Perfect Master!" )
		setskin ( NOWINDOW )
		end
	end
end
end
end

Boa sorte / bom uso.

Poderia explicar como instalar a quest, vou certinho no caminho adiciono a quest com o nome.quest mas na hora de dar ./qc nome.quest não funciona, dá comando não encontrado...

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
Sign in to follow this