I cant code in assembly and BY GOD I WANT TO LEARN

;Constants
xIni    equ 0
yIni    equ 0

xFin    equ 90
yFin    equ 90

;Data Segment
datos   segment
    cadena1 db "Aqui es la posicion Inicial $"
    cadena2 db "Aqui es la posicion Final $"
datos   ends
;Stack Segment
Pila    segment stack

    db 128 dup(0)

Pila    ends

;Code Segment
Codigo  segment
    practica19  proc    far
        assume cs:Codigo, ds:datos, ss:Pila
        push ds
        mov ax, 0
        push ax

        mov ah, 0
        mov al, 03h
        int 10h

        mov ax, 0h

        mov dh, [yIni]
        mov dl, [xIni]
        mov bh, 0
        call posicion


        mov dx, offset [ds:cadena1]
        call escribir


        mov dh, [yFin]
        mov dl, [xFin]
        mov bh, 0
        call posicion

        mov dx, offset [cadena2]
        call escribir

        ret
    practica19  endp

    posicion proc

        push ax
        push bx
        push cx
        push dx

        mov ah, 02h
        mov bh, 0
        int 10h

        pop dx
        pop cx
        pop bx
        pop ax
        ret
    posicion endp

    escribir proc
        push ax
        push bx
        push cx
        push dx

        mov ah, 09h
        int 21h

        pop dx
        pop cx
        pop bx
        pop ax
        ret
    escribir endp

Codigo ends

end