15.5 安装int9 程序没有反应

745627933

assume cs:codesg
stack segment
     db 128 dup(0)
stack ends
codesg segment
start:  
        mov ax,stack
                mov ss,ax
                mov sp,128
               
                push cs
                pop ds  
                mov si, offset int9
               
                mov ax,0
        mov es,ax
        mov di,204h
        mov cx,offset int9ed - offset int9
        cld
        rep movsb
               

                push es:[9*4]
                pop es:[200h]
                push es:[9*4+2]
                pop es:[202h]       

                cli
        mov word ptr es:[9*4],204h       
                mov word ptr es:[9*4+2],0
                sti
                mov ax,4c00h
                int 21h
               
int9:  push ax

       push bx
           push es
       push cx           
          
       in al,60h
       pushf
       call dword ptr cs:[200h]       
       cmp al,1
       jne        ok
           mov ax,0b800h
           mov es,ax
           mov bx,1
           mov cx ,2000
s2:    inc byte ptr es:[bx]           
           add bx,2
           loop s2
ok:    pop cx
       pop es
       pop bx
           pop ax
       iret          
int9ed:    nop               
codesg ends
end start
------------------------------------------
以上是代码 运行程序后 按esc怎么没有变颜色呀