NPC de Buff

Estado
Cerrado para nuevas respuestas.

Ripper

Newbie Lvl 2
[SERVIDOR] NPC de Buff

GS > Para el Servidor

Bueno eh aqui un nuevo codigo:
el Sig codigo cumple la funcion de al poner a un npc X /darbuff recibis Fuerza-Celebridad-Curar graves modificando tus status
Eh aqui el codigo:


vas a tcp_handlebata2
buscas con Control+f lo sig:

[vb]
'[Barrin 1-12-03]
Case "/SALIRCLAN"
If UserList(UserIndex).GuildInfo.EsGuildLeader = 1 Then[/vb]

Arriba de Barrin Agregas lo sig dejando una separacion:

[vb]
'[Ripper]
Case "/RECIBIRBUFF"
If UserList(UserIndex).flags.Muerto = 1 Then
Call SendData(ToIndex, UserIndex, 0, "||¡¡Estas Muerto!!" & FONTTYPE_INFO)
Exit Sub
End If
If UserList(UserIndex).flags.TargetNPC > 0 Then
If Distancia(Npclist(UserList(UserIndex).flags.TargetNPC).Pos, UserList(UserIndex).Pos) > 3 Then
Call SendData(ToIndex, UserIndex, 0, "||Estas demasiado lejos." & FONTTYPE_INFO)
Call SendData(ToIndex, UserIndex, 0, "||Te has buffeado" & FONTTYPE_INFO)
Exit Sub
End If
If Npclist(UserList(UserIndex).flags.TargetNPC).NPCtype = X Then
UserList(UserIndex).Stats.UserAtributos(Fuerza) = MAXATRIBUTOS
UserList(UserIndex).Stats.UserAtributos(Agilidad) = MAXATRIBUTOS
UserList(UserIndex).Stats.MinHP = UserList(UserIndex).Stats.MaxHP
End If
End If
Exit Sub[/vb]

Despues crear un Npc X

Código:
[NPC116] 'Vende ropa de hombre
Name=¡¡¡Buffiador del Imperio!!!
Desc=Recibi el mejor buff aca
Head=73
Body=80
Heading=2
Movement=0
Attackable=0
Comercia=0

Mod la lista de Npcs:

Código:
[INIT]
NumNPCs=115
Cambiarlo a 116
Bueno ahi esta el codigo
Alguna duda posteenla

EDIT: Me olvide no es necesario crear un npc para recibir Buff ahi esta configurado para cualquier Npc
 

MrMan

Sr. Product Manager @ Rockwell Automation
Miembro del equipo
Colaborador
Es inutil, ya que los atributos que te bonifica nunca te los saca, los seguis manteniendo, osea lo que hace es editarte nada mas.


Atte. Tales
 
Estado
Cerrado para nuevas respuestas.
Arriba