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.

Multiplayer Online Role Playing Game Massively Brasil - Suporte e Recursos para desenvolvedores de MMORPGs

O fórum está definitivamente fechado, obrigado a todos que participaram do que um dia foi a MMORPG Brasil!
Atenciosamente Lendário...

[ALL] Verificando se tem evento por /evento .

5 participantes

MMORPG Brasil :: OPEN SOURCE ENGINES :: Outras Engines :: Elysium :: Tutoriais

Ir para baixo

[ALL] Verificando se tem evento por /evento . Empty [ALL] Verificando se tem evento por /evento .

Mensagem por montevechi Seg 20 Ago 2012, 14:28

Requerimentos para por:
Script>Principal ou Main
Computador (avá)

Procure por:

Código:
TextSay = GetVar("Scripts\Comandos.ini", "TEMP", "Text" & index)

Abaixo Adicione:

Código:
If Lcase(Mid(TextSay, 1, 7)) = "/evento" then
    If GetPlayerLevel(index) => 1 Then 
    Call PlayerMsg(Index, "Eventos:Por Enquanto nenhum.", 14) 
    End If
    Exit Sub

Explicando o codigo:

Código:
If Lcase(Mid(TextSay, 1, 7)) = "/evento" then ' o comando que dara para mostrar os eventos.
    If GetPlayerLevel(index) => 1 Then  ' Não mecha.
    Call PlayerMsg(Index, "Eventos:Por Enquanto nenhum.", 14)  ' Mensagem ao dar /evento.
    End If ' Não mecha.
    Exit Sub ' Não mecha.

Simples e facil

Não sei se ja fiseram portanto tirei do meu script.

~~Creditos a mim~~
montevechi
montevechi
Membro
Membro

Mensagens : 236

http://www.dbz-caos.blogspot.com

Ir para o topo Ir para baixo

[ALL] Verificando se tem evento por /evento . Empty Re: [ALL] Verificando se tem evento por /evento .

Mensagem por rpgtiberian Seg 20 Ago 2012, 14:30

Não uso elysium, mas parece que funfa, vou dar +1 cred, quando tiver tempo baixo o elysium e vejo se funfa.
rpgtiberian
rpgtiberian
Membro Junior
Membro Junior

Mensagens : 93

Ir para o topo Ir para baixo

[ALL] Verificando se tem evento por /evento . Empty Re: [ALL] Verificando se tem evento por /evento .

Mensagem por Kooringa Ter 21 Ago 2012, 07:03

+1, vo testa aqui Very Happy
Kooringa
Kooringa
Banido
Banido

Mensagens : 1361

Ir para o topo Ir para baixo

[ALL] Verificando se tem evento por /evento . Empty Re: [ALL] Verificando se tem evento por /evento .

Mensagem por montevechi Ter 21 Ago 2012, 20:55

Obrigado' logo postarei mais.
montevechi
montevechi
Membro
Membro

Mensagens : 236

http://www.dbz-caos.blogspot.com

Ir para o topo Ir para baixo

[ALL] Verificando se tem evento por /evento . Empty Re: [ALL] Verificando se tem evento por /evento .

Mensagem por Raiden Ter 21 Ago 2012, 22:02

irei testar em breve, obrigado por compartilhar e ainda mais pela iniciativa. +1
Raiden
Raiden
Membro Veterano
Membro Veterano

Mensagens : 906

Ir para o topo Ir para baixo

[ALL] Verificando se tem evento por /evento . Empty Re: [ALL] Verificando se tem evento por /evento .

Mensagem por M.Dutra Qua 22 Ago 2012, 08:58

Está faltando um End If nesse código
Código:
If Lcase(Mid(TextSay, 1, 7)) = "/evento" then
    If GetPlayerLevel(index) => 1 Then 
    Call PlayerMsg(Index, "Eventos:Por Enquanto nenhum.", 14) 
    End If
    Exit Sub

Você abriu 2 Ifs e só fechou 1... o certo seria

Código:
If Lcase(Mid(TextSay, 1, 7)) = "/evento" then
    If GetPlayerLevel(index) => 1 Then 
    Call PlayerMsg(Index, "Eventos: Não há eventos ativos.", 14) 
    End If
    Exit Sub
    End If

e Mais uma coisa para que uma verificação de level? Pensa comigo aqui ele sempre vai ser level = ou Maior que 1 filho ele já começa no Level 1 então para que uma verificação boba assim? O código ficaria melhor assim..

Código:
If Lcase(Mid(TextSay, 1, 7)) = "/evento" then 
    Call PlayerMsg(Index, "Eventos: Não há eventos ativos.", 14) 
    Exit Sub
End If

Atenciosamente, M.Dutra
M.Dutra
M.Dutra
Membro Junior
Membro Junior

Mensagens : 94

Ir para o topo Ir para baixo

[ALL] Verificando se tem evento por /evento . Empty Re: [ALL] Verificando se tem evento por /evento .

Mensagem por montevechi Qua 22 Ago 2012, 12:59

Mano sou novo , calma mas funciona aqui de qualque jeito .
montevechi
montevechi
Membro
Membro

Mensagens : 236

http://www.dbz-caos.blogspot.com

Ir para o topo Ir para baixo

[ALL] Verificando se tem evento por /evento . Empty Re: [ALL] Verificando se tem evento por /evento .

Mensagem por Kooringa Qua 22 Ago 2012, 19:18

eh, botei esse e estrago com meu server né montevechi...
Kooringa
Kooringa
Banido
Banido

Mensagens : 1361

Ir para o topo Ir para baixo

[ALL] Verificando se tem evento por /evento . Empty Re: [ALL] Verificando se tem evento por /evento .

Mensagem por montevechi Qui 23 Ago 2012, 11:32

Aqui funcionou voces que nao sabe po direito se quise add msn que mando print do script e de quando eu entro -.-'
montevechi
montevechi
Membro
Membro

Mensagens : 236

http://www.dbz-caos.blogspot.com

Ir para o topo Ir para baixo

[ALL] Verificando se tem evento por /evento . Empty Re: [ALL] Verificando se tem evento por /evento .

Mensagem por Conteúdo patrocinado


Conteúdo patrocinado


Ir para o topo Ir para baixo

Ir para o topo

- Tópicos semelhantes

MMORPG Brasil :: OPEN SOURCE ENGINES :: Outras Engines :: Elysium :: Tutoriais

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