设为首页收藏本站
开启辅助访问 切换到宽版

 找回密码
 立即注册

QQ登录

只需一步，快速开始

热门： 51单片机 | 24小时必答区 | 单片机教程 | 单片机DIY制作 | STM32 | Cortex M3 | 模数电子 | 电子DIY制作 | 音响/功放 | 拆机乐园 | Arduino | 嵌入式OS | 程序设计

搜索
»论坛 › 嵌入式/单片机论坛 › 51单片机 › 果汁机的单片机源程序与PCB设计资料
返回列表 发新帖
查看: 2753|回复: 2
打印 上一主题 下一主题
收起左侧

果汁机的单片机源程序与PCB设计资料

[复制链接]
跳转到指定楼层
楼主
ID:386239 发表于 2018-8-14 16:02 | 只看该作者 |只看大图 回帖奖励 |倒序浏览 |阅读模式
水果机硬件与软件，共享
Altium Designer画的果汁机电路原理图和PCB图如下：(51hei附件中可下载工程文件)


芯海单片机源程序如下:
  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)
果汁-V05.zip (1 MB, 下载次数: 20)


评分

参与人数 1黑币 +50 收起 理由
admin + 50 共享资料的黑币奖励！

查看全部评分

分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏1 分享淘帖 顶顶 踩踩
回复

使用道具 举报

沙发
ID:535917 发表于 2019-5-12 09:22 | 只看该作者
原理图都没有
回复

使用道具 举报

板凳
ID:1090486 发表于 2023-8-8 16:51 | 只看该作者
能不能转换为8脚MCU的BIN代码 ？
回复

使用道具 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

快速回复 返回顶部 返回列表