uart.s

AVR ds18b20 源代码 对学习温度控制的人很有帮助

	.module uart.c
	.area text(rom, con, rel)
	.dbfile D:\开发板\source\ds18b20\uart.c
	.dbfunc e delay_us _delay_us fV
;              i -> R20,R21
;              n -> R16,R17
	.even
_delay_us::
	rcall push_gset1
	.dbline -1
	.dbline 15
; /******************************************/
; /*             北京MCU学习之家            */
; /*             ADC通信演示程序            */
; /*             作者:白如冰                */
; /*             2005年10月1日              */
; /*  目标MCU:MEGA8   晶振:外部(EXT) 8MHZ   */
; /******************************************/
; 
; #include <iom8v.h>
; #define fosc 8000000 //晶振8MHZ
; #define baud 9600	 //波特率
; 
;  
; void delay_us(unsigned int n)
; {
	.dbline 17
	movw R20,R16
	rjmp L5
L2:
	.dbline 17
L3:
	.dbline 17
	subi R20,1
	sbci R21,0
L5:
	.dbline 17
;   unsigned int i;
;   for(i=n;i>0;i--);
	cpi R20,0
	cpc R20,R21
	brne L2
X0:
	.dbline -2
L1:
	rcall pop_gset1
	.dbline 0 ; func end
	ret
	.dbsym r i 20 i
	.dbsym r n 16 i
	.dbend
	.dbfunc e delay_1ms _delay_1ms fV
;              i -> R16,R17
	.even
_delay_1ms::
	.dbline -1
	.dbline 21
;   }
;   
; void delay_1ms(void)
; { unsigned int i;
	.dbline 22
;  for(i=1;i<(unsigned int)(1144-2);i++)
	ldi R16,1
	ldi R17,0
	rjmp L10
L7:
	.dbline 23
L8:
	.dbline 22
	subi R16,255  ; offset = 1
	sbci R17,255
L10:
	.dbline 22
	cpi R16,118
	ldi R30,4
	cpc R17,R30
	brlo L7
	.dbline -2
L6:
	.dbline 0 ; func end
	ret
	.dbsym r i 16 i
	.dbend
	.dbfunc e delay_ms _delay_ms fV
;              i -> R20,R21
;              n -> R22,R23
	.even
_delay_ms::
	rcall push_gset2
	movw R22,R16
	.dbline -1
	.dbline 26
;     ;
; }
; void delay_ms(unsigned int n)
; {
	.dbline 27
;  unsigned int i=0;
	clr R20
	clr R21
	rjmp L13
L12:
	.dbline 29
	.dbline 29
	rcall _delay_1ms
	.dbline 30
	subi R20,255  ; offset = 1
	sbci R21,255
	.dbline 31
L13:
	.dbline 28
;    while(i<n)
	cp R20,R22
	cpc R21,R23
	brlo L12
	.dbline -2
L11:
	rcall pop_gset2
	.dbline 0 ; func end
	ret
	.dbsym r i 20 i
	.dbsym r n 22 i
	.dbend
	.dbfunc e putchar _putchar fV
;              c -> R16
	.even
_putchar::
	.dbline -1
	.dbline 35
;    {delay_1ms();
;     i++;
;    }
; }  													
; /*  		字符输出函数 		 */
; void putchar(unsigned char c)
; 	{	 
L16:
	.dbline 36
L17:
	.dbline 36
;      while (!(UCSRA&(1<<UDRE)));
	sbis 0xb,5
	rjmp L16
	.dbline 37
; 	 UDR=c;    
	out 0xc,R16
	.dbline -2
L15:
	.dbline 0 ; func end
	ret
	.dbsym r c 16 c
	.dbend
	.dbfunc e getchar _getchar fc
	.even
_getchar::
	.dbline -1
	.dbline 41
; 	}
; /*  		字符输入函数 		 */	
; unsigned char getchar(void)
;   	{
L20:
	.dbline 42
L21:
	.dbline 42
; 	 while(!(UCSRA& (1<<RXC)));
	sbis 0xb,7
	rjmp L20
	.dbline 43
;      return UDR;
	in R16,0xc
	.dbline -2
L19:
	.dbline 0 ; func end
	ret
	.dbend
	.dbfunc e puts _puts fV
;              s -> R20,R21
	.even
_puts::
	rcall push_gset1
	movw R20,R16
	.dbline -1
	.dbline 47
; 	}		
; /*			字符串输出函数	   	 */	
; void puts(char *s)
; 	{
	rjmp L25
L24:
	.dbline 49
	.dbline 50
	movw R30,R20
	ldd R16,z+0
	rcall _putchar
	.dbline 51
	subi R20,255  ; offset = 1
	sbci R21,255
	.dbline 52
L25:
	.dbline 48
; 	while (*s)
	movw R30,R20
	ldd R2,z+0
	tst R2
	brne L24
	.dbline -2
L23:
	rcall pop_gset1
	.dbline 0 ; func end
	ret
	.dbsym r s 20 pc
	.dbend
	.dbfunc e puts_hh _puts_hh fV
;              s -> R20,R21
	.even
_puts_hh::
	rcall push_gset1
	movw R20,R16
	.dbline -1
	.dbline 57
; 		{
; 		putchar(*s);
; 		s++;
; 		}	
;    
; 	}
; /*			字符串输出函数	   	 */	
; void puts_hh(char *s)
; 	{
	rjmp L29
L28:
	.dbline 59
	.dbline 60
	movw R30,R20
	ldd R16,z+0
	rcall _putchar
	.dbline 61
	subi R20,255  ; offset = 1
	sbci R21,255
	.dbline 62
L29:
	.dbline 58
; 	while (*s)
	movw R30,R20
	ldd R2,z+0
	tst R2
	brne L28
	.dbline 63
; 		{
; 		putchar(*s);
; 		s++;
; 		}	
;     putchar(0x0a);//回车换行
	ldi R16,10
	rcall _putchar
	.dbline 64
; 	putchar(0x0d);
	ldi R16,13
	rcall _putchar
	.dbline -2
L27:
	rcall pop_gset1
	.dbline 0 ; func end
	ret
	.dbsym r s 20 pc
	.dbend
	.dbfunc e uart_init _uart_init fV
	.even
_uart_init::
	.dbline -1
	.dbline 69
; 	}
; 	
; /*			UART初始化				*/	
; void uart_init(void)
; {
	.dbline 70
;  UCSRB=(1<<RXEN)|(1<<TXEN);//允许发送和接收
	ldi R24,24
	out 0xa,R24
	.dbline 71
;  UBRRL=(fosc/16/(baud+1))%256;
	ldi R24,52
	out 0x9,R24
	.dbline 72
;  UBRRH=(fosc/16/(baud+1))/256;
	clr R2
	out 0x20,R2
	.dbline 73
;  UCSRC=(1<<URSEL)|(1<<UCSZ1)|(1<<UCSZ0);//8位数据+1位STOP位
	ldi R24,134
	out 0x20,R24
	.dbline -2
L31:
	.dbline 0 ; func end
	ret
	.dbend