04b.asm

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

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

    MOV BL,14H
    MOV BH,1
    MOV CX,0AH

LP: PUSH BX
    CALL SPACE
    CALL STAR
    CALL CRLF
    POP BX
    DEC BL
    ADD BH,2
    LOOP LP

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

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

    RET
SPACE ENDP

STAR PROC NEAR
;打印"*"子程序
    PUSH CX
    MOV CX,0
    MOV DL,2AH
    MOV AH,2
    MOV CL,BH
LP2:INT 21H
    LOOP LP2
    POP CX
    
    RET
STAR ENDP

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

    MOV DL,10
    INT 21H

    RET
CRLF ENDP

CODE ENDS
END STT