[Script] Teletransporte por /comando

SynysterGates

SynysterGates

Membro - Novato

Troféus :

[Script] Teletransporte por /comando Ouro10

:0

[Script] Teletransporte por /comando Trophy11

:0

[Script] Teletransporte por /comando Trophy12

:0
Mensagens : 16
AP's

AP's : 33

Respeito : 5

Esse comando serve para você chegar + Rapido em Uma Cidade, local e etc..

1°. Va em Servidor -> Scripts -> Principal.txt.

Procure Por:

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

Abaixo Adicione:

Código:: If Lcase(Trim(TextSay)) = "/" Then Call PlayerMsg(index,"Mensagem aqui", 14) If GetPlayerAccess(Index) => 0 Then Call PlayerWarp(index, Map, X, Y) Exit Sub End If End If

Explicando:

Código:: If Lcase(Trim(TextSay)) = "/" Then

Você coloca o Comando para ir no lugar que você queira!

Código:: Call PlayerMsg(index,"Mensagem aqui", 14)

Aonde Tem, "Mensagem aqui" você coloca a mensagem que aparece quando o player vai para o lugar!

Código:: If GetPlayerAccess(Index) => 0 Then

Pega o Acesso que o Player precisa para se Teletransportar, caso você queira que ele tenha que ter acesso 1 para ir no lugar, mude para:

Código:: If GetPlayerAccess(Index) => 1 Then

Código:: Call PlayerWarp(index, Map, X, Y)

Aqui Serve para Setar o Mapa em que o Player irá quando se Teleportar!
No Lugar do "Map" você coloca o Número do Mapa em que o Player irá sem Aspas, no lugar do "X" você coloca as coordenadas X em que o Player irá, mesma coisa no "Y".

Exemplo:

Código:: If Lcase(Trim(TextSay)) = "/ct" Then Call PlayerMsg(index,"Você está no Centro de Treinamento, Bom Up!", 14) If GetPlayerAccess(Index) => 0 Then Call PlayerWarp(index, 48, 10, 12) Exit Sub End If End If

Créditos ~
Eu por Postar, e Explicar Tudo Certinho
mmorpgbr, por Disponibilizar

1 [Script] Teletransporte por /comando Ter 02 Out 2012, 19:51

SynysterGates