双机通信练习.asm

来自「自己做的单片机Proteus仿真实例」· 汇编 代码 · 共 48 行

     ;8051通信.ASM       p1口读键，P2口管理两位BCD码输入的数码管
	ORG    	0000H
	AJMP   	MAIN
	ORG    	0023H
	AJMP   	SER	
	ORG    	0030H
MAIN:
      	MOV    	SP,#60H
      	MOV    	TMOD,#20H
	MOV	TH1,#0F3H
	MOV	TL1,#0F3H
	SETB 	TR1		;bode=2400bps

	MOV	SCON,#50H
	MOV	PCON,#00
	SETB    ES
	
	
	MOV	P1,#0FFH
	mov     a, p1
	mov     sbuf,a	
	JNB     TI,$
	CLR     TI
	SETB    EA
	MOV	P1,#0FFH
	MOV	A, P1
	nop
LOOP1:	CJNE    A, P1,LOOP
	SJMP    LOOP1		
LOOP:MOV	A, P1
	MOV     SBUF,A
	SJMP    LOOP1

SER:JB     	RI,LOOP2
	CLR    	TI
	RETI
LOOP2:  CLR     RI
	MOV	A,SBUF
	MOV	P2,A
	RETI
;DEL:    MOV     R5,#0
;LS:	MOV     R6,#0
;	DJNZ    R6,$
;	DJNZ    R5,LS
;	RET

      	END