DELY:PUSH AX ;延时程序
PUSH BX
PUSH CX
PUSH DX
MOV AH,2CH
INT 21H
MOV BL,DH
INC BL
DELY1: MOV AH,2CH
INT 21H
CMP BL,DH
JNZ DELY1
POP DX
POP CX
POP BX
POP AX
RET
PUSH BX
PUSH CX
PUSH DX
MOV AH,2CH
INT 21H
MOV BL,DH
INC BL
DELY1: MOV AH,2CH
INT 21H
CMP BL,DH
JNZ DELY1
POP DX
POP CX
POP BX
POP AX
RET