📄 compare.s

📁 学习AVR除了了解这个MCU的结构之外
💻 S
字号:
	.module Compare.c
	.area data(ram, con, rel)
_Table::
	.blkb 2
	.area idata
	.byte 63,6
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.byte 91,'O
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.byte 'f,'m
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.byte 125,7
	.area data(ram, con, rel)
	.blkb 2
	.area idata
	.byte 127,'o
	.area data(ram, con, rel)
	.dbfile I:\AVRpractice\BOOK\定时器1\输出比较\Compare.c
	.dbsym e Table _Table A[10:10]c
_Data::
	.blkb 2
	.area idata
	.byte 0,0
	.area data(ram, con, rel)
	.dbfile I:\AVRpractice\BOOK\定时器1\输出比较\Compare.c
	.blkb 2
	.area idata
	.byte 0,1
	.area data(ram, con, rel)
	.dbfile I:\AVRpractice\BOOK\定时器1\输出比较\Compare.c
	.dbsym e Data _Data A[4:4]c
	.area text(rom, con, rel)
	.dbfile I:\AVRpractice\BOOK\定时器1\输出比较\Compare.c
	.dbfunc e DelayMs _DelayMs fV
;              j -> R20,R21
;              i -> R16,R17
	.even
_DelayMs::
	rcall push_gset1
	.dbline -1
	.dbline 14
; //***************FileName:Capature.C***************//
; //***************ICCAVR V6.30编译*****************//
; 
; #include <io8535v.h>                 
; #define uchar unsigned char
; #define uint  unsigned int
; 
; //数码管字型表，对应0，1，2，3，4，5，6，7，8，9//
; uchar Table[10]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f};
; uchar Data[4]={0,0,0,1};       //定义初始方波频率：1KHz
; uchar Key1_Flag,Key2_Flag,Key3_Flag;
; 
; void DelayMs(uint i)           //Ms级延时，参数i为延时时间
; {uint j;
	.dbline 15
;  for(;i!=0;i--)
	rjmp L5
L2:
	.dbline 16
	.dbline 16
	ldi R20,8000
	ldi R21,31
	rjmp L9
L6:
	.dbline 16
	.dbline 16
	.dbline 16
L7:
	.dbline 16
	subi R20,1
	sbci R21,0
L9:
	.dbline 16
	cpi R20,0
	cpc R20,R21
	brne L6
X0:
	.dbline 16
L3:
	.dbline 15
	subi R16,1
	sbci R17,0
L5:
	.dbline 15
	cpi R16,0
	cpc R16,R17
	brne L2
X1:
	.dbline -2
	.dbline 17
;   {for(j=8000;j!=0;j--) {;}}
; }
L1:
	rcall pop_gset1
	.dbline 0 ; func end
	ret
	.dbsym r j 20 i
	.dbsym r i 16 i
	.dbend
	.dbfunc e Display _Display fV
;            sel -> R20
;              i -> R22
;              p -> R10,R11
	.even
_Display::
	rcall push_gset3
	mov R10,R16
	mov R11,R17
	.dbline -1
	.dbline 20
; 
; void Display(uchar *p)         //动态显示函数，参数p为待显示的数组名
; {uchar i,sel=0x01;           
	.dbline 20
	ldi R20,1
	.dbline 21
;  for(i=0;i<4;i++)
	clr R22
	rjmp L14
L11:
	.dbline 22
	.dbline 22
	out 0x1b,R20
	.dbline 23
	mov R30,R22
	clr R31
	add R30,R10
	adc R31,R11
	ldd R30,z+0
	clr R31
	ldi R24,<_Table
	ldi R25,>_Table
	add R30,R24
	adc R31,R25
	ldd R2,z+0
	clr R3
	ldi R24,255
	ldi R25,0
	sub R24,R2
	sbc R25,R3
	out 0x15,R24
	.dbline 24
	ldi R16,1
	ldi R17,0
	rcall _DelayMs
	.dbline 25
	lsl R20
	.dbline 26
L12:
	.dbline 21
	inc R22
L14:
	.dbline 21
	cpi R22,4
	brlo L11
	.dbline -2
	.dbline 27
;   {PORTA=sel;                  //选通最右边的数码管
;    PORTC=0xff-Table[p[i]];          //送字型码
;    DelayMs(1);                 //显示延时    
;    sel=sel<<1;                 //移位以显示前一位
;   }
; }
L10:
	rcall pop_gset3
	.dbline 0 ; func end
	ret
	.dbsym r sel 20 c
	.dbsym r i 22 c
	.dbsym r p 10 pc
	.dbend
	.dbfunc e Key_Process _Key_Process fV
