SUBR_SCROLL
SUBR_SCROLL(ip, ip->cury, ip->curx + n, n, SCROLL_LEFT);
SUBR_SCROLL(ip, ip->cury, ip->curx, n, SCROLL_RIGHT);
SUBR_SCROLL(ip, ip->cury + n, 0, n, SCROLL_UP);
SUBR_SCROLL(ip, ip->cury, 0, n, SCROLL_DOWN);
SUBR_SCROLL(ip, ip->top_margin + 1, 0, 1, SCROLL_UP);
SUBR_SCROLL(ip, ip->top_margin, 0, 1, SCROLL_DOWN);
SUBR_SCROLL(ip, ip->top_margin + 1, 0, 1, SCROLL_UP);
SUBR_SCROLL(ip, ip->top_margin + 1, 0, 1, SCROLL_UP);
SUBR_SCROLL(sc, sc->cury, sc->curx + n, n, SCROLL_LEFT);
SUBR_SCROLL(sc, sc->cury, sc->curx, n, SCROLL_RIGHT);
SUBR_SCROLL(sc, sc->cury + n, 0, n, SCROLL_UP);
SUBR_SCROLL(sc, sc->cury, 0, n, SCROLL_DOWN);
SUBR_SCROLL(sc, sc->top_margin + 1, 0, 1, SCROLL_UP);
SUBR_SCROLL(sc, sc->top_margin, 0, 1, SCROLL_DOWN);
SUBR_SCROLL(sc, sc->top_margin + 1, 0, 1, SCROLL_UP);
SUBR_SCROLL(ip, ip->cury + n, 0, n, SCROLL_UP);
SUBR_SCROLL(ip, ip->cury, 0, n, SCROLL_DOWN);
SUBR_SCROLL(ip, ip->top_margin + 1, 0, 1, SCROLL_UP);
SUBR_SCROLL(ip, ip->top_margin + 1, 0, 1, SCROLL_UP);
SUBR_SCROLL(ip, ip->top_margin, 0, 1, SCROLL_DOWN);
SUBR_SCROLL(ip, ip->rows-1, 0, n, SCROLL_UP);
SUBR_SCROLL(ip, 0, 0, n, SCROLL_DOWN);
SUBR_SCROLL(ip, ip->top_margin + 1, 0, 1, SCROLL_UP);
SUBR_SCROLL(ip, ip->top_margin + 1, 0, 1,
SUBR_SCROLL(ip, ip->cury, ip->curx + n, n, SCROLL_LEFT);
SUBR_SCROLL(ip, ip->cury, ip->curx, n, SCROLL_RIGHT);