prog6_8.asm

汇编语言-王爽 源代码 加 卜艳萍版源代码

stack  segment para stack '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
start: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  exit
bcd:  cbw
      mov  cl,10
      div  cl
      mov  cl,4
      shl  al,cl
      or  al,ah
      lea  di,dat2
      mov  [di],al
      
exit: mov  ah,4ch
      int  21h
code  ends
      end  start