交作业了，实验16 编写包含多个功能子程序的中断例程

china0008

;程序目的，安装新的  int 7cH 中断例程，0号功能清屏  1号功能设置前景色 2号功能设置背景色 3号功能向上滚动一行。
;ah传递功能好0  1  2  3 ， 对于1  2 功能al传递颜色值 （0-7）。

1. 
   
2. assume cs:code
   
3. 
   
4. code segment
   
5. start:
   
6.     push cs
   
7.     pop ds
   
8.     mov ax,0
   
9.     mov es,ax
   
10.     mov si,offset setscreen
    
11.     mov di,200h
    
12.     mov cx,offset int7cend-offset setscreen
    
13.     cld
    
14.     rep movsb
    
15.     cli
    
16.     mov word ptr es:[7ch*4],200h
    
17.     mov word ptr es:[7ch*4+2],0
    
18.     sti
    
19.         ;以上 安装中断并设置中断向量
    
20.     mov ax,4c00h
    
21.     int 21h
    
22. 
    
23. setscreen:
    
24.         jmp short set   ;本条占2字节
    
25.     table dw sub1+1D8H,sub2+1D8H,sub3+1D8H,sub4+1D8H     ;编译器计算出的是相对地址，所以需要根据实际修正偏移。
    
26. 
    
27. set:
    
28.         push bx
    
29.         cmp ah,3
    
30.         ja sret
    
31.         mov bl,ah
    
32.         mov bh,0
    
33.         add bx,bx
    
34.         ;call word ptr table[bx]   ;debug 发现table返回的值是 2A   而 sub1 实际的位置在 0000:0217
    
35.         ;理想情况下  table[bx] 指向 31行的第一个字单元，sub1返回的是 子程序sub1的入口偏移地址。
    
36.         ;现在问题 table[bx]指不到正确的位置，31行的 sub1返回的也不是正确的入口偏移.(暂时使用修正偏移的方法，希望以后找到更好的方法)
    
37.         call word ptr table[bx+1d8H]  
    
38. sret:
    
39.         pop bx
    
40.         iret
    
41. 
    
42. sub1:  ;功能：全屏写空格，实现清屏
    
43.         push bx
    
44.         push cx
    
45.         push es
    
46.         push ax
    
47.         mov bx,0b800h
    
48.         mov es,bx
    
49.         mov bx,0
    
50.         mov ax,0ff20h
    
51.         mov cx,2000
    
52. sub1s:
    
53.         mov word ptr es:[bx],ax
    
54.         add bx,2
    
55.         loop sub1s
    
56.         pop ax
    
57.         pop es
    
58.         pop cx
    
59.         pop bx
    
60.         ret
    
61.        
    
62. sub2:
    
63.         push bx
    
64.         push cx
    
65.         push es
    
66.        
    
67.         mov bx,0b800h
    
68.         mov es,bx
    
69.         mov bx,1
    
70.         mov cx,2000
    
71. sub2s:
    
72.         and byte ptr es:[bx],11111000b
    
73.         or es:[bx],al
    
74.         add bx,2
    
75.         loop sub2s
    
76.        
    
77.         pop es
    
78.         pop cx
    
79.         pop bx
    
80.         ret
    
81. 
    
82. sub3:
    
83.         push bx
    
84.         push cx
    
85.         push es
    
86.         mov cl,4
    
87.         shl al,cl
    
88.         mov bx,0b800h
    
89.         mov es,bx
    
90.         mov bx,1
    
91.         mov cx,2000
    
92. sub3s:
    
93.         and byte ptr es:[bx],10001111b
    
94.         or es:[bx],al
    
95.         add bx,2
    
96.         loop sub3s
    
97.         pop es
    
98.         pop cx
    
99.         pop bx
    
100.         ret
     
101.        
     
102. sub4:
     
103.         push cx
     
104.         push si
     
105.         push di
     
106.         push es
     
107.         push ds
     
108.        
     
109.         mov si,0b800h
     
110.         mov es,si
     
111.         mov ds,si
     
112.         mov si,160
     
113.         mov di,0
     
114.         cld
     
115.         mov cx,24
     
116. sub4s:
     
117.         push cx
     
118.         mov cx,160
     
119.         rep movsb
     
120.         pop cx
     
121.         loop sub4s
     
122.        
     
123.         mov cx,80
     
124.         mov si,0
     
125. sub4s1:
     
126.         mov byte ptr [160*24+si],' '
     
127.         add si,2
     
128.         loop sub4s1
     
129.        
     
130.         pop ds
     
131.         pop es
     
132.         pop di
     
133.         pop si
     
134.         pop cx
     
135.         ret
     
136. int7cend:
     
137.         nop
     
138. code ends
     
139. end start
     

复制代码

调试这个程序感触颇多，十多分钟写好，调试了将近24小时。思路上完全正确。只是在偏移处因为自己了解的不够透彻才看不到问题所在，最后只要一步一步的debug才找到原因。遇到问题一定要深究，会对学过的知识有一个全新的认识。感谢：小甲鱼 等众多友人的帮助。

殇年已陌。

俺晕 楼主   138行代码.....会死人的

china0008

啊！  不至于不至于。呵呵。其实很简单。就是罗唆而已。

a89361461

:lol虽然看不懂代码，但是觉得版主挺厉害的。
  版主是不是计算机专业的学生？？

china0008

俺不是计算机专业的。完全是看小甲鱼视频+其推荐的书  然后每道课后题都认真完成。就可以了。 说实话，这只是很简单的程序。原理非常简单。书上写的很清楚。有了思路和方法，代码只是打字而已。