Corrigindo erros do trade

Algumas coisas passam despercebidas quando testamos em localhost, mas quando está online você pode encontrar muito erros sérios, você pode clicar em um botão do trade 2 vezes ou mais por exemplo e causar erros no servidor, ou também ao aceitar uma troca, a troca seguinte é aceita automaticamente, sem você confirmar, esse tutorial irá corrigir esses e vários outros bugs do trade.

Abra o servidor

1 - No modHandleData,  procure por:

Código:

tradeTarget = TempPlayer(index).TradeRequest

2 - Em cima adicione:

Código:

    If TempPlayer(index).InTrade > 0 Then
        TempPlayer(index).TradeRequest = 0
    Else

3 - Antes de End Sub e ao mesmo depois de:

Código:

SendTradeUpdate tradeTarget, 1

4 - Adicione:

Código:

End If

5 - Agora procure por:

Código:

Sub HandleAcceptTrade(

6 - Depois de:

Código:

Dim itemnum As Long

7 - Adicione:

Código:

 If GetPlayerMap(index) <> GetPlayerMap(TempPlayer(index).InTrade) Then Exit Sub

8 - Embaixo de:

Código:

tradeTarget = TempPlayer(index).InTrade

9 - Adicione

Código:

If tradeTarget > 0 Then

10 - Depois de:

Código:

    TempPlayer(index).InTrade = 0
    TempPlayer(tradeTarget).InTrade = 0

11 - Adicione:

Código:

    TempPlayer(index).AcceptTrade = False
    TempPlayer(tradeTarget).AcceptTrade = False

12 - Antes de End Sub e ao mesmo tempo depois de:

Código:

SendCloseTrade tradeTarget

13 - Adicione:

Código:

End If

14 - Agora procure por:

Código:

Sub HandleDeclineTrade(

15 - Embaixo de:

Código:

tradeTarget = TempPlayer(index).InTrade

16 - Adicione:

Código:

If tradeTarget > 0 Then

17 - Depois de:

Código:

    TempPlayer(index).InTrade = 0
    TempPlayer(tradeTarget).InTrade = 0

18 - Adicione:

Código:

    TempPlayer(index).AcceptTrade = False
    TempPlayer(tradeTarget).AcceptTrade = False

19 - Antes de End Sub e ao mesmo tempo depois de:

Código:

SendCloseTrade tradeTarget

20 - Adicione:

Código:

End If

Créditos:
Valentine

*-* vlw Marlos tava procurano isso desde semana passada