MMORPG Brasil
Ola, visitante! Agradecemos sua visita, para ter acesso a todo nosso conteúdo recomendamos que faça um cadastro no fórum, com ele você pode participar de tópicos e ter acesso a todas áreas da comunidade!

Participe do fórum, é rápido e fácil

MMORPG Brasil
Ola, visitante! Agradecemos sua visita, para ter acesso a todo nosso conteúdo recomendamos que faça um cadastro no fórum, com ele você pode participar de tópicos e ter acesso a todas áreas da comunidade!
MMORPG Brasil
Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

[EO] Ajuda

3 participantes

Ir para baixo

[EO] Ajuda Empty [EO] Ajuda

Mensagem por Sweeps Sex 08 Fev 2013, 14:56

Algun Pode Me Ajudar Nesse Erro Tava Fazendo Esse Sistema E Deu Erro http://www.mmorpgbr.com/t10735-eo-mapa-com-teleporte-e-custo-de-gold
E deu esse erro
Onde da esse erro ? aki amountModifier

Spoiler:
Quem me ajudar dou 5 Cred
Sweeps
Sweeps
Membro Sênior
Membro Sênior

Mensagens : 286

Ir para o topo Ir para baixo

[EO] Ajuda Empty Re: [EO] Ajuda

Mensagem por Monotoshi Sex 08 Fev 2013, 15:01

Código:
On Error Resume Next
' Draw currency but with k, m, b etc. using a convertion function
If Amount < 1000000 Then
colour = White
ElseIf Amount > 1000000 And Amount < 10000000 Then
colour = Yellow
ElseIf Amount > 10000000 Then
colour = BrightGreen
End If
RenderText Font_Default, Format$(ConvertCurrency(Str(Amount)), "#,###,###,###"), X, y, colour, 0
' Check if it's gold, and update the label
If Item(GetPlayerInvItemNum(MyIndex, i)).Type = ITEM_TYPE_CURRENCY Then '1 = gold
frmMain.lblGold.Caption = Format$(Amount, "#,###,###,###") & "g"
' Check if it's gold, and update the label 2
If Amount = 0 Then
frmMain.lblGold.Caption = "0g"
frmMapa.lblGold.Caption = "0g"
End If
End If
Troca essa parte por essa acima...
avatar
Monotoshi
Membro Vitalicio
Membro Vitalicio

Mensagens : 591

Ir para o topo Ir para baixo

[EO] Ajuda Empty Re: [EO] Ajuda

Mensagem por Sweeps Sex 08 Fev 2013, 15:05

Ainda nao deu fala que a amountModifier nao existe e da erro quando eu apago da erro e outro lugar
Sweeps
Sweeps
Membro Sênior
Membro Sênior

Mensagens : 286

Ir para o topo Ir para baixo

[EO] Ajuda Empty Re: [EO] Ajuda

Mensagem por Monotoshi Sex 08 Fev 2013, 15:08

Acho que é porque o item ta de tipo consume,
Acha :
Código:
ITEM_TYPE_WEAPON Or ITEM_TYPE_CURRENCY Then
Troca por :
Código:
ITEM_TYPE_WEAPON Or ITEM_TYPE_ Then
avatar
Monotoshi
Membro Vitalicio
Membro Vitalicio

Mensagens : 591

Ir para o topo Ir para baixo

[EO] Ajuda Empty Re: [EO] Ajuda

Mensagem por lucas100vzs Sex 08 Fev 2013, 20:42

Cara o :

Código:
AmountModifier

É algum tipo de valor que você deve atribuir....1...10...100...

Ou crie uma Sub dando valor pra ele.....

Um:

Código:
AmountModifier = (GetPlayerLevel(index) * 0.1) + 50

E lembre de colocar no início da Sub um:

Código:
Dim AmountModifier as Long

Caso não tenha....Smile

É isso, se estiver falando que a variável não é definida é isso...
lucas100vzs
lucas100vzs
Membro Sênior
Membro Sênior

Mensagens : 396

Ir para o topo Ir para baixo

[EO] Ajuda Empty Re: [EO] Ajuda

Mensagem por Conteúdo patrocinado


Conteúdo patrocinado


Ir para o topo Ir para baixo

Ir para o topo

- Tópicos semelhantes

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