e6_8.asm

ZHUYAO ZSHI LAI JIECHUADE LAIDE

stack segment stack
      db 256 dup(?)
stack ends
data segment
     dat1 db 34h
     dat2 db ?
     dat3 db ?
data ends
code segment
     assume cs:code,ds:data,ss:stack
star:mov ax,data
     mov ds,ax
     lea si,dat1
     mov al,[si]
     cmp al,99
     jbe BCD
     lea di,dat3
     mov byte ptr[di],0ffh
     jmp next
BCD: cbw
     mov cl,10
     div cl
     mov cl,4
     shl al,cl
     or  al,ah
     lea di,dat2
     mov [di],al
next:mov ah,4ch
     int 21h
code ends
     end star