當前位置:首頁 > 單片機 > 單片機
[導讀] STC89C52學習型遙控器,可存八個紅外遙控信息,只要再把按鍵用定時器中斷2完成就可以用于商業(yè)生產(chǎn).RXINBITP2.0TXZAIBITP2.2TXOUTBITP2.1KEY_SIGNBIT20H;為0按鍵錯誤,為1按鍵正確RXTX_SIGNBIT21H;為0是

STC89C52學習型遙控器,可存八個紅外遙控信息,只要再把按鍵用定時器中斷2完成就可以用于商業(yè)生產(chǎn).

RXINBITP2.0
TXZAIBITP2.2
TXOUTBITP2.1
KEY_SIGNBIT20H;為0按鍵錯誤,為1按鍵正確

RXTX_SIGNBIT21H;為0是為發(fā)射狀態(tài),為1是為接收狀態(tài)

ISP_DATADATA0E2H;ISP功能寄存器定義
ISP_ADDRHDATA0E3H
ISP_ADDRLDATA0E4H
ISP_CMDDATA0E5H
ISP_TRIGDATA0E6H
ISP_CONTRDATA0E7H

ISP_CMD_NOEQU0;操作數(shù)
ISP_CMD_READEQU1
ISP_CMD_PROGRAMEQU2
ISP_CMD_ERASEEQU3

WAIT_TIMEEQU1;等待時間

ZHILEQU30H
ZHIHEQU31H
GESHUEQU32H
JISHUEQU33H
KEY_WORDEQU34H
KEY_VALUEEQU35H
ADDRHEQU36H
ADDRLEQU37H
TX_GESHUEQU38H


ORG0000H
LJMPSTART
ORG000BH
LJMPT0IN
ORG001BH
LJMPT1IN



ORG0100H
START: MOV SP,#10H
CLRRXTX_SIGN
LJMPKEY_MAIN


KEY_MAIN:LCALLSCAN_KEY;檢測有沒有單個按鍵按下
MOV A,KEY_WORD
CJNEA,#00H,NEXT1
LJMPKEY_MAIN
NEXT1:JNBKEY_SIGN,KEY_MAIN
MOV KEY_VALUE,A

LCALLRE_DELAY;消抖時間20ms

LCALLSCAN_KEY;是否依然是按下的
MOV A,KEY_WORD
CJNEA,#00H,NEXT2
LJMPKEY_MAIN
NEXT2:JNBKEY_SIGN,KEY_MAIN
CJNEA,KEY_VALUE,KEY_MAIN

RELEASE:LCALLSCAN_KEY;查看是否放開按鍵了
MOV A,KEY_WORD
CJNEA,#00H,RELEASE



MOV DPTR,#TAB;執(zhí)行相應的程式
CLRC
MOV A,KEY_VALUE
ADDA,KEY_VALUE
JMP@A+DPTR

TAB:AJMPKEY_0
AJMPKEY_1
AJMPKEY_2
AJMPKEY_3
AJMPKEY_4
AJMPKEY_5
AJMPKEY_6
AJMPKEY_7
AJMPKEY_8
AJMPKEY_9
AJMPKEY_10
AJMPKEY_11
AJMPKEY_12
AJMPKEY_13
AJMPKEY_14
AJMPKEY_15
AJMPKEY_16

KEY_0:LJMPKEY_MAIN;無效的按健值

KEY_1:JNBRXTX_SIGN,T1RX;接收發(fā)送鍵設定鍵,P1燈亮為接收存儲狀態(tài),燈滅是為發(fā)射狀態(tài)
T1TX:CLRRXTX_SIGN
MOV P1,#0FFH
LJMPKEY_MAIN
T1RX:SETBRXTX_SIGN
MOV P1,#00H
LJMPKEY_MAIN



KEY_2: MOV ADDRH,#20H
MOV ADDRL,#00H
JBRXTX_SIGN,KEY2_RX
KEY2_TX:LJMPTX_START
KEY2_RX:LJMPRX_START


KEY_3: MOV ADDRH,#22H
MOV ADDRL,#00H
JBRXTX_SIGN,KEY3_RX
KEY3_TX:LJMPTX_START
KEY3_RX:LJMPRX_START


