请大家来帮我用汇编的语言写这个程序：.将一个数据表中的字符串'ABCD'反序复制到另一个存储区。

把str1定义的“ABCD”反序存到str2所在的位置。在masm4.0版本（XP系统）下调试通过。
dseg segment
str1 db 'ABCD'
cnt equ $-str1
str2 db cnt dup(?)
dseg ends
cseg segment
assume cs:cseg,ds:dseg
begin:
mov ax,dseg
mov ds,ax
lea si,str1
lea di,str2+cnt-1
mov cx,cnt
next:
mov al,[si]
mov [di],al
inc si
dec di
loop next
mov ah,4ch
int 21h
cseg ends
end begin