New script that should've been added a while a go

COPYRIGHT.txt

@@ -41,3 +41,5 @@ db is licensed under the Unlicense. A license copy is provided in LICENSES/Unlic
 eliza is licensed under the Unlicense. A license copy is provided in LICENSES/Unlicense.txt.
 
 inc is licensed under the Unlicense. A license copy is provided in LICENSES/Unlicense.txt.
+
+ffr is licensed under

README.md

@@ -10,6 +10,7 @@ A collection of useful scripts. These scripts are written by various authors. At
 | ffconv         | Batch convert mkvs to mp4s.                                           |
 | ffconv-a       | Batch convert from one format to another.                             |
 | ffconv-ar      | Batch convert from one format to another without preserving metadata. |
+| ffr            | Record a given window with ffmpeg to the current directory.           |
 | gpltopnm       | Convert gpl to ppm.                                                   |
 | inc            | Copy one file to the number of files by hex in the current directory. |
 | makeself       | Make self-extractable archives for *nix-likes.                        |

bin/ffr

@@ -0,0 +1,5 @@
+#!/bin/dash
+ffmpeg -f x11grab -framerate 25 \
+    $(xwininfo | gawk 'match($0, /-geometry ([0-9]+x[0-9]+).([0-9]+).([0-9]+)/, a)\
+      { print "-video_size " a[1] " -i +" a[2] "," a[3] }') \
+    $(date +%Y-%m-%d_%H-%M_%S).mp4