看8086汇编 书上的一个小作业 键盘中断例程编写

;任务：在屏幕中间依次显示‘a'~’z' 并可以让人看清。在显示的过程中 按下Esc后，改变显示的颜色

assume cs:code

;栈
stack segment
db 128 dup (0)
stack ends

;store data
data segment
dw 0,0
data ends

;
code segment
start:
mov ax,stack
mov ss,ax
mov sp,128		;ss:sp

mov ax,data
mov ds,ax		;ds

mov ax,0
mov es,ax		;es

;将键盘原来的中断例程地址复制到ds:[0]中
push es:[9*4]
pop ds:[0]
push es:[9*4+2]
pop ds:[2]		;

;将新的int9地址写入中断向量表
mov word ptr es:[9*4],offset int9
mov es:[9*4+2],cs	;int9

;屏幕依次输出a---z
mov ax,0b800h
mov es,ax
mov ah,'a'
s:	mov es:[160*12+40*2],ah
call delay	;delay用来延时  也就是空循环
inc ah
cmp ah,'z'
jna s

mov ax,0
mov es,ax

;恢复中断向量表
push ds:[0]
pop es:[9*4]
push ds:[2]
pop es:[9*4+2]

;exit
mov ax,4c00h
int 21h

;延时
delay:	push ax		;因为用到dx，ax 先将他们保存到栈中
push dx
mov dx,1000h
mov ax,0
s1:	sub ax,1
sbb dx,0
cmp ax,0
jne s1
cmp dx,0
jne s1
pop dx
pop ax
ret	;call---ret 是一对
;------------------------------
;int9

int9:			;我们新编写的中断例程
push ax
push bx
push es		;保存环境

in al,60	;从键盘读取一个字符
pushf
pushf
pop bx
and bh,11111100b
push bx
popf
call dword ptr ds:[0];调用原来的int9

cmp al,1	;1表示Esc
jne int9ret

mov ax,0b800h
mov es,ax
inc byte ptr es:[160*12+40*2+1]		;变色

int9ret:		;恢复环境颜色
pop es
pop bx
pop ax
iret

code ends
end start