uart.s

AVR编写的串口程序

	.module uart.c
	.area vector(rom, abs)
	.org 44
	jmp _uart_rx
	.area data(ram, con, rel)
_rdata::
	.blkb 1
	.area idata
	.byte 1
	.area data(ram, con, rel)
	.dbfile D:\chengxu\lesson10_1\uart.c
	.dbsym e rdata _rdata c
_flag::
	.blkb 1
	.area idata
	.byte 0
	.area data(ram, con, rel)
	.dbfile D:\chengxu\lesson10_1\uart.c
	.dbsym e flag _flag c
	.area code(ram, con, rel)
	.dbfile D:\chengxu\lesson10_1\uart.c
	.area lit(rom, con, rel)
_table::
	.word 63
	.word 6
	.word 91
	.word 79
	.word 102
	.word 109
	.word 125
	.word 7
	.word 127
	.word 111
	.word 119
	.word 124
	.word 57
	.word 94
	.word 121
	.word 113
	.dbsym e table _table A[32:16]I
	.area text(rom, con, rel)
	.dbfile D:\chengxu\lesson10_1\uart.c
	.dbfunc e show _show fV
;              y -> R20
;              x -> R22
	.even
_show::
	xcall push_gset2
	mov R20,R18
	mov R22,R16
	.dbline -1
	.dbline 13
; #include <iom16v.h>
; #include <macros.h>
; #define  uchar unsigned char
; #define  uint  unsigned int
; 
; #define  mclk   8000000
; #pragma interrupt_handler uart_rx:12
; uchar rdata=1,flag=0;
; #pragma data:code
;    const table[]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f,0x77,0x7c,
;                   0x39,0x5e,0x79,0x71};
; void show(uchar x,uchar y)
;    {DDRA|=0x18;
	.dbline 13
	in R24,0x1a
	ori R24,24
	out 0x1a,R24
	.dbline 14
;     DDRB=0xff;
	ldi R24,255
	out 0x17,R24
	.dbline 15
;     PORTB=table[x];
	ldi R24,2
	mul R24,R22
	movw R30,R0
	ldi R24,<_table
	ldi R25,>_table
	add R30,R24
	adc R31,R25
	lpm R0,Z+
	lpm R1,Z
	movw R30,R0
	out 0x18,R30
	.dbline 16
; 	PORTA|=BIT(3);
	sbi 0x1b,3
	.dbline 17
; 	PORTA&=~BIT(3);
	cbi 0x1b,3
	.dbline 18
; 	PORTB=0XFF;
	ldi R24,255
	out 0x18,R24
	.dbline 19
; 	PORTB&=~BIT(y);
	ldi R16,1
	mov R17,R20
	xcall lsl8
	mov R2,R16
	com R2
	in R3,0x18
	and R3,R2
	out 0x18,R3
	.dbline 20
; 	PORTA|=BIT(4);
	sbi 0x1b,4
	.dbline 21
; 	PORTA&=~BIT(4);
	cbi 0x1b,4
	.dbline 22
; 	delay(1);}
	ldi R16,1
	ldi R17,0
	xcall _delay
	.dbline -2
	.dbline 22
L1:
	xcall pop_gset2
	.dbline 0 ; func end
	ret
	.dbsym r y 20 c
	.dbsym r x 22 c
	.dbend
	.dbfunc e delay _delay fV
;              i -> R20,R21
;              j -> R22,R23
;             ms -> R16,R17
	.even
_delay::
	xcall push_gset2
	.dbline -1
	.dbline 24
; void delay(uint ms)
; {
	.dbline 26
;         uint i,j;
; 	for(i=0;i<ms;i++)
	clr R20
	clr R21
	xjmp L6
L3:
	.dbline 27
; 	   {
	.dbline 28
	clr R22
	clr R23
	xjmp L10
L7:
	.dbline 28
L8:
	.dbline 28
	subi R22,255  ; offset = 1
	sbci R23,255
L10:
	.dbline 28
	cpi R22,117
	ldi R30,4
	cpc R23,R30
	brlo L7
	.dbline 29
L4:
	.dbline 26
	subi R20,255  ; offset = 1
	sbci R21,255
L6:
	.dbline 26
	cp R20,R16
	cpc R21,R17
	brlo L3
	.dbline -2
	.dbline 30
; 	   for(j=0;j<1141;j++);
;        }
; }
L2:
	xcall pop_gset2
	.dbline 0 ; func end
	ret
	.dbsym r i 20 i
	.dbsym r j 22 i
	.dbsym r ms 16 i
	.dbend
	.dbfunc e uart_init _uart_init fV
;           baud -> R10,R11
	.even
_uart_init::
	xcall push_gset3
	movw R10,R16
	.dbline -1
	.dbline 33
