2018-09-17 00:30:25 +00:00
|
|
|
/***************************************
|
|
|
|
* Screen Control Functions for Oric-1 *
|
|
|
|
***************************************/
|
|
|
|
|
2019-11-20 06:06:34 +00:00
|
|
|
/* Screen Modes for getscr() and setscr() */
|
|
|
|
#define SMTEXT $00 //System Default Text Mode
|
|
|
|
#define SMWIDE $FF //Wide Screen Text Mode (Unsupported)
|
|
|
|
|
2018-09-17 00:30:25 +00:00
|
|
|
/* Clear the Screen */
|
|
|
|
void clrscn();
|
|
|
|
|
|
|
|
/* Move Cursor to Top Left of Screen */
|
|
|
|
void crsrhm();
|
|
|
|
|
|
|
|
/* Get Current Cursor Position *
|
|
|
|
* Returns: cursor column *
|
|
|
|
( cursor row */
|
|
|
|
char getpos();
|
|
|
|
|
2019-11-20 06:06:34 +00:00
|
|
|
/* Get Screen Mode *
|
|
|
|
* Returns: char mode - Current Screen Mode */
|
|
|
|
char getscr();
|
|
|
|
|
2018-09-17 00:30:25 +00:00
|
|
|
/* Get Screen Size *
|
|
|
|
* Returns: width in columns *
|
|
|
|
* height in rows */
|
|
|
|
char getsiz();
|
|
|
|
|
|
|
|
/* Move Cursor to Specified Position *
|
|
|
|
* Args: column - screen column (0 = left) *
|
|
|
|
* row - screen line (0 = top) */
|
|
|
|
void setpos();
|
2019-11-20 06:06:34 +00:00
|
|
|
|
|
|
|
/* Set Screen Mode *
|
|
|
|
* Args: char mode - screen mode *
|
|
|
|
* 0 = default text mode *
|
|
|
|
* Returns: $FF if Mode Invalid */
|
|
|
|
char setscr();
|