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);
}

This function opens a menu in the calling object (pCaller) which contains all chopable objects (OCF_Chop()) in the object's vicinity. Selecting a menu entry then uses SetCommand to set the command "Chop" in the object. Since this requires storage of the object pointer, the pointer is first converted into the object number.