KEY_4: MOV ADDRH,#24H
MOV ADDRL,#00H
JBRXTX_SIGN,KEY4_RX
KEY4_TX:LJMPTX_START
KEY4_RX:LJMPRX_START


KEY_5: MOV ADDRH,#26H
MOV ADDRL,#00H
JBRXTX_SIGN,KEY5_RX
KEY5_TX:LJMPTX_START
KEY5_RX:LJMPRX_START


KEY_6: MOV ADDRH,#28H
MOV ADDRL,#00H
JBRXTX_SIGN,KEY6_RX
KEY6_TX:LJMPTX_START
KEY6_RX:LJMPRX_START


KEY_7: MOV ADDRH,#2AH
MOV ADDRL,#00H
JBRXTX_SIGN,KEY7_RX
KEY7_TX:LJMPTX_START
KEY7_RX:LJMPRX_START


KEY_8: MOV ADDRH,#2CH
MOV ADDRL,#00H
JBRXTX_SIGN,KEY8_RX
KEY8_TX:LJMPTX_START
KEY8_RX:LJMPRX_START


KEY_9: MOV ADDRH,#2EH
MOV ADDRL,#00H
JBRXTX_SIGN,KEY9_RX
KEY9_TX:LJMPTX_START
KEY9_RX:LJMPRX_START



KEY_10: MOV ADDRH,#2EH
MOV ADDRL,#00H
JBRXTX_SIGN,KEY10_RX
KEY10_TX:LJMPTX_START
KEY10_RX:LJMPRX_START


KEY_11: MOV ADDRH,#2EH
MOV ADDRL,#00H
JBRXTX_SIGN,KEY11_RX
KEY11_TX:LJMPTX_START
KEY11_RX:LJMPRX_START



KEY_12: MOV ADDRH,#2EH
MOV ADDRL,#00H
JBRXTX_SIGN,KEY12_RX
KEY12_TX:LJMPTX_START
KEY12_RX:LJMPRX_START


KEY_13: MOV ADDRH,#2EH
MOV ADDRL,#00H
JBRXTX_SIGN,KEY13_RX
KEY13_TX:LJMPTX_START
KEY13_RX:LJMPRX_START


KEY_14: MOV ADDRH,#2EH
MOV ADDRL,#00H
JBRXTX_SIGN,KEY14_RX
KEY14_TX:LJMPTX_START
KEY14_RX:LJMPRX_START


KEY_15: MOV ADDRH,#2EH
MOV ADDRL,#00H
JBRXTX_SIGN,KEY15_RX
KEY15_TX:LJMPTX_START
KEY15_RX:LJMPRX_START


KEY_16: MOV ADDRH,#2EH
MOV ADDRL,#00H
JBRXTX_SIGN,KEY16_RX
KEY16_TX:LJMPTX_START
KEY16_RX:LJMPRX_START



SCAN_KEY:CLRKEY_SIGN
MOV KEY_WORD,#00H


KEY1: MOV P3,#11111110B;第一行
JBP3.4,KEY2
JBKEY_SIGN,KEYWRONG1
MOV KEY_WORD,#1
SETBKEY_SIGN
KEY2:JBP3.5,KEY3
JBKEY_SIGN,KEYWRONG1
MOV KEY_WORD,#2
SETBKEY_SIGN
KEY3:JBP3.6,KEY4
JBKEY_SIGN,KEYWRONG1
MOV KEY_WORD,#3
SETBKEY_SIGN
KEY4:JBP3.7,KEY5
JBKEY_SIGN,KEYWRONG1
MOV KEY_WORD,#4
SETBKEY_SIGN
LJMPKEY5
KEYWRONG1:LJMPKEYWRONG

KEY5: MOV P3,#11111101B;第二行
JBP3.4,KEY6
JBKEY_SIGN,KEYWRONG2
MOV KEY_WORD,#5
SETBKEY_SIGN
KEY6:JBP3.5,KEY7
JBKEY_SIGN,KEYWRONG2
MOV KEY_WORD,#6
SETBKEY_SIGN
KEY7:JBP3.6,KEY8
JBKEY_SIGN,KEYWRONG2
MOV KEY_WORD,#7
SETBKEY_SIGN
KEY8:JBP3.7,KEY9
JBKEY_SIGN,KEYWRONG2
MOV KEY_WORD,#8
SETBKEY_SIGN
LJMPKEY9

