BCD to 7 Segment Conversion

;PROGRAM TO CONVERT BCD NUMBERS TO THEIR 7 SEGMENT CODES

data segment

codelist db 3fh,06h,5bh,4fh,66h,6dh,7dh,07h,7fh,67h

char equ 05

res db ?

data ends

code segment

assume cs:code, ds:data

start:

mov ax,data

mov ds,ax

lea bx,codelist

mov al,char

xlat

mov byte ptr res,al

int 3

code ends

end start