久久久久久久999_99精品久久精品一区二区爱城_成人欧美一区二区三区在线播放_国产精品日本一区二区不卡视频_国产午夜视频_欧美精品在线观看免费

 找回密碼
 立即注冊

QQ登錄

只需一步，快速開始

搜索
查看: 3035|回復: 2
收起左側

果汁機的單片機源程序與PCB設計資料

[復制鏈接]
ID:386239 發表于 2018-8-14 16:02 | 顯示全部樓層 |閱讀模式
水果機硬件與軟件，共享
Altium Designer畫的果汁機電路原理圖和PCB圖如下：(51hei附件中可下載工程文件)
0.png 0.png 0.png

芯海單片機源程序如下:
  1. ;********************************************************************************************
  2. ;#######################################################################################
  3. ;【文件名】     LT-Y47.asm:主體程序文件 *** 18.01.09 ***
  4. ;#######################################################################################
  5. ;codeoption:FB01        checksum:B26E
  6. ;#######################################################################################
  7. ;---------- all rights reserved , Chipsea technology 2018 -------------
  8. ;======================================================================
  9. ; 【說明】：
  10. ;****************************************************
  11. ; prj desp.        : 幻想果汁機
  12. ; target chip        : CSU8RP3215
  13. ; crystal        : 16MHZ
  14. ; author        : dream
  15. ; date                : 2018.01.09
  16. ;
  17. ;****************************************************

  19. ;****************************************************
  20. ;【型號定義】：

  22. ;****************************************************
  23. ;****************************************************
  24. ;【編譯選項】：
  25. ;_DEBUG_                equ        1

  27. ;****************************************************
  28. ;【OPTION選項】：
  29. ;
  30. ;****************************************************
  31. ;【修改記錄】：
  32. ;
  33. ;****************************************************
  34. ;【目標母體選擇】：
  35.         include        "CSU8RP3215.inc"
  36.         
  37. ;【引用文件】：
  38.         include        "LT_Y47.h"

  40. ;**********************************************************************
  41. ;**********************************************************************
  42.         org        000h
  43.         nop
  44.         nop
  45.         nop
  46.         goto        start

  48.         org        004h
  49.         goto        intService

  51. ;******************************************************************************
  52. ;        org        010h
  53. ;******************************************************************************
  54. start:
  55.         bcf        gie
  56.         call        fnAllDefaultSet
  57. main:
  58.         clrwdt
  59.         call        fnTaskMgr
  60.         call        fnKeyFunc
  61.         call        fnDispFunc
  62.         call        fnBatFunc
  63.         call        fnEnterSleep
  64.         goto        main

  66. ;******************************************************************************
  67. ;【說明】：        按鍵掃描程序        
  68. ;【輸入】：        無
  69. ;【輸出】：        fLongKey
  70. ;******************************************************************************
  71. fnTaskMgr:
  72.         btfss        fBase2ms
  73.         goto        lbTaskMgrExit
  74.         
  75.         bcf        fBase2ms
  76.         bcf        led1_o
  77.         btfsc        ledBuf,0
  78.         bsf        led1_o
  79.         
  80.         bcf        led2_o
  81.         btfsc        ledBuf,1
  82.         bsf        led2_o
  83.         
  84.         bcf        led3_o
  85.         btfsc        ledBuf,2
  86.         bsf        led3_o

  88.         bcf        led4_o
  89.         btfsc        ledBuf,3
  90.         bsf        led4_o
  91.         
  92.         btfsc        fHaveUsb
  93.         goto        lbChkUsbInfo
  94.         
  95.         btfss        hall_i
  96.         goto        lbBottleLock
  97. lbBottleNotLock:
  98.         clrf        cHaveLock
  99.         btfss        fKGLock
  100.         goto        lbChkUsbInfo
  101.         incf        cNoLock,F
  102.         movfw        cNoLock
  103.         sublw        29                        ;30*2ms=60ms
  104.         btfsc        c
  105.         goto        lbChkKey
  106.         bcf        fKGLock
  107.         btfsc        fRunOn
  108.         call        lbChangeToOff
  109.         bcf        fBuzOn
  110.         bcf        buz_o
  111.         bsf        fEnWaitDly
  112.         clrf        tWaitDly
  113.         clrf        ledBuf
  114.         goto        lbChkUsbInfo
  115. lbBottleLock:
  116.         clrf        cNoLock
  117.         btfsc        fKGLock
  118.         goto        lbChkUsbInfo
  119.         incf        cHaveLock,F
  120.         movfw        cHaveLock
  121.         sublw        29                        ;30*2ms=60ms
  122.         btfsc        c
  123.         goto        lbChkUsbInfo
  124.         bsf        fKGLock
  125.         btfsc        fHaveUsb
  126.         goto        lbChkUsbInfo
  127.         bsf        fFstLock                        ;
  128.         clrf        tWaitDlyAssi                        ;延時1秒后關閉指示燈
  129.         clrf        tWaitDly                        ;
  130.         bsf        fBuzOn
  131. lbChkUsbInfo:
  132.         btfss        usb_i
  133.         goto        lbNoUsbInJug
  134. lbUsbInJug:
  135.         clrf        cUsbOut
  136.         btfsc        fHaveUsb
  137.         goto        lbTaskMgrExit
  138.         incf        cUsbExist,F
  139.         movfw        cUsbExist
  140.         sublw        19                                ;20*2ms=40ms
  141.         btfsc        c
  142.         goto        lbTaskMgrExit
  143.         bsf        fHaveUsb
  144.         bcf        fBat1ChgFull
  145.         bcf        fBat2ChgFull
  146.         bcf        fRunOn
  147.         bcf        motor_o
  148.         bcf        fBatLow
  149.         bcf        fEnWaitDly
  150.         clrf        cVolOffset
  151.         bcf        fMaskAlarm
  152.         bcf        fWorkedDly
  153.         bcf        fNeedCoolDown
  154.         clrf        cNormalWork
  155.         movlw        high(CHG_CUR_1000MA)
  156.         movwf        aimCurH
  157.         movlw        low(CHG_CUR_1000MA)
  158.         movwf        aimCurL
  159.         goto        lbTaskMgrExit
  160. lbNoUsbInJug:
  161.         clrf        cUsbExist
  162.         btfss        fHaveUsb
  163.         goto        lbChkKey
  164.         incf        cUsbOut,F
  165.         movfw        cUsbOut
  166.         sublw        19                                ;20*2ms=40ms
  167.         btfsc        c
  168.         goto        lbChkKey
  169.         bcf        fHaveUsb
  170.         clrf        ledBuf
  171.         clrf        cVolOffset
  172.         bcf        fEnWaitDly
  173.         bcf        pwm2out
  174.         bcf        pwm_o
  175. lbChkKey:        
  176.         btfsc        fEnAlarmDly
  177.         goto        lbTaskMgrExit                        ;過載保護期間禁止按鍵
  178.         
  179.         movfw        p_key
  180.         andlw        MASK_KEY_BIT
  181.         xorlw        MASK_KEY_BIT
  182.         movwf        var1
  183.         btfsc        z
  184.         goto        lbNoKeyPush                ;沒有按鍵按下
  185.         
  186.         clrf        tKeyRel
  187.         xorwf        lastKey,W
  188.         btfss        z
  189.         goto        lbNewKeyPush                ;有新按鍵按下
  190.         
  191.         btfsc        fKeyPush
  192.         goto        lbLongKeyPushCnt
  193.         
  194.         incf        tKeyPush,F
  195.         movfw        tKeyPush
  196.         sublw        30                        ;31*2ms=62ms
  197.         btfsc        c
  198.         goto        lbTaskMgrExit
  199.         movfw        lastKey
  200.         movwf        keyName
  201.         bsf        fKeyOk
  202.         bsf        fKeyPush
  203.         bcf        fKeyRel
  204. lbTaskMgrExit:
  205.         return
  206.         
  207. lbNewKeyPush:
  208.         movfw        var1
  209.         movwf        lastKey
  210.         bcf        fKeyPush
  211.         clrf        tKeyPush
  212.         goto        lbTaskMgrExit
  213. lbLongKeyPushCnt:
  214.         goto        lbTaskMgrExit

  216. lbNoKeyPush:
  217.         clrf        tKeyPush
  218.         bcf        fKeyEr
  219.         btfsc        fKeyRel
  220.         goto        lbTaskMgrExit
  221.         incf        tKeyRel,F
  222.         movfw        tKeyRel
  223.         sublw        23                        ;24*2ms=48ms
  224.         btfsc        c
  225.         goto        lbTaskMgrExit
  226.         
  227.         bsf        fKeyRel
  228.         bcf        fKeyPush
  229.         goto        lbTaskMgrExit

  231. ;******************************************************************************
  232. ;【說明】：        按鍵功能
  233. ;******************************************************************************
  234. fnKeyFunc:
  235.         btfss        fRstRun
  236.         btfss        fKeyOk
  237.         goto        lbKeyFuncExit
  238.         
  239.         bcf        fKeyOk
  240.         movfw        keyName
  241.         xorlw        CONS_ON_KEY
  242.         btfsc        z
  243.         goto        lbOnKeyPr        
  244.         bsf        fKeyEr
  245. lbKeyFuncExit:
  246.          return

  248. lbOnKeyPr:
  249.         btfsc        fHaveUsb
  250.         goto        lbKeyFuncExit

  252.         btfss        fKGLock                                ;KG開關沒有鎖緊時，禁止運轉
  253.         goto        lbAlarmSet
  254.         
  255.         btfsc        fNeedCoolDown                        ;10分鐘散熱期間，禁止開啟
  256.         goto        lbSetCoolDownDly

  258.         btfsc        fRunOn
  259.         goto        lbChangeToOff        
  260.         
  261.         bsf        fRunOn
  262.         bsf        fEnWaitDly                        ;馬達開啟后等待300ms尋找最大值
  263.         clrf        tWaitDly                        ;
  264.         clrf        cEmptyMotor
  265.         clrf        tRunSec
  266.         clrf        tRunMSec
  267.         clrf        tMotorDly
  268.         clrf        motorMaxCurH
  269.         clrf        motorMaxCurL
  270.         clrf        cVolOffset
  271.         bcf        fEmptyMotor
  272.         bsf        motor_o                                ;開啟馬達
  273.         bsf        fWorkGood
  274.         clrf        tWaterFlow
  275.         movlw        1
  276.         movwf        ledBuf
  277.         bsf        fEnDisp
  278.         goto        lbKeyFuncExit

  280. lbChangeToOff:
  281.         bcf        fRunOn
  282.         bcf        motor_o
  283.         clrf        tWaitDly
  284.         clrf        tWaitDlyAssi
  285.         clrf        tRunMSec
  286.         clrf        cVolOffset
  287.         bcf        fWorkGood
  288.         bsf        fEnDisp
  289.         goto        lbKeyFuncExit

  291. lbAlarmSet:
  292.         bsf        fEnWaitDly
  293.         clrf        tWaitDly
  294.         goto        lbKeyFuncExit
  295.         
  296. lbSetCoolDownDly:
  297.         bsf        fMaskAlarm                        ;開啟馬達需要散熱報警指示
  298.         clrf        tMaskSec
  299.         clrf        cMaskFlash
  300.         bcf        fEnDisp
  301.         goto        lbKeyFuncExit

  303. ;******************************************************************************
  304. ;【說明】：        顯示處理程序
  305. ;******************************************************************************
  306. fnDispFunc:
  307.         btfss        fDisp2ms
  308.         goto        lbDispFuncExit
  309.         
  310.         bcf        fDisp2ms
  311.         btfss        fHaveUsb
  312.         goto        lbDischargeDisp

  314. lbChargeDisp:
  315.         incf        tFlashTime,F
  316.         movfw        tFlashTime
  317.         sublw        249                                ;250*2ms=500ms
  318.         btfsc        c
  319.         goto        $+4
  320.         clrf        tFlashTime
  321.         movlw        0x04                ;fEnFlash
  322.         xorwf        sysFlag2,F
  323.         
  324.         movfw        volume
  325.         addpcw
  326.         goto        lbDispChgVol0
  327.         goto        lbDispChgVol25
  328.         goto        lbDispChgVol50
  329.         goto        lbDispChgVol75
  330.         goto        lbDispChgVol100

  332. lbDispChgVol0:                                        ;0%時，第一個燈閃爍
  333.         movlw        0
  334.         btfss        fEnFlash
  335.         movlw        1
  336.         movwf        ledBuf
  337.         goto        lbDispFuncExit

  339. lbDispChgVol25:                                        ;25%時，25%常亮，50閃爍
  340.         movlw        01b
  341.         btfss        fEnFlash
  342.         movlw        11b
  343.         movwf        ledBuf
  344.         goto        lbDispFuncExit

  346. lbDispChgVol50:                                        ;50%時，25%和50%常亮，75%閃爍
  347.         movlw        011b
  348.         btfss        fEnFlash
  349.         movlw        111b
  350.         movwf        ledBuf
  351.         goto        lbDispFuncExit

  353. lbDispChgVol75:                                        ;75%時，25%、50%和75%常亮，100%閃爍
  354.         movlw        0111b
  355.         btfss        fBat1ChgFull
  356.         btfss        fEnFlash
  357.         movlw        1111b
  358.         movwf        ledBuf
  359.         goto        lbDispFuncExit
  360. lbDispChgVol100:                                ;100%時，充飽全亮
  361.         movlw        1111b
  362.         movwf        ledBuf
  363.         goto        lbDispFuncExit

  365. lbDischargeDisp:
  366.         btfss        fKGLock
  367.         goto        lbChkAlarmDly                        ;沒有鎖緊，報警顯示
  368.         btfsc        fFstLock
  369.         goto        lbFirstLockDisp                        ;首次檢測到鎖緊顯示
  370.         
  371.         btfsc        fMaskAlarm
  372.         goto        lbChkMaskDly                        ;需要散熱報警指示顯示
  373.         
  374.         btfss        fEnDisp
  375.         goto        lbDispFuncExit
  376.         btfss        fWorkGood
  377.         goto        lbDispCurVolume                        ;顯示當前電量
  378.         
  379.         incf        tWaterFlow,F
  380.         movfw        tWaterFlow
  381.         sublw        149                                ;150*2ms=300ms
  382.         btfsc        c
  383.         goto        lbDispFuncExit
  384.         clrf        tWaterFlow
  385.         bcf        c
  386.         rlf        ledBuf,F                        ;跑馬左移顯示
  387.         movlw        1
  388.         btfsc        ledBuf,4
  389.         movwf        ledBuf
  390.         goto        lbDispFuncExit
  391.         
  392. lbDispCurVolume:
  393.         movfw        volume
  394.         addpcw
  395.         goto        lbDispDisVol0
  396.         goto        lbDispDisVol25
  397.         goto        lbDispDisVol50
  398.         goto        lbDispDisVol75
  399.         goto        lbDispDisVol100

  401. lbDispDisVol100:
  402.         movlw        1111b
  403.         movwf        ledBuf
  404.         goto        lbDispDisVol25+2
  405. lbDispDisVol75:
  406.         movlw        0111b
  407.         movwf        ledBuf
  408.         goto        lbDispDisVol25+2
  409. lbDispDisVol50:
  410.         movlw        0011b
  411.         movwf        ledBuf
  412.         goto        lbDispDisVol25+2
  413. lbDispDisVol25:
  414.         movlw        0001b
  415.         movwf        ledBuf
  416.         
  417.         incf        tWaitDly,F
  418.         movfw        tWaitDly
  419.         sublw        249                                ;250*2ms=500ms
  420.         btfsc        c
  421.         goto        lbDispFuncExit
  422.         clrf        tWaitDly
  423.         incf        tWaitDlyAssi,F
  424.         movfw        tWaitDlyAssi
  425.         sublw        9                                ;10*0.5s=5s
  426.         btfsc        c
  427.         goto        lbDispFuncExit
  428.         clrf        ledBuf
  429.         bcf        fEnDisp
  430.         goto        lbDispFuncExit

  432. lbDispDisVol0:
  433.         incf        tAlarmFlash,F
  434.         movfw        tAlarmFlash
  435.         sublw        49                                ;50*2ms=100ms
  436.         btfsc        c
  437.         goto        lbDispFuncExit
  438.         clrf        tAlarmFlash
  439.         movlw        0x08                        ;fAlarmFlash
  440.         xorwf        sysFlag2,F
  441.         
  442.         movlw        1111b
  443.         btfss        fAlarmFlash
  444.         movlw        0000b
  445.         movwf        ledBuf
  446.         
  447.         incf        tWaitDly,F
  448.         movfw        tWaitDly
  449.         sublw        9
  450.         btfsc        c
  451.         goto        lbDispFuncExit
  452.         clrf        ledBuf                                ;關閉顯示
  453.         bcf        fEnDisp
  454.         goto        lbDispFuncExit

  456. lbFirstLockDisp:
  457.         movlw        0x0f
  458.         movwf        ledBuf
  459.         incf        tWaitDly,F
  460.         movfw        tWaitDly
  461.         sublw        249                                ;250*2ms=500ms
  462.         btfsc        c
  463.         goto        lbDispFuncExit
  464.         clrf        tWaitDly
  465.         incf        tWaitDlyAssi,F
  466.         movfw        tWaitDlyAssi
  467.         sublw        1                                ;0.5s*2=1s
  468.         btfsc        c
  469.         goto        lbDispFuncExit
  470.         bcf        fFstLock
  471.         clrf        ledBuf                                ;初次鎖緊滿1秒，關閉顯示
  472.         bcf        fBuzOn
  473.         bcf        buz_o
  474.         goto        lbDispFuncExit

  476. lbChkMaskDly:
  477.         incf        tMaskSec,F
  478.         movfw        tMaskSec
  479.         sublw        49                                ;50*2ms=100ms
  480.         btfsc        c
  481.         goto        lbDispFuncExit
  482.         
  483.         clrf        tMaskSec
  484.         movlw        0x0f
  485.         xorwf        ledBuf,F
  486.         movlw        0x01                        ;fBuzOn
  487.         xorwf        buzFlag,F
  488.         incf        cMaskFlash,F
  489.         movfw        cMaskFlash
  490.         sublw        9                                ;10次
  491.         btfsc        c
  492.         goto        lbDispFuncExit
  493.         bcf        fMaskAlarm
  494.         clrf        ledBuf
  495.         bcf        fBuzOn
  496.         goto        lbDispFuncExit

  498. lbChkAlarmDly:
  499.         btfss        fEnWaitDly
  500.         goto        lbDispFuncExit
  501.         movlw        0xff
  502.         movwf        ledBuf
  503.         incf        tWaitDly,F
  504.         movfw        tWaitDly
  505.         sublw        249                                ;250*2ms=500ms
  506.         btfsc        c
  507.         goto        lbDispFuncExit
  508.         bcf        fEnWaitDly
  509.         clrf        ledBuf                                ;關閉顯示        
  510. lbDispFuncExit:
  511.         return

  513. ;==============================================================================
  514. fnReadAnalog:
  515.         movfw        channelNum
  516.         addpcw
  517.         goto        lbJudgeMotorCur
  518.         goto        lbJudgeBatVol1
  519.         goto        lbJudgeBatVol2
  520.         goto        lbJudgeUsbDc

  522. lbJudgeMotorCur:
  523.         call        fnSelectMotorCurrent
  524.         goto        lbStartReadAd
  525. lbJudgeBatVol1:
  526.         call        fnSelectBatVoltage1
  527.         goto        lbStartReadAd
  528. lbJudgeBatVol2:
  529.         call        fnSelectBatVoltage2
  530.         goto        lbStartReadAd
  531. lbJudgeUsbDc:
  532.         call        fnSelectUSBDc
  533. lbStartReadAd:
  534.         movlw        20                        ;
  535.         movwf        var1                        ;
  536.         decfsz        var1,F                    ;切換通道delay
  537.         goto        $-1                           ;

  539.         call        fnReadADC
  540.         
  541.         ;取和
  542.         movfw        var2
  543.         addwf        averageL,F
  544.         movfw        var1
  545.         addwfc        averageH,F
  546.         
  547.         ;更新最小值
  548.         movfw        var2
  549.         subwf        tempMinL,W
  550.         movfw        var1
  551.         subwfc        tempMinH,W
  552.         btfss        c
  553.         goto        $+5
  554.         movfw        var1
  555.         movwf        tempMinH
  556.         movfw        var2
  557.         movwf        tempMinL
  558.         
  559.         ;更新最大值
  560.         movfw        var2
  561.         subwf        tempMaxL,W
  562.         movfw        var1
  563.         subwfc        tempMaxH,W
  564.         btfsc        c
  565.         goto        $+5
  566.         movfw        var1
  567.         movwf        tempMaxH
  568.         movfw        var2
  569.         movwf        tempMaxL
  570.         
  571.         decfsz        cAdcCnt,F
  572.         goto        lbCurrentJudgeExit
  573.         
  574.         ;減去最大值、最小值
  575.         movfw        tempMaxL
  576.         subwf        averageL,F
  577.         movfw        tempMaxH
  578.         subwfc        averageH,F
  579.         
  580.         movfw        tempMinL
  581.         subwf        averageL,F
  582.         movfw        tempMinH
  583.         subwfc        averageH,F
  584.         
  585.         movfw        channelNum
  586.         addpcw
  587.         goto        lbSaveMotorCur
  588.         goto        lbSaveBatVol1
  589.         goto        lbSaveBatVol2
  590.         goto        lbSaveUsbDc

  592. lbSaveMotorCur:
  593.         movfw        averageH
  594.         movwf        motorCurH
  595.         movfw        averageL
  596.         movwf        motorCurL
  597.         goto        lbGotoNextChannel
  598.         
  599. lbSaveBatVol1:
  600.         movfw        averageH
  601.         movwf        totVolH
  602.         movfw        averageL
  603.         movwf        totVolL
  604.         goto        lbGotoNextChannel

  606. lbSaveBatVol2:
  607.         movfw        averageH
  608.         movwf        batVol2H
  609.         movfw        averageL
  610.         movwf        batVol2L
  611.         
  612.         subwf        totVolL,W
  613.         movwf        batVol1L
  614.         movfw        batVol2H
  615.         subwfc        totVolH,W
  616.         movwf        batVol1H
  617.         btfsc        c
  618.         goto        lbGotoNextChannel
  619.         movfw        totVolH
  620.         movwf        batVol1H
  621.         movfw        totVolL
  622.         movwf        batVol1L
  623.         goto        lbGotoNextChannel

  625. lbSaveUsbDc:
  626.         movfw        averageH
  627.         movwf        usbVolH
  628.         movfw        averageL
  629.         movwf        usbVolL
  630.         
  631. ;        movlw        low(USB_3000MV)
  632. ;        subwf        usbVolL,W
  633. ;        movlw        high(USB_3000MV)
  634. ;        subwfc        usbVolH,W
  635. ;        btfss        c
  636. ;        goto        lbNoUsbInJug
  637. ;lbUsbInJug:
  638. ;        clrf        cUsbOut
  639. ;        btfsc        fHaveUsb
  640. ;        goto        lbGotoNextChannel
  641. ;        incf        cUsbExist,F
  642. ;        movfw        cUsbExist
  643. ;        sublw        19                                ;20*2ms=40ms
  644. ;        btfsc        c
  645. ;        goto        lbGotoNextChannel
  646. ;        bsf        fHaveUsb
  647. ;        bcf        fBat1ChgFull
  648. ;        bcf        fBat2ChgFull
  649. ;        bcf        fRunOn
  650. ;        bcf        motor_o
  651. ;        bcf        fBatLow
  652. ;        bcf        fEnWaitDly
  653. ;        clrf        cVolOffset
  654. ;        bcf        fMaskAlarm
  655. ;        bcf        fWorkedDly
  656. ;        bcf        fNeedCoolDown
  657. ;        clrf        cNormalWork
  658. ;        movlw        high(CHG_CUR_1000MA)
  659. ;        movwf        aimCurH
  660. ;        movlw        low(CHG_CUR_1000MA)
  661. ;        movwf        aimCurL
  662. ;        goto        lbGotoNextChannel
  663. ;lbNoUsbInJug:
  664. ;        clrf        cUsbExist
  665. ;        btfss        fHaveUsb
  666. ;        goto        lbChkKey
  667. ;        incf        cUsbOut,F
  668. ;        movfw        cUsbOut
  669. ;        sublw        19                                ;20*2ms=40ms
  670. ;        btfsc        c
  671. ;        goto        lbGotoNextChannel
  672. ;        bcf        fHaveUsb
  673. ;        clrf        ledBuf
  674. ;        clrf        cVolOffset
  675. ;        bcf        fEnWaitDly
  676. ;        bcf        pwm2out
  677. ;        bcf        pwm_o
  678. lbGotoNextChannel:
  679.         call        fnInitSamp
  680.         incf        channelNum,F
  681.         movfw        channelNum
  682.         sublw        3
  683.         btfsc        c
  684.         goto        lbCurrentJudgeExit
  685.         clrf        channelNum
  686.         bcf        fRstRun
  687. ifdef _DEBUG_
  688. ;{
  689.         btfss        fBase1s
  690.         goto        lbCurrentJudgeExit
  691.         bcf        fBase1s
  692.         movlw        0x55
  693.         movwf        data0
  694.         movfw        motorCurL
  695.         movwf        data1
  696.         movfw        motorCurH
  697.         movwf        data2
  698.         movfw        batVol1L
  699.         movwf        data3
  700.         movfw        batVol1H
  701.         movwf        data4
  702.         movfw        batVol2L
  703.         movwf        data5
  704.         movfw        batVol2H
  705.         movwf        data6
  706.         movlw        7
  707.         movwf        txdNum
  708.         bsf        fEnTxd
  709. ;}
  710. endif
  711. lbCurrentJudgeExit:
  712.         return

  714. ;----------------------------------------------------------
  715. fnInitSamp:
  716.         movlw        3
  717.         movwf        cAdcCnt
  718.         clrf        averageH
  719.         clrf        averageL
  720.         clrf        tempMaxH
  721.         clrf        tempMaxL
  722.         movlw        0xff
  723.         movwf        tempMinH
  724.         movwf        tempMinL
  725.         return

  727. ;=================================================================
  728. fnReadADC:
  729.         bsf        srads                        ;開啟AD轉換
  730.         btfsc        srads
  731.         goto        $-1
  732.         
  733.         movfw        sradl
  734.         movwf        var2
  735.         movfw        sradh
  736.         andlw        0x0f
  737.         movwf        var1
  738.         
  739.         bsf        offex                        ;翻轉輸入信號
  740.         bsf        srads
  741.         btfsc        srads
  742.         goto        $-1
  743.         
  744.         movfw        sradl
  745.         addwf        var2,F
  746.         movfw        sradh
  747.         andlw        0x0f
  748.         addwfc        var1,F
  749.         
  750.         bcf        c
  751.         rrf        var1,F                        ;得到兩次輸入信號的平均值
  752.         rrf        var2,F                        ;
  753.         return

  755. ;******************************************************************************
  756. ;【說明】：        電池充放電管理程序
  757. ;******************************************************************************
  758. fnBatFunc:
  759.         btfss        fBat2ms
  760.         goto        lbBatFuncExit
  761.         
  762.         bcf        fBat2ms
  763.         btfss        fHaveUsb
  764.         goto        lbSystemDischarge
  765. lbSystemCharge:
  766.         call        fnReadAnalog                        ;模擬信號讀取
  767.         call        fnChgVolDet                        ;充電電量檢測
  768.         call        fnBatChgFullJug                        ;充飽檢測
  769.         call        fnChgVolControl                        ;充電電壓控制
  770.         goto        lbBatFuncExit

  772. lbSystemDischarge:
  773.         call        fnReadAnalog                        ;模擬信號讀取
  774.         call        fnDisVolDet                        ;放電電量檢測
  775.         call        fnMotorCtrl                        ;馬達控制
  776.         call        fnOverLoadCtrl
  777.         call        fnWaitCoolDown
  778. lbBatFuncExit:
  779.         return

  781. ;==============================================================================
  782. ;充飽檢測
  783. fnBatChgFullJug:        
  784.         movlw        low(BAT_VOL_4200MV)
  785.         subwf        batVol1L,W
  786.         movlw        high(BAT_VOL_4200MV)
  787.         subwfc        batVol1H,W
  788.         btfss        c
  789.         clrf        cBat1FullCnt
  790.         
  791.         incf        cBat1FullCnt,F
  792.         incf        cBat1Cycle,F
  793.         movfw        cBat1Cycle
  794.         sublw        249                                ;250*2ms=500ms
  795.         btfsc        c
  796.         goto        lbChkBat2ChgFull
  797.         clrf        cBat1Cycle
  798.         
  799.         movfw        cBat1FullCnt
  800.         clrf        cBat1FullCnt
  801.         sublw        249*60/100
  802.         btfss        c
  803.         bsf        fBat1ChgFull

  805. lbChkBat2ChgFull:
  806.         movlw        low(BAT_VOL_4200MV)
  807.         subwf        batVol2L,W
  808.         movlw        high(BAT_VOL_4200MV)
  809.         subwfc        batVol2H,W
  810.         btfss        c
  811.         clrf        cBat2FullCnt
  812.         
  813.         incf        cBat2FullCnt,F
  814.         incf        cBat2Cycle,F
  815.         movfw        cBat2Cycle
  816.         sublw        249                                ;250*2ms=500ms
  817.         btfsc        c
  818.         goto        lbBatChgFullJugExit
  819.         clrf        cBat2Cycle
  820.         
  821.         movfw        cBat2FullCnt
  822.         clrf        cBat2FullCnt
  823.         sublw        249*60/100
  824.         btfss        c
  825.         bsf        fBat2ChgFull
  826. lbBatChgFullJugExit:
  827.         return

  829. ;==============================================================================
  830. ;充電電壓控制
  831. fnChgVolControl:
  832. ;        movlw        low(BAT_VOL_4200MV)
  833. ;        subwf        batVol1L,W
  834. ;        movlw        high(BAT_VOL_4200MV)
  835. ;        subwfc        batVol1H,W
  836. ;        btfsc        c
  837. ;        goto        lbBatChgFull
  838. ;        
  839. ;        movlw        low(BAT_VOL_4200MV)
  840. ;        subwf        batVol2L,W
  841. ;        movlw        high(BAT_VOL_4200MV)
  842. ;        subwfc        batVol2H,W
  843. ;        btfsc        c
  844. ;        goto        lbBatChgFull
  845.         
  846.         call        fnSelectMotorCurrent
  847.         movlw        20
  848.         movwf        var1                        ;
  849.         decfsz        var1,F                    ;切換通道delay
  850.         goto        $-1                           ;

  852.         call        fnReadADC
  853.         movfw        var2
  854.         movwf        chgCurL
  855.         movfw        var1
  856.         movwf        chgCurH
  857.         call        fnReadADC
  858.         movfw        var2
  859.         addwf        chgCurL,F
  860.         movfw        var1
  861.         addwfc        chgCurH,F
  862.         call        fnReadADC
  863.         movfw        var2
  864.         addwf        chgCurL,F
  865.         movfw        var1
  866.         addwfc        chgCurH,F
  867.         call        fnReadADC
  868.         movfw        var2
  869.         addwf        chgCurL,F
  870.         movfw        var1
  871.         addwfc        chgCurH,F
  872.         bcf        c
  873.         rrf        chgCurH,F
  874.         rrf        chgCurL,F
  875.         bcf        c
  876.         rrf        chgCurH,F
  877.         rrf        chgCurL,F
  878.         
  879.         movfw        batVol1H
  880.         movwf        var1
  881.         movfw        batVol1L
  882.         movwf        var2
  883.         
  884.         movfw        batVol1L
  885.         subwf        batVol2L,W
  886.         movfw        batVol1H
  887.         subwfc        batVol2H,W
  888.         btfss        c
  889.         goto        $+5
  890.         movfw        batVol2H
  891.         movwf        var1
  892.         movfw        batVol2L
  893.         movwf        var2

  895.         movlw        low(USB_4600MV)
  896.         subwf        usbVolL,W
  897.         movlw        high(USB_4600MV)
  898.         subwfc        usbVolH,W
  899.         btfss        c
  900.         goto        lbPwmDec
  901.         
  902.         movfw        aimCurL
  903.         subwf        chgCurL,W
  904.         movfw        aimCurH
  905.         subwfc        chgCurH,W
  906.         btfsc        c
  907.         goto        lbPwmDec                        ;實際電流大了，PWM--
  908.         
  909.         movlw        low(BAT_VOL_4200MV)
  910.         subwf        var2,W
  911.         movlw        high(BAT_VOL_4200MV)
  912.         subwfc        var1,W
  913.         btfsc        c
  914.         goto        lbPwmDec

  916. lbPwmInc:
  917.         movfw        pwmBuf
  918.         xorlw        0xff
  919.         btfss        z
  920.         incf        pwmBuf,F
  921.         goto        lbUpdateChargeCur
  922. lbPwmDec:
  923.         movfw        pwmBuf
  924.         xorlw        0x0
  925.         btfss        z
  926.         decf        pwmBuf,F
  927. lbUpdateChargeCur:
  928.         movfw        pwmBuf
  929.         movwf        tm2r
  930.         bsf        pwm2out
  931.         return

  933. lbBatChgFull:
  934.         clrf        pwmBuf
  935.         clrf        tm2r
  936.         bcf        pwm2out
  937.         bcf        pwm_o
  938.         return
  939.         
  940. ;******************************************************************************
  941. ;【說明】：        睡眠進入程序
  942. ;【輸入】：        無
  943. ;【輸出】：        無
  944. ;******************************************************************************
  945. fnEnterSleep:
  946.         btfss        fRunOn
  947.         btfsc        fHaveUsb
  948.         goto        lbEnterSleepExit
  949.         
  950.         btfsc        fBatLow
  951.         goto        lbBatLowAlarm
  952.         
  953.         btfsc        fEnAlarmDly
  954.         goto        lbEnterSleepExit
  955.         
  956.         btfss        fWorkedDly
  957.         btfsc        fNeedCoolDown
  958.         goto        lbEnterSleepExit
  959.         
  960.         movfw        ledBuf
  961.         xorlw        0
  962.         btfss        z
  963.         goto        lbEnterSleepExit

  965.         btfss        fKeyPush
  966.         btfss        fSleep10ms
  967.         goto        lbEnterSleepExit
  968.         
  969.         bcf        fSleep10ms
  970.         incfsz        tWaitSleep,F
  971.         goto        lbEnterSleepExit        
  972. lbGotoSleepNow:
  973.         clrwdt
  974.         bcf        fBuzOn
  975.         bcf        led1_o
  976.         bcf        led2_o
  977.         bcf        led3_o
  978.         bcf        led4_o
  979.         bcf        buz_o
  980.         bsf        pwr_o
  981.         bcf        sraden
  982.         clrf        sradcon0
  983.         clrf        sradcon1
  984.         clrf        sradcon2
  985.         bcf        pt3con,0        
  986.         bcf        wdten
  987.         movlw        0x13                                        ;使能按鍵和充電喚醒睡眠
  988. ;        btfsc        fBatLow
  989. ;        movlw        0x03                                        ;電池低時，禁止按鍵喚醒，只可以充電喚醒
  990.         movwf        pt1con
  991.         movlw        0x08
  992.         movwf        pt1con1                                        ;使能PT3.1狀態改變時喚醒睡眠
  993.         bsf        e0ie
  994.         bsf        e1ie                                        ;使能外部中斷1
  995.         clrf        intf
  996.         sleep
  997.         nop
  998.         nop
  999.         nop
  1000.         bcf        e0ie
  1001.         bcf        e1ie
  1002.         clrf        pt1con                                        ;關閉PT1.3/PT3.0口中斷喚醒功能
  1003.         clrf        pt1con1                                        ;關閉PT3.1口中斷喚醒功能
  1004.         bsf        wdten
  1005.         bcf        fBatLow
  1006.         movlw        00110000b                                ;ADC輸入信號獲取時間：2個ADC時鐘，采樣時間：CPUCLK
  1007.         movwf        sradcon0
  1008.         movlw        00000000b                                ;參考電壓:VDD
  1009.         movwf        sradcon1
  1010.         clrf        sradl
  1011.         clrf        sradh
  1012.         clrf        sroftl
  1013.         clrf        srofth
  1014.         bsf        sraden                                        ;使能ADC
  1015.         call        fnInitSamp
  1016.         bsf        pwr_o
  1017. lbEnterSleepExit:
  1018.         return

  1020. lbBatLowAlarm:
  1021.         clrf        var1
  1022.         clrf        var2
  1023.         bcf        led1_o
  1024.         bcf        led2_o
  1025.         bcf        led3_o
  1026.         bcf        led4_o

  1028. lbAlarmFlash:
  1029.         clrwdt
  1030.         btfss        fBase2ms
  1031.         goto        $-2
  1032.         bcf        fBase2ms
  1033.         incf        var1,F
  1034.         movfw        var1
  1035.         sublw        49                                        ;50*2ms=100ms
  1036.         btfsc        c
  1037.         goto        lbAlarmFlash
  1038.         clrf        var1
  1039.         movlw        0x80                        ;led1_o
  1040.         xorwf        pt1,F
  1041.         incf        var2,F
  1042.         movfw        var2
  1043.         sublw        9
  1044.         btfsc        c
  1045.         goto        lbAlarmFlash
  1046.         goto        lbGotoSleepNow
  1047.         
  1048. ;******************************************************************************
  1049. ;【說明】：        充電電量檢測
  1050. ;【輸入】：        無
  1051. ;【輸出】：        無
  1052. ;******************************************************************************
  1053. fnChgVolDet:        
  1054.         movlw        high(tblChgVolLevel)
  1055.         movwf        eadrh
  1056.         movfw        volume
  1057.         addlw        low(tblChgVolLevel)
  1058.         movwf        eadrl
  1059.         btfsc        c
  1060.         incf        eadrh,F
  1061.         movp
  1062.         subwf        totVolL,W
  1063.         movfw        edath
  1064.         subwfc        totVolH,W
  1065.         btfss        c
  1066.         clrf        cVolOffset
  1067.         
  1068.         incfsz        cVolOffset,F
  1069.         goto        lbChgVolDetExit
  1070.         movfw        volume
  1071.         xorlw        BAT_VOLUME_100
  1072.         btfss        z
  1073.         incf        volume,F
  1074. lbChgVolDetExit:
  1075.         return
  1076.         
  1077. ;******************************************************************************
  1078. ;【說明】：        放電電量檢測
  1079. ;【輸入】：        無
  1080. ;【輸出】：        無
  1081. ;******************************************************************************
  1082. fnDisVolDet:
  1083.         btfsc        fRunOn
  1084.         goto        lbChkBatteryLow
  1085.         
  1086.         movlw        high(tblDisVolLevel)
  1087.         movwf        eadrh
  1088.         movfw        volume
  1089.         addlw        low(tblDisVolLevel)
  1090.         movwf        eadrl
  1091.         btfsc        c
  1092.         incf        eadrh,F
  1093.         movp
  1094.         subwf        totVolL,W
  1095.         movfw        edath
  1096.         subwfc        totVolH,W
  1097.         btfsc        c
  1098.         clrf        cVolOffset
  1099.         
  1100.         incfsz        cVolOffset,F
  1101.         goto        lbDisVolDetExit
  1102.         movfw        volume
  1103.         xorlw        0
  1104.         btfss        z
  1105.         decf        volume,F
  1106.         movfw        volume
  1107.         xorlw        0
  1108.         btfsc        z
  1109.         bsf        fBatLow
  1110. lbDisVolDetExit:
  1111.         return

  1113. lbChkBatteryLow:
  1114.         movlw        low(TOT_VOL_5500MV)
  1115.         subwf        totVolL,W
  1116.         movlw        high(TOT_VOL_5500MV)
  1117.         subwfc        totVolH,W
  1118.         btfsc        c
  1119.         clrf        cVolOffset
  1120.         
  1121.         incfsz        cVolOffset,F
  1122.         goto        lbDisVolDetExit
  1123.         bsf        fBatLow
  1124.         clrf        volume
  1125.         call        lbChangeToOff                        ;電池低電，關機報警
  1126.         goto        lbDisVolDetExit

  1128. ;==================================
  1129. fnSelectMotorCurrent:
  1130.         movlw        0x82                                ;內部1.4V
  1131.         movwf        sradcon1
  1132.         movlw        CH_MOTOR_CUR
  1133.         movwf        sradcon2
  1134.         movlw        00100000b
  1135.         movwf        pt3con                ;pt3.5為AD口
  1136.         return

  1138. fnSelectBatVoltage1:
  1139.         movlw        0x80
  1140.         movwf        sradcon1
  1141.         movlw        CH_BAT_VOL1
  1142.         movwf        sradcon2
  1143.         movlw        00010000b
  1144.         movwf        pt3con                ;pt3.4為AD口
  1145.         return

  1147. fnSelectBatVoltage2:
  1148.         movlw        0x80
  1149.         movwf        sradcon1
  1150.         movlw        CH_BAT_VOL2
  1151.         movwf        sradcon2
  1152.         movlw        01000000b
  1153.         movwf        pt3con                ;pt3.6為AD口
  1154.         return

  1156. fnSelectUSBDc:
  1157.         movlw        0x80
  1158.         movwf        sradcon1
  1159.         movlw        CH_USB_DC
  1160.         movwf        sradcon2
  1161.         movlw        00000001b
  1162.         movwf        pt3con                ;pt3.0為AD口
  1163.         return

  1165. ;******************************************************************************
  1166. ;【說明】：        馬達控制
  1167. ;【輸入】：        無
  1168. ;【輸出】：        無
  1169. ;******************************************************************************
  1170. fnMotorCtrl:
  1171.         btfss        fRunOn
  1172.         goto        lbMotorCtrlExit

  1174. ;        1、馬達啟動時，在剛啟動300ms之內尋找最大值，300ms之后比較電流值和最大值，如果電流值比最大值小10MV以上，認為
  1175. ;        馬達工作正常，否則認為堵轉；
  1176. ;        2、在馬達正常工作中，尋找最大值，如果最大值比正常值大于10MV以上時，認為發生堵轉。
  1177.         movlw        low(EMPTY_MIN_CUR)
  1178.         movwf        var2
  1179.         movlw        high(EMPTY_MIN_CUR)
  1180.         movwf        var1
  1181.         btfss        fEmptyMotor
  1182.         goto        $+5
  1183.         movlw        low(EMPTY_MAX_CUR)
  1184.         movwf        var2
  1185.         movlw        high(EMPTY_MAX_CUR)
  1186.         movwf        var1
  1187.         
  1188.         movfw        var2
  1189.         subwf        motorCurL,W
  1190.         movfw        var1
  1191.         subwfc        motorCurH,W
  1192.         btfss        c
  1193.         incf        cEmptyMotor,F
  1194.         
  1195.         incf        cMotorPeriod,F
  1196.         movfw        cMotorPeriod
  1197.         sublw        99                                ;100*2ms=200ms
  1198.         btfsc        c
  1199.         goto        lbChkBlockCur
  1200.         
  1201.         clrf        cMotorPeriod
  1202.         movfw        cEmptyMotor
  1203.         sublw        70                                ;100*70%=70
  1204.         btfss        c
  1205.         bsf        fEmptyMotor                        ;>70%時，認為空載
  1206.         
  1207.         movfw        cEmptyMotor
  1208.         sublw        30                                ;100*30%=30
  1209.         btfsc        c
  1210.         bcf        fEmptyMotor                        ;<30%時，認為正常負載
  1211.         
  1212.         clrf        cEmptyMotor
  1213.         btfss        fEmptyMotor
  1214.         clrf        tMotorDly                        ;沒有空載時，清計數器
  1215. lbChkBlockCur:
  1216.         btfsc        fEmptyMotor
  1217.         goto        lbMotorRunDly                        ;空載延時控制
  1218.         btfss        fEnWaitDly
  1219.         goto        lbNormalRunChk

  1221.         ;馬達啟動時，堵轉監測
  1222.         movfw        motorCurL
  1223.         subwf        motorMaxCurL,W
  1224.         movfw        motorCurH
  1225.         subwfc        motorMaxCurH,W
  1226.         btfsc        c
  1227.         goto        $+5
  1228.         movfw        motorCurH
  1229.         movwf        motorMaxCurH
  1230.         movfw        motorCurL
  1231.         movwf        motorMaxCurL
  1232.         
  1233.         incfsz        tWaitDly,F                        ;256*2ms=512ms
  1234.         goto        lbMotorRunDly
  1235.         
  1236.         bcf        fEnWaitDly
  1237.         movlw        2;5;10;40;87                        ;13mV
  1238.         addwf        motorCurL,F
  1239.         movlw        0
  1240.         addwfc        motorCurH,F
  1241.         movfw        motorCurL
  1242.         subwf        motorMaxCurL,W
  1243.         movfw        motorCurH
  1244.         subwfc        motorMaxCurH,W
  1245.         btfss        c
  1246.         goto        lbMotorCurTooBig                ;最大值-當前值 < 13mV時，認為堵轉
  1247.         movlw        0xff
  1248.         movwf        motorMinCurH
  1249.         movwf        motorMinCurL
  1250.         goto        lbMotorRunDly

  1252. lbMotorCurRisingHigh:
  1253.         bsf        fEnWaitDly
  1254.         clrf        tWaitDly
  1255.         movfw        motorCurH
  1256.         movwf        motorMaxCurH
  1257.         movfw        motorCurL
  1258.         movwf        motorMaxCurL
  1259.         goto        lbMotorRunDly
  1260.         
  1261. lbNormalRunChk:                ;正常運轉時，堵轉監測
  1262.         movfw        motorCurL
  1263.         subwf        motorMinCurL,W
  1264.         movfw        motorCurH
  1265.         subwfc        motorMinCurH,W
  1266.         btfss        c
  1267.         goto        $+5
  1268.         movfw        motorCurH
  1269.         movwf        motorMinCurH
  1270.         movfw        motorCurL
  1271.         movwf        motorMinCurL

  1273.         movlw        160                                ;55mV
  1274.         addwf        motorMinCurL,F
  1275.         movlw        0
  1276.         addwfc        motorMinCurH,F
  1277.         movfw        motorCurL
  1278.         subwf        motorMinCurL,W
  1279.         movfw        motorCurH
  1280.         subwfc        motorMinCurH,W
  1281.         btfss        c
  1282.         goto        lbMotorCurRisingHigh        ;lbMotorCurTooBig                ;當前值-最小值 > 55mV以上時，認為堵轉
  1283.         movlw        160
  1284.         subwf        motorMinCurL,F
  1285.         movlw        0
  1286.         subwfc        motorMinCurH,F
  1287.         
  1288.         movlw        low(BLOCK_CURRENT)
  1289.         subwf        motorCurL,W
  1290.         movlw        high(BLOCK_CURRENT)
  1291.         subwfc        motorCurH,W
  1292.         btfsc        c
  1293.         goto        lbMotorCurTooBig                ;當前值太大，認為堵轉

  1295. lbMotorRunDly:
  1296.         incf        tRunMSec,F
  1297.         movfw        tRunMSec
  1298.         sublw        249                                ;250*2ms=500ms
  1299.         btfsc        c
  1300.         goto        lbMotorCtrlExit
  1301.         
  1302.         clrf        tRunMSec
  1303.         incf        tMotorDly,F
  1304.         movfw        tMotorDly
  1305.         sublw        10                                ;10*0.5s=5s
  1306.         btfss        c
  1307.         goto        lbCloseMotor
  1308.         incf        tRunSec,F
  1309.         movfw        tRunSec
  1310.         sublw        59                                ;60*0.5s=30s
  1311.         btfsc        c
  1312.         goto        lbMotorCtrlExit

  1314.         ;開啟一分鐘延時，如果一分鐘之內再次開啟，則累加次數，
  1315.         ;連續工作5次后，需等待10分鐘才能重新啟動
  1316.         bsf        fWorkedDly
  1317.         clrf        tWorkedDlySec
  1318.         clrf        tWorkedDlyMsec
  1319.         
  1320.         incf        cNormalWork,F
  1321.         movfw        cNormalWork
  1322.         sublw        4                                ;5次
  1323.         btfsc        c
  1324.         goto        lbCloseMotor
  1325.         bsf        fNeedCoolDown
  1326.         clrf        tCoolMin
  1327.         clrf        tCoolSec
  1328.         clrf        tCoolMsec
  1329. lbCloseMotor:
  1330.         call        lbChangeToOff
  1331. lbMotorCtrlExit:
  1332.         return

  1334. lbMotorCurTooBig:
  1335.         call        lbChangeToOff
  1336.         bsf        fEnAlarmDly
  1337.         clrf        tAlarmDly                        ;三秒內不能按鍵
  1338.         clrf        tWaitDly
  1339.         bsf        fBuzOn
  1340.         movlw        5
  1341.         movwf        cBuzTime                        ;響三次
  1342.         clrf        tBuzTime
  1343.         goto        lbMotorCtrlExit

  1345. ;********************************************************************
  1346. fnOverLoadCtrl:
  1347.         btfss        fEnAlarmDly
  1348.         goto        lbOverLoadCtrlExit
  1349.         
  1350.         movfw        cBuzTime
  1351.         xorlw        0
  1352.         btfsc        z
  1353.         goto        lbOverLoadDlyCnt
  1354.         
  1355.         incf        tBuzTime,F
  1356.         movfw        tBuzTime
  1357.         sublw        61                                ;62*2ms=124ms
  1358.         btfsc        c
  1359.         goto        lbOverLoadDlyCnt
  1360.         
  1361.         clrf        tBuzTime
  1362.         movlw        1                ;fBuzOn
  1363.         xorwf        buzFlag,F
  1364.         btfss        fBuzOn
  1365.         bcf        buz_o                                ;暫停期間，輸出低電平
  1366.         decfsz        cBuzTime,F
  1367.         goto        lbOverLoadDlyCnt
  1368.         bcf        fBuzOn
  1369.         bcf        buz_o
  1370. lbOverLoadDlyCnt:
  1371.         incf        tWaitDly,F
  1372.         movfw        tWaitDly
  1373.         sublw        249                                ;250*2ms=500ms
  1374.         btfsc        c
  1375.         goto        lbOverLoadCtrlExit
  1376.         
  1377.         clrf        tWaitDly
  1378.         incf        tAlarmDly,F
  1379.         movfw        tAlarmDly
  1380.         sublw        5                                ;6*0.5s=3s
  1381.         btfsc        c
  1382.         goto        lbOverLoadCtrlExit
  1383.         bcf        fEnAlarmDly
  1384. lbOverLoadCtrlExit:
  1385.         return

  1387. ;********************************************************************
  1388. fnWaitCoolDown:
  1389.         btfss        fWorkedDly
  1390.         goto        lbChkCoolDownDly
  1391.         
  1392.         incf        tWorkedDlyMsec,F
  1393.         movfw        tWorkedDlyMsec
  1394.         sublw        249                                ;250*2ms=500ms
  1395.         btfsc        c
  1396.         goto        lbChkCoolDownDly
  1397.         
  1398.         clrf        tWorkedDlyMsec
  1399.         incf        tWorkedDlySec,F
  1400.         movfw        tWorkedDlySec
  1401.         sublw        119                                ;120*0.5s=60s
  1402.         btfsc        c
  1403.         goto        lbChkCoolDownDly
  1404.         
  1405.         clrf        tWorkedDlySec
  1406.         bcf        fWorkedDly                        ;滿1分鐘，重新累加次數
  1407.         clrf        cNormalWork                        ;清除累加次數

  1409. lbChkCoolDownDly:
  1410.         btfss        fNeedCoolDown
  1411.         goto        lbWaitCoolDownExit
  1412.         
  1413.         incf        tCoolMsec,F
  1414.         movfw        tCoolMsec
  1415.         sublw        249                                ;250*2ms=500ms
  1416.         btfsc        c
  1417.         goto        lbWaitCoolDownExit
  1418.         
  1419.         clrf        tCoolMsec
  1420.         incf        tCoolSec,F
  1421.         movfw        tCoolSec
  1422.         sublw        119                                ;120*0.5s=60s
  1423.         btfsc        c
  1424.         goto        lbWaitCoolDownExit
  1425.         
  1426.         clrf        tCoolSec
  1427.         incf        tCoolMin,F
  1428.         movfw        tCoolMin
  1429.         sublw        9                                ;10*1min=10min
  1430.         btfsc        c
  1431.         goto        lbWaitCoolDownExit
  1432.         bcf        fNeedCoolDown
  1433.         clrf        cNormalWork
  1434. lbWaitCoolDownExit:
  1435.         return

  1437. ;********************************************************************
  1438. ;【說明】：        初始化
  1439. ;********************************************************************
  1440. ;程序開始
  1441. fnAllDefaultSet:

  1443. ;====================================================================
  1444. ;MCK寄存器說明：建議按位操作,默認值為1010uuu0
  1445. ;bit7:CST:        1=外部晶振關閉
  1446. ;                0=外部晶振打開
  1447. ;bit6:CST_IN:        1=內部晶振關閉
  1448. ;                0=內部晶振打開
  1449. ;bit5:CST_WDT:        1=內部WDT晶振關閉
  1450. ;                0=內部WDT晶振打開
  1451. ;bit4:EO_SLP :        1=如果選擇的是外部低速晶振，在sleep模式下不關閉外部晶振、
  1452. ;                0=sleep模式下關閉外部晶振
  1453. ;bit0:CLK_SEL:        1=外部晶振系統時鐘
  1454. ;                0=內部晶振系統時鐘
  1455. ;====================================================================
  1456.         bcf        cst_in
  1457.         bsf        cst
  1458.         bcf        cst_wdt
  1459.         bcf        eo_slp
  1460.         bcf        clksel
  1461.         
  1462. ;====================================================================
  1463. ;INTF中斷標志寄存器，硬件置位，軟件清零
  1464. ;bit7:        未定義
  1465. ;bit6:        TM2IF        1=12-Bit定時/計數器2發生定時中斷
  1466. ;                0=12-Bit定時/計數器2未發生定時中斷
  1467. ;bit5:        未定義
  1468. ;bit4:        TM0IF        1=8-Bit定時器0發生定時中斷
  1469. ;                0=8-Bit定時器0未發生定時中斷
  1470. ;bit3:        SRADIF        1=AD發生中斷
  1471. ;                0=AD未發生中斷
  1472. ;bit2:        未定義
  1473. ;bit1:        E1IF        1=外部中斷1發生中斷
  1474. ;                0=外部中斷1未發生中斷
  1475. ;bit0:        E0IF        1=外部中斷0發生中斷
  1476. ;                0=外部中斷0未發生中斷
  1477. ;====================================================================
  1478.         clrf        intf                ;清除中斷標志

  1480. ;====================================================================
  1481. ;INTF2中斷標志寄存器，硬件置位，軟件清零
  1482. ;bit7:        未定義
  1483. ;bit6:        未定義
  1484. ;bit5:        TM4IF        1=12-Bit定時/計數器4發生定時中斷
  1485. ;                0=12-Bit定時/計數器4未發生定時中斷
  1486. ;bit4:        TM3IF        1=12-Bit定時/計數器3發生定時中斷
  1487. ;                0=12-Bit定時/計數器3未發生定時中斷
  1488. ;====================================================================
  1489.         clrf        intf2
  1490.         
  1491. ;====================================================================
  1492. ;INTF3中斷標志寄存器，硬件置位，軟件清零
  1493. ;bit7:        CMPIF        1=比較器發生中斷
  1494. ;                0=比較器未發生中斷
  1495. ;bit6~bit2：        未定義
  1496. ;bit1:        URTIF        1=串口通訊發生發送中斷
  1497. ;                0=串口通訊未發生發送中斷
  1498. ;bit0:        URRIF        1=串口通訊發生接收中斷
  1499. ;                0=串口通訊未發生接收中斷
  1500. ;====================================================================
  1501.         clrf        intf3

  1503. ;====================================================================
  1504. ;INTE中斷使能寄存器：
  1505. ;bit7:        GIE        1=使能所有非屏蔽中斷
  1506. ;                0=不使能所有中斷
  1507. ;bit6:        TM2IE        1=使能12-Bit定時/計數器2中斷
  1508. ;                0=禁能12-Bit定時/計數器2中斷
  1509. ;bit5:        未定義
  1510. ;bit4:        TM0IE        1=使能8-Bit定時器0中斷
  1511. ;                0=禁能8-Bit定時器0中斷
  1512. ;bit3:        SRADIE        1=使能AD中斷
  1513. ;                0=禁能AD中斷
  1514. ;bit2:        未定義
  1515. ;bit1:        E1IE        1=使能外部中斷1
  1516. ;                0=禁能外部中斷1
  1517. ;bit0:        E0IE        1=使能外部中斷0
  1518. ;                0=禁能外部中斷0
  1519. ;====================================================================
  1520.         clrf        inte

  1522. ;====================================================================
  1523. ;INTE2中斷使能寄存器：
  1524. ;bit7:        未定義
  1525. ;bit6:        未定義
  1526. ;bit5:        TM4IE        1=使能12-Bit定時/計數器4中斷
  1527. ;                0=禁能12-Bit定時/計數器4中斷
  1528. ;bit4:        TM3IE        1=使能12-Bit定時/計數器3中斷
  1529. ;                0=禁能12-Bit定時/計數器3中斷
  1530. ;bit3~bit0:        未定義
  1531. ;====================================================================
  1532.         clrf        inte2

  1534. ;====================================================================
  1535. ;INTE3中斷使能寄存器：
  1536. ;bit7:        CMPIE        1=使能比較器中斷
  1537. ;                0=禁能比較器中斷
  1538. ;bit6~bit2:        未定義
  1539. ;bit1:        URTIE        1=使能UART的發送中斷
  1540. ;                0=禁能UART的發送中斷
  1541. ;bit0:        URRIE        1=使能UART的接收中斷
  1542. ;                0=禁能UART的接收中斷
  1543. ;====================================================================
  1544.         clrf        inte3

  1546. ;====================================================================
  1547. ;PT1CON:外部中斷1、0中斷觸發沿設定
  1548. ;bit7:        PT11OD        1=使能PT1.1漏極開路
  1549. ;                0=禁能PT1.1漏極開路
  1550. ;bit6:        PT1W3        1=使能PT1.5外部中斷1
  1551. ;                0=禁能PT1.5外部中斷1
  1552. ;bit5:        PT1W2        1=使能PT1.4外部中斷1
  1553. ;                0=禁能PT1.4外部中斷1
  1554. ;bit4:        PT1W1        1=使能PT1.3外部中斷1
  1555. ;                0=禁能PT1.3外部中斷1
  1556. ;bit3:        PT1W0        1=使能PT1.1外部中斷1
  1557. ;                0=禁能PT1.1外部中斷1
  1558. ;bit2:        E1M        1=外部中斷1為下降沿觸發
  1559. ;                0=外部中斷1為狀態改變時觸發
  1560. ;bit1~0:E0M        11=外部中斷0為狀態改變時觸發
  1561. ;                10=外部中斷0為狀態改變時觸發
  1562. ;                01=外部中斷0為上升沿觸發
  1563. ;                00=外部中斷0為下降沿觸發
  1564. ;====================================================================
  1565. ;本例程沒有使用該功能，若用戶使用，請自行添加

  1567. ;====================================================================
  1568. ;PT1CON1:外部中斷1設定
  1569. ;bit7~bit4:        未定義
  1570. ;bit3:        PT1W23        1=使能PT3.1外部中斷1
  1571. ;                0=禁能PT3.1外部中斷1
  1572. ;bit2:        PT1W22        1=使能PT1.7外部中斷1
  1573. ;                0=禁能PT1.7外部中斷1
  1574. ;bit1:        PT1W21        1=使能PT1.6外部中斷1
  1575. ;                0=禁能PT1.6外部中斷1
  1576. ;bit0:        PT1W20        1=使能PT1.2外部中斷1
  1577. ;                0=禁能PT1.2外部中斷1
  1578. ;====================================================================
  1579. ;本例程沒有使用該功能，若用戶使用，請自行添加

  1581. ;====================================================================
  1582. ;-----------SRADCON0-----------:
  1583. ;bit7/bit6:        未定義
  1584. ;bit5/bit4:        SRADACKS[1:0]ADC輸入信號獲取時間
  1585. ;                00=16個ADC時鐘        01=8個ADC時鐘        10=4個ADC時鐘        11=2個ADC時鐘
  1586. ;bit3/bit2:        未定義
  1587. ;bit1/bit0:        SRADCKS[1:0]ADC時鐘
  1588. ;                00=CPUCLK        01=CPUCLK/2        10=CPUCLK/4        11=CPUCLK/8
  1589. ;-----------SRADCON1-----------:
  1590. ;bit7:        SRADEN        :ADC使能位                1=使能                        0=禁止
  1591. ;bit6:        SRADS        :ADC啟動位/狀態控制位        1=開始，轉換過程中        0=停止，轉換結束
  1592. ;bit5:        OFTEN        :轉換結果選擇控制位        1=存放在SROFT寄存器        0=存放在SRAD寄存器
  1593. ;bit4:        CALIF        :矯正控制位(OFTEN為0時有效)        1=使能矯正        0=禁止矯正
  1594. ;bit3:        ENOV        :使能比較器溢出模式(CALIF為1時有效)        1=使能        0=禁止
  1595. ;bit2:        OFFEX        :OFFSET交換        1=比較器兩端信號交換        0=不交換(正端為信號，負端為參考電壓)
  1596. ;bit1/bit0:VREFS[1:0]ADC參考電源選擇,不同參考電源切換，建議延遲10us再做AD轉換
  1597. ;                00=VDD
  1598. ;                01=PT3.0外部參考電源輸入
  1599. ;                10=內部參考電壓
  1600. ;                11=內部參考電壓,PT3.0可外接電容做為內置參考電壓濾波使用，以提高精度
  1601. ;-----------SRADCON2-----------:
  1602. ;bit7~bit4:        CHS[3:0]ADC輸入通道選擇位
  1603. ;                0000=AIN0        0001=AIN1        0010=AIN2        0011=AIN3
  1604. ;                0100=AIN4        0101=AIN5        0110=AIN6        0111=AIN7
  1605. ;                1000=AIN8        1001=內部1/8VDD        1010=內部參考電壓
  1606. ;bit3/bit2:        未定義
  1607. ;bit1/bit0:        REF_SEL[1:0]        VREFS[1:0]配置為10或11，則可通過REF_SEL[1:0]選擇如下
  1608. ;                參考電壓，若VREFS[1:0]不是配置為10或11，以下位無效
  1609. ;                00=1.4V                01=2.0V                10=3.0V                11=4.0V
  1610. ;-----------SRADH/SRADL--------:
  1611. ;SRADH:        SRAD[11:8]ADC數據高4位，只可讀
  1612. ;SRADL:        SRAD[7:0]ADC數據低8位，只可讀
  1613. ;-----------SROFTH/SROFTL------:
  1614. ;SROFTH:SROFT[11:8]矯正值數據的高4位
  1615. ;SROFTL:SROFT[7:0]矯正值數據的低8位
  1616. ;-----------METCH--------------:
  1617. ;bit5:        REFOEN:        內部參考電壓從PT3.0輸出使能位，輸出REF_SEL[1:0]選擇的內部參考電壓
  1618. ;                0=禁止內部參考電壓輸出
  1619. ;                1=使能內部參考電壓輸出
  1620. ;bit4:        REFIN:        外部參考電壓輸入端口選擇
  1621. ;                0=選擇PT3.0作為參考電壓輸入
  1622. ;                1=選擇PT3.2作為參考電壓輸入
  1623. ;bit3:        METCH[3]:0=禁止ERC時鐘輸出
  1624. ;                 1=使能ERC時鐘通過PT1.5口輸出
  1625. ;bit2:        METCH[2]:0=使能寄存器TRIM_EX的值來微調ERC頻率
  1626. ;                 1=禁止ERC頻率微調控制
  1627. ;bit0:        P13OD:        PT1.3開漏輸出使能
  1628. ;                 0=做為輸入口        1=開漏輸出
  1629. ;====================================================================
  1630.         movlw        00110000b                        ;ADC輸入信號獲取時間：2個ADC時鐘，采樣時間：CPUCLK
  1631.         movwf        sradcon0
  1632.         movlw        00000000b                        ;參考電壓:VDD
  1633.         movwf        sradcon1
  1634.         movlw        01000000b                        ;AIN4
  1635.         movwf        sradcon2
  1636.         clrf        sradl
  1637.         clrf        sradh
  1638.         clrf        sroftl
  1639.         clrf        srofth
  1640.         bsf        sraden                                ;使能ADC

  1642. ;====================================================================
  1643. ;SYSCFG0:輸入邏輯電平電壓配置
  1644. ;bit7:VTHSEL  --------------------------------------------------
  1645. ;            |  |符號|     參數     |最小值 |典型值|最大值 |單位|
  1646. ;            |--+----+--------------+-------+------+-------+----|
  1647. ;            |  |    |數字輸入高電平|0.75Vdd|      |       | V  |
  1648. ;            |  |VIH1|--------------+-------+------+-------+----|
  1649. ;            |  |    |復位輸入高電平|0.8Vdd |      |       | V  |
  1650. ;            | 0|----+--------------+-------+------+-------+----|
  1651. ;            |  |    |數字輸入低電平|       |      |0.3Vdd | V  |
  1652. ;            |  |VIL1|--------------+-------+------+-------+----|
  1653. ;            |  |    |復位輸入低電平|       |      |0.2Vdd | V  |
  1654. ;            |--+----+--------------+-------+------+-------+----|
  1655. ;            |  |    |數字輸入高電平|0.5Vdd |      |       | V  |
  1656. ;            |  |VIH2|--------------+-------+------+-------+----|
  1657. ;            |  |    |復位輸入高電平|0.5Vdd |      |       | V  |
  1658. ;            | 1|-------------------+-------+------+-------+----|
  1659. ;            |  |    |數字輸入低電平|       |      |0.2Vdd | V  |
  1660. ;            |  |VIL2|--------------+-------+------+-------+----|
  1661. ;            |  |    |復位輸入低電平|       |      |0.1Vdd | V  |
  1662. ;             --------------------------------------------------
  1663. ;bit5~4:VTHP30-----------------------------------------------
  1664. ;            |  |符號| 參數     |最小值 |典型值 |最大值 |單位|
  1665. ;            |--+----+----------+-------+-------+-------+----|
  1666. ;            |  |VIH1|輸入高電平|0.75Vdd|       |       | V  |
  1667. ;            |00|----+----------+-------+-------+-------+----|
  1668. ;            |  |VIL1|輸入低電平|       |       |0.3Vdd | V  |
  1669. ;            |--+----+----------+-------+-------+-------+----|
  1670. ;            |  |VIH |輸入高電平|       |  0.7  |       | V  |
  1671. ;            |01|----+----------+-------+-------+-------+----|
  1672. ;  PT3.0     |  |VIL |輸入低電平|       |  0.7  |       | V  |
  1673. ;            |--+----+----------+-------+-------+-------+----|
  1674. ;            |  |VIH |輸入高電平|       |Vdd-0.7|       | V  |
  1675. ;            |10|----+----------+-------+-------+-------+----|
  1676. ;            |  |VIL |輸入低電平|       |Vdd-0.7|       | V  |
  1677. ;            |--+----+----------+-------+-------+-------+----|
  1678. ;            |  |VIH2|輸入高電平|0.5Vdd |       |       | V  |
  1679. ;            |11|----+----------+-------+-------+-------+----|
  1680. ;            |  |VIL2|輸入低電平|       |       |0.2Vdd | V  |
  1681. ;             -----------------------------------------------
  1682. ;bit3:P30REFEN        0=關閉內部基準
  1683. ;                1=打開內部基準
  1684. ;====================================================================

  1686. ;====================================================================
  1687. ;定時器0配置，相關寄存器為：INTF/INTE/TM0CON/TM0IN/TM0CNT
  1688. ;TM0CON:
  1689. ;bit7(T0EN):0=禁止定時器0;        1=使能定時器0
  1690. ;bit6~4(T0RATE2:0):定時器0時鐘分頻選擇
  1691. ;        000=CKT0        001=CKT0/2        010=CKT0/4        011=CKT0/8
  1692. ;        100=CKT0/16        101=CKT0/32        110=CKT0/64        111=CKT0/128
  1693. ;bit3:未定義
  1694. ;bit2:(T0RSTB):定時器0復位        0=使能定時器0復位        1=禁止定時器0復位
  1695. ;bit1~0(T0SEL[1:0]):時鐘源選擇        00=CPUCLK
  1696. ;                                01=MCK
  1697. ;                                10=外部32768Hz晶振時鐘
  1698. ;                                11=內部32768 WDT時鐘
  1699. ;TM0IN:定時器0溢出值
  1700. ;TM0CNT:定時器0計數寄存器
  1701. ;====================================================================
  1702. ifdef _DEBUG_
  1703. ;{
  1704.         movlw        0x20
  1705.         movwf        tm0con
  1706.         movlw        103                                ;9600bps
  1707.         movwf        tm0in
  1708. ;}
  1709. else
  1710. ;{
  1711.         movlw        SYS_BAS_CLK
  1712.         movwf        tm0con
  1713.         movlw        SYS_BAS_CNT
  1714.         movwf        tm0in
  1715. ;}
  1716. endif
  1717.         bcf        t0rstb
  1718.         bsf        t0en
  1719.         bsf        tm0ie

  1721. ;====================================================================
  1722. ;定時/計數器2配置，相關寄存器為：INTF/INTE/TM2CON/TM2IN/TM2CNT/TM2R
  1723. ;/TM2INH/TM2CNTH/TM2RH/TMCON/TMCON2
  1724. ;TM2CON:
  1725. ;;bit7(T2EN):0=禁止定時器2;        1=使能定時器2
  1726. ;bit6~4(T2RATE2:0):定時器2時鐘分頻選擇
  1727. ;        000=CKT2        001=CKT2/2        010=CKT2/4        011=CKT2/8
  1728. ;        100=CKT2/16        101=CKT2/32        110=CKT2/64        111=CKT2/128
  1729. ;bit3:T2CKS
  1730. ;        1=PT3.0做為時鐘源        0=CKT2的分頻時鐘做為時鐘源
  1731. ;bit2:(T2RSTB):定時器2復位        0=使能定時器2復位        1=禁止定時器2復位
  1732. ;bit1:T2OUT        PT1.4口輸出控制        PWM2PO        PWM2OUT        T2OUT        
  1733. ;bit0:PWM2OUT                        0        0        0        IO輸出
  1734. ;                                0        0        1        蜂鳴器輸出
  1735. ;                                0        1        0        PWM2輸出
  1736. ;                                0        1        1        PWM2輸出
  1737. ;                                1        x        x        IO輸出
  1738. ;TM2IN:        定時器2溢出值
  1739. ;TM2CNT:定時器2計數寄存器
  1740. ;TM2R:        定時/計數器2的PWM高電平占空比控制寄存器
  1741. ;TM2INH:定時/計數器2溢出值高4位
  1742. ;TM2CNTH:定時/計數器2計數寄存器高4位
  1743. ;TM2RH        :定時/計數器2的PWM高電平占空比控制寄存器高4位
  1744. ;====================================================================
  1745.         bcf        t2sel1                                ;MCK做為時鐘源
  1746.         bsf        t2sel0                                ;
  1747.         movlw        0x00                                ;1:1，關閉PWM2輸出
  1748.         movwf        tm2con
  1749.         movlw        127
  1750.         movwf        tm2in                                ;125kHZ
  1751.         clrf        tm2inh
  1752.         clrf        tm2r
  1753.         clrf        tm2rh
  1754.         bcf        t2rstb
  1755.         bcf        pwm2po                                ;使能PT1.4口做為TM2的輸出
  1756.         bsf        t2en

  1758. ;====================================================================
  1759. ;定時/計數器3配置，相關寄存器為：INTF2/INTE2/TM3CON/TM3IN/TM3CNT/TM3R
  1760. ;/TM3INH/TM3CNTH/TM3RH/TMCON/TM3CON2/TMCON2
  1761. ;TM3CON:
  1762. ;;bit7(T3EN):0=禁止定時器3;        1=使能定時器3
  1763. ;bit6~4(T3RATE2:0):定時器3時鐘分頻選擇
  1764. ;        000=CKT3        001=CKT3/2        010=CKT3/4        011=CKT3/8
  1765. ;        100=CKT3/16        101=CKT3/32        110=CKT3/64        111=CKT3/128
  1766. ;bit3:T3CKS
  1767. ;        1=PT3.1做為時鐘源        0=CKT3的分頻時鐘做為時鐘源
  1768. ;bit2:(T3RSTB):定時器3復位        0=使能定時器3復位        1=禁止定時器3復位
  1769. ;bit1:T3OUT        PT1.5口輸出控制        PWM3PO        PWM3OUT        T3OUT        
  1770. ;bit0:PWM3OUT                        0        0        0        IO輸出
  1771. ;                                0        0        1        蜂鳴器輸出
  1772. ;                                0        1        0        PWM3輸出
  1773. ;                                0        1        1        PWM3輸出
  1774. ;                                1        x        x        IO輸出
  1775. ;TM3IN:        定時器3溢出值
  1776. ;TM3CNT:定時器3計數寄存器
  1777. ;TM3R:        定時/計數器3的PWM高電平占空比控制寄存器
  1778. ;TM3INH:定時/計數器3溢出值高4位
  1779. ;TM3CNTH:定時/計數器3計數寄存器高4位
  1780. ;TM3RH        :定時/計數器3的PWM高電平占空比控制寄存器高4位
  1781. ;====================================================================

  1783. ;====================================================================
  1784. ;定時/計數器4配置，相關寄存器為：INTF2/INTE/TM4CON/TM4IN/TM4CNT/TM4R
  1785. ;/TM4INH/TM4CNTH/TM4RH/TMCON/TMCON2
  1786. ;TM4CON:
  1787. ;;bit7(T4EN):0=禁止定時器4;        1=使能定時器4
  1788. ;bit6~4(T4RATE2:0):定時器4時鐘分頻選擇
  1789. ;        000=CKT4        001=CKT4/2        010=CKT4/4        011=CKT4/8
  1790. ;        100=CKT4/16        101=CKT4/32        110=CKT4/64        111=CKT4/128
  1791. ;bit3:T4CKS
  1792. ;        1=PT1.4做為時鐘源        0=CKT4的分頻時鐘做為時鐘源
  1793. ;bit2:(T4RSTB):定時器4復位        0=使能定時器4復位        1=禁止定時器4復位
  1794. ;bit1:T4OUT        PT1.6口輸出控制        PWM4PO        PWM4OUT        T4OUT        
  1795. ;bit0:PWM4OUT                        0        0        0        IO輸出
  1796. ;                                0        0        1        蜂鳴器輸出
  1797. ;                                0        1        0        PWM4輸出
  1798. ;                                0        1        1        PWM4輸出
  1799. ;                                1        x        x        IO輸出
  1800. ;TM4IN:        定時器4溢出值
  1801. ;TM4CNT:定時器4計數寄存器
  1802. ;TM4R:        定時/計數器4的PWM高電平占空比控制寄存器
  1803. ;TM4INH:定時/計數器4溢出值高4位
  1804. ;TM4CNTH:定時/計數器4計數寄存器高4位
  1805. ;TM4RH        :定時/計數器4的PWM高電平占空比控制寄存器高4位
  1806. ;====================================================================
  1807.         
  1808. ;====================================================================
  1809.         bsf        tm0ie
  1810.         bsf        gie
  1811.         
  1812.         btfsc        to
  1813.         goto        lbAllDefaultSetEnd                ;看門狗復位時不初始化RAM
  1814. lbClrRam:
  1815.         ;--------清除RAM----------
  1816.         movlw        0x80
  1817.         movwf        fsr0
  1818. lbClrRamLoop:
  1819.         clrf        ind0
  1820.         incfsz        fsr0,F
  1821.         goto        lbClrRamLoop
  1822.         
  1823.         bsf        fRstRun
  1824.         call        fnInitSamp

  1826. lbPwrRstWait:
  1827.         btfss        fBat2ms
  1828.         goto        $-1
  1829.         bcf        fBat2ms
  1830.         incf        var1,F
  1831.         movfw        var1
  1832.         sublw        49                                ;50*2ms=100ms
  1833.         btfsc        c
  1834.         goto        lbPwrRstWait
  1835.         clrf        var1
  1836.         
  1837. ;====================================================================
  1838. ;IO口初始化部分(x代表1/3)
  1839. ;PTx............IO口寄存器
  1840. ;
  1841. ;PTxEN..........輸入/輸出控制寄存器：0=輸入，1=輸出
  1842. ;
  1843. ;PTxPU..........上拉電阻控制寄存器： 0=禁能，1=使能
  1844. ;
  1845. ;PT1CON[7...0]..見上描述
  1846. ;
  1847. ;PT3CON[7...0]..模擬/數字口使能控制：0=數字口        1=模擬口
  1848. ;
  1849. ;PT3OD[6.5].....PT3.6/PT3.5開漏設定：0=禁止開漏輸出，1=使能開漏輸出
  1850. ;
  1851. ;PT5[2...0]
  1852. ;
  1853. ;PT5EN[2...0]
  1854. ;
  1855. ;PT5PU[2...0]
  1856. ;
  1857. ;PT5CON[2...0]:bit2:        0=PT5.1禁止開漏輸出，1=使能PT5.1開漏輸出
  1858. ;               bit1:        0=PT5.0禁止開漏輸出，1=使能PT5.1開漏輸出
  1859. ;               bit0:        0=PT5.0為數字口，1=PT5.0為模擬口
  1860. ;
  1861. ;EX0CFG.........PT3.0口輸入控制
  1862. ;bit7~bit6......PWMRL[1:0]：外部中斷0觸發模式        00=外部中斷0不受PWM2/PWM3/PWM4影響
  1863. ;                                                01=外部中斷0只受PWM2影響，只有在PWM2輸出特定極性時有效
  1864. ;                                                10=外部中斷0只受PWM3影響，只有在PWM3輸出特定極性時有效
  1865. ;                                                11=外部中斷0只受PWM4影響，只有在PWM4輸出特定極性時有效
  1866. ;bit5...........POLSEL:外部中斷0觸發極性選擇，只在PWMRL[1:0]不為00時有效
  1867. ;                0=PWM輸出為高時外部中斷0有效，PWM輸出為低時，外部中斷0被屏蔽
  1868. ;                1=PWM輸出為低時外部中斷0有效，PWM輸出為高時，外部中斷0被屏蔽
  1869. ;bit1~bit0......EX0FILT[1:0]:外部中斷0濾波時間選擇        00=濾波時間為0us
  1870. ;                                                        01=濾波時間為5us
  1871. ;                                                        10=濾波時間為10us
  1872. ;                                                        11=濾波時間為15us
  1873. ;
  1874. ;CURCON:端口輸出電流選擇寄存器
  1875. ;        bit7:        P36CUR        0=PT3.6輸出電流Ioh/Iol為20mA/20mA@5V
  1876. ;                        1=PT3.6輸出電流Ioh/Iol為54mA/57mA@5V
  1877. ;        bit6:        P35CUR        0=PT3.5輸出電流Ioh/Iol為20mA/20mA@5V
  1878. ;                        1=PT3.5輸出電流Ioh/Iol為54mA/57mA@5V
  1879. ;        bit5~4:P14CUR[1:0]        00=PT1.4輸出電流Ioh/Iol為20mA/20mA@5V...\
  1880. ;                                01=PT1.4輸出電流Ioh/Iol為54mA/57mA@5V... |com[0]為0時有效
  1881. ;                                1x=PT1.4輸出電流Ioh/Iol為31mA/35mA@5V.../
  1882. ;        bit2~1:CURP17[1:0]        00=PT1.7輸出電流Ioh/Iol為20mA/20mA@5V...\
  1883. ;                                01=PT1.7輸出電流Ioh/Iol為1.5mA/20mA@5V...|com[3]為0時有效
  1884. ;                                1x=PT1.7輸出電流Ioh/Iol為31mA/35mA@5V.../
  1885. ;
  1886. ;SYSCFG1:
  1887. ;        bit7:        PDP13        0=PT1.3不接下拉電阻
  1888. ;                        1=PT1.3接400K下拉電阻
  1889. ;        bit6:        PDP31        0=PT3.1不接下拉電阻
  1890. ;                        1=PT3.1接1K下拉電阻
  1891. ;        bit5:        PDP34        0=PT3.4不接下拉電阻
  1892. ;                        1=PT3.4接10K下拉電阻(默認)
  1893. ;        bit4:        PDP36        0=PT3.6不接下拉電阻
  1894. ;                        1=PT3.6接10K下拉電阻(默認)
  1895. ;        bit3~2:        CURP16        00=PT1.6輸出電流Ioh/Iol為20mA/20mA@5V...\
  1896. ;                        01=PT1.6輸出電流Ioh/Iol為1.3mA/20mA@5V...|com[2]為0時有效
  1897. ;                        1x=PT1.6輸出電流Ioh/Iol為31mA/35mA@5V.../
  1898. ;        bit1~0:        CURP15        00=PT1.5輸出電流Ioh/Iol為20mA/20mA@5V...\
  1899. ;                        01=PT1.5輸出電流Ioh/Iol為1.3mA/20mA@5V...|com[1]為0時有效
  1900. ;                        10=PT1.5輸出電流Ioh/Iol為2.6mA/20mA@5V...|
  1901. ;                        11=PT1.5輸出電流Ioh/Iol為31mA/35mA@5V.../
  1902. ;====================================================================
  1903.         clrf        curcon                                ;關閉大電流
  1904.         clrf        syscfg1                                ;關閉內部下拉電阻
  1905.         
  1906.         movlw        0x00
  1907.         movwf        pt1
  1908.         movlw        00001000b
  1909.         movwf        pt1pu
  1910.         movlw        11110111b
  1911.         movwf        pt1en                                ;led1/motor/led2/pwm/key/led4/led3/x
  1912.         
  1913.         movlw        0x08
  1914.         movwf        pt3
  1915.         clrf        pt3pu
  1916.         movlw        01110001b
  1917.         movwf        pt3con
  1918.         movlw        10001100b                        ;x/bat2/cur/bat1/pwr/buz/hall/usb
  1919.         movwf        pt3en

  1921. lbFirstChkUsb:
  1922.         call        fnSelectUSBDc
  1923.         call        fnReadADC
  1924.         movlw        low(USB_3000MV)
  1925.         subwf        var2,W
  1926.         movlw        high(USB_3000MV)
  1927.         subwfc        var1,W
  1928.         btfss        c
  1929.         goto        lbNoUsbPlug

  1931. lbUsbPlugIn:        
  1932.         clrf        var4
  1933.         incf        var3,F
  1934.         movfw        var3
  1935.         sublw        10
  1936.         btfsc        c
  1937.         goto        lbFirstChkUsb
  1938.         clrf        volume
  1939.         goto        lbContinueInit

  1941. lbNoUsbPlug:
  1942.         clrf        var3
  1943.         incf        var4,F
  1944.         movfw        var4
  1945.         sublw        10
  1946.         btfsc        c
  1947.         goto        lbFirstChkUsb
  1948.         movlw        BAT_VOLUME_100
  1949.         movwf        volume

  1951. lbContinueInit:        
  1952. ;====================================================================
  1953. ;WDTCON
  1954. ;bit7(WDTEN)        :0=禁止WDT        1=使能WDT
  1955. ;bit2~0(WDTS)        :當WDTIN=0xFF時
  1956. ;                :000=2048ms        001=1024ms        010=512ms        011=256ms
  1957. ;                :100=128ms        101=64ms        110=32ms        111=16ms
  1958. ;====================================================================
  1959.         movlw        0x02
  1960.         movwf        wdtcon
  1961.         movlw        0xff
  1962.         movwf        wdtin
  1963.         bsf        wdten
  1964.         bcf        cst_wdt
  1965. lbAllDefaultSetEnd:
  1966.         return

  1968. ;******************************************************************************
  1969. ;【說明】：中斷處理程序，T0做為系統時鐘的定時基準，為2ms
  1970. ;******************************************************************************
  1971. intService:
  1972.         push
  1973.         btfss        tm0ie
  1974.         
  1975. …………
  1976. …………
  1977. …………限于本文篇幅 余下代碼請從51黑下載附件…………
