eputc
eputc(' ');
eputc(buf[i]);
eputc(buf[cpos++]);
eputc(buf[cpos++]);
static void eputc(char);
eputc((char)y);
eputc(buf[t]);
eputc(CCHR('G'));
eputc(buf[i]);
eputc((char)c);
eputc(buf[i]);
eputc(buf[cpos++]);
eputc(' ');
eputc(c);
eputc(c);
eputc(c);
eputc('-');
eputc(i % r + '0');
eputc('-');
eputc((int)(l % r) + '0');
eputc(c);
eputc('^');