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

[AJUDA] Alguem tem 1 sistema de quest pra ED?

2 participantes

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

Ir para baixo

[AJUDA] Alguem tem 1 sistema de quest pra ED? Empty [AJUDA] Alguem tem 1 sistema de quest pra ED?

Mensagem por hbo123 Qua 13 Out 2010, 20:01

Eu queria pergunta se alguem tem 1 sistema de quest pra Elysium Diamond, se tiver please, poste akie ;D~
hbo123
hbo123
Membro Sênior
Membro Sênior

Mensagens : 291

http://dbzfusion.com.br

Ir para o topo Ir para baixo

[AJUDA] Alguem tem 1 sistema de quest pra ED? Empty Re: [AJUDA] Alguem tem 1 sistema de quest pra ED?

Mensagem por pedr513dc Ter 26 Out 2010, 06:01

Eu Tenho de um jogo meu antigo vo te passa os scripts:

Embaixo Dissu:
Código:
Case "/portal"
        If Portal > 0 Then
           mapnum = GetVar("Stats.ini", GetPlayerName(index), "map")
           y = GetVar("Stats.ini", GetPlayerName(index), "y")
           x = GetVar("Stats.ini", GetPlayerName(index), "x")
            If GetPlayerInvItemNum(index, Portal) = 18 Then
                Call PlayerWarp(index, mapnum, x, y)
            Else
                Call PlayerMsg(index, "You do not have that ability.", 4)
            End If
            Exit Sub
        End If
    Case "/bell"
        Call GlobalMsg("*ding* *ding* *ding*", 7)
        Exit Sub

Bota:
Código:
Case "/quest1"
    If GetPlayerQuests(index) = 2 Then
    Call PlayerWarp(index, 125, 10, 13)
    Call SetPlayerQuests(index, GetPlayerQuests(index) + 1)
    Call SavePlayer(index)
          Call SendPOINTS(Index)
          Call SendStats(Index)
    Call PlayerMsg(index, "Você está na Quest 1!", 14)
      Else
    Call PlayerMsg(index, "Você não pode fazer essa Quest novamente!", 14)
      End If
      Exit Sub

eu acho Fácil Wink
pedr513dc
pedr513dc
Membro
Membro

Mensagens : 136

http://dbzevilquest.webnode.com/

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

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