INT 10H Вывод строки

[ADA]

Здравствуйте. Скажите в чём ошибка. Просматривал в TD - при записи данных в ячейки памяти их содержимое почему-то не меняется. ОС Vista, TASM

.model small
.stack 256
.data
time db 10 dup (?),'$'
counter dw 0000h;

.code
;вызов функции определения времени $2C. Он возвращает:
;CH - часы,CL - минуты,DH - секунды,DL - миллисекунды (с дискретностью 55 мс) 0-48, 1-49; 59=3Bh;9=Bh
setcursor proc
	push ax;
	push bx;
	push dx;
	mov dx,0000;строка и столбец
	mov ax,0200;
	mov bx,0000h;
	int 10h
	pop dx;
	pop bx;
	pop ax;
	ret;
setcursor endp

writetime proc
	lea bp,time;	
	mov cx,8;
	mov ax, 1300h;
	mov bl,3ch;
	mov dx, 0A05h;
	int 10h
	ret
writetime endp

main proc
NI:  mov ah, 2ch
  int 21h
  xor ah,ah
  lea BP, time
  ;
  mov bl,ch
  call HexToDecStr
  mov [ ES : BP ], bx;
  mov [ ES : BP + 2 ], 3ah; :
  ;
  ;
  mov bl,cl
  call HexToDecStr
  mov [ ES : BP + 3 ], bx;
  mov [ ES : BP + 5 ], 3ah; :
  ;
  ;
  mov bl,dh
  call HexToDecStr
  mov [ ES : BP + 6 ], bx;
  mov [ ES : BP + 9 ], 0;36;$
  ;
  call writetime
  ;mov ax, counter;
  ;inc ax;
  ;mov counter, ax
  ;cmp ax, 10h
  ;jae l_exit;
  ;jmp NI;
l_exit: .exit  
main endp

HexToDecStr proc ;bl-Вход, Bh:Bl Выход
	xor ax,ax;
	cmp bl, 50	
	jb HTDS4
	mov bh,5;
	jmp HTDS
HTDS4:	cmp bl, 40	
	jb HTDS3
	mov bh,4
	jmp	HTDS
HTDS3:	cmp bl, 30	
	jb HTDS2
	mov bh,3
	jmp	HTDS
HTDS2:	cmp bl, 20	
	jb HTDS1
	mov bh,2
	jmp	HTDS
HTDS1:	cmp bl, 10	
	jb HTDS0
	mov bh,1
	jmp HTDS
HTDS0: mov bh,0;
HTDS:	mov al, 10
		MUL bh;
		SUB bl,al; bh-старший разряд, bl-младший в hex
		add bl,48;
		add bh,48;		
	ret
HexToDecStr endp
end main

Спасибо.

[airyashov]

а куда вы пишите в памяти полученные значения?

[Min]

Вы используете ES. А он у вас на что указывает? и DS тоже не проинициализирован (хотя может его и не надо).
Попробуйте вначале main'а добавить:

mov ax,cs
mov ds,ax
mov es,ax