[ALL]Tabela De Acc Pontos

por playsson14z Sáb 06 Nov 2010, 13:31

ae gente vim informar aq uma nova tabela tpw
a do renan tava certa e td
so q existia um bug mt serio nele q era quando vc colocava - a quantidade de numeros e o personagem perdia mts pontos no stat e ele ficava forte do nada ^^
mais agora ageitei esse bug

primeiro crie um novo comando tpw
vc ira dar esc e ira aparecer a tabela ^^
primeiro procure por :

Código:: Call CheckInput(0, KeyCode, Shift) If KeyCode = vbKeyF1 Then If Player(MyIndex).Access > 3 Then frmadmin.Visible = False frmadmin.Visible = True End If End If

abaixo adicione

Código:: Call CheckInput(0, KeyCode, Shift) If KeyCode = vbKeyEscape Then If Player(MyIndex).Access > 0 Then frmPontos.Visible = False frmPontos.Visible = True End If End If

ali em ifplayer(MyIndex).acess e o accesso q o player deverar ter para usar o esc

pronto acabamos a primeira parte ^^

agora segunda parte ^^

primeiro crie uma form e mude o nome para frmpontos

2 parte concluida ^^

terceira parte agora:

primeiro crie uma frame e ponha a caption q quiser ^^ no meu puis pontos

Dentro deste Frame você Cria 4 CommandButton

No 1° CommandButton você coloca o Caption= Adicionar Força

de 2 Cliques e Adicione:

Código:: If GetPlayerAccess(MyIndex) >= 1 Then If Val(txtPontos.Text) >= 0 Then If (Val(txtPontos.Text)) <= GetPlayerPOINTS(MyIndex) > 0 Then Else Call SendData("usestatpoint" & SEP_CHAR & 0 & SEP_CHAR & txtPontos & END_CHAR) End If End If End If

Caso você queira que apenas VIP possa usa isso você deixa isso:

Código:: If GetPlayerAccess(MyIndex) >= 1 Then

caso não você pode colocar assim:

Código:: If GetPlayerAccess(MyIndex) >= 0 Then

No 2° CommandButton você coloca o Caption= Adicionar Defesa

de 2 Cliques e Adicione:

Código:: If GetPlayerAccess(MyIndex) >= 1 Then If Val(txtPontos.Text) >= 0 Then If (Val(txtPontos.Text)) <= GetPlayerPOINTS(MyIndex) > 0 Then Else Call SendData("usestatpoint" & SEP_CHAR & 1 & SEP_CHAR & txtPontos & END_CHAR) End If End If End If

No 3° CommandButton você coloca o Caption= Adicionar Agilidade

de 2 Cliques e Adicione:

Código:: If GetPlayerAccess(MyIndex) >= 1 Then If Val(txtPontos.Text) >= 0 Then If (Val(txtPontos.Text)) <= GetPlayerPOINTS(MyIndex) > 0 Then Else Call SendData("usestatpoint" & SEP_CHAR & 3 & SEP_CHAR & txtPontos & END_CHAR) End If End If End If

No 4° CommandButton você coloca o Caption= Adicionar Inteligência

de 2 Cliques e Adicione:

Código:: If GetPlayerAccess(MyIndex) >= 1 Then If Val(txtPontos.Text) >= 0 Then If (Val(txtPontos.Text)) <= GetPlayerPOINTS(MyIndex) > 0 Then Else Call SendData("usestatpoint" & SEP_CHAR & 2 & SEP_CHAR & txtPontos & END_CHAR) End If End If End If

Pronto, os CommandButtons foram criados e configurados. Agora vamos Criar um Label com o Caption = Quantidade de pontos Agora você criar um TextBox com Name = txtPontos, lembre-se de apagar o Text 1.

Prontinho!

Lembrete: Caso você vá usar GetPlayerLevel tem que seguir primeiro o tutorial Arrumando GetPlayerLevel para que ele funcione no cliente

Antes que venham me criticar por estar ajudando a PRODEV:

Créditos:
Renan Politano
é pablo por corrigir um bug e editar o tutorial ^^
é tbm o pirata e o rafael soares q me ajudara e me deram uma maior força a concertar o tutorial ^^

