04c.asm

录音子程序 mov dx,offset news_2 显示放音提示

CODE SEGMENT
ASSUME CS:CODE
START PROC FAR
STT:PUSH DS
    SUB AX,AX
    PUSH AX
;==============================

    MOV BL,16
    MOV AL,0

    CALL PRINT

    CALL CRLF

;==============================
    RET
START ENDP

PRINT PROC NEAR
;打印数字子程序

    MOV AH,2
    MOV DH,1
    MOV CX,10
    MOV BH,30H
    
LP2:PUSH CX
    MOV CX,10
    MOV BL,30H
    
LP0:CMP BH,30H
    JZ AA
    JMP BB
AA: CMP BL,30H
    JZ CON
BB: MOV DL,BH
    INT 21H    

    MOV DL,BL
    INT 21H
    CALL SPACE
CON:INC BL
    LOOP LP0
    
    INC BH
    
    POP CX
    LOOP LP2

    RET
PRINT ENDP

SPACE PROC NEAR
;打印空格子程序
    PUSH CX
    
    MOV CX,0
    MOV AH,2
    MOV DL,32
    MOV CL,2
LP1:INT 21H
    LOOP LP1

    INC DH
    CMP DH,17
    JZ KK
    JMP LL
KK: CALL CRLF
    MOV DH,1
    
LL: POP CX

    RET
SPACE ENDP

CRLF PROC NEAR
;回车换行子程序
    MOV DL,13
    MOV AH,2
    INT 21H

    MOV DL,10
    INT 21H

    RET
CRLF ENDP

CODE ENDS
END STT