10-10-2.asm

书籍8051入门篇

;10-10-2.ASM 传送端
$MOD51
	ORG	0000H
	SJMP	START
	ORG	0023H
	SJMP	SERIAL
;
	ORG	0030H
START:	MOV	R2,#100
	ACALL	DELAY
	ACALL	DELAY
	MOV	TMOD,#21H
	MOV	TH1,#0FDH
	SETB	TR1
	MOV	SCON,#50H
	SETB	ES
	SETB	EA
	SETB	TI
STOP:	SJMP	STOP
;
SERIAL:	JNB	TI,EXIT
	CLR	TI
	DJNZ	R2,SEND
	SJMP	EXIT
SEND:	MOV	A,#31H
	MOV	SBUF,A
EXIT:	RETI
;
DELAY:	MOV	R0,#0
L1:	MOV	R1,#0
	DJNZ	R1,$
	DJNZ	R0,L1
	RET
	END