Universo Games
Ola , Convidado



Você ainda não e cadastrado então cadastre-se e veja todas as atualizações no mundo rpg!!!

Sistema De Reset Para Elysium Engine Brasil ,Tambem Serve Em Elysium Engine Diamond

Ir em baixo

Tutorial Sistema De Reset Para Elysium Engine Brasil ,Tambem Serve Em Elysium Engine Diamond

Mensagem por athos100 em Seg 11 Nov 2013, 12:29

Va na Pasta Do Serve e Abra Scripts Depois va em Principal Abra e Procure Por 

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

Entre   



 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    

E

Sub UsingStatPoints(index, PointType, PointQuant)
Select Case PointType
    Case 0
    'Gives you a set max
        If GetPlayerSTR(index) + PointQuant > 100000 Then
           Call BattleMsg(index, "Você chegou ao máximo de Força!", 12, 0)
           Exit Sub
        End If
 
No Meio Dos Dois Coloke

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


  E Depois E so Salvar e Pronto

Mas 1 Credito ai Galera

Se Quizer Mas turitorias e So Pedi Pelos Comentarios Vlw
avatar
athos100

Mensagens : 27

Voltar ao Topo Ir em baixo

Voltar ao Topo

- Tópicos similares

 
Permissão deste fórum:
Você não pode responder aos tópicos neste fórum