GS-Zone

Elegir Facción Ir al Indice

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

20

Nota » 01 Ene 2012 05:05

Sabé que a mi me pasa lo mismo.- Le conifguro las Stats, y lo hago criminal y aun así lo toma como ciudadano-

Imagen
Staff Tierras Legendarias
395
Oraculo [5]
Registrado: Años de membresía
Ubicación: Villa del parque
Mensajes: 1925
Aportes: 9

Nota » 01 Ene 2012 05:14

Mafia escribió:Sabé que a mi me pasa lo mismo.- Le conifguro las Stats, y lo hago criminal y aun así lo toma como ciudadano-


Por que seguramente al enviar el paquete para crear el pj resetea todo los stat y entonces hay esta el problema por que teniendo 0 de todo sos ciuda

Supongo es solo una suposicion tendria que alguien fijarse

Imagen
Ninja en progreso
919
Dragon Ancestral [5]
Registrado: Años de membresía
Ubicación: • olivos •
Mensajes: 4097
Aportes: 13

Nota » 04 Ene 2012 14:51

Para mí el problema que tiene es este:...

  1. Sub Fracciones(ByVal Fraccion As String)
  2. Select Case Fraccion
  3. Case "Ciudadano"
  4.  UserList(UserIndex).Reputacion.NobleRep = 99999
  5.         UserList(UserIndex).Reputacion.PlebeRep = 9910
  6.         UserList(UserIndex).Reputacion.AsesinoRep = -9951
  7.         UserList(UserIndex).Reputacion.BandidoRep = -9942
  8.         UserList(UserIndex).Reputacion.LadronesRep = -9999
  9. Case "Criminal"
  10.         UserList(UserIndex).Reputacion.AsesinoRep = 99999
  11.         UserList(UserIndex).Reputacion.BandidoRep = 99999
  12.         UserList(UserIndex).Reputacion.LadronesRep = 99999
  13.         UserList(UserIndex).Reputacion.NobleRep = -9999
  14.         UserList(UserIndex).Reputacion.PlebeRep = -9999
  15.         End Select
  16. End Sub


Problemas en ese Sub:

-La palabra "Fracción"...
-En ningún lado explica que si selecciona Criminal se vuelve Criminal, es decir, En el Case "Criminal" solo le sube la Reputación, pero no lo convierte en Criminal.
El código arreglado sería así:

  1. Sub Facciones(ByVal Faccion As String)
  2. Select Case Faccion
  3. Case "Ciudadano"
  4. Call VolverCiudadano
  5.  UserList(UserIndex).Reputacion.NobleRep = 99999
  6.         UserList(UserIndex).Reputacion.PlebeRep = 9910
  7.         UserList(UserIndex).Reputacion.AsesinoRep = 0
  8.         UserList(UserIndex).Reputacion.BandidoRep = 0
  9.         UserList(UserIndex).Reputacion.LadronesRep = 0
  10. Case "Criminal"
  11. Call VolverCriminal
  12.         UserList(UserIndex).Reputacion.AsesinoRep = 99999
  13.         UserList(UserIndex).Reputacion.BandidoRep = 99999
  14.         UserList(UserIndex).Reputacion.LadronesRep = 99999
  15.         UserList(UserIndex).Reputacion.NobleRep = 0
  16.         UserList(UserIndex).Reputacion.PlebeRep = 0
  17.         End Select
  18. End Sub


Fijate, usa el Código arreglado de arriba y contame.

Suerte!

PD: Sobre lo que dicen los demás de que no envía la Reputación:
Posiblemente -99999 no esté admitido en la Reputación, entonces probá con 0, como te lo deje arriba.

EDIT:
Probá usando mi solución + esto:
cambiar_color_de_nick_al_volverse_criminal_t4KP.html
Última edición por Alkair el 04 Ene 2012 15:00, editado 2 veces en total

Feer es mi fan, por eso me tiene en su firma jakjka
Pobrecito

Imagen
#Rezniaq - Aprendiendo C++
755
Destructor de Mentes [12]
Registrado: Septiembre 2011
Ubicación: Zárate
Mensajes: 1074
Aportes: 20

Nota » 04 Ene 2012 14:54

Alkair escribió:Para mí el problema que tiene es este:...

  1. Sub Fracciones(ByVal Fraccion As String)
  2. Select Case Fraccion
  3. Case "Ciudadano"
  4.  UserList(UserIndex).Reputacion.NobleRep = 99999
  5.         UserList(UserIndex).Reputacion.PlebeRep = 9910
  6.         UserList(UserIndex).Reputacion.AsesinoRep = -9951
  7.         UserList(UserIndex).Reputacion.BandidoRep = -9942
  8.         UserList(UserIndex).Reputacion.LadronesRep = -9999
  9. Case "Criminal"
  10.         UserList(UserIndex).Reputacion.AsesinoRep = 99999
  11.         UserList(UserIndex).Reputacion.BandidoRep = 99999
  12.         UserList(UserIndex).Reputacion.LadronesRep = 99999
  13.         UserList(UserIndex).Reputacion.NobleRep = -9999
  14.         UserList(UserIndex).Reputacion.PlebeRep = -9999
  15.         End Select
  16. End Sub


