Good idea, though if the file has control codes on every single line, or the majority of lines, I'd use file handling commands rather than /write for speed. But if the control codes aren't so abundant then it's possible to only filter the necessary lines:

/filter -nfkg file myalias /[[:cntrl:]]/
alias myalias { tokenize 32 $1 | write -l $+ $1 file $strip($2-) }