ae gostou do meu tuto? clica ali no + ^^ e me agradeça pelo oq eu fiz ^^

por **Lendário** Sáb 06 Nov 2010, 13:42

Tem 24 horas para deixar o tutorial dentro das regras.

por playsson14z Sáb 06 Nov 2010, 13:42

me desculpe mais como assim oq esta errado ?

por **Lendário** Sáb 06 Nov 2010, 13:48

Aprenda a ler as regras e você saberá.

por Lucas Roberto Sáb 06 Nov 2010, 13:49

O Titulo esta [Nova]
voce tem que por [ALL] se for para todas a engines da elysium

Arruma ae chefe!!!!
Aguardando!!!!

por playsson14z Sáb 06 Nov 2010, 13:52

a era isso muito obrigadoO eu num sabia

por **Lendário** Sáb 06 Nov 2010, 14:15

Ainda falta o ícone mais isso eu arrumo na próxima já sabe.

por playsson14z Sáb 06 Nov 2010, 14:20

oks me desculpe

por Guilherme Alves Dom 07 Nov 2010, 19:11

ai show...tuto da hora mais tem mais uma coisa. Você sabe Como Aumentar a quantidade de Pontos Para Add...o Maximo é 1000.

por playsson14z Seg 08 Nov 2010, 12:40

pow manow num sei num pd ajuda la no suporte de ajuda

por kiko2 Seg 08 Nov 2010, 14:18

muito bom + 1 Cred

por singstren Seg 08 Nov 2010, 14:31

gostei manow muito bom + 1 credito

por Dukinha Seg 08 Nov 2010, 16:54

Nao vo dar + pq esse cara copio meu oks eu que inventei oks --'

desce la

desce mais um pouco

zoa

por Dukinha Qua 10 Nov 2010, 17:15

ou o que é comando tpw??

por gabriiell mooreiiraa Qui 09 Dez 2010, 12:15

double post cara, Very Happy

por Pablo Dom 12 Dez 2010, 18:32

Dukinha
para sua informação se foi vc que fez pq n posto?
eu que fiz isso pergunta a qualquer um
pirata_254 o rafael soares isso foi facil eu admito agora venha vc tentando copiar os meus legitimos codigos por corrigir esse bug
ja q vc e tão esperto assim pq se n quis postar?
agora venha mentindo querendo credito so por falar besteira '-'
se for assim faz um tuto e posta pq se eu fizer um tuto e tu disser isso denovo so capaz de nem mais postar aq pq tem cada gente que fica falando q e dono do tutorial '-'

por hardsfree Ter 08 Mar 2011, 11:32

tem como almentar o tanto que ela pode add por vez???

nesse no caso esta adc de 1000 em 1000

por Dukinha Dom 20 Mar 2011, 16:54

que tutoo??

por hornet600 Seg 23 Abr 2012, 21:18

Se eu quiser colocar para add pontos quando estiver full em todos os status?

por Conteúdo patrocinado

[ALL]Tabela De Acc Pontos

[ALL]Tabela De Acc Pontos

Re: [ALL]Tabela De Acc Pontos

Re: [ALL]Tabela De Acc Pontos

Re: [ALL]Tabela De Acc Pontos

Re: [ALL]Tabela De Acc Pontos

Re: [ALL]Tabela De Acc Pontos

Re: [ALL]Tabela De Acc Pontos

Re: [ALL]Tabela De Acc Pontos

Re: [ALL]Tabela De Acc Pontos

Re: [ALL]Tabela De Acc Pontos

Re: [ALL]Tabela De Acc Pontos

Re: [ALL]Tabela De Acc Pontos

Re: [ALL]Tabela De Acc Pontos

Re: [ALL]Tabela De Acc Pontos

Re: [ALL]Tabela De Acc Pontos

Re: [ALL]Tabela De Acc Pontos

Re: [ALL]Tabela De Acc Pontos

Re: [ALL]Tabela De Acc Pontos

Re: [ALL]Tabela De Acc Pontos

Re: [ALL]Tabela De Acc Pontos