Sistema de Buff
5 participantes
MMORPG Brasil :: OPEN SOURCE ENGINES :: Eclipse :: Tutoriais
Página 1 de 1
Sistema de Buff
por felipebn Qua 22 Set 2010, 13:11
A pedido do ADM Geração, eu fiz um tutorial de buff por tempo:
coloque estas 5 subs no main:
Agora coloque isso no Sub LeftGame:
pronto xD agora para usa-lo, use os seguintes comandos:
Call BufByFelipe(index, 1, quantidade de str, tempo) (para str)
Call BufByFelipe(index, 2, quantidade de speed, tempo) (para speed)
Call BufByFelipe(index, 3, quantidade de def, tempo) (para def)
Call BufByFelipe(index, 4, quantidade de magi, tempo) (para magi)
é o mesmo comando, mas os numeros 1,2,3,4 que diferenciam os stats:
1 = STR
2 = SPEED
3 = DEF
4 = MAGI
testei e funciono perfeito aqui
obs: as subs você não precisa editar nada, somente as CALLs
coloque estas 5 subs no main:
- Spoiler:
- Sub BufByFelipe(index, buff, quant, tempo)
'1 = STR
'2 = SPEED
'3 = DEF
'4 = MAGI
If buff = "1" then
Stat = GetVar("Dados.ini", GetPlayerName(index), "Str")
If GetVar("Dados.ini", GetPlayerName(index), "Str") = "" then
Stat = 0
End if
Call PutVar("Dados.ini", GetPlayerName(index), "Str", Stat + quant)
Call SetPlayerStr(index, GetPlayerStr(index) + quant)
Call SetTimer("BufStr " & index, tempo)
Call SendStats(Index)
End if
If buff = "2" then
Stat = GetVar("Dados.ini", GetPlayerName(index), "Speed")
If GetVar("Dados.ini", GetPlayerName(index), "Speed") = "" then
Stat = 0
End if
Call PutVar("Dados.ini", GetPlayerName(index), "Speed", Stat + quant)
Call SetPlayerSpeed(index, GetPlayerSpeed(index) + quant)
Call SetTimer("BufSpeed " & index, tempo)
Call SendStats(Index)
End if
If buff = "3" then
Stat = GetVar("Dados.ini", GetPlayerName(index), "Def")
If GetVar("Dados.ini", GetPlayerName(index), "Def") = "" then
Stat = 0
End if
Call PutVar("Dados.ini", GetPlayerName(index), "Def", Stat + quant)
Call SetPlayerDef(index, GetPlayerDef(index) + quant)
Call SetTimer("BufDef " & index, tempo)
Call SendStats(Index)
End if
If buff = "4" then
Stat = GetVar("Dados.ini", GetPlayerName(index), "Magi")
If GetVar("Dados.ini", GetPlayerName(index), "Magi") = "" then
Stat = 0
End if
Call PutVar("Dados.ini", GetPlayerName(index), "Magi", Stat + quant)
Call SetPlayerMagi(index, GetPlayerMagi(index) + quant)
Call SetTimer("BufMagi " & index, tempo)
Call SendStats(Index)
End if
End Sub
Sub BufStr(index)
Call RemoveTimer("BufStr " & index)
quantidade = GetVar("Dados.ini", GetPlayerName(index), "Str")
Call PutVar("Dados.ini", GetPlayerName(index), "Str", 0)
Call SetPlayerStr(index, GetPlayerStr(index) - quantidade)
Call SendStats(Index)
End Sub
Sub BufSpeed(index)
Call RemoveTimer("BufSpeed " & index)
quantidade = GetVar("Dados.ini", GetPlayerName(index), "Speed")
Call PutVar("Dados.ini", GetPlayerName(index), "Speed", 0)
Call SetPlayerSpeed(index, GetPlayerSpeed(index) - quantidade)
Call SendStats(Index)
End Sub
Sub BufDef(index)
Call RemoveTimer("BufDef " & index)
quantidade = GetVar("Dados.ini", GetPlayerName(index), "Def")
Call PutVar("Dados.ini", GetPlayerName(index), "Def", 0)
Call SetPlayerDef(index, GetPlayerDef(index) - quantidade)
Call SendStats(Index)
End Sub
Sub BufMagi(index)
Call RemoveTimer("BufMagi " & index)
quantidade = GetVar("Dados.ini", GetPlayerName(index), "Magi")
Call PutVar("Dados.ini", GetPlayerName(index), "Magi", 0)
Call SetPlayerMagi(index, GetPlayerMagi(index) - quantidade)
Call SendStats(Index)
End Sub
Agora coloque isso no Sub LeftGame:
- Spoiler:
- If Not GetVar("Dados.ini", GetPlayerName(index), "Str") = "" then
quantidade = GetVar("Dados.ini", GetPlayerName(index), "Str")
Call PutVar("Dados.ini", GetPlayerName(index), "Str", 0)
Call SetPlayerStr(index, GetPlayerStr(index) - quantidade)
End if
If Not GetVar("Dados.ini", GetPlayerName(index), "Speed") = "" then
quantidade = GetVar("Dados.ini", GetPlayerName(index), "Speed")
Call PutVar("Dados.ini", GetPlayerName(index), "Speed", 0)
Call SetPlayerSpeed(index, GetPlayerSpeed(index) - quantidade)
End if
If Not GetVar("Dados.ini", GetPlayerName(index), "Def") = "" then
quantidade = GetVar("Dados.ini", GetPlayerName(index), "Def")
Call PutVar("Dados.ini", GetPlayerName(index), "Def", 0)
Call SetPlayerDef(index, GetPlayerDef(index) - quantidade)
End if
If Not GetVar("Dados.ini", GetPlayerName(index), "Magi") = "" then
quantidade = GetVar("Dados.ini", GetPlayerName(index), "Magi")
Call PutVar("Dados.ini", GetPlayerName(index), "Magi", 0)
Call SetPlayerMagi(index, GetPlayerMagi(index) - quantidade)
End if
pronto xD agora para usa-lo, use os seguintes comandos:
Call BufByFelipe(index, 1, quantidade de str, tempo) (para str)
Call BufByFelipe(index, 2, quantidade de speed, tempo) (para speed)
Call BufByFelipe(index, 3, quantidade de def, tempo) (para def)
Call BufByFelipe(index, 4, quantidade de magi, tempo) (para magi)
é o mesmo comando, mas os numeros 1,2,3,4 que diferenciam os stats:
1 = STR
2 = SPEED
3 = DEF
4 = MAGI
testei e funciono perfeito aqui
obs: as subs você não precisa editar nada, somente as CALLs
felipebn- Membro
- Mensagens : 224
+ 1 de credito 
Karlos- Membro Veterano
- Mensagens : 2851
-
Re: Sistema de Buff
por Blade Qua 08 Dez 2010, 11:27
eu nao entendi muito bem..
E so pra muda isso??:
Call BufByFelipe(index, 1, quantidade de str, tempo) (para str)
Call BufByFelipe(index, 2, quantidade de speed, tempo) (para speed)
Call BufByFelipe(index, 3, quantidade de def, tempo) (para def)
Call BufByFelipe(index, 4, quantidade de magi, tempo) (para magi)
E so pra muda isso??:
Call BufByFelipe(index, 1, quantidade de str, tempo) (para str)
Call BufByFelipe(index, 2, quantidade de speed, tempo) (para speed)
Call BufByFelipe(index, 3, quantidade de def, tempo) (para def)
Call BufByFelipe(index, 4, quantidade de magi, tempo) (para magi)
Blade- Membro
- Mensagens : 103
Re: Sistema de Buff
por musinx Qui 09 Dez 2010, 08:14
Err onde eu enfio o
Call BufByFelipe(index, 1, quantidade de str, tempo) (para str)
Call BufByFelipe(index, 2, quantidade de speed, tempo) (para speed)
Call BufByFelipe(index, 3, quantidade de def, tempo) (para def)
Call BufByFelipe(index, 4, quantidade de magi, tempo) (para magi)
Eu sou novo nesses negocios de script e tals,da pra por como magia de area?Por favor responda o mais rapido possivel ^^
Call BufByFelipe(index, 1, quantidade de str, tempo) (para str)
Call BufByFelipe(index, 2, quantidade de speed, tempo) (para speed)
Call BufByFelipe(index, 3, quantidade de def, tempo) (para def)
Call BufByFelipe(index, 4, quantidade de magi, tempo) (para magi)
Eu sou novo nesses negocios de script e tals,da pra por como magia de area?Por favor responda o mais rapido possivel ^^
musinx- Membro Junior
- Mensagens : 63
Blade- Membro
- Mensagens : 103
Re: Sistema de Buff
por musinx Sex 10 Dez 2010, 06:32
Pessoal 2 duvidas sobre esse sistema
Este script está em português alguém poderia passar as coisas dele para inglês?A Minha engine é inglês
Mesmo sendo Português eu posso deixar ir normal?Ou vai criar os arquivos e modificar automaticamente?
Eu adiciono as cases tipo (Scriptedskill nº 1 coloco case 1):
Sub ScriptedSpell(index, Script)
Select Case Script
Case 0
Call PlayerMsg(Index, "Scripted Spells Are Working !", 14)
Case 1
Call BufByFelipe(index, 1, 2, 120)
Case 2
Call BufByFelipe(index, 3, 6, 120)
End Select
Assim?
Este script está em português alguém poderia passar as coisas dele para inglês?A Minha engine é inglês
Mesmo sendo Português eu posso deixar ir normal?Ou vai criar os arquivos e modificar automaticamente?
Eu adiciono as cases tipo (Scriptedskill nº 1 coloco case 1):
Sub ScriptedSpell(index, Script)
Select Case Script
Case 0
Call PlayerMsg(Index, "Scripted Spells Are Working !", 14)
Case 1
Call BufByFelipe(index, 1, 2, 120)
Case 2
Call BufByFelipe(index, 3, 6, 120)
End Select
Assim?
musinx- Membro Junior
- Mensagens : 63
Re: Sistema de Buff
por juichi Sex 10 Dez 2010, 07:01
soh add no seu jogo e acho q tah feito certinho
juichi- Membro Sênior
- Mensagens : 483
Re: Sistema de Buff
por musinx Sex 10 Dez 2010, 07:03
cara eu já adicionei só que quando uso a skill,não add a força que eu mandei,nem aparece a animação que eu mandei!Ajuda por favor!Já tentei usar um outro script do touch of death forums e nada de dar certo :´(
Olha como tá minha sub scripted skill
Olha como tá minha sub scripted skill
- Código:
Sub ScriptedSpell(index, Script)
Select Case Script
Case 0
Call PlayerMsg(Index, "Scripted Spells Are Working !", 14)
Case 1
Call BufByFelipe(index, 1, 5, 128)
End Select
End Sub
musinx- Membro Junior
- Mensagens : 63
Re: Sistema de Buff
por juichi Sex 10 Dez 2010, 07:30
normal cara, maior parte dos scripts do felipebn nao funcionam cmg xD
eu sempre tenho q faze uma gambiarra pra poder usar(obs. eu uso o super nova, talvez seja por isso)
eu sempre tenho q faze uma gambiarra pra poder usar(obs. eu uso o super nova, talvez seja por isso)
juichi- Membro Sênior
- Mensagens : 483
Re: Sistema de Buff
por musinx Sex 10 Dez 2010, 07:35
Eu uso Chaos engine,Qual essa gambiarra que vc faz?
(OBS:O Chaos Engine aceita alguns scripts do Eclipse)
(OBS:O Chaos Engine aceita alguns scripts do Eclipse)
musinx- Membro Junior
- Mensagens : 63
Re: Sistema de Buff
por juichi Sex 10 Dez 2010, 07:42
a cara, depende mto do script e da engine, eu nao conheço essa tal de chaos engine, e essas talz "ganbiarras" que eu citei entes eh pegar a funçao principal do script e tenta modelar ela pro commands.ess/scripteditens.ess/outros
normalmente funciona, tenta faze isso no seu
normalmente funciona, tenta faze isso no seu
juichi- Membro Sênior
- Mensagens : 483
Re: Sistema de Buff
por musinx Sex 10 Dez 2010, 08:07
a cara,o jeito vai ser esperar alguma alma bondoza postar 1 buff system para Chaos ou os ADMs se ligarem que a Chaos Engine é famosinha e tem gente que usa ela,e criarem uma área só pra chaos engine '-' seria melhor T.T
musinx- Membro Junior
- Mensagens : 63
Re: Sistema de Buff
por juichi Sex 10 Dez 2010, 08:32
lol
em vez disso tenta estuda um pouco sobre todas as engines neah
se vc olha direitinho os tutos do pessoal vc vai acaba bolando um sistema pro seu jogo com as informções que os caras postaram
essa eh a melhor coisa q vc pode fazer o/
em vez disso tenta estuda um pouco sobre todas as engines neah
se vc olha direitinho os tutos do pessoal vc vai acaba bolando um sistema pro seu jogo com as informções que os caras postaram
essa eh a melhor coisa q vc pode fazer o/
juichi- Membro Sênior
- Mensagens : 483
Tópicos semelhantes» sistema de buff
» [ALL]Correçao do Sistema de Buff
» Sistema de Transformação/Buff
» [Pedido]Sistema Buff
» [EE][ES]Sistema de Buff por tempo
» [ALL]Correçao do Sistema de Buff
» Sistema de Transformação/Buff
» [Pedido]Sistema Buff
» [EE][ES]Sistema de Buff por tempo
MMORPG Brasil :: OPEN SOURCE ENGINES :: Eclipse :: Tutoriais
Página 1 de 1
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