mirror of
https://github.com/RevCurtisP/C02.git
synced 2024-07-04 13:29:29 +00:00
23 lines
633 B
Plaintext
23 lines
633 B
Plaintext
/****************************************************
|
|
* ECHO - Test/Demo program for C02 Standard Header *
|
|
* Echos typed keys to screen *
|
|
* RETURN/ENTER key Moves to New Line *
|
|
* BACKSPACE/DELETE key Deletes to Left *
|
|
* ESCAPE/STOP key Ends Program *
|
|
****************************************************/
|
|
|
|
//Specify System Header using -H option
|
|
|
|
char key; //Key value
|
|
|
|
main:
|
|
while() {
|
|
key = getchr();
|
|
select (key) {
|
|
case #DELKEY: delchr();
|
|
case #RTNKEY: newlin();
|
|
case #ESCKEY: goto exit;
|
|
default: putchr(key);
|
|
}
|
|
}
|