zoomcontrol.scpt

on run argv
  set zoom to "zoom.us"
  set wait to 0.5

  log "activating zoom"
  tell application zoom to activate

  # Wait for Zoom's create meeting window to open
  tell application "System Events"
    repeat until visible of process zoom is true
      log "waiting for zoom process"
      delay wait
      set visible of process zoom to true
    end repeat
  end tell

  tell application "System Events"
    tell process zoom
      keystroke "w" using {command down}
    end tell
  end tell

  tell application "System Events"
    tell process zoom
      click button "Leave Meeting" of window "End Meeting"
    end tell
  end tell
end run