Open($1) SetFontNames("PS"+$fontname, "PS"+$familyname, "PS"+$fullname) Generate($fontname + ".pfb")