anchor.diff:          keybd_event(VK_LCONTROL, $9D, KEYEVENTF_KEYUP, 0); // Release Control
         end;
         else
  +      begin
           Result := 'Other app';
  +      end;
       end;
   
  -    CodeSite.SendMsg(Result);
  +    CodeSite.SendMsg(Result + ' param1: ' + param1.ToString + ' param2: ' + param2.ToString);
     end;
   end;
   
  
positive.code: 
  function TCommandResource.Execute(param1: Integer; param2: Integer): string;
  begin
    if (param1 + param2 < 2) then
    begin
      case GetCurrentApplication of
        Teams: begin
          Result := 'Teams: toggle mic';
          SetForegroundWindow(FindWindow(nil, PChar('Microsoft Teams')));
  
          keybd_event(VK_LCONTROL, $9D,0 , 0); // Press Control
          keybd_event(VK_LSHIFT, $AA,0 , 0); // Press Shift
          keybd_event(Ord('M'), Ord('M'), 0 , 0); // Press M
  
          keybd_event(Ord('M'), Ord('M'), KEYEVENTF_KEYUP , 0); // Release M
          keybd_event(VK_LSHIFT, $AA, KEYEVENTF_KEYUP, 0); // Release Shift
          keybd_event(VK_LCONTROL, $9D, KEYEVENTF_KEYUP, 0); // Release Control
        end;
        Zoom: begin
          Result := 'Zoom: toggle mic';
  
negative.code:         SetForegroundWindow(FindWindow(nil, PChar('Skype')));
  
          keybd_event(VK_LCONTROL, $9D,0 , 0); // Press Control
          keybd_event(VK_LSHIFT, $AA,0 , 0); // Press Shift
          keybd_event(Ord('M'), Ord('M'), 0 , 0); // Press M
  
          keybd_event(Ord('M'), Ord('M'), KEYEVENTF_KEYUP , 0); // Release M
  