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

Ranking de Resets (main.txt)

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

1Tutorial Ranking de Resets (main.txt) em Dom 29 Ago 2010, 11:30

breno


Membro
Membro
bom aqui estou eu com mais um tutorial meu ... vamos para de enrrolação e vamos logo...
primeiramente você tem que ter o comande de reset automatico ou manual mesmo ... vamos começa pelo automatico ...
1º baixe o arquivo.ini no fim do tutorial e adicione ele na pasta server vamos la para os codigos ...
a baixo do

Código:
Código:
  If GetPlayerLevel(index) => 1000 Then
        Call SetPlayerExp(index, 1)
          Call SetPlayerLevel(index, 1)
        Call PlayerMsg(index, "Você resetou com sucesso!", 15)
        Call SetPlayerPOINTS(index, GetPlayerPoints(index) + 3)
        Call SetPlayerResets(index, GetPlayerResets(index) + 1)
        Call SavePlayer(index)
              Call SendPOINTS(Index)
              Call SendStats(Index)
        End If



esse eh o reset automatico.... em baixo do "End If" você adicione ...

Código:
Código:
If GetPlayerResets(index) >= 1 Then
        Call PutVar("Ranking.ini", GetPlayerName(index), "Resets", GetPlayerResets(index))
        PutVar
    End If
    End Sub




o codigo inteiro ficara assim ...

Código:
Código:
Call BattleMsg(index, "Você tem " & GetPlayerPOINTS(index) & " pontos para serem gastos.", 9, 0)
    If GetPlayerLevel(index) => 1000 Then
        Call SetPlayerExp(index, 1)
          Call SetPlayerLevel(index, 1)
        Call PlayerMsg(index, "Você resetou com sucesso!", 15)
        Call SetPlayerPOINTS(index, GetPlayerPoints(index) + 3)
        Call SetPlayerResets(index, GetPlayerResets(index) + 1)
        Call SavePlayer(index)
              Call SendPOINTS(Index)
              Call SendStats(Index)
        End If
        If GetPlayerResets(index) >= 1 Then
        Call PutVar("Ranking.ini", GetPlayerName(index), "Resets", GetPlayerResets(index))
        PutVar
    End If
    End Sub




para quem não tem o sistema de resets automatico ou manual ai esta ...( copie o URL e bota na barra de espaço no seu navegador )

Código:
Código:
 http://universogamesmmo.forumeiros.com/tutorial-f4/reset-automatico-maintxt-t16.htm#33




você presisa do Sistema de resets pelo VB ...

Código:
Código:
http://universogamesmmo.forumeiros.com/tutorial-f4/adaptar-o-reset-no-seu-jogo-t17.htm#34




arquivo bara download ...

Código:
Código:
 http://rapidshare.com/files/405533527/Ranking.ini




explicando ...
quando você reseta , o reset vai mandado para o ranking.ini que estara com o nome e resets exemplo

Código:
Código:
 [breno]
    Resets = 1


Creditos a Breno

2Tutorial Re: Ranking de Resets (main.txt) em Dom 29 Ago 2010, 15:52

Luucas Robeerto


Fundador
Fundador
Otimo!!!

1+ CRED
Laughing

http://universogamesmmo.forumeiros.com

3Tutorial Re: Ranking de Resets (main.txt) em Seg 15 Nov 2010, 11:12

Luucas Robeerto


Fundador
Fundador
Topico Trancado e Movido a Lixeira


_______________________________________________________________________________________________________


Spoiler:




lol!
http://universogamesmmo.forumeiros.com

Conteúdo patrocinado


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