lee_puertoCOM proc near push es ax mov ax,40h mov es,ax mov ax,es:[0] mov puerto,ax pop ax es ret lee_puertoCOM endp inhabilita_ints proc near push ax dx mov dx,puerto inc dx in al,dx mov interrs,al pop dx ax ret inhabilita_ints endp restaura_ints proc near push ax,dx mov dx,puerto inc dx mov al,interrs out dx,al pop dx ax ret restaura_ints endp sacar_bloqueCOM proc near push ax cx dx si xor si,si mov cx,tam_leido seg sacar_bloqueCOM endp