Label´s /EST

Estado
Cerrado para nuevas respuestas.
A

Anonymous

Invitado
HE SEGUIDO TODOS ESTOS PASOS Y AÚN NO PUEDO VER LAS MIN/MAX DE LOS OBJETOS

LES MUESTRO UNA FOTO
<a href="http://img163.imageshack.us/img163/1674/lablsbm5.png" class="postlink" rel="nofollow" onClick="window.open(this.href);return false;">http://img163.imageshack.us/img163/1674/lablsbm5.png</a>



EL CODIGO EN EL CUAL ME BASE ES ESTE:

escribió Lagalot (SlkGames):
Ahhh bueno, uds van de mal en peor =P..

Haber yo diria en el server:

buscamos
Código:

Sub SendUserStatsBox(ByVal UserIndex As Integer) Call SendData(ToIndex, UserIndex, 0, "EST" & Userlist(UserIndex).Stats.MaxHP & "," & Userlist(UserIndex).Stats.MinHP & "," & Userlist(UserIndex).Stats.MaxMAN & "," & Userlist(UserIndex).Stats.MinMAN & "," & Userlist(UserIndex).Stats.MaxSta & "," & Userlist(UserIndex).Stats.MinSta & "," & Userlist(UserIndex).Stats.GLD & "," & Userlist(UserIndex).Stats.ELV & "," & Userlist(UserIndex).Stats.ELU & "," & Userlist(UserIndex).Stats.Exp) End Sub



y abajo ponemos:

Código:

Sub SendArmxBox(ByVal UserIndex As Integer) Call SendData(ToIndex, UserIndex, 0, "ARMX" & ObjData(Userlist(UserIndex).Invent.WeaponEqpObjInd ex).MinHIT & "," & ObjData(Userlist(UserIndex).Invent.WeaponEqpObjInd ex).MaxHIT & "," & ObjData(Userlist(UserIndex).Invent.ArmourEqpObjInd ex).MinDef & "," & ObjData(Userlist(UserIndex).Invent.ArmourEqpObjInd ex).MaxDef & "," & ObjData(Userlist(UserIndex).Invent.CascoEqpObjInde x).MinDef & "," & ObjData(Userlist(UserIndex).Invent.CascoEqpObjInde x).MaxDef & "," & ObjData(Userlist(UserIndex).Invent.EscudoEqpObjInd ex).MinDef & "," & ObjData(Userlist(UserIndex).Invent.EscudoEqpObjInd ex).MaxDef) End Sub



En el cliente buscamos:
Código:

Case "est"



y abajo, despues del exit sub ponemos:

Código:

Case "ARMX" ' >>>>> Actualiza daño de armas y defensa de armaduras Rdata = Right$(Rdata, Len(Rdata) - 4) frmMain.Armahit.caption = "" & Val(ReadField(1, Rdata, 44)) & " / " & Val(ReadField(2, Rdata, 44)) & "" frmMain.Armdef.caption = "" & Val(ReadField(3, Rdata, 44)) & " / " & Val(ReadField(4, Rdata, 44)) & "" frmMain.Heldef.caption = "" & Val(ReadField(5, Rdata, 44)) & " / " & Val(ReadField(6, Rdata, 44)) & "" frmMain.Escdef.caption = "" & Val(ReadField(7, Rdata, 44)) & " / " & Val(ReadField(8, Rdata, 44)) & ""



despues volvemos al server y vamos al sub equiparinvitem y antes del end sub ponemos:
Código:

Call SendArmxBox(UserIndex)



despues en el sub userdie donde dice:
Código:

Userlist(UserIndex).flags.Muerto = 1



abajo de eso ponemos:
Código:

Call SendArmxBox(UserIndex)



y el code ya esta listo..
solo faltaria en la frmmain del cliente, crear labels con el nombre de : Helderf escdef, armdef, y armahit.
 
A

Anonymous

Invitado
Mirá fijate bien como pusistes los labels y su código respectivo, aunque yo no sé mucho de programacion esperemos hasta que venga un moderador que sepa

saludos.
 
A

Anonymous

