Source code for FocusWindow.
Binaries: http://aminet.net/package/util/cdity/FocusWindow
Uploaded to aminet for historical preservation.
Many thanks to John Haubrich for releasing the code.

FocusWindow is public domain

Cheers!
https://twitter.com/AmigaSourcePres

  _____ ___   _   __  __     _   __  __ ___ ___   _   
 |_   _| __| /_\ |  \/  |   /_\ |  \/  |_ _/ __| /_\  
   | | | _| / _ \| |\/| |  / _ \| |\/| || | (_ |/ _ \ 
  _|_| |___/_/ \_\_|_ |_|_/_/_\_\_|__|_|___\___/_/_\_\
 / __|/ _ \| | | | _ \/ __| __|  / __/ _ \|   \| __|  
 \__ \ (_) | |_| |   / (__| _|  | (_| (_) | |) | _|   
 |___/\___/_\___/|_|_\\___|___|__\___\___/|___/|___|_ 
 | _ \ _ \ __/ __| __| _ \ \ / /_\_   _|_ _/ _ \| \| |
 |  _/   / _|\__ \ _||   /\ V / _ \| |  | | (_) | .` |
 |_| |_|_\___|___/___|_|_\ \_/_/ \_\_| |___\___/|_|\_|
                                                      

PERMISSION  UID  GID    PACKED    SIZE  RATIO METHOD CRC     STAMP     NAME
---------- ----------- ------- ------- ------ ---------- ------------ ----------
-rw-r--r--  1000/1000      470    1056  44.5% -lh5- 603f Apr 27 16:50 FocusWindow_src.readme
drwxr-xr-x  1000/1000        0       0 ****** -lhd- 0000 Apr 27 16:32 src/
-rw-r--r--  1000/1000      499     841  59.3% -lh5- eb7d Aug 25  1998 src/Build.info
-rw-r--r--  1000/1000      300     459  65.4% -lh5- 217e Aug 25  1998 src/Debug.info
-rw-r--r--  1000/1000      541     838  64.6% -lh5- 8c88 Aug 25  1998 src/Edit.info
-rw-r--r--  1000/1000     3772   13540  27.9% -lh5- 830d Aug 25  1998 src/FocusWindow.c
-rw-r--r--  1000/1000      273     524  52.1% -lh5- f8e0 Aug 25  1998 src/FocusWindow.c.info
-rw-r--r--  1000/1000     1593    4368  36.5% -lh5- 168d Aug 25  1998 src/FocusWindow.doc
-rw-r--r--  1000/1000     1430    4724  30.3% -lh5- 7c16 Aug 25  1998 src/FocusWindow.doc.info
-rw-r--r--  1000/1000     1862    5492  33.9% -lh5- 35bb Aug 25  1998 src/FocusWindow.guide
-rw-r--r--  1000/1000      801    4724  17.0% -lh5- 6b82 Aug 25  1998 src/FocusWindow.guide.info
-rw-r--r--  1000/1000      448    3276  13.7% -lh5- 3731 Aug 25  1998 src/FocusWindow.info
-rw-r--r--  1000/1000       69      76  90.8% -lh5- 98d8 Aug 25  1998 src/FocusWindow.lnk
-rw-r--r--  1000/1000       66      67  98.5% -lh5- 8c4d Aug 25  1998 src/SCOPTIONS
-rw-r--r--  1000/1000      276     470  58.7% -lh5- d8da Aug 25  1998 src/SCoptions.info
---------- ----------- ------- ------- ------ ---------- ------------ ----------
 Total        15 files   12400   40455  30.7%            Apr 27 20:59