实验16

sbx

实验16 包含多个功能子程序的中断例程
安装一个新的int 7ch中断例程，为显示输出提供功能子程序。
（1）清屏；
（2）设置前景色；
（3）设置背景色；
（4）向上滚动一行；
入口参数说明如下。
（1）用ah寄存器传递功能号：0表示清屏，1表示设置前景色，2表示设置背景色，3表示向上滚动一行；
（2）对于2、3号功能，用al传送颜色值，(al)∈{0,1,2,3,4,5,6,7}。



assume cs:code
stack segment
db 128 dup(0)
stack ends

code segment

do7h:
jmp short set
table dw sub1,sub2,sub3,sub4
set:
push bx
cmp ah,3  ;判断传递的是否大于3
ja sret
mov bl,ah
mov bh,0
add bx,bx   ;根据ah中的功能号计算对应子程序的地址在table表中的偏移

call word ptr table[bx]  ;调用对应的功能子程序


sret:
pop bx
iret


;功能子程序1：清屏
sub1:push bx
push cx
push es
mov bx,0b800h
mov es,bx
mov bx,0
mov cx,2000
sub1s:mov byte ptr es:[bx],' '
add bx,2
loop sub1s
pop es
pop cx
pop bx
ret

;功能子程序2：设置前景,(al)∈{0,1,2,3,4,5,6,7}
sub2:push bx
push cx
push es

mov bx,0b800h
mov es,bx
mov bx,1
mov cx,2000
sub2s:and byte ptr es:[bx],11111000b      ;把前景色清0
or es:[bx],al                             ;设置前景色
add bx,2
loop sub2s
pop es
pop cx
pop bx
ret

;功能子程序3：设置背景色,(al)∈{0,1,2,3,4,5,6,7}
sub3:push bx
push cx
push es

mov cl,4
shl al,cl

mov bx,0b800h
mov es,bx
mov bx,1
mov cx,2000
sub3s:and byte ptr es:[bx],10001111b     ;把背景色清0
or es:[bx],al                            ;设置背景色
add bx,2
loop sub3s
pop es
pop cx
pop bx
ret

;功能子程序4：向上滚动一行
sub4:push cx
push si
push di
push es
push ds

mov si,0b800h
mov es,si
mov ds,si
mov si,160      ;ds:si指向第n+1行
mov di,0        ;es:di指向第n行
cld
mov cx,24       ;共复制24行

sub4s: push cx
mov cx,160
rep movsb       ;复制
pop cx
loop sub4s

mov cx,80
mov si,0        
sub4s1: mov byte ptr [160*24+si],' '  ;最后一行清空
add si,2
loop sub4s1

pop ds
pop es
pop di
pop si
pop cx
ret
do7hend: nop

start:
mov ax,stack
mov ss,ax
mov sp,128

mov ax,cs
mov ds,ax
mov si,offset do7h

mov cx,offset do7hend - offset do7h

mov ax,0
mov es,ax
mov di,200h

cld
rep movsb


cli
mov word ptr es:[7ch*4],0
mov word ptr es:[7ch*4+2],20h
sti

mov ax,4c00h
int 21h


code ends
end start


测试程序代码：


assume cs:code
code segment
start: mov ah,1         ;传递功能号
mov al,4                ;传递颜色
int 7ch

mov ax,4c00h
int 21h

code ends
end start



测试程序代码：
assume cs:code
code segment
start: mov ah,2         ;传递功能号
mov al,4                ;传递颜色
int 7ch

mov ax,4c00h
int 21h
code ends

end start