王爽汇编第二版实验16（整理）

 实验16 程序

说明：
        在进行这个实验时，往往会参考16.4给出的代码(四个子程序和直接定址表功能选择程序)如果安装16.4给出的功能子程序的安装程序习惯采用下面图1安装结构会出问题，问题有两个:
        1：table dw sub1……中SUB1存放的应该是子程序的偏移地址，这个偏移地址是相对于中断程序入口的，而此时Sub1中存放的是相对于安装程序入口的地址。所以应该将被安装代码放到code段标号Start前边。
        2：中断程序被调用时   table[bx]默认的段存器为cs，所以在安装程序中设置中断向量表时，应设：cs 20h      ip 0  而不是cs 0      ip200 h,

        assume cs:code
        code segment
                start:
                        安装程序
                ；--------------------------
                被安装代码：
                ；--------------------------
        code ends
        end start

;实验16
;功能:安装中断例程,并调用;(调用程序独立)
;功能1.清屏;功能2.改变前景色;3.改变背景色;4.向上滚动一行.
;条件:当ah=0时,清屏;当ah=1,al={0~7},改变前景色;当ah=2,al={0~7},改变背景色;当al=3,向上滚动一行
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 cs:table[bx]                ;cs的值是:0020h,table的偏移地址是:2h,因为,jmp short set 占了两个字节;
        mov ax,4c00h
        int 21h
        
sret:  pop bx
        iret

sub1:        push bx
        push cx
        push es
        mov bx,0b800h
        mov es,bx
        mov bx,0
        mov cx,2000
        
subls:mov byte ptr es:[bx],' '
        add bx,2
        loop subls
        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
setscreenend:nop
start:mov ax,cs
        mov ds,ax
        mov si,offset setscreen
        mov ax,0
        mov es,ax
        mov di,200h
        mov cx,offset setscreenend - offset setscreen
        cld
        rep movsb
        
        mov ax,0
        mov es,ax
        mov word ptr es:[7ch*4],0        ;这里的地址以20位的方式去理解.
        mov word ptr es:[7ch*4+2],0020h        ;段地址+偏移=00200+0000=00200.这样安装完中断向量后,只要调用7ch,CS段的值就是0020h.


        mov ax,4c00h
        int 21h



code ends
end start