Invitado
enserio? como puede ser. Estas usando 0.11.5o Gs?. Lo seguistes al pie de la letra o hay algo que hay que cambiar?


por ejemplo para mi al final de esto tiene que ir un exit sub

Case "ARMX" ' >>>>> Actualiza daño de armas y defensa de armaduras


EXIT SUB


aca un sendtarget que falta me parece

Sub SendArmxBox(ByVal UserIndex As Integer)
Call SendData(SENDTARGET.ToIndex, UserIndex, 0, "ARMX" &




y aca un SENDTARGET.TOINDEX,

Call SendArmxBox.(SENDTARGET. TOINDEX, USER INDEX)
 
A

Anonymous

Invitado
se a mi tampoco me funco este codigo y eso que segui todo al pie de la letra
 
A

Anonymous

Invitado
No me salta ningún error, compila todo bien, pero en el juego no me muestra las MIN/MAX de los objetos que tengo equipados.

<a href="http://img163.imageshack.us/img163/1674/lablsbm5.png" class="postlink" rel="nofollow" onClick="window.open(this.href);return false;">http://img163.imageshack.us/img163/1674/lablsbm5.png</a>
 
A

Anonymous

Invitado
Vamos ayudan por favor!!!, nesecito solucionar esto urgente
 

Shed

128bpm
Ex-Staff
Fijate que están mal los nombres de los labels que puso al final porque no concuerdan.
Tendrías que crear 4 labels distintos con los siguientes nombres:
Heldef
Escdef
Armdef
Armahit

Había un pequeño error de tipeo supongo, proba asi.
 
A

Anonymous

Invitado
No me sirvió lo que posteastes. Lo que yo quiero que me digan es si hay algún error en el código que posteé aca para hacer los labels de MIN/MAX de los objetos que tenemos equipados. Estoy utilizando la 0.11.5. Algo en el código debe estar mal por que como ven en la foto no me anda y hize todo exactamente como dice LAGOLAT que es un buen programador.

saludos.
 

Pocho

Oráculo Lvl 3
Musashi dijo:
No me sirvió lo que posteastes. Lo que yo quiero que me digan es si hay algún error en el código que posteé aca para hacer los labels de MIN/MAX de los objetos que tenemos equipados. Estoy utilizando la 0.11.5. Algo en el código debe estar mal por que como ven en la foto no me anda y hize todo exactamente como dice LAGOLAT que es un buen programador.

saludos.
no va a andar, porq es para la 11.2 tendrias que cambiar varias cosas, y yo no te lo voy a hacer
 

Pocho

Oráculo Lvl 3
para mi el error, es la forma de pedir ayuda, no se la merece para nada. proba en 11.2, si te anda, es porq no anda para la 11.5 y tendras que fijarte vos la forma de hacerlo
 

DarkThom

Oráculo Lvl 3
Capo Vi Tu Post en la ShoutBox y Para que Sepas No somos Mulos tuyos .

Sincetramnte sos un creido del orto y Ojala que n ote solucionen el problema por pelotudo

[Sab 0:38] Invitado: se pero depsués me disculpé y estube bardiando por que no me daban bola
[Sab 0:35] Pocho: tubiste diciendo "GS Y LA nose q, " bastante subido de tono
[Sab 0:34] Pocho: no vas a ser groso por hacer esa pelotudes, deja de decir boludeces amigo, oy ya estubiste bardiando me tenes podrido
[Sab 0:32] Invitado: ¿¿¿te creés el programador groxo???, intentá resolver esta duda >>> <a href="http://gs-zone.org/viewtopic.php?p=22010#22010" class="postlink" rel="nofollow" onClick="window.open(this.href);return false;">http://gs-zone.org/viewtopic.php?p=22010#22010</a>
[Sab 0:32] Invitado: El que es groso sabrá la respuesta a esto >> <a href="http://gs-zone.org/viewtopic.php?p=22010#22010" class="postlink" rel="nofollow" onClick="window.open(this.href);return false;">http://gs-zone.org/viewtopic.php?p=22010#22010</a>

no lo Digo Por Pocho , Sino Porlo que hacer porque no l oresolves vos?
 
Estado
Cerrado para nuevas respuestas.
Arriba