Ajuda no comando /normal

por Éden Rodrigues Sex 12 Nov 2010, 09:07

Queria uma ajuda de comando /normal...

Por exemplo, coloquei esse tipo de trans no meu server, ai queria digitar/goku pra ele voltar aos status dele normal..
Como fazer o /normal, fazendo com que ele volte ao status que ele tava antes de se transformar ?

If LCase(Trim(TextSay)) = "/gokussj" Then
If GetPlayerClass(index) = 1 Then
If GetPlayerLevel(index) => 20 Then
If GetPlayerAccess(index) => 0 Then
If GetPlayerSprite(index) = 1 Then
Call SetPlayerSprite(index, 35)
Call SetPlayerSTR(Index, GetPlayerSTR(Index) + 5)
Call SetPlayerDEF(Index, GetPlayerDEF(Index) + 5)
Call PlayerMsg(index, "Você se tornou um SSJ!", 4)
Call PlayerWarp(index, GetPlayerMap(index), GetPlayerX(index), GetPlayerY(index), False)
Exit Sub
End If
End If
End If
End If
End If

If LCase(Trim(TextSay)) = "/gokussj3" Then
If GetPlayerClass(index) = 1 Then
If GetPlayerLevel(index) => 60 Then
If GetPlayerAccess(index) => 0 Then
If GetPlayerSprite(index) = 35 Then
Call SetPlayerSprite(index, ,36)
Call SetPlayerSTR(Index, GetPlayerSTR(Index) + 30)
Call SetPlayerDEF(Index, GetPlayerDEF(Index) + 30)
Call PlayerMsg(index, "Você se tornou um SSJ3!", 4)
Call PlayerWarp(index, GetPlayerMap(index), GetPlayerX(index), GetPlayerY(index), False)
Exit Sub
End If
End If
End If
End If
End If

If LCase(Trim(TextSay)) = "/gokuozaru" Then
If GetPlayerClass(index) = 1 Then
If GetPlayerLevel(index) => 90 Then
If GetPlayerAccess(index) => 1 Then
If GetPlayerSprite(index) = 299 Then
Call SetPlayerSprite(index, 36)
Call SetPlayerSTR(Index, GetPlayerSTR(Index) + 50)
Call SetPlayerDEF(Index, GetPlayerDEF(Index) + 50)
Call PlayerMsg(index, "Você se tornou um SSJ4!", 4)
Call PlayerWarp(index, GetPlayerMap(index), GetPlayerX(index), GetPlayerY(index), False)
Exit Sub
End If
End If
End If
End If
End If

If LCase(Trim(TextSay)) = "/gokussj4" Then
If GetPlayerClass(index) = 1 Then
If GetPlayerLevel(index) => 99 Then
If GetPlayerAccess(index) => 1 Then
If GetPlayerSprite(index) = 299 Then
Call SetPlayerSprite(index, 36)
Call SetPlayerSTR(Index, GetPlayerSTR(Index) + 70)
Call SetPlayerDEF(Index, GetPlayerDEF(Index) + 70)
Call PlayerMsg(index, "Você se tornou um SSJ4!", 4)
Call PlayerWarp(index, GetPlayerMap(index), GetPlayerX(index), GetPlayerY(index), False)
Exit Sub
End If
End If
End If
End If
End If

por andreikun Sáb 13 Nov 2010, 12:07

Éden Rodrigues escreveu:Queria uma ajuda de comando /normal...

Por exemplo, coloquei esse tipo de trans no meu server, ai queria digitar/goku pra ele voltar aos status dele normal..
Como fazer o /normal, fazendo com que ele volte ao status que ele tava antes de se transformar ?

