timer0int.s

利用AVR单片机Mega16的定时器0的溢出中断实现2.5KHz的方波

	.module TIMER0INT.C
	.area text(rom, con, rel)
	.dbfile C:/icc/include/AVR_PQ1A.h
	.dbfunc e Delayus _Delayus fV
;              i -> R20,R21
;             US -> R22,R23
	.even
_Delayus::
	xcall push_gset2
	movw R22,R16
	.dbline -1
	.dbline 28
; /*******************************************
;   文件：TIMER0INT.C
;   环境：编译为ICC AVR6.25A，仿真为AVR Studio4.10 
;   硬件：ATMEGA16芯片
;   日期：2006年12月10日 
;   功能：实现MEGA16的TIMER0的溢出中断
;   备注：参考《AVR系列单片机C语言编程与应用实例》（清华大学出版社）
; /******************************************/
; #include <iom16v.h>			//包含型号头文件
; #include <macros.h>			//包含"位"操作头文件
; #include <stdio.h>			//标准输入输出头文件
; #include <AVR_PQ1A.h>		//包含自定义常量头文件
; 
; #pragma interrupt_handler Timer0:10
; 
; /*******************************************
; 函数名称: Timer0_init
; 功    能: Timer0初始化
; 参    数: 无
; 返回值  : 无
; /********************************************/
; void Timer0_init(void)
; {
;  TCCR0|=0x03;      //普通计时模式，普通端口操作，预分频为64
;  TCNT0=231;		   //频率为2.5KHz							 
;  SREG|=BIT(7);	   //开放全局中断
;  TIMSK|=BIT(TOIE0);//开放TIMER0溢出中断
;  DDRA|=BIT(PA0);   //配置PA0引脚为输出				   
	.dbline 30
; }
; /*******************************************
	ldi R16,5
	ldi R17,0
	movw R18,R22
	xcall empy16s
	movw R22,R16
	lsr R23
	ror R22
	lsr R23
	ror R22
	.dbline 31
	clr R20
	clr R21
	xjmp L5
L2:
	.dbline 31
L3:
	.dbline 31
	subi R20,255  ; offset = 1
	sbci R21,255
L5:
	.dbline 31
; 函数名称: Timer0
	cp R20,R22
	cpc R21,R23
	brlo L2
	.dbline -2
	.dbline 32
; 功    能: Timer0的溢出中断服务函数
L1:
	xcall pop_gset2
	.dbline 0 ; func end
	ret
	.dbsym r i 20 i
	.dbsym r US 22 i
	.dbend
	.dbfunc e Delayms _Delayms fV
;              i -> R20,R21
;              j -> R22,R23
;             MS -> R16,R17
	.even
_Delayms::
	xcall push_gset2
	.dbline -1
	.dbline 40
; 参    数: 无
; 返回值  : 无
; /********************************************/
; void Timer0(void)
; {
;  TCNT0=231; 	 //重新赋初值
;  PORTA^=0X01;	 //取反PA0引脚，输出2.5KHz的方波
; }
	.dbline 42
; /*******************************************
; 函数名称: main
	clr R20
	clr R21
	xjmp L10
L7:
	.dbline 43
	clr R22
	clr R23
	xjmp L14
L11:
	.dbline 43
L12:
	.dbline 43
	subi R22,255  ; offset = 1
	sbci R23,255
L14:
	.dbline 43
	cpi R22,117
	ldi R30,4
	cpc R23,R30
	brlo L11
L8:
	.dbline 42
	subi R20,255  ; offset = 1
	sbci R21,255
L10:
	.dbline 42
	cp R20,R16
	cpc R21,R17
	brlo L7
	.dbline -2
	.dbline 44
; 功    能: 完成初始化，等待TIMER0中断
; 参    数: 无
L6:
	xcall pop_gset2
	.dbline 0 ; func end
	ret
	.dbsym r i 20 i
	.dbsym r j 22 i
	.dbsym r MS 16 i
	.dbend
	.dbfunc e Board_init _Board_init fV
	.even
_Board_init::
	.dbline -1
	.dbline 52
; 返回值  : 无
; /********************************************/
; void main(void)
; {
;  Board_init( );	   							  //初始化开发板
;  Timer0_init(); 
;  while(1)
;  {
	.dbline 53
;  }
	ldi R24,255
	out 0x1a,R24
	.dbline 54
; }
	out 0x17,R24
	.dbline 55
