lednum.s

AtMega169的ADC功能的测试C语言程序

	.module LEDNUM.C
	.area text(rom, con, rel)
	.dbfile E:\WORK\WORK_DEMO\169P_demo\169ADC\LEDNUM.C
	.area lit(rom, con, rel)
_seg_table::
	.byte 192,249
	.byte 164,176
	.byte 153,146
	.byte 130,248
	.byte 128,144
	.byte 136,131
	.byte 198,161
	.byte 134,142
	.dbsym e seg_table _seg_table A[16:16]kc
	.area data(ram, con, rel)
	.dbfile E:\WORK\WORK_DEMO\169P_demo\169ADC\LEDNUM.C
_led_buff::
	.blkb 2
	.area idata
	.byte 0,0
	.area data(ram, con, rel)
	.dbfile E:\WORK\WORK_DEMO\169P_demo\169ADC\LEDNUM.C
	.blkb 2
	.area idata
	.byte 0,0
	.area data(ram, con, rel)
	.dbfile E:\WORK\WORK_DEMO\169P_demo\169ADC\LEDNUM.C
	.dbsym e led_buff _led_buff A[4:4]c
	.area text(rom, con, rel)
	.dbfile E:\WORK\WORK_DEMO\169P_demo\169ADC\LEDNUM.C
	.dbfunc e delay_us _delay_us fV
;           time -> R16,R17
	.even
_delay_us::
	.dbline -1
	.dbline 7
; #include<iom169v.h>
; const unsigned char seg_table[16]={0xc0,0xf9,0xa4,0xb0,0x99,0x92,
; 0x82,0xf8,0x80,0x90,0x88,0x83,0xc6,0xa1,0x86,0x8e};
; unsigned char led_buff[4]={0,0,0,0};
; /*				微秒级延时程序	  		*/
; void delay_us(int time)
; 	 {     
L2:
	.dbline 9
;   	  do
; 	  	{
	.dbline 10
; 		 time--;
	subi R16,1
	sbci R17,0
	.dbline 11
; 		}	
L3:
	.dbline 12
;   	  while (time>1);
	ldi R24,1
	ldi R25,0
	cp R24,R16
	cpc R25,R17
	brlt L2
X0:
	.dbline -2
L1:
	.dbline 0 ; func end
	ret
	.dbsym r time 16 I
	.dbend
	.dbfunc e delay_ms _delay_ms fV
;           time -> R20,R21
	.even
_delay_ms::
	st -y,R20
	st -y,R21
	movw R20,R16
	.dbline -1
	.dbline 16
; 	 }	  
; /*	  		    毫秒级延时程序			*/	 
; void delay_ms(unsigned int time)
; 	 {
	xjmp L7
L6:
	.dbline 18
; 	  while(time!=0)
; 	  	  {		
	.dbline 19
; 		   delay_us(1000);
	ldi R16,1000
	ldi R17,3
	xcall _delay_us
	.dbline 20
; 		   time--;
	subi R20,1
	sbci R21,0
	.dbline 21
; 		  }
L7:
	.dbline 17
	cpi R20,0
	cpc R20,R21
	brne L6
X1:
	.dbline -2
L5:
	.dbline 0 ; func end
	ld R21,y+
	ld R20,y+
	ret
	.dbsym r time 20 i
	.dbend
	.dbfunc e display _display fV
;              n -> R20
	.even
_display::
	st -y,R20
	st -y,R21
	.dbline -1
	.dbline 24
; 	 }					
; void display(void)
; 	 {
	.dbline 26
; 	  unsigned char n;
; 	  DDRE=0xff;
	ldi R24,255
	out 0xd,R24
	.dbline 27
; 	  PORTE=0xff;
	out 0xe,R24
	.dbline 28
; 	  DDRB|=0xf0;
	in R24,0x4
	ori R24,240
	out 0x4,R24
	.dbline 29
; 	  PORTB|=0xf0;
	in R24,0x5
	ori R24,240
	out 0x5,R24
	.dbline 30
; 	  for(n=0;n<4;n++)
	clr R20
	xjmp L13
L10:
	.dbline 31
; 	  	 {		  
	.dbline 32
; 		  PORTE=led_buff[n];
	ldi R24,<_led_buff
	ldi R25,>_led_buff
	mov R30,R20
	clr R31
	add R30,R24
	adc R31,R25
	ldd R2,z+0
	out 0xe,R2
	.dbline 33
; 		  PORTB&=~(1<<(n+4));
	mov R17,R20
	subi R17,252    ; addi 4
	ldi R16,1
	xcall lsl8
	mov R2,R16
	com R2
	in R3,0x5
	and R3,R2
	out 0x5,R3
	.dbline 34
; 		  delay_ms(1);
	ldi R16,1
	ldi R17,0
	xcall _delay_ms
	.dbline 35
; 		  PORTB|=0xf0;		  
	in R24,0x5
	ori R24,240
	out 0x5,R24
	.dbline 36
; 		 }
L11:
	.dbline 30
	inc R20
L13:
	.dbline 30
	cpi R20,4
	brlo L10
X2:
	.dbline -2
L9:
	.dbline 0 ; func end
	ld R21,y+
	ld R20,y+
	ret
	.dbsym r n 20 c
	.dbend
; 	 }