ttf-atarismall (2.1-3.1) sfd2condensed.ff

--- ttf-atarismall-2.1.orig/sfd2condensed.ff
+++ ttf-atarismall-2.1/sfd2condensed.ff
@@ -0,0 +1,17 @@
+#!/usr/bin/fontforge
+if ($argc > 1)
+    Open($argv[1])
+    ttfile = $fontname + "Condensed"
+    Print("Making ",ttfile)
+    SetFontNames(ttfile,ttfile,$fontname+" Condensed","Condensed")
+    SelectAll()
+    if ($argc > 2)
+	Scale($2,100,0,0)
+    else
+	Scale(80,100,0,0)
+    endif
+    Save(ttfile+".sfd")
+    Close()
+else
+    Print("Usage: $0 font.sfd [condense, default 80%]")
+endif