Бегущая точка, графика в тасме Опции

[Гость_Андрей]

Привет спецам...
Вот пытаюсь разобраться с этим "зверем" - Assemblerом.
Нужно написать лабораторную по графике - бегущая по горизонтали точка.
Вот чегой то накарякал, точка пробегает справа на лево 1 раз, только очень быстро, глазу не заметно...
А как вставить в Assemblerе регулируемую паузу? Есть ли какая ф-ция для етого?
А может это все можно написать по другому, более толково?
Буду рад любой помощи и советам.

	.model	tiny
	.code
	org 100h
start:
	mov	ax, 0013h
	int	10h
	mov	cx, 319
	mov	dx, 100;рисую точку в 100 строке
ekran:
	int 10h
	mov	al, 00110011b;зеленая точка
	mov	ah, 0Ch
	int	10h	
	dec	cx	
	inc	cx
	inc	cx
	mov	al, 000b   ; черным затушевываю хвост линии
	mov	ah, 0Ch
	int	10h	
	dec	cx
	dec	cx
	int 10h
	jns	ekran
	ret
	end	start

Заранее благодарен.

[BlackShadow]

Нашёл. Очень даже не плохо.
XOR AH,AH
INT 1Ah
Возвращает в CX:DX (CX << 16 + DX) кол-во тиков таймера с момента сброса (Reseta компа). получаешь какое-то значение, ждёшь пока оно изменится на нужное тебе кол-во и ваяешь дальше.
Тик генерируется 18.2 раза в секунду. Итого:
1 секунда = 18 тиков
1 минута = 1092
1 час = 65543
1 сутки = 1573040
Вот так.