169 lines
9.1 KiB
C
169 lines
9.1 KiB
C
|
/******************************************************************************
|
||
|
|
*
|
||
|
|
* uniVerse include file for BASIC @(-ve) functions
|
||
|
|
*
|
||
|
|
* Module include/atfuncts.h
|
||
|
|
*
|
||
|
|
* (c) Copyright 1998 Ardent Software Inc. - All Rights Reserved
|
||
|
|
* This is unpublished proprietary source code of Ardent Software Inc.
|
||
|
|
* The copyright notice above does not evidence any actual or intended
|
||
|
|
* publication of such source code.
|
||
|
|
*
|
||
|
|
******************************************************************************/
|
||
|
|
|
||
|
|
#define IT_CS -1 /* clear screen (ANSI) */
|
||
|
|
#define IT_CAH -2 /* cursor absolute home (ANSI) */
|
||
|
|
#define IT_CLEOS -3 /* clear to end of screen */
|
||
|
|
#define IT_CLEOL -4 /* clear to end of line */
|
||
|
|
#define IT_SBLINK -5 /* start blinking field */
|
||
|
|
#define IT_EBLINK -6 /* end blinking field */
|
||
|
|
#define IT_SPA -7 /* start protected area (ANSI) */
|
||
|
|
#define IT_EPA -8 /* end protected area (ANSI) */
|
||
|
|
#define IT_CUB -9 /* cursor backward (ANSI) */
|
||
|
|
#define IT_CUU -10 /* cursor up (ANSI) */
|
||
|
|
#define IT_SHALF -11 /* start half-intensity field */
|
||
|
|
#define IT_EHALF -12 /* end half-intensity field */
|
||
|
|
#define IT_SREV -13 /* start reverse video field */
|
||
|
|
#define IT_EREV -14 /* end reverse video field */
|
||
|
|
#define IT_SUL -15 /* start underlined field */
|
||
|
|
#define IT_EUL -16 /* end underlined field */
|
||
|
|
#define IT_IL -17 /* insert line */
|
||
|
|
#define IT_DL -18 /* delete line */
|
||
|
|
#define IT_ICH -19 /* insert character (ANSI) */
|
||
|
|
#define IT_SIRM -20 /* set insert/replace mode (ANSI) */
|
||
|
|
#define IT_RIRM -21 /* reset insert/replace mode (ANSI) */
|
||
|
|
#define IT_DCH -22 /* delete character (ANSI) */
|
||
|
|
#define IT_AUXON -23 /* auxiliary port on */
|
||
|
|
#define IT_AUXOFF -24 /* auxiliary port off */
|
||
|
|
#define IT_TRON -25 /* transparent auxiliary port on */
|
||
|
|
#define IT_TROFF -26 /* transparent auxiliary port off */
|
||
|
|
#define IT_AUXDLY -27 /* auxiliary delay time */
|
||
|
|
#define IT_PRSCRN -28 /* print screen */
|
||
|
|
#define IT_E80 -29 /* enter 80 column mode */
|
||
|
|
#define IT_E132 -30 /* enter 132 column mode */
|
||
|
|
#define IT_RIC -31 /* reset inhibit cursor (ANSI) */
|
||
|
|
#define IT_SIC -32 /* set inhibit cursor (ANSI) */
|
||
|
|
#define IT_CUD -33 /* cursor down (ANSI) */
|
||
|
|
#define IT_CUF -34 /* cursor forward (ANSI) */
|
||
|
|
#define IT_VIDEO -35 /* set video attributes */
|
||
|
|
#define IT_SCOLPR -36 /* set color pair */
|
||
|
|
#define IT_FCOLOR -37 /* set foreground color */
|
||
|
|
#define IT_BCOLOR -38 /* set background color */
|
||
|
|
#define IT_SLINEGRFX -39 /* start line graphics */
|
||
|
|
#define IT_ELINEGRFX -40 /* end line graphics */
|
||
|
|
#define IT_LINEGRFXCH -41 /* line graphics character */
|
||
|
|
#define IT_DMI -42 /* disable manual input */
|
||
|
|
#define IT_EMI -43 /* enable manual input */
|
||
|
|
#define IT_BSCN -44 /* blank screen */
|
||
|
|
#define IT_UBS -45 /* unblank screen */
|
||
|
|
/* RESERVED -46 */
|
||
|
|
/* RESERVED -47 */
|
||
|
|
#define IT_SU -48 /* scroll up */
|
||
|
|
#define IT_SD -49 /* scroll down */
|
||
|
|
#define IT_SR -50 /* scroll right */
|
||
|
|
#define IT_SL -51 /* scroll left */
|
||
|
|
/* RESERVED -52 */
|
||
|
|
/* RESERVED -53 */
|
||
|
|
#define IT_SLT -54 /* set line truncate */
|
||
|
|
#define IT_RLT -55 /* reset line truncate */
|
||
|
|
#define IT_SNK -56 /* set numeric keypad */
|
||
|
|
#define IT_RNK -57 /* reset numeric keypad */
|
||
|
|
#define IT_SBOLD -58 /* start bold field */
|
||
|
|
#define IT_EBOLD -59 /* end bold field */
|
||
|
|
#define IT_SSECUR -60 /* start secure field */
|
||
|
|
#define IT_ESECUR -61 /* end secure field */
|
||
|
|
#define IT_SSCPROT -62 /* start screen protect mode */
|
||
|
|
#define IT_ESCPROT -63 /* end screen protect mode */
|
||
|
|
#define IT_SLD -64 /* system line display */
|
||
|
|
#define IT_SLR -65 /* system line reset */
|
||
|
|
#define IT_SLS -66 /* system line set */
|
||
|
|
/* RESERVED -67 */
|
||
|
|
/* RESERVED -68 */
|
||
|
|
/* RESERVED -69 */
|
||
|
|
#define IT_CHA -70 /* cursor horizontal absolute */
|
||
|
|
#define IT_ECH -71 /* erase character */
|
||
|
|
/* RESERVED -72 */
|
||
|
|
/* RESERVED -73 */
|
||
|
|
#define IT_NPC -74 /* substitute for non-printing character */
|
||
|
|
#define IT_DISPLAY -75 /* EDFS main display attributes */
|
||
|
|
#define IT_MINIBUF -76 /* EDFS mini-buffer display attributes */
|
||
|
|
#define IT_LOKL -77 /* lock display lines */
|
||
|
|
#define IT_UNLL -78 /* unlock display lines */
|
||
|
|
#define IT_MARKSUBS -79 /* 5 substitute chars for displaying @IM@FM@VM@SM@TM */
|
||
|
|
#define IT_NLSMAP -80 /* Terminal NLS map name */
|
||
|
|
#define IT_NLSAUXMAP -81 /* AUX printer NLS map name */
|
||
|
|
#define IT_USERFIRST -101 /* first user-allocated @-function */
|
||
|
|
#define IT_USERLAST -128 /* last user-allocated @-function */
|
||
|
|
|
||
|
|
/* ADDITIVE VIDEO attributes, for IT$VIDEO argument 2: @(-35,n) */
|
||
|
|
|
||
|
|
#define IT_NORMAL 0 /* normal */
|
||
|
|
#define IT_BOLD 1 /* bold */
|
||
|
|
#define IT_HALF 2 /* half intensity */
|
||
|
|
#define IT_ITALIC 4 /* italic */
|
||
|
|
#define IT_STANDOUT 4 /* enhanced */
|
||
|
|
#define IT_ULINE 8 /* underline */
|
||
|
|
#define IT_SLOWBLINK 16 /* slow blink rate */
|
||
|
|
#define IT_FASTBLINK 32 /* fast blink rate */
|
||
|
|
#define IT_REVERSE 64 /* reverse video */
|
||
|
|
#define IT_BLANK 128 /* concealed */
|
||
|
|
#define IT_PROTECT 256 /* protected */
|
||
|
|
#define IT_ALTCHARSET 512 /* alternate char set */
|
||
|
|
|
||
|
|
/* COLOURS, TYPE of display */
|
||
|
|
|
||
|
|
#define IT_COLOR 1 /* use colour */
|
||
|
|
#define IT_MONO 2 /* don't use colour */
|
||
|
|
|
||
|
|
/* COLOURS, FOR IT$FCOLOR and IT$BCOLOR argument 2: @(-37,n)/@(-38,n) */
|
||
|
|
|
||
|
|
#define IT_NOCOLOR -1
|
||
|
|
#define IT_BLACK 0
|
||
|
|
#define IT_RED 1
|
||
|
|
#define IT_GREEN 2
|
||
|
|
#define IT_YELLOW 3
|
||
|
|
#define IT_BLUE 4
|
||
|
|
#define IT_MAGENTA 5
|
||
|
|
#define IT_CYAN 6
|
||
|
|
#define IT_WHITE 7
|
||
|
|
#define IT_DARK_RED 8
|
||
|
|
#define IT_CERISE 9
|
||
|
|
#define IT_ORANGE 10
|
||
|
|
#define IT_PINK 11
|
||
|
|
#define IT_DARK_GREEN 12
|
||
|
|
#define IT_SEA_GREEN 13
|
||
|
|
#define IT_LIME_GREEN 14
|
||
|
|
#define IT_PALE_GREEN 15
|
||
|
|
#define IT_BROWN 16
|
||
|
|
#define IT_CREAM 17
|
||
|
|
#define IT_DARK_BLUE 18
|
||
|
|
#define IT_SLATE_BLUE 19
|
||
|
|
#define IT_VIOLET 20
|
||
|
|
#define IT_PALE_BLUE 21
|
||
|
|
#define IT_PURPLE 22
|
||
|
|
#define IT_PLUM 23
|
||
|
|
#define IT_DARK_CYAN 24
|
||
|
|
#define IT_SKY_BLUE 25
|
||
|
|
#define IT_GREY 26
|
||
|
|
|
||
|
|
/* The next token is used by the color verbs and subroutines to */
|
||
|
|
/* offset the color ids defined above, into an array indexed from 1 */
|
||
|
|
|
||
|
|
#define IT_COLOR_OFFSET 2
|
||
|
|
|
||
|
|
/* Graphics character for IT$LINEGRFXCH arg 2: @(-41,n) */
|
||
|
|
|
||
|
|
#define IT_GRFX_CROSS 0 /* cross piece (ie, '+') */
|
||
|
|
#define IT_GRFX_H_LINE 1 /* horizontal line */
|
||
|
|
#define IT_GRFX_V_LINE 2 /* vertical line */
|
||
|
|
#define IT_GRFX_TL_CORNER 3 /* top-left corner */
|
||
|
|
#define IT_GRFX_TR_CORNER 4 /* top-right corner */
|
||
|
|
#define IT_GRFX_BL_CORNER 5 /* bottom-left corner */
|
||
|
|
#define IT_GRFX_BR_CORNER 6 /* bottom-right corner */
|
||
|
|
#define IT_GRFX_TOP_TEE 7 /* top-edge tee piece */
|
||
|
|
#define IT_GRFX_LEFT_TEE 8 /* left-edge tee piece */
|
||
|
|
#define IT_GRFX_RIGHT_TEE 9 /* right-edge tee piece */
|
||
|
|
#define IT_GRFX_BOTTOM_TEE 10 /* bottom-edge tee piece */
|
||
|
|
|
||
|
|
/* END-CODE */
|