Ranking de Level (até 3 no ranking) para Eclipse.
+11
wilclefi
jclaudio175
Luffy
Noah
Lendário
Kz
Zeus
Karlos
leuzin_xD
Grilox
Lucas Lôpo
15 participantes
MMORPG Brasil :: OPEN SOURCE ENGINES :: Eclipse :: Tutoriais
Página 1 de 2
Página 1 de 2 • 1, 2 
Ranking de Level (até 3 no ranking) para Eclipse.
por Lucas Lôpo Seg 23 Nov 2009, 09:59
Bom esse tuto é do Boafesta meu chara (Luca) mas eu to fazendo ele aqui para eclipse entao vamos la.
aqui o tutorial modificado para 3 pessoas:
Pronto facil nao? xD quem tiver duvida para por no MainMenu so me pedir que eu ajudo xD
aqui o tutorial modificado para 3 pessoas:
CLIENTE
pra começar tudo precisamos abrir o Ranking, então crie um botão e dentro dele AdicionePrimeiro Crie uma Picture na frmMirage com o nome PicLevel e dentro dela uma ListBox com o nome lstLEVEL
- Código:
Call SendData("level" & sep_char & end_char)
Em seguida´Procure porAbaixo Adicione
- Código:
If casestring = "cussprite" Then
Player(Val(parse(1))).head = Val(parse(2))
Player(Val(parse(1))).body = Val(parse(3))
Player(Val(parse(1))).leg = Val(parse(4))
Exit Sub
End If
- Código:
If Parse(0) = "level" then
frmMirage.lstLEVEL.AddItem (Parse(1) & " Level:" & Parse(2))
frmMirage.lstLEVEL.AddItem (Parse(3) & " Level:" & Parse(4))
frmMirage.lstLEVEL.AddItem (Parse(5) & " Level:" & Parse(6))
frmmirage.PicLevel.visible = true
Exit sub
End if
SERVER
Procure porAbaixo Adicione
- Código:
Case "refresh"
Call PlayerWarp(Index, GetPlayerMap(Index), GetPlayerX(Index), GetPlayerY(Index), False)
Call PlayerMsg(Index, "Mapa atualizado.", White)
Exit SubAgora procure por
- Código:
Case "level"
Call SendDataTo(index, "level" & sep_char & GetVar(App.path & "\Level.ini", "1", "Nome") & sep_char & GetVAr(App.path & "\Level.ini", "1", "Level") & sep_char & GetVar(App.path & "\Level.ini", "2", "Nome") & sep_char & GetVAr(App.path & "\Level.ini", "2", "Level") & sep_char & GetVar(App.path & "\Level.ini", "3", "Nome") & sep_char & GetVAr(App.path & "\Level.ini", "3", "Level") & sep_char & end_char)
exit subLá no final desta sub adicione
- Código:
Sub CheckPlayerLEvelUpEm seguida crie um Arquivo com o nome Level.ini e o conteudo
- Código:
If GetPlayerLevel(Index) > Val(ReadINI("1", "Level", App.Path & "\Level.ini")) Then
Call WriteINI("1", "Nome", GetPlayerName(Index), App.Path & "\Level.ini")
Call WriteINI("1", "Level", GetPlayerLevel(Index), App.Path & "\Level.ini")
Call WriteINI("3", "Nome", Val(ReadINI("2", "Nome", App.Path & "\Level.ini")), App.Path & "\Level.ini")
Call WriteINI("3", "Level", Val(ReadINI("2", "Level", App.Path & "\Level.ini")), App.Path & "\Level.ini")
Call WriteINI("2", "Nome", Val(ReadINI("1", "Nome", App.Path & "\Level.ini")), App.Path & "\Level.ini")
Call WriteINI("2", "Level", Val(ReadINI("1", "Level", App.Path & "\Level.ini")), App.Path & "\Level.ini")
end if
If GetPlayerLevel(Index) > Val(ReadINI("2", "Level", App.Path & "\Level.ini")) Then
Call WriteINI("3", "Nome", Val(ReadINI("2", "Nome", App.Path & "\Level.ini")), App.Path & "\Level.ini")
Call WriteINI("3", "Level", Val(ReadINI("2", "Level", App.Path & "\Level.ini")), App.Path & "\Level.ini")
Call WriteINI("2", "Nome", GetPlayerName(Index), App.Path & "\Level.ini")
Call WriteINI("2", "Level", GetPlayerLevel(Index), App.Path & "\Level.ini")
end if
If GetPlayerLevel(Index) > Val(ReadINI("3", "Level", App.Path & "\Level.ini")) Then
Call WriteINI("3", "Nome", GetPlayerName(Index), App.Path & "\Level.ini")
Call WriteINI("3", "Level", GetPlayerLevel(Index), App.Path & "\Level.ini")
end if
Exit Sub
- Código:
[1]
Nome=Tio Boas :P
Level=100
[2]
Nome=Tio Azzi :P
Level=50
[2]
Nome=Tio Lendario :P
Level=1
Vivaa seu Ranking automático está pronto :lol!:
Como Usar
Aperte o botão que colocou na frmMirage e Tchan!
Pronto facil nao? xD quem tiver duvida para por no MainMenu so me pedir que eu ajudo xD
Lucas Lôpo- Membro Veterano
- Mensagens : 833
Re: Ranking de Level (até 3 no ranking) para Eclipse.
por Grilox Seg 23 Nov 2009, 11:10
Entao na parte do "Cliente" deu tudo certo, mas na parte do "Server" continua dando erro na hora de compilar na parte do ReadINI.
Grilox- Membro Junior
- Mensagens : 87
leuzin_xD- Membro Junior
- Mensagens : 84
Re: Ranking de Level (até 3 no ranking) para Eclipse.
por Karlos Seg 23 Nov 2009, 17:25
tenta por no readini um ponto no meio para que fique assim.
read.ini obs, coloque o ponto em todos read.ini que tiverem na sub. XD
e + uma coisa faça um back-up do projeto primeiro para que não corrão risco de perder nada. boa sorte. ^^
read.ini obs, coloque o ponto em todos read.ini que tiverem na sub. XD
e + uma coisa faça um back-up do projeto primeiro para que não corrão risco de perder nada. boa sorte. ^^
Karlos- Membro Veterano
- Mensagens : 2851
-
Re: Ranking de Level (até 3 no ranking) para Eclipse.
por Lucas Lôpo Seg 23 Nov 2009, 17:28
Uma perguntinha qual versao voce usa testei na 2.7 e 2.8 pegou
perfeitamente.
perfeitamente.
Lucas Lôpo- Membro Veterano
- Mensagens : 833
Re: Ranking de Level (até 3 no ranking) para Eclipse.
por leuzin_xD Seg 23 Nov 2009, 17:54
eu uso o Eclipse PriButon
leuzin_xD- Membro Junior
- Mensagens : 84
Re: Ranking de Level (até 3 no ranking) para Eclipse.
por Zeus Seg 23 Nov 2009, 18:35
Deu o mesmo erro no elysium...
Zeus- Membro Vitalicio
- Mensagens : 711
Re: Ranking de Level (até 3 no ranking) para Eclipse.
por Karlos Seg 23 Nov 2009, 18:43
¬¬' falo + nada vou por citação.
Adm.Karlos escreveu:tenta por no readini um ponto no meio para que fique assim.
read.ini obs, coloque o ponto em todos read.ini que tiverem na sub. XD
e + uma coisa faça um back-up do projeto primeiro para que não corrão risco de perder nada. boa sorte. ^^
Karlos- Membro Veterano
- Mensagens : 2851
-
Re: Ranking de Level (até 3 no ranking) para Eclipse.
por Grilox Seg 23 Nov 2009, 20:45
Adm.Karlos escreveu:¬¬' falo + nada vou por citação.Adm.Karlos escreveu:tenta por no readini um ponto no meio para que fique assim.
read.ini obs, coloque o ponto em todos read.ini que tiverem na sub. XD
e + uma coisa faça um back-up do projeto primeiro para que não corrão risco de perder nada. boa sorte. ^^
Nao resolveu o problema aqui nao
Grilox- Membro Junior
- Mensagens : 87
Re: Ranking de Level (até 3 no ranking) para Eclipse.
por leuzin_xD Seg 23 Nov 2009, 21:03
Grilox escreveu:Adm.Karlos escreveu:¬¬' falo + nada vou por citação.Adm.Karlos escreveu:tenta por no readini um ponto no meio para que fique assim.
read.ini obs, coloque o ponto em todos read.ini que tiverem na sub. XD
e + uma coisa faça um back-up do projeto primeiro para que não corrão risco de perder nada. boa sorte. ^^
Nao resolveu o problema aqui nao
Aqui tb nao
leuzin_xD- Membro Junior
- Mensagens : 84
Re: Ranking de Level (até 3 no ranking) para Eclipse.
por Kz Ter 24 Nov 2009, 12:24
Hm... Estava a Procura de um Ranking de lvl...
Estarei testando, qualker problema, estarei postando
Vlws
Estarei testando, qualker problema, estarei postando
Vlws
Kz- Membro Junior
- Mensagens : 93
Re: Ranking de Level (até 3 no ranking) para Eclipse.
por Lendário Ter 24 Nov 2009, 12:27
Seja bem vindo poste o que precisar
Lendário- Administrador Lendário
- Mensagens : 1958
Re: Ranking de Level (até 3 no ranking) para Eclipse.
por Kz Ter 24 Nov 2009, 13:02
@lendario
Sei que o Topico não é sobre isso,
Mas Obrigado, estarei disposto a ajudar o Forum (
) e Tirar minahs duvidas ( 
)
Sei que o Topico não é sobre isso,
Mas Obrigado, estarei disposto a ajudar o Forum (
) e Tirar minahs duvidas ( )
Kz- Membro Junior
- Mensagens : 93
Re: Ranking de Level (até 3 no ranking) para Eclipse.
por Karlos Qua 25 Nov 2009, 11:45
rsrsrsrs descupe galera isso que postei acima foi só uma sugestão para acorreção do problema vou pensar + um poko e ver o que eu descubro aki.
Karlos- Membro Veterano
- Mensagens : 2851
-
Re: Ranking de Level (até 3 no ranking) para Eclipse.
por Lucas Lôpo Qua 25 Nov 2009, 17:57
Bom graças a ajuda do Lenon eu resolvii o problema xD
Bom onde tem:
Mude Para :
Bom onde tem:
- Código:
If GetPlayerLevel(Index) > Val(ReadINI("1", "Level", App.Path & "\Level.ini")) Then
Call WriteINI("1", "Nome", GetPlayerName(Index), App.Path & "\Level.ini")
Call WriteINI("1", "Level", GetPlayerLevel(Index), App.Path & "\Level.ini")
Call WriteINI("3", "Nome", Val(ReadINI("2", "Nome", App.Path & "\Level.ini")), App.Path & "\Level.ini")
Call WriteINI("3", "Level", Val(ReadINI("2", "Level", App.Path & "\Level.ini")), App.Path & "\Level.ini")
Call WriteINI("2", "Nome", Val(ReadINI("1", "Nome", App.Path & "\Level.ini")), App.Path & "\Level.ini")
Call WriteINI("2", "Level", Val(ReadINI("1", "Level", App.Path & "\Level.ini")), App.Path & "\Level.ini")
end if
If GetPlayerLevel(Index) > Val(ReadINI("2", "Level", App.Path & "\Level.ini")) Then
Call WriteINI("3", "Nome", Val(ReadINI("2", "Nome", App.Path & "\Level.ini")), App.Path & "\Level.ini")
Call WriteINI("3", "Level", Val(ReadINI("2", "Level", App.Path & "\Level.ini")), App.Path & "\Level.ini")
Call WriteINI("2", "Nome", GetPlayerName(Index), App.Path & "\Level.ini")
Call WriteINI("2", "Level", GetPlayerLevel(Index), App.Path & "\Level.ini")
end if
If GetPlayerLevel(Index) > Val(ReadINI("3", "Level", App.Path & "\Level.ini")) Then
Call WriteINI("3", "Nome", GetPlayerName(Index), App.Path & "\Level.ini")
Call WriteINI("3", "Level", GetPlayerLevel(Index), App.Path & "\Level.ini")
end if
Exit Sub
Mude Para :
- Código:
If GetPlayerLevel(Index) > Val(GetVar("1", "Level", App.Path & "\Level.ini")) Then
Call WriteINI("1", "Nome", GetPlayerName(Index), App.Path & "\Level.ini")
Call WriteINI("1", "Level", GetPlayerLevel(Index), App.Path & "\Level.ini")
Call WriteINI("3", "Nome", Val(GetVar("2", "Nome", App.Path & "\Level.ini")), App.Path & "\Level.ini")
Call WriteINI("3", "Level", Val(GetVar("2", "Level", App.Path & "\Level.ini")), App.Path & "\Level.ini")
Call WriteINI("2", "Nome", Val(GetVar("1", "Nome", App.Path & "\Level.ini")), App.Path & "\Level.ini")
Call WriteINI("2", "Level", Val(GetVar("1", "Level", App.Path & "\Level.ini")), App.Path & "\Level.ini")
End If
If GetPlayerLevel(Index) > Val(GetVar("2", "Level", App.Path & "\Level.ini")) Then
Call WriteINI("3", "Nome", Val(GetVar("2", "Nome", App.Path & "\Level.ini")), App.Path & "\Level.ini")
Call WriteINI("3", "Level", Val(GetVar("2", "Level", App.Path & "\Level.ini")), App.Path & "\Level.ini")
Call WriteINI("2", "Nome", GetPlayerName(Index), App.Path & "\Level.ini")
Call WriteINI("2", "Level", GetPlayerLevel(Index), App.Path & "\Level.ini")
End If
If GetPlayerLevel(Index) > Val(GetVar("3", "Level", App.Path & "\Level.ini")) Then
Call WriteINI("3", "Nome", GetPlayerName(Index), App.Path & "\Level.ini")
Call WriteINI("3", "Level", GetPlayerLevel(Index), App.Path & "\Level.ini")
End If
Exit Sub
Lucas Lôpo- Membro Veterano
- Mensagens : 833
Re: Ranking de Level (até 3 no ranking) para Eclipse.
por leuzin_xD Qua 25 Nov 2009, 18:16
Agora deu 
Vlw mw ajudou muito mesmo
Vlw mw ajudou muito mesmo
leuzin_xD- Membro Junior
- Mensagens : 84
Re: Ranking de Level (até 3 no ranking) para Eclipse.
por Lucas Lôpo Qua 25 Nov 2009, 19:34
E aew agora conseguil copilar? xD
Lucas Lôpo- Membro Veterano
- Mensagens : 833
Re: Ranking de Level (até 3 no ranking) para Eclipse.
por leuzin_xD Qua 25 Nov 2009, 19:40
sim ...
mais to com um pequeno Problema
mais to com um pequeno Problema
leuzin_xD- Membro Junior
- Mensagens : 84
Re: Ranking de Level (até 3 no ranking) para Eclipse.
por Lucas Lôpo Qua 25 Nov 2009, 20:00
Qual so falar que nois resolve xDhuashuas
Lucas Lôpo- Membro Veterano
- Mensagens : 833
Re: Ranking de Level (até 3 no ranking) para Eclipse.
por leuzin_xD Sáb 28 Nov 2009, 07:37
dexa pra lá
já resolvi o Problema
já resolvi o Problema
leuzin_xD- Membro Junior
- Mensagens : 84
Probleminha. :)
por Noah Sáb 09 Jan 2010, 23:55
Fuciona no STABLE? Coloquei aqui mas não aparece o top no ranking, fica em branco. a não ser que eu escreva na .INI mas gostaria que salvasse automático o TOP.
Level:
Level:
Level:
Não ta salvando na .INI
E não tem isso no stable.
Então coloquei embaixo disso.
Alguém ajuda?
Ainda está lendo o banner? Não espere, entra la!
Level:
Level:
Level:
Não ta salvando na .INI
E não tem isso no stable.
- Código:
If casestring = "cussprite" Then
Player(Val(parse(1))).head = Val(parse(2))
Player(Val(parse(1))).body = Val(parse(3))
Player(Val(parse(1))).leg = Val(parse(4))
Exit Sub
End If
Então coloquei embaixo disso.
- Código:
' ::::::::::::::::::::
' :: Social packets ::
' ::::::::::::::::::::
If (Casestring = "saymsg") Or (Casestring = "broadcastmsg") Or (Casestring = "globalmsg") Or (Casestring = "playermsg") Or (Casestring = "mapmsg") Or (Casestring = "adminmsg") Then
Call AddText(Parse(1), Val(Parse(2)))
Exit Sub
End If
Alguém ajuda?
Ainda está lendo o banner? Não espere, entra la!
Noah- Novato
- Mensagens : 24
-
Re: Ranking de Level (até 3 no ranking) para Eclipse.
por Lucas Lôpo Dom 17 Jan 2010, 12:25
Bom o nome diz que é altomatico mas na verdade ele nao é altomatico
pois voce tem que colocar no .ini os lvl dos caras....Mas to desenvolvendo um
que vai ser altomatico mesmo ;D
pois voce tem que colocar no .ini os lvl dos caras....Mas to desenvolvendo um
que vai ser altomatico mesmo ;D
Lucas Lôpo- Membro Veterano
- Mensagens : 833
Re: Ranking de Level (até 3 no ranking) para Eclipse.
por Luffy Qui 21 Jan 2010, 03:14
Aqui dá um erro atrás do outro, nada de funfar
Luffy- Novato
- Mensagens : 1
Re: Ranking de Level (até 3 no ranking) para Eclipse.
por Noah Qui 21 Jan 2010, 06:30
Ah, então esse ranking não serve de nada po, porque o que todos querem é uma maneira do server pegar automático o nível dos jogadores e mostrar para os players. até porque quem tem um server 24h não ve muito player que entra então não da para ter um controle.
Noah- Novato
- Mensagens : 24
-
Re: Ranking de Level (até 3 no ranking) para Eclipse.
por jclaudio175 Sex 05 Fev 2010, 13:37
Esse Rank pega no Chaos?
jclaudio175- Membro
- Mensagens : 105
Página 1 de 2 • 1, 2
Tópicos semelhantes» [ALL]Ranking de Level (até 3 no ranking) para MainMenu
» [ALL]Ranking de Level (até 5 no ranking) para MainMenu
» [EE]Ranking Level
» Ranking de level
» [ALL]Ranking De LeveL Automatico
» [ALL]Ranking de Level (até 5 no ranking) para MainMenu
» [EE]Ranking Level
» Ranking de level
» [ALL]Ranking De LeveL Automatico
MMORPG Brasil :: OPEN SOURCE ENGINES :: Eclipse :: Tutoriais
Página 1 de 2
Permissões neste sub-fórum
Não podes responder a tópicos|
|
|
» Ojkjeeeee
» Naruto Great Ninja Batle
» Recrutamento de um Designer para jogo de CDZ.
» Serviços de suporte maker( Programação , Design , PixelArt ) E Vendas de Jogos
» Serviços de suporte maker( Programação , Design , PixelArt ) E Vendas de Jogos
» Serviços de suporte maker( Programação , Design , PixelArt ) E Vendas de Jogos
» Projeto Dbz
» Avaliação - Sprites Naruto
» [Sprites] DBZ (Plix)
» Super Pack - Bleach V.2
» [PEDIDO][PROJETO][RECRUTAMENTO] DYNISTYGAMES
» [PEDIDO][PROJETO][RECRUTAMENTO] DYNISTYGAMES
» [PEDIDO][PROJETO][RECRUTAMENTO] DYNISTYGAMES
» [Pedido] Contador de resets na FrmMain
» [Recrutamento]
» Ajuda erro no Cliente e Servidor do EEB 2.6!
» Como criar tilesets para Eclipse Origins 3.0 (POKÉMON)
» Recursos Pokemons
» erro frm flash
» Pedido - Pack de star wars
» [Ajuda] Sobre como por o servidor on por ip fixo
» Illusion Dimension - O Misterio do ID: BETA TESTE ONLINE
» [NSME] Naruto Shinobi Maker Engine
» Script /base,/casa Igual DBZ Forces
» [Pedido]Colar Tsunade item sprite eclipse origin
» [Pedido] Elysium
» Naruto - Recruta
» [Avaliação] - Kirito from Sword Art Online; Red and Pikachu from Pokemon.
» [Avaliação] - Kenpachi Zaraki from Bleach; Libra Shiryu From Saint Seiya.
» Demonstração de Sprites (Á VENDA!)
» [Sistema de Reset]Para Eclipse .
» Cada Guild Nascer em Certo Mapa
» Dragon Ball z Fusion A Grande Volta
» Ajuda com Ip fixo
» Como Fazer um GUI no Eclipse Origins
» Shisui Susanoo
» Fantasy Art Online
» Ajuda !!
» como passar o usuário e senha para o MainMenu?
» Ru time ero 13 Type mismatch
» Jarvis 1.3 Download
» [Avaliação/Disponibilização]Árvore 64x64
» Mlk's Zikas Signatures
» Pedido de Sistemas
» [AjudaEEB]Gerador de EXP
» [Avaliar] Base, Humano e Goblin.
» Fabrica do Tio Cronos!
» [PixelArt] Minion - Meu malvado favorito
» [Avaliar] Goku Dragon Ball Z