我在公车被蹭水后当晚就来了月经,在公车上露着奶被男人玩,公车上的人妻沦陷完整版,(NP、高H、纯肉)公车,公车娇喘抽搐喷潮H文苏小暖,公车全黄H全肉短篇公车之狼

技術(shù)熱線: 4007-888-234
設(shè)計(jì)開發(fā)

專注差異化嵌入式產(chǎn)品解決方案 給智能產(chǎn)品定制注入靈魂給予生命

開發(fā)工具

提供開發(fā)工具、應(yīng)用測試 完善的開發(fā)代碼案例庫分享

技術(shù)支持

從全面的產(chǎn)品導(dǎo)入到強(qiáng)大技術(shù)支援服務(wù) 全程貼心伴隨服務(wù),創(chuàng)造無限潛能!

新品推廣

提供新的芯片及解決方案,提升客戶產(chǎn)品競爭力

新聞中心

提供最新的單片機(jī)資訊,行業(yè)消息以及公司新聞動(dòng)態(tài)

MCD-DEMO實(shí)驗(yàn)板運(yùn)行的鍵判斷制作的循環(huán)燈

更新時(shí)間: 2019-03-26
閱讀量:2201

每次按下RB2的按鍵,輸出不同的結(jié)果,這個(gè)實(shí)例是:每按下1次RB2,C口的燈從低位開始顯示,規(guī)律是:RC0-RC7的8個(gè)LED燈循環(huán)顯示其實(shí),讀者可以變通一下,每按一下RB2,可以電亮一盞燈,可以執(zhí)行一段程序,通過反復(fù)按壓RB2可以實(shí)現(xiàn)多種功能循環(huán)的復(fù)雜程序.我就用他作了一個(gè)7音警報(bào)器程序.可見,鍵判斷的應(yīng)用是很廣的,下邊是實(shí)驗(yàn)學(xué)習(xí)程序: LIST P=PIC16F876A #INCLUDE P16F876A.INC;

*************************************COUNT1 EQU 20h ;定義一個(gè)廷時(shí)變量寄存器COUNT2 EQU 21h ;定義另一個(gè)廷時(shí)變量寄存器 ORG 0 GOTO START ORG D'20'START BSF STATUS,RP0 MOVLW B'00011111' MOVWF TRISB MOVLW B'00000000' MOVWF TRISC BCF OPTION_REG,7 BCF STATUS,RP0;

***************************************LOOP0 BTFSC PORTB,2 ;測試S2按下否?是!跳過下條指令 GOTO LOOP0 ;為1,沒按下,繼續(xù)判斷 CALL DELAY ;調(diào)用延時(shí),消抖 BTFSC PORTB,2 ;再次測試S2按下否?是!跳過下條指令 GOTO LOOP0 ;為1,沒按下,繼續(xù)判斷 CALL DELAY ;調(diào)用延時(shí),消抖 CLRF PORTC BSF PORTC,0 ;置C口0為1LOOP1 BTFSS PORTB,2 ;判斷松開否?為1,松開了,跳一步 GOTO LOOP1 ;為0,沒放開,等待 CALL DELAY ;調(diào)用延時(shí),消抖動(dòng) BTFSS PORTB,2 ;再次判斷S2松開否?為1,松開了,跳一步 GOTO LOOP1 ;為0,沒放開,等待 CALL DELAY ;為0,按鍵按下了,調(diào)用消抖動(dòng) ;

***************************** LOOP2 BTFSC PORTB,2 ;測試S2按下否?是!跳過下條指令 GOTO LOOP2 ;為1,沒按下,繼續(xù)判斷 CALL DELAY ;調(diào)用延時(shí),消抖 BTFSC PORTB,2 ;再次測試S2按下否?是!跳過下條指令 GOTO LOOP2 ;為1,沒按下,繼續(xù)判斷 CALL DELAY ;調(diào)用延時(shí),消抖 CLRF PORTC BSF PORTC,1 ;置C口1為1LOOP3 BTFSS PORTB,2 ;判斷松開否?為1,松開了,跳一步 GOTO LOOP3 ;為0,沒放開,等待 CALL DELAY ;調(diào)用延時(shí),消抖動(dòng) BTFSS PORTB,2 ;再次判斷S2松開否?為1,松開了,跳一步 GOTO LOOP3 ;為0,沒放開,等待 CALL DELAY ;為0,按鍵按下了,調(diào)用消抖動(dòng) ;*****************************

LOOP4 BTFSC PORTB,2 ;測試S2按下否?是!跳過下條指令 GOTO LOOP4 ;為1,沒按下,繼續(xù)判斷 CALL DELAY ;調(diào)用延時(shí),消抖 BTFSC PORTB,2 ;再次測試S2按下否?是!跳過下條指令 GOTO LOOP4 ;為1,沒按下,繼續(xù)判斷 CALL DELAY ;調(diào)用延時(shí),消抖 CLRF PORTC BSF PORTC,2 ;置C口2為1LOOP5 BTFSS PORTB,2 ;判斷松開否?為1,松開了,跳一步 GOTO LOOP5 ;為0,沒放開,等待 CALL DELAY ;調(diào)用延時(shí),消抖動(dòng) BTFSS PORTB,2 ;再次判斷S2松開否?為1,松開了,跳一步 GOTO LOOP5 ;為0,沒放開,等待 CALL DELAY ;為0,按鍵按下了,調(diào)用消抖動(dòng) ;

