[GF]Cartão de Informação Hitskin_logo Hitskin.com

Isto é uma pré-visualização de um tema em Hitskin.com
Instalar o temaVoltar para a ficha do tema

Aldeia RPG
Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

[GF]Cartão de Informação

+3
Laxus
Level Max
Dooolly
7 participantes

Página 1 de 2 1, 2  Seguinte

Ir para baixo

[GF]Cartão de Informação Empty [GF]Cartão de Informação

Mensagem por Dooolly Qua Fev 12, 2014 11:31 am

[GF]Cartão de Informação IqgS6x8BSTKQT
Cartão de Informação do Player

A Pedido do Membro Level Max eu fiz esse sistema.
Exibe as informações do player quando seleciona o Target e da um clique com o botão direito.

[GF]Cartão de Informação IbgrFWQHyn81c5

Client~Side

Crie uma PictureBox:
Nome: picPlayer
Visible = False

Crie 13 Label Dentro dessa Pic:
1: Name =  lblLevelP
1: Caption = Level:
2: Name = lblClasseP
2: Caption = Classe:
3: Name = lblVital1
3: Caption = HP:
4: Name = lblVital2
4: Caption = MP:
5 a 9
Name: lblStatusP
Index: 1 ao 5
Captions:
(1) - For:
(2) - Def:
(3) - Int:
(4) - Agi:
(5) - Will:

10 a 13
Name: lblStatusPN
Index: 1 ao 5
Captions: Tudo "0"

Agora Dê um DubloClick na picScreen e Procure Por:
Código:
ElseIf Button = vbRightButton Then
            If ShiftDown Then
                ' admin warp if we're pressing shift and right clicking
                If GetPlayerAccess(MyIndex) >= 2 Then AdminWarp CurX, CurY
            End If

Abaixo Add:
Código:
If myTarget > 0 Then
             If myTargetType = TARGET_TYPE_PLAYER Then
              If CurX = Player(myTarget).x And CurY = Player(myTarget).y Then
               If x + picPlayer.Width > frmMain.ScaleWidth Then
                picPlayer.Left = x - picPlayer.Width
               Else
                picPlayer.Left = x
               End If
               If y + picPlayer.Height > frmMain.ScaleHeight Then
                picPlayer.Top = y - picPlayer.Height
               Else
                picPlayer.Top = y
               End If
               picPlayer.Visible = Not picPlayer.Visible
               lblLevelP.Caption = "Level: " & Player(myTarget).Level
               lblClasseP.Caption = "Classe: " & Trim(Class(Player(myTarget).Class).name)
               lblVital1.Caption = "HP: " & Player(myTarget).Vital(1) & "/" & Player(myTarget).MaxVital(1)
               lblVital2.Caption = "MP: " & Player(myTarget).Vital(2) & "/" & Player(myTarget).MaxVital(2)
              dim i as long
               For i = 1 To Stats.Stat_Count - 1
                lblStatusPN(i).Caption = Player(myTarget).Stat(i)
               Next
              End If
             End If
            End If

Depois na picScreen_MouseMove Procure Por:
Código:
picSpellDesc.Visible = False

Abaixo Add:
Código:
If myTarget > 0 Then
     If Not CurX = Player(myTarget).x And CurY = Player(myTarget).y Then
      picPlayer.Visible = False
     End If
    End If

Pronto!


Qualquer Erro Poste Aqui...

Creditos
Dooolly - Por Criar e Postar


Última edição por Dooolly em Qua Fev 12, 2014 1:15 pm, editado 1 vez(es)
Dooolly
Dooolly
Colaborador
Colaborador

Medalhas : [GF]Cartão de Informação Trophy12
Mensagens : 1227
Créditos : 153

Ficha do personagem
Nível: 1
Experiência:
[GF]Cartão de Informação Left_bar_bleue0/0[GF]Cartão de Informação Empty_bar_bleue  (0/0)
Vida:
[GF]Cartão de Informação Left_bar_bleue30/30[GF]Cartão de Informação Empty_bar_bleue  (30/30)

Ir para o topo Ir para baixo

[GF]Cartão de Informação Empty Re: [GF]Cartão de Informação

Mensagem por Level Max Qua Fev 12, 2014 12:56 pm

Deu variable not defined 

http://prntscr.com/2rts8l

_________________
Mundo Poderoso (MP) by: Level Max Games Wink

Ajude a divulgar meu projeto Wink



[GF]Cartão de Informação 18262f





www.tabernarpg.forumeiros.com
[GF]Cartão de Informação Dqwkx
Level Max
Level Max
Iniciante
Iniciante

Mensagens : 42
Créditos : 3

Ir para o topo Ir para baixo

[GF]Cartão de Informação Empty Re: [GF]Cartão de Informação

Mensagem por Dooolly Qua Fev 12, 2014 1:15 pm

faltou uma parte '-'

só add acima desse
Código:
For i = 1 To Stats.Stat_Count - 1

Código:
dim i as long

Atualizei o topico!
Dooolly
Dooolly
Colaborador
Colaborador

Medalhas : [GF]Cartão de Informação Trophy12
Mensagens : 1227
Créditos : 153

Ficha do personagem
Nível: 1
Experiência:
[GF]Cartão de Informação Left_bar_bleue0/0[GF]Cartão de Informação Empty_bar_bleue  (0/0)
Vida:
[GF]Cartão de Informação Left_bar_bleue30/30[GF]Cartão de Informação Empty_bar_bleue  (30/30)

