汇编作业 实验7 实验七

刘东方

写了 调试 差不多快6个小时 总算是工作了
下面是结果的格式



                |0         1        2        3   |4        5        6        7   |8        9   |A        B  |C        D        EF                |
                |年        年        年        年  |收        入        收        入  |员        工  |商        商 |余        数        空格        |
table:0        |1        9        7        5   |10        00        00        00 |03        00 |05        00|01        00                   |
                                .
                                .
                                .
                                .

数据则全部存在 data segment 里面

因为不想把余数舍掉 就存在C,D 里面了

代码请看： 欢迎提供意见 批评 改进 等等

assume ds:data, cs:code

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

table segment
        db        21        dup('0123456789AB    ')
table ends

code segment
start:        mov ax,data
                mov ds,ax                ;income saved in ds
                mov ax,table
                mov ss,ax                ;table 0-3: year/4-7
                mov bx,0
                mov si,0
                mov di,0
                mov bp,0
                mov sp,160h
               
                mov cx,21
        s:        push bx
                mov ax,[bx] ;table 0-3: year
                mov [bp],ax
                mov ax,[bx+2] ;table 0-3: year
                mov [bp+2],ax
                pop bx
                add bp,10h
                add bx,4
                loop s
               
                mov bp,4
                mov cx,21
        s1:        push bx
                mov ax,[bx]        ;table 4-7: Income
                mov [bp],ax
                mov ax,[bx+2]
                mov [bp+2],ax
                pop bx
                add bp,10h
                add bx,4
                loop s1
               
                mov bp,8
                mov cx,21
        s2:        mov ax,[bx]        ;table 8-9:        Employee number
                mov [bp],ax
                add bp,10h
                add bx,2
                loop s2
               
                mov bp,4
                mov cx,21
        s3:        mov ax,[bp]
                mov dx,[bp+2]
                div word ptr [bp+4]
                mov [bp+6],ax                        ;table A-B:        Average income (Income/Employee)
                mov [bp+8],dx
                add bp,10h
                loop s3
               
                mov ax,4c00h
                int 21h
code ends
end start

wulichengji

大神好，提提建议
感觉利用ss和bp的想法很好。
然而sp的设置似乎没有什么意义。而且，即便是设置sp，21个16字节，栈顶应该是150H
如果设置为160H，将会覆盖cs段的内容，不过覆盖了也没有什么关系。
程序中似乎没有必要将bx入栈然后再出栈。
另外，格式和课后题目略有出入，比如年份和收入之间应该有空格，收入和雇员人数之间应该有空格。
不好意思，我这样说话是不是太吹毛求疵了，还请大神不要见怪。

wulichengji

assume cs:codesg
data segment
  db '1975','1976','1977','1978','1979','1980','1981'
  db '1982','1983','1984','1985','1986','1987','1988'
  db '1989','1990','1991','1992','1993','1994','1995'
  
  dd 16,    22,     382,    1356,   2390,   8000,   16000
  dd 24486, 50065,  97479,  140417, 197514, 345980, 590827
  dd 803530,1183000,1843000,2759000,3753000,4649000,5937000

  dw 3,   7,   9,   13,   28,   38,   130
  dw 220, 476, 778, 1001, 1442, 2258, 2793
  dw 4037,5635,8226,11542,14430,15257,17800
data ends

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

codesg segment
start: mov ax,data
       mov ds,ax
       mov ax,table
       mov es,ax
      
       mov bx,0
       mov si,0
       mov di,0
       mov cx,21
      
    s: mov ax,[si]
       mov es:[bx],ax
       mov dx,[si+84]
       mov es:[bx+5],dx
       add si,2
       mov ax,[si]
       mov es:[bx+2],ax
       mov dx,[si+84]
       mov es:[bx+7],dx
              
       mov ax,[di+168]
       mov es:[bx+10],ax
      
       mov ax,es:[bx+5]
       mov dx,es:[bx+7]
       div word ptr es:[bx+10]
       mov es:[bx+13],ax
      
       add si,2
       add di,2
       add bx,16
      
       loop s
      
       mov ax,4c00H
       int 21H
codesg ends
end start

welen123

看了好几个人都忽略了空格字符的存在。。。

DriedPlum

我想问的是，在数据存放的时候。年份，和收入没有在一起啊

WindyJane

谢谢 大佬分享,内容里面全是干货 ,好东西的干活!