第八章实验7

小咒

第八章实验7我自己想代码的时候想了有点久，最终差不多用了1个多小时才把这些代码写完
用了1个多小时才写完这一点点代码没办法人比较笨，大家一起努力学习共同进步
首先我觉得这道实验题想让我们滚顾的知识点在于
伪指令dd,db,dw分别是占用了多少个字节
div除法指令的使用
还有就是多种寻址的方法

我的思路基本上是先计算年份-收入-人员的偏移地址是多少到多少(0-53h),(54h-a7h),(a8h-d1h)
然后再计算table段里面需要填入的具体地址，随后考虑data段分别占用的字节
然后再进行写代码，我写的时候还出了1-2次错误，第一次少定义了一个偏移导致只能寻址雇员数的时候第一次存入3，第二次存入变成9了，为什么我会做错是因为我一开始认为dw也是4字节了

我的代码如下：里面都有注释，看不清楚的可以自己把代码复制到Notepad++或者MASMPlus中看一下

1. assume cs:codesg,ds:data,es:table
   
2. data segment
   
3. db '1975','1976','1977','1978','1979','1980','1981','1982','1983'
   
4. db '1984','1985','1986','1987','1988','1989','1990','1991','1992'
   
5. db '1993','1994','1995';0-53h
   
6. dd 16,22,382,1356,2390,8000,16000,24486,50065,97479,140417,197514
   
7. dd 345980,590827,803530,1183000,1843000,2759000,3753000,4649000,5937000;54h-a7h
   
8. dw 3,7,9,13,28,38,130,220,476,778,1001,1442,2258,2793,4037,5635,8226
   
9. dw 11542,14430,15257,17800;a8h-d1h
   
10. data ends
    
11. 
    
12. table segment
    
13. db 21 dup ('year summ ne ?? ');0-3年份,4空格,5-8收入,9空格,10-11雇员,12空格,13-14人均收入,15空格
    
14. table ends
    
15. 
    
16. codesg segment
    
17. start:
    
18. mov ax,data
    
19. mov ds,ax;设定data段地址
    
20. mov ax,table
    
21. mov es,ax;设定table段地址
    
22. mov cx,21;定义循环次数
    
23. mov bx,0;bx用来存放data段的偏移地址
    
24. mov bp,0;bp用来存放table的行偏移
    
25. mov di,0;di用来存放雇员数与人均收入的偏移
    
26. mov si,2;因为ax是字形数据，而我们定义的年份与收入都是2个字的
    
27. s:mov ax,[bx];取年份的数据前2个字节(因为年份占用了4个字节)
    
28. mov es:[bp],ax;存入年份数据前2个字节
    
29. mov ax,[bx+si];取年份数据后2个字节
    
30. mov es:[bp+si],ax;存入年份数据后2个字节
    
31. mov ax,[bx+54h];取收入前2个字节
    
32. mov es:[bp+5],ax;存入收入前2个字节
    
33. mov ax,[bx+si+54h];取收入后2个字节
    
34. mov es:[bp+si+5],ax;存入收入后2个字节
    
35. mov ax,ds:[di+0a8h];取雇员数
    
36. mov es:[bp+10],ax;存入雇员数
    
37. mov ax,[bx+54h];设置被除数
    
38. mov dx,[bx+54h+si];设置被除数
    
39. div WORD ptr ds:[di+0a8h];取字形数据的除数
    
40. mov es:[bp+13],ax;把商数的结果放入
    
41. add di,2
    
42. add bx,4
    
43. add bp,16
    
44. loop s
    
45. codesg ends
    
46. end start

复制代码

福禄娃娃

谢谢楼主分享！
实现方法应该不止一种

缌唸

感谢楼主，很好很实用{:1_1:}

牡丹花下死做鬼

O(∩_∩)O谢谢楼主分享啊(*^__^*) 嘻嘻……

缌唸

楼主 代码真心好

LinuxDeepin

一个小时写完，你厉害，不过你忘了

mov ax,4c00H
int 21H

程序不打算退出了？～～(^-^)～～

小咒

LinuxDeepin 发表于 2013-9-2 21:25

                               
登录/注册后可看大图

一个小时写完，你厉害，不过你忘了

mov ax,4c00H

退出代码确实忘记写了{:7_154:}

业余选手

assume ds:dataseg, cs:codeseg

dataseg segment
        db '1975','1976','1977','1978','1979','1980','1981','1982','1983'
        db '1984','1985','1986','1987','1988','1989','1990','1991','1992'
        db '1993','1994','1995'
       
        dd 16,22,382,1356,2390,8000,16000,24486,50065,97479,140417,197514
        dd 345980,590827,803530,1183000,1843000,2759000,3753000,4649000,5937000
       
        dw 3,7,9,13,28,38,130,220,486,778,1001,1442,2258,2793,4038,5636,8228
        dw 11542,14430,15258,17800
dataseg ends

table segment
        db 21 dup ('year sumn ne ?? ')
table ends

codeseg segment

        start:
                mov ax, dataseg
                mov ds, ax
                mov si, 0
               
                mov ax, table
                mov es, ax
                mov di, 0
                mov bx, 0
               
                mov cx, 21
        s:       
               
           mov  dx, ds:[si]
                mov  es:[di], dx
                mov  dx, ds:[si+2]
                mov  es:[di+2], dx
               
                mov ax, 84[si]
                mov es:[di+5], ax
                mov ax, 84[si+2]
                mov es:[di+7], ax
               
                add si, 4
               
                mov ax, 168[bx]
                mov es:[di+10], ax
                add bx, 2
                add di, 10H
                loop s
               
                mov ax, 4c00h
                int 21h
codeseg ends

end start

libinqi456

占用了多少个字节

Ъγ:_小ツ雨oο

没错误，我看错了。:dizzy:，

gyixue

楼主比我快啊

Maoshao

没写全    最后除法没写   。。
assume cs:codesg

data segment
        db '1975','1976','1977','1978','1979','1980','1981','1982','1983'
db '1984','1985','1986','1987','1988','1989','1990','1991','1992'
db '1994','1995'
dd 16,22,382,1356,2390,8000,16000,24486,50065,97479,140417,197514
dd 345980,590827,803530,1183000,2759000,3753000,4649000,5937000
dw 3,7,9,13,28,38,130,220,476,778,1001,2258,2793,4037,5635,8226
dw 11542,14430,15257,17800
data ends

table segment
db 21 dup('year summ ne ?? ')
table ends

codesg segment
       
start:        mov ax,table
        mov es,ax
        mov ax,data
        mov bx,0
        mov ds,ax

        mov cx,21

s:        push cx
        mov cx,2

s0:        mov ax,[si]
        mov es:[bx],ax
        add bx,2
        add si,2
        loop s0
        inc bx
        mov cx,2

s2:        mov ax,[si+50H]
        mov es:[bx],ax
        add si,2
        add bx,2
        loop s2
        inc bx
        mov ax,[si+0A0H]
        mov es:[bx],ax
        mov dx
        sub si,4
        add bx,6
        pop cx
        loop s
        mov ax,4c00h
        int 21h
codesg ends
end start

dys376820508

单步调试到 cx=6时，做除法时会提示除法溢出？