No estás conectado. Conéctate o registrate

Texto sube de la cabesa :P 0.12

Ver el tema anterior Ver el tema siguiente Ir abajo  Mensaje [Página 1 de 1.]

1 Texto sube de la cabesa :P 0.12 el Lun Mayo 04, 2009 3:48 pm

Guiido


SUPER MODERADOR
Todo el codigo va en el Cliente en el clsDialogs
Buscamos:
Código:
Private Type dialog
    textLine()  As String
    X          As Integer
    Y          As Integer
    startTime  As Long
    lifeTime    As Long
    CharIndex  As Integer
    color      As Long
    renderable  As Boolean
end type

Remplazan por:

Código:
Private Type dialog
    textLine()  As String
    X          As Integer
    Y          As Integer
    startTime  As Long
    lifeTime    As Long
    CharIndex  As Integer
    color      As Long
    renderable  As Boolean
    Sube As Integer 'Efecto (INTEGER!!)
End Type

Buscan:
Código:
  With dialogs(slot)
        .CharIndex = CharIndex
        .color = color
        .renderable = False
        .startTime = GetTickCount()
        .textLine = FormatChat(chat)
        .lifeTime = MS_ADD_EXTRA + (MS_PER_CHAR * Len(chat))

y abajo ponemos:
Código:
.Sube = 10

Buscamos:

Código:
                offset = -(usedFont.size + 2) * UBound(.textLine())
               
                'Render it
                For j = 0 To UBound(.textLine())
                    Call RenderText(.X, .Y + offset, .textLine(j), .color, usedFont)
                    offset = offset + usedFont.size + 5
                Next j
Y arriva ponemos:
Código:
              If .lifeTime >= 292 Then
                    .Sube = .Sube - 1
                    If .Sube > 0 Then .Y = .Y + .Sube
                End If
Guiidin

Ver perfil de usuario

2 Re: Texto sube de la cabesa :P 0.12 el Mar Mayo 12, 2009 10:40 am

rodre


USUARIO REGISTRADO
BUENISIMO!!!
-GRACIAS!

Ver perfil de usuario

3 Re: Texto sube de la cabesa :P 0.12 el Mar Mayo 12, 2009 2:22 pm

Guiido


SUPER MODERADOR
De nada, cualquire cod pedime

Ver perfil de usuario

4 Re: Texto sube de la cabesa :P 0.12 el Miér Mayo 13, 2009 2:08 pm

ArreK


USUARIO REGISTRADO
Buen porte ^^

Ver perfil de usuario

Contenido patrocinado


Ver el tema anterior Ver el tema siguiente Volver arriba  Mensaje [Página 1 de 1.]

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