ObjectNumber

func Activate(pCaller)
{
  CreateMenu(GetID(), pCaller, pCaller, 0, "Kein geeignetes Objekte in Reichweite!");
  var obj;
  while(obj = FindObject(0, -50, -50, 100, 100, OCF_Chop(), 0, 0, NoContainer(), obj))
    AddMenuItem("%s fällen", Format("SetCommand(this(), \"Chop\", Object(%d))", ObjectNumber(obj)), GetID(obj), pCaller);
}

Wird die Funktion aufgerufen, so wird im aufrufenden Objekt (pCaller) ein Menu erzeugt, das alle fällbaren (OCF_Chop()) Objekte in einem bestimmten Bereich um das Objekt enthält. Das Auswählen eines der Menüeinträge bewirkt dann, dass über SetCommand das Kommando "Chop" gesetzt wird. Da dabei der Objektpointer des Objekts zwischengespeichert werden muss, wird der Pointer zuerst in die Objektnummer umgewandelt.