wxlOS 发表于 2014-10-25 19:55:30

今天完成实验七,两天啊,眼睛都花了

assume cs:codesg

data segment
        db '1975','1976','1977','1978','1979','1980','1981','1982','1983','1984','1985','1986'
        db '1987','1988','1989','1990','1991','1992','1993','1994','1995'
        ;以上是21的21个字符串 0-53H
        dd 16,22,382,1356,2390,8000,16000,24486,50065,97479,140417,197514
        dd 345980,590827,803530,1183000,1843000,2759000,3753000,4649000,5937000
        ;以上是21年公司的总收入的21个dword型数据 54H-0A7H
        dw 3,7,9,13,28,38,130,220,476,778,1001,1442,2258,2793,4037,5635,8226
        dw 11542,14430,15257,17800
        ;以上是21年公司雇员人数的21个word型数据 0A8H-0D0H
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 ;第二个数据段可用es额外段寄存器
               
                mov bx, 0
                mov si, 0
                mov di, 0
                mov cx, 21 ;因为循环21次
               
s:                mov ax, ds:0A8H+
                mov es:, ax ;雇员人数
               
                mov ax, 54H+
                mov dx, 54H+
                mov es:, ax
                mov es:, dx ;每年的总收入
               
                div word ptr ds:0A8H+
                mov es:, ax
                add si, 2 ;人均收入
               
                ;这样除了年份以外的数据都已经复制好了
                mov al,
                mov es:, al
                inc bx
                mov al,
                mov es:, al
                inc bx
                mov al,
                mov es:, al
                inc bx
                mov al,
                mov es:, al
                inc bx ;年份
               
                add di, 16
               
                loop s
               
                mov ax, 4C00H
                int 21H
codesg ends
end start

wxlOS 发表于 2014-10-25 19:57:30

昨天半夜突然有这个想法。所以尝试下。想了两天。打了几张草稿纸,总有靠自己搞定了。。我是反着覆盖的。先雇员。再平均值,再总收入。最后才是年份

yzsqz001 发表于 2014-10-27 22:47:42

半夜起来,真佩服楼主的学习精神
页: [1]
查看完整版本: 今天完成实验七,两天啊,眼睛都花了