KEYWRONG2:LJMPKEYWRONG

KEY9: MOV P3,#11111011B;第三行
JBP3.4,KEY10
JBKEY_SIGN,KEYWRONG3
MOV KEY_WORD,#9
SETBKEY_SIGN
KEY10:JBP3.5,KEY11
JBKEY_SIGN,KEYWRONG3
MOV KEY_WORD,#10
SETBKEY_SIGN
KEY11:JBP3.6,KEY12
JBKEY_SIGN,KEYWRONG3
MOV KEY_WORD,#11
SETBKEY_SIGN
KEY12:JBP3.7,KEY13
JBKEY_SIGN,KEYWRONG3
MOV KEY_WORD,#12
SETBKEY_SIGN
LJMPKEY13

KEYWRONG3:LJMPKEYWRONG

KEY13: MOV P3,#11110111B;第四行
JBP3.4,KEY14
JBKEY_SIGN,KEYWRONG4
MOV KEY_WORD,#13
SETBKEY_SIGN
KEY14:JBP3.5,KEY15
JBKEY_SIGN,KEYWRONG4
MOV KEY_WORD,#14
SETBKEY_SIGN
KEY15:JBP3.6,KEY16
JBKEY_SIGN,KEYWRONG4
MOV KEY_WORD,#15
SETBKEY_SIGN
KEY16:JBP3.7,SCAN_END
JBKEY_SIGN,KEYWRONG4
MOV KEY_WORD,#16
SETBKEY_SIGN
LJMPSCAN_END

KEYWRONG4:LJMPKEYWRONG

KEYWRONG:CLRKEY_SIGN
SCAN_END:RET



RE_DELAY: MOV R7,#5
DE2: MOV R6,#10
DE1: MOV R5,#200
DJNZR5,$
DJNZR6,DE1
DJNZR7,DE2
RET


RX_START:CLRP2.4;接收紅外信號,存入外部擴展寄存器0~256
CLRP2.6
CLRP2.7
CLRP2.2
CLRTXOUT
MOV R1,#00H
MOV R0,#00H
MOV TMOD,#00010001B
MOV TH0,#00H
MOV TL0,#00H
MOV TH1,#00H
MOV TL1,#00H
CLRET0
CLRET1
CLREA
CLRTR0
CLRTR1
LJMPRX_MAIN

RX_MAIN: MOV R0,#00H
JBRXIN,$
SETBTR0

JUDGE1:JBTF0,RXEND
JNBRXIN,JUDGE1
CLRTR0
SETBTR1
MOV A,TL0
MOV X@R0,A
INCR0
MOV A,TH0
MOV X@R0,A
INCR0
MOV TL0,#00H
MOV TH0,#00H
INCR1
JUDGE2:JBTF1,RXEND
JBRXIN,JUDGE2
CLRTR1
SETBTR0
MOV A,TL1
MOV X@R0,A
INCR0
MOV A,TH1
MOV X@R0,A
INCR0
MOV TL1,#00H
MOV TH1,#00H
INCR1
AJMPJUDGE1

RXEND:CLRTR0
CLRTR1
CLRTF0
CLRTF1
MOV TL0,#00H
MOV TH0,#00H
MOV TL1,#00H
MOV TH1,#00H
MOV GESHU,R1




MOV R1,GESHU;取反轉(zhuǎn)換重新存入外部擴展寄存器
MOV R0,#00H
LOOP_CPL: MOV XA,@R0
CPLA
MOV X@R0,A
INCR0
MOV XA,@R0
CPLA
MOV X@R0,A
INCR0
DJNZR1,LOOP_CPL
LJMPISP_STORE

ISP_STORE:LCALLISP_ERASE



MOV ISP_DATA,GESHU;將個數(shù)輸入到ISP_EEPROM的第一位
MOV ISP_ADDRH,ADDRH
MOV ISP_ADDRL,ADDRL
CLREA
MOV ISP_CONTR,#WAIT_TIME
ORLISP_CONTR,#10000000B
MOV ISP_CMD,#ISP_CMD_PROGRAM
MOV ISP_TRIG,#46H
MOV ISP_TRIG,#0B9H
NOP


