leddisp.s

AVR程序

	.module LEDDisp.c
	.area text(rom, con, rel)
	.dbfile F:\job\M16学习板\LED显示程序(实验一)\LEDDisp.c
	.dbfile F:\job\M16学习板\LED显示程序(实验一)\..\ICC_H\SOFTWARE.h
	.dbfunc e ChangeIntToHex _ChangeIntToHex fV
;            dec -> R20,R21
	.even
_ChangeIntToHex::
	xcall push_gset1
	movw R20,R16
	.dbline -1
	.dbline 136
; /*******************************************************************
;                       实验一
; 实验名称: LED驱动程序实验
; 实验目的: 初步学习对单片机端口的操作,加深对AVR单片机端口寄存器的理解
; 实验现象: LED数码管从左向右依次亮,然后依次灭
; 环	  境: ICCAVR6.31A
; 设 计 者: shinea8868
; 说    明: 部分程序原型源自网络,经本人修改调试可用,请尊重知识产权,如
; 	  	  作商业用途请保留本段文字
; 完成日期: 2007年4月9日
; *******************************************************************/
; 
; 
; #include <iom16v.h>
; #include <macros.h>
; #include "..\ICC_H\SOFTWARE.h"
; /*-----------------------------------------------------------------
;     延时程序计算方法
; 	计数个数j = 延时时间/6*晶振频率 - 1
; -----------------------------------------------------------------*/
; void DelayMs(uint i)
; {
;  	uchar j;
; 	while(i--)
; 	{
; 	 	j = 167;//1mhz 1ms延时
; 	    while(j--);
; 	}
; }
; /*-----------------------------------------------------------------
; 函数名称: void main(void)
; 函数功能: 
; 参    数: 
; 返 回 值: 无
; -----------------------------------------------------------------*/
; void main(void)
; {
;  	uchar i;
; 	while(1)
; 	{
; 	 	for( i = 0; i < 8; i++)
; 		{
; 	 	 	DelayMs(1000);
; 			DDRB = 0xff;
; 			PORTB ^= (1<<i);//PORTB的第i位取反
; 		}
; 	}
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
	.dbline 137
; }
	movw R30,R20
	ldd R2,z+0
	clr R3
	ldi R17,10
	mov R16,R2
	xcall mod8u
	mov R4,R16
	ldi R17,10
	mov R16,R2
	xcall div8u
	mov R24,R16
	andi R24,#0x0F
	swap R24
	or R24,R4
	movw R30,R20
	std z+0,R24
	.dbline -2
L1:
	xcall pop_gset1
	.dbline 0 ; func end
	ret
	.dbsym r dec 20 pc
	.dbend
	.dbfunc e ChangeHexToInt _ChangeHexToInt fV
;            hex -> R16,R17
	.even
_ChangeHexToInt::
	.dbline -1
	.dbline 166
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
	.dbline 167
; }
	movw R30,R16
	ldd R2,z+0
	clr R3
	mov R24,R2
	swap R24
	andi R24,#0x0F
	ldi R25,10
	mul R25,R24
	mov R24,R2
	andi R24,15
	mov R2,R0
	add R2,R24
	std z+0,R2
	.dbline -2
L2:
	.dbline 0 ; func end
	ret
	.dbsym r hex 16 pc
	.dbend
	.dbfunc e Delay _Delay fV
;              i -> R16
	.even
_Delay::
	.dbline -1
	.dbline 180
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
	.dbline 182
; }
; }
	ldi R16,200
L4:
	.dbline 183
L5:
	.dbline 183
; }
	mov R2,R16
	clr R3
	subi R16,1
	tst R2
	brne L4
	.dbline -2
L3:
	.dbline 0 ; func end
	ret
	.dbsym r i 16 c
	.dbend
	.dbfile F:\job\M16学习板\LED显示程序(实验一)\LEDDisp.c
	.dbfunc e DelayMs _DelayMs fV
;              j -> R20
;              i -> R16,R17
	.even
_DelayMs::
	xcall push_gset1
	.dbline -1
	.dbline 22
	xjmp L9
L8:
	.dbline 25
	.dbline 26
	ldi R20,167
L11:
	.dbline 27
L12:
	.dbline 27
	mov R2,R20
	clr R3
	subi R20,1
	tst R2
	brne L11
	.dbline 28
L9:
	.dbline 24
	movw R2,R16
	subi R16,1
	sbci R17,0
	tst R2
	brne L8
	tst R3
	brne L8
X0:
	.dbline -2
L7:
	xcall pop_gset1
	.dbline 0 ; func end
	ret
	.dbsym r j 20 c
	.dbsym r i 16 i
	.dbend
	.dbfunc e main _main fV
;              i -> R20
	.even
_main::
	.dbline -1
	.dbline 37
	xjmp L16
L15:
	.dbline 40
	.dbline 41
	clr R20
	xjmp L21
L18:
	.dbline 42
	.dbline 43
	ldi R16,1000
	ldi R17,3
	xcall _DelayMs
	.dbline 44
	ldi R24,255
	out 0x17,R24
	.dbline 45
	ldi R16,1
	mov R17,R20
	xcall lsl8
	in R2,0x18
	eor R2,R16
	out 0x18,R2
	.dbline 46
L19:
	.dbline 41
	inc R20
L21:
	.dbline 41
	cpi R20,8
	brlo L18
	.dbline 47
L16:
	.dbline 39
	xjmp L15
X1:
	.dbline -2
L14:
	.dbline 0 ; func end
	ret
	.dbsym r i 20 c
	.dbend