Início
Bom .. Cabei de fazer o EventoXp e to postando aki ! 
Abra o Server~Side va na frmServer na aba Control crie 1 txtbox com :
de 2 clicks e adicione:
volte a frmServer e do lado da txt crie 1 commandButton com :
de 2 clicks nele e adicione:
na modCombat na Sub PlayerAttackNPC procure por:
e em cima adicione:
na modCombat na Sub PlayerAttackPlayer procure por:
em cima adicione:
Créditos: Thales12 por fazer o sistema, tutorial e postar !
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 " & txtEventoEXP.Text & " x Ativado!", 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 !
