datas1.asm

汇编语言

;将的BUF1的数据复制一份到BUF2，并输出来
DATA	SEGMENT
MES	DB	'THE DATA IN BUF2 ARE:',0AH,0DH,'$'
BUF1	DB	11H,22H,33H,44H,55H,66H,77H,88H,99H
	DB	0AAH,0BBH,0CCH,0DDH,0EEH,0FFH,00H
BUF2	DB	20H	DUP(0)
DATA	ENDS
STACK1	SEGMENT	PARA	STACK
	DW	200H	DUP(0)
STACK1  ENDS
CODE	SEGMENT
	ASSUME	CS:CODE,DS:DATA,SS:STACK1
START:	MOV	AX,DATA
	MOV	DS,AX
	MOV	CX,10H
	MOV	SI,OFFSET  BUF1
	MOV	DI,OFFSET  BUF2
A1:	MOV	AL,[SI]
	MOV	[DI],AL
	INC	SI
	INC	DI
	LOOP	A1
	MOV 	DX,OFFSET MES
	MOV	AH,9H
	INT	21H
	MOV	SI,OFFSET BUF2
	MOV	CX,10H
A2:	CALL 	SUB_PROC
	INC	SI
	LOOP	A2
	MOV	AH,4CH
	INT	21H
SUB_PROC	PROC
	PUSH	CX
	MOV	CH,2
	MOV	CL,4
A3:	MOV	BL,[SI]
	ROL	BL,CL
	MOV	DL,BL
	AND	DL,0FH
	CMP	DL,9H
	JLE	ADD30H
	ADD	DL,7H
ADD30H:ADD	DL,30H
	MOV	AH,02H
	INT	21H
	DEC	CH
	JNZ	A3
	MOV	DL,20H
	MOV	AH,2H
	INT	21H
	POP	CX
	RET
SUB_PROC	ENDP
CODE	ENDS
	END	START