FUNKTION:
        nomask public int IsShield()

ARGUMENTE:
        keine

RÜCKGABEWERT:
        1 oder 0

BESCHREIBUNG:
        Ist 1, wenn das entsprechende Objekt ein Schild ist.


BEISPIELE:
        1. sucht alle Schilde im Inventar heraus:
          all_shi = filter_objects(all_inventory(), "IsShield");

        2. prueft ob, objekt ob eine ein Schild ist
          if (objectp(ob) && ob->IsShield())
          {
            // ja
          }
          else
          {
            // nein
          }

SIEHE AUCH:
        IsWeapon(L), IsArmour(L), waffen_ruestungen(WL), armour(STD),
        weapon(STD)