GS-Zone

Sacar usuarios del mapa cuando llegan a nivel 20. Ir al Indice

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

9
Este tema se encuentra cerrado.

Nota » 24 Ene 2012 15:54

Bueno yo quería hacer un código que cuando llegas al lvl 20(por ej) te saque de X mapa, y no puedas ingresar mas, que sea hasta lvl 20 el mapa pero nose como hacer :S


 ! Nota del moderador ^[GS]^ :
Cuando hagas un tema de problema, ponele un titulo que explique de trata, esta prohibido usar palabras como AYUDA o PROBLEMA, en un tema de etiqueta [PROBLEMA].
Te lo cambie.

Imagen

Ilaisa
<Aprendiendo a Programar>
227
Newbie [4]
Registrado: Diciembre 2011
Mensajes: 128

Nota » 24 Ene 2012 15:55

Fijate como se hace con los nw

Imagen
Ninja en progreso
929 (+5)
Dragon Ancestral [5]
Registrado: Años de membresía
Ubicación: • olivos •
Mensajes: 4103
Aportes: 13

Nota » 24 Ene 2012 16:36

Nose como se hace econ el new,, no encunetro y nose la linea ..

Imagen

Ilaisa
<Aprendiendo a Programar>
227
Newbie [4]
Registrado: Diciembre 2011
Mensajes: 128

Nota » 24 Ene 2012 16:37

CheckUserLevel y DoTileEvents.

LyRan escribió:Buenos Dias amigos y programadores de Gs Zone, Me gustaria pedirle la amabilidad de una ayuda con un cliente editado para mi Ao casero, Osea me explico, yo juego Ao con varios amigos y ellos todos usan cheat y no me gusta eso me gustaria que alguien me ayudara a crear un cliente editado con auto poteo de ambas potas a la ves ya sea que se alla gastado Mana lanzando algun hechis y comienze a potear solo hasta estar completamente el Mana, igual para la salud y poteo rapido para ambos.
mAnco programEr
806
Dragon Ancestral [1]
Registrado: Años de membresíaAños de membresía
Ubicación: Bolivia
Mensajes: 2305
Aportes: 109

Nota » 24 Ene 2012 16:49

Eso es muy fácil... ¿vos querés que cuando suba a nivel 20, sea expulsado del mapa?

Bueno, vas a el modulo UsUaRiOs del Servidor... y buscas la linea:
  1.    UserList(UserIndex).Stats.ELV = UserList(UserIndex).Stats.ELV + 1
  2.  

Abajo le agregas...
  1.    If UserList(UserIndex).Stats.ELV >= 20 And UserList(UserIndex).Pos.Map = 222 Then
  2.         Call WarpUserChar(UserIndex, 1, 50, 50, True)
  3.         Call SendData(SendTarget.ToIndex, UserIndex, 0, "||Debes abandonar el mapa." & FONTTYPE_WARNING)
  4.     End If

NOTA: Cambias el 222 por el numero de mapa en donde hay que expulsar al usuario.

Ahora... si a este mapa se puede llegar caminando o por telep hay que cambiar estas partes para impedir que entre ;)
(en el mismo modulo de UsUaRiOs en el Servidor)
  1. Sub WarpUserChar(ByVal UserIndex As Integer, ByVal Map As Integer, ByVal X As Integer, ByVal Y As Integer, Optional ByVal FX As Boolean = False)
  2.  
  3. Dim OldMap As Integer
  4. Dim OldX As Integer
  5. Dim OldY As Integer

Abajo pone...
  1.    If UserList(UserIndex).Stats.ELV >= 20 And Map = 222 Then
  2.         Call SendData(SendTarget.ToIndex, UserIndex, 0, "||No puedes ingresar a este mapa." & FONTTYPE_WARNING)
  3.         Exit Sub
  4.     End If
  5.  

NOTA: Cambias el 222 por el numero de mapa en donde NO debe entrar el usuario.

Y listo ^^
Es bastante fácil, como dije :P

Novus Ordo Seclorum
839
Administrador
Registrado: 5 Años de membresía!Años de membresía
Ubicación: Unknown
Mensajes: 9409
Aportes: 143
Premios: 1
Reportes resueltos (1)

Nota » 24 Ene 2012 17:13

