on *:text:*:*: { write 1.txt $1- }