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.

Script de Reset

3 participantes

Ir para baixo

Script de Reset Empty Script de Reset

Mensagem por dbzaero Dom 05 Dez 2010, 16:06

Pessoal, tenho o comando /reset no meu server.
Gostaria que alguem me explicasse como fazer um SC pra que, quando o cara passasse por cima, sendo nivel 99, ele resetasse ( como se nesse momento ele digitasse /reset ) .


Alguem pode ajudar?
Dou cred. Uso o Elysium Brasil 2.6


Abração !
dbzaero
dbzaero
Membro Junior
Membro Junior

Mensagens : 57

Ir para o topo Ir para baixo

Script de Reset Empty Re: Script de Reset

Mensagem por Gu1lh3rm3 Dom 05 Dez 2010, 16:31

reset automatico?
Gu1lh3rm3
Gu1lh3rm3
Membro de Honra
Membro de Honra

Mensagens : 1232

http://www.extremedbz.eu5.org

Ir para o topo Ir para baixo

Script de Reset Empty Re: Script de Reset

Mensagem por Lucas Roberto Dom 05 Dez 2010, 16:32

ae bem simples


procure no principal

Código:
Sub PlayerLevelUp(index)
Dim I   
Dim D
Dim C
   
    C = 0
    Do While GetPlayerExp(index) => GetPlayerNextLevel(index)   
        D = GetPlayerExp(index) - GetPlayerNextLevel(index)
        Call SetPlayerLevel(index, GetPlayerLevel(index) + 1)
        I = Int(GetPlayerSPEED(index) / 10)
        If I > 1 Then I = 1
        If I < 2 Then I = 2
           
If GetPlayerAccess(index) < 1 Then 
        Call SetPlayerPOINTS(Index, GetPlayerPOINTS(Index) + 3)
        Else
        Call SetPlayerPOINTS(Index, GetPlayerPOINTS(Index) + 5)
        End If
        Call SetPlayerExp(index, D)     
        C = C + 1
    Loop
    If C > 1 Then
        'Call GlobalMsg(GetPlayerName(index) & " ganhou " & C & " níveis!", 6)
    Else
        'Call GlobalMsg(GetPlayerName(index) & " ganhou um nível!", 6)     
    End If   
    Call BattleMsg(index, "Você tem " & GetPlayerPOINTS(index) & " pontos para gastar.", 9, 0)


abaixo adicone

Código:
If GetPlayerLevel(index) => 1000 Then
    Call GlobalMsg(GetPlayerName(index) & " resetou com sucesso!", 15)
    Call SetPlayerExp(index, 1) 
      Call SetPlayerLevel(index, 1)
    Call SetPlayerPOINTS(index, GetPlayerPoints(index) + 110)
    Call SetPlayerResets(index, GetPlayerResets(index) + 1)
    Call SavePlayer(index)
          Call SendPOINTS(Index)
          Call SendStats(Index)
    End If
Lucas Roberto
Lucas Roberto
Membro Veterano
Membro Veterano

Mensagens : 1794

http://universogamesmmo.forumeiros.com/forum

Ir para o topo Ir para baixo

Script de Reset Empty Re: Script de Reset

Mensagem por dbzaero Dom 05 Dez 2010, 16:36

Não, é tipo.


O cara pegou nivel 99.
Ai agora, pra ele resetar, ele tem que ir na cidade fazer isso.
E na cidade, vai ter em algum lugar, um SC que ao ele passar por cima, sendo ele 99, ele reseta. Tendeu ?
dbzaero
dbzaero
Membro Junior
Membro Junior

Mensagens : 57

Ir para o topo Ir para baixo

Script de Reset Empty Re: Script de Reset

Mensagem por Gu1lh3rm3 Dom 05 Dez 2010, 16:44

bom nao testei ... to nervoso por qualsa do Timao ... mais tenta ae...

na
Código:
Sub ScriptedTile(index, Script)
Select Case Script

adicione o seguinte codigo

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

lenbre-se de adicionar o Codigo em cima do

Código:
End Select
    End sub

e mude o Case X, mude o X para o numero da Case desejada!
Gu1lh3rm3
Gu1lh3rm3
Membro de Honra
Membro de Honra

Mensagens : 1232

http://www.extremedbz.eu5.org

Ir para o topo Ir para baixo

Script de Reset Empty Re: Script de Reset

Mensagem por dbzaero Dom 05 Dez 2010, 20:04

Certo , vou testar Guilherme, abração velho.
dbzaero
dbzaero
Membro Junior
Membro Junior

Mensagens : 57

Ir para o topo Ir para baixo

Script de Reset Empty Re: Script de Reset

Mensagem por Gu1lh3rm3 Seg 06 Dez 2010, 04:04

nada... se nao funfa nois tenta de novo :S

Off: Corinthias Script de Reset 539285Script de Reset 539285Script de Reset 539285Script de Reset 539285Script de Reset 539285Script de Reset 539285

_____EDIT_____

Funfo ^^ ... eu testei aqui!!!
Gu1lh3rm3
Gu1lh3rm3
Membro de Honra
Membro de Honra

Mensagens : 1232

http://www.extremedbz.eu5.org

Ir para o topo Ir para baixo

Script de Reset Empty Re: Script de Reset

Mensagem por Gu1lh3rm3 Ter 07 Dez 2010, 13:36

Dúvida/Pedido/Problema Resolvido com sucesso.
Se houver algo mais por favor pedimos que efetue a criação de um novo tópico na área de Suporte para resolução.

Topico Trancado e Movido

Atenciosamente Equipe MMORPGBR.
Gu1lh3rm3
Gu1lh3rm3
Membro de Honra
Membro de Honra

Mensagens : 1232

http://www.extremedbz.eu5.org

Ir para o topo Ir para baixo

Script de Reset Empty Re: Script de Reset

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