Программа для тестирования памяти, тестирование ячеек памяти

[Hunter557]

Доброго времени суток !
Вот есть такая программа для тестирования одной ячейки памяти с помощью записи в неё прямого и инверсного числа в двоичной системе. Программа нормально функционирует.

.model small
.data
t1 db 00010110b
t2 db 11101001b
pow1 db 'test1 ok',"$"
pow2 db 'test1 wrong',"$"
pow3 db 'test2 ok',"$"
pow4 db 'test2 wrong',"$"
pow5 db " ","$"
.code
begin:
mov ax,@data
mov ds,ax
mov bl,t1
mov [55f8h:0005h],bl
mov cl,[55f8h:0005h]
cmp bl,cl
je m1
mov ah,09h
lea dx,pow2
int 21h
jmp roz2
m1: mov ah,09h
lea dx,pow1
int 21h
roz2: mov bl,t2
mov ah,09h
lea dx,pow5
int 21h
mov [55f8h:0005h],bl
mov cl,[55f8h:0005h]
cmp bl,cl
je m3
mov ah,09h
lea dx,pow4
int 21h
jmp exit
m3: mov ah,09h
lea dx,pow3
int 21h
exit: mov ax,4c00h
int 21h
end begin

Так вот ... Как сделать что бы эта программа тестировала три ячейки памяти (любых) .Mожет цикл поставить или как то иначе... подскажите... не повторять же одни и теже строчки в тексте программы ? Я циклом и хотел зделать но не пойму как организовать всё ...