diff --git a/main.lua b/main.lua
index c937f5e..3f12142 100644
--- a/main.lua
+++ b/main.lua
@@ -204,6 +204,12 @@ function App.wheelmoved(dx,dy)
   if on.mouse_wheel_move then on.mouse_wheel_move(dx,dy) end
 end
 
+function App.mousefocus(in_focus)
+  if Mode == 'error' then return end
+  Cursor_time = 0  -- ensure cursor is visible immediately after it moves
+  if on.mouse_focus then on.mouse_focus(in_focus) end
+end
+
 function App.touchpressed(x,y, dx,dy, pressure)
   if Mode == 'error' then return end
   Cursor_time = 0  -- ensure cursor is visible immediately after it moves
diff --git a/reference.md b/reference.md
index d90ff5d..984f02e 100644
--- a/reference.md
+++ b/reference.md
@@ -88,6 +88,11 @@ two categories.
   right. Positive values for `dy` indicate upward movement.
   (Based on [LÖVE](https://love2d.org/wiki/love.wheelmoved).)
 
+* `on.mouse_focus(in_focus)` -- called when the mouse pointer moves on or off
+  the app window. `in_focus` will be `true` when mouse comes within the window
+  area, and `false` when it goes off.
+  (Based on [LÖVE](https://love2d.org/wiki/love.mousefocus).)
+
 * `on.touch_press(x,y, dx,dy, pressure)` -- called when you touch a
   multi-touch screen. Provides in `x` and `y` the point on the screen at which
   the touch occurred.