编写包含多个功能子程序的中断例程

王爽汇编语言

实验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

code segment
setscreen:
 jmp short set
 
 table dw sub1,sub2,sub3,sub4  ;通过该表查找子程序的始地址
 
 set:
  push bx
  
  cmp ah,3
  ja sret
  mov bl,ah
  mov bh,0
  add bx,bx
  
  call word ptr table[bx]
  
 
 sret:
  pop bx
  iret
  
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
 
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
  or es:[bx],al
  add bx,2
  loop sub2s
 pop es
 pop cx
 pop bx
 ret
 
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
  or es:[bx],al
  add bx,2
  loop sub3s
 pop es
 pop cx
 pop bx
 ret
 
sub4: ;滚动一格
 push cx
 push si
 push di
 push es
 push ds
 
 mov si,0b800h
 mov es,si
 mov ds,si
 mov si,160
 mov di,0
 cld
 mov cx,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
 

setup:
 ;初始化安装过程
 mov ax,cs
 mov ds,ax
 mov si,offset setscreen
 
 mov ax,0
 mov es,ax
 mov di,200h
 
 ;开始安装
 mov cx,offset setup-offset setscreen
 cld
 rep movsb
 
 ;设置中断向量表
 mov ax,0
 mov es,ax
 mov word ptr es:[7ch*4],0   ;ip
 mov word ptr es:[7ch*4+2],20h  ;cs
 
 ;安装结束，返回操作系统
 mov ax,4c00h
 int 21h
 
code ends
end setup