復制代碼

全部資料51hei下載地址：
V0.0.111.zip (54.15 KB, 下載次數: 21)

評分

參與人數 1黑幣 +50 收起 理由
admin + 50 共享資料的黑幣獎勵！

查看全部評分

回復

使用道具 舉報

您需要登錄后才可以回帖 登錄 | 立即注冊

本版積分規則

手機版|小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術交流QQ群281945664

Powered by 單片機教程網

快速回復 返回頂部 返回列表
主站蜘蛛池模板： 日韩一区不卡 | 国产原创在线观看 | 欧美亚洲视频在线观看 | 国产成人免费视频 | 国产精品一区二区视频 | 毛片免费观看 | 国产一区二区三区在线免费 | 日本激情一区二区 | 国产91久久久久久 | 欧美精品一区二区三区在线 | 欧美激情区| 国产欧美日韩精品一区二区三区 | 亚洲一区 中文字幕 | 日本免费小视频 | 国产日韩欧美精品 | 久草资源在线视频 | 国产精品精品视频一区二区三区 | 91tv在线观看 | 欧美性大战久久久久久久蜜臀 | 亚洲人成网亚洲欧洲无码 | 国产精品久久久久久久久久久久久 | 亚洲瑟瑟 | 午夜a区| 中文字幕成人免费视频 | 97超碰在线免费 | 不卡一区二区三区四区 | 九九热在线免费观看 | 久久精品二区 | 国产一区二区三区在线视频 | 精品国产乱码久久久久久图片 | 国产免费a视频 | 亚洲成人国产综合 | 精品久久久久久 | 国产伦精品一区二区三区照片91 | 插插宗合网 | 黄色一级免费 | 国产精品久久久久久久久久免费看 | 一区二区三区高清在线观看 | 天天拍天天操 | 欧美一区二区三区在线播放 | 亚洲图片视频一区 |