Isto é uma pré-visualização de um tema em Hitskin.com
Instalar o tema • Voltar para a ficha do tema
[AJUDA] Sobre sistema de Guild War
3 participantes
Página 1 de 1
[AJUDA] Sobre sistema de Guild War
Bom dia a todos os membros não sei se estou postando no lugar correto caso não esteja desculpe. Preciso de ajuda com um Sistema:
- ESSE AQUI:
- ':::::::::::::::::::::::::::::
'::::::::GUILD WAR::::::::::::
':::::::::::::::::::::::::::::
Case "guildwar"
On Error Resume Next
If GetPlayerGuild(Index) >= "#" Then
Call GlobalMsg("A Guild " & GetPlayerGuild(Index) & " entrou para guerra de guilds!!!", 14) ' Msg que vai aparecer quando usar o botao
Call PlayerWarp(Index, MAP, X, Y) ' Coordenadas para onde o player vai
End If
Exit Sub
joaoluiz0123- Novato
- Mensagens : 2
Créditos : 0
Phïneas- Novato
- Mensagens : 5
Créditos : 1
Re: [AJUDA] Sobre sistema de Guild War
Fiz um simples aqui, sem complicar muito, você pode alterar da forma que desejar:
Abra o código fonte do servidor,
aperte CTRL+F para buscar tmrChatLogs_Timer()
-remova a primeira linha Static ChatSecs As Long
Nessa Sub já tem um temporizador,Ele tem um contador regressivo do 3600 até o ZERO, eu pedi pra você apagar ChatSecs dessa sub privada agora vamos criar uma pública.
aperte CTRL+F para buscar Public CurrentLoad As Long
Abaixo do Public CurrentLoad As Long
Adicione isso:
Public ChatSecs As Long
A ideia é criar um evento que se inicie assim que o tempo estiver igual ou menor que 1000 com um comando chamado goevento, assim que digitar esse comando, o player vai para o evento, mas somente se o ChatSecs estiver igual ou menor que 1000.
Vamos lá, aperte CTRL+F para buscar e Pesquise por Case "saymsg"
abaixo do NEXT
adicione:
If ChatSecs <= 1000 And Msg = "goevento" Then
Call GlobalMsg(GetPlayerName(Index) " Digitou GOEVENTO e entrou para o evento!!!", 14)
Call PlayerWarp(Index, 10, 10, 10) 'Mapa, X, Y
End If
O sistema está pronto, agora você só precisa avisar a todos os players que o evento está rolando correto?
-aperte CTRL+F para buscar tmrChatLogs_Timer()
-abaixo de ChatSecs = ChatSecs - 1
ADICIONE:
'avisar que o evento vai começar em 5 segundos
If ChatSecs = 1005 And ChatSecs = 1000 Then
Call GlobalMsg("Evento começa em " ChatSecs - 1000 "!", BrightBlue)
End If
'avisar que o evento começou
If ChatSecs = 995 And ChatSecs = 990 Then
Call GlobalMsg("Digite GoEvento para participar.", BrightBlue)
End If
Abra o código fonte do servidor,
aperte CTRL+F para buscar tmrChatLogs_Timer()
-remova a primeira linha Static ChatSecs As Long
Nessa Sub já tem um temporizador,Ele tem um contador regressivo do 3600 até o ZERO, eu pedi pra você apagar ChatSecs dessa sub privada agora vamos criar uma pública.
aperte CTRL+F para buscar Public CurrentLoad As Long
Abaixo do Public CurrentLoad As Long
Adicione isso:
Public ChatSecs As Long
A ideia é criar um evento que se inicie assim que o tempo estiver igual ou menor que 1000 com um comando chamado goevento, assim que digitar esse comando, o player vai para o evento, mas somente se o ChatSecs estiver igual ou menor que 1000.
Vamos lá, aperte CTRL+F para buscar e Pesquise por Case "saymsg"
abaixo do NEXT
adicione:
If ChatSecs <= 1000 And Msg = "goevento" Then
Call GlobalMsg(GetPlayerName(Index) " Digitou GOEVENTO e entrou para o evento!!!", 14)
Call PlayerWarp(Index, 10, 10, 10) 'Mapa, X, Y
End If
O sistema está pronto, agora você só precisa avisar a todos os players que o evento está rolando correto?
-aperte CTRL+F para buscar tmrChatLogs_Timer()
-abaixo de ChatSecs = ChatSecs - 1
ADICIONE:
'avisar que o evento vai começar em 5 segundos
If ChatSecs = 1005 And ChatSecs = 1000 Then
Call GlobalMsg("Evento começa em " ChatSecs - 1000 "!", BrightBlue)
End If
'avisar que o evento começou
If ChatSecs = 995 And ChatSecs = 990 Then
Call GlobalMsg("Digite GoEvento para participar.", BrightBlue)
End If
_________________
Tópicos semelhantes
» Duvidas sobre o sistema de guild/party scripts
» Ajuda com sistema de guild, me ajudem
» [AJUDA]Sistema de Amigo,Online e Guild
» Pedido sobre Guild System
» Bug no sistema de Guild
» Ajuda com sistema de guild, me ajudem
» [AJUDA]Sistema de Amigo,Online e Guild
» Pedido sobre Guild System
» Bug no sistema de Guild
Página 1 de 1
Permissões neste sub-fórum
Não podes responder a tópicos