Entrar
Criar Conta
Mensagens
Data de inscrição
LocalizaçãoEsplicação: Esse Sistema Serve para Teleportar um player para Um determinado Mapa "
Bom Vamos Lah !
Vai em Scripts,Principal Ou Main Abra e Procure Por:
Abaixo Adicione:
Simples E eficais
"
Bom Vamos Lah !
Vai em Scripts,Principal Ou Main Abra e Procure Por:
- 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 Adicione:
- Código:
If Lcase(Mid(TextSay, 1, 7)) = "/cidade" Then 'Aki o Comando Que sera Utilizado
'Call playsound(index, "magic12.wav")'
Call PlayerWarp(index, 3, 9, 13) Aki e Onde Você Coloka O mapa e Cordenadas de Onde O player Vai ir
Call PlayerMsg(index, "Voçê esta na cidade", 4) Aki Messagem que ira Aparecer para O Player
End If
Simples E eficais
"