Code Error

[Anthony]

No, he is missing an End if.

Code:

Case ITEM_TYPE_WEAPON
                        If Item(GetPlayerInvItemNum(index, InvNum)).TwoHanded < 1 Then
                          If InvNum = GetPlayerEquipmentSlot(index, Weapon) Then
                                Call SetPlayerEquipmentSlot(index, 0, Weapon)
                                Call SendWornEquipment(index)
                          End If
                                MapItem(GetPlayerMap(index), i).Dur = GetPlayerInvItemDur(index, InvNum)
                        If InvNum = GetPlayerEquipmentSlot(index, Weapon) Then
                            Call SetPlayerEquipmentSlot(index, 0, Weapon)
                            Call SendWornEquipment(index)
                        End If
                        MapItem(GetPlayerMap(index), i).Dur = GetPlayerInvItemDur(index, InvNum)