汇编学习第十章[课程设计1]

对前面学习知识的总结,学习了ACSII转换方法,  十进制ASCII=十进制数码+30H

 

assume cs:code,ds:data,ss:stack
data 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'

    dw    3,7,9,13,28,38,130,220
    dw    476,778,1001,1442,2258,2793,4037,5635
    dw    8226,11542,14430,15257,17800

    dw    5,3,42,104,85,210,123,111
    dw    105,125,140,136,153,211,199,209
    dw    224,239,260,304,333

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

stack segment
    dw 16 dup(0)
    
code segment
start:    mov ax,data
    mov ds,ax
    mov ax,stack
    mov ss,ax
    mov sp,32
    mov bx,0
    mov cx,21
    mov ax,0b800h
    mov es,ax
    mov ax,30
    mov bp,ax


year:    
    push cx                ;year
    mov cx,4
year1:
    mov al,[si]
    mov es:[bx+di],al
    mov ah,7
    mov es:[bx+di+1],ah
    add di,2 
    inc si
    loop year1

    mov di,0
    add bx,160
    pop cx 
    loop year
                    
    mov cx,21                                    
    mov bx,40*2

a0:                    ;the fourth column
    push cx
    mov ax,[si]
a1:    
    mov cx,10
    mov dx,0
    div cx
    mov cx,ax
    add dx,30H
    push dx
    jcxz a2    
    inc cx                ;防止商为1跳转
    loop a1
a2:
    mov ax,[si]        
popa:
    mov cx,10
    mov dx,0
    div cx
    pop dx
    mov es:[bx+di],dl
    mov dh,7
    mov es:[bx+di+1],dh
    add di,2
    mov cx,ax
    inc cx
    loop popa
    
    mov di,0
    add si,2
    add bx,160
    pop cx
    loop a0
    
    mov cx,21            ;The third column
    mov bx,30*2

b0:    
    push cx
    mov ax,[si]
b1:    
    mov cx,10
    mov dx,0
    div cx
    mov cx,ax
    add dx,30H
    push dx
    jcxz b2
    inc cx                ;防止商为1跳转
    loop b1
b2:
    mov ax,[si]        
popb:
    mov cx,10
    mov dx,0
    div cx
    pop dx
    mov es:[bx+di],dl
    mov dh,7
    mov es:[bx+di+1],dh
    add di,2
    mov cx,ax
    inc cx
    loop popb
    
    mov di,0
    add si,2
    add bx,160
    pop cx
    loop b0

    
    mov cx,21            ;The second column

c0:    
    push cx
    mov bx,[si]
    mov dx,[si+2]
c1:    
    mov ax,dx
    mov dx,0
    mov cx,10
    div cx
    push ax                ;保存 int(h/n)
    
    mov ax,bx
    div cx
    add dx,30H
    pop cx                ;加载 int(h/n) cx=int(h/n)直接用商的高八位cx判断,并且不破坏dx的数值
    push dx                ;保存 acsii
    mov dx,cx
    inc cx                ;防止商为1跳转
    loop c1
    mov cx,ax
    mov bx,ax            ;保护商的低八位
    inc cx
    loop c1
c2:    
    mov bx,[si]
    mov dx,[si+2]
popc:    
    mov ax,dx
    mov dx,0
    mov cx,10
    div cx
    push ax                ;保存 int(h/n)
    
    mov ax,bx
    div cx
    pop dx                ;加载 int(h/n)
    mov cx,dx            ;使用cx加载商的高八位防止破坏dx并且做判断

    pop dx                ;加载 ascii

    mov es:[bp+di],dl
    mov dl,7
    mov es:[bp+di+1],dl
    add di,2

    mov dx,cx            ;还原dx
    inc cx                ;防止商为1跳转
    loop popc
    mov cx,ax
    mov bx,ax            ;保护商的低八位
    inc cx
    loop popc

    add si,4
    mov di,0
    pop cx
    add bp,160
    loop c0
    
    mov ax,4c00h    
    int 21h
    
code ends

end start