SpikeL Comunidad
Hola, bienvenido a SpikeL Foro.

Si eres nuevo, deves registrarte.

Si ya tienes una cuenta, deves ingresar.

¡Muchas gracias!

PD: Si te has registrado pero no puedes logear tienes que activar tu cuenta desde tu e-mail.


Unirse al foro, es rápido y fácil

SpikeL Comunidad
Hola, bienvenido a SpikeL Foro.

Si eres nuevo, deves registrarte.

Si ya tienes una cuenta, deves ingresar.

¡Muchas gracias!

PD: Si te has registrado pero no puedes logear tienes que activar tu cuenta desde tu e-mail.
SpikeL Comunidad
¿Quieres reaccionar a este mensaje? Regístrate en el foro con unos pocos clics o inicia sesión para continuar.

Baculo Mata Dragon

4 participantes

Ir abajo

[ APORTE ] Baculo Mata Dragon

Mensaje por Boeira Sáb Mar 05, 2011 6:19 pm

CONSISTE EN UN BACULO QUE AL EQUIPARLO LE PEGA AL DRAGON POR MUCHO CON ECHIZOS.


Servidor

Buscamos


Mostrar Todo el Código | Numero de Linea | Ocultar/Mostrar | Seleccionar todo
StaffPower As Integer


Abajo agregamos


Mostrar Todo el Código | Numero de Linea | Ocultar/Mostrar | Seleccionar todo
VaraDragon As Byte


Buscamos


Mostrar Todo el Código | Numero de Linea | Ocultar/Mostrar | Seleccionar todo
Case eOBJType.otWeapon
ObjData(Object).WeaponAnim = val(Leer.GetValue("OBJ" & Object, "Anim"))


Abajo ponemos


Mostrar Todo el Código | Numero de Linea | Ocultar/Mostrar | Seleccionar todo
ObjData(Object).VaraDragon = val(Leer.GetValue("OBJ" & Object, "VaraDragon"))


Buscamos


Mostrar Todo el Código | Numero de Linea | Ocultar/Mostrar | Seleccionar todo
'Salud
If Hechizos(hIndex).SubeHP = 1 Then
daño = RandomNumber(Hechizos(hIndex).MinHP, Hechizos(hIndex).MaxHP)
daño = daño + Porcentaje(daño, 3 * UserList(UserIndex).Stats.ELV)


Abajo Ponemos

Mostrar Todo el Código | Numero de Linea | Ocultar/Mostrar | Seleccionar todo
If UserList(UserIndex).Invent.WeaponEqpObjIndex > 0 Then
If ObjData(UserList(UserIndex).Invent.WeaponEqpObjIndex).VaraDragon = 1 And Npclist(NpcIndex).NPCtype = DRAGON Then
daño = daño * 40
End If
End If


Buscamos


Mostrar Todo el Código | Numero de Linea | Ocultar/Mostrar | Seleccionar todo
daño = RandomNumber(Hechizos(hIndex).MinHP, Hechizos(hIndex).MaxHP)
daño = daño + Porcentaje(daño, 3 * UserList(UserIndex).Stats.ELV)


Abajo agregas

Mostrar Todo el Código | Numero de Linea | Ocultar/Mostrar | Seleccionar todo
If UserList(UserIndex).Invent.WeaponEqpObjIndex > 0 Then
If ObjData(UserList(UserIndex).Invent.WeaponEqpObjIndex).VaraDragon = 1 And Npclist(NpcIndex).NPCtype = DRAGON Then
daño = daño * 40
End If
End If


En los .dat vamos a crear un báculo especial

[OBJXXX]
Name=Báculo Mata Dragones
VaraDragon=1
Crucial=0
GrhIndex=YYYYY
Objtype=2
Agarrable=0
Anim=ZZ
MinHIT=3
MaxHIT=9
Crucial=0

Donde dice: Ponemos....
XXX -> Número de objeto libre
YYYYY -> Número de index del báculo (suelo)
ZZ -> Número de animación del báculo
Boeira
Boeira
Nivel 2
Nivel 2

Medallas
Baculo Mata Dragon Prensa1

Advertencias Advertencias : 1
Mensajes Mensajes : 22
Puntos Puntos : 48835
Reputación Reputación : 0
Sexo Sexo : Masculino

Fecha de inscripción Fecha de inscripción : 04/01/2011
País País : Argentina


Volver arriba Ir abajo

[ APORTE ] Re: Baculo Mata Dragon

Mensaje por Cood Sáb Mar 05, 2011 6:29 pm

Interesante, pero no me convence! gracias por el aporte ^^
Cood
Cood
Nivel 16
Nivel 16

Medallas
Baculo Mata Dragon Prensa1Baculo Mata Dragon Radio110

Advertencias Advertencias : 1
Mensajes Mensajes : 264
Puntos Puntos : 49282
Reputación Reputación : -4
Sexo Sexo : Masculino

Fecha de inscripción Fecha de inscripción : 13/12/2010
Edad Edad : 28
País País : Argentina

Localización Localización : Bs As, Caseros.

http://www.poringa.net

Volver arriba Ir abajo

[ APORTE ] Re: Baculo Mata Dragon

Mensaje por jojojoli Sáb Mar 05, 2011 7:29 pm

Que copado, una vara que pega al drako, que pioola
jojojoli
jojojoli
Nivel 23
Nivel 23

Medallas
Baculo Mata Dragon Prensa1Baculo Mata Dragon Donar1Baculo Mata Dragon Participativo1

Advertencias Advertencias : 4
Mensajes Mensajes : 543
Puntos Puntos : 49490
Reputación Reputación : 6
Fecha de inscripción Fecha de inscripción : 06/10/2010
Edad Edad : 28
País País : Argentina

Localización Localización : Nix (?)

Volver arriba Ir abajo

[ APORTE ] Re: Baculo Mata Dragon

Mensaje por Ozerlord Sáb Mar 05, 2011 7:44 pm

Buen aporte. Caracteristico de los mod Twist.

Atte OzerLord
Ozerlord
Ozerlord
Moderador General
Moderador General

Medallas
Baculo Mata Dragon Prensa1Baculo Mata Dragon Radio110Baculo Mata Dragon Donar1

Mensajes Mensajes : 238
Puntos Puntos : 48539
Reputación Reputación : 1
Sexo Sexo : Masculino

Fecha de inscripción Fecha de inscripción : 13/12/2010
País País : Argentina

Localización Localización : Burkina Faso

http://www.arkhantos.tk

Volver arriba Ir abajo

[ APORTE ] Re: Baculo Mata Dragon

Mensaje por Contenido patrocinado


Contenido patrocinado


Volver arriba Ir abajo

Volver arriba

- Temas similares

 
Permisos de este foro:
No puedes responder a temas en este foro.