FUNKTION:
        nomask public int IsWeapon()

ARGUMENTE:
        keine

RÜCKGABEWERT:
        1 oder 0

BESCHREIBUNG:
        Ist 1, wenn das entsprechende Objekt eine Waffe ist.


BEISPIELE:
        1. sucht alle Waffen im Inventar heraus:
          all_weap = filter_objects(all_inventory(), "IsWeapon");

        2. prueft ob, objekt ob eine Waffe ist
          if (objectp(ob) && ob->IsWeapon())
          {
            // ja, ist eine Waffe
          }
          else
          {
            // nein, ist keine Waffe
          }

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