MOV R1,GESHU
MOV R0,#00H
LOOP_WRITE:LCALLBYTE_WRITE;將擴展寄存器中的計時值依次放入ISP_EEPROM第二位開始的存儲器中
INCR0
LCALLBYTE_WRITE
INCR0
DJNZR1,LOOP_WRITE

MOV ISP_CMD,#00H;ISP指令清零,防止誤觸發(fā)
MOV ISP_TRIG,#00H
MOV ISP_ADDRH,#00H
MOV ISP_ADDRL,#00H
MOV p1,geshu

LJMPKEY_MAIN






BYTE_WRITE: MOV XA,@R0
MOV ISP_DATA,A
MOV ISP_ADDRH,ADDRH
INCR0
MOV ISP_ADDRL,R0
DECR0
CLREA
MOV ISP_CONTR,#WAIT_TIME
ORLISP_CONTR,#10000000B
MOV ISP_CMD,#ISP_CMD_PROGRAM
MOV ISP_TRIG,#46H
MOV ISP_TRIG,#0B9H
NOP
RET

ISP_ERASE: MOV ISP_ADDRH,ADDRH
MOV ISP_ADDRL,ADDRL
CLREA
MOV ISP_CONTR,#WAIT_TIME
ORLISP_CONTR,#10000000B
MOV ISP_CMD,#ISP_CMD_ERASE
MOV ISP_TRIG,#46H
MOV ISP_TRIG,#0B9H
NOP
RET






TX_START: MOV ISP_ADDRH,ADDRH;取出第一位的個數(shù)
MOV ISP_ADDRL,ADDRL
CLREA
MOV ISP_CONTR,#WAIT_TIME
ORLISP_CONTR,#10000000B
MOV ISP_CMD,#ISP_CMD_READ
MOV ISP_TRIG,#46H
MOV ISP_TRIG,#0B9H
NOP
MOV ISP_CMD,#00H;ISP指令清零,防止誤觸發(fā)
MOV ISP_TRIG,#00H
MOV ISP_ADDRH,#00H
MOV ISP_ADDRL,#00H

MOV A,ISP_DATA;為0FF則是錯誤的,回去,不為0FF則繼續(xù)
CJNEA,#0FFH,ISP_READ
LJMPKEY_MAIN


ISP_READ: MOV GESHU,ISP_DATA
MOV R1,GESHU
MOV R0,#00H
LOOP_READ:LCALLBYTE_READ
INCR0
LCALLBYTE_READ
INCR0
DJNZR1,LOOP_READ
LJMPTX_EXROM


BYTE_READ:INCR0
MOV ISP_ADDRH,ADDRH
MOV ISP_ADDRL,R0
DECR0
CLREA
MOV ISP_CONTR,#WAIT_TIME
ORLISP_CONTR,#10000000B
MOV ISP_CMD,#ISP_CMD_READ
MOV ISP_TRIG,#46H
MOV ISP_TRIG,#0B9H
NOP
MOV A,ISP_DATA
MOV X@R0,A
RET





TX_EXROM: MOV TMOD,#00010010B
MOV TH0,#0F4H
MOV TL0,#0F4H
MOV R1,GESHU
MOV R0,#00H
MOV XA,@R0
MOV TL1,A
INCR0
MOV XA,@R0
MOV TH1,A
INCR0
DECR1
MOV XA,@R0
MOV ZHIL,A
INCR0
MOV XA,@R0
MOV ZHIH,A
INCR0
DECR1

SETBET1
SETBET0
SETBEA
SETBTR1
SETBTR0
CLRTXOUT

MAIN2:CJNER1,#00H,MAIN2
CLRTXOUT
MOV p1,#55h
LJMPKEY_MAIN


T0IN:CPLTXZAI
RETI

T1IN: MOV TL1,ZHIL
MOV TH1,ZHIH
JBTR0,NEXTT1
SETBTR0
LJMPNEXTT
NEXTT1:CLRTR0
CLRTXZAI

NEXTT:CPLTXOUT
MOV XA,@R0
MOV ZHIL,A
INCR0
MOV XA,@R0
MOV ZHIH,A
INCR0
DJNZR1,OUTTI
CLRTR1
CLRTR0
CLRTXZAI
CLRTXOUT
OUTTI:RETI

