Sistema item que não pode ser negociado nem dropado Hitskin_logo Hitskin.com

Isto é uma pré-visualização de um tema em Hitskin.com
Instalar o temaVoltar para a ficha do tema

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

Sistema item que não pode ser negociado nem dropado

3 participantes

Ir para baixo

Sistema item que não pode ser negociado nem dropado Empty Sistema item que não pode ser negociado nem dropado

Mensagem por Hashirama Ter maio 15, 2018 4:44 pm

Fala galera hoje trago a vocês uma pequena modificação que você vai poder colocar se o item pode ou não pode ser negociado nem jogado no chão, isso serve para algum tipo de item evento, ou algum item cash usem como quiserem rsrsrs

Começando pelo servidor

va em Private Type ItemRec no final antes do End Type add
Código:
NoTrade As Byte

agora em modHandleData procure por a Sub HandleMapDropItem, abaixo de 
Código:
If TempPlayer(Index).InBank Or TempPlayer(Index).InShop Then Exit Sub
add
Código:
If Item(GetPlayerInvItemNum(Index, InvNum)).NoTrade > 0 Then
     PlayerMsg Index, "Você não pode derrubar este item. ", BrightRed
     Exit Sub
End If
isso vai fazer que o item não possa ser jogado no chão

ainda em modHandleData procure por Sub HandleTradeItem e abaixo de 
Código:
' make sure they have the amount they offer
    If Amount < 0 Or Amount > GetPlayerInvItemValue(Index, InvSlot) Then
        Exit Sub
    End If
add
Código:
If Item(ItemNum).NoTrade > 0 Then
    PlayerMsg Index, "Você não pode negociar este item. ", BrightRed
    Exit Sub
End If

feito isso vai fazer que o item não possa ser negociado

Pronto servidor pronto, agora vamos ao Client

Client ~

na frmEditorItem
em algum lugar dela crie um chkBox com name chkNoTrade deve ficar assim
Sistema item que não pode ser negociado nem dropado Unknown
de 2 cliques no chkNoTrade e add
Código:
Item(EditorIndex).NoTrade = chkNoTrade.value

agora na modGameEditors procure por 
Código:
frmEditor_Item.txtDesc.Text = Trim$(.Desc)


abaixo disso add 
Código:
frmEditor_Item.chkNoTrade.value = .NoTrade

agora em Private Type ItemRec no final antes do End Type add
Código:
NoTrade As Byte

Pronto feito isso o sistema está pronto, sempre que você trocar ou derrubar um item, vai ser verificado se o item tem ou não tem o Valor da variavel NoTrade

é isso até mais

_________________
Apoia nosso projeto? use nossa assinatura
Hashirama
Hashirama
Membro de Honra
Membro de Honra

Mensagens : 413
Créditos : 133

Ir para o topo Ir para baixo

Sistema item que não pode ser negociado nem dropado Empty Re: Sistema item que não pode ser negociado nem dropado

Mensagem por Valentine Ter maio 15, 2018 5:36 pm

Agradecido por compartilhar com a gente.
Valentine
Valentine
Administrador
Administrador

Medalhas : Sistema item que não pode ser negociado nem dropado ZgLkiRU
Mensagens : 5341
Créditos : 1164

https://www.aldeiarpg.com/

Ir para o topo Ir para baixo

Sistema item que não pode ser negociado nem dropado Empty Re: Sistema item que não pode ser negociado nem dropado

Mensagem por Hashirama Qua maio 16, 2018 1:03 pm

vlw valentine, estou com meu projeto a ser lançado, quando tiver mais tempo vou movimentar mais a area de tutoriais aqui da EO, abraços

_________________
Apoia nosso projeto? use nossa assinatura
Hashirama
Hashirama
Membro de Honra
Membro de Honra

Mensagens : 413
Créditos : 133

Ir para o topo Ir para baixo

Sistema item que não pode ser negociado nem dropado Empty Re: Sistema item que não pode ser negociado nem dropado

Mensagem por Kies Qua maio 16, 2018 1:47 pm

Hashirama escreveu:vlw valentine, estou com meu projeto a ser lançado, quando tiver mais tempo vou movimentar mais a area de tutoriais aqui da EO, abraços

traz um de atravessar jogadores em zonas no pvp
Kies
Kies
Diva
Diva

Mensagens : 1154
Créditos : 124

Ficha do personagem
Nível: 1
Experiência:
Sistema item que não pode ser negociado nem dropado Left_bar_bleue0/0Sistema item que não pode ser negociado nem dropado Empty_bar_bleue  (0/0)
Vida:
Sistema item que não pode ser negociado nem dropado Left_bar_bleue30/30Sistema item que não pode ser negociado nem dropado Empty_bar_bleue  (30/30)

Ir para o topo Ir para baixo

Sistema item que não pode ser negociado nem dropado Empty Re: Sistema item que não pode ser negociado nem dropado

Mensagem por Hashirama Qua maio 16, 2018 5:43 pm

tenta ai acho que deve funcionar não testei

no Client procure por
Código:
' Check to see if a player is already on that tile
    For i = 1 To Player_HighIndex
        if IsPlaying(i) And GetPlayerMap(i) = GetPlayerMap(MyIndex) Then
            If GetPlayerX(i) = x Then
                If GetPlayerY(i) = y Then
                    CheckDirection = True
                  Exit Function
              End If
            End If
        End If
    Next i

e mude para

Código:
' Check to see if a player is already on that tile
    For i = 1 To Player_HighIndex
        If Map.Moral = MAP_MORAL_SAFE Then
            If IsPlaying(i) And GetPlayerMap(i) = GetPlayerMap(MyIndex) Then
                If GetPlayerX(i) = x Then
                    If GetPlayerY(i) = Y Then
                        CheckDirection = True
                        Exit Function
                    End If
                End If
            End If
        End If
    Next i

deve funcionar, verifica se você estiver em zona segura você não atravessa jogadores, caso tiver em outra zona você atravessa que no caso seria a zona de pvp, mais creio que ficaria melhor ao contrario

_________________
Apoia nosso projeto? use nossa assinatura
Hashirama
Hashirama
Membro de Honra
Membro de Honra

Mensagens : 413
Créditos : 133

Ir para o topo Ir para baixo

Sistema item que não pode ser negociado nem dropado Empty Re: Sistema item que não pode ser negociado nem dropado

Mensagem por Conteúdo patrocinado


Conteúdo patrocinado


Ir para o topo Ir para baixo

Ir para o topo


 
Permissões neste sub-fórum
Não podes responder a tópicos