技術(shù)支持

設(shè)計(jì)開發(fā)

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

開發(fā)工具

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

技術(shù)支持

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

新聞中心

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

深圳市龍崗區(qū)坂田環(huán)城南路坂田國(guó)際中心C2棟815

4007-888-234

enroo@enroo.com

樣品申請(qǐng)

有關(guān)PIC12F629

更新時(shí)間: 2019-03-26

閱讀量：1731

PIC12F629
;1.Master Clear Enable 此項(xiàng)為MCLR<4腳>選項(xiàng)
; internal:內(nèi)部自控 External:外部控制
;2.Oscillator:可設(shè)內(nèi)部，外部震蕩<internal,external>
; 如果選NO Clock則3腳作I/O口用,否則3腳作CLKOUT
;***********************************
      include
        P1      EQU    2CH
        P2      EQU    2DH
        Y1      EQU    20H          ;Y1,Y2為去抖
        Y2      EQU    21H          ;動(dòng)延時(shí)寄存器
        ADDR    EQU    23H          ;EEPROM地址寄存器
        DATE1   EQU    24H          ;EEPROM數(shù)據(jù)寄存器
        BIT     EQU    25H
        BIT1    EQU    26H
        TUMP    EQU    27H
        TUMP1   EQU    28H
        CB      EQU    29H          ;顯示輸出公用查表量
        SHUA    EQU    2AH          ;刷新用
        SHUA1   EQU    2BH          ;刷新用
        AB      EQU    .1           ;顯示數(shù)據(jù)
        CLK     EQU    .2           ;顯示時(shí)鐘
        AB1     EQU    .4           ;輸出數(shù)據(jù)
        CLK1    EQU    .0           ;輸出時(shí)鐘
        #DEFINE       IN1 GPIO,3   ;按鍵加

#DEFINE       IN2 GPIO,5   ;按鍵減
        ORG     0000H
        NOP
        BSF     STATUS,RP0
        MOVLW   B’00101000’         ;設(shè)GP5,GP3為輸入
        MOVWF   TRISIO
        BCF     OPTION_REG,7        ;設(shè)GP5弱上拉
        BSF     WPU,5
        MOVLW   0FFH
        MOVWF   OSCCAL              ;設(shè)頻率最好
        BCF     STATUS,RP0
        MOVLW   00H
        MOVWF   ADDR                ;訪問(wèn)EEPROM的00H
        CALL    READ                ;讀EEPROM
        MOVWF   CB
        MOVF    CB,W
        SUBLW   .8
        BTFSC   STATUS,C

GOTO    MAIN
        CLRF    CB
;********************************************
MAIN
;********************************************
        CALL    XIANSHI             ;初次上電，顯示，輸出
        CALL    SHUCHU
        BSF     STATUS,RP0
        MOVLW   B’00101000’
        MOVWF   TRISIO
        BCF     STATUS,RP0
        BTFSS   IN1                 ;兩鍵都松開,
        GOTO    $-1
        BTFSS   IN2                 ;才能往下跳
        GOTO    $-4
MAI
;**********************************************
;;;;;;;;;;;刷新程序;;;;;;;;;;;;;
        INCF    SHUA
        MOVF    SHUA,W
        XORLW   0FFH
        BTFSS   STATUS,Z
        GOTO    PPP
        CLRF    SHUA
        INCF    SHUA1
        MOVF    SHUA1,W
        XORLW   010H
        BTFSS   STATUS,Z
        GOTO    PPP

CLRF    SHUA
        CLRF    SHUA1
        CALL    XIANSHI
        CALL    SHUCHU
PPP
;*********************************************
        BSF     STATUS,RP0
        MOVLW   B’00101000’
        MOVWF   TRISIO
        BCF     STATUS,RP0
        BTFSC   IN1       ;檢測(cè)加一鍵是否按下？
        GOTO    DEC       ;否，轉(zhuǎn)去減一鍵檢測(cè)
        CALL    DELAY     ;去抖動(dòng)
        BTFSC   IN1
        GOTO    DEC

MOVF    CB,W
        XORLW   .8
        BTFSS   STATUS,Z
        GOTO

有關(guān)PIC12F629

點(diǎn)擊次數(shù)：276次更新時(shí)間：2017-12-23

MOVF    CB,W
        XORLW   .8
        BTFSS   STATUS,Z
        GOTO

有關(guān)PIC12F629

點(diǎn)擊次數(shù)：276次更新時(shí)間：2017-12-23

MOVF    CB,W
        XORLW   .8
        BTFSS   STATUS,Z
        GOTO    {D_L_技術(shù)支持_內(nèi)容瀏覽}6
        CLRF    CB
        MOVF    CB,W
        MOVWF   DATE1
        CALL    WRITE
        GOTO    MAIN
        INCF    CB           ;對(duì)查表量加一
        CALL    XIANSHI
        CALL    SHUCHU
        BTFSS   IN1
        GOTO    $-1
        MOVF    CB,W
        MOVWF   DATE1
        CALL    WRITE
        GOTO    MAIN
DEC     MOVF    CB,W
        XORLW   .0
        BTFSS   STATUS,Z      ;是否減到0？
        GOTO    {D_L_技術(shù)支持_內(nèi)容瀏覽}2           ;否，轉(zhuǎn)去減一鍵檢測(cè)
        GOTO    MAI           ;是，不再減一
        BTFSC   IN2           ;減一鍵檢測(cè)
        GOTO    MAI
        CALL    DELAY         ;去抖動(dòng)
        BTFSC   IN2

