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

Evento EXP

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

1Tutorial Evento EXP em Qui 29 Set 2011, 09:52

Thales12


Membro
Membro
Meu Sistema EventoXp e to postando aki ! Smile

Abra o Server~Side va na frmServer na aba Control crie 1 txtbox com :

Name: txtEventoEXP
Caption: 0

de 2 clicks e adicione:

Código:
If Not IsNumeric(txtEventoEXP.Text) Then
  txtEventoEXP.Text = "0"
End If

volte a frmServer e do lado da txt crie 1 commandButton com :

Caption: Começar

de 2 clicks nele e adicione:

Código:
On Error Resume Next
GlobalMsg "Evento Ativo!! Agora você ganha " & txtEventoEXP.Text & " vezes mais de EXP!Aproveite.", BrightCyan

na modCombat na Sub PlayerAttackNPC procure por:

Código:
 ' Make sure we dont get less then 0
        If Exp < 0 Then
            Exp = 1
        End If

e em cima adicione:

Código:
If Not frmServer.txtEventoEXP.Text = 0 Then
          exp = exp * frmServer.txtEventoEXP.Text
        End If

na modCombat na Sub PlayerAttackPlayer procure por:

Código:
' Make sure we dont get less then 0
        If exp < 0 Then
            exp = 0
        End If

em cima adicione:

Código:
If Not frmServer.txtEventoEXP.Text = 0 Then
          exp = exp * frmServer.txtEventoEXP.Text
        End If

Créditos: Thales12 por fazer o sistema, tutorial e postar ! Smile

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