.model small .code org 0 chklan proc near xor ah,ah int 2ah mov al,ah xor al,1 mov ah,4ch int 21h chklan endp end