/* move the cursor on an qmc */
qmc_move(srow, scol)
register int srow, scol;
 { /* ^K, row+33, col+33 */
    ttyout('\013');
    ttyout(srow+33);
    ttyout(scol+33);
 }

/* table of characters for input (INMODE) mode */
char  ictab[] =
 {      /* 000 - 007, null - ^G */
        IGN, WRIGHT, WLEFT, IGN, IGN, DOWN, TAILERASE, WERASE,
        /* 010 - 017, ^H - ^O */
        LEFT, TAB, NL, LSTART, LEND, CR, BOTSCREEN, TOPSCREEN,
        /* 020 - 027, ^P - ^W */
        IGN, RIGHT, ERASE, UP, IGN, LEFT, SEND, WRUBOUT,
        /* 030 - 037, ^X - ^_ */
        HEADRUBOUT, CHMODE, CONTROL, ENTERedit, IGN, LINEERASE, IGN, IGN,
        SPACE, ONE, ONE, ONE, ONE, ONE, ONE, ONE,
        ONE, ONE, ONE, ONE, ONE, ONE, ONE, ONE,
        ONE, ONE, ONE, ONE, ONE, ONE, ONE, ONE,
        ONE, ONE, ONE, ONE, ONE, ONE, ONE, ONE,
        ONE, ONE, ONE, ONE, ONE, ONE, ONE, ONE,
        ONE, ONE, ONE, ONE, ONE, ONE, ONE, ONE,
        ONE, ONE, ONE, ONE, ONE, ONE, ONE, ONE,
        ONE, ONE, ONE, ONE, ONE, ONE, ONE, ONE,
        ONE, ONE, ONE, ONE, ONE, ONE, ONE, ONE,
        ONE, ONE, ONE, ONE, ONE, ONE, ONE, ONE,
        ONE, ONE, ONE, ONE, ONE, ONE, ONE, ONE,
        ONE, ONE, ONE, ONE, ONE, ONE, ONE, RUBOUT
 };

/* table of characters for edit (EDMODE) mode. Much the same
 * as ictab, except for the absence of UP, DOWN, TOPSCREEN,
 * BOTSCREEN and LINEERASE. CR or LF are also COMMAND in this mode
 */
char  ectab[] =
 {      /* 000 - 007, null - ^G */
        IGN, WRIGHT, WLEFT, IGN, IGN, IGN, TAILERASE, WERASE,
        /* 010 - 017, ^H - ^O */
        LEFT, TAB, COMMAND, LSTART, LEND, COMMAND, IGN, IGN,
        /* 020 - 027, ^P - ^W */
        IGN, RIGHT, ERASE, IGN, IGN, LEFT, SEND, WRUBOUT,
        /* 030 - 037, ^X - ^_ */
        HEADRUBOUT, CHMODE, CONTROL, ENTERedit, IGN, IGN, IGN, IGN,
        SPACE, ONE, ONE, ONE, ONE, ONE, ONE, ONE,
        ONE, ONE, ONE, ONE, ONE, ONE, ONE, ONE,
        ONE, ONE, ONE, ONE, ONE, ONE, ONE, ONE,
        ONE, ONE, ONE, ONE, ONE, ONE, ONE, ONE,
        ONE, ONE, ONE, ONE, ONE, ONE, ONE, ONE,
        ONE, ONE, ONE, ONE, ONE, ONE, ONE, ONE,
        ONE, ONE, ONE, ONE, ONE, ONE, ONE, ONE,
        ONE, ONE, ONE, ONE, ONE, ONE, ONE, ONE,
        ONE, ONE, ONE, ONE, ONE, ONE, ONE, ONE,
        ONE, ONE, ONE, ONE, ONE, ONE, ONE, ONE,
        ONE, ONE, ONE, ONE, ONE, ONE, ONE, ONE,
        ONE, ONE, ONE, ONE, ONE, ONE, ONE, RUBOUT
 };

#include "qmc1510.def"
#define TER_TAB qmc_ter
#define TER_ROWS 24
#define TER_COLS 80
