main.s

我自己编写的atmega16的ds1302源程序

	.module main.c
	.area text(rom, con, rel)
	.dbfile F:\自编程序\M16\ds1302\main.c
	.dbfunc e kk _kk fV
;         comand -> R20
	.even
_kk::
	xcall push_gset1
	mov R20,R16
	.dbline -1
	.dbline 5
; #include<iom16v.h>
; #include<macros.h>
; unsigned char data[2];
; void kk(unsigned char comand)
; {
	.dbline 6
;    BCDtoASCII(R1302(comand),data);
	mov R16,R20
	clr R17
	xcall _R1302
	ldi R18,<_data
	ldi R19,>_data
	xcall _BCDtoASCII
	.dbline 7
;    USART_Transmit(data[0]);
	lds R16,_data
	clr R17
	xcall _USART_Transmit
	.dbline 8
;    USART_Transmit(data[1]);
	lds R16,_data+1
	clr R17
	xcall _USART_Transmit
	.dbline -2
	.dbline 9
; }
L1:
	xcall pop_gset1
	.dbline 0 ; func end
	ret
	.dbsym r comand 20 c
	.dbend
	.dbfunc e main _main fV
;              j -> R20,R21
;              i -> R22,R23
	.even
_main::
	.dbline -1
	.dbline 11
; void main(void)
; {
	.dbline 14
;  unsigned int i,j;
;  
;  USART_Init();
	xcall _USART_Init
	.dbline 15
;  init_1302();
	xcall _init_1302
	.dbline 16
;  USART_Transmit('d');
	ldi R16,100
	ldi R17,0
	xcall _USART_Transmit
	xjmp L5
L4:
	.dbline 18
;  while(1)
;   {
	.dbline 20
	clr R20
	clr R21
	xjmp L10
L7:
	.dbline 20
;  
;    for(j=0;j<10;j++){
	.dbline 21
	clr R22
	clr R23
	xjmp L14
L11:
	.dbline 21
L12:
	.dbline 21
	subi R22,255  ; offset = 1
	sbci R23,255
L14:
	.dbline 21
	cpi R22,96
	ldi R30,234
	cpc R23,R30
	brlo L11
	.dbline 21
L8:
	.dbline 20
	subi R20,255  ; offset = 1
	sbci R21,255
L10:
	.dbline 20
	cpi R20,10
	ldi R30,0
	cpc R21,R30
	brlo L7
	.dbline 22
	ldi R16,141
	xcall _kk
	.dbline 23
	ldi R16,58
	ldi R17,0
	xcall _USART_Transmit
	.dbline 24
	ldi R16,139
	xcall _kk
	.dbline 25
	ldi R16,58
	ldi R17,0
	xcall _USART_Transmit
	.dbline 26
	ldi R16,137
	xcall _kk
	.dbline 27
	ldi R16,58
	ldi R17,0
	xcall _USART_Transmit
	.dbline 28
	ldi R16,135
	xcall _kk
	.dbline 29
	ldi R16,58
	ldi R17,0
	xcall _USART_Transmit
	.dbline 30
	ldi R16,32
	ldi R17,0
	xcall _USART_Transmit
	.dbline 31
	ldi R16,133
	xcall _kk
	.dbline 32
	ldi R16,58
	ldi R17,0
	xcall _USART_Transmit
	.dbline 33
	ldi R16,131
	xcall _kk
	.dbline 34
	ldi R16,58
	ldi R17,0
	xcall _USART_Transmit
	.dbline 35
	ldi R16,129
	xcall _kk
	.dbline 36
	ldi R16,10
	ldi R17,0
	xcall _USART_Transmit
	.dbline 37
L5:
	.dbline 17
	xjmp L4
X0:
	.dbline -2
	.dbline 38
;    for(i=0;i<60000;i++);}
;    kk(0x8d);
;    USART_Transmit(':');
;    kk(0x8b);
;    USART_Transmit(':');
;    kk(0x89);
;    USART_Transmit(':');
;    kk(0x87);
;    USART_Transmit(':');
;    USART_Transmit(' ');
;    kk(0x85);
;    USART_Transmit(':');
;    kk(0x83);
;    USART_Transmit(':');
;    kk(0x81);
;    USART_Transmit('\n');
;   }
;  }
L3:
	.dbline 0 ; func end
	ret
	.dbsym r j 20 i
	.dbsym r i 22 i
	.dbend
	.area bss(ram, con, rel)
	.dbfile F:\自编程序\M16\ds1302\main.c
_data::
	.blkb 2
	.dbsym e data _data A[2:2]c