GS-Zone

Recontra SIMPLE Ir al Indice

Moderadores: Moderadores de Argentum, Especialistas de Argentum, Especialistas de Programación

9

Nota » 22 Mar 2009 21:51

*Bueno queria hacer que al matar a un usuario nos de:

1 de oro.
y xxx cantidad de exp.

*Tambien queria hacer que cuando nos matan aparezca un cartel que diga: "Moriste, utilizia el comando /hogar"
*Necesito tambien que cuando 1 usuario mata mas de 3 veces al mismo usuario le diga x consola a TODOS "El usuario (nombre) esta trucheando frags en el mapa (numero del mapa) llamen a un gm"

Gracias al que me ayude :D!
Última edición por Tidius el 22 Mar 2009 22:01, editado 2 veces en total

Imagen

Imagen
Gs-Zone OldUser
96
Destructor de Mentes [5]
Registrado: Años de membresíaAños de membresíaAños de membresía
Mensajes: 743

Nota » 22 Mar 2009 21:52

Con lo del Oro y Exp.. Me dejas el Sub de MatarUser o algo asi

Imagen
¡Vamo' la vela de mi corazón!
650 (-2)
Dragon Ancestral [5]
Registrado: Años de membresíaAños de membresíaAños de membresíaAños de membresía
Mensajes: 4170
Aportes: 20
Premios: 2
Campeón de Gráfica AO (1) Embajador (1)

Nota » 22 Mar 2009 22:12

El oro ya esta y la exp tambien...

Para el que quiere saber la exp la cambiamos de aca:

DaExp = CInt(UserList(VictimIndex).Stats.ELV * 50) (Numero de experiencia multiplicado por el nivel del usuario en mi caso puse 25.000

lo mas importante es esto:

*Necesito tambien que cuando 1 usuario mata mas de 3 veces al mismo usuario le diga x consola a TODOS "El usuario (nombre) esta trucheando frags en el mapa (numero del mapa) llamen a un gm"

Imagen

Imagen
Gs-Zone OldUser
96
Destructor de Mentes [5]
Registrado: Años de membresíaAños de membresíaAños de membresía
Mensajes: 743

Nota » 22 Mar 2009 22:19

Tidius escribió:*Tambien queria hacer que cuando nos matan aparezca un cartel que diga: "Moriste, utilizia el comando /hogar"
Gracias al que me ayude :D!



En el Sub userdie, pone

If UserList(UserIndex).Flags.Muerto Then
Call senddata(toindex, userindex), 0, 0, "||Moriste, utiliza el comando /HOGAR" & FONTTYPE_INFO)
end if


nose si tiene fonttype como fenix 11.2 xD, nunca me baje los codes de 11.2, pero proba asi xD

Imagen
UNUNQUADiO
24
Legendario Inmortal [1]
Registrado: Años de membresíaAños de membresíaAños de membresía
Mensajes: 4899
Aportes: 51
Premios: 2
Embajador (1) Detector de Bugs (1)

Nota » 22 Mar 2009 22:51

Call senddata(Toindex, userindex), 0, 0, "||Moriste, utiliza el comando /HOGAR" & FONTTYPE_INFO) me lo marca en rojo sin ningun error xd

Alguien me puede ayudar con el otro :(

Imagen

Imagen
Gs-Zone OldUser
96
Destructor de Mentes [5]
Registrado: Años de membresíaAños de membresíaAños de membresía
Mensajes: 743

Nota » 23 Mar 2009 12:24

Petin escribió:If UserList(UserIndex).Flags.Muerto Then
Call senddata(toindex, userindex), 0, 0, "||Moriste, utiliza el comando /HOGAR" & FONTTYPE_INFO)
end if


Verduliaste xD

En el sub userdie, pones

  1. Call senddata Toindex, Userindex,0,0,"||Has Muerto! Puedes utilizar el Comando /Hogar para volver a tu ciudad" & Fonttype_Info

"Tal vez sea la propia simplicidad del asunto lo que nos conduce al error.", Edgar Allan Poe.
El chat está hosteado en:
Imagen
www.odthost.com.ar

Imagen
TE AMO CHU ♥
143
Dragon Ancestral [5]
Registrado: Años de membresíaAños de membresíaAños de membresíaAños de membresía
Ubicación: Error 404 - Ubication Not Found
Mensajes: 3929
Aportes: 52
Premios: 2
Mister Programador AO (1) Embajador (1)

Nota » 23 Mar 2009 13:58

Standelf escribió:
Petin escribió:If UserList(UserIndex).Flags.Muerto Then
Call senddata(toindex, userindex), 0, 0, "||Moriste, utiliza el comando /HOGAR" & FONTTYPE_INFO)
end if


Verduliaste xD

En el sub userdie, pones

  1. Call senddata Toindex, Userindex,0,0,"||Has Muerto! Puedes utilizar el Comando /Hogar para volver a tu ciudad" & Fonttype_Info



Puse qe si estaba muerto te diga so, pero userindex) puse y va sin parentesis ahi, com vos los escribiste ta bien? pense qe se usaban parentesis yo :P

Imagen
UNUNQUADiO
24
Legendario Inmortal [1]
Registrado: Años de membresíaAños de membresíaAños de membresía
Mensajes: 4899
Aportes: 51
Premios: 2
Embajador (1) Detector de Bugs (1)

Nota » 26 Mar 2009 16:49

Petin escribió:
Tidius escribió:*Tambien queria hacer que cuando nos matan aparezca un cartel que diga: "Moriste, utilizia el comando /hogar"
Gracias al que me ayude :D!



En el Sub userdie, pone

If UserList(UserIndex).Flags.Muerto Then
Call senddata(toindex, userindex), 0, 0, "||Moriste, utiliza el comando /HOGAR" & FONTTYPE_INFO)
end if


nose si tiene fonttype como fenix 11.2 xD, nunca me baje los codes de 11.2, pero proba asi xD


Arre :P onad que si esta en el sub userdie ya esta muerto xD para q le vas a preguntar si esta muerto

Seria tan simple como poner

Call SendData(ToIndex, UserIndex, 0, "||Escribe /hogar." & FONTTYPE_INFO)

ene l sub userdie

Imagen
Imagen
Imagen
SE BUSCA HOST



Firmita que me regalo Azeth =)
[color=#00BFFF]Rahma Nanarak O'al[/color]
Destructor de Mentes [9]
Registrado: Años de membresíaAños de membresíaAños de membresía
Ubicación: ...En un rincón de las sierras...
Mensajes: 914
Aportes: 26

Nota » 31 Mar 2009 13:02

Petin: para el que el if si ya es el sub donde muere :S Seria medio loco que muera y no se active el flag muerto :S

Imagen

Imagen
13 (+1)
Legendario Inmortal [1]
Registrado: Años de membresíaAños de membresíaAños de membresíaAños de membresía
Ubicación: Baradero, Buenos Aires
Mensajes: 4765
Aportes: 54
Premios: 1
Participación (1)


Volver a AO 0.11.2 / AOReady

¿Quién está conectado?

Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 0 invitados