Life RPG Maker 2.0
Bem vindo a LRM, forum de ajuda Maker
Registre-se em nosso forum e aproveite Very Happy
esperamos que você seja ajudado e esperamos que nos ajude Very Happy

Participe do fórum, é rápido e fácil

Life RPG Maker 2.0
Bem vindo a LRM, forum de ajuda Maker
Registre-se em nosso forum e aproveite Very Happy
esperamos que você seja ajudado e esperamos que nos ajude Very Happy
Life RPG Maker 2.0
Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.
Life RPG Maker 2.0

2ª versão do forum life rpg maker

Os membros mais ativos do mês
Nenhum usuário

Últimos assuntos
» Kingdon 1.6
Evento Exp EmptyTer Jun 09, 2015 3:02 pm por MasterKill

» Tempo dinâmico e Hora do Sistema
Evento Exp EmptySeg Dez 09, 2013 5:42 pm por jonathas

» Sistema de Natação
Evento Exp EmptySáb Dez 07, 2013 5:14 pm por jonathas

» Classificar Inventario
Evento Exp EmptySáb Dez 07, 2013 12:07 pm por Samuka_Adm

» VOLTEI ALELUIA :D
Evento Exp EmptySáb Dez 07, 2013 10:35 am por Samuka_Adm

» Netplay Master v4.0.7
Evento Exp EmptyQua Jun 26, 2013 1:32 pm por xdario

» The League Of War [Season 1]
Evento Exp EmptySex Jan 18, 2013 6:02 pm por Warrior

» Meu primeiro desenho que posto :D
Evento Exp EmptyQua Jan 09, 2013 1:37 pm por PedroMatoso

» Window Configurações
Evento Exp EmptyQua Jan 09, 2013 1:36 pm por PedroMatoso

Parceiros
Fórum grátis

Fórum grátis


Mundo RPG Maker
MMORPG BRASIL

Você não está conectado. Conecte-se ou registre-se

Evento Exp

Ir para baixo  Mensagem [Página 1 de 1]

1Evento Exp Empty Evento Exp Seg Nov 19, 2012 1:51 pm

Samuka_Adm

Samuka_Adm
Admin
Admin

Bom .. Cabei de fazer o 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 " & 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 ! Smile
Samuka_Maker por postar na LRM

https://liferpgmakerv2.forumeiros.com

Ir para o topo  Mensagem [Página 1 de 1]

Tópicos semelhantes

-

» [Evento]Melhor Roteiro LRM

Permissões neste sub-fórum
Não podes responder a tópicos