实验七作业，花了半天时间，不断调试修改终于完成了

pzhccy

实验七作业，花了半天时间，不断调试修改终于完成了，现在才知道高级语言真的是太方便了，汇编能锻炼脑袋，亦能伤脑袋，不能太过分了，明天继续，呵呵，附上代码！

1. assume cs:codesg
   
2. 
   
3. data segment
   
4.         db '1975','1976','1977','1978','1979','1980','1981','1982','1983'
   
5.         db '1984','1985','1986','1987','1988','1989','1990','1991','1992'
   
6.         db '1993','1994','1995'
   
7.         ;以上是表示21年的21个字符串,21*4=84byte
   
8.         dd 16,22,382,1356,2390,8000,16000,24486,50065,97479,140417,197514
   
9.         dd 345980,590827,803530,1183000,1843000,2759000,3753000,4649000,5937000
   
10.         ;以上是表示21年公司总收入的21个dword型数据,21*4=84byte
    
11.         dw 3,7,9,13,28,38,130,220,476,778,1001,1442,2258,2793,4037,5635,8226
    
12.         dw 11542,14430,15257,17800
    
13.         ;以上是表示21年公司雇员人数的21个word型数据,21*2=42byte
    
14. data ends
    
15. 
    
16. table segment
    
17.         db 21 dup('year summ ne ?? ')
    
18. table ends
    
19. 
    
20. codesg segment
    
21. start: mov ax,data
    
22.            mov ds,ax
    
23.           
    
24.            mov ax,table
    
25.            mov es,ax
    
26.           
    
27.            mov bx,0          
    
28.            mov cx,21
    
29.            mov si,0
    
30.            mov di,0
    
31.           
    
32.         s: mov ax,[si]
    
33.            mov word ptr es:[bx+0],ax
    
34.            add si,2
    
35.            mov ax,[si]
    
36.            mov word ptr es:[bx+2],ax
    
37.            add si,2
    
38.           
    
39.            mov byte ptr es:[bx+4],' '
    
40.           
    
41.            sub si,4
    
42.            mov ax,[84+si]
    
43.            mov word ptr es:[bx+5],ax
    
44.            add si,2
    
45.            mov ax,[84+si]
    
46.            mov word ptr es:[bx+7],ax
    
47.            add si,2
    
48.           
    
49.            mov byte ptr es:[bx+9],' '
    
50.           
    
51.            mov ax,[di+168]
    
52.            mov word ptr es:[bx+0ah],ax
    
53.            add di,2
    
54.           
    
55.            mov byte ptr es:[bx+0ch],' '
    
56.           
    
57.            mov ax,es:[bx+5]
    
58.            mov dx,es:[bx+7]
    
59.            div word ptr es:[bx+0ah]
    
60.            mov word ptr es:[bx+0dh],ax
    
61.           
    
62.            mov byte ptr es:[bx+0fh],' '
    
63.           
    
64.           
    
65.            add bx,10h
    
66.            loop s
    
67.           
    
68.            mov ax,4c00h
    
69.            int 21h
    
70. codesg ends
    
71. 
    
72. end start

复制代码

艹樱散丿小羽

表示想要说明说明？

HB无影

程序是调试出来的，不是写出来的奥！！！

pzhccy

有道理{:1_1:}

KTMONREK

我想知道为什么试验七的程序在我的电脑上运行只有年份？没有其他数据

自古天道酬勤

学习一下

2333

ms1234

KTMONREK 发表于 2015-4-20 21:37
我想知道为什么试验七的程序在我的电脑上运行只有年份？没有其他数据

同问