porfavor alguem tem um comando

por jonaxs Sex 15 Abr 2011, 07:40

porfavor alguem pode passar um codigo de comacdo /cidade

por juan415 Sex 15 Abr 2011, 09:30

bom eu sei aki deu certo espero que ai de tambem
Bom primeiro 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)

Embaixo disso coloque isso

Código:: ' Comando para a Cidade principal If Lcase(Mid(TextSay, 1, 7)) = "/cidade" then 'Comando usado If GetPlayerLevel(index) => 0 Then 'Player de Lvl igual a 0 e superior podem usar;vc pode por o lvl que queira desde q nao prejudique o servidor Call playsound(index, "magic12.wav")'som q aparece quando usado o Comando Call PlayerWarp(Index, 5, 6, 6) ' Mapa, X, Y' Call PlayerMsg(Index, "Voce Foi teleportado para(cidade)", 14)'a msm q aparecera Else Call PlayerMsg(Index, "Não Tem lvl nescessario para se Mover,.", 14) 'se nao tiver o lvl necessário ja sabe hehehe End If Exit Sub End If

senao fucionar avisa ou tira o a ultima coisa que e o end if

Re: porfavor alguem tem um comando