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.

Experiência por documento de texto

+3
Valentine
Eduardo
Ricardo
7 participantes

Ir para baixo

Experiência por documento de texto Empty Experiência por documento de texto

Mensagem por Ricardo Seg 07 maio 2012, 20:54

Server~Side
modDataBase

No final do modulo adicione:

Código:
' *****************
' ** Experiencia **
' *****************
Sub LoadExperiencia()
    Dim filename As String
    Dim i As Long
   
    filename = App.Path & "\data\experiencia.ini"
   
    If FileExist("data\experiencia.ini") Then
        ReDim Experiencia(1 To MAX_LEVELS)
       
        For i = 1 To MAX_LEVELS
            Experiencia(i) = Val(GetVar(filename, "Experiencia", "Exp" & CStr(i)))
        Next i
    Else
        ReDim Experiencia(1 To MAX_LEVELS)
       
        For i = 1 To MAX_LEVELS
            Experiencia(i) = i * 25
            Call PutVar(filename, "Experiencia", "Exp" & CStr(i), STR(Experiencia(i)))
        Next
    End If
End Sub

modGeneral

Procure por:

Código:
    Call SetStatus("Loading animations...")
    Call LoadAnimations

Abaixo adicione:

Código:
    Call SetStatus("Carregando experiencia...")
    Call LoadExperiencia

modGlobals

No final do modulo adicione:

Código:
Public Experiencia()

modPlayer

Troque a Function GetPlayerNextLevel por:

Código:
Function GetPlayerNextLevel(ByVal index As Long) As Long
    GetPlayerNextLevel = Experiencia(GetPlayerLevel(index))
End Function

Gerador de Experiência

Créditos

Ricardo por fazer o sistema, tutorial e postar
Thales12 por me dar a ideia de fazer


Última edição por Ricardo em Qua 15 Ago 2012, 19:58, editado 2 vez(es)
Ricardo
Ricardo


Mensagens : 1044

Ir para o topo Ir para baixo

Experiência por documento de texto Empty Re: Experiência por documento de texto

Mensagem por Eduardo Seg 07 maio 2012, 21:15

vlw +1
Eduardo
Eduardo
Membro Veterano
Membro Veterano

Mensagens : 1178

Ir para o topo Ir para baixo

Experiência por documento de texto Empty Re: Experiência por documento de texto

Mensagem por Valentine Ter 08 maio 2012, 09:42

Nossa, isso sim é muito bom, mas não precisa fazer nada no cliente não?

+ 1 crédito
avatar
Valentine
Membro de Honra
Membro de Honra

Mensagens : 472

http://www.aldeiarpgbr.com

Ir para o topo Ir para baixo

Experiência por documento de texto Empty Re: Experiência por documento de texto

Mensagem por Cris~ Ter 08 maio 2012, 12:30

Muito Bom Ricardo Muito Util
+ 1
Cris~
Cris~
Membro Veterano
Membro Veterano

Mensagens : 1574

Ir para o topo Ir para baixo

Experiência por documento de texto Empty Re: Experiência por documento de texto

Mensagem por Lucas Lôpo Ter 08 maio 2012, 13:17

Legal!
Lucas Lôpo
Lucas Lôpo
Membro Veterano
Membro Veterano

Mensagens : 833

Ir para o topo Ir para baixo

Experiência por documento de texto Empty Re: Experiência por documento de texto

Mensagem por Ricardo Ter 08 maio 2012, 20:48

Ricardo
Ricardo


Mensagens : 1044

Ir para o topo Ir para baixo

Experiência por documento de texto Empty Re: Experiência por documento de texto

Mensagem por lraniel Sáb 02 Jun 2012, 13:05

aqui dá overflow se eu usar o gerador 2^500-0
ou qualquer numero acima disso ai, explicando melhor sempre buga se eu botar exp alta
lraniel
lraniel
Membro
Membro

Mensagens : 240

Ir para o topo Ir para baixo

Experiência por documento de texto Empty Re: Experiência por documento de texto

Mensagem por Ricardo Sáb 02 Jun 2012, 15:39

lraniel escreveu:aqui dá overflow se eu usar o gerador 2^500-0
ou qualquer numero acima disso ai, explicando melhor sempre buga se eu botar exp alta

Claro, nada suporta algo muito grande ne .-.
Ricardo
Ricardo


Mensagens : 1044

Ir para o topo Ir para baixo

Experiência por documento de texto Empty Re: Experiência por documento de texto

Mensagem por MrMota Sáb 02 Jun 2012, 15:40

Bem legal.

Igual ao EE
MrMota
MrMota
Membro Veterano
Membro Veterano

Mensagens : 918

Ir para o topo Ir para baixo

Experiência por documento de texto Empty Re: Experiência por documento de texto

Mensagem por Conteúdo patrocinado


Conteúdo patrocinado


Ir para o topo Ir para baixo

Ir para o topo


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