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...

[Tutorial] /Mudarnome ~ HelioJunior

3 participantes

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

Ir para baixo

[Tutorial] /Mudarnome ~ HelioJunior Empty [Tutorial] /Mudarnome ~ HelioJunior

Mensagem por junior250374 Sáb 23 Nov 2013, 21:13

Eae Pessoal sou HelioJunior e com esse tutorial espero que ajudem vc ^.^ .

Primeiramente vcs irao abrir Main.Txt em seguida procure

Código:
Sub Commands(index)
On Error Resume Next
Dim Portal
Dim mapnum
Dim x
Dim y
Dim i
Dim TextSay
Dim n
Dim m
Dim C    
m = GetVar("Dados.ini", "MAX", "MAX_MAPS")
TextSay = GetVar("Scripts\Comandos.ini", "TEMP", "Text" & index)
Abaixo pule 1 linha e coloque

Código:
'Mudar o Nome'
If LCase(Mid(TextSay, 1, 10)) = "/mudarnome" Then
If Len(TextSay) > 11 Then
If GetPlayerAccess(index) <= 3 Then
Call PlayerMsg(index, "Você nao tem Acesso para usar este comando", 4)
Exit Sub
End If 
n = Mid(TextSay, 11, Len(TextSay) - 10)
If n <> "" Then
Call SetPlayerName(index, n)
Call PlayerMsg(index, "Nome alterado para:" & n, 0)
Call SendPlayerData(index)
Call SendOnlineList
Else
Call PlayerMsg(index, "Por favor, digite um nome.", 15)
End If
End If
Exit Sub
End If
Bom é isso ai simples, facil e rapido Espero ter ajudado ^^

~HelioJunior

+1 Credito
avatar
junior250374
Novato
Novato

Mensagens : 18

Ir para o topo Ir para baixo

[Tutorial] /Mudarnome ~ HelioJunior Empty Re: [Tutorial] /Mudarnome ~ HelioJunior

Mensagem por Frozen Dom 24 Nov 2013, 05:38

Parece que já vi este tutorial por aqui.
uma coisa bem peculiar,
Maioria dos jogos os acesso são.
2 Vip 3 Vip 2.
Então se botar está script do modo que está , vip 2 poderia mudar o nome a quaisquer hora.

Aconselharia quem for usa muda para:
Código:
If GetPlayerAccess(index) <= 5 Then
Bjokas no bumbum.
Frozen
Frozen
Membro Veterano
Membro Veterano

Mensagens : 1339

Ir para o topo Ir para baixo

[Tutorial] /Mudarnome ~ HelioJunior Empty Re: [Tutorial] /Mudarnome ~ HelioJunior

Mensagem por -DarkninoxD- Seg 25 Nov 2013, 08:52

Errado Falkner. 99,999% dos jogos usam Vip 1 e Vip 2. Nas quais Free seria Acesso 0, Vip Acesso 1 e SuperVip Acesso 2.
Então no caso lá se for menor ou igual a 3 avisa que não tem permissão. Então está certo, acima de acesso 4"Mapper/GM" que consegue utilizar o comando.
OBS: Este comando já vem incluso na EEB.
Atenciosamente
Equipe MMORPGBR
-DarkninoxD-
-DarkninoxD-
Membro Vitalicio
Membro Vitalicio

Mensagens : 734

http://dragonball-mrb.blogspot.com

Ir para o topo Ir para baixo

[Tutorial] /Mudarnome ~ HelioJunior Empty Re: [Tutorial] /Mudarnome ~ HelioJunior

Mensagem por Frozen Ter 26 Nov 2013, 12:24

'-' ?
Nada haver u.u
Estava testando uma Elysium , daqui do fórum e veio assim
ai pensei que todas era assim como não uso EEB
então postei.
Frozen
Frozen
Membro Veterano
Membro Veterano

Mensagens : 1339

Ir para o topo Ir para baixo

[Tutorial] /Mudarnome ~ HelioJunior Empty Re: [Tutorial] /Mudarnome ~ HelioJunior

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