实验 13-1 作业完成

困惑灵魂

1. assume cs:code
   
2. data segment
   
3.      dd  2 dup(0) ;调试时临时存放段地址和偏移
   
4. str  db 'http://www.fishc.com/',0 ; str当变量名用
   
5. 
   
6. 
   
7. first:
   
8. ;--------------要安装的内容--------------------
   
9. ;功能：在7ch中断处显示用0结束的字符串
   
10. ;参数：dh=行号  dl=列号  cl=颜色  DS:SI 指向字符串首地址       
    
11.         push ax
    
12.         push bx
    
13.         push es
    
14.        
    
15.         mov ax,0b800h
    
16.         mov es,ax;显示区---段地址
    
17.        
    
18.         mov ax,0
    
19.         ;计算行偏移
    
20.         mov al,dh
    
21.         mov bl,80*2
    
22.         mul bl
    
23.         push ax
    
24.         ;计算列偏移
    
25.         mov al,dl
    
26.         mov bl,2
    
27.         mul bl
    
28.         pop bx
    
29.         add bx,ax;显示区---总偏移
    
30. 
    
31. s:       
    
32.         mov al,[si]
    
33.         cmp al,0 ;比较是否到字符串尾部
    
34.         je ok
    
35.         mov es:[bx],al
    
36.         mov es:[bx+1],cl ;置颜色属性
    
37.         inc si
    
38.         add bx,2
    
39.         JMP short s
    
40. ok:       
    
41.         pop es
    
42.         pop bx
    
43.         pop ax
    
44.         iret
    
45. ;--------------要安装的内容--------------------
    
46. last:       
    
47.         nop
    
48.                         
    
49. data ends
    
50. 
    
51. 
    
52. code segment
    
53. start:
    
54.         mov ax,data
    
55.         mov ds,ax
    
56.         ;------调试安装内容代码--------
    
57.         ;调试无错后去除这段
    
58.         ;mov word ptr [2],data
    
59.         ;mov word ptr [0],offset first
    
60.         ;mov dl,12 ;参数
    
61.         ;mov dh,5  ;参数
    
62.         ;mov cl,11001010b  ;参数
    
63.         ;mov si,offset str ;参数
    
64.         ;jmp dword ptr ds:[0]
    
65.        
    
66. ;-------------------安装----------------
    
67.        
    
68.         mov si,offset first
    
69.         mov ax,0
    
70.         mov es,ax
    
71.         mov di,200h
    
72.         mov cx,offset last - offset first ;安装内容-长度
    
73.         cld
    
74.         rep movsb
    
75. ;-------改变中断地址---------------------
    
76.         mov word ptr es:[7ch*4],200h  ;一个地址4字节 地址=编号*4
    
77.         mov word ptr es:[7ch*4+2],0   ;偏移占2字节 段占2字节
    
78.        
    
79. ;---------调用改变后的7ch中断--------------
    
80.         mov dh,10 ;参数
    
81.         mov dl,10 ;参数
    
82.         mov cl,2  ;参数
    
83.         mov si,offset str;参数
    
84.         int 7ch
    
85.        
    
86.         mov ax,4c00h
    
87.         int 21h
    
88. 
    
89. code ends
    
90. end start
    
91. ;emu8086 4.08 测试通过

复制代码