content: use application "System Events"
  
  property process : a reference to (first process whose frontmost = true)
  property window : a reference to front window of my process
  
  
  set [Wx, Wy] to my window's position
  set [Cx, Cy] to {x, y} of the mouse's coordinates()
  
  
  script mouse
  	use framework "Foundation"
  	
  	property this : a reference to current application
  	property NSEvent : a reference to NSEvent of this
  	property NSScreen : a reference to NSScreen of this
  	
  	on coordinates()
  		-- Screen dimensions
  		set display to NSDeviceSize of deviceDescription() ¬
  			of item 1 of NSScreen's screens() as record
  		
  		-- Mouse position relative to bottom-left of screen
  		set mouseLoc to (NSEvent's mouseLocation as record)
  		-- Flip mouse y-coordinate so it's relative to top of screen
  		set mouseLoc's y to (display's height) - (mouseLoc's y)
  		
  		mouseLoc
  	end coordinates
  end script
  