Aldeia RPG

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Suporte ao desenvolvimento de jogos


4 participantes

    [Dúvida] Receber dano sem equip.

    GallighanMaker
    GallighanMaker
    Colaborador
    Colaborador


    Medalhas : [Dúvida] Receber dano sem equip. ZgLkiRU
    Mensagens : 985
    Créditos : 102

    Ficha do personagem
    Nível: 1
    Experiência:
    [Dúvida] Receber dano sem equip. Left_bar_bleue0/0[Dúvida] Receber dano sem equip. Empty_bar_bleue  (0/0)
    Vida:
    [Dúvida] Receber dano sem equip. Left_bar_bleue30/30[Dúvida] Receber dano sem equip. Empty_bar_bleue  (30/30)

    [Dúvida] Receber dano sem equip. Empty [Dúvida] Receber dano sem equip.

    Mensagem por GallighanMaker Sáb Jul 04, 2015 4:32 pm

    Estou pensando em um sistema onde o jogador receberá dano se não estiver usando uma armadura em determinados mapas como no gelo (receber dano por causa do congelamento). Alguém tem uma base para eu poder me espelhar ou conhece algum metodo funcional?.


    _________________
    [Dúvida] Receber dano sem equip. 8dVK0ku
    using C# and import Python developer || Expert in Unity Engine IDE. || [Dúvida] Receber dano sem equip. 769_heart 2D pixel games.
    Dooolly
    Dooolly
    Colaborador
    Colaborador


    Medalhas : [Dúvida] Receber dano sem equip. Trophy12
    Mensagens : 1227
    Créditos : 153

    Ficha do personagem
    Nível: 1
    Experiência:
    [Dúvida] Receber dano sem equip. Left_bar_bleue0/0[Dúvida] Receber dano sem equip. Empty_bar_bleue  (0/0)
    Vida:
    [Dúvida] Receber dano sem equip. Left_bar_bleue30/30[Dúvida] Receber dano sem equip. Empty_bar_bleue  (30/30)

    [Dúvida] Receber dano sem equip. Empty Re: [Dúvida] Receber dano sem equip.

    Mensagem por Dooolly Sáb Jul 04, 2015 9:37 pm

    Vamo lá então [Dúvida] Receber dano sem equip. 2835316747

    Abra o Serve-side.

    Em modConstant procure por:
    Código:
    Public Const MAP_MORAL_SAFE As Byte = 1

    Abaixo adicione:
    Código:
    Public Const MAP_MORAL_DAMAGE As Byte = 2

    Agora em modServerLoop na Sub ServerLoop() procure por:
    Código:
    ServerOnline = True

    Acima adicione:
    Código:
    Dim TickDamage as long

    Ainda nessa mesma sub procura por:
    Código:
    ' Check for disconnections every half second
            If Tick > tmr500 Then

    Acima adicione:
    Código:
    If Tick > TickDamage Then
                For i = 1 To Player_HighIndex
                    If Map(GetPlayerMap(i)).Moral = MAP_MORAL_DAMAGE Then
                      SetPlayerVital i, HP, GetPlayerVital(i, HP) - 10 ' Onde tem 10 mude para o valor do dano
                      SendActionMsg GetPlayerMap(i), "-10 HP", BrightRed, ACTIONMSG_SCROLL, GetPlayerX(i) * 32, GetPlayerY(i) * 32, 1
                    End If
                Next
               
                TickDamage = GetTickCount + 1000  ' onde tem 1000 mude para o tempo q vc queira q dê o dando 1000 = 1s
            End If

    Agora no Client-Side
    Vá no frmEditor_MapProperties e na cmbMoral na propriedade "List"
    adicione: Damage Zone

    pronto, não testei fiz agr, então [Dúvida] Receber dano sem equip. 2835316747
    GallighanMaker
    GallighanMaker
    Colaborador
    Colaborador


    Medalhas : [Dúvida] Receber dano sem equip. ZgLkiRU
    Mensagens : 985
    Créditos : 102

    Ficha do personagem
    Nível: 1
    Experiência:
    [Dúvida] Receber dano sem equip. Left_bar_bleue0/0[Dúvida] Receber dano sem equip. Empty_bar_bleue  (0/0)
    Vida:
    [Dúvida] Receber dano sem equip. Left_bar_bleue30/30[Dúvida] Receber dano sem equip. Empty_bar_bleue  (30/30)

    [Dúvida] Receber dano sem equip. Empty Re: [Dúvida] Receber dano sem equip.

    Mensagem por GallighanMaker Dom Jul 05, 2015 2:48 pm

    Esta dando problema :
    https://i.imgur.com/QqUbhT9.png

    [Dúvida] Receber dano sem equip. QqUbhT9

    Depois que eu salvo o mapa ele salva como damage zone mas quando fecho o editor ele da esse problema acima, mas mesmo com o problema, dentro do jogo ele detecta o mapa, causa o dano mas depois de um tempo da o erro tbm.


    _________________
    [Dúvida] Receber dano sem equip. 8dVK0ku
    using C# and import Python developer || Expert in Unity Engine IDE. || [Dúvida] Receber dano sem equip. 769_heart 2D pixel games.
    avatar
    gui408
    Ocasional
    Ocasional


    Mensagens : 227
    Créditos : 10

    [Dúvida] Receber dano sem equip. Empty Re: [Dúvida] Receber dano sem equip.

    Mensagem por gui408 Dom Jul 05, 2015 2:56 pm

    Vc coloco sistema e deletou todos os maps antes?
    GallighanMaker
    GallighanMaker
    Colaborador
    Colaborador


    Medalhas : [Dúvida] Receber dano sem equip. ZgLkiRU
    Mensagens : 985
    Créditos : 102

    Ficha do personagem
    Nível: 1
    Experiência:
    [Dúvida] Receber dano sem equip. Left_bar_bleue0/0[Dúvida] Receber dano sem equip. Empty_bar_bleue  (0/0)
    Vida:
    [Dúvida] Receber dano sem equip. Left_bar_bleue30/30[Dúvida] Receber dano sem equip. Empty_bar_bleue  (30/30)

    [Dúvida] Receber dano sem equip. Empty Re: [Dúvida] Receber dano sem equip.

    Mensagem por GallighanMaker Dom Jul 05, 2015 3:36 pm

    sim e não surtiu efeito, persiste o erro.


    _________________
    [Dúvida] Receber dano sem equip. 8dVK0ku
    using C# and import Python developer || Expert in Unity Engine IDE. || [Dúvida] Receber dano sem equip. 769_heart 2D pixel games.
    Dooolly
    Dooolly
    Colaborador
    Colaborador


    Medalhas : [Dúvida] Receber dano sem equip. Trophy12
    Mensagens : 1227
    Créditos : 153

    Ficha do personagem
    Nível: 1
    Experiência:
    [Dúvida] Receber dano sem equip. Left_bar_bleue0/0[Dúvida] Receber dano sem equip. Empty_bar_bleue  (0/0)
    Vida:
    [Dúvida] Receber dano sem equip. Left_bar_bleue30/30[Dúvida] Receber dano sem equip. Empty_bar_bleue  (30/30)

    [Dúvida] Receber dano sem equip. Empty Re: [Dúvida] Receber dano sem equip.

    Mensagem por Dooolly Dom Jul 05, 2015 5:13 pm

    GallighanMaker escreveu:sim e não surtiu efeito, persiste o erro.

    Não precisa apagar mapas!

    mude o codigo para esse:
    Código:
    If Tick > TickDamage Then
                For i = 1 To Player_HighIndex
                  If IsPlaying(i) Then
                    If Map(GetPlayerMap(i)).Moral = MAP_MORAL_DAMAGE Then
                      SetPlayerVital i, HP, GetPlayerVital(i, HP) - 10 ' Onde tem 10 mude para o valor do dano
                      SendActionMsg GetPlayerMap(i), "-10 HP", BrightRed, ACTIONMSG_SCROLL, GetPlayerX(i) * 32, GetPlayerY(i) * 32, 1
                      SendVital i, HP
                    End If
                  End If
                Next
               
                TickDamage = GetTickCount + 1000  ' onde tem 1000 mude para o tempo q vc queira q dê o dando 1000 = 1s
            End If
    GallighanMaker
    GallighanMaker
    Colaborador
    Colaborador


    Medalhas : [Dúvida] Receber dano sem equip. ZgLkiRU
    Mensagens : 985
    Créditos : 102

    Ficha do personagem
    Nível: 1
    Experiência:
    [Dúvida] Receber dano sem equip. Left_bar_bleue0/0[Dúvida] Receber dano sem equip. Empty_bar_bleue  (0/0)
    Vida:
    [Dúvida] Receber dano sem equip. Left_bar_bleue30/30[Dúvida] Receber dano sem equip. Empty_bar_bleue  (30/30)

    [Dúvida] Receber dano sem equip. Empty Re: [Dúvida] Receber dano sem equip.

    Mensagem por GallighanMaker Dom Jul 05, 2015 5:42 pm

    Agora aparentemente esta tudo ok e funcionando, para quem quiser usar aqui o codigo com a verificação da armadura e adicionei a funcao KillPlayer quando o hp chegar a 0.

    Código:
        'Damege map cold
            If Tick > TickDamage Then
                For i = 1 To Player_HighIndex
                   If IsPlaying(i) Then
                    If Map(GetPlayerMap(i)).Moral = MAP_MORAL_DAMAGE Then
                        If GetPlayerEquipment(i, Armor) <= 0 Then 'Verifica se esta usando uma armadura
                       SetPlayerVital i, HP, GetPlayerVital(i, HP) - 10 ' Onde tem 10 mude para o valor do dano
                       SendActionMsg GetPlayerMap(i), "-10 HP", BrightRed, ACTIONMSG_SCROLL, GetPlayerX(i) * 32, GetPlayerY(i) * 32, 1
                       PlayerMsg i, "You lost 10 HP because of the cold, put on a armor for warmth.", BrightRed
                       SendVital i, HP
                       If GetPlayerVital(i, HP) <= 0 Then
                            KillPlayer i
                            PlayerMsg i, "You're killed by a cold.", BrightRed
                   End If
                   End If
                   End If
                   End If
                Next
                
                TickDamage = timeGetTime + 10000  ' onde tem 1000 mude para o tempo q vc queira q dê o dando 1000 = 1s
            End If


    Demonstração (GIF):

    [Dúvida] Receber dano sem equip. 4k30Mr0

    ..


    Pedido/Dúvida atendido, pode trancar o tópico se quiser.


    _________________
    [Dúvida] Receber dano sem equip. 8dVK0ku
    using C# and import Python developer || Expert in Unity Engine IDE. || [Dúvida] Receber dano sem equip. 769_heart 2D pixel games.
    joaopaulo98
    joaopaulo98
    Experiente
    Experiente


    Mensagens : 632
    Créditos : 45

    [Dúvida] Receber dano sem equip. Empty Re: [Dúvida] Receber dano sem equip.

    Mensagem por joaopaulo98 Seg Jul 06, 2015 11:06 pm

    GallighanMaker escreveu:Agora aparentemente esta tudo ok e funcionando, para quem quiser usar aqui o codigo com a verificação da armadura e adicionei a funcao KillPlayer quando o hp chegar a 0.

    Código:
        'Damege map cold
            If Tick > TickDamage Then
                For i = 1 To Player_HighIndex
                   If IsPlaying(i) Then
                    If Map(GetPlayerMap(i)).Moral = MAP_MORAL_DAMAGE Then
                        If GetPlayerEquipment(i, Armor) <= 0 Then 'Verifica se esta usando uma armadura
                       SetPlayerVital i, HP, GetPlayerVital(i, HP) - 10 ' Onde tem 10 mude para o valor do dano
                       SendActionMsg GetPlayerMap(i), "-10 HP", BrightRed, ACTIONMSG_SCROLL, GetPlayerX(i) * 32, GetPlayerY(i) * 32, 1
                       PlayerMsg i, "You lost 10 HP because of the cold, put on a armor for warmth.", BrightRed
                       SendVital i, HP
                       If GetPlayerVital(i, HP) <= 0 Then
                            KillPlayer i
                            PlayerMsg i, "You're killed by a cold.", BrightRed
                   End If
                   End If
                   End If
                   End If
                Next
                
                TickDamage = timeGetTime + 10000  ' onde tem 1000 mude para o tempo q vc queira q dê o dando 1000 = 1s
            End If


    Demonstração (GIF):

    [Dúvida] Receber dano sem equip. 4k30Mr0

    ..


    Pedido/Dúvida atendido, pode trancar o tópico se quiser.

     TickDamage = timeGetTime + 10000  ' onde tem 1000 mude para o tempo q vc queira q dê o dando 1000 = 1s


    timeGetTime " erro variavel não definida "


    _________________
    Dancinha:


    METAS 2020.







    • APRENDER TOCAR VIOLINO ||||||||||

    • FAZER ETEC DESENVOLVIMENTO EM SISTEMA ||||||||||

    • CRIAR UM APLICATIVO RENTÁVEL||||||||||

    • GANHAR DINHEIRO PROGRAMANDO ||||||||||

    GallighanMaker
    GallighanMaker
    Colaborador
    Colaborador


    Medalhas : [Dúvida] Receber dano sem equip. ZgLkiRU
    Mensagens : 985
    Créditos : 102

    Ficha do personagem
    Nível: 1
    Experiência:
    [Dúvida] Receber dano sem equip. Left_bar_bleue0/0[Dúvida] Receber dano sem equip. Empty_bar_bleue  (0/0)
    Vida:
    [Dúvida] Receber dano sem equip. Left_bar_bleue30/30[Dúvida] Receber dano sem equip. Empty_bar_bleue  (30/30)

    [Dúvida] Receber dano sem equip. Empty Re: [Dúvida] Receber dano sem equip.

    Mensagem por GallighanMaker Ter Jul 07, 2015 12:10 am

    é que a engine que eu uso utiliza timeGetTime no seu caso tente com:
    Código:
     TickDamage = GetTickCount + 10000  ' onde tem 1000 mude para o tempo q vc queira q dê o dando 1000 = 1s


    _________________
    [Dúvida] Receber dano sem equip. 8dVK0ku
    using C# and import Python developer || Expert in Unity Engine IDE. || [Dúvida] Receber dano sem equip. 769_heart 2D pixel games.
    joaopaulo98
    joaopaulo98
    Experiente
    Experiente


    Mensagens : 632
    Créditos : 45

    [Dúvida] Receber dano sem equip. Empty Re: [Dúvida] Receber dano sem equip.

    Mensagem por joaopaulo98 Ter Jul 07, 2015 12:23 am

    funcionou  vlw mano Successful


    _________________
    Dancinha:


    METAS 2020.







    • APRENDER TOCAR VIOLINO ||||||||||

    • FAZER ETEC DESENVOLVIMENTO EM SISTEMA ||||||||||

    • CRIAR UM APLICATIVO RENTÁVEL||||||||||

    • GANHAR DINHEIRO PROGRAMANDO ||||||||||


    Conteúdo patrocinado


    [Dúvida] Receber dano sem equip. Empty Re: [Dúvida] Receber dano sem equip.

    Mensagem por Conteúdo patrocinado


      Data/hora atual: Qua maio 08, 2024 6:21 am