main.s

avr单片机的定时计数器的使用。包括各种延时子程序的调用。内有电路图。

	.module main.c
	.area text(rom, con, rel)
	.dbfile D:\avr\+++精华+++\＋M16范例＋\定时器/delay.h
	.dbfunc e delay_1us _delay_1us fV
	.even
_delay_1us::
	.dbline -1
	.dbline 15
; /*****************************************
; *      基于T/C0的定时器设计 		   	 *
; * 功    能：定时器          			 *
; * 时钟频率：外部7.3728M 				 *
; * 设    计：莫锦攀						 *
; * 修改日期：2007年07月30日				 *
; * 编译环境：ICC-AVR6.31					 *
; * 实验环境：M16学习板					 *
; * 使用端口：PC6,PC7,PA4~PA7	 			 *
; *使用1M频率时不够精确所以用8M的了,注意要 *
; *使用T/C0定时功能前的初始化工作			 *
; *****************************************/
; 
; 
; #include <iom16v.h> 
	.dbline 16
; #include "1602.h"
	nop
	.dbline -2
L1:
	.dbline 0 ; func end
	ret
	.dbend
	.dbfunc e delay_nus _delay_nus fV
;              i -> R20,R21
;              n -> R22,R23
	.even
_delay_nus::
	xcall push_gset2
	movw R22,R16
	.dbline -1
	.dbline 20
; #include "delay.h"
; 
; #define uchar unsigned char
; #define uint unsigned int
	.dbline 21
; 
	clr R20
	clr R21
	.dbline 22
; uchar data[5]={0,0,0,0,0};//显示的初始值：0，0，0，0
	xjmp L6
L3:
	.dbline 23
	xcall _delay_1us
L4:
	.dbline 22
	subi R20,255  ; offset = 1
	sbci R21,255
L6:
	.dbline 22
	cp R20,R22
	cpc R21,R23
	brlo L3
	.dbline -2
L2:
	xcall pop_gset2
	.dbline 0 ; func end
	ret
	.dbsym r i 20 i
	.dbsym r n 22 i
	.dbend
	.dbfunc e delay_1ms _delay_1ms fV
;              i -> R16,R17
	.even
_delay_1ms::
	.dbline -1
	.dbline 27
; uint cnt=0;				//初始计数值：0
; uchar timer[2]={0,0};//初始时间00:00
; 
; 
; 
	.dbline 29
	clr R16
	clr R17
	xjmp L11
L8:
	.dbline 29
L9:
	.dbline 29
	subi R16,255  ; offset = 1
	sbci R17,255
L11:
	.dbline 29
; //********计数值处理函数******************//
; void process(uchar *i,uchar *p)
	cpi R16,116
	ldi R30,4
	cpc R17,R30
	brlo L8
	.dbline -2
L7:
	.dbline 0 ; func end
	ret
	.dbsym r i 16 i
	.dbend
	.dbfunc e delay_nms _delay_nms fV
;              i -> R20,R21
;              n -> R22,R23
	.even
_delay_nms::
	xcall push_gset2
	movw R22,R16
	.dbline -1
	.dbline 33
; {p[0]=i[0]/10+48;//分的高位
; p[1]=i[0]%10+48;//分的低位
; 
; p[2]=i[1]/10+48;//秒的高位
	.dbline 34
; p[3]=i[1]%10+48;//秒的低位
	clr R20
	clr R21
	.dbline 35
; //注意这里加48是因为ASCII码中数字都要加48的原因
	xjmp L16
L13:
	.dbline 36
	xcall _delay_1ms
L14:
	.dbline 35
	subi R20,255  ; offset = 1
	sbci R21,255
L16:
	.dbline 35
	cp R20,R22
	cpc R21,R23
	brlo L13
	.dbline -2
L12:
	xcall pop_gset2
	.dbline 0 ; func end
	ret
	.dbsym r i 20 i
	.dbsym r n 22 i
	.dbend
	.dbfile D:\avr\+++精华+++\＋M16范例＋\定时器/1602.h
	.dbfunc e LCD_init _LCD_init fV
	.even
_LCD_init::
	.dbline -1
	.dbline 44
; }
; 
; 
; //************液晶显示函数******************//
; void lcd(void)
; { 
; LCD_write_string(2,0,"Timer by MJP");
; LCD_write_char(6,1,data[0]);
; LCD_write_char(7,1,data[1]);
	.dbline 45
; LCD_write_char(8,1,':');
	in R24,0x1a
	ori R24,240
	out 0x1a,R24
	.dbline 46
; LCD_write_char(9,1,data[2]);
	sbi 0x14,7
	.dbline 47
; LCD_write_char(10,1,data[3]);
	sbi 0x14,6
	.dbline 48
; }
	ldi R16,40
	xcall _LCD_write_command
	.dbline 49