***************************** LOOP6 BTFSC PORTB,2 ;測試S2按下否?是!跳過下條指令 GOTO LOOP6 ;為1,沒按下,繼續(xù)判斷 CALL DELAY ;調(diào)用延時(shí),消抖 BTFSC PORTB,2 ;再次測試S2按下否?是!跳過下條指令 GOTO LOOP6 ;為1,沒按下,繼續(xù)判斷 CALL DELAY ;調(diào)用延時(shí),消抖 CLRF PORTC BSF PORTC,3 ;置C口3為1LOOP7 BTFSS PORTB,2 ;判斷松開否?為1,松開了,跳一步 GOTO LOOP7 ;為0,沒放開,等待 CALL DELAY ;調(diào)用延時(shí),消抖動(dòng) BTFSS PORTB,2 ;再次判斷S2松開否?為1,松開了,跳一步 GOTO LOOP7 ;為0,沒放開,等待 CALL DELAY ;為0,按鍵按下了,調(diào)用消抖動(dòng) ;

*****************************LOOP8 BTFSC PORTB,2 ;測試S2按下否?是!跳過下條指令 GOTO LOOP8 ;為1,沒按下,繼續(xù)判斷 CALL DELAY ;調(diào)用延時(shí),消抖 BTFSC PORTB,2 ;再次測試S2按下否?是!跳過下條指令 GOTO LOOP8 ;為1,沒按下,繼續(xù)判斷 CALL DELAY ;調(diào)用延時(shí),消抖 CLRF PORTC BSF PORTC,4 ;置C口4為1LOOP9 BTFSS PORTB,2 ;判斷松開否?為1,松開了,跳一步 GOTO LOOP9 ;為0,沒放開,等待 CALL DELAY ;調(diào)用延時(shí),消抖動(dòng) BTFSS PORTB,2 ;再次判斷S2松開否?為1,松開了,跳一步 GOTO LOOP9 ;為0,沒放開,等待 CALL DELAY ;為0,按鍵按下了,調(diào)用消抖動(dòng) ;

*****************************LOOP10 BTFSC PORTB,2 ;測試S2按下否?是!跳過下條指令 GOTO LOOP10 ;為1,沒按下,繼續(xù)判斷 CALL DELAY ;調(diào)用延時(shí),消抖 BTFSC PORTB,2 ;再次測試S2按下否?是!跳過下條指令 GOTO LOOP10 ;為1,沒按下,繼續(xù)判斷 CALL DELAY ;調(diào)用延時(shí),消抖 CLRF PORTC BSF PORTC,5 ;置C口5為1LOOP11 BTFSS PORTB,2 ;判斷松開否?為1,松開了,跳一步 GOTO LOOP11 ;為0,沒放開,等待 CALL DELAY ;調(diào)用延時(shí),消抖動(dòng) BTFSS PORTB,2 ;再次判斷S2松開否?為1,松開了,跳一步 GOTO LOOP11 ;為0,沒放開,等待 CALL DELAY ;為0,按鍵按下了,調(diào)用消抖動(dòng) ;

***************************** LOOP12 BTFSC PORTB,2 ;測試S2按下否?是!跳過下條指令 GOTO LOOP12 ;為1,沒按下,繼續(xù)判斷 CALL DELAY ;調(diào)用延時(shí),消抖 BTFSC PORTB,2 ;再次測試S2按下否?是!跳過下條指令 GOTO LOOP12 ;為1,沒按下,繼續(xù)判斷 CALL DELAY ;調(diào)用延時(shí),消抖 CLRF PORTC BSF PORTC,6 ;置C口6為1LOOP13 BTFSS PORTB,2 ;判斷松開否?為1,松開了,跳一步 GOTO LOOP13 ;為0,沒放開,等待 CALL DELAY ;調(diào)用延時(shí),消抖動(dòng) BTFSS PORTB,2 ;再次判斷S2松開否?為1,松開了,跳一步 GOTO LOOP13 ;為0,沒放開,等待 CALL DELAY ;為0,按鍵按下了,調(diào)用消抖動(dòng) ;

***************************** LOOP14 BTFSC PORTB,2 ;測試S2按下否?是!跳過下條指令 GOTO LOOP14 ;為1,沒按下,繼續(xù)判斷 CALL DELAY ;調(diào)用延時(shí),消抖 BTFSC PORTB,2 ;再次測試S2按下否?是!跳過下條指令 GOTO LOOP14 ;為1,沒按下,繼續(xù)判斷 CALL DELAY ;調(diào)用延時(shí),消抖 CLRF PORTC BSF PORTC,7 ;置C口7為1LOOP15 BTFSS PORTB,2 ;判斷松開否?為1,松開了,跳一步 GOTO LOOP15 ;為0,沒放開,等待 CALL DELAY ;調(diào)用延時(shí),消抖動(dòng) BTFSS PORTB,2 ;再次判斷S2松開否?為1,松開了,跳一步 GOTO LOOP15 ;為0,沒放開,等待 CALL DELAY ;為0,按鍵按下了,調(diào)用消抖動(dòng) GOTO LOOP0;

****************************DELAY MOVLW D'13' MOVWF COUNT2LOP0 MOVLW D'255' MOVWF COUNT1 DECFSZ COUNT1,1 ;延時(shí)消抖程序 GOTO $-1 DECFSZ COUNT2,1 GOTO LOP0 RETURN;*****************************

 END



德钦县| 荆州市| 冕宁县| 方城县| 棋牌| 汝阳县| 来凤县| 隆昌县| 彭阳县| 古浪县| 辉县市| 上虞市| 庆云县| 渭南市| 枣阳市| 云林县| 裕民县| 弥勒县| 安岳县| 五莲县| 康定县| 永春县| 东城区| 武宣县| 金寨县| 科尔| 哈尔滨市| 石家庄市| 南雄市| 徐水县| 永州市| 东平县| 浠水县| 拉萨市| 郴州市| 禹州市| 紫金县| 米易县| 林芝县| 兴仁县| 横山县|