DELAYXMS: MOV R7,#255
DEL1: MOV R6,#4
DEL2: MOV R5,#5
DJNZR5,$
DJNZR6,DEL2
DJNZR7,DEL1
RET

DELAYX2MS: MOV R7,#255
DEL12: MOV R6,#50
DEL22: MOV R5,#50
DJNZR5,$
DJNZR6,DEL22
DJNZR7,DEL12
RET


END

本站聲明: 本文章由作者或相關機構授權發(fā)布,目的在于傳遞更多信息,并不代表本站贊同其觀點,本站亦不保證或承諾內(nèi)容真實性等。需要轉(zhuǎn)載請聯(lián)系該專欄作者,如若文章內(nèi)容侵犯您的權益,請及時聯(lián)系本站刪除。
換一批
延伸閱讀

9月2日消息,不造車的華為或?qū)⒋呱龈蟮莫毥谦F公司,隨著阿維塔和賽力斯的入局,華為引望愈發(fā)顯得引人矚目。

關鍵字: 阿維塔 塞力斯 華為

加利福尼亞州圣克拉拉縣2024年8月30日 /美通社/ -- 數(shù)字化轉(zhuǎn)型技術解決方案公司Trianz今天宣布,該公司與Amazon Web Services (AWS)簽訂了...

關鍵字: AWS AN BSP 數(shù)字化

倫敦2024年8月29日 /美通社/ -- 英國汽車技術公司SODA.Auto推出其旗艦產(chǎn)品SODA V,這是全球首款涵蓋汽車工程師從創(chuàng)意到認證的所有需求的工具,可用于創(chuàng)建軟件定義汽車。 SODA V工具的開發(fā)耗時1.5...

關鍵字: 汽車 人工智能 智能驅(qū)動 BSP

北京2024年8月28日 /美通社/ -- 越來越多用戶希望企業(yè)業(yè)務能7×24不間斷運行,同時企業(yè)卻面臨越來越多業(yè)務中斷的風險,如企業(yè)系統(tǒng)復雜性的增加,頻繁的功能更新和發(fā)布等。如何確保業(yè)務連續(xù)性,提升韌性,成...

關鍵字: 亞馬遜 解密 控制平面 BSP

8月30日消息,據(jù)媒體報道,騰訊和網(wǎng)易近期正在縮減他們對日本游戲市場的投資。

關鍵字: 騰訊 編碼器 CPU

8月28日消息,今天上午,2024中國國際大數(shù)據(jù)產(chǎn)業(yè)博覽會開幕式在貴陽舉行,華為董事、質(zhì)量流程IT總裁陶景文發(fā)表了演講。

關鍵字: 華為 12nm EDA 半導體

8月28日消息,在2024中國國際大數(shù)據(jù)產(chǎn)業(yè)博覽會上,華為常務董事、華為云CEO張平安發(fā)表演講稱,數(shù)字世界的話語權最終是由生態(tài)的繁榮決定的。

關鍵字: 華為 12nm 手機 衛(wèi)星通信

要點: 有效應對環(huán)境變化,經(jīng)營業(yè)績穩(wěn)中有升 落實提質(zhì)增效舉措,毛利潤率延續(xù)升勢 戰(zhàn)略布局成效顯著,戰(zhàn)新業(yè)務引領增長 以科技創(chuàng)新為引領,提升企業(yè)核心競爭力 堅持高質(zhì)量發(fā)展策略,塑強核心競爭優(yōu)勢...

關鍵字: 通信 BSP 電信運營商 數(shù)字經(jīng)濟

北京2024年8月27日 /美通社/ -- 8月21日,由中央廣播電視總臺與中國電影電視技術學會聯(lián)合牽頭組建的NVI技術創(chuàng)新聯(lián)盟在BIRTV2024超高清全產(chǎn)業(yè)鏈發(fā)展研討會上宣布正式成立。 活動現(xiàn)場 NVI技術創(chuàng)新聯(lián)...

關鍵字: VI 傳輸協(xié)議 音頻 BSP

北京2024年8月27日 /美通社/ -- 在8月23日舉辦的2024年長三角生態(tài)綠色一體化發(fā)展示范區(qū)聯(lián)合招商會上,軟通動力信息技術(集團)股份有限公司(以下簡稱"軟通動力")與長三角投資(上海)有限...

關鍵字: BSP 信息技術
關閉
關閉