TASM: Замена символов в строке.

[APTEMUC]

Составить программу, которая модифицирует строку "01.04.05" в строку "1/04/2005" на TASM. Для 16 или 32-разрядных регистров.

.MODEL small
.STACK 100h
.386
.DATA
str1 DB '01.04.05','$'

.CODE
mov ax,@data
mov ds,ax
lea edi,str1
mov al,'.'

lo:
cld
REPNE SCASB
jnz exit
mov byte ptr[edi-1],'/'
jmp lo

exit:
mov ah,9
mov dx,offset str1
int 21h
mov ah,4ch
int 21h

end

Собственно вот то, что сам наработал, для начала хотел 01.04.05 перевести и вывести на экран в виде 01/04/05, всё откомпилилось, но работать - не робит (на экран выводит, но ничего не изменяет). Если не трудно, то помогите дописать программу, буду очень признателен.

[Goodwin98]

В начало кода

mov ax,@data
mov ds,ax

[Mikl___]

APTEMUC
как-то так

.model small
.286
.code
start:	mov ax,@data
	mov ds,ax
	mov es,ax; <-- должно быть es=ds
	mov di,offset string
	mov al,'.'
	mov cx,len
lo:	repne scasb
	mov byte ptr[di-1],'/'
	loop lo
	mov ah,9
	mov dx,offset string
	int 21h
	mov ah,0
	int 16h
	mov ah,4ch
	int 21h
.data
string db '01.04.05$'
len =$-string-1
end start

используй теги "код" (#)