source: buchla-68k/ram/setgc.c@ d21fc6f

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

Zero redundant declarations.
  • Property mode set to 100644
File size: 1.2 KB
Line 
1/*
2 =============================================================================
3 setgc.c -- set cursors and keep them in sync
4 Version 2 -- 1988-08-19 -- D.N. Lynx Crowe
5 =============================================================================
6*/
7
8#include "ram.h"
9
10/*
11 =============================================================================
12 setgc() -- set graphics cursor
13 =============================================================================
14*/
15
16void setgc(int16_t xv, int16_t yv)
17{
18 gcurpos(xv, yv);
19
20 cxval = xv;
21 cyval = yv;
22
23 stcrow = yv / 14;
24 stccol = xv >> 3;
25
26 sgcsw = TRUE;
27 cmtype = CT_GRAF;
28
29 if (infield(stcrow, stccol, curfet))
30 cfetp = infetp;
31 else
32 cfetp = (struct fet *)NULL;
33}
34
35/*
36
37*/
38
39/*
40 =============================================================================
41 settc() -- set text cursor
42 =============================================================================
43*/
44
45void settc(int16_t rv, int16_t cv)
46{
47 itcpos(rv, cv);
48
49 stcrow = rv;
50 stccol = cv;
51
52 cyval = rv * 14;
53 cxval = cv << 3;
54
55 sgcsw = FALSE;
56 cmtype = CT_TEXT;
57
58 if (infield(stcrow, stccol, curfet))
59 cfetp = infetp;
60 else
61 cfetp = (struct fet *)NULL;
62}
63
Note: See TracBrowser for help on using the repository browser.