Isto é uma pré-visualização de um tema em Hitskin.com
Instalar o tema • Voltar para a ficha do tema
Animação completa da magia em area dos NPC's
3 participantes
Página 1 de 2
Página 1 de 2 • 1, 2
Animação completa da magia em area dos NPC's
Bom a um bom tempo eu pedi esse sistema lá no Suporte e Pedidos porem ninguém me respondeu então eu resolvi ir lá e fazer...(deve ser assim que as melhores invenções foram feitas, mesmo subestimando a si mesmo vai lá e tenta .)
Meu pedido:
https://www.aldeiarpg.com/t9505-animacao-do-spell-em-area-do-npc-nao-aparece?highlight=anima%C3%A7%C3%A3o+da+magia+em+area
Bom agradeço ao Valentine por ter postado o sistema "Animação spell em area" aqui na aldeia feito pelo ricardo
que dele eu modifiquei para fazer com que ele sirva para os npc's
O Sistema:
É necessário que aja o sistema de npc usando spell (claro )
Tudo é feito no Server Side
No final do mod Combat adicione:
E na Sub NpcSpellPlayer em baixo de:
Adicione:
É isso, espero ter ajudado e caso encontrem algo inútil que só sirva para ocupar espaço ou algo que esteja errado me ajudem comentando como posso melhorar.
Não sei se mereço créditos, mas acho que os créditos deveriam ser dados para o Ricardo por ter feito e o Valentine por ter postado o original.
~Snoopy
Meu pedido:
https://www.aldeiarpg.com/t9505-animacao-do-spell-em-area-do-npc-nao-aparece?highlight=anima%C3%A7%C3%A3o+da+magia+em+area
Bom agradeço ao Valentine por ter postado o sistema "Animação spell em area" aqui na aldeia feito pelo ricardo
que dele eu modifiquei para fazer com que ele sirva para os npc's
O Sistema:
É necessário que aja o sistema de npc usando spell (claro )
Tudo é feito no Server Side
No final do mod Combat adicione:
- Código:
Function InUseArea2(ByVal index As Long, ByVal mapNpcNum As Long, ByVal SpellNum As Long)
Dim n As Byte
Dim Mapa As Long, x As Long, y As Long
Dim NpcNum As Long
Dim NpcX As Long
Dim NpcY As Long
Dim MapNum As Long
MapNum = GetPlayerMap(index)
n = Spell(SpellNum).AoE
Mapa = MapNpc(MapNum).Npc(mapNpcNum).Num
For x = 0 To n
For y = 0 To n
SendAnimation Mapa, Spell(SpellNum).SpellAnim, MapNpc(MapNum).Npc(mapNpcNum).x - x, MapNpc(MapNum).Npc(mapNpcNum).y + y
SendAnimation Mapa, Spell(SpellNum).SpellAnim, MapNpc(MapNum).Npc(mapNpcNum).x + x, MapNpc(MapNum).Npc(mapNpcNum).y + y
SendAnimation Mapa, Spell(SpellNum).SpellAnim, MapNpc(MapNum).Npc(mapNpcNum).x - x, MapNpc(MapNum).Npc(mapNpcNum).y - y
SendAnimation Mapa, Spell(SpellNum).SpellAnim, MapNpc(MapNum).Npc(mapNpcNum).x + x, MapNpc(MapNum).Npc(mapNpcNum).y - y
Next
Next
End Function
E na Sub NpcSpellPlayer em baixo de:
- Código:
If GetPlayerMap(i) = MapNum Then
Adicione:
- Código:
InUseArea2 i, mapNpcNum, SpellNum
É isso, espero ter ajudado e caso encontrem algo inútil que só sirva para ocupar espaço ou algo que esteja errado me ajudem comentando como posso melhorar.
Não sei se mereço créditos, mas acho que os créditos deveriam ser dados para o Ricardo por ter feito e o Valentine por ter postado o original.
~Snoopy
Snoopy- Iniciante
- Mensagens : 58
Créditos : 7
Re: Animação completa da magia em area dos NPC's
wow, Pelo que entendi, interessante. Não passa de uma pequena adição mas muito usual.
Se não me engano nas transposições para o DX8 não colocaram a questão dos SendAnimations, referente as animações, porque alguns preferiam adicionar um próprio "Editor de Partículas".
Acompanhei um pouco disso na época da Touch ~
Porém parabéns, assim que eu recuperar o VB =P Estarei implantando.
Se não me engano nas transposições para o DX8 não colocaram a questão dos SendAnimations, referente as animações, porque alguns preferiam adicionar um próprio "Editor de Partículas".
Acompanhei um pouco disso na época da Touch ~
Porém parabéns, assim que eu recuperar o VB =P Estarei implantando.
_________________
"Mistress of shattered hopes and forever broken dreams"
Profane ~- Colaborador
- Mensagens : 818
Créditos : 130
Re: Animação completa da magia em area dos NPC's
Obrigado, é o meu primeiro tutorial então mensagens construtivas ajudam muito
Snoopy- Iniciante
- Mensagens : 58
Créditos : 7
Re: Animação completa da magia em area dos NPC's
Bom para mim não funcionou haha. O seu. Olhei o tutorial a qual você linkou...(Feito pelo Valentine)
Minha solução foi:
ModCombat - Procurar por "Sub NpcSpellPlayer(ByVal mapNpcNum As Long, ByVal victim As Long, SpellSlotNum As Long)" na sub responsável pelo Npc usar Spells e.e
Nesta sub procure por:
Abaixo disso adicione:
Na mesma sub no topo, e.e Onde ficam as Dim que expressão valores e variáveis. Adicione isso:
E teste =P
##Lembrando que tem de ter feito o tutorial do Valentine. Adicionando a Function InUseArea no seu ModCombat.
ATT
Minha solução foi:
ModCombat - Procurar por "Sub NpcSpellPlayer(ByVal mapNpcNum As Long, ByVal victim As Long, SpellSlotNum As Long)" na sub responsável pelo Npc usar Spells e.e
Nesta sub procure por:
- Código:
' AOE Damaging Spells
Case SPELL_TYPE_DAMAGEHP
' Make sure an npc waits for the spell to cooldown
If Spell(SpellNum).IsAoE Then
For i = 1 To Player_HighIndex
If isPlaying(i) Then
If GetPlayerMap(i) = MapNum Then
Abaixo disso adicione:
- Código:
If Spell(SpellNum).IsAoE = True Then
InUseArea i, SpellNum
DidCast = True
End If
End If
Na mesma sub no topo, e.e Onde ficam as Dim que expressão valores e variáveis. Adicione isso:
- Código:
Dim DidCast As Boolean
E teste =P
##Lembrando que tem de ter feito o tutorial do Valentine. Adicionando a Function InUseArea no seu ModCombat.
ATT
_________________
"Mistress of shattered hopes and forever broken dreams"
Profane ~- Colaborador
- Mensagens : 818
Créditos : 130
Re: Animação completa da magia em area dos NPC's
Olha no meu ficou como se a magia fosse em área só que a área fica no alvo ex. o NPC me ataca com uma magia a área fica só ao meu redor e não do NPC como se fosse magia de área alvo. poderia me explicar como eu coloco para só o NPC ter o alvo ao redor dele.
Motodark- Ocasional
- Mensagens : 169
Créditos : 5
Re: Animação completa da magia em area dos NPC's
tente trocar o
por
lembre-se eu não testei só acho que essa é a solução.
- Código:
If Spell(SpellNum).IsAoE = True Then[size=12][/size]
InUseArea i, SpellNum[size=12][/size]
DidCast = True[size=12][/size]
End If[size=12][/size]
End If
por
- Código:
If Spell(SpellNum).IsAoE = True Then[size=12][/size]
InUseArea2 i, SpellNum[size=12][/size]
DidCast = True[size=12][/size]
End If[size=12][/size]
End If
lembre-se eu não testei só acho que essa é a solução.
Snoopy- Iniciante
- Mensagens : 58
Créditos : 7
Re: Animação completa da magia em area dos NPC's
Exato' uehuh. A questão de mudar o chamado sub que não mudei :x
;3~
;3~
_________________
"Mistress of shattered hopes and forever broken dreams"
Profane ~- Colaborador
- Mensagens : 818
Créditos : 130
Re: Animação completa da magia em area dos NPC's
Profane~ uma duvida, eu testei este mesmo tutorial em outra engine e quando o npc usa a spell a tela trava até que o player morra pelo npc, você sabe como resolver isso?
Snoopy- Iniciante
- Mensagens : 58
Créditos : 7
Re: Animação completa da magia em area dos NPC's
Estive dando assistência ao Motodark em relação a este tuto.
Não existe uma "falha" que possa levar a este seu caso. Por cima me leva a crer que o Sistema de Npc Spell foi implantado de maneira falha ;x Seria bom que citar qual a Engine exata =P.
Vamos dizer que você implantou errado o Sistema de Spell, no caso gerou um cancêr no modCombat. E esse cancer morre ao Player ser enviado para o Sub OnDeath, que em sí é um "termino" da logística do ModCombat.
Sugiro que verifique o NpcSpell's, e lembre-se, adicionou NPCSpell's, delete todos os Npc's.
Att
Não existe uma "falha" que possa levar a este seu caso. Por cima me leva a crer que o Sistema de Npc Spell foi implantado de maneira falha ;x Seria bom que citar qual a Engine exata =P.
Vamos dizer que você implantou errado o Sistema de Spell, no caso gerou um cancêr no modCombat. E esse cancer morre ao Player ser enviado para o Sub OnDeath, que em sí é um "termino" da logística do ModCombat.
Sugiro que verifique o NpcSpell's, e lembre-se, adicionou NPCSpell's, delete todos os Npc's.
Att
_________________
"Mistress of shattered hopes and forever broken dreams"
Profane ~- Colaborador
- Mensagens : 818
Créditos : 130
Re: Animação completa da magia em area dos NPC's
Bom a magia está como se fosse em área é alvo ao mesmo tempo ou seja o NPC solta uma magia em área em mim só que sendo somente no meu alvo é também não está tendo pausas na magia/skill está repetindo simultaneamente.
andei prestando atenção percebi que o cast anim não está funcionando onde é o comando de animação em área né onde eu ativo esse comand ? o spell não está dando intervalos.
andei prestando atenção percebi que o cast anim não está funcionando onde é o comando de animação em área né onde eu ativo esse comand ? o spell não está dando intervalos.
Motodark- Ocasional
- Mensagens : 169
Créditos : 5
Página 1 de 2 • 1, 2
Tópicos semelhantes
» Animação da Magia em Area
» ¿Magia de area no ABS do NP 3.0?
» Skills (Magia) em area
» Magia em área somente nos NPC's
» Alguem me ajuda Magia em area
» ¿Magia de area no ABS do NP 3.0?
» Skills (Magia) em area
» Magia em área somente nos NPC's
» Alguem me ajuda Magia em area
Página 1 de 2
Permissões neste sub-fórum
Não podes responder a tópicos
|
|