pd3keyint.s

ATmega16应用例子

	.module PD3KeyInt.C
	.area text(rom, con, rel)
	.dbfile E:\ICC_H\SoftExt.H
	.dbfunc e speaData _speaData fV
;              y -> y+4
;              j -> y+0
;              i -> R10
;            len -> R12
;            dat -> y+16
	.even
_speaData::
	xcall push_arg4
	xcall push_gset4
	sbiw R28,8
	ldd R12,y+20
	.dbline -1
	.dbline 116
; 
; #include <iom16v.h>
; #include "E:\ICC_H\CmmICC.H"
; 
; #define DISP_DDR	DDRB
; #define DISP_PORT  	PORTB
; #define IN_PD3		cbi(DDRD,3)		//PD3
; #define SET_PD3		sbi(PORTD,3)
; #define GET_PD3		gbi(PIND,3)
; 
; #pragma interrupt_handler int1_isr:3
; void int1_isr(void)
; {
; 	GICR &= 0b01111111;		   	// disable int1 interrupt
; 	DISP_PORT++;
; 	delay50ms(4);
; 	GICR |= 0b10000000; 		// enable int1 interrupt
; }
; 
; void int1_init()
; {
;  	IN_PD3; 				// set PD3/INT1 as input
; 	SET_PD3;				// set PD3/INT1 output high level,avoid triggering
; 	MCUCR |= 0b11110011;		// set PD3/INT1 as low level active
; 	GICR  |= 0b10000000;		// enable global interrupt
; 	SEI();	 	  				// enable external interrupt
; }
; 
; void main(void)
; {
; 	DISP_DDR  = 0xFF;
; 	DISP_PORT = 0x00;
; 	int1_init();
; 	asm("sleep");				// set mcu as sleep modle
; 	while(1);
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
; }
	.dbline 119
; }
; }
; }
	clr R10
	ldi R20,1
	ldi R21,0
	ldi R22,0
	ldi R23,0
	movw R30,R28
	std z+0,R20
	std z+1,R21
	std z+2,R22
	std z+3,R23
	xjmp L5
L2:
	.dbline 120
	.dbline 121
	movw R30,R28
	ldd R2,z+0
	ldd R3,z+1
	ldd R4,z+2
	ldd R5,z+3
	movw R30,R28
	ldd R6,z+16
	ldd R7,z+17
	ldd R8,z+18
	ldd R9,z+19
	st -y,R5
	st -y,R4
	st -y,R3
	st -y,R2
	movw R16,R6
	movw R18,R8
	xcall div32u
	movw R30,R28
	std z+4,R16
	std z+5,R17
	std z+6,R18
	std z+7,R19
	.dbline 122
	ldi R20,10
	ldi R21,0
	ldi R22,0
	ldi R23,0
	movw R30,R28
	ldd R2,z+4
	ldd R3,z+5
	ldd R4,z+6
	ldd R5,z+7
	st -y,R23
	st -y,R22
	st -y,R21
	st -y,R20
	movw R16,R2
	movw R18,R4
	xcall mod32u
	ldi R24,<_dataElem
	ldi R25,>_dataElem
	mov R30,R10
	clr R31
	add R30,R24
	adc R31,R25
	std z+0,R16
	.dbline 123
	movw R30,R28
	ldd R2,z+0
	ldd R3,z+1
	ldd R4,z+2
	ldd R5,z+3
	ldi R20,10
	ldi R21,0
	ldi R22,0
	ldi R23,0
	st -y,R5
	st -y,R4
	st -y,R3
	st -y,R2
	movw R16,R20
	movw R18,R22
	xcall empy32u
	movw R30,R28
	std z+0,R16
	std z+1,R17
	std z+2,R18
	std z+3,R19
	.dbline 124
L3:
	.dbline 119
	inc R10
L5:
	.dbline 119
	cp R10,R12
	brsh X0
	xjmp L2
X0:
	.dbline -2
	.dbline 125
; }
; }
; }
; }
; }
; }
L1:
	adiw R28,8
	xcall pop_gset4
	adiw R28,4
	.dbline 0 ; func end
	ret
	.dbsym l y 4 l
	.dbsym l j 0 l
	.dbsym r i 10 c
	.dbsym r len 12 C
	.dbsym l dat 16 l
	.dbend
	.dbfile E:\ICC_H\HardExt.H
	.dbfunc e delay50us _delay50us fV
