[f40a309] | 1 | /*
|
---|
| 2 | =============================================================================
|
---|
| 3 | vclrs.c -- clear a VSDD text line to a specified value
|
---|
| 4 | Version 2 -- 1987-04-15 -- D.N. Lynx Crowe
|
---|
| 5 | (c) Copyright 1987 -- D.N. Lynx Crowe
|
---|
| 6 |
|
---|
| 7 | vclrs(obase, row, col, nc, ch, atr)
|
---|
| 8 | unsigned int obase[];
|
---|
| 9 | int row, col, nc, ch, atr;
|
---|
| 10 |
|
---|
| 11 | Clear 'nc' characters in the text object 'obase' to 'ch',
|
---|
| 12 | using atrributes 'atr', starting at ('row','col');
|
---|
| 13 |
|
---|
| 14 | No error checking is done, so beware.
|
---|
| 15 | =============================================================================
|
---|
| 16 | */
|
---|
| 17 |
|
---|
[0580615] | 18 | extern void vputc(unsigned *sbase, unsigned row, unsigned col, unsigned c, unsigned attrib);
|
---|
[f40a309] | 19 |
|
---|
| 20 | /*
|
---|
| 21 | =============================================================================
|
---|
| 22 | vclrs(obase, row, col, nc, ch, atr) -- clear a line on the VSDD
|
---|
| 23 | =============================================================================
|
---|
| 24 | */
|
---|
| 25 |
|
---|
[0580615] | 26 | void vclrs(unsigned int obase[], int row, int col, int nc, int ch, int atr)
|
---|
[f40a309] | 27 | {
|
---|
| 28 | while (nc--)
|
---|
| 29 | vputc(obase, row, col++, ch, atr);
|
---|
| 30 | }
|
---|