1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82
| ; 实验15 ; 安装新的int9中断例程 ; 功能是在DOS下,按下A键,除非一直按住,只要松开就显示满屏幕的A ; 此程序在DOS下有问题,在dosbox下执行正常
assume cs:code
stack segment db 128 dup (0) stack ends
code segment start: cli mov ax,stack mov ss,ax mov sp,128 sti
push cs pop ds
mov ax,0 mov es,ax
mov si,offset int9 ; ds:si指向新int9中断例程的代码 mov di,204h ; es:di指向新int9例程存放处 mov cx,offset int9end - offset int9 cld rep movsb
; 原int9入口地址保存在0:200h、0:202h push es:[9*4] pop es:[200h] push es:[9*4+2] pop es:[202h]
; 中断向量表9号中断保存新入口地址 cli mov word ptr es:[9*4],204h mov word ptr es:[9*4+2],0 sti
mov ax,4c00h int 21h
; 新int9中断例程 int9: push ax push bx push cx push es
in al,60h
pushf call dword ptr cs:[200h] ; 此中断执行时,cs=0
cmp al,1eh+80h ; A按键的通码1eh,断码=通码+80h jne int9ret
mov ax,0b800h mov es,ax mov bx,0 mov cx,2000 s: mov byte ptr es:[bx],'A' add bx,2 loop s
int9ret: pop es pop cx pop bx pop ax iret
int9end: nop
code ends end start
|