⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 ac20-1.lst

📁 AVR单片机ATmega16(L)应用实例—红外线感应自动移门
💻 LST
📖 第 1 页 / 共 5 页
字号:
(0320) 		OCR2=wide;
    0646 90200068  LDS	R2,wide
    0648 BC23      OUT	0x23,R2
    0649 9508      RET
(0321) }
(0322) 
(0323) 
(0324) /*==========关门时的加速子函数============*/
(0325) void close_inc_speed(uint sp_pl)
(0326) {
(0327) 	switch (sp_pl)
_close_inc_speed:
  sp_pl                --> R16
    064A 3302      CPI	R16,0x32
    064B E0E0      LDI	R30,0
    064C 071E      CPC	R17,R30
    064D F409      BNE	0x064F
    064E C09F      RJMP	0x06EE
    064F E382      LDI	R24,0x32
    0650 E090      LDI	R25,0
    0651 1780      CP	R24,R16
    0652 0791      CPC	R25,R17
    0653 F40C      BGE	0x0655
    0654 C036      RJMP	0x068B
    0655 3104      CPI	R16,0x14
    0656 E0E0      LDI	R30,0
    0657 071E      CPC	R17,R30
    0658 F409      BNE	0x065A
    0659 C080      RJMP	0x06DA
    065A E184      LDI	R24,0x14
    065B E090      LDI	R25,0
    065C 1780      CP	R24,R16
    065D 0791      CPC	R25,R17
    065E F0B4      BLT	0x0675
    065F 3005      CPI	R16,5
    0660 E0E0      LDI	R30,0
    0661 071E      CPC	R17,R30
    0662 F409      BNE	0x0664
    0663 C06C      RJMP	0x06D0
    0664 E085      LDI	R24,5
    0665 E090      LDI	R25,0
    0666 1780      CP	R24,R16
    0667 0791      CPC	R25,R17
    0668 F034      BLT	0x066F
    0669 3001      CPI	R16,1
    066A E0E0      LDI	R30,0
    066B 071E      CPC	R17,R30
    066C F409      BNE	0x066E
    066D C05D      RJMP	0x06CB
    066E C0AE      RJMP	0x071D
    066F 300A      CPI	R16,0xA
    0670 E0E0      LDI	R30,0
    0671 071E      CPC	R17,R30
    0672 F409      BNE	0x0674
    0673 C061      RJMP	0x06D5
    0674 C0A8      RJMP	0x071D
    0675 3203      CPI	R16,0x23
    0676 E0E0      LDI	R30,0
    0677 071E      CPC	R17,R30
    0678 F409      BNE	0x067A
    0679 C06A      RJMP	0x06E4
    067A E283      LDI	R24,0x23
    067B E090      LDI	R25,0
    067C 1780      CP	R24,R16
    067D 0791      CPC	R25,R17
    067E F034      BLT	0x0685
    067F 3109      CPI	R16,0x19
    0680 E0E0      LDI	R30,0
    0681 071E      CPC	R17,R30
    0682 F409      BNE	0x0684
    0683 C05B      RJMP	0x06DF
    0684 C098      RJMP	0x071D
    0685 320D      CPI	R16,0x2D
    0686 E0E0      LDI	R30,0
    0687 071E      CPC	R17,R30
    0688 F409      BNE	0x068A
    0689 C05F      RJMP	0x06E9
    068A C092      RJMP	0x071D
    068B 3505      CPI	R16,0x55
    068C E0E0      LDI	R30,0
    068D 071E      CPC	R17,R30
    068E F409      BNE	0x0690
    068F C072      RJMP	0x0702
    0690 E585      LDI	R24,0x55
    0691 E090      LDI	R25,0
    0692 1780      CP	R24,R16
    0693 0791      CPC	R25,R17
    0694 F0B4      BLT	0x06AB
    0695 3401      CPI	R16,0x41
    0696 E0E0      LDI	R30,0
    0697 071E      CPC	R17,R30
    0698 F409      BNE	0x069A
    0699 C05E      RJMP	0x06F8
    069A E481      LDI	R24,0x41
    069B E090      LDI	R25,0
    069C 1780      CP	R24,R16
    069D 0791      CPC	R25,R17
    069E F034      BLT	0x06A5
    069F 330C      CPI	R16,0x3C
    06A0 E0E0      LDI	R30,0
    06A1 071E      CPC	R17,R30
    06A2 F409      BNE	0x06A4
    06A3 C04F      RJMP	0x06F3
    06A4 C078      RJMP	0x071D
    06A5 340B      CPI	R16,0x4B
    06A6 E0E0      LDI	R30,0
    06A7 071E      CPC	R17,R30
    06A8 F409      BNE	0x06AA
    06A9 C053      RJMP	0x06FD
    06AA C072      RJMP	0x071D
    06AB 3604      CPI	R16,0x64
    06AC E0E0      LDI	R30,0
    06AD 071E      CPC	R17,R30
    06AE F409      BNE	0x06B0
    06AF C05C      RJMP	0x070C
    06B0 E684      LDI	R24,0x64
    06B1 E090      LDI	R25,0
    06B2 1780      CP	R24,R16
    06B3 0791      CPC	R25,R17
    06B4 F034      BLT	0x06BB
    06B5 350A      CPI	R16,0x5A
    06B6 E0E0      LDI	R30,0
    06B7 071E      CPC	R17,R30
    06B8 F409      BNE	0x06BA
    06B9 C04D      RJMP	0x0707
    06BA C062      RJMP	0x071D
    06BB 3609      CPI	R16,0x69
    06BC E0E0      LDI	R30,0
    06BD 071E      CPC	R17,R30
    06BE F409      BNE	0x06C0
    06BF C051      RJMP	0x0711
    06C0 3609      CPI	R16,0x69
    06C1 E0E0      LDI	R30,0
    06C2 071E      CPC	R17,R30
    06C3 F40C      BGE	0x06C5
    06C4 C058      RJMP	0x071D
    06C5 3703      CPI	R16,0x73
    06C6 E0E0      LDI	R30,0
    06C7 071E      CPC	R17,R30
    06C8 F409      BNE	0x06CA
    06C9 C04C      RJMP	0x0716
    06CA C052      RJMP	0x071D
(0328) 		{
(0329) 		case 1:wide=close_inc_tab[0];break;	
    06CB 9020007E  LDS	R2,close_inc_tab
    06CD 92200068  STS	wide,R2
    06CF C04D      RJMP	0x071D
(0330) 		case 5:wide=close_inc_tab[1];break;		
    06D0 9020007F  LDS	R2,close_inc_tab+1
    06D2 92200068  STS	wide,R2
    06D4 C048      RJMP	0x071D
(0331) 		case 10:wide=close_inc_tab[2];break;
    06D5 90200080  LDS	R2,close_inc_tab+2
    06D7 92200068  STS	wide,R2
    06D9 C043      RJMP	0x071D
(0332) 		case 20:wide=close_inc_tab[3];break;	
    06DA 90200081  LDS	R2,close_inc_tab+3
    06DC 92200068  STS	wide,R2
    06DE C03E      RJMP	0x071D
(0333) 		case 25:wide=close_inc_tab[4];break;		
    06DF 90200082  LDS	R2,0x82
    06E1 92200068  STS	wide,R2
    06E3 C039      RJMP	0x071D
(0334) 		case 35:wide=close_inc_tab[5];break;
    06E4 90200083  LDS	R2,0x83
    06E6 92200068  STS	wide,R2
    06E8 C034      RJMP	0x071D
(0335) 		case 45:wide=close_inc_tab[6];break;	
    06E9 90200084  LDS	R2,0x84
    06EB 92200068  STS	wide,R2
    06ED C02F      RJMP	0x071D
(0336) 		case 50:wide=close_inc_tab[7];break;
    06EE 90200085  LDS	R2,0x85
    06F0 92200068  STS	wide,R2
    06F2 C02A      RJMP	0x071D
(0337) 		case 60:wide=close_inc_tab[8];break;
    06F3 90200086  LDS	R2,0x86
    06F5 92200068  STS	wide,R2
    06F7 C025      RJMP	0x071D
(0338) 		case 65:wide=close_inc_tab[9];break;	
    06F8 90200087  LDS	R2,0x87
    06FA 92200068  STS	wide,R2
    06FC C020      RJMP	0x071D
(0339) 		case 75:wide=close_inc_tab[10];break;		
    06FD 90200088  LDS	R2,0x88
    06FF 92200068  STS	wide,R2
    0701 C01B      RJMP	0x071D
(0340) 		case 85:wide=close_inc_tab[11];break;
    0702 90200089  LDS	R2,0x89
    0704 92200068  STS	wide,R2
    0706 C016      RJMP	0x071D
(0341) 		case 90:wide=close_inc_tab[12];break;	
    0707 9020008A  LDS	R2,0x8A
    0709 92200068  STS	wide,R2
    070B C011      RJMP	0x071D
(0342) 		case 100:wide=close_inc_tab[13];break;	
    070C 9020008B  LDS	R2,0x8B
    070E 92200068  STS	wide,R2
    0710 C00C      RJMP	0x071D
(0343) 		case 105:wide=close_inc_tab[14];break;	
    0711 9020008C  LDS	R2,0x8C
    0713 92200068  STS	wide,R2
    0715 C007      RJMP	0x071D
(0344) 		case 115:wide=close_inc_tab[15];inc_dec_flag=0;break;		
    0716 9020008D  LDS	R2,0x8D
    0718 92200068  STS	wide,R2
    071A 2422      CLR	R2
    071B 9220006B  STS	inc_dec_flag,R2
(0345) 		default:break;
(0346) 		}
(0347) 		OCR2=wide;
    071D 90200068  LDS	R2,wide
    071F BC23      OUT	0x23,R2
    0720 9508      RET
(0348) }
(0349) 
(0350) 
(0351) /*==========关门时的减速子函数============*/
(0352) void close_dec_speed(uint sp_pl)
(0353) {
(0354) 	switch (sp_pl)
_close_dec_speed:
  sp_pl                --> R16
    0721 3500      CPI	R16,0x50
    0722 E0E0      LDI	R30,0
    0723 071E      CPC	R17,R30
    0724 F409      BNE	0x0726
    0725 C093      RJMP	0x07B9
    0726 E580      LDI	R24,0x50
    0727 E090      LDI	R25,0
    0728 1780      CP	R24,R16
    0729 0791      CPC	R25,R17
    072A F40C      BGE	0x072C
    072B C030      RJMP	0x075C
    072C 310E      CPI	R16,0x1E
    072D E0E0      LDI	R30,0
    072E 071E      CPC	R17,R30
    072F F409      BNE	0x0731
    0730 C074      RJMP	0x07A5
    0731 E18E      LDI	R24,0x1E
    0732 E090      LDI	R25,0
    0733 1780      CP	R24,R16
    0734 0791      CPC	R25,R17
    0735 F084      BLT	0x0746
    0736 3001      CPI	R16,1
    0737 E0E0      LDI	R30,0
    0738 071E      CPC	R17,R30
    0739 F409      BNE	0x073B
    073A C060      RJMP	0x079B
    073B 3001      CPI	R16,1
    073C E0E0      LDI	R30,0
    073D 071E      CPC	R17,R30
    073E F40C      BGE	0x0740
    073F C0AD      RJMP	0x07ED
    0740 300F      CPI	R16,0xF
    0741 E0E0      LDI	R30,0
    0742 071E      CPC	R17,R30
    0743 F409      BNE	0x0745
    0744 C05B      RJMP	0x07A0
    0745 C0A7      RJMP	0x07ED
    0746 330C      CPI	R16,0x3C
    0747 E0E0      LDI	R30,0
    0748 071E      CPC	R17,R30
    0749 F409      BNE	0x074B
    074A C064      RJMP	0x07AF
    074B E38C      LDI	R24,0x3C
    074C E090      LDI	R25,0
    074D 1780      CP	R24,R16
    074E 0791      CPC	R25,R17
    074F F034      BLT	0x0756
    0750 320D      CPI	R16,0x2D
    0751 E0E0      LDI	R30,0
    0752 071E      CPC	R17,R30
    0753 F409      BNE	0x0755
    0754 C055      RJMP	0x07AA
    0755 C097      RJMP	0x07ED
    0756 3406      CPI	R16,0x46
    0757 E0E0      LDI	R30,0
    0758 071E      CPC	R17,R30
    0759 F409      BNE	0x075B
    075A C059      RJMP	0x07B4
    075B C091      RJMP	0x07ED
    075C 3609      CPI	R16,0x69
    075D E0E0      LDI	R30,0
    075E 071E      CPC	R17,R30
    075F F409      BNE	0x0761
    0760 C067      RJMP	0x07C8
    0761 E689      LDI	R24,0x69
    0762 E090      LDI	R25,0
    0763 1780      CP	R24,R16
    0764 0791      CPC	R25,R17
    0765 F084      BLT	0x0776
    0766 350A      CPI	R16,0x5A
    0767 E0E0      LDI	R30,0
    0768 071E      CPC	R17,R30
    0769 F409      BNE	0x076B
    076A C053      RJMP	0x07BE
    076B 350A      CPI	R16,0x5A
    076C E0E0      LDI	R30,0
    076D 071E      CPC	R17,R30
    076E F40C      BGE	0x0770
    076F C07D      RJMP	0x07ED
    0770 3604      CPI	R16,0x64
    0771 E0E0      LDI	R30,0
    0772 071E      CPC	R17,R30
    0773 F409      BNE	0x0775
    0774 C04E      RJMP	0x07C3
    0775 C077      RJMP	0x07ED
    0776 3704      CPI	R16,0x74
    0777 E0E0      LDI	R30,0
    0778 071E      CPC	R17,R30
    0779 F409      BNE	0x077B
    077A C05C      RJMP	0x07D7
    077B 3707      CPI	R16,0x77
    077C E0E0      LDI	R30,0
    077D 071E      CPC	R17,R30
    077E F409      BNE	0x0780
    077F C05C      RJMP	0x07DC
    0780 E787      LDI	R24,0x77
    0781 E090      LDI	R25,0
    0782 1780      CP	R24,R16
    0783 0791      CPC	R25,R17
    0784 F05C      BLT	0x0790
    0785 360E      CPI	R16,0x6E
    0786 E0E0      LDI	R30,0
    0787 071E      CPC	R17,R30
    0788 F409      BNE	0x078A
    0789 C043      RJMP	0x07CD
    078A 3701      CPI	R16,0x71
    078B E0E0      LDI	R30,0
    078C 071E      CPC	R17,R30
    078D F409      BNE	0x078F
    078E C043      RJMP	0x07D2
    078F C05D      RJMP	0x07ED
    0790 370A      CPI	R16,0x7A
    0791 E0E0      LDI	R30,0
    0792 071E      CPC	R17,R30
    0793 F409      BNE	0x0795
    0794 C04C      RJMP	0x07E1
    0795 370D      CPI	R16,0x7D
    0796 E0E0      LDI	R30,0
    0797 071E      CPC	R17,R30
    0798 F409      BNE	0x079A
    0799 C04C      RJMP	0x07E6
    079A C052      RJMP	0x07ED
(0355) 		{
(0356) 		case 1:wide=close_dec_tab[15];break;	
    079B 9020007D  LDS	R2,0x7D
    079D 92200068  STS	wide,R2
    079F C04D      RJMP	0x07ED
(0357) 		case 15:wide=close_dec_tab[14];break;		
    07A0 9020007C  LDS	R2,0x7C
    07A2 92200068  STS	wide,R2
    07A4 C048      RJMP	0x07ED
(0358) 		case 30:wide=close_dec_tab[13];break;
    07A5 9020007B  LDS	R2,0x7B
    07A7 92200068  STS	wide,R2
    07A9 C043      RJMP	0x07ED
(0359) 		case 45:wide=close_dec_tab[12];break;	
    07AA 9020007A  LDS	R2,0x7A
    07AC 92200068  STS	wide,R2
    07AE C03E      RJMP	0x07ED
(0360) 		case 60:wide=close_dec_tab[11];break;		
    07AF 90200079  LDS	R2,0x79
    07B1 92200068  STS	wide,R2
    07B3 C039      RJMP	0x07ED
(0361) 		case 70:wide=close_dec_tab[10];break;
    07B4 90200078  LDS	R2,0x78
    07B6 92200068  STS	wide,R2
    07B8 C034      RJMP	0x07ED
(0362) 		case 80:wide=close_dec_tab[9];break;	
    07B9 90200077  LDS	R2,0x77
    07BB 92200068  STS	wide,R2
    07BD C02F      RJMP	0x07ED
(0363) 		case 90:wide=close_dec_tab[8];break;
    07BE 90200076  LDS	R2,0x76
    07C0 92200068  STS	wide,R2
    07C2 C02A      RJMP	0x07ED
(0364) 		case 100:wide=close_dec_tab[7];break;
    07C3 90200075  LDS	R2,0x75
    07C5 92200068  STS	wide,R2
    07C7 C025      RJMP	0x07ED
(0365) 		case 105:wide=close_dec_tab[6];break;	
    07C8 90200074  LDS	R2,0x74
    07CA 92200068  STS	wide,R2
    07CC C020      RJMP	0x07ED
(0366) 		case 110:wide=close_dec_tab[5];break;		
    07CD 90200073  LDS	R2,0x73
    07CF 92200068  STS	wide,R2
    07D1 C01B      RJMP	0x07ED
(0367) 		case 113:wide=close_dec_

⌨️ 快捷键说明

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