Notes

section .data
welmsgdb 10,'Multiplication using add and shift method',10
welmsg_lenequ $-welmsg
nummsgdb 10,'Enter two digits of Number::'
nummsg_lenequ $-nummsg
resmsgdb 10,'Multiplication of elements::'
resmsg_lenequ $-resmsg
blankmsgdb 10,'',10
blank_lenequ $-blankmsg

section .bss
numascii resb 03
multi1 resb 02
resl resb 02
multi2 resb 02
dispbuff resb 04

%macro dispmsg 2
mov eax,04
mov ebx,01
mov ecx,%1
mov edx,%2
int 80h
%endmacro

%macro accept 2
mov eax,03
mov ebx,0
mov ecx,%1
mov edx,%2
int 80h
%endmacro

section .text
global _start
_start:
dispmsgwelmsg,welmsg_len
dispmsgnummsg,nummsg_len
accept numascii,3
callpacknum
mov [multi1],bl
dispmsgnummsg,nummsg_len
accept numascii,3
callpacknum
mov [multi2],bl
mov al,[multi1]
mov cl,0
mov edx,0
mov edx,08h
addup:
rcr al,01
jnc next1
mov bh,00h
shlbx,cl
add [resl],bx
movbl,[multi2]
next1: inc cl
decedx
jnzaddup

dispmsgresmsg,resmsg_len
movbx,[resl]
call disp16_proc
dispmsgblankmsg,blank_len
mov eax,01 ;Exit
mov ebx,00
int 80h
packnum:
mov bl,0
mov ecx,02
movesi,numascii
up1:
rol bl,04
mov al,[esi]
cmp al,39h
jbe skip1
sub al,07h
skip1: sub al,30h
addbl,al
incesi
loop up1
ret

disp16_proc:
mov ecx,4
movedi,dispbuff
dup1:
rol bx,4
moval,bl
and al,0fh
cmp al,09
jbedskip
add al,07h
dskip: add al,30h
mov [edi],al
incedi
loop dup1
dispmsg dispbuff,4
ret