Bem vindo visitante.
Caso ainda não tenha uma conta,pedimos para que crie uma,assim você terá acesso a todos os links e imagens disponíveis no fórum.

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

[SCRIPT] Mudar o nome por comando.

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

1Normal [SCRIPT] Mudar o nome por comando. em Dom Fev 19, 2012 10:09 pm

AtlaS

avatar
Iniciante
Iniciante
Procure no Principal ou Main:

Código:
Sub Commands(index)On Error Resume NextDim PortalDim mapnumDim xDim yDim iDim TextSayDim nDim mDim C m = GetVar("Dados.ini", "MAX", "MAX_MAPS")TextSay = GetVar("Scripts\Comandos.ini", "TEMP", "Text" & index)

e adicione no lugar q achar melhor :

Código:
If LCase(Mid(TextSay, 1, 10)) = "/mudarnome" ThenIf Len(TextSay) > 11 ThenIf GetPlayerAccess(index) < 1 ThenCall PlayerMsg(index, "Você não tem acesso o suficiente para usar este comando!!", 4)Exit SubEnd Ifn = Mid(TextSay, 11, Len(TextSay) - 10)If n <> "" ThenCall SetPlayerName(index, n)Call PlayerMsg(index, "Nome alterado para:" & n, 0)Call SendPlayerData(index)Call SendOnlineListElseCall PlayerMsg(index, "Please type a name.", 15)End IfEnd IfExit SubEnd If

OBS:
Código:
If GetPlayerAccess(index) < 1 Then é o acesso q precisa para poder usar o comando.

Créditos: GamesPower.
Créditos: Thales12.

Ver perfil do usuário

2Normal Re: [SCRIPT] Mudar o nome por comando. em Ter Fev 21, 2012 1:14 pm

wyvern670

avatar
Iniciante
Iniciante
Bons scripts! pena que nao tem pra EO :/

Ver perfil do usuário

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