;              k -> <dead>
;              j -> <dead>
;              i -> <dead>
;              p -> R20,R21
	.even
_Key_Process::
	rcall push_gset1
	mov R20,R16
	mov R21,R17
	.dbline -1
	.dbline 30
; 
; void Key_Process(uchar *p)
; {uchar i,j,k;
	rjmp L17
L16:
	.dbline 31
	.dbline 31
	ldi R16,<_Data
	ldi R17,>_Data
	rcall _Display
	.dbline 31
	ldi R24,1
	sts _Key1_Flag,R24
	.dbline 31
L17:
	.dbline 31
;  while((PINB&0x01)==0) {Display(Data);Key1_Flag=1;}                //处理频率百位，最高5
	sbis 0x16,0
	rjmp L16
	rjmp L20
L19:
	.dbline 32
	.dbline 32
	ldi R16,<_Data
	ldi R17,>_Data
	rcall _Display
	.dbline 32
	ldi R24,1
	sts _Key2_Flag,R24
	.dbline 32
L20:
	.dbline 32
;  while((PINB&0x02)==0) {Display(Data);Key2_Flag=1;}
	sbis 0x16,1
	rjmp L19
	rjmp L23
L22:
	.dbline 33
	.dbline 33
	ldi R16,<_Data
	ldi R17,>_Data
	rcall _Display
	.dbline 33
	ldi R24,1
	sts _Key3_Flag,R24
	.dbline 33
L23:
	.dbline 33
;  while((PINB&0x04)==0) {Display(Data);Key3_Flag=1;}
	sbis 0x16,2
	rjmp L22
	.dbline 34
;  if(Key1_Flag==1)
	lds R24,_Key1_Flag
	cpi R24,1
	brne L25
	.dbline 35
;    {p[3]++;
	.dbline 35
	mov R24,R20
	mov R25,R21
	adiw R24,3
	mov R30,R24
	mov R31,R25
	ldd R24,z+0
	subi R24,255    ; addi 1
	std z+0,R24
	.dbline 36
; 	if(p[3]==10) p[3]=0;
	mov R30,R20
	mov R31,R21
	ldd R24,z+3
	cpi R24,10
	brne L27
	.dbline 36
	clr R2
	mov R30,R20
	mov R31,R21
	std z+3,R2
L27:
	.dbline 37
; 	Key1_Flag=0;}   
	clr R2
	sts _Key1_Flag,R2
	.dbline 37
L25:
	.dbline 38
;  if(Key2_Flag==1)                 //处理频率十位，最高9
	lds R24,_Key2_Flag
	cpi R24,1
	brne L29
	.dbline 39
;     {p[2]++;
	.dbline 39
	mov R24,R20
	mov R25,R21
	adiw R24,2
	mov R30,R24
	mov R31,R25
	ldd R24,z+0
	subi R24,255    ; addi 1
	std z+0,R24
	.dbline 40
; 	 if(p[2]==10) p[2]=0;
	mov R30,R20
	mov R31,R21
	ldd R24,z+2
	cpi R24,10
	brne L31
	.dbline 40
	clr R2
	mov R30,R20
	mov R31,R21
	std z+2,R2
L31:
	.dbline 41
; 	 Key2_Flag=0;}
	clr R2
	sts _Key2_Flag,R2
	.dbline 41
L29:
	.dbline 42
;  if(Key3_Flag==1)                 //处理频率各位，最高9
	lds R24,_Key3_Flag
	cpi R24,1
	brne L33
	.dbline 43
;     {p[1]++;
	.dbline 43
	mov R24,R20
	mov R25,R21
	adiw R24,1
	mov R30,R24
	mov R31,R25
	ldd R24,z+0
	subi R24,255    ; addi 1
	std z+0,R24
	.dbline 44
; 	 if(p[1]==10) p[1]=0;
	mov R30,R20
	mov R31,R21
	ldd R24,z+1
	cpi R24,10
	brne L35
	.dbline 44
	clr R2
	mov R30,R20
	mov R31,R21
	std z+1,R2
L35:
	.dbline 45
	clr R2
	sts _Key3_Flag,R2
	.dbline 45
L33:
	.dbline -2
	.dbline 46
; 	 Key3_Flag=0;}
; }
L15:
	rcall pop_gset1
	.dbline 0 ; func end
	ret
	.dbsym l k 1 c
	.dbsym l j 1 c
	.dbsym l i 1 c
	.dbsym r p 20 pc
	.dbend
	.dbfunc e Set_Process _Set_Process fV
