delay.s

ATMEGA128控制4×6矩阵键盘,LCD1602 使用protues软件可仿真 附带图片可观看效果

	.module delay.c
	.area text(rom, con, rel)
	.dbfile D:\ICCAVR~1\模块化~1\src\delay.c
	.dbfunc e delay_1us _delay_1us fV
	.even
_delay_1us::
	.dbline -1
	.dbline 5
; #define DELAY_C
; #include "common.h"
; #define XTAL 1    //晶振频率，单位MHz
; void delay_1us(void)                 //1us延时函数
;   {
	.dbline 6
;    asm("nop");
	nop
	.dbline -2
L1:
	.dbline 0 ; func end
	ret
	.dbend
	.dbfunc e delay_nus _delay_nus fV
;              i -> R20,R21
;              n -> R10,R11
	.even
_delay_nus::
	xcall push_xgset300C
	movw R10,R16
	.dbline -1
	.dbline 10
;   }
; 
; void delay_nus(unsigned int n)       //N us延时函数
;   {
	.dbline 11
;    unsigned int i=0;
	clr R20
	clr R21
	.dbline 12
;    for (i=0;i<n;i++)
	xjmp L6
L3:
	.dbline 13
;    delay_1us();
	xcall _delay_1us
L4:
	.dbline 12
	subi R20,255  ; offset = 1
	sbci R21,255
L6:
	.dbline 12
	cp R20,R10
	cpc R21,R11
	brlo L3
X0:
	.dbline -2
L2:
	.dbline 0 ; func end
	xjmp pop_xgset300C
	.dbsym r i 20 i
	.dbsym r n 10 i
	.dbend
	.dbfunc e delay_1ms _delay_1ms fV
;              i -> R16,R17
	.even
_delay_1ms::
	.dbline -1
	.dbline 17
;   }
;   
; void delay_1ms(void)                 //1ms延时函数
;   {
	.dbline 19
;    unsigned int i;
;    for (i=0;i<(unsigned int)(XTAL*143-2);i++);
	clr R16
	clr R17
	xjmp L11
L8:
	.dbline 19
L9:
	.dbline 19
	subi R16,255  ; offset = 1
	sbci R17,255
L11:
	.dbline 19
	ldi R24,141
	ldi R25,0
	cp R16,R24
	cpc R17,R25
	brlo L8
X1:
	.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 -> R10,R11
	.even
_delay_nms::
	xcall push_xgset300C
	movw R10,R16
	.dbline -1
	.dbline 23
;   }
;   
; void delay_nms(unsigned int n)       //N ms延时函数
;   {
	.dbline 24
;    unsigned int i=0;
	clr R20
	clr R21
	.dbline 25
;    for (i=0;i<n;i++)
	xjmp L16
L13:
	.dbline 26
;    {
	.dbline 27
;       delay_1ms();
	xcall _delay_1ms
	.dbline 28
;    }   
L14:
	.dbline 25
	subi R20,255  ; offset = 1
	sbci R21,255
L16:
	.dbline 25
	cp R20,R10
	cpc R21,R11
	brlo L13
X2:
	.dbline -2
L12:
	.dbline 0 ; func end
	xjmp pop_xgset300C
	.dbsym r i 20 i
	.dbsym r n 10 i
	.dbend
;   }
;         
;