test232main.s

工业开关量检测模块的原代码,带断线检测功能

	.module test232main.c
	.area text(rom, con, rel)
	.dbfile D:\报警系统设计资料\报警系统软件\开关量64CPU—485\test232main.c
	.dbfunc e uart1_init _uart1_init fV
	.even
_uart1_init::
	.dbline -1
	.dbline 4
; #include "test232main.h"
; 
; void uart1_init(void)
; {
	.dbline 5
;  UCSR1B = 0x00; //disable while setting baud rate
	clr R2
	sts 201,R2
	.dbline 6
;  UCSR1A = 0x00;
	sts 200,R2
	.dbline 7
;  UCSR1C = 0x06;
	ldi R24,6
	sts 202,R24
	.dbline 8
;  UBRR1L = 0x67; //set baud rate lo
	ldi R24,103
	sts 204,R24
	.dbline 9
;  UBRR1H = 0x00; //set baud rate hi
	sts 205,R2
	.dbline 10
;  UCSR1B = 0xD8;
	ldi R24,216
	sts 201,R24
	.dbline -2
L1:
	.dbline 0 ; func end
	ret
	.dbend
	.dbfunc e USART_Transmit _USART_Transmit fV
;           data -> R16
	.even
_USART_Transmit::
	.dbline -1
	.dbline 14
; }
; 
; void USART_Transmit( unsigned char data )
; {
L3:
	.dbline 17
L4:
	.dbline 16
; //Wait for empty transmit buffer 
; while ( !( UCSR1A & (1<<UDRE1)) )
	lds R24,200
	andi R24,32
	breq L3
	.dbline 19
; ;
; //Put data into buffer, sends the data 
; UDR1 = data;
	sts 206,R16
	.dbline -2
L2:
	.dbline 0 ; func end
	ret
	.dbsym r data 16 c
	.dbend
	.dbfunc e USART_Receive _USART_Receive fc
	.even
_USART_Receive::
	.dbline -1
	.dbline 23
; }
; 
; unsigned char USART_Receive( void )
; {
L7:
	.dbline 26
L8:
	.dbline 25
; //Wait for data to be received 
; while ( !(UCSR1A & (1<<RXC1)) )
	lds R24,200
	andi R24,128
	breq L7
	.dbline 28
; ;
; //Get and return received data from buffer 
; return UDR1;
	lds R16,206
	.dbline -2
L6:
	.dbline 0 ; func end
	ret
	.dbend
	.dbfunc e main _main fV
	.even
_main::
	.dbline -1
	.dbline 32
; }
; 
; void main(void)
; {
	.dbline 33
; CLI();
	cli
	.dbline 34
; uart1_init();
	xcall _uart1_init
	.dbline 35
; SEI();
	sei
	xjmp L12
L11:
	.dbline 37
	ldi R16,136
	xcall _USART_Transmit
L12:
	.dbline 36
	xjmp L11
X0:
	.dbline -2
L10:
	.dbline 0 ; func end
	ret
	.dbend