Todo sobre AO
 
ÍndiceFAQBuscarMiembrosGrupos de UsuariosRegistrarseConectarse

Comparte | 
 

 Label de Status 0.12.0

Ver el tema anterior Ver el tema siguiente Ir abajo 
AutorMensaje
Agus
Admin


Mensajes : 69
Fecha de inscripción : 01/07/2008

MensajeTema: Label de Status 0.12.0   Miér Jul 02, 2008 5:34 am

Label de status 0.12.0
Vida = HpBar
Mana = ManaBar
Energia = StaBar
Sed = SedBar
Hambre = HambreBar

Buscan
Código:

Private Sub HandleUpdateHP()
abajo de
Código:

frmMain.Hpshp.Width = (((UserMinHP / 100) / (UserMaxHP / 100))
ponen
Código:

frmMain.HpBar.Caption = UserMinHP & "/" & UserMaxHP
Buscan
Private Sub HandleUpdateMana()
y abajo antes del end sub ponen
Código:

frmMain.ManaBar.Caption = UserMinMAN & "/" & UserMaxMAN
Buscams
el sub HandleUpdateSta
y abajo de todo ponen (antes del end sub )
Código:

frmMain.StaBar.Caption = UserMinSTA & "/" & UserMaxSTA
buscan este sub HandleUpdateHungerAndThirst()
y abjo de todo antes del end sub ponen
Código:

frmMain.HambreBar.Caption = UserMinHAM & "/" & UserMaxHAM
frmMain.SedBar.Caption = UserMinAGU & "/" & UserMaxAGU
buscan
Código:

UserMaxHP = incomingData.ReadInteger()
UserMinHP = incomingData.ReadInteger()
UserMaxMAN = incomingData.ReadInteger()
UserMinMAN = incomingData.ReadInteger()
UserMaxSTA = incomingData.ReadInteger()
UserMinSTA = incomingData.ReadInteger()
UserGLD = incomingData.ReadLong()
UserLvl = incomingData.ReadByte()
UserPasarNivel = incomingData.ReadLong()
UserExp = incomingData.ReadLong()
y abajo poner
Código:

frmMain.HpBar.Caption = UserMinHP & "/" & UserMaxHP
frmMain.ManaBar.Caption = UserMinMAN & "/" & UserMaxMAN
frmMain.StaBar.Caption = UserMinSTA & "/" & UserMaxSTA
frmMain.HambreBar.Caption = UserMinHAM & "/" & UserMaxHAM
frmMain.SedBar.Caption = UserMinAGU & "/" & UserMaxAGU
Volver arriba Ir abajo
Ver perfil de usuario http://recompilacionao.forosactivos.com
 
Label de Status 0.12.0
Ver el tema anterior Ver el tema siguiente Volver arriba 
Página 1 de 1.
 Temas similares
-
» Aasterinian, Semidios (No elegible)
» [Sorteo-Twitter] Jueves 6 de septiembre de 2012 - Premio: Ford Mustang RTR-X.
» Burn Fireblaze (Continuando con la base de datos)
» Ruedas para la bici de carretera

Permisos de este foro:No puedes responder a temas en este foro.
 :: Argentum Online :: Programación :: Otras Versiones-
Cambiar a: