delay书上写的是高位dx和低位ax组成一个数据，对其循环减1，直到为0退出循环。
其中dx=1000h，ax=0
我使用的是DOSBox 0.74，不知道是什么原因，在我的电脑上这样写似乎拖延的时间很长，字母很久都没有变化。
改成dx=10h，ax=0后字母出现变化
assume cs:codestack segmentdb 128 dup (0)
stack endsdata segment;暂存原int9中断例程地址dw 0,0
data endscode segment
start:mov ax,stackmov ss,axmov sp,128mov ax,datamov ds,ax;di:0 指向int9原中断例程IPmov ax,0mov es,axpush es:[9*4]pop ds:[0]push es:[9*4+2]pop ds:[2];将原中断例程地址移入data中;修改中断例程的地址climov word ptr es:[9*4],offset int9mov word ptr es:[9*4+2],csstimov ax,0b800hmov es,axmov ah,'a'
s:mov es:[160*12+40*2],ahcall delay inc ahcmp ah,'z'jne s
ok:mov ax,0mov es,ax;程序结束，将中断例程恢复为正常位置clipush ds:[0]pop es:[9*4]push ds:[2]pop es:[9*4+2]stimov ax,4c00hint 21h;为了看出字母变化，我们需要让其显示一段时间
delay:push axpush dxmov dx,10h;这里不能写太大，在我的机器上写1000h长时间字母不变mov ax,0
s1:sub ax,1sbb dx,0;借位减，当ax不够减1,CF=1,dx-0-CFcmp ax,0jne s1cmp dx,0jne s1;当dx,ax都是0,则循环结束pop dxpop axret;新编写的int9中断例程
;当我们进入int9前，我们已经完成了中断前的准备阶段：
;1.取出n，即9
;2.psw入栈，置IF,TF=0
;3.IP,CS入栈
;4.CS:IP跳转至中断例程int9:push axpush esin al,60h
;我们现在想要调用原来的中断例程，现在需要写出一个int n的准备阶段（即上述4步）
;由于psw在按下键盘按键时已经将IF,TF置0这里不再操作pushfcall dword ptr ds:[0];调用原来的中断例程cmp al,1;ESC的编码是1jne int9retmov ax,0b800hmov es,axinc byte ptr es:[160*12+40*2+1];改变颜色int9ret:pop espop axiretcode ends
end start