Código:
If LCase(Trim(TextSay)) = "/gokussj" Then If GetPlayerClass(index) = 1 Then If GetPlayerLevel(index) => 20 Then If GetPlayerAccess(index) => 0 Then If GetPlayerSprite(index) = 1 Then Call SetPlayerSprite(index, 35) Call SetPlayerSTR(Index, GetPlayerSTR(Index) + 5) Call SetPlayerDEF(Index, GetPlayerDEF(Index) + 5) Call PlayerMsg(index, "Você se tornou um SSJ!", 4) Call PlayerWarp(index, GetPlayerMap(index), GetPlayerX(index), GetPlayerY(index), False) Exit Sub End If End If End If End If End If If LCase(Trim(TextSay)) = "/gokussj3" Then If GetPlayerClass(index) = 1 Then If GetPlayerLevel(index) => 60 Then If GetPlayerAccess(index) => 0 Then If GetPlayerSprite(index) = 35 Then Call SetPlayerSprite(index, ,36) Call SetPlayerSTR(Index, GetPlayerSTR(Index) + 30) Call SetPlayerDEF(Index, GetPlayerDEF(Index) + 30) Call PlayerMsg(index, "Você se tornou um SSJ3!", 4) Call PlayerWarp(index, GetPlayerMap(index), GetPlayerX(index), GetPlayerY(index), False) Exit Sub End If End If End If End If End If If LCase(Trim(TextSay)) = "/gokuozaru" Then If GetPlayerClass(index) = 1 Then If GetPlayerLevel(index) => 90 Then If GetPlayerAccess(index) => 1 Then If GetPlayerSprite(index) = 299 Then Call SetPlayerSprite(index, 36) Call SetPlayerSTR(Index, GetPlayerSTR(Index) + 50) Call SetPlayerDEF(Index, GetPlayerDEF(Index) + 50) Call PlayerMsg(index, "Você se tornou um SSJ4!", 4) Call PlayerWarp(index, GetPlayerMap(index), GetPlayerX(index), GetPlayerY(index), False) Exit Sub End If End If End If End If End If If LCase(Trim(TextSay)) = "/gokussj4" Then If GetPlayerClass(index) = 1 Then If GetPlayerLevel(index) => 99 Then If GetPlayerAccess(index) => 1 Then If GetPlayerSprite(index) = 299 Then Call SetPlayerSprite(index, 36) Call SetPlayerSTR(Index, GetPlayerSTR(Index) + 70) Call SetPlayerDEF(Index, GetPlayerDEF(Index) + 70) Call PlayerMsg(index, "Você se tornou um SSJ4!", 4) Call PlayerWarp(index, GetPlayerMap(index), GetPlayerX(index), GetPlayerY(index), False) Exit Sub End If End If End If End If End If

Facil

Código:: [b]If LCase(Trim(TextSay)) = "/normal" Then[/b] If GetPlayerClass(index) = 1 Then [b]If GetPlayerLevel(index) => 90 Then[/b] If GetPlayerAccess(index) => 1 Then If GetPlayerSprite(index) = 1 Then [b]Call SetPlayerSprite(index, 36)[/b] Call SetPlayerSTR(Index, GetPlayerSTR(Index) + 50) Call SetPlayerDEF(Index, GetPlayerDEF(Index) + 50) Call PlayerMsg(index, "Você se tornou um SSJ4!", 4) Call PlayerWarp(index, GetPlayerMap(index), GetPlayerX(index), GetPlayerY(index), False) Exit Sub End If End If End If End If End If

So precisa mudar essass linhas em negrito
If LCase(Trim(TextSay)) = "/normal" Then
If GetPlayerLevel(index) => 90 Then
Call SetPlayerSprite(index, 36)

so que dai vc vai ter que fazer a msm quantidade de transf por classe com a normal, por que o normal vai ser para aquele comando

tipo: gokussj1 - /normal vai trazer ele de volta, dai vc tem que criar outro para o dois e assim vai

por Éden Rodrigues Sáb 13 Nov 2010, 22:05

Nem deu pra entender o que você falou ai.. ;/

E também voltar os status que o cara tava, sem alterar nada..

por Conteúdo patrocinado

Ajuda no comando /normal

Ajuda no comando /normal

Re: Ajuda no comando /normal

Re: Ajuda no comando /normal

Re: Ajuda no comando /normal