sannnnnd 发表于 2018-8-21 10:08:49

实验七除了最后的人均工资(人均收入补上啦!!)

本帖最后由 sannnnnd 于 2018-8-21 21:51 编辑

DATAS 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年的21个四字节的字符串
        ;0~53H
    dd 16,22,382,1356,2390,8000,16000,24486,50065,97479,140417,197514
    dd 345980,590827,803530,1183000,1843000,2759000,3753000,4649000,5937000
        ;以上是表示21年公司总收入的21个dword型数据
        ;54~0A7H
    dw 3,7,9,13,28,38,130,220,476,778,1001,1442,2258,2793,4037,5635,8226
    dw 11542,14430,15257,17800
    ;以上是表现21年公司雇员人数的21个word型数据
    ;0A8H~0D1H
DATAS ENDS

STACKS SEGMENT
    dw 8 dup (0)
STACKS ENDS

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

CODES SEGMENT
    ASSUME CS:CODES,DS:DATAS,SS:STACKS,ES:table
START:
    MOV AX,DATAS
    MOV DS,AX
    mov ax,table
    mov es,ax
    mov ax,STACKS
    mov ss,ax
    mov sp,16
    ;        es: 年份
    ;        es: 收入
    ;        es: 雇员数
    ;        es: 人均收入
    ;bx行地址,idata为属性地址,si为属性内部地址
    mov cx,21
    mov bx,0
    mov di,0
    mov dx,0
   
s:push cx
        mov cx,4
        mov si,0
       
s0:
    mov al,ds:
    mov es:,al
   
    mov al,ds:54H
    push bx
    add bx,5
    mov es:,al
   
    inc di
    inc si
    pop bx
    loop s0
            ;s0循环是录入四字节的年份和收入
        mov cx,2
        push di

        mov si,0
        ;s1循环是录入两字节的雇员数和人均工资(还没有开始做人均工资~)
s1:mov di,dx
        mov al,ds:0A8H
        push bx
        add bx,10
        mov es:,al
        inc dx
        inc si
        pop bx
        loop s1
    pop di
   
   
        add bx,16
        pop cx
        loop s
       
       
    MOV AH,4CH
    INT 21H
CODES ENDS
    END START

sannnnnd 发表于 2018-8-21 10:10:26

这个作业做了一早上!还没做完 临时有事就先溜了 晚上回来继续完成~

sannnnnd 发表于 2018-8-21 21:43:12

将人均工资补上之后~ 我感觉我把程序变复杂了!!!!


DATAS 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年的21个四字节的字符串
        ;0~53H
    dd 16,22,382,1356,2390,8000,16000,24486,50065,97479,140417,197514
    dd 345980,590827,803530,1183000,1843000,2759000,3753000,4649000,5937000
        ;以上是表示21年公司总收入的21个dword型数据
        ;54~0A7H
    dw 3,7,9,13,28,38,130,220,476,778,1001,1442,2258,2793,4037,5635,8226
    dw 11542,14430,15257,17800
    ;以上是表现21年公司雇员人数的21个word型数据
    ;0A8H~0D1H
    db 0
DATAS ENDS

STACKS SEGMENT
    dw 8 dup (0)
STACKS ENDS

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

CODES SEGMENT
    ASSUME CS:CODES,DS:DATAS,SS:STACKS,ES:table
START:
    MOV AX,DATAS
    MOV DS,AX
    mov ax,table
    mov es,ax
    mov ax,STACKS
    mov ss,ax
    mov sp,16
    ;        es: 年份
    ;        es: 收入
    ;        es: 雇员数
    ;        es: 人均收入
    ;bx行地址,idata为属性地址,si为属性内部地址
    mov cx,21
    mov bx,0
    mov di,0
    mov dx,0
    mov si,0
   
s:push si
        push cx
        mov cx,4
        mov si,0

s0:
    mov al,ds:
    mov es:,al
   
    mov al,ds:54H
    push bx
    add bx,5
    mov es:,al
    inc di
    inc si
    pop bx
    loop s0
   
   
        mov cx,2
        push di
        mov si,0
s1:mov di,dx
        mov al,ds:0A8H
        push bx
        add bx,10
        mov es:,al
        inc dx
        inc si
        pop bx
        loop s1
    pop di
   


        pop cx
        pop si
        push di
        push dx
       
        mov di,ds:
        mov dx,ds:
        mov ax,ds:
        div word ptr ds:
        mov es:,al
        mov es:,ah

        pop dx
        add si,4
        push cx
        mov cx,ds:
        add cx,2
        mov ds:,cx
        pop cx
        pop di
        add bx,16
        loop s
       
       
    MOV AH,4CH
    INT 21H
CODES ENDS
    END START

sannnnnd 发表于 2018-8-21 21:45:56

nice ~晚上总算把这个做完啦!!

740641642 发表于 2018-8-22 20:53:12

你帮我看看我的程序
页: [1]
查看完整版本: 实验七除了最后的人均工资(人均收入补上啦!!)