DATA SEGMENT
     STR DB 'INPUT A NUMBER 0-9:$'
DATA ENDS
SSEG SEGMENT
     DB 200 DUP(0)
SSEG ENDS
CODE SEGMENT
     ASSUME CS:CODE,SS:SSEG,DS:DATA
BEGIN:MOV AX,DATA
      MOV DS,AX
      MOV AH,9 ;顯示以$結尾的字符
      LEA DX,STR
      INT 21H
      MOV AH,1  ;鍵盤輸入并顯示
      INT 21H
      ADD AL,11H
      MOV DL,AL
      MOV AH,2  ;顯示一字符
      INT 21H
      MOV AH,4CH;返回dos
      INT 21H
CODE ENDS
END BEGIN