moveto
moveto(Rows - 1, 0);
moveto(0, 0);
moveto(r-1, c-1); putstr(" ");
moveto(r, c-1); putstr(" ");
moveto(r+1, c-1); putstr(" ");
moveto(r+2, c-1); putstr(" ");
moveto(r-3, c-2);
moveto(r, 2 * c);
moveto(tr, 2*tc);
moveto(RTOD(j), CTOD(i));
moveto(Rows - 2, ((Cols - l) >> 1) - 1);
moveto(Rows - 2, 0);