要求:
安装一个新的int 7ch中断例程,为显示输出提供如下功能:
(1)、清屏;
(2)、设置前景色;
(3)、设置背景色;
(4)、向上滚动一行;
入口参数说明如下。
(1)、用ah寄存器传递功能号:0表示清屏,1表示设置前景色,2表示设置背景色,3表示向上滚动一行;
(2)、对于1、2号功能,用al传送颜色值,(al)∈{0,1,2,3,4,5,6,7}。
疑惑:
当初在写的时候有一个问题就是标号,因为最初我是把安装代码写在子程序的上面的,这样一来子程序中所有的标号所代表的偏移地址会发生错误,会指向其他空间。
所以让中断例程以IP=0000开始,并且安装后运行时,IP也是从0000开始。那么标号就能对的上号了。
汇编代码:
assume cs:code
code segment
----------------------中断例程------------------------------
interrupt_:
;设置直接定址表,来指向相应子程序,直接定地表也要安装
table dw clean_screen,set_ForeColor,set_BackColor,screen_scroll
jmp interrupt_begin
interrupt_begin:
push ax ;相关reg入栈
cmp ah, 3 ;参数是否在可取范围内
ja cmp_end
mov bx, 0
mov bl, ah
add bl, bl
call word ptr table[bx]
cmp_end:
pop ax
iret
----------------------0号子程序--------------------------------
----------------------清屏------------------------------------
clean_screen:
push es
push ax
push cx
push si
mov ax, 0b800h
mov es, ax
mov si, 0 ;初始化显存
mov cx, 2000 ;往显存了存入空格
print_space:
mov byte ptr es:[si], ' '
add si, 2
loop print_space
pop si
pop cx
pop ax
pop es
ret
------------------------1号子程序---------------------------------
----------------设置前景色,(al)为颜色参数---------------------------
set_ForeColor:
push es
push ax
push cx
push si
mov cx, 0b800h
mov es, cx
mov si, 1 ;初始化显存
mov cx, 2000
set_fore:
and byte ptr es:[si], 11111000b ;设置前景色(字符色)
or es:[si], al ;为了不影响到第三位
add si, 2
loop set_fore
pop si
pop cx
pop ax
pop es
ret
------------------------2号子程序---------------------------------
----------------设置背景色,(al)为颜色参数---------------------------
set_BackColor:
push es
push ax
push cx
push si
mov cx, 0b800h
mov es, cx
mov si, 1 ;初始化显存
mov cl, 4
shl al, cl
mov cx, 2000
set_back:
and byte ptr es:[si], 10001111b ;设置背景色
or es:[si], al ;为了不影响到第七位
add si, 2
loop set_fore
pop si
pop cx
pop ax
pop es
ret
------------------------3号子程序---------------------------------
----------------------屏幕向上滚动一行-----------------------------
screen_scroll:
push ds
push es
push ax
push cx
push di
push si
mov ax, 0b800h
mov ds, ax
mov es, ax
mov si, 160
mov di, 0
cld
mov cx, 24 ;下一行复制到上一行
copy_:
push cx
mov cx, 160
rep movsb
pop cx
loop copy_
mov cx, 80 ;最后一行用空格
print_s:
mov byte ptr es:[di], ' '
add di, 2
loop print_s
pop si
pop di
pop cx
pop ax
pop es
pop ds
ret
---------------------------子程序结束------------------------------
interrupt_end:
nop
start:
mov ax, cs ;安装int 7ch
mov ds, ax
mov si, offset interrupt_
mov ax, 0
mov es, ax
mov di, 200h
mov cx, offset interrupt_end - offset interrupt_
cld
rep movsb
mov word ptr es:[7ch*4], 0 ;设置中断向量表
mov word ptr es:[7ch*4+2], 20h
mov ax, 4c00h
int 21h
code ends
end start