Ir para o topo Ir para baixo

[GF]Cartão de Informação Empty Re: [GF]Cartão de Informação

Mensagem por Level Max Qua Fev 12, 2014 1:18 pm

erro dnv:
Sub or fuction not defined Very Happy

http://prntscr.com/2rtzqi

_________________
Mundo Poderoso (MP) by: Level Max Games Wink

Ajude a divulgar meu projeto Wink



[GF]Cartão de Informação 18262f





www.tabernarpg.forumeiros.com
[GF]Cartão de Informação Dqwkx
Level Max
Level Max
Iniciante
Iniciante

Mensagens : 42
Créditos : 3

Ir para o topo Ir para baixo

[GF]Cartão de Informação Empty Re: [GF]Cartão de Informação

Mensagem por Dooolly Qua Fev 12, 2014 1:25 pm

lá no topico.. acima!

10 a 13
Name: lblStatusPN
Index: 1 ao 5
Captions: Tudo "0"

 Fury

esse lbl do 5 ao 9 eh so enfeite..
[GF]Cartão de Informação IbgrFWQHyn81c5
Dooolly
Dooolly
Colaborador
Colaborador

Medalhas : [GF]Cartão de Informação Trophy12
Mensagens : 1227
Créditos : 153

Ficha do personagem
Nível: 1
Experiência:
[GF]Cartão de Informação Left_bar_bleue0/0[GF]Cartão de Informação Empty_bar_bleue  (0/0)
Vida:
[GF]Cartão de Informação Left_bar_bleue30/30[GF]Cartão de Informação Empty_bar_bleue  (30/30)

Ir para o topo Ir para baixo

[GF]Cartão de Informação Empty Re: [GF]Cartão de Informação

Mensagem por Level Max Qua Fev 12, 2014 1:39 pm

ADD skype:

pablo.willian44

_________________
Mundo Poderoso (MP) by: Level Max Games Wink

Ajude a divulgar meu projeto Wink



[GF]Cartão de Informação 18262f





www.tabernarpg.forumeiros.com
[GF]Cartão de Informação Dqwkx
Level Max
Level Max
Iniciante
Iniciante

Mensagens : 42
Créditos : 3

Ir para o topo Ir para baixo

[GF]Cartão de Informação Empty Re: [GF]Cartão de Informação

Mensagem por Laxus Qui Fev 13, 2014 6:00 am

Fico top Dooolly, parabens +1 :)

_________________
"Não importa o quão forte o cara é, o que importa é encara-lo de frente sem fraquejar"
                                                                                                                                                    Laxus ~ Fairy Tail
Laxus
Laxus
Aldeia Friend
Aldeia Friend

Mensagens : 1150
Créditos : 78

Ir para o topo Ir para baixo

[GF]Cartão de Informação Empty Re: [GF]Cartão de Informação

Mensagem por bejaflo1 Qui Fev 13, 2014 11:37 am

Fico super top mais tem 1 erro Sad
Não mostra o HP eo MP do outro jogador
Só o do própio jogador.
Mais o Level,classe status ta de boa menos o HP e MP

bejaflo1
Iniciante
Iniciante

Mensagens : 49
Créditos : 3

Ir para o topo Ir para baixo

[GF]Cartão de Informação Empty Re: [GF]Cartão de Informação

Mensagem por Dooolly Qui Fev 13, 2014 12:55 pm

Esse eh o unico problema tentei corrigir mais ñ consegui..
quando consegui arrumo.
Dooolly
Dooolly
Colaborador
Colaborador

Medalhas : [GF]Cartão de Informação Trophy12
Mensagens : 1227
Créditos : 153

Ficha do personagem
Nível: 1
Experiência:
[GF]Cartão de Informação Left_bar_bleue0/0[GF]Cartão de Informação Empty_bar_bleue  (0/0)
Vida:
[GF]Cartão de Informação Left_bar_bleue30/30[GF]Cartão de Informação Empty_bar_bleue  (30/30)

Ir para o topo Ir para baixo

[GF]Cartão de Informação Empty Re: [GF]Cartão de Informação

Mensagem por Dexter Qui Fev 13, 2014 2:56 pm

Olá Dooolly, tente usar da seguinte maneira:


Código:
MapNpc(NPCNum).Vital(Vitals.HP) & "/" & NPC(MapNpc(NPCNum).num).HP

Abraços.

Opa, desculpa pensei que o problema era no NPC, rs.
Dexter
Dexter
Semi-Experiente
Semi-Experiente

Mensagens : 90
Créditos : 13

Ficha do personagem
Nível: 1
Experiência:
[GF]Cartão de Informação Left_bar_bleue0/50[GF]Cartão de Informação Empty_bar_bleue  (0/50)
Vida:
[GF]Cartão de Informação Left_bar_bleue30/30[GF]Cartão de Informação Empty_bar_bleue  (30/30)

Ir para o topo Ir para baixo

[GF]Cartão de Informação Empty Re: [GF]Cartão de Informação

Mensagem por Conteúdo patrocinado


Conteúdo patrocinado


Ir para o topo Ir para baixo

Página 1 de 2 1, 2  Seguinte

Ir para o topo

- Tópicos semelhantes

 
Permissões neste sub-fórum
Não podes responder a tópicos