ssume cs:codesg, ds:datasg, ss:stacksg, es:tablesg
stacksg segment
dd 0,0,0,0,0,0,0,0
stacksg ends
datasg segment
dw 21 dup(0)
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,476,778,1001,1442,2258,2793,4037,5635,8226
dw 11524,14430,15257,17800
datasg ends
tablesg segment
db 21 dup('year summ ne ?? ')
tablesg ends
codesg segment
start:
mov ax,stacksg
mov ss,ax
mov sp,0020H
mov ax,datasg
mov ds,ax
mov ax,tablesg
mov es,ax
mov bx,0
mov cx,21
mov ax,1975
mov [bx],ax
s0: mov si,1
add [bx],si
mov ax,[bx]
mov [bx+2],ax
add bx,2
loop s0
我把年份直接变成ACII码和后面的数据一起处理成十进制数 |