Вывод на экран консоли номера строки и столбца, соответствующие положению курсора мыши непосредственно перед выводом

.model small
.stack 256
.data
stat db ?
col dw ?
row dw ?
color db 1
flag db 0
rezult db '000$'
mult10 db 10
mes_er db 'мышь не установлена',13,10,'$'
mes  db 'пpогpамма завеpшена',13,10,'$'
mask_m dw 16 dup(0ffffh)
    dw 8000h,0c000h,0a000h,9000h
    dw 0a800h,0b400h,0ba00h,0bd00h
    dw 0be80h,0bf40h,0bfa0h,0bfd0h
    dw 0bfe0h,0ae00h,0a300h,0e300h
.code
cursor_on proc near
   mov ax,01
   int 33h
   ret
cursor_on endp
cursor_off proc near
   mov ax,2
   int 33h
   ret
cursor_off endp
mouse_stat proc near
   mov ax,3
   int 33h
   ret
mouse_stat endp
pixel   proc near
    call cursor_off
    mov ah,0Ch
    mov al,color
    mov bh,0
    int 10h
    call cursor_on
    ret
pixel   endp
speed proc near
   mov ax,000fh
   mov cx,64
   mov dx,64
   int 33h
   mov ax,0013h
   mov dx,64
   int 33h
   ret
speed endp
text_curc proc near
    mov ax,000AH
    mov bx,01
    int 33h
    ret
text_curc endp
 
write   proc near
    mov bx,3
cicle:
    idiv mult10
    add ah,30h
    mov [si+bx-1],ah
    mov ah,0
    dec bx
    jnz cicle
    mov ah,09
    mov dx,offset rezult
    int 21h
    ret
write   endp
go: mov ax,@data
   mov ds,ax
   mov ax,0
   int 33h
   cmp ax,0
   jne ner
   jmp er
ner:
   mov ax,10h
   int 10h
   mov ax,9
   xor bx,bx
   xor cx,cx
   push ds
   pop es
   lea dx,mask_m
   int 33h
   call speed
   call cursor_on
   call mouse_stat
   mov col,cx
   mov row,dx
next:
    mov ah,02
    mov bh,00
    mov dx,00
    int 10h
    mov ax,col
    lea si,rezult
    call write
    mov ah,02
    mov bh,0
    mov dx,0005h
    int 10h
    mov ax,row
    call write
    mov dx,row
    mov cx,col
    mov ah,1
    int 16h
    jz nosym    
    mov ah,0
    int 16h
    cmp al,27
    je ex
nosym:
   mov flag,0
   call mouse_stat
   mov stat,bl
   cmp col,cx
   je rov_lab
   mov col, cx
   mov flag ,1
rov_lab:
   cmp row,dx
   je pix
   mov row ,dx
   mov flag,1
pix:
   mov bl,stat
   and bl,2
   cmp bl,2
   je nextc
    mov bl,stat
    and bl,1
    cmp bl,1
    jne next
    cmp flag,0
    je next
    call pixel
    jmp next
ex:
   call cursor_off
   lea dx,mes
    jmp exit
nextc:
    inc color
    jmp next
er:
   lea dx,mes_er
exit:
   mov ax,3
   int 10h
   mov ah,9
   int 21h
   mov ax,4c00h
 
int 21h
End go