; 
	xcall _LCD_en_write
	.dbline 50
; //************T/C0中断服务函数******************//
	ldi R16,40
	ldi R17,0
	xcall _delay_nus
	.dbline 51
; #pragma interrupt_handler Timer0:10
	ldi R16,40
	xcall _LCD_write_command
	.dbline 52
; void Timer0(void)
	ldi R16,12
	xcall _LCD_write_command
	.dbline 53
; {cnt++;
	ldi R16,1
	xcall _LCD_write_command
	.dbline 54
; if(cnt==450)//450*64*256=7372800
	ldi R16,2
	ldi R17,0
	xcall _delay_nms
	.dbline -2
L17:
	.dbline 0 ; func end
	ret
	.dbend
	.dbfunc e LCD_en_write _LCD_en_write fV
	.even
_LCD_en_write::
	.dbline -1
	.dbline 61
; 	{cnt=0;
; 	timer[1]++;//秒加1
; 	if(timer[1]==60){timer[1]=0;timer[0]++;}//分加1
; 	if(timer[0]==60){timer[0]=0;}//计数达到最高,重新开始
; 	}
; }
; 
	.dbline 62
; 
	sbi 0x15,7
	.dbline 63
; 
	ldi R16,1
	ldi R17,0
	xcall _delay_nus
	.dbline 64
; //************初始化函数******************//
	cbi 0x15,7
	.dbline -2
L18:
	.dbline 0 ; func end
	ret
	.dbend
	.dbfunc e LCD_write_command _LCD_write_command fV
;        command -> R20
	.even
_LCD_write_command::
	xcall push_gset1
	mov R20,R16
	.dbline -1
	.dbline 68
; void init(void)
; {
; LCD_init();//液晶初始化
; SEI();//开全局中断
	.dbline 70
; TCCR0=0x03;//系统时钟64分频
; TCNT0=0x00;//tcnt清零
	ldi R16,16
	ldi R17,0
	xcall _delay_nus
	.dbline 71
; TIMSK=0x01;//打开T/C中断屏蔽寄存器
	cbi 0x15,6
	.dbline 72
; }
	in R24,0x1b
	andi R24,15
	out 0x1b,R24
	.dbline 73
; 
	mov R24,R20
	andi R24,240
	in R2,0x1b
	or R2,R24
	out 0x1b,R2
	.dbline 74
; void main(void)
	xcall _LCD_en_write
	.dbline 75
; {init();//初始化
	mov R24,R20
	andi R24,#0x0F
	swap R24
	mov R20,R24
	.dbline 76
; while(1)
	in R24,0x1b
	andi R24,15
	out 0x1b,R24
	.dbline 77
; 	{
	mov R24,R20
	andi R24,240
	in R2,0x1b
	or R2,R24
	out 0x1b,R2
	.dbline 78
; 	process(timer,data);//计数值处理
	xcall _LCD_en_write
	.dbline -2
L19:
	xcall pop_gset1
	.dbline 0 ; func end
	ret
	.dbsym r command 20 c
	.dbend
	.dbfunc e LCD_write_data _LCD_write_data fV
;           data -> R20
	.even
_LCD_write_data::
	xcall push_gset1
	mov R20,R16
	.dbline -1
	.dbline 95
; 	lcd();//显示
; 	}
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
	.dbline 97
; }
; }
	ldi R16,16
	ldi R17,0
	xcall _delay_nus
	.dbline 98
; }
	sbi 0x15,6
	.dbline 99
; }
	in R24,0x1b
	andi R24,15
	out 0x1b,R24
	.dbline 100
; }
	mov R24,R20
	andi R24,240
	in R2,0x1b
	or R2,R24
	out 0x1b,R2
	.dbline 101
; }
	xcall _LCD_en_write
	.dbline 102
; }
	mov R24,R20
	andi R24,#0x0F
	swap R24
	mov R20,R24
	.dbline 103
; }
	in R24,0x1b
	andi R24,15
	out 0x1b,R24
	.dbline 104
; }
	mov R24,R20
	andi R24,240
	in R2,0x1b
	or R2,R24
	out 0x1b,R2
	.dbline 105
; }
	xcall _LCD_en_write
	.dbline -2
L20:
	xcall pop_gset1
	.dbline 0 ; func end
	ret
	.dbsym r data 20 c
	.dbend
	.dbfunc e LCD_set_xy _LCD_set_xy fV
;        address -> R20
;              y -> R20
;              x -> R22
	.even
_LCD_set_xy::
	xcall push_gset2
	mov R20,R18
	mov R22,R16
	.dbline -1
	.dbline 124
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
	.dbline 126
