[APORTE] Transferencia de Puntos.

Ir abajo

[APORTE] Transferencia de Puntos.

Mensaje por Jhetz el 5/2/2014, 1:55 am

Bueno como la sección anda un poco caida vengo a publicar unos codigos que hice cuando estuve al pedo y como no me sirven los vengo a aportar.

Este codigo no se si esta aportado pero bueno.

Funcionamiento del codigo: Transferencia de puntos; el usuario tipea /tranfpts nick@puntos y le transfiere los puntos (si es que los tiene).
Es decir si el usuario pone /tranfpts gohan ssj@322 y tiene 322 puntos se los saca y se los da a la otra persona.

Comenzamos.

Buscamos el comando

Spoiler:

If UCase$(Left$(rData, 6)) = "/CMSG " Then

y arriba ubicamos lo siguiente

Spoiler:
If UCase$(Left$(rData, 10)) = "/TRANFPTS " Then
       rData = Right$(rData, Len(rData) - 10)
       Dim pnts As Long
       tIndex = NameIndex(rData)
       tIndex = NameIndex(ReadField(1, rData, 64))
               pnts = ReadField(2, rData, 64)
     
       If tIndex <= 0 Then
       Call SendData(SendTarget.ToIndex, userindex, 0, "||Usuario offline." & FONTTYPE_INFO)
       ElseIf tIndex = userindex Then
       Call SendData(SendTarget.ToIndex, userindex, 0, "||No puedes transferirte puntos de torneo vos mismo." & FONTTYPE_INFO)
       ElseIf UserList(userindex).Stats.PuntosTorneo < pnts Then
       Call SendData(SendTarget.ToIndex, userindex, 0, "||No tienes esos puntos de torneo." & FONTTYPE_INFO)
       Else
       UserList(userindex).Stats.PuntosTorneo = UserList(userindex).Stats.PuntosTorneo - pnts
avatar
Jhetz
Nivel 7
Nivel 7

¿BANEADO? : No.
Premios : Ninguno.
Cantidad de envíos : 509
Edad : 18
Localización : Atras Tuyo.
Fecha de inscripción : 03/02/2014

Ver perfil de usuario http://hd-zone.foroactivo.com

Volver arriba Ir abajo

Re: [APORTE] Transferencia de Puntos.

Mensaje por ldml1997 el 2/5/2016, 11:58 pm

se podria hacer pero para Enviar oro a otro usuario en ves de puntos de torneo ?

ldml1997
Nivel 1
Nivel 1

¿BANEADO? : No.
Premios : Ninguno.
Cantidad de envíos : 5
Localización : Pedro Luro
Fecha de inscripción : 23/04/2016

Ver perfil de usuario

Volver arriba Ir abajo

Re: [APORTE] Transferencia de Puntos.

Mensaje por Toyz el 3/5/2016, 7:29 pm

@ldml1997 escribió:se podria hacer pero para Enviar oro a otro usuario en ves de puntos de torneo ?

Sí, crea un post "pedido de código" explicá bien, versión, explicá el sistema, si sos nuevo, etc y te ayudamos.
avatar
Toyz
Administrador
Administrador

¿BANEADO? : No.
Premios :
[1er puesto] Usuario del año 2016
Cantidad de envíos : 5046
Edad : 17
Localización : Global.
Fecha de inscripción : 28/09/2014

Ver perfil de usuario

Volver arriba Ir abajo

Re: [APORTE] Transferencia de Puntos.

Mensaje por Contenido patrocinado


Contenido patrocinado


Volver arriba Ir abajo

Volver arriba


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