Fix Hotbar Versões[1.x.x, 2.x.x]

Bem, isso é só um fix feito pelo Robin na TOD, e como ninguém postou, decidi postar aqui. Esse fix não está em nenhuma versão original do EO, apenas nas versões editadas, como o Modifications Nova 2.6 por exemplo.

Procure por:

Código:

        Call CastSpell(PlayerSpells(Hotbar(Slot).Slot))
        Exit Sub

Substitua por:

Código:

        For x = 1 To MAX_PLAYER_SPELLS
            ' is the spell matching the hotbar?
            If PlayerSpells(x) = Hotbar(Slot).Slot Then
                ' found it, cast it
                CastSpell x
                Exit Sub
            End If
        Next
        ' can't find the spell, exit out
        Exit Sub

Agora substitua a primeira linha do procedimento com isso:

Código:

Dim Buffer As clsBuffer, x As Long

Créditos:
Robin