; }
	out 0x14,R24
	.dbline 56
; }
	out 0x11,R24
	.dbline 58
; }
; }
	clr R2
	out 0xd,R2
	.dbline 60
; }
; }
	sbi 0x1b,6
	.dbline 61
; }
	cbi 0x15,6
	.dbline 62
; }
	cbi 0x1b,1
	.dbline 63
; }
	out 0x18,R24
	.dbline 64
; }
	sbi 0x1b,2
	.dbline 65
; }
	ldi R16,5
	ldi R17,0
	xcall _Delayus
	.dbline 66
; }
	cbi 0x1b,2
	.dbline 68
; }
; }
	clr R2
	out 0x18,R2
	.dbline 69
; }
	sbi 0x1b,3
	.dbline 70
; }
	ldi R16,50
	ldi R17,0
	xcall _Delayus
	.dbline 71
; }
	cbi 0x1b,3
	.dbline 73
; }
; }
	ldi R24,255
	out 0x18,R24
	.dbline 74
; }
	sbi 0x1b,4
	.dbline 75
; }
	ldi R16,50
	ldi R17,0
	xcall _Delayus
	.dbline 76
; }
	cbi 0x1b,4
	.dbline 78
; }
; }
	ldi R24,255
	out 0x12,R24
	.dbline 79
; }
	sbi 0x1b,7
	.dbline 80
; }
	ldi R16,50
	ldi R17,0
	xcall _Delayus
	.dbline 81
; }
	cbi 0x1b,7
	.dbline -2
	.dbline 84
; }
; }
; }
L15:
	.dbline 0 ; func end
	ret
	.dbend
	.area vector(rom, abs)
	.org 36
	jmp _Timer0
	.area text(rom, con, rel)
	.dbfile C:/icc/include/AVR_PQ1A.h
	.dbfile C:\icc\examples.avr\AVR_PQ1A_DEMO\8_TIMER0INT\TIMER0INT.C
	.dbfunc e Timer0_init _Timer0_init fV
	.even
_Timer0_init::
	.dbline -1
	.dbline 23
	.dbline 24
	in R24,0x33
	ori R24,3
	out 0x33,R24
	.dbline 25
	ldi R24,231
	out 0x32,R24
	.dbline 26
	bset 7
	.dbline 27
	in R24,0x39
	ori R24,1
	out 0x39,R24
	.dbline 28
	sbi 0x1a,0
	.dbline -2
	.dbline 29
L16:
	.dbline 0 ; func end
	ret
	.dbend
	.dbfunc e Timer0 _Timer0 fV
	.even
_Timer0::
	st -y,R2
	st -y,R24
	in R2,0x3f
	st -y,R2
	.dbline -1
	.dbline 37
	.dbline 38
	ldi R24,231
	out 0x32,R24
	.dbline 39
	ldi R24,1
	in R2,0x1b
	eor R2,R24
	out 0x1b,R2
	.dbline -2
	.dbline 40
L17:
	ld R2,y+
	out 0x3f,R2
	ld R24,y+
	ld R2,y+
	.dbline 0 ; func end
	reti
	.dbend
	.dbfunc e main _main fV
	.even
_main::
	.dbline -1
	.dbline 48
	.dbline 49
	xcall _Board_init
	.dbline 50
	xcall _Timer0_init
L19:
	.dbline 52
	.dbline 53
L20:
	.dbline 51
	xjmp L19
X0:
	.dbline -2
	.dbline 54
L18:
	.dbline 0 ; func end
	ret
	.dbend