source: buchla-68k/vlib/vtext.c@ 0580615

Last change on this file since 0580615 was 0580615, checked in by Thomas Lopatic <thomas@…>, 7 years ago

Point of no return.
  • Property mode set to 100644
File size: 636 bytes
Line 
1/*
2 =============================================================================
3 vtext.c -- output a text string to the VSDD in 1 byte / character mode
4 Version 3 -- 1987-06-02 -- D.N. Lynx Crowe
5
6 Assumes VSDD is pointing at bank 0.
7 =============================================================================
8*/
9
10static int msk[] = { 0xFF00, 0x00FF };
11
12void vtext(unsigned *obj, unsigned nc, unsigned row, unsigned col, char *ip)
13{
14 register unsigned *op;
15
16 while (*ip) {
17
18 op = obj + ((nc >> 1) * row) + (col >> 1);
19
20 *op = (*op & (unsigned)msk[col & 1]) |
21 ((*ip++ & 0x00FF) << ((col & 1) ? 8 : 0));
22
23 col++;
24 }
25}
Note: See TracBrowser for help on using the repository browser.