黑___猫 发表于 2012-6-27 17:43:36

实验7 大家帮我看看

贴上代码,不想打哪么多字,在debug测试了,大家帮我看看代码有没错误



年分,0-53H
收入,54H-0A7H
雇员,0A8H-0D1H
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,
mov es:,ax
mov ax,      ;年份循环
mov es:,ax

mov ax,
mov es:,ax    ;收入循环
mov ax,
mov es:,ax

mov ax,ds:
mov es:,ax   ;人数循环

mov ax,es:
mov dx,es:
div word ptr es:      ;人均收入
mov es:,ax

add si,10H
add di,02H
add bx,04H
loop s

梦幻羽羽 发表于 2012-9-3 13:28:21

呵呵楼主 ~   
代码上有几点小提示   :

1,在寻址上, 过多使用 idata, 使程序的灵活性变低,而且这种寻址方式有时会造成不必要的错误
2,结构上,有一点小小的逻辑错误
提示:这个逻辑错误造成内存错误

改正后的代码:

assume cs:codesg, ds:datasg, es:table, ss:pau;pau == pause 暂停因为在汇编中pause也是个指令 所以缩写
datasg 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'    ;表示21年

dd 16,22,382,1356,2390,8000,16000,24486,50065,97479,140417,197514
dd 345980,590827,803530,1183000,1843000,2759000,3753000,4649000,5937000    ; 表示21年公司收入(千美元)

dw 3,7,9,13,28,38,130,220,476,778,1001,1442,2258,2793,4037,5635,8226
dw 11542,14430,15257,17800   ;表示21年公司员工数
datasg ends

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

pau segment
dw 0         ;栈
pau ends

codesg segment
start:mov ax, datasg
      mov ds, ax
          mov ax, table
          mov es, ax
          mov ax, pau
          mov ss, ax
          mov sp, 16
          mov cx, 15
          mov bx, 0
          mov di, 0
          mov bp, 0
   s0:push cx
      mov si, 0
   s1:mov cx, 1
      mov ax,
      mov es:, ax
          mov ax,
      mov es:, ax
      add si, 5
      mov ax,
          mov es:, ax
          mov ax,
          mov es:, ax
          add si, 5
          mov ax, ds:
          mov es:, ax
          add si, 3
          mov dx,
          mov ax,
          div word ptr ds:
          mov es:, ax
          add di, 4
          add bp, 2
          loop s1
          add bx, 16
          pop cx
          loop s0
          
             mov ax, 4c00h
          int 21h
codesg ends
end start

梦幻羽羽 发表于 2012-9-3 13:29:05

如有问题请与我联系,    我个人资料里有我qq
页: [1]
查看完整版本: 实验7 大家帮我看看