05c.asm

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

DATA SEGMENT
ORG 1000H
BUF DW 1,2,3,0,-4,-5,-6,-7,-8,-9
GZ DW 10 DUP(?)
DATA ENDS
CODE SEGMENT
ASSUME CS:CODE,DS:DATA
START PROC FAR
STT:PUSH DS
    SUB AX,AX
    PUSH AX
;==============================
    MOV AX,DATA
    MOV DS,AX

    CLC
    MOV AX,0
    MOV BX,0

    MOV SI,OFFSET BUF
    MOV DI,OFFSET GZ
    MOV CX,10

CHECK:
    MOV AX,[SI]
    MOV DX,AX
    CMP AX,0
    JZ LESSZERO
    SHL AX,1
    ADC BL,0
    CMP BL,1
    JZ LESSZERO
    MOV [DI],DX
    ADD DI,2
CONTINUE:
    ADD SI,2
    CLC
    MOV BL,0
    LOOP CHECK

    JMP FINISH

LESSZERO:
    MOV WORD PTR [SI],0H
    JMP CONTINUE

FINISH:
;==============================
    RET
START ENDP
CODE ENDS
END STT