新闻中心

EEPW首页 > 嵌入式系统 > 设计应用 > 用51单片机模拟空调遥控开关-汇编程序

用51单片机模拟空调遥控开关-汇编程序

作者: 时间:2016-11-29 来源:网络 收藏
;***************************************
;遥控4按键模拟 15F104E ;内部振荡11.0592M;按1就P3.0低电平,按2就P3.1低电平 按3就P3.2低电平  按4就P3.3低电平 ;蜂呜器提示, ;自学习功能,按住要学习的键2秒,;蜂呜器长响,学习成功停止响;***************************YHM EQU 2fh;用户码SET0  EQU 30H;SET1  EQU 31H;SET2  EQU 32H;SET3  EQU 33H;;;;;;;;;;;;;;;;;;;;;;;;;;IAP_DATA EQU 0C2HIAP_ADDRH EQU 0C3HIAP_ADDRL EQU 0C4HIAP_CMD  EQU 0C5HIAP_TRIG EQU 0C6HIAP_CONTR EQU 0C7HENABLE_IAP EQU 83H ;系统工作时钟<12MHZ时;************************IR_KEY BIT P3.5;红外beep bit p3.3MA1 EQU 7BH ;MA2 EQU 7CH ;MA3 EQU 7DH MA4 EQU 7EH ;RED_32 EQU 7FH;;************ORG  0H ;程序开始AJMP STARTORG  30H;*************; 单片机初始化START:mov p3,#0ffh MOV DPTR, #0call EEPROMRmov 30h,ainc dptrcall EEPROMRmov 31h,ainc dptrcall EEPROMRmov 32h,ainc dptrcall EEPROMRmov 33h,aMOV DPTR, #200hcall EEPROMRmov 2fh,a;********************************MAIN:orl p3,#17hmov a,p3anl a,#17hcjne a,#17h,d2jmp d4d2:call delay2Sorl p3,#17hmov a,p3anl a,#17hcjne a,#17h,d3jmp d4d3:cpl aanl a,#17hmov 20h,aclr beepd4:jb IR_KEY,MAINACALL IRmov a,20hjnz d4AJMP MAIN ;返回;***************************IR:PUSH ACCPUSH PSWLCALL   DELAY1MSLCALL   DELAY1MSLCALL   DELAY1MSLCALL   DELAY1MSJB IR_KEY,IR_OUT;;高电平退出JNB   IR_KEY,$;等 IR 变为高电平LCALL DELAY2MS380USLCALL DELAY2MS380USJB     IR_KEY,IR_OUT;是否低电平MOV  R0,#MA1;起始内存为7CH,共4个内存JJJ:MOV  R3,#8  ;8位BBB:JNB  IR_KEY,$;等 IR 变为高电平;高电平后开始计数,计数值1 高电平1MOV    R2,#0  ;1MS计数CCC:LCALL   DELAY1MSJNB     IR_KEY,DDD ;低电平跳出计数INC     R2;;高电平继续计数CJNE    R2,#3,CCC;防止计数超时AJMP IR_OUTDDD:CLR ACLR CSUBB A,R2 ;MOV     A,@R0RRC     AMOV     @R0,A  ;处理完一位DJNZ   R3,BBB;8位数据INC     R0;换下一个内存CJNE    R0,#RED_32,JJJ  ;写完个4内存;4个8位码存入MA1~MA4中;-------------------------------------MOV  A,MA4CPL  ACJNE A,MA3,IR_OUTjbc 0,s30jbc 1,s31jbc 2,s32jbc 4,s33MOV  A,MA2;CJNE A,YHM,IR_OUT;CALL IR_GOTOIR_OUT:POP     PSWPOP     ACCRETs30:mov set0,MA3call bao0call bao1setb beepjmp IR_OUTs31:mov set1,MA3call bao0call bao1setb beepjmp IR_OUTs32:mov set2,MA3call bao0call bao1setb beepjmp IR_OUTs33:mov set3,MA3call bao0call bao1setb beepjmp IR_OUT;----------------IR_GOTO:mov a,ma3
				
            
                
			
							
上一页 1 2 下一页

评论


技术专区

关闭