sendchar.asm

是我在电子竞赛期间写的一些单片机汇编程序

      ORG 0000H
      AJMP MAIN
      ORG 0030H
MAIN:
      MOV SP,#60H
     	MOV TMOD,#20H
      MOV TH1,#0FDH
      MOV TL1,#0FDH
      SETB TR1
      MOV PCON,#00H
      MOV SCON,#40H		;串行通信方式1
AG11:
	MOV DPTR,#TABLE1
	MOV R2,#00H		
AG:   MOV P3,#0FFH
	JB  P3.3, $
KK2:	ACALL BUZZER	
	JNB P3.3,KK2
	MOV P0,#0FFH 
NEXT: MOV A,R2
	MOVC A,@A+DPTR
	CJNE A,#23H,DSP
	JMP OUT
DSP:
	MOV SBUF,A
	JNB TI,$
	CLR TI
	INC R2
	AJMP NEXT
BUZZER:
	CLR P1.0
	ACALL DELAY
	SETB P1.0
	RET 	
TABLE:
      INC A
      MOVC A,@A+PC
      RET
TABLE1: DB "SEND CHAR"
	  DB "#"
DB    0C0H,0F9H,0A4H,0B0H,099H,092H,082H,0F8H,80H,090H
DB	088H,083H,0C6H,0A1H,86H,8EH,0BFH,89H,8CH
DELAY:
      MOV R5,#10H
DL1:
      MOV R6,#40H
      DJNZ R6,$
      DJNZ R5,DL1
      RET

OUT: 
	END