.model small
.stack 64
.data
a dw 510h
b dw 1520h
tik dw ?
x db 0
.code
main proc near
mov ax,@data
mov ds,ax
mov ah,02
mov bh,00
mov dh,12
mov dl,12
int 10h
a10:
mov ax,0600h
mov bh,52h
mov cx,a
mov dx,b
int 10h
inc x
call delay
inc a
inc b
mov dl,cl
mov ax,0600h
mov bh,00h
int 10h
mov ah,00h
mov al,03h
int 10h
cmp x,10
jb a10
mov ax,4c00h
int 21h
main endp
delay proc near
mov ah,00h
int 1ah
mov tik,dx
add tik,12h
b10:
mov ah,00h
int 1ah
cmp tik,dx
jge b10
ret
delay endp
end main
.stack 64
.data
a dw 510h
b dw 1520h
tik dw ?
x db 0
.code
main proc near
mov ax,@data
mov ds,ax
mov ah,02
mov bh,00
mov dh,12
mov dl,12
int 10h
a10:
mov ax,0600h
mov bh,52h
mov cx,a
mov dx,b
int 10h
inc x
call delay
inc a
inc b
mov dl,cl
mov ax,0600h
mov bh,00h
int 10h
mov ah,00h
mov al,03h
int 10h
cmp x,10
jb a10
mov ax,4c00h
int 21h
main endp
delay proc near
mov ah,00h
int 1ah
mov tik,dx
add tik,12h
b10:
mov ah,00h
int 1ah
cmp tik,dx
jge b10
ret
delay endp
end main
No comments:
Post a Comment