;              j -> R20
;              t -> R16,R17
	.even
_delay50us::
	xcall push_gset1
	.dbline -1
	.dbline 98
	.dbline 100
	xjmp L10
L7:
	.dbline 101
	clr R20
	xjmp L14
L11:
	.dbline 102
L12:
	.dbline 101
	inc R20
L14:
	.dbline 101
	cpi R20,70
	brlo L11
L8:
	.dbline 100
	subi R16,1
	sbci R17,0
L10:
	.dbline 100
	clr R2
	clr R3
	cp R2,R16
	cpc R3,R17
	brlt L7
	.dbline -2
	.dbline 103
L6:
	xcall pop_gset1
	.dbline 0 ; func end
	ret
	.dbsym r j 20 c
	.dbsym r t 16 I
	.dbend
	.dbfunc e delay50ms _delay50ms fV
;              i -> R20,R21
;              t -> R16,R17
	.even
_delay50ms::
	xcall push_gset1
	.dbline -1
	.dbline 113
	.dbline 115
	xjmp L19
L16:
	.dbline 116
	clr R20
	clr R21
	xjmp L23
L20:
	.dbline 117
L21:
	.dbline 116
	subi R20,255  ; offset = 1
	sbci R21,255
L23:
	.dbline 116
	cpi R20,162
	ldi R30,205
	cpc R21,R30
	brlo L20
L17:
	.dbline 115
	subi R16,1
	sbci R17,0
L19:
	.dbline 115
	clr R2
	clr R3
	cp R2,R16
	cpc R3,R17
	brlt L16
	.dbline -2
	.dbline 118
L15:
	xcall pop_gset1
	.dbline 0 ; func end
	ret
	.dbsym r i 20 i
	.dbsym r t 16 I
	.dbend
	.area vector(rom, abs)
	.org 8
	jmp _int1_isr
	.area text(rom, con, rel)
	.dbfile E:\ICC_H\HardExt.H
	.dbfile E:\ProductPro\M16SD\ICCAVR\PD3Key\PD3KeyInt\PD3KeyInt.C
	.dbfunc e int1_isr _int1_isr fV
	.even
_int1_isr::
	xcall push_lset
	.dbline -1
	.dbline 13
	.dbline 14
	in R24,0x3b
	andi R24,127
	out 0x3b,R24
	.dbline 15
	in R24,0x18
	subi R24,255    ; addi 1
	out 0x18,R24
	.dbline 16
	ldi R16,4
	ldi R17,0
	xcall _delay50ms
	.dbline 17
	in R24,0x3b
	ori R24,128
	out 0x3b,R24
	.dbline -2
	.dbline 18
L24:
	xcall pop_lset
	.dbline 0 ; func end
	reti
	.dbend
	.dbfunc e int1_init _int1_init fV
	.even
_int1_init::
	.dbline -1
	.dbline 21
	.dbline 22
	cbi 0x11,3
	.dbline 23
	sbi 0x12,3
	.dbline 24
	in R24,0x35
	ori R24,243
	out 0x35,R24
	.dbline 25
	in R24,0x3b
	ori R24,128
	out 0x3b,R24
	.dbline 26
	sei
	.dbline -2
	.dbline 27
L25:
	.dbline 0 ; func end
	ret
	.dbend
	.dbfunc e main _main fV
	.even
_main::
	.dbline -1
	.dbline 30
	.dbline 31
	ldi R24,255
	out 0x17,R24
	.dbline 32
	clr R2
	out 0x18,R2
	.dbline 33
	xcall _int1_init
	.dbline 34
	sleep
L27:
	.dbline 35
L28:
	.dbline 35
	xjmp L27
X1:
	.dbline -2
	.dbline 36
L26:
	.dbline 0 ; func end
	ret
	.dbend
	.area bss(ram, con, rel)
	.dbfile E:\ProductPro\M16SD\ICCAVR\PD3Key\PD3KeyInt\PD3KeyInt.C
_dataElem::
	.blkb 6
	.dbfile E:\ICC_H\SoftExt.H
	.dbsym e dataElem _dataElem A[6:6]c