DATAS SEGMENT
BUF DB 1,3,5,7,9,-1,-2,-3,-4,'$'
BUF1 DB 9 DUP(?)
BUF2 DB 9 DUP(?) ;此处输入数据段代码
DATAS ENDS
STACKS SEGMENT
DB 200 DUP(0);此处输入堆栈段代码
STACKS ENDS
CODES SEGMENT
ASSUME CS:CODES,DS:DATAS,SS:STACKS
START:
MOV AX, DATAS
MOV DS,AX
LEA SI,BUF
LEA DI,BUF1
LEA BP,BUF2
MOV BX,[SI]
MOV CX,8
CMP BX,0
JB LOOP1
MOV [BP],BX
INC SI
INC BP
mov DX,WORD PTR[BP]
ADD DX,30H
JMP EXTE
LOOP1: MOV [DI],BX
MOV DX,WORD PTR[DI]
ADD DX,30H
INC DI
INC SI
DEC CX
EXTE: MOV AH,9
INT 21H
MOV AH,4CH
INT 21H
CODES ENDS
END START