e6_13.asm

ZHUYAO ZSHI LAI JIECHUADE LAIDE

stack segment stack
      dw 128 dup(?)
stack ends
data segment
     S db 4 dup(?)
data ends
code segment
     assume cs:code,ds:data,ss:stack
star:mov ax,data
     mov ds,ax
     mov bx,1
     mov ax,0
     mov cx,100
Next:add ax,bx
     inc bx
     loop Next
     mov dl,0
lp1: cmp ax,1000
     jb  lp2
     inc dl
     sub ax,1000
     jmp lp1
lp2: mov s+3,dl
     mov dl,0
lp3: cmp ax,100
     jb  lp4
     inc dl
     sub ax,100
     jmp lp3
lp4: mov s+2,dl
     mov dl,0
     mov dl,0
lp5: cmp ax,10
     jb  lp6
     inc dl
     sub ax,10
     jmp lp5
lp6: mov s+1,dl
     mov s,al
     ;Display
     lea si,s+3
     mov cx,4
Disp:mov dl,[si]
     add dl,30h
     dec si
     mov ah,2
     int 21h
     loop Disp
     mov ah,4ch
     int 21h
code ends
     end star