; }
; }
	tst R20
	brne L22
	.dbline 126
	mov R20,R22
	subi R20,128    ; addi 128
	xjmp L23
L22:
	.dbline 127
; }
	mov R20,R22
	subi R20,64    ; addi 192
L23:
	.dbline 128
; }
	mov R16,R20
	xcall _LCD_write_command
	.dbline -2
L21:
	xcall pop_gset2
	.dbline 0 ; func end
	ret
	.dbsym r address 20 c
	.dbsym r y 20 c
	.dbsym r x 22 c
	.dbend
	.dbfunc e LCD_write_string _LCD_write_string fV
;              s -> R20,R21
;              Y -> R10
;              X -> R22
	.even
_LCD_write_string::
	xcall push_gset3
	mov R10,R18
	mov R22,R16
	ldd R20,y+6
	ldd R21,y+7
	.dbline -1
	.dbline 132
; }
; }
; }
; }
	.dbline 133
; }
	mov R18,R10
	mov R16,R22
	xcall _LCD_set_xy
	xjmp L26
L25:
	.dbline 135
	.dbline 136
	movw R30,R20
	ldd R16,z+0
	xcall _LCD_write_data
	.dbline 137
	subi R20,255  ; offset = 1
	sbci R21,255
	.dbline 138
L26:
	.dbline 134
; }
	movw R30,R20
	ldd R2,z+0
	tst R2
	brne L25
	.dbline -2
L24:
	xcall pop_gset3
	.dbline 0 ; func end
	ret
	.dbsym r s 20 pc
	.dbsym r Y 10 c
	.dbsym r X 22 c
	.dbend
	.dbfunc e LCD_write_char _LCD_write_char fV
;           data -> y+4
;              Y -> R22
;              X -> R20
	.even
_LCD_write_char::
	xcall push_gset2
	mov R22,R18
	mov R20,R16
	.dbline -1
	.dbline 143
; }
; }
; }
; }
; }
; }
; }
; }
; }
	.dbline 144
; }
	mov R18,R22
	mov R16,R20
	xcall _LCD_set_xy
	.dbline 145
; }
	ldd R16,y+4
	xcall _LCD_write_data
	.dbline -2
L28:
	xcall pop_gset2
	.dbline 0 ; func end
	ret
	.dbsym l data 4 c
	.dbsym r Y 22 c
	.dbsym r X 20 c
	.dbend
	.area data(ram, con, rel)
	.dbfile D:\avr\+++精华+++\＋M16范例＋\定时器/1602.h
_data::
	.blkb 2
	.area idata
	.byte 0,0
	.area data(ram, con, rel)
	.dbfile D:\avr\+++精华+++\＋M16范例＋\定时器/1602.h
	.blkb 2
	.area idata
	.byte 0,0
	.area data(ram, con, rel)
	.dbfile D:\avr\+++精华+++\＋M16范例＋\定时器/1602.h
	.blkb 1
	.area idata
	.byte 0
	.area data(ram, con, rel)
	.dbfile D:\avr\+++精华+++\＋M16范例＋\定时器/1602.h
	.dbfile D:\avr\+++精华+++\＋M16范例＋\定时器\main.c
	.dbsym e data _data A[5:5]c
_cnt::
	.blkb 2
	.area idata
	.word 0
	.area data(ram, con, rel)
	.dbfile D:\avr\+++精华+++\＋M16范例＋\定时器\main.c
	.dbsym e cnt _cnt i
_timer::
	.blkb 2
	.area idata
	.byte 0,0
	.area data(ram, con, rel)
	.dbfile D:\avr\+++精华+++\＋M16范例＋\定时器\main.c
	.dbsym e timer _timer A[2:2]c
	.area text(rom, con, rel)
	.dbfile D:\avr\+++精华+++\＋M16范例＋\定时器\main.c
	.dbfunc e process _process fV
;              p -> R20,R21
;              i -> R22,R23
	.even
_process::
	xcall push_gset2
	movw R20,R18
	movw R22,R16
	.dbline -1
	.dbline 30
	.dbline 30
	ldi R17,10
	movw R30,R22
	ldd R16,z+0
	xcall div8u
	mov R24,R16
	subi R24,208    ; addi 48
	movw R30,R20
	std z+0,R24
	.dbline 31
	ldi R17,10
	movw R30,R22
	ldd R16,z+0
	xcall mod8u
	mov R24,R16
	subi R24,208    ; addi 48
	movw R30,R20
	std z+1,R24
	.dbline 33
	ldi R17,10
	movw R30,R22
	ldd R16,z+1
	xcall div8u
	mov R24,R16
	subi R24,208    ; addi 48
	movw R30,R20
	std z+2,R24
	.dbline 34
	ldi R17,10
	movw R30,R22
	ldd R16,z+1
	xcall mod8u
	mov R24,R16
	subi R24,208    ; addi 48
	movw R30,R20
	std z+3,R24
	.dbline -2
