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...

[ALL]Comando para adicionar poder de luta

2 participantes

MMORPG Brasil :: OPEN SOURCE ENGINES :: Outras Engines :: Elysium :: Tutoriais

Ir para baixo

[ALL]Comando para adicionar poder de luta Empty [ALL]Comando para adicionar poder de luta

Mensagem por Master-Man Qui 23 Dez 2010, 06:11

No Principal Procure Por:
CÓDIGO:
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         
Dim Z       
Dim Ki
Dim pdl
m = GetVar("Data.ini", "MAX", "MAX_MAPS")
TextSay = GetVar("Scripts\Command.ini", "TEMP", "Text" & index)


Em Baixo ADD:
CÓDIGO:
Código:
If Lcase(Trim(TextSay)) = "/addpl" Then "Escolha Um Comando"
If GetPlayerPoints(index) => 500 Then
Call SetPlayerSTR(index, GetPlayerDEF(index) + 10) "
Call SetPlayerDEF(index, GetPlayerDEF(index) + 10)"
Call SetPlayerMAGI(index, GetPlayerDEF(index) + 10)"
Call SetPlayerSPEED(index, GetPlayerDEF(index) + 10) "
Call SetPlayerSPEED(index, GetPlayerPDL(index) + 40) "
Call SetPlayerPOINTS(index, GetPlayerPoints(index) - 60)
Exit Sub 
End If
End If

Mude os numeros para os q vc quiser,lembrando q é preciso ter o sistema de PDL para usar.

Tomara qajudem^^
Master-Man
Master-Man
Membro Junior
Membro Junior

Mensagens : 63

Ir para o topo Ir para baixo

[ALL]Comando para adicionar poder de luta Empty Re: [ALL]Comando para adicionar poder de luta

Mensagem por gabriiell mooreiiraa Ter 28 Dez 2010, 06:19

explicaa um pocoo... aii
purq sou iniciante ii ñn seei mexeer muitoo Surprised Surprised Surprised
gabriiell mooreiiraa
gabriiell mooreiiraa
Novato
Novato

Mensagens : 23

Ir para o topo Ir para baixo

Ir para o topo

- Tópicos semelhantes

MMORPG Brasil :: OPEN SOURCE ENGINES :: Outras Engines :: Elysium :: Tutoriais

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