Universo Games
Ola , Convidado



Você ainda não e cadastrado então cadastre-se e veja todas as atualizações no mundo rpg!!!
Universo Games

Suporte e Desenvolvimento só no Universo Games

Ola Convidado, Seja Bem vindo a equipe lhe deseja boa sorte no seu projeto!

Você não está conectado. Conecte-se ou registre-se

[ALL]NPC Editor: Força,Defesa e HP Inicial + do que MAXIMO!!!

Ver o tópico anterior Ver o tópico seguinte Ir em baixo  Mensagem [Página 1 de 1]

Luucas Robeerto


Fundador
Fundador
Bem.. pessoal este é meu primeiro Tutorial, e por incrivel que pareça estou me dando bem com o VB6!

Obs:.. Se não poder postar este script removam, eu precurei algum tuto sobre isto além do de EXP, e não achei.

Créditos: Lendário -> Foi o Script de EXP que me ajudou a descobri os outros.

No Final Ficará Assim:


Spoiler:
[Você precisa estar registrado e conectado para ver esta imagem.]
COMEÇANDO: Abra o "client.vb6" va em "Frm.NpcEditor". Com ele aberto clique na barrinha de rolagem da "Hit Points" ( Fazeremos primeiro o de HP ) e delete ela.

O nome dela era "StartHP"lembre-se desse nome, pois usaremos ele mais tarde.

Agora va na opção "TextBox" e Cria uma caixa do tamanho da Scrollbar que você deletou.
Como disse o Lendário: -(pra ficar certinho sabe? xD)
xD!

Agora na caixa de propriedades você vai perceber que o nome da TextBox é Text1 (ou Text mais outro número)
Vamos Mudar esse nome pra algo que possamos lembrar por exemplo TextoHP.

Vizualize o Código do "frmNpcEditor.frm" clicando com o direito no próprio form e selecionando a Opção
"View Code" ou na opção View no menu principal e depois "Code".

Ctrl + F e na janelinha de Busca e Digite "StartHP" (Sem aspas, lembra do StartHP?) clique em Find Next.

No Código Substitua o texto StartHP por TextoHP (ou o que colocou como nome no TextBox)
Ainda nesse mesmo Sub Mude o Outro StartHP para TextoHP e agora mude o ".Value" (sem aspas) do TextHP por ".text" (sem aspas) de modo que o código ficará assim:

Spoiler:
Private Sub TextoHP_Change()
lblStartHP.Caption = CStr(TextoHP.Text)
End Sub

Finalizando: Agora Dê Ctrl + F de novo mais dessa vez marque a opção "Current Project" e Pesquise por "StartHP.Value" (sem aspas).

Mude o texto encontrado por "TextoHP.text" procure de novo e mude o novo resultado por "TextoHP.text", e procura de novo e poia "TextoHP.text" .

Existem apenas tres resultados, mas por via das dúvidas pesquise de novo, se der um erro dizendo que não encontrou beleza tudo feito!

Pronto ja fizemos o do HP, so copilar e está -lá! Hehe! Como agora ja fiz tudo explicado vou amostrar o de Força e Defesa, mais simplificado ( finalmente os mOnstros terão mais do que 1000 de DEF e FOR. )

FORÇA: Agora volte novamente para o "Frm.NpcEditor" lá delete igual antes a Barrinha de rolagem de "Strenght" e grave o nome dela que é: scrlSTR

Agora crie uma "TextBox" pondo-o no mesmo lugar da Scroll Bar que você deletou.

Mude o nome dela para "TextoFOR" agora va no Código de "Frm.NpcEditor" e procura por "scrlSTR".

Faça igual a mudança de acordo com o Spoiler Aaixo:

Spoiler:
Private Sub TextoFOR_Change()
lblSTR.Caption = CStr(TextoFOR.Text)
End Sub

Após isto faça Ctrl + F novamente nao se esqueça de marcar a opção "Current Project".
Porcure por "scrlSTR.Value" muda o resultado por "TextoFOR.text" faça isso novamente.

Existem 2 opções, mais por via das duvidas faça novamente, se der erro , quer dizer que não tem mais, e pronto o der FORÇA está pronto agora vamos para o de DEFESA!

DEFESA:
Volte novamente para "Frm.NpcEditor" delete a Scroll Bar de Defense. e Faça uma TextBox em seu lugar!

Após isto bote o nome da TextBox de : TextoDEF

Lembrando:- O nome da ScrollBar que vc deletou é: scrlDEF

Agora va no Código do "frm.NpcEditor", e procura por "scrlDEF" após isto faça a mudança de acordo com o Spoiler abaixo:

Spoiler:
Private Sub TextoDEF_Change()
lblDEF.Caption = CStr(TextoDEF.Text)
End Sub

Após isto faça Ctrl + F novamente nao se esqueça de marcar a opção "Current Project".
Porcure por "scrlDEF.Value" muda o resultado por "TextoDEF.text". Achoque so tem 1 opção, mais por via das duvidas preocura novamente [Você precisa estar registrado e conectado para ver esta imagem.] .

O tópico de EXPERIENCIA do Lendário esta aki: EXPERIENCIA

Após isto feito, por favooor! Não se esqueça de COPILAR! XD! Entam Creditos la em cima! Espero ter ajudado! xD Como eu ja disse meu primeiro Tópico!!! Té + Pessoal! [Você precisa estar registrado e conectado para ver esta imagem.]


_______________________________________________________________________________________________________

[Você precisa estar registrado e conectado para ver esta imagem.]
Spoiler:
[Você precisa estar registrado e conectado para ver esta imagem.]
[Você precisa estar registrado e conectado para ver esta imagem.]
[Você precisa estar registrado e conectado para ver esta imagem.]

[Você precisa estar registrado e conectado para ver esta imagem.]
[Você precisa estar registrado e conectado para ver esta imagem.]
http://universogamesmmo.forumeiros.com

xxbinhox


Membro
Membro
Mt bom

http://alvaro-superdbzsayan.blogspot.com

Ver o tópico anterior Ver o tópico seguinte Voltar ao Topo  Mensagem [Página 1 de 1]

Permissão deste fórum:
Você não pode responder aos tópicos neste fórum