Problema com um script

por Silver!e.e Seg 12 Jul 2010, 20:39

Gente, tava vendo um script, e ai tava assim:

Case 1
If GetPlayerLevel(Index) > 49 Then
Call PlayerWarp(Index, 20, 30, 40)
Call PlayerMsg(Index, "FOI TELEPORTADO", 5)
Else
End If
End Select
End Sub

Consegui, só que queria mais de 1, pra transporta pra um lugar diferente, por exemplo:

Case 2
If GetPlayerLevel(Index) > 49 Then
Call PlayerWarp(Index, 20, 30, 41)
Call PlayerMsg(Index, "FOI TELEPORTADO", 5)
Else
Call PlayerMsg(Index, "PRECISA TER LEVEL 50", 5)
End If
End Select
End Sub

Só que ai não consigo, da pra coloca mais de um desses? Vlw se responderem Very Happy

por St4rk Seg 12 Jul 2010, 21:18

Código:: Case 2 If GetPlayerLevel(Index) >= [color=red]51[/color] Then Call PlayerWarp(Index[color=blue], 20, 30, 41[/color]) Call PlayerMsg(Index, "FOI TELEPORTADO", 5) Else Call PlayerMsg(Index, "PRECISA TER LEVEL 50", 5) End If End Select End Sub

Vermelho = Level
Azul = Cordenadas(X/Y e mapa)
Modifique isso que o personagem ir pra serto local, depende de como você vai fazer.

Outros exemplo de comandos que pode utilizar:
= 51(Se o player tiver esse level ele teleporta)
> 51( se for maior que 51 ele teleporta)
>=51(Se for maior ou igual ele teleporta)
<=51(Se for menor ou igual ele teleporta)
< 51(se for menor que 51 ele teleporta)

Espero ajudar, explica melhor que vou te dar ajuda.

por Silver!e.e Seg 12 Jul 2010, 21:36

Vo tenta, se der +1 de cred Very Happy

EDIT: Eu coloquei assim, vê se ta certo:

' Executes when a player steps onto a scripted tile.
Sub ScriptedTile(Index, Script)
Select Case Script
Case 0
Call PlayerMsg(Index, "This scripted tile has no apparent use.", WHITE)
Exit Sub

Case 1
If GetPlayerLevel(Index) >= 50 Then
Call PlayerWarp(Index, 20, 30, 40)
Call PlayerMsg(Index, "FOI TELEPORTADO", 5)
Else
Call PlayerMsg(Index, "PRECISA TER LEVEL 50", 5)
End If
End Select
End Sub

Case 2
If GetPlayerLevel(Index) >= 50 Then
Call PlayerWarp(Index, 20, 30, 41)
Call PlayerMsg(Index, "FOI TELEPORTADO", 5)
Else
Call PlayerMsg(Index, "PRECISA TER LEVEL 50", 5)
End If
End Select
End Sub

Case Else
Call PlayerMsg(Index, "No tile script found. Please contact an admin to solve this problem.", WHITE)
Exit Sub
End Select
End Sub

E ai q q tem de errado, , tipo espaços ou u q?

por DshFox Seg 12 Jul 2010, 22:44

tu n pode fexa o end select no meio das cases mto menos end sub

fica assim

Código:: ' Executes when a player steps onto a scripted tile. Sub ScriptedTile(Index, Script) Select Case Script Case 0 Call PlayerMsg(Index, "This scripted tile has no apparent use.", WHITE) Exit Sub Case 1 If GetPlayerLevel(Index) >= 50 Then Call PlayerWarp(Index, 20, 30, 40) Call PlayerMsg(Index, "FOI TELEPORTADO", 5) Else Call PlayerMsg(Index, "PRECISA TER LEVEL 50", 5) End If exit sub Case 2 If GetPlayerLevel(Index) >= 50 Then Call PlayerWarp(Index, 20, 30, 41) Call PlayerMsg(Index, "FOI TELEPORTADO", 5) Else Call PlayerMsg(Index, "PRECISA TER LEVEL 50", 5) End If exit sub Case Else Call PlayerMsg(Index, "No tile script found. Please contact an admin to solve this problem.", WHITE) Exit Sub End Select End Sub

por Silver!e.e Ter 13 Jul 2010, 11:01

Thank you, vo testa se der certo +1 de cred Very Happy

EDIT: Fico assim ó:

' Executes when a player steps onto a scripted tile.
Sub ScriptedTile(Index, Script)
Select Case Script
Case 0
Call PlayerMsg(Index, "This scripted tile has no apparent use.", WHITE)
Exit Sub

Case 1
If GetPlayerLevel(Index) > 49 Then
Call PlayerWarp(Index, 20, 30, 40)
Call PlayerMsg(Index, "TELEPORTOU-SE", 5)
Else
Call PlayerMsg(Index, "VOCÊ PRECISA TER NO MÍNIMO LEVEL 50", 5)
End If
Exit Sub

Case 2
If GetPlayerLevel(Index) > 49 Then
Call PlayerWarp(Index, 20, 30, 41)
Call PlayerMsg(Index, "TELEPORTOU-SE", 5)
Else
Call PlayerMsg(Index, "VOCÊ PRECISA TER NO MÍNIMO LEVEL 50", 5)
End If
Exit Sub

Case Else
Call PlayerMsg(Index, "No tile script found. Please contact an admin to solve this problem.", WHITE)
Exit Sub
End Select
End Sub

Ta certo? pq aki n deu denovo...

EDIT2: FUNFOOOOOOOOOOOOOOOOOOOOOOOOOOOOOO +1 de cred!

por Conteúdo patrocinado

Problema com um script

Problema com um script

Re: Problema com um script

Re: Problema com um script

Re: Problema com um script

Re: Problema com um script

Re: Problema com um script