ÍndiceCalendarioIndiceFAQBuscarMiembrosGrupos de UsuariosRegistrarseConectarseReglamento
¿Quién está en línea?
En total hay 1 usuario en línea: 0 Registrados, 0 Ocultos y 1 Invitado

Ninguno

La mayor cantidad de usuarios en línea fue 16 el Miér Ago 07, 2013 8:12 pm.
Mejores posteadores
Rango
 
Habauc
 
Trogclodita
 
WhoTeR
 
Tomm-
 
ZankuR
 
GM-PekeMixz
 
LuciMoyo
 
MwM
 
Diclut s2 Lalaa♥
 
Estadísticas
Tenemos 97 miembros registrados.
El último usuario registrado es PekeMixzGamer1

Nuestros miembros han publicado un total de 1289 mensajes en 264 argumentos.

Comparte | 
 

 Cuando moris te aparese un form q te dise si queres volver a ulla o caminar

Ir abajo 
AutorMensaje
GM-PekeMixz
Capitan Primero
Capitan Primero
avatar

Cantidad de envíos : 81
Fecha de inscripción : 24/07/2013
Edad : 20
Localización : Boulogne

MensajeTema: Cuando moris te aparese un form q te dise si queres volver a ulla o caminar   Mar Jul 30, 2013 7:45 pm

Holaa aca les traigo un code que acabo de hacer, es muy sencillo, la funcion seria que cuando moramos, nos aparesca un form que nos diga si queremos volver ulla o seguir caminando. Empezamos;
En el cliente agregamos un nuevo form, al cual llamaremos "frmHogar", y agregamos 2 command button.
El Command1 seria el de ir hacia Ulla y el Command2 seria el de seguir caminando.
Adentro del form ponemos

Código:
Private Sub Command1_Click()
Call SendData("/AULLA") 'Si aca tienen /HOGAR pueden ponerlo tmb
Unload Me
End Sub
Private Sub Command2_Click()
Unload Me
End Sub


Despues buscan

Código:
Case "PARADOK"

Y arriba ponen

Código:
Case "MUERTEE"
Frmhogar.show, frmMain
Exit sub


Ahora en el servidor buscamos:

Código:
Case "/AYUDA"


Y arriba ponemos

Código:
Case "/AULLA"
If UserList(UserIndex).flags.Muerto Then
Call SendData(SendTarget.ToIndex, UserIndex, 0, "||Has sido llevado a Ullathorpe" & FONTTYPE_INFO)
Call WarpUserChar(UserIndex, 1, 50, 50, True)
Else
Call SendData(SendTarget.ToIndex, UserIndex, 0, "||Debes estar muerto para utilizar el comando" & FONTTYPE_INFO)
End If
Exit Sub


Despues buscan en el Sub UserDie:

Código:
UserList(UserIndex).flags.Muerto = 1


Y aabajo ponen

Código:
Call SendData(SendTarget.ToIndex, UserIndex, 0, "MUERTEE")


Listo, sencillo ^^

Fuentes Gs zone

Ciudades Perdidas Se acerca...
Volver arriba Ir abajo
Ver perfil de usuario https://www.facebook.com/CiudadesPerdidasAo
ZankuR
Director
Director
avatar

Cantidad de envíos : 107
Fecha de inscripción : 19/07/2013

MensajeTema: Re: Cuando moris te aparese un form q te dise si queres volver a ulla o caminar   Vie Ago 02, 2013 10:01 pm

https://redcdn.net/ihimizer/img153/3998/qchx.jpg la foto puede ser algo asi, igual lindo code, es medio parecido el de gs-zone. saludos
Volver arriba Ir abajo
Ver perfil de usuario
 
Cuando moris te aparese un form q te dise si queres volver a ulla o caminar
Volver arriba 
Página 1 de 1.
 Temas similares
-
» Cuando Callan las Trompetas [DVDRip] (TORRENT)
» Cuando eramos soldados [DVDRip]
» ¿Te santiguas cuando pasas por delante de una iglesia o un cementerio?
» ¿mi compañero de trabajo no me mira a los ojos cuando conversamos?
» ¿COMO SE ENAMORA UNA MUJER CUANDO...?

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