刚刚做完的实验7
assume cs:a,ds:b,b segment
db '1975','1976','1977','1978','1979'
db '1980','1981','1982','1983','1984'
db '1985','1986','1987','1988','1989'
db '1990','1991','1992','1993','1994','1995' ;年月 byte字节型数据，4X21=84 转换16进制 0~53
dd 16,22,382,1356,2390,8000,16000
dd 24486,50065,97479,140417,197514
dd 345980,590827,803530,1183000
dd 1843000,2795000,3753000,4649000,5937000 ;收入，dword双字型数据， 4X21=84 转换16进制 54~0A7
dw 3,7,9,13,28,38,130,220,476,778,1001,1442
dw 2258,2793,4037,5635,8226,11542,14430,15257,17800 ;人数word 字型数据21X2=42转换16进制 0A8~0D
;年月 0~53 收入 54~A7 人数 0A7~0D1
b ends
biaoge segment
db 21 dup ('year summ ne ?? ')
biaoge ends
a segment ; 程序开始
rukou: ; 指令入口
mov ax,b ; 取数据段地址
mov ds,ax ; 将数据段地址赋值给段寄存器 DS
mov ax,biaoge ; 取表格段地址
mov es,ax ; 用寄存器将表格段地址赋值到段寄存器 ES
mov bx,0 ; 设置变量
mov di,0 ; 设置变量
mov si,0 ; 设置变量
mov cx,15h ; 设置循环
s: mov ax, ; 取年份
mov es:,ax ; 放入年份
mov ax, ; 取年份
mov es:,ax ; 放入年份
mov ax, ; 取收入
mov es:,ax ; 放入收入
mov dx, ; 取收入
mov es:,dx ; 放入收入
mov ax, ; 取人数
mov es:,ax ; 放入人数
mov ax,es: ; 取收入 放入AX 做除法准备
mov dx,es: ; 取收入 放入DX 做除法准备
div word ptr es: ; 除与人数，算出人均收入，结果商储存在AX 寄存器中 余储存在 DX 中
mov es:,ax ; 将算好的结果放入 ES 段中 做好排序
add bx,4 ; BX 加四 为下一行取年份和收入做准备
add di,10H ; DI 加十六将 ES 段指向下一行
add si,2 ; SI 加二为下一行取人数做准备
sub ax,ax ; 为了不响应下一次处理数据和做除法，选择清零
sub dx,dx ; 为了不响应下一次处理数据和做除法，选择清零
loop s ; 结束循环
mov ax,4e00h
int 21h
a ends
end rukou 希望可以结交更多的汇编朋友。
页:
[1]