lesson10.s

AVR单片机C语言编程及应用实例 适合初学者的学习研究 其中包含Atmega16中文资料及Protel部分电路图

	.module lesson10.c
	.area vector(rom, abs)
	.org 44
	jmp _uart_rx
	.area data(ram, con, rel)
_flag::
	.blkb 1
	.area idata
	.byte 0
	.area data(ram, con, rel)
	.dbfile I:\AVR视频教程\视频教程\lesson10\lesson10\lesson10.c
	.dbsym e flag _flag c
	.area text(rom, con, rel)
	.dbfile I:\AVR视频教程\视频教程\lesson10\lesson10\lesson10.c
	.dbfunc e delay _delay fV
;              i -> R20,R21
;              j -> R22,R23
;             ms -> R16,R17
	.even
_delay::
	xcall push_gset2
	.dbline -1
	.dbline 10
; #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,flag=0;
; void delay(uint ms)
; {
	.dbline 12
;         uint i,j;
; 	for(i=0;i<ms;i++)
	clr R20
	clr R21
	xjmp L5
L2:
	.dbline 13
; 	   {
	.dbline 14
	clr R22
	clr R23
	xjmp L9
L6:
	.dbline 14
L7:
	.dbline 14
	subi R22,255  ; offset = 1
	sbci R23,255
L9:
	.dbline 14
	cpi R22,117
	ldi R30,4
	cpc R23,R30
	brlo L6
	.dbline 15
L3:
	.dbline 12
	subi R20,255  ; offset = 1
	sbci R21,255
L5:
	.dbline 12
	cp R20,R16
	cpc R21,R17
	brlo L2
	.dbline -2
	.dbline 16
; 	   for(j=0;j<1141;j++);
;        }
; }
L1:
	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 19
; 
; void uart_init(uint baud)
; {
	.dbline 20
;     UCSRB=0x00; 
	clr R2
	out 0xa,R2
	.dbline 21
;    UCSRA=0x00; 		    //控制寄存器清零
	out 0xb,R2
	.dbline 22
;    UCSRC=(1<<URSEL)|(0<<UPM0)|(3<<UCSZ0);   
	ldi R24,134
	out 0x20,R24
	.dbline 25
;                                                         //选择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 26
;    UBRRL=baud; 					     	  
	out 0x9,R10
	.dbline 27
;    UBRRH=baud>>8; 		   //设置波特率
	mov R2,R3
	clr R3
	out 0x20,R2
	.dbline 28
;    UCSRB=(1<<TXEN)|(1<<RXEN)|(1<<RXCIE); 
	ldi R24,152
	out 0xa,R24
	.dbline 30
;                                                        //接收、发送使能，接收中断使能
;    SREG=BIT(7);	                //全局中断开放
	ldi R24,128
	out 0x3f,R24
	.dbline 31
;    DDRD|=0X02;	                //配置TX为输出（很重要）
	sbi 0x11,1
	.dbline -2
	.dbline 33
; 
; }
L10:
	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 35
; void uart_sendB(uchar data)
; {
L12:
	.dbline 36
L13:
	.dbline 36
;    while(!(UCSRA&(BIT(UDRE)))) ;
	sbis 0xb,5
	rjmp L12
	.dbline 37
;    UDR=data;
	out 0xc,R16
L15:
	.dbline 38
L16:
	.dbline 38
;    while(!(UCSRA&(BIT(TXC))));
	sbis 0xb,6
	rjmp L15
	.dbline 39
;    UCSRA|=BIT(TXC);
	sbi 0xb,6
	.dbline -2
	.dbline 40
; }
L11:
	.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 42
; void uart_rx()
; {
	.dbline 43
;     UCSRB&=~BIT(RXCIE);
	cbi 0xa,7
	.dbline 44
; 	rdata=UDR;
	in R2,0xc
	sts _rdata,R2
	.dbline 45
; 	flag=1;
	ldi R24,1
	sts _flag,R24
	.dbline 46
; 	UCSRB|=BIT(RXCIE);
	sbi 0xa,7
	.dbline -2
	.dbline 47
; }
L18:
	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 49
; void main()
; {
	.dbline 52
;     //uchar i=4;
; 	//uchar j='a';
;     uart_init(19200);
	ldi R16,19200
	ldi R17,75
	xcall _uart_init
	xjmp L21
L20:
	.dbline 54
; 	while(1)
; 	{
	.dbline 55
; 	   if(flag)
	lds R2,_flag
	tst R2
	breq L23
	.dbline 56
; 	   {
	.dbline 57
; 	      uart_sendB(rdata);
	lds R16,_rdata
	xcall _uart_sendB
	.dbline 58
; 		  flag=0;
	clr R2
	sts _flag,R2
	.dbline 59
; 	   }
L23:
	.dbline 60
L21:
	.dbline 53
	xjmp L20
X0:
	.dbline -2
	.dbline 62
; 	}
; 	
; }
L19:
	.dbline 0 ; func end
	ret
	.dbend
	.area bss(ram, con, rel)
	.dbfile I:\AVR视频教程\视频教程\lesson10\lesson10\lesson10.c
_rdata::
	.blkb 1
	.dbsym e rdata _rdata c