. : : Assembly Language : : .  |  首页  |  我提出的问题  |  我参与的问题  |  我的收藏  |  消息中心   |  游客  登录  | 
提问 | 未解决 | 已解决 | 精华区 | 搜索 |
  《汇编语言》论坛 ->数据处理的两个基本问题
主题 : :  看看高手是怎么写试验7代码的!!!强烈推荐中...  [待解决] 回复[ 104次 ]   点击[ 9699次 ]  
liuxianming2001
[帖 主] [ 发表时间:2008-10-10 02:55 ] 
荣誉值:0
信誉值:0
注册日期:2008-09-03 00:18
DATAS  SEGMENT
              DB        '1975', '1976', '1977', '1978', '1979', '1980', '1981', '1982'
              DB        '1983', '1984', '1985', '1986', '1987', '1988', '1989', '1990'
              DB        '1991', '1992', '1993', '1994', '1995'
    
              DD        16, 22, 382, 1356, 2390, 8000, 16000, 24486, 50065, 97479, 140417, 197514
              DD        345980, 590827, 803530, 118300, 184300, 2759000, 3753000, 4649000, 5937000
    
              DW        3, 7, 9, 13, 28, 38, 130, 220, 476, 778, 1001, 1442, 2258, 2793, 4037, 5635, 8226
              DW        11542, 14430, 15257, 17800
       DATAS  ENDS

       TABLE  SEGMENT
              DB        21 DUP ('year summ ne ?? ')
       TABLE  ENDS

      STACKS  SEGMENT
              DB 16 DUP (0)
      STACKS  ENDS

ASSUME    CS:CODES,DS:DATAS,SS:STACKS

       CODES  SEGMENT
      START:
              ;相关寄存器初始化
              MOV       AX,DATAS
              MOV       DS,AX
              MOV       AX,TABLE
              MOV       ES,AX
              MOV       AX,STACKS
              MOV       SS,AX
              MOV       SP,16
    
              MOV       BX,0
              MOV       BP,0
              MOV       DI,0
              MOV       SI,0

              MOV       CX,21

      cycle:  ;使用栈复制年份
              PUSH      [DI].0
              PUSH      [DI].2
              POP       ES:[BP].2
              POP       ES:[BP].0
              
              ;使用栈复制收入
              PUSH      54H.[DI].0
              PUSH      54H.[DI].2
              POP       ES:[BP].7
              POP       ES:[BP].5

              ;使用栈复制雇员数
              PUSH      0A8H.[SI]
              POP       ES:[BP].0AH

              ;计算人均收入
              MOV       AX,ES:[BP].5
              MOV       DX,ES:[BP].7
              DIV WORD PTR ES:[BP].0AH
              MOV       ES:[BP].0DH,AX

              ADD       SI,2H
              ADD       DI,4H
              ADD       BP,10H

              loop cycle
                   

              MOV       AH,4CH
              INT       21H
       CODES  ENDS
END       START

-------------------------------------------------------------------
栈的使用、结构化程序设计的思想...
话就不多说了,自己体会吧
xianxia
[第5楼] [ 回复时间:2008-10-31 15:30 ] 
荣誉值:6
信誉值:6
注册日期:2008-10-15 11:11
一对比就是差距,佩服!


assume cs:codesg

data 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'


 dd 16,22,382,1356,2390,8000,16000,24486,50065,97479,140417,197517
 dd 345980,590827,803530,1183000,1843000,2759000,3753000,4649000,5937000

 dw 3,7,9,13,28,38,130,220,476,778,1001,1443,2258,2793,4037,5635,8226
 dw 11542,14430,15257,17800
                     
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 ss,ax
        mov bx,0

        mov cx,21
    s0: mov dx,cx
        mov cx,4
        mov si,0

     s: mov al,[bx+si]
        mov [bp].0h.[si],al
        inc si
        loop s
        add bx,4
        add bp,16
        mov cx,dx
        loop s0
        

        mov bp,0
        mov si,bx

        mov cx,21

    s1: mov ax,[bx]
        mov dx,[bx+2]
        mov [bp].5h,ax
        mov [bp].7h,dx

        div word ptr [si].54h
        mov [bp].0dh,ax

        mov ax,[si].54h
        mov [bp].0ah,ax
       
        add bx,4
        add si,2
        add bp,16
        loop s1

        mov ax,4c00h
        int 21h

codesg ends

end start
需要登录后才能回帖 -->> 请单击此处登录
    Copyright © 2006-2024   ASMEDU.NET  All Rights Reserved