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

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

Привет спецам...
Вот пытаюсь разобраться с этим "зверем" - 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

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