[Tutorial]Aumentando o bonus dos itens[EO]

por guifs Sex 12 Jul 2013, 17:38

Procure por:
Private Type ItemRec

Mais abaixo ache:

Código:: Add_Stat(1 To Stats.Stat_Count - 1) As byte

troque por:

Código:: Add_Stat(1 To Stats.Stat_Count - 1) As Long

depois procure por:

Código:: ' Stats Stat(1 To Stats.Stat_Count - 1) As byte POINTS As Long

troque por:

Código:: ' Stats Stat(1 To Stats.Stat_Count - 1) As Long POINTS As Long

Depois só fazer a mesma coisa no servidor e fim.

lembrando clicke na scrlstatbonus e eumente o max dela num máximo de :
2147483647

obs²:

Verifique se no seu modglobals tem o code:
' values
Public Const MAX_BYTE As Byte = 255
Public Const MAX_INTEGER As Integer = 32767
Public Const MAX_LONG As Long = 2147483647

Obs³:

é nescessário:

----Explicação Lógica---

-O problema está acontecendo pois a variável "stats" foi criada como
"byte" isso é: Só permite 0 á 255 o número.
(Eu não cheguei a olhar como era, para arrumar isso na versão 1.2, mas na
versão 2.0 é assim como vou postar).

-Dando seguimento: O que você precisa fazer é avisar pro VB, que você quer que
a variável dos stats seja "LONG" (permite até 2.147.483.648) ou "INTEGER" (permite até 32.767). Entendido?

-Dada a explicação, vamos ao passo-a-passo!

-----PASSO 1!-----------

-Abra a source do cliente e procure por "Private Type PlayerRec"
-Embaixo disso, dentre as linhas de códigos que tem ali, vai ter isso aqui:
"Stat(1 To Stats.Stat_Count - 1) As Byte" SUBISTITUA ISSO POR "Stat(1 To Stats.Stat_Count - 1) As Long".

--Agora procure por "If Value > MAX_BYTE Then Value = MAX_BYTE" e mude para
"If Value > MAX_LONG Then Value = MAX_LONG"

(Esse era um dos problemas, muitos não sabiam que era preciso alterar aqui.)

---Agora procure por "frmMain.lblPoints.Caption = GetPlayerPOINTS" ai vai ter um coisa escrita assim:
"If GetPlayerStat(Index, x) < 255 Then" troque o 255 por o Maximo de stats que você quer! 1000, 2000 etc...

--------PASSO 2!------------
-Abra a source do server e procure por: " ' Stats " embaixo disso vai ter:
" Stat(1 To Stats.Stat_Count - 1) As Byte " troque por: " Stat(1 To Stats.Stat_Count - 1) As Long "

-Procure por: "Dim PointType As Byte" troque por "Dim PointType As Long"

-Agora procure por: "If GetPlayerRawStat(index, PointType) >= 255"
e troque o 255 pelo número que você colocou LÁ no cliente como sendo o "Maximo" de stats!

Creditos:
Eu
Megosarco(pelo +255)

por AlexsandroUchiha Sex 12 Jul 2013, 17:45

Oque isso faz?

por dazateam Sex 12 Jul 2013, 18:01

aumenta os status dos itens
ex:

na E.O normal vc cria uma espada e ela pd dar no maximo 255 pontos em all

e com isso pode dar até 2147483647 pontos em all

acho q é isso

guifs vlw por disbonibilizar ^^ +1

entra skype q preciso la d sistema kk'

por AlexsandroUchiha Sex 12 Jul 2013, 18:06

dazateam escreveu: aumenta os status dos itens
ex:

na E.O normal vc cria uma espada e ela pd dar no maximo 255 pontos em all

e com isso pode dar até 2147483647 pontos em all

acho q é isso

guifs vlw por disbonibilizar ^^ +1

entra skype q preciso la d sistema kk'

Posso te add?

por dazateam Sex 12 Jul 2013, 18:10

AlexsandroUchiha escreveu:
dazateam escreveu: aumenta os status dos itens
ex:

na E.O normal vc cria uma espada e ela pd dar no maximo 255 pontos em all

e com isso pode dar até 2147483647 pontos em all

acho q é isso

guifs vlw por disbonibilizar ^^ +1

entra skype q preciso la d sistema kk'
Posso te add?

acho q ss né shauhsuahsua

por AlexsandroUchiha Sex 12 Jul 2013, 18:23

dazateam escreveu:
AlexsandroUchiha escreveu:
dazateam escreveu: aumenta os status dos itens
ex:

na E.O normal vc cria uma espada e ela pd dar no maximo 255 pontos em all

e com isso pode dar até 2147483647 pontos em all

acho q é isso

guifs vlw por disbonibilizar ^^ +1

entra skype q preciso la d sistema kk'
Posso te add?