;              i -> R20,R21
;              j -> R20,R21
	.even
_Set_Process::
	rcall push_gset1
	.dbline -1
	.dbline 49
; 
; void Set_Process(void)
; {uint i,j;
	.dbline 50
;  i=Data[0]*1000+Data[1]*100+Data[2]*10+Data[3];
	lds R18,_Data+1
	clr R19
	ldi R16,100
	ldi R17,0
	rcall mpy16s
	mov R2,R16
	mov R3,R17
	lds R18,_Data
	clr R19
	ldi R16,1000
	ldi R17,3
	rcall mpy16s
	mov R20,R16
	mov R21,R17
	add R20,R2
	adc R21,R3
	lds R18,_Data+2
	clr R19
	ldi R16,10
	ldi R17,0
	rcall mpy16s
	add R20,R16
	adc R21,R17
	lds R2,_Data+3
	clr R3
	add R20,R2
	adc R21,R3
	.dbline 51
;  j=500/i;
	ldi R16,500
	ldi R17,1
	mov R18,R20
	mov R19,R21
	rcall div16u
	mov R20,R16
	mov R21,R17
	.dbline 52
;  OCR1AH=j>>8;
	mov R2,R20
	mov R3,R21
	mov R2,R3
	clr R3
	out 0x2b,R2
	.dbline 53
;  OCR1AL=j&0x00ff;
	mov R24,R20
	mov R25,R21
	andi R25,0
	out 0x2a,R24
	.dbline -2
	.dbline 54
; }
L37:
	rcall pop_gset1
	.dbline 0 ; func end
	ret
	.dbsym r i 20 i
	.dbsym r j 20 i
	.dbend
	.dbfunc e Init_IO _Init_IO fV
	.even
_Init_IO::
	.dbline -1
	.dbline 57
; 
; void Init_IO(void)             //初始化I/O口
; {DDRA=0xff;                    //设置A口为推挽1输出
	.dbline 57
	ldi R24,255
	out 0x1a,R24
	.dbline 58
;  PORTA=0xff;
	out 0x1b,R24
	.dbline 59
;  DDRC=0xff;                    //设置C口为推挽1输出             
	out 0x14,R24
	.dbline 60
;  PORTC=0xff;
	out 0x15,R24
	.dbline 61
;  DDRB=0x00;                    //设置B口为三态输入
	clr R2
	out 0x17,R2
	.dbline 62
;  PORTB=0x00;
	out 0x18,R2
	.dbline 63
;  DDRD=0xff;                    //设置D口为推挽1输出
	out 0x11,R24
	.dbline 64
;  PORTD=0xff;    
	out 0x12,R24
	.dbline -2
	.dbline 65
; }
L41:
	.dbline 0 ; func end
	ret
	.dbend
	.dbfunc e Init_Timer1 _Init_Timer1 fV
	.even
