《汇编语言》实验十 即17课作业代码

sosonemo

没看17课之前先写的代码，没有使用cmp和条件跳转指令，按书上的思想写出来的。

1. assume cs:code
   
2. 
   
3. data segment
   
4.    db 10 dup(0)
   
5. data ends
   
6. 
   
7. stack segment
   
8.    db 30 dup(0)
   
9. stack ends
   
10. 
    
11. code segment
    
12.   start:     mov ax,stack
    
13.              mov ss,ax
    
14.              mov sp,30
    
15.              mov ax,12666   ;(ax)=word型数据
    
16.              mov bx,data
    
17.              mov ds,bx
    
18.              mov si,0       ;ds:si指向字符串
    
19.           call dtoc
    
20.                          
    
21.           mov si,0
    
22.           mov dh,12      ;行（0开始）
    
23.           mov dl,12      ;列（0开始）
    
24.           mov cl,00100100b ;属性
    
25.           call show_str
    
26.                          
    
27.           mov ax,4c00h
    
28.           int 21h
    
29.   dtoc:
    
30.                          push cx
    
31.                          push dx
    
32.                          push di
    
33.                          mov di,0
    
34.                 s1:         mov cx,10
    
35.                             mov dx,0
    
36.                          div cx       ;ax=1266  dx=6
    
37.              add dx,30h                         
    
38.                          push dx
    
39.                          inc di
    
40.                          mov cx,ax                         
    
41.                          jcxz ok
    
42.                          jmp s1
    
43.                 ok:         
    
44.                      mov cx,di
    
45.                  s2: pop word ptr [si]
    
46.                      inc si
    
47.                      loop s2
    
48.                          
    
49.                      pop di
    
50.                          pop dx
    
51.                      pop cx
    
52.                          ret
    
53.   show_str:
    
54.                           push ax
    
55.                        push dx
    
56.                        push cx
    
57.                      push bx
    
58.                      push es
    
59.                  
    
60.                      mov ax,0b800h
    
61.                      mov es,ax
    
62.                   
    
63.                      mov al,160
    
64.                      mul dh
    
65.                      mov bx,ax     ;计算行
    
66.                         mov al,2
    
67.                      mul dl
    
68.                      add bx,ax     ;行+列，即首地址
    
69.                   
    
70.                      mov dh,cl
    
71.                      mov ch,0
    
72.         s:             mov cl,[si]
    
73.                      jcxz ok1
    
74.                      mov es:[bx],cl
    
75.                      mov es:[bx+1],dh
    
76.                      inc si
    
77.                      add bx,2
    
78.                      jmp s
    
79.     ok1:   
    
80.                         pop es
    
81.                      pop bx
    
82.                      pop cx
    
83.                      pop dx
    
84.                      pop ax
    
85.                      ret
    
86. code ends
    
87. end start
    
88.                          
    
89.                          

复制代码