MMORPG Brasil
Ola, visitante! Agradecemos sua visita, para ter acesso a todo nosso conteúdo recomendamos que faça um cadastro no fórum, com ele você pode participar de tópicos e ter acesso a todas áreas da comunidade!

Participe do fórum, é rápido e fácil

MMORPG Brasil
Ola, visitante! Agradecemos sua visita, para ter acesso a todo nosso conteúdo recomendamos que faça um cadastro no fórum, com ele você pode participar de tópicos e ter acesso a todas áreas da comunidade!
MMORPG Brasil
Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Multiplayer Online Role Playing Game Massively Brasil - Suporte e Recursos para desenvolvedores de MMORPGs

O fórum está definitivamente fechado, obrigado a todos que participaram do que um dia foi a MMORPG Brasil!
Atenciosamente Lendário...

Transformaçao

4 participantes

MMORPG Brasil :: OPEN SOURCE ENGINES :: Outras Engines :: Elysium :: Suporte e Pedidos :: Assuntos resolvidos

Ir para baixo

Transformaçao Empty Transformaçao

Mensagem por guigui408 Qua 04 Nov 2009, 11:20

Galera,eu nao to consceguindo colocar Transformaçao no meu serve.Eu ja fis as paradas puis embaixo de /wish mas o comando nem da sinal nao avisa nada,nao acontece nada.E queria de voltar tb,se for possivel.Elysium BR por favor,Vlw! :cyclops: cheers Basketball bom Shocked :pirat: bounce 🐰
avatar
guigui408
Membro
Membro

Mensagens : 116

Ir para o topo Ir para baixo

Transformaçao Empty Re: Transformaçao

Mensagem por Rio Absolut Qua 04 Nov 2009, 12:06

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 1 Enter deposi desta Parte e coloque o codigo , o que funciona é o seguinte comando
Código:

Transformação Normal

If LCase(Trim(TextSay)) = "/adul" Then
If GetPlayerClass(index) = 1 Then
If GetPlayerLevel(index) => 25 Then
If GetPlayerAccess(index) => 0 Then
If GetPlayerSprite(index) = 0 Then
Call SetPlayerSprite(index, 1)
Call SetPlayerSTR(Index, GetPlayerSTR(Index) + 25)
Call SetPlayerDEF(Index, GetPlayerDEF(Index) + 25)
Call PlaySound(Index, "ssjtransform.wav")
Call PlayerMsg(index, "Voce Se Tornou Um adulto!", 4)
Call PlayerWarp(index, GetPlayerMap(index), GetPlayerX(index), GetPlayerY(index), False)
Exit Sub
End If
End If
End If
End If
End If


Código:
Transformação VIP

If LCase(Trim(TextSay)) = "/ozaru" Then
If GetPlayerClass(index) = 1 Then
If GetPlayerLevel(index) => 500 Then
If GetPlayerAccess(index) => 1 Then
If GetPlayerSprite(index) = 8 Then
Call SetPlayerSprite(index, 41)
Call SetPlayerSTR(Index, GetPlayerSTR(Index) + 350)
Call SetPlayerDEF(Index, GetPlayerDEF(Index) + 350)
Call PlaySound(Index, "ssjtransform.wav")
Call PlayerMsg(index, "Voce 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



OBs : So troque o numero da Sprite , Pontos , comando eo aceço !
Rio Absolut
Rio Absolut
Membro Vitalicio
Membro Vitalicio

Mensagens : 655

Ir para o topo Ir para baixo

Transformaçao Empty Re: Transformaçao

Mensagem por guigui408 Qua 04 Nov 2009, 12:21

Vlw
avatar
guigui408
Membro
Membro

Mensagens : 116

Ir para o topo Ir para baixo

Transformaçao Empty Re: Transformaçao

Mensagem por guigui408 Qua 04 Nov 2009, 12:37

Aff,Nada Funfa aqui......
avatar
guigui408
Membro
Membro

Mensagens : 116

Ir para o topo Ir para baixo

Transformaçao Empty Re: Transformaçao

Mensagem por Rio Absolut Qua 04 Nov 2009, 14:32

Entaum , Apague os comandos antigos ou abaixe denovo o elysium e subistitua as pasta script e recoloque os comando !
Rio Absolut
Rio Absolut
Membro Vitalicio
Membro Vitalicio

Mensagens : 655

Ir para o topo Ir para baixo

Transformaçao Empty Re: Transformaçao

Mensagem por Zeus Qua 04 Nov 2009, 19:22

Cara, tenta refazer, sempre que não der certo refassa !
Zeus
Zeus
Membro Vitalicio
Membro Vitalicio

Mensagens : 711

Ir para o topo Ir para baixo

Transformaçao Empty Re: Transformaçao

Mensagem por brendon Qua 02 Dez 2009, 20:37

Corrigido "2 Enter"
:lol!:
brendon
brendon
Membro
Membro

Mensagens : 109

Ir para o topo Ir para baixo

Transformaçao Empty Re: Transformaçao

Mensagem por Conteúdo patrocinado


Conteúdo patrocinado


Ir para o topo Ir para baixo

Ir para o topo

- Tópicos semelhantes

MMORPG Brasil :: OPEN SOURCE ENGINES :: Outras Engines :: Elysium :: Suporte e Pedidos :: Assuntos resolvidos

 
Permissões neste sub-fórum
Não podes responder a tópicos