Sum

.MODEL SMALL
.STACK 100H
.DATA
  M1 DB "HOW MANY NUMBER(S)?::$"
  M2 DB 0DH, 0AH, "ENTER THE NUMBER(S) ::$"
  M3 DB 0DH, 0AH, "THE SUM IS::$"
  SUM DW 0

.CODE
  MAIN PROC
  MOV AX, @DATA
  MOV DS, AX

LEA DX, M1
MOV AH, 9
INT 21H

CALL INDEC
MOV CX, AX

LEA DX, M2
MOV AH, 9
INT 21H

TOP:
CALL INDEC
ADD SUM, AX
MOV AH, 2
MOV DL, 0DH
INT 21H
MOV DL, 0AH
INT 21H
LOOP TOP

LEA DX, M3
MOV AH, 9
INT 21H

MOV AX, SUM
CALL OUTDEC

MOV AH, 4CH
INT 21H

MAIN ENDP
INCLUDE INDEC.ASM
INCLUDE OUTDEC.ASM
END MAIN

ASCI to Binary

.MODEL SMALL
.STACK 100H
.DATA DB
M1 DB "Enter the Character::$"
M2 DB ODH,OAH,"The binary is::$"

MAIN PROC
MOV AX,@DATA
MOV DS,AX

MOV AH,1
INT 21H
MOV BL,AL
MOV CX,0
TOP:CMP CX,8
JE EXIT
SHL BL,1
JC PRINT1
MOV DL,'0'
MOV AH,2
INT 21H
PRINT 1:
MOV DC,1
MOV AH,2
INT 21H
INC CX
JMP TOP
INC CX
JMP TOP
MOV AH,4ch
INT 21H
MAIN ENDP
END MAIN
Exit:MOV AH,4CH
INT 21H
MAIN END