; 
; void uart_init(uint baud)
; {
	.dbline 34
;     UCSRB=0x00; 
	clr R2
	out 0xa,R2
	.dbline 35
;    UCSRA=0x00; 		    //控制寄存器清零
	out 0xb,R2
	.dbline 36
;    UCSRC=(1<<URSEL)|(0<<UPM0)|(3<<UCSZ0);   
	ldi R24,134
	out 0x20,R24
	.dbline 39
;                                                         //选择UCSRC，异步模式，禁止                        
;                                                      //   校验，1位停止位，8位数据位
;    baud=mclk/16/baud-1	;   //波特率最大为65K
	movw R2,R10
	clr R4
	clr R5
	ldi R20,32
	ldi R21,161
	ldi R22,7
	ldi R23,0
	st -y,R5
	st -y,R4
	st -y,R3
	st -y,R2
	movw R16,R20
	movw R18,R22
	xcall div32s
	ldi R20,1
	ldi R21,0
	ldi R22,0
	ldi R23,0
	movw R2,R16
	movw R4,R18
	sub R2,R20
	sbc R3,R21
	sbc R4,R22
	sbc R5,R23
	movw R10,R2
	.dbline 40
;    UBRRL=baud; 					     	  
	out 0x9,R10
	.dbline 41
;    UBRRH=baud>>8; 		   //设置波特率
	mov R2,R3
	clr R3
	out 0x20,R2
	.dbline 42
;    UCSRB=(1<<TXEN)|(1<<RXEN)|(1<<RXCIE); 
	ldi R24,152
	out 0xa,R24
	.dbline 44
;                                                        //接收、发送使能，接收中断使能
;    SREG=BIT(7);	                //全局中断开放
	ldi R24,128
	out 0x3f,R24
	.dbline 45
;    DDRD|=0X02;	                //配置TX为输出（很重要）
	sbi 0x11,1
	.dbline -2
	.dbline 47
; 
; }
L11:
	xcall pop_gset3
	.dbline 0 ; func end
	ret
	.dbsym r baud 10 i
	.dbend
	.dbfunc e uart_sendB _uart_sendB fV
;           data -> R16
	.even
_uart_sendB::
	.dbline -1
	.dbline 49
; void uart_sendB(uchar data)
; {
L13:
	.dbline 50
L14:
	.dbline 50
;    while(!(UCSRA&(BIT(UDRE)))) ;
	sbis 0xb,5
	rjmp L13
	.dbline 51
;    UDR=data;
	out 0xc,R16
L16:
	.dbline 52
L17:
	.dbline 52
;    while(!(UCSRA&(BIT(TXC))));
	sbis 0xb,6
	rjmp L16
	.dbline 53
;    UCSRA|=BIT(TXC);
	sbi 0xb,6
	.dbline -2
	.dbline 54
; }
L12:
	.dbline 0 ; func end
	ret
	.dbsym r data 16 c
	.dbend
	.dbfunc e uart_rx _uart_rx fV
	.even
_uart_rx::
	st -y,R2
	st -y,R24
	in R2,0x3f
	st -y,R2
	.dbline -1
	.dbline 56
; void uart_rx()
; {
	.dbline 57
;     UCSRB&=~BIT(RXCIE);
	cbi 0xa,7
	.dbline 58
; 	rdata=UDR;
	in R2,0xc
	sts _rdata,R2
	.dbline 59
; 	flag=1;
	ldi R24,1
	sts _flag,R24
	.dbline 60
; 	UCSRB|=BIT(RXCIE);
	sbi 0xa,7
	.dbline -2
	.dbline 61
; }
L19:
	ld R2,y+
	out 0x3f,R2
	ld R24,y+
	ld R2,y+
	.dbline 0 ; func end
	reti
	.dbend
	.dbfunc e main _main fV
	.even
_main::
	.dbline -1
	.dbline 63
; void main()
; {
	.dbline 66
;     //uchar i=4;
; 	//uchar j='a';
;     uart_init(19200);
	ldi R16,19200
	ldi R17,75
	xcall _uart_init
	xjmp L22
L21:
	.dbline 68
; 	while(1)
; 	{show(rdata,0);
	.dbline 68
	clr R18
	lds R16,_rdata
	xcall _show
	.dbline 69
; 	   if(flag)
	lds R2,_flag
	tst R2
	breq L24
	.dbline 70
; 	   {
	.dbline 71
; 	      uart_sendB(rdata);
	lds R16,_rdata
	xcall _uart_sendB
	.dbline 72
; 		  flag=0;
	clr R2
	sts _flag,R2
	.dbline 73
; 	   }
L24:
	.dbline 74
L22:
	.dbline 67
	xjmp L21
X0:
	.dbline -2
	.dbline 76
; 	}
; 	
; }
L20:
	.dbline 0 ; func end
	ret
	.dbend