Okay, so I was adding in item stat bonuses, and I managed to get it to work. But I get this dirty feeling that I did it sloppy, so I'd appreciate it if some of you good fellows could give it a once over, and tell me how it looks, and how I could improve it, should it need improving. Here's an example:
Code:
Case ITEM_TYPE_WEAPON
If InvNum <> GetPlayerEquipmentSlot(Index, Weapon) Then
If GetPlayerStat(Index, Stats.Strength) < n Then
Call PlayerMsg(Index, "Your strength is to low to hold this weapon! Required STR (" & n & ")", BrightRed)
Exit Sub
End If
If Item(GetPlayerInvItemNum(Index, InvNum)).MPBonus > 0 Then
Call SetPlayerStat(Index, Magic, GetPlayerStat(Index, Magic) + Item(GetPlayerInvItemNum(Index, InvNum)).MPBonus)
End If
Call SetPlayerEquipmentSlot(Index, InvNum, Weapon)
Else
If Item(GetPlayerInvItemNum(Index, InvNum)).MPBonus > 0 Then
Call SetPlayerStat(Index, Magic, GetPlayerStat(Index, Magic) - Item(GetPlayerInvItemNum(Index, InvNum)).MPBonus)
End If
Call SetPlayerEquipmentSlot(Index, 0, Weapon)
End If
Call SendWornEquipment(Index)
_________________
GIAKEN wrote:
Since I'm into men, not women
GIAKEN wrote:
I can't take these huge penises anymore! All that's left is shame! And blood
Login
Register
FAQ
Search
Members
