section .data
	msg db 'The Product is:', 10   
	msgLen  equ $-msg    
	num1 db  13H
	num2 db  03H 
section .bss
	MUL1 resw 1
	          temp resb 1			
section .text
global _start
_start:
         mov rax,1         	
         mov rdi,1 
         mov rsi,msg 
         mov rdx, msgLen  
         syscall
mov al,byte[num1]         
MUL byte[num2]                    
mov word[MUL1],ax   
mov bp,4
up:rol ax,4
      mov bx,ax
      and ax,0Fh
      cmp ax,09
      jbe down
     add ax,07h
    down:Add al, 30h
      Mov byte[temp],al 
       mov rax,1         	 
      mov rdi,1  
      mov rsi,temp 
      mov rdx, 1  
       syscall	
      mov ax,bx
     dec bp
     jnz up
mov rax,60    
mov rdi,0      
syscall