source: buchla-68k/vlib/vclrs.c@ 7258c6a

/*
   =============================================================================
        vclrs.c -- clear a VSDD text line to a specified value
        Version 2 -- 1987-04-15 -- D.N. Lynx Crowe
        (c) Copyright 1987 -- D.N. Lynx Crowe

        vclrs(obase, row, col, nc, ch, atr)
        unsigned int obase[];
        int row, col, nc, ch, atr;

                Clear 'nc' characters in the text object 'obase' to 'ch',
                using atrributes 'atr', starting at ('row','col');

                No error checking is done, so beware.
   =============================================================================
*/

extern  void    vputc(uint16_t *sbase, uint16_t row, uint16_t col, uint16_t c, uint16_t attrib);

/*
   =============================================================================
        vclrs(obase, row, col, nc, ch, atr) -- clear a line on the VSDD
   =============================================================================
*/

void vclrs(uint16_t obase[], int16_t row, int16_t col, int16_t nc, int16_t ch, int16_t atr)
{
        while (nc--)
                vputc(obase, row, col++, ch, atr);
}