在线看毛片网站电影-亚洲国产欧美日韩精品一区二区三区,国产欧美乱夫不卡无乱码,国产精品欧美久久久天天影视,精品一区二区三区视频在线观看,亚洲国产精品人成乱码天天看,日韩久久久一区,91精品国产91免费

<menu id="6qfwx"><li id="6qfwx"></li></menu>
    1. <menu id="6qfwx"><dl id="6qfwx"></dl></menu>

      <label id="6qfwx"><ol id="6qfwx"></ol></label><menu id="6qfwx"></menu><object id="6qfwx"><strike id="6qfwx"><noscript id="6qfwx"></noscript></strike></object>
        1. <center id="6qfwx"><dl id="6qfwx"></dl></center>

            新聞中心

            EEPW首頁 > 嵌入式系統(tǒng) > 設計應用 > 用PIC單片機實現(xiàn)音樂播放的實例程序

            用PIC單片機實現(xiàn)音樂播放的實例程序

            作者: 時間:2011-05-17 來源:網(wǎng)絡 收藏

            INTZ:
            PUSH ; Push ;中斷服務
            BTFSC PIR1,TMR2IF ;測試TMR2中斷標志位
            b INT_TMR2 ;
            BTFSC INTCON,TOIF ;測試TMR0中斷標志位
            GOTO INT_TMR0
            IntRet:
            POP ; Pop
            RETFIE
            ;**************************************************
            INT_TMR2:
            BCF PIR1,TMR2IF ;清TMR2中斷標志位
            movf TmrBak,w
            movwf TMR2
            CPL BeepOut
            BeeperEnd:
            b IntRet
            ;**************************************************
            INT_TMR0: ;定時0中斷
            BCF INTCON,TOIF ; clear INTF
            MOVLW .255-.38 ;10ms
            MOVWF TMR0
            ;====================
            decfsz T100ms,f
            b int_tmr0_ret
            movlw CSTIME100MS
            movwf T100ms
            bsf Sflag,Fg_100ms
            ;=====================
            int_tmr0_ret:
            b IntRet
            ;**************************************************
            PlayPsWhisle:
            bsf Fg,FgBeep
            clrf BeepCnt
            movlw .0
            movwf BeepMode
            movlw CSTIME100MS
            movwf T100ms
            retlw 0
            ;**************************************************
            PlayPsOk:
            bsf Fg,FgBeep
            clrf BeepCnt
            movlw .1
            movwf BeepMode
            movlw CSTIME100MS
            movwf T100ms
            retlw 0
            ;**************************************************
            PlayPsHang:
            bsf Fg,FgBeep
            clrf BeepCnt
            movlw .2
            movwf BeepMode
            movlw CSTIME100MS
            movwf T100ms
            retlw 0
            ;**************************************************
            PlayPsWelcom:
            bsf Fg,FgBeep
            clrf BeepCnt
            movlw .3
            movwf BeepMode
            movlw CSTIME100MS
            movwf T100ms
            retlw 0
            ;**************************************************
            ;
            ;BeepMode=0 : psWhisle
            ;BeepMode=1 : psOk
            ;BeepMode=2 : psHang
            ;BeepMode=3 : psWelcom
            ;**************************************************
            BeepFor:
            btfss Sflag,Fg_100ms
            b BeepForEnd
            bcf Sflag,Fg_100ms
            btfss Sflag,FgBeep
            b BeepForEnd
            MOVLW B'00000101' ;開TMR2 1:4分頻
            MOVWF T2CON
            movf BeepMode,w
            b BeepModeJmp
            psWhisle:
            call WhisleTab
            b BeepPlay
            psOk:
            call OkTab
            b BeepPlay
            psHang:
            call HangTab
            b BeepPlay
            psWelcom:
            call WelcomTab
            b BeepPlay
            BeepPlay:
            incf BeepCnt,f
            movwf TmrBak
            movf TmrBak,f
            btfsc status,z
            b BeepOff
            movlw .1
            xorwf TmrBak,w
            btfsc status,z
            b BeepStop
            b BeepForEnd
            BeepOff:
            clrf BeepCnt
            bcf Sflag,FgBeep
            bcf BeepOut
            bcf T2CON,TMR2ON
            b BeepForEnd
            BeepStop:
            bcf T2CON,TMR2ON ;stop
            bcf BeepOut
            BeepForEnd:
            retlw 0
            ;**************************************************
            END

            本文引用地址:http://www.biyoush.com/article/172783.htm

            上一頁 1 2 下一頁

            評論


            相關推薦

            技術(shù)專區(qū)

            關閉