Macbook-Applescript for Mobilepass automation

gistfile1.txt

-- AppleScript to copy a SafeNet MobilePASS OTP.
set passwd to "0000"

-- Make sure MobilePASS is not running
tell application "MobilePASS"
  quit
  delay 0.5
end tell

-- Start MobilePASS
tell application "MobilePASS"
  activate
  delay 0.2
end tell

-- Copy token
tell application "System Events"
  -- Give the window focus in a robust way
  set frontmostProcess to first process where it is frontmost
  set visible of frontmostProcess to false
  repeat while (frontmostProcess is frontmost)
    delay 0.1
  end repeat
  set secondFrontmost to name of first process where it is frontmost
  set frontmost of frontmostProcess to true

  -- Select the first item in the list
  tell table 1 of scroll area 1 of window "MobilePASS" of application process "MobilePASS"
    delay 0.5
    select row 1
  end tell

  -- Fill the input field with the value from the passwd variable
  keystroke passwd

  delay 0.5

  -- Copy the passcode
  set uiScript to click UI element "Copy Passcode" of window "MobilePASS" of application process "MobilePASS"
end tell

-- Quit MobilePASS
tell application "MobilePASS"
  quit
end tell