KazNack
Sargento
 Mensajes : 275
 Fecha de inscripción : 08/05/2011
![[APORTE] Barrita de Exp debajo del Personaje Empty](https://2img.net/i/fa/empty.gif) |  Tema: [APORTE] Barrita de Exp debajo del Personaje ![[APORTE] Barrita de Exp debajo del Personaje I_icon_minitime](https://2img.net/s/t/14/40/63/i_icon_minitime.png) Vie Jun 24, 2011 2:05 pm | |
| Este código sirve para 11.2
En CLIENTE
Buscamos en Mod_TileEngine el sub RenderScreen :
- Código:
-
If TempChar.Nombre <> "" Then
Dim lCenter As Long
If InStr(TempChar.Nombre, "<") > 0 And InStr(TempChar.Nombre, ">") > 0 Then
lCenter = (frmMain.TextWidth(Left(TempChar.Nombre, InStr(TempChar.Nombre, "<") - 1)) / 2) - 16
Dim sClan As String: sClan = Mid(TempChar.Nombre, InStr(TempChar.Nombre, "<"))
Y arriba ponemos :
- Código:
-
If UCase$(TempChar.Nombre) = UCase$(UserName) And UserExp > 0 Then
Dim MaxxxLargo As Byte
MaxxxLargo = 75
BackBufferSurface.SetForeColor 0
BackBufferSurface.SetFillColor vbBlack
Call BackBufferSurface.DrawBox(iPPx - (MaxxxLargo / 3), iPPy + 60, iPPx + (MaxxLargo / 1.5), iPPy + 55)
BackBufferSurface.SetForeColor vbBlack
BackBufferSurface.SetFillColor vbWhite
Call BackBufferSurface.DrawBox(iPPx - (MaxxxLargo / 3), iPPy + 60, (iPPx - (MaxxLargo / 3)) + ((UserExp / 100) / (UserPasarNivel / 100)) * MaxxLargo, iPPy + 55)
End If
Si quieren cambiarle el color busquen dentro del código:
- Código:
-
BackBufferSurface.SetFillColor vbWhite
Cambian donde dice vbWhite sin quitar el vb.
|
|
NazduM
Administrador
Mensajes : 239
Fecha de inscripción : 04/05/2011
 Edad : 27
 Localización : COMPU:)
 Sexo : 
| | Tema: Re: [APORTE] Barrita de Exp debajo del Personaje Vie Jun 24, 2011 5:24 pm | |
| Exelente aporte muy sencillo y muy uti |
|
BlackStyle
Amateur
Mensajes : 40
Fecha de inscripción : 16/05/2011
Localización : de la puerta para adentro =)
Sexo :
| | Tema: Re: [APORTE] Barrita de Exp debajo del Personaje Sáb Jun 25, 2011 1:37 pm | |
| Esta bueno.. pero este aporte lo vi en gs-zone con este codigo me base para hacer uno que tenga vida - exp y mana, esta bueno el code porq podes ponerle para que las barras aparescan debajo al pasarle el maus |
|
Contenido patrocinado
| | Tema: Re: [APORTE] Barrita de Exp debajo del Personaje | |
| |
|
![[APORTE] Barrita de Exp debajo del Personaje Counter_asd](https://2img.net/h/4.bp.blogspot.com/_nUERKfbexPw/SWbFtHBbqzI/AAAAAAAAABI/8Ejgl2iiIfQ/s400/counter_asd.jpg)
![[APORTE] Barrita de Exp debajo del Personaje I_logo](https://2img.net/s/t/14/40/63/i_logo.png){kind=logo}
