smaller.asm

来自「包括显示彩条、偶数求和、小数、加法、字母、显示字符等9个小程序,压缩包自带运行工」· 汇编 代码 · 共 44 行

DATA SEGMENT
   BUF DB '0123456789ABCDEF'
   ARR DB 80,90,50,40,30,60,73
       DB 57,98,69
   N=$-ARR
   SUM DB 2CH
   STR DB '<60 number is :$'
DATA ENDS 
CODE SEGMENT 
     ASSUME CS:CODE,DS:DATA
BEGIN: MOV AX,DATA
       MOV DS,AX
       MOV AH,9 ;输出以$结尾的字符串
       LEA DX,STR 
       INT 21H
       MOV AL,0
       MOV CX,N
       LEA SI,ARR ;取有效地址
 NEXT1:MOV DL,[SI]
       CMP DL,60  ;结果不回送
       JGE NEXT   ;>=
       INC AL     ;自加一
  NEXT:INC SI
       LOOP NEXT1
       MOV SUM,AL
       LEA BX,BUF ;将buf的有效偏移地址送到bx
       MOV CL,4
       SHR AL,CL  ;逻辑右移4位
       XLAT       ;字节翻译指令
       MOV AH,2   ;显示一字符 输出高位
       MOV DL,AL
       INT 21H
       MOV AL,SUM
       AND AL,0FH                                                                                                                           
       XLAT
       MOV DL,AL
       MOV AH,2  ;显示一字符，输出低位
       INT 21H
       MOV DL,'H'
       INT 21H
       MOV AH,4CH
       INT 21H
CODE ENDS
END BEGIN