L29:
	xcall pop_gset2
	.dbline 0 ; func end
	ret
	.dbsym r p 20 pc
	.dbsym r i 22 pc
	.dbend
	.dbfunc e lcd _lcd fV
	.even
_lcd::
	sbiw R28,2
	.dbline -1
	.dbline 41
	.dbline 42
	ldi R24,<L31
	ldi R25,>L31
	std y+1,R25
	std y+0,R24
	clr R18
	ldi R16,2
	xcall _LCD_write_string
	.dbline 43
	lds R2,_data
	std y+0,R2
	ldi R18,1
	ldi R16,6
	xcall _LCD_write_char
	.dbline 44
	lds R2,_data+1
	std y+0,R2
	ldi R18,1
	ldi R16,7
	xcall _LCD_write_char
	.dbline 45
	ldi R24,58
	std y+0,R24
	ldi R18,1
	ldi R16,8
	xcall _LCD_write_char
	.dbline 46
	lds R2,_data+2
	std y+0,R2
	ldi R18,1
	ldi R16,9
	xcall _LCD_write_char
	.dbline 47
	lds R2,_data+3
	std y+0,R2
	ldi R18,1
	ldi R16,10
	xcall _LCD_write_char
	.dbline -2
L30:
	adiw R28,2
	.dbline 0 ; func end
	ret
	.dbend
	.area vector(rom, abs)
	.org 36
	jmp _Timer0
	.area text(rom, con, rel)
	.dbfile D:\avr\+++精华+++\＋M16范例＋\定时器\main.c
	.dbfunc e Timer0 _Timer0 fV
	.even
_Timer0::
	st -y,R2
	st -y,R3
	st -y,R24
	st -y,R25
	st -y,R30
	in R2,0x3f
	st -y,R2
	.dbline -1
	.dbline 53
	.dbline 53
	lds R24,_cnt
	lds R25,_cnt+1
	adiw R24,1
	sts _cnt+1,R25
	sts _cnt,R24
	.dbline 54
	cpi R24,194
	ldi R30,1
	cpc R25,R30
	brne L36
	.dbline 55
	.dbline 55
	clr R2
	clr R3
	sts _cnt+1,R3
	sts _cnt,R2
	.dbline 56
	lds R24,_timer+1
	subi R24,255    ; addi 1
	sts _timer+1,R24
	.dbline 57
	cpi R24,60
	brne L39
	.dbline 57
	.dbline 57
	sts _timer+1,R2
	.dbline 57
	lds R24,_timer
	subi R24,255    ; addi 1
	sts _timer,R24
	.dbline 57
L39:
	.dbline 58
	lds R24,_timer
	cpi R24,60
	brne L43
	.dbline 58
	.dbline 58
	clr R2
	sts _timer,R2
	.dbline 58
L43:
	.dbline 59
L36:
	.dbline -2
L35:
	ld R2,y+
	out 0x3f,R2
	ld R30,y+
	ld R25,y+
	ld R24,y+
	ld R3,y+
	ld R2,y+
	.dbline 0 ; func end
	reti
	.dbend
	.dbfunc e init _init fV
	.even
_init::
	.dbline -1
	.dbline 66
	.dbline 67
	xcall _LCD_init
	.dbline 68
	sei
	.dbline 69
	ldi R24,3
	out 0x33,R24
	.dbline 70
	clr R2
	out 0x32,R2
	.dbline 71
	ldi R24,1
	out 0x39,R24
	.dbline -2
L45:
	.dbline 0 ; func end
	ret
	.dbend
	.dbfunc e main _main fV
	.even
_main::
	.dbline -1
	.dbline 75
	.dbline 75
	xcall _init
	xjmp L48
L47:
	.dbline 77
	.dbline 78
	ldi R18,<_data
	ldi R19,>_data
	ldi R16,<_timer
	ldi R17,>_timer
	xcall _process
	.dbline 79
	xcall _lcd
	.dbline 80
L48:
	.dbline 76
	xjmp L47
X0:
	.dbline -2
L46:
	.dbline 0 ; func end
	ret
	.dbend
	.area data(ram, con, rel)
	.dbfile D:\avr\+++精华+++\＋M16范例＋\定时器\main.c
L31:
	.blkb 13
	.area idata
	.byte 'T,'i,'m,'e,'r,32,'b,'y,32,'M,'J,'P,0
	.area data(ram, con, rel)
	.dbfile D:\avr\+++精华+++\＋M16范例＋\定时器\main.c