acho q ss né shauhsuahsua

So falta você add kk

por guifs Dom 14 Jul 2013, 10:21

pessoal aki o tutorial ficou estranho,tipo mts letras emboladas e talz na parte do +255,aew tbm tá ou só aki?

por AlexsandroUchiha Dom 14 Jul 2013, 10:25

guifs escreveu:pessoal aki o tutorial ficou estranho,tipo mts letras emboladas e talz na parte do +255,aew tbm tá ou só aki?

Aki tambem fico assim...

por PeeDro.17 Seg 15 Jul 2013, 20:22

Dá pra entender
mas tenta organizar melhor pow...

Valeu

[Tutorial]Aumentando o bonus dos itens[EO] 38efGqjZy2MiQAAAABJRU5ErkJggg==

por sakume56 Sáb 20 Jul 2013, 17:23

Cara na Eclipse Reborn não tem esse:

"If GetPlayerStat(Index, x) < 255

Só tem esse:

"If GetPlayerStat(Index, x)

por Thaisa Seg 09 Dez 2013, 16:42

Alguém me ajuda ta dando erro na linha: CopyMemory ByVal VarPtr(Item(n)), ByVal VarPtr(ItemData(0)), ItemSize
O erro acontece sempre na hora de logar a acc
dez de já, agradeço '-'

[Tutorial]Aumentando o bonus dos itens[EO] W+qOUOjDhs9SwAAAABJRU5ErkJggg==

[Tutorial]Aumentando o bonus dos itens[EO] W+qOUOjDhs9SwAAAABJRU5ErkJggg==

por jonny157 Seg 09 Dez 2013, 20:22

Thaisa pelo que vi você precisa excluir os itens que você criou. Mas acho que você fez algo errado no tutorial, porque é modificado apenas o type da variável, para recusar uma leitura seria preciso ter adicionado/alterado/excluido alguma variável do item.

Refaça o tutorial.

por guifs Ter 10 Dez 2013, 09:19

Bom thaissa,n sei qual é o seu sistema de quest e como ele funciona mais verifique se n meche em variaveis erradas,poisn o sistemas mechemos apenas com player rec e no mais algumas form's originais do EO 2.0.

Off: Você jogava NF?

por Thaisa Ter 10 Dez 2013, 09:32

Off: Ainda jogo NF as vezes

On: Vou seguir a sugestão do Jhony157 e Refazer , Edito aqui quanto terminar

Edit: Refiz o Tutorial 3x E continua bugando .-.

por guifs Ter 10 Dez 2013, 17:24

#Desfaça,tipo nunca testei esse sistema só peguei um meio-esboço e passei para item,então tipo o sistema provavelmente deve estar errado nem li os códes dele pra te falar a verdade.Dps eu faço um correto tipo n mecho mais com vb e essas coisas mais vou fazer esse e mais alguns pedidos pendente na antiga fabrica.

por Thaisa Ter 10 Dez 2013, 18:32

Desfiz , mas agora a linha de erro mudou

[Tutorial]Aumentando o bonus dos itens[EO] 7ZuIscnkF9wAAAABJRU5ErkJggg==

Obs: Esse error so acontece quando se loga pelo Client normalmente (Sem ultilizaçao do VB)

por guifs Qua 11 Dez 2013, 14:26

Bom se tu des fez tudo então o problema pode ser outro sistema que tu colocou fala qual modulo fica o erro pois pode ser erro na transmissão de dados S>c ou C>S

por Conteúdo patrocinado

[Tutorial]Aumentando o bonus dos itens[EO]

[Tutorial]Aumentando o bonus dos itens[EO]

Re: [Tutorial]Aumentando o bonus dos itens[EO]

Re: [Tutorial]Aumentando o bonus dos itens[EO]

Re: [Tutorial]Aumentando o bonus dos itens[EO]

Re: [Tutorial]Aumentando o bonus dos itens[EO]

Re: [Tutorial]Aumentando o bonus dos itens[EO]

Re: [Tutorial]Aumentando o bonus dos itens[EO]

Re: [Tutorial]Aumentando o bonus dos itens[EO]

Re: [Tutorial]Aumentando o bonus dos itens[EO]

Re: [Tutorial]Aumentando o bonus dos itens[EO]

Re: [Tutorial]Aumentando o bonus dos itens[EO]

Re: [Tutorial]Aumentando o bonus dos itens[EO]

Re: [Tutorial]Aumentando o bonus dos itens[EO]

Re: [Tutorial]Aumentando o bonus dos itens[EO]

Re: [Tutorial]Aumentando o bonus dos itens[EO]

Re: [Tutorial]Aumentando o bonus dos itens[EO]

Re: [Tutorial]Aumentando o bonus dos itens[EO]

Re: [Tutorial]Aumentando o bonus dos itens[EO]