in
"maprint.red",
"bang.save" $ off allfac$ out xxx $ #1 ; shut xxx $ bye$