;十化二輸入
DATA SEGMENT
BUF DW ?
DATA ENDS
CODE SEGMENT
 ASSUME CS:CODE,DS:DATA
START: MOV AX,DATA
 MOV DS,AX
 MOV BUF,0
IN_L: MOV AH,01H
 INT 21H
 CMP AL,','
 JE END_L
 AND AL,0FH
 SHL BUF,1
 MOV BX,BUF
 SHL BUF,1
 SHL BUF,1
 ADD BUF,BX
 MOV AH,0
 ADD BUF,AX
 JMP IN_L
END_L: MOV AH,4CH
 INT 21H
CODE ENDS
 END START