简单的屏幕编辑程序
下面是一个简单的 屏幕编辑的C语言程序，它不仅涉及到键盘处理、光标定位、屏幕输出、字符颜色等，而且还运用了C语言和汇编语言的混合编程方法。若读者能把它改写成相同功 能的汇编语言程序，那么，可以说，你已基本掌握了中断的使用方法，也对计算机输入输出的工作方式有了更进一步的认识。
该程序的功能：
◆ 可用移动光标键↑、↓、←和→移动光标1行或1列，也可用TAB/Shift TAB、Home和End键跳跃地移动光标；
◆ 当光标已在第1行，再向上移动时，这时，光标被定位到第25行，反之也然；
◆ 当光标已在第0列，还要向左移动时，光标被定位到第79列，反之也然；
◆ 当按下^W或^Z时，屏幕将向上或向下滚动1行；
◆ 显示当前键盘的状态：大小写状态、数字键盘状态和插入/修改状态；
◆ 如果按普通的键，将在屏幕上显示该字符，如果按下用Alt、Ctrl或Shift组合的组合键，则显示该按键的扫描码；
◆ 用Esc键来结束程序的运行。
C语言的源程序清单：
#define NUM_KEY 0x20 /* 键盘状态字宏定义 */
#define CAPS_KEY 0x40
#define ESCAPE 27 /* 几个功能键的宏定义 */
#define TAB_KEY 9
#define SHIFT_TAB 15
#define CTRL_W 23
#define CTRL_Z 26
#define UP_ARROW 72
#define DOWN_ARROW 80
#define LEFT_ARROW 75
#define RIGHT_ARROW 77
#define INSERT 82
#define END_KEY 79
#define HOME_KEY 71
#define UP_SCROLL 6 /* 屏幕滚动宏定义 */
#define DOWN_SCROLL 7
#include <dos.h>
int insert, cap_key, num_key;
/* up_down：屏幕滚动方式：6-向上滚; 7-向下滚
(l_row, l_col)-(r_row, r_col)：滚动矩形的对角线坐标
num：屏幕滚动的行数，0-清屏
attr：滚动后所剩下行的属性 */
cls(int up_down, int l_row, int l_col, int r_row, int r_col, int num, int attr)
get_cursor(int *x, int *y) /* 取当前光标的位置，并分别存入变量x和y中 */
locate(int row, int col) /* 把光标设置在(row, col)位置 */
disp_string(int row, int col, char string[]) /* 在(row, col)位置显示字符串string */
check_key_state() /* 在(row, col)位置以属性attr显示字符ch */
insert_key() /* 在最后一行显示插入/修改状态标志，并改变光标形状 */
move_right(int row, int col, int len) /* 在(row, col)位置之后的字符和属性向后移len个位置 */
read_char_attr(int row, int col, char *ch, int *attr) /* 在读(row, col)位置字符和属性，并分别存入ch和attr */
write_char_attr(int row, int col, char ch, int attr) /* 在(row, col)位置以属性attr显示字符ch */
ctos(char ascii, char str[]) /* 把字符的ASCII码转换成字符串 */
main()
{int k, key, row, col;
char ch1, ch2, str[]=" $"; /* 前面有3个空格 */
char msg1[]="This is a simple screen edidtor.$",
msg2[]="You can move cursor by Arrow keys, TAB/Shift-TAB, Home and End.$",
msg3[]="You can press ^W for scroll up or ^Z for scroll down.$",
msg4[]="It has some functions, such as insert/modify a char.$",
msg5[]="If you press a function key, or key combined with Alt, Ctrl, Shift, it will display the key's scan code.$",
msg6[]="The program exits when you press ESCAPE.$";
cls(UP_SCROLL, 0, 0, 24, 79, 0, 7);
disp_string(0, 0, msg1); disp_string(2, 0, msg2);
disp_string(4, 0, msg3); disp_string(6, 0, msg4);
disp_string(8, 0, msg5); disp_string(11, 0, msg6);
row = col = ch1 = insert = 0;
locate(row, col);
while (ch1 != ESCAPE)
{while (ch1 != ESCAPE)
{if (!bioskey(1)) {check_key_state(); continue;}
key = bioskey(0);
ch1 = key; ch2 = key >> 8;
if (ch1 != 0)
{switch(ch1)
{case TAB_KEY:
col = ((col&0xFFF8) 8) %80;
break;
case CTRL_W:
cls(DOWN_SCROLL, 0, 0, 24, 79, 1, 7);
row = row 1;
break;
case CTRL_Z:
cls(UP_SCROLL, 0, 0, 24, 79, 1, 7);
break;
default:
if (ch1 == ESCAPE) continue;
if (insert) move_right(row, col, 1);
write_char_attr(row, col, ch1, 31);
col = (col 1 80) % 80;
break;
}
locate(row, col);
continue;
}
switch (ch2)
{case UP_ARROW:
row = (row-1 25) % 25;
break;
case DOWN_ARROW:
row = (row 1 25) % 25;
break;
case LEFT_ARROW:
col = (col-1 80) % 80;
break;
case RIGHT_ARROW:
col = (col 1 80) % 80;
break;
case SHIFT_TAB:
k = col & 0xFFF8;
col = (col - ((k==0)? 8:k 80)) % 80;
break;
case HOME_KEY:
col = 0;
break;
case END_KEY:
col = 79;
break;
case INSERT:
insert_key(&insert);
break;
default:
ctos(ch2, str);
k = strlen(str)-1;
if (insert) move_right(row, col, k);
disp_string(row, col, str);
col = (col k 80) % 80;
break;
}
locate(row, col);
}
}
cls(UP_SCROLL, 0, 0, 24, 79, 0, 7);
}
