Server>Scripts>Principal/Main.txt
Para procurar aperta CTRL + F
Primeiramente procure por:
De um enter e coloque isso
Agora vamos editar isso de uma vez!
Para procurar aperta CTRL + F
Primeiramente 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)
De um enter e coloque isso
- Código:
If Lcase(Mid(TextSay, 1, 7)) = "/[b]cidade[/b]" Then
Call playsound(index, "magic12.wav")'
Call PlayerWarp(index, 3, 9, 13)
Call PlayerMsg(index, "Voçê esta na [b]cidade[/b]", 4)
End If
Agora vamos editar isso de uma vez!
- Código:
If Lcase(Mid(TextSay, 1, 7)) = "/[b]cidade[/b]" Then (comando q sera digitado)
Call playsound(index, "magic12.wav")' (Som, aconselho n alterar)
Call PlayerWarp(index, 3, 9, 13) (mapa,x,y)
Call PlayerMsg(index, "Voçê esta na [b]cidade[/b]", 4) (Texto que aparecerar quando vc for para o local)
End If
Última edição por xxstyllexx em Dom Set 18, 2011 11:22 am, editado 3 vez(es)