实验6 实践课程中的程序

流风逸雪

还不能发图，就发点比较重要的：
7.6大小写：

1. assume cs:codesg,ds:datasg
   
2. datasg segment
   
3. db 'BaSiC'
   
4. db 'MinIX'；这两个在内存中挨着放：“BaSiCMinIX......”
   
5. datasg ends
   
6. 
   
7. codesg segment
   
8. start:       
   
9.         mov ax,datasg
   
10.         mov ds,ax
    
11.         mov bx,0
    
12.         mov cx,5
    
13. s1:
    
14.         mov al,[bx]
    
15.         and al,11011111b；将串中所有字符第6位置0以转化为大写
    
16.         mov [bx],al
    
17.         inc bx
    
18.         loop s1;正因为两个字符串挨着放所以不将bx置0
    
19.         mov cx,5
    
20. s2:
    
21.         mov al,[bx]
    
22.         or al,00100000b；将串中所有字符第6位置1以转化为小写
    
23.         mov [bx],al
    
24.         inc bx
    
25.         loop s2
    
26. 
    
27.         mov ax,4c00H
    
28.         int 21h
    
29. codesg ends
    
30. end start

复制代码

流风逸雪

还可以写成：

1. assume cs:codesg,ds:datasg
   
2. datasg segment
   
3. db 'BaSiC'
   
4. db 'MinIX'
   
5. datasg ends
   
6. 
   
7. codesg segment
   
8. start:       
   
9.         mov ax,datasg
   
10.         mov ds,ax
    
11.         mov bx,0
    
12.         mov cx,5
    
13. s:
    
14.         mov al,0[bx]
    
15.         and al,11011111b
    
16.         mov [bx],al
    
17. 
    
18.         mov al,5[bx]
    
19.         or al,00100000b
    
20.         mov 5[bx],al
    
21.         inc bx
    
22.         loop s
    
23. 
    
24.         mov ax,4c00H
    
25.         int 21h
    
26. codesg ends
    
27. end start

复制代码

流风逸雪

问题7.2

1. assume cs:codesg,ds:datasg
   
2. datasg segment
   
3. db 'welcome to masm!'
   
4. db '................'；两个都有16个bytes
   
5. datasg ends
   
6. 
   
7. codesg segment
   
8. start:       
   
9.         mov ax,datasg
   
10.         mov ds,ax
    
11.         mov si,0
    
12.         mov di,16
    
13.         mov cx,8
    
14. s:
    
15.         mov ax,[si]
    
16.         mov [di],ax
    
17.         add si,2
    
18.         add di,2
    
19.         loop s
    
20. 
    
21.         mov ax,4c00H
    
22.         int 21h
    
23. codesg ends
    
24. end start

复制代码

流风逸雪

问题7.3改进7.2使代码行数更少

1. assume cs:codesg,ds:datasg
   
2. datasg segment
   
3. db 'welcome to masm!'
   
4. db '................'
   
5. datasg ends
   
6. 
   
7. codesg segment
   
8. start:       
   
9.         mov ax,datasg
   
10.         mov ds,ax
    
11.         mov si,0
    
12.         mov cx,8
    
13. s:
    
14.         mov ax,[si]
    
15.         mov 16[si],ax;刚犯了个蠢，[si+di] 的写法是错的
    
16.         add si,2
    
17.         loop s
    
18. 
    
19.         mov ax,4c00H
    
20.         int 21h
    
21. codesg ends
    
22. end start

复制代码

流风逸雪

问题7.6

1. assume cs:codesg,ds:datasg
   
2. datasg segment
   
3. db '1. file         '
   
4. db '2. edit         '
   
5. db '3. search       '  
   
6. db '4. view         '
   
7. db '5. options      '
   
8. db '6. help         '
   
9. datasg ends
   
10. 
    
11. codesg segment
    
12. start:       
    
13.         mov ax,datasg
    
14.         mov ds,ax
    
15.         mov bx,0
    
16.         mov cx,6
    
17. s:
    
18.         mov al,[bx+3];这里如果al写成ax就会把第5个字符置0也就是"."
    
19.         and al,11011111b
    
20.         mov 3[bx],al
    
21.         add bx,16
    
22.         loop s
    
23. 
    
24.         mov ax,4c00H
    
25.         int 21h
    
26. codesg ends
    
27. end start

复制代码

流风逸雪

问题7.7和7.8
由于看过视频，上来就写出嵌套的正确形式

1. assume cs:codesg,ds:datasg
   
2. datasg segment
   
3. db 'ibm             '
   
4. db 'dec             '
   
5. db 'dos             '  
   
6. db 'vax             '
   
7. 
   
8. datasg ends
   
9. 
   
10. codesg segment
    
11. start:       
    
12.         mov ax,datasg
    
13.         mov ds,ax
    
14.         mov bx,0
    
15.         mov cx,4
    
16. s:
    
17.         push cx
    
18.         mov si,0
    
19.         mov cx,3;由于push过cx了，结尾再pop cx回来，内部cx无论怎么改变都不影响外部循环
    
20.         s0:
    
21.                 mov al,[bx+si]
    
22.                 and al,11011111b
    
23.                 mov [bx+si],al
    
24.                 inc si
    
25.                 loop s0
    
26.         add bx,16
    
27.         pop cx
    
28.         loop s
    
29. 
    
30.         mov ax,4c00H
    
31.         int 21h
    
32. codesg ends
    
33. end start

复制代码

流风逸雪

流风逸雪 发表于 2020-4-4 14:53
问题7.7和7.8
由于看过视频，上来就写出嵌套的正确形式

开头忘记申明栈地址了，以后注意一下吧

流风逸雪

问题7.9：

1. assume cs:codesg,ss:stacksg,ds:datasg;总之这里声明的东西下面都要写上
   
2. stacksg segment
   
3. dw 0,0,0,0,0,0,0,0;这里没写会报错
   
4. stacksg ends
   
5. 
   
6. datasg segment
   
7. db '1. display      '
   
8. db '2. brows        '
   
9. db '3. replace      '  
   
10. db '4. modify       '
    
11. 
    
12. datasg ends
    
13. 
    
14. codesg segment
    
15. start:       
    
16.         mov ax,stacksg
    
17.         mov ss,ax
    
18.         mov sp,16
    
19.         mov ax,datasg
    
20.         mov ds,ax
    
21. 
    
22.         mov bx,0
    
23.         mov cx,4
    
24. s:
    
25.         push cx
    
26.         mov si,0
    
27.         mov cx,4
    
28.         s0:
    
29.                 mov al,[bx+3+si]
    
30.                 and al,11011111b
    
31.                 mov [bx+3+si],al
    
32.                 inc si
    
33.                 loop s0
    
34.         add bx,16
    
35.         pop cx
    
36.         loop s
    
37. 
    
38.         mov ax,4c00H
    
39.         int 21h
    
40. codesg ends
    
41. end start

复制代码