[ALL]Troca de Classe !

por Zeus Dom 13 Set 2009, 11:45

Em "Scripted npc" Adicione:

Código:: Dim lvl Dim classe Dim slot1 Dim slot2 lvl = GetPlayerLevel(index) classe = GetPlayerClass(index) slot1 = GetPlayerInvItemNum( Index, 1) slot2 = GetPlayerInvItemNum( Index, 2) 'Aqui verifica se o player tem o lvl e a classe necessária para evoluir If lvl => 10 and classe = 1 then Call playermsg (index, "Olá, (Getplayername(index)), Deseja trocar de classe?", 15) Else Call playermsg (index, "Me traga: 1 , Entao mudarei sua classe para !", 15) End If 'Jogador está com item 2 no slot 1 If slot1 = 2 then Call setplayerclass (index, ) Else Call playermsg (index, "Parabéns! Agora você é um !!", 2) End If 'jogador não tem item 2 no slot 1 If slot1 <> 2 then Call playermsg (index, "Volte aqui quando tiver 1 .", 15) End If 'Se o player naum tiver lvl 10 If lvl < 10 then Call playermsg (index, "Você ainda não está no nivel necessario!", 4) End if 'Se o player naum for classe 1 If classe >< 1 then Call playermsg (index, "Desculpe-me, (Getplayername(index)), somente pode se tornar ", 14) End If End Sub

O restante dos slots vocês devem adicionar manualmente.

por cristian113 Qui 22 Abr 2010, 14:11

funciona no elysium?

por Zeus Qui 22 Abr 2010, 21:28

provavelmente.

por lukasfkt Dom 09 maio 2010, 18:27

Zeus no meu deu erro nessa parte
lvl = 20(index)
classe = 5(index)
slot1 = 3( Index, 1)
slot2 = 3 (Index, 2)

por Lucas_NELINE Seg 10 maio 2010, 11:45

parabens

por lraniel Qui 27 Jan 2011, 14:37

tipo como assim slot 1 e 2
nao entendi

por mariomoral Sex 18 Fev 2011, 17:12

Bom, eu fiz tudo certinho, mas depois disso oque fasso? Tipo eu crio um NPC para ser o que troca de classe, mas n funcionou, eu aperto para falar com ele e n acontece nada. Eu coloco Scripted, mas pede o número do script e eu não sei como fazer.