control curser with keys assembly masm

[Ali Nawaz]

MY ASSEMBLY CODE DOESN'T WORK
.MODEL SMALL
.STACK 64

.DATA

.CODE
MAIN PROC FAR

MOV AX,@DATA
MOV DS,AX

MOV AH,09H
MOV CX,1000H
MOV AL,20H
MOV BL,17H
INT 10H

MOV AH,09H
MOV CX,80H
MOV AL,20H
MOV BL,80H
INT 10H

;DEFINE MOUSE

MOV AH,02H
MOV CX,07H
INT 10H

MOV BL,0H
MOV CL,0H
CALL MOUSER
CMP AL,57H
JE UP
CMP AL,53H
JE DOWN
CMP AL,41H
JE LEFT
CMP AL,44H
JE RIGHT

JMP MOUSER




MOV AH,4CH
INT 21H

MAIN ENDP
;----------------
MOUSER PROC
MOV AH,02H
MOV DL,BL
MOV DH,CL
INT 10H
MOV AH,0H
INT 16H
RET
MOUSER ENDP
;------------------
UP PROC
CMP CL,0H
JE MOUSER
SUB CL,01H
JMP MOUSER
UP ENDP
;------------------
DOWN PROC
CMP CL,24d
JE MOUSER
ADD CL,01H
JMP MOUSER
DOWN ENDP
;------------------
LEFT PROC
CMP BL,0H
JE MOUSER
SUB BL,01H
JMP MOUSER
LEFT ENDP
;------------------
RIGHT PROC
CMP BL,79d
JE MOUSER
ADD BL,01H
JMP MOUSER
RIGHT ENDP
;------------------
END MAIN