Sos un Genio GS

Imagen
El Cacheton ^^
165
Aprendiz [4]
Registrado: Años de membresía
Ubicación: Las Toninas
Mensajes: 340

Nota » 24 Ene 2012 17:39

^[GS]^ escribió:Eso es muy fácil... ¿vos querés que cuando suba a nivel 20, sea expulsado del mapa?

Bueno, vas a el modulo UsUaRiOs del Servidor... y buscas la linea:
  1.    UserList(UserIndex).Stats.ELV = UserList(UserIndex).Stats.ELV + 1
  2.  

Abajo le agregas...
  1.    If UserList(UserIndex).Stats.ELV >= 20 And UserList(UserIndex).Pos.Map = 222 Then
  2.         Call WarpUserChar(UserIndex, 1, 50, 50, True)
  3.         Call SendData(SendTarget.ToIndex, UserIndex, 0, "||Debes abandonar el mapa." & FONTTYPE_WARNING)
  4.     End If

NOTA: Cambias el 222 por el numero de mapa en donde hay que expulsar al usuario.

Ahora... si a este mapa se puede llegar caminando o por telep hay que cambiar estas partes para impedir que entre ;)
(en el mismo modulo de UsUaRiOs en el Servidor)
  1. Sub WarpUserChar(ByVal UserIndex As Integer, ByVal Map As Integer, ByVal X As Integer, ByVal Y As Integer, Optional ByVal FX As Boolean = False)
  2.  
  3. Dim OldMap As Integer
  4. Dim OldX As Integer
  5. Dim OldY As Integer

Abajo pone...
  1.    If UserList(UserIndex).Stats.ELV >= 20 And Map = 222 Then
  2.         Call SendData(SendTarget.ToIndex, UserIndex, 0, "||No puedes ingresar a este mapa." & FONTTYPE_WARNING)
  3.         Exit Sub
  4.     End If
  5.  

NOTA: Cambias el 222 por el numero de mapa en donde NO debe entrar el usuario.

Y listo ^^
Es bastante fácil, como dije :P


Múchas gracias ^[GS]^ !! te amoo!.. otra cosita no me podrias ayudar PORFAVOR =$ .. mirá yo tengo un problemita, por eso no puedo hacer eso que lo saca a X nivel, vistes en el Newbie Dungeon, que llegas a lvl 13 y te saca, bueno en mi sv no lo saca nose que puede ser .. el Public Sub DoTileEvents no es, y tmp es el Sub Chekuserlevel; me estoy volviendo loca con eso ,, nose cual es el problema, el ChekUserlevel y el DoTileEvents no es el problema, esta en otro lado el problema y nose cual es :S,, no me podrías ayudar porfis..

Imagen

Ilaisa
<Aprendiendo a Programar>
227
Newbie [4]
Registrado: Diciembre 2011
Mensajes: 128

Nota » 24 Ene 2012 18:30

Hace el mismo código que te pase, para sacarlo cuando supera el nivel 13 y esta en el mapa del nw dungeon :P
Debería funcionar perfectamente ;)
Este mensaje ha obtenido 5 Monedas de Oro.


Novus Ordo Seclorum
839
Administrador
Registrado: 5 Años de membresía!Años de membresía
Ubicación: Unknown
Mensajes: 9409
Aportes: 143
Premios: 1
Reportes resueltos (1)

Nota » 24 Ene 2012 18:32

^[GS]^ escribió:Hace el mismo código que te pase, para sacarlo cuando supera el nivel 13 y esta en el mapa del nw dungeon :P
Debería funcionar perfectamente ;)


Sisi eso hise me olvide de editar :S, Muchisimas gracias!!.. te lo agradesco muchisimo enserio, estoy hace mucho con este problem y no lo podia solucionar aparte me sirvio para un par de cosas mas el código, te agradesco muchisimo GS, te dejo mis Mondes xD

Edit: Tema SOLUCIONADO. Grax GS y todos los que me ayudaron.

Imagen

Ilaisa
<Aprendiendo a Programar>
227
Newbie [4]
Registrado: Diciembre 2011
Mensajes: 128

Este tema se encuentra cerrado.

Volver a AO 0.11.5

¿Quién está conectado?

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