Problemas en ese Sub:

-La palabra "Fracción"...
-En ningún lado explica que si selecciona Criminal se vuelve Criminal, es decir, En el Case "Criminal" solo le sube la Reputación, pero no lo convierte en Criminal.
El código arreglado sería así:

  1. Sub Faacciones(ByVal Faccion As String)
  2. Select Case Faccion
  3. Case "Ciudadano"
  4. Call VolverCiudadano
  5.  UserList(UserIndex).Reputacion.NobleRep = 99999
  6.         UserList(UserIndex).Reputacion.PlebeRep = 9910
  7.         UserList(UserIndex).Reputacion.AsesinoRep = -9951
  8.         UserList(UserIndex).Reputacion.BandidoRep = -9942
  9.         UserList(UserIndex).Reputacion.LadronesRep = -9999
  10. Case "Criminal"
  11. Call VolverCriminal
  12.         UserList(UserIndex).Reputacion.AsesinoRep = 99999
  13.         UserList(UserIndex).Reputacion.BandidoRep = 99999
  14.         UserList(UserIndex).Reputacion.LadronesRep = 99999
  15.         UserList(UserIndex).Reputacion.NobleRep = -9999
  16.         UserList(UserIndex).Reputacion.PlebeRep = -9999
  17.         End Select
  18. End Sub


Fijate, usa el Código arreglado de arriba y contame.

Suerte!
El problema de el era que el Ponia "fraccion" en Lugar de "faccion" osea los codigos chocaban entendes?

Imagen
Tribal Peliculas
540
Oraculo [3]
Registrado: Años de membresíaAños de membresía
Ubicación: Colombia
Mensajes: 1551
Aportes: 4

Nota » 04 Ene 2012 14:56

-.AnDy.- escribió:
Alkair escribió:Para mí el problema que tiene es este:...

  1. Sub Fracciones(ByVal Fraccion As String)
  2. Select Case Fraccion
  3. Case "Ciudadano"
  4.  UserList(UserIndex).Reputacion.NobleRep = 99999
  5.         UserList(UserIndex).Reputacion.PlebeRep = 9910
  6.         UserList(UserIndex).Reputacion.AsesinoRep = -9951
  7.         UserList(UserIndex).Reputacion.BandidoRep = -9942
  8.         UserList(UserIndex).Reputacion.LadronesRep = -9999
  9. Case "Criminal"
  10.         UserList(UserIndex).Reputacion.AsesinoRep = 99999
  11.         UserList(UserIndex).Reputacion.BandidoRep = 99999
  12.         UserList(UserIndex).Reputacion.LadronesRep = 99999
  13.         UserList(UserIndex).Reputacion.NobleRep = -9999
  14.         UserList(UserIndex).Reputacion.PlebeRep = -9999
  15.         End Select
  16. End Sub


Problemas en ese Sub:

-La palabra "Fracción"...
-En ningún lado explica que si selecciona Criminal se vuelve Criminal, es decir, En el Case "Criminal" solo le sube la Reputación, pero no lo convierte en Criminal.
El código arreglado sería así:

  1. Sub Faacciones(ByVal Faccion As String)
  2. Select Case Faccion
  3. Case "Ciudadano"
  4. Call VolverCiudadano
  5.  UserList(UserIndex).Reputacion.NobleRep = 99999
  6.         UserList(UserIndex).Reputacion.PlebeRep = 9910
  7.         UserList(UserIndex).Reputacion.AsesinoRep = -9951
  8.         UserList(UserIndex).Reputacion.BandidoRep = -9942
  9.         UserList(UserIndex).Reputacion.LadronesRep = -9999
  10. Case "Criminal"
  11. Call VolverCriminal
  12.         UserList(UserIndex).Reputacion.AsesinoRep = 99999
  13.         UserList(UserIndex).Reputacion.BandidoRep = 99999
  14.         UserList(UserIndex).Reputacion.LadronesRep = 99999
  15.         UserList(UserIndex).Reputacion.NobleRep = -9999
  16.         UserList(UserIndex).Reputacion.PlebeRep = -9999
  17.         End Select
  18. End Sub


Fijate, usa el Código arreglado de arriba y contame.

Suerte!
El problema de el era que el Ponia "fraccion" en Lugar de "faccion" osea los codigos chocaban entendes?


Sí, ya se eso, pero el seguía con el problema...
Que no podía logear y eso...
Además como explique en ningún momento convertía al Usuario en Ciudadano/Criminal...
Fijate antes de responder, el tema NO está solucionado...

EDIT:
Probá usando mi solución + esto:
cambiar_color_de_nick_al_volverse_criminal_t4KP.html

Feer es mi fan, por eso me tiene en su firma jakjka
Pobrecito

Imagen
#Rezniaq - Aprendiendo C++
755
Destructor de Mentes [12]
Registrado: Septiembre 2011
Ubicación: Zárate
Mensajes: 1074
Aportes: 20

Anterior

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