|
MOV ROW_REG,5
MOV COL_REG,10
SCAN_KEY: MOV AH,1
INT 16H
JZ SCAN_KEY
YES_KEY: MOV AH,0
INT 16H
CMP AL,0DH
JZ LIAO
LIAO: CALL DOWN_LIAO
JMP SCAN_KEY
DOWN_LIAO PROC NEAR
MOV BH ,0
MOV AH ,03H
INT 10
CMP DH ,07H
JLE DOWN1
CALL DOWN2
RET
DOWN1: INC ROW_REG
MOV DH ,ROW_REG
MOV COL_REG ,0AH
MOV DL , COL_REG
MOV BH , 0
MOV AH , 02H
INT 10
RET
DOWN_LIAO ENDP
DOWN2 PROC NEAR
MOV AH ,06H
MOV AL , 01H
MOV BH ,07H
MOV CX ,050AH
MOV DX ,0845H
INT 10
MOV AH ,02H
MOV BH ,0
MOV DX ,080AH
INT 10
RET
DOWN2 ENDP |
|