#ifndef BDSC 
extern struct z3tcap tcap;
#endif

/* Defines for CVlib functions - saves code by making one function
   and the pre-processor do the work of many!  Include this in any
   modules that use CVlib functions.  There are very few compilers
   that support this.  For those that do not, compile and link CVFUNC.C.
*/

#ifndef ECOC
#else

/* return tcap flags */

#define tflags(x) (tcap.flags)

/* test if char is cursor up key */

#define isc_up(c) (c == tcap.yu) 

/* test if char is cursor down key */

#define isc_dn(c) (c == tcap.yd)

/* test if char is cursor left key */

#define isc_l(c) (c == tcap.yl)

/* test if char is cursor right */

#define isc_r(c) (c == tcap.yr)

/* test if cursor control key */

#define isc_any(c) (isc_up(c) || isc_dn(c) || isc_l(c) || isc_r(c))

/* Clear screen and home cursor */

#define cls(x) (_fdtcap(tcap.cl,tcap.cldly))

/* Clear from current cursor position to end of line */

#define clreol(x) (_fdtcap(tcap.ce,tcap.cedly))

/* Turn standout (reverse video) on */

#define standout(x) (_ftcap(tcap.so))

/* Turn standout (reverse video) off */

#define standend(x) (_ftcap(tcap.se))

/* Initalize terminal */

#define tinit(x) (_ftcap(tcap.ti))

/* De-initalize terminal */
 
#define tdinit(x) (_ftcap(tcap.te))

/* Delete line cursor is on */

#define delline(x) (_ftcap(tcap.dl))

/* Insert line cursor is on */

#define insline(x) (_ftcap(tcap.il))

/* Clear from cursor to end of screen */

#define clreos(x) (_ftcap(tcap.cd))

/* Turn graphics mode on */

#define gm_on(x) (_ftcap(tcap.gs))

/* Turn graphics mode off */

#define gm_off(x) (_ftcap(tcap.ge))

/* Turn cursor on */

#define cur_on(x) (_fdtcap(tcap.cde,tcap.go))

/* Turn cursor off */

#define cur_off(x) (_fdtcap(tcap.cdo,tcap.go))

/* Display various graphic characters */

#define g_gulc(x) (_ftcap(tcap.gulc))
#define g_gurc(x) (_ftcap(tcap.gurc))
#define g_gllc(x) (_ftcap(tcap.gllc))
#define g_glrc(x) (_ftcap(tcap.glrc))
#define g_ghl(x) (_ftcap(tcap.ghl))
#define g_gvl(x) (_ftcap(tcap.gvl))
#define g_gfb(x) (_ftcap(tcap.gfb))
#define g_ghb(x) (_ftcap(tcap.ghb))
#define g_gui(x) (_ftcap(tcap.gui))
#define g_gli(x) (_ftcap(tcap.gli))
#define g_gis(x) (_ftcap(tcap.gis))
#define g_grti(x) (_ftcap(tcap.grti))
#define g_glti(x) (_ftcap(tcap.glti))
#endif