Alenaldo Membro
Mensagens : 38 Moeda : 104 Pontos : 4 Data de inscrição : 05/01/2013 Idade : 31 Localização : São luis MA
| Assunto: [EO 1.xx, 2.xx] Fix Hotbar Seg Jan 14, 2013 8:54 am | |
| Robin diz: "Um grande obrigado ao Yami por ser a primeira pessoa a realmente relatar este erro maldito corretamente. Era simplesmente um pouco de estupidez da minha parte." Pesquisar: CÓDIGO: - Código:
-
Call CastSpell(PlayerSpells(Hotbar(Slot).Slot)) Exit Sub
Substituir por: CÓDIGO: - 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
Substitua a linha superior do procedimento, com o seguinte: CÓDIGO: - Código:
-
Dim Buffer As clsBuffer, x As Long
Créditos: FREE MMORPG MAKER - ROBIN&YAMI - E eu por postar aqui. | |
|