GOTO    MAI
        DECF    CB            ;對(duì)查表量減一
        CALL    XIANSHI
        CALL    SHUCHU
        BTFSS   IN2
        GOTO    $-1
        MOVF    CB,W
        MOVWF   DATE1
        CALL    WRITE
        GOTO    MAIN
;***************************************
DELAY;去抖動(dòng)延時(shí)程序
        MOVLW   0FFH
        MOVWF   Y1
M2      MOVLW   06FH
        MOVWF   Y2
M1      DECFSZ Y2

GOTO    M1
        DECFSZ Y1
        GOTO    M2
        RETURN
;**************************************
DELAY1 MOVLW   0FFH
        MOVWF   P1
Q2
        MOVLW   0FFH
        MOVWF   P2
Q1
        DECFSZ P2
        GOTO    Q1
        DECFSZ P1
        GOTO    Q2
        RETURN
;**************************************
XIANSHI;數(shù)碼管顯示
        MOVF    CB,W
        CALL    SHUMA
        MOVWF   TUMP
        MOVLW   .8
        MOVWF   BIT
LOOP    BCF     GPIO,CLK
        BTFSC   TUMP,0
        BSF     GPIO,AB
        BTFSS   TUMP,0
        BCF     GPIO,AB
        RRF     TUMP,F
        BSF     GPIO,CLK
        DECFSZ BIT
        GOTO    LOOP
        RETURN
;**************************************

SHUCHU;輸出處理
        MOVF    CB,W
        CALL    CHU
        MOVWF   TUMP1
        MOVLW   .8
        MOVWF   BIT1
LOOP1   BCF     GPIO,CLK1
        BTFSC   TUMP1,0
        BSF     GPIO,AB1
        BTFSS   TUMP1,0
        BCF     GPIO,AB1
        RRF     TUMP1,F
        BSF     GPIO,CLK1
        DECFSZ BIT1
        GOTO    LOOP1
        RETURN
;**************************************
SHUMA;數(shù)碼管顯示碼
       ADDWF   2,1
       RETLW   001H
       RETLW   037H
       RETLW   042H
       RETLW   012H
       RETLW   034H
       RETLW   018H
       RETLW   008H
       RETLW   033H
       RETLW   000H
;*************************************

CHU   ;輸出子程序
      ADDWF   2,1
      RETLW   B’11111111’
      RETLW   B’11111110’
      RETLW   B’11111101’
      RETLW   B’11111011’
      RETLW   B’11110111’
      RETLW   B’11101111’
      RETLW   B’11011111’
      RETLW   B’10111111’
      RETLW   B’01111111’
;*************************************
;        EEPROM讀寫程序
;*************************************
READ    BSF     STATUS,RP0
        MOVF    ADDR,W
        MOVWF   EEADR
        BSF     EECON1,RD
        MOVF    EEDATA,W
        RETURN
;*************************************
WRITE
        BSF     STATUS,RP0
        BTFSC   EECON1,WR
        GOTO    $-1

MOVF    ADDR,W
        MOVWF   EEADR
        MOVF    DATE1,W
        MOVWF   EEDATA
        BSF     EECON1,WREN
        MOVLW   55H
        MOVWF   EECON2
        MOVLW   0AAH
        MOVWF   EECON2
        BSF     EECON1,WR
        BCF     EECON1,WREN
        BCF     STATUS,RP0
        RETURN
;**************************************
        END

6
        CLRF    CB
        MOVF    CB,W
        MOVWF   DATE1
        CALL    WRITE
        GOTO    MAIN
        INCF    CB           ;對(duì)查表量加一
        CALL    XIANSHI
        CALL    SHUCHU
        BTFSS   IN1
        GOTO    $-1
        MOVF    CB,W
        MOVWF   DATE1
        CALL    WRITE
        GOTO    MAIN
DEC     MOVF    CB,W
        XORLW   .0
        BTFSS   STATUS,Z      ;是否減到0？
        GOTO

有關(guān)PIC12F629

點(diǎn)擊次數(shù)：276次更新時(shí)間：2017-12-23

2           ;否，轉(zhuǎn)去減一鍵檢測(cè)
        GOTO    MAI           ;是，不再減一
        BTFSC   IN2           ;減一鍵檢測(cè)
        GOTO    MAI
        CALL    DELAY         ;去抖動(dòng)
        BTFSC   IN2

有關(guān)PIC12F629

點(diǎn)擊次數(shù)：276次更新時(shí)間：2017-12-23

MOVF    CB,W
        XORLW   .8
        BTFSS   STATUS,Z
        GOTO

有關(guān)PIC12F629

點(diǎn)擊次數(shù)：276次更新時(shí)間：2017-12-23

有關(guān)PIC12F629

點(diǎn)擊次數(shù)：276次更新時(shí)間：2017-12-23

上一篇: PIC16F877擴(kuò)展6264的程序

下一篇: 50M頻率表的電路圖及源程序

天堂草原最受欢迎的角色,天堂动漫,天堂在线,色天堂下载,天堂中文在线资源,亚洲男人天堂

技術(shù)支持

技術(shù)支持

有關(guān)PIC12F629