Организовать перемещение символа ‘*’ - Assembler

.model small
.386
 
.stack 100h
 
.data
 
.code
start:
mov ax,@data
mov ds,ax
 
mov ah,00h
mov al,03h
int 10h
 
push 0B800h
pop es
mov di,28h*2
 
mov cx,18h+1
step:
mov ax,062Ah
stosw
 
call delay
 
sub di,2
 
mov ax,0000h
stosw
 
add di,158
loop step
 
mov ah,4Ch
mov al,00h
int 21h
 
delay proc
push ax
push bx
push cx
push dx
 
xor ah,ah
int 1Ah
 
mov bx,dx
add bx,30
 
tik:
xor ah,ah
int 1Ah
 
cmp dx,bx
jbe tik
 
pop dx
pop cx
pop bx
pop ax
 
ret
delay endp
end start