0%

汇编:实验15:安装新的int9中断例程

题目

安装一个新的int 9中断例程,功能是在DOS下,按下A键后,除非不松开,否则一松开就显示满屏幕的A。

这个程序在win2k的DOS下会有问题,dosbox中执行正常。

源码

汇编源码:

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

结果

执行结果: