MP_no_str.asm

%macro write 2 
	  mov   ecx, %1
      mov   edx, %2
      mov   eax, 4
      mov   ebx, 1    
      int   80h
 %endmacro
 

section .text
global _start

_start:

lea esi, [x]
lea edi, [z]
mov ecx, 5h

l:
mov eax, [esi]
mov [edi], eax
inc esi
inc edi
dec ecx
jnz l

write msg, len
lea esi,[x]
mov edi,5h
call printArray

write msg, len
lea esi,[z]
mov edi,5h
call printArray




mov eax, 1
mov ebx, 0
int 80h

printArray:
temp:
mov bl, [esi]  ; take value from array

rol bl, 04  ; to get higher nibble
l1:
mov al, bl
AND al, 0x0F  ; to make upper 4 bits zero
add al, 30h
cmp al, 39h
jbe next
add al, 07h

next:
mov byte[y], al  ; to print
write y, 1
mov bl, byte[esi]   
dec byte[c]      ; run the loop twice
mov al, byte[c]
jnz l1
write space, 1
mov byte[c], 02
inc esi
dec edi
jnz temp
ret




section .bss
y: resb 1
z: resb 5

section .data
global x
msg: db 0ax,'display array:   ' 
space db '  '
len equ $- msg
c: db 02
countA:  db 5
x:
db 0xAB
db 0x3C
db 0x14
db 0x0F
db 0x21
n: db 0