_Init_Timer1::
	.dbline -1
	.dbline 68
; 
; void Init_Timer1(void)         //初始化T/C1的输入捕获中断
; {TIMSK=TIMSK|0x10;             //输出比较使能
	.dbline 68
	in R24,0x39
	ori R24,16
	out 0x39,R24
	.dbline 69
;  TCCR1B=0x0a;                  //时钟1                                                               频,输出比较匹配清除定时器值
	ldi R24,10
	out 0x2e,R24
	.dbline 70
;  TCNT1H=0x00;                  //清除定时器值
	clr R2
	out 0x2d,R2
	.dbline 71
;  TCNT1L=0x00;
	out 0x2c,R2
	.dbline 72
;  Set_Process();                //OCR1A,OCR1B置初值
	rcall _Set_Process
	.dbline 73
;  SREG=SREG|0x80;               //全局中断开
	bset 7
	.dbline -2
	.dbline 74
; } 
L42:
	.dbline 0 ; func end
	ret
	.dbend
	.dbfunc e main _main fV
	.even
_main::
	.dbline -1
	.dbline 77
; 
; void main(void)
; {Init_IO();                    //初始化I/O口
	.dbline 77
	rcall _Init_IO
	.dbline 78
;  PORTA=0xff;                   //点亮以测试所有的数码管
	ldi R24,255
	out 0x1b,R24
	.dbline 79
;  PORTC=0x00;   
	clr R2
	out 0x15,R2
	.dbline 80
;  Init_Timer1();                
	rcall _Init_Timer1
	.dbline 81
;  DelayMs(300);                //延时
	ldi R16,300
	ldi R17,1
	rcall _DelayMs
	.dbline 82
;  PORTC=0xff;                   //熄灭所有的数码管
	ldi R24,255
	out 0x15,R24
	rjmp L45
L44:
	.dbline 84
	.dbline 84
	ldi R16,<_Data
	ldi R17,>_Data
	rcall _Key_Process
	.dbline 85
	rcall _Set_Process
	.dbline 86
	ldi R16,<_Data
	ldi R17,>_Data
	rcall _Display
	.dbline 87
L45:
	.dbline 83
	rjmp L44
X2:
	.dbline -2
	.dbline 88
;  while(1)
;  {Key_Process(Data);
;   Set_Process();
;   Display(Data);               //动态扫描显示
;  }
; }
L43:
	.dbline 0 ; func end
	ret
	.dbend
	.area vector(rom, abs)
	.org 12
	rjmp _Compare
	.area text(rom, con, rel)
	.dbfile I:\AVRpractice\BOOK\定时器1\输出比较\Compare.c
	.dbfunc e Compare _Compare fV
	.even
_Compare::
	st -y,R2
	in R2,0x3f
	st -y,R2
	.dbline -1
	.dbline 92
; 
; #pragma interrupt_handler Compare:7
; void Compare(void)
; {PORTD=~PORTD;}
	.dbline 92
	in R2,0x12
	com R2
	out 0x12,R2
	.dbline -2
	.dbline 92
L47:
	ld R2,y+
	out 0x3f,R2
	ld R2,y+
	.dbline 0 ; func end
	reti
	.dbend
	.area bss(ram, con, rel)
	.dbfile I:\AVRpractice\BOOK\定时器1\输出比较\Compare.c
_Key3_Flag::
	.blkb 1
	.dbsym e Key3_Flag _Key3_Flag c
_Key2_Flag::
	.blkb 1
	.dbsym e Key2_Flag _Key2_Flag c
_Key1_Flag::
	.blkb 1
	.dbsym e Key1_Flag _Key1_Flag c
💿 文件大小 2245 K
👤 上传用户 LANCEZHANGL
📂 所属分类单片机开发
🏷️ 相关标签

#AVR #MCU
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -